From eeb9c31455c1a3699edba7b3db30037ec7efc2b8 Mon Sep 17 00:00:00 2001 From: Artyom Titov Date: Thu, 30 Jul 2026 15:22:12 +0300 Subject: [PATCH] Heavy computation is completed. --- 240Pu ansvers.xlsx | Bin 10487 -> 0 bytes Orekhov.xlsx | Bin 11085 -> 0 bytes .../h_152-88_h_Pu240_6-7_gid_Qw1.nb | 15889 +++++++++++---- .../h_152-88_h_Pu240_6-7_gid_Qw2.nb | 16624 ++++++++++++---- .../h_152-88_h_Pu240_6-7_osc_Qw1.nb | 11037 ++++++---- .../h_152-88_h_Pu240_6-7_osc_Qw2.nb | 14721 ++++++++++---- .../h_152-88_h_Pu240_6-7_pr_Qw1.nb | 16204 +++++++++++---- .../h_152-88_h_Pu240_6-7_pr_Qw2.nb | 15823 +++++++++++---- .../h_154-86_Pu240_8-9_pr_Qw2.nb | 11700 ++++++----- .../h_168-72_Pu240_22-23_gid_Qw1.nb | 10743 ++++++---- .../h_168-72_Pu240_22-23_gid_Qw2.nb | 11720 +++++++---- .../h_168-72_Pu240_22-23_osc_Qw1.nb | 9950 +++++---- .../h_168-72_Pu240_22-23_osc_Qw2.nb | 9576 +++++---- .../h_168-72_Pu240_22-23_pr_Qw1.nb | 10943 +++++----- .../h_168-72_Pu240_22-23_pr_Qw2.nb | 9765 +++++---- .../h_170-70_Pu240_24-25_gid_Qw1.nb | 10797 ++++++---- .../h_170-70_Pu240_24-25_gid_Qw2.nb | 11903 +++++++---- .../h_170-70_Pu240_24-25_osc_Qw1.nb | 9898 +++++---- .../h_170-70_Pu240_24-25_osc_Qw2.nb | 13714 +++++++++---- .../h_170-70_Pu240_24-25_pr_Qw1.nb | 11371 ++++++----- .../h_170-70_Pu240_24-25_pr_Qw2.nb | 11201 ++++++----- .../h_172-68_Pu240_26-27_gid_Qw1.nb | 10525 ++++++---- .../h_172-68_Pu240_26-27_gid_Qw2.nb | 11392 +++++++---- .../h_172-68_Pu240_26-27_osc_Qw1.nb | 9629 +++++---- .../h_172-68_Pu240_26-27_osc_Qw2.nb | 9354 +++++---- .../h_172-68_Pu240_26-27_pr_Qw1.nb | 10357 +++++----- .../h_172-68_Pu240_26-27_pr_Qw2.nb | 10138 ++++++---- Pu240_798-811_TitovAA/result_table.xlsx | Bin 0 -> 393672 bytes automation/clean_wolfram_notebook.py | 660 + automation/fill_table_from_nb.py | 507 +- 30 files changed, 192145 insertions(+), 103996 deletions(-) delete mode 100644 240Pu ansvers.xlsx delete mode 100644 Orekhov.xlsx create mode 100644 Pu240_798-811_TitovAA/result_table.xlsx create mode 100644 automation/clean_wolfram_notebook.py diff --git a/240Pu ansvers.xlsx b/240Pu ansvers.xlsx deleted file mode 100644 index 7ceb9124529d778e0bf94625758a6e8e9d4c29df..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 10487 zcmeHNg;yNe(w|^~0Ks8!26xvW3GRg8?(V_e86dd3d$8aV+(~c`?hxEvzS(`UyV>{s z1@HBo(|vlne|2uxt*YO>RV6PC4TA}Q1Hc0S01&|7D8o$W1pp8Y0{~zE;Gr~yZEYNl zZ5(x#-0X}Uv>9Ektw?fVps2F}P>}ckcl;M?pe+8oTsJeS=(WUy@Fs)QV)Z+Cjzj-` zblMLB9X)Y-|IezA7Mv`3-a^>)>-S z_4Xf7wBz8$+H0sEXJg{OW5LzcjW9_AB!6t^R$v!d6O<~$GsD6b@ZHFm?^i)v>1#sz ztWnG}u+X_Gr?QO3{jFpYbz>Z3%EFw+L+5;hK@uj6)MF9bS*JiAq^3w?pwMK0mn7Zh zK;6hTt!D_e%nXiheZ4fY0{69zi%6Coue#*Z#b=GaXiK_wPc2XPcIwEm3;DZdPAoHB z2F=WOejxveIe@%nSS@xrtIeoa&s(fKneQiEBun=cYZwGQEBHpunNiV3azIjR`qhH| zOp*6IT(th)MFWG4+#T-^4GBDL3ddh=!ie5HV_u>CY(DQ0LLKY?k$VLnt`7X<^*9*Y z(hN8{P5kM@`UD36JU>GNizI- zVTmtdZvb?)&R!OVj>$__?@|s;wR39}ZE0h1 zj`ZLPnb_p1NEPZRqbeQ(MgajBn?J=*qfb_S+2E$)#k7#(VLA9q16TH5+-RE5Y+~V0 zaO>eh=q?>N8T1b$E?$N()Zd+Cts%kkc@U-|+1$ckfTSq!rE(74PEO8WLuaXy;jvAkHlJ z-t|v+!8?{GQ0yE;OA(sN1IA?}yS~DsG zRmNhG>a_e~sBY96qK(P&o&8x%>hg0bVhdXmR=YDQh%XmIGE@i%Dj0qqLt|hvV&5Rv z3Q3=ZEMBRKsLYe>sd2r%A|XN|Cuh-Zj3Ll?etQ$MDV2{v+aOavxga{uxSpzf=M^HtjYwf<`Xepv6++vOn+D12UUaC(P?mKDBw^B1drgn%(8fq++Q zqC8XqWzH$e$yG=1@K6#N2Te3OsqxfKJ)bbZ)ev$Jcb9AMR!wm{y)T{c~+lb1@R}F)4|`gk*75Z`del1(w}tM z*@c9YpAvLuFj>v^pR+sQj2b08oJELIG50sn#6W9FIN|hv%%AVIaek|AL*-oJ?sS~H zrPb?oebsLL0NAs1-`wuKjKQD0PAdIQcCBMn`kpJykZY7N?)Kp3v1ZHuYJv9N=}p%| zzi+Bxmoo4CRJxV@6&J({|L&)L0`W=bkSEO$GQ$JFzkvAZKltp=-uf?YdjVN$LcIOI z`zTY8mF{6iZAE+vW_C$)#zOny$V7UeypIAuSWB}&31aiUSiz@l)>fO5W`ec_yB!br zJ706WUWdlG?4&FHgbw45VRg(4Ydd^C3=MB^SWe_G4vT?)u(w}&i1<3y0i#JEc7Q$; zlY9GyngTaCuaH#aqG!6v@e{|f4?|3*&OVjUV+T?-%Z9PNYBR>vNB4+2LOPOH~tyg z9n6f49UYi{zp(rk(Eb4D@ zc^2$^S{Acp`r86}I-50~#7StS>jx=!(l+pd>B8@|%W(@Yj=Hj5J(LS{!K8~+GfX=1 z?QAB!Q%7(p?6#$|?qxQlc=Pmru$ZHFt1^*Vk5u_qN6LbK<}SVnlN0(q_1o}YUJWsU1a7^}z$lm}WT zv)6ut<%9d-H_}g=k3s&lAE$JvZXX8Tp{U%>C%gvtbL`v|IbASC!yOcoy~Slx_1SNU zXmV=1d56!8Z@^Qv(eLX)S!Os;q=aV3mO*FM)gEgd`UwAh%oWAEO*D2|p;UuLby`Z> zY6yizU@mt%Y=`%X%qkz#;vEPY`Q~YuF(w57rrVg^%A#-5~TU$6QQ=`VleZ+T0kJL+;IbDJ#{4KU##F;N?eY~I z4+6=3X|cXi19nN$hl|5zv5W~tXI9~9z)j_5)&Uj5#Abw;!dYpeh-s~N+qX~L@+!mH`RtDn{5hhBl>uJ*;#?7o%hA+aOD0g+h7Sb+M> zeR}?#m;tzO4oKKQdKNYPFMWCeo!9|{aQB!4Q_w_;x|P9p{_Y(t2?SNUe6EpJ3Y5bK zZrMTDgCM>Ry%0Yl|IK(J{V;O2L z0mLhGWgc6CyBO52!?qS*t}dd$VVRd2gk7Q?)QJjB7=Q+6h(rmJ;9SSl9AZv3{L-Np z+W9Jg0}dalp1X>$ey-?Uq0sQLk_5Lg9cIkMc*xP3hS`Liv+`!#K@AA>#u*PSjs=7v zR2Vn}pMp_MVk9~6imLH94J3vf!2c+cEY!)>Ki^W6=QiHQig9cm^y1{8&up1+J7`Y`KEvtC5kv9G1(BM6%sRGu28O+ANE2IZ*(+7KOi!pJ~T-w zRuHG6kV%i_pCkzzSceWrMt?zGNC@~C6ohnNp)WqReZ*rn=N|jBCFC`&Bc(?MFj#h@ z+zc=5GN7@Lb$9kdMJW=VUHp3`I6{tZJG24VxLb4y)@QEmeRs?g>4AGl%Rqbd&up$# z1Cqrft20?~@)@120^;qx;Bvl4?0_BXNbj&tG7iWet5qp%tJndiWLpc^0sXqKD}MtG z)(oyjCb6N&!p%0O^Q9p%TJX4W;%fEUpINas+H7r38rkK2tAf0`@uGqpv0}Cf-?WW+ zvBv2lfF;8mj7s*1CHz?Wy=i#0kQjelr7E;7BJY zLAq|)=RcAZOlC;P#!CP|g!H%E+3zIfXl86}%=G*DcYZq1ShB%y!fIn0b0OK*86Vp1 zk3}=iS#iZ!U@@TR)lon%&>zBmMQ*G~jjd)>d1Vp?wUEmNJHLF9OKp)&(@fpGOXr#e zdgt$akIKIp&Mq7_KX)tG5LAvhYS-p)bDG}W&9=GtxXWj<8xJq(HgV?9+ZHUrx{Z-K zq_G^gmOXV6t;C(8*M~82mMG#*ymWsWb+oRH6_ZR7{eF|t#w|wSe92xtG6(lNucsWk zE9Vwz-z%HmGCs5$q>H{Xf;;b40>e~S>Q0v8)`z7nUB+i`H$NiTB1f4P54uM$xD0Zs zJunMKzXq>5!sFG#P7+SiidI`=%gq&A;}hJ|^U#2t925g6sroz2o8Gc5!C4G%PV${^ z!bsAvC>oizPc3JyUyWPR5LoI&>q)qneNwb2nRyUovkW*jT=uTJ#W>XVxd4TnA0NR_ z<(IesqA2}Mnxx#3Y?W(#eK3RXgmm!Hww!#`DePkc@`zx~GD2yhH?-8HDpx_s&C8P-G0)jZj0yBY*Lob)7fp- zm_UXot+Mgp;hK?3{Qc4O+vn@bx5CeN=eBM4dpI^N^y|9Mr(v@`_x;x;!6iv)>(fk3 zI_-_Fm!(Y4x51SJ^9xW>pH4s#p(4SXNc`I@NMp%e+waBJP0+jH6{VrXvlnujD@hSu z8+(R=_E8rC-@_Ua;+#CKr}SQOqa%tE^1lr?Ky>Zk*|%F`?+{*6?d<9nWp!|2#1>sN z41cfffP#cK$?RA%9b}fHKEgA0sr5ku>5pjc_n6x9pGyJJwrzCt8X=D?RPg9YAnL`Y;md&6S(==ql5ayuN)OOf z_4qrS%l7UACH!SFYEnqAOKOF#l80`v1zvuq3pEXm1BO|rqIB-7>_)=Ki1l+5SDi|t zxk}^+1-gF3+lql93|c+1opi_4w>+Gogt0kZ!N&F|lpqD>V4o#UQn%{H~WzmP3>qBSIjMOP=>eiPUtwll^9$0Wf)kc z-F_NO<2yf3cS01odf2)({h5YrE+-(>EB7(J*?mj& zfv(AqqF1I9-4V`#FHmwPhb6P2h30^)+n6tSHRetmsRlQFHatPX^kE@Cu_^jRFB6l=V`DA5rXF)*5ibMpb7G(?7j!5mX>dz(R}dNICw?;I z->|E5XW^YTytI^T1Go^2$FZ>+Af5t+L#Caf4wn!T?9x&5D>CJ|nKVtS`JO7uWYn)3 zUU!~(hX3H}`Vp%zv`w=}Pi^^T+r~PeOPkY#dAATjoUOI1?Y#PayG}!sQI|OFHrKoW ztJSKx=4Y_x7Gl|%@{~cs_E9NMLz9#OSgJ`&O0d(!h=#SraTO_b znZPB3vnCU|oOH|K1d6?Co=PQZsn8@$8;>PZX3+UKn*OIJ8P;(FK=L(t5NGsc_24}6ygk3xV@+vP2f zyrADObqIT@z;Q4w9g!jRbqaaE^$T*Cv)9s|82CS?2LLa(Xb(rN^ALK^M+NE0c zxL~{l*`N=m(WO(eP%!9b|1Ve1qj{j6?x2g7Dd4p`AkKtNejj`P_PNl695inMH4q zi1aIYy0;=F%D2L}Y6(_cEP1*I-4e8-H1&%O&zn~0 z|H_<(nb2%xmW+T!OEDc=Dt-o^yr6N0jmIF+X1~e(6mJlnpz{Q=MIHl}%M8d2B{m*V z0jJh|@B&B#We1*9K)<+MhBN7&@RZV%rCu`E%MJ?i`+=z?sy~Rat0sGIujyM%(9$es zvin-Tl6?M7@ZtuxAe(%WTE)~0Hn_eZq&~(4Jz|Xu7!lm*y6Letz^u!;8ED$rrEY~1 zA-9wX)JTD=zV+Rd2C;=~%-o?JXrK%iV(z@EWg4_7ZofX$g(Ddv^FVqn{c_%lyBexJ(Y@S+|G)s8+=w-ukETBpF z;r))K@~ut4y~;h{gi(okxuRbF!&tdMkJHq2Yg6b=g^$$WCpN9Pp~B)r4NK4QsS#z4;gza|3%yv{h^OEex)b}U*G>69qE2v z?YWO(Sdn&oF2bxJO1jQWQ@9#|@|v|cdpI@O>x=@RSBS0X#1)zRXSD;FM&def z-Ogh$UfXSk=iPRNcGcV(#DuqY@ZQ&4Yn?F>Ne}J6j*s`|rlH|084#O;dl2QqUTBp= zURkVu;Y@tb4RkMxIp!JcIM1*P5gRe%4oN3J3+QD|&k~oM>L%hp|Iq8;)$W}+zM2S)J$mdKCm$1!S*jG9 zzIz7;SeKop>Bi=(=f}g5s`&kD)X~`SS2Bu3#k22l-V2l@(Xj?KgqkF}+mk^f351%Z zM|16$$3`3+ZTF7^PX}$y-BW5*8{kVL6pq1S$!%{1HaI*h=I$<*1z7qJp^Iy0P}qhb zX?)edAh}+fi`y12)*CF*uxF_C*F*n#&qfSK?P3nmW&lK+XpmgAk*%S;y{(-ClcBA> z@jtsA{+EJ=m|0-#xLg-ACiqy^Gq~V7Z^74Zm=m2tOVWT;Y(smJNblo*YW=H4T&9*w zSWkHNQ~o~uAJ)FWa2<}r+fkRN=lpTK7}F6l>I`gBG4Jofui;frlw=GY`H7mnHqC@# zi_}3RV$x$~(FDYzGUzJQjY>f<#tLJR6bQ1(;p0Oa+Ec%SI9>0Cr=1?}sFzr9SD28=KpMF%kB-7^sTSRxl|J@wG z>U3;%_Tm@3Ki-$bh$@jH*ptpJ)h!U^;QVA+$2TSiMJ^gmFFo+J+;S5*HCd*Wbtjj( z1SOB!$KHBQ;C6f0l6AXAsY)ofG>Nu{RGmnrPS zo(NxvyVMPtY>kP}7ORtP9YwuukL@#essW90gVp~9CeqU?Q{PPSPp4J(>wqTt6 z;EsQ@*zRlt6n>lvA;TN?O~b?k6rI(kfi}S|qB2xM5yVK~m!yb6R4&kmDHI=~Cn9em zZ$fXnLH{c5K*dA$`r}JaR69G`17tB&n{-kedXD5a6}pg%SErs*e9Yl3Md2HBH0vi8 zL|0Ld6AdpGGx7U(!<<$ot>Sh>d;Bin>+#cdns zwFiDZUA%lSNNoRpYe~gHk%gl9_TTjN0*V1bRsXrg>|Yc3uj_wkIFpzDtAM{Y!~6^Q z+cgQ|C4Xv-`4#wUgTNoq7D#RBmv(_)!GEn<{s9F5j9&c?{(owizsmWwl=X+CB&2^2 z;%|kmU#0w-Yy3kBA7rNi`IKKXkG~4|bz|~}0C`A_4INt-3Q*A409XJ#005u>m>p-@7(oC4anJw&762YnU&7hR z-O|b3Skv3Z5@^Wc<>)}32MtM=1Au(_|Nq8+@d=cD98&IPLzlXd{VB1@EWcDO3eSBM z(vQiYCfw1J*jHk%pJi+NoE7iedS92Gp!p=CtG z%i7z2NZpP{kl?1Ldy<1qB+5=;Z2ZA09q`Gupx;8zZ1*$p^J%AxiMmw1Z|1?V zF=p1!5)GyZnVbix+DFymmUB3b`S*z6@{C>h@%g7P`vVwI9eUp6ZAbC z-_n0~e3rZy$ngXV06afK0aX72%Q`JKs>>H!Q+z=k(hDq&-7Fn|tSrA>{|CqaVhsN2 z(aRE)RJz%a!%t*?Mhx7{EXSdXD|m{@exuL~2$EYutNW1uifFl=mKa@=@Ew#)U~9n7 z@8D&j5BmcY*XvwmQJC0*RP~)hT%hq}@JZ7$Du2W^?z3Dt!V;M>t zi*pqQSE!_?&LpeQ$5?a-5wHq~!*O4y2J7`H>HaXgt$>&j*ElK<|JuNtv!6JY9ypg= zxQ8MF;#WMJOvM=hnprPY_zgHvT-_0BY1r`Fel^Q-6QJ}qws7dUkW6pKdh}yf&KOXq zX8dC{*=o54zc9wi)v)jO2b!QzG{Zd3}o6za7_DE{y z*DPEjEN=EzgqeAca`qF|<9-&IcgKf2*~)X`KUNT3odKfYFsp)T2GL?hhS~9B$+9;{ zj0zM)B_?zystpOz$%eh3?CdPeg~U*{%A2I%H`(#cnl@n+q$YS@HjO@LR}vJUbEd_c z$KA{Bf|7Le_?KRh-uAImut(jBuhS-eLo8fLk7?XI$Tn$_!Ur)xEI2XPoBfQS-RR+Tgs?eBe!x*0mNBoy82 z8!nQ#&tlj0UTU4 z32qlWPIL+22k~yI4?co$wq!3uie8nw+uE7mlS3d7SjP&50 zAbC8k!tu;m9G94bUaK=x(MQP1Wk|Q%IZ3@7%?J(mnl<|-urst%iF1wp z=R!MJ-Nr|Lx`875Kqf$3RzN(p3&qM@hA4bp}u4jT=YzDmdecg?up zdxOB_UJt9Lc#*2FJ2c5EE>7{tJ94B_MlqSe7(QaQjl98&<3vZRSCxSQj|bos=Rowv z{HwYWEaWkcaqz%}n+p%&3X_dtQ0rS>=u!B3f94FwX{n-c(v03<3RhRI-ZuNS;WH-B zZSd^yTL(s04Z({--L&2;miV^&ch4J;#K@%4&-7`QF!e^VdQ06R6B*3ri@~Y&Awee! z)m6MvRZ!T=8Jo!peh$57J#{Tyo-OopiNizLgLZdAyhb9NTrDHT`)fA)8vM~v%iG@; z9yi?ts~BfWfq26jnK#SeXWUze>AAy!)t~nR9h;9^>*oXWQ4VK&G$K5F&Cyf4x3@OJ zu>txP?J@c}fr@m5h!x<@LYvybg_RdD{vEEt!XHyEURIi4Vj3X;9^wVA{|ak=2JL@B z9K;Lbd;$G`_b5|WQs`krZ$)~FVDn7(z`XQe#UIzWRTtfdFjP;drZt`IRa8@`!U zV1;rH_dXfv_qgFkU5CQD>SQc_j|uIAMPN{47^Om1hO5UUPo%#33Tg0Ubq$S+1 z{leYJBL-y10_hWgTY0J9v`*IC#UH-Yw}a1_hAvO6HV6A>{@G-@aS!!55CMQ=3IG8A z#TNeU;ej@mmhM2--zWCpTz!Tf*lA+`!yhd!5dG5W%L!ihwV8!sH5x>S1+RCqag0)ctAWkC}*lkDoPmeeFw+SFF4%2OD$S1trQgimU-Uay>ZJQTBjTZfm#;5t-U^T&@y@jilkIQZ zn?~$Bb#UD0W6mw4@ChacPNoiyiZ{m0t<=XhY=|`K&o7)uwdpaHwWJYPR$3vgRn%qy z>(R9ZE1!7VzIiXLqeK)Dl9U#K&+r0TF+GG@zu98#u7LM_FOGL6Y#&c6?Q|TKaag+g z^W(D7-ac{z0>dIZEvFzuhPK;#_PBgozwtjW8JaFwor%QcN4(Wop8NLfK&Halh+MK& z<)aq}&V14heAch?58&^#JFTTKtRM>bZcBC-&8RRv zm5yVPp1kRRN6fEB1TOQd-an4#M=nu#TjW5xk*g`72TTeUj0;f5!taH3eiD zIi3R2iew{TmvV3ma-qsbjk9^zg@d9{YwwnFGjTYI=hQ6}YsE9sXWN^(u1#-_O;yAy zkdY+sb=+9fg_Pe)-MQ<6NymyZ2g@g>T8c{DIMGF4$=xuVDG`W)jXhoTj?!EeA4R@) z>dmrD4aKfES54&BB>YIhTY0*E0`JPGXrMfY`De{6b|;}uX2FbFc^|4q3s6?B*dX0@ z#^j_oEy2$5hN2o&NS=CO+-A0vZ#?~PyNXH092vkq;pWs^Q;E!euej$j`(`cLMHZs( zGb=|yx18eyX@PbOzZgsNzNole3l!o zWhn-98_b+B7^Hgce8lV_x>n411~%{YJ^1#}`50eM6_ad|c)ONHnV9hXGj6#StiQp=cGB;Lvq+YAg;f+ zw?L%`k&2LbbV1XWmi*X|6+c^h=mJW217&)kc0xeKUr()tVt|O%sSPydJ)c;<(-p6d zdDy04hQrbDT(=xZIi7d00!fPKEZ)D>GXq#iEP&-b7qtmk zR^XsP7qj96(qX3w5r70-^~fcWLqPHC29|GfjKhpq2?o(efNO^1$Yhir5Kf6QcoL$q zOG>ok8J}ncyYi_SL^)4B%&Jcm8Cm4K726Ys7hj_<9Xhobj9R4+hIGdyDN%(eJ;azM zx`j3MR8`+LOg4nI0iABCy`D4@Qn=>ur_AaDW}T8})l1-Se(+HBwRC;!hJ$Fd##;j_ z#(l+@yg;Uhw%D*kX(Pt+e%l|`%>~WR743NTafwqB;^I}XZQbx>aDwkT!X?WNLhPkj z_th{k%m{H%CO8VY$FvyT0>4_^RFBHhCN-Gc30X6EPwX}edySzRx|U*IQNm3eBfrkS z?EV&=9oeOrh2hS6(1=DQVNer|)^ArYTrfI7l}|o^9K?xUlW)pe| zh1+ZlNsgsZ;`?4gT-zA3!q)O;qjmyx;<8i`YAGA%{{H?T?QJ#J=Dd2JX}7LYaV(GT zIA9zaAwsrf7};zy!FXcwIPrD%oN#^~=JC+5{lPSX8hE~57^Aae|6a+FjMrwe5=>Pb zA00E#7=TLwgt4NaNXPL0!L zYdbj5HJU9Izh31@*uqkVYuh4`U&55Mum*=-iW>qD*JrBTW`L>+4LA5Y9)Sq4 zzh=!Y$p=Mz7lC@TCpsu{2CdLP8Hy&DMgA-XMQ%uD#E&xO9Z39{yN6qn6L+w-arD4k zmd-)sqs)VJDo!@xIihZE9)=y4lG9i0!~7kJE?r5A=<~LgR$T#AD;1&6$)}`KQ~VoT zb8-Bp(@icO@A&9x$kI?pPT9I$x1mGjFdVwP;;s~AmZKsDwnf6c z3@Oa6>RZXA>p_@1Nne6Y<<@XDY(sFd$JK?==eky}_zHYkVq@$M5wEpfj}uRHW|tQ% z8V*2z;DN*VGSLZg85Q;G5tk5c?`cCH_;E=)$!bB{(W6x=v?@^o%A;I=ep=s}DdiPGJ6imMfgO?|;*P_w(C( zL}Snbw9vEWT+uP>t%2~!v--yI^9zgo`=<$X76`Nf2LMP?{+0#*ooBk+SUOs={(k+P zVjk)(I}tVEw6TtRl5ZPL4Da?QU|8m^cwvFr&8T~g)G-T8hY1j0S?bf_zOkshwu*uT z=kdZU{2ruV7c^)Fz79q>Ajg>a6_akvFXZkcwlP}ez4{P!~S<;7W`Qa?~c-;^u{u6ne z$|j4Gcf9(=vYT#9F2RtXpE9Nw&lY7LqEl~~5XLR?WnUTbeLyR*d72kpCwp=0&*d#+ zmgfNPU{a+bcf}T8#z%kH%vbXJ;p|xbdV;zLkJsRx6ugubgSN(&+iT9oC)lUw;Q?i3 zNM?$Z>LF->-m)#RIjjJlS3BP&kQHFi^s=0vTFzU)S+=Aju-8e|lk>6#rW(+&@gpc@ zoAKy*?%#AvbH6#@1r+kQK88P)Ul9OEV@)^dQ}RZ0v~P$^!=iD zM#XA=Ae1HtK*?X}@b>fBT>Ek(Ig8S_)dxF2m=@_)ox*-xKOnlbYj4H6W^RFyil(7W z-@RAPR~s9*ANW}Fnzlu^@aCV~b+oy9$L*8q%pV3he@HS%MI7)GPql4J7 z6ysoEFZI3}zqQw1F28bPsFesZBz$iPSw&zUlvm1XNbNSl@TPR)cEskJ@g_TOG|^I> zpqBglgOoAj7Qd&tl&DM#QFDP0{Wo7CzNDnD&#RDGxd&Yh`oQzJ|`xA@(csaFyL)sXafi}~!gmV1=&74;6lQ|z~Vzz@wb%8suT zk%oykBSLkpT4M1K`&p7Ch->mXZ>ruKyoyaRGw8W0fK(ZS-zXNLP;a&%MZkCN+(To3 zB~S!Lo9C#H7oWgN8TB9b##q>(U54)m(pslUN*(r}LyKeQQ&kw8LOG40`=bSP3~GCd z6!f^=q+@kr$+}3%dk5{(BCVZn`F9=NHCkvW8t4`>n=yW?hj}Y4W6fS8?wgGsK6V<4 zez|E5_YO5%pJz-?1VsKqR&-2WcX*WTKZMGLC}!5AQr>*26~F#8e2Xg#H^dle9hrz9 z<(P)nd7!-;1Fb0C&qr2uCWqlAn=2mbgQmJ5icOn2p z-rlN7A61B>;7tzh32+1>v)2d=Kv{w47d;E~(W{oSqjulUfS5DfG<+wwor1&%OFYfe zTE5)!_lTd?JS!hvbe51dtb2a(tlvs%Wz-twS$Z~coa&C+1a-Jor#3n%q=P5>9@<$Q z>qoZ0A=~viP0Th1l_q4La|Z44>738Y$!ajLjeW^%Mu4^A~D3 zh*A&yyS$-OeEi09!_pBPEaF!8X*H$#F|xV?)J#11tvNJaC)$isJ5Z%s)xaoJ?DC|m zMcoFeOdhG$tZWw1B)!=>3P9n>oAj7(R;O=nOXRi-VB8Ns8g>||fVWvlkE3(9N-XA+ zJuD+!5fwlA+)9S41Q!*q-R?FMP9LMK63%d7qLBFZWz|_f)=u#1Uauy)1swXH&~Wwl)r!?C8}azNpdlwx2gJOG^IB z!-jSfQ-yCv!ZZ4mHzaQLXpMdDhPK&T>Ns>!%Bp3C!qrxSBdXT#C{xtEZb0ok_lsT->RL!pAKs>4VxqGb*miP!*Ja3K#kO0BAj8?( z)pk++uwAF8&tgoLewSxkfYa*GT(cLUzlBtGt~G6zw0&I4-_RuQfnGdnxxPI21XW0C zHJ_Hj*Gu;dY8Pwyp}TmtHj=YJj&BwmN?c#Y-m0Y)p7&e4-`#B43aj|eE@&`X0+9?@ zobF)jo(&nb8^fKBGNegUp09J!>ofYI`+f=SUYpK-(xs;Txfmt)qR=< zg-D@urVwZC0uY?*u8ih8wS?roZD5(iV~`t`!+cT{P;Ph>UgtFEJbhnaSFoQ#Sm#kN zT`|KT){cAIs(ed7uAxReJsC?4>mtyTyg-Xp=)X}D>Gc-iVLiOT!D}q>@x#rCHI|r- zKTmuBb8z^5K0F#RLTy)oDhk-NVfqN>N}c;~M&U!I{I_Y8gVwJoQ6B!|Pty`bu*B{@ zt(`fz$@_*KT8|#()5n_41wQ#J2ykNUix&_X%pyCdxcNXQE2KuQmgC2l$p3dv&@>?P zgY>1kF!{2I@-I#RboX|!1pbzA`mCkk1ZG2D#@i)Y$fo_LGbBylosiP!oLn2$=mpgkVgTs1&&KC&^K?t0#WLAwS2#@>6i3r*Z-0<_l5VC1!%kaL zh$)mb8S-X+KgronNzQhOy7Q3^zORj3aUIo^=6yQ^hGaW<+9+32iAkSh^sv6SOBTCk zC`mJoiC@*R3xi%2E9Pw|VJq6CULc6-O>UA}(rX9+qmv?BO4BS4P{TFgV95mXS?TyrJ)?y8@E2 z-!pz-`iRPbClK{2#DjL!t`ylvs#g0XvxqX}%yH*{r81I-JQSA|QTkYw@g1os8{K=( z`xp}$plA-tjUePsXib4tAjvnhsQ~0q^9;1=NrGzVP4h3w{9bD9Z9isD{Sf3&=0gr* zi*(W)y6H#_PQgLC)tb$rql*H4e=` zNw){>V1K+|obz`sg_~Cj+mznyGD@Zo7xrlS!MaBASlxZVgBl2$HAOQ~2|jP{&MOpH zeeQRZ+)r~Jm@kZk@%?)1e&YK4H z4Vw$ZRN{{ZVpXWNG8JR$Ee|aZZh@Z9wl_ylPB%CL4Js6RPWTOqPoGVK40&V_pp}DX zKeTBRN7&?qCTLr9A6<2(u5a8^GcQPYeBD)Pwc`C=k4`UKVa!($ZjSek=Q=EyC7gB9 zCV3qV@4|YjSBlg-(M0%6x`^w#@XT+mH~-?!EMDau9p5t_e#bL=0QecH*o7~R098Wo zCiZC1n8cBu)Is3hF&6TO;>MN>b#$HW^n8l^Qrev3jAmnMerSVDFIwgziZ2#!X+tJv zuLG^yX;tw2Y?wogKk-5Dh>@#SJl^CXUFP;d{~CAk3Y3=|9EOSZcdng$?#3Vgu_igjqrhbRvhwbw z$bs=v&4%4~0<)64*{1X?n_6%rYN>+? zP5a)HfLms7=r(P7i zxztGx`FD0ir}r1?xRU9m1}0*=uXO>}hP*v6HeDc^Mu^2c+C1ij2~v7eiyx5qy>Su{ z28@UNq))SUabfp$x#h?or3!VrEEX3@stJzXxB7gkHhQC#qybZova!<5J9RO{Q<8aR zrGu?X$VsS%Aeq8ZzOsL{ZF^x*$qa0nJxNcwuX!q-V<#<6`>-v!_eJ+f2+E`SzSPy& zfuIsZQ7F~eNv-hxAj`pT6A7{yT}!&@evO!Dc>abrs+5G&W0u0G~T0$Cbr z9W}1c>jeDS_#Yv-9l{lv{$iEC#WVCjTcxRs%m0k><;ea$G7^-23+rJwFg|d>51-uh zpu@!2=`wJ2xr!kK7gWB)OKDOfxKYk8*MUiM@%Gr)i7a1H#4K6NEdLa0x#J^#+hm_! z*8Qo>GwjotTYN5OTdk8m2t2Y=gGQ+UT@l(R$kaoc*f{OHQml0eL8Yrmpx>woN~2@? ztXSBGI~fg*5lo6@MlW(@^w-jTr}JZ}VOKV5=Ps;=B$u&D2uVhQU4TX4-gs&D{>oNTNh-5@rFeP4nbKG^5p~fi|%&(lT@sNu(J3uPGk}(RnGQAox&|O>@4pF4hoiZq$n7BW+X)}T@5zqYOh1jB7ilR5> z>DN!~NUvibCmSG^vWWV3qu#DeInLiQlKU<0+Nzb?gWjCe67vQy726wGIrt=6qBuou zC2m{hw}*Z^Te|vbmfSvcXHUybosFh1^5RJUMb01~nP1|^KQ}J^=LP;}{)aY3RfWGQ z_-l*Re*}MiM-Y z`iG`0klokc>kCM`&GfOB>4{ogk--f_=7V4D*7ue_(RnEB@6d* z62MJNormal*) (* Beginning of Notebook Content *) Notebook[{ -Cell[BoxData[ - RowBox[{"f1", "="}]], "Input", - CellChangeTimes->{ - 3.991849227197853*^9},ExpressionUUID->"c5bb4ac7-6666-c043-9d96-\ -2dda1d801f63"], -Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991849227899128*^9, - 3.9918492279041367`*^9}},ExpressionUUID->"93cad80c-1de7-2e4b-9b8c-\ -14a272e65d1f"], +Cell[CellGroupData[{ +Cell[BoxData[ + RowBox[{"d", "=", "2.88"}]], "Input", + CellChangeTimes->{ + 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, + 3.9920650045886707`*^9, {3.993801942128783*^9, 3.993801945433443*^9}, { + 3.9938026615010633`*^9, 3.993802739368286*^9}, {3.993802810187974*^9, + 3.9938028103007183`*^9}, {3.993803575340521*^9, 3.993803666300129*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"91c042c3-b0e3-4e83-975c-3369faa5d4a0"], + +Cell[BoxData["2.88`"], "Output", + CellChangeTimes->{ + 3.991320420900818*^9, 3.993800775970068*^9, 3.9938019548134403`*^9, { + 3.993802671037874*^9, 3.9938027475965223`*^9}, 3.9938028210918093`*^9, { + 3.993803586980714*^9, 3.993803670362015*^9}, 3.993828466392742*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"ab7ebc4e-f146-4269-ac79-a2d960bfeb46"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f2", "="}]], "Input", + RowBox[{"A", "=", "236"}]], "Input", + CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"9d0661dc-011b-49d3-855a-42aeb76418ab"], + +Cell[BoxData["236"], "Output", CellChangeTimes->{ - 3.9918492290557346`*^9},ExpressionUUID->"1dc76a14-b094-5f49-81bb-\ -fc37192f9bb8"], + 3.9913196497381973`*^9, 3.9938007760760193`*^9, 3.993801954850832*^9, { + 3.9938026710743093`*^9, 3.993802747641852*^9}, 3.993802821127861*^9, { + 3.993803587016178*^9, 3.9938036703981237`*^9}, 3.993828466476701*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"e9826998-7c04-44ea-b2a8-938cf842faf8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A1", "=", "152"}]], "Input", + CellChangeTimes->{ + 3.991798961431202*^9, {3.993800516328167*^9, 3.993800518467939*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"ed3556fa-e0b6-47d6-ab80-a7d942fd6384"], + +Cell[BoxData["152"], "Output", + CellChangeTimes->{ + 3.9913196497578354`*^9, 3.993800520116021*^9, 3.9938007760814123`*^9, + 3.99380195486788*^9, {3.993802671090054*^9, 3.993802747658696*^9}, + 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}, + 3.993828466544039*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"7086f9f3-23a3-4ff7-8e21-4cf89ab3b014"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a1", "=", "0.55"}]], "Input", + CellChangeTimes->{3.9434144380252676`*^9}, + CellLabel->"In[4]:=",ExpressionUUID->"0141e23b-ea85-41e9-8f2d-152089eb19ba"], + +Cell[BoxData["0.55`"], "Output", + CellChangeTimes->{ + 3.991319649777508*^9, 3.9938007761127357`*^9, 3.993801954886694*^9, { + 3.993802671105547*^9, 3.993802747674674*^9}, 3.9938028211591873`*^9, { + 3.9938035870466833`*^9, 3.993803670422636*^9}, 3.9938284665606327`*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"edacc7af-0749-4cb7-8659-2bb73359092f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a2", "=", + RowBox[{"a1", "-", + RowBox[{"0.015", "*", + FractionBox[ + RowBox[{ + RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", + CellLabel->"In[5]:=",ExpressionUUID->"53dce238-d774-42bc-af8e-749dfa0807b2"], + +Cell[BoxData["0.545677966101695`"], "Output", + CellChangeTimes->{ + 3.9913196497965145`*^9, 3.993800776129066*^9, 3.9938019549039087`*^9, { + 3.9938026711227913`*^9, 3.993802747690078*^9}, 3.993802821174389*^9, { + 3.9938035870619383`*^9, 3.993803670434517*^9}, 3.993828466569667*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"b20758e7-30d7-454b-bc7c-cfd87ecd3f75"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"p0", "=", "0.17"}]], "Input", + CellLabel->"In[6]:=",ExpressionUUID->"c0c425fa-817f-465d-a2cd-4cafbfc8e6f8"], + +Cell[BoxData["0.17`"], "Output", + CellChangeTimes->{ + 3.9913196498144608`*^9, 3.9938007761450787`*^9, 3.993801954921114*^9, { + 3.993802671138826*^9, 3.993802747705122*^9}, 3.993802821189831*^9, { + 3.993803587077704*^9, 3.993803670446403*^9}, 3.993828466680541*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"0631481e-d0d9-423b-a5e6-0c59ae084a36"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R01", "=", + RowBox[{"1.16", "*", + SuperscriptBox["A1", + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, + CellLabel->"In[7]:=",ExpressionUUID->"eed55c7e-d569-43d6-8b19-f199771ed175"], + +Cell[BoxData["6.190691825034912`"], "Output", + CellChangeTimes->{ + 3.9913196498225155`*^9, 3.993800776161807*^9, 3.993801954937538*^9, { + 3.9938026711557207`*^9, 3.993802747719865*^9}, 3.993802821205323*^9, { + 3.993803587093586*^9, 3.9938036704581614`*^9}, 3.9938284666963863`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"9eb8f274-742a-4b43-93ff-f4dbaff8e424"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R02", "=", + RowBox[{"1.16", "*", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"A", "-", "A1"}], ")"}], + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellLabel->"In[8]:=",ExpressionUUID->"a6ebe1f1-a004-4ee9-90b3-4605561b9f29"], + +Cell[BoxData["5.08024220226995`"], "Output", + CellChangeTimes->{ + 3.9913196498425236`*^9, 3.993800776178092*^9, 3.993801954954875*^9, { + 3.993802671171578*^9, 3.993802747723295*^9}, 3.993802821221133*^9, { + 3.993803587109274*^9, 3.993803670471842*^9}, 3.993828466712467*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"eb77d270-5f98-4b8d-9526-04e3eadd5382"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b1", "=", "0.97619"}]], "Input", + CellChangeTimes->{ + 3.991799283179735*^9, {3.9938005440294*^9, 3.993800567746181*^9}}, + CellLabel->"In[9]:=",ExpressionUUID->"8c153969-da96-4a69-abcf-dd84d5addfb3"], + +Cell[BoxData["0.97619`"], "Output", + CellChangeTimes->{ + 3.993800776210225*^9, 3.993801954959785*^9, {3.993802671174962*^9, + 3.993802747749667*^9}, 3.9938028212246647`*^9, {3.9938035871245747`*^9, + 3.993803670475428*^9}, 3.993828466721511*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"3d5e22ff-eacb-46f8-ad6b-90fd65f23e07"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b2", "=", "0.59439"}]], "Input", + CellChangeTimes->{ + 3.991799280663351*^9, {3.9938005524325247`*^9, 3.993800560808515*^9}}, + CellLabel->"In[10]:=",ExpressionUUID->"2b54bfd5-7e59-4d9a-8c8a-6246b21d5ea2"], + +Cell[BoxData["0.59439`"], "Output", + CellChangeTimes->{ + 3.993800776226185*^9, 3.993801954993833*^9, {3.9938026712049103`*^9, + 3.993802747764641*^9}, 3.993802821251552*^9, {3.993803587139648*^9, + 3.993803670490211*^9}, 3.993828466732696*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"caa2cfd1-4352-443f-b60b-4d192e3dd7e2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x1", "=", "0"}]], "Input", + CellLabel->"In[11]:=",ExpressionUUID->"f7b85781-072b-47a1-a90c-8fd2a4920d95"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498927155`*^9, 3.993800776256876*^9, 3.9938019550107737`*^9, { + 3.99380267122059*^9, 3.993802747779757*^9}, 3.993802821267166*^9, { + 3.993803587154791*^9, 3.993803670501927*^9}, 3.993828466752304*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"5096dc70-234f-483c-b323-d1b63254b34e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x2", "=", "0"}]], "Input", + CellLabel->"In[12]:=",ExpressionUUID->"9fd200d4-3977-4a25-bd84-13a0e1e6e34d"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498996067`*^9, 3.993800776272674*^9, 3.993801955027381*^9, { + 3.993802671236315*^9, 3.993802747794403*^9}, 3.993802821282477*^9, { + 3.993803587158352*^9, 3.993803670513171*^9}, 3.993828466761775*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"f1079bf0-2697-4cd9-9f5f-2a20a73674bc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w1", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[13]:=",ExpressionUUID->"6178d80c-38f1-40d4-a210-9cfc5ac8e869"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913197863028755`*^9, 3.993800776289051*^9, 3.993801955044087*^9, { + 3.993802671251883*^9, 3.993802747809085*^9}, 3.9938028212979517`*^9, { + 3.9938035871856203`*^9, 3.9938036705241947`*^9}, 3.993828466771409*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"c58b16cb-30f6-4fc5-802f-dde37ee713c5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w2", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[14]:=",ExpressionUUID->"12c1bf8b-f44c-444c-9b33-a548f11acf4f"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913197864610195`*^9, 3.993800776304994*^9, 3.993801955061472*^9, { + 3.993802671267837*^9, 3.9938027478234367`*^9}, 3.9938028213134613`*^9, { + 3.9938035872015963`*^9, 3.9938036705351753`*^9}, 3.993828466793264*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"b7089e32-a814-4f62-8c32-54d25f9b7236"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c11", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"921777e5-f822-4aa9-9ce2-260540e91df9"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.993800776320915*^9, 3.993801955077899*^9, { + 3.993802671285616*^9, 3.9938027478392677`*^9}, 3.993802821328992*^9, { + 3.993803587217046*^9, 3.993803670546205*^9}, 3.993828466808115*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"93406757-d14f-4327-a9e8-36930a045ee9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"27bd1d5e-1b1b-4daf-ba92-bf0cf51d0d2e"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.991319786540777*^9, 3.9938007763370247`*^9, 3.993801955093937*^9, { + 3.993802671301764*^9, 3.993802747854802*^9}, 3.993802821344532*^9, { + 3.993803587232232*^9, 3.993803670558001*^9}, 3.993828466821905*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"e02838e9-1daf-4c29-a77b-96edd64c02f1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c21", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"3fa33677-f823-4acd-9f31-42f576e5c1f1"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.9913197865777817`*^9, 3.9938007763528843`*^9, 3.9938019551103783`*^9, { + 3.9938026713191147`*^9, 3.993802747870304*^9}, 3.993802821359898*^9, { + 3.993803587247026*^9, 3.9938036705701017`*^9}, 3.993828466831133*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"340a018d-89c1-428e-bcc5-d04b5f989bc9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c22", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"dd8e1b0c-ea15-4676-a512-f71cc587cae9"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.9913197866129*^9, 3.9938007763688097`*^9, 3.993801955127124*^9, { + 3.993802671337201*^9, 3.99380274788591*^9}, 3.993802821375526*^9, { + 3.993803587262051*^9, 3.993803670582543*^9}, 3.993828466840848*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"3c4147fd-71cf-4f1e-9b0b-f346327eec54"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"4ac8ad99-68c3-451f-918e-9148b4d9dcee"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786620775*^9, 3.993800776384469*^9, 3.99380195514393*^9, { + 3.993802671355851*^9, 3.9938027479017677`*^9}, 3.9938028213910847`*^9, { + 3.993803587265461*^9, 3.9938036705956707`*^9}, 3.99382846686141*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"77d5defa-26ab-4472-8163-986e0987cb1a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fin", "=", "0.09"}]], "Input", + CellLabel->"In[20]:=",ExpressionUUID->"8110a703-65b9-407e-adcf-5f710d77baf6"], + +Cell[BoxData["0.09`"], "Output", + CellChangeTimes->{ + 3.991319786657793*^9, 3.993800776400263*^9, 3.993801955160005*^9, { + 3.993802671372757*^9, 3.993802747917276*^9}, 3.9938028214069347`*^9, { + 3.993803587291121*^9, 3.993803670608396*^9}, 3.993828466873227*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"97a457e7-0056-46fe-99f5-00b955886529"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffin", "=", "0.42"}]], "Input", + CellLabel->"In[21]:=",ExpressionUUID->"1b4e0ac1-95a3-41bf-a1e5-53883e17c52c"], + +Cell[BoxData["0.42`"], "Output", + CellChangeTimes->{ + 3.9913197866657925`*^9, 3.993800776415701*^9, 3.993801955176228*^9, { + 3.9938026713885727`*^9, 3.9938027479333763`*^9}, 3.9938028214226522`*^9, { + 3.993803587306354*^9, 3.993803670621553*^9}, 3.993828466880948*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"68f0be24-8814-4778-a2ea-c904813fb035"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fex", "=", + RowBox[{"-", "2.59"}]}]], "Input", + CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"c8210f27-2458-4ecf-9bd5-84f42db96d9e"], + +Cell[BoxData[ + RowBox[{"-", "2.59`"}]], "Output", + CellChangeTimes->{ + 3.9913197866996*^9, 3.993800776431301*^9, 3.993801955193372*^9, { + 3.993802671403956*^9, 3.9938027479492397`*^9}, 3.9938028214382277`*^9, { + 3.993803587321618*^9, 3.993803670634707*^9}, 3.993828466887906*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"b2b69bb6-488a-4438-9d7d-4bcf23b09ae6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffex", "=", "0.54"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"849e2a5e-bbc5-46b4-a193-4079b9725dab"], + +Cell[BoxData["0.54`"], "Output", + CellChangeTimes->{ + 3.9913197867406044`*^9, 3.9938007764469233`*^9, 3.9938019552102613`*^9, { + 3.9938026714206*^9, 3.993802747964871*^9}, 3.993802821453787*^9, { + 3.993803587336917*^9, 3.9938036706484222`*^9}, 3.9938284669095078`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"944ff0e6-3e05-40d7-81cd-d06a2412b4e4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z1", "=", " ", "66"}]], "Input", + CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { + 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { + 3.993800689005188*^9, 3.993800698859473*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"c4b89404-8903-4567-b31f-e8a301e64cad"], + +Cell[BoxData["66"], "Output", + CellChangeTimes->{ + 3.9913197867861958`*^9, 3.993800776462777*^9, 3.993801955228032*^9, { + 3.9938026714376583`*^9, 3.99380274798144*^9}, 3.993802821469448*^9, { + 3.993803587352215*^9, 3.9938036706619053`*^9}, 3.993828466924799*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"881facd6-6f02-4447-b6bf-c8f652b9d8cc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z2", "=", + RowBox[{"94", "-", "Z1"}]}]], "Input", + CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, + 3.9916443064841423`*^9, {3.993800702787973*^9, 3.993800703931004*^9}}, + CellLabel->"In[25]:=",ExpressionUUID->"2130f05a-4798-4bc5-b6ea-c00e71a41d75"], + +Cell[BoxData["28"], "Output", + CellChangeTimes->{ + 3.9913197867928696`*^9, 3.993800776478297*^9, 3.993801955245349*^9, { + 3.993802671454508*^9, 3.993802747997691*^9}, 3.993802821484852*^9, { + 3.993803587367502*^9, 3.9938036706754093`*^9}, 3.993828466956875*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"96749af5-b711-4b9f-9cd7-fa2b380791fe"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A2", "=", + RowBox[{"A", "-", "A1"}]}]], "Input", + CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"961af454-ffb7-435a-8c42-2a2e11fec3df"], + +Cell[BoxData["84"], "Output", + CellChangeTimes->{ + 3.991319786827894*^9, 3.993800776493824*^9, 3.993801955261796*^9, { + 3.993802671472805*^9, 3.993802748017583*^9}, 3.99380282150027*^9, { + 3.993803587382532*^9, 3.993803670687777*^9}, 3.993828466986423*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"ac59449e-f75d-421b-bdbf-30bc0109449b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Din", "=", + RowBox[{"fin", "+", + RowBox[{"ffin", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"154476ff-dfa5-4da0-9230-1cfe866355d5"], + +Cell[BoxData["0.10842105263157895`"], "Output", + CellChangeTimes->{ + 3.9913197868648605`*^9, 3.9938007765094976`*^9, 3.9938019552787237`*^9, { + 3.993802671491748*^9, 3.9938027480331593`*^9}, 3.9938028215155582`*^9, { + 3.993803587397368*^9, 3.9938036706998672`*^9}, 3.993828467006805*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"bd8b590c-e246-4627-b1dd-78578954354a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Dex", "=", + RowBox[{"fex", "+", + RowBox[{"ffex", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"365b8ce8-845f-470a-8787-5177b494a3b3"], + +Cell[BoxData[ + RowBox[{"-", "2.566315789473684`"}]], "Output", + CellChangeTimes->{ + 3.9913197868718567`*^9, 3.9938007765252047`*^9, 3.9938019552955627`*^9, { + 3.9938026715153112`*^9, 3.993802748050967*^9}, 3.9938028215315247`*^9, { + 3.993803587413514*^9, 3.9938036707132397`*^9}, 3.993828467026989*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"14438b27-9290-4c07-a43a-0577d073cf92"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R00", "=", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x1", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x2", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", "d"}]}]], "Input", + CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { + 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, + 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"4a9ee132-7ce9-44b4-9e3e-0ec35661c577"], + +Cell[BoxData["19.255392789884887`"], "Output", + CellChangeTimes->{ + 3.9913197869068584`*^9, 3.993800776541044*^9, 3.993801955312595*^9, { + 3.99380267153469*^9, 3.993802748068204*^9}, 3.993802821546997*^9, { + 3.9938035874293547`*^9, 3.993803670724801*^9}, 3.993828467044149*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"5989dddd-868c-4f0c-a489-aa2e5efc829d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"210345c7-a92f-4e31-ae2d-724aceec1095"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786940857*^9, 3.993800776556777*^9, 3.993801955328986*^9, { + 3.993802671551854*^9, 3.993802748085292*^9}, 3.9938028215632277`*^9, { + 3.993803587445024*^9, 3.993803670737692*^9}, 3.993828467061429*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"b908c88f-be87-4f74-8ee5-b2cc6847c0c5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v1", "=", "1.63"}]], "Input", + CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, + 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { + 3.99380058189814*^9, 3.993800584279264*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"22792afb-dfc9-4816-b99d-7721649c35e5"], + +Cell[BoxData["1.63`"], "Output", + CellChangeTimes->{ + 3.993800776587946*^9, 3.993801955345385*^9, {3.993802671570458*^9, + 3.993802748111987*^9}, 3.9938028215786963`*^9, {3.9938035874604197`*^9, + 3.993803670750949*^9}, 3.9938284670865517`*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"8d61a3cf-b066-4a87-a9d1-fc494c6c0beb"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991849229804535*^9, - 3.991849229809536*^9}},ExpressionUUID->"15fe72e6-19f0-9540-b29f-\ -3056e2e0b957"], + CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"c47b547b-242a-42c6-a2e2-fed9d62004dd"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n1", "=", "0.856"}]], "Input", + CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, + 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { + 3.993800591017771*^9, 3.993800594019471*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"023e6c8d-4118-40f6-b47f-4ce1d37c6899"], + +Cell[BoxData["0.856`"], "Output", + CellChangeTimes->{ + 3.9938007766183*^9, 3.993801955394834*^9, {3.99380267161954*^9, + 3.993802748161004*^9}, 3.993802821625576*^9, {3.993803587507737*^9, + 3.993803670776819*^9}, 3.993828467127239*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"a5128bfd-cc58-422f-96da-ef115486a597"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"1435c890-b2c7-455d-b5ae-264047225934"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv1", "=", "2.615"}]], "Input", + CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { + 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { + 3.9938005968681726`*^9, 3.9938005993167686`*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"ac17b749-2795-47e3-bfc2-0400dcf9bd31"], + +Cell[BoxData["2.615`"], "Output", + CellChangeTimes->{ + 3.993800776636183*^9, 3.9938019554430428`*^9, {3.993802671677952*^9, + 3.993802748207687*^9}, 3.993802821672069*^9, {3.993803587556972*^9, + 3.993803670795989*^9}, 3.993828472522929*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"57df8d98-a655-46cb-91e0-2835cc32f81c"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"d3464c76-8fd5-42ab-81f8-46c52a23f343"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn1", "=", "1.23"}]], "Input", + CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { + 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, + 3.991799359954439*^9, {3.993800602507454*^9, 3.993800603056312*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"7fdeb472-be54-4c0a-9564-b0a5286100e6"], + +Cell[BoxData["1.23`"], "Output", + CellChangeTimes->{ + 3.9938007766784554`*^9, 3.993801955495077*^9, {3.993802671729157*^9, + 3.993802748254798*^9}, 3.993802821718618*^9, {3.9938035876039553`*^9, + 3.9938036708157063`*^9}, 3.993828472552146*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"ad8be78a-cc7b-4ef8-adfd-0a8dfd8551a2"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"46601963-75c6-4e31-a471-e2ba9e363bff"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v2", "=", "2.22"}]], "Input", + CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, + 3.991718016467348*^9, 3.991799361414671*^9, {3.993800605567752*^9, + 3.993800606070137*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"baa6b955-9806-4355-9b16-eb06d9ab7902"], + +Cell[BoxData["2.22`"], "Output", + CellChangeTimes->{ + 3.993800776708939*^9, 3.993801955543845*^9, {3.993802671778071*^9, + 3.993802748303585*^9}, 3.993802821766041*^9, {3.993803587650766*^9, + 3.9938036708413343`*^9}, 3.99382847256887*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"442a6f5f-457f-4a8a-95b6-902af920f2bc"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"79e5ff17-2ad5-4c4e-ab17-41be2bb325e9"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n2", "=", "0.559"}]], "Input", + CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, + 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.993800609659601*^9, + 3.993800614079907*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"fcfe7f26-557f-46af-b233-6a97e1ef2b38"], + +Cell[BoxData["0.559`"], "Output", + CellChangeTimes->{ + 3.9938007767393847`*^9, 3.993801955593616*^9, {3.993802671829995*^9, + 3.993802748351069*^9}, 3.993802821813445*^9, {3.9938035876972513`*^9, + 3.993803670875149*^9}, 3.9938284725850763`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"b555bc1c-7622-4e20-9d68-1412c425a6f4"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"318d2e77-961e-4bdd-b347-666c81aeb0a3"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv2", "=", "2.428"}]], "Input", + CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, + 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.993800618121642*^9, + 3.993800621996191*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"47cc8a18-cb23-44bc-9a9c-72bce0cf18de"], + +Cell[BoxData["2.428`"], "Output", + CellChangeTimes->{ + 3.9938007767695208`*^9, 3.993801955646489*^9, {3.993802671878972*^9, + 3.99380274840051*^9}, 3.993802821860149*^9, {3.9938035877441607`*^9, + 3.993803670903119*^9}, 3.993828472619844*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"c55f1af2-27af-465f-aa2e-55abec1577ac"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"9fa9eaa3-0f66-476e-88bd-65709e15bfe5"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn2", "=", "0.738"}]], "Input", + CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, + 3.9917993660901737`*^9, {3.993800626883781*^9, 3.993800632244173*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"9da204da-359a-4547-b1ad-c3cfaf655d55"], + +Cell[BoxData["0.738`"], "Output", + CellChangeTimes->{ + 3.993800776800035*^9, 3.993801955694454*^9, {3.993802671926148*^9, + 3.99380274844981*^9}, 3.99380282190762*^9, {3.9938035877925863`*^9, + 3.9938036709348783`*^9}, 3.993828472635805*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"603cd4f9-91e9-4b31-8a6a-df4aa954886c"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"56776e1f-f4c6-410e-a503-b1411b19b44a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U31", "=", + RowBox[{"C0", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", "R1"}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "a1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "nn2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"Dex", "*", "v2", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/aR7S2Zj4lvHP7Jp2SD6t2ddPojOapZrBdETK9in +g+jbL87PBNEGxc+WgOhrG/jXgWi9vpDNIFrqcOcWEL1ki/glEK3Wwn0ZRDdb +HLoOonX+9D8E0abp/OxNQDq+aD4niN52MlAbRD/heKsDovPud4WB6HnRPNEg +uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt +Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr +ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== + "], + CellLabel->"In[47]:=",ExpressionUUID->"20453ecd-d4cd-41ed-af96-8ad56dc5e1af"], + +Cell[BoxData["0.04132444525810279`"], "Output", + CellChangeTimes->{ + 3.991319787430073*^9, 3.993800776881694*^9, 3.993801955753645*^9, { + 3.993802671993063*^9, 3.993802748523107*^9}, 3.993802821968258*^9, { + 3.993803587855629*^9, 3.993803670999495*^9}, 3.9938284727493773`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"0efa75be-3069-4fb0-a4e3-f4955cda4066"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U33", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", + FractionBox[ + RowBox[{"R01", "*", "R01"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"2", "*", "vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "a2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"Dex", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], + "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"5109848b-b8a6-4b2c-bd1f-1dead52f9fe0"], + +Cell[BoxData["1.8561337112494445`"], "Output", + CellChangeTimes->{ + 3.991319787574972*^9, 3.9938007769078693`*^9, 3.993801955775502*^9, { + 3.993802672016849*^9, 3.993802748547914*^9}, 3.99380282199231*^9, { + 3.9938035878800983`*^9, 3.993803671028694*^9}, 3.993828472798255*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"05fedd26-a390-470f-90b0-75e64afd7210"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U32", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02"}], "1"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"f667fedb-72a6-4140-a160-667842afb873"], + +Cell[BoxData[ + RowBox[{"-", "12.258798326305717`"}]], "Output", + CellChangeTimes->{ + 3.991319787641424*^9, 3.9938007769327593`*^9, 3.993801955798092*^9, { + 3.9938026720456457`*^9, 3.99380274857216*^9}, 3.993802822015239*^9, { + 3.993803587903886*^9, 3.9938036710539*^9}, 3.993828472843519*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"3665c4fd-dfc6-4774-bd04-643c9966c7f1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U41", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[50]:=",ExpressionUUID->"c2af5ae9-0080-4307-8e33-fd75018ec265"], + +Cell[BoxData[ + RowBox[{"-", "22.790441070773312`"}]], "Output", + CellChangeTimes->{ + 3.991319787711939*^9, 3.9938007769622097`*^9, 3.9938019558251333`*^9, { + 3.993802672094524*^9, 3.993802748600835*^9}, 3.993802822044148*^9, { + 3.993803587933173*^9, 3.993803671083523*^9}, 3.993828472896077*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"f517cb08-8dae-4b83-9e07-eb88f2836029"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U42", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[51]:=",ExpressionUUID->"86761029-651c-484b-8ff7-029b08caf708"], + +Cell[BoxData[ + RowBox[{"-", "43.29548999246014`"}]], "Output", + CellChangeTimes->{ + 3.9913197877723045`*^9, 3.9938007769919767`*^9, 3.993801955868244*^9, { + 3.993802672122458*^9, 3.993802748645914*^9}, 3.993802822070863*^9, { + 3.9938035879612713`*^9, 3.993803671112574*^9}, 3.99382847294901*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"ff18c83c-b959-4a7e-9bde-4476839cdd54"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U51", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[52]:=",ExpressionUUID->"c203a4a6-91ac-491b-b7c9-a5efdb320f0c"], + +Cell[BoxData[ + RowBox[{"-", "161.3907844260869`"}]], "Output", + CellChangeTimes->{ + 3.991319787833355*^9, 3.993800777069632*^9, 3.9938019558996973`*^9, { + 3.9938026721544657`*^9, 3.9938027486794643`*^9}, 3.993802822104743*^9, { + 3.993803587995325*^9, 3.993803671146261*^9}, 3.993828473010614*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"22dd7a66-d1ca-40ba-987a-3d2bb1480999"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U21", "=", "0"}]], "Input", + CellLabel->"In[53]:=",ExpressionUUID->"87f6dcae-b949-4443-9cb1-e5a0d99bcfbd"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210013676`*^9, 3.9938007770877237`*^9, 3.993801955916643*^9, { + 3.9938026721721487`*^9, 3.9938027486956*^9}, 3.993802822138073*^9, { + 3.993803588028162*^9, 3.993803671159233*^9}, 3.993828473022073*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"efe875cd-9a46-402e-b48d-3b8ae0caff71"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U22", "=", "0"}]], "Input", + CellLabel->"In[54]:=",ExpressionUUID->"5f55bb76-dbc1-4a43-ae45-e5cab7ad5437"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210355663`*^9, 3.9938007771059847`*^9, 3.99380195593331*^9, { + 3.993802672187916*^9, 3.9938027487122726`*^9}, 3.993802822156447*^9, { + 3.993803588044907*^9, 3.9938036711709633`*^9}, 3.993828473031629*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"faa8a46e-5e4e-4c04-8aa2-70432d39f385"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[55]:=",ExpressionUUID->"1f0266ba-bfbc-4946-bd93-d28fd49109ec"], + +Cell[BoxData["68.50484772769052`"], "Output", + CellChangeTimes->{ + 3.991320421068556*^9, 3.993800777122861*^9, 3.99380195595057*^9, { + 3.9938026722039537`*^9, 3.9938027487289467`*^9}, 3.993802822174095*^9, { + 3.993803588061635*^9, 3.993803671182822*^9}, 3.993828473042053*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"b3dac642-717f-4a45-a2a0-e50509654c34"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"616d142a-5d05-4636-a362-d0a933565c7f"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.991320421098543*^9, 3.993800777139863*^9, 3.993801955967062*^9, { + 3.993802672219776*^9, 3.9938027487454987`*^9}, 3.993802822191181*^9, { + 3.9938035880780478`*^9, 3.99380367119495*^9}, 3.993828473052053*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"cd46238a-42e0-482b-ae31-54625ab997a4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[57]:=",ExpressionUUID->"4d6c0fc0-fa7d-429a-9283-a7dcacbc5086"], + +Cell[BoxData["78.36655133019532`"], "Output", + CellChangeTimes->{ + 3.9913204211275444`*^9, 3.993800777156836*^9, 3.993801955985046*^9, { + 3.993802672236104*^9, 3.9938027487612762`*^9}, 3.993802822207035*^9, { + 3.993803588095743*^9, 3.993803671207213*^9}, 3.9938284730618668`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"b675a6c5-8f07-4187-a2ff-eeaf502d82b5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c11"], "Input", + CellLabel->"In[58]:=",ExpressionUUID->"d88dc389-8d90-45b7-9e97-1fe2544ddabc"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.9913204211385536`*^9, 3.993800777173678*^9, 3.9938019560022707`*^9, { + 3.9938026722521267`*^9, 3.993802748776864*^9}, 3.9938028222235823`*^9, { + 3.993803588111733*^9, 3.993803671219968*^9}, 3.993828473071396*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"d34469ef-820d-4460-8b60-015081041515"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c12"], "Input", + CellLabel->"In[59]:=",ExpressionUUID->"94a2fd30-2147-431f-8649-49ed73463b45"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.9913204211683464`*^9, 3.993800777190844*^9, 3.9938019560194187`*^9, { + 3.993802672268169*^9, 3.9938027487928667`*^9}, 3.993802822239389*^9, { + 3.993803588127493*^9, 3.993803671233239*^9}, 3.9938284730818996`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"e8ce160b-ee99-4453-9825-f3242c32beff"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c21"], "Input", + CellLabel->"In[60]:=",ExpressionUUID->"48b34cba-34a4-406f-9f6a-35eadfdaa132"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.991320421199068*^9, 3.9938007772073803`*^9, 3.993801956036744*^9, { + 3.993802672284265*^9, 3.993802748808551*^9}, 3.9938028222550507`*^9, { + 3.993803588143165*^9, 3.993803671247344*^9}, 3.993828473093589*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"b725deb8-1e40-4339-9e00-cf381a1cc4d3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c22"], "Input", + CellLabel->"In[61]:=",ExpressionUUID->"5cd5d669-9efe-46b3-9ade-3ff4724c54e3"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.991320421228037*^9, 3.99380077722381*^9, 3.99380195605359*^9, { + 3.99380267230028*^9, 3.993802748824264*^9}, 3.993802822270421*^9, { + 3.9938035881589603`*^9, 3.993803671262602*^9}, 3.993828473105773*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"fa616b90-94a7-43a6-8fb0-b700936b6ecf"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w1"], "Input", + CellLabel->"In[62]:=",ExpressionUUID->"aaf99b45-827e-4221-be8a-f0dcee9fe550"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913204212585373`*^9, 3.99380077723999*^9, 3.9938019560701323`*^9, { + 3.99380267231618*^9, 3.993802748839958*^9}, 3.993802822285783*^9, { + 3.9938035881747913`*^9, 3.993803671266725*^9}, 3.993828473116603*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"ad36325e-c6b3-4570-847a-74909b789b62"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w2"], "Input", + CellLabel->"In[63]:=",ExpressionUUID->"ef7654ed-b051-4a58-9746-c321aca36c14"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913204212884274`*^9, 3.99380077725603*^9, 3.993801956086666*^9, { + 3.9938026723320913`*^9, 3.993802748856078*^9}, 3.993802822300988*^9, { + 3.9938035881912737`*^9, 3.9938036712790813`*^9}, 3.993828473125901*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"52113b47-9baa-43bb-88c8-2a7fc8e930ea"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", + CellLabel->"In[64]:=",ExpressionUUID->"d249a853-bdcd-4ce7-abd7-98e15f591379"], + +Cell[BoxData[ + RowBox[{"-", "26.975748857822108`"}]], "Output", + CellChangeTimes->{ + 3.9913204213185234`*^9, 3.993800777272346*^9, 3.993801956103663*^9, { + 3.993802672348072*^9, 3.9938027488719177`*^9}, 3.9938028223163843`*^9, { + 3.993803588207057*^9, 3.993803671292569*^9}, 3.9938284731353893`*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"e4a4578a-aa6a-4d89-8008-6a006ca31a3a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", + CellLabel->"In[65]:=",ExpressionUUID->"b926a3d9-7a26-44a1-bd92-7ec14d5a037f"], + +Cell[BoxData[ + RowBox[{"-", "9.274238671929899`"}]], "Output", + CellChangeTimes->{ + 3.991320421349531*^9, 3.993800777288783*^9, 3.993801956120541*^9, { + 3.993802672364458*^9, 3.993802748887658*^9}, 3.99380282233222*^9, { + 3.993803588227901*^9, 3.9938036713059*^9}, 3.993828473145123*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"6b93a6da-21b7-4c83-bcbd-f3764c643d10"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB11", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U22"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[66]:=",ExpressionUUID->"37d190f3-ff6d-4668-87a0-9502e81d6720"], + +Cell[BoxData["41.529098869868406`"], "Output", + CellChangeTimes->{ + 3.9913204213784294`*^9, 3.993800777305213*^9, 3.993801956138081*^9, { + 3.99380267238068*^9, 3.993802748904031*^9}, 3.9938028223479433`*^9, { + 3.99380358824424*^9, 3.993803671318845*^9}, 3.993828473154901*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"3c5543be-9f2d-4204-bc67-f837ef385494"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB12", "=", + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[67]:=",ExpressionUUID->"5478d0da-61f4-4d19-a0b5-8b94bfdc6a90"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.9913204213904285`*^9, 3.993800777321735*^9, 3.993801956154997*^9, { + 3.9938026723977118`*^9, 3.9938027489203997`*^9}, 3.993802822363785*^9, { + 3.993803588260324*^9, 3.993803671330945*^9}, 3.993828473165078*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"c9d70014-ed92-4887-a93a-22c88db3e4e2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB22", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U21"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + "\[IndentingNewLine]", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[68]:=",ExpressionUUID->"e071d459-f2a8-4c24-b208-1b58eaa8b232"], + +Cell[BoxData["69.09231265826543`"], "Output", + CellChangeTimes->{ + 3.991320421419428*^9, 3.9938007773384323`*^9, 3.993801956172174*^9, { + 3.9938026724138613`*^9, 3.993802748938077*^9}, 3.993802822380664*^9, { + 3.9938035882645397`*^9, 3.9938036713443604`*^9}, 3.9938284731750307`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"f50e4cc5-3f62-45e6-9ae6-e22a16640e7b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kb", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "+", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"3fd020e2-53ce-4795-8035-9cff1b46d928"], + +Cell[BoxData["0.014405310234423041`"], "Output", + CellChangeTimes->{ + 3.9913204214494324`*^9, 3.9938007773549747`*^9, 3.993801956189353*^9, { + 3.993802672430953*^9, 3.9938027489557877`*^9}, 3.9938028223998747`*^9, { + 3.99380358829243*^9, 3.993803671364808*^9}, 3.993828473184279*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"295d4403-110f-44d3-86ad-29dc95fd3975"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kw", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "-", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[70]:=",ExpressionUUID->"572a5269-6f4e-4e1c-b3d1-a84c97f4800a"], + +Cell[BoxData["351.3032034374311`"], "Output", + CellChangeTimes->{ + 3.991320421481529*^9, 3.993800777371662*^9, 3.99380195620572*^9, { + 3.9938026724471073`*^9, 3.9938027489713907`*^9}, 3.9938028224237127`*^9, { + 3.9938035883102903`*^9, 3.993803671376803*^9}, 3.993828473194165*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"a6107a4d-6d0c-4474-8c94-ef96e564586e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f1", "=", "0.4759950194"}]], "Input", + CellChangeTimes->{3.991849227197853*^9, 3.99382315316676*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + +Cell[BoxData["0.4759950194`"], "Output", + CellChangeTimes->{3.9938284732057056`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"668449dd-a01d-431b-a273-fb8df652dd57"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991849227899128*^9, 3.9918492279041367`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"93cad80c-1de7-2e4b-9b8c-14a272e65d1f"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f2", "=", "0.2326306298"}]], "Input", + CellChangeTimes->{3.9918492290557346`*^9, 3.993823158541252*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + +Cell[BoxData["0.2326306298`"], "Output", + CellChangeTimes->{3.9938284732194843`*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"fd2929a3-34aa-43e7-a933-7190fa38bbaf"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991849229804535*^9, 3.991849229809536*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"15fe72e6-19f0-9540-b29f-3056e2e0b957"], Cell[CellGroupData[{ @@ -84,13 +4879,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[233]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], + CellLabel->"In[75]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913335367025833`*^9}, - CellLabel-> - "Out[233]=",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[BoxData["1.912822713352366`*^-53"], "Output", + CellChangeTimes->{3.9913335367025833`*^9, 3.993828473233004*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"ab77afda-7b6c-4f7b-917b-d5c722ab6428"] }, Open ]], Cell[CellGroupData[{ @@ -124,14 +4917,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575926932735`*^9},ExpressionUUID->"e4db2648-4e1a-2c46-83ab-\ -fcd932c3b663"], + CellChangeTimes->{3.9915575926932735`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[BoxData["5.020725113795862`*^-55"], "Output", - CellChangeTimes->{3.991333536726557*^9}, - CellLabel-> - "Out[234]=",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[BoxData["1.0559908054997831`*^-54"], "Output", + CellChangeTimes->{3.991333536726557*^9, 3.993828473244364*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"d6cc496b-1d03-42a5-9c69-6d11c381b575"] }, Open ]], Cell[CellGroupData[{ @@ -164,14 +4955,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557595005127*^9, - 3.991557596789215*^9}},ExpressionUUID->"e4649c3d-e19e-ca42-95a0-\ -23b66397f1fd"], + CellChangeTimes->{{3.991557595005127*^9, 3.991557596789215*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[BoxData["1.871372642785671`*^-54"], "Output", - CellChangeTimes->{3.9913335367515736`*^9}, - CellLabel-> - "Out[235]=",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[BoxData["1.1448002056256914`*^-54"], "Output", + CellChangeTimes->{3.9913335367515736`*^9, 3.993828473255065*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"ead759a1-c03b-4fef-a874-18207bc3ef6a"] }, Open ]], Cell[CellGroupData[{ @@ -194,13 +4983,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[236]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], + CellLabel->"In[78]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[BoxData["25.178011816139865`"], "Output", - CellChangeTimes->{3.9913335367605553`*^9}, - CellLabel-> - "Out[236]=",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[BoxData["15.675709164167353`"], "Output", + CellChangeTimes->{3.9913335367605553`*^9, 3.9938284733007507`*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"0bd94281-829f-4f16-aef1-2fd3f0ceada0"] }, Open ]], Cell[CellGroupData[{ @@ -225,13 +5012,11 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[237]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], + CellLabel->"In[79]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[BoxData["31.32034821453639`"], "Output", - CellChangeTimes->{3.991333536783556*^9}, - CellLabel-> - "Out[237]=",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[BoxData["28.643365477494264`"], "Output", + CellChangeTimes->{3.991333536783556*^9, 3.99382847331278*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"b56a10db-6325-43b8-a8db-fd404aca9836"] }, Open ]], Cell[CellGroupData[{ @@ -240,13 +5025,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[238]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], + CellLabel->"In[80]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[BoxData["0.7475613664925793`"], "Output", - CellChangeTimes->{3.9913335367915726`*^9}, - CellLabel-> - "Out[238]=",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[BoxData["0.030314311517634588`"], "Output", + CellChangeTimes->{3.9913335367915726`*^9, 3.993828473324952*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"96542cf2-b84e-4aef-bf86-647cd449707a"] }, Open ]], Cell[CellGroupData[{ @@ -255,13 +5038,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[239]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], + CellLabel->"In[81]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[BoxData["3.5403946764909393`"], "Output", - CellChangeTimes->{3.99133353681583*^9}, - CellLabel-> - "Out[239]=",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[BoxData["3.502103950417047`"], "Output", + CellChangeTimes->{3.99133353681583*^9, 3.9938284733343773`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"4f7b448d-6ab0-4851-a124-c02a66997da6"] }, Open ]], Cell[CellGroupData[{ @@ -270,13 +5051,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[240]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], + CellLabel->"In[82]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[BoxData["110.88639408458714`"], "Output", - CellChangeTimes->{3.991333536826782*^9}, - CellLabel-> - "Out[240]=",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[BoxData["100.31204339197193`"], "Output", + CellChangeTimes->{3.991333536826782*^9, 3.99382847334404*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"0a354bdc-96d8-45b8-b4cd-b3c78e37094e"] }, Open ]], Cell[CellGroupData[{ @@ -285,13 +5064,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[241]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], + CellLabel->"In[83]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[BoxData["18.822108918839827`"], "Output", - CellChangeTimes->{3.9913335368508377`*^9}, - CellLabel-> - "Out[241]=",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[BoxData["0.4751983308624084`"], "Output", + CellChangeTimes->{3.9913335368508377`*^9, 3.993828473352913*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"f3e5778b-4a58-4f7d-9538-5c5a26e8a437"] }, Open ]], Cell[CellGroupData[{ @@ -480,13 +5257,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[242]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], + CellLabel->"In[84]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[BoxData["0.042044960793272385`"], "Output", - CellChangeTimes->{3.9913335368758316`*^9}, - CellLabel-> - "Out[242]=",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[BoxData["0.013105148463404007`"], "Output", + CellChangeTimes->{3.9913335368758316`*^9, 3.993828473366067*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"6334db5d-3c60-4ec6-a3f9-daae5b1e24c8"] }, Open ]], Cell[CellGroupData[{ @@ -499,13 +5274,13 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[243]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel->"In[85]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[BoxData["4.322031867849089`"], "Output", - CellChangeTimes->{3.991333536973074*^9}, - CellLabel-> - "Out[243]=",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[BoxData["7.741479499337605`"], "Output", + CellChangeTimes->{3.991333536973074*^9, 3.99382847352153*^9}, + Background->RGBColor[0.14, 0.8, 0.14, 0.33], + CellLabel->"Out[85]=",ExpressionUUID->"f79833f9-4c90-4840-ae7c-6a0596c21b76"] }, Open ]], Cell[CellGroupData[{ @@ -696,13 +5471,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[244]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], + CellLabel->"In[86]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[BoxData["0.011395075201487413`"], "Output", - CellChangeTimes->{3.9913335369870644`*^9}, - CellLabel-> - "Out[244]=",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[BoxData["0.4577128673173175`"], "Output", + CellChangeTimes->{3.9913335369870644`*^9, 3.993828473537422*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"4d4bf2e9-0a6e-4a7c-889a-016d2161d6a0"] }, Open ]], Cell[CellGroupData[{ @@ -715,13 +5488,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[245]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], + CellLabel->"In[87]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[BoxData["8.302069082299768`"], "Output", - CellChangeTimes->{3.9913335370800858`*^9}, - CellLabel-> - "Out[245]=",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[BoxData["1.3099308790364141`"], "Output", + CellChangeTimes->{3.9913335370800858`*^9, 3.993828473588725*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"77a24212-af31-4777-b800-31e29dd7cfbe"] }, Open ]], Cell[CellGroupData[{ @@ -813,13 +5584,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[246]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], + CellLabel->"In[88]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913335370930634`*^9}, - CellLabel-> - "Out[246]=",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[BoxData["0.130547288335749`"], "Output", + CellChangeTimes->{3.9913335370930634`*^9, 3.993828473621212*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"98c9e68a-311b-4e2a-b447-145b3714f9d2"] }, Open ]], Cell[CellGroupData[{ @@ -908,13 +5677,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[247]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], + CellLabel->"In[89]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991333537118065*^9}, - CellLabel-> - "Out[247]=",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[BoxData["0.869452711664251`"], "Output", + CellChangeTimes->{3.991333537118065*^9, 3.99382847363074*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"92640b19-fc10-4a15-b29e-b2695ebe455e"] }, Open ]], Cell[CellGroupData[{ @@ -1036,19 +5803,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[248]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], + CellLabel->"In[90]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913335371420746`*^9}, - CellLabel-> - "Out[248]=",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[BoxData["0.11350469384393182`"], "Output", + CellChangeTimes->{3.9913335371420746`*^9, 3.9938284736404667`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"a1c343e7-7698-4795-9140-483168e8e54c"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"ba4a3eff-9e3b-\ -5e47-a896-3a959bbbf44d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ @@ -1109,65 +5874,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849241512779*^9},ExpressionUUID->"738a48f3-b38c-f441-aec4-\ -53babaa73a14"], + CellChangeTimes->{3.991849241512779*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 217, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371540604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.676421320887265`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 1, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.993828473667294*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], +In[92]:=",ExpressionUUID->"747a863f-9c20-48fd-83b4-b18ce1d6eb8d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 218, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371630745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.782771762102156`*^-97\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 2, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.993828473722041*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], +In[92]:=",ExpressionUUID->"1c467178-14d5-4a3a-9e20-8205689b1888"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 249, 219, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371710587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.601294368193389`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 3, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.9938284737270117`*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], +In[92]:=",ExpressionUUID->"90f285f7-1020-4752-acf2-467bbeb0a031"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 249, 220, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133353717906*^9}, +during this calculation.\"", 2, 92, 4, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.9938284737311487`*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], +In[92]:=",ExpressionUUID->"8dd62b05-8d8b-4558-8800-b8b2ceff9e32"], -Cell[BoxData["4.322031867849086`"], "Output", - CellChangeTimes->{3.9913335399194164`*^9}, - CellLabel-> - "Out[249]=",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[BoxData["7.7414794991087925`"], "Output", + CellChangeTimes->{3.9913335399194164`*^9, 3.993828476799239*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"2014dd07-1eef-4c50-bfab-f1fbbbcdece5"] }, Open ]], Cell[CellGroupData[{ @@ -1229,65 +6005,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918492463930817`*^9},ExpressionUUID->"86c33485-ed26-8f49-b3d0-\ -7d040d3b48f0"], + CellChangeTimes->{3.9918492463930817`*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 221, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399544125`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.676421320887265`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 5, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.993828476903283*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], +In[93]:=",ExpressionUUID->"847b8a68-c947-4fda-8d68-9caff9e8beda"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 222, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399644184`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.782771762102156`*^-97\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 6, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.993828476910563*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], +In[93]:=",ExpressionUUID->"85510f9a-1f4e-4436-a663-fe1d96a62271"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 250, 223, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539972414*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.601294368193389`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 7, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.9938284769160748`*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], +In[93]:=",ExpressionUUID->"5d6bfa4d-e5e9-4b2e-baba-e94b88278086"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 250, 224, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539979416*^9}, +during this calculation.\"", 2, 93, 8, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.993828476920867*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], +In[93]:=",ExpressionUUID->"b99d6cc0-91fc-493a-907f-c6be12bb76fc"], -Cell[BoxData["8.302069082299772`"], "Output", - CellChangeTimes->{3.991333542631773*^9}, - CellLabel-> - "Out[250]=",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[BoxData["1.309930878997698`"], "Output", + CellChangeTimes->{3.991333542631773*^9, 3.993828480730768*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"a53665df-d8ff-43ec-86ec-dac5da94fb77"] }, Open ]], Cell[CellGroupData[{ @@ -1343,92 +6130,98 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492535482903`*^9},ExpressionUUID->"f373fe4f-940c-0842-9236-\ -63ec36d318ad"], + CellChangeTimes->{3.9918492535482903`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV0Hk41F0fBnApUogxY092WijZSc7Xvu8lS6GZMSHZkxAq2uuR6ok3oggJ +WUMzI1slTVkrKvuSfRdJec/zh8v1ue7fuc99Rpoc6OjNzsbGtoT//vsf/HGv +YkXLR/2gHJG/rZYk0J/O0iAb56NH2oK9LOy+dM27csYMVOYafIGJbU/9wMmj +9hpNHT00moldHBFbz2HMQm5N6/xx2FffiNTE5rUido/mNQfsqpbgh2uqn9AA +h06+KPb416bos/ROJN/LkvxiQQKxYVn3n0bfUa2qhss1bKuZaJ1QVi9KCtZ0 +VsOuXhvnjsjrR4n7nou1mZPg83nhqBcBg2hxR3I2DXua03h8UXUYSW7d9HvW +jAScN4Jc1ZZHkNEHSdFg7B2EtMZg+iiKt1Nl/2FKAlvxn9nTRpPosUaXbpkJ +CWgZMkLKXNPIxPncTW7sWHm7hJOsGURL0yp2MSZBp3DH/rC8OSQ5szu0w5AE +VDc/3zs35lFNrqHgRuzZVLZHJQELaLxZOVHRgARcMsr8c6pLKLTYWdQRkeAu +td6MX/AnepEKSi76JJDKcY3dt/wTJRxwlj50kATaSpemT9FX0ObE0wzlAyTw +0exljRutoe1Cihw+miRYjDi9aavCH5Rq5XFGQoMEcXRuvV1cf1GHhfpgoxoJ +kkH72QnWOhpodSzfsB/ve9JoHJK3AchlfTm/d5Mg782dvvPi7HDm2bDl8V14 +7w+P6Ns32OECWYuDqUiC6N1LpUUBG6HxtE+Lsxze+1xadkaVA56qdeqSJEjw +tWWy+m8mB+TlBxL2iOP98xVu2wQ5IUuJIKstSoJ8ddsk5WVO8LkowK0hSIKG +qsgN/nQukNGJj37JQ4Kl+vbeUSMe+KrwKnPlFxEErHn4o6p54Er3OVm0TASV +DmPg1eGFqwe6EiMXieA3VJ6xf+82cOJJOdQyTYQgdpbKQR5+eKPF4bMyQIRh +mcK5hJ8EsOy0dDN8R4RFWtOWZjUB+LdPpvzbayKwPxuRFgkWgBiHA9f96ogg +pSbpmDchAKsnrFp86ERwM0os+dhHBBFlm0+j+URopoSECr8XBMWiuc/rN4nQ +k3PruheXEKxqfChcukqEyYm8zKcmQiD0IOppfwIRtoYNth+oEYKuux7qqeeI +YBx/SN2rXBjiNI37Uv2J8DJLcyk3XRT+8r1o/2xOhKzh1XDdMAnYMNkleHFV +AMwPX+4JLZAA4huJ8vwlAZhsIJoWjEiAl6cbsXlWANSzlASlXHdA5PFj2n9H +BKCB7FHKoS8JtLTpI5vbBWB+pu/M6EUpUK9Pzfr4VACIp4zLSm1kgHLVtyjO +UQAOneBWtuyXh0KGJ3UtiQAo/LDqkT/yQCJo2DbfIMDuhHQtqqgC9NMvcTy8 +RAC2TDXDGAcF2Emv4doXSYCCHvcjJbUKUBI8fk/qOAE4nfPPiz1WBIHVXxSr +vQSoNLb5PE7eBZb6M03cb/hBXOaf2OtDSlDrcK+b+xsfKD0J4/mNVOG2jn2C +9jYeeBQiZ1/O0oDA0QhulyQuaAlHWvFPdEBiytxBh8AB0h6fbI/5HwR9w94t +Vzewg/f6i0KJswDsX/lplC3rSHiicrMw2RCeVf24Yn1yFYWp6X1P2m0MR7iU +Fldf/0TkqbVG4rgJ7Pznc+tq9QKqePNz6emcCZhWc3BMliwgnoxZGfhlAltL ++5aGs3HuOBTtz2UKSqdurizcwnnle5XXCqbgPdzZdcZzAZVf+F9yOMUUrmk9 +ahdlX0BcIto+Xd9NYerGYYc0m3lUYBi6Ob3ZDApuuDA912ZRmLS7fulnM3gZ +fZr6d34W6bEZnX7bbQbclC2+mWOziMUUGJyZMIPOI6SzbF9m0aR2STVwmUM7 +Z7YuZ8ks2r1v7vQAmINw1plIPd9ZlCseOCRfYg6PTVX3+1fOoKxFv9r8uxZQ +Ill8ZCp7CnU9TZF2TbUAoTOBnvX3ptA2z8bzHFkWwKrhW3gSP4XOvpM39Ci1 +gIFFnfuJ5Clk+7Cvjq/NAm6aRrxe3TGFfpk5N4TwWcL88U4vsf9NItsHBm+1 +r1nChOGuHSYpE2jFQORDQ6wVPD9UO+1QNYYWJ3MMbC5bATmTcM/k2Riaua/1 +4tMtK9j7LlPZKG0MjUw5p4+kWYGk4Heho+fHUEfKvWAuhhW0xq0tbLQcQ8Vz +AkLWK1awO9ROX757FPk94vVsD7KGPXfZvCK3jqJuto1z/cdtIPRw/PJA7AgK +2B6YeF7WDnSYMQYhS4Oo0Lex5l6CPfyrsudiXno/ilwQXd7j6wAScU6dEdd7 +0ZKlqfNbT0eI6TSqE5b6jnTcbxsMOzjBk30KOUbGXahNNM2vQe0QWE9Kmj5d ++YzEsi8ycncehg5VpSc32zpQZd9ua1teZzCQPG84LdiOdnTMngifcoY1Tj7q +j+RWpHbvdn5m3xGYdYkyndjXgtI2LexNqneBbs3+LjuBj+iFwb6vCVWu8Gl7 +StWv/vcoWesaYS3PDfZukc61ZWtCzd+eXFK74Q49M+ki/aGNqNwmVS4o7ihY +H923xrvyBs2dcmILoB4DhVlPQk71a7Rkustn2sgDatwtt7kUNKDcqa6VUE1P ++F61rc49ux65PHpCOcbjBcuhOyvWWHWotMTKc+NlL5A6JTsVt1aLdMTbfl39 +5QXhxpveFtnXItm+E19bfY8Dq+pgWSK9Bg1xn7RLHTwOqp+krvgr16CWW7YU +s8NkCBLtNpcNfYXuRqRzn24hA4xz01NTqhGjev0XxYICKor7n/sOMtH+WnVt +RSsKSJV8r/jVx0TZ9b7h49YUCLqT5XC9h4luN7bPB9lTIEN/RrO0i4lobTkT +547gvNCCKdjCRIQRu+773hSIc27xkmfinDej5v15CvB3sdv7JzMR31G4rPaS +AvYSVlLxTkwkRXrbvJ2Bz2c5SVs4MJEKy0aEs5oCbGFuPXx2TOSo5/60s5YC +ReIl1x5bMtHd7eHvz73D5m/M+G7ARGLdz/gaO/H5lefemSpMJOchnHx0mQJe +tyRjIviYSMdrOjdBnQoZjyJP7mljoOyU2VBbTSpAhtSmqBYGIrXP6wtrU6FP ++d5W1kcGmjZZ7sg9QIUgvVbPkPcMlLWHbQPLkAotK0uyLQ0MtG2Z4CrgQAUp +vcbPzRUMNHRTY0v6KSqo/JER6HnIQA5vtTpOBFIhscCs3y2NgarZdNNVgvH9 +3ZOCXQ8YKCVUX6MujApxqq8Ku5IZyNbV7PhwFN5jVH1/IomBquRcq/Zcw+fF +6giOlxnoFj3atzIbu0J6885gBjqlel8nIpcKNSq3WV8CGcj6afEW7Ty8X+ny +wJUABtp6f+RpRQHe815rffokAyWE2I+/KMN7nfh+NtEYKHqX3MnyOvy+alpB +7VEG8rv/3r+khwr2zVqTuRYMZLFtRC+kD+/bc5B8wZyBdiaw8aoOUIEtoVLm +mBkDjYRoFBQP473cxy4ImTDQcdv0qaJJKhSNR1UkAwO5cIQGPF/F57cUt33V +YiCzULGgfCFviEvKzTqkyEB16Zcsk0S8gT+N74GBAgPpseblIsS8oSjKmF9F +noFU5N93Ge3whpZRx3CCLAOJfoky+ibvDbOUoj0jOxhoQrdbaKsGzr0aCF+E +GOgf9gzmCSdvkCqi3fi0Gb9/H0+yzWHsBm/2eU4GinePCFE7gvs3J83xYUeU +2Suuu2Hrtujab8L7aRtu/0vGe5QTwgbYGEitiUx9HewNfZdqyTardPTltjy3 +bKI3sG3k3qk3TUeFiNdn9LY31Iw1X7wzRUfxU4sNBXewA7jlJifpSNWiIUb7 +vjd4HY3Z/2iCjm6xUeZtHnoDaF0+JzZGR6aBGV0R+djpJxoshuhIQuKKpn6h +N2SItrqXD9LRYlPgnY1F+PcK2Kkpg/1YAdncKsW5j0npej8d/enursl8id+3 +1MB610tHZdbiuR8b8b7ZAd//faOj66vsHHebcL9Nv7wYNjl3/LgrC+85eUb2 +wVc64t/0UnyoGdtk+2BGFx35013++fUZ3/dbKYT+hY5kd/8bLjeM379L7ZVS +Bx2tfjnXPjaC++16rte001FLgrfK81Fsrz/Jh7Fj+tXHdSaxdx4Ou9hGR1+T +24/ZLWCfyFGebqGjpM0Ek8gNNIjrdUtb/0BHjPlu97CNNICifL007B/deSEB +HDRgU5fx08PWKzPOIG/B+ZByYCyLjka8In5bEmiQkd0sKfIe77c2ETAh0kDq +hfHeuiY6OqAlsAsJ4n4f+6ZT2Im8+c5qojToGxzPe/cO5y97i8WlcW52hudu +Ix3RnuQ3CsrSoMZ7PMESOzHxbC+fPA287CNvsGOP0Ii8m3bhPU5VcOYtzolm +PpMquM/M0Dj0DR29/EuMHVHF+yYV5TWxh8f67vWp47y8Pmn1NR3p1kTWd2jj +faRZ4hXsIf/CHUzA98NUfnkDHW1zidKoMMT3aTvNx2PrGJlbFxvj+9rFGw5j +3xIdOPvEHJ/vKeJZq6ejyk3PE9Mtcf9G/4ut2IMzUTkp1jjXOnEpF1v7jeCn +m/Y4j/yr4o5NLh6YuOyI+zKvd2pi30x9zn7hEM63HuAhYQ+EWKiEu+D9/CPC +7XV0xOshZBbkhr3700wZtrbF4DG/o7g/8oNTMvZNyXPXPbzw/rX6VxTsyq2W +j13I+HveyrdW2ANLQlWOVPx78j9y1/ivr3+w2ZqGXR4ZJfVfH6toxNQHn18C +RV5scsW5P+CH9wjPevyuxf2PLUkH/HFeGC8zgV15U3iPRgDuT/kd/B17IGLI +YF8Qzjc62jRj81CLXXaF4H5qQlk9tpZdTKBsGN57/k5OFTZZ1+qSRDh+v2+k +QjH2DXmRNOEI/H2E9v487Bf8w6WESPy9K+ttFnb/7+Im7mh837r6eMZ//T9i ++jli8L784OSH2JptVivrsTifOd+Whv1/FGwFGg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -1442,104 +6235,109 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV0Hk41F0fBnApUogxY092WijZSc7Xvu8lS6GZMSHZkxAq2uuR6ok3oggJ +WUMzI1slTVkrKvuSfRdJec/zh8v1ue7fuc99Rpoc6OjNzsbGtoT//vsf/HGv +YkXLR/2gHJG/rZYk0J/O0iAb56NH2oK9LOy+dM27csYMVOYafIGJbU/9wMmj +9hpNHT00moldHBFbz2HMQm5N6/xx2FffiNTE5rUido/mNQfsqpbgh2uqn9AA +h06+KPb416bos/ROJN/LkvxiQQKxYVn3n0bfUa2qhss1bKuZaJ1QVi9KCtZ0 +VsOuXhvnjsjrR4n7nou1mZPg83nhqBcBg2hxR3I2DXua03h8UXUYSW7d9HvW +jAScN4Jc1ZZHkNEHSdFg7B2EtMZg+iiKt1Nl/2FKAlvxn9nTRpPosUaXbpkJ +CWgZMkLKXNPIxPncTW7sWHm7hJOsGURL0yp2MSZBp3DH/rC8OSQ5szu0w5AE +VDc/3zs35lFNrqHgRuzZVLZHJQELaLxZOVHRgARcMsr8c6pLKLTYWdQRkeAu +td6MX/AnepEKSi76JJDKcY3dt/wTJRxwlj50kATaSpemT9FX0ObE0wzlAyTw +0exljRutoe1Cihw+miRYjDi9aavCH5Rq5XFGQoMEcXRuvV1cf1GHhfpgoxoJ +kkH72QnWOhpodSzfsB/ve9JoHJK3AchlfTm/d5Mg782dvvPi7HDm2bDl8V14 +7w+P6Ns32OECWYuDqUiC6N1LpUUBG6HxtE+Lsxze+1xadkaVA56qdeqSJEjw +tWWy+m8mB+TlBxL2iOP98xVu2wQ5IUuJIKstSoJ8ddsk5WVO8LkowK0hSIKG +qsgN/nQukNGJj37JQ4Kl+vbeUSMe+KrwKnPlFxEErHn4o6p54Er3OVm0TASV +DmPg1eGFqwe6EiMXieA3VJ6xf+82cOJJOdQyTYQgdpbKQR5+eKPF4bMyQIRh +mcK5hJ8EsOy0dDN8R4RFWtOWZjUB+LdPpvzbayKwPxuRFgkWgBiHA9f96ogg +pSbpmDchAKsnrFp86ERwM0os+dhHBBFlm0+j+URopoSECr8XBMWiuc/rN4nQ +k3PruheXEKxqfChcukqEyYm8zKcmQiD0IOppfwIRtoYNth+oEYKuux7qqeeI +YBx/SN2rXBjiNI37Uv2J8DJLcyk3XRT+8r1o/2xOhKzh1XDdMAnYMNkleHFV +AMwPX+4JLZAA4huJ8vwlAZhsIJoWjEiAl6cbsXlWANSzlASlXHdA5PFj2n9H +BKCB7FHKoS8JtLTpI5vbBWB+pu/M6EUpUK9Pzfr4VACIp4zLSm1kgHLVtyjO +UQAOneBWtuyXh0KGJ3UtiQAo/LDqkT/yQCJo2DbfIMDuhHQtqqgC9NMvcTy8 +RAC2TDXDGAcF2Emv4doXSYCCHvcjJbUKUBI8fk/qOAE4nfPPiz1WBIHVXxSr +vQSoNLb5PE7eBZb6M03cb/hBXOaf2OtDSlDrcK+b+xsfKD0J4/mNVOG2jn2C +9jYeeBQiZ1/O0oDA0QhulyQuaAlHWvFPdEBiytxBh8AB0h6fbI/5HwR9w94t +Vzewg/f6i0KJswDsX/lplC3rSHiicrMw2RCeVf24Yn1yFYWp6X1P2m0MR7iU +Fldf/0TkqbVG4rgJ7Pznc+tq9QKqePNz6emcCZhWc3BMliwgnoxZGfhlAltL ++5aGs3HuOBTtz2UKSqdurizcwnnle5XXCqbgPdzZdcZzAZVf+F9yOMUUrmk9 +ahdlX0BcIto+Xd9NYerGYYc0m3lUYBi6Ob3ZDApuuDA912ZRmLS7fulnM3gZ +fZr6d34W6bEZnX7bbQbclC2+mWOziMUUGJyZMIPOI6SzbF9m0aR2STVwmUM7 +Z7YuZ8ks2r1v7vQAmINw1plIPd9ZlCseOCRfYg6PTVX3+1fOoKxFv9r8uxZQ +Ill8ZCp7CnU9TZF2TbUAoTOBnvX3ptA2z8bzHFkWwKrhW3gSP4XOvpM39Ci1 +gIFFnfuJ5Clk+7Cvjq/NAm6aRrxe3TGFfpk5N4TwWcL88U4vsf9NItsHBm+1 +r1nChOGuHSYpE2jFQORDQ6wVPD9UO+1QNYYWJ3MMbC5bATmTcM/k2Riaua/1 +4tMtK9j7LlPZKG0MjUw5p4+kWYGk4Heho+fHUEfKvWAuhhW0xq0tbLQcQ8Vz +AkLWK1awO9ROX757FPk94vVsD7KGPXfZvCK3jqJuto1z/cdtIPRw/PJA7AgK +2B6YeF7WDnSYMQYhS4Oo0Lex5l6CPfyrsudiXno/ilwQXd7j6wAScU6dEdd7 +0ZKlqfNbT0eI6TSqE5b6jnTcbxsMOzjBk30KOUbGXahNNM2vQe0QWE9Kmj5d ++YzEsi8ycncehg5VpSc32zpQZd9ua1teZzCQPG84LdiOdnTMngifcoY1Tj7q +j+RWpHbvdn5m3xGYdYkyndjXgtI2LexNqneBbs3+LjuBj+iFwb6vCVWu8Gl7 +StWv/vcoWesaYS3PDfZukc61ZWtCzd+eXFK74Q49M+ki/aGNqNwmVS4o7ihY +H923xrvyBs2dcmILoB4DhVlPQk71a7Rkustn2sgDatwtt7kUNKDcqa6VUE1P ++F61rc49ux65PHpCOcbjBcuhOyvWWHWotMTKc+NlL5A6JTsVt1aLdMTbfl39 +5QXhxpveFtnXItm+E19bfY8Dq+pgWSK9Bg1xn7RLHTwOqp+krvgr16CWW7YU +s8NkCBLtNpcNfYXuRqRzn24hA4xz01NTqhGjev0XxYICKor7n/sOMtH+WnVt +RSsKSJV8r/jVx0TZ9b7h49YUCLqT5XC9h4luN7bPB9lTIEN/RrO0i4lobTkT +547gvNCCKdjCRIQRu+773hSIc27xkmfinDej5v15CvB3sdv7JzMR31G4rPaS +AvYSVlLxTkwkRXrbvJ2Bz2c5SVs4MJEKy0aEs5oCbGFuPXx2TOSo5/60s5YC +ReIl1x5bMtHd7eHvz73D5m/M+G7ARGLdz/gaO/H5lefemSpMJOchnHx0mQJe +tyRjIviYSMdrOjdBnQoZjyJP7mljoOyU2VBbTSpAhtSmqBYGIrXP6wtrU6FP ++d5W1kcGmjZZ7sg9QIUgvVbPkPcMlLWHbQPLkAotK0uyLQ0MtG2Z4CrgQAUp +vcbPzRUMNHRTY0v6KSqo/JER6HnIQA5vtTpOBFIhscCs3y2NgarZdNNVgvH9 +3ZOCXQ8YKCVUX6MujApxqq8Ku5IZyNbV7PhwFN5jVH1/IomBquRcq/Zcw+fF +6giOlxnoFj3atzIbu0J6885gBjqlel8nIpcKNSq3WV8CGcj6afEW7Ty8X+ny +wJUABtp6f+RpRQHe815rffokAyWE2I+/KMN7nfh+NtEYKHqX3MnyOvy+alpB +7VEG8rv/3r+khwr2zVqTuRYMZLFtRC+kD+/bc5B8wZyBdiaw8aoOUIEtoVLm +mBkDjYRoFBQP473cxy4ImTDQcdv0qaJJKhSNR1UkAwO5cIQGPF/F57cUt33V +YiCzULGgfCFviEvKzTqkyEB16Zcsk0S8gT+N74GBAgPpseblIsS8oSjKmF9F +noFU5N93Ge3whpZRx3CCLAOJfoky+ibvDbOUoj0jOxhoQrdbaKsGzr0aCF+E +GOgf9gzmCSdvkCqi3fi0Gb9/H0+yzWHsBm/2eU4GinePCFE7gvs3J83xYUeU +2Suuu2Hrtujab8L7aRtu/0vGe5QTwgbYGEitiUx9HewNfZdqyTardPTltjy3 +bKI3sG3k3qk3TUeFiNdn9LY31Iw1X7wzRUfxU4sNBXewA7jlJifpSNWiIUb7 +vjd4HY3Z/2iCjm6xUeZtHnoDaF0+JzZGR6aBGV0R+djpJxoshuhIQuKKpn6h +N2SItrqXD9LRYlPgnY1F+PcK2Kkpg/1YAdncKsW5j0npej8d/enursl8id+3 +1MB610tHZdbiuR8b8b7ZAd//faOj66vsHHebcL9Nv7wYNjl3/LgrC+85eUb2 +wVc64t/0UnyoGdtk+2BGFx35013++fUZ3/dbKYT+hY5kd/8bLjeM379L7ZVS +Bx2tfjnXPjaC++16rte001FLgrfK81Fsrz/Jh7Fj+tXHdSaxdx4Ou9hGR1+T +24/ZLWCfyFGebqGjpM0Ek8gNNIjrdUtb/0BHjPlu97CNNICifL007B/deSEB +HDRgU5fx08PWKzPOIG/B+ZByYCyLjka8In5bEmiQkd0sKfIe77c2ETAh0kDq +hfHeuiY6OqAlsAsJ4n4f+6ZT2Im8+c5qojToGxzPe/cO5y97i8WlcW52hudu +Ix3RnuQ3CsrSoMZ7PMESOzHxbC+fPA287CNvsGOP0Ii8m3bhPU5VcOYtzolm +PpMquM/M0Dj0DR29/EuMHVHF+yYV5TWxh8f67vWp47y8Pmn1NR3p1kTWd2jj +faRZ4hXsIf/CHUzA98NUfnkDHW1zidKoMMT3aTvNx2PrGJlbFxvj+9rFGw5j +3xIdOPvEHJ/vKeJZq6ejyk3PE9Mtcf9G/4ut2IMzUTkp1jjXOnEpF1v7jeCn +m/Y4j/yr4o5NLh6YuOyI+zKvd2pi30x9zn7hEM63HuAhYQ+EWKiEu+D9/CPC +7XV0xOshZBbkhr3700wZtrbF4DG/o7g/8oNTMvZNyXPXPbzw/rX6VxTsyq2W +j13I+HveyrdW2ANLQlWOVPx78j9y1/ivr3+w2ZqGXR4ZJfVfH6toxNQHn18C +RV5scsW5P+CH9wjPevyuxf2PLUkH/HFeGC8zgV15U3iPRgDuT/kd/B17IGLI +YF8Qzjc62jRj81CLXXaF4H5qQlk9tpZdTKBsGN57/k5OFTZZ1+qSRDh+v2+k +QjH2DXmRNOEI/H2E9v487Bf8w6WESPy9K+ttFnb/7+Im7mh837r6eMZ//T9i ++jli8L784OSH2JptVivrsTifOd+Whv1/FGwFGg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0., 5.073066683058514}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -1551,130 +6349,134 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 5.073066683058514}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{120.79808473007536`, - 258.9819285854564}, {-15.577506565567944`, 5.594368434432056}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV0Hk41F0fBnApUogxY092WijZSc7Xvu8lS6GZMSHZkxAq2uuR6ok3oggJ +WUMzI1slTVkrKvuSfRdJec/zh8v1ue7fuc99Rpoc6OjNzsbGtoT//vsf/HGv +YkXLR/2gHJG/rZYk0J/O0iAb56NH2oK9LOy+dM27csYMVOYafIGJbU/9wMmj +9hpNHT00moldHBFbz2HMQm5N6/xx2FffiNTE5rUido/mNQfsqpbgh2uqn9AA +h06+KPb416bos/ROJN/LkvxiQQKxYVn3n0bfUa2qhss1bKuZaJ1QVi9KCtZ0 +VsOuXhvnjsjrR4n7nou1mZPg83nhqBcBg2hxR3I2DXua03h8UXUYSW7d9HvW +jAScN4Jc1ZZHkNEHSdFg7B2EtMZg+iiKt1Nl/2FKAlvxn9nTRpPosUaXbpkJ +CWgZMkLKXNPIxPncTW7sWHm7hJOsGURL0yp2MSZBp3DH/rC8OSQ5szu0w5AE +VDc/3zs35lFNrqHgRuzZVLZHJQELaLxZOVHRgARcMsr8c6pLKLTYWdQRkeAu +td6MX/AnepEKSi76JJDKcY3dt/wTJRxwlj50kATaSpemT9FX0ObE0wzlAyTw +0exljRutoe1Cihw+miRYjDi9aavCH5Rq5XFGQoMEcXRuvV1cf1GHhfpgoxoJ +kkH72QnWOhpodSzfsB/ve9JoHJK3AchlfTm/d5Mg782dvvPi7HDm2bDl8V14 +7w+P6Ns32OECWYuDqUiC6N1LpUUBG6HxtE+Lsxze+1xadkaVA56qdeqSJEjw +tWWy+m8mB+TlBxL2iOP98xVu2wQ5IUuJIKstSoJ8ddsk5WVO8LkowK0hSIKG +qsgN/nQukNGJj37JQ4Kl+vbeUSMe+KrwKnPlFxEErHn4o6p54Er3OVm0TASV +DmPg1eGFqwe6EiMXieA3VJ6xf+82cOJJOdQyTYQgdpbKQR5+eKPF4bMyQIRh +mcK5hJ8EsOy0dDN8R4RFWtOWZjUB+LdPpvzbayKwPxuRFgkWgBiHA9f96ogg +pSbpmDchAKsnrFp86ERwM0os+dhHBBFlm0+j+URopoSECr8XBMWiuc/rN4nQ +k3PruheXEKxqfChcukqEyYm8zKcmQiD0IOppfwIRtoYNth+oEYKuux7qqeeI +YBx/SN2rXBjiNI37Uv2J8DJLcyk3XRT+8r1o/2xOhKzh1XDdMAnYMNkleHFV +AMwPX+4JLZAA4huJ8vwlAZhsIJoWjEiAl6cbsXlWANSzlASlXHdA5PFj2n9H +BKCB7FHKoS8JtLTpI5vbBWB+pu/M6EUpUK9Pzfr4VACIp4zLSm1kgHLVtyjO +UQAOneBWtuyXh0KGJ3UtiQAo/LDqkT/yQCJo2DbfIMDuhHQtqqgC9NMvcTy8 +RAC2TDXDGAcF2Emv4doXSYCCHvcjJbUKUBI8fk/qOAE4nfPPiz1WBIHVXxSr +vQSoNLb5PE7eBZb6M03cb/hBXOaf2OtDSlDrcK+b+xsfKD0J4/mNVOG2jn2C +9jYeeBQiZ1/O0oDA0QhulyQuaAlHWvFPdEBiytxBh8AB0h6fbI/5HwR9w94t +Vzewg/f6i0KJswDsX/lplC3rSHiicrMw2RCeVf24Yn1yFYWp6X1P2m0MR7iU +Fldf/0TkqbVG4rgJ7Pznc+tq9QKqePNz6emcCZhWc3BMliwgnoxZGfhlAltL ++5aGs3HuOBTtz2UKSqdurizcwnnle5XXCqbgPdzZdcZzAZVf+F9yOMUUrmk9 +ahdlX0BcIto+Xd9NYerGYYc0m3lUYBi6Ob3ZDApuuDA912ZRmLS7fulnM3gZ +fZr6d34W6bEZnX7bbQbclC2+mWOziMUUGJyZMIPOI6SzbF9m0aR2STVwmUM7 +Z7YuZ8ks2r1v7vQAmINw1plIPd9ZlCseOCRfYg6PTVX3+1fOoKxFv9r8uxZQ +Ill8ZCp7CnU9TZF2TbUAoTOBnvX3ptA2z8bzHFkWwKrhW3gSP4XOvpM39Ci1 +gIFFnfuJ5Clk+7Cvjq/NAm6aRrxe3TGFfpk5N4TwWcL88U4vsf9NItsHBm+1 +r1nChOGuHSYpE2jFQORDQ6wVPD9UO+1QNYYWJ3MMbC5bATmTcM/k2Riaua/1 +4tMtK9j7LlPZKG0MjUw5p4+kWYGk4Heho+fHUEfKvWAuhhW0xq0tbLQcQ8Vz +AkLWK1awO9ROX757FPk94vVsD7KGPXfZvCK3jqJuto1z/cdtIPRw/PJA7AgK +2B6YeF7WDnSYMQYhS4Oo0Lex5l6CPfyrsudiXno/ilwQXd7j6wAScU6dEdd7 +0ZKlqfNbT0eI6TSqE5b6jnTcbxsMOzjBk30KOUbGXahNNM2vQe0QWE9Kmj5d ++YzEsi8ycncehg5VpSc32zpQZd9ua1teZzCQPG84LdiOdnTMngifcoY1Tj7q +j+RWpHbvdn5m3xGYdYkyndjXgtI2LexNqneBbs3+LjuBj+iFwb6vCVWu8Gl7 +StWv/vcoWesaYS3PDfZukc61ZWtCzd+eXFK74Q49M+ki/aGNqNwmVS4o7ihY +H923xrvyBs2dcmILoB4DhVlPQk71a7Rkustn2sgDatwtt7kUNKDcqa6VUE1P ++F61rc49ux65PHpCOcbjBcuhOyvWWHWotMTKc+NlL5A6JTsVt1aLdMTbfl39 +5QXhxpveFtnXItm+E19bfY8Dq+pgWSK9Bg1xn7RLHTwOqp+krvgr16CWW7YU +s8NkCBLtNpcNfYXuRqRzn24hA4xz01NTqhGjev0XxYICKor7n/sOMtH+WnVt +RSsKSJV8r/jVx0TZ9b7h49YUCLqT5XC9h4luN7bPB9lTIEN/RrO0i4lobTkT +547gvNCCKdjCRIQRu+773hSIc27xkmfinDej5v15CvB3sdv7JzMR31G4rPaS +AvYSVlLxTkwkRXrbvJ2Bz2c5SVs4MJEKy0aEs5oCbGFuPXx2TOSo5/60s5YC +ReIl1x5bMtHd7eHvz73D5m/M+G7ARGLdz/gaO/H5lefemSpMJOchnHx0mQJe +tyRjIviYSMdrOjdBnQoZjyJP7mljoOyU2VBbTSpAhtSmqBYGIrXP6wtrU6FP ++d5W1kcGmjZZ7sg9QIUgvVbPkPcMlLWHbQPLkAotK0uyLQ0MtG2Z4CrgQAUp +vcbPzRUMNHRTY0v6KSqo/JER6HnIQA5vtTpOBFIhscCs3y2NgarZdNNVgvH9 +3ZOCXQ8YKCVUX6MujApxqq8Ku5IZyNbV7PhwFN5jVH1/IomBquRcq/Zcw+fF +6giOlxnoFj3atzIbu0J6885gBjqlel8nIpcKNSq3WV8CGcj6afEW7Ty8X+ny +wJUABtp6f+RpRQHe815rffokAyWE2I+/KMN7nfh+NtEYKHqX3MnyOvy+alpB +7VEG8rv/3r+khwr2zVqTuRYMZLFtRC+kD+/bc5B8wZyBdiaw8aoOUIEtoVLm +mBkDjYRoFBQP473cxy4ImTDQcdv0qaJJKhSNR1UkAwO5cIQGPF/F57cUt33V +YiCzULGgfCFviEvKzTqkyEB16Zcsk0S8gT+N74GBAgPpseblIsS8oSjKmF9F +noFU5N93Ge3whpZRx3CCLAOJfoky+ibvDbOUoj0jOxhoQrdbaKsGzr0aCF+E +GOgf9gzmCSdvkCqi3fi0Gb9/H0+yzWHsBm/2eU4GinePCFE7gvs3J83xYUeU +2Suuu2Hrtujab8L7aRtu/0vGe5QTwgbYGEitiUx9HewNfZdqyTardPTltjy3 +bKI3sG3k3qk3TUeFiNdn9LY31Iw1X7wzRUfxU4sNBXewA7jlJifpSNWiIUb7 +vjd4HY3Z/2iCjm6xUeZtHnoDaF0+JzZGR6aBGV0R+djpJxoshuhIQuKKpn6h +N2SItrqXD9LRYlPgnY1F+PcK2Kkpg/1YAdncKsW5j0npej8d/enursl8id+3 +1MB610tHZdbiuR8b8b7ZAd//faOj66vsHHebcL9Nv7wYNjl3/LgrC+85eUb2 +wVc64t/0UnyoGdtk+2BGFx35013++fUZ3/dbKYT+hY5kd/8bLjeM379L7ZVS +Bx2tfjnXPjaC++16rte001FLgrfK81Fsrz/Jh7Fj+tXHdSaxdx4Ou9hGR1+T +24/ZLWCfyFGebqGjpM0Ek8gNNIjrdUtb/0BHjPlu97CNNICifL007B/deSEB +HDRgU5fx08PWKzPOIG/B+ZByYCyLjka8In5bEmiQkd0sKfIe77c2ETAh0kDq +hfHeuiY6OqAlsAsJ4n4f+6ZT2Im8+c5qojToGxzPe/cO5y97i8WlcW52hudu +Ix3RnuQ3CsrSoMZ7PMESOzHxbC+fPA287CNvsGOP0Ii8m3bhPU5VcOYtzolm +PpMquM/M0Dj0DR29/EuMHVHF+yYV5TWxh8f67vWp47y8Pmn1NR3p1kTWd2jj +faRZ4hXsIf/CHUzA98NUfnkDHW1zidKoMMT3aTvNx2PrGJlbFxvj+9rFGw5j +3xIdOPvEHJ/vKeJZq6ejyk3PE9Mtcf9G/4ut2IMzUTkp1jjXOnEpF1v7jeCn +m/Y4j/yr4o5NLh6YuOyI+zKvd2pi30x9zn7hEM63HuAhYQ+EWKiEu+D9/CPC +7XV0xOshZBbkhr3700wZtrbF4DG/o7g/8oNTMvZNyXPXPbzw/rX6VxTsyq2W +j13I+HveyrdW2ANLQlWOVPx78j9y1/ivr3+w2ZqGXR4ZJfVfH6toxNQHn18C +RV5scsW5P+CH9wjPevyuxf2PLUkH/HFeGC8zgV15U3iPRgDuT/kd/B17IGLI +YF8Qzjc62jRj81CLXXaF4H5qQlk9tpZdTKBsGN57/k5OFTZZ1+qSRDh+v2+k +QjH2DXmRNOEI/H2E9v487Bf8w6WESPy9K+ttFnb/7+Im7mh837r6eMZ//T9i ++jli8L784OSH2JptVivrsTifOd+Whv1/FGwFGg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "PlotRange" -> {{0, 180}, {0., 5.073066683058514}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -1684,7 +6486,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.9887929549829141}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -1712,7 +6515,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 5.073066683058514}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -1720,9 +6524,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991333813212965*^9}, - CellLabel-> - "Out[251]=",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] + CellChangeTimes->{3.991333813212965*^9, 3.993828705749004*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"c0ccc132-816e-4dfc-a255-ef22b5f2945c"] }, Open ]], Cell[CellGroupData[{ @@ -1785,372 +6588,229 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849261714945*^9},ExpressionUUID->"24fa5db0-1063-354a-bd60-\ -c117a27ff3e1"], + CellChangeTimes->{3.991849261714945*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.0784227471040894`*^-281\\\", \ -\\\"5919012181389927685417441689600000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 252, 225, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813432829*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.552358180522697`*^-247\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 9, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.993828706019298*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], +In[95]:=",ExpressionUUID->"ecb4c1b0-f7f8-4a64-99e9-78b3a8de8764"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9214123648785273`*^-295\\\", \ -\\\"2610284371992958109269091785113600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 226, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813442087*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.02236816909975`*^-255\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 10, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.993828706026129*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], +In[95]:=",ExpressionUUID->"ae6071e0-1f93-4d7a-8503-054fb807242d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*SuperscriptBox[RowBox[{\\\"(\\\", RowBox[{\\\"-\\\", \ -\\\"9.614868462060315`*^-8\\\"}], \\\")\\\"}], \\\"44\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 227, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813450123*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.882696801128719`*^-263\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 95, 11, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.993828706029847*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], +In[95]:=",ExpressionUUID->"7514272e-3ff4-4ed6-9374-b0c97fc22100"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 252, 228, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813469118*^9}, +during this calculation.\"", 2, 95, 12, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.9938287060331707`*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], +In[95]:=",ExpressionUUID->"347f5d42-64ba-47c1-8339-b4a691be88c5"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk41N8Xxy0l+76MtQgtZJ8ZBnMOQpbshJBQkpAlCkVIFJIUWpCQKMo6 +I22UkK+EZEtCoVBCIfKb31+f5/V87nPvue97zvscWa8gu0MsTExM7cxMTP// +/h5ufSl/sZD6tb+Htk6xpfbkEk4Z9MVB7pEN4VE3VQFF3noR+jJgyqG/UPUm +QLhN6QfWvgKwtQq7PnfDGgRmxTKWP1TCsqIpX8iNA/CpwSpo4UMjXKvjMniY +EwQm8t8+zn3oAkmeF7ItGTGw/IF89eeHUTAKPfjUOOISNBndLXxXMA8lvt9m +GxTyQeoT/auX8hpM2k+JTxy7C8LHDpRuMmLFwfjIlPBfD2DnpjvNNvtYkajI +c1qFpxyw4Otojj8rNp14ytK3rRyO9QVIKmey4rXlqfx1t3J4uTs6xeYLKx58 +8vVXXnM5hEnnBOac34DrMW99JbMqoLujS0OpfSO272v95nLtIWSomzy2cmTH +QI1vtnLClaA66GKqf4QdB0yu722WqYT2hIBupSh2FCuhLXjtqAS2vszv7LfZ +UWhtq3YitRKizoxJNk2z4xk1Vp2wI5Xg8yY2mpzAgeFl2e7f6yuBdOix/pYq +TpTJus2j7loF3bxvW3mbOVFCxTpq3LsKjtNGHdf6OLEDOIjpAVVQysUZOPCP +E2UnN8V1xlbB5krn3ExzLvwQx6ezUFwF7OuL/9hHuZD4e3301VwV9GerPZ/j +58Emx8jjZ89Ww/XuMr5wBR7sWpWSW7hQDa682w6s6PCgcfDBIPfMahiKl/7H +4s2D4VnXuoTuVsNIIKeecA0P7hmtOMHXXg2Tu8frSC68+OXOhAgK18DSz6yK +qNt8WHw4MTDiVg3QlYTW12v48Gep/DZ6UQ1EHk6zSmjjwysiu8hzD2pgdTBh +JmWeD/fZdjntfloDsWM0kbdy/Ji27OgbPlwDCR1F9iNh/Ij9rVHs0rVwsTDm +LYu4ANrfD3AdzKgFcy0/QZGtApitcOncy5xaYH9p57htlwBKj0voFubXQsKY +wqCFgQA6q5wyNC2vhWi59q+ZfgL4N2qhXLK1FgLzCf8U6wXwoZrhqbXVWrC9 ++UjZYr8gak6bL912rwN+5RtB7ocEUbQwPXK/dx10PE6oDAoSxF+/Xkdx+dWB ++eA+7cx4QVxwNf1rFVYHhhL/jD6WCWJMWeqc94U60Mo23x+0Kog3UiYnXlXX +gVjmWPKVW0Iozh129xgLDQhKNQlLxUL453lLRwkbDSQaE2PcHwph6nGmJ0Oc +NJD5uePEtiYh3GPx+qeSEA0ULI97Pp5krBePaPXdSgPNDWukMU1hrG22n3Y0 +pIHWjQ71PfrCaKxQOshrQgOSRr7yAxNhtCffy31mRgOKp5FchIswnvIPusNu +SwODhmQerhhh9CPWNGkfoIF1mOi4RpswhoQ4mwtG0sCGa3I4q1sYC5oifuw5 +TQO7Anr/6pAwvggKOxURSwOnTre3zT+EUXX+GzYk0sBd+U69q4gIGmxjejGe +QQP/cdXLcZ4iuKFn/4PKezQ4FsWcMuEngo5Ff3WP3KdBoGB3omWoCH78uvxS +pIIGIRgeLZoogiqzG9qdq2lw6maDb2mZCB5dHO0785QG5x3MqF2/RZAYU2ht ++Y6hV3WHBAuzKOpamOc/6qZBuZDDH3UuUSwQScnn6aVBb5fHw8ubRdG3soV2 +b4AG8rZhcrZ7RDFh8eb5kDEa0B4u/4u1E0Wd/pDM1C80sOSPGXzoJooCO/W9 +8yZoEPo2OZM/WBSt4wxt7n6nQePePLbOHFEUKd59f8884/4P5MfW74jiqcJ2 +bolFGnzjLn2mWi6KzusrhqO/aSDQXn3yUqMotqcnUfat0MDTvO2b1XdRVPmi +l9fNRIeFe9avzyyKIp4vWdzPQofzHO/vlK+LYv+rJ6RBVjqUt3xy4xUWw1tc +rfFP2eiwZrLY8Z+eGLqYNVwjcNMhvTiybM1EDGmmpZeceeggz8aUtMtWDJPZ +0pIv8dLB8hWnQeohMUy41XBxlJ8OI/Lp0k+CxPBjT2/OPwE6hCaIrEyfEkNS +3LlqASE6XDfaUmWZJoYvDp2QlBahg8qdokvR2WJoFv4gQESUDo0sSsfuF4jh +jRLfvg1idJh6QVTgrhPDP2/OsbYS6BAt+5hZ74UY9sZvarslTgf+szjs/0YM +9UZNavwk6KCNFllvPonh23+BbBOSdGjP6wz9OyWGO0duhGRL0cFz3dFGaUEM +FYt4+Q2kGfp4DCrv/yeGr8iLn0cYfP6pJ8dFdgK2keK+R8jQQULm65d6QQJy +zE2rsm1m6HXav/GbFAFnPIMrLzK4Vy88ylydgDLJHWeit9Dh6M2/+yJ1Cah2 +mPR2gsFrf2O1So0JqKHTe9RclqHnfjaBAWsC5vIzOxYyWP7xxRkOVwLmXeC9 +vMhgmoRAm44PAfd2uspR5Rj6Rl4r9gskINNlE+4zDB7pl4zPOUnA/DWSXQ2D +Q3VuH2iNI+Bi09U/Yww2z+ddsEgh4H9+xCebttJBblN0UsdVAh7O6GCVZ/By +wJSUbR4Bra9qdGgzuLPH6VF3CWO9PGmzCYNLdF8aO1US8Jj5o2ULBscUqA/0 +PSZgiXeMpzmDnTjyAve/ImCQTIyTAYNVjnOzDncQsPtExrAagzd+OJXl2UfA +rPLcvwQGD+lPKI19JmCHfcrDZUZ81YUOzw99J+ARTVOmbgZf5Gp0mFwgYL3r +05lCBnuFqE4d/UdAqtB4VBCDKf03T89sEscPww8eaDBYADkFjwuIY02YcOIs +Q6/J4ojiXxLimPdEiP0Og5/xfKGckBfHjM5Skg2Dr4XZvf2zSxxDfgwK/2a8 +R+DgM+9Isjhax98vymSwseGupVUUR3lxhWklBkvdu54SYy6Ouz1svz9mvO8C +H7ssi4M49kph8W4GF3wcNdvkK44PSiv2IyM/Tu22GU4+Lo5mMe5uVYz8sSl7 +EsIdKY7877YpbGbw+snsGwKp4liZkir5mZGPbsJWM5JV4ij0+O48LyN/NaMe +n81tEMcrviqpexj5zTm6XVS2mRFvvyh7FCP/6RWsoNgvjv+YJ8vbGPUiakFP +V1sXx7t9OyVFBOkw80hRoYpdAvfGmEuIMurtJSGTThSUQIeVdmF+Rj2Gfg0c +pShIYMl2dY4fjPrtPCuvZWwhgcGsGZYuHHS4O3m55bWDBF7i7YyXY6fDGet1 +N3MPCfyWr/hunOEHu6QHzlkHM/Y3uf/YYQMdLtAufXDJksCzKtmqo/9osPvH +SmTgmAQ+607Nqv3F8NM9mTtfTEug43HKZsk5hl/e3jUg9FsCme4pkE/9YPQj +B08dOrsk3r4uriA3TYNp2qs/rCqSmK1YsG8bwx+vxKWH5ZyURLfQPj4Whr+2 +DO6Qnz4riVnVZ9WZe2iwqtXUTb0oiVWhc+IrDH8+PLGoMX5LEhtSBfb2/8fo +P5b751SaJDHJxyh37ysajIooBr7kkUKnnwksAlU0EAt6Ji0mJoXbeTJI5Q8Z +ftzi/J/fFinklGU9alxOg9rIi8p8mlJo4Rn98SCjn1z49PObi7MUKkjJutnn +0UDj3mPfHwVSKHPn7aTkBRqc1bM9KKEtjTuad25230+DPR65v8iG0shBKwlf +20cD3tjv8Y6W0hg9CGZZDjS42XSuON1TGt24tELr9jL6g3n9d7ZkaXQeWfEq +BRr8dN4aPt8vjQfvnf7nIUcDjxOLF9qjZHCHNmFCYawOFLIMpb6dk8HO8hHN +9eE6hn6XHmxKl8HlrUw3ugbqIHJ1R6dhoQzKzFxt9+2qg6vxHiL0dhn0f1Bk +YfmiDtovv84rkt6McZ+61Vly64BSnlN95tlmdB0tyDO2r4PdHzrWZls240Td +stczqzqwYtpgeqBrM8pZS17RMq8Db7vAfviyGacNKswFDOrAJEo2JnbjFowx +/S81U6UOjm/+fcdAaQuO1qpJNrPXwUvfvJmm8C347itRfp5eC8eW5mJbeGRx +TOyInw9/LSwr8Q/vcpTDXG2dA9TQatAru59/7dpWZBNs3Tb6qBLmBM09nRrl +sTnyO8+9pYcwnuLpFLJJETfFE6U2K5SD2Y8Isy+kbagcubLxd1EpTHuzh1bH +bMeO0+o+L5nvMuZ/MZbzjTuw1mhyqOHuHRD8TzHt4Y+dqNFx4oB/M2PeT6qw +IZGUMTxW6BHz5A3IVtLhF/LdhQuee6fvUrKgTcKAOH9ZBZOv1Bj7aF4BilRj +umqvKs5YlIpZDKfB6Fb54akBVTRdPcQX8TINkpUSlQo/qWLhlZ6TVaVp0Ecx +byZMqeIDmx2p7hFpEOHS9Zd5VRW94kE9XCANXC2CNb/xq6Efv9uGmj2pcC2J +YQckNVyN1f6wu+ki8LIWhB2MU8PI6+e+x0wkAdvyM/u5BDW0tf2u3fY2Cf7N +ftQ4e14Nq72XQJGWBD8GxOfyU9QwSIHsLpScBJ2VlwNGrqnhh/FqlhdKSZDh +dfbwgTI15OSf8PQOOw+ijZ7O7j1qOG6RN5MmmAgyZzfruSiqo+HukltvYuOh +PJRd7uN2dbzfXllQEBAP1MNzmw4qqeOI+YmBJNd4cLdo6j6ipo4UV7+mOK14 +uCni63+Soo7sPjV3lKbiQLy0/HqWlTrGyHB9MneMA+Fu/eX34eq4q/WbYLL2 +WeBQcKu1e62Oie9uhNy2OwNHxcG8rFUdF2vN9M4Tz0Abj9wwa7s62s5/FU0g +nIGU3xMbazrVcSbOvr1x+DTwtoQ6ig2oY+VY13u7Y6dB0P/iwuC0OpZcuOtQ +eTEapB7VaxwS1GDM4+/qRQcjQUVfvCLCXQPPbo3cWkePgKqtfn9ZPDWQX6+b +/C8vArQ56aZpXhqo9lD1qVtiBBh+cB4p9NXAVjOX0QP2EeAUnC3QFayBp3cu +d0XPhkNMkViYcqIGvhASq2HdEQ6dPKI6n8s1sD+ZVbe/PAxChgWbzJk08fWL +jGyrlWBoaXZ7Usqiid4KSfN2E8EgU1Fcx7lRE3kuDQUd6QmGthjK/TYOTfxu +TbrVXB4McrJeV82FNPFw6NUYK59geOf9yNdcURNFa9zF4rqOg9qUNbe5pSb2 +nlMUtwoPgh/zKY5m2Zp47uulwu4T/jDUd9vp1nVNnDodz2vt7A9tT2r3zd3U +xIH1gl9fKP5QeH7EJee2Jp4Qxr5DTP7gKqnlMVWqiY9edo2WpRyFV4aDh5Of +aGJHi/RBKPWDG5d3nGwd1cTajzzqy0u+kBROPSX9RRNz1vO0nwz7Qvh++8jg +CU0susBteP2lL9gonI4Wn9ZE2/0vefLSfYGN3hnrt6iJVjP9we92+ELwSEQy +B7sW9r5Y6m7xPAymqs3XzXZpYeSB79IxIz7gzLbHoVNVC7OVHP2NX/vA0Y+t +PPs0tJDGv9FfsdwH0i7+F+tD1kKtSzsUtKN9oHei53CMgRYW666yZIv7gE/+ +mEaNoxbWd0jEE128IU6A+c2WM1r4KsBe0+L7QcicjEu4G6uFs4WJ2/XeH4Ti +ZxuoKvFaeEXZi9342UFoC2B/pJukhbtUkzVyrxwEgTa+LKcMLfwvvnrIX/8g +5MfJeKcUM84X3yfsddUTns7r/v3ToYVL8ed07e57wO32Oi/7d1qY8FPxd1CS +ByQUabaVd2th3/SngUofDzDbp5RzqE8LbRTJBXelPaCnXoLc/VkLH6ttLjW7 +7A7fzi6HlC9oYa7mmWn7GDcQ5a/75iNBRJufAw/unnCF5UkNu+dSRKyL4/6x +y8kVhl6U0yU3E/Fp9N3o9yRXuB1anNS1lYgtxNNsSUsuoPzhqiLuImLn8PXr +EaddwDA3zEsSiXifO1LTN9UZApU1Bt4dIuLll1mpz146wYk/EisHjhDRtiKM +MlnsBNGNrBKzR4mYTVTv1Ux2govO7104jxOxw9rHWtPKCUoSTvYbRhIxbFUq +7m2/I4wOPe2rSiOiTtAE+4E/DuCUavHhah0RIyQWPv40twd3Z60/W+uJmGL1 +cSNJ3R58tkqLVTYQsfmE++8cMXsIpc86dbwgYnXIn8on43aQ/uVyL1s7EWfk +epSDY+2gTb/vfcQIQw9qEFvAE1vQn/XpceEgIXN4e/C4pQ2IPjYtaOAiYQiX +api+tg3Mnt95fDMvCed8ddjLt9pAruxPri+CJMzZ3MFftmgN/xyijI5LkXCi +cO1VuIM1PHt8uTJRlYTTSqwitySswCD5aXqVIwlfL9+XnHltARJOtz1EnUl4 +PFpYQ7nQAn7JJSifciWhJ7fV58xYCyhoMGuhHiDhFqO1g6M6FsDys2e99QgJ +pebkXP3KzaHJ6XvgSBQJZ/vWWVjzzMBYnrCXp4CEnTszls1vmUL1zCtZn0IS +plV4lLPHmIJ8Xejv+mLG+cThtClPU9hg/jbvSBkJ5fiWjIQVTKExKPFXUzUJ +ybeFb3JUmAD18UJW5GsSjoYOWzu2GgPJ7t3oxDQJFa2PCpwV3Q3FkjF11B8k +LA8KlDm4agQiX5RTrs6R8OaLPaKeo0awEJFENPpNwnvDLcb15UZQeQuSctdJ +mOi5LD+0xwhUpx7schQkI7Pla+P6OEPYHnvhZCOZjL7Mv++wcxtAg27RRksK +GT2OGyjdmUew+fMs470eGXk/fE93H0Q4Gbh4f9KAjDJy8j7qZQgtbp6feS3J +yPPCXMnWEuGIDsl8vycZH3hQgu9sB7j367PkQhIZDeXH45rC9IBavlpy+iIZ +O6Uy7x220IMuPzHSpjQyprf1D6GcHqyMWNpIXCHjgakSn5xOXTB/W5eAt8io +EiU42a2qC9/KUmdSHpFxLuc0G3lJB3Ye0nmmMEDGd2w+XRsqyHBJzmolfoiM +wsH7fL3TyLDwyYs4OkxG9qP3d38PIMNT15Sy3DEyitwakA7fRQY7m09ZYjOM ++PY+1AktJ8Ep3XPHOZi00TlXXH6sjggtAu9kZxS08eLEUUnvCU3Y9faLm8V2 +bbzS5Xf1yhtNyEhZybq3Uxv3L/98P1GhCW6b5HkPq2rjGQza+PekJvxYDV8Z +1tbGe8TVgtfcmiA6KdXdaaGNkT5x8b0UDTj09EhCdbA2aqnMOtEq1GA24FuE +cZg2Esj3yySvqcFJ6WP+veHaWH3ayOxOtBpciA6yW4rSRoWXL4tkzNXgISV8 +i16iNrJM73ty9j9VWK2Nb2i6ro0CqZ8yxfaqQEZF7kJXkzZOdgWsCZ5RAqkD +Wya9m7XRldz+BuyVoIi3YHChRRs9mHsdSrcrAS2gqFG0QxuNWNYcyD074aPS +/XTXPm207Odw2K6yE7aX0JVHp7XxXOO7EtmZ7fAsv8dnTkQHp4uJRR5XFWHE +UvZAOEEH9fY5x9iHKALTcoDLXwkdjGROaIu0VgRD201WG7fo4LFMvH+AUxGa +mSlk8Z06WDQ3EBEVpwDtXnkcBlTG/1Pvlhqj5GFA/mh5+mEdpMXxfB5Ol4O/ +nbUlIn46GPQm4vLdUDmQOs1657q/DuqIBjDdcJID9/c3swqP62C8GxuJWVoO +Rs69jaVF6uAr5b9dL8tkYeKrlv1Img5+CXEwXurcAgsl639U63RQIFnvoXqw +DHx1MslPpuvg/LCe34iRDPRtSN0z9lgHL67PrP4nKgOPPSVyrj3XQb6llBM+ +T6QhjkCkrLXqoN2x+E3hPNLAn3Q0um1IB9MKDComaJKg7Pue6RALBVU/jX34 +TREHGRGpe083UJBYXjEzLSwO/E1etoRNFFw48CyF8IMA8zI/b7/houCKupkd +XyEB6ns5jTREGGzdeDqUnwB7TPDc+jYKlsh/DBj8JQreCmUc1/cy9s98scNr +SBgiX3kcVbShIMvQK84hujCkHxJ8U2lHwViO//ZfzBKGhqJTKW/2UbDSuFQ6 +2V4YhBX38K0dpCCHpcH40n9C0Kz4RdgznIKyxIbuI+2CsHP75i2KeRRUuC3M +nT3DD9jSFVt5m4JR8lnnNd/xg9ORxM/UQgoG7+W787eaH+JLZgr23aPgzIBS +Hf9pfhja3qCQXEXBR3w59qZ8/JC2w0Vp+jUFH/Bf6vGI4IW5nVdIlT8pyMnV +K5N0iAv62tFYaJ6Cg1+2vOChcMHzwFn7sEUKku3idvTwckFapVkwaYWCTl43 +J2TpnLCTwnS/nlUXZUI2BNXxc4KXWYBsk6gufnLieHHmDTv0+Jpy9+jpYuSW +5xzEADZ4zLEoQQRdPGK94byKGRsUlBXsuGagi08lngZ6KLDB8R9rJs4murj/ +fK+l5/BG4ImoPjtkrYuy1wpYx+02gkmi7J9xL100r+W7Wmq8AWiFfz8vJuni +tR8fZQxsWIBkFPbH/KIuGqrcuMuvyQI1n6e581N10aBgMzO3KAtUygyTzTN0 +kT4tpnFuiBnuZz9Pzb2hizvj5mci/ZkhP+Wcjmm5Lt5abu+Hy0yQHMZ3Obtb +F3mPuDlQF9eo7EJJxTPvdXGHxrvfP16uURMfMTUY9ukiz2wh//fMNWrC7NzX +6SFdfODjwtlAXKOeOdKjZ/CVEe+5311PIlepIW45k1NLusg+ruEwKfCX6rp7 +K+rK6KGrF8FbLWSJutbDztu0RQ+rePI7f5osUfMPzQ6ab9VDjSfH4pcll6hf +E+kRrtv1sNmA+vtz8x9qSKt1xSkNPUzY2fOZZcsf6gWraBmaiR6+lv/hqfBp +kVrv/H5VK0gPvx6tWeFPm6e6T9W3NQTroXbwXWsu/3kqU2R+9u4wPfxgrL2C +e+apJjf8tRxO6aHyXs8+N9Z5atdH5mOh8Xqos2HwkmX0L+o3L5XBR1l6yGQa +595wco4qGXCervJcD9fSr0f/0fhBTVs/TLzYqIdueVG7VP7NUlkyTB5NvNTD +pZaBk/TWWeq32o338lv1sGlOcOzNwVlqPVNCtmC3Hqa6Dpp2XZ2humbGRvz+ +ooc16dtyl7mnqdmPTxGfcunjwYJq4witKSq3lcsjCV59PCNwsWUfxxQ1dkR7 +VwS/PjLXu5icGZ6kHtm4JK8moo+HesuSbiRPUsnW4cIFMvq4byHxNtfYBLV3 +NGT+nLo+Pm+M6/Yt+EoV4Tz2aO8+fUwTquLabzNOLTQ6HfnTRR+LUn8+kd8x +TtU4nWZ0xU0fT/DJ2ZNYxqlWPx++7zuoj3xvWMiqNWPUxN7FZe9j+iiS5pNw +VGaMulQQYxh5Vh8DSYMVuWufqQO6V7qLy/Sx6mQR77MPn6hHThTeNCvXR6a/ +sYHncz5Rf5fXHJp+qI83Jf/5Ne3/RBWU6/ujXquPK1JLnFc+D1Mt2KWlnjzX +x8/tSTJRvz5SG3qKfbrf6+O5AOu/TduHqOa8tF3hffro1KM85Tc3SO0zbf1N +GNTHcsU6z4j6QepC/fckjxF95Kz6Jti8d5C667bag6lv+pjxaPytzKkBasOA +QXjKjD4e45q1mtk9QDUXtgfVn/oY+oWpUVpggHr4/Il3YYv6KC+p8PZ2aT91 +4XnidbElfbRQDhVYiOinxq1kedevMO7fjNlFxv1Ufq17yu5r+vjD7Xh9jVA/ +NTegfnF9XR+5c1ffbh3to/4PwRvVDg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2164,331 +6824,185 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwVlnk41N8Xxy0l+76MtQgtZJ8ZBnMOQpbshJBQkpAlCkVIFJIUWpCQKMo6 +I22UkK+EZEtCoVBCIfKb31+f5/V87nPvue97zvscWa8gu0MsTExM7cxMTP// +/h5ufSl/sZD6tb+Htk6xpfbkEk4Z9MVB7pEN4VE3VQFF3noR+jJgyqG/UPUm +QLhN6QfWvgKwtQq7PnfDGgRmxTKWP1TCsqIpX8iNA/CpwSpo4UMjXKvjMniY +EwQm8t8+zn3oAkmeF7ItGTGw/IF89eeHUTAKPfjUOOISNBndLXxXMA8lvt9m +GxTyQeoT/auX8hpM2k+JTxy7C8LHDpRuMmLFwfjIlPBfD2DnpjvNNvtYkajI +c1qFpxyw4Otojj8rNp14ytK3rRyO9QVIKmey4rXlqfx1t3J4uTs6xeYLKx58 +8vVXXnM5hEnnBOac34DrMW99JbMqoLujS0OpfSO272v95nLtIWSomzy2cmTH +QI1vtnLClaA66GKqf4QdB0yu722WqYT2hIBupSh2FCuhLXjtqAS2vszv7LfZ +UWhtq3YitRKizoxJNk2z4xk1Vp2wI5Xg8yY2mpzAgeFl2e7f6yuBdOix/pYq +TpTJus2j7loF3bxvW3mbOVFCxTpq3LsKjtNGHdf6OLEDOIjpAVVQysUZOPCP +E2UnN8V1xlbB5krn3ExzLvwQx6ezUFwF7OuL/9hHuZD4e3301VwV9GerPZ/j +58Emx8jjZ89Ww/XuMr5wBR7sWpWSW7hQDa682w6s6PCgcfDBIPfMahiKl/7H +4s2D4VnXuoTuVsNIIKeecA0P7hmtOMHXXg2Tu8frSC68+OXOhAgK18DSz6yK +qNt8WHw4MTDiVg3QlYTW12v48Gep/DZ6UQ1EHk6zSmjjwysiu8hzD2pgdTBh +JmWeD/fZdjntfloDsWM0kbdy/Ji27OgbPlwDCR1F9iNh/Ij9rVHs0rVwsTDm +LYu4ANrfD3AdzKgFcy0/QZGtApitcOncy5xaYH9p57htlwBKj0voFubXQsKY +wqCFgQA6q5wyNC2vhWi59q+ZfgL4N2qhXLK1FgLzCf8U6wXwoZrhqbXVWrC9 ++UjZYr8gak6bL912rwN+5RtB7ocEUbQwPXK/dx10PE6oDAoSxF+/Xkdx+dWB ++eA+7cx4QVxwNf1rFVYHhhL/jD6WCWJMWeqc94U60Mo23x+0Kog3UiYnXlXX +gVjmWPKVW0Iozh129xgLDQhKNQlLxUL453lLRwkbDSQaE2PcHwph6nGmJ0Oc +NJD5uePEtiYh3GPx+qeSEA0ULI97Pp5krBePaPXdSgPNDWukMU1hrG22n3Y0 +pIHWjQ71PfrCaKxQOshrQgOSRr7yAxNhtCffy31mRgOKp5FchIswnvIPusNu +SwODhmQerhhh9CPWNGkfoIF1mOi4RpswhoQ4mwtG0sCGa3I4q1sYC5oifuw5 +TQO7Anr/6pAwvggKOxURSwOnTre3zT+EUXX+GzYk0sBd+U69q4gIGmxjejGe +QQP/cdXLcZ4iuKFn/4PKezQ4FsWcMuEngo5Ff3WP3KdBoGB3omWoCH78uvxS +pIIGIRgeLZoogiqzG9qdq2lw6maDb2mZCB5dHO0785QG5x3MqF2/RZAYU2ht ++Y6hV3WHBAuzKOpamOc/6qZBuZDDH3UuUSwQScnn6aVBb5fHw8ubRdG3soV2 +b4AG8rZhcrZ7RDFh8eb5kDEa0B4u/4u1E0Wd/pDM1C80sOSPGXzoJooCO/W9 +8yZoEPo2OZM/WBSt4wxt7n6nQePePLbOHFEUKd59f8884/4P5MfW74jiqcJ2 +bolFGnzjLn2mWi6KzusrhqO/aSDQXn3yUqMotqcnUfat0MDTvO2b1XdRVPmi +l9fNRIeFe9avzyyKIp4vWdzPQofzHO/vlK+LYv+rJ6RBVjqUt3xy4xUWw1tc +rfFP2eiwZrLY8Z+eGLqYNVwjcNMhvTiybM1EDGmmpZeceeggz8aUtMtWDJPZ +0pIv8dLB8hWnQeohMUy41XBxlJ8OI/Lp0k+CxPBjT2/OPwE6hCaIrEyfEkNS +3LlqASE6XDfaUmWZJoYvDp2QlBahg8qdokvR2WJoFv4gQESUDo0sSsfuF4jh +jRLfvg1idJh6QVTgrhPDP2/OsbYS6BAt+5hZ74UY9sZvarslTgf+szjs/0YM +9UZNavwk6KCNFllvPonh23+BbBOSdGjP6wz9OyWGO0duhGRL0cFz3dFGaUEM +FYt4+Q2kGfp4DCrv/yeGr8iLn0cYfP6pJ8dFdgK2keK+R8jQQULm65d6QQJy +zE2rsm1m6HXav/GbFAFnPIMrLzK4Vy88ylydgDLJHWeit9Dh6M2/+yJ1Cah2 +mPR2gsFrf2O1So0JqKHTe9RclqHnfjaBAWsC5vIzOxYyWP7xxRkOVwLmXeC9 +vMhgmoRAm44PAfd2uspR5Rj6Rl4r9gskINNlE+4zDB7pl4zPOUnA/DWSXQ2D +Q3VuH2iNI+Bi09U/Yww2z+ddsEgh4H9+xCebttJBblN0UsdVAh7O6GCVZ/By +wJSUbR4Bra9qdGgzuLPH6VF3CWO9PGmzCYNLdF8aO1US8Jj5o2ULBscUqA/0 +PSZgiXeMpzmDnTjyAve/ImCQTIyTAYNVjnOzDncQsPtExrAagzd+OJXl2UfA +rPLcvwQGD+lPKI19JmCHfcrDZUZ81YUOzw99J+ARTVOmbgZf5Gp0mFwgYL3r +05lCBnuFqE4d/UdAqtB4VBCDKf03T89sEscPww8eaDBYADkFjwuIY02YcOIs +Q6/J4ojiXxLimPdEiP0Og5/xfKGckBfHjM5Skg2Dr4XZvf2zSxxDfgwK/2a8 +R+DgM+9Isjhax98vymSwseGupVUUR3lxhWklBkvdu54SYy6Ouz1svz9mvO8C +H7ssi4M49kph8W4GF3wcNdvkK44PSiv2IyM/Tu22GU4+Lo5mMe5uVYz8sSl7 +EsIdKY7877YpbGbw+snsGwKp4liZkir5mZGPbsJWM5JV4ij0+O48LyN/NaMe +n81tEMcrviqpexj5zTm6XVS2mRFvvyh7FCP/6RWsoNgvjv+YJ8vbGPUiakFP +V1sXx7t9OyVFBOkw80hRoYpdAvfGmEuIMurtJSGTThSUQIeVdmF+Rj2Gfg0c +pShIYMl2dY4fjPrtPCuvZWwhgcGsGZYuHHS4O3m55bWDBF7i7YyXY6fDGet1 +N3MPCfyWr/hunOEHu6QHzlkHM/Y3uf/YYQMdLtAufXDJksCzKtmqo/9osPvH +SmTgmAQ+607Nqv3F8NM9mTtfTEug43HKZsk5hl/e3jUg9FsCme4pkE/9YPQj +B08dOrsk3r4uriA3TYNp2qs/rCqSmK1YsG8bwx+vxKWH5ZyURLfQPj4Whr+2 +DO6Qnz4riVnVZ9WZe2iwqtXUTb0oiVWhc+IrDH8+PLGoMX5LEhtSBfb2/8fo +P5b751SaJDHJxyh37ysajIooBr7kkUKnnwksAlU0EAt6Ji0mJoXbeTJI5Q8Z +ftzi/J/fFinklGU9alxOg9rIi8p8mlJo4Rn98SCjn1z49PObi7MUKkjJutnn +0UDj3mPfHwVSKHPn7aTkBRqc1bM9KKEtjTuad25230+DPR65v8iG0shBKwlf +20cD3tjv8Y6W0hg9CGZZDjS42XSuON1TGt24tELr9jL6g3n9d7ZkaXQeWfEq +BRr8dN4aPt8vjQfvnf7nIUcDjxOLF9qjZHCHNmFCYawOFLIMpb6dk8HO8hHN +9eE6hn6XHmxKl8HlrUw3ugbqIHJ1R6dhoQzKzFxt9+2qg6vxHiL0dhn0f1Bk +YfmiDtovv84rkt6McZ+61Vly64BSnlN95tlmdB0tyDO2r4PdHzrWZls240Td +stczqzqwYtpgeqBrM8pZS17RMq8Db7vAfviyGacNKswFDOrAJEo2JnbjFowx +/S81U6UOjm/+fcdAaQuO1qpJNrPXwUvfvJmm8C347itRfp5eC8eW5mJbeGRx +TOyInw9/LSwr8Q/vcpTDXG2dA9TQatAru59/7dpWZBNs3Tb6qBLmBM09nRrl +sTnyO8+9pYcwnuLpFLJJETfFE6U2K5SD2Y8Isy+kbagcubLxd1EpTHuzh1bH +bMeO0+o+L5nvMuZ/MZbzjTuw1mhyqOHuHRD8TzHt4Y+dqNFx4oB/M2PeT6qw +IZGUMTxW6BHz5A3IVtLhF/LdhQuee6fvUrKgTcKAOH9ZBZOv1Bj7aF4BilRj +umqvKs5YlIpZDKfB6Fb54akBVTRdPcQX8TINkpUSlQo/qWLhlZ6TVaVp0Ecx +byZMqeIDmx2p7hFpEOHS9Zd5VRW94kE9XCANXC2CNb/xq6Efv9uGmj2pcC2J +YQckNVyN1f6wu+ki8LIWhB2MU8PI6+e+x0wkAdvyM/u5BDW0tf2u3fY2Cf7N +ftQ4e14Nq72XQJGWBD8GxOfyU9QwSIHsLpScBJ2VlwNGrqnhh/FqlhdKSZDh +dfbwgTI15OSf8PQOOw+ijZ7O7j1qOG6RN5MmmAgyZzfruSiqo+HukltvYuOh +PJRd7uN2dbzfXllQEBAP1MNzmw4qqeOI+YmBJNd4cLdo6j6ipo4UV7+mOK14 +uCni63+Soo7sPjV3lKbiQLy0/HqWlTrGyHB9MneMA+Fu/eX34eq4q/WbYLL2 +WeBQcKu1e62Oie9uhNy2OwNHxcG8rFUdF2vN9M4Tz0Abj9wwa7s62s5/FU0g +nIGU3xMbazrVcSbOvr1x+DTwtoQ6ig2oY+VY13u7Y6dB0P/iwuC0OpZcuOtQ +eTEapB7VaxwS1GDM4+/qRQcjQUVfvCLCXQPPbo3cWkePgKqtfn9ZPDWQX6+b +/C8vArQ56aZpXhqo9lD1qVtiBBh+cB4p9NXAVjOX0QP2EeAUnC3QFayBp3cu +d0XPhkNMkViYcqIGvhASq2HdEQ6dPKI6n8s1sD+ZVbe/PAxChgWbzJk08fWL +jGyrlWBoaXZ7Usqiid4KSfN2E8EgU1Fcx7lRE3kuDQUd6QmGthjK/TYOTfxu +TbrVXB4McrJeV82FNPFw6NUYK59geOf9yNdcURNFa9zF4rqOg9qUNbe5pSb2 +nlMUtwoPgh/zKY5m2Zp47uulwu4T/jDUd9vp1nVNnDodz2vt7A9tT2r3zd3U +xIH1gl9fKP5QeH7EJee2Jp4Qxr5DTP7gKqnlMVWqiY9edo2WpRyFV4aDh5Of +aGJHi/RBKPWDG5d3nGwd1cTajzzqy0u+kBROPSX9RRNz1vO0nwz7Qvh++8jg +CU0susBteP2lL9gonI4Wn9ZE2/0vefLSfYGN3hnrt6iJVjP9we92+ELwSEQy +B7sW9r5Y6m7xPAymqs3XzXZpYeSB79IxIz7gzLbHoVNVC7OVHP2NX/vA0Y+t +PPs0tJDGv9FfsdwH0i7+F+tD1kKtSzsUtKN9oHei53CMgRYW666yZIv7gE/+ +mEaNoxbWd0jEE128IU6A+c2WM1r4KsBe0+L7QcicjEu4G6uFs4WJ2/XeH4Ti +ZxuoKvFaeEXZi9342UFoC2B/pJukhbtUkzVyrxwEgTa+LKcMLfwvvnrIX/8g +5MfJeKcUM84X3yfsddUTns7r/v3ToYVL8ed07e57wO32Oi/7d1qY8FPxd1CS +ByQUabaVd2th3/SngUofDzDbp5RzqE8LbRTJBXelPaCnXoLc/VkLH6ttLjW7 +7A7fzi6HlC9oYa7mmWn7GDcQ5a/75iNBRJufAw/unnCF5UkNu+dSRKyL4/6x +y8kVhl6U0yU3E/Fp9N3o9yRXuB1anNS1lYgtxNNsSUsuoPzhqiLuImLn8PXr +EaddwDA3zEsSiXifO1LTN9UZApU1Bt4dIuLll1mpz146wYk/EisHjhDRtiKM +MlnsBNGNrBKzR4mYTVTv1Ux2govO7104jxOxw9rHWtPKCUoSTvYbRhIxbFUq +7m2/I4wOPe2rSiOiTtAE+4E/DuCUavHhah0RIyQWPv40twd3Z60/W+uJmGL1 +cSNJ3R58tkqLVTYQsfmE++8cMXsIpc86dbwgYnXIn8on43aQ/uVyL1s7EWfk +epSDY+2gTb/vfcQIQw9qEFvAE1vQn/XpceEgIXN4e/C4pQ2IPjYtaOAiYQiX +api+tg3Mnt95fDMvCed8ddjLt9pAruxPri+CJMzZ3MFftmgN/xyijI5LkXCi +cO1VuIM1PHt8uTJRlYTTSqwitySswCD5aXqVIwlfL9+XnHltARJOtz1EnUl4 +PFpYQ7nQAn7JJSifciWhJ7fV58xYCyhoMGuhHiDhFqO1g6M6FsDys2e99QgJ +pebkXP3KzaHJ6XvgSBQJZ/vWWVjzzMBYnrCXp4CEnTszls1vmUL1zCtZn0IS +plV4lLPHmIJ8Xejv+mLG+cThtClPU9hg/jbvSBkJ5fiWjIQVTKExKPFXUzUJ +ybeFb3JUmAD18UJW5GsSjoYOWzu2GgPJ7t3oxDQJFa2PCpwV3Q3FkjF11B8k +LA8KlDm4agQiX5RTrs6R8OaLPaKeo0awEJFENPpNwnvDLcb15UZQeQuSctdJ +mOi5LD+0xwhUpx7schQkI7Pla+P6OEPYHnvhZCOZjL7Mv++wcxtAg27RRksK +GT2OGyjdmUew+fMs470eGXk/fE93H0Q4Gbh4f9KAjDJy8j7qZQgtbp6feS3J +yPPCXMnWEuGIDsl8vycZH3hQgu9sB7j367PkQhIZDeXH45rC9IBavlpy+iIZ +O6Uy7x220IMuPzHSpjQyprf1D6GcHqyMWNpIXCHjgakSn5xOXTB/W5eAt8io +EiU42a2qC9/KUmdSHpFxLuc0G3lJB3Ye0nmmMEDGd2w+XRsqyHBJzmolfoiM +wsH7fL3TyLDwyYs4OkxG9qP3d38PIMNT15Sy3DEyitwakA7fRQY7m09ZYjOM ++PY+1AktJ8Ep3XPHOZi00TlXXH6sjggtAu9kZxS08eLEUUnvCU3Y9faLm8V2 +bbzS5Xf1yhtNyEhZybq3Uxv3L/98P1GhCW6b5HkPq2rjGQza+PekJvxYDV8Z +1tbGe8TVgtfcmiA6KdXdaaGNkT5x8b0UDTj09EhCdbA2aqnMOtEq1GA24FuE +cZg2Esj3yySvqcFJ6WP+veHaWH3ayOxOtBpciA6yW4rSRoWXL4tkzNXgISV8 +i16iNrJM73ty9j9VWK2Nb2i6ro0CqZ8yxfaqQEZF7kJXkzZOdgWsCZ5RAqkD +Wya9m7XRldz+BuyVoIi3YHChRRs9mHsdSrcrAS2gqFG0QxuNWNYcyD074aPS +/XTXPm207Odw2K6yE7aX0JVHp7XxXOO7EtmZ7fAsv8dnTkQHp4uJRR5XFWHE +UvZAOEEH9fY5x9iHKALTcoDLXwkdjGROaIu0VgRD201WG7fo4LFMvH+AUxGa +mSlk8Z06WDQ3EBEVpwDtXnkcBlTG/1Pvlhqj5GFA/mh5+mEdpMXxfB5Ol4O/ +nbUlIn46GPQm4vLdUDmQOs1657q/DuqIBjDdcJID9/c3swqP62C8GxuJWVoO +Rs69jaVF6uAr5b9dL8tkYeKrlv1Img5+CXEwXurcAgsl639U63RQIFnvoXqw +DHx1MslPpuvg/LCe34iRDPRtSN0z9lgHL67PrP4nKgOPPSVyrj3XQb6llBM+ +T6QhjkCkrLXqoN2x+E3hPNLAn3Q0um1IB9MKDComaJKg7Pue6RALBVU/jX34 +TREHGRGpe083UJBYXjEzLSwO/E1etoRNFFw48CyF8IMA8zI/b7/houCKupkd +XyEB6ns5jTREGGzdeDqUnwB7TPDc+jYKlsh/DBj8JQreCmUc1/cy9s98scNr +SBgiX3kcVbShIMvQK84hujCkHxJ8U2lHwViO//ZfzBKGhqJTKW/2UbDSuFQ6 +2V4YhBX38K0dpCCHpcH40n9C0Kz4RdgznIKyxIbuI+2CsHP75i2KeRRUuC3M +nT3DD9jSFVt5m4JR8lnnNd/xg9ORxM/UQgoG7+W787eaH+JLZgr23aPgzIBS +Hf9pfhja3qCQXEXBR3w59qZ8/JC2w0Vp+jUFH/Bf6vGI4IW5nVdIlT8pyMnV +K5N0iAv62tFYaJ6Cg1+2vOChcMHzwFn7sEUKku3idvTwckFapVkwaYWCTl43 +J2TpnLCTwnS/nlUXZUI2BNXxc4KXWYBsk6gufnLieHHmDTv0+Jpy9+jpYuSW +5xzEADZ4zLEoQQRdPGK94byKGRsUlBXsuGagi08lngZ6KLDB8R9rJs4murj/ +fK+l5/BG4ImoPjtkrYuy1wpYx+02gkmi7J9xL100r+W7Wmq8AWiFfz8vJuni +tR8fZQxsWIBkFPbH/KIuGqrcuMuvyQI1n6e581N10aBgMzO3KAtUygyTzTN0 +kT4tpnFuiBnuZz9Pzb2hizvj5mci/ZkhP+Wcjmm5Lt5abu+Hy0yQHMZ3Obtb +F3mPuDlQF9eo7EJJxTPvdXGHxrvfP16uURMfMTUY9ukiz2wh//fMNWrC7NzX +6SFdfODjwtlAXKOeOdKjZ/CVEe+5311PIlepIW45k1NLusg+ruEwKfCX6rp7 +K+rK6KGrF8FbLWSJutbDztu0RQ+rePI7f5osUfMPzQ6ab9VDjSfH4pcll6hf +E+kRrtv1sNmA+vtz8x9qSKt1xSkNPUzY2fOZZcsf6gWraBmaiR6+lv/hqfBp +kVrv/H5VK0gPvx6tWeFPm6e6T9W3NQTroXbwXWsu/3kqU2R+9u4wPfxgrL2C +e+apJjf8tRxO6aHyXs8+N9Z5atdH5mOh8Xqos2HwkmX0L+o3L5XBR1l6yGQa +595wco4qGXCervJcD9fSr0f/0fhBTVs/TLzYqIdueVG7VP7NUlkyTB5NvNTD +pZaBk/TWWeq32o338lv1sGlOcOzNwVlqPVNCtmC3Hqa6Dpp2XZ2humbGRvz+ +ooc16dtyl7mnqdmPTxGfcunjwYJq4witKSq3lcsjCV59PCNwsWUfxxQ1dkR7 +VwS/PjLXu5icGZ6kHtm4JK8moo+HesuSbiRPUsnW4cIFMvq4byHxNtfYBLV3 +NGT+nLo+Pm+M6/Yt+EoV4Tz2aO8+fUwTquLabzNOLTQ6HfnTRR+LUn8+kd8x +TtU4nWZ0xU0fT/DJ2ZNYxqlWPx++7zuoj3xvWMiqNWPUxN7FZe9j+iiS5pNw +VGaMulQQYxh5Vh8DSYMVuWufqQO6V7qLy/Sx6mQR77MPn6hHThTeNCvXR6a/ +sYHncz5Rf5fXHJp+qI83Jf/5Ne3/RBWU6/ujXquPK1JLnFc+D1Mt2KWlnjzX +x8/tSTJRvz5SG3qKfbrf6+O5AOu/TduHqOa8tF3hffro1KM85Tc3SO0zbf1N +GNTHcsU6z4j6QepC/fckjxF95Kz6Jti8d5C667bag6lv+pjxaPytzKkBasOA +QXjKjD4e45q1mtk9QDUXtgfVn/oY+oWpUVpggHr4/Il3YYv6KC+p8PZ2aT91 +4XnidbElfbRQDhVYiOinxq1kedevMO7fjNlFxv1Ufq17yu5r+vjD7Xh9jVA/ +NTegfnF9XR+5c1ffbh3to/4PwRvVDg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.09819483610162089}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -2500,19 +7014,19 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.09819483610162089}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2526,330 +7040,184 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwVlnk41N8Xxy0l+76MtQgtZJ8ZBnMOQpbshJBQkpAlCkVIFJIUWpCQKMo6 +I22UkK+EZEtCoVBCIfKb31+f5/V87nPvue97zvscWa8gu0MsTExM7cxMTP// +/h5ufSl/sZD6tb+Htk6xpfbkEk4Z9MVB7pEN4VE3VQFF3noR+jJgyqG/UPUm +QLhN6QfWvgKwtQq7PnfDGgRmxTKWP1TCsqIpX8iNA/CpwSpo4UMjXKvjMniY +EwQm8t8+zn3oAkmeF7ItGTGw/IF89eeHUTAKPfjUOOISNBndLXxXMA8lvt9m +GxTyQeoT/auX8hpM2k+JTxy7C8LHDpRuMmLFwfjIlPBfD2DnpjvNNvtYkajI +c1qFpxyw4Otojj8rNp14ytK3rRyO9QVIKmey4rXlqfx1t3J4uTs6xeYLKx58 +8vVXXnM5hEnnBOac34DrMW99JbMqoLujS0OpfSO272v95nLtIWSomzy2cmTH +QI1vtnLClaA66GKqf4QdB0yu722WqYT2hIBupSh2FCuhLXjtqAS2vszv7LfZ +UWhtq3YitRKizoxJNk2z4xk1Vp2wI5Xg8yY2mpzAgeFl2e7f6yuBdOix/pYq +TpTJus2j7loF3bxvW3mbOVFCxTpq3LsKjtNGHdf6OLEDOIjpAVVQysUZOPCP +E2UnN8V1xlbB5krn3ExzLvwQx6ezUFwF7OuL/9hHuZD4e3301VwV9GerPZ/j +58Emx8jjZ89Ww/XuMr5wBR7sWpWSW7hQDa682w6s6PCgcfDBIPfMahiKl/7H +4s2D4VnXuoTuVsNIIKeecA0P7hmtOMHXXg2Tu8frSC68+OXOhAgK18DSz6yK +qNt8WHw4MTDiVg3QlYTW12v48Gep/DZ6UQ1EHk6zSmjjwysiu8hzD2pgdTBh +JmWeD/fZdjntfloDsWM0kbdy/Ji27OgbPlwDCR1F9iNh/Ij9rVHs0rVwsTDm +LYu4ANrfD3AdzKgFcy0/QZGtApitcOncy5xaYH9p57htlwBKj0voFubXQsKY +wqCFgQA6q5wyNC2vhWi59q+ZfgL4N2qhXLK1FgLzCf8U6wXwoZrhqbXVWrC9 ++UjZYr8gak6bL912rwN+5RtB7ocEUbQwPXK/dx10PE6oDAoSxF+/Xkdx+dWB ++eA+7cx4QVxwNf1rFVYHhhL/jD6WCWJMWeqc94U60Mo23x+0Kog3UiYnXlXX +gVjmWPKVW0Iozh129xgLDQhKNQlLxUL453lLRwkbDSQaE2PcHwph6nGmJ0Oc +NJD5uePEtiYh3GPx+qeSEA0ULI97Pp5krBePaPXdSgPNDWukMU1hrG22n3Y0 +pIHWjQ71PfrCaKxQOshrQgOSRr7yAxNhtCffy31mRgOKp5FchIswnvIPusNu +SwODhmQerhhh9CPWNGkfoIF1mOi4RpswhoQ4mwtG0sCGa3I4q1sYC5oifuw5 +TQO7Anr/6pAwvggKOxURSwOnTre3zT+EUXX+GzYk0sBd+U69q4gIGmxjejGe +QQP/cdXLcZ4iuKFn/4PKezQ4FsWcMuEngo5Ff3WP3KdBoGB3omWoCH78uvxS +pIIGIRgeLZoogiqzG9qdq2lw6maDb2mZCB5dHO0785QG5x3MqF2/RZAYU2ht ++Y6hV3WHBAuzKOpamOc/6qZBuZDDH3UuUSwQScnn6aVBb5fHw8ubRdG3soV2 +b4AG8rZhcrZ7RDFh8eb5kDEa0B4u/4u1E0Wd/pDM1C80sOSPGXzoJooCO/W9 +8yZoEPo2OZM/WBSt4wxt7n6nQePePLbOHFEUKd59f8884/4P5MfW74jiqcJ2 +bolFGnzjLn2mWi6KzusrhqO/aSDQXn3yUqMotqcnUfat0MDTvO2b1XdRVPmi +l9fNRIeFe9avzyyKIp4vWdzPQofzHO/vlK+LYv+rJ6RBVjqUt3xy4xUWw1tc +rfFP2eiwZrLY8Z+eGLqYNVwjcNMhvTiybM1EDGmmpZeceeggz8aUtMtWDJPZ +0pIv8dLB8hWnQeohMUy41XBxlJ8OI/Lp0k+CxPBjT2/OPwE6hCaIrEyfEkNS +3LlqASE6XDfaUmWZJoYvDp2QlBahg8qdokvR2WJoFv4gQESUDo0sSsfuF4jh +jRLfvg1idJh6QVTgrhPDP2/OsbYS6BAt+5hZ74UY9sZvarslTgf+szjs/0YM +9UZNavwk6KCNFllvPonh23+BbBOSdGjP6wz9OyWGO0duhGRL0cFz3dFGaUEM +FYt4+Q2kGfp4DCrv/yeGr8iLn0cYfP6pJ8dFdgK2keK+R8jQQULm65d6QQJy +zE2rsm1m6HXav/GbFAFnPIMrLzK4Vy88ylydgDLJHWeit9Dh6M2/+yJ1Cah2 +mPR2gsFrf2O1So0JqKHTe9RclqHnfjaBAWsC5vIzOxYyWP7xxRkOVwLmXeC9 +vMhgmoRAm44PAfd2uspR5Rj6Rl4r9gskINNlE+4zDB7pl4zPOUnA/DWSXQ2D +Q3VuH2iNI+Bi09U/Yww2z+ddsEgh4H9+xCebttJBblN0UsdVAh7O6GCVZ/By +wJSUbR4Bra9qdGgzuLPH6VF3CWO9PGmzCYNLdF8aO1US8Jj5o2ULBscUqA/0 +PSZgiXeMpzmDnTjyAve/ImCQTIyTAYNVjnOzDncQsPtExrAagzd+OJXl2UfA +rPLcvwQGD+lPKI19JmCHfcrDZUZ81YUOzw99J+ARTVOmbgZf5Gp0mFwgYL3r +05lCBnuFqE4d/UdAqtB4VBCDKf03T89sEscPww8eaDBYADkFjwuIY02YcOIs +Q6/J4ojiXxLimPdEiP0Og5/xfKGckBfHjM5Skg2Dr4XZvf2zSxxDfgwK/2a8 +R+DgM+9Isjhax98vymSwseGupVUUR3lxhWklBkvdu54SYy6Ouz1svz9mvO8C +H7ssi4M49kph8W4GF3wcNdvkK44PSiv2IyM/Tu22GU4+Lo5mMe5uVYz8sSl7 +EsIdKY7877YpbGbw+snsGwKp4liZkir5mZGPbsJWM5JV4ij0+O48LyN/NaMe +n81tEMcrviqpexj5zTm6XVS2mRFvvyh7FCP/6RWsoNgvjv+YJ8vbGPUiakFP +V1sXx7t9OyVFBOkw80hRoYpdAvfGmEuIMurtJSGTThSUQIeVdmF+Rj2Gfg0c +pShIYMl2dY4fjPrtPCuvZWwhgcGsGZYuHHS4O3m55bWDBF7i7YyXY6fDGet1 +N3MPCfyWr/hunOEHu6QHzlkHM/Y3uf/YYQMdLtAufXDJksCzKtmqo/9osPvH +SmTgmAQ+607Nqv3F8NM9mTtfTEug43HKZsk5hl/e3jUg9FsCme4pkE/9YPQj +B08dOrsk3r4uriA3TYNp2qs/rCqSmK1YsG8bwx+vxKWH5ZyURLfQPj4Whr+2 +DO6Qnz4riVnVZ9WZe2iwqtXUTb0oiVWhc+IrDH8+PLGoMX5LEhtSBfb2/8fo +P5b751SaJDHJxyh37ysajIooBr7kkUKnnwksAlU0EAt6Ji0mJoXbeTJI5Q8Z +ftzi/J/fFinklGU9alxOg9rIi8p8mlJo4Rn98SCjn1z49PObi7MUKkjJutnn +0UDj3mPfHwVSKHPn7aTkBRqc1bM9KKEtjTuad25230+DPR65v8iG0shBKwlf +20cD3tjv8Y6W0hg9CGZZDjS42XSuON1TGt24tELr9jL6g3n9d7ZkaXQeWfEq +BRr8dN4aPt8vjQfvnf7nIUcDjxOLF9qjZHCHNmFCYawOFLIMpb6dk8HO8hHN +9eE6hn6XHmxKl8HlrUw3ugbqIHJ1R6dhoQzKzFxt9+2qg6vxHiL0dhn0f1Bk +YfmiDtovv84rkt6McZ+61Vly64BSnlN95tlmdB0tyDO2r4PdHzrWZls240Td +stczqzqwYtpgeqBrM8pZS17RMq8Db7vAfviyGacNKswFDOrAJEo2JnbjFowx +/S81U6UOjm/+fcdAaQuO1qpJNrPXwUvfvJmm8C347itRfp5eC8eW5mJbeGRx +TOyInw9/LSwr8Q/vcpTDXG2dA9TQatAru59/7dpWZBNs3Tb6qBLmBM09nRrl +sTnyO8+9pYcwnuLpFLJJETfFE6U2K5SD2Y8Isy+kbagcubLxd1EpTHuzh1bH +bMeO0+o+L5nvMuZ/MZbzjTuw1mhyqOHuHRD8TzHt4Y+dqNFx4oB/M2PeT6qw +IZGUMTxW6BHz5A3IVtLhF/LdhQuee6fvUrKgTcKAOH9ZBZOv1Bj7aF4BilRj +umqvKs5YlIpZDKfB6Fb54akBVTRdPcQX8TINkpUSlQo/qWLhlZ6TVaVp0Ecx +byZMqeIDmx2p7hFpEOHS9Zd5VRW94kE9XCANXC2CNb/xq6Efv9uGmj2pcC2J +YQckNVyN1f6wu+ki8LIWhB2MU8PI6+e+x0wkAdvyM/u5BDW0tf2u3fY2Cf7N +ftQ4e14Nq72XQJGWBD8GxOfyU9QwSIHsLpScBJ2VlwNGrqnhh/FqlhdKSZDh +dfbwgTI15OSf8PQOOw+ijZ7O7j1qOG6RN5MmmAgyZzfruSiqo+HukltvYuOh +PJRd7uN2dbzfXllQEBAP1MNzmw4qqeOI+YmBJNd4cLdo6j6ipo4UV7+mOK14 +uCni63+Soo7sPjV3lKbiQLy0/HqWlTrGyHB9MneMA+Fu/eX34eq4q/WbYLL2 +WeBQcKu1e62Oie9uhNy2OwNHxcG8rFUdF2vN9M4Tz0Abj9wwa7s62s5/FU0g +nIGU3xMbazrVcSbOvr1x+DTwtoQ6ig2oY+VY13u7Y6dB0P/iwuC0OpZcuOtQ +eTEapB7VaxwS1GDM4+/qRQcjQUVfvCLCXQPPbo3cWkePgKqtfn9ZPDWQX6+b +/C8vArQ56aZpXhqo9lD1qVtiBBh+cB4p9NXAVjOX0QP2EeAUnC3QFayBp3cu +d0XPhkNMkViYcqIGvhASq2HdEQ6dPKI6n8s1sD+ZVbe/PAxChgWbzJk08fWL +jGyrlWBoaXZ7Usqiid4KSfN2E8EgU1Fcx7lRE3kuDQUd6QmGthjK/TYOTfxu +TbrVXB4McrJeV82FNPFw6NUYK59geOf9yNdcURNFa9zF4rqOg9qUNbe5pSb2 +nlMUtwoPgh/zKY5m2Zp47uulwu4T/jDUd9vp1nVNnDodz2vt7A9tT2r3zd3U +xIH1gl9fKP5QeH7EJee2Jp4Qxr5DTP7gKqnlMVWqiY9edo2WpRyFV4aDh5Of +aGJHi/RBKPWDG5d3nGwd1cTajzzqy0u+kBROPSX9RRNz1vO0nwz7Qvh++8jg +CU0susBteP2lL9gonI4Wn9ZE2/0vefLSfYGN3hnrt6iJVjP9we92+ELwSEQy +B7sW9r5Y6m7xPAymqs3XzXZpYeSB79IxIz7gzLbHoVNVC7OVHP2NX/vA0Y+t +PPs0tJDGv9FfsdwH0i7+F+tD1kKtSzsUtKN9oHei53CMgRYW666yZIv7gE/+ +mEaNoxbWd0jEE128IU6A+c2WM1r4KsBe0+L7QcicjEu4G6uFs4WJ2/XeH4Ti +ZxuoKvFaeEXZi9342UFoC2B/pJukhbtUkzVyrxwEgTa+LKcMLfwvvnrIX/8g +5MfJeKcUM84X3yfsddUTns7r/v3ToYVL8ed07e57wO32Oi/7d1qY8FPxd1CS +ByQUabaVd2th3/SngUofDzDbp5RzqE8LbRTJBXelPaCnXoLc/VkLH6ttLjW7 +7A7fzi6HlC9oYa7mmWn7GDcQ5a/75iNBRJufAw/unnCF5UkNu+dSRKyL4/6x +y8kVhl6U0yU3E/Fp9N3o9yRXuB1anNS1lYgtxNNsSUsuoPzhqiLuImLn8PXr +EaddwDA3zEsSiXifO1LTN9UZApU1Bt4dIuLll1mpz146wYk/EisHjhDRtiKM +MlnsBNGNrBKzR4mYTVTv1Ux2govO7104jxOxw9rHWtPKCUoSTvYbRhIxbFUq +7m2/I4wOPe2rSiOiTtAE+4E/DuCUavHhah0RIyQWPv40twd3Z60/W+uJmGL1 +cSNJ3R58tkqLVTYQsfmE++8cMXsIpc86dbwgYnXIn8on43aQ/uVyL1s7EWfk +epSDY+2gTb/vfcQIQw9qEFvAE1vQn/XpceEgIXN4e/C4pQ2IPjYtaOAiYQiX +api+tg3Mnt95fDMvCed8ddjLt9pAruxPri+CJMzZ3MFftmgN/xyijI5LkXCi +cO1VuIM1PHt8uTJRlYTTSqwitySswCD5aXqVIwlfL9+XnHltARJOtz1EnUl4 +PFpYQ7nQAn7JJSifciWhJ7fV58xYCyhoMGuhHiDhFqO1g6M6FsDys2e99QgJ +pebkXP3KzaHJ6XvgSBQJZ/vWWVjzzMBYnrCXp4CEnTszls1vmUL1zCtZn0IS +plV4lLPHmIJ8Xejv+mLG+cThtClPU9hg/jbvSBkJ5fiWjIQVTKExKPFXUzUJ +ybeFb3JUmAD18UJW5GsSjoYOWzu2GgPJ7t3oxDQJFa2PCpwV3Q3FkjF11B8k +LA8KlDm4agQiX5RTrs6R8OaLPaKeo0awEJFENPpNwnvDLcb15UZQeQuSctdJ +mOi5LD+0xwhUpx7schQkI7Pla+P6OEPYHnvhZCOZjL7Mv++wcxtAg27RRksK +GT2OGyjdmUew+fMs470eGXk/fE93H0Q4Gbh4f9KAjDJy8j7qZQgtbp6feS3J +yPPCXMnWEuGIDsl8vycZH3hQgu9sB7j367PkQhIZDeXH45rC9IBavlpy+iIZ +O6Uy7x220IMuPzHSpjQyprf1D6GcHqyMWNpIXCHjgakSn5xOXTB/W5eAt8io +EiU42a2qC9/KUmdSHpFxLuc0G3lJB3Ye0nmmMEDGd2w+XRsqyHBJzmolfoiM +wsH7fL3TyLDwyYs4OkxG9qP3d38PIMNT15Sy3DEyitwakA7fRQY7m09ZYjOM ++PY+1AktJ8Ep3XPHOZi00TlXXH6sjggtAu9kZxS08eLEUUnvCU3Y9faLm8V2 +bbzS5Xf1yhtNyEhZybq3Uxv3L/98P1GhCW6b5HkPq2rjGQza+PekJvxYDV8Z +1tbGe8TVgtfcmiA6KdXdaaGNkT5x8b0UDTj09EhCdbA2aqnMOtEq1GA24FuE +cZg2Esj3yySvqcFJ6WP+veHaWH3ayOxOtBpciA6yW4rSRoWXL4tkzNXgISV8 +i16iNrJM73ty9j9VWK2Nb2i6ro0CqZ8yxfaqQEZF7kJXkzZOdgWsCZ5RAqkD +Wya9m7XRldz+BuyVoIi3YHChRRs9mHsdSrcrAS2gqFG0QxuNWNYcyD074aPS +/XTXPm207Odw2K6yE7aX0JVHp7XxXOO7EtmZ7fAsv8dnTkQHp4uJRR5XFWHE +UvZAOEEH9fY5x9iHKALTcoDLXwkdjGROaIu0VgRD201WG7fo4LFMvH+AUxGa +mSlk8Z06WDQ3EBEVpwDtXnkcBlTG/1Pvlhqj5GFA/mh5+mEdpMXxfB5Ol4O/ +nbUlIn46GPQm4vLdUDmQOs1657q/DuqIBjDdcJID9/c3swqP62C8GxuJWVoO +Rs69jaVF6uAr5b9dL8tkYeKrlv1Img5+CXEwXurcAgsl639U63RQIFnvoXqw +DHx1MslPpuvg/LCe34iRDPRtSN0z9lgHL67PrP4nKgOPPSVyrj3XQb6llBM+ +T6QhjkCkrLXqoN2x+E3hPNLAn3Q0um1IB9MKDComaJKg7Pue6RALBVU/jX34 +TREHGRGpe083UJBYXjEzLSwO/E1etoRNFFw48CyF8IMA8zI/b7/houCKupkd +XyEB6ns5jTREGGzdeDqUnwB7TPDc+jYKlsh/DBj8JQreCmUc1/cy9s98scNr +SBgiX3kcVbShIMvQK84hujCkHxJ8U2lHwViO//ZfzBKGhqJTKW/2UbDSuFQ6 +2V4YhBX38K0dpCCHpcH40n9C0Kz4RdgznIKyxIbuI+2CsHP75i2KeRRUuC3M +nT3DD9jSFVt5m4JR8lnnNd/xg9ORxM/UQgoG7+W787eaH+JLZgr23aPgzIBS +Hf9pfhja3qCQXEXBR3w59qZ8/JC2w0Vp+jUFH/Bf6vGI4IW5nVdIlT8pyMnV +K5N0iAv62tFYaJ6Cg1+2vOChcMHzwFn7sEUKku3idvTwckFapVkwaYWCTl43 +J2TpnLCTwnS/nlUXZUI2BNXxc4KXWYBsk6gufnLieHHmDTv0+Jpy9+jpYuSW +5xzEADZ4zLEoQQRdPGK94byKGRsUlBXsuGagi08lngZ6KLDB8R9rJs4murj/ +fK+l5/BG4ImoPjtkrYuy1wpYx+02gkmi7J9xL100r+W7Wmq8AWiFfz8vJuni +tR8fZQxsWIBkFPbH/KIuGqrcuMuvyQI1n6e581N10aBgMzO3KAtUygyTzTN0 +kT4tpnFuiBnuZz9Pzb2hizvj5mci/ZkhP+Wcjmm5Lt5abu+Hy0yQHMZ3Obtb +F3mPuDlQF9eo7EJJxTPvdXGHxrvfP16uURMfMTUY9ukiz2wh//fMNWrC7NzX +6SFdfODjwtlAXKOeOdKjZ/CVEe+5311PIlepIW45k1NLusg+ruEwKfCX6rp7 +K+rK6KGrF8FbLWSJutbDztu0RQ+rePI7f5osUfMPzQ6ab9VDjSfH4pcll6hf +E+kRrtv1sNmA+vtz8x9qSKt1xSkNPUzY2fOZZcsf6gWraBmaiR6+lv/hqfBp +kVrv/H5VK0gPvx6tWeFPm6e6T9W3NQTroXbwXWsu/3kqU2R+9u4wPfxgrL2C +e+apJjf8tRxO6aHyXs8+N9Z5atdH5mOh8Xqos2HwkmX0L+o3L5XBR1l6yGQa +595wco4qGXCervJcD9fSr0f/0fhBTVs/TLzYqIdueVG7VP7NUlkyTB5NvNTD +pZaBk/TWWeq32o338lv1sGlOcOzNwVlqPVNCtmC3Hqa6Dpp2XZ2humbGRvz+ +ooc16dtyl7mnqdmPTxGfcunjwYJq4witKSq3lcsjCV59PCNwsWUfxxQ1dkR7 +VwS/PjLXu5icGZ6kHtm4JK8moo+HesuSbiRPUsnW4cIFMvq4byHxNtfYBLV3 +NGT+nLo+Pm+M6/Yt+EoV4Tz2aO8+fUwTquLabzNOLTQ6HfnTRR+LUn8+kd8x +TtU4nWZ0xU0fT/DJ2ZNYxqlWPx++7zuoj3xvWMiqNWPUxN7FZe9j+iiS5pNw +VGaMulQQYxh5Vh8DSYMVuWufqQO6V7qLy/Sx6mQR77MPn6hHThTeNCvXR6a/ +sYHncz5Rf5fXHJp+qI83Jf/5Ne3/RBWU6/ujXquPK1JLnFc+D1Mt2KWlnjzX +x8/tSTJRvz5SG3qKfbrf6+O5AOu/TduHqOa8tF3hffro1KM85Tc3SO0zbf1N +GNTHcsU6z4j6QepC/fckjxF95Kz6Jti8d5C667bag6lv+pjxaPytzKkBasOA +QXjKjD4e45q1mtk9QDUXtgfVn/oY+oWpUVpggHr4/Il3YYv6KC+p8PZ2aT91 +4XnidbElfbRQDhVYiOinxq1kedevMO7fjNlFxv1Ufq17yu5r+vjD7Xh9jVA/ +NTegfnF9XR+5c1ffbh3to/4PwRvVDg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.09819483610162089}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2860,6 +7228,7 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -2887,7 +7256,8 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.17588335145564066`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09819483610162089}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -2895,25 +7265,1071 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991334471589432*^9}, - CellLabel-> - "Out[252]=",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] + CellChangeTimes->{3.991334471589432*^9, 3.993829486768922*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"2dc43393-f6c9-47a8-93f0-8117d6ab7fe7"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", - RowBox[{"{", "}"}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799458254999*^9, - 3.9917994623413925`*^9}},ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-\ -a8e133e7a081"], + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0.013749"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1", ",", "0.038234"}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", "0.060049"}], "}"}], ",", + RowBox[{"{", + RowBox[{"3", ",", "0.076638"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.085764"}], "}"}], ",", + RowBox[{"{", + RowBox[{"5", ",", "0.090382"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.089758"}], "}"}], ",", + RowBox[{"{", + RowBox[{"7", ",", "0.084925"}], "}"}], ",", + RowBox[{"{", + RowBox[{"8", ",", "0.077936"}], "}"}], ",", + RowBox[{"{", + RowBox[{"9", ",", "0.069316"}], "}"}], ",", + RowBox[{"{", + RowBox[{"10", ",", "0.060067"}], "}"}], ",", + RowBox[{"{", + RowBox[{"11", ",", "0.051031"}], "}"}], ",", + RowBox[{"{", + RowBox[{"12", ",", "0.042528"}], "}"}], ",", + RowBox[{"{", + RowBox[{"13", ",", "0.034867"}], "}"}], ",", + RowBox[{"{", + RowBox[{"14", ",", "0.02819"}], "}"}], ",", + RowBox[{"{", + RowBox[{"15", ",", "0.022495"}], "}"}], ",", + RowBox[{"{", + RowBox[{"16", ",", "0.01774"}], "}"}], ",", + RowBox[{"{", + RowBox[{"17", ",", "0.013843"}], "}"}], ",", + RowBox[{"{", + RowBox[{"18", ",", "0.010692"}], "}"}], ",", + RowBox[{"{", + RowBox[{"19", ",", "0.008182"}], "}"}], ",", + RowBox[{"{", + RowBox[{"20", ",", "0.006204"}], "}"}], ",", + RowBox[{"{", + RowBox[{"21", ",", "0.004665"}], "}"}], ",", + RowBox[{"{", + RowBox[{"22", ",", "0.003479"}], "}"}], ",", + RowBox[{"{", + RowBox[{"23", ",", "0.002574"}], "}"}], ",", + RowBox[{"{", + RowBox[{"24", ",", "0.00189"}], "}"}], ",", + RowBox[{"{", + RowBox[{"25", ",", "0.001377"}], "}"}], ",", + RowBox[{"{", + RowBox[{"26", ",", "0.000997"}], "}"}], ",", + RowBox[{"{", + RowBox[{"27", ",", "0.000717"}], "}"}], ",", + RowBox[{"{", + RowBox[{"28", ",", "0.000511"}], "}"}], ",", + RowBox[{"{", + RowBox[{"29", ",", "0.000363"}], "}"}], ",", + RowBox[{"{", + RowBox[{"30", ",", "0.000256"}], "}"}]}], "}"}], "]"}]}]], "Input", + CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, + 3.993827649144558*^9}, + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel->"In[96]:=",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.090382}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9938294868797407`*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"b49d315f-d28c-4630-908a-9682a132062d"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6d3700e1-f504-214a-a332-\ -f16397f0b922"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk41N8Xxy0l+76MtQgtZJ8ZBnMOQpbshJBQkpAlCkVIFJIUWpCQKMo6 +I22UkK+EZEtCoVBCIfKb31+f5/V87nPvue97zvscWa8gu0MsTExM7cxMTP// +/h5ufSl/sZD6tb+Htk6xpfbkEk4Z9MVB7pEN4VE3VQFF3noR+jJgyqG/UPUm +QLhN6QfWvgKwtQq7PnfDGgRmxTKWP1TCsqIpX8iNA/CpwSpo4UMjXKvjMniY +EwQm8t8+zn3oAkmeF7ItGTGw/IF89eeHUTAKPfjUOOISNBndLXxXMA8lvt9m +GxTyQeoT/auX8hpM2k+JTxy7C8LHDpRuMmLFwfjIlPBfD2DnpjvNNvtYkajI +c1qFpxyw4Otojj8rNp14ytK3rRyO9QVIKmey4rXlqfx1t3J4uTs6xeYLKx58 +8vVXXnM5hEnnBOac34DrMW99JbMqoLujS0OpfSO272v95nLtIWSomzy2cmTH +QI1vtnLClaA66GKqf4QdB0yu722WqYT2hIBupSh2FCuhLXjtqAS2vszv7LfZ +UWhtq3YitRKizoxJNk2z4xk1Vp2wI5Xg8yY2mpzAgeFl2e7f6yuBdOix/pYq +TpTJus2j7loF3bxvW3mbOVFCxTpq3LsKjtNGHdf6OLEDOIjpAVVQysUZOPCP +E2UnN8V1xlbB5krn3ExzLvwQx6ezUFwF7OuL/9hHuZD4e3301VwV9GerPZ/j +58Emx8jjZ89Ww/XuMr5wBR7sWpWSW7hQDa682w6s6PCgcfDBIPfMahiKl/7H +4s2D4VnXuoTuVsNIIKeecA0P7hmtOMHXXg2Tu8frSC68+OXOhAgK18DSz6yK +qNt8WHw4MTDiVg3QlYTW12v48Gep/DZ6UQ1EHk6zSmjjwysiu8hzD2pgdTBh +JmWeD/fZdjntfloDsWM0kbdy/Ji27OgbPlwDCR1F9iNh/Ij9rVHs0rVwsTDm +LYu4ANrfD3AdzKgFcy0/QZGtApitcOncy5xaYH9p57htlwBKj0voFubXQsKY +wqCFgQA6q5wyNC2vhWi59q+ZfgL4N2qhXLK1FgLzCf8U6wXwoZrhqbXVWrC9 ++UjZYr8gak6bL912rwN+5RtB7ocEUbQwPXK/dx10PE6oDAoSxF+/Xkdx+dWB ++eA+7cx4QVxwNf1rFVYHhhL/jD6WCWJMWeqc94U60Mo23x+0Kog3UiYnXlXX +gVjmWPKVW0Iozh129xgLDQhKNQlLxUL453lLRwkbDSQaE2PcHwph6nGmJ0Oc +NJD5uePEtiYh3GPx+qeSEA0ULI97Pp5krBePaPXdSgPNDWukMU1hrG22n3Y0 +pIHWjQ71PfrCaKxQOshrQgOSRr7yAxNhtCffy31mRgOKp5FchIswnvIPusNu +SwODhmQerhhh9CPWNGkfoIF1mOi4RpswhoQ4mwtG0sCGa3I4q1sYC5oifuw5 +TQO7Anr/6pAwvggKOxURSwOnTre3zT+EUXX+GzYk0sBd+U69q4gIGmxjejGe +QQP/cdXLcZ4iuKFn/4PKezQ4FsWcMuEngo5Ff3WP3KdBoGB3omWoCH78uvxS +pIIGIRgeLZoogiqzG9qdq2lw6maDb2mZCB5dHO0785QG5x3MqF2/RZAYU2ht ++Y6hV3WHBAuzKOpamOc/6qZBuZDDH3UuUSwQScnn6aVBb5fHw8ubRdG3soV2 +b4AG8rZhcrZ7RDFh8eb5kDEa0B4u/4u1E0Wd/pDM1C80sOSPGXzoJooCO/W9 +8yZoEPo2OZM/WBSt4wxt7n6nQePePLbOHFEUKd59f8884/4P5MfW74jiqcJ2 +bolFGnzjLn2mWi6KzusrhqO/aSDQXn3yUqMotqcnUfat0MDTvO2b1XdRVPmi +l9fNRIeFe9avzyyKIp4vWdzPQofzHO/vlK+LYv+rJ6RBVjqUt3xy4xUWw1tc +rfFP2eiwZrLY8Z+eGLqYNVwjcNMhvTiybM1EDGmmpZeceeggz8aUtMtWDJPZ +0pIv8dLB8hWnQeohMUy41XBxlJ8OI/Lp0k+CxPBjT2/OPwE6hCaIrEyfEkNS +3LlqASE6XDfaUmWZJoYvDp2QlBahg8qdokvR2WJoFv4gQESUDo0sSsfuF4jh +jRLfvg1idJh6QVTgrhPDP2/OsbYS6BAt+5hZ74UY9sZvarslTgf+szjs/0YM +9UZNavwk6KCNFllvPonh23+BbBOSdGjP6wz9OyWGO0duhGRL0cFz3dFGaUEM +FYt4+Q2kGfp4DCrv/yeGr8iLn0cYfP6pJ8dFdgK2keK+R8jQQULm65d6QQJy +zE2rsm1m6HXav/GbFAFnPIMrLzK4Vy88ylydgDLJHWeit9Dh6M2/+yJ1Cah2 +mPR2gsFrf2O1So0JqKHTe9RclqHnfjaBAWsC5vIzOxYyWP7xxRkOVwLmXeC9 +vMhgmoRAm44PAfd2uspR5Rj6Rl4r9gskINNlE+4zDB7pl4zPOUnA/DWSXQ2D +Q3VuH2iNI+Bi09U/Yww2z+ddsEgh4H9+xCebttJBblN0UsdVAh7O6GCVZ/By +wJSUbR4Bra9qdGgzuLPH6VF3CWO9PGmzCYNLdF8aO1US8Jj5o2ULBscUqA/0 +PSZgiXeMpzmDnTjyAve/ImCQTIyTAYNVjnOzDncQsPtExrAagzd+OJXl2UfA +rPLcvwQGD+lPKI19JmCHfcrDZUZ81YUOzw99J+ARTVOmbgZf5Gp0mFwgYL3r +05lCBnuFqE4d/UdAqtB4VBCDKf03T89sEscPww8eaDBYADkFjwuIY02YcOIs +Q6/J4ojiXxLimPdEiP0Og5/xfKGckBfHjM5Skg2Dr4XZvf2zSxxDfgwK/2a8 +R+DgM+9Isjhax98vymSwseGupVUUR3lxhWklBkvdu54SYy6Ouz1svz9mvO8C +H7ssi4M49kph8W4GF3wcNdvkK44PSiv2IyM/Tu22GU4+Lo5mMe5uVYz8sSl7 +EsIdKY7877YpbGbw+snsGwKp4liZkir5mZGPbsJWM5JV4ij0+O48LyN/NaMe +n81tEMcrviqpexj5zTm6XVS2mRFvvyh7FCP/6RWsoNgvjv+YJ8vbGPUiakFP +V1sXx7t9OyVFBOkw80hRoYpdAvfGmEuIMurtJSGTThSUQIeVdmF+Rj2Gfg0c +pShIYMl2dY4fjPrtPCuvZWwhgcGsGZYuHHS4O3m55bWDBF7i7YyXY6fDGet1 +N3MPCfyWr/hunOEHu6QHzlkHM/Y3uf/YYQMdLtAufXDJksCzKtmqo/9osPvH +SmTgmAQ+607Nqv3F8NM9mTtfTEug43HKZsk5hl/e3jUg9FsCme4pkE/9YPQj +B08dOrsk3r4uriA3TYNp2qs/rCqSmK1YsG8bwx+vxKWH5ZyURLfQPj4Whr+2 +DO6Qnz4riVnVZ9WZe2iwqtXUTb0oiVWhc+IrDH8+PLGoMX5LEhtSBfb2/8fo +P5b751SaJDHJxyh37ysajIooBr7kkUKnnwksAlU0EAt6Ji0mJoXbeTJI5Q8Z +ftzi/J/fFinklGU9alxOg9rIi8p8mlJo4Rn98SCjn1z49PObi7MUKkjJutnn +0UDj3mPfHwVSKHPn7aTkBRqc1bM9KKEtjTuad25230+DPR65v8iG0shBKwlf +20cD3tjv8Y6W0hg9CGZZDjS42XSuON1TGt24tELr9jL6g3n9d7ZkaXQeWfEq +BRr8dN4aPt8vjQfvnf7nIUcDjxOLF9qjZHCHNmFCYawOFLIMpb6dk8HO8hHN +9eE6hn6XHmxKl8HlrUw3ugbqIHJ1R6dhoQzKzFxt9+2qg6vxHiL0dhn0f1Bk +YfmiDtovv84rkt6McZ+61Vly64BSnlN95tlmdB0tyDO2r4PdHzrWZls240Td +stczqzqwYtpgeqBrM8pZS17RMq8Db7vAfviyGacNKswFDOrAJEo2JnbjFowx +/S81U6UOjm/+fcdAaQuO1qpJNrPXwUvfvJmm8C347itRfp5eC8eW5mJbeGRx +TOyInw9/LSwr8Q/vcpTDXG2dA9TQatAru59/7dpWZBNs3Tb6qBLmBM09nRrl +sTnyO8+9pYcwnuLpFLJJETfFE6U2K5SD2Y8Isy+kbagcubLxd1EpTHuzh1bH +bMeO0+o+L5nvMuZ/MZbzjTuw1mhyqOHuHRD8TzHt4Y+dqNFx4oB/M2PeT6qw +IZGUMTxW6BHz5A3IVtLhF/LdhQuee6fvUrKgTcKAOH9ZBZOv1Bj7aF4BilRj +umqvKs5YlIpZDKfB6Fb54akBVTRdPcQX8TINkpUSlQo/qWLhlZ6TVaVp0Ecx +byZMqeIDmx2p7hFpEOHS9Zd5VRW94kE9XCANXC2CNb/xq6Efv9uGmj2pcC2J +YQckNVyN1f6wu+ki8LIWhB2MU8PI6+e+x0wkAdvyM/u5BDW0tf2u3fY2Cf7N +ftQ4e14Nq72XQJGWBD8GxOfyU9QwSIHsLpScBJ2VlwNGrqnhh/FqlhdKSZDh +dfbwgTI15OSf8PQOOw+ijZ7O7j1qOG6RN5MmmAgyZzfruSiqo+HukltvYuOh +PJRd7uN2dbzfXllQEBAP1MNzmw4qqeOI+YmBJNd4cLdo6j6ipo4UV7+mOK14 +uCni63+Soo7sPjV3lKbiQLy0/HqWlTrGyHB9MneMA+Fu/eX34eq4q/WbYLL2 +WeBQcKu1e62Oie9uhNy2OwNHxcG8rFUdF2vN9M4Tz0Abj9wwa7s62s5/FU0g +nIGU3xMbazrVcSbOvr1x+DTwtoQ6ig2oY+VY13u7Y6dB0P/iwuC0OpZcuOtQ +eTEapB7VaxwS1GDM4+/qRQcjQUVfvCLCXQPPbo3cWkePgKqtfn9ZPDWQX6+b +/C8vArQ56aZpXhqo9lD1qVtiBBh+cB4p9NXAVjOX0QP2EeAUnC3QFayBp3cu +d0XPhkNMkViYcqIGvhASq2HdEQ6dPKI6n8s1sD+ZVbe/PAxChgWbzJk08fWL +jGyrlWBoaXZ7Usqiid4KSfN2E8EgU1Fcx7lRE3kuDQUd6QmGthjK/TYOTfxu +TbrVXB4McrJeV82FNPFw6NUYK59geOf9yNdcURNFa9zF4rqOg9qUNbe5pSb2 +nlMUtwoPgh/zKY5m2Zp47uulwu4T/jDUd9vp1nVNnDodz2vt7A9tT2r3zd3U +xIH1gl9fKP5QeH7EJee2Jp4Qxr5DTP7gKqnlMVWqiY9edo2WpRyFV4aDh5Of +aGJHi/RBKPWDG5d3nGwd1cTajzzqy0u+kBROPSX9RRNz1vO0nwz7Qvh++8jg +CU0susBteP2lL9gonI4Wn9ZE2/0vefLSfYGN3hnrt6iJVjP9we92+ELwSEQy +B7sW9r5Y6m7xPAymqs3XzXZpYeSB79IxIz7gzLbHoVNVC7OVHP2NX/vA0Y+t +PPs0tJDGv9FfsdwH0i7+F+tD1kKtSzsUtKN9oHei53CMgRYW666yZIv7gE/+ +mEaNoxbWd0jEE128IU6A+c2WM1r4KsBe0+L7QcicjEu4G6uFs4WJ2/XeH4Ti +ZxuoKvFaeEXZi9342UFoC2B/pJukhbtUkzVyrxwEgTa+LKcMLfwvvnrIX/8g +5MfJeKcUM84X3yfsddUTns7r/v3ToYVL8ed07e57wO32Oi/7d1qY8FPxd1CS +ByQUabaVd2th3/SngUofDzDbp5RzqE8LbRTJBXelPaCnXoLc/VkLH6ttLjW7 +7A7fzi6HlC9oYa7mmWn7GDcQ5a/75iNBRJufAw/unnCF5UkNu+dSRKyL4/6x +y8kVhl6U0yU3E/Fp9N3o9yRXuB1anNS1lYgtxNNsSUsuoPzhqiLuImLn8PXr +EaddwDA3zEsSiXifO1LTN9UZApU1Bt4dIuLll1mpz146wYk/EisHjhDRtiKM +MlnsBNGNrBKzR4mYTVTv1Ux2govO7104jxOxw9rHWtPKCUoSTvYbRhIxbFUq +7m2/I4wOPe2rSiOiTtAE+4E/DuCUavHhah0RIyQWPv40twd3Z60/W+uJmGL1 +cSNJ3R58tkqLVTYQsfmE++8cMXsIpc86dbwgYnXIn8on43aQ/uVyL1s7EWfk +epSDY+2gTb/vfcQIQw9qEFvAE1vQn/XpceEgIXN4e/C4pQ2IPjYtaOAiYQiX +api+tg3Mnt95fDMvCed8ddjLt9pAruxPri+CJMzZ3MFftmgN/xyijI5LkXCi +cO1VuIM1PHt8uTJRlYTTSqwitySswCD5aXqVIwlfL9+XnHltARJOtz1EnUl4 +PFpYQ7nQAn7JJSifciWhJ7fV58xYCyhoMGuhHiDhFqO1g6M6FsDys2e99QgJ +pebkXP3KzaHJ6XvgSBQJZ/vWWVjzzMBYnrCXp4CEnTszls1vmUL1zCtZn0IS +plV4lLPHmIJ8Xejv+mLG+cThtClPU9hg/jbvSBkJ5fiWjIQVTKExKPFXUzUJ +ybeFb3JUmAD18UJW5GsSjoYOWzu2GgPJ7t3oxDQJFa2PCpwV3Q3FkjF11B8k +LA8KlDm4agQiX5RTrs6R8OaLPaKeo0awEJFENPpNwnvDLcb15UZQeQuSctdJ +mOi5LD+0xwhUpx7schQkI7Pla+P6OEPYHnvhZCOZjL7Mv++wcxtAg27RRksK +GT2OGyjdmUew+fMs470eGXk/fE93H0Q4Gbh4f9KAjDJy8j7qZQgtbp6feS3J +yPPCXMnWEuGIDsl8vycZH3hQgu9sB7j367PkQhIZDeXH45rC9IBavlpy+iIZ +O6Uy7x220IMuPzHSpjQyprf1D6GcHqyMWNpIXCHjgakSn5xOXTB/W5eAt8io +EiU42a2qC9/KUmdSHpFxLuc0G3lJB3Ye0nmmMEDGd2w+XRsqyHBJzmolfoiM +wsH7fL3TyLDwyYs4OkxG9qP3d38PIMNT15Sy3DEyitwakA7fRQY7m09ZYjOM ++PY+1AktJ8Ep3XPHOZi00TlXXH6sjggtAu9kZxS08eLEUUnvCU3Y9faLm8V2 +bbzS5Xf1yhtNyEhZybq3Uxv3L/98P1GhCW6b5HkPq2rjGQza+PekJvxYDV8Z +1tbGe8TVgtfcmiA6KdXdaaGNkT5x8b0UDTj09EhCdbA2aqnMOtEq1GA24FuE +cZg2Esj3yySvqcFJ6WP+veHaWH3ayOxOtBpciA6yW4rSRoWXL4tkzNXgISV8 +i16iNrJM73ty9j9VWK2Nb2i6ro0CqZ8yxfaqQEZF7kJXkzZOdgWsCZ5RAqkD +Wya9m7XRldz+BuyVoIi3YHChRRs9mHsdSrcrAS2gqFG0QxuNWNYcyD074aPS +/XTXPm207Odw2K6yE7aX0JVHp7XxXOO7EtmZ7fAsv8dnTkQHp4uJRR5XFWHE +UvZAOEEH9fY5x9iHKALTcoDLXwkdjGROaIu0VgRD201WG7fo4LFMvH+AUxGa +mSlk8Z06WDQ3EBEVpwDtXnkcBlTG/1Pvlhqj5GFA/mh5+mEdpMXxfB5Ol4O/ +nbUlIn46GPQm4vLdUDmQOs1657q/DuqIBjDdcJID9/c3swqP62C8GxuJWVoO +Rs69jaVF6uAr5b9dL8tkYeKrlv1Img5+CXEwXurcAgsl639U63RQIFnvoXqw +DHx1MslPpuvg/LCe34iRDPRtSN0z9lgHL67PrP4nKgOPPSVyrj3XQb6llBM+ +T6QhjkCkrLXqoN2x+E3hPNLAn3Q0um1IB9MKDComaJKg7Pue6RALBVU/jX34 +TREHGRGpe083UJBYXjEzLSwO/E1etoRNFFw48CyF8IMA8zI/b7/houCKupkd +XyEB6ns5jTREGGzdeDqUnwB7TPDc+jYKlsh/DBj8JQreCmUc1/cy9s98scNr +SBgiX3kcVbShIMvQK84hujCkHxJ8U2lHwViO//ZfzBKGhqJTKW/2UbDSuFQ6 +2V4YhBX38K0dpCCHpcH40n9C0Kz4RdgznIKyxIbuI+2CsHP75i2KeRRUuC3M +nT3DD9jSFVt5m4JR8lnnNd/xg9ORxM/UQgoG7+W787eaH+JLZgr23aPgzIBS +Hf9pfhja3qCQXEXBR3w59qZ8/JC2w0Vp+jUFH/Bf6vGI4IW5nVdIlT8pyMnV +K5N0iAv62tFYaJ6Cg1+2vOChcMHzwFn7sEUKku3idvTwckFapVkwaYWCTl43 +J2TpnLCTwnS/nlUXZUI2BNXxc4KXWYBsk6gufnLieHHmDTv0+Jpy9+jpYuSW +5xzEADZ4zLEoQQRdPGK94byKGRsUlBXsuGagi08lngZ6KLDB8R9rJs4murj/ +fK+l5/BG4ImoPjtkrYuy1wpYx+02gkmi7J9xL100r+W7Wmq8AWiFfz8vJuni +tR8fZQxsWIBkFPbH/KIuGqrcuMuvyQI1n6e581N10aBgMzO3KAtUygyTzTN0 +kT4tpnFuiBnuZz9Pzb2hizvj5mci/ZkhP+Wcjmm5Lt5abu+Hy0yQHMZ3Obtb +F3mPuDlQF9eo7EJJxTPvdXGHxrvfP16uURMfMTUY9ukiz2wh//fMNWrC7NzX +6SFdfODjwtlAXKOeOdKjZ/CVEe+5311PIlepIW45k1NLusg+ruEwKfCX6rp7 +K+rK6KGrF8FbLWSJutbDztu0RQ+rePI7f5osUfMPzQ6ab9VDjSfH4pcll6hf +E+kRrtv1sNmA+vtz8x9qSKt1xSkNPUzY2fOZZcsf6gWraBmaiR6+lv/hqfBp +kVrv/H5VK0gPvx6tWeFPm6e6T9W3NQTroXbwXWsu/3kqU2R+9u4wPfxgrL2C +e+apJjf8tRxO6aHyXs8+N9Z5atdH5mOh8Xqos2HwkmX0L+o3L5XBR1l6yGQa +595wco4qGXCervJcD9fSr0f/0fhBTVs/TLzYqIdueVG7VP7NUlkyTB5NvNTD +pZaBk/TWWeq32o338lv1sGlOcOzNwVlqPVNCtmC3Hqa6Dpp2XZ2humbGRvz+ +ooc16dtyl7mnqdmPTxGfcunjwYJq4witKSq3lcsjCV59PCNwsWUfxxQ1dkR7 +VwS/PjLXu5icGZ6kHtm4JK8moo+HesuSbiRPUsnW4cIFMvq4byHxNtfYBLV3 +NGT+nLo+Pm+M6/Yt+EoV4Tz2aO8+fUwTquLabzNOLTQ6HfnTRR+LUn8+kd8x +TtU4nWZ0xU0fT/DJ2ZNYxqlWPx++7zuoj3xvWMiqNWPUxN7FZe9j+iiS5pNw +VGaMulQQYxh5Vh8DSYMVuWufqQO6V7qLy/Sx6mQR77MPn6hHThTeNCvXR6a/ +sYHncz5Rf5fXHJp+qI83Jf/5Ne3/RBWU6/ujXquPK1JLnFc+D1Mt2KWlnjzX +x8/tSTJRvz5SG3qKfbrf6+O5AOu/TduHqOa8tF3hffro1KM85Tc3SO0zbf1N +GNTHcsU6z4j6QepC/fckjxF95Kz6Jti8d5C667bag6lv+pjxaPytzKkBasOA +QXjKjD4e45q1mtk9QDUXtgfVn/oY+oWpUVpggHr4/Il3YYv6KC+p8PZ2aT91 +4XnidbElfbRQDhVYiOinxq1kedevMO7fjNlFxv1Ufq17yu5r+vjD7Xh9jVA/ +NTegfnF9XR+5c1ffbh3to/4PwRvVDg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk41N8Xxy0l+76MtQgtZJ8ZBnMOQpbshJBQkpAlCkVIFJIUWpCQKMo6 +I22UkK+EZEtCoVBCIfKb31+f5/V87nPvue97zvscWa8gu0MsTExM7cxMTP// +/h5ufSl/sZD6tb+Htk6xpfbkEk4Z9MVB7pEN4VE3VQFF3noR+jJgyqG/UPUm +QLhN6QfWvgKwtQq7PnfDGgRmxTKWP1TCsqIpX8iNA/CpwSpo4UMjXKvjMniY +EwQm8t8+zn3oAkmeF7ItGTGw/IF89eeHUTAKPfjUOOISNBndLXxXMA8lvt9m +GxTyQeoT/auX8hpM2k+JTxy7C8LHDpRuMmLFwfjIlPBfD2DnpjvNNvtYkajI +c1qFpxyw4Otojj8rNp14ytK3rRyO9QVIKmey4rXlqfx1t3J4uTs6xeYLKx58 +8vVXXnM5hEnnBOac34DrMW99JbMqoLujS0OpfSO272v95nLtIWSomzy2cmTH +QI1vtnLClaA66GKqf4QdB0yu722WqYT2hIBupSh2FCuhLXjtqAS2vszv7LfZ +UWhtq3YitRKizoxJNk2z4xk1Vp2wI5Xg8yY2mpzAgeFl2e7f6yuBdOix/pYq +TpTJus2j7loF3bxvW3mbOVFCxTpq3LsKjtNGHdf6OLEDOIjpAVVQysUZOPCP +E2UnN8V1xlbB5krn3ExzLvwQx6ezUFwF7OuL/9hHuZD4e3301VwV9GerPZ/j +58Emx8jjZ89Ww/XuMr5wBR7sWpWSW7hQDa682w6s6PCgcfDBIPfMahiKl/7H +4s2D4VnXuoTuVsNIIKeecA0P7hmtOMHXXg2Tu8frSC68+OXOhAgK18DSz6yK +qNt8WHw4MTDiVg3QlYTW12v48Gep/DZ6UQ1EHk6zSmjjwysiu8hzD2pgdTBh +JmWeD/fZdjntfloDsWM0kbdy/Ji27OgbPlwDCR1F9iNh/Ij9rVHs0rVwsTDm +LYu4ANrfD3AdzKgFcy0/QZGtApitcOncy5xaYH9p57htlwBKj0voFubXQsKY +wqCFgQA6q5wyNC2vhWi59q+ZfgL4N2qhXLK1FgLzCf8U6wXwoZrhqbXVWrC9 ++UjZYr8gak6bL912rwN+5RtB7ocEUbQwPXK/dx10PE6oDAoSxF+/Xkdx+dWB ++eA+7cx4QVxwNf1rFVYHhhL/jD6WCWJMWeqc94U60Mo23x+0Kog3UiYnXlXX +gVjmWPKVW0Iozh129xgLDQhKNQlLxUL453lLRwkbDSQaE2PcHwph6nGmJ0Oc +NJD5uePEtiYh3GPx+qeSEA0ULI97Pp5krBePaPXdSgPNDWukMU1hrG22n3Y0 +pIHWjQ71PfrCaKxQOshrQgOSRr7yAxNhtCffy31mRgOKp5FchIswnvIPusNu +SwODhmQerhhh9CPWNGkfoIF1mOi4RpswhoQ4mwtG0sCGa3I4q1sYC5oifuw5 +TQO7Anr/6pAwvggKOxURSwOnTre3zT+EUXX+GzYk0sBd+U69q4gIGmxjejGe +QQP/cdXLcZ4iuKFn/4PKezQ4FsWcMuEngo5Ff3WP3KdBoGB3omWoCH78uvxS +pIIGIRgeLZoogiqzG9qdq2lw6maDb2mZCB5dHO0785QG5x3MqF2/RZAYU2ht ++Y6hV3WHBAuzKOpamOc/6qZBuZDDH3UuUSwQScnn6aVBb5fHw8ubRdG3soV2 +b4AG8rZhcrZ7RDFh8eb5kDEa0B4u/4u1E0Wd/pDM1C80sOSPGXzoJooCO/W9 +8yZoEPo2OZM/WBSt4wxt7n6nQePePLbOHFEUKd59f8884/4P5MfW74jiqcJ2 +bolFGnzjLn2mWi6KzusrhqO/aSDQXn3yUqMotqcnUfat0MDTvO2b1XdRVPmi +l9fNRIeFe9avzyyKIp4vWdzPQofzHO/vlK+LYv+rJ6RBVjqUt3xy4xUWw1tc +rfFP2eiwZrLY8Z+eGLqYNVwjcNMhvTiybM1EDGmmpZeceeggz8aUtMtWDJPZ +0pIv8dLB8hWnQeohMUy41XBxlJ8OI/Lp0k+CxPBjT2/OPwE6hCaIrEyfEkNS +3LlqASE6XDfaUmWZJoYvDp2QlBahg8qdokvR2WJoFv4gQESUDo0sSsfuF4jh +jRLfvg1idJh6QVTgrhPDP2/OsbYS6BAt+5hZ74UY9sZvarslTgf+szjs/0YM +9UZNavwk6KCNFllvPonh23+BbBOSdGjP6wz9OyWGO0duhGRL0cFz3dFGaUEM +FYt4+Q2kGfp4DCrv/yeGr8iLn0cYfP6pJ8dFdgK2keK+R8jQQULm65d6QQJy +zE2rsm1m6HXav/GbFAFnPIMrLzK4Vy88ylydgDLJHWeit9Dh6M2/+yJ1Cah2 +mPR2gsFrf2O1So0JqKHTe9RclqHnfjaBAWsC5vIzOxYyWP7xxRkOVwLmXeC9 +vMhgmoRAm44PAfd2uspR5Rj6Rl4r9gskINNlE+4zDB7pl4zPOUnA/DWSXQ2D +Q3VuH2iNI+Bi09U/Yww2z+ddsEgh4H9+xCebttJBblN0UsdVAh7O6GCVZ/By +wJSUbR4Bra9qdGgzuLPH6VF3CWO9PGmzCYNLdF8aO1US8Jj5o2ULBscUqA/0 +PSZgiXeMpzmDnTjyAve/ImCQTIyTAYNVjnOzDncQsPtExrAagzd+OJXl2UfA +rPLcvwQGD+lPKI19JmCHfcrDZUZ81YUOzw99J+ARTVOmbgZf5Gp0mFwgYL3r +05lCBnuFqE4d/UdAqtB4VBCDKf03T89sEscPww8eaDBYADkFjwuIY02YcOIs +Q6/J4ojiXxLimPdEiP0Og5/xfKGckBfHjM5Skg2Dr4XZvf2zSxxDfgwK/2a8 +R+DgM+9Isjhax98vymSwseGupVUUR3lxhWklBkvdu54SYy6Ouz1svz9mvO8C +H7ssi4M49kph8W4GF3wcNdvkK44PSiv2IyM/Tu22GU4+Lo5mMe5uVYz8sSl7 +EsIdKY7877YpbGbw+snsGwKp4liZkir5mZGPbsJWM5JV4ij0+O48LyN/NaMe +n81tEMcrviqpexj5zTm6XVS2mRFvvyh7FCP/6RWsoNgvjv+YJ8vbGPUiakFP +V1sXx7t9OyVFBOkw80hRoYpdAvfGmEuIMurtJSGTThSUQIeVdmF+Rj2Gfg0c +pShIYMl2dY4fjPrtPCuvZWwhgcGsGZYuHHS4O3m55bWDBF7i7YyXY6fDGet1 +N3MPCfyWr/hunOEHu6QHzlkHM/Y3uf/YYQMdLtAufXDJksCzKtmqo/9osPvH +SmTgmAQ+607Nqv3F8NM9mTtfTEug43HKZsk5hl/e3jUg9FsCme4pkE/9YPQj +B08dOrsk3r4uriA3TYNp2qs/rCqSmK1YsG8bwx+vxKWH5ZyURLfQPj4Whr+2 +DO6Qnz4riVnVZ9WZe2iwqtXUTb0oiVWhc+IrDH8+PLGoMX5LEhtSBfb2/8fo +P5b751SaJDHJxyh37ysajIooBr7kkUKnnwksAlU0EAt6Ji0mJoXbeTJI5Q8Z +ftzi/J/fFinklGU9alxOg9rIi8p8mlJo4Rn98SCjn1z49PObi7MUKkjJutnn +0UDj3mPfHwVSKHPn7aTkBRqc1bM9KKEtjTuad25230+DPR65v8iG0shBKwlf +20cD3tjv8Y6W0hg9CGZZDjS42XSuON1TGt24tELr9jL6g3n9d7ZkaXQeWfEq +BRr8dN4aPt8vjQfvnf7nIUcDjxOLF9qjZHCHNmFCYawOFLIMpb6dk8HO8hHN +9eE6hn6XHmxKl8HlrUw3ugbqIHJ1R6dhoQzKzFxt9+2qg6vxHiL0dhn0f1Bk +YfmiDtovv84rkt6McZ+61Vly64BSnlN95tlmdB0tyDO2r4PdHzrWZls240Td +stczqzqwYtpgeqBrM8pZS17RMq8Db7vAfviyGacNKswFDOrAJEo2JnbjFowx +/S81U6UOjm/+fcdAaQuO1qpJNrPXwUvfvJmm8C347itRfp5eC8eW5mJbeGRx +TOyInw9/LSwr8Q/vcpTDXG2dA9TQatAru59/7dpWZBNs3Tb6qBLmBM09nRrl +sTnyO8+9pYcwnuLpFLJJETfFE6U2K5SD2Y8Isy+kbagcubLxd1EpTHuzh1bH +bMeO0+o+L5nvMuZ/MZbzjTuw1mhyqOHuHRD8TzHt4Y+dqNFx4oB/M2PeT6qw +IZGUMTxW6BHz5A3IVtLhF/LdhQuee6fvUrKgTcKAOH9ZBZOv1Bj7aF4BilRj +umqvKs5YlIpZDKfB6Fb54akBVTRdPcQX8TINkpUSlQo/qWLhlZ6TVaVp0Ecx +byZMqeIDmx2p7hFpEOHS9Zd5VRW94kE9XCANXC2CNb/xq6Efv9uGmj2pcC2J +YQckNVyN1f6wu+ki8LIWhB2MU8PI6+e+x0wkAdvyM/u5BDW0tf2u3fY2Cf7N +ftQ4e14Nq72XQJGWBD8GxOfyU9QwSIHsLpScBJ2VlwNGrqnhh/FqlhdKSZDh +dfbwgTI15OSf8PQOOw+ijZ7O7j1qOG6RN5MmmAgyZzfruSiqo+HukltvYuOh +PJRd7uN2dbzfXllQEBAP1MNzmw4qqeOI+YmBJNd4cLdo6j6ipo4UV7+mOK14 +uCni63+Soo7sPjV3lKbiQLy0/HqWlTrGyHB9MneMA+Fu/eX34eq4q/WbYLL2 +WeBQcKu1e62Oie9uhNy2OwNHxcG8rFUdF2vN9M4Tz0Abj9wwa7s62s5/FU0g +nIGU3xMbazrVcSbOvr1x+DTwtoQ6ig2oY+VY13u7Y6dB0P/iwuC0OpZcuOtQ +eTEapB7VaxwS1GDM4+/qRQcjQUVfvCLCXQPPbo3cWkePgKqtfn9ZPDWQX6+b +/C8vArQ56aZpXhqo9lD1qVtiBBh+cB4p9NXAVjOX0QP2EeAUnC3QFayBp3cu +d0XPhkNMkViYcqIGvhASq2HdEQ6dPKI6n8s1sD+ZVbe/PAxChgWbzJk08fWL +jGyrlWBoaXZ7Usqiid4KSfN2E8EgU1Fcx7lRE3kuDQUd6QmGthjK/TYOTfxu +TbrVXB4McrJeV82FNPFw6NUYK59geOf9yNdcURNFa9zF4rqOg9qUNbe5pSb2 +nlMUtwoPgh/zKY5m2Zp47uulwu4T/jDUd9vp1nVNnDodz2vt7A9tT2r3zd3U +xIH1gl9fKP5QeH7EJee2Jp4Qxr5DTP7gKqnlMVWqiY9edo2WpRyFV4aDh5Of +aGJHi/RBKPWDG5d3nGwd1cTajzzqy0u+kBROPSX9RRNz1vO0nwz7Qvh++8jg +CU0susBteP2lL9gonI4Wn9ZE2/0vefLSfYGN3hnrt6iJVjP9we92+ELwSEQy +B7sW9r5Y6m7xPAymqs3XzXZpYeSB79IxIz7gzLbHoVNVC7OVHP2NX/vA0Y+t +PPs0tJDGv9FfsdwH0i7+F+tD1kKtSzsUtKN9oHei53CMgRYW666yZIv7gE/+ +mEaNoxbWd0jEE128IU6A+c2WM1r4KsBe0+L7QcicjEu4G6uFs4WJ2/XeH4Ti +ZxuoKvFaeEXZi9342UFoC2B/pJukhbtUkzVyrxwEgTa+LKcMLfwvvnrIX/8g +5MfJeKcUM84X3yfsddUTns7r/v3ToYVL8ed07e57wO32Oi/7d1qY8FPxd1CS +ByQUabaVd2th3/SngUofDzDbp5RzqE8LbRTJBXelPaCnXoLc/VkLH6ttLjW7 +7A7fzi6HlC9oYa7mmWn7GDcQ5a/75iNBRJufAw/unnCF5UkNu+dSRKyL4/6x +y8kVhl6U0yU3E/Fp9N3o9yRXuB1anNS1lYgtxNNsSUsuoPzhqiLuImLn8PXr +EaddwDA3zEsSiXifO1LTN9UZApU1Bt4dIuLll1mpz146wYk/EisHjhDRtiKM +MlnsBNGNrBKzR4mYTVTv1Ux2govO7104jxOxw9rHWtPKCUoSTvYbRhIxbFUq +7m2/I4wOPe2rSiOiTtAE+4E/DuCUavHhah0RIyQWPv40twd3Z60/W+uJmGL1 +cSNJ3R58tkqLVTYQsfmE++8cMXsIpc86dbwgYnXIn8on43aQ/uVyL1s7EWfk +epSDY+2gTb/vfcQIQw9qEFvAE1vQn/XpceEgIXN4e/C4pQ2IPjYtaOAiYQiX +api+tg3Mnt95fDMvCed8ddjLt9pAruxPri+CJMzZ3MFftmgN/xyijI5LkXCi +cO1VuIM1PHt8uTJRlYTTSqwitySswCD5aXqVIwlfL9+XnHltARJOtz1EnUl4 +PFpYQ7nQAn7JJSifciWhJ7fV58xYCyhoMGuhHiDhFqO1g6M6FsDys2e99QgJ +pebkXP3KzaHJ6XvgSBQJZ/vWWVjzzMBYnrCXp4CEnTszls1vmUL1zCtZn0IS +plV4lLPHmIJ8Xejv+mLG+cThtClPU9hg/jbvSBkJ5fiWjIQVTKExKPFXUzUJ +ybeFb3JUmAD18UJW5GsSjoYOWzu2GgPJ7t3oxDQJFa2PCpwV3Q3FkjF11B8k +LA8KlDm4agQiX5RTrs6R8OaLPaKeo0awEJFENPpNwnvDLcb15UZQeQuSctdJ +mOi5LD+0xwhUpx7schQkI7Pla+P6OEPYHnvhZCOZjL7Mv++wcxtAg27RRksK +GT2OGyjdmUew+fMs470eGXk/fE93H0Q4Gbh4f9KAjDJy8j7qZQgtbp6feS3J +yPPCXMnWEuGIDsl8vycZH3hQgu9sB7j367PkQhIZDeXH45rC9IBavlpy+iIZ +O6Uy7x220IMuPzHSpjQyprf1D6GcHqyMWNpIXCHjgakSn5xOXTB/W5eAt8io +EiU42a2qC9/KUmdSHpFxLuc0G3lJB3Ye0nmmMEDGd2w+XRsqyHBJzmolfoiM +wsH7fL3TyLDwyYs4OkxG9qP3d38PIMNT15Sy3DEyitwakA7fRQY7m09ZYjOM ++PY+1AktJ8Ep3XPHOZi00TlXXH6sjggtAu9kZxS08eLEUUnvCU3Y9faLm8V2 +bbzS5Xf1yhtNyEhZybq3Uxv3L/98P1GhCW6b5HkPq2rjGQza+PekJvxYDV8Z +1tbGe8TVgtfcmiA6KdXdaaGNkT5x8b0UDTj09EhCdbA2aqnMOtEq1GA24FuE +cZg2Esj3yySvqcFJ6WP+veHaWH3ayOxOtBpciA6yW4rSRoWXL4tkzNXgISV8 +i16iNrJM73ty9j9VWK2Nb2i6ro0CqZ8yxfaqQEZF7kJXkzZOdgWsCZ5RAqkD +Wya9m7XRldz+BuyVoIi3YHChRRs9mHsdSrcrAS2gqFG0QxuNWNYcyD074aPS +/XTXPm207Odw2K6yE7aX0JVHp7XxXOO7EtmZ7fAsv8dnTkQHp4uJRR5XFWHE +UvZAOEEH9fY5x9iHKALTcoDLXwkdjGROaIu0VgRD201WG7fo4LFMvH+AUxGa +mSlk8Z06WDQ3EBEVpwDtXnkcBlTG/1Pvlhqj5GFA/mh5+mEdpMXxfB5Ol4O/ +nbUlIn46GPQm4vLdUDmQOs1657q/DuqIBjDdcJID9/c3swqP62C8GxuJWVoO +Rs69jaVF6uAr5b9dL8tkYeKrlv1Img5+CXEwXurcAgsl639U63RQIFnvoXqw +DHx1MslPpuvg/LCe34iRDPRtSN0z9lgHL67PrP4nKgOPPSVyrj3XQb6llBM+ +T6QhjkCkrLXqoN2x+E3hPNLAn3Q0um1IB9MKDComaJKg7Pue6RALBVU/jX34 +TREHGRGpe083UJBYXjEzLSwO/E1etoRNFFw48CyF8IMA8zI/b7/houCKupkd +XyEB6ns5jTREGGzdeDqUnwB7TPDc+jYKlsh/DBj8JQreCmUc1/cy9s98scNr +SBgiX3kcVbShIMvQK84hujCkHxJ8U2lHwViO//ZfzBKGhqJTKW/2UbDSuFQ6 +2V4YhBX38K0dpCCHpcH40n9C0Kz4RdgznIKyxIbuI+2CsHP75i2KeRRUuC3M +nT3DD9jSFVt5m4JR8lnnNd/xg9ORxM/UQgoG7+W787eaH+JLZgr23aPgzIBS +Hf9pfhja3qCQXEXBR3w59qZ8/JC2w0Vp+jUFH/Bf6vGI4IW5nVdIlT8pyMnV +K5N0iAv62tFYaJ6Cg1+2vOChcMHzwFn7sEUKku3idvTwckFapVkwaYWCTl43 +J2TpnLCTwnS/nlUXZUI2BNXxc4KXWYBsk6gufnLieHHmDTv0+Jpy9+jpYuSW +5xzEADZ4zLEoQQRdPGK94byKGRsUlBXsuGagi08lngZ6KLDB8R9rJs4murj/ +fK+l5/BG4ImoPjtkrYuy1wpYx+02gkmi7J9xL100r+W7Wmq8AWiFfz8vJuni +tR8fZQxsWIBkFPbH/KIuGqrcuMuvyQI1n6e581N10aBgMzO3KAtUygyTzTN0 +kT4tpnFuiBnuZz9Pzb2hizvj5mci/ZkhP+Wcjmm5Lt5abu+Hy0yQHMZ3Obtb +F3mPuDlQF9eo7EJJxTPvdXGHxrvfP16uURMfMTUY9ukiz2wh//fMNWrC7NzX +6SFdfODjwtlAXKOeOdKjZ/CVEe+5311PIlepIW45k1NLusg+ruEwKfCX6rp7 +K+rK6KGrF8FbLWSJutbDztu0RQ+rePI7f5osUfMPzQ6ab9VDjSfH4pcll6hf +E+kRrtv1sNmA+vtz8x9qSKt1xSkNPUzY2fOZZcsf6gWraBmaiR6+lv/hqfBp +kVrv/H5VK0gPvx6tWeFPm6e6T9W3NQTroXbwXWsu/3kqU2R+9u4wPfxgrL2C +e+apJjf8tRxO6aHyXs8+N9Z5atdH5mOh8Xqos2HwkmX0L+o3L5XBR1l6yGQa +595wco4qGXCervJcD9fSr0f/0fhBTVs/TLzYqIdueVG7VP7NUlkyTB5NvNTD +pZaBk/TWWeq32o338lv1sGlOcOzNwVlqPVNCtmC3Hqa6Dpp2XZ2humbGRvz+ +ooc16dtyl7mnqdmPTxGfcunjwYJq4witKSq3lcsjCV59PCNwsWUfxxQ1dkR7 +VwS/PjLXu5icGZ6kHtm4JK8moo+HesuSbiRPUsnW4cIFMvq4byHxNtfYBLV3 +NGT+nLo+Pm+M6/Yt+EoV4Tz2aO8+fUwTquLabzNOLTQ6HfnTRR+LUn8+kd8x +TtU4nWZ0xU0fT/DJ2ZNYxqlWPx++7zuoj3xvWMiqNWPUxN7FZe9j+iiS5pNw +VGaMulQQYxh5Vh8DSYMVuWufqQO6V7qLy/Sx6mQR77MPn6hHThTeNCvXR6a/ +sYHncz5Rf5fXHJp+qI83Jf/5Ne3/RBWU6/ujXquPK1JLnFc+D1Mt2KWlnjzX +x8/tSTJRvz5SG3qKfbrf6+O5AOu/TduHqOa8tF3hffro1KM85Tc3SO0zbf1N +GNTHcsU6z4j6QepC/fckjxF95Kz6Jti8d5C667bag6lv+pjxaPytzKkBasOA +QXjKjD4e45q1mtk9QDUXtgfVn/oY+oWpUVpggHr4/Il3YYv6KC+p8PZ2aT91 +4XnidbElfbRQDhVYiOinxq1kedevMO7fjNlFxv1Ufq17yu5r+vjD7Xh9jVA/ +NTegfnF9XR+5c1ffbh3to/4PwRvVDg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09819483610162089}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09819483610162089}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk41N8Xxy0l+76MtQgtZJ8ZBnMOQpbshJBQkpAlCkVIFJIUWpCQKMo6 +I22UkK+EZEtCoVBCIfKb31+f5/V87nPvue97zvscWa8gu0MsTExM7cxMTP// +/h5ufSl/sZD6tb+Htk6xpfbkEk4Z9MVB7pEN4VE3VQFF3noR+jJgyqG/UPUm +QLhN6QfWvgKwtQq7PnfDGgRmxTKWP1TCsqIpX8iNA/CpwSpo4UMjXKvjMniY +EwQm8t8+zn3oAkmeF7ItGTGw/IF89eeHUTAKPfjUOOISNBndLXxXMA8lvt9m +GxTyQeoT/auX8hpM2k+JTxy7C8LHDpRuMmLFwfjIlPBfD2DnpjvNNvtYkajI +c1qFpxyw4Otojj8rNp14ytK3rRyO9QVIKmey4rXlqfx1t3J4uTs6xeYLKx58 +8vVXXnM5hEnnBOac34DrMW99JbMqoLujS0OpfSO272v95nLtIWSomzy2cmTH +QI1vtnLClaA66GKqf4QdB0yu722WqYT2hIBupSh2FCuhLXjtqAS2vszv7LfZ +UWhtq3YitRKizoxJNk2z4xk1Vp2wI5Xg8yY2mpzAgeFl2e7f6yuBdOix/pYq +TpTJus2j7loF3bxvW3mbOVFCxTpq3LsKjtNGHdf6OLEDOIjpAVVQysUZOPCP +E2UnN8V1xlbB5krn3ExzLvwQx6ezUFwF7OuL/9hHuZD4e3301VwV9GerPZ/j +58Emx8jjZ89Ww/XuMr5wBR7sWpWSW7hQDa682w6s6PCgcfDBIPfMahiKl/7H +4s2D4VnXuoTuVsNIIKeecA0P7hmtOMHXXg2Tu8frSC68+OXOhAgK18DSz6yK +qNt8WHw4MTDiVg3QlYTW12v48Gep/DZ6UQ1EHk6zSmjjwysiu8hzD2pgdTBh +JmWeD/fZdjntfloDsWM0kbdy/Ji27OgbPlwDCR1F9iNh/Ij9rVHs0rVwsTDm +LYu4ANrfD3AdzKgFcy0/QZGtApitcOncy5xaYH9p57htlwBKj0voFubXQsKY +wqCFgQA6q5wyNC2vhWi59q+ZfgL4N2qhXLK1FgLzCf8U6wXwoZrhqbXVWrC9 ++UjZYr8gak6bL912rwN+5RtB7ocEUbQwPXK/dx10PE6oDAoSxF+/Xkdx+dWB ++eA+7cx4QVxwNf1rFVYHhhL/jD6WCWJMWeqc94U60Mo23x+0Kog3UiYnXlXX +gVjmWPKVW0Iozh129xgLDQhKNQlLxUL453lLRwkbDSQaE2PcHwph6nGmJ0Oc +NJD5uePEtiYh3GPx+qeSEA0ULI97Pp5krBePaPXdSgPNDWukMU1hrG22n3Y0 +pIHWjQ71PfrCaKxQOshrQgOSRr7yAxNhtCffy31mRgOKp5FchIswnvIPusNu +SwODhmQerhhh9CPWNGkfoIF1mOi4RpswhoQ4mwtG0sCGa3I4q1sYC5oifuw5 +TQO7Anr/6pAwvggKOxURSwOnTre3zT+EUXX+GzYk0sBd+U69q4gIGmxjejGe +QQP/cdXLcZ4iuKFn/4PKezQ4FsWcMuEngo5Ff3WP3KdBoGB3omWoCH78uvxS +pIIGIRgeLZoogiqzG9qdq2lw6maDb2mZCB5dHO0785QG5x3MqF2/RZAYU2ht ++Y6hV3WHBAuzKOpamOc/6qZBuZDDH3UuUSwQScnn6aVBb5fHw8ubRdG3soV2 +b4AG8rZhcrZ7RDFh8eb5kDEa0B4u/4u1E0Wd/pDM1C80sOSPGXzoJooCO/W9 +8yZoEPo2OZM/WBSt4wxt7n6nQePePLbOHFEUKd59f8884/4P5MfW74jiqcJ2 +bolFGnzjLn2mWi6KzusrhqO/aSDQXn3yUqMotqcnUfat0MDTvO2b1XdRVPmi +l9fNRIeFe9avzyyKIp4vWdzPQofzHO/vlK+LYv+rJ6RBVjqUt3xy4xUWw1tc +rfFP2eiwZrLY8Z+eGLqYNVwjcNMhvTiybM1EDGmmpZeceeggz8aUtMtWDJPZ +0pIv8dLB8hWnQeohMUy41XBxlJ8OI/Lp0k+CxPBjT2/OPwE6hCaIrEyfEkNS +3LlqASE6XDfaUmWZJoYvDp2QlBahg8qdokvR2WJoFv4gQESUDo0sSsfuF4jh +jRLfvg1idJh6QVTgrhPDP2/OsbYS6BAt+5hZ74UY9sZvarslTgf+szjs/0YM +9UZNavwk6KCNFllvPonh23+BbBOSdGjP6wz9OyWGO0duhGRL0cFz3dFGaUEM +FYt4+Q2kGfp4DCrv/yeGr8iLn0cYfP6pJ8dFdgK2keK+R8jQQULm65d6QQJy +zE2rsm1m6HXav/GbFAFnPIMrLzK4Vy88ylydgDLJHWeit9Dh6M2/+yJ1Cah2 +mPR2gsFrf2O1So0JqKHTe9RclqHnfjaBAWsC5vIzOxYyWP7xxRkOVwLmXeC9 +vMhgmoRAm44PAfd2uspR5Rj6Rl4r9gskINNlE+4zDB7pl4zPOUnA/DWSXQ2D +Q3VuH2iNI+Bi09U/Yww2z+ddsEgh4H9+xCebttJBblN0UsdVAh7O6GCVZ/By +wJSUbR4Bra9qdGgzuLPH6VF3CWO9PGmzCYNLdF8aO1US8Jj5o2ULBscUqA/0 +PSZgiXeMpzmDnTjyAve/ImCQTIyTAYNVjnOzDncQsPtExrAagzd+OJXl2UfA +rPLcvwQGD+lPKI19JmCHfcrDZUZ81YUOzw99J+ARTVOmbgZf5Gp0mFwgYL3r +05lCBnuFqE4d/UdAqtB4VBCDKf03T89sEscPww8eaDBYADkFjwuIY02YcOIs +Q6/J4ojiXxLimPdEiP0Og5/xfKGckBfHjM5Skg2Dr4XZvf2zSxxDfgwK/2a8 +R+DgM+9Isjhax98vymSwseGupVUUR3lxhWklBkvdu54SYy6Ouz1svz9mvO8C +H7ssi4M49kph8W4GF3wcNdvkK44PSiv2IyM/Tu22GU4+Lo5mMe5uVYz8sSl7 +EsIdKY7877YpbGbw+snsGwKp4liZkir5mZGPbsJWM5JV4ij0+O48LyN/NaMe +n81tEMcrviqpexj5zTm6XVS2mRFvvyh7FCP/6RWsoNgvjv+YJ8vbGPUiakFP +V1sXx7t9OyVFBOkw80hRoYpdAvfGmEuIMurtJSGTThSUQIeVdmF+Rj2Gfg0c +pShIYMl2dY4fjPrtPCuvZWwhgcGsGZYuHHS4O3m55bWDBF7i7YyXY6fDGet1 +N3MPCfyWr/hunOEHu6QHzlkHM/Y3uf/YYQMdLtAufXDJksCzKtmqo/9osPvH +SmTgmAQ+607Nqv3F8NM9mTtfTEug43HKZsk5hl/e3jUg9FsCme4pkE/9YPQj +B08dOrsk3r4uriA3TYNp2qs/rCqSmK1YsG8bwx+vxKWH5ZyURLfQPj4Whr+2 +DO6Qnz4riVnVZ9WZe2iwqtXUTb0oiVWhc+IrDH8+PLGoMX5LEhtSBfb2/8fo +P5b751SaJDHJxyh37ysajIooBr7kkUKnnwksAlU0EAt6Ji0mJoXbeTJI5Q8Z +ftzi/J/fFinklGU9alxOg9rIi8p8mlJo4Rn98SCjn1z49PObi7MUKkjJutnn +0UDj3mPfHwVSKHPn7aTkBRqc1bM9KKEtjTuad25230+DPR65v8iG0shBKwlf +20cD3tjv8Y6W0hg9CGZZDjS42XSuON1TGt24tELr9jL6g3n9d7ZkaXQeWfEq +BRr8dN4aPt8vjQfvnf7nIUcDjxOLF9qjZHCHNmFCYawOFLIMpb6dk8HO8hHN +9eE6hn6XHmxKl8HlrUw3ugbqIHJ1R6dhoQzKzFxt9+2qg6vxHiL0dhn0f1Bk +YfmiDtovv84rkt6McZ+61Vly64BSnlN95tlmdB0tyDO2r4PdHzrWZls240Td +stczqzqwYtpgeqBrM8pZS17RMq8Db7vAfviyGacNKswFDOrAJEo2JnbjFowx +/S81U6UOjm/+fcdAaQuO1qpJNrPXwUvfvJmm8C347itRfp5eC8eW5mJbeGRx +TOyInw9/LSwr8Q/vcpTDXG2dA9TQatAru59/7dpWZBNs3Tb6qBLmBM09nRrl +sTnyO8+9pYcwnuLpFLJJETfFE6U2K5SD2Y8Isy+kbagcubLxd1EpTHuzh1bH +bMeO0+o+L5nvMuZ/MZbzjTuw1mhyqOHuHRD8TzHt4Y+dqNFx4oB/M2PeT6qw +IZGUMTxW6BHz5A3IVtLhF/LdhQuee6fvUrKgTcKAOH9ZBZOv1Bj7aF4BilRj +umqvKs5YlIpZDKfB6Fb54akBVTRdPcQX8TINkpUSlQo/qWLhlZ6TVaVp0Ecx +byZMqeIDmx2p7hFpEOHS9Zd5VRW94kE9XCANXC2CNb/xq6Efv9uGmj2pcC2J +YQckNVyN1f6wu+ki8LIWhB2MU8PI6+e+x0wkAdvyM/u5BDW0tf2u3fY2Cf7N +ftQ4e14Nq72XQJGWBD8GxOfyU9QwSIHsLpScBJ2VlwNGrqnhh/FqlhdKSZDh +dfbwgTI15OSf8PQOOw+ijZ7O7j1qOG6RN5MmmAgyZzfruSiqo+HukltvYuOh +PJRd7uN2dbzfXllQEBAP1MNzmw4qqeOI+YmBJNd4cLdo6j6ipo4UV7+mOK14 +uCni63+Soo7sPjV3lKbiQLy0/HqWlTrGyHB9MneMA+Fu/eX34eq4q/WbYLL2 +WeBQcKu1e62Oie9uhNy2OwNHxcG8rFUdF2vN9M4Tz0Abj9wwa7s62s5/FU0g +nIGU3xMbazrVcSbOvr1x+DTwtoQ6ig2oY+VY13u7Y6dB0P/iwuC0OpZcuOtQ +eTEapB7VaxwS1GDM4+/qRQcjQUVfvCLCXQPPbo3cWkePgKqtfn9ZPDWQX6+b +/C8vArQ56aZpXhqo9lD1qVtiBBh+cB4p9NXAVjOX0QP2EeAUnC3QFayBp3cu +d0XPhkNMkViYcqIGvhASq2HdEQ6dPKI6n8s1sD+ZVbe/PAxChgWbzJk08fWL +jGyrlWBoaXZ7Usqiid4KSfN2E8EgU1Fcx7lRE3kuDQUd6QmGthjK/TYOTfxu +TbrVXB4McrJeV82FNPFw6NUYK59geOf9yNdcURNFa9zF4rqOg9qUNbe5pSb2 +nlMUtwoPgh/zKY5m2Zp47uulwu4T/jDUd9vp1nVNnDodz2vt7A9tT2r3zd3U +xIH1gl9fKP5QeH7EJee2Jp4Qxr5DTP7gKqnlMVWqiY9edo2WpRyFV4aDh5Of +aGJHi/RBKPWDG5d3nGwd1cTajzzqy0u+kBROPSX9RRNz1vO0nwz7Qvh++8jg +CU0susBteP2lL9gonI4Wn9ZE2/0vefLSfYGN3hnrt6iJVjP9we92+ELwSEQy +B7sW9r5Y6m7xPAymqs3XzXZpYeSB79IxIz7gzLbHoVNVC7OVHP2NX/vA0Y+t +PPs0tJDGv9FfsdwH0i7+F+tD1kKtSzsUtKN9oHei53CMgRYW666yZIv7gE/+ +mEaNoxbWd0jEE128IU6A+c2WM1r4KsBe0+L7QcicjEu4G6uFs4WJ2/XeH4Ti +ZxuoKvFaeEXZi9342UFoC2B/pJukhbtUkzVyrxwEgTa+LKcMLfwvvnrIX/8g +5MfJeKcUM84X3yfsddUTns7r/v3ToYVL8ed07e57wO32Oi/7d1qY8FPxd1CS +ByQUabaVd2th3/SngUofDzDbp5RzqE8LbRTJBXelPaCnXoLc/VkLH6ttLjW7 +7A7fzi6HlC9oYa7mmWn7GDcQ5a/75iNBRJufAw/unnCF5UkNu+dSRKyL4/6x +y8kVhl6U0yU3E/Fp9N3o9yRXuB1anNS1lYgtxNNsSUsuoPzhqiLuImLn8PXr +EaddwDA3zEsSiXifO1LTN9UZApU1Bt4dIuLll1mpz146wYk/EisHjhDRtiKM +MlnsBNGNrBKzR4mYTVTv1Ux2govO7104jxOxw9rHWtPKCUoSTvYbRhIxbFUq +7m2/I4wOPe2rSiOiTtAE+4E/DuCUavHhah0RIyQWPv40twd3Z60/W+uJmGL1 +cSNJ3R58tkqLVTYQsfmE++8cMXsIpc86dbwgYnXIn8on43aQ/uVyL1s7EWfk +epSDY+2gTb/vfcQIQw9qEFvAE1vQn/XpceEgIXN4e/C4pQ2IPjYtaOAiYQiX +api+tg3Mnt95fDMvCed8ddjLt9pAruxPri+CJMzZ3MFftmgN/xyijI5LkXCi +cO1VuIM1PHt8uTJRlYTTSqwitySswCD5aXqVIwlfL9+XnHltARJOtz1EnUl4 +PFpYQ7nQAn7JJSifciWhJ7fV58xYCyhoMGuhHiDhFqO1g6M6FsDys2e99QgJ +pebkXP3KzaHJ6XvgSBQJZ/vWWVjzzMBYnrCXp4CEnTszls1vmUL1zCtZn0IS +plV4lLPHmIJ8Xejv+mLG+cThtClPU9hg/jbvSBkJ5fiWjIQVTKExKPFXUzUJ +ybeFb3JUmAD18UJW5GsSjoYOWzu2GgPJ7t3oxDQJFa2PCpwV3Q3FkjF11B8k +LA8KlDm4agQiX5RTrs6R8OaLPaKeo0awEJFENPpNwnvDLcb15UZQeQuSctdJ +mOi5LD+0xwhUpx7schQkI7Pla+P6OEPYHnvhZCOZjL7Mv++wcxtAg27RRksK +GT2OGyjdmUew+fMs470eGXk/fE93H0Q4Gbh4f9KAjDJy8j7qZQgtbp6feS3J +yPPCXMnWEuGIDsl8vycZH3hQgu9sB7j367PkQhIZDeXH45rC9IBavlpy+iIZ +O6Uy7x220IMuPzHSpjQyprf1D6GcHqyMWNpIXCHjgakSn5xOXTB/W5eAt8io +EiU42a2qC9/KUmdSHpFxLuc0G3lJB3Ye0nmmMEDGd2w+XRsqyHBJzmolfoiM +wsH7fL3TyLDwyYs4OkxG9qP3d38PIMNT15Sy3DEyitwakA7fRQY7m09ZYjOM ++PY+1AktJ8Ep3XPHOZi00TlXXH6sjggtAu9kZxS08eLEUUnvCU3Y9faLm8V2 +bbzS5Xf1yhtNyEhZybq3Uxv3L/98P1GhCW6b5HkPq2rjGQza+PekJvxYDV8Z +1tbGe8TVgtfcmiA6KdXdaaGNkT5x8b0UDTj09EhCdbA2aqnMOtEq1GA24FuE +cZg2Esj3yySvqcFJ6WP+veHaWH3ayOxOtBpciA6yW4rSRoWXL4tkzNXgISV8 +i16iNrJM73ty9j9VWK2Nb2i6ro0CqZ8yxfaqQEZF7kJXkzZOdgWsCZ5RAqkD +Wya9m7XRldz+BuyVoIi3YHChRRs9mHsdSrcrAS2gqFG0QxuNWNYcyD074aPS +/XTXPm207Odw2K6yE7aX0JVHp7XxXOO7EtmZ7fAsv8dnTkQHp4uJRR5XFWHE +UvZAOEEH9fY5x9iHKALTcoDLXwkdjGROaIu0VgRD201WG7fo4LFMvH+AUxGa +mSlk8Z06WDQ3EBEVpwDtXnkcBlTG/1Pvlhqj5GFA/mh5+mEdpMXxfB5Ol4O/ +nbUlIn46GPQm4vLdUDmQOs1657q/DuqIBjDdcJID9/c3swqP62C8GxuJWVoO +Rs69jaVF6uAr5b9dL8tkYeKrlv1Img5+CXEwXurcAgsl639U63RQIFnvoXqw +DHx1MslPpuvg/LCe34iRDPRtSN0z9lgHL67PrP4nKgOPPSVyrj3XQb6llBM+ +T6QhjkCkrLXqoN2x+E3hPNLAn3Q0um1IB9MKDComaJKg7Pue6RALBVU/jX34 +TREHGRGpe083UJBYXjEzLSwO/E1etoRNFFw48CyF8IMA8zI/b7/houCKupkd +XyEB6ns5jTREGGzdeDqUnwB7TPDc+jYKlsh/DBj8JQreCmUc1/cy9s98scNr +SBgiX3kcVbShIMvQK84hujCkHxJ8U2lHwViO//ZfzBKGhqJTKW/2UbDSuFQ6 +2V4YhBX38K0dpCCHpcH40n9C0Kz4RdgznIKyxIbuI+2CsHP75i2KeRRUuC3M +nT3DD9jSFVt5m4JR8lnnNd/xg9ORxM/UQgoG7+W787eaH+JLZgr23aPgzIBS +Hf9pfhja3qCQXEXBR3w59qZ8/JC2w0Vp+jUFH/Bf6vGI4IW5nVdIlT8pyMnV +K5N0iAv62tFYaJ6Cg1+2vOChcMHzwFn7sEUKku3idvTwckFapVkwaYWCTl43 +J2TpnLCTwnS/nlUXZUI2BNXxc4KXWYBsk6gufnLieHHmDTv0+Jpy9+jpYuSW +5xzEADZ4zLEoQQRdPGK94byKGRsUlBXsuGagi08lngZ6KLDB8R9rJs4murj/ +fK+l5/BG4ImoPjtkrYuy1wpYx+02gkmi7J9xL100r+W7Wmq8AWiFfz8vJuni +tR8fZQxsWIBkFPbH/KIuGqrcuMuvyQI1n6e581N10aBgMzO3KAtUygyTzTN0 +kT4tpnFuiBnuZz9Pzb2hizvj5mci/ZkhP+Wcjmm5Lt5abu+Hy0yQHMZ3Obtb +F3mPuDlQF9eo7EJJxTPvdXGHxrvfP16uURMfMTUY9ukiz2wh//fMNWrC7NzX +6SFdfODjwtlAXKOeOdKjZ/CVEe+5311PIlepIW45k1NLusg+ruEwKfCX6rp7 +K+rK6KGrF8FbLWSJutbDztu0RQ+rePI7f5osUfMPzQ6ab9VDjSfH4pcll6hf +E+kRrtv1sNmA+vtz8x9qSKt1xSkNPUzY2fOZZcsf6gWraBmaiR6+lv/hqfBp +kVrv/H5VK0gPvx6tWeFPm6e6T9W3NQTroXbwXWsu/3kqU2R+9u4wPfxgrL2C +e+apJjf8tRxO6aHyXs8+N9Z5atdH5mOh8Xqos2HwkmX0L+o3L5XBR1l6yGQa +595wco4qGXCervJcD9fSr0f/0fhBTVs/TLzYqIdueVG7VP7NUlkyTB5NvNTD +pZaBk/TWWeq32o338lv1sGlOcOzNwVlqPVNCtmC3Hqa6Dpp2XZ2humbGRvz+ +ooc16dtyl7mnqdmPTxGfcunjwYJq4witKSq3lcsjCV59PCNwsWUfxxQ1dkR7 +VwS/PjLXu5icGZ6kHtm4JK8moo+HesuSbiRPUsnW4cIFMvq4byHxNtfYBLV3 +NGT+nLo+Pm+M6/Yt+EoV4Tz2aO8+fUwTquLabzNOLTQ6HfnTRR+LUn8+kd8x +TtU4nWZ0xU0fT/DJ2ZNYxqlWPx++7zuoj3xvWMiqNWPUxN7FZe9j+iiS5pNw +VGaMulQQYxh5Vh8DSYMVuWufqQO6V7qLy/Sx6mQR77MPn6hHThTeNCvXR6a/ +sYHncz5Rf5fXHJp+qI83Jf/5Ne3/RBWU6/ujXquPK1JLnFc+D1Mt2KWlnjzX +x8/tSTJRvz5SG3qKfbrf6+O5AOu/TduHqOa8tF3hffro1KM85Tc3SO0zbf1N +GNTHcsU6z4j6QepC/fckjxF95Kz6Jti8d5C667bag6lv+pjxaPytzKkBasOA +QXjKjD4e45q1mtk9QDUXtgfVn/oY+oWpUVpggHr4/Il3YYv6KC+p8PZ2aT91 +4XnidbElfbRQDhVYiOinxq1kedevMO7fjNlFxv1Ufq17yu5r+vjD7Xh9jVA/ +NTegfnF9XR+5c1ffbh3to/4PwRvVDg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09819483610162089}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09819483610162089}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829486901587*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"cee19d00-87af-4c3c-9746-890e79e05341"] +}, Open ]], Cell[CellGroupData[{ @@ -2922,14 +8338,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918492800964603`*^9},ExpressionUUID->"9051a5e3-bb9f-d941-bcca-\ -598d0b6835be"], + CellChangeTimes->{3.9918492800964603`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[BoxData["9.33220071900516`"], "Output", - CellChangeTimes->{3.991334803166374*^9}, - CellLabel-> - "Out[254]=",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[BoxData["8.876085547509097`"], "Output", + CellChangeTimes->{3.991334803166374*^9, 3.9938294869237843`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"2187ebbb-cd5a-4b13-ab6d-5d60127d5f78"] }, Open ]], Cell[CellGroupData[{ @@ -2985,191 +8399,250 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492818821335`*^9},ExpressionUUID->"65a995ff-ff3d-634e-9bad-\ -4a8a16073236"], + CellChangeTimes->{3.9918492818821335`*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.015132160320536`*^-259\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 255, 233, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133480336051*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.018714029126914`*^-225\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 13, 25990558319054262605, + "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.993829486983179*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], +In[99]:=",ExpressionUUID->"ca11860c-fcd5-4236-bc28-452a7a19f734"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.802481548114291`*^-269\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 234, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803369583*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.567707413933565`*^-231\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 14, 25990558319054262605, + "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.9938294869873133`*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], +In[99]:=",ExpressionUUID->"bb998a78-8da0-4d22-ad9b-42a93106b403"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.803946040382125`*^-279\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 235, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803378134*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.515354148037636`*^-237\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 99, 15, 25990558319054262605, + "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.993829486990724*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], +In[99]:=",ExpressionUUID->"5f5a9d83-749f-4fb2-8bcb-e3225c7c8158"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 255, 236, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803386196*^9}, +during this calculation.\"", 2, 99, 16, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.993829486994051*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], +In[99]:=",ExpressionUUID->"46fbe159-e20d-4cef-a9a1-2094462ebe0d"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJxN1nk0Ve/3OPCiQYUyc6/pjpKhzOHe82xDMhSZRUiSqBBSRBkjSqZEZRap +zPdmqihDKBqIRBKSkKHMku/9rfVb7z73j3PXa51z9trP3vs85xCOeZq5sK1b +t46bdfh///P9LQ3kmFzsa9+Ie72qIdaZLuyv9TEUnfdbNv2wbScCgTfHhD8m +IEV9zu93t+1FfocedLN/zEZsI53V3tv0Ec+kUMJSdxnK/2DWStlmg748Mfac +7X6BdLUNpyS2nkR65LHPM93v0eHCLf0Smy6gpW61m9Pdg6jSS7tYYT4S1evk +577L/o2yupmmVUUpSPRL1cgx2VX0akb6RPz6bMR/2vHBZh12GOvaXlavmI8S +FPRqjC05YP/lG1knDj1CPSl76mZ2cMHy32te7Nol6HbHw+1+FC5oTBkhnDMs +QbbcUo7L6lwwucVkZcCsBPWFif1lc+YCvaunxfKdS9CAx1YaP5MLOHqCvk6E +l6BR3eEK1cPccNQ3/uqRphK0OH2r+GLWdrhT90jwmW4pism9/IZNhAeWJ2mF +pN1lyFDZjVeAxAMu83q9UypliKPBzFJKjgc8edWWmLQyFD5E6TXS4oGfy7Vr +uw3LUCDx9UiSGw8U3p/g7z1ehjwyhf9Sq3nA1NbVijO1DJneLZU1suMFR6f+ +2x1/ytAO2Tue9i68MJcqltTLVo7aa8LLPD15wTfX3O4zRzky7LXemxTGC42V ++w6185cjbdxfnc8PWfcvnnjqIluOlFMM7Tz/8EL9taJFN9tyJJQ0dDUxjQ9O +75/Uqi8tR8IyzPDFPD6we3nFs+BxOcK9uHLZvoQPNo3uloquKUfi09LnpOpZ +djBW0mwsR5QDXkdrRvkg+PBlpt3HcqS0YVV1SIkfwhzGJZJXy5GJr+CwYis/ +mLfIrZvSYaBD20b7b3XwQ1mg3gxFn4HMsqt6/vTxg1P5nIv1AQayenvkTdMU +P5gYTPQUWDCQvWxOta2AAPjMxI9zujDQqeHd8aFHBWDe363yVTgDRVoYYO/n +BcD3T2SMbB0D4RjtOLb1ghBrZr+2Vs9ARXwWCwrbBOESJY+97SUDdb13KImX +EITVlq/PzN8wENnUl2iqLwiucYNb+PsZ6MXBjE1vUwXBTyPD6OgyK59C8tBa +jiCQZPJmX68y0Bjng9rdRYJg+PC9stJ6JuJ5zbhw44UghPRWBE5sZqKjhq1j +xuOCMFFF0OAVYKJVvbn2NpoQ/Iqdm94lz0RxeQEPV/WEYOTCmKmCAhORN62L +kjMVgvaBDnMFZSY60LhV67qLEKx42dPFNZjoto5k+YFYIXC3aat5uI+J9oLR +rVdfhGDfpRyeZDsm8lHPcmwJFYZNUd9LCkOZyDCTe9bomjA0a93uqw9nIuLm +wKj2m8Kw447hjc4rTPS206q0474wcGe/jf4WzUTyXpzs/e3CsLtxqr8xgYlG +887n/cKJAMGX0H45i4lqub5pnCOLQERB6xEsh4mSfc3eLMiJQBgjy30hl4n2 +acst/gERCDBwXrG5z0TZnwcNNruKwORLWk5PERMd4Tf+iS8XAR5GDLGtmomU +LtaEpD8RgaMThxsUnjDR1sGdgoQmESjH90THPWWiqmJ2RO0Rgdi38Ra0OiYS +NKqK27MmAl1nPDSNGpnoZymVUs6Bg5k7026Xm5ioQTipSoUXBxU8PaqFL1n1 +GPEY1KDgoNV5s8FcC2u9IWTlfUY4cNFUlFBuZ6L80fjmlxY4WDM8Jab4hoku +mawdMXTAQeD+HY93vmUiObFPESZnccDfpf/37zsm2hC+H/c+AAeWBzr0+98z +Ud8Yo8giHAdxjnrOzA4miq680X34Fg42yk3wGH5gIieJ1VN9mTjoNBiT2NzF +6tcV93WOD3AwqDQ4Xc3yjp/dSV/LcZC+ckjFpZuJvpvvkz7+FAdfmJopGz8y +0bPqsqcjTTiIThl6doflZIKkmdtb1v3R5/WlepjoTNT1kfEeHORI17fls6w7 +tRzgMYSDiza9A6KfmMhfP2nX8wkchH00EAlnuShL7hPfPA4meBVOf2F5aLnp +6ok1HOhtN7eX72UiYYuj6lUceHDaunjSi+WDhUuj23jxED+awn6P5dBNiSkO +eDw8XY5MfcVyhaOsfikZDzuxlNghlicqGxfY5fHgtbeePsEygdcx30oND4fu +tC0Os2x1atGqAPCwPDy2uY3lmIb4TX8M8LBX5mhBDst1YjKPjc3xMLuPynOS +5Tm/BpesI3gIzY45KcLyrrf2ArMueIie+tD2mJW/g/RCg54nHhIWhswRy4mh +cb6pF/Bwc+jN+jJWPZp7pckTIXgw1U94z8XyH+X6DiwGDzSNPIYpq54KsUfC +4pPwkP+h6Gogq/4nvs8pDqfhYXOUOPU6qz934Magaj4e+MIHDoWy+vk2dWfC +1RI8XKvdUG/byUQbfz/X6qvCg8uIh5QAq/8aB+xm5OvxoMuIwpWw5sXz3mxm +yGs8HMUtSu9izVPu3+uHOj/gQb7scGcIa/56rKXWSX3Bg8/4WhTzNRNxl9YV ++4/iQfBsRX59KxPpbLV1fD2Dh5dG8cEPmpnogvNvbokVPKzJlZufZM37oADV +o4FLFPIz+1OcnjORkGetmJCQKPj1GWukPmPtH802bW6SonCw7L5yZg0ThRB+ +BT6RFgWrtgd+vpVM9DggRna7kijomhf08zGZaLyD3OdEE4X1v25pBJYykaTc +sxjGPlHg1xXXf1jImu8v02OHbUShk/pJzOIeaz/YG337kZMofGQq8bRkMtFs +PMlwzV0UJv2+ca7cYfVH16ogN0gU0gW4W2PiWf1Jm7JZuCIKhroS9G8xrP7M +R3EYxomCwGqa6EwEEykW1LhOZYtC+dSpCX5/JnJlsxTSfiQK3+uGiVLeTHTX +brIpiSkKp4S9zQfcmWgTN4Gq0SwK/lLc5Zqs/U/TtfrDtXeiwFeOe99txkRe +deYRXz6JgkfNhjZuQyb65H1lOPynKBQ2Wg2AGhNtfy2R1D0vCkJlJ4pV5FjP +D6VKZ9c6MXhuO95SSWQ9L93j2W94xcBtik3anpNVP5qpE26vGATUd4U39jCQ +vkP6LzVtMXjQIfYrrZWBuIPHwywPiIFdf6rv+2oGulsfkRd3VAwuRWVLQSoD +OX97r1bkLgY4HonKs5EMtGuzZMsrXzGgKg0Sp30ZqNKwenzTVTFIvvtFsfEg +A10+vTmInCgGXiMqM/zqDKQXa8GtnSYG6o2Rz3NIDNT5bnJPUKkY6Cr0yXnP +l6NpG5Lf7x4xIKwrWQhLKEcVAV6beYbFQLMkVDbofDm6dPdpivykGDzN95rP +tCtHnAPWNW5s4mAzvL3OiVCOpFyvrRvYJQ6+BXvT87PL0GRUT/yqsjgcWx04 +3xFchhgPqCQ8Eod+rj41kkMZ0p6s22dlzjo/ziW1R7AMOZybi359URyG3Nqc +RANLEeWWtuhYhDhsK/ohEGpeytofbhRujhMHE63CScFdpSjgj/Rb7VxxEPjd +GN7TWYJuhjkIVL0WB3Pb/CUSoQS9jn+ZcU9MAtSij0QwFQqRRlEq41KtBGxo +ytzf65KHdLvbVyebJUD0gttB/9V7yHjdhv2O7yXAXPh8vsTNe8jZzKMHfZMA +cvLfbbUNuUjvIuFy8EZJUOo8bPCRmoO8JOZztGQkob/UXPI8WyaaK49rXtot +CQHvT9spamegAH2Zn6XKkqDy6hTfnpB0FHH2qCoRk4SRSl1yyYY0dLu+tZnN +VBIOO2RrrZFuowbXjJ/1fpKQZPImk7sjCRn8UecNvCgJ+9z+vIhVTkLtcZ2q +ysGSUFzTFNSckoh6qrYE516VhDM3cJ+uuiWgyW2+vBF3JeG4g0Pdkmwc8snk +VqNnSQJ5mGa70fAGWlQusJu7JwmFU4a1AygWsTv057oUS4Kn2q+Wv7RrSLhE +X03vhSSo6ogcagmMQmm6Q3Z/myTB76f9N/KdSETsCQp+/EoSguwPKqnVXkFy +bOUt1A+SkPxTNchOOAKVJR+c7O+RhBnzD4I2B8PRXplR3lv9kiCv+PzZQGQY +0rYQO7J5VBJeyMzVOXCFopejFcG1E5LwXSL7uYpNCDoQZHbv/IwkmF20Vj9y +PxhZ50VOfl+WhLGFwh1ZJZfQ6cWZ4GYuAkTqSMl5//BHGmdPCI7wEqDgc44k +o/IC4hj79JBdmABvo+q+zyScR/d667swIgHWDvDN+7meQ74We08fkSKAtHxz +op6TL9Jue7Q+QJYAvq1Wf4kuPqj/2U1Zpirr+usnTLdGn0WP1La+eK9JgDfF +jzlSHnihgJJL1tNAgNIft/u87nsiwWzXUBkjAtxCzMCTYafRMK5PyOAQAWLj +LloSt55CZYmHCk9YEmCVv28jR5YbMolQ/5jlSID2qsIvTqsnkPjfwjO1xwmQ +fTEt7/NzFzThR2T/7EaA7dm+n5OSjqOok9vkhX0JMCjNxvf+2DFk9fVyvYo/ +AX5rXRZzt3dCZNtZG/NLBJinuM87HT+K6ow+h8VGEaDRRDjTVMYexTaYijy6 +TgBD1ngqXLJDR+hNRS0JBMiMsl6yGDmMluSLezakEeDvjmZu/G8r1JxP8iRm +E+DUpPNpUrIlSpZM2QD5BMCrsOtpGlkgRd6Q3RdLCUDuDBO6M2qK1sXMNaQ8 +JsA9h/6bXm8OoXZ2d9vHNQRwmvXz+Bptgk7NmUXMNBJgtjje62qlEdLweInb +/ooATy/t3ZixYIA4vmuWyL4lQDgmduWbiT7K/Ujudf1EAOVRjXGz/fuQt2mq +V8QXVrzfc6oawzoIWrk25QwTwHmrLlfHTW3ErRN6p+4HAbgeXW0QtNNCn2vm +9/RPEkAnvjqCQwnQI+VTTSu/WfkfbTB0V8dQQOEXO5El1nzIJP9ykachwYzm +KxbsRDjT6rTDwm8vGhaii3pzEMGk2iB9pVEVlcWVlt7gIsLrILX5oj0qKHgL +dX8hLxHG/fJwswwlZBJ6u69ViAhsWeoPnEwVkfgKt/eoKBH2tkqeSd+ggCZ8 +wjZvIhJhbGd33fPbu1GUy2lFLVkihBiyi6qryCCr/oGXDgpE4Mng1LitLo3I +1pb2gapECO8J3TXoKIV+vWn5lapJhNC8kGXOPAqq08eiKoAIvNG6YXu2klHs +8zKxD/uIIJly9uLFaCI6oiFV/suQCG6kY9HKFAJaktnRL2dJhFNfq6+s6Imh ++TRciJItEX4kDA7v5cWj2e0UsrojEZRX5bs6NoigmZDdL7HjrPXMjGmZigqh +yd/q7rpuRFhKt2q2sRJA4y66XIYeRFDJH9EuL+FDo93GJSY+ROBbl3TQQJoX +DdY4z9sGESHs2Ezi80/c6IucR+rRUCJsb36jFOPOifoyLtBORBLh8Qci3mLn +VtTDE/bl1DUi3Lop/2k9DwfqCrseejaeCOQQ2aQCwibUMXeLcj6ZCJvfH8m4 +br0BvXXNbg68QwRPQyUNfAkbajWq4I66R4Qm2eOjxy6vYS+fPi+9/oAIMwv9 +tOLhP1jD7tcWicWsfLzvdz0JWsaeZ3UtpDCIcHFYXLNTbxF7xvf1dnoVEfyy +jxRcpM1jNRHj9NxnROiW3Z7rYzeLVS7MDRTUE6E6ZC2rPPMXVta7VYrZRoTh +Qu1v7ylTWPFBgdbq90Tw+vX9bPS5CexRrcSZum4iqKc73XJY/YEVKOza0dRH +hG9J35O3Vn3H8nKUy199JcLTsVsfbuZ+w3IEkNW7ESJkxadLmTwZwjIjDZa6 +xokQ/WXP4eY/X7G0JfO7fdNEmOdQ+f3u2AB2+5QDGpwjQsuVbu/Jrs/Yrc8n +B78vE8H25VDtrFQvlmTiE/FzjQiR/UPjWeUfsfjnQTt/byBBt3n9Jq1zXVis +UtSrxS0kWJazLfY72YnF3Evw+MtNgi1PPbk1r77HooTSeDbws1xxQKaz4y0W +cTWfsUWEBEWpeTJZV9ux0JVS6+3iJJizNWvYUPYKu3zmyTI/iQQPMuWHZ3Et +WOCXpjTcThL411Tu4KhtwvxN34GkHAnUUYKuVmoD5lffO0RRJIFpr9JOjnsv +MB+VkSsyaiQoXtnbQuivw7zyp6UVaCS4nq+RaB7yDPMQWXmtqkUCfb7164UT +arBTMRu9aHokqLIJ5lz9XomdXN3Op21EgvrDo0aLgY+xE564x/sPkeBHkqz9 +JSMG5vyVfPigJQlCMkpp/sZl2FHz3X/MbFn5N3/ch0JKMPtG9QwbRxLUHnuW +J1BbiNmq6Wo7HCeBd96v8eHWB5h1gfE3ZzcSkBnbvOrF72MW+MNRbh4kWFPS +fUVm3MNMrzvLePqwXFuUxRmRgxmvnWn3vUCCDe0b+NmvZWFGZy+cDQgisb7X +5/j4ozIw/aFQ/uBQErjGfbtBNb2L7bO8XhERSQJHX+OISfdUTPvlLduYayTA +VRjq97QlY0g9ezUungRmgdjEOp8kjPbwUWZyMgl81e6+FrNIwHolH2bsu0OC +1z6Hk9uj47CA5IL02QwScF6UYA59vI4Jc95Py8klAWkbm4v5WDRWEZJ316yA +BOf1iAqftKMwq4XcO+uLSNDTfp6frS8Cmz2dc7ukjAQ6CV+ODBeHYYmDWamO +FSTY4eI9KVYVginaZKZwPyGBxFzXx6hvl7F3bem3ntaRwF5RzrOyJBDz0klL +Pt1IArTseyL9lT+2verOTXwrCTJlXoY3y5/HiuRvJ7W2kyB+W9GAR4cvdjA3 +JdG/gwRE1TueLuXe2ITIrYSdH0lws7axmrvFC4u+cTO+u48E7sq3DDLEPTDp +jUlxV76y1pf21JqD/RTWHJBwQ2WEBDbpIDOmehI7MR0XOzxGAgpIjNwtc8E2 +nrhxPXGKBGdLzT7KeTpjub3Xr2nPsvqb0B9pcsIJ0zG9FjOzSIJ5nwRcMtkR +G2yKjs5cJcFpNnGLb712WAjt6lUTNjLQ2zaul/lhg0mWRUb93USGrvmMR6M6 +Vlit1JXIwm1kCH4zmuIxbI45pIVfObKDDEHtCr+a602xP7xhEdsEyKBMPqZr +X2GC3YkKCa8WIcObl0laQwcOYBp/L4e5iZOhWuGz3le6AfbR51KoMIkMJc3X +RflD9LDzPwJDXkqRIe4VSUSSWxcTdLwY7CdLhqwVHc+Ln7UwZqf/ZYoCGW4y +9LsZbxFmYXjhUqcKGfixXb80TGnY71q/oDANMhiR9kWFKKhjCSrnAhURGZy/ +PGDedlXFFB76XPyqQwae4Q8mt8aUsLeS3gFx+qz14pesPMoUMI9kL390kAxm +GbOWbZ67MS5OzwuTpmQo66jP3vhDBnsUcuZ8mhUZ1OZPaH5u2IkZLpzyO2DH +cvkc8fMiBftx2v3ciiMZnsS3p2ZdJGFRgyd9Hxwng+n3XR+f6RIwKRtXn8Nu +ZPAofFZ3KFUca2pz8ebwIEPqB6vDKiJ4zEXn+NkKbzJkOtLYuVeFsA1Vx7xO +nCfDdkqWC5uGAJYj7+QpEEiGygkJG4cmXkw719GjIZgM6qPUXb6pO7ABEYcz +PhFkkCzamsduzYVdvnHkNDGaDCvm768qjG/BxDfanXoXSwbZjES9HUObsCcB +h92DE8mgZ9ixL0FpA2Y3be22O4UM+jeTnn56vx5bdrE62X+XDI2DLc2aXmv0 +1F4L1+tZrP6eWC7hqFih7zU1P0HLI8NWy/oPxNOL9O4mU5fxB2T4Y32MSzhs +ju5HO3T8djEZvsZOj3RM/6ILlBk7GzDIIDre5xHwcJrOkDp4bLGSDNbGMnHX +LX7SzdKMnPKfkuECI/vsp9Yf9Blew6NWL8jgicnnrXs0Qv94mvjW/SUZHj69 +RhNkDNHrmpbR5des8z+Vu6+KfaXfl+woTnxHBr+pEXbrys/0uICHEve7WPNR +brZ8o7WHfqEz7MaTXjLcE/UhLjh00Y/KH1l7O0CGWeHEnfwuHXT9KGXPb9/I +sHOzoNj59rf0PYOcX5bGyHB+effwb9E2ujDtmzH3NBmY013hvMot9HXJT58R +58ggnuIq8b29kT46dVNebZkMaYcsLwT2vaC/MfBIN1pjzW+9pOLawTr64xw9 +7qMbKJASZ9k5J/uEnr4qfsl3CwV8JCpTMctK+hXrhZ9R3BTYeSvvlPB6Jt2j +9I19Gh8FDPxXBPQlyuhW2+63lQpTwMLphnOsVjEdcwmmN4lR4FWctdzK9AM6 +tdam8BORAoon+J5vUs2nc4koiE1JUaDofhXnhz859FnvLdfZ5ShQbq2sLq6c +Re97/fWPkCIFNknSvjBT0+gN1OrTsmoUOJQVNjnnk0p/FJzQBzQK3OG+0Wcw +cJOe9Mn9gKUWBaiqk5v/tCbQA5V1nrjpUWCdc8GFGWIc/XgsXvaSEQXKjs1F +5pfF0I1Gf99JOEQBuv3WpJgXkXRF7dfb8i0p8G19zoyOYzgddzf3Yo0tBZZ5 +W9+GnAuhs80Hjr9xpIDek4fiYj+C6GMmlnbDxylQHB7TNHrHn/6+QO7VohsF +egut/Y+PnaNXs2/S5PKkALQ6TP165k3Ptu9/QPClwEaTwX2jm7zoVyse41T9 +KZAqUcNvdPwU3YvnRrThJVb9hwSfhLq40m1OuS47hFGgU7CM+8KSMx0akbtP +FCvfuTMLAduc6DslhD9FXqdAdEuOuxefPX2H/7TB3QQKtIbjpx622NAX3zdX +ldyigJI8j6WmhCV9QDZLuvEuBb7mWQUfWzWlN1/xT+3JYvVLN6dDOsuYXjJg +umUyjwJdS7u4t+0wpKdo7PJne0SBLY6W8TG79OjBSWw/BEsp4IR3dhnq1qa7 +Tn6ykXlMAZG2nIJ2NqAb65c3oxoKuKsIXJJU1KSrZsfstahjxSf+xG0TVKOL +/3G+f7KRAoGysyoJyUr0TVY04aBWCuTfs52pv7uHPlnMHxX/hgJNwemyS9Ky +9K4tPxfudVJgrEmt5nOfFP2Zc6NrdQ8F2AUFH/qrkOl5T9O62/tZ8RkD+zA8 +gR4r5Ld/aIgVHyeYeeyXKN3vrHHFwijr7SNTFtARIEx3eEWV4pykwLkYowp6 +KT99H2UtWfI3BWoucLyLvchDl73cvUllkQKeErUXRCK56Pw9xX4GqxTQkZPU +jp3goP9RjBqxZ6PCdxqxU33zRvrwtaNW3pupkF9gfD+vZj3dY0yWuIeTClc3 +Hy0sof2lLexf+vlzBxVamhZvPWlYogXfa6x6KECF+xsqP0T/nqNtZU+IcMNR +YfT7Wz1K6S9a0lEHUykJKgwMJr36/W6KJvZsl9g3EhW00oOb6nnHaXn4hdHs +nVSISr5/13vTd9oe/3rGUTkq1M4XSG5NHKJVd90IFlekQt6s3W3D7AGajvKR +A32qVDBqsJ400O6jvY7fKXxbkwrK4o7sN/5206ymZoesgQo3NY6pnrPvpA0c +eF4ssI8KxY3ycYL739HcH1y/2GFAhRD3Bw83GbfRZjfb7o83pkLHxMquyO5m +WpALlc/EnAoVZ8g/OjkbaXGStQ9aj1Ah8c+XViWFZ7TcXmttvRNU0OCida5L +Z9Lk1cncG05RIWdYxqJtfxmtInm657knFZ5IpaWXfi+itZpePUv3p0Lz/h88 +Ztx5NItiS/pKEBWK5PALnBnZtM+cxC1VoVTowaXNUD0yaNMvqzOVr1FBas14 +pMIumSaITbyRyaDCi6vsUy/Dr9Ay71Te+ZFDBZlvpjF2v0Np0kvhrvn3WfUT +ODC5ZfAyjcYQWyOWUeHS8zFKS5QfzXmXiTyukQqOEX2oyvUErUSw7BrHOBX0 +f0X1fqvaRzOYOm/wTVUKXM/W6JuNs9FEFcSvcNCkINGv0Vpl9q/mpHfDCxkt +KTDpLAlxN1nSTJrfQfM2koI95rllG0amNftXC+TXHKXAPEvKKmb+s6Y3Zx+f +yFUpMObfiV/YXKF5Wxr6D/RKgR/f6tmWkZOaE84cPozLO8GidyXi2fkGDT2y +EFvkC2nQXPe2uaj0mDpvGzW2ZGoXcJTuXu/c9VtNNKr4kKqqLNhdV2VI3wDV +FBn1HXyucjBXpfW282m4citOS+V3vDx83usbwG1bpqgh+iJud9du4Pd03eaS +kbiHmz3b1yl0D8j7O+1nfjgvLx4iQTtMVYAM/qvlC1XbZLdQjjw2e6kA1ceN ++0+fvCItTxcpPm+vCEu+m/ef0+GW8u7nrTdcpwRRxnj7PdF08tTva5YGKUpg +UD9bFrs7iLB/d9NtAzllUFLL2nbDo1D82W/NlYV2ZTATN5Z2woLxHrKKn965 +qEBhz3e7/T5uwvTJ452Ht6jCuv//20cWPsiV/c87g6MvvFBT+8+7XNRrKZ/+ +2eXZyXDG2b3/uTaz8/iMgPp/nr2/trC74p+dKQ+33D6o8Z9ndiWqlk3/c2Xu +yte5KM3/bKtLAk1x2n/Gn4mskq/7Z4Gtp0sPWtP/c65OUMD04X9WDIrVSTzy +z8bTJR8+Ov3zla65JefT/7yYfVk7IOSfP2kmduQ9/OeT53LvGhT983wR02Wi +5J95iR8XFB7/sxGHmOjTun9+0pl3vOPDPxtyV8r5ffznj/tb5oV7/3m2ejzK +YeCf5bL2FP4Y+594n7T8rv38n3j85mj39D+fiDz3znfuf+LVXbkttPjPocu3 +nKuX/3mHcoGs/eo/p5+pnltb++f/A/RCWfc= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -3183,150 +8656,203 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJxN1nk0Ve/3OPCiQYUyc6/pjpKhzOHe82xDMhSZRUiSqBBSRBkjSqZEZRap +zPdmqihDKBqIRBKSkKHMku/9rfVb7z73j3PXa51z9trP3vs85xCOeZq5sK1b +t46bdfh///P9LQ3kmFzsa9+Ie72qIdaZLuyv9TEUnfdbNv2wbScCgTfHhD8m +IEV9zu93t+1FfocedLN/zEZsI53V3tv0Ec+kUMJSdxnK/2DWStlmg748Mfac +7X6BdLUNpyS2nkR65LHPM93v0eHCLf0Smy6gpW61m9Pdg6jSS7tYYT4S1evk +577L/o2yupmmVUUpSPRL1cgx2VX0akb6RPz6bMR/2vHBZh12GOvaXlavmI8S +FPRqjC05YP/lG1knDj1CPSl76mZ2cMHy32te7Nol6HbHw+1+FC5oTBkhnDMs +QbbcUo7L6lwwucVkZcCsBPWFif1lc+YCvaunxfKdS9CAx1YaP5MLOHqCvk6E +l6BR3eEK1cPccNQ3/uqRphK0OH2r+GLWdrhT90jwmW4pism9/IZNhAeWJ2mF +pN1lyFDZjVeAxAMu83q9UypliKPBzFJKjgc8edWWmLQyFD5E6TXS4oGfy7Vr +uw3LUCDx9UiSGw8U3p/g7z1ehjwyhf9Sq3nA1NbVijO1DJneLZU1suMFR6f+ +2x1/ytAO2Tue9i68MJcqltTLVo7aa8LLPD15wTfX3O4zRzky7LXemxTGC42V ++w6185cjbdxfnc8PWfcvnnjqIluOlFMM7Tz/8EL9taJFN9tyJJQ0dDUxjQ9O +75/Uqi8tR8IyzPDFPD6we3nFs+BxOcK9uHLZvoQPNo3uloquKUfi09LnpOpZ +djBW0mwsR5QDXkdrRvkg+PBlpt3HcqS0YVV1SIkfwhzGJZJXy5GJr+CwYis/ +mLfIrZvSYaBD20b7b3XwQ1mg3gxFn4HMsqt6/vTxg1P5nIv1AQayenvkTdMU +P5gYTPQUWDCQvWxOta2AAPjMxI9zujDQqeHd8aFHBWDe363yVTgDRVoYYO/n +BcD3T2SMbB0D4RjtOLb1ghBrZr+2Vs9ARXwWCwrbBOESJY+97SUDdb13KImX +EITVlq/PzN8wENnUl2iqLwiucYNb+PsZ6MXBjE1vUwXBTyPD6OgyK59C8tBa +jiCQZPJmX68y0Bjng9rdRYJg+PC9stJ6JuJ5zbhw44UghPRWBE5sZqKjhq1j +xuOCMFFF0OAVYKJVvbn2NpoQ/Iqdm94lz0RxeQEPV/WEYOTCmKmCAhORN62L +kjMVgvaBDnMFZSY60LhV67qLEKx42dPFNZjoto5k+YFYIXC3aat5uI+J9oLR +rVdfhGDfpRyeZDsm8lHPcmwJFYZNUd9LCkOZyDCTe9bomjA0a93uqw9nIuLm +wKj2m8Kw447hjc4rTPS206q0474wcGe/jf4WzUTyXpzs/e3CsLtxqr8xgYlG +887n/cKJAMGX0H45i4lqub5pnCOLQERB6xEsh4mSfc3eLMiJQBgjy30hl4n2 +acst/gERCDBwXrG5z0TZnwcNNruKwORLWk5PERMd4Tf+iS8XAR5GDLGtmomU +LtaEpD8RgaMThxsUnjDR1sGdgoQmESjH90THPWWiqmJ2RO0Rgdi38Ra0OiYS +NKqK27MmAl1nPDSNGpnoZymVUs6Bg5k7026Xm5ioQTipSoUXBxU8PaqFL1n1 +GPEY1KDgoNV5s8FcC2u9IWTlfUY4cNFUlFBuZ6L80fjmlxY4WDM8Jab4hoku +mawdMXTAQeD+HY93vmUiObFPESZnccDfpf/37zsm2hC+H/c+AAeWBzr0+98z +Ud8Yo8giHAdxjnrOzA4miq680X34Fg42yk3wGH5gIieJ1VN9mTjoNBiT2NzF +6tcV93WOD3AwqDQ4Xc3yjp/dSV/LcZC+ckjFpZuJvpvvkz7+FAdfmJopGz8y +0bPqsqcjTTiIThl6doflZIKkmdtb1v3R5/WlepjoTNT1kfEeHORI17fls6w7 +tRzgMYSDiza9A6KfmMhfP2nX8wkchH00EAlnuShL7hPfPA4meBVOf2F5aLnp +6ok1HOhtN7eX72UiYYuj6lUceHDaunjSi+WDhUuj23jxED+awn6P5dBNiSkO +eDw8XY5MfcVyhaOsfikZDzuxlNghlicqGxfY5fHgtbeePsEygdcx30oND4fu +tC0Os2x1atGqAPCwPDy2uY3lmIb4TX8M8LBX5mhBDst1YjKPjc3xMLuPynOS +5Tm/BpesI3gIzY45KcLyrrf2ArMueIie+tD2mJW/g/RCg54nHhIWhswRy4mh +cb6pF/Bwc+jN+jJWPZp7pckTIXgw1U94z8XyH+X6DiwGDzSNPIYpq54KsUfC +4pPwkP+h6Gogq/4nvs8pDqfhYXOUOPU6qz934Magaj4e+MIHDoWy+vk2dWfC +1RI8XKvdUG/byUQbfz/X6qvCg8uIh5QAq/8aB+xm5OvxoMuIwpWw5sXz3mxm +yGs8HMUtSu9izVPu3+uHOj/gQb7scGcIa/56rKXWSX3Bg8/4WhTzNRNxl9YV ++4/iQfBsRX59KxPpbLV1fD2Dh5dG8cEPmpnogvNvbokVPKzJlZufZM37oADV +o4FLFPIz+1OcnjORkGetmJCQKPj1GWukPmPtH802bW6SonCw7L5yZg0ThRB+ +BT6RFgWrtgd+vpVM9DggRna7kijomhf08zGZaLyD3OdEE4X1v25pBJYykaTc +sxjGPlHg1xXXf1jImu8v02OHbUShk/pJzOIeaz/YG337kZMofGQq8bRkMtFs +PMlwzV0UJv2+ca7cYfVH16ogN0gU0gW4W2PiWf1Jm7JZuCIKhroS9G8xrP7M +R3EYxomCwGqa6EwEEykW1LhOZYtC+dSpCX5/JnJlsxTSfiQK3+uGiVLeTHTX +brIpiSkKp4S9zQfcmWgTN4Gq0SwK/lLc5Zqs/U/TtfrDtXeiwFeOe99txkRe +deYRXz6JgkfNhjZuQyb65H1lOPynKBQ2Wg2AGhNtfy2R1D0vCkJlJ4pV5FjP +D6VKZ9c6MXhuO95SSWQ9L93j2W94xcBtik3anpNVP5qpE26vGATUd4U39jCQ +vkP6LzVtMXjQIfYrrZWBuIPHwywPiIFdf6rv+2oGulsfkRd3VAwuRWVLQSoD +OX97r1bkLgY4HonKs5EMtGuzZMsrXzGgKg0Sp30ZqNKwenzTVTFIvvtFsfEg +A10+vTmInCgGXiMqM/zqDKQXa8GtnSYG6o2Rz3NIDNT5bnJPUKkY6Cr0yXnP +l6NpG5Lf7x4xIKwrWQhLKEcVAV6beYbFQLMkVDbofDm6dPdpivykGDzN95rP +tCtHnAPWNW5s4mAzvL3OiVCOpFyvrRvYJQ6+BXvT87PL0GRUT/yqsjgcWx04 +3xFchhgPqCQ8Eod+rj41kkMZ0p6s22dlzjo/ziW1R7AMOZybi359URyG3Nqc +RANLEeWWtuhYhDhsK/ohEGpeytofbhRujhMHE63CScFdpSjgj/Rb7VxxEPjd +GN7TWYJuhjkIVL0WB3Pb/CUSoQS9jn+ZcU9MAtSij0QwFQqRRlEq41KtBGxo +ytzf65KHdLvbVyebJUD0gttB/9V7yHjdhv2O7yXAXPh8vsTNe8jZzKMHfZMA +cvLfbbUNuUjvIuFy8EZJUOo8bPCRmoO8JOZztGQkob/UXPI8WyaaK49rXtot +CQHvT9spamegAH2Zn6XKkqDy6hTfnpB0FHH2qCoRk4SRSl1yyYY0dLu+tZnN +VBIOO2RrrZFuowbXjJ/1fpKQZPImk7sjCRn8UecNvCgJ+9z+vIhVTkLtcZ2q +ysGSUFzTFNSckoh6qrYE516VhDM3cJ+uuiWgyW2+vBF3JeG4g0Pdkmwc8snk +VqNnSQJ5mGa70fAGWlQusJu7JwmFU4a1AygWsTv057oUS4Kn2q+Wv7RrSLhE +X03vhSSo6ogcagmMQmm6Q3Z/myTB76f9N/KdSETsCQp+/EoSguwPKqnVXkFy +bOUt1A+SkPxTNchOOAKVJR+c7O+RhBnzD4I2B8PRXplR3lv9kiCv+PzZQGQY +0rYQO7J5VBJeyMzVOXCFopejFcG1E5LwXSL7uYpNCDoQZHbv/IwkmF20Vj9y +PxhZ50VOfl+WhLGFwh1ZJZfQ6cWZ4GYuAkTqSMl5//BHGmdPCI7wEqDgc44k +o/IC4hj79JBdmABvo+q+zyScR/d667swIgHWDvDN+7meQ74We08fkSKAtHxz +op6TL9Jue7Q+QJYAvq1Wf4kuPqj/2U1Zpirr+usnTLdGn0WP1La+eK9JgDfF +jzlSHnihgJJL1tNAgNIft/u87nsiwWzXUBkjAtxCzMCTYafRMK5PyOAQAWLj +LloSt55CZYmHCk9YEmCVv28jR5YbMolQ/5jlSID2qsIvTqsnkPjfwjO1xwmQ +fTEt7/NzFzThR2T/7EaA7dm+n5OSjqOok9vkhX0JMCjNxvf+2DFk9fVyvYo/ +AX5rXRZzt3dCZNtZG/NLBJinuM87HT+K6ow+h8VGEaDRRDjTVMYexTaYijy6 +TgBD1ngqXLJDR+hNRS0JBMiMsl6yGDmMluSLezakEeDvjmZu/G8r1JxP8iRm +E+DUpPNpUrIlSpZM2QD5BMCrsOtpGlkgRd6Q3RdLCUDuDBO6M2qK1sXMNaQ8 +JsA9h/6bXm8OoXZ2d9vHNQRwmvXz+Bptgk7NmUXMNBJgtjje62qlEdLweInb +/ooATy/t3ZixYIA4vmuWyL4lQDgmduWbiT7K/Ujudf1EAOVRjXGz/fuQt2mq +V8QXVrzfc6oawzoIWrk25QwTwHmrLlfHTW3ErRN6p+4HAbgeXW0QtNNCn2vm +9/RPEkAnvjqCQwnQI+VTTSu/WfkfbTB0V8dQQOEXO5El1nzIJP9ykachwYzm +KxbsRDjT6rTDwm8vGhaii3pzEMGk2iB9pVEVlcWVlt7gIsLrILX5oj0qKHgL +dX8hLxHG/fJwswwlZBJ6u69ViAhsWeoPnEwVkfgKt/eoKBH2tkqeSd+ggCZ8 +wjZvIhJhbGd33fPbu1GUy2lFLVkihBiyi6qryCCr/oGXDgpE4Mng1LitLo3I +1pb2gapECO8J3TXoKIV+vWn5lapJhNC8kGXOPAqq08eiKoAIvNG6YXu2klHs +8zKxD/uIIJly9uLFaCI6oiFV/suQCG6kY9HKFAJaktnRL2dJhFNfq6+s6Imh ++TRciJItEX4kDA7v5cWj2e0UsrojEZRX5bs6NoigmZDdL7HjrPXMjGmZigqh +yd/q7rpuRFhKt2q2sRJA4y66XIYeRFDJH9EuL+FDo93GJSY+ROBbl3TQQJoX +DdY4z9sGESHs2Ezi80/c6IucR+rRUCJsb36jFOPOifoyLtBORBLh8Qci3mLn +VtTDE/bl1DUi3Lop/2k9DwfqCrseejaeCOQQ2aQCwibUMXeLcj6ZCJvfH8m4 +br0BvXXNbg68QwRPQyUNfAkbajWq4I66R4Qm2eOjxy6vYS+fPi+9/oAIMwv9 +tOLhP1jD7tcWicWsfLzvdz0JWsaeZ3UtpDCIcHFYXLNTbxF7xvf1dnoVEfyy +jxRcpM1jNRHj9NxnROiW3Z7rYzeLVS7MDRTUE6E6ZC2rPPMXVta7VYrZRoTh +Qu1v7ylTWPFBgdbq90Tw+vX9bPS5CexRrcSZum4iqKc73XJY/YEVKOza0dRH +hG9J35O3Vn3H8nKUy199JcLTsVsfbuZ+w3IEkNW7ESJkxadLmTwZwjIjDZa6 +xokQ/WXP4eY/X7G0JfO7fdNEmOdQ+f3u2AB2+5QDGpwjQsuVbu/Jrs/Yrc8n +B78vE8H25VDtrFQvlmTiE/FzjQiR/UPjWeUfsfjnQTt/byBBt3n9Jq1zXVis +UtSrxS0kWJazLfY72YnF3Evw+MtNgi1PPbk1r77HooTSeDbws1xxQKaz4y0W +cTWfsUWEBEWpeTJZV9ux0JVS6+3iJJizNWvYUPYKu3zmyTI/iQQPMuWHZ3Et +WOCXpjTcThL411Tu4KhtwvxN34GkHAnUUYKuVmoD5lffO0RRJIFpr9JOjnsv +MB+VkSsyaiQoXtnbQuivw7zyp6UVaCS4nq+RaB7yDPMQWXmtqkUCfb7164UT +arBTMRu9aHokqLIJ5lz9XomdXN3Op21EgvrDo0aLgY+xE564x/sPkeBHkqz9 +JSMG5vyVfPigJQlCMkpp/sZl2FHz3X/MbFn5N3/ch0JKMPtG9QwbRxLUHnuW +J1BbiNmq6Wo7HCeBd96v8eHWB5h1gfE3ZzcSkBnbvOrF72MW+MNRbh4kWFPS +fUVm3MNMrzvLePqwXFuUxRmRgxmvnWn3vUCCDe0b+NmvZWFGZy+cDQgisb7X +5/j4ozIw/aFQ/uBQErjGfbtBNb2L7bO8XhERSQJHX+OISfdUTPvlLduYayTA +VRjq97QlY0g9ezUungRmgdjEOp8kjPbwUWZyMgl81e6+FrNIwHolH2bsu0OC +1z6Hk9uj47CA5IL02QwScF6UYA59vI4Jc95Py8klAWkbm4v5WDRWEZJ316yA +BOf1iAqftKMwq4XcO+uLSNDTfp6frS8Cmz2dc7ukjAQ6CV+ODBeHYYmDWamO +FSTY4eI9KVYVginaZKZwPyGBxFzXx6hvl7F3bem3ntaRwF5RzrOyJBDz0klL +Pt1IArTseyL9lT+2verOTXwrCTJlXoY3y5/HiuRvJ7W2kyB+W9GAR4cvdjA3 +JdG/gwRE1TueLuXe2ITIrYSdH0lws7axmrvFC4u+cTO+u48E7sq3DDLEPTDp +jUlxV76y1pf21JqD/RTWHJBwQ2WEBDbpIDOmehI7MR0XOzxGAgpIjNwtc8E2 +nrhxPXGKBGdLzT7KeTpjub3Xr2nPsvqb0B9pcsIJ0zG9FjOzSIJ5nwRcMtkR +G2yKjs5cJcFpNnGLb712WAjt6lUTNjLQ2zaul/lhg0mWRUb93USGrvmMR6M6 +Vlit1JXIwm1kCH4zmuIxbI45pIVfObKDDEHtCr+a602xP7xhEdsEyKBMPqZr +X2GC3YkKCa8WIcObl0laQwcOYBp/L4e5iZOhWuGz3le6AfbR51KoMIkMJc3X +RflD9LDzPwJDXkqRIe4VSUSSWxcTdLwY7CdLhqwVHc+Ln7UwZqf/ZYoCGW4y +9LsZbxFmYXjhUqcKGfixXb80TGnY71q/oDANMhiR9kWFKKhjCSrnAhURGZy/ +PGDedlXFFB76XPyqQwae4Q8mt8aUsLeS3gFx+qz14pesPMoUMI9kL390kAxm +GbOWbZ67MS5OzwuTpmQo66jP3vhDBnsUcuZ8mhUZ1OZPaH5u2IkZLpzyO2DH +cvkc8fMiBftx2v3ciiMZnsS3p2ZdJGFRgyd9Hxwng+n3XR+f6RIwKRtXn8Nu +ZPAofFZ3KFUca2pz8ebwIEPqB6vDKiJ4zEXn+NkKbzJkOtLYuVeFsA1Vx7xO +nCfDdkqWC5uGAJYj7+QpEEiGygkJG4cmXkw719GjIZgM6qPUXb6pO7ABEYcz +PhFkkCzamsduzYVdvnHkNDGaDCvm768qjG/BxDfanXoXSwbZjES9HUObsCcB +h92DE8mgZ9ixL0FpA2Y3be22O4UM+jeTnn56vx5bdrE62X+XDI2DLc2aXmv0 +1F4L1+tZrP6eWC7hqFih7zU1P0HLI8NWy/oPxNOL9O4mU5fxB2T4Y32MSzhs +ju5HO3T8djEZvsZOj3RM/6ILlBk7GzDIIDre5xHwcJrOkDp4bLGSDNbGMnHX +LX7SzdKMnPKfkuECI/vsp9Yf9Blew6NWL8jgicnnrXs0Qv94mvjW/SUZHj69 +RhNkDNHrmpbR5des8z+Vu6+KfaXfl+woTnxHBr+pEXbrys/0uICHEve7WPNR +brZ8o7WHfqEz7MaTXjLcE/UhLjh00Y/KH1l7O0CGWeHEnfwuHXT9KGXPb9/I +sHOzoNj59rf0PYOcX5bGyHB+effwb9E2ujDtmzH3NBmY013hvMot9HXJT58R +58ggnuIq8b29kT46dVNebZkMaYcsLwT2vaC/MfBIN1pjzW+9pOLawTr64xw9 +7qMbKJASZ9k5J/uEnr4qfsl3CwV8JCpTMctK+hXrhZ9R3BTYeSvvlPB6Jt2j +9I19Gh8FDPxXBPQlyuhW2+63lQpTwMLphnOsVjEdcwmmN4lR4FWctdzK9AM6 +tdam8BORAoon+J5vUs2nc4koiE1JUaDofhXnhz859FnvLdfZ5ShQbq2sLq6c +Re97/fWPkCIFNknSvjBT0+gN1OrTsmoUOJQVNjnnk0p/FJzQBzQK3OG+0Wcw +cJOe9Mn9gKUWBaiqk5v/tCbQA5V1nrjpUWCdc8GFGWIc/XgsXvaSEQXKjs1F +5pfF0I1Gf99JOEQBuv3WpJgXkXRF7dfb8i0p8G19zoyOYzgddzf3Yo0tBZZ5 +W9+GnAuhs80Hjr9xpIDek4fiYj+C6GMmlnbDxylQHB7TNHrHn/6+QO7VohsF +egut/Y+PnaNXs2/S5PKkALQ6TP165k3Ptu9/QPClwEaTwX2jm7zoVyse41T9 +KZAqUcNvdPwU3YvnRrThJVb9hwSfhLq40m1OuS47hFGgU7CM+8KSMx0akbtP +FCvfuTMLAduc6DslhD9FXqdAdEuOuxefPX2H/7TB3QQKtIbjpx622NAX3zdX +ldyigJI8j6WmhCV9QDZLuvEuBb7mWQUfWzWlN1/xT+3JYvVLN6dDOsuYXjJg +umUyjwJdS7u4t+0wpKdo7PJne0SBLY6W8TG79OjBSWw/BEsp4IR3dhnq1qa7 +Tn6ykXlMAZG2nIJ2NqAb65c3oxoKuKsIXJJU1KSrZsfstahjxSf+xG0TVKOL +/3G+f7KRAoGysyoJyUr0TVY04aBWCuTfs52pv7uHPlnMHxX/hgJNwemyS9Ky +9K4tPxfudVJgrEmt5nOfFP2Zc6NrdQ8F2AUFH/qrkOl5T9O62/tZ8RkD+zA8 +gR4r5Ld/aIgVHyeYeeyXKN3vrHHFwijr7SNTFtARIEx3eEWV4pykwLkYowp6 +KT99H2UtWfI3BWoucLyLvchDl73cvUllkQKeErUXRCK56Pw9xX4GqxTQkZPU +jp3goP9RjBqxZ6PCdxqxU33zRvrwtaNW3pupkF9gfD+vZj3dY0yWuIeTClc3 +Hy0sof2lLexf+vlzBxVamhZvPWlYogXfa6x6KECF+xsqP0T/nqNtZU+IcMNR +YfT7Wz1K6S9a0lEHUykJKgwMJr36/W6KJvZsl9g3EhW00oOb6nnHaXn4hdHs +nVSISr5/13vTd9oe/3rGUTkq1M4XSG5NHKJVd90IFlekQt6s3W3D7AGajvKR +A32qVDBqsJ400O6jvY7fKXxbkwrK4o7sN/5206ymZoesgQo3NY6pnrPvpA0c +eF4ssI8KxY3ycYL739HcH1y/2GFAhRD3Bw83GbfRZjfb7o83pkLHxMquyO5m +WpALlc/EnAoVZ8g/OjkbaXGStQ9aj1Ah8c+XViWFZ7TcXmttvRNU0OCida5L +Z9Lk1cncG05RIWdYxqJtfxmtInm657knFZ5IpaWXfi+itZpePUv3p0Lz/h88 +Ztx5NItiS/pKEBWK5PALnBnZtM+cxC1VoVTowaXNUD0yaNMvqzOVr1FBas14 +pMIumSaITbyRyaDCi6vsUy/Dr9Ay71Te+ZFDBZlvpjF2v0Np0kvhrvn3WfUT +ODC5ZfAyjcYQWyOWUeHS8zFKS5QfzXmXiTyukQqOEX2oyvUErUSw7BrHOBX0 +f0X1fqvaRzOYOm/wTVUKXM/W6JuNs9FEFcSvcNCkINGv0Vpl9q/mpHfDCxkt +KTDpLAlxN1nSTJrfQfM2koI95rllG0amNftXC+TXHKXAPEvKKmb+s6Y3Zx+f +yFUpMObfiV/YXKF5Wxr6D/RKgR/f6tmWkZOaE84cPozLO8GidyXi2fkGDT2y +EFvkC2nQXPe2uaj0mDpvGzW2ZGoXcJTuXu/c9VtNNKr4kKqqLNhdV2VI3wDV +FBn1HXyucjBXpfW282m4citOS+V3vDx83usbwG1bpqgh+iJud9du4Pd03eaS +kbiHmz3b1yl0D8j7O+1nfjgvLx4iQTtMVYAM/qvlC1XbZLdQjjw2e6kA1ceN ++0+fvCItTxcpPm+vCEu+m/ef0+GW8u7nrTdcpwRRxnj7PdF08tTva5YGKUpg +UD9bFrs7iLB/d9NtAzllUFLL2nbDo1D82W/NlYV2ZTATN5Z2woLxHrKKn965 +qEBhz3e7/T5uwvTJ452Ht6jCuv//20cWPsiV/c87g6MvvFBT+8+7XNRrKZ/+ +2eXZyXDG2b3/uTaz8/iMgPp/nr2/trC74p+dKQ+33D6o8Z9ndiWqlk3/c2Xu +yte5KM3/bKtLAk1x2n/Gn4mskq/7Z4Gtp0sPWtP/c65OUMD04X9WDIrVSTzy +z8bTJR8+Ov3zla65JefT/7yYfVk7IOSfP2kmduQ9/OeT53LvGhT983wR02Wi +5J95iR8XFB7/sxGHmOjTun9+0pl3vOPDPxtyV8r5ffznj/tb5oV7/3m2ejzK +YeCf5bL2FP4Y+594n7T8rv38n3j85mj39D+fiDz3znfuf+LVXbkttPjPocu3 +nKuX/3mHcoGs/eo/p5+pnltb++f/A/RCWfc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08538700588107573}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -3338,19 +8864,19 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08538700588107573}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3364,149 +8890,202 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJxN1nk0Ve/3OPCiQYUyc6/pjpKhzOHe82xDMhSZRUiSqBBSRBkjSqZEZRap +zPdmqihDKBqIRBKSkKHMku/9rfVb7z73j3PXa51z9trP3vs85xCOeZq5sK1b +t46bdfh///P9LQ3kmFzsa9+Ie72qIdaZLuyv9TEUnfdbNv2wbScCgTfHhD8m +IEV9zu93t+1FfocedLN/zEZsI53V3tv0Ec+kUMJSdxnK/2DWStlmg748Mfac +7X6BdLUNpyS2nkR65LHPM93v0eHCLf0Smy6gpW61m9Pdg6jSS7tYYT4S1evk +577L/o2yupmmVUUpSPRL1cgx2VX0akb6RPz6bMR/2vHBZh12GOvaXlavmI8S +FPRqjC05YP/lG1knDj1CPSl76mZ2cMHy32te7Nol6HbHw+1+FC5oTBkhnDMs +QbbcUo7L6lwwucVkZcCsBPWFif1lc+YCvaunxfKdS9CAx1YaP5MLOHqCvk6E +l6BR3eEK1cPccNQ3/uqRphK0OH2r+GLWdrhT90jwmW4pism9/IZNhAeWJ2mF +pN1lyFDZjVeAxAMu83q9UypliKPBzFJKjgc8edWWmLQyFD5E6TXS4oGfy7Vr +uw3LUCDx9UiSGw8U3p/g7z1ehjwyhf9Sq3nA1NbVijO1DJneLZU1suMFR6f+ +2x1/ytAO2Tue9i68MJcqltTLVo7aa8LLPD15wTfX3O4zRzky7LXemxTGC42V ++w6185cjbdxfnc8PWfcvnnjqIluOlFMM7Tz/8EL9taJFN9tyJJQ0dDUxjQ9O +75/Uqi8tR8IyzPDFPD6we3nFs+BxOcK9uHLZvoQPNo3uloquKUfi09LnpOpZ +djBW0mwsR5QDXkdrRvkg+PBlpt3HcqS0YVV1SIkfwhzGJZJXy5GJr+CwYis/ +mLfIrZvSYaBD20b7b3XwQ1mg3gxFn4HMsqt6/vTxg1P5nIv1AQayenvkTdMU +P5gYTPQUWDCQvWxOta2AAPjMxI9zujDQqeHd8aFHBWDe363yVTgDRVoYYO/n +BcD3T2SMbB0D4RjtOLb1ghBrZr+2Vs9ARXwWCwrbBOESJY+97SUDdb13KImX +EITVlq/PzN8wENnUl2iqLwiucYNb+PsZ6MXBjE1vUwXBTyPD6OgyK59C8tBa +jiCQZPJmX68y0Bjng9rdRYJg+PC9stJ6JuJ5zbhw44UghPRWBE5sZqKjhq1j +xuOCMFFF0OAVYKJVvbn2NpoQ/Iqdm94lz0RxeQEPV/WEYOTCmKmCAhORN62L +kjMVgvaBDnMFZSY60LhV67qLEKx42dPFNZjoto5k+YFYIXC3aat5uI+J9oLR +rVdfhGDfpRyeZDsm8lHPcmwJFYZNUd9LCkOZyDCTe9bomjA0a93uqw9nIuLm +wKj2m8Kw447hjc4rTPS206q0474wcGe/jf4WzUTyXpzs/e3CsLtxqr8xgYlG +887n/cKJAMGX0H45i4lqub5pnCOLQERB6xEsh4mSfc3eLMiJQBgjy30hl4n2 +acst/gERCDBwXrG5z0TZnwcNNruKwORLWk5PERMd4Tf+iS8XAR5GDLGtmomU +LtaEpD8RgaMThxsUnjDR1sGdgoQmESjH90THPWWiqmJ2RO0Rgdi38Ra0OiYS +NKqK27MmAl1nPDSNGpnoZymVUs6Bg5k7026Xm5ioQTipSoUXBxU8PaqFL1n1 +GPEY1KDgoNV5s8FcC2u9IWTlfUY4cNFUlFBuZ6L80fjmlxY4WDM8Jab4hoku +mawdMXTAQeD+HY93vmUiObFPESZnccDfpf/37zsm2hC+H/c+AAeWBzr0+98z +Ud8Yo8giHAdxjnrOzA4miq680X34Fg42yk3wGH5gIieJ1VN9mTjoNBiT2NzF +6tcV93WOD3AwqDQ4Xc3yjp/dSV/LcZC+ckjFpZuJvpvvkz7+FAdfmJopGz8y +0bPqsqcjTTiIThl6doflZIKkmdtb1v3R5/WlepjoTNT1kfEeHORI17fls6w7 +tRzgMYSDiza9A6KfmMhfP2nX8wkchH00EAlnuShL7hPfPA4meBVOf2F5aLnp +6ok1HOhtN7eX72UiYYuj6lUceHDaunjSi+WDhUuj23jxED+awn6P5dBNiSkO +eDw8XY5MfcVyhaOsfikZDzuxlNghlicqGxfY5fHgtbeePsEygdcx30oND4fu +tC0Os2x1atGqAPCwPDy2uY3lmIb4TX8M8LBX5mhBDst1YjKPjc3xMLuPynOS +5Tm/BpesI3gIzY45KcLyrrf2ArMueIie+tD2mJW/g/RCg54nHhIWhswRy4mh +cb6pF/Bwc+jN+jJWPZp7pckTIXgw1U94z8XyH+X6DiwGDzSNPIYpq54KsUfC +4pPwkP+h6Gogq/4nvs8pDqfhYXOUOPU6qz934Magaj4e+MIHDoWy+vk2dWfC +1RI8XKvdUG/byUQbfz/X6qvCg8uIh5QAq/8aB+xm5OvxoMuIwpWw5sXz3mxm +yGs8HMUtSu9izVPu3+uHOj/gQb7scGcIa/56rKXWSX3Bg8/4WhTzNRNxl9YV ++4/iQfBsRX59KxPpbLV1fD2Dh5dG8cEPmpnogvNvbokVPKzJlZufZM37oADV +o4FLFPIz+1OcnjORkGetmJCQKPj1GWukPmPtH802bW6SonCw7L5yZg0ThRB+ +BT6RFgWrtgd+vpVM9DggRna7kijomhf08zGZaLyD3OdEE4X1v25pBJYykaTc +sxjGPlHg1xXXf1jImu8v02OHbUShk/pJzOIeaz/YG337kZMofGQq8bRkMtFs +PMlwzV0UJv2+ca7cYfVH16ogN0gU0gW4W2PiWf1Jm7JZuCIKhroS9G8xrP7M +R3EYxomCwGqa6EwEEykW1LhOZYtC+dSpCX5/JnJlsxTSfiQK3+uGiVLeTHTX +brIpiSkKp4S9zQfcmWgTN4Gq0SwK/lLc5Zqs/U/TtfrDtXeiwFeOe99txkRe +deYRXz6JgkfNhjZuQyb65H1lOPynKBQ2Wg2AGhNtfy2R1D0vCkJlJ4pV5FjP +D6VKZ9c6MXhuO95SSWQ9L93j2W94xcBtik3anpNVP5qpE26vGATUd4U39jCQ +vkP6LzVtMXjQIfYrrZWBuIPHwywPiIFdf6rv+2oGulsfkRd3VAwuRWVLQSoD +OX97r1bkLgY4HonKs5EMtGuzZMsrXzGgKg0Sp30ZqNKwenzTVTFIvvtFsfEg +A10+vTmInCgGXiMqM/zqDKQXa8GtnSYG6o2Rz3NIDNT5bnJPUKkY6Cr0yXnP +l6NpG5Lf7x4xIKwrWQhLKEcVAV6beYbFQLMkVDbofDm6dPdpivykGDzN95rP +tCtHnAPWNW5s4mAzvL3OiVCOpFyvrRvYJQ6+BXvT87PL0GRUT/yqsjgcWx04 +3xFchhgPqCQ8Eod+rj41kkMZ0p6s22dlzjo/ziW1R7AMOZybi359URyG3Nqc +RANLEeWWtuhYhDhsK/ohEGpeytofbhRujhMHE63CScFdpSjgj/Rb7VxxEPjd +GN7TWYJuhjkIVL0WB3Pb/CUSoQS9jn+ZcU9MAtSij0QwFQqRRlEq41KtBGxo +ytzf65KHdLvbVyebJUD0gttB/9V7yHjdhv2O7yXAXPh8vsTNe8jZzKMHfZMA +cvLfbbUNuUjvIuFy8EZJUOo8bPCRmoO8JOZztGQkob/UXPI8WyaaK49rXtot +CQHvT9spamegAH2Zn6XKkqDy6hTfnpB0FHH2qCoRk4SRSl1yyYY0dLu+tZnN +VBIOO2RrrZFuowbXjJ/1fpKQZPImk7sjCRn8UecNvCgJ+9z+vIhVTkLtcZ2q +ysGSUFzTFNSckoh6qrYE516VhDM3cJ+uuiWgyW2+vBF3JeG4g0Pdkmwc8snk +VqNnSQJ5mGa70fAGWlQusJu7JwmFU4a1AygWsTv057oUS4Kn2q+Wv7RrSLhE +X03vhSSo6ogcagmMQmm6Q3Z/myTB76f9N/KdSETsCQp+/EoSguwPKqnVXkFy +bOUt1A+SkPxTNchOOAKVJR+c7O+RhBnzD4I2B8PRXplR3lv9kiCv+PzZQGQY +0rYQO7J5VBJeyMzVOXCFopejFcG1E5LwXSL7uYpNCDoQZHbv/IwkmF20Vj9y +PxhZ50VOfl+WhLGFwh1ZJZfQ6cWZ4GYuAkTqSMl5//BHGmdPCI7wEqDgc44k +o/IC4hj79JBdmABvo+q+zyScR/d667swIgHWDvDN+7meQ74We08fkSKAtHxz +op6TL9Jue7Q+QJYAvq1Wf4kuPqj/2U1Zpirr+usnTLdGn0WP1La+eK9JgDfF +jzlSHnihgJJL1tNAgNIft/u87nsiwWzXUBkjAtxCzMCTYafRMK5PyOAQAWLj +LloSt55CZYmHCk9YEmCVv28jR5YbMolQ/5jlSID2qsIvTqsnkPjfwjO1xwmQ +fTEt7/NzFzThR2T/7EaA7dm+n5OSjqOok9vkhX0JMCjNxvf+2DFk9fVyvYo/ +AX5rXRZzt3dCZNtZG/NLBJinuM87HT+K6ow+h8VGEaDRRDjTVMYexTaYijy6 +TgBD1ngqXLJDR+hNRS0JBMiMsl6yGDmMluSLezakEeDvjmZu/G8r1JxP8iRm +E+DUpPNpUrIlSpZM2QD5BMCrsOtpGlkgRd6Q3RdLCUDuDBO6M2qK1sXMNaQ8 +JsA9h/6bXm8OoXZ2d9vHNQRwmvXz+Bptgk7NmUXMNBJgtjje62qlEdLweInb +/ooATy/t3ZixYIA4vmuWyL4lQDgmduWbiT7K/Ujudf1EAOVRjXGz/fuQt2mq +V8QXVrzfc6oawzoIWrk25QwTwHmrLlfHTW3ErRN6p+4HAbgeXW0QtNNCn2vm +9/RPEkAnvjqCQwnQI+VTTSu/WfkfbTB0V8dQQOEXO5El1nzIJP9ykachwYzm +KxbsRDjT6rTDwm8vGhaii3pzEMGk2iB9pVEVlcWVlt7gIsLrILX5oj0qKHgL +dX8hLxHG/fJwswwlZBJ6u69ViAhsWeoPnEwVkfgKt/eoKBH2tkqeSd+ggCZ8 +wjZvIhJhbGd33fPbu1GUy2lFLVkihBiyi6qryCCr/oGXDgpE4Mng1LitLo3I +1pb2gapECO8J3TXoKIV+vWn5lapJhNC8kGXOPAqq08eiKoAIvNG6YXu2klHs +8zKxD/uIIJly9uLFaCI6oiFV/suQCG6kY9HKFAJaktnRL2dJhFNfq6+s6Imh ++TRciJItEX4kDA7v5cWj2e0UsrojEZRX5bs6NoigmZDdL7HjrPXMjGmZigqh +yd/q7rpuRFhKt2q2sRJA4y66XIYeRFDJH9EuL+FDo93GJSY+ROBbl3TQQJoX +DdY4z9sGESHs2Ezi80/c6IucR+rRUCJsb36jFOPOifoyLtBORBLh8Qci3mLn +VtTDE/bl1DUi3Lop/2k9DwfqCrseejaeCOQQ2aQCwibUMXeLcj6ZCJvfH8m4 +br0BvXXNbg68QwRPQyUNfAkbajWq4I66R4Qm2eOjxy6vYS+fPi+9/oAIMwv9 +tOLhP1jD7tcWicWsfLzvdz0JWsaeZ3UtpDCIcHFYXLNTbxF7xvf1dnoVEfyy +jxRcpM1jNRHj9NxnROiW3Z7rYzeLVS7MDRTUE6E6ZC2rPPMXVta7VYrZRoTh +Qu1v7ylTWPFBgdbq90Tw+vX9bPS5CexRrcSZum4iqKc73XJY/YEVKOza0dRH +hG9J35O3Vn3H8nKUy199JcLTsVsfbuZ+w3IEkNW7ESJkxadLmTwZwjIjDZa6 +xokQ/WXP4eY/X7G0JfO7fdNEmOdQ+f3u2AB2+5QDGpwjQsuVbu/Jrs/Yrc8n +B78vE8H25VDtrFQvlmTiE/FzjQiR/UPjWeUfsfjnQTt/byBBt3n9Jq1zXVis +UtSrxS0kWJazLfY72YnF3Evw+MtNgi1PPbk1r77HooTSeDbws1xxQKaz4y0W +cTWfsUWEBEWpeTJZV9ux0JVS6+3iJJizNWvYUPYKu3zmyTI/iQQPMuWHZ3Et +WOCXpjTcThL411Tu4KhtwvxN34GkHAnUUYKuVmoD5lffO0RRJIFpr9JOjnsv +MB+VkSsyaiQoXtnbQuivw7zyp6UVaCS4nq+RaB7yDPMQWXmtqkUCfb7164UT +arBTMRu9aHokqLIJ5lz9XomdXN3Op21EgvrDo0aLgY+xE564x/sPkeBHkqz9 +JSMG5vyVfPigJQlCMkpp/sZl2FHz3X/MbFn5N3/ch0JKMPtG9QwbRxLUHnuW +J1BbiNmq6Wo7HCeBd96v8eHWB5h1gfE3ZzcSkBnbvOrF72MW+MNRbh4kWFPS +fUVm3MNMrzvLePqwXFuUxRmRgxmvnWn3vUCCDe0b+NmvZWFGZy+cDQgisb7X +5/j4ozIw/aFQ/uBQErjGfbtBNb2L7bO8XhERSQJHX+OISfdUTPvlLduYayTA +VRjq97QlY0g9ezUungRmgdjEOp8kjPbwUWZyMgl81e6+FrNIwHolH2bsu0OC +1z6Hk9uj47CA5IL02QwScF6UYA59vI4Jc95Py8klAWkbm4v5WDRWEZJ316yA +BOf1iAqftKMwq4XcO+uLSNDTfp6frS8Cmz2dc7ukjAQ6CV+ODBeHYYmDWamO +FSTY4eI9KVYVginaZKZwPyGBxFzXx6hvl7F3bem3ntaRwF5RzrOyJBDz0klL +Pt1IArTseyL9lT+2verOTXwrCTJlXoY3y5/HiuRvJ7W2kyB+W9GAR4cvdjA3 +JdG/gwRE1TueLuXe2ITIrYSdH0lws7axmrvFC4u+cTO+u48E7sq3DDLEPTDp +jUlxV76y1pf21JqD/RTWHJBwQ2WEBDbpIDOmehI7MR0XOzxGAgpIjNwtc8E2 +nrhxPXGKBGdLzT7KeTpjub3Xr2nPsvqb0B9pcsIJ0zG9FjOzSIJ5nwRcMtkR +G2yKjs5cJcFpNnGLb712WAjt6lUTNjLQ2zaul/lhg0mWRUb93USGrvmMR6M6 +Vlit1JXIwm1kCH4zmuIxbI45pIVfObKDDEHtCr+a602xP7xhEdsEyKBMPqZr +X2GC3YkKCa8WIcObl0laQwcOYBp/L4e5iZOhWuGz3le6AfbR51KoMIkMJc3X +RflD9LDzPwJDXkqRIe4VSUSSWxcTdLwY7CdLhqwVHc+Ln7UwZqf/ZYoCGW4y +9LsZbxFmYXjhUqcKGfixXb80TGnY71q/oDANMhiR9kWFKKhjCSrnAhURGZy/ +PGDedlXFFB76XPyqQwae4Q8mt8aUsLeS3gFx+qz14pesPMoUMI9kL390kAxm +GbOWbZ67MS5OzwuTpmQo66jP3vhDBnsUcuZ8mhUZ1OZPaH5u2IkZLpzyO2DH +cvkc8fMiBftx2v3ciiMZnsS3p2ZdJGFRgyd9Hxwng+n3XR+f6RIwKRtXn8Nu +ZPAofFZ3KFUca2pz8ebwIEPqB6vDKiJ4zEXn+NkKbzJkOtLYuVeFsA1Vx7xO +nCfDdkqWC5uGAJYj7+QpEEiGygkJG4cmXkw719GjIZgM6qPUXb6pO7ABEYcz +PhFkkCzamsduzYVdvnHkNDGaDCvm768qjG/BxDfanXoXSwbZjES9HUObsCcB +h92DE8mgZ9ixL0FpA2Y3be22O4UM+jeTnn56vx5bdrE62X+XDI2DLc2aXmv0 +1F4L1+tZrP6eWC7hqFih7zU1P0HLI8NWy/oPxNOL9O4mU5fxB2T4Y32MSzhs +ju5HO3T8djEZvsZOj3RM/6ILlBk7GzDIIDre5xHwcJrOkDp4bLGSDNbGMnHX +LX7SzdKMnPKfkuECI/vsp9Yf9Blew6NWL8jgicnnrXs0Qv94mvjW/SUZHj69 +RhNkDNHrmpbR5des8z+Vu6+KfaXfl+woTnxHBr+pEXbrys/0uICHEve7WPNR +brZ8o7WHfqEz7MaTXjLcE/UhLjh00Y/KH1l7O0CGWeHEnfwuHXT9KGXPb9/I +sHOzoNj59rf0PYOcX5bGyHB+effwb9E2ujDtmzH3NBmY013hvMot9HXJT58R +58ggnuIq8b29kT46dVNebZkMaYcsLwT2vaC/MfBIN1pjzW+9pOLawTr64xw9 +7qMbKJASZ9k5J/uEnr4qfsl3CwV8JCpTMctK+hXrhZ9R3BTYeSvvlPB6Jt2j +9I19Gh8FDPxXBPQlyuhW2+63lQpTwMLphnOsVjEdcwmmN4lR4FWctdzK9AM6 +tdam8BORAoon+J5vUs2nc4koiE1JUaDofhXnhz859FnvLdfZ5ShQbq2sLq6c +Re97/fWPkCIFNknSvjBT0+gN1OrTsmoUOJQVNjnnk0p/FJzQBzQK3OG+0Wcw +cJOe9Mn9gKUWBaiqk5v/tCbQA5V1nrjpUWCdc8GFGWIc/XgsXvaSEQXKjs1F +5pfF0I1Gf99JOEQBuv3WpJgXkXRF7dfb8i0p8G19zoyOYzgddzf3Yo0tBZZ5 +W9+GnAuhs80Hjr9xpIDek4fiYj+C6GMmlnbDxylQHB7TNHrHn/6+QO7VohsF +egut/Y+PnaNXs2/S5PKkALQ6TP165k3Ptu9/QPClwEaTwX2jm7zoVyse41T9 +KZAqUcNvdPwU3YvnRrThJVb9hwSfhLq40m1OuS47hFGgU7CM+8KSMx0akbtP +FCvfuTMLAduc6DslhD9FXqdAdEuOuxefPX2H/7TB3QQKtIbjpx622NAX3zdX +ldyigJI8j6WmhCV9QDZLuvEuBb7mWQUfWzWlN1/xT+3JYvVLN6dDOsuYXjJg +umUyjwJdS7u4t+0wpKdo7PJne0SBLY6W8TG79OjBSWw/BEsp4IR3dhnq1qa7 +Tn6ykXlMAZG2nIJ2NqAb65c3oxoKuKsIXJJU1KSrZsfstahjxSf+xG0TVKOL +/3G+f7KRAoGysyoJyUr0TVY04aBWCuTfs52pv7uHPlnMHxX/hgJNwemyS9Ky +9K4tPxfudVJgrEmt5nOfFP2Zc6NrdQ8F2AUFH/qrkOl5T9O62/tZ8RkD+zA8 +gR4r5Ld/aIgVHyeYeeyXKN3vrHHFwijr7SNTFtARIEx3eEWV4pykwLkYowp6 +KT99H2UtWfI3BWoucLyLvchDl73cvUllkQKeErUXRCK56Pw9xX4GqxTQkZPU +jp3goP9RjBqxZ6PCdxqxU33zRvrwtaNW3pupkF9gfD+vZj3dY0yWuIeTClc3 +Hy0sof2lLexf+vlzBxVamhZvPWlYogXfa6x6KECF+xsqP0T/nqNtZU+IcMNR +YfT7Wz1K6S9a0lEHUykJKgwMJr36/W6KJvZsl9g3EhW00oOb6nnHaXn4hdHs +nVSISr5/13vTd9oe/3rGUTkq1M4XSG5NHKJVd90IFlekQt6s3W3D7AGajvKR +A32qVDBqsJ400O6jvY7fKXxbkwrK4o7sN/5206ymZoesgQo3NY6pnrPvpA0c +eF4ssI8KxY3ycYL739HcH1y/2GFAhRD3Bw83GbfRZjfb7o83pkLHxMquyO5m +WpALlc/EnAoVZ8g/OjkbaXGStQ9aj1Ah8c+XViWFZ7TcXmttvRNU0OCida5L +Z9Lk1cncG05RIWdYxqJtfxmtInm657knFZ5IpaWXfi+itZpePUv3p0Lz/h88 +Ztx5NItiS/pKEBWK5PALnBnZtM+cxC1VoVTowaXNUD0yaNMvqzOVr1FBas14 +pMIumSaITbyRyaDCi6vsUy/Dr9Ay71Te+ZFDBZlvpjF2v0Np0kvhrvn3WfUT +ODC5ZfAyjcYQWyOWUeHS8zFKS5QfzXmXiTyukQqOEX2oyvUErUSw7BrHOBX0 +f0X1fqvaRzOYOm/wTVUKXM/W6JuNs9FEFcSvcNCkINGv0Vpl9q/mpHfDCxkt +KTDpLAlxN1nSTJrfQfM2koI95rllG0amNftXC+TXHKXAPEvKKmb+s6Y3Zx+f +yFUpMObfiV/YXKF5Wxr6D/RKgR/f6tmWkZOaE84cPozLO8GidyXi2fkGDT2y +EFvkC2nQXPe2uaj0mDpvGzW2ZGoXcJTuXu/c9VtNNKr4kKqqLNhdV2VI3wDV +FBn1HXyucjBXpfW282m4citOS+V3vDx83usbwG1bpqgh+iJud9du4Pd03eaS +kbiHmz3b1yl0D8j7O+1nfjgvLx4iQTtMVYAM/qvlC1XbZLdQjjw2e6kA1ceN ++0+fvCItTxcpPm+vCEu+m/ef0+GW8u7nrTdcpwRRxnj7PdF08tTva5YGKUpg +UD9bFrs7iLB/d9NtAzllUFLL2nbDo1D82W/NlYV2ZTATN5Z2woLxHrKKn965 +qEBhz3e7/T5uwvTJ452Ht6jCuv//20cWPsiV/c87g6MvvFBT+8+7XNRrKZ/+ +2eXZyXDG2b3/uTaz8/iMgPp/nr2/trC74p+dKQ+33D6o8Z9ndiWqlk3/c2Xu +yte5KM3/bKtLAk1x2n/Gn4mskq/7Z4Gtp0sPWtP/c65OUMD04X9WDIrVSTzy +z8bTJR8+Ov3zla65JefT/7yYfVk7IOSfP2kmduQ9/OeT53LvGhT983wR02Wi +5J95iR8XFB7/sxGHmOjTun9+0pl3vOPDPxtyV8r5ffznj/tb5oV7/3m2ejzK +YeCf5bL2FP4Y+594n7T8rv38n3j85mj39D+fiDz3znfuf+LVXbkttPjPocu3 +nKuX/3mHcoGs/eo/p5+pnltb++f/A/RCWfc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08538700588107573}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3517,6 +9096,7 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -3544,7 +9124,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.08145702771151381}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08538700588107573}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -3552,9 +9133,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991335257344549*^9}, - CellLabel-> - "Out[255]=",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] + CellChangeTimes->{3.991335257344549*^9, 3.993830312640264*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"1b1173f1-fa79-4fab-b853-c8fceab86954"] }, Open ]], Cell[CellGroupData[{ @@ -3607,66 +9187,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[256]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], + "In[100]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.39639867535232`*^-188\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 237, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257395241*^9}, +Cell[BoxData["2.3303504970866333`"], "Output", + CellChangeTimes->{3.991335263670042*^9, 3.993830393836071*^9}, CellLabel-> - "During evaluation of \ -In[256]:=",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.342395211692676`*^-192\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 238, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574052296`*^9}, - CellLabel-> - "During evaluation of \ -In[256]:=",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1800384500947783`*^-195\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 256, 239, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257413231*^9}, - CellLabel-> - "During evaluation of \ -In[256]:=",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 256, 240, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574212303`*^9}, - CellLabel-> - "During evaluation of \ -In[256]:=",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], - -Cell[BoxData["9.332200719005158`"], "Output", - CellChangeTimes->{3.991335263670042*^9}, - CellLabel-> - "Out[256]=",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] + "Out[100]=",ExpressionUUID->"4e42e5eb-b56f-4d79-802a-8335f61f8c40"] }, Open ]], Cell[CellGroupData[{ @@ -3733,65 +9259,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849285445259*^9, - 3.991849289419262*^9}},ExpressionUUID->"6f0ad284-4db3-da47-b8dc-\ -45830eedfe9c"], + CellChangeTimes->{{3.991849285445259*^9, 3.991849289419262*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 241, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263710146*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.676421320887265`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 17, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.993830393884953*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], +In[101]:=",ExpressionUUID->"7d97da8d-9f96-464e-b494-a7094571c0ff"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 242, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637201557`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.782771762102156`*^-97\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 18, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.993830393892572*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], +In[101]:=",ExpressionUUID->"46ec1b25-7286-486a-91e9-5a0287482d8f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 257, 243, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263728153*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.601294368193389`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 19, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.993830393898571*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], +In[101]:=",ExpressionUUID->"f5824fb1-5471-4550-b1ad-9035a3b8432d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 257, 244, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637361546`*^9}, +during this calculation.\"", 2, 101, 20, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9938303939038467`*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], +In[101]:=",ExpressionUUID->"860d923a-0639-49c8-9e98-eeae06c91606"], -Cell[BoxData["0.00046079539931050297`"], "Output", - CellChangeTimes->{3.991335268779545*^9}, +Cell[BoxData["1.9120081192075629`"], "Output", + CellChangeTimes->{3.991335268779545*^9, 3.993830402909464*^9}, CellLabel-> - "Out[257]=",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] + "Out[101]=",ExpressionUUID->"aa7e2381-72de-4ddc-8f95-aa291c53406a"] }, Open ]], Cell[CellGroupData[{ @@ -3812,8 +9351,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3858,65 +9396,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849293744112*^9, - 3.9918492959939384`*^9}},ExpressionUUID->"b2dda819-6f34-5c49-bc62-\ -303d815946e5"], + CellChangeTimes->{{3.991849293744112*^9, 3.9918492959939384`*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 245, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268812542*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.676421320887265`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 21, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.993830402941966*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], +In[102]:=",ExpressionUUID->"f89e71a6-9fdf-41ab-9562-4d785f2e01e4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 246, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268822542*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.782771762102156`*^-97\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 22, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.99383040294818*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], +In[102]:=",ExpressionUUID->"a4b7fa2f-eb45-4dcd-bb5b-ae2c5945a491"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 258, 247, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268831545*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.601294368193389`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 23, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.993830402954458*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], +In[102]:=",ExpressionUUID->"bcc7e7c3-971f-43c0-b6a1-189b53ca5d62"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 258, 248, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352688395576`*^9}, +during this calculation.\"", 2, 102, 24, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.993830402959159*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], +In[102]:=",ExpressionUUID->"d63e5825-d215-4f54-a0ca-12318dc42508"], -Cell[BoxData["5.104103620353258`"], "Output", - CellChangeTimes->{3.991335272704685*^9}, +Cell[BoxData["16.37538385147454`"], "Output", + CellChangeTimes->{3.991335272704685*^9, 3.993830411872164*^9}, CellLabel-> - "Out[258]=",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] + "Out[102]=",ExpressionUUID->"0049e567-034e-4ef1-ab0d-5c53283277f4"] }, Open ]], Cell[CellGroupData[{ @@ -3937,8 +9488,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3983,65 +9533,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918492993108063`*^9, - 3.991849303274454*^9}},ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-\ -1a175f609f7d"], + CellChangeTimes->{{3.9918492993108063`*^9, 3.991849303274454*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 249, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727386665`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.676421320887265`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 25, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.993830411916662*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], +In[103]:=",ExpressionUUID->"c158e358-fdd0-4be6-9c37-d6b5eb0dcee3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 250, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727476673`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.782771762102156`*^-97\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 26, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.993830411923736*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], +In[103]:=",ExpressionUUID->"198aefad-9efa-4a43-9b02-0ce6e34d317a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 259, 251, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727556705`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.601294368193389`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 27, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.993830411929549*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], +In[103]:=",ExpressionUUID->"8a71bb7b-fdd1-4577-bf8e-e158a1b8d776"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 259, 252, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727636833`*^9}, +during this calculation.\"", 2, 103, 28, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.993830411934907*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], +In[103]:=",ExpressionUUID->"3b5a1892-1e85-4703-811f-b23de6e6db4b"], -Cell[BoxData["18.832858301324727`"], "Output", - CellChangeTimes->{3.991335275154251*^9}, +Cell[BoxData["0.4688569010012678`"], "Output", + CellChangeTimes->{3.991335275154251*^9, 3.993830417279469*^9}, CellLabel-> - "Out[259]=",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] + "Out[103]=",ExpressionUUID->"e465820a-b3a0-4ed7-b981-2dfec8a5c642"] }, Open ]], Cell[CellGroupData[{ @@ -4050,22 +9613,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918493065908413`*^9, - 3.9918493103344364`*^9}},ExpressionUUID->"69dd09d9-152e-3e4d-9517-\ -4de4791db2f4"], - -Cell[BoxData["0.00004699917922538678`"], "Output", - CellChangeTimes->{3.991335275186266*^9}, + CellChangeTimes->{{3.9918493065908413`*^9, 3.9918493103344364`*^9}}, CellLabel-> - "Out[260]=",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] + "In[104]:=",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], + +Cell[BoxData["0.6900393085524442`"], "Output", + CellChangeTimes->{3.991335275186266*^9, 3.993830417311804*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"af9cd2af-1688-4951-81a5-0f182083a020"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849314761318*^9, 3.9918493173333225`*^9}, - 3.991924798063732*^9},ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-\ -749729cd7104"], + 3.991924798063732*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ @@ -4088,12 +9652,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[262]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], + "In[106]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[BoxData["5.744985073726737`"], "Output", - CellChangeTimes->{3.9913352752142563`*^9}, +Cell[BoxData["7.971726983665785`"], "Output", + CellChangeTimes->{3.9913352752142563`*^9, 3.993830417324601*^9}, CellLabel-> - "Out[262]=",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] + "Out[106]=",ExpressionUUID->"4327abb7-46dd-4ae1-a0fc-280020f0497e"] }, Open ]], Cell[CellGroupData[{ @@ -4103,12 +9667,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[264]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], + "In[107]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[BoxData["1.564995573098557`"], "Output", - CellChangeTimes->{3.9913352752482567`*^9}, +Cell[BoxData["0.04250941218144515`"], "Output", + CellChangeTimes->{3.9913352752482567`*^9, 3.993830417331156*^9}, CellLabel-> - "Out[264]=",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] + "Out[107]=",ExpressionUUID->"0d1eaa95-cae6-4181-a790-b23dbfb04c54"] }, Open ]], Cell[CellGroupData[{ @@ -4118,12 +9682,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[267]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], + "In[108]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[BoxData["8.990876207899632`"], "Output", - CellChangeTimes->{3.9913352753089123`*^9}, +Cell[BoxData["0.33887342814659727`"], "Output", + CellChangeTimes->{3.9913352753089123`*^9, 3.993830417337194*^9}, CellLabel-> - "Out[267]=",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] + "Out[108]=",ExpressionUUID->"8ab3c78a-3b05-4431-8fd2-64eeeb3960cc"] }, Open ]], Cell[CellGroupData[{ @@ -4313,12 +9877,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[268]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], + "In[109]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[BoxData["0.07167004636648908`"], "Output", - CellChangeTimes->{3.9913352753341656`*^9}, +Cell[BoxData["0.013128603476146182`"], "Output", + CellChangeTimes->{3.9913352753341656`*^9, 3.993830417345313*^9}, CellLabel-> - "Out[268]=",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] + "Out[109]=",ExpressionUUID->"c65731a2-7631-41ce-a6f1-1236f9c6985e"] }, Open ]], Cell[CellGroupData[{ @@ -4332,12 +9896,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[269]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], + "In[110]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[BoxData["3.3103666491187544`"], "Output", - CellChangeTimes->{3.9913352754296722`*^9}, +Cell[BoxData["7.734561106517027`"], "Output", + CellChangeTimes->{3.9913352754296722`*^9, 3.993830417413393*^9}, CellLabel-> - "Out[269]=",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] + "Out[110]=",ExpressionUUID->"beedc168-c51d-4b6f-8702-6b976eb8e62d"] }, Open ]], Cell[CellGroupData[{ @@ -4529,12 +10093,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[270]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], + "In[111]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[BoxData["0.012832691268660865`"], "Output", - CellChangeTimes->{3.9913352754426765`*^9}, +Cell[BoxData["0.48817376921945643`"], "Output", + CellChangeTimes->{3.9913352754426765`*^9, 3.993830417422707*^9}, CellLabel-> - "Out[270]=",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] + "Out[111]=",ExpressionUUID->"63051a82-9303-44b6-b6b1-000538597a2b"] }, Open ]], Cell[CellGroupData[{ @@ -4548,12 +10112,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[271]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], + "In[112]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[BoxData["7.823229443917166`"], "Output", - CellChangeTimes->{3.991335275540678*^9}, +Cell[BoxData["1.2684043439040957`"], "Output", + CellChangeTimes->{3.991335275540678*^9, 3.9938304174978037`*^9}, CellLabel-> - "Out[271]=",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] + "Out[112]=",ExpressionUUID->"1d3669e2-c3cf-4d1f-ba7f-867167b9633b"] }, Open ]], Cell[CellGroupData[{ @@ -4646,12 +10210,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[272]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], + "In[113]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913352755566807`*^9}, +Cell[BoxData["0.130547288335749`"], "Output", + CellChangeTimes->{3.9913352755566807`*^9, 3.9938304175059767`*^9}, CellLabel-> - "Out[272]=",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] + "Out[113]=",ExpressionUUID->"d3c48f98-435d-4ae6-98d7-82762e6c4a2f"] }, Open ]], Cell[CellGroupData[{ @@ -4741,12 +10305,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[273]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], + "In[114]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991335275581682*^9}, +Cell[BoxData["0.869452711664251`"], "Output", + CellChangeTimes->{3.991335275581682*^9, 3.993830417515177*^9}, CellLabel-> - "Out[273]=",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] + "Out[114]=",ExpressionUUID->"46244fec-108e-475e-8335-1f11f56fa720"] }, Open ]], Cell[CellGroupData[{ @@ -4869,12 +10433,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[274]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], + "In[115]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913352756087036`*^9}, +Cell[BoxData["0.11350469384393182`"], "Output", + CellChangeTimes->{3.9913352756087036`*^9, 3.993830417525548*^9}, CellLabel-> - "Out[274]=",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] + "Out[115]=",ExpressionUUID->"0c00a0b9-cb1c-4e23-a601-470f45db8d34"] }, Open ]], Cell[CellGroupData[{ @@ -4936,68 +10500,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849332835844*^9},ExpressionUUID->"d6aa822f-4140-174a-8e29-\ -c889dba5c0d8"], + CellChangeTimes->{3.991849332835844*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 253, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275636673*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.464200403164336`*^-78\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 29, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.993830417542082*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], +In[116]:=",ExpressionUUID->"fd1a46d9-4f87-4c1d-a41a-4d18a5090454"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 254, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756456738`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.883007510556989`*^-79\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 30, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.993830417546732*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], +In[116]:=",ExpressionUUID->"f4fb7e65-fd3f-4925-8bad-f4d2d0a87027"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 255, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756546745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.325313369822422`*^-80\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 31, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.993830417550902*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], +In[116]:=",ExpressionUUID->"8a409765-3a44-43b6-8bcc-55b48a253657"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 275, 256, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275662676*^9}, +during this calculation.\"", 2, 116, 32, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.993830417554872*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], +In[116]:=",ExpressionUUID->"fc6f6a96-b4f5-4c1e-89f4-ce71abb47963"], -Cell[BoxData["3.3103666491187513`"], "Output", - CellChangeTimes->{3.991335279487499*^9}, +Cell[BoxData["7.734561039333882`"], "Output", + CellChangeTimes->{3.991335279487499*^9, 3.993830422720838*^9}, CellLabel-> - "Out[275]=",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] + "Out[116]=",ExpressionUUID->"c469fd25-d4a8-49b0-8cf3-35549e0fdd6c"] }, Open ]], Cell[CellGroupData[{ @@ -5059,68 +10633,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918493361354027`*^9},ExpressionUUID->"46f3f057-22eb-c143-af7a-\ -23ddab00799c"], + CellChangeTimes->{3.9918493361354027`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 257, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279522499*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.464200403164336`*^-78\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 33, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.993830422761176*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], +In[117]:=",ExpressionUUID->"6699e89a-f720-426d-bbb3-61f32b028319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 258, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279532501*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.883007510556989`*^-79\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 34, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.9938304227662783`*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], +In[117]:=",ExpressionUUID->"f53920df-6f91-44d1-b30a-562641ba08e8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 259, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795405006`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.325313369822422`*^-80\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 35, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.993830422771449*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], +In[117]:=",ExpressionUUID->"4225b023-7272-4e62-ae67-aa5961fb1e83"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 276, 260, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795487957`*^9}, +during this calculation.\"", 2, 117, 36, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.993830422776428*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], +In[117]:=",ExpressionUUID->"21ab7bea-44c7-4521-a620-f22128bb279a"], -Cell[BoxData["7.82322944391716`"], "Output", - CellChangeTimes->{3.991335283631424*^9}, +Cell[BoxData["1.268404332886612`"], "Output", + CellChangeTimes->{3.991335283631424*^9, 3.9938304279243517`*^9}, CellLabel-> - "Out[276]=",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] + "Out[117]=",ExpressionUUID->"11f6f7b2-6738-405b-99f7-b636221f6978"] }, Open ]], Cell[CellGroupData[{ @@ -5178,94 +10762,113 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918494105860615`*^9},ExpressionUUID->"0137ed47-cd78-284a-910a-\ -31d165f1571c"], + CellChangeTimes->{3.9918494105860615`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlXk4lH8XxocoiexmJCJaVURZspyDsa9ptWYZS8oSkp2U0o6SSqKSUFky +gxSvUCQhSynZl/wku1Dk/fbXXJ/rPvf93Oc8M9dIO/tYubJTKJR1bBTKv88T +9Ts2FTXWaynsG+jfKE1DrdH03c70p7D5+9IRScLdqco3ZOmvYOV19iYOwpaM +D8t5lN6Asouh+lcpGuYHRVZy0usgQujo3XuEL7yllUdmf4S7K9V+7SX8ovHE +vQXFVnhg/s5oeh0Nh7/WhgW/bAOBc+63YgivGZCx/aX7DVp7U/o4CZuMhan5 +13VB3Rql7SclaVi2MLwqKLsHkg9tPdUsQcNPp6mhhd59oLOxslKK8Ohy+vC0 +4gCEMIJF7NfScPllX2ul2UEok+P0iRWnoaRASs2Jl0Mg/NKm+cEaGpqL/8oY +1R0B4/2O79JpNHRLWy+6nWsUpvJknS9TaRi5wSLmWN0YVGC7kIsoDduoLTsD +sidAeulzU4cQDRk2nkevX56E7p18/50WpOH4Xcr9595T4HFwzVYRARpyrd/O +P6E4A+1FNO2Vq2l4g1FpwC/yC6R4WqU9eWgo9dg6Un72F3RvmtUp4aah6rZz +o14v5+Bs7mmHzSto6KHcVTesuwDLCkZzNZaoOB10koN74yJEi0QY0BapGPVy +lcYWrr9w4UfQgb7fVLyFqk/c65Zg87HxKYNfVGQ8qqH7ZbOhcNt3adMRKma/ +vd59WpwdWY16Vun/UXH8u0NY/GV2jD6mqjkySMWwrTMFed7LENo4j5r0UPFG +rrTMmCInhmTIyxu2UvFr40jZ34eceMjnvtG6JipKTRbZrBZZjnQ9T9/Beio+ +3WWesH12Ob41e8enV0PFqhchbMdfcqGinPtXegkVZyqbu4Z0efCmS6CHdTIV +BU15+EPLeDC5F5Q7blJRoYWOvGq8yJT+rmiRQEXPflbazh2rkb09mO1vLBV9 +2esUNHn4cUNG52LsSSoOrM+ZiPklgK/d82JdTch93GpXNigJYsXZJnqrHhXZ +nwxK004IokarqdcuJH2V1lll/xDEv/6aNq93UdFGN+55fbcQGh6r4qNJULHB +xc+f+l4ER8O4B+qGRbHz8dVLjlyiKCrPs6DZL4ojP7IfZumJ4vhY7Xhqhyhy +B/Q1q5eL4ubQD63KjaJIP7t/lyOLivfrXPULmKJYkq48k5kqhnH1gn8WQkQx +feB34J4ACeT3Xfvh0qIIGh443+n/TAJlPjoKfp4RwZEqIf1ngxKosOwoJ21U +BHelbxORspbEPbTbFqGdIljl7FDAqbUO5+6FTL4rE8HJse5TQ2ek0G2pNTw5 +XASFvOjMArP1eEvsh0j+tDDud1+13bhnA2af4Hyc80EIxddfi7zUvw199fvs +suwFcNujAJ4/oIi8dXOLP7148b6frCWrbjeme872mH7jwsZAUDn7SA0/6SW7 +bLzAgV71KcmpTDUMmX75JCGYA7k3LiyVVKrhl0+1gys9OVCvtbhmokcN75zK +2ilmwoElSoo2RyT3YBSX0XwJLwemj8uG70nag8sfNVK4E5dhkCd35XisOs4t +CrpWP2FHaYdWc/vjmqgwlBUhNE/B9HK+6oAQTVzRFlq0/CcFN8oYw+VYTSzi +46th76HgtqEy+ZfpmhhW9c1R5B0Flf0y+cU6NPGb1iH29NsUND0X2tRipoUC +SaIhLhoUDMyRPmgqD1gWVRiSzL8ErkuFORLBiDOh0+VZJxZAeIX4jddRiG15 +b7i57RagYnVksGssos3nwbAw/QWQkjSgP0tCdLa+mZkkvgDfND5/0ShE/K1y +oOLR2z9gFTLLYTeFeMaXJi4q9Qe0ZlRs73hpY+2zhfaxrnmg/iheQXXWwYxT +uPx93CyoznHPqh7VQckyzobQqFmw4bQftPHVwfqFLJaa7yzcXcf25l6EDmY9 +GWV+s5iF9fuNojcm6yDT+IVbGd8s7Cj9srC7RQfLPrAtfo//BfrXfk/s19dF +t6/pfddSZyBASeNbwlbym7L5W7uucwrslMe64nbSsWKXcSDfxymgqz3ou6pK +R+icDl5ZNQVCwPXjoj4dMxJUjq7NnoLnxi3z0c509N2oRikNnIJxp+NU/zt0 +vHHHf7BHYAqOxd212seth9ppacbRFpPg/HOhRmhYD9e7p1QeGxyHore/ZrIm +9FBYPM+r9us48KSNr8d5PYzfz86u1EB0q/6w41z6qKIa/Ua6mOjF7xXebNTH +AYZhWcDFcWBF37kV6KKPq+Mor4cUxoGLpurx5Zs+KuhsT7m9cgye6fivSG0w +QKdfa5f8r4xAgLStVsEnA4x5w+joCx0BDYruyeoOA/RuNz3l5DkCdaWCfWM/ +DJDL50NOjMEIjKg+L0MuQ6zrc+r3ZR+BrfITJ3vREN/57jOsCfkBmeI+/Rue +G6Jd0eYuuZPDkD7t+frpDSP03uyBx68OwZes29LWd43wzN6/caURQ7D6SM1p +znQjrNgHveI+QxD8boOOQ4ERXog2PrhkMQTm97or+JqM0P3OWyVHwSGYNzhY +5cdnjHXRb1wib38H82TtatWLxugzBp29eYMwp037UBVpgoyC9TntbAMwPfJY +2+y8Cf7RaD1iOdMPY0kqha1XTdCav3apfqgfBn8eTB1MMcGZ+rDB/xr6oeV2 +4gmuVyb4IGB+f+K9fsifEBQ1nTPBN9b9bC81+8HzPu+RZl9TVN3ukMN5pg86 +KMsmepzMMCKqdW3zpl4wzY/yGfIwQ30beS8lyV4ocfr7c9THDH+b/nxwR7gX +blbMD/8JN8NlVpmPw9l6wfLseL/IHTOMUSkPTGzvgYoVnW1GTWaYMuihvSK+ +BzJWvyjP1zFHTc0arQ+UHvBe6xN3WsYCt43HR0cNdIHxQyVVKTkLjBDZNM7e +0gUbt851lSlaIP35n2sJFV3QoXJafkHbAs9lVKh8Se0C033X6wMdLTDpRFcf +u20XbLlYxHM8xQJfPR0uKG3uhMk/kfQnqyzR6qJc6pn6Dsg5WlOeGGOJ1lHq +sPx7O7Tm3heTvWCJ7ZIfE059aYeFmRC/55ctsfBhqczk+3Ywid4u23DdEndD +bxd7fjsM3Uk4z/XAEqtLyyfjQ9tBus7OPLTMEhd7/ifjKNgON3ZMtDvOWuJl +meu8l/S/QsiU2Kzc0b347fNWsQfVbTBjrH+w+ogVrk2sPuEx2gpqtvHaA3v3 +Yc6vQv3E683QJJbiWaW0H89waXBvYX6ENRlnXmVuPoC+WhfqdEYboLh7q6k5 +70GMqGve7yD7ASRbxt0Dfx5E9XMfILGqFpQS458+7D6EaxPeJGvF1kAKx9SO +hMrDqGsomRhY9BYKteW/xrywRg22CI/upSq4pXJRYCHbBvGvkmfp+UpoaH90 +TumyLZp/qJhj7KsAltldWd8oO8xZf/Em5/bXMOG1j+LNsMfqvlzBkT3lMKO/ +xWNU1wH1SjC/urEMMn9+mfNXPoJuQTZquRqlcPj+Ixd7HkeUFa4IDRl7CQXP +TY4sO++IgRJmUjfzSkBNvGn+wrwjpi1YZZhmvwCZbvevH4864a5mLccV1cXQ +v+qYxd0+J6QPrXZ4NVoEjVfNXQwOOGMeT0dorlYR3AhKXXWy0Rk9rg0t3b1d +CK/KluZdjFxQKsp2LpKvEHa+3qW6ycQF+T+zqT3mLYSMyqOBw6YuGLd5x5OG +VYUQX9M86Wvpgo65retluQrBrenxj/BDxP8p6WA7pRAEBi06klxdEENdL0ZP +ssCNN638/WkXLPeYYX/+iQV8dnheqYSwfef42QcskBKublj7ygXTyvKetKSx +QKHOjLa8zAUbD1GKN6SywErDNqvttQuOj1ZUvk9mwY21ge/D37mgb2fSvU2J +LFjT8YSvpo302XSaJhnLAlkH6i27WdLfbW3/Mh8WqDmOZsbsYiBlPGruPrIg +4/a4v7kyA8eDrNptgAXCzZNaVFUGlltlNQtrsWBUb7YlU52BjU+4OS6rsyBd +jsJWp8PA7sY0+/PKLFg9K2AtuJfMfxuoyt/Ggv4ru1emejEwLezAdLMYC/ZW +q7S4+zDQcaxaKpfGgjLKnlSFE4Sb1O0uUVlw219rd0UAAxVUGUv6IiwwtzZw +GgglfjWPiVp+FryQtX4hd5Ho3I42nFwsuPoy7GhxBnn++e+/dWaZ4KWYpBaU +ySB/qCUV9F9MMM3KX6mazUBfqeALBjNM4E4azCp6RvTNNCHLKSbE+FkOFzKJ +vyFQ0GuMCWFbZI+xKsj8Q5HUT9+Z4Jn0/vjzTtJveVSf2xcmGK0e1PDrZmBU +h4dmbBsTNsdQeBV7SZ5qeHz2ZyYM+u1+lj9A+jokb5psZYKTeerPvJF/+V9X +XGliwmFOf+/c32Te6nDIxHsmGPiv8X0q6ooUui4E/I8JFannjBNorui4ba9T +ehkTNOomZYPWuGJ5ONuj1lImKGx4/0VXkswb5capv2KC2OdQ3fYNrpi2XWRG ++AUTfuzpEOXe7YrdG70+Lj5nwjX2tFL3fa4o1Z7TmfGY7C/Pc8vsAOHx0NHf +GUw4axvkp3SI5DefEbckHMS03LRkQ/yH3tQtppP+bmzxN52J7pwe6/aACUq1 +zow3J4g/Qc7EK4UJn+M3rJKJI31jZXZa3GBCDvB6DMUTDuetbrhO8n9OVz27 +Tvzte6z2ElY0qopQTSL5EasNDyUw4SrFZdLsnitih0eudxwT9H3SvgQ9JfMN +Q7bvLzNBQiJWWSvHFaP0WjRsCU/X+lxflkf2HWkQGLnEhAcbwexqAbmHb14S +P+HFjo7yhyVEZ8gJuF5gAtNUPLO+hvivKT1VP8eES7/ZOW/Ukn6Lom+/xjDB +OXPYybqO8OqlphDC/Bwl4v0NpF9y6pvSs0w4/vLwtflPpM/pMB6LM0yQ2Xoz +UHaAsNysUGoUE35/Dm/+b/Df/bUPmRFujHFVyB0i/rtPLi9EMiGiZ9ew2gjJ +58/5YE/4661me4spcr+fKx7LRTAhYYWAXgibG0oFnX06HcqEV5MdtgHL3NAx +hGaXTfh7R7afN6cbYtYpVSfCGkx6mvNKNyy3tj/VFEK+b45Bf4wFiP+1Ok9l +MOlvqieoJ0TmdVKkogmrqwhuARE3THtk66RDOI736UElMTfsdn7l/jaI6CVd ++eLSJE+i+Ny3U0xwe/S0RkSGPP9Y1kI64bi44C6+DYQP37rnTXjQTYiXY4sb +Rg3qunH+04UMPEYUiF6Ut0w7kAklf4UiBxVJvsHxNkHCA/91J3bvIvPKrW0D +J5mwpzykskWV9Iu8ZHeNcP/xHMlSJPP8Kd7jAUxYfTh0d5GOG1K0W1PfE1bT +NTTNpxM9JnjhMeGrYr3BjwzJPmLDKgzCxRy5canGZP/+TFE64b6x0Me3TQmX +FEttIKz6VqT1iiVh/oLCYX/yvvN7f5y3IvnD8ToNhK/czWWP3k/2P509zyTc +62ekEHiYzO8I+O8MYV4HUQNfG9I/RHy9F2FVoz57Tzuy7+RQzKF//nXhlxwc +iZ8xUC9PuJjb+MFhZ7KfPw9T4l/ejOgLKwbp/8moiudfXk9fg6kb0XfcWVrw +I3l1eYP6HsS//7frKGHnovBF9CT5Tu6z3YSvPDAWVj9O9EedBS2Ei69Q5XZ7 +k/559snvCPcG9WvL+5J8o95n/yPMw8g/vMWP3CfI80chYRWLCB+ZAMJh0/ty +/+XvMTknEUj2a474nkn48gZaCjWI6EpcGQ8JF/IPFAiEED3h2rVUwj1/8mtX +hRFdQjj97r/87xE9nBHkHtqJfXcIKzeZzC1Fkuc/FDT/x/8H+oNT2Q== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5279,106 +10882,123 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwVlXk4lH8XxocoiexmJCJaVURZspyDsa9ptWYZS8oSkp2U0o6SSqKSUFky +gxSvUCQhSynZl/wku1Dk/fbXXJ/rPvf93Oc8M9dIO/tYubJTKJR1bBTKv88T +9Ts2FTXWaynsG+jfKE1DrdH03c70p7D5+9IRScLdqco3ZOmvYOV19iYOwpaM +D8t5lN6Asouh+lcpGuYHRVZy0usgQujo3XuEL7yllUdmf4S7K9V+7SX8ovHE +vQXFVnhg/s5oeh0Nh7/WhgW/bAOBc+63YgivGZCx/aX7DVp7U/o4CZuMhan5 +13VB3Rql7SclaVi2MLwqKLsHkg9tPdUsQcNPp6mhhd59oLOxslKK8Ohy+vC0 +4gCEMIJF7NfScPllX2ul2UEok+P0iRWnoaRASs2Jl0Mg/NKm+cEaGpqL/8oY +1R0B4/2O79JpNHRLWy+6nWsUpvJknS9TaRi5wSLmWN0YVGC7kIsoDduoLTsD +sidAeulzU4cQDRk2nkevX56E7p18/50WpOH4Xcr9595T4HFwzVYRARpyrd/O +P6E4A+1FNO2Vq2l4g1FpwC/yC6R4WqU9eWgo9dg6Un72F3RvmtUp4aah6rZz +o14v5+Bs7mmHzSto6KHcVTesuwDLCkZzNZaoOB10koN74yJEi0QY0BapGPVy +lcYWrr9w4UfQgb7fVLyFqk/c65Zg87HxKYNfVGQ8qqH7ZbOhcNt3adMRKma/ +vd59WpwdWY16Vun/UXH8u0NY/GV2jD6mqjkySMWwrTMFed7LENo4j5r0UPFG +rrTMmCInhmTIyxu2UvFr40jZ34eceMjnvtG6JipKTRbZrBZZjnQ9T9/Beio+ +3WWesH12Ob41e8enV0PFqhchbMdfcqGinPtXegkVZyqbu4Z0efCmS6CHdTIV +BU15+EPLeDC5F5Q7blJRoYWOvGq8yJT+rmiRQEXPflbazh2rkb09mO1vLBV9 +2esUNHn4cUNG52LsSSoOrM+ZiPklgK/d82JdTch93GpXNigJYsXZJnqrHhXZ +nwxK004IokarqdcuJH2V1lll/xDEv/6aNq93UdFGN+55fbcQGh6r4qNJULHB +xc+f+l4ER8O4B+qGRbHz8dVLjlyiKCrPs6DZL4ojP7IfZumJ4vhY7Xhqhyhy +B/Q1q5eL4ubQD63KjaJIP7t/lyOLivfrXPULmKJYkq48k5kqhnH1gn8WQkQx +feB34J4ACeT3Xfvh0qIIGh443+n/TAJlPjoKfp4RwZEqIf1ngxKosOwoJ21U +BHelbxORspbEPbTbFqGdIljl7FDAqbUO5+6FTL4rE8HJse5TQ2ek0G2pNTw5 +XASFvOjMArP1eEvsh0j+tDDud1+13bhnA2af4Hyc80EIxddfi7zUvw199fvs +suwFcNujAJ4/oIi8dXOLP7148b6frCWrbjeme872mH7jwsZAUDn7SA0/6SW7 +bLzAgV71KcmpTDUMmX75JCGYA7k3LiyVVKrhl0+1gys9OVCvtbhmokcN75zK +2ilmwoElSoo2RyT3YBSX0XwJLwemj8uG70nag8sfNVK4E5dhkCd35XisOs4t +CrpWP2FHaYdWc/vjmqgwlBUhNE/B9HK+6oAQTVzRFlq0/CcFN8oYw+VYTSzi +46th76HgtqEy+ZfpmhhW9c1R5B0Flf0y+cU6NPGb1iH29NsUND0X2tRipoUC +SaIhLhoUDMyRPmgqD1gWVRiSzL8ErkuFORLBiDOh0+VZJxZAeIX4jddRiG15 +b7i57RagYnVksGssos3nwbAw/QWQkjSgP0tCdLa+mZkkvgDfND5/0ShE/K1y +oOLR2z9gFTLLYTeFeMaXJi4q9Qe0ZlRs73hpY+2zhfaxrnmg/iheQXXWwYxT +uPx93CyoznHPqh7VQckyzobQqFmw4bQftPHVwfqFLJaa7yzcXcf25l6EDmY9 +GWV+s5iF9fuNojcm6yDT+IVbGd8s7Cj9srC7RQfLPrAtfo//BfrXfk/s19dF +t6/pfddSZyBASeNbwlbym7L5W7uucwrslMe64nbSsWKXcSDfxymgqz3ou6pK +R+icDl5ZNQVCwPXjoj4dMxJUjq7NnoLnxi3z0c509N2oRikNnIJxp+NU/zt0 +vHHHf7BHYAqOxd212seth9ppacbRFpPg/HOhRmhYD9e7p1QeGxyHore/ZrIm +9FBYPM+r9us48KSNr8d5PYzfz86u1EB0q/6w41z6qKIa/Ua6mOjF7xXebNTH +AYZhWcDFcWBF37kV6KKPq+Mor4cUxoGLpurx5Zs+KuhsT7m9cgye6fivSG0w +QKdfa5f8r4xAgLStVsEnA4x5w+joCx0BDYruyeoOA/RuNz3l5DkCdaWCfWM/ +DJDL50NOjMEIjKg+L0MuQ6zrc+r3ZR+BrfITJ3vREN/57jOsCfkBmeI+/Rue +G6Jd0eYuuZPDkD7t+frpDSP03uyBx68OwZes29LWd43wzN6/caURQ7D6SM1p +znQjrNgHveI+QxD8boOOQ4ERXog2PrhkMQTm97or+JqM0P3OWyVHwSGYNzhY +5cdnjHXRb1wib38H82TtatWLxugzBp29eYMwp037UBVpgoyC9TntbAMwPfJY +2+y8Cf7RaD1iOdMPY0kqha1XTdCav3apfqgfBn8eTB1MMcGZ+rDB/xr6oeV2 +4gmuVyb4IGB+f+K9fsifEBQ1nTPBN9b9bC81+8HzPu+RZl9TVN3ukMN5pg86 +KMsmepzMMCKqdW3zpl4wzY/yGfIwQ30beS8lyV4ocfr7c9THDH+b/nxwR7gX +blbMD/8JN8NlVpmPw9l6wfLseL/IHTOMUSkPTGzvgYoVnW1GTWaYMuihvSK+ +BzJWvyjP1zFHTc0arQ+UHvBe6xN3WsYCt43HR0cNdIHxQyVVKTkLjBDZNM7e +0gUbt851lSlaIP35n2sJFV3QoXJafkHbAs9lVKh8Se0C033X6wMdLTDpRFcf +u20XbLlYxHM8xQJfPR0uKG3uhMk/kfQnqyzR6qJc6pn6Dsg5WlOeGGOJ1lHq +sPx7O7Tm3heTvWCJ7ZIfE059aYeFmRC/55ctsfBhqczk+3Ywid4u23DdEndD +bxd7fjsM3Uk4z/XAEqtLyyfjQ9tBus7OPLTMEhd7/ifjKNgON3ZMtDvOWuJl +meu8l/S/QsiU2Kzc0b347fNWsQfVbTBjrH+w+ogVrk2sPuEx2gpqtvHaA3v3 +Yc6vQv3E683QJJbiWaW0H89waXBvYX6ENRlnXmVuPoC+WhfqdEYboLh7q6k5 +70GMqGve7yD7ASRbxt0Dfx5E9XMfILGqFpQS458+7D6EaxPeJGvF1kAKx9SO +hMrDqGsomRhY9BYKteW/xrywRg22CI/upSq4pXJRYCHbBvGvkmfp+UpoaH90 +TumyLZp/qJhj7KsAltldWd8oO8xZf/Em5/bXMOG1j+LNsMfqvlzBkT3lMKO/ +xWNU1wH1SjC/urEMMn9+mfNXPoJuQTZquRqlcPj+Ixd7HkeUFa4IDRl7CQXP +TY4sO++IgRJmUjfzSkBNvGn+wrwjpi1YZZhmvwCZbvevH4864a5mLccV1cXQ +v+qYxd0+J6QPrXZ4NVoEjVfNXQwOOGMeT0dorlYR3AhKXXWy0Rk9rg0t3b1d +CK/KluZdjFxQKsp2LpKvEHa+3qW6ycQF+T+zqT3mLYSMyqOBw6YuGLd5x5OG +VYUQX9M86Wvpgo65retluQrBrenxj/BDxP8p6WA7pRAEBi06klxdEENdL0ZP +ssCNN638/WkXLPeYYX/+iQV8dnheqYSwfef42QcskBKublj7ygXTyvKetKSx +QKHOjLa8zAUbD1GKN6SywErDNqvttQuOj1ZUvk9mwY21ge/D37mgb2fSvU2J +LFjT8YSvpo302XSaJhnLAlkH6i27WdLfbW3/Mh8WqDmOZsbsYiBlPGruPrIg +4/a4v7kyA8eDrNptgAXCzZNaVFUGlltlNQtrsWBUb7YlU52BjU+4OS6rsyBd +jsJWp8PA7sY0+/PKLFg9K2AtuJfMfxuoyt/Ggv4ru1emejEwLezAdLMYC/ZW +q7S4+zDQcaxaKpfGgjLKnlSFE4Sb1O0uUVlw219rd0UAAxVUGUv6IiwwtzZw +GgglfjWPiVp+FryQtX4hd5Ho3I42nFwsuPoy7GhxBnn++e+/dWaZ4KWYpBaU +ySB/qCUV9F9MMM3KX6mazUBfqeALBjNM4E4azCp6RvTNNCHLKSbE+FkOFzKJ +vyFQ0GuMCWFbZI+xKsj8Q5HUT9+Z4Jn0/vjzTtJveVSf2xcmGK0e1PDrZmBU +h4dmbBsTNsdQeBV7SZ5qeHz2ZyYM+u1+lj9A+jokb5psZYKTeerPvJF/+V9X +XGliwmFOf+/c32Te6nDIxHsmGPiv8X0q6ooUui4E/I8JFannjBNorui4ba9T +ehkTNOomZYPWuGJ5ONuj1lImKGx4/0VXkswb5capv2KC2OdQ3fYNrpi2XWRG ++AUTfuzpEOXe7YrdG70+Lj5nwjX2tFL3fa4o1Z7TmfGY7C/Pc8vsAOHx0NHf +GUw4axvkp3SI5DefEbckHMS03LRkQ/yH3tQtppP+bmzxN52J7pwe6/aACUq1 +zow3J4g/Qc7EK4UJn+M3rJKJI31jZXZa3GBCDvB6DMUTDuetbrhO8n9OVz27 +Tvzte6z2ElY0qopQTSL5EasNDyUw4SrFZdLsnitih0eudxwT9H3SvgQ9JfMN +Q7bvLzNBQiJWWSvHFaP0WjRsCU/X+lxflkf2HWkQGLnEhAcbwexqAbmHb14S +P+HFjo7yhyVEZ8gJuF5gAtNUPLO+hvivKT1VP8eES7/ZOW/Ukn6Lom+/xjDB +OXPYybqO8OqlphDC/Bwl4v0NpF9y6pvSs0w4/vLwtflPpM/pMB6LM0yQ2Xoz +UHaAsNysUGoUE35/Dm/+b/Df/bUPmRFujHFVyB0i/rtPLi9EMiGiZ9ew2gjJ +58/5YE/4661me4spcr+fKx7LRTAhYYWAXgibG0oFnX06HcqEV5MdtgHL3NAx +hGaXTfh7R7afN6cbYtYpVSfCGkx6mvNKNyy3tj/VFEK+b45Bf4wFiP+1Ok9l +MOlvqieoJ0TmdVKkogmrqwhuARE3THtk66RDOI736UElMTfsdn7l/jaI6CVd ++eLSJE+i+Ny3U0xwe/S0RkSGPP9Y1kI64bi44C6+DYQP37rnTXjQTYiXY4sb +Rg3qunH+04UMPEYUiF6Ut0w7kAklf4UiBxVJvsHxNkHCA/91J3bvIvPKrW0D +J5mwpzykskWV9Iu8ZHeNcP/xHMlSJPP8Kd7jAUxYfTh0d5GOG1K0W1PfE1bT +NTTNpxM9JnjhMeGrYr3BjwzJPmLDKgzCxRy5canGZP/+TFE64b6x0Me3TQmX +FEttIKz6VqT1iiVh/oLCYX/yvvN7f5y3IvnD8ToNhK/czWWP3k/2P509zyTc +62ekEHiYzO8I+O8MYV4HUQNfG9I/RHy9F2FVoz57Tzuy7+RQzKF//nXhlxwc +iZ8xUC9PuJjb+MFhZ7KfPw9T4l/ejOgLKwbp/8moiudfXk9fg6kb0XfcWVrw +I3l1eYP6HsS//7frKGHnovBF9CT5Tu6z3YSvPDAWVj9O9EedBS2Ei69Q5XZ7 +k/559snvCPcG9WvL+5J8o95n/yPMw8g/vMWP3CfI80chYRWLCB+ZAMJh0/ty +/+XvMTknEUj2a474nkn48gZaCjWI6EpcGQ8JF/IPFAiEED3h2rVUwj1/8mtX +hRFdQjj97r/87xE9nBHkHtqJfXcIKzeZzC1Fkuc/FDT/x/8H+oNT2Q== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0., 6.032374931809315}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5390,21 +11010,19 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 6.032374931809315}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5418,104 +11036,122 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwVlXk4lH8XxocoiexmJCJaVURZspyDsa9ptWYZS8oSkp2U0o6SSqKSUFky +gxSvUCQhSynZl/wku1Dk/fbXXJ/rPvf93Oc8M9dIO/tYubJTKJR1bBTKv88T +9Ts2FTXWaynsG+jfKE1DrdH03c70p7D5+9IRScLdqco3ZOmvYOV19iYOwpaM +D8t5lN6Asouh+lcpGuYHRVZy0usgQujo3XuEL7yllUdmf4S7K9V+7SX8ovHE +vQXFVnhg/s5oeh0Nh7/WhgW/bAOBc+63YgivGZCx/aX7DVp7U/o4CZuMhan5 +13VB3Rql7SclaVi2MLwqKLsHkg9tPdUsQcNPp6mhhd59oLOxslKK8Ohy+vC0 +4gCEMIJF7NfScPllX2ul2UEok+P0iRWnoaRASs2Jl0Mg/NKm+cEaGpqL/8oY +1R0B4/2O79JpNHRLWy+6nWsUpvJknS9TaRi5wSLmWN0YVGC7kIsoDduoLTsD +sidAeulzU4cQDRk2nkevX56E7p18/50WpOH4Xcr9595T4HFwzVYRARpyrd/O +P6E4A+1FNO2Vq2l4g1FpwC/yC6R4WqU9eWgo9dg6Un72F3RvmtUp4aah6rZz +o14v5+Bs7mmHzSto6KHcVTesuwDLCkZzNZaoOB10koN74yJEi0QY0BapGPVy +lcYWrr9w4UfQgb7fVLyFqk/c65Zg87HxKYNfVGQ8qqH7ZbOhcNt3adMRKma/ +vd59WpwdWY16Vun/UXH8u0NY/GV2jD6mqjkySMWwrTMFed7LENo4j5r0UPFG +rrTMmCInhmTIyxu2UvFr40jZ34eceMjnvtG6JipKTRbZrBZZjnQ9T9/Beio+ +3WWesH12Ob41e8enV0PFqhchbMdfcqGinPtXegkVZyqbu4Z0efCmS6CHdTIV +BU15+EPLeDC5F5Q7blJRoYWOvGq8yJT+rmiRQEXPflbazh2rkb09mO1vLBV9 +2esUNHn4cUNG52LsSSoOrM+ZiPklgK/d82JdTch93GpXNigJYsXZJnqrHhXZ +nwxK004IokarqdcuJH2V1lll/xDEv/6aNq93UdFGN+55fbcQGh6r4qNJULHB +xc+f+l4ER8O4B+qGRbHz8dVLjlyiKCrPs6DZL4ojP7IfZumJ4vhY7Xhqhyhy +B/Q1q5eL4ubQD63KjaJIP7t/lyOLivfrXPULmKJYkq48k5kqhnH1gn8WQkQx +feB34J4ACeT3Xfvh0qIIGh443+n/TAJlPjoKfp4RwZEqIf1ngxKosOwoJ21U +BHelbxORspbEPbTbFqGdIljl7FDAqbUO5+6FTL4rE8HJse5TQ2ek0G2pNTw5 +XASFvOjMArP1eEvsh0j+tDDud1+13bhnA2af4Hyc80EIxddfi7zUvw199fvs +suwFcNujAJ4/oIi8dXOLP7148b6frCWrbjeme872mH7jwsZAUDn7SA0/6SW7 +bLzAgV71KcmpTDUMmX75JCGYA7k3LiyVVKrhl0+1gys9OVCvtbhmokcN75zK +2ilmwoElSoo2RyT3YBSX0XwJLwemj8uG70nag8sfNVK4E5dhkCd35XisOs4t +CrpWP2FHaYdWc/vjmqgwlBUhNE/B9HK+6oAQTVzRFlq0/CcFN8oYw+VYTSzi +46th76HgtqEy+ZfpmhhW9c1R5B0Flf0y+cU6NPGb1iH29NsUND0X2tRipoUC +SaIhLhoUDMyRPmgqD1gWVRiSzL8ErkuFORLBiDOh0+VZJxZAeIX4jddRiG15 +b7i57RagYnVksGssos3nwbAw/QWQkjSgP0tCdLa+mZkkvgDfND5/0ShE/K1y +oOLR2z9gFTLLYTeFeMaXJi4q9Qe0ZlRs73hpY+2zhfaxrnmg/iheQXXWwYxT +uPx93CyoznHPqh7VQckyzobQqFmw4bQftPHVwfqFLJaa7yzcXcf25l6EDmY9 +GWV+s5iF9fuNojcm6yDT+IVbGd8s7Cj9srC7RQfLPrAtfo//BfrXfk/s19dF +t6/pfddSZyBASeNbwlbym7L5W7uucwrslMe64nbSsWKXcSDfxymgqz3ou6pK +R+icDl5ZNQVCwPXjoj4dMxJUjq7NnoLnxi3z0c509N2oRikNnIJxp+NU/zt0 +vHHHf7BHYAqOxd212seth9ppacbRFpPg/HOhRmhYD9e7p1QeGxyHore/ZrIm +9FBYPM+r9us48KSNr8d5PYzfz86u1EB0q/6w41z6qKIa/Ua6mOjF7xXebNTH +AYZhWcDFcWBF37kV6KKPq+Mor4cUxoGLpurx5Zs+KuhsT7m9cgye6fivSG0w +QKdfa5f8r4xAgLStVsEnA4x5w+joCx0BDYruyeoOA/RuNz3l5DkCdaWCfWM/ +DJDL50NOjMEIjKg+L0MuQ6zrc+r3ZR+BrfITJ3vREN/57jOsCfkBmeI+/Rue +G6Jd0eYuuZPDkD7t+frpDSP03uyBx68OwZes29LWd43wzN6/caURQ7D6SM1p +znQjrNgHveI+QxD8boOOQ4ERXog2PrhkMQTm97or+JqM0P3OWyVHwSGYNzhY +5cdnjHXRb1wib38H82TtatWLxugzBp29eYMwp037UBVpgoyC9TntbAMwPfJY +2+y8Cf7RaD1iOdMPY0kqha1XTdCav3apfqgfBn8eTB1MMcGZ+rDB/xr6oeV2 +4gmuVyb4IGB+f+K9fsifEBQ1nTPBN9b9bC81+8HzPu+RZl9TVN3ukMN5pg86 +KMsmepzMMCKqdW3zpl4wzY/yGfIwQ30beS8lyV4ocfr7c9THDH+b/nxwR7gX +blbMD/8JN8NlVpmPw9l6wfLseL/IHTOMUSkPTGzvgYoVnW1GTWaYMuihvSK+ +BzJWvyjP1zFHTc0arQ+UHvBe6xN3WsYCt43HR0cNdIHxQyVVKTkLjBDZNM7e +0gUbt851lSlaIP35n2sJFV3QoXJafkHbAs9lVKh8Se0C033X6wMdLTDpRFcf +u20XbLlYxHM8xQJfPR0uKG3uhMk/kfQnqyzR6qJc6pn6Dsg5WlOeGGOJ1lHq +sPx7O7Tm3heTvWCJ7ZIfE059aYeFmRC/55ctsfBhqczk+3Ywid4u23DdEndD +bxd7fjsM3Uk4z/XAEqtLyyfjQ9tBus7OPLTMEhd7/ifjKNgON3ZMtDvOWuJl +meu8l/S/QsiU2Kzc0b347fNWsQfVbTBjrH+w+ogVrk2sPuEx2gpqtvHaA3v3 +Yc6vQv3E683QJJbiWaW0H89waXBvYX6ENRlnXmVuPoC+WhfqdEYboLh7q6k5 +70GMqGve7yD7ASRbxt0Dfx5E9XMfILGqFpQS458+7D6EaxPeJGvF1kAKx9SO +hMrDqGsomRhY9BYKteW/xrywRg22CI/upSq4pXJRYCHbBvGvkmfp+UpoaH90 +TumyLZp/qJhj7KsAltldWd8oO8xZf/Em5/bXMOG1j+LNsMfqvlzBkT3lMKO/ +xWNU1wH1SjC/urEMMn9+mfNXPoJuQTZquRqlcPj+Ixd7HkeUFa4IDRl7CQXP +TY4sO++IgRJmUjfzSkBNvGn+wrwjpi1YZZhmvwCZbvevH4864a5mLccV1cXQ +v+qYxd0+J6QPrXZ4NVoEjVfNXQwOOGMeT0dorlYR3AhKXXWy0Rk9rg0t3b1d +CK/KluZdjFxQKsp2LpKvEHa+3qW6ycQF+T+zqT3mLYSMyqOBw6YuGLd5x5OG +VYUQX9M86Wvpgo65retluQrBrenxj/BDxP8p6WA7pRAEBi06klxdEENdL0ZP +ssCNN638/WkXLPeYYX/+iQV8dnheqYSwfef42QcskBKublj7ygXTyvKetKSx +QKHOjLa8zAUbD1GKN6SywErDNqvttQuOj1ZUvk9mwY21ge/D37mgb2fSvU2J +LFjT8YSvpo302XSaJhnLAlkH6i27WdLfbW3/Mh8WqDmOZsbsYiBlPGruPrIg +4/a4v7kyA8eDrNptgAXCzZNaVFUGlltlNQtrsWBUb7YlU52BjU+4OS6rsyBd +jsJWp8PA7sY0+/PKLFg9K2AtuJfMfxuoyt/Ggv4ru1emejEwLezAdLMYC/ZW +q7S4+zDQcaxaKpfGgjLKnlSFE4Sb1O0uUVlw219rd0UAAxVUGUv6IiwwtzZw +GgglfjWPiVp+FryQtX4hd5Ho3I42nFwsuPoy7GhxBnn++e+/dWaZ4KWYpBaU +ySB/qCUV9F9MMM3KX6mazUBfqeALBjNM4E4azCp6RvTNNCHLKSbE+FkOFzKJ +vyFQ0GuMCWFbZI+xKsj8Q5HUT9+Z4Jn0/vjzTtJveVSf2xcmGK0e1PDrZmBU +h4dmbBsTNsdQeBV7SZ5qeHz2ZyYM+u1+lj9A+jokb5psZYKTeerPvJF/+V9X +XGliwmFOf+/c32Te6nDIxHsmGPiv8X0q6ooUui4E/I8JFannjBNorui4ba9T +ehkTNOomZYPWuGJ5ONuj1lImKGx4/0VXkswb5capv2KC2OdQ3fYNrpi2XWRG ++AUTfuzpEOXe7YrdG70+Lj5nwjX2tFL3fa4o1Z7TmfGY7C/Pc8vsAOHx0NHf +GUw4axvkp3SI5DefEbckHMS03LRkQ/yH3tQtppP+bmzxN52J7pwe6/aACUq1 +zow3J4g/Qc7EK4UJn+M3rJKJI31jZXZa3GBCDvB6DMUTDuetbrhO8n9OVz27 +Tvzte6z2ElY0qopQTSL5EasNDyUw4SrFZdLsnitih0eudxwT9H3SvgQ9JfMN +Q7bvLzNBQiJWWSvHFaP0WjRsCU/X+lxflkf2HWkQGLnEhAcbwexqAbmHb14S +P+HFjo7yhyVEZ8gJuF5gAtNUPLO+hvivKT1VP8eES7/ZOW/Ukn6Lom+/xjDB +OXPYybqO8OqlphDC/Bwl4v0NpF9y6pvSs0w4/vLwtflPpM/pMB6LM0yQ2Xoz +UHaAsNysUGoUE35/Dm/+b/Df/bUPmRFujHFVyB0i/rtPLi9EMiGiZ9ew2gjJ +58/5YE/4661me4spcr+fKx7LRTAhYYWAXgibG0oFnX06HcqEV5MdtgHL3NAx +hGaXTfh7R7afN6cbYtYpVSfCGkx6mvNKNyy3tj/VFEK+b45Bf4wFiP+1Ok9l +MOlvqieoJ0TmdVKkogmrqwhuARE3THtk66RDOI736UElMTfsdn7l/jaI6CVd ++eLSJE+i+Ny3U0xwe/S0RkSGPP9Y1kI64bi44C6+DYQP37rnTXjQTYiXY4sb +Rg3qunH+04UMPEYUiF6Ut0w7kAklf4UiBxVJvsHxNkHCA/91J3bvIvPKrW0D +J5mwpzykskWV9Iu8ZHeNcP/xHMlSJPP8Kd7jAUxYfTh0d5GOG1K0W1PfE1bT +NTTNpxM9JnjhMeGrYr3BjwzJPmLDKgzCxRy5canGZP/+TFE64b6x0Me3TQmX +FEttIKz6VqT1iiVh/oLCYX/yvvN7f5y3IvnD8ToNhK/czWWP3k/2P509zyTc +62ekEHiYzO8I+O8MYV4HUQNfG9I/RHy9F2FVoz57Tzuy7+RQzKF//nXhlxwc +iZ8xUC9PuJjb+MFhZ7KfPw9T4l/ejOgLKwbp/8moiudfXk9fg6kb0XfcWVrw +I3l1eYP6HsS//7frKGHnovBF9CT5Tu6z3YSvPDAWVj9O9EedBS2Ei69Q5XZ7 +k/559snvCPcG9WvL+5J8o95n/yPMw8g/vMWP3CfI80chYRWLCB+ZAMJh0/ty +/+XvMTknEUj2a474nkn48gZaCjWI6EpcGQ8JF/IPFAiEED3h2rVUwj1/8mtX +hRFdQjj97r/87xE9nBHkHtqJfXcIKzeZzC1Fkuc/FDT/x/8H+oNT2Q== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "PlotRange" -> {{0, 180}, {0., 6.032374931809315}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5525,7 +11161,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6152015704378887}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5553,7 +11190,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 6.032374931809315}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5561,11 +11199,13 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913355426284504`*^9}, + CellChangeTimes->{3.9913355426284504`*^9, 3.993830696746667*^9}, CellLabel-> - "Out[277]=",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] + "Out[118]=",ExpressionUUID->"76ee7341-ab91-4a45-83fc-202ac7c0ed66"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"x", "=", RowBox[{"Plot", "[", @@ -5625,14 +11265,1452 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918494141657047`*^9, {3.991849451432905*^9, - 3.991849451715925*^9}},ExpressionUUID->"00a32bc3-df79-9e43-8f20-\ -d4884962c12d"], + 3.9918494141657047`*^9, {3.991849451432905*^9, 3.991849451715925*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.411461105180324`*^-237\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 37, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830696863986*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"28c23d10-7dcb-4867-95de-f1e0722f022f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.5988143705396655`*^-245\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 38, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938306968711576`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"87663fb7-292d-428a-b15e-2e896e665fcc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2208704328240554`*^-252\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 39, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99383069687545*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"97e762ea-9e9c-4fd8-812c-8f90a35d2cf4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 119, 40, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830696879697*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"a7719faa-7996-402e-b6bc-78cf3405adb8"], + +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VA8XB3AlWYqsY+y7ypJlxmDMzDkosmQLoQgpUlmyZStKlpK0iLQh +SSn7MoNKUT9UKJQlEhGKKJIk77x/3efzz32e871nuQregQ77V3NwcLxaxcHx +/+evwZYm5bP5DP9Ly48+m9gzum4SI417TkLRri+wcF8LUKzdm9hzEQT1u7cX +3QcIt7v/nrMnD1bS3cSO3LcFoWnxi4vvy+FMi5TM1L298LHeJnDu/TNY+mtX +vbkwEMyUJwdm378FjbgxU6PcE7D4Xj9j5v0w7J7ILrl1+jw0mt7Nf5P3E/4K +/ohY1sgB6Y+sMW+NZfD45NipFnEXRA/vvc9tyokrq5Y7lVYeghr37Rd2uziR +J/XtwGeJYsC8seGrhzixcMQ/KJNcDId7jkhpXObESSldzjcHi6Fpa0yq3Sgn +vvzZXHi5sxhCZa4GXE1ag0o5q/0c80ugs+2trvorLgwgbh3Ru1EKF3XM6myc +eDDsaIzVQaly0Op3Naf78aDa/qPLG1TL4VXCkU71aB4ckO50LNEuh7U9l7/y +5PLgrT3lY++3lUP08RGpxm882Jq0ntYRWA4+L+Ni9BN4ceLdvTG3Z+VA2V9H +l6/gw5rqMIFGrwroFGhvEXjBh4rDAYHHDlVAEHPYabmHD0/aWRFUwyrg/jq+ +gL5/fFgwvUHdP7kC5Mpdbl62XIfTC5c2ZhRXAM/K/D+e4XXoP1ZCCl2sgN4s +7YZZQX6sNxT8uC2lErI7izaEq/Bj7obqd6yLleAmsHHvH0N+nH9c5q18vRI+ +nJL5t3ofPyocDtYcKK6EoQA+mmgVP2Y5CW0f6KyE8a2fayiuAnhc3CRSTLoK +fs9klkTnbsArJPfjzneqgKUusrJStQH7c4UvZz2sgqgDaTYJrRvw5M75xY6q +KvjbnzCV+nMDzoddL1F+UQVxI0yxdkVB3EaIyNg1VgUJbXd2DoUKYkzP1J8J +5Wo4m3+ifbWEEBK0W2SZ2dVgST4oLKYkhNc0wptycquBp8nBaaOmEOq9aJg6 +UVgNCSMq/VbGQmhvymhWqK6GGMVXY5cPCmH47YqUnx3VEJBD/KdaK4SpeYW1 +bWtqwP56mYbVbmH0fObI67W/BgQ1rgW67xfGSK4SbYlDNdBWl1AeGCiMFt3h +Hf8F1YBl/y6Dy6eE8fh0RiRPTA2YSP4zHSgSxpQD+8LEL9YAOctyd+BfYSy4 +5mdyuL4GxC+PpFy6IYKehZ9//ORlAlG9KuF3gQg++ZorsUWACZLPEk+4l4rg +fcFvqzyFmSA7szlsY6MITj0bkiiSZIKKdZBn3bgIvgvcGz2oxgTSmmXKCEkU +hby1K2stmEC+1qaznS6KvGpfbIJ3MIGim6Px0EwUPV3lmHL2TKB6mipGuIoi +16bpxX0uTDCuT+Ffd0IUVX3nnc8cYIJtKOGzbqsoBl+75WMbzwS7deODmZ2i +aNij6HMqgQkOeazevx9EcYHjvGlJEhOcO/a0v/guioxA0bvT55jgrnG71k1M +DBv/81Fen82EQ5+1Lpz0FENOh3zFxlImHI5elfrloBjKyP16FFbBhADhzkTr +EDEkXxy3ka9mwlEMjyEkiiE2le5yr2NC5PV63/tFYvh5fYNWxHMmJDlaMN7+ +EsOHdhMe6j3svCrbJFevIqBW2aj6uT4mFIs4LuisI+Byutbt0Q9MePfWo/SC +HAHFF25fjfrEBGX7UEX77QRsW1o/Rp5kArN08V+cAwHthKy3WX9jgrXgif7S +PQTUrN/l5TbNhJD2lMuCwQT88jm61+0HE57tuLW24yoB/0RXC0wtsut/qDyy +cpuAc9o/s2qXmDC5/v4TrWIC/pN69/P4MhOEXlUeO/+MgJ+OD6l842CBp2Xr +pM1XAjoJHWpy4WbB3D3b/47PE/DRrLjMAA8Lkni7bxevEDB27spuFz4WFDd/ +3CMgKo6qs5wZJH4WLJvNt72miWNcQIJ5rDAL0guiipbNxHH6XbI0S4QFyms5 +kjXtxRFluqe+irLA+jmf8bn94vhz81A6RZwFQ8rpMo8CxVHj4zE/GyILQhLE +/nyLFEdJc/7t7hIsyDaVr7BOE8eZqyLqnlIs2HL7zvmYLHG0400iO0qz4Nlq +9cMP8sQxWn3RHmRYMPFUT2V9jThKuwp3/5FlQYxC3SraU3GU/f4JX8qxQDAe +Bw+9FMcp01WvL8qzwACtMl9+FMdrUOXArciCV7c6QpYmxPHDaJZDJdueK052 +6nPiGIH+J1yU2Pl49Gvs/ieOE8V7PvxkO+mxJ+9ZHiIe2V54OFGZBZKyY6O1 +wkTUeZ9CElRh5xV76NmkNBHbO03IF9h+RwuPttQhYvNWl5ljqizwv760K8qI +iObjNuUf2V5eiiPf30bE4zb2dfSN7Dx3rxXqsyXiuBBT4BLbynVnp3jdiLhz +71DJR7aZkkKthj5EFJtVz1PaxM436krBwQAievGtmvBge6hX6tTVY0TMO9qa +dIHtEMPcvS0niZgYtBBfx7ZljsCcVSoRXzduGe9jW5E7Jrktg4i6tJGXP9he +PDIhbX+LiGueT2pxbmZBR5dzWWchETcXyIqvZ7vQqGmbczkR4+N2J/CzfSJP +p6+njohMy/gobradeW8F7H5OxFc7Qv4ust+3JWg952AbOy8FIv8o21zvIzM9 +e4g4Uuha0sz2B/oX9ZFPRHTZoDKWz3ZlvmPD/q9EzGjyr4xk++y6Z47jc0QM +jZSVMWfb+6jWhP8/IiZL6yvxs03tvR47xS2BJ98Vt7xk5yOEfMJBQhLYsfaU +yCm2xwsiCn5ISiAFKzlJbD/hH6WGKUug3jazG/3s/K+EOrQvaEpg5hociWE7 +oP/Jvih9CfyTUdRDYHubiebvvyiBeyhX4u6xv6f0vezUE5YSGL5VcJDM9twG +HoXVjhK4l645x2T3Q97AsAW3rwTGHXjoXMTul8itdoMpQRL4lcf8ngTbdkWP +jq6PkkD3kJmGOHa/rRzLuiZ0TgKtNq+yNlRgwR5RmympCgnsFb632ZHdz6To +uvib9RJoEktdTmb3O9/wJoLCCwn0mzArqWbPA6uEE1R7JXDby8d1fyVZQLBi +pWuvSGDjW9s3JPa8TZWpqlTwSGLoo5afWgQWNBEvs/SEJRHnRgVUxNj9MRYw +TFWRxGu6trQ/7HnuiFcmb7OSRC7ppDd2Aiy4O36h+T9HSfxenEsQY8//cduV +PZYekthTSw18u44FmjJ9p22DJXEy7IyfAS8LzjDPv3fNlMQKt4L+Mk4WbP3+ +JypgRBL5au++cl9g79Ptl9WefpPEkq5kx0fz7H2Zq9kn8ksSG94d9SfMse+R +o6chi0cK4UL3jqoZJnxjPl/g3CKFVl/j7AsmmHDpZHro1WNS2PFDzMKFvW+b ++zcrf4uXQtmlxxYO7H38l9zYyTgrhZPGJhvM3jHhwJd53c83pHBJ6P0vybfs ++2O9e3ZLoxQ6Vt7LjmphwrCYakATvzTePSdoK1rDBPHAJzLi4tJ4xDV+24NK +9j5udnl9UF4aDwRVGDLKmVAddVZjA0kam0V6N9s9ZMKZjzOTri7SWFDMcV7j +NhN079X5fs+Txoe7vXJb2fconmbvJWkgg/U4OFrlwYTtHjd/6JvIoMLdeA+7 +3UwQiPt6yslaBhuE/tl93sWE642nC9I9ZfDkUZGa33bs+2BZ+3Vtigzyy0gI +dZkwYcZFKfxnrwxubCPYuKowwSNs/syraFmUWintbhitAZVME+nJ07JIamGp +Xv5Uw87v/EPudFksUku/4DVQA1F/N3eY5Mti2BqBlsmuGsg45SHGeiWLeW4h +NjWNNfDqwn+37sjIoVo1atNzaoBafLXy+BM5LDmXEyHvVANb37ctTzfL4QmN +4luX7WrAhmON+d63ctjleJe8xroG9jkE9MKoHLYKe1R3m9SAWbTCiTgueeSR +50030a6BILlft43V5dFTx2eXOV8NNPnemmoMl2fP314VqbpqOPx7Nq6ZXwFN +Qu/IfBCshkV1wUFNJ0U8E/+2xOJoJdCKHuRcuaKECis6Zx+UlMOssKWn8zNl +3JQ2eS9kvhQ+p3o6H+VWxW3XDCgL0sVg8T3CYpSyEVef5265dv0+fNvHE1J5 +YhOyOsKdLi8UsP//xVcnPduMZknqv9Ru3Abh16pppd/V8Bz3kPH7Ovb/fnKJ +HYWigYb6JmbHOq9BlrqhoIivJl532S+iuTETWiWN9X5e2IKOd8b8zBUuAVX6 +WbrWOy1sL83JT3yUBsNKyoMTfVr4Uem+ZsPtNEhRT1TP/6iFvRYyGnxn0qCH +avmCOKGF/wSCwtqd0yDC9e3Sqr9a6OC4rlh29hy4WQWTJgW1MdxCwvLlpnNw +JZm9DijauPGzzKBB/lkQ4MwL9TqpjU29Bc16rcmwdvHJztkEbbQ2Ezx8vjwZ +/k0P6MYnaePoZ/PWP9nJ8L1PYjYnVRt7JmSurj2cDB3lF44MXdFG26+hD2cF +kuGid/yBvUXaWMai8m9wSQLCM08X9y5tNKUX92gvnAbZeDmaq6oOKr+XjXbx +PQXFITyKA5t0sF29IobheAoYB2a5vdR18O4D/xKS8Slwt2rs9NPWQc2G/SlW +UqfgupjvoWNUHdxUoqev3XESJO4XZ2fa6GC63I2KF7STINpJX+wO18GUDRee +z8rHA6/KnmqH/3Qw8bBHudjG4+AvAZZFLTrItcuJSuA7Dq38ioOcr3TQQlHo +teZULKT++sJV1aGDj8SEhnIrYkGgOcRJvE8Hxe2+ulw3jgXhQ2fn+r/p4FlZ +u+PtXjEgXVaru19YF1/0hqx/Vx4FW+gSJRHuujgS3UfLvxwBFUoHl1Z76qLJ +kL7T2ugIMOBjmad56yJtY1P3Ca8IMHnvMpTvq4vG1Q86mFsiwDk4S+htsC7K +rnVawNZwOHFHPFQjURdf9zh5XucKhw5+guGnYl2sqnDfJHIuFI4OCjdacpCw +wL/J435/MDS/2PPo/moSpsiwgp43B4NsSUENHxcJp43XZc9WBUPrCeqDVl4S +StN2cMamB4OigneGpQgJw/hff/YwC4Y3+8p8LVVJuO7DxoytVUGgPWG73tKa +hLtxl1wqIxC+/0x1ssgioaBFkcs200PwoSfX+UY2CT8E7qKOqxyC1kfVu2av +k/D5z8H4Ap5DkJ805Ho1l4Rp/jtnQ9v8wU2K7DFxn4SObqeldu32h+cm/QdS +HpHwakUut1zUQbh2YfOxlmES1i7G+uq+9IXkcEakzCgJq9ZcdZMq84Xw3Tuj +gr+QUNtF1Ugm0xfsVGJjJL6RkJIzHnFony+sZXXEHZxn5yFg2qK1fACChyJS +eHnImBkGJHO9A2Cu9SLbQpOMysEfLbbU+IDL2u2OHVpkjCg4PiJx0wf8B1r4 +d+mS8avIGXH50z6QdvZ1nI8+GUs6hn9E7/SBd1+6DpwwJqPrLu/5gNl94JMz +olvlREbrwduWW3T3wUmhVS/lj5NRxDhtKuyFF1weP5lwN46MXeEm1JRSLyh4 +soax5RQZTx6nuVVme0HrEZ4yo2QyymilPrYP9AKh1g2ZzhfJOMdl/LxAwgty +TsruSy0g48IPh913j3rC459GSwttZJzKyq8b8feA3Fc13jvfkNHjXI86zdwD +Eu6QWos7ych1suAmS8kDLHapX93fw65vc+86pQF36KqV1O/8RMY6ysGkB/bu +MBm/eLR4jow/tgS7HTfeAwTBmkkfST1c23VPd6uRGyyO6zo0SOthcFuILYe0 +G3x4WsySktPDdua1iwN/XSE3pCD5rZIe/na6Jrb02BU03meooqYeWn0u7X68 +1RVMboZ6S6Ee2n/xYNo6u0CAhm7fm/16KFf3X2tbujOELUj+2eunh9p+O19p +hDhDzDNOyWl/PSz0XX3xoZMznHXpduUL0sP+Jc2PBClnKEw41msSpYevHyrV +J9x1guEPj3sq0vQwNaamtOSFIzifs3qfUaOHn8/aW7rK7AR3F/KCUq0ePr4d +camNcyf4KMmIl9frobxFd4z3pAOEsKad257qYU67W/lojQOkj154t/aVHm5W ++0NzdnSAVnpPd8SQHlYtk543XbQH+rRPlysvBX2aPGzXqNgBoc48r34dBXca +bSg/LWgH00lqQXICFExSfs1H/20LNxVm1o0KU/B624CJxl1b+OcYbRokTcHF +Ni0nPW5beFJ3oTxRi4IyUVyk1vYdYJzyOL3CiYLmIQey/ou3AknnXA+CCwXL +CyWCbT2s4IdigkakGwWlPYfzOYysIK/eopmxl4K9wWvCB+csYfVM10qLHwUf +Sappn/K3hEbnrwFD0RTk769bsXa3gG3KxB38eRS02nbkafNec6iceq7gk0/B +u+TvMS+MzUG5JuRXbQEFB+4taHxRMoc1lu23/IooKPRb/kP6uBk8C0z80VhJ +QfL8l8z4EDNg1M1lRv1HwaCxvinW+W1AcXgz/OUbBfslxk0zh0yhQOpEDeM7 +BavEQspKX5iC2KhGasYsBSWlHr0bf2AKcxHJeqa/KDgu7dpcGWkK5Tcg+eYK +BUEXX9WImoLWxENNJ2F9/M7b3mVjZwKb4s4ce6avj9bbM9wnPyDUG93hsqbq +Yz7v57D6JgS7hScXu2n62NdK1it+gHAsYP7BuLE+RjptI8zEIDTv8fwkYK2P +fA9YvhOyCH6GFMvdnvqo5z3RpvKGAfd+fJKaS9ZHz4yulmwlGjCK/xbGntVH +nf/U39/6YwRvD4pTuNP00WzZPbX/jRH8GbK2k7ykj7EzG77OxxmBZXtNAt7Q +x+aw+aCST1SYLDo3lVqmj6IZTur/HhiC2n7DJyp9+hjfl1uw+6A+nFe0+XPq +gz5qSsNBPgt9mPvorTc8qI8ySb3Kw5v04bFbatHNEX18u8X19boJCjjYfcwU +n9LHQf0LvSaHKBBpdDqIl8MA3/RkyRMj9KBZ6I3ClIoB1oaGe6sVkUCzfXSP +1SYDbNg+dCH3PAkupv7JvKdmgLmzA0ALJcEebmWBA1oGOBS5M6SfToLvf8P/ +DBoYoM9Os8b6t7pAGJfu7LAyQKrdpc9fVuvC/sd+CZXBBiiEs+T2aG2YPjIZ +sS3UACmfXg6GeWvDMZnDh96FGyCP5/bTaKENZ2ICHX5HG+C8Laegsbg2lFLD +5WmJBhh905bedVAL/lafqm/MNmDPx8zDg1OacLHk5tzbRgPkcp9f+a2iDtJ7 +5cf3vTBA8tri4OwlNbgjkNc/12yA3h98CJFv1IB55M4zQpsB6g59Yn6LVYMB +9Qfpbj0GuJv3YnV+72bYVMjSGP5mgH9uVu4Vub4JnuR0+cyKGeKTp16t/Zaq +MGStsDecaIjrG7KCSZtUgWPxiOuSpCESHdcQHnGpgok9tw2XvCEeijhtt/+p +CrxYRdWXUDPErV9/H11tpAKvvG/xGjMM8SGtM1NfXxn6lP2L0w8Yonp+S9aA +vSIsdVQXih00RENj+aAlsiJIx3Lezj5kiFFDD2+ZEhXBvft6Zn6QIfueElUc +PirA0On2OGaUIf4Cv7tegQrwZYy8cyjNEM1t5RwlM+VhrnBlQavGEO/17ctb +WisLY85mOSksQ/TKXnmp2ycDPWvObR+pM8TqZ7dJhQ9loM5T8uqVBkNsu3Uh +ztpJBk4S9ajLLYbIvegRe/SuNAgm+8e0fjBENcv5xBlnKdDw7ebYv5qK/14/ +uXt/iAiyYtL3Hq+hIrdMLJNQRwTBRm97IjcVp56KNddkEOGn7Ezuy3VUzL58 ++02mFRFq3/GZ6opR8bwUj3wzSxy2m+HplY1UVFq1xrDkFgH2qRTxZu+gouqw +dmTneVGIeu7hr2pHxVuitdl1R0Qhfb/wy3IHKn7VIt7osRKF+juRqS93UdFI +8hqhlEcURFW3b1j2oqL6ldayVwki8EJ1VNQznIq779gejEkUBrVNcvKqt6jo +/fTfwH8PBQGb38aV51KxP358qOGCIDj7JX5i5FNxSDeXeyxMEE4VTuXtukdF +JoWnoYIhCB821aukVFBxOOTU+6L8DZC22VX9239UfPgr9cjyagGYVbtEKZ9h +O3t9aewSH/S8wm0iP6kIrgW/rnTwQUPA9M7QeSp+Ix3ePnOHD9LKLYIpf6hY +Ffq6yMueD9SoHA9qOY0w3GbroF4RL3hbHFFoJBihWxTWuvjzQJev+foumhGm +M1Jst4quhTreeUk9MMLYQsmsuhkuyCvK23zF2Ag3cjUX+r3mgqDvy2YuZkZY +MX9jzjuJC/gjKuM/2BohZasdX8fyGjBLVFj47G2EMk3nuaznOIGZv/RpPtkI +DX6ojHzgWg0U09AFy7NGeNZIUVNsYhVUffq2PuecEXLTehuOvVoF5bKD+pYX +jfCBQnRnw6VV8CCr4dzNa0Z4LCOeaKO8CnJSTxuaFxuhp+ue8s07OCAldMOF +rE52PVfv5JcdW2bwiCQXTHUboYDoI3Mxi2VGYhlHvUmPEWZZZhx7KrHMSJie +Hfv2wQiPaz3+Mlv3l3Hcr4tmPGaEie257+5y/mUc3XN1fOK3EfLLz0QL5vxh +uG1VQiNZGv76etKKxPebsdzFI9AoT0NOAtky8+MCI2f/dL+lEg1Za8i5JlUL +jLFEVoTbJhpm27tkH/FaYBxtsS2J1KVh7bXbRTyPfjHO2MTIMs1o6PmY79Nc +3Dyj1qX7LzmQhmvnyQlvDH4y3CdqW+uDabhosIXbkfCTwRGVk7U1lIbM228I +QnM/GGbXDpEdI2lIOnPEz7D0B+PtwKrDIadoOHWSo8VA/Qdj0ntLf1kmDdu5 +fLtvq88ypI4ksbY00LBfRet8zt1pRtrKAb2zz2joZNmpfj9kmrH6olnZlyYa +BkZRjLhxmjFZzXUvp4WGAa2EelbvFKOWIyFLuJOGp4K8y34ITjHcLsdF/Bpl +10/rnrdI+8rIqovUe7yOjuLfbnnseTrOWG/jWiYpQMf7rDtpU1fGGXFDBpoR +gnRMtHz7qPHwOMOP67eythgdVb0TQukS4wx923DRPFk65qmsG3IL+8J4N3z0 +52kdOiqtkMM+G44xxPgOl+3YRUdGKk/n6dkRRr5pbNSMKx131i5pz7WOMHRj +00wv7aHj+Ota33v5IwybmdLuHi86nsnYGz7mMsJIfDe/uO8wHSuYB4ZvNA0z +fuedMImKp+OOywv12YWfGH1GlzoLiuiovtknLhg+MvzC8q9bFNNRWfGuo9nq +j4xfxVX7v5XS8Xr5qnXnng8yhBV7FnSq6Uiail45vGOQYcUjI/2ogY78k+KR +Xt4DjPquAp/ObjqGVaU7hOb0MywFmJrhPXR8vP6J9Xr/fkaPecsvYj8dY8eF +gI/cz5ir/ZrsMURHB64WI72WPoZmrvbDiUk6BsyUKpF/9zLq+4zDU6foyNG0 +5DPe1MuwFN0JWjN0rAo5K7V8oZdxICnsTeg8HW2H42jbNHsZcw2J2eK/6Vhj +WrwzYqmHcfJP5r7aP3SUO/jAkLu1hyFIvqfhvkzH5uhr5nNZPYybR2rnV1bo ++L6l9D3dr4fxP3W/2EE= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VA8XB3AlWYqsY+y7ypJlxmDMzDkosmQLoQgpUlmyZStKlpK0iLQh +SSn7MoNKUT9UKJQlEhGKKJIk77x/3efzz32e871nuQregQ77V3NwcLxaxcHx +/+evwZYm5bP5DP9Ly48+m9gzum4SI417TkLRri+wcF8LUKzdm9hzEQT1u7cX +3QcIt7v/nrMnD1bS3cSO3LcFoWnxi4vvy+FMi5TM1L298LHeJnDu/TNY+mtX +vbkwEMyUJwdm378FjbgxU6PcE7D4Xj9j5v0w7J7ILrl1+jw0mt7Nf5P3E/4K +/ohY1sgB6Y+sMW+NZfD45NipFnEXRA/vvc9tyokrq5Y7lVYeghr37Rd2uziR +J/XtwGeJYsC8seGrhzixcMQ/KJNcDId7jkhpXObESSldzjcHi6Fpa0yq3Sgn +vvzZXHi5sxhCZa4GXE1ag0o5q/0c80ugs+2trvorLgwgbh3Ru1EKF3XM6myc +eDDsaIzVQaly0Op3Naf78aDa/qPLG1TL4VXCkU71aB4ckO50LNEuh7U9l7/y +5PLgrT3lY++3lUP08RGpxm882Jq0ntYRWA4+L+Ni9BN4ceLdvTG3Z+VA2V9H +l6/gw5rqMIFGrwroFGhvEXjBh4rDAYHHDlVAEHPYabmHD0/aWRFUwyrg/jq+ +gL5/fFgwvUHdP7kC5Mpdbl62XIfTC5c2ZhRXAM/K/D+e4XXoP1ZCCl2sgN4s +7YZZQX6sNxT8uC2lErI7izaEq/Bj7obqd6yLleAmsHHvH0N+nH9c5q18vRI+ +nJL5t3ofPyocDtYcKK6EoQA+mmgVP2Y5CW0f6KyE8a2fayiuAnhc3CRSTLoK +fs9klkTnbsArJPfjzneqgKUusrJStQH7c4UvZz2sgqgDaTYJrRvw5M75xY6q +KvjbnzCV+nMDzoddL1F+UQVxI0yxdkVB3EaIyNg1VgUJbXd2DoUKYkzP1J8J +5Wo4m3+ifbWEEBK0W2SZ2dVgST4oLKYkhNc0wptycquBp8nBaaOmEOq9aJg6 +UVgNCSMq/VbGQmhvymhWqK6GGMVXY5cPCmH47YqUnx3VEJBD/KdaK4SpeYW1 +bWtqwP56mYbVbmH0fObI67W/BgQ1rgW67xfGSK4SbYlDNdBWl1AeGCiMFt3h +Hf8F1YBl/y6Dy6eE8fh0RiRPTA2YSP4zHSgSxpQD+8LEL9YAOctyd+BfYSy4 +5mdyuL4GxC+PpFy6IYKehZ9//ORlAlG9KuF3gQg++ZorsUWACZLPEk+4l4rg +fcFvqzyFmSA7szlsY6MITj0bkiiSZIKKdZBn3bgIvgvcGz2oxgTSmmXKCEkU +hby1K2stmEC+1qaznS6KvGpfbIJ3MIGim6Px0EwUPV3lmHL2TKB6mipGuIoi +16bpxX0uTDCuT+Ffd0IUVX3nnc8cYIJtKOGzbqsoBl+75WMbzwS7deODmZ2i +aNij6HMqgQkOeazevx9EcYHjvGlJEhOcO/a0v/guioxA0bvT55jgrnG71k1M +DBv/81Fen82EQ5+1Lpz0FENOh3zFxlImHI5elfrloBjKyP16FFbBhADhzkTr +EDEkXxy3ka9mwlEMjyEkiiE2le5yr2NC5PV63/tFYvh5fYNWxHMmJDlaMN7+ +EsOHdhMe6j3svCrbJFevIqBW2aj6uT4mFIs4LuisI+Byutbt0Q9MePfWo/SC +HAHFF25fjfrEBGX7UEX77QRsW1o/Rp5kArN08V+cAwHthKy3WX9jgrXgif7S +PQTUrN/l5TbNhJD2lMuCwQT88jm61+0HE57tuLW24yoB/0RXC0wtsut/qDyy +cpuAc9o/s2qXmDC5/v4TrWIC/pN69/P4MhOEXlUeO/+MgJ+OD6l842CBp2Xr +pM1XAjoJHWpy4WbB3D3b/47PE/DRrLjMAA8Lkni7bxevEDB27spuFz4WFDd/ +3CMgKo6qs5wZJH4WLJvNt72miWNcQIJ5rDAL0guiipbNxHH6XbI0S4QFyms5 +kjXtxRFluqe+irLA+jmf8bn94vhz81A6RZwFQ8rpMo8CxVHj4zE/GyILQhLE +/nyLFEdJc/7t7hIsyDaVr7BOE8eZqyLqnlIs2HL7zvmYLHG0400iO0qz4Nlq +9cMP8sQxWn3RHmRYMPFUT2V9jThKuwp3/5FlQYxC3SraU3GU/f4JX8qxQDAe +Bw+9FMcp01WvL8qzwACtMl9+FMdrUOXArciCV7c6QpYmxPHDaJZDJdueK052 +6nPiGIH+J1yU2Pl49Gvs/ieOE8V7PvxkO+mxJ+9ZHiIe2V54OFGZBZKyY6O1 +wkTUeZ9CElRh5xV76NmkNBHbO03IF9h+RwuPttQhYvNWl5ljqizwv760K8qI +iObjNuUf2V5eiiPf30bE4zb2dfSN7Dx3rxXqsyXiuBBT4BLbynVnp3jdiLhz +71DJR7aZkkKthj5EFJtVz1PaxM436krBwQAievGtmvBge6hX6tTVY0TMO9qa +dIHtEMPcvS0niZgYtBBfx7ZljsCcVSoRXzduGe9jW5E7Jrktg4i6tJGXP9he +PDIhbX+LiGueT2pxbmZBR5dzWWchETcXyIqvZ7vQqGmbczkR4+N2J/CzfSJP +p6+njohMy/gobradeW8F7H5OxFc7Qv4ust+3JWg952AbOy8FIv8o21zvIzM9 +e4g4Uuha0sz2B/oX9ZFPRHTZoDKWz3ZlvmPD/q9EzGjyr4xk++y6Z47jc0QM +jZSVMWfb+6jWhP8/IiZL6yvxs03tvR47xS2BJ98Vt7xk5yOEfMJBQhLYsfaU +yCm2xwsiCn5ISiAFKzlJbD/hH6WGKUug3jazG/3s/K+EOrQvaEpg5hociWE7 +oP/Jvih9CfyTUdRDYHubiebvvyiBeyhX4u6xv6f0vezUE5YSGL5VcJDM9twG +HoXVjhK4l645x2T3Q97AsAW3rwTGHXjoXMTul8itdoMpQRL4lcf8ngTbdkWP +jq6PkkD3kJmGOHa/rRzLuiZ0TgKtNq+yNlRgwR5RmympCgnsFb632ZHdz6To +uvib9RJoEktdTmb3O9/wJoLCCwn0mzArqWbPA6uEE1R7JXDby8d1fyVZQLBi +pWuvSGDjW9s3JPa8TZWpqlTwSGLoo5afWgQWNBEvs/SEJRHnRgVUxNj9MRYw +TFWRxGu6trQ/7HnuiFcmb7OSRC7ppDd2Aiy4O36h+T9HSfxenEsQY8//cduV +PZYekthTSw18u44FmjJ9p22DJXEy7IyfAS8LzjDPv3fNlMQKt4L+Mk4WbP3+ +JypgRBL5au++cl9g79Ptl9WefpPEkq5kx0fz7H2Zq9kn8ksSG94d9SfMse+R +o6chi0cK4UL3jqoZJnxjPl/g3CKFVl/j7AsmmHDpZHro1WNS2PFDzMKFvW+b ++zcrf4uXQtmlxxYO7H38l9zYyTgrhZPGJhvM3jHhwJd53c83pHBJ6P0vybfs ++2O9e3ZLoxQ6Vt7LjmphwrCYakATvzTePSdoK1rDBPHAJzLi4tJ4xDV+24NK +9j5udnl9UF4aDwRVGDLKmVAddVZjA0kam0V6N9s9ZMKZjzOTri7SWFDMcV7j +NhN079X5fs+Txoe7vXJb2fconmbvJWkgg/U4OFrlwYTtHjd/6JvIoMLdeA+7 +3UwQiPt6yslaBhuE/tl93sWE642nC9I9ZfDkUZGa33bs+2BZ+3Vtigzyy0gI +dZkwYcZFKfxnrwxubCPYuKowwSNs/syraFmUWintbhitAZVME+nJ07JIamGp +Xv5Uw87v/EPudFksUku/4DVQA1F/N3eY5Mti2BqBlsmuGsg45SHGeiWLeW4h +NjWNNfDqwn+37sjIoVo1atNzaoBafLXy+BM5LDmXEyHvVANb37ctTzfL4QmN +4luX7WrAhmON+d63ctjleJe8xroG9jkE9MKoHLYKe1R3m9SAWbTCiTgueeSR +50030a6BILlft43V5dFTx2eXOV8NNPnemmoMl2fP314VqbpqOPx7Nq6ZXwFN +Qu/IfBCshkV1wUFNJ0U8E/+2xOJoJdCKHuRcuaKECis6Zx+UlMOssKWn8zNl +3JQ2eS9kvhQ+p3o6H+VWxW3XDCgL0sVg8T3CYpSyEVef5265dv0+fNvHE1J5 +YhOyOsKdLi8UsP//xVcnPduMZknqv9Ru3Abh16pppd/V8Bz3kPH7Ovb/fnKJ +HYWigYb6JmbHOq9BlrqhoIivJl532S+iuTETWiWN9X5e2IKOd8b8zBUuAVX6 +WbrWOy1sL83JT3yUBsNKyoMTfVr4Uem+ZsPtNEhRT1TP/6iFvRYyGnxn0qCH +avmCOKGF/wSCwtqd0yDC9e3Sqr9a6OC4rlh29hy4WQWTJgW1MdxCwvLlpnNw +JZm9DijauPGzzKBB/lkQ4MwL9TqpjU29Bc16rcmwdvHJztkEbbQ2Ezx8vjwZ +/k0P6MYnaePoZ/PWP9nJ8L1PYjYnVRt7JmSurj2cDB3lF44MXdFG26+hD2cF +kuGid/yBvUXaWMai8m9wSQLCM08X9y5tNKUX92gvnAbZeDmaq6oOKr+XjXbx +PQXFITyKA5t0sF29IobheAoYB2a5vdR18O4D/xKS8Slwt2rs9NPWQc2G/SlW +UqfgupjvoWNUHdxUoqev3XESJO4XZ2fa6GC63I2KF7STINpJX+wO18GUDRee +z8rHA6/KnmqH/3Qw8bBHudjG4+AvAZZFLTrItcuJSuA7Dq38ioOcr3TQQlHo +teZULKT++sJV1aGDj8SEhnIrYkGgOcRJvE8Hxe2+ulw3jgXhQ2fn+r/p4FlZ +u+PtXjEgXVaru19YF1/0hqx/Vx4FW+gSJRHuujgS3UfLvxwBFUoHl1Z76qLJ +kL7T2ugIMOBjmad56yJtY1P3Ca8IMHnvMpTvq4vG1Q86mFsiwDk4S+htsC7K +rnVawNZwOHFHPFQjURdf9zh5XucKhw5+guGnYl2sqnDfJHIuFI4OCjdacpCw +wL/J435/MDS/2PPo/moSpsiwgp43B4NsSUENHxcJp43XZc9WBUPrCeqDVl4S +StN2cMamB4OigneGpQgJw/hff/YwC4Y3+8p8LVVJuO7DxoytVUGgPWG73tKa +hLtxl1wqIxC+/0x1ssgioaBFkcs200PwoSfX+UY2CT8E7qKOqxyC1kfVu2av +k/D5z8H4Ap5DkJ805Ho1l4Rp/jtnQ9v8wU2K7DFxn4SObqeldu32h+cm/QdS +HpHwakUut1zUQbh2YfOxlmES1i7G+uq+9IXkcEakzCgJq9ZcdZMq84Xw3Tuj +gr+QUNtF1Ugm0xfsVGJjJL6RkJIzHnFony+sZXXEHZxn5yFg2qK1fACChyJS +eHnImBkGJHO9A2Cu9SLbQpOMysEfLbbU+IDL2u2OHVpkjCg4PiJx0wf8B1r4 +d+mS8avIGXH50z6QdvZ1nI8+GUs6hn9E7/SBd1+6DpwwJqPrLu/5gNl94JMz +olvlREbrwduWW3T3wUmhVS/lj5NRxDhtKuyFF1weP5lwN46MXeEm1JRSLyh4 +soax5RQZTx6nuVVme0HrEZ4yo2QyymilPrYP9AKh1g2ZzhfJOMdl/LxAwgty +TsruSy0g48IPh913j3rC459GSwttZJzKyq8b8feA3Fc13jvfkNHjXI86zdwD +Eu6QWos7ych1suAmS8kDLHapX93fw65vc+86pQF36KqV1O/8RMY6ysGkB/bu +MBm/eLR4jow/tgS7HTfeAwTBmkkfST1c23VPd6uRGyyO6zo0SOthcFuILYe0 +G3x4WsySktPDdua1iwN/XSE3pCD5rZIe/na6Jrb02BU03meooqYeWn0u7X68 +1RVMboZ6S6Ee2n/xYNo6u0CAhm7fm/16KFf3X2tbujOELUj+2eunh9p+O19p +hDhDzDNOyWl/PSz0XX3xoZMznHXpduUL0sP+Jc2PBClnKEw41msSpYevHyrV +J9x1guEPj3sq0vQwNaamtOSFIzifs3qfUaOHn8/aW7rK7AR3F/KCUq0ePr4d +camNcyf4KMmIl9frobxFd4z3pAOEsKad257qYU67W/lojQOkj154t/aVHm5W ++0NzdnSAVnpPd8SQHlYtk543XbQH+rRPlysvBX2aPGzXqNgBoc48r34dBXca +bSg/LWgH00lqQXICFExSfs1H/20LNxVm1o0KU/B624CJxl1b+OcYbRokTcHF +Ni0nPW5beFJ3oTxRi4IyUVyk1vYdYJzyOL3CiYLmIQey/ou3AknnXA+CCwXL +CyWCbT2s4IdigkakGwWlPYfzOYysIK/eopmxl4K9wWvCB+csYfVM10qLHwUf +Sappn/K3hEbnrwFD0RTk769bsXa3gG3KxB38eRS02nbkafNec6iceq7gk0/B +u+TvMS+MzUG5JuRXbQEFB+4taHxRMoc1lu23/IooKPRb/kP6uBk8C0z80VhJ +QfL8l8z4EDNg1M1lRv1HwaCxvinW+W1AcXgz/OUbBfslxk0zh0yhQOpEDeM7 +BavEQspKX5iC2KhGasYsBSWlHr0bf2AKcxHJeqa/KDgu7dpcGWkK5Tcg+eYK +BUEXX9WImoLWxENNJ2F9/M7b3mVjZwKb4s4ce6avj9bbM9wnPyDUG93hsqbq +Yz7v57D6JgS7hScXu2n62NdK1it+gHAsYP7BuLE+RjptI8zEIDTv8fwkYK2P +fA9YvhOyCH6GFMvdnvqo5z3RpvKGAfd+fJKaS9ZHz4yulmwlGjCK/xbGntVH +nf/U39/6YwRvD4pTuNP00WzZPbX/jRH8GbK2k7ykj7EzG77OxxmBZXtNAt7Q +x+aw+aCST1SYLDo3lVqmj6IZTur/HhiC2n7DJyp9+hjfl1uw+6A+nFe0+XPq +gz5qSsNBPgt9mPvorTc8qI8ySb3Kw5v04bFbatHNEX18u8X19boJCjjYfcwU +n9LHQf0LvSaHKBBpdDqIl8MA3/RkyRMj9KBZ6I3ClIoB1oaGe6sVkUCzfXSP +1SYDbNg+dCH3PAkupv7JvKdmgLmzA0ALJcEebmWBA1oGOBS5M6SfToLvf8P/ +DBoYoM9Os8b6t7pAGJfu7LAyQKrdpc9fVuvC/sd+CZXBBiiEs+T2aG2YPjIZ +sS3UACmfXg6GeWvDMZnDh96FGyCP5/bTaKENZ2ICHX5HG+C8Laegsbg2lFLD +5WmJBhh905bedVAL/lafqm/MNmDPx8zDg1OacLHk5tzbRgPkcp9f+a2iDtJ7 +5cf3vTBA8tri4OwlNbgjkNc/12yA3h98CJFv1IB55M4zQpsB6g59Yn6LVYMB +9Qfpbj0GuJv3YnV+72bYVMjSGP5mgH9uVu4Vub4JnuR0+cyKGeKTp16t/Zaq +MGStsDecaIjrG7KCSZtUgWPxiOuSpCESHdcQHnGpgok9tw2XvCEeijhtt/+p +CrxYRdWXUDPErV9/H11tpAKvvG/xGjMM8SGtM1NfXxn6lP2L0w8Yonp+S9aA +vSIsdVQXih00RENj+aAlsiJIx3Lezj5kiFFDD2+ZEhXBvft6Zn6QIfueElUc +PirA0On2OGaUIf4Cv7tegQrwZYy8cyjNEM1t5RwlM+VhrnBlQavGEO/17ctb +WisLY85mOSksQ/TKXnmp2ycDPWvObR+pM8TqZ7dJhQ9loM5T8uqVBkNsu3Uh +ztpJBk4S9ajLLYbIvegRe/SuNAgm+8e0fjBENcv5xBlnKdDw7ebYv5qK/14/ +uXt/iAiyYtL3Hq+hIrdMLJNQRwTBRm97IjcVp56KNddkEOGn7Ezuy3VUzL58 ++02mFRFq3/GZ6opR8bwUj3wzSxy2m+HplY1UVFq1xrDkFgH2qRTxZu+gouqw +dmTneVGIeu7hr2pHxVuitdl1R0Qhfb/wy3IHKn7VIt7osRKF+juRqS93UdFI +8hqhlEcURFW3b1j2oqL6ldayVwki8EJ1VNQznIq779gejEkUBrVNcvKqt6jo +/fTfwH8PBQGb38aV51KxP358qOGCIDj7JX5i5FNxSDeXeyxMEE4VTuXtukdF +JoWnoYIhCB821aukVFBxOOTU+6L8DZC22VX9239UfPgr9cjyagGYVbtEKZ9h +O3t9aewSH/S8wm0iP6kIrgW/rnTwQUPA9M7QeSp+Ix3ePnOHD9LKLYIpf6hY +Ffq6yMueD9SoHA9qOY0w3GbroF4RL3hbHFFoJBihWxTWuvjzQJev+foumhGm +M1Jst4quhTreeUk9MMLYQsmsuhkuyCvK23zF2Ag3cjUX+r3mgqDvy2YuZkZY +MX9jzjuJC/gjKuM/2BohZasdX8fyGjBLVFj47G2EMk3nuaznOIGZv/RpPtkI +DX6ojHzgWg0U09AFy7NGeNZIUVNsYhVUffq2PuecEXLTehuOvVoF5bKD+pYX +jfCBQnRnw6VV8CCr4dzNa0Z4LCOeaKO8CnJSTxuaFxuhp+ue8s07OCAldMOF +rE52PVfv5JcdW2bwiCQXTHUboYDoI3Mxi2VGYhlHvUmPEWZZZhx7KrHMSJie +Hfv2wQiPaz3+Mlv3l3Hcr4tmPGaEie257+5y/mUc3XN1fOK3EfLLz0QL5vxh +uG1VQiNZGv76etKKxPebsdzFI9AoT0NOAtky8+MCI2f/dL+lEg1Za8i5JlUL +jLFEVoTbJhpm27tkH/FaYBxtsS2J1KVh7bXbRTyPfjHO2MTIMs1o6PmY79Nc +3Dyj1qX7LzmQhmvnyQlvDH4y3CdqW+uDabhosIXbkfCTwRGVk7U1lIbM228I +QnM/GGbXDpEdI2lIOnPEz7D0B+PtwKrDIadoOHWSo8VA/Qdj0ntLf1kmDdu5 +fLtvq88ypI4ksbY00LBfRet8zt1pRtrKAb2zz2joZNmpfj9kmrH6olnZlyYa +BkZRjLhxmjFZzXUvp4WGAa2EelbvFKOWIyFLuJOGp4K8y34ITjHcLsdF/Bpl +10/rnrdI+8rIqovUe7yOjuLfbnnseTrOWG/jWiYpQMf7rDtpU1fGGXFDBpoR +gnRMtHz7qPHwOMOP67eythgdVb0TQukS4wx923DRPFk65qmsG3IL+8J4N3z0 +52kdOiqtkMM+G44xxPgOl+3YRUdGKk/n6dkRRr5pbNSMKx131i5pz7WOMHRj +00wv7aHj+Ota33v5IwybmdLuHi86nsnYGz7mMsJIfDe/uO8wHSuYB4ZvNA0z +fuedMImKp+OOywv12YWfGH1GlzoLiuiovtknLhg+MvzC8q9bFNNRWfGuo9nq +j4xfxVX7v5XS8Xr5qnXnng8yhBV7FnSq6Uiail45vGOQYcUjI/2ogY78k+KR +Xt4DjPquAp/ObjqGVaU7hOb0MywFmJrhPXR8vP6J9Xr/fkaPecsvYj8dY8eF +gI/cz5ir/ZrsMURHB64WI72WPoZmrvbDiUk6BsyUKpF/9zLq+4zDU6foyNG0 +5DPe1MuwFN0JWjN0rAo5K7V8oZdxICnsTeg8HW2H42jbNHsZcw2J2eK/6Vhj +WrwzYqmHcfJP5r7aP3SUO/jAkLu1hyFIvqfhvkzH5uhr5nNZPYybR2rnV1bo ++L6l9D3dr4fxP3W/2EE= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0982826660288101}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0982826660288101}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VA8XB3AlWYqsY+y7ypJlxmDMzDkosmQLoQgpUlmyZStKlpK0iLQh +SSn7MoNKUT9UKJQlEhGKKJIk77x/3efzz32e871nuQregQ77V3NwcLxaxcHx +/+evwZYm5bP5DP9Ly48+m9gzum4SI417TkLRri+wcF8LUKzdm9hzEQT1u7cX +3QcIt7v/nrMnD1bS3cSO3LcFoWnxi4vvy+FMi5TM1L298LHeJnDu/TNY+mtX +vbkwEMyUJwdm378FjbgxU6PcE7D4Xj9j5v0w7J7ILrl1+jw0mt7Nf5P3E/4K +/ohY1sgB6Y+sMW+NZfD45NipFnEXRA/vvc9tyokrq5Y7lVYeghr37Rd2uziR +J/XtwGeJYsC8seGrhzixcMQ/KJNcDId7jkhpXObESSldzjcHi6Fpa0yq3Sgn +vvzZXHi5sxhCZa4GXE1ag0o5q/0c80ugs+2trvorLgwgbh3Ru1EKF3XM6myc +eDDsaIzVQaly0Op3Naf78aDa/qPLG1TL4VXCkU71aB4ckO50LNEuh7U9l7/y +5PLgrT3lY++3lUP08RGpxm882Jq0ntYRWA4+L+Ni9BN4ceLdvTG3Z+VA2V9H +l6/gw5rqMIFGrwroFGhvEXjBh4rDAYHHDlVAEHPYabmHD0/aWRFUwyrg/jq+ +gL5/fFgwvUHdP7kC5Mpdbl62XIfTC5c2ZhRXAM/K/D+e4XXoP1ZCCl2sgN4s +7YZZQX6sNxT8uC2lErI7izaEq/Bj7obqd6yLleAmsHHvH0N+nH9c5q18vRI+ +nJL5t3ofPyocDtYcKK6EoQA+mmgVP2Y5CW0f6KyE8a2fayiuAnhc3CRSTLoK +fs9klkTnbsArJPfjzneqgKUusrJStQH7c4UvZz2sgqgDaTYJrRvw5M75xY6q +KvjbnzCV+nMDzoddL1F+UQVxI0yxdkVB3EaIyNg1VgUJbXd2DoUKYkzP1J8J +5Wo4m3+ifbWEEBK0W2SZ2dVgST4oLKYkhNc0wptycquBp8nBaaOmEOq9aJg6 +UVgNCSMq/VbGQmhvymhWqK6GGMVXY5cPCmH47YqUnx3VEJBD/KdaK4SpeYW1 +bWtqwP56mYbVbmH0fObI67W/BgQ1rgW67xfGSK4SbYlDNdBWl1AeGCiMFt3h +Hf8F1YBl/y6Dy6eE8fh0RiRPTA2YSP4zHSgSxpQD+8LEL9YAOctyd+BfYSy4 +5mdyuL4GxC+PpFy6IYKehZ9//ORlAlG9KuF3gQg++ZorsUWACZLPEk+4l4rg +fcFvqzyFmSA7szlsY6MITj0bkiiSZIKKdZBn3bgIvgvcGz2oxgTSmmXKCEkU +hby1K2stmEC+1qaznS6KvGpfbIJ3MIGim6Px0EwUPV3lmHL2TKB6mipGuIoi +16bpxX0uTDCuT+Ffd0IUVX3nnc8cYIJtKOGzbqsoBl+75WMbzwS7deODmZ2i +aNij6HMqgQkOeazevx9EcYHjvGlJEhOcO/a0v/guioxA0bvT55jgrnG71k1M +DBv/81Fen82EQ5+1Lpz0FENOh3zFxlImHI5elfrloBjKyP16FFbBhADhzkTr +EDEkXxy3ka9mwlEMjyEkiiE2le5yr2NC5PV63/tFYvh5fYNWxHMmJDlaMN7+ +EsOHdhMe6j3svCrbJFevIqBW2aj6uT4mFIs4LuisI+Byutbt0Q9MePfWo/SC +HAHFF25fjfrEBGX7UEX77QRsW1o/Rp5kArN08V+cAwHthKy3WX9jgrXgif7S +PQTUrN/l5TbNhJD2lMuCwQT88jm61+0HE57tuLW24yoB/0RXC0wtsut/qDyy +cpuAc9o/s2qXmDC5/v4TrWIC/pN69/P4MhOEXlUeO/+MgJ+OD6l842CBp2Xr +pM1XAjoJHWpy4WbB3D3b/47PE/DRrLjMAA8Lkni7bxevEDB27spuFz4WFDd/ +3CMgKo6qs5wZJH4WLJvNt72miWNcQIJ5rDAL0guiipbNxHH6XbI0S4QFyms5 +kjXtxRFluqe+irLA+jmf8bn94vhz81A6RZwFQ8rpMo8CxVHj4zE/GyILQhLE +/nyLFEdJc/7t7hIsyDaVr7BOE8eZqyLqnlIs2HL7zvmYLHG0400iO0qz4Nlq +9cMP8sQxWn3RHmRYMPFUT2V9jThKuwp3/5FlQYxC3SraU3GU/f4JX8qxQDAe +Bw+9FMcp01WvL8qzwACtMl9+FMdrUOXArciCV7c6QpYmxPHDaJZDJdueK052 +6nPiGIH+J1yU2Pl49Gvs/ieOE8V7PvxkO+mxJ+9ZHiIe2V54OFGZBZKyY6O1 +wkTUeZ9CElRh5xV76NmkNBHbO03IF9h+RwuPttQhYvNWl5ljqizwv760K8qI +iObjNuUf2V5eiiPf30bE4zb2dfSN7Dx3rxXqsyXiuBBT4BLbynVnp3jdiLhz +71DJR7aZkkKthj5EFJtVz1PaxM436krBwQAievGtmvBge6hX6tTVY0TMO9qa +dIHtEMPcvS0niZgYtBBfx7ZljsCcVSoRXzduGe9jW5E7Jrktg4i6tJGXP9he +PDIhbX+LiGueT2pxbmZBR5dzWWchETcXyIqvZ7vQqGmbczkR4+N2J/CzfSJP +p6+njohMy/gobradeW8F7H5OxFc7Qv4ust+3JWg952AbOy8FIv8o21zvIzM9 +e4g4Uuha0sz2B/oX9ZFPRHTZoDKWz3ZlvmPD/q9EzGjyr4xk++y6Z47jc0QM +jZSVMWfb+6jWhP8/IiZL6yvxs03tvR47xS2BJ98Vt7xk5yOEfMJBQhLYsfaU +yCm2xwsiCn5ISiAFKzlJbD/hH6WGKUug3jazG/3s/K+EOrQvaEpg5hociWE7 +oP/Jvih9CfyTUdRDYHubiebvvyiBeyhX4u6xv6f0vezUE5YSGL5VcJDM9twG +HoXVjhK4l645x2T3Q97AsAW3rwTGHXjoXMTul8itdoMpQRL4lcf8ngTbdkWP +jq6PkkD3kJmGOHa/rRzLuiZ0TgKtNq+yNlRgwR5RmympCgnsFb632ZHdz6To +uvib9RJoEktdTmb3O9/wJoLCCwn0mzArqWbPA6uEE1R7JXDby8d1fyVZQLBi +pWuvSGDjW9s3JPa8TZWpqlTwSGLoo5afWgQWNBEvs/SEJRHnRgVUxNj9MRYw +TFWRxGu6trQ/7HnuiFcmb7OSRC7ppDd2Aiy4O36h+T9HSfxenEsQY8//cduV +PZYekthTSw18u44FmjJ9p22DJXEy7IyfAS8LzjDPv3fNlMQKt4L+Mk4WbP3+ +JypgRBL5au++cl9g79Ptl9WefpPEkq5kx0fz7H2Zq9kn8ksSG94d9SfMse+R +o6chi0cK4UL3jqoZJnxjPl/g3CKFVl/j7AsmmHDpZHro1WNS2PFDzMKFvW+b ++zcrf4uXQtmlxxYO7H38l9zYyTgrhZPGJhvM3jHhwJd53c83pHBJ6P0vybfs ++2O9e3ZLoxQ6Vt7LjmphwrCYakATvzTePSdoK1rDBPHAJzLi4tJ4xDV+24NK +9j5udnl9UF4aDwRVGDLKmVAddVZjA0kam0V6N9s9ZMKZjzOTri7SWFDMcV7j +NhN079X5fs+Txoe7vXJb2fconmbvJWkgg/U4OFrlwYTtHjd/6JvIoMLdeA+7 +3UwQiPt6yslaBhuE/tl93sWE642nC9I9ZfDkUZGa33bs+2BZ+3Vtigzyy0gI +dZkwYcZFKfxnrwxubCPYuKowwSNs/syraFmUWintbhitAZVME+nJ07JIamGp +Xv5Uw87v/EPudFksUku/4DVQA1F/N3eY5Mti2BqBlsmuGsg45SHGeiWLeW4h +NjWNNfDqwn+37sjIoVo1atNzaoBafLXy+BM5LDmXEyHvVANb37ctTzfL4QmN +4luX7WrAhmON+d63ctjleJe8xroG9jkE9MKoHLYKe1R3m9SAWbTCiTgueeSR +50030a6BILlft43V5dFTx2eXOV8NNPnemmoMl2fP314VqbpqOPx7Nq6ZXwFN +Qu/IfBCshkV1wUFNJ0U8E/+2xOJoJdCKHuRcuaKECis6Zx+UlMOssKWn8zNl +3JQ2eS9kvhQ+p3o6H+VWxW3XDCgL0sVg8T3CYpSyEVef5265dv0+fNvHE1J5 +YhOyOsKdLi8UsP//xVcnPduMZknqv9Ru3Abh16pppd/V8Bz3kPH7Ovb/fnKJ +HYWigYb6JmbHOq9BlrqhoIivJl532S+iuTETWiWN9X5e2IKOd8b8zBUuAVX6 +WbrWOy1sL83JT3yUBsNKyoMTfVr4Uem+ZsPtNEhRT1TP/6iFvRYyGnxn0qCH +avmCOKGF/wSCwtqd0yDC9e3Sqr9a6OC4rlh29hy4WQWTJgW1MdxCwvLlpnNw +JZm9DijauPGzzKBB/lkQ4MwL9TqpjU29Bc16rcmwdvHJztkEbbQ2Ezx8vjwZ +/k0P6MYnaePoZ/PWP9nJ8L1PYjYnVRt7JmSurj2cDB3lF44MXdFG26+hD2cF +kuGid/yBvUXaWMai8m9wSQLCM08X9y5tNKUX92gvnAbZeDmaq6oOKr+XjXbx +PQXFITyKA5t0sF29IobheAoYB2a5vdR18O4D/xKS8Slwt2rs9NPWQc2G/SlW +UqfgupjvoWNUHdxUoqev3XESJO4XZ2fa6GC63I2KF7STINpJX+wO18GUDRee +z8rHA6/KnmqH/3Qw8bBHudjG4+AvAZZFLTrItcuJSuA7Dq38ioOcr3TQQlHo +teZULKT++sJV1aGDj8SEhnIrYkGgOcRJvE8Hxe2+ulw3jgXhQ2fn+r/p4FlZ +u+PtXjEgXVaru19YF1/0hqx/Vx4FW+gSJRHuujgS3UfLvxwBFUoHl1Z76qLJ +kL7T2ugIMOBjmad56yJtY1P3Ca8IMHnvMpTvq4vG1Q86mFsiwDk4S+htsC7K +rnVawNZwOHFHPFQjURdf9zh5XucKhw5+guGnYl2sqnDfJHIuFI4OCjdacpCw +wL/J435/MDS/2PPo/moSpsiwgp43B4NsSUENHxcJp43XZc9WBUPrCeqDVl4S +StN2cMamB4OigneGpQgJw/hff/YwC4Y3+8p8LVVJuO7DxoytVUGgPWG73tKa +hLtxl1wqIxC+/0x1ssgioaBFkcs200PwoSfX+UY2CT8E7qKOqxyC1kfVu2av +k/D5z8H4Ap5DkJ805Ho1l4Rp/jtnQ9v8wU2K7DFxn4SObqeldu32h+cm/QdS +HpHwakUut1zUQbh2YfOxlmES1i7G+uq+9IXkcEakzCgJq9ZcdZMq84Xw3Tuj +gr+QUNtF1Ugm0xfsVGJjJL6RkJIzHnFony+sZXXEHZxn5yFg2qK1fACChyJS +eHnImBkGJHO9A2Cu9SLbQpOMysEfLbbU+IDL2u2OHVpkjCg4PiJx0wf8B1r4 +d+mS8avIGXH50z6QdvZ1nI8+GUs6hn9E7/SBd1+6DpwwJqPrLu/5gNl94JMz +olvlREbrwduWW3T3wUmhVS/lj5NRxDhtKuyFF1weP5lwN46MXeEm1JRSLyh4 +soax5RQZTx6nuVVme0HrEZ4yo2QyymilPrYP9AKh1g2ZzhfJOMdl/LxAwgty +TsruSy0g48IPh913j3rC459GSwttZJzKyq8b8feA3Fc13jvfkNHjXI86zdwD +Eu6QWos7ych1suAmS8kDLHapX93fw65vc+86pQF36KqV1O/8RMY6ysGkB/bu +MBm/eLR4jow/tgS7HTfeAwTBmkkfST1c23VPd6uRGyyO6zo0SOthcFuILYe0 +G3x4WsySktPDdua1iwN/XSE3pCD5rZIe/na6Jrb02BU03meooqYeWn0u7X68 +1RVMboZ6S6Ee2n/xYNo6u0CAhm7fm/16KFf3X2tbujOELUj+2eunh9p+O19p +hDhDzDNOyWl/PSz0XX3xoZMznHXpduUL0sP+Jc2PBClnKEw41msSpYevHyrV +J9x1guEPj3sq0vQwNaamtOSFIzifs3qfUaOHn8/aW7rK7AR3F/KCUq0ePr4d +camNcyf4KMmIl9frobxFd4z3pAOEsKad257qYU67W/lojQOkj154t/aVHm5W ++0NzdnSAVnpPd8SQHlYtk543XbQH+rRPlysvBX2aPGzXqNgBoc48r34dBXca +bSg/LWgH00lqQXICFExSfs1H/20LNxVm1o0KU/B624CJxl1b+OcYbRokTcHF +Ni0nPW5beFJ3oTxRi4IyUVyk1vYdYJzyOL3CiYLmIQey/ou3AknnXA+CCwXL +CyWCbT2s4IdigkakGwWlPYfzOYysIK/eopmxl4K9wWvCB+csYfVM10qLHwUf +Sappn/K3hEbnrwFD0RTk769bsXa3gG3KxB38eRS02nbkafNec6iceq7gk0/B +u+TvMS+MzUG5JuRXbQEFB+4taHxRMoc1lu23/IooKPRb/kP6uBk8C0z80VhJ +QfL8l8z4EDNg1M1lRv1HwaCxvinW+W1AcXgz/OUbBfslxk0zh0yhQOpEDeM7 +BavEQspKX5iC2KhGasYsBSWlHr0bf2AKcxHJeqa/KDgu7dpcGWkK5Tcg+eYK +BUEXX9WImoLWxENNJ2F9/M7b3mVjZwKb4s4ce6avj9bbM9wnPyDUG93hsqbq +Yz7v57D6JgS7hScXu2n62NdK1it+gHAsYP7BuLE+RjptI8zEIDTv8fwkYK2P +fA9YvhOyCH6GFMvdnvqo5z3RpvKGAfd+fJKaS9ZHz4yulmwlGjCK/xbGntVH +nf/U39/6YwRvD4pTuNP00WzZPbX/jRH8GbK2k7ykj7EzG77OxxmBZXtNAt7Q +x+aw+aCST1SYLDo3lVqmj6IZTur/HhiC2n7DJyp9+hjfl1uw+6A+nFe0+XPq +gz5qSsNBPgt9mPvorTc8qI8ySb3Kw5v04bFbatHNEX18u8X19boJCjjYfcwU +n9LHQf0LvSaHKBBpdDqIl8MA3/RkyRMj9KBZ6I3ClIoB1oaGe6sVkUCzfXSP +1SYDbNg+dCH3PAkupv7JvKdmgLmzA0ALJcEebmWBA1oGOBS5M6SfToLvf8P/ +DBoYoM9Os8b6t7pAGJfu7LAyQKrdpc9fVuvC/sd+CZXBBiiEs+T2aG2YPjIZ +sS3UACmfXg6GeWvDMZnDh96FGyCP5/bTaKENZ2ICHX5HG+C8Laegsbg2lFLD +5WmJBhh905bedVAL/lafqm/MNmDPx8zDg1OacLHk5tzbRgPkcp9f+a2iDtJ7 +5cf3vTBA8tri4OwlNbgjkNc/12yA3h98CJFv1IB55M4zQpsB6g59Yn6LVYMB +9Qfpbj0GuJv3YnV+72bYVMjSGP5mgH9uVu4Vub4JnuR0+cyKGeKTp16t/Zaq +MGStsDecaIjrG7KCSZtUgWPxiOuSpCESHdcQHnGpgok9tw2XvCEeijhtt/+p +CrxYRdWXUDPErV9/H11tpAKvvG/xGjMM8SGtM1NfXxn6lP2L0w8Yonp+S9aA +vSIsdVQXih00RENj+aAlsiJIx3Lezj5kiFFDD2+ZEhXBvft6Zn6QIfueElUc +PirA0On2OGaUIf4Cv7tegQrwZYy8cyjNEM1t5RwlM+VhrnBlQavGEO/17ctb +WisLY85mOSksQ/TKXnmp2ycDPWvObR+pM8TqZ7dJhQ9loM5T8uqVBkNsu3Uh +ztpJBk4S9ajLLYbIvegRe/SuNAgm+8e0fjBENcv5xBlnKdDw7ebYv5qK/14/ +uXt/iAiyYtL3Hq+hIrdMLJNQRwTBRm97IjcVp56KNddkEOGn7Ezuy3VUzL58 ++02mFRFq3/GZ6opR8bwUj3wzSxy2m+HplY1UVFq1xrDkFgH2qRTxZu+gouqw +dmTneVGIeu7hr2pHxVuitdl1R0Qhfb/wy3IHKn7VIt7osRKF+juRqS93UdFI +8hqhlEcURFW3b1j2oqL6ldayVwki8EJ1VNQznIq779gejEkUBrVNcvKqt6jo +/fTfwH8PBQGb38aV51KxP358qOGCIDj7JX5i5FNxSDeXeyxMEE4VTuXtukdF +JoWnoYIhCB821aukVFBxOOTU+6L8DZC22VX9239UfPgr9cjyagGYVbtEKZ9h +O3t9aewSH/S8wm0iP6kIrgW/rnTwQUPA9M7QeSp+Ix3ePnOHD9LKLYIpf6hY +Ffq6yMueD9SoHA9qOY0w3GbroF4RL3hbHFFoJBihWxTWuvjzQJev+foumhGm +M1Jst4quhTreeUk9MMLYQsmsuhkuyCvK23zF2Ag3cjUX+r3mgqDvy2YuZkZY +MX9jzjuJC/gjKuM/2BohZasdX8fyGjBLVFj47G2EMk3nuaznOIGZv/RpPtkI +DX6ojHzgWg0U09AFy7NGeNZIUVNsYhVUffq2PuecEXLTehuOvVoF5bKD+pYX +jfCBQnRnw6VV8CCr4dzNa0Z4LCOeaKO8CnJSTxuaFxuhp+ue8s07OCAldMOF +rE52PVfv5JcdW2bwiCQXTHUboYDoI3Mxi2VGYhlHvUmPEWZZZhx7KrHMSJie +Hfv2wQiPaz3+Mlv3l3Hcr4tmPGaEie257+5y/mUc3XN1fOK3EfLLz0QL5vxh +uG1VQiNZGv76etKKxPebsdzFI9AoT0NOAtky8+MCI2f/dL+lEg1Za8i5JlUL +jLFEVoTbJhpm27tkH/FaYBxtsS2J1KVh7bXbRTyPfjHO2MTIMs1o6PmY79Nc +3Dyj1qX7LzmQhmvnyQlvDH4y3CdqW+uDabhosIXbkfCTwRGVk7U1lIbM228I +QnM/GGbXDpEdI2lIOnPEz7D0B+PtwKrDIadoOHWSo8VA/Qdj0ntLf1kmDdu5 +fLtvq88ypI4ksbY00LBfRet8zt1pRtrKAb2zz2joZNmpfj9kmrH6olnZlyYa +BkZRjLhxmjFZzXUvp4WGAa2EelbvFKOWIyFLuJOGp4K8y34ITjHcLsdF/Bpl +10/rnrdI+8rIqovUe7yOjuLfbnnseTrOWG/jWiYpQMf7rDtpU1fGGXFDBpoR +gnRMtHz7qPHwOMOP67eythgdVb0TQukS4wx923DRPFk65qmsG3IL+8J4N3z0 +52kdOiqtkMM+G44xxPgOl+3YRUdGKk/n6dkRRr5pbNSMKx131i5pz7WOMHRj +00wv7aHj+Ota33v5IwybmdLuHi86nsnYGz7mMsJIfDe/uO8wHSuYB4ZvNA0z +fuedMImKp+OOywv12YWfGH1GlzoLiuiovtknLhg+MvzC8q9bFNNRWfGuo9nq +j4xfxVX7v5XS8Xr5qnXnng8yhBV7FnSq6Uiail45vGOQYcUjI/2ogY78k+KR +Xt4DjPquAp/ObjqGVaU7hOb0MywFmJrhPXR8vP6J9Xr/fkaPecsvYj8dY8eF +gI/cz5ir/ZrsMURHB64WI72WPoZmrvbDiUk6BsyUKpF/9zLq+4zDU6foyNG0 +5DPe1MuwFN0JWjN0rAo5K7V8oZdxICnsTeg8HW2H42jbNHsZcw2J2eK/6Vhj +WrwzYqmHcfJP5r7aP3SUO/jAkLu1hyFIvqfhvkzH5uhr5nNZPYybR2rnV1bo ++L6l9D3dr4fxP3W/2EE= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0982826660288101}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0982826660288101}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831476335712*^9}, + CellLabel-> + "Out[119]=",ExpressionUUID->"027234ca-4d45-406e-a8aa-e2e485563cd6"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"344da507-9044-\ -ef47-aa8c-99f282e3d6d3"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[120]:=",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VA8XB3AlWYqsY+y7ypJlxmDMzDkosmQLoQgpUlmyZStKlpK0iLQh +SSn7MoNKUT9UKJQlEhGKKJIk77x/3efzz32e871nuQregQ77V3NwcLxaxcHx +/+evwZYm5bP5DP9Ly48+m9gzum4SI417TkLRri+wcF8LUKzdm9hzEQT1u7cX +3QcIt7v/nrMnD1bS3cSO3LcFoWnxi4vvy+FMi5TM1L298LHeJnDu/TNY+mtX +vbkwEMyUJwdm378FjbgxU6PcE7D4Xj9j5v0w7J7ILrl1+jw0mt7Nf5P3E/4K +/ohY1sgB6Y+sMW+NZfD45NipFnEXRA/vvc9tyokrq5Y7lVYeghr37Rd2uziR +J/XtwGeJYsC8seGrhzixcMQ/KJNcDId7jkhpXObESSldzjcHi6Fpa0yq3Sgn +vvzZXHi5sxhCZa4GXE1ag0o5q/0c80ugs+2trvorLgwgbh3Ru1EKF3XM6myc +eDDsaIzVQaly0Op3Naf78aDa/qPLG1TL4VXCkU71aB4ckO50LNEuh7U9l7/y +5PLgrT3lY++3lUP08RGpxm882Jq0ntYRWA4+L+Ni9BN4ceLdvTG3Z+VA2V9H +l6/gw5rqMIFGrwroFGhvEXjBh4rDAYHHDlVAEHPYabmHD0/aWRFUwyrg/jq+ +gL5/fFgwvUHdP7kC5Mpdbl62XIfTC5c2ZhRXAM/K/D+e4XXoP1ZCCl2sgN4s +7YZZQX6sNxT8uC2lErI7izaEq/Bj7obqd6yLleAmsHHvH0N+nH9c5q18vRI+ +nJL5t3ofPyocDtYcKK6EoQA+mmgVP2Y5CW0f6KyE8a2fayiuAnhc3CRSTLoK +fs9klkTnbsArJPfjzneqgKUusrJStQH7c4UvZz2sgqgDaTYJrRvw5M75xY6q +KvjbnzCV+nMDzoddL1F+UQVxI0yxdkVB3EaIyNg1VgUJbXd2DoUKYkzP1J8J +5Wo4m3+ifbWEEBK0W2SZ2dVgST4oLKYkhNc0wptycquBp8nBaaOmEOq9aJg6 +UVgNCSMq/VbGQmhvymhWqK6GGMVXY5cPCmH47YqUnx3VEJBD/KdaK4SpeYW1 +bWtqwP56mYbVbmH0fObI67W/BgQ1rgW67xfGSK4SbYlDNdBWl1AeGCiMFt3h +Hf8F1YBl/y6Dy6eE8fh0RiRPTA2YSP4zHSgSxpQD+8LEL9YAOctyd+BfYSy4 +5mdyuL4GxC+PpFy6IYKehZ9//ORlAlG9KuF3gQg++ZorsUWACZLPEk+4l4rg +fcFvqzyFmSA7szlsY6MITj0bkiiSZIKKdZBn3bgIvgvcGz2oxgTSmmXKCEkU +hby1K2stmEC+1qaznS6KvGpfbIJ3MIGim6Px0EwUPV3lmHL2TKB6mipGuIoi +16bpxX0uTDCuT+Ffd0IUVX3nnc8cYIJtKOGzbqsoBl+75WMbzwS7deODmZ2i +aNij6HMqgQkOeazevx9EcYHjvGlJEhOcO/a0v/guioxA0bvT55jgrnG71k1M +DBv/81Fen82EQ5+1Lpz0FENOh3zFxlImHI5elfrloBjKyP16FFbBhADhzkTr +EDEkXxy3ka9mwlEMjyEkiiE2le5yr2NC5PV63/tFYvh5fYNWxHMmJDlaMN7+ +EsOHdhMe6j3svCrbJFevIqBW2aj6uT4mFIs4LuisI+Byutbt0Q9MePfWo/SC +HAHFF25fjfrEBGX7UEX77QRsW1o/Rp5kArN08V+cAwHthKy3WX9jgrXgif7S +PQTUrN/l5TbNhJD2lMuCwQT88jm61+0HE57tuLW24yoB/0RXC0wtsut/qDyy +cpuAc9o/s2qXmDC5/v4TrWIC/pN69/P4MhOEXlUeO/+MgJ+OD6l842CBp2Xr +pM1XAjoJHWpy4WbB3D3b/47PE/DRrLjMAA8Lkni7bxevEDB27spuFz4WFDd/ +3CMgKo6qs5wZJH4WLJvNt72miWNcQIJ5rDAL0guiipbNxHH6XbI0S4QFyms5 +kjXtxRFluqe+irLA+jmf8bn94vhz81A6RZwFQ8rpMo8CxVHj4zE/GyILQhLE +/nyLFEdJc/7t7hIsyDaVr7BOE8eZqyLqnlIs2HL7zvmYLHG0400iO0qz4Nlq +9cMP8sQxWn3RHmRYMPFUT2V9jThKuwp3/5FlQYxC3SraU3GU/f4JX8qxQDAe +Bw+9FMcp01WvL8qzwACtMl9+FMdrUOXArciCV7c6QpYmxPHDaJZDJdueK052 +6nPiGIH+J1yU2Pl49Gvs/ieOE8V7PvxkO+mxJ+9ZHiIe2V54OFGZBZKyY6O1 +wkTUeZ9CElRh5xV76NmkNBHbO03IF9h+RwuPttQhYvNWl5ljqizwv760K8qI +iObjNuUf2V5eiiPf30bE4zb2dfSN7Dx3rxXqsyXiuBBT4BLbynVnp3jdiLhz +71DJR7aZkkKthj5EFJtVz1PaxM436krBwQAievGtmvBge6hX6tTVY0TMO9qa +dIHtEMPcvS0niZgYtBBfx7ZljsCcVSoRXzduGe9jW5E7Jrktg4i6tJGXP9he +PDIhbX+LiGueT2pxbmZBR5dzWWchETcXyIqvZ7vQqGmbczkR4+N2J/CzfSJP +p6+njohMy/gobradeW8F7H5OxFc7Qv4ust+3JWg952AbOy8FIv8o21zvIzM9 +e4g4Uuha0sz2B/oX9ZFPRHTZoDKWz3ZlvmPD/q9EzGjyr4xk++y6Z47jc0QM +jZSVMWfb+6jWhP8/IiZL6yvxs03tvR47xS2BJ98Vt7xk5yOEfMJBQhLYsfaU +yCm2xwsiCn5ISiAFKzlJbD/hH6WGKUug3jazG/3s/K+EOrQvaEpg5hociWE7 +oP/Jvih9CfyTUdRDYHubiebvvyiBeyhX4u6xv6f0vezUE5YSGL5VcJDM9twG +HoXVjhK4l645x2T3Q97AsAW3rwTGHXjoXMTul8itdoMpQRL4lcf8ngTbdkWP +jq6PkkD3kJmGOHa/rRzLuiZ0TgKtNq+yNlRgwR5RmympCgnsFb632ZHdz6To +uvib9RJoEktdTmb3O9/wJoLCCwn0mzArqWbPA6uEE1R7JXDby8d1fyVZQLBi +pWuvSGDjW9s3JPa8TZWpqlTwSGLoo5afWgQWNBEvs/SEJRHnRgVUxNj9MRYw +TFWRxGu6trQ/7HnuiFcmb7OSRC7ppDd2Aiy4O36h+T9HSfxenEsQY8//cduV +PZYekthTSw18u44FmjJ9p22DJXEy7IyfAS8LzjDPv3fNlMQKt4L+Mk4WbP3+ +JypgRBL5au++cl9g79Ptl9WefpPEkq5kx0fz7H2Zq9kn8ksSG94d9SfMse+R +o6chi0cK4UL3jqoZJnxjPl/g3CKFVl/j7AsmmHDpZHro1WNS2PFDzMKFvW+b ++zcrf4uXQtmlxxYO7H38l9zYyTgrhZPGJhvM3jHhwJd53c83pHBJ6P0vybfs ++2O9e3ZLoxQ6Vt7LjmphwrCYakATvzTePSdoK1rDBPHAJzLi4tJ4xDV+24NK +9j5udnl9UF4aDwRVGDLKmVAddVZjA0kam0V6N9s9ZMKZjzOTri7SWFDMcV7j +NhN079X5fs+Txoe7vXJb2fconmbvJWkgg/U4OFrlwYTtHjd/6JvIoMLdeA+7 +3UwQiPt6yslaBhuE/tl93sWE642nC9I9ZfDkUZGa33bs+2BZ+3Vtigzyy0gI +dZkwYcZFKfxnrwxubCPYuKowwSNs/syraFmUWintbhitAZVME+nJ07JIamGp +Xv5Uw87v/EPudFksUku/4DVQA1F/N3eY5Mti2BqBlsmuGsg45SHGeiWLeW4h +NjWNNfDqwn+37sjIoVo1atNzaoBafLXy+BM5LDmXEyHvVANb37ctTzfL4QmN +4luX7WrAhmON+d63ctjleJe8xroG9jkE9MKoHLYKe1R3m9SAWbTCiTgueeSR +50030a6BILlft43V5dFTx2eXOV8NNPnemmoMl2fP314VqbpqOPx7Nq6ZXwFN +Qu/IfBCshkV1wUFNJ0U8E/+2xOJoJdCKHuRcuaKECis6Zx+UlMOssKWn8zNl +3JQ2eS9kvhQ+p3o6H+VWxW3XDCgL0sVg8T3CYpSyEVef5265dv0+fNvHE1J5 +YhOyOsKdLi8UsP//xVcnPduMZknqv9Ru3Abh16pppd/V8Bz3kPH7Ovb/fnKJ +HYWigYb6JmbHOq9BlrqhoIivJl532S+iuTETWiWN9X5e2IKOd8b8zBUuAVX6 +WbrWOy1sL83JT3yUBsNKyoMTfVr4Uem+ZsPtNEhRT1TP/6iFvRYyGnxn0qCH +avmCOKGF/wSCwtqd0yDC9e3Sqr9a6OC4rlh29hy4WQWTJgW1MdxCwvLlpnNw +JZm9DijauPGzzKBB/lkQ4MwL9TqpjU29Bc16rcmwdvHJztkEbbQ2Ezx8vjwZ +/k0P6MYnaePoZ/PWP9nJ8L1PYjYnVRt7JmSurj2cDB3lF44MXdFG26+hD2cF +kuGid/yBvUXaWMai8m9wSQLCM08X9y5tNKUX92gvnAbZeDmaq6oOKr+XjXbx +PQXFITyKA5t0sF29IobheAoYB2a5vdR18O4D/xKS8Slwt2rs9NPWQc2G/SlW +UqfgupjvoWNUHdxUoqev3XESJO4XZ2fa6GC63I2KF7STINpJX+wO18GUDRee +z8rHA6/KnmqH/3Qw8bBHudjG4+AvAZZFLTrItcuJSuA7Dq38ioOcr3TQQlHo +teZULKT++sJV1aGDj8SEhnIrYkGgOcRJvE8Hxe2+ulw3jgXhQ2fn+r/p4FlZ +u+PtXjEgXVaru19YF1/0hqx/Vx4FW+gSJRHuujgS3UfLvxwBFUoHl1Z76qLJ +kL7T2ugIMOBjmad56yJtY1P3Ca8IMHnvMpTvq4vG1Q86mFsiwDk4S+htsC7K +rnVawNZwOHFHPFQjURdf9zh5XucKhw5+guGnYl2sqnDfJHIuFI4OCjdacpCw +wL/J435/MDS/2PPo/moSpsiwgp43B4NsSUENHxcJp43XZc9WBUPrCeqDVl4S +StN2cMamB4OigneGpQgJw/hff/YwC4Y3+8p8LVVJuO7DxoytVUGgPWG73tKa +hLtxl1wqIxC+/0x1ssgioaBFkcs200PwoSfX+UY2CT8E7qKOqxyC1kfVu2av +k/D5z8H4Ap5DkJ805Ho1l4Rp/jtnQ9v8wU2K7DFxn4SObqeldu32h+cm/QdS +HpHwakUut1zUQbh2YfOxlmES1i7G+uq+9IXkcEakzCgJq9ZcdZMq84Xw3Tuj +gr+QUNtF1Ugm0xfsVGJjJL6RkJIzHnFony+sZXXEHZxn5yFg2qK1fACChyJS +eHnImBkGJHO9A2Cu9SLbQpOMysEfLbbU+IDL2u2OHVpkjCg4PiJx0wf8B1r4 +d+mS8avIGXH50z6QdvZ1nI8+GUs6hn9E7/SBd1+6DpwwJqPrLu/5gNl94JMz +olvlREbrwduWW3T3wUmhVS/lj5NRxDhtKuyFF1weP5lwN46MXeEm1JRSLyh4 +soax5RQZTx6nuVVme0HrEZ4yo2QyymilPrYP9AKh1g2ZzhfJOMdl/LxAwgty +TsruSy0g48IPh913j3rC459GSwttZJzKyq8b8feA3Fc13jvfkNHjXI86zdwD +Eu6QWos7ych1suAmS8kDLHapX93fw65vc+86pQF36KqV1O/8RMY6ysGkB/bu +MBm/eLR4jow/tgS7HTfeAwTBmkkfST1c23VPd6uRGyyO6zo0SOthcFuILYe0 +G3x4WsySktPDdua1iwN/XSE3pCD5rZIe/na6Jrb02BU03meooqYeWn0u7X68 +1RVMboZ6S6Ee2n/xYNo6u0CAhm7fm/16KFf3X2tbujOELUj+2eunh9p+O19p +hDhDzDNOyWl/PSz0XX3xoZMznHXpduUL0sP+Jc2PBClnKEw41msSpYevHyrV +J9x1guEPj3sq0vQwNaamtOSFIzifs3qfUaOHn8/aW7rK7AR3F/KCUq0ePr4d +camNcyf4KMmIl9frobxFd4z3pAOEsKad257qYU67W/lojQOkj154t/aVHm5W ++0NzdnSAVnpPd8SQHlYtk543XbQH+rRPlysvBX2aPGzXqNgBoc48r34dBXca +bSg/LWgH00lqQXICFExSfs1H/20LNxVm1o0KU/B624CJxl1b+OcYbRokTcHF +Ni0nPW5beFJ3oTxRi4IyUVyk1vYdYJzyOL3CiYLmIQey/ou3AknnXA+CCwXL +CyWCbT2s4IdigkakGwWlPYfzOYysIK/eopmxl4K9wWvCB+csYfVM10qLHwUf +Sappn/K3hEbnrwFD0RTk769bsXa3gG3KxB38eRS02nbkafNec6iceq7gk0/B +u+TvMS+MzUG5JuRXbQEFB+4taHxRMoc1lu23/IooKPRb/kP6uBk8C0z80VhJ +QfL8l8z4EDNg1M1lRv1HwaCxvinW+W1AcXgz/OUbBfslxk0zh0yhQOpEDeM7 +BavEQspKX5iC2KhGasYsBSWlHr0bf2AKcxHJeqa/KDgu7dpcGWkK5Tcg+eYK +BUEXX9WImoLWxENNJ2F9/M7b3mVjZwKb4s4ce6avj9bbM9wnPyDUG93hsqbq +Yz7v57D6JgS7hScXu2n62NdK1it+gHAsYP7BuLE+RjptI8zEIDTv8fwkYK2P +fA9YvhOyCH6GFMvdnvqo5z3RpvKGAfd+fJKaS9ZHz4yulmwlGjCK/xbGntVH +nf/U39/6YwRvD4pTuNP00WzZPbX/jRH8GbK2k7ykj7EzG77OxxmBZXtNAt7Q +x+aw+aCST1SYLDo3lVqmj6IZTur/HhiC2n7DJyp9+hjfl1uw+6A+nFe0+XPq +gz5qSsNBPgt9mPvorTc8qI8ySb3Kw5v04bFbatHNEX18u8X19boJCjjYfcwU +n9LHQf0LvSaHKBBpdDqIl8MA3/RkyRMj9KBZ6I3ClIoB1oaGe6sVkUCzfXSP +1SYDbNg+dCH3PAkupv7JvKdmgLmzA0ALJcEebmWBA1oGOBS5M6SfToLvf8P/ +DBoYoM9Os8b6t7pAGJfu7LAyQKrdpc9fVuvC/sd+CZXBBiiEs+T2aG2YPjIZ +sS3UACmfXg6GeWvDMZnDh96FGyCP5/bTaKENZ2ICHX5HG+C8Laegsbg2lFLD +5WmJBhh905bedVAL/lafqm/MNmDPx8zDg1OacLHk5tzbRgPkcp9f+a2iDtJ7 +5cf3vTBA8tri4OwlNbgjkNc/12yA3h98CJFv1IB55M4zQpsB6g59Yn6LVYMB +9Qfpbj0GuJv3YnV+72bYVMjSGP5mgH9uVu4Vub4JnuR0+cyKGeKTp16t/Zaq +MGStsDecaIjrG7KCSZtUgWPxiOuSpCESHdcQHnGpgok9tw2XvCEeijhtt/+p +CrxYRdWXUDPErV9/H11tpAKvvG/xGjMM8SGtM1NfXxn6lP2L0w8Yonp+S9aA +vSIsdVQXih00RENj+aAlsiJIx3Lezj5kiFFDD2+ZEhXBvft6Zn6QIfueElUc +PirA0On2OGaUIf4Cv7tegQrwZYy8cyjNEM1t5RwlM+VhrnBlQavGEO/17ctb +WisLY85mOSksQ/TKXnmp2ycDPWvObR+pM8TqZ7dJhQ9loM5T8uqVBkNsu3Uh +ztpJBk4S9ajLLYbIvegRe/SuNAgm+8e0fjBENcv5xBlnKdDw7ebYv5qK/14/ +uXt/iAiyYtL3Hq+hIrdMLJNQRwTBRm97IjcVp56KNddkEOGn7Ezuy3VUzL58 ++02mFRFq3/GZ6opR8bwUj3wzSxy2m+HplY1UVFq1xrDkFgH2qRTxZu+gouqw +dmTneVGIeu7hr2pHxVuitdl1R0Qhfb/wy3IHKn7VIt7osRKF+juRqS93UdFI +8hqhlEcURFW3b1j2oqL6ldayVwki8EJ1VNQznIq779gejEkUBrVNcvKqt6jo +/fTfwH8PBQGb38aV51KxP358qOGCIDj7JX5i5FNxSDeXeyxMEE4VTuXtukdF +JoWnoYIhCB821aukVFBxOOTU+6L8DZC22VX9239UfPgr9cjyagGYVbtEKZ9h +O3t9aewSH/S8wm0iP6kIrgW/rnTwQUPA9M7QeSp+Ix3ePnOHD9LKLYIpf6hY +Ffq6yMueD9SoHA9qOY0w3GbroF4RL3hbHFFoJBihWxTWuvjzQJev+foumhGm +M1Jst4quhTreeUk9MMLYQsmsuhkuyCvK23zF2Ag3cjUX+r3mgqDvy2YuZkZY +MX9jzjuJC/gjKuM/2BohZasdX8fyGjBLVFj47G2EMk3nuaznOIGZv/RpPtkI +DX6ojHzgWg0U09AFy7NGeNZIUVNsYhVUffq2PuecEXLTehuOvVoF5bKD+pYX +jfCBQnRnw6VV8CCr4dzNa0Z4LCOeaKO8CnJSTxuaFxuhp+ue8s07OCAldMOF +rE52PVfv5JcdW2bwiCQXTHUboYDoI3Mxi2VGYhlHvUmPEWZZZhx7KrHMSJie +Hfv2wQiPaz3+Mlv3l3Hcr4tmPGaEie257+5y/mUc3XN1fOK3EfLLz0QL5vxh +uG1VQiNZGv76etKKxPebsdzFI9AoT0NOAtky8+MCI2f/dL+lEg1Za8i5JlUL +jLFEVoTbJhpm27tkH/FaYBxtsS2J1KVh7bXbRTyPfjHO2MTIMs1o6PmY79Nc +3Dyj1qX7LzmQhmvnyQlvDH4y3CdqW+uDabhosIXbkfCTwRGVk7U1lIbM228I +QnM/GGbXDpEdI2lIOnPEz7D0B+PtwKrDIadoOHWSo8VA/Qdj0ntLf1kmDdu5 +fLtvq88ypI4ksbY00LBfRet8zt1pRtrKAb2zz2joZNmpfj9kmrH6olnZlyYa +BkZRjLhxmjFZzXUvp4WGAa2EelbvFKOWIyFLuJOGp4K8y34ITjHcLsdF/Bpl +10/rnrdI+8rIqovUe7yOjuLfbnnseTrOWG/jWiYpQMf7rDtpU1fGGXFDBpoR +gnRMtHz7qPHwOMOP67eythgdVb0TQukS4wx923DRPFk65qmsG3IL+8J4N3z0 +52kdOiqtkMM+G44xxPgOl+3YRUdGKk/n6dkRRr5pbNSMKx131i5pz7WOMHRj +00wv7aHj+Ota33v5IwybmdLuHi86nsnYGz7mMsJIfDe/uO8wHSuYB4ZvNA0z +fuedMImKp+OOywv12YWfGH1GlzoLiuiovtknLhg+MvzC8q9bFNNRWfGuo9nq +j4xfxVX7v5XS8Xr5qnXnng8yhBV7FnSq6Uiail45vGOQYcUjI/2ogY78k+KR +Xt4DjPquAp/ObjqGVaU7hOb0MywFmJrhPXR8vP6J9Xr/fkaPecsvYj8dY8eF +gI/cz5ir/ZrsMURHB64WI72WPoZmrvbDiUk6BsyUKpF/9zLq+4zDU6foyNG0 +5DPe1MuwFN0JWjN0rAo5K7V8oZdxICnsTeg8HW2H42jbNHsZcw2J2eK/6Vhj +WrwzYqmHcfJP5r7aP3SUO/jAkLu1hyFIvqfhvkzH5uhr5nNZPYybR2rnV1bo ++L6l9D3dr4fxP3W/2EE= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VA8XB3AlWYqsY+y7ypJlxmDMzDkosmQLoQgpUlmyZStKlpK0iLQh +SSn7MoNKUT9UKJQlEhGKKJIk77x/3efzz32e871nuQregQ77V3NwcLxaxcHx +/+evwZYm5bP5DP9Ly48+m9gzum4SI417TkLRri+wcF8LUKzdm9hzEQT1u7cX +3QcIt7v/nrMnD1bS3cSO3LcFoWnxi4vvy+FMi5TM1L298LHeJnDu/TNY+mtX +vbkwEMyUJwdm378FjbgxU6PcE7D4Xj9j5v0w7J7ILrl1+jw0mt7Nf5P3E/4K +/ohY1sgB6Y+sMW+NZfD45NipFnEXRA/vvc9tyokrq5Y7lVYeghr37Rd2uziR +J/XtwGeJYsC8seGrhzixcMQ/KJNcDId7jkhpXObESSldzjcHi6Fpa0yq3Sgn +vvzZXHi5sxhCZa4GXE1ag0o5q/0c80ugs+2trvorLgwgbh3Ru1EKF3XM6myc +eDDsaIzVQaly0Op3Naf78aDa/qPLG1TL4VXCkU71aB4ckO50LNEuh7U9l7/y +5PLgrT3lY++3lUP08RGpxm882Jq0ntYRWA4+L+Ni9BN4ceLdvTG3Z+VA2V9H +l6/gw5rqMIFGrwroFGhvEXjBh4rDAYHHDlVAEHPYabmHD0/aWRFUwyrg/jq+ +gL5/fFgwvUHdP7kC5Mpdbl62XIfTC5c2ZhRXAM/K/D+e4XXoP1ZCCl2sgN4s +7YZZQX6sNxT8uC2lErI7izaEq/Bj7obqd6yLleAmsHHvH0N+nH9c5q18vRI+ +nJL5t3ofPyocDtYcKK6EoQA+mmgVP2Y5CW0f6KyE8a2fayiuAnhc3CRSTLoK +fs9klkTnbsArJPfjzneqgKUusrJStQH7c4UvZz2sgqgDaTYJrRvw5M75xY6q +KvjbnzCV+nMDzoddL1F+UQVxI0yxdkVB3EaIyNg1VgUJbXd2DoUKYkzP1J8J +5Wo4m3+ifbWEEBK0W2SZ2dVgST4oLKYkhNc0wptycquBp8nBaaOmEOq9aJg6 +UVgNCSMq/VbGQmhvymhWqK6GGMVXY5cPCmH47YqUnx3VEJBD/KdaK4SpeYW1 +bWtqwP56mYbVbmH0fObI67W/BgQ1rgW67xfGSK4SbYlDNdBWl1AeGCiMFt3h +Hf8F1YBl/y6Dy6eE8fh0RiRPTA2YSP4zHSgSxpQD+8LEL9YAOctyd+BfYSy4 +5mdyuL4GxC+PpFy6IYKehZ9//ORlAlG9KuF3gQg++ZorsUWACZLPEk+4l4rg +fcFvqzyFmSA7szlsY6MITj0bkiiSZIKKdZBn3bgIvgvcGz2oxgTSmmXKCEkU +hby1K2stmEC+1qaznS6KvGpfbIJ3MIGim6Px0EwUPV3lmHL2TKB6mipGuIoi +16bpxX0uTDCuT+Ffd0IUVX3nnc8cYIJtKOGzbqsoBl+75WMbzwS7deODmZ2i +aNij6HMqgQkOeazevx9EcYHjvGlJEhOcO/a0v/guioxA0bvT55jgrnG71k1M +DBv/81Fen82EQ5+1Lpz0FENOh3zFxlImHI5elfrloBjKyP16FFbBhADhzkTr +EDEkXxy3ka9mwlEMjyEkiiE2le5yr2NC5PV63/tFYvh5fYNWxHMmJDlaMN7+ +EsOHdhMe6j3svCrbJFevIqBW2aj6uT4mFIs4LuisI+Byutbt0Q9MePfWo/SC +HAHFF25fjfrEBGX7UEX77QRsW1o/Rp5kArN08V+cAwHthKy3WX9jgrXgif7S +PQTUrN/l5TbNhJD2lMuCwQT88jm61+0HE57tuLW24yoB/0RXC0wtsut/qDyy +cpuAc9o/s2qXmDC5/v4TrWIC/pN69/P4MhOEXlUeO/+MgJ+OD6l842CBp2Xr +pM1XAjoJHWpy4WbB3D3b/47PE/DRrLjMAA8Lkni7bxevEDB27spuFz4WFDd/ +3CMgKo6qs5wZJH4WLJvNt72miWNcQIJ5rDAL0guiipbNxHH6XbI0S4QFyms5 +kjXtxRFluqe+irLA+jmf8bn94vhz81A6RZwFQ8rpMo8CxVHj4zE/GyILQhLE +/nyLFEdJc/7t7hIsyDaVr7BOE8eZqyLqnlIs2HL7zvmYLHG0400iO0qz4Nlq +9cMP8sQxWn3RHmRYMPFUT2V9jThKuwp3/5FlQYxC3SraU3GU/f4JX8qxQDAe +Bw+9FMcp01WvL8qzwACtMl9+FMdrUOXArciCV7c6QpYmxPHDaJZDJdueK052 +6nPiGIH+J1yU2Pl49Gvs/ieOE8V7PvxkO+mxJ+9ZHiIe2V54OFGZBZKyY6O1 +wkTUeZ9CElRh5xV76NmkNBHbO03IF9h+RwuPttQhYvNWl5ljqizwv760K8qI +iObjNuUf2V5eiiPf30bE4zb2dfSN7Dx3rxXqsyXiuBBT4BLbynVnp3jdiLhz +71DJR7aZkkKthj5EFJtVz1PaxM436krBwQAievGtmvBge6hX6tTVY0TMO9qa +dIHtEMPcvS0niZgYtBBfx7ZljsCcVSoRXzduGe9jW5E7Jrktg4i6tJGXP9he +PDIhbX+LiGueT2pxbmZBR5dzWWchETcXyIqvZ7vQqGmbczkR4+N2J/CzfSJP +p6+njohMy/gobradeW8F7H5OxFc7Qv4ust+3JWg952AbOy8FIv8o21zvIzM9 +e4g4Uuha0sz2B/oX9ZFPRHTZoDKWz3ZlvmPD/q9EzGjyr4xk++y6Z47jc0QM +jZSVMWfb+6jWhP8/IiZL6yvxs03tvR47xS2BJ98Vt7xk5yOEfMJBQhLYsfaU +yCm2xwsiCn5ISiAFKzlJbD/hH6WGKUug3jazG/3s/K+EOrQvaEpg5hociWE7 +oP/Jvih9CfyTUdRDYHubiebvvyiBeyhX4u6xv6f0vezUE5YSGL5VcJDM9twG +HoXVjhK4l645x2T3Q97AsAW3rwTGHXjoXMTul8itdoMpQRL4lcf8ngTbdkWP +jq6PkkD3kJmGOHa/rRzLuiZ0TgKtNq+yNlRgwR5RmympCgnsFb632ZHdz6To +uvib9RJoEktdTmb3O9/wJoLCCwn0mzArqWbPA6uEE1R7JXDby8d1fyVZQLBi +pWuvSGDjW9s3JPa8TZWpqlTwSGLoo5afWgQWNBEvs/SEJRHnRgVUxNj9MRYw +TFWRxGu6trQ/7HnuiFcmb7OSRC7ppDd2Aiy4O36h+T9HSfxenEsQY8//cduV +PZYekthTSw18u44FmjJ9p22DJXEy7IyfAS8LzjDPv3fNlMQKt4L+Mk4WbP3+ +JypgRBL5au++cl9g79Ptl9WefpPEkq5kx0fz7H2Zq9kn8ksSG94d9SfMse+R +o6chi0cK4UL3jqoZJnxjPl/g3CKFVl/j7AsmmHDpZHro1WNS2PFDzMKFvW+b ++zcrf4uXQtmlxxYO7H38l9zYyTgrhZPGJhvM3jHhwJd53c83pHBJ6P0vybfs ++2O9e3ZLoxQ6Vt7LjmphwrCYakATvzTePSdoK1rDBPHAJzLi4tJ4xDV+24NK +9j5udnl9UF4aDwRVGDLKmVAddVZjA0kam0V6N9s9ZMKZjzOTri7SWFDMcV7j +NhN079X5fs+Txoe7vXJb2fconmbvJWkgg/U4OFrlwYTtHjd/6JvIoMLdeA+7 +3UwQiPt6yslaBhuE/tl93sWE642nC9I9ZfDkUZGa33bs+2BZ+3Vtigzyy0gI +dZkwYcZFKfxnrwxubCPYuKowwSNs/syraFmUWintbhitAZVME+nJ07JIamGp +Xv5Uw87v/EPudFksUku/4DVQA1F/N3eY5Mti2BqBlsmuGsg45SHGeiWLeW4h +NjWNNfDqwn+37sjIoVo1atNzaoBafLXy+BM5LDmXEyHvVANb37ctTzfL4QmN +4luX7WrAhmON+d63ctjleJe8xroG9jkE9MKoHLYKe1R3m9SAWbTCiTgueeSR +50030a6BILlft43V5dFTx2eXOV8NNPnemmoMl2fP314VqbpqOPx7Nq6ZXwFN +Qu/IfBCshkV1wUFNJ0U8E/+2xOJoJdCKHuRcuaKECis6Zx+UlMOssKWn8zNl +3JQ2eS9kvhQ+p3o6H+VWxW3XDCgL0sVg8T3CYpSyEVef5265dv0+fNvHE1J5 +YhOyOsKdLi8UsP//xVcnPduMZknqv9Ru3Abh16pppd/V8Bz3kPH7Ovb/fnKJ +HYWigYb6JmbHOq9BlrqhoIivJl532S+iuTETWiWN9X5e2IKOd8b8zBUuAVX6 +WbrWOy1sL83JT3yUBsNKyoMTfVr4Uem+ZsPtNEhRT1TP/6iFvRYyGnxn0qCH +avmCOKGF/wSCwtqd0yDC9e3Sqr9a6OC4rlh29hy4WQWTJgW1MdxCwvLlpnNw +JZm9DijauPGzzKBB/lkQ4MwL9TqpjU29Bc16rcmwdvHJztkEbbQ2Ezx8vjwZ +/k0P6MYnaePoZ/PWP9nJ8L1PYjYnVRt7JmSurj2cDB3lF44MXdFG26+hD2cF +kuGid/yBvUXaWMai8m9wSQLCM08X9y5tNKUX92gvnAbZeDmaq6oOKr+XjXbx +PQXFITyKA5t0sF29IobheAoYB2a5vdR18O4D/xKS8Slwt2rs9NPWQc2G/SlW +UqfgupjvoWNUHdxUoqev3XESJO4XZ2fa6GC63I2KF7STINpJX+wO18GUDRee +z8rHA6/KnmqH/3Qw8bBHudjG4+AvAZZFLTrItcuJSuA7Dq38ioOcr3TQQlHo +teZULKT++sJV1aGDj8SEhnIrYkGgOcRJvE8Hxe2+ulw3jgXhQ2fn+r/p4FlZ +u+PtXjEgXVaru19YF1/0hqx/Vx4FW+gSJRHuujgS3UfLvxwBFUoHl1Z76qLJ +kL7T2ugIMOBjmad56yJtY1P3Ca8IMHnvMpTvq4vG1Q86mFsiwDk4S+htsC7K +rnVawNZwOHFHPFQjURdf9zh5XucKhw5+guGnYl2sqnDfJHIuFI4OCjdacpCw +wL/J435/MDS/2PPo/moSpsiwgp43B4NsSUENHxcJp43XZc9WBUPrCeqDVl4S +StN2cMamB4OigneGpQgJw/hff/YwC4Y3+8p8LVVJuO7DxoytVUGgPWG73tKa +hLtxl1wqIxC+/0x1ssgioaBFkcs200PwoSfX+UY2CT8E7qKOqxyC1kfVu2av +k/D5z8H4Ap5DkJ805Ho1l4Rp/jtnQ9v8wU2K7DFxn4SObqeldu32h+cm/QdS +HpHwakUut1zUQbh2YfOxlmES1i7G+uq+9IXkcEakzCgJq9ZcdZMq84Xw3Tuj +gr+QUNtF1Ugm0xfsVGJjJL6RkJIzHnFony+sZXXEHZxn5yFg2qK1fACChyJS +eHnImBkGJHO9A2Cu9SLbQpOMysEfLbbU+IDL2u2OHVpkjCg4PiJx0wf8B1r4 +d+mS8avIGXH50z6QdvZ1nI8+GUs6hn9E7/SBd1+6DpwwJqPrLu/5gNl94JMz +olvlREbrwduWW3T3wUmhVS/lj5NRxDhtKuyFF1weP5lwN46MXeEm1JRSLyh4 +soax5RQZTx6nuVVme0HrEZ4yo2QyymilPrYP9AKh1g2ZzhfJOMdl/LxAwgty +TsruSy0g48IPh913j3rC459GSwttZJzKyq8b8feA3Fc13jvfkNHjXI86zdwD +Eu6QWos7ych1suAmS8kDLHapX93fw65vc+86pQF36KqV1O/8RMY6ysGkB/bu +MBm/eLR4jow/tgS7HTfeAwTBmkkfST1c23VPd6uRGyyO6zo0SOthcFuILYe0 +G3x4WsySktPDdua1iwN/XSE3pCD5rZIe/na6Jrb02BU03meooqYeWn0u7X68 +1RVMboZ6S6Ee2n/xYNo6u0CAhm7fm/16KFf3X2tbujOELUj+2eunh9p+O19p +hDhDzDNOyWl/PSz0XX3xoZMznHXpduUL0sP+Jc2PBClnKEw41msSpYevHyrV +J9x1guEPj3sq0vQwNaamtOSFIzifs3qfUaOHn8/aW7rK7AR3F/KCUq0ePr4d +camNcyf4KMmIl9frobxFd4z3pAOEsKad257qYU67W/lojQOkj154t/aVHm5W ++0NzdnSAVnpPd8SQHlYtk543XbQH+rRPlysvBX2aPGzXqNgBoc48r34dBXca +bSg/LWgH00lqQXICFExSfs1H/20LNxVm1o0KU/B624CJxl1b+OcYbRokTcHF +Ni0nPW5beFJ3oTxRi4IyUVyk1vYdYJzyOL3CiYLmIQey/ou3AknnXA+CCwXL +CyWCbT2s4IdigkakGwWlPYfzOYysIK/eopmxl4K9wWvCB+csYfVM10qLHwUf +Sappn/K3hEbnrwFD0RTk769bsXa3gG3KxB38eRS02nbkafNec6iceq7gk0/B +u+TvMS+MzUG5JuRXbQEFB+4taHxRMoc1lu23/IooKPRb/kP6uBk8C0z80VhJ +QfL8l8z4EDNg1M1lRv1HwaCxvinW+W1AcXgz/OUbBfslxk0zh0yhQOpEDeM7 +BavEQspKX5iC2KhGasYsBSWlHr0bf2AKcxHJeqa/KDgu7dpcGWkK5Tcg+eYK +BUEXX9WImoLWxENNJ2F9/M7b3mVjZwKb4s4ce6avj9bbM9wnPyDUG93hsqbq +Yz7v57D6JgS7hScXu2n62NdK1it+gHAsYP7BuLE+RjptI8zEIDTv8fwkYK2P +fA9YvhOyCH6GFMvdnvqo5z3RpvKGAfd+fJKaS9ZHz4yulmwlGjCK/xbGntVH +nf/U39/6YwRvD4pTuNP00WzZPbX/jRH8GbK2k7ykj7EzG77OxxmBZXtNAt7Q +x+aw+aCST1SYLDo3lVqmj6IZTur/HhiC2n7DJyp9+hjfl1uw+6A+nFe0+XPq +gz5qSsNBPgt9mPvorTc8qI8ySb3Kw5v04bFbatHNEX18u8X19boJCjjYfcwU +n9LHQf0LvSaHKBBpdDqIl8MA3/RkyRMj9KBZ6I3ClIoB1oaGe6sVkUCzfXSP +1SYDbNg+dCH3PAkupv7JvKdmgLmzA0ALJcEebmWBA1oGOBS5M6SfToLvf8P/ +DBoYoM9Os8b6t7pAGJfu7LAyQKrdpc9fVuvC/sd+CZXBBiiEs+T2aG2YPjIZ +sS3UACmfXg6GeWvDMZnDh96FGyCP5/bTaKENZ2ICHX5HG+C8Laegsbg2lFLD +5WmJBhh905bedVAL/lafqm/MNmDPx8zDg1OacLHk5tzbRgPkcp9f+a2iDtJ7 +5cf3vTBA8tri4OwlNbgjkNc/12yA3h98CJFv1IB55M4zQpsB6g59Yn6LVYMB +9Qfpbj0GuJv3YnV+72bYVMjSGP5mgH9uVu4Vub4JnuR0+cyKGeKTp16t/Zaq +MGStsDecaIjrG7KCSZtUgWPxiOuSpCESHdcQHnGpgok9tw2XvCEeijhtt/+p +CrxYRdWXUDPErV9/H11tpAKvvG/xGjMM8SGtM1NfXxn6lP2L0w8Yonp+S9aA +vSIsdVQXih00RENj+aAlsiJIx3Lezj5kiFFDD2+ZEhXBvft6Zn6QIfueElUc +PirA0On2OGaUIf4Cv7tegQrwZYy8cyjNEM1t5RwlM+VhrnBlQavGEO/17ctb +WisLY85mOSksQ/TKXnmp2ycDPWvObR+pM8TqZ7dJhQ9loM5T8uqVBkNsu3Uh +ztpJBk4S9ajLLYbIvegRe/SuNAgm+8e0fjBENcv5xBlnKdDw7ebYv5qK/14/ +uXt/iAiyYtL3Hq+hIrdMLJNQRwTBRm97IjcVp56KNddkEOGn7Ezuy3VUzL58 ++02mFRFq3/GZ6opR8bwUj3wzSxy2m+HplY1UVFq1xrDkFgH2qRTxZu+gouqw +dmTneVGIeu7hr2pHxVuitdl1R0Qhfb/wy3IHKn7VIt7osRKF+juRqS93UdFI +8hqhlEcURFW3b1j2oqL6ldayVwki8EJ1VNQznIq779gejEkUBrVNcvKqt6jo +/fTfwH8PBQGb38aV51KxP358qOGCIDj7JX5i5FNxSDeXeyxMEE4VTuXtukdF +JoWnoYIhCB821aukVFBxOOTU+6L8DZC22VX9239UfPgr9cjyagGYVbtEKZ9h +O3t9aewSH/S8wm0iP6kIrgW/rnTwQUPA9M7QeSp+Ix3ePnOHD9LKLYIpf6hY +Ffq6yMueD9SoHA9qOY0w3GbroF4RL3hbHFFoJBihWxTWuvjzQJev+foumhGm +M1Jst4quhTreeUk9MMLYQsmsuhkuyCvK23zF2Ag3cjUX+r3mgqDvy2YuZkZY +MX9jzjuJC/gjKuM/2BohZasdX8fyGjBLVFj47G2EMk3nuaznOIGZv/RpPtkI +DX6ojHzgWg0U09AFy7NGeNZIUVNsYhVUffq2PuecEXLTehuOvVoF5bKD+pYX +jfCBQnRnw6VV8CCr4dzNa0Z4LCOeaKO8CnJSTxuaFxuhp+ue8s07OCAldMOF +rE52PVfv5JcdW2bwiCQXTHUboYDoI3Mxi2VGYhlHvUmPEWZZZhx7KrHMSJie +Hfv2wQiPaz3+Mlv3l3Hcr4tmPGaEie257+5y/mUc3XN1fOK3EfLLz0QL5vxh +uG1VQiNZGv76etKKxPebsdzFI9AoT0NOAtky8+MCI2f/dL+lEg1Za8i5JlUL +jLFEVoTbJhpm27tkH/FaYBxtsS2J1KVh7bXbRTyPfjHO2MTIMs1o6PmY79Nc +3Dyj1qX7LzmQhmvnyQlvDH4y3CdqW+uDabhosIXbkfCTwRGVk7U1lIbM228I +QnM/GGbXDpEdI2lIOnPEz7D0B+PtwKrDIadoOHWSo8VA/Qdj0ntLf1kmDdu5 +fLtvq88ypI4ksbY00LBfRet8zt1pRtrKAb2zz2joZNmpfj9kmrH6olnZlyYa +BkZRjLhxmjFZzXUvp4WGAa2EelbvFKOWIyFLuJOGp4K8y34ITjHcLsdF/Bpl +10/rnrdI+8rIqovUe7yOjuLfbnnseTrOWG/jWiYpQMf7rDtpU1fGGXFDBpoR +gnRMtHz7qPHwOMOP67eythgdVb0TQukS4wx923DRPFk65qmsG3IL+8J4N3z0 +52kdOiqtkMM+G44xxPgOl+3YRUdGKk/n6dkRRr5pbNSMKx131i5pz7WOMHRj +00wv7aHj+Ota33v5IwybmdLuHi86nsnYGz7mMsJIfDe/uO8wHSuYB4ZvNA0z +fuedMImKp+OOywv12YWfGH1GlzoLiuiovtknLhg+MvzC8q9bFNNRWfGuo9nq +j4xfxVX7v5XS8Xr5qnXnng8yhBV7FnSq6Uiail45vGOQYcUjI/2ogY78k+KR +Xt4DjPquAp/ObjqGVaU7hOb0MywFmJrhPXR8vP6J9Xr/fkaPecsvYj8dY8eF +gI/cz5ir/ZrsMURHB64WI72WPoZmrvbDiUk6BsyUKpF/9zLq+4zDU6foyNG0 +5DPe1MuwFN0JWjN0rAo5K7V8oZdxICnsTeg8HW2H42jbNHsZcw2J2eK/6Vhj +WrwzYqmHcfJP5r7aP3SUO/jAkLu1hyFIvqfhvkzH5uhr5nNZPYybR2rnV1bo ++L6l9D3dr4fxP3W/2EE= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0982826660288101}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0982826660288101}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VA8XB3AlWYqsY+y7ypJlxmDMzDkosmQLoQgpUlmyZStKlpK0iLQh +SSn7MoNKUT9UKJQlEhGKKJIk77x/3efzz32e871nuQregQ77V3NwcLxaxcHx +/+evwZYm5bP5DP9Ly48+m9gzum4SI417TkLRri+wcF8LUKzdm9hzEQT1u7cX +3QcIt7v/nrMnD1bS3cSO3LcFoWnxi4vvy+FMi5TM1L298LHeJnDu/TNY+mtX +vbkwEMyUJwdm378FjbgxU6PcE7D4Xj9j5v0w7J7ILrl1+jw0mt7Nf5P3E/4K +/ohY1sgB6Y+sMW+NZfD45NipFnEXRA/vvc9tyokrq5Y7lVYeghr37Rd2uziR +J/XtwGeJYsC8seGrhzixcMQ/KJNcDId7jkhpXObESSldzjcHi6Fpa0yq3Sgn +vvzZXHi5sxhCZa4GXE1ag0o5q/0c80ugs+2trvorLgwgbh3Ru1EKF3XM6myc +eDDsaIzVQaly0Op3Naf78aDa/qPLG1TL4VXCkU71aB4ckO50LNEuh7U9l7/y +5PLgrT3lY++3lUP08RGpxm882Jq0ntYRWA4+L+Ni9BN4ceLdvTG3Z+VA2V9H +l6/gw5rqMIFGrwroFGhvEXjBh4rDAYHHDlVAEHPYabmHD0/aWRFUwyrg/jq+ +gL5/fFgwvUHdP7kC5Mpdbl62XIfTC5c2ZhRXAM/K/D+e4XXoP1ZCCl2sgN4s +7YZZQX6sNxT8uC2lErI7izaEq/Bj7obqd6yLleAmsHHvH0N+nH9c5q18vRI+ +nJL5t3ofPyocDtYcKK6EoQA+mmgVP2Y5CW0f6KyE8a2fayiuAnhc3CRSTLoK +fs9klkTnbsArJPfjzneqgKUusrJStQH7c4UvZz2sgqgDaTYJrRvw5M75xY6q +KvjbnzCV+nMDzoddL1F+UQVxI0yxdkVB3EaIyNg1VgUJbXd2DoUKYkzP1J8J +5Wo4m3+ifbWEEBK0W2SZ2dVgST4oLKYkhNc0wptycquBp8nBaaOmEOq9aJg6 +UVgNCSMq/VbGQmhvymhWqK6GGMVXY5cPCmH47YqUnx3VEJBD/KdaK4SpeYW1 +bWtqwP56mYbVbmH0fObI67W/BgQ1rgW67xfGSK4SbYlDNdBWl1AeGCiMFt3h +Hf8F1YBl/y6Dy6eE8fh0RiRPTA2YSP4zHSgSxpQD+8LEL9YAOctyd+BfYSy4 +5mdyuL4GxC+PpFy6IYKehZ9//ORlAlG9KuF3gQg++ZorsUWACZLPEk+4l4rg +fcFvqzyFmSA7szlsY6MITj0bkiiSZIKKdZBn3bgIvgvcGz2oxgTSmmXKCEkU +hby1K2stmEC+1qaznS6KvGpfbIJ3MIGim6Px0EwUPV3lmHL2TKB6mipGuIoi +16bpxX0uTDCuT+Ffd0IUVX3nnc8cYIJtKOGzbqsoBl+75WMbzwS7deODmZ2i +aNij6HMqgQkOeazevx9EcYHjvGlJEhOcO/a0v/guioxA0bvT55jgrnG71k1M +DBv/81Fen82EQ5+1Lpz0FENOh3zFxlImHI5elfrloBjKyP16FFbBhADhzkTr +EDEkXxy3ka9mwlEMjyEkiiE2le5yr2NC5PV63/tFYvh5fYNWxHMmJDlaMN7+ +EsOHdhMe6j3svCrbJFevIqBW2aj6uT4mFIs4LuisI+Byutbt0Q9MePfWo/SC +HAHFF25fjfrEBGX7UEX77QRsW1o/Rp5kArN08V+cAwHthKy3WX9jgrXgif7S +PQTUrN/l5TbNhJD2lMuCwQT88jm61+0HE57tuLW24yoB/0RXC0wtsut/qDyy +cpuAc9o/s2qXmDC5/v4TrWIC/pN69/P4MhOEXlUeO/+MgJ+OD6l842CBp2Xr +pM1XAjoJHWpy4WbB3D3b/47PE/DRrLjMAA8Lkni7bxevEDB27spuFz4WFDd/ +3CMgKo6qs5wZJH4WLJvNt72miWNcQIJ5rDAL0guiipbNxHH6XbI0S4QFyms5 +kjXtxRFluqe+irLA+jmf8bn94vhz81A6RZwFQ8rpMo8CxVHj4zE/GyILQhLE +/nyLFEdJc/7t7hIsyDaVr7BOE8eZqyLqnlIs2HL7zvmYLHG0400iO0qz4Nlq +9cMP8sQxWn3RHmRYMPFUT2V9jThKuwp3/5FlQYxC3SraU3GU/f4JX8qxQDAe +Bw+9FMcp01WvL8qzwACtMl9+FMdrUOXArciCV7c6QpYmxPHDaJZDJdueK052 +6nPiGIH+J1yU2Pl49Gvs/ieOE8V7PvxkO+mxJ+9ZHiIe2V54OFGZBZKyY6O1 +wkTUeZ9CElRh5xV76NmkNBHbO03IF9h+RwuPttQhYvNWl5ljqizwv760K8qI +iObjNuUf2V5eiiPf30bE4zb2dfSN7Dx3rxXqsyXiuBBT4BLbynVnp3jdiLhz +71DJR7aZkkKthj5EFJtVz1PaxM436krBwQAievGtmvBge6hX6tTVY0TMO9qa +dIHtEMPcvS0niZgYtBBfx7ZljsCcVSoRXzduGe9jW5E7Jrktg4i6tJGXP9he +PDIhbX+LiGueT2pxbmZBR5dzWWchETcXyIqvZ7vQqGmbczkR4+N2J/CzfSJP +p6+njohMy/gobradeW8F7H5OxFc7Qv4ust+3JWg952AbOy8FIv8o21zvIzM9 +e4g4Uuha0sz2B/oX9ZFPRHTZoDKWz3ZlvmPD/q9EzGjyr4xk++y6Z47jc0QM +jZSVMWfb+6jWhP8/IiZL6yvxs03tvR47xS2BJ98Vt7xk5yOEfMJBQhLYsfaU +yCm2xwsiCn5ISiAFKzlJbD/hH6WGKUug3jazG/3s/K+EOrQvaEpg5hociWE7 +oP/Jvih9CfyTUdRDYHubiebvvyiBeyhX4u6xv6f0vezUE5YSGL5VcJDM9twG +HoXVjhK4l645x2T3Q97AsAW3rwTGHXjoXMTul8itdoMpQRL4lcf8ngTbdkWP +jq6PkkD3kJmGOHa/rRzLuiZ0TgKtNq+yNlRgwR5RmympCgnsFb632ZHdz6To +uvib9RJoEktdTmb3O9/wJoLCCwn0mzArqWbPA6uEE1R7JXDby8d1fyVZQLBi +pWuvSGDjW9s3JPa8TZWpqlTwSGLoo5afWgQWNBEvs/SEJRHnRgVUxNj9MRYw +TFWRxGu6trQ/7HnuiFcmb7OSRC7ppDd2Aiy4O36h+T9HSfxenEsQY8//cduV +PZYekthTSw18u44FmjJ9p22DJXEy7IyfAS8LzjDPv3fNlMQKt4L+Mk4WbP3+ +JypgRBL5au++cl9g79Ptl9WefpPEkq5kx0fz7H2Zq9kn8ksSG94d9SfMse+R +o6chi0cK4UL3jqoZJnxjPl/g3CKFVl/j7AsmmHDpZHro1WNS2PFDzMKFvW+b ++zcrf4uXQtmlxxYO7H38l9zYyTgrhZPGJhvM3jHhwJd53c83pHBJ6P0vybfs ++2O9e3ZLoxQ6Vt7LjmphwrCYakATvzTePSdoK1rDBPHAJzLi4tJ4xDV+24NK +9j5udnl9UF4aDwRVGDLKmVAddVZjA0kam0V6N9s9ZMKZjzOTri7SWFDMcV7j +NhN079X5fs+Txoe7vXJb2fconmbvJWkgg/U4OFrlwYTtHjd/6JvIoMLdeA+7 +3UwQiPt6yslaBhuE/tl93sWE642nC9I9ZfDkUZGa33bs+2BZ+3Vtigzyy0gI +dZkwYcZFKfxnrwxubCPYuKowwSNs/syraFmUWintbhitAZVME+nJ07JIamGp +Xv5Uw87v/EPudFksUku/4DVQA1F/N3eY5Mti2BqBlsmuGsg45SHGeiWLeW4h +NjWNNfDqwn+37sjIoVo1atNzaoBafLXy+BM5LDmXEyHvVANb37ctTzfL4QmN +4luX7WrAhmON+d63ctjleJe8xroG9jkE9MKoHLYKe1R3m9SAWbTCiTgueeSR +50030a6BILlft43V5dFTx2eXOV8NNPnemmoMl2fP314VqbpqOPx7Nq6ZXwFN +Qu/IfBCshkV1wUFNJ0U8E/+2xOJoJdCKHuRcuaKECis6Zx+UlMOssKWn8zNl +3JQ2eS9kvhQ+p3o6H+VWxW3XDCgL0sVg8T3CYpSyEVef5265dv0+fNvHE1J5 +YhOyOsKdLi8UsP//xVcnPduMZknqv9Ru3Abh16pppd/V8Bz3kPH7Ovb/fnKJ +HYWigYb6JmbHOq9BlrqhoIivJl532S+iuTETWiWN9X5e2IKOd8b8zBUuAVX6 +WbrWOy1sL83JT3yUBsNKyoMTfVr4Uem+ZsPtNEhRT1TP/6iFvRYyGnxn0qCH +avmCOKGF/wSCwtqd0yDC9e3Sqr9a6OC4rlh29hy4WQWTJgW1MdxCwvLlpnNw +JZm9DijauPGzzKBB/lkQ4MwL9TqpjU29Bc16rcmwdvHJztkEbbQ2Ezx8vjwZ +/k0P6MYnaePoZ/PWP9nJ8L1PYjYnVRt7JmSurj2cDB3lF44MXdFG26+hD2cF +kuGid/yBvUXaWMai8m9wSQLCM08X9y5tNKUX92gvnAbZeDmaq6oOKr+XjXbx +PQXFITyKA5t0sF29IobheAoYB2a5vdR18O4D/xKS8Slwt2rs9NPWQc2G/SlW +UqfgupjvoWNUHdxUoqev3XESJO4XZ2fa6GC63I2KF7STINpJX+wO18GUDRee +z8rHA6/KnmqH/3Qw8bBHudjG4+AvAZZFLTrItcuJSuA7Dq38ioOcr3TQQlHo +teZULKT++sJV1aGDj8SEhnIrYkGgOcRJvE8Hxe2+ulw3jgXhQ2fn+r/p4FlZ +u+PtXjEgXVaru19YF1/0hqx/Vx4FW+gSJRHuujgS3UfLvxwBFUoHl1Z76qLJ +kL7T2ugIMOBjmad56yJtY1P3Ca8IMHnvMpTvq4vG1Q86mFsiwDk4S+htsC7K +rnVawNZwOHFHPFQjURdf9zh5XucKhw5+guGnYl2sqnDfJHIuFI4OCjdacpCw +wL/J435/MDS/2PPo/moSpsiwgp43B4NsSUENHxcJp43XZc9WBUPrCeqDVl4S +StN2cMamB4OigneGpQgJw/hff/YwC4Y3+8p8LVVJuO7DxoytVUGgPWG73tKa +hLtxl1wqIxC+/0x1ssgioaBFkcs200PwoSfX+UY2CT8E7qKOqxyC1kfVu2av +k/D5z8H4Ap5DkJ805Ho1l4Rp/jtnQ9v8wU2K7DFxn4SObqeldu32h+cm/QdS +HpHwakUut1zUQbh2YfOxlmES1i7G+uq+9IXkcEakzCgJq9ZcdZMq84Xw3Tuj +gr+QUNtF1Ugm0xfsVGJjJL6RkJIzHnFony+sZXXEHZxn5yFg2qK1fACChyJS +eHnImBkGJHO9A2Cu9SLbQpOMysEfLbbU+IDL2u2OHVpkjCg4PiJx0wf8B1r4 +d+mS8avIGXH50z6QdvZ1nI8+GUs6hn9E7/SBd1+6DpwwJqPrLu/5gNl94JMz +olvlREbrwduWW3T3wUmhVS/lj5NRxDhtKuyFF1weP5lwN46MXeEm1JRSLyh4 +soax5RQZTx6nuVVme0HrEZ4yo2QyymilPrYP9AKh1g2ZzhfJOMdl/LxAwgty +TsruSy0g48IPh913j3rC459GSwttZJzKyq8b8feA3Fc13jvfkNHjXI86zdwD +Eu6QWos7ych1suAmS8kDLHapX93fw65vc+86pQF36KqV1O/8RMY6ysGkB/bu +MBm/eLR4jow/tgS7HTfeAwTBmkkfST1c23VPd6uRGyyO6zo0SOthcFuILYe0 +G3x4WsySktPDdua1iwN/XSE3pCD5rZIe/na6Jrb02BU03meooqYeWn0u7X68 +1RVMboZ6S6Ee2n/xYNo6u0CAhm7fm/16KFf3X2tbujOELUj+2eunh9p+O19p +hDhDzDNOyWl/PSz0XX3xoZMznHXpduUL0sP+Jc2PBClnKEw41msSpYevHyrV +J9x1guEPj3sq0vQwNaamtOSFIzifs3qfUaOHn8/aW7rK7AR3F/KCUq0ePr4d +camNcyf4KMmIl9frobxFd4z3pAOEsKad257qYU67W/lojQOkj154t/aVHm5W ++0NzdnSAVnpPd8SQHlYtk543XbQH+rRPlysvBX2aPGzXqNgBoc48r34dBXca +bSg/LWgH00lqQXICFExSfs1H/20LNxVm1o0KU/B624CJxl1b+OcYbRokTcHF +Ni0nPW5beFJ3oTxRi4IyUVyk1vYdYJzyOL3CiYLmIQey/ou3AknnXA+CCwXL +CyWCbT2s4IdigkakGwWlPYfzOYysIK/eopmxl4K9wWvCB+csYfVM10qLHwUf +Sappn/K3hEbnrwFD0RTk769bsXa3gG3KxB38eRS02nbkafNec6iceq7gk0/B +u+TvMS+MzUG5JuRXbQEFB+4taHxRMoc1lu23/IooKPRb/kP6uBk8C0z80VhJ +QfL8l8z4EDNg1M1lRv1HwaCxvinW+W1AcXgz/OUbBfslxk0zh0yhQOpEDeM7 +BavEQspKX5iC2KhGasYsBSWlHr0bf2AKcxHJeqa/KDgu7dpcGWkK5Tcg+eYK +BUEXX9WImoLWxENNJ2F9/M7b3mVjZwKb4s4ce6avj9bbM9wnPyDUG93hsqbq +Yz7v57D6JgS7hScXu2n62NdK1it+gHAsYP7BuLE+RjptI8zEIDTv8fwkYK2P +fA9YvhOyCH6GFMvdnvqo5z3RpvKGAfd+fJKaS9ZHz4yulmwlGjCK/xbGntVH +nf/U39/6YwRvD4pTuNP00WzZPbX/jRH8GbK2k7ykj7EzG77OxxmBZXtNAt7Q +x+aw+aCST1SYLDo3lVqmj6IZTur/HhiC2n7DJyp9+hjfl1uw+6A+nFe0+XPq +gz5qSsNBPgt9mPvorTc8qI8ySb3Kw5v04bFbatHNEX18u8X19boJCjjYfcwU +n9LHQf0LvSaHKBBpdDqIl8MA3/RkyRMj9KBZ6I3ClIoB1oaGe6sVkUCzfXSP +1SYDbNg+dCH3PAkupv7JvKdmgLmzA0ALJcEebmWBA1oGOBS5M6SfToLvf8P/ +DBoYoM9Os8b6t7pAGJfu7LAyQKrdpc9fVuvC/sd+CZXBBiiEs+T2aG2YPjIZ +sS3UACmfXg6GeWvDMZnDh96FGyCP5/bTaKENZ2ICHX5HG+C8Laegsbg2lFLD +5WmJBhh905bedVAL/lafqm/MNmDPx8zDg1OacLHk5tzbRgPkcp9f+a2iDtJ7 +5cf3vTBA8tri4OwlNbgjkNc/12yA3h98CJFv1IB55M4zQpsB6g59Yn6LVYMB +9Qfpbj0GuJv3YnV+72bYVMjSGP5mgH9uVu4Vub4JnuR0+cyKGeKTp16t/Zaq +MGStsDecaIjrG7KCSZtUgWPxiOuSpCESHdcQHnGpgok9tw2XvCEeijhtt/+p +CrxYRdWXUDPErV9/H11tpAKvvG/xGjMM8SGtM1NfXxn6lP2L0w8Yonp+S9aA +vSIsdVQXih00RENj+aAlsiJIx3Lezj5kiFFDD2+ZEhXBvft6Zn6QIfueElUc +PirA0On2OGaUIf4Cv7tegQrwZYy8cyjNEM1t5RwlM+VhrnBlQavGEO/17ctb +WisLY85mOSksQ/TKXnmp2ycDPWvObR+pM8TqZ7dJhQ9loM5T8uqVBkNsu3Uh +ztpJBk4S9ajLLYbIvegRe/SuNAgm+8e0fjBENcv5xBlnKdDw7ebYv5qK/14/ +uXt/iAiyYtL3Hq+hIrdMLJNQRwTBRm97IjcVp56KNddkEOGn7Ezuy3VUzL58 ++02mFRFq3/GZ6opR8bwUj3wzSxy2m+HplY1UVFq1xrDkFgH2qRTxZu+gouqw +dmTneVGIeu7hr2pHxVuitdl1R0Qhfb/wy3IHKn7VIt7osRKF+juRqS93UdFI +8hqhlEcURFW3b1j2oqL6ldayVwki8EJ1VNQznIq779gejEkUBrVNcvKqt6jo +/fTfwH8PBQGb38aV51KxP358qOGCIDj7JX5i5FNxSDeXeyxMEE4VTuXtukdF +JoWnoYIhCB821aukVFBxOOTU+6L8DZC22VX9239UfPgr9cjyagGYVbtEKZ9h +O3t9aewSH/S8wm0iP6kIrgW/rnTwQUPA9M7QeSp+Ix3ePnOHD9LKLYIpf6hY +Ffq6yMueD9SoHA9qOY0w3GbroF4RL3hbHFFoJBihWxTWuvjzQJev+foumhGm +M1Jst4quhTreeUk9MMLYQsmsuhkuyCvK23zF2Ag3cjUX+r3mgqDvy2YuZkZY +MX9jzjuJC/gjKuM/2BohZasdX8fyGjBLVFj47G2EMk3nuaznOIGZv/RpPtkI +DX6ojHzgWg0U09AFy7NGeNZIUVNsYhVUffq2PuecEXLTehuOvVoF5bKD+pYX +jfCBQnRnw6VV8CCr4dzNa0Z4LCOeaKO8CnJSTxuaFxuhp+ue8s07OCAldMOF +rE52PVfv5JcdW2bwiCQXTHUboYDoI3Mxi2VGYhlHvUmPEWZZZhx7KrHMSJie +Hfv2wQiPaz3+Mlv3l3Hcr4tmPGaEie257+5y/mUc3XN1fOK3EfLLz0QL5vxh +uG1VQiNZGv76etKKxPebsdzFI9AoT0NOAtky8+MCI2f/dL+lEg1Za8i5JlUL +jLFEVoTbJhpm27tkH/FaYBxtsS2J1KVh7bXbRTyPfjHO2MTIMs1o6PmY79Nc +3Dyj1qX7LzmQhmvnyQlvDH4y3CdqW+uDabhosIXbkfCTwRGVk7U1lIbM228I +QnM/GGbXDpEdI2lIOnPEz7D0B+PtwKrDIadoOHWSo8VA/Qdj0ntLf1kmDdu5 +fLtvq88ypI4ksbY00LBfRet8zt1pRtrKAb2zz2joZNmpfj9kmrH6olnZlyYa +BkZRjLhxmjFZzXUvp4WGAa2EelbvFKOWIyFLuJOGp4K8y34ITjHcLsdF/Bpl +10/rnrdI+8rIqovUe7yOjuLfbnnseTrOWG/jWiYpQMf7rDtpU1fGGXFDBpoR +gnRMtHz7qPHwOMOP67eythgdVb0TQukS4wx923DRPFk65qmsG3IL+8J4N3z0 +52kdOiqtkMM+G44xxPgOl+3YRUdGKk/n6dkRRr5pbNSMKx131i5pz7WOMHRj +00wv7aHj+Ota33v5IwybmdLuHi86nsnYGz7mMsJIfDe/uO8wHSuYB4ZvNA0z +fuedMImKp+OOywv12YWfGH1GlzoLiuiovtknLhg+MvzC8q9bFNNRWfGuo9nq +j4xfxVX7v5XS8Xr5qnXnng8yhBV7FnSq6Uiail45vGOQYcUjI/2ogY78k+KR +Xt4DjPquAp/ObjqGVaU7hOb0MywFmJrhPXR8vP6J9Xr/fkaPecsvYj8dY8eF +gI/cz5ir/ZrsMURHB64WI72WPoZmrvbDiUk6BsyUKpF/9zLq+4zDU6foyNG0 +5DPe1MuwFN0JWjN0rAo5K7V8oZdxICnsTeg8HW2H42jbNHsZcw2J2eK/6Vhj +WrwzYqmHcfJP5r7aP3SUO/jAkLu1hyFIvqfhvkzH5uhr5nNZPYybR2rnV1bo ++L6l9D3dr4fxP3W/2EE= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0982826660288101}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0982826660288101}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831476397276*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"df0e37ab-ea09-4af8-95d3-0da4a26db9e9"] +}, Open ]], Cell[CellGroupData[{ @@ -5684,66 +12762,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[282]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], + "In[121]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.443621462424051`*^-173\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 282, 273, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269930374*^9}, +Cell[BoxData["1.5557597910071665`"], "Output", + CellChangeTimes->{3.9913372766841774`*^9, 3.993831559121191*^9}, CellLabel-> - "During evaluation of \ -In[282]:=",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.352709009016139`*^-176\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 282, 274, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699413757`*^9}, - CellLabel-> - "During evaluation of \ -In[282]:=",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.488155146821548`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 282, 275, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269949375*^9}, - CellLabel-> - "During evaluation of \ -In[282]:=",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 282, 276, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699573765`*^9}, - CellLabel-> - "During evaluation of \ -In[282]:=",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], - -Cell[BoxData["9.332200719005147`"], "Output", - CellChangeTimes->{3.9913372766841774`*^9}, - CellLabel-> - "Out[282]=",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] + "Out[121]=",ExpressionUUID->"7fa0fd5e-155e-489b-8de6-d881e7474381"] }, Open ]], Cell[CellGroupData[{ @@ -5810,68 +12834,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494640512295`*^9, - 3.991849468375696*^9}},ExpressionUUID->"53e25fab-b431-cc42-a467-\ -e4dea0353ed0"], + CellChangeTimes->{{3.9918494640512295`*^9, 3.991849468375696*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 277, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767181473`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.464200403164336`*^-78\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 41, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.993831559153678*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], +In[122]:=",ExpressionUUID->"46e51d2f-5aa3-46f8-ae59-e2b1a315a06c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 278, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767281475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.883007510556989`*^-79\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 42, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.993831559159121*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], +In[122]:=",ExpressionUUID->"c8f76ab2-3a36-445a-b15a-ccb27d3987a9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 279, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767351475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.325313369822422`*^-80\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 43, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.9938315591637897`*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], +In[122]:=",ExpressionUUID->"52cdf3f3-c62d-4293-a87d-7b403bad6334"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 283, 280, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337276743145*^9}, +during this calculation.\"", 2, 122, 44, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.993831559167933*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], +In[122]:=",ExpressionUUID->"e2005e39-cbc9-4114-86f0-458d46e13f5f"], -Cell[BoxData["0.5406905105605413`"], "Output", - CellChangeTimes->{3.991337284091696*^9}, +Cell[BoxData["2.0401030026012945`"], "Output", + CellChangeTimes->{3.991337284091696*^9, 3.993831568371545*^9}, CellLabel-> - "Out[283]=",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] + "Out[122]=",ExpressionUUID->"28fbb905-9a4e-48c1-8982-871635ad34c2"] }, Open ]], Cell[CellGroupData[{ @@ -5892,8 +12926,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -5938,68 +12971,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494737320137`*^9, - 3.9918494774550457`*^9}},ExpressionUUID->"b18c819e-620a-d449-97d6-\ -547e3a6fa152"], + CellChangeTimes->{{3.9918494737320137`*^9, 3.9918494774550457`*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 281, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284131695*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.464200403164336`*^-78\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 45, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.993831568404181*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], +In[123]:=",ExpressionUUID->"733c8123-098f-455b-b505-7f609351ed53"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 282, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284142767*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.883007510556989`*^-79\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 46, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.993831568409067*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], +In[123]:=",ExpressionUUID->"9358537b-9cbc-4032-894b-310d2c3ed08c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 283, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284150778*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.325313369822422`*^-80\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 47, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.99383156841389*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], +In[123]:=",ExpressionUUID->"b70180a0-a90e-4b2d-9723-caff7f4993f3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 284, 284, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372841597614`*^9}, +during this calculation.\"", 2, 123, 48, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.993831568418276*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], +In[123]:=",ExpressionUUID->"d6823632-68f0-4913-91b8-830c2d0c9d1c"], -Cell[BoxData["2.9943030245183917`"], "Output", - CellChangeTimes->{3.9913372907074146`*^9}, +Cell[BoxData["16.34612666539132`"], "Output", + CellChangeTimes->{3.9913372907074146`*^9, 3.993831577739621*^9}, CellLabel-> - "Out[284]=",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] + "Out[123]=",ExpressionUUID->"0be0038d-fc6d-4ae9-9683-53acaa080295"] }, Open ]], Cell[CellGroupData[{ @@ -6020,8 +13063,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6066,68 +13108,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849482271084*^9, - 3.9918494852683945`*^9}},ExpressionUUID->"22ab74c7-5916-9440-9d7d-\ -c3e0f6ab8836"], + CellChangeTimes->{{3.991849482271084*^9, 3.9918494852683945`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 285, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290744484*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.464200403164336`*^-78\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 49, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.9938315777796288`*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], +In[124]:=",ExpressionUUID->"a23c4a97-d888-4684-a240-b9e5f9a281f2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 286, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290753483*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.883007510556989`*^-79\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 50, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.993831577785061*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], +In[124]:=",ExpressionUUID->"c7fb0e0c-d2f2-4dba-ad04-e8f1dbafa5a1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 287, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372907615204`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.325313369822422`*^-80\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 51, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.993831577789703*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], +In[124]:=",ExpressionUUID->"edaaeb3f-5cc9-4a86-b570-e2e606ea1248"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 285, 288, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133729076952*^9}, +during this calculation.\"", 2, 124, 52, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.993831577794023*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], +In[124]:=",ExpressionUUID->"fff9a062-2fa0-4ba6-a963-5afbb36e0309"], -Cell[BoxData["16.72305770548981`"], "Output", - CellChangeTimes->{3.991337294569908*^9}, +Cell[BoxData["0.4396012831740016`"], "Output", + CellChangeTimes->{3.991337294569908*^9, 3.993831584059195*^9}, CellLabel-> - "Out[285]=",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] + "Out[124]=",ExpressionUUID->"130a45c6-75e3-47aa-9c14-be4209a6de6f"] }, Open ]], Cell[CellGroupData[{ @@ -6136,22 +13188,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918494889040737`*^9, - 3.9918494971484394`*^9}},ExpressionUUID->"f9c66987-c237-7a40-a006-\ -e20e260dbdcb"], - -Cell[BoxData["0.07640873836855284`"], "Output", - CellChangeTimes->{3.9913372946009064`*^9}, + CellChangeTimes->{{3.9918494889040737`*^9, 3.9918494971484394`*^9}}, CellLabel-> - "Out[286]=",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] + "In[125]:=",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], + +Cell[BoxData["0.7610535031359257`"], "Output", + CellChangeTimes->{3.9913372946009064`*^9, 3.993831584085684*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"fa27dbd3-5cea-4407-898e-61852b1b7e80"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918495000311985`*^9, 3.9918495029810333`*^9}, - 3.9919248636163254`*^9},ExpressionUUID->"770a9ed7-7938-9e48-be64-\ -c31719ef3a6b"], + 3.9919248636163254`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ @@ -6174,12 +13227,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[288]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], + "In[127]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[BoxData["7.13574266196526`"], "Output", - CellChangeTimes->{3.991337294629921*^9}, +Cell[BoxData["14.523266763822694`"], "Output", + CellChangeTimes->{3.991337294629921*^9, 3.99383158409662*^9}, CellLabel-> - "Out[288]=",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] + "Out[127]=",ExpressionUUID->"edb96897-7a84-47e5-b19b-de56babbb453"] }, Open ]], Cell[CellGroupData[{ @@ -6189,12 +13242,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[290]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], + "In[128]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[BoxData["1.4042291233212119`"], "Output", - CellChangeTimes->{3.9913372946629753`*^9}, +Cell[BoxData["0.03149409626224328`"], "Output", + CellChangeTimes->{3.9913372946629753`*^9, 3.993831584103105*^9}, CellLabel-> - "Out[290]=",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] + "Out[128]=",ExpressionUUID->"f3b58bb8-cc72-434f-ac71-e8c6b9f377d7"] }, Open ]], Cell[CellGroupData[{ @@ -6204,12 +13257,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[293]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], + "In[129]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[BoxData["10.020217662457247`"], "Output", - CellChangeTimes->{3.9913372947367725`*^9}, +Cell[BoxData["0.4573971615020704`"], "Output", + CellChangeTimes->{3.9913372947367725`*^9, 3.993831584109682*^9}, CellLabel-> - "Out[293]=",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] + "Out[129]=",ExpressionUUID->"6bb9cbea-a367-4d5f-a6db-7155d6ee819d"] }, Open ]], Cell[CellGroupData[{ @@ -6399,12 +13452,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[294]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], + "In[130]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[BoxData["0.06674599726273667`"], "Output", - CellChangeTimes->{3.9913372947513313`*^9}, +Cell[BoxData["0.013108206437130326`"], "Output", + CellChangeTimes->{3.9913372947513313`*^9, 3.99383158411982*^9}, CellLabel-> - "Out[294]=",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] + "Out[130]=",ExpressionUUID->"4f3b0d14-73d3-4e2f-a410-837fb0d2b12b"] }, Open ]], Cell[CellGroupData[{ @@ -6418,12 +13471,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[295]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], + "In[131]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[BoxData["3.430301770911147`"], "Output", - CellChangeTimes->{3.9913372948636913`*^9}, +Cell[BoxData["7.740576453529957`"], "Output", + CellChangeTimes->{3.9913372948636913`*^9, 3.9938315842024107`*^9}, CellLabel-> - "Out[295]=",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] + "Out[131]=",ExpressionUUID->"bd8625a5-c9e0-4077-adc7-015b24c7717a"] }, Open ]], Cell[CellGroupData[{ @@ -6615,12 +13668,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[296]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], + "In[132]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[BoxData["0.01266539131451536`"], "Output", - CellChangeTimes->{3.991337294877693*^9}, +Cell[BoxData["0.4614728671439587`"], "Output", + CellChangeTimes->{3.991337294877693*^9, 3.993831584213581*^9}, CellLabel-> - "Out[296]=",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] + "Out[132]=",ExpressionUUID->"6d9f215e-dc04-4253-813d-151bfbbd3db7"] }, Open ]], Cell[CellGroupData[{ @@ -6634,12 +13687,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[297]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], + "In[133]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[BoxData["7.874729317258519`"], "Output", - CellChangeTimes->{3.991337294976324*^9}, +Cell[BoxData["1.304583420916875`"], "Output", + CellChangeTimes->{3.991337294976324*^9, 3.993831584302063*^9}, CellLabel-> - "Out[297]=",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] + "Out[133]=",ExpressionUUID->"5f3b6562-c07d-474b-9c18-c06df5c892ae"] }, Open ]], Cell[CellGroupData[{ @@ -6732,12 +13785,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[298]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], + "In[134]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913372950022793`*^9}, +Cell[BoxData["0.130547288335749`"], "Output", + CellChangeTimes->{3.9913372950022793`*^9, 3.99383158431144*^9}, CellLabel-> - "Out[298]=",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] + "Out[134]=",ExpressionUUID->"001e20a3-448f-4bf1-995e-2e8bad0de25c"] }, Open ]], Cell[CellGroupData[{ @@ -6827,12 +13880,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[299]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], + "In[135]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991337295013279*^9}, +Cell[BoxData["0.869452711664251`"], "Output", + CellChangeTimes->{3.991337295013279*^9, 3.993831584320661*^9}, CellLabel-> - "Out[299]=",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] + "Out[135]=",ExpressionUUID->"7a9c1fc3-966f-4cb9-b7c5-09098d87decd"] }, Open ]], Cell[CellGroupData[{ @@ -6955,12 +14008,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[300]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], + "In[136]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.991337295041279*^9}, +Cell[BoxData["0.11350469384393182`"], "Output", + CellChangeTimes->{3.991337295041279*^9, 3.9938315843294992`*^9}, CellLabel-> - "Out[300]=",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] + "Out[136]=",ExpressionUUID->"850c5edb-6300-4253-b528-8f9522b39ce4"] }, Open ]], Cell[CellGroupData[{ @@ -7022,68 +14075,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849517192892*^9},ExpressionUUID->"55d51961-97f2-ed4d-8bf8-\ -8a461d652ab4"], + CellChangeTimes->{3.991849517192892*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 301, 289, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950662746`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.443865444559271`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 53, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.993831584344239*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], +In[137]:=",ExpressionUUID->"65d3a96c-23e1-4b5a-ac83-79833a16c08a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 290, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337295076277*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9537700915237925`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 54, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.9938315843492002`*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], +In[137]:=",ExpressionUUID->"7793c008-1dd1-4206-b228-32764785a204"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 291, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950842743`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.108410776200172`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 55, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.993831584354148*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], +In[137]:=",ExpressionUUID->"fd40982e-c8d8-4217-b403-bb3965327e92"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 301, 292, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950922775`*^9}, +during this calculation.\"", 2, 137, 56, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.993831584358459*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], +In[137]:=",ExpressionUUID->"a18b5c70-a2cf-4091-b8ce-e66676ffd71c"], -Cell[BoxData["3.430301770911144`"], "Output", - CellChangeTimes->{3.991337298790371*^9}, +Cell[BoxData["7.740576453132145`"], "Output", + CellChangeTimes->{3.991337298790371*^9, 3.993831589331017*^9}, CellLabel-> - "Out[301]=",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] + "Out[137]=",ExpressionUUID->"dfa772b2-eb01-4093-a9b7-14b12a757d61"] }, Open ]], Cell[CellGroupData[{ @@ -7145,68 +14208,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849520751028*^9},ExpressionUUID->"9704b9d3-b449-2144-9970-\ -6a7de047241d"], + CellChangeTimes->{3.991849520751028*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 302, 293, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988243732`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.443865444559271`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 57, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.993831589368783*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], +In[138]:=",ExpressionUUID->"47e93e1e-a17c-41d8-b45e-b274f78ed236"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 294, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988343716`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9537700915237925`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 58, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.9938315893765*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], +In[138]:=",ExpressionUUID->"24cee09c-fba6-4005-b486-1bcf8cacee8a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 295, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988425922`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.108410776200172`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 59, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.993831589381621*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], +In[138]:=",ExpressionUUID->"385b0634-38b1-48ea-93f5-5562b67252e2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 302, 296, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988505898`*^9}, +during this calculation.\"", 2, 138, 60, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.99383158938595*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], +In[138]:=",ExpressionUUID->"ec11abd3-9efe-48dd-9070-7d1a9abf1997"], -Cell[BoxData["7.87472931725852`"], "Output", - CellChangeTimes->{3.991337302457178*^9}, +Cell[BoxData["1.3045834208498288`"], "Output", + CellChangeTimes->{3.991337302457178*^9, 3.993831594172907*^9}, CellLabel-> - "Out[302]=",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] + "Out[138]=",ExpressionUUID->"2174f3ed-853e-450b-848e-8901c46bea9d"] }, Open ]], Cell[CellGroupData[{ @@ -7264,94 +14337,99 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849523511486*^9},ExpressionUUID->"0fd90636-7592-fc40-bf9d-\ -ae1cb915c656"], + CellChangeTimes->{3.991849523511486*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVkXc8lu0bxlFkr+dBSMNqlz0azlNWtlRmmQ9KsskMlfRKonqL3kRSJGWl +9NxPfkJaTwiVRNnJ3rT0u/rj/tyf7+c4z+M4ruta4xFg68XFwcExS76//6CG +LWsfNTXoJbQsnkkupaPeWJ6mh2ERlJQ6rkgk3JWtdUnRkAUuez68DyVsw3jD +I6j+DN6N5lY6Ei6NiKvlNmSD/MWlNeqE/6lfXh1X+BZsVrhPcxF+3BR0/Zfa +O/iqss3yeQkdh9pfxURSbTCkv6UpnrBMv4LznEEHvE9ciNlK2Hw8RjeE/QU0 +ZgL3tRTTserXkEBEYTfYYoq9H+H3CVLRD/17wbfFOenHfTqO8RgOzaj1w8wz +of5YwjwpgY7q8wOg1TYSNHePjivFsl4EUYNwwddtK4Owlezc7TGDESiJVt21 +qoiO3jnykpt5x4D3n5GrfnfpGKdknXiEPQ59K+c3FBfSsU2qVTW0cBIEuccX +aHfoyHDyPXwxZQrqLOS2axXQceIax40y/2kInlzxxDKfjrzym0Un1WbBVsI0 ++cAtOl5i1JqISszBYZuM9r15dFyd7xi3dX4ObuNiKN6ko86m02NHqQVI/pp0 +8XsOHQ9pfWEPGfyCnNu/3gz/R8eZiLCl/Mq/gX0sv+7cVTrGUwI71vMugnDV +5lVKmXTMQJ27Puw/UKbBFNa4TPrdemEYXMiJG04aGLecp2Nh/cWuBFkuXBEd +9XJ1Kun71SUmPYUL25hr33qm0DFmw2x5if8StCvfGv/qDOlbvEZhXI0bG/Xq +emQS6NjeNFK1eJMbfeCpsEQc6T/1yElYggcjnocMLI2lY5GG1YXN8zyY4Zd4 +/1kEHeseR3H6Uby43PXJTnYAHWdrW74MGggiPezEuSlnOopbCIpGVwmi5di+ +eFFHOqq0GqKQrhBmfEuqkbejo29fRY7qFmFUyXV1ULShYyAXW2WnoCjGGfx+ +fs2Ajv3y9ycT58TQ9OW00JF15H68X/E1qotjB/dbp2ZFOnLdHVizPEgcs0+Y +XdiyhvRVX2VbOCyORUcGh59J09HJIK2soYuGy2IqooP46djoGRwi9VoCwwYd +Zp59o+Hn/NSzbrySeE319dqEfhqODBfevGMkiWO6mr9Vu2nIH9rbsr1aEpsE +VP4X2kZDw1P7NNwqpDCzI/Z3XD0NmXlaswXZ0ijYrZRZmUPDvP4f4dtC5fAB +c1ZY1IqGu/cnfQ65J4ftjpy9s7uJfx3N+N6AHIqfmVVsNaChRt4midWOK/FN +nIh8lC4N6zxcyrn1VuGf5iPWRxVpODXedWzw5Gqs/2ee5+eCONKOGj4ot5TH +1k13p/iyxHGfj8Bms24l1NOfCq9oEUNZ+fNxZ/s2oXbp0aDDMqK46Vao4E9Q +QyW769ZuKIg3ghVtKtiaeLxdKn/dbV5sCgftU7d08WUUo+SkIDeucXlnddBv +JzIm5bckjXCi15+H9+UiERM70l/uZC+C1HDlMimPXfiqnN2ZLv8DQtV3dFzY +YIhZKedV4iPm4IDW+Jc0VUPcdbOuwe7IHBjq5vam6hiiqxTDTMtlDmjAO5xs +bIg7P7+uEzGcgzKz1u8nPAzRmq9SbZPoHEy4+0mFXDVEy4/7HXgKZ+FI2jXb +vfxG6LvVRUq2bwY8Rn+9oA0ZoYfujR83A6fhUf3c7J1JIxwUWZZxhTENgjkT +8vjdCB923V11yYHotn0xfrzGGJu2vTUfiV75WuWZsjEy0qtW64pNQ8WJqxnh +nsZ43IFW87t8CniX6xz62GGM4Ssjz/T+mYR7u0KWZTeaoMx22dtviicgdI2z +Xvl7ExRpcr8ZfnsCdnAYhD3vNMFO5Xi6ctYEsJ+I944Pm2CC+k/ISJ6AEZ2y +KuTdjXo2ETteek3Ahq2TYT24G5f1abY5yk1AgWxAn1LZboyfM+bbLD8OeTO+ +T4sumaLMUFGVDH0UPt7JXON4zRTTq8NcRZeMgrDriwTuPFN89sSjQHxqBCJf +Ku1yKTfF1twM/p1NI2B1vatGpNkUPx1M/r723Ah8N7GrCxYxw+547LbkI/p/ ++s91ks0w+Za74WX+YVjQX/6mLs4cM+oj7Whbv8HMSL6+ZZI5Dl+9XLFhzTcY +v6L98F2qORp43ROzoH2DgVG77IEsczwQZXmjaH4QWjP/DeJlmeN9dxODvupB +KJ0Ul7RYMEc+m3VvlPcPgu8NIdeWQAtUjE/krjv1FTo5lkx2u1uiwN7YHa8W ++8F/RUBagoI1JnOnJMzE9ML9wy+q/020QQEZaSltlW6Impae33h4D57iMOlK +YH2GWTNju+eutqjnf75+rfsn0HVO1+/fsxdDE8JUmBfboFk6y7dOfR+qZi1w +uu57DzK3T7IK1u1HS1mOrxbbWqGya4OFlZAdyptrLjYnNcPK1gmf8FE7XPta +OoJNewvq/6YX3eyyx9zFjDAdn0bIWjq95UKtA/rUuNmHrXsDD/W3tic+dkS1 +eTGROJ7XkKGdLPar0AnXKz+VDFN9CY2fbp1WT3FG/aahtdeLn0OF5TXFwPgD +WP9wra6sXj1MHt3L4c84iApJ41r2Qs9g1nj9oTEDF5TQD3tQsKQOCkY/LoRo +uaJEdo+o9NJacLhxy/OgoBsebQ85PapSA+Vl5q5LktxwsaL3v2Dvp6Ar2/z9 +n+9uONeqV5z9v2pQ6PJpf3vYHT9rZKzo2FINfQJHrK/1uuPICVnNBtP/QVOq +lafJfg/crRvBmjlUBZcisgXCmjywcvsJ16//PgFW1Z/vnqaeWN3L9VC5nwWq +TzV01pp7YoYCR+DLHhbcrj0cPmThiREJjsVHu1iQ/qJlKtDGEwer01jMTyzw +bs4fjrX3xCYzNR6fZhaIDVh3XvHyxJz9mhy81UQXyql+nUCYO3j00DUWiBzA +JHUmmd9kcvKCIwtW0583rmB54sRQ671D9ixQYVsu56nyxK5R/STczwLbHc53 +2p56YkkfzWjWhgWXVoS/jn3piSp68t3Bu1kg03lX5EUbme/wxCptFii6SGUc +mCd++YkfL0ixQNdtrCBRg4HxBj9Oruyg4HbmRIiVFgNtVHKVotspoLdM6Unp +MDDwrtqGj20UjBnNtxZsZ6DKk59Ome8oyNvIwcneRfZHq/duaKRAeF7MUXwP +2Rc55pNaQ0HfOU2+7KMMTOuVsz5YSMGe59qtPgEMrNb58qa/gIIqjm3ZKkEM +dGME5QfkU5AZoqdZE8rA1dISvkl5FFg5mrj3RzMQJ6qVn1+n4LGi4+ONycQ/ +N8806SIFqVTM4crbxO9y3A3e4xQcVbuiG1HAwC6L0+drYiiwuFPKp1NI8h/8 +qo2NpoD/ysCdR/dIHk/An/kIChKDbYYePmBgicUU82cIBTHrFY9U1JB5Wy9p +9KXA98prv7LPDJzosVCm7CkwFR7YEdzFQI4bZ05l2VGwLpFDSK2H9Ik0V0jY +T8FAsOa90n7CCw/XWOylwN0qe7RkhOz3ecpNWlHgwB3iX/yDgU3lZUPhxhSY +hMgEFkl6oQp1jBWoRUFN9mmzC8u9MN6eze2tScEO9pRihIwXljh61xzQoEBF +6fVHg5VeyNFWeMlKjQLpD9EGn5S80I1tnGGwhYLhbZ2S/JpemJOiMR2sTMF5 +rpwnPnu9sCto+9N+KXL+rYIZlvu9EI/5y/IRPuUcEaxuTzjySO9mSQoiHtis +/eNE5p8qsaLppL83Z/plD6KrOaWsE6NA/ZUH41kQyY+/dLqen4IP6UoCCmle +uHpl0oD4HybcB6FDg+mkT2KWS8AiE06NztTdu0j8fJ3E3vxmgppp3XGdK8TP +10M55RcTUjk8pyyvk756kwLSP5hgHJDzMaKIzG/vLD46ywQ5uTNaevcJW/fV +d84wYeZVwMUlJWTegiZlTThXGSxTywmvTvPQnGbC787O6ptM0q/hxk3RSSY8 +sJAtaHhB8qi7FOcoE87+4OK+9Irw103OiSNM8CgYcndkk/41Z9T4CYsuZcr2 +NZL+oyfPSA0zwY9yOP/9Pcm/HtWI35igsOFyuGI/0ceyHr/pZ8KPD7Et3waI +vl+zgUG4KdFLpXiQvN/Gs9K/+5hwvFtjSHeE6I9V96kSbs9oOWg9TfK0y+wL +ephwYZmYURSnN66+5JLc9IUJrKlO59Al3uimFaEURPhrZ2GwP7c3dqnk7aIR +3vHAMMeDj+iFQ1wHPjNhwC3ip5kY4WTjzD8dpL+FkbgRzRvxEbdBEeHt2uLr +QYLo7yz9nQinCRXZqUsTv1pdU+oT0ZlfSmXXEL35vfD5diZ43yp6IaFA+gyr +1poQTkuL/CKi5I0cptkLnIQHvGlCS9d7Y7xg9EDUR6LTTA6NqJD9fxrYx9uY +wFykxQ2oeWPO1T1nDAj3f+v6t0uD8MyJOj7C26qjalt1yL5IXdXVD0zo87u/ +8gmSPM7Mxw3vmSDsEK35aBeZD/KKzCasa7DbotSQzLemPg4inCrdE3lrtzdW +W71jyhCuXFqclm1G8lO7oyffMaF3PDo/04Kw2PonLwnr1Eu8O2dD2Mu8+jhh +j9Ke4SRbcj9lUiecCZ+7Vsx1Yh/J38ZVp0u4J9hUJdyB5Cktf/GjlQlCLpIm +gU5k3l47uZOwjmnvQd8DpJ/HAfZTwudWxZ51cSPcktuUSriS3yzXwYPsOzMv +HCPcMyv52JZB7o+jrtX9r193b6OFN+l/lrps+dePXTJgfIi8By2rbRthj0ex +v9GX6POMq+v/+uea0bf7kX7dIh3Sf/3PSW3U9Cd5tVezBP76R/Tpbw0k+51c +XxZbmCDIKHVYH0z0SqOcacLa1scDFEJJf2X37m+EPbaZn5YLJ36Ge3O7Caco +Lc+SiiB5kTK97YQfivaXi0URPbLi5jvC3T9LXwnEEL+dCn1v//p/Pd7NfZyc +R9gzr5GwVrP5wp84cr9RoX0NhP8PT4kfmg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7365,106 +14443,109 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwVkXc8lu0bxlFkr+dBSMNqlz0azlNWtlRmmQ9KsskMlfRKonqL3kRSJGWl +9NxPfkJaTwiVRNnJ3rT0u/rj/tyf7+c4z+M4ruta4xFg68XFwcExS76//6CG +LWsfNTXoJbQsnkkupaPeWJ6mh2ERlJQ6rkgk3JWtdUnRkAUuez68DyVsw3jD +I6j+DN6N5lY6Ei6NiKvlNmSD/MWlNeqE/6lfXh1X+BZsVrhPcxF+3BR0/Zfa +O/iqss3yeQkdh9pfxURSbTCkv6UpnrBMv4LznEEHvE9ciNlK2Hw8RjeE/QU0 +ZgL3tRTTserXkEBEYTfYYoq9H+H3CVLRD/17wbfFOenHfTqO8RgOzaj1w8wz +of5YwjwpgY7q8wOg1TYSNHePjivFsl4EUYNwwddtK4Owlezc7TGDESiJVt21 +qoiO3jnykpt5x4D3n5GrfnfpGKdknXiEPQ59K+c3FBfSsU2qVTW0cBIEuccX +aHfoyHDyPXwxZQrqLOS2axXQceIax40y/2kInlzxxDKfjrzym0Un1WbBVsI0 ++cAtOl5i1JqISszBYZuM9r15dFyd7xi3dX4ObuNiKN6ko86m02NHqQVI/pp0 +8XsOHQ9pfWEPGfyCnNu/3gz/R8eZiLCl/Mq/gX0sv+7cVTrGUwI71vMugnDV +5lVKmXTMQJ27Puw/UKbBFNa4TPrdemEYXMiJG04aGLecp2Nh/cWuBFkuXBEd +9XJ1Kun71SUmPYUL25hr33qm0DFmw2x5if8StCvfGv/qDOlbvEZhXI0bG/Xq +emQS6NjeNFK1eJMbfeCpsEQc6T/1yElYggcjnocMLI2lY5GG1YXN8zyY4Zd4 +/1kEHeseR3H6Uby43PXJTnYAHWdrW74MGggiPezEuSlnOopbCIpGVwmi5di+ +eFFHOqq0GqKQrhBmfEuqkbejo29fRY7qFmFUyXV1ULShYyAXW2WnoCjGGfx+ +fs2Ajv3y9ycT58TQ9OW00JF15H68X/E1qotjB/dbp2ZFOnLdHVizPEgcs0+Y +XdiyhvRVX2VbOCyORUcGh59J09HJIK2soYuGy2IqooP46djoGRwi9VoCwwYd +Zp59o+Hn/NSzbrySeE319dqEfhqODBfevGMkiWO6mr9Vu2nIH9rbsr1aEpsE +VP4X2kZDw1P7NNwqpDCzI/Z3XD0NmXlaswXZ0ijYrZRZmUPDvP4f4dtC5fAB +c1ZY1IqGu/cnfQ65J4ftjpy9s7uJfx3N+N6AHIqfmVVsNaChRt4midWOK/FN +nIh8lC4N6zxcyrn1VuGf5iPWRxVpODXedWzw5Gqs/2ee5+eCONKOGj4ot5TH +1k13p/iyxHGfj8Bms24l1NOfCq9oEUNZ+fNxZ/s2oXbp0aDDMqK46Vao4E9Q +QyW769ZuKIg3ghVtKtiaeLxdKn/dbV5sCgftU7d08WUUo+SkIDeucXlnddBv +JzIm5bckjXCi15+H9+UiERM70l/uZC+C1HDlMimPXfiqnN2ZLv8DQtV3dFzY +YIhZKedV4iPm4IDW+Jc0VUPcdbOuwe7IHBjq5vam6hiiqxTDTMtlDmjAO5xs +bIg7P7+uEzGcgzKz1u8nPAzRmq9SbZPoHEy4+0mFXDVEy4/7HXgKZ+FI2jXb +vfxG6LvVRUq2bwY8Rn+9oA0ZoYfujR83A6fhUf3c7J1JIxwUWZZxhTENgjkT +8vjdCB923V11yYHotn0xfrzGGJu2vTUfiV75WuWZsjEy0qtW64pNQ8WJqxnh +nsZ43IFW87t8CniX6xz62GGM4Ssjz/T+mYR7u0KWZTeaoMx22dtviicgdI2z +Xvl7ExRpcr8ZfnsCdnAYhD3vNMFO5Xi6ctYEsJ+I944Pm2CC+k/ISJ6AEZ2y +KuTdjXo2ETteek3Ahq2TYT24G5f1abY5yk1AgWxAn1LZboyfM+bbLD8OeTO+ +T4sumaLMUFGVDH0UPt7JXON4zRTTq8NcRZeMgrDriwTuPFN89sSjQHxqBCJf +Ku1yKTfF1twM/p1NI2B1vatGpNkUPx1M/r723Ah8N7GrCxYxw+547LbkI/p/ ++s91ks0w+Za74WX+YVjQX/6mLs4cM+oj7Whbv8HMSL6+ZZI5Dl+9XLFhzTcY +v6L98F2qORp43ROzoH2DgVG77IEsczwQZXmjaH4QWjP/DeJlmeN9dxODvupB +KJ0Ul7RYMEc+m3VvlPcPgu8NIdeWQAtUjE/krjv1FTo5lkx2u1uiwN7YHa8W ++8F/RUBagoI1JnOnJMzE9ML9wy+q/020QQEZaSltlW6Impae33h4D57iMOlK +YH2GWTNju+eutqjnf75+rfsn0HVO1+/fsxdDE8JUmBfboFk6y7dOfR+qZi1w +uu57DzK3T7IK1u1HS1mOrxbbWqGya4OFlZAdyptrLjYnNcPK1gmf8FE7XPta +OoJNewvq/6YX3eyyx9zFjDAdn0bIWjq95UKtA/rUuNmHrXsDD/W3tic+dkS1 +eTGROJ7XkKGdLPar0AnXKz+VDFN9CY2fbp1WT3FG/aahtdeLn0OF5TXFwPgD +WP9wra6sXj1MHt3L4c84iApJ41r2Qs9g1nj9oTEDF5TQD3tQsKQOCkY/LoRo +uaJEdo+o9NJacLhxy/OgoBsebQ85PapSA+Vl5q5LktxwsaL3v2Dvp6Ar2/z9 +n+9uONeqV5z9v2pQ6PJpf3vYHT9rZKzo2FINfQJHrK/1uuPICVnNBtP/QVOq +lafJfg/crRvBmjlUBZcisgXCmjywcvsJ16//PgFW1Z/vnqaeWN3L9VC5nwWq +TzV01pp7YoYCR+DLHhbcrj0cPmThiREJjsVHu1iQ/qJlKtDGEwer01jMTyzw +bs4fjrX3xCYzNR6fZhaIDVh3XvHyxJz9mhy81UQXyql+nUCYO3j00DUWiBzA +JHUmmd9kcvKCIwtW0583rmB54sRQ671D9ixQYVsu56nyxK5R/STczwLbHc53 +2p56YkkfzWjWhgWXVoS/jn3piSp68t3Bu1kg03lX5EUbme/wxCptFii6SGUc +mCd++YkfL0ixQNdtrCBRg4HxBj9Oruyg4HbmRIiVFgNtVHKVotspoLdM6Unp +MDDwrtqGj20UjBnNtxZsZ6DKk59Ome8oyNvIwcneRfZHq/duaKRAeF7MUXwP +2Rc55pNaQ0HfOU2+7KMMTOuVsz5YSMGe59qtPgEMrNb58qa/gIIqjm3ZKkEM +dGME5QfkU5AZoqdZE8rA1dISvkl5FFg5mrj3RzMQJ6qVn1+n4LGi4+ONycQ/ +N8806SIFqVTM4crbxO9y3A3e4xQcVbuiG1HAwC6L0+drYiiwuFPKp1NI8h/8 +qo2NpoD/ysCdR/dIHk/An/kIChKDbYYePmBgicUU82cIBTHrFY9U1JB5Wy9p +9KXA98prv7LPDJzosVCm7CkwFR7YEdzFQI4bZ05l2VGwLpFDSK2H9Ik0V0jY +T8FAsOa90n7CCw/XWOylwN0qe7RkhOz3ecpNWlHgwB3iX/yDgU3lZUPhxhSY +hMgEFkl6oQp1jBWoRUFN9mmzC8u9MN6eze2tScEO9pRihIwXljh61xzQoEBF +6fVHg5VeyNFWeMlKjQLpD9EGn5S80I1tnGGwhYLhbZ2S/JpemJOiMR2sTMF5 +rpwnPnu9sCto+9N+KXL+rYIZlvu9EI/5y/IRPuUcEaxuTzjySO9mSQoiHtis +/eNE5p8qsaLppL83Z/plD6KrOaWsE6NA/ZUH41kQyY+/dLqen4IP6UoCCmle +uHpl0oD4HybcB6FDg+mkT2KWS8AiE06NztTdu0j8fJ3E3vxmgppp3XGdK8TP +10M55RcTUjk8pyyvk756kwLSP5hgHJDzMaKIzG/vLD46ywQ5uTNaevcJW/fV +d84wYeZVwMUlJWTegiZlTThXGSxTywmvTvPQnGbC787O6ptM0q/hxk3RSSY8 +sJAtaHhB8qi7FOcoE87+4OK+9Irw103OiSNM8CgYcndkk/41Z9T4CYsuZcr2 +NZL+oyfPSA0zwY9yOP/9Pcm/HtWI35igsOFyuGI/0ceyHr/pZ8KPD7Et3waI +vl+zgUG4KdFLpXiQvN/Gs9K/+5hwvFtjSHeE6I9V96kSbs9oOWg9TfK0y+wL +ephwYZmYURSnN66+5JLc9IUJrKlO59Al3uimFaEURPhrZ2GwP7c3dqnk7aIR +3vHAMMeDj+iFQ1wHPjNhwC3ip5kY4WTjzD8dpL+FkbgRzRvxEbdBEeHt2uLr +QYLo7yz9nQinCRXZqUsTv1pdU+oT0ZlfSmXXEL35vfD5diZ43yp6IaFA+gyr +1poQTkuL/CKi5I0cptkLnIQHvGlCS9d7Y7xg9EDUR6LTTA6NqJD9fxrYx9uY +wFykxQ2oeWPO1T1nDAj3f+v6t0uD8MyJOj7C26qjalt1yL5IXdXVD0zo87u/ +8gmSPM7Mxw3vmSDsEK35aBeZD/KKzCasa7DbotSQzLemPg4inCrdE3lrtzdW +W71jyhCuXFqclm1G8lO7oyffMaF3PDo/04Kw2PonLwnr1Eu8O2dD2Mu8+jhh +j9Ke4SRbcj9lUiecCZ+7Vsx1Yh/J38ZVp0u4J9hUJdyB5Cktf/GjlQlCLpIm +gU5k3l47uZOwjmnvQd8DpJ/HAfZTwudWxZ51cSPcktuUSriS3yzXwYPsOzMv +HCPcMyv52JZB7o+jrtX9r193b6OFN+l/lrps+dePXTJgfIi8By2rbRthj0ex +v9GX6POMq+v/+uea0bf7kX7dIh3Sf/3PSW3U9Cd5tVezBP76R/Tpbw0k+51c +XxZbmCDIKHVYH0z0SqOcacLa1scDFEJJf2X37m+EPbaZn5YLJ36Ge3O7Caco +Lc+SiiB5kTK97YQfivaXi0URPbLi5jvC3T9LXwnEEL+dCn1v//p/Pd7NfZyc +R9gzr5GwVrP5wp84cr9RoX0NhP8PT4kfmg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0., 5.173380032113415}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7476,21 +14557,19 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 5.173380032113415}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7504,104 +14583,108 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwVkXc8lu0bxlFkr+dBSMNqlz0azlNWtlRmmQ9KsskMlfRKonqL3kRSJGWl +9NxPfkJaTwiVRNnJ3rT0u/rj/tyf7+c4z+M4ruta4xFg68XFwcExS76//6CG +LWsfNTXoJbQsnkkupaPeWJ6mh2ERlJQ6rkgk3JWtdUnRkAUuez68DyVsw3jD +I6j+DN6N5lY6Ei6NiKvlNmSD/MWlNeqE/6lfXh1X+BZsVrhPcxF+3BR0/Zfa +O/iqss3yeQkdh9pfxURSbTCkv6UpnrBMv4LznEEHvE9ciNlK2Hw8RjeE/QU0 +ZgL3tRTTserXkEBEYTfYYoq9H+H3CVLRD/17wbfFOenHfTqO8RgOzaj1w8wz +of5YwjwpgY7q8wOg1TYSNHePjivFsl4EUYNwwddtK4Owlezc7TGDESiJVt21 +qoiO3jnykpt5x4D3n5GrfnfpGKdknXiEPQ59K+c3FBfSsU2qVTW0cBIEuccX +aHfoyHDyPXwxZQrqLOS2axXQceIax40y/2kInlzxxDKfjrzym0Un1WbBVsI0 ++cAtOl5i1JqISszBYZuM9r15dFyd7xi3dX4ObuNiKN6ko86m02NHqQVI/pp0 +8XsOHQ9pfWEPGfyCnNu/3gz/R8eZiLCl/Mq/gX0sv+7cVTrGUwI71vMugnDV +5lVKmXTMQJ27Puw/UKbBFNa4TPrdemEYXMiJG04aGLecp2Nh/cWuBFkuXBEd +9XJ1Kun71SUmPYUL25hr33qm0DFmw2x5if8StCvfGv/qDOlbvEZhXI0bG/Xq +emQS6NjeNFK1eJMbfeCpsEQc6T/1yElYggcjnocMLI2lY5GG1YXN8zyY4Zd4 +/1kEHeseR3H6Uby43PXJTnYAHWdrW74MGggiPezEuSlnOopbCIpGVwmi5di+ +eFFHOqq0GqKQrhBmfEuqkbejo29fRY7qFmFUyXV1ULShYyAXW2WnoCjGGfx+ +fs2Ajv3y9ycT58TQ9OW00JF15H68X/E1qotjB/dbp2ZFOnLdHVizPEgcs0+Y +XdiyhvRVX2VbOCyORUcGh59J09HJIK2soYuGy2IqooP46djoGRwi9VoCwwYd +Zp59o+Hn/NSzbrySeE319dqEfhqODBfevGMkiWO6mr9Vu2nIH9rbsr1aEpsE +VP4X2kZDw1P7NNwqpDCzI/Z3XD0NmXlaswXZ0ijYrZRZmUPDvP4f4dtC5fAB +c1ZY1IqGu/cnfQ65J4ftjpy9s7uJfx3N+N6AHIqfmVVsNaChRt4midWOK/FN +nIh8lC4N6zxcyrn1VuGf5iPWRxVpODXedWzw5Gqs/2ee5+eCONKOGj4ot5TH +1k13p/iyxHGfj8Bms24l1NOfCq9oEUNZ+fNxZ/s2oXbp0aDDMqK46Vao4E9Q +QyW769ZuKIg3ghVtKtiaeLxdKn/dbV5sCgftU7d08WUUo+SkIDeucXlnddBv +JzIm5bckjXCi15+H9+UiERM70l/uZC+C1HDlMimPXfiqnN2ZLv8DQtV3dFzY +YIhZKedV4iPm4IDW+Jc0VUPcdbOuwe7IHBjq5vam6hiiqxTDTMtlDmjAO5xs +bIg7P7+uEzGcgzKz1u8nPAzRmq9SbZPoHEy4+0mFXDVEy4/7HXgKZ+FI2jXb +vfxG6LvVRUq2bwY8Rn+9oA0ZoYfujR83A6fhUf3c7J1JIxwUWZZxhTENgjkT +8vjdCB923V11yYHotn0xfrzGGJu2vTUfiV75WuWZsjEy0qtW64pNQ8WJqxnh +nsZ43IFW87t8CniX6xz62GGM4Ssjz/T+mYR7u0KWZTeaoMx22dtviicgdI2z +Xvl7ExRpcr8ZfnsCdnAYhD3vNMFO5Xi6ctYEsJ+I944Pm2CC+k/ISJ6AEZ2y +KuTdjXo2ETteek3Ahq2TYT24G5f1abY5yk1AgWxAn1LZboyfM+bbLD8OeTO+ +T4sumaLMUFGVDH0UPt7JXON4zRTTq8NcRZeMgrDriwTuPFN89sSjQHxqBCJf +Ku1yKTfF1twM/p1NI2B1vatGpNkUPx1M/r723Ah8N7GrCxYxw+547LbkI/p/ ++s91ks0w+Za74WX+YVjQX/6mLs4cM+oj7Whbv8HMSL6+ZZI5Dl+9XLFhzTcY +v6L98F2qORp43ROzoH2DgVG77IEsczwQZXmjaH4QWjP/DeJlmeN9dxODvupB +KJ0Ul7RYMEc+m3VvlPcPgu8NIdeWQAtUjE/krjv1FTo5lkx2u1uiwN7YHa8W ++8F/RUBagoI1JnOnJMzE9ML9wy+q/020QQEZaSltlW6Impae33h4D57iMOlK +YH2GWTNju+eutqjnf75+rfsn0HVO1+/fsxdDE8JUmBfboFk6y7dOfR+qZi1w +uu57DzK3T7IK1u1HS1mOrxbbWqGya4OFlZAdyptrLjYnNcPK1gmf8FE7XPta +OoJNewvq/6YX3eyyx9zFjDAdn0bIWjq95UKtA/rUuNmHrXsDD/W3tic+dkS1 +eTGROJ7XkKGdLPar0AnXKz+VDFN9CY2fbp1WT3FG/aahtdeLn0OF5TXFwPgD +WP9wra6sXj1MHt3L4c84iApJ41r2Qs9g1nj9oTEDF5TQD3tQsKQOCkY/LoRo +uaJEdo+o9NJacLhxy/OgoBsebQ85PapSA+Vl5q5LktxwsaL3v2Dvp6Ar2/z9 +n+9uONeqV5z9v2pQ6PJpf3vYHT9rZKzo2FINfQJHrK/1uuPICVnNBtP/QVOq +lafJfg/crRvBmjlUBZcisgXCmjywcvsJ16//PgFW1Z/vnqaeWN3L9VC5nwWq +TzV01pp7YoYCR+DLHhbcrj0cPmThiREJjsVHu1iQ/qJlKtDGEwer01jMTyzw +bs4fjrX3xCYzNR6fZhaIDVh3XvHyxJz9mhy81UQXyql+nUCYO3j00DUWiBzA +JHUmmd9kcvKCIwtW0583rmB54sRQ671D9ixQYVsu56nyxK5R/STczwLbHc53 +2p56YkkfzWjWhgWXVoS/jn3piSp68t3Bu1kg03lX5EUbme/wxCptFii6SGUc +mCd++YkfL0ixQNdtrCBRg4HxBj9Oruyg4HbmRIiVFgNtVHKVotspoLdM6Unp +MDDwrtqGj20UjBnNtxZsZ6DKk59Ome8oyNvIwcneRfZHq/duaKRAeF7MUXwP +2Rc55pNaQ0HfOU2+7KMMTOuVsz5YSMGe59qtPgEMrNb58qa/gIIqjm3ZKkEM +dGME5QfkU5AZoqdZE8rA1dISvkl5FFg5mrj3RzMQJ6qVn1+n4LGi4+ONycQ/ +N8806SIFqVTM4crbxO9y3A3e4xQcVbuiG1HAwC6L0+drYiiwuFPKp1NI8h/8 +qo2NpoD/ysCdR/dIHk/An/kIChKDbYYePmBgicUU82cIBTHrFY9U1JB5Wy9p +9KXA98prv7LPDJzosVCm7CkwFR7YEdzFQI4bZ05l2VGwLpFDSK2H9Ik0V0jY +T8FAsOa90n7CCw/XWOylwN0qe7RkhOz3ecpNWlHgwB3iX/yDgU3lZUPhxhSY +hMgEFkl6oQp1jBWoRUFN9mmzC8u9MN6eze2tScEO9pRihIwXljh61xzQoEBF +6fVHg5VeyNFWeMlKjQLpD9EGn5S80I1tnGGwhYLhbZ2S/JpemJOiMR2sTMF5 +rpwnPnu9sCto+9N+KXL+rYIZlvu9EI/5y/IRPuUcEaxuTzjySO9mSQoiHtis +/eNE5p8qsaLppL83Z/plD6KrOaWsE6NA/ZUH41kQyY+/dLqen4IP6UoCCmle +uHpl0oD4HybcB6FDg+mkT2KWS8AiE06NztTdu0j8fJ3E3vxmgppp3XGdK8TP +10M55RcTUjk8pyyvk756kwLSP5hgHJDzMaKIzG/vLD46ywQ5uTNaevcJW/fV +d84wYeZVwMUlJWTegiZlTThXGSxTywmvTvPQnGbC787O6ptM0q/hxk3RSSY8 +sJAtaHhB8qi7FOcoE87+4OK+9Irw103OiSNM8CgYcndkk/41Z9T4CYsuZcr2 +NZL+oyfPSA0zwY9yOP/9Pcm/HtWI35igsOFyuGI/0ceyHr/pZ8KPD7Et3waI +vl+zgUG4KdFLpXiQvN/Gs9K/+5hwvFtjSHeE6I9V96kSbs9oOWg9TfK0y+wL +ephwYZmYURSnN66+5JLc9IUJrKlO59Al3uimFaEURPhrZ2GwP7c3dqnk7aIR +3vHAMMeDj+iFQ1wHPjNhwC3ip5kY4WTjzD8dpL+FkbgRzRvxEbdBEeHt2uLr +QYLo7yz9nQinCRXZqUsTv1pdU+oT0ZlfSmXXEL35vfD5diZ43yp6IaFA+gyr +1poQTkuL/CKi5I0cptkLnIQHvGlCS9d7Y7xg9EDUR6LTTA6NqJD9fxrYx9uY +wFykxQ2oeWPO1T1nDAj3f+v6t0uD8MyJOj7C26qjalt1yL5IXdXVD0zo87u/ +8gmSPM7Mxw3vmSDsEK35aBeZD/KKzCasa7DbotSQzLemPg4inCrdE3lrtzdW +W71jyhCuXFqclm1G8lO7oyffMaF3PDo/04Kw2PonLwnr1Eu8O2dD2Mu8+jhh +j9Ke4SRbcj9lUiecCZ+7Vsx1Yh/J38ZVp0u4J9hUJdyB5Cktf/GjlQlCLpIm +gU5k3l47uZOwjmnvQd8DpJ/HAfZTwudWxZ51cSPcktuUSriS3yzXwYPsOzMv +HCPcMyv52JZB7o+jrtX9r193b6OFN+l/lrps+dePXTJgfIi8By2rbRthj0ex +v9GX6POMq+v/+uea0bf7kX7dIh3Sf/3PSW3U9Cd5tVezBP76R/Tpbw0k+51c +XxZbmCDIKHVYH0z0SqOcacLa1scDFEJJf2X37m+EPbaZn5YLJ36Ge3O7Caco +Lc+SiiB5kTK97YQfivaXi0URPbLi5jvC3T9LXwnEEL+dCn1v//p/Pd7NfZyc +R9gzr5GwVrP5wp84cr9RoX0NhP8PT4kfmg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "PlotRange" -> {{0, 180}, {0., 5.173380032113415}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7611,7 +14694,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.663943982390173}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7639,7 +14723,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 5.173380032113415}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7647,9 +14732,9 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991337564416748*^9}, + CellChangeTimes->{3.991337564416748*^9, 3.9938318203265543`*^9}, CellLabel-> - "Out[303]=",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] + "Out[139]=",ExpressionUUID->"0fac52d3-eddc-4ca5-893c-327a7ff1179f"] }, Open ]], Cell[CellGroupData[{ @@ -7713,252 +14798,230 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918495265156612`*^9, {3.991849580574194*^9, - 3.9918495807911797`*^9}},ExpressionUUID->"90696e8b-5a2d-314c-8d58-\ -ac84cb8f4d66"], + 3.9918495265156612`*^9, {3.991849580574194*^9, 3.9918495807911797`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.976253354341118`*^-271\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 304, - 297, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337564646551*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.2618589216345966`*^-246\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 61, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.993831820455492*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], +In[140]:=",ExpressionUUID->"fa7d0fe8-ed37-4d0b-b6c2-c15ecb8c7598"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.718150004511881`*^-282\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 304, 298, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646565304`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.950418579154944`*^-254\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 62, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.993831820460239*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], +In[140]:=",ExpressionUUID->"ee465f92-1a3f-4efb-bbac-6fab15861854"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4847193100774497`*^-293\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 304, 299, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646656475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.481005757332195`*^-261\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 63, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.993831820464036*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], +In[140]:=",ExpressionUUID->"d3e5f434-42b3-4bd9-b300-2010b3f4190e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 304, 300, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646736584`*^9}, +during this calculation.\"", 2, 140, 64, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.993831820467662*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], +In[140]:=",ExpressionUUID->"21f9fde5-9023-431b-a7be-d8d7297e6b99"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk4lG8Xx0WyZd/GvoRfhewzjJk5J8qeKGtJ1ihFSpSSNRFpjzZJqJCy +zyBESZLKvkXZk7WILHnn/eu5Ptd1n/Nc9/ec8z23gkfAHm9WFhaWxnUsLP// +/ul7/0YpIYPGxlgmclBsaa2phDPbO6PALZ7a55qqASj6yYPQeR16bihwCqcC +BNtkd7B1pgPhj/ti64PdIDglfv1vRwHcl11ztX9wEPorrAPmOmpg6k/8/hv3 +AsBEafzrbEcziPfaHM6+GQ5/O0i3ZjoGoPtD0yulM1eg1vhJxpf03zB8nLCa +p5IG0v2MEQ+1VbB//7yU6v8ERI4ezOYwZsPCs1rFMnPPYSvH4zobRzbkNbzT +1s6XB5g+MnDHjw0/HImOj9ySB0c7j0mp3WTD7D+m4TmuefBmx7lEm2E2VDFf +PGpTnwdBMnf871xcjwOJIQ2tKS+gpalZW7WRHQPUJgZpyS/hupZJubU9J3pf +ydwuKloAGj3OplRfTkxN+Z3MkCuAxphjLapnOTHadjTFYWsBbOi8+ZPzESfi +y/TLoVAAZ88PStVOcOLaeP7o4cMF4PUh4hwphgu3aVSmDJYXANG7nCpfyI2/ +GDP16vsLoYXv03u+Om4samsJ+e5VCMfpA/arndxIH5gPvOxfCNk83P7d/7hR +KGw/tSmyEOQKnFJvWvDgV8ql0V9PCoFzbf4f5wAPxutJ2db9KoSuFM3qWQFe +bJ4uqImJKoK7LTn8wcq8+Jn/b+pCQhHs4/vv4JIBL1onToq63yqC3miZf6ye +vNhy9Ol78adF8M2fmyJSzIumK56sIh+LYGzHUCnRmQ/7TTBtp2gxLM4kvzj7 +iB9bTDbQzqcWA0NVeG2tmB/3vJhgrc4qhtBDSdYxDfxYVGkpu5hXDCs9MZOJ +v/kxzaLB1rKqGCIG6aKfFAXQ/lLR+bD+Yohpytz7LUgAb1WNpvLLlkBCRvgn +VglBtHonOfD9RglY6B4WEt0kiGH+K8sNd0uA880e+//UBTEg2Pth9qMSiBlU +7rHcLoiKqe3hu16UwDnFxpGbhwUxr7H/hkJDCfinEf6plAli7zOlaNZ/JWB7 +P1/Ncr8QfqcmZWa4loKA2r2AA95CeDuleumAVyk0lccUBAQIYY4YTxPvkVKw +6HHUvxkthJzjytM2p0rBSPKf8dccIawwj5T1TigF3RSL/QErQmjB1uz6trgU +xG8Oxt94IIzmCgYivmx0IKgWxyxmCaNwbN/iYw46SNbEhh94KYxp9UWPO3jo +IDuz5dR/tcIoNfbYWkWEDspWx93Kx4SRJryf112JDjrrV4mDOiJ41za4x8qY +Drr3mrTMqCI4EbU5jN2UDkTtNLXnJiJY4d4xW2xBB7KbsWKIswgqlyw5/rOl +w/aKeF6ecBEMUV7RVnejw+4gsSHtBhGcNj7Nv/4sHWx4xvqSW0TQbs3ThXye +DnvSGV0rvSJIzbt42TeSDg6fXT7VTYugRtmBR7kX6XBA7XHZPlFRPEOKKWi5 +QQe/IY1rUW6ieGxXXnpqNh2Onl2XOHpYFDnqF5v2PqeDv1BLrNVJURT3ZZtn +eUmHExh8TixWFAs3WesaF9PhzP0Kn+wcURTzt8v2qaLDRTtzWvMfUWw3Pdmu +1czUq6hJknWdGAq1/M6/3UqHPGG7BS0eMUzYdpDyq50O7c2uL6/JieFo/9dD +l3vooGQbpGhrJoZKD9n22A3Rgf7y77+IPWJo6EAZ8h+hg5VAeM9LFzE8bfeK +FDFGh5Of4m8KBIrhZqVtahcn6FCz6+GGz3fEcDpX8IrKHPP+z5UG1x6LYa31 +84CFeTqMb8yu0sgTw9+2ZspVC3QQbCw6faVGDH99r5DQWaaDm0XDuPVPMXT1 +iDv+fB0D5p7tfnd+XgwvGg1s12NjwEWutsd5a2KYy79jtXA9A/Lq+134RMRx +WGgD9TYHA1ZN5ps+UsRxQXNGfWojA65mheasmojjiS9f7qvzMUBpA0ucuq04 +Sk9u3OjFzwCrt9zbL3uLY7UqYaFYkAHflK7KvAoQx0lexukvQgw4GSO6NHFG +HIe+2W0YEmbAXWP5QqskcczfYW87JcqAbY8zr5xLEceDwgUiI2IMqGFVPZqb +Lo6Xdy5Nt4oz4MdrPeWNpeJI/XtiKVmCAecUytdRXouj39MajaOSDBCIxD6/ +D+J4lJcST5JigD5aJn/oF0cdklxxoTQDGh9+Prn8Qxw3xTdd9pJhgNuavY3q +nDhypmsnb5Rl6uPao7b/nzj2KIS25jD5YqUbVwInAYsPdJoZyTFAUnZkuEyI +gFr7Lyx8YnJemF/NuDQB3394NWgnz4B2SvBZCy0Cim/sidyhwIAj95cdQw0J +mHrchvyCyavLEbrZOwmY7HuCKqjI1HP/BsHu3QT0K7+ZdITJSuUJk1z7CBhV +za9VzmS6pGCDgRcBb+3DzWybmPqG3s467E/AwV8XQ4yY/K1LKvrOaWb+ICvF +M0w+afDo4PsoAsqbLao+YbJFGt+cZSIBs0hvDjYwWZHjXFzTLQIeJYqKjDD5 +77Ef0rYPCZiu+8pyicmfWx3yW54ScH/YNS4OJQY8NXyz06GAgKTCIzYbmRye +rtXdWU7A2UalTdxMduB66L//LQGFhB7GsDB52/GNbH1NBPQWrwiZZuZj7ziT +7NZJwLxy97V2JvdSR1UHvxNQRemMbCmTizLsqr1/EtCQMdVxhckJPDV2Y3ME +/K5YsM2dyR4nNH4c+UfAIztLlFWZTO66HzbJIYHt1NmqSaY+gsgtdFxQApNc +XVieMXksKyTrl6QE9qjO/XBhchXvMPmUkgSedqKHczH5dtCeTwvqEshbk/Mm +j1kP/54qz1CSBHYfay23YvJOI/XFFZRAwgVD30FmPaWf3U0Mt2Dmt51sPMHk +OX5OBVY7CRQl/51YYtY//euAOYePBKqEHPWbZ/bLmR02ffHHJXAnD+tnHybb +5Lw6sTFUAjN0rFeamf22djrlnuBlCVx2jKPfYPaji4j1pFQhMz7xoXgVs591 +zpZHplYw/zc/LbhIYAD3wGYxhToJDFTbPrmFyYwXbKDSJYHzJ2r3nmbOh5gl +46rmmgRupC2Sq5nzNZmvolzIKYk+Fj+Tq5nz94Zwk6EnJIlL6sPTDAFmf4z4 +D5CVJfFfsUpqMnN+P0cq6e60lMTqCV7bNS4GPBm7Vv/OThLZl2wG33Ey4Pzu +NRcLV0l0vGmfEM/0A3WZ7gu7AyWxvk936yLTLy7Rr3Q4J0siZX0va/QaHXZM +L4X6D0qivs680p7fTD81u7n19YQkfrToZS+ZZfrlI/Vu4T+SWEGgBwvPMPeR +nZsBg1MKG0fyRcuZfjdBf7vAtk0KW3N/ZL0apsONqKtBd05L4az7df4bTH+t +79miNBEphXGhcrHXmP67olvbQkuQwskK7dp4pj8fGp3XHnoghdUmPak+Tcz9 +Y7V/dlutFPr46tK63tJhQFTF/w2vNLocy9BJLqSDeECVjLi4NNqyd9J18pl+ +XO/08bC8NAq161Mb8uhQEpqgxq8jja6MadvhZ3S41D8z7uwkjeTNdwRaH9JB ++1m5z3S6NHrlrwgnX6JDJMXWXVJfBh9ueSD2cT8dzFxTf5GMZPDuVVL2USc6 +8EX8jLa3kkFb0ms6uz0d7tdeyLrqJoNr9+X2KVkz94NF2c8N8czzhUNEEaTD +jNOm4N9dMjjysDCzRpEOrqfmLzWelUUlQVe5sMFSUE42kh6/IItVv0Iy7PtL +mfpdec5xVRYPFrQbb+4phdCVLZ+NMmTR7F7pcHlzKdyKdhVlNMpi7raMHQ9e +l0LjtXcPM2Xk8HOl2ZhVaimQ8+4Una+Sw1bzlcbovaWwo6NpdapeDhlmWm0r +1qVgzbLe9GCzHEbI6lkEWpSC5x7/LhiWw4/89xOstpeCyVmF8Ah2eTTpeDbQ +uK0Ujsv9ebxdVR7/LV+9s8hZCm98Hk7WBsvj2TlOFsmyEji6OBtRz6uAtnY5 +pkECJfBXVaBP3V4RtTdIl8ieLAJKTm7a7dub8EhDV2pKfgHMClm4OdQoIcHm +rQJt8SUMJbo5nOBQQQHyNQV+pTwwnw4xHyb+hxoGt1gqM7JhwpPzZFH4ZmR5 +sM/9OMsT5vtfnPVizRaks6ms7s96DEIfVZJeTm/FS/tzZbnfMt/7cS9siEQ1 +9LNXZuwdvgcpqgYCwj7q+I82LSmjnwwNktv1fl/bhp5zVv82aN0AsnTNVY12 +DTwkJt/K1p0EA5uU+n50a6DozIGrWtVJEK8aq5rRr4EpGR8qA7KSoJNsUUf4 +oYFyJldcZU4mQYhz8/K6FQ2MqpWUo/ImwT7LQJ1xAU2cmdyCl3ZchttxTDsg +aqL0tSuLxKoE4GNLD3KP0kQrldnnuYNxsOFv1d7ZGE3UMpFYXvwQB/+mvmpH +XtTEKooAq2NRHEx3S8ymJWpiYeZ1ObMLcfC54Nqxb7c1USZsy7vV/+Lgukfk +oYM5mhi6/+i2l8cvgliNm9OBVk1c+Pi+bZkvFmQj5SjOKlpI/BR46XRYNOSd +5FT8ulkL97B9ibY9Eg20Q7Mc7qpaGE0pemHgGA0HLGtbfDW10FbFPIKkFQ33 +RX38TpO1sAV11MeGo0AiO+9usrUWuoZq/RHbEwUiLdS/bcFaGMbQ5Q/SiwQu +ZZeSPe+0cInjQteM1Xk4IgEWOe+1MILLW75b4zw08Cr2sTVqYXapT0i30HlI +/DPKXvxZC1XTdDbJd4UBX/1Je/FuLbTXecBfeSgMhPwS5nomtFBFol7VIPYc +SOeXaXsLaePbz7kKrW2hsI0q8SLkgDZeDr1X0VcUAoWbDi+zumkjrTrJccu9 +ENDnZpgmeWhjO9I8EyJDwKjD6VuGjzYOzuok3bIOAYfAFMHmQG3kVh06V/0j +GMIzxYPUYrXx89xGaU+lYPjMK2bwPU8bbfWiCQHZQXCiT6jWgkUHeaXWFHf9 +CYT6OpdX2aw6aGWscMpuMBBkX2SVcrProPuK3ejRz4HQEE7ObeDSwS7h6JXP +2YGgqOBxy0JYB9e9bk31cguEL575PhYqOngp1iTkRdNx0Pyxe6OFlQ42T2r2 +sgUEwPTvRHvzFB0sczmwixTgB72djxwe3NVB5YwvfaW2ftDwqsRx9r4Ocu5s +HN2r6wcZF78533mkg3Zz6vx9f4/APild1x/ZOjhHDgvTjz0Cb416DsW/0kGl +xmHjuceH4d61LaffD+igosnHzJVfPhAXTDsjM6yD/DWD4W87fSB4/97QwFEd +vPhe1flJpQ/YKIedk5jQQSfZtIriSz6wgfE54vC8Dh6yMdFc3uQDgd9C4rk4 +dfHj/T9ahP2HwFSj7q65ui52ula/Eu/xAqcNZnafNXTxmUz4+MBrLzjy9T2v +o7YuCkz71NU/9YKkhI8RXiRdnLmZozEU7AXto62Hwrfr4rX5syaOIl7glTao +XWyvi8FJE48l7TwhSnDdB/nzunjPyKPqzIg73ByLinkSoYtmk6AV8NkdsqrW +07ZF62IOiXHpXJk7NBzjzDeM08V3youpfUnuINjAn+xwXReFMtsXX+m7Q1qU +rGdili7e5o78137VDSp/Gy4vNOniWhDXu5rHrvCosdRj7xdd3BGfrz4W7gox +mToNeS26+DbQgqHt4grmjqp3vDt1Ufzdr0qiqCu0lkmSWr7r4qu2MfaFuAMw +Hvn3RN6cLh57Y/OFEuICYgKl416Selhs097N5r8P/o5p76mW1kP5RA6Va9b7 +oPd1HkNKTg+3HMuhg8Y+eHQyK655kx5u0y+mssw6g1rHLRVU10NRi1+JPMHO +YJQa5CGFeijB6f1SK9YJ/NW0u7946+EbFbGw368c4NSC5NJBXz1cTbiluCnN +Ac7VsElOHdHDlAa3/FNRDpDg1ObMfVwP14esrUWZOsDTmNNdRqF6OMjHfY/c +Yg8DvZWdhUl6mF9xdnxtxg4cLlt23CrVw2u/2Iz+7tgLB5x0FzaV6WGFbH3R +DtW94LVJRrygQg+XpPrG8wT3wknGlEPTaz2cu9+n2N+3B64OX2vf0KiHUc/L +7XJC90ADtbMt5JseGgz4ZnaU2gJ1yqvVmYuIFkuJ6rmmNiBWbppewUPEIe/I +EG4dG5i6uPW4HB8Rz51uso6QtYFUhRmeYSEidg0ZXPP6uRv+2Z01Pi5NxKNs +xnXOFruhqvxaQawGET3ztc5/EbCG7fGVVwvtibgc/VCystISJB0euYo5ETFb +bKFowz1L+KUYo3ZmHxHf1gt8Ox1iCekV5vW0g0QMOu2BXZqWwDrTuvbel8ic +95bkC5kWUOvw0//bWSI+2OIQ7XvbHHYqEXbxphMxr45Hg3rLFIom3yp4ZRAx +wKzSmC3EFJRKT/4pyyLi7MjUuQknU1hv8emhbw4R1ey/fvxPxhRqAmJ/1RYR +MVx2iIP2xARo5XPJoe+IGK9qpNbweicQ93wZGJ0gYqFE/cNA/h2QJRVeSpsm +4vlcx23O88YgOqyWeGuWiC41Ao8O9hjDXEicnvEfIn6xdC6of2IMBQ8gLnWN +iOZ5FeycRsag8eO5ur0QCXl2b22TO2cEmyMuna4hkXA2dKqul307VBhmsluR +SZjN7nfj/CSCzULV9TYKCUXvcZOwDeG0/3zu2HYSxmQnHVfMRKh3cfvOZ0XC +Wr9Dea4mCL4GRIv9biRUTyfnqssAPPv1XWoujoQdbiWdCkcoQMtbeRqWQMIi +T/lPX5ACzYfFiRxJJKxYmX9DF6fA0jcrG8kbJKy7cCV7a50hWHwqjcEHJJxe +77ArWdkQxnMuTybmk9A/77yRy5QBbPU2qFLuJqFg726PoUwSXFG0XoruJaEh +G+PUrgskmOv30BvoI6HbvOK7fi8SVO5LzEkdJKH8g9OHw5VIsMemP1l8knle +N/B+ZiYRzhheOM7Foo81/fafvF/oQb3gF4VJZX0UWFj+c75fB9Q/DbtYbtbH +yI0XCui1OnA9cSn52VZ9/MGzTVXsqQ64cCjxHdLQR+UdbXmGgTowvRK81Kev +j58apS6oseuA2Jh0y2dLfey2pslF6WiDd6VvTFGgPt7xVi4bf6oJU8fGQ3YG +6eNjQma/wxVNOC1z1K89WB+3pG7YMXpKEy6dC9izeFYfi+32CQQZa8JLcrA8 +JVYfG4SLvQOrNWClJLqi9q4+3r8zYnQZt8H1F6lzzbXMfOK/82JPqIL0Qfkx +zzp9FO21rq0xVYVMvvSeuXp9jCclR1BkVIF+LLNGrEkfQ4yMikbrt8JX1dyr ++zr18UW9qZnIpq2w+SlDbWBCH0/sMr8cObAZqtJavWZFDVC+zXL+ToIKfLNS +OBhMMMDpjfzV93xVgOXvMedlSQPcQCya+LRTBYxsOazZ5Q3QzH+LVxOLCtSt +I5Mkthqg3NTQE+kzytDo8ZBrO80AEytinepOKEG30pG8q4cM8MpVrnX34xRh ++XPJU9HDBtgbPNsZ4KcI0mFsj+/6GWB2G4uHv7UiHGi7n5xx3ABVLnU9HhdR +hG8XPkXQQw2w3nu2rOuxAoyO6O79lmSAfm5lhe7v5WHu6dqCRqkBlk3lThp7 +ysKIg0laPMMA3/l3xa4nykLn+stmg+UGeMuDOMLGJQvlbpJ3blcbIHf+Mv3V +CxmIIuiRV98b4AXPjI2iLDIgEHfkXEOvASpyXjjPlysFaj5tLN6sZLzrWtIr +qyEBsqLSzyrXk3F+WstXiUsCBGo9bAkcZPx6r+XIwUEC/JadefSBh4w6ecdf +B6UQoKyd21hblIwCE3X6ouwEMDPBC2v/kZFUIRLya1QMPJVzuO7uIqOUivcm +x2YRCH3rekTFhszUKzik/4UIXPUW+lCwh4y7XRo3P7gsAhWZZxI/OJJRRuPg +yVJzERBRMeNfdWfGS3H7H3wjDHUqwyJuwWQUi7X2oNQKwdbNcvIqD8nY9mTD +Y/1hAcD65oiCR2SMmRN2/1YvAA6+sd9pGWScsmjLK8oVgOink+mOz8gIB7kX +vgcJQO/mCuX4QjLqxjQYmnEIQNIWZ9WJd2QUaQrwkfDlg9mtN4gFM2TcUpBZ +/MCRBzobcafwbzJuv0IrJKrxQLX/1N6geTLyGJ90FVjHA0kF5oHEJTLKEzWd +Y3K4YSuZJbeMzRALsl/re7Nxg4f5MYVaMUMs6Rz/WFnJCa0+phtbKYa4ztXj +QZz7BijnmpfUA0NUTvS5c526AdJz0rfc3m6IPwxSx5slNsDx6VUTJxND3NG4 +w2W+mR14Q4oie3cbIluTLDBM2cEkVmFhyMMQPaqUbVfI64Gesfx9Ps4Qnxy0 +kQszYQWicdCCRYIhhvSpeO/bwgrF3yc2pl02xDMKwkc8N7JCgWwfyeK6Ib65 +Lv5qoXkd5KZUX069Z4hixzQmFD3WQVriBQPTPEOc/M89cXccC8QH8V9LaTFE +lVuqHENDqzRO4bisyTZD3H2The150SotNp+lwqjTEI3pyY5VMau0mKnZkYle +Qxx7l+BXqbxKO+/bStk+YoiV34+tSfqt0E643Bn7sWiI/IGTV+dZl2n7dmxC +Q1kKOsP2W3Fei7TVVk6+WnkKmiS4nHY1WKSleU/1WGyioGxAXuQ5vkXaSCwj +ZN9mCh6gsuy8wlignXi/+8UZbQpaRzV6sgkv0C5Zn5Olm1Cw+l1iUV3zPK3M +qW1FN4CCi6wvnvZF/aYd+FHWUBFIweIuSu/4wd80ltC0lB1BTG4UtNSm/qaZ +3PPTtTtDwdZhE8/AxV+05q/rjp6MpiB3PcMpK/AXbdxjW09+MgV/wIPRe/6z +NKljFxnbqikYGnr28jP5aVrS2iG9hBoK1p3gnVz+OUVjvW6SP/qGGd/rUJ1e +OkUbL2F/lvaegoOyrXU/d0/RylhiUoRaKKh6m3rvQMwkbd/NiJA/wxRMmJPs +sFv5SUspP6NXyUNFv5LBJ47KP2gbrZ3zJfmo+LBqbP/upTFaxDd99RABKq5p +f/uR+GmM5su+qKQpSsUQJ5nxjtAxGml3sEi6LBXFxtr+PmodpbUPnPh9QYuK +J4oktubeHKGJch/N3+VIxQH677Ih4yFahnFY6IwzFStuTfC8kR6iaYclGd9w +oWJv6oz0z/lBmvXMy7ZOdypKBMRf5Xs2SIttn//reZSKwkL6ng+EBmmL6eFG +oZFUvKnv63Li13dat+GNlqwcKsrfUnIqq+2n+Z7KuG+eR8Vg7FjMvNBP+5NX +7D3xkorrn9GW15v104QUOxe0SqiYIvx4VaKpj2bJKSP9qpqKM1xNqpf6v9Iq +WrO8WtqoWL7SPtIp1kuz4KOrB3dS0UQ6KzW1v4fWafr+D6GHeR//kzkfnvbQ +5sp+xrl+o2KTqPtPJ0oPTf2R5vMf41RM6DV3VvPtplV0bw9OnKTixN5z7BK6 +3TQLkb2gMUPFl5vDT/qwdNMOXTz1JWieimebuL+r3O2izVXH3hVfpOKfat/4 +2z5dtKilZM+yJSqOzFB3eut10QR0n6kdWKWiKDvd7zpbFy31WNn82hoV6aek +7WWaO2n/AyCK44Y= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7972,211 +15035,185 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwVlnk4lG8Xx0WyZd/GvoRfhewzjJk5J8qeKGtJ1ihFSpSSNRFpjzZJqJCy +zyBESZLKvkXZk7WILHnn/eu5Ptd1n/Nc9/ec8z23gkfAHm9WFhaWxnUsLP// +/ul7/0YpIYPGxlgmclBsaa2phDPbO6PALZ7a55qqASj6yYPQeR16bihwCqcC +BNtkd7B1pgPhj/ti64PdIDglfv1vRwHcl11ztX9wEPorrAPmOmpg6k/8/hv3 +AsBEafzrbEcziPfaHM6+GQ5/O0i3ZjoGoPtD0yulM1eg1vhJxpf03zB8nLCa +p5IG0v2MEQ+1VbB//7yU6v8ERI4ezOYwZsPCs1rFMnPPYSvH4zobRzbkNbzT +1s6XB5g+MnDHjw0/HImOj9ySB0c7j0mp3WTD7D+m4TmuefBmx7lEm2E2VDFf +PGpTnwdBMnf871xcjwOJIQ2tKS+gpalZW7WRHQPUJgZpyS/hupZJubU9J3pf +ydwuKloAGj3OplRfTkxN+Z3MkCuAxphjLapnOTHadjTFYWsBbOi8+ZPzESfi +y/TLoVAAZ88PStVOcOLaeP7o4cMF4PUh4hwphgu3aVSmDJYXANG7nCpfyI2/ +GDP16vsLoYXv03u+Om4samsJ+e5VCMfpA/arndxIH5gPvOxfCNk83P7d/7hR +KGw/tSmyEOQKnFJvWvDgV8ql0V9PCoFzbf4f5wAPxutJ2db9KoSuFM3qWQFe +bJ4uqImJKoK7LTn8wcq8+Jn/b+pCQhHs4/vv4JIBL1onToq63yqC3miZf6ye +vNhy9Ol78adF8M2fmyJSzIumK56sIh+LYGzHUCnRmQ/7TTBtp2gxLM4kvzj7 +iB9bTDbQzqcWA0NVeG2tmB/3vJhgrc4qhtBDSdYxDfxYVGkpu5hXDCs9MZOJ +v/kxzaLB1rKqGCIG6aKfFAXQ/lLR+bD+Yohpytz7LUgAb1WNpvLLlkBCRvgn +VglBtHonOfD9RglY6B4WEt0kiGH+K8sNd0uA880e+//UBTEg2Pth9qMSiBlU +7rHcLoiKqe3hu16UwDnFxpGbhwUxr7H/hkJDCfinEf6plAli7zOlaNZ/JWB7 +P1/Ncr8QfqcmZWa4loKA2r2AA95CeDuleumAVyk0lccUBAQIYY4YTxPvkVKw +6HHUvxkthJzjytM2p0rBSPKf8dccIawwj5T1TigF3RSL/QErQmjB1uz6trgU +xG8Oxt94IIzmCgYivmx0IKgWxyxmCaNwbN/iYw46SNbEhh94KYxp9UWPO3jo +IDuz5dR/tcIoNfbYWkWEDspWx93Kx4SRJryf112JDjrrV4mDOiJ41za4x8qY +Drr3mrTMqCI4EbU5jN2UDkTtNLXnJiJY4d4xW2xBB7KbsWKIswgqlyw5/rOl +w/aKeF6ecBEMUV7RVnejw+4gsSHtBhGcNj7Nv/4sHWx4xvqSW0TQbs3ThXye +DnvSGV0rvSJIzbt42TeSDg6fXT7VTYugRtmBR7kX6XBA7XHZPlFRPEOKKWi5 +QQe/IY1rUW6ieGxXXnpqNh2Onl2XOHpYFDnqF5v2PqeDv1BLrNVJURT3ZZtn +eUmHExh8TixWFAs3WesaF9PhzP0Kn+wcURTzt8v2qaLDRTtzWvMfUWw3Pdmu +1czUq6hJknWdGAq1/M6/3UqHPGG7BS0eMUzYdpDyq50O7c2uL6/JieFo/9dD +l3vooGQbpGhrJoZKD9n22A3Rgf7y77+IPWJo6EAZ8h+hg5VAeM9LFzE8bfeK +FDFGh5Of4m8KBIrhZqVtahcn6FCz6+GGz3fEcDpX8IrKHPP+z5UG1x6LYa31 +84CFeTqMb8yu0sgTw9+2ZspVC3QQbCw6faVGDH99r5DQWaaDm0XDuPVPMXT1 +iDv+fB0D5p7tfnd+XgwvGg1s12NjwEWutsd5a2KYy79jtXA9A/Lq+134RMRx +WGgD9TYHA1ZN5ps+UsRxQXNGfWojA65mheasmojjiS9f7qvzMUBpA0ucuq04 +Sk9u3OjFzwCrt9zbL3uLY7UqYaFYkAHflK7KvAoQx0lexukvQgw4GSO6NHFG +HIe+2W0YEmbAXWP5QqskcczfYW87JcqAbY8zr5xLEceDwgUiI2IMqGFVPZqb +Lo6Xdy5Nt4oz4MdrPeWNpeJI/XtiKVmCAecUytdRXouj39MajaOSDBCIxD6/ +D+J4lJcST5JigD5aJn/oF0cdklxxoTQDGh9+Prn8Qxw3xTdd9pJhgNuavY3q +nDhypmsnb5Rl6uPao7b/nzj2KIS25jD5YqUbVwInAYsPdJoZyTFAUnZkuEyI +gFr7Lyx8YnJemF/NuDQB3394NWgnz4B2SvBZCy0Cim/sidyhwIAj95cdQw0J +mHrchvyCyavLEbrZOwmY7HuCKqjI1HP/BsHu3QT0K7+ZdITJSuUJk1z7CBhV +za9VzmS6pGCDgRcBb+3DzWybmPqG3s467E/AwV8XQ4yY/K1LKvrOaWb+ICvF +M0w+afDo4PsoAsqbLao+YbJFGt+cZSIBs0hvDjYwWZHjXFzTLQIeJYqKjDD5 +77Ef0rYPCZiu+8pyicmfWx3yW54ScH/YNS4OJQY8NXyz06GAgKTCIzYbmRye +rtXdWU7A2UalTdxMduB66L//LQGFhB7GsDB52/GNbH1NBPQWrwiZZuZj7ziT +7NZJwLxy97V2JvdSR1UHvxNQRemMbCmTizLsqr1/EtCQMdVxhckJPDV2Y3ME +/K5YsM2dyR4nNH4c+UfAIztLlFWZTO66HzbJIYHt1NmqSaY+gsgtdFxQApNc +XVieMXksKyTrl6QE9qjO/XBhchXvMPmUkgSedqKHczH5dtCeTwvqEshbk/Mm +j1kP/54qz1CSBHYfay23YvJOI/XFFZRAwgVD30FmPaWf3U0Mt2Dmt51sPMHk +OX5OBVY7CRQl/51YYtY//euAOYePBKqEHPWbZ/bLmR02ffHHJXAnD+tnHybb +5Lw6sTFUAjN0rFeamf22djrlnuBlCVx2jKPfYPaji4j1pFQhMz7xoXgVs591 +zpZHplYw/zc/LbhIYAD3wGYxhToJDFTbPrmFyYwXbKDSJYHzJ2r3nmbOh5gl +46rmmgRupC2Sq5nzNZmvolzIKYk+Fj+Tq5nz94Zwk6EnJIlL6sPTDAFmf4z4 +D5CVJfFfsUpqMnN+P0cq6e60lMTqCV7bNS4GPBm7Vv/OThLZl2wG33Ey4Pzu +NRcLV0l0vGmfEM/0A3WZ7gu7AyWxvk936yLTLy7Rr3Q4J0siZX0va/QaHXZM +L4X6D0qivs680p7fTD81u7n19YQkfrToZS+ZZfrlI/Vu4T+SWEGgBwvPMPeR +nZsBg1MKG0fyRcuZfjdBf7vAtk0KW3N/ZL0apsONqKtBd05L4az7df4bTH+t +79miNBEphXGhcrHXmP67olvbQkuQwskK7dp4pj8fGp3XHnoghdUmPak+Tcz9 +Y7V/dlutFPr46tK63tJhQFTF/w2vNLocy9BJLqSDeECVjLi4NNqyd9J18pl+ +XO/08bC8NAq161Mb8uhQEpqgxq8jja6MadvhZ3S41D8z7uwkjeTNdwRaH9JB ++1m5z3S6NHrlrwgnX6JDJMXWXVJfBh9ueSD2cT8dzFxTf5GMZPDuVVL2USc6 +8EX8jLa3kkFb0ms6uz0d7tdeyLrqJoNr9+X2KVkz94NF2c8N8czzhUNEEaTD +jNOm4N9dMjjysDCzRpEOrqfmLzWelUUlQVe5sMFSUE42kh6/IItVv0Iy7PtL +mfpdec5xVRYPFrQbb+4phdCVLZ+NMmTR7F7pcHlzKdyKdhVlNMpi7raMHQ9e +l0LjtXcPM2Xk8HOl2ZhVaimQ8+4Una+Sw1bzlcbovaWwo6NpdapeDhlmWm0r +1qVgzbLe9GCzHEbI6lkEWpSC5x7/LhiWw4/89xOstpeCyVmF8Ah2eTTpeDbQ +uK0Ujsv9ebxdVR7/LV+9s8hZCm98Hk7WBsvj2TlOFsmyEji6OBtRz6uAtnY5 +pkECJfBXVaBP3V4RtTdIl8ieLAJKTm7a7dub8EhDV2pKfgHMClm4OdQoIcHm +rQJt8SUMJbo5nOBQQQHyNQV+pTwwnw4xHyb+hxoGt1gqM7JhwpPzZFH4ZmR5 +sM/9OMsT5vtfnPVizRaks6ms7s96DEIfVZJeTm/FS/tzZbnfMt/7cS9siEQ1 +9LNXZuwdvgcpqgYCwj7q+I82LSmjnwwNktv1fl/bhp5zVv82aN0AsnTNVY12 +DTwkJt/K1p0EA5uU+n50a6DozIGrWtVJEK8aq5rRr4EpGR8qA7KSoJNsUUf4 +oYFyJldcZU4mQYhz8/K6FQ2MqpWUo/ImwT7LQJ1xAU2cmdyCl3ZchttxTDsg +aqL0tSuLxKoE4GNLD3KP0kQrldnnuYNxsOFv1d7ZGE3UMpFYXvwQB/+mvmpH +XtTEKooAq2NRHEx3S8ymJWpiYeZ1ObMLcfC54Nqxb7c1USZsy7vV/+Lgukfk +oYM5mhi6/+i2l8cvgliNm9OBVk1c+Pi+bZkvFmQj5SjOKlpI/BR46XRYNOSd +5FT8ulkL97B9ibY9Eg20Q7Mc7qpaGE0pemHgGA0HLGtbfDW10FbFPIKkFQ33 +RX38TpO1sAV11MeGo0AiO+9usrUWuoZq/RHbEwUiLdS/bcFaGMbQ5Q/SiwQu +ZZeSPe+0cInjQteM1Xk4IgEWOe+1MILLW75b4zw08Cr2sTVqYXapT0i30HlI +/DPKXvxZC1XTdDbJd4UBX/1Je/FuLbTXecBfeSgMhPwS5nomtFBFol7VIPYc +SOeXaXsLaePbz7kKrW2hsI0q8SLkgDZeDr1X0VcUAoWbDi+zumkjrTrJccu9 +ENDnZpgmeWhjO9I8EyJDwKjD6VuGjzYOzuok3bIOAYfAFMHmQG3kVh06V/0j +GMIzxYPUYrXx89xGaU+lYPjMK2bwPU8bbfWiCQHZQXCiT6jWgkUHeaXWFHf9 +CYT6OpdX2aw6aGWscMpuMBBkX2SVcrProPuK3ejRz4HQEE7ObeDSwS7h6JXP +2YGgqOBxy0JYB9e9bk31cguEL575PhYqOngp1iTkRdNx0Pyxe6OFlQ42T2r2 +sgUEwPTvRHvzFB0sczmwixTgB72djxwe3NVB5YwvfaW2ftDwqsRx9r4Ocu5s +HN2r6wcZF78533mkg3Zz6vx9f4/APild1x/ZOjhHDgvTjz0Cb416DsW/0kGl +xmHjuceH4d61LaffD+igosnHzJVfPhAXTDsjM6yD/DWD4W87fSB4/97QwFEd +vPhe1flJpQ/YKIedk5jQQSfZtIriSz6wgfE54vC8Dh6yMdFc3uQDgd9C4rk4 +dfHj/T9ahP2HwFSj7q65ui52ula/Eu/xAqcNZnafNXTxmUz4+MBrLzjy9T2v +o7YuCkz71NU/9YKkhI8RXiRdnLmZozEU7AXto62Hwrfr4rX5syaOIl7glTao +XWyvi8FJE48l7TwhSnDdB/nzunjPyKPqzIg73ByLinkSoYtmk6AV8NkdsqrW +07ZF62IOiXHpXJk7NBzjzDeM08V3youpfUnuINjAn+xwXReFMtsXX+m7Q1qU +rGdili7e5o78137VDSp/Gy4vNOniWhDXu5rHrvCosdRj7xdd3BGfrz4W7gox +mToNeS26+DbQgqHt4grmjqp3vDt1Ufzdr0qiqCu0lkmSWr7r4qu2MfaFuAMw +Hvn3RN6cLh57Y/OFEuICYgKl416Selhs097N5r8P/o5p76mW1kP5RA6Va9b7 +oPd1HkNKTg+3HMuhg8Y+eHQyK655kx5u0y+mssw6g1rHLRVU10NRi1+JPMHO +YJQa5CGFeijB6f1SK9YJ/NW0u7946+EbFbGw368c4NSC5NJBXz1cTbiluCnN +Ac7VsElOHdHDlAa3/FNRDpDg1ObMfVwP14esrUWZOsDTmNNdRqF6OMjHfY/c +Yg8DvZWdhUl6mF9xdnxtxg4cLlt23CrVw2u/2Iz+7tgLB5x0FzaV6WGFbH3R +DtW94LVJRrygQg+XpPrG8wT3wknGlEPTaz2cu9+n2N+3B64OX2vf0KiHUc/L +7XJC90ADtbMt5JseGgz4ZnaU2gJ1yqvVmYuIFkuJ6rmmNiBWbppewUPEIe/I +EG4dG5i6uPW4HB8Rz51uso6QtYFUhRmeYSEidg0ZXPP6uRv+2Z01Pi5NxKNs +xnXOFruhqvxaQawGET3ztc5/EbCG7fGVVwvtibgc/VCystISJB0euYo5ETFb +bKFowz1L+KUYo3ZmHxHf1gt8Ox1iCekV5vW0g0QMOu2BXZqWwDrTuvbel8ic +95bkC5kWUOvw0//bWSI+2OIQ7XvbHHYqEXbxphMxr45Hg3rLFIom3yp4ZRAx +wKzSmC3EFJRKT/4pyyLi7MjUuQknU1hv8emhbw4R1ey/fvxPxhRqAmJ/1RYR +MVx2iIP2xARo5XPJoe+IGK9qpNbweicQ93wZGJ0gYqFE/cNA/h2QJRVeSpsm +4vlcx23O88YgOqyWeGuWiC41Ao8O9hjDXEicnvEfIn6xdC6of2IMBQ8gLnWN +iOZ5FeycRsag8eO5ur0QCXl2b22TO2cEmyMuna4hkXA2dKqul307VBhmsluR +SZjN7nfj/CSCzULV9TYKCUXvcZOwDeG0/3zu2HYSxmQnHVfMRKh3cfvOZ0XC +Wr9Dea4mCL4GRIv9biRUTyfnqssAPPv1XWoujoQdbiWdCkcoQMtbeRqWQMIi +T/lPX5ACzYfFiRxJJKxYmX9DF6fA0jcrG8kbJKy7cCV7a50hWHwqjcEHJJxe +77ArWdkQxnMuTybmk9A/77yRy5QBbPU2qFLuJqFg726PoUwSXFG0XoruJaEh +G+PUrgskmOv30BvoI6HbvOK7fi8SVO5LzEkdJKH8g9OHw5VIsMemP1l8knle +N/B+ZiYRzhheOM7Foo81/fafvF/oQb3gF4VJZX0UWFj+c75fB9Q/DbtYbtbH +yI0XCui1OnA9cSn52VZ9/MGzTVXsqQ64cCjxHdLQR+UdbXmGgTowvRK81Kev +j58apS6oseuA2Jh0y2dLfey2pslF6WiDd6VvTFGgPt7xVi4bf6oJU8fGQ3YG +6eNjQma/wxVNOC1z1K89WB+3pG7YMXpKEy6dC9izeFYfi+32CQQZa8JLcrA8 +JVYfG4SLvQOrNWClJLqi9q4+3r8zYnQZt8H1F6lzzbXMfOK/82JPqIL0Qfkx +zzp9FO21rq0xVYVMvvSeuXp9jCclR1BkVIF+LLNGrEkfQ4yMikbrt8JX1dyr ++zr18UW9qZnIpq2w+SlDbWBCH0/sMr8cObAZqtJavWZFDVC+zXL+ToIKfLNS +OBhMMMDpjfzV93xVgOXvMedlSQPcQCya+LRTBYxsOazZ5Q3QzH+LVxOLCtSt +I5Mkthqg3NTQE+kzytDo8ZBrO80AEytinepOKEG30pG8q4cM8MpVrnX34xRh ++XPJU9HDBtgbPNsZ4KcI0mFsj+/6GWB2G4uHv7UiHGi7n5xx3ABVLnU9HhdR +hG8XPkXQQw2w3nu2rOuxAoyO6O79lmSAfm5lhe7v5WHu6dqCRqkBlk3lThp7 +ysKIg0laPMMA3/l3xa4nykLn+stmg+UGeMuDOMLGJQvlbpJ3blcbIHf+Mv3V +CxmIIuiRV98b4AXPjI2iLDIgEHfkXEOvASpyXjjPlysFaj5tLN6sZLzrWtIr +qyEBsqLSzyrXk3F+WstXiUsCBGo9bAkcZPx6r+XIwUEC/JadefSBh4w6ecdf +B6UQoKyd21hblIwCE3X6ouwEMDPBC2v/kZFUIRLya1QMPJVzuO7uIqOUivcm +x2YRCH3rekTFhszUKzik/4UIXPUW+lCwh4y7XRo3P7gsAhWZZxI/OJJRRuPg +yVJzERBRMeNfdWfGS3H7H3wjDHUqwyJuwWQUi7X2oNQKwdbNcvIqD8nY9mTD +Y/1hAcD65oiCR2SMmRN2/1YvAA6+sd9pGWScsmjLK8oVgOink+mOz8gIB7kX +vgcJQO/mCuX4QjLqxjQYmnEIQNIWZ9WJd2QUaQrwkfDlg9mtN4gFM2TcUpBZ +/MCRBzobcafwbzJuv0IrJKrxQLX/1N6geTLyGJ90FVjHA0kF5oHEJTLKEzWd +Y3K4YSuZJbeMzRALsl/re7Nxg4f5MYVaMUMs6Rz/WFnJCa0+phtbKYa4ztXj +QZz7BijnmpfUA0NUTvS5c526AdJz0rfc3m6IPwxSx5slNsDx6VUTJxND3NG4 +w2W+mR14Q4oie3cbIluTLDBM2cEkVmFhyMMQPaqUbVfI64Gesfx9Ps4Qnxy0 +kQszYQWicdCCRYIhhvSpeO/bwgrF3yc2pl02xDMKwkc8N7JCgWwfyeK6Ib65 +Lv5qoXkd5KZUX069Z4hixzQmFD3WQVriBQPTPEOc/M89cXccC8QH8V9LaTFE +lVuqHENDqzRO4bisyTZD3H2The150SotNp+lwqjTEI3pyY5VMau0mKnZkYle +Qxx7l+BXqbxKO+/bStk+YoiV34+tSfqt0E643Bn7sWiI/IGTV+dZl2n7dmxC +Q1kKOsP2W3Fei7TVVk6+WnkKmiS4nHY1WKSleU/1WGyioGxAXuQ5vkXaSCwj +ZN9mCh6gsuy8wlignXi/+8UZbQpaRzV6sgkv0C5Zn5Olm1Cw+l1iUV3zPK3M +qW1FN4CCi6wvnvZF/aYd+FHWUBFIweIuSu/4wd80ltC0lB1BTG4UtNSm/qaZ +3PPTtTtDwdZhE8/AxV+05q/rjp6MpiB3PcMpK/AXbdxjW09+MgV/wIPRe/6z +NKljFxnbqikYGnr28jP5aVrS2iG9hBoK1p3gnVz+OUVjvW6SP/qGGd/rUJ1e +OkUbL2F/lvaegoOyrXU/d0/RylhiUoRaKKh6m3rvQMwkbd/NiJA/wxRMmJPs +sFv5SUspP6NXyUNFv5LBJ47KP2gbrZ3zJfmo+LBqbP/upTFaxDd99RABKq5p +f/uR+GmM5su+qKQpSsUQJ5nxjtAxGml3sEi6LBXFxtr+PmodpbUPnPh9QYuK +J4oktubeHKGJch/N3+VIxQH677Ih4yFahnFY6IwzFStuTfC8kR6iaYclGd9w +oWJv6oz0z/lBmvXMy7ZOdypKBMRf5Xs2SIttn//reZSKwkL6ng+EBmmL6eFG +oZFUvKnv63Li13dat+GNlqwcKsrfUnIqq+2n+Z7KuG+eR8Vg7FjMvNBP+5NX +7D3xkorrn9GW15v104QUOxe0SqiYIvx4VaKpj2bJKSP9qpqKM1xNqpf6v9Iq +WrO8WtqoWL7SPtIp1kuz4KOrB3dS0UQ6KzW1v4fWafr+D6GHeR//kzkfnvbQ +5sp+xrl+o2KTqPtPJ0oPTf2R5vMf41RM6DV3VvPtplV0bw9OnKTixN5z7BK6 +3TQLkb2gMUPFl5vDT/qwdNMOXTz1JWieimebuL+r3O2izVXH3hVfpOKfat/4 +2z5dtKilZM+yJSqOzFB3eut10QR0n6kdWKWiKDvd7zpbFy31WNn82hoV6aek +7WWaO2n/AyCK44Y= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.09820630038548193}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8188,19 +15225,19 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.09820630038548193}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8214,210 +15251,184 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwVlnk4lG8Xx0WyZd/GvoRfhewzjJk5J8qeKGtJ1ihFSpSSNRFpjzZJqJCy +zyBESZLKvkXZk7WILHnn/eu5Ptd1n/Nc9/ec8z23gkfAHm9WFhaWxnUsLP// +/ul7/0YpIYPGxlgmclBsaa2phDPbO6PALZ7a55qqASj6yYPQeR16bihwCqcC +BNtkd7B1pgPhj/ti64PdIDglfv1vRwHcl11ztX9wEPorrAPmOmpg6k/8/hv3 +AsBEafzrbEcziPfaHM6+GQ5/O0i3ZjoGoPtD0yulM1eg1vhJxpf03zB8nLCa +p5IG0v2MEQ+1VbB//7yU6v8ERI4ezOYwZsPCs1rFMnPPYSvH4zobRzbkNbzT +1s6XB5g+MnDHjw0/HImOj9ySB0c7j0mp3WTD7D+m4TmuefBmx7lEm2E2VDFf +PGpTnwdBMnf871xcjwOJIQ2tKS+gpalZW7WRHQPUJgZpyS/hupZJubU9J3pf +ydwuKloAGj3OplRfTkxN+Z3MkCuAxphjLapnOTHadjTFYWsBbOi8+ZPzESfi +y/TLoVAAZ88PStVOcOLaeP7o4cMF4PUh4hwphgu3aVSmDJYXANG7nCpfyI2/ +GDP16vsLoYXv03u+Om4samsJ+e5VCMfpA/arndxIH5gPvOxfCNk83P7d/7hR +KGw/tSmyEOQKnFJvWvDgV8ql0V9PCoFzbf4f5wAPxutJ2db9KoSuFM3qWQFe +bJ4uqImJKoK7LTn8wcq8+Jn/b+pCQhHs4/vv4JIBL1onToq63yqC3miZf6ye +vNhy9Ol78adF8M2fmyJSzIumK56sIh+LYGzHUCnRmQ/7TTBtp2gxLM4kvzj7 +iB9bTDbQzqcWA0NVeG2tmB/3vJhgrc4qhtBDSdYxDfxYVGkpu5hXDCs9MZOJ +v/kxzaLB1rKqGCIG6aKfFAXQ/lLR+bD+Yohpytz7LUgAb1WNpvLLlkBCRvgn +VglBtHonOfD9RglY6B4WEt0kiGH+K8sNd0uA880e+//UBTEg2Pth9qMSiBlU +7rHcLoiKqe3hu16UwDnFxpGbhwUxr7H/hkJDCfinEf6plAli7zOlaNZ/JWB7 +P1/Ncr8QfqcmZWa4loKA2r2AA95CeDuleumAVyk0lccUBAQIYY4YTxPvkVKw +6HHUvxkthJzjytM2p0rBSPKf8dccIawwj5T1TigF3RSL/QErQmjB1uz6trgU +xG8Oxt94IIzmCgYivmx0IKgWxyxmCaNwbN/iYw46SNbEhh94KYxp9UWPO3jo +IDuz5dR/tcIoNfbYWkWEDspWx93Kx4SRJryf112JDjrrV4mDOiJ41za4x8qY +Drr3mrTMqCI4EbU5jN2UDkTtNLXnJiJY4d4xW2xBB7KbsWKIswgqlyw5/rOl +w/aKeF6ecBEMUV7RVnejw+4gsSHtBhGcNj7Nv/4sHWx4xvqSW0TQbs3ThXye +DnvSGV0rvSJIzbt42TeSDg6fXT7VTYugRtmBR7kX6XBA7XHZPlFRPEOKKWi5 +QQe/IY1rUW6ieGxXXnpqNh2Onl2XOHpYFDnqF5v2PqeDv1BLrNVJURT3ZZtn +eUmHExh8TixWFAs3WesaF9PhzP0Kn+wcURTzt8v2qaLDRTtzWvMfUWw3Pdmu +1czUq6hJknWdGAq1/M6/3UqHPGG7BS0eMUzYdpDyq50O7c2uL6/JieFo/9dD +l3vooGQbpGhrJoZKD9n22A3Rgf7y77+IPWJo6EAZ8h+hg5VAeM9LFzE8bfeK +FDFGh5Of4m8KBIrhZqVtahcn6FCz6+GGz3fEcDpX8IrKHPP+z5UG1x6LYa31 +84CFeTqMb8yu0sgTw9+2ZspVC3QQbCw6faVGDH99r5DQWaaDm0XDuPVPMXT1 +iDv+fB0D5p7tfnd+XgwvGg1s12NjwEWutsd5a2KYy79jtXA9A/Lq+134RMRx +WGgD9TYHA1ZN5ps+UsRxQXNGfWojA65mheasmojjiS9f7qvzMUBpA0ucuq04 +Sk9u3OjFzwCrt9zbL3uLY7UqYaFYkAHflK7KvAoQx0lexukvQgw4GSO6NHFG +HIe+2W0YEmbAXWP5QqskcczfYW87JcqAbY8zr5xLEceDwgUiI2IMqGFVPZqb +Lo6Xdy5Nt4oz4MdrPeWNpeJI/XtiKVmCAecUytdRXouj39MajaOSDBCIxD6/ +D+J4lJcST5JigD5aJn/oF0cdklxxoTQDGh9+Prn8Qxw3xTdd9pJhgNuavY3q +nDhypmsnb5Rl6uPao7b/nzj2KIS25jD5YqUbVwInAYsPdJoZyTFAUnZkuEyI +gFr7Lyx8YnJemF/NuDQB3394NWgnz4B2SvBZCy0Cim/sidyhwIAj95cdQw0J +mHrchvyCyavLEbrZOwmY7HuCKqjI1HP/BsHu3QT0K7+ZdITJSuUJk1z7CBhV +za9VzmS6pGCDgRcBb+3DzWybmPqG3s467E/AwV8XQ4yY/K1LKvrOaWb+ICvF +M0w+afDo4PsoAsqbLao+YbJFGt+cZSIBs0hvDjYwWZHjXFzTLQIeJYqKjDD5 +77Ef0rYPCZiu+8pyicmfWx3yW54ScH/YNS4OJQY8NXyz06GAgKTCIzYbmRye +rtXdWU7A2UalTdxMduB66L//LQGFhB7GsDB52/GNbH1NBPQWrwiZZuZj7ziT +7NZJwLxy97V2JvdSR1UHvxNQRemMbCmTizLsqr1/EtCQMdVxhckJPDV2Y3ME +/K5YsM2dyR4nNH4c+UfAIztLlFWZTO66HzbJIYHt1NmqSaY+gsgtdFxQApNc +XVieMXksKyTrl6QE9qjO/XBhchXvMPmUkgSedqKHczH5dtCeTwvqEshbk/Mm +j1kP/54qz1CSBHYfay23YvJOI/XFFZRAwgVD30FmPaWf3U0Mt2Dmt51sPMHk +OX5OBVY7CRQl/51YYtY//euAOYePBKqEHPWbZ/bLmR02ffHHJXAnD+tnHybb +5Lw6sTFUAjN0rFeamf22djrlnuBlCVx2jKPfYPaji4j1pFQhMz7xoXgVs591 +zpZHplYw/zc/LbhIYAD3wGYxhToJDFTbPrmFyYwXbKDSJYHzJ2r3nmbOh5gl +46rmmgRupC2Sq5nzNZmvolzIKYk+Fj+Tq5nz94Zwk6EnJIlL6sPTDAFmf4z4 +D5CVJfFfsUpqMnN+P0cq6e60lMTqCV7bNS4GPBm7Vv/OThLZl2wG33Ey4Pzu +NRcLV0l0vGmfEM/0A3WZ7gu7AyWxvk936yLTLy7Rr3Q4J0siZX0va/QaHXZM +L4X6D0qivs680p7fTD81u7n19YQkfrToZS+ZZfrlI/Vu4T+SWEGgBwvPMPeR +nZsBg1MKG0fyRcuZfjdBf7vAtk0KW3N/ZL0apsONqKtBd05L4az7df4bTH+t +79miNBEphXGhcrHXmP67olvbQkuQwskK7dp4pj8fGp3XHnoghdUmPak+Tcz9 +Y7V/dlutFPr46tK63tJhQFTF/w2vNLocy9BJLqSDeECVjLi4NNqyd9J18pl+ +XO/08bC8NAq161Mb8uhQEpqgxq8jja6MadvhZ3S41D8z7uwkjeTNdwRaH9JB ++1m5z3S6NHrlrwgnX6JDJMXWXVJfBh9ueSD2cT8dzFxTf5GMZPDuVVL2USc6 +8EX8jLa3kkFb0ms6uz0d7tdeyLrqJoNr9+X2KVkz94NF2c8N8czzhUNEEaTD +jNOm4N9dMjjysDCzRpEOrqfmLzWelUUlQVe5sMFSUE42kh6/IItVv0Iy7PtL +mfpdec5xVRYPFrQbb+4phdCVLZ+NMmTR7F7pcHlzKdyKdhVlNMpi7raMHQ9e +l0LjtXcPM2Xk8HOl2ZhVaimQ8+4Una+Sw1bzlcbovaWwo6NpdapeDhlmWm0r +1qVgzbLe9GCzHEbI6lkEWpSC5x7/LhiWw4/89xOstpeCyVmF8Ah2eTTpeDbQ +uK0Ujsv9ebxdVR7/LV+9s8hZCm98Hk7WBsvj2TlOFsmyEji6OBtRz6uAtnY5 +pkECJfBXVaBP3V4RtTdIl8ieLAJKTm7a7dub8EhDV2pKfgHMClm4OdQoIcHm +rQJt8SUMJbo5nOBQQQHyNQV+pTwwnw4xHyb+hxoGt1gqM7JhwpPzZFH4ZmR5 +sM/9OMsT5vtfnPVizRaks6ms7s96DEIfVZJeTm/FS/tzZbnfMt/7cS9siEQ1 +9LNXZuwdvgcpqgYCwj7q+I82LSmjnwwNktv1fl/bhp5zVv82aN0AsnTNVY12 +DTwkJt/K1p0EA5uU+n50a6DozIGrWtVJEK8aq5rRr4EpGR8qA7KSoJNsUUf4 +oYFyJldcZU4mQYhz8/K6FQ2MqpWUo/ImwT7LQJ1xAU2cmdyCl3ZchttxTDsg +aqL0tSuLxKoE4GNLD3KP0kQrldnnuYNxsOFv1d7ZGE3UMpFYXvwQB/+mvmpH +XtTEKooAq2NRHEx3S8ymJWpiYeZ1ObMLcfC54Nqxb7c1USZsy7vV/+Lgukfk +oYM5mhi6/+i2l8cvgliNm9OBVk1c+Pi+bZkvFmQj5SjOKlpI/BR46XRYNOSd +5FT8ulkL97B9ibY9Eg20Q7Mc7qpaGE0pemHgGA0HLGtbfDW10FbFPIKkFQ33 +RX38TpO1sAV11MeGo0AiO+9usrUWuoZq/RHbEwUiLdS/bcFaGMbQ5Q/SiwQu +ZZeSPe+0cInjQteM1Xk4IgEWOe+1MILLW75b4zw08Cr2sTVqYXapT0i30HlI +/DPKXvxZC1XTdDbJd4UBX/1Je/FuLbTXecBfeSgMhPwS5nomtFBFol7VIPYc +SOeXaXsLaePbz7kKrW2hsI0q8SLkgDZeDr1X0VcUAoWbDi+zumkjrTrJccu9 +ENDnZpgmeWhjO9I8EyJDwKjD6VuGjzYOzuok3bIOAYfAFMHmQG3kVh06V/0j +GMIzxYPUYrXx89xGaU+lYPjMK2bwPU8bbfWiCQHZQXCiT6jWgkUHeaXWFHf9 +CYT6OpdX2aw6aGWscMpuMBBkX2SVcrProPuK3ejRz4HQEE7ObeDSwS7h6JXP +2YGgqOBxy0JYB9e9bk31cguEL575PhYqOngp1iTkRdNx0Pyxe6OFlQ42T2r2 +sgUEwPTvRHvzFB0sczmwixTgB72djxwe3NVB5YwvfaW2ftDwqsRx9r4Ocu5s +HN2r6wcZF78533mkg3Zz6vx9f4/APild1x/ZOjhHDgvTjz0Cb416DsW/0kGl +xmHjuceH4d61LaffD+igosnHzJVfPhAXTDsjM6yD/DWD4W87fSB4/97QwFEd +vPhe1flJpQ/YKIedk5jQQSfZtIriSz6wgfE54vC8Dh6yMdFc3uQDgd9C4rk4 +dfHj/T9ahP2HwFSj7q65ui52ula/Eu/xAqcNZnafNXTxmUz4+MBrLzjy9T2v +o7YuCkz71NU/9YKkhI8RXiRdnLmZozEU7AXto62Hwrfr4rX5syaOIl7glTao +XWyvi8FJE48l7TwhSnDdB/nzunjPyKPqzIg73ByLinkSoYtmk6AV8NkdsqrW +07ZF62IOiXHpXJk7NBzjzDeM08V3youpfUnuINjAn+xwXReFMtsXX+m7Q1qU +rGdili7e5o78137VDSp/Gy4vNOniWhDXu5rHrvCosdRj7xdd3BGfrz4W7gox +mToNeS26+DbQgqHt4grmjqp3vDt1Ufzdr0qiqCu0lkmSWr7r4qu2MfaFuAMw +Hvn3RN6cLh57Y/OFEuICYgKl416Selhs097N5r8P/o5p76mW1kP5RA6Va9b7 +oPd1HkNKTg+3HMuhg8Y+eHQyK655kx5u0y+mssw6g1rHLRVU10NRi1+JPMHO +YJQa5CGFeijB6f1SK9YJ/NW0u7946+EbFbGw368c4NSC5NJBXz1cTbiluCnN +Ac7VsElOHdHDlAa3/FNRDpDg1ObMfVwP14esrUWZOsDTmNNdRqF6OMjHfY/c +Yg8DvZWdhUl6mF9xdnxtxg4cLlt23CrVw2u/2Iz+7tgLB5x0FzaV6WGFbH3R +DtW94LVJRrygQg+XpPrG8wT3wknGlEPTaz2cu9+n2N+3B64OX2vf0KiHUc/L +7XJC90ADtbMt5JseGgz4ZnaU2gJ1yqvVmYuIFkuJ6rmmNiBWbppewUPEIe/I +EG4dG5i6uPW4HB8Rz51uso6QtYFUhRmeYSEidg0ZXPP6uRv+2Z01Pi5NxKNs +xnXOFruhqvxaQawGET3ztc5/EbCG7fGVVwvtibgc/VCystISJB0euYo5ETFb +bKFowz1L+KUYo3ZmHxHf1gt8Ox1iCekV5vW0g0QMOu2BXZqWwDrTuvbel8ic +95bkC5kWUOvw0//bWSI+2OIQ7XvbHHYqEXbxphMxr45Hg3rLFIom3yp4ZRAx +wKzSmC3EFJRKT/4pyyLi7MjUuQknU1hv8emhbw4R1ey/fvxPxhRqAmJ/1RYR +MVx2iIP2xARo5XPJoe+IGK9qpNbweicQ93wZGJ0gYqFE/cNA/h2QJRVeSpsm +4vlcx23O88YgOqyWeGuWiC41Ao8O9hjDXEicnvEfIn6xdC6of2IMBQ8gLnWN +iOZ5FeycRsag8eO5ur0QCXl2b22TO2cEmyMuna4hkXA2dKqul307VBhmsluR +SZjN7nfj/CSCzULV9TYKCUXvcZOwDeG0/3zu2HYSxmQnHVfMRKh3cfvOZ0XC +Wr9Dea4mCL4GRIv9biRUTyfnqssAPPv1XWoujoQdbiWdCkcoQMtbeRqWQMIi +T/lPX5ACzYfFiRxJJKxYmX9DF6fA0jcrG8kbJKy7cCV7a50hWHwqjcEHJJxe +77ArWdkQxnMuTybmk9A/77yRy5QBbPU2qFLuJqFg726PoUwSXFG0XoruJaEh +G+PUrgskmOv30BvoI6HbvOK7fi8SVO5LzEkdJKH8g9OHw5VIsMemP1l8knle +N/B+ZiYRzhheOM7Foo81/fafvF/oQb3gF4VJZX0UWFj+c75fB9Q/DbtYbtbH +yI0XCui1OnA9cSn52VZ9/MGzTVXsqQ64cCjxHdLQR+UdbXmGgTowvRK81Kev +j58apS6oseuA2Jh0y2dLfey2pslF6WiDd6VvTFGgPt7xVi4bf6oJU8fGQ3YG +6eNjQma/wxVNOC1z1K89WB+3pG7YMXpKEy6dC9izeFYfi+32CQQZa8JLcrA8 +JVYfG4SLvQOrNWClJLqi9q4+3r8zYnQZt8H1F6lzzbXMfOK/82JPqIL0Qfkx +zzp9FO21rq0xVYVMvvSeuXp9jCclR1BkVIF+LLNGrEkfQ4yMikbrt8JX1dyr ++zr18UW9qZnIpq2w+SlDbWBCH0/sMr8cObAZqtJavWZFDVC+zXL+ToIKfLNS +OBhMMMDpjfzV93xVgOXvMedlSQPcQCya+LRTBYxsOazZ5Q3QzH+LVxOLCtSt +I5Mkthqg3NTQE+kzytDo8ZBrO80AEytinepOKEG30pG8q4cM8MpVrnX34xRh ++XPJU9HDBtgbPNsZ4KcI0mFsj+/6GWB2G4uHv7UiHGi7n5xx3ABVLnU9HhdR +hG8XPkXQQw2w3nu2rOuxAoyO6O79lmSAfm5lhe7v5WHu6dqCRqkBlk3lThp7 +ysKIg0laPMMA3/l3xa4nykLn+stmg+UGeMuDOMLGJQvlbpJ3blcbIHf+Mv3V +CxmIIuiRV98b4AXPjI2iLDIgEHfkXEOvASpyXjjPlysFaj5tLN6sZLzrWtIr +qyEBsqLSzyrXk3F+WstXiUsCBGo9bAkcZPx6r+XIwUEC/JadefSBh4w6ecdf +B6UQoKyd21hblIwCE3X6ouwEMDPBC2v/kZFUIRLya1QMPJVzuO7uIqOUivcm +x2YRCH3rekTFhszUKzik/4UIXPUW+lCwh4y7XRo3P7gsAhWZZxI/OJJRRuPg +yVJzERBRMeNfdWfGS3H7H3wjDHUqwyJuwWQUi7X2oNQKwdbNcvIqD8nY9mTD +Y/1hAcD65oiCR2SMmRN2/1YvAA6+sd9pGWScsmjLK8oVgOink+mOz8gIB7kX +vgcJQO/mCuX4QjLqxjQYmnEIQNIWZ9WJd2QUaQrwkfDlg9mtN4gFM2TcUpBZ +/MCRBzobcafwbzJuv0IrJKrxQLX/1N6geTLyGJ90FVjHA0kF5oHEJTLKEzWd +Y3K4YSuZJbeMzRALsl/re7Nxg4f5MYVaMUMs6Rz/WFnJCa0+phtbKYa4ztXj +QZz7BijnmpfUA0NUTvS5c526AdJz0rfc3m6IPwxSx5slNsDx6VUTJxND3NG4 +w2W+mR14Q4oie3cbIluTLDBM2cEkVmFhyMMQPaqUbVfI64Gesfx9Ps4Qnxy0 +kQszYQWicdCCRYIhhvSpeO/bwgrF3yc2pl02xDMKwkc8N7JCgWwfyeK6Ib65 +Lv5qoXkd5KZUX069Z4hixzQmFD3WQVriBQPTPEOc/M89cXccC8QH8V9LaTFE +lVuqHENDqzRO4bisyTZD3H2The150SotNp+lwqjTEI3pyY5VMau0mKnZkYle +Qxx7l+BXqbxKO+/bStk+YoiV34+tSfqt0E643Bn7sWiI/IGTV+dZl2n7dmxC +Q1kKOsP2W3Fei7TVVk6+WnkKmiS4nHY1WKSleU/1WGyioGxAXuQ5vkXaSCwj +ZN9mCh6gsuy8wlignXi/+8UZbQpaRzV6sgkv0C5Zn5Olm1Cw+l1iUV3zPK3M +qW1FN4CCi6wvnvZF/aYd+FHWUBFIweIuSu/4wd80ltC0lB1BTG4UtNSm/qaZ +3PPTtTtDwdZhE8/AxV+05q/rjp6MpiB3PcMpK/AXbdxjW09+MgV/wIPRe/6z +NKljFxnbqikYGnr28jP5aVrS2iG9hBoK1p3gnVz+OUVjvW6SP/qGGd/rUJ1e +OkUbL2F/lvaegoOyrXU/d0/RylhiUoRaKKh6m3rvQMwkbd/NiJA/wxRMmJPs +sFv5SUspP6NXyUNFv5LBJ47KP2gbrZ3zJfmo+LBqbP/upTFaxDd99RABKq5p +f/uR+GmM5su+qKQpSsUQJ5nxjtAxGml3sEi6LBXFxtr+PmodpbUPnPh9QYuK +J4oktubeHKGJch/N3+VIxQH677Ih4yFahnFY6IwzFStuTfC8kR6iaYclGd9w +oWJv6oz0z/lBmvXMy7ZOdypKBMRf5Xs2SIttn//reZSKwkL6ng+EBmmL6eFG +oZFUvKnv63Li13dat+GNlqwcKsrfUnIqq+2n+Z7KuG+eR8Vg7FjMvNBP+5NX +7D3xkorrn9GW15v104QUOxe0SqiYIvx4VaKpj2bJKSP9qpqKM1xNqpf6v9Iq +WrO8WtqoWL7SPtIp1kuz4KOrB3dS0UQ6KzW1v4fWafr+D6GHeR//kzkfnvbQ +5sp+xrl+o2KTqPtPJ0oPTf2R5vMf41RM6DV3VvPtplV0bw9OnKTixN5z7BK6 +3TQLkb2gMUPFl5vDT/qwdNMOXTz1JWieimebuL+r3O2izVXH3hVfpOKfat/4 +2z5dtKilZM+yJSqOzFB3eut10QR0n6kdWKWiKDvd7zpbFy31WNn82hoV6aek +7WWaO2n/AyCK44Y= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.09820630038548193}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8428,6 +15439,7 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8455,7 +15467,8 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.22160540372702894`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09820630038548193}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8463,17 +15476,775 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913381496467495`*^9}, + CellChangeTimes->{3.9913381496467495`*^9, 3.993832606631133*^9}, CellLabel-> - "Out[304]=",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] + "Out[140]=",ExpressionUUID->"5abd9672-b672-4c28-88b5-45ad2367318c"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ea848967-083d-ea47-bce0-\ -5c3b93725916"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk4lG8Xx0WyZd/GvoRfhewzjJk5J8qeKGtJ1ihFSpSSNRFpjzZJqJCy +zyBESZLKvkXZk7WILHnn/eu5Ptd1n/Nc9/ec8z23gkfAHm9WFhaWxnUsLP// +/ul7/0YpIYPGxlgmclBsaa2phDPbO6PALZ7a55qqASj6yYPQeR16bihwCqcC +BNtkd7B1pgPhj/ti64PdIDglfv1vRwHcl11ztX9wEPorrAPmOmpg6k/8/hv3 +AsBEafzrbEcziPfaHM6+GQ5/O0i3ZjoGoPtD0yulM1eg1vhJxpf03zB8nLCa +p5IG0v2MEQ+1VbB//7yU6v8ERI4ezOYwZsPCs1rFMnPPYSvH4zobRzbkNbzT +1s6XB5g+MnDHjw0/HImOj9ySB0c7j0mp3WTD7D+m4TmuefBmx7lEm2E2VDFf +PGpTnwdBMnf871xcjwOJIQ2tKS+gpalZW7WRHQPUJgZpyS/hupZJubU9J3pf +ydwuKloAGj3OplRfTkxN+Z3MkCuAxphjLapnOTHadjTFYWsBbOi8+ZPzESfi +y/TLoVAAZ88PStVOcOLaeP7o4cMF4PUh4hwphgu3aVSmDJYXANG7nCpfyI2/ +GDP16vsLoYXv03u+Om4samsJ+e5VCMfpA/arndxIH5gPvOxfCNk83P7d/7hR +KGw/tSmyEOQKnFJvWvDgV8ql0V9PCoFzbf4f5wAPxutJ2db9KoSuFM3qWQFe +bJ4uqImJKoK7LTn8wcq8+Jn/b+pCQhHs4/vv4JIBL1onToq63yqC3miZf6ye +vNhy9Ol78adF8M2fmyJSzIumK56sIh+LYGzHUCnRmQ/7TTBtp2gxLM4kvzj7 +iB9bTDbQzqcWA0NVeG2tmB/3vJhgrc4qhtBDSdYxDfxYVGkpu5hXDCs9MZOJ +v/kxzaLB1rKqGCIG6aKfFAXQ/lLR+bD+Yohpytz7LUgAb1WNpvLLlkBCRvgn +VglBtHonOfD9RglY6B4WEt0kiGH+K8sNd0uA880e+//UBTEg2Pth9qMSiBlU +7rHcLoiKqe3hu16UwDnFxpGbhwUxr7H/hkJDCfinEf6plAli7zOlaNZ/JWB7 +P1/Ncr8QfqcmZWa4loKA2r2AA95CeDuleumAVyk0lccUBAQIYY4YTxPvkVKw +6HHUvxkthJzjytM2p0rBSPKf8dccIawwj5T1TigF3RSL/QErQmjB1uz6trgU +xG8Oxt94IIzmCgYivmx0IKgWxyxmCaNwbN/iYw46SNbEhh94KYxp9UWPO3jo +IDuz5dR/tcIoNfbYWkWEDspWx93Kx4SRJryf112JDjrrV4mDOiJ41za4x8qY +Drr3mrTMqCI4EbU5jN2UDkTtNLXnJiJY4d4xW2xBB7KbsWKIswgqlyw5/rOl +w/aKeF6ecBEMUV7RVnejw+4gsSHtBhGcNj7Nv/4sHWx4xvqSW0TQbs3ThXye +DnvSGV0rvSJIzbt42TeSDg6fXT7VTYugRtmBR7kX6XBA7XHZPlFRPEOKKWi5 +QQe/IY1rUW6ieGxXXnpqNh2Onl2XOHpYFDnqF5v2PqeDv1BLrNVJURT3ZZtn +eUmHExh8TixWFAs3WesaF9PhzP0Kn+wcURTzt8v2qaLDRTtzWvMfUWw3Pdmu +1czUq6hJknWdGAq1/M6/3UqHPGG7BS0eMUzYdpDyq50O7c2uL6/JieFo/9dD +l3vooGQbpGhrJoZKD9n22A3Rgf7y77+IPWJo6EAZ8h+hg5VAeM9LFzE8bfeK +FDFGh5Of4m8KBIrhZqVtahcn6FCz6+GGz3fEcDpX8IrKHPP+z5UG1x6LYa31 +84CFeTqMb8yu0sgTw9+2ZspVC3QQbCw6faVGDH99r5DQWaaDm0XDuPVPMXT1 +iDv+fB0D5p7tfnd+XgwvGg1s12NjwEWutsd5a2KYy79jtXA9A/Lq+134RMRx +WGgD9TYHA1ZN5ps+UsRxQXNGfWojA65mheasmojjiS9f7qvzMUBpA0ucuq04 +Sk9u3OjFzwCrt9zbL3uLY7UqYaFYkAHflK7KvAoQx0lexukvQgw4GSO6NHFG +HIe+2W0YEmbAXWP5QqskcczfYW87JcqAbY8zr5xLEceDwgUiI2IMqGFVPZqb +Lo6Xdy5Nt4oz4MdrPeWNpeJI/XtiKVmCAecUytdRXouj39MajaOSDBCIxD6/ +D+J4lJcST5JigD5aJn/oF0cdklxxoTQDGh9+Prn8Qxw3xTdd9pJhgNuavY3q +nDhypmsnb5Rl6uPao7b/nzj2KIS25jD5YqUbVwInAYsPdJoZyTFAUnZkuEyI +gFr7Lyx8YnJemF/NuDQB3394NWgnz4B2SvBZCy0Cim/sidyhwIAj95cdQw0J +mHrchvyCyavLEbrZOwmY7HuCKqjI1HP/BsHu3QT0K7+ZdITJSuUJk1z7CBhV +za9VzmS6pGCDgRcBb+3DzWybmPqG3s467E/AwV8XQ4yY/K1LKvrOaWb+ICvF +M0w+afDo4PsoAsqbLao+YbJFGt+cZSIBs0hvDjYwWZHjXFzTLQIeJYqKjDD5 +77Ef0rYPCZiu+8pyicmfWx3yW54ScH/YNS4OJQY8NXyz06GAgKTCIzYbmRye +rtXdWU7A2UalTdxMduB66L//LQGFhB7GsDB52/GNbH1NBPQWrwiZZuZj7ziT +7NZJwLxy97V2JvdSR1UHvxNQRemMbCmTizLsqr1/EtCQMdVxhckJPDV2Y3ME +/K5YsM2dyR4nNH4c+UfAIztLlFWZTO66HzbJIYHt1NmqSaY+gsgtdFxQApNc +XVieMXksKyTrl6QE9qjO/XBhchXvMPmUkgSedqKHczH5dtCeTwvqEshbk/Mm +j1kP/54qz1CSBHYfay23YvJOI/XFFZRAwgVD30FmPaWf3U0Mt2Dmt51sPMHk +OX5OBVY7CRQl/51YYtY//euAOYePBKqEHPWbZ/bLmR02ffHHJXAnD+tnHybb +5Lw6sTFUAjN0rFeamf22djrlnuBlCVx2jKPfYPaji4j1pFQhMz7xoXgVs591 +zpZHplYw/zc/LbhIYAD3wGYxhToJDFTbPrmFyYwXbKDSJYHzJ2r3nmbOh5gl +46rmmgRupC2Sq5nzNZmvolzIKYk+Fj+Tq5nz94Zwk6EnJIlL6sPTDAFmf4z4 +D5CVJfFfsUpqMnN+P0cq6e60lMTqCV7bNS4GPBm7Vv/OThLZl2wG33Ey4Pzu +NRcLV0l0vGmfEM/0A3WZ7gu7AyWxvk936yLTLy7Rr3Q4J0siZX0va/QaHXZM +L4X6D0qivs680p7fTD81u7n19YQkfrToZS+ZZfrlI/Vu4T+SWEGgBwvPMPeR +nZsBg1MKG0fyRcuZfjdBf7vAtk0KW3N/ZL0apsONqKtBd05L4az7df4bTH+t +79miNBEphXGhcrHXmP67olvbQkuQwskK7dp4pj8fGp3XHnoghdUmPak+Tcz9 +Y7V/dlutFPr46tK63tJhQFTF/w2vNLocy9BJLqSDeECVjLi4NNqyd9J18pl+ +XO/08bC8NAq161Mb8uhQEpqgxq8jja6MadvhZ3S41D8z7uwkjeTNdwRaH9JB ++1m5z3S6NHrlrwgnX6JDJMXWXVJfBh9ueSD2cT8dzFxTf5GMZPDuVVL2USc6 +8EX8jLa3kkFb0ms6uz0d7tdeyLrqJoNr9+X2KVkz94NF2c8N8czzhUNEEaTD +jNOm4N9dMjjysDCzRpEOrqfmLzWelUUlQVe5sMFSUE42kh6/IItVv0Iy7PtL +mfpdec5xVRYPFrQbb+4phdCVLZ+NMmTR7F7pcHlzKdyKdhVlNMpi7raMHQ9e +l0LjtXcPM2Xk8HOl2ZhVaimQ8+4Una+Sw1bzlcbovaWwo6NpdapeDhlmWm0r +1qVgzbLe9GCzHEbI6lkEWpSC5x7/LhiWw4/89xOstpeCyVmF8Ah2eTTpeDbQ +uK0Ujsv9ebxdVR7/LV+9s8hZCm98Hk7WBsvj2TlOFsmyEji6OBtRz6uAtnY5 +pkECJfBXVaBP3V4RtTdIl8ieLAJKTm7a7dub8EhDV2pKfgHMClm4OdQoIcHm +rQJt8SUMJbo5nOBQQQHyNQV+pTwwnw4xHyb+hxoGt1gqM7JhwpPzZFH4ZmR5 +sM/9OMsT5vtfnPVizRaks6ms7s96DEIfVZJeTm/FS/tzZbnfMt/7cS9siEQ1 +9LNXZuwdvgcpqgYCwj7q+I82LSmjnwwNktv1fl/bhp5zVv82aN0AsnTNVY12 +DTwkJt/K1p0EA5uU+n50a6DozIGrWtVJEK8aq5rRr4EpGR8qA7KSoJNsUUf4 +oYFyJldcZU4mQYhz8/K6FQ2MqpWUo/ImwT7LQJ1xAU2cmdyCl3ZchttxTDsg +aqL0tSuLxKoE4GNLD3KP0kQrldnnuYNxsOFv1d7ZGE3UMpFYXvwQB/+mvmpH +XtTEKooAq2NRHEx3S8ymJWpiYeZ1ObMLcfC54Nqxb7c1USZsy7vV/+Lgukfk +oYM5mhi6/+i2l8cvgliNm9OBVk1c+Pi+bZkvFmQj5SjOKlpI/BR46XRYNOSd +5FT8ulkL97B9ibY9Eg20Q7Mc7qpaGE0pemHgGA0HLGtbfDW10FbFPIKkFQ33 +RX38TpO1sAV11MeGo0AiO+9usrUWuoZq/RHbEwUiLdS/bcFaGMbQ5Q/SiwQu +ZZeSPe+0cInjQteM1Xk4IgEWOe+1MILLW75b4zw08Cr2sTVqYXapT0i30HlI +/DPKXvxZC1XTdDbJd4UBX/1Je/FuLbTXecBfeSgMhPwS5nomtFBFol7VIPYc +SOeXaXsLaePbz7kKrW2hsI0q8SLkgDZeDr1X0VcUAoWbDi+zumkjrTrJccu9 +ENDnZpgmeWhjO9I8EyJDwKjD6VuGjzYOzuok3bIOAYfAFMHmQG3kVh06V/0j +GMIzxYPUYrXx89xGaU+lYPjMK2bwPU8bbfWiCQHZQXCiT6jWgkUHeaXWFHf9 +CYT6OpdX2aw6aGWscMpuMBBkX2SVcrProPuK3ejRz4HQEE7ObeDSwS7h6JXP +2YGgqOBxy0JYB9e9bk31cguEL575PhYqOngp1iTkRdNx0Pyxe6OFlQ42T2r2 +sgUEwPTvRHvzFB0sczmwixTgB72djxwe3NVB5YwvfaW2ftDwqsRx9r4Ocu5s +HN2r6wcZF78533mkg3Zz6vx9f4/APild1x/ZOjhHDgvTjz0Cb416DsW/0kGl +xmHjuceH4d61LaffD+igosnHzJVfPhAXTDsjM6yD/DWD4W87fSB4/97QwFEd +vPhe1flJpQ/YKIedk5jQQSfZtIriSz6wgfE54vC8Dh6yMdFc3uQDgd9C4rk4 +dfHj/T9ahP2HwFSj7q65ui52ula/Eu/xAqcNZnafNXTxmUz4+MBrLzjy9T2v +o7YuCkz71NU/9YKkhI8RXiRdnLmZozEU7AXto62Hwrfr4rX5syaOIl7glTao +XWyvi8FJE48l7TwhSnDdB/nzunjPyKPqzIg73ByLinkSoYtmk6AV8NkdsqrW +07ZF62IOiXHpXJk7NBzjzDeM08V3youpfUnuINjAn+xwXReFMtsXX+m7Q1qU +rGdili7e5o78137VDSp/Gy4vNOniWhDXu5rHrvCosdRj7xdd3BGfrz4W7gox +mToNeS26+DbQgqHt4grmjqp3vDt1Ufzdr0qiqCu0lkmSWr7r4qu2MfaFuAMw +Hvn3RN6cLh57Y/OFEuICYgKl416Selhs097N5r8P/o5p76mW1kP5RA6Va9b7 +oPd1HkNKTg+3HMuhg8Y+eHQyK655kx5u0y+mssw6g1rHLRVU10NRi1+JPMHO +YJQa5CGFeijB6f1SK9YJ/NW0u7946+EbFbGw368c4NSC5NJBXz1cTbiluCnN +Ac7VsElOHdHDlAa3/FNRDpDg1ObMfVwP14esrUWZOsDTmNNdRqF6OMjHfY/c +Yg8DvZWdhUl6mF9xdnxtxg4cLlt23CrVw2u/2Iz+7tgLB5x0FzaV6WGFbH3R +DtW94LVJRrygQg+XpPrG8wT3wknGlEPTaz2cu9+n2N+3B64OX2vf0KiHUc/L +7XJC90ADtbMt5JseGgz4ZnaU2gJ1yqvVmYuIFkuJ6rmmNiBWbppewUPEIe/I +EG4dG5i6uPW4HB8Rz51uso6QtYFUhRmeYSEidg0ZXPP6uRv+2Z01Pi5NxKNs +xnXOFruhqvxaQawGET3ztc5/EbCG7fGVVwvtibgc/VCystISJB0euYo5ETFb +bKFowz1L+KUYo3ZmHxHf1gt8Ox1iCekV5vW0g0QMOu2BXZqWwDrTuvbel8ic +95bkC5kWUOvw0//bWSI+2OIQ7XvbHHYqEXbxphMxr45Hg3rLFIom3yp4ZRAx +wKzSmC3EFJRKT/4pyyLi7MjUuQknU1hv8emhbw4R1ey/fvxPxhRqAmJ/1RYR +MVx2iIP2xARo5XPJoe+IGK9qpNbweicQ93wZGJ0gYqFE/cNA/h2QJRVeSpsm +4vlcx23O88YgOqyWeGuWiC41Ao8O9hjDXEicnvEfIn6xdC6of2IMBQ8gLnWN +iOZ5FeycRsag8eO5ur0QCXl2b22TO2cEmyMuna4hkXA2dKqul307VBhmsluR +SZjN7nfj/CSCzULV9TYKCUXvcZOwDeG0/3zu2HYSxmQnHVfMRKh3cfvOZ0XC +Wr9Dea4mCL4GRIv9biRUTyfnqssAPPv1XWoujoQdbiWdCkcoQMtbeRqWQMIi +T/lPX5ACzYfFiRxJJKxYmX9DF6fA0jcrG8kbJKy7cCV7a50hWHwqjcEHJJxe +77ArWdkQxnMuTybmk9A/77yRy5QBbPU2qFLuJqFg726PoUwSXFG0XoruJaEh +G+PUrgskmOv30BvoI6HbvOK7fi8SVO5LzEkdJKH8g9OHw5VIsMemP1l8knle +N/B+ZiYRzhheOM7Foo81/fafvF/oQb3gF4VJZX0UWFj+c75fB9Q/DbtYbtbH +yI0XCui1OnA9cSn52VZ9/MGzTVXsqQ64cCjxHdLQR+UdbXmGgTowvRK81Kev +j58apS6oseuA2Jh0y2dLfey2pslF6WiDd6VvTFGgPt7xVi4bf6oJU8fGQ3YG +6eNjQma/wxVNOC1z1K89WB+3pG7YMXpKEy6dC9izeFYfi+32CQQZa8JLcrA8 +JVYfG4SLvQOrNWClJLqi9q4+3r8zYnQZt8H1F6lzzbXMfOK/82JPqIL0Qfkx +zzp9FO21rq0xVYVMvvSeuXp9jCclR1BkVIF+LLNGrEkfQ4yMikbrt8JX1dyr ++zr18UW9qZnIpq2w+SlDbWBCH0/sMr8cObAZqtJavWZFDVC+zXL+ToIKfLNS +OBhMMMDpjfzV93xVgOXvMedlSQPcQCya+LRTBYxsOazZ5Q3QzH+LVxOLCtSt +I5Mkthqg3NTQE+kzytDo8ZBrO80AEytinepOKEG30pG8q4cM8MpVrnX34xRh ++XPJU9HDBtgbPNsZ4KcI0mFsj+/6GWB2G4uHv7UiHGi7n5xx3ABVLnU9HhdR +hG8XPkXQQw2w3nu2rOuxAoyO6O79lmSAfm5lhe7v5WHu6dqCRqkBlk3lThp7 +ysKIg0laPMMA3/l3xa4nykLn+stmg+UGeMuDOMLGJQvlbpJ3blcbIHf+Mv3V +CxmIIuiRV98b4AXPjI2iLDIgEHfkXEOvASpyXjjPlysFaj5tLN6sZLzrWtIr +qyEBsqLSzyrXk3F+WstXiUsCBGo9bAkcZPx6r+XIwUEC/JadefSBh4w6ecdf +B6UQoKyd21hblIwCE3X6ouwEMDPBC2v/kZFUIRLya1QMPJVzuO7uIqOUivcm +x2YRCH3rekTFhszUKzik/4UIXPUW+lCwh4y7XRo3P7gsAhWZZxI/OJJRRuPg +yVJzERBRMeNfdWfGS3H7H3wjDHUqwyJuwWQUi7X2oNQKwdbNcvIqD8nY9mTD +Y/1hAcD65oiCR2SMmRN2/1YvAA6+sd9pGWScsmjLK8oVgOink+mOz8gIB7kX +vgcJQO/mCuX4QjLqxjQYmnEIQNIWZ9WJd2QUaQrwkfDlg9mtN4gFM2TcUpBZ +/MCRBzobcafwbzJuv0IrJKrxQLX/1N6geTLyGJ90FVjHA0kF5oHEJTLKEzWd +Y3K4YSuZJbeMzRALsl/re7Nxg4f5MYVaMUMs6Rz/WFnJCa0+phtbKYa4ztXj +QZz7BijnmpfUA0NUTvS5c526AdJz0rfc3m6IPwxSx5slNsDx6VUTJxND3NG4 +w2W+mR14Q4oie3cbIluTLDBM2cEkVmFhyMMQPaqUbVfI64Gesfx9Ps4Qnxy0 +kQszYQWicdCCRYIhhvSpeO/bwgrF3yc2pl02xDMKwkc8N7JCgWwfyeK6Ib65 +Lv5qoXkd5KZUX069Z4hixzQmFD3WQVriBQPTPEOc/M89cXccC8QH8V9LaTFE +lVuqHENDqzRO4bisyTZD3H2The150SotNp+lwqjTEI3pyY5VMau0mKnZkYle +Qxx7l+BXqbxKO+/bStk+YoiV34+tSfqt0E643Bn7sWiI/IGTV+dZl2n7dmxC +Q1kKOsP2W3Fei7TVVk6+WnkKmiS4nHY1WKSleU/1WGyioGxAXuQ5vkXaSCwj +ZN9mCh6gsuy8wlignXi/+8UZbQpaRzV6sgkv0C5Zn5Olm1Cw+l1iUV3zPK3M +qW1FN4CCi6wvnvZF/aYd+FHWUBFIweIuSu/4wd80ltC0lB1BTG4UtNSm/qaZ +3PPTtTtDwdZhE8/AxV+05q/rjp6MpiB3PcMpK/AXbdxjW09+MgV/wIPRe/6z +NKljFxnbqikYGnr28jP5aVrS2iG9hBoK1p3gnVz+OUVjvW6SP/qGGd/rUJ1e +OkUbL2F/lvaegoOyrXU/d0/RylhiUoRaKKh6m3rvQMwkbd/NiJA/wxRMmJPs +sFv5SUspP6NXyUNFv5LBJ47KP2gbrZ3zJfmo+LBqbP/upTFaxDd99RABKq5p +f/uR+GmM5su+qKQpSsUQJ5nxjtAxGml3sEi6LBXFxtr+PmodpbUPnPh9QYuK +J4oktubeHKGJch/N3+VIxQH677Ih4yFahnFY6IwzFStuTfC8kR6iaYclGd9w +oWJv6oz0z/lBmvXMy7ZOdypKBMRf5Xs2SIttn//reZSKwkL6ng+EBmmL6eFG +oZFUvKnv63Li13dat+GNlqwcKsrfUnIqq+2n+Z7KuG+eR8Vg7FjMvNBP+5NX +7D3xkorrn9GW15v104QUOxe0SqiYIvx4VaKpj2bJKSP9qpqKM1xNqpf6v9Iq +WrO8WtqoWL7SPtIp1kuz4KOrB3dS0UQ6KzW1v4fWafr+D6GHeR//kzkfnvbQ +5sp+xrl+o2KTqPtPJ0oPTf2R5vMf41RM6DV3VvPtplV0bw9OnKTixN5z7BK6 +3TQLkb2gMUPFl5vDT/qwdNMOXTz1JWieimebuL+r3O2izVXH3hVfpOKfat/4 +2z5dtKilZM+yJSqOzFB3eut10QR0n6kdWKWiKDvd7zpbFy31WNn82hoV6aek +7WWaO2n/AyCK44Y= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk4lG8Xx0WyZd/GvoRfhewzjJk5J8qeKGtJ1ihFSpSSNRFpjzZJqJCy +zyBESZLKvkXZk7WILHnn/eu5Ptd1n/Nc9/ec8z23gkfAHm9WFhaWxnUsLP// +/ul7/0YpIYPGxlgmclBsaa2phDPbO6PALZ7a55qqASj6yYPQeR16bihwCqcC +BNtkd7B1pgPhj/ti64PdIDglfv1vRwHcl11ztX9wEPorrAPmOmpg6k/8/hv3 +AsBEafzrbEcziPfaHM6+GQ5/O0i3ZjoGoPtD0yulM1eg1vhJxpf03zB8nLCa +p5IG0v2MEQ+1VbB//7yU6v8ERI4ezOYwZsPCs1rFMnPPYSvH4zobRzbkNbzT +1s6XB5g+MnDHjw0/HImOj9ySB0c7j0mp3WTD7D+m4TmuefBmx7lEm2E2VDFf +PGpTnwdBMnf871xcjwOJIQ2tKS+gpalZW7WRHQPUJgZpyS/hupZJubU9J3pf +ydwuKloAGj3OplRfTkxN+Z3MkCuAxphjLapnOTHadjTFYWsBbOi8+ZPzESfi +y/TLoVAAZ88PStVOcOLaeP7o4cMF4PUh4hwphgu3aVSmDJYXANG7nCpfyI2/ +GDP16vsLoYXv03u+Om4samsJ+e5VCMfpA/arndxIH5gPvOxfCNk83P7d/7hR +KGw/tSmyEOQKnFJvWvDgV8ql0V9PCoFzbf4f5wAPxutJ2db9KoSuFM3qWQFe +bJ4uqImJKoK7LTn8wcq8+Jn/b+pCQhHs4/vv4JIBL1onToq63yqC3miZf6ye +vNhy9Ol78adF8M2fmyJSzIumK56sIh+LYGzHUCnRmQ/7TTBtp2gxLM4kvzj7 +iB9bTDbQzqcWA0NVeG2tmB/3vJhgrc4qhtBDSdYxDfxYVGkpu5hXDCs9MZOJ +v/kxzaLB1rKqGCIG6aKfFAXQ/lLR+bD+Yohpytz7LUgAb1WNpvLLlkBCRvgn +VglBtHonOfD9RglY6B4WEt0kiGH+K8sNd0uA880e+//UBTEg2Pth9qMSiBlU +7rHcLoiKqe3hu16UwDnFxpGbhwUxr7H/hkJDCfinEf6plAli7zOlaNZ/JWB7 +P1/Ncr8QfqcmZWa4loKA2r2AA95CeDuleumAVyk0lccUBAQIYY4YTxPvkVKw +6HHUvxkthJzjytM2p0rBSPKf8dccIawwj5T1TigF3RSL/QErQmjB1uz6trgU +xG8Oxt94IIzmCgYivmx0IKgWxyxmCaNwbN/iYw46SNbEhh94KYxp9UWPO3jo +IDuz5dR/tcIoNfbYWkWEDspWx93Kx4SRJryf112JDjrrV4mDOiJ41za4x8qY +Drr3mrTMqCI4EbU5jN2UDkTtNLXnJiJY4d4xW2xBB7KbsWKIswgqlyw5/rOl +w/aKeF6ecBEMUV7RVnejw+4gsSHtBhGcNj7Nv/4sHWx4xvqSW0TQbs3ThXye +DnvSGV0rvSJIzbt42TeSDg6fXT7VTYugRtmBR7kX6XBA7XHZPlFRPEOKKWi5 +QQe/IY1rUW6ieGxXXnpqNh2Onl2XOHpYFDnqF5v2PqeDv1BLrNVJURT3ZZtn +eUmHExh8TixWFAs3WesaF9PhzP0Kn+wcURTzt8v2qaLDRTtzWvMfUWw3Pdmu +1czUq6hJknWdGAq1/M6/3UqHPGG7BS0eMUzYdpDyq50O7c2uL6/JieFo/9dD +l3vooGQbpGhrJoZKD9n22A3Rgf7y77+IPWJo6EAZ8h+hg5VAeM9LFzE8bfeK +FDFGh5Of4m8KBIrhZqVtahcn6FCz6+GGz3fEcDpX8IrKHPP+z5UG1x6LYa31 +84CFeTqMb8yu0sgTw9+2ZspVC3QQbCw6faVGDH99r5DQWaaDm0XDuPVPMXT1 +iDv+fB0D5p7tfnd+XgwvGg1s12NjwEWutsd5a2KYy79jtXA9A/Lq+134RMRx +WGgD9TYHA1ZN5ps+UsRxQXNGfWojA65mheasmojjiS9f7qvzMUBpA0ucuq04 +Sk9u3OjFzwCrt9zbL3uLY7UqYaFYkAHflK7KvAoQx0lexukvQgw4GSO6NHFG +HIe+2W0YEmbAXWP5QqskcczfYW87JcqAbY8zr5xLEceDwgUiI2IMqGFVPZqb +Lo6Xdy5Nt4oz4MdrPeWNpeJI/XtiKVmCAecUytdRXouj39MajaOSDBCIxD6/ +D+J4lJcST5JigD5aJn/oF0cdklxxoTQDGh9+Prn8Qxw3xTdd9pJhgNuavY3q +nDhypmsnb5Rl6uPao7b/nzj2KIS25jD5YqUbVwInAYsPdJoZyTFAUnZkuEyI +gFr7Lyx8YnJemF/NuDQB3394NWgnz4B2SvBZCy0Cim/sidyhwIAj95cdQw0J +mHrchvyCyavLEbrZOwmY7HuCKqjI1HP/BsHu3QT0K7+ZdITJSuUJk1z7CBhV +za9VzmS6pGCDgRcBb+3DzWybmPqG3s467E/AwV8XQ4yY/K1LKvrOaWb+ICvF +M0w+afDo4PsoAsqbLao+YbJFGt+cZSIBs0hvDjYwWZHjXFzTLQIeJYqKjDD5 +77Ef0rYPCZiu+8pyicmfWx3yW54ScH/YNS4OJQY8NXyz06GAgKTCIzYbmRye +rtXdWU7A2UalTdxMduB66L//LQGFhB7GsDB52/GNbH1NBPQWrwiZZuZj7ziT +7NZJwLxy97V2JvdSR1UHvxNQRemMbCmTizLsqr1/EtCQMdVxhckJPDV2Y3ME +/K5YsM2dyR4nNH4c+UfAIztLlFWZTO66HzbJIYHt1NmqSaY+gsgtdFxQApNc +XVieMXksKyTrl6QE9qjO/XBhchXvMPmUkgSedqKHczH5dtCeTwvqEshbk/Mm +j1kP/54qz1CSBHYfay23YvJOI/XFFZRAwgVD30FmPaWf3U0Mt2Dmt51sPMHk +OX5OBVY7CRQl/51YYtY//euAOYePBKqEHPWbZ/bLmR02ffHHJXAnD+tnHybb +5Lw6sTFUAjN0rFeamf22djrlnuBlCVx2jKPfYPaji4j1pFQhMz7xoXgVs591 +zpZHplYw/zc/LbhIYAD3wGYxhToJDFTbPrmFyYwXbKDSJYHzJ2r3nmbOh5gl +46rmmgRupC2Sq5nzNZmvolzIKYk+Fj+Tq5nz94Zwk6EnJIlL6sPTDAFmf4z4 +D5CVJfFfsUpqMnN+P0cq6e60lMTqCV7bNS4GPBm7Vv/OThLZl2wG33Ey4Pzu +NRcLV0l0vGmfEM/0A3WZ7gu7AyWxvk936yLTLy7Rr3Q4J0siZX0va/QaHXZM +L4X6D0qivs680p7fTD81u7n19YQkfrToZS+ZZfrlI/Vu4T+SWEGgBwvPMPeR +nZsBg1MKG0fyRcuZfjdBf7vAtk0KW3N/ZL0apsONqKtBd05L4az7df4bTH+t +79miNBEphXGhcrHXmP67olvbQkuQwskK7dp4pj8fGp3XHnoghdUmPak+Tcz9 +Y7V/dlutFPr46tK63tJhQFTF/w2vNLocy9BJLqSDeECVjLi4NNqyd9J18pl+ +XO/08bC8NAq161Mb8uhQEpqgxq8jja6MadvhZ3S41D8z7uwkjeTNdwRaH9JB ++1m5z3S6NHrlrwgnX6JDJMXWXVJfBh9ueSD2cT8dzFxTf5GMZPDuVVL2USc6 +8EX8jLa3kkFb0ms6uz0d7tdeyLrqJoNr9+X2KVkz94NF2c8N8czzhUNEEaTD +jNOm4N9dMjjysDCzRpEOrqfmLzWelUUlQVe5sMFSUE42kh6/IItVv0Iy7PtL +mfpdec5xVRYPFrQbb+4phdCVLZ+NMmTR7F7pcHlzKdyKdhVlNMpi7raMHQ9e +l0LjtXcPM2Xk8HOl2ZhVaimQ8+4Una+Sw1bzlcbovaWwo6NpdapeDhlmWm0r +1qVgzbLe9GCzHEbI6lkEWpSC5x7/LhiWw4/89xOstpeCyVmF8Ah2eTTpeDbQ +uK0Ujsv9ebxdVR7/LV+9s8hZCm98Hk7WBsvj2TlOFsmyEji6OBtRz6uAtnY5 +pkECJfBXVaBP3V4RtTdIl8ieLAJKTm7a7dub8EhDV2pKfgHMClm4OdQoIcHm +rQJt8SUMJbo5nOBQQQHyNQV+pTwwnw4xHyb+hxoGt1gqM7JhwpPzZFH4ZmR5 +sM/9OMsT5vtfnPVizRaks6ms7s96DEIfVZJeTm/FS/tzZbnfMt/7cS9siEQ1 +9LNXZuwdvgcpqgYCwj7q+I82LSmjnwwNktv1fl/bhp5zVv82aN0AsnTNVY12 +DTwkJt/K1p0EA5uU+n50a6DozIGrWtVJEK8aq5rRr4EpGR8qA7KSoJNsUUf4 +oYFyJldcZU4mQYhz8/K6FQ2MqpWUo/ImwT7LQJ1xAU2cmdyCl3ZchttxTDsg +aqL0tSuLxKoE4GNLD3KP0kQrldnnuYNxsOFv1d7ZGE3UMpFYXvwQB/+mvmpH +XtTEKooAq2NRHEx3S8ymJWpiYeZ1ObMLcfC54Nqxb7c1USZsy7vV/+Lgukfk +oYM5mhi6/+i2l8cvgliNm9OBVk1c+Pi+bZkvFmQj5SjOKlpI/BR46XRYNOSd +5FT8ulkL97B9ibY9Eg20Q7Mc7qpaGE0pemHgGA0HLGtbfDW10FbFPIKkFQ33 +RX38TpO1sAV11MeGo0AiO+9usrUWuoZq/RHbEwUiLdS/bcFaGMbQ5Q/SiwQu +ZZeSPe+0cInjQteM1Xk4IgEWOe+1MILLW75b4zw08Cr2sTVqYXapT0i30HlI +/DPKXvxZC1XTdDbJd4UBX/1Je/FuLbTXecBfeSgMhPwS5nomtFBFol7VIPYc +SOeXaXsLaePbz7kKrW2hsI0q8SLkgDZeDr1X0VcUAoWbDi+zumkjrTrJccu9 +ENDnZpgmeWhjO9I8EyJDwKjD6VuGjzYOzuok3bIOAYfAFMHmQG3kVh06V/0j +GMIzxYPUYrXx89xGaU+lYPjMK2bwPU8bbfWiCQHZQXCiT6jWgkUHeaXWFHf9 +CYT6OpdX2aw6aGWscMpuMBBkX2SVcrProPuK3ejRz4HQEE7ObeDSwS7h6JXP +2YGgqOBxy0JYB9e9bk31cguEL575PhYqOngp1iTkRdNx0Pyxe6OFlQ42T2r2 +sgUEwPTvRHvzFB0sczmwixTgB72djxwe3NVB5YwvfaW2ftDwqsRx9r4Ocu5s +HN2r6wcZF78533mkg3Zz6vx9f4/APild1x/ZOjhHDgvTjz0Cb416DsW/0kGl +xmHjuceH4d61LaffD+igosnHzJVfPhAXTDsjM6yD/DWD4W87fSB4/97QwFEd +vPhe1flJpQ/YKIedk5jQQSfZtIriSz6wgfE54vC8Dh6yMdFc3uQDgd9C4rk4 +dfHj/T9ahP2HwFSj7q65ui52ula/Eu/xAqcNZnafNXTxmUz4+MBrLzjy9T2v +o7YuCkz71NU/9YKkhI8RXiRdnLmZozEU7AXto62Hwrfr4rX5syaOIl7glTao +XWyvi8FJE48l7TwhSnDdB/nzunjPyKPqzIg73ByLinkSoYtmk6AV8NkdsqrW +07ZF62IOiXHpXJk7NBzjzDeM08V3youpfUnuINjAn+xwXReFMtsXX+m7Q1qU +rGdili7e5o78137VDSp/Gy4vNOniWhDXu5rHrvCosdRj7xdd3BGfrz4W7gox +mToNeS26+DbQgqHt4grmjqp3vDt1Ufzdr0qiqCu0lkmSWr7r4qu2MfaFuAMw +Hvn3RN6cLh57Y/OFEuICYgKl416Selhs097N5r8P/o5p76mW1kP5RA6Va9b7 +oPd1HkNKTg+3HMuhg8Y+eHQyK655kx5u0y+mssw6g1rHLRVU10NRi1+JPMHO +YJQa5CGFeijB6f1SK9YJ/NW0u7946+EbFbGw368c4NSC5NJBXz1cTbiluCnN +Ac7VsElOHdHDlAa3/FNRDpDg1ObMfVwP14esrUWZOsDTmNNdRqF6OMjHfY/c +Yg8DvZWdhUl6mF9xdnxtxg4cLlt23CrVw2u/2Iz+7tgLB5x0FzaV6WGFbH3R +DtW94LVJRrygQg+XpPrG8wT3wknGlEPTaz2cu9+n2N+3B64OX2vf0KiHUc/L +7XJC90ADtbMt5JseGgz4ZnaU2gJ1yqvVmYuIFkuJ6rmmNiBWbppewUPEIe/I +EG4dG5i6uPW4HB8Rz51uso6QtYFUhRmeYSEidg0ZXPP6uRv+2Z01Pi5NxKNs +xnXOFruhqvxaQawGET3ztc5/EbCG7fGVVwvtibgc/VCystISJB0euYo5ETFb +bKFowz1L+KUYo3ZmHxHf1gt8Ox1iCekV5vW0g0QMOu2BXZqWwDrTuvbel8ic +95bkC5kWUOvw0//bWSI+2OIQ7XvbHHYqEXbxphMxr45Hg3rLFIom3yp4ZRAx +wKzSmC3EFJRKT/4pyyLi7MjUuQknU1hv8emhbw4R1ey/fvxPxhRqAmJ/1RYR +MVx2iIP2xARo5XPJoe+IGK9qpNbweicQ93wZGJ0gYqFE/cNA/h2QJRVeSpsm +4vlcx23O88YgOqyWeGuWiC41Ao8O9hjDXEicnvEfIn6xdC6of2IMBQ8gLnWN +iOZ5FeycRsag8eO5ur0QCXl2b22TO2cEmyMuna4hkXA2dKqul307VBhmsluR +SZjN7nfj/CSCzULV9TYKCUXvcZOwDeG0/3zu2HYSxmQnHVfMRKh3cfvOZ0XC +Wr9Dea4mCL4GRIv9biRUTyfnqssAPPv1XWoujoQdbiWdCkcoQMtbeRqWQMIi +T/lPX5ACzYfFiRxJJKxYmX9DF6fA0jcrG8kbJKy7cCV7a50hWHwqjcEHJJxe +77ArWdkQxnMuTybmk9A/77yRy5QBbPU2qFLuJqFg726PoUwSXFG0XoruJaEh +G+PUrgskmOv30BvoI6HbvOK7fi8SVO5LzEkdJKH8g9OHw5VIsMemP1l8knle +N/B+ZiYRzhheOM7Foo81/fafvF/oQb3gF4VJZX0UWFj+c75fB9Q/DbtYbtbH +yI0XCui1OnA9cSn52VZ9/MGzTVXsqQ64cCjxHdLQR+UdbXmGgTowvRK81Kev +j58apS6oseuA2Jh0y2dLfey2pslF6WiDd6VvTFGgPt7xVi4bf6oJU8fGQ3YG +6eNjQma/wxVNOC1z1K89WB+3pG7YMXpKEy6dC9izeFYfi+32CQQZa8JLcrA8 +JVYfG4SLvQOrNWClJLqi9q4+3r8zYnQZt8H1F6lzzbXMfOK/82JPqIL0Qfkx +zzp9FO21rq0xVYVMvvSeuXp9jCclR1BkVIF+LLNGrEkfQ4yMikbrt8JX1dyr ++zr18UW9qZnIpq2w+SlDbWBCH0/sMr8cObAZqtJavWZFDVC+zXL+ToIKfLNS +OBhMMMDpjfzV93xVgOXvMedlSQPcQCya+LRTBYxsOazZ5Q3QzH+LVxOLCtSt +I5Mkthqg3NTQE+kzytDo8ZBrO80AEytinepOKEG30pG8q4cM8MpVrnX34xRh ++XPJU9HDBtgbPNsZ4KcI0mFsj+/6GWB2G4uHv7UiHGi7n5xx3ABVLnU9HhdR +hG8XPkXQQw2w3nu2rOuxAoyO6O79lmSAfm5lhe7v5WHu6dqCRqkBlk3lThp7 +ysKIg0laPMMA3/l3xa4nykLn+stmg+UGeMuDOMLGJQvlbpJ3blcbIHf+Mv3V +CxmIIuiRV98b4AXPjI2iLDIgEHfkXEOvASpyXjjPlysFaj5tLN6sZLzrWtIr +qyEBsqLSzyrXk3F+WstXiUsCBGo9bAkcZPx6r+XIwUEC/JadefSBh4w6ecdf +B6UQoKyd21hblIwCE3X6ouwEMDPBC2v/kZFUIRLya1QMPJVzuO7uIqOUivcm +x2YRCH3rekTFhszUKzik/4UIXPUW+lCwh4y7XRo3P7gsAhWZZxI/OJJRRuPg +yVJzERBRMeNfdWfGS3H7H3wjDHUqwyJuwWQUi7X2oNQKwdbNcvIqD8nY9mTD +Y/1hAcD65oiCR2SMmRN2/1YvAA6+sd9pGWScsmjLK8oVgOink+mOz8gIB7kX +vgcJQO/mCuX4QjLqxjQYmnEIQNIWZ9WJd2QUaQrwkfDlg9mtN4gFM2TcUpBZ +/MCRBzobcafwbzJuv0IrJKrxQLX/1N6geTLyGJ90FVjHA0kF5oHEJTLKEzWd +Y3K4YSuZJbeMzRALsl/re7Nxg4f5MYVaMUMs6Rz/WFnJCa0+phtbKYa4ztXj +QZz7BijnmpfUA0NUTvS5c526AdJz0rfc3m6IPwxSx5slNsDx6VUTJxND3NG4 +w2W+mR14Q4oie3cbIluTLDBM2cEkVmFhyMMQPaqUbVfI64Gesfx9Ps4Qnxy0 +kQszYQWicdCCRYIhhvSpeO/bwgrF3yc2pl02xDMKwkc8N7JCgWwfyeK6Ib65 +Lv5qoXkd5KZUX069Z4hixzQmFD3WQVriBQPTPEOc/M89cXccC8QH8V9LaTFE +lVuqHENDqzRO4bisyTZD3H2The150SotNp+lwqjTEI3pyY5VMau0mKnZkYle +Qxx7l+BXqbxKO+/bStk+YoiV34+tSfqt0E643Bn7sWiI/IGTV+dZl2n7dmxC +Q1kKOsP2W3Fei7TVVk6+WnkKmiS4nHY1WKSleU/1WGyioGxAXuQ5vkXaSCwj +ZN9mCh6gsuy8wlignXi/+8UZbQpaRzV6sgkv0C5Zn5Olm1Cw+l1iUV3zPK3M +qW1FN4CCi6wvnvZF/aYd+FHWUBFIweIuSu/4wd80ltC0lB1BTG4UtNSm/qaZ +3PPTtTtDwdZhE8/AxV+05q/rjp6MpiB3PcMpK/AXbdxjW09+MgV/wIPRe/6z +NKljFxnbqikYGnr28jP5aVrS2iG9hBoK1p3gnVz+OUVjvW6SP/qGGd/rUJ1e +OkUbL2F/lvaegoOyrXU/d0/RylhiUoRaKKh6m3rvQMwkbd/NiJA/wxRMmJPs +sFv5SUspP6NXyUNFv5LBJ47KP2gbrZ3zJfmo+LBqbP/upTFaxDd99RABKq5p +f/uR+GmM5su+qKQpSsUQJ5nxjtAxGml3sEi6LBXFxtr+PmodpbUPnPh9QYuK +J4oktubeHKGJch/N3+VIxQH677Ih4yFahnFY6IwzFStuTfC8kR6iaYclGd9w +oWJv6oz0z/lBmvXMy7ZOdypKBMRf5Xs2SIttn//reZSKwkL6ng+EBmmL6eFG +oZFUvKnv63Li13dat+GNlqwcKsrfUnIqq+2n+Z7KuG+eR8Vg7FjMvNBP+5NX +7D3xkorrn9GW15v104QUOxe0SqiYIvx4VaKpj2bJKSP9qpqKM1xNqpf6v9Iq +WrO8WtqoWL7SPtIp1kuz4KOrB3dS0UQ6KzW1v4fWafr+D6GHeR//kzkfnvbQ +5sp+xrl+o2KTqPtPJ0oPTf2R5vMf41RM6DV3VvPtplV0bw9OnKTixN5z7BK6 +3TQLkb2gMUPFl5vDT/qwdNMOXTz1JWieimebuL+r3O2izVXH3hVfpOKfat/4 +2z5dtKilZM+yJSqOzFB3eut10QR0n6kdWKWiKDvd7zpbFy31WNn82hoV6aek +7WWaO2n/AyCK44Y= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09820630038548193}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09820630038548193}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk4lG8Xx0WyZd/GvoRfhewzjJk5J8qeKGtJ1ihFSpSSNRFpjzZJqJCy +zyBESZLKvkXZk7WILHnn/eu5Ptd1n/Nc9/ec8z23gkfAHm9WFhaWxnUsLP// +/ul7/0YpIYPGxlgmclBsaa2phDPbO6PALZ7a55qqASj6yYPQeR16bihwCqcC +BNtkd7B1pgPhj/ti64PdIDglfv1vRwHcl11ztX9wEPorrAPmOmpg6k/8/hv3 +AsBEafzrbEcziPfaHM6+GQ5/O0i3ZjoGoPtD0yulM1eg1vhJxpf03zB8nLCa +p5IG0v2MEQ+1VbB//7yU6v8ERI4ezOYwZsPCs1rFMnPPYSvH4zobRzbkNbzT +1s6XB5g+MnDHjw0/HImOj9ySB0c7j0mp3WTD7D+m4TmuefBmx7lEm2E2VDFf +PGpTnwdBMnf871xcjwOJIQ2tKS+gpalZW7WRHQPUJgZpyS/hupZJubU9J3pf +ydwuKloAGj3OplRfTkxN+Z3MkCuAxphjLapnOTHadjTFYWsBbOi8+ZPzESfi +y/TLoVAAZ88PStVOcOLaeP7o4cMF4PUh4hwphgu3aVSmDJYXANG7nCpfyI2/ +GDP16vsLoYXv03u+Om4samsJ+e5VCMfpA/arndxIH5gPvOxfCNk83P7d/7hR +KGw/tSmyEOQKnFJvWvDgV8ql0V9PCoFzbf4f5wAPxutJ2db9KoSuFM3qWQFe +bJ4uqImJKoK7LTn8wcq8+Jn/b+pCQhHs4/vv4JIBL1onToq63yqC3miZf6ye +vNhy9Ol78adF8M2fmyJSzIumK56sIh+LYGzHUCnRmQ/7TTBtp2gxLM4kvzj7 +iB9bTDbQzqcWA0NVeG2tmB/3vJhgrc4qhtBDSdYxDfxYVGkpu5hXDCs9MZOJ +v/kxzaLB1rKqGCIG6aKfFAXQ/lLR+bD+Yohpytz7LUgAb1WNpvLLlkBCRvgn +VglBtHonOfD9RglY6B4WEt0kiGH+K8sNd0uA880e+//UBTEg2Pth9qMSiBlU +7rHcLoiKqe3hu16UwDnFxpGbhwUxr7H/hkJDCfinEf6plAli7zOlaNZ/JWB7 +P1/Ncr8QfqcmZWa4loKA2r2AA95CeDuleumAVyk0lccUBAQIYY4YTxPvkVKw +6HHUvxkthJzjytM2p0rBSPKf8dccIawwj5T1TigF3RSL/QErQmjB1uz6trgU +xG8Oxt94IIzmCgYivmx0IKgWxyxmCaNwbN/iYw46SNbEhh94KYxp9UWPO3jo +IDuz5dR/tcIoNfbYWkWEDspWx93Kx4SRJryf112JDjrrV4mDOiJ41za4x8qY +Drr3mrTMqCI4EbU5jN2UDkTtNLXnJiJY4d4xW2xBB7KbsWKIswgqlyw5/rOl +w/aKeF6ecBEMUV7RVnejw+4gsSHtBhGcNj7Nv/4sHWx4xvqSW0TQbs3ThXye +DnvSGV0rvSJIzbt42TeSDg6fXT7VTYugRtmBR7kX6XBA7XHZPlFRPEOKKWi5 +QQe/IY1rUW6ieGxXXnpqNh2Onl2XOHpYFDnqF5v2PqeDv1BLrNVJURT3ZZtn +eUmHExh8TixWFAs3WesaF9PhzP0Kn+wcURTzt8v2qaLDRTtzWvMfUWw3Pdmu +1czUq6hJknWdGAq1/M6/3UqHPGG7BS0eMUzYdpDyq50O7c2uL6/JieFo/9dD +l3vooGQbpGhrJoZKD9n22A3Rgf7y77+IPWJo6EAZ8h+hg5VAeM9LFzE8bfeK +FDFGh5Of4m8KBIrhZqVtahcn6FCz6+GGz3fEcDpX8IrKHPP+z5UG1x6LYa31 +84CFeTqMb8yu0sgTw9+2ZspVC3QQbCw6faVGDH99r5DQWaaDm0XDuPVPMXT1 +iDv+fB0D5p7tfnd+XgwvGg1s12NjwEWutsd5a2KYy79jtXA9A/Lq+134RMRx +WGgD9TYHA1ZN5ps+UsRxQXNGfWojA65mheasmojjiS9f7qvzMUBpA0ucuq04 +Sk9u3OjFzwCrt9zbL3uLY7UqYaFYkAHflK7KvAoQx0lexukvQgw4GSO6NHFG +HIe+2W0YEmbAXWP5QqskcczfYW87JcqAbY8zr5xLEceDwgUiI2IMqGFVPZqb +Lo6Xdy5Nt4oz4MdrPeWNpeJI/XtiKVmCAecUytdRXouj39MajaOSDBCIxD6/ +D+J4lJcST5JigD5aJn/oF0cdklxxoTQDGh9+Prn8Qxw3xTdd9pJhgNuavY3q +nDhypmsnb5Rl6uPao7b/nzj2KIS25jD5YqUbVwInAYsPdJoZyTFAUnZkuEyI +gFr7Lyx8YnJemF/NuDQB3394NWgnz4B2SvBZCy0Cim/sidyhwIAj95cdQw0J +mHrchvyCyavLEbrZOwmY7HuCKqjI1HP/BsHu3QT0K7+ZdITJSuUJk1z7CBhV +za9VzmS6pGCDgRcBb+3DzWybmPqG3s467E/AwV8XQ4yY/K1LKvrOaWb+ICvF +M0w+afDo4PsoAsqbLao+YbJFGt+cZSIBs0hvDjYwWZHjXFzTLQIeJYqKjDD5 +77Ef0rYPCZiu+8pyicmfWx3yW54ScH/YNS4OJQY8NXyz06GAgKTCIzYbmRye +rtXdWU7A2UalTdxMduB66L//LQGFhB7GsDB52/GNbH1NBPQWrwiZZuZj7ziT +7NZJwLxy97V2JvdSR1UHvxNQRemMbCmTizLsqr1/EtCQMdVxhckJPDV2Y3ME +/K5YsM2dyR4nNH4c+UfAIztLlFWZTO66HzbJIYHt1NmqSaY+gsgtdFxQApNc +XVieMXksKyTrl6QE9qjO/XBhchXvMPmUkgSedqKHczH5dtCeTwvqEshbk/Mm +j1kP/54qz1CSBHYfay23YvJOI/XFFZRAwgVD30FmPaWf3U0Mt2Dmt51sPMHk +OX5OBVY7CRQl/51YYtY//euAOYePBKqEHPWbZ/bLmR02ffHHJXAnD+tnHybb +5Lw6sTFUAjN0rFeamf22djrlnuBlCVx2jKPfYPaji4j1pFQhMz7xoXgVs591 +zpZHplYw/zc/LbhIYAD3wGYxhToJDFTbPrmFyYwXbKDSJYHzJ2r3nmbOh5gl +46rmmgRupC2Sq5nzNZmvolzIKYk+Fj+Tq5nz94Zwk6EnJIlL6sPTDAFmf4z4 +D5CVJfFfsUpqMnN+P0cq6e60lMTqCV7bNS4GPBm7Vv/OThLZl2wG33Ey4Pzu +NRcLV0l0vGmfEM/0A3WZ7gu7AyWxvk936yLTLy7Rr3Q4J0siZX0va/QaHXZM +L4X6D0qivs680p7fTD81u7n19YQkfrToZS+ZZfrlI/Vu4T+SWEGgBwvPMPeR +nZsBg1MKG0fyRcuZfjdBf7vAtk0KW3N/ZL0apsONqKtBd05L4az7df4bTH+t +79miNBEphXGhcrHXmP67olvbQkuQwskK7dp4pj8fGp3XHnoghdUmPak+Tcz9 +Y7V/dlutFPr46tK63tJhQFTF/w2vNLocy9BJLqSDeECVjLi4NNqyd9J18pl+ +XO/08bC8NAq161Mb8uhQEpqgxq8jja6MadvhZ3S41D8z7uwkjeTNdwRaH9JB ++1m5z3S6NHrlrwgnX6JDJMXWXVJfBh9ueSD2cT8dzFxTf5GMZPDuVVL2USc6 +8EX8jLa3kkFb0ms6uz0d7tdeyLrqJoNr9+X2KVkz94NF2c8N8czzhUNEEaTD +jNOm4N9dMjjysDCzRpEOrqfmLzWelUUlQVe5sMFSUE42kh6/IItVv0Iy7PtL +mfpdec5xVRYPFrQbb+4phdCVLZ+NMmTR7F7pcHlzKdyKdhVlNMpi7raMHQ9e +l0LjtXcPM2Xk8HOl2ZhVaimQ8+4Una+Sw1bzlcbovaWwo6NpdapeDhlmWm0r +1qVgzbLe9GCzHEbI6lkEWpSC5x7/LhiWw4/89xOstpeCyVmF8Ah2eTTpeDbQ +uK0Ujsv9ebxdVR7/LV+9s8hZCm98Hk7WBsvj2TlOFsmyEji6OBtRz6uAtnY5 +pkECJfBXVaBP3V4RtTdIl8ieLAJKTm7a7dub8EhDV2pKfgHMClm4OdQoIcHm +rQJt8SUMJbo5nOBQQQHyNQV+pTwwnw4xHyb+hxoGt1gqM7JhwpPzZFH4ZmR5 +sM/9OMsT5vtfnPVizRaks6ms7s96DEIfVZJeTm/FS/tzZbnfMt/7cS9siEQ1 +9LNXZuwdvgcpqgYCwj7q+I82LSmjnwwNktv1fl/bhp5zVv82aN0AsnTNVY12 +DTwkJt/K1p0EA5uU+n50a6DozIGrWtVJEK8aq5rRr4EpGR8qA7KSoJNsUUf4 +oYFyJldcZU4mQYhz8/K6FQ2MqpWUo/ImwT7LQJ1xAU2cmdyCl3ZchttxTDsg +aqL0tSuLxKoE4GNLD3KP0kQrldnnuYNxsOFv1d7ZGE3UMpFYXvwQB/+mvmpH +XtTEKooAq2NRHEx3S8ymJWpiYeZ1ObMLcfC54Nqxb7c1USZsy7vV/+Lgukfk +oYM5mhi6/+i2l8cvgliNm9OBVk1c+Pi+bZkvFmQj5SjOKlpI/BR46XRYNOSd +5FT8ulkL97B9ibY9Eg20Q7Mc7qpaGE0pemHgGA0HLGtbfDW10FbFPIKkFQ33 +RX38TpO1sAV11MeGo0AiO+9usrUWuoZq/RHbEwUiLdS/bcFaGMbQ5Q/SiwQu +ZZeSPe+0cInjQteM1Xk4IgEWOe+1MILLW75b4zw08Cr2sTVqYXapT0i30HlI +/DPKXvxZC1XTdDbJd4UBX/1Je/FuLbTXecBfeSgMhPwS5nomtFBFol7VIPYc +SOeXaXsLaePbz7kKrW2hsI0q8SLkgDZeDr1X0VcUAoWbDi+zumkjrTrJccu9 +ENDnZpgmeWhjO9I8EyJDwKjD6VuGjzYOzuok3bIOAYfAFMHmQG3kVh06V/0j +GMIzxYPUYrXx89xGaU+lYPjMK2bwPU8bbfWiCQHZQXCiT6jWgkUHeaXWFHf9 +CYT6OpdX2aw6aGWscMpuMBBkX2SVcrProPuK3ejRz4HQEE7ObeDSwS7h6JXP +2YGgqOBxy0JYB9e9bk31cguEL575PhYqOngp1iTkRdNx0Pyxe6OFlQ42T2r2 +sgUEwPTvRHvzFB0sczmwixTgB72djxwe3NVB5YwvfaW2ftDwqsRx9r4Ocu5s +HN2r6wcZF78533mkg3Zz6vx9f4/APild1x/ZOjhHDgvTjz0Cb416DsW/0kGl +xmHjuceH4d61LaffD+igosnHzJVfPhAXTDsjM6yD/DWD4W87fSB4/97QwFEd +vPhe1flJpQ/YKIedk5jQQSfZtIriSz6wgfE54vC8Dh6yMdFc3uQDgd9C4rk4 +dfHj/T9ahP2HwFSj7q65ui52ula/Eu/xAqcNZnafNXTxmUz4+MBrLzjy9T2v +o7YuCkz71NU/9YKkhI8RXiRdnLmZozEU7AXto62Hwrfr4rX5syaOIl7glTao +XWyvi8FJE48l7TwhSnDdB/nzunjPyKPqzIg73ByLinkSoYtmk6AV8NkdsqrW +07ZF62IOiXHpXJk7NBzjzDeM08V3youpfUnuINjAn+xwXReFMtsXX+m7Q1qU +rGdili7e5o78137VDSp/Gy4vNOniWhDXu5rHrvCosdRj7xdd3BGfrz4W7gox +mToNeS26+DbQgqHt4grmjqp3vDt1Ufzdr0qiqCu0lkmSWr7r4qu2MfaFuAMw +Hvn3RN6cLh57Y/OFEuICYgKl416Selhs097N5r8P/o5p76mW1kP5RA6Va9b7 +oPd1HkNKTg+3HMuhg8Y+eHQyK655kx5u0y+mssw6g1rHLRVU10NRi1+JPMHO +YJQa5CGFeijB6f1SK9YJ/NW0u7946+EbFbGw368c4NSC5NJBXz1cTbiluCnN +Ac7VsElOHdHDlAa3/FNRDpDg1ObMfVwP14esrUWZOsDTmNNdRqF6OMjHfY/c +Yg8DvZWdhUl6mF9xdnxtxg4cLlt23CrVw2u/2Iz+7tgLB5x0FzaV6WGFbH3R +DtW94LVJRrygQg+XpPrG8wT3wknGlEPTaz2cu9+n2N+3B64OX2vf0KiHUc/L +7XJC90ADtbMt5JseGgz4ZnaU2gJ1yqvVmYuIFkuJ6rmmNiBWbppewUPEIe/I +EG4dG5i6uPW4HB8Rz51uso6QtYFUhRmeYSEidg0ZXPP6uRv+2Z01Pi5NxKNs +xnXOFruhqvxaQawGET3ztc5/EbCG7fGVVwvtibgc/VCystISJB0euYo5ETFb +bKFowz1L+KUYo3ZmHxHf1gt8Ox1iCekV5vW0g0QMOu2BXZqWwDrTuvbel8ic +95bkC5kWUOvw0//bWSI+2OIQ7XvbHHYqEXbxphMxr45Hg3rLFIom3yp4ZRAx +wKzSmC3EFJRKT/4pyyLi7MjUuQknU1hv8emhbw4R1ey/fvxPxhRqAmJ/1RYR +MVx2iIP2xARo5XPJoe+IGK9qpNbweicQ93wZGJ0gYqFE/cNA/h2QJRVeSpsm +4vlcx23O88YgOqyWeGuWiC41Ao8O9hjDXEicnvEfIn6xdC6of2IMBQ8gLnWN +iOZ5FeycRsag8eO5ur0QCXl2b22TO2cEmyMuna4hkXA2dKqul307VBhmsluR +SZjN7nfj/CSCzULV9TYKCUXvcZOwDeG0/3zu2HYSxmQnHVfMRKh3cfvOZ0XC +Wr9Dea4mCL4GRIv9biRUTyfnqssAPPv1XWoujoQdbiWdCkcoQMtbeRqWQMIi +T/lPX5ACzYfFiRxJJKxYmX9DF6fA0jcrG8kbJKy7cCV7a50hWHwqjcEHJJxe +77ArWdkQxnMuTybmk9A/77yRy5QBbPU2qFLuJqFg726PoUwSXFG0XoruJaEh +G+PUrgskmOv30BvoI6HbvOK7fi8SVO5LzEkdJKH8g9OHw5VIsMemP1l8knle +N/B+ZiYRzhheOM7Foo81/fafvF/oQb3gF4VJZX0UWFj+c75fB9Q/DbtYbtbH +yI0XCui1OnA9cSn52VZ9/MGzTVXsqQ64cCjxHdLQR+UdbXmGgTowvRK81Kev +j58apS6oseuA2Jh0y2dLfey2pslF6WiDd6VvTFGgPt7xVi4bf6oJU8fGQ3YG +6eNjQma/wxVNOC1z1K89WB+3pG7YMXpKEy6dC9izeFYfi+32CQQZa8JLcrA8 +JVYfG4SLvQOrNWClJLqi9q4+3r8zYnQZt8H1F6lzzbXMfOK/82JPqIL0Qfkx +zzp9FO21rq0xVYVMvvSeuXp9jCclR1BkVIF+LLNGrEkfQ4yMikbrt8JX1dyr ++zr18UW9qZnIpq2w+SlDbWBCH0/sMr8cObAZqtJavWZFDVC+zXL+ToIKfLNS +OBhMMMDpjfzV93xVgOXvMedlSQPcQCya+LRTBYxsOazZ5Q3QzH+LVxOLCtSt +I5Mkthqg3NTQE+kzytDo8ZBrO80AEytinepOKEG30pG8q4cM8MpVrnX34xRh ++XPJU9HDBtgbPNsZ4KcI0mFsj+/6GWB2G4uHv7UiHGi7n5xx3ABVLnU9HhdR +hG8XPkXQQw2w3nu2rOuxAoyO6O79lmSAfm5lhe7v5WHu6dqCRqkBlk3lThp7 +ysKIg0laPMMA3/l3xa4nykLn+stmg+UGeMuDOMLGJQvlbpJ3blcbIHf+Mv3V +CxmIIuiRV98b4AXPjI2iLDIgEHfkXEOvASpyXjjPlysFaj5tLN6sZLzrWtIr +qyEBsqLSzyrXk3F+WstXiUsCBGo9bAkcZPx6r+XIwUEC/JadefSBh4w6ecdf +B6UQoKyd21hblIwCE3X6ouwEMDPBC2v/kZFUIRLya1QMPJVzuO7uIqOUivcm +x2YRCH3rekTFhszUKzik/4UIXPUW+lCwh4y7XRo3P7gsAhWZZxI/OJJRRuPg +yVJzERBRMeNfdWfGS3H7H3wjDHUqwyJuwWQUi7X2oNQKwdbNcvIqD8nY9mTD +Y/1hAcD65oiCR2SMmRN2/1YvAA6+sd9pGWScsmjLK8oVgOink+mOz8gIB7kX +vgcJQO/mCuX4QjLqxjQYmnEIQNIWZ9WJd2QUaQrwkfDlg9mtN4gFM2TcUpBZ +/MCRBzobcafwbzJuv0IrJKrxQLX/1N6geTLyGJ90FVjHA0kF5oHEJTLKEzWd +Y3K4YSuZJbeMzRALsl/re7Nxg4f5MYVaMUMs6Rz/WFnJCa0+phtbKYa4ztXj +QZz7BijnmpfUA0NUTvS5c526AdJz0rfc3m6IPwxSx5slNsDx6VUTJxND3NG4 +w2W+mR14Q4oie3cbIluTLDBM2cEkVmFhyMMQPaqUbVfI64Gesfx9Ps4Qnxy0 +kQszYQWicdCCRYIhhvSpeO/bwgrF3yc2pl02xDMKwkc8N7JCgWwfyeK6Ib65 +Lv5qoXkd5KZUX069Z4hixzQmFD3WQVriBQPTPEOc/M89cXccC8QH8V9LaTFE +lVuqHENDqzRO4bisyTZD3H2The150SotNp+lwqjTEI3pyY5VMau0mKnZkYle +Qxx7l+BXqbxKO+/bStk+YoiV34+tSfqt0E643Bn7sWiI/IGTV+dZl2n7dmxC +Q1kKOsP2W3Fei7TVVk6+WnkKmiS4nHY1WKSleU/1WGyioGxAXuQ5vkXaSCwj +ZN9mCh6gsuy8wlignXi/+8UZbQpaRzV6sgkv0C5Zn5Olm1Cw+l1iUV3zPK3M +qW1FN4CCi6wvnvZF/aYd+FHWUBFIweIuSu/4wd80ltC0lB1BTG4UtNSm/qaZ +3PPTtTtDwdZhE8/AxV+05q/rjp6MpiB3PcMpK/AXbdxjW09+MgV/wIPRe/6z +NKljFxnbqikYGnr28jP5aVrS2iG9hBoK1p3gnVz+OUVjvW6SP/qGGd/rUJ1e +OkUbL2F/lvaegoOyrXU/d0/RylhiUoRaKKh6m3rvQMwkbd/NiJA/wxRMmJPs +sFv5SUspP6NXyUNFv5LBJ47KP2gbrZ3zJfmo+LBqbP/upTFaxDd99RABKq5p +f/uR+GmM5su+qKQpSsUQJ5nxjtAxGml3sEi6LBXFxtr+PmodpbUPnPh9QYuK +J4oktubeHKGJch/N3+VIxQH677Ih4yFahnFY6IwzFStuTfC8kR6iaYclGd9w +oWJv6oz0z/lBmvXMy7ZOdypKBMRf5Xs2SIttn//reZSKwkL6ng+EBmmL6eFG +oZFUvKnv63Li13dat+GNlqwcKsrfUnIqq+2n+Z7KuG+eR8Vg7FjMvNBP+5NX +7D3xkorrn9GW15v104QUOxe0SqiYIvx4VaKpj2bJKSP9qpqKM1xNqpf6v9Iq +WrO8WtqoWL7SPtIp1kuz4KOrB3dS0UQ6KzW1v4fWafr+D6GHeR//kzkfnvbQ +5sp+xrl+o2KTqPtPJ0oPTf2R5vMf41RM6DV3VvPtplV0bw9OnKTixN5z7BK6 +3TQLkb2gMUPFl5vDT/qwdNMOXTz1JWieimebuL+r3O2izVXH3hVfpOKfat/4 +2z5dtKilZM+yJSqOzFB3eut10QR0n6kdWKWiKDvd7zpbFy31WNn82hoV6aek +7WWaO2n/AyCK44Y= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09820630038548193}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09820630038548193}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9938326066823387`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"198bc42c-8505-4146-bb0e-99d9ad744d1f"] +}, Open ]], Cell[CellGroupData[{ @@ -8525,66 +16296,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[308]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], + "In[142]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.611115182999938`*^-175\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 308, 309, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133920579224*^9}, +Cell[BoxData["2.2301496494675237`"], "Output", + CellChangeTimes->{3.9913392124888554`*^9, 3.993832673799151*^9}, CellLabel-> - "During evaluation of \ -In[308]:=",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5007447195984937`*^-178\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 308, 310, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058022385`*^9}, - CellLabel-> - "During evaluation of \ -In[308]:=",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1145242877114216`*^-181\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 308, 311, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339205811241*^9}, - CellLabel-> - "During evaluation of \ -In[308]:=",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 308, 312, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058197193`*^9}, - CellLabel-> - "During evaluation of \ -In[308]:=",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], - -Cell[BoxData["9.33220071900515`"], "Output", - CellChangeTimes->{3.9913392124888554`*^9}, - CellLabel-> - "Out[308]=",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] + "Out[142]=",ExpressionUUID->"6513baf9-040e-4564-9b9f-21421b114177"] }, Open ]], Cell[CellGroupData[{ @@ -8651,68 +16368,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849547748472*^9, - 3.9918495528702526`*^9}},ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-\ -0895c02ffd8f"], + CellChangeTimes->{{3.991849547748472*^9, 3.9918495528702526`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 309, 313, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125258827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.443865444559271`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 65, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.99383267382897*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], +In[143]:=",ExpressionUUID->"62de6681-596e-410f-9bba-dc31f9960161"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 314, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339212535879*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9537700915237925`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 66, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.993832673833952*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], +In[143]:=",ExpressionUUID->"1ed07d3a-150b-45ee-9dbe-aaf6eba77b42"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 315, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125438805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.108410776200172`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 67, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.993832673838703*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], +In[143]:=",ExpressionUUID->"b7f18343-91ea-4ce9-8ba9-6d26167be967"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 309, 316, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125518837`*^9}, +during this calculation.\"", 2, 143, 68, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.9938326738429117`*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], +In[143]:=",ExpressionUUID->"9e7f55f5-59b7-464b-a7ba-4a5d6965d66d"], -Cell[BoxData["0.41157157699018565`"], "Output", - CellChangeTimes->{3.9913392196090164`*^9}, +Cell[BoxData["1.9279281031351894`"], "Output", + CellChangeTimes->{3.9913392196090164`*^9, 3.993832681770549*^9}, CellLabel-> - "Out[309]=",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] + "Out[143]=",ExpressionUUID->"7f7213a3-f017-4598-80e0-59be453b712a"] }, Open ]], Cell[CellGroupData[{ @@ -8733,8 +16460,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8779,68 +16505,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918495568340263`*^9, - 3.991849559359928*^9}},ExpressionUUID->"57976ffc-56f1-604b-8519-\ -bead95265db8"], + CellChangeTimes->{{3.9918495568340263`*^9, 3.991849559359928*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 310, 317, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196440163`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.443865444559271`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 69, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.993832681800708*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], +In[144]:=",ExpressionUUID->"265bbb09-f92d-48f7-857f-83e8b3eb295b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 318, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196535416`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9537700915237925`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 70, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.993832681805717*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], +In[144]:=",ExpressionUUID->"23f80a49-41e9-4d27-bbcd-a72efcacf20b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 319, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219661541*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.108410776200172`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 71, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.9938326818103952`*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], +In[144]:=",ExpressionUUID->"4b533757-a57c-411b-ae55-d63a0285bbdd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 310, 320, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219670542*^9}, +during this calculation.\"", 2, 144, 72, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.99383268181455*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], +In[144]:=",ExpressionUUID->"b3ab5ae8-b119-432c-8d6f-d06993b81b84"], -Cell[BoxData["3.215201591157595`"], "Output", - CellChangeTimes->{3.9913392268711624`*^9}, +Cell[BoxData["16.371563683246453`"], "Output", + CellChangeTimes->{3.9913392268711624`*^9, 3.9938326896618032`*^9}, CellLabel-> - "Out[310]=",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] + "Out[144]=",ExpressionUUID->"7ba38c6a-bf27-42a6-8023-313d8ecaccef"] }, Open ]], Cell[CellGroupData[{ @@ -8861,8 +16597,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8907,68 +16642,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849563755764*^9, - 3.991849566543682*^9}},ExpressionUUID->"cfa37210-3ae7-3f49-b290-\ -f19508c6d2f1"], + CellChangeTimes->{{3.991849563755764*^9, 3.991849566543682*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 311, 321, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226907137*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.443865444559271`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 73, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.993832689694475*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], +In[145]:=",ExpressionUUID->"bc5c1bed-46c6-43f1-ad3f-b58562534801"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 322, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226917137*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9537700915237925`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 74, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.9938326897012568`*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], +In[145]:=",ExpressionUUID->"8eaec43b-8378-4aab-bc1d-36285c9c21ab"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 323, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269251385`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.108410776200172`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 75, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.993832689707388*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], +In[145]:=",ExpressionUUID->"5fa62497-5d48-46fc-a1be-e9d21d840ccc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 311, 324, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269341373`*^9}, +during this calculation.\"", 2, 145, 76, 25990558319054262605, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.99383268971248*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], +In[145]:=",ExpressionUUID->"69be7bc9-ef85-48c8-87fe-ae528980aa07"], -Cell[BoxData["16.94395627212904`"], "Output", - CellChangeTimes->{3.9913392304284153`*^9}, +Cell[BoxData["0.46503673723382766`"], "Output", + CellChangeTimes->{3.9913392304284153`*^9, 3.993832694587894*^9}, CellLabel-> - "Out[311]=",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] + "Out[145]=",ExpressionUUID->"364a6980-125d-4c32-ab61-2ab481d47c67"] }, Open ]], Cell[CellGroupData[{ @@ -8977,20 +16722,21 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849569404436*^9, - 3.991849573855135*^9}},ExpressionUUID->"7457b456-6d32-5b44-9679-\ -346c5f5ac532"], - -Cell[BoxData["0.05576142449710889`"], "Output", - CellChangeTimes->{3.9913392304624157`*^9}, + CellChangeTimes->{{3.991849569404436*^9, 3.991849573855135*^9}}, CellLabel-> - "Out[312]=",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] + "In[146]:=",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], + +Cell[BoxData["0.6987183060542116`"], "Output", + CellChangeTimes->{3.9913392304624157`*^9, 3.9938326946120453`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"49e476a3-525b-438d-ab26-2fff2307cf1f"] }, Open ]] }, -WindowSize->{718.5, 729.75}, -WindowMargins->{{1.5, Automatic}, {Automatic, 8.25}}, +Evaluator->"kernel 1", +WindowSize->{1440, 882}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, -FrontEndVersion->"14.1 for Microsoft Windows (64-bit) (July 16, 2024)", +FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"e3389233-59d2-de40-a8d1-08f2aab11400" ] @@ -9005,357 +16751,626 @@ CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ -Cell[554, 20, 147, 4, 28, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], -Cell[704, 26, 154, 3, 28, "Input",ExpressionUUID->"93cad80c-1de7-2e4b-9b8c-14a272e65d1f"], -Cell[861, 31, 149, 4, 28, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], -Cell[1013, 37, 152, 3, 28, "Input",ExpressionUUID->"15fe72e6-19f0-9540-b29f-3056e2e0b957"], Cell[CellGroupData[{ -Cell[1190, 44, 1301, 43, 113, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[2494, 89, 178, 3, 32, "Output",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[576, 22, 449, 7, 36, "Input",ExpressionUUID->"91c042c3-b0e3-4e83-975c-3369faa5d4a0"], +Cell[1028, 31, 349, 5, 41, "Output",ExpressionUUID->"ab7ebc4e-f146-4269-ac79-a2d960bfeb46"] }, Open ]], Cell[CellGroupData[{ -Cell[2709, 97, 910, 31, 56, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[3622, 130, 175, 3, 32, "Output",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[1414, 41, 197, 3, 36, "Input",ExpressionUUID->"9d0661dc-011b-49d3-855a-42aeb76418ab"], +Cell[1614, 46, 349, 5, 41, "Output",ExpressionUUID->"e9826998-7c04-44ea-b2a8-938cf842faf8"] }, Open ]], Cell[CellGroupData[{ -Cell[3834, 138, 885, 30, 56, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[4722, 170, 177, 3, 32, "Output",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[2000, 56, 221, 4, 36, "Input",ExpressionUUID->"ed3556fa-e0b6-47d6-ab80-a7d942fd6384"], +Cell[2224, 62, 374, 6, 41, "Output",ExpressionUUID->"7086f9f3-23a3-4ff7-8e21-4cf89ab3b014"] }, Open ]], Cell[CellGroupData[{ -Cell[4936, 178, 558, 19, 52, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[5497, 199, 173, 3, 32, "Output",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[2635, 73, 175, 3, 36, "Input",ExpressionUUID->"0141e23b-ea85-41e9-8f2d-152089eb19ba"], +Cell[2813, 78, 351, 5, 41, "Output",ExpressionUUID->"edacc7af-0749-4cb7-8659-2bb73359092f"] }, Open ]], Cell[CellGroupData[{ -Cell[5707, 207, 623, 21, 52, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[6333, 230, 170, 3, 32, "Output",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[3201, 88, 257, 7, 54, "Input",ExpressionUUID->"53dce238-d774-42bc-af8e-749dfa0807b2"], +Cell[3461, 97, 364, 5, 41, "Output",ExpressionUUID->"b20758e7-30d7-454b-bc7c-cfd87ecd3f75"] }, Open ]], Cell[CellGroupData[{ -Cell[6540, 238, 170, 5, 56, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[6713, 245, 173, 3, 32, "Output",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[3862, 107, 131, 2, 36, "Input",ExpressionUUID->"c0c425fa-817f-465d-a2cd-4cafbfc8e6f8"], +Cell[3996, 111, 347, 5, 41, "Output",ExpressionUUID->"0631481e-d0d9-423b-a5e6-0c59ae084a36"] }, Open ]], Cell[CellGroupData[{ -Cell[6923, 253, 170, 5, 55, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[7096, 260, 170, 3, 70, "Output",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[4380, 121, 276, 6, 36, "Input",ExpressionUUID->"eed55c7e-d569-43d6-8b19-f199771ed175"], +Cell[4659, 129, 364, 5, 41, "Output",ExpressionUUID->"9eb8f274-742a-4b43-93ff-f4dbaff8e424"] }, Open ]], Cell[CellGroupData[{ -Cell[7303, 268, 181, 5, 70, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[7487, 275, 171, 3, 70, "Output",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[5060, 139, 257, 7, 36, "Input",ExpressionUUID->"a6ebe1f1-a004-4ee9-90b3-4605561b9f29"], +Cell[5320, 148, 357, 5, 41, "Output",ExpressionUUID->"eb77d270-5f98-4b8d-9526-04e3eadd5382"] }, Open ]], Cell[CellGroupData[{ -Cell[7695, 283, 181, 5, 70, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[7879, 290, 173, 3, 70, "Output",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[5714, 158, 223, 4, 36, "Input",ExpressionUUID->"8c153969-da96-4a69-abcf-dd84d5addfb3"], +Cell[5940, 164, 328, 5, 41, "Output",ExpressionUUID->"3d5e22ff-eacb-46f8-ad6b-90fd65f23e07"] }, Open ]], Cell[CellGroupData[{ -Cell[8089, 298, 6055, 185, 70, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[14147, 485, 175, 3, 70, "Output",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[6305, 174, 228, 4, 36, "Input",ExpressionUUID->"2b54bfd5-7e59-4d9a-8c8a-6246b21d5ea2"], +Cell[6536, 180, 327, 5, 41, "Output",ExpressionUUID->"caa2cfd1-4352-443f-b60b-4d192e3dd7e2"] }, Open ]], Cell[CellGroupData[{ -Cell[14359, 493, 368, 9, 70, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[14730, 504, 170, 3, 70, "Output",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[6900, 190, 129, 2, 36, "Input",ExpressionUUID->"f7b85781-072b-47a1-a90c-8fd2a4920d95"], +Cell[7032, 194, 343, 5, 41, "Output",ExpressionUUID->"5096dc70-234f-483c-b323-d1b63254b34e"] }, Open ]], Cell[CellGroupData[{ -Cell[14937, 512, 6122, 187, 70, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[21062, 701, 175, 3, 70, "Output",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[7412, 204, 129, 2, 36, "Input",ExpressionUUID->"9fd200d4-3977-4a25-bd84-13a0e1e6e34d"], +Cell[7544, 208, 342, 5, 41, "Output",ExpressionUUID->"f1079bf0-2697-4cd9-9f5f-2a20a73674bc"] }, Open ]], Cell[CellGroupData[{ -Cell[21274, 709, 368, 9, 70, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[21645, 720, 172, 3, 70, "Output",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[7923, 218, 557, 19, 100, "Input",ExpressionUUID->"6178d80c-38f1-40d4-a210-9cfc5ac8e869"], +Cell[8483, 239, 366, 5, 41, "Output",ExpressionUUID->"c58b16cb-30f6-4fc5-802f-dde37ee713c5"] }, Open ]], Cell[CellGroupData[{ -Cell[21854, 728, 2663, 88, 70, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[24520, 818, 173, 3, 70, "Output",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[8886, 249, 557, 19, 100, "Input",ExpressionUUID->"12c1bf8b-f44c-444c-9b33-a548f11acf4f"], +Cell[9446, 270, 368, 5, 41, "Output",ExpressionUUID->"b7089e32-a814-4f62-8c32-54d25f9b7236"] }, Open ]], Cell[CellGroupData[{ -Cell[24730, 826, 2603, 85, 70, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[27336, 913, 172, 3, 70, "Output",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[9851, 280, 1492, 48, 101, "Input",ExpressionUUID->"921777e5-f822-4aa9-9ce2-260540e91df9"], +Cell[11346, 330, 360, 5, 41, "Output",ExpressionUUID->"93406757-d14f-4327-a9e8-36930a045ee9"] }, Open ]], Cell[CellGroupData[{ -Cell[27545, 921, 3712, 118, 70, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[31260, 1041, 174, 3, 70, "Output",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] -}, Open ]], -Cell[31449, 1047, 138, 3, 70, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], -Cell[CellGroupData[{ -Cell[31612, 1054, 2052, 59, 70, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], -Cell[33667, 1115, 524, 11, 70, "Message",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], -Cell[34194, 1128, 526, 11, 70, "Message",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], -Cell[34723, 1141, 530, 11, 70, "Message",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], -Cell[35256, 1154, 455, 10, 70, "Message",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], -Cell[35714, 1166, 172, 3, 70, "Output",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[11743, 340, 1331, 44, 101, "Input",ExpressionUUID->"27bd1d5e-1b1b-4daf-ba92-bf0cf51d0d2e"], +Cell[13077, 386, 377, 6, 41, "Output",ExpressionUUID->"e02838e9-1daf-4c29-a77b-96edd64c02f1"] }, Open ]], Cell[CellGroupData[{ -Cell[35923, 1174, 2054, 59, 70, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], -Cell[37980, 1235, 524, 11, 70, "Message",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], -Cell[38507, 1248, 526, 11, 70, "Message",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], -Cell[39036, 1261, 528, 11, 70, "Message",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], -Cell[39567, 1274, 456, 10, 70, "Message",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], -Cell[40026, 1286, 170, 3, 70, "Output",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[13491, 397, 1331, 44, 101, "Input",ExpressionUUID->"3fa33677-f823-4acd-9f31-42f576e5c1f1"], +Cell[14825, 443, 386, 6, 41, "Output",ExpressionUUID->"340a018d-89c1-428e-bcc5-d04b5f989bc9"] }, Open ]], Cell[CellGroupData[{ -Cell[40233, 1294, 1938, 53, 70, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], -Cell[42174, 1349, 19981, 375, 70, "Output",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] +Cell[15248, 454, 1492, 48, 101, "Input",ExpressionUUID->"dd8e1b0c-ea15-4676-a512-f71cc587cae9"], +Cell[16743, 504, 357, 5, 41, "Output",ExpressionUUID->"3c4147fd-71cf-4f1e-9b0b-f346327eec54"] }, Open ]], Cell[CellGroupData[{ -Cell[62192, 1729, 2092, 60, 70, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], -Cell[64287, 1791, 490, 11, 70, "Message",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], -Cell[64780, 1804, 493, 11, 70, "Message",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], -Cell[65276, 1817, 508, 11, 70, "Message",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], -Cell[65787, 1830, 456, 10, 70, "Message",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], -Cell[66246, 1842, 61603, 1057, 70, "Output",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] -}, Open ]], -Cell[127864, 2902, 232, 6, 70, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], -Cell[128099, 2910, 209, 5, 70, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], -Cell[CellGroupData[{ -Cell[128333, 2919, 217, 7, 70, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[128553, 2928, 169, 3, 70, "Output",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[17137, 514, 131, 2, 36, "Input",ExpressionUUID->"4ac8ad99-68c3-451f-918e-9148b4d9dcee"], +Cell[17271, 518, 346, 5, 41, "Output",ExpressionUUID->"77d5defa-26ab-4472-8163-986e0987cb1a"] }, Open ]], Cell[CellGroupData[{ -Cell[128759, 2936, 1816, 53, 70, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], -Cell[130578, 2991, 502, 11, 70, "Message",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], -Cell[131083, 3004, 506, 11, 70, "Message",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], -Cell[131592, 3017, 509, 11, 70, "Message",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], -Cell[132104, 3030, 456, 10, 70, "Message",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], -Cell[132563, 3042, 28560, 514, 70, "Output",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] +Cell[17654, 528, 133, 2, 36, "Input",ExpressionUUID->"8110a703-65b9-407e-adcf-5f710d77baf6"], +Cell[17790, 532, 346, 5, 41, "Output",ExpressionUUID->"97a457e7-0056-46fe-99f5-00b955886529"] }, Open ]], Cell[CellGroupData[{ -Cell[161160, 3561, 1616, 48, 70, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], -Cell[162779, 3611, 576, 12, 70, "Message",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], -Cell[163358, 3625, 582, 12, 70, "Message",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], -Cell[163943, 3639, 584, 12, 70, "Message",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], -Cell[164530, 3653, 458, 10, 70, "Message",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], -Cell[164991, 3665, 170, 3, 70, "Output",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[18173, 542, 134, 2, 36, "Input",ExpressionUUID->"1b4e0ac1-95a3-41bf-a1e5-53883e17c52c"], +Cell[18310, 546, 352, 5, 41, "Output",ExpressionUUID->"68f0be24-8814-4778-a2ea-c904813fb035"] }, Open ]], Cell[CellGroupData[{ -Cell[165198, 3673, 2247, 64, 70, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], -Cell[167448, 3739, 522, 11, 70, "Message",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], -Cell[167973, 3752, 526, 11, 70, "Message",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], -Cell[168502, 3765, 528, 11, 70, "Message",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], -Cell[169033, 3778, 458, 10, 70, "Message",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], -Cell[169494, 3790, 175, 3, 70, "Output",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[18699, 556, 219, 4, 36, "Input",ExpressionUUID->"c8210f27-2458-4ecf-9bd5-84f42db96d9e"], +Cell[18921, 562, 363, 6, 41, "Output",ExpressionUUID->"b2b69bb6-488a-4438-9d7d-4bcf23b09ae6"] }, Open ]], Cell[CellGroupData[{ -Cell[169706, 3798, 2221, 64, 70, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], -Cell[171930, 3864, 522, 11, 70, "Message",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], -Cell[172455, 3877, 524, 11, 70, "Message",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], -Cell[172982, 3890, 528, 11, 70, "Message",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], -Cell[173513, 3903, 458, 10, 70, "Message",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], -Cell[173974, 3915, 170, 3, 70, "Output",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] +Cell[19321, 573, 134, 2, 36, "Input",ExpressionUUID->"849e2a5e-bbc5-46b4-a193-4079b9725dab"], +Cell[19458, 577, 352, 5, 41, "Output",ExpressionUUID->"944ff0e6-3e05-40d7-81cd-d06a2412b4e4"] }, Open ]], Cell[CellGroupData[{ -Cell[174181, 3923, 2221, 64, 70, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], -Cell[176405, 3989, 524, 11, 70, "Message",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], -Cell[176932, 4002, 526, 11, 70, "Message",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], -Cell[177461, 4015, 530, 11, 70, "Message",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], -Cell[177994, 4028, 458, 10, 70, "Message",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], -Cell[178455, 4040, 171, 3, 70, "Output",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] +Cell[19847, 587, 327, 5, 36, "Input",ExpressionUUID->"c4b89404-8903-4567-b31f-e8a301e64cad"], +Cell[20177, 594, 346, 5, 41, "Output",ExpressionUUID->"881facd6-6f02-4447-b6bf-c8f652b9d8cc"] }, Open ]], Cell[CellGroupData[{ -Cell[178663, 4048, 215, 6, 70, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], -Cell[178881, 4056, 175, 3, 70, "Output",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] -}, Open ]], -Cell[179071, 4062, 245, 5, 70, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], -Cell[CellGroupData[{ -Cell[179341, 4071, 558, 19, 70, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[179902, 4092, 172, 3, 70, "Output",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] +Cell[20560, 604, 296, 5, 36, "Input",ExpressionUUID->"2130f05a-4798-4bc5-b6ea-c00e71a41d75"], +Cell[20859, 611, 345, 5, 41, "Output",ExpressionUUID->"96749af5-b711-4b9f-9cd7-fa2b380791fe"] }, Open ]], Cell[CellGroupData[{ -Cell[180111, 4100, 170, 5, 70, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[180284, 4107, 172, 3, 70, "Output",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] +Cell[21241, 621, 219, 4, 36, "Input",ExpressionUUID->"961af454-ffb7-435a-8c42-2a2e11fec3df"], +Cell[21463, 627, 340, 5, 41, "Output",ExpressionUUID->"ac59449e-f75d-421b-bdbf-30bc0109449b"] }, Open ]], Cell[CellGroupData[{ -Cell[180493, 4115, 181, 5, 70, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[180677, 4122, 172, 3, 70, "Output",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] +Cell[21840, 637, 350, 10, 54, "Input",ExpressionUUID->"154476ff-dfa5-4da0-9230-1cfe866355d5"], +Cell[22193, 649, 371, 5, 41, "Output",ExpressionUUID->"bd8b590c-e246-4627-b1dd-78578954354a"] }, Open ]], Cell[CellGroupData[{ -Cell[180886, 4130, 6055, 185, 70, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[186944, 4317, 174, 3, 70, "Output",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] +Cell[22601, 659, 350, 10, 54, "Input",ExpressionUUID->"365b8ce8-845f-470a-8787-5177b494a3b3"], +Cell[22954, 671, 386, 6, 41, "Output",ExpressionUUID->"14438b27-9290-4c07-a43a-0577d073cf92"] }, Open ]], Cell[CellGroupData[{ -Cell[187155, 4325, 368, 9, 70, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[187526, 4336, 173, 3, 70, "Output",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] +Cell[23377, 682, 994, 26, 55, "Input",ExpressionUUID->"4a9ee132-7ce9-44b4-9e3e-0ec35661c577"], +Cell[24374, 710, 361, 5, 41, "Output",ExpressionUUID->"5989dddd-868c-4f0c-a489-aa2e5efc829d"] }, Open ]], Cell[CellGroupData[{ -Cell[187736, 4344, 6122, 187, 70, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[193861, 4533, 175, 3, 70, "Output",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] +Cell[24772, 720, 199, 3, 36, "Input",ExpressionUUID->"210345c7-a92f-4e31-ae2d-724aceec1095"], +Cell[24974, 725, 344, 5, 41, "Output",ExpressionUUID->"b908c88f-be87-4f74-8ee5-b2cc6847c0c5"] }, Open ]], Cell[CellGroupData[{ -Cell[194073, 4541, 368, 9, 70, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[194444, 4552, 170, 3, 70, "Output",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] +Cell[25355, 735, 325, 5, 36, "Input",ExpressionUUID->"22792afb-dfc9-4816-b99d-7721649c35e5"], +Cell[25683, 742, 328, 5, 41, "Output",ExpressionUUID->"8d61a3cf-b066-4a87-a9d1-fc494c6c0beb"] +}, Open ]], +Cell[26026, 750, 173, 2, 36, "Input",ExpressionUUID->"c47b547b-242a-42c6-a2e2-fed9d62004dd"], +Cell[CellGroupData[{ +Cell[26224, 756, 327, 5, 36, "Input",ExpressionUUID->"023e6c8d-4118-40f6-b47f-4ce1d37c6899"], +Cell[26554, 763, 320, 5, 41, "Output",ExpressionUUID->"a5128bfd-cc58-422f-96da-ef115486a597"] +}, Open ]], +Cell[26889, 771, 173, 2, 36, "Input",ExpressionUUID->"1435c890-b2c7-455d-b5ae-264047225934"], +Cell[CellGroupData[{ +Cell[27087, 777, 332, 5, 36, "Input",ExpressionUUID->"ac17b749-2795-47e3-bfc2-0400dcf9bd31"], +Cell[27422, 784, 325, 5, 41, "Output",ExpressionUUID->"57df8d98-a655-46cb-91e0-2835cc32f81c"] +}, Open ]], +Cell[27762, 792, 173, 2, 36, "Input",ExpressionUUID->"d3464c76-8fd5-42ab-81f8-46c52a23f343"], +Cell[CellGroupData[{ +Cell[27960, 798, 351, 5, 36, "Input",ExpressionUUID->"7fdeb472-be54-4c0a-9564-b0a5286100e6"], +Cell[28314, 805, 328, 5, 41, "Output",ExpressionUUID->"ad8be78a-cc7b-4ef8-adfd-0a8dfd8551a2"] +}, Open ]], +Cell[28657, 813, 171, 2, 36, "Input",ExpressionUUID->"46601963-75c6-4e31-a471-e2ba9e363bff"], +Cell[CellGroupData[{ +Cell[28853, 819, 298, 5, 36, "Input",ExpressionUUID->"baa6b955-9806-4355-9b16-eb06d9ab7902"], +Cell[29154, 826, 323, 5, 41, "Output",ExpressionUUID->"442a6f5f-457f-4a8a-95b6-902af920f2bc"] +}, Open ]], +Cell[29492, 834, 171, 2, 36, "Input",ExpressionUUID->"79e5ff17-2ad5-4c4e-ab17-41be2bb325e9"], +Cell[CellGroupData[{ +Cell[29688, 840, 303, 5, 36, "Input",ExpressionUUID->"fcfe7f26-557f-46af-b233-6a97e1ef2b38"], +Cell[29994, 847, 329, 5, 41, "Output",ExpressionUUID->"b555bc1c-7622-4e20-9d68-1412c425a6f4"] +}, Open ]], +Cell[30338, 855, 173, 2, 36, "Input",ExpressionUUID->"318d2e77-961e-4bdd-b347-666c81aeb0a3"], +Cell[CellGroupData[{ +Cell[30536, 861, 306, 5, 36, "Input",ExpressionUUID->"47cc8a18-cb23-44bc-9a9c-72bce0cf18de"], +Cell[30845, 868, 326, 5, 41, "Output",ExpressionUUID->"c55f1af2-27af-465f-aa2e-55abec1577ac"] +}, Open ]], +Cell[31186, 876, 172, 2, 36, "Input",ExpressionUUID->"9fa9eaa3-0f66-476e-88bd-65709e15bfe5"], +Cell[CellGroupData[{ +Cell[31383, 882, 275, 4, 36, "Input",ExpressionUUID->"9da204da-359a-4547-b1ad-c3cfaf655d55"], +Cell[31661, 888, 325, 5, 41, "Output",ExpressionUUID->"603cd4f9-91e9-4b31-8a6a-df4aa954886c"] +}, Open ]], +Cell[32001, 896, 175, 2, 36, "Input",ExpressionUUID->"56776e1f-f4c6-410e-a503-b1411b19b44a"], +Cell[CellGroupData[{ +Cell[32201, 902, 19809, 485, 1708, "Input",ExpressionUUID->"20453ecd-d4cd-41ed-af96-8ad56dc5e1af"], +Cell[52013, 1389, 361, 5, 41, "Output",ExpressionUUID->"0efa75be-3069-4fb0-a4e3-f4955cda4066"] }, Open ]], Cell[CellGroupData[{ -Cell[194651, 4560, 2663, 88, 70, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[197317, 4650, 173, 3, 70, "Output",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] +Cell[52411, 1399, 19748, 489, 1720, "Input",ExpressionUUID->"5109848b-b8a6-4b2c-bd1f-1dead52f9fe0"], +Cell[72162, 1890, 361, 5, 41, "Output",ExpressionUUID->"05fedd26-a390-470f-90b0-75e64afd7210"] }, Open ]], Cell[CellGroupData[{ -Cell[197527, 4658, 2603, 85, 70, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[200133, 4745, 172, 3, 70, "Output",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] +Cell[72560, 1900, 19748, 483, 1720, "Input",ExpressionUUID->"f667fedb-72a6-4140-a160-667842afb873"], +Cell[92311, 2385, 376, 6, 41, "Output",ExpressionUUID->"3665c4fd-dfc6-4774-bd04-643c9966c7f1"] }, Open ]], Cell[CellGroupData[{ -Cell[200342, 4753, 3712, 118, 70, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[204057, 4873, 174, 3, 70, "Output",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] +Cell[92724, 2396, 22534, 553, 1885, "Input",ExpressionUUID->"c2af5ae9-0080-4307-8e33-fd75018ec265"], +Cell[115261, 2951, 379, 6, 41, "Output",ExpressionUUID->"f517cb08-8dae-4b83-9e07-eb88f2836029"] }, Open ]], Cell[CellGroupData[{ -Cell[204268, 4881, 2052, 59, 70, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], -Cell[206323, 4942, 574, 12, 70, "Message",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], -Cell[206900, 4956, 580, 12, 70, "Message",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], -Cell[207483, 4970, 582, 12, 70, "Message",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], -Cell[208068, 4984, 456, 10, 70, "Message",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], -Cell[208527, 4996, 171, 3, 70, "Output",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] +Cell[115677, 2962, 22535, 553, 1885, "Input",ExpressionUUID->"86761029-651c-484b-8ff7-029b08caf708"], +Cell[138215, 3517, 379, 6, 41, "Output",ExpressionUUID->"ff18c83c-b959-4a7e-9bde-4476839cdd54"] }, Open ]], Cell[CellGroupData[{ -Cell[208735, 5004, 2054, 59, 70, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], -Cell[210792, 5065, 574, 12, 70, "Message",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], -Cell[211369, 5079, 578, 12, 70, "Message",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], -Cell[211950, 5093, 582, 12, 70, "Message",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], -Cell[212535, 5107, 458, 10, 70, "Message",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], -Cell[212996, 5119, 169, 3, 70, "Output",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] +Cell[138631, 3528, 25491, 626, 2078, "Input",ExpressionUUID->"c203a4a6-91ac-491b-b7c9-a5efdb320f0c"], +Cell[164125, 4156, 380, 6, 41, "Output",ExpressionUUID->"22dd7a66-d1ca-40ba-987a-3d2bb1480999"] }, Open ]], Cell[CellGroupData[{ -Cell[213202, 5127, 2030, 55, 70, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], -Cell[215235, 5184, 20326, 381, 70, "Output",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] -}, Open ]], -Cell[235576, 5568, 2144, 61, 70, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], -Cell[237723, 5631, 138, 3, 70, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], -Cell[CellGroupData[{ -Cell[237886, 5638, 1616, 48, 70, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], -Cell[239505, 5688, 592, 12, 70, "Message",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], -Cell[240100, 5702, 597, 12, 70, "Message",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], -Cell[240700, 5716, 599, 12, 70, "Message",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], -Cell[241302, 5730, 458, 10, 70, "Message",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], -Cell[241763, 5742, 172, 3, 70, "Output",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] +Cell[164542, 4167, 130, 2, 36, "Input",ExpressionUUID->"87f6dcae-b949-4443-9cb1-e5a0d99bcfbd"], +Cell[164675, 4171, 344, 5, 41, "Output",ExpressionUUID->"efe875cd-9a46-402e-b48d-3b8ae0caff71"] }, Open ]], Cell[CellGroupData[{ -Cell[241972, 5750, 2249, 64, 70, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], -Cell[244224, 5816, 576, 12, 70, "Message",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], -Cell[244803, 5830, 580, 12, 70, "Message",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], -Cell[245386, 5844, 582, 12, 70, "Message",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], -Cell[245971, 5858, 456, 10, 70, "Message",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], -Cell[246430, 5870, 171, 3, 70, "Output",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] +Cell[165056, 4181, 130, 2, 36, "Input",ExpressionUUID->"5f55bb76-dbc1-4a43-ae45-e5cab7ad5437"], +Cell[165189, 4185, 347, 5, 41, "Output",ExpressionUUID->"faa8a46e-5e4e-4c04-8aa2-70432d39f385"] }, Open ]], Cell[CellGroupData[{ -Cell[246638, 5878, 2223, 64, 70, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], -Cell[248864, 5944, 574, 12, 70, "Message",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], -Cell[249441, 5958, 578, 12, 70, "Message",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], -Cell[250022, 5972, 580, 12, 70, "Message",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], -Cell[250605, 5986, 458, 10, 70, "Message",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], -Cell[251066, 5998, 173, 3, 70, "Output",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] +Cell[165573, 4195, 1144, 39, 73, "Input",ExpressionUUID->"1f0266ba-bfbc-4946-bd93-d28fd49109ec"], +Cell[166720, 4236, 360, 5, 41, "Output",ExpressionUUID->"b3dac642-717f-4a45-a2a0-e50509654c34"] }, Open ]], Cell[CellGroupData[{ -Cell[251276, 6006, 2221, 64, 70, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], -Cell[253500, 6072, 574, 12, 70, "Message",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], -Cell[254077, 6086, 578, 12, 70, "Message",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], -Cell[254658, 6100, 582, 12, 70, "Message",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], -Cell[255243, 6114, 455, 10, 70, "Message",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], -Cell[255701, 6126, 170, 3, 70, "Output",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] +Cell[167117, 4246, 1041, 35, 73, "Input",ExpressionUUID->"616d142a-5d05-4636-a362-d0a933565c7f"], +Cell[168161, 4283, 377, 6, 41, "Output",ExpressionUUID->"cd46238a-42e0-482b-ae31-54625ab997a4"] }, Open ]], Cell[CellGroupData[{ -Cell[255908, 6134, 215, 6, 70, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], -Cell[256126, 6142, 174, 3, 70, "Output",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] -}, Open ]], -Cell[256315, 6148, 249, 5, 70, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], -Cell[CellGroupData[{ -Cell[256589, 6157, 558, 19, 70, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[257150, 6178, 169, 3, 70, "Output",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] +Cell[168575, 4294, 1144, 39, 73, "Input",ExpressionUUID->"4d6c0fc0-fa7d-429a-9283-a7dcacbc5086"], +Cell[169722, 4335, 363, 5, 41, "Output",ExpressionUUID->"b675a6c5-8f07-4187-a2ff-eeaf502d82b5"] }, Open ]], Cell[CellGroupData[{ -Cell[257356, 6186, 170, 5, 70, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[257529, 6193, 173, 3, 70, "Output",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] +Cell[170122, 4345, 108, 1, 36, "Input",ExpressionUUID->"d88dc389-8d90-45b7-9e97-1fe2544ddabc"], +Cell[170233, 4348, 366, 5, 41, "Output",ExpressionUUID->"d34469ef-820d-4460-8b60-015081041515"] }, Open ]], Cell[CellGroupData[{ -Cell[257739, 6201, 181, 5, 70, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[257923, 6208, 173, 3, 70, "Output",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] +Cell[170636, 4358, 108, 1, 36, "Input",ExpressionUUID->"94a2fd30-2147-431f-8649-49ed73463b45"], +Cell[170747, 4361, 383, 6, 41, "Output",ExpressionUUID->"e8ce160b-ee99-4453-9825-f3242c32beff"] }, Open ]], Cell[CellGroupData[{ -Cell[258133, 6216, 6055, 185, 70, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[264191, 6403, 174, 3, 70, "Output",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] +Cell[171167, 4372, 108, 1, 36, "Input",ExpressionUUID->"48b34cba-34a4-406f-9f6a-35eadfdaa132"], +Cell[171278, 4375, 380, 6, 41, "Output",ExpressionUUID->"b725deb8-1e40-4339-9e00-cf381a1cc4d3"] }, Open ]], Cell[CellGroupData[{ -Cell[264402, 6411, 368, 9, 70, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[264773, 6422, 172, 3, 70, "Output",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] +Cell[171695, 4386, 108, 1, 36, "Input",ExpressionUUID->"5cd5d669-9efe-46b3-9ade-3ff4724c54e3"], +Cell[171806, 4389, 357, 5, 41, "Output",ExpressionUUID->"fa616b90-94a7-43a6-8fb0-b700936b6ecf"] }, Open ]], Cell[CellGroupData[{ -Cell[264982, 6430, 6122, 187, 70, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[271107, 6619, 172, 3, 70, "Output",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] +Cell[172200, 4399, 107, 1, 36, "Input",ExpressionUUID->"aaf99b45-827e-4221-be8a-f0dcee9fe550"], +Cell[172310, 4402, 362, 5, 41, "Output",ExpressionUUID->"ad36325e-c6b3-4570-847a-74909b789b62"] }, Open ]], Cell[CellGroupData[{ -Cell[271316, 6627, 368, 9, 70, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[271687, 6638, 170, 3, 70, "Output",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] +Cell[172709, 4412, 107, 1, 36, "Input",ExpressionUUID->"ef7654ed-b051-4a58-9746-c321aca36c14"], +Cell[172819, 4415, 365, 5, 41, "Output",ExpressionUUID->"52113b47-9baa-43bb-88c8-2a7fc8e930ea"] }, Open ]], Cell[CellGroupData[{ -Cell[271894, 6646, 2663, 88, 70, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[274560, 6736, 173, 3, 70, "Output",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] +Cell[173221, 4425, 497, 16, 71, "Input",ExpressionUUID->"d249a853-bdcd-4ce7-abd7-98e15f591379"], +Cell[173721, 4443, 383, 6, 41, "Output",ExpressionUUID->"e4a4578a-aa6a-4d89-8008-6a006ca31a3a"] }, Open ]], Cell[CellGroupData[{ -Cell[274770, 6744, 2603, 85, 70, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[277376, 6831, 172, 3, 70, "Output",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] +Cell[174141, 4454, 497, 16, 71, "Input",ExpressionUUID->"b926a3d9-7a26-44a1-bd92-7ec14d5a037f"], +Cell[174641, 4472, 371, 6, 41, "Output",ExpressionUUID->"6b93a6da-21b7-4c83-bcbd-f3764c643d10"] }, Open ]], Cell[CellGroupData[{ -Cell[277585, 6839, 3712, 118, 70, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[281300, 6959, 172, 3, 70, "Output",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] +Cell[175049, 4483, 1788, 60, 142, "Input",ExpressionUUID->"37d190f3-ff6d-4668-87a0-9502e81d6720"], +Cell[176840, 4545, 360, 5, 41, "Output",ExpressionUUID->"3c5543be-9f2d-4204-bc67-f837ef385494"] }, Open ]], Cell[CellGroupData[{ -Cell[281509, 6967, 2052, 59, 70, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], -Cell[283564, 7028, 573, 12, 70, "Message",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], -Cell[284140, 7042, 573, 12, 70, "Message",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], -Cell[284716, 7056, 579, 12, 70, "Message",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], -Cell[285298, 7070, 458, 10, 70, "Message",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], -Cell[285759, 7082, 170, 3, 70, "Output",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] +Cell[177237, 4555, 1101, 36, 73, "Input",ExpressionUUID->"5478d0da-61f4-4d19-a0b5-8b94bfdc6a90"], +Cell[178341, 4593, 380, 6, 41, "Output",ExpressionUUID->"c9d70014-ed92-4887-a93a-22c88db3e4e2"] }, Open ]], Cell[CellGroupData[{ -Cell[285966, 7090, 2052, 59, 70, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], -Cell[288021, 7151, 573, 12, 70, "Message",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], -Cell[288597, 7165, 575, 12, 70, "Message",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], -Cell[289175, 7179, 579, 12, 70, "Message",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], -Cell[289757, 7193, 458, 10, 70, "Message",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], -Cell[290218, 7205, 169, 3, 70, "Output",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] +Cell[178758, 4604, 1818, 61, 144, "Input",ExpressionUUID->"e071d459-f2a8-4c24-b208-1b58eaa8b232"], +Cell[180579, 4667, 367, 5, 41, "Output",ExpressionUUID->"f50e4cc5-3f62-45e6-9ae6-e22a16640e7b"] }, Open ]], Cell[CellGroupData[{ -Cell[290424, 7213, 2028, 55, 70, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], -Cell[292455, 7270, 20296, 381, 70, "Output",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] +Cell[180983, 4677, 1631, 53, 101, "Input",ExpressionUUID->"3fd020e2-53ce-4795-8035-9cff1b46d928"], +Cell[182617, 4732, 367, 5, 41, "Output",ExpressionUUID->"295d4403-110f-44d3-86ad-29dc95fd3975"] }, Open ]], Cell[CellGroupData[{ -Cell[312788, 7656, 2146, 61, 70, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], -Cell[314937, 7719, 500, 11, 70, "Message",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], -Cell[315440, 7732, 505, 11, 70, "Message",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], -Cell[315948, 7745, 509, 11, 70, "Message",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], -Cell[316460, 7758, 458, 10, 70, "Message",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], -Cell[316921, 7770, 39609, 697, 70, "Output",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] -}, Open ]], -Cell[356545, 8470, 209, 5, 70, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], -Cell[CellGroupData[{ -Cell[356779, 8479, 1616, 48, 70, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], -Cell[358398, 8529, 589, 12, 70, "Message",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], -Cell[358990, 8543, 595, 12, 70, "Message",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], -Cell[359588, 8557, 596, 12, 70, "Message",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], -Cell[360187, 8571, 458, 10, 70, "Message",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], -Cell[360648, 8583, 171, 3, 70, "Output",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] +Cell[183021, 4742, 1631, 53, 101, "Input",ExpressionUUID->"572a5269-6f4e-4e1c-b3d1-a84c97f4800a"], +Cell[184655, 4797, 364, 5, 41, "Output",ExpressionUUID->"a6107a4d-6d0c-4474-8c94-ef96e564586e"] }, Open ]], Cell[CellGroupData[{ -Cell[360856, 8591, 2249, 64, 70, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], -Cell[363108, 8657, 573, 12, 70, "Message",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], -Cell[363684, 8671, 573, 12, 70, "Message",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], -Cell[364260, 8685, 579, 12, 70, "Message",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], -Cell[364842, 8699, 458, 10, 70, "Message",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], -Cell[365303, 8711, 174, 3, 70, "Output",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] +Cell[185056, 4807, 203, 3, 36, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], +Cell[185262, 4812, 163, 2, 41, "Output",ExpressionUUID->"668449dd-a01d-431b-a273-fb8df652dd57"] +}, Open ]], +Cell[185440, 4817, 173, 2, 36, "Input",ExpressionUUID->"93cad80c-1de7-2e4b-9b8c-14a272e65d1f"], +Cell[CellGroupData[{ +Cell[185638, 4823, 206, 3, 36, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], +Cell[185847, 4828, 163, 2, 41, "Output",ExpressionUUID->"fd2929a3-34aa-43e7-a933-7190fa38bbaf"] +}, Open ]], +Cell[186025, 4833, 171, 2, 36, "Input",ExpressionUUID->"15fe72e6-19f0-9540-b29f-3056e2e0b957"], +Cell[CellGroupData[{ +Cell[186221, 4839, 1297, 42, 61, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], +Cell[187521, 4883, 195, 2, 41, "Output",ExpressionUUID->"ab77afda-7b6c-4f7b-917b-d5c722ab6428"] }, Open ]], Cell[CellGroupData[{ -Cell[365514, 8719, 2221, 64, 70, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], -Cell[367738, 8785, 573, 12, 70, "Message",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], -Cell[368314, 8799, 575, 12, 70, "Message",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], -Cell[368892, 8813, 577, 12, 70, "Message",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], -Cell[369472, 8827, 456, 10, 70, "Message",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], -Cell[369931, 8839, 172, 3, 70, "Output",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] +Cell[187753, 4890, 929, 30, 73, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], +Cell[188685, 4922, 194, 2, 41, "Output",ExpressionUUID->"d6cc496b-1d03-42a5-9c69-6d11c381b575"] }, Open ]], Cell[CellGroupData[{ -Cell[370140, 8847, 2219, 64, 70, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], -Cell[372362, 8913, 571, 12, 70, "Message",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], -Cell[372936, 8927, 573, 12, 70, "Message",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], -Cell[373512, 8941, 579, 12, 70, "Message",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], -Cell[374094, 8955, 458, 10, 70, "Message",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], -Cell[374555, 8967, 172, 3, 70, "Output",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] +Cell[188916, 4929, 904, 29, 73, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], +Cell[189823, 4960, 196, 2, 41, "Output",ExpressionUUID->"ead759a1-c03b-4fef-a874-18207bc3ef6a"] }, Open ]], Cell[CellGroupData[{ -Cell[374764, 8975, 211, 6, 70, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], -Cell[374978, 8983, 174, 3, 70, "Output",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] +Cell[190056, 4967, 554, 18, 66, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], +Cell[190613, 4987, 193, 2, 41, "Output",ExpressionUUID->"0bd94281-829f-4f16-aef1-2fd3f0ceada0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[190843, 4994, 619, 20, 66, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], +Cell[191465, 5016, 188, 2, 41, "Output",ExpressionUUID->"b56a10db-6325-43b8-a8db-fd404aca9836"] +}, Open ]], +Cell[CellGroupData[{ +Cell[191690, 5023, 166, 4, 71, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], +Cell[191859, 5029, 193, 2, 41, "Output",ExpressionUUID->"96542cf2-b84e-4aef-bf86-647cd449707a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192089, 5036, 166, 4, 69, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], +Cell[192258, 5042, 189, 2, 41, "Output",ExpressionUUID->"4f7b448d-6ab0-4851-a124-c02a66997da6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192484, 5049, 177, 4, 55, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], +Cell[192664, 5055, 188, 2, 41, "Output",ExpressionUUID->"0a354bdc-96d8-45b8-b4cd-b3c78e37094e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192889, 5062, 177, 4, 55, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], +Cell[193069, 5068, 191, 2, 41, "Output",ExpressionUUID->"f3e5778b-4a58-4f7d-9538-5c5a26e8a437"] +}, Open ]], +Cell[CellGroupData[{ +Cell[193297, 5075, 6051, 184, 431, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], +Cell[199351, 5261, 193, 2, 41, "Output",ExpressionUUID->"6334db5d-3c60-4ec6-a3f9-daae5b1e24c8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[199581, 5268, 406, 9, 73, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], +Cell[199990, 5279, 233, 3, 61, "Output",ExpressionUUID->"f79833f9-4c90-4840-ae7c-6a0596c21b76"] +}, Open ]], +Cell[CellGroupData[{ +Cell[200260, 5287, 6118, 186, 431, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], +Cell[206381, 5475, 191, 2, 41, "Output",ExpressionUUID->"4d4bf2e9-0a6e-4a7c-889a-016d2161d6a0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[206609, 5482, 364, 8, 53, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], +Cell[206976, 5492, 191, 2, 41, "Output",ExpressionUUID->"77a24212-af31-4777-b800-31e29dd7cfbe"] +}, Open ]], +Cell[CellGroupData[{ +Cell[207204, 5499, 2659, 87, 215, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], +Cell[209866, 5588, 190, 2, 41, "Output",ExpressionUUID->"98c9e68a-311b-4e2a-b447-145b3714f9d2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[210093, 5595, 2599, 84, 215, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], +Cell[212695, 5681, 187, 2, 41, "Output",ExpressionUUID->"92640b19-fc10-4a15-b29e-b2695ebe455e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[212919, 5688, 3708, 117, 316, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], +Cell[216630, 5807, 194, 2, 41, "Output",ExpressionUUID->"a1c343e7-7698-4795-9140-483168e8e54c"] +}, Open ]], +Cell[216839, 5812, 160, 3, 36, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], +Cell[CellGroupData[{ +Cell[217024, 5819, 2071, 58, 116, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], +Cell[219098, 5879, 723, 15, 71, "Message",ExpressionUUID->"747a863f-9c20-48fd-83b4-b18ce1d6eb8d"], +Cell[219824, 5896, 723, 15, 71, "Message",ExpressionUUID->"1c467178-14d5-4a3a-9e20-8205689b1888"], +Cell[220550, 5913, 725, 15, 71, "Message",ExpressionUUID->"90f285f7-1020-4752-acf2-467bbeb0a031"], +Cell[221278, 5930, 494, 11, 32, "Message",ExpressionUUID->"8dd62b05-8d8b-4558-8800-b8b2ceff9e32"], +Cell[221775, 5943, 191, 2, 41, "Output",ExpressionUUID->"2014dd07-1eef-4c50-bfab-f1fbbbcdece5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[222003, 5950, 2073, 58, 116, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], +Cell[224079, 6010, 723, 15, 71, "Message",ExpressionUUID->"847b8a68-c947-4fda-8d68-9caff9e8beda"], +Cell[224805, 6027, 723, 15, 71, "Message",ExpressionUUID->"85510f9a-1f4e-4436-a663-fe1d96a62271"], +Cell[225531, 6044, 725, 15, 71, "Message",ExpressionUUID->"5d6bfa4d-e5e9-4b2e-baba-e94b88278086"], +Cell[226259, 6061, 492, 11, 32, "Message",ExpressionUUID->"b99d6cc0-91fc-493a-907f-c6be12bb76fc"], +Cell[226754, 6074, 188, 2, 41, "Output",ExpressionUUID->"a53665df-d8ff-43ec-86ec-dac5da94fb77"] +}, Open ]], +Cell[CellGroupData[{ +Cell[226979, 6081, 1957, 52, 86, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], +Cell[228939, 6135, 21082, 392, 302, "Output",ExpressionUUID->"c0ccc132-816e-4dfc-a255-ef22b5f2945c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[250058, 6532, 2111, 59, 116, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], +Cell[252172, 6593, 555, 12, 48, "Message",ExpressionUUID->"ecb4c1b0-f7f8-4a64-99e9-78b3a8de8764"], +Cell[252730, 6607, 558, 12, 48, "Message",ExpressionUUID->"ae6071e0-1f93-4d7a-8503-054fb807242d"], +Cell[253291, 6621, 562, 12, 48, "Message",ExpressionUUID->"7514272e-3ff4-4ed6-9374-b0c97fc22100"], +Cell[253856, 6635, 493, 11, 32, "Message",ExpressionUUID->"347f5d42-64ba-47c1-8339-b4a691be88c5"], +Cell[254352, 6648, 34970, 620, 290, "Output",ExpressionUUID->"2dc43393-f6c9-47a8-93f0-8117d6ab7fe7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[289359, 7273, 2517, 70, 160, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], +Cell[291879, 7345, 9506, 222, 298, "Output",ExpressionUUID->"b49d315f-d28c-4630-908a-9682a132062d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[301422, 7572, 228, 4, 36, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], +Cell[301653, 7578, 41344, 752, 290, "Output",ExpressionUUID->"cee19d00-87af-4c3c-9746-890e79e05341"] +}, Open ]], +Cell[CellGroupData[{ +Cell[343034, 8335, 236, 6, 109, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], +Cell[343273, 8343, 190, 2, 109, "Output",ExpressionUUID->"2187ebbb-cd5a-4b13-ab6d-5d60127d5f78"] +}, Open ]], +Cell[CellGroupData[{ +Cell[343500, 8350, 1835, 52, 109, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], +Cell[345338, 8404, 578, 13, 109, "Message",ExpressionUUID->"ca11860c-fcd5-4236-bc28-452a7a19f734"], +Cell[345919, 8419, 583, 13, 109, "Message",ExpressionUUID->"bb998a78-8da0-4d22-ad9b-42a93106b403"], +Cell[346505, 8434, 584, 13, 109, "Message",ExpressionUUID->"5f5a9d83-749f-4fb2-8bcb-e3225c7c8158"], +Cell[347092, 8449, 490, 11, 109, "Message",ExpressionUUID->"46fbe159-e20d-4cef-a9a1-2094462ebe0d"], +Cell[347585, 8462, 38276, 674, 109, "Output",ExpressionUUID->"1b1173f1-fa79-4fab-b853-c8fceab86954"] +}, Open ]], +Cell[CellGroupData[{ +Cell[385898, 9141, 1616, 48, 109, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], +Cell[387517, 9191, 193, 3, 109, "Output",ExpressionUUID->"4e42e5eb-b56f-4d79-802a-8335f61f8c40"] +}, Open ]], +Cell[CellGroupData[{ +Cell[387747, 9199, 2270, 64, 109, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], +Cell[390020, 9265, 724, 15, 109, "Message",ExpressionUUID->"7d97da8d-9f96-464e-b494-a7094571c0ff"], +Cell[390747, 9282, 724, 15, 109, "Message",ExpressionUUID->"46ec1b25-7286-486a-91e9-5a0287482d8f"], +Cell[391474, 9299, 724, 15, 109, "Message",ExpressionUUID->"f5824fb1-5471-4550-b1ad-9035a3b8432d"], +Cell[392201, 9316, 495, 11, 109, "Message",ExpressionUUID->"860d923a-0639-49c8-9e98-eeae06c91606"], +Cell[392699, 9329, 193, 3, 109, "Output",ExpressionUUID->"aa7e2381-72de-4ddc-8f95-aa291c53406a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[392929, 9337, 2233, 63, 109, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], +Cell[395165, 9402, 724, 15, 109, "Message",ExpressionUUID->"f89e71a6-9fdf-41ab-9562-4d785f2e01e4"], +Cell[395892, 9419, 723, 15, 109, "Message",ExpressionUUID->"a4b7fa2f-eb45-4dcd-bb5b-ae2c5945a491"], +Cell[396618, 9436, 724, 15, 109, "Message",ExpressionUUID->"bcc7e7c3-971f-43c0-b6a1-189b53ca5d62"], +Cell[397345, 9453, 493, 11, 109, "Message",ExpressionUUID->"d63e5825-d215-4f54-a0ca-12318dc42508"], +Cell[397841, 9466, 192, 3, 109, "Output",ExpressionUUID->"0049e567-034e-4ef1-ab0d-5c53283277f4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[398070, 9474, 2233, 63, 109, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], +Cell[400306, 9539, 726, 15, 109, "Message",ExpressionUUID->"c158e358-fdd0-4be6-9c37-d6b5eb0dcee3"], +Cell[401035, 9556, 726, 15, 109, "Message",ExpressionUUID->"198aefad-9efa-4a43-9b02-0ce6e34d317a"], +Cell[401764, 9573, 726, 15, 109, "Message",ExpressionUUID->"8a71bb7b-fdd1-4577-bf8e-e158a1b8d776"], +Cell[402493, 9590, 495, 11, 109, "Message",ExpressionUUID->"3b5a1892-1e85-4703-811f-b23de6e6db4b"], +Cell[402991, 9603, 193, 3, 109, "Output",ExpressionUUID->"e465820a-b3a0-4ed7-b981-2dfec8a5c642"] +}, Open ]], +Cell[CellGroupData[{ +Cell[403221, 9611, 238, 6, 109, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], +Cell[403462, 9619, 193, 3, 109, "Output",ExpressionUUID->"af9cd2af-1688-4951-81a5-0f182083a020"] +}, Open ]], +Cell[403670, 9625, 271, 6, 109, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], +Cell[CellGroupData[{ +Cell[403966, 9635, 558, 19, 109, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], +Cell[404527, 9656, 194, 3, 109, "Output",ExpressionUUID->"4327abb7-46dd-4ae1-a0fc-280020f0497e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[404758, 9664, 170, 5, 109, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], +Cell[404931, 9671, 196, 3, 109, "Output",ExpressionUUID->"0d1eaa95-cae6-4181-a790-b23dbfb04c54"] +}, Open ]], +Cell[CellGroupData[{ +Cell[405164, 9679, 181, 5, 109, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], +Cell[405348, 9686, 196, 3, 109, "Output",ExpressionUUID->"8ab3c78a-3b05-4431-8fd2-64eeeb3960cc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[405581, 9694, 6055, 185, 109, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], +Cell[411639, 9881, 197, 3, 109, "Output",ExpressionUUID->"c65731a2-7631-41ce-a6f1-1236f9c6985e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[411873, 9889, 368, 9, 109, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], +Cell[412244, 9900, 194, 3, 109, "Output",ExpressionUUID->"beedc168-c51d-4b6f-8702-6b976eb8e62d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[412475, 9908, 6122, 187, 109, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], +Cell[418600, 10097, 196, 3, 109, "Output",ExpressionUUID->"63051a82-9303-44b6-b6b1-000538597a2b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[418833, 10105, 368, 9, 109, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], +Cell[419204, 10116, 195, 3, 109, "Output",ExpressionUUID->"1d3669e2-c3cf-4d1f-ba7f-867167b9633b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[419436, 10124, 2663, 88, 109, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], +Cell[422102, 10214, 196, 3, 109, "Output",ExpressionUUID->"d3c48f98-435d-4ae6-98d7-82762e6c4a2f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[422335, 10222, 2603, 85, 109, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], +Cell[424941, 10309, 192, 3, 109, "Output",ExpressionUUID->"46244fec-108e-475e-8335-1f11f56fa720"] +}, Open ]], +Cell[CellGroupData[{ +Cell[425170, 10317, 3712, 118, 109, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], +Cell[428885, 10437, 196, 3, 109, "Output",ExpressionUUID->"0c00a0b9-cb1c-4e23-a601-470f45db8d34"] +}, Open ]], +Cell[CellGroupData[{ +Cell[429118, 10445, 2075, 59, 109, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], +Cell[431196, 10506, 724, 15, 109, "Message",ExpressionUUID->"fd1a46d9-4f87-4c1d-a41a-4d18a5090454"], +Cell[431923, 10523, 724, 15, 109, "Message",ExpressionUUID->"f4fb7e65-fd3f-4925-8bad-f4d2d0a87027"], +Cell[432650, 10540, 725, 15, 109, "Message",ExpressionUUID->"8a409765-3a44-43b6-8bcc-55b48a253657"], +Cell[433378, 10557, 493, 11, 109, "Message",ExpressionUUID->"fc6f6a96-b4f5-4c1e-89f4-ce71abb47963"], +Cell[433874, 10570, 192, 3, 109, "Output",ExpressionUUID->"c469fd25-d4a8-49b0-8cf3-35549e0fdd6c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[434103, 10578, 2077, 59, 109, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], +Cell[436183, 10639, 724, 15, 109, "Message",ExpressionUUID->"6699e89a-f720-426d-bbb3-61f32b028319"], +Cell[436910, 10656, 726, 15, 109, "Message",ExpressionUUID->"f53920df-6f91-44d1-b30a-562641ba08e8"], +Cell[437639, 10673, 725, 15, 109, "Message",ExpressionUUID->"4225b023-7272-4e62-ae67-aa5961fb1e83"], +Cell[438367, 10690, 493, 11, 109, "Message",ExpressionUUID->"21ab7bea-44c7-4521-a620-f22128bb279a"], +Cell[438863, 10703, 194, 3, 109, "Output",ExpressionUUID->"11f6f7b2-6738-405b-99f7-b636221f6978"] +}, Open ]], +Cell[CellGroupData[{ +Cell[439094, 10711, 2053, 55, 109, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], +Cell[441150, 10768, 23698, 435, 109, "Output",ExpressionUUID->"76ee7341-ab91-4a45-83fc-202ac7c0ed66"] +}, Open ]], +Cell[CellGroupData[{ +Cell[464885, 11208, 2166, 61, 109, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], +Cell[467054, 11271, 536, 12, 109, "Message",ExpressionUUID->"28c23d10-7dcb-4867-95de-f1e0722f022f"], +Cell[467593, 11285, 542, 12, 109, "Message",ExpressionUUID->"87663fb7-292d-428a-b15e-2e896e665fcc"], +Cell[468138, 11299, 542, 12, 109, "Message",ExpressionUUID->"97e762ea-9e9c-4fd8-812c-8f90a35d2cf4"], +Cell[468683, 11313, 471, 11, 109, "Message",ExpressionUUID->"a7719faa-7996-402e-b6bc-78cf3405adb8"], +Cell[469157, 11326, 34912, 621, 109, "Output",ExpressionUUID->"027234ca-4d45-406e-a8aa-e2e485563cd6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[504106, 11952, 164, 4, 109, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], +Cell[504273, 11958, 41308, 753, 109, "Output",ExpressionUUID->"df0e37ab-ea09-4af8-95d3-0da4a26db9e9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[545618, 12716, 1616, 48, 109, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], +Cell[547237, 12766, 195, 3, 109, "Output",ExpressionUUID->"7fa0fd5e-155e-489b-8de6-d881e7474381"] +}, Open ]], +Cell[CellGroupData[{ +Cell[547469, 12774, 2272, 64, 109, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], +Cell[549744, 12840, 726, 15, 109, "Message",ExpressionUUID->"46e51d2f-5aa3-46f8-ae59-e2b1a315a06c"], +Cell[550473, 12857, 726, 15, 109, "Message",ExpressionUUID->"c8f76ab2-3a36-445a-b15a-ccb27d3987a9"], +Cell[551202, 12874, 729, 15, 109, "Message",ExpressionUUID->"52cdf3f3-c62d-4293-a87d-7b403bad6334"], +Cell[551934, 12891, 495, 11, 109, "Message",ExpressionUUID->"e2005e39-cbc9-4114-86f0-458d46e13f5f"], +Cell[552432, 12904, 193, 3, 109, "Output",ExpressionUUID->"28fbb905-9a4e-48c1-8982-871635ad34c2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[552662, 12912, 2235, 63, 109, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], +Cell[554900, 12977, 724, 15, 109, "Message",ExpressionUUID->"733c8123-098f-455b-b505-7f609351ed53"], +Cell[555627, 12994, 724, 15, 109, "Message",ExpressionUUID->"9358537b-9cbc-4032-894b-310d2c3ed08c"], +Cell[556354, 13011, 724, 15, 109, "Message",ExpressionUUID->"b70180a0-a90e-4b2d-9723-caff7f4993f3"], +Cell[557081, 13028, 493, 11, 109, "Message",ExpressionUUID->"d6823632-68f0-4913-91b8-830c2d0c9d1c"], +Cell[557577, 13041, 194, 3, 109, "Output",ExpressionUUID->"0be0038d-fc6d-4ae9-9683-53acaa080295"] +}, Open ]], +Cell[CellGroupData[{ +Cell[557808, 13049, 2233, 63, 109, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], +Cell[560044, 13114, 726, 15, 109, "Message",ExpressionUUID->"a23c4a97-d888-4684-a240-b9e5f9a281f2"], +Cell[560773, 13131, 724, 15, 109, "Message",ExpressionUUID->"c7fb0e0c-d2f2-4dba-ad04-e8f1dbafa5a1"], +Cell[561500, 13148, 725, 15, 109, "Message",ExpressionUUID->"edaaeb3f-5cc9-4a86-b570-e2e606ea1248"], +Cell[562228, 13165, 493, 11, 109, "Message",ExpressionUUID->"fff9a062-2fa0-4ba6-a963-5afbb36e0309"], +Cell[562724, 13178, 193, 3, 109, "Output",ExpressionUUID->"130a45c6-75e3-47aa-9c14-be4209a6de6f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[562954, 13186, 238, 6, 109, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], +Cell[563195, 13194, 195, 3, 109, "Output",ExpressionUUID->"fa27dbd3-5cea-4407-898e-61852b1b7e80"] +}, Open ]], +Cell[563405, 13200, 275, 6, 109, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], +Cell[CellGroupData[{ +Cell[563705, 13210, 558, 19, 109, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], +Cell[564266, 13231, 192, 3, 109, "Output",ExpressionUUID->"edb96897-7a84-47e5-b19b-de56babbb453"] +}, Open ]], +Cell[CellGroupData[{ +Cell[564495, 13239, 170, 5, 109, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], +Cell[564668, 13246, 196, 3, 109, "Output",ExpressionUUID->"f3b58bb8-cc72-434f-ac71-e8c6b9f377d7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[564901, 13254, 181, 5, 109, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], +Cell[565085, 13261, 195, 3, 109, "Output",ExpressionUUID->"6bb9cbea-a367-4d5f-a6db-7155d6ee819d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[565317, 13269, 6055, 185, 109, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], +Cell[571375, 13456, 196, 3, 109, "Output",ExpressionUUID->"4f3b0d14-73d3-4e2f-a410-837fb0d2b12b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[571608, 13464, 368, 9, 109, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], +Cell[571979, 13475, 196, 3, 109, "Output",ExpressionUUID->"bd8625a5-c9e0-4077-adc7-015b24c7717a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[572212, 13483, 6122, 187, 109, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], +Cell[578337, 13672, 193, 3, 109, "Output",ExpressionUUID->"6d9f215e-dc04-4253-813d-151bfbbd3db7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[578567, 13680, 368, 9, 109, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], +Cell[578938, 13691, 192, 3, 109, "Output",ExpressionUUID->"5f3b6562-c07d-474b-9c18-c06df5c892ae"] +}, Open ]], +Cell[CellGroupData[{ +Cell[579167, 13699, 2663, 88, 109, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], +Cell[581833, 13789, 193, 3, 109, "Output",ExpressionUUID->"001e20a3-448f-4bf1-995e-2e8bad0de25c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[582063, 13797, 2603, 85, 109, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], +Cell[584669, 13884, 192, 3, 109, "Output",ExpressionUUID->"7a9c1fc3-966f-4cb9-b7c5-09098d87decd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[584898, 13892, 3712, 118, 109, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], +Cell[588613, 14012, 196, 3, 109, "Output",ExpressionUUID->"850c5edb-6300-4253-b528-8f9522b39ce4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[588846, 14020, 2075, 59, 109, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], +Cell[590924, 14081, 726, 15, 109, "Message",ExpressionUUID->"65d3a96c-23e1-4b5a-ac83-79833a16c08a"], +Cell[591653, 14098, 729, 15, 109, "Message",ExpressionUUID->"7793c008-1dd1-4206-b228-32764785a204"], +Cell[592385, 14115, 726, 15, 109, "Message",ExpressionUUID->"fd40982e-c8d8-4217-b403-bb3965327e92"], +Cell[593114, 14132, 495, 11, 109, "Message",ExpressionUUID->"a18b5c70-a2cf-4091-b8ce-e66676ffd71c"], +Cell[593612, 14145, 192, 3, 109, "Output",ExpressionUUID->"dfa772b2-eb01-4093-a9b7-14b12a757d61"] +}, Open ]], +Cell[CellGroupData[{ +Cell[593841, 14153, 2075, 59, 109, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], +Cell[595919, 14214, 726, 15, 109, "Message",ExpressionUUID->"47e93e1e-a17c-41d8-b45e-b274f78ed236"], +Cell[596648, 14231, 725, 15, 109, "Message",ExpressionUUID->"24cee09c-fba6-4005-b486-1bcf8cacee8a"], +Cell[597376, 14248, 726, 15, 109, "Message",ExpressionUUID->"385b0634-38b1-48ea-93f5-5562b67252e2"], +Cell[598105, 14265, 494, 11, 109, "Message",ExpressionUUID->"ec11abd3-9efe-48dd-9070-7d1a9abf1997"], +Cell[598602, 14278, 193, 3, 109, "Output",ExpressionUUID->"2174f3ed-853e-450b-848e-8901c46bea9d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[598832, 14286, 2051, 55, 109, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], +Cell[600886, 14343, 21076, 393, 109, "Output",ExpressionUUID->"0fac52d3-eddc-4ca5-893c-327a7ff1179f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[621999, 14741, 2168, 61, 109, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], +Cell[624170, 14804, 559, 12, 109, "Message",ExpressionUUID->"fa7d0fe8-ed37-4d0b-b6c2-c15ecb8c7598"], +Cell[624732, 14818, 561, 12, 109, "Message",ExpressionUUID->"ee465f92-1a3f-4efb-bbac-6fab15861854"], +Cell[625296, 14832, 564, 12, 109, "Message",ExpressionUUID->"d3e5f434-42b3-4bd9-b300-2010b3f4190e"], +Cell[625863, 14846, 493, 11, 109, "Message",ExpressionUUID->"21f9fde5-9023-431b-a7be-d8d7297e6b99"], +Cell[626359, 14859, 34928, 621, 109, "Output",ExpressionUUID->"5abd9672-b672-4c28-88b5-45ad2367318c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[661324, 15485, 232, 5, 109, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], +Cell[661559, 15492, 41302, 753, 109, "Output",ExpressionUUID->"198bc42c-8505-4146-bb0e-99d9ad744d1f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[702898, 16250, 1616, 48, 109, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], +Cell[704517, 16300, 195, 3, 109, "Output",ExpressionUUID->"6513baf9-040e-4564-9b9f-21421b114177"] +}, Open ]], +Cell[CellGroupData[{ +Cell[704749, 16308, 2272, 64, 109, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], +Cell[707024, 16374, 725, 15, 109, "Message",ExpressionUUID->"62de6681-596e-410f-9bba-dc31f9960161"], +Cell[707752, 16391, 727, 15, 109, "Message",ExpressionUUID->"1ed07d3a-150b-45ee-9dbe-aaf6eba77b42"], +Cell[708482, 16408, 726, 15, 109, "Message",ExpressionUUID->"b7f18343-91ea-4ce9-8ba9-6d26167be967"], +Cell[709211, 16425, 497, 11, 109, "Message",ExpressionUUID->"9e7f55f5-59b7-464b-a7ba-4a5d6965d66d"], +Cell[709711, 16438, 195, 3, 109, "Output",ExpressionUUID->"7f7213a3-f017-4598-80e0-59be453b712a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[709943, 16446, 2233, 63, 109, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], +Cell[712179, 16511, 726, 15, 109, "Message",ExpressionUUID->"265bbb09-f92d-48f7-857f-83e8b3eb295b"], +Cell[712908, 16528, 727, 15, 109, "Message",ExpressionUUID->"23f80a49-41e9-4d27-bbcd-a72efcacf20b"], +Cell[713638, 16545, 728, 15, 109, "Message",ExpressionUUID->"4b533757-a57c-411b-ae55-d63a0285bbdd"], +Cell[714369, 16562, 494, 11, 109, "Message",ExpressionUUID->"b3ab5ae8-b119-432c-8d6f-d06993b81b84"], +Cell[714866, 16575, 197, 3, 109, "Output",ExpressionUUID->"7ba38c6a-bf27-42a6-8023-313d8ecaccef"] +}, Open ]], +Cell[CellGroupData[{ +Cell[715100, 16583, 2231, 63, 109, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], +Cell[717334, 16648, 724, 15, 109, "Message",ExpressionUUID->"bc5c1bed-46c6-43f1-ad3f-b58562534801"], +Cell[718061, 16665, 727, 15, 109, "Message",ExpressionUUID->"8eaec43b-8378-4aab-bc1d-36285c9c21ab"], +Cell[718791, 16682, 724, 15, 109, "Message",ExpressionUUID->"5fa62497-5d48-46fc-a1be-e9d21d840ccc"], +Cell[719518, 16699, 492, 11, 109, "Message",ExpressionUUID->"69be7bc9-ef85-48c8-87fe-ae528980aa07"], +Cell[720013, 16712, 196, 3, 109, "Output",ExpressionUUID->"364a6980-125d-4c32-ab61-2ab481d47c67"] +}, Open ]], +Cell[CellGroupData[{ +Cell[720246, 16720, 234, 6, 109, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], +Cell[720483, 16728, 197, 3, 109, "Output",ExpressionUUID->"49e476a3-525b-438d-ab26-2fff2307cf1f"] }, Open ]] } ] diff --git a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_gid_Qw2.nb b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_gid_Qw2.nb index 1f902d9..6256b8d 100644 --- a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_gid_Qw2.nb +++ b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_gid_Qw2.nb @@ -3,42 +3,4837 @@ (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) -(* CreatedBy='Wolfram 14.1' *) +(* CreatedBy='Wolfram 15.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 243505, 7911] -NotebookOptionsPosition[ 219988, 7552] -NotebookOutlinePosition[ 220412, 7569] -CellTagsIndexPosition[ 220369, 7566] +NotebookDataLength[ 744152, 17161] +NotebookOptionsPosition[ 704875, 16526] +NotebookOutlinePosition[ 705287, 16543] +CellTagsIndexPosition[ 705244, 16540] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ -Cell[BoxData[ - RowBox[{"f1", "="}]], "Input", - CellChangeTimes->{ - 3.9918505481678543`*^9},ExpressionUUID->"83cccf0d-dccb-fb42-a058-\ -5e950c758893"], -Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991850549355442*^9, - 3.991850549360302*^9}},ExpressionUUID->"7730e455-e5f4-194b-b761-\ -e7a6896afd10"], +Cell[CellGroupData[{ +Cell[BoxData[ + RowBox[{"d", "=", "2.88"}]], "Input", + CellChangeTimes->{ + 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, + 3.9920650045886707`*^9, {3.993801942128783*^9, 3.993801945433443*^9}, { + 3.9938026615010633`*^9, 3.993802739368286*^9}, {3.993802810187974*^9, + 3.9938028103007183`*^9}, {3.993803575340521*^9, 3.993803666300129*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"4515b0e8-e357-490e-be9c-9756a709434b"], + +Cell[BoxData["2.88`"], "Output", + CellChangeTimes->{ + 3.991320420900818*^9, 3.993800775970068*^9, 3.9938019548134403`*^9, { + 3.993802671037874*^9, 3.9938027475965223`*^9}, 3.9938028210918093`*^9, { + 3.993803586980714*^9, 3.993803670362015*^9}, 3.993828457831374*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"ea295e34-c85a-4fc8-b353-9461113098d0"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f2", "="}]], "Input", + RowBox[{"A", "=", "236"}]], "Input", + CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"5eddd9eb-2020-4688-9458-c40573484b3e"], + +Cell[BoxData["236"], "Output", CellChangeTimes->{ - 3.991850550777445*^9},ExpressionUUID->"b70cfd2b-21a1-8344-9518-\ -5e27a96171a9"], + 3.9913196497381973`*^9, 3.9938007760760193`*^9, 3.993801954850832*^9, { + 3.9938026710743093`*^9, 3.993802747641852*^9}, 3.993802821127861*^9, { + 3.993803587016178*^9, 3.9938036703981237`*^9}, 3.9938284581293383`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"28b16098-3c12-439b-9a41-3cd50b16a88d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A1", "=", "152"}]], "Input", + CellChangeTimes->{ + 3.991798961431202*^9, {3.993800516328167*^9, 3.993800518467939*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"3bb45146-2ade-4396-b535-b5f3b5da5d1b"], + +Cell[BoxData["152"], "Output", + CellChangeTimes->{ + 3.9913196497578354`*^9, 3.993800520116021*^9, 3.9938007760814123`*^9, + 3.99380195486788*^9, {3.993802671090054*^9, 3.993802747658696*^9}, + 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}, + 3.9938284581385612`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"05b54474-68ed-45be-a4db-4677944f0ed1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a1", "=", "0.55"}]], "Input", + CellChangeTimes->{3.9434144380252676`*^9}, + CellLabel->"In[4]:=",ExpressionUUID->"54113ffc-093a-446e-b0f9-b56188c0c5f8"], + +Cell[BoxData["0.55`"], "Output", + CellChangeTimes->{ + 3.991319649777508*^9, 3.9938007761127357`*^9, 3.993801954886694*^9, { + 3.993802671105547*^9, 3.993802747674674*^9}, 3.9938028211591873`*^9, { + 3.9938035870466833`*^9, 3.993803670422636*^9}, 3.993828458147386*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"bed22427-a87a-4c6c-a37d-706e7ccab01f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a2", "=", + RowBox[{"a1", "-", + RowBox[{"0.015", "*", + FractionBox[ + RowBox[{ + RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", + CellLabel->"In[5]:=",ExpressionUUID->"758a7d09-dbf4-481c-87ad-b9afbab5ef5a"], + +Cell[BoxData["0.545677966101695`"], "Output", + CellChangeTimes->{ + 3.9913196497965145`*^9, 3.993800776129066*^9, 3.9938019549039087`*^9, { + 3.9938026711227913`*^9, 3.993802747690078*^9}, 3.993802821174389*^9, { + 3.9938035870619383`*^9, 3.993803670434517*^9}, 3.993828458155756*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"d6c4bc0b-caf3-4e1d-9056-4ca50ec403a5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"p0", "=", "0.17"}]], "Input", + CellLabel->"In[6]:=",ExpressionUUID->"ecb03e21-5e0f-4a03-a835-4356f006b058"], + +Cell[BoxData["0.17`"], "Output", + CellChangeTimes->{ + 3.9913196498144608`*^9, 3.9938007761450787`*^9, 3.993801954921114*^9, { + 3.993802671138826*^9, 3.993802747705122*^9}, 3.993802821189831*^9, { + 3.993803587077704*^9, 3.993803670446403*^9}, 3.993828458163638*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"dd9d5ae6-4ae0-44fb-a203-c2427cb173b7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R01", "=", + RowBox[{"1.16", "*", + SuperscriptBox["A1", + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, + CellLabel->"In[7]:=",ExpressionUUID->"5380df21-fd1e-4f18-96d5-96519ef10b43"], + +Cell[BoxData["6.190691825034912`"], "Output", + CellChangeTimes->{ + 3.9913196498225155`*^9, 3.993800776161807*^9, 3.993801954937538*^9, { + 3.9938026711557207`*^9, 3.993802747719865*^9}, 3.993802821205323*^9, { + 3.993803587093586*^9, 3.9938036704581614`*^9}, 3.993828458172098*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"ec4a7d61-f36c-439b-9e4c-aa141866eb9e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R02", "=", + RowBox[{"1.16", "*", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"A", "-", "A1"}], ")"}], + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellLabel->"In[8]:=",ExpressionUUID->"ab2b8dca-c16a-486e-99c5-ad6799c433b7"], + +Cell[BoxData["5.08024220226995`"], "Output", + CellChangeTimes->{ + 3.9913196498425236`*^9, 3.993800776178092*^9, 3.993801954954875*^9, { + 3.993802671171578*^9, 3.993802747723295*^9}, 3.993802821221133*^9, { + 3.993803587109274*^9, 3.993803670471842*^9}, 3.993828458179319*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"a2e0dd49-0687-434e-a285-abc52387f6d0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b1", "=", "0.97619"}]], "Input", + CellChangeTimes->{ + 3.991799283179735*^9, {3.9938005440294*^9, 3.993800567746181*^9}}, + CellLabel->"In[9]:=",ExpressionUUID->"bb4b1740-8a4c-4f4e-8f73-6fc24160f5eb"], + +Cell[BoxData["0.97619`"], "Output", + CellChangeTimes->{ + 3.993800776210225*^9, 3.993801954959785*^9, {3.993802671174962*^9, + 3.993802747749667*^9}, 3.9938028212246647`*^9, {3.9938035871245747`*^9, + 3.993803670475428*^9}, 3.993828458186061*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"7254eda2-d17c-48b2-adbd-ef57c0c18586"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b2", "=", "0.59439"}]], "Input", + CellChangeTimes->{ + 3.991799280663351*^9, {3.9938005524325247`*^9, 3.993800560808515*^9}}, + CellLabel->"In[10]:=",ExpressionUUID->"bb33f4c2-e325-4b57-b056-6f91221314e1"], + +Cell[BoxData["0.59439`"], "Output", + CellChangeTimes->{ + 3.993800776226185*^9, 3.993801954993833*^9, {3.9938026712049103`*^9, + 3.993802747764641*^9}, 3.993802821251552*^9, {3.993803587139648*^9, + 3.993803670490211*^9}, 3.99382845819328*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"aee23a84-e4a2-42af-bab9-9070a2da1464"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x1", "=", "0"}]], "Input", + CellLabel->"In[11]:=",ExpressionUUID->"04c84a35-7bf3-4595-9e18-832b478b8037"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498927155`*^9, 3.993800776256876*^9, 3.9938019550107737`*^9, { + 3.99380267122059*^9, 3.993802747779757*^9}, 3.993802821267166*^9, { + 3.993803587154791*^9, 3.993803670501927*^9}, 3.993828458201236*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"ad409d78-ab98-45c0-8343-54bd2f2fbe0e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x2", "=", "0"}]], "Input", + CellLabel->"In[12]:=",ExpressionUUID->"ce42a04e-3ddd-42dc-beee-1cad33b26728"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498996067`*^9, 3.993800776272674*^9, 3.993801955027381*^9, { + 3.993802671236315*^9, 3.993802747794403*^9}, 3.993802821282477*^9, { + 3.993803587158352*^9, 3.993803670513171*^9}, 3.993828458216338*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"bb6518e3-3ef9-48b7-b07f-fcd103f34f5c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w1", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[13]:=",ExpressionUUID->"f727586e-e8c1-4e5a-a5af-6c5393d7d4a8"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913197863028755`*^9, 3.993800776289051*^9, 3.993801955044087*^9, { + 3.993802671251883*^9, 3.993802747809085*^9}, 3.9938028212979517`*^9, { + 3.9938035871856203`*^9, 3.9938036705241947`*^9}, 3.993828458224371*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"b9fe7222-f98e-41e7-aef2-be9e79e8eab3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w2", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[14]:=",ExpressionUUID->"6783de3e-2120-4aed-887c-aa8d3da8ec68"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913197864610195`*^9, 3.993800776304994*^9, 3.993801955061472*^9, { + 3.993802671267837*^9, 3.9938027478234367`*^9}, 3.9938028213134613`*^9, { + 3.9938035872015963`*^9, 3.9938036705351753`*^9}, 3.9938284582316933`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"db1cec1d-e97e-4418-8a41-47770684258a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c11", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"ccdf9d30-6d27-4c99-b7aa-b743fc07a405"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.993800776320915*^9, 3.993801955077899*^9, { + 3.993802671285616*^9, 3.9938027478392677`*^9}, 3.993802821328992*^9, { + 3.993803587217046*^9, 3.993803670546205*^9}, 3.993828458238804*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"34f78975-8fa4-4673-b07e-71cd5d4c93fc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"f02c88cb-6c61-40b0-b17c-ee98fcfb407f"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.991319786540777*^9, 3.9938007763370247`*^9, 3.993801955093937*^9, { + 3.993802671301764*^9, 3.993802747854802*^9}, 3.993802821344532*^9, { + 3.993803587232232*^9, 3.993803670558001*^9}, 3.9938284582455063`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"0b0b7dc4-60c2-48c3-b749-3356bf200de6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c21", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"b0c968ba-1162-4533-8b47-f6819663e943"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.9913197865777817`*^9, 3.9938007763528843`*^9, 3.9938019551103783`*^9, { + 3.9938026713191147`*^9, 3.993802747870304*^9}, 3.993802821359898*^9, { + 3.993803587247026*^9, 3.9938036705701017`*^9}, 3.993828458252819*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"67587895-bd1e-4b39-92b6-ca926a1871f5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c22", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"7877d18c-540e-4fb0-8737-f5e42c091c2d"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.9913197866129*^9, 3.9938007763688097`*^9, 3.993801955127124*^9, { + 3.993802671337201*^9, 3.99380274788591*^9}, 3.993802821375526*^9, { + 3.993803587262051*^9, 3.993803670582543*^9}, 3.9938284582599497`*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"a579878c-e1a4-4386-bf7a-97231fec3ff9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"dee66d2c-e27d-4b28-b938-ccbb641e8c9d"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786620775*^9, 3.993800776384469*^9, 3.99380195514393*^9, { + 3.993802671355851*^9, 3.9938027479017677`*^9}, 3.9938028213910847`*^9, { + 3.993803587265461*^9, 3.9938036705956707`*^9}, 3.993828458267419*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"c923fb9b-8491-4d73-b08f-8761c5bdf676"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fin", "=", "0.09"}]], "Input", + CellLabel->"In[20]:=",ExpressionUUID->"cc1db640-a763-4e2b-97fe-26896ebac182"], + +Cell[BoxData["0.09`"], "Output", + CellChangeTimes->{ + 3.991319786657793*^9, 3.993800776400263*^9, 3.993801955160005*^9, { + 3.993802671372757*^9, 3.993802747917276*^9}, 3.9938028214069347`*^9, { + 3.993803587291121*^9, 3.993803670608396*^9}, 3.993828458276902*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"24730ba1-248a-4f49-951a-ed1d1b13a231"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffin", "=", "0.42"}]], "Input", + CellLabel->"In[21]:=",ExpressionUUID->"dba86dfa-8048-4235-ae10-92e83d55d104"], + +Cell[BoxData["0.42`"], "Output", + CellChangeTimes->{ + 3.9913197866657925`*^9, 3.993800776415701*^9, 3.993801955176228*^9, { + 3.9938026713885727`*^9, 3.9938027479333763`*^9}, 3.9938028214226522`*^9, { + 3.993803587306354*^9, 3.993803670621553*^9}, 3.993828458292193*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"985e943b-29a1-48e9-b187-1e288ab5f057"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fex", "=", + RowBox[{"-", "2.59"}]}]], "Input", + CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"dafafd58-d343-47d2-9219-07177a8c3335"], + +Cell[BoxData[ + RowBox[{"-", "2.59`"}]], "Output", + CellChangeTimes->{ + 3.9913197866996*^9, 3.993800776431301*^9, 3.993801955193372*^9, { + 3.993802671403956*^9, 3.9938027479492397`*^9}, 3.9938028214382277`*^9, { + 3.993803587321618*^9, 3.993803670634707*^9}, 3.993828458296404*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"6d22f7fe-e52a-4eb6-99a2-28871837cf27"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffex", "=", "0.54"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"942728ae-1eee-46e3-a944-beafcca3e8ab"], + +Cell[BoxData["0.54`"], "Output", + CellChangeTimes->{ + 3.9913197867406044`*^9, 3.9938007764469233`*^9, 3.9938019552102613`*^9, { + 3.9938026714206*^9, 3.993802747964871*^9}, 3.993802821453787*^9, { + 3.993803587336917*^9, 3.9938036706484222`*^9}, 3.99382845831464*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"d59189d1-1a2e-4819-8cdc-ffa86c496f78"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z1", "=", " ", "66"}]], "Input", + CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { + 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { + 3.993800689005188*^9, 3.993800698859473*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"0dba3470-d40a-4312-8672-1e15722d7127"], + +Cell[BoxData["66"], "Output", + CellChangeTimes->{ + 3.9913197867861958`*^9, 3.993800776462777*^9, 3.993801955228032*^9, { + 3.9938026714376583`*^9, 3.99380274798144*^9}, 3.993802821469448*^9, { + 3.993803587352215*^9, 3.9938036706619053`*^9}, 3.993828458332493*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"889882e0-a8c3-4eef-aa5a-1beab90d548d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z2", "=", + RowBox[{"94", "-", "Z1"}]}]], "Input", + CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, + 3.9916443064841423`*^9, {3.993800702787973*^9, 3.993800703931004*^9}}, + CellLabel->"In[25]:=",ExpressionUUID->"a346741f-d459-496d-bf47-4b3c3a30eb69"], + +Cell[BoxData["28"], "Output", + CellChangeTimes->{ + 3.9913197867928696`*^9, 3.993800776478297*^9, 3.993801955245349*^9, { + 3.993802671454508*^9, 3.993802747997691*^9}, 3.993802821484852*^9, { + 3.993803587367502*^9, 3.9938036706754093`*^9}, 3.993828458340122*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"f67c5c84-e24f-4955-ad60-dc3c3c828c51"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A2", "=", + RowBox[{"A", "-", "A1"}]}]], "Input", + CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"0d1f89a8-fd01-448f-a9dd-f537424b6c35"], + +Cell[BoxData["84"], "Output", + CellChangeTimes->{ + 3.991319786827894*^9, 3.993800776493824*^9, 3.993801955261796*^9, { + 3.993802671472805*^9, 3.993802748017583*^9}, 3.99380282150027*^9, { + 3.993803587382532*^9, 3.993803670687777*^9}, 3.993828458347084*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"b74ebaad-da97-4364-aa9e-7d7c0a1526b8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Din", "=", + RowBox[{"fin", "+", + RowBox[{"ffin", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"fc69ba8d-f923-47e9-b497-7aa5a84de211"], + +Cell[BoxData["0.10842105263157895`"], "Output", + CellChangeTimes->{ + 3.9913197868648605`*^9, 3.9938007765094976`*^9, 3.9938019552787237`*^9, { + 3.993802671491748*^9, 3.9938027480331593`*^9}, 3.9938028215155582`*^9, { + 3.993803587397368*^9, 3.9938036706998672`*^9}, 3.993828458357288*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"496b8a89-b07d-4cd2-8fb5-b5c2b806fe84"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Dex", "=", + RowBox[{"fex", "+", + RowBox[{"ffex", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"16dc3556-39b6-43aa-94cc-d983c209c6ce"], + +Cell[BoxData[ + RowBox[{"-", "2.566315789473684`"}]], "Output", + CellChangeTimes->{ + 3.9913197868718567`*^9, 3.9938007765252047`*^9, 3.9938019552955627`*^9, { + 3.9938026715153112`*^9, 3.993802748050967*^9}, 3.9938028215315247`*^9, { + 3.993803587413514*^9, 3.9938036707132397`*^9}, 3.993828458365942*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"ce036cbf-e228-4ebf-8db2-c96e712d57f6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R00", "=", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x1", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x2", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", "d"}]}]], "Input", + CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { + 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, + 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"6bc584ee-fe98-42df-9f6a-126e6d1e83f9"], + +Cell[BoxData["19.255392789884887`"], "Output", + CellChangeTimes->{ + 3.9913197869068584`*^9, 3.993800776541044*^9, 3.993801955312595*^9, { + 3.99380267153469*^9, 3.993802748068204*^9}, 3.993802821546997*^9, { + 3.9938035874293547`*^9, 3.993803670724801*^9}, 3.993828458373993*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"a56d4fcf-c4c3-47c6-ace1-2d92a3234142"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"ac443485-28e7-4044-a57d-d7744cc9cfbd"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786940857*^9, 3.993800776556777*^9, 3.993801955328986*^9, { + 3.993802671551854*^9, 3.993802748085292*^9}, 3.9938028215632277`*^9, { + 3.993803587445024*^9, 3.993803670737692*^9}, 3.9938284583814898`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"e9f5383a-9d39-41b9-8295-caa812685764"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v1", "=", "1.63"}]], "Input", + CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, + 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { + 3.99380058189814*^9, 3.993800584279264*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"9bf61379-f53e-460e-a8a1-a6017c80e63d"], + +Cell[BoxData["1.63`"], "Output", + CellChangeTimes->{ + 3.993800776587946*^9, 3.993801955345385*^9, {3.993802671570458*^9, + 3.993802748111987*^9}, 3.9938028215786963`*^9, {3.9938035874604197`*^9, + 3.993803670750949*^9}, 3.993828458388382*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"ccd7021e-aed2-425a-be16-5d53172f72fa"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918505524437046`*^9, - 3.991850552447544*^9}},ExpressionUUID->"86df0a71-aa65-aa41-b8f1-\ -8c5c5be10fe8"], + CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"aef5f3bf-74d7-4f70-ad7a-78d217bb1588"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n1", "=", "0.856"}]], "Input", + CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, + 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { + 3.993800591017771*^9, 3.993800594019471*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"9a758730-42a6-4c18-b15d-6ab80c84b5da"], + +Cell[BoxData["0.856`"], "Output", + CellChangeTimes->{ + 3.9938007766183*^9, 3.993801955394834*^9, {3.99380267161954*^9, + 3.993802748161004*^9}, 3.993802821625576*^9, {3.993803587507737*^9, + 3.993803670776819*^9}, 3.993828458404551*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"559eea32-7d83-49f6-96f3-d19a55a0aefb"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"a4b3dccb-1b3b-419f-a127-d00dacaa6f83"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv1", "=", "2.615"}]], "Input", + CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { + 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { + 3.9938005968681726`*^9, 3.9938005993167686`*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"477ccd81-2ef0-4147-b369-18fcc49e7546"], + +Cell[BoxData["2.615`"], "Output", + CellChangeTimes->{ + 3.993800776636183*^9, 3.9938019554430428`*^9, {3.993802671677952*^9, + 3.993802748207687*^9}, 3.993802821672069*^9, {3.993803587556972*^9, + 3.993803670795989*^9}, 3.993828458419342*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"911f243c-7b02-441e-b61b-52047cad2472"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"61685d83-1c48-4399-a487-c00cddb3a13f"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn1", "=", "1.23"}]], "Input", + CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { + 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, + 3.991799359954439*^9, {3.993800602507454*^9, 3.993800603056312*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"55d3ac54-dc59-47be-99e3-cd6ba4eb7e8d"], + +Cell[BoxData["1.23`"], "Output", + CellChangeTimes->{ + 3.9938007766784554`*^9, 3.993801955495077*^9, {3.993802671729157*^9, + 3.993802748254798*^9}, 3.993802821718618*^9, {3.9938035876039553`*^9, + 3.9938036708157063`*^9}, 3.9938284584330177`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"d4ce5465-9f9b-484e-8fd5-0d1c9d668cd9"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"b46ea42c-ab0d-48e3-9c47-df1b7e823ded"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v2", "=", "2.22"}]], "Input", + CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, + 3.991718016467348*^9, 3.991799361414671*^9, {3.993800605567752*^9, + 3.993800606070137*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"2047a7cf-4d49-47a1-a678-b17cfc910461"], + +Cell[BoxData["2.22`"], "Output", + CellChangeTimes->{ + 3.993800776708939*^9, 3.993801955543845*^9, {3.993802671778071*^9, + 3.993802748303585*^9}, 3.993802821766041*^9, {3.993803587650766*^9, + 3.9938036708413343`*^9}, 3.993828458447612*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"387ef0b9-b3f8-44c1-950c-2e5eda87de0e"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"bd24619a-a7c7-4592-a909-bc3d390482fd"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n2", "=", "0.559"}]], "Input", + CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, + 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.993800609659601*^9, + 3.993800614079907*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"b63f0f91-416b-4b5b-b06c-7f8408abe379"], + +Cell[BoxData["0.559`"], "Output", + CellChangeTimes->{ + 3.9938007767393847`*^9, 3.993801955593616*^9, {3.993802671829995*^9, + 3.993802748351069*^9}, 3.993802821813445*^9, {3.9938035876972513`*^9, + 3.993803670875149*^9}, 3.993828458462126*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"8101b452-4bff-4cda-b7fe-b52cb3bdb1f4"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"634a690c-d02f-47f3-8b5c-6f2ca68edea0"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv2", "=", "2.428"}]], "Input", + CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, + 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.993800618121642*^9, + 3.993800621996191*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"04d46563-a26e-4631-9e4c-21f4c62342fa"], + +Cell[BoxData["2.428`"], "Output", + CellChangeTimes->{ + 3.9938007767695208`*^9, 3.993801955646489*^9, {3.993802671878972*^9, + 3.99380274840051*^9}, 3.993802821860149*^9, {3.9938035877441607`*^9, + 3.993803670903119*^9}, 3.993828458477388*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"f24d6c3d-9f83-4d6e-8174-456506c00e8b"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"670c6bc6-d260-421c-a98d-9ac6655f28d1"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn2", "=", "0.738"}]], "Input", + CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, + 3.9917993660901737`*^9, {3.993800626883781*^9, 3.993800632244173*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"1c55f073-fcd1-475a-a697-fd6b29fcf4ce"], + +Cell[BoxData["0.738`"], "Output", + CellChangeTimes->{ + 3.993800776800035*^9, 3.993801955694454*^9, {3.993802671926148*^9, + 3.99380274844981*^9}, 3.99380282190762*^9, {3.9938035877925863`*^9, + 3.9938036709348783`*^9}, 3.993828458490313*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"34435fe7-a064-4e3b-acbc-bcd3a43b1cea"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"9e091f1c-2bbb-428e-a569-7a320056ae87"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U31", "=", + RowBox[{"C0", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", "R1"}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "a1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "nn2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"Dex", "*", "v2", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/aR7S2Zj4lvHP7Jp2SD6t2ddPojOapZrBdETK9in +g+jbL87PBNEGxc+WgOhrG/jXgWi9vpDNIFrqcOcWEL1ki/glEK3Wwn0ZRDdb +HLoOonX+9D8E0abp/OxNQDq+aD4niN52MlAbRD/heKsDovPud4WB6HnRPNEg +uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt +Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr +ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== + "], + CellLabel->"In[47]:=",ExpressionUUID->"0982d3a8-b50a-427f-9d85-9323c8a2b10b"], + +Cell[BoxData["0.04132444525810279`"], "Output", + CellChangeTimes->{ + 3.991319787430073*^9, 3.993800776881694*^9, 3.993801955753645*^9, { + 3.993802671993063*^9, 3.993802748523107*^9}, 3.993802821968258*^9, { + 3.993803587855629*^9, 3.993803670999495*^9}, 3.9938284585843697`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"b47b7f9c-0945-4073-97f9-8fbbdc206b4d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U33", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", + FractionBox[ + RowBox[{"R01", "*", "R01"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"2", "*", "vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "a2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"Dex", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], + "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"e0304669-7d09-4e59-9e9c-a35ef8f0a644"], + +Cell[BoxData["1.8561337112494445`"], "Output", + CellChangeTimes->{ + 3.991319787574972*^9, 3.9938007769078693`*^9, 3.993801955775502*^9, { + 3.993802672016849*^9, 3.993802748547914*^9}, 3.99380282199231*^9, { + 3.9938035878800983`*^9, 3.993803671028694*^9}, 3.9938284586222277`*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"16874746-6e72-4514-a099-7896bad4594a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U32", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02"}], "1"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"cfe05e20-f8a1-4e5a-85aa-c2aa010461dd"], + +Cell[BoxData[ + RowBox[{"-", "12.258798326305717`"}]], "Output", + CellChangeTimes->{ + 3.991319787641424*^9, 3.9938007769327593`*^9, 3.993801955798092*^9, { + 3.9938026720456457`*^9, 3.99380274857216*^9}, 3.993802822015239*^9, { + 3.993803587903886*^9, 3.9938036710539*^9}, 3.993828458663618*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"f0f716ce-0160-4094-8a4b-840c6cd86d13"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U41", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[50]:=",ExpressionUUID->"2369162a-f9d8-47a9-8524-24210c2a04f6"], + +Cell[BoxData[ + RowBox[{"-", "22.790441070773312`"}]], "Output", + CellChangeTimes->{ + 3.991319787711939*^9, 3.9938007769622097`*^9, 3.9938019558251333`*^9, { + 3.993802672094524*^9, 3.993802748600835*^9}, 3.993802822044148*^9, { + 3.993803587933173*^9, 3.993803671083523*^9}, 3.9938284587051287`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"a8089ae5-523f-4978-9b42-3f35729b147f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U42", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[51]:=",ExpressionUUID->"140433ba-1471-4528-934c-781efe652804"], + +Cell[BoxData[ + RowBox[{"-", "43.29548999246014`"}]], "Output", + CellChangeTimes->{ + 3.9913197877723045`*^9, 3.9938007769919767`*^9, 3.993801955868244*^9, { + 3.993802672122458*^9, 3.993802748645914*^9}, 3.993802822070863*^9, { + 3.9938035879612713`*^9, 3.993803671112574*^9}, 3.993828458744068*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"d83190be-a69b-4730-8317-f924cb7b12a5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U51", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[52]:=",ExpressionUUID->"90ab69bb-004b-499b-a4bf-da5009ab997a"], + +Cell[BoxData[ + RowBox[{"-", "161.3907844260869`"}]], "Output", + CellChangeTimes->{ + 3.991319787833355*^9, 3.993800777069632*^9, 3.9938019558996973`*^9, { + 3.9938026721544657`*^9, 3.9938027486794643`*^9}, 3.993802822104743*^9, { + 3.993803587995325*^9, 3.993803671146261*^9}, 3.993828458789784*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"2645d582-5511-49a2-88b7-8da8cfa3da5c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U21", "=", "0"}]], "Input", + CellLabel->"In[53]:=",ExpressionUUID->"dc4c0c66-c322-42f0-8173-f626d561549c"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210013676`*^9, 3.9938007770877237`*^9, 3.993801955916643*^9, { + 3.9938026721721487`*^9, 3.9938027486956*^9}, 3.993802822138073*^9, { + 3.993803588028162*^9, 3.993803671159233*^9}, 3.99382845879947*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"1aca9979-32d4-4aea-a4d2-208d310e74e0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U22", "=", "0"}]], "Input", + CellLabel->"In[54]:=",ExpressionUUID->"f76f7c86-87d9-4ab0-988a-08b9fbd4b5c6"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210355663`*^9, 3.9938007771059847`*^9, 3.99380195593331*^9, { + 3.993802672187916*^9, 3.9938027487122726`*^9}, 3.993802822156447*^9, { + 3.993803588044907*^9, 3.9938036711709633`*^9}, 3.993828458808612*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"3f36493f-cc86-47c5-a33a-203b1e84a4a4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[55]:=",ExpressionUUID->"f47f175c-ca25-4264-9b5c-2029bcf22ea7"], + +Cell[BoxData["68.50484772769052`"], "Output", + CellChangeTimes->{ + 3.991320421068556*^9, 3.993800777122861*^9, 3.99380195595057*^9, { + 3.9938026722039537`*^9, 3.9938027487289467`*^9}, 3.993802822174095*^9, { + 3.993803588061635*^9, 3.993803671182822*^9}, 3.993828458818177*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"c9510eba-49ef-462f-9dea-90a75301dd21"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"121a8cae-dff1-4795-88da-cf414374a050"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.991320421098543*^9, 3.993800777139863*^9, 3.993801955967062*^9, { + 3.993802672219776*^9, 3.9938027487454987`*^9}, 3.993802822191181*^9, { + 3.9938035880780478`*^9, 3.99380367119495*^9}, 3.993828458826187*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"46b2b301-7695-46fc-8885-b625a8bdce33"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[57]:=",ExpressionUUID->"6facea10-30ba-4977-b6e9-4e7cb6b14875"], + +Cell[BoxData["78.36655133019532`"], "Output", + CellChangeTimes->{ + 3.9913204211275444`*^9, 3.993800777156836*^9, 3.993801955985046*^9, { + 3.993802672236104*^9, 3.9938027487612762`*^9}, 3.993802822207035*^9, { + 3.993803588095743*^9, 3.993803671207213*^9}, 3.993828458834651*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"56fd28d4-cf2f-4806-9d53-baf0feccc854"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c11"], "Input", + CellLabel->"In[58]:=",ExpressionUUID->"95abbf77-cace-4dfb-93b8-991ca6c184df"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.9913204211385536`*^9, 3.993800777173678*^9, 3.9938019560022707`*^9, { + 3.9938026722521267`*^9, 3.993802748776864*^9}, 3.9938028222235823`*^9, { + 3.993803588111733*^9, 3.993803671219968*^9}, 3.993828458842371*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"a70bef6e-0c47-495e-905c-c5bca5f82572"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c12"], "Input", + CellLabel->"In[59]:=",ExpressionUUID->"2208a0da-428e-45d1-9a45-9095586c1571"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.9913204211683464`*^9, 3.993800777190844*^9, 3.9938019560194187`*^9, { + 3.993802672268169*^9, 3.9938027487928667`*^9}, 3.993802822239389*^9, { + 3.993803588127493*^9, 3.993803671233239*^9}, 3.993828458880487*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"99777d6c-442a-4a7e-9ebc-aec86f020a83"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c21"], "Input", + CellLabel->"In[60]:=",ExpressionUUID->"576b414c-1d22-46a9-a594-1e764abdb00e"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.991320421199068*^9, 3.9938007772073803`*^9, 3.993801956036744*^9, { + 3.993802672284265*^9, 3.993802748808551*^9}, 3.9938028222550507`*^9, { + 3.993803588143165*^9, 3.993803671247344*^9}, 3.993828458894075*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"3bbdf196-5584-4551-9858-4790023cd8d5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c22"], "Input", + CellLabel->"In[61]:=",ExpressionUUID->"cdd2770f-6b1e-47a2-9c27-1652e8f5674a"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.991320421228037*^9, 3.99380077722381*^9, 3.99380195605359*^9, { + 3.99380267230028*^9, 3.993802748824264*^9}, 3.993802822270421*^9, { + 3.9938035881589603`*^9, 3.993803671262602*^9}, 3.993828458905589*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"0db81723-d636-4413-835c-aba1955db3d3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w1"], "Input", + CellLabel->"In[62]:=",ExpressionUUID->"4635dd84-ecce-4158-bcb7-f38ff5aef7fc"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913204212585373`*^9, 3.99380077723999*^9, 3.9938019560701323`*^9, { + 3.99380267231618*^9, 3.993802748839958*^9}, 3.993802822285783*^9, { + 3.9938035881747913`*^9, 3.993803671266725*^9}, 3.993828458917315*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"75172bb6-50fc-47d7-9bfb-bef9268c0c7d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w2"], "Input", + CellLabel->"In[63]:=",ExpressionUUID->"7fb04775-0b2a-439c-8e83-d1c4a965433b"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913204212884274`*^9, 3.99380077725603*^9, 3.993801956086666*^9, { + 3.9938026723320913`*^9, 3.993802748856078*^9}, 3.993802822300988*^9, { + 3.9938035881912737`*^9, 3.9938036712790813`*^9}, 3.9938284589277573`*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"10eda795-13f6-4672-a208-76b8dd9e639f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", + CellLabel->"In[64]:=",ExpressionUUID->"18e6e47f-e3b3-4fbd-ad01-72838ac5840e"], + +Cell[BoxData[ + RowBox[{"-", "26.975748857822108`"}]], "Output", + CellChangeTimes->{ + 3.9913204213185234`*^9, 3.993800777272346*^9, 3.993801956103663*^9, { + 3.993802672348072*^9, 3.9938027488719177`*^9}, 3.9938028223163843`*^9, { + 3.993803588207057*^9, 3.993803671292569*^9}, 3.993828458936595*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"ef15165c-bea3-4d01-bc90-9e414767e35b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", + CellLabel->"In[65]:=",ExpressionUUID->"06d396a9-6288-4ee8-9cd5-a8ca2a621266"], + +Cell[BoxData[ + RowBox[{"-", "9.274238671929899`"}]], "Output", + CellChangeTimes->{ + 3.991320421349531*^9, 3.993800777288783*^9, 3.993801956120541*^9, { + 3.993802672364458*^9, 3.993802748887658*^9}, 3.99380282233222*^9, { + 3.993803588227901*^9, 3.9938036713059*^9}, 3.993828458945541*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"3882d1fa-e27c-479a-9f26-227d254288af"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB11", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U22"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[66]:=",ExpressionUUID->"8eef8572-4859-4318-8440-c6bc6e41b1b3"], + +Cell[BoxData["41.529098869868406`"], "Output", + CellChangeTimes->{ + 3.9913204213784294`*^9, 3.993800777305213*^9, 3.993801956138081*^9, { + 3.99380267238068*^9, 3.993802748904031*^9}, 3.9938028223479433`*^9, { + 3.99380358824424*^9, 3.993803671318845*^9}, 3.993828458955606*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"d0f67ccc-035a-4db2-b888-e54c0851df8c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB12", "=", + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[67]:=",ExpressionUUID->"eb9c96d4-4f7a-41f5-a56f-107181adbbd5"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.9913204213904285`*^9, 3.993800777321735*^9, 3.993801956154997*^9, { + 3.9938026723977118`*^9, 3.9938027489203997`*^9}, 3.993802822363785*^9, { + 3.993803588260324*^9, 3.993803671330945*^9}, 3.993828458963869*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"cd3edfed-fd50-4432-80d0-4005e93d5a8d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB22", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U21"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + "\[IndentingNewLine]", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[68]:=",ExpressionUUID->"86c2909f-6c57-46a8-b3c1-8057c6367c73"], + +Cell[BoxData["69.09231265826543`"], "Output", + CellChangeTimes->{ + 3.991320421419428*^9, 3.9938007773384323`*^9, 3.993801956172174*^9, { + 3.9938026724138613`*^9, 3.993802748938077*^9}, 3.993802822380664*^9, { + 3.9938035882645397`*^9, 3.9938036713443604`*^9}, 3.993828458972191*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"15e7b0d9-8e6a-4cc5-894d-5c79c7493fc7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kb", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "+", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"20596ec5-2282-4a59-97b8-0ecbe1d5724e"], + +Cell[BoxData["0.014405310234423041`"], "Output", + CellChangeTimes->{ + 3.9913204214494324`*^9, 3.9938007773549747`*^9, 3.993801956189353*^9, { + 3.993802672430953*^9, 3.9938027489557877`*^9}, 3.9938028223998747`*^9, { + 3.99380358829243*^9, 3.993803671364808*^9}, 3.993828458980266*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"759e0d48-9cec-4af7-9d51-344602e9800b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kw", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "-", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[70]:=",ExpressionUUID->"c6684f2c-3408-44e3-9c67-53688d9d6d9d"], + +Cell[BoxData["351.3032034374311`"], "Output", + CellChangeTimes->{ + 3.991320421481529*^9, 3.993800777371662*^9, 3.99380195620572*^9, { + 3.9938026724471073`*^9, 3.9938027489713907`*^9}, 3.9938028224237127`*^9, { + 3.9938035883102903`*^9, 3.993803671376803*^9}, 3.99382845898829*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"82a271d6-65eb-49ea-8a60-cbf86344104f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f1", "=", "0.4759950194"}]], "Input", + CellChangeTimes->{3.9918505481678543`*^9, 3.993827831381979*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], + +Cell[BoxData["0.4759950194`"], "Output", + CellChangeTimes->{3.993828458995739*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"a23210fd-6621-4b69-8afc-329ee4dde8ac"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991850549355442*^9, 3.991850549360302*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f2", "=", "0.2326306298"}]], "Input", + CellChangeTimes->{3.991850550777445*^9, 3.993827838767359*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], + +Cell[BoxData["0.2326306298`"], "Output", + CellChangeTimes->{3.993828459006616*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"c8f3a786-d7d4-42dd-9240-716bd029f0d3"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918505524437046`*^9, 3.991850552447544*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ @@ -83,9 +4878,12 @@ Cell[BoxData[ RowBox[{"1.16", "*", SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], - ")"}]}]], "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], + ")"}]}]], "Input", + CellLabel->"In[75]:=",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[BoxData["2.3793916761039806`*^-53"], "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[BoxData["1.912822713352366`*^-53"], "Output", + CellChangeTimes->{3.993828459016437*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"9ea235e8-597a-4f43-a218-497b3bb26cf7"] }, Open ]], Cell[CellGroupData[{ @@ -119,11 +4917,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915577064670105`*^9},ExpressionUUID->"c16f367e-d189-2745-b3b8-\ -a9b137c5e3b6"], + CellChangeTimes->{3.9915577064670105`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[BoxData["5.0207251137958644`*^-55"], "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[BoxData["1.0559908054997831`*^-54"], "Output", + CellChangeTimes->{3.993828459024824*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"2aba8c73-ff56-4868-948a-fc137a8ea253"] }, Open ]], Cell[CellGroupData[{ @@ -156,11 +4955,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557709328657*^9, - 3.991557711123291*^9}},ExpressionUUID->"b7d001ae-480c-4b41-8df9-\ -8010347227f7"], + CellChangeTimes->{{3.991557709328657*^9, 3.991557711123291*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[BoxData["1.8713726427856714`*^-54"], "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[BoxData["1.1448002056256914`*^-54"], "Output", + CellChangeTimes->{3.9938284590324793`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"24cfd73f-7faf-4646-8238-47dcf4ed29d1"] }, Open ]], Cell[CellGroupData[{ @@ -182,10 +4982,12 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ih", "*", "Ir"}], - RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"d15e5e59-9ad8-\ -e247-a132-b43b2736212a"], + RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", + CellLabel->"In[78]:=",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[BoxData["25.178011816139865`"], "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[BoxData["15.675709164167353`"], "Output", + CellChangeTimes->{3.993828459039411*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"38486430-0f6b-405a-af44-aaae1cdfa695"] }, Open ]], Cell[CellGroupData[{ @@ -210,10 +5012,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", - RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input",Expre\ -ssionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], + RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", + CellLabel->"In[79]:=",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[BoxData["37.88040277230648`"], "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[BoxData["35.61363732493441`"], "Output", + CellChangeTimes->{3.993828459046835*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"6bfb7ed2-6cf9-480a-be36-9b082428632b"] }, Open ]], Cell[CellGroupData[{ @@ -221,10 +5025,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb3"]]}]], "Input",ExpressionUUID->"906db7f6-73f3-8a4e-\ -88a4-7c75445a4f32"], + FractionBox["Kb", "Qb3"]]}]], "Input", + CellLabel->"In[80]:=",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[BoxData["0.7475613664924765`"], "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[BoxData["0.030314311517634588`"], "Output", + CellChangeTimes->{3.993828459054389*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"ced69811-4d6d-4f43-b436-6bb40557c3d8"] }, Open ]], Cell[CellGroupData[{ @@ -232,10 +5038,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ - FractionBox["Kw", "Qw3"]]}]], "Input",ExpressionUUID->"731b68b1-c44a-6c4a-\ -a9f8-bc957ede9a68"], + FractionBox["Kw", "Qw3"]]}]], "Input", + CellLabel->"In[81]:=",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[BoxData["3.219272026986442`"], "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[BoxData["3.140746533876125`"], "Output", + CellChangeTimes->{3.993828459062001*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"eb3f6b8f-09b9-40f3-b4e8-8718e80615b7"] }, Open ]], Cell[CellGroupData[{ @@ -243,10 +5051,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ - RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input",ExpressionUUID->"71af6813-\ -eb8f-4944-8d03-7bcd77a7b4b4"], + RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", + CellLabel->"In[82]:=",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[BoxData["121.94732101586592`"], "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[BoxData["111.85340798700913`"], "Output", + CellChangeTimes->{3.9938284590693083`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"24327123-9f73-462e-aa3d-cd2a4fc5effe"] }, Open ]], Cell[CellGroupData[{ @@ -254,10 +5064,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"28815b73-\ -08dc-e64f-8823-2a55ad6b8ca8"], + RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", + CellLabel->"In[83]:=",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[BoxData["18.822108918837237`"], "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[BoxData["0.4751983308624084`"], "Output", + CellChangeTimes->{3.9938284590774918`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"d9d02ffc-118a-4442-b8d0-8a746f90942e"] }, Open ]], Cell[CellGroupData[{ @@ -445,10 +5257,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"137e8d46-8eff-3c47-\ -bf8f-1350d0b8a0bb"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[84]:=",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[BoxData["0.04118782656518991`"], "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[BoxData["0.011760477591481985`"], "Output", + CellChangeTimes->{3.99382845908636*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"bf368283-938f-4e9f-8342-68f7a5a9c6a6"] }, Open ]], Cell[CellGroupData[{ @@ -460,18 +5274,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"65edd566-\ -4493-2440-9c51-9fca28ce324b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[85]:=",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], - -Cell[BoxData["4.366771860185336`"], "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[BoxData["8.172077212013178`"], "Output", + CellChangeTimes->{3.99382845921881*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"4e097589-f7e5-4f2d-b0da-7afd80f2baa7"] }, Open ]], Cell[CellGroupData[{ @@ -661,10 +5469,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"d808e80b-1928-8046-\ -afec-31463f4946cd"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[86]:=",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[BoxData["0.010567083454288358`"], "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[BoxData["0.4199086050447778`"], "Output", + CellChangeTimes->{3.9938284592263117`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"9016373e-3602-4be6-8022-9f36a90ade49"] }, Open ]], Cell[CellGroupData[{ @@ -676,18 +5486,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"56b1717f-\ -bc75-4047-98f0-7a0dede3f8a9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[87]:=",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], - -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[BoxData["1.3676266449261048`"], "Output", + CellChangeTimes->{3.993828459274115*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"6028fbdc-dfdd-417e-aac6-95dc9435a515"] }, Open ]], Cell[CellGroupData[{ @@ -778,10 +5582,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-\ -f74418e31aeb"], + ")"}]}]}]], "Input", + CellLabel->"In[88]:=",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[BoxData["0.130547288335749`"], "Output", + CellChangeTimes->{3.993828459281488*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"13df4bca-f855-4dab-822f-13034ee0f11a"] }, Open ]], Cell[CellGroupData[{ @@ -869,10 +5675,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-\ -91d5391478d5"], + ")"}]}]}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[BoxData["0.869452711664251`"], "Output", + CellChangeTimes->{3.993828459290352*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"b022f04e-707f-4614-8269-8e2b4f7be88e"] }, Open ]], Cell[CellGroupData[{ @@ -993,16 +5801,18 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"bea639c9-f172-\ -ef4e-9454-9d4e027f5fa2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel->"In[90]:=",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[BoxData["0.11350469384393182`"], "Output", + CellChangeTimes->{3.993828459299654*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"63ee7ada-94e6-4009-93b1-39da689696e9"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"752e2dd5-bee6-\ -2048-8697-fe84d79611fa"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ @@ -1063,27 +5873,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918505674491863`*^9},ExpressionUUID->"f8b12d93-5bd9-8641-aa98-\ -3d78ebb0f21b"], + CellChangeTimes->{3.9918505674491863`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.25528434250971`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 1, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938284593207684`*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"50f02a36-a9e0-42aa-b93e-c40c540de792"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"42c1a263-2456-664a-bb33-c5fe841cb412"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7208064409749957`*^-96\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 2, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938284593311043`*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"5650ea4c-bdb6-42a0-809a-f0bbedbe78fc"], -Cell[BoxData["4.366771860185332`"], "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.096516604193377`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 3, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828459335936*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"605cacd0-f4f5-465c-861c-7b2a0775a931"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 92, 4, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828459340185*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"45726306-708b-4f2b-8a21-e3096dd712b2"], + +Cell[BoxData["8.17207720922268`"], "Output", + CellChangeTimes->{3.993828462334846*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"eaa781f9-dc7b-49f5-8a99-4f90402678be"] }, Open ]], Cell[CellGroupData[{ @@ -1145,26 +6004,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185057022003*^9},ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], + CellChangeTimes->{3.99185057022003*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"be4d7bfb-c18e-564a-93ce-3f42607886e7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.25528434250971`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 5, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828462422489*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"abda8fbb-c156-40c6-a72a-a4ca98e4eef9"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7208064409749957`*^-96\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 6, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828462426723*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"10752050-e15d-46ae-ab6a-df193e80913c"], -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.096516604193377`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 7, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828462430481*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"6aecc371-305b-4998-9529-e0b1349d77ba"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 93, 8, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828462433496*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"e8f6c575-2681-4435-aea2-afe07852b169"], + +Cell[BoxData["1.3676266444591052`"], "Output", + CellChangeTimes->{3.993828466170308*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"4b27841a-c8f9-4811-8bae-e1b4b892c1ca"] }, Open ]], Cell[CellGroupData[{ @@ -1220,415 +6129,414 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505747312756`*^9},ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-\ -12d8b19f0936"], + CellChangeTimes->{3.9918505747312756`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d3cb6fbc-3803-0541-80d1-8cab47341c44"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d8687e0f-2f42-0543-a749-78a1ff3c9572"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -2.67879 2.97603 [ -[.15608 .28474 -6 -9 ] -[.15608 .28474 6 0 ] -[.28836 .28474 -6 -9 ] -[.28836 .28474 6 0 ] -[.42063 .28474 -6 -9 ] -[.42063 .28474 6 0 ] -[.55291 .28474 -9 -9 ] -[.55291 .28474 9 0 ] -[.68519 .28474 -9 -9 ] -[.68519 .28474 9 0 ] -[.81746 .28474 -9 -9 ] -[.81746 .28474 9 0 ] -[.94974 .28474 -9 -9 ] -[.94974 .28474 9 0 ] -[.01131 .14844 -24 -4.5 ] -[.01131 .14844 0 4.5 ] -[.01131 .44604 -24 -4.5 ] -[.01131 .44604 0 4.5 ] -[.01131 .59484 -18 -4.5 ] -[.01131 .59484 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 -.15608 .29724 m -.15608 .30349 L -s -[(25)] .15608 .28474 0 1 Mshowa -.28836 .29724 m -.28836 .30349 L -s -[(50)] .28836 .28474 0 1 Mshowa -.42063 .29724 m -.42063 .30349 L -s -[(75)] .42063 .28474 0 1 Mshowa -.55291 .29724 m -.55291 .30349 L -s -[(100)] .55291 .28474 0 1 Mshowa -.68519 .29724 m -.68519 .30349 L -s -[(125)] .68519 .28474 0 1 Mshowa -.81746 .29724 m -.81746 .30349 L -s -[(150)] .81746 .28474 0 1 Mshowa -.94974 .29724 m -.94974 .30349 L -s -[(175)] .94974 .28474 0 1 Mshowa -.125 Mabswid -.05026 .29724 m -.05026 .30099 L -s -.07672 .29724 m -.07672 .30099 L -s -.10317 .29724 m -.10317 .30099 L -s -.12963 .29724 m -.12963 .30099 L -s -.18254 .29724 m -.18254 .30099 L -s -.20899 .29724 m -.20899 .30099 L -s -.23545 .29724 m -.23545 .30099 L -s -.2619 .29724 m -.2619 .30099 L -s -.31481 .29724 m -.31481 .30099 L -s -.34127 .29724 m -.34127 .30099 L -s -.36772 .29724 m -.36772 .30099 L -s -.39418 .29724 m -.39418 .30099 L -s -.44709 .29724 m -.44709 .30099 L -s -.47354 .29724 m -.47354 .30099 L -s -.5 .29724 m -.5 .30099 L -s -.52646 .29724 m -.52646 .30099 L -s -.57937 .29724 m -.57937 .30099 L -s -.60582 .29724 m -.60582 .30099 L -s -.63228 .29724 m -.63228 .30099 L -s -.65873 .29724 m -.65873 .30099 L -s -.71164 .29724 m -.71164 .30099 L -s -.7381 .29724 m -.7381 .30099 L -s -.76455 .29724 m -.76455 .30099 L -s -.79101 .29724 m -.79101 .30099 L -s -.84392 .29724 m -.84392 .30099 L -s -.87037 .29724 m -.87037 .30099 L -s -.89683 .29724 m -.89683 .30099 L -s -.92328 .29724 m -.92328 .30099 L -s -.97619 .29724 m -.97619 .30099 L -s -.25 Mabswid -0 .29724 m -1 .29724 L -s -.02381 .14844 m -.03006 .14844 L -s -[(0.95)] .01131 .14844 1 0 Mshowa -.02381 .44604 m -.03006 .44604 L -s -[(1.05)] .01131 .44604 1 0 Mshowa -.02381 .59484 m -.03006 .59484 L -s -[(1.1)] .01131 .59484 1 0 Mshowa -.125 Mabswid -.02381 .02939 m -.02756 .02939 L -s -.02381 .05915 m -.02756 .05915 L -s -.02381 .08892 m -.02756 .08892 L -s -.02381 .11868 m -.02756 .11868 L -s -.02381 .1782 m -.02756 .1782 L -s -.02381 .20796 m -.02756 .20796 L -s -.02381 .23772 m -.02756 .23772 L -s -.02381 .26748 m -.02756 .26748 L -s -.02381 .327 m -.02756 .327 L -s -.02381 .35676 m -.02756 .35676 L -s -.02381 .38652 m -.02756 .38652 L -s -.02381 .41628 m -.02756 .41628 L -s -.02381 .4758 m -.02756 .4758 L -s -.02381 .50556 m -.02756 .50556 L -s -.02381 .53532 m -.02756 .53532 L -s -.02381 .56508 m -.02756 .56508 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 -.5 Mabswid -.02381 .01472 m -.02499 .01472 L -.02605 .01472 L -.02729 .01473 L -.02846 .01474 L -.03053 .01478 L -.03279 .01482 L -.03527 .01489 L -.0379 .01499 L -.04262 .0152 L -.04749 .01548 L -.05205 .0158 L -.06244 .01675 L -.07305 .01801 L -.08274 .01944 L -.10458 .02358 L -.12357 .02821 L -.14429 .03435 L -.18493 .04963 L -.22406 .06826 L -.26565 .09204 L -.30571 .11858 L -.34426 .14717 L -.38527 .1805 L -.42475 .215 L -.46273 .24996 L -.50315 .28853 L -.54206 .3264 L -.58342 .36674 L -.62326 .40497 L -.66159 .44044 L -.70238 .47601 L -.74164 .50741 L -.77939 .53432 L -.8196 .55879 L -.85828 .57771 L -.87793 .58543 L -.89942 .59234 L -.91995 .59741 L -.92911 .59917 L -.93905 .60073 L -.94426 .60141 L -.94906 .60194 L -.95356 .60236 L -.95851 .60273 L -.96295 .60299 L -.9671 .60316 L -.96939 .60323 L -.97148 .60328 L -.97264 .6033 L -Mistroke -.9739 .60331 L -.97509 .60332 L -.97619 .60332 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzlnAmUFMUZx3t3jl1Yl0MwogJZAUEWIWrU6CjPGx6eGBXj8eCt6AhGhQdo -jMeLJ15RGw8UD0DAeB+5OvHCvMQzXom3TuJ94RnvKzhOVXdXV838/1U9uytq -so8pZv71q6++/uqb3qrq7t21Y860gw/vmDN9akfb+FkdM6dNnzq7bdyMWRUp -0+B5DTdXXj3bPPG+7HlxUa78K/9WFEL5Zt+vL//LeGHH5fAlyrnfo/peYewq -747lrVpE2azI2ZzsJ8qcIo/g5ABRZhV5KCcHijKvyIM4OcTsfYpGSnCEeifr -D+CW2k1yX06ONslJnNxQlI2K3IuTG5s29+Dkpia5Gyc3N3vfhZMF0+YETo41 -yXGc3MbsfQdObmeS23FyB5Pcpnq0x5nejeWWJpiWtuTkzia5BSd3NcmfcHJ3 -k9yUk3sATZYb8zY/Na1byL1MckNOTmJ+jOZt9jGtW8h9mfV23mY/07pOSvAA -s359bmky63093maKad1CdjDrQ3ibA03rFvIgk2zjZJH5MYi3OcS0biGnM+tr -8zaHmtYt5GEmOYCTRzA/1qjOjxmM7M+tzzT9sJCzmPW+vM1s1qYPbzPH9MhC -HsWst/I2v2BtVuNtjjY9ishG+V/OK5cCr1jwwp9C0QtKUpVWgmIk+4GXhXzB -K1bqclFd4Be9uKpS6RWDkpcHHh3DjqJH6JvXHMklz49ckp9l15XPYtJS62Ho -Rd4rxXjlFQhXC75XEhEQQpOUCkVfYaXAl04Xg+TAdceOZc42R85mQkm4Ugyi -Txmv5Fe68UvyU2/N21iL4xK3E5+yoKvjzNEzO407yQBjvXWtEgJrp3ISeDw7 -0lzqTlvibgItE8SQiSAX/CYViIKMNzvoXzFPsqk96RkNd7lcSZqKL35QUknk -R1nRqIIiGP1H5HUJpe4J5nCY/sij1vzRc6An8DFOyXLJF/0lhyr9kYnu9QBO -nMTC0xC5k02+P0Ut+UXgQ6uGR1qEYo/ElyLQvkcuj05mHmknmooJv1BQKeFX -zLfGdUH1iaOcDKo2ODLwspvkMFD+nAK0rzx6hjwVaCs5PlflgAU6HWhfcPwM -oH3O8TOB9hnHz1Ie65Bkzgb4x9zSOUD7iOPnAu1DjvtA+4Dj84D2PsfPU1Gw -QBcA7V2OXwi0dzg+H2hvc/wioL3F8YuB9ibHFwBtRXV+XKKCtoJbugxor3H8 -cqC9yvGFQHuF44uA9jLHFwPtJY5fAbQXOb4EaC9wfCnQnuf4MqA9x/Er1Vha -oKuAVqrOiqsB9Cy3eQ3QnuH4tUB7muPXAe0pjl8PtCc5fgPQnuD4jUB7nOMj -I03/LScnY5Vfs/EMKX6h6bXcTiNTbzxlD+fTsS9i6lEIJ8jWafxqwPfVYxtB -MnnKRL4XjOlMGfpg828QtZ3VbMuY5eoIFzdb63K9IeW2M4btxjpD35NnT3uk -hWuaQJoKzbd44TzTXAqxdU+4W2JfG6nJKl+VKR/FPM+P6jMpbKPs6m+xZfMh -jZ8/pLa7Hktuu+vxRbbzneyvB0+rUZFWEtPyyBW0fhkZO6Bp8hV+RsugEUBr -BqZRRvSzjFrtsipv9OFwazAwnU0ZBdS2uf7IIDP5lNFq5mO5gTrbiDQKTfcA -JthYRl2jOI9QppMTGfKuFbi1OjhaFJXG+t1CgcyljEI9Y1mnC/mU0bKM5WgV -ppI0Lb7GsQl9SyUeS11zeIzO3Gi3phdwq++qHct8yijYxrKOyCAzTSmjpY+l -jNkY5XuSh45dqOH2ah5oPMBwQLDpeFz1se6zase6qf54tVEPuxxDm4d1xDXl -hC5OomTj2pyE6Hty5jIi1PTN3uqj0r1FS4FGYE9esJGrR1sS1PaGfxEXcNhR -iDOdDMpQm5udCJQ1QR3Bs1zTaY8NCRNeYjqcrOk5b5q0jnmy9euhvd9hWkjj -/vQLJLFWHdI1gf9hOufUPEnsI8chylJ/mgx/wpfd53Wc/dQfw7ZUvtcfX7ev -9cfekkKj9O7UuSbcY0+7jz4sJWfbzx+uDi055YWe5sC3NFke6/b7geMLUywr -wx4ukWWYchZXspa6wXZzXYniQGw62w3BJV5XXwrtTMwtc85bgHY/x28F2n0c -vw1o93L8dqDdw/E7gHY3x5cD7S6O3wm0v3H8L0D7a4jLZb24bufNE0UDN9Kc -Umv6lrj/FV8y0fdQ16IhUnsA/8/x+WZ84TdidlIbBrSWLtjbCGj9uOt3AW05 -x+8G2h0cvwdot3P8XqDdxvH7gHYrx+8H2i0c/zvQ/szxB4D2J44/CLRAw2XN -QwD6I7f5MND+wPFHgPZ7jv8DaL/j+D+BZrkj/lGg3czxx4B2E8cfB9qNHH8C -aDdw/EmgXc/xp4B2HcefBtq11ZnyDICu4TafBdrVHC8B7SqO/wtov+H4v4F2 -JcefA9oyjj8PtKUcfwFoSzj+ItCu4PhLQFvM8ZeBtojjrwBtYXWmyJsY5Lx+ -Ibf0OtAu5fgbQLuE4yuAtoDjbwLtYo6/BbSLOP420OZz/B2gXcjxd4F2Acff -A9r5HP8P0M6rHvD3ATSP2/wAaD7HPwTauRz/SGWfBfoEaL/m+KdAO4vjnwHt -TI5/DrQzOP4F0E4PcU+7C9eLb6HA191r7xnG1/PjHYS0dzV/CbTTQu/iNTq6 -JFV7k3W669v13sf8X6DN5e7FF2BrL6yam6Jp72NeCbRT3d27tuTtdzSvVN+I -buzKdfOyLBtAxUmd8QFcQw43cpLto4K6eRiNezmMQW3FiekG33SnqXYz33Fr -sCwzoOKE6Jubj9K3Zqc0vm6cbvM4hRf8VvPIbs3mWi8V1tr9uK7coCzLnMrO -yAl0zpMlWkYf52iDltmW50tliSJ3jKMN2g75paNNizpyF4nuHThKayNrpIyu -TB/psN4bVMxxtOkDKixP48qyrzpeF4l2v2c62vQHFTMcbdYAFZYnhWX5A1Bx -uKMNumB0mKPNAFDxc0ebtVSEXeQ6oGIazKiBgDzEYX0QqCg62gxWvrvINlAx -1dFmXVBxoKPNEOWRi0Q7bFMcbdYDFZMdbYYrj1wkqtjf0WYkqNjP0aZdeaST -SfZsABru47A5Wtl0kT9S5N4OciNF7ukgfwwqJjrabKKsu8jNFGl5Ql6WyWPy -lifkZVlQ5E4OcitQMd7RZqyy7iK3VuSOMBe2VfXbOyxtr8htHeSOitzaQY5X -pOX5e1kmD+Fbnr+X5c7qADd3kLspm5s5yInKZpiJ5t2W0U8mKl0ru2zKtmhm -Kss9lTfRU/jxVMS1iEM3h6H1oiwnqeiM4b30rsfiz5Tfo7rJojx7yvXUiE5Y -TP6+yGT1cWg3eSZ/9zUJeWA3WZSPwMvrfmvqOYjv5Gi11KEpuyzlzKxVyNF9 -YOEFKbL0qJGp3e/SX7Sx1Mv3q+ivA3kNXwM/7XZb\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-19.394, 0.892147, 0.709611, \ -0.0012616}},ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-\ -c578eb57eb6a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV0nc81f8XB3CEEJkXJWW2h2ySc3DtUaSyMy6yty+RVOibIpXSICoiUUTq +c0lIJflG0dCPsskemaHfu788no9z3q9zzv2Qdg2wcmdjYWFhZWVh+fs36P3O +TU+b3msraz7NkQmjofZotoorvQAoy6X0dcQdmaqpcvQKaFthcpqHeD/jP05e +pVfg8bXJZjiUhsURJ15y0Bvg16N+yRris6/Fq07kfwCnas7mc8RUU9CtRcVP +wJFWF2FMPPitPjqy/Csc4xnk/x1Cw7W9svYzem1QCSbXs4hNx6I1Qhp+QHzm +IE2TuHJxcFVEfifYNY0mvAmm4eeTYlFl/t2g+Sh9xIh4lJM++EuxF0QNHUwr +g2jIeT7QVmm2D2zePL29iXi9YEZdUPkADEfaT8YF0tBCYubeqN4w/Gj/fFYi +gIYeWTKiO7hGIUW7uMXan4Yn5PfF+zSMQQWtVfqUHw2/irXsDs2fgAWjcw3P +fGjIsPP2unx+EtSlNu2q8abheDrL7cf+U5Cnq3TrhRcNuWR2CEwoToOW7e7C +q540TGW8NBSgzQBrtM6BQA8aSuXantg1OwPj65cFtd1pqL49YdSvfA5Y2jb1 +P3Gl4VHVHw2Deotw1GzTYTFHGv6KCGPn2bgEd7/f3HzJnoax5au0tnAtg3eY +725WOxpeQ/UHng1/YGG5b6H8ENkvp44enM+KU9xPxrP30TD/9eWOkxJseGnq +2p9qc7Jvv1P0xfNs+DPunm+zKQ2jt06XFPmvwAE11n+aDcm+j6RlxxQ50ML2 +f0NGQMNvTcOVy3c5cPbowUTuvWT/yad2q2mc+DEv50mlJg0LlC0u7ZjlxGJr +9wZOVRrWUsdYfcu5cMZOo3T1dhpOv2z+MaDHi7rRaekrRGkoZMYrEFXJi/Xm +GVpNQjRUaKEjnwYf9syEjV/gp6F3z5Os3TtX43bJ088HuGgYyNagsJdXAD3f ++Kxl/S2CvTIPJ+JnBNHqVHT15zYR/OVRz92oJIQud0Y+tn4VQbYHfdLiQUJY +MCha1NQiglJKG6zyh4RQ20uL5UaDCNrppTx+3yGMW62jXNLLRbDRLThE7B0N +rR8of/NJE8HvucnnnLlEsVvwzJfiSyI4PJR/976+KG52FY8cThJBntDu5j1V +olgvvqIb4kSQHmet7PxEDKvFF0acA0WQma06nZe5Bg+1NwheNxDB7N6FcM1Q +SayoryzaNySMRgfPfA8plMROVuGch73COFwrbFDYJ4l52gwfDrKXcvZ2mpTt +evS0CMq50SKMta5OJRzaG9ApIe2g+3NhnBzr+GfgtBQmsMfNnkkSRmE/emmJ +uQwGq9yx8dgsjNaeq3aYdMpj+M4h1jJTIZSQuXDiXM92dJgyVSvyEcDtOaG8 +v0ERm2Zq7325you3g+X2P2lQQeuEEwlRL7mwKRzU4nI0MGjW3KVgkR2lnT5Z +OPruRbMeXp3YF6zo/qfsoWQkoniY3lk5y2UQWSmRWh2LqJPt6xKqtQw1q09E +uv+LSLd9O/Zx0zJIrTekF6Yhft7aRqtYXoI2rS+tWmWI45vsWvYWLoHVsVl2 +hynEQllW13neJdCeVrO/4aeD/Os8t0h/+Q1iQ89Wirnqojd/XUpm6jyoz/HM +qnvp4rFVwSWJcfNgx+HYZxeoi233lURPhs5D+gbWV7didJG79sKpC9bzIGNt +fGrjTV1kCzOnK9LmYefz1kWVFl2M/r2n5ey1OTC4sDBhbaCH7JyBu61zZyFU +Savt0lY6Ksyrso50T4OD6tiPlN10tNkVaUV9nga6xp3uZHU6mvO+H0h+Ow3C +wDWUaEDHpGfMhoOPpuGxScv8KVfy3lyl3jJqGsZdfMVCbtCx4HofY0lkGnxS +0q0O8Ogja6ZR6bzFL3AdWawTHtRHHiOP6zptk/D09cz0/Ql9VB/zuotNk8Cb +NS6D8/pocTy126iW1K16on25DJCLfd9gaAGpP3un8GqjAT53LDHXPD4JT07d +uBbuZoCc557ahUpNApe4+tHWNgPcGOReHeY3AYW6ISszGw0xIYH+cY/UOIRK +22uXfDZEa74HM4ui46DFohf2pt0QnXgVS2r5xqHhuVD32JAhcn3tr26cGYNh +9ceVyGWEgTGevPOFY7B110RYFxrh4zL54CfrxyBPIqBH/rERxilxt17iHoXs +X97VBanGuPji2Y/vbMPQev+6tG068VSumdjkEKw+UneSI9sYtQu6zjl0DkHk +W3ldpxJjDKv+fIivaggsbnXU8H80xuXzr2Y5Y4Zg3vBQbTC/CTJjC40sFwfB +4qbOG/VEEzRYXNm9wDoIczri/9WeMMUbcedvntw1AL+Gc3XMz5hirc0Rzk7p +ARhLUyv7lGyKjcl6x0xEBqBv5FBmX4Ypvszwc9gz3w8t168EcVWYIs/KRfnU +l/1QPCEkajZnir5xB6vX2vWD922+I82BZriQUMWtn9wH7SwrJjpdzFHSVVzG +W7AX/NcFpJyU3YdejlV1h7O64KFXXdWV+P1oYEr3m2Z0wLGpNbPbvCzR/3mq +iQ69HaZNDA69OWKFPkmaK4VXfgMN+4s6vZYH8LJTQPsF6y/wcU2Gd62SNVp+ +dSuZ3fYJ1t47XZG3+SBSDss1WzY3w7OOrWYWfIeQ4dop6vLvB1jfMu4ZPnII +HXXNUzrlmkDpysWCux2H0aWxbGva/f8gg31q56WXNih7TPVKXfw7KNPZ9S2e +ssWaYAMaa8xbuKaWKLiYb4dW/2TcH3rxBhr/l5OgdN4e3a5k1JhYvoYn5uly +gbEO6BxVaR8+WQsTfgdY/BmO6HiK76Tlh5cwbbDl6KieE+Z+euHq/akG8kZa +50JUj+Ad9ZLL2F0NNrdz3Bx5nZH71dwHXYlqKHlsemTFGWcUibfpSLOvAg2J +j/Nn550x1jrxVUzUC5Dt8Pz2wcsFHToSlXO9KqFnlc++9G4XlFr7r9YbxnNo +SrZwMzzoijY+/+hjSgWkRmSuCmtyxaLcHz0f6sqhovLPvJuxGxZxiJl/kS6H +3dXK6ptM3fDoPvaUmxvK4d5Lr/BBMzcUaN6u5yJZDhfrmicD97shS9TjuXHx +cvD4mDt0/LAbNvEqX5UWKAfBvn3tae5uGJvPb/xmmQkefFlV7066YcpaUV6Z +dibwO+AZJaYbKmgf+sB6iwlSIm8a11WQvFMOL2duMkGhwVycs9INpYofmY1c +Z4KVlv39r9VuiFP5sj+uMCF1Xfi742/JvBqer5+SmLC2/QF/3VdSX6fKzh/D +BDknsWsOs+Sexoa3hUeYoOE8mhevzECFn82iZzcx4d718RALVQbu1/ASW5Jn +gkjzpLaYOjHbYc9gOSaM6s+25O0h/SfVfjlLMyF7Gwtrgy4DU0rmmeYSTFg9 +K2grZMnAwM1Fte78TOhJUuHO9CP+ZCSaPEeB5Ru1Fs8Akrck/O+2WQoqWTQz +FYIYGLv6tE79NAXXQ7RVakIZKBXgnrhqigILW0OX3iiSLz3llzFCASVnS21L +ZGBHwAOT5S4KksujvZ7dI/uYtLY+fk+Bn2KaRkQeA5vWBS/F/EeB2f1ibvV8 +Uj/sctCsgQKetL77TwsZyCJ3+vbgWwrig/cPlpWSfLasHJVXFERvkfN5UkP2 +XdBV5qigwDvtne/j7wwsMk3acTafAuPVfVrBHSR/pPRU1H0KNsez8Cl2kfe7 +L3MG5FHQF6xSWNxL5l1puG57jwIXi8yRomHSv7Pgp9YdCmw4QvwfLZD8oLOr +tG5QYBiyNrBA1B2rDi/RJc5RUJOZYHJJ3B1R8UjkhkQKtBom5SLWEpfa8Mqf +pUBB/l2r3np3zNJwMFc+Q8GaL1F6/5Mn7/8pU3U7TcGQZrsojwrxV7FYtmgK +LrBlPfc84I5SN/pf6fuT+3fxXjM/6I7Odx5GhvlREGcfEax02B1jX31KuOdL +QUTp/k1/7NyRxfxhAa8P2d+D9eJVV9LfHyXz05MCpXpXxqsg0h83c7XLhYIv +F+VXyaa4Y8fX5pLPhyh4CHxHBy6SeRXO1lrEcSO/agsvk31SliTvHqRA0bg2 +Rj2N5Jdybg+1Jt+PxW3S/BZ5X16pIGdFgUFAVmtEAamXZNaVm1MgKfmvqvZD +Mv+L7pgS8a/6gMsrikh+/9m9hWYU3NkI5sklpK7yaP9dUwqW2tur7jLJvM8C ++zKMKSg1k8h7X0e8Mf1GnT4F5xbYOFLrybzR6d0HiF3zBl1sG4gvl419p1Mg +wM6U6Gkk8y/Lfp/Xo8C33ObC/Gdyr9+zuL26FMhuvRou10vmMV7//K1NwcKX +480/+8j36Xb7cY24Kd5d4dEAeV9vu6BKHNOpPKgxTPITBbPC91Lw7Vqz474p +ss+q1fdXaFFwaaWg/jFWD5TaU5FtrUFBxWS7fegKD+yge15bUKegvz0/2J+D +1Mvj5m4Ta5XSs1y5PZBl/MPSLzXy/+Yc8dtE0AOrlLrWFqiS/c30hfSFPTDL +zTTQkXiPmtAWoHlgrEH2bgHiFL6CQ0prSF3k52ykCqkzfxRLSJP8oS0XnZQp +8MgpqKPJkv7/RdIliFNSIn/wy5P8NCO3ViUyz0OYj30LeW+wq9uWOEXY8Oiw +AvHn+kEfRQqYy8In+hTJfonP5pSIe392XOlQJh54FbS0mwLNqmMvW9TJfba0 +nFTiHt+H658j8Tl//hYFClbbRKk81fVA53UQlkusoWdkVkwn86c79aOJk9d0 +ReYYkbrI8U1biZ+xP0rJNCE+4K6+grh7LCr3upkHYuOfkvZdFKi/pn1K2k/u +i945dJXYtbhr6IwVua+99F4YcVL6I7ZT1sRtHxoOEncFGyuE25D3G57arCXm +cxI1DLQj970NqVzeSfKMux29Hcg+3x8l9xAnbTh+zsmZ5Mtc8i8lfsZjcsfG +ldSHd8bcIu6aFqWsGGQ/e/W5s8R8nd2NZh7Efvlt4X/zGor6DI6S/KMnt7kT +uz49voTexK1Uj/Xf/DsmInt8Sf/l/VwGf/OTxLap+JN5RbpX1f/mR/To7Aok +v9+FpOTtxLyMYpstwaT/284JaWK1fTEBsqHkvuNyleJ/8zVNEyTDyfd46Dst +QHxeXjxDLILM6+NI4yEuE+gtETxG7h8cvcNB3Pm7uH5VNKlXbVzD9je/P6aT +I4bMowrm/+ygQPWj6dyfE2SeTyz9r/8Pd+5WuA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV0nc81f8XB3CEEJkXJWW2h2ySc3DtUaSyMy6yty+RVOibIpXSICoiUUTq +c0lIJflG0dCPsskemaHfu788no9z3q9zzv2Qdg2wcmdjYWFhZWVh+fs36P3O +TU+b3msraz7NkQmjofZotoorvQAoy6X0dcQdmaqpcvQKaFthcpqHeD/jP05e +pVfg8bXJZjiUhsURJ15y0Bvg16N+yRris6/Fq07kfwCnas7mc8RUU9CtRcVP +wJFWF2FMPPitPjqy/Csc4xnk/x1Cw7W9svYzem1QCSbXs4hNx6I1Qhp+QHzm +IE2TuHJxcFVEfifYNY0mvAmm4eeTYlFl/t2g+Sh9xIh4lJM++EuxF0QNHUwr +g2jIeT7QVmm2D2zePL29iXi9YEZdUPkADEfaT8YF0tBCYubeqN4w/Gj/fFYi +gIYeWTKiO7hGIUW7uMXan4Yn5PfF+zSMQQWtVfqUHw2/irXsDs2fgAWjcw3P +fGjIsPP2unx+EtSlNu2q8abheDrL7cf+U5Cnq3TrhRcNuWR2CEwoToOW7e7C +q540TGW8NBSgzQBrtM6BQA8aSuXantg1OwPj65cFtd1pqL49YdSvfA5Y2jb1 +P3Gl4VHVHw2Deotw1GzTYTFHGv6KCGPn2bgEd7/f3HzJnoax5au0tnAtg3eY +725WOxpeQ/UHng1/YGG5b6H8ENkvp44enM+KU9xPxrP30TD/9eWOkxJseGnq +2p9qc7Jvv1P0xfNs+DPunm+zKQ2jt06XFPmvwAE11n+aDcm+j6RlxxQ50ML2 +f0NGQMNvTcOVy3c5cPbowUTuvWT/yad2q2mc+DEv50mlJg0LlC0u7ZjlxGJr +9wZOVRrWUsdYfcu5cMZOo3T1dhpOv2z+MaDHi7rRaekrRGkoZMYrEFXJi/Xm +GVpNQjRUaKEjnwYf9syEjV/gp6F3z5Os3TtX43bJ088HuGgYyNagsJdXAD3f ++Kxl/S2CvTIPJ+JnBNHqVHT15zYR/OVRz92oJIQud0Y+tn4VQbYHfdLiQUJY +MCha1NQiglJKG6zyh4RQ20uL5UaDCNrppTx+3yGMW62jXNLLRbDRLThE7B0N +rR8of/NJE8HvucnnnLlEsVvwzJfiSyI4PJR/976+KG52FY8cThJBntDu5j1V +olgvvqIb4kSQHmet7PxEDKvFF0acA0WQma06nZe5Bg+1NwheNxDB7N6FcM1Q +SayoryzaNySMRgfPfA8plMROVuGch73COFwrbFDYJ4l52gwfDrKXcvZ2mpTt +evS0CMq50SKMta5OJRzaG9ApIe2g+3NhnBzr+GfgtBQmsMfNnkkSRmE/emmJ +uQwGq9yx8dgsjNaeq3aYdMpj+M4h1jJTIZSQuXDiXM92dJgyVSvyEcDtOaG8 +v0ERm2Zq7325you3g+X2P2lQQeuEEwlRL7mwKRzU4nI0MGjW3KVgkR2lnT5Z +OPruRbMeXp3YF6zo/qfsoWQkoniY3lk5y2UQWSmRWh2LqJPt6xKqtQw1q09E +uv+LSLd9O/Zx0zJIrTekF6Yhft7aRqtYXoI2rS+tWmWI45vsWvYWLoHVsVl2 +hynEQllW13neJdCeVrO/4aeD/Os8t0h/+Q1iQ89Wirnqojd/XUpm6jyoz/HM +qnvp4rFVwSWJcfNgx+HYZxeoi233lURPhs5D+gbWV7didJG79sKpC9bzIGNt +fGrjTV1kCzOnK9LmYefz1kWVFl2M/r2n5ey1OTC4sDBhbaCH7JyBu61zZyFU +Savt0lY6Ksyrso50T4OD6tiPlN10tNkVaUV9nga6xp3uZHU6mvO+H0h+Ow3C +wDWUaEDHpGfMhoOPpuGxScv8KVfy3lyl3jJqGsZdfMVCbtCx4HofY0lkGnxS +0q0O8Ogja6ZR6bzFL3AdWawTHtRHHiOP6zptk/D09cz0/Ql9VB/zuotNk8Cb +NS6D8/pocTy126iW1K16on25DJCLfd9gaAGpP3un8GqjAT53LDHXPD4JT07d +uBbuZoCc557ahUpNApe4+tHWNgPcGOReHeY3AYW6ISszGw0xIYH+cY/UOIRK +22uXfDZEa74HM4ui46DFohf2pt0QnXgVS2r5xqHhuVD32JAhcn3tr26cGYNh +9ceVyGWEgTGevPOFY7B110RYFxrh4zL54CfrxyBPIqBH/rERxilxt17iHoXs +X97VBanGuPji2Y/vbMPQev+6tG068VSumdjkEKw+UneSI9sYtQu6zjl0DkHk +W3ldpxJjDKv+fIivaggsbnXU8H80xuXzr2Y5Y4Zg3vBQbTC/CTJjC40sFwfB +4qbOG/VEEzRYXNm9wDoIczri/9WeMMUbcedvntw1AL+Gc3XMz5hirc0Rzk7p +ARhLUyv7lGyKjcl6x0xEBqBv5FBmX4Ypvszwc9gz3w8t168EcVWYIs/KRfnU +l/1QPCEkajZnir5xB6vX2vWD922+I82BZriQUMWtn9wH7SwrJjpdzFHSVVzG +W7AX/NcFpJyU3YdejlV1h7O64KFXXdWV+P1oYEr3m2Z0wLGpNbPbvCzR/3mq +iQ69HaZNDA69OWKFPkmaK4VXfgMN+4s6vZYH8LJTQPsF6y/wcU2Gd62SNVp+ +dSuZ3fYJ1t47XZG3+SBSDss1WzY3w7OOrWYWfIeQ4dop6vLvB1jfMu4ZPnII +HXXNUzrlmkDpysWCux2H0aWxbGva/f8gg31q56WXNih7TPVKXfw7KNPZ9S2e +ssWaYAMaa8xbuKaWKLiYb4dW/2TcH3rxBhr/l5OgdN4e3a5k1JhYvoYn5uly +gbEO6BxVaR8+WQsTfgdY/BmO6HiK76Tlh5cwbbDl6KieE+Z+euHq/akG8kZa +50JUj+Ad9ZLL2F0NNrdz3Bx5nZH71dwHXYlqKHlsemTFGWcUibfpSLOvAg2J +j/Nn550x1jrxVUzUC5Dt8Pz2wcsFHToSlXO9KqFnlc++9G4XlFr7r9YbxnNo +SrZwMzzoijY+/+hjSgWkRmSuCmtyxaLcHz0f6sqhovLPvJuxGxZxiJl/kS6H +3dXK6ptM3fDoPvaUmxvK4d5Lr/BBMzcUaN6u5yJZDhfrmicD97shS9TjuXHx +cvD4mDt0/LAbNvEqX5UWKAfBvn3tae5uGJvPb/xmmQkefFlV7066YcpaUV6Z +dibwO+AZJaYbKmgf+sB6iwlSIm8a11WQvFMOL2duMkGhwVycs9INpYofmY1c +Z4KVlv39r9VuiFP5sj+uMCF1Xfi742/JvBqer5+SmLC2/QF/3VdSX6fKzh/D +BDknsWsOs+Sexoa3hUeYoOE8mhevzECFn82iZzcx4d718RALVQbu1/ASW5Jn +gkjzpLaYOjHbYc9gOSaM6s+25O0h/SfVfjlLMyF7Gwtrgy4DU0rmmeYSTFg9 +K2grZMnAwM1Fte78TOhJUuHO9CP+ZCSaPEeB5Ru1Fs8Akrck/O+2WQoqWTQz +FYIYGLv6tE79NAXXQ7RVakIZKBXgnrhqigILW0OX3iiSLz3llzFCASVnS21L +ZGBHwAOT5S4KksujvZ7dI/uYtLY+fk+Bn2KaRkQeA5vWBS/F/EeB2f1ibvV8 +Uj/sctCsgQKetL77TwsZyCJ3+vbgWwrig/cPlpWSfLasHJVXFERvkfN5UkP2 +XdBV5qigwDvtne/j7wwsMk3acTafAuPVfVrBHSR/pPRU1H0KNsez8Cl2kfe7 +L3MG5FHQF6xSWNxL5l1puG57jwIXi8yRomHSv7Pgp9YdCmw4QvwfLZD8oLOr +tG5QYBiyNrBA1B2rDi/RJc5RUJOZYHJJ3B1R8UjkhkQKtBom5SLWEpfa8Mqf +pUBB/l2r3np3zNJwMFc+Q8GaL1F6/5Mn7/8pU3U7TcGQZrsojwrxV7FYtmgK +LrBlPfc84I5SN/pf6fuT+3fxXjM/6I7Odx5GhvlREGcfEax02B1jX31KuOdL +QUTp/k1/7NyRxfxhAa8P2d+D9eJVV9LfHyXz05MCpXpXxqsg0h83c7XLhYIv +F+VXyaa4Y8fX5pLPhyh4CHxHBy6SeRXO1lrEcSO/agsvk31SliTvHqRA0bg2 +Rj2N5Jdybg+1Jt+PxW3S/BZ5X16pIGdFgUFAVmtEAamXZNaVm1MgKfmvqvZD +Mv+L7pgS8a/6gMsrikh+/9m9hWYU3NkI5sklpK7yaP9dUwqW2tur7jLJvM8C ++zKMKSg1k8h7X0e8Mf1GnT4F5xbYOFLrybzR6d0HiF3zBl1sG4gvl419p1Mg +wM6U6Gkk8y/Lfp/Xo8C33ObC/Gdyr9+zuL26FMhuvRou10vmMV7//K1NwcKX +480/+8j36Xb7cY24Kd5d4dEAeV9vu6BKHNOpPKgxTPITBbPC91Lw7Vqz474p +ss+q1fdXaFFwaaWg/jFWD5TaU5FtrUFBxWS7fegKD+yge15bUKegvz0/2J+D +1Mvj5m4Ta5XSs1y5PZBl/MPSLzXy/+Yc8dtE0AOrlLrWFqiS/c30hfSFPTDL +zTTQkXiPmtAWoHlgrEH2bgHiFL6CQ0prSF3k52ykCqkzfxRLSJP8oS0XnZQp +8MgpqKPJkv7/RdIliFNSIn/wy5P8NCO3ViUyz0OYj30LeW+wq9uWOEXY8Oiw +AvHn+kEfRQqYy8In+hTJfonP5pSIe392XOlQJh54FbS0mwLNqmMvW9TJfba0 +nFTiHt+H658j8Tl//hYFClbbRKk81fVA53UQlkusoWdkVkwn86c79aOJk9d0 +ReYYkbrI8U1biZ+xP0rJNCE+4K6+grh7LCr3upkHYuOfkvZdFKi/pn1K2k/u +i945dJXYtbhr6IwVua+99F4YcVL6I7ZT1sRtHxoOEncFGyuE25D3G57arCXm +cxI1DLQj970NqVzeSfKMux29Hcg+3x8l9xAnbTh+zsmZ5Mtc8i8lfsZjcsfG +ldSHd8bcIu6aFqWsGGQ/e/W5s8R8nd2NZh7Efvlt4X/zGor6DI6S/KMnt7kT +uz49voTexK1Uj/Xf/DsmInt8Sf/l/VwGf/OTxLap+JN5RbpX1f/mR/To7Aok +v9+FpOTtxLyMYpstwaT/284JaWK1fTEBsqHkvuNyleJ/8zVNEyTDyfd46Dst +QHxeXjxDLILM6+NI4yEuE+gtETxG7h8cvcNB3Pm7uH5VNKlXbVzD9je/P6aT +I4bMowrm/+ygQPWj6dyfE2SeTyz9r/8Pd+5WuA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 5.364389981563864}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 5.364389981563864}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV0nc81f8XB3CEEJkXJWW2h2ySc3DtUaSyMy6yty+RVOibIpXSICoiUUTq +c0lIJflG0dCPsskemaHfu788no9z3q9zzv2Qdg2wcmdjYWFhZWVh+fs36P3O +TU+b3msraz7NkQmjofZotoorvQAoy6X0dcQdmaqpcvQKaFthcpqHeD/jP05e +pVfg8bXJZjiUhsURJ15y0Bvg16N+yRris6/Fq07kfwCnas7mc8RUU9CtRcVP +wJFWF2FMPPitPjqy/Csc4xnk/x1Cw7W9svYzem1QCSbXs4hNx6I1Qhp+QHzm +IE2TuHJxcFVEfifYNY0mvAmm4eeTYlFl/t2g+Sh9xIh4lJM++EuxF0QNHUwr +g2jIeT7QVmm2D2zePL29iXi9YEZdUPkADEfaT8YF0tBCYubeqN4w/Gj/fFYi +gIYeWTKiO7hGIUW7uMXan4Yn5PfF+zSMQQWtVfqUHw2/irXsDs2fgAWjcw3P +fGjIsPP2unx+EtSlNu2q8abheDrL7cf+U5Cnq3TrhRcNuWR2CEwoToOW7e7C +q540TGW8NBSgzQBrtM6BQA8aSuXantg1OwPj65cFtd1pqL49YdSvfA5Y2jb1 +P3Gl4VHVHw2Deotw1GzTYTFHGv6KCGPn2bgEd7/f3HzJnoax5au0tnAtg3eY +725WOxpeQ/UHng1/YGG5b6H8ENkvp44enM+KU9xPxrP30TD/9eWOkxJseGnq +2p9qc7Jvv1P0xfNs+DPunm+zKQ2jt06XFPmvwAE11n+aDcm+j6RlxxQ50ML2 +f0NGQMNvTcOVy3c5cPbowUTuvWT/yad2q2mc+DEv50mlJg0LlC0u7ZjlxGJr +9wZOVRrWUsdYfcu5cMZOo3T1dhpOv2z+MaDHi7rRaekrRGkoZMYrEFXJi/Xm +GVpNQjRUaKEjnwYf9syEjV/gp6F3z5Os3TtX43bJ088HuGgYyNagsJdXAD3f ++Kxl/S2CvTIPJ+JnBNHqVHT15zYR/OVRz92oJIQud0Y+tn4VQbYHfdLiQUJY +MCha1NQiglJKG6zyh4RQ20uL5UaDCNrppTx+3yGMW62jXNLLRbDRLThE7B0N +rR8of/NJE8HvucnnnLlEsVvwzJfiSyI4PJR/976+KG52FY8cThJBntDu5j1V +olgvvqIb4kSQHmet7PxEDKvFF0acA0WQma06nZe5Bg+1NwheNxDB7N6FcM1Q +SayoryzaNySMRgfPfA8plMROVuGch73COFwrbFDYJ4l52gwfDrKXcvZ2mpTt +evS0CMq50SKMta5OJRzaG9ApIe2g+3NhnBzr+GfgtBQmsMfNnkkSRmE/emmJ +uQwGq9yx8dgsjNaeq3aYdMpj+M4h1jJTIZSQuXDiXM92dJgyVSvyEcDtOaG8 +v0ERm2Zq7325you3g+X2P2lQQeuEEwlRL7mwKRzU4nI0MGjW3KVgkR2lnT5Z +OPruRbMeXp3YF6zo/qfsoWQkoniY3lk5y2UQWSmRWh2LqJPt6xKqtQw1q09E +uv+LSLd9O/Zx0zJIrTekF6Yhft7aRqtYXoI2rS+tWmWI45vsWvYWLoHVsVl2 +hynEQllW13neJdCeVrO/4aeD/Os8t0h/+Q1iQ89Wirnqojd/XUpm6jyoz/HM +qnvp4rFVwSWJcfNgx+HYZxeoi233lURPhs5D+gbWV7didJG79sKpC9bzIGNt +fGrjTV1kCzOnK9LmYefz1kWVFl2M/r2n5ey1OTC4sDBhbaCH7JyBu61zZyFU +Savt0lY6Ksyrso50T4OD6tiPlN10tNkVaUV9nga6xp3uZHU6mvO+H0h+Ow3C +wDWUaEDHpGfMhoOPpuGxScv8KVfy3lyl3jJqGsZdfMVCbtCx4HofY0lkGnxS +0q0O8Ogja6ZR6bzFL3AdWawTHtRHHiOP6zptk/D09cz0/Ql9VB/zuotNk8Cb +NS6D8/pocTy126iW1K16on25DJCLfd9gaAGpP3un8GqjAT53LDHXPD4JT07d +uBbuZoCc557ahUpNApe4+tHWNgPcGOReHeY3AYW6ISszGw0xIYH+cY/UOIRK +22uXfDZEa74HM4ui46DFohf2pt0QnXgVS2r5xqHhuVD32JAhcn3tr26cGYNh +9ceVyGWEgTGevPOFY7B110RYFxrh4zL54CfrxyBPIqBH/rERxilxt17iHoXs +X97VBanGuPji2Y/vbMPQev+6tG068VSumdjkEKw+UneSI9sYtQu6zjl0DkHk +W3ldpxJjDKv+fIivaggsbnXU8H80xuXzr2Y5Y4Zg3vBQbTC/CTJjC40sFwfB +4qbOG/VEEzRYXNm9wDoIczri/9WeMMUbcedvntw1AL+Gc3XMz5hirc0Rzk7p +ARhLUyv7lGyKjcl6x0xEBqBv5FBmX4Ypvszwc9gz3w8t168EcVWYIs/KRfnU +l/1QPCEkajZnir5xB6vX2vWD922+I82BZriQUMWtn9wH7SwrJjpdzFHSVVzG +W7AX/NcFpJyU3YdejlV1h7O64KFXXdWV+P1oYEr3m2Z0wLGpNbPbvCzR/3mq +iQ69HaZNDA69OWKFPkmaK4VXfgMN+4s6vZYH8LJTQPsF6y/wcU2Gd62SNVp+ +dSuZ3fYJ1t47XZG3+SBSDss1WzY3w7OOrWYWfIeQ4dop6vLvB1jfMu4ZPnII +HXXNUzrlmkDpysWCux2H0aWxbGva/f8gg31q56WXNih7TPVKXfw7KNPZ9S2e +ssWaYAMaa8xbuKaWKLiYb4dW/2TcH3rxBhr/l5OgdN4e3a5k1JhYvoYn5uly +gbEO6BxVaR8+WQsTfgdY/BmO6HiK76Tlh5cwbbDl6KieE+Z+euHq/akG8kZa +50JUj+Ad9ZLL2F0NNrdz3Bx5nZH71dwHXYlqKHlsemTFGWcUibfpSLOvAg2J +j/Nn550x1jrxVUzUC5Dt8Pz2wcsFHToSlXO9KqFnlc++9G4XlFr7r9YbxnNo +SrZwMzzoijY+/+hjSgWkRmSuCmtyxaLcHz0f6sqhovLPvJuxGxZxiJl/kS6H +3dXK6ptM3fDoPvaUmxvK4d5Lr/BBMzcUaN6u5yJZDhfrmicD97shS9TjuXHx +cvD4mDt0/LAbNvEqX5UWKAfBvn3tae5uGJvPb/xmmQkefFlV7066YcpaUV6Z +dibwO+AZJaYbKmgf+sB6iwlSIm8a11WQvFMOL2duMkGhwVycs9INpYofmY1c +Z4KVlv39r9VuiFP5sj+uMCF1Xfi742/JvBqer5+SmLC2/QF/3VdSX6fKzh/D +BDknsWsOs+Sexoa3hUeYoOE8mhevzECFn82iZzcx4d718RALVQbu1/ASW5Jn +gkjzpLaYOjHbYc9gOSaM6s+25O0h/SfVfjlLMyF7Gwtrgy4DU0rmmeYSTFg9 +K2grZMnAwM1Fte78TOhJUuHO9CP+ZCSaPEeB5Ru1Fs8Akrck/O+2WQoqWTQz +FYIYGLv6tE79NAXXQ7RVakIZKBXgnrhqigILW0OX3iiSLz3llzFCASVnS21L +ZGBHwAOT5S4KksujvZ7dI/uYtLY+fk+Bn2KaRkQeA5vWBS/F/EeB2f1ibvV8 +Uj/sctCsgQKetL77TwsZyCJ3+vbgWwrig/cPlpWSfLasHJVXFERvkfN5UkP2 +XdBV5qigwDvtne/j7wwsMk3acTafAuPVfVrBHSR/pPRU1H0KNsez8Cl2kfe7 +L3MG5FHQF6xSWNxL5l1puG57jwIXi8yRomHSv7Pgp9YdCmw4QvwfLZD8oLOr +tG5QYBiyNrBA1B2rDi/RJc5RUJOZYHJJ3B1R8UjkhkQKtBom5SLWEpfa8Mqf +pUBB/l2r3np3zNJwMFc+Q8GaL1F6/5Mn7/8pU3U7TcGQZrsojwrxV7FYtmgK +LrBlPfc84I5SN/pf6fuT+3fxXjM/6I7Odx5GhvlREGcfEax02B1jX31KuOdL +QUTp/k1/7NyRxfxhAa8P2d+D9eJVV9LfHyXz05MCpXpXxqsg0h83c7XLhYIv +F+VXyaa4Y8fX5pLPhyh4CHxHBy6SeRXO1lrEcSO/agsvk31SliTvHqRA0bg2 +Rj2N5Jdybg+1Jt+PxW3S/BZ5X16pIGdFgUFAVmtEAamXZNaVm1MgKfmvqvZD +Mv+L7pgS8a/6gMsrikh+/9m9hWYU3NkI5sklpK7yaP9dUwqW2tur7jLJvM8C ++zKMKSg1k8h7X0e8Mf1GnT4F5xbYOFLrybzR6d0HiF3zBl1sG4gvl419p1Mg +wM6U6Gkk8y/Lfp/Xo8C33ObC/Gdyr9+zuL26FMhuvRou10vmMV7//K1NwcKX +480/+8j36Xb7cY24Kd5d4dEAeV9vu6BKHNOpPKgxTPITBbPC91Lw7Vqz474p +ss+q1fdXaFFwaaWg/jFWD5TaU5FtrUFBxWS7fegKD+yge15bUKegvz0/2J+D +1Mvj5m4Ta5XSs1y5PZBl/MPSLzXy/+Yc8dtE0AOrlLrWFqiS/c30hfSFPTDL +zTTQkXiPmtAWoHlgrEH2bgHiFL6CQ0prSF3k52ykCqkzfxRLSJP8oS0XnZQp +8MgpqKPJkv7/RdIliFNSIn/wy5P8NCO3ViUyz0OYj30LeW+wq9uWOEXY8Oiw +AvHn+kEfRQqYy8In+hTJfonP5pSIe392XOlQJh54FbS0mwLNqmMvW9TJfba0 +nFTiHt+H658j8Tl//hYFClbbRKk81fVA53UQlkusoWdkVkwn86c79aOJk9d0 +ReYYkbrI8U1biZ+xP0rJNCE+4K6+grh7LCr3upkHYuOfkvZdFKi/pn1K2k/u +i945dJXYtbhr6IwVua+99F4YcVL6I7ZT1sRtHxoOEncFGyuE25D3G57arCXm +cxI1DLQj970NqVzeSfKMux29Hcg+3x8l9xAnbTh+zsmZ5Mtc8i8lfsZjcsfG +ldSHd8bcIu6aFqWsGGQ/e/W5s8R8nd2NZh7Efvlt4X/zGor6DI6S/KMnt7kT +uz49voTexK1Uj/Xf/DsmInt8Sf/l/VwGf/OTxLap+JN5RbpX1f/mR/To7Aok +v9+FpOTtxLyMYpstwaT/284JaWK1fTEBsqHkvuNyleJ/8zVNEyTDyfd46Dst +QHxeXjxDLILM6+NI4yEuE+gtETxG7h8cvcNB3Pm7uH5VNKlXbVzD9je/P6aT +I4bMowrm/+ygQPWj6dyfE2SeTyz9r/8Pd+5WuA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 5.364389981563864}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 5.364389981563864}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993828702264153*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"72245a6f-4dca-46f8-9b18-a041dce05896"] }, Open ]], Cell[CellGroupData[{ @@ -1691,420 +6599,1688 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505781608486`*^9},ExpressionUUID->"4b73592e-b155-8f42-b33d-\ -562f8b3faecd"], + CellChangeTimes->{3.9918505781608486`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.40072203448978`*^-247\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 9, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828702568161*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"6d8a8722-3073-410c-8544-97032a831ce6"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"a2ecd22c-b766-5347-9e03-9d459620be75"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.7520046599110395`*^-255\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 10, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828702573367*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"08b7aa17-0622-48ff-b5f1-3b17eea5bf69"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3405849247629064`*^-262\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 95, 11, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828702577462*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"5ba69c74-04b4-4450-926c-d25d28c9e56f"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 6.72103 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .14914 -24 -4.5 ] -[.01131 .14914 0 4.5 ] -[.01131 .28356 -24 -4.5 ] -[.01131 .28356 0 4.5 ] -[.01131 .41798 -24 -4.5 ] -[.01131 .41798 0 4.5 ] -[.01131 .5524 -24 -4.5 ] -[.01131 .5524 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .14914 m -.03006 .14914 L -s -[(0.02)] .01131 .14914 1 0 Mshowa -.02381 .28356 m -.03006 .28356 L -s -[(0.04)] .01131 .28356 1 0 Mshowa -.02381 .41798 m -.03006 .41798 L -s -[(0.06)] .01131 .41798 1 0 Mshowa -.02381 .5524 m -.03006 .5524 L -s -[(0.08)] .01131 .5524 1 0 Mshowa -.125 Mabswid -.02381 .04832 m -.02756 .04832 L -s -.02381 .08193 m -.02756 .08193 L -s -.02381 .11553 m -.02756 .11553 L -s -.02381 .18274 m -.02756 .18274 L -s -.02381 .21635 m -.02756 .21635 L -s -.02381 .24995 m -.02756 .24995 L -s -.02381 .31716 m -.02756 .31716 L -s -.02381 .35077 m -.02756 .35077 L -s -.02381 .38437 m -.02756 .38437 L -s -.02381 .45158 m -.02756 .45158 L -s -.02381 .48519 m -.02756 .48519 L -s -.02381 .51879 m -.02756 .51879 L -s -.02381 .586 m -.02756 .586 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 -.5 Mabswid -.02381 .01472 m -.06244 .18263 L -.10458 .34796 L -.12507 .41668 L -.14415 .47199 L -.16371 .51906 L -.18221 .55405 L -.192 .56876 L -.20263 .58172 L -.21228 .59082 L -.2212 .59698 L -.22586 .59936 L -.22843 .60043 L -.23087 .60129 L -.23313 .60195 L -.2356 .60252 L -.23669 .60272 L -.23784 .6029 L -.23886 .60304 L -.23993 .60315 L -.24059 .6032 L -.24132 .60325 L -.2426 .60331 L -.24332 .60332 L -.2441 .60332 L -.24483 .6033 L -.2455 .60328 L -.24679 .6032 L -.24752 .60314 L -.24819 .60307 L -.25074 .60272 L -.253 .60228 L -.2555 .60165 L -.26055 .59995 L -.26547 .59774 L -.27064 .59486 L -.2799 .58832 L -.30075 .56765 L -.3205 .54159 L -.33886 .51282 L -.37791 .44198 L -.41941 .36071 L -.45939 .28487 L -.49785 .21945 L -.53877 .16105 L -.57818 .1166 L -.61606 .08416 L -.63714 .07001 L -.6564 .05921 L -.69523 .04269 L -Mistroke -.71425 .03672 L -.73499 .0315 L -.7547 .02757 L -.77569 .0243 L -.79714 .02174 L -.81732 .01991 L -.83744 .01853 L -.85592 .01756 L -.87479 .01681 L -.89546 .0162 L -.91501 .01578 L -.93594 .01545 L -.95662 .01522 L -.97619 .01507 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAmwHEUZxyd7vDMBA4kQjuQJihGPnEBcVLwALywtlfIoj2eSNU+NQABL -SgoRBUQEFgEVSi4PTjkCsoqiCMghhxyKKAMiIIKIIOKBiKwz3TO9PW9/3870 -7swCVbzK67z9dX//75uenp6Zb3p2t8l91qxeO7nP1MrJiV3XTe65Zmrl3hO7 -7LEuQOUZnjfj/OB3bMIL/255Xly0gn+t9WERkvS/V6v/ql6zUfdqXvxT8+pN -39tO1ZW9VrNuasqqHPVqDV/Vml+/6dVjgVrda/otb4mDPflfFNu3Au2ophLZ -15utVP+LHezJ/xKpb4LYK1Ed+dV13ir137DXDOpr9Ybn+9qV32wouTCEHaIQ -G7Wa14jqy5Fdq+UHXEu2NzH4HPy9rItdN39xl+o2Tc8PPpUUG/fCvZTsFtn/ -Yged9HiGlU2sY+/OcJiUMvSH3nZvyh5xgVz4aXuxq5LtShHzGzUzOpeC7QjY -xt3qB6wWhVjN6GMx2I6Brd7lQwmmfvXnMkiXeuuVTomkbdZeMcef2lG6bSWj -jyVgO9olFrsd9TL5mNY94TiNx21R3WP7MJuoxrXmrj5sW/Khd0HFmoKDmJqt -rG5K9kw2lJhIrclwRc6dVe7ubrk9rTvu8mWibbq7cIR5PY2wVbZXT89YO6ZM -S9Nl06alMviIt9YeEfHWdsz22iftt0WizDCcNNruV7i76tJhWq1q5slG0zcd -UDHtAxaeaqyOa9a1fXtL0jSmd2Bw6vHDU1a7s/UpLDkWsvnOqgUx6HOkOf31 -EgN2r/4pmcuzdvPl8ewRyOqLIOWuGvViaB72XnztE0aylE0qGT0mdpA5DOvW -Durmlu3Kzr4b7Us6Tw/5br6jyz3pCnth5D78MUdAWB7y7KhfEP6nbi6ODosZ -stVYH2z0OduB2BYSy8KQjEPtyHOD5dls249eeD3Vmh2SmTkr24NKzeOvgUav -AvbqjO3UhflISCoZLTpCaunDIihGw4+7Y/1WYTEUfvww1s8PC5WwWM3HkWk5 -z7ScSmk517Rcm9Jytmm5V0rLWablvnbLSqKL4sZqLyuR/dIbD5sO2T+9cdU0 -PsBqXDH1ZVN/oC1WTYjFG/aUCfOg9MZPGuWD0xs/YRofmt74cdP4MN4J4W8J -2GPG8HA3w0eN4RFuho8Yw6PcDB8G5ijxkPH9VdmwDOxBYI4SDxjfx7kZ3g/M -llA1ZHif8fgN2SNNXfcCc5S4B9jxbhJ3AzvBTeIu0wMnyoZVYHcCc5S4A9hJ -bhI+sJPdJG4HdoosMQTst8BOdZO4Ddi33CRuNbvyu26GvwbWRWIY2C3ATrMk -VA0Z3gzsdDffNwE7w03iRmBnyhIjwG4AdpabxPXAzh64xHXAvucmcS2wc2QJ -uly9Bti5WkKftviBUXyAx0naWqPpVbu0T6aJ9I++JionEm108qCwrwZ2ng47 -6qkuz14qEHzFjFn5kU07PzX9EVI5kTGk+Z824ipg50cboTsizsxS4pGeuHTL -8tpPa2gwUYRXAlufiDD2RM+nxrpEY7czttYTEZo96NbqCmAX5B5hIlsbPbxQ -M7waw9RzlwO7MPe4zBM76+EAnXup59IjjJP6aaMvGeFQol34G2XhY5m0Q4WC -vQzY96NgK+3jXSeSKY9s4u3IN48n2uljXs53U+9SHulSYBfpgM28CpnZWV3q -4owuZYzpcoPC+ikwPZTwjEESPwH2AzeJS4D9UJagdMyP+5f4EbCL3SQuFmWL -kpgl9j71T2aJJrBLLAlVQ4YXiSMks29HiQ2AXSgO9cwSFwC7dOAS64H9TJbY -ENh5wC4buMS5wC53kzgH2BWyxPOAnQ3s5wOXOAvYlW4SZwK7ypJQNbOh0Rkp -htOqSOJ0YFe7SZwG7JpCJTYC9h1gvxi4xLeBXVuoxMbATgV2nZvEKcCuH7jE -ycBukCXmADspRULVkOGJwH7p5vubwG4sVGIusBOA3TRwieOB3VyoxPOBfR3Y -LW4SXwP2q9wk8szLtOsa1oJhfX9GtzqbADsWmE51FpiLGbLs4pvJPALOL+9S -7SPCY4Ddmoiwt+xBtWMtbthGP8hLT8QNMtIxXjVsLX6K+rWdhqHwjgb2mxzC -o91fVe1iFu92ujPfFFgD2G0dg9I9HSMMA3Vo6dXqeUbaZy4m2U5vaMXkY2q1 -9h7PEOdRwPQTpJ5TMLHreHGy1G3zgB0ph0MnBZI4AtjvBi7xFWC3yxKbATu8 -f4kvA/MHLnEYsDtkic2BfSlFQtWQ4aHA7nTznYPEIcB+L0tsAezg/iW+COyu -gUt8AdgfZIktgR3Uv8Tngd09cIkDgd0jS8wH9rn+JQ4Adm++EqpmATTaH9gf -Zd8FSXwW2H2FSkwA2w/Yn9wkPgPs/kIlXgDs08AeGLjEvsD+XKjEVsD2BvZg -vhKqhgzXAfuL7HtrYHv1L7EnsIcGLrEHsL/KEi8E9qn+JdYCe9hN4pPAHpEl -XgTsE/1LfBzY37REEamXZt1KvNT03RDlCRxDLS71Er/sqO4r7VRCeO9Zb2aN -fQrYo1Hs/WRhhjvWH+hFR/C+Wk3fytIihG2ArUmNuLdkwjjnOsJ1JrX2S+hq -F9SjMaUSHtSrHwP292JiDO/Kwx60liPU6vL4pR4tKtrhzmit9xNpvc6Lga0G -9ljHCM0nJaMPw5jR+izXCHNNxZTMgaLX76nlb36LVmlRnKuA/UPH2Wsqpv1K -p5+cQuNDZJo7mv1XymFRc2IfBfZPWeIlwCb7l/gIsH8VKrEtsA8B+7ebxAeB -PV6oxEuBfQDYfywJVdOLYQbf7wf2hCzxMmDv61/ivcD+K0u8HNjuwJ4cuMR7 -gP1PlngFsHf3L/EuYE8VKrEI2DuBtdwk3iFJdHnJumcdVb0YWr5dsi7JUeSl -swTY2ySd8tOj81ZJpyLrLAX2Zkmn+vTovEnSGZJ1lgHbNSedXSSdYVlnObCd -c9J5o6Qz4qbzBklnVNbZDtjrs+ioarJ+nWQ9JkexPbDX5qSzk6QzLuvsAIxe -6lblzOJ1VgDbUdKZVbzOKzMyVW4g69QyxtiLDvW9KvWi1VyTQrjGP0pd0INm -6nM6llSpF5YW/oKUvvlOfDeeurusiy9Q0FbQvKTK2dFW9JMj6nxHJfqc9R0V -+koFOkNAxL1lNPhb9Grtb9Gzv1lLRaxSRNSzdGZV5UY5xCktjAnfPVNrONRg -kdZN0JRGF26q3DiHcCGtFSUGE2M3CFlKa9FXedD1uyrndIzdPN6vmvbtZGlj -lyKmWydVzo0iLuYlK7uf/XaCjvqZzr5052pH3e+bVnZqs9ubVnSFQakJVerV -nnj2IR3K1ahyE1mHrpwoLafKTWUdun6jpLMq58k6dD1JD7JUuZmbDj0cVOXm -sg5dJ09IOlvIOnTdTksIVLmlrEP3EbS+RJXzLR1Vre5m1PcR0PocVS6QfdO9 -Ga2kVOWErPMWYHNMZOrz1rI13bHSmw9pOnQHvWEyim1k691Mn85M2iyUbVQm -Y6Zpua3cUpXPkK/IS6tXf6d8Ebc34/9GSkZ2\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-3.23234, -0.00806918, 0.118269, \ -0.000558628}},ExpressionUUID->"06204099-db57-8e4e-bcc4-fa1ae37c0063"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 95, 12, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993828702581387*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"0aff3ec2-61c0-4730-b887-dae5bfbb35d2"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-\ -04dec8739bf5"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lc0XAHBLshSyXVz7Wvb93uty7zmIsqSSLXsiKiFE0aJIiZJUaBFC +RLJfWxsl5EXJUrwtlKIkW2R5/Z7fX8/n+5nPzJyZOWfmUfANcfDnYGNjK2Nn +Y/v/98+HtufKSXnMTYITip0/7ZlvsySOmQ2cgYvvv1Qpe2kCinX5SgxcgQNq +zds+e5pC5I77/ZwDuaCbT9Yo8bQDoV/iV/72VwB/l+sHC08P+NhoHzLb3wSW +7G69A+5BYKU8/u9U/xs4NPY9ZKvzcfjbT732u38Y3nfoMuUwGZot7uW9zp2B +WwPs3TS+2yD9sW7UV3MFBEIFu8pl8kE0yPs+twUnFltpfysRK4YrelYN9k48 +qNVzcgAOlYHO4O4tjEAebJmJKzCNKoOO+EM9GjE8uHWPd5DB6TJYO3D1B08O +D477LPQIXCuDmJMjUs0/eTDlp1TT8cYy8HsVe5waz4uh3ldz9PnKgeLfwJCv +5MMlulvQTHY5vMvQfTq1gR976F9TGA0VcKOnWDBShR9VdNtOuzyvADeBjd6L +xvxYsriav/+fChiKk/mPYy8/GhhExER+rIBPwXymotX8uLWSm6TPWQnfN39h +UXYLoNbghgVt60pY+J3+MCZHEG3tdFd0uiqhTkNkdbVaECest3Ta9ldC9L5L +9vHtgvjkTkiy98dKWB6Mn0ieEcQtgazW4MlKiB2pFetS3IAqWCSoKVgF8Z35 +uz5FbMAONklP+W1VkJR3qotDUgjL+YItvjZVgY3hfmExJSGUhrUZ79uqgOe5 +g9NGLSH0epD252U30X9EZdDWTAj3BVj+c+FDFRxX7Bi9ul8Is5/KPS/7WwXB +2RL/qdYLIbPyP7YT2tWw81a5pq27MCrYm/MIXamGDZo3Qzz9hTGQr22UK6Ma +OhviK0JChHHY9WzN9O1qsBl0oV2NE8aKoz0bq4qqwZz8n8W/xcLYKmlr1fe0 +GgwzbNxDlon2u5Oq6RPVIH51JDHttgiq3y+Q5DOrAQmN6viFAhFkaA8+vmdZ +A+SmhFOeZSIYQOr1YNrUgOxvtSMbm0XQduFGnPOuGlCxC/Vp+C6Cp+xaYvX9 +a8BgzQplxEAU8+3kAzPP1YDhzU69rQxRvObuXNaSVAMU/WzNB1aiyDn5d/Zn +Sg3QfSwUo3aLIjP+d4RyRg2YNSbyrzslikOJem5QWAPbI0hf9NtFsesuklVe +1sCOdd8/pPeIYkRTodtwew045Na9Wx4SRbme8qyMzhpw7vboapkUxemXEwa/ +e2vAU/NuvZuYGDq4PLlr+6UGDn7RST3jI4aTXrlqVas1cM7Rmvnmjxhu5G7h +3qnHAnJVJ5mDnYR1s0OthwxZUCriOK+3joTm85tDz1BZ0PfGqyxVjoQxY+JR +aQwWKO+MUNy5lYR7vhokOlqzoGnbnbXdmSRc8LeZ2uXNAucHyiOrd0m4Znta +7eQeFoyvv/9Ep5SEpOmw43F+LBDqqDqa0kRC4zhFtrT9LPCxaR+3/0HCx9SD +Sg7hLFixmuv8x1Qct04KWjucZcHlgujiFStxtOwZuRl8jph/Ldt5rZ3i+LFz +misukQV2L/jMLvqLY+b8qurViyy4YSFfaXdJHKUDwrpdrrFA+25+yvEMcSSP +3tpglE7Ey6ERVJIrjs/SxyP5Mlkw9sxIZT1LHC00Kx7dvsUCGtqmv/oojk3K +agf33WVBx53u8KUxcdx84JwIVz4R76rTDo1ZcXywPD91s4AF5x778CbxSODs +HsfdFUXEfplGxtjoSaCbee36Mw9ZcODWkku0iQQe77LJHi4j1rcUa3jfUgIZ +vR+jTSqI9TQkTfC6SaD3nrf8fVUsCDfO8W47I4HrvcTHSutYYJMtMGubLIEK +fhzvHtezQJH7+PnOaxI40ndAprWBBd1vnct7CiWQW4tW3PKIBYUmzy2dKySQ +tmffQsNjFpzK1Xs/0CCBWnfycu4/IfYjdD3nh04J/BzDuSHiGQu4+o+l+wwQ +8exZ886+iQVDjG8aI58lkO9dL5dSMwuS1jU5fp+VQGnb9ius5yz4XhBVME2W +xPHY6vLUlyx4wv+VfkRZEnndRrqprSy4HuHQNa8lidd3ju/tJ2xprrWwjJLY +29g4wdHOAumiG8mnbCSxOLv4+yXCs4I8ChyOkph0st5b9BULcv8dtuYOkMRE +0dvt6zpYcGzzjg+JoZL4h+9+0wnCO4ofha2PlkSbcGsYI7xJWIM7JU4Sde5n +mdv/w4LVoxk3hS5K4pb6rs4Swn0fuXSvXpfEp7u5Rtd0EvltFf6clC2Ji98O +XHAmfPbBJ9fMIkkkH9R+nEPYQ9R+QqpSEvMuxsaNEjaIaTid1SiJEreuDil3 +sYBveBNJoUUSM85kv/IgPLz1+v27XZLo2T7kcIlw3UNOUH0niYHp8RF1hC+T +DvcUDkuiYEGv/gfCgSc+BGj8lMSUrRsuLxOGL7bLD+Yk8a5f1CXRbhaQbOsu +665KIt/hHbqqhCfKVVUqechIDh+J0iP8XOJqnZEwGT2XowMohG+dYrevlSKj +wCY/diPC4aPBw3QVMt7K+LVFi7DNtqHIR9pk9DgSxJAjrFhlvQ5pZPwQoP+F +j/BfMutOkxkZyzLTmb+JeLpPKxta2pLxYfmcfRfhe99TW186Eu2vC8ULCZ/c +vuph40XGpTTBm9GEnWuCpjoCyNjHkzRoRVhL5v3Z7YfJOFV5cnA94TXxW8hv +oskoeGHH7Q5iP4fGq0od48no/ytQKYHwhdqU/t3pZNTkkUoYJc5rj9zKwaFs +Yj3XUwMuEqYlHGDzvk9GLi8ecW3C33ZZqvk9IqPX1fYxD+L8H9dXPBptIePP +cS7hH0T+XFeQd9jfTcZBKwXhcMKbJxejg0fImMiauhtK5NuxrVfVn/0kY2hp +D8dYG5EPOVrvRf4Q+/U4NdadsISjj3EdjxRufqA+rE3k77YHf7+vE5bCXFJX +ewqR72fWpmV4SUlh4v3hwfEWFvysfTHPqS2FOtHsp1NesEBB2PueM1UKi5dH +Jd8R9eJ8cMG5CKXwtP7vL9KEn8po1NjvkkLRaZpUGlFvaWcuR2QelcL8g3nb +6ER9tg6qKf88LYV/n2Q2OhH1u2zY3MNMkkLSxInDB4n63vdtTv/LbSnsD5Zl +nSXqn27nPqXdLIWOrqcWjrCIfBRTDX7OL41pXKKXt5SyQDzkiYy4uDQauLmm +8Dwg7stW13/2y0ujIStzpbmYBTXRSZqCBtKYOpShp07cXxc+/h7f7SqNYc/T +zKqI+0+/qCFgMlcadRofujwj7s8ADidx8xJp1E4jJ6hfJ/LP/VfL1WppjKHt +s790lQVrBRRU6a3SuDXoGssylQXvwxK+xE9I4w1KgHHEBRacNt25h0yTQQ/a +28A3MSzY6pU1TTWXwWROanjjMRYIxP6Ic7Ij2jdauWRHEeM3ny247COD/qIT +9U7E+1BrU/9jbaIMlsgFOUcdYMFvV6XImXcyWNXjKZbpwgJWdCi30BcZrC2i +hCk6Efl661GG9i8ZFOVhjeQ7sGD9J5eG/RyyqD1RLnJzGws2BiSzfVKXRcM3 +QkJgwQKvI3MXOmJkcVPpqZ5QLRaopJtLj5+VxZaxtWa31f9/3ikPuC/LYrMy +ie35RhZEL6t1m+fJYmWU2Rk2RRZci/MSq+uQxdmA3ZwUEvF+pL68ky8jh42D +FN/rK8T7X5pZdfKJHEL5sPbW1hrY3N+58qtVDrn/LN3leFED9mxrtni/kcP+ +aw+u1j6rgb0Owe/gqxxORS7PkRpqwCpG4VQslzzeEDwkmvWgBkLl/tw105DH +sKGreQOpNfA84M5Ec6Q87ppW9yC51EDQwlRsK78CTudl1Yb2VgP98D7SqLAC +plfUDr7srgae8ffFnBIK+Ee/6wG5oxryB5v7mIoKKJUUElrZVA0fHl/TrKYo +4B5BrvHyh9Ww/azxQI63AvqIDMWNnq8GfeHTOjHlCih+x4lvG60a/mps+KDl +pIja3DuDuJKrwLS4JPv6dSUMO3NIXIZUCVPCNj7OTcr4oDVBpfBGOXxJ9nEO +41bF81WRsiEDD8F6Msr6K2UjOshfsR8uKoGfe3nCq05two7aTyhoUUT8/4tz +nGtSQwnOEzu+rSsA4X9UL5VNqmPKDvPSnZS7IH3+4Q4KRRNbDh7a3OeRDRka +xhtEArTQS8bohOWnm9BONjOaSdXGnHZBJ730dKBLN13W6dPB+6ddSZRjaSDA +mRux54wuTl7cn8gpdxlkT8uZ7lbVw/vXX8zz/pcIvCoeNQ4v9dCpLPl1a1c8 +HJAEm+I2PXT7biej9Dge2vkVP3B26OG12/nOiSXxkPznG1d1tx4u6RWePJYY +DwKt4U7i7/WQY4e71HeLeBA+mDQ7+JNwzxHmYn0cSJfX6/sL62PTdYm8rvIz +oM2QfBjlqY/7Q0cPbHwWC5VK+5c4fPRxX+6cIak8Fmh8dVsu+erjK6X2i0I5 +sWDe7/opL0AfU/l7X2udjgXnwxlCbw7ro3Zc78SSWSycyheP0EzQx7ba2Euv +k05BNz/J+HOpPq61e7NS+uAEhH0QbrZhM8APh87XGlOjobXF49F9DgPMzJd/ +VCMbDbIPC1h8XAb4wpXttdXaaGg/RS9p5zVAscnM5Tu9x0BRwfeajYgBct5I +ZhgdOQav95YH2KgaoLT9L9Nh1lHQHdu+3sbOAFu8mWorNlEwOZPsZJ1hgDJu +0+dm8iNgaCDH+fYNAxy4pJq+5UoEtD+qcZm6ZYDr06knik9GQN65T7szcwzw +68h/93JdIsBNytBr7L4B/lfMHrKNLwJemA/uS3xkgCXxq7HJYeFwM1XtaNuw +AcZ+OykTYh8GW3RablhrGeKXANvjz/RCwXXtVsduHUM8MrIsv08+FA7828bv +om+I7hwna8iCoXAp6Z9YP6oh6pMP8Ae8C4G+b2/3nTIzRMeBM2yWO0PAL3tE +v9rJEDXpUoIDVsFwRoj9lfxJQ3zav/fkk61B8HjGZGm+0xAHthce7s0NhJwO +lu+u14a4xnFLOSQGQny+QXtpjyFG7TVnfxYSCNYuGpn+A4Y4ODqbwsMIhLf1 +ZGrPZ0NsyYvILBoIgPHTf8NKZw3xcGThirJoAJA2sMb9yEZYmrgpOeWmP/z9 +ru/wVNoIj0pnmzbG+8PQs9I6KTkjtAiJXFg55A854QXn3ygZ4Zav53c9RX/Q +7L+milpGqNf29TPzmx+YZ0X4SiFhm54OMZofBGvqv3/tb4QHFas6nnz3hSPz +5EXvQCN8I3ftc8MbXzjexEn+dcAI894ZhHc2+kKSa+9uvlAj1FJLfkZJ9YXC ++KPvzKONcNdvyVUhE18YHno8UHnJCPU5vZqHr+wB54u2/ddYRviKI+DZIQcf +8HQ1nFeqN8JcDb5uMfABPyUZ8YpGI7x3xIn0RsMHwut+OXc+M0Kd1WXOc1w+ +cPlrat/aDiO05uD9+zTcG9oZA71Rn4jxFR5mnLXzAsYvv7e7eSkYfCSj4hbZ +A0gNW3Ib11GwiJ1jzZ9Fd/h1Tj1UToCC3ObuP4MH3SFL4fe6r8IU1OA9JvHk +ljv85xhjESpNQbKBOFufvDs8aUitSNCh4LM6PvuX2m5glvj4cqUTBa9bn1Di +2uMKZOccL5IrBS39o4PlLF1hWjFe85gbBQftyErOaq6Q22jdyvSm4CHl+wES +0y7A8fvtalsgMV8Is2Yi3gWanX8Ef4qh4OSwnWfLQ2ewVJbYxp9LxMfrf/2C +pBNUTbxQ8MujINvmuZaT7E6gzAr/U19AxCf3MiJpzBHW2HTdCSymoIrrnpmJ +OkdoCkmYbq6iIGfma61ed0dgNsymR7+koEv8t+3kvF1AcXg9/O0nBXeFNb2b +tHSAAqlTLOYkBf+eXcx5pesAYl81k69NUZC+h+z+SMoBZqPOG1n8oWDH3g0O +w1M7oeI2nM9apeDn/FoD3Ts7QWfsgZaTMBXd1mYvtK/sgE2xF442Uam4PsA2 +d+rqdmg0yeeyo1PR8zSerAvaDjvmn1zpNaWiinRR5MPN2+Fo8FzJdzMqlhbE +rFWZs4dWD5/PAnZUvOUZ/EDP1R4CjSk27j5U7HnNPlqkug2Kpj9LzZ6n4m2L +hYsjIzbALF0uPJFERfKRQZrkMxt4s1+cwn2JinVrSlKismxg8ZPdDnIaFblX +pm8+2G0DNl2seLxNRXn7yIrF19YwXnxxIrmcii7O6t5zbVtB3d/4icp7Ks7d +kS9z6bOCFEX7xbghKpok4AXHeiuY/ehrNPyBio5fGpJCs6zgsVtycdYIFQ/v +LE7iCrAChx0f08UnqHi5b8Iw+68lHDM5G8rLRkPahQLVk8qW0Cr0WmFChYbm +ewdkhS5bgFbXVw/bTTRc0zo3XxdlAVeSF9OL1GkYbKzncdLbAjy4lQX26dCw +/HqU624dC5hcjlz8QKPhwTFXVaducyB9l+7ptqWhevW7y3bi5uD/ODC+6jAN +v1dRv5+pRfh1aDzKMoKGLev9fhTkIByVCTrYF0nDpgDX0G8XEC4cD3FYiKGh +dxvHmUeeCGX0SHnTBBrOvk1wr1+DsFwT19h8g4Zu954ssR4y4crDrNk3zTT0 +iC3/8l7JFKS95b/vbaGhP1nq33+WTSBfIHdwtpWGLjEnDkz3mkDtofwmUicN +JbOy/LrOm8C/GiWX3QZo+Intv+dvftNhU2Gd5vBPGhp4u7t0tRnDk+y3flNi +xqg9beiukUWFT3YK3pESxui/7Y5d3AkqsP09tHuJbIxlVmYlazypYL6T255L +3hgPTt9cPCNNhRZ2OlVS3RgjXqQ0Bt6mQIfvHV4zpjGmFpeXlhUYwXvlA6WX +9xmjXUah4GKvASx11xSK7TdGSbNFnU31BiB9gvPujYPGaGEZaxSdZQCevbfS +80KN8az9RpvEAAP4dLYrtjbaGEOet0tsX9KHb6OGuz5dMsb6zpmXTmr6MFu4 +Oq/DMsbt5rtOmWTpwqizVXZinTF6GjSYaZ/XhYE1F7eONBjji0BhdtMwXWjw +IWdef2qMmZolq/esdOGMhBF9pY2IJ4n/7InPOrDh/IHj7UPGqLLv1tubadqg +GdDL5s9BRwllteO7ZTRBVky66PEaOlYoTKumzGvAhmbfnRLcdPz2VqZl5rUG +zMj+znm1jo6f094LWJ/TgPo+Pgt9MTreVusUkp1Vh61WeHZ1Ix2H1gU3b+5T +g70qxbw3ttGxvLXfVLVhI0S/8DqguoOOP/SXn8lnbITL/sKvKhzoGG4VvMn2 +yEZozD+W/MqFjpSSqWJt3Y0gqrpVcGUPHSuvR8uqF6pCi+pXUZ9IOsaZ/cf7 +NFsF1DfJyaveoeOm9GcxHyuUAFvfxFbkEP197g8FXFMC58CEz8w8OvamyWhI +HlWCuMKJXJciOvKovHs2x1CCoU2NKomVdFwfW2yS+koRLqnt1vj5ko75IiIW +Kr8UYEo9jVLxm45LxeaiQdvlYaADLUVm6KhB5/ZxosnD0+BfuyLm6BhYziHm +qSAPlyqsD1MW6Zh8rW/HpW9yoE5nK6nnNMFAHdoyp6Ec+FofUmgmmeA9rfMu +o/0y8DZgy/q3piboxlwzn2stBQ28c2QjMME3atd6zylKQW5xrtp1MxO04++a +zl4iQ+jkipWrlQmeKm0cCy4lA39U1emh7cR4Z1WGwkhksEpQmP/ia4KO1mHW +XyYloDZv6fPceRO8/XNdfUsLCSgWEfM2SSbodDIu3reABNWff67PvmiCRqWp +jmoJJKiQ/UC1uWKC266XGVCtSFCS8fRi1k0T/HZJnWnfKgbZyWeNt5Sa4EOn +ssemb0UhMUIwNaPHBPfNa195yisCPCLnCyZ6TXAuZ/GK+y9hSChnazQfMEHF +jRcjpHqEIf7X1OjPIRPU8typxHtbGE4GvjU1GzVBb9djJun6whDmkfl9bIFY +f1Cfu4ufELhtVkITWVPMl36/KbxJEFbe8gg0y5tiqn6U3rbLgpDt/2vQRskU +aYW1wYe9BGE0oS7KbZMpnpQXnr6+JABhbdsfHtM3Rd2rtUq2xgJwwf64bK2V +KR4zi+DgaFoP9a69y4Yhplj4NaZyw1o+8Byrb288bIpjRw35Iod4gS06O2Nz +hCke99R/LVnJC1Y3Dxo6HjNF3pQDTlJ7eOHNv+xB4XGm2NOd+Hb5CQ+M+2oP +lqeborux1tLkeW6QOnSuTvupKXJZRz/xsuSCS6v7jJKaTDHzTusjhgoXcFyx +Kv/23BSZlBxPGy4uGK/hKspuM0X28qLUHy/WQD1bfIZwjymetuzbusV6Dbhd +jY3689UUbaNn2nRdOSGj4ZjR43UM3F60dxqvscN6+93lZAEGbhB48c0vmh1i +P9G0ojYwsDGFFvvQmx0CuRaUdcUYyEfvfcVSZwfq9kjRXFkGNuTLUFKa2KBv +OGzmrB4D7w2sbXWbXmWK8QWVb3Nh4K0fJz7cY19h5lmciP69m4EhB3ue3+ta +ZuqfuGSR5sHA/licWbi9zLT/XdY7sIeBynkxphdNlpkJfXN/9wYx8M9LV/3Q +6CXmQu4p8+jTDHzf98qbtXaR+d4kraegmIGjVOMyNed5ZuCRvFvWpQzcTO4/ +Gao1z/xTWu3/s4yB1F6/oMU180xhxYF5vRoGfnmZxt1X9YdpyyMj/egpA01y +R0VzxP8wG98W+PX0MrBrIx9JZ2yWaSNQqxU5wMCjO6ayjj6fZQ5safsjMchA +r6ljoqt3Zpmz9T/Oe31iYHvhO9tnLrNMrRzdB2PjDLRWINVsaJ9hNr43i0ye +YKB+xpUD1HszTBvRXaDzm4H2l4VVM+JnmPvOHXkdMcdAz34R67U4w5x9mnBD +fIGBT0Z3rQjLzjDPLKbvrV9kIFeJiIPr8jRzg2GRpucKA9fNTP/qfT/NzDpU +P7e6ysC7FzYcT6qbZv4PkgsXuw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lc0XAHBLshSyXVz7Wvb93uty7zmIsqSSLXsiKiFE0aJIiZJUaBFC +RLJfWxsl5EXJUrwtlKIkW2R5/Z7fX8/n+5nPzJyZOWfmUfANcfDnYGNjK2Nn +Y/v/98+HtufKSXnMTYITip0/7ZlvsySOmQ2cgYvvv1Qpe2kCinX5SgxcgQNq +zds+e5pC5I77/ZwDuaCbT9Yo8bQDoV/iV/72VwB/l+sHC08P+NhoHzLb3wSW +7G69A+5BYKU8/u9U/xs4NPY9ZKvzcfjbT732u38Y3nfoMuUwGZot7uW9zp2B +WwPs3TS+2yD9sW7UV3MFBEIFu8pl8kE0yPs+twUnFltpfysRK4YrelYN9k48 +qNVzcgAOlYHO4O4tjEAebJmJKzCNKoOO+EM9GjE8uHWPd5DB6TJYO3D1B08O +D477LPQIXCuDmJMjUs0/eTDlp1TT8cYy8HsVe5waz4uh3ldz9PnKgeLfwJCv +5MMlulvQTHY5vMvQfTq1gR976F9TGA0VcKOnWDBShR9VdNtOuzyvADeBjd6L +xvxYsriav/+fChiKk/mPYy8/GhhExER+rIBPwXymotX8uLWSm6TPWQnfN39h +UXYLoNbghgVt60pY+J3+MCZHEG3tdFd0uiqhTkNkdbVaECest3Ta9ldC9L5L +9vHtgvjkTkiy98dKWB6Mn0ieEcQtgazW4MlKiB2pFetS3IAqWCSoKVgF8Z35 +uz5FbMAONklP+W1VkJR3qotDUgjL+YItvjZVgY3hfmExJSGUhrUZ79uqgOe5 +g9NGLSH0epD252U30X9EZdDWTAj3BVj+c+FDFRxX7Bi9ul8Is5/KPS/7WwXB +2RL/qdYLIbPyP7YT2tWw81a5pq27MCrYm/MIXamGDZo3Qzz9hTGQr22UK6Ma +OhviK0JChHHY9WzN9O1qsBl0oV2NE8aKoz0bq4qqwZz8n8W/xcLYKmlr1fe0 +GgwzbNxDlon2u5Oq6RPVIH51JDHttgiq3y+Q5DOrAQmN6viFAhFkaA8+vmdZ +A+SmhFOeZSIYQOr1YNrUgOxvtSMbm0XQduFGnPOuGlCxC/Vp+C6Cp+xaYvX9 +a8BgzQplxEAU8+3kAzPP1YDhzU69rQxRvObuXNaSVAMU/WzNB1aiyDn5d/Zn +Sg3QfSwUo3aLIjP+d4RyRg2YNSbyrzslikOJem5QWAPbI0hf9NtFsesuklVe +1sCOdd8/pPeIYkRTodtwew045Na9Wx4SRbme8qyMzhpw7vboapkUxemXEwa/ +e2vAU/NuvZuYGDq4PLlr+6UGDn7RST3jI4aTXrlqVas1cM7Rmvnmjxhu5G7h +3qnHAnJVJ5mDnYR1s0OthwxZUCriOK+3joTm85tDz1BZ0PfGqyxVjoQxY+JR +aQwWKO+MUNy5lYR7vhokOlqzoGnbnbXdmSRc8LeZ2uXNAucHyiOrd0m4Znta +7eQeFoyvv/9Ep5SEpOmw43F+LBDqqDqa0kRC4zhFtrT9LPCxaR+3/0HCx9SD +Sg7hLFixmuv8x1Qct04KWjucZcHlgujiFStxtOwZuRl8jph/Ldt5rZ3i+LFz +misukQV2L/jMLvqLY+b8qurViyy4YSFfaXdJHKUDwrpdrrFA+25+yvEMcSSP +3tpglE7Ey6ERVJIrjs/SxyP5Mlkw9sxIZT1LHC00Kx7dvsUCGtqmv/oojk3K +agf33WVBx53u8KUxcdx84JwIVz4R76rTDo1ZcXywPD91s4AF5x778CbxSODs +HsfdFUXEfplGxtjoSaCbee36Mw9ZcODWkku0iQQe77LJHi4j1rcUa3jfUgIZ +vR+jTSqI9TQkTfC6SaD3nrf8fVUsCDfO8W47I4HrvcTHSutYYJMtMGubLIEK +fhzvHtezQJH7+PnOaxI40ndAprWBBd1vnct7CiWQW4tW3PKIBYUmzy2dKySQ +tmffQsNjFpzK1Xs/0CCBWnfycu4/IfYjdD3nh04J/BzDuSHiGQu4+o+l+wwQ +8exZ886+iQVDjG8aI58lkO9dL5dSMwuS1jU5fp+VQGnb9ius5yz4XhBVME2W +xPHY6vLUlyx4wv+VfkRZEnndRrqprSy4HuHQNa8lidd3ju/tJ2xprrWwjJLY +29g4wdHOAumiG8mnbCSxOLv4+yXCs4I8ChyOkph0st5b9BULcv8dtuYOkMRE +0dvt6zpYcGzzjg+JoZL4h+9+0wnCO4ofha2PlkSbcGsYI7xJWIM7JU4Sde5n +mdv/w4LVoxk3hS5K4pb6rs4Swn0fuXSvXpfEp7u5Rtd0EvltFf6clC2Ji98O +XHAmfPbBJ9fMIkkkH9R+nEPYQ9R+QqpSEvMuxsaNEjaIaTid1SiJEreuDil3 +sYBveBNJoUUSM85kv/IgPLz1+v27XZLo2T7kcIlw3UNOUH0niYHp8RF1hC+T +DvcUDkuiYEGv/gfCgSc+BGj8lMSUrRsuLxOGL7bLD+Yk8a5f1CXRbhaQbOsu +665KIt/hHbqqhCfKVVUqechIDh+J0iP8XOJqnZEwGT2XowMohG+dYrevlSKj +wCY/diPC4aPBw3QVMt7K+LVFi7DNtqHIR9pk9DgSxJAjrFhlvQ5pZPwQoP+F +j/BfMutOkxkZyzLTmb+JeLpPKxta2pLxYfmcfRfhe99TW186Eu2vC8ULCZ/c +vuph40XGpTTBm9GEnWuCpjoCyNjHkzRoRVhL5v3Z7YfJOFV5cnA94TXxW8hv +oskoeGHH7Q5iP4fGq0od48no/ytQKYHwhdqU/t3pZNTkkUoYJc5rj9zKwaFs +Yj3XUwMuEqYlHGDzvk9GLi8ecW3C33ZZqvk9IqPX1fYxD+L8H9dXPBptIePP +cS7hH0T+XFeQd9jfTcZBKwXhcMKbJxejg0fImMiauhtK5NuxrVfVn/0kY2hp +D8dYG5EPOVrvRf4Q+/U4NdadsISjj3EdjxRufqA+rE3k77YHf7+vE5bCXFJX +ewqR72fWpmV4SUlh4v3hwfEWFvysfTHPqS2FOtHsp1NesEBB2PueM1UKi5dH +Jd8R9eJ8cMG5CKXwtP7vL9KEn8po1NjvkkLRaZpUGlFvaWcuR2QelcL8g3nb +6ER9tg6qKf88LYV/n2Q2OhH1u2zY3MNMkkLSxInDB4n63vdtTv/LbSnsD5Zl +nSXqn27nPqXdLIWOrqcWjrCIfBRTDX7OL41pXKKXt5SyQDzkiYy4uDQauLmm +8Dwg7stW13/2y0ujIStzpbmYBTXRSZqCBtKYOpShp07cXxc+/h7f7SqNYc/T +zKqI+0+/qCFgMlcadRofujwj7s8ADidx8xJp1E4jJ6hfJ/LP/VfL1WppjKHt +s790lQVrBRRU6a3SuDXoGssylQXvwxK+xE9I4w1KgHHEBRacNt25h0yTQQ/a +28A3MSzY6pU1TTWXwWROanjjMRYIxP6Ic7Ij2jdauWRHEeM3ny247COD/qIT +9U7E+1BrU/9jbaIMlsgFOUcdYMFvV6XImXcyWNXjKZbpwgJWdCi30BcZrC2i +hCk6Efl661GG9i8ZFOVhjeQ7sGD9J5eG/RyyqD1RLnJzGws2BiSzfVKXRcM3 +QkJgwQKvI3MXOmJkcVPpqZ5QLRaopJtLj5+VxZaxtWa31f9/3ikPuC/LYrMy +ie35RhZEL6t1m+fJYmWU2Rk2RRZci/MSq+uQxdmA3ZwUEvF+pL68ky8jh42D +FN/rK8T7X5pZdfKJHEL5sPbW1hrY3N+58qtVDrn/LN3leFED9mxrtni/kcP+ +aw+u1j6rgb0Owe/gqxxORS7PkRpqwCpG4VQslzzeEDwkmvWgBkLl/tw105DH +sKGreQOpNfA84M5Ec6Q87ppW9yC51EDQwlRsK78CTudl1Yb2VgP98D7SqLAC +plfUDr7srgae8ffFnBIK+Ee/6wG5oxryB5v7mIoKKJUUElrZVA0fHl/TrKYo +4B5BrvHyh9Ww/azxQI63AvqIDMWNnq8GfeHTOjHlCih+x4lvG60a/mps+KDl +pIja3DuDuJKrwLS4JPv6dSUMO3NIXIZUCVPCNj7OTcr4oDVBpfBGOXxJ9nEO +41bF81WRsiEDD8F6Msr6K2UjOshfsR8uKoGfe3nCq05two7aTyhoUUT8/4tz +nGtSQwnOEzu+rSsA4X9UL5VNqmPKDvPSnZS7IH3+4Q4KRRNbDh7a3OeRDRka +xhtEArTQS8bohOWnm9BONjOaSdXGnHZBJ730dKBLN13W6dPB+6ddSZRjaSDA +mRux54wuTl7cn8gpdxlkT8uZ7lbVw/vXX8zz/pcIvCoeNQ4v9dCpLPl1a1c8 +HJAEm+I2PXT7biej9Dge2vkVP3B26OG12/nOiSXxkPznG1d1tx4u6RWePJYY +DwKt4U7i7/WQY4e71HeLeBA+mDQ7+JNwzxHmYn0cSJfX6/sL62PTdYm8rvIz +oM2QfBjlqY/7Q0cPbHwWC5VK+5c4fPRxX+6cIak8Fmh8dVsu+erjK6X2i0I5 +sWDe7/opL0AfU/l7X2udjgXnwxlCbw7ro3Zc78SSWSycyheP0EzQx7ba2Euv +k05BNz/J+HOpPq61e7NS+uAEhH0QbrZhM8APh87XGlOjobXF49F9DgPMzJd/ +VCMbDbIPC1h8XAb4wpXttdXaaGg/RS9p5zVAscnM5Tu9x0BRwfeajYgBct5I +ZhgdOQav95YH2KgaoLT9L9Nh1lHQHdu+3sbOAFu8mWorNlEwOZPsZJ1hgDJu +0+dm8iNgaCDH+fYNAxy4pJq+5UoEtD+qcZm6ZYDr06knik9GQN65T7szcwzw +68h/93JdIsBNytBr7L4B/lfMHrKNLwJemA/uS3xkgCXxq7HJYeFwM1XtaNuw +AcZ+OykTYh8GW3RablhrGeKXANvjz/RCwXXtVsduHUM8MrIsv08+FA7828bv +om+I7hwna8iCoXAp6Z9YP6oh6pMP8Ae8C4G+b2/3nTIzRMeBM2yWO0PAL3tE +v9rJEDXpUoIDVsFwRoj9lfxJQ3zav/fkk61B8HjGZGm+0xAHthce7s0NhJwO +lu+u14a4xnFLOSQGQny+QXtpjyFG7TVnfxYSCNYuGpn+A4Y4ODqbwsMIhLf1 +ZGrPZ0NsyYvILBoIgPHTf8NKZw3xcGThirJoAJA2sMb9yEZYmrgpOeWmP/z9 +ru/wVNoIj0pnmzbG+8PQs9I6KTkjtAiJXFg55A854QXn3ygZ4Zav53c9RX/Q +7L+milpGqNf29TPzmx+YZ0X4SiFhm54OMZofBGvqv3/tb4QHFas6nnz3hSPz +5EXvQCN8I3ftc8MbXzjexEn+dcAI894ZhHc2+kKSa+9uvlAj1FJLfkZJ9YXC ++KPvzKONcNdvyVUhE18YHno8UHnJCPU5vZqHr+wB54u2/ddYRviKI+DZIQcf +8HQ1nFeqN8JcDb5uMfABPyUZ8YpGI7x3xIn0RsMHwut+OXc+M0Kd1WXOc1w+ +cPlrat/aDiO05uD9+zTcG9oZA71Rn4jxFR5mnLXzAsYvv7e7eSkYfCSj4hbZ +A0gNW3Ib11GwiJ1jzZ9Fd/h1Tj1UToCC3ObuP4MH3SFL4fe6r8IU1OA9JvHk +ljv85xhjESpNQbKBOFufvDs8aUitSNCh4LM6PvuX2m5glvj4cqUTBa9bn1Di +2uMKZOccL5IrBS39o4PlLF1hWjFe85gbBQftyErOaq6Q22jdyvSm4CHl+wES +0y7A8fvtalsgMV8Is2Yi3gWanX8Ef4qh4OSwnWfLQ2ewVJbYxp9LxMfrf/2C +pBNUTbxQ8MujINvmuZaT7E6gzAr/U19AxCf3MiJpzBHW2HTdCSymoIrrnpmJ +OkdoCkmYbq6iIGfma61ed0dgNsymR7+koEv8t+3kvF1AcXg9/O0nBXeFNb2b +tHSAAqlTLOYkBf+eXcx5pesAYl81k69NUZC+h+z+SMoBZqPOG1n8oWDH3g0O +w1M7oeI2nM9apeDn/FoD3Ts7QWfsgZaTMBXd1mYvtK/sgE2xF442Uam4PsA2 +d+rqdmg0yeeyo1PR8zSerAvaDjvmn1zpNaWiinRR5MPN2+Fo8FzJdzMqlhbE +rFWZs4dWD5/PAnZUvOUZ/EDP1R4CjSk27j5U7HnNPlqkug2Kpj9LzZ6n4m2L +hYsjIzbALF0uPJFERfKRQZrkMxt4s1+cwn2JinVrSlKismxg8ZPdDnIaFblX +pm8+2G0DNl2seLxNRXn7yIrF19YwXnxxIrmcii7O6t5zbVtB3d/4icp7Ks7d +kS9z6bOCFEX7xbghKpok4AXHeiuY/ehrNPyBio5fGpJCs6zgsVtycdYIFQ/v +LE7iCrAChx0f08UnqHi5b8Iw+68lHDM5G8rLRkPahQLVk8qW0Cr0WmFChYbm +ewdkhS5bgFbXVw/bTTRc0zo3XxdlAVeSF9OL1GkYbKzncdLbAjy4lQX26dCw +/HqU624dC5hcjlz8QKPhwTFXVaducyB9l+7ptqWhevW7y3bi5uD/ODC+6jAN +v1dRv5+pRfh1aDzKMoKGLev9fhTkIByVCTrYF0nDpgDX0G8XEC4cD3FYiKGh +dxvHmUeeCGX0SHnTBBrOvk1wr1+DsFwT19h8g4Zu954ssR4y4crDrNk3zTT0 +iC3/8l7JFKS95b/vbaGhP1nq33+WTSBfIHdwtpWGLjEnDkz3mkDtofwmUicN +JbOy/LrOm8C/GiWX3QZo+Intv+dvftNhU2Gd5vBPGhp4u7t0tRnDk+y3flNi +xqg9beiukUWFT3YK3pESxui/7Y5d3AkqsP09tHuJbIxlVmYlazypYL6T255L +3hgPTt9cPCNNhRZ2OlVS3RgjXqQ0Bt6mQIfvHV4zpjGmFpeXlhUYwXvlA6WX +9xmjXUah4GKvASx11xSK7TdGSbNFnU31BiB9gvPujYPGaGEZaxSdZQCevbfS +80KN8az9RpvEAAP4dLYrtjbaGEOet0tsX9KHb6OGuz5dMsb6zpmXTmr6MFu4 +Oq/DMsbt5rtOmWTpwqizVXZinTF6GjSYaZ/XhYE1F7eONBjji0BhdtMwXWjw +IWdef2qMmZolq/esdOGMhBF9pY2IJ4n/7InPOrDh/IHj7UPGqLLv1tubadqg +GdDL5s9BRwllteO7ZTRBVky66PEaOlYoTKumzGvAhmbfnRLcdPz2VqZl5rUG +zMj+znm1jo6f094LWJ/TgPo+Pgt9MTreVusUkp1Vh61WeHZ1Ix2H1gU3b+5T +g70qxbw3ttGxvLXfVLVhI0S/8DqguoOOP/SXn8lnbITL/sKvKhzoGG4VvMn2 +yEZozD+W/MqFjpSSqWJt3Y0gqrpVcGUPHSuvR8uqF6pCi+pXUZ9IOsaZ/cf7 +NFsF1DfJyaveoeOm9GcxHyuUAFvfxFbkEP197g8FXFMC58CEz8w8OvamyWhI +HlWCuMKJXJciOvKovHs2x1CCoU2NKomVdFwfW2yS+koRLqnt1vj5ko75IiIW +Kr8UYEo9jVLxm45LxeaiQdvlYaADLUVm6KhB5/ZxosnD0+BfuyLm6BhYziHm +qSAPlyqsD1MW6Zh8rW/HpW9yoE5nK6nnNMFAHdoyp6Ec+FofUmgmmeA9rfMu +o/0y8DZgy/q3piboxlwzn2stBQ28c2QjMME3atd6zylKQW5xrtp1MxO04++a +zl4iQ+jkipWrlQmeKm0cCy4lA39U1emh7cR4Z1WGwkhksEpQmP/ia4KO1mHW +XyYloDZv6fPceRO8/XNdfUsLCSgWEfM2SSbodDIu3reABNWff67PvmiCRqWp +jmoJJKiQ/UC1uWKC266XGVCtSFCS8fRi1k0T/HZJnWnfKgbZyWeNt5Sa4EOn +ssemb0UhMUIwNaPHBPfNa195yisCPCLnCyZ6TXAuZ/GK+y9hSChnazQfMEHF +jRcjpHqEIf7X1OjPIRPU8typxHtbGE4GvjU1GzVBb9djJun6whDmkfl9bIFY +f1Cfu4ufELhtVkITWVPMl36/KbxJEFbe8gg0y5tiqn6U3rbLgpDt/2vQRskU +aYW1wYe9BGE0oS7KbZMpnpQXnr6+JABhbdsfHtM3Rd2rtUq2xgJwwf64bK2V +KR4zi+DgaFoP9a69y4Yhplj4NaZyw1o+8Byrb288bIpjRw35Iod4gS06O2Nz +hCke99R/LVnJC1Y3Dxo6HjNF3pQDTlJ7eOHNv+xB4XGm2NOd+Hb5CQ+M+2oP +lqeborux1tLkeW6QOnSuTvupKXJZRz/xsuSCS6v7jJKaTDHzTusjhgoXcFyx +Kv/23BSZlBxPGy4uGK/hKspuM0X28qLUHy/WQD1bfIZwjymetuzbusV6Dbhd +jY3689UUbaNn2nRdOSGj4ZjR43UM3F60dxqvscN6+93lZAEGbhB48c0vmh1i +P9G0ojYwsDGFFvvQmx0CuRaUdcUYyEfvfcVSZwfq9kjRXFkGNuTLUFKa2KBv +OGzmrB4D7w2sbXWbXmWK8QWVb3Nh4K0fJz7cY19h5lmciP69m4EhB3ue3+ta +ZuqfuGSR5sHA/licWbi9zLT/XdY7sIeBynkxphdNlpkJfXN/9wYx8M9LV/3Q +6CXmQu4p8+jTDHzf98qbtXaR+d4kraegmIGjVOMyNed5ZuCRvFvWpQzcTO4/ +Gao1z/xTWu3/s4yB1F6/oMU180xhxYF5vRoGfnmZxt1X9YdpyyMj/egpA01y +R0VzxP8wG98W+PX0MrBrIx9JZ2yWaSNQqxU5wMCjO6ayjj6fZQ5safsjMchA +r6ljoqt3Zpmz9T/Oe31iYHvhO9tnLrNMrRzdB2PjDLRWINVsaJ9hNr43i0ye +YKB+xpUD1HszTBvRXaDzm4H2l4VVM+JnmPvOHXkdMcdAz34R67U4w5x9mnBD +fIGBT0Z3rQjLzjDPLKbvrV9kIFeJiIPr8jRzg2GRpucKA9fNTP/qfT/NzDpU +P7e6ysC7FzYcT6qbZv4PkgsXuw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0930208208692291}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0930208208692291}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lc0XAHBLshSyXVz7Wvb93uty7zmIsqSSLXsiKiFE0aJIiZJUaBFC +RLJfWxsl5EXJUrwtlKIkW2R5/Z7fX8/n+5nPzJyZOWfmUfANcfDnYGNjK2Nn +Y/v/98+HtufKSXnMTYITip0/7ZlvsySOmQ2cgYvvv1Qpe2kCinX5SgxcgQNq +zds+e5pC5I77/ZwDuaCbT9Yo8bQDoV/iV/72VwB/l+sHC08P+NhoHzLb3wSW +7G69A+5BYKU8/u9U/xs4NPY9ZKvzcfjbT732u38Y3nfoMuUwGZot7uW9zp2B +WwPs3TS+2yD9sW7UV3MFBEIFu8pl8kE0yPs+twUnFltpfysRK4YrelYN9k48 +qNVzcgAOlYHO4O4tjEAebJmJKzCNKoOO+EM9GjE8uHWPd5DB6TJYO3D1B08O +D477LPQIXCuDmJMjUs0/eTDlp1TT8cYy8HsVe5waz4uh3ldz9PnKgeLfwJCv +5MMlulvQTHY5vMvQfTq1gR976F9TGA0VcKOnWDBShR9VdNtOuzyvADeBjd6L +xvxYsriav/+fChiKk/mPYy8/GhhExER+rIBPwXymotX8uLWSm6TPWQnfN39h +UXYLoNbghgVt60pY+J3+MCZHEG3tdFd0uiqhTkNkdbVaECest3Ta9ldC9L5L +9vHtgvjkTkiy98dKWB6Mn0ieEcQtgazW4MlKiB2pFetS3IAqWCSoKVgF8Z35 +uz5FbMAONklP+W1VkJR3qotDUgjL+YItvjZVgY3hfmExJSGUhrUZ79uqgOe5 +g9NGLSH0epD252U30X9EZdDWTAj3BVj+c+FDFRxX7Bi9ul8Is5/KPS/7WwXB +2RL/qdYLIbPyP7YT2tWw81a5pq27MCrYm/MIXamGDZo3Qzz9hTGQr22UK6Ma +OhviK0JChHHY9WzN9O1qsBl0oV2NE8aKoz0bq4qqwZz8n8W/xcLYKmlr1fe0 +GgwzbNxDlon2u5Oq6RPVIH51JDHttgiq3y+Q5DOrAQmN6viFAhFkaA8+vmdZ +A+SmhFOeZSIYQOr1YNrUgOxvtSMbm0XQduFGnPOuGlCxC/Vp+C6Cp+xaYvX9 +a8BgzQplxEAU8+3kAzPP1YDhzU69rQxRvObuXNaSVAMU/WzNB1aiyDn5d/Zn +Sg3QfSwUo3aLIjP+d4RyRg2YNSbyrzslikOJem5QWAPbI0hf9NtFsesuklVe +1sCOdd8/pPeIYkRTodtwew045Na9Wx4SRbme8qyMzhpw7vboapkUxemXEwa/ +e2vAU/NuvZuYGDq4PLlr+6UGDn7RST3jI4aTXrlqVas1cM7Rmvnmjxhu5G7h +3qnHAnJVJ5mDnYR1s0OthwxZUCriOK+3joTm85tDz1BZ0PfGqyxVjoQxY+JR +aQwWKO+MUNy5lYR7vhokOlqzoGnbnbXdmSRc8LeZ2uXNAucHyiOrd0m4Znta +7eQeFoyvv/9Ep5SEpOmw43F+LBDqqDqa0kRC4zhFtrT9LPCxaR+3/0HCx9SD +Sg7hLFixmuv8x1Qct04KWjucZcHlgujiFStxtOwZuRl8jph/Ldt5rZ3i+LFz +misukQV2L/jMLvqLY+b8qurViyy4YSFfaXdJHKUDwrpdrrFA+25+yvEMcSSP +3tpglE7Ey6ERVJIrjs/SxyP5Mlkw9sxIZT1LHC00Kx7dvsUCGtqmv/oojk3K +agf33WVBx53u8KUxcdx84JwIVz4R76rTDo1ZcXywPD91s4AF5x778CbxSODs +HsfdFUXEfplGxtjoSaCbee36Mw9ZcODWkku0iQQe77LJHi4j1rcUa3jfUgIZ +vR+jTSqI9TQkTfC6SaD3nrf8fVUsCDfO8W47I4HrvcTHSutYYJMtMGubLIEK +fhzvHtezQJH7+PnOaxI40ndAprWBBd1vnct7CiWQW4tW3PKIBYUmzy2dKySQ +tmffQsNjFpzK1Xs/0CCBWnfycu4/IfYjdD3nh04J/BzDuSHiGQu4+o+l+wwQ +8exZ886+iQVDjG8aI58lkO9dL5dSMwuS1jU5fp+VQGnb9ius5yz4XhBVME2W +xPHY6vLUlyx4wv+VfkRZEnndRrqprSy4HuHQNa8lidd3ju/tJ2xprrWwjJLY +29g4wdHOAumiG8mnbCSxOLv4+yXCs4I8ChyOkph0st5b9BULcv8dtuYOkMRE +0dvt6zpYcGzzjg+JoZL4h+9+0wnCO4ofha2PlkSbcGsYI7xJWIM7JU4Sde5n +mdv/w4LVoxk3hS5K4pb6rs4Swn0fuXSvXpfEp7u5Rtd0EvltFf6clC2Ji98O +XHAmfPbBJ9fMIkkkH9R+nEPYQ9R+QqpSEvMuxsaNEjaIaTid1SiJEreuDil3 +sYBveBNJoUUSM85kv/IgPLz1+v27XZLo2T7kcIlw3UNOUH0niYHp8RF1hC+T +DvcUDkuiYEGv/gfCgSc+BGj8lMSUrRsuLxOGL7bLD+Yk8a5f1CXRbhaQbOsu +665KIt/hHbqqhCfKVVUqechIDh+J0iP8XOJqnZEwGT2XowMohG+dYrevlSKj +wCY/diPC4aPBw3QVMt7K+LVFi7DNtqHIR9pk9DgSxJAjrFhlvQ5pZPwQoP+F +j/BfMutOkxkZyzLTmb+JeLpPKxta2pLxYfmcfRfhe99TW186Eu2vC8ULCZ/c +vuph40XGpTTBm9GEnWuCpjoCyNjHkzRoRVhL5v3Z7YfJOFV5cnA94TXxW8hv +oskoeGHH7Q5iP4fGq0od48no/ytQKYHwhdqU/t3pZNTkkUoYJc5rj9zKwaFs +Yj3XUwMuEqYlHGDzvk9GLi8ecW3C33ZZqvk9IqPX1fYxD+L8H9dXPBptIePP +cS7hH0T+XFeQd9jfTcZBKwXhcMKbJxejg0fImMiauhtK5NuxrVfVn/0kY2hp +D8dYG5EPOVrvRf4Q+/U4NdadsISjj3EdjxRufqA+rE3k77YHf7+vE5bCXFJX +ewqR72fWpmV4SUlh4v3hwfEWFvysfTHPqS2FOtHsp1NesEBB2PueM1UKi5dH +Jd8R9eJ8cMG5CKXwtP7vL9KEn8po1NjvkkLRaZpUGlFvaWcuR2QelcL8g3nb +6ER9tg6qKf88LYV/n2Q2OhH1u2zY3MNMkkLSxInDB4n63vdtTv/LbSnsD5Zl +nSXqn27nPqXdLIWOrqcWjrCIfBRTDX7OL41pXKKXt5SyQDzkiYy4uDQauLmm +8Dwg7stW13/2y0ujIStzpbmYBTXRSZqCBtKYOpShp07cXxc+/h7f7SqNYc/T +zKqI+0+/qCFgMlcadRofujwj7s8ADidx8xJp1E4jJ6hfJ/LP/VfL1WppjKHt +s790lQVrBRRU6a3SuDXoGssylQXvwxK+xE9I4w1KgHHEBRacNt25h0yTQQ/a +28A3MSzY6pU1TTWXwWROanjjMRYIxP6Ic7Ij2jdauWRHEeM3ny247COD/qIT +9U7E+1BrU/9jbaIMlsgFOUcdYMFvV6XImXcyWNXjKZbpwgJWdCi30BcZrC2i +hCk6Efl661GG9i8ZFOVhjeQ7sGD9J5eG/RyyqD1RLnJzGws2BiSzfVKXRcM3 +QkJgwQKvI3MXOmJkcVPpqZ5QLRaopJtLj5+VxZaxtWa31f9/3ikPuC/LYrMy +ie35RhZEL6t1m+fJYmWU2Rk2RRZci/MSq+uQxdmA3ZwUEvF+pL68ky8jh42D +FN/rK8T7X5pZdfKJHEL5sPbW1hrY3N+58qtVDrn/LN3leFED9mxrtni/kcP+ +aw+u1j6rgb0Owe/gqxxORS7PkRpqwCpG4VQslzzeEDwkmvWgBkLl/tw105DH +sKGreQOpNfA84M5Ec6Q87ppW9yC51EDQwlRsK78CTudl1Yb2VgP98D7SqLAC +plfUDr7srgae8ffFnBIK+Ee/6wG5oxryB5v7mIoKKJUUElrZVA0fHl/TrKYo +4B5BrvHyh9Ww/azxQI63AvqIDMWNnq8GfeHTOjHlCih+x4lvG60a/mps+KDl +pIja3DuDuJKrwLS4JPv6dSUMO3NIXIZUCVPCNj7OTcr4oDVBpfBGOXxJ9nEO +41bF81WRsiEDD8F6Msr6K2UjOshfsR8uKoGfe3nCq05two7aTyhoUUT8/4tz +nGtSQwnOEzu+rSsA4X9UL5VNqmPKDvPSnZS7IH3+4Q4KRRNbDh7a3OeRDRka +xhtEArTQS8bohOWnm9BONjOaSdXGnHZBJ730dKBLN13W6dPB+6ddSZRjaSDA +mRux54wuTl7cn8gpdxlkT8uZ7lbVw/vXX8zz/pcIvCoeNQ4v9dCpLPl1a1c8 +HJAEm+I2PXT7biej9Dge2vkVP3B26OG12/nOiSXxkPznG1d1tx4u6RWePJYY +DwKt4U7i7/WQY4e71HeLeBA+mDQ7+JNwzxHmYn0cSJfX6/sL62PTdYm8rvIz +oM2QfBjlqY/7Q0cPbHwWC5VK+5c4fPRxX+6cIak8Fmh8dVsu+erjK6X2i0I5 +sWDe7/opL0AfU/l7X2udjgXnwxlCbw7ro3Zc78SSWSycyheP0EzQx7ba2Euv +k05BNz/J+HOpPq61e7NS+uAEhH0QbrZhM8APh87XGlOjobXF49F9DgPMzJd/ +VCMbDbIPC1h8XAb4wpXttdXaaGg/RS9p5zVAscnM5Tu9x0BRwfeajYgBct5I +ZhgdOQav95YH2KgaoLT9L9Nh1lHQHdu+3sbOAFu8mWorNlEwOZPsZJ1hgDJu +0+dm8iNgaCDH+fYNAxy4pJq+5UoEtD+qcZm6ZYDr06knik9GQN65T7szcwzw +68h/93JdIsBNytBr7L4B/lfMHrKNLwJemA/uS3xkgCXxq7HJYeFwM1XtaNuw +AcZ+OykTYh8GW3RablhrGeKXANvjz/RCwXXtVsduHUM8MrIsv08+FA7828bv +om+I7hwna8iCoXAp6Z9YP6oh6pMP8Ae8C4G+b2/3nTIzRMeBM2yWO0PAL3tE +v9rJEDXpUoIDVsFwRoj9lfxJQ3zav/fkk61B8HjGZGm+0xAHthce7s0NhJwO +lu+u14a4xnFLOSQGQny+QXtpjyFG7TVnfxYSCNYuGpn+A4Y4ODqbwsMIhLf1 +ZGrPZ0NsyYvILBoIgPHTf8NKZw3xcGThirJoAJA2sMb9yEZYmrgpOeWmP/z9 +ru/wVNoIj0pnmzbG+8PQs9I6KTkjtAiJXFg55A854QXn3ygZ4Zav53c9RX/Q +7L+milpGqNf29TPzmx+YZ0X4SiFhm54OMZofBGvqv3/tb4QHFas6nnz3hSPz +5EXvQCN8I3ftc8MbXzjexEn+dcAI894ZhHc2+kKSa+9uvlAj1FJLfkZJ9YXC ++KPvzKONcNdvyVUhE18YHno8UHnJCPU5vZqHr+wB54u2/ddYRviKI+DZIQcf +8HQ1nFeqN8JcDb5uMfABPyUZ8YpGI7x3xIn0RsMHwut+OXc+M0Kd1WXOc1w+ +cPlrat/aDiO05uD9+zTcG9oZA71Rn4jxFR5mnLXzAsYvv7e7eSkYfCSj4hbZ +A0gNW3Ib11GwiJ1jzZ9Fd/h1Tj1UToCC3ObuP4MH3SFL4fe6r8IU1OA9JvHk +ljv85xhjESpNQbKBOFufvDs8aUitSNCh4LM6PvuX2m5glvj4cqUTBa9bn1Di +2uMKZOccL5IrBS39o4PlLF1hWjFe85gbBQftyErOaq6Q22jdyvSm4CHl+wES +0y7A8fvtalsgMV8Is2Yi3gWanX8Ef4qh4OSwnWfLQ2ewVJbYxp9LxMfrf/2C +pBNUTbxQ8MujINvmuZaT7E6gzAr/U19AxCf3MiJpzBHW2HTdCSymoIrrnpmJ +OkdoCkmYbq6iIGfma61ed0dgNsymR7+koEv8t+3kvF1AcXg9/O0nBXeFNb2b +tHSAAqlTLOYkBf+eXcx5pesAYl81k69NUZC+h+z+SMoBZqPOG1n8oWDH3g0O +w1M7oeI2nM9apeDn/FoD3Ts7QWfsgZaTMBXd1mYvtK/sgE2xF442Uam4PsA2 +d+rqdmg0yeeyo1PR8zSerAvaDjvmn1zpNaWiinRR5MPN2+Fo8FzJdzMqlhbE +rFWZs4dWD5/PAnZUvOUZ/EDP1R4CjSk27j5U7HnNPlqkug2Kpj9LzZ6n4m2L +hYsjIzbALF0uPJFERfKRQZrkMxt4s1+cwn2JinVrSlKismxg8ZPdDnIaFblX +pm8+2G0DNl2seLxNRXn7yIrF19YwXnxxIrmcii7O6t5zbVtB3d/4icp7Ks7d +kS9z6bOCFEX7xbghKpok4AXHeiuY/ehrNPyBio5fGpJCs6zgsVtycdYIFQ/v +LE7iCrAChx0f08UnqHi5b8Iw+68lHDM5G8rLRkPahQLVk8qW0Cr0WmFChYbm +ewdkhS5bgFbXVw/bTTRc0zo3XxdlAVeSF9OL1GkYbKzncdLbAjy4lQX26dCw +/HqU624dC5hcjlz8QKPhwTFXVaducyB9l+7ptqWhevW7y3bi5uD/ODC+6jAN +v1dRv5+pRfh1aDzKMoKGLev9fhTkIByVCTrYF0nDpgDX0G8XEC4cD3FYiKGh +dxvHmUeeCGX0SHnTBBrOvk1wr1+DsFwT19h8g4Zu954ssR4y4crDrNk3zTT0 +iC3/8l7JFKS95b/vbaGhP1nq33+WTSBfIHdwtpWGLjEnDkz3mkDtofwmUicN +JbOy/LrOm8C/GiWX3QZo+Intv+dvftNhU2Gd5vBPGhp4u7t0tRnDk+y3flNi +xqg9beiukUWFT3YK3pESxui/7Y5d3AkqsP09tHuJbIxlVmYlazypYL6T255L +3hgPTt9cPCNNhRZ2OlVS3RgjXqQ0Bt6mQIfvHV4zpjGmFpeXlhUYwXvlA6WX +9xmjXUah4GKvASx11xSK7TdGSbNFnU31BiB9gvPujYPGaGEZaxSdZQCevbfS +80KN8az9RpvEAAP4dLYrtjbaGEOet0tsX9KHb6OGuz5dMsb6zpmXTmr6MFu4 +Oq/DMsbt5rtOmWTpwqizVXZinTF6GjSYaZ/XhYE1F7eONBjji0BhdtMwXWjw +IWdef2qMmZolq/esdOGMhBF9pY2IJ4n/7InPOrDh/IHj7UPGqLLv1tubadqg +GdDL5s9BRwllteO7ZTRBVky66PEaOlYoTKumzGvAhmbfnRLcdPz2VqZl5rUG +zMj+znm1jo6f094LWJ/TgPo+Pgt9MTreVusUkp1Vh61WeHZ1Ix2H1gU3b+5T +g70qxbw3ttGxvLXfVLVhI0S/8DqguoOOP/SXn8lnbITL/sKvKhzoGG4VvMn2 +yEZozD+W/MqFjpSSqWJt3Y0gqrpVcGUPHSuvR8uqF6pCi+pXUZ9IOsaZ/cf7 +NFsF1DfJyaveoeOm9GcxHyuUAFvfxFbkEP197g8FXFMC58CEz8w8OvamyWhI +HlWCuMKJXJciOvKovHs2x1CCoU2NKomVdFwfW2yS+koRLqnt1vj5ko75IiIW +Kr8UYEo9jVLxm45LxeaiQdvlYaADLUVm6KhB5/ZxosnD0+BfuyLm6BhYziHm +qSAPlyqsD1MW6Zh8rW/HpW9yoE5nK6nnNMFAHdoyp6Ec+FofUmgmmeA9rfMu +o/0y8DZgy/q3piboxlwzn2stBQ28c2QjMME3atd6zylKQW5xrtp1MxO04++a +zl4iQ+jkipWrlQmeKm0cCy4lA39U1emh7cR4Z1WGwkhksEpQmP/ia4KO1mHW +XyYloDZv6fPceRO8/XNdfUsLCSgWEfM2SSbodDIu3reABNWff67PvmiCRqWp +jmoJJKiQ/UC1uWKC266XGVCtSFCS8fRi1k0T/HZJnWnfKgbZyWeNt5Sa4EOn +ssemb0UhMUIwNaPHBPfNa195yisCPCLnCyZ6TXAuZ/GK+y9hSChnazQfMEHF +jRcjpHqEIf7X1OjPIRPU8typxHtbGE4GvjU1GzVBb9djJun6whDmkfl9bIFY +f1Cfu4ufELhtVkITWVPMl36/KbxJEFbe8gg0y5tiqn6U3rbLgpDt/2vQRskU +aYW1wYe9BGE0oS7KbZMpnpQXnr6+JABhbdsfHtM3Rd2rtUq2xgJwwf64bK2V +KR4zi+DgaFoP9a69y4Yhplj4NaZyw1o+8Byrb288bIpjRw35Iod4gS06O2Nz +hCke99R/LVnJC1Y3Dxo6HjNF3pQDTlJ7eOHNv+xB4XGm2NOd+Hb5CQ+M+2oP +lqeborux1tLkeW6QOnSuTvupKXJZRz/xsuSCS6v7jJKaTDHzTusjhgoXcFyx +Kv/23BSZlBxPGy4uGK/hKspuM0X28qLUHy/WQD1bfIZwjymetuzbusV6Dbhd +jY3689UUbaNn2nRdOSGj4ZjR43UM3F60dxqvscN6+93lZAEGbhB48c0vmh1i +P9G0ojYwsDGFFvvQmx0CuRaUdcUYyEfvfcVSZwfq9kjRXFkGNuTLUFKa2KBv +OGzmrB4D7w2sbXWbXmWK8QWVb3Nh4K0fJz7cY19h5lmciP69m4EhB3ue3+ta +ZuqfuGSR5sHA/licWbi9zLT/XdY7sIeBynkxphdNlpkJfXN/9wYx8M9LV/3Q +6CXmQu4p8+jTDHzf98qbtXaR+d4kraegmIGjVOMyNed5ZuCRvFvWpQzcTO4/ +Gao1z/xTWu3/s4yB1F6/oMU180xhxYF5vRoGfnmZxt1X9YdpyyMj/egpA01y +R0VzxP8wG98W+PX0MrBrIx9JZ2yWaSNQqxU5wMCjO6ayjj6fZQ5safsjMchA +r6ljoqt3Zpmz9T/Oe31iYHvhO9tnLrNMrRzdB2PjDLRWINVsaJ9hNr43i0ye +YKB+xpUD1HszTBvRXaDzm4H2l4VVM+JnmPvOHXkdMcdAz34R67U4w5x9mnBD +fIGBT0Z3rQjLzjDPLKbvrV9kIFeJiIPr8jRzg2GRpucKA9fNTP/qfT/NzDpU +P7e6ysC7FzYcT6qbZv4PkgsXuw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0930208208692291}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0930208208692291}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829421067129*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"ae0c7f6e-7cd0-4fc8-b3e2-a08acd9b4fba"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", - RowBox[{"{", "}"}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799458254999*^9, - 3.9917994623413925`*^9}},ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-\ -5e6c7b4b5678"], + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0.013749"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1", ",", "0.038234"}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", "0.060049"}], "}"}], ",", + RowBox[{"{", + RowBox[{"3", ",", "0.076638"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.085764"}], "}"}], ",", + RowBox[{"{", + RowBox[{"5", ",", "0.090382"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.089758"}], "}"}], ",", + RowBox[{"{", + RowBox[{"7", ",", "0.084925"}], "}"}], ",", + RowBox[{"{", + RowBox[{"8", ",", "0.077936"}], "}"}], ",", + RowBox[{"{", + RowBox[{"9", ",", "0.069316"}], "}"}], ",", + RowBox[{"{", + RowBox[{"10", ",", "0.060067"}], "}"}], ",", + RowBox[{"{", + RowBox[{"11", ",", "0.051031"}], "}"}], ",", + RowBox[{"{", + RowBox[{"12", ",", "0.042528"}], "}"}], ",", + RowBox[{"{", + RowBox[{"13", ",", "0.034867"}], "}"}], ",", + RowBox[{"{", + RowBox[{"14", ",", "0.02819"}], "}"}], ",", + RowBox[{"{", + RowBox[{"15", ",", "0.022495"}], "}"}], ",", + RowBox[{"{", + RowBox[{"16", ",", "0.01774"}], "}"}], ",", + RowBox[{"{", + RowBox[{"17", ",", "0.013843"}], "}"}], ",", + RowBox[{"{", + RowBox[{"18", ",", "0.010692"}], "}"}], ",", + RowBox[{"{", + RowBox[{"19", ",", "0.008182"}], "}"}], ",", + RowBox[{"{", + RowBox[{"20", ",", "0.006204"}], "}"}], ",", + RowBox[{"{", + RowBox[{"21", ",", "0.004665"}], "}"}], ",", + RowBox[{"{", + RowBox[{"22", ",", "0.003479"}], "}"}], ",", + RowBox[{"{", + RowBox[{"23", ",", "0.002574"}], "}"}], ",", + RowBox[{"{", + RowBox[{"24", ",", "0.00189"}], "}"}], ",", + RowBox[{"{", + RowBox[{"25", ",", "0.001377"}], "}"}], ",", + RowBox[{"{", + RowBox[{"26", ",", "0.000997"}], "}"}], ",", + RowBox[{"{", + RowBox[{"27", ",", "0.000717"}], "}"}], ",", + RowBox[{"{", + RowBox[{"28", ",", "0.000511"}], "}"}], ",", + RowBox[{"{", + RowBox[{"29", ",", "0.000363"}], "}"}], ",", + RowBox[{"{", + RowBox[{"30", ",", "0.000256"}], "}"}]}], "}"}], "]"}]}]], "Input", + CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, + 3.993828206580111*^9}, + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel->"In[96]:=",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.090382}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829421200259*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"c19c7019-fc84-4911-b521-a2e7bd1d3edf"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"cd9a8165-891b-9245-aca1-\ -3f60fcfd9a79"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lc0XAHBLshSyXVz7Wvb93uty7zmIsqSSLXsiKiFE0aJIiZJUaBFC +RLJfWxsl5EXJUrwtlKIkW2R5/Z7fX8/n+5nPzJyZOWfmUfANcfDnYGNjK2Nn +Y/v/98+HtufKSXnMTYITip0/7ZlvsySOmQ2cgYvvv1Qpe2kCinX5SgxcgQNq +zds+e5pC5I77/ZwDuaCbT9Yo8bQDoV/iV/72VwB/l+sHC08P+NhoHzLb3wSW +7G69A+5BYKU8/u9U/xs4NPY9ZKvzcfjbT732u38Y3nfoMuUwGZot7uW9zp2B +WwPs3TS+2yD9sW7UV3MFBEIFu8pl8kE0yPs+twUnFltpfysRK4YrelYN9k48 +qNVzcgAOlYHO4O4tjEAebJmJKzCNKoOO+EM9GjE8uHWPd5DB6TJYO3D1B08O +D477LPQIXCuDmJMjUs0/eTDlp1TT8cYy8HsVe5waz4uh3ldz9PnKgeLfwJCv +5MMlulvQTHY5vMvQfTq1gR976F9TGA0VcKOnWDBShR9VdNtOuzyvADeBjd6L +xvxYsriav/+fChiKk/mPYy8/GhhExER+rIBPwXymotX8uLWSm6TPWQnfN39h +UXYLoNbghgVt60pY+J3+MCZHEG3tdFd0uiqhTkNkdbVaECest3Ta9ldC9L5L +9vHtgvjkTkiy98dKWB6Mn0ieEcQtgazW4MlKiB2pFetS3IAqWCSoKVgF8Z35 +uz5FbMAONklP+W1VkJR3qotDUgjL+YItvjZVgY3hfmExJSGUhrUZ79uqgOe5 +g9NGLSH0epD252U30X9EZdDWTAj3BVj+c+FDFRxX7Bi9ul8Is5/KPS/7WwXB +2RL/qdYLIbPyP7YT2tWw81a5pq27MCrYm/MIXamGDZo3Qzz9hTGQr22UK6Ma +OhviK0JChHHY9WzN9O1qsBl0oV2NE8aKoz0bq4qqwZz8n8W/xcLYKmlr1fe0 +GgwzbNxDlon2u5Oq6RPVIH51JDHttgiq3y+Q5DOrAQmN6viFAhFkaA8+vmdZ +A+SmhFOeZSIYQOr1YNrUgOxvtSMbm0XQduFGnPOuGlCxC/Vp+C6Cp+xaYvX9 +a8BgzQplxEAU8+3kAzPP1YDhzU69rQxRvObuXNaSVAMU/WzNB1aiyDn5d/Zn +Sg3QfSwUo3aLIjP+d4RyRg2YNSbyrzslikOJem5QWAPbI0hf9NtFsesuklVe +1sCOdd8/pPeIYkRTodtwew045Na9Wx4SRbme8qyMzhpw7vboapkUxemXEwa/ +e2vAU/NuvZuYGDq4PLlr+6UGDn7RST3jI4aTXrlqVas1cM7Rmvnmjxhu5G7h +3qnHAnJVJ5mDnYR1s0OthwxZUCriOK+3joTm85tDz1BZ0PfGqyxVjoQxY+JR +aQwWKO+MUNy5lYR7vhokOlqzoGnbnbXdmSRc8LeZ2uXNAucHyiOrd0m4Znta +7eQeFoyvv/9Ep5SEpOmw43F+LBDqqDqa0kRC4zhFtrT9LPCxaR+3/0HCx9SD +Sg7hLFixmuv8x1Qct04KWjucZcHlgujiFStxtOwZuRl8jph/Ldt5rZ3i+LFz +misukQV2L/jMLvqLY+b8qurViyy4YSFfaXdJHKUDwrpdrrFA+25+yvEMcSSP +3tpglE7Ey6ERVJIrjs/SxyP5Mlkw9sxIZT1LHC00Kx7dvsUCGtqmv/oojk3K +agf33WVBx53u8KUxcdx84JwIVz4R76rTDo1ZcXywPD91s4AF5x778CbxSODs +HsfdFUXEfplGxtjoSaCbee36Mw9ZcODWkku0iQQe77LJHi4j1rcUa3jfUgIZ +vR+jTSqI9TQkTfC6SaD3nrf8fVUsCDfO8W47I4HrvcTHSutYYJMtMGubLIEK +fhzvHtezQJH7+PnOaxI40ndAprWBBd1vnct7CiWQW4tW3PKIBYUmzy2dKySQ +tmffQsNjFpzK1Xs/0CCBWnfycu4/IfYjdD3nh04J/BzDuSHiGQu4+o+l+wwQ +8exZ886+iQVDjG8aI58lkO9dL5dSMwuS1jU5fp+VQGnb9ius5yz4XhBVME2W +xPHY6vLUlyx4wv+VfkRZEnndRrqprSy4HuHQNa8lidd3ju/tJ2xprrWwjJLY +29g4wdHOAumiG8mnbCSxOLv4+yXCs4I8ChyOkph0st5b9BULcv8dtuYOkMRE +0dvt6zpYcGzzjg+JoZL4h+9+0wnCO4ofha2PlkSbcGsYI7xJWIM7JU4Sde5n +mdv/w4LVoxk3hS5K4pb6rs4Swn0fuXSvXpfEp7u5Rtd0EvltFf6clC2Ji98O +XHAmfPbBJ9fMIkkkH9R+nEPYQ9R+QqpSEvMuxsaNEjaIaTid1SiJEreuDil3 +sYBveBNJoUUSM85kv/IgPLz1+v27XZLo2T7kcIlw3UNOUH0niYHp8RF1hC+T +DvcUDkuiYEGv/gfCgSc+BGj8lMSUrRsuLxOGL7bLD+Yk8a5f1CXRbhaQbOsu +665KIt/hHbqqhCfKVVUqechIDh+J0iP8XOJqnZEwGT2XowMohG+dYrevlSKj +wCY/diPC4aPBw3QVMt7K+LVFi7DNtqHIR9pk9DgSxJAjrFhlvQ5pZPwQoP+F +j/BfMutOkxkZyzLTmb+JeLpPKxta2pLxYfmcfRfhe99TW186Eu2vC8ULCZ/c +vuph40XGpTTBm9GEnWuCpjoCyNjHkzRoRVhL5v3Z7YfJOFV5cnA94TXxW8hv +oskoeGHH7Q5iP4fGq0od48no/ytQKYHwhdqU/t3pZNTkkUoYJc5rj9zKwaFs +Yj3XUwMuEqYlHGDzvk9GLi8ecW3C33ZZqvk9IqPX1fYxD+L8H9dXPBptIePP +cS7hH0T+XFeQd9jfTcZBKwXhcMKbJxejg0fImMiauhtK5NuxrVfVn/0kY2hp +D8dYG5EPOVrvRf4Q+/U4NdadsISjj3EdjxRufqA+rE3k77YHf7+vE5bCXFJX +ewqR72fWpmV4SUlh4v3hwfEWFvysfTHPqS2FOtHsp1NesEBB2PueM1UKi5dH +Jd8R9eJ8cMG5CKXwtP7vL9KEn8po1NjvkkLRaZpUGlFvaWcuR2QelcL8g3nb +6ER9tg6qKf88LYV/n2Q2OhH1u2zY3MNMkkLSxInDB4n63vdtTv/LbSnsD5Zl +nSXqn27nPqXdLIWOrqcWjrCIfBRTDX7OL41pXKKXt5SyQDzkiYy4uDQauLmm +8Dwg7stW13/2y0ujIStzpbmYBTXRSZqCBtKYOpShp07cXxc+/h7f7SqNYc/T +zKqI+0+/qCFgMlcadRofujwj7s8ADidx8xJp1E4jJ6hfJ/LP/VfL1WppjKHt +s790lQVrBRRU6a3SuDXoGssylQXvwxK+xE9I4w1KgHHEBRacNt25h0yTQQ/a +28A3MSzY6pU1TTWXwWROanjjMRYIxP6Ic7Ij2jdauWRHEeM3ny247COD/qIT +9U7E+1BrU/9jbaIMlsgFOUcdYMFvV6XImXcyWNXjKZbpwgJWdCi30BcZrC2i +hCk6Efl661GG9i8ZFOVhjeQ7sGD9J5eG/RyyqD1RLnJzGws2BiSzfVKXRcM3 +QkJgwQKvI3MXOmJkcVPpqZ5QLRaopJtLj5+VxZaxtWa31f9/3ikPuC/LYrMy +ie35RhZEL6t1m+fJYmWU2Rk2RRZci/MSq+uQxdmA3ZwUEvF+pL68ky8jh42D +FN/rK8T7X5pZdfKJHEL5sPbW1hrY3N+58qtVDrn/LN3leFED9mxrtni/kcP+ +aw+u1j6rgb0Owe/gqxxORS7PkRpqwCpG4VQslzzeEDwkmvWgBkLl/tw105DH +sKGreQOpNfA84M5Ec6Q87ppW9yC51EDQwlRsK78CTudl1Yb2VgP98D7SqLAC +plfUDr7srgae8ffFnBIK+Ee/6wG5oxryB5v7mIoKKJUUElrZVA0fHl/TrKYo +4B5BrvHyh9Ww/azxQI63AvqIDMWNnq8GfeHTOjHlCih+x4lvG60a/mps+KDl +pIja3DuDuJKrwLS4JPv6dSUMO3NIXIZUCVPCNj7OTcr4oDVBpfBGOXxJ9nEO +41bF81WRsiEDD8F6Msr6K2UjOshfsR8uKoGfe3nCq05two7aTyhoUUT8/4tz +nGtSQwnOEzu+rSsA4X9UL5VNqmPKDvPSnZS7IH3+4Q4KRRNbDh7a3OeRDRka +xhtEArTQS8bohOWnm9BONjOaSdXGnHZBJ730dKBLN13W6dPB+6ddSZRjaSDA +mRux54wuTl7cn8gpdxlkT8uZ7lbVw/vXX8zz/pcIvCoeNQ4v9dCpLPl1a1c8 +HJAEm+I2PXT7biej9Dge2vkVP3B26OG12/nOiSXxkPznG1d1tx4u6RWePJYY +DwKt4U7i7/WQY4e71HeLeBA+mDQ7+JNwzxHmYn0cSJfX6/sL62PTdYm8rvIz +oM2QfBjlqY/7Q0cPbHwWC5VK+5c4fPRxX+6cIak8Fmh8dVsu+erjK6X2i0I5 +sWDe7/opL0AfU/l7X2udjgXnwxlCbw7ro3Zc78SSWSycyheP0EzQx7ba2Euv +k05BNz/J+HOpPq61e7NS+uAEhH0QbrZhM8APh87XGlOjobXF49F9DgPMzJd/ +VCMbDbIPC1h8XAb4wpXttdXaaGg/RS9p5zVAscnM5Tu9x0BRwfeajYgBct5I +ZhgdOQav95YH2KgaoLT9L9Nh1lHQHdu+3sbOAFu8mWorNlEwOZPsZJ1hgDJu +0+dm8iNgaCDH+fYNAxy4pJq+5UoEtD+qcZm6ZYDr06knik9GQN65T7szcwzw +68h/93JdIsBNytBr7L4B/lfMHrKNLwJemA/uS3xkgCXxq7HJYeFwM1XtaNuw +AcZ+OykTYh8GW3RablhrGeKXANvjz/RCwXXtVsduHUM8MrIsv08+FA7828bv +om+I7hwna8iCoXAp6Z9YP6oh6pMP8Ae8C4G+b2/3nTIzRMeBM2yWO0PAL3tE +v9rJEDXpUoIDVsFwRoj9lfxJQ3zav/fkk61B8HjGZGm+0xAHthce7s0NhJwO +lu+u14a4xnFLOSQGQny+QXtpjyFG7TVnfxYSCNYuGpn+A4Y4ODqbwsMIhLf1 +ZGrPZ0NsyYvILBoIgPHTf8NKZw3xcGThirJoAJA2sMb9yEZYmrgpOeWmP/z9 +ru/wVNoIj0pnmzbG+8PQs9I6KTkjtAiJXFg55A854QXn3ygZ4Zav53c9RX/Q +7L+milpGqNf29TPzmx+YZ0X4SiFhm54OMZofBGvqv3/tb4QHFas6nnz3hSPz +5EXvQCN8I3ftc8MbXzjexEn+dcAI894ZhHc2+kKSa+9uvlAj1FJLfkZJ9YXC ++KPvzKONcNdvyVUhE18YHno8UHnJCPU5vZqHr+wB54u2/ddYRviKI+DZIQcf +8HQ1nFeqN8JcDb5uMfABPyUZ8YpGI7x3xIn0RsMHwut+OXc+M0Kd1WXOc1w+ +cPlrat/aDiO05uD9+zTcG9oZA71Rn4jxFR5mnLXzAsYvv7e7eSkYfCSj4hbZ +A0gNW3Ib11GwiJ1jzZ9Fd/h1Tj1UToCC3ObuP4MH3SFL4fe6r8IU1OA9JvHk +ljv85xhjESpNQbKBOFufvDs8aUitSNCh4LM6PvuX2m5glvj4cqUTBa9bn1Di +2uMKZOccL5IrBS39o4PlLF1hWjFe85gbBQftyErOaq6Q22jdyvSm4CHl+wES +0y7A8fvtalsgMV8Is2Yi3gWanX8Ef4qh4OSwnWfLQ2ewVJbYxp9LxMfrf/2C +pBNUTbxQ8MujINvmuZaT7E6gzAr/U19AxCf3MiJpzBHW2HTdCSymoIrrnpmJ +OkdoCkmYbq6iIGfma61ed0dgNsymR7+koEv8t+3kvF1AcXg9/O0nBXeFNb2b +tHSAAqlTLOYkBf+eXcx5pesAYl81k69NUZC+h+z+SMoBZqPOG1n8oWDH3g0O +w1M7oeI2nM9apeDn/FoD3Ts7QWfsgZaTMBXd1mYvtK/sgE2xF442Uam4PsA2 +d+rqdmg0yeeyo1PR8zSerAvaDjvmn1zpNaWiinRR5MPN2+Fo8FzJdzMqlhbE +rFWZs4dWD5/PAnZUvOUZ/EDP1R4CjSk27j5U7HnNPlqkug2Kpj9LzZ6n4m2L +hYsjIzbALF0uPJFERfKRQZrkMxt4s1+cwn2JinVrSlKismxg8ZPdDnIaFblX +pm8+2G0DNl2seLxNRXn7yIrF19YwXnxxIrmcii7O6t5zbVtB3d/4icp7Ks7d +kS9z6bOCFEX7xbghKpok4AXHeiuY/ehrNPyBio5fGpJCs6zgsVtycdYIFQ/v +LE7iCrAChx0f08UnqHi5b8Iw+68lHDM5G8rLRkPahQLVk8qW0Cr0WmFChYbm +ewdkhS5bgFbXVw/bTTRc0zo3XxdlAVeSF9OL1GkYbKzncdLbAjy4lQX26dCw +/HqU624dC5hcjlz8QKPhwTFXVaducyB9l+7ptqWhevW7y3bi5uD/ODC+6jAN +v1dRv5+pRfh1aDzKMoKGLev9fhTkIByVCTrYF0nDpgDX0G8XEC4cD3FYiKGh +dxvHmUeeCGX0SHnTBBrOvk1wr1+DsFwT19h8g4Zu954ssR4y4crDrNk3zTT0 +iC3/8l7JFKS95b/vbaGhP1nq33+WTSBfIHdwtpWGLjEnDkz3mkDtofwmUicN +JbOy/LrOm8C/GiWX3QZo+Intv+dvftNhU2Gd5vBPGhp4u7t0tRnDk+y3flNi +xqg9beiukUWFT3YK3pESxui/7Y5d3AkqsP09tHuJbIxlVmYlazypYL6T255L +3hgPTt9cPCNNhRZ2OlVS3RgjXqQ0Bt6mQIfvHV4zpjGmFpeXlhUYwXvlA6WX +9xmjXUah4GKvASx11xSK7TdGSbNFnU31BiB9gvPujYPGaGEZaxSdZQCevbfS +80KN8az9RpvEAAP4dLYrtjbaGEOet0tsX9KHb6OGuz5dMsb6zpmXTmr6MFu4 +Oq/DMsbt5rtOmWTpwqizVXZinTF6GjSYaZ/XhYE1F7eONBjji0BhdtMwXWjw +IWdef2qMmZolq/esdOGMhBF9pY2IJ4n/7InPOrDh/IHj7UPGqLLv1tubadqg +GdDL5s9BRwllteO7ZTRBVky66PEaOlYoTKumzGvAhmbfnRLcdPz2VqZl5rUG +zMj+znm1jo6f094LWJ/TgPo+Pgt9MTreVusUkp1Vh61WeHZ1Ix2H1gU3b+5T +g70qxbw3ttGxvLXfVLVhI0S/8DqguoOOP/SXn8lnbITL/sKvKhzoGG4VvMn2 +yEZozD+W/MqFjpSSqWJt3Y0gqrpVcGUPHSuvR8uqF6pCi+pXUZ9IOsaZ/cf7 +NFsF1DfJyaveoeOm9GcxHyuUAFvfxFbkEP197g8FXFMC58CEz8w8OvamyWhI +HlWCuMKJXJciOvKovHs2x1CCoU2NKomVdFwfW2yS+koRLqnt1vj5ko75IiIW +Kr8UYEo9jVLxm45LxeaiQdvlYaADLUVm6KhB5/ZxosnD0+BfuyLm6BhYziHm +qSAPlyqsD1MW6Zh8rW/HpW9yoE5nK6nnNMFAHdoyp6Ec+FofUmgmmeA9rfMu +o/0y8DZgy/q3piboxlwzn2stBQ28c2QjMME3atd6zylKQW5xrtp1MxO04++a +zl4iQ+jkipWrlQmeKm0cCy4lA39U1emh7cR4Z1WGwkhksEpQmP/ia4KO1mHW +XyYloDZv6fPceRO8/XNdfUsLCSgWEfM2SSbodDIu3reABNWff67PvmiCRqWp +jmoJJKiQ/UC1uWKC266XGVCtSFCS8fRi1k0T/HZJnWnfKgbZyWeNt5Sa4EOn +ssemb0UhMUIwNaPHBPfNa195yisCPCLnCyZ6TXAuZ/GK+y9hSChnazQfMEHF +jRcjpHqEIf7X1OjPIRPU8typxHtbGE4GvjU1GzVBb9djJun6whDmkfl9bIFY +f1Cfu4ufELhtVkITWVPMl36/KbxJEFbe8gg0y5tiqn6U3rbLgpDt/2vQRskU +aYW1wYe9BGE0oS7KbZMpnpQXnr6+JABhbdsfHtM3Rd2rtUq2xgJwwf64bK2V +KR4zi+DgaFoP9a69y4Yhplj4NaZyw1o+8Byrb288bIpjRw35Iod4gS06O2Nz +hCke99R/LVnJC1Y3Dxo6HjNF3pQDTlJ7eOHNv+xB4XGm2NOd+Hb5CQ+M+2oP +lqeborux1tLkeW6QOnSuTvupKXJZRz/xsuSCS6v7jJKaTDHzTusjhgoXcFyx +Kv/23BSZlBxPGy4uGK/hKspuM0X28qLUHy/WQD1bfIZwjymetuzbusV6Dbhd +jY3689UUbaNn2nRdOSGj4ZjR43UM3F60dxqvscN6+93lZAEGbhB48c0vmh1i +P9G0ojYwsDGFFvvQmx0CuRaUdcUYyEfvfcVSZwfq9kjRXFkGNuTLUFKa2KBv +OGzmrB4D7w2sbXWbXmWK8QWVb3Nh4K0fJz7cY19h5lmciP69m4EhB3ue3+ta +ZuqfuGSR5sHA/licWbi9zLT/XdY7sIeBynkxphdNlpkJfXN/9wYx8M9LV/3Q +6CXmQu4p8+jTDHzf98qbtXaR+d4kraegmIGjVOMyNed5ZuCRvFvWpQzcTO4/ +Gao1z/xTWu3/s4yB1F6/oMU180xhxYF5vRoGfnmZxt1X9YdpyyMj/egpA01y +R0VzxP8wG98W+PX0MrBrIx9JZ2yWaSNQqxU5wMCjO6ayjj6fZQ5safsjMchA +r6ljoqt3Zpmz9T/Oe31iYHvhO9tnLrNMrRzdB2PjDLRWINVsaJ9hNr43i0ye +YKB+xpUD1HszTBvRXaDzm4H2l4VVM+JnmPvOHXkdMcdAz34R67U4w5x9mnBD +fIGBT0Z3rQjLzjDPLKbvrV9kIFeJiIPr8jRzg2GRpucKA9fNTP/qfT/NzDpU +P7e6ysC7FzYcT6qbZv4PkgsXuw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lc0XAHBLshSyXVz7Wvb93uty7zmIsqSSLXsiKiFE0aJIiZJUaBFC +RLJfWxsl5EXJUrwtlKIkW2R5/Z7fX8/n+5nPzJyZOWfmUfANcfDnYGNjK2Nn +Y/v/98+HtufKSXnMTYITip0/7ZlvsySOmQ2cgYvvv1Qpe2kCinX5SgxcgQNq +zds+e5pC5I77/ZwDuaCbT9Yo8bQDoV/iV/72VwB/l+sHC08P+NhoHzLb3wSW +7G69A+5BYKU8/u9U/xs4NPY9ZKvzcfjbT732u38Y3nfoMuUwGZot7uW9zp2B +WwPs3TS+2yD9sW7UV3MFBEIFu8pl8kE0yPs+twUnFltpfysRK4YrelYN9k48 +qNVzcgAOlYHO4O4tjEAebJmJKzCNKoOO+EM9GjE8uHWPd5DB6TJYO3D1B08O +D477LPQIXCuDmJMjUs0/eTDlp1TT8cYy8HsVe5waz4uh3ldz9PnKgeLfwJCv +5MMlulvQTHY5vMvQfTq1gR976F9TGA0VcKOnWDBShR9VdNtOuzyvADeBjd6L +xvxYsriav/+fChiKk/mPYy8/GhhExER+rIBPwXymotX8uLWSm6TPWQnfN39h +UXYLoNbghgVt60pY+J3+MCZHEG3tdFd0uiqhTkNkdbVaECest3Ta9ldC9L5L +9vHtgvjkTkiy98dKWB6Mn0ieEcQtgazW4MlKiB2pFetS3IAqWCSoKVgF8Z35 +uz5FbMAONklP+W1VkJR3qotDUgjL+YItvjZVgY3hfmExJSGUhrUZ79uqgOe5 +g9NGLSH0epD252U30X9EZdDWTAj3BVj+c+FDFRxX7Bi9ul8Is5/KPS/7WwXB +2RL/qdYLIbPyP7YT2tWw81a5pq27MCrYm/MIXamGDZo3Qzz9hTGQr22UK6Ma +OhviK0JChHHY9WzN9O1qsBl0oV2NE8aKoz0bq4qqwZz8n8W/xcLYKmlr1fe0 +GgwzbNxDlon2u5Oq6RPVIH51JDHttgiq3y+Q5DOrAQmN6viFAhFkaA8+vmdZ +A+SmhFOeZSIYQOr1YNrUgOxvtSMbm0XQduFGnPOuGlCxC/Vp+C6Cp+xaYvX9 +a8BgzQplxEAU8+3kAzPP1YDhzU69rQxRvObuXNaSVAMU/WzNB1aiyDn5d/Zn +Sg3QfSwUo3aLIjP+d4RyRg2YNSbyrzslikOJem5QWAPbI0hf9NtFsesuklVe +1sCOdd8/pPeIYkRTodtwew045Na9Wx4SRbme8qyMzhpw7vboapkUxemXEwa/ +e2vAU/NuvZuYGDq4PLlr+6UGDn7RST3jI4aTXrlqVas1cM7Rmvnmjxhu5G7h +3qnHAnJVJ5mDnYR1s0OthwxZUCriOK+3joTm85tDz1BZ0PfGqyxVjoQxY+JR +aQwWKO+MUNy5lYR7vhokOlqzoGnbnbXdmSRc8LeZ2uXNAucHyiOrd0m4Znta +7eQeFoyvv/9Ep5SEpOmw43F+LBDqqDqa0kRC4zhFtrT9LPCxaR+3/0HCx9SD +Sg7hLFixmuv8x1Qct04KWjucZcHlgujiFStxtOwZuRl8jph/Ldt5rZ3i+LFz +misukQV2L/jMLvqLY+b8qurViyy4YSFfaXdJHKUDwrpdrrFA+25+yvEMcSSP +3tpglE7Ey6ERVJIrjs/SxyP5Mlkw9sxIZT1LHC00Kx7dvsUCGtqmv/oojk3K +agf33WVBx53u8KUxcdx84JwIVz4R76rTDo1ZcXywPD91s4AF5x778CbxSODs +HsfdFUXEfplGxtjoSaCbee36Mw9ZcODWkku0iQQe77LJHi4j1rcUa3jfUgIZ +vR+jTSqI9TQkTfC6SaD3nrf8fVUsCDfO8W47I4HrvcTHSutYYJMtMGubLIEK +fhzvHtezQJH7+PnOaxI40ndAprWBBd1vnct7CiWQW4tW3PKIBYUmzy2dKySQ +tmffQsNjFpzK1Xs/0CCBWnfycu4/IfYjdD3nh04J/BzDuSHiGQu4+o+l+wwQ +8exZ886+iQVDjG8aI58lkO9dL5dSMwuS1jU5fp+VQGnb9ius5yz4XhBVME2W +xPHY6vLUlyx4wv+VfkRZEnndRrqprSy4HuHQNa8lidd3ju/tJ2xprrWwjJLY +29g4wdHOAumiG8mnbCSxOLv4+yXCs4I8ChyOkph0st5b9BULcv8dtuYOkMRE +0dvt6zpYcGzzjg+JoZL4h+9+0wnCO4ofha2PlkSbcGsYI7xJWIM7JU4Sde5n +mdv/w4LVoxk3hS5K4pb6rs4Swn0fuXSvXpfEp7u5Rtd0EvltFf6clC2Ji98O +XHAmfPbBJ9fMIkkkH9R+nEPYQ9R+QqpSEvMuxsaNEjaIaTid1SiJEreuDil3 +sYBveBNJoUUSM85kv/IgPLz1+v27XZLo2T7kcIlw3UNOUH0niYHp8RF1hC+T +DvcUDkuiYEGv/gfCgSc+BGj8lMSUrRsuLxOGL7bLD+Yk8a5f1CXRbhaQbOsu +665KIt/hHbqqhCfKVVUqechIDh+J0iP8XOJqnZEwGT2XowMohG+dYrevlSKj +wCY/diPC4aPBw3QVMt7K+LVFi7DNtqHIR9pk9DgSxJAjrFhlvQ5pZPwQoP+F +j/BfMutOkxkZyzLTmb+JeLpPKxta2pLxYfmcfRfhe99TW186Eu2vC8ULCZ/c +vuph40XGpTTBm9GEnWuCpjoCyNjHkzRoRVhL5v3Z7YfJOFV5cnA94TXxW8hv +oskoeGHH7Q5iP4fGq0od48no/ytQKYHwhdqU/t3pZNTkkUoYJc5rj9zKwaFs +Yj3XUwMuEqYlHGDzvk9GLi8ecW3C33ZZqvk9IqPX1fYxD+L8H9dXPBptIePP +cS7hH0T+XFeQd9jfTcZBKwXhcMKbJxejg0fImMiauhtK5NuxrVfVn/0kY2hp +D8dYG5EPOVrvRf4Q+/U4NdadsISjj3EdjxRufqA+rE3k77YHf7+vE5bCXFJX +ewqR72fWpmV4SUlh4v3hwfEWFvysfTHPqS2FOtHsp1NesEBB2PueM1UKi5dH +Jd8R9eJ8cMG5CKXwtP7vL9KEn8po1NjvkkLRaZpUGlFvaWcuR2QelcL8g3nb +6ER9tg6qKf88LYV/n2Q2OhH1u2zY3MNMkkLSxInDB4n63vdtTv/LbSnsD5Zl +nSXqn27nPqXdLIWOrqcWjrCIfBRTDX7OL41pXKKXt5SyQDzkiYy4uDQauLmm +8Dwg7stW13/2y0ujIStzpbmYBTXRSZqCBtKYOpShp07cXxc+/h7f7SqNYc/T +zKqI+0+/qCFgMlcadRofujwj7s8ADidx8xJp1E4jJ6hfJ/LP/VfL1WppjKHt +s790lQVrBRRU6a3SuDXoGssylQXvwxK+xE9I4w1KgHHEBRacNt25h0yTQQ/a +28A3MSzY6pU1TTWXwWROanjjMRYIxP6Ic7Ij2jdauWRHEeM3ny247COD/qIT +9U7E+1BrU/9jbaIMlsgFOUcdYMFvV6XImXcyWNXjKZbpwgJWdCi30BcZrC2i +hCk6Efl661GG9i8ZFOVhjeQ7sGD9J5eG/RyyqD1RLnJzGws2BiSzfVKXRcM3 +QkJgwQKvI3MXOmJkcVPpqZ5QLRaopJtLj5+VxZaxtWa31f9/3ikPuC/LYrMy +ie35RhZEL6t1m+fJYmWU2Rk2RRZci/MSq+uQxdmA3ZwUEvF+pL68ky8jh42D +FN/rK8T7X5pZdfKJHEL5sPbW1hrY3N+58qtVDrn/LN3leFED9mxrtni/kcP+ +aw+u1j6rgb0Owe/gqxxORS7PkRpqwCpG4VQslzzeEDwkmvWgBkLl/tw105DH +sKGreQOpNfA84M5Ec6Q87ppW9yC51EDQwlRsK78CTudl1Yb2VgP98D7SqLAC +plfUDr7srgae8ffFnBIK+Ee/6wG5oxryB5v7mIoKKJUUElrZVA0fHl/TrKYo +4B5BrvHyh9Ww/azxQI63AvqIDMWNnq8GfeHTOjHlCih+x4lvG60a/mps+KDl +pIja3DuDuJKrwLS4JPv6dSUMO3NIXIZUCVPCNj7OTcr4oDVBpfBGOXxJ9nEO +41bF81WRsiEDD8F6Msr6K2UjOshfsR8uKoGfe3nCq05two7aTyhoUUT8/4tz +nGtSQwnOEzu+rSsA4X9UL5VNqmPKDvPSnZS7IH3+4Q4KRRNbDh7a3OeRDRka +xhtEArTQS8bohOWnm9BONjOaSdXGnHZBJ730dKBLN13W6dPB+6ddSZRjaSDA +mRux54wuTl7cn8gpdxlkT8uZ7lbVw/vXX8zz/pcIvCoeNQ4v9dCpLPl1a1c8 +HJAEm+I2PXT7biej9Dge2vkVP3B26OG12/nOiSXxkPznG1d1tx4u6RWePJYY +DwKt4U7i7/WQY4e71HeLeBA+mDQ7+JNwzxHmYn0cSJfX6/sL62PTdYm8rvIz +oM2QfBjlqY/7Q0cPbHwWC5VK+5c4fPRxX+6cIak8Fmh8dVsu+erjK6X2i0I5 +sWDe7/opL0AfU/l7X2udjgXnwxlCbw7ro3Zc78SSWSycyheP0EzQx7ba2Euv +k05BNz/J+HOpPq61e7NS+uAEhH0QbrZhM8APh87XGlOjobXF49F9DgPMzJd/ +VCMbDbIPC1h8XAb4wpXttdXaaGg/RS9p5zVAscnM5Tu9x0BRwfeajYgBct5I +ZhgdOQav95YH2KgaoLT9L9Nh1lHQHdu+3sbOAFu8mWorNlEwOZPsZJ1hgDJu +0+dm8iNgaCDH+fYNAxy4pJq+5UoEtD+qcZm6ZYDr06knik9GQN65T7szcwzw +68h/93JdIsBNytBr7L4B/lfMHrKNLwJemA/uS3xkgCXxq7HJYeFwM1XtaNuw +AcZ+OykTYh8GW3RablhrGeKXANvjz/RCwXXtVsduHUM8MrIsv08+FA7828bv +om+I7hwna8iCoXAp6Z9YP6oh6pMP8Ae8C4G+b2/3nTIzRMeBM2yWO0PAL3tE +v9rJEDXpUoIDVsFwRoj9lfxJQ3zav/fkk61B8HjGZGm+0xAHthce7s0NhJwO +lu+u14a4xnFLOSQGQny+QXtpjyFG7TVnfxYSCNYuGpn+A4Y4ODqbwsMIhLf1 +ZGrPZ0NsyYvILBoIgPHTf8NKZw3xcGThirJoAJA2sMb9yEZYmrgpOeWmP/z9 +ru/wVNoIj0pnmzbG+8PQs9I6KTkjtAiJXFg55A854QXn3ygZ4Zav53c9RX/Q +7L+milpGqNf29TPzmx+YZ0X4SiFhm54OMZofBGvqv3/tb4QHFas6nnz3hSPz +5EXvQCN8I3ftc8MbXzjexEn+dcAI894ZhHc2+kKSa+9uvlAj1FJLfkZJ9YXC ++KPvzKONcNdvyVUhE18YHno8UHnJCPU5vZqHr+wB54u2/ddYRviKI+DZIQcf +8HQ1nFeqN8JcDb5uMfABPyUZ8YpGI7x3xIn0RsMHwut+OXc+M0Kd1WXOc1w+ +cPlrat/aDiO05uD9+zTcG9oZA71Rn4jxFR5mnLXzAsYvv7e7eSkYfCSj4hbZ +A0gNW3Ib11GwiJ1jzZ9Fd/h1Tj1UToCC3ObuP4MH3SFL4fe6r8IU1OA9JvHk +ljv85xhjESpNQbKBOFufvDs8aUitSNCh4LM6PvuX2m5glvj4cqUTBa9bn1Di +2uMKZOccL5IrBS39o4PlLF1hWjFe85gbBQftyErOaq6Q22jdyvSm4CHl+wES +0y7A8fvtalsgMV8Is2Yi3gWanX8Ef4qh4OSwnWfLQ2ewVJbYxp9LxMfrf/2C +pBNUTbxQ8MujINvmuZaT7E6gzAr/U19AxCf3MiJpzBHW2HTdCSymoIrrnpmJ +OkdoCkmYbq6iIGfma61ed0dgNsymR7+koEv8t+3kvF1AcXg9/O0nBXeFNb2b +tHSAAqlTLOYkBf+eXcx5pesAYl81k69NUZC+h+z+SMoBZqPOG1n8oWDH3g0O +w1M7oeI2nM9apeDn/FoD3Ts7QWfsgZaTMBXd1mYvtK/sgE2xF442Uam4PsA2 +d+rqdmg0yeeyo1PR8zSerAvaDjvmn1zpNaWiinRR5MPN2+Fo8FzJdzMqlhbE +rFWZs4dWD5/PAnZUvOUZ/EDP1R4CjSk27j5U7HnNPlqkug2Kpj9LzZ6n4m2L +hYsjIzbALF0uPJFERfKRQZrkMxt4s1+cwn2JinVrSlKismxg8ZPdDnIaFblX +pm8+2G0DNl2seLxNRXn7yIrF19YwXnxxIrmcii7O6t5zbVtB3d/4icp7Ks7d +kS9z6bOCFEX7xbghKpok4AXHeiuY/ehrNPyBio5fGpJCs6zgsVtycdYIFQ/v +LE7iCrAChx0f08UnqHi5b8Iw+68lHDM5G8rLRkPahQLVk8qW0Cr0WmFChYbm +ewdkhS5bgFbXVw/bTTRc0zo3XxdlAVeSF9OL1GkYbKzncdLbAjy4lQX26dCw +/HqU624dC5hcjlz8QKPhwTFXVaducyB9l+7ptqWhevW7y3bi5uD/ODC+6jAN +v1dRv5+pRfh1aDzKMoKGLev9fhTkIByVCTrYF0nDpgDX0G8XEC4cD3FYiKGh +dxvHmUeeCGX0SHnTBBrOvk1wr1+DsFwT19h8g4Zu954ssR4y4crDrNk3zTT0 +iC3/8l7JFKS95b/vbaGhP1nq33+WTSBfIHdwtpWGLjEnDkz3mkDtofwmUicN +JbOy/LrOm8C/GiWX3QZo+Intv+dvftNhU2Gd5vBPGhp4u7t0tRnDk+y3flNi +xqg9beiukUWFT3YK3pESxui/7Y5d3AkqsP09tHuJbIxlVmYlazypYL6T255L +3hgPTt9cPCNNhRZ2OlVS3RgjXqQ0Bt6mQIfvHV4zpjGmFpeXlhUYwXvlA6WX +9xmjXUah4GKvASx11xSK7TdGSbNFnU31BiB9gvPujYPGaGEZaxSdZQCevbfS +80KN8az9RpvEAAP4dLYrtjbaGEOet0tsX9KHb6OGuz5dMsb6zpmXTmr6MFu4 +Oq/DMsbt5rtOmWTpwqizVXZinTF6GjSYaZ/XhYE1F7eONBjji0BhdtMwXWjw +IWdef2qMmZolq/esdOGMhBF9pY2IJ4n/7InPOrDh/IHj7UPGqLLv1tubadqg +GdDL5s9BRwllteO7ZTRBVky66PEaOlYoTKumzGvAhmbfnRLcdPz2VqZl5rUG +zMj+znm1jo6f094LWJ/TgPo+Pgt9MTreVusUkp1Vh61WeHZ1Ix2H1gU3b+5T +g70qxbw3ttGxvLXfVLVhI0S/8DqguoOOP/SXn8lnbITL/sKvKhzoGG4VvMn2 +yEZozD+W/MqFjpSSqWJt3Y0gqrpVcGUPHSuvR8uqF6pCi+pXUZ9IOsaZ/cf7 +NFsF1DfJyaveoeOm9GcxHyuUAFvfxFbkEP197g8FXFMC58CEz8w8OvamyWhI +HlWCuMKJXJciOvKovHs2x1CCoU2NKomVdFwfW2yS+koRLqnt1vj5ko75IiIW +Kr8UYEo9jVLxm45LxeaiQdvlYaADLUVm6KhB5/ZxosnD0+BfuyLm6BhYziHm +qSAPlyqsD1MW6Zh8rW/HpW9yoE5nK6nnNMFAHdoyp6Ec+FofUmgmmeA9rfMu +o/0y8DZgy/q3piboxlwzn2stBQ28c2QjMME3atd6zylKQW5xrtp1MxO04++a +zl4iQ+jkipWrlQmeKm0cCy4lA39U1emh7cR4Z1WGwkhksEpQmP/ia4KO1mHW +XyYloDZv6fPceRO8/XNdfUsLCSgWEfM2SSbodDIu3reABNWff67PvmiCRqWp +jmoJJKiQ/UC1uWKC266XGVCtSFCS8fRi1k0T/HZJnWnfKgbZyWeNt5Sa4EOn +ssemb0UhMUIwNaPHBPfNa195yisCPCLnCyZ6TXAuZ/GK+y9hSChnazQfMEHF +jRcjpHqEIf7X1OjPIRPU8typxHtbGE4GvjU1GzVBb9djJun6whDmkfl9bIFY +f1Cfu4ufELhtVkITWVPMl36/KbxJEFbe8gg0y5tiqn6U3rbLgpDt/2vQRskU +aYW1wYe9BGE0oS7KbZMpnpQXnr6+JABhbdsfHtM3Rd2rtUq2xgJwwf64bK2V +KR4zi+DgaFoP9a69y4Yhplj4NaZyw1o+8Byrb288bIpjRw35Iod4gS06O2Nz +hCke99R/LVnJC1Y3Dxo6HjNF3pQDTlJ7eOHNv+xB4XGm2NOd+Hb5CQ+M+2oP +lqeborux1tLkeW6QOnSuTvupKXJZRz/xsuSCS6v7jJKaTDHzTusjhgoXcFyx +Kv/23BSZlBxPGy4uGK/hKspuM0X28qLUHy/WQD1bfIZwjymetuzbusV6Dbhd +jY3689UUbaNn2nRdOSGj4ZjR43UM3F60dxqvscN6+93lZAEGbhB48c0vmh1i +P9G0ojYwsDGFFvvQmx0CuRaUdcUYyEfvfcVSZwfq9kjRXFkGNuTLUFKa2KBv +OGzmrB4D7w2sbXWbXmWK8QWVb3Nh4K0fJz7cY19h5lmciP69m4EhB3ue3+ta +ZuqfuGSR5sHA/licWbi9zLT/XdY7sIeBynkxphdNlpkJfXN/9wYx8M9LV/3Q +6CXmQu4p8+jTDHzf98qbtXaR+d4kraegmIGjVOMyNed5ZuCRvFvWpQzcTO4/ +Gao1z/xTWu3/s4yB1F6/oMU180xhxYF5vRoGfnmZxt1X9YdpyyMj/egpA01y +R0VzxP8wG98W+PX0MrBrIx9JZ2yWaSNQqxU5wMCjO6ayjj6fZQ5safsjMchA +r6ljoqt3Zpmz9T/Oe31iYHvhO9tnLrNMrRzdB2PjDLRWINVsaJ9hNr43i0ye +YKB+xpUD1HszTBvRXaDzm4H2l4VVM+JnmPvOHXkdMcdAz34R67U4w5x9mnBD +fIGBT0Z3rQjLzjDPLKbvrV9kIFeJiIPr8jRzg2GRpucKA9fNTP/qfT/NzDpU +P7e6ysC7FzYcT6qbZv4PkgsXuw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0930208208692291}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0930208208692291}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lc0XAHBLshSyXVz7Wvb93uty7zmIsqSSLXsiKiFE0aJIiZJUaBFC +RLJfWxsl5EXJUrwtlKIkW2R5/Z7fX8/n+5nPzJyZOWfmUfANcfDnYGNjK2Nn +Y/v/98+HtufKSXnMTYITip0/7ZlvsySOmQ2cgYvvv1Qpe2kCinX5SgxcgQNq +zds+e5pC5I77/ZwDuaCbT9Yo8bQDoV/iV/72VwB/l+sHC08P+NhoHzLb3wSW +7G69A+5BYKU8/u9U/xs4NPY9ZKvzcfjbT732u38Y3nfoMuUwGZot7uW9zp2B +WwPs3TS+2yD9sW7UV3MFBEIFu8pl8kE0yPs+twUnFltpfysRK4YrelYN9k48 +qNVzcgAOlYHO4O4tjEAebJmJKzCNKoOO+EM9GjE8uHWPd5DB6TJYO3D1B08O +D477LPQIXCuDmJMjUs0/eTDlp1TT8cYy8HsVe5waz4uh3ldz9PnKgeLfwJCv +5MMlulvQTHY5vMvQfTq1gR976F9TGA0VcKOnWDBShR9VdNtOuzyvADeBjd6L +xvxYsriav/+fChiKk/mPYy8/GhhExER+rIBPwXymotX8uLWSm6TPWQnfN39h +UXYLoNbghgVt60pY+J3+MCZHEG3tdFd0uiqhTkNkdbVaECest3Ta9ldC9L5L +9vHtgvjkTkiy98dKWB6Mn0ieEcQtgazW4MlKiB2pFetS3IAqWCSoKVgF8Z35 +uz5FbMAONklP+W1VkJR3qotDUgjL+YItvjZVgY3hfmExJSGUhrUZ79uqgOe5 +g9NGLSH0epD252U30X9EZdDWTAj3BVj+c+FDFRxX7Bi9ul8Is5/KPS/7WwXB +2RL/qdYLIbPyP7YT2tWw81a5pq27MCrYm/MIXamGDZo3Qzz9hTGQr22UK6Ma +OhviK0JChHHY9WzN9O1qsBl0oV2NE8aKoz0bq4qqwZz8n8W/xcLYKmlr1fe0 +GgwzbNxDlon2u5Oq6RPVIH51JDHttgiq3y+Q5DOrAQmN6viFAhFkaA8+vmdZ +A+SmhFOeZSIYQOr1YNrUgOxvtSMbm0XQduFGnPOuGlCxC/Vp+C6Cp+xaYvX9 +a8BgzQplxEAU8+3kAzPP1YDhzU69rQxRvObuXNaSVAMU/WzNB1aiyDn5d/Zn +Sg3QfSwUo3aLIjP+d4RyRg2YNSbyrzslikOJem5QWAPbI0hf9NtFsesuklVe +1sCOdd8/pPeIYkRTodtwew045Na9Wx4SRbme8qyMzhpw7vboapkUxemXEwa/ +e2vAU/NuvZuYGDq4PLlr+6UGDn7RST3jI4aTXrlqVas1cM7Rmvnmjxhu5G7h +3qnHAnJVJ5mDnYR1s0OthwxZUCriOK+3joTm85tDz1BZ0PfGqyxVjoQxY+JR +aQwWKO+MUNy5lYR7vhokOlqzoGnbnbXdmSRc8LeZ2uXNAucHyiOrd0m4Znta +7eQeFoyvv/9Ep5SEpOmw43F+LBDqqDqa0kRC4zhFtrT9LPCxaR+3/0HCx9SD +Sg7hLFixmuv8x1Qct04KWjucZcHlgujiFStxtOwZuRl8jph/Ldt5rZ3i+LFz +misukQV2L/jMLvqLY+b8qurViyy4YSFfaXdJHKUDwrpdrrFA+25+yvEMcSSP +3tpglE7Ey6ERVJIrjs/SxyP5Mlkw9sxIZT1LHC00Kx7dvsUCGtqmv/oojk3K +agf33WVBx53u8KUxcdx84JwIVz4R76rTDo1ZcXywPD91s4AF5x778CbxSODs +HsfdFUXEfplGxtjoSaCbee36Mw9ZcODWkku0iQQe77LJHi4j1rcUa3jfUgIZ +vR+jTSqI9TQkTfC6SaD3nrf8fVUsCDfO8W47I4HrvcTHSutYYJMtMGubLIEK +fhzvHtezQJH7+PnOaxI40ndAprWBBd1vnct7CiWQW4tW3PKIBYUmzy2dKySQ +tmffQsNjFpzK1Xs/0CCBWnfycu4/IfYjdD3nh04J/BzDuSHiGQu4+o+l+wwQ +8exZ886+iQVDjG8aI58lkO9dL5dSMwuS1jU5fp+VQGnb9ius5yz4XhBVME2W +xPHY6vLUlyx4wv+VfkRZEnndRrqprSy4HuHQNa8lidd3ju/tJ2xprrWwjJLY +29g4wdHOAumiG8mnbCSxOLv4+yXCs4I8ChyOkph0st5b9BULcv8dtuYOkMRE +0dvt6zpYcGzzjg+JoZL4h+9+0wnCO4ofha2PlkSbcGsYI7xJWIM7JU4Sde5n +mdv/w4LVoxk3hS5K4pb6rs4Swn0fuXSvXpfEp7u5Rtd0EvltFf6clC2Ji98O +XHAmfPbBJ9fMIkkkH9R+nEPYQ9R+QqpSEvMuxsaNEjaIaTid1SiJEreuDil3 +sYBveBNJoUUSM85kv/IgPLz1+v27XZLo2T7kcIlw3UNOUH0niYHp8RF1hC+T +DvcUDkuiYEGv/gfCgSc+BGj8lMSUrRsuLxOGL7bLD+Yk8a5f1CXRbhaQbOsu +665KIt/hHbqqhCfKVVUqechIDh+J0iP8XOJqnZEwGT2XowMohG+dYrevlSKj +wCY/diPC4aPBw3QVMt7K+LVFi7DNtqHIR9pk9DgSxJAjrFhlvQ5pZPwQoP+F +j/BfMutOkxkZyzLTmb+JeLpPKxta2pLxYfmcfRfhe99TW186Eu2vC8ULCZ/c +vuph40XGpTTBm9GEnWuCpjoCyNjHkzRoRVhL5v3Z7YfJOFV5cnA94TXxW8hv +oskoeGHH7Q5iP4fGq0od48no/ytQKYHwhdqU/t3pZNTkkUoYJc5rj9zKwaFs +Yj3XUwMuEqYlHGDzvk9GLi8ecW3C33ZZqvk9IqPX1fYxD+L8H9dXPBptIePP +cS7hH0T+XFeQd9jfTcZBKwXhcMKbJxejg0fImMiauhtK5NuxrVfVn/0kY2hp +D8dYG5EPOVrvRf4Q+/U4NdadsISjj3EdjxRufqA+rE3k77YHf7+vE5bCXFJX +ewqR72fWpmV4SUlh4v3hwfEWFvysfTHPqS2FOtHsp1NesEBB2PueM1UKi5dH +Jd8R9eJ8cMG5CKXwtP7vL9KEn8po1NjvkkLRaZpUGlFvaWcuR2QelcL8g3nb +6ER9tg6qKf88LYV/n2Q2OhH1u2zY3MNMkkLSxInDB4n63vdtTv/LbSnsD5Zl +nSXqn27nPqXdLIWOrqcWjrCIfBRTDX7OL41pXKKXt5SyQDzkiYy4uDQauLmm +8Dwg7stW13/2y0ujIStzpbmYBTXRSZqCBtKYOpShp07cXxc+/h7f7SqNYc/T +zKqI+0+/qCFgMlcadRofujwj7s8ADidx8xJp1E4jJ6hfJ/LP/VfL1WppjKHt +s790lQVrBRRU6a3SuDXoGssylQXvwxK+xE9I4w1KgHHEBRacNt25h0yTQQ/a +28A3MSzY6pU1TTWXwWROanjjMRYIxP6Ic7Ij2jdauWRHEeM3ny247COD/qIT +9U7E+1BrU/9jbaIMlsgFOUcdYMFvV6XImXcyWNXjKZbpwgJWdCi30BcZrC2i +hCk6Efl661GG9i8ZFOVhjeQ7sGD9J5eG/RyyqD1RLnJzGws2BiSzfVKXRcM3 +QkJgwQKvI3MXOmJkcVPpqZ5QLRaopJtLj5+VxZaxtWa31f9/3ikPuC/LYrMy +ie35RhZEL6t1m+fJYmWU2Rk2RRZci/MSq+uQxdmA3ZwUEvF+pL68ky8jh42D +FN/rK8T7X5pZdfKJHEL5sPbW1hrY3N+58qtVDrn/LN3leFED9mxrtni/kcP+ +aw+u1j6rgb0Owe/gqxxORS7PkRpqwCpG4VQslzzeEDwkmvWgBkLl/tw105DH +sKGreQOpNfA84M5Ec6Q87ppW9yC51EDQwlRsK78CTudl1Yb2VgP98D7SqLAC +plfUDr7srgae8ffFnBIK+Ee/6wG5oxryB5v7mIoKKJUUElrZVA0fHl/TrKYo +4B5BrvHyh9Ww/azxQI63AvqIDMWNnq8GfeHTOjHlCih+x4lvG60a/mps+KDl +pIja3DuDuJKrwLS4JPv6dSUMO3NIXIZUCVPCNj7OTcr4oDVBpfBGOXxJ9nEO +41bF81WRsiEDD8F6Msr6K2UjOshfsR8uKoGfe3nCq05two7aTyhoUUT8/4tz +nGtSQwnOEzu+rSsA4X9UL5VNqmPKDvPSnZS7IH3+4Q4KRRNbDh7a3OeRDRka +xhtEArTQS8bohOWnm9BONjOaSdXGnHZBJ730dKBLN13W6dPB+6ddSZRjaSDA +mRux54wuTl7cn8gpdxlkT8uZ7lbVw/vXX8zz/pcIvCoeNQ4v9dCpLPl1a1c8 +HJAEm+I2PXT7biej9Dge2vkVP3B26OG12/nOiSXxkPznG1d1tx4u6RWePJYY +DwKt4U7i7/WQY4e71HeLeBA+mDQ7+JNwzxHmYn0cSJfX6/sL62PTdYm8rvIz +oM2QfBjlqY/7Q0cPbHwWC5VK+5c4fPRxX+6cIak8Fmh8dVsu+erjK6X2i0I5 +sWDe7/opL0AfU/l7X2udjgXnwxlCbw7ro3Zc78SSWSycyheP0EzQx7ba2Euv +k05BNz/J+HOpPq61e7NS+uAEhH0QbrZhM8APh87XGlOjobXF49F9DgPMzJd/ +VCMbDbIPC1h8XAb4wpXttdXaaGg/RS9p5zVAscnM5Tu9x0BRwfeajYgBct5I +ZhgdOQav95YH2KgaoLT9L9Nh1lHQHdu+3sbOAFu8mWorNlEwOZPsZJ1hgDJu +0+dm8iNgaCDH+fYNAxy4pJq+5UoEtD+qcZm6ZYDr06knik9GQN65T7szcwzw +68h/93JdIsBNytBr7L4B/lfMHrKNLwJemA/uS3xkgCXxq7HJYeFwM1XtaNuw +AcZ+OykTYh8GW3RablhrGeKXANvjz/RCwXXtVsduHUM8MrIsv08+FA7828bv +om+I7hwna8iCoXAp6Z9YP6oh6pMP8Ae8C4G+b2/3nTIzRMeBM2yWO0PAL3tE +v9rJEDXpUoIDVsFwRoj9lfxJQ3zav/fkk61B8HjGZGm+0xAHthce7s0NhJwO +lu+u14a4xnFLOSQGQny+QXtpjyFG7TVnfxYSCNYuGpn+A4Y4ODqbwsMIhLf1 +ZGrPZ0NsyYvILBoIgPHTf8NKZw3xcGThirJoAJA2sMb9yEZYmrgpOeWmP/z9 +ru/wVNoIj0pnmzbG+8PQs9I6KTkjtAiJXFg55A854QXn3ygZ4Zav53c9RX/Q +7L+milpGqNf29TPzmx+YZ0X4SiFhm54OMZofBGvqv3/tb4QHFas6nnz3hSPz +5EXvQCN8I3ftc8MbXzjexEn+dcAI894ZhHc2+kKSa+9uvlAj1FJLfkZJ9YXC ++KPvzKONcNdvyVUhE18YHno8UHnJCPU5vZqHr+wB54u2/ddYRviKI+DZIQcf +8HQ1nFeqN8JcDb5uMfABPyUZ8YpGI7x3xIn0RsMHwut+OXc+M0Kd1WXOc1w+ +cPlrat/aDiO05uD9+zTcG9oZA71Rn4jxFR5mnLXzAsYvv7e7eSkYfCSj4hbZ +A0gNW3Ib11GwiJ1jzZ9Fd/h1Tj1UToCC3ObuP4MH3SFL4fe6r8IU1OA9JvHk +ljv85xhjESpNQbKBOFufvDs8aUitSNCh4LM6PvuX2m5glvj4cqUTBa9bn1Di +2uMKZOccL5IrBS39o4PlLF1hWjFe85gbBQftyErOaq6Q22jdyvSm4CHl+wES +0y7A8fvtalsgMV8Is2Yi3gWanX8Ef4qh4OSwnWfLQ2ewVJbYxp9LxMfrf/2C +pBNUTbxQ8MujINvmuZaT7E6gzAr/U19AxCf3MiJpzBHW2HTdCSymoIrrnpmJ +OkdoCkmYbq6iIGfma61ed0dgNsymR7+koEv8t+3kvF1AcXg9/O0nBXeFNb2b +tHSAAqlTLOYkBf+eXcx5pesAYl81k69NUZC+h+z+SMoBZqPOG1n8oWDH3g0O +w1M7oeI2nM9apeDn/FoD3Ts7QWfsgZaTMBXd1mYvtK/sgE2xF442Uam4PsA2 +d+rqdmg0yeeyo1PR8zSerAvaDjvmn1zpNaWiinRR5MPN2+Fo8FzJdzMqlhbE +rFWZs4dWD5/PAnZUvOUZ/EDP1R4CjSk27j5U7HnNPlqkug2Kpj9LzZ6n4m2L +hYsjIzbALF0uPJFERfKRQZrkMxt4s1+cwn2JinVrSlKismxg8ZPdDnIaFblX +pm8+2G0DNl2seLxNRXn7yIrF19YwXnxxIrmcii7O6t5zbVtB3d/4icp7Ks7d +kS9z6bOCFEX7xbghKpok4AXHeiuY/ehrNPyBio5fGpJCs6zgsVtycdYIFQ/v +LE7iCrAChx0f08UnqHi5b8Iw+68lHDM5G8rLRkPahQLVk8qW0Cr0WmFChYbm +ewdkhS5bgFbXVw/bTTRc0zo3XxdlAVeSF9OL1GkYbKzncdLbAjy4lQX26dCw +/HqU624dC5hcjlz8QKPhwTFXVaducyB9l+7ptqWhevW7y3bi5uD/ODC+6jAN +v1dRv5+pRfh1aDzKMoKGLev9fhTkIByVCTrYF0nDpgDX0G8XEC4cD3FYiKGh +dxvHmUeeCGX0SHnTBBrOvk1wr1+DsFwT19h8g4Zu954ssR4y4crDrNk3zTT0 +iC3/8l7JFKS95b/vbaGhP1nq33+WTSBfIHdwtpWGLjEnDkz3mkDtofwmUicN +JbOy/LrOm8C/GiWX3QZo+Intv+dvftNhU2Gd5vBPGhp4u7t0tRnDk+y3flNi +xqg9beiukUWFT3YK3pESxui/7Y5d3AkqsP09tHuJbIxlVmYlazypYL6T255L +3hgPTt9cPCNNhRZ2OlVS3RgjXqQ0Bt6mQIfvHV4zpjGmFpeXlhUYwXvlA6WX +9xmjXUah4GKvASx11xSK7TdGSbNFnU31BiB9gvPujYPGaGEZaxSdZQCevbfS +80KN8az9RpvEAAP4dLYrtjbaGEOet0tsX9KHb6OGuz5dMsb6zpmXTmr6MFu4 +Oq/DMsbt5rtOmWTpwqizVXZinTF6GjSYaZ/XhYE1F7eONBjji0BhdtMwXWjw +IWdef2qMmZolq/esdOGMhBF9pY2IJ4n/7InPOrDh/IHj7UPGqLLv1tubadqg +GdDL5s9BRwllteO7ZTRBVky66PEaOlYoTKumzGvAhmbfnRLcdPz2VqZl5rUG +zMj+znm1jo6f094LWJ/TgPo+Pgt9MTreVusUkp1Vh61WeHZ1Ix2H1gU3b+5T +g70qxbw3ttGxvLXfVLVhI0S/8DqguoOOP/SXn8lnbITL/sKvKhzoGG4VvMn2 +yEZozD+W/MqFjpSSqWJt3Y0gqrpVcGUPHSuvR8uqF6pCi+pXUZ9IOsaZ/cf7 +NFsF1DfJyaveoeOm9GcxHyuUAFvfxFbkEP197g8FXFMC58CEz8w8OvamyWhI +HlWCuMKJXJciOvKovHs2x1CCoU2NKomVdFwfW2yS+koRLqnt1vj5ko75IiIW +Kr8UYEo9jVLxm45LxeaiQdvlYaADLUVm6KhB5/ZxosnD0+BfuyLm6BhYziHm +qSAPlyqsD1MW6Zh8rW/HpW9yoE5nK6nnNMFAHdoyp6Ec+FofUmgmmeA9rfMu +o/0y8DZgy/q3piboxlwzn2stBQ28c2QjMME3atd6zylKQW5xrtp1MxO04++a +zl4iQ+jkipWrlQmeKm0cCy4lA39U1emh7cR4Z1WGwkhksEpQmP/ia4KO1mHW +XyYloDZv6fPceRO8/XNdfUsLCSgWEfM2SSbodDIu3reABNWff67PvmiCRqWp +jmoJJKiQ/UC1uWKC266XGVCtSFCS8fRi1k0T/HZJnWnfKgbZyWeNt5Sa4EOn +ssemb0UhMUIwNaPHBPfNa195yisCPCLnCyZ6TXAuZ/GK+y9hSChnazQfMEHF +jRcjpHqEIf7X1OjPIRPU8typxHtbGE4GvjU1GzVBb9djJun6whDmkfl9bIFY +f1Cfu4ufELhtVkITWVPMl36/KbxJEFbe8gg0y5tiqn6U3rbLgpDt/2vQRskU +aYW1wYe9BGE0oS7KbZMpnpQXnr6+JABhbdsfHtM3Rd2rtUq2xgJwwf64bK2V +KR4zi+DgaFoP9a69y4Yhplj4NaZyw1o+8Byrb288bIpjRw35Iod4gS06O2Nz +hCke99R/LVnJC1Y3Dxo6HjNF3pQDTlJ7eOHNv+xB4XGm2NOd+Hb5CQ+M+2oP +lqeborux1tLkeW6QOnSuTvupKXJZRz/xsuSCS6v7jJKaTDHzTusjhgoXcFyx +Kv/23BSZlBxPGy4uGK/hKspuM0X28qLUHy/WQD1bfIZwjymetuzbusV6Dbhd +jY3689UUbaNn2nRdOSGj4ZjR43UM3F60dxqvscN6+93lZAEGbhB48c0vmh1i +P9G0ojYwsDGFFvvQmx0CuRaUdcUYyEfvfcVSZwfq9kjRXFkGNuTLUFKa2KBv +OGzmrB4D7w2sbXWbXmWK8QWVb3Nh4K0fJz7cY19h5lmciP69m4EhB3ue3+ta +ZuqfuGSR5sHA/licWbi9zLT/XdY7sIeBynkxphdNlpkJfXN/9wYx8M9LV/3Q +6CXmQu4p8+jTDHzf98qbtXaR+d4kraegmIGjVOMyNed5ZuCRvFvWpQzcTO4/ +Gao1z/xTWu3/s4yB1F6/oMU180xhxYF5vRoGfnmZxt1X9YdpyyMj/egpA01y +R0VzxP8wG98W+PX0MrBrIx9JZ2yWaSNQqxU5wMCjO6ayjj6fZQ5safsjMchA +r6ljoqt3Zpmz9T/Oe31iYHvhO9tnLrNMrRzdB2PjDLRWINVsaJ9hNr43i0ye +YKB+xpUD1HszTBvRXaDzm4H2l4VVM+JnmPvOHXkdMcdAz34R67U4w5x9mnBD +fIGBT0Z3rQjLzjDPLKbvrV9kIFeJiIPr8jRzg2GRpucKA9fNTP/qfT/NzDpU +P7e6ysC7FzYcT6qbZv4PkgsXuw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0930208208692291}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0930208208692291}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829421219533*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"3af5384e-3cad-477e-a455-2b12f9ef19ce"] +}, Open ]], Cell[CellGroupData[{ @@ -2113,11 +8289,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.991850610344879*^9},ExpressionUUID->"c213919d-017d-a948-8e46-\ -fe19384187c3"], + CellChangeTimes->{3.991850610344879*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[BoxData["9.786582751762749`"], "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[BoxData["9.372804340363798`"], "Output", + CellChangeTimes->{3.993829421240981*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"7d4173ac-8940-400e-96f2-2fce474d2c8f"] }, Open ]], Cell[CellGroupData[{ @@ -2173,416 +8350,731 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850612616415*^9},ExpressionUUID->"3764dfb4-9656-4349-b0a1-\ -77ebd1a3e048"], + CellChangeTimes->{3.991850612616415*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.018714029126914`*^-225\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 13, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99382942129683*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"19554f65-97e3-4c47-a75a-0b9f12cd9365"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"05911c33-7605-8b49-a7ba-7fc8c8f30741"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.567707413933565`*^-231\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 14, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993829421301343*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"fcb80882-0585-4521-bd1b-fd7072b93afe"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.515354148037636`*^-237\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 99, 15, 25990553580667322573, + "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938294213051357`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"1cd89c51-137a-490c-bdf9-c350334c3814"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 12.2218 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .13693 -24 -4.5 ] -[.01131 .13693 0 4.5 ] -[.01131 .25915 -24 -4.5 ] -[.01131 .25915 0 4.5 ] -[.01131 .38137 -24 -4.5 ] -[.01131 .38137 0 4.5 ] -[.01131 .50359 -24 -4.5 ] -[.01131 .50359 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .13693 m -.03006 .13693 L -s -[(0.01)] .01131 .13693 1 0 Mshowa -.02381 .25915 m -.03006 .25915 L -s -[(0.02)] .01131 .25915 1 0 Mshowa -.02381 .38137 m -.03006 .38137 L -s -[(0.03)] .01131 .38137 1 0 Mshowa -.02381 .50359 m -.03006 .50359 L -s -[(0.04)] .01131 .50359 1 0 Mshowa -.125 Mabswid -.02381 .03916 m -.02756 .03916 L -s -.02381 .0636 m -.02756 .0636 L -s -.02381 .08805 m -.02756 .08805 L -s -.02381 .11249 m -.02756 .11249 L -s -.02381 .16138 m -.02756 .16138 L -s -.02381 .18582 m -.02756 .18582 L -s -.02381 .21026 m -.02756 .21026 L -s -.02381 .23471 m -.02756 .23471 L -s -.02381 .2836 m -.02756 .2836 L -s -.02381 .30804 m -.02756 .30804 L -s -.02381 .33248 m -.02756 .33248 L -s -.02381 .35693 m -.02756 .35693 L -s -.02381 .40581 m -.02756 .40581 L -s -.02381 .43026 m -.02756 .43026 L -s -.02381 .4547 m -.02756 .4547 L -s -.02381 .47914 m -.02756 .47914 L -s -.02381 .52803 m -.02756 .52803 L -s -.02381 .55248 m -.02756 .55248 L -s -.02381 .57692 m -.02756 .57692 L -s -.02381 .60136 m -.02756 .60136 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 -.5 Mabswid -.02381 .01472 m -.06244 .10806 L -.10458 .20681 L -.14415 .29388 L -.18221 .37017 L -.22272 .44131 L -.26171 .49847 L -.30316 .54591 L -.32392 .56431 L -.34309 .5781 L -.36173 .58858 L -.37125 .59283 L -.3815 .59658 L -.3917 .59947 L -.40103 .60141 L -.40552 .6021 L -.40789 .6024 L -.41042 .60267 L -.41284 .60289 L -.41504 .60305 L -.41725 .60317 L -.41834 .60322 L -.41933 .60325 L -.4205 .60328 L -.42174 .60331 L -.4229 .60332 L -.42399 .60332 L -.42526 .60331 L -.42644 .60329 L -.42773 .60326 L -.4291 .60321 L -.43163 .60308 L -.434 .60293 L -.43941 .60241 L -.44405 .60181 L -.4483 .60112 L -.45788 .59913 L -.46769 .59645 L -.47681 .59341 L -.49751 .58461 L -.53655 .56157 L -.57805 .52937 L -.61803 .49268 L -.6565 .45377 L -.69742 .4102 L -.73682 .36757 L -.77471 .32713 L -.81505 .2857 L -.85387 .24819 L -.89515 .21147 L -Mistroke -.93491 .17954 L -.97316 .15219 L -.97619 .15016 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQFNUVhnt3ZhZ20WDUGNQo6xPxxe6CgIMgKgI+ACMqoiiswAgK8hTf -ARR8oXE0iXloLBNjtBJTPmt85E3FMiYpUyZRKzUpraTyKC0tLS1TsUxlMn1v -9+3ume/cme7phbXKqd3e3v+c85/Tt2/fvvf06ZnVv37Z0pX965cv7u+esbZ/ -9bLli9d1T1+1tgpl2hyn7bHqb1e34+5XHMffVKo/lcfdjYs03l+q/uScUrHg -5B3/k3cKpbJzjJJlnEqpYCQZte108sWykprfcskp+AT5glMqV5zeGPbkf4xv -X6lye5KsZ18oVRr674lhT/57pbapxp71ZORXy5wl6s8Qp1SV5wtFp1zWrsql -oqJzQ5jghVjM552iJ894dpVKuYpryuAQq/9X98da7Gz+/CbVOiWnXP2vXWHD -HPcsRZtF9t8Tg6dxPEOUjc8TPp1uN2lvoj30sTvLwz2uSuf+N15sqqheu4eV -i3nTO/vAdijY+s1armJ5L8Rckz56wLYLbPUp74hg6lf/nwHq9mStUk8RtW22 -Vcz1p06U1s026aMXbDstsYT1qJXJR03zuP3U77cD1TxhH+YQVb/WeFwfYVvy -oU9BNjQEV2MqVZp10x4eyToiA2loMJyYcmNl7O7GhYf1mKd8rGjb2J3bw5xE -PWxJ2KujR6xJDYalWtpGw1IGfPhHG+4R/tHWjfbaJ523MSLNELhpBO4nxndl -aTDNljPjZLFUNg2QNfpVzL3VhBquVND2wZE04qhtwOqtp+zesoLG1rewaF9o -znezXBCDvkea21+SGLB59afdTM8C9XH+6FGl1ZMg5S7ntaJr7raeP/dxI+lj -k2yTHiMnyFyGhdAJsrllu0xs38VgSufoLm/z7U33pBn2YZ5792OuAHd74ydD -PtL9oxYXd7qbNtmqqwWs81PbHWI7mGJp1nZoqMupC3fYIA/4U9vBFUvijjYF -lI4DbHLKeuFAQiL1190Thm6WZyPUvsrW9FVyEZVIQFtCejreTKBQ8W44N/BR -ub/tgKnt5p1vk5FsNqVrk5VsNqZrk5NsvtSijRInYe+QbK5L12aIZHNtujZD -JZtrdr4NjZVqe3WLNkpMo67aXiWz7ygbmlWo7ZXp2uwi2VyRrs2uks2GFm2U -OAn7ZySby9O1GS7ZrE/XZjfJZl1yG30H4gcL/tjpJ/PyxZKTs+hH0tzex7/7 -hh/A0N2oUZze4GJJymchWo3Zc/n+UYazWzSaf1aKcK0XoT4sPx9H6SbKs1PC -LZtuSD41PYboAveUWhRDUhM1MZA1Oy6QGve7D76Q9pBCWl3Xg8IhST3IlrJN -LaRscNnpRB/l+UxUdfnAzoieanDIhdKkZk8pslVOdOCCFNmuFlnWtE8kYxgr -hCUgENZQVp7FIOiUeT4n8SxyN2oFuUsC64UgsPDsJfEsMFEMD1krRdHmfBAM -l31/XuKZD4LdEvDMM8ewRwLrc8QrDHlGSDxzTRR7JbA+UzxpyLO3xDPHRLF3 -AuvZojLy7CPxnC4qx+M5DQT71vbTfSXrmaYt9pd9i9YzQJCEZzoIRso8X5B4 -poGgOwHPSSA4QObZT+I5AQQHJuCZCoKDZJ79JZ7J5mwfmsCaMmxhnkzQjcB6 -EghGyVGMlHiOBcFhCXgmgmC0zNMt8YwHweEJeI4BwREyzwEST585x0cnsO4F -gYXnQIlnDAjGJOA5GgQ9Ms9BEs+RIOit7bui9REg6EsQxeEgGCvzHCzxjDLn -eHwC60NBYOE5ROIhBxMS8FBz6asz1VV8tChAf3Q2PhMpq6BVPDWZ2tKFpEeo -AVzZB0uV2qrBTKRIhLLW4pHQwJT3jiS9DIDBQlV6lF4dJYVJ95dJkTDTWPka -21A5HK2kxDDpVn5c6mFG6nW88rUgeSEGR/OwyakHZwo3QzVi9NRCLJygKe+U -uh4ZP6PQEdFzf72KLJ+m0TU0WoqYli7HexG3mHAYVpdwsBVAUTuLUdOyT884 -W0xGcB0RpWvE2GiBrWfV2G/oBqu2lKo4MQEP5ZVOknlo4qC2lFicloCH0ssn -yzw0DVJbejwwPcSjJKI1PcSYIUdxlMRDj4FmJuChx1anyDw0yVRbujOdmoCH -bh2nJeChS+d0mYcm4WpLg9qsBDw0VZot8/RIPG0gmFPb+8j6f+5WTYTPlN3S -mua/gMWk+BiwuTJFH2AfAXZWPIr/AHa2TDEWsH8Ddk48ig8BmydTjAPsA8DO -jUfxPmDzZQpacb8H2Hm1PZEM3wXsfNk3ZQ3eAWxBPIq3AbtAppgA2FuAXRiP -4k3AFsoUlIn5F2CL4lH8E7B+mYLySv9oneLvgF0kU+QB+xtgi2v7JBn+FbAl -sm/K0L0B2NJ4FK8DVpApKMv4F8AujkdRBmyZTEEVhn8GTL/0lGqewp870+uS -NAGg4srXALtEhzrQaQn7S4i0MKEDeBWwS70DSC8b0QF6NDc6HrA/AbYiEmGq -i+iyfRG98yLM+K0WfTUuSENQaH8AbOXANp5lZTwVsJcBu6yuA7ZazuB3wEYZ -B3qQ9HvAvBqCAUg2WN6aoialgF8CzCvHaD3PUP+uEY2VJwL2O8C8Whq6M9Cz -wd8AtjYexYuAWcrf6Ennr1uneAEwS+HeyYA9D1i4xlBJyPBXgFmKIOmZ8XbA -LJWdRPFLwCxFqPQE/OeAWeplieJngFkKh2cC9hPALPXKpwD2HGCWcmyieBYw -S+X4qYA9DVhdOTwZlgDbKPumQoqnANs0oBRUFvIEYJYXKYjiccCulylmAfYo -YJZXTahO5keAbYlH8QhgW2WKOYD9ADDLS5xnAPYwYDfV9kkyfAiwm2XfXwTs -QcBukSmoauoBwG6VKeYC9h3AtsWjuB+w22SKswC7D7DbZYqzAbsXsC/Ho7gH -sDtkCqqm+yZgRZliHmBfB+zO2j5JhncDdpfs+1zAvgrYV2QKqmq8S6RFivPE -BotiX4tHcYfYPkhBZZ63i+cm1TRBICuG0gR6GUEz8gWAbQPsGzrUgUsT0Jqn -2YBvFS+dNNMCuSYjvACwmwH7ViTCZCvbXN0XFrk6+lXRxvUrFwJ2I2D3pBBp -F3+1UugbIrx2DVIEFN4WwO5NITw6/Tml52P+aacF5CLArgfs23WdstVUQbBE -di8tnU2LG+lmwO7zIm0xZRDVM0khr0Yhnw/OeI3/fsDU9F491tPTjMT5gUiC -z5Eb6yLArgXMC4duBfTOw9WAfVemoNcvrgTsAZliKWAbAPtePIrLAXswRKEk -BVBaB9j3Zd8XA7YGsIdkimWArQLsYZliOWArTJf8oWx4SZNYTAqK5xGZ4lLA -Cib8R2XDFU32SQvFyiYvrsdkissAW2jCf7K219G5pRvzk7LH1YDRzO4pmWKN -CXC+2XtaVqfLglYWFor1gNEq6xmZgq7qM0z4P5YNNxil2Wbvp7I6jWGUsLFQ -XGX8zDR7v5DVrzFK08ze9tqecx0YTgVsu+wnuFFNMXvPy+qbADvWGL4gG242 -ShPM3ouy+g1Gqc8c7W9l9a1G/Sij/pKsfpNRH232XpbVbzFKh5i9P8rq20wI -3Ub9FVldLdXVJHKE2Xut9kyrteUId68sM6ntIPmysEZytd/gK4mdtv8DOhP8 -Ww==\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-3.23234, -0.00443741, 0.118269, \ -0.000307202}},ExpressionUUID->"899e43aa-c372-6647-a3e4-4952f308ab17"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 99, 16, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993829421308776*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"114cb069-1092-4e8e-85fe-fcf57b35b95d"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-\ -baecb9a57d9b"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJxN13c8le//OHAhoyLZmzNRKDPj3Pf1QpSRVRTJSEiEkMysrGSPymjISLJP +GQmloVKp7ESSUiKZofidz+Pxe7x9zx/nPJ6Pc92v+3W9rut1D8Ixb0sXZiYm +JlbG1/9+F4aePyYnFuKeTLV3D0TtxbuuCgfp9EWhODV5qVupFAQCb44J96Wj +tomNY2dS1VCA+e1elr4C5BPee9EiVR9tmxJKX+qtQd6yz/x5U63QcJOp91zv +I9QU+hpDKS7IgPzj4+/ed4g2oqLDfvEMWurdnTXd+xnlTWD26uExqE2vpPBt +wSxadGINjd2RjcSHG74ek/+HzNPUikVUryN+T4fb7HoscN9Xb6hnshClKxnc +N7XigPvRcmeKCkpR/+Vdrb95uMCtyjlmZ0o5ynlftjWAwgUzz3vsxa6VI1tu +GYdlTS6wSbtw+V9FORqMllhlduaCor+t4kWvy9Enr000/rtcIHv961I4VwUa +3/OlTt2GG0y3UwqdEirQn+lLlSE3tkIJzyK9MagSJRaGv2EW2QY/bu5LZr5a +hYxU3XkFSNsg4s4PjUuFVYjjsaWVjMI2+Luq1E8tq0LnRykfjHW2AWd42bx6 +fRUKJXZ8zXTfBmxJ9BDRd1XI67rwKrVxGwg2tVVOslYji7xqeeMjvFB6TXGg +ybUa8cjneh914YVHkb+Wyz2r0ev752u8vXmh1ZZl6opvNTL6cEgjM5oXpr85 +7z12rhrpiq7qfSzjheF863J6VjVSvWx0xPsvL3x274hwaKtGQpmjCRn5fOAF +zTeeidYg4R13z/8p5oMHEpVX7knVINFHseFHq/jAJ3f/8nVyDZKcljsj08YH +fdIps26KNYhi4uN4f5wPONVO1zfr1CAV1n/qoyr8kFnmQE5xq0Fm/oJflF/w +Q/z2pIr6yhpkvnl86NJ7fnh5c9dXPnoNsixo6P87yA9Z/szBJ+trkHWn3Zun +v/ghL0T6LufDGnRU/majrYAA9J3U9uV5V4M8vuxMi3IUgI/1T7rx2RoUd9AQ +f7cgAHfV/fkklWuRKP21KPMGQTBT0mtRU69FFXwHF5U2C4JrXsb0Xq1a1PPO +vipNShACglJGj+jWIrKFP9FinyDodzlu0rWsRY/2X2PrvMI4/oyMA/vpWvTP +YP71K5oQnJ+uehpwuxalFgeX/TMQApuT6vhwOeN4NqZ4BQshyKql47rVtcjk +ySadJBchkHAu/bBYV4ty9KRrTZKF4Cuul0R4Uos0wPjSy2EhaE8/wuc9VIv8 +NG84PI8ShuHGB9/mttCR0XXuOeOLwtCgGtwfsZWOiOyh8a+zhOHClMZWDl46 +6uyyrn5/SxhsDtkbcAjRkaLPFpah18LwQZny8Y00HY0Xny2eERWBc8aBiiEq +dNTCNaZ1hiwCyQW5MvfV6Cjb3/LNooIIbPxy6tDCbjrS11X48xdEQF682MKe +RkcFHz8bsruJQPdrL7u5PXRkx286KVYrAo4nKp6pWtGRSsj9yKtNIiBq26lF +PURHmz7LChKeisDDSucEXhs6aqhkQdR+Edj39HP8Bzs6EjRuSN21JgImYB2u +cJyOJquplFoOUeDfbq8750JHj4UzG9R4RSEQLBzuutGR31evz1oUUZjgP7iP +6sGYbyRZVd+YMb7S/2XLaToqGU9rf3ZQFH7Y/jlq7UdH58zW7IzsRYG829Ty +qz8dKUgMxJidFoVLa7zVv8/S0YX6lF6bS6Lg2Z5ZXxVGR05S/zwGr4tC+1Om +4S3hdKQRe5LJ4bYo+O6xK3GMoKNvB/Tljj8QhZOm335MRtHRnl/LwV6johCv +kFqcFUdHQfsytz/8KQpXBbplr8fTUcUNhQG+BVEYSi5ou5ZAR8IHHTUbOMQg +QibseGgiHe0vXxrfzCsGK6mW7ocv0lEUW8ZlezExYMXzomWS6Ohn/ZNFFkUx +aKynX8tLpiMCr0OJ9W4x4HnV4qCTQkfWHn+sS0EM6ufZq3sYTnycxvbXUAzm +3J5+OJJKR60SO+6ZHhCD7wMnJTsZng947HLDTgzuaeuUK6fR0fbOowJzLozx +VKGaKIbt5RYfG3iLgdm5EeMWhjOiUv2vBIpBjvGx5G8Mt3+QI/+MFAPC/jeR +ywz/VW17jyeKQb9bEHGRYaVku+i0TDHY7HLGcZBh12/zyl/yxeCQnoFUKcO5 +kPJZvUQMfp5LULNjuPOKbHpClRh0lBV5zjHy2zj7UGewQQzM20MifBjWMjny +W7FNDM5Vi0m9YczPu2juemSHGDSLhI5zM1y4mmTe1S0Gd8+peyky6tN/SIZJ +ZlgMnM/vVZFn1I+7urUyaFwMlrZ3lbEx6qu3ydah47cYfD42R2u6QEeBzrPc +UitiMO8YTTNmrE9508Xm06ziwLVvYbqasZ6fBahej7nEwTRJM20qho6EvFsk +hITEgViStWctmo5M2g+/cpcWh8jgXOLnSDqKJMyENsmJAy+riEoWY//cC06U +36oiDuNPBb0EGftr4j150IkmDpNeQ/edg+lIWqE5ka4vDkZKm+eD/7cfh6d/ +2BwWh2J3XXzVh9GfGhdy7jiJg/NVVONyio7m0khGayfFgZo125/kTkdyE01L +Fv7i0KCzouPP6Bf7PdalhWHikCiUdELQibF++b8OL8aKw2mmgQenGf3WvhDP +YZQqDkknQgqjGf2pXHrf7VeBOOw8L+ndakJHbsxWQrp3xGG2aalvzICO8o5M +Pc28y8ifS2TkHtARGzeBqtUuDo/9xO3NGdcPbbfG7otvxYFpjwQrnzwd+bQe +iBkeEIcyLZM7Z8h0NOAb++X8pDiIU/Zt3cpPR1s7pDJ7F8ThynL4Q7SZ0T+U +Br3tTBJw/NiIKyszo196Jwre8ErAbQ1fC2yqFo3uirEkikvAWeWKgLLRWiR8 +QZL5DEUCti09tLjRV4siaRZOohoSUFtv/kfoYS3aZ391ZreuBNz/HawYWluL +uCMmoq1MJOB9iC++p6gW5bXFFKc6SkA/beOn6dha5Dz2bnfFSQkoRa94XgfU +ou3s0s9f+ktA/kq5PZNrLao3apxgS5CAOOst7taM+0G4J3sYOUMCXHuyvP12 +1iKD5IPcuvkScKouSb5PrBZ1vZ3aFVYtASH68qWeMzVo+jApYLZfAnRWjn31 +z65BdcE+7Nu+SEBmjAhXVFgNOpf34LLilARoNfI2PXKuQVs+HbrvziwJASd2 +i/Qp1CAZt4tMn7ZLwp8CsrhSfTWaiu9P+6cqCUj9nFfd5WpEv00liSFJgOes +pJOBjPv5VKu+9QFJsD3aOm2lVo3sz8xf6AiRhLqw7giHoipEuaQr/iNGEmqM +zE44hFcxri8p5eypkrC/VzQ763AVCv4r16lbKAkOrWeNKjmqUFa0vUBDhyQ8 +Lh2Z+9JSgTrSnl0rkpCCaDOMn+ljGdKquEI/1yIFlhfHnwV4FaE9va//TbVL +QYncK0+XzUXIlIl1r8M7KRC56Z578FYhcrb06kdjUvDVeqzd4/NNZBBCCI/Y +KA02sgc0/x5mPCdKLdzU2SENmlEvd9neu4rma1Pbl3ZKwy/H7IvNf/NR8L4d +k9Wq0tCQLGLdtCcfxZx2VCfi0nBXp0ayvz8X5bS9aGe2kIZvdqxOj0SvoMdu +1ybbAqQhxzRnM4EtExn+1eQNDZEGQoVdZ7hXBnqd2qWuGiENW4T0bpzuT0f9 +DZwRhQnS0MjS6rWzLg1NbfbnjcmThsnC9y+yKCnI7zr3buyGNBR5VresSiej +P6qlR+aLpGFNnPvlGCEJsdgPFbpUSsOmFZcJLdVEJFy1b7fBI2nI3jyNbcyN +Q/l7Ro+sPpUGk0mLfV6PYhGxPyzi3ktpCFthcdn3KwYpMNc+p3ZLw86r7ao7 +bc4j3YMSduzj0uBx5IvZdc9I9Gy8LqLlpzTYX/h6wr85ApmEWRad/S0N88wX +520FItCh4ripb8vS0Fn4MVSrMAx5/vkd0c5FgAOt9f2Lm4KQ1mlXwa+8BJi6 +bD1xfuws4vgxUMYiTIDZctw++0UAKvrQ1oMTCaCV8/Ome60/8j+o4WknQwBu +6yG3xnt+SPfVnQ3B8gTgHL1dX97mi4aas+TvqhNgxrVqe9qSD7qze9Ojd9oE +YDzVZm0i+qDgqnOHpoEAd8YLWn2LvZBggVvUDmMC6E0M2iTle6AvooNChuaM ++OZ1T22UTqKaDPNyVysC6HeHa1R1nUBmMZp9NxwY+Z2p+CixzxVJrpafajlO +gA+yckb7hFzQzwAiy0d3AmD93vGkOWcUf2KzorA/AUQkX3yS7HZC1iPhbWpB +BOgrHi0/0ueIyLZzhw+cI8BehbPTG984oFbjj9HJ8YzznRXSaTCzQ8mPLUTu +JBGgkti50a/KFtlhTyuepxOAnuKocYdig5YUK/tZ8wmgVMB0xN/IGrWXkLyJ +BQRw+pclFPznIMqWvswKJf/731Bosu4AUuaN3BlSTYCJSf1E7RMWiClx/vHl +ewSw2RpoU3vIHL1mOWl77z4BGgTZ/QvKTJHHvGXM7ycExv2oMuHDghHS8nom +uvUlAb5XFMg46hkijm/aVfKdBAjjUQhDt/aiwj7yB7cBAqymzdgn3NuDfC2u ++MQME0COI2Xg+VE9BC+42G5+IYBBj+9DHhFdxK0Xldv6nQDlqoucTt8Afby/ +sGtoigDWtzXEklMQuqPq8XRllgAqKjYvqnwxFFw+fERkiTEfM+FotwBtJHit +PfYgCxFib3YnDPftRl+EMHFfDiII0yKC/VTVUU1qdXUKFxGyVx79QbdVUQQn +dW85LxHYuOKY+zRUkFlUzuALISK8PWUVOzSkhCRXuH3HxYlg1U5Z3Ji7C/30 +i2ZnIxJhaZ9Qk1SfIop38VTWkSdCzWDgmkrqdmQ99OmZvRIRSCxrF57fkEXk +Q1ZHQ9WJ8JTs52LSRUUzb57PXNEmggStTeM5hYJa9+HxdUCEjPM1MS6ZJJT8 +sEaiW58IRQUHWu0lichOS6Z2xogIBe27vTgfSaOlHTxDClZE6IW4ctfr4mgh +XzRSxZYIPU2sQb5BomhuK4Ws6UAE2xf+SS8DhdHvyJ3P8ONEkGXeu8yZJ4im +ZjVP7nEnQuctaetvn/jRhMseLiMvIjBnbjDD9PnQeK9plZkfEbTlxnRZn21D +n+87L9iGEcGwmVZWqc6NhhW8rjhGEcEuI3PxcddmNHgtkOYaR4Qf/GNaldc4 +Uf+26GGPi4x8fvr4ncxkRz3RSVGn04hAr6KVS1dtRO/nL1HOZhNBhv1nvcw0 +C+p0K2gPzSXC7ycVC6sWzOiFcR13fBERIqKaDB+MruLPHjysTrpNhJn9Xk36 +h/7ij3d2HMyoJEJS9sCS1b8l/OGNnsXLdCKQxyxyzd4t4s18IzlXG4jgb18s +2fluHr8fM4EVNhMh7LJrcvnKLF6/OP+ptI0I7bZUs1nDGbzmwyaZu6+IMDQ+ +8vz+pSm8cr/Ai8Z3RNiqU/iNd34Cv9Midaq1l1F/qdwqo4TveKnSdp6ng0Qo +A1klTfNvePFN1dqXI0QYsPGPWNUfw28KIOu3X4mQNZykxOQ2il+PM1zqmSBC +lAon01jlCJ6/dCBvcJoIgcOC91IlPuE5Hvbo8zwRvsWwZILtR/zSxxOfvy0T +oUNsy7GOugE808wvZnKNCG+Sv754ZdqHpz0Mk51lJYF4lgStTLQHT1aJf/mH +kwQF9U7uRKEuPLEo3WuVmwQTC5r+uvAOjxfK38bKT4III+2TrumdeExCCZ1T +hASpp97vcOR/jUetVB/aKkmC0aMzNDbDl3j4qaZlfhIJHjmeGWN60I6HDj/N +F5UlweVk5UUWj6d4kMVbkFYgwZZJA4qC6WM8oO3DKEWZBEUjXr5/nR7hfmpf +Y3fsJkGfO5vo/oJW3KdkWk6JRgJOYtZAvmAz7iWy0qGuQ4Kc27YYk8p93CNx +ow/NgAR7/iX+MM2ox0/828qna0yCx0K6T/KV7uGu3qL39pqToHhb349QDjru +PEK22W9Fgl0BLnt/8dbgjgd2/rW0JcFA6O43TiZV+NEnmtcOO5CAELajxMCp +HLfdvUfX/jgJVnGx9w1nb+OHSk3HnN1JYKDfXyvQXYIfFLOJd/ciwW3jJdJP +3yLcIsl5h7cfCWKfLIvYGd/ETddOvfYPJEHLh8CjbDY3cOPTgaeDwxj1GkLS +bIrX8H2jUfwRUSRQkHReqtyQh+tbJdXFxJGgYk4FHyZfwXWfXbJNvMhwfV4N +ITUbR5oF/1LTSCBnUp1eQcvEaWV3rmdnk+DhX02Pw+R0/IN02TX9XBLcXJVl +PeuYigdnl16du8aoJwdFdzQpCRfeciv/ZiEJpnku3p0tuYDXRRbnWZaSIHKP +uZkcRzxuvViYu6GCBMP37+rK3IrB5zxv5lTVkGCbos8liahoPOPzjSsOdSQQ +Op1660FqJK58+Ppl7iYShGTlsDtcDcffvrp66UErCXrrBVR4fENxH738bM8n +JJit/H00IjMI39qQmyX2ggQNC1s5D68G4BWKOZkvXjPWw+bW3m+3/PH9hZcz +gt6ToGbjlzShZF/8p8ildNk+Evg+La2zv+WDX0jJSusdJEFJ43KTy9gpXG5j +ZmrsCAmoK6cmVztP4u3B6SlqX0mQNmK6Q33zCdx1OjX5yw8SHD43axB60QXf +6JqSlPGLBBx7cq/M7XfGCz8kXdSdI8GpVczSxdAJ17O4mPj7DwkS8o5IW87Y +45+fXrhw/R8Jfhh5OutVHcEjaQkJZsxkEJs4EXa47TAuXRMXv8pGhp6uhuod +JGu8RSY2rnwzGUzNpjVJ7Qdw+/zzsXY8ZIjJeN1mX2aB/+WNjtksQIaO5xe5 +9yeZ4bnxkecbRchw9fvv4jpZE1xrNTzaXZIMJEuv8W5JQ7zP71yUMIkMco8u +lYS6GuBnv4dGPpMhw5nBpTCXRT1c0CEkIkCeDLLHbF1FXujgd7uCwilKZNg0 +khHZWInwg0aB57rUyFCd9W87qNHw2ZaAsGgtMihGHh7pFtHE09XOhCojMuP9 +n8O98IA6rlTmFzKiRwZPrCSqs18F75T2DU7dRwaHwyF3jhUq4V7ZPkFoPxms +X/Vgxw7vxLm2eAdOWZCBPUqv8FL3DvxO5Kmz+dZkMErXaO6iy+JGix4BJkfI +cPefHblugoJ/9zx5ZsWBDAuEnzyTPiQ8/vMJ/9vHyVBfMeMuSiPgMofd/Gzc +GfWKCqFHJEriT1+5+HJ4kYHYWRxiyi2Gu+gdP13ny5jPozuHsuaEcNaGYz6u +Z8nwvK2uL1lFAL+p6OQtEMrIX3LNJvshL65b6OD1OIIM2sHDWZuzefBPIvan +/GLIwMUmreJjyYWHp9h5Ei+Qwc02usRrnBOX3HjE420yY/yy4NrDETa8Kdjm +ZEQGGUaz1Vw8VFjxI9OH3HdeJsNtybN3c95vwJddrE8M5ZEhUHlyUsJvDbvy +4aBb0g0yJJ58zjLXuIJpWBxwpRWT4V3tbebXPn+w3qcWLhO3ybAh/SH/3vh5 +LIBmfjynkgxJ44E81gszmECNqbMhnZGPxbsY2eppjC6z/9ifejL4WUoqsjhO +Ypb5xk4lD8hgrnk6SKPnO/ab18jR+hEjHydTGqHuK9bnSew8+YwM0lsyxLua +R7HWp8sovIMMZmzjG1/JjGC3pN9XZrwlg+3Q9pvPXn7EUoPLpG71kGHeuGCx +Z7AfC+yKTmn6QAbHDJczm3x6MEdFu7XOT2Tg6YgP/u3/HtsXr+o9NkaGZ80l +TMSPndiuz1uGl36QYbVyrW9u9ytMmDZmyj1Nht8/Z1S6TZ5jTNkPmonzZHg5 +EHIrduwJNv4rS3H3Mhkqa7cwCf1+hL0x9LpqvEYGjr88RXTHVuzeTQNuR1YK +cBrysvWZNmFX/0me8+ekwP5tTYX9fvVY7KHFyXhuChzWe91xR/wu5lX95mg+ +HwUSwqTs+DVqMOvNt15VC1NggK+7kdurEsNdIrCnEhSoyJWx7hYuw6gth8sH +iBRgaVjQKLYpwbhElCR+yVCgbcelwKvihdicL2cSiwIFCES+vd7mN7DBjpG/ +QsoUIDrLP+DvyMceUxs95XdTIK7vdWD19SvYnYj0QaBR4HUG39AcezaWOXDS +xEqHAinGd1rEp9KxUFW9JncDRjz2DbrMuqnY8WQx+XPGFEDPay/FfU/EjMdn +c9PNKeDfl5k1OxOHKet2bC6xokD+B7bp7wnnMdG8wpD7thTYNcw0xpkbiTEv +hE68caDAD6t3ecI7zmE/zKyOfDnOqNdMRVhfdxD2rlTh5R93CkxtmilSkwjA +GlnYtLm8KeCkhhUETfhiBUeHbhP8KcA+vbl+RMEHS6i7J6oeRIEH1W5p/rc8 +MJ9tKReMzlFAmpvnCvcNN+ywh9uyfTQF6gp4g3wUjmPwBJ30i6dAxxfdiZca +TpislPBAXBIFpi3qtVyOHcV4gqYN89Ip0N1rxeXCbYP9edfeUHWJAtckcsZW +ba2wT/I35J7kUUBhQ6+QuZIl1h4bdKX/BgUudXBcPrBiilV9suCcKmacz/jr +HNgbYZe1tgcx36HASpLyVisvAywik/m7YDUF2j0aWC/z6mFuUwOHd9yjwEHr +L+m5aoCZ7qttR/cpgLl0WS0naGPqBYkaB1spUPJH9OiM025M8q/zrRNPKFD8 +LV1ItE8FY7OmCYe9oEDvLVF/k+5d2FQlf3zaGwqMMn0MPJ0oj/VwTi4WdVEg +9KeTZdcuWazZ+YlbYz8FAif6jVvDyFjxg/ze10MUEGLPYD5pQ8CShQL2jo5S +wPjoAaM9RyWwgNOmdYvjjP3DzR9d0COM2b+kymyZooDDEV39LUwCmD5lLVt6 +lgK+0+UOsi3bMPnwXja1P4z9U9vvtLrMhfH3VwYY/qNAVkdabLcZJ/ZXOf7r +UWYq/LHKaFG324h9ueho7ctOBRdWzpAjrMyY1w954q4tVLC+X1Bo3rhKW9y7 +NDnJQwWRGUEvVaVlWkTRk4YyASo4cowOkC0WaJtY0mPcRamg/tPy/PCGWVqm +o72FjBQVzEaWW1IUp2kSzdslxkiM8c/pEqUXJmjFYovjBbJUaDVJDKw49Y22 +K6iN7qhAhenSs0OfJkZpjT0pEZLKVPj4KiGwduoTTU/VzmRQnQqHftAlbz0Z +pHWkyQrnaFOBx+UZ6ynvPpr1r7nRQ0AFh21MnY7NXbRPJg8rBfSpcG7H3z36 +OW9pJ28nhbw3pEIFkcbRNPiKNsduuzfNlAoFfJjKiMVzWpgLlc/sABVuG4j/ +vXPmCS1VuuX2CzsqWFxhOfrrRTOt8MMhXQNXKiQ2NAmEcN+jKWqSuVk9qMCi +fH/tV0kNrS57uv+hNxWiFb9SZxIraS8sEk5jQVSY2MIpwBxbTDtYaYWthFHh +BfeGSPLGm7SPW4icDVFU2KKvUyjBfZ02/azxuupFRn6nKz9tHcimCeI/3+y4 +xoi/TT1clDOOdj23Pvf7TSoEyX+/1u4cTZNbOu9WcosKJRc25pwzj6DR6BJr +xBoq6Olt4TfhPUtz3m6mKPqE4VBWasK8K61KsOYixwQVyt9sqTq034Bm+Ous +4Zi6DDiZm7dphrHQxJUkYzloMuCbFxw88mVNe8r38aMdOjLAHfZI843Asnbm +Ag/N11gG1Ekyl656/tYe+lequOYgA38FT4x1/RzS9t0yyCeSIAMqGnHA+7ZO +O0cOhkw+yEB3AEsj74C79k9nDj96uCwIEmurDng80TIgCzHHPZKDxegvjb6f +nTV5X1GTq35thxipitzLPvO7xeMrzdXV5SHiSdCsmqau+uUdmjx8bgqQyby4 +Eq4dp/pCVEdtNk0R3naWNw9O0pW1xB+l7uzZCff6sjbG9WTv4mYp8HeK2gW0 +TkLKuFGoomSkFM2GqgSl989Eqr/nkeek2N2zfKYE35qGo7a9TZRTxEQqzx5V +hgXWq7KPlflkfId424yYVOAzv8fKnIoe+dfsRSvDyyowzqwnOeoZTdi782mO +oYIqTMrJS5ZupUs2z2qvLL5WBe47rNfbH8SKeckrD7x1UWPU3ybpt4GvMDZ1 +vMuGUx2Y/v9Hnyy8n6tg3bIRFwIf7d79n7e7aLZQBtbt0nziPP20xn9uud51 +/LeA5n+eu7W2uLNu3c6UMs6c/Vr/+ff2DPWa6XXXF66MzMdr/2fbPSTQlqT9 +Z7FTcQ2KresW2ORZvf8Q9p8L9cKCp23WrRyWrJdht27T6aruPqd1x/bMLzl7 +rvtPQbhucOS6B7Qz3heXrfvEmcI8w4p1L1TcdflZtW5eYt+i0r11G3NIiD9o +XXdTV/Hx993rNuKuVwjoW3ff3ucLwh/WPdc4EW//ad0KN3aVf//xf+IN6ARc +nPw/8fgPoJ3T63aNO/PWf/7/xGuNzRH6s+6o5UvOjcvr5lEtlT/6b91XTzXO +r62t+/8B6Prhcg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJxN13c8le//OHAhoyLZmzNRKDPj3Pf1QpSRVRTJSEiEkMysrGSPymjISLJP +GQmloVKp7ESSUiKZofidz+Pxe7x9zx/nPJ6Pc92v+3W9rut1D8Ixb0sXZiYm +JlbG1/9+F4aePyYnFuKeTLV3D0TtxbuuCgfp9EWhODV5qVupFAQCb44J96Wj +tomNY2dS1VCA+e1elr4C5BPee9EiVR9tmxJKX+qtQd6yz/x5U63QcJOp91zv +I9QU+hpDKS7IgPzj4+/ed4g2oqLDfvEMWurdnTXd+xnlTWD26uExqE2vpPBt +wSxadGINjd2RjcSHG74ek/+HzNPUikVUryN+T4fb7HoscN9Xb6hnshClKxnc +N7XigPvRcmeKCkpR/+Vdrb95uMCtyjlmZ0o5ynlftjWAwgUzz3vsxa6VI1tu +GYdlTS6wSbtw+V9FORqMllhlduaCor+t4kWvy9Enr000/rtcIHv961I4VwUa +3/OlTt2GG0y3UwqdEirQn+lLlSE3tkIJzyK9MagSJRaGv2EW2QY/bu5LZr5a +hYxU3XkFSNsg4s4PjUuFVYjjsaWVjMI2+Luq1E8tq0LnRykfjHW2AWd42bx6 +fRUKJXZ8zXTfBmxJ9BDRd1XI67rwKrVxGwg2tVVOslYji7xqeeMjvFB6TXGg +ybUa8cjneh914YVHkb+Wyz2r0ev752u8vXmh1ZZl6opvNTL6cEgjM5oXpr85 +7z12rhrpiq7qfSzjheF863J6VjVSvWx0xPsvL3x274hwaKtGQpmjCRn5fOAF +zTeeidYg4R13z/8p5oMHEpVX7knVINFHseFHq/jAJ3f/8nVyDZKcljsj08YH +fdIps26KNYhi4uN4f5wPONVO1zfr1CAV1n/qoyr8kFnmQE5xq0Fm/oJflF/w +Q/z2pIr6yhpkvnl86NJ7fnh5c9dXPnoNsixo6P87yA9Z/szBJ+trkHWn3Zun +v/ghL0T6LufDGnRU/majrYAA9J3U9uV5V4M8vuxMi3IUgI/1T7rx2RoUd9AQ +f7cgAHfV/fkklWuRKP21KPMGQTBT0mtRU69FFXwHF5U2C4JrXsb0Xq1a1PPO +vipNShACglJGj+jWIrKFP9FinyDodzlu0rWsRY/2X2PrvMI4/oyMA/vpWvTP +YP71K5oQnJ+uehpwuxalFgeX/TMQApuT6vhwOeN4NqZ4BQshyKql47rVtcjk +ySadJBchkHAu/bBYV4ty9KRrTZKF4Cuul0R4Uos0wPjSy2EhaE8/wuc9VIv8 +NG84PI8ShuHGB9/mttCR0XXuOeOLwtCgGtwfsZWOiOyh8a+zhOHClMZWDl46 +6uyyrn5/SxhsDtkbcAjRkaLPFpah18LwQZny8Y00HY0Xny2eERWBc8aBiiEq +dNTCNaZ1hiwCyQW5MvfV6Cjb3/LNooIIbPxy6tDCbjrS11X48xdEQF682MKe +RkcFHz8bsruJQPdrL7u5PXRkx286KVYrAo4nKp6pWtGRSsj9yKtNIiBq26lF +PURHmz7LChKeisDDSucEXhs6aqhkQdR+Edj39HP8Bzs6EjRuSN21JgImYB2u +cJyOJquplFoOUeDfbq8750JHj4UzG9R4RSEQLBzuutGR31evz1oUUZjgP7iP +6sGYbyRZVd+YMb7S/2XLaToqGU9rf3ZQFH7Y/jlq7UdH58zW7IzsRYG829Ty +qz8dKUgMxJidFoVLa7zVv8/S0YX6lF6bS6Lg2Z5ZXxVGR05S/zwGr4tC+1Om +4S3hdKQRe5LJ4bYo+O6xK3GMoKNvB/Tljj8QhZOm335MRtHRnl/LwV6johCv +kFqcFUdHQfsytz/8KQpXBbplr8fTUcUNhQG+BVEYSi5ou5ZAR8IHHTUbOMQg +QibseGgiHe0vXxrfzCsGK6mW7ocv0lEUW8ZlezExYMXzomWS6Ohn/ZNFFkUx +aKynX8tLpiMCr0OJ9W4x4HnV4qCTQkfWHn+sS0EM6ufZq3sYTnycxvbXUAzm +3J5+OJJKR60SO+6ZHhCD7wMnJTsZng947HLDTgzuaeuUK6fR0fbOowJzLozx +VKGaKIbt5RYfG3iLgdm5EeMWhjOiUv2vBIpBjvGx5G8Mt3+QI/+MFAPC/jeR +ywz/VW17jyeKQb9bEHGRYaVku+i0TDHY7HLGcZBh12/zyl/yxeCQnoFUKcO5 +kPJZvUQMfp5LULNjuPOKbHpClRh0lBV5zjHy2zj7UGewQQzM20MifBjWMjny +W7FNDM5Vi0m9YczPu2juemSHGDSLhI5zM1y4mmTe1S0Gd8+peyky6tN/SIZJ +ZlgMnM/vVZFn1I+7urUyaFwMlrZ3lbEx6qu3ydah47cYfD42R2u6QEeBzrPc +UitiMO8YTTNmrE9508Xm06ziwLVvYbqasZ6fBahej7nEwTRJM20qho6EvFsk +hITEgViStWctmo5M2g+/cpcWh8jgXOLnSDqKJMyENsmJAy+riEoWY//cC06U +36oiDuNPBb0EGftr4j150IkmDpNeQ/edg+lIWqE5ka4vDkZKm+eD/7cfh6d/ +2BwWh2J3XXzVh9GfGhdy7jiJg/NVVONyio7m0khGayfFgZo125/kTkdyE01L +Fv7i0KCzouPP6Bf7PdalhWHikCiUdELQibF++b8OL8aKw2mmgQenGf3WvhDP +YZQqDkknQgqjGf2pXHrf7VeBOOw8L+ndakJHbsxWQrp3xGG2aalvzICO8o5M +Pc28y8ifS2TkHtARGzeBqtUuDo/9xO3NGdcPbbfG7otvxYFpjwQrnzwd+bQe +iBkeEIcyLZM7Z8h0NOAb++X8pDiIU/Zt3cpPR1s7pDJ7F8ThynL4Q7SZ0T+U +Br3tTBJw/NiIKyszo196Jwre8ErAbQ1fC2yqFo3uirEkikvAWeWKgLLRWiR8 +QZL5DEUCti09tLjRV4siaRZOohoSUFtv/kfoYS3aZ391ZreuBNz/HawYWluL +uCMmoq1MJOB9iC++p6gW5bXFFKc6SkA/beOn6dha5Dz2bnfFSQkoRa94XgfU +ou3s0s9f+ktA/kq5PZNrLao3apxgS5CAOOst7taM+0G4J3sYOUMCXHuyvP12 +1iKD5IPcuvkScKouSb5PrBZ1vZ3aFVYtASH68qWeMzVo+jApYLZfAnRWjn31 +z65BdcE+7Nu+SEBmjAhXVFgNOpf34LLilARoNfI2PXKuQVs+HbrvziwJASd2 +i/Qp1CAZt4tMn7ZLwp8CsrhSfTWaiu9P+6cqCUj9nFfd5WpEv00liSFJgOes +pJOBjPv5VKu+9QFJsD3aOm2lVo3sz8xf6AiRhLqw7giHoipEuaQr/iNGEmqM +zE44hFcxri8p5eypkrC/VzQ763AVCv4r16lbKAkOrWeNKjmqUFa0vUBDhyQ8 +Lh2Z+9JSgTrSnl0rkpCCaDOMn+ljGdKquEI/1yIFlhfHnwV4FaE9va//TbVL +QYncK0+XzUXIlIl1r8M7KRC56Z578FYhcrb06kdjUvDVeqzd4/NNZBBCCI/Y +KA02sgc0/x5mPCdKLdzU2SENmlEvd9neu4rma1Pbl3ZKwy/H7IvNf/NR8L4d +k9Wq0tCQLGLdtCcfxZx2VCfi0nBXp0ayvz8X5bS9aGe2kIZvdqxOj0SvoMdu +1ybbAqQhxzRnM4EtExn+1eQNDZEGQoVdZ7hXBnqd2qWuGiENW4T0bpzuT0f9 +DZwRhQnS0MjS6rWzLg1NbfbnjcmThsnC9y+yKCnI7zr3buyGNBR5VresSiej +P6qlR+aLpGFNnPvlGCEJsdgPFbpUSsOmFZcJLdVEJFy1b7fBI2nI3jyNbcyN +Q/l7Ro+sPpUGk0mLfV6PYhGxPyzi3ktpCFthcdn3KwYpMNc+p3ZLw86r7ao7 +bc4j3YMSduzj0uBx5IvZdc9I9Gy8LqLlpzTYX/h6wr85ApmEWRad/S0N88wX +520FItCh4ripb8vS0Fn4MVSrMAx5/vkd0c5FgAOt9f2Lm4KQ1mlXwa+8BJi6 +bD1xfuws4vgxUMYiTIDZctw++0UAKvrQ1oMTCaCV8/Ome60/8j+o4WknQwBu +6yG3xnt+SPfVnQ3B8gTgHL1dX97mi4aas+TvqhNgxrVqe9qSD7qze9Ojd9oE +YDzVZm0i+qDgqnOHpoEAd8YLWn2LvZBggVvUDmMC6E0M2iTle6AvooNChuaM ++OZ1T22UTqKaDPNyVysC6HeHa1R1nUBmMZp9NxwY+Z2p+CixzxVJrpafajlO +gA+yckb7hFzQzwAiy0d3AmD93vGkOWcUf2KzorA/AUQkX3yS7HZC1iPhbWpB +BOgrHi0/0ueIyLZzhw+cI8BehbPTG984oFbjj9HJ8YzznRXSaTCzQ8mPLUTu +JBGgkti50a/KFtlhTyuepxOAnuKocYdig5YUK/tZ8wmgVMB0xN/IGrWXkLyJ +BQRw+pclFPznIMqWvswKJf/731Bosu4AUuaN3BlSTYCJSf1E7RMWiClx/vHl +ewSw2RpoU3vIHL1mOWl77z4BGgTZ/QvKTJHHvGXM7ycExv2oMuHDghHS8nom +uvUlAb5XFMg46hkijm/aVfKdBAjjUQhDt/aiwj7yB7cBAqymzdgn3NuDfC2u ++MQME0COI2Xg+VE9BC+42G5+IYBBj+9DHhFdxK0Xldv6nQDlqoucTt8Afby/ +sGtoigDWtzXEklMQuqPq8XRllgAqKjYvqnwxFFw+fERkiTEfM+FotwBtJHit +PfYgCxFib3YnDPftRl+EMHFfDiII0yKC/VTVUU1qdXUKFxGyVx79QbdVUQQn +dW85LxHYuOKY+zRUkFlUzuALISK8PWUVOzSkhCRXuH3HxYlg1U5Z3Ji7C/30 +i2ZnIxJhaZ9Qk1SfIop38VTWkSdCzWDgmkrqdmQ99OmZvRIRSCxrF57fkEXk +Q1ZHQ9WJ8JTs52LSRUUzb57PXNEmggStTeM5hYJa9+HxdUCEjPM1MS6ZJJT8 +sEaiW58IRQUHWu0lichOS6Z2xogIBe27vTgfSaOlHTxDClZE6IW4ctfr4mgh +XzRSxZYIPU2sQb5BomhuK4Ws6UAE2xf+SS8DhdHvyJ3P8ONEkGXeu8yZJ4im +ZjVP7nEnQuctaetvn/jRhMseLiMvIjBnbjDD9PnQeK9plZkfEbTlxnRZn21D +n+87L9iGEcGwmVZWqc6NhhW8rjhGEcEuI3PxcddmNHgtkOYaR4Qf/GNaldc4 +Uf+26GGPi4x8fvr4ncxkRz3RSVGn04hAr6KVS1dtRO/nL1HOZhNBhv1nvcw0 +C+p0K2gPzSXC7ycVC6sWzOiFcR13fBERIqKaDB+MruLPHjysTrpNhJn9Xk36 +h/7ij3d2HMyoJEJS9sCS1b8l/OGNnsXLdCKQxyxyzd4t4s18IzlXG4jgb18s +2fluHr8fM4EVNhMh7LJrcvnKLF6/OP+ptI0I7bZUs1nDGbzmwyaZu6+IMDQ+ +8vz+pSm8cr/Ai8Z3RNiqU/iNd34Cv9Midaq1l1F/qdwqo4TveKnSdp6ng0Qo +A1klTfNvePFN1dqXI0QYsPGPWNUfw28KIOu3X4mQNZykxOQ2il+PM1zqmSBC +lAon01jlCJ6/dCBvcJoIgcOC91IlPuE5Hvbo8zwRvsWwZILtR/zSxxOfvy0T +oUNsy7GOugE808wvZnKNCG+Sv754ZdqHpz0Mk51lJYF4lgStTLQHT1aJf/mH +kwQF9U7uRKEuPLEo3WuVmwQTC5r+uvAOjxfK38bKT4III+2TrumdeExCCZ1T +hASpp97vcOR/jUetVB/aKkmC0aMzNDbDl3j4qaZlfhIJHjmeGWN60I6HDj/N +F5UlweVk5UUWj6d4kMVbkFYgwZZJA4qC6WM8oO3DKEWZBEUjXr5/nR7hfmpf +Y3fsJkGfO5vo/oJW3KdkWk6JRgJOYtZAvmAz7iWy0qGuQ4Kc27YYk8p93CNx +ow/NgAR7/iX+MM2ox0/828qna0yCx0K6T/KV7uGu3qL39pqToHhb349QDjru +PEK22W9Fgl0BLnt/8dbgjgd2/rW0JcFA6O43TiZV+NEnmtcOO5CAELajxMCp +HLfdvUfX/jgJVnGx9w1nb+OHSk3HnN1JYKDfXyvQXYIfFLOJd/ciwW3jJdJP +3yLcIsl5h7cfCWKfLIvYGd/ETddOvfYPJEHLh8CjbDY3cOPTgaeDwxj1GkLS +bIrX8H2jUfwRUSRQkHReqtyQh+tbJdXFxJGgYk4FHyZfwXWfXbJNvMhwfV4N +ITUbR5oF/1LTSCBnUp1eQcvEaWV3rmdnk+DhX02Pw+R0/IN02TX9XBLcXJVl +PeuYigdnl16du8aoJwdFdzQpCRfeciv/ZiEJpnku3p0tuYDXRRbnWZaSIHKP +uZkcRzxuvViYu6GCBMP37+rK3IrB5zxv5lTVkGCbos8liahoPOPzjSsOdSQQ +Op1660FqJK58+Ppl7iYShGTlsDtcDcffvrp66UErCXrrBVR4fENxH738bM8n +JJit/H00IjMI39qQmyX2ggQNC1s5D68G4BWKOZkvXjPWw+bW3m+3/PH9hZcz +gt6ToGbjlzShZF/8p8ildNk+Evg+La2zv+WDX0jJSusdJEFJ43KTy9gpXG5j +ZmrsCAmoK6cmVztP4u3B6SlqX0mQNmK6Q33zCdx1OjX5yw8SHD43axB60QXf +6JqSlPGLBBx7cq/M7XfGCz8kXdSdI8GpVczSxdAJ17O4mPj7DwkS8o5IW87Y +45+fXrhw/R8Jfhh5OutVHcEjaQkJZsxkEJs4EXa47TAuXRMXv8pGhp6uhuod +JGu8RSY2rnwzGUzNpjVJ7Qdw+/zzsXY8ZIjJeN1mX2aB/+WNjtksQIaO5xe5 +9yeZ4bnxkecbRchw9fvv4jpZE1xrNTzaXZIMJEuv8W5JQ7zP71yUMIkMco8u +lYS6GuBnv4dGPpMhw5nBpTCXRT1c0CEkIkCeDLLHbF1FXujgd7uCwilKZNg0 +khHZWInwg0aB57rUyFCd9W87qNHw2ZaAsGgtMihGHh7pFtHE09XOhCojMuP9 +n8O98IA6rlTmFzKiRwZPrCSqs18F75T2DU7dRwaHwyF3jhUq4V7ZPkFoPxms +X/Vgxw7vxLm2eAdOWZCBPUqv8FL3DvxO5Kmz+dZkMErXaO6iy+JGix4BJkfI +cPefHblugoJ/9zx5ZsWBDAuEnzyTPiQ8/vMJ/9vHyVBfMeMuSiPgMofd/Gzc +GfWKCqFHJEriT1+5+HJ4kYHYWRxiyi2Gu+gdP13ny5jPozuHsuaEcNaGYz6u +Z8nwvK2uL1lFAL+p6OQtEMrIX3LNJvshL65b6OD1OIIM2sHDWZuzefBPIvan +/GLIwMUmreJjyYWHp9h5Ei+Qwc02usRrnBOX3HjE420yY/yy4NrDETa8Kdjm +ZEQGGUaz1Vw8VFjxI9OH3HdeJsNtybN3c95vwJddrE8M5ZEhUHlyUsJvDbvy +4aBb0g0yJJ58zjLXuIJpWBxwpRWT4V3tbebXPn+w3qcWLhO3ybAh/SH/3vh5 +LIBmfjynkgxJ44E81gszmECNqbMhnZGPxbsY2eppjC6z/9ifejL4WUoqsjhO +Ypb5xk4lD8hgrnk6SKPnO/ab18jR+hEjHydTGqHuK9bnSew8+YwM0lsyxLua +R7HWp8sovIMMZmzjG1/JjGC3pN9XZrwlg+3Q9pvPXn7EUoPLpG71kGHeuGCx +Z7AfC+yKTmn6QAbHDJczm3x6MEdFu7XOT2Tg6YgP/u3/HtsXr+o9NkaGZ80l +TMSPndiuz1uGl36QYbVyrW9u9ytMmDZmyj1Nht8/Z1S6TZ5jTNkPmonzZHg5 +EHIrduwJNv4rS3H3Mhkqa7cwCf1+hL0x9LpqvEYGjr88RXTHVuzeTQNuR1YK +cBrysvWZNmFX/0me8+ekwP5tTYX9fvVY7KHFyXhuChzWe91xR/wu5lX95mg+ +HwUSwqTs+DVqMOvNt15VC1NggK+7kdurEsNdIrCnEhSoyJWx7hYuw6gth8sH +iBRgaVjQKLYpwbhElCR+yVCgbcelwKvihdicL2cSiwIFCES+vd7mN7DBjpG/ +QsoUIDrLP+DvyMceUxs95XdTIK7vdWD19SvYnYj0QaBR4HUG39AcezaWOXDS +xEqHAinGd1rEp9KxUFW9JncDRjz2DbrMuqnY8WQx+XPGFEDPay/FfU/EjMdn +c9PNKeDfl5k1OxOHKet2bC6xokD+B7bp7wnnMdG8wpD7thTYNcw0xpkbiTEv +hE68caDAD6t3ecI7zmE/zKyOfDnOqNdMRVhfdxD2rlTh5R93CkxtmilSkwjA +GlnYtLm8KeCkhhUETfhiBUeHbhP8KcA+vbl+RMEHS6i7J6oeRIEH1W5p/rc8 +MJ9tKReMzlFAmpvnCvcNN+ywh9uyfTQF6gp4g3wUjmPwBJ30i6dAxxfdiZca +TpislPBAXBIFpi3qtVyOHcV4gqYN89Ip0N1rxeXCbYP9edfeUHWJAtckcsZW +ba2wT/I35J7kUUBhQ6+QuZIl1h4bdKX/BgUudXBcPrBiilV9suCcKmacz/jr +HNgbYZe1tgcx36HASpLyVisvAywik/m7YDUF2j0aWC/z6mFuUwOHd9yjwEHr +L+m5aoCZ7qttR/cpgLl0WS0naGPqBYkaB1spUPJH9OiM025M8q/zrRNPKFD8 +LV1ItE8FY7OmCYe9oEDvLVF/k+5d2FQlf3zaGwqMMn0MPJ0oj/VwTi4WdVEg +9KeTZdcuWazZ+YlbYz8FAif6jVvDyFjxg/ze10MUEGLPYD5pQ8CShQL2jo5S +wPjoAaM9RyWwgNOmdYvjjP3DzR9d0COM2b+kymyZooDDEV39LUwCmD5lLVt6 +lgK+0+UOsi3bMPnwXja1P4z9U9vvtLrMhfH3VwYY/qNAVkdabLcZJ/ZXOf7r +UWYq/LHKaFG324h9ueho7ctOBRdWzpAjrMyY1w954q4tVLC+X1Bo3rhKW9y7 +NDnJQwWRGUEvVaVlWkTRk4YyASo4cowOkC0WaJtY0mPcRamg/tPy/PCGWVqm +o72FjBQVzEaWW1IUp2kSzdslxkiM8c/pEqUXJmjFYovjBbJUaDVJDKw49Y22 +K6iN7qhAhenSs0OfJkZpjT0pEZLKVPj4KiGwduoTTU/VzmRQnQqHftAlbz0Z +pHWkyQrnaFOBx+UZ6ynvPpr1r7nRQ0AFh21MnY7NXbRPJg8rBfSpcG7H3z36 +OW9pJ28nhbw3pEIFkcbRNPiKNsduuzfNlAoFfJjKiMVzWpgLlc/sABVuG4j/ +vXPmCS1VuuX2CzsqWFxhOfrrRTOt8MMhXQNXKiQ2NAmEcN+jKWqSuVk9qMCi +fH/tV0kNrS57uv+hNxWiFb9SZxIraS8sEk5jQVSY2MIpwBxbTDtYaYWthFHh +BfeGSPLGm7SPW4icDVFU2KKvUyjBfZ02/azxuupFRn6nKz9tHcimCeI/3+y4 +xoi/TT1clDOOdj23Pvf7TSoEyX+/1u4cTZNbOu9WcosKJRc25pwzj6DR6BJr +xBoq6Olt4TfhPUtz3m6mKPqE4VBWasK8K61KsOYixwQVyt9sqTq034Bm+Ous +4Zi6DDiZm7dphrHQxJUkYzloMuCbFxw88mVNe8r38aMdOjLAHfZI843Asnbm +Ag/N11gG1Ekyl656/tYe+lequOYgA38FT4x1/RzS9t0yyCeSIAMqGnHA+7ZO +O0cOhkw+yEB3AEsj74C79k9nDj96uCwIEmurDng80TIgCzHHPZKDxegvjb6f +nTV5X1GTq35thxipitzLPvO7xeMrzdXV5SHiSdCsmqau+uUdmjx8bgqQyby4 +Eq4dp/pCVEdtNk0R3naWNw9O0pW1xB+l7uzZCff6sjbG9WTv4mYp8HeK2gW0 +TkLKuFGoomSkFM2GqgSl989Eqr/nkeek2N2zfKYE35qGo7a9TZRTxEQqzx5V +hgXWq7KPlflkfId424yYVOAzv8fKnIoe+dfsRSvDyyowzqwnOeoZTdi782mO +oYIqTMrJS5ZupUs2z2qvLL5WBe47rNfbH8SKeckrD7x1UWPU3ybpt4GvMDZ1 +vMuGUx2Y/v9Hnyy8n6tg3bIRFwIf7d79n7e7aLZQBtbt0nziPP20xn9uud51 +/LeA5n+eu7W2uLNu3c6UMs6c/Vr/+ff2DPWa6XXXF66MzMdr/2fbPSTQlqT9 +Z7FTcQ2KresW2ORZvf8Q9p8L9cKCp23WrRyWrJdht27T6aruPqd1x/bMLzl7 +rvtPQbhucOS6B7Qz3heXrfvEmcI8w4p1L1TcdflZtW5eYt+i0r11G3NIiD9o +XXdTV/Hx993rNuKuVwjoW3ff3ucLwh/WPdc4EW//ad0KN3aVf//xf+IN6ARc +nPw/8fgPoJ3T63aNO/PWf/7/xGuNzRH6s+6o5UvOjcvr5lEtlT/6b91XTzXO +r62t+/8B6Prhcg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0803524557989488}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0803524557989488}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJxN13c8le//OHAhoyLZmzNRKDPj3Pf1QpSRVRTJSEiEkMysrGSPymjISLJP +GQmloVKp7ESSUiKZofidz+Pxe7x9zx/nPJ6Pc92v+3W9rut1D8Ixb0sXZiYm +JlbG1/9+F4aePyYnFuKeTLV3D0TtxbuuCgfp9EWhODV5qVupFAQCb44J96Wj +tomNY2dS1VCA+e1elr4C5BPee9EiVR9tmxJKX+qtQd6yz/x5U63QcJOp91zv +I9QU+hpDKS7IgPzj4+/ed4g2oqLDfvEMWurdnTXd+xnlTWD26uExqE2vpPBt +wSxadGINjd2RjcSHG74ek/+HzNPUikVUryN+T4fb7HoscN9Xb6hnshClKxnc +N7XigPvRcmeKCkpR/+Vdrb95uMCtyjlmZ0o5ynlftjWAwgUzz3vsxa6VI1tu +GYdlTS6wSbtw+V9FORqMllhlduaCor+t4kWvy9Enr000/rtcIHv961I4VwUa +3/OlTt2GG0y3UwqdEirQn+lLlSE3tkIJzyK9MagSJRaGv2EW2QY/bu5LZr5a +hYxU3XkFSNsg4s4PjUuFVYjjsaWVjMI2+Luq1E8tq0LnRykfjHW2AWd42bx6 +fRUKJXZ8zXTfBmxJ9BDRd1XI67rwKrVxGwg2tVVOslYji7xqeeMjvFB6TXGg +ybUa8cjneh914YVHkb+Wyz2r0ev752u8vXmh1ZZl6opvNTL6cEgjM5oXpr85 +7z12rhrpiq7qfSzjheF863J6VjVSvWx0xPsvL3x274hwaKtGQpmjCRn5fOAF +zTeeidYg4R13z/8p5oMHEpVX7knVINFHseFHq/jAJ3f/8nVyDZKcljsj08YH +fdIps26KNYhi4uN4f5wPONVO1zfr1CAV1n/qoyr8kFnmQE5xq0Fm/oJflF/w +Q/z2pIr6yhpkvnl86NJ7fnh5c9dXPnoNsixo6P87yA9Z/szBJ+trkHWn3Zun +v/ghL0T6LufDGnRU/majrYAA9J3U9uV5V4M8vuxMi3IUgI/1T7rx2RoUd9AQ +f7cgAHfV/fkklWuRKP21KPMGQTBT0mtRU69FFXwHF5U2C4JrXsb0Xq1a1PPO +vipNShACglJGj+jWIrKFP9FinyDodzlu0rWsRY/2X2PrvMI4/oyMA/vpWvTP +YP71K5oQnJ+uehpwuxalFgeX/TMQApuT6vhwOeN4NqZ4BQshyKql47rVtcjk +ySadJBchkHAu/bBYV4ty9KRrTZKF4Cuul0R4Uos0wPjSy2EhaE8/wuc9VIv8 +NG84PI8ShuHGB9/mttCR0XXuOeOLwtCgGtwfsZWOiOyh8a+zhOHClMZWDl46 +6uyyrn5/SxhsDtkbcAjRkaLPFpah18LwQZny8Y00HY0Xny2eERWBc8aBiiEq +dNTCNaZ1hiwCyQW5MvfV6Cjb3/LNooIIbPxy6tDCbjrS11X48xdEQF682MKe +RkcFHz8bsruJQPdrL7u5PXRkx286KVYrAo4nKp6pWtGRSsj9yKtNIiBq26lF +PURHmz7LChKeisDDSucEXhs6aqhkQdR+Edj39HP8Bzs6EjRuSN21JgImYB2u +cJyOJquplFoOUeDfbq8750JHj4UzG9R4RSEQLBzuutGR31evz1oUUZjgP7iP +6sGYbyRZVd+YMb7S/2XLaToqGU9rf3ZQFH7Y/jlq7UdH58zW7IzsRYG829Ty +qz8dKUgMxJidFoVLa7zVv8/S0YX6lF6bS6Lg2Z5ZXxVGR05S/zwGr4tC+1Om +4S3hdKQRe5LJ4bYo+O6xK3GMoKNvB/Tljj8QhZOm335MRtHRnl/LwV6johCv +kFqcFUdHQfsytz/8KQpXBbplr8fTUcUNhQG+BVEYSi5ou5ZAR8IHHTUbOMQg +QibseGgiHe0vXxrfzCsGK6mW7ocv0lEUW8ZlezExYMXzomWS6Ohn/ZNFFkUx +aKynX8tLpiMCr0OJ9W4x4HnV4qCTQkfWHn+sS0EM6ufZq3sYTnycxvbXUAzm +3J5+OJJKR60SO+6ZHhCD7wMnJTsZng947HLDTgzuaeuUK6fR0fbOowJzLozx +VKGaKIbt5RYfG3iLgdm5EeMWhjOiUv2vBIpBjvGx5G8Mt3+QI/+MFAPC/jeR +ywz/VW17jyeKQb9bEHGRYaVku+i0TDHY7HLGcZBh12/zyl/yxeCQnoFUKcO5 +kPJZvUQMfp5LULNjuPOKbHpClRh0lBV5zjHy2zj7UGewQQzM20MifBjWMjny +W7FNDM5Vi0m9YczPu2juemSHGDSLhI5zM1y4mmTe1S0Gd8+peyky6tN/SIZJ +ZlgMnM/vVZFn1I+7urUyaFwMlrZ3lbEx6qu3ydah47cYfD42R2u6QEeBzrPc +UitiMO8YTTNmrE9508Xm06ziwLVvYbqasZ6fBahej7nEwTRJM20qho6EvFsk +hITEgViStWctmo5M2g+/cpcWh8jgXOLnSDqKJMyENsmJAy+riEoWY//cC06U +36oiDuNPBb0EGftr4j150IkmDpNeQ/edg+lIWqE5ka4vDkZKm+eD/7cfh6d/ +2BwWh2J3XXzVh9GfGhdy7jiJg/NVVONyio7m0khGayfFgZo125/kTkdyE01L +Fv7i0KCzouPP6Bf7PdalhWHikCiUdELQibF++b8OL8aKw2mmgQenGf3WvhDP +YZQqDkknQgqjGf2pXHrf7VeBOOw8L+ndakJHbsxWQrp3xGG2aalvzICO8o5M +Pc28y8ifS2TkHtARGzeBqtUuDo/9xO3NGdcPbbfG7otvxYFpjwQrnzwd+bQe +iBkeEIcyLZM7Z8h0NOAb++X8pDiIU/Zt3cpPR1s7pDJ7F8ThynL4Q7SZ0T+U +Br3tTBJw/NiIKyszo196Jwre8ErAbQ1fC2yqFo3uirEkikvAWeWKgLLRWiR8 +QZL5DEUCti09tLjRV4siaRZOohoSUFtv/kfoYS3aZ391ZreuBNz/HawYWluL +uCMmoq1MJOB9iC++p6gW5bXFFKc6SkA/beOn6dha5Dz2bnfFSQkoRa94XgfU +ou3s0s9f+ktA/kq5PZNrLao3apxgS5CAOOst7taM+0G4J3sYOUMCXHuyvP12 +1iKD5IPcuvkScKouSb5PrBZ1vZ3aFVYtASH68qWeMzVo+jApYLZfAnRWjn31 +z65BdcE+7Nu+SEBmjAhXVFgNOpf34LLilARoNfI2PXKuQVs+HbrvziwJASd2 +i/Qp1CAZt4tMn7ZLwp8CsrhSfTWaiu9P+6cqCUj9nFfd5WpEv00liSFJgOes +pJOBjPv5VKu+9QFJsD3aOm2lVo3sz8xf6AiRhLqw7giHoipEuaQr/iNGEmqM +zE44hFcxri8p5eypkrC/VzQ763AVCv4r16lbKAkOrWeNKjmqUFa0vUBDhyQ8 +Lh2Z+9JSgTrSnl0rkpCCaDOMn+ljGdKquEI/1yIFlhfHnwV4FaE9va//TbVL +QYncK0+XzUXIlIl1r8M7KRC56Z578FYhcrb06kdjUvDVeqzd4/NNZBBCCI/Y +KA02sgc0/x5mPCdKLdzU2SENmlEvd9neu4rma1Pbl3ZKwy/H7IvNf/NR8L4d +k9Wq0tCQLGLdtCcfxZx2VCfi0nBXp0ayvz8X5bS9aGe2kIZvdqxOj0SvoMdu +1ybbAqQhxzRnM4EtExn+1eQNDZEGQoVdZ7hXBnqd2qWuGiENW4T0bpzuT0f9 +DZwRhQnS0MjS6rWzLg1NbfbnjcmThsnC9y+yKCnI7zr3buyGNBR5VresSiej +P6qlR+aLpGFNnPvlGCEJsdgPFbpUSsOmFZcJLdVEJFy1b7fBI2nI3jyNbcyN +Q/l7Ro+sPpUGk0mLfV6PYhGxPyzi3ktpCFthcdn3KwYpMNc+p3ZLw86r7ao7 +bc4j3YMSduzj0uBx5IvZdc9I9Gy8LqLlpzTYX/h6wr85ApmEWRad/S0N88wX +520FItCh4ripb8vS0Fn4MVSrMAx5/vkd0c5FgAOt9f2Lm4KQ1mlXwa+8BJi6 +bD1xfuws4vgxUMYiTIDZctw++0UAKvrQ1oMTCaCV8/Ome60/8j+o4WknQwBu +6yG3xnt+SPfVnQ3B8gTgHL1dX97mi4aas+TvqhNgxrVqe9qSD7qze9Ojd9oE +YDzVZm0i+qDgqnOHpoEAd8YLWn2LvZBggVvUDmMC6E0M2iTle6AvooNChuaM ++OZ1T22UTqKaDPNyVysC6HeHa1R1nUBmMZp9NxwY+Z2p+CixzxVJrpafajlO +gA+yckb7hFzQzwAiy0d3AmD93vGkOWcUf2KzorA/AUQkX3yS7HZC1iPhbWpB +BOgrHi0/0ueIyLZzhw+cI8BehbPTG984oFbjj9HJ8YzznRXSaTCzQ8mPLUTu +JBGgkti50a/KFtlhTyuepxOAnuKocYdig5YUK/tZ8wmgVMB0xN/IGrWXkLyJ +BQRw+pclFPznIMqWvswKJf/731Bosu4AUuaN3BlSTYCJSf1E7RMWiClx/vHl +ewSw2RpoU3vIHL1mOWl77z4BGgTZ/QvKTJHHvGXM7ycExv2oMuHDghHS8nom +uvUlAb5XFMg46hkijm/aVfKdBAjjUQhDt/aiwj7yB7cBAqymzdgn3NuDfC2u ++MQME0COI2Xg+VE9BC+42G5+IYBBj+9DHhFdxK0Xldv6nQDlqoucTt8Afby/ +sGtoigDWtzXEklMQuqPq8XRllgAqKjYvqnwxFFw+fERkiTEfM+FotwBtJHit +PfYgCxFib3YnDPftRl+EMHFfDiII0yKC/VTVUU1qdXUKFxGyVx79QbdVUQQn +dW85LxHYuOKY+zRUkFlUzuALISK8PWUVOzSkhCRXuH3HxYlg1U5Z3Ji7C/30 +i2ZnIxJhaZ9Qk1SfIop38VTWkSdCzWDgmkrqdmQ99OmZvRIRSCxrF57fkEXk +Q1ZHQ9WJ8JTs52LSRUUzb57PXNEmggStTeM5hYJa9+HxdUCEjPM1MS6ZJJT8 +sEaiW58IRQUHWu0lichOS6Z2xogIBe27vTgfSaOlHTxDClZE6IW4ctfr4mgh +XzRSxZYIPU2sQb5BomhuK4Ws6UAE2xf+SS8DhdHvyJ3P8ONEkGXeu8yZJ4im +ZjVP7nEnQuctaetvn/jRhMseLiMvIjBnbjDD9PnQeK9plZkfEbTlxnRZn21D +n+87L9iGEcGwmVZWqc6NhhW8rjhGEcEuI3PxcddmNHgtkOYaR4Qf/GNaldc4 +Uf+26GGPi4x8fvr4ncxkRz3RSVGn04hAr6KVS1dtRO/nL1HOZhNBhv1nvcw0 +C+p0K2gPzSXC7ycVC6sWzOiFcR13fBERIqKaDB+MruLPHjysTrpNhJn9Xk36 +h/7ij3d2HMyoJEJS9sCS1b8l/OGNnsXLdCKQxyxyzd4t4s18IzlXG4jgb18s +2fluHr8fM4EVNhMh7LJrcvnKLF6/OP+ptI0I7bZUs1nDGbzmwyaZu6+IMDQ+ +8vz+pSm8cr/Ai8Z3RNiqU/iNd34Cv9Midaq1l1F/qdwqo4TveKnSdp6ng0Qo +A1klTfNvePFN1dqXI0QYsPGPWNUfw28KIOu3X4mQNZykxOQ2il+PM1zqmSBC +lAon01jlCJ6/dCBvcJoIgcOC91IlPuE5Hvbo8zwRvsWwZILtR/zSxxOfvy0T +oUNsy7GOugE808wvZnKNCG+Sv754ZdqHpz0Mk51lJYF4lgStTLQHT1aJf/mH +kwQF9U7uRKEuPLEo3WuVmwQTC5r+uvAOjxfK38bKT4III+2TrumdeExCCZ1T +hASpp97vcOR/jUetVB/aKkmC0aMzNDbDl3j4qaZlfhIJHjmeGWN60I6HDj/N +F5UlweVk5UUWj6d4kMVbkFYgwZZJA4qC6WM8oO3DKEWZBEUjXr5/nR7hfmpf +Y3fsJkGfO5vo/oJW3KdkWk6JRgJOYtZAvmAz7iWy0qGuQ4Kc27YYk8p93CNx +ow/NgAR7/iX+MM2ox0/828qna0yCx0K6T/KV7uGu3qL39pqToHhb349QDjru +PEK22W9Fgl0BLnt/8dbgjgd2/rW0JcFA6O43TiZV+NEnmtcOO5CAELajxMCp +HLfdvUfX/jgJVnGx9w1nb+OHSk3HnN1JYKDfXyvQXYIfFLOJd/ciwW3jJdJP +3yLcIsl5h7cfCWKfLIvYGd/ETddOvfYPJEHLh8CjbDY3cOPTgaeDwxj1GkLS +bIrX8H2jUfwRUSRQkHReqtyQh+tbJdXFxJGgYk4FHyZfwXWfXbJNvMhwfV4N +ITUbR5oF/1LTSCBnUp1eQcvEaWV3rmdnk+DhX02Pw+R0/IN02TX9XBLcXJVl +PeuYigdnl16du8aoJwdFdzQpCRfeciv/ZiEJpnku3p0tuYDXRRbnWZaSIHKP +uZkcRzxuvViYu6GCBMP37+rK3IrB5zxv5lTVkGCbos8liahoPOPzjSsOdSQQ +Op1660FqJK58+Ppl7iYShGTlsDtcDcffvrp66UErCXrrBVR4fENxH738bM8n +JJit/H00IjMI39qQmyX2ggQNC1s5D68G4BWKOZkvXjPWw+bW3m+3/PH9hZcz +gt6ToGbjlzShZF/8p8ildNk+Evg+La2zv+WDX0jJSusdJEFJ43KTy9gpXG5j +ZmrsCAmoK6cmVztP4u3B6SlqX0mQNmK6Q33zCdx1OjX5yw8SHD43axB60QXf +6JqSlPGLBBx7cq/M7XfGCz8kXdSdI8GpVczSxdAJ17O4mPj7DwkS8o5IW87Y +45+fXrhw/R8Jfhh5OutVHcEjaQkJZsxkEJs4EXa47TAuXRMXv8pGhp6uhuod +JGu8RSY2rnwzGUzNpjVJ7Qdw+/zzsXY8ZIjJeN1mX2aB/+WNjtksQIaO5xe5 +9yeZ4bnxkecbRchw9fvv4jpZE1xrNTzaXZIMJEuv8W5JQ7zP71yUMIkMco8u +lYS6GuBnv4dGPpMhw5nBpTCXRT1c0CEkIkCeDLLHbF1FXujgd7uCwilKZNg0 +khHZWInwg0aB57rUyFCd9W87qNHw2ZaAsGgtMihGHh7pFtHE09XOhCojMuP9 +n8O98IA6rlTmFzKiRwZPrCSqs18F75T2DU7dRwaHwyF3jhUq4V7ZPkFoPxms +X/Vgxw7vxLm2eAdOWZCBPUqv8FL3DvxO5Kmz+dZkMErXaO6iy+JGix4BJkfI +cPefHblugoJ/9zx5ZsWBDAuEnzyTPiQ8/vMJ/9vHyVBfMeMuSiPgMofd/Gzc +GfWKCqFHJEriT1+5+HJ4kYHYWRxiyi2Gu+gdP13ny5jPozuHsuaEcNaGYz6u +Z8nwvK2uL1lFAL+p6OQtEMrIX3LNJvshL65b6OD1OIIM2sHDWZuzefBPIvan +/GLIwMUmreJjyYWHp9h5Ei+Qwc02usRrnBOX3HjE420yY/yy4NrDETa8Kdjm +ZEQGGUaz1Vw8VFjxI9OH3HdeJsNtybN3c95vwJddrE8M5ZEhUHlyUsJvDbvy +4aBb0g0yJJ58zjLXuIJpWBxwpRWT4V3tbebXPn+w3qcWLhO3ybAh/SH/3vh5 +LIBmfjynkgxJ44E81gszmECNqbMhnZGPxbsY2eppjC6z/9ifejL4WUoqsjhO +Ypb5xk4lD8hgrnk6SKPnO/ab18jR+hEjHydTGqHuK9bnSew8+YwM0lsyxLua +R7HWp8sovIMMZmzjG1/JjGC3pN9XZrwlg+3Q9pvPXn7EUoPLpG71kGHeuGCx +Z7AfC+yKTmn6QAbHDJczm3x6MEdFu7XOT2Tg6YgP/u3/HtsXr+o9NkaGZ80l +TMSPndiuz1uGl36QYbVyrW9u9ytMmDZmyj1Nht8/Z1S6TZ5jTNkPmonzZHg5 +EHIrduwJNv4rS3H3Mhkqa7cwCf1+hL0x9LpqvEYGjr88RXTHVuzeTQNuR1YK +cBrysvWZNmFX/0me8+ekwP5tTYX9fvVY7KHFyXhuChzWe91xR/wu5lX95mg+ +HwUSwqTs+DVqMOvNt15VC1NggK+7kdurEsNdIrCnEhSoyJWx7hYuw6gth8sH +iBRgaVjQKLYpwbhElCR+yVCgbcelwKvihdicL2cSiwIFCES+vd7mN7DBjpG/ +QsoUIDrLP+DvyMceUxs95XdTIK7vdWD19SvYnYj0QaBR4HUG39AcezaWOXDS +xEqHAinGd1rEp9KxUFW9JncDRjz2DbrMuqnY8WQx+XPGFEDPay/FfU/EjMdn +c9PNKeDfl5k1OxOHKet2bC6xokD+B7bp7wnnMdG8wpD7thTYNcw0xpkbiTEv +hE68caDAD6t3ecI7zmE/zKyOfDnOqNdMRVhfdxD2rlTh5R93CkxtmilSkwjA +GlnYtLm8KeCkhhUETfhiBUeHbhP8KcA+vbl+RMEHS6i7J6oeRIEH1W5p/rc8 +MJ9tKReMzlFAmpvnCvcNN+ywh9uyfTQF6gp4g3wUjmPwBJ30i6dAxxfdiZca +TpislPBAXBIFpi3qtVyOHcV4gqYN89Ip0N1rxeXCbYP9edfeUHWJAtckcsZW +ba2wT/I35J7kUUBhQ6+QuZIl1h4bdKX/BgUudXBcPrBiilV9suCcKmacz/jr +HNgbYZe1tgcx36HASpLyVisvAywik/m7YDUF2j0aWC/z6mFuUwOHd9yjwEHr +L+m5aoCZ7qttR/cpgLl0WS0naGPqBYkaB1spUPJH9OiM025M8q/zrRNPKFD8 +LV1ItE8FY7OmCYe9oEDvLVF/k+5d2FQlf3zaGwqMMn0MPJ0oj/VwTi4WdVEg +9KeTZdcuWazZ+YlbYz8FAif6jVvDyFjxg/ze10MUEGLPYD5pQ8CShQL2jo5S +wPjoAaM9RyWwgNOmdYvjjP3DzR9d0COM2b+kymyZooDDEV39LUwCmD5lLVt6 +lgK+0+UOsi3bMPnwXja1P4z9U9vvtLrMhfH3VwYY/qNAVkdabLcZJ/ZXOf7r +UWYq/LHKaFG324h9ueho7ctOBRdWzpAjrMyY1w954q4tVLC+X1Bo3rhKW9y7 +NDnJQwWRGUEvVaVlWkTRk4YyASo4cowOkC0WaJtY0mPcRamg/tPy/PCGWVqm +o72FjBQVzEaWW1IUp2kSzdslxkiM8c/pEqUXJmjFYovjBbJUaDVJDKw49Y22 +K6iN7qhAhenSs0OfJkZpjT0pEZLKVPj4KiGwduoTTU/VzmRQnQqHftAlbz0Z +pHWkyQrnaFOBx+UZ6ynvPpr1r7nRQ0AFh21MnY7NXbRPJg8rBfSpcG7H3z36 +OW9pJ28nhbw3pEIFkcbRNPiKNsduuzfNlAoFfJjKiMVzWpgLlc/sABVuG4j/ +vXPmCS1VuuX2CzsqWFxhOfrrRTOt8MMhXQNXKiQ2NAmEcN+jKWqSuVk9qMCi +fH/tV0kNrS57uv+hNxWiFb9SZxIraS8sEk5jQVSY2MIpwBxbTDtYaYWthFHh +BfeGSPLGm7SPW4icDVFU2KKvUyjBfZ02/azxuupFRn6nKz9tHcimCeI/3+y4 +xoi/TT1clDOOdj23Pvf7TSoEyX+/1u4cTZNbOu9WcosKJRc25pwzj6DR6BJr +xBoq6Olt4TfhPUtz3m6mKPqE4VBWasK8K61KsOYixwQVyt9sqTq034Bm+Ous +4Zi6DDiZm7dphrHQxJUkYzloMuCbFxw88mVNe8r38aMdOjLAHfZI843Asnbm +Ag/N11gG1Ekyl656/tYe+lequOYgA38FT4x1/RzS9t0yyCeSIAMqGnHA+7ZO +O0cOhkw+yEB3AEsj74C79k9nDj96uCwIEmurDng80TIgCzHHPZKDxegvjb6f +nTV5X1GTq35thxipitzLPvO7xeMrzdXV5SHiSdCsmqau+uUdmjx8bgqQyby4 +Eq4dp/pCVEdtNk0R3naWNw9O0pW1xB+l7uzZCff6sjbG9WTv4mYp8HeK2gW0 +TkLKuFGoomSkFM2GqgSl989Eqr/nkeek2N2zfKYE35qGo7a9TZRTxEQqzx5V +hgXWq7KPlflkfId424yYVOAzv8fKnIoe+dfsRSvDyyowzqwnOeoZTdi782mO +oYIqTMrJS5ZupUs2z2qvLL5WBe47rNfbH8SKeckrD7x1UWPU3ybpt4GvMDZ1 +vMuGUx2Y/v9Hnyy8n6tg3bIRFwIf7d79n7e7aLZQBtbt0nziPP20xn9uud51 +/LeA5n+eu7W2uLNu3c6UMs6c/Vr/+ff2DPWa6XXXF66MzMdr/2fbPSTQlqT9 +Z7FTcQ2KresW2ORZvf8Q9p8L9cKCp23WrRyWrJdht27T6aruPqd1x/bMLzl7 +rvtPQbhucOS6B7Qz3heXrfvEmcI8w4p1L1TcdflZtW5eYt+i0r11G3NIiD9o +XXdTV/Hx993rNuKuVwjoW3ff3ucLwh/WPdc4EW//ad0KN3aVf//xf+IN6ARc +nPw/8fgPoJ3T63aNO/PWf/7/xGuNzRH6s+6o5UvOjcvr5lEtlT/6b91XTzXO +r62t+/8B6Prhcg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0803524557989488}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0803524557989488}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993830242301742*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"d4592850-ab51-4dfd-b020-0043ae218e5b"] }, Open ]], Cell[CellGroupData[{ @@ -2633,18 +9125,14 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[100]:=",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], - -Cell[BoxData["15.784298544249623`"], "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[BoxData["2.168225412773097`"], "Output", + CellChangeTimes->{3.993830319929826*^9}, + CellLabel-> + "Out[100]=",ExpressionUUID->"50afe546-65be-4f12-9e45-2ad4c2a431f7"] }, Open ]], Cell[CellGroupData[{ @@ -2711,27 +9199,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850595832054*^9, - 3.991850600247154*^9}},ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-\ -8e83e9537fdc"], + CellChangeTimes->{{3.991850595832054*^9, 3.991850600247154*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56921c73-2b67-0e4a-9808-5f61de992c7e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.25528434250971`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 17, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303199731417`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"c81933db-dfe1-4298-943a-341a96a247d3"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7208064409749957`*^-96\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 18, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830319978508*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"96a4aa40-78c1-4d5e-b715-a994e754203b"], -Cell[BoxData["0.009432406283458074`"], "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.096516604193377`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 19, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303199832087`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"d1747c0e-278d-457c-bccb-396b3d0c7db8"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 101, 20, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303199871883`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"80060ddb-d65d-4afd-b37c-e962a0893bb1"], + +Cell[BoxData["2.1815116047831737`"], "Output", + CellChangeTimes->{3.993830329028481*^9}, + CellLabel-> + "Out[101]=",ExpressionUUID->"a5974fdd-79c2-42af-a26d-93a15d7aa6ff"] }, Open ]], Cell[CellGroupData[{ @@ -2752,8 +9291,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -2798,27 +9336,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850617546938*^9, - 3.991850621692934*^9}},ExpressionUUID->"ccaee6a3-c390-0444-bf16-\ -3471356a3614"], + CellChangeTimes->{{3.991850617546938*^9, 3.991850621692934*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"1795c3b9-0182-224c-b986-6414d6712c04"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.25528434250971`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 21, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303290694647`*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"6aeb5f69-754b-4ea4-8733-aad2bb3ceb50"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c3b31753-a67f-9b45-b822-068e1df11f68"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7208064409749957`*^-96\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 22, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830329076869*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"471096e8-4dd0-46d3-a7c8-cce5dd8eddc8"], -Cell[BoxData["5.210321944589433`"], "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.096516604193377`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 23, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830329084117*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"86834077-90eb-41e3-bcc9-cae452133bb5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 102, 24, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303290906754`*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"ed89a703-0629-47c1-b074-2ce4f72258e3"], + +Cell[BoxData["18.247714348480052`"], "Output", + CellChangeTimes->{3.993830337946804*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"426dca7a-d2e8-4f13-bb30-77e4524d537f"] }, Open ]], Cell[CellGroupData[{ @@ -2839,8 +9428,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -2885,27 +9473,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918506254460773`*^9, - 3.991850628958872*^9}},ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-\ -286954db37c5"], + CellChangeTimes->{{3.9918506254460773`*^9, 3.991850628958872*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.25528434250971`*^-95\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 25, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99383033799424*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"2c270ade-896f-48d1-af25-83456e0508ea"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4e2b22f2-1724-7649-93fc-33cd27bb415e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7208064409749957`*^-96\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 26, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830338001495*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"5f749947-6756-47de-85c5-29fadddb34d8"], -Cell[BoxData["20.308521034293705`"], "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.096516604193377`*^-98\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 27, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830338007966*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"4973912f-dfab-47fa-9421-7edc6acb1b82"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 103, 28, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830338013838*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"987cd983-1a52-4f52-88de-0d8733fcc176"], + +Cell[BoxData["0.5110679636302732`"], "Output", + CellChangeTimes->{3.993830343579056*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"293b71d2-0805-4e12-acf7-fe63ab1a4d47"] }, Open ]], Cell[CellGroupData[{ @@ -2914,19 +9553,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918506775260105`*^9, - 3.9918506840946693`*^9}},ExpressionUUID->"7ec678fd-8398-414a-aeba-\ -20e078d734cd"], + CellChangeTimes->{{3.9918506775260105`*^9, 3.9918506840946693`*^9}}, + CellLabel-> + "In[104]:=",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[BoxData["0.0009169614351270098`"], "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[BoxData["0.7143547908504416`"], "Output", + CellChangeTimes->{3.9938303436123867`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"aa81fe49-83a7-4af3-b853-12bbb2545577"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918506873951664`*^9, 3.991850690050791*^9}, - 3.9919245116307106`*^9},ExpressionUUID->"ca329276-48d7-8943-8408-\ -dd2997d3499c"], + 3.9919245116307106`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ @@ -2947,10 +9590,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Il", "*", "Ih"}], - RowBox[{"Il", "+", "Ih"}]]}]}]], "Input",ExpressionUUID->"681c316f-cd82-\ -ae4b-824f-5eb2b3081f6d"], + RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", + CellLabel-> + "In[106]:=",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[BoxData["5.744985073726742`"], "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[BoxData["7.971726983665785`"], "Output", + CellChangeTimes->{3.993830343625574*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"7bf022b7-8f5c-4874-9861-786f54d85aa8"] }, Open ]], Cell[CellGroupData[{ @@ -2958,10 +9605,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb2"]]}]], "Input",ExpressionUUID->"11e77a67-96b2-a645-\ -89cd-559587f30b91"], + FractionBox["Kb", "Qb2"]]}]], "Input", + CellLabel-> + "In[107]:=",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[BoxData["1.564995573098341`"], "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[BoxData["0.04250941218144515`"], "Output", + CellChangeTimes->{3.993830343633581*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"362947b7-0402-4993-b974-b2adf1bf0d39"] }, Open ]], Cell[CellGroupData[{ @@ -2969,10 +9620,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"3c5f43e9-\ -afc4-be40-8f37-0116656ecd38"], + RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[108]:=",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[BoxData["8.990876207898397`"], "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[BoxData["0.33887342814659727`"], "Output", + CellChangeTimes->{3.993830343641551*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"42797841-be29-4d02-99c4-5392993953aa"] }, Open ]], Cell[CellGroupData[{ @@ -3160,10 +9815,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"f07a8476-d7bc-1049-\ -82a6-7cf06f61e28f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[109]:=",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[BoxData["0.06921475857237179`"], "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[BoxData["0.011779362807356072`"], "Output", + CellChangeTimes->{3.993830343651909*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"e3d33006-3dfb-4ce3-a0c7-3d0c8803907e"] }, Open ]], Cell[CellGroupData[{ @@ -3175,18 +9834,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"b88b1a94-\ -22d7-2843-88e3-f607b95c8af9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[110]:=",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"def6b331-c871-b04d-a16e-4fc00b03d009"], - -Cell[BoxData["3.36857007702114`"], "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[BoxData["8.165523659318284`"], "Output", + CellChangeTimes->{3.993830343737653*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"fa687775-490b-441f-94d4-8a681c5d5074"] }, Open ]], Cell[CellGroupData[{ @@ -3376,10 +10031,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"9d771aab-c0b4-f24c-\ -9b53-9472e00c4d82"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[111]:=",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[BoxData["0.01179213875658184`"], "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[BoxData["0.44540539113569744`"], "Output", + CellChangeTimes->{3.993830343750291*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"52657ca3-1ad5-4765-ae07-c7c18d3e407b"] }, Open ]], Cell[CellGroupData[{ @@ -3391,18 +10050,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"47e2a8e8-\ -6af3-374f-9eea-9c2b6faaaf4a"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[112]:=",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c6c8676e-4601-144e-b83c-769e22949175"], - -Cell[BoxData["8.161099076568318`"], "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[BoxData["1.3279056109880327`"], "Output", + CellChangeTimes->{3.9938303438407097`*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"d9bdb132-2920-44e4-8c67-a12cd76f30e6"] }, Open ]], Cell[CellGroupData[{ @@ -3493,10 +10148,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-\ -6b0985b9b3bc"], + ")"}]}]}]], "Input", + CellLabel-> + "In[113]:=",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[BoxData["0.130547288335749`"], "Output", + CellChangeTimes->{3.9938303438484983`*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"0afe7292-bcc4-4000-8ba9-d7f22987b2ce"] }, Open ]], Cell[CellGroupData[{ @@ -3584,10 +10243,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-\ -4868d83e9702"], + ")"}]}]}]], "Input", + CellLabel-> + "In[114]:=",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[BoxData["0.869452711664251`"], "Output", + CellChangeTimes->{3.993830343855858*^9}, + CellLabel-> + "Out[114]=",ExpressionUUID->"982e4d06-d27c-4299-b093-abc613ca8e16"] }, Open ]], Cell[CellGroupData[{ @@ -3708,10 +10371,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"5caf1614-7e5c-\ -9940-98cd-9460e2c074b2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[115]:=",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[BoxData["0.11350469384393182`"], "Output", + CellChangeTimes->{3.993830343863323*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"b9ca91b7-c884-4d1a-8c0c-a16eaef2486f"] }, Open ]], Cell[CellGroupData[{ @@ -3773,27 +10440,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991850710120125*^9},ExpressionUUID->"db0784f6-51d0-fd44-b0e8-\ -05d6af1a6e52"], + CellChangeTimes->{3.991850710120125*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7fd60dea-f794-4744-8801-bfb1a50a0e07"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2297910958996343`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 29, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303438771057`*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"9494137e-9054-40d8-af25-34868ad3aef4"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0b8c0718-41d2-4542-8afe-212a15805650"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3070280426886951`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 30, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830343884007*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"21ef40bf-25ff-4f9b-83ad-c793822ecb6c"], -Cell[BoxData["3.3685700770211437`"], "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3891158507087284`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 31, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303438904047`*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"951259e1-f60c-40ab-940e-244c1635a4e3"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 116, 32, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830343896236*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"002990dd-ee55-4fd7-9624-b2ed5829c73e"], + +Cell[BoxData["8.165523173477538`"], "Output", + CellChangeTimes->{3.993830348937791*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"29575d60-c46f-457b-9d18-daa75c32bdc8"] }, Open ]], Cell[CellGroupData[{ @@ -3855,27 +10573,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507152152424`*^9},ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-\ -f69c33a31448"], + CellChangeTimes->{3.9918507152152424`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b6f0ccc2-ff83-124b-a341-e143319c7670"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2297910958996343`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 33, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830348975235*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"88f20648-ceb4-4885-ab14-1266e08a760d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3070280426886951`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 34, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830348980427*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"f4f172ae-e848-49eb-9a6a-20683cc40c2a"], -Cell[BoxData["8.161099076568323`"], "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3891158507087284`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 35, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830348985141*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"4897b26f-f9d8-4da7-a813-afe6f2ab597d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 36, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938303489894743`*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"da87ad87-3a85-4700-8d5c-fe5ad003b343"], + +Cell[BoxData["1.3279055319789346`"], "Output", + CellChangeTimes->{3.993830354080332*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"1fddb60f-fdb3-46bb-9703-ca01d8db30d6"] }, Open ]], Cell[CellGroupData[{ @@ -3933,489 +10702,395 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507183992805`*^9},ExpressionUUID->"611f92ea-b199-2643-9788-\ -194fae57c34e"], + CellChangeTimes->{3.9918507183992805`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7797a546-4085-124a-83da-5f3c472cdc4c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"ca7472ca-7b27-a54a-84a1-e603fa592207"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-\ -49e8ffb5e8c8"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVknk41P0XhqeskShF0qJCtCA7yTlkXyeVKLshbQhJZEmh7IRUinb1Wr+j +CZVkiVeKV8g2NdkqJUt29fP79Mdcc93Xfc5zns9cs9HNx8ZjMY1GGyafv98f +dk5vbbbdgaObOpIkM5bj9vsBS+dBGdN6Em7k5AnhbT9p+pNGNbzUUbnPs5If +qY+Vcat71LDRI2UmMo8fq8wc60K+q6HoQHhxXiY/9m/K0NUXUMePFqtObznF +j7Lv+XY0GavjpTcv35Zv4sc8le9LvlWpY+TrR8EOl/iwdKK4em2ZBmp2T4jl +OPJicyBoXLyvhV39SWtNlLjx5LubN7JLtJAr5GUbjxQ3Csj+Xiiv1kJO5T5o +FuZGw7bS+rHPWtjhlLgqboQLy1WUDzmv10YHeqtnZiEX3huVDtW+qo1m9gnr +lilzYdAxgerRS7vwyJ63gka4GDc6tVk5ntiNGiYGr1gRNLxXKVwXELwbeekJ +Oo4BNJTdbAbxl3bjth4qWciLhtu/Vig+u7cb2e9k8+Osaajulysiwd6NTOa9 +1X/W09AiOqSl1VIXF+I2nnYOX4DAgo22FoqAG24za21F/gceC6yCdWcRXQwX +Eg95zcNKPsm0VxGIVdZ3taJs5qFqWfhZj0uI21mPLlfrzIPUemOD/KuIXlYZ +3cHL56FH50OnDgsxjWF6peXZHNgET3M7/ELM2qb4bPXKOdCd1Dh8/aQeZm6u +b7jSMgPi30v5xN30sZXnpev4hSnQnBGY1jyqj+HjDSZP/KfgEI/j4CFffRQz +FOSLdp+CrA2Lam+F6aPCdlYXfc8UbNpvGil7Qx9ZZV+ux3JNgcKLzt9qrfpY +i80BF6MnwShpbmy/0R78tUMzVT9jAgJUdHpStxrg1i1+DdFd4+CgPvIpeacB +2qTrbnr8dhwMtO70JWoa4JMpO8WOynEQBf7vsUYGGFqjZLD/4ThQZq2zkW4G ++ODL1P43AeMw6npC3P+6ATbiYaH85eNwPDnLZp+AIUaVq4vQ9o2B2/DvetEh +Qyw4EG3G3z8CT19PTT4aM0QdmYoV9m9HYGnO6CacNcQ7+YuEK1jE2/SfO8Fv +hHHrQg/UXCa+9I1SrawRrpfnzL1UGoEnkdczA92NMDBpxaBb5E/gX63p1dlj +hNo6T1+3qgxDvr4/X3aTMeZ0icTFvxmCgI2HdZntxtjI4biklg+BDm3P6Tq2 +MXa5Sy968GgIGl+s6Bv5bowhVcPeUzFD8EOTqkB+E4y/43ZX23AItiqOne5F +E7T/1cU0rPoGuZI+/TKUCU6cTepZ8for3Js49iovzRSHPLZ0Co8PQuejaxvt +s0zRKdw7cXHfICxzrj/Pc88U165z3764dRDO/iuj78Q0RcHdH0e2sAbB6han +SrjFFOvii9WXhgzCrLFtjZ+wGTJHPee28xF/Q69OM9YMRYOu3AqRG4AZvdVv +a8LNsal+Ias9vg8mfjzUs4wxx98eg3WciD4YuarBaks0x4RWnZKJgD4YHLbN +Hrxpjuw5tzwtxz5ovZZ+iv+5OX7of71GQ6EPisdWiFnMmGPQ5JDwzH+9cOy2 +kPN7XwtUyvZTPyDVC2wa19hnV0ukwCahsJ0DFsURPl+9LDGrp/pR0lsOlLv+ +b/injyUm/VQLDazhQEbV7NB8qCWml0/vtKM4QL842r/quiV+OL1N+XgiB6r4 +PnaYtljiZoUfmQ3GHHiwrKyyWN8KH6f4DiSHfQLvtT7J5zdbo8J6OV6tCDaY +3VXRlNpmjTkgO8vyYYPs1plPFcrW2CaiWqDnzAa2xnnF33rWWNL0SzFUlw0W ++668C3SxRt4NTVZxf3pAPvbp0hM3rfHlEMU7F9oD4/PhBv8I0tGm+rxka0w3 +FBytr0yPoiOd071b9UUntBXelpC+TEchJislsKgTfk8G+1HxdNzvL1T76m4n +mEfukG66QscOqjnPL7YTvl5PjeG/Q8fwwqyS3XadsLHRwSqkgo5RvxYd9pvs +gDSFsW6XaTqG3XJcKqPeAcG/JKa3Hd2LtorSCzpN7dBxL4PBe3Ivig1c25pV +3Q7qtqItHN+9KGiw8z1XaTuMly7NTw/ai3LpimE/ctrhWNiC20LMXhw9M3py +k3872C8ZeNfyYC8W3I5wWSPRDpobih6c7d+LUsV1jCXH22DSzMi2ztkGfdc4 +X/SVaQWtwyl6A3v3YVbcwGDKr/+gReLmsRqV/RjJVuDuV2uGNQ8uPM+VO4BP +5+czzZTfQilnq4WVkC0eVT1jnnqzAda3jh4JHLbFOUPPI8tO1INKekreXc5B +vFl7i1fO4TXc5P6lkFpth/FtTgYSRTXA0lPsiiqzx5NDtT31ktWQqRG7/Pfj +Q9g1s6FUr+oVNHXfj1aJP4yiggZCVg8r4YlllrRvhAP6Pc1L/qj8EsZO7qN5 +Mxwxdoeiv8OZFzBpJO/1c48T/k7YtGp28hnkDnfO+Ks7Y7yDMY/LxXKwu33f +3XGpC87salBt2lcGTMrcmSvGBXsehBaFKZWClmTL7OVZ4gMn3nPpPYXNnCNd +/x11RWmpL7bXTrGgX/C4dVafK+b+4jIyyXsCzYlW7sYH3LBje0Tsc8EnkBaU +LXi62Q1L11Suw9Ml8LxiYdbd1B2Lmh/fc5lmws5XqppbzN1xlD3XWTzJhAfV +RwOHLIi/Ky7LPcGElPr34750d2yeS1iUN8oEz5aH30MPuiNN1e4F/xATlg9a +s696uGNy9BH+qR7ihXIq35wn8wVp0zermSDsgDEq5e7oou4IK9OYILWyrmnt +c8JiZ07EpjJBqdFyNW+FO0aoOb1dlMIEG53DjzpeuSPKHpafSGBC2trAN6H/ +uqOvcZLelxgmrGH/I1zf4Y5SGaWFvOeYIO0knukwTfiF7xk5DyZoufzMjVJl +IC1/9Y6v2uQ910b9rdQZmPOPt3qFFhNWvh/XFdcknvFSJ12TCT8Np1tzdzGw +6GQ0GKkz4d422qJGfQZWftu6umQnE5ZNL7dfsZeB9HbGUIUcE/oT1JZkn2SQ +PiWVSeJM2Fun0XrEh/itdwWixJhQQdPOVjrFQBGFJPOQVUy45q+rVhXAQJf8 +x8XHRJlgZW/sOhBC7rUJCRwQZkKZtH3ZtlgGNrP5ag/yMSHx2bmjpQ8YyFn1 +UXPlDAUnla9qBeWSPuerirZPU2DxqHiJ5mMGotyoiNEUBQJXBx89zSdeIvVy +yAQFUX70IVYJ4c8DB8dGKTgnL338SRUDI8xmTPiHKDh29c0J6iPxLeuje3so +MF02qOPHIfeSul+JE5aLogkp9xIOuPDZspuCQT+1/OIBBkrxizY+76TA1Sp7 +uOgH+T3Z+Wb32ymw4/H3LpwjvydbuSWnmQJj/zW+eWIeiCwNNb1aCqqyo81S +V3tgxNXcbxdqKNBpHJcOWuOBHNrI/bpqCpRk3nTuWU98u7eaTRUFEh9C9nTL +kP0bnnn+Lyn4rs0WE1Ajnl+350sZBUmLc14c2Uf2N8g7pRWS9ysuzbQ8QOa/ +BjROF1Bw8XCQn8pBD6Txxuo6EA4qoW9ZOOSBUl03dsjlk/6ei1Iy3Igf1lJt +fEyBSoMbo/aUB1Y69zYYPKDgQ4qM4OZkMi8pypi+SUEBCHl9TSFsWuN0gfDF +4Yma/CsemEP9pylCWNm0JkzzKukXwYrdnkVBIs193PIW6cN3/67PdQqMfHI6 +g/LI/obA6xuuUrBu3SV13QLij56OLMugYKLB5wpXEbn/mGWyn/AdWbBMZJJ+ +F1/4xKdT8IfNrrxbTt4bLSHLl0ZBiYVk7rt6D3TpOyorm0JB3NxinrQGkt8t +/f1tMgVuuUOu9o3Ez21LCCQswl0u2d9EvOKgV0MSBSee2SXNtpN7HdGh5xIp +2Lw1I1B6gHB5i7BAPAVzH0Lffxsk+93zd17GUdAc5aFU+JVwcPaKQMJhn1WH +tH6QPEo2ZiCWgq7M947Wv0g/j9Hqd5cpSOVbbhi8yBM5Jq8iG2IoeD7OPhzA +5YmVV5w6ogl/YT/28+bxxBxXDhgQ1ikxyHFb4olSwg4GVdHk/+YSNG+2nOwH +/bvxTRTpb2G4wlCUzMtu4EkmvEtjhTys8kQaz8TsAcLJQnm2KhIkv+qH+MBF +4ss/FUtuJOzN2SxC2PN+Xv2qzZ7oYjSRwr5A5pPPfhKWIffeKC7PIzzoKSrE +LU/uqUzpW/z1osZeP5TI/g+W37VICsr/Jxo+qEz2Jf54+RAe+MZJ56iS+1ob +fY0Ia1cGV7dqkvlLvUXT5ynoP1Gw/gWSvD8+856El9mFqD3VJ/MtDWcMCWvt +MbEoNiDvya7jliGcKNF79r6JJ0boJNC/RFBQyl2YnG1G+t02FW4g3DcS8vCa +BfFySR/zCWu+XtWWQCf3pLMLggi7Ffd+j7EhfsCp0JlwQlbh4sj9xLukVhoT +7vUzVQq0Iz5Yb6UkYSEnMWPfQ+Q9kiW2vH/zTPscjzmQfucuPRoPJ/sbQuOc +XEj/j0YR7wiXCpjdsXMjfE2eu4Jw76RYmQ2D9I9xziwgLPS5r8nCk/iEAZ0c +wpqNRYNGXiTv39KxVMJuT0P/4DFPxPh2VvTf/DtmK3edIPOuOvEhf/MTxLep +eZN+Al9PnfqbH9Svp+hL5sM+HPEivJRRbCfvR+aH+L1dCGtYh/lsDiD5rOCL +9n/ztc2j1wWS94Zs+2cf4XiZ1TfFg0i/ZWt6rQizRAaYy4PJe4MM5c0Jf54v +bhA8R/Jm8iJM/uZ/CfvME0by+OlfjQirt5jPLISTPBsFl7/8f2mR+FA= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVknk41P0XhqeskShF0qJCtCA7yTlkXyeVKLshbQhJZEmh7IRUinb1Wr+j +CZVkiVeKV8g2NdkqJUt29fP79Mdcc93Xfc5zns9cs9HNx8ZjMY1GGyafv98f +dk5vbbbdgaObOpIkM5bj9vsBS+dBGdN6Em7k5AnhbT9p+pNGNbzUUbnPs5If +qY+Vcat71LDRI2UmMo8fq8wc60K+q6HoQHhxXiY/9m/K0NUXUMePFqtObznF +j7Lv+XY0GavjpTcv35Zv4sc8le9LvlWpY+TrR8EOl/iwdKK4em2ZBmp2T4jl +OPJicyBoXLyvhV39SWtNlLjx5LubN7JLtJAr5GUbjxQ3Csj+Xiiv1kJO5T5o +FuZGw7bS+rHPWtjhlLgqboQLy1WUDzmv10YHeqtnZiEX3huVDtW+qo1m9gnr +lilzYdAxgerRS7vwyJ63gka4GDc6tVk5ntiNGiYGr1gRNLxXKVwXELwbeekJ +Oo4BNJTdbAbxl3bjth4qWciLhtu/Vig+u7cb2e9k8+Osaajulysiwd6NTOa9 +1X/W09AiOqSl1VIXF+I2nnYOX4DAgo22FoqAG24za21F/gceC6yCdWcRXQwX +Eg95zcNKPsm0VxGIVdZ3taJs5qFqWfhZj0uI21mPLlfrzIPUemOD/KuIXlYZ +3cHL56FH50OnDgsxjWF6peXZHNgET3M7/ELM2qb4bPXKOdCd1Dh8/aQeZm6u +b7jSMgPi30v5xN30sZXnpev4hSnQnBGY1jyqj+HjDSZP/KfgEI/j4CFffRQz +FOSLdp+CrA2Lam+F6aPCdlYXfc8UbNpvGil7Qx9ZZV+ux3JNgcKLzt9qrfpY +i80BF6MnwShpbmy/0R78tUMzVT9jAgJUdHpStxrg1i1+DdFd4+CgPvIpeacB +2qTrbnr8dhwMtO70JWoa4JMpO8WOynEQBf7vsUYGGFqjZLD/4ThQZq2zkW4G ++ODL1P43AeMw6npC3P+6ATbiYaH85eNwPDnLZp+AIUaVq4vQ9o2B2/DvetEh +Qyw4EG3G3z8CT19PTT4aM0QdmYoV9m9HYGnO6CacNcQ7+YuEK1jE2/SfO8Fv +hHHrQg/UXCa+9I1SrawRrpfnzL1UGoEnkdczA92NMDBpxaBb5E/gX63p1dlj +hNo6T1+3qgxDvr4/X3aTMeZ0icTFvxmCgI2HdZntxtjI4biklg+BDm3P6Tq2 +MXa5Sy968GgIGl+s6Bv5bowhVcPeUzFD8EOTqkB+E4y/43ZX23AItiqOne5F +E7T/1cU0rPoGuZI+/TKUCU6cTepZ8for3Js49iovzRSHPLZ0Co8PQuejaxvt +s0zRKdw7cXHfICxzrj/Pc88U165z3764dRDO/iuj78Q0RcHdH0e2sAbB6han +SrjFFOvii9WXhgzCrLFtjZ+wGTJHPee28xF/Q69OM9YMRYOu3AqRG4AZvdVv +a8LNsal+Ias9vg8mfjzUs4wxx98eg3WciD4YuarBaks0x4RWnZKJgD4YHLbN +Hrxpjuw5tzwtxz5ovZZ+iv+5OX7of71GQ6EPisdWiFnMmGPQ5JDwzH+9cOy2 +kPN7XwtUyvZTPyDVC2wa19hnV0ukwCahsJ0DFsURPl+9LDGrp/pR0lsOlLv+ +b/injyUm/VQLDazhQEbV7NB8qCWml0/vtKM4QL842r/quiV+OL1N+XgiB6r4 +PnaYtljiZoUfmQ3GHHiwrKyyWN8KH6f4DiSHfQLvtT7J5zdbo8J6OV6tCDaY +3VXRlNpmjTkgO8vyYYPs1plPFcrW2CaiWqDnzAa2xnnF33rWWNL0SzFUlw0W ++668C3SxRt4NTVZxf3pAPvbp0hM3rfHlEMU7F9oD4/PhBv8I0tGm+rxka0w3 +FBytr0yPoiOd071b9UUntBXelpC+TEchJislsKgTfk8G+1HxdNzvL1T76m4n +mEfukG66QscOqjnPL7YTvl5PjeG/Q8fwwqyS3XadsLHRwSqkgo5RvxYd9pvs +gDSFsW6XaTqG3XJcKqPeAcG/JKa3Hd2LtorSCzpN7dBxL4PBe3Ivig1c25pV +3Q7qtqItHN+9KGiw8z1XaTuMly7NTw/ai3LpimE/ctrhWNiC20LMXhw9M3py +k3872C8ZeNfyYC8W3I5wWSPRDpobih6c7d+LUsV1jCXH22DSzMi2ztkGfdc4 +X/SVaQWtwyl6A3v3YVbcwGDKr/+gReLmsRqV/RjJVuDuV2uGNQ8uPM+VO4BP +5+czzZTfQilnq4WVkC0eVT1jnnqzAda3jh4JHLbFOUPPI8tO1INKekreXc5B +vFl7i1fO4TXc5P6lkFpth/FtTgYSRTXA0lPsiiqzx5NDtT31ktWQqRG7/Pfj +Q9g1s6FUr+oVNHXfj1aJP4yiggZCVg8r4YlllrRvhAP6Pc1L/qj8EsZO7qN5 +Mxwxdoeiv8OZFzBpJO/1c48T/k7YtGp28hnkDnfO+Ks7Y7yDMY/LxXKwu33f +3XGpC87salBt2lcGTMrcmSvGBXsehBaFKZWClmTL7OVZ4gMn3nPpPYXNnCNd +/x11RWmpL7bXTrGgX/C4dVafK+b+4jIyyXsCzYlW7sYH3LBje0Tsc8EnkBaU +LXi62Q1L11Suw9Ml8LxiYdbd1B2Lmh/fc5lmws5XqppbzN1xlD3XWTzJhAfV +RwOHLIi/Ky7LPcGElPr34750d2yeS1iUN8oEz5aH30MPuiNN1e4F/xATlg9a +s696uGNy9BH+qR7ihXIq35wn8wVp0zermSDsgDEq5e7oou4IK9OYILWyrmnt +c8JiZ07EpjJBqdFyNW+FO0aoOb1dlMIEG53DjzpeuSPKHpafSGBC2trAN6H/ +uqOvcZLelxgmrGH/I1zf4Y5SGaWFvOeYIO0knukwTfiF7xk5DyZoufzMjVJl +IC1/9Y6v2uQ910b9rdQZmPOPt3qFFhNWvh/XFdcknvFSJ12TCT8Np1tzdzGw +6GQ0GKkz4d422qJGfQZWftu6umQnE5ZNL7dfsZeB9HbGUIUcE/oT1JZkn2SQ +PiWVSeJM2Fun0XrEh/itdwWixJhQQdPOVjrFQBGFJPOQVUy45q+rVhXAQJf8 +x8XHRJlgZW/sOhBC7rUJCRwQZkKZtH3ZtlgGNrP5ag/yMSHx2bmjpQ8YyFn1 +UXPlDAUnla9qBeWSPuerirZPU2DxqHiJ5mMGotyoiNEUBQJXBx89zSdeIvVy +yAQFUX70IVYJ4c8DB8dGKTgnL338SRUDI8xmTPiHKDh29c0J6iPxLeuje3so +MF02qOPHIfeSul+JE5aLogkp9xIOuPDZspuCQT+1/OIBBkrxizY+76TA1Sp7 +uOgH+T3Z+Wb32ymw4/H3LpwjvydbuSWnmQJj/zW+eWIeiCwNNb1aCqqyo81S +V3tgxNXcbxdqKNBpHJcOWuOBHNrI/bpqCpRk3nTuWU98u7eaTRUFEh9C9nTL +kP0bnnn+Lyn4rs0WE1Ajnl+350sZBUmLc14c2Uf2N8g7pRWS9ysuzbQ8QOa/ +BjROF1Bw8XCQn8pBD6Txxuo6EA4qoW9ZOOSBUl03dsjlk/6ei1Iy3Igf1lJt +fEyBSoMbo/aUB1Y69zYYPKDgQ4qM4OZkMi8pypi+SUEBCHl9TSFsWuN0gfDF +4Yma/CsemEP9pylCWNm0JkzzKukXwYrdnkVBIs193PIW6cN3/67PdQqMfHI6 +g/LI/obA6xuuUrBu3SV13QLij56OLMugYKLB5wpXEbn/mGWyn/AdWbBMZJJ+ +F1/4xKdT8IfNrrxbTt4bLSHLl0ZBiYVk7rt6D3TpOyorm0JB3NxinrQGkt8t +/f1tMgVuuUOu9o3Ez21LCCQswl0u2d9EvOKgV0MSBSee2SXNtpN7HdGh5xIp +2Lw1I1B6gHB5i7BAPAVzH0Lffxsk+93zd17GUdAc5aFU+JVwcPaKQMJhn1WH +tH6QPEo2ZiCWgq7M947Wv0g/j9Hqd5cpSOVbbhi8yBM5Jq8iG2IoeD7OPhzA +5YmVV5w6ogl/YT/28+bxxBxXDhgQ1ikxyHFb4olSwg4GVdHk/+YSNG+2nOwH +/bvxTRTpb2G4wlCUzMtu4EkmvEtjhTys8kQaz8TsAcLJQnm2KhIkv+qH+MBF +4ss/FUtuJOzN2SxC2PN+Xv2qzZ7oYjSRwr5A5pPPfhKWIffeKC7PIzzoKSrE +LU/uqUzpW/z1osZeP5TI/g+W37VICsr/Jxo+qEz2Jf54+RAe+MZJ56iS+1ob +fY0Ia1cGV7dqkvlLvUXT5ynoP1Gw/gWSvD8+856El9mFqD3VJ/MtDWcMCWvt +MbEoNiDvya7jliGcKNF79r6JJ0boJNC/RFBQyl2YnG1G+t02FW4g3DcS8vCa +BfFySR/zCWu+XtWWQCf3pLMLggi7Ffd+j7EhfsCp0JlwQlbh4sj9xLukVhoT +7vUzVQq0Iz5Yb6UkYSEnMWPfQ+Q9kiW2vH/zTPscjzmQfucuPRoPJ/sbQuOc +XEj/j0YR7wiXCpjdsXMjfE2eu4Jw76RYmQ2D9I9xziwgLPS5r8nCk/iEAZ0c +wpqNRYNGXiTv39KxVMJuT0P/4DFPxPh2VvTf/DtmK3edIPOuOvEhf/MTxLep +eZN+Al9PnfqbH9Svp+hL5sM+HPEivJRRbCfvR+aH+L1dCGtYh/lsDiD5rOCL +9n/ztc2j1wWS94Zs+2cf4XiZ1TfFg0i/ZWt6rQizRAaYy4PJe4MM5c0Jf54v +bhA8R/Jm8iJM/uZ/CfvME0by+OlfjQirt5jPLISTPBsFl7/8f2mR+FA= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 4.396589515273021}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 4.396589515273021}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVknk41P0XhqeskShF0qJCtCA7yTlkXyeVKLshbQhJZEmh7IRUinb1Wr+j +CZVkiVeKV8g2NdkqJUt29fP79Mdcc93Xfc5zns9cs9HNx8ZjMY1GGyafv98f +dk5vbbbdgaObOpIkM5bj9vsBS+dBGdN6Em7k5AnhbT9p+pNGNbzUUbnPs5If +qY+Vcat71LDRI2UmMo8fq8wc60K+q6HoQHhxXiY/9m/K0NUXUMePFqtObznF +j7Lv+XY0GavjpTcv35Zv4sc8le9LvlWpY+TrR8EOl/iwdKK4em2ZBmp2T4jl +OPJicyBoXLyvhV39SWtNlLjx5LubN7JLtJAr5GUbjxQ3Csj+Xiiv1kJO5T5o +FuZGw7bS+rHPWtjhlLgqboQLy1WUDzmv10YHeqtnZiEX3huVDtW+qo1m9gnr +lilzYdAxgerRS7vwyJ63gka4GDc6tVk5ntiNGiYGr1gRNLxXKVwXELwbeekJ +Oo4BNJTdbAbxl3bjth4qWciLhtu/Vig+u7cb2e9k8+Osaajulysiwd6NTOa9 +1X/W09AiOqSl1VIXF+I2nnYOX4DAgo22FoqAG24za21F/gceC6yCdWcRXQwX +Eg95zcNKPsm0VxGIVdZ3taJs5qFqWfhZj0uI21mPLlfrzIPUemOD/KuIXlYZ +3cHL56FH50OnDgsxjWF6peXZHNgET3M7/ELM2qb4bPXKOdCd1Dh8/aQeZm6u +b7jSMgPi30v5xN30sZXnpev4hSnQnBGY1jyqj+HjDSZP/KfgEI/j4CFffRQz +FOSLdp+CrA2Lam+F6aPCdlYXfc8UbNpvGil7Qx9ZZV+ux3JNgcKLzt9qrfpY +i80BF6MnwShpbmy/0R78tUMzVT9jAgJUdHpStxrg1i1+DdFd4+CgPvIpeacB +2qTrbnr8dhwMtO70JWoa4JMpO8WOynEQBf7vsUYGGFqjZLD/4ThQZq2zkW4G ++ODL1P43AeMw6npC3P+6ATbiYaH85eNwPDnLZp+AIUaVq4vQ9o2B2/DvetEh +Qyw4EG3G3z8CT19PTT4aM0QdmYoV9m9HYGnO6CacNcQ7+YuEK1jE2/SfO8Fv +hHHrQg/UXCa+9I1SrawRrpfnzL1UGoEnkdczA92NMDBpxaBb5E/gX63p1dlj +hNo6T1+3qgxDvr4/X3aTMeZ0icTFvxmCgI2HdZntxtjI4biklg+BDm3P6Tq2 +MXa5Sy968GgIGl+s6Bv5bowhVcPeUzFD8EOTqkB+E4y/43ZX23AItiqOne5F +E7T/1cU0rPoGuZI+/TKUCU6cTepZ8for3Js49iovzRSHPLZ0Co8PQuejaxvt +s0zRKdw7cXHfICxzrj/Pc88U165z3764dRDO/iuj78Q0RcHdH0e2sAbB6han +SrjFFOvii9WXhgzCrLFtjZ+wGTJHPee28xF/Q69OM9YMRYOu3AqRG4AZvdVv +a8LNsal+Ias9vg8mfjzUs4wxx98eg3WciD4YuarBaks0x4RWnZKJgD4YHLbN +Hrxpjuw5tzwtxz5ovZZ+iv+5OX7of71GQ6EPisdWiFnMmGPQ5JDwzH+9cOy2 +kPN7XwtUyvZTPyDVC2wa19hnV0ukwCahsJ0DFsURPl+9LDGrp/pR0lsOlLv+ +b/injyUm/VQLDazhQEbV7NB8qCWml0/vtKM4QL842r/quiV+OL1N+XgiB6r4 +PnaYtljiZoUfmQ3GHHiwrKyyWN8KH6f4DiSHfQLvtT7J5zdbo8J6OV6tCDaY +3VXRlNpmjTkgO8vyYYPs1plPFcrW2CaiWqDnzAa2xnnF33rWWNL0SzFUlw0W ++668C3SxRt4NTVZxf3pAPvbp0hM3rfHlEMU7F9oD4/PhBv8I0tGm+rxka0w3 +FBytr0yPoiOd071b9UUntBXelpC+TEchJislsKgTfk8G+1HxdNzvL1T76m4n +mEfukG66QscOqjnPL7YTvl5PjeG/Q8fwwqyS3XadsLHRwSqkgo5RvxYd9pvs +gDSFsW6XaTqG3XJcKqPeAcG/JKa3Hd2LtorSCzpN7dBxL4PBe3Ivig1c25pV +3Q7qtqItHN+9KGiw8z1XaTuMly7NTw/ai3LpimE/ctrhWNiC20LMXhw9M3py +k3872C8ZeNfyYC8W3I5wWSPRDpobih6c7d+LUsV1jCXH22DSzMi2ztkGfdc4 +X/SVaQWtwyl6A3v3YVbcwGDKr/+gReLmsRqV/RjJVuDuV2uGNQ8uPM+VO4BP +5+czzZTfQilnq4WVkC0eVT1jnnqzAda3jh4JHLbFOUPPI8tO1INKekreXc5B +vFl7i1fO4TXc5P6lkFpth/FtTgYSRTXA0lPsiiqzx5NDtT31ktWQqRG7/Pfj +Q9g1s6FUr+oVNHXfj1aJP4yiggZCVg8r4YlllrRvhAP6Pc1L/qj8EsZO7qN5 +Mxwxdoeiv8OZFzBpJO/1c48T/k7YtGp28hnkDnfO+Ks7Y7yDMY/LxXKwu33f +3XGpC87salBt2lcGTMrcmSvGBXsehBaFKZWClmTL7OVZ4gMn3nPpPYXNnCNd +/x11RWmpL7bXTrGgX/C4dVafK+b+4jIyyXsCzYlW7sYH3LBje0Tsc8EnkBaU +LXi62Q1L11Suw9Ml8LxiYdbd1B2Lmh/fc5lmws5XqppbzN1xlD3XWTzJhAfV +RwOHLIi/Ky7LPcGElPr34750d2yeS1iUN8oEz5aH30MPuiNN1e4F/xATlg9a +s696uGNy9BH+qR7ihXIq35wn8wVp0zermSDsgDEq5e7oou4IK9OYILWyrmnt +c8JiZ07EpjJBqdFyNW+FO0aoOb1dlMIEG53DjzpeuSPKHpafSGBC2trAN6H/ +uqOvcZLelxgmrGH/I1zf4Y5SGaWFvOeYIO0knukwTfiF7xk5DyZoufzMjVJl +IC1/9Y6v2uQ910b9rdQZmPOPt3qFFhNWvh/XFdcknvFSJ12TCT8Np1tzdzGw +6GQ0GKkz4d422qJGfQZWftu6umQnE5ZNL7dfsZeB9HbGUIUcE/oT1JZkn2SQ +PiWVSeJM2Fun0XrEh/itdwWixJhQQdPOVjrFQBGFJPOQVUy45q+rVhXAQJf8 +x8XHRJlgZW/sOhBC7rUJCRwQZkKZtH3ZtlgGNrP5ag/yMSHx2bmjpQ8YyFn1 +UXPlDAUnla9qBeWSPuerirZPU2DxqHiJ5mMGotyoiNEUBQJXBx89zSdeIvVy +yAQFUX70IVYJ4c8DB8dGKTgnL338SRUDI8xmTPiHKDh29c0J6iPxLeuje3so +MF02qOPHIfeSul+JE5aLogkp9xIOuPDZspuCQT+1/OIBBkrxizY+76TA1Sp7 +uOgH+T3Z+Wb32ymw4/H3LpwjvydbuSWnmQJj/zW+eWIeiCwNNb1aCqqyo81S +V3tgxNXcbxdqKNBpHJcOWuOBHNrI/bpqCpRk3nTuWU98u7eaTRUFEh9C9nTL +kP0bnnn+Lyn4rs0WE1Ajnl+350sZBUmLc14c2Uf2N8g7pRWS9ysuzbQ8QOa/ +BjROF1Bw8XCQn8pBD6Txxuo6EA4qoW9ZOOSBUl03dsjlk/6ei1Iy3Igf1lJt +fEyBSoMbo/aUB1Y69zYYPKDgQ4qM4OZkMi8pypi+SUEBCHl9TSFsWuN0gfDF +4Yma/CsemEP9pylCWNm0JkzzKukXwYrdnkVBIs193PIW6cN3/67PdQqMfHI6 +g/LI/obA6xuuUrBu3SV13QLij56OLMugYKLB5wpXEbn/mGWyn/AdWbBMZJJ+ +F1/4xKdT8IfNrrxbTt4bLSHLl0ZBiYVk7rt6D3TpOyorm0JB3NxinrQGkt8t +/f1tMgVuuUOu9o3Ez21LCCQswl0u2d9EvOKgV0MSBSee2SXNtpN7HdGh5xIp +2Lw1I1B6gHB5i7BAPAVzH0Lffxsk+93zd17GUdAc5aFU+JVwcPaKQMJhn1WH +tH6QPEo2ZiCWgq7M947Wv0g/j9Hqd5cpSOVbbhi8yBM5Jq8iG2IoeD7OPhzA +5YmVV5w6ogl/YT/28+bxxBxXDhgQ1ikxyHFb4olSwg4GVdHk/+YSNG+2nOwH +/bvxTRTpb2G4wlCUzMtu4EkmvEtjhTys8kQaz8TsAcLJQnm2KhIkv+qH+MBF +4ss/FUtuJOzN2SxC2PN+Xv2qzZ7oYjSRwr5A5pPPfhKWIffeKC7PIzzoKSrE +LU/uqUzpW/z1osZeP5TI/g+W37VICsr/Jxo+qEz2Jf54+RAe+MZJ56iS+1ob +fY0Ia1cGV7dqkvlLvUXT5ynoP1Gw/gWSvD8+856El9mFqD3VJ/MtDWcMCWvt +MbEoNiDvya7jliGcKNF79r6JJ0boJNC/RFBQyl2YnG1G+t02FW4g3DcS8vCa +BfFySR/zCWu+XtWWQCf3pLMLggi7Ffd+j7EhfsCp0JlwQlbh4sj9xLukVhoT +7vUzVQq0Iz5Yb6UkYSEnMWPfQ+Q9kiW2vH/zTPscjzmQfucuPRoPJ/sbQuOc +XEj/j0YR7wiXCpjdsXMjfE2eu4Jw76RYmQ2D9I9xziwgLPS5r8nCk/iEAZ0c +wpqNRYNGXiTv39KxVMJuT0P/4DFPxPh2VvTf/DtmK3edIPOuOvEhf/MTxLep +eZN+Al9PnfqbH9Svp+hL5sM+HPEivJRRbCfvR+aH+L1dCGtYh/lsDiD5rOCL +9n/ztc2j1wWS94Zs+2cf4XiZ1TfFg0i/ZWt6rQizRAaYy4PJe4MM5c0Jf54v +bhA8R/Jm8iJM/uZ/CfvME0by+OlfjQirt5jPLISTPBsFl7/8f2mR+FA= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 4.396589515273021}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 4.396589515273021}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993830635849844*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"aa73779a-18e1-45e1-b583-12a6f288640f"] }, Open ]], Cell[CellGroupData[{ @@ -4478,427 +11153,1393 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918507211663303`*^9, - 3.991850725479061*^9}},ExpressionUUID->"f4c3d53a-1214-a145-beb0-\ -494cdae35e56"], + CellChangeTimes->{{3.9918507211663303`*^9, 3.991850725479061*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b9265795-17b8-4e47-bd29-fee31586537e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.897284922825325`*^-245\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 37, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830635977714*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"02ec2194-a4f8-4f03-9697-d57a03d53a32"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"072fb53f-7116-0f41-a298-6891351a3192"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.753279064503145`*^-252\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 38, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938306359823093`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"59e23676-99bf-49ba-8a48-bc16b777c2dc"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0990622675228133`*^-259\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 39, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830635986107*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"f636a232-928a-461c-88fb-87d25715918e"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 119, 40, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993830635989657*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"36fc5bbb-b508-482c-a036-0400da0ba338"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-\ -87bc9c72594a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k8VH8Xx2UpZMnYxliyV/Z1hjEz56DsP2TXgkSohIhos4VKohLtkpRI +9pulElJJCIlSSVIJSXbKM89f9/V+3XvP+jnnfq+Cb4iTPycHB0fJCg6O/19n +Pr5oUj6Vx+ouWr6dOG/P6r5GjjbtjYftD6lSbUEagOLtvuTes6DsLHH+ZBAD +Ih3vvuXqzQWvxlAn1yA7EBmXPDv/tgzcCXrVaOA2+FRnHzL1tgHuJD04Hhuw +FyyURz78ftsJHxJ1037uOAzzb2mZE28HQbufvK7ENhUazW/nvc79A4Spfc2k ++FWQ+VQ97KvxF4Y+pHDxqd4Csb3ed1eZc+Hi7LtcAflCOKtrUWvvyot4fVp/ +Y3gJaL/3tGQG8uIJM8tE8yMl0JoY3KV+iBcfB088YySXwMre8z95b/Biyp9c +WdnLJXDo6BfpxlFeXEF6WXq+oQT8XsYepiXyYZThHq7ta0qB6l/LlC/nRzNa +thncLoW+bJ3632sEMVT0l+ejJ2VwqatQOFJFECNqixv6Wspgi9A67wVjQdR9 +YOgx1lUG/Qmy/zh3CmL79K3lpa9lMLCPnyFWKYgzeucXH/KVw/eNQwTVUwjd +5zMymxzKYW4i6/6hG8JI2O362P2mHKrVRZeXK4UxLz844veHcojZlWaf2CKM +ae0zv3mGy2HpfeJY6h9hbLnqdEViphxivzwQb1dcg2GSjw73iFdAYtst54GI +NXg/o2ayzbkCTuUda+eUEsGDTFvu7BcVYGMQRBJXEsFeqwN7T3dUAG+Tk+s6 +TRG0otn0xbxlv/9F5b2tqQhmH7hfx/xaAYcVW4fPB4ng0QdXTu/kqIR9OeR/ +qjUiqPhGO17LsBI2XynVsN1KQg0tQeG67EpYo3E5ZLs/CfVJ454l1yqhrTax +LCSEhA2vPqVfyasEm/fuRucTSLiQqvNkW0klmFH+mX8oJKE7gyZ/+FklGGTb +bA1ZImG3VtJp6lQlSJ7/cuLcVVH0C3vflW1ZBWT1ysS5fFHsqZvzMLSrAkpD +0rHtJaJoV3i2s8WxCuQmNhxY1yiK+/413RzwrAIVu1Cf2u+iGCh2t4HYUwX6 +3H+pX/TFcANvrKJYWhUYXG7TtWKKYZvy55V4tgqoejka9yzEMI6c8MXvQhXQ +fcwVozzFcHPfbNLFa1VgWndCcPUxMayoCokrLq4ChwiJIb0WMbTXTM5PflUF +jqu/f8zqEkMBb0NT89dV4JRb3bfUL4ax3FHvZ7urwK1jW3vzLzGM7OcSseuv +gu0aN2u2iIvjR3WdjJyRKtgzpJ0R7yOOc/eSDi7wEJDsYs3qnBFH5pMx9Sga +AZSKNgrnCgkcUIq4nEEnoFjUZVZ3tQS2Br8fvckkoKfTqyRjrQQ2XQ+kl5gT +oLw5QnGzlQSuY7BuBTgQ0PDf9ZUdFyVQ6/WlcSd/AtzuKX9ZvimBOl7NcqMB +BIwI3H2sXSyBlEkbyyO7CRBprTh4pkEChXyyk5NDCPCxaRmx/ymBJRwvfptE +E/DXYrrtFUMSvy2++6hyioD0/JjCvxaS+HrLJg84zfa/kiNFc7MklgwMDjme +IcDuKb/paX9J1FjPBdvOEXDJXL7cLk0Sw+68URO7TIDWzVtnDmdLYlDZg7Dx +K+x4OdX3FuVKYidn17v6awT8eGKoIkBI4k+ro9L2uQQYoW3Wy0+SWH3NJo2/ +gIDW6x3hiz8kkaW0Sy7/LjveZVdH9SlJ5G5oGjAuYtfzkQ/fKV4yJhhd47a5 +z64XI/KQjS4Z5fOGuQQrCdh9ZdE9xoSM/+yVduyuYue3GGtwdxMZy/JKVtQT +7HxqT43xbSFjis0ZcZcaAsKNb3i/iCdjvOJ089rHBNjkCE3ZppLx3GuxKxr1 +BCiuOpzSlknGo5nnGvSeENDR7VbadYeMaZ9Zq9UbCbhj0rTJrYyMcaN0Xdkm +Ao7l6r7rrSWju6BhCe9Tdj1CBbg+tpHRwXaw/mUzATxvo7N8esk4MX7I7eYz +AvqZ39S/fCbjQMmAXcRzAk6tbnD5PkVG7bHZnZwtBHzPj8qfpEhh22hYeHsr +AY8Fv9IPKEvhRQN/y/2vCLgQ4dQ+qymFopGbUoXaCNhkpjm3hFK42EoK028n +QKbgUuoxGylMqN4gXsfmKWFeBU4XKSRZx+mxOgjI/TBovSpACvVk/D5rvSYg +eqPjxxOhUigroh11lc2OhQ/3C8RI4dTKmjSeTgLWk9RXnUlg+89SVwtg8/LB +7Msip6XQXeCebQObez7x6Jy/IIVbt+6eluhi69sivEkiRwqPqJzd4M/m4/cG +PC4WSGFjuetIEZu3idmPSZdL4cjUd+NxNusfqo27VieF5EPxlA3dBPAPrpdQ +aJZC5+itadvZPGh14e7NdimkP7mfdYrN1fe5QLVPCgPqHxqVszldIqzrzqAU +Kh5tDu9mc+CRjwHqo1I4ly1o+4vNMGS7dG9aCoU39tVzvSFAwrY6XWdZCvk3 +7X8rwuaxUlWVcl4KWvxWypBicxP5fLUhiYK56owJCpuvHFth/0Cagh07Vs+K +szl8eN8gXYWCgieHbvOz2ea//siHWhTMlJflmWf7U6ywXo1GFFRQERT5zOZ5 +CnG9wZSCh8nCbQ1s7ohTNthkS8GVC8dY19h8+3vG82cuFJTZ9NgvnM1HHZa3 +2XhR8OW4lrkZm92q9v5uDWDf36nfz89mTdl3xx3CKFgTr6/3il0/7kRLSmcM +BffmZFueYHP/SEWxSyIFo462yQGbTz4489Yzi4JXbwbIZLP7tWPt3z39ORQ8 +nVRsacJmo6TdHN53Kbhn22lWL7v/35w3bfB7SEGePVPZy2y9PKopezjcTEF0 +D19xks0XFOSdgjooGJwdBUJs3vhrIWbfFwqG7pS04GbrLdrqvNqTUQp2liyN +H2Trs/iG5jvRGQr2jidXfGPrl+ziY1zNK41r8lSul7P1/d+9+e+rSdKYSOF9 +sYbN8SvPZXtJS2P6IR2pwJcEjD54OsulJY3CkvxUHvZ8KJC8b7vRpLGKdGWV +7Qt2ffbMuRWgND6ONOQ7xZ6neln1KntnaWwpdsufZ8/fufj0iIsHpdHjUvHp +DPb8Pn+/QXk0ThoXpF8oFzQQsGTQ2MU6JY3PqB3LNex53/VtWm/oqjQ+HK47 +9Yq9H+h2W39rNUqjnri6WXEtW4/iqvuaBGUwMyc10KeMAMmQx7KSkjL41ndr +mGwpe18+93gVJC+DouGe37rZ+6oq5pSGsL4MOq+IVNG/x+7Hp4kRTw8ZrDbM +Nrh3mwC9gtqAX7kyGO5+cfYie58GcLpKmhXJoEAciC1fZOtv63jz+UoZbC7U +fOGVTcBKIQVV+nMZjH82tFIok4B3+5OGEsdkUKhea61GGgFxjM07KEay+NdL +3CDoGAFWXtcmaWayGCcgUGN/hACh2J8JrnayeLlMgKx1iG2/8Xh+uo8s7jta +v/tdJAEPbGp+rjwhi0rJUa9/BBMw4aEU+adPFm3zeD8NbyGAiAldJTIki5tS +7a7v8WDr9crDbK1xWbwb07d/xJUAgQH32iBOObw+Mujb40jAuoBUjgE1OVwS +LeoIsCDA68D0ydZDcigm2mEUoUOASpaZzMhxOfxKvJm+rPn/fp+5typdDj1D +rbgeqREQs7ShwyxPDgfbF+R+KxOQmeAlXt0qh6SOC82iUuzvR8az67dk1+Lo +1WVzew52v4ovVhx9vBavOXGWlrdUwca3bX/Hn69FPXJCUdCzKrDn4Lb07mQ/ +nyelJN1UBTud9vXB17XoNk+khT6sAotDCsdieeQxgdOk7uv9KghdO3PTVF0e +Xwkz3JfOVUFTwPWxxkh51OhxHf/tUQV7537HPhdUQIGziV9reyqBHrZLYpik +gNo/6euEOiuBd+RdIRdZAZ2ObiJve1UJt9439rAUFVCkbUjqZ2MlfHyUqVFJ +VcCcGJDoYZ+vHI4b997wVsBBJ4nWLycqQY8Up32oVAH7Rol/S0aVMK++5qOm +qyIePZfuIptaAYzCopwLF5Qweuj9eop4Ofwm2fi4NSjji6thog+yS2Eo1cdt +/ypVbJ3PudzTeR+sf0VZf6Wuw9GfP4v+5hbB6E7e8Ipj61HLPeSkrEkB+/wv +yZncsAHlye+rrbjygfRKNa3klxrWZzI+eWneBJmU+45UqgaKO+Z2dDnnQLa6 +8RrRAE38HFFUfrXtMrRQTA3/ZGhh/h2bO2ZJWUCXaUjX7tHGr8mj4juCzoEQ +V27EjngdnDzjqbFnTTrIxa1leKrqoljA3p62LyeAT2VbldMzXTwuI/Do/INE +2C0FNoUvdPFd3uSOhfxEaBFU/MjVqot8ofp/9mQmQurMN57KDl0c/qzXsn9/ +Igg9D3eVfKeLKp7f6oU0E4G059TU+1Fd9LPsjz+UlwAypTV6/iQ97CAn3uG5 +Eg9aTKn7Udv18OxAdkNjUSyUKwUtcvroYcE1n+xHV2LBiL/aMs1XD3lYvItP +U2PB7K3HQF6AHs73Ttgt7I0Ft7Bskc4wPRwOH9w7pxkLx25JRmgk6WE276Ou +E37HoENQwvhzsR5uT9/vPZh8BPZ/JDXacOhjSKS/qbNYDDxv3vbwLqc+aiUn +p39djAa5+/kEP48+Cmr5/zj5JRpajtGLWvj08UaCSZpQeTQoKvhm2ojq4xXh +sSNzTtHwemdpgI2qPpaIijf/d+Eg6PxwELCx08eet11NFWpR8OtPqqt1tj5m +Mm6s1kmJgP7eG25XL+njm+/HQrIiIqDlYZX77yv6eHL49E2hHRGQlzzgefGG +Ph6lUt006BGwRdrA68ddfWw4r9qvNBYOT83e7zrxUB8Vcs1VFl3D4XLGhoMv +BvVxz9vDi7z6+8FSu/mStaYBCm6Yt75CDgWPlVYuHdoGKC4tuui8KhR2f3gh +6K5ngIoVwetpoyGQdupVrB/NAMNH7+VW3A6Bnm/du46ZGiArYe7ABvkQ8Mv5 +olfpaoCDpUOTwxL7IF5kxUv5owaoabarV1x6Lzz6Y7I422aAG/Q37U6MDoQb +rYSv82sD/NTkwSnkEwiJt/RbirsMcLNe36Vii0Cwdle/6N9rgLlGzScNxAKh +u4ZC6/psgD95dmdtLgmAkbj5/cVTBljqZ8XdMLoLJNYQI34UQ+SvoN7jj/SH ++e96TvUyhqi1pY1w8faH/ifF1dJrDbHNoOdhuZU/3AjPT+lUMsQqoYQjJdL+ +oPE2UxU1DdGDzCdxs8EPzK5F+EqjIbYcmpLyFvODfRp67177G+LMze0Bz5p9 +4cAsZcE70BBJD2ZUP5f4wuEGLsr4bkN04H7mKHLZF055vPHkD2XHMzGXVRHi +C3cSD/aZxRjiy+vbfnBTfGGw/1FveZohphdu8qnbvwPcTtu+zSQM0XyvO88q +Ax/Y7mEwq1RjiLZeV8Nb5H3AT0lWsqzOEBeC96zKFfSB8Opxt7YnhvjdNb2c +0u4N6V8zela2GuLKm6+P3zLyhhZm75uoAUOs7MlcLyrqBcxxv25PPio6apWc +2DG0FSRqLXPrVlOxL/9W+4+mrTCerBa6VoiKmyp/nM64tRWuKUys/kqiIm8v +hR8CtsI/l0PmoTJUPKf8REl4dAs8rs0oS9KmYh6zWTl40RNMTzxKL3el4v63 +t94F63gAxe2Gl4QHFa1ypt3KxTxgUjFRI3oLFbda7lorPu8OuXXWz1neVDxx +zkhfs8EdOCe6l18EUjFpcfhxkas7NLr93DdwiIravBt2d8e5wSZl8n+CuVTc +s/q9gMK4C1SMPVXwy6Ni/dKl1YweF1Amwmdq8qkYFhSzN+SRC3DbtF8PLKSi +3dzvZbkzLtAQkjTZWEFFlyvm8td1XYBVO5UV84yKxPm6VSKHnIHq9Hrw2ygV +U+Zd7DTWOkG+9DGC9YuKz0VvnFXndwLxrxqpmb+p2DPCVYLTm2EqKsXQfIaK +DF8jxaKXm6HsKqRcW6aizWhY8/HozaD9456mK4mGEiqhNvp9jrA+9uTBBhoN +e40H731zcIA6k1s8dnQabj5sUTm9zgEcZx+ffcOgYbBnwXVdDgc4uG+66Lsp +DV2skgL0Su3h+Tafz0J2NHRQk+x0EreHQGOqzVYfGq7YWjX/7asdFEx+lp5K +oeGdI61jurdtgFW8dOfIKRru+nKiLT/RBjqDJKmr0mg4prVfZaOvDSwM2DlS +ztHwC6dUxqysDdi0E4l4lYYkAf9hRpY1jBSeHkstpeHSK3F1uQwrUPM3fqzy +joYnKg5/V71hAWcU7RcS+mn47Pqlco/jFjD1yddw8CMNfaqOxxQEWcCjLamF +177Q8MLI6oTbehbg5PgpS3KMhrrzvDRS8yaINjkeysdhhJNvho1TJjfCc5HX +CmMqRmjl2D+uvsMcNNu/brNdb4RmytWR3NbmcDZ1IatAzQgFNKk75nTMYdsq +ZaFd2kbI2fttQneFOfxailz4aGSELzf95PqRawYS32W6OmyN8Fe+ZrLDT1Pw +fxSYWBHGtrfw4Y/FGYTx4JGoTRFGGPTK1OPiQYSDsnv39EQa4ZGcMBKvL8LJ +wyFOc4eM8Mw/8mq6IUIJPVKekWSEXsO8jn3VAEtVCXWNl4xw7NJY/BdfFpy9 +f22qs9EIuab4w1z7TUDGW/77zmYjvMFQy71UaQK3hHLfTz03QnXaa0mRMybw +IPhWg0SbEbbKik+mm5nAB/Wi9C29Rmiw/oJ7TyEd1t+p1hgcNcJD5jImVsnG +8Din2++3uDE+ta0+7+pDgwE7Be9IsjHadE21TwENOOaDPRcpxtjx9oPew7U0 +MNu8yp5H3hizzZcrnn+iQvMKOk1KzRhPbsOLT3dQodX3Op8pyxh3Zt78oRVs +CO+Udxen7zJGDuunH1Ny9GGxo+qOeJAxyq93+jidqA8yR7huXtpjjJd7KAlJ +Qfqw/c2VrLxQYyzSU5Mk6evDwPH22AcxxsjV93Ds1TM9+DZs4DyQZoy2F7L/ +VszqwtSd5Vltwhhd6WmSWqE6MOxmkXOi2hhvnbAOcNmiA73cp62+1Brjw9Ol +cZkbdaDWh3LxQr0xtq40ywmQ0oF4siH97wtjdOq2vJqeog1rUnYfbuk3xnuc +N02amFqgEfCGw5+Tjq+qZyn+r9RBTlym4BE3HS2sJ4amb6vDmkbfzeRVdJSq +tbOqjFeHP3ITN16upuPeI5l8j43UoaaH31xPnI6P5pyb5/LVwMoCjy+vo+PF +QDn73lMbYKdKId+l/+gYh3lTIwfWQcxTr92qjnTs+2CdxHBeB+n+pJdlTnQc +1XyR/VBnHdTdik596U7HjOLdLv+NqoKYqpXw3x109HZqr7/irwrNql/FfCLp +CH4+pBc+KqC2fq286nU6ym5zDn4dpQT4vDO27AYd36Sl7b+1RQncApM+s/Lo +qCMfKZzLVIKEO2O57gV03DHTZCbGrQT96+tUTpSz81lm/O05qwhpGzzVR5+x +43Me+lFAKMBvtXPUsgk6Wjuto+vJykNvK24S/UPHB8bnSjxWykP9vnHniGk6 +BsuWXaZ/WgtpZdZh1AU63p3a+Zbj+FpQo3MU1XCZ4HBwZopLlxz4WgcrNEqY +IPBbPn8XIwvdAZYC3QwTHPDf+SzuDwVq+aYphmCCxSLC1q9bKZBbmLvhgqkJ +8n4wPueST4HQX38tPCxMMHGldcK0JwUEoyri+h1McOmw8O+LjVJgkaQwO+Rr +gq4nvfqoOWR4kLf4eTrFBE/HiKDsEQmgmkfM2pwywW75z99Ft0tA5edRgZzT +JrjGP0nPkCkBZXIfaTZnTTArT7h35q84FGXXn7522QS9RGqaQ+PEISf1uLFl +Mdv+j4THpHQxOBEhnJHdZYIns84+r2ohAa9oSv7YGxNU3ivelHOfBEmlHHVm +vSYYThazvH+eBInjv4dH+01wMkVDy9ibBEcDuxmmwya4uTXwwuK0COzfdvH7 +jzkTVPmct1ZMTQS2bFRCEzkGWz3y2q/dhOFvN69QozwDV1/9WQcqwpDjP/7e +RomBtAPsH+k/QjCcVB21ZT0DE/qDqszOCsH+Fw73o/UYaH+hQte4UxBO2h+W +e2DBQCfNVwLO3gJQ4/FmySCEgQUPym/kF/LB9h81LXVhDHwV0tZ4Mp4POGJy +sjdGMDDZIL6iyJMPLC7vMXCJZmDhmqmCO7x80Plhxd7wBAaSo7dfiArihRFf +rfelWQy839e1fT11FUgHJ1dr1TOwZnZWL3eeG9KWdxmeamBgdvn24a993MB5 +1qL0WxMDhbfIPXGr4YaRKp6CnBcMPMMb8e/RIW6o4UjMJnUx0DB/p/JNDm7Y +cj42auYrA1cld+9MJnFBdm204aPVTORb9pyhua4AAXvPUooQExcYQw5l9BUQ +O2CkGbWGiYymzs9O8isgkGdOWUecifn+2oM8oxxAc4gUy5VjotyX9heaxzmg +Z3D/n+O6TJRe7LctP7zMEuffW/qfOxM9/zHbczOXWHnmR2ImPJkYEFlZZOm3 +xNI7kmZ+bhsTzU0XRxj6Syz7iZI3vTuYqHU4PVeic5GV1DM9v3MvE/0EFdqj +RRdZc7nHzGLimLi74e/zrLx51juTc135hUyMXyYKyH9nWIEH8q5YFzOxLDgo +50f3DGumuNJ/tISJTsv3J5aKZlgkxd5Z3SomUkGf58f2GZYtr6zMw3omFqyT +n3jZMM2q687363rDxPPrprV3ZU+xbIQeaEb2MvFOVOyyZsQUq9fyxQz5PROn +xXN59BynWFM1P1O8BpjIn/4ExninWJo3dO79GGEit6OFg+qRP6y6d6aRqWNM +VDqcX/50yx+WjZgzaE8w0VXIPPSa0R/WruQDryOmmaizhkhdmJpkTdUnXZKc +Y+I3TZLJka5JVvxC1s6aBSY+brj/kVY2yVpjUKCx/S8Tk7KE5dUyJlnXgmum +l5eZuDVG+45z6CTrf2oeJLM= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k8VH8Xx2UpZMnYxliyV/Z1hjEz56DsP2TXgkSohIhos4VKohLtkpRI +9pulElJJCIlSSVIJSXbKM89f9/V+3XvP+jnnfq+Cb4iTPycHB0fJCg6O/19n +Pr5oUj6Vx+ouWr6dOG/P6r5GjjbtjYftD6lSbUEagOLtvuTes6DsLHH+ZBAD +Ih3vvuXqzQWvxlAn1yA7EBmXPDv/tgzcCXrVaOA2+FRnHzL1tgHuJD04Hhuw +FyyURz78ftsJHxJ1037uOAzzb2mZE28HQbufvK7ENhUazW/nvc79A4Spfc2k ++FWQ+VQ97KvxF4Y+pHDxqd4Csb3ed1eZc+Hi7LtcAflCOKtrUWvvyot4fVp/ +Y3gJaL/3tGQG8uIJM8tE8yMl0JoY3KV+iBcfB088YySXwMre8z95b/Biyp9c +WdnLJXDo6BfpxlFeXEF6WXq+oQT8XsYepiXyYZThHq7ta0qB6l/LlC/nRzNa +thncLoW+bJ3632sEMVT0l+ejJ2VwqatQOFJFECNqixv6Wspgi9A67wVjQdR9 +YOgx1lUG/Qmy/zh3CmL79K3lpa9lMLCPnyFWKYgzeucXH/KVw/eNQwTVUwjd +5zMymxzKYW4i6/6hG8JI2O362P2mHKrVRZeXK4UxLz844veHcojZlWaf2CKM +ae0zv3mGy2HpfeJY6h9hbLnqdEViphxivzwQb1dcg2GSjw73iFdAYtst54GI +NXg/o2ayzbkCTuUda+eUEsGDTFvu7BcVYGMQRBJXEsFeqwN7T3dUAG+Tk+s6 +TRG0otn0xbxlv/9F5b2tqQhmH7hfx/xaAYcVW4fPB4ng0QdXTu/kqIR9OeR/ +qjUiqPhGO17LsBI2XynVsN1KQg0tQeG67EpYo3E5ZLs/CfVJ454l1yqhrTax +LCSEhA2vPqVfyasEm/fuRucTSLiQqvNkW0klmFH+mX8oJKE7gyZ/+FklGGTb +bA1ZImG3VtJp6lQlSJ7/cuLcVVH0C3vflW1ZBWT1ysS5fFHsqZvzMLSrAkpD +0rHtJaJoV3i2s8WxCuQmNhxY1yiK+/413RzwrAIVu1Cf2u+iGCh2t4HYUwX6 +3H+pX/TFcANvrKJYWhUYXG7TtWKKYZvy55V4tgqoejka9yzEMI6c8MXvQhXQ +fcwVozzFcHPfbNLFa1VgWndCcPUxMayoCokrLq4ChwiJIb0WMbTXTM5PflUF +jqu/f8zqEkMBb0NT89dV4JRb3bfUL4ax3FHvZ7urwK1jW3vzLzGM7OcSseuv +gu0aN2u2iIvjR3WdjJyRKtgzpJ0R7yOOc/eSDi7wEJDsYs3qnBFH5pMx9Sga +AZSKNgrnCgkcUIq4nEEnoFjUZVZ3tQS2Br8fvckkoKfTqyRjrQQ2XQ+kl5gT +oLw5QnGzlQSuY7BuBTgQ0PDf9ZUdFyVQ6/WlcSd/AtzuKX9ZvimBOl7NcqMB +BIwI3H2sXSyBlEkbyyO7CRBprTh4pkEChXyyk5NDCPCxaRmx/ymBJRwvfptE +E/DXYrrtFUMSvy2++6hyioD0/JjCvxaS+HrLJg84zfa/kiNFc7MklgwMDjme +IcDuKb/paX9J1FjPBdvOEXDJXL7cLk0Sw+68URO7TIDWzVtnDmdLYlDZg7Dx +K+x4OdX3FuVKYidn17v6awT8eGKoIkBI4k+ro9L2uQQYoW3Wy0+SWH3NJo2/ +gIDW6x3hiz8kkaW0Sy7/LjveZVdH9SlJ5G5oGjAuYtfzkQ/fKV4yJhhd47a5 +z64XI/KQjS4Z5fOGuQQrCdh9ZdE9xoSM/+yVduyuYue3GGtwdxMZy/JKVtQT +7HxqT43xbSFjis0ZcZcaAsKNb3i/iCdjvOJ089rHBNjkCE3ZppLx3GuxKxr1 +BCiuOpzSlknGo5nnGvSeENDR7VbadYeMaZ9Zq9UbCbhj0rTJrYyMcaN0Xdkm +Ao7l6r7rrSWju6BhCe9Tdj1CBbg+tpHRwXaw/mUzATxvo7N8esk4MX7I7eYz +AvqZ39S/fCbjQMmAXcRzAk6tbnD5PkVG7bHZnZwtBHzPj8qfpEhh22hYeHsr +AY8Fv9IPKEvhRQN/y/2vCLgQ4dQ+qymFopGbUoXaCNhkpjm3hFK42EoK028n +QKbgUuoxGylMqN4gXsfmKWFeBU4XKSRZx+mxOgjI/TBovSpACvVk/D5rvSYg +eqPjxxOhUigroh11lc2OhQ/3C8RI4dTKmjSeTgLWk9RXnUlg+89SVwtg8/LB +7Msip6XQXeCebQObez7x6Jy/IIVbt+6eluhi69sivEkiRwqPqJzd4M/m4/cG +PC4WSGFjuetIEZu3idmPSZdL4cjUd+NxNusfqo27VieF5EPxlA3dBPAPrpdQ +aJZC5+itadvZPGh14e7NdimkP7mfdYrN1fe5QLVPCgPqHxqVszldIqzrzqAU +Kh5tDu9mc+CRjwHqo1I4ly1o+4vNMGS7dG9aCoU39tVzvSFAwrY6XWdZCvk3 +7X8rwuaxUlWVcl4KWvxWypBicxP5fLUhiYK56owJCpuvHFth/0Cagh07Vs+K +szl8eN8gXYWCgieHbvOz2ea//siHWhTMlJflmWf7U6ywXo1GFFRQERT5zOZ5 +CnG9wZSCh8nCbQ1s7ohTNthkS8GVC8dY19h8+3vG82cuFJTZ9NgvnM1HHZa3 +2XhR8OW4lrkZm92q9v5uDWDf36nfz89mTdl3xx3CKFgTr6/3il0/7kRLSmcM +BffmZFueYHP/SEWxSyIFo462yQGbTz4489Yzi4JXbwbIZLP7tWPt3z39ORQ8 +nVRsacJmo6TdHN53Kbhn22lWL7v/35w3bfB7SEGePVPZy2y9PKopezjcTEF0 +D19xks0XFOSdgjooGJwdBUJs3vhrIWbfFwqG7pS04GbrLdrqvNqTUQp2liyN +H2Trs/iG5jvRGQr2jidXfGPrl+ziY1zNK41r8lSul7P1/d+9+e+rSdKYSOF9 +sYbN8SvPZXtJS2P6IR2pwJcEjD54OsulJY3CkvxUHvZ8KJC8b7vRpLGKdGWV +7Qt2ffbMuRWgND6ONOQ7xZ6neln1KntnaWwpdsufZ8/fufj0iIsHpdHjUvHp +DPb8Pn+/QXk0ThoXpF8oFzQQsGTQ2MU6JY3PqB3LNex53/VtWm/oqjQ+HK47 +9Yq9H+h2W39rNUqjnri6WXEtW4/iqvuaBGUwMyc10KeMAMmQx7KSkjL41ndr +mGwpe18+93gVJC+DouGe37rZ+6oq5pSGsL4MOq+IVNG/x+7Hp4kRTw8ZrDbM +Nrh3mwC9gtqAX7kyGO5+cfYie58GcLpKmhXJoEAciC1fZOtv63jz+UoZbC7U +fOGVTcBKIQVV+nMZjH82tFIok4B3+5OGEsdkUKhea61GGgFxjM07KEay+NdL +3CDoGAFWXtcmaWayGCcgUGN/hACh2J8JrnayeLlMgKx1iG2/8Xh+uo8s7jta +v/tdJAEPbGp+rjwhi0rJUa9/BBMw4aEU+adPFm3zeD8NbyGAiAldJTIki5tS +7a7v8WDr9crDbK1xWbwb07d/xJUAgQH32iBOObw+Mujb40jAuoBUjgE1OVwS +LeoIsCDA68D0ydZDcigm2mEUoUOASpaZzMhxOfxKvJm+rPn/fp+5typdDj1D +rbgeqREQs7ShwyxPDgfbF+R+KxOQmeAlXt0qh6SOC82iUuzvR8az67dk1+Lo +1WVzew52v4ovVhx9vBavOXGWlrdUwca3bX/Hn69FPXJCUdCzKrDn4Lb07mQ/ +nyelJN1UBTud9vXB17XoNk+khT6sAotDCsdieeQxgdOk7uv9KghdO3PTVF0e +Xwkz3JfOVUFTwPWxxkh51OhxHf/tUQV7537HPhdUQIGziV9reyqBHrZLYpik +gNo/6euEOiuBd+RdIRdZAZ2ObiJve1UJt9439rAUFVCkbUjqZ2MlfHyUqVFJ +VcCcGJDoYZ+vHI4b997wVsBBJ4nWLycqQY8Up32oVAH7Rol/S0aVMK++5qOm +qyIePZfuIptaAYzCopwLF5Qweuj9eop4Ofwm2fi4NSjji6thog+yS2Eo1cdt +/ypVbJ3PudzTeR+sf0VZf6Wuw9GfP4v+5hbB6E7e8Ipj61HLPeSkrEkB+/wv +yZncsAHlye+rrbjygfRKNa3klxrWZzI+eWneBJmU+45UqgaKO+Z2dDnnQLa6 +8RrRAE38HFFUfrXtMrRQTA3/ZGhh/h2bO2ZJWUCXaUjX7tHGr8mj4juCzoEQ +V27EjngdnDzjqbFnTTrIxa1leKrqoljA3p62LyeAT2VbldMzXTwuI/Do/INE +2C0FNoUvdPFd3uSOhfxEaBFU/MjVqot8ofp/9mQmQurMN57KDl0c/qzXsn9/ +Igg9D3eVfKeLKp7f6oU0E4G059TU+1Fd9LPsjz+UlwAypTV6/iQ97CAn3uG5 +Eg9aTKn7Udv18OxAdkNjUSyUKwUtcvroYcE1n+xHV2LBiL/aMs1XD3lYvItP +U2PB7K3HQF6AHs73Ttgt7I0Ft7Bskc4wPRwOH9w7pxkLx25JRmgk6WE276Ou +E37HoENQwvhzsR5uT9/vPZh8BPZ/JDXacOhjSKS/qbNYDDxv3vbwLqc+aiUn +p39djAa5+/kEP48+Cmr5/zj5JRpajtGLWvj08UaCSZpQeTQoKvhm2ojq4xXh +sSNzTtHwemdpgI2qPpaIijf/d+Eg6PxwELCx08eet11NFWpR8OtPqqt1tj5m +Mm6s1kmJgP7eG25XL+njm+/HQrIiIqDlYZX77yv6eHL49E2hHRGQlzzgefGG +Ph6lUt006BGwRdrA68ddfWw4r9qvNBYOT83e7zrxUB8Vcs1VFl3D4XLGhoMv +BvVxz9vDi7z6+8FSu/mStaYBCm6Yt75CDgWPlVYuHdoGKC4tuui8KhR2f3gh +6K5ngIoVwetpoyGQdupVrB/NAMNH7+VW3A6Bnm/du46ZGiArYe7ABvkQ8Mv5 +olfpaoCDpUOTwxL7IF5kxUv5owaoabarV1x6Lzz6Y7I422aAG/Q37U6MDoQb +rYSv82sD/NTkwSnkEwiJt/RbirsMcLNe36Vii0Cwdle/6N9rgLlGzScNxAKh +u4ZC6/psgD95dmdtLgmAkbj5/cVTBljqZ8XdMLoLJNYQI34UQ+SvoN7jj/SH ++e96TvUyhqi1pY1w8faH/ifF1dJrDbHNoOdhuZU/3AjPT+lUMsQqoYQjJdL+ +oPE2UxU1DdGDzCdxs8EPzK5F+EqjIbYcmpLyFvODfRp67177G+LMze0Bz5p9 +4cAsZcE70BBJD2ZUP5f4wuEGLsr4bkN04H7mKHLZF055vPHkD2XHMzGXVRHi +C3cSD/aZxRjiy+vbfnBTfGGw/1FveZohphdu8qnbvwPcTtu+zSQM0XyvO88q +Ax/Y7mEwq1RjiLZeV8Nb5H3AT0lWsqzOEBeC96zKFfSB8Opxt7YnhvjdNb2c +0u4N6V8zela2GuLKm6+P3zLyhhZm75uoAUOs7MlcLyrqBcxxv25PPio6apWc +2DG0FSRqLXPrVlOxL/9W+4+mrTCerBa6VoiKmyp/nM64tRWuKUys/kqiIm8v +hR8CtsI/l0PmoTJUPKf8REl4dAs8rs0oS9KmYh6zWTl40RNMTzxKL3el4v63 +t94F63gAxe2Gl4QHFa1ypt3KxTxgUjFRI3oLFbda7lorPu8OuXXWz1neVDxx +zkhfs8EdOCe6l18EUjFpcfhxkas7NLr93DdwiIravBt2d8e5wSZl8n+CuVTc +s/q9gMK4C1SMPVXwy6Ni/dKl1YweF1Amwmdq8qkYFhSzN+SRC3DbtF8PLKSi +3dzvZbkzLtAQkjTZWEFFlyvm8td1XYBVO5UV84yKxPm6VSKHnIHq9Hrw2ygV +U+Zd7DTWOkG+9DGC9YuKz0VvnFXndwLxrxqpmb+p2DPCVYLTm2EqKsXQfIaK +DF8jxaKXm6HsKqRcW6aizWhY8/HozaD9456mK4mGEiqhNvp9jrA+9uTBBhoN +e40H731zcIA6k1s8dnQabj5sUTm9zgEcZx+ffcOgYbBnwXVdDgc4uG+66Lsp +DV2skgL0Su3h+Tafz0J2NHRQk+x0EreHQGOqzVYfGq7YWjX/7asdFEx+lp5K +oeGdI61jurdtgFW8dOfIKRru+nKiLT/RBjqDJKmr0mg4prVfZaOvDSwM2DlS +ztHwC6dUxqysDdi0E4l4lYYkAf9hRpY1jBSeHkstpeHSK3F1uQwrUPM3fqzy +joYnKg5/V71hAWcU7RcS+mn47Pqlco/jFjD1yddw8CMNfaqOxxQEWcCjLamF +177Q8MLI6oTbehbg5PgpS3KMhrrzvDRS8yaINjkeysdhhJNvho1TJjfCc5HX +CmMqRmjl2D+uvsMcNNu/brNdb4RmytWR3NbmcDZ1IatAzQgFNKk75nTMYdsq +ZaFd2kbI2fttQneFOfxailz4aGSELzf95PqRawYS32W6OmyN8Fe+ZrLDT1Pw +fxSYWBHGtrfw4Y/FGYTx4JGoTRFGGPTK1OPiQYSDsnv39EQa4ZGcMBKvL8LJ +wyFOc4eM8Mw/8mq6IUIJPVKekWSEXsO8jn3VAEtVCXWNl4xw7NJY/BdfFpy9 +f22qs9EIuab4w1z7TUDGW/77zmYjvMFQy71UaQK3hHLfTz03QnXaa0mRMybw +IPhWg0SbEbbKik+mm5nAB/Wi9C29Rmiw/oJ7TyEd1t+p1hgcNcJD5jImVsnG +8Din2++3uDE+ta0+7+pDgwE7Be9IsjHadE21TwENOOaDPRcpxtjx9oPew7U0 +MNu8yp5H3hizzZcrnn+iQvMKOk1KzRhPbsOLT3dQodX3Op8pyxh3Zt78oRVs +CO+Udxen7zJGDuunH1Ny9GGxo+qOeJAxyq93+jidqA8yR7huXtpjjJd7KAlJ +Qfqw/c2VrLxQYyzSU5Mk6evDwPH22AcxxsjV93Ds1TM9+DZs4DyQZoy2F7L/ +VszqwtSd5Vltwhhd6WmSWqE6MOxmkXOi2hhvnbAOcNmiA73cp62+1Brjw9Ol +cZkbdaDWh3LxQr0xtq40ywmQ0oF4siH97wtjdOq2vJqeog1rUnYfbuk3xnuc +N02amFqgEfCGw5+Tjq+qZyn+r9RBTlym4BE3HS2sJ4amb6vDmkbfzeRVdJSq +tbOqjFeHP3ITN16upuPeI5l8j43UoaaH31xPnI6P5pyb5/LVwMoCjy+vo+PF +QDn73lMbYKdKId+l/+gYh3lTIwfWQcxTr92qjnTs+2CdxHBeB+n+pJdlTnQc +1XyR/VBnHdTdik596U7HjOLdLv+NqoKYqpXw3x109HZqr7/irwrNql/FfCLp +CH4+pBc+KqC2fq286nU6ym5zDn4dpQT4vDO27AYd36Sl7b+1RQncApM+s/Lo +qCMfKZzLVIKEO2O57gV03DHTZCbGrQT96+tUTpSz81lm/O05qwhpGzzVR5+x +43Me+lFAKMBvtXPUsgk6Wjuto+vJykNvK24S/UPHB8bnSjxWykP9vnHniGk6 +BsuWXaZ/WgtpZdZh1AU63p3a+Zbj+FpQo3MU1XCZ4HBwZopLlxz4WgcrNEqY +IPBbPn8XIwvdAZYC3QwTHPDf+SzuDwVq+aYphmCCxSLC1q9bKZBbmLvhgqkJ +8n4wPueST4HQX38tPCxMMHGldcK0JwUEoyri+h1McOmw8O+LjVJgkaQwO+Rr +gq4nvfqoOWR4kLf4eTrFBE/HiKDsEQmgmkfM2pwywW75z99Ft0tA5edRgZzT +JrjGP0nPkCkBZXIfaTZnTTArT7h35q84FGXXn7522QS9RGqaQ+PEISf1uLFl +Mdv+j4THpHQxOBEhnJHdZYIns84+r2ohAa9oSv7YGxNU3ivelHOfBEmlHHVm +vSYYThazvH+eBInjv4dH+01wMkVDy9ibBEcDuxmmwya4uTXwwuK0COzfdvH7 +jzkTVPmct1ZMTQS2bFRCEzkGWz3y2q/dhOFvN69QozwDV1/9WQcqwpDjP/7e +RomBtAPsH+k/QjCcVB21ZT0DE/qDqszOCsH+Fw73o/UYaH+hQte4UxBO2h+W +e2DBQCfNVwLO3gJQ4/FmySCEgQUPym/kF/LB9h81LXVhDHwV0tZ4Mp4POGJy +sjdGMDDZIL6iyJMPLC7vMXCJZmDhmqmCO7x80Plhxd7wBAaSo7dfiArihRFf +rfelWQy839e1fT11FUgHJ1dr1TOwZnZWL3eeG9KWdxmeamBgdvn24a993MB5 +1qL0WxMDhbfIPXGr4YaRKp6CnBcMPMMb8e/RIW6o4UjMJnUx0DB/p/JNDm7Y +cj42auYrA1cld+9MJnFBdm204aPVTORb9pyhua4AAXvPUooQExcYQw5l9BUQ +O2CkGbWGiYymzs9O8isgkGdOWUecifn+2oM8oxxAc4gUy5VjotyX9heaxzmg +Z3D/n+O6TJRe7LctP7zMEuffW/qfOxM9/zHbczOXWHnmR2ImPJkYEFlZZOm3 +xNI7kmZ+bhsTzU0XRxj6Syz7iZI3vTuYqHU4PVeic5GV1DM9v3MvE/0EFdqj +RRdZc7nHzGLimLi74e/zrLx51juTc135hUyMXyYKyH9nWIEH8q5YFzOxLDgo +50f3DGumuNJ/tISJTsv3J5aKZlgkxd5Z3SomUkGf58f2GZYtr6zMw3omFqyT +n3jZMM2q687363rDxPPrprV3ZU+xbIQeaEb2MvFOVOyyZsQUq9fyxQz5PROn +xXN59BynWFM1P1O8BpjIn/4ExninWJo3dO79GGEit6OFg+qRP6y6d6aRqWNM +VDqcX/50yx+WjZgzaE8w0VXIPPSa0R/WruQDryOmmaizhkhdmJpkTdUnXZKc +Y+I3TZLJka5JVvxC1s6aBSY+brj/kVY2yVpjUKCx/S8Tk7KE5dUyJlnXgmum +l5eZuDVG+45z6CTrf2oeJLM= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09309547772515583}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09309547772515583}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k8VH8Xx2UpZMnYxliyV/Z1hjEz56DsP2TXgkSohIhos4VKohLtkpRI +9pulElJJCIlSSVIJSXbKM89f9/V+3XvP+jnnfq+Cb4iTPycHB0fJCg6O/19n +Pr5oUj6Vx+ouWr6dOG/P6r5GjjbtjYftD6lSbUEagOLtvuTes6DsLHH+ZBAD +Ih3vvuXqzQWvxlAn1yA7EBmXPDv/tgzcCXrVaOA2+FRnHzL1tgHuJD04Hhuw +FyyURz78ftsJHxJ1037uOAzzb2mZE28HQbufvK7ENhUazW/nvc79A4Spfc2k ++FWQ+VQ97KvxF4Y+pHDxqd4Csb3ed1eZc+Hi7LtcAflCOKtrUWvvyot4fVp/ +Y3gJaL/3tGQG8uIJM8tE8yMl0JoY3KV+iBcfB088YySXwMre8z95b/Biyp9c +WdnLJXDo6BfpxlFeXEF6WXq+oQT8XsYepiXyYZThHq7ta0qB6l/LlC/nRzNa +thncLoW+bJ3632sEMVT0l+ejJ2VwqatQOFJFECNqixv6Wspgi9A67wVjQdR9 +YOgx1lUG/Qmy/zh3CmL79K3lpa9lMLCPnyFWKYgzeucXH/KVw/eNQwTVUwjd +5zMymxzKYW4i6/6hG8JI2O362P2mHKrVRZeXK4UxLz844veHcojZlWaf2CKM +ae0zv3mGy2HpfeJY6h9hbLnqdEViphxivzwQb1dcg2GSjw73iFdAYtst54GI +NXg/o2ayzbkCTuUda+eUEsGDTFvu7BcVYGMQRBJXEsFeqwN7T3dUAG+Tk+s6 +TRG0otn0xbxlv/9F5b2tqQhmH7hfx/xaAYcVW4fPB4ng0QdXTu/kqIR9OeR/ +qjUiqPhGO17LsBI2XynVsN1KQg0tQeG67EpYo3E5ZLs/CfVJ454l1yqhrTax +LCSEhA2vPqVfyasEm/fuRucTSLiQqvNkW0klmFH+mX8oJKE7gyZ/+FklGGTb +bA1ZImG3VtJp6lQlSJ7/cuLcVVH0C3vflW1ZBWT1ysS5fFHsqZvzMLSrAkpD +0rHtJaJoV3i2s8WxCuQmNhxY1yiK+/413RzwrAIVu1Cf2u+iGCh2t4HYUwX6 +3H+pX/TFcANvrKJYWhUYXG7TtWKKYZvy55V4tgqoejka9yzEMI6c8MXvQhXQ +fcwVozzFcHPfbNLFa1VgWndCcPUxMayoCokrLq4ChwiJIb0WMbTXTM5PflUF +jqu/f8zqEkMBb0NT89dV4JRb3bfUL4ax3FHvZ7urwK1jW3vzLzGM7OcSseuv +gu0aN2u2iIvjR3WdjJyRKtgzpJ0R7yOOc/eSDi7wEJDsYs3qnBFH5pMx9Sga +AZSKNgrnCgkcUIq4nEEnoFjUZVZ3tQS2Br8fvckkoKfTqyRjrQQ2XQ+kl5gT +oLw5QnGzlQSuY7BuBTgQ0PDf9ZUdFyVQ6/WlcSd/AtzuKX9ZvimBOl7NcqMB +BIwI3H2sXSyBlEkbyyO7CRBprTh4pkEChXyyk5NDCPCxaRmx/ymBJRwvfptE +E/DXYrrtFUMSvy2++6hyioD0/JjCvxaS+HrLJg84zfa/kiNFc7MklgwMDjme +IcDuKb/paX9J1FjPBdvOEXDJXL7cLk0Sw+68URO7TIDWzVtnDmdLYlDZg7Dx +K+x4OdX3FuVKYidn17v6awT8eGKoIkBI4k+ro9L2uQQYoW3Wy0+SWH3NJo2/ +gIDW6x3hiz8kkaW0Sy7/LjveZVdH9SlJ5G5oGjAuYtfzkQ/fKV4yJhhd47a5 +z64XI/KQjS4Z5fOGuQQrCdh9ZdE9xoSM/+yVduyuYue3GGtwdxMZy/JKVtQT +7HxqT43xbSFjis0ZcZcaAsKNb3i/iCdjvOJ089rHBNjkCE3ZppLx3GuxKxr1 +BCiuOpzSlknGo5nnGvSeENDR7VbadYeMaZ9Zq9UbCbhj0rTJrYyMcaN0Xdkm +Ao7l6r7rrSWju6BhCe9Tdj1CBbg+tpHRwXaw/mUzATxvo7N8esk4MX7I7eYz +AvqZ39S/fCbjQMmAXcRzAk6tbnD5PkVG7bHZnZwtBHzPj8qfpEhh22hYeHsr +AY8Fv9IPKEvhRQN/y/2vCLgQ4dQ+qymFopGbUoXaCNhkpjm3hFK42EoK028n +QKbgUuoxGylMqN4gXsfmKWFeBU4XKSRZx+mxOgjI/TBovSpACvVk/D5rvSYg +eqPjxxOhUigroh11lc2OhQ/3C8RI4dTKmjSeTgLWk9RXnUlg+89SVwtg8/LB +7Msip6XQXeCebQObez7x6Jy/IIVbt+6eluhi69sivEkiRwqPqJzd4M/m4/cG +PC4WSGFjuetIEZu3idmPSZdL4cjUd+NxNusfqo27VieF5EPxlA3dBPAPrpdQ +aJZC5+itadvZPGh14e7NdimkP7mfdYrN1fe5QLVPCgPqHxqVszldIqzrzqAU +Kh5tDu9mc+CRjwHqo1I4ly1o+4vNMGS7dG9aCoU39tVzvSFAwrY6XWdZCvk3 +7X8rwuaxUlWVcl4KWvxWypBicxP5fLUhiYK56owJCpuvHFth/0Cagh07Vs+K +szl8eN8gXYWCgieHbvOz2ea//siHWhTMlJflmWf7U6ywXo1GFFRQERT5zOZ5 +CnG9wZSCh8nCbQ1s7ohTNthkS8GVC8dY19h8+3vG82cuFJTZ9NgvnM1HHZa3 +2XhR8OW4lrkZm92q9v5uDWDf36nfz89mTdl3xx3CKFgTr6/3il0/7kRLSmcM +BffmZFueYHP/SEWxSyIFo462yQGbTz4489Yzi4JXbwbIZLP7tWPt3z39ORQ8 +nVRsacJmo6TdHN53Kbhn22lWL7v/35w3bfB7SEGePVPZy2y9PKopezjcTEF0 +D19xks0XFOSdgjooGJwdBUJs3vhrIWbfFwqG7pS04GbrLdrqvNqTUQp2liyN +H2Trs/iG5jvRGQr2jidXfGPrl+ziY1zNK41r8lSul7P1/d+9+e+rSdKYSOF9 +sYbN8SvPZXtJS2P6IR2pwJcEjD54OsulJY3CkvxUHvZ8KJC8b7vRpLGKdGWV +7Qt2ffbMuRWgND6ONOQ7xZ6neln1KntnaWwpdsufZ8/fufj0iIsHpdHjUvHp +DPb8Pn+/QXk0ThoXpF8oFzQQsGTQ2MU6JY3PqB3LNex53/VtWm/oqjQ+HK47 +9Yq9H+h2W39rNUqjnri6WXEtW4/iqvuaBGUwMyc10KeMAMmQx7KSkjL41ndr +mGwpe18+93gVJC+DouGe37rZ+6oq5pSGsL4MOq+IVNG/x+7Hp4kRTw8ZrDbM +Nrh3mwC9gtqAX7kyGO5+cfYie58GcLpKmhXJoEAciC1fZOtv63jz+UoZbC7U +fOGVTcBKIQVV+nMZjH82tFIok4B3+5OGEsdkUKhea61GGgFxjM07KEay+NdL +3CDoGAFWXtcmaWayGCcgUGN/hACh2J8JrnayeLlMgKx1iG2/8Xh+uo8s7jta +v/tdJAEPbGp+rjwhi0rJUa9/BBMw4aEU+adPFm3zeD8NbyGAiAldJTIki5tS +7a7v8WDr9crDbK1xWbwb07d/xJUAgQH32iBOObw+Mujb40jAuoBUjgE1OVwS +LeoIsCDA68D0ydZDcigm2mEUoUOASpaZzMhxOfxKvJm+rPn/fp+5typdDj1D +rbgeqREQs7ShwyxPDgfbF+R+KxOQmeAlXt0qh6SOC82iUuzvR8az67dk1+Lo +1WVzew52v4ovVhx9vBavOXGWlrdUwca3bX/Hn69FPXJCUdCzKrDn4Lb07mQ/ +nyelJN1UBTud9vXB17XoNk+khT6sAotDCsdieeQxgdOk7uv9KghdO3PTVF0e +Xwkz3JfOVUFTwPWxxkh51OhxHf/tUQV7537HPhdUQIGziV9reyqBHrZLYpik +gNo/6euEOiuBd+RdIRdZAZ2ObiJve1UJt9439rAUFVCkbUjqZ2MlfHyUqVFJ +VcCcGJDoYZ+vHI4b997wVsBBJ4nWLycqQY8Up32oVAH7Rol/S0aVMK++5qOm +qyIePZfuIptaAYzCopwLF5Qweuj9eop4Ofwm2fi4NSjji6thog+yS2Eo1cdt +/ypVbJ3PudzTeR+sf0VZf6Wuw9GfP4v+5hbB6E7e8Ipj61HLPeSkrEkB+/wv +yZncsAHlye+rrbjygfRKNa3klxrWZzI+eWneBJmU+45UqgaKO+Z2dDnnQLa6 +8RrRAE38HFFUfrXtMrRQTA3/ZGhh/h2bO2ZJWUCXaUjX7tHGr8mj4juCzoEQ +V27EjngdnDzjqbFnTTrIxa1leKrqoljA3p62LyeAT2VbldMzXTwuI/Do/INE +2C0FNoUvdPFd3uSOhfxEaBFU/MjVqot8ofp/9mQmQurMN57KDl0c/qzXsn9/ +Igg9D3eVfKeLKp7f6oU0E4G059TU+1Fd9LPsjz+UlwAypTV6/iQ97CAn3uG5 +Eg9aTKn7Udv18OxAdkNjUSyUKwUtcvroYcE1n+xHV2LBiL/aMs1XD3lYvItP +U2PB7K3HQF6AHs73Ttgt7I0Ft7Bskc4wPRwOH9w7pxkLx25JRmgk6WE276Ou +E37HoENQwvhzsR5uT9/vPZh8BPZ/JDXacOhjSKS/qbNYDDxv3vbwLqc+aiUn +p39djAa5+/kEP48+Cmr5/zj5JRpajtGLWvj08UaCSZpQeTQoKvhm2ojq4xXh +sSNzTtHwemdpgI2qPpaIijf/d+Eg6PxwELCx08eet11NFWpR8OtPqqt1tj5m +Mm6s1kmJgP7eG25XL+njm+/HQrIiIqDlYZX77yv6eHL49E2hHRGQlzzgefGG +Ph6lUt006BGwRdrA68ddfWw4r9qvNBYOT83e7zrxUB8Vcs1VFl3D4XLGhoMv +BvVxz9vDi7z6+8FSu/mStaYBCm6Yt75CDgWPlVYuHdoGKC4tuui8KhR2f3gh +6K5ngIoVwetpoyGQdupVrB/NAMNH7+VW3A6Bnm/du46ZGiArYe7ABvkQ8Mv5 +olfpaoCDpUOTwxL7IF5kxUv5owaoabarV1x6Lzz6Y7I422aAG/Q37U6MDoQb +rYSv82sD/NTkwSnkEwiJt/RbirsMcLNe36Vii0Cwdle/6N9rgLlGzScNxAKh +u4ZC6/psgD95dmdtLgmAkbj5/cVTBljqZ8XdMLoLJNYQI34UQ+SvoN7jj/SH ++e96TvUyhqi1pY1w8faH/ifF1dJrDbHNoOdhuZU/3AjPT+lUMsQqoYQjJdL+ +oPE2UxU1DdGDzCdxs8EPzK5F+EqjIbYcmpLyFvODfRp67177G+LMze0Bz5p9 +4cAsZcE70BBJD2ZUP5f4wuEGLsr4bkN04H7mKHLZF055vPHkD2XHMzGXVRHi +C3cSD/aZxRjiy+vbfnBTfGGw/1FveZohphdu8qnbvwPcTtu+zSQM0XyvO88q +Ax/Y7mEwq1RjiLZeV8Nb5H3AT0lWsqzOEBeC96zKFfSB8Opxt7YnhvjdNb2c +0u4N6V8zela2GuLKm6+P3zLyhhZm75uoAUOs7MlcLyrqBcxxv25PPio6apWc +2DG0FSRqLXPrVlOxL/9W+4+mrTCerBa6VoiKmyp/nM64tRWuKUys/kqiIm8v +hR8CtsI/l0PmoTJUPKf8REl4dAs8rs0oS9KmYh6zWTl40RNMTzxKL3el4v63 +t94F63gAxe2Gl4QHFa1ypt3KxTxgUjFRI3oLFbda7lorPu8OuXXWz1neVDxx +zkhfs8EdOCe6l18EUjFpcfhxkas7NLr93DdwiIravBt2d8e5wSZl8n+CuVTc +s/q9gMK4C1SMPVXwy6Ni/dKl1YweF1Amwmdq8qkYFhSzN+SRC3DbtF8PLKSi +3dzvZbkzLtAQkjTZWEFFlyvm8td1XYBVO5UV84yKxPm6VSKHnIHq9Hrw2ygV +U+Zd7DTWOkG+9DGC9YuKz0VvnFXndwLxrxqpmb+p2DPCVYLTm2EqKsXQfIaK +DF8jxaKXm6HsKqRcW6aizWhY8/HozaD9456mK4mGEiqhNvp9jrA+9uTBBhoN +e40H731zcIA6k1s8dnQabj5sUTm9zgEcZx+ffcOgYbBnwXVdDgc4uG+66Lsp +DV2skgL0Su3h+Tafz0J2NHRQk+x0EreHQGOqzVYfGq7YWjX/7asdFEx+lp5K +oeGdI61jurdtgFW8dOfIKRru+nKiLT/RBjqDJKmr0mg4prVfZaOvDSwM2DlS +ztHwC6dUxqysDdi0E4l4lYYkAf9hRpY1jBSeHkstpeHSK3F1uQwrUPM3fqzy +joYnKg5/V71hAWcU7RcS+mn47Pqlco/jFjD1yddw8CMNfaqOxxQEWcCjLamF +177Q8MLI6oTbehbg5PgpS3KMhrrzvDRS8yaINjkeysdhhJNvho1TJjfCc5HX +CmMqRmjl2D+uvsMcNNu/brNdb4RmytWR3NbmcDZ1IatAzQgFNKk75nTMYdsq +ZaFd2kbI2fttQneFOfxailz4aGSELzf95PqRawYS32W6OmyN8Fe+ZrLDT1Pw +fxSYWBHGtrfw4Y/FGYTx4JGoTRFGGPTK1OPiQYSDsnv39EQa4ZGcMBKvL8LJ +wyFOc4eM8Mw/8mq6IUIJPVKekWSEXsO8jn3VAEtVCXWNl4xw7NJY/BdfFpy9 +f22qs9EIuab4w1z7TUDGW/77zmYjvMFQy71UaQK3hHLfTz03QnXaa0mRMybw +IPhWg0SbEbbKik+mm5nAB/Wi9C29Rmiw/oJ7TyEd1t+p1hgcNcJD5jImVsnG +8Din2++3uDE+ta0+7+pDgwE7Be9IsjHadE21TwENOOaDPRcpxtjx9oPew7U0 +MNu8yp5H3hizzZcrnn+iQvMKOk1KzRhPbsOLT3dQodX3Op8pyxh3Zt78oRVs +CO+Udxen7zJGDuunH1Ny9GGxo+qOeJAxyq93+jidqA8yR7huXtpjjJd7KAlJ +Qfqw/c2VrLxQYyzSU5Mk6evDwPH22AcxxsjV93Ds1TM9+DZs4DyQZoy2F7L/ +VszqwtSd5Vltwhhd6WmSWqE6MOxmkXOi2hhvnbAOcNmiA73cp62+1Brjw9Ol +cZkbdaDWh3LxQr0xtq40ywmQ0oF4siH97wtjdOq2vJqeog1rUnYfbuk3xnuc +N02amFqgEfCGw5+Tjq+qZyn+r9RBTlym4BE3HS2sJ4amb6vDmkbfzeRVdJSq +tbOqjFeHP3ITN16upuPeI5l8j43UoaaH31xPnI6P5pyb5/LVwMoCjy+vo+PF +QDn73lMbYKdKId+l/+gYh3lTIwfWQcxTr92qjnTs+2CdxHBeB+n+pJdlTnQc +1XyR/VBnHdTdik596U7HjOLdLv+NqoKYqpXw3x109HZqr7/irwrNql/FfCLp +CH4+pBc+KqC2fq286nU6ym5zDn4dpQT4vDO27AYd36Sl7b+1RQncApM+s/Lo +qCMfKZzLVIKEO2O57gV03DHTZCbGrQT96+tUTpSz81lm/O05qwhpGzzVR5+x +43Me+lFAKMBvtXPUsgk6Wjuto+vJykNvK24S/UPHB8bnSjxWykP9vnHniGk6 +BsuWXaZ/WgtpZdZh1AU63p3a+Zbj+FpQo3MU1XCZ4HBwZopLlxz4WgcrNEqY +IPBbPn8XIwvdAZYC3QwTHPDf+SzuDwVq+aYphmCCxSLC1q9bKZBbmLvhgqkJ +8n4wPueST4HQX38tPCxMMHGldcK0JwUEoyri+h1McOmw8O+LjVJgkaQwO+Rr +gq4nvfqoOWR4kLf4eTrFBE/HiKDsEQmgmkfM2pwywW75z99Ft0tA5edRgZzT +JrjGP0nPkCkBZXIfaTZnTTArT7h35q84FGXXn7522QS9RGqaQ+PEISf1uLFl +Mdv+j4THpHQxOBEhnJHdZYIns84+r2ohAa9oSv7YGxNU3ivelHOfBEmlHHVm +vSYYThazvH+eBInjv4dH+01wMkVDy9ibBEcDuxmmwya4uTXwwuK0COzfdvH7 +jzkTVPmct1ZMTQS2bFRCEzkGWz3y2q/dhOFvN69QozwDV1/9WQcqwpDjP/7e +RomBtAPsH+k/QjCcVB21ZT0DE/qDqszOCsH+Fw73o/UYaH+hQte4UxBO2h+W +e2DBQCfNVwLO3gJQ4/FmySCEgQUPym/kF/LB9h81LXVhDHwV0tZ4Mp4POGJy +sjdGMDDZIL6iyJMPLC7vMXCJZmDhmqmCO7x80Plhxd7wBAaSo7dfiArihRFf +rfelWQy839e1fT11FUgHJ1dr1TOwZnZWL3eeG9KWdxmeamBgdvn24a993MB5 +1qL0WxMDhbfIPXGr4YaRKp6CnBcMPMMb8e/RIW6o4UjMJnUx0DB/p/JNDm7Y +cj42auYrA1cld+9MJnFBdm204aPVTORb9pyhua4AAXvPUooQExcYQw5l9BUQ +O2CkGbWGiYymzs9O8isgkGdOWUecifn+2oM8oxxAc4gUy5VjotyX9heaxzmg +Z3D/n+O6TJRe7LctP7zMEuffW/qfOxM9/zHbczOXWHnmR2ImPJkYEFlZZOm3 +xNI7kmZ+bhsTzU0XRxj6Syz7iZI3vTuYqHU4PVeic5GV1DM9v3MvE/0EFdqj +RRdZc7nHzGLimLi74e/zrLx51juTc135hUyMXyYKyH9nWIEH8q5YFzOxLDgo +50f3DGumuNJ/tISJTsv3J5aKZlgkxd5Z3SomUkGf58f2GZYtr6zMw3omFqyT +n3jZMM2q687363rDxPPrprV3ZU+xbIQeaEb2MvFOVOyyZsQUq9fyxQz5PROn +xXN59BynWFM1P1O8BpjIn/4ExninWJo3dO79GGEit6OFg+qRP6y6d6aRqWNM +VDqcX/50yx+WjZgzaE8w0VXIPPSa0R/WruQDryOmmaizhkhdmJpkTdUnXZKc +Y+I3TZLJka5JVvxC1s6aBSY+brj/kVY2yVpjUKCx/S8Tk7KE5dUyJlnXgmum +l5eZuDVG+45z6CTrf2oeJLM= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09309547772515583}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09309547772515583}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831389551899*^9}, + CellLabel-> + "Out[119]=",ExpressionUUID->"44e3e660-912f-465f-b609-6263031d06c4"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"2335a158-7588-4c40-bdb5-\ -53b7ef04b97c"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k8VH8Xx2UpZMnYxliyV/Z1hjEz56DsP2TXgkSohIhos4VKohLtkpRI +9pulElJJCIlSSVIJSXbKM89f9/V+3XvP+jnnfq+Cb4iTPycHB0fJCg6O/19n +Pr5oUj6Vx+ouWr6dOG/P6r5GjjbtjYftD6lSbUEagOLtvuTes6DsLHH+ZBAD +Ih3vvuXqzQWvxlAn1yA7EBmXPDv/tgzcCXrVaOA2+FRnHzL1tgHuJD04Hhuw +FyyURz78ftsJHxJ1037uOAzzb2mZE28HQbufvK7ENhUazW/nvc79A4Spfc2k ++FWQ+VQ97KvxF4Y+pHDxqd4Csb3ed1eZc+Hi7LtcAflCOKtrUWvvyot4fVp/ +Y3gJaL/3tGQG8uIJM8tE8yMl0JoY3KV+iBcfB088YySXwMre8z95b/Biyp9c +WdnLJXDo6BfpxlFeXEF6WXq+oQT8XsYepiXyYZThHq7ta0qB6l/LlC/nRzNa +thncLoW+bJ3632sEMVT0l+ejJ2VwqatQOFJFECNqixv6Wspgi9A67wVjQdR9 +YOgx1lUG/Qmy/zh3CmL79K3lpa9lMLCPnyFWKYgzeucXH/KVw/eNQwTVUwjd +5zMymxzKYW4i6/6hG8JI2O362P2mHKrVRZeXK4UxLz844veHcojZlWaf2CKM +ae0zv3mGy2HpfeJY6h9hbLnqdEViphxivzwQb1dcg2GSjw73iFdAYtst54GI +NXg/o2ayzbkCTuUda+eUEsGDTFvu7BcVYGMQRBJXEsFeqwN7T3dUAG+Tk+s6 +TRG0otn0xbxlv/9F5b2tqQhmH7hfx/xaAYcVW4fPB4ng0QdXTu/kqIR9OeR/ +qjUiqPhGO17LsBI2XynVsN1KQg0tQeG67EpYo3E5ZLs/CfVJ454l1yqhrTax +LCSEhA2vPqVfyasEm/fuRucTSLiQqvNkW0klmFH+mX8oJKE7gyZ/+FklGGTb +bA1ZImG3VtJp6lQlSJ7/cuLcVVH0C3vflW1ZBWT1ysS5fFHsqZvzMLSrAkpD +0rHtJaJoV3i2s8WxCuQmNhxY1yiK+/413RzwrAIVu1Cf2u+iGCh2t4HYUwX6 +3H+pX/TFcANvrKJYWhUYXG7TtWKKYZvy55V4tgqoejka9yzEMI6c8MXvQhXQ +fcwVozzFcHPfbNLFa1VgWndCcPUxMayoCokrLq4ChwiJIb0WMbTXTM5PflUF +jqu/f8zqEkMBb0NT89dV4JRb3bfUL4ax3FHvZ7urwK1jW3vzLzGM7OcSseuv +gu0aN2u2iIvjR3WdjJyRKtgzpJ0R7yOOc/eSDi7wEJDsYs3qnBFH5pMx9Sga +AZSKNgrnCgkcUIq4nEEnoFjUZVZ3tQS2Br8fvckkoKfTqyRjrQQ2XQ+kl5gT +oLw5QnGzlQSuY7BuBTgQ0PDf9ZUdFyVQ6/WlcSd/AtzuKX9ZvimBOl7NcqMB +BIwI3H2sXSyBlEkbyyO7CRBprTh4pkEChXyyk5NDCPCxaRmx/ymBJRwvfptE +E/DXYrrtFUMSvy2++6hyioD0/JjCvxaS+HrLJg84zfa/kiNFc7MklgwMDjme +IcDuKb/paX9J1FjPBdvOEXDJXL7cLk0Sw+68URO7TIDWzVtnDmdLYlDZg7Dx +K+x4OdX3FuVKYidn17v6awT8eGKoIkBI4k+ro9L2uQQYoW3Wy0+SWH3NJo2/ +gIDW6x3hiz8kkaW0Sy7/LjveZVdH9SlJ5G5oGjAuYtfzkQ/fKV4yJhhd47a5 +z64XI/KQjS4Z5fOGuQQrCdh9ZdE9xoSM/+yVduyuYue3GGtwdxMZy/JKVtQT +7HxqT43xbSFjis0ZcZcaAsKNb3i/iCdjvOJ089rHBNjkCE3ZppLx3GuxKxr1 +BCiuOpzSlknGo5nnGvSeENDR7VbadYeMaZ9Zq9UbCbhj0rTJrYyMcaN0Xdkm +Ao7l6r7rrSWju6BhCe9Tdj1CBbg+tpHRwXaw/mUzATxvo7N8esk4MX7I7eYz +AvqZ39S/fCbjQMmAXcRzAk6tbnD5PkVG7bHZnZwtBHzPj8qfpEhh22hYeHsr +AY8Fv9IPKEvhRQN/y/2vCLgQ4dQ+qymFopGbUoXaCNhkpjm3hFK42EoK028n +QKbgUuoxGylMqN4gXsfmKWFeBU4XKSRZx+mxOgjI/TBovSpACvVk/D5rvSYg +eqPjxxOhUigroh11lc2OhQ/3C8RI4dTKmjSeTgLWk9RXnUlg+89SVwtg8/LB +7Msip6XQXeCebQObez7x6Jy/IIVbt+6eluhi69sivEkiRwqPqJzd4M/m4/cG +PC4WSGFjuetIEZu3idmPSZdL4cjUd+NxNusfqo27VieF5EPxlA3dBPAPrpdQ +aJZC5+itadvZPGh14e7NdimkP7mfdYrN1fe5QLVPCgPqHxqVszldIqzrzqAU +Kh5tDu9mc+CRjwHqo1I4ly1o+4vNMGS7dG9aCoU39tVzvSFAwrY6XWdZCvk3 +7X8rwuaxUlWVcl4KWvxWypBicxP5fLUhiYK56owJCpuvHFth/0Cagh07Vs+K +szl8eN8gXYWCgieHbvOz2ea//siHWhTMlJflmWf7U6ywXo1GFFRQERT5zOZ5 +CnG9wZSCh8nCbQ1s7ohTNthkS8GVC8dY19h8+3vG82cuFJTZ9NgvnM1HHZa3 +2XhR8OW4lrkZm92q9v5uDWDf36nfz89mTdl3xx3CKFgTr6/3il0/7kRLSmcM +BffmZFueYHP/SEWxSyIFo462yQGbTz4489Yzi4JXbwbIZLP7tWPt3z39ORQ8 +nVRsacJmo6TdHN53Kbhn22lWL7v/35w3bfB7SEGePVPZy2y9PKopezjcTEF0 +D19xks0XFOSdgjooGJwdBUJs3vhrIWbfFwqG7pS04GbrLdrqvNqTUQp2liyN +H2Trs/iG5jvRGQr2jidXfGPrl+ziY1zNK41r8lSul7P1/d+9+e+rSdKYSOF9 +sYbN8SvPZXtJS2P6IR2pwJcEjD54OsulJY3CkvxUHvZ8KJC8b7vRpLGKdGWV +7Qt2ffbMuRWgND6ONOQ7xZ6neln1KntnaWwpdsufZ8/fufj0iIsHpdHjUvHp +DPb8Pn+/QXk0ThoXpF8oFzQQsGTQ2MU6JY3PqB3LNex53/VtWm/oqjQ+HK47 +9Yq9H+h2W39rNUqjnri6WXEtW4/iqvuaBGUwMyc10KeMAMmQx7KSkjL41ndr +mGwpe18+93gVJC+DouGe37rZ+6oq5pSGsL4MOq+IVNG/x+7Hp4kRTw8ZrDbM +Nrh3mwC9gtqAX7kyGO5+cfYie58GcLpKmhXJoEAciC1fZOtv63jz+UoZbC7U +fOGVTcBKIQVV+nMZjH82tFIok4B3+5OGEsdkUKhea61GGgFxjM07KEay+NdL +3CDoGAFWXtcmaWayGCcgUGN/hACh2J8JrnayeLlMgKx1iG2/8Xh+uo8s7jta +v/tdJAEPbGp+rjwhi0rJUa9/BBMw4aEU+adPFm3zeD8NbyGAiAldJTIki5tS +7a7v8WDr9crDbK1xWbwb07d/xJUAgQH32iBOObw+Mujb40jAuoBUjgE1OVwS +LeoIsCDA68D0ydZDcigm2mEUoUOASpaZzMhxOfxKvJm+rPn/fp+5typdDj1D +rbgeqREQs7ShwyxPDgfbF+R+KxOQmeAlXt0qh6SOC82iUuzvR8az67dk1+Lo +1WVzew52v4ovVhx9vBavOXGWlrdUwca3bX/Hn69FPXJCUdCzKrDn4Lb07mQ/ +nyelJN1UBTud9vXB17XoNk+khT6sAotDCsdieeQxgdOk7uv9KghdO3PTVF0e +Xwkz3JfOVUFTwPWxxkh51OhxHf/tUQV7537HPhdUQIGziV9reyqBHrZLYpik +gNo/6euEOiuBd+RdIRdZAZ2ObiJve1UJt9439rAUFVCkbUjqZ2MlfHyUqVFJ +VcCcGJDoYZ+vHI4b997wVsBBJ4nWLycqQY8Up32oVAH7Rol/S0aVMK++5qOm +qyIePZfuIptaAYzCopwLF5Qweuj9eop4Ofwm2fi4NSjji6thog+yS2Eo1cdt +/ypVbJ3PudzTeR+sf0VZf6Wuw9GfP4v+5hbB6E7e8Ipj61HLPeSkrEkB+/wv +yZncsAHlye+rrbjygfRKNa3klxrWZzI+eWneBJmU+45UqgaKO+Z2dDnnQLa6 +8RrRAE38HFFUfrXtMrRQTA3/ZGhh/h2bO2ZJWUCXaUjX7tHGr8mj4juCzoEQ +V27EjngdnDzjqbFnTTrIxa1leKrqoljA3p62LyeAT2VbldMzXTwuI/Do/INE +2C0FNoUvdPFd3uSOhfxEaBFU/MjVqot8ofp/9mQmQurMN57KDl0c/qzXsn9/ +Igg9D3eVfKeLKp7f6oU0E4G059TU+1Fd9LPsjz+UlwAypTV6/iQ97CAn3uG5 +Eg9aTKn7Udv18OxAdkNjUSyUKwUtcvroYcE1n+xHV2LBiL/aMs1XD3lYvItP +U2PB7K3HQF6AHs73Ttgt7I0Ft7Bskc4wPRwOH9w7pxkLx25JRmgk6WE276Ou +E37HoENQwvhzsR5uT9/vPZh8BPZ/JDXacOhjSKS/qbNYDDxv3vbwLqc+aiUn +p39djAa5+/kEP48+Cmr5/zj5JRpajtGLWvj08UaCSZpQeTQoKvhm2ojq4xXh +sSNzTtHwemdpgI2qPpaIijf/d+Eg6PxwELCx08eet11NFWpR8OtPqqt1tj5m +Mm6s1kmJgP7eG25XL+njm+/HQrIiIqDlYZX77yv6eHL49E2hHRGQlzzgefGG +Ph6lUt006BGwRdrA68ddfWw4r9qvNBYOT83e7zrxUB8Vcs1VFl3D4XLGhoMv +BvVxz9vDi7z6+8FSu/mStaYBCm6Yt75CDgWPlVYuHdoGKC4tuui8KhR2f3gh +6K5ngIoVwetpoyGQdupVrB/NAMNH7+VW3A6Bnm/du46ZGiArYe7ABvkQ8Mv5 +olfpaoCDpUOTwxL7IF5kxUv5owaoabarV1x6Lzz6Y7I422aAG/Q37U6MDoQb +rYSv82sD/NTkwSnkEwiJt/RbirsMcLNe36Vii0Cwdle/6N9rgLlGzScNxAKh +u4ZC6/psgD95dmdtLgmAkbj5/cVTBljqZ8XdMLoLJNYQI34UQ+SvoN7jj/SH ++e96TvUyhqi1pY1w8faH/ifF1dJrDbHNoOdhuZU/3AjPT+lUMsQqoYQjJdL+ +oPE2UxU1DdGDzCdxs8EPzK5F+EqjIbYcmpLyFvODfRp67177G+LMze0Bz5p9 +4cAsZcE70BBJD2ZUP5f4wuEGLsr4bkN04H7mKHLZF055vPHkD2XHMzGXVRHi +C3cSD/aZxRjiy+vbfnBTfGGw/1FveZohphdu8qnbvwPcTtu+zSQM0XyvO88q +Ax/Y7mEwq1RjiLZeV8Nb5H3AT0lWsqzOEBeC96zKFfSB8Opxt7YnhvjdNb2c +0u4N6V8zela2GuLKm6+P3zLyhhZm75uoAUOs7MlcLyrqBcxxv25PPio6apWc +2DG0FSRqLXPrVlOxL/9W+4+mrTCerBa6VoiKmyp/nM64tRWuKUys/kqiIm8v +hR8CtsI/l0PmoTJUPKf8REl4dAs8rs0oS9KmYh6zWTl40RNMTzxKL3el4v63 +t94F63gAxe2Gl4QHFa1ypt3KxTxgUjFRI3oLFbda7lorPu8OuXXWz1neVDxx +zkhfs8EdOCe6l18EUjFpcfhxkas7NLr93DdwiIravBt2d8e5wSZl8n+CuVTc +s/q9gMK4C1SMPVXwy6Ni/dKl1YweF1Amwmdq8qkYFhSzN+SRC3DbtF8PLKSi +3dzvZbkzLtAQkjTZWEFFlyvm8td1XYBVO5UV84yKxPm6VSKHnIHq9Hrw2ygV +U+Zd7DTWOkG+9DGC9YuKz0VvnFXndwLxrxqpmb+p2DPCVYLTm2EqKsXQfIaK +DF8jxaKXm6HsKqRcW6aizWhY8/HozaD9456mK4mGEiqhNvp9jrA+9uTBBhoN +e40H731zcIA6k1s8dnQabj5sUTm9zgEcZx+ffcOgYbBnwXVdDgc4uG+66Lsp +DV2skgL0Su3h+Tafz0J2NHRQk+x0EreHQGOqzVYfGq7YWjX/7asdFEx+lp5K +oeGdI61jurdtgFW8dOfIKRru+nKiLT/RBjqDJKmr0mg4prVfZaOvDSwM2DlS +ztHwC6dUxqysDdi0E4l4lYYkAf9hRpY1jBSeHkstpeHSK3F1uQwrUPM3fqzy +joYnKg5/V71hAWcU7RcS+mn47Pqlco/jFjD1yddw8CMNfaqOxxQEWcCjLamF +177Q8MLI6oTbehbg5PgpS3KMhrrzvDRS8yaINjkeysdhhJNvho1TJjfCc5HX +CmMqRmjl2D+uvsMcNNu/brNdb4RmytWR3NbmcDZ1IatAzQgFNKk75nTMYdsq +ZaFd2kbI2fttQneFOfxailz4aGSELzf95PqRawYS32W6OmyN8Fe+ZrLDT1Pw +fxSYWBHGtrfw4Y/FGYTx4JGoTRFGGPTK1OPiQYSDsnv39EQa4ZGcMBKvL8LJ +wyFOc4eM8Mw/8mq6IUIJPVKekWSEXsO8jn3VAEtVCXWNl4xw7NJY/BdfFpy9 +f22qs9EIuab4w1z7TUDGW/77zmYjvMFQy71UaQK3hHLfTz03QnXaa0mRMybw +IPhWg0SbEbbKik+mm5nAB/Wi9C29Rmiw/oJ7TyEd1t+p1hgcNcJD5jImVsnG +8Din2++3uDE+ta0+7+pDgwE7Be9IsjHadE21TwENOOaDPRcpxtjx9oPew7U0 +MNu8yp5H3hizzZcrnn+iQvMKOk1KzRhPbsOLT3dQodX3Op8pyxh3Zt78oRVs +CO+Udxen7zJGDuunH1Ny9GGxo+qOeJAxyq93+jidqA8yR7huXtpjjJd7KAlJ +Qfqw/c2VrLxQYyzSU5Mk6evDwPH22AcxxsjV93Ds1TM9+DZs4DyQZoy2F7L/ +VszqwtSd5Vltwhhd6WmSWqE6MOxmkXOi2hhvnbAOcNmiA73cp62+1Brjw9Ol +cZkbdaDWh3LxQr0xtq40ywmQ0oF4siH97wtjdOq2vJqeog1rUnYfbuk3xnuc +N02amFqgEfCGw5+Tjq+qZyn+r9RBTlym4BE3HS2sJ4amb6vDmkbfzeRVdJSq +tbOqjFeHP3ITN16upuPeI5l8j43UoaaH31xPnI6P5pyb5/LVwMoCjy+vo+PF +QDn73lMbYKdKId+l/+gYh3lTIwfWQcxTr92qjnTs+2CdxHBeB+n+pJdlTnQc +1XyR/VBnHdTdik596U7HjOLdLv+NqoKYqpXw3x109HZqr7/irwrNql/FfCLp +CH4+pBc+KqC2fq286nU6ym5zDn4dpQT4vDO27AYd36Sl7b+1RQncApM+s/Lo +qCMfKZzLVIKEO2O57gV03DHTZCbGrQT96+tUTpSz81lm/O05qwhpGzzVR5+x +43Me+lFAKMBvtXPUsgk6Wjuto+vJykNvK24S/UPHB8bnSjxWykP9vnHniGk6 +BsuWXaZ/WgtpZdZh1AU63p3a+Zbj+FpQo3MU1XCZ4HBwZopLlxz4WgcrNEqY +IPBbPn8XIwvdAZYC3QwTHPDf+SzuDwVq+aYphmCCxSLC1q9bKZBbmLvhgqkJ +8n4wPueST4HQX38tPCxMMHGldcK0JwUEoyri+h1McOmw8O+LjVJgkaQwO+Rr +gq4nvfqoOWR4kLf4eTrFBE/HiKDsEQmgmkfM2pwywW75z99Ft0tA5edRgZzT +JrjGP0nPkCkBZXIfaTZnTTArT7h35q84FGXXn7522QS9RGqaQ+PEISf1uLFl +Mdv+j4THpHQxOBEhnJHdZYIns84+r2ohAa9oSv7YGxNU3ivelHOfBEmlHHVm +vSYYThazvH+eBInjv4dH+01wMkVDy9ibBEcDuxmmwya4uTXwwuK0COzfdvH7 +jzkTVPmct1ZMTQS2bFRCEzkGWz3y2q/dhOFvN69QozwDV1/9WQcqwpDjP/7e +RomBtAPsH+k/QjCcVB21ZT0DE/qDqszOCsH+Fw73o/UYaH+hQte4UxBO2h+W +e2DBQCfNVwLO3gJQ4/FmySCEgQUPym/kF/LB9h81LXVhDHwV0tZ4Mp4POGJy +sjdGMDDZIL6iyJMPLC7vMXCJZmDhmqmCO7x80Plhxd7wBAaSo7dfiArihRFf +rfelWQy839e1fT11FUgHJ1dr1TOwZnZWL3eeG9KWdxmeamBgdvn24a993MB5 +1qL0WxMDhbfIPXGr4YaRKp6CnBcMPMMb8e/RIW6o4UjMJnUx0DB/p/JNDm7Y +cj42auYrA1cld+9MJnFBdm204aPVTORb9pyhua4AAXvPUooQExcYQw5l9BUQ +O2CkGbWGiYymzs9O8isgkGdOWUecifn+2oM8oxxAc4gUy5VjotyX9heaxzmg +Z3D/n+O6TJRe7LctP7zMEuffW/qfOxM9/zHbczOXWHnmR2ImPJkYEFlZZOm3 +xNI7kmZ+bhsTzU0XRxj6Syz7iZI3vTuYqHU4PVeic5GV1DM9v3MvE/0EFdqj +RRdZc7nHzGLimLi74e/zrLx51juTc135hUyMXyYKyH9nWIEH8q5YFzOxLDgo +50f3DGumuNJ/tISJTsv3J5aKZlgkxd5Z3SomUkGf58f2GZYtr6zMw3omFqyT +n3jZMM2q687363rDxPPrprV3ZU+xbIQeaEb2MvFOVOyyZsQUq9fyxQz5PROn +xXN59BynWFM1P1O8BpjIn/4ExninWJo3dO79GGEit6OFg+qRP6y6d6aRqWNM +VDqcX/50yx+WjZgzaE8w0VXIPPSa0R/WruQDryOmmaizhkhdmJpkTdUnXZKc +Y+I3TZLJka5JVvxC1s6aBSY+brj/kVY2yVpjUKCx/S8Tk7KE5dUyJlnXgmum +l5eZuDVG+45z6CTrf2oeJLM= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k8VH8Xx2UpZMnYxliyV/Z1hjEz56DsP2TXgkSohIhos4VKohLtkpRI +9pulElJJCIlSSVIJSXbKM89f9/V+3XvP+jnnfq+Cb4iTPycHB0fJCg6O/19n +Pr5oUj6Vx+ouWr6dOG/P6r5GjjbtjYftD6lSbUEagOLtvuTes6DsLHH+ZBAD +Ih3vvuXqzQWvxlAn1yA7EBmXPDv/tgzcCXrVaOA2+FRnHzL1tgHuJD04Hhuw +FyyURz78ftsJHxJ1037uOAzzb2mZE28HQbufvK7ENhUazW/nvc79A4Spfc2k ++FWQ+VQ97KvxF4Y+pHDxqd4Csb3ed1eZc+Hi7LtcAflCOKtrUWvvyot4fVp/ +Y3gJaL/3tGQG8uIJM8tE8yMl0JoY3KV+iBcfB088YySXwMre8z95b/Biyp9c +WdnLJXDo6BfpxlFeXEF6WXq+oQT8XsYepiXyYZThHq7ta0qB6l/LlC/nRzNa +thncLoW+bJ3632sEMVT0l+ejJ2VwqatQOFJFECNqixv6Wspgi9A67wVjQdR9 +YOgx1lUG/Qmy/zh3CmL79K3lpa9lMLCPnyFWKYgzeucXH/KVw/eNQwTVUwjd +5zMymxzKYW4i6/6hG8JI2O362P2mHKrVRZeXK4UxLz844veHcojZlWaf2CKM +ae0zv3mGy2HpfeJY6h9hbLnqdEViphxivzwQb1dcg2GSjw73iFdAYtst54GI +NXg/o2ayzbkCTuUda+eUEsGDTFvu7BcVYGMQRBJXEsFeqwN7T3dUAG+Tk+s6 +TRG0otn0xbxlv/9F5b2tqQhmH7hfx/xaAYcVW4fPB4ng0QdXTu/kqIR9OeR/ +qjUiqPhGO17LsBI2XynVsN1KQg0tQeG67EpYo3E5ZLs/CfVJ454l1yqhrTax +LCSEhA2vPqVfyasEm/fuRucTSLiQqvNkW0klmFH+mX8oJKE7gyZ/+FklGGTb +bA1ZImG3VtJp6lQlSJ7/cuLcVVH0C3vflW1ZBWT1ysS5fFHsqZvzMLSrAkpD +0rHtJaJoV3i2s8WxCuQmNhxY1yiK+/413RzwrAIVu1Cf2u+iGCh2t4HYUwX6 +3H+pX/TFcANvrKJYWhUYXG7TtWKKYZvy55V4tgqoejka9yzEMI6c8MXvQhXQ +fcwVozzFcHPfbNLFa1VgWndCcPUxMayoCokrLq4ChwiJIb0WMbTXTM5PflUF +jqu/f8zqEkMBb0NT89dV4JRb3bfUL4ax3FHvZ7urwK1jW3vzLzGM7OcSseuv +gu0aN2u2iIvjR3WdjJyRKtgzpJ0R7yOOc/eSDi7wEJDsYs3qnBFH5pMx9Sga +AZSKNgrnCgkcUIq4nEEnoFjUZVZ3tQS2Br8fvckkoKfTqyRjrQQ2XQ+kl5gT +oLw5QnGzlQSuY7BuBTgQ0PDf9ZUdFyVQ6/WlcSd/AtzuKX9ZvimBOl7NcqMB +BIwI3H2sXSyBlEkbyyO7CRBprTh4pkEChXyyk5NDCPCxaRmx/ymBJRwvfptE +E/DXYrrtFUMSvy2++6hyioD0/JjCvxaS+HrLJg84zfa/kiNFc7MklgwMDjme +IcDuKb/paX9J1FjPBdvOEXDJXL7cLk0Sw+68URO7TIDWzVtnDmdLYlDZg7Dx +K+x4OdX3FuVKYidn17v6awT8eGKoIkBI4k+ro9L2uQQYoW3Wy0+SWH3NJo2/ +gIDW6x3hiz8kkaW0Sy7/LjveZVdH9SlJ5G5oGjAuYtfzkQ/fKV4yJhhd47a5 +z64XI/KQjS4Z5fOGuQQrCdh9ZdE9xoSM/+yVduyuYue3GGtwdxMZy/JKVtQT +7HxqT43xbSFjis0ZcZcaAsKNb3i/iCdjvOJ089rHBNjkCE3ZppLx3GuxKxr1 +BCiuOpzSlknGo5nnGvSeENDR7VbadYeMaZ9Zq9UbCbhj0rTJrYyMcaN0Xdkm +Ao7l6r7rrSWju6BhCe9Tdj1CBbg+tpHRwXaw/mUzATxvo7N8esk4MX7I7eYz +AvqZ39S/fCbjQMmAXcRzAk6tbnD5PkVG7bHZnZwtBHzPj8qfpEhh22hYeHsr +AY8Fv9IPKEvhRQN/y/2vCLgQ4dQ+qymFopGbUoXaCNhkpjm3hFK42EoK028n +QKbgUuoxGylMqN4gXsfmKWFeBU4XKSRZx+mxOgjI/TBovSpACvVk/D5rvSYg +eqPjxxOhUigroh11lc2OhQ/3C8RI4dTKmjSeTgLWk9RXnUlg+89SVwtg8/LB +7Msip6XQXeCebQObez7x6Jy/IIVbt+6eluhi69sivEkiRwqPqJzd4M/m4/cG +PC4WSGFjuetIEZu3idmPSZdL4cjUd+NxNusfqo27VieF5EPxlA3dBPAPrpdQ +aJZC5+itadvZPGh14e7NdimkP7mfdYrN1fe5QLVPCgPqHxqVszldIqzrzqAU +Kh5tDu9mc+CRjwHqo1I4ly1o+4vNMGS7dG9aCoU39tVzvSFAwrY6XWdZCvk3 +7X8rwuaxUlWVcl4KWvxWypBicxP5fLUhiYK56owJCpuvHFth/0Cagh07Vs+K +szl8eN8gXYWCgieHbvOz2ea//siHWhTMlJflmWf7U6ywXo1GFFRQERT5zOZ5 +CnG9wZSCh8nCbQ1s7ohTNthkS8GVC8dY19h8+3vG82cuFJTZ9NgvnM1HHZa3 +2XhR8OW4lrkZm92q9v5uDWDf36nfz89mTdl3xx3CKFgTr6/3il0/7kRLSmcM +BffmZFueYHP/SEWxSyIFo462yQGbTz4489Yzi4JXbwbIZLP7tWPt3z39ORQ8 +nVRsacJmo6TdHN53Kbhn22lWL7v/35w3bfB7SEGePVPZy2y9PKopezjcTEF0 +D19xks0XFOSdgjooGJwdBUJs3vhrIWbfFwqG7pS04GbrLdrqvNqTUQp2liyN +H2Trs/iG5jvRGQr2jidXfGPrl+ziY1zNK41r8lSul7P1/d+9+e+rSdKYSOF9 +sYbN8SvPZXtJS2P6IR2pwJcEjD54OsulJY3CkvxUHvZ8KJC8b7vRpLGKdGWV +7Qt2ffbMuRWgND6ONOQ7xZ6neln1KntnaWwpdsufZ8/fufj0iIsHpdHjUvHp +DPb8Pn+/QXk0ThoXpF8oFzQQsGTQ2MU6JY3PqB3LNex53/VtWm/oqjQ+HK47 +9Yq9H+h2W39rNUqjnri6WXEtW4/iqvuaBGUwMyc10KeMAMmQx7KSkjL41ndr +mGwpe18+93gVJC+DouGe37rZ+6oq5pSGsL4MOq+IVNG/x+7Hp4kRTw8ZrDbM +Nrh3mwC9gtqAX7kyGO5+cfYie58GcLpKmhXJoEAciC1fZOtv63jz+UoZbC7U +fOGVTcBKIQVV+nMZjH82tFIok4B3+5OGEsdkUKhea61GGgFxjM07KEay+NdL +3CDoGAFWXtcmaWayGCcgUGN/hACh2J8JrnayeLlMgKx1iG2/8Xh+uo8s7jta +v/tdJAEPbGp+rjwhi0rJUa9/BBMw4aEU+adPFm3zeD8NbyGAiAldJTIki5tS +7a7v8WDr9crDbK1xWbwb07d/xJUAgQH32iBOObw+Mujb40jAuoBUjgE1OVwS +LeoIsCDA68D0ydZDcigm2mEUoUOASpaZzMhxOfxKvJm+rPn/fp+5typdDj1D +rbgeqREQs7ShwyxPDgfbF+R+KxOQmeAlXt0qh6SOC82iUuzvR8az67dk1+Lo +1WVzew52v4ovVhx9vBavOXGWlrdUwca3bX/Hn69FPXJCUdCzKrDn4Lb07mQ/ +nyelJN1UBTud9vXB17XoNk+khT6sAotDCsdieeQxgdOk7uv9KghdO3PTVF0e +Xwkz3JfOVUFTwPWxxkh51OhxHf/tUQV7537HPhdUQIGziV9reyqBHrZLYpik +gNo/6euEOiuBd+RdIRdZAZ2ObiJve1UJt9439rAUFVCkbUjqZ2MlfHyUqVFJ +VcCcGJDoYZ+vHI4b997wVsBBJ4nWLycqQY8Up32oVAH7Rol/S0aVMK++5qOm +qyIePZfuIptaAYzCopwLF5Qweuj9eop4Ofwm2fi4NSjji6thog+yS2Eo1cdt +/ypVbJ3PudzTeR+sf0VZf6Wuw9GfP4v+5hbB6E7e8Ipj61HLPeSkrEkB+/wv +yZncsAHlye+rrbjygfRKNa3klxrWZzI+eWneBJmU+45UqgaKO+Z2dDnnQLa6 +8RrRAE38HFFUfrXtMrRQTA3/ZGhh/h2bO2ZJWUCXaUjX7tHGr8mj4juCzoEQ +V27EjngdnDzjqbFnTTrIxa1leKrqoljA3p62LyeAT2VbldMzXTwuI/Do/INE +2C0FNoUvdPFd3uSOhfxEaBFU/MjVqot8ofp/9mQmQurMN57KDl0c/qzXsn9/ +Igg9D3eVfKeLKp7f6oU0E4G059TU+1Fd9LPsjz+UlwAypTV6/iQ97CAn3uG5 +Eg9aTKn7Udv18OxAdkNjUSyUKwUtcvroYcE1n+xHV2LBiL/aMs1XD3lYvItP +U2PB7K3HQF6AHs73Ttgt7I0Ft7Bskc4wPRwOH9w7pxkLx25JRmgk6WE276Ou +E37HoENQwvhzsR5uT9/vPZh8BPZ/JDXacOhjSKS/qbNYDDxv3vbwLqc+aiUn +p39djAa5+/kEP48+Cmr5/zj5JRpajtGLWvj08UaCSZpQeTQoKvhm2ojq4xXh +sSNzTtHwemdpgI2qPpaIijf/d+Eg6PxwELCx08eet11NFWpR8OtPqqt1tj5m +Mm6s1kmJgP7eG25XL+njm+/HQrIiIqDlYZX77yv6eHL49E2hHRGQlzzgefGG +Ph6lUt006BGwRdrA68ddfWw4r9qvNBYOT83e7zrxUB8Vcs1VFl3D4XLGhoMv +BvVxz9vDi7z6+8FSu/mStaYBCm6Yt75CDgWPlVYuHdoGKC4tuui8KhR2f3gh +6K5ngIoVwetpoyGQdupVrB/NAMNH7+VW3A6Bnm/du46ZGiArYe7ABvkQ8Mv5 +olfpaoCDpUOTwxL7IF5kxUv5owaoabarV1x6Lzz6Y7I422aAG/Q37U6MDoQb +rYSv82sD/NTkwSnkEwiJt/RbirsMcLNe36Vii0Cwdle/6N9rgLlGzScNxAKh +u4ZC6/psgD95dmdtLgmAkbj5/cVTBljqZ8XdMLoLJNYQI34UQ+SvoN7jj/SH ++e96TvUyhqi1pY1w8faH/ifF1dJrDbHNoOdhuZU/3AjPT+lUMsQqoYQjJdL+ +oPE2UxU1DdGDzCdxs8EPzK5F+EqjIbYcmpLyFvODfRp67177G+LMze0Bz5p9 +4cAsZcE70BBJD2ZUP5f4wuEGLsr4bkN04H7mKHLZF055vPHkD2XHMzGXVRHi +C3cSD/aZxRjiy+vbfnBTfGGw/1FveZohphdu8qnbvwPcTtu+zSQM0XyvO88q +Ax/Y7mEwq1RjiLZeV8Nb5H3AT0lWsqzOEBeC96zKFfSB8Opxt7YnhvjdNb2c +0u4N6V8zela2GuLKm6+P3zLyhhZm75uoAUOs7MlcLyrqBcxxv25PPio6apWc +2DG0FSRqLXPrVlOxL/9W+4+mrTCerBa6VoiKmyp/nM64tRWuKUys/kqiIm8v +hR8CtsI/l0PmoTJUPKf8REl4dAs8rs0oS9KmYh6zWTl40RNMTzxKL3el4v63 +t94F63gAxe2Gl4QHFa1ypt3KxTxgUjFRI3oLFbda7lorPu8OuXXWz1neVDxx +zkhfs8EdOCe6l18EUjFpcfhxkas7NLr93DdwiIravBt2d8e5wSZl8n+CuVTc +s/q9gMK4C1SMPVXwy6Ni/dKl1YweF1Amwmdq8qkYFhSzN+SRC3DbtF8PLKSi +3dzvZbkzLtAQkjTZWEFFlyvm8td1XYBVO5UV84yKxPm6VSKHnIHq9Hrw2ygV +U+Zd7DTWOkG+9DGC9YuKz0VvnFXndwLxrxqpmb+p2DPCVYLTm2EqKsXQfIaK +DF8jxaKXm6HsKqRcW6aizWhY8/HozaD9456mK4mGEiqhNvp9jrA+9uTBBhoN +e40H731zcIA6k1s8dnQabj5sUTm9zgEcZx+ffcOgYbBnwXVdDgc4uG+66Lsp +DV2skgL0Su3h+Tafz0J2NHRQk+x0EreHQGOqzVYfGq7YWjX/7asdFEx+lp5K +oeGdI61jurdtgFW8dOfIKRru+nKiLT/RBjqDJKmr0mg4prVfZaOvDSwM2DlS +ztHwC6dUxqysDdi0E4l4lYYkAf9hRpY1jBSeHkstpeHSK3F1uQwrUPM3fqzy +joYnKg5/V71hAWcU7RcS+mn47Pqlco/jFjD1yddw8CMNfaqOxxQEWcCjLamF +177Q8MLI6oTbehbg5PgpS3KMhrrzvDRS8yaINjkeysdhhJNvho1TJjfCc5HX +CmMqRmjl2D+uvsMcNNu/brNdb4RmytWR3NbmcDZ1IatAzQgFNKk75nTMYdsq +ZaFd2kbI2fttQneFOfxailz4aGSELzf95PqRawYS32W6OmyN8Fe+ZrLDT1Pw +fxSYWBHGtrfw4Y/FGYTx4JGoTRFGGPTK1OPiQYSDsnv39EQa4ZGcMBKvL8LJ +wyFOc4eM8Mw/8mq6IUIJPVKekWSEXsO8jn3VAEtVCXWNl4xw7NJY/BdfFpy9 +f22qs9EIuab4w1z7TUDGW/77zmYjvMFQy71UaQK3hHLfTz03QnXaa0mRMybw +IPhWg0SbEbbKik+mm5nAB/Wi9C29Rmiw/oJ7TyEd1t+p1hgcNcJD5jImVsnG +8Din2++3uDE+ta0+7+pDgwE7Be9IsjHadE21TwENOOaDPRcpxtjx9oPew7U0 +MNu8yp5H3hizzZcrnn+iQvMKOk1KzRhPbsOLT3dQodX3Op8pyxh3Zt78oRVs +CO+Udxen7zJGDuunH1Ny9GGxo+qOeJAxyq93+jidqA8yR7huXtpjjJd7KAlJ +Qfqw/c2VrLxQYyzSU5Mk6evDwPH22AcxxsjV93Ds1TM9+DZs4DyQZoy2F7L/ +VszqwtSd5Vltwhhd6WmSWqE6MOxmkXOi2hhvnbAOcNmiA73cp62+1Brjw9Ol +cZkbdaDWh3LxQr0xtq40ywmQ0oF4siH97wtjdOq2vJqeog1rUnYfbuk3xnuc +N02amFqgEfCGw5+Tjq+qZyn+r9RBTlym4BE3HS2sJ4amb6vDmkbfzeRVdJSq +tbOqjFeHP3ITN16upuPeI5l8j43UoaaH31xPnI6P5pyb5/LVwMoCjy+vo+PF +QDn73lMbYKdKId+l/+gYh3lTIwfWQcxTr92qjnTs+2CdxHBeB+n+pJdlTnQc +1XyR/VBnHdTdik596U7HjOLdLv+NqoKYqpXw3x109HZqr7/irwrNql/FfCLp +CH4+pBc+KqC2fq286nU6ym5zDn4dpQT4vDO27AYd36Sl7b+1RQncApM+s/Lo +qCMfKZzLVIKEO2O57gV03DHTZCbGrQT96+tUTpSz81lm/O05qwhpGzzVR5+x +43Me+lFAKMBvtXPUsgk6Wjuto+vJykNvK24S/UPHB8bnSjxWykP9vnHniGk6 +BsuWXaZ/WgtpZdZh1AU63p3a+Zbj+FpQo3MU1XCZ4HBwZopLlxz4WgcrNEqY +IPBbPn8XIwvdAZYC3QwTHPDf+SzuDwVq+aYphmCCxSLC1q9bKZBbmLvhgqkJ +8n4wPueST4HQX38tPCxMMHGldcK0JwUEoyri+h1McOmw8O+LjVJgkaQwO+Rr +gq4nvfqoOWR4kLf4eTrFBE/HiKDsEQmgmkfM2pwywW75z99Ft0tA5edRgZzT +JrjGP0nPkCkBZXIfaTZnTTArT7h35q84FGXXn7522QS9RGqaQ+PEISf1uLFl +Mdv+j4THpHQxOBEhnJHdZYIns84+r2ohAa9oSv7YGxNU3ivelHOfBEmlHHVm +vSYYThazvH+eBInjv4dH+01wMkVDy9ibBEcDuxmmwya4uTXwwuK0COzfdvH7 +jzkTVPmct1ZMTQS2bFRCEzkGWz3y2q/dhOFvN69QozwDV1/9WQcqwpDjP/7e +RomBtAPsH+k/QjCcVB21ZT0DE/qDqszOCsH+Fw73o/UYaH+hQte4UxBO2h+W +e2DBQCfNVwLO3gJQ4/FmySCEgQUPym/kF/LB9h81LXVhDHwV0tZ4Mp4POGJy +sjdGMDDZIL6iyJMPLC7vMXCJZmDhmqmCO7x80Plhxd7wBAaSo7dfiArihRFf +rfelWQy839e1fT11FUgHJ1dr1TOwZnZWL3eeG9KWdxmeamBgdvn24a993MB5 +1qL0WxMDhbfIPXGr4YaRKp6CnBcMPMMb8e/RIW6o4UjMJnUx0DB/p/JNDm7Y +cj42auYrA1cld+9MJnFBdm204aPVTORb9pyhua4AAXvPUooQExcYQw5l9BUQ +O2CkGbWGiYymzs9O8isgkGdOWUecifn+2oM8oxxAc4gUy5VjotyX9heaxzmg +Z3D/n+O6TJRe7LctP7zMEuffW/qfOxM9/zHbczOXWHnmR2ImPJkYEFlZZOm3 +xNI7kmZ+bhsTzU0XRxj6Syz7iZI3vTuYqHU4PVeic5GV1DM9v3MvE/0EFdqj +RRdZc7nHzGLimLi74e/zrLx51juTc135hUyMXyYKyH9nWIEH8q5YFzOxLDgo +50f3DGumuNJ/tISJTsv3J5aKZlgkxd5Z3SomUkGf58f2GZYtr6zMw3omFqyT +n3jZMM2q687363rDxPPrprV3ZU+xbIQeaEb2MvFOVOyyZsQUq9fyxQz5PROn +xXN59BynWFM1P1O8BpjIn/4ExninWJo3dO79GGEit6OFg+qRP6y6d6aRqWNM +VDqcX/50yx+WjZgzaE8w0VXIPPSa0R/WruQDryOmmaizhkhdmJpkTdUnXZKc +Y+I3TZLJka5JVvxC1s6aBSY+brj/kVY2yVpjUKCx/S8Tk7KE5dUyJlnXgmum +l5eZuDVG+45z6CTrf2oeJLM= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09309547772515583}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09309547772515583}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k8VH8Xx2UpZMnYxliyV/Z1hjEz56DsP2TXgkSohIhos4VKohLtkpRI +9pulElJJCIlSSVIJSXbKM89f9/V+3XvP+jnnfq+Cb4iTPycHB0fJCg6O/19n +Pr5oUj6Vx+ouWr6dOG/P6r5GjjbtjYftD6lSbUEagOLtvuTes6DsLHH+ZBAD +Ih3vvuXqzQWvxlAn1yA7EBmXPDv/tgzcCXrVaOA2+FRnHzL1tgHuJD04Hhuw +FyyURz78ftsJHxJ1037uOAzzb2mZE28HQbufvK7ENhUazW/nvc79A4Spfc2k ++FWQ+VQ97KvxF4Y+pHDxqd4Csb3ed1eZc+Hi7LtcAflCOKtrUWvvyot4fVp/ +Y3gJaL/3tGQG8uIJM8tE8yMl0JoY3KV+iBcfB088YySXwMre8z95b/Biyp9c +WdnLJXDo6BfpxlFeXEF6WXq+oQT8XsYepiXyYZThHq7ta0qB6l/LlC/nRzNa +thncLoW+bJ3632sEMVT0l+ejJ2VwqatQOFJFECNqixv6Wspgi9A67wVjQdR9 +YOgx1lUG/Qmy/zh3CmL79K3lpa9lMLCPnyFWKYgzeucXH/KVw/eNQwTVUwjd +5zMymxzKYW4i6/6hG8JI2O362P2mHKrVRZeXK4UxLz844veHcojZlWaf2CKM +ae0zv3mGy2HpfeJY6h9hbLnqdEViphxivzwQb1dcg2GSjw73iFdAYtst54GI +NXg/o2ayzbkCTuUda+eUEsGDTFvu7BcVYGMQRBJXEsFeqwN7T3dUAG+Tk+s6 +TRG0otn0xbxlv/9F5b2tqQhmH7hfx/xaAYcVW4fPB4ng0QdXTu/kqIR9OeR/ +qjUiqPhGO17LsBI2XynVsN1KQg0tQeG67EpYo3E5ZLs/CfVJ454l1yqhrTax +LCSEhA2vPqVfyasEm/fuRucTSLiQqvNkW0klmFH+mX8oJKE7gyZ/+FklGGTb +bA1ZImG3VtJp6lQlSJ7/cuLcVVH0C3vflW1ZBWT1ysS5fFHsqZvzMLSrAkpD +0rHtJaJoV3i2s8WxCuQmNhxY1yiK+/413RzwrAIVu1Cf2u+iGCh2t4HYUwX6 +3H+pX/TFcANvrKJYWhUYXG7TtWKKYZvy55V4tgqoejka9yzEMI6c8MXvQhXQ +fcwVozzFcHPfbNLFa1VgWndCcPUxMayoCokrLq4ChwiJIb0WMbTXTM5PflUF +jqu/f8zqEkMBb0NT89dV4JRb3bfUL4ax3FHvZ7urwK1jW3vzLzGM7OcSseuv +gu0aN2u2iIvjR3WdjJyRKtgzpJ0R7yOOc/eSDi7wEJDsYs3qnBFH5pMx9Sga +AZSKNgrnCgkcUIq4nEEnoFjUZVZ3tQS2Br8fvckkoKfTqyRjrQQ2XQ+kl5gT +oLw5QnGzlQSuY7BuBTgQ0PDf9ZUdFyVQ6/WlcSd/AtzuKX9ZvimBOl7NcqMB +BIwI3H2sXSyBlEkbyyO7CRBprTh4pkEChXyyk5NDCPCxaRmx/ymBJRwvfptE +E/DXYrrtFUMSvy2++6hyioD0/JjCvxaS+HrLJg84zfa/kiNFc7MklgwMDjme +IcDuKb/paX9J1FjPBdvOEXDJXL7cLk0Sw+68URO7TIDWzVtnDmdLYlDZg7Dx +K+x4OdX3FuVKYidn17v6awT8eGKoIkBI4k+ro9L2uQQYoW3Wy0+SWH3NJo2/ +gIDW6x3hiz8kkaW0Sy7/LjveZVdH9SlJ5G5oGjAuYtfzkQ/fKV4yJhhd47a5 +z64XI/KQjS4Z5fOGuQQrCdh9ZdE9xoSM/+yVduyuYue3GGtwdxMZy/JKVtQT +7HxqT43xbSFjis0ZcZcaAsKNb3i/iCdjvOJ089rHBNjkCE3ZppLx3GuxKxr1 +BCiuOpzSlknGo5nnGvSeENDR7VbadYeMaZ9Zq9UbCbhj0rTJrYyMcaN0Xdkm +Ao7l6r7rrSWju6BhCe9Tdj1CBbg+tpHRwXaw/mUzATxvo7N8esk4MX7I7eYz +AvqZ39S/fCbjQMmAXcRzAk6tbnD5PkVG7bHZnZwtBHzPj8qfpEhh22hYeHsr +AY8Fv9IPKEvhRQN/y/2vCLgQ4dQ+qymFopGbUoXaCNhkpjm3hFK42EoK028n +QKbgUuoxGylMqN4gXsfmKWFeBU4XKSRZx+mxOgjI/TBovSpACvVk/D5rvSYg +eqPjxxOhUigroh11lc2OhQ/3C8RI4dTKmjSeTgLWk9RXnUlg+89SVwtg8/LB +7Msip6XQXeCebQObez7x6Jy/IIVbt+6eluhi69sivEkiRwqPqJzd4M/m4/cG +PC4WSGFjuetIEZu3idmPSZdL4cjUd+NxNusfqo27VieF5EPxlA3dBPAPrpdQ +aJZC5+itadvZPGh14e7NdimkP7mfdYrN1fe5QLVPCgPqHxqVszldIqzrzqAU +Kh5tDu9mc+CRjwHqo1I4ly1o+4vNMGS7dG9aCoU39tVzvSFAwrY6XWdZCvk3 +7X8rwuaxUlWVcl4KWvxWypBicxP5fLUhiYK56owJCpuvHFth/0Cagh07Vs+K +szl8eN8gXYWCgieHbvOz2ea//siHWhTMlJflmWf7U6ywXo1GFFRQERT5zOZ5 +CnG9wZSCh8nCbQ1s7ohTNthkS8GVC8dY19h8+3vG82cuFJTZ9NgvnM1HHZa3 +2XhR8OW4lrkZm92q9v5uDWDf36nfz89mTdl3xx3CKFgTr6/3il0/7kRLSmcM +BffmZFueYHP/SEWxSyIFo462yQGbTz4489Yzi4JXbwbIZLP7tWPt3z39ORQ8 +nVRsacJmo6TdHN53Kbhn22lWL7v/35w3bfB7SEGePVPZy2y9PKopezjcTEF0 +D19xks0XFOSdgjooGJwdBUJs3vhrIWbfFwqG7pS04GbrLdrqvNqTUQp2liyN +H2Trs/iG5jvRGQr2jidXfGPrl+ziY1zNK41r8lSul7P1/d+9+e+rSdKYSOF9 +sYbN8SvPZXtJS2P6IR2pwJcEjD54OsulJY3CkvxUHvZ8KJC8b7vRpLGKdGWV +7Qt2ffbMuRWgND6ONOQ7xZ6neln1KntnaWwpdsufZ8/fufj0iIsHpdHjUvHp +DPb8Pn+/QXk0ThoXpF8oFzQQsGTQ2MU6JY3PqB3LNex53/VtWm/oqjQ+HK47 +9Yq9H+h2W39rNUqjnri6WXEtW4/iqvuaBGUwMyc10KeMAMmQx7KSkjL41ndr +mGwpe18+93gVJC+DouGe37rZ+6oq5pSGsL4MOq+IVNG/x+7Hp4kRTw8ZrDbM +Nrh3mwC9gtqAX7kyGO5+cfYie58GcLpKmhXJoEAciC1fZOtv63jz+UoZbC7U +fOGVTcBKIQVV+nMZjH82tFIok4B3+5OGEsdkUKhea61GGgFxjM07KEay+NdL +3CDoGAFWXtcmaWayGCcgUGN/hACh2J8JrnayeLlMgKx1iG2/8Xh+uo8s7jta +v/tdJAEPbGp+rjwhi0rJUa9/BBMw4aEU+adPFm3zeD8NbyGAiAldJTIki5tS +7a7v8WDr9crDbK1xWbwb07d/xJUAgQH32iBOObw+Mujb40jAuoBUjgE1OVwS +LeoIsCDA68D0ydZDcigm2mEUoUOASpaZzMhxOfxKvJm+rPn/fp+5typdDj1D +rbgeqREQs7ShwyxPDgfbF+R+KxOQmeAlXt0qh6SOC82iUuzvR8az67dk1+Lo +1WVzew52v4ovVhx9vBavOXGWlrdUwca3bX/Hn69FPXJCUdCzKrDn4Lb07mQ/ +nyelJN1UBTud9vXB17XoNk+khT6sAotDCsdieeQxgdOk7uv9KghdO3PTVF0e +Xwkz3JfOVUFTwPWxxkh51OhxHf/tUQV7537HPhdUQIGziV9reyqBHrZLYpik +gNo/6euEOiuBd+RdIRdZAZ2ObiJve1UJt9439rAUFVCkbUjqZ2MlfHyUqVFJ +VcCcGJDoYZ+vHI4b997wVsBBJ4nWLycqQY8Up32oVAH7Rol/S0aVMK++5qOm +qyIePZfuIptaAYzCopwLF5Qweuj9eop4Ofwm2fi4NSjji6thog+yS2Eo1cdt +/ypVbJ3PudzTeR+sf0VZf6Wuw9GfP4v+5hbB6E7e8Ipj61HLPeSkrEkB+/wv +yZncsAHlye+rrbjygfRKNa3klxrWZzI+eWneBJmU+45UqgaKO+Z2dDnnQLa6 +8RrRAE38HFFUfrXtMrRQTA3/ZGhh/h2bO2ZJWUCXaUjX7tHGr8mj4juCzoEQ +V27EjngdnDzjqbFnTTrIxa1leKrqoljA3p62LyeAT2VbldMzXTwuI/Do/INE +2C0FNoUvdPFd3uSOhfxEaBFU/MjVqot8ofp/9mQmQurMN57KDl0c/qzXsn9/ +Igg9D3eVfKeLKp7f6oU0E4G059TU+1Fd9LPsjz+UlwAypTV6/iQ97CAn3uG5 +Eg9aTKn7Udv18OxAdkNjUSyUKwUtcvroYcE1n+xHV2LBiL/aMs1XD3lYvItP +U2PB7K3HQF6AHs73Ttgt7I0Ft7Bskc4wPRwOH9w7pxkLx25JRmgk6WE276Ou +E37HoENQwvhzsR5uT9/vPZh8BPZ/JDXacOhjSKS/qbNYDDxv3vbwLqc+aiUn +p39djAa5+/kEP48+Cmr5/zj5JRpajtGLWvj08UaCSZpQeTQoKvhm2ojq4xXh +sSNzTtHwemdpgI2qPpaIijf/d+Eg6PxwELCx08eet11NFWpR8OtPqqt1tj5m +Mm6s1kmJgP7eG25XL+njm+/HQrIiIqDlYZX77yv6eHL49E2hHRGQlzzgefGG +Ph6lUt006BGwRdrA68ddfWw4r9qvNBYOT83e7zrxUB8Vcs1VFl3D4XLGhoMv +BvVxz9vDi7z6+8FSu/mStaYBCm6Yt75CDgWPlVYuHdoGKC4tuui8KhR2f3gh +6K5ngIoVwetpoyGQdupVrB/NAMNH7+VW3A6Bnm/du46ZGiArYe7ABvkQ8Mv5 +olfpaoCDpUOTwxL7IF5kxUv5owaoabarV1x6Lzz6Y7I422aAG/Q37U6MDoQb +rYSv82sD/NTkwSnkEwiJt/RbirsMcLNe36Vii0Cwdle/6N9rgLlGzScNxAKh +u4ZC6/psgD95dmdtLgmAkbj5/cVTBljqZ8XdMLoLJNYQI34UQ+SvoN7jj/SH ++e96TvUyhqi1pY1w8faH/ifF1dJrDbHNoOdhuZU/3AjPT+lUMsQqoYQjJdL+ +oPE2UxU1DdGDzCdxs8EPzK5F+EqjIbYcmpLyFvODfRp67177G+LMze0Bz5p9 +4cAsZcE70BBJD2ZUP5f4wuEGLsr4bkN04H7mKHLZF055vPHkD2XHMzGXVRHi +C3cSD/aZxRjiy+vbfnBTfGGw/1FveZohphdu8qnbvwPcTtu+zSQM0XyvO88q +Ax/Y7mEwq1RjiLZeV8Nb5H3AT0lWsqzOEBeC96zKFfSB8Opxt7YnhvjdNb2c +0u4N6V8zela2GuLKm6+P3zLyhhZm75uoAUOs7MlcLyrqBcxxv25PPio6apWc +2DG0FSRqLXPrVlOxL/9W+4+mrTCerBa6VoiKmyp/nM64tRWuKUys/kqiIm8v +hR8CtsI/l0PmoTJUPKf8REl4dAs8rs0oS9KmYh6zWTl40RNMTzxKL3el4v63 +t94F63gAxe2Gl4QHFa1ypt3KxTxgUjFRI3oLFbda7lorPu8OuXXWz1neVDxx +zkhfs8EdOCe6l18EUjFpcfhxkas7NLr93DdwiIravBt2d8e5wSZl8n+CuVTc +s/q9gMK4C1SMPVXwy6Ni/dKl1YweF1Amwmdq8qkYFhSzN+SRC3DbtF8PLKSi +3dzvZbkzLtAQkjTZWEFFlyvm8td1XYBVO5UV84yKxPm6VSKHnIHq9Hrw2ygV +U+Zd7DTWOkG+9DGC9YuKz0VvnFXndwLxrxqpmb+p2DPCVYLTm2EqKsXQfIaK +DF8jxaKXm6HsKqRcW6aizWhY8/HozaD9456mK4mGEiqhNvp9jrA+9uTBBhoN +e40H731zcIA6k1s8dnQabj5sUTm9zgEcZx+ffcOgYbBnwXVdDgc4uG+66Lsp +DV2skgL0Su3h+Tafz0J2NHRQk+x0EreHQGOqzVYfGq7YWjX/7asdFEx+lp5K +oeGdI61jurdtgFW8dOfIKRru+nKiLT/RBjqDJKmr0mg4prVfZaOvDSwM2DlS +ztHwC6dUxqysDdi0E4l4lYYkAf9hRpY1jBSeHkstpeHSK3F1uQwrUPM3fqzy +joYnKg5/V71hAWcU7RcS+mn47Pqlco/jFjD1yddw8CMNfaqOxxQEWcCjLamF +177Q8MLI6oTbehbg5PgpS3KMhrrzvDRS8yaINjkeysdhhJNvho1TJjfCc5HX +CmMqRmjl2D+uvsMcNNu/brNdb4RmytWR3NbmcDZ1IatAzQgFNKk75nTMYdsq +ZaFd2kbI2fttQneFOfxailz4aGSELzf95PqRawYS32W6OmyN8Fe+ZrLDT1Pw +fxSYWBHGtrfw4Y/FGYTx4JGoTRFGGPTK1OPiQYSDsnv39EQa4ZGcMBKvL8LJ +wyFOc4eM8Mw/8mq6IUIJPVKekWSEXsO8jn3VAEtVCXWNl4xw7NJY/BdfFpy9 +f22qs9EIuab4w1z7TUDGW/77zmYjvMFQy71UaQK3hHLfTz03QnXaa0mRMybw +IPhWg0SbEbbKik+mm5nAB/Wi9C29Rmiw/oJ7TyEd1t+p1hgcNcJD5jImVsnG +8Din2++3uDE+ta0+7+pDgwE7Be9IsjHadE21TwENOOaDPRcpxtjx9oPew7U0 +MNu8yp5H3hizzZcrnn+iQvMKOk1KzRhPbsOLT3dQodX3Op8pyxh3Zt78oRVs +CO+Udxen7zJGDuunH1Ny9GGxo+qOeJAxyq93+jidqA8yR7huXtpjjJd7KAlJ +Qfqw/c2VrLxQYyzSU5Mk6evDwPH22AcxxsjV93Ds1TM9+DZs4DyQZoy2F7L/ +VszqwtSd5Vltwhhd6WmSWqE6MOxmkXOi2hhvnbAOcNmiA73cp62+1Brjw9Ol +cZkbdaDWh3LxQr0xtq40ywmQ0oF4siH97wtjdOq2vJqeog1rUnYfbuk3xnuc +N02amFqgEfCGw5+Tjq+qZyn+r9RBTlym4BE3HS2sJ4amb6vDmkbfzeRVdJSq +tbOqjFeHP3ITN16upuPeI5l8j43UoaaH31xPnI6P5pyb5/LVwMoCjy+vo+PF +QDn73lMbYKdKId+l/+gYh3lTIwfWQcxTr92qjnTs+2CdxHBeB+n+pJdlTnQc +1XyR/VBnHdTdik596U7HjOLdLv+NqoKYqpXw3x109HZqr7/irwrNql/FfCLp +CH4+pBc+KqC2fq286nU6ym5zDn4dpQT4vDO27AYd36Sl7b+1RQncApM+s/Lo +qCMfKZzLVIKEO2O57gV03DHTZCbGrQT96+tUTpSz81lm/O05qwhpGzzVR5+x +43Me+lFAKMBvtXPUsgk6Wjuto+vJykNvK24S/UPHB8bnSjxWykP9vnHniGk6 +BsuWXaZ/WgtpZdZh1AU63p3a+Zbj+FpQo3MU1XCZ4HBwZopLlxz4WgcrNEqY +IPBbPn8XIwvdAZYC3QwTHPDf+SzuDwVq+aYphmCCxSLC1q9bKZBbmLvhgqkJ +8n4wPueST4HQX38tPCxMMHGldcK0JwUEoyri+h1McOmw8O+LjVJgkaQwO+Rr +gq4nvfqoOWR4kLf4eTrFBE/HiKDsEQmgmkfM2pwywW75z99Ft0tA5edRgZzT +JrjGP0nPkCkBZXIfaTZnTTArT7h35q84FGXXn7522QS9RGqaQ+PEISf1uLFl +Mdv+j4THpHQxOBEhnJHdZYIns84+r2ohAa9oSv7YGxNU3ivelHOfBEmlHHVm +vSYYThazvH+eBInjv4dH+01wMkVDy9ibBEcDuxmmwya4uTXwwuK0COzfdvH7 +jzkTVPmct1ZMTQS2bFRCEzkGWz3y2q/dhOFvN69QozwDV1/9WQcqwpDjP/7e +RomBtAPsH+k/QjCcVB21ZT0DE/qDqszOCsH+Fw73o/UYaH+hQte4UxBO2h+W +e2DBQCfNVwLO3gJQ4/FmySCEgQUPym/kF/LB9h81LXVhDHwV0tZ4Mp4POGJy +sjdGMDDZIL6iyJMPLC7vMXCJZmDhmqmCO7x80Plhxd7wBAaSo7dfiArihRFf +rfelWQy839e1fT11FUgHJ1dr1TOwZnZWL3eeG9KWdxmeamBgdvn24a993MB5 +1qL0WxMDhbfIPXGr4YaRKp6CnBcMPMMb8e/RIW6o4UjMJnUx0DB/p/JNDm7Y +cj42auYrA1cld+9MJnFBdm204aPVTORb9pyhua4AAXvPUooQExcYQw5l9BUQ +O2CkGbWGiYymzs9O8isgkGdOWUecifn+2oM8oxxAc4gUy5VjotyX9heaxzmg +Z3D/n+O6TJRe7LctP7zMEuffW/qfOxM9/zHbczOXWHnmR2ImPJkYEFlZZOm3 +xNI7kmZ+bhsTzU0XRxj6Syz7iZI3vTuYqHU4PVeic5GV1DM9v3MvE/0EFdqj +RRdZc7nHzGLimLi74e/zrLx51juTc135hUyMXyYKyH9nWIEH8q5YFzOxLDgo +50f3DGumuNJ/tISJTsv3J5aKZlgkxd5Z3SomUkGf58f2GZYtr6zMw3omFqyT +n3jZMM2q687363rDxPPrprV3ZU+xbIQeaEb2MvFOVOyyZsQUq9fyxQz5PROn +xXN59BynWFM1P1O8BpjIn/4ExninWJo3dO79GGEit6OFg+qRP6y6d6aRqWNM +VDqcX/50yx+WjZgzaE8w0VXIPPSa0R/WruQDryOmmaizhkhdmJpkTdUnXZKc +Y+I3TZLJka5JVvxC1s6aBSY+brj/kVY2yVpjUKCx/S8Tk7KE5dUyJlnXgmum +l5eZuDVG+45z6CTrf2oeJLM= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09309547772515583}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09309547772515583}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9938313896066723`*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"7ad04e14-366e-4710-8e42-5fab63ef4af0"] +}, Open ]], Cell[CellGroupData[{ @@ -4948,18 +12589,14 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"01995149-3665-fe4e-b326-b20429031afd"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[121]:=",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"52cff8eb-0c77-c944-a54f-e282b00ce766"], - -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[BoxData["1.433201743069099`"], "Output", + CellChangeTimes->{3.9938314683001747`*^9}, + CellLabel-> + "Out[121]=",ExpressionUUID->"d362a7d5-b38d-435f-8c20-eb311f0c78dd"] }, Open ]], Cell[CellGroupData[{ @@ -5026,27 +12663,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507468132763`*^9, - 3.9918507511809216`*^9}},ExpressionUUID->"11b1e372-f457-5a4d-bcee-\ -062a3c04ed96"], + CellChangeTimes->{{3.9918507468132763`*^9, 3.9918507511809216`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cb5a1193-7562-6446-a279-d9f6295d156e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2297910958996343`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 41, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99383146833455*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"4adcbee5-850c-4e5a-8665-1a230d1a3c70"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566b0ad4-7f4e-b04f-8294-646ce1913fac"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3070280426886951`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 42, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831468341238*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"da558476-ada8-4133-99ab-651206ff16f7"], -Cell[BoxData["0.7273353591556563`"], "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3891158507087284`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 43, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938314683476686`*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"e92dd8c2-de91-4443-8292-0d6e6ea40c19"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 122, 44, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938314683539143`*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"16c1a321-89d9-4011-844f-068839b656db"], + +Cell[BoxData["2.3142433691683792`"], "Output", + CellChangeTimes->{3.993831477364732*^9}, + CellLabel-> + "Out[122]=",ExpressionUUID->"3b76e231-b9b7-453f-be77-2819a56b00e2"] }, Open ]], Cell[CellGroupData[{ @@ -5067,8 +12755,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -5113,27 +12800,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185075434021*^9, - 3.9918507570104733`*^9}},ExpressionUUID->"8cb4e371-90a5-d347-adec-\ -3382e7679ba8"], + CellChangeTimes->{{3.99185075434021*^9, 3.9918507570104733`*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4cd45900-7eb0-6b4b-830a-a339e8117392"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2297910958996343`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 45, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831477397512*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"cb51267c-fc78-431c-a152-562ba40b7ce5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3070280426886951`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 46, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831477402561*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"90797739-e566-4e5a-8b8d-88251ab43833"], -Cell[BoxData["3.1005213487548544`"], "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3891158507087284`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 47, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831477407357*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"89e85718-9abb-4394-82fe-1c132a07a64b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 123, 48, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831477411902*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"c4a8c87f-d70f-46c0-bb80-f6e8a00ed89e"], + +Cell[BoxData["18.21844728355491`"], "Output", + CellChangeTimes->{3.993831486368479*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"8809410a-9de5-426b-8ece-bc3e741fcbc4"] }, Open ]], Cell[CellGroupData[{ @@ -5154,8 +12892,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -5200,27 +12937,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507598219967`*^9, - 3.9918507622107697`*^9}},ExpressionUUID->"732b358a-c98a-0347-8b16-\ -2462b23d6249"], + CellChangeTimes->{{3.9918507598219967`*^9, 3.9918507622107697`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2297910958996343`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 49, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938314864023933`*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"58073bc6-c98f-4857-8515-9482c6607b6a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"61220452-df6a-154e-8b5c-fecd0ab287a1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3070280426886951`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 50, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99383148640912*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"d5763d66-dae3-49b2-93f8-1f5b37abd9ad"], -Cell[BoxData["18.198720438459198`"], "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3891158507087284`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 51, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831486415526*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"b348600e-eff1-4dbd-9653-f22d04b552a9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 124, 52, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831486421595*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"cf922289-005b-41c7-924a-12bb2d8f64b3"], + +Cell[BoxData["0.48181208537313186`"], "Output", + CellChangeTimes->{3.99383149258784*^9}, + CellLabel-> + "Out[124]=",ExpressionUUID->"c976799f-85d5-43dc-b205-8fc92b683491"] }, Open ]], Cell[CellGroupData[{ @@ -5229,19 +13017,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918507652122154`*^9, - 3.9918507685850487`*^9}},ExpressionUUID->"3d20548b-905d-0343-8df1-\ -168ec8f367e1"], + CellChangeTimes->{{3.9918507652122154`*^9, 3.9918507685850487`*^9}}, + CellLabel-> + "In[125]:=",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[BoxData["0.09682709699983048`"], "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[BoxData["0.7811141465434597`"], "Output", + CellChangeTimes->{3.993831492615489*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"b4587360-3ccd-447d-9d69-3ff57c2aadc2"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918507716362114`*^9, 3.991850773604473*^9}, - 3.9919245563167305`*^9},ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-\ -e661a25a7ba1"], + 3.9919245563167305`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ @@ -5262,10 +13054,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ir", "*", "Il"}], - RowBox[{"Il", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"601c24ee-3f7b-\ -c74d-891b-10a6d009e34b"], + RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", + CellLabel-> + "In[127]:=",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[BoxData["7.1357426619652635`"], "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[BoxData["14.523266763822694`"], "Output", + CellChangeTimes->{3.9938314926261883`*^9}, + CellLabel-> + "Out[127]=",ExpressionUUID->"a175c83b-8836-412c-b338-41ac8139faf9"] }, Open ]], Cell[CellGroupData[{ @@ -5273,10 +13069,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb1"]]}]], "Input",ExpressionUUID->"05949206-8ee0-5646-\ -bb01-e9142212274d"], + FractionBox["Kb", "Qb1"]]}]], "Input", + CellLabel-> + "In[128]:=",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[BoxData["1.4042291233210182`"], "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[BoxData["0.03149409626224328`"], "Output", + CellChangeTimes->{3.993831492632699*^9}, + CellLabel-> + "Out[128]=",ExpressionUUID->"a382eca0-7439-48c9-8195-27d3e1cb4b6e"] }, Open ]], Cell[CellGroupData[{ @@ -5284,10 +13084,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"25a02cc2-\ -cb9a-bc4b-93f0-a7873f982a23"], + RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[129]:=",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[BoxData["10.02021766245587`"], "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[BoxData["0.4573971615020704`"], "Output", + CellChangeTimes->{3.9938314926389008`*^9}, + CellLabel-> + "Out[129]=",ExpressionUUID->"55072bf4-6ea1-4484-9db3-1dc3fa1709c1"] }, Open ]], Cell[CellGroupData[{ @@ -5475,10 +13279,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"df51ca6a-83a1-6340-\ -b13c-0185de64c37f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[130]:=",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[BoxData["0.06461147402889976`"], "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[BoxData["0.011762940165986044`"], "Output", + CellChangeTimes->{3.993831492649198*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"53e49139-48ee-4e74-a88c-c96129cf3614"] }, Open ]], Cell[CellGroupData[{ @@ -5490,18 +13298,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"731f0e35-\ -7798-8b45-a769-075ac4b3983f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[131]:=",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], - -Cell[BoxData["3.486503585502317`"], "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[BoxData["8.171221754020825`"], "Output", + CellChangeTimes->{3.993831492741908*^9}, + CellLabel-> + "Out[131]=",ExpressionUUID->"408b8ea0-1fe4-4c26-ab86-eff346ce35c8"] }, Open ]], Cell[CellGroupData[{ @@ -5691,10 +13495,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"413c8e7d-149c-5d4a-\ -9ccb-23aebae2e6d5"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[132]:=",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[BoxData["0.01165072070943232`"], "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[BoxData["0.4230710033392704`"], "Output", + CellChangeTimes->{3.9938314927513103`*^9}, + CellLabel-> + "Out[132]=",ExpressionUUID->"2e31a4cf-8673-4c21-b4f5-baa1d544cb24"] }, Open ]], Cell[CellGroupData[{ @@ -5706,18 +13514,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"e11d7eb8-\ -00a8-f540-98a0-89164ac4bae9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[133]:=",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], - -Cell[BoxData["8.21047995098231`"], "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[BoxData["1.3625056455625784`"], "Output", + CellChangeTimes->{3.993831492843079*^9}, + CellLabel-> + "Out[133]=",ExpressionUUID->"fa7918b8-491e-43fb-a1b7-0d65ff90260c"] }, Open ]], Cell[CellGroupData[{ @@ -5808,10 +13612,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-\ -1ee89e798d8f"], + ")"}]}]}]], "Input", + CellLabel-> + "In[134]:=",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[BoxData["0.130547288335749`"], "Output", + CellChangeTimes->{3.9938314928514423`*^9}, + CellLabel-> + "Out[134]=",ExpressionUUID->"bee1b51b-9c5d-4d64-b3f8-56e4730392e9"] }, Open ]], Cell[CellGroupData[{ @@ -5899,10 +13707,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-\ -f30d036fcdd2"], + ")"}]}]}]], "Input", + CellLabel-> + "In[135]:=",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[BoxData["0.869452711664251`"], "Output", + CellChangeTimes->{3.993831492858728*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"fe9dae5b-c894-44d0-abec-163c08a0d32f"] }, Open ]], Cell[CellGroupData[{ @@ -6023,10 +13835,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"46af1283-32d6-\ -7240-acd2-307af56b44db"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[136]:=",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[BoxData["0.11350469384393182`"], "Output", + CellChangeTimes->{3.993831492867999*^9}, + CellLabel-> + "Out[136]=",ExpressionUUID->"09b497d1-ad0b-41b6-8627-c79b9add44aa"] }, Open ]], Cell[CellGroupData[{ @@ -6088,27 +13904,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507910247746`*^9},ExpressionUUID->"cd516020-ac7f-224d-b1ff-\ -af0307420662"], + CellChangeTimes->{3.9918507910247746`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b82c1933-5313-1d4c-a858-68be8f118333"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.57311040009389`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 53, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831492880145*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"fed7e418-c693-46c2-9c99-e5379b37baad"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.7613279886452796`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 54, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99383149288701*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"0a8e8f88-aa34-4949-9a97-fa29b68fb4ea"], -Cell[BoxData["3.486503585502321`"], "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.15234301221599`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 55, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831492893834*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"6564a0ef-0763-431a-81b9-49b649a25e3d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 137, 56, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831492899918*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"5bfc8692-a357-4225-a891-dbce8becfa45"], + +Cell[BoxData["8.17122174937224`"], "Output", + CellChangeTimes->{3.9938314974695787`*^9}, + CellLabel-> + "Out[137]=",ExpressionUUID->"0637212c-1035-4911-9d65-5d5fa483de55"] }, Open ]], Cell[CellGroupData[{ @@ -6170,27 +14037,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507936164455`*^9},ExpressionUUID->"a9d0e817-a1c8-6546-a901-\ -34313c6ec04d"], + CellChangeTimes->{3.9918507936164455`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.57311040009389`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 57, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831497502767*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"b5eb4e90-ba58-4888-82eb-63d163d3a4d8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56712e4d-1aa7-524a-8254-bcfd8978eea0"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.7613279886452796`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 58, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938314975099773`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"f2c19173-34e6-4bea-aaf4-b63724158518"], -Cell[BoxData["8.210479950982325`"], "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.15234301221599`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 59, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831497516576*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"df0f0bb9-64e4-4b14-94a3-bafd9e81c930"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 138, 60, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831497522346*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"3148d3c2-bb7a-4e58-99ab-9d989fd98c74"], + +Cell[BoxData["1.3625056447874535`"], "Output", + CellChangeTimes->{3.99383150207196*^9}, + CellLabel-> + "Out[138]=",ExpressionUUID->"179abf94-3c75-41d9-8753-c772aedfc414"] }, Open ]], Cell[CellGroupData[{ @@ -6248,489 +14166,428 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507961174965`*^9},ExpressionUUID->"f68960b0-cff6-3245-b906-\ -ad38cf07d634"], + CellChangeTimes->{3.9918507961174965`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9c6ce535-b42f-3c43-a89e-eda48c04121e"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-\ -8b4ad9ffca61"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlXk4lekbxxGlLBHHkpQs7YOsR8l949iXZCRb1mMrO8kW1aSaqFCDNlQI +gyyp91B+SBImxtYyRBxLZM1aqt/TX+f6XN/7+dzf93nf6zpb3QOtPbk4ODgE +ODk4fv0Gv1bc/qTttY5liN/Lgo801JnMVndnFIL/GguPbML9mRrX5RlPoXtr +sGYyYSvmP6v5VV+ApK8wI5hwaUTccx5GC8wZJf7JIPxng0RNXMG/cPaTJy8f +YVZbcMaKShfUqBvX1vfTcOx9U0xk1VtYaeGqCCa8cUjOcUG/B+hcCWxhwmZT +MVqhLX2Q3fnNKqePhtUrY3wRBR+hZuSvb7sJd58Rj34cMAgS0f8byvlAw8nV +jLE5lSFwcuUWFiG8OjHIXnVxGIqnaXGhvTTcLHynMbhqFHZwNu992UNDS6mF +3En9z9BF0/A3/o+GXlmyYr/xTkIxZfP1xHsaxikcjD/eMgWzX0c6U9/R8K14 +596wghnYq/UmpuwNDZkOx3yvJc5Cg/uLg0XdNJy+zXG3LOALJLqaR9/qoiGv +7G9CMyrz4JndN3qog4bXmc+NhGgLIKyfs3djOw1lHtjHKS0ugIhWeH9XGw3p +e85P+lctAUcoxG1/TUMfjb6WMf0VGO06r6LWSMO5iBPc67Z9hwnDaqn0Bhqe +ruLT3sn7AxJXsxKn6mmYjvS/vVt+wuXTsZKRtaRfTiMjpIAT3/woCVhk0bCg +4Vr/GSkudPoaqLD0hPQdcY5JTuTCauGUK58raBiza768JGAVOlkOXS0pJX0f +bpWbUuHBQJmE7zl5NHzf9rn6x30epBuqzjNySf/ZJw6CtNWoIxvb/uY+DQvV +LFN+W1yN6mqSDu8yaFjPiuL0q+LFFj1nX/PrNJx/3tE3qs+P/VTCoeUYGm4w +5xeKrubHAXGrkNRIGip3MlBASwDF9xRPKYTT8Bi7ImuvoiDyxsgrbgqkYRBX +i/IBfiGU9bLl9nal4ZBs8Uz8gjC2ZCqNnUZyP15Na1tVN2CPTOpFE20acv09 +vFUieAOKjq634KGTvqpbrAvGN+D1rrI4WyUaOugnlb3uF0G70VPibtI0bPUI +CRVvJu/NP6NHblEUPzy4kuDKK4b3LiXeVZgVxc/jBffzDcQwV9khUmpCFNeF +DXbsrxHDrw9WsgYHRJFxzkbNtUIc/V9Zp4z8I4qV2RrzeZmSGEJ/5tFyVxSz +h76G7wuTxi0xEu1ndEXR+PCFD6FF0sgh9nduyn7irxcxLBqWxrbN0gs31UVR +LXsPTcZ+M3KksXVTdopivbtzOY/OFhRz36UuLSyKs1P9J0f/kMH6e1ljpR9E +UMSf8ajcQhYrLyxJ6IeJoI0332+mHxUw46ql4InEDSglezUugb0Hfdi8QwGp +QrgnJ4z/G6ggU6+gqbuWH++GyFtVtKjjyZg7C6qtvNgWDprncrRw/WPLAJjm +xq3OXZZH/Q7gmhsPdk3d58TsmvUvw6IOIKOIuz09nRO3yZlC4sUDeN/f9aLJ +ZU7cM1qtVJV9AAdLYzfVhHOiRkiekGTvAYzyDmVxmnKi+fno9k4LHUxU4/Xs +muHA8OKttuZKgDYh3HOlhhzo+fNxsXQk4gHTKY7La3+A6Bqp67WnES9Wn0jM +n/sOdYJxkZ4XEdVuV3h29X0Hmc1GjKI0xMIeX7bD4+/Qo/3mnfZjxMqNjQab +mN/BOmqR2+kLYlLUnEhI3QrozGs63vTXxfDRaHG1S99AfJxaI+6uh2UPuKwP +MpaBvrRuke6rhz6XR25uV1sGB56jww5BejhrqxXFJ78Mt7dwvsiI1cPLksf6 +51ctg6yNydltt/Rw8hJ10aZ+CRSfvVtR79TD3eq/q6kaLYHh1a8zNob62N7d +dsDg8CKEqWr3pOxioAvw0TWT58FJY6ovaS8D38Y27OU6Nw8MrXuDV+gMTJvR +yOkOnwcR4B2/ZMjAjbHlfbec5qHMtHP5rDsDnZSGp1N3zMO0m5946E0Gehl0 +LpnUzcHxpNvWv68zQOunCSUnV76A+8RKo8iYAXJTcnM3Ls3Ck4aF+fwZA/xD +t677Xuws8GdNy+KyATZQj0UrQkhuzY7x4zXEmIS98fMOJKealV9sM0RnK8bx +od2zUHH2Znq4hyFikdh0VOsM8ErQfd71GKJlfsV7U+kZKNILXZPZaoRelp+S +lu5PQdhWR53ybiO0GdosezN5CrQ59E+87DXCpFk+HpO4KWh5tmFwatwIqwUx +7bXDFHyml1UjrzG+uDrbdnLDFOxSmjkxgMb44fT911rnJiFPKpCtUGaM3818 +VzSCJyB77lht4XUT1JRq0uYOHId3+Te22t82wUGNlC9M53EQdGk8w5Ntgrs0 +Bi+3W4xD5CsFPedyEywxvqrbuWccLDP669a3k/MDq8KDxsdg2ci2PmS9KSYa +hjzhOj4Glrd0X9IvmaJtQm+sQegnWNKV+Kc+zgw9L4hniOWOwNznB7oWF8ww +yD+/PzN9BKbSNB93XTFDd49yRdWEERiesM0cvmOGmWoVzSeDRqDzxl/BvE/N +8HjKXZmI/SNQOrNBzHzJDI8axK227BiGY3cFXDqCzDFK73uh2Lph6OVYNfPR +zQJTz6edCEphg3np6cBRHwvc2/Wj4ecFNlS6/ZiYDLTAZElKOfUUG1Lrlse+ +nbLAjgZVzbc+bLA6N82m3bRAg/LXJ0uADXVrPrw1abdAM8cvwkWTg5AryKop +1bNEbq6QvtJDgxCwKTDpjNxBZF5aq/LvrgEo9m2s+SveCjdtXtytONsHUV8k +F3f7HkJOwfL9yqd6YN7U0PalizWqH08NjbN6B1qOybpDh35HvoVIzxuF3dAu +eedYvaoNBmfFu5gndcLG3D+e5u04jEfOu3mfTG8Hqn+XuaWALcIKP7uU61/Y +3DntHT5hi91rdy+vs2oF1b+SC+/3H0E1ufX3uWtb4A73F8WU53YoIPDqw/m/ +m+CxrtL7eJY9blMNNM4sbYR0zUvCKwUO2CT+4UHRzwZo/S/nvGqiIx5h0RT3 +3noBFRa35YNOO2FuE6NV3bAeZvx/5whgHsUdmznlTX97DvOGO30m9Z3xsozQ +w7v0OsibeLcUquGCAw0hxmcsasHubo7HUX5XlG4q2eSWUAPlZWYuqy644ukd +Yn/U3fsfaEm1L/+57Ipo4RIXGVQNcv3e7//1dSP/q7Urb7yeAZvv+MHbg25o +1Z+l2O37FNquWHoYHXbHNsn0GzW3quB6RCbfiTZ3lNDp/M58XwlPq38ue5h4 +ICUWEBpPr4S9tWr07WYeGLRHdp+jRiXkPvcNHzP3wKQwLi8VtUpIbuyYDbLy +QKHEznG2UiV4tT8YP3XEAzlk8nIctleC8PDB3jRPD6z5qnL2ohjJBbJqms8Q +3/q7/uPzLFjvhBdUKz1QmeeAfRXFAhnRl62bnhK/pvnRmscsUG6xkFhdTfIU +m88Nj1hgre2Y/7bWA7P+eJX/toQF1zeFN5965YFWc/fTBPNZsLH37/WNb4k/ +eef48xsskHcWT3daJH0M3gwcimGBlutkXrwaE/vlRfJHDFiQe2M61FKDiVbG +qT3eDBaIdszqiNOZeLqHfviTHgsmDRY78/YzsaTpg+g0sCB7Nwdnix4T26Kb +G/j3sUBwUdh+wyEmKtu1V59VZAH7svraTH+S70+2c5FgwaGXmp3egUxMWvJh +rRFnQTXHvkzlYCYGafQfKaWx4EaojnpdGBOzRprNeUVYYGlv5DYUTeaFooVe +CLCAJW/P2n2JiRx3uFsjV7HgSlWML5XLRBy0K3s9RYG/SppWRB7pW5xtmz1J +gXl+6Vp6AfFt71CInqBgXdpw/pMiJk77SDP2jFMQH2I19vgRE12rbaNvD1MQ +s1P+eEUduQ/xqMJHvRQcS2v2K/tA9vV4s+taKDARHNYO6Sfz7UpXnjVTsCOe +Q0BlgPgOuh1lNVEwHKJeVDrERCFr5+OPGilws8ycKPlM7mPBTpeqp8COJzTg +4VfSR6+kbOEpBUahG4MKxTzR9dGlTItiCuoyz5umSHji6YmM2/ZFFGi3zMpH +bCQcEjfhVUiBskLzO/3NZL7ry5/xBRRIvonW/0/BE/t39ua151Iwvq9XbJ26 +J3LYbbIvzKTgKlfWM+/fPTGr8baHUwp5fiX+dIvDJO8Yu5iSTME5x4gQ1SPk +fOrMyqskCiIeWW3/6UD2Gaa1aV8l/b04k1Pdyb5aa1mVRApUm9yZL4JJ7vyv +leN5Ct4kK/DJJXliTeLr6dxoCopBwGc0meTisXbChM9NzNUXXfNElBDqj4mi +QMWkPpaeRvZRpyyPRFJwhcNj1iKD+PWWcyRPUmAYmPUuopD48rp3d4ZQIC19 +UUOnmPTfKnTBivBcU+C1VSWk/4dXHK+DKbi3DSyulBP/f8cPtgRR8L23t+Z+ +pSfKsFWPdAdQ8MhcKu91I9lXz/q55TgFCV+5eK43kX4epVrFxyhwzxtzs28h +/ldzSQcIC3FXSrFbSZ9VEmkuvhT4VdldXe4m/qpPP0u8KZDblRouP0R8AlLq +fzIp+PrmVMenYcLJvft3Em6L91R+OEr6U2znJg8KYj+qjWl9Jrl1/PJ6wu/T +O44e/ELyAxFxeW4UpKwRNoji9MLTOSu1gi4UPJ3tdQxb5YUyITfjnjhTMNJb +EBLA44X9V90z3AhrP2Jkua/1wqx7ij9ZR8n35hrxzVSYcMyUWbQT6W9usMFA +xAvRTFxYifB+zQ07geaFHNpjGmxHCpIECm1VJb2wRvhItjXh/ZV9pVJbvdA1 +o44bHSjwyilspMkRX+6Tf37Yk/mkyL71CsS3+GmhmvCwl4gA904yn9fpq/8r +FzHy+axMfJ/C2pzsKKj8IRI3rEL6TnHf3EZ46FP/X/1qJC858XzmCAX7aqKe +d9JJfqBNPZEw26948zMk+67Zpf1rS4GgXbT6Ez3Cd/5zziWspW9sXsog/SXm +4mMIX5EciMwxJvf1vn52D2GK+2FSpimZv+RPX0N4cCr6wQ1zMh+b2DtwmAJ6 +A63rshXZvyBkmEHYvXRg/II1mefzXRtL+PLth1xnbcjzndu0x4XwQIiJcrgd +6Vdx6qoCYQFnMaMgB/I+tsm0rfvlMxk8esyJnPdeEzRjQ85vOZXg7Er8z5P+ +qSNMrTO9Z+dO8qqdCUWEB+bFWNZM4sf5BzcIC3wcbDX3In6/KbkLhOktJcOG +PsR/V/TnCcLuT059x2Ok/xk3La9f/numovv9yH0vtLcf+eW/LL5bPYCcV/Rq +Nv3lj2DrKgWR83ck5IAwP7PUbmcIyZdG3qkR1jwYGygXRs7rtE/t/uXfZ3Ze +Opz0Le5iyhNOVJC4Ix5B5lun6ZsJPxYaKheOIvN+sn6ShD9+K23iiyF9rvn+ +oP3yj8R+5Ikl8+kvpkQIa7SbLf2MI/NiGviL/w+jvsLZ + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlXk4lekbxxGlLBHHkpQs7YOsR8l949iXZCRb1mMrO8kW1aSaqFCDNlQI +gyyp91B+SBImxtYyRBxLZM1aqt/TX+f6XN/7+dzf93nf6zpb3QOtPbk4ODgE +ODk4fv0Gv1bc/qTttY5liN/Lgo801JnMVndnFIL/GguPbML9mRrX5RlPoXtr +sGYyYSvmP6v5VV+ApK8wI5hwaUTccx5GC8wZJf7JIPxng0RNXMG/cPaTJy8f +YVZbcMaKShfUqBvX1vfTcOx9U0xk1VtYaeGqCCa8cUjOcUG/B+hcCWxhwmZT +MVqhLX2Q3fnNKqePhtUrY3wRBR+hZuSvb7sJd58Rj34cMAgS0f8byvlAw8nV +jLE5lSFwcuUWFiG8OjHIXnVxGIqnaXGhvTTcLHynMbhqFHZwNu992UNDS6mF +3En9z9BF0/A3/o+GXlmyYr/xTkIxZfP1xHsaxikcjD/eMgWzX0c6U9/R8K14 +596wghnYq/UmpuwNDZkOx3yvJc5Cg/uLg0XdNJy+zXG3LOALJLqaR9/qoiGv +7G9CMyrz4JndN3qog4bXmc+NhGgLIKyfs3djOw1lHtjHKS0ugIhWeH9XGw3p +e85P+lctAUcoxG1/TUMfjb6WMf0VGO06r6LWSMO5iBPc67Z9hwnDaqn0Bhqe +ruLT3sn7AxJXsxKn6mmYjvS/vVt+wuXTsZKRtaRfTiMjpIAT3/woCVhk0bCg +4Vr/GSkudPoaqLD0hPQdcY5JTuTCauGUK58raBiza768JGAVOlkOXS0pJX0f +bpWbUuHBQJmE7zl5NHzf9rn6x30epBuqzjNySf/ZJw6CtNWoIxvb/uY+DQvV +LFN+W1yN6mqSDu8yaFjPiuL0q+LFFj1nX/PrNJx/3tE3qs+P/VTCoeUYGm4w +5xeKrubHAXGrkNRIGip3MlBASwDF9xRPKYTT8Bi7ImuvoiDyxsgrbgqkYRBX +i/IBfiGU9bLl9nal4ZBs8Uz8gjC2ZCqNnUZyP15Na1tVN2CPTOpFE20acv09 +vFUieAOKjq634KGTvqpbrAvGN+D1rrI4WyUaOugnlb3uF0G70VPibtI0bPUI +CRVvJu/NP6NHblEUPzy4kuDKK4b3LiXeVZgVxc/jBffzDcQwV9khUmpCFNeF +DXbsrxHDrw9WsgYHRJFxzkbNtUIc/V9Zp4z8I4qV2RrzeZmSGEJ/5tFyVxSz +h76G7wuTxi0xEu1ndEXR+PCFD6FF0sgh9nduyn7irxcxLBqWxrbN0gs31UVR +LXsPTcZ+M3KksXVTdopivbtzOY/OFhRz36UuLSyKs1P9J0f/kMH6e1ljpR9E +UMSf8ajcQhYrLyxJ6IeJoI0332+mHxUw46ql4InEDSglezUugb0Hfdi8QwGp +QrgnJ4z/G6ggU6+gqbuWH++GyFtVtKjjyZg7C6qtvNgWDprncrRw/WPLAJjm +xq3OXZZH/Q7gmhsPdk3d58TsmvUvw6IOIKOIuz09nRO3yZlC4sUDeN/f9aLJ +ZU7cM1qtVJV9AAdLYzfVhHOiRkiekGTvAYzyDmVxmnKi+fno9k4LHUxU4/Xs +muHA8OKttuZKgDYh3HOlhhzo+fNxsXQk4gHTKY7La3+A6Bqp67WnES9Wn0jM +n/sOdYJxkZ4XEdVuV3h29X0Hmc1GjKI0xMIeX7bD4+/Qo/3mnfZjxMqNjQab +mN/BOmqR2+kLYlLUnEhI3QrozGs63vTXxfDRaHG1S99AfJxaI+6uh2UPuKwP +MpaBvrRuke6rhz6XR25uV1sGB56jww5BejhrqxXFJ78Mt7dwvsiI1cPLksf6 +51ctg6yNydltt/Rw8hJ10aZ+CRSfvVtR79TD3eq/q6kaLYHh1a8zNob62N7d +dsDg8CKEqWr3pOxioAvw0TWT58FJY6ovaS8D38Y27OU6Nw8MrXuDV+gMTJvR +yOkOnwcR4B2/ZMjAjbHlfbec5qHMtHP5rDsDnZSGp1N3zMO0m5946E0Gehl0 +LpnUzcHxpNvWv68zQOunCSUnV76A+8RKo8iYAXJTcnM3Ls3Ck4aF+fwZA/xD +t677Xuws8GdNy+KyATZQj0UrQkhuzY7x4zXEmIS98fMOJKealV9sM0RnK8bx +od2zUHH2Znq4hyFikdh0VOsM8ErQfd71GKJlfsV7U+kZKNILXZPZaoRelp+S +lu5PQdhWR53ybiO0GdosezN5CrQ59E+87DXCpFk+HpO4KWh5tmFwatwIqwUx +7bXDFHyml1UjrzG+uDrbdnLDFOxSmjkxgMb44fT911rnJiFPKpCtUGaM3818 +VzSCJyB77lht4XUT1JRq0uYOHId3+Te22t82wUGNlC9M53EQdGk8w5Ntgrs0 +Bi+3W4xD5CsFPedyEywxvqrbuWccLDP669a3k/MDq8KDxsdg2ci2PmS9KSYa +hjzhOj4Glrd0X9IvmaJtQm+sQegnWNKV+Kc+zgw9L4hniOWOwNznB7oWF8ww +yD+/PzN9BKbSNB93XTFDd49yRdWEERiesM0cvmOGmWoVzSeDRqDzxl/BvE/N +8HjKXZmI/SNQOrNBzHzJDI8axK227BiGY3cFXDqCzDFK73uh2Lph6OVYNfPR +zQJTz6edCEphg3np6cBRHwvc2/Wj4ecFNlS6/ZiYDLTAZElKOfUUG1Lrlse+ +nbLAjgZVzbc+bLA6N82m3bRAg/LXJ0uADXVrPrw1abdAM8cvwkWTg5AryKop +1bNEbq6QvtJDgxCwKTDpjNxBZF5aq/LvrgEo9m2s+SveCjdtXtytONsHUV8k +F3f7HkJOwfL9yqd6YN7U0PalizWqH08NjbN6B1qOybpDh35HvoVIzxuF3dAu +eedYvaoNBmfFu5gndcLG3D+e5u04jEfOu3mfTG8Hqn+XuaWALcIKP7uU61/Y +3DntHT5hi91rdy+vs2oF1b+SC+/3H0E1ufX3uWtb4A73F8WU53YoIPDqw/m/ +m+CxrtL7eJY9blMNNM4sbYR0zUvCKwUO2CT+4UHRzwZo/S/nvGqiIx5h0RT3 +3noBFRa35YNOO2FuE6NV3bAeZvx/5whgHsUdmznlTX97DvOGO30m9Z3xsozQ +w7v0OsibeLcUquGCAw0hxmcsasHubo7HUX5XlG4q2eSWUAPlZWYuqy644ukd +Yn/U3fsfaEm1L/+57Ipo4RIXGVQNcv3e7//1dSP/q7Urb7yeAZvv+MHbg25o +1Z+l2O37FNquWHoYHXbHNsn0GzW3quB6RCbfiTZ3lNDp/M58XwlPq38ue5h4 +ICUWEBpPr4S9tWr07WYeGLRHdp+jRiXkPvcNHzP3wKQwLi8VtUpIbuyYDbLy +QKHEznG2UiV4tT8YP3XEAzlk8nIctleC8PDB3jRPD6z5qnL2ohjJBbJqms8Q +3/q7/uPzLFjvhBdUKz1QmeeAfRXFAhnRl62bnhK/pvnRmscsUG6xkFhdTfIU +m88Nj1hgre2Y/7bWA7P+eJX/toQF1zeFN5965YFWc/fTBPNZsLH37/WNb4k/ +eef48xsskHcWT3daJH0M3gwcimGBlutkXrwaE/vlRfJHDFiQe2M61FKDiVbG +qT3eDBaIdszqiNOZeLqHfviTHgsmDRY78/YzsaTpg+g0sCB7Nwdnix4T26Kb +G/j3sUBwUdh+wyEmKtu1V59VZAH7svraTH+S70+2c5FgwaGXmp3egUxMWvJh +rRFnQTXHvkzlYCYGafQfKaWx4EaojnpdGBOzRprNeUVYYGlv5DYUTeaFooVe +CLCAJW/P2n2JiRx3uFsjV7HgSlWML5XLRBy0K3s9RYG/SppWRB7pW5xtmz1J +gXl+6Vp6AfFt71CInqBgXdpw/pMiJk77SDP2jFMQH2I19vgRE12rbaNvD1MQ +s1P+eEUduQ/xqMJHvRQcS2v2K/tA9vV4s+taKDARHNYO6Sfz7UpXnjVTsCOe +Q0BlgPgOuh1lNVEwHKJeVDrERCFr5+OPGilws8ycKPlM7mPBTpeqp8COJzTg +4VfSR6+kbOEpBUahG4MKxTzR9dGlTItiCuoyz5umSHji6YmM2/ZFFGi3zMpH +bCQcEjfhVUiBskLzO/3NZL7ry5/xBRRIvonW/0/BE/t39ua151Iwvq9XbJ26 +J3LYbbIvzKTgKlfWM+/fPTGr8baHUwp5fiX+dIvDJO8Yu5iSTME5x4gQ1SPk +fOrMyqskCiIeWW3/6UD2Gaa1aV8l/b04k1Pdyb5aa1mVRApUm9yZL4JJ7vyv +leN5Ct4kK/DJJXliTeLr6dxoCopBwGc0meTisXbChM9NzNUXXfNElBDqj4mi +QMWkPpaeRvZRpyyPRFJwhcNj1iKD+PWWcyRPUmAYmPUuopD48rp3d4ZQIC19 +UUOnmPTfKnTBivBcU+C1VSWk/4dXHK+DKbi3DSyulBP/f8cPtgRR8L23t+Z+ +pSfKsFWPdAdQ8MhcKu91I9lXz/q55TgFCV+5eK43kX4epVrFxyhwzxtzs28h +/ldzSQcIC3FXSrFbSZ9VEmkuvhT4VdldXe4m/qpPP0u8KZDblRouP0R8AlLq +fzIp+PrmVMenYcLJvft3Em6L91R+OEr6U2znJg8KYj+qjWl9Jrl1/PJ6wu/T +O44e/ELyAxFxeW4UpKwRNoji9MLTOSu1gi4UPJ3tdQxb5YUyITfjnjhTMNJb +EBLA44X9V90z3AhrP2Jkua/1wqx7ij9ZR8n35hrxzVSYcMyUWbQT6W9usMFA +xAvRTFxYifB+zQ07geaFHNpjGmxHCpIECm1VJb2wRvhItjXh/ZV9pVJbvdA1 +o44bHSjwyilspMkRX+6Tf37Yk/mkyL71CsS3+GmhmvCwl4gA904yn9fpq/8r +FzHy+axMfJ/C2pzsKKj8IRI3rEL6TnHf3EZ46FP/X/1qJC858XzmCAX7aqKe +d9JJfqBNPZEw26948zMk+67Zpf1rS4GgXbT6Ez3Cd/5zziWspW9sXsog/SXm +4mMIX5EciMwxJvf1vn52D2GK+2FSpimZv+RPX0N4cCr6wQ1zMh+b2DtwmAJ6 +A63rshXZvyBkmEHYvXRg/II1mefzXRtL+PLth1xnbcjzndu0x4XwQIiJcrgd +6Vdx6qoCYQFnMaMgB/I+tsm0rfvlMxk8esyJnPdeEzRjQ85vOZXg7Er8z5P+ +qSNMrTO9Z+dO8qqdCUWEB+bFWNZM4sf5BzcIC3wcbDX3In6/KbkLhOktJcOG +PsR/V/TnCcLuT059x2Ok/xk3La9f/numovv9yH0vtLcf+eW/LL5bPYCcV/Rq +Nv3lj2DrKgWR83ck5IAwP7PUbmcIyZdG3qkR1jwYGygXRs7rtE/t/uXfZ3Ze +Opz0Le5iyhNOVJC4Ix5B5lun6ZsJPxYaKheOIvN+sn6ShD9+K23iiyF9rvn+ +oP3yj8R+5Ikl8+kvpkQIa7SbLf2MI/NiGviL/w+jvsLZ + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 5.470378032678651}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 5.470378032678651}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlXk4lekbxxGlLBHHkpQs7YOsR8l949iXZCRb1mMrO8kW1aSaqFCDNlQI +gyyp91B+SBImxtYyRBxLZM1aqt/TX+f6XN/7+dzf93nf6zpb3QOtPbk4ODgE +ODk4fv0Gv1bc/qTttY5liN/Lgo801JnMVndnFIL/GguPbML9mRrX5RlPoXtr +sGYyYSvmP6v5VV+ApK8wI5hwaUTccx5GC8wZJf7JIPxng0RNXMG/cPaTJy8f +YVZbcMaKShfUqBvX1vfTcOx9U0xk1VtYaeGqCCa8cUjOcUG/B+hcCWxhwmZT +MVqhLX2Q3fnNKqePhtUrY3wRBR+hZuSvb7sJd58Rj34cMAgS0f8byvlAw8nV +jLE5lSFwcuUWFiG8OjHIXnVxGIqnaXGhvTTcLHynMbhqFHZwNu992UNDS6mF +3En9z9BF0/A3/o+GXlmyYr/xTkIxZfP1xHsaxikcjD/eMgWzX0c6U9/R8K14 +596wghnYq/UmpuwNDZkOx3yvJc5Cg/uLg0XdNJy+zXG3LOALJLqaR9/qoiGv +7G9CMyrz4JndN3qog4bXmc+NhGgLIKyfs3djOw1lHtjHKS0ugIhWeH9XGw3p +e85P+lctAUcoxG1/TUMfjb6WMf0VGO06r6LWSMO5iBPc67Z9hwnDaqn0Bhqe +ruLT3sn7AxJXsxKn6mmYjvS/vVt+wuXTsZKRtaRfTiMjpIAT3/woCVhk0bCg +4Vr/GSkudPoaqLD0hPQdcY5JTuTCauGUK58raBiza768JGAVOlkOXS0pJX0f +bpWbUuHBQJmE7zl5NHzf9rn6x30epBuqzjNySf/ZJw6CtNWoIxvb/uY+DQvV +LFN+W1yN6mqSDu8yaFjPiuL0q+LFFj1nX/PrNJx/3tE3qs+P/VTCoeUYGm4w +5xeKrubHAXGrkNRIGip3MlBASwDF9xRPKYTT8Bi7ImuvoiDyxsgrbgqkYRBX +i/IBfiGU9bLl9nal4ZBs8Uz8gjC2ZCqNnUZyP15Na1tVN2CPTOpFE20acv09 +vFUieAOKjq634KGTvqpbrAvGN+D1rrI4WyUaOugnlb3uF0G70VPibtI0bPUI +CRVvJu/NP6NHblEUPzy4kuDKK4b3LiXeVZgVxc/jBffzDcQwV9khUmpCFNeF +DXbsrxHDrw9WsgYHRJFxzkbNtUIc/V9Zp4z8I4qV2RrzeZmSGEJ/5tFyVxSz +h76G7wuTxi0xEu1ndEXR+PCFD6FF0sgh9nduyn7irxcxLBqWxrbN0gs31UVR +LXsPTcZ+M3KksXVTdopivbtzOY/OFhRz36UuLSyKs1P9J0f/kMH6e1ljpR9E +UMSf8ajcQhYrLyxJ6IeJoI0332+mHxUw46ql4InEDSglezUugb0Hfdi8QwGp +QrgnJ4z/G6ggU6+gqbuWH++GyFtVtKjjyZg7C6qtvNgWDprncrRw/WPLAJjm +xq3OXZZH/Q7gmhsPdk3d58TsmvUvw6IOIKOIuz09nRO3yZlC4sUDeN/f9aLJ +ZU7cM1qtVJV9AAdLYzfVhHOiRkiekGTvAYzyDmVxmnKi+fno9k4LHUxU4/Xs +muHA8OKttuZKgDYh3HOlhhzo+fNxsXQk4gHTKY7La3+A6Bqp67WnES9Wn0jM +n/sOdYJxkZ4XEdVuV3h29X0Hmc1GjKI0xMIeX7bD4+/Qo/3mnfZjxMqNjQab +mN/BOmqR2+kLYlLUnEhI3QrozGs63vTXxfDRaHG1S99AfJxaI+6uh2UPuKwP +MpaBvrRuke6rhz6XR25uV1sGB56jww5BejhrqxXFJ78Mt7dwvsiI1cPLksf6 +51ctg6yNydltt/Rw8hJ10aZ+CRSfvVtR79TD3eq/q6kaLYHh1a8zNob62N7d +dsDg8CKEqWr3pOxioAvw0TWT58FJY6ovaS8D38Y27OU6Nw8MrXuDV+gMTJvR +yOkOnwcR4B2/ZMjAjbHlfbec5qHMtHP5rDsDnZSGp1N3zMO0m5946E0Gehl0 +LpnUzcHxpNvWv68zQOunCSUnV76A+8RKo8iYAXJTcnM3Ls3Ck4aF+fwZA/xD +t677Xuws8GdNy+KyATZQj0UrQkhuzY7x4zXEmIS98fMOJKealV9sM0RnK8bx +od2zUHH2Znq4hyFikdh0VOsM8ErQfd71GKJlfsV7U+kZKNILXZPZaoRelp+S +lu5PQdhWR53ybiO0GdosezN5CrQ59E+87DXCpFk+HpO4KWh5tmFwatwIqwUx +7bXDFHyml1UjrzG+uDrbdnLDFOxSmjkxgMb44fT911rnJiFPKpCtUGaM3818 +VzSCJyB77lht4XUT1JRq0uYOHId3+Te22t82wUGNlC9M53EQdGk8w5Ntgrs0 +Bi+3W4xD5CsFPedyEywxvqrbuWccLDP669a3k/MDq8KDxsdg2ci2PmS9KSYa +hjzhOj4Glrd0X9IvmaJtQm+sQegnWNKV+Kc+zgw9L4hniOWOwNznB7oWF8ww +yD+/PzN9BKbSNB93XTFDd49yRdWEERiesM0cvmOGmWoVzSeDRqDzxl/BvE/N +8HjKXZmI/SNQOrNBzHzJDI8axK227BiGY3cFXDqCzDFK73uh2Lph6OVYNfPR +zQJTz6edCEphg3np6cBRHwvc2/Wj4ecFNlS6/ZiYDLTAZElKOfUUG1Lrlse+ +nbLAjgZVzbc+bLA6N82m3bRAg/LXJ0uADXVrPrw1abdAM8cvwkWTg5AryKop +1bNEbq6QvtJDgxCwKTDpjNxBZF5aq/LvrgEo9m2s+SveCjdtXtytONsHUV8k +F3f7HkJOwfL9yqd6YN7U0PalizWqH08NjbN6B1qOybpDh35HvoVIzxuF3dAu +eedYvaoNBmfFu5gndcLG3D+e5u04jEfOu3mfTG8Hqn+XuaWALcIKP7uU61/Y +3DntHT5hi91rdy+vs2oF1b+SC+/3H0E1ufX3uWtb4A73F8WU53YoIPDqw/m/ +m+CxrtL7eJY9blMNNM4sbYR0zUvCKwUO2CT+4UHRzwZo/S/nvGqiIx5h0RT3 +3noBFRa35YNOO2FuE6NV3bAeZvx/5whgHsUdmznlTX97DvOGO30m9Z3xsozQ +w7v0OsibeLcUquGCAw0hxmcsasHubo7HUX5XlG4q2eSWUAPlZWYuqy644ukd +Yn/U3fsfaEm1L/+57Ipo4RIXGVQNcv3e7//1dSP/q7Urb7yeAZvv+MHbg25o +1Z+l2O37FNquWHoYHXbHNsn0GzW3quB6RCbfiTZ3lNDp/M58XwlPq38ue5h4 +ICUWEBpPr4S9tWr07WYeGLRHdp+jRiXkPvcNHzP3wKQwLi8VtUpIbuyYDbLy +QKHEznG2UiV4tT8YP3XEAzlk8nIctleC8PDB3jRPD6z5qnL2ohjJBbJqms8Q +3/q7/uPzLFjvhBdUKz1QmeeAfRXFAhnRl62bnhK/pvnRmscsUG6xkFhdTfIU +m88Nj1hgre2Y/7bWA7P+eJX/toQF1zeFN5965YFWc/fTBPNZsLH37/WNb4k/ +eef48xsskHcWT3daJH0M3gwcimGBlutkXrwaE/vlRfJHDFiQe2M61FKDiVbG +qT3eDBaIdszqiNOZeLqHfviTHgsmDRY78/YzsaTpg+g0sCB7Nwdnix4T26Kb +G/j3sUBwUdh+wyEmKtu1V59VZAH7svraTH+S70+2c5FgwaGXmp3egUxMWvJh +rRFnQTXHvkzlYCYGafQfKaWx4EaojnpdGBOzRprNeUVYYGlv5DYUTeaFooVe +CLCAJW/P2n2JiRx3uFsjV7HgSlWML5XLRBy0K3s9RYG/SppWRB7pW5xtmz1J +gXl+6Vp6AfFt71CInqBgXdpw/pMiJk77SDP2jFMQH2I19vgRE12rbaNvD1MQ +s1P+eEUduQ/xqMJHvRQcS2v2K/tA9vV4s+taKDARHNYO6Sfz7UpXnjVTsCOe +Q0BlgPgOuh1lNVEwHKJeVDrERCFr5+OPGilws8ycKPlM7mPBTpeqp8COJzTg +4VfSR6+kbOEpBUahG4MKxTzR9dGlTItiCuoyz5umSHji6YmM2/ZFFGi3zMpH +bCQcEjfhVUiBskLzO/3NZL7ry5/xBRRIvonW/0/BE/t39ua151Iwvq9XbJ26 +J3LYbbIvzKTgKlfWM+/fPTGr8baHUwp5fiX+dIvDJO8Yu5iSTME5x4gQ1SPk +fOrMyqskCiIeWW3/6UD2Gaa1aV8l/b04k1Pdyb5aa1mVRApUm9yZL4JJ7vyv +leN5Ct4kK/DJJXliTeLr6dxoCopBwGc0meTisXbChM9NzNUXXfNElBDqj4mi +QMWkPpaeRvZRpyyPRFJwhcNj1iKD+PWWcyRPUmAYmPUuopD48rp3d4ZQIC19 +UUOnmPTfKnTBivBcU+C1VSWk/4dXHK+DKbi3DSyulBP/f8cPtgRR8L23t+Z+ +pSfKsFWPdAdQ8MhcKu91I9lXz/q55TgFCV+5eK43kX4epVrFxyhwzxtzs28h +/ldzSQcIC3FXSrFbSZ9VEmkuvhT4VdldXe4m/qpPP0u8KZDblRouP0R8AlLq +fzIp+PrmVMenYcLJvft3Em6L91R+OEr6U2znJg8KYj+qjWl9Jrl1/PJ6wu/T +O44e/ELyAxFxeW4UpKwRNoji9MLTOSu1gi4UPJ3tdQxb5YUyITfjnjhTMNJb +EBLA44X9V90z3AhrP2Jkua/1wqx7ij9ZR8n35hrxzVSYcMyUWbQT6W9usMFA +xAvRTFxYifB+zQ07geaFHNpjGmxHCpIECm1VJb2wRvhItjXh/ZV9pVJbvdA1 +o44bHSjwyilspMkRX+6Tf37Yk/mkyL71CsS3+GmhmvCwl4gA904yn9fpq/8r +FzHy+axMfJ/C2pzsKKj8IRI3rEL6TnHf3EZ46FP/X/1qJC858XzmCAX7aqKe +d9JJfqBNPZEw26948zMk+67Zpf1rS4GgXbT6Ez3Cd/5zziWspW9sXsog/SXm +4mMIX5EciMwxJvf1vn52D2GK+2FSpimZv+RPX0N4cCr6wQ1zMh+b2DtwmAJ6 +A63rshXZvyBkmEHYvXRg/II1mefzXRtL+PLth1xnbcjzndu0x4XwQIiJcrgd +6Vdx6qoCYQFnMaMgB/I+tsm0rfvlMxk8esyJnPdeEzRjQ85vOZXg7Er8z5P+ +qSNMrTO9Z+dO8qqdCUWEB+bFWNZM4sf5BzcIC3wcbDX3In6/KbkLhOktJcOG +PsR/V/TnCcLuT059x2Ok/xk3La9f/numovv9yH0vtLcf+eW/LL5bPYCcV/Rq +Nv3lj2DrKgWR83ck5IAwP7PUbmcIyZdG3qkR1jwYGygXRs7rtE/t/uXfZ3Ze +Opz0Le5iyhNOVJC4Ix5B5lun6ZsJPxYaKheOIvN+sn6ShD9+K23iiyF9rvn+ +oP3yj8R+5Ikl8+kvpkQIa7SbLf2MI/NiGviL/w+jvsLZ + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 5.470378032678651}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 5.470378032678651}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831754440823*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"ff68efa2-ff89-4421-a853-c4f35cf934d8"] }, Open ]], Cell[CellGroupData[{ @@ -6794,425 +14651,1392 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.99185079904813*^9, {3.9918508647235966`*^9, - 3.991850864992861*^9}},ExpressionUUID->"d43bf17b-b492-0e4a-af4a-\ -6a3bc399953c"], + 3.99185079904813*^9, {3.9918508647235966`*^9, 3.991850864992861*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.2977491945959207`*^-246\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 61, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99383175457288*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"aab23b7a-0d79-4b9d-8a50-39c72b9d1682"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"71d4e039-c2b8-d74d-819a-80d2051e4273"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.236976760361633`*^-254\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 62, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831754577895*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"0204608f-9a35-43b1-8fd8-8e569f8500bb"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"63625e13-15ef-1f45-89dc-998a1b63a626"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.9852656776422924`*^-261\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 63, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831754582204*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"487c6cfb-6af3-4058-99fe-9fb2d0013f7e"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 140, 64, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993831754585993*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"1c217a40-e32e-472b-ae6a-365b2ff0e9ab"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-\ -1872f77ea023"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lF8XAHAp2WVnxr5EtuwzzJg5R0qMouxJkWz1k4iytKCQIqlkKYRK +WZJ9bFGUkCRLJJWEJLQQEXnn/ev5fP84997nnnPuvQoeR2292NnY2ErWsLH9 +/zv/oe2pcvwdemORYPSJGWt6b5ZkmOnAWTA7IPUv300TUOyVh+TAVVA/J3jN +280ETuwq6F87kAtrl/b56brtAKEZiauL/WUQddFUrG2/K3ystz46198EoX2P +x/bt8wNz5cn3P/u7Ie5a/5cOp1Ow2E++/qN/BI6bMx1zTBOg2ezende5s6Co +uMPsMW8mSH+sGffQXIF+Qg60yt4FUT+3Ak6ztTgRlW7CKVEIV3XN66wduHBd +tk89l38JaL/bs53my4XPF+gfOEJLoCP6SI/GSS5sy3ZcWI4qgfUDyd+4criw +xOfu2rfXS+Dkmc9SzVNcqFutbGDxqAQ8X0SeIkdzY/TyzEk23lIgedXR5Mt5 +sCM4/86znFJ4m6bz+KcgPxYJHioTry+DGz2FG05s5Ee+gW19Os/KwEVA1W3J +mB9/HalXM+ssg6FzMv/YD/Lj6cnofbuGy2DYn8dEtJIfBaWEi/jWlcPE1lEm +aY8AOthb9vAwyuHPj9SHJ3M2YBj9fD9/VznUaIisrlZuwLgFrya1gXII9060 +jm7fgG6hGem04XJYfhc9nTC7AXnX93Ls/FEOkZ+rxV4pCmKr9txtHsEKiO68 +azccLIhiAetPr+6sgPg7Ea/YCUKo0Kn/42lzBTAMDgmLKQnhV4ng7bXtFcD1 +1NZBVUsIh/gW7917zYr/vPGdlakQNmfGRR7+WAGnFDvGkw8JId/G98eSlirA +P1vyn0qtELb5PI9x1a6E3RmlmlZ7hVHsemzV96uVIKh58+g+L2HkTp2IGk2r +hM666LKjR4XxV0Qv7XVWJTDeORklnxNGcnpEzNWCSthC/Gf2vlAY6Z0PLCqe +VIJBGmPv0WVhPBg8bBs8UwkSyZ8vXMsUwR/b24ljplUgqVEZ/SdPBIWT426c +Na8CYlNsxL4SEdxtdlqYYFUFsj/Ujqs2i6BBYsI3Hfsq2LgjwL1uQgT1tmeb +83lXgf66FdJnfVHUWLR7FRhXBQY3O3UtaKLofYP+NSuhCkh62ZoPzEXxhDfv +6tOkKqC4mymG7BFFO+dyueW0KjCtv8DPGyGKKXfegnh+FdgEi4/qtbPGe/17 +79LzKtjFO/EhtUcUvbrDvZgvqsA2t+bt8pAocp8kHDvyqgocu1xftXwXxd2v +v6U8fVMF+zRv17qIieFKaJac3FgV/DeqfeWsuxja1ds2xLAx4by9Jb17Xgwt +/jn4yeoxgVjRSWRfI45P9isNUwyZUCxiv6DLK47OeQ+MbYyY8KZ7f8kVOXFM +1eG57UZngvLuYMXdFuL4uts5SI7BhKadt9Z3pYsj6esDE2l3Jjg+UP68elsc +jYg3HzA9mDDJV9CoXSyOY4euEK28mCDUURF6uUkc5UjPZ/YcZoI7o33S+ps4 +bpqKL5IIZsKK+e/OlyYSeMnaYlo0lglJeeGFK+YS2F1D/KQTx5p/PVuc1m4J +3JuT823rRSbseMZjeslLAucy+XY4JDLhhpl8+Y5ECZxxXT0ikcKEzbfvXj6V +JoEBNDaruVTWetk1/IpyJdBkb87OtnQmfH1iuJGPKYGSTXEv9mYywQitUl98 +lMAEW51PineY0HGrK+jvVwk0dXJRfHKXtd5Vh10acxIoGyiR7nSPtZ8N7tzx +XJJ4S+mK9pEC1n6ZnDjJ0JXEtz93UqklTDic8dcpnCqJH/obD94sZf3f30iD +gm2SWNVd3T1bxvqfuvhpbhdJ5BfguHSpkglBxjlubWcl8ZLC1lLPWiYwsgXm +rBIksb/gtnFwHRMUOU/FdV6XRK9QSfHT9Uzo6nUs7bnPmi/veXd4AxPuU59u +cyyTRGnVjqqjjUyIyNUdHKhjxW8Mn9/3mLUfAXxrP3RK4puo2CSVJiZw9Iel +ug9IosD8sxm2ZiYM0b5ofP4kiarCgSW9LMfzNtlPzEmiY8k3L99nTJjIC8n7 +RSRgtjXlNbYyoZF/jHJcmYDDIxfPjrOcEmz7akGLgCPztvdi2piwbYvWn2Uk +IPehaLuSdiZI599IiGAQsI1P+CP1BRPmNnApsNsTsKPKbfwxy7nvRyw5fQjI +w8wJYHYwIWzrrg8XAgiYqdi1sOklE3YVPjrGF07AQ7V6a5NZ3iSswXn5HAFV +t08n/2F5NTTtptAlAt4DlYeOnax8fOTQSU4hYEjLevtilovNg56KZxPw7L3a +mFWWYx4MO6fnE7DQIcCc8YoJrqLW01LlBPSecE5LZFn/ZF1UVj0B7Qj3T3ew +zDOySVyhhYCvTJP/rO1iwohFSsHtVwRMcXbkNWS55uFaUHlLQOp3tWo3lpPE +A3vujxDwu/bONdEs+57+4KMxRcAPg2xfc1iGUavlB78J+MUsLrCGZXGrmiSd +VQKK7VLLbGd5ulRlYzkXETFI07+P5aeSyTWGwkS89GBo/C3LGRFrrKuliLgQ +d557gOWgcf8RykYi/hQ/PfCKZcbOoROPNhNxeHqD4xOWFSsseVnNiZkq16OL +WF4kMm81mRJRwsXT+wrLXVHKBtusiNia1b9ylOV7E1dan9sTcXOs1U4Lls/Y +rLoy9hMxiCjnRGTZscrvZ4cPEd+9K5cZZ+2PlsxgjE0gEbc2HLldyPK66O3E +7nAiVqmUTx5meWiyotg+moj9E1O/lVi+WH25f08qEf+MTB04x8rHAbmV/4ay +ifi7N+m5GstGsYfZ3AqIePny6FIbK79f7LapeT4i4l6pwN4FVn001JY9Gm8h +4nbmjYgYllMU5G0PdRGRUeTAzs/y1u9L4f6fidgseDKNm1VfYRbJ6k+miHh9 +XdLJKFY9FudoDYrMs+LVyKdnWfUqae9uXMMlhXmGLWPPWPW888HiBK+wFJ6J +CN2twvLZ9dfS9ktJ4ULN7rHI50yYqn62sHazFOYPKF9WbmGCgrDbPUeyFJa/ +W8w/wuoXx//+OOajFG7jKpovecqExzIaVdZ2UqjUFqytwuqva2eTgtNDpTA3 +8M7BF6x+bX2npjwVJYX3e91tx1n9vGzQ3EOPl0KHb62xfx8xwfvLb73RTCmM +jc5vF2X1P2XH3p+bm6WwOzOEY201qx7FVPyf8ktjsvfSua5iJkgcbZSRkJBG +KFu/mvSAdV62Or88JC+N/dU9E1ZFTKgKj9fcoC+N7GvIIqX5rHx8/DG5x1ka +z4ca8xuzzj+9/Dqf77nS2EdumjJNY4IPu4PEliJpXP/24LUC1vmasXemJblS +Gg8Pl/TwX2fCegEFFUqrNJa7bNV8eoUJg8diR6OnpdHnTcDFH6zzOspk9wGi +kQy+qzI5xDjFBIv9Wb/IW2Qwzm9kSD+cCQKR38457JDBDS9X1CRCWeM3x+Ql +uctgjruU24sgJlQzar+tvyCDSV833Jxk3R8/nJVOzL6VQR7DC1c4nZnADA/g +FBqVQe+gU/ZJDqx6zXiUtnlGBl08v2qI2DGBb9ip7hC7LCYoklQ5rZmg6pPA +Nqwui8p/NWrumzFh//HfFztOyiK7Gk9mnxYTNqZukZ6MkcWOq4L+azT+n+/L +DziTZHFpLixJdRMTwpfVurbckUXN8qkBD0UmXD+3X6ymQxYjzb6PXhdn3R9X +nt+6KyOHkvHxdj9XWPd/cXrFmUY5lMtQ00hvrYKt/Z0rM61yyGMyzmP3rAqs +2dZtd+uWQ0VBdW+upio4aOv/FsZY8bn/ZXjVVYH5SYWISA55fPhpvefkgyoI +kJu/baohj7u7Fs3kr1bBU59b080n5NF8dvmavVMV+P35GdnKr4BH/DWkM/oq +gRLoLT4urIDKMU4Zv7oqgWtysHCtpAJu2hP/YmtHJdx91/yGrqiAFNpFi6Gm +SvjQcF2zkqSAY2fCyQMPK8Emxnggx00Bv22bbuC8UAl6wlHaJ0sVkKSQp+1p +VAmLGoIftBwUMby5sp4roQJMCouyU1KUsCaiP+qvWDn8FGa4OzYp43+6k5k+ +N0phNMHd8RinCqYU3L9a0f8QLL+HWI6RVHGM87jH8v0imDrIFVQRsQm5dN6q +rd+Sz3r/S7Cfb1LD5DjuG8958kD4pUpiyXd1TCh9+1XF8DZIxz3cRSJp4vh5 +xsH8vdmQpmEsKOKjhb/fSD9ZeH8T2ommhrNXNuNj44Lbf5NTgSLdlKT9Rhu5 +OcR5N4ZcA4G1ucEHzuqgfUdXrZRMEshGyZnsUdHF/h/2oplLF4B7o2uV7XNd +JD64vfS4IxoOE4BR2KaLQCE+ka6LhnZ+xQ9rO3QxtlzheHR+NCTMf+Go7NLF +P2M+V0Nio0GgNchBYlAXX1KVCVMYDcL/xc+9m9LF7ML7/DzV50C6tFbPS1gP +FZTk1y8Un4XNNMLDkH16GLuOcPF0QySUKx36y+6uhyXmfuNHiiPBiKdme6KH +Hj4UNX99OCsStvQ7D9/x0cNB+Qyji2ciwTEwTag7UA+Pccml7YdIiLgrEawZ +q4edkxv7H8ZGQBe/uPGnYj38kuVa33D/NBz7INzMYNPHe2r0nQV64dDa4vqo +gF0fU/nFCerEcJB9mMfk4dDHp39PzdavCYf2CEpRO7c+9kn/yZd6HQaKCh7X +GSL6mLP700JdQBi8Pljqw1DRx5MJ1Okz5aGg89WGj7FDH0XCPmo/Mw+B77MJ +DpZp+ig401O7ITcYhgZyHDNv6OPNb4s23onB0P6oyulnhj7yW8vWdYQHw53z +w3vSc/Sx+r3/dKtdMLhIGez/WqCPi+mr1afXB8OzLe+8LzzSR1m/5Pwu/yC4 +eUUttG1EH60+djsMMo7Bdu2WG5ZaBhixi58zdHMAOK+3sO/SNsDV2SOb5GQC +4PD7Nn4nPQN8XBdm/IY3ABLjX0Z6kg3QyLt46Uv3UXjzpdc7wpQVn/Im+y3j +KHhmf9ardDDAt3d7866hP5wVWvNC/owBOmpxmT/f4gcNs9S/C50GqHfqeYx/ +pi/kdDA97F4boL+xz/uhc74QfVe/vbjHAE1dbMw8DvuCpZNGuteAASoXZS+U +kn2ht5ZI7vlkgC7h/voHe3xgMmrxWPGcAf4XFpT2T8AHxAWZk55EQ9yrYZd+ +L8ULFif0bB9LG+K2l9vkBiK8YOhJcY2UnCFWhpwrljnkBTlBeXHdSoao16tW +8IXqBZr911VQyxBLt7W4Hx/xhC1ZwR5SaIhDbg+MDut7gr+m3uBrL0M8+ys+ +xnrUA44vEJfcfA3xQv3lcOtODzjVtJY4c9gQ53vGv3pWe0C8c98engBDLBgM +nOpN8ID70aFvt4QbYrvrieONJA8YGWoYKE80xK+baPuKEw+A4yWr/utMQ6x5 +ENgfZO0O+5wNFpRqWeupzAuTo7qDp5KMRFm9IRLvqez+qOoOQTUzjp1PDJE0 +rOByc407JI1debO+wxDJcUKDHH5u0E4b6AsZNsSlt2Nr2LftB9qMZ+8ebhL6 +6i0UR4u4gnjd9tx6XhJG0GWVRmf3wsx59QA5ARLuYyepH+zdC1kKP3jHhEko +qzJwvvH6Xvhnf9IsQJqEFs9qc2cIe6Gx7kpZrDYJV27Jpm/Y5AKmFxqSyh1I +uG5K6VW+izMQHXP2izuTUO2FTmMb3Rl+KUZrhrmQkNKwXmy9kjPk1lu20t1I +uHopPKnnmxOw/+hdbfMloXfnW9nGM07Q7PjNf/gkCfOOFiQ25zvCNmXJnfy5 +JJwNNjo/JOIAFdPPFDzvkDAtldre99celJlB87V5JPR89jv2y2d7WMd4dcu3 +kIRntVok7Svsoelo7K/mChJaye63sXG0B3rdXGr4cxJOLgw9qcuyA5Lt65Ev +UySMKzjt+B5tIU8qgkn/TkKy4vGmRxq2IDammXD9Jwlrbv+WqhC3hbmQOEOz +eRLe9E6xHJnaDWWZEJe1SsLovgMBW27sBu2vD7QchMlIoHDKr1ncBZsiL4Y2 +kck44CRVMRFvA/XUuxw7KGT0XblaX3PQBnYtNF7tMyGjRuXK22qqDYT6/y6a +MCWj5z6PTJyyhlZX908CO8h401HKNtDGGnyNSYy97mTc85S4VUd2J+T/+iQ1 +F0fGaW77nz/fMYBevHz/dDwZBeYkh7VrGNB9SILEmUhGO96WoJQUBiwN79hF +vEbGfELL6NBuBrDe/NGYSUZLbrVARrslTBZemk4oJaOte0NDdJMFqHsZN24c +JKOW5XHTA6/M4bKi9dK5ITLOOfzh9Co3h7mPHoYjH8g4cU7lx/lUc2hwSSjM ++kzGQ3tCitTdzcF218dUiWkyyvs9uzj8axuEUWMCuNmMcGAqenBWZhu0Cr1W +mN5ohFw2o8HTF8xA69WYq9UmIzwok3AxI9AMriYspearG2HXe04Vnz1m4Mqp +LOCtbYQSW1cirdXM4PvyiaUPRkbIv9/mpUf7FhCfkO7psjJC1fJm6kWhLeDV +4BtdEWiEWTbHX0qXI8wcmQzZFmyE3QWPP5lnIITK+P335oQRyn0WPXYpBuHi +qaO2f04aIXfY7gtHnRFKKCfkTWKNUF/D245rFWC56lx98w0jfLXfPO3+XTpc +fZg1191shPdy461OE01A2k1+4mCLER7/V8FxcpYKdwVy3821GuGcvD2joIMK +1UfuNol3GuHR/OhrGRFUeK9RlOQyYIRfpPXE2r9QYNP9Gs2RKSO0nMtakXxi +DI3ZvZ4/xYzRZEu6jnAKGYZ3KLidkDRGXb7vx4OOk4Ft8ciev0RjNLLeKv/P +ngxbdnNac8gbY6xa2ESiKBla1lDIBHVjFC0s10m/ToIOj1vcpnRjZLvUFLHp +liEMKh8uTvI2RmaRMd9Spz787aq6L3bIGN986PfWKdcH6dNrb9/4zxh1yndm +XUzVh319Gal3AowxaHRgJd9dH4ZjXkVWhxsjN1Fo9fKcHnwZN7AbTjTGJsb+ +hD5FPZi7v7qgzTRGh/QMIf00HRh3NM++UGOMBtb21zTP6sDAuksWn+uMsYRw +iNfUTwfq3InpKY+NMWD+nU8t6sBZSUPKSpsx+h36oNPfpw2CcYdPtQ+x1vvE +rcs1bjNo+vSxebFTMHRs4clHYU2QFZPOb1hHQbZt1i4K0xog2OyxW5KTgqU2 +Cu+uPNeAWdkfOS94KairmNP875QG1L7hMdMTo6DP6p9Q9kl1sDDHmFVVCn7l +2XwwukMNDm4s5L6xk4JomPRBpEwVwp/tP6yyi4KLoupthMuqkOQl/KLMloL5 +nsFxNn6qUH83LOGFEwVzz/xLtVRVBVEViw0rByioc03rUuAtFWhRGRN1P0FB +S1MLvf1pG0F9k5y8yi0K0jL0SIqFSoCt3ZFlORTcq5R7puKSEjj6xn6i36Fg +ept7/tEAJTh3fzrXKZ+Cws81+t1ISjC0qX7jhXIKCvmpLCk8VYREtT0aU88p +2CixyXLNFwX4qX6NVPaDgjzHDrS8sZCHgQ7cJjJLwRyjp6KtuvLw2H/GLvg3 +BRP3PGzuJ8pDYpllIGmJgqPJ4h63B+VAncJWVLuWiqP/su45qcqBh+URhWZx +KhJuMgQqXshAr892vl4TKv4k98Y706Wgjvs30RCoODk9ecBKQgpyC3PVUkyp +mJ9h4HPsBxECvq+YO5tTkYODyOZ6mwj8IRVRQzZUtDXxjUjhJYJ5rMLCqAcV +5Rbek46NSUL1nb+ffsdRsWuzt5vsI3EgmQUvMOKpeKqUINSSIQ6Vn6b4si9R +0SfYoC7tlDiUyX4gM65SsfC0oGqDiTgUpT2+lHWTipaUn8VrG8UgOyHGeHsx +Fb0DHj3d8UIULgRvuJLWQ8UoI96oU2tEgEskLm+6j4pLGQ2DCuPCEFvKVr9l +gIqp/+K4p9qFIXrm5/jUEBWDfg5qzyQLwxnfXhPTcSrOjPQU3VEXhmOu6RNf +/1BRtCokpNxVCFy2KiFV1gQZZ57fc6jYACu9XALN8iaoJ+GsYnZ2A2R7zbxj +KJlgCuCT8F0bYDy2JsRlkwl2WRxmtkwLwLE2m4dheiZY/SLjYYuGAFy0PiVb +bW6CyqXNlYKVfFDr3LdscNQELUwvvzJY4oZ9X2vb6wNNkCYv+7SgixvYwrPT +tgab4MDl5yJu97jB/OZ/BvZhJmglbng4yoEbut+v8Qs6Z4J+I63XbldwwaTH +5nelqSZoad9AFT3DCVJHztdsfmyCT1xFbI9SOSBx1dswvskE71jFn9srxQHs +V81Lvzw1wZbES+bH/66DySqO/Ow2E8zj3XxFp34d1LJFpwn3mODDsdDqRlgH +LsmRIfNjJjh3k2zAb7MW0urCDBt4afh3fEBrMGEN8FnvKSUK0FBnJvAE97E1 +EDlspBUiSENOT2V7N6c14MvxR1lHjIb6QlfZziiuAbLNCdFcWRp6jwaej6pl +gzcjx2ZjdGl4K3+qc3JklS7G41e604mGXk1+pidnl+l3zE6H/9hDw6r5wtak +J8t0vdOJZtdcaTghwQxbuLxMt/5R0jdwgIZBBSNHqrSW6bFvfi8e9KPh+9gE ++2m/v/Q/uRFbwqNo2DFx4/ubxUX6IPVaT14hDV+ZTG4LYyzQfY/fybAspqHs +Zy+9boUF+nxxpddUCQ01veeV/Bfn6cKKAwu6VTQMoMiGH8mfp1txyUg/ekzD +mxotHWf45un1vXmePX00VD/sWpb8YY7OEKjWOjHAim+71z5TM0cf2N42L/mO +hutu1jJjrs/R52q/xe0fpmEtQTrVd+ccXStH58HXSRq+9jts9Kdxll4/aHoi +YZqGTmm9jzdnztIZonag/YOGUeV7jW+Fz9K9zx9/HfybhgVNm69qkmbpc49j +b0j8oWFzY3Cjhegs/exS6sHaJRqKHWs/kfnrF13QIF9z3woNn8xPuam//kXP +OlL7e3WVhg07JJW+P/xF/x+MOjOl + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lF8XAHAp2WVnxr5EtuwzzJg5R0qMouxJkWz1k4iytKCQIqlkKYRK +WZJ9bFGUkCRLJJWEJLQQEXnn/ev5fP84997nnnPuvQoeR2292NnY2ErWsLH9 +/zv/oe2pcvwdemORYPSJGWt6b5ZkmOnAWTA7IPUv300TUOyVh+TAVVA/J3jN +280ETuwq6F87kAtrl/b56brtAKEZiauL/WUQddFUrG2/K3ystz46198EoX2P +x/bt8wNz5cn3P/u7Ie5a/5cOp1Ow2E++/qN/BI6bMx1zTBOg2ezende5s6Co +uMPsMW8mSH+sGffQXIF+Qg60yt4FUT+3Ak6ztTgRlW7CKVEIV3XN66wduHBd +tk89l38JaL/bs53my4XPF+gfOEJLoCP6SI/GSS5sy3ZcWI4qgfUDyd+4criw +xOfu2rfXS+Dkmc9SzVNcqFutbGDxqAQ8X0SeIkdzY/TyzEk23lIgedXR5Mt5 +sCM4/86znFJ4m6bz+KcgPxYJHioTry+DGz2FG05s5Ee+gW19Os/KwEVA1W3J +mB9/HalXM+ssg6FzMv/YD/Lj6cnofbuGy2DYn8dEtJIfBaWEi/jWlcPE1lEm +aY8AOthb9vAwyuHPj9SHJ3M2YBj9fD9/VznUaIisrlZuwLgFrya1gXII9060 +jm7fgG6hGem04XJYfhc9nTC7AXnX93Ls/FEOkZ+rxV4pCmKr9txtHsEKiO68 +azccLIhiAetPr+6sgPg7Ea/YCUKo0Kn/42lzBTAMDgmLKQnhV4ng7bXtFcD1 +1NZBVUsIh/gW7917zYr/vPGdlakQNmfGRR7+WAGnFDvGkw8JId/G98eSlirA +P1vyn0qtELb5PI9x1a6E3RmlmlZ7hVHsemzV96uVIKh58+g+L2HkTp2IGk2r +hM666LKjR4XxV0Qv7XVWJTDeORklnxNGcnpEzNWCSthC/Gf2vlAY6Z0PLCqe +VIJBGmPv0WVhPBg8bBs8UwkSyZ8vXMsUwR/b24ljplUgqVEZ/SdPBIWT426c +Na8CYlNsxL4SEdxtdlqYYFUFsj/Ujqs2i6BBYsI3Hfsq2LgjwL1uQgT1tmeb +83lXgf66FdJnfVHUWLR7FRhXBQY3O3UtaKLofYP+NSuhCkh62ZoPzEXxhDfv +6tOkKqC4mymG7BFFO+dyueW0KjCtv8DPGyGKKXfegnh+FdgEi4/qtbPGe/17 +79LzKtjFO/EhtUcUvbrDvZgvqsA2t+bt8pAocp8kHDvyqgocu1xftXwXxd2v +v6U8fVMF+zRv17qIieFKaJac3FgV/DeqfeWsuxja1ds2xLAx4by9Jb17Xgwt +/jn4yeoxgVjRSWRfI45P9isNUwyZUCxiv6DLK47OeQ+MbYyY8KZ7f8kVOXFM +1eG57UZngvLuYMXdFuL4uts5SI7BhKadt9Z3pYsj6esDE2l3Jjg+UP68elsc +jYg3HzA9mDDJV9CoXSyOY4euEK28mCDUURF6uUkc5UjPZ/YcZoI7o33S+ps4 +bpqKL5IIZsKK+e/OlyYSeMnaYlo0lglJeeGFK+YS2F1D/KQTx5p/PVuc1m4J +3JuT823rRSbseMZjeslLAucy+XY4JDLhhpl8+Y5ECZxxXT0ikcKEzbfvXj6V +JoEBNDaruVTWetk1/IpyJdBkb87OtnQmfH1iuJGPKYGSTXEv9mYywQitUl98 +lMAEW51PineY0HGrK+jvVwk0dXJRfHKXtd5Vh10acxIoGyiR7nSPtZ8N7tzx +XJJ4S+mK9pEC1n6ZnDjJ0JXEtz93UqklTDic8dcpnCqJH/obD94sZf3f30iD +gm2SWNVd3T1bxvqfuvhpbhdJ5BfguHSpkglBxjlubWcl8ZLC1lLPWiYwsgXm +rBIksb/gtnFwHRMUOU/FdV6XRK9QSfHT9Uzo6nUs7bnPmi/veXd4AxPuU59u +cyyTRGnVjqqjjUyIyNUdHKhjxW8Mn9/3mLUfAXxrP3RK4puo2CSVJiZw9Iel +ug9IosD8sxm2ZiYM0b5ofP4kiarCgSW9LMfzNtlPzEmiY8k3L99nTJjIC8n7 +RSRgtjXlNbYyoZF/jHJcmYDDIxfPjrOcEmz7akGLgCPztvdi2piwbYvWn2Uk +IPehaLuSdiZI599IiGAQsI1P+CP1BRPmNnApsNsTsKPKbfwxy7nvRyw5fQjI +w8wJYHYwIWzrrg8XAgiYqdi1sOklE3YVPjrGF07AQ7V6a5NZ3iSswXn5HAFV +t08n/2F5NTTtptAlAt4DlYeOnax8fOTQSU4hYEjLevtilovNg56KZxPw7L3a +mFWWYx4MO6fnE7DQIcCc8YoJrqLW01LlBPSecE5LZFn/ZF1UVj0B7Qj3T3ew +zDOySVyhhYCvTJP/rO1iwohFSsHtVwRMcXbkNWS55uFaUHlLQOp3tWo3lpPE +A3vujxDwu/bONdEs+57+4KMxRcAPg2xfc1iGUavlB78J+MUsLrCGZXGrmiSd +VQKK7VLLbGd5ulRlYzkXETFI07+P5aeSyTWGwkS89GBo/C3LGRFrrKuliLgQ +d557gOWgcf8RykYi/hQ/PfCKZcbOoROPNhNxeHqD4xOWFSsseVnNiZkq16OL +WF4kMm81mRJRwsXT+wrLXVHKBtusiNia1b9ylOV7E1dan9sTcXOs1U4Lls/Y +rLoy9hMxiCjnRGTZscrvZ4cPEd+9K5cZZ+2PlsxgjE0gEbc2HLldyPK66O3E +7nAiVqmUTx5meWiyotg+moj9E1O/lVi+WH25f08qEf+MTB04x8rHAbmV/4ay +ifi7N+m5GstGsYfZ3AqIePny6FIbK79f7LapeT4i4l6pwN4FVn001JY9Gm8h +4nbmjYgYllMU5G0PdRGRUeTAzs/y1u9L4f6fidgseDKNm1VfYRbJ6k+miHh9 +XdLJKFY9FudoDYrMs+LVyKdnWfUqae9uXMMlhXmGLWPPWPW888HiBK+wFJ6J +CN2twvLZ9dfS9ktJ4ULN7rHI50yYqn62sHazFOYPKF9WbmGCgrDbPUeyFJa/ +W8w/wuoXx//+OOajFG7jKpovecqExzIaVdZ2UqjUFqytwuqva2eTgtNDpTA3 +8M7BF6x+bX2npjwVJYX3e91tx1n9vGzQ3EOPl0KHb62xfx8xwfvLb73RTCmM +jc5vF2X1P2XH3p+bm6WwOzOEY201qx7FVPyf8ktjsvfSua5iJkgcbZSRkJBG +KFu/mvSAdV62Or88JC+N/dU9E1ZFTKgKj9fcoC+N7GvIIqX5rHx8/DG5x1ka +z4ca8xuzzj+9/Dqf77nS2EdumjJNY4IPu4PEliJpXP/24LUC1vmasXemJblS +Gg8Pl/TwX2fCegEFFUqrNJa7bNV8eoUJg8diR6OnpdHnTcDFH6zzOspk9wGi +kQy+qzI5xDjFBIv9Wb/IW2Qwzm9kSD+cCQKR38457JDBDS9X1CRCWeM3x+Ql +uctgjruU24sgJlQzar+tvyCDSV833Jxk3R8/nJVOzL6VQR7DC1c4nZnADA/g +FBqVQe+gU/ZJDqx6zXiUtnlGBl08v2qI2DGBb9ip7hC7LCYoklQ5rZmg6pPA +Nqwui8p/NWrumzFh//HfFztOyiK7Gk9mnxYTNqZukZ6MkcWOq4L+azT+n+/L +DziTZHFpLixJdRMTwpfVurbckUXN8qkBD0UmXD+3X6ymQxYjzb6PXhdn3R9X +nt+6KyOHkvHxdj9XWPd/cXrFmUY5lMtQ00hvrYKt/Z0rM61yyGMyzmP3rAqs +2dZtd+uWQ0VBdW+upio4aOv/FsZY8bn/ZXjVVYH5SYWISA55fPhpvefkgyoI +kJu/baohj7u7Fs3kr1bBU59b080n5NF8dvmavVMV+P35GdnKr4BH/DWkM/oq +gRLoLT4urIDKMU4Zv7oqgWtysHCtpAJu2hP/YmtHJdx91/yGrqiAFNpFi6Gm +SvjQcF2zkqSAY2fCyQMPK8Emxnggx00Bv22bbuC8UAl6wlHaJ0sVkKSQp+1p +VAmLGoIftBwUMby5sp4roQJMCouyU1KUsCaiP+qvWDn8FGa4OzYp43+6k5k+ +N0phNMHd8RinCqYU3L9a0f8QLL+HWI6RVHGM87jH8v0imDrIFVQRsQm5dN6q +rd+Sz3r/S7Cfb1LD5DjuG8958kD4pUpiyXd1TCh9+1XF8DZIxz3cRSJp4vh5 +xsH8vdmQpmEsKOKjhb/fSD9ZeH8T2ommhrNXNuNj44Lbf5NTgSLdlKT9Rhu5 +OcR5N4ZcA4G1ucEHzuqgfUdXrZRMEshGyZnsUdHF/h/2oplLF4B7o2uV7XNd +JD64vfS4IxoOE4BR2KaLQCE+ka6LhnZ+xQ9rO3QxtlzheHR+NCTMf+Go7NLF +P2M+V0Nio0GgNchBYlAXX1KVCVMYDcL/xc+9m9LF7ML7/DzV50C6tFbPS1gP +FZTk1y8Un4XNNMLDkH16GLuOcPF0QySUKx36y+6uhyXmfuNHiiPBiKdme6KH +Hj4UNX99OCsStvQ7D9/x0cNB+Qyji2ciwTEwTag7UA+Pccml7YdIiLgrEawZ +q4edkxv7H8ZGQBe/uPGnYj38kuVa33D/NBz7INzMYNPHe2r0nQV64dDa4vqo +gF0fU/nFCerEcJB9mMfk4dDHp39PzdavCYf2CEpRO7c+9kn/yZd6HQaKCh7X +GSL6mLP700JdQBi8Pljqw1DRx5MJ1Okz5aGg89WGj7FDH0XCPmo/Mw+B77MJ +DpZp+ig401O7ITcYhgZyHDNv6OPNb4s23onB0P6oyulnhj7yW8vWdYQHw53z +w3vSc/Sx+r3/dKtdMLhIGez/WqCPi+mr1afXB8OzLe+8LzzSR1m/5Pwu/yC4 +eUUttG1EH60+djsMMo7Bdu2WG5ZaBhixi58zdHMAOK+3sO/SNsDV2SOb5GQC +4PD7Nn4nPQN8XBdm/IY3ABLjX0Z6kg3QyLt46Uv3UXjzpdc7wpQVn/Im+y3j +KHhmf9ardDDAt3d7866hP5wVWvNC/owBOmpxmT/f4gcNs9S/C50GqHfqeYx/ +pi/kdDA97F4boL+xz/uhc74QfVe/vbjHAE1dbMw8DvuCpZNGuteAASoXZS+U +kn2ht5ZI7vlkgC7h/voHe3xgMmrxWPGcAf4XFpT2T8AHxAWZk55EQ9yrYZd+ +L8ULFif0bB9LG+K2l9vkBiK8YOhJcY2UnCFWhpwrljnkBTlBeXHdSoao16tW +8IXqBZr911VQyxBLt7W4Hx/xhC1ZwR5SaIhDbg+MDut7gr+m3uBrL0M8+ys+ +xnrUA44vEJfcfA3xQv3lcOtODzjVtJY4c9gQ53vGv3pWe0C8c98engBDLBgM +nOpN8ID70aFvt4QbYrvrieONJA8YGWoYKE80xK+baPuKEw+A4yWr/utMQ6x5 +ENgfZO0O+5wNFpRqWeupzAuTo7qDp5KMRFm9IRLvqez+qOoOQTUzjp1PDJE0 +rOByc407JI1debO+wxDJcUKDHH5u0E4b6AsZNsSlt2Nr2LftB9qMZ+8ebhL6 +6i0UR4u4gnjd9tx6XhJG0GWVRmf3wsx59QA5ARLuYyepH+zdC1kKP3jHhEko +qzJwvvH6Xvhnf9IsQJqEFs9qc2cIe6Gx7kpZrDYJV27Jpm/Y5AKmFxqSyh1I +uG5K6VW+izMQHXP2izuTUO2FTmMb3Rl+KUZrhrmQkNKwXmy9kjPk1lu20t1I +uHopPKnnmxOw/+hdbfMloXfnW9nGM07Q7PjNf/gkCfOOFiQ25zvCNmXJnfy5 +JJwNNjo/JOIAFdPPFDzvkDAtldre99celJlB87V5JPR89jv2y2d7WMd4dcu3 +kIRntVok7Svsoelo7K/mChJaye63sXG0B3rdXGr4cxJOLgw9qcuyA5Lt65Ev +UySMKzjt+B5tIU8qgkn/TkKy4vGmRxq2IDammXD9Jwlrbv+WqhC3hbmQOEOz +eRLe9E6xHJnaDWWZEJe1SsLovgMBW27sBu2vD7QchMlIoHDKr1ncBZsiL4Y2 +kck44CRVMRFvA/XUuxw7KGT0XblaX3PQBnYtNF7tMyGjRuXK22qqDYT6/y6a +MCWj5z6PTJyyhlZX908CO8h401HKNtDGGnyNSYy97mTc85S4VUd2J+T/+iQ1 +F0fGaW77nz/fMYBevHz/dDwZBeYkh7VrGNB9SILEmUhGO96WoJQUBiwN79hF +vEbGfELL6NBuBrDe/NGYSUZLbrVARrslTBZemk4oJaOte0NDdJMFqHsZN24c +JKOW5XHTA6/M4bKi9dK5ITLOOfzh9Co3h7mPHoYjH8g4cU7lx/lUc2hwSSjM ++kzGQ3tCitTdzcF218dUiWkyyvs9uzj8axuEUWMCuNmMcGAqenBWZhu0Cr1W +mN5ohFw2o8HTF8xA69WYq9UmIzwok3AxI9AMriYspearG2HXe04Vnz1m4Mqp +LOCtbYQSW1cirdXM4PvyiaUPRkbIv9/mpUf7FhCfkO7psjJC1fJm6kWhLeDV +4BtdEWiEWTbHX0qXI8wcmQzZFmyE3QWPP5lnIITK+P335oQRyn0WPXYpBuHi +qaO2f04aIXfY7gtHnRFKKCfkTWKNUF/D245rFWC56lx98w0jfLXfPO3+XTpc +fZg1191shPdy461OE01A2k1+4mCLER7/V8FxcpYKdwVy3821GuGcvD2joIMK +1UfuNol3GuHR/OhrGRFUeK9RlOQyYIRfpPXE2r9QYNP9Gs2RKSO0nMtakXxi +DI3ZvZ4/xYzRZEu6jnAKGYZ3KLidkDRGXb7vx4OOk4Ft8ciev0RjNLLeKv/P +ngxbdnNac8gbY6xa2ESiKBla1lDIBHVjFC0s10m/ToIOj1vcpnRjZLvUFLHp +liEMKh8uTvI2RmaRMd9Spz787aq6L3bIGN986PfWKdcH6dNrb9/4zxh1yndm +XUzVh319Gal3AowxaHRgJd9dH4ZjXkVWhxsjN1Fo9fKcHnwZN7AbTjTGJsb+ +hD5FPZi7v7qgzTRGh/QMIf00HRh3NM++UGOMBtb21zTP6sDAuksWn+uMsYRw +iNfUTwfq3InpKY+NMWD+nU8t6sBZSUPKSpsx+h36oNPfpw2CcYdPtQ+x1vvE +rcs1bjNo+vSxebFTMHRs4clHYU2QFZPOb1hHQbZt1i4K0xog2OyxW5KTgqU2 +Cu+uPNeAWdkfOS94KairmNP875QG1L7hMdMTo6DP6p9Q9kl1sDDHmFVVCn7l +2XwwukMNDm4s5L6xk4JomPRBpEwVwp/tP6yyi4KLoupthMuqkOQl/KLMloL5 +nsFxNn6qUH83LOGFEwVzz/xLtVRVBVEViw0rByioc03rUuAtFWhRGRN1P0FB +S1MLvf1pG0F9k5y8yi0K0jL0SIqFSoCt3ZFlORTcq5R7puKSEjj6xn6i36Fg +ept7/tEAJTh3fzrXKZ+Cws81+t1ISjC0qX7jhXIKCvmpLCk8VYREtT0aU88p +2CixyXLNFwX4qX6NVPaDgjzHDrS8sZCHgQ7cJjJLwRyjp6KtuvLw2H/GLvg3 +BRP3PGzuJ8pDYpllIGmJgqPJ4h63B+VAncJWVLuWiqP/su45qcqBh+URhWZx +KhJuMgQqXshAr892vl4TKv4k98Y706Wgjvs30RCoODk9ecBKQgpyC3PVUkyp +mJ9h4HPsBxECvq+YO5tTkYODyOZ6mwj8IRVRQzZUtDXxjUjhJYJ5rMLCqAcV +5Rbek46NSUL1nb+ffsdRsWuzt5vsI3EgmQUvMOKpeKqUINSSIQ6Vn6b4si9R +0SfYoC7tlDiUyX4gM65SsfC0oGqDiTgUpT2+lHWTipaUn8VrG8UgOyHGeHsx +Fb0DHj3d8UIULgRvuJLWQ8UoI96oU2tEgEskLm+6j4pLGQ2DCuPCEFvKVr9l +gIqp/+K4p9qFIXrm5/jUEBWDfg5qzyQLwxnfXhPTcSrOjPQU3VEXhmOu6RNf +/1BRtCokpNxVCFy2KiFV1gQZZ57fc6jYACu9XALN8iaoJ+GsYnZ2A2R7zbxj +KJlgCuCT8F0bYDy2JsRlkwl2WRxmtkwLwLE2m4dheiZY/SLjYYuGAFy0PiVb +bW6CyqXNlYKVfFDr3LdscNQELUwvvzJY4oZ9X2vb6wNNkCYv+7SgixvYwrPT +tgab4MDl5yJu97jB/OZ/BvZhJmglbng4yoEbut+v8Qs6Z4J+I63XbldwwaTH +5nelqSZoad9AFT3DCVJHztdsfmyCT1xFbI9SOSBx1dswvskE71jFn9srxQHs +V81Lvzw1wZbES+bH/66DySqO/Ow2E8zj3XxFp34d1LJFpwn3mODDsdDqRlgH +LsmRIfNjJjh3k2zAb7MW0urCDBt4afh3fEBrMGEN8FnvKSUK0FBnJvAE97E1 +EDlspBUiSENOT2V7N6c14MvxR1lHjIb6QlfZziiuAbLNCdFcWRp6jwaej6pl +gzcjx2ZjdGl4K3+qc3JklS7G41e604mGXk1+pidnl+l3zE6H/9hDw6r5wtak +J8t0vdOJZtdcaTghwQxbuLxMt/5R0jdwgIZBBSNHqrSW6bFvfi8e9KPh+9gE ++2m/v/Q/uRFbwqNo2DFx4/ubxUX6IPVaT14hDV+ZTG4LYyzQfY/fybAspqHs +Zy+9boUF+nxxpddUCQ01veeV/Bfn6cKKAwu6VTQMoMiGH8mfp1txyUg/ekzD +mxotHWf45un1vXmePX00VD/sWpb8YY7OEKjWOjHAim+71z5TM0cf2N42L/mO +hutu1jJjrs/R52q/xe0fpmEtQTrVd+ccXStH58HXSRq+9jts9Kdxll4/aHoi +YZqGTmm9jzdnztIZonag/YOGUeV7jW+Fz9K9zx9/HfybhgVNm69qkmbpc49j +b0j8oWFzY3Cjhegs/exS6sHaJRqKHWs/kfnrF13QIF9z3woNn8xPuam//kXP +OlL7e3WVhg07JJW+P/xF/x+MOjOl + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09303056608466971}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09303056608466971}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lF8XAHAp2WVnxr5EtuwzzJg5R0qMouxJkWz1k4iytKCQIqlkKYRK +WZJ9bFGUkCRLJJWEJLQQEXnn/ev5fP84997nnnPuvQoeR2292NnY2ErWsLH9 +/zv/oe2pcvwdemORYPSJGWt6b5ZkmOnAWTA7IPUv300TUOyVh+TAVVA/J3jN +280ETuwq6F87kAtrl/b56brtAKEZiauL/WUQddFUrG2/K3ystz46198EoX2P +x/bt8wNz5cn3P/u7Ie5a/5cOp1Ow2E++/qN/BI6bMx1zTBOg2ezende5s6Co +uMPsMW8mSH+sGffQXIF+Qg60yt4FUT+3Ak6ztTgRlW7CKVEIV3XN66wduHBd +tk89l38JaL/bs53my4XPF+gfOEJLoCP6SI/GSS5sy3ZcWI4qgfUDyd+4criw +xOfu2rfXS+Dkmc9SzVNcqFutbGDxqAQ8X0SeIkdzY/TyzEk23lIgedXR5Mt5 +sCM4/86znFJ4m6bz+KcgPxYJHioTry+DGz2FG05s5Ee+gW19Os/KwEVA1W3J +mB9/HalXM+ssg6FzMv/YD/Lj6cnofbuGy2DYn8dEtJIfBaWEi/jWlcPE1lEm +aY8AOthb9vAwyuHPj9SHJ3M2YBj9fD9/VznUaIisrlZuwLgFrya1gXII9060 +jm7fgG6hGem04XJYfhc9nTC7AXnX93Ls/FEOkZ+rxV4pCmKr9txtHsEKiO68 +azccLIhiAetPr+6sgPg7Ea/YCUKo0Kn/42lzBTAMDgmLKQnhV4ng7bXtFcD1 +1NZBVUsIh/gW7917zYr/vPGdlakQNmfGRR7+WAGnFDvGkw8JId/G98eSlirA +P1vyn0qtELb5PI9x1a6E3RmlmlZ7hVHsemzV96uVIKh58+g+L2HkTp2IGk2r +hM666LKjR4XxV0Qv7XVWJTDeORklnxNGcnpEzNWCSthC/Gf2vlAY6Z0PLCqe +VIJBGmPv0WVhPBg8bBs8UwkSyZ8vXMsUwR/b24ljplUgqVEZ/SdPBIWT426c +Na8CYlNsxL4SEdxtdlqYYFUFsj/Ujqs2i6BBYsI3Hfsq2LgjwL1uQgT1tmeb +83lXgf66FdJnfVHUWLR7FRhXBQY3O3UtaKLofYP+NSuhCkh62ZoPzEXxhDfv +6tOkKqC4mymG7BFFO+dyueW0KjCtv8DPGyGKKXfegnh+FdgEi4/qtbPGe/17 +79LzKtjFO/EhtUcUvbrDvZgvqsA2t+bt8pAocp8kHDvyqgocu1xftXwXxd2v +v6U8fVMF+zRv17qIieFKaJac3FgV/DeqfeWsuxja1ds2xLAx4by9Jb17Xgwt +/jn4yeoxgVjRSWRfI45P9isNUwyZUCxiv6DLK47OeQ+MbYyY8KZ7f8kVOXFM +1eG57UZngvLuYMXdFuL4uts5SI7BhKadt9Z3pYsj6esDE2l3Jjg+UP68elsc +jYg3HzA9mDDJV9CoXSyOY4euEK28mCDUURF6uUkc5UjPZ/YcZoI7o33S+ps4 +bpqKL5IIZsKK+e/OlyYSeMnaYlo0lglJeeGFK+YS2F1D/KQTx5p/PVuc1m4J +3JuT823rRSbseMZjeslLAucy+XY4JDLhhpl8+Y5ECZxxXT0ikcKEzbfvXj6V +JoEBNDaruVTWetk1/IpyJdBkb87OtnQmfH1iuJGPKYGSTXEv9mYywQitUl98 +lMAEW51PineY0HGrK+jvVwk0dXJRfHKXtd5Vh10acxIoGyiR7nSPtZ8N7tzx +XJJ4S+mK9pEC1n6ZnDjJ0JXEtz93UqklTDic8dcpnCqJH/obD94sZf3f30iD +gm2SWNVd3T1bxvqfuvhpbhdJ5BfguHSpkglBxjlubWcl8ZLC1lLPWiYwsgXm +rBIksb/gtnFwHRMUOU/FdV6XRK9QSfHT9Uzo6nUs7bnPmi/veXd4AxPuU59u +cyyTRGnVjqqjjUyIyNUdHKhjxW8Mn9/3mLUfAXxrP3RK4puo2CSVJiZw9Iel +ug9IosD8sxm2ZiYM0b5ofP4kiarCgSW9LMfzNtlPzEmiY8k3L99nTJjIC8n7 +RSRgtjXlNbYyoZF/jHJcmYDDIxfPjrOcEmz7akGLgCPztvdi2piwbYvWn2Uk +IPehaLuSdiZI599IiGAQsI1P+CP1BRPmNnApsNsTsKPKbfwxy7nvRyw5fQjI +w8wJYHYwIWzrrg8XAgiYqdi1sOklE3YVPjrGF07AQ7V6a5NZ3iSswXn5HAFV +t08n/2F5NTTtptAlAt4DlYeOnax8fOTQSU4hYEjLevtilovNg56KZxPw7L3a +mFWWYx4MO6fnE7DQIcCc8YoJrqLW01LlBPSecE5LZFn/ZF1UVj0B7Qj3T3ew +zDOySVyhhYCvTJP/rO1iwohFSsHtVwRMcXbkNWS55uFaUHlLQOp3tWo3lpPE +A3vujxDwu/bONdEs+57+4KMxRcAPg2xfc1iGUavlB78J+MUsLrCGZXGrmiSd +VQKK7VLLbGd5ulRlYzkXETFI07+P5aeSyTWGwkS89GBo/C3LGRFrrKuliLgQ +d557gOWgcf8RykYi/hQ/PfCKZcbOoROPNhNxeHqD4xOWFSsseVnNiZkq16OL +WF4kMm81mRJRwsXT+wrLXVHKBtusiNia1b9ylOV7E1dan9sTcXOs1U4Lls/Y +rLoy9hMxiCjnRGTZscrvZ4cPEd+9K5cZZ+2PlsxgjE0gEbc2HLldyPK66O3E +7nAiVqmUTx5meWiyotg+moj9E1O/lVi+WH25f08qEf+MTB04x8rHAbmV/4ay +ifi7N+m5GstGsYfZ3AqIePny6FIbK79f7LapeT4i4l6pwN4FVn001JY9Gm8h +4nbmjYgYllMU5G0PdRGRUeTAzs/y1u9L4f6fidgseDKNm1VfYRbJ6k+miHh9 +XdLJKFY9FudoDYrMs+LVyKdnWfUqae9uXMMlhXmGLWPPWPW888HiBK+wFJ6J +CN2twvLZ9dfS9ktJ4ULN7rHI50yYqn62sHazFOYPKF9WbmGCgrDbPUeyFJa/ +W8w/wuoXx//+OOajFG7jKpovecqExzIaVdZ2UqjUFqytwuqva2eTgtNDpTA3 +8M7BF6x+bX2npjwVJYX3e91tx1n9vGzQ3EOPl0KHb62xfx8xwfvLb73RTCmM +jc5vF2X1P2XH3p+bm6WwOzOEY201qx7FVPyf8ktjsvfSua5iJkgcbZSRkJBG +KFu/mvSAdV62Or88JC+N/dU9E1ZFTKgKj9fcoC+N7GvIIqX5rHx8/DG5x1ka +z4ca8xuzzj+9/Dqf77nS2EdumjJNY4IPu4PEliJpXP/24LUC1vmasXemJblS +Gg8Pl/TwX2fCegEFFUqrNJa7bNV8eoUJg8diR6OnpdHnTcDFH6zzOspk9wGi +kQy+qzI5xDjFBIv9Wb/IW2Qwzm9kSD+cCQKR38457JDBDS9X1CRCWeM3x+Ql +uctgjruU24sgJlQzar+tvyCDSV833Jxk3R8/nJVOzL6VQR7DC1c4nZnADA/g +FBqVQe+gU/ZJDqx6zXiUtnlGBl08v2qI2DGBb9ip7hC7LCYoklQ5rZmg6pPA +Nqwui8p/NWrumzFh//HfFztOyiK7Gk9mnxYTNqZukZ6MkcWOq4L+azT+n+/L +DziTZHFpLixJdRMTwpfVurbckUXN8qkBD0UmXD+3X6ymQxYjzb6PXhdn3R9X +nt+6KyOHkvHxdj9XWPd/cXrFmUY5lMtQ00hvrYKt/Z0rM61yyGMyzmP3rAqs +2dZtd+uWQ0VBdW+upio4aOv/FsZY8bn/ZXjVVYH5SYWISA55fPhpvefkgyoI +kJu/baohj7u7Fs3kr1bBU59b080n5NF8dvmavVMV+P35GdnKr4BH/DWkM/oq +gRLoLT4urIDKMU4Zv7oqgWtysHCtpAJu2hP/YmtHJdx91/yGrqiAFNpFi6Gm +SvjQcF2zkqSAY2fCyQMPK8Emxnggx00Bv22bbuC8UAl6wlHaJ0sVkKSQp+1p +VAmLGoIftBwUMby5sp4roQJMCouyU1KUsCaiP+qvWDn8FGa4OzYp43+6k5k+ +N0phNMHd8RinCqYU3L9a0f8QLL+HWI6RVHGM87jH8v0imDrIFVQRsQm5dN6q +rd+Sz3r/S7Cfb1LD5DjuG8958kD4pUpiyXd1TCh9+1XF8DZIxz3cRSJp4vh5 +xsH8vdmQpmEsKOKjhb/fSD9ZeH8T2ommhrNXNuNj44Lbf5NTgSLdlKT9Rhu5 +OcR5N4ZcA4G1ucEHzuqgfUdXrZRMEshGyZnsUdHF/h/2oplLF4B7o2uV7XNd +JD64vfS4IxoOE4BR2KaLQCE+ka6LhnZ+xQ9rO3QxtlzheHR+NCTMf+Go7NLF +P2M+V0Nio0GgNchBYlAXX1KVCVMYDcL/xc+9m9LF7ML7/DzV50C6tFbPS1gP +FZTk1y8Un4XNNMLDkH16GLuOcPF0QySUKx36y+6uhyXmfuNHiiPBiKdme6KH +Hj4UNX99OCsStvQ7D9/x0cNB+Qyji2ciwTEwTag7UA+Pccml7YdIiLgrEawZ +q4edkxv7H8ZGQBe/uPGnYj38kuVa33D/NBz7INzMYNPHe2r0nQV64dDa4vqo +gF0fU/nFCerEcJB9mMfk4dDHp39PzdavCYf2CEpRO7c+9kn/yZd6HQaKCh7X +GSL6mLP700JdQBi8Pljqw1DRx5MJ1Okz5aGg89WGj7FDH0XCPmo/Mw+B77MJ +DpZp+ig401O7ITcYhgZyHDNv6OPNb4s23onB0P6oyulnhj7yW8vWdYQHw53z +w3vSc/Sx+r3/dKtdMLhIGez/WqCPi+mr1afXB8OzLe+8LzzSR1m/5Pwu/yC4 +eUUttG1EH60+djsMMo7Bdu2WG5ZaBhixi58zdHMAOK+3sO/SNsDV2SOb5GQC +4PD7Nn4nPQN8XBdm/IY3ABLjX0Z6kg3QyLt46Uv3UXjzpdc7wpQVn/Im+y3j +KHhmf9ardDDAt3d7866hP5wVWvNC/owBOmpxmT/f4gcNs9S/C50GqHfqeYx/ +pi/kdDA97F4boL+xz/uhc74QfVe/vbjHAE1dbMw8DvuCpZNGuteAASoXZS+U +kn2ht5ZI7vlkgC7h/voHe3xgMmrxWPGcAf4XFpT2T8AHxAWZk55EQ9yrYZd+ +L8ULFif0bB9LG+K2l9vkBiK8YOhJcY2UnCFWhpwrljnkBTlBeXHdSoao16tW +8IXqBZr911VQyxBLt7W4Hx/xhC1ZwR5SaIhDbg+MDut7gr+m3uBrL0M8+ys+ +xnrUA44vEJfcfA3xQv3lcOtODzjVtJY4c9gQ53vGv3pWe0C8c98engBDLBgM +nOpN8ID70aFvt4QbYrvrieONJA8YGWoYKE80xK+baPuKEw+A4yWr/utMQ6x5 +ENgfZO0O+5wNFpRqWeupzAuTo7qDp5KMRFm9IRLvqez+qOoOQTUzjp1PDJE0 +rOByc407JI1debO+wxDJcUKDHH5u0E4b6AsZNsSlt2Nr2LftB9qMZ+8ebhL6 +6i0UR4u4gnjd9tx6XhJG0GWVRmf3wsx59QA5ARLuYyepH+zdC1kKP3jHhEko +qzJwvvH6Xvhnf9IsQJqEFs9qc2cIe6Gx7kpZrDYJV27Jpm/Y5AKmFxqSyh1I +uG5K6VW+izMQHXP2izuTUO2FTmMb3Rl+KUZrhrmQkNKwXmy9kjPk1lu20t1I +uHopPKnnmxOw/+hdbfMloXfnW9nGM07Q7PjNf/gkCfOOFiQ25zvCNmXJnfy5 +JJwNNjo/JOIAFdPPFDzvkDAtldre99celJlB87V5JPR89jv2y2d7WMd4dcu3 +kIRntVok7Svsoelo7K/mChJaye63sXG0B3rdXGr4cxJOLgw9qcuyA5Lt65Ev +UySMKzjt+B5tIU8qgkn/TkKy4vGmRxq2IDammXD9Jwlrbv+WqhC3hbmQOEOz +eRLe9E6xHJnaDWWZEJe1SsLovgMBW27sBu2vD7QchMlIoHDKr1ncBZsiL4Y2 +kck44CRVMRFvA/XUuxw7KGT0XblaX3PQBnYtNF7tMyGjRuXK22qqDYT6/y6a +MCWj5z6PTJyyhlZX908CO8h401HKNtDGGnyNSYy97mTc85S4VUd2J+T/+iQ1 +F0fGaW77nz/fMYBevHz/dDwZBeYkh7VrGNB9SILEmUhGO96WoJQUBiwN79hF +vEbGfELL6NBuBrDe/NGYSUZLbrVARrslTBZemk4oJaOte0NDdJMFqHsZN24c +JKOW5XHTA6/M4bKi9dK5ITLOOfzh9Co3h7mPHoYjH8g4cU7lx/lUc2hwSSjM ++kzGQ3tCitTdzcF218dUiWkyyvs9uzj8axuEUWMCuNmMcGAqenBWZhu0Cr1W +mN5ohFw2o8HTF8xA69WYq9UmIzwok3AxI9AMriYspearG2HXe04Vnz1m4Mqp +LOCtbYQSW1cirdXM4PvyiaUPRkbIv9/mpUf7FhCfkO7psjJC1fJm6kWhLeDV +4BtdEWiEWTbHX0qXI8wcmQzZFmyE3QWPP5lnIITK+P335oQRyn0WPXYpBuHi +qaO2f04aIXfY7gtHnRFKKCfkTWKNUF/D245rFWC56lx98w0jfLXfPO3+XTpc +fZg1191shPdy461OE01A2k1+4mCLER7/V8FxcpYKdwVy3821GuGcvD2joIMK +1UfuNol3GuHR/OhrGRFUeK9RlOQyYIRfpPXE2r9QYNP9Gs2RKSO0nMtakXxi +DI3ZvZ4/xYzRZEu6jnAKGYZ3KLidkDRGXb7vx4OOk4Ft8ciev0RjNLLeKv/P +ngxbdnNac8gbY6xa2ESiKBla1lDIBHVjFC0s10m/ToIOj1vcpnRjZLvUFLHp +liEMKh8uTvI2RmaRMd9Spz787aq6L3bIGN986PfWKdcH6dNrb9/4zxh1yndm +XUzVh319Gal3AowxaHRgJd9dH4ZjXkVWhxsjN1Fo9fKcHnwZN7AbTjTGJsb+ +hD5FPZi7v7qgzTRGh/QMIf00HRh3NM++UGOMBtb21zTP6sDAuksWn+uMsYRw +iNfUTwfq3InpKY+NMWD+nU8t6sBZSUPKSpsx+h36oNPfpw2CcYdPtQ+x1vvE +rcs1bjNo+vSxebFTMHRs4clHYU2QFZPOb1hHQbZt1i4K0xog2OyxW5KTgqU2 +Cu+uPNeAWdkfOS94KairmNP875QG1L7hMdMTo6DP6p9Q9kl1sDDHmFVVCn7l +2XwwukMNDm4s5L6xk4JomPRBpEwVwp/tP6yyi4KLoupthMuqkOQl/KLMloL5 +nsFxNn6qUH83LOGFEwVzz/xLtVRVBVEViw0rByioc03rUuAtFWhRGRN1P0FB +S1MLvf1pG0F9k5y8yi0K0jL0SIqFSoCt3ZFlORTcq5R7puKSEjj6xn6i36Fg +ept7/tEAJTh3fzrXKZ+Cws81+t1ISjC0qX7jhXIKCvmpLCk8VYREtT0aU88p +2CixyXLNFwX4qX6NVPaDgjzHDrS8sZCHgQ7cJjJLwRyjp6KtuvLw2H/GLvg3 +BRP3PGzuJ8pDYpllIGmJgqPJ4h63B+VAncJWVLuWiqP/su45qcqBh+URhWZx +KhJuMgQqXshAr892vl4TKv4k98Y706Wgjvs30RCoODk9ecBKQgpyC3PVUkyp +mJ9h4HPsBxECvq+YO5tTkYODyOZ6mwj8IRVRQzZUtDXxjUjhJYJ5rMLCqAcV +5Rbek46NSUL1nb+ffsdRsWuzt5vsI3EgmQUvMOKpeKqUINSSIQ6Vn6b4si9R +0SfYoC7tlDiUyX4gM65SsfC0oGqDiTgUpT2+lHWTipaUn8VrG8UgOyHGeHsx +Fb0DHj3d8UIULgRvuJLWQ8UoI96oU2tEgEskLm+6j4pLGQ2DCuPCEFvKVr9l +gIqp/+K4p9qFIXrm5/jUEBWDfg5qzyQLwxnfXhPTcSrOjPQU3VEXhmOu6RNf +/1BRtCokpNxVCFy2KiFV1gQZZ57fc6jYACu9XALN8iaoJ+GsYnZ2A2R7zbxj +KJlgCuCT8F0bYDy2JsRlkwl2WRxmtkwLwLE2m4dheiZY/SLjYYuGAFy0PiVb +bW6CyqXNlYKVfFDr3LdscNQELUwvvzJY4oZ9X2vb6wNNkCYv+7SgixvYwrPT +tgab4MDl5yJu97jB/OZ/BvZhJmglbng4yoEbut+v8Qs6Z4J+I63XbldwwaTH +5nelqSZoad9AFT3DCVJHztdsfmyCT1xFbI9SOSBx1dswvskE71jFn9srxQHs +V81Lvzw1wZbES+bH/66DySqO/Ow2E8zj3XxFp34d1LJFpwn3mODDsdDqRlgH +LsmRIfNjJjh3k2zAb7MW0urCDBt4afh3fEBrMGEN8FnvKSUK0FBnJvAE97E1 +EDlspBUiSENOT2V7N6c14MvxR1lHjIb6QlfZziiuAbLNCdFcWRp6jwaej6pl +gzcjx2ZjdGl4K3+qc3JklS7G41e604mGXk1+pidnl+l3zE6H/9hDw6r5wtak +J8t0vdOJZtdcaTghwQxbuLxMt/5R0jdwgIZBBSNHqrSW6bFvfi8e9KPh+9gE ++2m/v/Q/uRFbwqNo2DFx4/ubxUX6IPVaT14hDV+ZTG4LYyzQfY/fybAspqHs +Zy+9boUF+nxxpddUCQ01veeV/Bfn6cKKAwu6VTQMoMiGH8mfp1txyUg/ekzD +mxotHWf45un1vXmePX00VD/sWpb8YY7OEKjWOjHAim+71z5TM0cf2N42L/mO +hutu1jJjrs/R52q/xe0fpmEtQTrVd+ccXStH58HXSRq+9jts9Kdxll4/aHoi +YZqGTmm9jzdnztIZonag/YOGUeV7jW+Fz9K9zx9/HfybhgVNm69qkmbpc49j +b0j8oWFzY3Cjhegs/exS6sHaJRqKHWs/kfnrF13QIF9z3woNn8xPuam//kXP +OlL7e3WVhg07JJW+P/xF/x+MOjOl + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09303056608466971}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09303056608466971}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9938324864579144`*^9}, + CellLabel-> + "Out[140]=",ExpressionUUID->"f653229f-6115-4a1d-8e50-e938ccf7b3cd"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"4ad58a38-0776-\ -5240-aa41-ba7c8ff64fb9"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[141]:=",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lF8XAHAp2WVnxr5EtuwzzJg5R0qMouxJkWz1k4iytKCQIqlkKYRK +WZJ9bFGUkCRLJJWEJLQQEXnn/ev5fP84997nnnPuvQoeR2292NnY2ErWsLH9 +/zv/oe2pcvwdemORYPSJGWt6b5ZkmOnAWTA7IPUv300TUOyVh+TAVVA/J3jN +280ETuwq6F87kAtrl/b56brtAKEZiauL/WUQddFUrG2/K3ystz46198EoX2P +x/bt8wNz5cn3P/u7Ie5a/5cOp1Ow2E++/qN/BI6bMx1zTBOg2ezende5s6Co +uMPsMW8mSH+sGffQXIF+Qg60yt4FUT+3Ak6ztTgRlW7CKVEIV3XN66wduHBd +tk89l38JaL/bs53my4XPF+gfOEJLoCP6SI/GSS5sy3ZcWI4qgfUDyd+4criw +xOfu2rfXS+Dkmc9SzVNcqFutbGDxqAQ8X0SeIkdzY/TyzEk23lIgedXR5Mt5 +sCM4/86znFJ4m6bz+KcgPxYJHioTry+DGz2FG05s5Ee+gW19Os/KwEVA1W3J +mB9/HalXM+ssg6FzMv/YD/Lj6cnofbuGy2DYn8dEtJIfBaWEi/jWlcPE1lEm +aY8AOthb9vAwyuHPj9SHJ3M2YBj9fD9/VznUaIisrlZuwLgFrya1gXII9060 +jm7fgG6hGem04XJYfhc9nTC7AXnX93Ls/FEOkZ+rxV4pCmKr9txtHsEKiO68 +azccLIhiAetPr+6sgPg7Ea/YCUKo0Kn/42lzBTAMDgmLKQnhV4ng7bXtFcD1 +1NZBVUsIh/gW7917zYr/vPGdlakQNmfGRR7+WAGnFDvGkw8JId/G98eSlirA +P1vyn0qtELb5PI9x1a6E3RmlmlZ7hVHsemzV96uVIKh58+g+L2HkTp2IGk2r +hM666LKjR4XxV0Qv7XVWJTDeORklnxNGcnpEzNWCSthC/Gf2vlAY6Z0PLCqe +VIJBGmPv0WVhPBg8bBs8UwkSyZ8vXMsUwR/b24ljplUgqVEZ/SdPBIWT426c +Na8CYlNsxL4SEdxtdlqYYFUFsj/Ujqs2i6BBYsI3Hfsq2LgjwL1uQgT1tmeb +83lXgf66FdJnfVHUWLR7FRhXBQY3O3UtaKLofYP+NSuhCkh62ZoPzEXxhDfv +6tOkKqC4mymG7BFFO+dyueW0KjCtv8DPGyGKKXfegnh+FdgEi4/qtbPGe/17 +79LzKtjFO/EhtUcUvbrDvZgvqsA2t+bt8pAocp8kHDvyqgocu1xftXwXxd2v +v6U8fVMF+zRv17qIieFKaJac3FgV/DeqfeWsuxja1ds2xLAx4by9Jb17Xgwt +/jn4yeoxgVjRSWRfI45P9isNUwyZUCxiv6DLK47OeQ+MbYyY8KZ7f8kVOXFM +1eG57UZngvLuYMXdFuL4uts5SI7BhKadt9Z3pYsj6esDE2l3Jjg+UP68elsc +jYg3HzA9mDDJV9CoXSyOY4euEK28mCDUURF6uUkc5UjPZ/YcZoI7o33S+ps4 +bpqKL5IIZsKK+e/OlyYSeMnaYlo0lglJeeGFK+YS2F1D/KQTx5p/PVuc1m4J +3JuT823rRSbseMZjeslLAucy+XY4JDLhhpl8+Y5ECZxxXT0ikcKEzbfvXj6V +JoEBNDaruVTWetk1/IpyJdBkb87OtnQmfH1iuJGPKYGSTXEv9mYywQitUl98 +lMAEW51PineY0HGrK+jvVwk0dXJRfHKXtd5Vh10acxIoGyiR7nSPtZ8N7tzx +XJJ4S+mK9pEC1n6ZnDjJ0JXEtz93UqklTDic8dcpnCqJH/obD94sZf3f30iD +gm2SWNVd3T1bxvqfuvhpbhdJ5BfguHSpkglBxjlubWcl8ZLC1lLPWiYwsgXm +rBIksb/gtnFwHRMUOU/FdV6XRK9QSfHT9Uzo6nUs7bnPmi/veXd4AxPuU59u +cyyTRGnVjqqjjUyIyNUdHKhjxW8Mn9/3mLUfAXxrP3RK4puo2CSVJiZw9Iel +ug9IosD8sxm2ZiYM0b5ofP4kiarCgSW9LMfzNtlPzEmiY8k3L99nTJjIC8n7 +RSRgtjXlNbYyoZF/jHJcmYDDIxfPjrOcEmz7akGLgCPztvdi2piwbYvWn2Uk +IPehaLuSdiZI599IiGAQsI1P+CP1BRPmNnApsNsTsKPKbfwxy7nvRyw5fQjI +w8wJYHYwIWzrrg8XAgiYqdi1sOklE3YVPjrGF07AQ7V6a5NZ3iSswXn5HAFV +t08n/2F5NTTtptAlAt4DlYeOnax8fOTQSU4hYEjLevtilovNg56KZxPw7L3a +mFWWYx4MO6fnE7DQIcCc8YoJrqLW01LlBPSecE5LZFn/ZF1UVj0B7Qj3T3ew +zDOySVyhhYCvTJP/rO1iwohFSsHtVwRMcXbkNWS55uFaUHlLQOp3tWo3lpPE +A3vujxDwu/bONdEs+57+4KMxRcAPg2xfc1iGUavlB78J+MUsLrCGZXGrmiSd +VQKK7VLLbGd5ulRlYzkXETFI07+P5aeSyTWGwkS89GBo/C3LGRFrrKuliLgQ +d557gOWgcf8RykYi/hQ/PfCKZcbOoROPNhNxeHqD4xOWFSsseVnNiZkq16OL +WF4kMm81mRJRwsXT+wrLXVHKBtusiNia1b9ylOV7E1dan9sTcXOs1U4Lls/Y +rLoy9hMxiCjnRGTZscrvZ4cPEd+9K5cZZ+2PlsxgjE0gEbc2HLldyPK66O3E +7nAiVqmUTx5meWiyotg+moj9E1O/lVi+WH25f08qEf+MTB04x8rHAbmV/4ay +ifi7N+m5GstGsYfZ3AqIePny6FIbK79f7LapeT4i4l6pwN4FVn001JY9Gm8h +4nbmjYgYllMU5G0PdRGRUeTAzs/y1u9L4f6fidgseDKNm1VfYRbJ6k+miHh9 +XdLJKFY9FudoDYrMs+LVyKdnWfUqae9uXMMlhXmGLWPPWPW888HiBK+wFJ6J +CN2twvLZ9dfS9ktJ4ULN7rHI50yYqn62sHazFOYPKF9WbmGCgrDbPUeyFJa/ +W8w/wuoXx//+OOajFG7jKpovecqExzIaVdZ2UqjUFqytwuqva2eTgtNDpTA3 +8M7BF6x+bX2npjwVJYX3e91tx1n9vGzQ3EOPl0KHb62xfx8xwfvLb73RTCmM +jc5vF2X1P2XH3p+bm6WwOzOEY201qx7FVPyf8ktjsvfSua5iJkgcbZSRkJBG +KFu/mvSAdV62Or88JC+N/dU9E1ZFTKgKj9fcoC+N7GvIIqX5rHx8/DG5x1ka +z4ca8xuzzj+9/Dqf77nS2EdumjJNY4IPu4PEliJpXP/24LUC1vmasXemJblS +Gg8Pl/TwX2fCegEFFUqrNJa7bNV8eoUJg8diR6OnpdHnTcDFH6zzOspk9wGi +kQy+qzI5xDjFBIv9Wb/IW2Qwzm9kSD+cCQKR38457JDBDS9X1CRCWeM3x+Ql +uctgjruU24sgJlQzar+tvyCDSV833Jxk3R8/nJVOzL6VQR7DC1c4nZnADA/g +FBqVQe+gU/ZJDqx6zXiUtnlGBl08v2qI2DGBb9ip7hC7LCYoklQ5rZmg6pPA +Nqwui8p/NWrumzFh//HfFztOyiK7Gk9mnxYTNqZukZ6MkcWOq4L+azT+n+/L +DziTZHFpLixJdRMTwpfVurbckUXN8qkBD0UmXD+3X6ymQxYjzb6PXhdn3R9X +nt+6KyOHkvHxdj9XWPd/cXrFmUY5lMtQ00hvrYKt/Z0rM61yyGMyzmP3rAqs +2dZtd+uWQ0VBdW+upio4aOv/FsZY8bn/ZXjVVYH5SYWISA55fPhpvefkgyoI +kJu/baohj7u7Fs3kr1bBU59b080n5NF8dvmavVMV+P35GdnKr4BH/DWkM/oq +gRLoLT4urIDKMU4Zv7oqgWtysHCtpAJu2hP/YmtHJdx91/yGrqiAFNpFi6Gm +SvjQcF2zkqSAY2fCyQMPK8Emxnggx00Bv22bbuC8UAl6wlHaJ0sVkKSQp+1p +VAmLGoIftBwUMby5sp4roQJMCouyU1KUsCaiP+qvWDn8FGa4OzYp43+6k5k+ +N0phNMHd8RinCqYU3L9a0f8QLL+HWI6RVHGM87jH8v0imDrIFVQRsQm5dN6q +rd+Sz3r/S7Cfb1LD5DjuG8958kD4pUpiyXd1TCh9+1XF8DZIxz3cRSJp4vh5 +xsH8vdmQpmEsKOKjhb/fSD9ZeH8T2ommhrNXNuNj44Lbf5NTgSLdlKT9Rhu5 +OcR5N4ZcA4G1ucEHzuqgfUdXrZRMEshGyZnsUdHF/h/2oplLF4B7o2uV7XNd +JD64vfS4IxoOE4BR2KaLQCE+ka6LhnZ+xQ9rO3QxtlzheHR+NCTMf+Go7NLF +P2M+V0Nio0GgNchBYlAXX1KVCVMYDcL/xc+9m9LF7ML7/DzV50C6tFbPS1gP +FZTk1y8Un4XNNMLDkH16GLuOcPF0QySUKx36y+6uhyXmfuNHiiPBiKdme6KH +Hj4UNX99OCsStvQ7D9/x0cNB+Qyji2ciwTEwTag7UA+Pccml7YdIiLgrEawZ +q4edkxv7H8ZGQBe/uPGnYj38kuVa33D/NBz7INzMYNPHe2r0nQV64dDa4vqo +gF0fU/nFCerEcJB9mMfk4dDHp39PzdavCYf2CEpRO7c+9kn/yZd6HQaKCh7X +GSL6mLP700JdQBi8Pljqw1DRx5MJ1Okz5aGg89WGj7FDH0XCPmo/Mw+B77MJ +DpZp+ig401O7ITcYhgZyHDNv6OPNb4s23onB0P6oyulnhj7yW8vWdYQHw53z +w3vSc/Sx+r3/dKtdMLhIGez/WqCPi+mr1afXB8OzLe+8LzzSR1m/5Pwu/yC4 +eUUttG1EH60+djsMMo7Bdu2WG5ZaBhixi58zdHMAOK+3sO/SNsDV2SOb5GQC +4PD7Nn4nPQN8XBdm/IY3ABLjX0Z6kg3QyLt46Uv3UXjzpdc7wpQVn/Im+y3j +KHhmf9ardDDAt3d7866hP5wVWvNC/owBOmpxmT/f4gcNs9S/C50GqHfqeYx/ +pi/kdDA97F4boL+xz/uhc74QfVe/vbjHAE1dbMw8DvuCpZNGuteAASoXZS+U +kn2ht5ZI7vlkgC7h/voHe3xgMmrxWPGcAf4XFpT2T8AHxAWZk55EQ9yrYZd+ +L8ULFif0bB9LG+K2l9vkBiK8YOhJcY2UnCFWhpwrljnkBTlBeXHdSoao16tW +8IXqBZr911VQyxBLt7W4Hx/xhC1ZwR5SaIhDbg+MDut7gr+m3uBrL0M8+ys+ +xnrUA44vEJfcfA3xQv3lcOtODzjVtJY4c9gQ53vGv3pWe0C8c98engBDLBgM +nOpN8ID70aFvt4QbYrvrieONJA8YGWoYKE80xK+baPuKEw+A4yWr/utMQ6x5 +ENgfZO0O+5wNFpRqWeupzAuTo7qDp5KMRFm9IRLvqez+qOoOQTUzjp1PDJE0 +rOByc407JI1debO+wxDJcUKDHH5u0E4b6AsZNsSlt2Nr2LftB9qMZ+8ebhL6 +6i0UR4u4gnjd9tx6XhJG0GWVRmf3wsx59QA5ARLuYyepH+zdC1kKP3jHhEko +qzJwvvH6Xvhnf9IsQJqEFs9qc2cIe6Gx7kpZrDYJV27Jpm/Y5AKmFxqSyh1I +uG5K6VW+izMQHXP2izuTUO2FTmMb3Rl+KUZrhrmQkNKwXmy9kjPk1lu20t1I +uHopPKnnmxOw/+hdbfMloXfnW9nGM07Q7PjNf/gkCfOOFiQ25zvCNmXJnfy5 +JJwNNjo/JOIAFdPPFDzvkDAtldre99celJlB87V5JPR89jv2y2d7WMd4dcu3 +kIRntVok7Svsoelo7K/mChJaye63sXG0B3rdXGr4cxJOLgw9qcuyA5Lt65Ev +UySMKzjt+B5tIU8qgkn/TkKy4vGmRxq2IDammXD9Jwlrbv+WqhC3hbmQOEOz +eRLe9E6xHJnaDWWZEJe1SsLovgMBW27sBu2vD7QchMlIoHDKr1ncBZsiL4Y2 +kck44CRVMRFvA/XUuxw7KGT0XblaX3PQBnYtNF7tMyGjRuXK22qqDYT6/y6a +MCWj5z6PTJyyhlZX908CO8h401HKNtDGGnyNSYy97mTc85S4VUd2J+T/+iQ1 +F0fGaW77nz/fMYBevHz/dDwZBeYkh7VrGNB9SILEmUhGO96WoJQUBiwN79hF +vEbGfELL6NBuBrDe/NGYSUZLbrVARrslTBZemk4oJaOte0NDdJMFqHsZN24c +JKOW5XHTA6/M4bKi9dK5ITLOOfzh9Co3h7mPHoYjH8g4cU7lx/lUc2hwSSjM ++kzGQ3tCitTdzcF218dUiWkyyvs9uzj8axuEUWMCuNmMcGAqenBWZhu0Cr1W +mN5ohFw2o8HTF8xA69WYq9UmIzwok3AxI9AMriYspearG2HXe04Vnz1m4Mqp +LOCtbYQSW1cirdXM4PvyiaUPRkbIv9/mpUf7FhCfkO7psjJC1fJm6kWhLeDV +4BtdEWiEWTbHX0qXI8wcmQzZFmyE3QWPP5lnIITK+P335oQRyn0WPXYpBuHi +qaO2f04aIXfY7gtHnRFKKCfkTWKNUF/D245rFWC56lx98w0jfLXfPO3+XTpc +fZg1191shPdy461OE01A2k1+4mCLER7/V8FxcpYKdwVy3821GuGcvD2joIMK +1UfuNol3GuHR/OhrGRFUeK9RlOQyYIRfpPXE2r9QYNP9Gs2RKSO0nMtakXxi +DI3ZvZ4/xYzRZEu6jnAKGYZ3KLidkDRGXb7vx4OOk4Ft8ciev0RjNLLeKv/P +ngxbdnNac8gbY6xa2ESiKBla1lDIBHVjFC0s10m/ToIOj1vcpnRjZLvUFLHp +liEMKh8uTvI2RmaRMd9Spz787aq6L3bIGN986PfWKdcH6dNrb9/4zxh1yndm +XUzVh319Gal3AowxaHRgJd9dH4ZjXkVWhxsjN1Fo9fKcHnwZN7AbTjTGJsb+ +hD5FPZi7v7qgzTRGh/QMIf00HRh3NM++UGOMBtb21zTP6sDAuksWn+uMsYRw +iNfUTwfq3InpKY+NMWD+nU8t6sBZSUPKSpsx+h36oNPfpw2CcYdPtQ+x1vvE +rcs1bjNo+vSxebFTMHRs4clHYU2QFZPOb1hHQbZt1i4K0xog2OyxW5KTgqU2 +Cu+uPNeAWdkfOS94KairmNP875QG1L7hMdMTo6DP6p9Q9kl1sDDHmFVVCn7l +2XwwukMNDm4s5L6xk4JomPRBpEwVwp/tP6yyi4KLoupthMuqkOQl/KLMloL5 +nsFxNn6qUH83LOGFEwVzz/xLtVRVBVEViw0rByioc03rUuAtFWhRGRN1P0FB +S1MLvf1pG0F9k5y8yi0K0jL0SIqFSoCt3ZFlORTcq5R7puKSEjj6xn6i36Fg +ept7/tEAJTh3fzrXKZ+Cws81+t1ISjC0qX7jhXIKCvmpLCk8VYREtT0aU88p +2CixyXLNFwX4qX6NVPaDgjzHDrS8sZCHgQ7cJjJLwRyjp6KtuvLw2H/GLvg3 +BRP3PGzuJ8pDYpllIGmJgqPJ4h63B+VAncJWVLuWiqP/su45qcqBh+URhWZx +KhJuMgQqXshAr892vl4TKv4k98Y706Wgjvs30RCoODk9ecBKQgpyC3PVUkyp +mJ9h4HPsBxECvq+YO5tTkYODyOZ6mwj8IRVRQzZUtDXxjUjhJYJ5rMLCqAcV +5Rbek46NSUL1nb+ffsdRsWuzt5vsI3EgmQUvMOKpeKqUINSSIQ6Vn6b4si9R +0SfYoC7tlDiUyX4gM65SsfC0oGqDiTgUpT2+lHWTipaUn8VrG8UgOyHGeHsx +Fb0DHj3d8UIULgRvuJLWQ8UoI96oU2tEgEskLm+6j4pLGQ2DCuPCEFvKVr9l +gIqp/+K4p9qFIXrm5/jUEBWDfg5qzyQLwxnfXhPTcSrOjPQU3VEXhmOu6RNf +/1BRtCokpNxVCFy2KiFV1gQZZ57fc6jYACu9XALN8iaoJ+GsYnZ2A2R7zbxj +KJlgCuCT8F0bYDy2JsRlkwl2WRxmtkwLwLE2m4dheiZY/SLjYYuGAFy0PiVb +bW6CyqXNlYKVfFDr3LdscNQELUwvvzJY4oZ9X2vb6wNNkCYv+7SgixvYwrPT +tgab4MDl5yJu97jB/OZ/BvZhJmglbng4yoEbut+v8Qs6Z4J+I63XbldwwaTH +5nelqSZoad9AFT3DCVJHztdsfmyCT1xFbI9SOSBx1dswvskE71jFn9srxQHs +V81Lvzw1wZbES+bH/66DySqO/Ow2E8zj3XxFp34d1LJFpwn3mODDsdDqRlgH +LsmRIfNjJjh3k2zAb7MW0urCDBt4afh3fEBrMGEN8FnvKSUK0FBnJvAE97E1 +EDlspBUiSENOT2V7N6c14MvxR1lHjIb6QlfZziiuAbLNCdFcWRp6jwaej6pl +gzcjx2ZjdGl4K3+qc3JklS7G41e604mGXk1+pidnl+l3zE6H/9hDw6r5wtak +J8t0vdOJZtdcaTghwQxbuLxMt/5R0jdwgIZBBSNHqrSW6bFvfi8e9KPh+9gE ++2m/v/Q/uRFbwqNo2DFx4/ubxUX6IPVaT14hDV+ZTG4LYyzQfY/fybAspqHs +Zy+9boUF+nxxpddUCQ01veeV/Bfn6cKKAwu6VTQMoMiGH8mfp1txyUg/ekzD +mxotHWf45un1vXmePX00VD/sWpb8YY7OEKjWOjHAim+71z5TM0cf2N42L/mO +hutu1jJjrs/R52q/xe0fpmEtQTrVd+ccXStH58HXSRq+9jts9Kdxll4/aHoi +YZqGTmm9jzdnztIZonag/YOGUeV7jW+Fz9K9zx9/HfybhgVNm69qkmbpc49j +b0j8oWFzY3Cjhegs/exS6sHaJRqKHWs/kfnrF13QIF9z3woNn8xPuam//kXP +OlL7e3WVhg07JJW+P/xF/x+MOjOl + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lF8XAHAp2WVnxr5EtuwzzJg5R0qMouxJkWz1k4iytKCQIqlkKYRK +WZJ9bFGUkCRLJJWEJLQQEXnn/ev5fP84997nnnPuvQoeR2292NnY2ErWsLH9 +/zv/oe2pcvwdemORYPSJGWt6b5ZkmOnAWTA7IPUv300TUOyVh+TAVVA/J3jN +280ETuwq6F87kAtrl/b56brtAKEZiauL/WUQddFUrG2/K3ystz46198EoX2P +x/bt8wNz5cn3P/u7Ie5a/5cOp1Ow2E++/qN/BI6bMx1zTBOg2ezende5s6Co +uMPsMW8mSH+sGffQXIF+Qg60yt4FUT+3Ak6ztTgRlW7CKVEIV3XN66wduHBd +tk89l38JaL/bs53my4XPF+gfOEJLoCP6SI/GSS5sy3ZcWI4qgfUDyd+4criw +xOfu2rfXS+Dkmc9SzVNcqFutbGDxqAQ8X0SeIkdzY/TyzEk23lIgedXR5Mt5 +sCM4/86znFJ4m6bz+KcgPxYJHioTry+DGz2FG05s5Ee+gW19Os/KwEVA1W3J +mB9/HalXM+ssg6FzMv/YD/Lj6cnofbuGy2DYn8dEtJIfBaWEi/jWlcPE1lEm +aY8AOthb9vAwyuHPj9SHJ3M2YBj9fD9/VznUaIisrlZuwLgFrya1gXII9060 +jm7fgG6hGem04XJYfhc9nTC7AXnX93Ls/FEOkZ+rxV4pCmKr9txtHsEKiO68 +azccLIhiAetPr+6sgPg7Ea/YCUKo0Kn/42lzBTAMDgmLKQnhV4ng7bXtFcD1 +1NZBVUsIh/gW7917zYr/vPGdlakQNmfGRR7+WAGnFDvGkw8JId/G98eSlirA +P1vyn0qtELb5PI9x1a6E3RmlmlZ7hVHsemzV96uVIKh58+g+L2HkTp2IGk2r +hM666LKjR4XxV0Qv7XVWJTDeORklnxNGcnpEzNWCSthC/Gf2vlAY6Z0PLCqe +VIJBGmPv0WVhPBg8bBs8UwkSyZ8vXMsUwR/b24ljplUgqVEZ/SdPBIWT426c +Na8CYlNsxL4SEdxtdlqYYFUFsj/Ujqs2i6BBYsI3Hfsq2LgjwL1uQgT1tmeb +83lXgf66FdJnfVHUWLR7FRhXBQY3O3UtaKLofYP+NSuhCkh62ZoPzEXxhDfv +6tOkKqC4mymG7BFFO+dyueW0KjCtv8DPGyGKKXfegnh+FdgEi4/qtbPGe/17 +79LzKtjFO/EhtUcUvbrDvZgvqsA2t+bt8pAocp8kHDvyqgocu1xftXwXxd2v +v6U8fVMF+zRv17qIieFKaJac3FgV/DeqfeWsuxja1ds2xLAx4by9Jb17Xgwt +/jn4yeoxgVjRSWRfI45P9isNUwyZUCxiv6DLK47OeQ+MbYyY8KZ7f8kVOXFM +1eG57UZngvLuYMXdFuL4uts5SI7BhKadt9Z3pYsj6esDE2l3Jjg+UP68elsc +jYg3HzA9mDDJV9CoXSyOY4euEK28mCDUURF6uUkc5UjPZ/YcZoI7o33S+ps4 +bpqKL5IIZsKK+e/OlyYSeMnaYlo0lglJeeGFK+YS2F1D/KQTx5p/PVuc1m4J +3JuT823rRSbseMZjeslLAucy+XY4JDLhhpl8+Y5ECZxxXT0ikcKEzbfvXj6V +JoEBNDaruVTWetk1/IpyJdBkb87OtnQmfH1iuJGPKYGSTXEv9mYywQitUl98 +lMAEW51PineY0HGrK+jvVwk0dXJRfHKXtd5Vh10acxIoGyiR7nSPtZ8N7tzx +XJJ4S+mK9pEC1n6ZnDjJ0JXEtz93UqklTDic8dcpnCqJH/obD94sZf3f30iD +gm2SWNVd3T1bxvqfuvhpbhdJ5BfguHSpkglBxjlubWcl8ZLC1lLPWiYwsgXm +rBIksb/gtnFwHRMUOU/FdV6XRK9QSfHT9Uzo6nUs7bnPmi/veXd4AxPuU59u +cyyTRGnVjqqjjUyIyNUdHKhjxW8Mn9/3mLUfAXxrP3RK4puo2CSVJiZw9Iel +ug9IosD8sxm2ZiYM0b5ofP4kiarCgSW9LMfzNtlPzEmiY8k3L99nTJjIC8n7 +RSRgtjXlNbYyoZF/jHJcmYDDIxfPjrOcEmz7akGLgCPztvdi2piwbYvWn2Uk +IPehaLuSdiZI599IiGAQsI1P+CP1BRPmNnApsNsTsKPKbfwxy7nvRyw5fQjI +w8wJYHYwIWzrrg8XAgiYqdi1sOklE3YVPjrGF07AQ7V6a5NZ3iSswXn5HAFV +t08n/2F5NTTtptAlAt4DlYeOnax8fOTQSU4hYEjLevtilovNg56KZxPw7L3a +mFWWYx4MO6fnE7DQIcCc8YoJrqLW01LlBPSecE5LZFn/ZF1UVj0B7Qj3T3ew +zDOySVyhhYCvTJP/rO1iwohFSsHtVwRMcXbkNWS55uFaUHlLQOp3tWo3lpPE +A3vujxDwu/bONdEs+57+4KMxRcAPg2xfc1iGUavlB78J+MUsLrCGZXGrmiSd +VQKK7VLLbGd5ulRlYzkXETFI07+P5aeSyTWGwkS89GBo/C3LGRFrrKuliLgQ +d557gOWgcf8RykYi/hQ/PfCKZcbOoROPNhNxeHqD4xOWFSsseVnNiZkq16OL +WF4kMm81mRJRwsXT+wrLXVHKBtusiNia1b9ylOV7E1dan9sTcXOs1U4Lls/Y +rLoy9hMxiCjnRGTZscrvZ4cPEd+9K5cZZ+2PlsxgjE0gEbc2HLldyPK66O3E +7nAiVqmUTx5meWiyotg+moj9E1O/lVi+WH25f08qEf+MTB04x8rHAbmV/4ay +ifi7N+m5GstGsYfZ3AqIePny6FIbK79f7LapeT4i4l6pwN4FVn001JY9Gm8h +4nbmjYgYllMU5G0PdRGRUeTAzs/y1u9L4f6fidgseDKNm1VfYRbJ6k+miHh9 +XdLJKFY9FudoDYrMs+LVyKdnWfUqae9uXMMlhXmGLWPPWPW888HiBK+wFJ6J +CN2twvLZ9dfS9ktJ4ULN7rHI50yYqn62sHazFOYPKF9WbmGCgrDbPUeyFJa/ +W8w/wuoXx//+OOajFG7jKpovecqExzIaVdZ2UqjUFqytwuqva2eTgtNDpTA3 +8M7BF6x+bX2npjwVJYX3e91tx1n9vGzQ3EOPl0KHb62xfx8xwfvLb73RTCmM +jc5vF2X1P2XH3p+bm6WwOzOEY201qx7FVPyf8ktjsvfSua5iJkgcbZSRkJBG +KFu/mvSAdV62Or88JC+N/dU9E1ZFTKgKj9fcoC+N7GvIIqX5rHx8/DG5x1ka +z4ca8xuzzj+9/Dqf77nS2EdumjJNY4IPu4PEliJpXP/24LUC1vmasXemJblS +Gg8Pl/TwX2fCegEFFUqrNJa7bNV8eoUJg8diR6OnpdHnTcDFH6zzOspk9wGi +kQy+qzI5xDjFBIv9Wb/IW2Qwzm9kSD+cCQKR38457JDBDS9X1CRCWeM3x+Ql +uctgjruU24sgJlQzar+tvyCDSV833Jxk3R8/nJVOzL6VQR7DC1c4nZnADA/g +FBqVQe+gU/ZJDqx6zXiUtnlGBl08v2qI2DGBb9ip7hC7LCYoklQ5rZmg6pPA +Nqwui8p/NWrumzFh//HfFztOyiK7Gk9mnxYTNqZukZ6MkcWOq4L+azT+n+/L +DziTZHFpLixJdRMTwpfVurbckUXN8qkBD0UmXD+3X6ymQxYjzb6PXhdn3R9X +nt+6KyOHkvHxdj9XWPd/cXrFmUY5lMtQ00hvrYKt/Z0rM61yyGMyzmP3rAqs +2dZtd+uWQ0VBdW+upio4aOv/FsZY8bn/ZXjVVYH5SYWISA55fPhpvefkgyoI +kJu/baohj7u7Fs3kr1bBU59b080n5NF8dvmavVMV+P35GdnKr4BH/DWkM/oq +gRLoLT4urIDKMU4Zv7oqgWtysHCtpAJu2hP/YmtHJdx91/yGrqiAFNpFi6Gm +SvjQcF2zkqSAY2fCyQMPK8Emxnggx00Bv22bbuC8UAl6wlHaJ0sVkKSQp+1p +VAmLGoIftBwUMby5sp4roQJMCouyU1KUsCaiP+qvWDn8FGa4OzYp43+6k5k+ +N0phNMHd8RinCqYU3L9a0f8QLL+HWI6RVHGM87jH8v0imDrIFVQRsQm5dN6q +rd+Sz3r/S7Cfb1LD5DjuG8958kD4pUpiyXd1TCh9+1XF8DZIxz3cRSJp4vh5 +xsH8vdmQpmEsKOKjhb/fSD9ZeH8T2ommhrNXNuNj44Lbf5NTgSLdlKT9Rhu5 +OcR5N4ZcA4G1ucEHzuqgfUdXrZRMEshGyZnsUdHF/h/2oplLF4B7o2uV7XNd +JD64vfS4IxoOE4BR2KaLQCE+ka6LhnZ+xQ9rO3QxtlzheHR+NCTMf+Go7NLF +P2M+V0Nio0GgNchBYlAXX1KVCVMYDcL/xc+9m9LF7ML7/DzV50C6tFbPS1gP +FZTk1y8Un4XNNMLDkH16GLuOcPF0QySUKx36y+6uhyXmfuNHiiPBiKdme6KH +Hj4UNX99OCsStvQ7D9/x0cNB+Qyji2ciwTEwTag7UA+Pccml7YdIiLgrEawZ +q4edkxv7H8ZGQBe/uPGnYj38kuVa33D/NBz7INzMYNPHe2r0nQV64dDa4vqo +gF0fU/nFCerEcJB9mMfk4dDHp39PzdavCYf2CEpRO7c+9kn/yZd6HQaKCh7X +GSL6mLP700JdQBi8Pljqw1DRx5MJ1Okz5aGg89WGj7FDH0XCPmo/Mw+B77MJ +DpZp+ig401O7ITcYhgZyHDNv6OPNb4s23onB0P6oyulnhj7yW8vWdYQHw53z +w3vSc/Sx+r3/dKtdMLhIGez/WqCPi+mr1afXB8OzLe+8LzzSR1m/5Pwu/yC4 +eUUttG1EH60+djsMMo7Bdu2WG5ZaBhixi58zdHMAOK+3sO/SNsDV2SOb5GQC +4PD7Nn4nPQN8XBdm/IY3ABLjX0Z6kg3QyLt46Uv3UXjzpdc7wpQVn/Im+y3j +KHhmf9ardDDAt3d7866hP5wVWvNC/owBOmpxmT/f4gcNs9S/C50GqHfqeYx/ +pi/kdDA97F4boL+xz/uhc74QfVe/vbjHAE1dbMw8DvuCpZNGuteAASoXZS+U +kn2ht5ZI7vlkgC7h/voHe3xgMmrxWPGcAf4XFpT2T8AHxAWZk55EQ9yrYZd+ +L8ULFif0bB9LG+K2l9vkBiK8YOhJcY2UnCFWhpwrljnkBTlBeXHdSoao16tW +8IXqBZr911VQyxBLt7W4Hx/xhC1ZwR5SaIhDbg+MDut7gr+m3uBrL0M8+ys+ +xnrUA44vEJfcfA3xQv3lcOtODzjVtJY4c9gQ53vGv3pWe0C8c98engBDLBgM +nOpN8ID70aFvt4QbYrvrieONJA8YGWoYKE80xK+baPuKEw+A4yWr/utMQ6x5 +ENgfZO0O+5wNFpRqWeupzAuTo7qDp5KMRFm9IRLvqez+qOoOQTUzjp1PDJE0 +rOByc407JI1debO+wxDJcUKDHH5u0E4b6AsZNsSlt2Nr2LftB9qMZ+8ebhL6 +6i0UR4u4gnjd9tx6XhJG0GWVRmf3wsx59QA5ARLuYyepH+zdC1kKP3jHhEko +qzJwvvH6Xvhnf9IsQJqEFs9qc2cIe6Gx7kpZrDYJV27Jpm/Y5AKmFxqSyh1I +uG5K6VW+izMQHXP2izuTUO2FTmMb3Rl+KUZrhrmQkNKwXmy9kjPk1lu20t1I +uHopPKnnmxOw/+hdbfMloXfnW9nGM07Q7PjNf/gkCfOOFiQ25zvCNmXJnfy5 +JJwNNjo/JOIAFdPPFDzvkDAtldre99celJlB87V5JPR89jv2y2d7WMd4dcu3 +kIRntVok7Svsoelo7K/mChJaye63sXG0B3rdXGr4cxJOLgw9qcuyA5Lt65Ev +UySMKzjt+B5tIU8qgkn/TkKy4vGmRxq2IDammXD9Jwlrbv+WqhC3hbmQOEOz +eRLe9E6xHJnaDWWZEJe1SsLovgMBW27sBu2vD7QchMlIoHDKr1ncBZsiL4Y2 +kck44CRVMRFvA/XUuxw7KGT0XblaX3PQBnYtNF7tMyGjRuXK22qqDYT6/y6a +MCWj5z6PTJyyhlZX908CO8h401HKNtDGGnyNSYy97mTc85S4VUd2J+T/+iQ1 +F0fGaW77nz/fMYBevHz/dDwZBeYkh7VrGNB9SILEmUhGO96WoJQUBiwN79hF +vEbGfELL6NBuBrDe/NGYSUZLbrVARrslTBZemk4oJaOte0NDdJMFqHsZN24c +JKOW5XHTA6/M4bKi9dK5ITLOOfzh9Co3h7mPHoYjH8g4cU7lx/lUc2hwSSjM ++kzGQ3tCitTdzcF218dUiWkyyvs9uzj8axuEUWMCuNmMcGAqenBWZhu0Cr1W +mN5ohFw2o8HTF8xA69WYq9UmIzwok3AxI9AMriYspearG2HXe04Vnz1m4Mqp +LOCtbYQSW1cirdXM4PvyiaUPRkbIv9/mpUf7FhCfkO7psjJC1fJm6kWhLeDV +4BtdEWiEWTbHX0qXI8wcmQzZFmyE3QWPP5lnIITK+P335oQRyn0WPXYpBuHi +qaO2f04aIXfY7gtHnRFKKCfkTWKNUF/D245rFWC56lx98w0jfLXfPO3+XTpc +fZg1191shPdy461OE01A2k1+4mCLER7/V8FxcpYKdwVy3821GuGcvD2joIMK +1UfuNol3GuHR/OhrGRFUeK9RlOQyYIRfpPXE2r9QYNP9Gs2RKSO0nMtakXxi +DI3ZvZ4/xYzRZEu6jnAKGYZ3KLidkDRGXb7vx4OOk4Ft8ciev0RjNLLeKv/P +ngxbdnNac8gbY6xa2ESiKBla1lDIBHVjFC0s10m/ToIOj1vcpnRjZLvUFLHp +liEMKh8uTvI2RmaRMd9Spz787aq6L3bIGN986PfWKdcH6dNrb9/4zxh1yndm +XUzVh319Gal3AowxaHRgJd9dH4ZjXkVWhxsjN1Fo9fKcHnwZN7AbTjTGJsb+ +hD5FPZi7v7qgzTRGh/QMIf00HRh3NM++UGOMBtb21zTP6sDAuksWn+uMsYRw +iNfUTwfq3InpKY+NMWD+nU8t6sBZSUPKSpsx+h36oNPfpw2CcYdPtQ+x1vvE +rcs1bjNo+vSxebFTMHRs4clHYU2QFZPOb1hHQbZt1i4K0xog2OyxW5KTgqU2 +Cu+uPNeAWdkfOS94KairmNP875QG1L7hMdMTo6DP6p9Q9kl1sDDHmFVVCn7l +2XwwukMNDm4s5L6xk4JomPRBpEwVwp/tP6yyi4KLoupthMuqkOQl/KLMloL5 +nsFxNn6qUH83LOGFEwVzz/xLtVRVBVEViw0rByioc03rUuAtFWhRGRN1P0FB +S1MLvf1pG0F9k5y8yi0K0jL0SIqFSoCt3ZFlORTcq5R7puKSEjj6xn6i36Fg +ept7/tEAJTh3fzrXKZ+Cws81+t1ISjC0qX7jhXIKCvmpLCk8VYREtT0aU88p +2CixyXLNFwX4qX6NVPaDgjzHDrS8sZCHgQ7cJjJLwRyjp6KtuvLw2H/GLvg3 +BRP3PGzuJ8pDYpllIGmJgqPJ4h63B+VAncJWVLuWiqP/su45qcqBh+URhWZx +KhJuMgQqXshAr892vl4TKv4k98Y706Wgjvs30RCoODk9ecBKQgpyC3PVUkyp +mJ9h4HPsBxECvq+YO5tTkYODyOZ6mwj8IRVRQzZUtDXxjUjhJYJ5rMLCqAcV +5Rbek46NSUL1nb+ffsdRsWuzt5vsI3EgmQUvMOKpeKqUINSSIQ6Vn6b4si9R +0SfYoC7tlDiUyX4gM65SsfC0oGqDiTgUpT2+lHWTipaUn8VrG8UgOyHGeHsx +Fb0DHj3d8UIULgRvuJLWQ8UoI96oU2tEgEskLm+6j4pLGQ2DCuPCEFvKVr9l +gIqp/+K4p9qFIXrm5/jUEBWDfg5qzyQLwxnfXhPTcSrOjPQU3VEXhmOu6RNf +/1BRtCokpNxVCFy2KiFV1gQZZ57fc6jYACu9XALN8iaoJ+GsYnZ2A2R7zbxj +KJlgCuCT8F0bYDy2JsRlkwl2WRxmtkwLwLE2m4dheiZY/SLjYYuGAFy0PiVb +bW6CyqXNlYKVfFDr3LdscNQELUwvvzJY4oZ9X2vb6wNNkCYv+7SgixvYwrPT +tgab4MDl5yJu97jB/OZ/BvZhJmglbng4yoEbut+v8Qs6Z4J+I63XbldwwaTH +5nelqSZoad9AFT3DCVJHztdsfmyCT1xFbI9SOSBx1dswvskE71jFn9srxQHs +V81Lvzw1wZbES+bH/66DySqO/Ow2E8zj3XxFp34d1LJFpwn3mODDsdDqRlgH +LsmRIfNjJjh3k2zAb7MW0urCDBt4afh3fEBrMGEN8FnvKSUK0FBnJvAE97E1 +EDlspBUiSENOT2V7N6c14MvxR1lHjIb6QlfZziiuAbLNCdFcWRp6jwaej6pl +gzcjx2ZjdGl4K3+qc3JklS7G41e604mGXk1+pidnl+l3zE6H/9hDw6r5wtak +J8t0vdOJZtdcaTghwQxbuLxMt/5R0jdwgIZBBSNHqrSW6bFvfi8e9KPh+9gE ++2m/v/Q/uRFbwqNo2DFx4/ubxUX6IPVaT14hDV+ZTG4LYyzQfY/fybAspqHs +Zy+9boUF+nxxpddUCQ01veeV/Bfn6cKKAwu6VTQMoMiGH8mfp1txyUg/ekzD +mxotHWf45un1vXmePX00VD/sWpb8YY7OEKjWOjHAim+71z5TM0cf2N42L/mO +hutu1jJjrs/R52q/xe0fpmEtQTrVd+ccXStH58HXSRq+9jts9Kdxll4/aHoi +YZqGTmm9jzdnztIZonag/YOGUeV7jW+Fz9K9zx9/HfybhgVNm69qkmbpc49j +b0j8oWFzY3Cjhegs/exS6sHaJRqKHWs/kfnrF13QIF9z3woNn8xPuam//kXP +OlL7e3WVhg07JJW+P/xF/x+MOjOl + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09303056608466971}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09303056608466971}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lF8XAHAp2WVnxr5EtuwzzJg5R0qMouxJkWz1k4iytKCQIqlkKYRK +WZJ9bFGUkCRLJJWEJLQQEXnn/ev5fP84997nnnPuvQoeR2292NnY2ErWsLH9 +/zv/oe2pcvwdemORYPSJGWt6b5ZkmOnAWTA7IPUv300TUOyVh+TAVVA/J3jN +280ETuwq6F87kAtrl/b56brtAKEZiauL/WUQddFUrG2/K3ystz46198EoX2P +x/bt8wNz5cn3P/u7Ie5a/5cOp1Ow2E++/qN/BI6bMx1zTBOg2ezende5s6Co +uMPsMW8mSH+sGffQXIF+Qg60yt4FUT+3Ak6ztTgRlW7CKVEIV3XN66wduHBd +tk89l38JaL/bs53my4XPF+gfOEJLoCP6SI/GSS5sy3ZcWI4qgfUDyd+4criw +xOfu2rfXS+Dkmc9SzVNcqFutbGDxqAQ8X0SeIkdzY/TyzEk23lIgedXR5Mt5 +sCM4/86znFJ4m6bz+KcgPxYJHioTry+DGz2FG05s5Ee+gW19Os/KwEVA1W3J +mB9/HalXM+ssg6FzMv/YD/Lj6cnofbuGy2DYn8dEtJIfBaWEi/jWlcPE1lEm +aY8AOthb9vAwyuHPj9SHJ3M2YBj9fD9/VznUaIisrlZuwLgFrya1gXII9060 +jm7fgG6hGem04XJYfhc9nTC7AXnX93Ls/FEOkZ+rxV4pCmKr9txtHsEKiO68 +azccLIhiAetPr+6sgPg7Ea/YCUKo0Kn/42lzBTAMDgmLKQnhV4ng7bXtFcD1 +1NZBVUsIh/gW7917zYr/vPGdlakQNmfGRR7+WAGnFDvGkw8JId/G98eSlirA +P1vyn0qtELb5PI9x1a6E3RmlmlZ7hVHsemzV96uVIKh58+g+L2HkTp2IGk2r +hM666LKjR4XxV0Qv7XVWJTDeORklnxNGcnpEzNWCSthC/Gf2vlAY6Z0PLCqe +VIJBGmPv0WVhPBg8bBs8UwkSyZ8vXMsUwR/b24ljplUgqVEZ/SdPBIWT426c +Na8CYlNsxL4SEdxtdlqYYFUFsj/Ujqs2i6BBYsI3Hfsq2LgjwL1uQgT1tmeb +83lXgf66FdJnfVHUWLR7FRhXBQY3O3UtaKLofYP+NSuhCkh62ZoPzEXxhDfv +6tOkKqC4mymG7BFFO+dyueW0KjCtv8DPGyGKKXfegnh+FdgEi4/qtbPGe/17 +79LzKtjFO/EhtUcUvbrDvZgvqsA2t+bt8pAocp8kHDvyqgocu1xftXwXxd2v +v6U8fVMF+zRv17qIieFKaJac3FgV/DeqfeWsuxja1ds2xLAx4by9Jb17Xgwt +/jn4yeoxgVjRSWRfI45P9isNUwyZUCxiv6DLK47OeQ+MbYyY8KZ7f8kVOXFM +1eG57UZngvLuYMXdFuL4uts5SI7BhKadt9Z3pYsj6esDE2l3Jjg+UP68elsc +jYg3HzA9mDDJV9CoXSyOY4euEK28mCDUURF6uUkc5UjPZ/YcZoI7o33S+ps4 +bpqKL5IIZsKK+e/OlyYSeMnaYlo0lglJeeGFK+YS2F1D/KQTx5p/PVuc1m4J +3JuT823rRSbseMZjeslLAucy+XY4JDLhhpl8+Y5ECZxxXT0ikcKEzbfvXj6V +JoEBNDaruVTWetk1/IpyJdBkb87OtnQmfH1iuJGPKYGSTXEv9mYywQitUl98 +lMAEW51PineY0HGrK+jvVwk0dXJRfHKXtd5Vh10acxIoGyiR7nSPtZ8N7tzx +XJJ4S+mK9pEC1n6ZnDjJ0JXEtz93UqklTDic8dcpnCqJH/obD94sZf3f30iD +gm2SWNVd3T1bxvqfuvhpbhdJ5BfguHSpkglBxjlubWcl8ZLC1lLPWiYwsgXm +rBIksb/gtnFwHRMUOU/FdV6XRK9QSfHT9Uzo6nUs7bnPmi/veXd4AxPuU59u +cyyTRGnVjqqjjUyIyNUdHKhjxW8Mn9/3mLUfAXxrP3RK4puo2CSVJiZw9Iel +ug9IosD8sxm2ZiYM0b5ofP4kiarCgSW9LMfzNtlPzEmiY8k3L99nTJjIC8n7 +RSRgtjXlNbYyoZF/jHJcmYDDIxfPjrOcEmz7akGLgCPztvdi2piwbYvWn2Uk +IPehaLuSdiZI599IiGAQsI1P+CP1BRPmNnApsNsTsKPKbfwxy7nvRyw5fQjI +w8wJYHYwIWzrrg8XAgiYqdi1sOklE3YVPjrGF07AQ7V6a5NZ3iSswXn5HAFV +t08n/2F5NTTtptAlAt4DlYeOnax8fOTQSU4hYEjLevtilovNg56KZxPw7L3a +mFWWYx4MO6fnE7DQIcCc8YoJrqLW01LlBPSecE5LZFn/ZF1UVj0B7Qj3T3ew +zDOySVyhhYCvTJP/rO1iwohFSsHtVwRMcXbkNWS55uFaUHlLQOp3tWo3lpPE +A3vujxDwu/bONdEs+57+4KMxRcAPg2xfc1iGUavlB78J+MUsLrCGZXGrmiSd +VQKK7VLLbGd5ulRlYzkXETFI07+P5aeSyTWGwkS89GBo/C3LGRFrrKuliLgQ +d557gOWgcf8RykYi/hQ/PfCKZcbOoROPNhNxeHqD4xOWFSsseVnNiZkq16OL +WF4kMm81mRJRwsXT+wrLXVHKBtusiNia1b9ylOV7E1dan9sTcXOs1U4Lls/Y +rLoy9hMxiCjnRGTZscrvZ4cPEd+9K5cZZ+2PlsxgjE0gEbc2HLldyPK66O3E +7nAiVqmUTx5meWiyotg+moj9E1O/lVi+WH25f08qEf+MTB04x8rHAbmV/4ay +ifi7N+m5GstGsYfZ3AqIePny6FIbK79f7LapeT4i4l6pwN4FVn001JY9Gm8h +4nbmjYgYllMU5G0PdRGRUeTAzs/y1u9L4f6fidgseDKNm1VfYRbJ6k+miHh9 +XdLJKFY9FudoDYrMs+LVyKdnWfUqae9uXMMlhXmGLWPPWPW888HiBK+wFJ6J +CN2twvLZ9dfS9ktJ4ULN7rHI50yYqn62sHazFOYPKF9WbmGCgrDbPUeyFJa/ +W8w/wuoXx//+OOajFG7jKpovecqExzIaVdZ2UqjUFqytwuqva2eTgtNDpTA3 +8M7BF6x+bX2npjwVJYX3e91tx1n9vGzQ3EOPl0KHb62xfx8xwfvLb73RTCmM +jc5vF2X1P2XH3p+bm6WwOzOEY201qx7FVPyf8ktjsvfSua5iJkgcbZSRkJBG +KFu/mvSAdV62Or88JC+N/dU9E1ZFTKgKj9fcoC+N7GvIIqX5rHx8/DG5x1ka +z4ca8xuzzj+9/Dqf77nS2EdumjJNY4IPu4PEliJpXP/24LUC1vmasXemJblS +Gg8Pl/TwX2fCegEFFUqrNJa7bNV8eoUJg8diR6OnpdHnTcDFH6zzOspk9wGi +kQy+qzI5xDjFBIv9Wb/IW2Qwzm9kSD+cCQKR38457JDBDS9X1CRCWeM3x+Ql +uctgjruU24sgJlQzar+tvyCDSV833Jxk3R8/nJVOzL6VQR7DC1c4nZnADA/g +FBqVQe+gU/ZJDqx6zXiUtnlGBl08v2qI2DGBb9ip7hC7LCYoklQ5rZmg6pPA +Nqwui8p/NWrumzFh//HfFztOyiK7Gk9mnxYTNqZukZ6MkcWOq4L+azT+n+/L +DziTZHFpLixJdRMTwpfVurbckUXN8qkBD0UmXD+3X6ymQxYjzb6PXhdn3R9X +nt+6KyOHkvHxdj9XWPd/cXrFmUY5lMtQ00hvrYKt/Z0rM61yyGMyzmP3rAqs +2dZtd+uWQ0VBdW+upio4aOv/FsZY8bn/ZXjVVYH5SYWISA55fPhpvefkgyoI +kJu/baohj7u7Fs3kr1bBU59b080n5NF8dvmavVMV+P35GdnKr4BH/DWkM/oq +gRLoLT4urIDKMU4Zv7oqgWtysHCtpAJu2hP/YmtHJdx91/yGrqiAFNpFi6Gm +SvjQcF2zkqSAY2fCyQMPK8Emxnggx00Bv22bbuC8UAl6wlHaJ0sVkKSQp+1p +VAmLGoIftBwUMby5sp4roQJMCouyU1KUsCaiP+qvWDn8FGa4OzYp43+6k5k+ +N0phNMHd8RinCqYU3L9a0f8QLL+HWI6RVHGM87jH8v0imDrIFVQRsQm5dN6q +rd+Sz3r/S7Cfb1LD5DjuG8958kD4pUpiyXd1TCh9+1XF8DZIxz3cRSJp4vh5 +xsH8vdmQpmEsKOKjhb/fSD9ZeH8T2ommhrNXNuNj44Lbf5NTgSLdlKT9Rhu5 +OcR5N4ZcA4G1ucEHzuqgfUdXrZRMEshGyZnsUdHF/h/2oplLF4B7o2uV7XNd +JD64vfS4IxoOE4BR2KaLQCE+ka6LhnZ+xQ9rO3QxtlzheHR+NCTMf+Go7NLF +P2M+V0Nio0GgNchBYlAXX1KVCVMYDcL/xc+9m9LF7ML7/DzV50C6tFbPS1gP +FZTk1y8Un4XNNMLDkH16GLuOcPF0QySUKx36y+6uhyXmfuNHiiPBiKdme6KH +Hj4UNX99OCsStvQ7D9/x0cNB+Qyji2ciwTEwTag7UA+Pccml7YdIiLgrEawZ +q4edkxv7H8ZGQBe/uPGnYj38kuVa33D/NBz7INzMYNPHe2r0nQV64dDa4vqo +gF0fU/nFCerEcJB9mMfk4dDHp39PzdavCYf2CEpRO7c+9kn/yZd6HQaKCh7X +GSL6mLP700JdQBi8Pljqw1DRx5MJ1Okz5aGg89WGj7FDH0XCPmo/Mw+B77MJ +DpZp+ig401O7ITcYhgZyHDNv6OPNb4s23onB0P6oyulnhj7yW8vWdYQHw53z +w3vSc/Sx+r3/dKtdMLhIGez/WqCPi+mr1afXB8OzLe+8LzzSR1m/5Pwu/yC4 +eUUttG1EH60+djsMMo7Bdu2WG5ZaBhixi58zdHMAOK+3sO/SNsDV2SOb5GQC +4PD7Nn4nPQN8XBdm/IY3ABLjX0Z6kg3QyLt46Uv3UXjzpdc7wpQVn/Im+y3j +KHhmf9ardDDAt3d7866hP5wVWvNC/owBOmpxmT/f4gcNs9S/C50GqHfqeYx/ +pi/kdDA97F4boL+xz/uhc74QfVe/vbjHAE1dbMw8DvuCpZNGuteAASoXZS+U +kn2ht5ZI7vlkgC7h/voHe3xgMmrxWPGcAf4XFpT2T8AHxAWZk55EQ9yrYZd+ +L8ULFif0bB9LG+K2l9vkBiK8YOhJcY2UnCFWhpwrljnkBTlBeXHdSoao16tW +8IXqBZr911VQyxBLt7W4Hx/xhC1ZwR5SaIhDbg+MDut7gr+m3uBrL0M8+ys+ +xnrUA44vEJfcfA3xQv3lcOtODzjVtJY4c9gQ53vGv3pWe0C8c98engBDLBgM +nOpN8ID70aFvt4QbYrvrieONJA8YGWoYKE80xK+baPuKEw+A4yWr/utMQ6x5 +ENgfZO0O+5wNFpRqWeupzAuTo7qDp5KMRFm9IRLvqez+qOoOQTUzjp1PDJE0 +rOByc407JI1debO+wxDJcUKDHH5u0E4b6AsZNsSlt2Nr2LftB9qMZ+8ebhL6 +6i0UR4u4gnjd9tx6XhJG0GWVRmf3wsx59QA5ARLuYyepH+zdC1kKP3jHhEko +qzJwvvH6Xvhnf9IsQJqEFs9qc2cIe6Gx7kpZrDYJV27Jpm/Y5AKmFxqSyh1I +uG5K6VW+izMQHXP2izuTUO2FTmMb3Rl+KUZrhrmQkNKwXmy9kjPk1lu20t1I +uHopPKnnmxOw/+hdbfMloXfnW9nGM07Q7PjNf/gkCfOOFiQ25zvCNmXJnfy5 +JJwNNjo/JOIAFdPPFDzvkDAtldre99celJlB87V5JPR89jv2y2d7WMd4dcu3 +kIRntVok7Svsoelo7K/mChJaye63sXG0B3rdXGr4cxJOLgw9qcuyA5Lt65Ev +UySMKzjt+B5tIU8qgkn/TkKy4vGmRxq2IDammXD9Jwlrbv+WqhC3hbmQOEOz +eRLe9E6xHJnaDWWZEJe1SsLovgMBW27sBu2vD7QchMlIoHDKr1ncBZsiL4Y2 +kck44CRVMRFvA/XUuxw7KGT0XblaX3PQBnYtNF7tMyGjRuXK22qqDYT6/y6a +MCWj5z6PTJyyhlZX908CO8h401HKNtDGGnyNSYy97mTc85S4VUd2J+T/+iQ1 +F0fGaW77nz/fMYBevHz/dDwZBeYkh7VrGNB9SILEmUhGO96WoJQUBiwN79hF +vEbGfELL6NBuBrDe/NGYSUZLbrVARrslTBZemk4oJaOte0NDdJMFqHsZN24c +JKOW5XHTA6/M4bKi9dK5ITLOOfzh9Co3h7mPHoYjH8g4cU7lx/lUc2hwSSjM ++kzGQ3tCitTdzcF218dUiWkyyvs9uzj8axuEUWMCuNmMcGAqenBWZhu0Cr1W +mN5ohFw2o8HTF8xA69WYq9UmIzwok3AxI9AMriYspearG2HXe04Vnz1m4Mqp +LOCtbYQSW1cirdXM4PvyiaUPRkbIv9/mpUf7FhCfkO7psjJC1fJm6kWhLeDV +4BtdEWiEWTbHX0qXI8wcmQzZFmyE3QWPP5lnIITK+P335oQRyn0WPXYpBuHi +qaO2f04aIXfY7gtHnRFKKCfkTWKNUF/D245rFWC56lx98w0jfLXfPO3+XTpc +fZg1191shPdy461OE01A2k1+4mCLER7/V8FxcpYKdwVy3821GuGcvD2joIMK +1UfuNol3GuHR/OhrGRFUeK9RlOQyYIRfpPXE2r9QYNP9Gs2RKSO0nMtakXxi +DI3ZvZ4/xYzRZEu6jnAKGYZ3KLidkDRGXb7vx4OOk4Ft8ciev0RjNLLeKv/P +ngxbdnNac8gbY6xa2ESiKBla1lDIBHVjFC0s10m/ToIOj1vcpnRjZLvUFLHp +liEMKh8uTvI2RmaRMd9Spz787aq6L3bIGN986PfWKdcH6dNrb9/4zxh1yndm +XUzVh319Gal3AowxaHRgJd9dH4ZjXkVWhxsjN1Fo9fKcHnwZN7AbTjTGJsb+ +hD5FPZi7v7qgzTRGh/QMIf00HRh3NM++UGOMBtb21zTP6sDAuksWn+uMsYRw +iNfUTwfq3InpKY+NMWD+nU8t6sBZSUPKSpsx+h36oNPfpw2CcYdPtQ+x1vvE +rcs1bjNo+vSxebFTMHRs4clHYU2QFZPOb1hHQbZt1i4K0xog2OyxW5KTgqU2 +Cu+uPNeAWdkfOS94KairmNP875QG1L7hMdMTo6DP6p9Q9kl1sDDHmFVVCn7l +2XwwukMNDm4s5L6xk4JomPRBpEwVwp/tP6yyi4KLoupthMuqkOQl/KLMloL5 +nsFxNn6qUH83LOGFEwVzz/xLtVRVBVEViw0rByioc03rUuAtFWhRGRN1P0FB +S1MLvf1pG0F9k5y8yi0K0jL0SIqFSoCt3ZFlORTcq5R7puKSEjj6xn6i36Fg +ept7/tEAJTh3fzrXKZ+Cws81+t1ISjC0qX7jhXIKCvmpLCk8VYREtT0aU88p +2CixyXLNFwX4qX6NVPaDgjzHDrS8sZCHgQ7cJjJLwRyjp6KtuvLw2H/GLvg3 +BRP3PGzuJ8pDYpllIGmJgqPJ4h63B+VAncJWVLuWiqP/su45qcqBh+URhWZx +KhJuMgQqXshAr892vl4TKv4k98Y706Wgjvs30RCoODk9ecBKQgpyC3PVUkyp +mJ9h4HPsBxECvq+YO5tTkYODyOZ6mwj8IRVRQzZUtDXxjUjhJYJ5rMLCqAcV +5Rbek46NSUL1nb+ffsdRsWuzt5vsI3EgmQUvMOKpeKqUINSSIQ6Vn6b4si9R +0SfYoC7tlDiUyX4gM65SsfC0oGqDiTgUpT2+lHWTipaUn8VrG8UgOyHGeHsx +Fb0DHj3d8UIULgRvuJLWQ8UoI96oU2tEgEskLm+6j4pLGQ2DCuPCEFvKVr9l +gIqp/+K4p9qFIXrm5/jUEBWDfg5qzyQLwxnfXhPTcSrOjPQU3VEXhmOu6RNf +/1BRtCokpNxVCFy2KiFV1gQZZ57fc6jYACu9XALN8iaoJ+GsYnZ2A2R7zbxj +KJlgCuCT8F0bYDy2JsRlkwl2WRxmtkwLwLE2m4dheiZY/SLjYYuGAFy0PiVb +bW6CyqXNlYKVfFDr3LdscNQELUwvvzJY4oZ9X2vb6wNNkCYv+7SgixvYwrPT +tgab4MDl5yJu97jB/OZ/BvZhJmglbng4yoEbut+v8Qs6Z4J+I63XbldwwaTH +5nelqSZoad9AFT3DCVJHztdsfmyCT1xFbI9SOSBx1dswvskE71jFn9srxQHs +V81Lvzw1wZbES+bH/66DySqO/Ow2E8zj3XxFp34d1LJFpwn3mODDsdDqRlgH +LsmRIfNjJjh3k2zAb7MW0urCDBt4afh3fEBrMGEN8FnvKSUK0FBnJvAE97E1 +EDlspBUiSENOT2V7N6c14MvxR1lHjIb6QlfZziiuAbLNCdFcWRp6jwaej6pl +gzcjx2ZjdGl4K3+qc3JklS7G41e604mGXk1+pidnl+l3zE6H/9hDw6r5wtak +J8t0vdOJZtdcaTghwQxbuLxMt/5R0jdwgIZBBSNHqrSW6bFvfi8e9KPh+9gE ++2m/v/Q/uRFbwqNo2DFx4/ubxUX6IPVaT14hDV+ZTG4LYyzQfY/fybAspqHs +Zy+9boUF+nxxpddUCQ01veeV/Bfn6cKKAwu6VTQMoMiGH8mfp1txyUg/ekzD +mxotHWf45un1vXmePX00VD/sWpb8YY7OEKjWOjHAim+71z5TM0cf2N42L/mO +hutu1jJjrs/R52q/xe0fpmEtQTrVd+ccXStH58HXSRq+9jts9Kdxll4/aHoi +YZqGTmm9jzdnztIZonag/YOGUeV7jW+Fz9K9zx9/HfybhgVNm69qkmbpc49j +b0j8oWFzY3Cjhegs/exS6sHaJRqKHWs/kfnrF13QIF9z3woNn8xPuam//kXP +OlL7e3WVhg07JJW+P/xF/x+MOjOl + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09303056608466971}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09303056608466971}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993832486511997*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"9ef7304b-39d8-4290-aad2-5c4f106a13df"] +}, Open ]], Cell[CellGroupData[{ @@ -7262,18 +16086,14 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], - -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[BoxData["2.0723613827429226`"], "Output", + CellChangeTimes->{3.993832564856659*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"10c1ede6-b4ff-4d04-a086-4def855eb77a"] }, Open ]], Cell[CellGroupData[{ @@ -7340,27 +16160,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850818889292*^9, - 3.9918508230677433`*^9}},ExpressionUUID->"d2148290-3e90-8347-bddd-\ -5dd8190b0268"], + CellChangeTimes->{{3.991850818889292*^9, 3.9918508230677433`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"905b237c-0e51-ab4b-895d-05994c6f1d5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.57311040009389`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 65, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832564894454*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"6ed43a62-5275-4375-bb60-904453bcd7f9"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ad8c79e-9570-a44d-b593-07aa87056e21"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.7613279886452796`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 66, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938325649000187`*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"2f85fe35-c51e-474e-9936-de756558c9c9"], -Cell[BoxData["0.576602516746911`"], "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.15234301221599`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 67, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832564905684*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"2a38670f-270f-45f3-a463-953a9dc9243e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 68, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832564910344*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"0adc65ba-cf22-466b-acab-13a0786d15dc"], + +Cell[BoxData["2.1980663616720206`"], "Output", + CellChangeTimes->{3.9938325739096193`*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"6b2b3ca2-d20c-4213-a921-43c0cc5b05ca"] }, Open ]], Cell[CellGroupData[{ @@ -7381,8 +16252,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7427,27 +16297,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850826380268*^9, - 3.991850829169306*^9}},ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-\ -98d71f8a8458"], + CellChangeTimes->{{3.991850826380268*^9, 3.991850829169306*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c516c31a-74b4-f24d-a16a-678221cde87e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.57311040009389`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 69, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938325739452133`*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"927b53de-ccf2-4640-9cf3-f6a794a4215f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"5c50b555-9ebe-f94d-801f-34634555f622"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.7613279886452796`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 70, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832573950663*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"0271f062-107a-4974-925e-5c8696988138"], -Cell[BoxData["3.32141991539404`"], "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.15234301221599`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 71, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832573956628*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"2a883aa1-9005-4c3e-8475-d00a50fc243a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 72, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832573961606*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"20a04baf-995d-42f3-911f-6c8f51284eb7"], + +Cell[BoxData["18.243894134825965`"], "Output", + CellChangeTimes->{3.993832582654415*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"777883da-8646-400c-94ea-d2733c061c97"] }, Open ]], Cell[CellGroupData[{ @@ -7468,8 +16389,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7514,27 +16434,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918508329145336`*^9, - 3.991850837197098*^9}},ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-\ -57c1fe1d0585"], + CellChangeTimes->{{3.9918508329145336`*^9, 3.991850837197098*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ca591cf-a5ce-ce41-8101-8edfca50e890"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.57311040009389`*^-94\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 73, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832582685225*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"70d53c4d-21eb-41e6-83ec-bc131ce0eafb"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cbafd11a-4be0-b541-81e4-e62191ae7695"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.7613279886452796`*^-95\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 74, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832582690714*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"9ee4bb02-c1ba-47e6-8842-96a37de3e35c"], -Cell[BoxData["18.419619005098298`"], "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.15234301221599`*^-96\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 75, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832582695909*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"857e457b-c4c6-4934-bf74-179bccc8b447"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 76, 25990553580667322573, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832582700315*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"caa860f6-299c-40ca-a380-dc6eca671d36"], + +Cell[BoxData["0.5072477986166322`"], "Output", + CellChangeTimes->{3.993832588136136*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"637255a4-608e-406f-bbda-bbb8e6d7657c"] }, Open ]], Cell[CellGroupData[{ @@ -7543,17 +16514,20 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918508397421246`*^9, - 3.9918508449867363`*^9}},ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-\ -1ca469b254bd"], + CellChangeTimes->{{3.9918508397421246`*^9, 3.9918508449867363`*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[BoxData["0.07371813161570438`"], "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[BoxData["0.72255671730589`"], "Output", + CellChangeTimes->{3.99383258816569*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"0826b55e-aa70-4e32-b0d8-03ce52e5a94f"] }, Open ]] }, -WindowSize->{718.5, 729.75}, -WindowMargins->{{Automatic, 0}, {Automatic, 0}}, +WindowSize->{714, 258}, +WindowMargins->{{-3, Automatic}, {Automatic, 15}}, CellContext->Notebook, -FrontEndVersion->"14.1 for Microsoft Windows (64-bit) (July 16, 2024)", +FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"370f2b53-61d0-7c4a-817b-bf9dca2c7a0a" ] @@ -7568,354 +16542,628 @@ CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ -Cell[554, 20, 149, 4, 28, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], -Cell[706, 26, 152, 3, 28, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], -Cell[861, 31, 147, 4, 28, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], -Cell[1011, 37, 154, 3, 28, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[1190, 44, 1273, 41, 113, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[2466, 87, 106, 0, 32, "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[576, 22, 449, 7, 53, "Input",ExpressionUUID->"4515b0e8-e357-490e-be9c-9756a709434b"], +Cell[1028, 31, 349, 5, 33, "Output",ExpressionUUID->"ea295e34-c85a-4fc8-b353-9461113098d0"] }, Open ]], Cell[CellGroupData[{ -Cell[2609, 92, 910, 31, 56, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[3522, 125, 106, 0, 32, "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[1414, 41, 197, 3, 29, "Input",ExpressionUUID->"5eddd9eb-2020-4688-9458-c40573484b3e"], +Cell[1614, 46, 351, 5, 33, "Output",ExpressionUUID->"28b16098-3c12-439b-9a41-3cd50b16a88d"] }, Open ]], Cell[CellGroupData[{ -Cell[3665, 130, 885, 30, 56, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[4553, 162, 106, 0, 32, "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[2002, 56, 221, 4, 29, "Input",ExpressionUUID->"3bb45146-2ade-4396-b535-b5f3b5da5d1b"], +Cell[2226, 62, 376, 6, 33, "Output",ExpressionUUID->"05b54474-68ed-45be-a4db-4677944f0ed1"] }, Open ]], Cell[CellGroupData[{ -Cell[4696, 167, 532, 18, 52, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[5231, 187, 101, 0, 32, "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[2639, 73, 175, 3, 29, "Input",ExpressionUUID->"54113ffc-093a-446e-b0f9-b56188c0c5f8"], +Cell[2817, 78, 349, 5, 33, "Output",ExpressionUUID->"bed22427-a87a-4c6c-a37d-706e7ccab01f"] }, Open ]], Cell[CellGroupData[{ -Cell[5369, 192, 625, 21, 52, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[5997, 215, 100, 0, 32, "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[3203, 88, 257, 7, 42, "Input",ExpressionUUID->"758a7d09-dbf4-481c-87ad-b9afbab5ef5a"], +Cell[3463, 97, 364, 5, 33, "Output",ExpressionUUID->"d6c4bc0b-caf3-4e1d-9056-4ca50ec403a5"] }, Open ]], Cell[CellGroupData[{ -Cell[6134, 220, 144, 4, 56, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[6281, 226, 101, 0, 32, "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[3864, 107, 131, 2, 29, "Input",ExpressionUUID->"ecb03e21-5e0f-4a03-a835-4356f006b058"], +Cell[3998, 111, 347, 5, 33, "Output",ExpressionUUID->"dd9d5ae6-4ae0-44fb-a203-c2427cb173b7"] }, Open ]], Cell[CellGroupData[{ -Cell[6419, 231, 144, 4, 55, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[6566, 237, 100, 0, 70, "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[4382, 121, 276, 6, 29, "Input",ExpressionUUID->"5380df21-fd1e-4f18-96d5-96519ef10b43"], +Cell[4661, 129, 362, 5, 33, "Output",ExpressionUUID->"ec4a7d61-f36c-439b-9e4c-aa141866eb9e"] }, Open ]], Cell[CellGroupData[{ -Cell[6703, 242, 155, 4, 70, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[6861, 248, 101, 0, 70, "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[5060, 139, 257, 7, 29, "Input",ExpressionUUID->"ab2b8dca-c16a-486e-99c5-ad6799c433b7"], +Cell[5320, 148, 357, 5, 33, "Output",ExpressionUUID->"a2e0dd49-0687-434e-a285-abc52387f6d0"] }, Open ]], Cell[CellGroupData[{ -Cell[6999, 253, 155, 4, 70, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[7157, 259, 101, 0, 70, "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[5714, 158, 223, 4, 29, "Input",ExpressionUUID->"bb4b1740-8a4c-4f4e-8f73-6fc24160f5eb"], +Cell[5940, 164, 328, 5, 33, "Output",ExpressionUUID->"7254eda2-d17c-48b2-adbd-ef57c0c18586"] }, Open ]], Cell[CellGroupData[{ -Cell[7295, 264, 6029, 184, 70, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[13327, 450, 102, 0, 70, "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[6305, 174, 228, 4, 29, "Input",ExpressionUUID->"bb33f4c2-e325-4b57-b056-6f91221314e1"], +Cell[6536, 180, 326, 5, 33, "Output",ExpressionUUID->"aee23a84-e4a2-42af-bab9-9070a2da1464"] }, Open ]], Cell[CellGroupData[{ -Cell[13466, 455, 342, 8, 70, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[13811, 465, 342, 6, 70, "Message",ExpressionUUID->"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], -Cell[14156, 473, 100, 0, 70, "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[6899, 190, 129, 2, 29, "Input",ExpressionUUID->"04c84a35-7bf3-4595-9e18-832b478b8037"], +Cell[7031, 194, 343, 5, 33, "Output",ExpressionUUID->"ad409d78-ab98-45c0-8343-54bd2f2fbe0e"] }, Open ]], Cell[CellGroupData[{ -Cell[14293, 478, 6096, 186, 70, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[20392, 666, 103, 0, 70, "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[7411, 204, 129, 2, 29, "Input",ExpressionUUID->"ce42a04e-3ddd-42dc-beee-1cad33b26728"], +Cell[7543, 208, 342, 5, 33, "Output",ExpressionUUID->"bb6518e3-3ef9-48b7-b07f-fcd103f34f5c"] }, Open ]], Cell[CellGroupData[{ -Cell[20532, 671, 342, 8, 70, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[20877, 681, 342, 6, 70, "Message",ExpressionUUID->"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], -Cell[21222, 689, 100, 0, 70, "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[7922, 218, 557, 19, 79, "Input",ExpressionUUID->"f727586e-e8c1-4e5a-a5af-6c5393d7d4a8"], +Cell[8482, 239, 366, 5, 33, "Output",ExpressionUUID->"b9fe7222-f98e-41e7-aef2-be9e79e8eab3"] }, Open ]], Cell[CellGroupData[{ -Cell[21359, 694, 2637, 87, 70, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[23999, 783, 101, 0, 70, "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[8885, 249, 557, 19, 79, "Input",ExpressionUUID->"6783de3e-2120-4aed-887c-aa8d3da8ec68"], +Cell[9445, 270, 370, 5, 33, "Output",ExpressionUUID->"db1cec1d-e97e-4418-8a41-47770684258a"] }, Open ]], Cell[CellGroupData[{ -Cell[24137, 788, 2577, 84, 70, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[26717, 874, 102, 0, 70, "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[9852, 280, 1492, 48, 79, "Input",ExpressionUUID->"ccdf9d30-6d27-4c99-b7aa-b743fc07a405"], +Cell[11347, 330, 360, 5, 33, "Output",ExpressionUUID->"34f78975-8fa4-4673-b07e-71cd5d4c93fc"] }, Open ]], Cell[CellGroupData[{ -Cell[26856, 879, 3686, 117, 70, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[30545, 998, 102, 0, 70, "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] -}, Open ]], -Cell[30662, 1001, 138, 3, 70, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], -Cell[CellGroupData[{ -Cell[30825, 1008, 2054, 59, 70, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], -Cell[32882, 1069, 342, 6, 70, "Message",ExpressionUUID->"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], -Cell[33227, 1077, 342, 6, 70, "Message",ExpressionUUID->"42c1a263-2456-664a-bb33-c5fe841cb412"], -Cell[33572, 1085, 100, 0, 70, "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[11744, 340, 1331, 44, 79, "Input",ExpressionUUID->"f02c88cb-6c61-40b0-b17c-ee98fcfb407f"], +Cell[13078, 386, 379, 6, 33, "Output",ExpressionUUID->"0b0b7dc4-60c2-48c3-b749-3356bf200de6"] }, Open ]], Cell[CellGroupData[{ -Cell[33709, 1090, 2049, 58, 70, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], -Cell[35761, 1150, 342, 6, 70, "Message",ExpressionUUID->"be4d7bfb-c18e-564a-93ce-3f42607886e7"], -Cell[36106, 1158, 342, 6, 70, "Message",ExpressionUUID->"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], -Cell[36451, 1166, 100, 0, 70, "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[13494, 397, 1331, 44, 79, "Input",ExpressionUUID->"b0c968ba-1162-4533-8b47-f6819663e943"], +Cell[14828, 443, 386, 6, 33, "Output",ExpressionUUID->"67587895-bd1e-4b39-92b6-ca926a1871f5"] }, Open ]], Cell[CellGroupData[{ -Cell[36588, 1171, 1938, 53, 70, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], -Cell[38529, 1226, 342, 6, 70, "Message",ExpressionUUID->"d3cb6fbc-3803-0541-80d1-8cab47341c44"], -Cell[38874, 1234, 342, 6, 70, "Message",ExpressionUUID->"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], -Cell[39219, 1242, 342, 6, 70, "Message",ExpressionUUID->"d8687e0f-2f42-0543-a749-78a1ff3c9572"], -Cell[39564, 1250, 407, 7, 70, "Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], -Cell[39974, 1259, 8018, 364, 70, 4231, 300, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], -Cell[47995, 1625, 191, 5, 70, "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-c578eb57eb6a"] +Cell[15251, 454, 1492, 48, 79, "Input",ExpressionUUID->"7877d18c-540e-4fb0-8737-f5e42c091c2d"], +Cell[16746, 504, 359, 5, 33, "Output",ExpressionUUID->"a579878c-e1a4-4386-bf7a-97231fec3ff9"] }, Open ]], Cell[CellGroupData[{ -Cell[48223, 1635, 2094, 60, 70, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], -Cell[50320, 1697, 342, 6, 70, "Message",ExpressionUUID->"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], -Cell[50665, 1705, 342, 6, 70, "Message",ExpressionUUID->"a2ecd22c-b766-5347-9e03-9d459620be75"], -Cell[51010, 1713, 342, 6, 70, "Message",ExpressionUUID->"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], -Cell[51355, 1721, 407, 7, 70, "Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], -Cell[51765, 1730, 8024, 353, 70, 4113, 287, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"06204099-db57-8e4e-bcc4-fa1ae37c0063"], -Cell[59792, 2085, 191, 5, 70, "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-04dec8739bf5"] -}, Open ]], -Cell[59998, 2093, 232, 6, 70, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], -Cell[60233, 2101, 209, 5, 70, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], -Cell[CellGroupData[{ -Cell[60467, 2110, 215, 7, 70, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[60685, 2119, 100, 0, 70, "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[17142, 514, 131, 2, 29, "Input",ExpressionUUID->"dee66d2c-e27d-4b28-b938-ccbb641e8c9d"], +Cell[17276, 518, 347, 5, 33, "Output",ExpressionUUID->"c923fb9b-8491-4d73-b08f-8761c5bdf676"] }, Open ]], Cell[CellGroupData[{ -Cell[60822, 2124, 1814, 53, 70, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], -Cell[62639, 2179, 342, 6, 70, "Message",ExpressionUUID->"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], -Cell[62984, 2187, 342, 6, 70, "Message",ExpressionUUID->"05911c33-7605-8b49-a7ba-7fc8c8f30741"], -Cell[63329, 2195, 342, 6, 70, "Message",ExpressionUUID->"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], -Cell[63674, 2203, 407, 7, 70, "Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], -Cell[64084, 2212, 8187, 365, 70, 4186, 297, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"899e43aa-c372-6647-a3e4-4952f308ab17"], -Cell[72274, 2579, 191, 5, 70, "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-baecb9a57d9b"] +Cell[17660, 528, 133, 2, 29, "Input",ExpressionUUID->"cc1db640-a763-4e2b-97fe-26896ebac182"], +Cell[17796, 532, 346, 5, 33, "Output",ExpressionUUID->"24730ba1-248a-4f49-951a-ed1d1b13a231"] }, Open ]], Cell[CellGroupData[{ -Cell[72502, 2589, 1590, 47, 70, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], -Cell[74095, 2638, 342, 6, 70, "Message",ExpressionUUID->"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], -Cell[74440, 2646, 101, 0, 70, "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[18179, 542, 134, 2, 29, "Input",ExpressionUUID->"dba86dfa-8048-4235-ae10-92e83d55d104"], +Cell[18316, 546, 352, 5, 33, "Output",ExpressionUUID->"985e943b-29a1-48e9-b187-1e288ab5f057"] }, Open ]], Cell[CellGroupData[{ -Cell[74578, 2651, 2247, 64, 70, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], -Cell[76828, 2717, 342, 6, 70, "Message",ExpressionUUID->"56921c73-2b67-0e4a-9808-5f61de992c7e"], -Cell[77173, 2725, 342, 6, 70, "Message",ExpressionUUID->"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], -Cell[77518, 2733, 103, 0, 70, "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[18705, 556, 219, 4, 29, "Input",ExpressionUUID->"dafafd58-d343-47d2-9219-07177a8c3335"], +Cell[18927, 562, 363, 6, 33, "Output",ExpressionUUID->"6d22f7fe-e52a-4eb6-99a2-28871837cf27"] }, Open ]], Cell[CellGroupData[{ -Cell[77658, 2738, 2219, 64, 70, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], -Cell[79880, 2804, 342, 6, 70, "Message",ExpressionUUID->"1795c3b9-0182-224c-b986-6414d6712c04"], -Cell[80225, 2812, 342, 6, 70, "Message",ExpressionUUID->"c3b31753-a67f-9b45-b822-068e1df11f68"], -Cell[80570, 2820, 100, 0, 70, "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[19327, 573, 134, 2, 29, "Input",ExpressionUUID->"942728ae-1eee-46e3-a944-beafcca3e8ab"], +Cell[19464, 577, 349, 5, 33, "Output",ExpressionUUID->"d59189d1-1a2e-4819-8cdc-ffa86c496f78"] }, Open ]], Cell[CellGroupData[{ -Cell[80707, 2825, 2221, 64, 70, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], -Cell[82931, 2891, 342, 6, 70, "Message",ExpressionUUID->"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], -Cell[83276, 2899, 342, 6, 70, "Message",ExpressionUUID->"4e2b22f2-1724-7649-93fc-33cd27bb415e"], -Cell[83621, 2907, 101, 0, 70, "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[19850, 587, 327, 5, 29, "Input",ExpressionUUID->"0dba3470-d40a-4312-8672-1e15722d7127"], +Cell[20180, 594, 346, 5, 33, "Output",ExpressionUUID->"889882e0-a8c3-4eef-aa5a-1beab90d548d"] }, Open ]], Cell[CellGroupData[{ -Cell[83759, 2912, 215, 6, 70, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[83977, 2920, 104, 0, 70, "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] -}, Open ]], -Cell[84096, 2923, 247, 5, 70, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], -Cell[CellGroupData[{ -Cell[84368, 2932, 532, 18, 70, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[84903, 2952, 100, 0, 70, "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[20563, 604, 296, 5, 29, "Input",ExpressionUUID->"a346741f-d459-496d-bf47-4b3c3a30eb69"], +Cell[20862, 611, 345, 5, 33, "Output",ExpressionUUID->"f67c5c84-e24f-4955-ad60-dc3c3c828c51"] }, Open ]], Cell[CellGroupData[{ -Cell[85040, 2957, 144, 4, 70, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[85187, 2963, 100, 0, 70, "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[21244, 621, 219, 4, 29, "Input",ExpressionUUID->"0d1f89a8-fd01-448f-a9dd-f537424b6c35"], +Cell[21466, 627, 340, 5, 33, "Output",ExpressionUUID->"b74ebaad-da97-4364-aa9e-7d7c0a1526b8"] }, Open ]], Cell[CellGroupData[{ -Cell[85324, 2968, 155, 4, 70, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[85482, 2974, 100, 0, 70, "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[21843, 637, 350, 10, 42, "Input",ExpressionUUID->"fc69ba8d-f923-47e9-b497-7aa5a84de211"], +Cell[22196, 649, 371, 5, 33, "Output",ExpressionUUID->"496b8a89-b07d-4cd2-8fb5-b5c2b806fe84"] }, Open ]], Cell[CellGroupData[{ -Cell[85619, 2979, 6029, 184, 70, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[91651, 3165, 102, 0, 70, "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[22604, 659, 350, 10, 42, "Input",ExpressionUUID->"16dc3556-39b6-43aa-94cc-d983c209c6ce"], +Cell[22957, 671, 386, 6, 33, "Output",ExpressionUUID->"ce036cbf-e228-4ebf-8db2-c96e712d57f6"] }, Open ]], Cell[CellGroupData[{ -Cell[91790, 3170, 342, 8, 70, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[92135, 3180, 342, 6, 70, "Message",ExpressionUUID->"def6b331-c871-b04d-a16e-4fc00b03d009"], -Cell[92480, 3188, 99, 0, 70, "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[23380, 682, 994, 26, 81, "Input",ExpressionUUID->"6bc584ee-fe98-42df-9f6a-126e6d1e83f9"], +Cell[24377, 710, 361, 5, 33, "Output",ExpressionUUID->"a56d4fcf-c4c3-47c6-ace1-2d92a3234142"] }, Open ]], Cell[CellGroupData[{ -Cell[92616, 3193, 6096, 186, 70, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[98715, 3381, 102, 0, 70, "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[24775, 720, 199, 3, 29, "Input",ExpressionUUID->"ac443485-28e7-4044-a57d-d7744cc9cfbd"], +Cell[24977, 725, 346, 5, 33, "Output",ExpressionUUID->"e9f5383a-9d39-41b9-8295-caa812685764"] }, Open ]], Cell[CellGroupData[{ -Cell[98854, 3386, 342, 8, 70, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[99199, 3396, 342, 6, 70, "Message",ExpressionUUID->"c6c8676e-4601-144e-b83c-769e22949175"], -Cell[99544, 3404, 100, 0, 70, "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[25360, 735, 325, 5, 29, "Input",ExpressionUUID->"9bf61379-f53e-460e-a8a1-a6017c80e63d"], +Cell[25688, 742, 326, 5, 33, "Output",ExpressionUUID->"ccd7021e-aed2-425a-be16-5d53172f72fa"] +}, Open ]], +Cell[26029, 750, 173, 2, 70, "Input",ExpressionUUID->"aef5f3bf-74d7-4f70-ad7a-78d217bb1588"], +Cell[CellGroupData[{ +Cell[26227, 756, 327, 5, 29, "Input",ExpressionUUID->"9a758730-42a6-4c18-b15d-6ab80c84b5da"], +Cell[26557, 763, 320, 5, 33, "Output",ExpressionUUID->"559eea32-7d83-49f6-96f3-d19a55a0aefb"] +}, Open ]], +Cell[26892, 771, 173, 2, 70, "Input",ExpressionUUID->"a4b3dccb-1b3b-419f-a127-d00dacaa6f83"], +Cell[CellGroupData[{ +Cell[27090, 777, 332, 5, 29, "Input",ExpressionUUID->"477ccd81-2ef0-4147-b369-18fcc49e7546"], +Cell[27425, 784, 325, 5, 33, "Output",ExpressionUUID->"911f243c-7b02-441e-b61b-52047cad2472"] +}, Open ]], +Cell[27765, 792, 173, 2, 70, "Input",ExpressionUUID->"61685d83-1c48-4399-a487-c00cddb3a13f"], +Cell[CellGroupData[{ +Cell[27963, 798, 351, 5, 29, "Input",ExpressionUUID->"55d3ac54-dc59-47be-99e3-cd6ba4eb7e8d"], +Cell[28317, 805, 330, 5, 33, "Output",ExpressionUUID->"d4ce5465-9f9b-484e-8fd5-0d1c9d668cd9"] +}, Open ]], +Cell[28662, 813, 171, 2, 70, "Input",ExpressionUUID->"b46ea42c-ab0d-48e3-9c47-df1b7e823ded"], +Cell[CellGroupData[{ +Cell[28858, 819, 298, 5, 29, "Input",ExpressionUUID->"2047a7cf-4d49-47a1-a678-b17cfc910461"], +Cell[29159, 826, 324, 5, 33, "Output",ExpressionUUID->"387ef0b9-b3f8-44c1-950c-2e5eda87de0e"] +}, Open ]], +Cell[29498, 834, 171, 2, 70, "Input",ExpressionUUID->"bd24619a-a7c7-4592-a909-bc3d390482fd"], +Cell[CellGroupData[{ +Cell[29694, 840, 303, 5, 29, "Input",ExpressionUUID->"b63f0f91-416b-4b5b-b06c-7f8408abe379"], +Cell[30000, 847, 327, 5, 33, "Output",ExpressionUUID->"8101b452-4bff-4cda-b7fe-b52cb3bdb1f4"] +}, Open ]], +Cell[30342, 855, 173, 2, 70, "Input",ExpressionUUID->"634a690c-d02f-47f3-8b5c-6f2ca68edea0"], +Cell[CellGroupData[{ +Cell[30540, 861, 306, 5, 29, "Input",ExpressionUUID->"04d46563-a26e-4631-9e4c-21f4c62342fa"], +Cell[30849, 868, 326, 5, 33, "Output",ExpressionUUID->"f24d6c3d-9f83-4d6e-8174-456506c00e8b"] +}, Open ]], +Cell[31190, 876, 172, 2, 70, "Input",ExpressionUUID->"670c6bc6-d260-421c-a98d-9ac6655f28d1"], +Cell[CellGroupData[{ +Cell[31387, 882, 275, 4, 29, "Input",ExpressionUUID->"1c55f073-fcd1-475a-a697-fd6b29fcf4ce"], +Cell[31665, 888, 325, 5, 33, "Output",ExpressionUUID->"34435fe7-a064-4e3b-acbc-bcd3a43b1cea"] +}, Open ]], +Cell[32005, 896, 175, 2, 70, "Input",ExpressionUUID->"9e091f1c-2bbb-428e-a569-7a320056ae87"], +Cell[CellGroupData[{ +Cell[32205, 902, 19809, 485, 1844, "Input",ExpressionUUID->"0982d3a8-b50a-427f-9d85-9323c8a2b10b"], +Cell[52017, 1389, 361, 5, 33, "Output",ExpressionUUID->"b47b7f9c-0945-4073-97f9-8fbbdc206b4d"] }, Open ]], Cell[CellGroupData[{ -Cell[99681, 3409, 2637, 87, 70, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[102321, 3498, 101, 0, 70, "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[52415, 1399, 19748, 489, 1981, "Input",ExpressionUUID->"e0304669-7d09-4e59-9e9c-a35ef8f0a644"], +Cell[72166, 1890, 363, 5, 33, "Output",ExpressionUUID->"16874746-6e72-4514-a099-7896bad4594a"] }, Open ]], Cell[CellGroupData[{ -Cell[102459, 3503, 2577, 84, 70, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[105039, 3589, 102, 0, 70, "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[72566, 1900, 19748, 483, 1970, "Input",ExpressionUUID->"cfe05e20-f8a1-4e5a-85aa-c2aa010461dd"], +Cell[92317, 2385, 376, 6, 33, "Output",ExpressionUUID->"f0f716ce-0160-4094-8a4b-840c6cd86d13"] }, Open ]], Cell[CellGroupData[{ -Cell[105178, 3594, 3686, 117, 70, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[108867, 3713, 102, 0, 70, "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[92730, 2396, 22534, 553, 2217, "Input",ExpressionUUID->"2369162a-f9d8-47a9-8524-24210c2a04f6"], +Cell[115267, 2951, 381, 6, 33, "Output",ExpressionUUID->"a8089ae5-523f-4978-9b42-3f35729b147f"] }, Open ]], Cell[CellGroupData[{ -Cell[109006, 3718, 2052, 59, 70, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], -Cell[111061, 3779, 342, 6, 70, "Message",ExpressionUUID->"7fd60dea-f794-4744-8801-bfb1a50a0e07"], -Cell[111406, 3787, 342, 6, 70, "Message",ExpressionUUID->"0b8c0718-41d2-4542-8afe-212a15805650"], -Cell[111751, 3795, 101, 0, 70, "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[115685, 2962, 22535, 553, 2254, "Input",ExpressionUUID->"140433ba-1471-4528-934c-781efe652804"], +Cell[138223, 3517, 380, 6, 33, "Output",ExpressionUUID->"d83190be-a69b-4730-8317-f924cb7b12a5"] }, Open ]], Cell[CellGroupData[{ -Cell[111889, 3800, 2054, 59, 70, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], -Cell[113946, 3861, 342, 6, 70, "Message",ExpressionUUID->"b6f0ccc2-ff83-124b-a341-e143319c7670"], -Cell[114291, 3869, 342, 6, 70, "Message",ExpressionUUID->"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], -Cell[114636, 3877, 100, 0, 70, "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[138640, 3528, 25491, 626, 2501, "Input",ExpressionUUID->"90ab69bb-004b-499b-a4bf-da5009ab997a"], +Cell[164134, 4156, 380, 6, 33, "Output",ExpressionUUID->"2645d582-5511-49a2-88b7-8da8cfa3da5c"] }, Open ]], Cell[CellGroupData[{ -Cell[114773, 3882, 2030, 55, 70, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], -Cell[116806, 3939, 342, 6, 70, "Message",ExpressionUUID->"7797a546-4085-124a-83da-5f3c472cdc4c"], -Cell[117151, 3947, 342, 6, 70, "Message",ExpressionUUID->"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], -Cell[117496, 3955, 342, 6, 70, "Message",ExpressionUUID->"ca7472ca-7b27-a54a-84a1-e603fa592207"], -Cell[117841, 3963, 407, 7, 70, "Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], -Cell[118251, 3972, 9432, 438, 70, 5172, 366, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], -Cell[127686, 4412, 191, 5, 70, "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-49e8ffb5e8c8"] +Cell[164551, 4167, 130, 2, 29, "Input",ExpressionUUID->"dc4c0c66-c322-42f0-8173-f626d561549c"], +Cell[164684, 4171, 343, 5, 33, "Output",ExpressionUUID->"1aca9979-32d4-4aea-a4d2-208d310e74e0"] }, Open ]], Cell[CellGroupData[{ -Cell[127914, 4422, 2118, 60, 70, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], -Cell[130035, 4484, 342, 6, 70, "Message",ExpressionUUID->"b9265795-17b8-4e47-bd29-fee31586537e"], -Cell[130380, 4492, 342, 6, 70, "Message",ExpressionUUID->"072fb53f-7116-0f41-a298-6891351a3192"], -Cell[130725, 4500, 342, 6, 70, "Message",ExpressionUUID->"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], -Cell[131070, 4508, 407, 7, 70, "Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], -Cell[131480, 4517, 8546, 368, 70, 4269, 296, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], -Cell[140029, 4887, 191, 5, 70, "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-87bc9c72594a"] -}, Open ]], -Cell[140235, 4895, 209, 5, 70, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], -Cell[CellGroupData[{ -Cell[140469, 4904, 1590, 47, 70, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], -Cell[142062, 4953, 342, 6, 70, "Message",ExpressionUUID->"52cff8eb-0c77-c944-a54f-e282b00ce766"], -Cell[142407, 4961, 101, 0, 70, "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[165064, 4181, 130, 2, 29, "Input",ExpressionUUID->"f76f7c86-87d9-4ab0-988a-08b9fbd4b5c6"], +Cell[165197, 4185, 347, 5, 33, "Output",ExpressionUUID->"3f36493f-cc86-47c5-a33a-203b1e84a4a4"] }, Open ]], Cell[CellGroupData[{ -Cell[142545, 4966, 2251, 64, 70, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], -Cell[144799, 5032, 342, 6, 70, "Message",ExpressionUUID->"cb5a1193-7562-6446-a279-d9f6295d156e"], -Cell[145144, 5040, 342, 6, 70, "Message",ExpressionUUID->"566b0ad4-7f4e-b04f-8294-646ce1913fac"], -Cell[145489, 5048, 101, 0, 70, "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[165581, 4195, 1144, 39, 107, "Input",ExpressionUUID->"f47f175c-ca25-4264-9b5c-2029bcf22ea7"], +Cell[166728, 4236, 360, 5, 33, "Output",ExpressionUUID->"c9510eba-49ef-462f-9dea-90a75301dd21"] }, Open ]], Cell[CellGroupData[{ -Cell[145627, 5053, 2220, 64, 70, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], -Cell[147850, 5119, 342, 6, 70, "Message",ExpressionUUID->"4cd45900-7eb0-6b4b-830a-a339e8117392"], -Cell[148195, 5127, 342, 6, 70, "Message",ExpressionUUID->"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], -Cell[148540, 5135, 101, 0, 70, "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[167125, 4246, 1041, 35, 107, "Input",ExpressionUUID->"121a8cae-dff1-4795-88da-cf414374a050"], +Cell[168169, 4283, 377, 6, 33, "Output",ExpressionUUID->"46b2b301-7695-46fc-8885-b625a8bdce33"] }, Open ]], Cell[CellGroupData[{ -Cell[148678, 5140, 2223, 64, 70, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], -Cell[150904, 5206, 342, 6, 70, "Message",ExpressionUUID->"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], -Cell[151249, 5214, 342, 6, 70, "Message",ExpressionUUID->"61220452-df6a-154e-8b5c-fecd0ab287a1"], -Cell[151594, 5222, 101, 0, 70, "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[168583, 4294, 1144, 39, 107, "Input",ExpressionUUID->"6facea10-30ba-4977-b6e9-4e7cb6b14875"], +Cell[169730, 4335, 361, 5, 33, "Output",ExpressionUUID->"56fd28d4-cf2f-4806-9d53-baf0feccc854"] }, Open ]], Cell[CellGroupData[{ -Cell[151732, 5227, 215, 6, 70, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[151950, 5235, 102, 0, 70, "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] -}, Open ]], -Cell[152067, 5238, 247, 5, 70, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], -Cell[CellGroupData[{ -Cell[152339, 5247, 532, 18, 70, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[152874, 5267, 101, 0, 70, "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[170128, 4345, 108, 1, 29, "Input",ExpressionUUID->"95abbf77-cace-4dfb-93b8-991ca6c184df"], +Cell[170239, 4348, 366, 5, 33, "Output",ExpressionUUID->"a70bef6e-0c47-495e-905c-c5bca5f82572"] }, Open ]], Cell[CellGroupData[{ -Cell[153012, 5272, 144, 4, 70, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[153159, 5278, 101, 0, 70, "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[170642, 4358, 108, 1, 29, "Input",ExpressionUUID->"2208a0da-428e-45d1-9a45-9095586c1571"], +Cell[170753, 4361, 381, 6, 33, "Output",ExpressionUUID->"99777d6c-442a-4a7e-9ebc-aec86f020a83"] }, Open ]], Cell[CellGroupData[{ -Cell[153297, 5283, 155, 4, 70, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[153455, 5289, 100, 0, 70, "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[171171, 4372, 108, 1, 29, "Input",ExpressionUUID->"576b414c-1d22-46a9-a594-1e764abdb00e"], +Cell[171282, 4375, 380, 6, 33, "Output",ExpressionUUID->"3bbdf196-5584-4551-9858-4790023cd8d5"] }, Open ]], Cell[CellGroupData[{ -Cell[153592, 5294, 6029, 184, 70, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[159624, 5480, 102, 0, 70, "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[171699, 4386, 108, 1, 29, "Input",ExpressionUUID->"cdd2770f-6b1e-47a2-9c27-1652e8f5674a"], +Cell[171810, 4389, 357, 5, 33, "Output",ExpressionUUID->"0db81723-d636-4413-835c-aba1955db3d3"] }, Open ]], Cell[CellGroupData[{ -Cell[159763, 5485, 342, 8, 70, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[160108, 5495, 342, 6, 70, "Message",ExpressionUUID->"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], -Cell[160453, 5503, 100, 0, 70, "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[172204, 4399, 107, 1, 29, "Input",ExpressionUUID->"4635dd84-ecce-4158-bcb7-f38ff5aef7fc"], +Cell[172314, 4402, 362, 5, 33, "Output",ExpressionUUID->"75172bb6-50fc-47d7-9bfb-bef9268c0c7d"] }, Open ]], Cell[CellGroupData[{ -Cell[160590, 5508, 6096, 186, 70, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[166689, 5696, 102, 0, 70, "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[172713, 4412, 107, 1, 29, "Input",ExpressionUUID->"7fb04775-0b2a-439c-8e83-d1c4a965433b"], +Cell[172823, 4415, 367, 5, 33, "Output",ExpressionUUID->"10eda795-13f6-4672-a208-76b8dd9e639f"] }, Open ]], Cell[CellGroupData[{ -Cell[166828, 5701, 342, 8, 70, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[167173, 5711, 342, 6, 70, "Message",ExpressionUUID->"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], -Cell[167518, 5719, 99, 0, 70, "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[173227, 4425, 497, 16, 55, "Input",ExpressionUUID->"18e6e47f-e3b3-4fbd-ad01-72838ac5840e"], +Cell[173727, 4443, 381, 6, 33, "Output",ExpressionUUID->"ef15165c-bea3-4d01-bc90-9e414767e35b"] }, Open ]], Cell[CellGroupData[{ -Cell[167654, 5724, 2637, 87, 70, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[170294, 5813, 101, 0, 70, "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[174145, 4454, 497, 16, 55, "Input",ExpressionUUID->"06d396a9-6288-4ee8-9cd5-a8ca2a621266"], +Cell[174645, 4472, 371, 6, 33, "Output",ExpressionUUID->"3882d1fa-e27c-479a-9f26-227d254288af"] }, Open ]], Cell[CellGroupData[{ -Cell[170432, 5818, 2577, 84, 70, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[173012, 5904, 102, 0, 70, "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[175053, 4483, 1788, 60, 183, "Input",ExpressionUUID->"8eef8572-4859-4318-8440-c6bc6e41b1b3"], +Cell[176844, 4545, 360, 5, 33, "Output",ExpressionUUID->"d0f67ccc-035a-4db2-b888-e54c0851df8c"] }, Open ]], Cell[CellGroupData[{ -Cell[173151, 5909, 3686, 117, 70, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[176840, 6028, 102, 0, 70, "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[177241, 4555, 1101, 36, 131, "Input",ExpressionUUID->"eb9c96d4-4f7a-41f5-a56f-107181adbbd5"], +Cell[178345, 4593, 380, 6, 33, "Output",ExpressionUUID->"cd3edfed-fd50-4432-80d0-4005e93d5a8d"] }, Open ]], Cell[CellGroupData[{ -Cell[176979, 6033, 2054, 59, 70, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], -Cell[179036, 6094, 342, 6, 70, "Message",ExpressionUUID->"b82c1933-5313-1d4c-a858-68be8f118333"], -Cell[179381, 6102, 342, 6, 70, "Message",ExpressionUUID->"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], -Cell[179726, 6110, 100, 0, 70, "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[178762, 4604, 1818, 61, 160, "Input",ExpressionUUID->"86c2909f-6c57-46a8-b3c1-8057c6367c73"], +Cell[180583, 4667, 365, 5, 33, "Output",ExpressionUUID->"15e7b0d9-8e6a-4cc5-894d-5c79c7493fc7"] }, Open ]], Cell[CellGroupData[{ -Cell[179863, 6115, 2054, 59, 70, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], -Cell[181920, 6176, 342, 6, 70, "Message",ExpressionUUID->"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], -Cell[182265, 6184, 342, 6, 70, "Message",ExpressionUUID->"56712e4d-1aa7-524a-8254-bcfd8978eea0"], -Cell[182610, 6192, 100, 0, 70, "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[180985, 4677, 1631, 53, 162, "Input",ExpressionUUID->"20596ec5-2282-4a59-97b8-0ecbe1d5724e"], +Cell[182619, 4732, 367, 5, 33, "Output",ExpressionUUID->"759e0d48-9cec-4af7-9d51-344602e9800b"] }, Open ]], Cell[CellGroupData[{ -Cell[182747, 6197, 2030, 55, 70, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], -Cell[184780, 6254, 342, 6, 70, "Message",ExpressionUUID->"9c6ce535-b42f-3c43-a89e-eda48c04121e"], -Cell[185125, 6262, 342, 6, 70, "Message",ExpressionUUID->"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], -Cell[185470, 6270, 342, 6, 70, "Message",ExpressionUUID->"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], -Cell[185815, 6278, 407, 7, 70, "Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], -Cell[186225, 6287, 9432, 438, 70, 5172, 366, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], -Cell[195660, 6727, 191, 5, 70, "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-8b4ad9ffca61"] +Cell[183023, 4742, 1631, 53, 162, "Input",ExpressionUUID->"c6684f2c-3408-44e3-9c67-53688d9d6d9d"], +Cell[184657, 4797, 363, 5, 33, "Output",ExpressionUUID->"82a271d6-65eb-49ea-8a60-cbf86344104f"] }, Open ]], Cell[CellGroupData[{ -Cell[195888, 6737, 2143, 61, 70, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], -Cell[198034, 6800, 342, 6, 70, "Message",ExpressionUUID->"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], -Cell[198379, 6808, 342, 6, 70, "Message",ExpressionUUID->"71d4e039-c2b8-d74d-819a-80d2051e4273"], -Cell[198724, 6816, 342, 6, 70, "Message",ExpressionUUID->"63625e13-15ef-1f45-89dc-998a1b63a626"], -Cell[199069, 6824, 407, 7, 70, "Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], -Cell[199479, 6833, 8546, 368, 70, 4269, 296, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], -Cell[208028, 7203, 191, 5, 70, "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-1872f77ea023"] +Cell[185057, 4807, 206, 3, 29, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], +Cell[185266, 4812, 161, 2, 33, "Output",ExpressionUUID->"a23210fd-6621-4b69-8afc-329ee4dde8ac"] }, Open ]], -Cell[208234, 7211, 138, 3, 70, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], +Cell[185442, 4817, 171, 2, 29, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], Cell[CellGroupData[{ -Cell[208397, 7218, 1590, 47, 70, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], -Cell[209990, 7267, 342, 6, 70, "Message",ExpressionUUID->"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], -Cell[210335, 7275, 101, 0, 70, "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[185638, 4823, 204, 3, 29, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], +Cell[185845, 4828, 161, 2, 33, "Output",ExpressionUUID->"c8f3a786-d7d4-42dd-9240-716bd029f0d3"] +}, Open ]], +Cell[186021, 4833, 173, 2, 29, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], +Cell[CellGroupData[{ +Cell[186219, 4839, 1297, 42, 111, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], +Cell[187519, 4883, 171, 2, 33, "Output",ExpressionUUID->"9ea235e8-597a-4f43-a218-497b3bb26cf7"] }, Open ]], Cell[CellGroupData[{ -Cell[210473, 7280, 2249, 64, 70, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], -Cell[212725, 7346, 342, 6, 70, "Message",ExpressionUUID->"905b237c-0e51-ab4b-895d-05994c6f1d5f"], -Cell[213070, 7354, 342, 6, 70, "Message",ExpressionUUID->"7ad8c79e-9570-a44d-b593-07aa87056e21"], -Cell[213415, 7362, 100, 0, 70, "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[187727, 4890, 929, 30, 96, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], +Cell[188659, 4922, 172, 2, 33, "Output",ExpressionUUID->"2aba8c73-ff56-4868-948a-fc137a8ea253"] }, Open ]], Cell[CellGroupData[{ -Cell[213552, 7367, 2219, 64, 70, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], -Cell[215774, 7433, 342, 6, 70, "Message",ExpressionUUID->"c516c31a-74b4-f24d-a16a-678221cde87e"], -Cell[216119, 7441, 342, 6, 70, "Message",ExpressionUUID->"5c50b555-9ebe-f94d-801f-34634555f622"], -Cell[216464, 7449, 99, 0, 70, "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[188868, 4929, 904, 29, 55, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], +Cell[189775, 4960, 174, 2, 33, "Output",ExpressionUUID->"24cfd73f-7faf-4646-8238-47dcf4ed29d1"] }, Open ]], Cell[CellGroupData[{ -Cell[216600, 7454, 2221, 64, 70, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], -Cell[218824, 7520, 342, 6, 70, "Message",ExpressionUUID->"7ca591cf-a5ce-ce41-8101-8edfca50e890"], -Cell[219169, 7528, 342, 6, 70, "Message",ExpressionUUID->"cbafd11a-4be0-b541-81e4-e62191ae7695"], -Cell[219514, 7536, 101, 0, 70, "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[189986, 4967, 554, 18, 51, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], +Cell[190543, 4987, 167, 2, 33, "Output",ExpressionUUID->"38486430-0f6b-405a-af44-aaae1cdfa695"] }, Open ]], Cell[CellGroupData[{ -Cell[219652, 7541, 215, 6, 70, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[219870, 7549, 102, 0, 70, "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[190747, 4994, 647, 21, 51, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], +Cell[191397, 5017, 166, 2, 33, "Output",ExpressionUUID->"6bfb7ed2-6cf9-480a-be36-9b082428632b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[191600, 5024, 166, 4, 55, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], +Cell[191769, 5030, 169, 2, 33, "Output",ExpressionUUID->"ced69811-4d6d-4f43-b436-6bb40557c3d8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[191975, 5037, 166, 4, 54, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], +Cell[192144, 5043, 166, 2, 33, "Output",ExpressionUUID->"eb3f6b8f-09b9-40f3-b4e8-8718e80615b7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192347, 5050, 177, 4, 43, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], +Cell[192527, 5056, 169, 2, 33, "Output",ExpressionUUID->"24327123-9f73-462e-aa3d-cd2a4fc5effe"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192733, 5063, 177, 4, 43, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], +Cell[192913, 5069, 169, 2, 33, "Output",ExpressionUUID->"d9d02ffc-118a-4442-b8d0-8a746f90942e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[193119, 5076, 6051, 184, 474, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], +Cell[199173, 5262, 168, 2, 33, "Output",ExpressionUUID->"bf368283-938f-4e9f-8342-68f7a5a9c6a6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[199378, 5269, 364, 8, 41, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], +Cell[199745, 5279, 165, 2, 33, "Output",ExpressionUUID->"4e097589-f7e5-4f2d-b0da-7afd80f2baa7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[199947, 5286, 6118, 186, 474, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], +Cell[206068, 5474, 169, 2, 33, "Output",ExpressionUUID->"9016373e-3602-4be6-8022-9f36a90ade49"] +}, Open ]], +Cell[CellGroupData[{ +Cell[206274, 5481, 364, 8, 41, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], +Cell[206641, 5491, 167, 2, 33, "Output",ExpressionUUID->"6028fbdc-dfdd-417e-aac6-95dc9435a515"] +}, Open ]], +Cell[CellGroupData[{ +Cell[206845, 5498, 2659, 87, 285, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], +Cell[209507, 5587, 166, 2, 33, "Output",ExpressionUUID->"13df4bca-f855-4dab-822f-13034ee0f11a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[209710, 5594, 2599, 84, 211, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], +Cell[212312, 5680, 166, 2, 33, "Output",ExpressionUUID->"b022f04e-707f-4614-8269-8e2b4f7be88e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[212515, 5687, 3708, 117, 327, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], +Cell[216226, 5806, 168, 2, 33, "Output",ExpressionUUID->"63ee7ada-94e6-4009-93b1-39da689696e9"] +}, Open ]], +Cell[216409, 5811, 160, 3, 70, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], +Cell[CellGroupData[{ +Cell[216594, 5818, 2073, 58, 234, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], +Cell[218670, 5878, 697, 15, 63, "Message",ExpressionUUID->"50f02a36-a9e0-42aa-b93e-c40c540de792"], +Cell[219370, 5895, 699, 15, 63, "Message",ExpressionUUID->"5650ea4c-bdb6-42a0-809a-f0bbedbe78fc"], +Cell[220072, 5912, 696, 15, 63, "Message",ExpressionUUID->"605cacd0-f4f5-465c-861c-7b2a0775a931"], +Cell[220771, 5929, 465, 11, 26, "Message",ExpressionUUID->"45726306-708b-4f2b-8a21-e3096dd712b2"], +Cell[221239, 5942, 165, 2, 33, "Output",ExpressionUUID->"eaa781f9-dc7b-49f5-8a99-4f90402678be"] +}, Open ]], +Cell[CellGroupData[{ +Cell[221441, 5949, 2070, 58, 234, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], +Cell[223514, 6009, 695, 15, 63, "Message",ExpressionUUID->"abda8fbb-c156-40c6-a72a-a4ca98e4eef9"], +Cell[224212, 6026, 697, 15, 63, "Message",ExpressionUUID->"10752050-e15d-46ae-ab6a-df193e80913c"], +Cell[224912, 6043, 696, 15, 63, "Message",ExpressionUUID->"6aecc371-305b-4998-9529-e0b1349d77ba"], +Cell[225611, 6060, 465, 11, 26, "Message",ExpressionUUID->"e8f6c575-2681-4435-aea2-afe07852b169"], +Cell[226079, 6073, 167, 2, 33, "Output",ExpressionUUID->"4b27841a-c8f9-4811-8bae-e1b4b892c1ca"] +}, Open ]], +Cell[CellGroupData[{ +Cell[226283, 6080, 1957, 52, 102, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], +Cell[228243, 6134, 21792, 404, 242, "Output",ExpressionUUID->"72245a6f-4dca-46f8-9b18-a041dce05896"] +}, Open ]], +Cell[CellGroupData[{ +Cell[250072, 6543, 2113, 59, 261, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], +Cell[252188, 6604, 529, 12, 58, "Message",ExpressionUUID->"6d8a8722-3073-410c-8544-97032a831ce6"], +Cell[252720, 6618, 535, 12, 58, "Message",ExpressionUUID->"08b7aa17-0622-48ff-b5f1-3b17eea5bf69"], +Cell[253258, 6632, 538, 12, 58, "Message",ExpressionUUID->"5ba69c74-04b4-4450-926c-d25d28c9e56f"], +Cell[253799, 6646, 466, 11, 26, "Message",ExpressionUUID->"0aff3ec2-61c0-4730-b887-dae5bfbb35d2"], +Cell[254268, 6659, 33102, 590, 232, "Output",ExpressionUUID->"ae0c7f6e-7cd0-4fc8-b3e2-a08acd9b4fba"] +}, Open ]], +Cell[CellGroupData[{ +Cell[287407, 7254, 2517, 70, 185, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], +Cell[289927, 7326, 9504, 222, 239, "Output",ExpressionUUID->"c19c7019-fc84-4911-b521-a2e7bd1d3edf"] +}, Open ]], +Cell[CellGroupData[{ +Cell[299468, 7553, 228, 4, 29, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], +Cell[299699, 7559, 39498, 722, 232, "Output",ExpressionUUID->"3af5384e-3cad-477e-a455-2b12f9ef19ce"] +}, Open ]], +Cell[CellGroupData[{ +Cell[339234, 8286, 234, 6, 47, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], +Cell[339471, 8294, 166, 2, 33, "Output",ExpressionUUID->"7d4173ac-8940-400e-96f2-2fce474d2c8f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[339674, 8301, 1833, 52, 190, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], +Cell[341510, 8355, 549, 12, 58, "Message",ExpressionUUID->"19554f65-97e3-4c47-a75a-0b9f12cd9365"], +Cell[342062, 8369, 553, 12, 58, "Message",ExpressionUUID->"fcb80882-0585-4521-bd1b-fd7072b93afe"], +Cell[342618, 8383, 562, 13, 58, "Message",ExpressionUUID->"1cd89c51-137a-490c-bdf9-c350334c3814"], +Cell[343183, 8398, 466, 11, 26, "Message",ExpressionUUID->"114cb069-1092-4e8e-85fe-fcf57b35b95d"], +Cell[343652, 8411, 37641, 665, 232, "Output",ExpressionUUID->"d4592850-ab51-4dfd-b020-0043ae218e5b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[381330, 9081, 1616, 48, 104, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], +Cell[382949, 9131, 170, 3, 33, "Output",ExpressionUUID->"50afe546-65be-4f12-9e45-2ad4c2a431f7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[383156, 9139, 2270, 64, 212, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], +Cell[385429, 9205, 700, 15, 63, "Message",ExpressionUUID->"c81933db-dfe1-4298-943a-341a96a247d3"], +Cell[386132, 9222, 700, 15, 63, "Message",ExpressionUUID->"96a4aa40-78c1-4d5e-b715-a994e754203b"], +Cell[386835, 9239, 701, 15, 63, "Message",ExpressionUUID->"d1747c0e-278d-457c-bccb-396b3d0c7db8"], +Cell[387539, 9256, 470, 11, 26, "Message",ExpressionUUID->"80060ddb-d65d-4afd-b37c-e962a0893bb1"], +Cell[388012, 9269, 171, 3, 33, "Output",ExpressionUUID->"a5974fdd-79c2-42af-a26d-93a15d7aa6ff"] +}, Open ]], +Cell[CellGroupData[{ +Cell[388220, 9277, 2231, 63, 212, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], +Cell[390454, 9342, 700, 15, 63, "Message",ExpressionUUID->"6aeb5f69-754b-4ea4-8733-aad2bb3ceb50"], +Cell[391157, 9359, 700, 15, 63, "Message",ExpressionUUID->"471096e8-4dd0-46d3-a7c8-cce5dd8eddc8"], +Cell[391860, 9376, 699, 15, 63, "Message",ExpressionUUID->"86834077-90eb-41e3-bcc9-cae452133bb5"], +Cell[392562, 9393, 470, 11, 26, "Message",ExpressionUUID->"ed89a703-0629-47c1-b074-2ce4f72258e3"], +Cell[393035, 9406, 171, 3, 33, "Output",ExpressionUUID->"426dca7a-d2e8-4f13-bb30-77e4524d537f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[393243, 9414, 2233, 63, 212, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], +Cell[395479, 9479, 697, 15, 63, "Message",ExpressionUUID->"2c270ade-896f-48d1-af25-83456e0508ea"], +Cell[396179, 9496, 700, 15, 63, "Message",ExpressionUUID->"5f749947-6756-47de-85c5-29fadddb34d8"], +Cell[396882, 9513, 699, 15, 63, "Message",ExpressionUUID->"4973912f-dfab-47fa-9421-7edc6acb1b82"], +Cell[397584, 9530, 468, 11, 26, "Message",ExpressionUUID->"987cd983-1a52-4f52-88de-0d8733fcc176"], +Cell[398055, 9543, 171, 3, 33, "Output",ExpressionUUID->"293b71d2-0805-4e12-acf7-fe63ab1a4d47"] +}, Open ]], +Cell[CellGroupData[{ +Cell[398263, 9551, 238, 6, 46, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], +Cell[398504, 9559, 173, 3, 33, "Output",ExpressionUUID->"aa81fe49-83a7-4af3-b853-12bbb2545577"] +}, Open ]], +Cell[398692, 9565, 273, 6, 29, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], +Cell[CellGroupData[{ +Cell[398990, 9575, 558, 19, 51, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], +Cell[399551, 9596, 170, 3, 33, "Output",ExpressionUUID->"7bf022b7-8f5c-4874-9861-786f54d85aa8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[399758, 9604, 170, 5, 55, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], +Cell[399931, 9611, 172, 3, 33, "Output",ExpressionUUID->"362947b7-0402-4993-b974-b2adf1bf0d39"] +}, Open ]], +Cell[CellGroupData[{ +Cell[400140, 9619, 181, 5, 43, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], +Cell[400324, 9626, 172, 3, 33, "Output",ExpressionUUID->"42797841-be29-4d02-99c4-5392993953aa"] +}, Open ]], +Cell[CellGroupData[{ +Cell[400533, 9634, 6055, 185, 474, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], +Cell[406591, 9821, 173, 3, 33, "Output",ExpressionUUID->"e3d33006-3dfb-4ce3-a0c7-3d0c8803907e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[406801, 9829, 368, 9, 41, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], +Cell[407172, 9840, 170, 3, 33, "Output",ExpressionUUID->"fa687775-490b-441f-94d4-8a681c5d5074"] +}, Open ]], +Cell[CellGroupData[{ +Cell[407379, 9848, 6122, 187, 474, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], +Cell[413504, 10037, 172, 3, 33, "Output",ExpressionUUID->"52657ca3-1ad5-4765-ae07-c7c18d3e407b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[413713, 10045, 368, 9, 41, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], +Cell[414084, 10056, 173, 3, 33, "Output",ExpressionUUID->"d9bdb132-2920-44e4-8c67-a12cd76f30e6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[414294, 10064, 2663, 88, 285, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], +Cell[416960, 10154, 172, 3, 33, "Output",ExpressionUUID->"0afe7292-bcc4-4000-8ba9-d7f22987b2ce"] +}, Open ]], +Cell[CellGroupData[{ +Cell[417169, 10162, 2603, 85, 211, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], +Cell[419775, 10249, 170, 3, 33, "Output",ExpressionUUID->"982e4d06-d27c-4299-b093-abc613ca8e16"] +}, Open ]], +Cell[CellGroupData[{ +Cell[419982, 10257, 3712, 118, 327, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], +Cell[423697, 10377, 172, 3, 33, "Output",ExpressionUUID->"b9ca91b7-c884-4d1a-8c0c-a16eaef2486f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[423906, 10385, 2075, 59, 234, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], +Cell[425984, 10446, 702, 15, 63, "Message",ExpressionUUID->"9494137e-9054-40d8-af25-34868ad3aef4"], +Cell[426689, 10463, 700, 15, 63, "Message",ExpressionUUID->"21ef40bf-25ff-4f9b-83ad-c793822ecb6c"], +Cell[427392, 10480, 703, 15, 63, "Message",ExpressionUUID->"951259e1-f60c-40ab-940e-244c1635a4e3"], +Cell[428098, 10497, 468, 11, 26, "Message",ExpressionUUID->"002990dd-ee55-4fd7-9624-b2ed5829c73e"], +Cell[428569, 10510, 170, 3, 33, "Output",ExpressionUUID->"29575d60-c46f-457b-9d18-daa75c32bdc8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[428776, 10518, 2077, 59, 234, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], +Cell[430856, 10579, 700, 15, 63, "Message",ExpressionUUID->"88f20648-ceb4-4885-ab14-1266e08a760d"], +Cell[431559, 10596, 700, 15, 63, "Message",ExpressionUUID->"f4f172ae-e848-49eb-9a6a-20683cc40c2a"], +Cell[432262, 10613, 701, 15, 63, "Message",ExpressionUUID->"4897b26f-f9d8-4da7-a813-afe6f2ab597d"], +Cell[432966, 10630, 470, 11, 26, "Message",ExpressionUUID->"da87ad87-3a85-4700-8d5c-fe5ad003b343"], +Cell[433439, 10643, 171, 3, 33, "Output",ExpressionUUID->"1fddb60f-fdb3-46bb-9703-ca01d8db30d6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[433647, 10651, 2053, 55, 151, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], +Cell[435703, 10708, 20563, 384, 242, "Output",ExpressionUUID->"aa73779a-18e1-45e1-b583-12a6f288640f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[456303, 11097, 2141, 60, 261, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], +Cell[458447, 11159, 536, 12, 58, "Message",ExpressionUUID->"02ec2194-a4f8-4f03-9697-d57a03d53a32"], +Cell[458986, 11173, 541, 12, 58, "Message",ExpressionUUID->"59e23676-99bf-49ba-8a48-bc16b777c2dc"], +Cell[459530, 11187, 544, 12, 58, "Message",ExpressionUUID->"f636a232-928a-461c-88fb-87d25715918e"], +Cell[460077, 11201, 468, 11, 26, "Message",ExpressionUUID->"36fc5bbb-b508-482c-a036-0400da0ba338"], +Cell[460548, 11214, 33098, 591, 232, "Output",ExpressionUUID->"44e3e660-912f-465f-b609-6263031d06c4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[493683, 11810, 232, 5, 29, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], +Cell[493918, 11817, 39496, 723, 232, "Output",ExpressionUUID->"7ad04e14-366e-4710-8e42-5fab63ef4af0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[533451, 12545, 1616, 48, 104, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], +Cell[535070, 12595, 172, 3, 33, "Output",ExpressionUUID->"d362a7d5-b38d-435f-8c20-eb311f0c78dd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[535279, 12603, 2274, 64, 212, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], +Cell[537556, 12669, 699, 15, 63, "Message",ExpressionUUID->"4adcbee5-850c-4e5a-8665-1a230d1a3c70"], +Cell[538258, 12686, 700, 15, 63, "Message",ExpressionUUID->"da558476-ada8-4133-99ab-651206ff16f7"], +Cell[538961, 12703, 703, 15, 63, "Message",ExpressionUUID->"e92dd8c2-de91-4443-8292-0d6e6ea40c19"], +Cell[539667, 12720, 470, 11, 26, "Message",ExpressionUUID->"16c1a321-89d9-4011-844f-068839b656db"], +Cell[540140, 12733, 171, 3, 33, "Output",ExpressionUUID->"3b76e231-b9b7-453f-be77-2819a56b00e2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[540348, 12741, 2232, 63, 212, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], +Cell[542583, 12806, 700, 15, 63, "Message",ExpressionUUID->"cb51267c-fc78-431c-a152-562ba40b7ce5"], +Cell[543286, 12823, 700, 15, 63, "Message",ExpressionUUID->"90797739-e566-4e5a-8b8d-88251ab43833"], +Cell[543989, 12840, 701, 15, 63, "Message",ExpressionUUID->"89e85718-9abb-4394-82fe-1c132a07a64b"], +Cell[544693, 12857, 468, 11, 26, "Message",ExpressionUUID->"c4a8c87f-d70f-46c0-bb80-f6e8a00ed89e"], +Cell[545164, 12870, 170, 3, 33, "Output",ExpressionUUID->"8809410a-9de5-426b-8ece-bc3e741fcbc4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[545371, 12878, 2235, 63, 212, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], +Cell[547609, 12943, 702, 15, 63, "Message",ExpressionUUID->"58073bc6-c98f-4857-8515-9482c6607b6a"], +Cell[548314, 12960, 699, 15, 63, "Message",ExpressionUUID->"d5763d66-dae3-49b2-93f8-1f5b37abd9ad"], +Cell[549016, 12977, 701, 15, 63, "Message",ExpressionUUID->"b348600e-eff1-4dbd-9653-f22d04b552a9"], +Cell[549720, 12994, 468, 11, 26, "Message",ExpressionUUID->"cf922289-005b-41c7-924a-12bb2d8f64b3"], +Cell[550191, 13007, 171, 3, 33, "Output",ExpressionUUID->"c976799f-85d5-43dc-b205-8fc92b683491"] +}, Open ]], +Cell[CellGroupData[{ +Cell[550399, 13015, 238, 6, 46, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], +Cell[550640, 13023, 171, 3, 33, "Output",ExpressionUUID->"b4587360-3ccd-447d-9d69-3ff57c2aadc2"] +}, Open ]], +Cell[550826, 13029, 273, 6, 70, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], +Cell[CellGroupData[{ +Cell[551124, 13039, 558, 19, 51, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], +Cell[551685, 13060, 173, 3, 33, "Output",ExpressionUUID->"a175c83b-8836-412c-b338-41ac8139faf9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[551895, 13068, 170, 5, 55, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], +Cell[552068, 13075, 172, 3, 33, "Output",ExpressionUUID->"a382eca0-7439-48c9-8195-27d3e1cb4b6e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[552277, 13083, 181, 5, 43, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], +Cell[552461, 13090, 173, 3, 33, "Output",ExpressionUUID->"55072bf4-6ea1-4484-9db3-1dc3fa1709c1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[552671, 13098, 6055, 185, 474, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], +Cell[558729, 13285, 173, 3, 33, "Output",ExpressionUUID->"53e49139-48ee-4e74-a88c-c96129cf3614"] +}, Open ]], +Cell[CellGroupData[{ +Cell[558939, 13293, 368, 9, 41, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], +Cell[559310, 13304, 170, 3, 33, "Output",ExpressionUUID->"408b8ea0-1fe4-4c26-ab86-eff346ce35c8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[559517, 13312, 6122, 187, 474, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], +Cell[565642, 13501, 173, 3, 33, "Output",ExpressionUUID->"2e31a4cf-8673-4c21-b4f5-baa1d544cb24"] +}, Open ]], +Cell[CellGroupData[{ +Cell[565852, 13509, 368, 9, 41, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], +Cell[566223, 13520, 171, 3, 33, "Output",ExpressionUUID->"fa7918b8-491e-43fb-a1b7-0d65ff90260c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[566431, 13528, 2663, 88, 285, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], +Cell[569097, 13618, 172, 3, 33, "Output",ExpressionUUID->"bee1b51b-9c5d-4d64-b3f8-56e4730392e9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[569306, 13626, 2603, 85, 211, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], +Cell[571912, 13713, 170, 3, 33, "Output",ExpressionUUID->"fe9dae5b-c894-44d0-abec-163c08a0d32f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[572119, 13721, 3712, 118, 327, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], +Cell[575834, 13841, 172, 3, 33, "Output",ExpressionUUID->"09b497d1-ad0b-41b6-8627-c79b9add44aa"] +}, Open ]], +Cell[CellGroupData[{ +Cell[576043, 13849, 2077, 59, 234, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], +Cell[578123, 13910, 698, 15, 63, "Message",ExpressionUUID->"fed7e418-c693-46c2-9c99-e5379b37baad"], +Cell[578824, 13927, 699, 15, 63, "Message",ExpressionUUID->"0a8e8f88-aa34-4949-9a97-fa29b68fb4ea"], +Cell[579526, 13944, 698, 15, 63, "Message",ExpressionUUID->"6564a0ef-0763-431a-81b9-49b649a25e3d"], +Cell[580227, 13961, 468, 11, 26, "Message",ExpressionUUID->"5bfc8692-a357-4225-a891-dbce8becfa45"], +Cell[580698, 13974, 171, 3, 33, "Output",ExpressionUUID->"0637212c-1035-4911-9d65-5d5fa483de55"] +}, Open ]], +Cell[CellGroupData[{ +Cell[580906, 13982, 2077, 59, 234, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], +Cell[582986, 14043, 698, 15, 63, "Message",ExpressionUUID->"b5eb4e90-ba58-4888-82eb-63d163d3a4d8"], +Cell[583687, 14060, 702, 15, 63, "Message",ExpressionUUID->"f2c19173-34e6-4bea-aaf4-b63724158518"], +Cell[584392, 14077, 698, 15, 63, "Message",ExpressionUUID->"df0f0bb9-64e4-4b14-94a3-bafd9e81c930"], +Cell[585093, 14094, 468, 11, 26, "Message",ExpressionUUID->"3148d3c2-bb7a-4e58-99ab-9d989fd98c74"], +Cell[585564, 14107, 170, 3, 33, "Output",ExpressionUUID->"179abf94-3c75-41d9-8753-c772aedfc414"] +}, Open ]], +Cell[CellGroupData[{ +Cell[585771, 14115, 2053, 55, 151, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], +Cell[587827, 14172, 22540, 417, 242, "Output",ExpressionUUID->"ff68efa2-ff89-4421-a853-c4f35cf934d8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[610404, 14594, 2165, 61, 261, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], +Cell[612572, 14657, 533, 12, 58, "Message",ExpressionUUID->"aab23b7a-0d79-4b9d-8a50-39c72b9d1682"], +Cell[613108, 14671, 536, 12, 58, "Message",ExpressionUUID->"0204608f-9a35-43b1-8fd8-8e569f8500bb"], +Cell[613647, 14685, 540, 12, 58, "Message",ExpressionUUID->"487c6cfb-6af3-4058-99fe-9fb2d0013f7e"], +Cell[614190, 14699, 468, 11, 26, "Message",ExpressionUUID->"1c217a40-e32e-472b-ae6a-365b2ff0e9ab"], +Cell[614661, 14712, 33112, 591, 232, "Output",ExpressionUUID->"f653229f-6115-4a1d-8e50-e938ccf7b3cd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[647810, 15308, 164, 4, 29, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], +Cell[647977, 15314, 39506, 723, 232, "Output",ExpressionUUID->"9ef7304b-39d8-4290-aad2-5c4f106a13df"] +}, Open ]], +Cell[CellGroupData[{ +Cell[687520, 16042, 1616, 48, 104, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], +Cell[689139, 16092, 171, 3, 33, "Output",ExpressionUUID->"10c1ede6-b4ff-4d04-a086-4def855eb77a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[689347, 16100, 2272, 64, 212, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], +Cell[691622, 16166, 698, 15, 63, "Message",ExpressionUUID->"6ed43a62-5275-4375-bb60-904453bcd7f9"], +Cell[692323, 16183, 702, 15, 63, "Message",ExpressionUUID->"2f85fe35-c51e-474e-9936-de756558c9c9"], +Cell[693028, 16200, 698, 15, 63, "Message",ExpressionUUID->"2a38670f-270f-45f3-a463-953a9dc9243e"], +Cell[693729, 16217, 468, 11, 26, "Message",ExpressionUUID->"0adc65ba-cf22-466b-acab-13a0786d15dc"], +Cell[694200, 16230, 173, 3, 33, "Output",ExpressionUUID->"6b2b3ca2-d20c-4213-a921-43c0cc5b05ca"] +}, Open ]], +Cell[CellGroupData[{ +Cell[694410, 16238, 2231, 63, 212, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], +Cell[696644, 16303, 700, 15, 63, "Message",ExpressionUUID->"927b53de-ccf2-4640-9cf3-f6a794a4215f"], +Cell[697347, 16320, 700, 15, 63, "Message",ExpressionUUID->"0271f062-107a-4974-925e-5c8696988138"], +Cell[698050, 16337, 698, 15, 63, "Message",ExpressionUUID->"2a883aa1-9005-4c3e-8475-d00a50fc243a"], +Cell[698751, 16354, 468, 11, 26, "Message",ExpressionUUID->"20a04baf-995d-42f3-911f-6c8f51284eb7"], +Cell[699222, 16367, 171, 3, 33, "Output",ExpressionUUID->"777883da-8646-400c-94ea-d2733c061c97"] +}, Open ]], +Cell[CellGroupData[{ +Cell[699430, 16375, 2233, 63, 212, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], +Cell[701666, 16440, 698, 15, 63, "Message",ExpressionUUID->"70d53c4d-21eb-41e6-83ec-bc131ce0eafb"], +Cell[702367, 16457, 700, 15, 63, "Message",ExpressionUUID->"9ee4bb02-c1ba-47e6-8842-96a37de3e35c"], +Cell[703070, 16474, 698, 15, 63, "Message",ExpressionUUID->"857e457b-c4c6-4934-bf74-179bccc8b447"], +Cell[703771, 16491, 468, 11, 26, "Message",ExpressionUUID->"caa860f6-299c-40ca-a380-dc6eca671d36"], +Cell[704242, 16504, 171, 3, 33, "Output",ExpressionUUID->"637255a4-608e-406f-bbda-bbb8e6d7657c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[704450, 16512, 238, 6, 46, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], +Cell[704691, 16520, 168, 3, 33, "Output",ExpressionUUID->"0826b55e-aa70-4e32-b0d8-03ce52e5a94f"] }, Open ]] } ] *) -(* End of internal cache information *) - diff --git a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw1.nb b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw1.nb index ce85561..4ff343b 100644 --- a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw1.nb +++ b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 583287, 14506] -NotebookOptionsPosition[ 541294, 13835] -NotebookOutlinePosition[ 541735, 13853] -CellTagsIndexPosition[ 541692, 13850] +NotebookDataLength[ 787466, 18051] +NotebookOptionsPosition[ 745540, 17374] +NotebookOutlinePosition[ 745997, 17393] +CellTagsIndexPosition[ 745954, 17390] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -27,16 +27,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.993801942128783*^9, 3.993801945433443*^9}, { 3.9938026615010633`*^9, 3.993802739368286*^9}, {3.993802810187974*^9, 3.9938028103007183`*^9}, {3.993803575340521*^9, 3.993803666300129*^9}}, - CellLabel-> - "In[1109]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], + CellLabel->"In[1]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], Cell[BoxData["2.88`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.993800775970068*^9, 3.9938019548134403`*^9, { 3.993802671037874*^9, 3.9938027475965223`*^9}, 3.9938028210918093`*^9, { - 3.993803586980714*^9, 3.993803670362015*^9}}, - CellLabel-> - "Out[1109]=",ExpressionUUID->"c7898915-503c-40cd-948e-7969464da68e"] + 3.993803586980714*^9, 3.993803670362015*^9}, 3.993828472325266*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"e13360af-2b6a-4210-908f-526c4f8f5c3f"] }, Open ]], Cell[CellGroupData[{ @@ -44,16 +42,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"A", "=", "236"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}}, - CellLabel-> - "In[1110]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], + CellLabel->"In[2]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], Cell[BoxData["236"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.9938007760760193`*^9, 3.993801954850832*^9, { 3.9938026710743093`*^9, 3.993802747641852*^9}, 3.993802821127861*^9, { - 3.993803587016178*^9, 3.9938036703981237`*^9}}, - CellLabel-> - "Out[1110]=",ExpressionUUID->"bab282c2-dd65-4ec1-822d-b0d48b8bd000"] + 3.993803587016178*^9, 3.9938036703981237`*^9}, 3.993828476114501*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"a62e4c07-11e1-4746-8ee8-7e1b2dd0f8f8"] }, Open ]], Cell[CellGroupData[{ @@ -62,16 +58,15 @@ Cell[BoxData[ RowBox[{"A1", "=", "152"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.993800516328167*^9, 3.993800518467939*^9}}, - CellLabel-> - "In[1111]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], + CellLabel->"In[3]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], Cell[BoxData["152"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.993800520116021*^9, 3.9938007760814123`*^9, 3.99380195486788*^9, {3.993802671090054*^9, 3.993802747658696*^9}, - 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}}, - CellLabel-> - "Out[1111]=",ExpressionUUID->"030ad948-aa8b-41c8-9ceb-50d4396cbb94"] + 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}, + 3.993828476355879*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"0cf96b3c-3de3-4cf0-a410-6a9bc16a04d3"] }, Open ]], Cell[CellGroupData[{ @@ -79,16 +74,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[1112]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], + CellLabel->"In[4]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.9938007761127357`*^9, 3.993801954886694*^9, { 3.993802671105547*^9, 3.993802747674674*^9}, 3.9938028211591873`*^9, { - 3.9938035870466833`*^9, 3.993803670422636*^9}}, - CellLabel-> - "Out[1112]=",ExpressionUUID->"720dd102-bdb6-4e40-915e-ca7bb52f022d"] + 3.9938035870466833`*^9, 3.993803670422636*^9}, 3.99382847636661*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"7af3b0fd-14a0-44ce-9f3f-bb01fefd28f0"] }, Open ]], Cell[CellGroupData[{ @@ -100,32 +93,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[1113]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], + CellLabel->"In[5]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], Cell[BoxData["0.545677966101695`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.993800776129066*^9, 3.9938019549039087`*^9, { 3.9938026711227913`*^9, 3.993802747690078*^9}, 3.993802821174389*^9, { - 3.9938035870619383`*^9, 3.993803670434517*^9}}, - CellLabel-> - "Out[1113]=",ExpressionUUID->"660f5006-00ba-4bb0-831e-61167574f009"] + 3.9938035870619383`*^9, 3.993803670434517*^9}, 3.99382847637794*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"e8c60412-8318-4e1c-913d-7d8238a0a0e1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[1114]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], + CellLabel->"In[6]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.9938007761450787`*^9, 3.993801954921114*^9, { 3.993802671138826*^9, 3.993802747705122*^9}, 3.993802821189831*^9, { - 3.993803587077704*^9, 3.993803670446403*^9}}, - CellLabel-> - "Out[1114]=",ExpressionUUID->"06e14c94-4a8e-4850-bc58-a07a9b973991"] + 3.993803587077704*^9, 3.993803670446403*^9}, 3.99382847638977*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"64f9c9f0-c105-4db0-b45a-b4e951be0982"] }, Open ]], Cell[CellGroupData[{ @@ -136,16 +125,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[1115]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], + CellLabel->"In[7]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], Cell[BoxData["6.190691825034912`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.993800776161807*^9, 3.993801954937538*^9, { 3.9938026711557207`*^9, 3.993802747719865*^9}, 3.993802821205323*^9, { - 3.993803587093586*^9, 3.9938036704581614`*^9}}, - CellLabel-> - "Out[1115]=",ExpressionUUID->"2d498c00-010d-4fc3-818c-355bc242d54a"] + 3.993803587093586*^9, 3.9938036704581614`*^9}, 3.99382847640377*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"f3ef23ca-77bf-4b17-8437-7f2534c93d60"] }, Open ]], Cell[CellGroupData[{ @@ -157,16 +144,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[1116]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], + CellLabel->"In[8]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], Cell[BoxData["5.08024220226995`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.993800776178092*^9, 3.993801954954875*^9, { 3.993802671171578*^9, 3.993802747723295*^9}, 3.993802821221133*^9, { - 3.993803587109274*^9, 3.993803670471842*^9}}, - CellLabel-> - "Out[1116]=",ExpressionUUID->"45cf2f9d-5798-4935-b014-4f23f725956c"] + 3.993803587109274*^9, 3.993803670471842*^9}, 3.993828476417531*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"bab3b6eb-8005-4dcf-aeee-bcaed8b857ee"] }, Open ]], Cell[CellGroupData[{ @@ -175,16 +160,14 @@ Cell[BoxData[ RowBox[{"b1", "=", "0.97619"}]], "Input", CellChangeTimes->{ 3.991799283179735*^9, {3.9938005440294*^9, 3.993800567746181*^9}}, - CellLabel-> - "In[1117]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], + CellLabel->"In[9]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], Cell[BoxData["0.97619`"], "Output", CellChangeTimes->{ 3.993800776210225*^9, 3.993801954959785*^9, {3.993802671174962*^9, 3.993802747749667*^9}, 3.9938028212246647`*^9, {3.9938035871245747`*^9, - 3.993803670475428*^9}}, - CellLabel-> - "Out[1117]=",ExpressionUUID->"14c6f2bc-b022-4ebc-b3a9-cbecdebd0c6f"] + 3.993803670475428*^9}, 3.9938284765300827`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"3ec36cd1-b098-4f7e-af72-2c9598e48c11"] }, Open ]], Cell[CellGroupData[{ @@ -193,48 +176,42 @@ Cell[BoxData[ RowBox[{"b2", "=", "0.59439"}]], "Input", CellChangeTimes->{ 3.991799280663351*^9, {3.9938005524325247`*^9, 3.993800560808515*^9}}, - CellLabel-> - "In[1118]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], + CellLabel->"In[10]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], Cell[BoxData["0.59439`"], "Output", CellChangeTimes->{ 3.993800776226185*^9, 3.993801954993833*^9, {3.9938026712049103`*^9, 3.993802747764641*^9}, 3.993802821251552*^9, {3.993803587139648*^9, - 3.993803670490211*^9}}, - CellLabel-> - "Out[1118]=",ExpressionUUID->"736c8891-3302-46e4-bfc0-f44e850e96a0"] + 3.993803670490211*^9}, 3.993828476549179*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"8e7e288f-0691-4dc0-90d0-4b3330a3eb5c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[1119]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], + CellLabel->"In[11]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.993800776256876*^9, 3.9938019550107737`*^9, { 3.99380267122059*^9, 3.993802747779757*^9}, 3.993802821267166*^9, { - 3.993803587154791*^9, 3.993803670501927*^9}}, - CellLabel-> - "Out[1119]=",ExpressionUUID->"eac224bf-46c5-4801-80a0-7792e3034e51"] + 3.993803587154791*^9, 3.993803670501927*^9}, 3.99382847657379*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"550c1197-b226-4400-ad84-d98f0ec47335"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[1120]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], + CellLabel->"In[12]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.993800776272674*^9, 3.993801955027381*^9, { 3.993802671236315*^9, 3.993802747794403*^9}, 3.993802821282477*^9, { - 3.993803587158352*^9, 3.993803670513171*^9}}, - CellLabel-> - "Out[1120]=",ExpressionUUID->"9ef68bc3-0f6d-4c67-ad21-988666e4e3b9"] + 3.993803587158352*^9, 3.993803670513171*^9}, 3.9938284766654987`*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"816bdbc7-2ca3-4997-a638-e936dac95505"] }, Open ]], Cell[CellGroupData[{ @@ -258,16 +235,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[1121]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], + CellLabel->"In[13]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], Cell[BoxData["2.4987328480773474`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.993800776289051*^9, 3.993801955044087*^9, { 3.993802671251883*^9, 3.993802747809085*^9}, 3.9938028212979517`*^9, { - 3.9938035871856203`*^9, 3.9938036705241947`*^9}}, - CellLabel-> - "Out[1121]=",ExpressionUUID->"6af22fd7-3815-4135-b354-dd994ddc10ce"] + 3.9938035871856203`*^9, 3.9938036705241947`*^9}, 3.993828476694785*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"5f7435b7-f11e-4512-8360-1407df561afd"] }, Open ]], Cell[CellGroupData[{ @@ -291,16 +266,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[1122]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], + CellLabel->"In[14]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], Cell[BoxData["1.7169589911284653`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.993800776304994*^9, 3.993801955061472*^9, { 3.993802671267837*^9, 3.9938027478234367`*^9}, 3.9938028213134613`*^9, { - 3.9938035872015963`*^9, 3.9938036705351753`*^9}}, - CellLabel-> - "Out[1122]=",ExpressionUUID->"098d791b-db28-40e9-a42d-63296949ae59"] + 3.9938035872015963`*^9, 3.9938036705351753`*^9}, 3.993828476704319*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"0c567c92-03eb-46ab-b448-3a424fbcd1b7"] }, Open ]], Cell[CellGroupData[{ @@ -353,16 +326,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[1123]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], + CellLabel->"In[15]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], Cell[BoxData["0.3507608730000904`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.993800776320915*^9, 3.993801955077899*^9, { 3.993802671285616*^9, 3.9938027478392677`*^9}, 3.993802821328992*^9, { - 3.993803587217046*^9, 3.993803670546205*^9}}, - CellLabel-> - "Out[1123]=",ExpressionUUID->"bbdaf0a1-4fe0-43d0-954b-b10150a28ce3"] + 3.993803587217046*^9, 3.993803670546205*^9}, 3.993828476812595*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"4f497da0-eb8b-4801-a035-cbb961f99d6e"] }, Open ]], Cell[CellGroupData[{ @@ -411,17 +382,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}]]}]], "Input", - CellLabel-> - "In[1124]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], + CellLabel->"In[16]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], Cell[BoxData[ RowBox[{"-", "0.1076302078509941`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.9938007763370247`*^9, 3.993801955093937*^9, { 3.993802671301764*^9, 3.993802747854802*^9}, 3.993802821344532*^9, { - 3.993803587232232*^9, 3.993803670558001*^9}}, - CellLabel-> - "Out[1124]=",ExpressionUUID->"c30ec92b-18ff-48ee-b87e-f07bb754df49"] + 3.993803587232232*^9, 3.993803670558001*^9}, 3.993828476825944*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"cb5274a6-9cc0-427c-96fc-e9bf7ff15817"] }, Open ]], Cell[CellGroupData[{ @@ -470,17 +439,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}]]}]], "Input", - CellLabel-> - "In[1125]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], + CellLabel->"In[17]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], Cell[BoxData[ RowBox[{"-", "0.40368202266316894`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.9938007763528843`*^9, 3.9938019551103783`*^9, { 3.9938026713191147`*^9, 3.993802747870304*^9}, 3.993802821359898*^9, { - 3.993803587247026*^9, 3.9938036705701017`*^9}}, - CellLabel-> - "Out[1125]=",ExpressionUUID->"e028a985-70df-495e-a50f-93d8b5b0befc"] + 3.993803587247026*^9, 3.9938036705701017`*^9}, 3.993828476842184*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"bda5bf8d-6b43-4bb6-823d-cc16baac2807"] }, Open ]], Cell[CellGroupData[{ @@ -533,64 +500,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[1126]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], + CellLabel->"In[18]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], Cell[BoxData["0.5671765418692641`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9938007763688097`*^9, 3.993801955127124*^9, { 3.993802671337201*^9, 3.99380274788591*^9}, 3.993802821375526*^9, { - 3.993803587262051*^9, 3.993803670582543*^9}}, - CellLabel-> - "Out[1126]=",ExpressionUUID->"a5f92457-dde9-47e6-a08f-b7e5a8cdf4a3"] + 3.993803587262051*^9, 3.993803670582543*^9}, 3.993828476854589*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"7dfe4cee-db17-4fb5-be4e-63cf2898d495"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[1127]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], + CellLabel->"In[19]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.993800776384469*^9, 3.99380195514393*^9, { 3.993802671355851*^9, 3.9938027479017677`*^9}, 3.9938028213910847`*^9, { - 3.993803587265461*^9, 3.9938036705956707`*^9}}, - CellLabel-> - "Out[1127]=",ExpressionUUID->"c21563ad-1e07-4833-8418-4457483ab335"] + 3.993803587265461*^9, 3.9938036705956707`*^9}, 3.993828476894196*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"41097959-05bb-4989-95d8-3456f95eeff5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[1128]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], + CellLabel->"In[20]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.993800776400263*^9, 3.993801955160005*^9, { 3.993802671372757*^9, 3.993802747917276*^9}, 3.9938028214069347`*^9, { - 3.993803587291121*^9, 3.993803670608396*^9}}, - CellLabel-> - "Out[1128]=",ExpressionUUID->"174c1caf-4eab-4387-8f88-05152b022666"] + 3.993803587291121*^9, 3.993803670608396*^9}, 3.99382847692973*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"bedc23c7-0a10-4dad-96ef-c787984455f3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[1129]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], + CellLabel->"In[21]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.993800776415701*^9, 3.993801955176228*^9, { 3.9938026713885727`*^9, 3.9938027479333763`*^9}, 3.9938028214226522`*^9, { - 3.993803587306354*^9, 3.993803670621553*^9}}, - CellLabel-> - "Out[1129]=",ExpressionUUID->"cbc26c3c-8816-474e-b1b7-35ffdbd0a8d8"] + 3.993803587306354*^9, 3.993803670621553*^9}, 3.9938284769423637`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"80fd016a-4ce7-42b8-8652-b736906c5b61"] }, Open ]], Cell[CellGroupData[{ @@ -599,33 +558,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[1130]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], + CellLabel->"In[22]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.993800776431301*^9, 3.993801955193372*^9, { 3.993802671403956*^9, 3.9938027479492397`*^9}, 3.9938028214382277`*^9, { - 3.993803587321618*^9, 3.993803670634707*^9}}, - CellLabel-> - "Out[1130]=",ExpressionUUID->"b2f0f611-c391-469d-baa0-8506d21f99b8"] + 3.993803587321618*^9, 3.993803670634707*^9}, 3.993828476954886*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"240a379a-7034-4472-9a55-9a9bc0447afc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[1131]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], + CellLabel->"In[23]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.9938007764469233`*^9, 3.9938019552102613`*^9, { 3.9938026714206*^9, 3.993802747964871*^9}, 3.993802821453787*^9, { - 3.993803587336917*^9, 3.9938036706484222`*^9}}, - CellLabel-> - "Out[1131]=",ExpressionUUID->"b88be73c-7718-4a1a-8323-650f9570c525"] + 3.993803587336917*^9, 3.9938036706484222`*^9}, 3.9938284769645023`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"deec1b37-437b-458c-84a2-7cc146a11bd4"] }, Open ]], Cell[CellGroupData[{ @@ -635,16 +590,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.993800689005188*^9, 3.993800698859473*^9}}, - CellLabel-> - "In[1132]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], + CellLabel->"In[24]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.993800776462777*^9, 3.993801955228032*^9, { 3.9938026714376583`*^9, 3.99380274798144*^9}, 3.993802821469448*^9, { - 3.993803587352215*^9, 3.9938036706619053`*^9}}, - CellLabel-> - "Out[1132]=",ExpressionUUID->"c7780cf2-61a4-4684-ba67-5a69c1485a49"] + 3.993803587352215*^9, 3.9938036706619053`*^9}, 3.9938284769739017`*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"99e4e873-f126-4fe4-bfd3-fd1593959bfc"] }, Open ]], Cell[CellGroupData[{ @@ -654,16 +607,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.993800702787973*^9, 3.993800703931004*^9}}, - CellLabel-> - "In[1133]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], + CellLabel->"In[25]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.993800776478297*^9, 3.993801955245349*^9, { 3.993802671454508*^9, 3.993802747997691*^9}, 3.993802821484852*^9, { - 3.993803587367502*^9, 3.9938036706754093`*^9}}, - CellLabel-> - "Out[1133]=",ExpressionUUID->"070c669c-3e3b-4882-9861-b96b20aa8b9f"] + 3.993803587367502*^9, 3.9938036706754093`*^9}, 3.993828476982664*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"d48be497-3ebe-4301-b257-21a76b3db031"] }, Open ]], Cell[CellGroupData[{ @@ -672,16 +623,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[1134]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], + CellLabel->"In[26]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], Cell[BoxData["84"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.993800776493824*^9, 3.993801955261796*^9, { 3.993802671472805*^9, 3.993802748017583*^9}, 3.99380282150027*^9, { - 3.993803587382532*^9, 3.993803670687777*^9}}, - CellLabel-> - "Out[1134]=",ExpressionUUID->"11617050-f34a-4635-8691-c3b2850c28e1"] + 3.993803587382532*^9, 3.993803670687777*^9}, 3.9938284769932127`*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"3a900e19-9638-4515-a9c2-2bb4ac1c2276"] }, Open ]], Cell[CellGroupData[{ @@ -696,16 +645,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[1135]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], + CellLabel->"In[27]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], Cell[BoxData["0.10842105263157895`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9938007765094976`*^9, 3.9938019552787237`*^9, { 3.993802671491748*^9, 3.9938027480331593`*^9}, 3.9938028215155582`*^9, { - 3.993803587397368*^9, 3.9938036706998672`*^9}}, - CellLabel-> - "Out[1135]=",ExpressionUUID->"8dfae296-be04-4f5f-b1cf-c403038a206b"] + 3.993803587397368*^9, 3.9938036706998672`*^9}, 3.993828476999996*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"4799c727-8fae-4168-bf22-8f28b88e2a12"] }, Open ]], Cell[CellGroupData[{ @@ -720,17 +667,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[1136]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], + CellLabel->"In[28]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], Cell[BoxData[ RowBox[{"-", "2.566315789473684`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.9938007765252047`*^9, 3.9938019552955627`*^9, { 3.9938026715153112`*^9, 3.993802748050967*^9}, 3.9938028215315247`*^9, { - 3.993803587413514*^9, 3.9938036707132397`*^9}}, - CellLabel-> - "Out[1136]=",ExpressionUUID->"7a4a38b7-1cc7-42b0-97c3-3c6dfc7e588a"] + 3.993803587413514*^9, 3.9938036707132397`*^9}, 3.993828477009905*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"d53a8288-863f-451c-b59d-b14f7d63bd2b"] }, Open ]], Cell[CellGroupData[{ @@ -761,16 +706,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[1137]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], + CellLabel->"In[29]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], Cell[BoxData["19.255392789884887`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.993800776541044*^9, 3.993801955312595*^9, { 3.99380267153469*^9, 3.993802748068204*^9}, 3.993802821546997*^9, { - 3.9938035874293547`*^9, 3.993803670724801*^9}}, - CellLabel-> - "Out[1137]=",ExpressionUUID->"41c885ce-3cb4-40a5-9abb-bda969d37a01"] + 3.9938035874293547`*^9, 3.993803670724801*^9}, 3.993828477017077*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"44b6b4bd-cfbd-442b-886f-723c4bd5a3a2"] }, Open ]], Cell[CellGroupData[{ @@ -778,16 +721,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[1138]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], + CellLabel->"In[30]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.993800776556777*^9, 3.993801955328986*^9, { 3.993802671551854*^9, 3.993802748085292*^9}, 3.9938028215632277`*^9, { - 3.993803587445024*^9, 3.993803670737692*^9}}, - CellLabel-> - "Out[1138]=",ExpressionUUID->"aedf5ec0-14fc-47c5-9c14-e152179e101c"] + 3.993803587445024*^9, 3.993803670737692*^9}, 3.993828477025938*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"b5500a4e-ef2f-46eb-9d48-3b43a8031bf9"] }, Open ]], Cell[CellGroupData[{ @@ -797,22 +738,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.99380058189814*^9, 3.993800584279264*^9}}, - CellLabel-> - "In[1139]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], + CellLabel->"In[31]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], Cell[BoxData["1.63`"], "Output", CellChangeTimes->{ 3.993800776587946*^9, 3.993801955345385*^9, {3.993802671570458*^9, 3.993802748111987*^9}, 3.9938028215786963`*^9, {3.9938035874604197`*^9, - 3.993803670750949*^9}}, - CellLabel-> - "Out[1139]=",ExpressionUUID->"dbdc050c-b0b5-4b4d-ad8e-bc38762c0e26"] + 3.993803670750949*^9}, 3.993828477032508*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"70719225-e118-4778-ba9a-634f7f9d69bc"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[1140]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], + CellLabel->"In[32]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ @@ -821,22 +759,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.993800591017771*^9, 3.993800594019471*^9}}, - CellLabel-> - "In[1141]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], + CellLabel->"In[33]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], Cell[BoxData["0.856`"], "Output", CellChangeTimes->{ 3.9938007766183*^9, 3.993801955394834*^9, {3.99380267161954*^9, 3.993802748161004*^9}, 3.993802821625576*^9, {3.993803587507737*^9, - 3.993803670776819*^9}}, - CellLabel-> - "Out[1141]=",ExpressionUUID->"412a4f8d-5c42-4b49-b53b-3f42decb7873"] + 3.993803670776819*^9}, 3.993828477045567*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"7345c58d-0c2a-4f56-be00-c771c2e6cd3b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[1142]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], + CellLabel->"In[34]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ @@ -845,22 +780,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9938005968681726`*^9, 3.9938005993167686`*^9}}, - CellLabel-> - "In[1143]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], + CellLabel->"In[35]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], Cell[BoxData["2.615`"], "Output", CellChangeTimes->{ 3.993800776636183*^9, 3.9938019554430428`*^9, {3.993802671677952*^9, 3.993802748207687*^9}, 3.993802821672069*^9, {3.993803587556972*^9, - 3.993803670795989*^9}}, - CellLabel-> - "Out[1143]=",ExpressionUUID->"a71e31c2-a73a-43e0-a6aa-15127985af1c"] + 3.993803670795989*^9}, 3.993828477058463*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"ab7fca09-5532-4f5d-99f3-e742b369c962"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[1144]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], + CellLabel->"In[36]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ @@ -869,22 +801,19 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.993800602507454*^9, 3.993800603056312*^9}}, - CellLabel-> - "In[1145]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], + CellLabel->"In[37]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], Cell[BoxData["1.23`"], "Output", CellChangeTimes->{ 3.9938007766784554`*^9, 3.993801955495077*^9, {3.993802671729157*^9, 3.993802748254798*^9}, 3.993802821718618*^9, {3.9938035876039553`*^9, - 3.9938036708157063`*^9}}, - CellLabel-> - "Out[1145]=",ExpressionUUID->"52315ab7-ef5e-4806-bc73-b205a9aaa5e9"] + 3.9938036708157063`*^9}, 3.993828477071804*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"57b742e1-f6e0-4ad0-8d69-4557e672a54b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[1146]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], + CellLabel->"In[38]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ @@ -893,22 +822,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.993800605567752*^9, 3.993800606070137*^9}}, - CellLabel-> - "In[1147]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], + CellLabel->"In[39]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], Cell[BoxData["2.22`"], "Output", CellChangeTimes->{ 3.993800776708939*^9, 3.993801955543845*^9, {3.993802671778071*^9, 3.993802748303585*^9}, 3.993802821766041*^9, {3.993803587650766*^9, - 3.9938036708413343`*^9}}, - CellLabel-> - "Out[1147]=",ExpressionUUID->"b7ffd05f-24b1-463c-9fae-a4620acad3a3"] + 3.9938036708413343`*^9}, 3.993828477084453*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"b3a3a7d5-dd76-4266-a01e-ce7cd97e3691"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[1148]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], + CellLabel->"In[40]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ @@ -917,22 +843,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.993800609659601*^9, 3.993800614079907*^9}}, - CellLabel-> - "In[1149]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], + CellLabel->"In[41]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], Cell[BoxData["0.559`"], "Output", CellChangeTimes->{ 3.9938007767393847`*^9, 3.993801955593616*^9, {3.993802671829995*^9, 3.993802748351069*^9}, 3.993802821813445*^9, {3.9938035876972513`*^9, - 3.993803670875149*^9}}, - CellLabel-> - "Out[1149]=",ExpressionUUID->"044250f2-e522-4746-9450-57317849f670"] + 3.993803670875149*^9}, 3.9938284771069107`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"cc58d45f-7f1d-4fef-8900-a14b6262900a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[1150]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], + CellLabel->"In[42]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ @@ -941,22 +864,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.993800618121642*^9, 3.993800621996191*^9}}, - CellLabel-> - "In[1151]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], + CellLabel->"In[43]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], Cell[BoxData["2.428`"], "Output", CellChangeTimes->{ 3.9938007767695208`*^9, 3.993801955646489*^9, {3.993802671878972*^9, 3.99380274840051*^9}, 3.993802821860149*^9, {3.9938035877441607`*^9, - 3.993803670903119*^9}}, - CellLabel-> - "Out[1151]=",ExpressionUUID->"7e4c1acd-7180-44d7-8ffc-9595f947d88c"] + 3.993803670903119*^9}, 3.993828477115588*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"90eb3c8d-6f14-4092-847d-481c30ae4397"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[1152]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], + CellLabel->"In[44]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ @@ -964,22 +884,19 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.738"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.993800626883781*^9, 3.993800632244173*^9}}, - CellLabel-> - "In[1153]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], + CellLabel->"In[45]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], Cell[BoxData["0.738`"], "Output", CellChangeTimes->{ 3.993800776800035*^9, 3.993801955694454*^9, {3.993802671926148*^9, 3.99380274844981*^9}, 3.99380282190762*^9, {3.9938035877925863`*^9, - 3.9938036709348783`*^9}}, - CellLabel-> - "Out[1153]=",ExpressionUUID->"d4efa098-5f8b-494b-a482-ab1306404601"] + 3.9938036709348783`*^9}, 3.993828477123396*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"955ebaa5-0026-4454-af3b-0211bdbf9b34"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[1154]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], + CellLabel->"In[46]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ @@ -1468,16 +1385,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[1155]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], + CellLabel->"In[47]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], Cell[BoxData["0.04132444525810279`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.993800776881694*^9, 3.993801955753645*^9, { 3.993802671993063*^9, 3.993802748523107*^9}, 3.993802821968258*^9, { - 3.993803587855629*^9, 3.993803670999495*^9}}, - CellLabel-> - "Out[1155]=",ExpressionUUID->"0ae81f7f-e531-4e1e-95d3-5e16405855ad"] + 3.993803587855629*^9, 3.993803670999495*^9}, 3.9938284772333937`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"33efb784-8f18-4184-b7c4-67d56a15845d"] }, Open ]], Cell[CellGroupData[{ @@ -1971,16 +1886,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[1156]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], + CellLabel->"In[48]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], Cell[BoxData["1.8561337112494445`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9938007769078693`*^9, 3.993801955775502*^9, { 3.993802672016849*^9, 3.993802748547914*^9}, 3.99380282199231*^9, { - 3.9938035878800983`*^9, 3.993803671028694*^9}}, - CellLabel-> - "Out[1156]=",ExpressionUUID->"6ceecb45-d6a2-4455-99bc-b69a6c442a1d"] + 3.9938035878800983`*^9, 3.993803671028694*^9}, 3.99382847732124*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"ba42b029-fd27-49f5-87bc-b0f4d7863b97"] }, Open ]], Cell[CellGroupData[{ @@ -2468,17 +2381,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[1157]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], + CellLabel->"In[49]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], Cell[BoxData[ RowBox[{"-", "12.258798326305717`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9938007769327593`*^9, 3.993801955798092*^9, { 3.9938026720456457`*^9, 3.99380274857216*^9}, 3.993802822015239*^9, { - 3.993803587903886*^9, 3.9938036710539*^9}}, - CellLabel-> - "Out[1157]=",ExpressionUUID->"724c974f-36b1-4942-8f28-e886eb8a3106"] + 3.993803587903886*^9, 3.9938036710539*^9}, 3.993828477369719*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"86d256f3-12f6-42a2-bc3f-b0766195dbe0"] }, Open ]], Cell[CellGroupData[{ @@ -3036,17 +2947,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[1158]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], + CellLabel->"In[50]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], Cell[BoxData[ RowBox[{"-", "22.790441070773312`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.9938007769622097`*^9, 3.9938019558251333`*^9, { 3.993802672094524*^9, 3.993802748600835*^9}, 3.993802822044148*^9, { - 3.993803587933173*^9, 3.993803671083523*^9}}, - CellLabel-> - "Out[1158]=",ExpressionUUID->"8769c55c-10a2-41e2-9fc9-87d9c2937f48"] + 3.993803587933173*^9, 3.993803671083523*^9}, 3.993828477436208*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"69fd7a98-96c9-4873-abd5-3799fb000fe4"] }, Open ]], Cell[CellGroupData[{ @@ -3604,17 +3513,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[1159]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], + CellLabel->"In[51]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], Cell[BoxData[ RowBox[{"-", "43.29548999246014`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.9938007769919767`*^9, 3.993801955868244*^9, { 3.993802672122458*^9, 3.993802748645914*^9}, 3.993802822070863*^9, { - 3.9938035879612713`*^9, 3.993803671112574*^9}}, - CellLabel-> - "Out[1159]=",ExpressionUUID->"a9d0ebb6-305a-455b-920d-70fa1189686d"] + 3.9938035879612713`*^9, 3.993803671112574*^9}, 3.993828477503003*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"8357bb67-e873-48bf-b135-dfbbb7be7f29"] }, Open ]], Cell[CellGroupData[{ @@ -4245,49 +4152,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[1160]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], + CellLabel->"In[52]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], Cell[BoxData[ RowBox[{"-", "161.3907844260869`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.993800777069632*^9, 3.9938019558996973`*^9, { 3.9938026721544657`*^9, 3.9938027486794643`*^9}, 3.993802822104743*^9, { - 3.993803587995325*^9, 3.993803671146261*^9}}, - CellLabel-> - "Out[1160]=",ExpressionUUID->"425077e5-7e2d-47f5-8a22-4fd00ff1193b"] + 3.993803587995325*^9, 3.993803671146261*^9}, 3.99382847757691*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"d3313996-4830-48f8-8343-457df65d2dfc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[1161]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], + CellLabel->"In[53]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9938007770877237`*^9, 3.993801955916643*^9, { 3.9938026721721487`*^9, 3.9938027486956*^9}, 3.993802822138073*^9, { - 3.993803588028162*^9, 3.993803671159233*^9}}, - CellLabel-> - "Out[1161]=",ExpressionUUID->"3783203f-cc38-46f5-92d1-2d2fcb56819a"] + 3.993803588028162*^9, 3.993803671159233*^9}, 3.993828477632544*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"0ee880b2-641f-4c79-ae9a-61b65c8a16a0"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[1162]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], + CellLabel->"In[54]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.9938007771059847`*^9, 3.99380195593331*^9, { 3.993802672187916*^9, 3.9938027487122726`*^9}, 3.993802822156447*^9, { - 3.993803588044907*^9, 3.9938036711709633`*^9}}, - CellLabel-> - "Out[1162]=",ExpressionUUID->"ee38e47c-29ce-4ddf-96a5-e3837258b633"] + 3.993803588044907*^9, 3.9938036711709633`*^9}, 3.9938284776655903`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"065fd7ba-5692-45fb-909d-1d14884a135e"] }, Open ]], Cell[CellGroupData[{ @@ -4331,16 +4232,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[1163]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], + CellLabel->"In[55]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], Cell[BoxData["68.50484772769052`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.993800777122861*^9, 3.99380195595057*^9, { 3.9938026722039537`*^9, 3.9938027487289467`*^9}, 3.993802822174095*^9, { - 3.993803588061635*^9, 3.993803671182822*^9}}, - CellLabel-> - "Out[1163]=",ExpressionUUID->"99655031-f870-4102-8082-e088446433f4"] + 3.993803588061635*^9, 3.993803671182822*^9}, 3.9938284776968927`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"ec7d34c2-929e-4690-85cd-2b60d03961a9"] }, Open ]], Cell[CellGroupData[{ @@ -4380,17 +4279,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[1164]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], + CellLabel->"In[56]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], Cell[BoxData[ RowBox[{"-", "63.03136165702115`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.993800777139863*^9, 3.993801955967062*^9, { 3.993802672219776*^9, 3.9938027487454987`*^9}, 3.993802822191181*^9, { - 3.9938035880780478`*^9, 3.99380367119495*^9}}, - CellLabel-> - "Out[1164]=",ExpressionUUID->"c2bb82db-5f98-4e8c-b4b6-71e5e906a841"] + 3.9938035880780478`*^9, 3.99380367119495*^9}, 3.99382847772574*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"a413a0ad-ffae-4425-83c8-862a05f77443"] }, Open ]], Cell[CellGroupData[{ @@ -4434,108 +4331,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[1165]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], + CellLabel->"In[57]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], Cell[BoxData["78.36655133019532`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.993800777156836*^9, 3.993801955985046*^9, { 3.993802672236104*^9, 3.9938027487612762`*^9}, 3.993802822207035*^9, { - 3.993803588095743*^9, 3.993803671207213*^9}}, - CellLabel-> - "Out[1165]=",ExpressionUUID->"99da5799-3e8b-4453-9e1a-c230b78a04b0"] + 3.993803588095743*^9, 3.993803671207213*^9}, 3.9938284777533092`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"bfa78bc3-ea4d-4128-9335-e97b6fa70b71"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[1166]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], + CellLabel->"In[58]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], Cell[BoxData["0.3507608730000904`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.993800777173678*^9, 3.9938019560022707`*^9, { 3.9938026722521267`*^9, 3.993802748776864*^9}, 3.9938028222235823`*^9, { - 3.993803588111733*^9, 3.993803671219968*^9}}, - CellLabel-> - "Out[1166]=",ExpressionUUID->"679837b1-4f59-4d0f-a471-ef61faa6a605"] + 3.993803588111733*^9, 3.993803671219968*^9}, 3.993828477783373*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"41553c76-06d5-4364-b9c8-aafd48f63229"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[1167]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], + CellLabel->"In[59]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], Cell[BoxData[ RowBox[{"-", "0.1076302078509941`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.993800777190844*^9, 3.9938019560194187`*^9, { 3.993802672268169*^9, 3.9938027487928667`*^9}, 3.993802822239389*^9, { - 3.993803588127493*^9, 3.993803671233239*^9}}, - CellLabel-> - "Out[1167]=",ExpressionUUID->"ddae6cf7-f44e-419a-8123-b4d2a554e6a6"] + 3.993803588127493*^9, 3.993803671233239*^9}, 3.993828477816463*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"ec2c2bb1-7dc6-459a-8cb0-e1fb43bc4e79"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[1168]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], + CellLabel->"In[60]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], Cell[BoxData[ RowBox[{"-", "0.40368202266316894`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.9938007772073803`*^9, 3.993801956036744*^9, { 3.993802672284265*^9, 3.993802748808551*^9}, 3.9938028222550507`*^9, { - 3.993803588143165*^9, 3.993803671247344*^9}}, - CellLabel-> - "Out[1168]=",ExpressionUUID->"91cdb290-7457-4966-8978-72dfc2d417db"] + 3.993803588143165*^9, 3.993803671247344*^9}, 3.9938284778478107`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"ade94e5b-c48e-4ec9-843f-f4967eee8f4a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[1169]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], + CellLabel->"In[61]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], Cell[BoxData["0.5671765418692641`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.99380077722381*^9, 3.99380195605359*^9, { 3.99380267230028*^9, 3.993802748824264*^9}, 3.993802822270421*^9, { - 3.9938035881589603`*^9, 3.993803671262602*^9}}, - CellLabel-> - "Out[1169]=",ExpressionUUID->"7f2d0a7b-0a0f-47b0-a769-96b161fac9bc"] + 3.9938035881589603`*^9, 3.993803671262602*^9}, 3.9938284778809633`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"079226ab-70fc-4eb7-aa19-6eaa133ea487"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[1170]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], + CellLabel->"In[62]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], Cell[BoxData["2.4987328480773474`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.99380077723999*^9, 3.9938019560701323`*^9, { 3.99380267231618*^9, 3.993802748839958*^9}, 3.993802822285783*^9, { - 3.9938035881747913`*^9, 3.993803671266725*^9}}, - CellLabel-> - "Out[1170]=",ExpressionUUID->"56ea5377-3e71-404c-9064-8f7670eee126"] + 3.9938035881747913`*^9, 3.993803671266725*^9}, 3.993828477891029*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"3f66fd96-9980-4875-8149-7dbe0a36b079"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[1171]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], + CellLabel->"In[63]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], Cell[BoxData["1.7169589911284653`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.99380077725603*^9, 3.993801956086666*^9, { 3.9938026723320913`*^9, 3.993802748856078*^9}, 3.993802822300988*^9, { - 3.9938035881912737`*^9, 3.9938036712790813`*^9}}, - CellLabel-> - "Out[1171]=",ExpressionUUID->"713f3c61-01cb-4454-867c-8c79c8f43cd9"] + 3.9938035881912737`*^9, 3.9938036712790813`*^9}, 3.993828477919715*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"ee240bd8-c764-45e0-a476-3b6e7ce6ac6d"] }, Open ]], Cell[CellGroupData[{ @@ -4556,17 +4439,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[1172]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], + CellLabel->"In[64]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], Cell[BoxData[ RowBox[{"-", "26.975748857822108`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.993800777272346*^9, 3.993801956103663*^9, { 3.993802672348072*^9, 3.9938027488719177`*^9}, 3.9938028223163843`*^9, { - 3.993803588207057*^9, 3.993803671292569*^9}}, - CellLabel-> - "Out[1172]=",ExpressionUUID->"fc8af811-1811-4792-9ec3-b2889660aaec"] + 3.993803588207057*^9, 3.993803671292569*^9}, 3.993828477947556*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"8f70dd61-68f4-4c28-9387-a7b9ea4bf09c"] }, Open ]], Cell[CellGroupData[{ @@ -4587,17 +4468,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[1173]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], + CellLabel->"In[65]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], Cell[BoxData[ RowBox[{"-", "9.274238671929899`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.993800777288783*^9, 3.993801956120541*^9, { 3.993802672364458*^9, 3.993802748887658*^9}, 3.99380282233222*^9, { - 3.993803588227901*^9, 3.9938036713059*^9}}, - CellLabel-> - "Out[1173]=",ExpressionUUID->"f24e52e8-8458-4c97-864c-b934ca47be42"] + 3.993803588227901*^9, 3.9938036713059*^9}, 3.993828477972454*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"ce46689a-2878-40ba-9d85-daed1d37baa8"] }, Open ]], Cell[CellGroupData[{ @@ -4662,16 +4541,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[1174]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], + CellLabel->"In[66]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], Cell[BoxData["41.529098869868406`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.993800777305213*^9, 3.993801956138081*^9, { 3.99380267238068*^9, 3.993802748904031*^9}, 3.9938028223479433`*^9, { - 3.99380358824424*^9, 3.993803671318845*^9}}, - CellLabel-> - "Out[1174]=",ExpressionUUID->"90c82ffb-533b-4bca-b1a5-338c55624b33"] + 3.99380358824424*^9, 3.993803671318845*^9}, 3.993828478019759*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"edba2fb1-cd04-4294-b09d-b74fa5b0cf5d"] }, Open ]], Cell[CellGroupData[{ @@ -4712,17 +4589,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[1175]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], + CellLabel->"In[67]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], Cell[BoxData[ RowBox[{"-", "63.03136165702115`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.993800777321735*^9, 3.993801956154997*^9, { 3.9938026723977118`*^9, 3.9938027489203997`*^9}, 3.993802822363785*^9, { - 3.993803588260324*^9, 3.993803671330945*^9}}, - CellLabel-> - "Out[1175]=",ExpressionUUID->"671fe22c-9407-4cb5-a85c-baea5b79fdac"] + 3.993803588260324*^9, 3.993803671330945*^9}, 3.9938284780582314`*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"004d7684-9abb-4fae-9eba-6182066c3631"] }, Open ]], Cell[CellGroupData[{ @@ -4788,16 +4663,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[1176]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], + CellLabel->"In[68]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], Cell[BoxData["69.09231265826543`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9938007773384323`*^9, 3.993801956172174*^9, { 3.9938026724138613`*^9, 3.993802748938077*^9}, 3.993802822380664*^9, { - 3.9938035882645397`*^9, 3.9938036713443604`*^9}}, - CellLabel-> - "Out[1176]=",ExpressionUUID->"b3a2be84-d032-43ee-8314-dd38527861a3"] + 3.9938035882645397`*^9, 3.9938036713443604`*^9}, 3.993828478093856*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"9bc27673-8da9-431a-9437-217e7be10549"] }, Open ]], Cell[CellGroupData[{ @@ -4855,16 +4728,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[1177]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], + CellLabel->"In[69]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], Cell[BoxData["0.014405310234423041`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.9938007773549747`*^9, 3.993801956189353*^9, { 3.993802672430953*^9, 3.9938027489557877`*^9}, 3.9938028223998747`*^9, { - 3.99380358829243*^9, 3.993803671364808*^9}}, - CellLabel-> - "Out[1177]=",ExpressionUUID->"be46e6d8-93fe-44b6-aa4c-bb5d87cdf615"] + 3.99380358829243*^9, 3.993803671364808*^9}, 3.993828478116934*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"a8c5b3b4-a0c9-4851-9725-4103914b8ccb"] }, Open ]], Cell[CellGroupData[{ @@ -4922,16 +4793,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[1178]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], + CellLabel->"In[70]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], Cell[BoxData["351.3032034374311`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.993800777371662*^9, 3.99380195620572*^9, { 3.9938026724471073`*^9, 3.9938027489713907`*^9}, 3.9938028224237127`*^9, { - 3.9938035883102903`*^9, 3.993803671376803*^9}}, - CellLabel-> - "Out[1178]=",ExpressionUUID->"fdb4c573-41b9-4bd4-bc84-0ca4ca0b2f5f"] + 3.9938035883102903`*^9, 3.993803671376803*^9}, 3.993828478141927*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"9858da13-5b42-4250-9f76-f05155c2f62d"] }, Open ]], Cell[CellGroupData[{ @@ -4940,22 +4809,19 @@ Cell[BoxData[ RowBox[{"f1", "=", "0.87006"}]], "Input", CellChangeTimes->{ 3.991799412462593*^9, {3.9938006578923273`*^9, 3.993800663415194*^9}}, - CellLabel-> - "In[1179]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], + CellLabel->"In[71]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], Cell[BoxData["0.87006`"], "Output", CellChangeTimes->{ 3.993800777403751*^9, 3.993801956223138*^9, {3.993802672464693*^9, 3.993802748987446*^9}, 3.993802822443654*^9, {3.993803588326069*^9, - 3.993803671417911*^9}}, - CellLabel-> - "Out[1179]=",ExpressionUUID->"cc81225b-5c97-40d2-95eb-15f6147c0676"] + 3.993803671417911*^9}, 3.993828478163452*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"8650c68f-94ac-46db-9a82-a38789c5b6da"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184866880085*^9, 3.9918486688048573`*^9}}, - CellLabel-> - "In[1180]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], + CellLabel->"In[72]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ @@ -4963,22 +4829,19 @@ Cell[BoxData[ RowBox[{"f2", "=", "0.76634"}]], "Input", CellChangeTimes->{ 3.991799414288656*^9, {3.99380066583392*^9, 3.993800671460116*^9}}, - CellLabel-> - "In[1181]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], + CellLabel->"In[73]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], Cell[BoxData["0.76634`"], "Output", CellChangeTimes->{ 3.993800777434597*^9, 3.993801956275635*^9, {3.99380267251402*^9, 3.993802749035075*^9}, 3.9938028224931173`*^9, {3.9938035883730793`*^9, - 3.993803671476832*^9}}, - CellLabel-> - "Out[1181]=",ExpressionUUID->"7654c79e-e9ea-48d1-96b7-586a69afe53f"] + 3.993803671476832*^9}, 3.993828478190632*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"f24ed4fb-91cf-441d-b1da-690da94c2f17"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848669922333*^9, 3.9918486699293537`*^9}}, - CellLabel-> - "In[1182]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], + CellLabel->"In[74]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ @@ -5024,16 +4887,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[1183]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], + CellLabel->"In[75]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], Cell[BoxData["1.912822713352366`*^-53"], "Output", CellChangeTimes->{ 3.99132042156752*^9, 3.99380077747082*^9, 3.9938019563350782`*^9, { 3.9938026725618477`*^9, 3.9938027490826273`*^9}, 3.993802822544773*^9, { - 3.9938035884206953`*^9, 3.993803671548533*^9}}, - CellLabel-> - "Out[1183]=",ExpressionUUID->"4077ad00-bbb5-4781-a3e6-9ef35b09e030"] + 3.9938035884206953`*^9, 3.993803671548533*^9}, 3.9938284782051067`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"78f59270-15ee-4ee1-9428-30d59ecb9005"] }, Open ]], Cell[CellGroupData[{ @@ -5068,16 +4929,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", CellChangeTimes->{3.991557471461853*^9}, - CellLabel-> - "In[1184]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], + CellLabel->"In[76]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], Cell[BoxData["1.9302205333813654`*^-54"], "Output", CellChangeTimes->{ 3.99132042159643*^9, 3.993800777488783*^9, 3.993801956353674*^9, { 3.9938026725781393`*^9, 3.993802749098596*^9}, 3.9938028225616302`*^9, { - 3.993803588437516*^9, 3.993803671563981*^9}}, - CellLabel-> - "Out[1184]=",ExpressionUUID->"0e8d7c4a-3961-46cf-ac01-ffb12ff958fe"] + 3.993803588437516*^9, 3.993803671563981*^9}, 3.993828478212967*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"252f35f8-d28a-4383-9907-93d0c4ae9ce2"] }, Open ]], Cell[CellGroupData[{ @@ -5111,16 +4970,14 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", CellChangeTimes->{{3.991557474366678*^9, 3.99155747655138*^9}}, - CellLabel-> - "In[1185]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], + CellLabel->"In[77]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], Cell[BoxData["3.771241088645294`*^-54"], "Output", CellChangeTimes->{ 3.9913204216085243`*^9, 3.9938007775063868`*^9, 3.993801956372375*^9, { 3.993802672594429*^9, 3.993802749114253*^9}, 3.9938028225781927`*^9, { - 3.993803588455077*^9, 3.993803671580469*^9}}, - CellLabel-> - "Out[1185]=",ExpressionUUID->"087fb94b-78e5-4c0c-a672-f4b3bc5cce04"] + 3.993803588455077*^9, 3.993803671580469*^9}, 3.993828478221737*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"3ba3caa3-fbb4-411b-8ac9-6069c57e3be2"] }, Open ]], Cell[CellGroupData[{ @@ -5143,8 +5000,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel-> - "In[1186]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], + CellLabel->"In[78]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], Cell[BoxData["18.528762193323544`"], "Output", CellChangeTimes->{ @@ -5155,9 +5011,9 @@ Cell[BoxData["18.528762193323544`"], "Output", 3.992091446805294*^9}, {3.9920915031404457`*^9, 3.992091522601553*^9}, { 3.9920915619364376`*^9, 3.9920915885645847`*^9}, 3.993800777523494*^9, 3.993801956389371*^9, {3.99380267261064*^9, 3.993802749129656*^9}, - 3.993802822594466*^9, {3.993803588472273*^9, 3.993803671597074*^9}}, - CellLabel-> - "Out[1186]=",ExpressionUUID->"6c2e3fc1-fe80-4375-9d2a-8f8da4fab3b9"] + 3.993802822594466*^9, {3.993803588472273*^9, 3.993803671597074*^9}, + 3.993828478226934*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"119cdba7-a437-4429-9dde-4ab0a68ae06b"] }, Open ]], Cell[CellGroupData[{ @@ -5183,8 +5039,7 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", CellChangeTimes->{3.992086162437586*^9}, - CellLabel-> - "In[1187]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], + CellLabel->"In[79]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], Cell[BoxData["63.74278497987354`"], "Output", CellChangeTimes->{ @@ -5195,9 +5050,8 @@ Cell[BoxData["63.74278497987354`"], "Output", 3.9920915031479607`*^9, 3.9920915226223583`*^9}, {3.9920915619450817`*^9, 3.992091588571615*^9}, 3.99380077753981*^9, 3.993801956407152*^9, { 3.993802672630269*^9, 3.993802749144669*^9}, 3.9938028226108637`*^9, { - 3.993803588497011*^9, 3.993803671614519*^9}}, - CellLabel-> - "Out[1187]=",ExpressionUUID->"be3d4815-96f5-4138-93a0-4167beb06806"] + 3.993803588497011*^9, 3.993803671614519*^9}, 3.9938284782320137`*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"aeeaa7bb-50be-46e2-ad1f-02f7436bf274"] }, Open ]], Cell[CellGroupData[{ @@ -5206,8 +5060,7 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel-> - "In[1188]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], + CellLabel->"In[80]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], Cell[BoxData["0.027882910463690284`"], "Output", CellChangeTimes->{ @@ -5218,9 +5071,9 @@ Cell[BoxData["0.027882910463690284`"], "Output", 3.992091446837303*^9}, {3.9920915031795254`*^9, 3.992091522629343*^9}, { 3.9920915619686337`*^9, 3.992091588596325*^9}, 3.993800777556242*^9, 3.993801956426915*^9, {3.9938026726338863`*^9, 3.993802749160123*^9}, - 3.993802822627849*^9, {3.99380358851359*^9, 3.993803671630536*^9}}, - CellLabel-> - "Out[1188]=",ExpressionUUID->"a189d037-fc62-4a68-9f43-b53c0a14a441"] + 3.993802822627849*^9, {3.99380358851359*^9, 3.993803671630536*^9}, + 3.993828478237454*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"2f7c4ffc-f986-48c3-9eb3-376e3c1c3b62"] }, Open ]], Cell[CellGroupData[{ @@ -5230,8 +5083,7 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kw", "Qw2"]]}]], "Input", CellChangeTimes->{{3.992086303949501*^9, 3.992086304210249*^9}}, - CellLabel-> - "In[1189]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], + CellLabel->"In[81]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], Cell[BoxData["2.34760776797167`"], "Output", CellChangeTimes->{ @@ -5242,9 +5094,8 @@ Cell[BoxData["2.34760776797167`"], "Output", 3.992091522636343*^9}, {3.992091561975609*^9, 3.99209158860334*^9}, 3.9938007775730753`*^9, 3.9938019564438868`*^9, {3.9938026726623583`*^9, 3.993802749175322*^9}, 3.9938028226334267`*^9, {3.993803588530972*^9, - 3.99380367164765*^9}}, - CellLabel-> - "Out[1189]=",ExpressionUUID->"2897cea5-cfbc-44f3-a2d3-2a13d8237ca5"] + 3.99380367164765*^9}, 3.99382847826049*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"71c26d7f-827f-4319-b295-dcde211d9920"] }, Open ]], Cell[CellGroupData[{ @@ -5254,8 +5105,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qw2", "*", "hw"}], "1"]}]], "Input", CellChangeTimes->{3.992086167409481*^9}, - CellLabel-> - "In[1190]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], + CellLabel->"In[82]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], Cell[BoxData["149.643057170899`"], "Output", CellChangeTimes->{ @@ -5266,9 +5116,8 @@ Cell[BoxData["149.643057170899`"], "Output", 3.992091503209553*^9, 3.992091522657341*^9}, {3.992091561999613*^9, 3.9920915886284447`*^9}, 3.993800777589333*^9, 3.99380195645986*^9, { 3.993802672680208*^9, 3.993802749191876*^9}, 3.993802822661765*^9, { - 3.9938035885474577`*^9, 3.993803671664034*^9}}, - CellLabel-> - "Out[1190]=",ExpressionUUID->"b5293f66-9932-4ed3-9d61-33f7ac543d54"] + 3.9938035885474577`*^9, 3.993803671664034*^9}, 3.993828478266077*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"569f0f3c-2937-4552-a0ca-2f4ab33d0585"] }, Open ]], Cell[CellGroupData[{ @@ -5277,8 +5126,7 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[1191]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], + CellLabel->"In[83]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], Cell[BoxData["0.51663581723945`"], "Output", CellChangeTimes->{ @@ -5289,9 +5137,9 @@ Cell[BoxData["0.51663581723945`"], "Output", 3.992091446891386*^9}, {3.9920915032325726`*^9, 3.992091522664852*^9}, { 3.992091562006651*^9, 3.992091588636162*^9}, 3.993800777605563*^9, 3.9938019564783897`*^9, {3.993802672696494*^9, 3.993802749207642*^9}, - 3.993802822681718*^9, {3.9938035885649347`*^9, 3.993803671680444*^9}}, - CellLabel-> - "Out[1191]=",ExpressionUUID->"d31a19b6-c78f-4c79-a99e-ad4ba63329d7"] + 3.993802822681718*^9, {3.9938035885649347`*^9, 3.993803671680444*^9}, + 3.9938284782734203`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"b6388da9-1abe-4135-a809-0c0d61167d45"] }, Open ]], Cell[CellGroupData[{ @@ -5480,8 +5328,7 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[1192]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], + CellLabel->"In[84]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], Cell[BoxData["0.010728722622290637`"], "Output", CellChangeTimes->{ @@ -5492,9 +5339,8 @@ Cell[BoxData["0.010728722622290637`"], "Output", 3.992091503241564*^9, 3.9920915226853714`*^9}, {3.9920915620301514`*^9, 3.992091588657053*^9}, 3.99380077762201*^9, 3.9938019564944553`*^9, { 3.99380267271321*^9, 3.993802749223431*^9}, 3.993802822698481*^9, { - 3.993803588581601*^9, 3.993803671697555*^9}}, - CellLabel-> - "Out[1192]=",ExpressionUUID->"f100697f-6565-4935-a674-b651ea94898d"] + 3.993803588581601*^9, 3.993803671697555*^9}, 3.993828478283258*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"fddca4e6-09e7-4a1a-bb5d-adc544b6d4e5"] }, Open ]], Cell[CellGroupData[{ @@ -5508,8 +5354,7 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", Background->RGBColor[0.4, 0.6, 1, 0.33], - CellLabel-> - "In[1193]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], + CellLabel->"In[85]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], Cell[BoxData["8.556003076020414`"], "Output", CellChangeTimes->{ @@ -5520,10 +5365,9 @@ Cell[BoxData["8.556003076020414`"], "Output", 3.9920915227624416`*^9}, {3.9920915621031647`*^9, 3.9920915887305927`*^9}, 3.993800778773847*^9, 3.993801956542276*^9, {3.993802672760907*^9, 3.9938027505003*^9}, 3.993802822744279*^9, {3.993803588638727*^9, - 3.993803671749682*^9}}, + 3.993803671749682*^9}, 3.99382847853621*^9}, Background->RGBColor[0.14, 0.8, 0.14, 0.33], - CellLabel-> - "Out[1193]=",ExpressionUUID->"d838a8cf-95c2-4e40-92cd-64aaba51b8bc"] + CellLabel->"Out[85]=",ExpressionUUID->"557210f0-d884-4d4b-91e6-97c12e57ffa7"] }, Open ]], Cell[BoxData[ @@ -5535,8 +5379,7 @@ Cell[BoxData[ 3.992086184000986*^9, 3.9920862197077847`*^9}, {3.99208635879986*^9, 3.9920863634349823`*^9}, {3.9920864985362244`*^9, 3.992086501430176*^9}, { 3.9920869541635437`*^9, 3.992086954848522*^9}}, - CellLabel-> - "In[1194]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], + CellLabel->"In[86]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ @@ -5558,15 +5401,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[1195]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], + CellLabel->"In[87]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], Cell[BoxData["45.71671373826242`"], "Output", CellChangeTimes->{ 3.991320421637537*^9, 3.993800778866495*^9, {3.993803588679393*^9, - 3.993803671774583*^9}}, - CellLabel-> - "Out[1195]=",ExpressionUUID->"9662c1bb-5403-40f9-a60f-60623ece1839"] + 3.993803671774583*^9}, 3.993828478576461*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"37cf4d2b-369c-4cad-9fc5-95ee62bfceb2"] }, Open ]], Cell[CellGroupData[{ @@ -5591,15 +5432,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[1196]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], + CellLabel->"In[88]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], Cell[BoxData["63.74278497987354`"], "Output", CellChangeTimes->{ 3.9913204216685333`*^9, 3.993800778881363*^9, {3.993803588697771*^9, - 3.9938036717901287`*^9}}, - CellLabel-> - "Out[1196]=",ExpressionUUID->"4452cb12-7a45-4217-9199-749141fbcbf0"] + 3.9938036717901287`*^9}, 3.993828478599552*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"ea015850-51a8-4833-99a5-4dce36b042ac"] }, Open ]], Cell[CellGroupData[{ @@ -5608,15 +5447,13 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[1197]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], + CellLabel->"In[89]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], Cell[BoxData["0.01775104012429978`"], "Output", CellChangeTimes->{ 3.991320421698473*^9, 3.99380077889613*^9, {3.993803588714902*^9, - 3.9938036718068123`*^9}}, - CellLabel-> - "Out[1197]=",ExpressionUUID->"127df473-201b-49c4-82d2-177abca1830f"] + 3.9938036718068123`*^9}, 3.993828478627328*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"100936fb-1ecb-4f41-8eaa-1bc5d232bd67"] }, Open ]], Cell[CellGroupData[{ @@ -5625,15 +5462,13 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[1198]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], + CellLabel->"In[90]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], Cell[BoxData["2.34760776797167`"], "Output", CellChangeTimes->{ 3.991320421726494*^9, 3.993800778910874*^9, {3.9938035887307663`*^9, - 3.993803671824779*^9}}, - CellLabel-> - "Out[1198]=",ExpressionUUID->"c8f38219-85d5-4703-9051-9b3981a87d76"] + 3.993803671824779*^9}, 3.9938284786547728`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"c2e80f4c-fe76-4216-9312-901cb4e258bb"] }, Open ]], Cell[CellGroupData[{ @@ -5642,15 +5477,13 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[1199]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], + CellLabel->"In[91]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], Cell[BoxData["149.643057170899`"], "Output", CellChangeTimes->{ 3.9913204217554817`*^9, 3.993800778925551*^9, {3.993803588745379*^9, - 3.993803671842111*^9}}, - CellLabel-> - "Out[1199]=",ExpressionUUID->"1b41e950-dc06-4d17-b2ff-4978d09f679e"] + 3.993803671842111*^9}, 3.993828478679841*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"44689241-aa53-44ef-9972-62e49e2817c1"] }, Open ]], Cell[CellGroupData[{ @@ -5659,15 +5492,13 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[1200]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], + CellLabel->"In[92]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], Cell[BoxData["0.8115192199190233`"], "Output", CellChangeTimes->{ 3.9913204217855225`*^9, 3.9938007789401903`*^9, {3.993803588762589*^9, - 3.993803671860586*^9}}, - CellLabel-> - "Out[1200]=",ExpressionUUID->"e88c3f02-0a75-4095-a4a3-dd4588430d5a"] + 3.993803671860586*^9}, 3.993828478706771*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"704dcc6d-b826-473e-9590-5c2c64b8cd25"] }, Open ]], Cell[CellGroupData[{ @@ -5856,15 +5687,13 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[1201]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], + CellLabel->"In[93]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], Cell[BoxData["0.01069488697059948`"], "Output", CellChangeTimes->{ 3.9913204218154297`*^9, 3.993800778955721*^9, {3.99380358877907*^9, - 3.993803671876687*^9}}, - CellLabel-> - "Out[1201]=",ExpressionUUID->"e07ed287-894a-43bf-bfc4-cdaa0b97d0e1"] + 3.993803671876687*^9}, 3.993828478732162*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"beb6bf79-9bde-4e34-8fd2-0d75ba3442a7"] }, Open ]], Cell[CellGroupData[{ @@ -5877,15 +5706,13 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[1202]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], + CellLabel->"In[94]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], Cell[BoxData["8.569526796722895`"], "Output", CellChangeTimes->{ 3.991320422776104*^9, 3.993800780007536*^9, {3.9938035888288813`*^9, - 3.993803671924303*^9}}, - CellLabel-> - "Out[1202]=",ExpressionUUID->"87b8ff10-c1c5-411c-b2fb-86117d4ae825"] + 3.993803671924303*^9}, 3.993828478816716*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"d443b491-c103-4d3e-998d-ed5a73e28c7c"] }, Open ]], Cell[CellGroupData[{ @@ -6076,15 +5903,13 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[1203]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], + CellLabel->"In[95]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], Cell[BoxData["0.1315992849799971`"], "Output", CellChangeTimes->{ 3.9913204229248886`*^9, 3.993800780048216*^9, {3.993803588846554*^9, - 3.993803671942768*^9}}, - CellLabel-> - "Out[1203]=",ExpressionUUID->"9c6dde6d-43c6-48ee-a1de-6612102e7406"] + 3.993803671942768*^9}, 3.993828478838356*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"0798f1c3-5d55-4100-b5e1-13461a1459ed"] }, Open ]], Cell[CellGroupData[{ @@ -6097,15 +5922,13 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[1204]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], + CellLabel->"In[96]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], Cell[BoxData["2.442970236583007`"], "Output", CellChangeTimes->{ 3.9913204230053368`*^9, 3.9938007810785627`*^9, {3.99380358889415*^9, - 3.9938036720042763`*^9}}, - CellLabel-> - "Out[1204]=",ExpressionUUID->"3d4fcca7-d927-4395-9a9e-a979ae6b6ade"] + 3.9938036720042763`*^9}, 3.9938284789173813`*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"706f4f3b-3cd3-4034-b79e-4ff9c8eb6d84"] }, Open ]], Cell[CellGroupData[{ @@ -6197,15 +6020,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[1205]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], + CellLabel->"In[97]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], Cell[BoxData["0.2129709837599123`"], "Output", CellChangeTimes->{ 3.9913204230393543`*^9, 3.9938007811009912`*^9, {3.993803588910665*^9, - 3.993803672021151*^9}}, - CellLabel-> - "Out[1205]=",ExpressionUUID->"0556896e-7982-4e1d-bdf8-0fa6c6753c3b"] + 3.993803672021151*^9}, 3.993828478939561*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"3cf0d29b-2f44-4974-b674-a6f23415c970"] }, Open ]], Cell[CellGroupData[{ @@ -6294,15 +6115,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[1206]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], + CellLabel->"In[98]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], Cell[BoxData["0.7870290162400877`"], "Output", CellChangeTimes->{ 3.9913204230728855`*^9, 3.993800781116927*^9, {3.9938035889281387`*^9, - 3.993803672037575*^9}}, - CellLabel-> - "Out[1206]=",ExpressionUUID->"3715462a-60b9-41bc-9013-4cb76db3fd46"] + 3.993803672037575*^9}, 3.993828478965374*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"7af39f4a-b588-4290-b7cf-3f16ea3c49a0"] }, Open ]], Cell[CellGroupData[{ @@ -6424,22 +6243,20 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[1207]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], + CellLabel->"In[99]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], Cell[BoxData["0.16761434383624746`"], "Output", CellChangeTimes->{ 3.9913204231038837`*^9, 3.993800781133296*^9, {3.993803588954743*^9, - 3.993803672055649*^9}}, - CellLabel-> - "Out[1207]=",ExpressionUUID->"ea398a53-be70-4bc1-bb5c-ba8e109e6563"] + 3.993803672055649*^9}, 3.993828478998536*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"21be9ec1-0d06-4802-9d2b-66c5dbdc9cbc"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellLabel-> - "In[1208]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], + "In[100]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ @@ -6502,7 +6319,7 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.991799443370365*^9}, CellLabel-> - "In[1209]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], + "In[101]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], Cell[BoxData[ TemplateBox[{ @@ -6512,15 +6329,15 @@ Cell[BoxData[ 690365280604896232691808364009196154499710300200910395615617353791726122780618\ 59168189007240401361305600000000000000000000000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 1209, 37, 31384671764511293660, "Local"}, + 101, 1, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.993800781165059*^9, {3.993803588984248*^9, - 3.993803672147888*^9}}, + 3.993803672147888*^9}, 3.993828479073936*^9}, CellLabel-> "During evaluation of \ -In[1209]:=",ExpressionUUID->"6607dc32-4bdb-402d-b70d-9e56f2b8be24"], +In[101]:=",ExpressionUUID->"88784736-a3bc-46c8-a52f-507406690f82"], Cell[BoxData[ TemplateBox[{ @@ -6530,15 +6347,15 @@ Cell[BoxData[ 195595658034349202401464677180500630732895618977065149823562487835610850829791\ 647507279219584098854397542400000000000000000000000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 1209, 38, 31384671764511293660, "Local"}, + 2, 101, 2, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.993800781165059*^9, {3.993803588984248*^9, - 3.9938036721507463`*^9}}, + 3.993803672147888*^9}, 3.993828479081935*^9}, CellLabel-> "During evaluation of \ -In[1209]:=",ExpressionUUID->"6191c569-6b31-4889-9cf0-7ef4490f2f99"], +In[101]:=",ExpressionUUID->"faadbdec-843f-4ced-b49f-a551e72c0cd9"], Cell[BoxData[ TemplateBox[{ @@ -6548,37 +6365,37 @@ Cell[BoxData[ 534708182339609623235042057224042145389333640951840876043382818338780501914393\ 9061749861006442525326680942182400000000000000000000000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 1209, 39, 31384671764511293660, "Local"}, +\"", 2, 101, 3, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.993800781165059*^9, {3.993803588984248*^9, - 3.993803672153139*^9}}, + 3.993803672147888*^9}, 3.993828479087414*^9}, CellLabel-> "During evaluation of \ -In[1209]:=",ExpressionUUID->"3d23da80-972a-462c-983b-d182d5badcba"], +In[101]:=",ExpressionUUID->"aea0ec07-5db6-4c6d-b53f-15a58a39a0c5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 1209, 40, 31384671764511293660, "Local"}, +during this calculation.\"", 2, 101, 4, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.993800781165059*^9, {3.993803588984248*^9, - 3.993803672155954*^9}}, + 3.993803672147888*^9}, 3.9938284790916357`*^9}, CellLabel-> "During evaluation of \ -In[1209]:=",ExpressionUUID->"acaaa690-7b94-4890-ada0-97312a22c1d5"], +In[101]:=",ExpressionUUID->"46662c84-69f7-4c59-88ec-52f2e24fca8f"], Cell[BoxData["8.569498638602123`"], "Output", CellChangeTimes->{ 3.9913204260017204`*^9, 3.9938008052133408`*^9, {3.993803590911384*^9, - 3.993803675089636*^9}}, + 3.993803675089636*^9}, 3.993828483726253*^9}, CellLabel-> - "Out[1209]=",ExpressionUUID->"2fcc4b64-3133-4700-84dc-8ea3da919764"] + "Out[101]=",ExpressionUUID->"a7095c40-5ab0-45da-a735-88ad253bf8b2"] }, Open ]], Cell[CellGroupData[{ @@ -6642,7 +6459,7 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.9917994459475594`*^9}, CellLabel-> - "In[1210]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], + "In[102]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], Cell[BoxData[ TemplateBox[{ @@ -6652,15 +6469,15 @@ Cell[BoxData[ 690365280604896232691808364009196154499710300200910395615617353791726122780618\ 59168189007240401361305600000000000000000000000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 1210, 41, 31384671764511293660, "Local"}, + 102, 5, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204262354183`*^9, 3.993800805242496*^9, {3.993803590956093*^9, - 3.993803643866747*^9}, 3.99380367510972*^9}, + 3.993803643866747*^9}, 3.99380367510972*^9, 3.9938284838808603`*^9}, CellLabel-> "During evaluation of \ -In[1210]:=",ExpressionUUID->"39852308-2d7d-4bab-a940-f5d02d6fe2c0"], +In[102]:=",ExpressionUUID->"8d12f0c7-be4a-45f2-bb29-7402522125eb"], Cell[BoxData[ TemplateBox[{ @@ -6670,15 +6487,15 @@ Cell[BoxData[ 195595658034349202401464677180500630732895618977065149823562487835610850829791\ 647507279219584098854397542400000000000000000000000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 1210, 42, 31384671764511293660, "Local"}, + 2, 102, 6, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204262354183`*^9, 3.993800805242496*^9, {3.993803590956093*^9, - 3.993803643866747*^9}, 3.9938036751130953`*^9}, + 3.993803643866747*^9}, 3.99380367510972*^9, 3.993828483889576*^9}, CellLabel-> "During evaluation of \ -In[1210]:=",ExpressionUUID->"9c4148a3-59c0-4eb6-b59e-c4d0f1cd9a42"], +In[102]:=",ExpressionUUID->"4334a0dc-6534-4f7a-9c74-a5b458ebd8c8"], Cell[BoxData[ TemplateBox[{ @@ -6688,37 +6505,37 @@ Cell[BoxData[ 534708182339609623235042057224042145389333640951840876043382818338780501914393\ 9061749861006442525326680942182400000000000000000000000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 1210, 43, 31384671764511293660, "Local"}, +\"", 2, 102, 7, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204262354183`*^9, 3.993800805242496*^9, {3.993803590956093*^9, - 3.993803643866747*^9}, 3.993803675116249*^9}, + 3.993803643866747*^9}, 3.99380367510972*^9, 3.993828483894685*^9}, CellLabel-> "During evaluation of \ -In[1210]:=",ExpressionUUID->"4b5ea5e1-3200-4193-a4df-1bea83817f88"], +In[102]:=",ExpressionUUID->"34b7a8cc-c0d5-4575-a4aa-894c1102a211"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 1210, 44, 31384671764511293660, "Local"}, +during this calculation.\"", 2, 102, 8, 25990558358386545157, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204262354183`*^9, 3.993800805242496*^9, {3.993803590956093*^9, - 3.993803643866747*^9}, 3.993803675118723*^9}, + 3.993803643866747*^9}, 3.99380367510972*^9, 3.993828483900156*^9}, CellLabel-> "During evaluation of \ -In[1210]:=",ExpressionUUID->"c7d520ed-614d-4c54-86fc-74430c7e4964"], +In[102]:=",ExpressionUUID->"d5eaace5-ce3c-4c14-a423-474e1dd50d41"], Cell[BoxData["2.4429622093660353`"], "Output", CellChangeTimes->{ 3.991320428882721*^9, 3.993800820858308*^9, {3.9938035928194036`*^9, - 3.993803646637928*^9}, 3.9938036780573063`*^9}, + 3.993803646637928*^9}, 3.9938036780573063`*^9, 3.993828488494287*^9}, CellLabel-> - "Out[1210]=",ExpressionUUID->"95bc0050-6b46-4b7e-abe8-b4152b8cfe28"] + "Out[102]=",ExpressionUUID->"2c961a67-625b-48b5-828a-122f5261c92f"] }, Open ]], Cell[CellGroupData[{ @@ -6776,13 +6593,413 @@ Cell[BoxData[ RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{3.9917994505623856`*^9}, CellLabel-> - "In[1211]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], + "In[103]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[BoxData["$Aborted"], "Output", +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV0nk41VsXB3CNZMpUNNwiQyVFZAxrJfPMLSWEc44hFCFRkhQVEZlSprpx +JfyOMZReIVy5ZZ6izCqUqWvm3f1xnvN8nu/a37XPfo4Izd3cYS0LC8sK+fz+ +XhCJna1okkbU6t4jtcKDUmnenIsgiyZ75wqutXIhjXHz10FjWYyvsMxuK+PC +h6IPPttZy+LFCfEZ1XQuXPeUYlb7yuKRw2pphy9zYVfy9xMPcmWRb2std9k2 +Lrz70C5pv6gcnqiy+uRoz4nDYYaHTm88ggIaxZwmi+z4xFPMtLBeHqPC7FTH +zrBh3ufyMKFuedx+LqFCRosNK/Rtaq6OymO6/0h1iDQbDu6JU9dgV8B612Rd +p/VsKNHMevCjjgLeevt050IOK2bJjW76VqGAsTLn3jiwsmLxTG7lzhJFbBTq +7MV3G7DBBxRvpSnjJk+98AGvdXj+Q9LjlAJl5It3qiqlrUN2iaXV0kplHOw0 +jHhitg61WotrJ/uUccz6x8sk6XVYKid7xnaXCu4KMjtvMrYWn02IXVOJV8H7 +9e9vRDqvRV8X9sqJO0fxZsCMn47bGhQ522ps46aG2c68G5mqq/CsfHON9xU1 +FHqxn4UmugoSovpw744afnl9tkySfRWkvr6RfvVMDfdB8lGWjhVQ8Mzg2daj +hoEOiXYl3itgGHK1qcVIHY9cT+I/mbcMPjkiFobSgA1BgZeK1ZZgjsf6A10N +cI62sldk7xJc9YrTvmoAuMs4xDOZZwkClTgUM50A99kshLYNLEJYxYwgWypg +gIvVN5WwRTAdHRizZ0P8mBrl+q5nARxWi3L+8EO0K5uTcY2aBwHWHTFvAxGt +pLLqoq/OQwX3dT+HO4hF8wLCTQ7zILxLRzM7HrH/9aXM+yrz0K3a3qlahJhk +PPkfx9AcmF+ZXW89jbj9c4XdrNocqP9StHp0/hjyvUi/y7H6HwiOFrMK0jRQ +Wn5ZZqhkBpTm2GeVzmngze5ggTWZM3Bmg83wGQ8NBIm+ggOPZiBx95p3yQEa +OFy3fTrrygzsOaEXJPFYA3GS1mmjOgOHyjqX5Fs08CV3Dc/5imnQvr8weUL7 +OA6f0H3c1zEF3nKq3Q8kNbFWMaTcQGoSrBV+fok8rIl7JcdwfPckaCo/HYhQ +0sQ9/OYtCfyTwA9so6Hamti4ZYlNYHEC8vRb5oNommi7ljUgrG4CJuzdBL0e +aeKHrQcsr7lOgGtkovmf7Fr4JPTQOz2Xn0AbX6rl/66Fw5PVBu/qxuBl9X+/ +nk9qYVZExj2twjHgTJ3Yg/NauO/VlFxXCsnNB/3d2LSR8XK3LV4iefF7mXcS +2ohldz4sC49BYdCjhz50bYxoN3sg6T8KbEJKzp3d2hgk4WnyGr9DtoYXa8pH +HWzfoaN8b2UEvEWs1PPbdJDno71J1o8RUGU5fqmmRwdzLn/a0PV5BOrL+AZ+ +jurgwUnXXWf/NwJjSnlvkE0XrxqEhbLeGAFJ6clL/aiLVzoXvjRvHIGMHe6D +4nm6uBojXjO/Yxiezbi8zYrRw/PpYzGfzw1C5/MEEctEPexeDF87ZTUI3La1 +NzY808Pq++ILvMaD4PePuMbZfD2U4fhgfll2EIyTeys2N+nhniR79bbFAZjX +sajy3KyP371uNHZGDoDx42M1SqH6qPL8lsuTyn6YOyb0b9V1Awykby3M1OuD +mbG/jxndNsCvfp8sitT74Ge8YlFrhAEKCZcYvpfrg+Fxi5ThJAN8+8l1M++u +PmhJiL3I9toA93nkjrNP90LuJN9WwzkD1B2WE2Qm94LLEy7bZg9DjBEo6F8/ +/wV6WNZN9tkb4Tm1/yQmU3vAMDfQ/auzEabY6DbYRPZAqf3K+A93I7zwn41E ++/UeiKuY/754zQhXHHozf57tAdNbE4NbHhmh70PJtqI/eqCC9XOHXpMRdo2P +9UcndUM6d0l5roYxKkwnhKmmf4ILO90jb4iaoHqZUw1bZyfo/yWnJHzABFWV +k7eJ1XWChOTclzeyJshuymZh8KoTehRvSC8dM0EJuWXbsqROMPwz+oOPnQk2 +HKryP0TvhP2hLzndkkyQu4kudnSiA6YWr2u+4DDFwPDk0Ty+Dsg5V1seG2yK +nr5LQ8M+bdBKPdkmdtcUVUzG+664tsHSryueefdMcd+SE5+gXRsYBB0U+xht +ijJNBTNOem3w9dGD22xPSV+W7oLLzjYQqbc2vvrGFNG8fulnZSvEHJr8ZDdr +iku2SV3VQq1wZXrb7IFzZjidr5iv2dEMHc/iGBvPmyEj+Ezd0L/NoGDB39Tr +YYbDAutfRFQ2w1QxZ3asrxkK3q7Oms1pBpeAVdrqbTN83Zn6QzykGSw3DX1o +SjfDI3HCzuPyzaC0m5nuN2iGnW8/hMw/aoJf+toWNbbmGDS3aSTdrxEULk// +e59ujqdm/N2kLzaC71+pWqedzHF0596ZMudGWFhcOPLtgjlGHAv/NXaqEVay +KH6OAHPUP1p4+IFCI2zcvK3RONEc2Yee7Ps10wCCzaMGbR3m2BHB2b1wqQGU +raKODZn9iU/+Tfi5gecjNG1LcqmSO4H3aMubYpffw/b0m68z9p3Eyz7FEiV7 +/4HiXklDYy4LtG4snAsarIZdLRNOPuMWeF9XI/zufBXIxUZl/dV7Cst63u7n +OlgJSeunDz2oPI1RUw2Jl4rfQtEx6a7gEku8vNB1TMGyHB4qhvIuZZ7BM6u0 +IVGrN/DxU1qI3D0rzD4YrSB28TUUGiWKeQRa44kfrR4Xk0th8vyfLBcYNmh8 +Mb7GfXcJ/NLe7/zj+FnEjR3Bi00vIWO8c85LwRarYvujfGOK4PSTNLoNpx3W +u6wxUo8ohPw8A9t1t+0w6GZA8ZPoAlDe0TR/d574pJBI1bt8EO116mo8Z4+J +2usHo/nzYZDD1SRxwB53JusclnTJg4YIY7rOSRo6vzgh4dCbCzG+KRyXGmh4 +p1ve3Mw2F16/WZ2n69Gxt0r9hsM0Ew6/PaK014COppuFlGcmmZBeec7nuyEd +cbdL780JJkTVNk95mNLRbvnSUto4Exyb/h69doqOwlvF6b9GmMA7bNIT70BH +j52QX95Ncq7U8vc3SP/keCZrDRM2W+NtuVI6BnrUTeklM0FYoObjztd0TF1R +ujSXyASZeiOhjW9IX0fL6t+PmWCuavW84y0dI91uSbEnMCFmp8/7a//QkWXC +trsrmgnbe15sru2gY4MSZZV9lwliZwUfWs/SceJxNe8WHyYo2/3ICD7CQJ7O +/M99ZuT3JEx4GSswULh38GG/KRMEmqfUBZUYOIFcUoMmTPihNduScZSBkXtj +ur8ZMeHZAZY19RoMxOV8+1U9JnDP8lrymZH58dA2cw0mDIbLb0o5T6wpr/VI +jglmNYotTu4M9Kjkri+UZcIbFpUUmYsMZApnSTQdZkKCl7p8hTeZ142z4JJh +grGljv3QVQY2+I0mhksxoUTMsuRAKAN7Y2SeFoozIeKV/7nidAbaJeeEPRVi +wnnZeGXfDHKfBDWVbkEmGD7P3aSUycDUkBFqKzF7/PDzl9kk72OfCN/ChGBP +0+9FBSRP4SoP5mOC/34x18IKBrJ4028+4mSCS/x7t7zPDAxs03h7ag0T9LiH +VT17yftcZxfMZGHCvmAWLtl+khdq2S2sUjDsKZ+dO0RskHnKYJkCe+OUceYY +2SfpdG91loLTG7wuUAuk/055D3OcAh2v7R5ZWx0wkNmfLd9FQUVKiP4DIQfE +rkXPyQ4KVOunxHy3k9xeaimnnQIZ8fedx3eRvK/HUrqVgm3tV49/Eid2+HxU +q4GCUZWerezyDlgec9LxXTUF99emljn96YAsG0RrthRSwC7N+dDoJMnDM5M3 +FVBwy8rXU+4UyUuOy63mUeBbYLp39QzZx9r34CeT3N9xTVQcjcy3n5AYyqJA +ro7GeHeRODbNSzSNgvYocQ7RSLJfMc5hNI6CHOBy/hpFLHInT4z41vhMVXY0 +6T8iEGAbS4GsXlWAUjw5f9QvsjOagggW+pRRMtkXPp/8JZICbffUTt8s4vYS +HbkwCv74446Ceg6Z3/zU/VYoBTN17tHrmCT/pCLQfpeCpxJgFJFP+j05mwPv +ULDc01P+VynxSRGx4WAKCgx3ZHyoJeeLLizNBlIQtrB2Q0wdyccj+u2IaRnf +7S3rSZ9N4fH31yngWV+6Y/AjyafzfJ4FUOD26vT9+TaS5zUkOvtTICoZ5yM2 +RPpG7VsVfSlYaL/W/G2YOGPUrvgyBQ3BDjLUV3J+LY+jCnFA35HvymPkPcTb +ujV8KOh62GxjMk0sJX7FwZuCB6y8WlfWOGL52Br6pAcFr6d6rLzXETfbB10j +HunJ9LywwREDbzf5cBCrFmim0jY5Ikvc3c9S7uT/Zue7qM9Lcpmu9ODz5P6G +Wnxa/I6IBXpuwsRHFfn2wxbSZ7B9Y5kbBZFcWRZy20g+G1606Ery0i+5O0RI +H0sK230XChzTsmq3iJJcY+aCEnFkpN+XzeLkfAvf84FzZJ8jP9f6/WSfqNND +II7k13EekyHzXSn2XM4UlK7wXx+WJfb2YLxzomDoW29s7xEyHxSqcp1YpfxK +ZYsS2SdGs5tzpGDQLWdXGZL8vEQUCzH36avyLzXIPpYaqRoHCpSP6xrmapJ5 +Vr3H94kjtvX7pemS3L9qQpy4eD0VmaJPcnpG+zSDgoGfV/9OMCTO1IiqJFaq +3tIabkruY+3l70xMy+0fvW1OcuXZbDXi8ERqbdAJst+CM0+AuN9TT8bnNOnX +++dwLZ0CrrNbdTzOEN+1z35GrKQ3YONiTeZ7XBeDiMN3Xws7a0f6019xaxEX +s+s/PU0jvjbTvI+4/9fWEnMG2ScV4sr9u69v4KOhIzlv6tr6i0b66pnD2s6k +/2sy7xdi2stry+hCbLpTuI44/Km+wFE30qf5heUlcXG44AH5CyTvGchPI+73 +HTwm7UH64yWU44g5Gbmn93uSft1nkXeIFU0C3EW9ybzkmVL/3/0qBiF/+JC+ +Zq0iT+J74kJJgr6/38PhlgtxEc9QPu8VklNFYgzivsXcOg5/cv6bUrzt7/6R +gL4NAWR+6fsna2KFJoO51eskt6ifsiL+P+z4fms= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV0nk41VsXB3CNZMpUNNwiQyVFZAxrJfPMLSWEc44hFCFRkhQVEZlSprpx +JfyOMZReIVy5ZZ6izCqUqWvm3f1xnvN8nu/a37XPfo4Izd3cYS0LC8sK+fz+ +XhCJna1okkbU6t4jtcKDUmnenIsgiyZ75wqutXIhjXHz10FjWYyvsMxuK+PC +h6IPPttZy+LFCfEZ1XQuXPeUYlb7yuKRw2pphy9zYVfy9xMPcmWRb2std9k2 +Lrz70C5pv6gcnqiy+uRoz4nDYYaHTm88ggIaxZwmi+z4xFPMtLBeHqPC7FTH +zrBh3ufyMKFuedx+LqFCRosNK/Rtaq6OymO6/0h1iDQbDu6JU9dgV8B612Rd +p/VsKNHMevCjjgLeevt050IOK2bJjW76VqGAsTLn3jiwsmLxTG7lzhJFbBTq +7MV3G7DBBxRvpSnjJk+98AGvdXj+Q9LjlAJl5It3qiqlrUN2iaXV0kplHOw0 +jHhitg61WotrJ/uUccz6x8sk6XVYKid7xnaXCu4KMjtvMrYWn02IXVOJV8H7 +9e9vRDqvRV8X9sqJO0fxZsCMn47bGhQ522ps46aG2c68G5mqq/CsfHON9xU1 +FHqxn4UmugoSovpw744afnl9tkySfRWkvr6RfvVMDfdB8lGWjhVQ8Mzg2daj +hoEOiXYl3itgGHK1qcVIHY9cT+I/mbcMPjkiFobSgA1BgZeK1ZZgjsf6A10N +cI62sldk7xJc9YrTvmoAuMs4xDOZZwkClTgUM50A99kshLYNLEJYxYwgWypg +gIvVN5WwRTAdHRizZ0P8mBrl+q5nARxWi3L+8EO0K5uTcY2aBwHWHTFvAxGt +pLLqoq/OQwX3dT+HO4hF8wLCTQ7zILxLRzM7HrH/9aXM+yrz0K3a3qlahJhk +PPkfx9AcmF+ZXW89jbj9c4XdrNocqP9StHp0/hjyvUi/y7H6HwiOFrMK0jRQ +Wn5ZZqhkBpTm2GeVzmngze5ggTWZM3Bmg83wGQ8NBIm+ggOPZiBx95p3yQEa +OFy3fTrrygzsOaEXJPFYA3GS1mmjOgOHyjqX5Fs08CV3Dc/5imnQvr8weUL7 +OA6f0H3c1zEF3nKq3Q8kNbFWMaTcQGoSrBV+fok8rIl7JcdwfPckaCo/HYhQ +0sQ9/OYtCfyTwA9so6Hamti4ZYlNYHEC8vRb5oNommi7ljUgrG4CJuzdBL0e +aeKHrQcsr7lOgGtkovmf7Fr4JPTQOz2Xn0AbX6rl/66Fw5PVBu/qxuBl9X+/ +nk9qYVZExj2twjHgTJ3Yg/NauO/VlFxXCsnNB/3d2LSR8XK3LV4iefF7mXcS +2ohldz4sC49BYdCjhz50bYxoN3sg6T8KbEJKzp3d2hgk4WnyGr9DtoYXa8pH +HWzfoaN8b2UEvEWs1PPbdJDno71J1o8RUGU5fqmmRwdzLn/a0PV5BOrL+AZ+ +jurgwUnXXWf/NwJjSnlvkE0XrxqEhbLeGAFJ6clL/aiLVzoXvjRvHIGMHe6D +4nm6uBojXjO/Yxiezbi8zYrRw/PpYzGfzw1C5/MEEctEPexeDF87ZTUI3La1 +NzY808Pq++ILvMaD4PePuMbZfD2U4fhgfll2EIyTeys2N+nhniR79bbFAZjX +sajy3KyP371uNHZGDoDx42M1SqH6qPL8lsuTyn6YOyb0b9V1Awykby3M1OuD +mbG/jxndNsCvfp8sitT74Ge8YlFrhAEKCZcYvpfrg+Fxi5ThJAN8+8l1M++u +PmhJiL3I9toA93nkjrNP90LuJN9WwzkD1B2WE2Qm94LLEy7bZg9DjBEo6F8/ +/wV6WNZN9tkb4Tm1/yQmU3vAMDfQ/auzEabY6DbYRPZAqf3K+A93I7zwn41E ++/UeiKuY/754zQhXHHozf57tAdNbE4NbHhmh70PJtqI/eqCC9XOHXpMRdo2P +9UcndUM6d0l5roYxKkwnhKmmf4ILO90jb4iaoHqZUw1bZyfo/yWnJHzABFWV +k7eJ1XWChOTclzeyJshuymZh8KoTehRvSC8dM0EJuWXbsqROMPwz+oOPnQk2 +HKryP0TvhP2hLzndkkyQu4kudnSiA6YWr2u+4DDFwPDk0Ty+Dsg5V1seG2yK +nr5LQ8M+bdBKPdkmdtcUVUzG+664tsHSryueefdMcd+SE5+gXRsYBB0U+xht +ijJNBTNOem3w9dGD22xPSV+W7oLLzjYQqbc2vvrGFNG8fulnZSvEHJr8ZDdr +iku2SV3VQq1wZXrb7IFzZjidr5iv2dEMHc/iGBvPmyEj+Ezd0L/NoGDB39Tr +YYbDAutfRFQ2w1QxZ3asrxkK3q7Oms1pBpeAVdrqbTN83Zn6QzykGSw3DX1o +SjfDI3HCzuPyzaC0m5nuN2iGnW8/hMw/aoJf+toWNbbmGDS3aSTdrxEULk// +e59ujqdm/N2kLzaC71+pWqedzHF0596ZMudGWFhcOPLtgjlGHAv/NXaqEVay +KH6OAHPUP1p4+IFCI2zcvK3RONEc2Yee7Ps10wCCzaMGbR3m2BHB2b1wqQGU +raKODZn9iU/+Tfi5gecjNG1LcqmSO4H3aMubYpffw/b0m68z9p3Eyz7FEiV7 +/4HiXklDYy4LtG4snAsarIZdLRNOPuMWeF9XI/zufBXIxUZl/dV7Cst63u7n +OlgJSeunDz2oPI1RUw2Jl4rfQtEx6a7gEku8vNB1TMGyHB4qhvIuZZ7BM6u0 +IVGrN/DxU1qI3D0rzD4YrSB28TUUGiWKeQRa44kfrR4Xk0th8vyfLBcYNmh8 +Mb7GfXcJ/NLe7/zj+FnEjR3Bi00vIWO8c85LwRarYvujfGOK4PSTNLoNpx3W +u6wxUo8ohPw8A9t1t+0w6GZA8ZPoAlDe0TR/d574pJBI1bt8EO116mo8Z4+J +2usHo/nzYZDD1SRxwB53JusclnTJg4YIY7rOSRo6vzgh4dCbCzG+KRyXGmh4 +p1ve3Mw2F16/WZ2n69Gxt0r9hsM0Ew6/PaK014COppuFlGcmmZBeec7nuyEd +cbdL780JJkTVNk95mNLRbvnSUto4Exyb/h69doqOwlvF6b9GmMA7bNIT70BH +j52QX95Ncq7U8vc3SP/keCZrDRM2W+NtuVI6BnrUTeklM0FYoObjztd0TF1R +ujSXyASZeiOhjW9IX0fL6t+PmWCuavW84y0dI91uSbEnMCFmp8/7a//QkWXC +trsrmgnbe15sru2gY4MSZZV9lwliZwUfWs/SceJxNe8WHyYo2/3ICD7CQJ7O +/M99ZuT3JEx4GSswULh38GG/KRMEmqfUBZUYOIFcUoMmTPihNduScZSBkXtj +ur8ZMeHZAZY19RoMxOV8+1U9JnDP8lrymZH58dA2cw0mDIbLb0o5T6wpr/VI +jglmNYotTu4M9Kjkri+UZcIbFpUUmYsMZApnSTQdZkKCl7p8hTeZ142z4JJh +grGljv3QVQY2+I0mhksxoUTMsuRAKAN7Y2SeFoozIeKV/7nidAbaJeeEPRVi +wnnZeGXfDHKfBDWVbkEmGD7P3aSUycDUkBFqKzF7/PDzl9kk72OfCN/ChGBP +0+9FBSRP4SoP5mOC/34x18IKBrJ4028+4mSCS/x7t7zPDAxs03h7ag0T9LiH +VT17yftcZxfMZGHCvmAWLtl+khdq2S2sUjDsKZ+dO0RskHnKYJkCe+OUceYY +2SfpdG91loLTG7wuUAuk/055D3OcAh2v7R5ZWx0wkNmfLd9FQUVKiP4DIQfE +rkXPyQ4KVOunxHy3k9xeaimnnQIZ8fedx3eRvK/HUrqVgm3tV49/Eid2+HxU +q4GCUZWerezyDlgec9LxXTUF99emljn96YAsG0RrthRSwC7N+dDoJMnDM5M3 +FVBwy8rXU+4UyUuOy63mUeBbYLp39QzZx9r34CeT3N9xTVQcjcy3n5AYyqJA +ro7GeHeRODbNSzSNgvYocQ7RSLJfMc5hNI6CHOBy/hpFLHInT4z41vhMVXY0 +6T8iEGAbS4GsXlWAUjw5f9QvsjOagggW+pRRMtkXPp/8JZICbffUTt8s4vYS +HbkwCv74446Ceg6Z3/zU/VYoBTN17tHrmCT/pCLQfpeCpxJgFJFP+j05mwPv +ULDc01P+VynxSRGx4WAKCgx3ZHyoJeeLLizNBlIQtrB2Q0wdyccj+u2IaRnf +7S3rSZ9N4fH31yngWV+6Y/AjyafzfJ4FUOD26vT9+TaS5zUkOvtTICoZ5yM2 +RPpG7VsVfSlYaL/W/G2YOGPUrvgyBQ3BDjLUV3J+LY+jCnFA35HvymPkPcTb +ujV8KOh62GxjMk0sJX7FwZuCB6y8WlfWOGL52Br6pAcFr6d6rLzXETfbB10j +HunJ9LywwREDbzf5cBCrFmim0jY5Ikvc3c9S7uT/Zue7qM9Lcpmu9ODz5P6G +Wnxa/I6IBXpuwsRHFfn2wxbSZ7B9Y5kbBZFcWRZy20g+G1606Ery0i+5O0RI +H0sK230XChzTsmq3iJJcY+aCEnFkpN+XzeLkfAvf84FzZJ8jP9f6/WSfqNND +II7k13EekyHzXSn2XM4UlK7wXx+WJfb2YLxzomDoW29s7xEyHxSqcp1YpfxK +ZYsS2SdGs5tzpGDQLWdXGZL8vEQUCzH36avyLzXIPpYaqRoHCpSP6xrmapJ5 +Vr3H94kjtvX7pemS3L9qQpy4eD0VmaJPcnpG+zSDgoGfV/9OMCTO1IiqJFaq +3tIabkruY+3l70xMy+0fvW1OcuXZbDXi8ERqbdAJst+CM0+AuN9TT8bnNOnX +++dwLZ0CrrNbdTzOEN+1z35GrKQ3YONiTeZ7XBeDiMN3Xws7a0f6019xaxEX +s+s/PU0jvjbTvI+4/9fWEnMG2ScV4sr9u69v4KOhIzlv6tr6i0b66pnD2s6k +/2sy7xdi2stry+hCbLpTuI44/Km+wFE30qf5heUlcXG44AH5CyTvGchPI+73 +HTwm7UH64yWU44g5Gbmn93uSft1nkXeIFU0C3EW9ybzkmVL/3/0qBiF/+JC+ +Zq0iT+J74kJJgr6/38PhlgtxEc9QPu8VklNFYgzivsXcOg5/cv6bUrzt7/6R +gL4NAWR+6fsna2KFJoO51eskt6ifsiL+P+z4fms= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 4.248215241140599}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 4.248215241140599}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV0nk41VsXB3CNZMpUNNwiQyVFZAxrJfPMLSWEc44hFCFRkhQVEZlSprpx +JfyOMZReIVy5ZZ6izCqUqWvm3f1xnvN8nu/a37XPfo4Izd3cYS0LC8sK+fz+ +XhCJna1okkbU6t4jtcKDUmnenIsgiyZ75wqutXIhjXHz10FjWYyvsMxuK+PC +h6IPPttZy+LFCfEZ1XQuXPeUYlb7yuKRw2pphy9zYVfy9xMPcmWRb2std9k2 +Lrz70C5pv6gcnqiy+uRoz4nDYYaHTm88ggIaxZwmi+z4xFPMtLBeHqPC7FTH +zrBh3ufyMKFuedx+LqFCRosNK/Rtaq6OymO6/0h1iDQbDu6JU9dgV8B612Rd +p/VsKNHMevCjjgLeevt050IOK2bJjW76VqGAsTLn3jiwsmLxTG7lzhJFbBTq +7MV3G7DBBxRvpSnjJk+98AGvdXj+Q9LjlAJl5It3qiqlrUN2iaXV0kplHOw0 +jHhitg61WotrJ/uUccz6x8sk6XVYKid7xnaXCu4KMjtvMrYWn02IXVOJV8H7 +9e9vRDqvRV8X9sqJO0fxZsCMn47bGhQ522ps46aG2c68G5mqq/CsfHON9xU1 +FHqxn4UmugoSovpw744afnl9tkySfRWkvr6RfvVMDfdB8lGWjhVQ8Mzg2daj +hoEOiXYl3itgGHK1qcVIHY9cT+I/mbcMPjkiFobSgA1BgZeK1ZZgjsf6A10N +cI62sldk7xJc9YrTvmoAuMs4xDOZZwkClTgUM50A99kshLYNLEJYxYwgWypg +gIvVN5WwRTAdHRizZ0P8mBrl+q5nARxWi3L+8EO0K5uTcY2aBwHWHTFvAxGt +pLLqoq/OQwX3dT+HO4hF8wLCTQ7zILxLRzM7HrH/9aXM+yrz0K3a3qlahJhk +PPkfx9AcmF+ZXW89jbj9c4XdrNocqP9StHp0/hjyvUi/y7H6HwiOFrMK0jRQ +Wn5ZZqhkBpTm2GeVzmngze5ggTWZM3Bmg83wGQ8NBIm+ggOPZiBx95p3yQEa +OFy3fTrrygzsOaEXJPFYA3GS1mmjOgOHyjqX5Fs08CV3Dc/5imnQvr8weUL7 +OA6f0H3c1zEF3nKq3Q8kNbFWMaTcQGoSrBV+fok8rIl7JcdwfPckaCo/HYhQ +0sQ9/OYtCfyTwA9so6Hamti4ZYlNYHEC8vRb5oNommi7ljUgrG4CJuzdBL0e +aeKHrQcsr7lOgGtkovmf7Fr4JPTQOz2Xn0AbX6rl/66Fw5PVBu/qxuBl9X+/ +nk9qYVZExj2twjHgTJ3Yg/NauO/VlFxXCsnNB/3d2LSR8XK3LV4iefF7mXcS +2ohldz4sC49BYdCjhz50bYxoN3sg6T8KbEJKzp3d2hgk4WnyGr9DtoYXa8pH +HWzfoaN8b2UEvEWs1PPbdJDno71J1o8RUGU5fqmmRwdzLn/a0PV5BOrL+AZ+ +jurgwUnXXWf/NwJjSnlvkE0XrxqEhbLeGAFJ6clL/aiLVzoXvjRvHIGMHe6D +4nm6uBojXjO/Yxiezbi8zYrRw/PpYzGfzw1C5/MEEctEPexeDF87ZTUI3La1 +NzY808Pq++ILvMaD4PePuMbZfD2U4fhgfll2EIyTeys2N+nhniR79bbFAZjX +sajy3KyP371uNHZGDoDx42M1SqH6qPL8lsuTyn6YOyb0b9V1Awykby3M1OuD +mbG/jxndNsCvfp8sitT74Ge8YlFrhAEKCZcYvpfrg+Fxi5ThJAN8+8l1M++u +PmhJiL3I9toA93nkjrNP90LuJN9WwzkD1B2WE2Qm94LLEy7bZg9DjBEo6F8/ +/wV6WNZN9tkb4Tm1/yQmU3vAMDfQ/auzEabY6DbYRPZAqf3K+A93I7zwn41E ++/UeiKuY/754zQhXHHozf57tAdNbE4NbHhmh70PJtqI/eqCC9XOHXpMRdo2P +9UcndUM6d0l5roYxKkwnhKmmf4ILO90jb4iaoHqZUw1bZyfo/yWnJHzABFWV +k7eJ1XWChOTclzeyJshuymZh8KoTehRvSC8dM0EJuWXbsqROMPwz+oOPnQk2 +HKryP0TvhP2hLzndkkyQu4kudnSiA6YWr2u+4DDFwPDk0Ty+Dsg5V1seG2yK +nr5LQ8M+bdBKPdkmdtcUVUzG+664tsHSryueefdMcd+SE5+gXRsYBB0U+xht +ijJNBTNOem3w9dGD22xPSV+W7oLLzjYQqbc2vvrGFNG8fulnZSvEHJr8ZDdr +iku2SV3VQq1wZXrb7IFzZjidr5iv2dEMHc/iGBvPmyEj+Ezd0L/NoGDB39Tr +YYbDAutfRFQ2w1QxZ3asrxkK3q7Oms1pBpeAVdrqbTN83Zn6QzykGSw3DX1o +SjfDI3HCzuPyzaC0m5nuN2iGnW8/hMw/aoJf+toWNbbmGDS3aSTdrxEULk// +e59ujqdm/N2kLzaC71+pWqedzHF0596ZMudGWFhcOPLtgjlGHAv/NXaqEVay +KH6OAHPUP1p4+IFCI2zcvK3RONEc2Yee7Ps10wCCzaMGbR3m2BHB2b1wqQGU +raKODZn9iU/+Tfi5gecjNG1LcqmSO4H3aMubYpffw/b0m68z9p3Eyz7FEiV7 +/4HiXklDYy4LtG4snAsarIZdLRNOPuMWeF9XI/zufBXIxUZl/dV7Cst63u7n +OlgJSeunDz2oPI1RUw2Jl4rfQtEx6a7gEku8vNB1TMGyHB4qhvIuZZ7BM6u0 +IVGrN/DxU1qI3D0rzD4YrSB28TUUGiWKeQRa44kfrR4Xk0th8vyfLBcYNmh8 +Mb7GfXcJ/NLe7/zj+FnEjR3Bi00vIWO8c85LwRarYvujfGOK4PSTNLoNpx3W +u6wxUo8ohPw8A9t1t+0w6GZA8ZPoAlDe0TR/d574pJBI1bt8EO116mo8Z4+J +2usHo/nzYZDD1SRxwB53JusclnTJg4YIY7rOSRo6vzgh4dCbCzG+KRyXGmh4 +p1ve3Mw2F16/WZ2n69Gxt0r9hsM0Ew6/PaK014COppuFlGcmmZBeec7nuyEd +cbdL780JJkTVNk95mNLRbvnSUto4Exyb/h69doqOwlvF6b9GmMA7bNIT70BH +j52QX95Ncq7U8vc3SP/keCZrDRM2W+NtuVI6BnrUTeklM0FYoObjztd0TF1R +ujSXyASZeiOhjW9IX0fL6t+PmWCuavW84y0dI91uSbEnMCFmp8/7a//QkWXC +trsrmgnbe15sru2gY4MSZZV9lwliZwUfWs/SceJxNe8WHyYo2/3ICD7CQJ7O +/M99ZuT3JEx4GSswULh38GG/KRMEmqfUBZUYOIFcUoMmTPihNduScZSBkXtj +ur8ZMeHZAZY19RoMxOV8+1U9JnDP8lrymZH58dA2cw0mDIbLb0o5T6wpr/VI +jglmNYotTu4M9Kjkri+UZcIbFpUUmYsMZApnSTQdZkKCl7p8hTeZ142z4JJh +grGljv3QVQY2+I0mhksxoUTMsuRAKAN7Y2SeFoozIeKV/7nidAbaJeeEPRVi +wnnZeGXfDHKfBDWVbkEmGD7P3aSUycDUkBFqKzF7/PDzl9kk72OfCN/ChGBP +0+9FBSRP4SoP5mOC/34x18IKBrJ4028+4mSCS/x7t7zPDAxs03h7ag0T9LiH +VT17yftcZxfMZGHCvmAWLtl+khdq2S2sUjDsKZ+dO0RskHnKYJkCe+OUceYY +2SfpdG91loLTG7wuUAuk/055D3OcAh2v7R5ZWx0wkNmfLd9FQUVKiP4DIQfE +rkXPyQ4KVOunxHy3k9xeaimnnQIZ8fedx3eRvK/HUrqVgm3tV49/Eid2+HxU +q4GCUZWerezyDlgec9LxXTUF99emljn96YAsG0RrthRSwC7N+dDoJMnDM5M3 +FVBwy8rXU+4UyUuOy63mUeBbYLp39QzZx9r34CeT3N9xTVQcjcy3n5AYyqJA +ro7GeHeRODbNSzSNgvYocQ7RSLJfMc5hNI6CHOBy/hpFLHInT4z41vhMVXY0 +6T8iEGAbS4GsXlWAUjw5f9QvsjOagggW+pRRMtkXPp/8JZICbffUTt8s4vYS +HbkwCv74446Ceg6Z3/zU/VYoBTN17tHrmCT/pCLQfpeCpxJgFJFP+j05mwPv +ULDc01P+VynxSRGx4WAKCgx3ZHyoJeeLLizNBlIQtrB2Q0wdyccj+u2IaRnf +7S3rSZ9N4fH31yngWV+6Y/AjyafzfJ4FUOD26vT9+TaS5zUkOvtTICoZ5yM2 +RPpG7VsVfSlYaL/W/G2YOGPUrvgyBQ3BDjLUV3J+LY+jCnFA35HvymPkPcTb +ujV8KOh62GxjMk0sJX7FwZuCB6y8WlfWOGL52Br6pAcFr6d6rLzXETfbB10j +HunJ9LywwREDbzf5cBCrFmim0jY5Ikvc3c9S7uT/Zue7qM9Lcpmu9ODz5P6G +Wnxa/I6IBXpuwsRHFfn2wxbSZ7B9Y5kbBZFcWRZy20g+G1606Ery0i+5O0RI +H0sK230XChzTsmq3iJJcY+aCEnFkpN+XzeLkfAvf84FzZJ8jP9f6/WSfqNND +II7k13EekyHzXSn2XM4UlK7wXx+WJfb2YLxzomDoW29s7xEyHxSqcp1YpfxK +ZYsS2SdGs5tzpGDQLWdXGZL8vEQUCzH36avyLzXIPpYaqRoHCpSP6xrmapJ5 +Vr3H94kjtvX7pemS3L9qQpy4eD0VmaJPcnpG+zSDgoGfV/9OMCTO1IiqJFaq +3tIabkruY+3l70xMy+0fvW1OcuXZbDXi8ERqbdAJst+CM0+AuN9TT8bnNOnX +++dwLZ0CrrNbdTzOEN+1z35GrKQ3YONiTeZ7XBeDiMN3Xws7a0f6019xaxEX +s+s/PU0jvjbTvI+4/9fWEnMG2ScV4sr9u69v4KOhIzlv6tr6i0b66pnD2s6k +/2sy7xdi2stry+hCbLpTuI44/Km+wFE30qf5heUlcXG44AH5CyTvGchPI+73 +HTwm7UH64yWU44g5Gbmn93uSft1nkXeIFU0C3EW9ybzkmVL/3/0qBiF/+JC+ +Zq0iT+J74kJJgr6/38PhlgtxEc9QPu8VklNFYgzivsXcOg5/cv6bUrzt7/6R +gL4NAWR+6fsna2KFJoO51eskt6ifsiL+P+z4fms= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0., 4.248215241140599}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 4.248215241140599}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{ - 3.9913206956809444`*^9, {3.993803614439395*^9, 3.993803653337278*^9}}, + 3.9913206956809444`*^9, {3.993803614439395*^9, 3.993803653337278*^9}, + 3.993828789373138*^9}, CellLabel-> - "Out[1007]=",ExpressionUUID->"51a562ee-ee3f-4e15-b6de-62e66a4c064d"] + "Out[103]=",ExpressionUUID->"b1cc2f9c-2b08-4bb1-9683-67895b0bd702"] }, Open ]], Cell[CellGroupData[{ @@ -6845,274 +7062,214 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917994543716736`*^9},ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-\ -9aed2c391662"], + CellChangeTimes->{3.9917994543716736`*^9}, + CellLabel-> + "In[104]:=",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3559275616020787`*^-274\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 86, 9, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696298666*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8937274621149164`*^-243\\\", \ +\\\"67615075532642592962076366156210530912566907412833894400000000000000\\\"]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 104, 9, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.993828789634096*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], +In[104]:=",ExpressionUUID->"da7fbc17-d48d-430f-a255-0244a4cd711e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7743624682465165`*^-285\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 86, - 10, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696309664*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.341438750292505`*^-251\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 104, 10, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.9938287896383047`*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], +In[104]:=",ExpressionUUID->"b74115b7-d6d9-42f9-adfd-5bbc83511bdf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.227765210043865`*^-297\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 86, 11, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696318653*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.513429709363857`*^-259\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 104, 11, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.993828789641595*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], +In[104]:=",ExpressionUUID->"b3e03892-05d2-4c9e-ae32-9bcf676add6f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 86, 12, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913206963286114`*^9}, +during this calculation.\"", 2, 104, 12, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.993828789644617*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], +In[104]:=",ExpressionUUID->"e1f9ded6-422b-424f-8991-aefa0e2beecb"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VN0bAHCtloTsZsa+VChlmTHDeB5LsqeyRIQsWSoq2Su7RIqUpc3a +pleWmSkUhdIiFEW2QkpCvLYor9/9/XU/38+5555zz3me59wrfzBwj/dKLi6u +Gyu4uP5/net/1aiUUmRAeia3NVLWyqDjhmS4YVcsnHPxUFNs3gwo1npQsisD +rKfa7b69oUOI7b3OVV0F4P5UvfPhG3PYMCGRsdBZAaHL6bvc3zjB58c2gTOd +9bAgvO6Y1ms/MFUa7ZvqfA8GASHiOc/DYaGTdnmycxDOJ6com1QmQ4Px7aJ3 +BdMQe9EtM/JELlA+V307qL4ERedGHznuKATRw273uI1XoWvlocvRL+9AxnbT +Ght7HjRICs6lqZeCRo/TTqYvD6ZfyhhZC6XQHH+kXS2SBxn8LULNu0thbVfm +T558Hiy5PNlNCy2FyNND5IYxHtzq5/ci81kpeL2JjqLF82KYtWC6m90DoHrX +MOUq+fAkr/WRdfQy+JS97emU0Hp8axNpnWRaDrntJYIhyutRkqlhYrKrHJwF +Nrot0tfjjYFb1xcdy6E3Tvq/lZ7r0et6VOBev3L4cpRPX5S9Hg12jFmzU8ph +xOTrQ6qTAIrfWP5Lay2H35NZDyLzBTE9eIqhursCqtRElpfZgnj982prQacK +iPBJs4l/LYiaio2nx90r4G9P/HjqtCA6f12mXw6qgOihR2KtCkLYsCOwL/1C +BcS3FO/9EiyEI4mWDgbNFZBSdKZ1pdQGfBefNbAPK8FC209YTHEDNvUkLjJ3 +VgJP4x77jVs2oK5nihHFphLih5R7LA03ILVx3rlxfyVEKTR/y/TbgFWj1NT6 +kEo4mif5n0r1BpxoVZo5WVIJu6+Vq1vuF0Z3zn8vywVZIKR+NdDVWxg7Xi2y +qsVY0FITXxEYKIzXPB+XPSazwKLHUTczThjXxTzoKNnIAiPSf8Z9JcK4KXB9 +DRVYoJ1tsT/wrzBaTtkG/3eYBRKZQ8mXroug695Vf3c3sEBSjR3/+5YIKm+E +TYovWUCqTzzjWiaCJEoYc6KZBTKTm09ubBDB2yWyCsc/skDZKsi9ZkQEJ7Ov +tW77wQKt1UvUIS1RtJy4dDN5PRt2BYt/1Xwtisc2ZL29s5sNtutG+rPaRXGz +wdF/OfZs2FNQ9elvryie6Xq0XOvEBoc2l9YXv0Sx/Y9Dx2MPNriqF1Y7i4nh +4SZyQOAxNgR81UiPdRfDpWTVuLILbEiyMzd4PyeGYdsol4qa2EBitZBWrhBH +tyBXKu0NG0pF7Oa3rxPHUsnMx/UtbPj4/kBZuqw4bvuZGNz4gQ1Ku4MVdpuJ +417uT8XHh9hQb31zbVuOOAZZSrAjloj5/KM0tFwojv+WNPRf5eLAKP+9Oo1S +cWy6fneevYoDG5pZYRfqxVFdjLXYwcsBd4vXozY/xdFvdapbrRgHlkxnW97q +S6BqkO9pUOfAxVsRJUumEkjuMhaY3MoBpbVcZ7fslsCM70bXc7ZzwOo5n+F5 +bwksjFB80knlQK6xXKVVmgRe5wtT4jLkgC5aZr35LIEen7Svr7TjQPPNthN/ +fkjgz5qU+8YOxPjL9rZqMxIYah7ecmofB5Jq3XlTeCRx3/iRXX0uHPioHxJp +sV0Sxa3fB5h7c+AEPd/tVawk8q8Di85gDljkCcxYpkri3aEa55QQDihwR51t +uSyJfkNRJ+lhHGjrcChvvyOJyyqtLXGRHNgaxL+qv0USG52ctd/FcGBNZ3iW +e5cktiSlVtvHcaCX+V1taEASm1ot7DviOZCyrt5uZEYSh5xr39YlcWDkVuit +f0lSuNvOanLXeQ7UrR9mnFSSwgHZHCxO48CV4D2t81uk8GSgQ9nMBQ7sMNry ++y9Kod6l+umYDA4U9A2acx+SwpdKppoOWRwIN7HtTw6SwoCwn8VR2RywLXly +nD9CCi1WnjG5nsOB5bDsqxvOE/3dXHjeXuWAi6jNOLlSCjMcv3Z8u8kBrcia +mBuPpTBm5edX/Xkc4BvcJC7/QgpPXO2ZbcvnQNWDVaDySQprTYQWCgs5IG5Z +dXHbshRS2w50rb7NgfFyFeVKHhLu0rAtbyHcKJlZpSNMwoCvP95m3CHW+9vR +QYYyCT/YZXbx3iPWM0ZJe4clCTfxszwq73Pg9kj6yyY7Ep6Ta0rY9Q8HTu9a +drE4QEJ+/UeLw4S3SHcn7DpGwnbVhb4VDziwOn4n6X0E8fy6sl1JhHtHWaV2 +8STU7RaT4i7jwLlHFzqdskhoMtZaNUvYQ3YpoDePGP/b9UyvciKeEv253O6R +8In/upa3hIXGOzMHKkmoYNt9aHsFB77v3bHZ6wkJo9NaPC8Qrq2uePLtBQln +GaUN3wlfkZfb49dGQu9Ew2RGJQdMfi1GHB0ioaJBqVUr4XCzTNVnYyRkWZ0S +FGJxoDR/S7fIHAnLQp6HWBIeWnyR7LNMQoqNQXwMYUk7d3oVDxkLrPPpFYSt +/1kYWSdMxpGPd7P7CMeuvZR9gEzGuW1ihavYHHjopm5WrkTGpMQCZyXCY4+e +z6/aSkb3r8LPgLC8sNttBxoZ79A2d9kTdgj47XAXyWhpdS/fh3BKY/rav+Zk +3PvGRfY44afSahybvWSUofPuDSM8G9Lone9Cxt7pcINwwqptrmIz3mRs2R45 +FEz4wOb5RtNAMmYtdxsHEL4UezE4J4yYv4Gfhwvhlz2blcZiyOhdOM80I/xX +u6HdIIWMrEqnnq2Et6e5xKVnklH4uZeeEGGf77OaX6+TUeTPL7cx4n2v4oVB +6m0yXtnRYdFAuC1nU0ZyGRnXuY0tZRJeM/3MsLeKjOOvRSM9CDOs9k9tbSDj +cLta4ybCgcUzeTHNZNQ5t6FnlNiPov/O23Z8INqf3X52m/Anx41cGz+TUX3D ++3A3wgLlTx+Ej5CxsuXkGmHCxnzObs1TxPsKRvjUEfsd5jktIPuHGO9W041D +hAfFVI42rqfgoabRa3eI+JEIrJOWkKCgWlaujyFhq5f73vrJUdDO1EzwAxF/ +nIgUdUEtCjKuea0ZJ+L1Z7tSr4c+BZvUaxyOEZbbUpvC2kHB1sOf0yZLifj9 +PDnqtI+CRbtO1Hwm4r9O91zufQ8KOpl1Vf4/P2bSFS2W/Sn4Kns2t5rInwMm +DneLTlFQVN6BGVPCAc27NYd+FVDQ5doM33si/w6ttJcwuk/BPwkO5VKEr+2f +eJHJpqDSUKaDC5GvawXkVRgvKVic11n8vpgD3ccTv8aPU5DLTSE9roADgs2y +mZ1zFDQe4vUtJOqBiXKVsSqXNF4i7bOpJepFaefPglZhaaTuTtk9fIMDMfq7 +PUi60ii12f7I71wOmB248S/NSBqfRHbt7ybqkUD0zzh7K2ns6284zyHq1bWG +hFsX3aVRO6PphesVDjyyqP65NlkaF7qLuw+lc2Byn2LI9CdpHOn2WzicSMR/ +RBD3hq/S6LPKNGCGqK+nrz3J3johjTcfm1iHEPWX/4tjjd9KGQz1oRzxi+bA +xkOpXF9UZfDKu9rD6yOI9To5e645Ugb7p5TnbA5zQDnLiDKaIIOc9z7PT/v/ +P58u/MN9UQZ5DX217vpyIOLv5jajIhl0o2bMj3tx4HLcAbGqZhmMyd0YTHMl +zqP0ppvF0rIoHzr7pdmKiMfSHNbpOlkUmGudEt9ErFdny9LES1m0aF3b/lqZ +AzZcq3e6vZfF7I4w5whFDnjuOfoJhmVRd9TRp1mGA6aR8mei18jhsWCDan3i +PA2SnSs0VJNDpz9dWbYriPp66OZ4Q4gcRtm0JTh+ZIP5X7pwVKQcqubF6ye0 +s6HlYgdVO1oObXIujZe2seFTFW90UbIcTqhHm8+9ZsPEumDhhGtyuC10Tsu+ +jg2SZWY003o57HP9uc3hNhsO/56KfrleHiOEN/SFBrOBccxH/JuwPPI0Jk8P +BrGBZ7S7ZJWkPK7qE35ofoQNxT0NHw0UiPZfJ/by+bChv/ayOpsqj/d2Bpjs +cyS+hxLoXflu8pj01F5elc4GTeEYjchyeXRiOVTXLrBgQU2of4u9As6tuV0R +HMiCueukGC1nBfSI6kn768+CGUFlJbqbAopnD0jH+LBgYprub+KngDpJigej +XVkwWOM553xKAX+kNg05WrLgteVDgbPFChik9uftERUW5AYcgMFZBTwVEm1r +3V0J+iX3865cUcR+iTvUq/RKmBK2cHeoV8IK4Rm9wZly+Jrq7nCcWwVf7n7K +OhFRBua/Qs2HqRtxbahPg5ZEKYx58pxgndmEzB0u/zbO3CP+RyRWJtVvxquH +9z2ZHrsNwm9V0sp+qWJ0iLzqIc1ioJx9YEulqmPoVG7TolcBZKvRhUQObUGh +e/P2nqM34TXJUGc6fSs+5S14HRt/FRiU+osaHzUwVcFu+Z1mFgisKgj2iN2G +fYJiz4dyLoFMjKy+k8p25Nd+xNFRuwi8yi6cPU3bce5mpKxLzDnYypR6EOqq +idJZvc/c2xPgeL9wgwWXFtoLXY70iouBly9cntxbqYU/LsXaVATHgMyDWw/5 +1mihbvV5CT6fGHh9hnH/Na8WZlTURXSaxYCC/MHLFiJaWPChnv+HQAy88yw/ +ZKGihQOiA1eGrkXDth+7+C2stFDveewbjegz8Gs61d48WwtXP1YqFN4RBb1d ++Q7Xc4n+Ef4qA+pR8PoJx3HqmhaKiTAfPhWNgqKkL045+VrYWpn2peJrJDiT +tQ/8uKeF/74VDziYEAnPjXp8kp9ooXi4hOr3VxFwNX1z2KtBLfx16yHL2i0c +dmq8yDXfoo1xsaOTDVUhsG+tmV2bhjamcuq29heGgH/fq/WOmtq4Xcxfgi8t +BNJS3kZ70bTRY8dS3ZWDIfDxe4fPGUNtlAmosI7lDwGvvCFNtr02MtxuuuZ4 +noTYDSveyJ3Wxt9b5OvPyARD7bTen/kWbbxypmlhvvEY5Dc/PLj3nTZGD1Iv +uLKOQXyx1uvSdm30/JBp31Z4DMwd1XK8u7QRtL3t+2KPQUc1idY+oI3XHrwy +zjQ8BqMxC8dLZ7TxVSd57uizIBAXejjqRdLBFUXzY4aXA+Goumb3O28d9NPJ +EM1YeRhOzpMW3Xx10O70g1qd4QCIql9FmvDXwZNj639MNwVAyr4PTnxBOthj +WX2i7nwA3IkP+2QUoYP3Gi87pJMCYLC3tqsyTQcbZ2Ukhej+4HDesvPyQx1M +/7VPd+GsLzAnvDqceKmYUz0xcyHIG8RrdhY8XkfFxa2Z9FZnb5hIUg2SFaCi +762IKvkd3nBDfnLdsDAVhf5aaHORvOE/u0jjIAoV+4IEs/MbvaCuJr0iUYOK +X76/1feX9gLD5NqLlfZU3D5u48HuPQg7lCSt1xdQMeqAepzzBXdgjT+X9yqi +4vGyqUuOp91B6eGJuepbVLzHa7XG64g7rLZovelbQsUVP//03LN0h/rAxH8b +WET7+DbSLx53MKiZyYpoouJzX9eRC/xuQN3zbvD7GBVvLmlit4Qr3CKfeWjw +i4qU7up1MQsuIDasnnp5iopqGYz3xj0uMBN6Vsd4joqsGx6LlJsuUHEdzt5Y +pmLa3kwP8iYX0PjxzxZ7YRp6ZZxfRYX9sCn6XFg9jYaveu+W28Y4wWO94jVW +DBr2KmmWrfFyAtv5uowP+jR8k6ec0mXqBGFHZ++PGNKI84oe1MnvBC9d3AcE +rGiotn5Rg5a7D3zpVIv97jT8dfBKtG+1I9z9d4A8c5aGRiV3jw8LOoBB6d87 +p1JoGNtPZyvP2cN7PwkqdxoNb2QGPovutYfFL1a2pEs0TD0a35V41x4sWh/G +43UarpZ5GtRmYg+jJefHU8tpGLTJYN4k2g5Uvel1yt00PBq856cI3164oGCz +GNdLw5fvmIkrZvfAzOeDOoP9NBzt1+Va/WUP1DqnltwYomGoer/FTs4e2GP7 +OUtinIZxmZ93PffcA+F6CUG8XLpokxg3fKF+N7zc8E5+XFkXexyqJr+n2cKW +1mEXy026uJx0n2wbZQsZqYtZd1V1MXhkFfcbP1tw4VYS8NHQxbGR8b7fJrbw +62/IYr+uLnZunrjo/XsXiI9Q2tssdZFx1klJsdcGvGt941nHdFHr1ZGTpFor +mDgyGrojWBdpczYj+blWECZ9OOBjiC4WuBe22IZawbmowD2/I3URWUuuStut +oIwRIqefqIu1Ysq+N25Zwl9O3OOGXF2MT9px/km2BWQ8uDHzvkEX47pzlu5k +mwHFTW7E84UuaubGxXSGm0GxQEHPzEtd7HINm9q03wweHSmuF2/RxQ7RrnXa +MmbQp3b/onOXLu75Vnn4e/FO2HSnSn1wTBeLbp0yL64xhbq8Dq8pMTreWa+o +f2XZBL5YybuFSNIxfFh6wHXYBLgWjjj9IdHxjAFDz/iNCRjt5rZZI0dHpRHe +HJ8sE3ixgkGTUqUjv9blJv7tJtB88CavoQEdDUQoBU/8jKFbyb/0og8dkyT2 +3/z5yxD+tHHuiPnRsXmxMUPzkyFQTq0qzA2g45wXvepSvSG4friWVRREx7y2 +f7WLLhvCl4TW6EcRdLy54Lj6j74hfP+mvfdLGh1Djl7f5ncRYebO8rzGQ2L8 +iEVQu2QA3xxM85Kr6HhJxVoz/qgBdK0+bzZUQ8dEGheusTCAGndSzpWndJzq +MhM+s8IAYiV1GEuviPsvxjhbH2eC0Fn/qNe9dCRba8lp7dcH9UMfuLxXMtCL +2bwoY84AGTHK3drVDMz+oX1YczMDhBoO7pbkZuD5G/uc/HgZMC0zmf9mHQPz +5f8hGb6mQ/VHPmNNMQa67hrxz7Smg5kpJixvZGBUsbzafWdd8FQu4c21ZiBq +apqzz1Mh4vkBfxVbBjpS+ETzA6lw0Vv4TcUeBg7VK/xTvpsKj4vDU984MvBT +k8ddFKeCqIqZ4JIHA9cWmh7ZkK8DL1SGRd1DGBj7d5a1/4k2qG6SlVO5ycAL +C+VGSYJagC/fR1fkM/Di2isPns1qgoNv4oBBETH/nUqqlF5NiLszXuB4l4E5 +uz2qtt3VhN5Nj5WTKxnYFVPt1mGiCWmbndTGmhioMOKg8z1mO0ypXqJWTDKQ +++03SWvhbdDVjDtEphlo+1SNHPZHA54endgbPMvAhZbVaYnvNSCtwvwYdZGB +V+Y2GGnHaIAqg+t+9So9bJO2tnz7ZSscND8i3yCuh0KfuKte3dkCHYd28nfo +6yGXrLhsprMa1PDOknRAD6/Ifm5RoKlBQUnB5iuGeqhqPznRI6IGQb+WTPeZ +6mH2XMDL5reqsD6UFdO7Sw/viVcOFxqrgmmi/PzXg3o4wJ8RxUXbDI+K/gzM +ntVD/pendxrqbQSqcfC8RYoesmd89T2kNwJ7YIw/77weUe/xedGyClTI9NMs +MvRw4zB14XKjCtzPfnr+xlU9nOI5V0exVYG81AT6zlLi+c/zh3OPKENysGB6 +djsxf63iV07PFIFH5Oyt8Q962Pfj56mi24qQWM712KhLD+nFK5kCaYoQPzH1 +baxXD5OsvfYa7FeE074d+obf9NCEFLN1/bwCHHfJGfnxWw83Z38PNtNWAGcT +RdST0cfTb5yi9zTKwVIHj0CDnD4mSnaS3O/LQZ73RI+Foj4a+W+POZ8pB98S +q0KdN+lj3UCWxE5vOTj+ateDcE19fHN10GA7jxycs4mSeWSqjwKz1doxt2Wg +et+Hv9qB+ji9RjchZwUFXH9Uv358TB87lo6flfxEBq6IvGyTYH0sPVJNaSkj +g+nVAG27cH30Er39s8edDO/7Vhw+EaePqWFpnyIaSDB6cGtPeRbRP94sOzVD +CshHkqq2PtXHhJ5mI2MHCUhb9tFJqddH3m0CPG5UCViZYVr+vVEfZ82TwgvF +JWCUs+Zu3it9ZI2OFhR3ikM1V3y2cLs+/pzs+Ja8XxycM6ND54b10Vp2IO2u +vxhk14Tr1K5j4vGc78J8xSLAb+NUThJg4rmVnm2DySIQ/UV3S6gQE5clRgr7 +j4qA75rfStvEmLjlo+c3A7oI0HaFiBbIMPFKhLzd9VZh+Dh4fDphOxPlTx1g +lK4UBjG+w+XWjkzsenyBxh8jBEXGpyImnZi4MP/F2PqQEGieSjO+5MJEJt/c +z0prIbCZLPvQ5cFEyQeLJlMkIUj8OLvgeZiJuYEnmNZHBeF3wRmjiBgmfjej +V+aPrYduvUvtt0qY+PnWdPI/lHXge7LomnkpEzVU/I16pvhgrpTtPVbGxIY/ +MofNmvhAWKFrfjuHic6jKx59Ps4HljzSlCdPmXhTc+/r38288Ljjllf7ByZe +9nJeOJfKAxYCj7aEdDFxZXfJryRvHuja+WpOsoeJkU1cpDoDHpip/nn2wBcm +YtuZV91T3LAlf9s/P0aZOHJy50CtMzc87jYMSR1n4raDnvXxOtxgIboXNCaZ +aD5Oc4sV4gafpJPvgmeZGF6uk6XYtBZmnibmSvxm4t/xb9kvCtZC7GKWZ/Ui +sR9Lbop5p9eCkPZdddclJk7nfRh94LwWbhypnl1eZmKCcm/hLHUt/A9BTrNY + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7126,233 +7283,169 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV13k8VN0bAHCtloTsZsa+VChlmTHDeB5LsqeyRIQsWSoq2Su7RIqUpc3a +pleWmSkUhdIiFEW2QkpCvLYor9/9/XU/38+5555zz3me59wrfzBwj/dKLi6u +Gyu4uP5/net/1aiUUmRAeia3NVLWyqDjhmS4YVcsnHPxUFNs3gwo1npQsisD +rKfa7b69oUOI7b3OVV0F4P5UvfPhG3PYMCGRsdBZAaHL6bvc3zjB58c2gTOd +9bAgvO6Y1ms/MFUa7ZvqfA8GASHiOc/DYaGTdnmycxDOJ6com1QmQ4Px7aJ3 +BdMQe9EtM/JELlA+V307qL4ERedGHznuKATRw273uI1XoWvlocvRL+9AxnbT +Ght7HjRICs6lqZeCRo/TTqYvD6ZfyhhZC6XQHH+kXS2SBxn8LULNu0thbVfm +T558Hiy5PNlNCy2FyNND5IYxHtzq5/ci81kpeL2JjqLF82KYtWC6m90DoHrX +MOUq+fAkr/WRdfQy+JS97emU0Hp8axNpnWRaDrntJYIhyutRkqlhYrKrHJwF +Nrot0tfjjYFb1xcdy6E3Tvq/lZ7r0et6VOBev3L4cpRPX5S9Hg12jFmzU8ph +xOTrQ6qTAIrfWP5Lay2H35NZDyLzBTE9eIqhursCqtRElpfZgnj982prQacK +iPBJs4l/LYiaio2nx90r4G9P/HjqtCA6f12mXw6qgOihR2KtCkLYsCOwL/1C +BcS3FO/9EiyEI4mWDgbNFZBSdKZ1pdQGfBefNbAPK8FC209YTHEDNvUkLjJ3 +VgJP4x77jVs2oK5nihHFphLih5R7LA03ILVx3rlxfyVEKTR/y/TbgFWj1NT6 +kEo4mif5n0r1BpxoVZo5WVIJu6+Vq1vuF0Z3zn8vywVZIKR+NdDVWxg7Xi2y +qsVY0FITXxEYKIzXPB+XPSazwKLHUTczThjXxTzoKNnIAiPSf8Z9JcK4KXB9 +DRVYoJ1tsT/wrzBaTtkG/3eYBRKZQ8mXroug695Vf3c3sEBSjR3/+5YIKm+E +TYovWUCqTzzjWiaCJEoYc6KZBTKTm09ubBDB2yWyCsc/skDZKsi9ZkQEJ7Ov +tW77wQKt1UvUIS1RtJy4dDN5PRt2BYt/1Xwtisc2ZL29s5sNtutG+rPaRXGz +wdF/OfZs2FNQ9elvryie6Xq0XOvEBoc2l9YXv0Sx/Y9Dx2MPNriqF1Y7i4nh +4SZyQOAxNgR81UiPdRfDpWTVuLILbEiyMzd4PyeGYdsol4qa2EBitZBWrhBH +tyBXKu0NG0pF7Oa3rxPHUsnMx/UtbPj4/kBZuqw4bvuZGNz4gQ1Ku4MVdpuJ +417uT8XHh9hQb31zbVuOOAZZSrAjloj5/KM0tFwojv+WNPRf5eLAKP+9Oo1S +cWy6fneevYoDG5pZYRfqxVFdjLXYwcsBd4vXozY/xdFvdapbrRgHlkxnW97q +S6BqkO9pUOfAxVsRJUumEkjuMhaY3MoBpbVcZ7fslsCM70bXc7ZzwOo5n+F5 +bwksjFB80knlQK6xXKVVmgRe5wtT4jLkgC5aZr35LIEen7Svr7TjQPPNthN/ +fkjgz5qU+8YOxPjL9rZqMxIYah7ecmofB5Jq3XlTeCRx3/iRXX0uHPioHxJp +sV0Sxa3fB5h7c+AEPd/tVawk8q8Di85gDljkCcxYpkri3aEa55QQDihwR51t +uSyJfkNRJ+lhHGjrcChvvyOJyyqtLXGRHNgaxL+qv0USG52ctd/FcGBNZ3iW +e5cktiSlVtvHcaCX+V1taEASm1ot7DviOZCyrt5uZEYSh5xr39YlcWDkVuit +f0lSuNvOanLXeQ7UrR9mnFSSwgHZHCxO48CV4D2t81uk8GSgQ9nMBQ7sMNry ++y9Kod6l+umYDA4U9A2acx+SwpdKppoOWRwIN7HtTw6SwoCwn8VR2RywLXly +nD9CCi1WnjG5nsOB5bDsqxvOE/3dXHjeXuWAi6jNOLlSCjMcv3Z8u8kBrcia +mBuPpTBm5edX/Xkc4BvcJC7/QgpPXO2ZbcvnQNWDVaDySQprTYQWCgs5IG5Z +dXHbshRS2w50rb7NgfFyFeVKHhLu0rAtbyHcKJlZpSNMwoCvP95m3CHW+9vR +QYYyCT/YZXbx3iPWM0ZJe4clCTfxszwq73Pg9kj6yyY7Ep6Ta0rY9Q8HTu9a +drE4QEJ+/UeLw4S3SHcn7DpGwnbVhb4VDziwOn4n6X0E8fy6sl1JhHtHWaV2 +8STU7RaT4i7jwLlHFzqdskhoMtZaNUvYQ3YpoDePGP/b9UyvciKeEv253O6R +8In/upa3hIXGOzMHKkmoYNt9aHsFB77v3bHZ6wkJo9NaPC8Qrq2uePLtBQln +GaUN3wlfkZfb49dGQu9Ew2RGJQdMfi1GHB0ioaJBqVUr4XCzTNVnYyRkWZ0S +FGJxoDR/S7fIHAnLQp6HWBIeWnyR7LNMQoqNQXwMYUk7d3oVDxkLrPPpFYSt +/1kYWSdMxpGPd7P7CMeuvZR9gEzGuW1ihavYHHjopm5WrkTGpMQCZyXCY4+e +z6/aSkb3r8LPgLC8sNttBxoZ79A2d9kTdgj47XAXyWhpdS/fh3BKY/rav+Zk +3PvGRfY44afSahybvWSUofPuDSM8G9Lone9Cxt7pcINwwqptrmIz3mRs2R45 +FEz4wOb5RtNAMmYtdxsHEL4UezE4J4yYv4Gfhwvhlz2blcZiyOhdOM80I/xX +u6HdIIWMrEqnnq2Et6e5xKVnklH4uZeeEGGf77OaX6+TUeTPL7cx4n2v4oVB +6m0yXtnRYdFAuC1nU0ZyGRnXuY0tZRJeM/3MsLeKjOOvRSM9CDOs9k9tbSDj +cLta4ybCgcUzeTHNZNQ5t6FnlNiPov/O23Z8INqf3X52m/Anx41cGz+TUX3D ++3A3wgLlTx+Ej5CxsuXkGmHCxnzObs1TxPsKRvjUEfsd5jktIPuHGO9W041D +hAfFVI42rqfgoabRa3eI+JEIrJOWkKCgWlaujyFhq5f73vrJUdDO1EzwAxF/ +nIgUdUEtCjKuea0ZJ+L1Z7tSr4c+BZvUaxyOEZbbUpvC2kHB1sOf0yZLifj9 +PDnqtI+CRbtO1Hwm4r9O91zufQ8KOpl1Vf4/P2bSFS2W/Sn4Kns2t5rInwMm +DneLTlFQVN6BGVPCAc27NYd+FVDQ5doM33si/w6ttJcwuk/BPwkO5VKEr+2f +eJHJpqDSUKaDC5GvawXkVRgvKVic11n8vpgD3ccTv8aPU5DLTSE9roADgs2y +mZ1zFDQe4vUtJOqBiXKVsSqXNF4i7bOpJepFaefPglZhaaTuTtk9fIMDMfq7 +PUi60ii12f7I71wOmB248S/NSBqfRHbt7ybqkUD0zzh7K2ns6284zyHq1bWG +hFsX3aVRO6PphesVDjyyqP65NlkaF7qLuw+lc2Byn2LI9CdpHOn2WzicSMR/ +RBD3hq/S6LPKNGCGqK+nrz3J3johjTcfm1iHEPWX/4tjjd9KGQz1oRzxi+bA +xkOpXF9UZfDKu9rD6yOI9To5e645Ugb7p5TnbA5zQDnLiDKaIIOc9z7PT/v/ +P58u/MN9UQZ5DX217vpyIOLv5jajIhl0o2bMj3tx4HLcAbGqZhmMyd0YTHMl +zqP0ppvF0rIoHzr7pdmKiMfSHNbpOlkUmGudEt9ErFdny9LES1m0aF3b/lqZ +AzZcq3e6vZfF7I4w5whFDnjuOfoJhmVRd9TRp1mGA6aR8mei18jhsWCDan3i +PA2SnSs0VJNDpz9dWbYriPp66OZ4Q4gcRtm0JTh+ZIP5X7pwVKQcqubF6ye0 +s6HlYgdVO1oObXIujZe2seFTFW90UbIcTqhHm8+9ZsPEumDhhGtyuC10Tsu+ +jg2SZWY003o57HP9uc3hNhsO/56KfrleHiOEN/SFBrOBccxH/JuwPPI0Jk8P +BrGBZ7S7ZJWkPK7qE35ofoQNxT0NHw0UiPZfJ/by+bChv/ayOpsqj/d2Bpjs +cyS+hxLoXflu8pj01F5elc4GTeEYjchyeXRiOVTXLrBgQU2of4u9As6tuV0R +HMiCueukGC1nBfSI6kn768+CGUFlJbqbAopnD0jH+LBgYprub+KngDpJigej +XVkwWOM553xKAX+kNg05WrLgteVDgbPFChik9uftERUW5AYcgMFZBTwVEm1r +3V0J+iX3865cUcR+iTvUq/RKmBK2cHeoV8IK4Rm9wZly+Jrq7nCcWwVf7n7K +OhFRBua/Qs2HqRtxbahPg5ZEKYx58pxgndmEzB0u/zbO3CP+RyRWJtVvxquH +9z2ZHrsNwm9V0sp+qWJ0iLzqIc1ioJx9YEulqmPoVG7TolcBZKvRhUQObUGh +e/P2nqM34TXJUGc6fSs+5S14HRt/FRiU+osaHzUwVcFu+Z1mFgisKgj2iN2G +fYJiz4dyLoFMjKy+k8p25Nd+xNFRuwi8yi6cPU3bce5mpKxLzDnYypR6EOqq +idJZvc/c2xPgeL9wgwWXFtoLXY70iouBly9cntxbqYU/LsXaVATHgMyDWw/5 +1mihbvV5CT6fGHh9hnH/Na8WZlTURXSaxYCC/MHLFiJaWPChnv+HQAy88yw/ +ZKGihQOiA1eGrkXDth+7+C2stFDveewbjegz8Gs61d48WwtXP1YqFN4RBb1d ++Q7Xc4n+Ef4qA+pR8PoJx3HqmhaKiTAfPhWNgqKkL045+VrYWpn2peJrJDiT +tQ/8uKeF/74VDziYEAnPjXp8kp9ooXi4hOr3VxFwNX1z2KtBLfx16yHL2i0c +dmq8yDXfoo1xsaOTDVUhsG+tmV2bhjamcuq29heGgH/fq/WOmtq4Xcxfgi8t +BNJS3kZ70bTRY8dS3ZWDIfDxe4fPGUNtlAmosI7lDwGvvCFNtr02MtxuuuZ4 +noTYDSveyJ3Wxt9b5OvPyARD7bTen/kWbbxypmlhvvEY5Dc/PLj3nTZGD1Iv +uLKOQXyx1uvSdm30/JBp31Z4DMwd1XK8u7QRtL3t+2KPQUc1idY+oI3XHrwy +zjQ8BqMxC8dLZ7TxVSd57uizIBAXejjqRdLBFUXzY4aXA+Goumb3O28d9NPJ +EM1YeRhOzpMW3Xx10O70g1qd4QCIql9FmvDXwZNj639MNwVAyr4PTnxBOthj +WX2i7nwA3IkP+2QUoYP3Gi87pJMCYLC3tqsyTQcbZ2Ukhej+4HDesvPyQx1M +/7VPd+GsLzAnvDqceKmYUz0xcyHIG8RrdhY8XkfFxa2Z9FZnb5hIUg2SFaCi +762IKvkd3nBDfnLdsDAVhf5aaHORvOE/u0jjIAoV+4IEs/MbvaCuJr0iUYOK +X76/1feX9gLD5NqLlfZU3D5u48HuPQg7lCSt1xdQMeqAepzzBXdgjT+X9yqi +4vGyqUuOp91B6eGJuepbVLzHa7XG64g7rLZovelbQsUVP//03LN0h/rAxH8b +WET7+DbSLx53MKiZyYpoouJzX9eRC/xuQN3zbvD7GBVvLmlit4Qr3CKfeWjw +i4qU7up1MQsuIDasnnp5iopqGYz3xj0uMBN6Vsd4joqsGx6LlJsuUHEdzt5Y +pmLa3kwP8iYX0PjxzxZ7YRp6ZZxfRYX9sCn6XFg9jYaveu+W28Y4wWO94jVW +DBr2KmmWrfFyAtv5uowP+jR8k6ec0mXqBGFHZ++PGNKI84oe1MnvBC9d3AcE +rGiotn5Rg5a7D3zpVIv97jT8dfBKtG+1I9z9d4A8c5aGRiV3jw8LOoBB6d87 +p1JoGNtPZyvP2cN7PwkqdxoNb2QGPovutYfFL1a2pEs0TD0a35V41x4sWh/G +43UarpZ5GtRmYg+jJefHU8tpGLTJYN4k2g5Uvel1yt00PBq856cI3164oGCz +GNdLw5fvmIkrZvfAzOeDOoP9NBzt1+Va/WUP1DqnltwYomGoer/FTs4e2GP7 +OUtinIZxmZ93PffcA+F6CUG8XLpokxg3fKF+N7zc8E5+XFkXexyqJr+n2cKW +1mEXy026uJx0n2wbZQsZqYtZd1V1MXhkFfcbP1tw4VYS8NHQxbGR8b7fJrbw +62/IYr+uLnZunrjo/XsXiI9Q2tssdZFx1klJsdcGvGt941nHdFHr1ZGTpFor +mDgyGrojWBdpczYj+blWECZ9OOBjiC4WuBe22IZawbmowD2/I3URWUuuStut +oIwRIqefqIu1Ysq+N25Zwl9O3OOGXF2MT9px/km2BWQ8uDHzvkEX47pzlu5k +mwHFTW7E84UuaubGxXSGm0GxQEHPzEtd7HINm9q03wweHSmuF2/RxQ7RrnXa +MmbQp3b/onOXLu75Vnn4e/FO2HSnSn1wTBeLbp0yL64xhbq8Dq8pMTreWa+o +f2XZBL5YybuFSNIxfFh6wHXYBLgWjjj9IdHxjAFDz/iNCRjt5rZZI0dHpRHe +HJ8sE3ixgkGTUqUjv9blJv7tJtB88CavoQEdDUQoBU/8jKFbyb/0og8dkyT2 +3/z5yxD+tHHuiPnRsXmxMUPzkyFQTq0qzA2g45wXvepSvSG4friWVRREx7y2 +f7WLLhvCl4TW6EcRdLy54Lj6j74hfP+mvfdLGh1Djl7f5ncRYebO8rzGQ2L8 +iEVQu2QA3xxM85Kr6HhJxVoz/qgBdK0+bzZUQ8dEGheusTCAGndSzpWndJzq +MhM+s8IAYiV1GEuviPsvxjhbH2eC0Fn/qNe9dCRba8lp7dcH9UMfuLxXMtCL +2bwoY84AGTHK3drVDMz+oX1YczMDhBoO7pbkZuD5G/uc/HgZMC0zmf9mHQPz +5f8hGb6mQ/VHPmNNMQa67hrxz7Smg5kpJixvZGBUsbzafWdd8FQu4c21ZiBq +apqzz1Mh4vkBfxVbBjpS+ETzA6lw0Vv4TcUeBg7VK/xTvpsKj4vDU984MvBT +k8ddFKeCqIqZ4JIHA9cWmh7ZkK8DL1SGRd1DGBj7d5a1/4k2qG6SlVO5ycAL +C+VGSYJagC/fR1fkM/Di2isPns1qgoNv4oBBETH/nUqqlF5NiLszXuB4l4E5 +uz2qtt3VhN5Nj5WTKxnYFVPt1mGiCWmbndTGmhioMOKg8z1mO0ypXqJWTDKQ +++03SWvhbdDVjDtEphlo+1SNHPZHA54endgbPMvAhZbVaYnvNSCtwvwYdZGB +V+Y2GGnHaIAqg+t+9So9bJO2tnz7ZSscND8i3yCuh0KfuKte3dkCHYd28nfo +6yGXrLhsprMa1PDOknRAD6/Ifm5RoKlBQUnB5iuGeqhqPznRI6IGQb+WTPeZ +6mH2XMDL5reqsD6UFdO7Sw/viVcOFxqrgmmi/PzXg3o4wJ8RxUXbDI+K/gzM +ntVD/pendxrqbQSqcfC8RYoesmd89T2kNwJ7YIw/77weUe/xedGyClTI9NMs +MvRw4zB14XKjCtzPfnr+xlU9nOI5V0exVYG81AT6zlLi+c/zh3OPKENysGB6 +djsxf63iV07PFIFH5Oyt8Q962Pfj56mi24qQWM712KhLD+nFK5kCaYoQPzH1 +baxXD5OsvfYa7FeE074d+obf9NCEFLN1/bwCHHfJGfnxWw83Z38PNtNWAGcT +RdST0cfTb5yi9zTKwVIHj0CDnD4mSnaS3O/LQZ73RI+Foj4a+W+POZ8pB98S +q0KdN+lj3UCWxE5vOTj+ateDcE19fHN10GA7jxycs4mSeWSqjwKz1doxt2Wg +et+Hv9qB+ji9RjchZwUFXH9Uv358TB87lo6flfxEBq6IvGyTYH0sPVJNaSkj +g+nVAG27cH30Er39s8edDO/7Vhw+EaePqWFpnyIaSDB6cGtPeRbRP94sOzVD +CshHkqq2PtXHhJ5mI2MHCUhb9tFJqddH3m0CPG5UCViZYVr+vVEfZ82TwgvF +JWCUs+Zu3it9ZI2OFhR3ikM1V3y2cLs+/pzs+Ja8XxycM6ND54b10Vp2IO2u +vxhk14Tr1K5j4vGc78J8xSLAb+NUThJg4rmVnm2DySIQ/UV3S6gQE5clRgr7 +j4qA75rfStvEmLjlo+c3A7oI0HaFiBbIMPFKhLzd9VZh+Dh4fDphOxPlTx1g +lK4UBjG+w+XWjkzsenyBxh8jBEXGpyImnZi4MP/F2PqQEGieSjO+5MJEJt/c +z0prIbCZLPvQ5cFEyQeLJlMkIUj8OLvgeZiJuYEnmNZHBeF3wRmjiBgmfjej +V+aPrYduvUvtt0qY+PnWdPI/lHXge7LomnkpEzVU/I16pvhgrpTtPVbGxIY/ +MofNmvhAWKFrfjuHic6jKx59Ps4HljzSlCdPmXhTc+/r38288Ljjllf7ByZe +9nJeOJfKAxYCj7aEdDFxZXfJryRvHuja+WpOsoeJkU1cpDoDHpip/nn2wBcm +YtuZV91T3LAlf9s/P0aZOHJy50CtMzc87jYMSR1n4raDnvXxOtxgIboXNCaZ +aD5Oc4sV4gafpJPvgmeZGF6uk6XYtBZmnibmSvxm4t/xb9kvCtZC7GKWZ/Ui +sR9Lbop5p9eCkPZdddclJk7nfRh94LwWbhypnl1eZmKCcm/hLHUt/A9BTrNY + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.08870656752874545}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7364,19 +7457,19 @@ HbLGog== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.08870656752874545}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7390,232 +7483,168 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV13k8VN0bAHCtloTsZsa+VChlmTHDeB5LsqeyRIQsWSoq2Su7RIqUpc3a +pleWmSkUhdIiFEW2QkpCvLYor9/9/XU/38+5555zz3me59wrfzBwj/dKLi6u +Gyu4uP5/net/1aiUUmRAeia3NVLWyqDjhmS4YVcsnHPxUFNs3gwo1npQsisD +rKfa7b69oUOI7b3OVV0F4P5UvfPhG3PYMCGRsdBZAaHL6bvc3zjB58c2gTOd +9bAgvO6Y1ms/MFUa7ZvqfA8GASHiOc/DYaGTdnmycxDOJ6com1QmQ4Px7aJ3 +BdMQe9EtM/JELlA+V307qL4ERedGHznuKATRw273uI1XoWvlocvRL+9AxnbT +Ght7HjRICs6lqZeCRo/TTqYvD6ZfyhhZC6XQHH+kXS2SBxn8LULNu0thbVfm +T558Hiy5PNlNCy2FyNND5IYxHtzq5/ci81kpeL2JjqLF82KYtWC6m90DoHrX +MOUq+fAkr/WRdfQy+JS97emU0Hp8axNpnWRaDrntJYIhyutRkqlhYrKrHJwF +Nrot0tfjjYFb1xcdy6E3Tvq/lZ7r0et6VOBev3L4cpRPX5S9Hg12jFmzU8ph +xOTrQ6qTAIrfWP5Lay2H35NZDyLzBTE9eIqhursCqtRElpfZgnj982prQacK +iPBJs4l/LYiaio2nx90r4G9P/HjqtCA6f12mXw6qgOihR2KtCkLYsCOwL/1C +BcS3FO/9EiyEI4mWDgbNFZBSdKZ1pdQGfBefNbAPK8FC209YTHEDNvUkLjJ3 +VgJP4x77jVs2oK5nihHFphLih5R7LA03ILVx3rlxfyVEKTR/y/TbgFWj1NT6 +kEo4mif5n0r1BpxoVZo5WVIJu6+Vq1vuF0Z3zn8vywVZIKR+NdDVWxg7Xi2y +qsVY0FITXxEYKIzXPB+XPSazwKLHUTczThjXxTzoKNnIAiPSf8Z9JcK4KXB9 +DRVYoJ1tsT/wrzBaTtkG/3eYBRKZQ8mXroug695Vf3c3sEBSjR3/+5YIKm+E +TYovWUCqTzzjWiaCJEoYc6KZBTKTm09ubBDB2yWyCsc/skDZKsi9ZkQEJ7Ov +tW77wQKt1UvUIS1RtJy4dDN5PRt2BYt/1Xwtisc2ZL29s5sNtutG+rPaRXGz +wdF/OfZs2FNQ9elvryie6Xq0XOvEBoc2l9YXv0Sx/Y9Dx2MPNriqF1Y7i4nh +4SZyQOAxNgR81UiPdRfDpWTVuLILbEiyMzd4PyeGYdsol4qa2EBitZBWrhBH +tyBXKu0NG0pF7Oa3rxPHUsnMx/UtbPj4/kBZuqw4bvuZGNz4gQ1Ku4MVdpuJ +417uT8XHh9hQb31zbVuOOAZZSrAjloj5/KM0tFwojv+WNPRf5eLAKP+9Oo1S +cWy6fneevYoDG5pZYRfqxVFdjLXYwcsBd4vXozY/xdFvdapbrRgHlkxnW97q +S6BqkO9pUOfAxVsRJUumEkjuMhaY3MoBpbVcZ7fslsCM70bXc7ZzwOo5n+F5 +bwksjFB80knlQK6xXKVVmgRe5wtT4jLkgC5aZr35LIEen7Svr7TjQPPNthN/ +fkjgz5qU+8YOxPjL9rZqMxIYah7ecmofB5Jq3XlTeCRx3/iRXX0uHPioHxJp +sV0Sxa3fB5h7c+AEPd/tVawk8q8Di85gDljkCcxYpkri3aEa55QQDihwR51t +uSyJfkNRJ+lhHGjrcChvvyOJyyqtLXGRHNgaxL+qv0USG52ctd/FcGBNZ3iW +e5cktiSlVtvHcaCX+V1taEASm1ot7DviOZCyrt5uZEYSh5xr39YlcWDkVuit +f0lSuNvOanLXeQ7UrR9mnFSSwgHZHCxO48CV4D2t81uk8GSgQ9nMBQ7sMNry ++y9Kod6l+umYDA4U9A2acx+SwpdKppoOWRwIN7HtTw6SwoCwn8VR2RywLXly +nD9CCi1WnjG5nsOB5bDsqxvOE/3dXHjeXuWAi6jNOLlSCjMcv3Z8u8kBrcia +mBuPpTBm5edX/Xkc4BvcJC7/QgpPXO2ZbcvnQNWDVaDySQprTYQWCgs5IG5Z +dXHbshRS2w50rb7NgfFyFeVKHhLu0rAtbyHcKJlZpSNMwoCvP95m3CHW+9vR +QYYyCT/YZXbx3iPWM0ZJe4clCTfxszwq73Pg9kj6yyY7Ep6Ta0rY9Q8HTu9a +drE4QEJ+/UeLw4S3SHcn7DpGwnbVhb4VDziwOn4n6X0E8fy6sl1JhHtHWaV2 +8STU7RaT4i7jwLlHFzqdskhoMtZaNUvYQ3YpoDePGP/b9UyvciKeEv253O6R +8In/upa3hIXGOzMHKkmoYNt9aHsFB77v3bHZ6wkJo9NaPC8Qrq2uePLtBQln +GaUN3wlfkZfb49dGQu9Ew2RGJQdMfi1GHB0ioaJBqVUr4XCzTNVnYyRkWZ0S +FGJxoDR/S7fIHAnLQp6HWBIeWnyR7LNMQoqNQXwMYUk7d3oVDxkLrPPpFYSt +/1kYWSdMxpGPd7P7CMeuvZR9gEzGuW1ihavYHHjopm5WrkTGpMQCZyXCY4+e +z6/aSkb3r8LPgLC8sNttBxoZ79A2d9kTdgj47XAXyWhpdS/fh3BKY/rav+Zk +3PvGRfY44afSahybvWSUofPuDSM8G9Lone9Cxt7pcINwwqptrmIz3mRs2R45 +FEz4wOb5RtNAMmYtdxsHEL4UezE4J4yYv4Gfhwvhlz2blcZiyOhdOM80I/xX +u6HdIIWMrEqnnq2Et6e5xKVnklH4uZeeEGGf77OaX6+TUeTPL7cx4n2v4oVB +6m0yXtnRYdFAuC1nU0ZyGRnXuY0tZRJeM/3MsLeKjOOvRSM9CDOs9k9tbSDj +cLta4ybCgcUzeTHNZNQ5t6FnlNiPov/O23Z8INqf3X52m/Anx41cGz+TUX3D ++3A3wgLlTx+Ej5CxsuXkGmHCxnzObs1TxPsKRvjUEfsd5jktIPuHGO9W041D +hAfFVI42rqfgoabRa3eI+JEIrJOWkKCgWlaujyFhq5f73vrJUdDO1EzwAxF/ +nIgUdUEtCjKuea0ZJ+L1Z7tSr4c+BZvUaxyOEZbbUpvC2kHB1sOf0yZLifj9 +PDnqtI+CRbtO1Hwm4r9O91zufQ8KOpl1Vf4/P2bSFS2W/Sn4Kns2t5rInwMm +DneLTlFQVN6BGVPCAc27NYd+FVDQ5doM33si/w6ttJcwuk/BPwkO5VKEr+2f +eJHJpqDSUKaDC5GvawXkVRgvKVic11n8vpgD3ccTv8aPU5DLTSE9roADgs2y +mZ1zFDQe4vUtJOqBiXKVsSqXNF4i7bOpJepFaefPglZhaaTuTtk9fIMDMfq7 +PUi60ii12f7I71wOmB248S/NSBqfRHbt7ybqkUD0zzh7K2ns6284zyHq1bWG +hFsX3aVRO6PphesVDjyyqP65NlkaF7qLuw+lc2Byn2LI9CdpHOn2WzicSMR/ +RBD3hq/S6LPKNGCGqK+nrz3J3johjTcfm1iHEPWX/4tjjd9KGQz1oRzxi+bA +xkOpXF9UZfDKu9rD6yOI9To5e645Ugb7p5TnbA5zQDnLiDKaIIOc9z7PT/v/ +P58u/MN9UQZ5DX217vpyIOLv5jajIhl0o2bMj3tx4HLcAbGqZhmMyd0YTHMl +zqP0ppvF0rIoHzr7pdmKiMfSHNbpOlkUmGudEt9ErFdny9LES1m0aF3b/lqZ +AzZcq3e6vZfF7I4w5whFDnjuOfoJhmVRd9TRp1mGA6aR8mei18jhsWCDan3i +PA2SnSs0VJNDpz9dWbYriPp66OZ4Q4gcRtm0JTh+ZIP5X7pwVKQcqubF6ye0 +s6HlYgdVO1oObXIujZe2seFTFW90UbIcTqhHm8+9ZsPEumDhhGtyuC10Tsu+ +jg2SZWY003o57HP9uc3hNhsO/56KfrleHiOEN/SFBrOBccxH/JuwPPI0Jk8P +BrGBZ7S7ZJWkPK7qE35ofoQNxT0NHw0UiPZfJ/by+bChv/ayOpsqj/d2Bpjs +cyS+hxLoXflu8pj01F5elc4GTeEYjchyeXRiOVTXLrBgQU2of4u9As6tuV0R +HMiCueukGC1nBfSI6kn768+CGUFlJbqbAopnD0jH+LBgYprub+KngDpJigej +XVkwWOM553xKAX+kNg05WrLgteVDgbPFChik9uftERUW5AYcgMFZBTwVEm1r +3V0J+iX3865cUcR+iTvUq/RKmBK2cHeoV8IK4Rm9wZly+Jrq7nCcWwVf7n7K +OhFRBua/Qs2HqRtxbahPg5ZEKYx58pxgndmEzB0u/zbO3CP+RyRWJtVvxquH +9z2ZHrsNwm9V0sp+qWJ0iLzqIc1ioJx9YEulqmPoVG7TolcBZKvRhUQObUGh +e/P2nqM34TXJUGc6fSs+5S14HRt/FRiU+osaHzUwVcFu+Z1mFgisKgj2iN2G +fYJiz4dyLoFMjKy+k8p25Nd+xNFRuwi8yi6cPU3bce5mpKxLzDnYypR6EOqq +idJZvc/c2xPgeL9wgwWXFtoLXY70iouBly9cntxbqYU/LsXaVATHgMyDWw/5 +1mihbvV5CT6fGHh9hnH/Na8WZlTURXSaxYCC/MHLFiJaWPChnv+HQAy88yw/ +ZKGihQOiA1eGrkXDth+7+C2stFDveewbjegz8Gs61d48WwtXP1YqFN4RBb1d ++Q7Xc4n+Ef4qA+pR8PoJx3HqmhaKiTAfPhWNgqKkL045+VrYWpn2peJrJDiT +tQ/8uKeF/74VDziYEAnPjXp8kp9ooXi4hOr3VxFwNX1z2KtBLfx16yHL2i0c +dmq8yDXfoo1xsaOTDVUhsG+tmV2bhjamcuq29heGgH/fq/WOmtq4Xcxfgi8t +BNJS3kZ70bTRY8dS3ZWDIfDxe4fPGUNtlAmosI7lDwGvvCFNtr02MtxuuuZ4 +noTYDSveyJ3Wxt9b5OvPyARD7bTen/kWbbxypmlhvvEY5Dc/PLj3nTZGD1Iv +uLKOQXyx1uvSdm30/JBp31Z4DMwd1XK8u7QRtL3t+2KPQUc1idY+oI3XHrwy +zjQ8BqMxC8dLZ7TxVSd57uizIBAXejjqRdLBFUXzY4aXA+Goumb3O28d9NPJ +EM1YeRhOzpMW3Xx10O70g1qd4QCIql9FmvDXwZNj639MNwVAyr4PTnxBOthj +WX2i7nwA3IkP+2QUoYP3Gi87pJMCYLC3tqsyTQcbZ2Ukhej+4HDesvPyQx1M +/7VPd+GsLzAnvDqceKmYUz0xcyHIG8RrdhY8XkfFxa2Z9FZnb5hIUg2SFaCi +762IKvkd3nBDfnLdsDAVhf5aaHORvOE/u0jjIAoV+4IEs/MbvaCuJr0iUYOK +X76/1feX9gLD5NqLlfZU3D5u48HuPQg7lCSt1xdQMeqAepzzBXdgjT+X9yqi +4vGyqUuOp91B6eGJuepbVLzHa7XG64g7rLZovelbQsUVP//03LN0h/rAxH8b +WET7+DbSLx53MKiZyYpoouJzX9eRC/xuQN3zbvD7GBVvLmlit4Qr3CKfeWjw +i4qU7up1MQsuIDasnnp5iopqGYz3xj0uMBN6Vsd4joqsGx6LlJsuUHEdzt5Y +pmLa3kwP8iYX0PjxzxZ7YRp6ZZxfRYX9sCn6XFg9jYaveu+W28Y4wWO94jVW +DBr2KmmWrfFyAtv5uowP+jR8k6ec0mXqBGFHZ++PGNKI84oe1MnvBC9d3AcE +rGiotn5Rg5a7D3zpVIv97jT8dfBKtG+1I9z9d4A8c5aGRiV3jw8LOoBB6d87 +p1JoGNtPZyvP2cN7PwkqdxoNb2QGPovutYfFL1a2pEs0TD0a35V41x4sWh/G +43UarpZ5GtRmYg+jJefHU8tpGLTJYN4k2g5Uvel1yt00PBq856cI3164oGCz +GNdLw5fvmIkrZvfAzOeDOoP9NBzt1+Va/WUP1DqnltwYomGoer/FTs4e2GP7 +OUtinIZxmZ93PffcA+F6CUG8XLpokxg3fKF+N7zc8E5+XFkXexyqJr+n2cKW +1mEXy026uJx0n2wbZQsZqYtZd1V1MXhkFfcbP1tw4VYS8NHQxbGR8b7fJrbw +62/IYr+uLnZunrjo/XsXiI9Q2tssdZFx1klJsdcGvGt941nHdFHr1ZGTpFor +mDgyGrojWBdpczYj+blWECZ9OOBjiC4WuBe22IZawbmowD2/I3URWUuuStut +oIwRIqefqIu1Ysq+N25Zwl9O3OOGXF2MT9px/km2BWQ8uDHzvkEX47pzlu5k +mwHFTW7E84UuaubGxXSGm0GxQEHPzEtd7HINm9q03wweHSmuF2/RxQ7RrnXa +MmbQp3b/onOXLu75Vnn4e/FO2HSnSn1wTBeLbp0yL64xhbq8Dq8pMTreWa+o +f2XZBL5YybuFSNIxfFh6wHXYBLgWjjj9IdHxjAFDz/iNCRjt5rZZI0dHpRHe +HJ8sE3ixgkGTUqUjv9blJv7tJtB88CavoQEdDUQoBU/8jKFbyb/0og8dkyT2 +3/z5yxD+tHHuiPnRsXmxMUPzkyFQTq0qzA2g45wXvepSvSG4friWVRREx7y2 +f7WLLhvCl4TW6EcRdLy54Lj6j74hfP+mvfdLGh1Djl7f5ncRYebO8rzGQ2L8 +iEVQu2QA3xxM85Kr6HhJxVoz/qgBdK0+bzZUQ8dEGheusTCAGndSzpWndJzq +MhM+s8IAYiV1GEuviPsvxjhbH2eC0Fn/qNe9dCRba8lp7dcH9UMfuLxXMtCL +2bwoY84AGTHK3drVDMz+oX1YczMDhBoO7pbkZuD5G/uc/HgZMC0zmf9mHQPz +5f8hGb6mQ/VHPmNNMQa67hrxz7Smg5kpJixvZGBUsbzafWdd8FQu4c21ZiBq +apqzz1Mh4vkBfxVbBjpS+ETzA6lw0Vv4TcUeBg7VK/xTvpsKj4vDU984MvBT +k8ddFKeCqIqZ4JIHA9cWmh7ZkK8DL1SGRd1DGBj7d5a1/4k2qG6SlVO5ycAL +C+VGSYJagC/fR1fkM/Di2isPns1qgoNv4oBBETH/nUqqlF5NiLszXuB4l4E5 +uz2qtt3VhN5Nj5WTKxnYFVPt1mGiCWmbndTGmhioMOKg8z1mO0ypXqJWTDKQ +++03SWvhbdDVjDtEphlo+1SNHPZHA54endgbPMvAhZbVaYnvNSCtwvwYdZGB +V+Y2GGnHaIAqg+t+9So9bJO2tnz7ZSscND8i3yCuh0KfuKte3dkCHYd28nfo +6yGXrLhsprMa1PDOknRAD6/Ifm5RoKlBQUnB5iuGeqhqPznRI6IGQb+WTPeZ +6mH2XMDL5reqsD6UFdO7Sw/viVcOFxqrgmmi/PzXg3o4wJ8RxUXbDI+K/gzM +ntVD/pendxrqbQSqcfC8RYoesmd89T2kNwJ7YIw/77weUe/xedGyClTI9NMs +MvRw4zB14XKjCtzPfnr+xlU9nOI5V0exVYG81AT6zlLi+c/zh3OPKENysGB6 +djsxf63iV07PFIFH5Oyt8Q962Pfj56mi24qQWM712KhLD+nFK5kCaYoQPzH1 +baxXD5OsvfYa7FeE074d+obf9NCEFLN1/bwCHHfJGfnxWw83Z38PNtNWAGcT +RdST0cfTb5yi9zTKwVIHj0CDnD4mSnaS3O/LQZ73RI+Foj4a+W+POZ8pB98S +q0KdN+lj3UCWxE5vOTj+ateDcE19fHN10GA7jxycs4mSeWSqjwKz1doxt2Wg +et+Hv9qB+ji9RjchZwUFXH9Uv358TB87lo6flfxEBq6IvGyTYH0sPVJNaSkj +g+nVAG27cH30Er39s8edDO/7Vhw+EaePqWFpnyIaSDB6cGtPeRbRP94sOzVD +CshHkqq2PtXHhJ5mI2MHCUhb9tFJqddH3m0CPG5UCViZYVr+vVEfZ82TwgvF +JWCUs+Zu3it9ZI2OFhR3ikM1V3y2cLs+/pzs+Ja8XxycM6ND54b10Vp2IO2u +vxhk14Tr1K5j4vGc78J8xSLAb+NUThJg4rmVnm2DySIQ/UV3S6gQE5clRgr7 +j4qA75rfStvEmLjlo+c3A7oI0HaFiBbIMPFKhLzd9VZh+Dh4fDphOxPlTx1g +lK4UBjG+w+XWjkzsenyBxh8jBEXGpyImnZi4MP/F2PqQEGieSjO+5MJEJt/c +z0prIbCZLPvQ5cFEyQeLJlMkIUj8OLvgeZiJuYEnmNZHBeF3wRmjiBgmfjej +V+aPrYduvUvtt0qY+PnWdPI/lHXge7LomnkpEzVU/I16pvhgrpTtPVbGxIY/ +MofNmvhAWKFrfjuHic6jKx59Ps4HljzSlCdPmXhTc+/r38288Ljjllf7ByZe +9nJeOJfKAxYCj7aEdDFxZXfJryRvHuja+WpOsoeJkU1cpDoDHpip/nn2wBcm +YtuZV91T3LAlf9s/P0aZOHJy50CtMzc87jYMSR1n4raDnvXxOtxgIboXNCaZ +aD5Oc4sV4gafpJPvgmeZGF6uk6XYtBZmnibmSvxm4t/xb9kvCtZC7GKWZ/Ui +sR9Lbop5p9eCkPZdddclJk7nfRh94LwWbhypnl1eZmKCcm/hLHUt/A9BTrNY + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.08870656752874545}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7626,6 +7655,7 @@ HbLGog== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7653,7 +7683,8 @@ HbLGog== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.12263499218727081`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08870656752874545}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7661,24 +7692,1028 @@ HbLGog== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913218813523655`*^9}, - CellLabel->"Out[86]=",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] + CellChangeTimes->{3.9913218813523655`*^9, 3.993829477920061*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"926717c8-e3b1-4c1d-bc40-33960a4f7228"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", - RowBox[{"{", "}"}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799458254999*^9, - 3.9917994623413925`*^9}},ExpressionUUID->"d9d63445-4981-8f49-b88b-\ -9e93d345c648"], + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0.013749"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1", ",", "0.038234"}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", "0.060049"}], "}"}], ",", + RowBox[{"{", + RowBox[{"3", ",", "0.076638"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.085764"}], "}"}], ",", + RowBox[{"{", + RowBox[{"5", ",", "0.090382"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.089758"}], "}"}], ",", + RowBox[{"{", + RowBox[{"7", ",", "0.084925"}], "}"}], ",", + RowBox[{"{", + RowBox[{"8", ",", "0.077936"}], "}"}], ",", + RowBox[{"{", + RowBox[{"9", ",", "0.069316"}], "}"}], ",", + RowBox[{"{", + RowBox[{"10", ",", "0.060067"}], "}"}], ",", + RowBox[{"{", + RowBox[{"11", ",", "0.051031"}], "}"}], ",", + RowBox[{"{", + RowBox[{"12", ",", "0.042528"}], "}"}], ",", + RowBox[{"{", + RowBox[{"13", ",", "0.034867"}], "}"}], ",", + RowBox[{"{", + RowBox[{"14", ",", "0.02819"}], "}"}], ",", + RowBox[{"{", + RowBox[{"15", ",", "0.022495"}], "}"}], ",", + RowBox[{"{", + RowBox[{"16", ",", "0.01774"}], "}"}], ",", + RowBox[{"{", + RowBox[{"17", ",", "0.013843"}], "}"}], ",", + RowBox[{"{", + RowBox[{"18", ",", "0.010692"}], "}"}], ",", + RowBox[{"{", + RowBox[{"19", ",", "0.008182"}], "}"}], ",", + RowBox[{"{", + RowBox[{"20", ",", "0.006204"}], "}"}], ",", + RowBox[{"{", + RowBox[{"21", ",", "0.004665"}], "}"}], ",", + RowBox[{"{", + RowBox[{"22", ",", "0.003479"}], "}"}], ",", + RowBox[{"{", + RowBox[{"23", ",", "0.002574"}], "}"}], ",", + RowBox[{"{", + RowBox[{"24", ",", "0.00189"}], "}"}], ",", + RowBox[{"{", + RowBox[{"25", ",", "0.001377"}], "}"}], ",", + RowBox[{"{", + RowBox[{"26", ",", "0.000997"}], "}"}], ",", + RowBox[{"{", + RowBox[{"27", ",", "0.000717"}], "}"}], ",", + RowBox[{"{", + RowBox[{"28", ",", "0.000511"}], "}"}], ",", + RowBox[{"{", + RowBox[{"29", ",", "0.000363"}], "}"}], ",", + RowBox[{"{", + RowBox[{"30", ",", "0.000256"}], "}"}]}], "}"}], "]"}]}]], "Input", + CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, { + 3.993827592880351*^9, 3.993827603232232*^9}}, + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel-> + "In[105]:=",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.090382}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9938294780641947`*^9}, + CellLabel-> + "Out[105]=",ExpressionUUID->"a7c5df9c-928f-4632-96ff-10e3dfc9ccd6"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"39000a9e-1f94-0640-8925-\ -ec28b28907cc"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VN0bAHCtloTsZsa+VChlmTHDeB5LsqeyRIQsWSoq2Su7RIqUpc3a +pleWmSkUhdIiFEW2QkpCvLYor9/9/XU/38+5555zz3me59wrfzBwj/dKLi6u +Gyu4uP5/net/1aiUUmRAeia3NVLWyqDjhmS4YVcsnHPxUFNs3gwo1npQsisD +rKfa7b69oUOI7b3OVV0F4P5UvfPhG3PYMCGRsdBZAaHL6bvc3zjB58c2gTOd +9bAgvO6Y1ms/MFUa7ZvqfA8GASHiOc/DYaGTdnmycxDOJ6com1QmQ4Px7aJ3 +BdMQe9EtM/JELlA+V307qL4ERedGHznuKATRw273uI1XoWvlocvRL+9AxnbT +Ght7HjRICs6lqZeCRo/TTqYvD6ZfyhhZC6XQHH+kXS2SBxn8LULNu0thbVfm +T558Hiy5PNlNCy2FyNND5IYxHtzq5/ci81kpeL2JjqLF82KYtWC6m90DoHrX +MOUq+fAkr/WRdfQy+JS97emU0Hp8axNpnWRaDrntJYIhyutRkqlhYrKrHJwF +Nrot0tfjjYFb1xcdy6E3Tvq/lZ7r0et6VOBev3L4cpRPX5S9Hg12jFmzU8ph +xOTrQ6qTAIrfWP5Lay2H35NZDyLzBTE9eIqhursCqtRElpfZgnj982prQacK +iPBJs4l/LYiaio2nx90r4G9P/HjqtCA6f12mXw6qgOihR2KtCkLYsCOwL/1C +BcS3FO/9EiyEI4mWDgbNFZBSdKZ1pdQGfBefNbAPK8FC209YTHEDNvUkLjJ3 +VgJP4x77jVs2oK5nihHFphLih5R7LA03ILVx3rlxfyVEKTR/y/TbgFWj1NT6 +kEo4mif5n0r1BpxoVZo5WVIJu6+Vq1vuF0Z3zn8vywVZIKR+NdDVWxg7Xi2y +qsVY0FITXxEYKIzXPB+XPSazwKLHUTczThjXxTzoKNnIAiPSf8Z9JcK4KXB9 +DRVYoJ1tsT/wrzBaTtkG/3eYBRKZQ8mXroug695Vf3c3sEBSjR3/+5YIKm+E +TYovWUCqTzzjWiaCJEoYc6KZBTKTm09ubBDB2yWyCsc/skDZKsi9ZkQEJ7Ov +tW77wQKt1UvUIS1RtJy4dDN5PRt2BYt/1Xwtisc2ZL29s5sNtutG+rPaRXGz +wdF/OfZs2FNQ9elvryie6Xq0XOvEBoc2l9YXv0Sx/Y9Dx2MPNriqF1Y7i4nh +4SZyQOAxNgR81UiPdRfDpWTVuLILbEiyMzd4PyeGYdsol4qa2EBitZBWrhBH +tyBXKu0NG0pF7Oa3rxPHUsnMx/UtbPj4/kBZuqw4bvuZGNz4gQ1Ku4MVdpuJ +417uT8XHh9hQb31zbVuOOAZZSrAjloj5/KM0tFwojv+WNPRf5eLAKP+9Oo1S +cWy6fneevYoDG5pZYRfqxVFdjLXYwcsBd4vXozY/xdFvdapbrRgHlkxnW97q +S6BqkO9pUOfAxVsRJUumEkjuMhaY3MoBpbVcZ7fslsCM70bXc7ZzwOo5n+F5 +bwksjFB80knlQK6xXKVVmgRe5wtT4jLkgC5aZr35LIEen7Svr7TjQPPNthN/ +fkjgz5qU+8YOxPjL9rZqMxIYah7ecmofB5Jq3XlTeCRx3/iRXX0uHPioHxJp +sV0Sxa3fB5h7c+AEPd/tVawk8q8Di85gDljkCcxYpkri3aEa55QQDihwR51t +uSyJfkNRJ+lhHGjrcChvvyOJyyqtLXGRHNgaxL+qv0USG52ctd/FcGBNZ3iW +e5cktiSlVtvHcaCX+V1taEASm1ot7DviOZCyrt5uZEYSh5xr39YlcWDkVuit +f0lSuNvOanLXeQ7UrR9mnFSSwgHZHCxO48CV4D2t81uk8GSgQ9nMBQ7sMNry ++y9Kod6l+umYDA4U9A2acx+SwpdKppoOWRwIN7HtTw6SwoCwn8VR2RywLXly +nD9CCi1WnjG5nsOB5bDsqxvOE/3dXHjeXuWAi6jNOLlSCjMcv3Z8u8kBrcia +mBuPpTBm5edX/Xkc4BvcJC7/QgpPXO2ZbcvnQNWDVaDySQprTYQWCgs5IG5Z +dXHbshRS2w50rb7NgfFyFeVKHhLu0rAtbyHcKJlZpSNMwoCvP95m3CHW+9vR +QYYyCT/YZXbx3iPWM0ZJe4clCTfxszwq73Pg9kj6yyY7Ep6Ta0rY9Q8HTu9a +drE4QEJ+/UeLw4S3SHcn7DpGwnbVhb4VDziwOn4n6X0E8fy6sl1JhHtHWaV2 +8STU7RaT4i7jwLlHFzqdskhoMtZaNUvYQ3YpoDePGP/b9UyvciKeEv253O6R +8In/upa3hIXGOzMHKkmoYNt9aHsFB77v3bHZ6wkJo9NaPC8Qrq2uePLtBQln +GaUN3wlfkZfb49dGQu9Ew2RGJQdMfi1GHB0ioaJBqVUr4XCzTNVnYyRkWZ0S +FGJxoDR/S7fIHAnLQp6HWBIeWnyR7LNMQoqNQXwMYUk7d3oVDxkLrPPpFYSt +/1kYWSdMxpGPd7P7CMeuvZR9gEzGuW1ihavYHHjopm5WrkTGpMQCZyXCY4+e +z6/aSkb3r8LPgLC8sNttBxoZ79A2d9kTdgj47XAXyWhpdS/fh3BKY/rav+Zk +3PvGRfY44afSahybvWSUofPuDSM8G9Lone9Cxt7pcINwwqptrmIz3mRs2R45 +FEz4wOb5RtNAMmYtdxsHEL4UezE4J4yYv4Gfhwvhlz2blcZiyOhdOM80I/xX +u6HdIIWMrEqnnq2Et6e5xKVnklH4uZeeEGGf77OaX6+TUeTPL7cx4n2v4oVB +6m0yXtnRYdFAuC1nU0ZyGRnXuY0tZRJeM/3MsLeKjOOvRSM9CDOs9k9tbSDj +cLta4ybCgcUzeTHNZNQ5t6FnlNiPov/O23Z8INqf3X52m/Anx41cGz+TUX3D ++3A3wgLlTx+Ej5CxsuXkGmHCxnzObs1TxPsKRvjUEfsd5jktIPuHGO9W041D +hAfFVI42rqfgoabRa3eI+JEIrJOWkKCgWlaujyFhq5f73vrJUdDO1EzwAxF/ +nIgUdUEtCjKuea0ZJ+L1Z7tSr4c+BZvUaxyOEZbbUpvC2kHB1sOf0yZLifj9 +PDnqtI+CRbtO1Hwm4r9O91zufQ8KOpl1Vf4/P2bSFS2W/Sn4Kns2t5rInwMm +DneLTlFQVN6BGVPCAc27NYd+FVDQ5doM33si/w6ttJcwuk/BPwkO5VKEr+2f +eJHJpqDSUKaDC5GvawXkVRgvKVic11n8vpgD3ccTv8aPU5DLTSE9roADgs2y +mZ1zFDQe4vUtJOqBiXKVsSqXNF4i7bOpJepFaefPglZhaaTuTtk9fIMDMfq7 +PUi60ii12f7I71wOmB248S/NSBqfRHbt7ybqkUD0zzh7K2ns6284zyHq1bWG +hFsX3aVRO6PphesVDjyyqP65NlkaF7qLuw+lc2Byn2LI9CdpHOn2WzicSMR/ +RBD3hq/S6LPKNGCGqK+nrz3J3johjTcfm1iHEPWX/4tjjd9KGQz1oRzxi+bA +xkOpXF9UZfDKu9rD6yOI9To5e645Ugb7p5TnbA5zQDnLiDKaIIOc9z7PT/v/ +P58u/MN9UQZ5DX217vpyIOLv5jajIhl0o2bMj3tx4HLcAbGqZhmMyd0YTHMl +zqP0ppvF0rIoHzr7pdmKiMfSHNbpOlkUmGudEt9ErFdny9LES1m0aF3b/lqZ +AzZcq3e6vZfF7I4w5whFDnjuOfoJhmVRd9TRp1mGA6aR8mei18jhsWCDan3i +PA2SnSs0VJNDpz9dWbYriPp66OZ4Q4gcRtm0JTh+ZIP5X7pwVKQcqubF6ye0 +s6HlYgdVO1oObXIujZe2seFTFW90UbIcTqhHm8+9ZsPEumDhhGtyuC10Tsu+ +jg2SZWY003o57HP9uc3hNhsO/56KfrleHiOEN/SFBrOBccxH/JuwPPI0Jk8P +BrGBZ7S7ZJWkPK7qE35ofoQNxT0NHw0UiPZfJ/by+bChv/ayOpsqj/d2Bpjs +cyS+hxLoXflu8pj01F5elc4GTeEYjchyeXRiOVTXLrBgQU2of4u9As6tuV0R +HMiCueukGC1nBfSI6kn768+CGUFlJbqbAopnD0jH+LBgYprub+KngDpJigej +XVkwWOM553xKAX+kNg05WrLgteVDgbPFChik9uftERUW5AYcgMFZBTwVEm1r +3V0J+iX3865cUcR+iTvUq/RKmBK2cHeoV8IK4Rm9wZly+Jrq7nCcWwVf7n7K +OhFRBua/Qs2HqRtxbahPg5ZEKYx58pxgndmEzB0u/zbO3CP+RyRWJtVvxquH +9z2ZHrsNwm9V0sp+qWJ0iLzqIc1ioJx9YEulqmPoVG7TolcBZKvRhUQObUGh +e/P2nqM34TXJUGc6fSs+5S14HRt/FRiU+osaHzUwVcFu+Z1mFgisKgj2iN2G +fYJiz4dyLoFMjKy+k8p25Nd+xNFRuwi8yi6cPU3bce5mpKxLzDnYypR6EOqq +idJZvc/c2xPgeL9wgwWXFtoLXY70iouBly9cntxbqYU/LsXaVATHgMyDWw/5 +1mihbvV5CT6fGHh9hnH/Na8WZlTURXSaxYCC/MHLFiJaWPChnv+HQAy88yw/ +ZKGihQOiA1eGrkXDth+7+C2stFDveewbjegz8Gs61d48WwtXP1YqFN4RBb1d ++Q7Xc4n+Ef4qA+pR8PoJx3HqmhaKiTAfPhWNgqKkL045+VrYWpn2peJrJDiT +tQ/8uKeF/74VDziYEAnPjXp8kp9ooXi4hOr3VxFwNX1z2KtBLfx16yHL2i0c +dmq8yDXfoo1xsaOTDVUhsG+tmV2bhjamcuq29heGgH/fq/WOmtq4Xcxfgi8t +BNJS3kZ70bTRY8dS3ZWDIfDxe4fPGUNtlAmosI7lDwGvvCFNtr02MtxuuuZ4 +noTYDSveyJ3Wxt9b5OvPyARD7bTen/kWbbxypmlhvvEY5Dc/PLj3nTZGD1Iv +uLKOQXyx1uvSdm30/JBp31Z4DMwd1XK8u7QRtL3t+2KPQUc1idY+oI3XHrwy +zjQ8BqMxC8dLZ7TxVSd57uizIBAXejjqRdLBFUXzY4aXA+Goumb3O28d9NPJ +EM1YeRhOzpMW3Xx10O70g1qd4QCIql9FmvDXwZNj639MNwVAyr4PTnxBOthj +WX2i7nwA3IkP+2QUoYP3Gi87pJMCYLC3tqsyTQcbZ2Ukhej+4HDesvPyQx1M +/7VPd+GsLzAnvDqceKmYUz0xcyHIG8RrdhY8XkfFxa2Z9FZnb5hIUg2SFaCi +762IKvkd3nBDfnLdsDAVhf5aaHORvOE/u0jjIAoV+4IEs/MbvaCuJr0iUYOK +X76/1feX9gLD5NqLlfZU3D5u48HuPQg7lCSt1xdQMeqAepzzBXdgjT+X9yqi +4vGyqUuOp91B6eGJuepbVLzHa7XG64g7rLZovelbQsUVP//03LN0h/rAxH8b +WET7+DbSLx53MKiZyYpoouJzX9eRC/xuQN3zbvD7GBVvLmlit4Qr3CKfeWjw +i4qU7up1MQsuIDasnnp5iopqGYz3xj0uMBN6Vsd4joqsGx6LlJsuUHEdzt5Y +pmLa3kwP8iYX0PjxzxZ7YRp6ZZxfRYX9sCn6XFg9jYaveu+W28Y4wWO94jVW +DBr2KmmWrfFyAtv5uowP+jR8k6ec0mXqBGFHZ++PGNKI84oe1MnvBC9d3AcE +rGiotn5Rg5a7D3zpVIv97jT8dfBKtG+1I9z9d4A8c5aGRiV3jw8LOoBB6d87 +p1JoGNtPZyvP2cN7PwkqdxoNb2QGPovutYfFL1a2pEs0TD0a35V41x4sWh/G +43UarpZ5GtRmYg+jJefHU8tpGLTJYN4k2g5Uvel1yt00PBq856cI3164oGCz +GNdLw5fvmIkrZvfAzOeDOoP9NBzt1+Va/WUP1DqnltwYomGoer/FTs4e2GP7 +OUtinIZxmZ93PffcA+F6CUG8XLpokxg3fKF+N7zc8E5+XFkXexyqJr+n2cKW +1mEXy026uJx0n2wbZQsZqYtZd1V1MXhkFfcbP1tw4VYS8NHQxbGR8b7fJrbw +62/IYr+uLnZunrjo/XsXiI9Q2tssdZFx1klJsdcGvGt941nHdFHr1ZGTpFor +mDgyGrojWBdpczYj+blWECZ9OOBjiC4WuBe22IZawbmowD2/I3URWUuuStut +oIwRIqefqIu1Ysq+N25Zwl9O3OOGXF2MT9px/km2BWQ8uDHzvkEX47pzlu5k +mwHFTW7E84UuaubGxXSGm0GxQEHPzEtd7HINm9q03wweHSmuF2/RxQ7RrnXa +MmbQp3b/onOXLu75Vnn4e/FO2HSnSn1wTBeLbp0yL64xhbq8Dq8pMTreWa+o +f2XZBL5YybuFSNIxfFh6wHXYBLgWjjj9IdHxjAFDz/iNCRjt5rZZI0dHpRHe +HJ8sE3ixgkGTUqUjv9blJv7tJtB88CavoQEdDUQoBU/8jKFbyb/0og8dkyT2 +3/z5yxD+tHHuiPnRsXmxMUPzkyFQTq0qzA2g45wXvepSvSG4friWVRREx7y2 +f7WLLhvCl4TW6EcRdLy54Lj6j74hfP+mvfdLGh1Djl7f5ncRYebO8rzGQ2L8 +iEVQu2QA3xxM85Kr6HhJxVoz/qgBdK0+bzZUQ8dEGheusTCAGndSzpWndJzq +MhM+s8IAYiV1GEuviPsvxjhbH2eC0Fn/qNe9dCRba8lp7dcH9UMfuLxXMtCL +2bwoY84AGTHK3drVDMz+oX1YczMDhBoO7pbkZuD5G/uc/HgZMC0zmf9mHQPz +5f8hGb6mQ/VHPmNNMQa67hrxz7Smg5kpJixvZGBUsbzafWdd8FQu4c21ZiBq +apqzz1Mh4vkBfxVbBjpS+ETzA6lw0Vv4TcUeBg7VK/xTvpsKj4vDU984MvBT +k8ddFKeCqIqZ4JIHA9cWmh7ZkK8DL1SGRd1DGBj7d5a1/4k2qG6SlVO5ycAL +C+VGSYJagC/fR1fkM/Di2isPns1qgoNv4oBBETH/nUqqlF5NiLszXuB4l4E5 +uz2qtt3VhN5Nj5WTKxnYFVPt1mGiCWmbndTGmhioMOKg8z1mO0ypXqJWTDKQ +++03SWvhbdDVjDtEphlo+1SNHPZHA54endgbPMvAhZbVaYnvNSCtwvwYdZGB +V+Y2GGnHaIAqg+t+9So9bJO2tnz7ZSscND8i3yCuh0KfuKte3dkCHYd28nfo +6yGXrLhsprMa1PDOknRAD6/Ifm5RoKlBQUnB5iuGeqhqPznRI6IGQb+WTPeZ +6mH2XMDL5reqsD6UFdO7Sw/viVcOFxqrgmmi/PzXg3o4wJ8RxUXbDI+K/gzM +ntVD/pendxrqbQSqcfC8RYoesmd89T2kNwJ7YIw/77weUe/xedGyClTI9NMs +MvRw4zB14XKjCtzPfnr+xlU9nOI5V0exVYG81AT6zlLi+c/zh3OPKENysGB6 +djsxf63iV07PFIFH5Oyt8Q962Pfj56mi24qQWM712KhLD+nFK5kCaYoQPzH1 +baxXD5OsvfYa7FeE074d+obf9NCEFLN1/bwCHHfJGfnxWw83Z38PNtNWAGcT +RdST0cfTb5yi9zTKwVIHj0CDnD4mSnaS3O/LQZ73RI+Foj4a+W+POZ8pB98S +q0KdN+lj3UCWxE5vOTj+ateDcE19fHN10GA7jxycs4mSeWSqjwKz1doxt2Wg +et+Hv9qB+ji9RjchZwUFXH9Uv358TB87lo6flfxEBq6IvGyTYH0sPVJNaSkj +g+nVAG27cH30Er39s8edDO/7Vhw+EaePqWFpnyIaSDB6cGtPeRbRP94sOzVD +CshHkqq2PtXHhJ5mI2MHCUhb9tFJqddH3m0CPG5UCViZYVr+vVEfZ82TwgvF +JWCUs+Zu3it9ZI2OFhR3ikM1V3y2cLs+/pzs+Ja8XxycM6ND54b10Vp2IO2u +vxhk14Tr1K5j4vGc78J8xSLAb+NUThJg4rmVnm2DySIQ/UV3S6gQE5clRgr7 +j4qA75rfStvEmLjlo+c3A7oI0HaFiBbIMPFKhLzd9VZh+Dh4fDphOxPlTx1g +lK4UBjG+w+XWjkzsenyBxh8jBEXGpyImnZi4MP/F2PqQEGieSjO+5MJEJt/c +z0prIbCZLPvQ5cFEyQeLJlMkIUj8OLvgeZiJuYEnmNZHBeF3wRmjiBgmfjej +V+aPrYduvUvtt0qY+PnWdPI/lHXge7LomnkpEzVU/I16pvhgrpTtPVbGxIY/ +MofNmvhAWKFrfjuHic6jKx59Ps4HljzSlCdPmXhTc+/r38288Ljjllf7ByZe +9nJeOJfKAxYCj7aEdDFxZXfJryRvHuja+WpOsoeJkU1cpDoDHpip/nn2wBcm +YtuZV91T3LAlf9s/P0aZOHJy50CtMzc87jYMSR1n4raDnvXxOtxgIboXNCaZ +aD5Oc4sV4gafpJPvgmeZGF6uk6XYtBZmnibmSvxm4t/xb9kvCtZC7GKWZ/Ui +sR9Lbop5p9eCkPZdddclJk7nfRh94LwWbhypnl1eZmKCcm/hLHUt/A9BTrNY + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VN0bAHCtloTsZsa+VChlmTHDeB5LsqeyRIQsWSoq2Su7RIqUpc3a +pleWmSkUhdIiFEW2QkpCvLYor9/9/XU/38+5555zz3me59wrfzBwj/dKLi6u +Gyu4uP5/net/1aiUUmRAeia3NVLWyqDjhmS4YVcsnHPxUFNs3gwo1npQsisD +rKfa7b69oUOI7b3OVV0F4P5UvfPhG3PYMCGRsdBZAaHL6bvc3zjB58c2gTOd +9bAgvO6Y1ms/MFUa7ZvqfA8GASHiOc/DYaGTdnmycxDOJ6com1QmQ4Px7aJ3 +BdMQe9EtM/JELlA+V307qL4ERedGHznuKATRw273uI1XoWvlocvRL+9AxnbT +Ght7HjRICs6lqZeCRo/TTqYvD6ZfyhhZC6XQHH+kXS2SBxn8LULNu0thbVfm +T558Hiy5PNlNCy2FyNND5IYxHtzq5/ci81kpeL2JjqLF82KYtWC6m90DoHrX +MOUq+fAkr/WRdfQy+JS97emU0Hp8axNpnWRaDrntJYIhyutRkqlhYrKrHJwF +Nrot0tfjjYFb1xcdy6E3Tvq/lZ7r0et6VOBev3L4cpRPX5S9Hg12jFmzU8ph +xOTrQ6qTAIrfWP5Lay2H35NZDyLzBTE9eIqhursCqtRElpfZgnj982prQacK +iPBJs4l/LYiaio2nx90r4G9P/HjqtCA6f12mXw6qgOihR2KtCkLYsCOwL/1C +BcS3FO/9EiyEI4mWDgbNFZBSdKZ1pdQGfBefNbAPK8FC209YTHEDNvUkLjJ3 +VgJP4x77jVs2oK5nihHFphLih5R7LA03ILVx3rlxfyVEKTR/y/TbgFWj1NT6 +kEo4mif5n0r1BpxoVZo5WVIJu6+Vq1vuF0Z3zn8vywVZIKR+NdDVWxg7Xi2y +qsVY0FITXxEYKIzXPB+XPSazwKLHUTczThjXxTzoKNnIAiPSf8Z9JcK4KXB9 +DRVYoJ1tsT/wrzBaTtkG/3eYBRKZQ8mXroug695Vf3c3sEBSjR3/+5YIKm+E +TYovWUCqTzzjWiaCJEoYc6KZBTKTm09ubBDB2yWyCsc/skDZKsi9ZkQEJ7Ov +tW77wQKt1UvUIS1RtJy4dDN5PRt2BYt/1Xwtisc2ZL29s5sNtutG+rPaRXGz +wdF/OfZs2FNQ9elvryie6Xq0XOvEBoc2l9YXv0Sx/Y9Dx2MPNriqF1Y7i4nh +4SZyQOAxNgR81UiPdRfDpWTVuLILbEiyMzd4PyeGYdsol4qa2EBitZBWrhBH +tyBXKu0NG0pF7Oa3rxPHUsnMx/UtbPj4/kBZuqw4bvuZGNz4gQ1Ku4MVdpuJ +417uT8XHh9hQb31zbVuOOAZZSrAjloj5/KM0tFwojv+WNPRf5eLAKP+9Oo1S +cWy6fneevYoDG5pZYRfqxVFdjLXYwcsBd4vXozY/xdFvdapbrRgHlkxnW97q +S6BqkO9pUOfAxVsRJUumEkjuMhaY3MoBpbVcZ7fslsCM70bXc7ZzwOo5n+F5 +bwksjFB80knlQK6xXKVVmgRe5wtT4jLkgC5aZr35LIEen7Svr7TjQPPNthN/ +fkjgz5qU+8YOxPjL9rZqMxIYah7ecmofB5Jq3XlTeCRx3/iRXX0uHPioHxJp +sV0Sxa3fB5h7c+AEPd/tVawk8q8Di85gDljkCcxYpkri3aEa55QQDihwR51t +uSyJfkNRJ+lhHGjrcChvvyOJyyqtLXGRHNgaxL+qv0USG52ctd/FcGBNZ3iW +e5cktiSlVtvHcaCX+V1taEASm1ot7DviOZCyrt5uZEYSh5xr39YlcWDkVuit +f0lSuNvOanLXeQ7UrR9mnFSSwgHZHCxO48CV4D2t81uk8GSgQ9nMBQ7sMNry ++y9Kod6l+umYDA4U9A2acx+SwpdKppoOWRwIN7HtTw6SwoCwn8VR2RywLXly +nD9CCi1WnjG5nsOB5bDsqxvOE/3dXHjeXuWAi6jNOLlSCjMcv3Z8u8kBrcia +mBuPpTBm5edX/Xkc4BvcJC7/QgpPXO2ZbcvnQNWDVaDySQprTYQWCgs5IG5Z +dXHbshRS2w50rb7NgfFyFeVKHhLu0rAtbyHcKJlZpSNMwoCvP95m3CHW+9vR +QYYyCT/YZXbx3iPWM0ZJe4clCTfxszwq73Pg9kj6yyY7Ep6Ta0rY9Q8HTu9a +drE4QEJ+/UeLw4S3SHcn7DpGwnbVhb4VDziwOn4n6X0E8fy6sl1JhHtHWaV2 +8STU7RaT4i7jwLlHFzqdskhoMtZaNUvYQ3YpoDePGP/b9UyvciKeEv253O6R +8In/upa3hIXGOzMHKkmoYNt9aHsFB77v3bHZ6wkJo9NaPC8Qrq2uePLtBQln +GaUN3wlfkZfb49dGQu9Ew2RGJQdMfi1GHB0ioaJBqVUr4XCzTNVnYyRkWZ0S +FGJxoDR/S7fIHAnLQp6HWBIeWnyR7LNMQoqNQXwMYUk7d3oVDxkLrPPpFYSt +/1kYWSdMxpGPd7P7CMeuvZR9gEzGuW1ihavYHHjopm5WrkTGpMQCZyXCY4+e +z6/aSkb3r8LPgLC8sNttBxoZ79A2d9kTdgj47XAXyWhpdS/fh3BKY/rav+Zk +3PvGRfY44afSahybvWSUofPuDSM8G9Lone9Cxt7pcINwwqptrmIz3mRs2R45 +FEz4wOb5RtNAMmYtdxsHEL4UezE4J4yYv4Gfhwvhlz2blcZiyOhdOM80I/xX +u6HdIIWMrEqnnq2Et6e5xKVnklH4uZeeEGGf77OaX6+TUeTPL7cx4n2v4oVB +6m0yXtnRYdFAuC1nU0ZyGRnXuY0tZRJeM/3MsLeKjOOvRSM9CDOs9k9tbSDj +cLta4ybCgcUzeTHNZNQ5t6FnlNiPov/O23Z8INqf3X52m/Anx41cGz+TUX3D ++3A3wgLlTx+Ej5CxsuXkGmHCxnzObs1TxPsKRvjUEfsd5jktIPuHGO9W041D +hAfFVI42rqfgoabRa3eI+JEIrJOWkKCgWlaujyFhq5f73vrJUdDO1EzwAxF/ +nIgUdUEtCjKuea0ZJ+L1Z7tSr4c+BZvUaxyOEZbbUpvC2kHB1sOf0yZLifj9 +PDnqtI+CRbtO1Hwm4r9O91zufQ8KOpl1Vf4/P2bSFS2W/Sn4Kns2t5rInwMm +DneLTlFQVN6BGVPCAc27NYd+FVDQ5doM33si/w6ttJcwuk/BPwkO5VKEr+2f +eJHJpqDSUKaDC5GvawXkVRgvKVic11n8vpgD3ccTv8aPU5DLTSE9roADgs2y +mZ1zFDQe4vUtJOqBiXKVsSqXNF4i7bOpJepFaefPglZhaaTuTtk9fIMDMfq7 +PUi60ii12f7I71wOmB248S/NSBqfRHbt7ybqkUD0zzh7K2ns6284zyHq1bWG +hFsX3aVRO6PphesVDjyyqP65NlkaF7qLuw+lc2Byn2LI9CdpHOn2WzicSMR/ +RBD3hq/S6LPKNGCGqK+nrz3J3johjTcfm1iHEPWX/4tjjd9KGQz1oRzxi+bA +xkOpXF9UZfDKu9rD6yOI9To5e645Ugb7p5TnbA5zQDnLiDKaIIOc9z7PT/v/ +P58u/MN9UQZ5DX217vpyIOLv5jajIhl0o2bMj3tx4HLcAbGqZhmMyd0YTHMl +zqP0ppvF0rIoHzr7pdmKiMfSHNbpOlkUmGudEt9ErFdny9LES1m0aF3b/lqZ +AzZcq3e6vZfF7I4w5whFDnjuOfoJhmVRd9TRp1mGA6aR8mei18jhsWCDan3i +PA2SnSs0VJNDpz9dWbYriPp66OZ4Q4gcRtm0JTh+ZIP5X7pwVKQcqubF6ye0 +s6HlYgdVO1oObXIujZe2seFTFW90UbIcTqhHm8+9ZsPEumDhhGtyuC10Tsu+ +jg2SZWY003o57HP9uc3hNhsO/56KfrleHiOEN/SFBrOBccxH/JuwPPI0Jk8P +BrGBZ7S7ZJWkPK7qE35ofoQNxT0NHw0UiPZfJ/by+bChv/ayOpsqj/d2Bpjs +cyS+hxLoXflu8pj01F5elc4GTeEYjchyeXRiOVTXLrBgQU2of4u9As6tuV0R +HMiCueukGC1nBfSI6kn768+CGUFlJbqbAopnD0jH+LBgYprub+KngDpJigej +XVkwWOM553xKAX+kNg05WrLgteVDgbPFChik9uftERUW5AYcgMFZBTwVEm1r +3V0J+iX3865cUcR+iTvUq/RKmBK2cHeoV8IK4Rm9wZly+Jrq7nCcWwVf7n7K +OhFRBua/Qs2HqRtxbahPg5ZEKYx58pxgndmEzB0u/zbO3CP+RyRWJtVvxquH +9z2ZHrsNwm9V0sp+qWJ0iLzqIc1ioJx9YEulqmPoVG7TolcBZKvRhUQObUGh +e/P2nqM34TXJUGc6fSs+5S14HRt/FRiU+osaHzUwVcFu+Z1mFgisKgj2iN2G +fYJiz4dyLoFMjKy+k8p25Nd+xNFRuwi8yi6cPU3bce5mpKxLzDnYypR6EOqq +idJZvc/c2xPgeL9wgwWXFtoLXY70iouBly9cntxbqYU/LsXaVATHgMyDWw/5 +1mihbvV5CT6fGHh9hnH/Na8WZlTURXSaxYCC/MHLFiJaWPChnv+HQAy88yw/ +ZKGihQOiA1eGrkXDth+7+C2stFDveewbjegz8Gs61d48WwtXP1YqFN4RBb1d ++Q7Xc4n+Ef4qA+pR8PoJx3HqmhaKiTAfPhWNgqKkL045+VrYWpn2peJrJDiT +tQ/8uKeF/74VDziYEAnPjXp8kp9ooXi4hOr3VxFwNX1z2KtBLfx16yHL2i0c +dmq8yDXfoo1xsaOTDVUhsG+tmV2bhjamcuq29heGgH/fq/WOmtq4Xcxfgi8t +BNJS3kZ70bTRY8dS3ZWDIfDxe4fPGUNtlAmosI7lDwGvvCFNtr02MtxuuuZ4 +noTYDSveyJ3Wxt9b5OvPyARD7bTen/kWbbxypmlhvvEY5Dc/PLj3nTZGD1Iv +uLKOQXyx1uvSdm30/JBp31Z4DMwd1XK8u7QRtL3t+2KPQUc1idY+oI3XHrwy +zjQ8BqMxC8dLZ7TxVSd57uizIBAXejjqRdLBFUXzY4aXA+Goumb3O28d9NPJ +EM1YeRhOzpMW3Xx10O70g1qd4QCIql9FmvDXwZNj639MNwVAyr4PTnxBOthj +WX2i7nwA3IkP+2QUoYP3Gi87pJMCYLC3tqsyTQcbZ2Ukhej+4HDesvPyQx1M +/7VPd+GsLzAnvDqceKmYUz0xcyHIG8RrdhY8XkfFxa2Z9FZnb5hIUg2SFaCi +762IKvkd3nBDfnLdsDAVhf5aaHORvOE/u0jjIAoV+4IEs/MbvaCuJr0iUYOK +X76/1feX9gLD5NqLlfZU3D5u48HuPQg7lCSt1xdQMeqAepzzBXdgjT+X9yqi +4vGyqUuOp91B6eGJuepbVLzHa7XG64g7rLZovelbQsUVP//03LN0h/rAxH8b +WET7+DbSLx53MKiZyYpoouJzX9eRC/xuQN3zbvD7GBVvLmlit4Qr3CKfeWjw +i4qU7up1MQsuIDasnnp5iopqGYz3xj0uMBN6Vsd4joqsGx6LlJsuUHEdzt5Y +pmLa3kwP8iYX0PjxzxZ7YRp6ZZxfRYX9sCn6XFg9jYaveu+W28Y4wWO94jVW +DBr2KmmWrfFyAtv5uowP+jR8k6ec0mXqBGFHZ++PGNKI84oe1MnvBC9d3AcE +rGiotn5Rg5a7D3zpVIv97jT8dfBKtG+1I9z9d4A8c5aGRiV3jw8LOoBB6d87 +p1JoGNtPZyvP2cN7PwkqdxoNb2QGPovutYfFL1a2pEs0TD0a35V41x4sWh/G +43UarpZ5GtRmYg+jJefHU8tpGLTJYN4k2g5Uvel1yt00PBq856cI3164oGCz +GNdLw5fvmIkrZvfAzOeDOoP9NBzt1+Va/WUP1DqnltwYomGoer/FTs4e2GP7 +OUtinIZxmZ93PffcA+F6CUG8XLpokxg3fKF+N7zc8E5+XFkXexyqJr+n2cKW +1mEXy026uJx0n2wbZQsZqYtZd1V1MXhkFfcbP1tw4VYS8NHQxbGR8b7fJrbw +62/IYr+uLnZunrjo/XsXiI9Q2tssdZFx1klJsdcGvGt941nHdFHr1ZGTpFor +mDgyGrojWBdpczYj+blWECZ9OOBjiC4WuBe22IZawbmowD2/I3URWUuuStut +oIwRIqefqIu1Ysq+N25Zwl9O3OOGXF2MT9px/km2BWQ8uDHzvkEX47pzlu5k +mwHFTW7E84UuaubGxXSGm0GxQEHPzEtd7HINm9q03wweHSmuF2/RxQ7RrnXa +MmbQp3b/onOXLu75Vnn4e/FO2HSnSn1wTBeLbp0yL64xhbq8Dq8pMTreWa+o +f2XZBL5YybuFSNIxfFh6wHXYBLgWjjj9IdHxjAFDz/iNCRjt5rZZI0dHpRHe +HJ8sE3ixgkGTUqUjv9blJv7tJtB88CavoQEdDUQoBU/8jKFbyb/0og8dkyT2 +3/z5yxD+tHHuiPnRsXmxMUPzkyFQTq0qzA2g45wXvepSvSG4friWVRREx7y2 +f7WLLhvCl4TW6EcRdLy54Lj6j74hfP+mvfdLGh1Djl7f5ncRYebO8rzGQ2L8 +iEVQu2QA3xxM85Kr6HhJxVoz/qgBdK0+bzZUQ8dEGheusTCAGndSzpWndJzq +MhM+s8IAYiV1GEuviPsvxjhbH2eC0Fn/qNe9dCRba8lp7dcH9UMfuLxXMtCL +2bwoY84AGTHK3drVDMz+oX1YczMDhBoO7pbkZuD5G/uc/HgZMC0zmf9mHQPz +5f8hGb6mQ/VHPmNNMQa67hrxz7Smg5kpJixvZGBUsbzafWdd8FQu4c21ZiBq +apqzz1Mh4vkBfxVbBjpS+ETzA6lw0Vv4TcUeBg7VK/xTvpsKj4vDU984MvBT +k8ddFKeCqIqZ4JIHA9cWmh7ZkK8DL1SGRd1DGBj7d5a1/4k2qG6SlVO5ycAL +C+VGSYJagC/fR1fkM/Di2isPns1qgoNv4oBBETH/nUqqlF5NiLszXuB4l4E5 +uz2qtt3VhN5Nj5WTKxnYFVPt1mGiCWmbndTGmhioMOKg8z1mO0ypXqJWTDKQ +++03SWvhbdDVjDtEphlo+1SNHPZHA54endgbPMvAhZbVaYnvNSCtwvwYdZGB +V+Y2GGnHaIAqg+t+9So9bJO2tnz7ZSscND8i3yCuh0KfuKte3dkCHYd28nfo +6yGXrLhsprMa1PDOknRAD6/Ifm5RoKlBQUnB5iuGeqhqPznRI6IGQb+WTPeZ +6mH2XMDL5reqsD6UFdO7Sw/viVcOFxqrgmmi/PzXg3o4wJ8RxUXbDI+K/gzM +ntVD/pendxrqbQSqcfC8RYoesmd89T2kNwJ7YIw/77weUe/xedGyClTI9NMs +MvRw4zB14XKjCtzPfnr+xlU9nOI5V0exVYG81AT6zlLi+c/zh3OPKENysGB6 +djsxf63iV07PFIFH5Oyt8Q962Pfj56mi24qQWM712KhLD+nFK5kCaYoQPzH1 +baxXD5OsvfYa7FeE074d+obf9NCEFLN1/bwCHHfJGfnxWw83Z38PNtNWAGcT +RdST0cfTb5yi9zTKwVIHj0CDnD4mSnaS3O/LQZ73RI+Foj4a+W+POZ8pB98S +q0KdN+lj3UCWxE5vOTj+ateDcE19fHN10GA7jxycs4mSeWSqjwKz1doxt2Wg +et+Hv9qB+ji9RjchZwUFXH9Uv358TB87lo6flfxEBq6IvGyTYH0sPVJNaSkj +g+nVAG27cH30Er39s8edDO/7Vhw+EaePqWFpnyIaSDB6cGtPeRbRP94sOzVD +CshHkqq2PtXHhJ5mI2MHCUhb9tFJqddH3m0CPG5UCViZYVr+vVEfZ82TwgvF +JWCUs+Zu3it9ZI2OFhR3ikM1V3y2cLs+/pzs+Ja8XxycM6ND54b10Vp2IO2u +vxhk14Tr1K5j4vGc78J8xSLAb+NUThJg4rmVnm2DySIQ/UV3S6gQE5clRgr7 +j4qA75rfStvEmLjlo+c3A7oI0HaFiBbIMPFKhLzd9VZh+Dh4fDphOxPlTx1g +lK4UBjG+w+XWjkzsenyBxh8jBEXGpyImnZi4MP/F2PqQEGieSjO+5MJEJt/c +z0prIbCZLPvQ5cFEyQeLJlMkIUj8OLvgeZiJuYEnmNZHBeF3wRmjiBgmfjej +V+aPrYduvUvtt0qY+PnWdPI/lHXge7LomnkpEzVU/I16pvhgrpTtPVbGxIY/ +MofNmvhAWKFrfjuHic6jKx59Ps4HljzSlCdPmXhTc+/r38288Ljjllf7ByZe +9nJeOJfKAxYCj7aEdDFxZXfJryRvHuja+WpOsoeJkU1cpDoDHpip/nn2wBcm +YtuZV91T3LAlf9s/P0aZOHJy50CtMzc87jYMSR1n4raDnvXxOtxgIboXNCaZ +aD5Oc4sV4gafpJPvgmeZGF6uk6XYtBZmnibmSvxm4t/xb9kvCtZC7GKWZ/Ui +sR9Lbop5p9eCkPZdddclJk7nfRh94LwWbhypnl1eZmKCcm/hLHUt/A9BTrNY + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08870656752874545}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08870656752874545}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VN0bAHCtloTsZsa+VChlmTHDeB5LsqeyRIQsWSoq2Su7RIqUpc3a +pleWmSkUhdIiFEW2QkpCvLYor9/9/XU/38+5555zz3me59wrfzBwj/dKLi6u +Gyu4uP5/net/1aiUUmRAeia3NVLWyqDjhmS4YVcsnHPxUFNs3gwo1npQsisD +rKfa7b69oUOI7b3OVV0F4P5UvfPhG3PYMCGRsdBZAaHL6bvc3zjB58c2gTOd +9bAgvO6Y1ms/MFUa7ZvqfA8GASHiOc/DYaGTdnmycxDOJ6com1QmQ4Px7aJ3 +BdMQe9EtM/JELlA+V307qL4ERedGHznuKATRw273uI1XoWvlocvRL+9AxnbT +Ght7HjRICs6lqZeCRo/TTqYvD6ZfyhhZC6XQHH+kXS2SBxn8LULNu0thbVfm +T558Hiy5PNlNCy2FyNND5IYxHtzq5/ci81kpeL2JjqLF82KYtWC6m90DoHrX +MOUq+fAkr/WRdfQy+JS97emU0Hp8axNpnWRaDrntJYIhyutRkqlhYrKrHJwF +Nrot0tfjjYFb1xcdy6E3Tvq/lZ7r0et6VOBev3L4cpRPX5S9Hg12jFmzU8ph +xOTrQ6qTAIrfWP5Lay2H35NZDyLzBTE9eIqhursCqtRElpfZgnj982prQacK +iPBJs4l/LYiaio2nx90r4G9P/HjqtCA6f12mXw6qgOihR2KtCkLYsCOwL/1C +BcS3FO/9EiyEI4mWDgbNFZBSdKZ1pdQGfBefNbAPK8FC209YTHEDNvUkLjJ3 +VgJP4x77jVs2oK5nihHFphLih5R7LA03ILVx3rlxfyVEKTR/y/TbgFWj1NT6 +kEo4mif5n0r1BpxoVZo5WVIJu6+Vq1vuF0Z3zn8vywVZIKR+NdDVWxg7Xi2y +qsVY0FITXxEYKIzXPB+XPSazwKLHUTczThjXxTzoKNnIAiPSf8Z9JcK4KXB9 +DRVYoJ1tsT/wrzBaTtkG/3eYBRKZQ8mXroug695Vf3c3sEBSjR3/+5YIKm+E +TYovWUCqTzzjWiaCJEoYc6KZBTKTm09ubBDB2yWyCsc/skDZKsi9ZkQEJ7Ov +tW77wQKt1UvUIS1RtJy4dDN5PRt2BYt/1Xwtisc2ZL29s5sNtutG+rPaRXGz +wdF/OfZs2FNQ9elvryie6Xq0XOvEBoc2l9YXv0Sx/Y9Dx2MPNriqF1Y7i4nh +4SZyQOAxNgR81UiPdRfDpWTVuLILbEiyMzd4PyeGYdsol4qa2EBitZBWrhBH +tyBXKu0NG0pF7Oa3rxPHUsnMx/UtbPj4/kBZuqw4bvuZGNz4gQ1Ku4MVdpuJ +417uT8XHh9hQb31zbVuOOAZZSrAjloj5/KM0tFwojv+WNPRf5eLAKP+9Oo1S +cWy6fneevYoDG5pZYRfqxVFdjLXYwcsBd4vXozY/xdFvdapbrRgHlkxnW97q +S6BqkO9pUOfAxVsRJUumEkjuMhaY3MoBpbVcZ7fslsCM70bXc7ZzwOo5n+F5 +bwksjFB80knlQK6xXKVVmgRe5wtT4jLkgC5aZr35LIEen7Svr7TjQPPNthN/ +fkjgz5qU+8YOxPjL9rZqMxIYah7ecmofB5Jq3XlTeCRx3/iRXX0uHPioHxJp +sV0Sxa3fB5h7c+AEPd/tVawk8q8Di85gDljkCcxYpkri3aEa55QQDihwR51t +uSyJfkNRJ+lhHGjrcChvvyOJyyqtLXGRHNgaxL+qv0USG52ctd/FcGBNZ3iW +e5cktiSlVtvHcaCX+V1taEASm1ot7DviOZCyrt5uZEYSh5xr39YlcWDkVuit +f0lSuNvOanLXeQ7UrR9mnFSSwgHZHCxO48CV4D2t81uk8GSgQ9nMBQ7sMNry ++y9Kod6l+umYDA4U9A2acx+SwpdKppoOWRwIN7HtTw6SwoCwn8VR2RywLXly +nD9CCi1WnjG5nsOB5bDsqxvOE/3dXHjeXuWAi6jNOLlSCjMcv3Z8u8kBrcia +mBuPpTBm5edX/Xkc4BvcJC7/QgpPXO2ZbcvnQNWDVaDySQprTYQWCgs5IG5Z +dXHbshRS2w50rb7NgfFyFeVKHhLu0rAtbyHcKJlZpSNMwoCvP95m3CHW+9vR +QYYyCT/YZXbx3iPWM0ZJe4clCTfxszwq73Pg9kj6yyY7Ep6Ta0rY9Q8HTu9a +drE4QEJ+/UeLw4S3SHcn7DpGwnbVhb4VDziwOn4n6X0E8fy6sl1JhHtHWaV2 +8STU7RaT4i7jwLlHFzqdskhoMtZaNUvYQ3YpoDePGP/b9UyvciKeEv253O6R +8In/upa3hIXGOzMHKkmoYNt9aHsFB77v3bHZ6wkJo9NaPC8Qrq2uePLtBQln +GaUN3wlfkZfb49dGQu9Ew2RGJQdMfi1GHB0ioaJBqVUr4XCzTNVnYyRkWZ0S +FGJxoDR/S7fIHAnLQp6HWBIeWnyR7LNMQoqNQXwMYUk7d3oVDxkLrPPpFYSt +/1kYWSdMxpGPd7P7CMeuvZR9gEzGuW1ihavYHHjopm5WrkTGpMQCZyXCY4+e +z6/aSkb3r8LPgLC8sNttBxoZ79A2d9kTdgj47XAXyWhpdS/fh3BKY/rav+Zk +3PvGRfY44afSahybvWSUofPuDSM8G9Lone9Cxt7pcINwwqptrmIz3mRs2R45 +FEz4wOb5RtNAMmYtdxsHEL4UezE4J4yYv4Gfhwvhlz2blcZiyOhdOM80I/xX +u6HdIIWMrEqnnq2Et6e5xKVnklH4uZeeEGGf77OaX6+TUeTPL7cx4n2v4oVB +6m0yXtnRYdFAuC1nU0ZyGRnXuY0tZRJeM/3MsLeKjOOvRSM9CDOs9k9tbSDj +cLta4ybCgcUzeTHNZNQ5t6FnlNiPov/O23Z8INqf3X52m/Anx41cGz+TUX3D ++3A3wgLlTx+Ej5CxsuXkGmHCxnzObs1TxPsKRvjUEfsd5jktIPuHGO9W041D +hAfFVI42rqfgoabRa3eI+JEIrJOWkKCgWlaujyFhq5f73vrJUdDO1EzwAxF/ +nIgUdUEtCjKuea0ZJ+L1Z7tSr4c+BZvUaxyOEZbbUpvC2kHB1sOf0yZLifj9 +PDnqtI+CRbtO1Hwm4r9O91zufQ8KOpl1Vf4/P2bSFS2W/Sn4Kns2t5rInwMm +DneLTlFQVN6BGVPCAc27NYd+FVDQ5doM33si/w6ttJcwuk/BPwkO5VKEr+2f +eJHJpqDSUKaDC5GvawXkVRgvKVic11n8vpgD3ccTv8aPU5DLTSE9roADgs2y +mZ1zFDQe4vUtJOqBiXKVsSqXNF4i7bOpJepFaefPglZhaaTuTtk9fIMDMfq7 +PUi60ii12f7I71wOmB248S/NSBqfRHbt7ybqkUD0zzh7K2ns6284zyHq1bWG +hFsX3aVRO6PphesVDjyyqP65NlkaF7qLuw+lc2Byn2LI9CdpHOn2WzicSMR/ +RBD3hq/S6LPKNGCGqK+nrz3J3johjTcfm1iHEPWX/4tjjd9KGQz1oRzxi+bA +xkOpXF9UZfDKu9rD6yOI9To5e645Ugb7p5TnbA5zQDnLiDKaIIOc9z7PT/v/ +P58u/MN9UQZ5DX217vpyIOLv5jajIhl0o2bMj3tx4HLcAbGqZhmMyd0YTHMl +zqP0ppvF0rIoHzr7pdmKiMfSHNbpOlkUmGudEt9ErFdny9LES1m0aF3b/lqZ +AzZcq3e6vZfF7I4w5whFDnjuOfoJhmVRd9TRp1mGA6aR8mei18jhsWCDan3i +PA2SnSs0VJNDpz9dWbYriPp66OZ4Q4gcRtm0JTh+ZIP5X7pwVKQcqubF6ye0 +s6HlYgdVO1oObXIujZe2seFTFW90UbIcTqhHm8+9ZsPEumDhhGtyuC10Tsu+ +jg2SZWY003o57HP9uc3hNhsO/56KfrleHiOEN/SFBrOBccxH/JuwPPI0Jk8P +BrGBZ7S7ZJWkPK7qE35ofoQNxT0NHw0UiPZfJ/by+bChv/ayOpsqj/d2Bpjs +cyS+hxLoXflu8pj01F5elc4GTeEYjchyeXRiOVTXLrBgQU2of4u9As6tuV0R +HMiCueukGC1nBfSI6kn768+CGUFlJbqbAopnD0jH+LBgYprub+KngDpJigej +XVkwWOM553xKAX+kNg05WrLgteVDgbPFChik9uftERUW5AYcgMFZBTwVEm1r +3V0J+iX3865cUcR+iTvUq/RKmBK2cHeoV8IK4Rm9wZly+Jrq7nCcWwVf7n7K +OhFRBua/Qs2HqRtxbahPg5ZEKYx58pxgndmEzB0u/zbO3CP+RyRWJtVvxquH +9z2ZHrsNwm9V0sp+qWJ0iLzqIc1ioJx9YEulqmPoVG7TolcBZKvRhUQObUGh +e/P2nqM34TXJUGc6fSs+5S14HRt/FRiU+osaHzUwVcFu+Z1mFgisKgj2iN2G +fYJiz4dyLoFMjKy+k8p25Nd+xNFRuwi8yi6cPU3bce5mpKxLzDnYypR6EOqq +idJZvc/c2xPgeL9wgwWXFtoLXY70iouBly9cntxbqYU/LsXaVATHgMyDWw/5 +1mihbvV5CT6fGHh9hnH/Na8WZlTURXSaxYCC/MHLFiJaWPChnv+HQAy88yw/ +ZKGihQOiA1eGrkXDth+7+C2stFDveewbjegz8Gs61d48WwtXP1YqFN4RBb1d ++Q7Xc4n+Ef4qA+pR8PoJx3HqmhaKiTAfPhWNgqKkL045+VrYWpn2peJrJDiT +tQ/8uKeF/74VDziYEAnPjXp8kp9ooXi4hOr3VxFwNX1z2KtBLfx16yHL2i0c +dmq8yDXfoo1xsaOTDVUhsG+tmV2bhjamcuq29heGgH/fq/WOmtq4Xcxfgi8t +BNJS3kZ70bTRY8dS3ZWDIfDxe4fPGUNtlAmosI7lDwGvvCFNtr02MtxuuuZ4 +noTYDSveyJ3Wxt9b5OvPyARD7bTen/kWbbxypmlhvvEY5Dc/PLj3nTZGD1Iv +uLKOQXyx1uvSdm30/JBp31Z4DMwd1XK8u7QRtL3t+2KPQUc1idY+oI3XHrwy +zjQ8BqMxC8dLZ7TxVSd57uizIBAXejjqRdLBFUXzY4aXA+Goumb3O28d9NPJ +EM1YeRhOzpMW3Xx10O70g1qd4QCIql9FmvDXwZNj639MNwVAyr4PTnxBOthj +WX2i7nwA3IkP+2QUoYP3Gi87pJMCYLC3tqsyTQcbZ2Ukhej+4HDesvPyQx1M +/7VPd+GsLzAnvDqceKmYUz0xcyHIG8RrdhY8XkfFxa2Z9FZnb5hIUg2SFaCi +762IKvkd3nBDfnLdsDAVhf5aaHORvOE/u0jjIAoV+4IEs/MbvaCuJr0iUYOK +X76/1feX9gLD5NqLlfZU3D5u48HuPQg7lCSt1xdQMeqAepzzBXdgjT+X9yqi +4vGyqUuOp91B6eGJuepbVLzHa7XG64g7rLZovelbQsUVP//03LN0h/rAxH8b +WET7+DbSLx53MKiZyYpoouJzX9eRC/xuQN3zbvD7GBVvLmlit4Qr3CKfeWjw +i4qU7up1MQsuIDasnnp5iopqGYz3xj0uMBN6Vsd4joqsGx6LlJsuUHEdzt5Y +pmLa3kwP8iYX0PjxzxZ7YRp6ZZxfRYX9sCn6XFg9jYaveu+W28Y4wWO94jVW +DBr2KmmWrfFyAtv5uowP+jR8k6ec0mXqBGFHZ++PGNKI84oe1MnvBC9d3AcE +rGiotn5Rg5a7D3zpVIv97jT8dfBKtG+1I9z9d4A8c5aGRiV3jw8LOoBB6d87 +p1JoGNtPZyvP2cN7PwkqdxoNb2QGPovutYfFL1a2pEs0TD0a35V41x4sWh/G +43UarpZ5GtRmYg+jJefHU8tpGLTJYN4k2g5Uvel1yt00PBq856cI3164oGCz +GNdLw5fvmIkrZvfAzOeDOoP9NBzt1+Va/WUP1DqnltwYomGoer/FTs4e2GP7 +OUtinIZxmZ93PffcA+F6CUG8XLpokxg3fKF+N7zc8E5+XFkXexyqJr+n2cKW +1mEXy026uJx0n2wbZQsZqYtZd1V1MXhkFfcbP1tw4VYS8NHQxbGR8b7fJrbw +62/IYr+uLnZunrjo/XsXiI9Q2tssdZFx1klJsdcGvGt941nHdFHr1ZGTpFor +mDgyGrojWBdpczYj+blWECZ9OOBjiC4WuBe22IZawbmowD2/I3URWUuuStut +oIwRIqefqIu1Ysq+N25Zwl9O3OOGXF2MT9px/km2BWQ8uDHzvkEX47pzlu5k +mwHFTW7E84UuaubGxXSGm0GxQEHPzEtd7HINm9q03wweHSmuF2/RxQ7RrnXa +MmbQp3b/onOXLu75Vnn4e/FO2HSnSn1wTBeLbp0yL64xhbq8Dq8pMTreWa+o +f2XZBL5YybuFSNIxfFh6wHXYBLgWjjj9IdHxjAFDz/iNCRjt5rZZI0dHpRHe +HJ8sE3ixgkGTUqUjv9blJv7tJtB88CavoQEdDUQoBU/8jKFbyb/0og8dkyT2 +3/z5yxD+tHHuiPnRsXmxMUPzkyFQTq0qzA2g45wXvepSvSG4friWVRREx7y2 +f7WLLhvCl4TW6EcRdLy54Lj6j74hfP+mvfdLGh1Djl7f5ncRYebO8rzGQ2L8 +iEVQu2QA3xxM85Kr6HhJxVoz/qgBdK0+bzZUQ8dEGheusTCAGndSzpWndJzq +MhM+s8IAYiV1GEuviPsvxjhbH2eC0Fn/qNe9dCRba8lp7dcH9UMfuLxXMtCL +2bwoY84AGTHK3drVDMz+oX1YczMDhBoO7pbkZuD5G/uc/HgZMC0zmf9mHQPz +5f8hGb6mQ/VHPmNNMQa67hrxz7Smg5kpJixvZGBUsbzafWdd8FQu4c21ZiBq +apqzz1Mh4vkBfxVbBjpS+ETzA6lw0Vv4TcUeBg7VK/xTvpsKj4vDU984MvBT +k8ddFKeCqIqZ4JIHA9cWmh7ZkK8DL1SGRd1DGBj7d5a1/4k2qG6SlVO5ycAL +C+VGSYJagC/fR1fkM/Di2isPns1qgoNv4oBBETH/nUqqlF5NiLszXuB4l4E5 +uz2qtt3VhN5Nj5WTKxnYFVPt1mGiCWmbndTGmhioMOKg8z1mO0ypXqJWTDKQ +++03SWvhbdDVjDtEphlo+1SNHPZHA54endgbPMvAhZbVaYnvNSCtwvwYdZGB +V+Y2GGnHaIAqg+t+9So9bJO2tnz7ZSscND8i3yCuh0KfuKte3dkCHYd28nfo +6yGXrLhsprMa1PDOknRAD6/Ifm5RoKlBQUnB5iuGeqhqPznRI6IGQb+WTPeZ +6mH2XMDL5reqsD6UFdO7Sw/viVcOFxqrgmmi/PzXg3o4wJ8RxUXbDI+K/gzM +ntVD/pendxrqbQSqcfC8RYoesmd89T2kNwJ7YIw/77weUe/xedGyClTI9NMs +MvRw4zB14XKjCtzPfnr+xlU9nOI5V0exVYG81AT6zlLi+c/zh3OPKENysGB6 +djsxf63iV07PFIFH5Oyt8Q962Pfj56mi24qQWM712KhLD+nFK5kCaYoQPzH1 +baxXD5OsvfYa7FeE074d+obf9NCEFLN1/bwCHHfJGfnxWw83Z38PNtNWAGcT +RdST0cfTb5yi9zTKwVIHj0CDnD4mSnaS3O/LQZ73RI+Foj4a+W+POZ8pB98S +q0KdN+lj3UCWxE5vOTj+ateDcE19fHN10GA7jxycs4mSeWSqjwKz1doxt2Wg +et+Hv9qB+ji9RjchZwUFXH9Uv358TB87lo6flfxEBq6IvGyTYH0sPVJNaSkj +g+nVAG27cH30Er39s8edDO/7Vhw+EaePqWFpnyIaSDB6cGtPeRbRP94sOzVD +CshHkqq2PtXHhJ5mI2MHCUhb9tFJqddH3m0CPG5UCViZYVr+vVEfZ82TwgvF +JWCUs+Zu3it9ZI2OFhR3ikM1V3y2cLs+/pzs+Ja8XxycM6ND54b10Vp2IO2u +vxhk14Tr1K5j4vGc78J8xSLAb+NUThJg4rmVnm2DySIQ/UV3S6gQE5clRgr7 +j4qA75rfStvEmLjlo+c3A7oI0HaFiBbIMPFKhLzd9VZh+Dh4fDphOxPlTx1g +lK4UBjG+w+XWjkzsenyBxh8jBEXGpyImnZi4MP/F2PqQEGieSjO+5MJEJt/c +z0prIbCZLPvQ5cFEyQeLJlMkIUj8OLvgeZiJuYEnmNZHBeF3wRmjiBgmfjej +V+aPrYduvUvtt0qY+PnWdPI/lHXge7LomnkpEzVU/I16pvhgrpTtPVbGxIY/ +MofNmvhAWKFrfjuHic6jKx59Ps4HljzSlCdPmXhTc+/r38288Ljjllf7ByZe +9nJeOJfKAxYCj7aEdDFxZXfJryRvHuja+WpOsoeJkU1cpDoDHpip/nn2wBcm +YtuZV91T3LAlf9s/P0aZOHJy50CtMzc87jYMSR1n4raDnvXxOtxgIboXNCaZ +aD5Oc4sV4gafpJPvgmeZGF6uk6XYtBZmnibmSvxm4t/xb9kvCtZC7GKWZ/Ui +sR9Lbop5p9eCkPZdddclJk7nfRh94LwWbhypnl1eZmKCcm/hLHUt/A9BTrNY + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08870656752874545}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08870656752874545}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829478082541*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"c7d2f1f7-ff29-4f65-9756-0f5227ec77f4"] +}, Open ]], Cell[CellGroupData[{ @@ -7687,12 +8722,14 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.99179966106703*^9},ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], + CellChangeTimes->{3.99179966106703*^9}, + CellLabel-> + "In[107]:=",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[BoxData["11.27534350842078`"], "Output", - CellChangeTimes->{3.9913229040054893`*^9}, - CellLabel->"Out[88]=",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[BoxData["10.841096912545494`"], "Output", + CellChangeTimes->{3.9913229040054893`*^9, 3.993829478105053*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"90c60fda-df5a-4a50-8df5-bddeeb7cc8e0"] }, Open ]], Cell[CellGroupData[{ @@ -7748,158 +8785,309 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991799666995865*^9},ExpressionUUID->"7116d4f3-8ab8-b741-8264-\ -0a5eeac170a0"], + CellChangeTimes->{3.991799666995865*^9}, + CellLabel-> + "In[108]:=",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 17, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042538757`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.391199687499616`*^-233\\\", \ +\\\"13837903517621823881868475992501522797012013156236308470069045755904000000\ +0000000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 108, 13, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.993829478164751*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], +In[108]:=",ExpressionUUID->"146296e2-d4a7-486d-a1a6-4dfc13b2cf0c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 18, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042728806`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.904529881137401`*^-239\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 108, 14, 25990558358386545157, + "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.993829478170436*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], +In[108]:=",ExpressionUUID->"53e31645-b137-4685-a8c2-c086f6281892"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 89, 19, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042938766`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.728064769249007`*^-246\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 108, 15, 25990558358386545157, + "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.993829478175295*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], +In[108]:=",ExpressionUUID->"7788dfd3-a2fc-4208-a090-7810a59221b9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 89, 20, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229043127804`*^9}, +during this calculation.\"", 2, 108, 16, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.9938294781798067`*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], +In[108]:=",ExpressionUUID->"4265a0c9-b3d5-408e-9f13-5ededf112d63"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k4VV8Xx4WiRGWe3Wt2R2TMPWcvkkwZQiQkZahUNCiaSKQiogglJCHD +vSIVZSxUJEPGKNFPkjkh9J73n3ufz7OevfZea6/vWvuQvY7t9Obm4uIqJH7+ +/z/X31infD0LX+Mj2R8Wb4y3p0kGG3ddQljJwdlweRICsQ9ekl3xaMfIYd69 +8pooyC6vk6crE0X7i5iZyQPaNC4Rv9BZjKR0yppI8nZooMLm2GxnDZpN+F6Y +K+eJzJRHP091tqI91gYlfTIBaKFT//Zk5yD6dSbyTLFoKKrd+ijrY+YMChUo +8HieHodkB55/96Ito5eHscDPvneQqP/ePL6tPOBy9YSi6pP7KF7LrNzGiR80 +zocYjsQ9QN13NKumNgpCSEPUFufabHQ96+IHbqlNIGkxZmXxLRdJ3Pp2NeGe +COTytpqYJ+QjSWrp5flsETgjbTp8424+kq6JvOjOFoHokIWvHx7mI/lJjVNq +tSJgZHR+GJ7lIxXrAM/yERHoUwyZ7e/LR5t5l/W+bRaFlaTvOutUCpDtSfEh +7beicNiirFSMU4CuOFrgrXNiwHDbHfq2rBBJlzRLc68SB65QWrh5VSEqFHH8 +oyUgDscLX6dUNhSiT60e7JsK4jCVUsib3F2IlO1PKtqbi0PK/dy8+cVCVLPj +/pqWZHEwM1S/dIhVhJbNfjc3sSSgXZZ7WfhFEYrLDnm8bCYBvnufrC2uLkLK +a7ii6PYSwLdDS8SysQhZv15nHOMtAR/MkLR3VxFK2Up6Yn1DAvIU/hsxmytC +BmCV9G5AAu588r/qJslGJwwz9jZekgRpBrchxY6NLNOFZq2iJWGL9e0eWwc2 +UuQ7F9V8WxIyXn/xPb6LjVrad3Hacgh7nNa2Qjc2YgSs5+lvlgTHzcN8qw6y +0Uj26expaSnIDOFLEQ5jIzdRm18yT6QgbldA5HAhG20+Wx6WViEFB/xEzuZw +2GjdoLo4+Y0UCHjX7PYrYaPnRTxItVsKngXs6Oh/zkbiVs/jNP9JwR3RmNfZ +dcT+Yco626yk4WSU783MbjYynVgMOfpNGh58TGFZruKgYPNblOoxadDP6r6T +xsNBhRn0HpE5acgxG/w3sZqDJB09DZ/zy8Aj84bxq+s4aOzZ6z88DBl4Kbzb +IUWEgxIuxZ1MPiMDgjMdTnQVDhoUUz1aJygL+z9/cJcz4yCJY5VyEhKy8MG9 +1E3EnIOsG1yaDpJk4dwnzuE1lhz0NOQ6bcNmWZj8/eHFtx0cdG1gcnS3iyzY +dE4onXXiIO3cct+JTFkQfd2xS+4AB4Wx7PdJG8hB+e2Hm7QucpC5R9q0vokc +NP6nrDoWykFCoT/DnazlIPX0lQ8PLnHQ3dqI7DhPOThrmDjIH8lBzyxf/Fxz +VQ5+W5wSy4vmoEkXpaCZbjmA7dFCFskcVBYSwLdpSA7C9ZlZTSkcdOHuyzuM +cTmI+FzUYXOXg9Z/cS4/yC0PS1l0oe33OUjNN5rrC0UecguiB4UecpDHqd/X +3p+VhyPn668sFXGQSpKJ7GiEPJAqBcWtOP/PX2wBX5w8rMvQM08s5qCQJY0W +kyx56NVzSlEs5aDb4R5iz9/LQ+IjrtUiLzjo/c36+w/lFEDgglagQy2R7yei +WrVqCqDstjbUv46DXDv21XzRUoCDKe+MLr3moBHJpSEZMwXIqz9R8aCeg3jS +NSnxRxWgONxi5tU7DtpSmFxyoZLgO7+qd7VxkGln8/J4gwL4fFaqpLZzkA0X +7/a9rQrw4jv/l2WC9+882o2GFcA8njs2+RMHmZ0lXwxdTQLTfW3swm4Oereh +4oHBOhJIfUru8e/hILusXQ2TQiToZfjR1Hs5aE/T9U37JElQlrDLMrGPgwIU +5h4YU0mQ8Fj/ot0AB/1+EtewwCT4w+/5PwSHmFN/cXQI/9Im9+9+4aCIQE89 +RZwEfmc7Tnz+ykEptW8buO1JkOcPO7AhDlJw8f71wokE27/XGjUTnDX2b9MJ +VxI0bYza4zbMQUViunu+7SeBJdtAK+A7B9X53v9VG0SCAztoZkEjHGSxZCh8 +7iwJFKozPkwS3BzXrqcTSoJNtbqxfj84qPv52tCsqySY/KfzxHaUg8YFTgpH +3CXBw06x9KWfHHQiXUgfyyDBmiSuMc8xDprXyd3z+yEJbEY2naghmMejP8u7 +iAQ3ggx0z/8i9MQ21zerIYFBU27qx3EOumf6bc/KGxJUMbtbFSY4SLH7fOjT +d4T9+V7LwwTTuZ80qnaQoF9GfHmB4OLEHeP93SSodks2xCY5yIA6IpzUT5w3 +Tvr5eYJNHOXc+EZI8GmmNnyO4PqRstDKMRLEyJm2MKYI/Z3f+fD0FBGv+nGv +AwS3bvrVyJwjgevRv1uSCHbOvjL+3yIJ5ptjXOsJ7tuiKJL+jwReRZ3VswR7 +fajQd+Elg9LvK4EK0xzkPz8V2iBIBqfn3fn+BG8J9BH/LkwGt+C/XPEE84/2 +POaRJMOGR1JqJQR/8rI1JsuRgconTmoj+GFv7SdckQwe461j4wSfdDTwd1Mj +AxPbfINvhoinKX9VCI0MF3ZKr5YjeKMZOSlJiwxta/x3Mgnuf3WbVqpHhsiM +9adxgvP119W0GpEhpunLCUuCQ9gXnCeBDBGxTRYOBJtrzIwJmpFB1vDZggvB +4pm+l6hWZGDtiby8h+Ah6T4JCzsynHsu99OV4OIEuwIfJzLcNTjAcCY4dP1r +k8uuZPj0AdnaEWwbYdiVsZcMQkGJNmYEy68UHKk8QIZ9QjZ0Q4LHghR5Ph8k +wy4H6zF1gl9MJN5ZPEoGuaqgaDGCo/wEGJInyeB9pljoHxH/rq8Xa3WDybCN +MXRimGBl11kXhwtkqOSdrGggeLrVbzwgnAy7jz8fzSG4yupz+I0oMozIK61E +EHyjzl4qP4YM/1UJze8l2A17U9gYT4bSObduPYIpT7eY/pdEhouyvzLXEbzA +KOrmvUeGa+R7Tr3E/TY8UjqmmEnka5fFdA7BiaQ7vPCIDJ1b3gefIFhbOIx5 +lkOG7pxS639EfXFd/1135ykZuETfJFcR3MxzyPVpORkoR7g6LhB8+PfOiKnX +ZJj4pCo1TdTvlqP10hveEfFKZik9Ipj/PyM2rYUMyvP+CrsJzupS7vXtIcOz +7I5fTwh9HLdPDogYIEPdxGC1G8HwVnDNgyEyJHwXu8ZN8OfyOc3+cTKIn49c +MCX0JX6/IdKRRxHMnDS8HxL6HJLAZI/zKwLvcfJPXYKL4zicWEFFUHp6/2At +oWfbSyl9byUUwe5Pun0Hofcob39tY5oiSJ8bbG//j7iP/i/1HlqKEJwfqrqD +YGVnJ/dzeoqg2r7ueA3RT6rM8agyUIQMp61zD4h+s0Dd2E93UgR1Ul2uyTcO +mrsnHbbZVREKyi1LHw5y0OwGFWXDvYqgbC/Xtprg8RnDQ6YHFeEC+bnxS6Lf +DZbvn3M9rwgy39zq+fs5aIB+NNnzkiLMmWSaOH4m9Hj/DMvniiL0Neyru0v0 +00/hMZcCbyrCnoSVj8pEv31rVSYU9VARGMUN9Ru7CP2/rObE5BH+35pRTDuJ +/sd875hQRKyvsQ05SfTzVyJfU9KeK0JIrObHd0S/L+5dp1bapAg511saHT8S +/fawBxr8rQi5U9Nr3jZyUNJnv8H/Fon4mGrOjQ0cdMv2RMSvf4rwY915mdfE +vLmxOerd/Fol2B14uZlDzKNLfznOG+SV4JOPipNHNQddPFKxKKqkBKU/yTWo +ioPODby5J62uBFM3nShylRwUVNv7TUVbCZqkPqS9qyDq5/rqAJaZEvzyNHo5 +W8ZBfssbREyslMCBVFD05CkH+RyTfrrdTgk2zIgPHyHmp6cDc2mnqxKEnBZ9 +2EbMV0eZ3VEHjypBR5rfimcBB7Ee56cnJirBb9/sH/syOKiX9Pj+tlQleDF3 +2e4LMc9DEnPTZu8rwYFfQftc0oj3QFj23Z25SmAwev21TipR/y7pd4QqlKA/ +6rRg8i0O+tiUlvSySgmSRRK3D8QT823rvUT/10pwzf92uNxN4j3FSLn1tlkJ +rp7O4QuL4SCN1bfiIr8qQaRmxGxfBKG3kPhY3e9KoOqJc/WFE/FMxt0YGlWC +PFGfry1hhB56Y6JNZpUgMbb8a8p5DiIVX4laWaMMFZIXL2af5KBKtcgrBQLK +ELh5x5jlceL9ce9ypNtGZdi+4Ow3eIyDUqPCLr+QUoZf4LwwcojQx96zoUE0 +ZWhMkG439+Sg0vbgiypahP1kqmKIO5EvyzMX2nWVwTltTCjVlYPidU+d00bK +8OB2V2uuIwcJrj92ZtxeGZbvxg2NbSf6bdiR0/d2KYN8gqVwjCkHWf45HGS9 +RxnCGsllksaEngb9TuYdUIaJqw9lJw05iPe5V4DPaWWwF+B+doPCQQ8Y+46J +nVOGV9W1IiGqRL/P2nu0LlQZfk5/ErBWJOol1s1f8ZoyfDnboZkhxUGL3rv8 ++u8qg23EE6/lNRyU3OvoG5OhDHYFKg3ruIl5aO/gw8pWhp3V2lYLS2wUxLI7 +kFKkDH/biqqCptloStjSc1eNMghFNab197JRl79iy6F6ZRia6Cp162CjqjeL +6OJ7ZfjnTnMqamajuJDHCjmflOHRa45OcxUbaQ6uH1gYVYbyhxcOfcpkI0nW +sI3QpDLMdarV9aWwEVfiy1eKv5WJ98Dju0XxbPTB4mia1T/ifvgyXz0l3vdH +OR/c74mowBXh9akMdzbaJZDTxJFUgcxQx+pzxPcD7h2KvZFTgcACq4OxFmwk +KKUlN6GmAhJHAvat6LBRfmh8H7BUwHDyR/wIPxvd6jlk7WSsAlWUn+zQxSJ0 +TmdrxUEzFfixwfd83mARshqZSY23U4EP07dlfThFaNTWac/QARUw0HF6ZWde +hFpz6e/mD6qAblqr+0NaEXrBs8ZI8JgKCI/cXPHdWISulj2V1gtWAf5kBl37 +UyFSV5DsuRKjAqdWP7Z84VqINgZPWtyNV4GsK553PLYUovnWhufsJBWYuiwf +5idViBoig5O7M1RAfscl97yOAuQ73uNCfaoCZ6JLb3eaFSAb8ycNqFwFWkki +4cnkAqSXed3AsUoFHp44Ufvybz5as4slef6tCjS8it5DL8xH2S/vdTb3q8CX +GLVdRQL5aCjac9dxPlWIab/l2pibh46O0hQ116vCNd9zMUIX8tCf7Qu/fm1U +Ba7JJuiwz0PreOIjDkqrwpRjY+3Yn1ykGVxb4klXhW/2BkoBeC46760qYuug +Cnc/P9f0f/oIieNjH6j3VWHDtjNG9vuzUHrqs9QfD1RhhOEfNUfNQhoLl30f +5RB84l3w0dkHiFUi90+xWBUu7VY0G7r8AO2n2DKkX6vC2vYQGausTMQWL47m +/0n426itr/MlHVlMnLYY1lODA6SSDdT3KUhWSz6Sn6UGESkq22SdU9D48boa +qrEarHo1tbZoMBndmtvIOm6lBhq97YLdf++g/uVcxr+9arBzNmhAVD8JHV/f +JyJ1VQ1eo2Fti84EZGpzyY51Qw3Ya5PHnhxLQBJx6jF7E9TgmkSEEHVtAqoQ +ObUm+54a5Fi+s9mJ4tEaGaEF7WI1WNAw7eJ+HodSNKDfupewyz58vvXtdeR/ ++Lt0wBc1qJ6xOutOuo5QQbRzwrAatAWMPVk8cw0NaXa3dE+owYtZzvO3WlcR +w+B4rQ+vOrQ7P3r8pzoScYVIcl1bqw7/vfj+3ocWidrKX7EKhNQhhfvK6IHk +CHQGCTydkVQHK+v72Pqzl1GtWVZOKF0dPmqIuQ27XUKJUZbDD7TV4VzPCCro +DUN+byfJ9frqQM37/XvOLQwJ2WCpgibqcE2hrYnbNxS5OH2KSdmlDih3ZkxB +6zyiJJ17+3KPOpiraW5YcDqHlrsU+b56qoOEPB4df/EsynQ7Fqp2WB0iz4iO +9nwJRmP7+U+UXFQHLLPlUVBPEBpPM31ZeVkdzjRndTqoBaGJ7lC+d1cJe4De +Gt8zp9C07ULq1wR1ePgj2H1R9ST6YzRaJ5SjDqIVLdsdSgLRfJDqBukCdRCn +PfztSQ5Eixyv3SrF6rC7MM1DJz4ALan1/jKqUAdedi/t6/JRxC36Xvxgizrc +tn3oS1lzGPHa8u872aEOe5794rGXOoRWXzN9fLFHHWS3PbgotPkg4ud6iRKH +1CGAO9D3Y7AvWme0cDXjhzrIrHU9eifbBwkE6bbnj6uDexPfneBubyQ0VuBX +O68O65MD+wTtD6CNaqPFzcvqMGQ0N37p9n60yUt1uZtbA1aquhQSB7yQaFfa +zcn1GiAa/48ue3kfkqqLfSFH1gAeo8GKfHEPJP3vHa+GqgZkh9762DHthmS3 +8NvqUDVgdveBRdeuPUieHfrNUlcDaoe3rsS/2o1IPyvou7ZoQNBwhlz7KxdE +Vl04vQ9pQFfawf9i6p2R8t3A9WcsNODjwCvH2CknpNpZsCvcRgOevEwoOCTs +hNSER9NvOGiAz/Vmle9bHBElykv3obsGhIQ/J//K2Ik0Tzp4tAZqgKuf/syh +CFukXRSb8zlIA+bUQo4K6tmgzaPvpkfOasDy3o7hrmlrpOdpeuVfhAa0/dw6 +dyHWEumnhn5cd10DBH4mzj86aoEMPlXIiMdpQOKNqqZEF3NkZK3LphEiocg5 +TJyyMkOsK4GL+veJ/d7wpdY4bEN4TYHp1iwN0GOKdMV4myIwUO3eXUjYp3lX +DmeZIDNlCe4rNRrQl+RQcloIoR9e23OM6jUg4M2k7+lXGIrOOG0z+U4DNvvy +zymeZaE2+a6U3R0a4BdYWf1FcgsKcuc3FurRANtU3QbKggGSvmvwX02/Bnjz +fKHHDekjT6nkzbQRDZAe2hSs36uLeFwau7+MEf5DpMPrhnVQduLCxdtTRL64 +vqnwLG5GYyKu71cWNeD9UjHPNlwbBQvJeH8UpICZUXbhDlcGkt1hJRApTAFh +kWje+Xkaqrp+lrNFggKe6bztetlUtGZt3/IDEgVWuTphrhQNlLt9fZaLCgXq +1t7rY3GpI+tIlqUghQL0Z5XdRYOqKJ7nXmLQZgoIyR1P93+njHRNmlhUAwqQ +TvY4t7Yooa7Q5cEBFgWqPNlkrq+KSGHFnWlhRoHJfmsxYRIZ1bBudCxbUoDd +uT+LbkNCPmdfnS22pUDFMce2f+sUUP68fIPMbgqo1xnll8jKIlt926Mt7hTw +mBzs9n4ljaZPXRSN8KLAG+2Y76+PSSHDmQHP8cMU6FxjUybyTxz1aW3kexBA +ga71LpwPvWIoNAAKnE9RIJukXvDptSh68yt9oeoCBUoj4uRTK4XRQdrH+6fC +KfD3Y1isbfMmtP7wKjNKFAV0Dfc/YY1sRDtH9sUn3KSAMrhJ1REX/ls13sA8 +kQIfAhR2Hf6xHt3xrulfSqHAs1UzUlNHBNDAoCLVJ4sCm0kTEZ75/OgS2eGj +dC4FuBUMOdUH+JCqZ/jpDwUUML9nNTlBW4P8P3+rNSgjuF6lcfoHD9ogK3ro +VzkF1pNI/05/5kbFrqYbM6soQB1y2ETtX4XmO7PcBN5SACK099TwcqFU8Q7u +qmYKhPyUihd2WMFxp9W5J9sosLr4tnZk8RIe0er9+3MfBQRcxk8pFy3g6psS +U+O/UiDxqd30Yct5/L3tG+Pt3ymQtvckvfXPHC7cpHqDPUGBJ5JaW+9HzOIr +E5oP385SoChwvOe19Qw+KmxUMbRAgUc5DaV+KtN4jYvtqCQvFdi+UXvi+Cbx +wrO7V21eSwWubzsz38uP4ylp+yV3CFHhouT86hLLMfzE0GmzMEkq/Dt66479 +1AjuyXfJPVWOCmougr9MDv6HW1OiT5YqUsHmJ3/40J9h3GBH4vUPalTQv/0t +ajl1CFcOSM/8QaPC7sz56AOO3/CNCXnPebSpoMrmbVtRGMSXSkta5PSpcMo0 +uahy+Qve/rdhxd6YCqJ8bONrnZ/xKvk2MX8zKujFLZz2mu3F840/0yKtqBCv +efqJEqMHv3Pgv63pdlRYlyoczwzvwiOuTLm+cKKCVHelwPLUJ/x43t/Adlcq +JNftC5II7sA9mlZfHd9LhY1LVxPkJNpxPRHpMsVDVAgScUutjf+IK+opN7OO +UeGxH0dp8UgLLrSbMbzrJBUSbjT/jH3ajC+eNVgKCCbOO0HhgSfv8e9pJiLX +LxD7f37my9fyFm+ttqY8DKdCALXmMq9AI/5qaJdxZRSRr8XRv8e86vEkyuFj +M/FEfq/rfJrYW4df3nEqUvAOFSq05tR/cdfiAQEX76ndo0I+XW6/ekU17pZw +tcQ4kwp/ORW9lteqcPOnCe/2PKLCx/MT1opdr3Cd7nuDp/KpMHd/iHarqgIn +LT1aiOVQIZHnRvLjdy/weeMKtbpyKuywtTl11LgMHzrwBu+vooLjFv48/ZxS +vOVKi9P8ayqcdtxa169Rglfk9fgLv6OC95MjhWV1xXhu01A4rYUKQrdU7Jmn +OXji5HiKWQcV2re6bnmL2PglkQWOZw8VlFzM88y2FOKuuwW/3BqiQrbWoWcN +5Dzc7JzEn8IfVNin+y6y2SIH175PFmocp0LsqnbnZzezcfkaqsq3GSp8Gtp8 +IPhPFr5uWJe1PE+F90RZKwc/wOf4wEFihQqWDY0mP0Uz8UGK5SEtHhpYRYwc +lW5Mx8sDPO54C9Ig66N7bufIXTwnwa/oojANtiuOW9h9TMFvPT3+JlmCBlTh ++val/jt4aPe5z09kaWA3ETjgvSEJ91+KnG0i0+CIQle6kedt3EXhpsCIKg1O +Z9vdc/iQgJuapCpy02gwK95/PNs1HpeNKrLT06PByE+RUN7zsXheYUHtwhYa +8L3KWQ7dEYMbdDzWe4loENDHG7d763X8zd/c3FBTGtQprlajul3FHRVzZE0t +aBA1hd6W3b6CD5pnx/LZ0EC1rClk6FcEHnAsi/vdThqkP67VKvO6jEdXpI/Y +u9Eg/OSyEldqGC79LW2P2D4aFNN2xYvvCcVz1t5r7vKmwWDLGyOS1wVcTzPV ++O4hGhjFuJMW9c7hdbuSS/Yeo4GBurvPWu0QfOf5JDWlkzQwrz4yWm93Bv/y +4HbK9zM02D9nCF1xQfjfyZuhRy7RYK7xVYeu/wk8SiJuRvMKDeTulz24wHMc +F8dv+Mxep8Hfu0ep60sC8KwD0d1lcTRYGPaJcZo/imtfv2Z99jZxH/wuZREl +/ngVJ6oST6GBRt4568LkQ7hNV6Q2930aJE1jumse+uGHVMIlr+bQIGfqQyWv +sjc+bxV23bqABu2VzIHf8fvxyOMXVzYU02CoKl8oW94LF00+H9j2lDjPAUkl +qdeeeGbl2aHEchrYuDLVf/DvxTW/Bzu7VtGg5vz4i8VSN/zV+jNv5V7TYIfV +5VW0G654z+6T7KxmGiSbOeUJl+zC/UKPK/m10eDDi5lclyVHfC47IJHaRQPf +sFhq9wEH/HLT0bUTfTSonM88b/3THhee9T9X/JUGoadO3Y2PscPTpQ9PnPpO +g7fbNmH7EmxwhvFBL8OfNOjv3Zxw18gat7zhbV41S4PEtiLLWCFzvKtkf3n4 +Ag0it7drSG02w3169zG2r9BgKgKlorOm+Owqz4x1PHSwyMx2Pjpkgl9S9xBt +5qPD22P+KsjfGN9o63bl5no6iOYM1wVtBDztlOui4yY6YIWucrxpGP68ZteX +Xmk6RD1SmVlRNcTNfjg63FegQ2n4C/Y8VR9v3+DwxkuZDkHXwm6VO+viXnr2 +hqoadHh54MyE76PN+KSbbf4POh1sHBLyd0pq4xfCdygUaNPBp3flyaocTXx9 +nlV8gD4dTJuXxexzGLj6n+1n/gAdEsN7mIvTGvhTObOfL7bRwWDJUKH0sxpu +amrqccGSDtXTEcKi0yp46yGTj8a2dNjDqY6doCnjnjfBdLUjHfatuYb2XFfE +x8vwsgYXOvRpvqjOWEfGz/WzKNHudHg8z7oVZqeA36EabhTxpYPHz2vQekga +d7Jqint1mA4zf4foa60lceHD+zYdCqDDKvn60nxncbz52u+bYqfo4C6cbnz5 +mih+Pe+qcHUwHa5/2taX8FUYN38rl+B/gQ7jzLEhCddNOO8oR0QynA7nEUOa ++9sG/IJGj+ixaDqk7F0zcfC/dbiRxdHb0jfpoLs9uyq6hB+f9+MWf3ObDlLB +fj+uFK7BS6ISEwNT6PDmwv6XXz/y4oE5FAm5+3So1QsK2C/DgzMaXiU1PKAD +Pc1zi2jUKnz0v52SJ3Po8Cyn66OOGBd+QO2s1DsOHeQORefcE/yLkbdvSAl6 +SgfaMkq82jSP9fs8kFYsp0OTT6y1YcUclhKpn9pUSYcqBXX3xY5ZzDn7nUxw +HR2G5n359kvMYKJv9t5VbiTqwfJDi/X5KaxleEa2pYkOs8fYoR94JzFLFVl5 +tU46xFg/qdbpG8X4trHTWnvpsDBd7WCSOILVHTBVuPCFDsOkoAf+od+xsMtd +9zWG6dDjjv5rTRzC8Cx/UscPOtFvRWmDHYPY31qujNBxOgSD5CHbLV+xZ99u +kWkzdJi/arlJ+dIApqX0UjF8iQ7LU+40M6cebNzE/gFjFQOGPQ5tXbWpC8vz +GlbqWc2Abuc79fHLHZjvpeCsiHUM2Hhz77M/4u2YcqagitYGBux/U4Bf3N2K +fa3OeNgnwoAQHSvLuuoWLO2rrmqUJANe8V92tE1uxvasepu9WY4Bh/pKGbfH +32GSZA+1ATIDmrZW24lcaMQ6YPrRNVUGKC0N2E2a1GPxnpHqelQGtExaxZUZ +vMZsQqVzvzIZYPp7cZv9nlpMIL1QI0aHAYnH7VT+ZldjDZUmeQaGDBDZw7pt +LFmFXR74RBnCGFCxmtwz7fwSM/536HGsCQN6vmq7nnz1AluR/0c12s6A2rKz +DhyPZ1g5npD/3YoBOfzKxnWbn2JnPNTo8XaEv/B2D6ZhCaZzobwAc2JAXZu4 +dfuhYmzqni3jx24G/Llu7DxWx8YKX34rvOXBgPgdZ99wRxVihz6fZsJ+BiCx +2mfNjY8xtWUB9k9fBnTwzHr5W+RiQ7Lpmkn+DCjua4qJWvUIy2DpcEwCGeCi +/aXE5FcW5uHWoDV+igH5d2zTlPgfYNLn3IqTQ4j7+ZlXLGqTgXWmTmpvu8iA +j0LjAuyg+9it8stPJsMZEGDqw8+dfBez65XUuRvFgD4ddLB3KRkT/Jtfsj2G +AReEBDaG3U3C3kob687cZMDKYbApPX4ba5EvUuVNYkB/I+mW0M4E7JOinKTY +XQY4HJF85+dzE+tTvb5WNYMBkqwad3+nWOwrZWFRL5sBzo8G7Wp1orHvDN+x +7Y8Z8FRBPf2K11VsTLvjswubAZ3vL7VqdUZi03pbPxwsJfINLhET1y9j81s4 +VSEvGDD953pTfMglbAVXKL5eSdTP2e1i4fdCMd6tMQ/u1jEgO6oyz2PgPLZu ++99bBY0MYIhwS/J0h2AbrA5GvmpmwF6vstxshTOYqG3n6Q9tDBi1/Shc//gU +Ju2w7eCXLgYIrhfISg46gZGcn7hOfWaATIOlymJwIKa6h2zN/Y0BeoOJF556 +HsNoe2MxkREGJJ1dmxWg4Y9p719mKP8i/GWyGZu2HcQMfA+TdKcZoLb1yYjP +Yx8MO9y9yewPA8xI2hUCTgcwk2PbeZyXGMDa5n/c3sgLMz9ROuu7ign6GZZG +mi6emM1ppe9n1jDhRD2ec8TaHXM8e7PzqgATVIL57ObBFXO9+K8hZSMTbq5I +xypHOGOe4UdePBZjQr7LFq3fG50wnyu9jyukmXDSLH6r3ued2OHrFveaFJhA +rx8qPPjNDguILbvRr8wEnXXnrA4b2WBBCSqhExpMiNO1Pp0raIWdS0oI5GIy +YbWy4ZKQjjl2KXXV/k06xPo1np1C2duwqPvHHBUNmVBtEGQ/t2crduPB522b +ccK+/UJOp40xduuRlb7pVibMjfFE/ZrEseTHz9WdzJkQsXkh4li2EZZWpCbt +s4MJItFqR+VLDLCsJ7cFTu9kwirF243/bdTD8sp4lq84MyHHW7rhQclmjF0e +OH7HjQmpzen/lpO0sKeVAwO5+5iwcMm4p8qPiVXU7vj4wocJP7eIrarmo2E1 +9eU17w4zgTuslMeNWwOrf6dR0hfAhESjo6Z8tqrY+w9JD3+dYsKygz1Je1gJ +a21bnbQSwoQ2+7w22ksy1tV5ImpDKBO6pN0KldIVsP7er8GkCCaEBwxNeTFl +saEB28Na15jQmvxjZkVWChv99tLNJJYJXse8lnj3imOT/1FtHG4xQUh1fuu1 +MRHs989kdCCZCUecHSRuvtyELU7waZ1KY8K9m1n2X29vwLhmTylGPmCCeJNs +6gXZ9dia+W8iSTlMoIauaj3PsxZbv2S/OqeACTzq79MTYQ0mzFU196yYCbpL +cSO33vJgkryMkcYyJlzKLTNjJa/C5PnvdvdUMOHTwNN5N8t/LKX16979rGaC +g69zX86Hvyz1jWcqlt4Q/r5c+B3/dJ7FEP1eIPieCbI1pzpvzv5m6Ug63pf/ +yAQpjYmkLaEzrC2yNXHMT0wYz9o6pGg/xRpUUu7/0cMEjaSE1iMr46yr1Ehq +1gATMnZm2CuW/2Rpbh454zHEhOBdNTFRzSOsri2WbyR/MCFyURrVMr+zQk3y +Rdp+MYHTYnW5+9M3lrql0L6YaSZE5X01S6/4ymqxDyjc/ocJAfuUHlqVDrBO +7279u2qJCQ8kZNvwXX2sWM0UZQ8uTZgKuWrJse9m7dexsirn1oSC+vZx87RP +LH2DpUDJ1ZogdbXQ7P7mdpYAq+DOKT5N4LrAJaGxrpVVvHXDd+Z6Tbh97Td8 +rXrPcrUK3Dy6URPMELO0cPgNi9uhLTRLTBMupeme1zaoYeW66jZ7SGuC6kLH +kbH5CtY5j++z5bKasKpaWD6x7TnLzitJRkpBE5IYrjHRvGWs+YMLfm1KmpCS +JTX1aVsx6/2RvFhNVU2YWS2WW2DGZqUH7nkao64Jf9kfomyW81nbg1/ymNM1 +oU2Hr85+MZuVGBWWVqGnCQ999crXNt9lHYrWfi1lSKw/8oQklpbMwuO+/Qwy +0oRvgessLOoTWcNJ2wy1gDjP3kOd5f9usnQerW1/aKEJ2kr39iX6R7JaX99c +G+umCbEb2ZpSeCBLiCfz5L5LmnAlsUHHO3sra81CpcPUZU3Qu52x9qKmMWtl +/LN22BXi/K6zwXqbcNZEj9RUerQm7M2e2n/vrx6rpfjmkS+JmhA2OurV00Bh +xXuF+ex9rAlvBMbN76xsYonXeLq4t2vCcTtqP0NhwEg+TIG1W1ULmvF9MzL3 +TxitVXF7urNeCxIMNLgqtRO2MDCpotPu2nBQJq1foZJteLxfuNaSazMccqj+ +OOCQbTAxE+1kcWczCMrWHNgwcE9/O/NNigVdB/hL7v2Mao3SezVj9PdPsw44 +RifTxY5Z6R6lafd89NaFSo060ye3hHWw8QPtu9fqQTVf1NuIZwXa25Qldwhm +6kHd/nOrb6jaaamHXjtTo68PdT8kLF+YjzAp3oaVKj36QPvKfGFdsZPh/crv +ckmgAQy5tLDjIupplentB6bEDCG2aPTe1Ng66mzOvz/MMkNIX3pW97nVVGO/ +yuO1KTu2gJ2t5MB7w1i1KUqCXvHkFli40ut95WKmyrOsv19/RxmBRanSsTi9 +eiVXUyUwkmdBDUO9RPDif2SZI1eeM6pYcM7u+p9p5xYFsXX+nB3OGIR/TVLd +u/W9XNbW8yGTuzFo980817iuVk77/I2tCW4YrGgG2Zx99FzOZpLd0bUPg56Y +o/Z1po/kIj/9Xtjvj8FFJ9paH6lwufnMiyYhYRgs/16ZMwozlOsxSmjLfozB +7IAeXjnxUNbvVNZdi0IMoivtVvr23ZOdKyz1HmNjcOfNe9er+Qmywopdf7Se +YnDoJm2iMCNM1opfTvZlFQYW38VExEzcZCvasw+0dWDgho2O/fd3k6yl0DN6 +UBcGjK0p0Uq8/LJd2xvnJHsxeNVV4e7DzyU7++JnlMcXDKz9dOklcWMy9AzN +gh+jGLS95iuzSHsjU9FjHBT9CwPSGaWwYfVXMpaiDog5iYHOy4zPWdIlMj5X +Tn08+RuDf6P4V1JvhsxsVWSKxDwGNoP1G9hvk2QuLSbtf7GIwQ7f6ZUnMV4y +G3Vyae7LGHzhlXh04vAembQjL37/+4fBxMFguX16O2X+B4gsXNU= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7913,117 +9101,262 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwVl3k4VV8Xx4WiRGWe3Wt2R2TMPWcvkkwZQiQkZahUNCiaSKQiogglJCHD +vSIVZSxUJEPGKNFPkjkh9J73n3ufz7OevfZea6/vWvuQvY7t9Obm4uIqJH7+ +/z/X31infD0LX+Mj2R8Wb4y3p0kGG3ddQljJwdlweRICsQ9ekl3xaMfIYd69 +8pooyC6vk6crE0X7i5iZyQPaNC4Rv9BZjKR0yppI8nZooMLm2GxnDZpN+F6Y +K+eJzJRHP091tqI91gYlfTIBaKFT//Zk5yD6dSbyTLFoKKrd+ijrY+YMChUo +8HieHodkB55/96Ito5eHscDPvneQqP/ePL6tPOBy9YSi6pP7KF7LrNzGiR80 +zocYjsQ9QN13NKumNgpCSEPUFufabHQ96+IHbqlNIGkxZmXxLRdJ3Pp2NeGe +COTytpqYJ+QjSWrp5flsETgjbTp8424+kq6JvOjOFoHokIWvHx7mI/lJjVNq +tSJgZHR+GJ7lIxXrAM/yERHoUwyZ7e/LR5t5l/W+bRaFlaTvOutUCpDtSfEh +7beicNiirFSMU4CuOFrgrXNiwHDbHfq2rBBJlzRLc68SB65QWrh5VSEqFHH8 +oyUgDscLX6dUNhSiT60e7JsK4jCVUsib3F2IlO1PKtqbi0PK/dy8+cVCVLPj +/pqWZHEwM1S/dIhVhJbNfjc3sSSgXZZ7WfhFEYrLDnm8bCYBvnufrC2uLkLK +a7ii6PYSwLdDS8SysQhZv15nHOMtAR/MkLR3VxFK2Up6Yn1DAvIU/hsxmytC +BmCV9G5AAu588r/qJslGJwwz9jZekgRpBrchxY6NLNOFZq2iJWGL9e0eWwc2 +UuQ7F9V8WxIyXn/xPb6LjVrad3Hacgh7nNa2Qjc2YgSs5+lvlgTHzcN8qw6y +0Uj26expaSnIDOFLEQ5jIzdRm18yT6QgbldA5HAhG20+Wx6WViEFB/xEzuZw +2GjdoLo4+Y0UCHjX7PYrYaPnRTxItVsKngXs6Oh/zkbiVs/jNP9JwR3RmNfZ +dcT+Yco626yk4WSU783MbjYynVgMOfpNGh58TGFZruKgYPNblOoxadDP6r6T +xsNBhRn0HpE5acgxG/w3sZqDJB09DZ/zy8Aj84bxq+s4aOzZ6z88DBl4Kbzb +IUWEgxIuxZ1MPiMDgjMdTnQVDhoUUz1aJygL+z9/cJcz4yCJY5VyEhKy8MG9 +1E3EnIOsG1yaDpJk4dwnzuE1lhz0NOQ6bcNmWZj8/eHFtx0cdG1gcnS3iyzY +dE4onXXiIO3cct+JTFkQfd2xS+4AB4Wx7PdJG8hB+e2Hm7QucpC5R9q0vokc +NP6nrDoWykFCoT/DnazlIPX0lQ8PLnHQ3dqI7DhPOThrmDjIH8lBzyxf/Fxz +VQ5+W5wSy4vmoEkXpaCZbjmA7dFCFskcVBYSwLdpSA7C9ZlZTSkcdOHuyzuM +cTmI+FzUYXOXg9Z/cS4/yC0PS1l0oe33OUjNN5rrC0UecguiB4UecpDHqd/X +3p+VhyPn668sFXGQSpKJ7GiEPJAqBcWtOP/PX2wBX5w8rMvQM08s5qCQJY0W +kyx56NVzSlEs5aDb4R5iz9/LQ+IjrtUiLzjo/c36+w/lFEDgglagQy2R7yei +WrVqCqDstjbUv46DXDv21XzRUoCDKe+MLr3moBHJpSEZMwXIqz9R8aCeg3jS +NSnxRxWgONxi5tU7DtpSmFxyoZLgO7+qd7VxkGln8/J4gwL4fFaqpLZzkA0X +7/a9rQrw4jv/l2WC9+882o2GFcA8njs2+RMHmZ0lXwxdTQLTfW3swm4Oereh +4oHBOhJIfUru8e/hILusXQ2TQiToZfjR1Hs5aE/T9U37JElQlrDLMrGPgwIU +5h4YU0mQ8Fj/ot0AB/1+EtewwCT4w+/5PwSHmFN/cXQI/9Im9+9+4aCIQE89 +RZwEfmc7Tnz+ykEptW8buO1JkOcPO7AhDlJw8f71wokE27/XGjUTnDX2b9MJ +VxI0bYza4zbMQUViunu+7SeBJdtAK+A7B9X53v9VG0SCAztoZkEjHGSxZCh8 +7iwJFKozPkwS3BzXrqcTSoJNtbqxfj84qPv52tCsqySY/KfzxHaUg8YFTgpH +3CXBw06x9KWfHHQiXUgfyyDBmiSuMc8xDprXyd3z+yEJbEY2naghmMejP8u7 +iAQ3ggx0z/8i9MQ21zerIYFBU27qx3EOumf6bc/KGxJUMbtbFSY4SLH7fOjT +d4T9+V7LwwTTuZ80qnaQoF9GfHmB4OLEHeP93SSodks2xCY5yIA6IpzUT5w3 +Tvr5eYJNHOXc+EZI8GmmNnyO4PqRstDKMRLEyJm2MKYI/Z3f+fD0FBGv+nGv +AwS3bvrVyJwjgevRv1uSCHbOvjL+3yIJ5ptjXOsJ7tuiKJL+jwReRZ3VswR7 +fajQd+Elg9LvK4EK0xzkPz8V2iBIBqfn3fn+BG8J9BH/LkwGt+C/XPEE84/2 +POaRJMOGR1JqJQR/8rI1JsuRgconTmoj+GFv7SdckQwe461j4wSfdDTwd1Mj +AxPbfINvhoinKX9VCI0MF3ZKr5YjeKMZOSlJiwxta/x3Mgnuf3WbVqpHhsiM +9adxgvP119W0GpEhpunLCUuCQ9gXnCeBDBGxTRYOBJtrzIwJmpFB1vDZggvB +4pm+l6hWZGDtiby8h+Ah6T4JCzsynHsu99OV4OIEuwIfJzLcNTjAcCY4dP1r +k8uuZPj0AdnaEWwbYdiVsZcMQkGJNmYEy68UHKk8QIZ9QjZ0Q4LHghR5Ph8k +wy4H6zF1gl9MJN5ZPEoGuaqgaDGCo/wEGJInyeB9pljoHxH/rq8Xa3WDybCN +MXRimGBl11kXhwtkqOSdrGggeLrVbzwgnAy7jz8fzSG4yupz+I0oMozIK61E +EHyjzl4qP4YM/1UJze8l2A17U9gYT4bSObduPYIpT7eY/pdEhouyvzLXEbzA +KOrmvUeGa+R7Tr3E/TY8UjqmmEnka5fFdA7BiaQ7vPCIDJ1b3gefIFhbOIx5 +lkOG7pxS639EfXFd/1135ykZuETfJFcR3MxzyPVpORkoR7g6LhB8+PfOiKnX +ZJj4pCo1TdTvlqP10hveEfFKZik9Ipj/PyM2rYUMyvP+CrsJzupS7vXtIcOz +7I5fTwh9HLdPDogYIEPdxGC1G8HwVnDNgyEyJHwXu8ZN8OfyOc3+cTKIn49c +MCX0JX6/IdKRRxHMnDS8HxL6HJLAZI/zKwLvcfJPXYKL4zicWEFFUHp6/2At +oWfbSyl9byUUwe5Pun0Hofcob39tY5oiSJ8bbG//j7iP/i/1HlqKEJwfqrqD +YGVnJ/dzeoqg2r7ueA3RT6rM8agyUIQMp61zD4h+s0Dd2E93UgR1Ul2uyTcO +mrsnHbbZVREKyi1LHw5y0OwGFWXDvYqgbC/Xtprg8RnDQ6YHFeEC+bnxS6Lf +DZbvn3M9rwgy39zq+fs5aIB+NNnzkiLMmWSaOH4m9Hj/DMvniiL0Neyru0v0 +00/hMZcCbyrCnoSVj8pEv31rVSYU9VARGMUN9Ru7CP2/rObE5BH+35pRTDuJ +/sd875hQRKyvsQ05SfTzVyJfU9KeK0JIrObHd0S/L+5dp1bapAg511saHT8S +/fawBxr8rQi5U9Nr3jZyUNJnv8H/Fon4mGrOjQ0cdMv2RMSvf4rwY915mdfE +vLmxOerd/Fol2B14uZlDzKNLfznOG+SV4JOPipNHNQddPFKxKKqkBKU/yTWo +ioPODby5J62uBFM3nShylRwUVNv7TUVbCZqkPqS9qyDq5/rqAJaZEvzyNHo5 +W8ZBfssbREyslMCBVFD05CkH+RyTfrrdTgk2zIgPHyHmp6cDc2mnqxKEnBZ9 +2EbMV0eZ3VEHjypBR5rfimcBB7Ee56cnJirBb9/sH/syOKiX9Pj+tlQleDF3 +2e4LMc9DEnPTZu8rwYFfQftc0oj3QFj23Z25SmAwev21TipR/y7pd4QqlKA/ +6rRg8i0O+tiUlvSySgmSRRK3D8QT823rvUT/10pwzf92uNxN4j3FSLn1tlkJ +rp7O4QuL4SCN1bfiIr8qQaRmxGxfBKG3kPhY3e9KoOqJc/WFE/FMxt0YGlWC +PFGfry1hhB56Y6JNZpUgMbb8a8p5DiIVX4laWaMMFZIXL2af5KBKtcgrBQLK +ELh5x5jlceL9ce9ypNtGZdi+4Ow3eIyDUqPCLr+QUoZf4LwwcojQx96zoUE0 +ZWhMkG439+Sg0vbgiypahP1kqmKIO5EvyzMX2nWVwTltTCjVlYPidU+d00bK +8OB2V2uuIwcJrj92ZtxeGZbvxg2NbSf6bdiR0/d2KYN8gqVwjCkHWf45HGS9 +RxnCGsllksaEngb9TuYdUIaJqw9lJw05iPe5V4DPaWWwF+B+doPCQQ8Y+46J +nVOGV9W1IiGqRL/P2nu0LlQZfk5/ErBWJOol1s1f8ZoyfDnboZkhxUGL3rv8 ++u8qg23EE6/lNRyU3OvoG5OhDHYFKg3ruIl5aO/gw8pWhp3V2lYLS2wUxLI7 +kFKkDH/biqqCptloStjSc1eNMghFNab197JRl79iy6F6ZRia6Cp162CjqjeL +6OJ7ZfjnTnMqamajuJDHCjmflOHRa45OcxUbaQ6uH1gYVYbyhxcOfcpkI0nW +sI3QpDLMdarV9aWwEVfiy1eKv5WJ98Dju0XxbPTB4mia1T/ifvgyXz0l3vdH +OR/c74mowBXh9akMdzbaJZDTxJFUgcxQx+pzxPcD7h2KvZFTgcACq4OxFmwk +KKUlN6GmAhJHAvat6LBRfmh8H7BUwHDyR/wIPxvd6jlk7WSsAlWUn+zQxSJ0 +TmdrxUEzFfixwfd83mARshqZSY23U4EP07dlfThFaNTWac/QARUw0HF6ZWde +hFpz6e/mD6qAblqr+0NaEXrBs8ZI8JgKCI/cXPHdWISulj2V1gtWAf5kBl37 +UyFSV5DsuRKjAqdWP7Z84VqINgZPWtyNV4GsK553PLYUovnWhufsJBWYuiwf +5idViBoig5O7M1RAfscl97yOAuQ73uNCfaoCZ6JLb3eaFSAb8ycNqFwFWkki +4cnkAqSXed3AsUoFHp44Ufvybz5as4slef6tCjS8it5DL8xH2S/vdTb3q8CX +GLVdRQL5aCjac9dxPlWIab/l2pibh46O0hQ116vCNd9zMUIX8tCf7Qu/fm1U +Ba7JJuiwz0PreOIjDkqrwpRjY+3Yn1ykGVxb4klXhW/2BkoBeC46760qYuug +Cnc/P9f0f/oIieNjH6j3VWHDtjNG9vuzUHrqs9QfD1RhhOEfNUfNQhoLl30f +5RB84l3w0dkHiFUi90+xWBUu7VY0G7r8AO2n2DKkX6vC2vYQGausTMQWL47m +/0n426itr/MlHVlMnLYY1lODA6SSDdT3KUhWSz6Sn6UGESkq22SdU9D48boa +qrEarHo1tbZoMBndmtvIOm6lBhq97YLdf++g/uVcxr+9arBzNmhAVD8JHV/f +JyJ1VQ1eo2Fti84EZGpzyY51Qw3Ya5PHnhxLQBJx6jF7E9TgmkSEEHVtAqoQ +ObUm+54a5Fi+s9mJ4tEaGaEF7WI1WNAw7eJ+HodSNKDfupewyz58vvXtdeR/ ++Lt0wBc1qJ6xOutOuo5QQbRzwrAatAWMPVk8cw0NaXa3dE+owYtZzvO3WlcR +w+B4rQ+vOrQ7P3r8pzoScYVIcl1bqw7/vfj+3ocWidrKX7EKhNQhhfvK6IHk +CHQGCTydkVQHK+v72Pqzl1GtWVZOKF0dPmqIuQ27XUKJUZbDD7TV4VzPCCro +DUN+byfJ9frqQM37/XvOLQwJ2WCpgibqcE2hrYnbNxS5OH2KSdmlDih3ZkxB +6zyiJJ17+3KPOpiraW5YcDqHlrsU+b56qoOEPB4df/EsynQ7Fqp2WB0iz4iO +9nwJRmP7+U+UXFQHLLPlUVBPEBpPM31ZeVkdzjRndTqoBaGJ7lC+d1cJe4De +Gt8zp9C07ULq1wR1ePgj2H1R9ST6YzRaJ5SjDqIVLdsdSgLRfJDqBukCdRCn +PfztSQ5Eixyv3SrF6rC7MM1DJz4ALan1/jKqUAdedi/t6/JRxC36Xvxgizrc +tn3oS1lzGPHa8u872aEOe5794rGXOoRWXzN9fLFHHWS3PbgotPkg4ud6iRKH +1CGAO9D3Y7AvWme0cDXjhzrIrHU9eifbBwkE6bbnj6uDexPfneBubyQ0VuBX +O68O65MD+wTtD6CNaqPFzcvqMGQ0N37p9n60yUt1uZtbA1aquhQSB7yQaFfa +zcn1GiAa/48ue3kfkqqLfSFH1gAeo8GKfHEPJP3vHa+GqgZkh9762DHthmS3 +8NvqUDVgdveBRdeuPUieHfrNUlcDaoe3rsS/2o1IPyvou7ZoQNBwhlz7KxdE +Vl04vQ9pQFfawf9i6p2R8t3A9WcsNODjwCvH2CknpNpZsCvcRgOevEwoOCTs +hNSER9NvOGiAz/Vmle9bHBElykv3obsGhIQ/J//K2Ik0Tzp4tAZqgKuf/syh +CFukXRSb8zlIA+bUQo4K6tmgzaPvpkfOasDy3o7hrmlrpOdpeuVfhAa0/dw6 +dyHWEumnhn5cd10DBH4mzj86aoEMPlXIiMdpQOKNqqZEF3NkZK3LphEiocg5 +TJyyMkOsK4GL+veJ/d7wpdY4bEN4TYHp1iwN0GOKdMV4myIwUO3eXUjYp3lX +DmeZIDNlCe4rNRrQl+RQcloIoR9e23OM6jUg4M2k7+lXGIrOOG0z+U4DNvvy +zymeZaE2+a6U3R0a4BdYWf1FcgsKcuc3FurRANtU3QbKggGSvmvwX02/Bnjz +fKHHDekjT6nkzbQRDZAe2hSs36uLeFwau7+MEf5DpMPrhnVQduLCxdtTRL64 +vqnwLG5GYyKu71cWNeD9UjHPNlwbBQvJeH8UpICZUXbhDlcGkt1hJRApTAFh +kWje+Xkaqrp+lrNFggKe6bztetlUtGZt3/IDEgVWuTphrhQNlLt9fZaLCgXq +1t7rY3GpI+tIlqUghQL0Z5XdRYOqKJ7nXmLQZgoIyR1P93+njHRNmlhUAwqQ +TvY4t7Yooa7Q5cEBFgWqPNlkrq+KSGHFnWlhRoHJfmsxYRIZ1bBudCxbUoDd +uT+LbkNCPmdfnS22pUDFMce2f+sUUP68fIPMbgqo1xnll8jKIlt926Mt7hTw +mBzs9n4ljaZPXRSN8KLAG+2Y76+PSSHDmQHP8cMU6FxjUybyTxz1aW3kexBA +ga71LpwPvWIoNAAKnE9RIJukXvDptSh68yt9oeoCBUoj4uRTK4XRQdrH+6fC +KfD3Y1isbfMmtP7wKjNKFAV0Dfc/YY1sRDtH9sUn3KSAMrhJ1REX/ls13sA8 +kQIfAhR2Hf6xHt3xrulfSqHAs1UzUlNHBNDAoCLVJ4sCm0kTEZ75/OgS2eGj +dC4FuBUMOdUH+JCqZ/jpDwUUML9nNTlBW4P8P3+rNSgjuF6lcfoHD9ogK3ro +VzkF1pNI/05/5kbFrqYbM6soQB1y2ETtX4XmO7PcBN5SACK099TwcqFU8Q7u +qmYKhPyUihd2WMFxp9W5J9sosLr4tnZk8RIe0er9+3MfBQRcxk8pFy3g6psS +U+O/UiDxqd30Yct5/L3tG+Pt3ymQtvckvfXPHC7cpHqDPUGBJ5JaW+9HzOIr +E5oP385SoChwvOe19Qw+KmxUMbRAgUc5DaV+KtN4jYvtqCQvFdi+UXvi+Cbx +wrO7V21eSwWubzsz38uP4ylp+yV3CFHhouT86hLLMfzE0GmzMEkq/Dt66479 +1AjuyXfJPVWOCmougr9MDv6HW1OiT5YqUsHmJ3/40J9h3GBH4vUPalTQv/0t +ajl1CFcOSM/8QaPC7sz56AOO3/CNCXnPebSpoMrmbVtRGMSXSkta5PSpcMo0 +uahy+Qve/rdhxd6YCqJ8bONrnZ/xKvk2MX8zKujFLZz2mu3F840/0yKtqBCv +efqJEqMHv3Pgv63pdlRYlyoczwzvwiOuTLm+cKKCVHelwPLUJ/x43t/Adlcq +JNftC5II7sA9mlZfHd9LhY1LVxPkJNpxPRHpMsVDVAgScUutjf+IK+opN7OO +UeGxH0dp8UgLLrSbMbzrJBUSbjT/jH3ajC+eNVgKCCbOO0HhgSfv8e9pJiLX +LxD7f37my9fyFm+ttqY8DKdCALXmMq9AI/5qaJdxZRSRr8XRv8e86vEkyuFj +M/FEfq/rfJrYW4df3nEqUvAOFSq05tR/cdfiAQEX76ndo0I+XW6/ekU17pZw +tcQ4kwp/ORW9lteqcPOnCe/2PKLCx/MT1opdr3Cd7nuDp/KpMHd/iHarqgIn +LT1aiOVQIZHnRvLjdy/weeMKtbpyKuywtTl11LgMHzrwBu+vooLjFv48/ZxS +vOVKi9P8ayqcdtxa169Rglfk9fgLv6OC95MjhWV1xXhu01A4rYUKQrdU7Jmn +OXji5HiKWQcV2re6bnmL2PglkQWOZw8VlFzM88y2FOKuuwW/3BqiQrbWoWcN +5Dzc7JzEn8IfVNin+y6y2SIH175PFmocp0LsqnbnZzezcfkaqsq3GSp8Gtp8 +IPhPFr5uWJe1PE+F90RZKwc/wOf4wEFihQqWDY0mP0Uz8UGK5SEtHhpYRYwc +lW5Mx8sDPO54C9Ig66N7bufIXTwnwa/oojANtiuOW9h9TMFvPT3+JlmCBlTh ++val/jt4aPe5z09kaWA3ETjgvSEJ91+KnG0i0+CIQle6kedt3EXhpsCIKg1O +Z9vdc/iQgJuapCpy02gwK95/PNs1HpeNKrLT06PByE+RUN7zsXheYUHtwhYa +8L3KWQ7dEYMbdDzWe4loENDHG7d763X8zd/c3FBTGtQprlajul3FHRVzZE0t +aBA1hd6W3b6CD5pnx/LZ0EC1rClk6FcEHnAsi/vdThqkP67VKvO6jEdXpI/Y +u9Eg/OSyEldqGC79LW2P2D4aFNN2xYvvCcVz1t5r7vKmwWDLGyOS1wVcTzPV ++O4hGhjFuJMW9c7hdbuSS/Yeo4GBurvPWu0QfOf5JDWlkzQwrz4yWm93Bv/y +4HbK9zM02D9nCF1xQfjfyZuhRy7RYK7xVYeu/wk8SiJuRvMKDeTulz24wHMc +F8dv+Mxep8Hfu0ep60sC8KwD0d1lcTRYGPaJcZo/imtfv2Z99jZxH/wuZREl +/ngVJ6oST6GBRt4568LkQ7hNV6Q2930aJE1jumse+uGHVMIlr+bQIGfqQyWv +sjc+bxV23bqABu2VzIHf8fvxyOMXVzYU02CoKl8oW94LF00+H9j2lDjPAUkl +qdeeeGbl2aHEchrYuDLVf/DvxTW/Bzu7VtGg5vz4i8VSN/zV+jNv5V7TYIfV +5VW0G654z+6T7KxmGiSbOeUJl+zC/UKPK/m10eDDi5lclyVHfC47IJHaRQPf +sFhq9wEH/HLT0bUTfTSonM88b/3THhee9T9X/JUGoadO3Y2PscPTpQ9PnPpO +g7fbNmH7EmxwhvFBL8OfNOjv3Zxw18gat7zhbV41S4PEtiLLWCFzvKtkf3n4 +Ag0it7drSG02w3169zG2r9BgKgKlorOm+Owqz4x1PHSwyMx2Pjpkgl9S9xBt +5qPD22P+KsjfGN9o63bl5no6iOYM1wVtBDztlOui4yY6YIWucrxpGP68ZteX +Xmk6RD1SmVlRNcTNfjg63FegQ2n4C/Y8VR9v3+DwxkuZDkHXwm6VO+viXnr2 +hqoadHh54MyE76PN+KSbbf4POh1sHBLyd0pq4xfCdygUaNPBp3flyaocTXx9 +nlV8gD4dTJuXxexzGLj6n+1n/gAdEsN7mIvTGvhTObOfL7bRwWDJUKH0sxpu +amrqccGSDtXTEcKi0yp46yGTj8a2dNjDqY6doCnjnjfBdLUjHfatuYb2XFfE +x8vwsgYXOvRpvqjOWEfGz/WzKNHudHg8z7oVZqeA36EabhTxpYPHz2vQekga +d7Jqint1mA4zf4foa60lceHD+zYdCqDDKvn60nxncbz52u+bYqfo4C6cbnz5 +mih+Pe+qcHUwHa5/2taX8FUYN38rl+B/gQ7jzLEhCddNOO8oR0QynA7nEUOa ++9sG/IJGj+ixaDqk7F0zcfC/dbiRxdHb0jfpoLs9uyq6hB+f9+MWf3ObDlLB +fj+uFK7BS6ISEwNT6PDmwv6XXz/y4oE5FAm5+3So1QsK2C/DgzMaXiU1PKAD +Pc1zi2jUKnz0v52SJ3Po8Cyn66OOGBd+QO2s1DsOHeQORefcE/yLkbdvSAl6 +SgfaMkq82jSP9fs8kFYsp0OTT6y1YcUclhKpn9pUSYcqBXX3xY5ZzDn7nUxw +HR2G5n359kvMYKJv9t5VbiTqwfJDi/X5KaxleEa2pYkOs8fYoR94JzFLFVl5 +tU46xFg/qdbpG8X4trHTWnvpsDBd7WCSOILVHTBVuPCFDsOkoAf+od+xsMtd +9zWG6dDjjv5rTRzC8Cx/UscPOtFvRWmDHYPY31qujNBxOgSD5CHbLV+xZ99u +kWkzdJi/arlJ+dIApqX0UjF8iQ7LU+40M6cebNzE/gFjFQOGPQ5tXbWpC8vz +GlbqWc2Abuc79fHLHZjvpeCsiHUM2Hhz77M/4u2YcqagitYGBux/U4Bf3N2K +fa3OeNgnwoAQHSvLuuoWLO2rrmqUJANe8V92tE1uxvasepu9WY4Bh/pKGbfH +32GSZA+1ATIDmrZW24lcaMQ6YPrRNVUGKC0N2E2a1GPxnpHqelQGtExaxZUZ +vMZsQqVzvzIZYPp7cZv9nlpMIL1QI0aHAYnH7VT+ZldjDZUmeQaGDBDZw7pt +LFmFXR74RBnCGFCxmtwz7fwSM/536HGsCQN6vmq7nnz1AluR/0c12s6A2rKz +DhyPZ1g5npD/3YoBOfzKxnWbn2JnPNTo8XaEv/B2D6ZhCaZzobwAc2JAXZu4 +dfuhYmzqni3jx24G/Llu7DxWx8YKX34rvOXBgPgdZ99wRxVihz6fZsJ+BiCx +2mfNjY8xtWUB9k9fBnTwzHr5W+RiQ7Lpmkn+DCjua4qJWvUIy2DpcEwCGeCi +/aXE5FcW5uHWoDV+igH5d2zTlPgfYNLn3IqTQ4j7+ZlXLGqTgXWmTmpvu8iA +j0LjAuyg+9it8stPJsMZEGDqw8+dfBez65XUuRvFgD4ddLB3KRkT/Jtfsj2G +AReEBDaG3U3C3kob687cZMDKYbApPX4ba5EvUuVNYkB/I+mW0M4E7JOinKTY +XQY4HJF85+dzE+tTvb5WNYMBkqwad3+nWOwrZWFRL5sBzo8G7Wp1orHvDN+x +7Y8Z8FRBPf2K11VsTLvjswubAZ3vL7VqdUZi03pbPxwsJfINLhET1y9j81s4 +VSEvGDD953pTfMglbAVXKL5eSdTP2e1i4fdCMd6tMQ/u1jEgO6oyz2PgPLZu ++99bBY0MYIhwS/J0h2AbrA5GvmpmwF6vstxshTOYqG3n6Q9tDBi1/Shc//gU +Ju2w7eCXLgYIrhfISg46gZGcn7hOfWaATIOlymJwIKa6h2zN/Y0BeoOJF556 +HsNoe2MxkREGJJ1dmxWg4Y9p719mKP8i/GWyGZu2HcQMfA+TdKcZoLb1yYjP +Yx8MO9y9yewPA8xI2hUCTgcwk2PbeZyXGMDa5n/c3sgLMz9ROuu7ign6GZZG +mi6emM1ppe9n1jDhRD2ec8TaHXM8e7PzqgATVIL57ObBFXO9+K8hZSMTbq5I +xypHOGOe4UdePBZjQr7LFq3fG50wnyu9jyukmXDSLH6r3ued2OHrFveaFJhA +rx8qPPjNDguILbvRr8wEnXXnrA4b2WBBCSqhExpMiNO1Pp0raIWdS0oI5GIy +YbWy4ZKQjjl2KXXV/k06xPo1np1C2duwqPvHHBUNmVBtEGQ/t2crduPB522b +ccK+/UJOp40xduuRlb7pVibMjfFE/ZrEseTHz9WdzJkQsXkh4li2EZZWpCbt +s4MJItFqR+VLDLCsJ7cFTu9kwirF243/bdTD8sp4lq84MyHHW7rhQclmjF0e +OH7HjQmpzen/lpO0sKeVAwO5+5iwcMm4p8qPiVXU7vj4wocJP7eIrarmo2E1 +9eU17w4zgTuslMeNWwOrf6dR0hfAhESjo6Z8tqrY+w9JD3+dYsKygz1Je1gJ +a21bnbQSwoQ2+7w22ksy1tV5ImpDKBO6pN0KldIVsP7er8GkCCaEBwxNeTFl +saEB28Na15jQmvxjZkVWChv99tLNJJYJXse8lnj3imOT/1FtHG4xQUh1fuu1 +MRHs989kdCCZCUecHSRuvtyELU7waZ1KY8K9m1n2X29vwLhmTylGPmCCeJNs +6gXZ9dia+W8iSTlMoIauaj3PsxZbv2S/OqeACTzq79MTYQ0mzFU196yYCbpL +cSO33vJgkryMkcYyJlzKLTNjJa/C5PnvdvdUMOHTwNN5N8t/LKX16979rGaC +g69zX86Hvyz1jWcqlt4Q/r5c+B3/dJ7FEP1eIPieCbI1pzpvzv5m6Ug63pf/ +yAQpjYmkLaEzrC2yNXHMT0wYz9o6pGg/xRpUUu7/0cMEjaSE1iMr46yr1Ehq +1gATMnZm2CuW/2Rpbh454zHEhOBdNTFRzSOsri2WbyR/MCFyURrVMr+zQk3y +Rdp+MYHTYnW5+9M3lrql0L6YaSZE5X01S6/4ymqxDyjc/ocJAfuUHlqVDrBO +7279u2qJCQ8kZNvwXX2sWM0UZQ8uTZgKuWrJse9m7dexsirn1oSC+vZx87RP +LH2DpUDJ1ZogdbXQ7P7mdpYAq+DOKT5N4LrAJaGxrpVVvHXDd+Z6Tbh97Td8 +rXrPcrUK3Dy6URPMELO0cPgNi9uhLTRLTBMupeme1zaoYeW66jZ7SGuC6kLH +kbH5CtY5j++z5bKasKpaWD6x7TnLzitJRkpBE5IYrjHRvGWs+YMLfm1KmpCS +JTX1aVsx6/2RvFhNVU2YWS2WW2DGZqUH7nkao64Jf9kfomyW81nbg1/ymNM1 +oU2Hr85+MZuVGBWWVqGnCQ999crXNt9lHYrWfi1lSKw/8oQklpbMwuO+/Qwy +0oRvgessLOoTWcNJ2wy1gDjP3kOd5f9usnQerW1/aKEJ2kr39iX6R7JaX99c +G+umCbEb2ZpSeCBLiCfz5L5LmnAlsUHHO3sra81CpcPUZU3Qu52x9qKmMWtl +/LN22BXi/K6zwXqbcNZEj9RUerQm7M2e2n/vrx6rpfjmkS+JmhA2OurV00Bh +xXuF+ex9rAlvBMbN76xsYonXeLq4t2vCcTtqP0NhwEg+TIG1W1ULmvF9MzL3 +TxitVXF7urNeCxIMNLgqtRO2MDCpotPu2nBQJq1foZJteLxfuNaSazMccqj+ +OOCQbTAxE+1kcWczCMrWHNgwcE9/O/NNigVdB/hL7v2Mao3SezVj9PdPsw44 +RifTxY5Z6R6lafd89NaFSo060ye3hHWw8QPtu9fqQTVf1NuIZwXa25Qldwhm +6kHd/nOrb6jaaamHXjtTo68PdT8kLF+YjzAp3oaVKj36QPvKfGFdsZPh/crv +ckmgAQy5tLDjIupplentB6bEDCG2aPTe1Ng66mzOvz/MMkNIX3pW97nVVGO/ +yuO1KTu2gJ2t5MB7w1i1KUqCXvHkFli40ut95WKmyrOsv19/RxmBRanSsTi9 +eiVXUyUwkmdBDUO9RPDif2SZI1eeM6pYcM7u+p9p5xYFsXX+nB3OGIR/TVLd +u/W9XNbW8yGTuzFo980817iuVk77/I2tCW4YrGgG2Zx99FzOZpLd0bUPg56Y +o/Z1po/kIj/9Xtjvj8FFJ9paH6lwufnMiyYhYRgs/16ZMwozlOsxSmjLfozB +7IAeXjnxUNbvVNZdi0IMoivtVvr23ZOdKyz1HmNjcOfNe9er+Qmywopdf7Se +YnDoJm2iMCNM1opfTvZlFQYW38VExEzcZCvasw+0dWDgho2O/fd3k6yl0DN6 +UBcGjK0p0Uq8/LJd2xvnJHsxeNVV4e7DzyU7++JnlMcXDKz9dOklcWMy9AzN +gh+jGLS95iuzSHsjU9FjHBT9CwPSGaWwYfVXMpaiDog5iYHOy4zPWdIlMj5X +Tn08+RuDf6P4V1JvhsxsVWSKxDwGNoP1G9hvk2QuLSbtf7GIwQ7f6ZUnMV4y +G3Vyae7LGHzhlXh04vAembQjL37/+4fBxMFguX16O2X+B4gsXNU= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.07011959062070344}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8035,19 +9368,19 @@ U0FU/w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.07011959062070344}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8061,116 +9394,261 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwVl3k4VV8Xx4WiRGWe3Wt2R2TMPWcvkkwZQiQkZahUNCiaSKQiogglJCHD +vSIVZSxUJEPGKNFPkjkh9J73n3ufz7OevfZea6/vWvuQvY7t9Obm4uIqJH7+ +/z/X31infD0LX+Mj2R8Wb4y3p0kGG3ddQljJwdlweRICsQ9ekl3xaMfIYd69 +8pooyC6vk6crE0X7i5iZyQPaNC4Rv9BZjKR0yppI8nZooMLm2GxnDZpN+F6Y +K+eJzJRHP091tqI91gYlfTIBaKFT//Zk5yD6dSbyTLFoKKrd+ijrY+YMChUo +8HieHodkB55/96Ito5eHscDPvneQqP/ePL6tPOBy9YSi6pP7KF7LrNzGiR80 +zocYjsQ9QN13NKumNgpCSEPUFufabHQ96+IHbqlNIGkxZmXxLRdJ3Pp2NeGe +COTytpqYJ+QjSWrp5flsETgjbTp8424+kq6JvOjOFoHokIWvHx7mI/lJjVNq +tSJgZHR+GJ7lIxXrAM/yERHoUwyZ7e/LR5t5l/W+bRaFlaTvOutUCpDtSfEh +7beicNiirFSMU4CuOFrgrXNiwHDbHfq2rBBJlzRLc68SB65QWrh5VSEqFHH8 +oyUgDscLX6dUNhSiT60e7JsK4jCVUsib3F2IlO1PKtqbi0PK/dy8+cVCVLPj +/pqWZHEwM1S/dIhVhJbNfjc3sSSgXZZ7WfhFEYrLDnm8bCYBvnufrC2uLkLK +a7ii6PYSwLdDS8SysQhZv15nHOMtAR/MkLR3VxFK2Up6Yn1DAvIU/hsxmytC +BmCV9G5AAu588r/qJslGJwwz9jZekgRpBrchxY6NLNOFZq2iJWGL9e0eWwc2 +UuQ7F9V8WxIyXn/xPb6LjVrad3Hacgh7nNa2Qjc2YgSs5+lvlgTHzcN8qw6y +0Uj26expaSnIDOFLEQ5jIzdRm18yT6QgbldA5HAhG20+Wx6WViEFB/xEzuZw +2GjdoLo4+Y0UCHjX7PYrYaPnRTxItVsKngXs6Oh/zkbiVs/jNP9JwR3RmNfZ +dcT+Yco626yk4WSU783MbjYynVgMOfpNGh58TGFZruKgYPNblOoxadDP6r6T +xsNBhRn0HpE5acgxG/w3sZqDJB09DZ/zy8Aj84bxq+s4aOzZ6z88DBl4Kbzb +IUWEgxIuxZ1MPiMDgjMdTnQVDhoUUz1aJygL+z9/cJcz4yCJY5VyEhKy8MG9 +1E3EnIOsG1yaDpJk4dwnzuE1lhz0NOQ6bcNmWZj8/eHFtx0cdG1gcnS3iyzY +dE4onXXiIO3cct+JTFkQfd2xS+4AB4Wx7PdJG8hB+e2Hm7QucpC5R9q0vokc +NP6nrDoWykFCoT/DnazlIPX0lQ8PLnHQ3dqI7DhPOThrmDjIH8lBzyxf/Fxz +VQ5+W5wSy4vmoEkXpaCZbjmA7dFCFskcVBYSwLdpSA7C9ZlZTSkcdOHuyzuM +cTmI+FzUYXOXg9Z/cS4/yC0PS1l0oe33OUjNN5rrC0UecguiB4UecpDHqd/X +3p+VhyPn668sFXGQSpKJ7GiEPJAqBcWtOP/PX2wBX5w8rMvQM08s5qCQJY0W +kyx56NVzSlEs5aDb4R5iz9/LQ+IjrtUiLzjo/c36+w/lFEDgglagQy2R7yei +WrVqCqDstjbUv46DXDv21XzRUoCDKe+MLr3moBHJpSEZMwXIqz9R8aCeg3jS +NSnxRxWgONxi5tU7DtpSmFxyoZLgO7+qd7VxkGln8/J4gwL4fFaqpLZzkA0X +7/a9rQrw4jv/l2WC9+882o2GFcA8njs2+RMHmZ0lXwxdTQLTfW3swm4Oereh +4oHBOhJIfUru8e/hILusXQ2TQiToZfjR1Hs5aE/T9U37JElQlrDLMrGPgwIU +5h4YU0mQ8Fj/ot0AB/1+EtewwCT4w+/5PwSHmFN/cXQI/9Im9+9+4aCIQE89 +RZwEfmc7Tnz+ykEptW8buO1JkOcPO7AhDlJw8f71wokE27/XGjUTnDX2b9MJ +VxI0bYza4zbMQUViunu+7SeBJdtAK+A7B9X53v9VG0SCAztoZkEjHGSxZCh8 +7iwJFKozPkwS3BzXrqcTSoJNtbqxfj84qPv52tCsqySY/KfzxHaUg8YFTgpH +3CXBw06x9KWfHHQiXUgfyyDBmiSuMc8xDprXyd3z+yEJbEY2naghmMejP8u7 +iAQ3ggx0z/8i9MQ21zerIYFBU27qx3EOumf6bc/KGxJUMbtbFSY4SLH7fOjT +d4T9+V7LwwTTuZ80qnaQoF9GfHmB4OLEHeP93SSodks2xCY5yIA6IpzUT5w3 +Tvr5eYJNHOXc+EZI8GmmNnyO4PqRstDKMRLEyJm2MKYI/Z3f+fD0FBGv+nGv +AwS3bvrVyJwjgevRv1uSCHbOvjL+3yIJ5ptjXOsJ7tuiKJL+jwReRZ3VswR7 +fajQd+Elg9LvK4EK0xzkPz8V2iBIBqfn3fn+BG8J9BH/LkwGt+C/XPEE84/2 +POaRJMOGR1JqJQR/8rI1JsuRgconTmoj+GFv7SdckQwe461j4wSfdDTwd1Mj +AxPbfINvhoinKX9VCI0MF3ZKr5YjeKMZOSlJiwxta/x3Mgnuf3WbVqpHhsiM +9adxgvP119W0GpEhpunLCUuCQ9gXnCeBDBGxTRYOBJtrzIwJmpFB1vDZggvB +4pm+l6hWZGDtiby8h+Ah6T4JCzsynHsu99OV4OIEuwIfJzLcNTjAcCY4dP1r +k8uuZPj0AdnaEWwbYdiVsZcMQkGJNmYEy68UHKk8QIZ9QjZ0Q4LHghR5Ph8k +wy4H6zF1gl9MJN5ZPEoGuaqgaDGCo/wEGJInyeB9pljoHxH/rq8Xa3WDybCN +MXRimGBl11kXhwtkqOSdrGggeLrVbzwgnAy7jz8fzSG4yupz+I0oMozIK61E +EHyjzl4qP4YM/1UJze8l2A17U9gYT4bSObduPYIpT7eY/pdEhouyvzLXEbzA +KOrmvUeGa+R7Tr3E/TY8UjqmmEnka5fFdA7BiaQ7vPCIDJ1b3gefIFhbOIx5 +lkOG7pxS639EfXFd/1135ykZuETfJFcR3MxzyPVpORkoR7g6LhB8+PfOiKnX +ZJj4pCo1TdTvlqP10hveEfFKZik9Ipj/PyM2rYUMyvP+CrsJzupS7vXtIcOz +7I5fTwh9HLdPDogYIEPdxGC1G8HwVnDNgyEyJHwXu8ZN8OfyOc3+cTKIn49c +MCX0JX6/IdKRRxHMnDS8HxL6HJLAZI/zKwLvcfJPXYKL4zicWEFFUHp6/2At +oWfbSyl9byUUwe5Pun0Hofcob39tY5oiSJ8bbG//j7iP/i/1HlqKEJwfqrqD +YGVnJ/dzeoqg2r7ueA3RT6rM8agyUIQMp61zD4h+s0Dd2E93UgR1Ul2uyTcO +mrsnHbbZVREKyi1LHw5y0OwGFWXDvYqgbC/Xtprg8RnDQ6YHFeEC+bnxS6Lf +DZbvn3M9rwgy39zq+fs5aIB+NNnzkiLMmWSaOH4m9Hj/DMvniiL0Neyru0v0 +00/hMZcCbyrCnoSVj8pEv31rVSYU9VARGMUN9Ru7CP2/rObE5BH+35pRTDuJ +/sd875hQRKyvsQ05SfTzVyJfU9KeK0JIrObHd0S/L+5dp1bapAg511saHT8S +/fawBxr8rQi5U9Nr3jZyUNJnv8H/Fon4mGrOjQ0cdMv2RMSvf4rwY915mdfE +vLmxOerd/Fol2B14uZlDzKNLfznOG+SV4JOPipNHNQddPFKxKKqkBKU/yTWo +ioPODby5J62uBFM3nShylRwUVNv7TUVbCZqkPqS9qyDq5/rqAJaZEvzyNHo5 +W8ZBfssbREyslMCBVFD05CkH+RyTfrrdTgk2zIgPHyHmp6cDc2mnqxKEnBZ9 +2EbMV0eZ3VEHjypBR5rfimcBB7Ee56cnJirBb9/sH/syOKiX9Pj+tlQleDF3 +2e4LMc9DEnPTZu8rwYFfQftc0oj3QFj23Z25SmAwev21TipR/y7pd4QqlKA/ +6rRg8i0O+tiUlvSySgmSRRK3D8QT823rvUT/10pwzf92uNxN4j3FSLn1tlkJ +rp7O4QuL4SCN1bfiIr8qQaRmxGxfBKG3kPhY3e9KoOqJc/WFE/FMxt0YGlWC +PFGfry1hhB56Y6JNZpUgMbb8a8p5DiIVX4laWaMMFZIXL2af5KBKtcgrBQLK +ELh5x5jlceL9ce9ypNtGZdi+4Ow3eIyDUqPCLr+QUoZf4LwwcojQx96zoUE0 +ZWhMkG439+Sg0vbgiypahP1kqmKIO5EvyzMX2nWVwTltTCjVlYPidU+d00bK +8OB2V2uuIwcJrj92ZtxeGZbvxg2NbSf6bdiR0/d2KYN8gqVwjCkHWf45HGS9 +RxnCGsllksaEngb9TuYdUIaJqw9lJw05iPe5V4DPaWWwF+B+doPCQQ8Y+46J +nVOGV9W1IiGqRL/P2nu0LlQZfk5/ErBWJOol1s1f8ZoyfDnboZkhxUGL3rv8 ++u8qg23EE6/lNRyU3OvoG5OhDHYFKg3ruIl5aO/gw8pWhp3V2lYLS2wUxLI7 +kFKkDH/biqqCptloStjSc1eNMghFNab197JRl79iy6F6ZRia6Cp162CjqjeL +6OJ7ZfjnTnMqamajuJDHCjmflOHRa45OcxUbaQ6uH1gYVYbyhxcOfcpkI0nW +sI3QpDLMdarV9aWwEVfiy1eKv5WJ98Dju0XxbPTB4mia1T/ifvgyXz0l3vdH +OR/c74mowBXh9akMdzbaJZDTxJFUgcxQx+pzxPcD7h2KvZFTgcACq4OxFmwk +KKUlN6GmAhJHAvat6LBRfmh8H7BUwHDyR/wIPxvd6jlk7WSsAlWUn+zQxSJ0 +TmdrxUEzFfixwfd83mARshqZSY23U4EP07dlfThFaNTWac/QARUw0HF6ZWde +hFpz6e/mD6qAblqr+0NaEXrBs8ZI8JgKCI/cXPHdWISulj2V1gtWAf5kBl37 +UyFSV5DsuRKjAqdWP7Z84VqINgZPWtyNV4GsK553PLYUovnWhufsJBWYuiwf +5idViBoig5O7M1RAfscl97yOAuQ73uNCfaoCZ6JLb3eaFSAb8ycNqFwFWkki +4cnkAqSXed3AsUoFHp44Ufvybz5as4slef6tCjS8it5DL8xH2S/vdTb3q8CX +GLVdRQL5aCjac9dxPlWIab/l2pibh46O0hQ116vCNd9zMUIX8tCf7Qu/fm1U +Ba7JJuiwz0PreOIjDkqrwpRjY+3Yn1ykGVxb4klXhW/2BkoBeC46760qYuug +Cnc/P9f0f/oIieNjH6j3VWHDtjNG9vuzUHrqs9QfD1RhhOEfNUfNQhoLl30f +5RB84l3w0dkHiFUi90+xWBUu7VY0G7r8AO2n2DKkX6vC2vYQGausTMQWL47m +/0n426itr/MlHVlMnLYY1lODA6SSDdT3KUhWSz6Sn6UGESkq22SdU9D48boa +qrEarHo1tbZoMBndmtvIOm6lBhq97YLdf++g/uVcxr+9arBzNmhAVD8JHV/f +JyJ1VQ1eo2Fti84EZGpzyY51Qw3Ya5PHnhxLQBJx6jF7E9TgmkSEEHVtAqoQ +ObUm+54a5Fi+s9mJ4tEaGaEF7WI1WNAw7eJ+HodSNKDfupewyz58vvXtdeR/ ++Lt0wBc1qJ6xOutOuo5QQbRzwrAatAWMPVk8cw0NaXa3dE+owYtZzvO3WlcR +w+B4rQ+vOrQ7P3r8pzoScYVIcl1bqw7/vfj+3ocWidrKX7EKhNQhhfvK6IHk +CHQGCTydkVQHK+v72Pqzl1GtWVZOKF0dPmqIuQ27XUKJUZbDD7TV4VzPCCro +DUN+byfJ9frqQM37/XvOLQwJ2WCpgibqcE2hrYnbNxS5OH2KSdmlDih3ZkxB +6zyiJJ17+3KPOpiraW5YcDqHlrsU+b56qoOEPB4df/EsynQ7Fqp2WB0iz4iO +9nwJRmP7+U+UXFQHLLPlUVBPEBpPM31ZeVkdzjRndTqoBaGJ7lC+d1cJe4De +Gt8zp9C07ULq1wR1ePgj2H1R9ST6YzRaJ5SjDqIVLdsdSgLRfJDqBukCdRCn +PfztSQ5Eixyv3SrF6rC7MM1DJz4ALan1/jKqUAdedi/t6/JRxC36Xvxgizrc +tn3oS1lzGPHa8u872aEOe5794rGXOoRWXzN9fLFHHWS3PbgotPkg4ud6iRKH +1CGAO9D3Y7AvWme0cDXjhzrIrHU9eifbBwkE6bbnj6uDexPfneBubyQ0VuBX +O68O65MD+wTtD6CNaqPFzcvqMGQ0N37p9n60yUt1uZtbA1aquhQSB7yQaFfa +zcn1GiAa/48ue3kfkqqLfSFH1gAeo8GKfHEPJP3vHa+GqgZkh9762DHthmS3 +8NvqUDVgdveBRdeuPUieHfrNUlcDaoe3rsS/2o1IPyvou7ZoQNBwhlz7KxdE +Vl04vQ9pQFfawf9i6p2R8t3A9WcsNODjwCvH2CknpNpZsCvcRgOevEwoOCTs +hNSER9NvOGiAz/Vmle9bHBElykv3obsGhIQ/J//K2Ik0Tzp4tAZqgKuf/syh +CFukXRSb8zlIA+bUQo4K6tmgzaPvpkfOasDy3o7hrmlrpOdpeuVfhAa0/dw6 +dyHWEumnhn5cd10DBH4mzj86aoEMPlXIiMdpQOKNqqZEF3NkZK3LphEiocg5 +TJyyMkOsK4GL+veJ/d7wpdY4bEN4TYHp1iwN0GOKdMV4myIwUO3eXUjYp3lX +DmeZIDNlCe4rNRrQl+RQcloIoR9e23OM6jUg4M2k7+lXGIrOOG0z+U4DNvvy +zymeZaE2+a6U3R0a4BdYWf1FcgsKcuc3FurRANtU3QbKggGSvmvwX02/Bnjz +fKHHDekjT6nkzbQRDZAe2hSs36uLeFwau7+MEf5DpMPrhnVQduLCxdtTRL64 +vqnwLG5GYyKu71cWNeD9UjHPNlwbBQvJeH8UpICZUXbhDlcGkt1hJRApTAFh +kWje+Xkaqrp+lrNFggKe6bztetlUtGZt3/IDEgVWuTphrhQNlLt9fZaLCgXq +1t7rY3GpI+tIlqUghQL0Z5XdRYOqKJ7nXmLQZgoIyR1P93+njHRNmlhUAwqQ +TvY4t7Yooa7Q5cEBFgWqPNlkrq+KSGHFnWlhRoHJfmsxYRIZ1bBudCxbUoDd +uT+LbkNCPmdfnS22pUDFMce2f+sUUP68fIPMbgqo1xnll8jKIlt926Mt7hTw +mBzs9n4ljaZPXRSN8KLAG+2Y76+PSSHDmQHP8cMU6FxjUybyTxz1aW3kexBA +ga71LpwPvWIoNAAKnE9RIJukXvDptSh68yt9oeoCBUoj4uRTK4XRQdrH+6fC +KfD3Y1isbfMmtP7wKjNKFAV0Dfc/YY1sRDtH9sUn3KSAMrhJ1REX/ls13sA8 +kQIfAhR2Hf6xHt3xrulfSqHAs1UzUlNHBNDAoCLVJ4sCm0kTEZ75/OgS2eGj +dC4FuBUMOdUH+JCqZ/jpDwUUML9nNTlBW4P8P3+rNSgjuF6lcfoHD9ogK3ro +VzkF1pNI/05/5kbFrqYbM6soQB1y2ETtX4XmO7PcBN5SACK099TwcqFU8Q7u +qmYKhPyUihd2WMFxp9W5J9sosLr4tnZk8RIe0er9+3MfBQRcxk8pFy3g6psS +U+O/UiDxqd30Yct5/L3tG+Pt3ymQtvckvfXPHC7cpHqDPUGBJ5JaW+9HzOIr +E5oP385SoChwvOe19Qw+KmxUMbRAgUc5DaV+KtN4jYvtqCQvFdi+UXvi+Cbx +wrO7V21eSwWubzsz38uP4ylp+yV3CFHhouT86hLLMfzE0GmzMEkq/Dt66479 +1AjuyXfJPVWOCmougr9MDv6HW1OiT5YqUsHmJ3/40J9h3GBH4vUPalTQv/0t +ajl1CFcOSM/8QaPC7sz56AOO3/CNCXnPebSpoMrmbVtRGMSXSkta5PSpcMo0 +uahy+Qve/rdhxd6YCqJ8bONrnZ/xKvk2MX8zKujFLZz2mu3F840/0yKtqBCv +efqJEqMHv3Pgv63pdlRYlyoczwzvwiOuTLm+cKKCVHelwPLUJ/x43t/Adlcq +JNftC5II7sA9mlZfHd9LhY1LVxPkJNpxPRHpMsVDVAgScUutjf+IK+opN7OO +UeGxH0dp8UgLLrSbMbzrJBUSbjT/jH3ajC+eNVgKCCbOO0HhgSfv8e9pJiLX +LxD7f37my9fyFm+ttqY8DKdCALXmMq9AI/5qaJdxZRSRr8XRv8e86vEkyuFj +M/FEfq/rfJrYW4df3nEqUvAOFSq05tR/cdfiAQEX76ndo0I+XW6/ekU17pZw +tcQ4kwp/ORW9lteqcPOnCe/2PKLCx/MT1opdr3Cd7nuDp/KpMHd/iHarqgIn +LT1aiOVQIZHnRvLjdy/weeMKtbpyKuywtTl11LgMHzrwBu+vooLjFv48/ZxS +vOVKi9P8ayqcdtxa169Rglfk9fgLv6OC95MjhWV1xXhu01A4rYUKQrdU7Jmn +OXji5HiKWQcV2re6bnmL2PglkQWOZw8VlFzM88y2FOKuuwW/3BqiQrbWoWcN +5Dzc7JzEn8IfVNin+y6y2SIH175PFmocp0LsqnbnZzezcfkaqsq3GSp8Gtp8 +IPhPFr5uWJe1PE+F90RZKwc/wOf4wEFihQqWDY0mP0Uz8UGK5SEtHhpYRYwc +lW5Mx8sDPO54C9Ig66N7bufIXTwnwa/oojANtiuOW9h9TMFvPT3+JlmCBlTh ++val/jt4aPe5z09kaWA3ETjgvSEJ91+KnG0i0+CIQle6kedt3EXhpsCIKg1O +Z9vdc/iQgJuapCpy02gwK95/PNs1HpeNKrLT06PByE+RUN7zsXheYUHtwhYa +8L3KWQ7dEYMbdDzWe4loENDHG7d763X8zd/c3FBTGtQprlajul3FHRVzZE0t +aBA1hd6W3b6CD5pnx/LZ0EC1rClk6FcEHnAsi/vdThqkP67VKvO6jEdXpI/Y +u9Eg/OSyEldqGC79LW2P2D4aFNN2xYvvCcVz1t5r7vKmwWDLGyOS1wVcTzPV ++O4hGhjFuJMW9c7hdbuSS/Yeo4GBurvPWu0QfOf5JDWlkzQwrz4yWm93Bv/y +4HbK9zM02D9nCF1xQfjfyZuhRy7RYK7xVYeu/wk8SiJuRvMKDeTulz24wHMc +F8dv+Mxep8Hfu0ep60sC8KwD0d1lcTRYGPaJcZo/imtfv2Z99jZxH/wuZREl +/ngVJ6oST6GBRt4568LkQ7hNV6Q2930aJE1jumse+uGHVMIlr+bQIGfqQyWv +sjc+bxV23bqABu2VzIHf8fvxyOMXVzYU02CoKl8oW94LF00+H9j2lDjPAUkl +qdeeeGbl2aHEchrYuDLVf/DvxTW/Bzu7VtGg5vz4i8VSN/zV+jNv5V7TYIfV +5VW0G654z+6T7KxmGiSbOeUJl+zC/UKPK/m10eDDi5lclyVHfC47IJHaRQPf +sFhq9wEH/HLT0bUTfTSonM88b/3THhee9T9X/JUGoadO3Y2PscPTpQ9PnPpO +g7fbNmH7EmxwhvFBL8OfNOjv3Zxw18gat7zhbV41S4PEtiLLWCFzvKtkf3n4 +Ag0it7drSG02w3169zG2r9BgKgKlorOm+Owqz4x1PHSwyMx2Pjpkgl9S9xBt +5qPD22P+KsjfGN9o63bl5no6iOYM1wVtBDztlOui4yY6YIWucrxpGP68ZteX +Xmk6RD1SmVlRNcTNfjg63FegQ2n4C/Y8VR9v3+DwxkuZDkHXwm6VO+viXnr2 +hqoadHh54MyE76PN+KSbbf4POh1sHBLyd0pq4xfCdygUaNPBp3flyaocTXx9 +nlV8gD4dTJuXxexzGLj6n+1n/gAdEsN7mIvTGvhTObOfL7bRwWDJUKH0sxpu +amrqccGSDtXTEcKi0yp46yGTj8a2dNjDqY6doCnjnjfBdLUjHfatuYb2XFfE +x8vwsgYXOvRpvqjOWEfGz/WzKNHudHg8z7oVZqeA36EabhTxpYPHz2vQekga +d7Jqint1mA4zf4foa60lceHD+zYdCqDDKvn60nxncbz52u+bYqfo4C6cbnz5 +mih+Pe+qcHUwHa5/2taX8FUYN38rl+B/gQ7jzLEhCddNOO8oR0QynA7nEUOa ++9sG/IJGj+ixaDqk7F0zcfC/dbiRxdHb0jfpoLs9uyq6hB+f9+MWf3ObDlLB +fj+uFK7BS6ISEwNT6PDmwv6XXz/y4oE5FAm5+3So1QsK2C/DgzMaXiU1PKAD +Pc1zi2jUKnz0v52SJ3Po8Cyn66OOGBd+QO2s1DsOHeQORefcE/yLkbdvSAl6 +SgfaMkq82jSP9fs8kFYsp0OTT6y1YcUclhKpn9pUSYcqBXX3xY5ZzDn7nUxw +HR2G5n359kvMYKJv9t5VbiTqwfJDi/X5KaxleEa2pYkOs8fYoR94JzFLFVl5 +tU46xFg/qdbpG8X4trHTWnvpsDBd7WCSOILVHTBVuPCFDsOkoAf+od+xsMtd +9zWG6dDjjv5rTRzC8Cx/UscPOtFvRWmDHYPY31qujNBxOgSD5CHbLV+xZ99u +kWkzdJi/arlJ+dIApqX0UjF8iQ7LU+40M6cebNzE/gFjFQOGPQ5tXbWpC8vz +GlbqWc2Abuc79fHLHZjvpeCsiHUM2Hhz77M/4u2YcqagitYGBux/U4Bf3N2K +fa3OeNgnwoAQHSvLuuoWLO2rrmqUJANe8V92tE1uxvasepu9WY4Bh/pKGbfH +32GSZA+1ATIDmrZW24lcaMQ6YPrRNVUGKC0N2E2a1GPxnpHqelQGtExaxZUZ +vMZsQqVzvzIZYPp7cZv9nlpMIL1QI0aHAYnH7VT+ZldjDZUmeQaGDBDZw7pt +LFmFXR74RBnCGFCxmtwz7fwSM/536HGsCQN6vmq7nnz1AluR/0c12s6A2rKz +DhyPZ1g5npD/3YoBOfzKxnWbn2JnPNTo8XaEv/B2D6ZhCaZzobwAc2JAXZu4 +dfuhYmzqni3jx24G/Llu7DxWx8YKX34rvOXBgPgdZ99wRxVihz6fZsJ+BiCx +2mfNjY8xtWUB9k9fBnTwzHr5W+RiQ7Lpmkn+DCjua4qJWvUIy2DpcEwCGeCi +/aXE5FcW5uHWoDV+igH5d2zTlPgfYNLn3IqTQ4j7+ZlXLGqTgXWmTmpvu8iA +j0LjAuyg+9it8stPJsMZEGDqw8+dfBez65XUuRvFgD4ddLB3KRkT/Jtfsj2G +AReEBDaG3U3C3kob687cZMDKYbApPX4ba5EvUuVNYkB/I+mW0M4E7JOinKTY +XQY4HJF85+dzE+tTvb5WNYMBkqwad3+nWOwrZWFRL5sBzo8G7Wp1orHvDN+x +7Y8Z8FRBPf2K11VsTLvjswubAZ3vL7VqdUZi03pbPxwsJfINLhET1y9j81s4 +VSEvGDD953pTfMglbAVXKL5eSdTP2e1i4fdCMd6tMQ/u1jEgO6oyz2PgPLZu ++99bBY0MYIhwS/J0h2AbrA5GvmpmwF6vstxshTOYqG3n6Q9tDBi1/Shc//gU +Ju2w7eCXLgYIrhfISg46gZGcn7hOfWaATIOlymJwIKa6h2zN/Y0BeoOJF556 +HsNoe2MxkREGJJ1dmxWg4Y9p719mKP8i/GWyGZu2HcQMfA+TdKcZoLb1yYjP +Yx8MO9y9yewPA8xI2hUCTgcwk2PbeZyXGMDa5n/c3sgLMz9ROuu7ign6GZZG +mi6emM1ppe9n1jDhRD2ec8TaHXM8e7PzqgATVIL57ObBFXO9+K8hZSMTbq5I +xypHOGOe4UdePBZjQr7LFq3fG50wnyu9jyukmXDSLH6r3ued2OHrFveaFJhA +rx8qPPjNDguILbvRr8wEnXXnrA4b2WBBCSqhExpMiNO1Pp0raIWdS0oI5GIy +YbWy4ZKQjjl2KXXV/k06xPo1np1C2duwqPvHHBUNmVBtEGQ/t2crduPB522b +ccK+/UJOp40xduuRlb7pVibMjfFE/ZrEseTHz9WdzJkQsXkh4li2EZZWpCbt +s4MJItFqR+VLDLCsJ7cFTu9kwirF243/bdTD8sp4lq84MyHHW7rhQclmjF0e +OH7HjQmpzen/lpO0sKeVAwO5+5iwcMm4p8qPiVXU7vj4wocJP7eIrarmo2E1 +9eU17w4zgTuslMeNWwOrf6dR0hfAhESjo6Z8tqrY+w9JD3+dYsKygz1Je1gJ +a21bnbQSwoQ2+7w22ksy1tV5ImpDKBO6pN0KldIVsP7er8GkCCaEBwxNeTFl +saEB28Na15jQmvxjZkVWChv99tLNJJYJXse8lnj3imOT/1FtHG4xQUh1fuu1 +MRHs989kdCCZCUecHSRuvtyELU7waZ1KY8K9m1n2X29vwLhmTylGPmCCeJNs +6gXZ9dia+W8iSTlMoIauaj3PsxZbv2S/OqeACTzq79MTYQ0mzFU196yYCbpL +cSO33vJgkryMkcYyJlzKLTNjJa/C5PnvdvdUMOHTwNN5N8t/LKX16979rGaC +g69zX86Hvyz1jWcqlt4Q/r5c+B3/dJ7FEP1eIPieCbI1pzpvzv5m6Ug63pf/ +yAQpjYmkLaEzrC2yNXHMT0wYz9o6pGg/xRpUUu7/0cMEjaSE1iMr46yr1Ehq +1gATMnZm2CuW/2Rpbh454zHEhOBdNTFRzSOsri2WbyR/MCFyURrVMr+zQk3y +Rdp+MYHTYnW5+9M3lrql0L6YaSZE5X01S6/4ymqxDyjc/ocJAfuUHlqVDrBO +7279u2qJCQ8kZNvwXX2sWM0UZQ8uTZgKuWrJse9m7dexsirn1oSC+vZx87RP +LH2DpUDJ1ZogdbXQ7P7mdpYAq+DOKT5N4LrAJaGxrpVVvHXDd+Z6Tbh97Td8 +rXrPcrUK3Dy6URPMELO0cPgNi9uhLTRLTBMupeme1zaoYeW66jZ7SGuC6kLH +kbH5CtY5j++z5bKasKpaWD6x7TnLzitJRkpBE5IYrjHRvGWs+YMLfm1KmpCS +JTX1aVsx6/2RvFhNVU2YWS2WW2DGZqUH7nkao64Jf9kfomyW81nbg1/ymNM1 +oU2Hr85+MZuVGBWWVqGnCQ999crXNt9lHYrWfi1lSKw/8oQklpbMwuO+/Qwy +0oRvgessLOoTWcNJ2wy1gDjP3kOd5f9usnQerW1/aKEJ2kr39iX6R7JaX99c +G+umCbEb2ZpSeCBLiCfz5L5LmnAlsUHHO3sra81CpcPUZU3Qu52x9qKmMWtl +/LN22BXi/K6zwXqbcNZEj9RUerQm7M2e2n/vrx6rpfjmkS+JmhA2OurV00Bh +xXuF+ex9rAlvBMbN76xsYonXeLq4t2vCcTtqP0NhwEg+TIG1W1ULmvF9MzL3 +TxitVXF7urNeCxIMNLgqtRO2MDCpotPu2nBQJq1foZJteLxfuNaSazMccqj+ +OOCQbTAxE+1kcWczCMrWHNgwcE9/O/NNigVdB/hL7v2Mao3SezVj9PdPsw44 +RifTxY5Z6R6lafd89NaFSo060ye3hHWw8QPtu9fqQTVf1NuIZwXa25Qldwhm +6kHd/nOrb6jaaamHXjtTo68PdT8kLF+YjzAp3oaVKj36QPvKfGFdsZPh/crv +ckmgAQy5tLDjIupplentB6bEDCG2aPTe1Ng66mzOvz/MMkNIX3pW97nVVGO/ +yuO1KTu2gJ2t5MB7w1i1KUqCXvHkFli40ut95WKmyrOsv19/RxmBRanSsTi9 +eiVXUyUwkmdBDUO9RPDif2SZI1eeM6pYcM7u+p9p5xYFsXX+nB3OGIR/TVLd +u/W9XNbW8yGTuzFo980817iuVk77/I2tCW4YrGgG2Zx99FzOZpLd0bUPg56Y +o/Z1po/kIj/9Xtjvj8FFJ9paH6lwufnMiyYhYRgs/16ZMwozlOsxSmjLfozB +7IAeXjnxUNbvVNZdi0IMoivtVvr23ZOdKyz1HmNjcOfNe9er+Qmywopdf7Se +YnDoJm2iMCNM1opfTvZlFQYW38VExEzcZCvasw+0dWDgho2O/fd3k6yl0DN6 +UBcGjK0p0Uq8/LJd2xvnJHsxeNVV4e7DzyU7++JnlMcXDKz9dOklcWMy9AzN +gh+jGLS95iuzSHsjU9FjHBT9CwPSGaWwYfVXMpaiDog5iYHOy4zPWdIlMj5X +Tn08+RuDf6P4V1JvhsxsVWSKxDwGNoP1G9hvk2QuLSbtf7GIwQ7f6ZUnMV4y +G3Vyae7LGHzhlXh04vAembQjL37/+4fBxMFguX16O2X+B4gsXNU= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.07011959062070344}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8181,6 +9659,7 @@ U0FU/w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8208,7 +9687,8 @@ U0FU/w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.06741909458355917}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07011959062070344}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8216,8 +9696,9 @@ U0FU/w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913236646248627`*^9}, - CellLabel->"Out[89]=",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] + CellChangeTimes->{3.9913236646248627`*^9, 3.993830644296*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"7e1a7416-99e2-4ea1-8c47-2f19461986b7"] }, Open ]], Cell[CellGroupData[{ @@ -8269,65 +9750,83 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel->"In[90]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], + CellLabel-> + "In[109]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 90, - 21, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323664732767*^9}, + "\"\\!\\(\\*FractionBox[\\\"0.002463877444811381`\\\", \ +RowBox[{\\\"\ +888662635352462001777021748999539421035580108554314879524123307442442607524393\ +76858259025572214620147379761052\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"87\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"70390199279138233819815850582880169536467468825362200972812573736960000000\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 109, 17, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.993830644396496*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], +In[109]:=",ExpressionUUID->"567fe6e4-3f49-4ad8-a26b-5cc41b6c9453"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 22, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132366476486*^9}, + "\"\\!\\(\\*FractionBox[\\\"0.0023174104993755316`\\\", \ +RowBox[{\\\"\ +870978248908948007941659016194448586556972064394084013421593253624337999634658\ +33258779670963327549206446903807\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"91\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"94343134833829668015151562808541626917661957374931734536035195944960000000\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 109, 18, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.993830644403037*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], +In[109]:=",ExpressionUUID->"ee06f90f-7cf5-4575-80fb-b928efdfb47d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 23, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236647877655`*^9}, + "\"\\!\\(\\*FractionBox[\\\"0.0021796503855844476`\\\", \ +RowBox[{\\\"\ +870978248908948007941659016194448586556972064394084013421593253624337999634658\ +33258779670963327549206446903807\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"31348338296680151515628085416269176619573749317345360351959449600000000000\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 109, 19, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.993830644409034*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], +In[109]:=",ExpressionUUID->"0ae7eb7e-66b9-45fc-a5ed-4694b01dcc29"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 90, 24, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236648078594`*^9}, +during this calculation.\"", 2, 109, 20, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.993830644414624*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], +In[109]:=",ExpressionUUID->"d1f8680a-b003-480e-aa60-5144683ff8be"], -Cell[BoxData["11.275343508420768`"], "Output", - CellChangeTimes->{3.9913236764669056`*^9}, - CellLabel->"Out[90]=",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[BoxData["4.092051989921792`"], "Output", + CellChangeTimes->{3.9913236764669056`*^9, 3.9938307242433367`*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"cf633a8a-6a2f-4b5c-bbfc-13be4a598ced"] }, Open ]], Cell[CellGroupData[{ @@ -8394,67 +9893,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917996753598194`*^9, - 3.991799698091812*^9}},ExpressionUUID->"18d0289f-01fd-a740-8fac-\ -540622282b2c"], + CellChangeTimes->{{3.9917996753598194`*^9, 3.991799698091812*^9}}, + CellLabel-> + "In[110]:=",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 25, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765399036`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.018103630304092`*^-101\\\", \ +\\\"37496588927105946554558174777845580396309326390375908868538148671107091013\ +690365280604896232691808364009196154499710300200910395615617353791726122780618\ +59168189007240401361305600000000000000000000000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 110, 21, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.993830724285838*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], +In[110]:=",ExpressionUUID->"72c20fe6-4d05-4006-9c48-10221f047dc3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 26, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765679016`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.061224418338146`*^-103\\\", \ +\\\"19981932239254758918924051339113909793193240033431321836043979426832968801\ +195595658034349202401464677180500630732895618977065149823562487835610850829791\ +647507279219584098854397542400000000000000000000000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 110, 22, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.993830724290848*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], +In[110]:=",ExpressionUUID->"264737d8-10dd-46ae-9706-138ef4bda975"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 27, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323676587904*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.2200199309397873`*^-104\\\", \ +\\\"10942106094215905984002810513298777002752618242306991837417683134133733715\ +534708182339609623235042057224042145389333640951840876043382818338780501914393\ +9061749861006442525326680942182400000000000000000000000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 110, 23, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.99383072429506*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], +In[110]:=",ExpressionUUID->"3471a687-a280-4a90-8ccb-715c8805bd5a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 91, 28, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236766039066`*^9}, +during this calculation.\"", 2, 110, 24, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.993830724298897*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], +In[110]:=",ExpressionUUID->"ecd9db9c-b18c-4b09-abe9-4871d8912664"], -Cell[BoxData["0.5376063675902706`"], "Output", - CellChangeTimes->{3.9913236883162384`*^9}, - CellLabel->"Out[91]=",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[BoxData["4.6381067897710535`"], "Output", + CellChangeTimes->{3.9913236883162384`*^9, 3.993830733234153*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"5bfceb02-c0a0-4537-8fcc-6a4bb569a44c"] }, Open ]], Cell[CellGroupData[{ @@ -8475,8 +9982,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8521,67 +10027,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997261183853`*^9, - 3.991799730012718*^9}},ExpressionUUID->"33f25e29-8e2f-5249-9603-\ -4bb381db84df"], + CellChangeTimes->{{3.9917997261183853`*^9, 3.991799730012718*^9}}, + CellLabel-> + "In[111]:=",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 29, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132368839011*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.018103630304092`*^-101\\\", \ +\\\"37496588927105946554558174777845580396309326390375908868538148671107091013\ +690365280604896232691808364009196154499710300200910395615617353791726122780618\ +59168189007240401361305600000000000000000000000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 111, 25, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.99383073326746*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], +In[111]:=",ExpressionUUID->"0c0972ca-e1ff-4cf3-85ac-39f52c113822"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 30, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884141064`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.061224418338146`*^-103\\\", \ +\\\"19981932239254758918924051339113909793193240033431321836043979426832968801\ +195595658034349202401464677180500630732895618977065149823562487835610850829791\ +647507279219584098854397542400000000000000000000000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 111, 26, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.99383073327262*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], +In[111]:=",ExpressionUUID->"a9e7ce67-9d7c-4986-8049-6f1e1b96fde4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 31, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323688443001*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.2200199309397873`*^-104\\\", \ +\\\"10942106094215905984002810513298777002752618242306991837417683134133733715\ +534708182339609623235042057224042145389333640951840876043382818338780501914393\ +9061749861006442525326680942182400000000000000000000000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 111, 27, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.993830733277687*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], +In[111]:=",ExpressionUUID->"19cc9b0f-0152-4cc8-9f0c-cf42b30738e8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 92, 32, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884570007`*^9}, +during this calculation.\"", 2, 111, 28, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.9938307332819347`*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], +In[111]:=",ExpressionUUID->"0dacad05-354a-437c-91d5-f292e77888e4"], -Cell[BoxData["10.498798062085507`"], "Output", - CellChangeTimes->{3.9913236988049507`*^9}, - CellLabel->"Out[92]=",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[BoxData["20.065245641348625`"], "Output", + CellChangeTimes->{3.9913236988049507`*^9, 3.993830742046678*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"e9e0ed6f-4f52-4961-8186-a6d5ab61faf7"] }, Open ]], Cell[CellGroupData[{ @@ -8602,8 +10116,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8648,67 +10161,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997336698074`*^9, - 3.9917997367747993`*^9}},ExpressionUUID->"88e14da9-8532-e842-b722-\ -1b0781de8eeb"], + CellChangeTimes->{{3.9917997336698074`*^9, 3.9917997367747993`*^9}}, + CellLabel-> + "In[112]:=",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 33, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698915848*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.018103630304092`*^-101\\\", \ +\\\"37496588927105946554558174777845580396309326390375908868538148671107091013\ +690365280604896232691808364009196154499710300200910395615617353791726122780618\ +59168189007240401361305600000000000000000000000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 112, 29, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.993830742091106*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], +In[112]:=",ExpressionUUID->"28820e48-4ec9-4e6b-99a9-fb1e7a7deb84"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 34, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698943981*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.061224418338146`*^-103\\\", \ +\\\"19981932239254758918924051339113909793193240033431321836043979426832968801\ +195595658034349202401464677180500630732895618977065149823562487835610850829791\ +647507279219584098854397542400000000000000000000000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 112, 30, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.993830742098157*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], +In[112]:=",ExpressionUUID->"16649d84-0425-4f57-885b-71327f147f39"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 35, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698971981*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.2200199309397873`*^-104\\\", \ +\\\"10942106094215905984002810513298777002752618242306991837417683134133733715\ +534708182339609623235042057224042145389333640951840876043382818338780501914393\ +9061749861006442525326680942182400000000000000000000000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 112, 31, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.993830742103406*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], +In[112]:=",ExpressionUUID->"ac6932f8-e391-4ea4-b9f8-cbc180026203"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 93, 36, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698986994*^9}, +during this calculation.\"", 2, 112, 32, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.99383074210754*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], +In[112]:=",ExpressionUUID->"cb41553d-1ce1-46c3-a409-55897f58e3c6"], -Cell[BoxData["18.521732102530788`"], "Output", - CellChangeTimes->{3.991323706795576*^9}, - CellLabel->"Out[93]=",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[BoxData["1.6306740131912807`"], "Output", + CellChangeTimes->{3.991323706795576*^9, 3.9938307478770638`*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"263f0c0d-f8f5-457b-b7dc-b3f86bf4ce35"] }, Open ]], Cell[CellGroupData[{ @@ -8717,21 +10238,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991799742384985*^9, - 3.9917997459840527`*^9}},ExpressionUUID->"fcd1131c-ba92-0b46-817b-\ -e5f89f4ec38f"], + CellChangeTimes->{{3.991799742384985*^9, 3.9917997459840527`*^9}}, + CellLabel-> + "In[113]:=",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[BoxData["0.038552612544494616`"], "Output", - CellChangeTimes->{3.991323706858589*^9}, - CellLabel->"Out[94]=",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[BoxData["0.8108395581008997`"], "Output", + CellChangeTimes->{3.991323706858589*^9, 3.99383074791181*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"bc32da9c-32c5-4114-838b-43a4617c357b"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9917997487290344`*^9, 3.991799750684988*^9}, - 3.9919243164025135`*^9},ExpressionUUID->"c771f2bd-f081-e54a-b4e5-\ -bf0dbc996ac3"], + 3.9919243164025135`*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ @@ -8753,11 +10276,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel->"In[96]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], + CellLabel-> + "In[115]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.991323706886154*^9}, - CellLabel->"Out[96]=",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[BoxData["18.528762193323544`"], "Output", + CellChangeTimes->{3.991323706886154*^9, 3.993830747926505*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"95ef3ca5-07ee-4895-aa5b-47e5f031ac47"] }, Open ]], Cell[CellGroupData[{ @@ -8766,11 +10291,13 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel->"In[98]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], + CellLabel-> + "In[116]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.9913237069236546`*^9}, - CellLabel->"Out[98]=",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[BoxData["0.027882910463690284`"], "Output", + CellChangeTimes->{3.9913237069236546`*^9, 3.9938307479350348`*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"257166d0-45b9-4683-ab4a-913cc1afe82b"] }, Open ]], Cell[CellGroupData[{ @@ -8780,12 +10307,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[101]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], + "In[117]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913237069753113`*^9}, +Cell[BoxData["0.51663581723945`"], "Output", + CellChangeTimes->{3.9913237069753113`*^9, 3.9938307479440517`*^9}, CellLabel-> - "Out[101]=",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] + "Out[117]=",ExpressionUUID->"0ad12dfa-ff2a-441a-bcf8-a564e2e601aa"] }, Open ]], Cell[CellGroupData[{ @@ -8975,12 +10502,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[102]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], + "In[118]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[BoxData["0.02467166981689615`"], "Output", - CellChangeTimes->{3.991323707000412*^9}, +Cell[BoxData["0.010728722622290637`"], "Output", + CellChangeTimes->{3.991323707000412*^9, 3.993830747955484*^9}, CellLabel-> - "Out[102]=",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] + "Out[118]=",ExpressionUUID->"4ceb6c65-94eb-4bfb-b148-609b4ff4b12e"] }, Open ]], Cell[CellGroupData[{ @@ -8994,12 +10521,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[103]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], + "In[119]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[BoxData["5.642163519289108`"], "Output", - CellChangeTimes->{3.991323707203314*^9}, +Cell[BoxData["8.556003076020414`"], "Output", + CellChangeTimes->{3.991323707203314*^9, 3.993830748044385*^9}, CellLabel-> - "Out[103]=",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] + "Out[119]=",ExpressionUUID->"efdc2216-b7da-40a5-8770-5209bdf5583c"] }, Open ]], Cell[CellGroupData[{ @@ -9191,12 +10718,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[104]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], + "In[120]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[BoxData["0.012834083028601704`"], "Output", - CellChangeTimes->{3.9913237072224197`*^9}, +Cell[BoxData["0.1369123672208566`"], "Output", + CellChangeTimes->{3.9913237072224197`*^9, 3.993830748056651*^9}, CellLabel-> - "Out[104]=",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] + "Out[120]=",ExpressionUUID->"75c255e7-465c-4bb5-9618-2f477c8c9c14"] }, Open ]], Cell[CellGroupData[{ @@ -9210,12 +10737,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[105]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], + "In[121]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[BoxData["7.82280524717004`"], "Output", - CellChangeTimes->{3.991323707432623*^9}, +Cell[BoxData["2.3950997252618755`"], "Output", + CellChangeTimes->{3.991323707432623*^9, 3.99383074815624*^9}, CellLabel-> - "Out[105]=",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] + "Out[121]=",ExpressionUUID->"27f67f0a-f914-4beb-aaca-321bde168e2f"] }, Open ]], Cell[CellGroupData[{ @@ -9308,12 +10835,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[106]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], + "In[122]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913237074497375`*^9}, +Cell[BoxData["0.2129709837599123`"], "Output", + CellChangeTimes->{3.9913237074497375`*^9, 3.993830748165152*^9}, CellLabel-> - "Out[106]=",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] + "Out[122]=",ExpressionUUID->"02367722-021c-4359-aad6-1a0885dfcfc9"] }, Open ]], Cell[CellGroupData[{ @@ -9403,12 +10930,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[107]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], + "In[123]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991323707467621*^9}, +Cell[BoxData["0.7870290162400877`"], "Output", + CellChangeTimes->{3.991323707467621*^9, 3.9938307481729507`*^9}, CellLabel-> - "Out[107]=",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] + "Out[123]=",ExpressionUUID->"63f3adc4-e1a1-4bd1-a114-44c2b7fa228e"] }, Open ]], Cell[CellGroupData[{ @@ -9531,12 +11058,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[108]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], + "In[124]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991323707488617*^9}, +Cell[BoxData["0.16761434383624746`"], "Output", + CellChangeTimes->{3.991323707488617*^9, 3.9938307481814833`*^9}, CellLabel-> - "Out[108]=",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] + "Out[124]=",ExpressionUUID->"e87a1759-3600-4e60-aea8-29c146b9d9c6"] }, Open ]], Cell[CellGroupData[{ @@ -9598,68 +11125,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799766323864*^9},ExpressionUUID->"ee2d2671-1677-5943-bf7a-\ -6ffa36275fe8"], + CellChangeTimes->{3.991799766323864*^9}, + CellLabel-> + "In[125]:=",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 109, 37, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075117207`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.116906062699916`*^-78\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 125, 33, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.993830748196116*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], +In[125]:=",ExpressionUUID->"aec4ef3b-12ce-480c-83f7-224ef5e5b665"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 38, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323707545618*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.137357886881144`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 125, 34, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.99383074820089*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], +In[125]:=",ExpressionUUID->"992013da-d820-4cd8-bcc0-00942f56d756"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 39, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075757256`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1580072999491504`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 125, 35, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.993830748205203*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], +In[125]:=",ExpressionUUID->"622c27e8-4ba4-4eb2-adef-105cff9bd573"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 109, 40, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075926247`*^9}, +during this calculation.\"", 2, 125, 36, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9938307482092943`*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], +In[125]:=",ExpressionUUID->"9d418663-b9c4-4c45-8ac9-9f0d1de88160"], -Cell[BoxData["5.642163519289105`"], "Output", - CellChangeTimes->{3.9913237161181736`*^9}, +Cell[BoxData["8.554425275699524`"], "Output", + CellChangeTimes->{3.9913237161181736`*^9, 3.9938307533097897`*^9}, CellLabel-> - "Out[109]=",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] + "Out[125]=",ExpressionUUID->"daec6255-b3cb-4b17-aabd-66030484d8c3"] }, Open ]], Cell[CellGroupData[{ @@ -9721,68 +11264,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917997699328365`*^9},ExpressionUUID->"b0b1035a-0fdf-b146-a71f-\ -1ab9142a9a90"], + CellChangeTimes->{3.9917997699328365`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 110, 41, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237161871567`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.116906062699916`*^-78\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 126, 37, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.993830753347883*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], +In[126]:=",ExpressionUUID->"fcf0bf66-56d2-4b35-b003-114a6d6d6665"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 42, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162070637`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.137357886881144`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 126, 38, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.993830753355459*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], +In[126]:=",ExpressionUUID->"7b5c6e39-7d38-4225-a287-bbd1e45e0942"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 43, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323716227171*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1580072999491504`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 126, 39, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.993830753362053*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], +In[126]:=",ExpressionUUID->"aaddf203-2d23-46b3-8067-e1fe7120b9b9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 110, 44, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162481613`*^9}, +during this calculation.\"", 2, 126, 40, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.99383075336767*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], +In[126]:=",ExpressionUUID->"caad4606-5636-4244-abc5-4693520d5588"], -Cell[BoxData["7.822805247170038`"], "Output", - CellChangeTimes->{3.991323724852854*^9}, +Cell[BoxData["2.394658048338492`"], "Output", + CellChangeTimes->{3.991323724852854*^9, 3.993830758446788*^9}, CellLabel-> - "Out[110]=",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] + "Out[126]=",ExpressionUUID->"1d0b89ba-498b-4bc2-8ab7-a05d036758c8"] }, Open ]], Cell[CellGroupData[{ @@ -9840,95 +11399,114 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917997843341885`*^9},ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-\ -ff25938e6592"], + CellChangeTimes->{3.9917997843341885`*^9}, + CellLabel-> + "In[127]:=",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xc41e8bwPFT2as0aSqjryiySe7b3utUMiI7ISTpmNFAhURGpVJ9jigj +WifJTxqEZJaKsmVT9sjv6S/X63rfz/18Puec67LV2ZfutpRGo21dQqP9+1tr +HPU075sceka8i02M5MULaY43JUXlUT2gnn16mAd7LpnssuZQwLLkWoElqty4 +0dhu3aXVCnhV04wrcTM30nk8aSXbFHDWvHJIg40bS2Ki60VBAS2CKbXBT1yY +fL4scOSUAgrIKSxN8uBCndMq/4vqU0BFfcuOJbc58Y6/mMXTakVMqEpltG/h +wMIfpZeEWhRR6Y+g/E8ODiwzsi8PGVBEhkzi8OwQO3ZtS9HQ4lHCzGTOv5eK +2VGigXPnJ30l3NMYGi9ox4458gPcfWVK6P/qO5V4kw1Z4wVvNr5QxpUpY2EP +lJfhB0ezxdMVyphts1Zaftsy/Fbdr9b5RRknxy+5fOZbhnOUaGH2pDLSXm1d +8OpYihoHkjOUFFTwiaJgWW38Unz7lBFmka+CbI+1Go4MLsHaQFA+x1RFnS4X +5Cyi4bGamzduP1FF7yOveGhZNOSRmF8seqOK116+416eQkPdJlbFWLsqcjFP +a/j607BIXs728GY15F6xUKAoTUNqVCxMLVUN4zrPfY/RXwSGJ8+b0Zg9uINW +yx2gswBryjy286XtwbZdBtMJ4gtQKFx+afv9PdjZlizUyLEAQxVn9zu824PS +kaG7qz/Mg/P2he6qJer4NHQ6I9xyHky6RrjuB6tjvq5P55sjc7DVocnM3nsv +hhY3bbmaNwNU6fLygOC9GEJPGe9KngEJUSOIjdmLAnECkvSwGZD+VSLzktqL +KypWSkaazICSf9YK4da9yPIybdw5OA0mUSH1jaYaaLA4+IqSnYbAvK1WJjKA +OjPubNs/TsL0ikM1LnsBpS3m3N8+n4SQEyl6IcaAj04pSQbfnYQIFV7lB0cA +bc94H9jFmIRLZePruDIAuboyBZ+JTYLFQOegExdiTd7EQ8kzE+C2+CxvUxDi +LYEb2S2m47Cac8PV1xGICYMPh0tUx6FM4HSQWwyiUFbi6xfi4yCyWV8nNxWx +/0dA3PTCH2hR//JV/Rni2N2vu1Lz/wA9eIrt0B9Enm7NHPV1f0BjQtnu+jFN +PH5pxy3LqTEYmr+BGic1EUcn2bh7xiCdjSbREaqJR0+dkW5qHIOZVRWjkrGa +qPcoxuxh4Rg8kbOOevFAE5WC3L8b+47BDj9GQXOvJnqp5QbrDY7CugEW5zpn +LWSor73c/GsEVKZ5plSOaqH1PpNEno8jYMtu32Prp4XFqhHSdgUjkL5lybtb +4Voo228ZdzB4BLbtNzwjcUMLb8iH/WTxj8CuV1/nFRu1UEOIeWhBdRj0Ls+O +7dfTxm89c9uu3h8Ej3ST9kBTbXxkavKAfnkQLmTfqk3br42Njm4OUqcGofqN +Vn6LszaGjwZU7dAfBPr0RW/X09qoHjqg7PBrAOydNvSeYGmjdf3xbyEyAxAg +r96SuEMHNcaK00o+9cEhpZGfCbt1kCH9KmesqA90VO92xqvooELdd3O1zD5Y +BVwDF/V0MOoBfwtvWB8UGjXOnHHWQbG3byFXqg9GnbzXnbiugzzOQeoNsb/A +KyGdvo9HF/kqyhuXOvQCPcncylJQF9+3u6xnGfeCWspSW3MhXVRP/jB6WrUX +eNI9nIwldNFzSnBab00vZN1X8NPW0kVt07zljz72QE9JdZx8sC5+5Q99/l2z +B5yH5itW9etihNhmYW7lbnj+fnIie0wXr/wKf3hBvBv4Mka34YwuBng7C21a +TTq9K9SbSw8nCg9uCx3rAj5Wlew7CT20ta92FsrtgqdnrqcFuujhmqrrh59u +7wIuIRWPry16mDOcLtAj2Qn2Y7uTfbv0MMK9Z0vK+k4orJQqYx/Uw/SiLaZW +vJ1wKGzLRrk5PfSIOfiQY6gDCjo4ai8K66P3uzsm4gUdYJvbpKxupY+zdL4d +huodkKt1gvP2J33caB03lGXfDgFb7TQef9ZHp+Ua0Zss20Gdpn2yvFUfL6bG +S9zSaYfqVys7Rwb0Uc7HBt5ItcOgSmEJchkgt/txhxuzbbBDZuxkBxrg9M3u +glPX2yBrg2+XeKEB3u2uFRF49xP8Zq02qL0wwMx2L7X3eT9B5asG3azUAP0V +PeST0n5CRYpAaWCNAa5W1HH38v4JvYJ5N8r7DfDdSkXDlWt+ggTXEP2oqCE2 +3tSTlfD8AdS45+ucq4aoIiJz7+O2VviafW2rTbohVu68NmHC3woChysi2SlD +PFideat9qgWCPohrOTw2RMYuy8tGH1vA7FZb2fJ6Q4wRaZEWCmqBGX2rt/7L +jVAu7vnn2MbvYHZDs1zlohEuzJsHKV3/BtOaQh/fnjbGZSI5d8vsmmF88L6m +abQx/tXRfixn3AwjqcrPmuKN0TGXLlKo1gw9Q1a3e24ao7Pq7qofws3QeC35 +OFexMXZ+3xQz1PwFCsZWrjWZNsbLq8Q5622+gOcd/sMNfiYoqdnN1HP/DK20 +ZWPtTqaYVaFYez2zEUwKInx/eZjiEYPOSaPrjVDk9Hdo2NcUl74I02WPb4SU +spn+uTBTlOrq3J12shEszo12rbluiiGpwzuVdBuhjPNHs2G9KY5fTeMz6mmA +TIEXpQVaZphpToXEyzSAz0bfhEhRczQOeb8vuaUOjO7Jq4hImePrfpuhnLo6 +kNgx/bNEzhx/uAb8+Pi+DlqVI2XmNc0x0cMmQ6qgDkz2JdUEOprjNCWXfCCq +DiQvPufzvmmOilLRc7ZydfB77rTOQ14L3Po/8Q8DCbWQd7SiNPm8BTqqsc4m +VNdAU/4dYbELFhhq3WfEX1wD8xPB/oWxFjhhui4v5WENGJ/ZKfYpyQLZ9AOF +P12sgV/XE6O57lrgh9fOGk2GNbC1+pBZSIkFZiVqv5Su/AhXd419d5yywMnL +iw1FDdUQ/Ed4SuqoJa4PFf/Cy1UFzVSKK8cxS/Qf7ZNRmqkEJatV9W1+lvh6 +JN7Mu78SfrP4cpMZllhR/CV/rroSPMMXnRejLbGn+P07ZmIl2HB319RnWuJJ +WY5zm0QqQWXLo8ygLkssOnN51lz7A0wY6VmVH6ZjzZ/u4NisclA69efjZRc6 +/mJTaotPLwfGvQxd6yN0ZNuepHw9oRxm52YV+nzoOFhZf6OKUQ5/c/JX8YbT +sfhA98E0w3LgWC5cZ5ZOx8tzSZn1g+9hXcOA8edmOtqsZqVeVX0PqnZXNLst +96HPOY2zz/vfQr3wTc+38vvRxtHE0/9tGazPPFuc9d8B7FU+SuOqLgVW2w4T +M34rlJaRDR0/VQKbG0ePBA5ZIZU7E7e36SXIJ1/Judd2EHnVkvS8D7+Am2x/ +diW+scYpXpeURZfn8ExT5tv5Fzb4t1uFxYh+CmnKFwXnH9giT6BBvuvvx/Dp +OzNKPtYO10ossmSzCuGpabqYX8QhnJc184n1KYCxY/toPq72uLn8jG3lsUcw +oSfpMaztgG36GxhVm/Mha+jr9Amlw+TzO10beTIXrO8wXez5HJFrooBJE8qB +x4XGh5dFO2JXyBbv85UPQHVD/cyFGUfy/7C0co6VDaJtR77VHXXCtGKLsHPV +WdDF62We3umEHrm3UsYH7kNtvJmL/gFnrLB/6RWleB+uMm7znqx1RovsaOuy +i5lQXLI442LogvhBTEx4ngm7XyuobDd2QQunX1K7Z5mQ+eZoYL+JC4522Bw3 +mmbClYqG334WLljr3/s4YpwJ7vX3B8IOuiDthYjA/CATBHvMW1PdiLkiqnb+ +IJ0/o7Qq0gUjLj1dH/KaCcsPYbR8kQu2SaQ7PLzEBJHV5Z82Frug4zx/ztAF +JshWmwpxlBCf8zq4O4YJdHW77ObXZP49433xOSZc3RhYFfaBdLcvc51hTFjf ++nB5RbMLijSeDzjhxwQxh3Vph6ZcsFS3U+GqFRNUHYezziu4YmmKYXalBHmf +a6MnzJRcMaPlMytInAmrG35rrFNxRRGGQ6+kGBOGdacas/aQ7u+TEbeVCZQU +bUm1litGMIVDnTcyQWBK0GalJXHWlUzNlUzoilPkvn3MFduM3qg1/qXAsly5 +8YivKzoGKRZlLlBQQlO7LXvcFWkCqZbB8xRcO6GhWBZA+sL+crFZCsxs9J26 +Q8jz+SxWRE1Q8ELM5oXURVfEe01T4YMUxL8MPcrKJD3OjtL4TsExuVRVRha5 +35o1p/KNApPsAm6VB2SeJWar8JUCntSe7Oe5ZF4mTGrXFwrO+1v0P3tCOqfP +hl0NFIRKink9LSM+MsJzuIoCz9Qq78IfxI4tHOeKKTAU6FH3byPn11QP33pJ +wX/nafxyHeS+Tw+ai4oo6PFXzC3oJu+z4WbBBIsCJ7PbQ48GSY9RDDj1lAJr +9hM++bPk/JuqDQ/zKNA/sd4vZ60bYvaB2bo7FJTdjjJKFHLDUkyWmM+gQL36 +txhjvRtG5KmGbSeWFa/6qr3ZDWlTPNmRtygQ/hKi/V2czH+znNS+QcGAWuta +HkViRyMdWjIFl5dmvDqyj3iiO8PqAnl/Gb400wPkvqhnH5kxFJyzY/jLHyT7 +P0mLTEZTwHhisX3RluwXOKN4PYo8v/uSKynOxG9FNo+epUC+0tn13XFyngqq +rA+n4MsVcV7RBNKdK5/6n6QgD/g9fl0hPeng45EAsn9o/G1uErn/POQeI5Yz +fBuukkru21SR7H2CfH80l9+mt8h8sqNy4HEK9HwzvjJyyL53hx+wjlGwaVOM +kkYesXa+iy7xeKVv0rJH5HyJgFCDNwV3JcA0/jE53/ro+JgXBQutraX3iog1 +jveoelLwxGRDVk0Fub+0/92MOwWXZpeyX60kPeHK9hRi56x+J5tqss/uv7Py +xCvYijZ0fSJ+3rn9uBsF3i+tL898Jvf7VIlPu1AguiMlUKyb9D5Wt4ITBbNf +whr6esg+i4kfbY4U1J53k83/RbxGui6OOLxdoV91kFjIMqP/MAXf0hrszf+Q +86z53nwHChI5BXWDl7hjxLdIwaOHKCj+3WoXsMwdaYlyuRuJe1sf+Puwk84p +EV5nR34PT3QynLlJT0r5nwZxjyNjzkiQ9LaJku225PlNdFfqriJOXLms24aC +PcorJWEN8YG5kHvECfw5VvLCxBdmecX+9aKfBRu2Eq/Fe/LWFLgzcyrWiBIv +GsfOHiTzCUE/l4uT+8JeZZcR97iv4meTJH55N9LqX1+l7zEoS+a1gYq1oqDo +76rTPXKkT2rI2BN397UltymQ3mE6vItYrTT4TaMK6WwnuD4foKDLO2/zKyT9 +zfeHcsQC1iGKz7X+fR77P/MRq2obmBTokPmhFIVf+8nvRbgjiGlAeu7B2LvE +LLb8hNtGpNeWn48k7hwJuX/NhPhrZ6ETscr7NU1xFmRenz1LnNi5oGMgmk66 +6F9fbuK49PylZ/aT3nDBa3gfBR3+hrKB1qQf1l54SczvsFbfz5b0x+5JFLGK +Yae95yHiak77eOK4LWGXHByJ2QouuhGzeIzuWjuT8zcfDdP/7ZtY+4LuSvrY +xijNf/vaOz+ZuJPu8Nti97991Y969DyII3eabyN2fh62gJ5kXrkqYvW//XeN +Vu/xJv1eRTfnv/1x66QUfUjfLBo+Tyf7GV2aMn7Exs2Gv4n5XAusJf3JPEeP +QR+xsnm4r2gA6T5GIe3EzmrGUZsCiTuXtX8jjhUXurmO8W9eMLiJ+NmK7seC +waQX+unVEbfPFVTyhpLOu02v5t/+3vB29nDiY2JB1cRK9cbTi6eJQ079rCL+ +PxHsaxM= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -9942,107 +11520,124 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1Xc41e8bwPFT2as0aSqjryiySe7b3utUMiI7ISTpmNFAhURGpVJ9jigj +WifJTxqEZJaKsmVT9sjv6S/X63rfz/18Puec67LV2ZfutpRGo21dQqP9+1tr +HPU075sceka8i02M5MULaY43JUXlUT2gnn16mAd7LpnssuZQwLLkWoElqty4 +0dhu3aXVCnhV04wrcTM30nk8aSXbFHDWvHJIg40bS2Ki60VBAS2CKbXBT1yY +fL4scOSUAgrIKSxN8uBCndMq/4vqU0BFfcuOJbc58Y6/mMXTakVMqEpltG/h +wMIfpZeEWhRR6Y+g/E8ODiwzsi8PGVBEhkzi8OwQO3ZtS9HQ4lHCzGTOv5eK +2VGigXPnJ30l3NMYGi9ox4458gPcfWVK6P/qO5V4kw1Z4wVvNr5QxpUpY2EP +lJfhB0ezxdMVyphts1Zaftsy/Fbdr9b5RRknxy+5fOZbhnOUaGH2pDLSXm1d +8OpYihoHkjOUFFTwiaJgWW38Unz7lBFmka+CbI+1Go4MLsHaQFA+x1RFnS4X +5Cyi4bGamzduP1FF7yOveGhZNOSRmF8seqOK116+416eQkPdJlbFWLsqcjFP +a/j607BIXs728GY15F6xUKAoTUNqVCxMLVUN4zrPfY/RXwSGJ8+b0Zg9uINW +yx2gswBryjy286XtwbZdBtMJ4gtQKFx+afv9PdjZlizUyLEAQxVn9zu824PS +kaG7qz/Mg/P2he6qJer4NHQ6I9xyHky6RrjuB6tjvq5P55sjc7DVocnM3nsv +hhY3bbmaNwNU6fLygOC9GEJPGe9KngEJUSOIjdmLAnECkvSwGZD+VSLzktqL +KypWSkaazICSf9YK4da9yPIybdw5OA0mUSH1jaYaaLA4+IqSnYbAvK1WJjKA +OjPubNs/TsL0ikM1LnsBpS3m3N8+n4SQEyl6IcaAj04pSQbfnYQIFV7lB0cA +bc94H9jFmIRLZePruDIAuboyBZ+JTYLFQOegExdiTd7EQ8kzE+C2+CxvUxDi +LYEb2S2m47Cac8PV1xGICYMPh0tUx6FM4HSQWwyiUFbi6xfi4yCyWV8nNxWx +/0dA3PTCH2hR//JV/Rni2N2vu1Lz/wA9eIrt0B9Enm7NHPV1f0BjQtnu+jFN +PH5pxy3LqTEYmr+BGic1EUcn2bh7xiCdjSbREaqJR0+dkW5qHIOZVRWjkrGa +qPcoxuxh4Rg8kbOOevFAE5WC3L8b+47BDj9GQXOvJnqp5QbrDY7CugEW5zpn +LWSor73c/GsEVKZ5plSOaqH1PpNEno8jYMtu32Prp4XFqhHSdgUjkL5lybtb +4Voo228ZdzB4BLbtNzwjcUMLb8iH/WTxj8CuV1/nFRu1UEOIeWhBdRj0Ls+O +7dfTxm89c9uu3h8Ej3ST9kBTbXxkavKAfnkQLmTfqk3br42Njm4OUqcGofqN +Vn6LszaGjwZU7dAfBPr0RW/X09qoHjqg7PBrAOydNvSeYGmjdf3xbyEyAxAg +r96SuEMHNcaK00o+9cEhpZGfCbt1kCH9KmesqA90VO92xqvooELdd3O1zD5Y +BVwDF/V0MOoBfwtvWB8UGjXOnHHWQbG3byFXqg9GnbzXnbiugzzOQeoNsb/A +KyGdvo9HF/kqyhuXOvQCPcncylJQF9+3u6xnGfeCWspSW3MhXVRP/jB6WrUX +eNI9nIwldNFzSnBab00vZN1X8NPW0kVt07zljz72QE9JdZx8sC5+5Q99/l2z +B5yH5itW9etihNhmYW7lbnj+fnIie0wXr/wKf3hBvBv4Mka34YwuBng7C21a +TTq9K9SbSw8nCg9uCx3rAj5Wlew7CT20ta92FsrtgqdnrqcFuujhmqrrh59u +7wIuIRWPry16mDOcLtAj2Qn2Y7uTfbv0MMK9Z0vK+k4orJQqYx/Uw/SiLaZW +vJ1wKGzLRrk5PfSIOfiQY6gDCjo4ai8K66P3uzsm4gUdYJvbpKxupY+zdL4d +huodkKt1gvP2J33caB03lGXfDgFb7TQef9ZHp+Ua0Zss20Gdpn2yvFUfL6bG +S9zSaYfqVys7Rwb0Uc7HBt5ItcOgSmEJchkgt/txhxuzbbBDZuxkBxrg9M3u +glPX2yBrg2+XeKEB3u2uFRF49xP8Zq02qL0wwMx2L7X3eT9B5asG3azUAP0V +PeST0n5CRYpAaWCNAa5W1HH38v4JvYJ5N8r7DfDdSkXDlWt+ggTXEP2oqCE2 +3tSTlfD8AdS45+ucq4aoIiJz7+O2VviafW2rTbohVu68NmHC3woChysi2SlD +PFideat9qgWCPohrOTw2RMYuy8tGH1vA7FZb2fJ6Q4wRaZEWCmqBGX2rt/7L +jVAu7vnn2MbvYHZDs1zlohEuzJsHKV3/BtOaQh/fnjbGZSI5d8vsmmF88L6m +abQx/tXRfixn3AwjqcrPmuKN0TGXLlKo1gw9Q1a3e24ao7Pq7qofws3QeC35 +OFexMXZ+3xQz1PwFCsZWrjWZNsbLq8Q5622+gOcd/sMNfiYoqdnN1HP/DK20 +ZWPtTqaYVaFYez2zEUwKInx/eZjiEYPOSaPrjVDk9Hdo2NcUl74I02WPb4SU +spn+uTBTlOrq3J12shEszo12rbluiiGpwzuVdBuhjPNHs2G9KY5fTeMz6mmA +TIEXpQVaZphpToXEyzSAz0bfhEhRczQOeb8vuaUOjO7Jq4hImePrfpuhnLo6 +kNgx/bNEzhx/uAb8+Pi+DlqVI2XmNc0x0cMmQ6qgDkz2JdUEOprjNCWXfCCq +DiQvPufzvmmOilLRc7ZydfB77rTOQ14L3Po/8Q8DCbWQd7SiNPm8BTqqsc4m +VNdAU/4dYbELFhhq3WfEX1wD8xPB/oWxFjhhui4v5WENGJ/ZKfYpyQLZ9AOF +P12sgV/XE6O57lrgh9fOGk2GNbC1+pBZSIkFZiVqv5Su/AhXd419d5yywMnL +iw1FDdUQ/Ed4SuqoJa4PFf/Cy1UFzVSKK8cxS/Qf7ZNRmqkEJatV9W1+lvh6 +JN7Mu78SfrP4cpMZllhR/CV/rroSPMMXnRejLbGn+P07ZmIl2HB319RnWuJJ +WY5zm0QqQWXLo8ygLkssOnN51lz7A0wY6VmVH6ZjzZ/u4NisclA69efjZRc6 +/mJTaotPLwfGvQxd6yN0ZNuepHw9oRxm52YV+nzoOFhZf6OKUQ5/c/JX8YbT +sfhA98E0w3LgWC5cZ5ZOx8tzSZn1g+9hXcOA8edmOtqsZqVeVX0PqnZXNLst +96HPOY2zz/vfQr3wTc+38vvRxtHE0/9tGazPPFuc9d8B7FU+SuOqLgVW2w4T +M34rlJaRDR0/VQKbG0ePBA5ZIZU7E7e36SXIJ1/Judd2EHnVkvS8D7+Am2x/ +diW+scYpXpeURZfn8ExT5tv5Fzb4t1uFxYh+CmnKFwXnH9giT6BBvuvvx/Dp +OzNKPtYO10ossmSzCuGpabqYX8QhnJc184n1KYCxY/toPq72uLn8jG3lsUcw +oSfpMaztgG36GxhVm/Mha+jr9Amlw+TzO10beTIXrO8wXez5HJFrooBJE8qB +x4XGh5dFO2JXyBbv85UPQHVD/cyFGUfy/7C0co6VDaJtR77VHXXCtGKLsHPV +WdDF62We3umEHrm3UsYH7kNtvJmL/gFnrLB/6RWleB+uMm7znqx1RovsaOuy +i5lQXLI442LogvhBTEx4ngm7XyuobDd2QQunX1K7Z5mQ+eZoYL+JC4522Bw3 +mmbClYqG334WLljr3/s4YpwJ7vX3B8IOuiDthYjA/CATBHvMW1PdiLkiqnb+ +IJ0/o7Qq0gUjLj1dH/KaCcsPYbR8kQu2SaQ7PLzEBJHV5Z82Frug4zx/ztAF +JshWmwpxlBCf8zq4O4YJdHW77ObXZP49433xOSZc3RhYFfaBdLcvc51hTFjf ++nB5RbMLijSeDzjhxwQxh3Vph6ZcsFS3U+GqFRNUHYezziu4YmmKYXalBHmf +a6MnzJRcMaPlMytInAmrG35rrFNxRRGGQ6+kGBOGdacas/aQ7u+TEbeVCZQU +bUm1litGMIVDnTcyQWBK0GalJXHWlUzNlUzoilPkvn3MFduM3qg1/qXAsly5 +8YivKzoGKRZlLlBQQlO7LXvcFWkCqZbB8xRcO6GhWBZA+sL+crFZCsxs9J26 +Q8jz+SxWRE1Q8ELM5oXURVfEe01T4YMUxL8MPcrKJD3OjtL4TsExuVRVRha5 +35o1p/KNApPsAm6VB2SeJWar8JUCntSe7Oe5ZF4mTGrXFwrO+1v0P3tCOqfP +hl0NFIRKink9LSM+MsJzuIoCz9Qq78IfxI4tHOeKKTAU6FH3byPn11QP33pJ +wX/nafxyHeS+Tw+ai4oo6PFXzC3oJu+z4WbBBIsCJ7PbQ48GSY9RDDj1lAJr +9hM++bPk/JuqDQ/zKNA/sd4vZ60bYvaB2bo7FJTdjjJKFHLDUkyWmM+gQL36 +txhjvRtG5KmGbSeWFa/6qr3ZDWlTPNmRtygQ/hKi/V2czH+znNS+QcGAWuta +HkViRyMdWjIFl5dmvDqyj3iiO8PqAnl/Gb400wPkvqhnH5kxFJyzY/jLHyT7 +P0mLTEZTwHhisX3RluwXOKN4PYo8v/uSKynOxG9FNo+epUC+0tn13XFyngqq +rA+n4MsVcV7RBNKdK5/6n6QgD/g9fl0hPeng45EAsn9o/G1uErn/POQeI5Yz +fBuukkru21SR7H2CfH80l9+mt8h8sqNy4HEK9HwzvjJyyL53hx+wjlGwaVOM +kkYesXa+iy7xeKVv0rJH5HyJgFCDNwV3JcA0/jE53/ro+JgXBQutraX3iog1 +jveoelLwxGRDVk0Fub+0/92MOwWXZpeyX60kPeHK9hRi56x+J5tqss/uv7Py +xCvYijZ0fSJ+3rn9uBsF3i+tL898Jvf7VIlPu1AguiMlUKyb9D5Wt4ITBbNf +whr6esg+i4kfbY4U1J53k83/RbxGui6OOLxdoV91kFjIMqP/MAXf0hrszf+Q +86z53nwHChI5BXWDl7hjxLdIwaOHKCj+3WoXsMwdaYlyuRuJe1sf+Puwk84p +EV5nR34PT3QynLlJT0r5nwZxjyNjzkiQ9LaJku225PlNdFfqriJOXLms24aC +PcorJWEN8YG5kHvECfw5VvLCxBdmecX+9aKfBRu2Eq/Fe/LWFLgzcyrWiBIv +GsfOHiTzCUE/l4uT+8JeZZcR97iv4meTJH55N9LqX1+l7zEoS+a1gYq1oqDo +76rTPXKkT2rI2BN397UltymQ3mE6vItYrTT4TaMK6WwnuD4foKDLO2/zKyT9 +zfeHcsQC1iGKz7X+fR77P/MRq2obmBTokPmhFIVf+8nvRbgjiGlAeu7B2LvE +LLb8hNtGpNeWn48k7hwJuX/NhPhrZ6ETscr7NU1xFmRenz1LnNi5oGMgmk66 +6F9fbuK49PylZ/aT3nDBa3gfBR3+hrKB1qQf1l54SczvsFbfz5b0x+5JFLGK +Yae95yHiak77eOK4LWGXHByJ2QouuhGzeIzuWjuT8zcfDdP/7ZtY+4LuSvrY +xijNf/vaOz+ZuJPu8Nti97991Y969DyII3eabyN2fh62gJ5kXrkqYvW//XeN +Vu/xJv1eRTfnv/1x66QUfUjfLBo+Tyf7GV2aMn7Exs2Gv4n5XAusJf3JPEeP +QR+xsnm4r2gA6T5GIe3EzmrGUZsCiTuXtX8jjhUXurmO8W9eMLiJ+NmK7seC +waQX+unVEbfPFVTyhpLOu02v5t/+3vB29nDiY2JB1cRK9cbTi6eJQ079rCL+ +PxHsaxM= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0., 3.438267802979728}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10054,21 +11649,19 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.438267802979728}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10082,105 +11675,123 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1Xc41e8bwPFT2as0aSqjryiySe7b3utUMiI7ISTpmNFAhURGpVJ9jigj +WifJTxqEZJaKsmVT9sjv6S/X63rfz/18Puec67LV2ZfutpRGo21dQqP9+1tr +HPU075sceka8i02M5MULaY43JUXlUT2gnn16mAd7LpnssuZQwLLkWoElqty4 +0dhu3aXVCnhV04wrcTM30nk8aSXbFHDWvHJIg40bS2Ki60VBAS2CKbXBT1yY +fL4scOSUAgrIKSxN8uBCndMq/4vqU0BFfcuOJbc58Y6/mMXTakVMqEpltG/h +wMIfpZeEWhRR6Y+g/E8ODiwzsi8PGVBEhkzi8OwQO3ZtS9HQ4lHCzGTOv5eK +2VGigXPnJ30l3NMYGi9ox4458gPcfWVK6P/qO5V4kw1Z4wVvNr5QxpUpY2EP +lJfhB0ezxdMVyphts1Zaftsy/Fbdr9b5RRknxy+5fOZbhnOUaGH2pDLSXm1d +8OpYihoHkjOUFFTwiaJgWW38Unz7lBFmka+CbI+1Go4MLsHaQFA+x1RFnS4X +5Cyi4bGamzduP1FF7yOveGhZNOSRmF8seqOK116+416eQkPdJlbFWLsqcjFP +a/j607BIXs728GY15F6xUKAoTUNqVCxMLVUN4zrPfY/RXwSGJ8+b0Zg9uINW +yx2gswBryjy286XtwbZdBtMJ4gtQKFx+afv9PdjZlizUyLEAQxVn9zu824PS +kaG7qz/Mg/P2he6qJer4NHQ6I9xyHky6RrjuB6tjvq5P55sjc7DVocnM3nsv +hhY3bbmaNwNU6fLygOC9GEJPGe9KngEJUSOIjdmLAnECkvSwGZD+VSLzktqL +KypWSkaazICSf9YK4da9yPIybdw5OA0mUSH1jaYaaLA4+IqSnYbAvK1WJjKA +OjPubNs/TsL0ikM1LnsBpS3m3N8+n4SQEyl6IcaAj04pSQbfnYQIFV7lB0cA +bc94H9jFmIRLZePruDIAuboyBZ+JTYLFQOegExdiTd7EQ8kzE+C2+CxvUxDi +LYEb2S2m47Cac8PV1xGICYMPh0tUx6FM4HSQWwyiUFbi6xfi4yCyWV8nNxWx +/0dA3PTCH2hR//JV/Rni2N2vu1Lz/wA9eIrt0B9Enm7NHPV1f0BjQtnu+jFN +PH5pxy3LqTEYmr+BGic1EUcn2bh7xiCdjSbREaqJR0+dkW5qHIOZVRWjkrGa +qPcoxuxh4Rg8kbOOevFAE5WC3L8b+47BDj9GQXOvJnqp5QbrDY7CugEW5zpn +LWSor73c/GsEVKZ5plSOaqH1PpNEno8jYMtu32Prp4XFqhHSdgUjkL5lybtb +4Voo228ZdzB4BLbtNzwjcUMLb8iH/WTxj8CuV1/nFRu1UEOIeWhBdRj0Ls+O +7dfTxm89c9uu3h8Ej3ST9kBTbXxkavKAfnkQLmTfqk3br42Njm4OUqcGofqN +Vn6LszaGjwZU7dAfBPr0RW/X09qoHjqg7PBrAOydNvSeYGmjdf3xbyEyAxAg +r96SuEMHNcaK00o+9cEhpZGfCbt1kCH9KmesqA90VO92xqvooELdd3O1zD5Y +BVwDF/V0MOoBfwtvWB8UGjXOnHHWQbG3byFXqg9GnbzXnbiugzzOQeoNsb/A +KyGdvo9HF/kqyhuXOvQCPcncylJQF9+3u6xnGfeCWspSW3MhXVRP/jB6WrUX +eNI9nIwldNFzSnBab00vZN1X8NPW0kVt07zljz72QE9JdZx8sC5+5Q99/l2z +B5yH5itW9etihNhmYW7lbnj+fnIie0wXr/wKf3hBvBv4Mka34YwuBng7C21a +TTq9K9SbSw8nCg9uCx3rAj5Wlew7CT20ta92FsrtgqdnrqcFuujhmqrrh59u +7wIuIRWPry16mDOcLtAj2Qn2Y7uTfbv0MMK9Z0vK+k4orJQqYx/Uw/SiLaZW +vJ1wKGzLRrk5PfSIOfiQY6gDCjo4ai8K66P3uzsm4gUdYJvbpKxupY+zdL4d +huodkKt1gvP2J33caB03lGXfDgFb7TQef9ZHp+Ua0Zss20Gdpn2yvFUfL6bG +S9zSaYfqVys7Rwb0Uc7HBt5ItcOgSmEJchkgt/txhxuzbbBDZuxkBxrg9M3u +glPX2yBrg2+XeKEB3u2uFRF49xP8Zq02qL0wwMx2L7X3eT9B5asG3azUAP0V +PeST0n5CRYpAaWCNAa5W1HH38v4JvYJ5N8r7DfDdSkXDlWt+ggTXEP2oqCE2 +3tSTlfD8AdS45+ucq4aoIiJz7+O2VviafW2rTbohVu68NmHC3woChysi2SlD +PFideat9qgWCPohrOTw2RMYuy8tGH1vA7FZb2fJ6Q4wRaZEWCmqBGX2rt/7L +jVAu7vnn2MbvYHZDs1zlohEuzJsHKV3/BtOaQh/fnjbGZSI5d8vsmmF88L6m +abQx/tXRfixn3AwjqcrPmuKN0TGXLlKo1gw9Q1a3e24ao7Pq7qofws3QeC35 +OFexMXZ+3xQz1PwFCsZWrjWZNsbLq8Q5622+gOcd/sMNfiYoqdnN1HP/DK20 +ZWPtTqaYVaFYez2zEUwKInx/eZjiEYPOSaPrjVDk9Hdo2NcUl74I02WPb4SU +spn+uTBTlOrq3J12shEszo12rbluiiGpwzuVdBuhjPNHs2G9KY5fTeMz6mmA +TIEXpQVaZphpToXEyzSAz0bfhEhRczQOeb8vuaUOjO7Jq4hImePrfpuhnLo6 +kNgx/bNEzhx/uAb8+Pi+DlqVI2XmNc0x0cMmQ6qgDkz2JdUEOprjNCWXfCCq +DiQvPufzvmmOilLRc7ZydfB77rTOQ14L3Po/8Q8DCbWQd7SiNPm8BTqqsc4m +VNdAU/4dYbELFhhq3WfEX1wD8xPB/oWxFjhhui4v5WENGJ/ZKfYpyQLZ9AOF +P12sgV/XE6O57lrgh9fOGk2GNbC1+pBZSIkFZiVqv5Su/AhXd419d5yywMnL +iw1FDdUQ/Ed4SuqoJa4PFf/Cy1UFzVSKK8cxS/Qf7ZNRmqkEJatV9W1+lvh6 +JN7Mu78SfrP4cpMZllhR/CV/rroSPMMXnRejLbGn+P07ZmIl2HB319RnWuJJ +WY5zm0QqQWXLo8ygLkssOnN51lz7A0wY6VmVH6ZjzZ/u4NisclA69efjZRc6 +/mJTaotPLwfGvQxd6yN0ZNuepHw9oRxm52YV+nzoOFhZf6OKUQ5/c/JX8YbT +sfhA98E0w3LgWC5cZ5ZOx8tzSZn1g+9hXcOA8edmOtqsZqVeVX0PqnZXNLst +96HPOY2zz/vfQr3wTc+38vvRxtHE0/9tGazPPFuc9d8B7FU+SuOqLgVW2w4T +M34rlJaRDR0/VQKbG0ePBA5ZIZU7E7e36SXIJ1/Judd2EHnVkvS8D7+Am2x/ +diW+scYpXpeURZfn8ExT5tv5Fzb4t1uFxYh+CmnKFwXnH9giT6BBvuvvx/Dp +OzNKPtYO10ossmSzCuGpabqYX8QhnJc184n1KYCxY/toPq72uLn8jG3lsUcw +oSfpMaztgG36GxhVm/Mha+jr9Amlw+TzO10beTIXrO8wXez5HJFrooBJE8qB +x4XGh5dFO2JXyBbv85UPQHVD/cyFGUfy/7C0co6VDaJtR77VHXXCtGKLsHPV +WdDF62We3umEHrm3UsYH7kNtvJmL/gFnrLB/6RWleB+uMm7znqx1RovsaOuy +i5lQXLI442LogvhBTEx4ngm7XyuobDd2QQunX1K7Z5mQ+eZoYL+JC4522Bw3 +mmbClYqG334WLljr3/s4YpwJ7vX3B8IOuiDthYjA/CATBHvMW1PdiLkiqnb+ +IJ0/o7Qq0gUjLj1dH/KaCcsPYbR8kQu2SaQ7PLzEBJHV5Z82Frug4zx/ztAF +JshWmwpxlBCf8zq4O4YJdHW77ObXZP49433xOSZc3RhYFfaBdLcvc51hTFjf ++nB5RbMLijSeDzjhxwQxh3Vph6ZcsFS3U+GqFRNUHYezziu4YmmKYXalBHmf +a6MnzJRcMaPlMytInAmrG35rrFNxRRGGQ6+kGBOGdacas/aQ7u+TEbeVCZQU +bUm1litGMIVDnTcyQWBK0GalJXHWlUzNlUzoilPkvn3MFduM3qg1/qXAsly5 +8YivKzoGKRZlLlBQQlO7LXvcFWkCqZbB8xRcO6GhWBZA+sL+crFZCsxs9J26 +Q8jz+SxWRE1Q8ELM5oXURVfEe01T4YMUxL8MPcrKJD3OjtL4TsExuVRVRha5 +35o1p/KNApPsAm6VB2SeJWar8JUCntSe7Oe5ZF4mTGrXFwrO+1v0P3tCOqfP +hl0NFIRKink9LSM+MsJzuIoCz9Qq78IfxI4tHOeKKTAU6FH3byPn11QP33pJ +wX/nafxyHeS+Tw+ai4oo6PFXzC3oJu+z4WbBBIsCJ7PbQ48GSY9RDDj1lAJr +9hM++bPk/JuqDQ/zKNA/sd4vZ60bYvaB2bo7FJTdjjJKFHLDUkyWmM+gQL36 +txhjvRtG5KmGbSeWFa/6qr3ZDWlTPNmRtygQ/hKi/V2czH+znNS+QcGAWuta +HkViRyMdWjIFl5dmvDqyj3iiO8PqAnl/Gb400wPkvqhnH5kxFJyzY/jLHyT7 +P0mLTEZTwHhisX3RluwXOKN4PYo8v/uSKynOxG9FNo+epUC+0tn13XFyngqq +rA+n4MsVcV7RBNKdK5/6n6QgD/g9fl0hPeng45EAsn9o/G1uErn/POQeI5Yz +fBuukkru21SR7H2CfH80l9+mt8h8sqNy4HEK9HwzvjJyyL53hx+wjlGwaVOM +kkYesXa+iy7xeKVv0rJH5HyJgFCDNwV3JcA0/jE53/ro+JgXBQutraX3iog1 +jveoelLwxGRDVk0Fub+0/92MOwWXZpeyX60kPeHK9hRi56x+J5tqss/uv7Py +xCvYijZ0fSJ+3rn9uBsF3i+tL898Jvf7VIlPu1AguiMlUKyb9D5Wt4ITBbNf +whr6esg+i4kfbY4U1J53k83/RbxGui6OOLxdoV91kFjIMqP/MAXf0hrszf+Q +86z53nwHChI5BXWDl7hjxLdIwaOHKCj+3WoXsMwdaYlyuRuJe1sf+Puwk84p +EV5nR34PT3QynLlJT0r5nwZxjyNjzkiQ9LaJku225PlNdFfqriJOXLms24aC +PcorJWEN8YG5kHvECfw5VvLCxBdmecX+9aKfBRu2Eq/Fe/LWFLgzcyrWiBIv +GsfOHiTzCUE/l4uT+8JeZZcR97iv4meTJH55N9LqX1+l7zEoS+a1gYq1oqDo +76rTPXKkT2rI2BN397UltymQ3mE6vItYrTT4TaMK6WwnuD4foKDLO2/zKyT9 +zfeHcsQC1iGKz7X+fR77P/MRq2obmBTokPmhFIVf+8nvRbgjiGlAeu7B2LvE +LLb8hNtGpNeWn48k7hwJuX/NhPhrZ6ETscr7NU1xFmRenz1LnNi5oGMgmk66 +6F9fbuK49PylZ/aT3nDBa3gfBR3+hrKB1qQf1l54SczvsFbfz5b0x+5JFLGK +Yae95yHiak77eOK4LWGXHByJ2QouuhGzeIzuWjuT8zcfDdP/7ZtY+4LuSvrY +xijNf/vaOz+ZuJPu8Nti97991Y969DyII3eabyN2fh62gJ5kXrkqYvW//XeN +Vu/xJv1eRTfnv/1x66QUfUjfLBo+Tyf7GV2aMn7Exs2Gv4n5XAusJf3JPEeP +QR+xsnm4r2gA6T5GIe3EzmrGUZsCiTuXtX8jjhUXurmO8W9eMLiJ+NmK7seC +waQX+unVEbfPFVTyhpLOu02v5t/+3vB29nDiY2JB1cRK9cbTi6eJQ079rCL+ +PxHsaxM= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "PlotRange" -> {{0, 180}, {0., 3.438267802979728}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10190,7 +11801,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5082122808512888}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10218,7 +11830,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.438267802979728}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10226,9 +11839,9 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913242457281837`*^9}, + CellChangeTimes->{3.9913242457281837`*^9, 3.99383111114843*^9}, CellLabel-> - "Out[111]=",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] + "Out[127]=",ExpressionUUID->"a1c43a15-954a-4cb4-8a70-4f86298a8d29"] }, Open ]], Cell[CellGroupData[{ @@ -10291,158 +11904,215 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9917997871187477`*^9, - 3.991799792469698*^9}},ExpressionUUID->"8faa67fd-f295-ea48-b116-\ -d12d9d52c36b"], + CellChangeTimes->{{3.9917997871187477`*^9, 3.991799792469698*^9}}, + CellLabel-> + "In[128]:=",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.955409411483839`*^-270\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 112, - 45, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246104725*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.3466731751489847`*^-238\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 128, 41, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.993831111251371*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], +In[128]:=",ExpressionUUID->"20ae775f-da72-4766-8790-7fad2ec0434d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.877419838456823`*^-281\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 112, 46, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461217346`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2691339690761434`*^-245\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 128, 42, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.993831111256008*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], +In[128]:=",ExpressionUUID->"5dc8735d-cd29-4c43-aede-6cf71fdd8217"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.990320554242227`*^-292\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 112, 47, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461427383`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.812842327787988`*^-253\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 128, 43, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.993831111259756*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], +In[128]:=",ExpressionUUID->"54160270-9330-481c-9d10-3c35d0d3251b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 112, 48, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246159645*^9}, +during this calculation.\"", 2, 128, 44, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.993831111263126*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], +In[128]:=",ExpressionUUID->"3546b880-2fe0-476c-9149-cefafd0960e8"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k4lG0UxkXZiuzLjD1UlpRlmDHjHJQkCaFIdmVJKCQSChEpWkglJCol +20y2VPgkFSLZZSlJZcmSpHxvf831u67znnOe59znfueVd/O39mRnY2O7vYKN +7d/v/MDLesXEXIMmh2V5I4q5wbtMiROGXadBUvzVFNfQRkDRFjeJrlSAaPqn +pkEqhFje7+ToyoGPd1Zo3RjcAYIT4qm/OkvgpFXbhq2D9vCh2sJ/trMWDm4Z +PyT6wRtMFMf7pzvb4N7R5fRjPSfgV6fulanOYdiSnz7L1pgAdcb5uW9zZuC3 +U/a2C/EZIPWhYtRN7Q94Mf42edjcBpHDzve5jDlQ2PX5mT29dyF1i0mVhS03 ++veqFNGMCkGj1347w4sbg/lDvgvbFsLrGL921XBuVJF+Ozd8qBA4uy5/5c7m +xt7YWWu384UQfmqEXPeNG8v9hwo/dRaCx6uok7oxPBj8qyZy0ecRUDyrGHKl +vNiROKJ4c2sRdKdvfjYtwIc9IPg3wboYMtoL1oYo8eFBs6dUs/3F4MC/3nmR +yocRnE3NHB7F0HdG+i+7Ox9auyb+dgsuhsEjvHQRJh+uDqiTeZtWDGNbPz6m +2POjyKJiqk9vMSxMpT0Kz16L3knbGGcOlECFqvDyMnMtaqwM9PTxLIGwg8kW +MU1r8aVdw20zvxJY6o35njSzFldo5++fP1kCUSPloi0KAmhwAuIWr5dATPOd +PYNBAtjR3bO1rKsEEnMjW9glBfHm1hrasHkpmGl7C4muE0Qt34s6jXtKgbve +2na9uiA+mrC1y3cohZgRpd6dhoI4Oj+00sqrFE4qvB697C2IY2smZ63OlMKR +LIm/ypWC2JaRpMRTXgpWN4rVdu4XwoaSiGfbpMpAQO26/wFPITRZj4ctFMqg +uSqmxN9fCMvvN8tYbigDs969epfPCOG1HSFXDLTLwIj017i/QAjXq/YyX+ws +A+10s/3+S0I4N2Gne+5EGYhfHkm4dFMY+1j46HVLGUioMmMW8oSxzvJR2o13 +ZUCqjYs8UCSMb5ISXA92l4HM1Mbg9XXCGPvlRfrn4TJQMg9wqRoTxoTnK1Ky +5spAa+UfyoiWCOo6liV/k2TC7iCxj5pNIuj+2fvctwNMsFw9NpDWLoL8x0Yi +FlyZYJ1T0b3UJ4JJfcnWfz2ZYNfq2NIwKYIGW3Wyfvox4YDa7UoHUVHkzAxu +y4pggu9HjZTTLqK4jlz18s11Jpy12WHQNi+K7golFpfbmUAqayaxrxDDepcT +19d1MqFQ2ObnltVi+OfmurqCHia8b3MqSpEVQ0pP5528ISYoWgUpWJmKoUhi +ymuTSSbU7rrF2XpNDCX4FM228LDA7qHiyPJtMaSL7si0WMOC8TX3n2oUiuG7 +hf5uj7UsEHxdFnqhVgz1NJZ4T4qywMWsadziqxg+ptr728qz4I/JXPMbujju +Dl+UYeqy4GJeWMEfE3Gcur/g5EpjgSInW7y6lTg677l1lZPBAvP/eA3Pe4pj +w2TgtL4RCzKM5UrNk8Wxv+O/YGtzFujhzrRXH8RRo/vUSw1nFry+1Xrs9xdx +bKOVCR92Jeov21qqzoojB4+9d7Y7C87WuPAkckvgkrwj/echFrynh4SbbZHA +++Lz+bsDWHCMmu388rQE8gVzvS+LZIFZFv/sziQJ7FxnzusRzQIFrpPxzVck +sE9l1IjvDAta39kVt9+VwOv3NjfsimPBpoA1HAPNEmg1t516NokFqzpPpLl0 +EfkcLMo4k1nQx/isOjIkgccvixtEXWBB4upam7FZCRSk7zvjmsqCsbzjeT9I +kiitMLLYl8aCp3yfaMGKkij+DITUr7HgapB1y091SUxa9DY+nsGCbUbqC0so +iR/zexZ+3WBBTv/wDq5DkshTktFVns2CE1stBxICJLGY/Hy0O4cFlgVPjq4J +k8SEBXvS3G0WLIemXxc8L4l7I4Z/SuaxwFHE4ju5VBKPLb9hSd9ngVZ4VXRm +tSR+qJ8nCRSwgHd4g5h8gySOXX1TtERwxSMOUO6WxHbtluP1D4l5igW23x2W +xBt5ig9uFbLAK2LgkOo3Ip9fhETwIxaI7ay4uHlZEvkd82/xF7Pge7GyUik3 +CY84M5+0EVwvcblCR4iEt3yRlFJCzGP0yDBNiYTesi5XlkqJ+45W1N62k4QV +D7bWJrNYkD+W0vjChoTpI/fYlR6z4NTuZUczJxIGCXxNZhKsLt0TuzuQhObV +PSn/lbNgZcx2UlsYCQ95/169rYKYx3hZoU0MCbd59nXVEHyu/EKnfRoJhc72 +BmZXssBV9o9vXxYJxTdHGPJWEXqL82Fzvk/CHJVRHz+CBb53Xh4qJeHBy/2T +TQR/3rNto8cTEn54oNamUM2CmsqSJ6MNJHRozxQOJviqvJy1dysJxWJXsJ4T +7Bd/fvRrNwlv7les4n7Cgq2Ti2FHRkjYz9utaEbwCdPLKs+/kXCqIqEjhuDC +bPUe4XkSSppqK1cSPLLYkHBwmYTWu69IjBMsYeNCreAmo6ONb6FIDQt2Pfw1 +tlqIjHfrQ75QCT7NeSndiUzG5dkTr+wJfuysZlqsSMZ3slS7IIK/lf/3k2MT +GZ3cwxITCJYXcs630yWj0rNVftcItvNdsLuHZDQWv7N0m+DE+hTOpR1kLNmg +SL9H8DNpVZbFHjKmpliq/+O5kHrPbEcy5jb9evsvXqX1gOisJxmdladV/+Vz +2viz3sSfjIdaeBj/6l06fTHoWigZuxskuP7109i7UfFbNBmTh2cT//W7pF3X +bpBIxgOvQt78O8+WZMczKZfJmPg79M2/8x78PKf58SYZv1d3nv93H9fxwjAl +n4x26wMFqghuvbYhNaGIjLUySnvjCF4189ywr4KMFVYd7uYE08z3T2+qI+Ml +XU89PoL978xmRb8mYyl/5ftGYl65f89bvusg43BPJUYSzF/87NGJMTK+3eIZ +2UfM35jXwfn1NBl3Xfi09wzBoe4z/LK/iX7OPOVQInhYVPlIPZ8UqrEZ9u8j +9CXu/1RaXFwKrfAN/1dCf+aN+954y0mhYuxJcijBrLBEtbVaUujlLdd8mtDv +13bFPle6FIb6c4WyESynXpNYtk0KfxnPrzxB6P3ch6lx+31SaFA23OJA7MdT +vXMZD1ylsF1tULCeyYLZlHVmyz5SOLLxk8EGgp222t3LjZDCFw/E3YaI/dK8 +V3VoMkcKN2UtrBIn9vEQu6240QMp/OnB1r23iAU39k80XGZK4RFpp/xLxD5z +8ssr0xqlkNfS1WCJ2P+eo3EfY75L4c7+xgsphH9E061cSXrSyMnYndZM+I+p +U+YPXSNpDBjZOXKX8Cf+qK9nbM2lsVl78khEFpG/Ljbvoos0ZvyhWopmsqDc +rPIrZwLBfnXxbIT/Te1bFzLTLY1qxrbbX5wn9BsWwCX4URopGa/7TQi/PXXj +SfqmCWm8qSg89OwcC9YM7q3yZpdB0Znr1NyzLFh/KIltUEUGs1eOndlA+LlT +8Ny51+EyyDfyik/lGAuU0oykxmNl8I/4oxarwH/7cOEh10UZ3ChyRD3InwVh +SxtbjXJlsDIqqvGuLwuunHESrXgtgxG8Tm/fEu+X1ykvbt2RlsWHtPz3SnsI +PRVeKzv1VBaNHiSaflUn9ruz+c9Eoyxe0Y50TFNlgQXbyu3ObbI4s+aLCGxk +gbv1kW74JIsDyZER0YosMAmXj4xaJYcuLhdD2kgsCJCdv22oKoeZT3ZZ53MS +fnno1ve6EDmc5s/S1Ohlwo4lqtDJcDlc0ao/YdPFhOaL7yjaUXKoWiVzO6SD +Cd0VPFG5CXI4l5fMUdjChInVQUKxN+RwV57Q1291TJAoMtU1qZXDOyUrHz8s +YMLhhemoRj55rGVeCrMIZQIt8KDYqJA8Ngwfby0KYgL3eE8Bh4Q8xh+ebeMP +ZMKd3rr3BgryOLht8usTbyYM1FxRY1Lkca9PztsxB+L/Tyy1K9tZHqGWPSmI +zgRNoWiN8GJ5DOrfNXByqQx+qQoMqNsq4J5bWQ/IgWUwf5MUreWggKfAnvP6 +4TKYXaukSHVWwJe5v4XFvcpgYobqs9VbAd9t69i3yrkMhqvc5x0iFDDhbt2X +SvMyaNr5mD/+jgI+vDaocX59GWT4OsHwnAKGckjEjfaUAr3gQdbVq+vwffjh +AnVqKUwLmbnY1Sri7Sm7F3d+FMPHJBe7o1zKOFpisC8kpAh2TB7f8YmyHplF +ZAW/NYXwzZ37WFnkBjxu9tAr8fN94vtDnP1s7UYUCK1fM9WfD0JvlJOLJlXw +ILXQ0VjhDkjFP7KkUNQQD8dZbrLJgXRVqoDwIXXk62mOimm8BU0kQ52ZlE3o +4TcduN79OtCkai9qvNfAhUbfzKdCacDPkRPkenozWvsc80wOvwQy0bJ0e+Ut +KPeQIb957UXgUXJkWb/Ygqft1370sTgHmxiSj44f0MSYiktyQXdioXSd9292 +F018urc9qiE1FvR4K7Ynu2niw13i15SiYsGoc99g7iFNFNQo6+fZHwt2gemC +bYGa+EGBW9VHMBYi74gHqcVpYu3BEb/YqBho5ROjDhVqIvWm0Ay71xk4OiBU +Z8amhZ3Y1fTTIRoaGxyf3GfXQjbzBXYH82iQeZT3mHeVFu6XN9NoYERDUyTt +QROPFrKPye+plosGBXm3K2bCWnjDrGuX7OcoeOtefMhMWQttE0yhOjgKNn/Z +vcbMXAt7n0dPH9SOhMmZJNsd6VpI3j7QZvQ3HPq6su1uZmjhk3tcw7qj4dD0 +hLV3+gaRn8fwJ6M5HHLPDtpfy9bCewUsoYjMcHAgazt9ua+FenaRSg0QDv8Z +9R5MeKKFmxf4wk7GhsH1lI2hL4cJDrsyBdInYLtGQ8YOdW2kXem9ZXMyBPZx +mtq0amhju0edydWDIeDT/5Jvr6Y2vj53KumLZQgkJ76J8tDVRodAtlf1SiHw +/vO7g5GG2njjYvIP89Zg8Mga0WTaaiO35pWPGRuC4bTgildyp7Tx0OWXpz59 +OgY1M/q/fzZr44W1e0f/XAyE7NeP3fa81cYoGlMtNioQYu5oNRW2a2PbWEaa +ZEAg7Nires2zSxsXZDZXee8OhHeVJN32IW1ctHbZn8cfCOPRv44Wzmpj0d4h +0XMXAkBM4PG4B0kH4RRlc4KOPxxR0+x566mDlo8rNz287wvBP0mLzl46KHlN +ZjD1vC+crOUgTfjoYNwLhx+pAb6QuK/DnjdAB32dAyaGKL5wNya02yhMB1tP +69Aq6n1guK+mqzRZB8cG9wzRP3mD3fmdnVce66Ab+8clcaoXMCY83tnzUNBO +0aVDc4MniFVtz6leTcG1HZ+t7wp5wsRZlQBZfgrGWzyf3PzHAzLlp1Z/EqJg +bfQDy/A2D/hrE24cIEXBDzkXtsxEeMDTqpSSOA0KsqREr7h3uYNhQs3FUlsK +GhYu7PmS4QbbFCV28eVQ8NSarXeL9rhA2ff/5D1yKWg0HSTRZ+QCio+PzVfm +UXCVLnuLmKYLrDRrueVVQMHpH6eGKgRcoNY/7kddGQW3iDVU+tx0BoOq2bSw +FxT0ub0mczLDCSjWb4c/f6PgJXJ8WEWBI+SRIx8bTFKwufJjPOu8I4h+Uku6 +Mk3B+g0czi3+jjB7PF7HeJ6CY6k/1thoO0LJTYjPXKYgvV+enF+zHzS+PFS3 +FdLFsshVZ1y7HGBD1LnQWl1d9Khg/bgiaw/V+ndWmdN0cce54fxsdnuw/Pk0 +tYOui9sO8y03fdoHoUfmHowZ6mLh3hT1kAf7oNHRZYjfXBdlDeQaVPX3gReV +YrbfRRfnDViTfw7shXs/hsiz8bp4oDu1JKXcFgwKl+5GJOpizNuIaPlbttDm +LU7hStbF+5T5oVextrA4aG5JuqSLPO1pv/z32IJZy+MYvKmLxxb1535M2sB4 +wfnvScW6OBx8rr9F3QZUPKlPlXp0Mby9JNWk2houKFgsnunTRSWhfVyh+dYw ++8FNZ3hAFw3sg9VqUq2hxiGpIHNEF6+rfzCM97YGa8sPaeLfdXHW6UCRoIQ1 +nNCPDeBh00O/8pjQ8VAraBR8K/9dSQ9tZdNH6TssQb3lk+PODXp4xNBLf4Ri +CalJi2n3VPTQ0sdC8YaiJThyKfIf1NDDqdeswG1sljC5FLI4oKeHFziyA8cC +doPYmFR76049XE+RE/XeZwGeNV4xZYF6OND1hCfP0Bwm/MaPbwvSw1q54tN3 +ZcwhVPqw7/sQPUL/hWvafu+Ecyf9rRfC9fCJ6mj1NdZOKKKFyNHj9DCQ0yvo +p/pOWGKdqa7LIOq/DWx+tc4MUh9lzrbV6WG28YrAHhVTkHKWG3NvIOJbR/hD +15jCHf6c3tlGPSxsLKLrTWyHcr87tWLNeti7WuWpbMl26Fd9cNGhi3h+wSf/ +rP522HC3Qm34mx4yneDGTRsTeJr1zmNalIqJiaamS5lbYdBc3jlEgoo3lzhE +lGO3AtsvP/vfJCoas+sY+fluBSMrLotVckT8mq+We/S2QsMKmq6kChUbgk/y +hLcbw2u3WzyGBlTUPC9RJ7vWGHoUfQovHqRi9fP1v39lGMLvVtZdUW8qHiri +lr4WYwhSERy3M3ypaCS6Q8n6iCEc6LiRlhtAxT+UfZGCRoYwGNsSVR5GRb+f +V8NrxxE+j2rvGUym4qcPX7++R4TZu8s/NR5TsTt9sGjLXwaM2plkJVRQESBs +XrqHAV0rz5uOVFHxh6dZ3xYWA6pcSNeuPqNiy7dTEy1HGHBaQof25yUV79Vl +/hkcooNAvM/Jpj4qKvP7PtJp0Qe1Qx1snuw0ZKgfHMv7jwoyolL3albS0HdP +WrdBHhUE6tysJLhoePx82btfcVSYkZnKfrWahkHPmQe6TKlQ+Z7XWFOUhm0r +aLNazXpgaoKxy+tpmP200XH7B11wVyrgydhFw4FOY8q8JAXC/nPyUbYk8jUW +tLst6cBFT6FXJdY0vN+xqX5mQAeq75xIerWXhi7jtOXoXB0QUTZd+8eVht/0 +j53buUUHGpQ/ibiE0LDn6XJHgJU2qGyQlVO+RcNzNeEFi/c1ARvbokqyif4s +EzXzUzTBzituyCCXhncVFPceC9WEM3e/5+y9R8PDKj5fvU00oW9DtVJCKQ1r +fix6vR7ZAskb7VW/vaBh542XvqaKW2Ba5RKlZIqGfy/s6nUN0YCu17hNeIaG +zpdT+n7v0oBnRyb2BM0R9VjTzP+UNCC5ZEcgZZGGn4d/K451bAIVGtuDSg59 +jFhQ9XHT2wRuO/zk68T0Mer52y42TnV4d2j7mnd0fczQKx64WKsCVTxzJB3Q +x4LWyqMNt1QgpyBn41VDfQzijOxQilCBgMk/JvtM9DEpKdPKVU8F+I6XRfft +1kebq26UhqKNYBIn//Ojmz7+cF98I3dvA5Tn/h6ai9dHkfJN6eMsZaAYB/00 +S9THQUsZvH5NGZhD39ZkndfH+IfPJo6cVIYSmQFds1R9zHQzaDxlpAwP0p+d +z7yuj58lO83prUqQlRRL3V6oj7/oN8T4fyhCQtDalPR2fWzuGrq11mIdcAvH +533v0McXHFpKPdrrIK6YrdqoSx9nW69r15HXQczE9Oi3Pn3kCP7hM/VFAU55 +vaMbjurjJdPI86VnFeCo47WxLwv6mH+g+e3TRnlw2LoO9WXoyOQT4xVwkYM/ +77j56+ToeNRE/2qaqRxkeU70mq2j4wy9391gixyMxlUcd9hAx45We9Uv7HJw +9OXuRyc0iXj6y8tOu2XhnMVJmXITOlbPhSRWfpeGyn0dS9r+dAwu2r893pYM +B75UNlUH0lE9d59UjzoZ2MKy0rcG0dFIRzzOlZMMJtd9tW1O0PE6ZxefQDkJ +2vpXHD52ho6qthrlH6VJMO62qbc4jY7sNs1FWjMSQPY7W7HpGR2lftWbFtWK +QfLyQZ3EWjo2fYLkoNtiwJ5qUvy5no61w0+ZLjFiMM5adS/rJR3bBbwnHpmI +QSVbTLpQOx3V/jMYV3wjCg6Xo47Pf6KjLzvXSxwSgfSqEzo1qxlYMgGPuZSE +YY2FfTGJn4FanHJRAbzCEDWop35cgIG1S63ZvyeFwGvVguJmUQbWN3uahVYJ +ge7uEJEcGQau3KXI5LQRgvfDR2ditzCQtzA11yZREER5Dxfv2svAhd2NarcF +BSDXOCJsyp6BfldsL76fWguaEcnGlxwZeFRYD4tq1oLFVFFHlysD4+wiTxjs +Xwtx7+d+uR9m4Guv2/5VafywkBNpFBbNwPVq3f1D0nzQo3+pPa+AgUzXx3Rz +R17wCs69saOQgXVv3ty20uSF+UKm57ciol/pI+2XuXlBSKHrJ+FzqCETrtXO +5IGd3NJST54x8BPzQJayMA9Uv8vzaO9gYDzNq32giwvM+MvVQ7oY2BqrrnOt +hAu6tr+cl+glzifVrJqUxAWzlV/jnQYZmHmuIZ1kyAXq2ZsffhlnYKxcXEvr +A06o7jEMSfrOQJVJK63t8ZxgJrIHNKYY6PDDs3zGnRMOng1+GzRH3Iff9Mx3 +MifMPovLEF9g4MUBeSH9hVVwejHNvXKRgdcqVss/ebcKBLTvqR34w0A7l4iO +Y8WrINOvcm55mYE3zO98dEpeBf8DlYrdaA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10456,117 +12126,170 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwVl3k4lG0UxkXZiuzLjD1UlpRlmDHjHJQkCaFIdmVJKCQSChEpWkglJCol +20y2VPgkFSLZZSlJZcmSpHxvf831u67znnOe59znfueVd/O39mRnY2O7vYKN +7d/v/MDLesXEXIMmh2V5I4q5wbtMiROGXadBUvzVFNfQRkDRFjeJrlSAaPqn +pkEqhFje7+ToyoGPd1Zo3RjcAYIT4qm/OkvgpFXbhq2D9vCh2sJ/trMWDm4Z +PyT6wRtMFMf7pzvb4N7R5fRjPSfgV6fulanOYdiSnz7L1pgAdcb5uW9zZuC3 +U/a2C/EZIPWhYtRN7Q94Mf42edjcBpHDzve5jDlQ2PX5mT29dyF1i0mVhS03 ++veqFNGMCkGj1347w4sbg/lDvgvbFsLrGL921XBuVJF+Ozd8qBA4uy5/5c7m +xt7YWWu384UQfmqEXPeNG8v9hwo/dRaCx6uok7oxPBj8qyZy0ecRUDyrGHKl +vNiROKJ4c2sRdKdvfjYtwIc9IPg3wboYMtoL1oYo8eFBs6dUs/3F4MC/3nmR +yocRnE3NHB7F0HdG+i+7Ox9auyb+dgsuhsEjvHQRJh+uDqiTeZtWDGNbPz6m +2POjyKJiqk9vMSxMpT0Kz16L3knbGGcOlECFqvDyMnMtaqwM9PTxLIGwg8kW +MU1r8aVdw20zvxJY6o35njSzFldo5++fP1kCUSPloi0KAmhwAuIWr5dATPOd +PYNBAtjR3bO1rKsEEnMjW9glBfHm1hrasHkpmGl7C4muE0Qt34s6jXtKgbve +2na9uiA+mrC1y3cohZgRpd6dhoI4Oj+00sqrFE4qvB697C2IY2smZ63OlMKR +LIm/ypWC2JaRpMRTXgpWN4rVdu4XwoaSiGfbpMpAQO26/wFPITRZj4ctFMqg +uSqmxN9fCMvvN8tYbigDs969epfPCOG1HSFXDLTLwIj017i/QAjXq/YyX+ws +A+10s/3+S0I4N2Gne+5EGYhfHkm4dFMY+1j46HVLGUioMmMW8oSxzvJR2o13 +ZUCqjYs8UCSMb5ISXA92l4HM1Mbg9XXCGPvlRfrn4TJQMg9wqRoTxoTnK1Ky +5spAa+UfyoiWCOo6liV/k2TC7iCxj5pNIuj+2fvctwNMsFw9NpDWLoL8x0Yi +FlyZYJ1T0b3UJ4JJfcnWfz2ZYNfq2NIwKYIGW3Wyfvox4YDa7UoHUVHkzAxu +y4pggu9HjZTTLqK4jlz18s11Jpy12WHQNi+K7golFpfbmUAqayaxrxDDepcT +19d1MqFQ2ObnltVi+OfmurqCHia8b3MqSpEVQ0pP5528ISYoWgUpWJmKoUhi +ymuTSSbU7rrF2XpNDCX4FM228LDA7qHiyPJtMaSL7si0WMOC8TX3n2oUiuG7 +hf5uj7UsEHxdFnqhVgz1NJZ4T4qywMWsadziqxg+ptr728qz4I/JXPMbujju +Dl+UYeqy4GJeWMEfE3Gcur/g5EpjgSInW7y6lTg677l1lZPBAvP/eA3Pe4pj +w2TgtL4RCzKM5UrNk8Wxv+O/YGtzFujhzrRXH8RRo/vUSw1nFry+1Xrs9xdx +bKOVCR92Jeov21qqzoojB4+9d7Y7C87WuPAkckvgkrwj/echFrynh4SbbZHA +++Lz+bsDWHCMmu388rQE8gVzvS+LZIFZFv/sziQJ7FxnzusRzQIFrpPxzVck +sE9l1IjvDAta39kVt9+VwOv3NjfsimPBpoA1HAPNEmg1t516NokFqzpPpLl0 +EfkcLMo4k1nQx/isOjIkgccvixtEXWBB4upam7FZCRSk7zvjmsqCsbzjeT9I +kiitMLLYl8aCp3yfaMGKkij+DITUr7HgapB1y091SUxa9DY+nsGCbUbqC0so +iR/zexZ+3WBBTv/wDq5DkshTktFVns2CE1stBxICJLGY/Hy0O4cFlgVPjq4J +k8SEBXvS3G0WLIemXxc8L4l7I4Z/SuaxwFHE4ju5VBKPLb9hSd9ngVZ4VXRm +tSR+qJ8nCRSwgHd4g5h8gySOXX1TtERwxSMOUO6WxHbtluP1D4l5igW23x2W +xBt5ig9uFbLAK2LgkOo3Ip9fhETwIxaI7ay4uHlZEvkd82/xF7Pge7GyUik3 +CY84M5+0EVwvcblCR4iEt3yRlFJCzGP0yDBNiYTesi5XlkqJ+45W1N62k4QV +D7bWJrNYkD+W0vjChoTpI/fYlR6z4NTuZUczJxIGCXxNZhKsLt0TuzuQhObV +PSn/lbNgZcx2UlsYCQ95/169rYKYx3hZoU0MCbd59nXVEHyu/EKnfRoJhc72 +BmZXssBV9o9vXxYJxTdHGPJWEXqL82Fzvk/CHJVRHz+CBb53Xh4qJeHBy/2T +TQR/3rNto8cTEn54oNamUM2CmsqSJ6MNJHRozxQOJviqvJy1dysJxWJXsJ4T +7Bd/fvRrNwlv7les4n7Cgq2Ti2FHRkjYz9utaEbwCdPLKs+/kXCqIqEjhuDC +bPUe4XkSSppqK1cSPLLYkHBwmYTWu69IjBMsYeNCreAmo6ONb6FIDQt2Pfw1 +tlqIjHfrQ75QCT7NeSndiUzG5dkTr+wJfuysZlqsSMZ3slS7IIK/lf/3k2MT +GZ3cwxITCJYXcs630yWj0rNVftcItvNdsLuHZDQWv7N0m+DE+hTOpR1kLNmg +SL9H8DNpVZbFHjKmpliq/+O5kHrPbEcy5jb9evsvXqX1gOisJxmdladV/+Vz +2viz3sSfjIdaeBj/6l06fTHoWigZuxskuP7109i7UfFbNBmTh2cT//W7pF3X +bpBIxgOvQt78O8+WZMczKZfJmPg79M2/8x78PKf58SYZv1d3nv93H9fxwjAl +n4x26wMFqghuvbYhNaGIjLUySnvjCF4189ywr4KMFVYd7uYE08z3T2+qI+Ml +XU89PoL978xmRb8mYyl/5ftGYl65f89bvusg43BPJUYSzF/87NGJMTK+3eIZ +2UfM35jXwfn1NBl3Xfi09wzBoe4z/LK/iX7OPOVQInhYVPlIPZ8UqrEZ9u8j +9CXu/1RaXFwKrfAN/1dCf+aN+954y0mhYuxJcijBrLBEtbVaUujlLdd8mtDv +13bFPle6FIb6c4WyESynXpNYtk0KfxnPrzxB6P3ch6lx+31SaFA23OJA7MdT +vXMZD1ylsF1tULCeyYLZlHVmyz5SOLLxk8EGgp222t3LjZDCFw/E3YaI/dK8 +V3VoMkcKN2UtrBIn9vEQu6240QMp/OnB1r23iAU39k80XGZK4RFpp/xLxD5z +8ssr0xqlkNfS1WCJ2P+eo3EfY75L4c7+xgsphH9E061cSXrSyMnYndZM+I+p +U+YPXSNpDBjZOXKX8Cf+qK9nbM2lsVl78khEFpG/Ljbvoos0ZvyhWopmsqDc +rPIrZwLBfnXxbIT/Te1bFzLTLY1qxrbbX5wn9BsWwCX4URopGa/7TQi/PXXj +SfqmCWm8qSg89OwcC9YM7q3yZpdB0Znr1NyzLFh/KIltUEUGs1eOndlA+LlT +8Ny51+EyyDfyik/lGAuU0oykxmNl8I/4oxarwH/7cOEh10UZ3ChyRD3InwVh +SxtbjXJlsDIqqvGuLwuunHESrXgtgxG8Tm/fEu+X1ykvbt2RlsWHtPz3SnsI +PRVeKzv1VBaNHiSaflUn9ruz+c9Eoyxe0Y50TFNlgQXbyu3ObbI4s+aLCGxk +gbv1kW74JIsDyZER0YosMAmXj4xaJYcuLhdD2kgsCJCdv22oKoeZT3ZZ53MS +fnno1ve6EDmc5s/S1Ohlwo4lqtDJcDlc0ao/YdPFhOaL7yjaUXKoWiVzO6SD +Cd0VPFG5CXI4l5fMUdjChInVQUKxN+RwV57Q1291TJAoMtU1qZXDOyUrHz8s +YMLhhemoRj55rGVeCrMIZQIt8KDYqJA8Ngwfby0KYgL3eE8Bh4Q8xh+ebeMP +ZMKd3rr3BgryOLht8usTbyYM1FxRY1Lkca9PztsxB+L/Tyy1K9tZHqGWPSmI +zgRNoWiN8GJ5DOrfNXByqQx+qQoMqNsq4J5bWQ/IgWUwf5MUreWggKfAnvP6 +4TKYXaukSHVWwJe5v4XFvcpgYobqs9VbAd9t69i3yrkMhqvc5x0iFDDhbt2X +SvMyaNr5mD/+jgI+vDaocX59GWT4OsHwnAKGckjEjfaUAr3gQdbVq+vwffjh +AnVqKUwLmbnY1Sri7Sm7F3d+FMPHJBe7o1zKOFpisC8kpAh2TB7f8YmyHplF +ZAW/NYXwzZ37WFnkBjxu9tAr8fN94vtDnP1s7UYUCK1fM9WfD0JvlJOLJlXw +ILXQ0VjhDkjFP7KkUNQQD8dZbrLJgXRVqoDwIXXk62mOimm8BU0kQ52ZlE3o +4TcduN79OtCkai9qvNfAhUbfzKdCacDPkRPkenozWvsc80wOvwQy0bJ0e+Ut +KPeQIb957UXgUXJkWb/Ygqft1370sTgHmxiSj44f0MSYiktyQXdioXSd9292 +F018urc9qiE1FvR4K7Ynu2niw13i15SiYsGoc99g7iFNFNQo6+fZHwt2gemC +bYGa+EGBW9VHMBYi74gHqcVpYu3BEb/YqBho5ROjDhVqIvWm0Ay71xk4OiBU +Z8amhZ3Y1fTTIRoaGxyf3GfXQjbzBXYH82iQeZT3mHeVFu6XN9NoYERDUyTt +QROPFrKPye+plosGBXm3K2bCWnjDrGuX7OcoeOtefMhMWQttE0yhOjgKNn/Z +vcbMXAt7n0dPH9SOhMmZJNsd6VpI3j7QZvQ3HPq6su1uZmjhk3tcw7qj4dD0 +hLV3+gaRn8fwJ6M5HHLPDtpfy9bCewUsoYjMcHAgazt9ua+FenaRSg0QDv8Z +9R5MeKKFmxf4wk7GhsH1lI2hL4cJDrsyBdInYLtGQ8YOdW2kXem9ZXMyBPZx +mtq0amhju0edydWDIeDT/5Jvr6Y2vj53KumLZQgkJ76J8tDVRodAtlf1SiHw +/vO7g5GG2njjYvIP89Zg8Mga0WTaaiO35pWPGRuC4bTgildyp7Tx0OWXpz59 +OgY1M/q/fzZr44W1e0f/XAyE7NeP3fa81cYoGlMtNioQYu5oNRW2a2PbWEaa +ZEAg7Nires2zSxsXZDZXee8OhHeVJN32IW1ctHbZn8cfCOPRv44Wzmpj0d4h +0XMXAkBM4PG4B0kH4RRlc4KOPxxR0+x566mDlo8rNz287wvBP0mLzl46KHlN +ZjD1vC+crOUgTfjoYNwLhx+pAb6QuK/DnjdAB32dAyaGKL5wNya02yhMB1tP +69Aq6n1guK+mqzRZB8cG9wzRP3mD3fmdnVce66Ab+8clcaoXMCY83tnzUNBO +0aVDc4MniFVtz6leTcG1HZ+t7wp5wsRZlQBZfgrGWzyf3PzHAzLlp1Z/EqJg +bfQDy/A2D/hrE24cIEXBDzkXtsxEeMDTqpSSOA0KsqREr7h3uYNhQs3FUlsK +GhYu7PmS4QbbFCV28eVQ8NSarXeL9rhA2ff/5D1yKWg0HSTRZ+QCio+PzVfm +UXCVLnuLmKYLrDRrueVVQMHpH6eGKgRcoNY/7kddGQW3iDVU+tx0BoOq2bSw +FxT0ub0mczLDCSjWb4c/f6PgJXJ8WEWBI+SRIx8bTFKwufJjPOu8I4h+Uku6 +Mk3B+g0czi3+jjB7PF7HeJ6CY6k/1thoO0LJTYjPXKYgvV+enF+zHzS+PFS3 +FdLFsshVZ1y7HGBD1LnQWl1d9Khg/bgiaw/V+ndWmdN0cce54fxsdnuw/Pk0 +tYOui9sO8y03fdoHoUfmHowZ6mLh3hT1kAf7oNHRZYjfXBdlDeQaVPX3gReV +YrbfRRfnDViTfw7shXs/hsiz8bp4oDu1JKXcFgwKl+5GJOpizNuIaPlbttDm +LU7hStbF+5T5oVextrA4aG5JuqSLPO1pv/z32IJZy+MYvKmLxxb1535M2sB4 +wfnvScW6OBx8rr9F3QZUPKlPlXp0Mby9JNWk2houKFgsnunTRSWhfVyh+dYw ++8FNZ3hAFw3sg9VqUq2hxiGpIHNEF6+rfzCM97YGa8sPaeLfdXHW6UCRoIQ1 +nNCPDeBh00O/8pjQ8VAraBR8K/9dSQ9tZdNH6TssQb3lk+PODXp4xNBLf4Ri +CalJi2n3VPTQ0sdC8YaiJThyKfIf1NDDqdeswG1sljC5FLI4oKeHFziyA8cC +doPYmFR76049XE+RE/XeZwGeNV4xZYF6OND1hCfP0Bwm/MaPbwvSw1q54tN3 +ZcwhVPqw7/sQPUL/hWvafu+Ecyf9rRfC9fCJ6mj1NdZOKKKFyNHj9DCQ0yvo +p/pOWGKdqa7LIOq/DWx+tc4MUh9lzrbV6WG28YrAHhVTkHKWG3NvIOJbR/hD +15jCHf6c3tlGPSxsLKLrTWyHcr87tWLNeti7WuWpbMl26Fd9cNGhi3h+wSf/ +rP522HC3Qm34mx4yneDGTRsTeJr1zmNalIqJiaamS5lbYdBc3jlEgoo3lzhE +lGO3AtsvP/vfJCoas+sY+fluBSMrLotVckT8mq+We/S2QsMKmq6kChUbgk/y +hLcbw2u3WzyGBlTUPC9RJ7vWGHoUfQovHqRi9fP1v39lGMLvVtZdUW8qHiri +lr4WYwhSERy3M3ypaCS6Q8n6iCEc6LiRlhtAxT+UfZGCRoYwGNsSVR5GRb+f +V8NrxxE+j2rvGUym4qcPX7++R4TZu8s/NR5TsTt9sGjLXwaM2plkJVRQESBs +XrqHAV0rz5uOVFHxh6dZ3xYWA6pcSNeuPqNiy7dTEy1HGHBaQof25yUV79Vl +/hkcooNAvM/Jpj4qKvP7PtJp0Qe1Qx1snuw0ZKgfHMv7jwoyolL3albS0HdP +WrdBHhUE6tysJLhoePx82btfcVSYkZnKfrWahkHPmQe6TKlQ+Z7XWFOUhm0r +aLNazXpgaoKxy+tpmP200XH7B11wVyrgydhFw4FOY8q8JAXC/nPyUbYk8jUW +tLst6cBFT6FXJdY0vN+xqX5mQAeq75xIerWXhi7jtOXoXB0QUTZd+8eVht/0 +j53buUUHGpQ/ibiE0LDn6XJHgJU2qGyQlVO+RcNzNeEFi/c1ARvbokqyif4s +EzXzUzTBzituyCCXhncVFPceC9WEM3e/5+y9R8PDKj5fvU00oW9DtVJCKQ1r +fix6vR7ZAskb7VW/vaBh542XvqaKW2Ba5RKlZIqGfy/s6nUN0YCu17hNeIaG +zpdT+n7v0oBnRyb2BM0R9VjTzP+UNCC5ZEcgZZGGn4d/K451bAIVGtuDSg59 +jFhQ9XHT2wRuO/zk68T0Mer52y42TnV4d2j7mnd0fczQKx64WKsCVTxzJB3Q +x4LWyqMNt1QgpyBn41VDfQzijOxQilCBgMk/JvtM9DEpKdPKVU8F+I6XRfft +1kebq26UhqKNYBIn//Ojmz7+cF98I3dvA5Tn/h6ai9dHkfJN6eMsZaAYB/00 +S9THQUsZvH5NGZhD39ZkndfH+IfPJo6cVIYSmQFds1R9zHQzaDxlpAwP0p+d +z7yuj58lO83prUqQlRRL3V6oj7/oN8T4fyhCQtDalPR2fWzuGrq11mIdcAvH +533v0McXHFpKPdrrIK6YrdqoSx9nW69r15HXQczE9Oi3Pn3kCP7hM/VFAU55 +vaMbjurjJdPI86VnFeCo47WxLwv6mH+g+e3TRnlw2LoO9WXoyOQT4xVwkYM/ +77j56+ToeNRE/2qaqRxkeU70mq2j4wy9391gixyMxlUcd9hAx45We9Uv7HJw +9OXuRyc0iXj6y8tOu2XhnMVJmXITOlbPhSRWfpeGyn0dS9r+dAwu2r893pYM +B75UNlUH0lE9d59UjzoZ2MKy0rcG0dFIRzzOlZMMJtd9tW1O0PE6ZxefQDkJ +2vpXHD52ho6qthrlH6VJMO62qbc4jY7sNs1FWjMSQPY7W7HpGR2lftWbFtWK +QfLyQZ3EWjo2fYLkoNtiwJ5qUvy5no61w0+ZLjFiMM5adS/rJR3bBbwnHpmI +QSVbTLpQOx3V/jMYV3wjCg6Xo47Pf6KjLzvXSxwSgfSqEzo1qxlYMgGPuZSE +YY2FfTGJn4FanHJRAbzCEDWop35cgIG1S63ZvyeFwGvVguJmUQbWN3uahVYJ +ge7uEJEcGQau3KXI5LQRgvfDR2ditzCQtzA11yZREER5Dxfv2svAhd2NarcF +BSDXOCJsyp6BfldsL76fWguaEcnGlxwZeFRYD4tq1oLFVFFHlysD4+wiTxjs +Xwtx7+d+uR9m4Guv2/5VafywkBNpFBbNwPVq3f1D0nzQo3+pPa+AgUzXx3Rz +R17wCs69saOQgXVv3ty20uSF+UKm57ciol/pI+2XuXlBSKHrJ+FzqCETrtXO +5IGd3NJST54x8BPzQJayMA9Uv8vzaO9gYDzNq32giwvM+MvVQ7oY2BqrrnOt +hAu6tr+cl+glzifVrJqUxAWzlV/jnQYZmHmuIZ1kyAXq2ZsffhlnYKxcXEvr +A06o7jEMSfrOQJVJK63t8ZxgJrIHNKYY6PDDs3zGnRMOng1+GzRH3Iff9Mx3 +MifMPovLEF9g4MUBeSH9hVVwejHNvXKRgdcqVss/ebcKBLTvqR34w0A7l4iO +Y8WrINOvcm55mYE3zO98dEpeBf8DlYrdaA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.08884675710956705}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10578,19 +12301,19 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.08884675710956705}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10604,116 +12327,169 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwVl3k4lG0UxkXZiuzLjD1UlpRlmDHjHJQkCaFIdmVJKCQSChEpWkglJCol +20y2VPgkFSLZZSlJZcmSpHxvf831u67znnOe59znfueVd/O39mRnY2O7vYKN +7d/v/MDLesXEXIMmh2V5I4q5wbtMiROGXadBUvzVFNfQRkDRFjeJrlSAaPqn +pkEqhFje7+ToyoGPd1Zo3RjcAYIT4qm/OkvgpFXbhq2D9vCh2sJ/trMWDm4Z +PyT6wRtMFMf7pzvb4N7R5fRjPSfgV6fulanOYdiSnz7L1pgAdcb5uW9zZuC3 +U/a2C/EZIPWhYtRN7Q94Mf42edjcBpHDzve5jDlQ2PX5mT29dyF1i0mVhS03 ++veqFNGMCkGj1347w4sbg/lDvgvbFsLrGL921XBuVJF+Ozd8qBA4uy5/5c7m +xt7YWWu384UQfmqEXPeNG8v9hwo/dRaCx6uok7oxPBj8qyZy0ecRUDyrGHKl +vNiROKJ4c2sRdKdvfjYtwIc9IPg3wboYMtoL1oYo8eFBs6dUs/3F4MC/3nmR +yocRnE3NHB7F0HdG+i+7Ox9auyb+dgsuhsEjvHQRJh+uDqiTeZtWDGNbPz6m +2POjyKJiqk9vMSxMpT0Kz16L3knbGGcOlECFqvDyMnMtaqwM9PTxLIGwg8kW +MU1r8aVdw20zvxJY6o35njSzFldo5++fP1kCUSPloi0KAmhwAuIWr5dATPOd +PYNBAtjR3bO1rKsEEnMjW9glBfHm1hrasHkpmGl7C4muE0Qt34s6jXtKgbve +2na9uiA+mrC1y3cohZgRpd6dhoI4Oj+00sqrFE4qvB697C2IY2smZ63OlMKR +LIm/ypWC2JaRpMRTXgpWN4rVdu4XwoaSiGfbpMpAQO26/wFPITRZj4ctFMqg +uSqmxN9fCMvvN8tYbigDs969epfPCOG1HSFXDLTLwIj017i/QAjXq/YyX+ws +A+10s/3+S0I4N2Gne+5EGYhfHkm4dFMY+1j46HVLGUioMmMW8oSxzvJR2o13 +ZUCqjYs8UCSMb5ISXA92l4HM1Mbg9XXCGPvlRfrn4TJQMg9wqRoTxoTnK1Ky +5spAa+UfyoiWCOo6liV/k2TC7iCxj5pNIuj+2fvctwNMsFw9NpDWLoL8x0Yi +FlyZYJ1T0b3UJ4JJfcnWfz2ZYNfq2NIwKYIGW3Wyfvox4YDa7UoHUVHkzAxu +y4pggu9HjZTTLqK4jlz18s11Jpy12WHQNi+K7golFpfbmUAqayaxrxDDepcT +19d1MqFQ2ObnltVi+OfmurqCHia8b3MqSpEVQ0pP5528ISYoWgUpWJmKoUhi +ymuTSSbU7rrF2XpNDCX4FM228LDA7qHiyPJtMaSL7si0WMOC8TX3n2oUiuG7 +hf5uj7UsEHxdFnqhVgz1NJZ4T4qywMWsadziqxg+ptr728qz4I/JXPMbujju +Dl+UYeqy4GJeWMEfE3Gcur/g5EpjgSInW7y6lTg677l1lZPBAvP/eA3Pe4pj +w2TgtL4RCzKM5UrNk8Wxv+O/YGtzFujhzrRXH8RRo/vUSw1nFry+1Xrs9xdx +bKOVCR92Jeov21qqzoojB4+9d7Y7C87WuPAkckvgkrwj/echFrynh4SbbZHA +++Lz+bsDWHCMmu388rQE8gVzvS+LZIFZFv/sziQJ7FxnzusRzQIFrpPxzVck +sE9l1IjvDAta39kVt9+VwOv3NjfsimPBpoA1HAPNEmg1t516NokFqzpPpLl0 +EfkcLMo4k1nQx/isOjIkgccvixtEXWBB4upam7FZCRSk7zvjmsqCsbzjeT9I +kiitMLLYl8aCp3yfaMGKkij+DITUr7HgapB1y091SUxa9DY+nsGCbUbqC0so +iR/zexZ+3WBBTv/wDq5DkshTktFVns2CE1stBxICJLGY/Hy0O4cFlgVPjq4J +k8SEBXvS3G0WLIemXxc8L4l7I4Z/SuaxwFHE4ju5VBKPLb9hSd9ngVZ4VXRm +tSR+qJ8nCRSwgHd4g5h8gySOXX1TtERwxSMOUO6WxHbtluP1D4l5igW23x2W +xBt5ig9uFbLAK2LgkOo3Ip9fhETwIxaI7ay4uHlZEvkd82/xF7Pge7GyUik3 +CY84M5+0EVwvcblCR4iEt3yRlFJCzGP0yDBNiYTesi5XlkqJ+45W1N62k4QV +D7bWJrNYkD+W0vjChoTpI/fYlR6z4NTuZUczJxIGCXxNZhKsLt0TuzuQhObV +PSn/lbNgZcx2UlsYCQ95/169rYKYx3hZoU0MCbd59nXVEHyu/EKnfRoJhc72 +BmZXssBV9o9vXxYJxTdHGPJWEXqL82Fzvk/CHJVRHz+CBb53Xh4qJeHBy/2T +TQR/3rNto8cTEn54oNamUM2CmsqSJ6MNJHRozxQOJviqvJy1dysJxWJXsJ4T +7Bd/fvRrNwlv7les4n7Cgq2Ti2FHRkjYz9utaEbwCdPLKs+/kXCqIqEjhuDC +bPUe4XkSSppqK1cSPLLYkHBwmYTWu69IjBMsYeNCreAmo6ONb6FIDQt2Pfw1 +tlqIjHfrQ75QCT7NeSndiUzG5dkTr+wJfuysZlqsSMZ3slS7IIK/lf/3k2MT +GZ3cwxITCJYXcs630yWj0rNVftcItvNdsLuHZDQWv7N0m+DE+hTOpR1kLNmg +SL9H8DNpVZbFHjKmpliq/+O5kHrPbEcy5jb9evsvXqX1gOisJxmdladV/+Vz +2viz3sSfjIdaeBj/6l06fTHoWigZuxskuP7109i7UfFbNBmTh2cT//W7pF3X +bpBIxgOvQt78O8+WZMczKZfJmPg79M2/8x78PKf58SYZv1d3nv93H9fxwjAl +n4x26wMFqghuvbYhNaGIjLUySnvjCF4189ywr4KMFVYd7uYE08z3T2+qI+Ml +XU89PoL978xmRb8mYyl/5ftGYl65f89bvusg43BPJUYSzF/87NGJMTK+3eIZ +2UfM35jXwfn1NBl3Xfi09wzBoe4z/LK/iX7OPOVQInhYVPlIPZ8UqrEZ9u8j +9CXu/1RaXFwKrfAN/1dCf+aN+954y0mhYuxJcijBrLBEtbVaUujlLdd8mtDv +13bFPle6FIb6c4WyESynXpNYtk0KfxnPrzxB6P3ch6lx+31SaFA23OJA7MdT +vXMZD1ylsF1tULCeyYLZlHVmyz5SOLLxk8EGgp222t3LjZDCFw/E3YaI/dK8 +V3VoMkcKN2UtrBIn9vEQu6240QMp/OnB1r23iAU39k80XGZK4RFpp/xLxD5z +8ssr0xqlkNfS1WCJ2P+eo3EfY75L4c7+xgsphH9E061cSXrSyMnYndZM+I+p +U+YPXSNpDBjZOXKX8Cf+qK9nbM2lsVl78khEFpG/Ljbvoos0ZvyhWopmsqDc +rPIrZwLBfnXxbIT/Te1bFzLTLY1qxrbbX5wn9BsWwCX4URopGa/7TQi/PXXj +SfqmCWm8qSg89OwcC9YM7q3yZpdB0Znr1NyzLFh/KIltUEUGs1eOndlA+LlT +8Ny51+EyyDfyik/lGAuU0oykxmNl8I/4oxarwH/7cOEh10UZ3ChyRD3InwVh +SxtbjXJlsDIqqvGuLwuunHESrXgtgxG8Tm/fEu+X1ykvbt2RlsWHtPz3SnsI +PRVeKzv1VBaNHiSaflUn9ruz+c9Eoyxe0Y50TFNlgQXbyu3ObbI4s+aLCGxk +gbv1kW74JIsDyZER0YosMAmXj4xaJYcuLhdD2kgsCJCdv22oKoeZT3ZZ53MS +fnno1ve6EDmc5s/S1Ohlwo4lqtDJcDlc0ao/YdPFhOaL7yjaUXKoWiVzO6SD +Cd0VPFG5CXI4l5fMUdjChInVQUKxN+RwV57Q1291TJAoMtU1qZXDOyUrHz8s +YMLhhemoRj55rGVeCrMIZQIt8KDYqJA8Ngwfby0KYgL3eE8Bh4Q8xh+ebeMP +ZMKd3rr3BgryOLht8usTbyYM1FxRY1Lkca9PztsxB+L/Tyy1K9tZHqGWPSmI +zgRNoWiN8GJ5DOrfNXByqQx+qQoMqNsq4J5bWQ/IgWUwf5MUreWggKfAnvP6 +4TKYXaukSHVWwJe5v4XFvcpgYobqs9VbAd9t69i3yrkMhqvc5x0iFDDhbt2X +SvMyaNr5mD/+jgI+vDaocX59GWT4OsHwnAKGckjEjfaUAr3gQdbVq+vwffjh +AnVqKUwLmbnY1Sri7Sm7F3d+FMPHJBe7o1zKOFpisC8kpAh2TB7f8YmyHplF +ZAW/NYXwzZ37WFnkBjxu9tAr8fN94vtDnP1s7UYUCK1fM9WfD0JvlJOLJlXw +ILXQ0VjhDkjFP7KkUNQQD8dZbrLJgXRVqoDwIXXk62mOimm8BU0kQ52ZlE3o +4TcduN79OtCkai9qvNfAhUbfzKdCacDPkRPkenozWvsc80wOvwQy0bJ0e+Ut +KPeQIb957UXgUXJkWb/Ygqft1370sTgHmxiSj44f0MSYiktyQXdioXSd9292 +F018urc9qiE1FvR4K7Ynu2niw13i15SiYsGoc99g7iFNFNQo6+fZHwt2gemC +bYGa+EGBW9VHMBYi74gHqcVpYu3BEb/YqBho5ROjDhVqIvWm0Ay71xk4OiBU +Z8amhZ3Y1fTTIRoaGxyf3GfXQjbzBXYH82iQeZT3mHeVFu6XN9NoYERDUyTt +QROPFrKPye+plosGBXm3K2bCWnjDrGuX7OcoeOtefMhMWQttE0yhOjgKNn/Z +vcbMXAt7n0dPH9SOhMmZJNsd6VpI3j7QZvQ3HPq6su1uZmjhk3tcw7qj4dD0 +hLV3+gaRn8fwJ6M5HHLPDtpfy9bCewUsoYjMcHAgazt9ua+FenaRSg0QDv8Z +9R5MeKKFmxf4wk7GhsH1lI2hL4cJDrsyBdInYLtGQ8YOdW2kXem9ZXMyBPZx +mtq0amhju0edydWDIeDT/5Jvr6Y2vj53KumLZQgkJ76J8tDVRodAtlf1SiHw +/vO7g5GG2njjYvIP89Zg8Mga0WTaaiO35pWPGRuC4bTgildyp7Tx0OWXpz59 +OgY1M/q/fzZr44W1e0f/XAyE7NeP3fa81cYoGlMtNioQYu5oNRW2a2PbWEaa +ZEAg7Nires2zSxsXZDZXee8OhHeVJN32IW1ctHbZn8cfCOPRv44Wzmpj0d4h +0XMXAkBM4PG4B0kH4RRlc4KOPxxR0+x566mDlo8rNz287wvBP0mLzl46KHlN +ZjD1vC+crOUgTfjoYNwLhx+pAb6QuK/DnjdAB32dAyaGKL5wNya02yhMB1tP +69Aq6n1guK+mqzRZB8cG9wzRP3mD3fmdnVce66Ab+8clcaoXMCY83tnzUNBO +0aVDc4MniFVtz6leTcG1HZ+t7wp5wsRZlQBZfgrGWzyf3PzHAzLlp1Z/EqJg +bfQDy/A2D/hrE24cIEXBDzkXtsxEeMDTqpSSOA0KsqREr7h3uYNhQs3FUlsK +GhYu7PmS4QbbFCV28eVQ8NSarXeL9rhA2ff/5D1yKWg0HSTRZ+QCio+PzVfm +UXCVLnuLmKYLrDRrueVVQMHpH6eGKgRcoNY/7kddGQW3iDVU+tx0BoOq2bSw +FxT0ub0mczLDCSjWb4c/f6PgJXJ8WEWBI+SRIx8bTFKwufJjPOu8I4h+Uku6 +Mk3B+g0czi3+jjB7PF7HeJ6CY6k/1thoO0LJTYjPXKYgvV+enF+zHzS+PFS3 +FdLFsshVZ1y7HGBD1LnQWl1d9Khg/bgiaw/V+ndWmdN0cce54fxsdnuw/Pk0 +tYOui9sO8y03fdoHoUfmHowZ6mLh3hT1kAf7oNHRZYjfXBdlDeQaVPX3gReV +YrbfRRfnDViTfw7shXs/hsiz8bp4oDu1JKXcFgwKl+5GJOpizNuIaPlbttDm +LU7hStbF+5T5oVextrA4aG5JuqSLPO1pv/z32IJZy+MYvKmLxxb1535M2sB4 +wfnvScW6OBx8rr9F3QZUPKlPlXp0Mby9JNWk2houKFgsnunTRSWhfVyh+dYw ++8FNZ3hAFw3sg9VqUq2hxiGpIHNEF6+rfzCM97YGa8sPaeLfdXHW6UCRoIQ1 +nNCPDeBh00O/8pjQ8VAraBR8K/9dSQ9tZdNH6TssQb3lk+PODXp4xNBLf4Ri +CalJi2n3VPTQ0sdC8YaiJThyKfIf1NDDqdeswG1sljC5FLI4oKeHFziyA8cC +doPYmFR76049XE+RE/XeZwGeNV4xZYF6OND1hCfP0Bwm/MaPbwvSw1q54tN3 +ZcwhVPqw7/sQPUL/hWvafu+Ecyf9rRfC9fCJ6mj1NdZOKKKFyNHj9DCQ0yvo +p/pOWGKdqa7LIOq/DWx+tc4MUh9lzrbV6WG28YrAHhVTkHKWG3NvIOJbR/hD +15jCHf6c3tlGPSxsLKLrTWyHcr87tWLNeti7WuWpbMl26Fd9cNGhi3h+wSf/ +rP522HC3Qm34mx4yneDGTRsTeJr1zmNalIqJiaamS5lbYdBc3jlEgoo3lzhE +lGO3AtsvP/vfJCoas+sY+fluBSMrLotVckT8mq+We/S2QsMKmq6kChUbgk/y +hLcbw2u3WzyGBlTUPC9RJ7vWGHoUfQovHqRi9fP1v39lGMLvVtZdUW8qHiri +lr4WYwhSERy3M3ypaCS6Q8n6iCEc6LiRlhtAxT+UfZGCRoYwGNsSVR5GRb+f +V8NrxxE+j2rvGUym4qcPX7++R4TZu8s/NR5TsTt9sGjLXwaM2plkJVRQESBs +XrqHAV0rz5uOVFHxh6dZ3xYWA6pcSNeuPqNiy7dTEy1HGHBaQof25yUV79Vl +/hkcooNAvM/Jpj4qKvP7PtJp0Qe1Qx1snuw0ZKgfHMv7jwoyolL3albS0HdP +WrdBHhUE6tysJLhoePx82btfcVSYkZnKfrWahkHPmQe6TKlQ+Z7XWFOUhm0r +aLNazXpgaoKxy+tpmP200XH7B11wVyrgydhFw4FOY8q8JAXC/nPyUbYk8jUW +tLst6cBFT6FXJdY0vN+xqX5mQAeq75xIerWXhi7jtOXoXB0QUTZd+8eVht/0 +j53buUUHGpQ/ibiE0LDn6XJHgJU2qGyQlVO+RcNzNeEFi/c1ARvbokqyif4s +EzXzUzTBzituyCCXhncVFPceC9WEM3e/5+y9R8PDKj5fvU00oW9DtVJCKQ1r +fix6vR7ZAskb7VW/vaBh542XvqaKW2Ba5RKlZIqGfy/s6nUN0YCu17hNeIaG +zpdT+n7v0oBnRyb2BM0R9VjTzP+UNCC5ZEcgZZGGn4d/K451bAIVGtuDSg59 +jFhQ9XHT2wRuO/zk68T0Mer52y42TnV4d2j7mnd0fczQKx64WKsCVTxzJB3Q +x4LWyqMNt1QgpyBn41VDfQzijOxQilCBgMk/JvtM9DEpKdPKVU8F+I6XRfft +1kebq26UhqKNYBIn//Ojmz7+cF98I3dvA5Tn/h6ai9dHkfJN6eMsZaAYB/00 +S9THQUsZvH5NGZhD39ZkndfH+IfPJo6cVIYSmQFds1R9zHQzaDxlpAwP0p+d +z7yuj58lO83prUqQlRRL3V6oj7/oN8T4fyhCQtDalPR2fWzuGrq11mIdcAvH +533v0McXHFpKPdrrIK6YrdqoSx9nW69r15HXQczE9Oi3Pn3kCP7hM/VFAU55 +vaMbjurjJdPI86VnFeCo47WxLwv6mH+g+e3TRnlw2LoO9WXoyOQT4xVwkYM/ +77j56+ToeNRE/2qaqRxkeU70mq2j4wy9391gixyMxlUcd9hAx45We9Uv7HJw +9OXuRyc0iXj6y8tOu2XhnMVJmXITOlbPhSRWfpeGyn0dS9r+dAwu2r893pYM +B75UNlUH0lE9d59UjzoZ2MKy0rcG0dFIRzzOlZMMJtd9tW1O0PE6ZxefQDkJ +2vpXHD52ho6qthrlH6VJMO62qbc4jY7sNs1FWjMSQPY7W7HpGR2lftWbFtWK +QfLyQZ3EWjo2fYLkoNtiwJ5qUvy5no61w0+ZLjFiMM5adS/rJR3bBbwnHpmI +QSVbTLpQOx3V/jMYV3wjCg6Xo47Pf6KjLzvXSxwSgfSqEzo1qxlYMgGPuZSE +YY2FfTGJn4FanHJRAbzCEDWop35cgIG1S63ZvyeFwGvVguJmUQbWN3uahVYJ +ge7uEJEcGQau3KXI5LQRgvfDR2ditzCQtzA11yZREER5Dxfv2svAhd2NarcF +BSDXOCJsyp6BfldsL76fWguaEcnGlxwZeFRYD4tq1oLFVFFHlysD4+wiTxjs +Xwtx7+d+uR9m4Guv2/5VafywkBNpFBbNwPVq3f1D0nzQo3+pPa+AgUzXx3Rz +R17wCs69saOQgXVv3ty20uSF+UKm57ciol/pI+2XuXlBSKHrJ+FzqCETrtXO +5IGd3NJST54x8BPzQJayMA9Uv8vzaO9gYDzNq32giwvM+MvVQ7oY2BqrrnOt +hAu6tr+cl+glzifVrJqUxAWzlV/jnQYZmHmuIZ1kyAXq2ZsffhlnYKxcXEvr +A06o7jEMSfrOQJVJK63t8ZxgJrIHNKYY6PDDs3zGnRMOng1+GzRH3Iff9Mx3 +MifMPovLEF9g4MUBeSH9hVVwejHNvXKRgdcqVss/ebcKBLTvqR34w0A7l4iO +Y8WrINOvcm55mYE3zO98dEpeBf8DlYrdaA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.08884675710956705}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10724,6 +12500,7 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10751,7 +12528,8 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.13473082946272152`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08884675710956705}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10759,22 +12537,736 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991324915847246*^9}, + CellChangeTimes->{3.991324915847246*^9, 3.9938318161332684`*^9}, CellLabel-> - "Out[112]=",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] + "Out[128]=",ExpressionUUID->"f62a0ad3-9d64-4a82-834d-27fb04c44a49"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{3.991799816909994*^9, 3.9918001103050213`*^9, - 3.991924419552084*^9},ExpressionUUID->"c5eb8b00-da53-e74c-9781-\ -4f98a6653ef7"], + 3.991924419552084*^9}, + CellLabel-> + "In[129]:=",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799819852022*^9, - 3.9917998213158054`*^9}},ExpressionUUID->"05df483d-64d7-9449-845e-\ -6e6b94590d4b"], + CellChangeTimes->{{3.991799819852022*^9, 3.9917998213158054`*^9}}, + CellLabel-> + "In[130]:=",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k4lG0UxkXZiuzLjD1UlpRlmDHjHJQkCaFIdmVJKCQSChEpWkglJCol +20y2VPgkFSLZZSlJZcmSpHxvf831u67znnOe59znfueVd/O39mRnY2O7vYKN +7d/v/MDLesXEXIMmh2V5I4q5wbtMiROGXadBUvzVFNfQRkDRFjeJrlSAaPqn +pkEqhFje7+ToyoGPd1Zo3RjcAYIT4qm/OkvgpFXbhq2D9vCh2sJ/trMWDm4Z +PyT6wRtMFMf7pzvb4N7R5fRjPSfgV6fulanOYdiSnz7L1pgAdcb5uW9zZuC3 +U/a2C/EZIPWhYtRN7Q94Mf42edjcBpHDzve5jDlQ2PX5mT29dyF1i0mVhS03 ++veqFNGMCkGj1347w4sbg/lDvgvbFsLrGL921XBuVJF+Ozd8qBA4uy5/5c7m +xt7YWWu384UQfmqEXPeNG8v9hwo/dRaCx6uok7oxPBj8qyZy0ecRUDyrGHKl +vNiROKJ4c2sRdKdvfjYtwIc9IPg3wboYMtoL1oYo8eFBs6dUs/3F4MC/3nmR +yocRnE3NHB7F0HdG+i+7Ox9auyb+dgsuhsEjvHQRJh+uDqiTeZtWDGNbPz6m +2POjyKJiqk9vMSxMpT0Kz16L3knbGGcOlECFqvDyMnMtaqwM9PTxLIGwg8kW +MU1r8aVdw20zvxJY6o35njSzFldo5++fP1kCUSPloi0KAmhwAuIWr5dATPOd +PYNBAtjR3bO1rKsEEnMjW9glBfHm1hrasHkpmGl7C4muE0Qt34s6jXtKgbve +2na9uiA+mrC1y3cohZgRpd6dhoI4Oj+00sqrFE4qvB697C2IY2smZ63OlMKR +LIm/ypWC2JaRpMRTXgpWN4rVdu4XwoaSiGfbpMpAQO26/wFPITRZj4ctFMqg +uSqmxN9fCMvvN8tYbigDs969epfPCOG1HSFXDLTLwIj017i/QAjXq/YyX+ws +A+10s/3+S0I4N2Gne+5EGYhfHkm4dFMY+1j46HVLGUioMmMW8oSxzvJR2o13 +ZUCqjYs8UCSMb5ISXA92l4HM1Mbg9XXCGPvlRfrn4TJQMg9wqRoTxoTnK1Ky +5spAa+UfyoiWCOo6liV/k2TC7iCxj5pNIuj+2fvctwNMsFw9NpDWLoL8x0Yi +FlyZYJ1T0b3UJ4JJfcnWfz2ZYNfq2NIwKYIGW3Wyfvox4YDa7UoHUVHkzAxu +y4pggu9HjZTTLqK4jlz18s11Jpy12WHQNi+K7golFpfbmUAqayaxrxDDepcT +19d1MqFQ2ObnltVi+OfmurqCHia8b3MqSpEVQ0pP5528ISYoWgUpWJmKoUhi +ymuTSSbU7rrF2XpNDCX4FM228LDA7qHiyPJtMaSL7si0WMOC8TX3n2oUiuG7 +hf5uj7UsEHxdFnqhVgz1NJZ4T4qywMWsadziqxg+ptr728qz4I/JXPMbujju +Dl+UYeqy4GJeWMEfE3Gcur/g5EpjgSInW7y6lTg677l1lZPBAvP/eA3Pe4pj +w2TgtL4RCzKM5UrNk8Wxv+O/YGtzFujhzrRXH8RRo/vUSw1nFry+1Xrs9xdx +bKOVCR92Jeov21qqzoojB4+9d7Y7C87WuPAkckvgkrwj/echFrynh4SbbZHA +++Lz+bsDWHCMmu388rQE8gVzvS+LZIFZFv/sziQJ7FxnzusRzQIFrpPxzVck +sE9l1IjvDAta39kVt9+VwOv3NjfsimPBpoA1HAPNEmg1t516NokFqzpPpLl0 +EfkcLMo4k1nQx/isOjIkgccvixtEXWBB4upam7FZCRSk7zvjmsqCsbzjeT9I +kiitMLLYl8aCp3yfaMGKkij+DITUr7HgapB1y091SUxa9DY+nsGCbUbqC0so +iR/zexZ+3WBBTv/wDq5DkshTktFVns2CE1stBxICJLGY/Hy0O4cFlgVPjq4J +k8SEBXvS3G0WLIemXxc8L4l7I4Z/SuaxwFHE4ju5VBKPLb9hSd9ngVZ4VXRm +tSR+qJ8nCRSwgHd4g5h8gySOXX1TtERwxSMOUO6WxHbtluP1D4l5igW23x2W +xBt5ig9uFbLAK2LgkOo3Ip9fhETwIxaI7ay4uHlZEvkd82/xF7Pge7GyUik3 +CY84M5+0EVwvcblCR4iEt3yRlFJCzGP0yDBNiYTesi5XlkqJ+45W1N62k4QV +D7bWJrNYkD+W0vjChoTpI/fYlR6z4NTuZUczJxIGCXxNZhKsLt0TuzuQhObV +PSn/lbNgZcx2UlsYCQ95/169rYKYx3hZoU0MCbd59nXVEHyu/EKnfRoJhc72 +BmZXssBV9o9vXxYJxTdHGPJWEXqL82Fzvk/CHJVRHz+CBb53Xh4qJeHBy/2T +TQR/3rNto8cTEn54oNamUM2CmsqSJ6MNJHRozxQOJviqvJy1dysJxWJXsJ4T +7Bd/fvRrNwlv7les4n7Cgq2Ti2FHRkjYz9utaEbwCdPLKs+/kXCqIqEjhuDC +bPUe4XkSSppqK1cSPLLYkHBwmYTWu69IjBMsYeNCreAmo6ONb6FIDQt2Pfw1 +tlqIjHfrQ75QCT7NeSndiUzG5dkTr+wJfuysZlqsSMZ3slS7IIK/lf/3k2MT +GZ3cwxITCJYXcs630yWj0rNVftcItvNdsLuHZDQWv7N0m+DE+hTOpR1kLNmg +SL9H8DNpVZbFHjKmpliq/+O5kHrPbEcy5jb9evsvXqX1gOisJxmdladV/+Vz +2viz3sSfjIdaeBj/6l06fTHoWigZuxskuP7109i7UfFbNBmTh2cT//W7pF3X +bpBIxgOvQt78O8+WZMczKZfJmPg79M2/8x78PKf58SYZv1d3nv93H9fxwjAl +n4x26wMFqghuvbYhNaGIjLUySnvjCF4189ywr4KMFVYd7uYE08z3T2+qI+Ml +XU89PoL978xmRb8mYyl/5ftGYl65f89bvusg43BPJUYSzF/87NGJMTK+3eIZ +2UfM35jXwfn1NBl3Xfi09wzBoe4z/LK/iX7OPOVQInhYVPlIPZ8UqrEZ9u8j +9CXu/1RaXFwKrfAN/1dCf+aN+954y0mhYuxJcijBrLBEtbVaUujlLdd8mtDv +13bFPle6FIb6c4WyESynXpNYtk0KfxnPrzxB6P3ch6lx+31SaFA23OJA7MdT +vXMZD1ylsF1tULCeyYLZlHVmyz5SOLLxk8EGgp222t3LjZDCFw/E3YaI/dK8 +V3VoMkcKN2UtrBIn9vEQu6240QMp/OnB1r23iAU39k80XGZK4RFpp/xLxD5z +8ssr0xqlkNfS1WCJ2P+eo3EfY75L4c7+xgsphH9E061cSXrSyMnYndZM+I+p +U+YPXSNpDBjZOXKX8Cf+qK9nbM2lsVl78khEFpG/Ljbvoos0ZvyhWopmsqDc +rPIrZwLBfnXxbIT/Te1bFzLTLY1qxrbbX5wn9BsWwCX4URopGa/7TQi/PXXj +SfqmCWm8qSg89OwcC9YM7q3yZpdB0Znr1NyzLFh/KIltUEUGs1eOndlA+LlT +8Ny51+EyyDfyik/lGAuU0oykxmNl8I/4oxarwH/7cOEh10UZ3ChyRD3InwVh +SxtbjXJlsDIqqvGuLwuunHESrXgtgxG8Tm/fEu+X1ykvbt2RlsWHtPz3SnsI +PRVeKzv1VBaNHiSaflUn9ruz+c9Eoyxe0Y50TFNlgQXbyu3ObbI4s+aLCGxk +gbv1kW74JIsDyZER0YosMAmXj4xaJYcuLhdD2kgsCJCdv22oKoeZT3ZZ53MS +fnno1ve6EDmc5s/S1Ohlwo4lqtDJcDlc0ao/YdPFhOaL7yjaUXKoWiVzO6SD +Cd0VPFG5CXI4l5fMUdjChInVQUKxN+RwV57Q1291TJAoMtU1qZXDOyUrHz8s +YMLhhemoRj55rGVeCrMIZQIt8KDYqJA8Ngwfby0KYgL3eE8Bh4Q8xh+ebeMP +ZMKd3rr3BgryOLht8usTbyYM1FxRY1Lkca9PztsxB+L/Tyy1K9tZHqGWPSmI +zgRNoWiN8GJ5DOrfNXByqQx+qQoMqNsq4J5bWQ/IgWUwf5MUreWggKfAnvP6 +4TKYXaukSHVWwJe5v4XFvcpgYobqs9VbAd9t69i3yrkMhqvc5x0iFDDhbt2X +SvMyaNr5mD/+jgI+vDaocX59GWT4OsHwnAKGckjEjfaUAr3gQdbVq+vwffjh +AnVqKUwLmbnY1Sri7Sm7F3d+FMPHJBe7o1zKOFpisC8kpAh2TB7f8YmyHplF +ZAW/NYXwzZ37WFnkBjxu9tAr8fN94vtDnP1s7UYUCK1fM9WfD0JvlJOLJlXw +ILXQ0VjhDkjFP7KkUNQQD8dZbrLJgXRVqoDwIXXk62mOimm8BU0kQ52ZlE3o +4TcduN79OtCkai9qvNfAhUbfzKdCacDPkRPkenozWvsc80wOvwQy0bJ0e+Ut +KPeQIb957UXgUXJkWb/Ygqft1370sTgHmxiSj44f0MSYiktyQXdioXSd9292 +F018urc9qiE1FvR4K7Ynu2niw13i15SiYsGoc99g7iFNFNQo6+fZHwt2gemC +bYGa+EGBW9VHMBYi74gHqcVpYu3BEb/YqBho5ROjDhVqIvWm0Ay71xk4OiBU +Z8amhZ3Y1fTTIRoaGxyf3GfXQjbzBXYH82iQeZT3mHeVFu6XN9NoYERDUyTt +QROPFrKPye+plosGBXm3K2bCWnjDrGuX7OcoeOtefMhMWQttE0yhOjgKNn/Z +vcbMXAt7n0dPH9SOhMmZJNsd6VpI3j7QZvQ3HPq6su1uZmjhk3tcw7qj4dD0 +hLV3+gaRn8fwJ6M5HHLPDtpfy9bCewUsoYjMcHAgazt9ua+FenaRSg0QDv8Z +9R5MeKKFmxf4wk7GhsH1lI2hL4cJDrsyBdInYLtGQ8YOdW2kXem9ZXMyBPZx +mtq0amhju0edydWDIeDT/5Jvr6Y2vj53KumLZQgkJ76J8tDVRodAtlf1SiHw +/vO7g5GG2njjYvIP89Zg8Mga0WTaaiO35pWPGRuC4bTgildyp7Tx0OWXpz59 +OgY1M/q/fzZr44W1e0f/XAyE7NeP3fa81cYoGlMtNioQYu5oNRW2a2PbWEaa +ZEAg7Nires2zSxsXZDZXee8OhHeVJN32IW1ctHbZn8cfCOPRv44Wzmpj0d4h +0XMXAkBM4PG4B0kH4RRlc4KOPxxR0+x566mDlo8rNz287wvBP0mLzl46KHlN +ZjD1vC+crOUgTfjoYNwLhx+pAb6QuK/DnjdAB32dAyaGKL5wNya02yhMB1tP +69Aq6n1guK+mqzRZB8cG9wzRP3mD3fmdnVce66Ab+8clcaoXMCY83tnzUNBO +0aVDc4MniFVtz6leTcG1HZ+t7wp5wsRZlQBZfgrGWzyf3PzHAzLlp1Z/EqJg +bfQDy/A2D/hrE24cIEXBDzkXtsxEeMDTqpSSOA0KsqREr7h3uYNhQs3FUlsK +GhYu7PmS4QbbFCV28eVQ8NSarXeL9rhA2ff/5D1yKWg0HSTRZ+QCio+PzVfm +UXCVLnuLmKYLrDRrueVVQMHpH6eGKgRcoNY/7kddGQW3iDVU+tx0BoOq2bSw +FxT0ub0mczLDCSjWb4c/f6PgJXJ8WEWBI+SRIx8bTFKwufJjPOu8I4h+Uku6 +Mk3B+g0czi3+jjB7PF7HeJ6CY6k/1thoO0LJTYjPXKYgvV+enF+zHzS+PFS3 +FdLFsshVZ1y7HGBD1LnQWl1d9Khg/bgiaw/V+ndWmdN0cce54fxsdnuw/Pk0 +tYOui9sO8y03fdoHoUfmHowZ6mLh3hT1kAf7oNHRZYjfXBdlDeQaVPX3gReV +YrbfRRfnDViTfw7shXs/hsiz8bp4oDu1JKXcFgwKl+5GJOpizNuIaPlbttDm +LU7hStbF+5T5oVextrA4aG5JuqSLPO1pv/z32IJZy+MYvKmLxxb1535M2sB4 +wfnvScW6OBx8rr9F3QZUPKlPlXp0Mby9JNWk2houKFgsnunTRSWhfVyh+dYw ++8FNZ3hAFw3sg9VqUq2hxiGpIHNEF6+rfzCM97YGa8sPaeLfdXHW6UCRoIQ1 +nNCPDeBh00O/8pjQ8VAraBR8K/9dSQ9tZdNH6TssQb3lk+PODXp4xNBLf4Ri +CalJi2n3VPTQ0sdC8YaiJThyKfIf1NDDqdeswG1sljC5FLI4oKeHFziyA8cC +doPYmFR76049XE+RE/XeZwGeNV4xZYF6OND1hCfP0Bwm/MaPbwvSw1q54tN3 +ZcwhVPqw7/sQPUL/hWvafu+Ecyf9rRfC9fCJ6mj1NdZOKKKFyNHj9DCQ0yvo +p/pOWGKdqa7LIOq/DWx+tc4MUh9lzrbV6WG28YrAHhVTkHKWG3NvIOJbR/hD +15jCHf6c3tlGPSxsLKLrTWyHcr87tWLNeti7WuWpbMl26Fd9cNGhi3h+wSf/ +rP522HC3Qm34mx4yneDGTRsTeJr1zmNalIqJiaamS5lbYdBc3jlEgoo3lzhE +lGO3AtsvP/vfJCoas+sY+fluBSMrLotVckT8mq+We/S2QsMKmq6kChUbgk/y +hLcbw2u3WzyGBlTUPC9RJ7vWGHoUfQovHqRi9fP1v39lGMLvVtZdUW8qHiri +lr4WYwhSERy3M3ypaCS6Q8n6iCEc6LiRlhtAxT+UfZGCRoYwGNsSVR5GRb+f +V8NrxxE+j2rvGUym4qcPX7++R4TZu8s/NR5TsTt9sGjLXwaM2plkJVRQESBs +XrqHAV0rz5uOVFHxh6dZ3xYWA6pcSNeuPqNiy7dTEy1HGHBaQof25yUV79Vl +/hkcooNAvM/Jpj4qKvP7PtJp0Qe1Qx1snuw0ZKgfHMv7jwoyolL3albS0HdP +WrdBHhUE6tysJLhoePx82btfcVSYkZnKfrWahkHPmQe6TKlQ+Z7XWFOUhm0r +aLNazXpgaoKxy+tpmP200XH7B11wVyrgydhFw4FOY8q8JAXC/nPyUbYk8jUW +tLst6cBFT6FXJdY0vN+xqX5mQAeq75xIerWXhi7jtOXoXB0QUTZd+8eVht/0 +j53buUUHGpQ/ibiE0LDn6XJHgJU2qGyQlVO+RcNzNeEFi/c1ARvbokqyif4s +EzXzUzTBzituyCCXhncVFPceC9WEM3e/5+y9R8PDKj5fvU00oW9DtVJCKQ1r +fix6vR7ZAskb7VW/vaBh542XvqaKW2Ba5RKlZIqGfy/s6nUN0YCu17hNeIaG +zpdT+n7v0oBnRyb2BM0R9VjTzP+UNCC5ZEcgZZGGn4d/K451bAIVGtuDSg59 +jFhQ9XHT2wRuO/zk68T0Mer52y42TnV4d2j7mnd0fczQKx64WKsCVTxzJB3Q +x4LWyqMNt1QgpyBn41VDfQzijOxQilCBgMk/JvtM9DEpKdPKVU8F+I6XRfft +1kebq26UhqKNYBIn//Ojmz7+cF98I3dvA5Tn/h6ai9dHkfJN6eMsZaAYB/00 +S9THQUsZvH5NGZhD39ZkndfH+IfPJo6cVIYSmQFds1R9zHQzaDxlpAwP0p+d +z7yuj58lO83prUqQlRRL3V6oj7/oN8T4fyhCQtDalPR2fWzuGrq11mIdcAvH +533v0McXHFpKPdrrIK6YrdqoSx9nW69r15HXQczE9Oi3Pn3kCP7hM/VFAU55 +vaMbjurjJdPI86VnFeCo47WxLwv6mH+g+e3TRnlw2LoO9WXoyOQT4xVwkYM/ +77j56+ToeNRE/2qaqRxkeU70mq2j4wy9391gixyMxlUcd9hAx45We9Uv7HJw +9OXuRyc0iXj6y8tOu2XhnMVJmXITOlbPhSRWfpeGyn0dS9r+dAwu2r893pYM +B75UNlUH0lE9d59UjzoZ2MKy0rcG0dFIRzzOlZMMJtd9tW1O0PE6ZxefQDkJ +2vpXHD52ho6qthrlH6VJMO62qbc4jY7sNs1FWjMSQPY7W7HpGR2lftWbFtWK +QfLyQZ3EWjo2fYLkoNtiwJ5qUvy5no61w0+ZLjFiMM5adS/rJR3bBbwnHpmI +QSVbTLpQOx3V/jMYV3wjCg6Xo47Pf6KjLzvXSxwSgfSqEzo1qxlYMgGPuZSE +YY2FfTGJn4FanHJRAbzCEDWop35cgIG1S63ZvyeFwGvVguJmUQbWN3uahVYJ +ge7uEJEcGQau3KXI5LQRgvfDR2ditzCQtzA11yZREER5Dxfv2svAhd2NarcF +BSDXOCJsyp6BfldsL76fWguaEcnGlxwZeFRYD4tq1oLFVFFHlysD4+wiTxjs +Xwtx7+d+uR9m4Guv2/5VafywkBNpFBbNwPVq3f1D0nzQo3+pPa+AgUzXx3Rz +R17wCs69saOQgXVv3ty20uSF+UKm57ciol/pI+2XuXlBSKHrJ+FzqCETrtXO +5IGd3NJST54x8BPzQJayMA9Uv8vzaO9gYDzNq32giwvM+MvVQ7oY2BqrrnOt +hAu6tr+cl+glzifVrJqUxAWzlV/jnQYZmHmuIZ1kyAXq2ZsffhlnYKxcXEvr +A06o7jEMSfrOQJVJK63t8ZxgJrIHNKYY6PDDs3zGnRMOng1+GzRH3Iff9Mx3 +MifMPovLEF9g4MUBeSH9hVVwejHNvXKRgdcqVss/ebcKBLTvqR34w0A7l4iO +Y8WrINOvcm55mYE3zO98dEpeBf8DlYrdaA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k4lG0UxkXZiuzLjD1UlpRlmDHjHJQkCaFIdmVJKCQSChEpWkglJCol +20y2VPgkFSLZZSlJZcmSpHxvf831u67znnOe59znfueVd/O39mRnY2O7vYKN +7d/v/MDLesXEXIMmh2V5I4q5wbtMiROGXadBUvzVFNfQRkDRFjeJrlSAaPqn +pkEqhFje7+ToyoGPd1Zo3RjcAYIT4qm/OkvgpFXbhq2D9vCh2sJ/trMWDm4Z +PyT6wRtMFMf7pzvb4N7R5fRjPSfgV6fulanOYdiSnz7L1pgAdcb5uW9zZuC3 +U/a2C/EZIPWhYtRN7Q94Mf42edjcBpHDzve5jDlQ2PX5mT29dyF1i0mVhS03 ++veqFNGMCkGj1347w4sbg/lDvgvbFsLrGL921XBuVJF+Ozd8qBA4uy5/5c7m +xt7YWWu384UQfmqEXPeNG8v9hwo/dRaCx6uok7oxPBj8qyZy0ecRUDyrGHKl +vNiROKJ4c2sRdKdvfjYtwIc9IPg3wboYMtoL1oYo8eFBs6dUs/3F4MC/3nmR +yocRnE3NHB7F0HdG+i+7Ox9auyb+dgsuhsEjvHQRJh+uDqiTeZtWDGNbPz6m +2POjyKJiqk9vMSxMpT0Kz16L3knbGGcOlECFqvDyMnMtaqwM9PTxLIGwg8kW +MU1r8aVdw20zvxJY6o35njSzFldo5++fP1kCUSPloi0KAmhwAuIWr5dATPOd +PYNBAtjR3bO1rKsEEnMjW9glBfHm1hrasHkpmGl7C4muE0Qt34s6jXtKgbve +2na9uiA+mrC1y3cohZgRpd6dhoI4Oj+00sqrFE4qvB697C2IY2smZ63OlMKR +LIm/ypWC2JaRpMRTXgpWN4rVdu4XwoaSiGfbpMpAQO26/wFPITRZj4ctFMqg +uSqmxN9fCMvvN8tYbigDs969epfPCOG1HSFXDLTLwIj017i/QAjXq/YyX+ws +A+10s/3+S0I4N2Gne+5EGYhfHkm4dFMY+1j46HVLGUioMmMW8oSxzvJR2o13 +ZUCqjYs8UCSMb5ISXA92l4HM1Mbg9XXCGPvlRfrn4TJQMg9wqRoTxoTnK1Ky +5spAa+UfyoiWCOo6liV/k2TC7iCxj5pNIuj+2fvctwNMsFw9NpDWLoL8x0Yi +FlyZYJ1T0b3UJ4JJfcnWfz2ZYNfq2NIwKYIGW3Wyfvox4YDa7UoHUVHkzAxu +y4pggu9HjZTTLqK4jlz18s11Jpy12WHQNi+K7golFpfbmUAqayaxrxDDepcT +19d1MqFQ2ObnltVi+OfmurqCHia8b3MqSpEVQ0pP5528ISYoWgUpWJmKoUhi +ymuTSSbU7rrF2XpNDCX4FM228LDA7qHiyPJtMaSL7si0WMOC8TX3n2oUiuG7 +hf5uj7UsEHxdFnqhVgz1NJZ4T4qywMWsadziqxg+ptr728qz4I/JXPMbujju +Dl+UYeqy4GJeWMEfE3Gcur/g5EpjgSInW7y6lTg677l1lZPBAvP/eA3Pe4pj +w2TgtL4RCzKM5UrNk8Wxv+O/YGtzFujhzrRXH8RRo/vUSw1nFry+1Xrs9xdx +bKOVCR92Jeov21qqzoojB4+9d7Y7C87WuPAkckvgkrwj/echFrynh4SbbZHA +++Lz+bsDWHCMmu388rQE8gVzvS+LZIFZFv/sziQJ7FxnzusRzQIFrpPxzVck +sE9l1IjvDAta39kVt9+VwOv3NjfsimPBpoA1HAPNEmg1t516NokFqzpPpLl0 +EfkcLMo4k1nQx/isOjIkgccvixtEXWBB4upam7FZCRSk7zvjmsqCsbzjeT9I +kiitMLLYl8aCp3yfaMGKkij+DITUr7HgapB1y091SUxa9DY+nsGCbUbqC0so +iR/zexZ+3WBBTv/wDq5DkshTktFVns2CE1stBxICJLGY/Hy0O4cFlgVPjq4J +k8SEBXvS3G0WLIemXxc8L4l7I4Z/SuaxwFHE4ju5VBKPLb9hSd9ngVZ4VXRm +tSR+qJ8nCRSwgHd4g5h8gySOXX1TtERwxSMOUO6WxHbtluP1D4l5igW23x2W +xBt5ig9uFbLAK2LgkOo3Ip9fhETwIxaI7ay4uHlZEvkd82/xF7Pge7GyUik3 +CY84M5+0EVwvcblCR4iEt3yRlFJCzGP0yDBNiYTesi5XlkqJ+45W1N62k4QV +D7bWJrNYkD+W0vjChoTpI/fYlR6z4NTuZUczJxIGCXxNZhKsLt0TuzuQhObV +PSn/lbNgZcx2UlsYCQ95/169rYKYx3hZoU0MCbd59nXVEHyu/EKnfRoJhc72 +BmZXssBV9o9vXxYJxTdHGPJWEXqL82Fzvk/CHJVRHz+CBb53Xh4qJeHBy/2T +TQR/3rNto8cTEn54oNamUM2CmsqSJ6MNJHRozxQOJviqvJy1dysJxWJXsJ4T +7Bd/fvRrNwlv7les4n7Cgq2Ti2FHRkjYz9utaEbwCdPLKs+/kXCqIqEjhuDC +bPUe4XkSSppqK1cSPLLYkHBwmYTWu69IjBMsYeNCreAmo6ONb6FIDQt2Pfw1 +tlqIjHfrQ75QCT7NeSndiUzG5dkTr+wJfuysZlqsSMZ3slS7IIK/lf/3k2MT +GZ3cwxITCJYXcs630yWj0rNVftcItvNdsLuHZDQWv7N0m+DE+hTOpR1kLNmg +SL9H8DNpVZbFHjKmpliq/+O5kHrPbEcy5jb9evsvXqX1gOisJxmdladV/+Vz +2viz3sSfjIdaeBj/6l06fTHoWigZuxskuP7109i7UfFbNBmTh2cT//W7pF3X +bpBIxgOvQt78O8+WZMczKZfJmPg79M2/8x78PKf58SYZv1d3nv93H9fxwjAl +n4x26wMFqghuvbYhNaGIjLUySnvjCF4189ywr4KMFVYd7uYE08z3T2+qI+Ml +XU89PoL978xmRb8mYyl/5ftGYl65f89bvusg43BPJUYSzF/87NGJMTK+3eIZ +2UfM35jXwfn1NBl3Xfi09wzBoe4z/LK/iX7OPOVQInhYVPlIPZ8UqrEZ9u8j +9CXu/1RaXFwKrfAN/1dCf+aN+954y0mhYuxJcijBrLBEtbVaUujlLdd8mtDv +13bFPle6FIb6c4WyESynXpNYtk0KfxnPrzxB6P3ch6lx+31SaFA23OJA7MdT +vXMZD1ylsF1tULCeyYLZlHVmyz5SOLLxk8EGgp222t3LjZDCFw/E3YaI/dK8 +V3VoMkcKN2UtrBIn9vEQu6240QMp/OnB1r23iAU39k80XGZK4RFpp/xLxD5z +8ssr0xqlkNfS1WCJ2P+eo3EfY75L4c7+xgsphH9E061cSXrSyMnYndZM+I+p +U+YPXSNpDBjZOXKX8Cf+qK9nbM2lsVl78khEFpG/Ljbvoos0ZvyhWopmsqDc +rPIrZwLBfnXxbIT/Te1bFzLTLY1qxrbbX5wn9BsWwCX4URopGa/7TQi/PXXj +SfqmCWm8qSg89OwcC9YM7q3yZpdB0Znr1NyzLFh/KIltUEUGs1eOndlA+LlT +8Ny51+EyyDfyik/lGAuU0oykxmNl8I/4oxarwH/7cOEh10UZ3ChyRD3InwVh +SxtbjXJlsDIqqvGuLwuunHESrXgtgxG8Tm/fEu+X1ykvbt2RlsWHtPz3SnsI +PRVeKzv1VBaNHiSaflUn9ruz+c9Eoyxe0Y50TFNlgQXbyu3ObbI4s+aLCGxk +gbv1kW74JIsDyZER0YosMAmXj4xaJYcuLhdD2kgsCJCdv22oKoeZT3ZZ53MS +fnno1ve6EDmc5s/S1Ohlwo4lqtDJcDlc0ao/YdPFhOaL7yjaUXKoWiVzO6SD +Cd0VPFG5CXI4l5fMUdjChInVQUKxN+RwV57Q1291TJAoMtU1qZXDOyUrHz8s +YMLhhemoRj55rGVeCrMIZQIt8KDYqJA8Ngwfby0KYgL3eE8Bh4Q8xh+ebeMP +ZMKd3rr3BgryOLht8usTbyYM1FxRY1Lkca9PztsxB+L/Tyy1K9tZHqGWPSmI +zgRNoWiN8GJ5DOrfNXByqQx+qQoMqNsq4J5bWQ/IgWUwf5MUreWggKfAnvP6 +4TKYXaukSHVWwJe5v4XFvcpgYobqs9VbAd9t69i3yrkMhqvc5x0iFDDhbt2X +SvMyaNr5mD/+jgI+vDaocX59GWT4OsHwnAKGckjEjfaUAr3gQdbVq+vwffjh +AnVqKUwLmbnY1Sri7Sm7F3d+FMPHJBe7o1zKOFpisC8kpAh2TB7f8YmyHplF +ZAW/NYXwzZ37WFnkBjxu9tAr8fN94vtDnP1s7UYUCK1fM9WfD0JvlJOLJlXw +ILXQ0VjhDkjFP7KkUNQQD8dZbrLJgXRVqoDwIXXk62mOimm8BU0kQ52ZlE3o +4TcduN79OtCkai9qvNfAhUbfzKdCacDPkRPkenozWvsc80wOvwQy0bJ0e+Ut +KPeQIb957UXgUXJkWb/Ygqft1370sTgHmxiSj44f0MSYiktyQXdioXSd9292 +F018urc9qiE1FvR4K7Ynu2niw13i15SiYsGoc99g7iFNFNQo6+fZHwt2gemC +bYGa+EGBW9VHMBYi74gHqcVpYu3BEb/YqBho5ROjDhVqIvWm0Ay71xk4OiBU +Z8amhZ3Y1fTTIRoaGxyf3GfXQjbzBXYH82iQeZT3mHeVFu6XN9NoYERDUyTt +QROPFrKPye+plosGBXm3K2bCWnjDrGuX7OcoeOtefMhMWQttE0yhOjgKNn/Z +vcbMXAt7n0dPH9SOhMmZJNsd6VpI3j7QZvQ3HPq6su1uZmjhk3tcw7qj4dD0 +hLV3+gaRn8fwJ6M5HHLPDtpfy9bCewUsoYjMcHAgazt9ua+FenaRSg0QDv8Z +9R5MeKKFmxf4wk7GhsH1lI2hL4cJDrsyBdInYLtGQ8YOdW2kXem9ZXMyBPZx +mtq0amhju0edydWDIeDT/5Jvr6Y2vj53KumLZQgkJ76J8tDVRodAtlf1SiHw +/vO7g5GG2njjYvIP89Zg8Mga0WTaaiO35pWPGRuC4bTgildyp7Tx0OWXpz59 +OgY1M/q/fzZr44W1e0f/XAyE7NeP3fa81cYoGlMtNioQYu5oNRW2a2PbWEaa +ZEAg7Nires2zSxsXZDZXee8OhHeVJN32IW1ctHbZn8cfCOPRv44Wzmpj0d4h +0XMXAkBM4PG4B0kH4RRlc4KOPxxR0+x566mDlo8rNz287wvBP0mLzl46KHlN +ZjD1vC+crOUgTfjoYNwLhx+pAb6QuK/DnjdAB32dAyaGKL5wNya02yhMB1tP +69Aq6n1guK+mqzRZB8cG9wzRP3mD3fmdnVce66Ab+8clcaoXMCY83tnzUNBO +0aVDc4MniFVtz6leTcG1HZ+t7wp5wsRZlQBZfgrGWzyf3PzHAzLlp1Z/EqJg +bfQDy/A2D/hrE24cIEXBDzkXtsxEeMDTqpSSOA0KsqREr7h3uYNhQs3FUlsK +GhYu7PmS4QbbFCV28eVQ8NSarXeL9rhA2ff/5D1yKWg0HSTRZ+QCio+PzVfm +UXCVLnuLmKYLrDRrueVVQMHpH6eGKgRcoNY/7kddGQW3iDVU+tx0BoOq2bSw +FxT0ub0mczLDCSjWb4c/f6PgJXJ8WEWBI+SRIx8bTFKwufJjPOu8I4h+Uku6 +Mk3B+g0czi3+jjB7PF7HeJ6CY6k/1thoO0LJTYjPXKYgvV+enF+zHzS+PFS3 +FdLFsshVZ1y7HGBD1LnQWl1d9Khg/bgiaw/V+ndWmdN0cce54fxsdnuw/Pk0 +tYOui9sO8y03fdoHoUfmHowZ6mLh3hT1kAf7oNHRZYjfXBdlDeQaVPX3gReV +YrbfRRfnDViTfw7shXs/hsiz8bp4oDu1JKXcFgwKl+5GJOpizNuIaPlbttDm +LU7hStbF+5T5oVextrA4aG5JuqSLPO1pv/z32IJZy+MYvKmLxxb1535M2sB4 +wfnvScW6OBx8rr9F3QZUPKlPlXp0Mby9JNWk2houKFgsnunTRSWhfVyh+dYw ++8FNZ3hAFw3sg9VqUq2hxiGpIHNEF6+rfzCM97YGa8sPaeLfdXHW6UCRoIQ1 +nNCPDeBh00O/8pjQ8VAraBR8K/9dSQ9tZdNH6TssQb3lk+PODXp4xNBLf4Ri +CalJi2n3VPTQ0sdC8YaiJThyKfIf1NDDqdeswG1sljC5FLI4oKeHFziyA8cC +doPYmFR76049XE+RE/XeZwGeNV4xZYF6OND1hCfP0Bwm/MaPbwvSw1q54tN3 +ZcwhVPqw7/sQPUL/hWvafu+Ecyf9rRfC9fCJ6mj1NdZOKKKFyNHj9DCQ0yvo +p/pOWGKdqa7LIOq/DWx+tc4MUh9lzrbV6WG28YrAHhVTkHKWG3NvIOJbR/hD +15jCHf6c3tlGPSxsLKLrTWyHcr87tWLNeti7WuWpbMl26Fd9cNGhi3h+wSf/ +rP522HC3Qm34mx4yneDGTRsTeJr1zmNalIqJiaamS5lbYdBc3jlEgoo3lzhE +lGO3AtsvP/vfJCoas+sY+fluBSMrLotVckT8mq+We/S2QsMKmq6kChUbgk/y +hLcbw2u3WzyGBlTUPC9RJ7vWGHoUfQovHqRi9fP1v39lGMLvVtZdUW8qHiri +lr4WYwhSERy3M3ypaCS6Q8n6iCEc6LiRlhtAxT+UfZGCRoYwGNsSVR5GRb+f +V8NrxxE+j2rvGUym4qcPX7++R4TZu8s/NR5TsTt9sGjLXwaM2plkJVRQESBs +XrqHAV0rz5uOVFHxh6dZ3xYWA6pcSNeuPqNiy7dTEy1HGHBaQof25yUV79Vl +/hkcooNAvM/Jpj4qKvP7PtJp0Qe1Qx1snuw0ZKgfHMv7jwoyolL3albS0HdP +WrdBHhUE6tysJLhoePx82btfcVSYkZnKfrWahkHPmQe6TKlQ+Z7XWFOUhm0r +aLNazXpgaoKxy+tpmP200XH7B11wVyrgydhFw4FOY8q8JAXC/nPyUbYk8jUW +tLst6cBFT6FXJdY0vN+xqX5mQAeq75xIerWXhi7jtOXoXB0QUTZd+8eVht/0 +j53buUUHGpQ/ibiE0LDn6XJHgJU2qGyQlVO+RcNzNeEFi/c1ARvbokqyif4s +EzXzUzTBzituyCCXhncVFPceC9WEM3e/5+y9R8PDKj5fvU00oW9DtVJCKQ1r +fix6vR7ZAskb7VW/vaBh542XvqaKW2Ba5RKlZIqGfy/s6nUN0YCu17hNeIaG +zpdT+n7v0oBnRyb2BM0R9VjTzP+UNCC5ZEcgZZGGn4d/K451bAIVGtuDSg59 +jFhQ9XHT2wRuO/zk68T0Mer52y42TnV4d2j7mnd0fczQKx64WKsCVTxzJB3Q +x4LWyqMNt1QgpyBn41VDfQzijOxQilCBgMk/JvtM9DEpKdPKVU8F+I6XRfft +1kebq26UhqKNYBIn//Ojmz7+cF98I3dvA5Tn/h6ai9dHkfJN6eMsZaAYB/00 +S9THQUsZvH5NGZhD39ZkndfH+IfPJo6cVIYSmQFds1R9zHQzaDxlpAwP0p+d +z7yuj58lO83prUqQlRRL3V6oj7/oN8T4fyhCQtDalPR2fWzuGrq11mIdcAvH +533v0McXHFpKPdrrIK6YrdqoSx9nW69r15HXQczE9Oi3Pn3kCP7hM/VFAU55 +vaMbjurjJdPI86VnFeCo47WxLwv6mH+g+e3TRnlw2LoO9WXoyOQT4xVwkYM/ +77j56+ToeNRE/2qaqRxkeU70mq2j4wy9391gixyMxlUcd9hAx45We9Uv7HJw +9OXuRyc0iXj6y8tOu2XhnMVJmXITOlbPhSRWfpeGyn0dS9r+dAwu2r893pYM +B75UNlUH0lE9d59UjzoZ2MKy0rcG0dFIRzzOlZMMJtd9tW1O0PE6ZxefQDkJ +2vpXHD52ho6qthrlH6VJMO62qbc4jY7sNs1FWjMSQPY7W7HpGR2lftWbFtWK +QfLyQZ3EWjo2fYLkoNtiwJ5qUvy5no61w0+ZLjFiMM5adS/rJR3bBbwnHpmI +QSVbTLpQOx3V/jMYV3wjCg6Xo47Pf6KjLzvXSxwSgfSqEzo1qxlYMgGPuZSE +YY2FfTGJn4FanHJRAbzCEDWop35cgIG1S63ZvyeFwGvVguJmUQbWN3uahVYJ +ge7uEJEcGQau3KXI5LQRgvfDR2ditzCQtzA11yZREER5Dxfv2svAhd2NarcF +BSDXOCJsyp6BfldsL76fWguaEcnGlxwZeFRYD4tq1oLFVFFHlysD4+wiTxjs +Xwtx7+d+uR9m4Guv2/5VafywkBNpFBbNwPVq3f1D0nzQo3+pPa+AgUzXx3Rz +R17wCs69saOQgXVv3ty20uSF+UKm57ciol/pI+2XuXlBSKHrJ+FzqCETrtXO +5IGd3NJST54x8BPzQJayMA9Uv8vzaO9gYDzNq32giwvM+MvVQ7oY2BqrrnOt +hAu6tr+cl+glzifVrJqUxAWzlV/jnQYZmHmuIZ1kyAXq2ZsffhlnYKxcXEvr +A06o7jEMSfrOQJVJK63t8ZxgJrIHNKYY6PDDs3zGnRMOng1+GzRH3Iff9Mx3 +MifMPovLEF9g4MUBeSH9hVVwejHNvXKRgdcqVss/ebcKBLTvqR34w0A7l4iO +Y8WrINOvcm55mYE3zO98dEpeBf8DlYrdaA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08884675710956705}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08884675710956705}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k4lG0UxkXZiuzLjD1UlpRlmDHjHJQkCaFIdmVJKCQSChEpWkglJCol +20y2VPgkFSLZZSlJZcmSpHxvf831u67znnOe59znfueVd/O39mRnY2O7vYKN +7d/v/MDLesXEXIMmh2V5I4q5wbtMiROGXadBUvzVFNfQRkDRFjeJrlSAaPqn +pkEqhFje7+ToyoGPd1Zo3RjcAYIT4qm/OkvgpFXbhq2D9vCh2sJ/trMWDm4Z +PyT6wRtMFMf7pzvb4N7R5fRjPSfgV6fulanOYdiSnz7L1pgAdcb5uW9zZuC3 +U/a2C/EZIPWhYtRN7Q94Mf42edjcBpHDzve5jDlQ2PX5mT29dyF1i0mVhS03 ++veqFNGMCkGj1347w4sbg/lDvgvbFsLrGL921XBuVJF+Ozd8qBA4uy5/5c7m +xt7YWWu384UQfmqEXPeNG8v9hwo/dRaCx6uok7oxPBj8qyZy0ecRUDyrGHKl +vNiROKJ4c2sRdKdvfjYtwIc9IPg3wboYMtoL1oYo8eFBs6dUs/3F4MC/3nmR +yocRnE3NHB7F0HdG+i+7Ox9auyb+dgsuhsEjvHQRJh+uDqiTeZtWDGNbPz6m +2POjyKJiqk9vMSxMpT0Kz16L3knbGGcOlECFqvDyMnMtaqwM9PTxLIGwg8kW +MU1r8aVdw20zvxJY6o35njSzFldo5++fP1kCUSPloi0KAmhwAuIWr5dATPOd +PYNBAtjR3bO1rKsEEnMjW9glBfHm1hrasHkpmGl7C4muE0Qt34s6jXtKgbve +2na9uiA+mrC1y3cohZgRpd6dhoI4Oj+00sqrFE4qvB697C2IY2smZ63OlMKR +LIm/ypWC2JaRpMRTXgpWN4rVdu4XwoaSiGfbpMpAQO26/wFPITRZj4ctFMqg +uSqmxN9fCMvvN8tYbigDs969epfPCOG1HSFXDLTLwIj017i/QAjXq/YyX+ws +A+10s/3+S0I4N2Gne+5EGYhfHkm4dFMY+1j46HVLGUioMmMW8oSxzvJR2o13 +ZUCqjYs8UCSMb5ISXA92l4HM1Mbg9XXCGPvlRfrn4TJQMg9wqRoTxoTnK1Ky +5spAa+UfyoiWCOo6liV/k2TC7iCxj5pNIuj+2fvctwNMsFw9NpDWLoL8x0Yi +FlyZYJ1T0b3UJ4JJfcnWfz2ZYNfq2NIwKYIGW3Wyfvox4YDa7UoHUVHkzAxu +y4pggu9HjZTTLqK4jlz18s11Jpy12WHQNi+K7golFpfbmUAqayaxrxDDepcT +19d1MqFQ2ObnltVi+OfmurqCHia8b3MqSpEVQ0pP5528ISYoWgUpWJmKoUhi +ymuTSSbU7rrF2XpNDCX4FM228LDA7qHiyPJtMaSL7si0WMOC8TX3n2oUiuG7 +hf5uj7UsEHxdFnqhVgz1NJZ4T4qywMWsadziqxg+ptr728qz4I/JXPMbujju +Dl+UYeqy4GJeWMEfE3Gcur/g5EpjgSInW7y6lTg677l1lZPBAvP/eA3Pe4pj +w2TgtL4RCzKM5UrNk8Wxv+O/YGtzFujhzrRXH8RRo/vUSw1nFry+1Xrs9xdx +bKOVCR92Jeov21qqzoojB4+9d7Y7C87WuPAkckvgkrwj/echFrynh4SbbZHA +++Lz+bsDWHCMmu388rQE8gVzvS+LZIFZFv/sziQJ7FxnzusRzQIFrpPxzVck +sE9l1IjvDAta39kVt9+VwOv3NjfsimPBpoA1HAPNEmg1t516NokFqzpPpLl0 +EfkcLMo4k1nQx/isOjIkgccvixtEXWBB4upam7FZCRSk7zvjmsqCsbzjeT9I +kiitMLLYl8aCp3yfaMGKkij+DITUr7HgapB1y091SUxa9DY+nsGCbUbqC0so +iR/zexZ+3WBBTv/wDq5DkshTktFVns2CE1stBxICJLGY/Hy0O4cFlgVPjq4J +k8SEBXvS3G0WLIemXxc8L4l7I4Z/SuaxwFHE4ju5VBKPLb9hSd9ngVZ4VXRm +tSR+qJ8nCRSwgHd4g5h8gySOXX1TtERwxSMOUO6WxHbtluP1D4l5igW23x2W +xBt5ig9uFbLAK2LgkOo3Ip9fhETwIxaI7ay4uHlZEvkd82/xF7Pge7GyUik3 +CY84M5+0EVwvcblCR4iEt3yRlFJCzGP0yDBNiYTesi5XlkqJ+45W1N62k4QV +D7bWJrNYkD+W0vjChoTpI/fYlR6z4NTuZUczJxIGCXxNZhKsLt0TuzuQhObV +PSn/lbNgZcx2UlsYCQ95/169rYKYx3hZoU0MCbd59nXVEHyu/EKnfRoJhc72 +BmZXssBV9o9vXxYJxTdHGPJWEXqL82Fzvk/CHJVRHz+CBb53Xh4qJeHBy/2T +TQR/3rNto8cTEn54oNamUM2CmsqSJ6MNJHRozxQOJviqvJy1dysJxWJXsJ4T +7Bd/fvRrNwlv7les4n7Cgq2Ti2FHRkjYz9utaEbwCdPLKs+/kXCqIqEjhuDC +bPUe4XkSSppqK1cSPLLYkHBwmYTWu69IjBMsYeNCreAmo6ONb6FIDQt2Pfw1 +tlqIjHfrQ75QCT7NeSndiUzG5dkTr+wJfuysZlqsSMZ3slS7IIK/lf/3k2MT +GZ3cwxITCJYXcs630yWj0rNVftcItvNdsLuHZDQWv7N0m+DE+hTOpR1kLNmg +SL9H8DNpVZbFHjKmpliq/+O5kHrPbEcy5jb9evsvXqX1gOisJxmdladV/+Vz +2viz3sSfjIdaeBj/6l06fTHoWigZuxskuP7109i7UfFbNBmTh2cT//W7pF3X +bpBIxgOvQt78O8+WZMczKZfJmPg79M2/8x78PKf58SYZv1d3nv93H9fxwjAl +n4x26wMFqghuvbYhNaGIjLUySnvjCF4189ywr4KMFVYd7uYE08z3T2+qI+Ml +XU89PoL978xmRb8mYyl/5ftGYl65f89bvusg43BPJUYSzF/87NGJMTK+3eIZ +2UfM35jXwfn1NBl3Xfi09wzBoe4z/LK/iX7OPOVQInhYVPlIPZ8UqrEZ9u8j +9CXu/1RaXFwKrfAN/1dCf+aN+954y0mhYuxJcijBrLBEtbVaUujlLdd8mtDv +13bFPle6FIb6c4WyESynXpNYtk0KfxnPrzxB6P3ch6lx+31SaFA23OJA7MdT +vXMZD1ylsF1tULCeyYLZlHVmyz5SOLLxk8EGgp222t3LjZDCFw/E3YaI/dK8 +V3VoMkcKN2UtrBIn9vEQu6240QMp/OnB1r23iAU39k80XGZK4RFpp/xLxD5z +8ssr0xqlkNfS1WCJ2P+eo3EfY75L4c7+xgsphH9E061cSXrSyMnYndZM+I+p +U+YPXSNpDBjZOXKX8Cf+qK9nbM2lsVl78khEFpG/Ljbvoos0ZvyhWopmsqDc +rPIrZwLBfnXxbIT/Te1bFzLTLY1qxrbbX5wn9BsWwCX4URopGa/7TQi/PXXj +SfqmCWm8qSg89OwcC9YM7q3yZpdB0Znr1NyzLFh/KIltUEUGs1eOndlA+LlT +8Ny51+EyyDfyik/lGAuU0oykxmNl8I/4oxarwH/7cOEh10UZ3ChyRD3InwVh +SxtbjXJlsDIqqvGuLwuunHESrXgtgxG8Tm/fEu+X1ykvbt2RlsWHtPz3SnsI +PRVeKzv1VBaNHiSaflUn9ruz+c9Eoyxe0Y50TFNlgQXbyu3ObbI4s+aLCGxk +gbv1kW74JIsDyZER0YosMAmXj4xaJYcuLhdD2kgsCJCdv22oKoeZT3ZZ53MS +fnno1ve6EDmc5s/S1Ohlwo4lqtDJcDlc0ao/YdPFhOaL7yjaUXKoWiVzO6SD +Cd0VPFG5CXI4l5fMUdjChInVQUKxN+RwV57Q1291TJAoMtU1qZXDOyUrHz8s +YMLhhemoRj55rGVeCrMIZQIt8KDYqJA8Ngwfby0KYgL3eE8Bh4Q8xh+ebeMP +ZMKd3rr3BgryOLht8usTbyYM1FxRY1Lkca9PztsxB+L/Tyy1K9tZHqGWPSmI +zgRNoWiN8GJ5DOrfNXByqQx+qQoMqNsq4J5bWQ/IgWUwf5MUreWggKfAnvP6 +4TKYXaukSHVWwJe5v4XFvcpgYobqs9VbAd9t69i3yrkMhqvc5x0iFDDhbt2X +SvMyaNr5mD/+jgI+vDaocX59GWT4OsHwnAKGckjEjfaUAr3gQdbVq+vwffjh +AnVqKUwLmbnY1Sri7Sm7F3d+FMPHJBe7o1zKOFpisC8kpAh2TB7f8YmyHplF +ZAW/NYXwzZ37WFnkBjxu9tAr8fN94vtDnP1s7UYUCK1fM9WfD0JvlJOLJlXw +ILXQ0VjhDkjFP7KkUNQQD8dZbrLJgXRVqoDwIXXk62mOimm8BU0kQ52ZlE3o +4TcduN79OtCkai9qvNfAhUbfzKdCacDPkRPkenozWvsc80wOvwQy0bJ0e+Ut +KPeQIb957UXgUXJkWb/Ygqft1370sTgHmxiSj44f0MSYiktyQXdioXSd9292 +F018urc9qiE1FvR4K7Ynu2niw13i15SiYsGoc99g7iFNFNQo6+fZHwt2gemC +bYGa+EGBW9VHMBYi74gHqcVpYu3BEb/YqBho5ROjDhVqIvWm0Ay71xk4OiBU +Z8amhZ3Y1fTTIRoaGxyf3GfXQjbzBXYH82iQeZT3mHeVFu6XN9NoYERDUyTt +QROPFrKPye+plosGBXm3K2bCWnjDrGuX7OcoeOtefMhMWQttE0yhOjgKNn/Z +vcbMXAt7n0dPH9SOhMmZJNsd6VpI3j7QZvQ3HPq6su1uZmjhk3tcw7qj4dD0 +hLV3+gaRn8fwJ6M5HHLPDtpfy9bCewUsoYjMcHAgazt9ua+FenaRSg0QDv8Z +9R5MeKKFmxf4wk7GhsH1lI2hL4cJDrsyBdInYLtGQ8YOdW2kXem9ZXMyBPZx +mtq0amhju0edydWDIeDT/5Jvr6Y2vj53KumLZQgkJ76J8tDVRodAtlf1SiHw +/vO7g5GG2njjYvIP89Zg8Mga0WTaaiO35pWPGRuC4bTgildyp7Tx0OWXpz59 +OgY1M/q/fzZr44W1e0f/XAyE7NeP3fa81cYoGlMtNioQYu5oNRW2a2PbWEaa +ZEAg7Nires2zSxsXZDZXee8OhHeVJN32IW1ctHbZn8cfCOPRv44Wzmpj0d4h +0XMXAkBM4PG4B0kH4RRlc4KOPxxR0+x566mDlo8rNz287wvBP0mLzl46KHlN +ZjD1vC+crOUgTfjoYNwLhx+pAb6QuK/DnjdAB32dAyaGKL5wNya02yhMB1tP +69Aq6n1guK+mqzRZB8cG9wzRP3mD3fmdnVce66Ab+8clcaoXMCY83tnzUNBO +0aVDc4MniFVtz6leTcG1HZ+t7wp5wsRZlQBZfgrGWzyf3PzHAzLlp1Z/EqJg +bfQDy/A2D/hrE24cIEXBDzkXtsxEeMDTqpSSOA0KsqREr7h3uYNhQs3FUlsK +GhYu7PmS4QbbFCV28eVQ8NSarXeL9rhA2ff/5D1yKWg0HSTRZ+QCio+PzVfm +UXCVLnuLmKYLrDRrueVVQMHpH6eGKgRcoNY/7kddGQW3iDVU+tx0BoOq2bSw +FxT0ub0mczLDCSjWb4c/f6PgJXJ8WEWBI+SRIx8bTFKwufJjPOu8I4h+Uku6 +Mk3B+g0czi3+jjB7PF7HeJ6CY6k/1thoO0LJTYjPXKYgvV+enF+zHzS+PFS3 +FdLFsshVZ1y7HGBD1LnQWl1d9Khg/bgiaw/V+ndWmdN0cce54fxsdnuw/Pk0 +tYOui9sO8y03fdoHoUfmHowZ6mLh3hT1kAf7oNHRZYjfXBdlDeQaVPX3gReV +YrbfRRfnDViTfw7shXs/hsiz8bp4oDu1JKXcFgwKl+5GJOpizNuIaPlbttDm +LU7hStbF+5T5oVextrA4aG5JuqSLPO1pv/z32IJZy+MYvKmLxxb1535M2sB4 +wfnvScW6OBx8rr9F3QZUPKlPlXp0Mby9JNWk2houKFgsnunTRSWhfVyh+dYw ++8FNZ3hAFw3sg9VqUq2hxiGpIHNEF6+rfzCM97YGa8sPaeLfdXHW6UCRoIQ1 +nNCPDeBh00O/8pjQ8VAraBR8K/9dSQ9tZdNH6TssQb3lk+PODXp4xNBLf4Ri +CalJi2n3VPTQ0sdC8YaiJThyKfIf1NDDqdeswG1sljC5FLI4oKeHFziyA8cC +doPYmFR76049XE+RE/XeZwGeNV4xZYF6OND1hCfP0Bwm/MaPbwvSw1q54tN3 +ZcwhVPqw7/sQPUL/hWvafu+Ecyf9rRfC9fCJ6mj1NdZOKKKFyNHj9DCQ0yvo +p/pOWGKdqa7LIOq/DWx+tc4MUh9lzrbV6WG28YrAHhVTkHKWG3NvIOJbR/hD +15jCHf6c3tlGPSxsLKLrTWyHcr87tWLNeti7WuWpbMl26Fd9cNGhi3h+wSf/ +rP522HC3Qm34mx4yneDGTRsTeJr1zmNalIqJiaamS5lbYdBc3jlEgoo3lzhE +lGO3AtsvP/vfJCoas+sY+fluBSMrLotVckT8mq+We/S2QsMKmq6kChUbgk/y +hLcbw2u3WzyGBlTUPC9RJ7vWGHoUfQovHqRi9fP1v39lGMLvVtZdUW8qHiri +lr4WYwhSERy3M3ypaCS6Q8n6iCEc6LiRlhtAxT+UfZGCRoYwGNsSVR5GRb+f +V8NrxxE+j2rvGUym4qcPX7++R4TZu8s/NR5TsTt9sGjLXwaM2plkJVRQESBs +XrqHAV0rz5uOVFHxh6dZ3xYWA6pcSNeuPqNiy7dTEy1HGHBaQof25yUV79Vl +/hkcooNAvM/Jpj4qKvP7PtJp0Qe1Qx1snuw0ZKgfHMv7jwoyolL3albS0HdP +WrdBHhUE6tysJLhoePx82btfcVSYkZnKfrWahkHPmQe6TKlQ+Z7XWFOUhm0r +aLNazXpgaoKxy+tpmP200XH7B11wVyrgydhFw4FOY8q8JAXC/nPyUbYk8jUW +tLst6cBFT6FXJdY0vN+xqX5mQAeq75xIerWXhi7jtOXoXB0QUTZd+8eVht/0 +j53buUUHGpQ/ibiE0LDn6XJHgJU2qGyQlVO+RcNzNeEFi/c1ARvbokqyif4s +EzXzUzTBzituyCCXhncVFPceC9WEM3e/5+y9R8PDKj5fvU00oW9DtVJCKQ1r +fix6vR7ZAskb7VW/vaBh542XvqaKW2Ba5RKlZIqGfy/s6nUN0YCu17hNeIaG +zpdT+n7v0oBnRyb2BM0R9VjTzP+UNCC5ZEcgZZGGn4d/K451bAIVGtuDSg59 +jFhQ9XHT2wRuO/zk68T0Mer52y42TnV4d2j7mnd0fczQKx64WKsCVTxzJB3Q +x4LWyqMNt1QgpyBn41VDfQzijOxQilCBgMk/JvtM9DEpKdPKVU8F+I6XRfft +1kebq26UhqKNYBIn//Ojmz7+cF98I3dvA5Tn/h6ai9dHkfJN6eMsZaAYB/00 +S9THQUsZvH5NGZhD39ZkndfH+IfPJo6cVIYSmQFds1R9zHQzaDxlpAwP0p+d +z7yuj58lO83prUqQlRRL3V6oj7/oN8T4fyhCQtDalPR2fWzuGrq11mIdcAvH +533v0McXHFpKPdrrIK6YrdqoSx9nW69r15HXQczE9Oi3Pn3kCP7hM/VFAU55 +vaMbjurjJdPI86VnFeCo47WxLwv6mH+g+e3TRnlw2LoO9WXoyOQT4xVwkYM/ +77j56+ToeNRE/2qaqRxkeU70mq2j4wy9391gixyMxlUcd9hAx45We9Uv7HJw +9OXuRyc0iXj6y8tOu2XhnMVJmXITOlbPhSRWfpeGyn0dS9r+dAwu2r893pYM +B75UNlUH0lE9d59UjzoZ2MKy0rcG0dFIRzzOlZMMJtd9tW1O0PE6ZxefQDkJ +2vpXHD52ho6qthrlH6VJMO62qbc4jY7sNs1FWjMSQPY7W7HpGR2lftWbFtWK +QfLyQZ3EWjo2fYLkoNtiwJ5qUvy5no61w0+ZLjFiMM5adS/rJR3bBbwnHpmI +QSVbTLpQOx3V/jMYV3wjCg6Xo47Pf6KjLzvXSxwSgfSqEzo1qxlYMgGPuZSE +YY2FfTGJn4FanHJRAbzCEDWop35cgIG1S63ZvyeFwGvVguJmUQbWN3uahVYJ +ge7uEJEcGQau3KXI5LQRgvfDR2ditzCQtzA11yZREER5Dxfv2svAhd2NarcF +BSDXOCJsyp6BfldsL76fWguaEcnGlxwZeFRYD4tq1oLFVFFHlysD4+wiTxjs +Xwtx7+d+uR9m4Guv2/5VafywkBNpFBbNwPVq3f1D0nzQo3+pPa+AgUzXx3Rz +R17wCs69saOQgXVv3ty20uSF+UKm57ciol/pI+2XuXlBSKHrJ+FzqCETrtXO +5IGd3NJST54x8BPzQJayMA9Uv8vzaO9gYDzNq32giwvM+MvVQ7oY2BqrrnOt +hAu6tr+cl+glzifVrJqUxAWzlV/jnQYZmHmuIZ1kyAXq2ZsffhlnYKxcXEvr +A06o7jEMSfrOQJVJK63t8ZxgJrIHNKYY6PDDs3zGnRMOng1+GzRH3Iff9Mx3 +MifMPovLEF9g4MUBeSH9hVVwejHNvXKRgdcqVss/ebcKBLTvqR34w0A7l4iO +Y8WrINOvcm55mYE3zO98dEpeBf8DlYrdaA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08884675710956705}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08884675710956705}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831816189904*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"435e6296-f59a-4aee-8323-f983d687d1d7"] +}, Open ]], Cell[CellGroupData[{ @@ -10826,66 +13318,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[116]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], + "In[131]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 116, 57, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068365192`*^9}, +Cell[BoxData["2.4835622197946616`"], "Output", + CellChangeTimes->{3.991326513010317*^9, 3.993831896004752*^9}, CellLabel-> - "During evaluation of \ -In[116]:=",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 116, 58, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506846985*^9}, - CellLabel-> - "During evaluation of \ -In[116]:=",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 116, 59, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506856045*^9}, - CellLabel-> - "During evaluation of \ -In[116]:=",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 116, 60, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068640423`*^9}, - CellLabel-> - "During evaluation of \ -In[116]:=",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], - -Cell[BoxData["11.275343508404701`"], "Output", - CellChangeTimes->{3.991326513010317*^9}, - CellLabel-> - "Out[116]=",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] + "Out[131]=",ExpressionUUID->"de6182ba-65a0-453a-a58f-d882da1cc5ce"] }, Open ]], Cell[CellGroupData[{ @@ -10952,68 +13390,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998502248*^9, - 3.9917998584727135`*^9}},ExpressionUUID->"df92a918-12ed-ff47-a8a8-\ -122296a3d634"], + CellChangeTimes->{{3.9917998502248*^9, 3.9917998584727135`*^9}}, + CellLabel-> + "In[132]:=",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 117, 61, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130447063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.116906062699916`*^-78\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 132, 45, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.993831896038465*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], +In[132]:=",ExpressionUUID->"ed97716a-ef45-476b-8387-342a32da4e41"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 62, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513053705*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.137357886881144`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 132, 46, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.993831896045209*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], +In[132]:=",ExpressionUUID->"812e21f2-ad51-4c98-9459-e99cfa0e4ede"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 63, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130617065`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1580072999491504`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 132, 47, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.993831896051931*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], +In[132]:=",ExpressionUUID->"ed300602-81d5-463b-8f00-8116973aba4e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 117, 64, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513069849*^9}, +during this calculation.\"", 2, 132, 48, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.9938318960579357`*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], +In[132]:=",ExpressionUUID->"5567e3cc-2fd5-40ac-b92d-09ada50f3f49"], -Cell[BoxData["1.662840304462236`"], "Output", - CellChangeTimes->{3.9913265201819115`*^9}, +Cell[BoxData["4.879567348247909`"], "Output", + CellChangeTimes->{3.9913265201819115`*^9, 3.9938319057970657`*^9}, CellLabel-> - "Out[117]=",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] + "Out[132]=",ExpressionUUID->"1709b2dd-9b14-4ad0-b09c-93349d38ffb6"] }, Open ]], Cell[CellGroupData[{ @@ -11034,8 +13488,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11080,68 +13533,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998626681576`*^9, - 3.991799866004116*^9}},ExpressionUUID->"1990573a-00f1-b54c-9d39-\ -9c68738afe07"], + CellChangeTimes->{{3.9917998626681576`*^9, 3.991799866004116*^9}}, + CellLabel-> + "In[133]:=",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 118, 65, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520216116*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.116906062699916`*^-78\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 133, 49, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.993831905831253*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], +In[133]:=",ExpressionUUID->"d64da598-09c1-4f61-8f1f-64cf11679ca4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 66, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520226103*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.137357886881144`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 133, 50, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.9938319058374147`*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], +In[133]:=",ExpressionUUID->"2b219be5-0fcf-4da4-a817-7b56815dbc6f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 67, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265202341022`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1580072999491504`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 133, 51, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.993831905842353*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], +In[133]:=",ExpressionUUID->"ad2281df-5a41-45c5-a148-900ce829c328"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 118, 68, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520242243*^9}, +during this calculation.\"", 2, 133, 52, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.993831905846745*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], +In[133]:=",ExpressionUUID->"a55d1935-60cd-451a-ad2b-c8a293846aab"], -Cell[BoxData["8.698310175000124`"], "Output", - CellChangeTimes->{3.9913265264075394`*^9}, +Cell[BoxData["19.97679384273776`"], "Output", + CellChangeTimes->{3.9913265264075394`*^9, 3.993831915298856*^9}, CellLabel-> - "Out[118]=",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] + "Out[133]=",ExpressionUUID->"ecde14a6-77ef-41ba-945a-1de3b2c464a0"] }, Open ]], Cell[CellGroupData[{ @@ -11162,8 +13631,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11208,68 +13676,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799871682028*^9, - 3.9917998792226925`*^9}},ExpressionUUID->"586f2005-dac7-8547-be11-\ -766f96e6af5d"], + CellChangeTimes->{{3.991799871682028*^9, 3.9917998792226925`*^9}}, + CellLabel-> + "In[134]:=",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 119, 69, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264435444`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.116906062699916`*^-78\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 134, 53, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.99383191533775*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], +In[134]:=",ExpressionUUID->"a60a1872-129e-4544-815e-4030e3954069"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 70, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264535427`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.137357886881144`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 134, 54, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.993831915343841*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], +In[134]:=",ExpressionUUID->"6d9f0638-6ce4-419d-852c-49de0ec5941f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 71, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264615555`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1580072999491504`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 134, 55, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.993831915349739*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], +In[134]:=",ExpressionUUID->"d0d97d65-05c9-464f-b9f6-b10f82194a8c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 119, 72, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326526468542*^9}, +during this calculation.\"", 2, 134, 56, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.9938319153551273`*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], +In[134]:=",ExpressionUUID->"8fc85fb2-ced3-420d-91f6-9130c1e0e44a"], -Cell[BoxData["16.721244215445346`"], "Output", - CellChangeTimes->{3.9913265299431496`*^9}, +Cell[BoxData["1.5654204284043656`"], "Output", + CellChangeTimes->{3.9913265299431496`*^9, 3.993831921643414*^9}, CellLabel-> - "Out[119]=",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] + "Out[134]=",ExpressionUUID->"0dd0523d-03f7-4c00-90bf-9f9fcb591751"] }, Open ]], Cell[CellGroupData[{ @@ -11278,22 +13762,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9917998836260815`*^9, - 3.991799887334032*^9}},ExpressionUUID->"363f609f-6fd9-cc4c-924f-\ -14ef82ef0962"], - -Cell[BoxData["0.13787921511838797`"], "Output", - CellChangeTimes->{3.991326529975149*^9}, + CellChangeTimes->{{3.9917998836260815`*^9, 3.991799887334032*^9}}, CellLabel-> - "Out[120]=",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] + "In[135]:=",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], + +Cell[BoxData["0.8725753179369333`"], "Output", + CellChangeTimes->{3.991326529975149*^9, 3.993831921674303*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"963b9045-70ba-47a3-8d7e-48c31c27759c"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991799895862177*^9, 3.9917998977747803`*^9}, - 3.991924340381132*^9},ExpressionUUID->"32c57f0b-017d-d340-92c6-\ -0f56a212e9c3"], + 3.991924340381132*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ @@ -11316,12 +13801,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[122]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], + "In[137]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913265300040226`*^9}, +Cell[BoxData["25.444661756003168`"], "Output", + CellChangeTimes->{3.9913265300040226`*^9, 3.993831921685535*^9}, CellLabel-> - "Out[122]=",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] + "Out[137]=",ExpressionUUID->"af92e250-d914-4e04-be97-36d0b51aaf04"] }, Open ]], Cell[CellGroupData[{ @@ -11331,12 +13816,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[124]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], + "In[138]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.991326530052025*^9}, +Cell[BoxData["0.023793753982575144`"], "Output", + CellChangeTimes->{3.991326530052025*^9, 3.993831921692196*^9}, CellLabel-> - "Out[124]=",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] + "Out[138]=",ExpressionUUID->"a6d253dc-2397-44ff-b715-72e3a59e6055"] }, Open ]], Cell[CellGroupData[{ @@ -11346,12 +13831,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[127]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], + "In[139]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913265300922585`*^9}, +Cell[BoxData["0.6054240219921778`"], "Output", + CellChangeTimes->{3.9913265300922585`*^9, 3.993831921698914*^9}, CellLabel-> - "Out[127]=",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] + "Out[139]=",ExpressionUUID->"223a7cd7-40b2-432c-9e88-5e2c35a539aa"] }, Open ]], Cell[CellGroupData[{ @@ -11541,12 +14026,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[128]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], + "In[140]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[BoxData["0.022635100966331548`"], "Output", - CellChangeTimes->{3.9913265301172295`*^9}, +Cell[BoxData["0.010718512338708715`"], "Output", + CellChangeTimes->{3.9913265301172295`*^9, 3.993831921710445*^9}, CellLabel-> - "Out[128]=",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] + "Out[140]=",ExpressionUUID->"9196084a-08b2-469e-a59a-7e6977c89cb2"] }, Open ]], Cell[CellGroupData[{ @@ -11560,12 +14045,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[129]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], + "In[141]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[BoxData["5.890521190513567`"], "Output", - CellChangeTimes->{3.991326530210228*^9}, +Cell[BoxData["8.560077261906851`"], "Output", + CellChangeTimes->{3.991326530210228*^9, 3.99383192181526*^9}, CellLabel-> - "Out[129]=",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] + "Out[141]=",ExpressionUUID->"d4425cae-164f-42d9-89e5-61f4bef0fd1f"] }, Open ]], Cell[CellGroupData[{ @@ -11757,12 +14242,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[130]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], + "In[142]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[BoxData["0.012260254107801566`"], "Output", - CellChangeTimes->{3.9913265302252293`*^9}, +Cell[BoxData["0.13526802165049787`"], "Output", + CellChangeTimes->{3.9913265302252293`*^9, 3.993831921826508*^9}, CellLabel-> - "Out[130]=",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] + "Out[142]=",ExpressionUUID->"8f95cf82-5d70-4a0f-95af-792f9c8df177"] }, Open ]], Cell[CellGroupData[{ @@ -11776,12 +14261,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[131]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], + "In[143]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[BoxData["8.003781147223087`"], "Output", - CellChangeTimes->{3.9913265303172264`*^9}, +Cell[BoxData["2.4096134102576836`"], "Output", + CellChangeTimes->{3.9913265303172264`*^9, 3.9938319219244003`*^9}, CellLabel-> - "Out[131]=",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] + "Out[143]=",ExpressionUUID->"83a6e4ec-da93-4c6c-9fe6-4cc78f7b0da2"] }, Open ]], Cell[CellGroupData[{ @@ -11874,12 +14359,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[132]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], + "In[144]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913265303292294`*^9}, +Cell[BoxData["0.2129709837599123`"], "Output", + CellChangeTimes->{3.9913265303292294`*^9, 3.9938319219333267`*^9}, CellLabel-> - "Out[132]=",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] + "Out[144]=",ExpressionUUID->"c525bbcb-e893-40ab-9add-4b2f59c2848b"] }, Open ]], Cell[CellGroupData[{ @@ -11969,12 +14454,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[133]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], + "In[145]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991326530340416*^9}, +Cell[BoxData["0.7870290162400877`"], "Output", + CellChangeTimes->{3.991326530340416*^9, 3.99383192194112*^9}, CellLabel-> - "Out[133]=",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] + "Out[145]=",ExpressionUUID->"b10a71df-3f9e-465d-ab5c-f5c8f92a1470"] }, Open ]], Cell[CellGroupData[{ @@ -12097,12 +14582,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[134]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], + "In[146]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991326530367384*^9}, +Cell[BoxData["0.16761434383624746`"], "Output", + CellChangeTimes->{3.991326530367384*^9, 3.993831921950157*^9}, CellLabel-> - "Out[134]=",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] + "Out[146]=",ExpressionUUID->"24bf62f9-9212-48d5-8d90-81d0fb8c7928"] }, Open ]], Cell[CellGroupData[{ @@ -12164,68 +14649,81 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799912745739*^9},ExpressionUUID->"c3883d3a-8a99-644a-9175-\ -a97b5c6c44f4"], + CellChangeTimes->{3.991799912745739*^9}, + CellLabel-> + "In[147]:=",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 135, 73, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265303923836`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.067298701992005`*^-87\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 147, 57, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.993831921962706*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], +In[147]:=",ExpressionUUID->"9b40fead-55ba-4f82-be96-889663ebfd95"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 135, 74, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304013824`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.968837391171106`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 147, 58, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.993831921967608*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], +In[147]:=",ExpressionUUID->"e40d66f9-80dd-4fa4-b8f6-e9f87af4c0a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 135, - 75, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304095325`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1670391335897967`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 147, 59, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.993831921972477*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], +In[147]:=",ExpressionUUID->"4603e281-c5b6-4c52-ab91-30fda35e8c50"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 135, 76, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304175396`*^9}, +during this calculation.\"", 2, 147, 60, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.993831921976923*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], +In[147]:=",ExpressionUUID->"e0d89f3a-0774-4717-8e20-e540d78860b0"], -Cell[BoxData["5.890521190513565`"], "Output", - CellChangeTimes->{3.9913265339749985`*^9}, +Cell[BoxData["8.559598046903748`"], "Output", + CellChangeTimes->{3.9913265339749985`*^9, 3.993831926994883*^9}, CellLabel-> - "Out[135]=",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] + "Out[147]=",ExpressionUUID->"9c6a3d5d-258c-484a-be70-dfaca76358a4"] }, Open ]], Cell[CellGroupData[{ @@ -12287,68 +14785,81 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917999175346184`*^9},ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-\ -bed1f30b804b"], + CellChangeTimes->{3.9917999175346184`*^9}, + CellLabel-> + "In[148]:=",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 136, 77, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340092525`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.067298701992005`*^-87\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 148, 61, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.99383192703461*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], +In[148]:=",ExpressionUUID->"f81599bd-89ec-4723-b174-bdec7f373192"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 136, 78, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340202503`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.968837391171106`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 148, 62, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.993831927041748*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], +In[148]:=",ExpressionUUID->"b76c0198-1d23-49b3-9a6e-8e994040ccdb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 136, - 79, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340282536`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1670391335897967`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 148, 63, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.993831927047194*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], +In[148]:=",ExpressionUUID->"1a58ccb7-0c16-414a-b2a6-1769dc346042"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 136, 80, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340354958`*^9}, +during this calculation.\"", 2, 148, 64, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.993831927051895*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], +In[148]:=",ExpressionUUID->"b4ec93d4-bc75-4273-9f80-7c97ca68b12f"], -Cell[BoxData["8.00378114722308`"], "Output", - CellChangeTimes->{3.9913265375649567`*^9}, +Cell[BoxData["2.4094785139404444`"], "Output", + CellChangeTimes->{3.9913265375649567`*^9, 3.9938319320757847`*^9}, CellLabel-> - "Out[136]=",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] + "Out[148]=",ExpressionUUID->"3fd8c6c0-50f9-4053-bcab-46a68dae5ef7"] }, Open ]], Cell[CellGroupData[{ @@ -12406,92 +14917,112 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917999220519733`*^9},ExpressionUUID->"d5c5d0e8-862b-f245-8b21-\ -eac61b5b75d3"], + CellChangeTimes->{3.9917999220519733`*^9}, + CellLabel-> + "In[149]:=",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV0Xc41X8UB3BCmRUqSktG0fIzL6lz7L1uJbPsJEmURCglRaVEmZHU/RKJ +JFTiUoSUUXYpo+w9Qvw+/XWf1/N+n3M+3+eKOpykOy9hYWFZz8rC8u+3X16i +cI5NFpsClrSofefDHY9O886BLNKP8o/tdOBDB6dLkzuNZfGHu3PgNm0+jBGL +/GZnI4u5whP6KtJ8yJaS9ey9rywWCzhnPxzjxZb7fQcis2UxvN9l+sZlXrwW +Y5coJSaHl3x8bEsyeLAn3HCXxVJ55DwksTtuOTeuN7AWCl8lj7p3/PzPT3Ih +nduNpWiLPK559OHjmTYuLLoaWicG8jjPY+SWmc6F0SFMn+Gz8riqsvLtbl0u +1Ayivb3SK49Mpj6vXygnPvASN31RrYDJmXcsutYsw5xvxeHCbQrYapjfXLCw +FJn6tuX+/QpoWNb5l+pZil1b7u5T51bE1tTGkfq8pShZv2znJx1F5DPbw7Sy +WIoZcv1cvUxF7Ms4ErUhmQPzJ7JL1xcoofzIl4p5NXb8YGe8GFShhExxodju +HezYUt2n0tmohKW3cxq6hdhxLlUsJ21KCR99FcIdQ2y472B0sqI8DSesXzFr +4tmw7IVvgGkWDR978W6ynFuCn31A6fIjZTx2mm/zVCUrnqhJjE/KVcaO2J9z +s/msyC05v1hYqow116bmBRmsqPUlv2L0hzI+5RQRDb7EioVyslZHNqpgRsyK +WsO9rJg6Ih6gck8FxQ+mfg7LZUFfN+7Skat7MNp7ukvDYRFWM1238sbswW2h +dt08GouQs7Y8fCtjDw7wzB6eFluEwYpLBw6/24MzAcmStJ4FcNj6t7uKVRUF +PxX02rgvgGHXMCfDTxVzPqhfFwj6C6KHvxjbuu/FzR8DB3a8mYPU4hXlp/32 +ohW4cgw+nANJMX24fnUvFmgIsFeEzcGO30W7X6XuxccFY1hjMQeKXtTKte17 +Ueuy4QPhqVkwvOJf12C0D7dFqgdfV5gFn6ei5oa7AdXdrsN/5TMws9KmxnEv +YDVTKVg4ewb8ve9q+xsAarq81RSKn4ELNB6l9KOAkfvNf1qdnIFw5oQQZzIg +c9XO59PCM2Da3zlgz4notinj9inPaXBezHu64Rxi8NI6ocLdU7BqmUhUyQXE +h6yDMsXrpoC5POic81XE+0ez6d84pmDzRh3NzHuI76PoexzaJqFNtbFZNQ8x +p+j2mZCwSaD7TbPbjCMOlQjFbu6fgH2TStZxJ9SwkZvd4PfrcRicj8d9Z9Rw +69pc8YL0cUhgZ5H8eV4NXUeq4u7HjMMfwYoRqetqWCcSN/X49DjkylpcKUhX +Q1P5mSfpO8dB2tM3u+mXGq70WuXq+nAMhPrzlwk5qKNXRd/31YmjQJvhnqYd +U8dwvRLtQzdHwYrDtsfKUx1Tl7WupIJGIWET67v7geq4Kyst9KzDKGw5oBcs +Ga+ObaE/+Ku3jcKuN83zCg3qyM6l6q6aPwLaEbOjB7Q10M95pOha6TC4Jhj+ +8DHSQK4XTywepg3DtbT7n2MOaGCfE+12Y8QwVJeqZ7U5aKCUxVvHCJthoM+E +uTsFaeCBAk1l5ekhsLUX+eWdr4FbgopOWf83BKflVNsipTVx5mpF0or8AbBR +HP5+6z9N/FDPmZH3YAA0lVM6b9I00WHyUJt3+AAIAmd/mLYmDlnv15I5MgA5 ++g1/gh008cXui5efLhuAEXt3Ie84TbxVOHX6iU0/HL+VQN/PrYUqTab1S9b0 +Af2OibkZvxZeiTotgUv6QOXuEisTYS3sElrz/NZQL3AnuNobSGphS2et9PHy +XqAY8p4a6lq452qJEptfL/QUVd+Q89NCm+hBn8yfv8FhcL5CsE8Lt1xt4bMt ++QUv309Npo1qoRPPkkzbp7+AN3lkC/7RQv3V9+ZOxZOc3nXenVMbK8/e0P1y +huT5VTLvJLXxb/e0wOXtv+BFcFyMj6M25oQtmHvE9QCnMM21uU0b77B6LGkN +6YZMde9lSZ900HW2TDDuZiecFrXe9/yrDqb6WVi3XOgEVRaNM+XtOvhYYurI +Vu9OqH4j0Dncr4Nvl7e6/jrUCQO0nCLk1MWVk0Uzf0U7QXr36JmfqIvZIqfU +z+X/BErkZJdEji6mDrIaGw39gNQJt5KMKD0M/z6/wPTrgOa0WFHLBD0UKpOV +7PLogOVHKi5ypOphm1Pe65WOHXDug4T64ed6mJnkwHbdoAOM73cwV9Tp4cc3 +Ije4NnTAHx3zMq8V+njWmGNQ+vJ3MI5XK6eF6aNqhKeA4rZvMKMm/LEsyAD5 +wyKZzPRWmBhgqBmFGqDd2+PLrWJaYfieUt6XmwZoeOrBPOuVVugZNE/qSTTA +UW1l30v2rdAQG32K87UBSsRF/NFf2wrZowJrDGcM8LLTi8a28BZwe8B3pN7T +EDl+8/2OPt8M7Sxsoz/sjVBgsVt+8GojGGZfOPnb1QjxO3eItH8jFNovDA6d +NEI57TsDXica4S7zT99cgBE+1S77Kk5vBNPLI12r44zw7KP5AZ71jcBc9q1J +r84IU9I3jbVnf4XHywuKs9WN8bdNirp+9xfwWH/y1kUxE8wIFQ/cdawB9B/K +0TZvN8G36fUfhm0aQFJ65nuRrAl6trFZvzJtgHali7vn1UxwS+o+8VO0BjDc +f6fGx84EE6ul/zPnbACpsJe87okm2GGQeOBvWj2MzQVpPuExRRGFn6L+E3Xw +9FhFcXSIKbJ2VDHkUmvhS9aDteLXTHGb52fl7rhamJ/088q5booGOXffJd6u +BYPgneKf7pgidYszWyyoFn7HRYZypphiwzurrcFWtSBabWPsX2SKnBnSkpcF +aiFq12ir3bQp7hr+bOcV+hn8xtdObz9mhodetj3wWfYJmlLvOi09YYac89FN +WVM1oGguWNfhaYZRyvWSU901MJbPmxnta4Yrj0o1pZXVgFvgosNiqBmawxmF +jOAasOTqrql7bIZKNYEowFoDtE3PHp/rMsO8xdJz/Ms+wqS+tnn5ETrqhrpu +Oa1QBYpnxz9GONJRi8NkvHlrFfg+TNayOErHpcf7mHrrqmB2bla+14OOHyT8 +VHQWK2EhI0uQJ5COETYpkfkfKmHpirW1xgl0dG+9o37CrhKE6vsNvjbR8UDg +7QOdUR9A2fq2WrfZfnzCm/tSQ7gC6tYmupXJHUCu0hHXwkfvYN3jS6+pbQcx +zLHMX8alFPI7pA2N+cwxqNvD51tCCWxsGDnqM2iOrgssCvHrikEu+nbGw45D +mBY/94Hb8Q0kso/viiy1wIVljEKv9a8gT213S0iBJQKr+cpnM/kQoxTGP59u +hT4hlidvSL6ET62Prshdt8abgueLlNNfwAujBHHPCzbY+iR9dQbmwuiJ/Swe +TrY4LSKSf1b4OUxqS7kOaRzGxxwtsW+EcoAabJ7xVjyCta87EzZuyQaLB48c +bXnt8PP4iy9bLZ7B8xyDI2yhdqj6xVE0b1cWKIvU/bn2xw6pjd8O645lgljH +0ZbaY/aImWuPpHRkQBfPcZOETntssr7/8knbE/h809hR56ADdpzapurG9QSi +fJN4znx2wGJ1x/cJGunwumjxj6OeI9pRqT30+2nwX4k8bauBI6Lnet8NCWnw +uPSYT5+hI3YcwXO9sWlwu6J+zNPUEZNF/1SERKeBSx2jP+CQI7IcU7jz6Xoa +8PeYtN9zdsTiq0vPM/xJzpdcXHWR5PQr085WabDCBkPlConZA7S41qfB5lXl +n9a/JvdYvhSyr0sDmWoj4aVFZD7G8h2rcBrQVa3TmkrI/QCMYVmVBlHrfaoC +PpD5oyzS/LxpsK79yYqKJvL+VaYpAfMUiB8WirGZdsTNlWyiF79RoGw3RIXI +O2GHa47pBgYFj2NHvI0VnTD5UEjJ3UcUrKof2ydEc8ILveWB/KkUDGlNN1B7 +nJBl4Fo79wMKUrezsFarO+HmyVvifPEULJ/mtxQwc8Li4YlEkwgKum4ocCWd +IPulNp2p9KXArFyp4ehJst+0bNz9LAVFLCpJMqfIvNrbvJU+FMR671NgnnZC +O91SThtvCowtdey7/Z0Q492+snpQUCBuWbA9jLznoEzXNUcKbr46fyz/Mcm3 +xSqEmVBwQvaesi9F7qdQ362MKTBMy+aipZPc40bhDiMKuO/1pL3MJPPxfEsa +9CkI8TLty8slubdXnYw2BeelxI+/YJL5Vx+NxPZS4Havyj3nG/lek3j7vu0U +6C3vUfXqIPO1uRUd0hRsC2Hhk/1J+sffWDVJUdDjpZCZ3U36VQMLlVspsDdO +Gnw2QPbHcmgUiVFgweHtkTVL8vX1UW0iFOh4r/PMWOOMGDq8b5qXAmbSFf1I +YWdkkTI3X+ShQLV6TNx3HfH2+HJOYhmJqmaNjaQvw/pyExcFaxv9NVolnLH4 +ukCZLQcF/Srta7gVSH/iq8e6BQZELEl+c3S/M14YpNdGjTCAezdvjNFB0v/L +9rF8mAGXrX295A6RnGPDhvkhBvjmmm5dtCL5YG+B6yAD7F1Yb991ILbP+WHW +xwC5Sgend6eIjccrHLsY0HhbgkfsFvH2K3OXmxnwFPhcf98m9wMZqwabyP7B +ibLMO+S9Dyzp5sSyemWBtHvEkTx7djQy4CaL45jRfTLvO1zU3cAA7ZPJzb4Z +JC9K9Y/4zIANG64q7ntKvM2tjot4ovLkHbZn5L1PNQxDPjEgRRKMbj4n95Ja +qKAaBvxtby9+WEj6VUpswdUMyDUUoWoqSH+dsfSbCgaEzy7hiKok/S5bSo/Y +geqzt6wm1lfUbSxnwEr2QpGuT2T+2cTA5HsGuL+yiPjzlcxrJlbgOwaISd/1 +Ee8mLv+Vz8tkwGxjQH1vD5nfO6P/pIQBn0OcZbJ+E9/J+6tPHPhDvk95gLh5 +vuxGMQNaYuptTcbJ97LONm1+y4DIZfxafqwuWOzF4Ap4zYDXY+3Wp9lckKXt +7Rlx4l/t6V4eHCT3PaH78RUDVHM1kx24XBC3oqgYcY+d75w+PzFv6/3vBeT9 +hloCWoIueCEqZ28k8R4lASlYTeaz76prE9/iyzCXW0v2t2sF5uSTvPB7togo +me+NeRX/kgEujzIqVouRvHP7NUviW7fOfV8hQexz8LUwcY+LIB+7FPEvxf3x +eSQX1HEdkCEeqVbLfsGAwgXBoB5Zcv9mhoofcXdvR3SHPLlv+zZGk1il2K+0 +gUZ8mH65PZcBXe5PN75Bcr+EU3gz8XILf4WX6mTfayvliecMUNbQNczWJPuW +R7z9QHxz7c9zj3RJv8x/1pc4nz3rVpI+6buJZdGJO4f9GbGGpN8bXrGTmPZ+ +9ZcbpsSSF6V+55D/O/tnfyidzJ9d9CwnvpGQtST4APE70Q0U8U8vPRkfC/K+ +dNrDE8R8h9foeFqR/eKiAXRiml6nrZvNv/dHv6L9m98UEH7YjuRLeV24iPO5 +9VMsHMi9R+x149lk3+SaAroT6TufSflOzPej85OhC+mvs2qsJqZVP+vRdiX9 +9qeer4gdXgb8RTeSC3l6PCG+kaK/ao87mfeM+5xAnH9DaLuCB+n3SN+L+Lff +t0tttyfpF25kXiLmdcq2kPIi3+PrbXaOWMkk8KTYadKfltTy/LdfxeDKBh/S +N1dKdCW+LiGcKORLzPLQ0oE4b2X3c34/0qdc/WyJf8xlV/KcJ/cNQhct/+3/ +FfiDI5D05RZ+HyJWrDOYWQwi+VC14j//D2ZjSfY= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12505,104 +15036,122 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV0Xc41X8UB3BCmRUqSktG0fIzL6lz7L1uJbPsJEmURCglRaVEmZHU/RKJ +JFTiUoSUUXYpo+w9Qvw+/XWf1/N+n3M+3+eKOpykOy9hYWFZz8rC8u+3X16i +cI5NFpsClrSofefDHY9O886BLNKP8o/tdOBDB6dLkzuNZfGHu3PgNm0+jBGL +/GZnI4u5whP6KtJ8yJaS9ey9rywWCzhnPxzjxZb7fQcis2UxvN9l+sZlXrwW +Y5coJSaHl3x8bEsyeLAn3HCXxVJ55DwksTtuOTeuN7AWCl8lj7p3/PzPT3Ih +nduNpWiLPK559OHjmTYuLLoaWicG8jjPY+SWmc6F0SFMn+Gz8riqsvLtbl0u +1Ayivb3SK49Mpj6vXygnPvASN31RrYDJmXcsutYsw5xvxeHCbQrYapjfXLCw +FJn6tuX+/QpoWNb5l+pZil1b7u5T51bE1tTGkfq8pShZv2znJx1F5DPbw7Sy +WIoZcv1cvUxF7Ms4ErUhmQPzJ7JL1xcoofzIl4p5NXb8YGe8GFShhExxodju +HezYUt2n0tmohKW3cxq6hdhxLlUsJ21KCR99FcIdQ2y472B0sqI8DSesXzFr +4tmw7IVvgGkWDR978W6ynFuCn31A6fIjZTx2mm/zVCUrnqhJjE/KVcaO2J9z +s/msyC05v1hYqow116bmBRmsqPUlv2L0hzI+5RQRDb7EioVyslZHNqpgRsyK +WsO9rJg6Ih6gck8FxQ+mfg7LZUFfN+7Skat7MNp7ukvDYRFWM1238sbswW2h +dt08GouQs7Y8fCtjDw7wzB6eFluEwYpLBw6/24MzAcmStJ4FcNj6t7uKVRUF +PxX02rgvgGHXMCfDTxVzPqhfFwj6C6KHvxjbuu/FzR8DB3a8mYPU4hXlp/32 +ohW4cgw+nANJMX24fnUvFmgIsFeEzcGO30W7X6XuxccFY1hjMQeKXtTKte17 +Ueuy4QPhqVkwvOJf12C0D7dFqgdfV5gFn6ei5oa7AdXdrsN/5TMws9KmxnEv +YDVTKVg4ewb8ve9q+xsAarq81RSKn4ELNB6l9KOAkfvNf1qdnIFw5oQQZzIg +c9XO59PCM2Da3zlgz4notinj9inPaXBezHu64Rxi8NI6ocLdU7BqmUhUyQXE +h6yDMsXrpoC5POic81XE+0ez6d84pmDzRh3NzHuI76PoexzaJqFNtbFZNQ8x +p+j2mZCwSaD7TbPbjCMOlQjFbu6fgH2TStZxJ9SwkZvd4PfrcRicj8d9Z9Rw +69pc8YL0cUhgZ5H8eV4NXUeq4u7HjMMfwYoRqetqWCcSN/X49DjkylpcKUhX +Q1P5mSfpO8dB2tM3u+mXGq70WuXq+nAMhPrzlwk5qKNXRd/31YmjQJvhnqYd +U8dwvRLtQzdHwYrDtsfKUx1Tl7WupIJGIWET67v7geq4Kyst9KzDKGw5oBcs +Ga+ObaE/+Ku3jcKuN83zCg3qyM6l6q6aPwLaEbOjB7Q10M95pOha6TC4Jhj+ +8DHSQK4XTywepg3DtbT7n2MOaGCfE+12Y8QwVJeqZ7U5aKCUxVvHCJthoM+E +uTsFaeCBAk1l5ekhsLUX+eWdr4FbgopOWf83BKflVNsipTVx5mpF0or8AbBR +HP5+6z9N/FDPmZH3YAA0lVM6b9I00WHyUJt3+AAIAmd/mLYmDlnv15I5MgA5 ++g1/gh008cXui5efLhuAEXt3Ie84TbxVOHX6iU0/HL+VQN/PrYUqTab1S9b0 +Af2OibkZvxZeiTotgUv6QOXuEisTYS3sElrz/NZQL3AnuNobSGphS2et9PHy +XqAY8p4a6lq452qJEptfL/QUVd+Q89NCm+hBn8yfv8FhcL5CsE8Lt1xt4bMt ++QUv309Npo1qoRPPkkzbp7+AN3lkC/7RQv3V9+ZOxZOc3nXenVMbK8/e0P1y +huT5VTLvJLXxb/e0wOXtv+BFcFyMj6M25oQtmHvE9QCnMM21uU0b77B6LGkN +6YZMde9lSZ900HW2TDDuZiecFrXe9/yrDqb6WVi3XOgEVRaNM+XtOvhYYurI +Vu9OqH4j0Dncr4Nvl7e6/jrUCQO0nCLk1MWVk0Uzf0U7QXr36JmfqIvZIqfU +z+X/BErkZJdEji6mDrIaGw39gNQJt5KMKD0M/z6/wPTrgOa0WFHLBD0UKpOV +7PLogOVHKi5ypOphm1Pe65WOHXDug4T64ed6mJnkwHbdoAOM73cwV9Tp4cc3 +Ije4NnTAHx3zMq8V+njWmGNQ+vJ3MI5XK6eF6aNqhKeA4rZvMKMm/LEsyAD5 +wyKZzPRWmBhgqBmFGqDd2+PLrWJaYfieUt6XmwZoeOrBPOuVVugZNE/qSTTA +UW1l30v2rdAQG32K87UBSsRF/NFf2wrZowJrDGcM8LLTi8a28BZwe8B3pN7T +EDl+8/2OPt8M7Sxsoz/sjVBgsVt+8GojGGZfOPnb1QjxO3eItH8jFNovDA6d +NEI57TsDXica4S7zT99cgBE+1S77Kk5vBNPLI12r44zw7KP5AZ71jcBc9q1J +r84IU9I3jbVnf4XHywuKs9WN8bdNirp+9xfwWH/y1kUxE8wIFQ/cdawB9B/K +0TZvN8G36fUfhm0aQFJ65nuRrAl6trFZvzJtgHali7vn1UxwS+o+8VO0BjDc +f6fGx84EE6ul/zPnbACpsJe87okm2GGQeOBvWj2MzQVpPuExRRGFn6L+E3Xw +9FhFcXSIKbJ2VDHkUmvhS9aDteLXTHGb52fl7rhamJ/088q5booGOXffJd6u +BYPgneKf7pgidYszWyyoFn7HRYZypphiwzurrcFWtSBabWPsX2SKnBnSkpcF +aiFq12ir3bQp7hr+bOcV+hn8xtdObz9mhodetj3wWfYJmlLvOi09YYac89FN +WVM1oGguWNfhaYZRyvWSU901MJbPmxnta4Yrj0o1pZXVgFvgosNiqBmawxmF +jOAasOTqrql7bIZKNYEowFoDtE3PHp/rMsO8xdJz/Ms+wqS+tnn5ETrqhrpu +Oa1QBYpnxz9GONJRi8NkvHlrFfg+TNayOErHpcf7mHrrqmB2bla+14OOHyT8 +VHQWK2EhI0uQJ5COETYpkfkfKmHpirW1xgl0dG+9o37CrhKE6vsNvjbR8UDg +7QOdUR9A2fq2WrfZfnzCm/tSQ7gC6tYmupXJHUCu0hHXwkfvYN3jS6+pbQcx +zLHMX8alFPI7pA2N+cwxqNvD51tCCWxsGDnqM2iOrgssCvHrikEu+nbGw45D +mBY/94Hb8Q0kso/viiy1wIVljEKv9a8gT213S0iBJQKr+cpnM/kQoxTGP59u +hT4hlidvSL6ET62Prshdt8abgueLlNNfwAujBHHPCzbY+iR9dQbmwuiJ/Swe +TrY4LSKSf1b4OUxqS7kOaRzGxxwtsW+EcoAabJ7xVjyCta87EzZuyQaLB48c +bXnt8PP4iy9bLZ7B8xyDI2yhdqj6xVE0b1cWKIvU/bn2xw6pjd8O645lgljH +0ZbaY/aImWuPpHRkQBfPcZOETntssr7/8knbE/h809hR56ADdpzapurG9QSi +fJN4znx2wGJ1x/cJGunwumjxj6OeI9pRqT30+2nwX4k8bauBI6Lnet8NCWnw +uPSYT5+hI3YcwXO9sWlwu6J+zNPUEZNF/1SERKeBSx2jP+CQI7IcU7jz6Xoa +8PeYtN9zdsTiq0vPM/xJzpdcXHWR5PQr085WabDCBkPlConZA7S41qfB5lXl +n9a/JvdYvhSyr0sDmWoj4aVFZD7G8h2rcBrQVa3TmkrI/QCMYVmVBlHrfaoC +PpD5oyzS/LxpsK79yYqKJvL+VaYpAfMUiB8WirGZdsTNlWyiF79RoGw3RIXI +O2GHa47pBgYFj2NHvI0VnTD5UEjJ3UcUrKof2ydEc8ILveWB/KkUDGlNN1B7 +nJBl4Fo79wMKUrezsFarO+HmyVvifPEULJ/mtxQwc8Li4YlEkwgKum4ocCWd +IPulNp2p9KXArFyp4ehJst+0bNz9LAVFLCpJMqfIvNrbvJU+FMR671NgnnZC +O91SThtvCowtdey7/Z0Q492+snpQUCBuWbA9jLznoEzXNUcKbr46fyz/Mcm3 +xSqEmVBwQvaesi9F7qdQ362MKTBMy+aipZPc40bhDiMKuO/1pL3MJPPxfEsa +9CkI8TLty8slubdXnYw2BeelxI+/YJL5Vx+NxPZS4Havyj3nG/lek3j7vu0U +6C3vUfXqIPO1uRUd0hRsC2Hhk/1J+sffWDVJUdDjpZCZ3U36VQMLlVspsDdO +Gnw2QPbHcmgUiVFgweHtkTVL8vX1UW0iFOh4r/PMWOOMGDq8b5qXAmbSFf1I +YWdkkTI3X+ShQLV6TNx3HfH2+HJOYhmJqmaNjaQvw/pyExcFaxv9NVolnLH4 +ukCZLQcF/Srta7gVSH/iq8e6BQZELEl+c3S/M14YpNdGjTCAezdvjNFB0v/L +9rF8mAGXrX295A6RnGPDhvkhBvjmmm5dtCL5YG+B6yAD7F1Yb991ILbP+WHW +xwC5Sgend6eIjccrHLsY0HhbgkfsFvH2K3OXmxnwFPhcf98m9wMZqwabyP7B +ibLMO+S9Dyzp5sSyemWBtHvEkTx7djQy4CaL45jRfTLvO1zU3cAA7ZPJzb4Z +JC9K9Y/4zIANG64q7ntKvM2tjot4ovLkHbZn5L1PNQxDPjEgRRKMbj4n95Ja +qKAaBvxtby9+WEj6VUpswdUMyDUUoWoqSH+dsfSbCgaEzy7hiKok/S5bSo/Y +geqzt6wm1lfUbSxnwEr2QpGuT2T+2cTA5HsGuL+yiPjzlcxrJlbgOwaISd/1 +Ee8mLv+Vz8tkwGxjQH1vD5nfO6P/pIQBn0OcZbJ+E9/J+6tPHPhDvk95gLh5 +vuxGMQNaYuptTcbJ97LONm1+y4DIZfxafqwuWOzF4Ap4zYDXY+3Wp9lckKXt +7Rlx4l/t6V4eHCT3PaH78RUDVHM1kx24XBC3oqgYcY+d75w+PzFv6/3vBeT9 +hloCWoIueCEqZ28k8R4lASlYTeaz76prE9/iyzCXW0v2t2sF5uSTvPB7togo +me+NeRX/kgEujzIqVouRvHP7NUviW7fOfV8hQexz8LUwcY+LIB+7FPEvxf3x +eSQX1HEdkCEeqVbLfsGAwgXBoB5Zcv9mhoofcXdvR3SHPLlv+zZGk1il2K+0 +gUZ8mH65PZcBXe5PN75Bcr+EU3gz8XILf4WX6mTfayvliecMUNbQNczWJPuW +R7z9QHxz7c9zj3RJv8x/1pc4nz3rVpI+6buJZdGJO4f9GbGGpN8bXrGTmPZ+ +9ZcbpsSSF6V+55D/O/tnfyidzJ9d9CwnvpGQtST4APE70Q0U8U8vPRkfC/K+ +dNrDE8R8h9foeFqR/eKiAXRiml6nrZvNv/dHv6L9m98UEH7YjuRLeV24iPO5 +9VMsHMi9R+x149lk3+SaAroT6TufSflOzPej85OhC+mvs2qsJqZVP+vRdiX9 +9qeer4gdXgb8RTeSC3l6PCG+kaK/ao87mfeM+5xAnH9DaLuCB+n3SN+L+Lff +t0tttyfpF25kXiLmdcq2kPIi3+PrbXaOWMkk8KTYadKfltTy/LdfxeDKBh/S +N1dKdCW+LiGcKORLzPLQ0oE4b2X3c34/0qdc/WyJf8xlV/KcJ/cNQhct/+3/ +FfiDI5D05RZ+HyJWrDOYWQwi+VC14j//D2ZjSfY= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0., 3.7340123207102174`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12614,21 +15163,19 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.7340123207102174`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12642,102 +15189,121 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV0Xc41X8UB3BCmRUqSktG0fIzL6lz7L1uJbPsJEmURCglRaVEmZHU/RKJ +JFTiUoSUUXYpo+w9Qvw+/XWf1/N+n3M+3+eKOpykOy9hYWFZz8rC8u+3X16i +cI5NFpsClrSofefDHY9O886BLNKP8o/tdOBDB6dLkzuNZfGHu3PgNm0+jBGL +/GZnI4u5whP6KtJ8yJaS9ey9rywWCzhnPxzjxZb7fQcis2UxvN9l+sZlXrwW +Y5coJSaHl3x8bEsyeLAn3HCXxVJ55DwksTtuOTeuN7AWCl8lj7p3/PzPT3Ih +nduNpWiLPK559OHjmTYuLLoaWicG8jjPY+SWmc6F0SFMn+Gz8riqsvLtbl0u +1Ayivb3SK49Mpj6vXygnPvASN31RrYDJmXcsutYsw5xvxeHCbQrYapjfXLCw +FJn6tuX+/QpoWNb5l+pZil1b7u5T51bE1tTGkfq8pShZv2znJx1F5DPbw7Sy +WIoZcv1cvUxF7Ms4ErUhmQPzJ7JL1xcoofzIl4p5NXb8YGe8GFShhExxodju +HezYUt2n0tmohKW3cxq6hdhxLlUsJ21KCR99FcIdQ2y472B0sqI8DSesXzFr +4tmw7IVvgGkWDR978W6ynFuCn31A6fIjZTx2mm/zVCUrnqhJjE/KVcaO2J9z +s/msyC05v1hYqow116bmBRmsqPUlv2L0hzI+5RQRDb7EioVyslZHNqpgRsyK +WsO9rJg6Ih6gck8FxQ+mfg7LZUFfN+7Skat7MNp7ukvDYRFWM1238sbswW2h +dt08GouQs7Y8fCtjDw7wzB6eFluEwYpLBw6/24MzAcmStJ4FcNj6t7uKVRUF +PxX02rgvgGHXMCfDTxVzPqhfFwj6C6KHvxjbuu/FzR8DB3a8mYPU4hXlp/32 +ohW4cgw+nANJMX24fnUvFmgIsFeEzcGO30W7X6XuxccFY1hjMQeKXtTKte17 +Ueuy4QPhqVkwvOJf12C0D7dFqgdfV5gFn6ei5oa7AdXdrsN/5TMws9KmxnEv +YDVTKVg4ewb8ve9q+xsAarq81RSKn4ELNB6l9KOAkfvNf1qdnIFw5oQQZzIg +c9XO59PCM2Da3zlgz4notinj9inPaXBezHu64Rxi8NI6ocLdU7BqmUhUyQXE +h6yDMsXrpoC5POic81XE+0ez6d84pmDzRh3NzHuI76PoexzaJqFNtbFZNQ8x +p+j2mZCwSaD7TbPbjCMOlQjFbu6fgH2TStZxJ9SwkZvd4PfrcRicj8d9Z9Rw +69pc8YL0cUhgZ5H8eV4NXUeq4u7HjMMfwYoRqetqWCcSN/X49DjkylpcKUhX +Q1P5mSfpO8dB2tM3u+mXGq70WuXq+nAMhPrzlwk5qKNXRd/31YmjQJvhnqYd +U8dwvRLtQzdHwYrDtsfKUx1Tl7WupIJGIWET67v7geq4Kyst9KzDKGw5oBcs +Ga+ObaE/+Ku3jcKuN83zCg3qyM6l6q6aPwLaEbOjB7Q10M95pOha6TC4Jhj+ +8DHSQK4XTywepg3DtbT7n2MOaGCfE+12Y8QwVJeqZ7U5aKCUxVvHCJthoM+E +uTsFaeCBAk1l5ekhsLUX+eWdr4FbgopOWf83BKflVNsipTVx5mpF0or8AbBR +HP5+6z9N/FDPmZH3YAA0lVM6b9I00WHyUJt3+AAIAmd/mLYmDlnv15I5MgA5 ++g1/gh008cXui5efLhuAEXt3Ie84TbxVOHX6iU0/HL+VQN/PrYUqTab1S9b0 +Af2OibkZvxZeiTotgUv6QOXuEisTYS3sElrz/NZQL3AnuNobSGphS2et9PHy +XqAY8p4a6lq452qJEptfL/QUVd+Q89NCm+hBn8yfv8FhcL5CsE8Lt1xt4bMt ++QUv309Npo1qoRPPkkzbp7+AN3lkC/7RQv3V9+ZOxZOc3nXenVMbK8/e0P1y +huT5VTLvJLXxb/e0wOXtv+BFcFyMj6M25oQtmHvE9QCnMM21uU0b77B6LGkN +6YZMde9lSZ900HW2TDDuZiecFrXe9/yrDqb6WVi3XOgEVRaNM+XtOvhYYurI +Vu9OqH4j0Dncr4Nvl7e6/jrUCQO0nCLk1MWVk0Uzf0U7QXr36JmfqIvZIqfU +z+X/BErkZJdEji6mDrIaGw39gNQJt5KMKD0M/z6/wPTrgOa0WFHLBD0UKpOV +7PLogOVHKi5ypOphm1Pe65WOHXDug4T64ed6mJnkwHbdoAOM73cwV9Tp4cc3 +Ije4NnTAHx3zMq8V+njWmGNQ+vJ3MI5XK6eF6aNqhKeA4rZvMKMm/LEsyAD5 +wyKZzPRWmBhgqBmFGqDd2+PLrWJaYfieUt6XmwZoeOrBPOuVVugZNE/qSTTA +UW1l30v2rdAQG32K87UBSsRF/NFf2wrZowJrDGcM8LLTi8a28BZwe8B3pN7T +EDl+8/2OPt8M7Sxsoz/sjVBgsVt+8GojGGZfOPnb1QjxO3eItH8jFNovDA6d +NEI57TsDXica4S7zT99cgBE+1S77Kk5vBNPLI12r44zw7KP5AZ71jcBc9q1J +r84IU9I3jbVnf4XHywuKs9WN8bdNirp+9xfwWH/y1kUxE8wIFQ/cdawB9B/K +0TZvN8G36fUfhm0aQFJ65nuRrAl6trFZvzJtgHali7vn1UxwS+o+8VO0BjDc +f6fGx84EE6ul/zPnbACpsJe87okm2GGQeOBvWj2MzQVpPuExRRGFn6L+E3Xw +9FhFcXSIKbJ2VDHkUmvhS9aDteLXTHGb52fl7rhamJ/088q5booGOXffJd6u +BYPgneKf7pgidYszWyyoFn7HRYZypphiwzurrcFWtSBabWPsX2SKnBnSkpcF +aiFq12ir3bQp7hr+bOcV+hn8xtdObz9mhodetj3wWfYJmlLvOi09YYac89FN +WVM1oGguWNfhaYZRyvWSU901MJbPmxnta4Yrj0o1pZXVgFvgosNiqBmawxmF +jOAasOTqrql7bIZKNYEowFoDtE3PHp/rMsO8xdJz/Ms+wqS+tnn5ETrqhrpu +Oa1QBYpnxz9GONJRi8NkvHlrFfg+TNayOErHpcf7mHrrqmB2bla+14OOHyT8 +VHQWK2EhI0uQJ5COETYpkfkfKmHpirW1xgl0dG+9o37CrhKE6vsNvjbR8UDg +7QOdUR9A2fq2WrfZfnzCm/tSQ7gC6tYmupXJHUCu0hHXwkfvYN3jS6+pbQcx +zLHMX8alFPI7pA2N+cwxqNvD51tCCWxsGDnqM2iOrgssCvHrikEu+nbGw45D +mBY/94Hb8Q0kso/viiy1wIVljEKv9a8gT213S0iBJQKr+cpnM/kQoxTGP59u +hT4hlidvSL6ET62Prshdt8abgueLlNNfwAujBHHPCzbY+iR9dQbmwuiJ/Swe +TrY4LSKSf1b4OUxqS7kOaRzGxxwtsW+EcoAabJ7xVjyCta87EzZuyQaLB48c +bXnt8PP4iy9bLZ7B8xyDI2yhdqj6xVE0b1cWKIvU/bn2xw6pjd8O645lgljH +0ZbaY/aImWuPpHRkQBfPcZOETntssr7/8knbE/h809hR56ADdpzapurG9QSi +fJN4znx2wGJ1x/cJGunwumjxj6OeI9pRqT30+2nwX4k8bauBI6Lnet8NCWnw +uPSYT5+hI3YcwXO9sWlwu6J+zNPUEZNF/1SERKeBSx2jP+CQI7IcU7jz6Xoa +8PeYtN9zdsTiq0vPM/xJzpdcXHWR5PQr085WabDCBkPlConZA7S41qfB5lXl +n9a/JvdYvhSyr0sDmWoj4aVFZD7G8h2rcBrQVa3TmkrI/QCMYVmVBlHrfaoC +PpD5oyzS/LxpsK79yYqKJvL+VaYpAfMUiB8WirGZdsTNlWyiF79RoGw3RIXI +O2GHa47pBgYFj2NHvI0VnTD5UEjJ3UcUrKof2ydEc8ILveWB/KkUDGlNN1B7 +nJBl4Fo79wMKUrezsFarO+HmyVvifPEULJ/mtxQwc8Li4YlEkwgKum4ocCWd +IPulNp2p9KXArFyp4ehJst+0bNz9LAVFLCpJMqfIvNrbvJU+FMR671NgnnZC +O91SThtvCowtdey7/Z0Q492+snpQUCBuWbA9jLznoEzXNUcKbr46fyz/Mcm3 +xSqEmVBwQvaesi9F7qdQ362MKTBMy+aipZPc40bhDiMKuO/1pL3MJPPxfEsa +9CkI8TLty8slubdXnYw2BeelxI+/YJL5Vx+NxPZS4Havyj3nG/lek3j7vu0U +6C3vUfXqIPO1uRUd0hRsC2Hhk/1J+sffWDVJUdDjpZCZ3U36VQMLlVspsDdO +Gnw2QPbHcmgUiVFgweHtkTVL8vX1UW0iFOh4r/PMWOOMGDq8b5qXAmbSFf1I +YWdkkTI3X+ShQLV6TNx3HfH2+HJOYhmJqmaNjaQvw/pyExcFaxv9NVolnLH4 +ukCZLQcF/Srta7gVSH/iq8e6BQZELEl+c3S/M14YpNdGjTCAezdvjNFB0v/L +9rF8mAGXrX295A6RnGPDhvkhBvjmmm5dtCL5YG+B6yAD7F1Yb991ILbP+WHW +xwC5Sgend6eIjccrHLsY0HhbgkfsFvH2K3OXmxnwFPhcf98m9wMZqwabyP7B +ibLMO+S9Dyzp5sSyemWBtHvEkTx7djQy4CaL45jRfTLvO1zU3cAA7ZPJzb4Z +JC9K9Y/4zIANG64q7ntKvM2tjot4ovLkHbZn5L1PNQxDPjEgRRKMbj4n95Ja +qKAaBvxtby9+WEj6VUpswdUMyDUUoWoqSH+dsfSbCgaEzy7hiKok/S5bSo/Y +geqzt6wm1lfUbSxnwEr2QpGuT2T+2cTA5HsGuL+yiPjzlcxrJlbgOwaISd/1 +Ee8mLv+Vz8tkwGxjQH1vD5nfO6P/pIQBn0OcZbJ+E9/J+6tPHPhDvk95gLh5 +vuxGMQNaYuptTcbJ97LONm1+y4DIZfxafqwuWOzF4Ap4zYDXY+3Wp9lckKXt +7Rlx4l/t6V4eHCT3PaH78RUDVHM1kx24XBC3oqgYcY+d75w+PzFv6/3vBeT9 +hloCWoIueCEqZ28k8R4lASlYTeaz76prE9/iyzCXW0v2t2sF5uSTvPB7togo +me+NeRX/kgEujzIqVouRvHP7NUviW7fOfV8hQexz8LUwcY+LIB+7FPEvxf3x +eSQX1HEdkCEeqVbLfsGAwgXBoB5Zcv9mhoofcXdvR3SHPLlv+zZGk1il2K+0 +gUZ8mH65PZcBXe5PN75Bcr+EU3gz8XILf4WX6mTfayvliecMUNbQNczWJPuW +R7z9QHxz7c9zj3RJv8x/1pc4nz3rVpI+6buJZdGJO4f9GbGGpN8bXrGTmPZ+ +9ZcbpsSSF6V+55D/O/tnfyidzJ9d9CwnvpGQtST4APE70Q0U8U8vPRkfC/K+ +dNrDE8R8h9foeFqR/eKiAXRiml6nrZvNv/dHv6L9m98UEH7YjuRLeV24iPO5 +9VMsHMi9R+x149lk3+SaAroT6TufSflOzPej85OhC+mvs2qsJqZVP+vRdiX9 +9qeer4gdXgb8RTeSC3l6PCG+kaK/ao87mfeM+5xAnH9DaLuCB+n3SN+L+Lff +t0tttyfpF25kXiLmdcq2kPIi3+PrbXaOWMkk8KTYadKfltTy/LdfxeDKBh/S +N1dKdCW+LiGcKORLzPLQ0oE4b2X3c34/0qdc/WyJf8xlV/KcJ/cNQhct/+3/ +FfiDI5D05RZ+HyJWrDOYWQwi+VC14j//D2ZjSfY= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "PlotRange" -> {{0, 180}, {0., 3.7340123207102174`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12747,7 +15313,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6007907022525477}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12775,7 +15342,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.7340123207102174`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12783,9 +15351,9 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913267728125134`*^9}, + CellChangeTimes->{3.9913267728125134`*^9, 3.993832278817481*^9}, CellLabel-> - "Out[137]=",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] + "Out[149]=",ExpressionUUID->"9466ebdb-3323-422d-9480-3f40d1c959eb"] }, Open ]], Cell[CellGroupData[{ @@ -12848,154 +15416,216 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799933259697*^9, - 3.9917999365172615`*^9}},ExpressionUUID->"201ddeed-58e9-7047-8ad4-\ -c179c9adcae7"], + CellChangeTimes->{{3.991799933259697*^9, 3.9917999365172615`*^9}}, + CellLabel-> + "In[150]:=",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.962223088138177`*^-266\\\", \ -\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 81, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773051552*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.037440301291125`*^-242\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 150, 65, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.993832278916843*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], +In[150]:=",ExpressionUUID->"899a1208-e5b4-44d0-be99-3c5be9975e2b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.450949205829742`*^-278\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 82, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730605392`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.844211986126448`*^-250\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 150, 66, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.9938322789232817`*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], +In[150]:=",ExpressionUUID->"51b1ea51-42f0-4a58-b650-bf21a0c85956"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4109778485455803`*^-289\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 138, 83, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730685368`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.797597425083339`*^-258\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 150, 67, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.993832278927785*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], +In[150]:=",ExpressionUUID->"c5756e75-3dfc-4ffc-90c9-3c624b06082b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 138, 84, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773076536*^9}, +during this calculation.\"", 2, 150, 68, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.9938322789315357`*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], +In[150]:=",ExpressionUUID->"6f73f0b5-fbf1-4569-9e0c-bbdf222a63b5"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8bAHCprGTPe+3skTLudbnX86DsrDIrK4qUUSKjkBEpKUoqMzSU +so7Q+tIiSZkhpC2zjFLyO7+/zuv9OuPzOs865yPvG+Lkz87Gxla2go3t/8f5 +oZbHiuklxm2T/7J8tW2Nu/Ilokz6joFlcd2H+n41QNFXvhJ9Z+HgNtWvsf0M +iHC40buyrxiO5r3cbNdvBYKT4md/91YB5yj/rvm37jB8zy5ktrcJ9lwY0X3e +FwjmimPvZnrfQHFBeKlqVxT87qWfm+4dhaj77IsP/kuDZrOrJa+Lf8JIVZuM +7rGLIDVc/9lXcwkCTPq1+u2vgMg+rxucZitRo37mVGn3NTi70bzRzpkL75rF +FZ03qgDtAXcLVgAX5otoj+yzq4C2pP2dGjFc+O5k9KSBTwVw9GV/5yriwtHb +qv5VKRUQc/QDtXmcCwNCl9XVX1eA34v4WHoSNyo2br+p6ncbaP6NLLlqHryV +ynlD1uQOvL2w4dGMwFpMFnkXM2ZXCRc7y/kjlNbiqEt643XXSvDgU/FaZKxF +mux+V1/vShhMlP7HvmstZtX5XnwYVgkjwTxMkdq1ON+pzKueXQlfN32so7nz +oVf7kdJ7vZXwazrndkwRP+YVfv2vxb0K6jWEl5dr+ZHrS6rVHZ8qiN6dYZfU +yo+Z0xvHTgdWwd+BpImTP/mRbuoaYhhVBfEf7oq+UhDAbuFJF+aFKkhqL906 +Ei6Am/O9JX90VUF6SdwrdklBDP0xxqJYVYO1XqCQ6DpB3HGYObdsXw1cj52c +VbQE8YSKWfeQSzUkfVAasDERRPu5czypftUQq9D2OTtQEF9wGKmlxlVDcKHE +P+UGQfRQmTY0rqkGx8uVmjbbhTDcR640WqIGBDQvhez0F8KGkXm/RJkaaG9M +qgoJEUKdBbv1yYo1YD3gapCdKIQT66/1H9xQA6aUf2bvyoWwOrE/ZcmiBvQu +WG8P+SuEBX5iRf8dqgHx7A9pWXnC2LEu3pq7rQYkNGqTfpUJowjL8dzbjhqg +NKXE7bwjjERTT/OV7hqQmVY7pNIsjN+DzF4oDdeAkm2od+NXYbQfUYobmakB +3VVLtA+6Iii2+773BrFasA8X+6jTKoL7VZxfMzxqwWHN16GcThGU4PwYbO5Z +C07F9W//DopglXv3lK1vLbh07Hj1dEoEyz+eu2yxtxZ2al5p8BAVRYFQjas/ +o2oh6KP2mWPeouju0ksoX6iF49usjN/Mi2JZ4YrVf17VAqWmncK+Qgxvr/Te +lt5ZCxXC2xY2rhFDgS8CCSK9tdDzxvPOGVkxzLpOPSQ4VAuKjuEKjpZi+HUg +YaD2ey00bSng6MgVQ9lshs311QS43FL8sHxFDN9b2Dx/xkXAGO+Nh9oVYqji +rqw9vIYAwbaaw6ebxNCqqvf+L0ECvK1bx+y+i6Hd8S2/e6QJWDKfa3/JFMdv +XIVPUI+AzLLo8iVzcbSSPLh1kkaAIgdbqpajOHb5bhjIZhBg+4TH5JS/ON5x +nRpsMybgoplctW2GOAY+Gm/5akmAAdrkvBgWR7GCfrfX2wloK+g4+OebOHKe +2STC70muv+zsoDErjia25u82exNw/IE3dzqXBPo+PZSX70dADzMixnqjBO7y +WrX0dx8BBxlFXi3HJDDw/UJkcCwB1oV8szYnJfBQoZui7FECFDhjU9vPSeDq +Z309LXEEdHS5VHZek8D7QpZb1yYSsD6Ud+VQO3l9zoeXtmkErO6NyvHuk8BN +c+tfvTxBwCDri8aH9xJIvPszYnmSgPQ1Tdu+zkrgOow20jpNwNeyyLIfFEms +yN/4oyKbgIdrPxkeUpRE732FeWznCTgf7vRqQUsSh2ZO+9nmELDZVOvXX5TE +Hdfyrd/kElD8btSKc48k6m56WJCTT0DUJoehtFBJVD2wx76hgACH8vsHeKMl +sd5NTbm3kIDlwxcuCZ6SxM1PftotFxOwQ8RuglotiTWOv+q4rxKgG9OYkH9P +EjctVLUukeYZVRWTfyqJi8OEwPg1AupvrwTlt5KoTB9i1t0g8ykW1nltVBJL +WWrK2eUEBBwZ2qMxLomfq3mtgm4SIGZTn7lhWRJPa6425aogYKJSWamai4JS +81up7aQfS2TX6wtRcEtDhV7GbTIfn4NHDZUoOJsgsn7pDhnvBEW9zTYUFIfZ +wPPVBFz9eub5s20U1LH6HLa+hoCj9ss7rD0p+KqZ9uwRaS3p/mT7MApe3/DU +u6uWgFVJFpQ30RRE9fBrzgSZj7Gaim1JFIwq8Nz0mvSJu6d73XMoKPtpKK6u +jgAf2aWgwUIKKvDOKSjcJestZS+b1w0KHnazlD9OWmCiN/t9NQVn7PNjP5P+ +snWzmt99CtrmPqBhPQEPGqruf35KwbDFA47ZpM/LyzkFdlCw3OV4+yjpTVOL +0cEfKBgqyrMQ3EDmyzJb/b9xCnImmhwpJ11RpNUvPE9Bh+cvS0ZJf1h8mrZ7 +mYI/fgeGiDQSILHNm1HPRcWbYp1DSHrLrd9f1whR8cjq57N7SB/jyLrgSaWS +/ctdnUa6zkvTslKRilsOeVDLSI/ffbKwcj0V1SFO+z5peSGvqy50KgYEGs+0 +k3YJ+uVyHanYZ+PtO0A6/fEZjr9WVCySup00SvqRtAZht5WKCZPz7h9Jz0U8 +9i/aQUWr26s/jpBW79gpOutPxZXK5Yp9pD3VFh6bh1AxeOaudCvprGOZ4bmH +qSiZwv6aIP18QE1xPIGKE5o7MZ/0X73mTuN0KjqtKNwfT3pjxo7EM9nkelNX +PHaS3v1lTudjHhW/VJlx65O+hKdHaVep6Nm1PYaTdEeu6tm0O1SMvdZa1UXG +b/XP/0wG66n4YUto5WXShrbbZ9Y3U/FE+fooL9IhpbOFCW1UXA7+tkaadMm/ +Uw5d3VR8xpMS1E3m662rCpvKMBXTar7nppLmq3x0O+orFX13rcylkTbj8fBq +m6Hixva6vcNkPRze9ZNP9g8V3wfOCSSSHhVVDn68VgrFq5+ONpD1JR7yUFpc +XAr/TBsJ2ZO2fe72MlBOCj/ELkkPkfVIRKdr8utKIRFh9GacrN/vnYqDPkwp +fCl79eg+0nJaD9JrNkvhaBqL/wtZ7yeGp8fc3aSQq3jgYxvZHw8NTly86SOF +4f+GtQxIz55ZZ728VwqlDnHtyq8i87HJ5XrJESkMsnmdu72SAJ3rjXumiqXw +7q2psFyyH/ewO4ub3iTPbyG2Dd4i4PL2yafZtVIocHNUl0Kag09e2fC5FIbI +35xKIfu9/0DKx6QJKby0VjxHkZwP/G2y2b3zUrg5VTQHyPmxSaneTJ1NGvPv +ypc4l5H13fu9+JWQNEq+7po4UEJAAtPRh2IgjZolYjEHyPlk6Zn/g24qjeyt +LqL25Pzii/+e6Gwrja5cXtNK5Hy73JxcluktjQ7lrw42XSLgrnXDd440adz9 +pH+JIOfltNu6iJ9vpbHxXMTZzHSy/qNDOQU/SmO/kX2qEDmPj16+f2H9pDT+ +Mlv4npFKAO+Ia2MguwymmRpxRSYToLLnJNuIugwayZR8WkXOe89DcyfaYmSQ +lX68STKMAKUcU6mxZBn8l9j1wyzk//10+hZnpgzSuQcfBuwnIPqvWodpiQyy +xwgziwMJOJfoKVrfJoOvHRwEu33I79WZZwWl0rKo1N3XzXQk67Eit+boQ1l0 +flPgqK5Jxqu3fWnyuSxm96Y86lMjwI5tlYXXG1lsp+zrOqZCwC6n4LfwSRZd +Yk7MtSgQYB4jHxe/Wg6d5h/6K0oSECo7f8VEQw69ocicl/x+P95TMNEcIYfn +Xb7FN7ytBau/DKHYGDnMNtMvHe2phfbMLppevBw61FGaObpq4W09d3xJmhxe +1IifN22vhck14ULJl+VwVc+x4+lNtSBxx5Ju3iSH/Y321V43amHfr5n452vl +0cX/gqdKZC0Yhu0W+ywkj5H1N91OHqwFrrH+8pUS8lhbFbs8HlILpQPNPcYK +8hhMjfcpCqiFoQfnNGtp8piheba/x538X0pm9BV5yeMnN4WHkUa1oCOUoB1T +KY9Zl7L8b/ypgd8aAkNazgrInsobnBdaA/N5lARdDwW0K/njJruvBmb5lRQZ +Xgo4xhe3kLenBiZ/MvZuClTAvVHCO8941sBo4655jyMK6J6jruFoWwOtNnV8 +qaUKWB8+1kdXqYGLQZ4wOqeA6yR5r9X3VwOz/Gbh+fPr0GfXbl4HRjXMCFl7 +uzQp4mLxRMPWn5Xw8aS3ywFOZTzsdPRceeQdsJqKtPpEU8FLTB/j2/wVML6L +62BNnCpad93XPfH9BrlfEWc/3qSG1Y53sg6PXgWhl8oZd6bU8V/AdxcFlVKQ +Sr3tQKNpoiNd4Sa4F8MFDYaA8B4tNE1tDGp8UwCtFBP9n2fW49E696/6+y+B +oVRTpnaPNuYf65fcK5UDfCuLw32ObcA4qw7BqqQskEmQZborb8SsI3c6CsUz +gVtpB+H0bCMy4WnlfztPwHqW5O3InToY3kGXtKhOhup1gX/YvXXQdlVY19nC +ZDDgqbfI8NXBvOFAi++nksG0122kZI8OxoRUY1NAMriEXRB8E6aDkfTRWU7Z +ZIgrFQ/XTNFBKz+p5YlTSdCxVozxvkIHiQEesRWHEuHAkFCzNZsupnvCrPye +BHj+dMf9G+y6aGtxePVRtwSQuV1Wx7OadEb0mo9WCdAaZ3izlVsXC1uTPr7U +TAAFed9z1sK62Jyz0VHiZzy83lW5x1pZFx97KVkkJcTDhm/2vNa2umhx6JuR +nk0cTP086Wx1QReHHqWYZgrHwmBfkUveRV08FlhQFfUnBlrvE64zl8n7/fg1 +wj/EQMnxEffcIl2MP90rfLk6Bjyoep7fbuiiSsGmd8S2GHhiOrA77b4u5qp6 +CAlejIZLZ9QOt4zqYrjKD22ZjVFgof30opWWHhYP04+2Z0SAG4fltg5tPZQW +rtu0KioC9r5rWeuqo4e8mbdu2eyKgIz0l/F+dD0Myy5g8RtEQM+Xrt1xJnqo +esxRL2D0EPgVftCpddbDocrUw26Gh+CY4IoXckf1kGm14/LY/EF48NPoz0K7 +HjofeLk5vzAMitrqfLe+1kPXHrXd1MwwSCrVba3o1ENWQHtFaVwYWLlq5Pr3 +6eHVNrXc955h0NVAoXe+10OzJd3ZOekwGEv4faBiVg+1zv7oT8sPBTGBujE/ +ij7WftLXtXcKgWBNnf7X/vrYmmTyTPxJEBxaoCx6BejjPVHJnG9XgyC2aSVl +cq8+zvSav+4+EQTpbt3uPKH6uNv8EWPJIQiuJR1+axqtjxvfH+1IHtoLo4MP ++qoz9HGeXtW7/18guJyy6T1Xp4+62v8+SjgGAGvSr8udm4ZdBZzZ0yx/EGu0 +KL63hob3eHsfOqv6w+Rx9VBZPhrWaO0Rbhfyh3z56TWfhGgonLnmz8IXP/i3 +LcYsVIqGG7ek2Wln+cHDxjNVKdo09IzP1ZCb2AUmaQ8yq51p+H0pTuNWhS9s +VpTYsraYhserdvJd9veGmokn8n4lNLyTzZVev80bFOsOzjeU0cj4/nL+bOYN +q6xfFQSU01B668y1/Qre0BSS8qO5hobGdUtcfo+8wLhxNif6GQ0/d/N58t/3 +BJrT69Ev4zR89+dH98a2HVBGjasznqJhb8/sjEjFDhD9pHny3AxpcfVPwpk7 +YDYyVd9snoZ7tTL++G3bAVV5kJq/TEN1c58sx6HtoP3tlpazEB15fjhPmix4 +gGr8icNNdDquV5O5PsF0h3tGpattDenoxPK1HpZ1B4eFh2e7mXScszUtmGR3 +h8PBcze/mtAx2uDHkn+LGzzf4f2ez5aOFfusW2pc3SCAQbPe7k3HFNnDefei +XOH6j/fU2VQ6NpdYFj9/4wzGFX+vHUmn4whLLwXrneFNoDiNM4OOy1LneDsL +nGFxxNaBkkVHPt6rxRb7ncH6VV0S5tExc/Gf3z5uZxgrPzVxspKONp15f0+b +bwN1f8ZDpX46egyPBxV2OsFpBbvFxEE6KjXwx9x/4ASzw776o0N0jLGqsZy6 +7gQPPE6W53+gY5+G3tvMeCdwchjOEZ+gI0PS/1PLeieIMkoO5WYzwL+elsdW +nXaE54Kv5SeUDDD3WHyfoqcDaL36tMNG1QC5DHyP3rVxgLMnF3OuqxugsE3V +E0+GA+zgVOTbrW2AzMaRhVERB5j6G7E4ZGCA49897TNz7UHsq1Rnh40BNv4Z +T5qKswP/BwFJNWEGuEr8APfSbluY3D8WuTmc3LVSbpzoN7OFw9L7gnoiDNDg +TIbhsJwtnIgNcfoVY4B7HeH0zgEbuGMYIcdMMUDlXfXTak428JdIvNd80QAf +c2WLvje3hrO382ffNBvgP/z9oNXGEqS85L7uemqAZ18I/zXXsoRSvuKB2ecG ++Kul6+MnPku4u7+0SazdAC+OaG5If2MB7zRuZnr0GeAEu/tsyHYLUL1Wrzk6 +boA/Fa3vJR00h4eFXX4zogzsOcEuMNe4CUZs5b0iJBgo6XfGe0XxJmD7vd/9 +D4WBQkcjNTVSN4GpI6fdajkG/opl/69n2yZ4usKQLqnOwIF8x1snpsygzbeA +28SYgf03ln1s1c2gX3FvReZuBobm/Tl8oMYE/nQQ10QDGejD3yy7kGcCUkdW +XrkYxMCf7X+azx03gZ3dl3NKQsnnZS5clNtuAiPJr+LvRjOQM3PflcCVJvDl +s97WkQwG/j0kHFjlhjB7bXlBu46BfDcbZAfUjeGzi3lhWj35PpEr1C9xGEPf +qlOWHxoZiP0nfx8bZUGjNyX3/CMG8jzisGu5yIJjEvqGSy0M3JMUfFFzLQsE +UvfGtg4y0GFu8JzmbyPQ3NPN5s9uiJOcEWz8EwyQEZW6/mCVIfqvZmrGvWSA +QLOvowSnIV7v0UgSqmDAT5npohdrDFGcQ1erOIQBDT08Zjqihuj7bvCiz6wB +WJpj8rKKIWY5fVk0XWUAu5TKuS9uMcSwpTH7MiYNop947lV2MMQVqbh5XIYG +mf5CL6qcDLHn+H9VLitocK806uQLV0OsLMtwufBUH0SULfmXfAxxz5r9Qa1O ++vBU+ZOId4QhemYcznoWpgfqqrJyygWGqLQlOIPaogP4/E18VZEhDsnKDpbe +1gGXgJT3xiXk9ecVvtmf14HEaxPFrtcN0e+xXjW7nw4Mqt5TSqs2RJ7ISK1h +Nh3IUHPXGH9miD67dd2ccSPMqGfRqqYNkfntVWj2DW3oa8PNwj8N0ZWwEppP +0IZHwZNbw+fI9Yci/zvurg0ZVVZhtEVDlLSyjzXk1gZ1Q7abDSuNkE37UXfv +3vXga7VfvlnMCHfzfDd+StOCrj0WvF1MIzwR6pwoNa0OjdxzFH0wwgIh33Vy +L9WhuLxY7byJEWa4GTdvuaEOoVNL5m7mRhjGu9lW2V8d1kbWJAzaG+Fn+ZVn +nw2qgXmK/MJHXyMcadH6fqVTFe6W/Hk/l2qEutnCLtlDykAzC1+wTjfCnapP +WiX/U4ba9+O8haeMsP9aYljTFWWokhmiW581wqL5t/diA5Xh5oVHp/IvGeHp +qzdUz8wrQeHJZIZFhREu5tyokxBXgrRw/jMXOo3QduTSbEnoOuASTi2b6DbC +H4r5cVau6yClku2eaZ8RCtpP3+M1XgdJkzOfxweN8E134LPJNevgaEAX0+Sz +Ea6cp4RJX1eAAztyv377Ra7n0aDJ9U0ePDatI/cuTLTi8gvWOSoHS11cfM1y +TNR50iZ4frccFPpPDlivY6KLp/46SXs5+JxSH+mhysT/1A4vxMrJwYEW+9tR +Okz8xlacHJwmCyfsYmXumjNRbTD4SrmSDDS4df/VC2GivMzpktg0Kuz81tB6 +L4yJB4tTU874UIEtuvDCpnAmWoeEOQ0yqGB+KUhvWxQTt55+mCf0nQJv3q3Y +dzCRiRqVXK2L9hQY810/UJnDxMCo6ivx6ySBuv94/fpHTPx3oHbdjSkxyFje +rZ/exMQHPSM7oUMM2M+aV355zMRtvKrNf++IwRix+nphCxNHi646TR0Qgwa2 +pAtCnUxsKosLrPglCh7Z8ZHzn5iooDpO27dGFC40Ruk/WMPC8YIgiQpbYeC1 +c6+k8LFwxcZnK2c2CkP8iIFWpAALN9QLnnURF4aA1b8UN4iysMz04I/UUSGg +20eIFMuwkPfpSquUaCHoGT3wM3kjC7+JDgo8uiMIojz7Kre4svAr39VhGX0B +KDE7Ej3tzsIXZyVZz6gCoHMkwyxrBwvnPncS2ewCYDd9p7vPh4WKE1n7mUX8 +kNIz93vXPhae1d628GKQD34Vx5lGJ7CwLax8zMhnLfQbZXWWlZP3Wy5yvbzM +AwGHSi5bVbBQkN3ySPkBHpivqPUfv8NChc5nic8teUBIoW9hI0G+j9ng1L05 +brDhkpa6/4iF+3+vXUh24oZ7XWV+nd0sJKScb9uLc4E1312tiD4WPqv3H56a +5oQ+i5Z5iQEW4hWOgy2tnDDb8D3Vc4SFM5ttjqvEcYJW0YZb38ZY2Kze3ZIy +xgH3+k0iTk6w0LQ4L+rbEw6wFtkK2tMszB0vpiYWccDu44deh8+R8Xj5e5WH +OwfMPkq5KP6LhZ8bU2rO63PAscWcXQ2LLJRwfarMLcQBAnrXNXcusdBt8LFA +5eRqyN/fMLe8zMJA+oRKxovV8D+Om+Xr "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13009,113 +15639,171 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV13c8Vf8bAHCprGTPe+3skTLudbnX86DsrDIrK4qUUSKjkBEpKUoqMzSU +so7Q+tIiSZkhpC2zjFLyO7+/zuv9OuPzOs865yPvG+Lkz87Gxla2go3t/8f5 +oZbHiuklxm2T/7J8tW2Nu/Ilokz6joFlcd2H+n41QNFXvhJ9Z+HgNtWvsf0M +iHC40buyrxiO5r3cbNdvBYKT4md/91YB5yj/rvm37jB8zy5ktrcJ9lwY0X3e +FwjmimPvZnrfQHFBeKlqVxT87qWfm+4dhaj77IsP/kuDZrOrJa+Lf8JIVZuM +7rGLIDVc/9lXcwkCTPq1+u2vgMg+rxucZitRo37mVGn3NTi70bzRzpkL75rF +FZ03qgDtAXcLVgAX5otoj+yzq4C2pP2dGjFc+O5k9KSBTwVw9GV/5yriwtHb +qv5VKRUQc/QDtXmcCwNCl9XVX1eA34v4WHoSNyo2br+p6ncbaP6NLLlqHryV +ynlD1uQOvL2w4dGMwFpMFnkXM2ZXCRc7y/kjlNbiqEt643XXSvDgU/FaZKxF +mux+V1/vShhMlP7HvmstZtX5XnwYVgkjwTxMkdq1ON+pzKueXQlfN32so7nz +oVf7kdJ7vZXwazrndkwRP+YVfv2vxb0K6jWEl5dr+ZHrS6rVHZ8qiN6dYZfU +yo+Z0xvHTgdWwd+BpImTP/mRbuoaYhhVBfEf7oq+UhDAbuFJF+aFKkhqL906 +Ei6Am/O9JX90VUF6SdwrdklBDP0xxqJYVYO1XqCQ6DpB3HGYObdsXw1cj52c +VbQE8YSKWfeQSzUkfVAasDERRPu5czypftUQq9D2OTtQEF9wGKmlxlVDcKHE +P+UGQfRQmTY0rqkGx8uVmjbbhTDcR640WqIGBDQvhez0F8KGkXm/RJkaaG9M +qgoJEUKdBbv1yYo1YD3gapCdKIQT66/1H9xQA6aUf2bvyoWwOrE/ZcmiBvQu +WG8P+SuEBX5iRf8dqgHx7A9pWXnC2LEu3pq7rQYkNGqTfpUJowjL8dzbjhqg +NKXE7bwjjERTT/OV7hqQmVY7pNIsjN+DzF4oDdeAkm2od+NXYbQfUYobmakB +3VVLtA+6Iii2+773BrFasA8X+6jTKoL7VZxfMzxqwWHN16GcThGU4PwYbO5Z +C07F9W//DopglXv3lK1vLbh07Hj1dEoEyz+eu2yxtxZ2al5p8BAVRYFQjas/ +o2oh6KP2mWPeouju0ksoX6iF49usjN/Mi2JZ4YrVf17VAqWmncK+Qgxvr/Te +lt5ZCxXC2xY2rhFDgS8CCSK9tdDzxvPOGVkxzLpOPSQ4VAuKjuEKjpZi+HUg +YaD2ey00bSng6MgVQ9lshs311QS43FL8sHxFDN9b2Dx/xkXAGO+Nh9oVYqji +rqw9vIYAwbaaw6ebxNCqqvf+L0ECvK1bx+y+i6Hd8S2/e6QJWDKfa3/JFMdv +XIVPUI+AzLLo8iVzcbSSPLh1kkaAIgdbqpajOHb5bhjIZhBg+4TH5JS/ON5x +nRpsMybgoplctW2GOAY+Gm/5akmAAdrkvBgWR7GCfrfX2wloK+g4+OebOHKe +2STC70muv+zsoDErjia25u82exNw/IE3dzqXBPo+PZSX70dADzMixnqjBO7y +WrX0dx8BBxlFXi3HJDDw/UJkcCwB1oV8szYnJfBQoZui7FECFDhjU9vPSeDq +Z309LXEEdHS5VHZek8D7QpZb1yYSsD6Ud+VQO3l9zoeXtmkErO6NyvHuk8BN +c+tfvTxBwCDri8aH9xJIvPszYnmSgPQ1Tdu+zkrgOow20jpNwNeyyLIfFEms +yN/4oyKbgIdrPxkeUpRE732FeWznCTgf7vRqQUsSh2ZO+9nmELDZVOvXX5TE +Hdfyrd/kElD8btSKc48k6m56WJCTT0DUJoehtFBJVD2wx76hgACH8vsHeKMl +sd5NTbm3kIDlwxcuCZ6SxM1PftotFxOwQ8RuglotiTWOv+q4rxKgG9OYkH9P +EjctVLUukeYZVRWTfyqJi8OEwPg1AupvrwTlt5KoTB9i1t0g8ykW1nltVBJL +WWrK2eUEBBwZ2qMxLomfq3mtgm4SIGZTn7lhWRJPa6425aogYKJSWamai4JS +81up7aQfS2TX6wtRcEtDhV7GbTIfn4NHDZUoOJsgsn7pDhnvBEW9zTYUFIfZ +wPPVBFz9eub5s20U1LH6HLa+hoCj9ss7rD0p+KqZ9uwRaS3p/mT7MApe3/DU +u6uWgFVJFpQ30RRE9fBrzgSZj7Gaim1JFIwq8Nz0mvSJu6d73XMoKPtpKK6u +jgAf2aWgwUIKKvDOKSjcJestZS+b1w0KHnazlD9OWmCiN/t9NQVn7PNjP5P+ +snWzmt99CtrmPqBhPQEPGqruf35KwbDFA47ZpM/LyzkFdlCw3OV4+yjpTVOL +0cEfKBgqyrMQ3EDmyzJb/b9xCnImmhwpJ11RpNUvPE9Bh+cvS0ZJf1h8mrZ7 +mYI/fgeGiDQSILHNm1HPRcWbYp1DSHrLrd9f1whR8cjq57N7SB/jyLrgSaWS +/ctdnUa6zkvTslKRilsOeVDLSI/ffbKwcj0V1SFO+z5peSGvqy50KgYEGs+0 +k3YJ+uVyHanYZ+PtO0A6/fEZjr9WVCySup00SvqRtAZht5WKCZPz7h9Jz0U8 +9i/aQUWr26s/jpBW79gpOutPxZXK5Yp9pD3VFh6bh1AxeOaudCvprGOZ4bmH +qSiZwv6aIP18QE1xPIGKE5o7MZ/0X73mTuN0KjqtKNwfT3pjxo7EM9nkelNX +PHaS3v1lTudjHhW/VJlx65O+hKdHaVep6Nm1PYaTdEeu6tm0O1SMvdZa1UXG +b/XP/0wG66n4YUto5WXShrbbZ9Y3U/FE+fooL9IhpbOFCW1UXA7+tkaadMm/ +Uw5d3VR8xpMS1E3m662rCpvKMBXTar7nppLmq3x0O+orFX13rcylkTbj8fBq +m6Hixva6vcNkPRze9ZNP9g8V3wfOCSSSHhVVDn68VgrFq5+ONpD1JR7yUFpc +XAr/TBsJ2ZO2fe72MlBOCj/ELkkPkfVIRKdr8utKIRFh9GacrN/vnYqDPkwp +fCl79eg+0nJaD9JrNkvhaBqL/wtZ7yeGp8fc3aSQq3jgYxvZHw8NTly86SOF +4f+GtQxIz55ZZ728VwqlDnHtyq8i87HJ5XrJESkMsnmdu72SAJ3rjXumiqXw +7q2psFyyH/ewO4ub3iTPbyG2Dd4i4PL2yafZtVIocHNUl0Kag09e2fC5FIbI +35xKIfu9/0DKx6QJKby0VjxHkZwP/G2y2b3zUrg5VTQHyPmxSaneTJ1NGvPv +ypc4l5H13fu9+JWQNEq+7po4UEJAAtPRh2IgjZolYjEHyPlk6Zn/g24qjeyt +LqL25Pzii/+e6Gwrja5cXtNK5Hy73JxcluktjQ7lrw42XSLgrnXDd440adz9 +pH+JIOfltNu6iJ9vpbHxXMTZzHSy/qNDOQU/SmO/kX2qEDmPj16+f2H9pDT+ +Mlv4npFKAO+Ia2MguwymmRpxRSYToLLnJNuIugwayZR8WkXOe89DcyfaYmSQ +lX68STKMAKUcU6mxZBn8l9j1wyzk//10+hZnpgzSuQcfBuwnIPqvWodpiQyy +xwgziwMJOJfoKVrfJoOvHRwEu33I79WZZwWl0rKo1N3XzXQk67Eit+boQ1l0 +flPgqK5Jxqu3fWnyuSxm96Y86lMjwI5tlYXXG1lsp+zrOqZCwC6n4LfwSRZd +Yk7MtSgQYB4jHxe/Wg6d5h/6K0oSECo7f8VEQw69ocicl/x+P95TMNEcIYfn +Xb7FN7ytBau/DKHYGDnMNtMvHe2phfbMLppevBw61FGaObpq4W09d3xJmhxe +1IifN22vhck14ULJl+VwVc+x4+lNtSBxx5Ju3iSH/Y321V43amHfr5n452vl +0cX/gqdKZC0Yhu0W+ywkj5H1N91OHqwFrrH+8pUS8lhbFbs8HlILpQPNPcYK +8hhMjfcpCqiFoQfnNGtp8piheba/x538X0pm9BV5yeMnN4WHkUa1oCOUoB1T +KY9Zl7L8b/ypgd8aAkNazgrInsobnBdaA/N5lARdDwW0K/njJruvBmb5lRQZ +Xgo4xhe3kLenBiZ/MvZuClTAvVHCO8941sBo4655jyMK6J6jruFoWwOtNnV8 +qaUKWB8+1kdXqYGLQZ4wOqeA6yR5r9X3VwOz/Gbh+fPr0GfXbl4HRjXMCFl7 +uzQp4mLxRMPWn5Xw8aS3ywFOZTzsdPRceeQdsJqKtPpEU8FLTB/j2/wVML6L +62BNnCpad93XPfH9BrlfEWc/3qSG1Y53sg6PXgWhl8oZd6bU8V/AdxcFlVKQ +Sr3tQKNpoiNd4Sa4F8MFDYaA8B4tNE1tDGp8UwCtFBP9n2fW49E696/6+y+B +oVRTpnaPNuYf65fcK5UDfCuLw32ObcA4qw7BqqQskEmQZborb8SsI3c6CsUz +gVtpB+H0bCMy4WnlfztPwHqW5O3InToY3kGXtKhOhup1gX/YvXXQdlVY19nC +ZDDgqbfI8NXBvOFAi++nksG0122kZI8OxoRUY1NAMriEXRB8E6aDkfTRWU7Z +ZIgrFQ/XTNFBKz+p5YlTSdCxVozxvkIHiQEesRWHEuHAkFCzNZsupnvCrPye +BHj+dMf9G+y6aGtxePVRtwSQuV1Wx7OadEb0mo9WCdAaZ3izlVsXC1uTPr7U +TAAFed9z1sK62Jyz0VHiZzy83lW5x1pZFx97KVkkJcTDhm/2vNa2umhx6JuR +nk0cTP086Wx1QReHHqWYZgrHwmBfkUveRV08FlhQFfUnBlrvE64zl8n7/fg1 +wj/EQMnxEffcIl2MP90rfLk6Bjyoep7fbuiiSsGmd8S2GHhiOrA77b4u5qp6 +CAlejIZLZ9QOt4zqYrjKD22ZjVFgof30opWWHhYP04+2Z0SAG4fltg5tPZQW +rtu0KioC9r5rWeuqo4e8mbdu2eyKgIz0l/F+dD0Myy5g8RtEQM+Xrt1xJnqo +esxRL2D0EPgVftCpddbDocrUw26Gh+CY4IoXckf1kGm14/LY/EF48NPoz0K7 +HjofeLk5vzAMitrqfLe+1kPXHrXd1MwwSCrVba3o1ENWQHtFaVwYWLlq5Pr3 +6eHVNrXc955h0NVAoXe+10OzJd3ZOekwGEv4faBiVg+1zv7oT8sPBTGBujE/ +ij7WftLXtXcKgWBNnf7X/vrYmmTyTPxJEBxaoCx6BejjPVHJnG9XgyC2aSVl +cq8+zvSav+4+EQTpbt3uPKH6uNv8EWPJIQiuJR1+axqtjxvfH+1IHtoLo4MP ++qoz9HGeXtW7/18guJyy6T1Xp4+62v8+SjgGAGvSr8udm4ZdBZzZ0yx/EGu0 +KL63hob3eHsfOqv6w+Rx9VBZPhrWaO0Rbhfyh3z56TWfhGgonLnmz8IXP/i3 +LcYsVIqGG7ek2Wln+cHDxjNVKdo09IzP1ZCb2AUmaQ8yq51p+H0pTuNWhS9s +VpTYsraYhserdvJd9veGmokn8n4lNLyTzZVev80bFOsOzjeU0cj4/nL+bOYN +q6xfFQSU01B668y1/Qre0BSS8qO5hobGdUtcfo+8wLhxNif6GQ0/d/N58t/3 +BJrT69Ev4zR89+dH98a2HVBGjasznqJhb8/sjEjFDhD9pHny3AxpcfVPwpk7 +YDYyVd9snoZ7tTL++G3bAVV5kJq/TEN1c58sx6HtoP3tlpazEB15fjhPmix4 +gGr8icNNdDquV5O5PsF0h3tGpattDenoxPK1HpZ1B4eFh2e7mXScszUtmGR3 +h8PBcze/mtAx2uDHkn+LGzzf4f2ez5aOFfusW2pc3SCAQbPe7k3HFNnDefei +XOH6j/fU2VQ6NpdYFj9/4wzGFX+vHUmn4whLLwXrneFNoDiNM4OOy1LneDsL +nGFxxNaBkkVHPt6rxRb7ncH6VV0S5tExc/Gf3z5uZxgrPzVxspKONp15f0+b +bwN1f8ZDpX46egyPBxV2OsFpBbvFxEE6KjXwx9x/4ASzw776o0N0jLGqsZy6 +7gQPPE6W53+gY5+G3tvMeCdwchjOEZ+gI0PS/1PLeieIMkoO5WYzwL+elsdW +nXaE54Kv5SeUDDD3WHyfoqcDaL36tMNG1QC5DHyP3rVxgLMnF3OuqxugsE3V +E0+GA+zgVOTbrW2AzMaRhVERB5j6G7E4ZGCA49897TNz7UHsq1Rnh40BNv4Z +T5qKswP/BwFJNWEGuEr8APfSbluY3D8WuTmc3LVSbpzoN7OFw9L7gnoiDNDg +TIbhsJwtnIgNcfoVY4B7HeH0zgEbuGMYIcdMMUDlXfXTak428JdIvNd80QAf +c2WLvje3hrO382ffNBvgP/z9oNXGEqS85L7uemqAZ18I/zXXsoRSvuKB2ecG ++Kul6+MnPku4u7+0SazdAC+OaG5If2MB7zRuZnr0GeAEu/tsyHYLUL1Wrzk6 +boA/Fa3vJR00h4eFXX4zogzsOcEuMNe4CUZs5b0iJBgo6XfGe0XxJmD7vd/9 +D4WBQkcjNTVSN4GpI6fdajkG/opl/69n2yZ4usKQLqnOwIF8x1snpsygzbeA +28SYgf03ln1s1c2gX3FvReZuBobm/Tl8oMYE/nQQ10QDGejD3yy7kGcCUkdW +XrkYxMCf7X+azx03gZ3dl3NKQsnnZS5clNtuAiPJr+LvRjOQM3PflcCVJvDl +s97WkQwG/j0kHFjlhjB7bXlBu46BfDcbZAfUjeGzi3lhWj35PpEr1C9xGEPf +qlOWHxoZiP0nfx8bZUGjNyX3/CMG8jzisGu5yIJjEvqGSy0M3JMUfFFzLQsE +UvfGtg4y0GFu8JzmbyPQ3NPN5s9uiJOcEWz8EwyQEZW6/mCVIfqvZmrGvWSA +QLOvowSnIV7v0UgSqmDAT5npohdrDFGcQ1erOIQBDT08Zjqihuj7bvCiz6wB +WJpj8rKKIWY5fVk0XWUAu5TKuS9uMcSwpTH7MiYNop947lV2MMQVqbh5XIYG +mf5CL6qcDLHn+H9VLitocK806uQLV0OsLMtwufBUH0SULfmXfAxxz5r9Qa1O ++vBU+ZOId4QhemYcznoWpgfqqrJyygWGqLQlOIPaogP4/E18VZEhDsnKDpbe +1gGXgJT3xiXk9ecVvtmf14HEaxPFrtcN0e+xXjW7nw4Mqt5TSqs2RJ7ISK1h +Nh3IUHPXGH9miD67dd2ccSPMqGfRqqYNkfntVWj2DW3oa8PNwj8N0ZWwEppP +0IZHwZNbw+fI9Yci/zvurg0ZVVZhtEVDlLSyjzXk1gZ1Q7abDSuNkE37UXfv +3vXga7VfvlnMCHfzfDd+StOCrj0WvF1MIzwR6pwoNa0OjdxzFH0wwgIh33Vy +L9WhuLxY7byJEWa4GTdvuaEOoVNL5m7mRhjGu9lW2V8d1kbWJAzaG+Fn+ZVn +nw2qgXmK/MJHXyMcadH6fqVTFe6W/Hk/l2qEutnCLtlDykAzC1+wTjfCnapP +WiX/U4ba9+O8haeMsP9aYljTFWWokhmiW581wqL5t/diA5Xh5oVHp/IvGeHp +qzdUz8wrQeHJZIZFhREu5tyokxBXgrRw/jMXOo3QduTSbEnoOuASTi2b6DbC +H4r5cVau6yClku2eaZ8RCtpP3+M1XgdJkzOfxweN8E134LPJNevgaEAX0+Sz +Ea6cp4RJX1eAAztyv377Ra7n0aDJ9U0ePDatI/cuTLTi8gvWOSoHS11cfM1y +TNR50iZ4frccFPpPDlivY6KLp/46SXs5+JxSH+mhysT/1A4vxMrJwYEW+9tR +Okz8xlacHJwmCyfsYmXumjNRbTD4SrmSDDS4df/VC2GivMzpktg0Kuz81tB6 +L4yJB4tTU874UIEtuvDCpnAmWoeEOQ0yqGB+KUhvWxQTt55+mCf0nQJv3q3Y +dzCRiRqVXK2L9hQY810/UJnDxMCo6ivx6ySBuv94/fpHTPx3oHbdjSkxyFje +rZ/exMQHPSM7oUMM2M+aV355zMRtvKrNf++IwRix+nphCxNHi646TR0Qgwa2 +pAtCnUxsKosLrPglCh7Z8ZHzn5iooDpO27dGFC40Ruk/WMPC8YIgiQpbYeC1 +c6+k8LFwxcZnK2c2CkP8iIFWpAALN9QLnnURF4aA1b8UN4iysMz04I/UUSGg +20eIFMuwkPfpSquUaCHoGT3wM3kjC7+JDgo8uiMIojz7Kre4svAr39VhGX0B +KDE7Ej3tzsIXZyVZz6gCoHMkwyxrBwvnPncS2ewCYDd9p7vPh4WKE1n7mUX8 +kNIz93vXPhae1d628GKQD34Vx5lGJ7CwLax8zMhnLfQbZXWWlZP3Wy5yvbzM +AwGHSi5bVbBQkN3ySPkBHpivqPUfv8NChc5nic8teUBIoW9hI0G+j9ng1L05 +brDhkpa6/4iF+3+vXUh24oZ7XWV+nd0sJKScb9uLc4E1312tiD4WPqv3H56a +5oQ+i5Z5iQEW4hWOgy2tnDDb8D3Vc4SFM5ttjqvEcYJW0YZb38ZY2Kze3ZIy +xgH3+k0iTk6w0LQ4L+rbEw6wFtkK2tMszB0vpiYWccDu44deh8+R8Xj5e5WH +OwfMPkq5KP6LhZ8bU2rO63PAscWcXQ2LLJRwfarMLcQBAnrXNXcusdBt8LFA +5eRqyN/fMLe8zMJA+oRKxovV8D+Om+Xr "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.08880450436020661}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13127,19 +15815,19 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.08880450436020661}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13153,112 +15841,170 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV13c8Vf8bAHCprGTPe+3skTLudbnX86DsrDIrK4qUUSKjkBEpKUoqMzSU +so7Q+tIiSZkhpC2zjFLyO7+/zuv9OuPzOs865yPvG+Lkz87Gxla2go3t/8f5 +oZbHiuklxm2T/7J8tW2Nu/Ilokz6joFlcd2H+n41QNFXvhJ9Z+HgNtWvsf0M +iHC40buyrxiO5r3cbNdvBYKT4md/91YB5yj/rvm37jB8zy5ktrcJ9lwY0X3e +FwjmimPvZnrfQHFBeKlqVxT87qWfm+4dhaj77IsP/kuDZrOrJa+Lf8JIVZuM +7rGLIDVc/9lXcwkCTPq1+u2vgMg+rxucZitRo37mVGn3NTi70bzRzpkL75rF +FZ03qgDtAXcLVgAX5otoj+yzq4C2pP2dGjFc+O5k9KSBTwVw9GV/5yriwtHb +qv5VKRUQc/QDtXmcCwNCl9XVX1eA34v4WHoSNyo2br+p6ncbaP6NLLlqHryV +ynlD1uQOvL2w4dGMwFpMFnkXM2ZXCRc7y/kjlNbiqEt643XXSvDgU/FaZKxF +mux+V1/vShhMlP7HvmstZtX5XnwYVgkjwTxMkdq1ON+pzKueXQlfN32so7nz +oVf7kdJ7vZXwazrndkwRP+YVfv2vxb0K6jWEl5dr+ZHrS6rVHZ8qiN6dYZfU +yo+Z0xvHTgdWwd+BpImTP/mRbuoaYhhVBfEf7oq+UhDAbuFJF+aFKkhqL906 +Ei6Am/O9JX90VUF6SdwrdklBDP0xxqJYVYO1XqCQ6DpB3HGYObdsXw1cj52c +VbQE8YSKWfeQSzUkfVAasDERRPu5czypftUQq9D2OTtQEF9wGKmlxlVDcKHE +P+UGQfRQmTY0rqkGx8uVmjbbhTDcR640WqIGBDQvhez0F8KGkXm/RJkaaG9M +qgoJEUKdBbv1yYo1YD3gapCdKIQT66/1H9xQA6aUf2bvyoWwOrE/ZcmiBvQu +WG8P+SuEBX5iRf8dqgHx7A9pWXnC2LEu3pq7rQYkNGqTfpUJowjL8dzbjhqg +NKXE7bwjjERTT/OV7hqQmVY7pNIsjN+DzF4oDdeAkm2od+NXYbQfUYobmakB +3VVLtA+6Iii2+773BrFasA8X+6jTKoL7VZxfMzxqwWHN16GcThGU4PwYbO5Z +C07F9W//DopglXv3lK1vLbh07Hj1dEoEyz+eu2yxtxZ2al5p8BAVRYFQjas/ +o2oh6KP2mWPeouju0ksoX6iF49usjN/Mi2JZ4YrVf17VAqWmncK+Qgxvr/Te +lt5ZCxXC2xY2rhFDgS8CCSK9tdDzxvPOGVkxzLpOPSQ4VAuKjuEKjpZi+HUg +YaD2ey00bSng6MgVQ9lshs311QS43FL8sHxFDN9b2Dx/xkXAGO+Nh9oVYqji +rqw9vIYAwbaaw6ebxNCqqvf+L0ECvK1bx+y+i6Hd8S2/e6QJWDKfa3/JFMdv +XIVPUI+AzLLo8iVzcbSSPLh1kkaAIgdbqpajOHb5bhjIZhBg+4TH5JS/ON5x +nRpsMybgoplctW2GOAY+Gm/5akmAAdrkvBgWR7GCfrfX2wloK+g4+OebOHKe +2STC70muv+zsoDErjia25u82exNw/IE3dzqXBPo+PZSX70dADzMixnqjBO7y +WrX0dx8BBxlFXi3HJDDw/UJkcCwB1oV8szYnJfBQoZui7FECFDhjU9vPSeDq +Z309LXEEdHS5VHZek8D7QpZb1yYSsD6Ud+VQO3l9zoeXtmkErO6NyvHuk8BN +c+tfvTxBwCDri8aH9xJIvPszYnmSgPQ1Tdu+zkrgOow20jpNwNeyyLIfFEms +yN/4oyKbgIdrPxkeUpRE732FeWznCTgf7vRqQUsSh2ZO+9nmELDZVOvXX5TE +Hdfyrd/kElD8btSKc48k6m56WJCTT0DUJoehtFBJVD2wx76hgACH8vsHeKMl +sd5NTbm3kIDlwxcuCZ6SxM1PftotFxOwQ8RuglotiTWOv+q4rxKgG9OYkH9P +EjctVLUukeYZVRWTfyqJi8OEwPg1AupvrwTlt5KoTB9i1t0g8ykW1nltVBJL +WWrK2eUEBBwZ2qMxLomfq3mtgm4SIGZTn7lhWRJPa6425aogYKJSWamai4JS +81up7aQfS2TX6wtRcEtDhV7GbTIfn4NHDZUoOJsgsn7pDhnvBEW9zTYUFIfZ +wPPVBFz9eub5s20U1LH6HLa+hoCj9ss7rD0p+KqZ9uwRaS3p/mT7MApe3/DU +u6uWgFVJFpQ30RRE9fBrzgSZj7Gaim1JFIwq8Nz0mvSJu6d73XMoKPtpKK6u +jgAf2aWgwUIKKvDOKSjcJestZS+b1w0KHnazlD9OWmCiN/t9NQVn7PNjP5P+ +snWzmt99CtrmPqBhPQEPGqruf35KwbDFA47ZpM/LyzkFdlCw3OV4+yjpTVOL +0cEfKBgqyrMQ3EDmyzJb/b9xCnImmhwpJ11RpNUvPE9Bh+cvS0ZJf1h8mrZ7 +mYI/fgeGiDQSILHNm1HPRcWbYp1DSHrLrd9f1whR8cjq57N7SB/jyLrgSaWS +/ctdnUa6zkvTslKRilsOeVDLSI/ffbKwcj0V1SFO+z5peSGvqy50KgYEGs+0 +k3YJ+uVyHanYZ+PtO0A6/fEZjr9WVCySup00SvqRtAZht5WKCZPz7h9Jz0U8 +9i/aQUWr26s/jpBW79gpOutPxZXK5Yp9pD3VFh6bh1AxeOaudCvprGOZ4bmH +qSiZwv6aIP18QE1xPIGKE5o7MZ/0X73mTuN0KjqtKNwfT3pjxo7EM9nkelNX +PHaS3v1lTudjHhW/VJlx65O+hKdHaVep6Nm1PYaTdEeu6tm0O1SMvdZa1UXG +b/XP/0wG66n4YUto5WXShrbbZ9Y3U/FE+fooL9IhpbOFCW1UXA7+tkaadMm/ +Uw5d3VR8xpMS1E3m662rCpvKMBXTar7nppLmq3x0O+orFX13rcylkTbj8fBq +m6Hixva6vcNkPRze9ZNP9g8V3wfOCSSSHhVVDn68VgrFq5+ONpD1JR7yUFpc +XAr/TBsJ2ZO2fe72MlBOCj/ELkkPkfVIRKdr8utKIRFh9GacrN/vnYqDPkwp +fCl79eg+0nJaD9JrNkvhaBqL/wtZ7yeGp8fc3aSQq3jgYxvZHw8NTly86SOF +4f+GtQxIz55ZZ728VwqlDnHtyq8i87HJ5XrJESkMsnmdu72SAJ3rjXumiqXw +7q2psFyyH/ewO4ub3iTPbyG2Dd4i4PL2yafZtVIocHNUl0Kag09e2fC5FIbI +35xKIfu9/0DKx6QJKby0VjxHkZwP/G2y2b3zUrg5VTQHyPmxSaneTJ1NGvPv +ypc4l5H13fu9+JWQNEq+7po4UEJAAtPRh2IgjZolYjEHyPlk6Zn/g24qjeyt +LqL25Pzii/+e6Gwrja5cXtNK5Hy73JxcluktjQ7lrw42XSLgrnXDd440adz9 +pH+JIOfltNu6iJ9vpbHxXMTZzHSy/qNDOQU/SmO/kX2qEDmPj16+f2H9pDT+ +Mlv4npFKAO+Ia2MguwymmRpxRSYToLLnJNuIugwayZR8WkXOe89DcyfaYmSQ +lX68STKMAKUcU6mxZBn8l9j1wyzk//10+hZnpgzSuQcfBuwnIPqvWodpiQyy +xwgziwMJOJfoKVrfJoOvHRwEu33I79WZZwWl0rKo1N3XzXQk67Eit+boQ1l0 +flPgqK5Jxqu3fWnyuSxm96Y86lMjwI5tlYXXG1lsp+zrOqZCwC6n4LfwSRZd +Yk7MtSgQYB4jHxe/Wg6d5h/6K0oSECo7f8VEQw69ocicl/x+P95TMNEcIYfn +Xb7FN7ytBau/DKHYGDnMNtMvHe2phfbMLppevBw61FGaObpq4W09d3xJmhxe +1IifN22vhck14ULJl+VwVc+x4+lNtSBxx5Ju3iSH/Y321V43amHfr5n452vl +0cX/gqdKZC0Yhu0W+ywkj5H1N91OHqwFrrH+8pUS8lhbFbs8HlILpQPNPcYK +8hhMjfcpCqiFoQfnNGtp8piheba/x538X0pm9BV5yeMnN4WHkUa1oCOUoB1T +KY9Zl7L8b/ypgd8aAkNazgrInsobnBdaA/N5lARdDwW0K/njJruvBmb5lRQZ +Xgo4xhe3kLenBiZ/MvZuClTAvVHCO8941sBo4655jyMK6J6jruFoWwOtNnV8 +qaUKWB8+1kdXqYGLQZ4wOqeA6yR5r9X3VwOz/Gbh+fPr0GfXbl4HRjXMCFl7 +uzQp4mLxRMPWn5Xw8aS3ywFOZTzsdPRceeQdsJqKtPpEU8FLTB/j2/wVML6L +62BNnCpad93XPfH9BrlfEWc/3qSG1Y53sg6PXgWhl8oZd6bU8V/AdxcFlVKQ +Sr3tQKNpoiNd4Sa4F8MFDYaA8B4tNE1tDGp8UwCtFBP9n2fW49E696/6+y+B +oVRTpnaPNuYf65fcK5UDfCuLw32ObcA4qw7BqqQskEmQZborb8SsI3c6CsUz +gVtpB+H0bCMy4WnlfztPwHqW5O3InToY3kGXtKhOhup1gX/YvXXQdlVY19nC +ZDDgqbfI8NXBvOFAi++nksG0122kZI8OxoRUY1NAMriEXRB8E6aDkfTRWU7Z +ZIgrFQ/XTNFBKz+p5YlTSdCxVozxvkIHiQEesRWHEuHAkFCzNZsupnvCrPye +BHj+dMf9G+y6aGtxePVRtwSQuV1Wx7OadEb0mo9WCdAaZ3izlVsXC1uTPr7U +TAAFed9z1sK62Jyz0VHiZzy83lW5x1pZFx97KVkkJcTDhm/2vNa2umhx6JuR +nk0cTP086Wx1QReHHqWYZgrHwmBfkUveRV08FlhQFfUnBlrvE64zl8n7/fg1 +wj/EQMnxEffcIl2MP90rfLk6Bjyoep7fbuiiSsGmd8S2GHhiOrA77b4u5qp6 +CAlejIZLZ9QOt4zqYrjKD22ZjVFgof30opWWHhYP04+2Z0SAG4fltg5tPZQW +rtu0KioC9r5rWeuqo4e8mbdu2eyKgIz0l/F+dD0Myy5g8RtEQM+Xrt1xJnqo +esxRL2D0EPgVftCpddbDocrUw26Gh+CY4IoXckf1kGm14/LY/EF48NPoz0K7 +HjofeLk5vzAMitrqfLe+1kPXHrXd1MwwSCrVba3o1ENWQHtFaVwYWLlq5Pr3 +6eHVNrXc955h0NVAoXe+10OzJd3ZOekwGEv4faBiVg+1zv7oT8sPBTGBujE/ +ij7WftLXtXcKgWBNnf7X/vrYmmTyTPxJEBxaoCx6BejjPVHJnG9XgyC2aSVl +cq8+zvSav+4+EQTpbt3uPKH6uNv8EWPJIQiuJR1+axqtjxvfH+1IHtoLo4MP ++qoz9HGeXtW7/18guJyy6T1Xp4+62v8+SjgGAGvSr8udm4ZdBZzZ0yx/EGu0 +KL63hob3eHsfOqv6w+Rx9VBZPhrWaO0Rbhfyh3z56TWfhGgonLnmz8IXP/i3 +LcYsVIqGG7ek2Wln+cHDxjNVKdo09IzP1ZCb2AUmaQ8yq51p+H0pTuNWhS9s +VpTYsraYhserdvJd9veGmokn8n4lNLyTzZVev80bFOsOzjeU0cj4/nL+bOYN +q6xfFQSU01B668y1/Qre0BSS8qO5hobGdUtcfo+8wLhxNif6GQ0/d/N58t/3 +BJrT69Ev4zR89+dH98a2HVBGjasznqJhb8/sjEjFDhD9pHny3AxpcfVPwpk7 +YDYyVd9snoZ7tTL++G3bAVV5kJq/TEN1c58sx6HtoP3tlpazEB15fjhPmix4 +gGr8icNNdDquV5O5PsF0h3tGpattDenoxPK1HpZ1B4eFh2e7mXScszUtmGR3 +h8PBcze/mtAx2uDHkn+LGzzf4f2ez5aOFfusW2pc3SCAQbPe7k3HFNnDefei +XOH6j/fU2VQ6NpdYFj9/4wzGFX+vHUmn4whLLwXrneFNoDiNM4OOy1LneDsL +nGFxxNaBkkVHPt6rxRb7ncH6VV0S5tExc/Gf3z5uZxgrPzVxspKONp15f0+b +bwN1f8ZDpX46egyPBxV2OsFpBbvFxEE6KjXwx9x/4ASzw776o0N0jLGqsZy6 +7gQPPE6W53+gY5+G3tvMeCdwchjOEZ+gI0PS/1PLeieIMkoO5WYzwL+elsdW +nXaE54Kv5SeUDDD3WHyfoqcDaL36tMNG1QC5DHyP3rVxgLMnF3OuqxugsE3V +E0+GA+zgVOTbrW2AzMaRhVERB5j6G7E4ZGCA49897TNz7UHsq1Rnh40BNv4Z +T5qKswP/BwFJNWEGuEr8APfSbluY3D8WuTmc3LVSbpzoN7OFw9L7gnoiDNDg +TIbhsJwtnIgNcfoVY4B7HeH0zgEbuGMYIcdMMUDlXfXTak428JdIvNd80QAf +c2WLvje3hrO382ffNBvgP/z9oNXGEqS85L7uemqAZ18I/zXXsoRSvuKB2ecG ++Kul6+MnPku4u7+0SazdAC+OaG5If2MB7zRuZnr0GeAEu/tsyHYLUL1Wrzk6 +boA/Fa3vJR00h4eFXX4zogzsOcEuMNe4CUZs5b0iJBgo6XfGe0XxJmD7vd/9 +D4WBQkcjNTVSN4GpI6fdajkG/opl/69n2yZ4usKQLqnOwIF8x1snpsygzbeA +28SYgf03ln1s1c2gX3FvReZuBobm/Tl8oMYE/nQQ10QDGejD3yy7kGcCUkdW +XrkYxMCf7X+azx03gZ3dl3NKQsnnZS5clNtuAiPJr+LvRjOQM3PflcCVJvDl +s97WkQwG/j0kHFjlhjB7bXlBu46BfDcbZAfUjeGzi3lhWj35PpEr1C9xGEPf +qlOWHxoZiP0nfx8bZUGjNyX3/CMG8jzisGu5yIJjEvqGSy0M3JMUfFFzLQsE +UvfGtg4y0GFu8JzmbyPQ3NPN5s9uiJOcEWz8EwyQEZW6/mCVIfqvZmrGvWSA +QLOvowSnIV7v0UgSqmDAT5npohdrDFGcQ1erOIQBDT08Zjqihuj7bvCiz6wB +WJpj8rKKIWY5fVk0XWUAu5TKuS9uMcSwpTH7MiYNop947lV2MMQVqbh5XIYG +mf5CL6qcDLHn+H9VLitocK806uQLV0OsLMtwufBUH0SULfmXfAxxz5r9Qa1O ++vBU+ZOId4QhemYcznoWpgfqqrJyygWGqLQlOIPaogP4/E18VZEhDsnKDpbe +1gGXgJT3xiXk9ecVvtmf14HEaxPFrtcN0e+xXjW7nw4Mqt5TSqs2RJ7ISK1h +Nh3IUHPXGH9miD67dd2ccSPMqGfRqqYNkfntVWj2DW3oa8PNwj8N0ZWwEppP +0IZHwZNbw+fI9Yci/zvurg0ZVVZhtEVDlLSyjzXk1gZ1Q7abDSuNkE37UXfv +3vXga7VfvlnMCHfzfDd+StOCrj0WvF1MIzwR6pwoNa0OjdxzFH0wwgIh33Vy +L9WhuLxY7byJEWa4GTdvuaEOoVNL5m7mRhjGu9lW2V8d1kbWJAzaG+Fn+ZVn +nw2qgXmK/MJHXyMcadH6fqVTFe6W/Hk/l2qEutnCLtlDykAzC1+wTjfCnapP +WiX/U4ba9+O8haeMsP9aYljTFWWokhmiW581wqL5t/diA5Xh5oVHp/IvGeHp +qzdUz8wrQeHJZIZFhREu5tyokxBXgrRw/jMXOo3QduTSbEnoOuASTi2b6DbC +H4r5cVau6yClku2eaZ8RCtpP3+M1XgdJkzOfxweN8E134LPJNevgaEAX0+Sz +Ea6cp4RJX1eAAztyv377Ra7n0aDJ9U0ePDatI/cuTLTi8gvWOSoHS11cfM1y +TNR50iZ4frccFPpPDlivY6KLp/46SXs5+JxSH+mhysT/1A4vxMrJwYEW+9tR +Okz8xlacHJwmCyfsYmXumjNRbTD4SrmSDDS4df/VC2GivMzpktg0Kuz81tB6 +L4yJB4tTU874UIEtuvDCpnAmWoeEOQ0yqGB+KUhvWxQTt55+mCf0nQJv3q3Y +dzCRiRqVXK2L9hQY810/UJnDxMCo6ivx6ySBuv94/fpHTPx3oHbdjSkxyFje +rZ/exMQHPSM7oUMM2M+aV355zMRtvKrNf++IwRix+nphCxNHi646TR0Qgwa2 +pAtCnUxsKosLrPglCh7Z8ZHzn5iooDpO27dGFC40Ruk/WMPC8YIgiQpbYeC1 +c6+k8LFwxcZnK2c2CkP8iIFWpAALN9QLnnURF4aA1b8UN4iysMz04I/UUSGg +20eIFMuwkPfpSquUaCHoGT3wM3kjC7+JDgo8uiMIojz7Kre4svAr39VhGX0B +KDE7Ej3tzsIXZyVZz6gCoHMkwyxrBwvnPncS2ewCYDd9p7vPh4WKE1n7mUX8 +kNIz93vXPhae1d628GKQD34Vx5lGJ7CwLax8zMhnLfQbZXWWlZP3Wy5yvbzM +AwGHSi5bVbBQkN3ySPkBHpivqPUfv8NChc5nic8teUBIoW9hI0G+j9ng1L05 +brDhkpa6/4iF+3+vXUh24oZ7XWV+nd0sJKScb9uLc4E1312tiD4WPqv3H56a +5oQ+i5Z5iQEW4hWOgy2tnDDb8D3Vc4SFM5ttjqvEcYJW0YZb38ZY2Kze3ZIy +xgH3+k0iTk6w0LQ4L+rbEw6wFtkK2tMszB0vpiYWccDu44deh8+R8Xj5e5WH +OwfMPkq5KP6LhZ8bU2rO63PAscWcXQ2LLJRwfarMLcQBAnrXNXcusdBt8LFA +5eRqyN/fMLe8zMJA+oRKxovV8D+Om+Xr "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.08880450436020661}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13269,6 +16015,7 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13296,7 +16043,8 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12905028199662316`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08880450436020661}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13304,22 +16052,739 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991327033758711*^9}, + CellChangeTimes->{3.991327033758711*^9, 3.993832894854825*^9}, CellLabel-> - "Out[138]=",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] + "Out[150]=",ExpressionUUID->"d0071fdd-1814-4283-ba85-8c2e5a10bce4"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9917999433700733`*^9, 3.9917999479698143`*^9}, - 3.9919244033659534`*^9},ExpressionUUID->"d48877eb-e0f2-d842-b248-\ -ea3fc2b4c4a8"], + 3.9919244033659534`*^9}, + CellLabel-> + "In[151]:=",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799951845436*^9, - 3.991799954096182*^9}},ExpressionUUID->"eae5aeae-3f12-2d4a-842b-\ -85a3484011b6"], + CellChangeTimes->{{3.991799951845436*^9, 3.991799954096182*^9}}, + CellLabel-> + "In[152]:=",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8bAHCprGTPe+3skTLudbnX86DsrDIrK4qUUSKjkBEpKUoqMzSU +so7Q+tIiSZkhpC2zjFLyO7+/zuv9OuPzOs865yPvG+Lkz87Gxla2go3t/8f5 +oZbHiuklxm2T/7J8tW2Nu/Ilokz6joFlcd2H+n41QNFXvhJ9Z+HgNtWvsf0M +iHC40buyrxiO5r3cbNdvBYKT4md/91YB5yj/rvm37jB8zy5ktrcJ9lwY0X3e +FwjmimPvZnrfQHFBeKlqVxT87qWfm+4dhaj77IsP/kuDZrOrJa+Lf8JIVZuM +7rGLIDVc/9lXcwkCTPq1+u2vgMg+rxucZitRo37mVGn3NTi70bzRzpkL75rF +FZ03qgDtAXcLVgAX5otoj+yzq4C2pP2dGjFc+O5k9KSBTwVw9GV/5yriwtHb +qv5VKRUQc/QDtXmcCwNCl9XVX1eA34v4WHoSNyo2br+p6ncbaP6NLLlqHryV +ynlD1uQOvL2w4dGMwFpMFnkXM2ZXCRc7y/kjlNbiqEt643XXSvDgU/FaZKxF +mux+V1/vShhMlP7HvmstZtX5XnwYVgkjwTxMkdq1ON+pzKueXQlfN32so7nz +oVf7kdJ7vZXwazrndkwRP+YVfv2vxb0K6jWEl5dr+ZHrS6rVHZ8qiN6dYZfU +yo+Z0xvHTgdWwd+BpImTP/mRbuoaYhhVBfEf7oq+UhDAbuFJF+aFKkhqL906 +Ei6Am/O9JX90VUF6SdwrdklBDP0xxqJYVYO1XqCQ6DpB3HGYObdsXw1cj52c +VbQE8YSKWfeQSzUkfVAasDERRPu5czypftUQq9D2OTtQEF9wGKmlxlVDcKHE +P+UGQfRQmTY0rqkGx8uVmjbbhTDcR640WqIGBDQvhez0F8KGkXm/RJkaaG9M +qgoJEUKdBbv1yYo1YD3gapCdKIQT66/1H9xQA6aUf2bvyoWwOrE/ZcmiBvQu +WG8P+SuEBX5iRf8dqgHx7A9pWXnC2LEu3pq7rQYkNGqTfpUJowjL8dzbjhqg +NKXE7bwjjERTT/OV7hqQmVY7pNIsjN+DzF4oDdeAkm2od+NXYbQfUYobmakB +3VVLtA+6Iii2+773BrFasA8X+6jTKoL7VZxfMzxqwWHN16GcThGU4PwYbO5Z +C07F9W//DopglXv3lK1vLbh07Hj1dEoEyz+eu2yxtxZ2al5p8BAVRYFQjas/ +o2oh6KP2mWPeouju0ksoX6iF49usjN/Mi2JZ4YrVf17VAqWmncK+Qgxvr/Te +lt5ZCxXC2xY2rhFDgS8CCSK9tdDzxvPOGVkxzLpOPSQ4VAuKjuEKjpZi+HUg +YaD2ey00bSng6MgVQ9lshs311QS43FL8sHxFDN9b2Dx/xkXAGO+Nh9oVYqji +rqw9vIYAwbaaw6ebxNCqqvf+L0ECvK1bx+y+i6Hd8S2/e6QJWDKfa3/JFMdv +XIVPUI+AzLLo8iVzcbSSPLh1kkaAIgdbqpajOHb5bhjIZhBg+4TH5JS/ON5x +nRpsMybgoplctW2GOAY+Gm/5akmAAdrkvBgWR7GCfrfX2wloK+g4+OebOHKe +2STC70muv+zsoDErjia25u82exNw/IE3dzqXBPo+PZSX70dADzMixnqjBO7y +WrX0dx8BBxlFXi3HJDDw/UJkcCwB1oV8szYnJfBQoZui7FECFDhjU9vPSeDq +Z309LXEEdHS5VHZek8D7QpZb1yYSsD6Ud+VQO3l9zoeXtmkErO6NyvHuk8BN +c+tfvTxBwCDri8aH9xJIvPszYnmSgPQ1Tdu+zkrgOow20jpNwNeyyLIfFEms +yN/4oyKbgIdrPxkeUpRE732FeWznCTgf7vRqQUsSh2ZO+9nmELDZVOvXX5TE +Hdfyrd/kElD8btSKc48k6m56WJCTT0DUJoehtFBJVD2wx76hgACH8vsHeKMl +sd5NTbm3kIDlwxcuCZ6SxM1PftotFxOwQ8RuglotiTWOv+q4rxKgG9OYkH9P +EjctVLUukeYZVRWTfyqJi8OEwPg1AupvrwTlt5KoTB9i1t0g8ykW1nltVBJL +WWrK2eUEBBwZ2qMxLomfq3mtgm4SIGZTn7lhWRJPa6425aogYKJSWamai4JS +81up7aQfS2TX6wtRcEtDhV7GbTIfn4NHDZUoOJsgsn7pDhnvBEW9zTYUFIfZ +wPPVBFz9eub5s20U1LH6HLa+hoCj9ss7rD0p+KqZ9uwRaS3p/mT7MApe3/DU +u6uWgFVJFpQ30RRE9fBrzgSZj7Gaim1JFIwq8Nz0mvSJu6d73XMoKPtpKK6u +jgAf2aWgwUIKKvDOKSjcJestZS+b1w0KHnazlD9OWmCiN/t9NQVn7PNjP5P+ +snWzmt99CtrmPqBhPQEPGqruf35KwbDFA47ZpM/LyzkFdlCw3OV4+yjpTVOL +0cEfKBgqyrMQ3EDmyzJb/b9xCnImmhwpJ11RpNUvPE9Bh+cvS0ZJf1h8mrZ7 +mYI/fgeGiDQSILHNm1HPRcWbYp1DSHrLrd9f1whR8cjq57N7SB/jyLrgSaWS +/ctdnUa6zkvTslKRilsOeVDLSI/ffbKwcj0V1SFO+z5peSGvqy50KgYEGs+0 +k3YJ+uVyHanYZ+PtO0A6/fEZjr9WVCySup00SvqRtAZht5WKCZPz7h9Jz0U8 +9i/aQUWr26s/jpBW79gpOutPxZXK5Yp9pD3VFh6bh1AxeOaudCvprGOZ4bmH +qSiZwv6aIP18QE1xPIGKE5o7MZ/0X73mTuN0KjqtKNwfT3pjxo7EM9nkelNX +PHaS3v1lTudjHhW/VJlx65O+hKdHaVep6Nm1PYaTdEeu6tm0O1SMvdZa1UXG +b/XP/0wG66n4YUto5WXShrbbZ9Y3U/FE+fooL9IhpbOFCW1UXA7+tkaadMm/ +Uw5d3VR8xpMS1E3m662rCpvKMBXTar7nppLmq3x0O+orFX13rcylkTbj8fBq +m6Hixva6vcNkPRze9ZNP9g8V3wfOCSSSHhVVDn68VgrFq5+ONpD1JR7yUFpc +XAr/TBsJ2ZO2fe72MlBOCj/ELkkPkfVIRKdr8utKIRFh9GacrN/vnYqDPkwp +fCl79eg+0nJaD9JrNkvhaBqL/wtZ7yeGp8fc3aSQq3jgYxvZHw8NTly86SOF +4f+GtQxIz55ZZ728VwqlDnHtyq8i87HJ5XrJESkMsnmdu72SAJ3rjXumiqXw +7q2psFyyH/ewO4ub3iTPbyG2Dd4i4PL2yafZtVIocHNUl0Kag09e2fC5FIbI +35xKIfu9/0DKx6QJKby0VjxHkZwP/G2y2b3zUrg5VTQHyPmxSaneTJ1NGvPv +ypc4l5H13fu9+JWQNEq+7po4UEJAAtPRh2IgjZolYjEHyPlk6Zn/g24qjeyt +LqL25Pzii/+e6Gwrja5cXtNK5Hy73JxcluktjQ7lrw42XSLgrnXDd440adz9 +pH+JIOfltNu6iJ9vpbHxXMTZzHSy/qNDOQU/SmO/kX2qEDmPj16+f2H9pDT+ +Mlv4npFKAO+Ia2MguwymmRpxRSYToLLnJNuIugwayZR8WkXOe89DcyfaYmSQ +lX68STKMAKUcU6mxZBn8l9j1wyzk//10+hZnpgzSuQcfBuwnIPqvWodpiQyy +xwgziwMJOJfoKVrfJoOvHRwEu33I79WZZwWl0rKo1N3XzXQk67Eit+boQ1l0 +flPgqK5Jxqu3fWnyuSxm96Y86lMjwI5tlYXXG1lsp+zrOqZCwC6n4LfwSRZd +Yk7MtSgQYB4jHxe/Wg6d5h/6K0oSECo7f8VEQw69ocicl/x+P95TMNEcIYfn +Xb7FN7ytBau/DKHYGDnMNtMvHe2phfbMLppevBw61FGaObpq4W09d3xJmhxe +1IifN22vhck14ULJl+VwVc+x4+lNtSBxx5Ju3iSH/Y321V43amHfr5n452vl +0cX/gqdKZC0Yhu0W+ywkj5H1N91OHqwFrrH+8pUS8lhbFbs8HlILpQPNPcYK +8hhMjfcpCqiFoQfnNGtp8piheba/x538X0pm9BV5yeMnN4WHkUa1oCOUoB1T +KY9Zl7L8b/ypgd8aAkNazgrInsobnBdaA/N5lARdDwW0K/njJruvBmb5lRQZ +Xgo4xhe3kLenBiZ/MvZuClTAvVHCO8941sBo4655jyMK6J6jruFoWwOtNnV8 +qaUKWB8+1kdXqYGLQZ4wOqeA6yR5r9X3VwOz/Gbh+fPr0GfXbl4HRjXMCFl7 +uzQp4mLxRMPWn5Xw8aS3ywFOZTzsdPRceeQdsJqKtPpEU8FLTB/j2/wVML6L +62BNnCpad93XPfH9BrlfEWc/3qSG1Y53sg6PXgWhl8oZd6bU8V/AdxcFlVKQ +Sr3tQKNpoiNd4Sa4F8MFDYaA8B4tNE1tDGp8UwCtFBP9n2fW49E696/6+y+B +oVRTpnaPNuYf65fcK5UDfCuLw32ObcA4qw7BqqQskEmQZborb8SsI3c6CsUz +gVtpB+H0bCMy4WnlfztPwHqW5O3InToY3kGXtKhOhup1gX/YvXXQdlVY19nC +ZDDgqbfI8NXBvOFAi++nksG0122kZI8OxoRUY1NAMriEXRB8E6aDkfTRWU7Z +ZIgrFQ/XTNFBKz+p5YlTSdCxVozxvkIHiQEesRWHEuHAkFCzNZsupnvCrPye +BHj+dMf9G+y6aGtxePVRtwSQuV1Wx7OadEb0mo9WCdAaZ3izlVsXC1uTPr7U +TAAFed9z1sK62Jyz0VHiZzy83lW5x1pZFx97KVkkJcTDhm/2vNa2umhx6JuR +nk0cTP086Wx1QReHHqWYZgrHwmBfkUveRV08FlhQFfUnBlrvE64zl8n7/fg1 +wj/EQMnxEffcIl2MP90rfLk6Bjyoep7fbuiiSsGmd8S2GHhiOrA77b4u5qp6 +CAlejIZLZ9QOt4zqYrjKD22ZjVFgof30opWWHhYP04+2Z0SAG4fltg5tPZQW +rtu0KioC9r5rWeuqo4e8mbdu2eyKgIz0l/F+dD0Myy5g8RtEQM+Xrt1xJnqo +esxRL2D0EPgVftCpddbDocrUw26Gh+CY4IoXckf1kGm14/LY/EF48NPoz0K7 +HjofeLk5vzAMitrqfLe+1kPXHrXd1MwwSCrVba3o1ENWQHtFaVwYWLlq5Pr3 +6eHVNrXc955h0NVAoXe+10OzJd3ZOekwGEv4faBiVg+1zv7oT8sPBTGBujE/ +ij7WftLXtXcKgWBNnf7X/vrYmmTyTPxJEBxaoCx6BejjPVHJnG9XgyC2aSVl +cq8+zvSav+4+EQTpbt3uPKH6uNv8EWPJIQiuJR1+axqtjxvfH+1IHtoLo4MP ++qoz9HGeXtW7/18guJyy6T1Xp4+62v8+SjgGAGvSr8udm4ZdBZzZ0yx/EGu0 +KL63hob3eHsfOqv6w+Rx9VBZPhrWaO0Rbhfyh3z56TWfhGgonLnmz8IXP/i3 +LcYsVIqGG7ek2Wln+cHDxjNVKdo09IzP1ZCb2AUmaQ8yq51p+H0pTuNWhS9s +VpTYsraYhserdvJd9veGmokn8n4lNLyTzZVev80bFOsOzjeU0cj4/nL+bOYN +q6xfFQSU01B668y1/Qre0BSS8qO5hobGdUtcfo+8wLhxNif6GQ0/d/N58t/3 +BJrT69Ev4zR89+dH98a2HVBGjasznqJhb8/sjEjFDhD9pHny3AxpcfVPwpk7 +YDYyVd9snoZ7tTL++G3bAVV5kJq/TEN1c58sx6HtoP3tlpazEB15fjhPmix4 +gGr8icNNdDquV5O5PsF0h3tGpattDenoxPK1HpZ1B4eFh2e7mXScszUtmGR3 +h8PBcze/mtAx2uDHkn+LGzzf4f2ez5aOFfusW2pc3SCAQbPe7k3HFNnDefei +XOH6j/fU2VQ6NpdYFj9/4wzGFX+vHUmn4whLLwXrneFNoDiNM4OOy1LneDsL +nGFxxNaBkkVHPt6rxRb7ncH6VV0S5tExc/Gf3z5uZxgrPzVxspKONp15f0+b +bwN1f8ZDpX46egyPBxV2OsFpBbvFxEE6KjXwx9x/4ASzw776o0N0jLGqsZy6 +7gQPPE6W53+gY5+G3tvMeCdwchjOEZ+gI0PS/1PLeieIMkoO5WYzwL+elsdW +nXaE54Kv5SeUDDD3WHyfoqcDaL36tMNG1QC5DHyP3rVxgLMnF3OuqxugsE3V +E0+GA+zgVOTbrW2AzMaRhVERB5j6G7E4ZGCA49897TNz7UHsq1Rnh40BNv4Z +T5qKswP/BwFJNWEGuEr8APfSbluY3D8WuTmc3LVSbpzoN7OFw9L7gnoiDNDg +TIbhsJwtnIgNcfoVY4B7HeH0zgEbuGMYIcdMMUDlXfXTak428JdIvNd80QAf +c2WLvje3hrO382ffNBvgP/z9oNXGEqS85L7uemqAZ18I/zXXsoRSvuKB2ecG ++Kul6+MnPku4u7+0SazdAC+OaG5If2MB7zRuZnr0GeAEu/tsyHYLUL1Wrzk6 +boA/Fa3vJR00h4eFXX4zogzsOcEuMNe4CUZs5b0iJBgo6XfGe0XxJmD7vd/9 +D4WBQkcjNTVSN4GpI6fdajkG/opl/69n2yZ4usKQLqnOwIF8x1snpsygzbeA +28SYgf03ln1s1c2gX3FvReZuBobm/Tl8oMYE/nQQ10QDGejD3yy7kGcCUkdW +XrkYxMCf7X+azx03gZ3dl3NKQsnnZS5clNtuAiPJr+LvRjOQM3PflcCVJvDl +s97WkQwG/j0kHFjlhjB7bXlBu46BfDcbZAfUjeGzi3lhWj35PpEr1C9xGEPf +qlOWHxoZiP0nfx8bZUGjNyX3/CMG8jzisGu5yIJjEvqGSy0M3JMUfFFzLQsE +UvfGtg4y0GFu8JzmbyPQ3NPN5s9uiJOcEWz8EwyQEZW6/mCVIfqvZmrGvWSA +QLOvowSnIV7v0UgSqmDAT5npohdrDFGcQ1erOIQBDT08Zjqihuj7bvCiz6wB +WJpj8rKKIWY5fVk0XWUAu5TKuS9uMcSwpTH7MiYNop947lV2MMQVqbh5XIYG +mf5CL6qcDLHn+H9VLitocK806uQLV0OsLMtwufBUH0SULfmXfAxxz5r9Qa1O ++vBU+ZOId4QhemYcznoWpgfqqrJyygWGqLQlOIPaogP4/E18VZEhDsnKDpbe +1gGXgJT3xiXk9ecVvtmf14HEaxPFrtcN0e+xXjW7nw4Mqt5TSqs2RJ7ISK1h +Nh3IUHPXGH9miD67dd2ccSPMqGfRqqYNkfntVWj2DW3oa8PNwj8N0ZWwEppP +0IZHwZNbw+fI9Yci/zvurg0ZVVZhtEVDlLSyjzXk1gZ1Q7abDSuNkE37UXfv +3vXga7VfvlnMCHfzfDd+StOCrj0WvF1MIzwR6pwoNa0OjdxzFH0wwgIh33Vy +L9WhuLxY7byJEWa4GTdvuaEOoVNL5m7mRhjGu9lW2V8d1kbWJAzaG+Fn+ZVn +nw2qgXmK/MJHXyMcadH6fqVTFe6W/Hk/l2qEutnCLtlDykAzC1+wTjfCnapP +WiX/U4ba9+O8haeMsP9aYljTFWWokhmiW581wqL5t/diA5Xh5oVHp/IvGeHp +qzdUz8wrQeHJZIZFhREu5tyokxBXgrRw/jMXOo3QduTSbEnoOuASTi2b6DbC +H4r5cVau6yClku2eaZ8RCtpP3+M1XgdJkzOfxweN8E134LPJNevgaEAX0+Sz +Ea6cp4RJX1eAAztyv377Ra7n0aDJ9U0ePDatI/cuTLTi8gvWOSoHS11cfM1y +TNR50iZ4frccFPpPDlivY6KLp/46SXs5+JxSH+mhysT/1A4vxMrJwYEW+9tR +Okz8xlacHJwmCyfsYmXumjNRbTD4SrmSDDS4df/VC2GivMzpktg0Kuz81tB6 +L4yJB4tTU874UIEtuvDCpnAmWoeEOQ0yqGB+KUhvWxQTt55+mCf0nQJv3q3Y +dzCRiRqVXK2L9hQY810/UJnDxMCo6ivx6ySBuv94/fpHTPx3oHbdjSkxyFje +rZ/exMQHPSM7oUMM2M+aV355zMRtvKrNf++IwRix+nphCxNHi646TR0Qgwa2 +pAtCnUxsKosLrPglCh7Z8ZHzn5iooDpO27dGFC40Ruk/WMPC8YIgiQpbYeC1 +c6+k8LFwxcZnK2c2CkP8iIFWpAALN9QLnnURF4aA1b8UN4iysMz04I/UUSGg +20eIFMuwkPfpSquUaCHoGT3wM3kjC7+JDgo8uiMIojz7Kre4svAr39VhGX0B +KDE7Ej3tzsIXZyVZz6gCoHMkwyxrBwvnPncS2ewCYDd9p7vPh4WKE1n7mUX8 +kNIz93vXPhae1d628GKQD34Vx5lGJ7CwLax8zMhnLfQbZXWWlZP3Wy5yvbzM +AwGHSi5bVbBQkN3ySPkBHpivqPUfv8NChc5nic8teUBIoW9hI0G+j9ng1L05 +brDhkpa6/4iF+3+vXUh24oZ7XWV+nd0sJKScb9uLc4E1312tiD4WPqv3H56a +5oQ+i5Z5iQEW4hWOgy2tnDDb8D3Vc4SFM5ttjqvEcYJW0YZb38ZY2Kze3ZIy +xgH3+k0iTk6w0LQ4L+rbEw6wFtkK2tMszB0vpiYWccDu44deh8+R8Xj5e5WH +OwfMPkq5KP6LhZ8bU2rO63PAscWcXQ2LLJRwfarMLcQBAnrXNXcusdBt8LFA +5eRqyN/fMLe8zMJA+oRKxovV8D+Om+Xr + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHCprGTPe+3skTLudbnX86DsrDIrK4qUUSKjkBEpKUoqMzSU +so7Q+tIiSZkhpC2zjFLyO7+/zuv9OuPzOs865yPvG+Lkz87Gxla2go3t/8f5 +oZbHiuklxm2T/7J8tW2Nu/Ilokz6joFlcd2H+n41QNFXvhJ9Z+HgNtWvsf0M +iHC40buyrxiO5r3cbNdvBYKT4md/91YB5yj/rvm37jB8zy5ktrcJ9lwY0X3e +FwjmimPvZnrfQHFBeKlqVxT87qWfm+4dhaj77IsP/kuDZrOrJa+Lf8JIVZuM +7rGLIDVc/9lXcwkCTPq1+u2vgMg+rxucZitRo37mVGn3NTi70bzRzpkL75rF +FZ03qgDtAXcLVgAX5otoj+yzq4C2pP2dGjFc+O5k9KSBTwVw9GV/5yriwtHb +qv5VKRUQc/QDtXmcCwNCl9XVX1eA34v4WHoSNyo2br+p6ncbaP6NLLlqHryV +ynlD1uQOvL2w4dGMwFpMFnkXM2ZXCRc7y/kjlNbiqEt643XXSvDgU/FaZKxF +mux+V1/vShhMlP7HvmstZtX5XnwYVgkjwTxMkdq1ON+pzKueXQlfN32so7nz +oVf7kdJ7vZXwazrndkwRP+YVfv2vxb0K6jWEl5dr+ZHrS6rVHZ8qiN6dYZfU +yo+Z0xvHTgdWwd+BpImTP/mRbuoaYhhVBfEf7oq+UhDAbuFJF+aFKkhqL906 +Ei6Am/O9JX90VUF6SdwrdklBDP0xxqJYVYO1XqCQ6DpB3HGYObdsXw1cj52c +VbQE8YSKWfeQSzUkfVAasDERRPu5czypftUQq9D2OTtQEF9wGKmlxlVDcKHE +P+UGQfRQmTY0rqkGx8uVmjbbhTDcR640WqIGBDQvhez0F8KGkXm/RJkaaG9M +qgoJEUKdBbv1yYo1YD3gapCdKIQT66/1H9xQA6aUf2bvyoWwOrE/ZcmiBvQu +WG8P+SuEBX5iRf8dqgHx7A9pWXnC2LEu3pq7rQYkNGqTfpUJowjL8dzbjhqg +NKXE7bwjjERTT/OV7hqQmVY7pNIsjN+DzF4oDdeAkm2od+NXYbQfUYobmakB +3VVLtA+6Iii2+773BrFasA8X+6jTKoL7VZxfMzxqwWHN16GcThGU4PwYbO5Z +C07F9W//DopglXv3lK1vLbh07Hj1dEoEyz+eu2yxtxZ2al5p8BAVRYFQjas/ +o2oh6KP2mWPeouju0ksoX6iF49usjN/Mi2JZ4YrVf17VAqWmncK+Qgxvr/Te +lt5ZCxXC2xY2rhFDgS8CCSK9tdDzxvPOGVkxzLpOPSQ4VAuKjuEKjpZi+HUg +YaD2ey00bSng6MgVQ9lshs311QS43FL8sHxFDN9b2Dx/xkXAGO+Nh9oVYqji +rqw9vIYAwbaaw6ebxNCqqvf+L0ECvK1bx+y+i6Hd8S2/e6QJWDKfa3/JFMdv +XIVPUI+AzLLo8iVzcbSSPLh1kkaAIgdbqpajOHb5bhjIZhBg+4TH5JS/ON5x +nRpsMybgoplctW2GOAY+Gm/5akmAAdrkvBgWR7GCfrfX2wloK+g4+OebOHKe +2STC70muv+zsoDErjia25u82exNw/IE3dzqXBPo+PZSX70dADzMixnqjBO7y +WrX0dx8BBxlFXi3HJDDw/UJkcCwB1oV8szYnJfBQoZui7FECFDhjU9vPSeDq +Z309LXEEdHS5VHZek8D7QpZb1yYSsD6Ud+VQO3l9zoeXtmkErO6NyvHuk8BN +c+tfvTxBwCDri8aH9xJIvPszYnmSgPQ1Tdu+zkrgOow20jpNwNeyyLIfFEms +yN/4oyKbgIdrPxkeUpRE732FeWznCTgf7vRqQUsSh2ZO+9nmELDZVOvXX5TE +Hdfyrd/kElD8btSKc48k6m56WJCTT0DUJoehtFBJVD2wx76hgACH8vsHeKMl +sd5NTbm3kIDlwxcuCZ6SxM1PftotFxOwQ8RuglotiTWOv+q4rxKgG9OYkH9P +EjctVLUukeYZVRWTfyqJi8OEwPg1AupvrwTlt5KoTB9i1t0g8ykW1nltVBJL +WWrK2eUEBBwZ2qMxLomfq3mtgm4SIGZTn7lhWRJPa6425aogYKJSWamai4JS +81up7aQfS2TX6wtRcEtDhV7GbTIfn4NHDZUoOJsgsn7pDhnvBEW9zTYUFIfZ +wPPVBFz9eub5s20U1LH6HLa+hoCj9ss7rD0p+KqZ9uwRaS3p/mT7MApe3/DU +u6uWgFVJFpQ30RRE9fBrzgSZj7Gaim1JFIwq8Nz0mvSJu6d73XMoKPtpKK6u +jgAf2aWgwUIKKvDOKSjcJestZS+b1w0KHnazlD9OWmCiN/t9NQVn7PNjP5P+ +snWzmt99CtrmPqBhPQEPGqruf35KwbDFA47ZpM/LyzkFdlCw3OV4+yjpTVOL +0cEfKBgqyrMQ3EDmyzJb/b9xCnImmhwpJ11RpNUvPE9Bh+cvS0ZJf1h8mrZ7 +mYI/fgeGiDQSILHNm1HPRcWbYp1DSHrLrd9f1whR8cjq57N7SB/jyLrgSaWS +/ctdnUa6zkvTslKRilsOeVDLSI/ffbKwcj0V1SFO+z5peSGvqy50KgYEGs+0 +k3YJ+uVyHanYZ+PtO0A6/fEZjr9WVCySup00SvqRtAZht5WKCZPz7h9Jz0U8 +9i/aQUWr26s/jpBW79gpOutPxZXK5Yp9pD3VFh6bh1AxeOaudCvprGOZ4bmH +qSiZwv6aIP18QE1xPIGKE5o7MZ/0X73mTuN0KjqtKNwfT3pjxo7EM9nkelNX +PHaS3v1lTudjHhW/VJlx65O+hKdHaVep6Nm1PYaTdEeu6tm0O1SMvdZa1UXG +b/XP/0wG66n4YUto5WXShrbbZ9Y3U/FE+fooL9IhpbOFCW1UXA7+tkaadMm/ +Uw5d3VR8xpMS1E3m662rCpvKMBXTar7nppLmq3x0O+orFX13rcylkTbj8fBq +m6Hixva6vcNkPRze9ZNP9g8V3wfOCSSSHhVVDn68VgrFq5+ONpD1JR7yUFpc +XAr/TBsJ2ZO2fe72MlBOCj/ELkkPkfVIRKdr8utKIRFh9GacrN/vnYqDPkwp +fCl79eg+0nJaD9JrNkvhaBqL/wtZ7yeGp8fc3aSQq3jgYxvZHw8NTly86SOF +4f+GtQxIz55ZZ728VwqlDnHtyq8i87HJ5XrJESkMsnmdu72SAJ3rjXumiqXw +7q2psFyyH/ewO4ub3iTPbyG2Dd4i4PL2yafZtVIocHNUl0Kag09e2fC5FIbI +35xKIfu9/0DKx6QJKby0VjxHkZwP/G2y2b3zUrg5VTQHyPmxSaneTJ1NGvPv +ypc4l5H13fu9+JWQNEq+7po4UEJAAtPRh2IgjZolYjEHyPlk6Zn/g24qjeyt +LqL25Pzii/+e6Gwrja5cXtNK5Hy73JxcluktjQ7lrw42XSLgrnXDd440adz9 +pH+JIOfltNu6iJ9vpbHxXMTZzHSy/qNDOQU/SmO/kX2qEDmPj16+f2H9pDT+ +Mlv4npFKAO+Ia2MguwymmRpxRSYToLLnJNuIugwayZR8WkXOe89DcyfaYmSQ +lX68STKMAKUcU6mxZBn8l9j1wyzk//10+hZnpgzSuQcfBuwnIPqvWodpiQyy +xwgziwMJOJfoKVrfJoOvHRwEu33I79WZZwWl0rKo1N3XzXQk67Eit+boQ1l0 +flPgqK5Jxqu3fWnyuSxm96Y86lMjwI5tlYXXG1lsp+zrOqZCwC6n4LfwSRZd +Yk7MtSgQYB4jHxe/Wg6d5h/6K0oSECo7f8VEQw69ocicl/x+P95TMNEcIYfn +Xb7FN7ytBau/DKHYGDnMNtMvHe2phfbMLppevBw61FGaObpq4W09d3xJmhxe +1IifN22vhck14ULJl+VwVc+x4+lNtSBxx5Ju3iSH/Y321V43amHfr5n452vl +0cX/gqdKZC0Yhu0W+ywkj5H1N91OHqwFrrH+8pUS8lhbFbs8HlILpQPNPcYK +8hhMjfcpCqiFoQfnNGtp8piheba/x538X0pm9BV5yeMnN4WHkUa1oCOUoB1T +KY9Zl7L8b/ypgd8aAkNazgrInsobnBdaA/N5lARdDwW0K/njJruvBmb5lRQZ +Xgo4xhe3kLenBiZ/MvZuClTAvVHCO8941sBo4655jyMK6J6jruFoWwOtNnV8 +qaUKWB8+1kdXqYGLQZ4wOqeA6yR5r9X3VwOz/Gbh+fPr0GfXbl4HRjXMCFl7 +uzQp4mLxRMPWn5Xw8aS3ywFOZTzsdPRceeQdsJqKtPpEU8FLTB/j2/wVML6L +62BNnCpad93XPfH9BrlfEWc/3qSG1Y53sg6PXgWhl8oZd6bU8V/AdxcFlVKQ +Sr3tQKNpoiNd4Sa4F8MFDYaA8B4tNE1tDGp8UwCtFBP9n2fW49E696/6+y+B +oVRTpnaPNuYf65fcK5UDfCuLw32ObcA4qw7BqqQskEmQZborb8SsI3c6CsUz +gVtpB+H0bCMy4WnlfztPwHqW5O3InToY3kGXtKhOhup1gX/YvXXQdlVY19nC +ZDDgqbfI8NXBvOFAi++nksG0122kZI8OxoRUY1NAMriEXRB8E6aDkfTRWU7Z +ZIgrFQ/XTNFBKz+p5YlTSdCxVozxvkIHiQEesRWHEuHAkFCzNZsupnvCrPye +BHj+dMf9G+y6aGtxePVRtwSQuV1Wx7OadEb0mo9WCdAaZ3izlVsXC1uTPr7U +TAAFed9z1sK62Jyz0VHiZzy83lW5x1pZFx97KVkkJcTDhm/2vNa2umhx6JuR +nk0cTP086Wx1QReHHqWYZgrHwmBfkUveRV08FlhQFfUnBlrvE64zl8n7/fg1 +wj/EQMnxEffcIl2MP90rfLk6Bjyoep7fbuiiSsGmd8S2GHhiOrA77b4u5qp6 +CAlejIZLZ9QOt4zqYrjKD22ZjVFgof30opWWHhYP04+2Z0SAG4fltg5tPZQW +rtu0KioC9r5rWeuqo4e8mbdu2eyKgIz0l/F+dD0Myy5g8RtEQM+Xrt1xJnqo +esxRL2D0EPgVftCpddbDocrUw26Gh+CY4IoXckf1kGm14/LY/EF48NPoz0K7 +HjofeLk5vzAMitrqfLe+1kPXHrXd1MwwSCrVba3o1ENWQHtFaVwYWLlq5Pr3 +6eHVNrXc955h0NVAoXe+10OzJd3ZOekwGEv4faBiVg+1zv7oT8sPBTGBujE/ +ij7WftLXtXcKgWBNnf7X/vrYmmTyTPxJEBxaoCx6BejjPVHJnG9XgyC2aSVl +cq8+zvSav+4+EQTpbt3uPKH6uNv8EWPJIQiuJR1+axqtjxvfH+1IHtoLo4MP ++qoz9HGeXtW7/18guJyy6T1Xp4+62v8+SjgGAGvSr8udm4ZdBZzZ0yx/EGu0 +KL63hob3eHsfOqv6w+Rx9VBZPhrWaO0Rbhfyh3z56TWfhGgonLnmz8IXP/i3 +LcYsVIqGG7ek2Wln+cHDxjNVKdo09IzP1ZCb2AUmaQ8yq51p+H0pTuNWhS9s +VpTYsraYhserdvJd9veGmokn8n4lNLyTzZVev80bFOsOzjeU0cj4/nL+bOYN +q6xfFQSU01B668y1/Qre0BSS8qO5hobGdUtcfo+8wLhxNif6GQ0/d/N58t/3 +BJrT69Ev4zR89+dH98a2HVBGjasznqJhb8/sjEjFDhD9pHny3AxpcfVPwpk7 +YDYyVd9snoZ7tTL++G3bAVV5kJq/TEN1c58sx6HtoP3tlpazEB15fjhPmix4 +gGr8icNNdDquV5O5PsF0h3tGpattDenoxPK1HpZ1B4eFh2e7mXScszUtmGR3 +h8PBcze/mtAx2uDHkn+LGzzf4f2ez5aOFfusW2pc3SCAQbPe7k3HFNnDefei +XOH6j/fU2VQ6NpdYFj9/4wzGFX+vHUmn4whLLwXrneFNoDiNM4OOy1LneDsL +nGFxxNaBkkVHPt6rxRb7ncH6VV0S5tExc/Gf3z5uZxgrPzVxspKONp15f0+b +bwN1f8ZDpX46egyPBxV2OsFpBbvFxEE6KjXwx9x/4ASzw776o0N0jLGqsZy6 +7gQPPE6W53+gY5+G3tvMeCdwchjOEZ+gI0PS/1PLeieIMkoO5WYzwL+elsdW +nXaE54Kv5SeUDDD3WHyfoqcDaL36tMNG1QC5DHyP3rVxgLMnF3OuqxugsE3V +E0+GA+zgVOTbrW2AzMaRhVERB5j6G7E4ZGCA49897TNz7UHsq1Rnh40BNv4Z +T5qKswP/BwFJNWEGuEr8APfSbluY3D8WuTmc3LVSbpzoN7OFw9L7gnoiDNDg +TIbhsJwtnIgNcfoVY4B7HeH0zgEbuGMYIcdMMUDlXfXTak428JdIvNd80QAf +c2WLvje3hrO382ffNBvgP/z9oNXGEqS85L7uemqAZ18I/zXXsoRSvuKB2ecG ++Kul6+MnPku4u7+0SazdAC+OaG5If2MB7zRuZnr0GeAEu/tsyHYLUL1Wrzk6 +boA/Fa3vJR00h4eFXX4zogzsOcEuMNe4CUZs5b0iJBgo6XfGe0XxJmD7vd/9 +D4WBQkcjNTVSN4GpI6fdajkG/opl/69n2yZ4usKQLqnOwIF8x1snpsygzbeA +28SYgf03ln1s1c2gX3FvReZuBobm/Tl8oMYE/nQQ10QDGejD3yy7kGcCUkdW +XrkYxMCf7X+azx03gZ3dl3NKQsnnZS5clNtuAiPJr+LvRjOQM3PflcCVJvDl +s97WkQwG/j0kHFjlhjB7bXlBu46BfDcbZAfUjeGzi3lhWj35PpEr1C9xGEPf +qlOWHxoZiP0nfx8bZUGjNyX3/CMG8jzisGu5yIJjEvqGSy0M3JMUfFFzLQsE +UvfGtg4y0GFu8JzmbyPQ3NPN5s9uiJOcEWz8EwyQEZW6/mCVIfqvZmrGvWSA +QLOvowSnIV7v0UgSqmDAT5npohdrDFGcQ1erOIQBDT08Zjqihuj7bvCiz6wB +WJpj8rKKIWY5fVk0XWUAu5TKuS9uMcSwpTH7MiYNop947lV2MMQVqbh5XIYG +mf5CL6qcDLHn+H9VLitocK806uQLV0OsLMtwufBUH0SULfmXfAxxz5r9Qa1O ++vBU+ZOId4QhemYcznoWpgfqqrJyygWGqLQlOIPaogP4/E18VZEhDsnKDpbe +1gGXgJT3xiXk9ecVvtmf14HEaxPFrtcN0e+xXjW7nw4Mqt5TSqs2RJ7ISK1h +Nh3IUHPXGH9miD67dd2ccSPMqGfRqqYNkfntVWj2DW3oa8PNwj8N0ZWwEppP +0IZHwZNbw+fI9Yci/zvurg0ZVVZhtEVDlLSyjzXk1gZ1Q7abDSuNkE37UXfv +3vXga7VfvlnMCHfzfDd+StOCrj0WvF1MIzwR6pwoNa0OjdxzFH0wwgIh33Vy +L9WhuLxY7byJEWa4GTdvuaEOoVNL5m7mRhjGu9lW2V8d1kbWJAzaG+Fn+ZVn +nw2qgXmK/MJHXyMcadH6fqVTFe6W/Hk/l2qEutnCLtlDykAzC1+wTjfCnapP +WiX/U4ba9+O8haeMsP9aYljTFWWokhmiW581wqL5t/diA5Xh5oVHp/IvGeHp +qzdUz8wrQeHJZIZFhREu5tyokxBXgrRw/jMXOo3QduTSbEnoOuASTi2b6DbC +H4r5cVau6yClku2eaZ8RCtpP3+M1XgdJkzOfxweN8E134LPJNevgaEAX0+Sz +Ea6cp4RJX1eAAztyv377Ra7n0aDJ9U0ePDatI/cuTLTi8gvWOSoHS11cfM1y +TNR50iZ4frccFPpPDlivY6KLp/46SXs5+JxSH+mhysT/1A4vxMrJwYEW+9tR +Okz8xlacHJwmCyfsYmXumjNRbTD4SrmSDDS4df/VC2GivMzpktg0Kuz81tB6 +L4yJB4tTU874UIEtuvDCpnAmWoeEOQ0yqGB+KUhvWxQTt55+mCf0nQJv3q3Y +dzCRiRqVXK2L9hQY810/UJnDxMCo6ivx6ySBuv94/fpHTPx3oHbdjSkxyFje +rZ/exMQHPSM7oUMM2M+aV355zMRtvKrNf++IwRix+nphCxNHi646TR0Qgwa2 +pAtCnUxsKosLrPglCh7Z8ZHzn5iooDpO27dGFC40Ruk/WMPC8YIgiQpbYeC1 +c6+k8LFwxcZnK2c2CkP8iIFWpAALN9QLnnURF4aA1b8UN4iysMz04I/UUSGg +20eIFMuwkPfpSquUaCHoGT3wM3kjC7+JDgo8uiMIojz7Kre4svAr39VhGX0B +KDE7Ej3tzsIXZyVZz6gCoHMkwyxrBwvnPncS2ewCYDd9p7vPh4WKE1n7mUX8 +kNIz93vXPhae1d628GKQD34Vx5lGJ7CwLax8zMhnLfQbZXWWlZP3Wy5yvbzM +AwGHSi5bVbBQkN3ySPkBHpivqPUfv8NChc5nic8teUBIoW9hI0G+j9ng1L05 +brDhkpa6/4iF+3+vXUh24oZ7XWV+nd0sJKScb9uLc4E1312tiD4WPqv3H56a +5oQ+i5Z5iQEW4hWOgy2tnDDb8D3Vc4SFM5ttjqvEcYJW0YZb38ZY2Kze3ZIy +xgH3+k0iTk6w0LQ4L+rbEw6wFtkK2tMszB0vpiYWccDu44deh8+R8Xj5e5WH +OwfMPkq5KP6LhZ8bU2rO63PAscWcXQ2LLJRwfarMLcQBAnrXNXcusdBt8LFA +5eRqyN/fMLe8zMJA+oRKxovV8D+Om+Xr + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08880450436020661}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08880450436020661}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHCprGTPe+3skTLudbnX86DsrDIrK4qUUSKjkBEpKUoqMzSU +so7Q+tIiSZkhpC2zjFLyO7+/zuv9OuPzOs865yPvG+Lkz87Gxla2go3t/8f5 +oZbHiuklxm2T/7J8tW2Nu/Ilokz6joFlcd2H+n41QNFXvhJ9Z+HgNtWvsf0M +iHC40buyrxiO5r3cbNdvBYKT4md/91YB5yj/rvm37jB8zy5ktrcJ9lwY0X3e +FwjmimPvZnrfQHFBeKlqVxT87qWfm+4dhaj77IsP/kuDZrOrJa+Lf8JIVZuM +7rGLIDVc/9lXcwkCTPq1+u2vgMg+rxucZitRo37mVGn3NTi70bzRzpkL75rF +FZ03qgDtAXcLVgAX5otoj+yzq4C2pP2dGjFc+O5k9KSBTwVw9GV/5yriwtHb +qv5VKRUQc/QDtXmcCwNCl9XVX1eA34v4WHoSNyo2br+p6ncbaP6NLLlqHryV +ynlD1uQOvL2w4dGMwFpMFnkXM2ZXCRc7y/kjlNbiqEt643XXSvDgU/FaZKxF +mux+V1/vShhMlP7HvmstZtX5XnwYVgkjwTxMkdq1ON+pzKueXQlfN32so7nz +oVf7kdJ7vZXwazrndkwRP+YVfv2vxb0K6jWEl5dr+ZHrS6rVHZ8qiN6dYZfU +yo+Z0xvHTgdWwd+BpImTP/mRbuoaYhhVBfEf7oq+UhDAbuFJF+aFKkhqL906 +Ei6Am/O9JX90VUF6SdwrdklBDP0xxqJYVYO1XqCQ6DpB3HGYObdsXw1cj52c +VbQE8YSKWfeQSzUkfVAasDERRPu5czypftUQq9D2OTtQEF9wGKmlxlVDcKHE +P+UGQfRQmTY0rqkGx8uVmjbbhTDcR640WqIGBDQvhez0F8KGkXm/RJkaaG9M +qgoJEUKdBbv1yYo1YD3gapCdKIQT66/1H9xQA6aUf2bvyoWwOrE/ZcmiBvQu +WG8P+SuEBX5iRf8dqgHx7A9pWXnC2LEu3pq7rQYkNGqTfpUJowjL8dzbjhqg +NKXE7bwjjERTT/OV7hqQmVY7pNIsjN+DzF4oDdeAkm2od+NXYbQfUYobmakB +3VVLtA+6Iii2+773BrFasA8X+6jTKoL7VZxfMzxqwWHN16GcThGU4PwYbO5Z +C07F9W//DopglXv3lK1vLbh07Hj1dEoEyz+eu2yxtxZ2al5p8BAVRYFQjas/ +o2oh6KP2mWPeouju0ksoX6iF49usjN/Mi2JZ4YrVf17VAqWmncK+Qgxvr/Te +lt5ZCxXC2xY2rhFDgS8CCSK9tdDzxvPOGVkxzLpOPSQ4VAuKjuEKjpZi+HUg +YaD2ey00bSng6MgVQ9lshs311QS43FL8sHxFDN9b2Dx/xkXAGO+Nh9oVYqji +rqw9vIYAwbaaw6ebxNCqqvf+L0ECvK1bx+y+i6Hd8S2/e6QJWDKfa3/JFMdv +XIVPUI+AzLLo8iVzcbSSPLh1kkaAIgdbqpajOHb5bhjIZhBg+4TH5JS/ON5x +nRpsMybgoplctW2GOAY+Gm/5akmAAdrkvBgWR7GCfrfX2wloK+g4+OebOHKe +2STC70muv+zsoDErjia25u82exNw/IE3dzqXBPo+PZSX70dADzMixnqjBO7y +WrX0dx8BBxlFXi3HJDDw/UJkcCwB1oV8szYnJfBQoZui7FECFDhjU9vPSeDq +Z309LXEEdHS5VHZek8D7QpZb1yYSsD6Ud+VQO3l9zoeXtmkErO6NyvHuk8BN +c+tfvTxBwCDri8aH9xJIvPszYnmSgPQ1Tdu+zkrgOow20jpNwNeyyLIfFEms +yN/4oyKbgIdrPxkeUpRE732FeWznCTgf7vRqQUsSh2ZO+9nmELDZVOvXX5TE +Hdfyrd/kElD8btSKc48k6m56WJCTT0DUJoehtFBJVD2wx76hgACH8vsHeKMl +sd5NTbm3kIDlwxcuCZ6SxM1PftotFxOwQ8RuglotiTWOv+q4rxKgG9OYkH9P +EjctVLUukeYZVRWTfyqJi8OEwPg1AupvrwTlt5KoTB9i1t0g8ykW1nltVBJL +WWrK2eUEBBwZ2qMxLomfq3mtgm4SIGZTn7lhWRJPa6425aogYKJSWamai4JS +81up7aQfS2TX6wtRcEtDhV7GbTIfn4NHDZUoOJsgsn7pDhnvBEW9zTYUFIfZ +wPPVBFz9eub5s20U1LH6HLa+hoCj9ss7rD0p+KqZ9uwRaS3p/mT7MApe3/DU +u6uWgFVJFpQ30RRE9fBrzgSZj7Gaim1JFIwq8Nz0mvSJu6d73XMoKPtpKK6u +jgAf2aWgwUIKKvDOKSjcJestZS+b1w0KHnazlD9OWmCiN/t9NQVn7PNjP5P+ +snWzmt99CtrmPqBhPQEPGqruf35KwbDFA47ZpM/LyzkFdlCw3OV4+yjpTVOL +0cEfKBgqyrMQ3EDmyzJb/b9xCnImmhwpJ11RpNUvPE9Bh+cvS0ZJf1h8mrZ7 +mYI/fgeGiDQSILHNm1HPRcWbYp1DSHrLrd9f1whR8cjq57N7SB/jyLrgSaWS +/ctdnUa6zkvTslKRilsOeVDLSI/ffbKwcj0V1SFO+z5peSGvqy50KgYEGs+0 +k3YJ+uVyHanYZ+PtO0A6/fEZjr9WVCySup00SvqRtAZht5WKCZPz7h9Jz0U8 +9i/aQUWr26s/jpBW79gpOutPxZXK5Yp9pD3VFh6bh1AxeOaudCvprGOZ4bmH +qSiZwv6aIP18QE1xPIGKE5o7MZ/0X73mTuN0KjqtKNwfT3pjxo7EM9nkelNX +PHaS3v1lTudjHhW/VJlx65O+hKdHaVep6Nm1PYaTdEeu6tm0O1SMvdZa1UXG +b/XP/0wG66n4YUto5WXShrbbZ9Y3U/FE+fooL9IhpbOFCW1UXA7+tkaadMm/ +Uw5d3VR8xpMS1E3m662rCpvKMBXTar7nppLmq3x0O+orFX13rcylkTbj8fBq +m6Hixva6vcNkPRze9ZNP9g8V3wfOCSSSHhVVDn68VgrFq5+ONpD1JR7yUFpc +XAr/TBsJ2ZO2fe72MlBOCj/ELkkPkfVIRKdr8utKIRFh9GacrN/vnYqDPkwp +fCl79eg+0nJaD9JrNkvhaBqL/wtZ7yeGp8fc3aSQq3jgYxvZHw8NTly86SOF +4f+GtQxIz55ZZ728VwqlDnHtyq8i87HJ5XrJESkMsnmdu72SAJ3rjXumiqXw +7q2psFyyH/ewO4ub3iTPbyG2Dd4i4PL2yafZtVIocHNUl0Kag09e2fC5FIbI +35xKIfu9/0DKx6QJKby0VjxHkZwP/G2y2b3zUrg5VTQHyPmxSaneTJ1NGvPv +ypc4l5H13fu9+JWQNEq+7po4UEJAAtPRh2IgjZolYjEHyPlk6Zn/g24qjeyt +LqL25Pzii/+e6Gwrja5cXtNK5Hy73JxcluktjQ7lrw42XSLgrnXDd440adz9 +pH+JIOfltNu6iJ9vpbHxXMTZzHSy/qNDOQU/SmO/kX2qEDmPj16+f2H9pDT+ +Mlv4npFKAO+Ia2MguwymmRpxRSYToLLnJNuIugwayZR8WkXOe89DcyfaYmSQ +lX68STKMAKUcU6mxZBn8l9j1wyzk//10+hZnpgzSuQcfBuwnIPqvWodpiQyy +xwgziwMJOJfoKVrfJoOvHRwEu33I79WZZwWl0rKo1N3XzXQk67Eit+boQ1l0 +flPgqK5Jxqu3fWnyuSxm96Y86lMjwI5tlYXXG1lsp+zrOqZCwC6n4LfwSRZd +Yk7MtSgQYB4jHxe/Wg6d5h/6K0oSECo7f8VEQw69ocicl/x+P95TMNEcIYfn +Xb7FN7ytBau/DKHYGDnMNtMvHe2phfbMLppevBw61FGaObpq4W09d3xJmhxe +1IifN22vhck14ULJl+VwVc+x4+lNtSBxx5Ju3iSH/Y321V43amHfr5n452vl +0cX/gqdKZC0Yhu0W+ywkj5H1N91OHqwFrrH+8pUS8lhbFbs8HlILpQPNPcYK +8hhMjfcpCqiFoQfnNGtp8piheba/x538X0pm9BV5yeMnN4WHkUa1oCOUoB1T +KY9Zl7L8b/ypgd8aAkNazgrInsobnBdaA/N5lARdDwW0K/njJruvBmb5lRQZ +Xgo4xhe3kLenBiZ/MvZuClTAvVHCO8941sBo4655jyMK6J6jruFoWwOtNnV8 +qaUKWB8+1kdXqYGLQZ4wOqeA6yR5r9X3VwOz/Gbh+fPr0GfXbl4HRjXMCFl7 +uzQp4mLxRMPWn5Xw8aS3ywFOZTzsdPRceeQdsJqKtPpEU8FLTB/j2/wVML6L +62BNnCpad93XPfH9BrlfEWc/3qSG1Y53sg6PXgWhl8oZd6bU8V/AdxcFlVKQ +Sr3tQKNpoiNd4Sa4F8MFDYaA8B4tNE1tDGp8UwCtFBP9n2fW49E696/6+y+B +oVRTpnaPNuYf65fcK5UDfCuLw32ObcA4qw7BqqQskEmQZborb8SsI3c6CsUz +gVtpB+H0bCMy4WnlfztPwHqW5O3InToY3kGXtKhOhup1gX/YvXXQdlVY19nC +ZDDgqbfI8NXBvOFAi++nksG0122kZI8OxoRUY1NAMriEXRB8E6aDkfTRWU7Z +ZIgrFQ/XTNFBKz+p5YlTSdCxVozxvkIHiQEesRWHEuHAkFCzNZsupnvCrPye +BHj+dMf9G+y6aGtxePVRtwSQuV1Wx7OadEb0mo9WCdAaZ3izlVsXC1uTPr7U +TAAFed9z1sK62Jyz0VHiZzy83lW5x1pZFx97KVkkJcTDhm/2vNa2umhx6JuR +nk0cTP086Wx1QReHHqWYZgrHwmBfkUveRV08FlhQFfUnBlrvE64zl8n7/fg1 +wj/EQMnxEffcIl2MP90rfLk6Bjyoep7fbuiiSsGmd8S2GHhiOrA77b4u5qp6 +CAlejIZLZ9QOt4zqYrjKD22ZjVFgof30opWWHhYP04+2Z0SAG4fltg5tPZQW +rtu0KioC9r5rWeuqo4e8mbdu2eyKgIz0l/F+dD0Myy5g8RtEQM+Xrt1xJnqo +esxRL2D0EPgVftCpddbDocrUw26Gh+CY4IoXckf1kGm14/LY/EF48NPoz0K7 +HjofeLk5vzAMitrqfLe+1kPXHrXd1MwwSCrVba3o1ENWQHtFaVwYWLlq5Pr3 +6eHVNrXc955h0NVAoXe+10OzJd3ZOekwGEv4faBiVg+1zv7oT8sPBTGBujE/ +ij7WftLXtXcKgWBNnf7X/vrYmmTyTPxJEBxaoCx6BejjPVHJnG9XgyC2aSVl +cq8+zvSav+4+EQTpbt3uPKH6uNv8EWPJIQiuJR1+axqtjxvfH+1IHtoLo4MP ++qoz9HGeXtW7/18guJyy6T1Xp4+62v8+SjgGAGvSr8udm4ZdBZzZ0yx/EGu0 +KL63hob3eHsfOqv6w+Rx9VBZPhrWaO0Rbhfyh3z56TWfhGgonLnmz8IXP/i3 +LcYsVIqGG7ek2Wln+cHDxjNVKdo09IzP1ZCb2AUmaQ8yq51p+H0pTuNWhS9s +VpTYsraYhserdvJd9veGmokn8n4lNLyTzZVev80bFOsOzjeU0cj4/nL+bOYN +q6xfFQSU01B668y1/Qre0BSS8qO5hobGdUtcfo+8wLhxNif6GQ0/d/N58t/3 +BJrT69Ev4zR89+dH98a2HVBGjasznqJhb8/sjEjFDhD9pHny3AxpcfVPwpk7 +YDYyVd9snoZ7tTL++G3bAVV5kJq/TEN1c58sx6HtoP3tlpazEB15fjhPmix4 +gGr8icNNdDquV5O5PsF0h3tGpattDenoxPK1HpZ1B4eFh2e7mXScszUtmGR3 +h8PBcze/mtAx2uDHkn+LGzzf4f2ez5aOFfusW2pc3SCAQbPe7k3HFNnDefei +XOH6j/fU2VQ6NpdYFj9/4wzGFX+vHUmn4whLLwXrneFNoDiNM4OOy1LneDsL +nGFxxNaBkkVHPt6rxRb7ncH6VV0S5tExc/Gf3z5uZxgrPzVxspKONp15f0+b +bwN1f8ZDpX46egyPBxV2OsFpBbvFxEE6KjXwx9x/4ASzw776o0N0jLGqsZy6 +7gQPPE6W53+gY5+G3tvMeCdwchjOEZ+gI0PS/1PLeieIMkoO5WYzwL+elsdW +nXaE54Kv5SeUDDD3WHyfoqcDaL36tMNG1QC5DHyP3rVxgLMnF3OuqxugsE3V +E0+GA+zgVOTbrW2AzMaRhVERB5j6G7E4ZGCA49897TNz7UHsq1Rnh40BNv4Z +T5qKswP/BwFJNWEGuEr8APfSbluY3D8WuTmc3LVSbpzoN7OFw9L7gnoiDNDg +TIbhsJwtnIgNcfoVY4B7HeH0zgEbuGMYIcdMMUDlXfXTak428JdIvNd80QAf +c2WLvje3hrO382ffNBvgP/z9oNXGEqS85L7uemqAZ18I/zXXsoRSvuKB2ecG ++Kul6+MnPku4u7+0SazdAC+OaG5If2MB7zRuZnr0GeAEu/tsyHYLUL1Wrzk6 +boA/Fa3vJR00h4eFXX4zogzsOcEuMNe4CUZs5b0iJBgo6XfGe0XxJmD7vd/9 +D4WBQkcjNTVSN4GpI6fdajkG/opl/69n2yZ4usKQLqnOwIF8x1snpsygzbeA +28SYgf03ln1s1c2gX3FvReZuBobm/Tl8oMYE/nQQ10QDGejD3yy7kGcCUkdW +XrkYxMCf7X+azx03gZ3dl3NKQsnnZS5clNtuAiPJr+LvRjOQM3PflcCVJvDl +s97WkQwG/j0kHFjlhjB7bXlBu46BfDcbZAfUjeGzi3lhWj35PpEr1C9xGEPf +qlOWHxoZiP0nfx8bZUGjNyX3/CMG8jzisGu5yIJjEvqGSy0M3JMUfFFzLQsE +UvfGtg4y0GFu8JzmbyPQ3NPN5s9uiJOcEWz8EwyQEZW6/mCVIfqvZmrGvWSA +QLOvowSnIV7v0UgSqmDAT5npohdrDFGcQ1erOIQBDT08Zjqihuj7bvCiz6wB +WJpj8rKKIWY5fVk0XWUAu5TKuS9uMcSwpTH7MiYNop947lV2MMQVqbh5XIYG +mf5CL6qcDLHn+H9VLitocK806uQLV0OsLMtwufBUH0SULfmXfAxxz5r9Qa1O ++vBU+ZOId4QhemYcznoWpgfqqrJyygWGqLQlOIPaogP4/E18VZEhDsnKDpbe +1gGXgJT3xiXk9ecVvtmf14HEaxPFrtcN0e+xXjW7nw4Mqt5TSqs2RJ7ISK1h +Nh3IUHPXGH9miD67dd2ccSPMqGfRqqYNkfntVWj2DW3oa8PNwj8N0ZWwEppP +0IZHwZNbw+fI9Yci/zvurg0ZVVZhtEVDlLSyjzXk1gZ1Q7abDSuNkE37UXfv +3vXga7VfvlnMCHfzfDd+StOCrj0WvF1MIzwR6pwoNa0OjdxzFH0wwgIh33Vy +L9WhuLxY7byJEWa4GTdvuaEOoVNL5m7mRhjGu9lW2V8d1kbWJAzaG+Fn+ZVn +nw2qgXmK/MJHXyMcadH6fqVTFe6W/Hk/l2qEutnCLtlDykAzC1+wTjfCnapP +WiX/U4ba9+O8haeMsP9aYljTFWWokhmiW581wqL5t/diA5Xh5oVHp/IvGeHp +qzdUz8wrQeHJZIZFhREu5tyokxBXgrRw/jMXOo3QduTSbEnoOuASTi2b6DbC +H4r5cVau6yClku2eaZ8RCtpP3+M1XgdJkzOfxweN8E134LPJNevgaEAX0+Sz +Ea6cp4RJX1eAAztyv377Ra7n0aDJ9U0ePDatI/cuTLTi8gvWOSoHS11cfM1y +TNR50iZ4frccFPpPDlivY6KLp/46SXs5+JxSH+mhysT/1A4vxMrJwYEW+9tR +Okz8xlacHJwmCyfsYmXumjNRbTD4SrmSDDS4df/VC2GivMzpktg0Kuz81tB6 +L4yJB4tTU874UIEtuvDCpnAmWoeEOQ0yqGB+KUhvWxQTt55+mCf0nQJv3q3Y +dzCRiRqVXK2L9hQY810/UJnDxMCo6ivx6ySBuv94/fpHTPx3oHbdjSkxyFje +rZ/exMQHPSM7oUMM2M+aV355zMRtvKrNf++IwRix+nphCxNHi646TR0Qgwa2 +pAtCnUxsKosLrPglCh7Z8ZHzn5iooDpO27dGFC40Ruk/WMPC8YIgiQpbYeC1 +c6+k8LFwxcZnK2c2CkP8iIFWpAALN9QLnnURF4aA1b8UN4iysMz04I/UUSGg +20eIFMuwkPfpSquUaCHoGT3wM3kjC7+JDgo8uiMIojz7Kre4svAr39VhGX0B +KDE7Ej3tzsIXZyVZz6gCoHMkwyxrBwvnPncS2ewCYDd9p7vPh4WKE1n7mUX8 +kNIz93vXPhae1d628GKQD34Vx5lGJ7CwLax8zMhnLfQbZXWWlZP3Wy5yvbzM +AwGHSi5bVbBQkN3ySPkBHpivqPUfv8NChc5nic8teUBIoW9hI0G+j9ng1L05 +brDhkpa6/4iF+3+vXUh24oZ7XWV+nd0sJKScb9uLc4E1312tiD4WPqv3H56a +5oQ+i5Z5iQEW4hWOgy2tnDDb8D3Vc4SFM5ttjqvEcYJW0YZb38ZY2Kze3ZIy +xgH3+k0iTk6w0LQ4L+rbEw6wFtkK2tMszB0vpiYWccDu44deh8+R8Xj5e5WH +OwfMPkq5KP6LhZ8bU2rO63PAscWcXQ2LLJRwfarMLcQBAnrXNXcusdBt8LFA +5eRqyN/fMLe8zMJA+oRKxovV8D+Om+Xr + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08880450436020661}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08880450436020661}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993832894896822*^9}, + CellLabel-> + "Out[152]=",ExpressionUUID->"7f4ebc84-7e42-4f7a-82c0-cfc26fd5655b"] +}, Open ]], Cell[CellGroupData[{ @@ -13371,66 +16836,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[142]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], + "In[153]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 93, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097599506`*^9}, +Cell[BoxData["2.983671968578889`"], "Output", + CellChangeTimes->{3.9913279159698696`*^9, 3.993832952060535*^9}, CellLabel-> - "During evaluation of \ -In[142]:=",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 94, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909769953*^9}, - CellLabel-> - "During evaluation of \ -In[142]:=",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 142, 95, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097784023`*^9}, - CellLabel-> - "During evaluation of \ -In[142]:=",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 142, 96, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909786396*^9}, - CellLabel-> - "During evaluation of \ -In[142]:=",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], - -Cell[BoxData["11.275343508420296`"], "Output", - CellChangeTimes->{3.9913279159698696`*^9}, - CellLabel-> - "Out[142]=",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] + "Out[153]=",ExpressionUUID->"e872407a-6ba4-4ec5-aa06-6ae598643475"] }, Open ]], Cell[CellGroupData[{ @@ -13497,68 +16908,81 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99179998339209*^9, - 3.991799988637089*^9}},ExpressionUUID->"a5e0631c-6c6c-a045-8418-\ -22c641e38d86"], + CellChangeTimes->{{3.99179998339209*^9, 3.991799988637089*^9}}, + CellLabel-> + "In[154]:=",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 143, 97, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916008396*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.067298701992005`*^-87\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 154, 69, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.993832952087408*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], +In[154]:=",ExpressionUUID->"30f42b88-bd35-4a71-96f6-23ebceb9aee8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 143, 98, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916018362*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.968837391171106`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 154, 70, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.993832952091839*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], +In[154]:=",ExpressionUUID->"f72b84cc-2f98-4361-a5b6-51b833b68ad2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 143, - 99, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279160263577`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1670391335897967`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 154, 71, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.993832952095995*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], +In[154]:=",ExpressionUUID->"8404cebf-64da-4f40-aa88-e0a1a925296a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 143, 100, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916034359*^9}, +during this calculation.\"", 2, 154, 72, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.993832952099464*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], +In[154]:=",ExpressionUUID->"2858e632-5a1c-40c5-b9d1-0cb2439174f7"], -Cell[BoxData["1.0734937398087425`"], "Output", - CellChangeTimes->{3.991327922931429*^9}, +Cell[BoxData["4.807334324271507`"], "Output", + CellChangeTimes->{3.991327922931429*^9, 3.993832959042754*^9}, CellLabel-> - "Out[143]=",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] + "Out[154]=",ExpressionUUID->"32435660-e61a-4e26-a131-9aab63c48683"] }, Open ]], Cell[CellGroupData[{ @@ -13579,8 +17003,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13625,68 +17048,81 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799991275097*^9, - 3.9917999948700333`*^9}},ExpressionUUID->"4b6c44e4-d946-0c4d-9992-\ -4f0fc7048689"], + CellChangeTimes->{{3.991799991275097*^9, 3.9917999948700333`*^9}}, + CellLabel-> + "In[155]:=",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 144, 101, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229664307`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.067298701992005`*^-87\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 155, 73, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.99383295907095*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], +In[155]:=",ExpressionUUID->"43e9e7ec-bfcb-46e9-8faa-6c5e7141cdbc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 144, 102, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327922975607*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.968837391171106`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 155, 74, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.993832959075308*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], +In[155]:=",ExpressionUUID->"19b40306-7011-4901-94ca-f2fa3b96c170"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 144, - 103, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229836063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1670391335897967`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 155, 75, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.993832959079557*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], +In[155]:=",ExpressionUUID->"b7751184-4eac-41e4-830d-5b66b91e3f8b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 144, 104, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229916077`*^9}, +during this calculation.\"", 2, 155, 76, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.9938329590830927`*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], +In[155]:=",ExpressionUUID->"180b579b-722b-4242-863f-7dea1d5e4a95"], -Cell[BoxData["9.48093127226425`"], "Output", - CellChangeTimes->{3.9913279288200035`*^9}, +Cell[BoxData["20.013082899395695`"], "Output", + CellChangeTimes->{3.9913279288200035`*^9, 3.993832966461718*^9}, CellLabel-> - "Out[144]=",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] + "Out[155]=",ExpressionUUID->"268741b3-21d6-4c59-9577-71ddee231180"] }, Open ]], Cell[CellGroupData[{ @@ -13707,8 +17143,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13753,68 +17188,81 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918000011431293`*^9, - 3.9918000068677616`*^9}},ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-\ -32244819d42b"], + CellChangeTimes->{{3.9918000011431293`*^9, 3.9918000068677616`*^9}}, + CellLabel-> + "In[156]:=",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 145, 105, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928854006*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.067298701992005`*^-87\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 156, 77, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.993832966489936*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], +In[156]:=",ExpressionUUID->"213c9042-6027-403a-bcbc-8c15ad9cb56b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 145, 106, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928864023*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.968837391171106`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 156, 78, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.993832966494725*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], +In[156]:=",ExpressionUUID->"b42acc68-aff2-415b-a440-a29bd365bc35"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 145, - 107, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928871004*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1670391335897967`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290976718243\ +95148564562793421075581629743523\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"82716787491055299583334410482896250947036182753801376918061850774799489433\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 156, 79, + 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.993832966498711*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], +In[156]:=",ExpressionUUID->"e5ef07ce-dffe-48b4-82ee-31dbf62b80bf"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 145, 108, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928878006*^9}, +during this calculation.\"", 2, 156, 80, 25990558358386545157, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.993832966502172*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], +In[156]:=",ExpressionUUID->"691bc105-b1c4-478c-aaf2-04af176b7f55"], -Cell[BoxData["17.503865312709518`"], "Output", - CellChangeTimes->{3.9913279320131683`*^9}, +Cell[BoxData["1.5858180919484341`"], "Output", + CellChangeTimes->{3.9913279320131683`*^9, 3.993832970842141*^9}, CellLabel-> - "Out[145]=",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] + "Out[156]=",ExpressionUUID->"da01b778-2ac1-4128-82bf-9cd7b1ac6d2a"] }, Open ]], Cell[CellGroupData[{ @@ -13823,18 +17271,110 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991800029528055*^9, - 3.991800041720209*^9}},ExpressionUUID->"99da2760-e71e-1246-8cc9-\ -f0a7464dc747"], - -Cell[BoxData["0.08333108480569339`"], "Output", - CellChangeTimes->{3.9913279320452003`*^9}, + CellChangeTimes->{{3.991800029528055*^9, 3.991800041720209*^9}}, CellLabel-> - "Out[146]=",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] -}, Open ]] + "In[157]:=",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], + +Cell[BoxData["0.8533371337009446`"], "Output", + CellChangeTimes->{3.9913279320452003`*^9, 3.99383297086451*^9}, + CellLabel-> + "Out[157]=",ExpressionUUID->"43586a10-4076-48af-b650-5928a986de62"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"CellPrint", "[", + RowBox[{"ExpressionCell", "[", + RowBox[{ + RowBox[{"Panel", "[", + RowBox[{ + RowBox[{"Row", "[", + RowBox[{"{", + RowBox[{ + RowBox[{"Style", "[", + + RowBox[{"\"\<\:0423\:043f\:0440\:0430\:0432\:043b\:0435\:043d\:0438\ +\:0435 \:043a\:044d\:0448\:0435\:043c \:0433\:0440\:0430\:0444\:0438\:043a\ +\:0430: \>\"", ",", "Bold"}], "]"}], ",", + RowBox[{"Button", "[", + + RowBox[{"\"\<\:0421\:0434\:0435\:043b\:0430\:0442\:044c \:0442\ +\:0430\:0431\:043b\:0438\:0446\:0443 (\:041b\:0438\:043d\:0438\:044f 1)\>\"", + ",", + RowBox[{"Module", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"cell", ",", "pts"}], "}"}], ",", + RowBox[{ + RowBox[{"cell", "=", + RowBox[{"NotebookRead", "[", + RowBox[{"EvaluationNotebook", "[", "]"}], "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"pts", "=", + RowBox[{"Cases", "[", + RowBox[{"cell", ",", + RowBox[{ + RowBox[{"Line", "[", "p_", "]"}], ":>", "p"}], ",", + "Infinity"}], "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{"If", "[", + RowBox[{ + RowBox[{ + RowBox[{"Length", "[", "pts", "]"}], ">", "0"}], ",", + RowBox[{ + RowBox[{"plotX", "=", + RowBox[{"pts", "[", + RowBox[{"[", "1", "]"}], "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"fInterp", "=", + RowBox[{"Interpolation", "[", "plotX", "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"dataX", "=", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"x", ",", + RowBox[{"fInterp", "[", "x", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"x", ",", "0", ",", "30", ",", "1"}], "}"}]}], + "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{"SelectionMove", "[", + RowBox[{ + RowBox[{"EvaluationNotebook", "[", "]"}], ",", "After", ",", + "Cell"}], "]"}], ";", "\[IndentingNewLine]", + RowBox[{"CellPrint", "[", + RowBox[{"Cell", "[", + RowBox[{ + RowBox[{"BoxData", "[", + RowBox[{"ToBoxes", "[", + RowBox[{"TableForm", "[", "dataX", "]"}], "]"}], "]"}], + ",", "\"\\""}], "]"}], "]"}]}], ",", + RowBox[{"MessageDialog", "[", + + RowBox[{"\"\<\:041e\:0448\:0438\:0431\:043a\:0430: \:0421\ +\:043d\:0430\:0447\:0430\:043b\:0430 \:0432\:044b\:0434\:0435\:043b\:0438\ +\:0442\:0435 \:043d\:0443\:0436\:043d\:044b\:0439 \:0433\:0440\:0430\:0444\ +\:0438\:043a (\:043a\:043b\:0438\:043a\:043d\:0438\:0442\:0435 \:043f\:043e \ +\:0435\:0433\:043e \:044f\:0447\:0435\:0439\:043a\:0435 \:0441\:043f\:0440\ +\:0430\:0432\:0430)!\>\"", ",", + RowBox[{"WindowFloating", "->", "True"}]}], "]"}]}], + "]"}]}]}], "]"}], ",", + RowBox[{"Background", "->", + RowBox[{"RGBColor", "[", + RowBox[{"0.9", ",", "0.95", ",", "1"}], "]"}]}], ",", + RowBox[{"ImageSize", "->", + RowBox[{"{", + RowBox[{"180", ",", "25"}], "}"}]}]}], "]"}]}], "}"}], "]"}], ",", + RowBox[{"Background", "->", + RowBox[{"GrayLevel", "[", "0.95", "]"}]}], ",", + RowBox[{"FrameMargins", "->", "10"}]}], "]"}], ",", "\"\\""}], + "]"}], "]"}], "\n"}]], "Input", + CellChangeTimes->{{3.9943043996512623`*^9, 3.994304399651291*^9}}, + CellLabel-> + "In[159]:=",ExpressionUUID->"7dc50d8e-5b4e-4cb6-91be-2af4f034010c"] }, +Evaluator->"kernel 3", WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +WindowMargins->{{0, Automatic}, {0, 18}}, CellContext->Notebook, Magnification:>0.8 Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", @@ -13853,662 +17393,669 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 455, 8, 35, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], -Cell[1034, 32, 333, 6, 38, "Output",ExpressionUUID->"c7898915-503c-40cd-948e-7969464da68e"] +Cell[576, 22, 449, 7, 29, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], +Cell[1028, 31, 349, 5, 33, "Output",ExpressionUUID->"e13360af-2b6a-4210-908f-526c4f8f5c3f"] }, Open ]], Cell[CellGroupData[{ -Cell[1404, 43, 203, 4, 35, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], -Cell[1610, 49, 333, 6, 38, "Output",ExpressionUUID->"bab282c2-dd65-4ec1-822d-b0d48b8bd000"] +Cell[1414, 41, 197, 3, 29, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], +Cell[1614, 46, 349, 5, 33, "Output",ExpressionUUID->"a62e4c07-11e1-4746-8ee8-7e1b2dd0f8f8"] }, Open ]], Cell[CellGroupData[{ -Cell[1980, 60, 227, 5, 35, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], -Cell[2210, 67, 354, 6, 38, "Output",ExpressionUUID->"030ad948-aa8b-41c8-9ceb-50d4396cbb94"] +Cell[2000, 56, 221, 4, 29, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], +Cell[2224, 62, 374, 6, 33, "Output",ExpressionUUID->"0cf96b3c-3de3-4cf0-a410-6a9bc16a04d3"] }, Open ]], Cell[CellGroupData[{ -Cell[2601, 78, 181, 4, 35, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], -Cell[2785, 84, 333, 6, 38, "Output",ExpressionUUID->"720dd102-bdb6-4e40-915e-ca7bb52f022d"] +Cell[2635, 73, 175, 3, 29, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], +Cell[2813, 78, 348, 5, 33, "Output",ExpressionUUID->"7af3b0fd-14a0-44ce-9f3f-bb01fefd28f0"] }, Open ]], Cell[CellGroupData[{ -Cell[3155, 95, 263, 8, 47, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], -Cell[3421, 105, 348, 6, 38, "Output",ExpressionUUID->"660f5006-00ba-4bb0-831e-61167574f009"] +Cell[3198, 88, 257, 7, 42, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], +Cell[3458, 97, 363, 5, 33, "Output",ExpressionUUID->"e8c60412-8318-4e1c-913d-7d8238a0a0e1"] }, Open ]], Cell[CellGroupData[{ -Cell[3806, 116, 137, 3, 35, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], -Cell[3946, 121, 331, 6, 38, "Output",ExpressionUUID->"06e14c94-4a8e-4850-bc58-a07a9b973991"] +Cell[3858, 107, 131, 2, 29, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], +Cell[3992, 111, 346, 5, 33, "Output",ExpressionUUID->"64f9c9f0-c105-4db0-b45a-b4e951be0982"] }, Open ]], Cell[CellGroupData[{ -Cell[4314, 132, 282, 7, 35, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], -Cell[4599, 141, 346, 6, 38, "Output",ExpressionUUID->"2d498c00-010d-4fc3-818c-355bc242d54a"] +Cell[4375, 121, 276, 6, 29, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], +Cell[4654, 129, 361, 5, 33, "Output",ExpressionUUID->"f3ef23ca-77bf-4b17-8437-7f2534c93d60"] }, Open ]], Cell[CellGroupData[{ -Cell[4982, 152, 263, 8, 35, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], -Cell[5248, 162, 341, 6, 38, "Output",ExpressionUUID->"45cf2f9d-5798-4935-b014-4f23f725956c"] +Cell[5052, 139, 257, 7, 29, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], +Cell[5312, 148, 357, 5, 33, "Output",ExpressionUUID->"bab3b6eb-8005-4dcf-aeee-bcaed8b857ee"] }, Open ]], Cell[CellGroupData[{ -Cell[5626, 173, 229, 5, 35, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], -Cell[5858, 180, 312, 6, 38, "Output",ExpressionUUID->"14c6f2bc-b022-4ebc-b3a9-cbecdebd0c6f"] +Cell[5706, 158, 223, 4, 29, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], +Cell[5932, 164, 330, 5, 33, "Output",ExpressionUUID->"3ec36cd1-b098-4f7e-af72-2c9598e48c11"] }, Open ]], Cell[CellGroupData[{ -Cell[6207, 191, 233, 5, 35, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], -Cell[6443, 198, 310, 6, 38, "Output",ExpressionUUID->"736c8891-3302-46e4-bfc0-f44e850e96a0"] +Cell[6299, 174, 228, 4, 29, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], +Cell[6530, 180, 327, 5, 33, "Output",ExpressionUUID->"8e7e288f-0691-4dc0-90d0-4b3330a3eb5c"] }, Open ]], Cell[CellGroupData[{ -Cell[6790, 209, 134, 3, 35, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], -Cell[6927, 214, 326, 6, 38, "Output",ExpressionUUID->"eac224bf-46c5-4801-80a0-7792e3034e51"] +Cell[6894, 190, 129, 2, 29, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], +Cell[7026, 194, 342, 5, 33, "Output",ExpressionUUID->"550c1197-b226-4400-ad84-d98f0ec47335"] }, Open ]], Cell[CellGroupData[{ -Cell[7290, 225, 134, 3, 35, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], -Cell[7427, 230, 325, 6, 38, "Output",ExpressionUUID->"9ef68bc3-0f6d-4c67-ad21-988666e4e3b9"] +Cell[7405, 204, 129, 2, 29, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], +Cell[7537, 208, 344, 5, 33, "Output",ExpressionUUID->"816bdbc7-2ca3-4997-a638-e936dac95505"] }, Open ]], Cell[CellGroupData[{ -Cell[7789, 241, 562, 20, 79, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], -Cell[8354, 263, 349, 6, 38, "Output",ExpressionUUID->"6af22fd7-3815-4135-b354-dd994ddc10ce"] +Cell[7918, 218, 557, 19, 79, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], +Cell[8478, 239, 366, 5, 33, "Output",ExpressionUUID->"5f7435b7-f11e-4512-8360-1407df561afd"] }, Open ]], Cell[CellGroupData[{ -Cell[8740, 274, 562, 20, 79, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], -Cell[9305, 296, 351, 6, 38, "Output",ExpressionUUID->"098d791b-db28-40e9-a42d-63296949ae59"] +Cell[8881, 249, 557, 19, 79, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], +Cell[9441, 270, 368, 5, 33, "Output",ExpressionUUID->"0c567c92-03eb-46ab-b448-3a424fbcd1b7"] }, Open ]], Cell[CellGroupData[{ -Cell[9693, 307, 1497, 49, 79, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], -Cell[11193, 358, 343, 6, 38, "Output",ExpressionUUID->"bbdaf0a1-4fe0-43d0-954b-b10150a28ce3"] +Cell[9846, 280, 1492, 48, 79, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], +Cell[11341, 330, 360, 5, 33, "Output",ExpressionUUID->"4f497da0-eb8b-4801-a035-cbb961f99d6e"] }, Open ]], Cell[CellGroupData[{ -Cell[11573, 369, 1336, 45, 79, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], -Cell[12912, 416, 360, 7, 38, "Output",ExpressionUUID->"c30ec92b-18ff-48ee-b87e-f07bb754df49"] +Cell[11738, 340, 1331, 44, 79, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], +Cell[13072, 386, 377, 6, 33, "Output",ExpressionUUID->"cb5274a6-9cc0-427c-96fc-e9bf7ff15817"] }, Open ]], Cell[CellGroupData[{ -Cell[13309, 428, 1336, 45, 79, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], -Cell[14648, 475, 369, 7, 38, "Output",ExpressionUUID->"e028a985-70df-495e-a50f-93d8b5b0befc"] +Cell[13486, 397, 1331, 44, 79, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], +Cell[14820, 443, 386, 6, 33, "Output",ExpressionUUID->"bda5bf8d-6b43-4bb6-823d-cc16baac2807"] }, Open ]], Cell[CellGroupData[{ -Cell[15054, 487, 1497, 49, 79, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], -Cell[16554, 538, 340, 6, 38, "Output",ExpressionUUID->"a5f92457-dde9-47e6-a08f-b7e5a8cdf4a3"] +Cell[15243, 454, 1492, 48, 79, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], +Cell[16738, 504, 357, 5, 33, "Output",ExpressionUUID->"7dfe4cee-db17-4fb5-be4e-63cf2898d495"] }, Open ]], Cell[CellGroupData[{ -Cell[16931, 549, 136, 3, 35, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], -Cell[17070, 554, 330, 6, 38, "Output",ExpressionUUID->"c21563ad-1e07-4833-8418-4457483ab335"] +Cell[17132, 514, 131, 2, 29, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], +Cell[17266, 518, 347, 5, 33, "Output",ExpressionUUID->"41097959-05bb-4989-95d8-3456f95eeff5"] }, Open ]], Cell[CellGroupData[{ -Cell[17437, 565, 138, 3, 35, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], -Cell[17578, 570, 329, 6, 38, "Output",ExpressionUUID->"174c1caf-4eab-4387-8f88-05152b022666"] +Cell[17650, 528, 133, 2, 29, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], +Cell[17786, 532, 345, 5, 33, "Output",ExpressionUUID->"bedc23c7-0a10-4dad-96ef-c787984455f3"] }, Open ]], Cell[CellGroupData[{ -Cell[17944, 581, 139, 3, 35, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], -Cell[18086, 586, 335, 6, 38, "Output",ExpressionUUID->"cbc26c3c-8816-474e-b1b7-35ffdbd0a8d8"] +Cell[18168, 542, 134, 2, 29, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], +Cell[18305, 546, 354, 5, 33, "Output",ExpressionUUID->"80fd016a-4ce7-42b8-8652-b736906c5b61"] }, Open ]], Cell[CellGroupData[{ -Cell[18458, 597, 224, 5, 35, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], -Cell[18685, 604, 346, 7, 38, "Output",ExpressionUUID->"b2f0f611-c391-469d-baa0-8506d21f99b8"] +Cell[18696, 556, 219, 4, 29, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], +Cell[18918, 562, 363, 6, 33, "Output",ExpressionUUID->"240a379a-7034-4472-9a55-9a9bc0447afc"] }, Open ]], Cell[CellGroupData[{ -Cell[19068, 616, 139, 3, 35, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], -Cell[19210, 621, 333, 6, 38, "Output",ExpressionUUID->"b88be73c-7718-4a1a-8323-650f9570c525"] +Cell[19318, 573, 134, 2, 29, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], +Cell[19455, 577, 352, 5, 33, "Output",ExpressionUUID->"deec1b37-437b-458c-84a2-7cc146a11bd4"] }, Open ]], Cell[CellGroupData[{ -Cell[19580, 632, 332, 6, 35, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], -Cell[19915, 640, 329, 6, 38, "Output",ExpressionUUID->"c7780cf2-61a4-4684-ba67-5a69c1485a49"] +Cell[19844, 587, 327, 5, 29, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], +Cell[20174, 594, 348, 5, 33, "Output",ExpressionUUID->"99e4e873-f126-4fe4-bfd3-fd1593959bfc"] }, Open ]], Cell[CellGroupData[{ -Cell[20281, 651, 301, 6, 35, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], -Cell[20585, 659, 328, 6, 38, "Output",ExpressionUUID->"070c669c-3e3b-4882-9861-b96b20aa8b9f"] +Cell[20559, 604, 296, 5, 29, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], +Cell[20858, 611, 345, 5, 33, "Output",ExpressionUUID->"d48be497-3ebe-4301-b257-21a76b3db031"] }, Open ]], Cell[CellGroupData[{ -Cell[20950, 670, 224, 5, 35, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], -Cell[21177, 677, 323, 6, 38, "Output",ExpressionUUID->"11617050-f34a-4635-8691-c3b2850c28e1"] +Cell[21240, 621, 219, 4, 29, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], +Cell[21462, 627, 342, 5, 33, "Output",ExpressionUUID->"3a900e19-9638-4515-a9c2-2bb4ac1c2276"] }, Open ]], Cell[CellGroupData[{ -Cell[21537, 688, 355, 11, 47, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], -Cell[21895, 701, 354, 6, 38, "Output",ExpressionUUID->"8dfae296-be04-4f5f-b1cf-c403038a206b"] +Cell[21841, 637, 350, 10, 42, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], +Cell[22194, 649, 371, 5, 33, "Output",ExpressionUUID->"4799c727-8fae-4168-bf22-8f28b88e2a12"] }, Open ]], Cell[CellGroupData[{ -Cell[22286, 712, 355, 11, 47, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], -Cell[22644, 725, 369, 7, 38, "Output",ExpressionUUID->"7a4a38b7-1cc7-42b0-97c3-3c6dfc7e588a"] +Cell[22602, 659, 350, 10, 42, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], +Cell[22955, 671, 386, 6, 33, "Output",ExpressionUUID->"d53a8288-863f-451c-b59d-b14f7d63bd2b"] }, Open ]], Cell[CellGroupData[{ -Cell[23050, 737, 999, 27, 49, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], -Cell[24052, 766, 344, 6, 38, "Output",ExpressionUUID->"41c885ce-3cb4-40a5-9abb-bda969d37a01"] +Cell[23378, 682, 994, 26, 43, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], +Cell[24375, 710, 361, 5, 33, "Output",ExpressionUUID->"44b6b4bd-cfbd-442b-886f-723c4bd5a3a2"] }, Open ]], Cell[CellGroupData[{ -Cell[24433, 777, 204, 4, 35, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], -Cell[24640, 783, 327, 6, 38, "Output",ExpressionUUID->"aedf5ec0-14fc-47c5-9c14-e152179e101c"] +Cell[24773, 720, 199, 3, 29, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], +Cell[24975, 725, 344, 5, 33, "Output",ExpressionUUID->"b5500a4e-ef2f-46eb-9d48-3b43a8031bf9"] }, Open ]], Cell[CellGroupData[{ -Cell[25004, 794, 330, 6, 35, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], -Cell[25337, 802, 309, 6, 38, "Output",ExpressionUUID->"dbdc050c-b0b5-4b4d-ad8e-bc38762c0e26"] +Cell[25356, 735, 325, 5, 29, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], +Cell[25684, 742, 326, 5, 33, "Output",ExpressionUUID->"70719225-e118-4778-ba9a-634f7f9d69bc"] }, Open ]], -Cell[25661, 811, 178, 3, 35, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], +Cell[26025, 750, 173, 2, 29, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ -Cell[25864, 818, 332, 6, 35, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], -Cell[26199, 826, 303, 6, 38, "Output",ExpressionUUID->"412a4f8d-5c42-4b49-b53b-3f42decb7873"] +Cell[26223, 756, 327, 5, 29, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], +Cell[26553, 763, 320, 5, 33, "Output",ExpressionUUID->"7345c58d-0c2a-4f56-be00-c771c2e6cd3b"] }, Open ]], -Cell[26517, 835, 178, 3, 35, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], +Cell[26888, 771, 173, 2, 29, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ -Cell[26720, 842, 337, 6, 35, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], -Cell[27060, 850, 308, 6, 38, "Output",ExpressionUUID->"a71e31c2-a73a-43e0-a6aa-15127985af1c"] +Cell[27086, 777, 332, 5, 29, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], +Cell[27421, 784, 325, 5, 33, "Output",ExpressionUUID->"ab7fca09-5532-4f5d-99f3-e742b369c962"] }, Open ]], -Cell[27383, 859, 178, 3, 35, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], +Cell[27761, 792, 173, 2, 29, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ -Cell[27586, 866, 356, 6, 35, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], -Cell[27945, 874, 311, 6, 38, "Output",ExpressionUUID->"52315ab7-ef5e-4806-bc73-b205a9aaa5e9"] +Cell[27959, 798, 351, 5, 29, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], +Cell[28313, 805, 328, 5, 33, "Output",ExpressionUUID->"57b742e1-f6e0-4ad0-8d69-4557e672a54b"] }, Open ]], -Cell[28271, 883, 176, 3, 35, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], +Cell[28656, 813, 171, 2, 29, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ -Cell[28472, 890, 303, 6, 35, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], -Cell[28778, 898, 307, 6, 38, "Output",ExpressionUUID->"b7ffd05f-24b1-463c-9fae-a4620acad3a3"] +Cell[28852, 819, 298, 5, 29, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], +Cell[29153, 826, 324, 5, 33, "Output",ExpressionUUID->"b3a3a7d5-dd76-4266-a01e-ce7cd97e3691"] }, Open ]], -Cell[29100, 907, 176, 3, 35, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], +Cell[29492, 834, 171, 2, 29, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ -Cell[29301, 914, 308, 6, 35, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], -Cell[29612, 922, 310, 6, 38, "Output",ExpressionUUID->"044250f2-e522-4746-9450-57317849f670"] +Cell[29688, 840, 303, 5, 29, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], +Cell[29994, 847, 329, 5, 33, "Output",ExpressionUUID->"cc58d45f-7f1d-4fef-8900-a14b6262900a"] }, Open ]], -Cell[29937, 931, 178, 3, 35, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], +Cell[30338, 855, 173, 2, 29, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ -Cell[30140, 938, 311, 6, 35, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], -Cell[30454, 946, 309, 6, 38, "Output",ExpressionUUID->"7e4c1acd-7180-44d7-8ffc-9595f947d88c"] +Cell[30536, 861, 306, 5, 29, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], +Cell[30845, 868, 326, 5, 33, "Output",ExpressionUUID->"90eb3c8d-6f14-4092-847d-481c30ae4397"] }, Open ]], -Cell[30778, 955, 177, 3, 35, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], +Cell[31186, 876, 172, 2, 29, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ -Cell[30980, 962, 280, 5, 35, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], -Cell[31263, 969, 308, 6, 38, "Output",ExpressionUUID->"d4efa098-5f8b-494b-a482-ab1306404601"] +Cell[31383, 882, 275, 4, 29, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], +Cell[31661, 888, 325, 5, 33, "Output",ExpressionUUID->"955ebaa5-0026-4454-af3b-0211bdbf9b34"] }, Open ]], -Cell[31586, 978, 180, 3, 35, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], +Cell[32001, 896, 175, 2, 29, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ -Cell[31791, 985, 19814, 486, 692, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], -Cell[51608, 1473, 342, 6, 38, "Output",ExpressionUUID->"0ae81f7f-e531-4e1e-95d3-5e16405855ad"] +Cell[32201, 902, 19809, 485, 1100, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], +Cell[52013, 1389, 361, 5, 33, "Output",ExpressionUUID->"33efb784-8f18-4184-b7c4-67d56a15845d"] }, Open ]], Cell[CellGroupData[{ -Cell[51987, 1484, 19753, 490, 702, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], -Cell[71743, 1976, 344, 6, 38, "Output",ExpressionUUID->"6ceecb45-d6a2-4455-99bc-b69a6c442a1d"] +Cell[52411, 1399, 19748, 489, 1100, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], +Cell[72162, 1890, 360, 5, 33, "Output",ExpressionUUID->"ba42b029-fd27-49f5-87bc-b0f4d7863b97"] }, Open ]], Cell[CellGroupData[{ -Cell[72124, 1987, 19753, 484, 701, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], -Cell[91880, 2473, 359, 7, 38, "Output",ExpressionUUID->"724c974f-36b1-4942-8f28-e886eb8a3106"] +Cell[72559, 1900, 19748, 483, 1099, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], +Cell[92310, 2385, 376, 6, 33, "Output",ExpressionUUID->"86d256f3-12f6-42a2-bc3f-b0766195dbe0"] }, Open ]], Cell[CellGroupData[{ -Cell[92276, 2485, 22539, 554, 772, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], -Cell[114818, 3041, 362, 7, 38, "Output",ExpressionUUID->"8769c55c-10a2-41e2-9fc9-87d9c2937f48"] +Cell[92723, 2396, 22534, 553, 1235, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], +Cell[115260, 2951, 379, 6, 33, "Output",ExpressionUUID->"69fd7a98-96c9-4873-abd5-3799fb000fe4"] }, Open ]], Cell[CellGroupData[{ -Cell[115217, 3053, 22540, 554, 772, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], -Cell[137760, 3609, 363, 7, 38, "Output",ExpressionUUID->"a9d0ebb6-305a-455b-920d-70fa1189686d"] +Cell[115676, 2962, 22535, 553, 1235, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], +Cell[138214, 3517, 380, 6, 33, "Output",ExpressionUUID->"8357bb67-e873-48bf-b135-dfbbb7be7f29"] }, Open ]], Cell[CellGroupData[{ -Cell[138160, 3621, 25496, 627, 844, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], -Cell[163659, 4250, 363, 7, 38, "Output",ExpressionUUID->"425077e5-7e2d-47f5-8a22-4fd00ff1193b"] +Cell[138631, 3528, 25491, 626, 1350, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], +Cell[164125, 4156, 379, 6, 33, "Output",ExpressionUUID->"d3313996-4830-48f8-8343-457df65d2dfc"] }, Open ]], Cell[CellGroupData[{ -Cell[164059, 4262, 135, 3, 35, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], -Cell[164197, 4267, 327, 6, 38, "Output",ExpressionUUID->"3783203f-cc38-46f5-92d1-2d2fcb56819a"] +Cell[164541, 4167, 130, 2, 29, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], +Cell[164674, 4171, 344, 5, 33, "Output",ExpressionUUID->"0ee880b2-641f-4c79-ae9a-61b65c8a16a0"] }, Open ]], Cell[CellGroupData[{ -Cell[164561, 4278, 135, 3, 35, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], -Cell[164699, 4283, 330, 6, 38, "Output",ExpressionUUID->"ee38e47c-29ce-4ddf-96a5-e3837258b633"] +Cell[165055, 4181, 130, 2, 29, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], +Cell[165188, 4185, 349, 5, 33, "Output",ExpressionUUID->"065fd7ba-5692-45fb-909d-1d14884a135e"] }, Open ]], Cell[CellGroupData[{ -Cell[165066, 4294, 1149, 40, 59, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], -Cell[166218, 4336, 343, 6, 38, "Output",ExpressionUUID->"99655031-f870-4102-8082-e088446433f4"] +Cell[165574, 4195, 1144, 39, 55, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], +Cell[166721, 4236, 362, 5, 33, "Output",ExpressionUUID->"ec7d34c2-929e-4690-85cd-2b60d03961a9"] }, Open ]], Cell[CellGroupData[{ -Cell[166598, 4347, 1046, 36, 59, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], -Cell[167647, 4385, 360, 7, 38, "Output",ExpressionUUID->"c2bb82db-5f98-4e8c-b4b6-71e5e906a841"] +Cell[167120, 4246, 1041, 35, 55, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], +Cell[168164, 4283, 376, 6, 33, "Output",ExpressionUUID->"a413a0ad-ffae-4425-83c8-862a05f77443"] }, Open ]], Cell[CellGroupData[{ -Cell[168044, 4397, 1149, 40, 59, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], -Cell[169196, 4439, 344, 6, 38, "Output",ExpressionUUID->"99da5799-3e8b-4453-9e1a-c230b78a04b0"] +Cell[168577, 4294, 1144, 39, 55, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], +Cell[169724, 4335, 363, 5, 33, "Output",ExpressionUUID->"bfa78bc3-ea4d-4128-9335-e97b6fa70b71"] }, Open ]], Cell[CellGroupData[{ -Cell[169577, 4450, 113, 2, 35, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], -Cell[169693, 4454, 349, 6, 38, "Output",ExpressionUUID->"679837b1-4f59-4d0f-a471-ef61faa6a605"] +Cell[170124, 4345, 108, 1, 29, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], +Cell[170235, 4348, 366, 5, 33, "Output",ExpressionUUID->"41553c76-06d5-4364-b9c8-aafd48f63229"] }, Open ]], Cell[CellGroupData[{ -Cell[170079, 4465, 113, 2, 35, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], -Cell[170195, 4469, 364, 7, 38, "Output",ExpressionUUID->"ddae6cf7-f44e-419a-8123-b4d2a554e6a6"] +Cell[170638, 4358, 108, 1, 29, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], +Cell[170749, 4361, 381, 6, 33, "Output",ExpressionUUID->"ec2c2bb1-7dc6-459a-8cb0-e1fb43bc4e79"] }, Open ]], Cell[CellGroupData[{ -Cell[170596, 4481, 113, 2, 35, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], -Cell[170712, 4485, 363, 7, 38, "Output",ExpressionUUID->"91cdb290-7457-4966-8978-72dfc2d417db"] +Cell[171167, 4372, 108, 1, 29, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], +Cell[171278, 4375, 382, 6, 33, "Output",ExpressionUUID->"ade94e5b-c48e-4ec9-843f-f4967eee8f4a"] }, Open ]], Cell[CellGroupData[{ -Cell[171112, 4497, 113, 2, 35, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], -Cell[171228, 4501, 340, 6, 38, "Output",ExpressionUUID->"7f2d0a7b-0a0f-47b0-a769-96b161fac9bc"] +Cell[171697, 4386, 108, 1, 29, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], +Cell[171808, 4389, 359, 5, 33, "Output",ExpressionUUID->"079226ab-70fc-4eb7-aa19-6eaa133ea487"] }, Open ]], Cell[CellGroupData[{ -Cell[171605, 4512, 112, 2, 35, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], -Cell[171720, 4516, 345, 6, 38, "Output",ExpressionUUID->"56ea5377-3e71-404c-9064-8f7670eee126"] +Cell[172204, 4399, 107, 1, 29, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], +Cell[172314, 4402, 362, 5, 33, "Output",ExpressionUUID->"3f66fd96-9980-4875-8149-7dbe0a36b079"] }, Open ]], Cell[CellGroupData[{ -Cell[172102, 4527, 112, 2, 35, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], -Cell[172217, 4531, 348, 6, 38, "Output",ExpressionUUID->"713f3c61-01cb-4454-867c-8c79c8f43cd9"] +Cell[172713, 4412, 107, 1, 29, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], +Cell[172823, 4415, 365, 5, 33, "Output",ExpressionUUID->"ee240bd8-c764-45e0-a476-3b6e7ce6ac6d"] }, Open ]], Cell[CellGroupData[{ -Cell[172602, 4542, 502, 17, 58, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], -Cell[173107, 4561, 364, 7, 38, "Output",ExpressionUUID->"fc8af811-1811-4792-9ec3-b2889660aaec"] +Cell[173225, 4425, 497, 16, 55, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], +Cell[173725, 4443, 381, 6, 33, "Output",ExpressionUUID->"8f70dd61-68f4-4c28-9387-a7b9ea4bf09c"] }, Open ]], Cell[CellGroupData[{ -Cell[173508, 4573, 502, 17, 58, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], -Cell[174013, 4592, 354, 7, 38, "Output",ExpressionUUID->"f24e52e8-8458-4c97-864c-b934ca47be42"] +Cell[174143, 4454, 497, 16, 55, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], +Cell[174643, 4472, 371, 6, 33, "Output",ExpressionUUID->"ce46689a-2878-40ba-9d85-daed1d37baa8"] }, Open ]], Cell[CellGroupData[{ -Cell[174404, 4604, 1793, 61, 59, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], -Cell[176200, 4667, 343, 6, 38, "Output",ExpressionUUID->"90c82ffb-533b-4bca-b1a5-338c55624b33"] +Cell[175051, 4483, 1788, 60, 55, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], +Cell[176842, 4545, 360, 5, 33, "Output",ExpressionUUID->"edba2fb1-cd04-4294-b09d-b74fa5b0cf5d"] }, Open ]], Cell[CellGroupData[{ -Cell[176580, 4678, 1106, 37, 59, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], -Cell[177689, 4717, 363, 7, 38, "Output",ExpressionUUID->"671fe22c-9407-4cb5-a85c-baea5b79fdac"] +Cell[177239, 4555, 1101, 36, 55, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], +Cell[178343, 4593, 382, 6, 33, "Output",ExpressionUUID->"004d7684-9abb-4fae-9eba-6182066c3631"] }, Open ]], Cell[CellGroupData[{ -Cell[178089, 4729, 1823, 62, 106, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], -Cell[179915, 4793, 348, 6, 38, "Output",ExpressionUUID->"b3a2be84-d032-43ee-8314-dd38527861a3"] +Cell[178762, 4604, 1818, 61, 107, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], +Cell[180583, 4667, 365, 5, 33, "Output",ExpressionUUID->"9bc27673-8da9-431a-9437-217e7be10549"] }, Open ]], Cell[CellGroupData[{ -Cell[180300, 4804, 1636, 54, 79, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], -Cell[181939, 4860, 350, 6, 38, "Output",ExpressionUUID->"be46e6d8-93fe-44b6-aa4c-bb5d87cdf615"] +Cell[180985, 4677, 1631, 53, 79, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], +Cell[182619, 4732, 367, 5, 33, "Output",ExpressionUUID->"a8c5b3b4-a0c9-4851-9725-4103914b8ccb"] }, Open ]], Cell[CellGroupData[{ -Cell[182326, 4871, 1636, 54, 79, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], -Cell[183965, 4927, 347, 6, 38, "Output",ExpressionUUID->"fdb4c573-41b9-4bd4-bc84-0ca4ca0b2f5f"] +Cell[183023, 4742, 1631, 53, 79, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], +Cell[184657, 4797, 364, 5, 33, "Output",ExpressionUUID->"9858da13-5b42-4250-9f76-f05155c2f62d"] }, Open ]], Cell[CellGroupData[{ -Cell[184349, 4938, 233, 5, 35, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], -Cell[184585, 4945, 308, 6, 38, "Output",ExpressionUUID->"cc81225b-5c97-40d2-95eb-15f6147c0676"] +Cell[185058, 4807, 228, 4, 29, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], +Cell[185289, 4813, 325, 5, 33, "Output",ExpressionUUID->"8650c68f-94ac-46db-9a82-a38789c5b6da"] }, Open ]], -Cell[184908, 4954, 177, 3, 35, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], +Cell[185629, 4821, 172, 2, 29, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ -Cell[185110, 4961, 230, 5, 35, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], -Cell[185343, 4968, 311, 6, 38, "Output",ExpressionUUID->"7654c79e-e9ea-48d1-96b7-586a69afe53f"] +Cell[185826, 4827, 225, 4, 29, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], +Cell[186054, 4833, 328, 5, 33, "Output",ExpressionUUID->"f24ed4fb-91cf-441d-b1da-690da94c2f17"] }, Open ]], -Cell[185669, 4977, 178, 3, 35, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], +Cell[186397, 4841, 173, 2, 29, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ -Cell[185872, 4984, 1302, 43, 52, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], -Cell[187177, 5029, 351, 6, 38, "Output",ExpressionUUID->"4077ad00-bbb5-4781-a3e6-9ef35b09e030"] +Cell[186595, 4847, 1297, 42, 47, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], +Cell[187895, 4891, 370, 5, 33, "Output",ExpressionUUID->"78f59270-15ee-4ee1-9428-30d59ecb9005"] }, Open ]], Cell[CellGroupData[{ -Cell[187565, 5040, 932, 31, 59, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], -Cell[188500, 5073, 349, 6, 38, "Output",ExpressionUUID->"0e8d7c4a-3961-46cf-ac01-ffb12ff958fe"] +Cell[188302, 4901, 927, 30, 55, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], +Cell[189232, 4933, 366, 5, 33, "Output",ExpressionUUID->"252f35f8-d28a-4383-9907-93d0c4ae9ce2"] }, Open ]], Cell[CellGroupData[{ -Cell[188886, 5084, 908, 30, 59, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], -Cell[189797, 5116, 351, 6, 38, "Output",ExpressionUUID->"087fb94b-78e5-4c0c-a672-f4b3bc5cce04"] +Cell[189635, 4943, 903, 29, 55, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], +Cell[190541, 4974, 368, 5, 33, "Output",ExpressionUUID->"3ba3caa3-fbb4-411b-8ac9-6069c57e3be2"] }, Open ]], Cell[CellGroupData[{ -Cell[190185, 5127, 559, 19, 55, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], -Cell[190747, 5148, 733, 11, 38, "Output",ExpressionUUID->"6c2e3fc1-fe80-4375-9d2a-8f8da4fab3b9"] +Cell[190946, 4984, 554, 18, 51, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], +Cell[191503, 5004, 754, 11, 33, "Output",ExpressionUUID->"119cdba7-a437-4429-9dde-4ab0a68ae06b"] }, Open ]], Cell[CellGroupData[{ -Cell[191517, 5164, 666, 22, 55, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], -Cell[192186, 5188, 721, 11, 38, "Output",ExpressionUUID->"be3d4815-96f5-4138-93a0-4167beb06806"] +Cell[192294, 5020, 661, 21, 51, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], +Cell[192958, 5043, 740, 10, 33, "Output",ExpressionUUID->"aeeaa7bb-50be-46e2-ad1f-02f7436bf274"] }, Open ]], Cell[CellGroupData[{ -Cell[192944, 5204, 171, 5, 58, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], -Cell[193118, 5211, 748, 11, 38, "Output",ExpressionUUID->"a189d037-fc62-4a68-9f43-b53c0a14a441"] +Cell[193735, 5058, 166, 4, 55, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], +Cell[193904, 5064, 769, 11, 33, "Output",ExpressionUUID->"2f7c4ffc-f986-48c3-9eb3-376e3c1c3b62"] }, Open ]], Cell[CellGroupData[{ -Cell[193903, 5227, 237, 6, 57, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], -Cell[194143, 5235, 692, 11, 38, "Output",ExpressionUUID->"2897cea5-cfbc-44f3-a2d3-2a13d8237ca5"] +Cell[194710, 5080, 232, 5, 54, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], +Cell[194945, 5087, 708, 10, 33, "Output",ExpressionUUID->"71c26d7f-827f-4319-b295-dcde211d9920"] }, Open ]], Cell[CellGroupData[{ -Cell[194872, 5251, 224, 6, 48, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], -Cell[195099, 5259, 716, 11, 38, "Output",ExpressionUUID->"b5293f66-9932-4ed3-9d61-33f7ac543d54"] +Cell[195690, 5102, 219, 5, 43, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], +Cell[195912, 5109, 733, 10, 33, "Output",ExpressionUUID->"569f0f3c-2937-4552-a0ca-2f4ab33d0585"] }, Open ]], Cell[CellGroupData[{ -Cell[195852, 5275, 182, 5, 48, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], -Cell[196037, 5282, 737, 11, 38, "Output",ExpressionUUID->"d31a19b6-c78f-4c79-a99e-ad4ba63329d7"] +Cell[196682, 5124, 177, 4, 43, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], +Cell[196862, 5130, 760, 11, 33, "Output",ExpressionUUID->"b6388da9-1abe-4135-a809-0c0d61167d45"] }, Open ]], Cell[CellGroupData[{ -Cell[196811, 5298, 6056, 185, 173, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], -Cell[202870, 5485, 715, 11, 38, "Output",ExpressionUUID->"f100697f-6565-4935-a674-b651ea94898d"] +Cell[197659, 5146, 6051, 184, 183, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], +Cell[203713, 5332, 732, 10, 33, "Output",ExpressionUUID->"fddca4e6-09e7-4a1a-bb5d-adc544b6d4e5"] }, Open ]], Cell[CellGroupData[{ -Cell[203622, 5501, 411, 10, 58, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], -Cell[204036, 5513, 735, 12, 51, "Output",ExpressionUUID->"d838a8cf-95c2-4e40-92cd-64aaba51b8bc"] +Cell[204482, 5347, 406, 9, 57, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], +Cell[204891, 5358, 751, 11, 49, "Output",ExpressionUUID->"557210f0-d884-4d4b-91e6-97c12e57ffa7"] }, Open ]], -Cell[204786, 5528, 493, 10, 35, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], +Cell[205657, 5372, 488, 9, 29, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ -Cell[205304, 5542, 559, 19, 55, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], -Cell[205866, 5563, 246, 5, 38, "Output",ExpressionUUID->"9662c1bb-5403-40f9-a60f-60623ece1839"] +Cell[206170, 5385, 554, 18, 51, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], +Cell[206727, 5405, 263, 4, 33, "Output",ExpressionUUID->"37cf4d2b-369c-4cad-9fc5-95ee62bfceb2"] }, Open ]], Cell[CellGroupData[{ -Cell[206149, 5573, 624, 21, 55, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], -Cell[206776, 5596, 250, 5, 38, "Output",ExpressionUUID->"4452cb12-7a45-4217-9199-749141fbcbf0"] +Cell[207027, 5414, 619, 20, 51, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], +Cell[207649, 5436, 267, 4, 33, "Output",ExpressionUUID->"ea015850-51a8-4833-99a5-4dce36b042ac"] }, Open ]], Cell[CellGroupData[{ -Cell[207063, 5606, 171, 5, 58, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], -Cell[207237, 5613, 249, 5, 38, "Output",ExpressionUUID->"127df473-201b-49c4-82d2-177abca1830f"] +Cell[207953, 5445, 166, 4, 55, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], +Cell[208122, 5451, 266, 4, 33, "Output",ExpressionUUID->"100936fb-1ecb-4f41-8eaa-1bc5d232bd67"] }, Open ]], Cell[CellGroupData[{ -Cell[207523, 5623, 171, 5, 57, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], -Cell[207697, 5630, 247, 5, 38, "Output",ExpressionUUID->"c8f38219-85d5-4703-9051-9b3981a87d76"] +Cell[208425, 5460, 166, 4, 54, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], +Cell[208594, 5466, 266, 4, 33, "Output",ExpressionUUID->"c2e80f4c-fe76-4216-9312-901cb4e258bb"] }, Open ]], Cell[CellGroupData[{ -Cell[207981, 5640, 182, 5, 48, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], -Cell[208166, 5647, 247, 5, 38, "Output",ExpressionUUID->"1b41e950-dc06-4d17-b2ff-4978d09f679e"] +Cell[208897, 5475, 177, 4, 43, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], +Cell[209077, 5481, 264, 4, 33, "Output",ExpressionUUID->"44689241-aa53-44ef-9972-62e49e2817c1"] }, Open ]], Cell[CellGroupData[{ -Cell[208450, 5657, 182, 5, 48, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], -Cell[208635, 5664, 251, 5, 38, "Output",ExpressionUUID->"e88c3f02-0a75-4095-a4a3-dd4588430d5a"] +Cell[209378, 5490, 177, 4, 43, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], +Cell[209558, 5496, 268, 4, 33, "Output",ExpressionUUID->"704dcc6d-b826-473e-9590-5c2c64b8cd25"] }, Open ]], Cell[CellGroupData[{ -Cell[208923, 5674, 6056, 185, 173, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], -Cell[214982, 5861, 249, 5, 38, "Output",ExpressionUUID->"e07ed287-894a-43bf-bfc4-cdaa0b97d0e1"] +Cell[209863, 5505, 6051, 184, 183, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], +Cell[215917, 5691, 266, 4, 33, "Output",ExpressionUUID->"beb6bf79-9bde-4e34-8fd2-0d75ba3442a7"] }, Open ]], Cell[CellGroupData[{ -Cell[215268, 5871, 369, 9, 45, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], -Cell[215640, 5882, 248, 5, 38, "Output",ExpressionUUID->"87b8ff10-c1c5-411c-b2fb-86117d4ae825"] +Cell[216220, 5700, 364, 8, 41, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], +Cell[216587, 5710, 265, 4, 33, "Output",ExpressionUUID->"d443b491-c103-4d3e-998d-ed5a73e28c7c"] }, Open ]], Cell[CellGroupData[{ -Cell[215925, 5892, 6123, 187, 173, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], -Cell[222051, 6081, 249, 5, 38, "Output",ExpressionUUID->"9c6dde6d-43c6-48ee-a1de-6612102e7406"] +Cell[216889, 5719, 6118, 186, 183, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], +Cell[223010, 5907, 266, 4, 33, "Output",ExpressionUUID->"0798f1c3-5d55-4100-b5e1-13461a1459ed"] }, Open ]], Cell[CellGroupData[{ -Cell[222337, 6091, 369, 9, 45, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], -Cell[222709, 6102, 251, 5, 38, "Output",ExpressionUUID->"3d4fcca7-d927-4395-9a9e-a979ae6b6ade"] +Cell[223313, 5916, 364, 8, 41, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], +Cell[223680, 5926, 270, 4, 33, "Output",ExpressionUUID->"706f4f3b-3cd3-4034-b79e-4ff9c8eb6d84"] }, Open ]], Cell[CellGroupData[{ -Cell[222997, 6112, 2664, 88, 106, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], -Cell[225664, 6202, 251, 5, 38, "Output",ExpressionUUID->"0556896e-7982-4e1d-bdf8-0fa6c6753c3b"] +Cell[223987, 5935, 2659, 87, 107, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], +Cell[226649, 6024, 268, 4, 33, "Output",ExpressionUUID->"3cf0d29b-2f44-4974-b674-a6f23415c970"] }, Open ]], Cell[CellGroupData[{ -Cell[225952, 6212, 2604, 85, 106, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], -Cell[228559, 6299, 251, 5, 38, "Output",ExpressionUUID->"3715462a-60b9-41bc-9013-4cb76db3fd46"] +Cell[226954, 6033, 2599, 84, 107, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], +Cell[229556, 6119, 268, 4, 33, "Output",ExpressionUUID->"7af39f4a-b588-4290-b7cf-3f16ea3c49a0"] }, Open ]], Cell[CellGroupData[{ -Cell[228847, 6309, 3713, 118, 153, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], -Cell[232563, 6429, 250, 5, 38, "Output",ExpressionUUID->"ea398a53-be70-4bc1-bb5c-ba8e109e6563"] +Cell[229861, 6128, 3708, 117, 160, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], +Cell[233572, 6247, 267, 4, 33, "Output",ExpressionUUID->"21be9ec1-0d06-4802-9d2b-66c5dbdc9cbc"] }, Open ]], -Cell[232828, 6437, 165, 4, 23, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], +Cell[233854, 6254, 164, 4, 29, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ -Cell[233018, 6445, 2076, 59, 95, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], -Cell[235097, 6506, 755, 16, 49, "Message",ExpressionUUID->"6607dc32-4bdb-402d-b70d-9e56f2b8be24"], -Cell[235855, 6524, 761, 16, 49, "Message",ExpressionUUID->"6191c569-6b31-4889-9cf0-7ef4490f2f99"], -Cell[236619, 6542, 762, 16, 49, "Message",ExpressionUUID->"3d23da80-972a-462c-983b-d182d5badcba"], -Cell[237384, 6560, 547, 13, 20, "Message",ExpressionUUID->"acaaa690-7b94-4890-ada0-97312a22c1d5"], -Cell[237934, 6575, 250, 5, 26, "Output",ExpressionUUID->"2fcc4b64-3133-4700-84dc-8ea3da919764"] +Cell[234043, 6262, 2075, 59, 99, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], +Cell[236121, 6323, 777, 16, 58, "Message",ExpressionUUID->"88784736-a3bc-46c8-a52f-507406690f82"], +Cell[236901, 6341, 781, 16, 58, "Message",ExpressionUUID->"faadbdec-843f-4ced-b49f-a551e72c0cd9"], +Cell[237685, 6359, 784, 16, 58, "Message",ExpressionUUID->"aea0ec07-5db6-4c6d-b53f-15a58a39a0c5"], +Cell[238472, 6377, 571, 13, 22, "Message",ExpressionUUID->"46662c84-69f7-4c59-88ec-52f2e24fca8f"], +Cell[239046, 6392, 271, 5, 33, "Output",ExpressionUUID->"a7095c40-5ab0-45da-a735-88ad253bf8b2"] }, Open ]], Cell[CellGroupData[{ -Cell[238221, 6585, 2078, 59, 95, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], -Cell[240302, 6646, 776, 16, 49, "Message",ExpressionUUID->"39852308-2d7d-4bab-a940-f5d02d6fe2c0"], -Cell[241081, 6664, 783, 16, 49, "Message",ExpressionUUID->"9c4148a3-59c0-4eb6-b59e-c4d0f1cd9a42"], -Cell[241867, 6682, 784, 16, 49, "Message",ExpressionUUID->"4b5ea5e1-3200-4193-a4df-1bea83817f88"], -Cell[242654, 6700, 569, 13, 20, "Message",ExpressionUUID->"c7d520ed-614d-4c54-86fc-74430c7e4964"], -Cell[243226, 6715, 273, 5, 26, "Output",ExpressionUUID->"95bc0050-6b46-4b7e-abe8-b4152b8cfe28"] +Cell[239354, 6402, 2077, 59, 99, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], +Cell[241434, 6463, 800, 16, 58, "Message",ExpressionUUID->"8d12f0c7-be4a-45f2-bb29-7402522125eb"], +Cell[242237, 6481, 802, 16, 58, "Message",ExpressionUUID->"4334a0dc-6534-4f7a-9c74-a5b458ebd8c8"], +Cell[243042, 6499, 805, 16, 58, "Message",ExpressionUUID->"34b7a8cc-c0d5-4575-a4aa-894c1102a211"], +Cell[243850, 6517, 590, 13, 22, "Message",ExpressionUUID->"d5eaace5-ce3c-4c14-a423-474e1dd50d41"], +Cell[244443, 6532, 294, 5, 33, "Output",ExpressionUUID->"2c961a67-625b-48b5-828a-122f5261c92f"] }, Open ]], Cell[CellGroupData[{ -Cell[243536, 6725, 1962, 53, 72, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[245501, 6780, 212, 4, 38, "Output",ExpressionUUID->"51a562ee-ee3f-4e15-b6de-62e66a4c064d"] +Cell[244774, 6542, 1961, 53, 70, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], +Cell[246738, 6597, 21690, 404, 242, "Output",ExpressionUUID->"b1cc2f9c-2b08-4bb1-9683-67895b0bd702"] }, Open ]], Cell[CellGroupData[{ -Cell[245750, 6789, 2094, 60, 112, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], -Cell[247847, 6851, 497, 11, 49, "Message",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], -Cell[248347, 6864, 501, 11, 49, "Message",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], -Cell[248851, 6877, 503, 11, 49, "Message",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], -Cell[249357, 6890, 455, 10, 20, "Message",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], -Cell[249815, 6902, 43631, 762, 186, "Output",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] +Cell[268465, 7006, 2117, 60, 99, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], +Cell[270585, 7068, 555, 12, 40, "Message",ExpressionUUID->"da7fbc17-d48d-430f-a255-0244a4cd711e"], +Cell[271143, 7082, 560, 12, 40, "Message",ExpressionUUID->"b74115b7-d6d9-42f9-adfd-5bbc83511bdf"], +Cell[271706, 7096, 561, 12, 40, "Message",ExpressionUUID->"b3e03892-05d2-4c9e-ae32-9bcf676add6f"], +Cell[272270, 7110, 493, 11, 22, "Message",ExpressionUUID->"e1f9ded6-422b-424f-8991-aefa0e2beecb"], +Cell[272766, 7123, 31952, 573, 232, "Output",ExpressionUUID->"926717c8-e3b1-4c1d-bc40-33960a4f7228"] }, Open ]], -Cell[293461, 7667, 232, 6, 23, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], -Cell[293696, 7675, 209, 5, 23, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], Cell[CellGroupData[{ -Cell[293930, 7684, 212, 6, 40, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[294145, 7692, 168, 2, 26, "Output",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[304755, 7701, 2544, 71, 105, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], +Cell[307302, 7774, 9510, 223, 239, "Output",ExpressionUUID->"a7c5df9c-928f-4632-96ff-10e3dfc9ccd6"] }, Open ]], Cell[CellGroupData[{ -Cell[294350, 7699, 1814, 53, 83, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], -Cell[296167, 7754, 505, 11, 49, "Message",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], -Cell[296675, 7767, 509, 11, 49, "Message",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], -Cell[297187, 7780, 508, 11, 49, "Message",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], -Cell[297698, 7793, 455, 10, 20, "Message",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], -Cell[298156, 7805, 22399, 414, 188, "Output",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] +Cell[316849, 8002, 232, 5, 29, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], +Cell[317084, 8009, 38324, 705, 232, "Output",ExpressionUUID->"c7d2f1f7-ff29-4f65-9756-0f5227ec77f4"] }, Open ]], Cell[CellGroupData[{ -Cell[320592, 8224, 1612, 47, 70, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], -Cell[322207, 8273, 581, 12, 70, "Message",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], -Cell[322791, 8287, 584, 12, 70, "Message",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], -Cell[323378, 8301, 590, 12, 70, "Message",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], -Cell[323971, 8315, 455, 10, 70, "Message",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], -Cell[324429, 8327, 169, 2, 70, "Output",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[355445, 8719, 237, 7, 47, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], +Cell[355685, 8728, 195, 3, 33, "Output",ExpressionUUID->"90c60fda-df5a-4a50-8df5-bddeeb7cc8e0"] }, Open ]], Cell[CellGroupData[{ -Cell[324635, 8334, 2249, 64, 70, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], -Cell[326887, 8400, 557, 12, 70, "Message",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], -Cell[327447, 8414, 560, 12, 70, "Message",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], -Cell[328010, 8428, 560, 12, 70, "Message",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], -Cell[328573, 8442, 455, 10, 70, "Message",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], -Cell[329031, 8454, 169, 2, 70, "Output",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[355917, 8736, 1837, 53, 99, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], +Cell[357757, 8791, 573, 12, 40, "Message",ExpressionUUID->"146296e2-d4a7-486d-a1a6-4dfc13b2cf0c"], +Cell[358333, 8805, 580, 13, 40, "Message",ExpressionUUID->"53e31645-b137-4685-a8c2-c086f6281892"], +Cell[358916, 8820, 583, 13, 40, "Message",ExpressionUUID->"7788dfd3-a2fc-4208-a090-7810a59221b9"], +Cell[359502, 8835, 497, 11, 22, "Message",ExpressionUUID->"4265a0c9-b3d5-408e-9f13-5ededf112d63"], +Cell[360002, 8848, 49124, 852, 232, "Output",ExpressionUUID->"7e1a7416-99e2-4ea1-8c47-2f19461986b7"] }, Open ]], Cell[CellGroupData[{ -Cell[329237, 8461, 2221, 64, 70, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], -Cell[331461, 8527, 554, 12, 70, "Message",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], -Cell[332018, 8541, 560, 12, 70, "Message",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], -Cell[332581, 8555, 560, 12, 70, "Message",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], -Cell[333144, 8569, 455, 10, 70, "Message",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], -Cell[333602, 8581, 169, 2, 70, "Output",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[409163, 9705, 1616, 48, 71, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], +Cell[410782, 9755, 810, 17, 38, "Message",ExpressionUUID->"567fe6e4-3f49-4ad8-a26b-5cc41b6c9453"], +Cell[411595, 9774, 811, 17, 38, "Message",ExpressionUUID->"ee06f90f-7cf5-4575-80fb-b928efdfb47d"], +Cell[412409, 9793, 811, 17, 38, "Message",ExpressionUUID->"0ae7eb7e-66b9-45fc-a5ed-4694b01dcc29"], +Cell[413223, 9812, 493, 11, 22, "Message",ExpressionUUID->"d1f8680a-b003-480e-aa60-5144683ff8be"], +Cell[413719, 9825, 196, 3, 33, "Output",ExpressionUUID->"cf633a8a-6a2f-4b5c-bbfc-13be4a598ced"] }, Open ]], Cell[CellGroupData[{ -Cell[333808, 8588, 2223, 64, 70, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], -Cell[336034, 8654, 555, 12, 70, "Message",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], -Cell[336592, 8668, 558, 12, 70, "Message",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], -Cell[337153, 8682, 560, 12, 70, "Message",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], -Cell[337716, 8696, 453, 10, 70, "Message",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], -Cell[338172, 8708, 167, 2, 70, "Output",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[413952, 9833, 2272, 64, 64, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], +Cell[416227, 9899, 703, 14, 58, "Message",ExpressionUUID->"72c20fe6-4d05-4006-9c48-10221f047dc3"], +Cell[416933, 9915, 707, 14, 58, "Message",ExpressionUUID->"264737d8-10dd-46ae-9706-138ef4bda975"], +Cell[417643, 9931, 709, 14, 58, "Message",ExpressionUUID->"3471a687-a280-4a90-8ccb-715c8805bd5a"], +Cell[418355, 9947, 495, 11, 22, "Message",ExpressionUUID->"ecd9db9c-b18c-4b09-abe9-4871d8912664"], +Cell[418853, 9960, 195, 3, 33, "Output",ExpressionUUID->"5bfceb02-c0a0-4537-8fcc-6a4bb569a44c"] }, Open ]], Cell[CellGroupData[{ -Cell[338376, 8715, 213, 6, 70, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[338592, 8723, 169, 2, 70, "Output",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[419085, 9968, 2233, 63, 64, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], +Cell[421321, 10033, 699, 14, 58, "Message",ExpressionUUID->"0c0972ca-e1ff-4cf3-85ac-39f52c113822"], +Cell[422023, 10049, 703, 14, 58, "Message",ExpressionUUID->"a9e7ce67-9d7c-4986-8049-6f1e1b96fde4"], +Cell[422729, 10065, 707, 14, 58, "Message",ExpressionUUID->"19cc9b0f-0152-4cc8-9f0c-cf42b30738e8"], +Cell[423439, 10081, 494, 11, 22, "Message",ExpressionUUID->"0dacad05-354a-437c-91d5-f292e77888e4"], +Cell[423936, 10094, 195, 3, 33, "Output",ExpressionUUID->"e9e0ed6f-4f52-4961-8186-a6d5ab61faf7"] }, Open ]], -Cell[338776, 8728, 247, 5, 70, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[339048, 8737, 554, 18, 70, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[339605, 8757, 167, 2, 70, "Output",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[424168, 10102, 2235, 63, 64, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], +Cell[426406, 10167, 701, 14, 58, "Message",ExpressionUUID->"28820e48-4ec9-4e6b-99a9-fb1e7a7deb84"], +Cell[427110, 10183, 705, 14, 58, "Message",ExpressionUUID->"16649d84-0425-4f57-885b-71327f147f39"], +Cell[427818, 10199, 708, 14, 58, "Message",ExpressionUUID->"ac6932f8-e391-4ea4-b9f8-cbc180026203"], +Cell[428529, 10215, 492, 11, 22, "Message",ExpressionUUID->"cb41553d-1ce1-46c3-a409-55897f58e3c6"], +Cell[429024, 10228, 195, 3, 33, "Output",ExpressionUUID->"263f0c0d-f8f5-457b-b7dc-b3f86bf4ce35"] }, Open ]], Cell[CellGroupData[{ -Cell[339809, 8764, 166, 4, 70, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[339978, 8770, 169, 2, 70, "Output",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[429256, 10236, 236, 6, 46, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], +Cell[429495, 10244, 192, 3, 33, "Output",ExpressionUUID->"bc32da9c-32c5-4114-838b-43a4617c357b"] }, Open ]], +Cell[429702, 10250, 273, 6, 29, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[340184, 8777, 181, 5, 70, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[340368, 8784, 173, 3, 70, "Output",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] +Cell[430000, 10260, 558, 19, 51, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], +Cell[430561, 10281, 193, 3, 33, "Output",ExpressionUUID->"95ef3ca5-07ee-4895-aa5b-47e5f031ac47"] }, Open ]], Cell[CellGroupData[{ -Cell[340578, 8792, 6055, 185, 70, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[346636, 8979, 172, 3, 70, "Output",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] +Cell[430791, 10289, 170, 5, 55, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], +Cell[430964, 10296, 199, 3, 33, "Output",ExpressionUUID->"257166d0-45b9-4683-ab4a-913cc1afe82b"] }, Open ]], Cell[CellGroupData[{ -Cell[346845, 8987, 368, 9, 70, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[347216, 8998, 170, 3, 70, "Output",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] +Cell[431200, 10304, 181, 5, 43, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], +Cell[431384, 10311, 195, 3, 33, "Output",ExpressionUUID->"0ad12dfa-ff2a-441a-bcf8-a564e2e601aa"] }, Open ]], Cell[CellGroupData[{ -Cell[347423, 9006, 6122, 187, 70, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[353548, 9195, 175, 3, 70, "Output",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] +Cell[431616, 10319, 6055, 185, 183, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], +Cell[437674, 10506, 195, 3, 33, "Output",ExpressionUUID->"4ceb6c65-94eb-4bfb-b148-609b4ff4b12e"] }, Open ]], Cell[CellGroupData[{ -Cell[353760, 9203, 368, 9, 70, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[354131, 9214, 169, 3, 70, "Output",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] +Cell[437906, 10514, 368, 9, 41, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], +Cell[438277, 10525, 192, 3, 33, "Output",ExpressionUUID->"efdc2216-b7da-40a5-8770-5209bdf5583c"] }, Open ]], Cell[CellGroupData[{ -Cell[354337, 9222, 2663, 88, 70, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[357003, 9312, 173, 3, 70, "Output",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] +Cell[438506, 10533, 6122, 187, 183, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], +Cell[444631, 10722, 195, 3, 33, "Output",ExpressionUUID->"75c255e7-465c-4bb5-9618-2f477c8c9c14"] }, Open ]], Cell[CellGroupData[{ -Cell[357213, 9320, 2603, 85, 70, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[359819, 9407, 171, 3, 70, "Output",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] +Cell[444863, 10730, 368, 9, 41, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], +Cell[445234, 10741, 192, 3, 33, "Output",ExpressionUUID->"27f67f0a-f914-4beb-aaca-321bde168e2f"] }, Open ]], Cell[CellGroupData[{ -Cell[360027, 9415, 3712, 118, 70, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[363742, 9535, 171, 3, 70, "Output",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] +Cell[445463, 10749, 2663, 88, 107, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], +Cell[448129, 10839, 195, 3, 33, "Output",ExpressionUUID->"02367722-021c-4359-aad6-1a0885dfcfc9"] }, Open ]], Cell[CellGroupData[{ -Cell[363950, 9543, 2052, 59, 70, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], -Cell[366005, 9604, 572, 12, 70, "Message",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], -Cell[366580, 9618, 573, 12, 70, "Message",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], -Cell[367156, 9632, 578, 12, 70, "Message",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], -Cell[367737, 9646, 457, 10, 70, "Message",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], -Cell[368197, 9658, 172, 3, 70, "Output",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] +Cell[448361, 10847, 2603, 85, 107, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], +Cell[450967, 10934, 195, 3, 33, "Output",ExpressionUUID->"63f3adc4-e1a1-4bd1-a114-44c2b7fa228e"] }, Open ]], Cell[CellGroupData[{ -Cell[368406, 9666, 2054, 59, 70, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], -Cell[370463, 9727, 572, 12, 70, "Message",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], -Cell[371038, 9741, 575, 12, 70, "Message",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], -Cell[371616, 9755, 576, 12, 70, "Message",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], -Cell[372195, 9769, 457, 10, 70, "Message",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], -Cell[372655, 9781, 170, 3, 70, "Output",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] +Cell[451199, 10942, 3712, 118, 160, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], +Cell[454914, 11062, 196, 3, 33, "Output",ExpressionUUID->"e87a1759-3600-4e60-aea8-29c146b9d9c6"] }, Open ]], Cell[CellGroupData[{ -Cell[372862, 9789, 2030, 55, 70, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], -Cell[374895, 9846, 20377, 384, 70, "Output",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] +Cell[455147, 11070, 2075, 59, 99, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], +Cell[457225, 11131, 814, 17, 41, "Message",ExpressionUUID->"aec4ef3b-12ce-480c-83f7-224ef5e5b665"], +Cell[458042, 11150, 813, 17, 41, "Message",ExpressionUUID->"992013da-d820-4cd8-bcc0-00942f56d756"], +Cell[458858, 11169, 815, 17, 41, "Message",ExpressionUUID->"622c27e8-4ba4-4eb2-adef-105cff9bd573"], +Cell[459676, 11188, 497, 11, 22, "Message",ExpressionUUID->"9d418663-b9c4-4c45-8ac9-9f0d1de88160"], +Cell[460176, 11201, 196, 3, 33, "Output",ExpressionUUID->"daec6255-b3cb-4b17-aabd-66030484d8c3"] }, Open ]], Cell[CellGroupData[{ -Cell[395309, 10235, 2118, 60, 70, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], -Cell[397430, 10297, 499, 11, 70, "Message",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], -Cell[397932, 10310, 504, 11, 70, "Message",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], -Cell[398439, 10323, 507, 11, 70, "Message",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], -Cell[398949, 10336, 455, 10, 70, "Message",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], -Cell[399407, 10348, 22381, 415, 70, "Output",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] +Cell[460409, 11209, 2077, 59, 99, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], +Cell[462489, 11270, 814, 17, 41, "Message",ExpressionUUID->"fcf0bf66-56d2-4b35-b003-114a6d6d6665"], +Cell[463306, 11289, 814, 17, 41, "Message",ExpressionUUID->"7b5c6e39-7d38-4225-a287-bbd1e45e0942"], +Cell[464123, 11308, 815, 17, 41, "Message",ExpressionUUID->"aaddf203-2d23-46b3-8067-e1fe7120b9b9"], +Cell[464941, 11327, 494, 11, 22, "Message",ExpressionUUID->"caad4606-5636-4244-abc5-4693520d5588"], +Cell[465438, 11340, 192, 3, 33, "Output",ExpressionUUID->"1d0b89ba-498b-4bc2-8ab7-a05d036758c8"] }, Open ]], -Cell[421803, 10766, 174, 3, 70, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], -Cell[421980, 10771, 209, 5, 70, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], Cell[CellGroupData[{ -Cell[422214, 10780, 1616, 48, 70, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], -Cell[423833, 10830, 594, 12, 70, "Message",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], -Cell[424430, 10844, 594, 12, 70, "Message",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], -Cell[425027, 10858, 598, 12, 70, "Message",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], -Cell[425628, 10872, 457, 10, 70, "Message",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], -Cell[426088, 10884, 171, 3, 70, "Output",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] +Cell[465667, 11348, 2053, 55, 53, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], +Cell[467723, 11405, 23736, 438, 236, "Output",ExpressionUUID->"a1c43a15-954a-4cb4-8a70-4f86298a8d29"] }, Open ]], Cell[CellGroupData[{ -Cell[426296, 10892, 2247, 64, 70, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], -Cell[428546, 10958, 572, 12, 70, "Message",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], -Cell[429121, 10972, 573, 12, 70, "Message",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], -Cell[429697, 10986, 578, 12, 70, "Message",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], -Cell[430278, 11000, 455, 10, 70, "Message",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], -Cell[430736, 11012, 172, 3, 70, "Output",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] +Cell[491496, 11848, 2141, 60, 99, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], +Cell[493640, 11910, 559, 12, 40, "Message",ExpressionUUID->"20ae775f-da72-4766-8790-7fad2ec0434d"], +Cell[494202, 11924, 562, 12, 40, "Message",ExpressionUUID->"5dc8735d-cd29-4c43-aede-6cf71fdd8217"], +Cell[494767, 11938, 564, 12, 40, "Message",ExpressionUUID->"54160270-9330-481c-9d10-3c35d0d3251b"], +Cell[495334, 11952, 493, 11, 22, "Message",ExpressionUUID->"3546b880-2fe0-476c-9149-cefafd0960e8"], +Cell[495830, 11965, 32243, 576, 232, "Output",ExpressionUUID->"f62a0ad3-9d64-4a82-834d-27fb04c44a49"] }, Open ]], +Cell[528088, 12544, 200, 4, 29, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], Cell[CellGroupData[{ -Cell[430945, 11020, 2221, 64, 70, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], -Cell[433169, 11086, 570, 12, 70, "Message",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], -Cell[433742, 11100, 573, 12, 70, "Message",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], -Cell[434318, 11114, 578, 12, 70, "Message",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], -Cell[434899, 11128, 455, 10, 70, "Message",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], -Cell[435357, 11140, 172, 3, 70, "Output",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] +Cell[528313, 12552, 232, 5, 29, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], +Cell[528548, 12559, 38615, 708, 232, "Output",ExpressionUUID->"435e6296-f59a-4aee-8323-f983d687d1d7"] }, Open ]], Cell[CellGroupData[{ -Cell[435566, 11148, 2221, 64, 70, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], -Cell[437790, 11214, 572, 12, 70, "Message",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], -Cell[438365, 11228, 575, 12, 70, "Message",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], -Cell[438943, 11242, 578, 12, 70, "Message",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], -Cell[439524, 11256, 455, 10, 70, "Message",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], -Cell[439982, 11268, 173, 3, 70, "Output",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] +Cell[567200, 13272, 1616, 48, 71, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], +Cell[568819, 13322, 193, 3, 33, "Output",ExpressionUUID->"de6182ba-65a0-453a-a58f-d882da1cc5ce"] }, Open ]], Cell[CellGroupData[{ -Cell[440192, 11276, 213, 6, 70, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], -Cell[440408, 11284, 172, 3, 70, "Output",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] +Cell[569049, 13330, 2270, 64, 64, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], +Cell[571322, 13396, 814, 17, 41, "Message",ExpressionUUID->"ed97716a-ef45-476b-8387-342a32da4e41"], +Cell[572139, 13415, 814, 17, 41, "Message",ExpressionUUID->"812e21f2-ad51-4c98-9459-e99cfa0e4ede"], +Cell[572956, 13434, 815, 17, 41, "Message",ExpressionUUID->"ed300602-81d5-463b-8f00-8116973aba4e"], +Cell[573774, 13453, 497, 11, 22, "Message",ExpressionUUID->"5567e3cc-2fd5-40ac-b92d-09ada50f3f49"], +Cell[574274, 13466, 196, 3, 33, "Output",ExpressionUUID->"1709b2dd-9b14-4ad0-b09c-93349d38ffb6"] }, Open ]], -Cell[440595, 11290, 245, 5, 70, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[440865, 11299, 558, 19, 70, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[441426, 11320, 173, 3, 70, "Output",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] +Cell[574507, 13474, 2233, 63, 64, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], +Cell[576743, 13539, 812, 17, 41, "Message",ExpressionUUID->"d64da598-09c1-4f61-8f1f-64cf11679ca4"], +Cell[577558, 13558, 814, 17, 41, "Message",ExpressionUUID->"2b219be5-0fcf-4da4-a817-7b56815dbc6f"], +Cell[578375, 13577, 813, 17, 41, "Message",ExpressionUUID->"ad2281df-5a41-45c5-a148-900ce829c328"], +Cell[579191, 13596, 493, 11, 22, "Message",ExpressionUUID->"a55d1935-60cd-451a-ad2b-c8a293846aab"], +Cell[579687, 13609, 194, 3, 33, "Output",ExpressionUUID->"ecde14a6-77ef-41ba-945a-1de3b2c464a0"] }, Open ]], Cell[CellGroupData[{ -Cell[441636, 11328, 170, 5, 70, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[441809, 11335, 171, 3, 70, "Output",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] +Cell[579918, 13617, 2233, 63, 64, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], +Cell[582154, 13682, 813, 17, 41, "Message",ExpressionUUID->"a60a1872-129e-4544-815e-4030e3954069"], +Cell[582970, 13701, 814, 17, 41, "Message",ExpressionUUID->"6d9f0638-6ce4-419d-852c-49de0ec5941f"], +Cell[583787, 13720, 815, 17, 41, "Message",ExpressionUUID->"d0d97d65-05c9-464f-b9f6-b10f82194a8c"], +Cell[584605, 13739, 497, 11, 22, "Message",ExpressionUUID->"8fc85fb2-ced3-420d-91f6-9130c1e0e44a"], +Cell[585105, 13752, 195, 3, 109, "Output",ExpressionUUID->"0dd0523d-03f7-4c00-90bf-9f9fcb591751"] }, Open ]], Cell[CellGroupData[{ -Cell[442017, 11343, 181, 5, 70, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[442201, 11350, 173, 3, 70, "Output",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] +Cell[585337, 13760, 236, 6, 109, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], +Cell[585576, 13768, 193, 3, 109, "Output",ExpressionUUID->"963b9045-70ba-47a3-8d7e-48c31c27759c"] }, Open ]], +Cell[585784, 13774, 271, 6, 109, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[442411, 11358, 6055, 185, 70, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[448469, 11545, 175, 3, 70, "Output",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] +Cell[586080, 13784, 558, 19, 51, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], +Cell[586641, 13805, 195, 3, 33, "Output",ExpressionUUID->"af92e250-d914-4e04-be97-36d0b51aaf04"] }, Open ]], Cell[CellGroupData[{ -Cell[448681, 11553, 368, 9, 70, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[449052, 11564, 170, 3, 70, "Output",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] +Cell[586873, 13813, 170, 5, 55, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], +Cell[587046, 13820, 195, 3, 33, "Output",ExpressionUUID->"a6d253dc-2397-44ff-b715-72e3a59e6055"] }, Open ]], Cell[CellGroupData[{ -Cell[449259, 11572, 6122, 187, 70, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[455384, 11761, 175, 3, 70, "Output",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] +Cell[587278, 13828, 181, 5, 43, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], +Cell[587462, 13835, 195, 3, 33, "Output",ExpressionUUID->"223a7cd7-40b2-432c-9e88-5e2c35a539aa"] }, Open ]], Cell[CellGroupData[{ -Cell[455596, 11769, 368, 9, 70, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[455967, 11780, 172, 3, 70, "Output",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] +Cell[587694, 13843, 6055, 185, 183, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], +Cell[593752, 14030, 197, 3, 33, "Output",ExpressionUUID->"9196084a-08b2-469e-a59a-7e6977c89cb2"] }, Open ]], Cell[CellGroupData[{ -Cell[456176, 11788, 2663, 88, 70, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[458842, 11878, 173, 3, 70, "Output",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] +Cell[593986, 14038, 368, 9, 41, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], +Cell[594357, 14049, 191, 3, 33, "Output",ExpressionUUID->"d4425cae-164f-42d9-89e5-61f4bef0fd1f"] }, Open ]], Cell[CellGroupData[{ -Cell[459052, 11886, 2603, 85, 70, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[461658, 11973, 171, 3, 70, "Output",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] +Cell[594585, 14057, 6122, 187, 183, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], +Cell[600710, 14246, 196, 3, 33, "Output",ExpressionUUID->"8f95cf82-5d70-4a0f-95af-792f9c8df177"] }, Open ]], Cell[CellGroupData[{ -Cell[461866, 11981, 3712, 118, 70, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[465581, 12101, 171, 3, 70, "Output",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] +Cell[600943, 14254, 368, 9, 41, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], +Cell[601314, 14265, 197, 3, 33, "Output",ExpressionUUID->"83a6e4ec-da93-4c6c-9fe6-4cc78f7b0da2"] }, Open ]], Cell[CellGroupData[{ -Cell[465789, 12109, 2052, 59, 70, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], -Cell[467844, 12170, 568, 12, 70, "Message",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], -Cell[468415, 12184, 572, 12, 70, "Message",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], -Cell[468990, 12198, 574, 12, 70, "Message",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], -Cell[469567, 12212, 457, 10, 70, "Message",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], -Cell[470027, 12224, 172, 3, 70, "Output",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] +Cell[601548, 14273, 2663, 88, 107, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], +Cell[604214, 14363, 197, 3, 33, "Output",ExpressionUUID->"c525bbcb-e893-40ab-9add-4b2f59c2848b"] }, Open ]], Cell[CellGroupData[{ -Cell[470236, 12232, 2054, 59, 70, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], -Cell[472293, 12293, 568, 12, 70, "Message",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], -Cell[472864, 12307, 572, 12, 70, "Message",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], -Cell[473439, 12321, 574, 12, 70, "Message",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], -Cell[474016, 12335, 457, 10, 70, "Message",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], -Cell[474476, 12347, 171, 3, 70, "Output",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] +Cell[604448, 14371, 2603, 85, 107, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], +Cell[607054, 14458, 192, 3, 33, "Output",ExpressionUUID->"b10a71df-3f9e-465d-ab5c-f5c8f92a1470"] }, Open ]], Cell[CellGroupData[{ -Cell[474684, 12355, 2030, 55, 70, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], -Cell[476717, 12412, 19960, 375, 70, "Output",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] +Cell[607283, 14466, 3712, 118, 160, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], +Cell[610998, 14586, 194, 3, 33, "Output",ExpressionUUID->"24bf62f9-9212-48d5-8d90-81d0fb8c7928"] }, Open ]], Cell[CellGroupData[{ -Cell[496714, 12792, 2118, 60, 70, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], -Cell[498835, 12854, 496, 11, 70, "Message",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], -Cell[499334, 12867, 501, 11, 70, "Message",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], -Cell[499838, 12880, 505, 11, 70, "Message",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], -Cell[500346, 12893, 455, 10, 70, "Message",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], -Cell[500804, 12905, 21721, 403, 70, "Output",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] +Cell[611229, 14594, 2075, 59, 99, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], +Cell[613307, 14655, 715, 14, 58, "Message",ExpressionUUID->"9b40fead-55ba-4f82-be96-889663ebfd95"], +Cell[614025, 14671, 813, 17, 41, "Message",ExpressionUUID->"e40d66f9-80dd-4fa4-b8f6-e9f87af4c0a0"], +Cell[614841, 14690, 815, 17, 41, "Message",ExpressionUUID->"4603e281-c5b6-4c52-ab91-30fda35e8c50"], +Cell[615659, 14709, 495, 11, 22, "Message",ExpressionUUID->"e0d89f3a-0774-4717-8e20-e540d78860b0"], +Cell[616157, 14722, 194, 3, 33, "Output",ExpressionUUID->"9c6a3d5d-258c-484a-be70-dfaca76358a4"] }, Open ]], -Cell[522540, 13311, 181, 3, 70, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], -Cell[522724, 13316, 207, 5, 70, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], Cell[CellGroupData[{ -Cell[522956, 13325, 1616, 48, 70, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], -Cell[524575, 13375, 589, 12, 70, "Message",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], -Cell[525167, 13389, 588, 12, 70, "Message",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], -Cell[525758, 13403, 594, 12, 70, "Message",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], -Cell[526355, 13417, 455, 10, 70, "Message",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], -Cell[526813, 13429, 173, 3, 70, "Output",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] +Cell[616388, 14730, 2077, 59, 99, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], +Cell[618468, 14791, 714, 14, 58, "Message",ExpressionUUID->"f81599bd-89ec-4723-b174-bdec7f373192"], +Cell[619185, 14807, 813, 17, 41, "Message",ExpressionUUID->"b76c0198-1d23-49b3-9a6e-8e994040ccdb"], +Cell[620001, 14826, 815, 17, 41, "Message",ExpressionUUID->"1a58ccb7-0c16-414a-b2a6-1769dc346042"], +Cell[620819, 14845, 495, 11, 22, "Message",ExpressionUUID->"b4ec93d4-bc75-4273-9f80-7c97ca68b12f"], +Cell[621317, 14858, 197, 3, 33, "Output",ExpressionUUID->"3fd8c6c0-50f9-4053-bcab-46a68dae5ef7"] }, Open ]], Cell[CellGroupData[{ -Cell[527023, 13437, 2246, 64, 70, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], -Cell[529272, 13503, 566, 12, 70, "Message",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], -Cell[529841, 13517, 570, 12, 70, "Message",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], -Cell[530414, 13531, 574, 12, 70, "Message",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], -Cell[530991, 13545, 456, 10, 70, "Message",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], -Cell[531450, 13557, 171, 3, 70, "Output",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] +Cell[621551, 14866, 2053, 55, 53, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], +Cell[623607, 14923, 23475, 432, 242, "Output",ExpressionUUID->"9466ebdb-3323-422d-9480-3f40d1c959eb"] }, Open ]], Cell[CellGroupData[{ -Cell[531658, 13565, 2221, 64, 70, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], -Cell[533882, 13631, 569, 12, 70, "Message",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], -Cell[534454, 13645, 571, 12, 70, "Message",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], -Cell[535028, 13659, 575, 12, 70, "Message",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], -Cell[535606, 13673, 458, 10, 70, "Message",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], -Cell[536067, 13685, 171, 3, 70, "Output",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] +Cell[647119, 15360, 2141, 60, 99, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], +Cell[649263, 15422, 558, 12, 40, "Message",ExpressionUUID->"899a1208-e5b4-44d0-be99-3c5be9975e2b"], +Cell[649824, 15436, 563, 12, 40, "Message",ExpressionUUID->"51b1ea51-42f0-4a58-b650-bf21a0c85956"], +Cell[650390, 15450, 564, 12, 40, "Message",ExpressionUUID->"c5756e75-3dfc-4ffc-90c9-3c624b06082b"], +Cell[650957, 15464, 495, 11, 22, "Message",ExpressionUUID->"6f73f0b5-fbf1-4569-9e0c-bbdf222a63b5"], +Cell[651455, 15477, 32412, 579, 232, "Output",ExpressionUUID->"d0071fdd-1814-4283-ba85-8c2e5a10bce4"] }, Open ]], +Cell[683882, 16059, 207, 4, 29, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], Cell[CellGroupData[{ -Cell[536275, 13693, 2223, 64, 70, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], -Cell[538501, 13759, 567, 12, 70, "Message",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], -Cell[539071, 13773, 571, 12, 70, "Message",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], -Cell[539645, 13787, 573, 12, 70, "Message",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], -Cell[540221, 13801, 456, 10, 70, "Message",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], -Cell[540680, 13813, 173, 3, 70, "Output",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] +Cell[684114, 16067, 230, 5, 29, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], +Cell[684347, 16074, 38786, 711, 232, "Output",ExpressionUUID->"7f4ebc84-7e42-4f7a-82c0-cfc26fd5655b"] }, Open ]], Cell[CellGroupData[{ -Cell[540890, 13821, 211, 6, 70, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], -Cell[541104, 13829, 174, 3, 70, "Output",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] -}, Open ]] +Cell[723170, 16790, 1616, 48, 71, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], +Cell[724789, 16840, 194, 3, 33, "Output",ExpressionUUID->"e872407a-6ba4-4ec5-aa06-6ae598643475"] +}, Open ]], +Cell[CellGroupData[{ +Cell[725020, 16848, 2269, 64, 64, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], +Cell[727292, 16914, 713, 14, 58, "Message",ExpressionUUID->"30f42b88-bd35-4a71-96f6-23ebceb9aee8"], +Cell[728008, 16930, 811, 17, 41, "Message",ExpressionUUID->"f72b84cc-2f98-4361-a5b6-51b833b68ad2"], +Cell[728822, 16949, 813, 17, 41, "Message",ExpressionUUID->"8404cebf-64da-4f40-aa88-e0a1a925296a"], +Cell[729638, 16968, 493, 11, 22, "Message",ExpressionUUID->"2858e632-5a1c-40c5-b9d1-0cb2439174f7"], +Cell[730134, 16981, 192, 3, 33, "Output",ExpressionUUID->"32435660-e61a-4e26-a131-9aab63c48683"] +}, Open ]], +Cell[CellGroupData[{ +Cell[730363, 16989, 2233, 63, 64, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], +Cell[732599, 17054, 714, 14, 58, "Message",ExpressionUUID->"43e9e7ec-bfcb-46e9-8faa-6c5e7141cdbc"], +Cell[733316, 17070, 813, 17, 41, "Message",ExpressionUUID->"19b40306-7011-4901-94ca-f2fa3b96c170"], +Cell[734132, 17089, 815, 17, 41, "Message",ExpressionUUID->"b7751184-4eac-41e4-830d-5b66b91e3f8b"], +Cell[734950, 17108, 497, 11, 22, "Message",ExpressionUUID->"180b579b-722b-4242-863f-7dea1d5e4a95"], +Cell[735450, 17121, 195, 3, 33, "Output",ExpressionUUID->"268741b3-21d6-4c59-9577-71ddee231180"] +}, Open ]], +Cell[CellGroupData[{ +Cell[735682, 17129, 2235, 63, 64, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], +Cell[737920, 17194, 713, 14, 58, "Message",ExpressionUUID->"213c9042-6027-403a-bcbc-8c15ad9cb56b"], +Cell[738636, 17210, 811, 17, 41, "Message",ExpressionUUID->"b42acc68-aff2-415b-a440-a29bd365bc35"], +Cell[739450, 17229, 813, 17, 41, "Message",ExpressionUUID->"e5ef07ce-dffe-48b4-82ee-31dbf62b80bf"], +Cell[740266, 17248, 493, 11, 22, "Message",ExpressionUUID->"691bc105-b1c4-478c-aaf2-04af176b7f55"], +Cell[740762, 17261, 195, 3, 33, "Output",ExpressionUUID->"da01b778-2ac1-4128-82bf-9cd7b1ac6d2a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[740994, 17269, 234, 6, 46, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], +Cell[741231, 17277, 194, 3, 33, "Output",ExpressionUUID->"43586a10-4076-48af-b650-5928a986de62"] +}, Open ]], +Cell[741440, 17283, 4096, 89, 220, "Input",ExpressionUUID->"7dc50d8e-5b4e-4cb6-91be-2af4f034010c"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw2.nb b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw2.nb index a320d64..6dbd431 100644 --- a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw2.nb +++ b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_osc_Qw2.nb @@ -3,42 +3,4839 @@ (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) -(* CreatedBy='Wolfram 14.1' *) +(* CreatedBy='Wolfram 15.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 381361, 9130] -NotebookOptionsPosition[ 356610, 8757] -NotebookOutlinePosition[ 357039, 8774] -CellTagsIndexPosition[ 356996, 8771] +NotebookDataLength[ 723582, 16799] +NotebookOptionsPosition[ 683891, 16159] +NotebookOutlinePosition[ 684325, 16177] +CellTagsIndexPosition[ 684282, 16174] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ -Cell[BoxData[ - RowBox[{"f1", "="}]], "Input", - CellChangeTimes->{ - 3.9918496921150837`*^9},ExpressionUUID->"ede64bc2-06f7-8743-a0a6-\ -6f058773310c"], -Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918496892276516`*^9, - 3.9918496892324924`*^9}},ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-\ -c82e80965ca9"], +Cell[CellGroupData[{ +Cell[BoxData[ + RowBox[{"d", "=", "2.88"}]], "Input", + CellChangeTimes->{ + 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, + 3.9920650045886707`*^9, {3.993801942128783*^9, 3.993801945433443*^9}, { + 3.9938026615010633`*^9, 3.993802739368286*^9}, {3.993802810187974*^9, + 3.9938028103007183`*^9}, {3.993803575340521*^9, 3.993803666300129*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"7b253c96-53a2-4db3-872c-2141e825cd9f"], + +Cell[BoxData["2.88`"], "Output", + CellChangeTimes->{ + 3.991320420900818*^9, 3.993800775970068*^9, 3.9938019548134403`*^9, { + 3.993802671037874*^9, 3.9938027475965223`*^9}, 3.9938028210918093`*^9, { + 3.993803586980714*^9, 3.993803670362015*^9}, 3.993828462605898*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"cf2efeb7-e25a-4a0b-8110-16760220c471"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f2", "="}]], "Input", + RowBox[{"A", "=", "236"}]], "Input", + CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"12918b51-dfaa-47b5-ac18-49c9df18d6d8"], + +Cell[BoxData["236"], "Output", CellChangeTimes->{ - 3.991849690724144*^9},ExpressionUUID->"328429c4-9130-334e-ba7f-\ -7dc8ec78e5b4"], + 3.9913196497381973`*^9, 3.9938007760760193`*^9, 3.993801954850832*^9, { + 3.9938026710743093`*^9, 3.993802747641852*^9}, 3.993802821127861*^9, { + 3.993803587016178*^9, 3.9938036703981237`*^9}, 3.993828462688892*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"b2116fcf-b9e2-46d8-a0f8-73adb2c0eb85"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A1", "=", "152"}]], "Input", + CellChangeTimes->{ + 3.991798961431202*^9, {3.993800516328167*^9, 3.993800518467939*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"675d893f-e17a-475d-a12a-d44d0722b850"], + +Cell[BoxData["152"], "Output", + CellChangeTimes->{ + 3.9913196497578354`*^9, 3.993800520116021*^9, 3.9938007760814123`*^9, + 3.99380195486788*^9, {3.993802671090054*^9, 3.993802747658696*^9}, + 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}, + 3.9938284626982517`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"c0cbc0d0-edb9-4432-8f1b-747efc4a0680"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a1", "=", "0.55"}]], "Input", + CellChangeTimes->{3.9434144380252676`*^9}, + CellLabel->"In[4]:=",ExpressionUUID->"fb2c206f-fe2e-46fe-82ec-9f2b8c9091a7"], + +Cell[BoxData["0.55`"], "Output", + CellChangeTimes->{ + 3.991319649777508*^9, 3.9938007761127357`*^9, 3.993801954886694*^9, { + 3.993802671105547*^9, 3.993802747674674*^9}, 3.9938028211591873`*^9, { + 3.9938035870466833`*^9, 3.993803670422636*^9}, 3.99382846270662*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"0059b94d-56bd-4663-90c9-c9809292e8ce"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a2", "=", + RowBox[{"a1", "-", + RowBox[{"0.015", "*", + FractionBox[ + RowBox[{ + RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", + CellLabel->"In[5]:=",ExpressionUUID->"6914e16d-2b39-4591-8244-627b458bbdb0"], + +Cell[BoxData["0.545677966101695`"], "Output", + CellChangeTimes->{ + 3.9913196497965145`*^9, 3.993800776129066*^9, 3.9938019549039087`*^9, { + 3.9938026711227913`*^9, 3.993802747690078*^9}, 3.993802821174389*^9, { + 3.9938035870619383`*^9, 3.993803670434517*^9}, 3.993828462715074*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"6c2780af-d50c-48cb-90eb-7903a9eba19c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"p0", "=", "0.17"}]], "Input", + CellLabel->"In[6]:=",ExpressionUUID->"07dfb44e-d279-4897-9a13-598d7be7384e"], + +Cell[BoxData["0.17`"], "Output", + CellChangeTimes->{ + 3.9913196498144608`*^9, 3.9938007761450787`*^9, 3.993801954921114*^9, { + 3.993802671138826*^9, 3.993802747705122*^9}, 3.993802821189831*^9, { + 3.993803587077704*^9, 3.993803670446403*^9}, 3.9938284627235317`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"f3ca1d20-5fa1-4ddf-b0be-330e4ea89ea2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R01", "=", + RowBox[{"1.16", "*", + SuperscriptBox["A1", + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, + CellLabel->"In[7]:=",ExpressionUUID->"2262019a-6890-43b9-8240-7852bbef306a"], + +Cell[BoxData["6.190691825034912`"], "Output", + CellChangeTimes->{ + 3.9913196498225155`*^9, 3.993800776161807*^9, 3.993801954937538*^9, { + 3.9938026711557207`*^9, 3.993802747719865*^9}, 3.993802821205323*^9, { + 3.993803587093586*^9, 3.9938036704581614`*^9}, 3.993828462733412*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"0850af31-60c7-4cfb-ad60-98eaa0e5fad7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R02", "=", + RowBox[{"1.16", "*", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"A", "-", "A1"}], ")"}], + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellLabel->"In[8]:=",ExpressionUUID->"22173aa9-71c8-4e01-b15a-90be71438024"], + +Cell[BoxData["5.08024220226995`"], "Output", + CellChangeTimes->{ + 3.9913196498425236`*^9, 3.993800776178092*^9, 3.993801954954875*^9, { + 3.993802671171578*^9, 3.993802747723295*^9}, 3.993802821221133*^9, { + 3.993803587109274*^9, 3.993803670471842*^9}, 3.9938284627437363`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"3b094d15-3bfb-46e9-b263-1aef66364242"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b1", "=", "0.97619"}]], "Input", + CellChangeTimes->{ + 3.991799283179735*^9, {3.9938005440294*^9, 3.993800567746181*^9}}, + CellLabel->"In[9]:=",ExpressionUUID->"a6015a58-42c2-45b6-836d-28a802b37b44"], + +Cell[BoxData["0.97619`"], "Output", + CellChangeTimes->{ + 3.993800776210225*^9, 3.993801954959785*^9, {3.993802671174962*^9, + 3.993802747749667*^9}, 3.9938028212246647`*^9, {3.9938035871245747`*^9, + 3.993803670475428*^9}, 3.99382846275149*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"1c5cbbfd-a277-4961-88ec-4bc7d332bf8a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b2", "=", "0.59439"}]], "Input", + CellChangeTimes->{ + 3.991799280663351*^9, {3.9938005524325247`*^9, 3.993800560808515*^9}}, + CellLabel->"In[10]:=",ExpressionUUID->"d45b90f9-604b-44c2-8168-ba016d65c24a"], + +Cell[BoxData["0.59439`"], "Output", + CellChangeTimes->{ + 3.993800776226185*^9, 3.993801954993833*^9, {3.9938026712049103`*^9, + 3.993802747764641*^9}, 3.993802821251552*^9, {3.993803587139648*^9, + 3.993803670490211*^9}, 3.993828462758381*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"60a97c8b-760a-4bfe-897b-16b38174eb97"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x1", "=", "0"}]], "Input", + CellLabel->"In[11]:=",ExpressionUUID->"89f11eb1-a521-4168-886c-b6bdd10d4fca"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498927155`*^9, 3.993800776256876*^9, 3.9938019550107737`*^9, { + 3.99380267122059*^9, 3.993802747779757*^9}, 3.993802821267166*^9, { + 3.993803587154791*^9, 3.993803670501927*^9}, 3.993828462781104*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"06489bfc-b999-4978-9152-5d5ec53ec37f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x2", "=", "0"}]], "Input", + CellLabel->"In[12]:=",ExpressionUUID->"b38a18fd-a479-44cd-971f-112870dd2c33"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498996067`*^9, 3.993800776272674*^9, 3.993801955027381*^9, { + 3.993802671236315*^9, 3.993802747794403*^9}, 3.993802821282477*^9, { + 3.993803587158352*^9, 3.993803670513171*^9}, 3.993828462795656*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"bee07433-5b66-43a4-8fc4-e8548e7a9c72"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w1", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[13]:=",ExpressionUUID->"c817f971-3b65-455e-adce-164479471999"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913197863028755`*^9, 3.993800776289051*^9, 3.993801955044087*^9, { + 3.993802671251883*^9, 3.993802747809085*^9}, 3.9938028212979517`*^9, { + 3.9938035871856203`*^9, 3.9938036705241947`*^9}, 3.993828462816063*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"73d729d5-3bac-43ac-a39b-4c8364f932b8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w2", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[14]:=",ExpressionUUID->"40318108-7e6c-4c34-b692-94bf023cc0c1"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913197864610195`*^9, 3.993800776304994*^9, 3.993801955061472*^9, { + 3.993802671267837*^9, 3.9938027478234367`*^9}, 3.9938028213134613`*^9, { + 3.9938035872015963`*^9, 3.9938036705351753`*^9}, 3.993828462834547*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"db5b4614-e0e9-48ed-b7f5-8fada89333d3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c11", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"dc0603ea-7510-412b-b034-8ea37be3d92e"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.993800776320915*^9, 3.993801955077899*^9, { + 3.993802671285616*^9, 3.9938027478392677`*^9}, 3.993802821328992*^9, { + 3.993803587217046*^9, 3.993803670546205*^9}, 3.993828462849869*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"7be63c4f-17b2-424c-804b-602166a5d82d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"2a67956b-52d6-4a7f-abdf-9ff3c12ed5bb"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.991319786540777*^9, 3.9938007763370247`*^9, 3.993801955093937*^9, { + 3.993802671301764*^9, 3.993802747854802*^9}, 3.993802821344532*^9, { + 3.993803587232232*^9, 3.993803670558001*^9}, 3.993828462862118*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"95a16525-adef-4994-a290-99c590f4a1b7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c21", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"af47e721-099b-4f0f-bf06-b19f56791ead"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.9913197865777817`*^9, 3.9938007763528843`*^9, 3.9938019551103783`*^9, { + 3.9938026713191147`*^9, 3.993802747870304*^9}, 3.993802821359898*^9, { + 3.993803587247026*^9, 3.9938036705701017`*^9}, 3.993828462873589*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"cbf394c4-8682-4767-b7db-4726750fda87"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c22", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"3deb6f11-4f00-4d28-a134-8cf512743be3"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.9913197866129*^9, 3.9938007763688097`*^9, 3.993801955127124*^9, { + 3.993802671337201*^9, 3.99380274788591*^9}, 3.993802821375526*^9, { + 3.993803587262051*^9, 3.993803670582543*^9}, 3.993828462882016*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"9d28df34-e3fd-440f-a89b-00d00173b4f0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"38508ee8-e6a4-4d7d-a680-522e91eb1bed"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786620775*^9, 3.993800776384469*^9, 3.99380195514393*^9, { + 3.993802671355851*^9, 3.9938027479017677`*^9}, 3.9938028213910847`*^9, { + 3.993803587265461*^9, 3.9938036705956707`*^9}, 3.9938284628879213`*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"9dae7ce1-9146-4513-9e06-2b1ba1205917"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fin", "=", "0.09"}]], "Input", + CellLabel->"In[20]:=",ExpressionUUID->"f253a04d-d10e-4d20-b69c-8996b57f1826"], + +Cell[BoxData["0.09`"], "Output", + CellChangeTimes->{ + 3.991319786657793*^9, 3.993800776400263*^9, 3.993801955160005*^9, { + 3.993802671372757*^9, 3.993802747917276*^9}, 3.9938028214069347`*^9, { + 3.993803587291121*^9, 3.993803670608396*^9}, 3.993828462901367*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"a5991de3-b7e4-4e21-a567-048f41f7f70c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffin", "=", "0.42"}]], "Input", + CellLabel->"In[21]:=",ExpressionUUID->"345c9228-9333-4ab3-8591-651c41219ee9"], + +Cell[BoxData["0.42`"], "Output", + CellChangeTimes->{ + 3.9913197866657925`*^9, 3.993800776415701*^9, 3.993801955176228*^9, { + 3.9938026713885727`*^9, 3.9938027479333763`*^9}, 3.9938028214226522`*^9, { + 3.993803587306354*^9, 3.993803670621553*^9}, 3.993828462911409*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"9fab72f5-3092-4c8c-9d04-41c2c8e6f0d7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fex", "=", + RowBox[{"-", "2.59"}]}]], "Input", + CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"1d7a3fc3-b860-4926-849a-3351ab6e1e7d"], + +Cell[BoxData[ + RowBox[{"-", "2.59`"}]], "Output", + CellChangeTimes->{ + 3.9913197866996*^9, 3.993800776431301*^9, 3.993801955193372*^9, { + 3.993802671403956*^9, 3.9938027479492397`*^9}, 3.9938028214382277`*^9, { + 3.993803587321618*^9, 3.993803670634707*^9}, 3.993828462928275*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"c722ef05-d656-4907-a066-6884ff506078"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffex", "=", "0.54"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"9fee44ab-7b84-4c8e-b0a6-706860d00132"], + +Cell[BoxData["0.54`"], "Output", + CellChangeTimes->{ + 3.9913197867406044`*^9, 3.9938007764469233`*^9, 3.9938019552102613`*^9, { + 3.9938026714206*^9, 3.993802747964871*^9}, 3.993802821453787*^9, { + 3.993803587336917*^9, 3.9938036706484222`*^9}, 3.993828462937975*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"e376a4e1-50bc-4f64-a848-3247a444d9e7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z1", "=", " ", "66"}]], "Input", + CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { + 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { + 3.993800689005188*^9, 3.993800698859473*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"8693de9a-b36a-4e06-9f84-e16fe245e5be"], + +Cell[BoxData["66"], "Output", + CellChangeTimes->{ + 3.9913197867861958`*^9, 3.993800776462777*^9, 3.993801955228032*^9, { + 3.9938026714376583`*^9, 3.99380274798144*^9}, 3.993802821469448*^9, { + 3.993803587352215*^9, 3.9938036706619053`*^9}, 3.993828462945467*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"ae1c2dcc-a889-495f-8d29-ec43f4ca9d8b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z2", "=", + RowBox[{"94", "-", "Z1"}]}]], "Input", + CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, + 3.9916443064841423`*^9, {3.993800702787973*^9, 3.993800703931004*^9}}, + CellLabel->"In[25]:=",ExpressionUUID->"d60d8349-98d6-4285-8b6d-4f581afc2829"], + +Cell[BoxData["28"], "Output", + CellChangeTimes->{ + 3.9913197867928696`*^9, 3.993800776478297*^9, 3.993801955245349*^9, { + 3.993802671454508*^9, 3.993802747997691*^9}, 3.993802821484852*^9, { + 3.993803587367502*^9, 3.9938036706754093`*^9}, 3.993828462961197*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"b8a17cd5-c84b-4b36-b936-ecee44240444"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A2", "=", + RowBox[{"A", "-", "A1"}]}]], "Input", + CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"d2244f39-a325-4e43-a829-b0e74043662d"], + +Cell[BoxData["84"], "Output", + CellChangeTimes->{ + 3.991319786827894*^9, 3.993800776493824*^9, 3.993801955261796*^9, { + 3.993802671472805*^9, 3.993802748017583*^9}, 3.99380282150027*^9, { + 3.993803587382532*^9, 3.993803670687777*^9}, 3.9938284629711113`*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"60ebe953-84f1-4a1f-b642-bcc2d0a4a9c1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Din", "=", + RowBox[{"fin", "+", + RowBox[{"ffin", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"8bf107ad-b39e-49f0-941a-efc14bc1b45d"], + +Cell[BoxData["0.10842105263157895`"], "Output", + CellChangeTimes->{ + 3.9913197868648605`*^9, 3.9938007765094976`*^9, 3.9938019552787237`*^9, { + 3.993802671491748*^9, 3.9938027480331593`*^9}, 3.9938028215155582`*^9, { + 3.993803587397368*^9, 3.9938036706998672`*^9}, 3.993828462978641*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"a32296b5-0f08-4898-9bb9-48d8cbd4332a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Dex", "=", + RowBox[{"fex", "+", + RowBox[{"ffex", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"d44789c9-2529-4c7e-aec1-4f66d54d6a58"], + +Cell[BoxData[ + RowBox[{"-", "2.566315789473684`"}]], "Output", + CellChangeTimes->{ + 3.9913197868718567`*^9, 3.9938007765252047`*^9, 3.9938019552955627`*^9, { + 3.9938026715153112`*^9, 3.993802748050967*^9}, 3.9938028215315247`*^9, { + 3.993803587413514*^9, 3.9938036707132397`*^9}, 3.993828463001367*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"4b14d6c9-3202-459b-a0c4-76c9ba8548f0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R00", "=", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x1", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x2", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", "d"}]}]], "Input", + CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { + 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, + 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"38878574-ec2d-4548-b7b1-39482c329a6d"], + +Cell[BoxData["19.255392789884887`"], "Output", + CellChangeTimes->{ + 3.9913197869068584`*^9, 3.993800776541044*^9, 3.993801955312595*^9, { + 3.99380267153469*^9, 3.993802748068204*^9}, 3.993802821546997*^9, { + 3.9938035874293547`*^9, 3.993803670724801*^9}, 3.993828463011689*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"b82266a4-b9d0-40aa-a189-9378485da9fd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"18bfdc8b-e7a3-44cf-9e4d-cf45f20352e5"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786940857*^9, 3.993800776556777*^9, 3.993801955328986*^9, { + 3.993802671551854*^9, 3.993802748085292*^9}, 3.9938028215632277`*^9, { + 3.993803587445024*^9, 3.993803670737692*^9}, 3.993828463019443*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"badedc03-6a1c-4a0b-8aa6-1d0278c297dc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v1", "=", "1.63"}]], "Input", + CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, + 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { + 3.99380058189814*^9, 3.993800584279264*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"5fef2d1b-f385-4989-b573-880dcb87e157"], + +Cell[BoxData["1.63`"], "Output", + CellChangeTimes->{ + 3.993800776587946*^9, 3.993801955345385*^9, {3.993802671570458*^9, + 3.993802748111987*^9}, 3.9938028215786963`*^9, {3.9938035874604197`*^9, + 3.993803670750949*^9}, 3.99382846302806*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"017946aa-0e93-488d-885a-00b5aaa13dea"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991849693382303*^9, - 3.991849693386299*^9}},ExpressionUUID->"b3364ab6-86a4-7a46-ae33-\ -623392314869"], + CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"f2f317d7-8ee1-4810-8fde-07cb8a32b563"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n1", "=", "0.856"}]], "Input", + CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, + 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { + 3.993800591017771*^9, 3.993800594019471*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"bd4634e9-565a-4b09-9cd1-4e9bf17131d9"], + +Cell[BoxData["0.856`"], "Output", + CellChangeTimes->{ + 3.9938007766183*^9, 3.993801955394834*^9, {3.99380267161954*^9, + 3.993802748161004*^9}, 3.993802821625576*^9, {3.993803587507737*^9, + 3.993803670776819*^9}, 3.99382846305053*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"44fbe620-70c4-490e-8388-6ebd1759a99c"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"14d91c8f-f927-4aca-b6dc-a15260a5bcd8"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv1", "=", "2.615"}]], "Input", + CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { + 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { + 3.9938005968681726`*^9, 3.9938005993167686`*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"2f161871-a44e-48fc-aa84-c4efc56cfdc5"], + +Cell[BoxData["2.615`"], "Output", + CellChangeTimes->{ + 3.993800776636183*^9, 3.9938019554430428`*^9, {3.993802671677952*^9, + 3.993802748207687*^9}, 3.993802821672069*^9, {3.993803587556972*^9, + 3.993803670795989*^9}, 3.9938284630645847`*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"e31f28ab-1603-4b06-838d-a805433c7797"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"5b6e8eac-438f-42a8-bb13-a3fde98e051c"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn1", "=", "1.23"}]], "Input", + CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { + 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, + 3.991799359954439*^9, {3.993800602507454*^9, 3.993800603056312*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"d77bf623-3fea-4225-905d-a358fd605430"], + +Cell[BoxData["1.23`"], "Output", + CellChangeTimes->{ + 3.9938007766784554`*^9, 3.993801955495077*^9, {3.993802671729157*^9, + 3.993802748254798*^9}, 3.993802821718618*^9, {3.9938035876039553`*^9, + 3.9938036708157063`*^9}, 3.9938284630764427`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"8260b06e-9547-4d82-a84c-b21dc2fc0019"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"cf622c36-a850-4534-a417-885bedfc3339"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v2", "=", "2.22"}]], "Input", + CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, + 3.991718016467348*^9, 3.991799361414671*^9, {3.993800605567752*^9, + 3.993800606070137*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"177bb5d2-54f3-4c69-8b0b-3c354632ae09"], + +Cell[BoxData["2.22`"], "Output", + CellChangeTimes->{ + 3.993800776708939*^9, 3.993801955543845*^9, {3.993802671778071*^9, + 3.993802748303585*^9}, 3.993802821766041*^9, {3.993803587650766*^9, + 3.9938036708413343`*^9}, 3.9938284631055193`*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"32366072-d2a6-4333-a8f9-b8ca629a9e4e"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"849ef8eb-7a7b-471f-a310-ad797e88dc16"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n2", "=", "0.559"}]], "Input", + CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, + 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.993800609659601*^9, + 3.993800614079907*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"395ca36e-7075-4917-ba39-3522a45686bd"], + +Cell[BoxData["0.559`"], "Output", + CellChangeTimes->{ + 3.9938007767393847`*^9, 3.993801955593616*^9, {3.993802671829995*^9, + 3.993802748351069*^9}, 3.993802821813445*^9, {3.9938035876972513`*^9, + 3.993803670875149*^9}, 3.9938284631211157`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"27586805-c436-46ee-b928-bdef0ccfbdab"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"c4807ff7-08a7-404a-99a9-15dd6057f1c2"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv2", "=", "2.428"}]], "Input", + CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, + 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.993800618121642*^9, + 3.993800621996191*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"e8829cd8-dddf-407c-a332-142be067d633"], + +Cell[BoxData["2.428`"], "Output", + CellChangeTimes->{ + 3.9938007767695208`*^9, 3.993801955646489*^9, {3.993802671878972*^9, + 3.99380274840051*^9}, 3.993802821860149*^9, {3.9938035877441607`*^9, + 3.993803670903119*^9}, 3.9938284631405354`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"4188db86-c305-44b6-8c51-5e2840327fc7"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"9166c9b9-770d-48e3-b073-394dc46d9435"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn2", "=", "0.738"}]], "Input", + CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, + 3.9917993660901737`*^9, {3.993800626883781*^9, 3.993800632244173*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"fe52da68-2188-44b9-800f-6cc3abbddd87"], + +Cell[BoxData["0.738`"], "Output", + CellChangeTimes->{ + 3.993800776800035*^9, 3.993801955694454*^9, {3.993802671926148*^9, + 3.99380274844981*^9}, 3.99380282190762*^9, {3.9938035877925863`*^9, + 3.9938036709348783`*^9}, 3.993828463171629*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"53713c86-0d99-46ee-bda8-2497edb199cc"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"43801940-2d6e-4b74-804f-106c6f26a15f"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U31", "=", + RowBox[{"C0", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", "R1"}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "a1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "nn2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"Dex", "*", "v2", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/aR7S2Zj4lvHP7Jp2SD6t2ddPojOapZrBdETK9in +g+jbL87PBNEGxc+WgOhrG/jXgWi9vpDNIFrqcOcWEL1ki/glEK3Wwn0ZRDdb +HLoOonX+9D8E0abp/OxNQDq+aD4niN52MlAbRD/heKsDovPud4WB6HnRPNEg +uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt +Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr +ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== + "], + CellLabel->"In[47]:=",ExpressionUUID->"429ff42a-52cc-4985-96cb-a12607b181c3"], + +Cell[BoxData["0.04132444525810279`"], "Output", + CellChangeTimes->{ + 3.991319787430073*^9, 3.993800776881694*^9, 3.993801955753645*^9, { + 3.993802671993063*^9, 3.993802748523107*^9}, 3.993802821968258*^9, { + 3.993803587855629*^9, 3.993803670999495*^9}, 3.993828463271865*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"9142deec-0693-4b38-ade9-4916493647d2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U33", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", + FractionBox[ + RowBox[{"R01", "*", "R01"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"2", "*", "vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "a2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"Dex", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], + "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"b8312696-f3c8-43c7-a47e-762c2c8b1f38"], + +Cell[BoxData["1.8561337112494445`"], "Output", + CellChangeTimes->{ + 3.991319787574972*^9, 3.9938007769078693`*^9, 3.993801955775502*^9, { + 3.993802672016849*^9, 3.993802748547914*^9}, 3.99380282199231*^9, { + 3.9938035878800983`*^9, 3.993803671028694*^9}, 3.9938284664590397`*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"f46ee19b-870b-4b21-a885-06ad98531168"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U32", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02"}], "1"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"a2572af3-e8e7-4630-964c-d6b1657d3462"], + +Cell[BoxData[ + RowBox[{"-", "12.258798326305717`"}]], "Output", + CellChangeTimes->{ + 3.991319787641424*^9, 3.9938007769327593`*^9, 3.993801955798092*^9, { + 3.9938026720456457`*^9, 3.99380274857216*^9}, 3.993802822015239*^9, { + 3.993803587903886*^9, 3.9938036710539*^9}, 3.993828466730081*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"ce024aae-28ae-4e13-ab6e-b3ac53c29230"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U41", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[50]:=",ExpressionUUID->"2f81a41d-aedb-41b1-b0ca-ed792899709e"], + +Cell[BoxData[ + RowBox[{"-", "22.790441070773312`"}]], "Output", + CellChangeTimes->{ + 3.991319787711939*^9, 3.9938007769622097`*^9, 3.9938019558251333`*^9, { + 3.993802672094524*^9, 3.993802748600835*^9}, 3.993802822044148*^9, { + 3.993803587933173*^9, 3.993803671083523*^9}, 3.993828466774405*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"7ff2bf78-1947-402b-8a2f-ea1ed0460443"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U42", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[51]:=",ExpressionUUID->"d05218a0-c9ce-477f-9c3a-a5bd38334f82"], + +Cell[BoxData[ + RowBox[{"-", "43.29548999246014`"}]], "Output", + CellChangeTimes->{ + 3.9913197877723045`*^9, 3.9938007769919767`*^9, 3.993801955868244*^9, { + 3.993802672122458*^9, 3.993802748645914*^9}, 3.993802822070863*^9, { + 3.9938035879612713`*^9, 3.993803671112574*^9}, 3.993828466843863*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"46ee34f4-1c98-4f60-932c-4918611c7c5c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U51", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[52]:=",ExpressionUUID->"663d75b3-2612-436a-b0c7-9526b2a06958"], + +Cell[BoxData[ + RowBox[{"-", "161.3907844260869`"}]], "Output", + CellChangeTimes->{ + 3.991319787833355*^9, 3.993800777069632*^9, 3.9938019558996973`*^9, { + 3.9938026721544657`*^9, 3.9938027486794643`*^9}, 3.993802822104743*^9, { + 3.993803587995325*^9, 3.993803671146261*^9}, 3.993828466927804*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"ed17fae9-7fc7-4a4c-bb29-bbbf2024c2a4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U21", "=", "0"}]], "Input", + CellLabel->"In[53]:=",ExpressionUUID->"35173737-8133-43ce-b5b0-98b23d15b560"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210013676`*^9, 3.9938007770877237`*^9, 3.993801955916643*^9, { + 3.9938026721721487`*^9, 3.9938027486956*^9}, 3.993802822138073*^9, { + 3.993803588028162*^9, 3.993803671159233*^9}, 3.993828466962986*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"bd9b3ae1-a222-40e8-ba61-e5f624b68e50"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U22", "=", "0"}]], "Input", + CellLabel->"In[54]:=",ExpressionUUID->"9c5883ab-0183-4013-a340-45f66da41410"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210355663`*^9, 3.9938007771059847`*^9, 3.99380195593331*^9, { + 3.993802672187916*^9, 3.9938027487122726`*^9}, 3.993802822156447*^9, { + 3.993803588044907*^9, 3.9938036711709633`*^9}, 3.993828466990937*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"d6a79f70-a3fa-47ba-91e3-8306240c241d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[55]:=",ExpressionUUID->"cc111555-cbfb-4ad0-b36d-4856ede6924d"], + +Cell[BoxData["68.50484772769052`"], "Output", + CellChangeTimes->{ + 3.991320421068556*^9, 3.993800777122861*^9, 3.99380195595057*^9, { + 3.9938026722039537`*^9, 3.9938027487289467`*^9}, 3.993802822174095*^9, { + 3.993803588061635*^9, 3.993803671182822*^9}, 3.99382846701525*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"0b8d4556-6bab-4e61-9ff4-90c4d4894a06"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"73023971-71f2-4720-a131-529949d505eb"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.991320421098543*^9, 3.993800777139863*^9, 3.993801955967062*^9, { + 3.993802672219776*^9, 3.9938027487454987`*^9}, 3.993802822191181*^9, { + 3.9938035880780478`*^9, 3.99380367119495*^9}, 3.993828467031362*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"eb75e873-a781-4b67-8751-14b18d95d635"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[57]:=",ExpressionUUID->"52078ef1-7651-4d68-9e86-9645fe40a354"], + +Cell[BoxData["78.36655133019532`"], "Output", + CellChangeTimes->{ + 3.9913204211275444`*^9, 3.993800777156836*^9, 3.993801955985046*^9, { + 3.993802672236104*^9, 3.9938027487612762`*^9}, 3.993802822207035*^9, { + 3.993803588095743*^9, 3.993803671207213*^9}, 3.993828467047345*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"0b08f008-63ff-4882-8015-d1cd839f6096"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c11"], "Input", + CellLabel->"In[58]:=",ExpressionUUID->"68a91f96-5c1e-481e-a7fd-076dfbcc21bb"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.9913204211385536`*^9, 3.993800777173678*^9, 3.9938019560022707`*^9, { + 3.9938026722521267`*^9, 3.993802748776864*^9}, 3.9938028222235823`*^9, { + 3.993803588111733*^9, 3.993803671219968*^9}, 3.993828467064103*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"cc5b54ea-5751-4f6e-9f27-84023aaa2221"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c12"], "Input", + CellLabel->"In[59]:=",ExpressionUUID->"98c982e6-f3ff-4627-946a-2c554602cac8"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.9913204211683464`*^9, 3.993800777190844*^9, 3.9938019560194187`*^9, { + 3.993802672268169*^9, 3.9938027487928667`*^9}, 3.993802822239389*^9, { + 3.993803588127493*^9, 3.993803671233239*^9}, 3.993828467091091*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"c5012993-b9f8-472e-b2e5-6a2950ef2c6b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c21"], "Input", + CellLabel->"In[60]:=",ExpressionUUID->"3fbda7a7-9cb4-4907-8d8d-5bf5f117a5c2"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.991320421199068*^9, 3.9938007772073803`*^9, 3.993801956036744*^9, { + 3.993802672284265*^9, 3.993802748808551*^9}, 3.9938028222550507`*^9, { + 3.993803588143165*^9, 3.993803671247344*^9}, 3.9938284671079807`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"c3c6a5a0-6d92-49e3-bfe2-3c453fcdb431"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c22"], "Input", + CellLabel->"In[61]:=",ExpressionUUID->"b9849504-41b9-49d3-9d41-9d3d421a0b2c"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.991320421228037*^9, 3.99380077722381*^9, 3.99380195605359*^9, { + 3.99380267230028*^9, 3.993802748824264*^9}, 3.993802822270421*^9, { + 3.9938035881589603`*^9, 3.993803671262602*^9}, 3.993828467131187*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"2ba09ba1-a773-41e8-b647-d41db91b05e3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w1"], "Input", + CellLabel->"In[62]:=",ExpressionUUID->"406314f0-f0e4-408b-9a96-ef8ed8a14423"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913204212585373`*^9, 3.99380077723999*^9, 3.9938019560701323`*^9, { + 3.99380267231618*^9, 3.993802748839958*^9}, 3.993802822285783*^9, { + 3.9938035881747913`*^9, 3.993803671266725*^9}, 3.993828467149806*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"30a7c76a-5f01-4773-9c41-9c68c6c3cb22"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w2"], "Input", + CellLabel->"In[63]:=",ExpressionUUID->"cbd50e41-5832-4e27-8b79-28fde9697ad1"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913204212884274`*^9, 3.99380077725603*^9, 3.993801956086666*^9, { + 3.9938026723320913`*^9, 3.993802748856078*^9}, 3.993802822300988*^9, { + 3.9938035881912737`*^9, 3.9938036712790813`*^9}, 3.9938284671622066`*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"35cd5355-716a-4131-bd0d-d53ef91d55a8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", + CellLabel->"In[64]:=",ExpressionUUID->"723002c5-10f2-423d-8da2-ca1d63bbfbfe"], + +Cell[BoxData[ + RowBox[{"-", "26.975748857822108`"}]], "Output", + CellChangeTimes->{ + 3.9913204213185234`*^9, 3.993800777272346*^9, 3.993801956103663*^9, { + 3.993802672348072*^9, 3.9938027488719177`*^9}, 3.9938028223163843`*^9, { + 3.993803588207057*^9, 3.993803671292569*^9}, 3.993828467173527*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"acb5c522-087e-46c0-955b-9307c2189077"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", + CellLabel->"In[65]:=",ExpressionUUID->"338cd336-fc9a-4a08-9dae-1ff3bcaa98b4"], + +Cell[BoxData[ + RowBox[{"-", "9.274238671929899`"}]], "Output", + CellChangeTimes->{ + 3.991320421349531*^9, 3.993800777288783*^9, 3.993801956120541*^9, { + 3.993802672364458*^9, 3.993802748887658*^9}, 3.99380282233222*^9, { + 3.993803588227901*^9, 3.9938036713059*^9}, 3.9938284671831217`*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"5b7d6742-76ea-4128-bb6d-2ba6053ab9c2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB11", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U22"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[66]:=",ExpressionUUID->"cd0854bb-5807-492e-b426-fb27b36975bb"], + +Cell[BoxData["41.529098869868406`"], "Output", + CellChangeTimes->{ + 3.9913204213784294`*^9, 3.993800777305213*^9, 3.993801956138081*^9, { + 3.99380267238068*^9, 3.993802748904031*^9}, 3.9938028223479433`*^9, { + 3.99380358824424*^9, 3.993803671318845*^9}, 3.993828467191889*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"3d4001ff-2ae9-491f-86b4-ce69da9029d7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB12", "=", + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[67]:=",ExpressionUUID->"feb60772-0956-4895-96b0-66d91ebea7c5"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.9913204213904285`*^9, 3.993800777321735*^9, 3.993801956154997*^9, { + 3.9938026723977118`*^9, 3.9938027489203997`*^9}, 3.993802822363785*^9, { + 3.993803588260324*^9, 3.993803671330945*^9}, 3.993828467203267*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"e04f6352-58bb-4136-b9a8-da8649235bd1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB22", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U21"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + "\[IndentingNewLine]", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[68]:=",ExpressionUUID->"86d4b820-d47f-488f-a426-8cafefd03a1f"], + +Cell[BoxData["69.09231265826543`"], "Output", + CellChangeTimes->{ + 3.991320421419428*^9, 3.9938007773384323`*^9, 3.993801956172174*^9, { + 3.9938026724138613`*^9, 3.993802748938077*^9}, 3.993802822380664*^9, { + 3.9938035882645397`*^9, 3.9938036713443604`*^9}, 3.993828467216241*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"fe730263-913f-42d1-98e2-fd4a2582e2f3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kb", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "+", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"3f494149-3100-473e-9f0f-e8c0e5a24458"], + +Cell[BoxData["0.014405310234423041`"], "Output", + CellChangeTimes->{ + 3.9913204214494324`*^9, 3.9938007773549747`*^9, 3.993801956189353*^9, { + 3.993802672430953*^9, 3.9938027489557877`*^9}, 3.9938028223998747`*^9, { + 3.99380358829243*^9, 3.993803671364808*^9}, 3.993828467229267*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"363b0178-2da2-4012-ba52-87f401292552"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kw", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "-", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[70]:=",ExpressionUUID->"8aea9aac-2e0a-4e4d-89ee-28138abb09b3"], + +Cell[BoxData["351.3032034374311`"], "Output", + CellChangeTimes->{ + 3.991320421481529*^9, 3.993800777371662*^9, 3.99380195620572*^9, { + 3.9938026724471073`*^9, 3.9938027489713907`*^9}, 3.9938028224237127`*^9, { + 3.9938035883102903`*^9, 3.993803671376803*^9}, 3.99382846724201*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"e44ce607-e0a1-4c4f-af6a-25fa465ec1aa"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f1", "=", "0.87006"}]], "Input", + CellChangeTimes->{ + 3.9918496921150837`*^9, {3.9938277872304497`*^9, 3.993827788202722*^9}}, + CellLabel->"In[71]:=",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], + +Cell[BoxData["0.87006`"], "Output", + CellChangeTimes->{3.993828467250902*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"ea1c75a3-231c-459b-a2af-e8e1d983bb43"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918496892276516`*^9, 3.9918496892324924`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f2", "=", "0.76634"}]], "Input", + CellChangeTimes->{ + 3.991849690724144*^9, {3.993827796063987*^9, 3.9938277968066397`*^9}}, + CellLabel->"In[73]:=",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], + +Cell[BoxData["0.76634`"], "Output", + CellChangeTimes->{3.9938284672644863`*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"e9729d02-c804-45ba-a208-169861389a0a"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991849693382303*^9, 3.991849693386299*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ @@ -84,13 +4881,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], + CellLabel->"In[75]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.991339230528511*^9}, - CellLabel-> - "Out[316]=",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[BoxData["1.912822713352366`*^-53"], "Output", + CellChangeTimes->{3.991339230528511*^9, 3.993828467280644*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"e9e59699-791e-4917-b700-fa14f12b1071"] }, Open ]], Cell[CellGroupData[{ @@ -124,14 +4919,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557615205345*^9},ExpressionUUID->"35e76fc7-2f05-694a-b379-\ -67189aa511ad"], + CellChangeTimes->{3.991557615205345*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[BoxData["2.192147584896785`*^-54"], "Output", - CellChangeTimes->{3.991339230554512*^9}, - CellLabel-> - "Out[317]=",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[BoxData["1.9302205333813654`*^-54"], "Output", + CellChangeTimes->{3.991339230554512*^9, 3.993828467292821*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"01a86d51-5bcc-43ea-9669-dfc43a079466"] }, Open ]], Cell[CellGroupData[{ @@ -164,14 +4957,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557618917984*^9, - 3.9915576208320503`*^9}},ExpressionUUID->"a10e19cd-f567-6b4d-a841-\ -5f01117db38b"], + CellChangeTimes->{{3.991557618917984*^9, 3.9915576208320503`*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[BoxData["3.508823705223133`*^-54"], "Output", - CellChangeTimes->{3.9913392305796223`*^9}, - CellLabel-> - "Out[318]=",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[BoxData["3.771241088645294`*^-54"], "Output", + CellChangeTimes->{3.9913392305796223`*^9, 3.993828467299342*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"c1551c76-fb35-4de6-b937-da7354bef20c"] }, Open ]], Cell[CellGroupData[{ @@ -194,13 +4985,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], + CellLabel->"In[78]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[BoxData["44.37747929594205`"], "Output", - CellChangeTimes->{3.9913392305906105`*^9}, - CellLabel-> - "Out[319]=",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[BoxData["45.71671373826242`"], "Output", + CellChangeTimes->{3.9913392305906105`*^9, 3.993828467310316*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"6baff2a8-3952-4216-9b2e-4bc9c40ed8e2"] }, Open ]], Cell[CellGroupData[{ @@ -226,13 +5015,11 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], + CellLabel->"In[79]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[BoxData["102.55835649176893`"], "Output", - CellChangeTimes->{3.99133923061561*^9}, - CellLabel-> - "Out[320]=",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[BoxData["107.40491244359315`"], "Output", + CellChangeTimes->{3.99133923061561*^9, 3.993828467321261*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"c1f49a54-9b66-4a80-9f18-cb2dcfbb695e"] }, Open ]], Cell[CellGroupData[{ @@ -241,13 +5028,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], + CellLabel->"In[80]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[BoxData["0.5630879721742558`"], "Output", - CellChangeTimes->{3.9913392306426105`*^9}, - CellLabel-> - "Out[321]=",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[BoxData["0.01775104012429978`"], "Output", + CellChangeTimes->{3.9913392306426105`*^9, 3.993828467331977*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"6ffbb294-955a-4c7c-aa1e-470a154d375d"] }, Open ]], Cell[CellGroupData[{ @@ -256,13 +5041,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], + CellLabel->"In[81]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[BoxData["1.956498159343112`"], "Output", - CellChangeTimes->{3.99133923065361*^9}, - CellLabel-> - "Out[322]=",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[BoxData["1.8085435966710863`"], "Output", + CellChangeTimes->{3.99133923065361*^9, 3.99382846734361*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"2f4f1a59-460a-4974-9b0d-871ef67fff42"] }, Open ]], Cell[CellGroupData[{ @@ -271,13 +5054,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], + CellLabel->"In[82]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[BoxData["200.65523570140064`"], "Output", - CellChangeTimes->{3.9913392306776104`*^9}, - CellLabel-> - "Out[323]=",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[BoxData["194.24646665087906`"], "Output", + CellChangeTimes->{3.9913392306776104`*^9, 3.993828467356103*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"af5e2ff4-6b0d-46c3-b7cb-97b411f4d497"] }, Open ]], Cell[CellGroupData[{ @@ -286,13 +5067,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], + CellLabel->"In[83]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[BoxData["24.98842482695703`"], "Output", - CellChangeTimes->{3.991339230703802*^9}, - CellLabel-> - "Out[324]=",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[BoxData["0.8115192199190233`"], "Output", + CellChangeTimes->{3.991339230703802*^9, 3.993828467373867*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"443ab060-324a-471a-ad90-8dff3c22df74"] }, Open ]], Cell[CellGroupData[{ @@ -481,13 +5260,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[325]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], + CellLabel->"In[84]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[BoxData["0.01829601703069907`"], "Output", - CellChangeTimes->{3.9913392307297993`*^9}, - CellLabel-> - "Out[325]=",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[BoxData["0.00825555017757141`"], "Output", + CellChangeTimes->{3.9913392307297993`*^9, 3.993828467399953*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"627774fa-a001-4f4e-8c67-82351253858f"] }, Open ]], Cell[CellGroupData[{ @@ -500,13 +5277,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], + CellLabel->"In[85]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.991339230837267*^9}, - CellLabel-> - "Out[326]=",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[BoxData["9.753756963521047`"], "Output", + CellChangeTimes->{3.991339230837267*^9, 3.993828467573279*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"aaf90464-e85d-4cc7-a45f-6eeb7b32ba22"] }, Open ]], Cell[CellGroupData[{ @@ -697,13 +5472,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[327]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], + CellLabel->"In[86]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[BoxData["0.00990105610750653`"], "Output", - CellChangeTimes->{3.9913392308522797`*^9}, - CellLabel-> - "Out[327]=",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[BoxData["0.10392972568339198`"], "Output", + CellChangeTimes->{3.9913392308522797`*^9, 3.993828467674749*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"8de42204-84af-4f84-9f30-a93158d8e4f8"] }, Open ]], Cell[CellGroupData[{ @@ -716,13 +5489,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[328]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], + CellLabel->"In[87]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[BoxData["8.906440683949702`"], "Output", - CellChangeTimes->{3.991339230966341*^9}, - CellLabel-> - "Out[328]=",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[BoxData["2.7490019644152346`"], "Output", + CellChangeTimes->{3.991339230966341*^9, 3.993828467731106*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"e37da5f5-56b5-4681-b53d-77342a5ac74b"] }, Open ]], Cell[CellGroupData[{ @@ -814,13 +5585,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[329]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], + CellLabel->"In[88]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991339230988348*^9}, - CellLabel-> - "Out[329]=",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[BoxData["0.2129709837599123`"], "Output", + CellChangeTimes->{3.991339230988348*^9, 3.993828467748476*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"a0ee92f1-8a0a-4500-8bf4-3c7947e9b5dc"] }, Open ]], Cell[CellGroupData[{ @@ -909,13 +5678,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], + CellLabel->"In[89]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991339231030445*^9}, - CellLabel-> - "Out[330]=",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[BoxData["0.7870290162400877`"], "Output", + CellChangeTimes->{3.991339231030445*^9, 3.99382846776726*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"94066686-07aa-4640-bc8b-d184ba362f0c"] }, Open ]], Cell[CellGroupData[{ @@ -1037,19 +5804,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], + CellLabel->"In[90]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991339231060343*^9}, - CellLabel-> - "Out[331]=",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[BoxData["0.16761434383624746`"], "Output", + CellChangeTimes->{3.991339231060343*^9, 3.99382846778197*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"27f2ae4e-8615-400d-82fb-b69d24f619a1"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"0055f95b-c532-\ -e24d-bdc4-544ea2d2fbd9"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ @@ -1110,68 +5875,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918497046469917`*^9},ExpressionUUID->"574b810b-aa4a-d545-b080-\ -c44fbe83a713"], + CellChangeTimes->{3.9918497046469917`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 332, 325, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310873375`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.070983117181051`*^-101\\\", \ +RowBox[{\\\"\ +374965889271059465545581747778455803963093263903759088685381486711070\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"69\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9172612278061859168189007240401361305600000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 1, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.993828467811893*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], +In[92]:=",ExpressionUUID->"3323beeb-6524-48ef-882b-81705288573f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 332, 326, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310973415`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4624070445581468`*^-102\\\", \ +RowBox[{\\\"\ +199819322392547589189240513391139097931932400334313218360439794268329\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"73\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0850829791647507279219584098854397542400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 2, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.993828467818872*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], +In[92]:=",ExpressionUUID->"88fc00f4-e9c9-4a81-a185-ea4393c02fce"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 332, 327, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339231105339*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.987589054447965`*^-104\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 3, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.993828467822555*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], +In[92]:=",ExpressionUUID->"9ff1235e-02cf-4193-a7c6-d13162d81468"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 332, 328, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392311143417`*^9}, +during this calculation.\"", 2, 92, 4, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.9938284678257923`*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], +In[92]:=",ExpressionUUID->"0ec2609a-e878-4f79-82ba-217009e8f2fa"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.9913392346332226`*^9}, - CellLabel-> - "Out[332]=",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[BoxData["9.75307945274086`"], "Output", + CellChangeTimes->{3.9913392346332226`*^9, 3.993828471938589*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"027c685f-5dc6-463d-af52-4909b546a9d0"] }, Open ]], Cell[CellGroupData[{ @@ -1233,68 +6006,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849710877041*^9},ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-\ -656c90598e75"], + CellChangeTimes->{3.991849710877041*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 333, 329, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234667631*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.070983117181051`*^-101\\\", \ +RowBox[{\\\"\ +374965889271059465545581747778455803963093263903759088685381486711070\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"69\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9172612278061859168189007240401361305600000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 5, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.993828472020735*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], +In[93]:=",ExpressionUUID->"898f884f-56f3-4542-aa8b-1a2c655494cc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 333, 330, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234676628*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4624070445581468`*^-102\\\", \ +RowBox[{\\\"\ +199819322392547589189240513391139097931932400334313218360439794268329\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"73\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0850829791647507279219584098854397542400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 6, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.993828472062619*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], +In[93]:=",ExpressionUUID->"674ef972-9748-4f1a-aa71-1d6d0060c0bf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 333, 331, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234685627*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.987589054447965`*^-104\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 7, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.993828472066922*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], +In[93]:=",ExpressionUUID->"a5803a67-4620-4685-8d6c-de0698736fd3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 333, 332, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133923469363*^9}, +during this calculation.\"", 2, 93, 8, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.9938284720703373`*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], +In[93]:=",ExpressionUUID->"0abdf350-8687-4417-a00d-38e715969dc8"], -Cell[BoxData["8.906440683949707`"], "Output", - CellChangeTimes->{3.99133923819088*^9}, - CellLabel-> - "Out[333]=",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[BoxData["2.7488110145614915`"], "Output", + CellChangeTimes->{3.99133923819088*^9, 3.9938284759787817`*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"96ac6b3c-069d-429a-9614-e6d46cf701cd"] }, Open ]], Cell[CellGroupData[{ @@ -1350,92 +6131,111 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849713921898*^9},ExpressionUUID->"9c540ba7-8bb4-ef46-919c-\ -62296271f174"], + CellChangeTimes->{3.991849713921898*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVknc81f8Xx68ou5JKGsr+ail75Rx7z0pkzyKZ5SeztCOhRCFa+lzZaZAk +GkK2SGRLF9lb+b376z6ej+d5vc55fx5X0Mnb3HUFjUbbykSj/fv1OWMj8K5x +PyY+n7BhHFmNux+f4loEKfRY5i+3CuJGJ5fz03uMpfDeewX2j3bcmCgc98PB +RgqR66mNrgY3Mj/Iyf0YKIUs39fADS5ubLvHOBSXJ4XjZ7a6iaVx4dVEhxQJ +YWkc33OiMKSKEwciDfdarpLBezpLjtVSHLjVwJovcr0M1lcc8/rDz4HmHB60 +EiEZFDnAdEmTiQNLrlxuEAYZtBvMK19fx47xF8sCRv8ngy6VTwaKvdhRM1zh +7aVfMhhWFh0qlsuG9/1ETJ9Xy+JDjpoFCQ1WzP9RGrmpXRaZTjEfl9vFimX6 +tp+Ch2Sxby9vrDUvK/YJ3VZV55BDNh3HrtHeVSjWyLqnVkcOzW06h1UvrcJM +6SH2X2Vy+Fezdta9diW+msor31ooj0LXmn9d9GfBzw7Gy+EV8nhO92NIlB0L +tlUzlHpb5DFU41MtXY8FFx8J59Nn5FH7QLfXfztYUPVwfJqcjAJKhXomSdcw +4/vngaGmOQqov2V1ue9eZqwLAPkLjxWxICWBh3OZCU/WpCSlFiji42g9sS0j +TMghtrRcVK6IV4pUGKrfmVCr+VXFeLci1rxE+XcvmbBIWuqovYAS5jilDWb7 +MuGjMZFQpQQljIjqLBL4RcNAD47ysSvKqLYqJOF+1TJsKDsuzpWojIFJwwLH +Mpchn/9TpPgTZSxduxBscn0ZRirOH7L7oIzb5h6LXzFZBifxP/1VTCqYwZC3 +jW/+C4Z9o2xPglSQiVdyH23wDwjaNRvbeh7AHhC3EBJdgkelaz6dCjqAHrLq +B+s4l0BMWB+irhxA1W/hLYkTi7B7sETy9aMDeEnFl+1M6SLI+VFr+TsOYNzG +wxv8bRfB8FJwQ5ORKqZE+drJJS9AQLaghaEkoMBI9w213fMwt9amxvkAoFC6 +BBP3xnkI9r+tHWwA+PbEn4LR5Tk4q8Apn3EM8BLb57MLjXMQWTbFx5YGuN28 +c0oodA5Mh3qHHdkQ/bzOj9MbZ8F1+UX2tjOIqwuTon7FzMB61i233p1FVOiQ +/FEZPANlq8PPuF5B3HnWgvu92wzsENDRzEpAfPDhQ9wflRloV2n5pvIC8a+g +p+g1xjSYB82y2EwiCvi8FxrXmwbVaXnruyfVMPFTzm4l/ikYWUpC1dNqaGm4 +2ahn1RQks9DEekLUULBUffre1CTM81aMSUSp4X6WiDOH6yahQMryUmGGGmZ7 +l6YVXJmEnT6Bea0/1dDz9fYDYn8mgG/oFSufkzp2CW9vk5oaB4U5jlkFd3UU +8Yt8Z9g/DkdX2g4c9VFHFUmKNeDrOCRvZ/pwL0wdB2Q4PGZejYPQIb0IsSR1 +LG40e5AZNg5733xbkm1Sx50f2GY7ucZB+8bC+CFtDZyxV3j7W3oMjicbdgcY +aaCxkA5rk9gYXKXfq0s8pIGL+XkPPvKPQXW5ek67kwaySQ7sebI8CuZz1zxd +wjUwtbwybcOdUbB13PLT/5UGZqTzSJfX/YZT0irtcTs1MWKiiv+O+QjYyI12 +xuzXRBX3X0enlEdAU/FBb7SCJg6WRje4io4AL7ANXdPWxG9/s1dEzg1Dvn7T +fISTJqYu7Cv8njoMY46efP53NfEufPI7NzEEJ2KSzQ9yaOHmvesPKj9hgPlN +EwszHi3cY8uXJHmTAUq3Vxw12aSFizu/y8uHM4Aj+bijgZgWjs/rbT57hAHU +ExkfDXUtVJ8ulpphY8BASfV16SAtjLe0i3D0/gVOI0sVvAwt1JegWCm9QXj5 +cWaaPq6F7TxD223lBoErbUwI57WwqHE9h5gw8eZ9IZ5s2lhxesPMxNJP4HpV +te+DmDaiv8j9gLyf8DzibmKAszYmOjHr8Aj8BLZNCse/tWtj3c6iqnmWAchS +92dNrdXByuKZhu0r++CUoLXqs686qP5Fb4/QbC+o0DROf+rQQV/qpOv+X71Q +/WZd7+iQDtpP5soHfOmFYYX8EmTTxZnp8N6E272wU3L8dA/q4kK56hXJXb1A +bfHuE80nXLWn9JBtDzya8niXeUsPlxb32n/p6YJv9DuCVsl6KG/lIFLwtQtW +21ecW/lID0OEUkPTK7vgzGdRdbtnevhoZ/XLrPwuML7XVbamQQ+LixU7Nc93 +wbyOxXu/NfoY1vyy4ZoY8UlqnxSu6WMM990kVcYPmFPb9OV9uAGWFNklfLVv +h6nhJ2pGlw3Qs+mOA5dRO4wmyL9ojjbAyeIjnAeV2mFgxCJ1IMUApTYOF6/b +0A5Nd+J92YoN0CVX4a5V1XfIG1+30XDOALmuhjdMK30Hj/vc9o0+hqidPyc5 +LtoGHTTm8W5HIxy4qD0ULN4KhnlnvQePG2GS7vFVnvytUOT4d+S3txEK9dsf +P8bZCrfL5hmLoUbYQDvSHD7aAqYXxvo23DVC1cBcUblXLVDG+qNVr8EIG3N3 +W+UYtED66sLSPHVjbE6S2BsV9BW8tnrHnBM2wbFHt8WapptA/6G0wo5dJtj5 +9cxTo19NILZzrrNEygT5fr57XN/eBB3y5ySX1EzwSdahurnyJjA8eLMmwMEE +cepva1lcE0hce8nlmWKCTGXvXqtINcHEYrjmU05TZHRt0IkIbIRs94rS+Ium +6PHmb6jhjgZozrnPL3LVFEsaTA9/2NgAS9NBfvlRpng/xV1Pi7sBDCL2iNTe +NMWWC1JeRxfqYfBu3GW2B6Z4l9tvtrWpHgSrbYyDS0wx7iHtqmBkPdzaO/7d +YdYU255n/H2+VAdBk/yzu9zNcNfkx+HD/bXQ+ui2y6qTZhjLHP1MtKkW5Cx4 +G7p8zHB/oU3LivJamHjFlRUfaIa1dfHM/Wm14BG27LR82QyVuwVjdGxrwYq9 +v6Yh3Qx/xHY8C2qtAYXtueln+sww3KosV6v1C0zra1t8sjdH1QThgcWFKpD7 +3+SXG87mGCszUcM+UgWBD9O0LI+Z46AF/hbsrIKFxQWZX17m6K48/dSnvAr+ +ZubwcoaZI9XPKX45qgpWreGvN042R77U6UMxO6qAr3HI4GurOXpVx8i2mFSC +onWsWr/ZQQyhznv5fK6ABv4Uj/fSh/DlA/6BGO2PsDn9fDH132E8avF909vZ +cnjVtdPQmNsC5bnfM/MJlYFA09ixgBELjJ5/3awZXwrS8bGZD7uOoMi2xXvO +miWQwjK5N67cEv8nhwbnRl7DCzXJtouFVpiycchHt6gQEuWv8SxlHMXkuNL/ +utpeQu33x5eko6zxUX1RycODL+C5UbKIz1kbDHRNoB53FsD4yYM0LxdbtPld +3Pg1+xlMa0sc/61hhxvWGnHeS88HauTbnL+cPfZULpVU0vPA8v5jZ1suB/Sp +GGfq/pYLz/IN7JkvO2AEzferA28uKG5pmL8674AqzEfPjHVlg3DXsbZ6d0fc +d/p+n+inLOjjPGGS3OuIaYeNkk6+zoS6aGNnncNOuM+uILOt+yncCkzlPF3n +hLm3fiZu3/gUikuW5531nJHWZL2v80QG7H8noyBu4IxdMs/LE90zIL3cPYBh +6IyljKz6g8cyILaiccLH1BkdnH5Y1zhlgFvDk6HQI86Ye29yW7NVBvAMmHQk +uDpjWmbG8n+6xHOnlVadc0b8mBr2UzQD1tjgZeki0t8QcDmjnw471n+q3VpM +5m1O+N7upcO+aqNNq0pIfwS1dL6bDuYq1vTWd2T/Rd1p5w463NoaUBX6mbCj +jrN8Mx02dzxdU9FK5n2fN+36QAcRO75Em1myL4RfRjedDooOv6mLMi541vqh +tuJJOqTfGfM3lnNBh8GxifQTdFjfOKHKp+CCXVOPpzd40OG31mwTpeyCpaW7 +/8y60eHRLhpTtTrhp6u4qx3osHqWx2qdmQvu8IicfHaIDn3XZdlTT7ogFg6v +PHeADmaf5JuOeZP5etfFTSp0KKEppe7zJb54XDVfiQ53/FVly07926+TMyhP +B2MrHcf+YNJ3WGSvqxQdCkWsCnddI/dabPNOFqdD9OsQ91fpJE8l2K3gpcNJ +qQTFQMoFaVvKej7z0MGQnseukEF821Ba3Fo6cCQM0F9mEb/Lq1J8NR0u+pky +XhSQvpCYagd2OoRIiJx4Xkbui13nyE2jg0dClWf+D+KXnU+Z/KZAb/WAil8X +4YS9rQdGKPjvIo1bqoew+U/vPcMUDPjJZuX1k/wmb6W1DAocjVNHcoeJfzMj +19dPgeVKf6+cBbLf6dqTDx0U6Phv9snc6Ioo/FD1ZA0FZamX9OM2Ee542Xby +CwUq1RMigZtd8ey2jd+9qynYJ1r1TUOAcBqDNbCSAv6WYI3voq5Is3rIdecj +BUNKHRs5ZEl+fWHitrcU3FiR9ubYQVcsrVgbKplHAYckV6LRYZJ/a6Frk0vB +BetAP+kjxNN0/a7lUBBYYCq+fJTw12vdjCxyvxtT7G0nMi8uJ1GcQYF0pZPL +B1/C78SV0x5R0BIryikcQ/Zff3Ds5B0KsoH7+GAs4bhIRl0i6R+Zep91k8xv ++nZXlrCU3vswhQTSz6x0fkUCBdE05wmje//eq+uTcYsCbe+0b4GZZH7X78dS +MRRs23ZFTjWbeC7nSeoGBVOV3jeZc4nvLPDcQfiBGBhFPyPe5VbPumgK/nR0 +lD4sIt6ovnVlFAUFhluomgqyb5d1u/AVCiIXVqy8VUnmV9h3ZF6mwIliOFpV +E25ksMkTXstStKWvluTZDTuNL1Hg+dryxvzXf/ktl6MuUCC883aASD/xteX5 +cI6ChZbQxl8D5L0cZw9+P0tB3UXXfTmDZP70/W2BhMO6ZRiKw8TTGvY8D6eg +LbHR1mSSMF1c5UAYBXGsPFpBTG54NlSO+WIwBcUTHdanmN2w1N6xTILwz44M +P6+Vbog3pidqg8j/oUAzzYmd+KdrqB2EBxwCF/V5iE9Y79AYSO431FqnxUt8 +SCx1nrCy/DoJ2ED6dw85yhKO4c60kOZ3Q9qRKbGU/xFf1Jm3RZDkszLmQgMo +cHucWbFBmPh4y4+KhGNiznSuESU84s4ye5rsc+PlZpH4x+H1pwnH8OocH95H +uJct+8IpCor+8oYPSJG+Yfs/BoT7f3XFd8kQL15QvJ6wUmlQeZMC8WVikRn+ +FPR5Zgu8QeLZWd1++lGw2jJY9qU6uZd3k0wRYUUNXcM8TeLFGn2jCUfz95x5 +rEs4UFhFmfArlpyYVH3C4U8qeAn3jgY/uWNI3i/w7P2ILwUKHzc0XzclvKDG +mU7YKa9n6LI56bd/cfgC4evJOSsiDhGfdWuNC+EeP719AZakL/lUvThhbruN +Oj5Hyb0f3L9x/uvT67X1sCGekWM67kPy20Mj7RyID+a/Xkr4FYf+A0sn0tcg +ZZ5BuGd6Y6G5C5mfvXIpnjB3d2+toRvxSXw7IwgrVOcOaB8n+dI2FR/CTi9D +/6AHmc+uKbH/1/9Af72yJ/F/RnNM//Vf59sl60Xy0cprNf71B/apSfoQjs3u +lCPM5ZJnKeFHOFxbYDdheZMwb+FTJC/IVC30r1/J4NK2ANJ/uX1wM+Eo0U0p +fIHEr2k5tZ7wi7X9z3iCiHcd9V5DuHsxr5IzhHyvMJE2zn/9P8O6V4aR/pTT +z9gJyzUYzC2Hk7xpzyIb4f8D54pLaA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -1449,104 +6249,122 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwVknc81f8Xx68ou5JKGsr+ail75Rx7z0pkzyKZ5SeztCOhRCFa+lzZaZAk +GkK2SGRLF9lb+b376z6ej+d5vc55fx5X0Mnb3HUFjUbbykSj/fv1OWMj8K5x +PyY+n7BhHFmNux+f4loEKfRY5i+3CuJGJ5fz03uMpfDeewX2j3bcmCgc98PB +RgqR66mNrgY3Mj/Iyf0YKIUs39fADS5ubLvHOBSXJ4XjZ7a6iaVx4dVEhxQJ +YWkc33OiMKSKEwciDfdarpLBezpLjtVSHLjVwJovcr0M1lcc8/rDz4HmHB60 +EiEZFDnAdEmTiQNLrlxuEAYZtBvMK19fx47xF8sCRv8ngy6VTwaKvdhRM1zh +7aVfMhhWFh0qlsuG9/1ETJ9Xy+JDjpoFCQ1WzP9RGrmpXRaZTjEfl9vFimX6 +tp+Ch2Sxby9vrDUvK/YJ3VZV55BDNh3HrtHeVSjWyLqnVkcOzW06h1UvrcJM +6SH2X2Vy+Fezdta9diW+msor31ooj0LXmn9d9GfBzw7Gy+EV8nhO92NIlB0L +tlUzlHpb5DFU41MtXY8FFx8J59Nn5FH7QLfXfztYUPVwfJqcjAJKhXomSdcw +4/vngaGmOQqov2V1ue9eZqwLAPkLjxWxICWBh3OZCU/WpCSlFiji42g9sS0j +TMghtrRcVK6IV4pUGKrfmVCr+VXFeLci1rxE+XcvmbBIWuqovYAS5jilDWb7 +MuGjMZFQpQQljIjqLBL4RcNAD47ysSvKqLYqJOF+1TJsKDsuzpWojIFJwwLH +Mpchn/9TpPgTZSxduxBscn0ZRirOH7L7oIzb5h6LXzFZBifxP/1VTCqYwZC3 +jW/+C4Z9o2xPglSQiVdyH23wDwjaNRvbeh7AHhC3EBJdgkelaz6dCjqAHrLq +B+s4l0BMWB+irhxA1W/hLYkTi7B7sETy9aMDeEnFl+1M6SLI+VFr+TsOYNzG +wxv8bRfB8FJwQ5ORKqZE+drJJS9AQLaghaEkoMBI9w213fMwt9amxvkAoFC6 +BBP3xnkI9r+tHWwA+PbEn4LR5Tk4q8Apn3EM8BLb57MLjXMQWTbFx5YGuN28 +c0oodA5Mh3qHHdkQ/bzOj9MbZ8F1+UX2tjOIqwuTon7FzMB61i233p1FVOiQ +/FEZPANlq8PPuF5B3HnWgvu92wzsENDRzEpAfPDhQ9wflRloV2n5pvIC8a+g +p+g1xjSYB82y2EwiCvi8FxrXmwbVaXnruyfVMPFTzm4l/ikYWUpC1dNqaGm4 +2ahn1RQks9DEekLUULBUffre1CTM81aMSUSp4X6WiDOH6yahQMryUmGGGmZ7 +l6YVXJmEnT6Bea0/1dDz9fYDYn8mgG/oFSufkzp2CW9vk5oaB4U5jlkFd3UU +8Yt8Z9g/DkdX2g4c9VFHFUmKNeDrOCRvZ/pwL0wdB2Q4PGZejYPQIb0IsSR1 +LG40e5AZNg5733xbkm1Sx50f2GY7ucZB+8bC+CFtDZyxV3j7W3oMjicbdgcY +aaCxkA5rk9gYXKXfq0s8pIGL+XkPPvKPQXW5ek67kwaySQ7sebI8CuZz1zxd +wjUwtbwybcOdUbB13PLT/5UGZqTzSJfX/YZT0irtcTs1MWKiiv+O+QjYyI12 +xuzXRBX3X0enlEdAU/FBb7SCJg6WRje4io4AL7ANXdPWxG9/s1dEzg1Dvn7T +fISTJqYu7Cv8njoMY46efP53NfEufPI7NzEEJ2KSzQ9yaOHmvesPKj9hgPlN +EwszHi3cY8uXJHmTAUq3Vxw12aSFizu/y8uHM4Aj+bijgZgWjs/rbT57hAHU +ExkfDXUtVJ8ulpphY8BASfV16SAtjLe0i3D0/gVOI0sVvAwt1JegWCm9QXj5 +cWaaPq6F7TxD223lBoErbUwI57WwqHE9h5gw8eZ9IZ5s2lhxesPMxNJP4HpV +te+DmDaiv8j9gLyf8DzibmKAszYmOjHr8Aj8BLZNCse/tWtj3c6iqnmWAchS +92dNrdXByuKZhu0r++CUoLXqs686qP5Fb4/QbC+o0DROf+rQQV/qpOv+X71Q +/WZd7+iQDtpP5soHfOmFYYX8EmTTxZnp8N6E272wU3L8dA/q4kK56hXJXb1A +bfHuE80nXLWn9JBtDzya8niXeUsPlxb32n/p6YJv9DuCVsl6KG/lIFLwtQtW +21ecW/lID0OEUkPTK7vgzGdRdbtnevhoZ/XLrPwuML7XVbamQQ+LixU7Nc93 +wbyOxXu/NfoY1vyy4ZoY8UlqnxSu6WMM990kVcYPmFPb9OV9uAGWFNklfLVv +h6nhJ2pGlw3Qs+mOA5dRO4wmyL9ojjbAyeIjnAeV2mFgxCJ1IMUApTYOF6/b +0A5Nd+J92YoN0CVX4a5V1XfIG1+30XDOALmuhjdMK30Hj/vc9o0+hqidPyc5 +LtoGHTTm8W5HIxy4qD0ULN4KhnlnvQePG2GS7vFVnvytUOT4d+S3txEK9dsf +P8bZCrfL5hmLoUbYQDvSHD7aAqYXxvo23DVC1cBcUblXLVDG+qNVr8EIG3N3 +W+UYtED66sLSPHVjbE6S2BsV9BW8tnrHnBM2wbFHt8WapptA/6G0wo5dJtj5 +9cxTo19NILZzrrNEygT5fr57XN/eBB3y5ySX1EzwSdahurnyJjA8eLMmwMEE +cepva1lcE0hce8nlmWKCTGXvXqtINcHEYrjmU05TZHRt0IkIbIRs94rS+Ium +6PHmb6jhjgZozrnPL3LVFEsaTA9/2NgAS9NBfvlRpng/xV1Pi7sBDCL2iNTe +NMWWC1JeRxfqYfBu3GW2B6Z4l9tvtrWpHgSrbYyDS0wx7iHtqmBkPdzaO/7d +YdYU255n/H2+VAdBk/yzu9zNcNfkx+HD/bXQ+ui2y6qTZhjLHP1MtKkW5Cx4 +G7p8zHB/oU3LivJamHjFlRUfaIa1dfHM/Wm14BG27LR82QyVuwVjdGxrwYq9 +v6Yh3Qx/xHY8C2qtAYXtueln+sww3KosV6v1C0zra1t8sjdH1QThgcWFKpD7 +3+SXG87mGCszUcM+UgWBD9O0LI+Z46AF/hbsrIKFxQWZX17m6K48/dSnvAr+ +ZubwcoaZI9XPKX45qgpWreGvN042R77U6UMxO6qAr3HI4GurOXpVx8i2mFSC +onWsWr/ZQQyhznv5fK6ABv4Uj/fSh/DlA/6BGO2PsDn9fDH132E8avF909vZ +cnjVtdPQmNsC5bnfM/MJlYFA09ixgBELjJ5/3awZXwrS8bGZD7uOoMi2xXvO +miWQwjK5N67cEv8nhwbnRl7DCzXJtouFVpiycchHt6gQEuWv8SxlHMXkuNL/ +utpeQu33x5eko6zxUX1RycODL+C5UbKIz1kbDHRNoB53FsD4yYM0LxdbtPld +3Pg1+xlMa0sc/61hhxvWGnHeS88HauTbnL+cPfZULpVU0vPA8v5jZ1suB/Sp +GGfq/pYLz/IN7JkvO2AEzferA28uKG5pmL8674AqzEfPjHVlg3DXsbZ6d0fc +d/p+n+inLOjjPGGS3OuIaYeNkk6+zoS6aGNnncNOuM+uILOt+yncCkzlPF3n +hLm3fiZu3/gUikuW5531nJHWZL2v80QG7H8noyBu4IxdMs/LE90zIL3cPYBh +6IyljKz6g8cyILaiccLH1BkdnH5Y1zhlgFvDk6HQI86Ye29yW7NVBvAMmHQk +uDpjWmbG8n+6xHOnlVadc0b8mBr2UzQD1tjgZeki0t8QcDmjnw471n+q3VpM +5m1O+N7upcO+aqNNq0pIfwS1dL6bDuYq1vTWd2T/Rd1p5w463NoaUBX6mbCj +jrN8Mx02dzxdU9FK5n2fN+36QAcRO75Em1myL4RfRjedDooOv6mLMi541vqh +tuJJOqTfGfM3lnNBh8GxifQTdFjfOKHKp+CCXVOPpzd40OG31mwTpeyCpaW7 +/8y60eHRLhpTtTrhp6u4qx3osHqWx2qdmQvu8IicfHaIDn3XZdlTT7ogFg6v +PHeADmaf5JuOeZP5etfFTSp0KKEppe7zJb54XDVfiQ53/FVly07926+TMyhP +B2MrHcf+YNJ3WGSvqxQdCkWsCnddI/dabPNOFqdD9OsQ91fpJE8l2K3gpcNJ +qQTFQMoFaVvKej7z0MGQnseukEF821Ba3Fo6cCQM0F9mEb/Lq1J8NR0u+pky +XhSQvpCYagd2OoRIiJx4Xkbui13nyE2jg0dClWf+D+KXnU+Z/KZAb/WAil8X +4YS9rQdGKPjvIo1bqoew+U/vPcMUDPjJZuX1k/wmb6W1DAocjVNHcoeJfzMj +19dPgeVKf6+cBbLf6dqTDx0U6Phv9snc6Ioo/FD1ZA0FZamX9OM2Ee542Xby +CwUq1RMigZtd8ey2jd+9qynYJ1r1TUOAcBqDNbCSAv6WYI3voq5Is3rIdecj +BUNKHRs5ZEl+fWHitrcU3FiR9ubYQVcsrVgbKplHAYckV6LRYZJ/a6Frk0vB +BetAP+kjxNN0/a7lUBBYYCq+fJTw12vdjCxyvxtT7G0nMi8uJ1GcQYF0pZPL +B1/C78SV0x5R0BIryikcQ/Zff3Ds5B0KsoH7+GAs4bhIRl0i6R+Zep91k8xv ++nZXlrCU3vswhQTSz6x0fkUCBdE05wmje//eq+uTcYsCbe+0b4GZZH7X78dS +MRRs23ZFTjWbeC7nSeoGBVOV3jeZc4nvLPDcQfiBGBhFPyPe5VbPumgK/nR0 +lD4sIt6ovnVlFAUFhluomgqyb5d1u/AVCiIXVqy8VUnmV9h3ZF6mwIliOFpV +E25ksMkTXstStKWvluTZDTuNL1Hg+dryxvzXf/ktl6MuUCC883aASD/xteX5 +cI6ChZbQxl8D5L0cZw9+P0tB3UXXfTmDZP70/W2BhMO6ZRiKw8TTGvY8D6eg +LbHR1mSSMF1c5UAYBXGsPFpBTG54NlSO+WIwBcUTHdanmN2w1N6xTILwz44M +P6+Vbog3pidqg8j/oUAzzYmd+KdrqB2EBxwCF/V5iE9Y79AYSO431FqnxUt8 +SCx1nrCy/DoJ2ED6dw85yhKO4c60kOZ3Q9qRKbGU/xFf1Jm3RZDkszLmQgMo +cHucWbFBmPh4y4+KhGNiznSuESU84s4ye5rsc+PlZpH4x+H1pwnH8OocH95H +uJct+8IpCor+8oYPSJG+Yfs/BoT7f3XFd8kQL15QvJ6wUmlQeZMC8WVikRn+ +FPR5Zgu8QeLZWd1++lGw2jJY9qU6uZd3k0wRYUUNXcM8TeLFGn2jCUfz95x5 +rEs4UFhFmfArlpyYVH3C4U8qeAn3jgY/uWNI3i/w7P2ILwUKHzc0XzclvKDG +mU7YKa9n6LI56bd/cfgC4evJOSsiDhGfdWuNC+EeP719AZakL/lUvThhbruN +Oj5Hyb0f3L9x/uvT67X1sCGekWM67kPy20Mj7RyID+a/Xkr4FYf+A0sn0tcg +ZZ5BuGd6Y6G5C5mfvXIpnjB3d2+toRvxSXw7IwgrVOcOaB8n+dI2FR/CTi9D +/6AHmc+uKbH/1/9Af72yJ/F/RnNM//Vf59sl60Xy0cprNf71B/apSfoQjs3u +lCPM5ZJnKeFHOFxbYDdheZMwb+FTJC/IVC30r1/J4NK2ANJ/uX1wM+Eo0U0p +fIHEr2k5tZ7wi7X9z3iCiHcd9V5DuHsxr5IzhHyvMJE2zn/9P8O6V4aR/pTT +z9gJyzUYzC2Hk7xpzyIb4f8D54pLaA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0., 3.792927480847265}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -1558,130 +6376,147 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.792927480847265}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{115.12306105754327`, - 253.30690491292427`}, {-15.402138689748952`, 5.769736310251048}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwVknc81f8Xx68ou5JKGsr+ail75Rx7z0pkzyKZ5SeztCOhRCFa+lzZaZAk +GkK2SGRLF9lb+b376z6ej+d5vc55fx5X0Mnb3HUFjUbbykSj/fv1OWMj8K5x +PyY+n7BhHFmNux+f4loEKfRY5i+3CuJGJ5fz03uMpfDeewX2j3bcmCgc98PB +RgqR66mNrgY3Mj/Iyf0YKIUs39fADS5ubLvHOBSXJ4XjZ7a6iaVx4dVEhxQJ +YWkc33OiMKSKEwciDfdarpLBezpLjtVSHLjVwJovcr0M1lcc8/rDz4HmHB60 +EiEZFDnAdEmTiQNLrlxuEAYZtBvMK19fx47xF8sCRv8ngy6VTwaKvdhRM1zh +7aVfMhhWFh0qlsuG9/1ETJ9Xy+JDjpoFCQ1WzP9RGrmpXRaZTjEfl9vFimX6 +tp+Ch2Sxby9vrDUvK/YJ3VZV55BDNh3HrtHeVSjWyLqnVkcOzW06h1UvrcJM +6SH2X2Vy+Fezdta9diW+msor31ooj0LXmn9d9GfBzw7Gy+EV8nhO92NIlB0L +tlUzlHpb5DFU41MtXY8FFx8J59Nn5FH7QLfXfztYUPVwfJqcjAJKhXomSdcw +4/vngaGmOQqov2V1ue9eZqwLAPkLjxWxICWBh3OZCU/WpCSlFiji42g9sS0j +TMghtrRcVK6IV4pUGKrfmVCr+VXFeLci1rxE+XcvmbBIWuqovYAS5jilDWb7 +MuGjMZFQpQQljIjqLBL4RcNAD47ysSvKqLYqJOF+1TJsKDsuzpWojIFJwwLH +Mpchn/9TpPgTZSxduxBscn0ZRirOH7L7oIzb5h6LXzFZBifxP/1VTCqYwZC3 +jW/+C4Z9o2xPglSQiVdyH23wDwjaNRvbeh7AHhC3EBJdgkelaz6dCjqAHrLq +B+s4l0BMWB+irhxA1W/hLYkTi7B7sETy9aMDeEnFl+1M6SLI+VFr+TsOYNzG +wxv8bRfB8FJwQ5ORKqZE+drJJS9AQLaghaEkoMBI9w213fMwt9amxvkAoFC6 +BBP3xnkI9r+tHWwA+PbEn4LR5Tk4q8Apn3EM8BLb57MLjXMQWTbFx5YGuN28 +c0oodA5Mh3qHHdkQ/bzOj9MbZ8F1+UX2tjOIqwuTon7FzMB61i233p1FVOiQ +/FEZPANlq8PPuF5B3HnWgvu92wzsENDRzEpAfPDhQ9wflRloV2n5pvIC8a+g +p+g1xjSYB82y2EwiCvi8FxrXmwbVaXnruyfVMPFTzm4l/ikYWUpC1dNqaGm4 +2ahn1RQks9DEekLUULBUffre1CTM81aMSUSp4X6WiDOH6yahQMryUmGGGmZ7 +l6YVXJmEnT6Bea0/1dDz9fYDYn8mgG/oFSufkzp2CW9vk5oaB4U5jlkFd3UU +8Yt8Z9g/DkdX2g4c9VFHFUmKNeDrOCRvZ/pwL0wdB2Q4PGZejYPQIb0IsSR1 +LG40e5AZNg5733xbkm1Sx50f2GY7ucZB+8bC+CFtDZyxV3j7W3oMjicbdgcY +aaCxkA5rk9gYXKXfq0s8pIGL+XkPPvKPQXW5ek67kwaySQ7sebI8CuZz1zxd +wjUwtbwybcOdUbB13PLT/5UGZqTzSJfX/YZT0irtcTs1MWKiiv+O+QjYyI12 +xuzXRBX3X0enlEdAU/FBb7SCJg6WRje4io4AL7ANXdPWxG9/s1dEzg1Dvn7T +fISTJqYu7Cv8njoMY46efP53NfEufPI7NzEEJ2KSzQ9yaOHmvesPKj9hgPlN +EwszHi3cY8uXJHmTAUq3Vxw12aSFizu/y8uHM4Aj+bijgZgWjs/rbT57hAHU +ExkfDXUtVJ8ulpphY8BASfV16SAtjLe0i3D0/gVOI0sVvAwt1JegWCm9QXj5 +cWaaPq6F7TxD223lBoErbUwI57WwqHE9h5gw8eZ9IZ5s2lhxesPMxNJP4HpV +te+DmDaiv8j9gLyf8DzibmKAszYmOjHr8Aj8BLZNCse/tWtj3c6iqnmWAchS +92dNrdXByuKZhu0r++CUoLXqs686qP5Fb4/QbC+o0DROf+rQQV/qpOv+X71Q +/WZd7+iQDtpP5soHfOmFYYX8EmTTxZnp8N6E272wU3L8dA/q4kK56hXJXb1A +bfHuE80nXLWn9JBtDzya8niXeUsPlxb32n/p6YJv9DuCVsl6KG/lIFLwtQtW +21ecW/lID0OEUkPTK7vgzGdRdbtnevhoZ/XLrPwuML7XVbamQQ+LixU7Nc93 +wbyOxXu/NfoY1vyy4ZoY8UlqnxSu6WMM990kVcYPmFPb9OV9uAGWFNklfLVv +h6nhJ2pGlw3Qs+mOA5dRO4wmyL9ojjbAyeIjnAeV2mFgxCJ1IMUApTYOF6/b +0A5Nd+J92YoN0CVX4a5V1XfIG1+30XDOALmuhjdMK30Hj/vc9o0+hqidPyc5 +LtoGHTTm8W5HIxy4qD0ULN4KhnlnvQePG2GS7vFVnvytUOT4d+S3txEK9dsf +P8bZCrfL5hmLoUbYQDvSHD7aAqYXxvo23DVC1cBcUblXLVDG+qNVr8EIG3N3 +W+UYtED66sLSPHVjbE6S2BsV9BW8tnrHnBM2wbFHt8WapptA/6G0wo5dJtj5 +9cxTo19NILZzrrNEygT5fr57XN/eBB3y5ySX1EzwSdahurnyJjA8eLMmwMEE +cepva1lcE0hce8nlmWKCTGXvXqtINcHEYrjmU05TZHRt0IkIbIRs94rS+Ium +6PHmb6jhjgZozrnPL3LVFEsaTA9/2NgAS9NBfvlRpng/xV1Pi7sBDCL2iNTe +NMWWC1JeRxfqYfBu3GW2B6Z4l9tvtrWpHgSrbYyDS0wx7iHtqmBkPdzaO/7d +YdYU255n/H2+VAdBk/yzu9zNcNfkx+HD/bXQ+ui2y6qTZhjLHP1MtKkW5Cx4 +G7p8zHB/oU3LivJamHjFlRUfaIa1dfHM/Wm14BG27LR82QyVuwVjdGxrwYq9 +v6Yh3Qx/xHY8C2qtAYXtueln+sww3KosV6v1C0zra1t8sjdH1QThgcWFKpD7 +3+SXG87mGCszUcM+UgWBD9O0LI+Z46AF/hbsrIKFxQWZX17m6K48/dSnvAr+ +ZubwcoaZI9XPKX45qgpWreGvN042R77U6UMxO6qAr3HI4GurOXpVx8i2mFSC +onWsWr/ZQQyhznv5fK6ABv4Uj/fSh/DlA/6BGO2PsDn9fDH132E8avF909vZ +cnjVtdPQmNsC5bnfM/MJlYFA09ixgBELjJ5/3awZXwrS8bGZD7uOoMi2xXvO +miWQwjK5N67cEv8nhwbnRl7DCzXJtouFVpiycchHt6gQEuWv8SxlHMXkuNL/ +utpeQu33x5eko6zxUX1RycODL+C5UbKIz1kbDHRNoB53FsD4yYM0LxdbtPld +3Pg1+xlMa0sc/61hhxvWGnHeS88HauTbnL+cPfZULpVU0vPA8v5jZ1suB/Sp +GGfq/pYLz/IN7JkvO2AEzferA28uKG5pmL8674AqzEfPjHVlg3DXsbZ6d0fc +d/p+n+inLOjjPGGS3OuIaYeNkk6+zoS6aGNnncNOuM+uILOt+yncCkzlPF3n +hLm3fiZu3/gUikuW5531nJHWZL2v80QG7H8noyBu4IxdMs/LE90zIL3cPYBh +6IyljKz6g8cyILaiccLH1BkdnH5Y1zhlgFvDk6HQI86Ye29yW7NVBvAMmHQk +uDpjWmbG8n+6xHOnlVadc0b8mBr2UzQD1tjgZeki0t8QcDmjnw471n+q3VpM +5m1O+N7upcO+aqNNq0pIfwS1dL6bDuYq1vTWd2T/Rd1p5w463NoaUBX6mbCj +jrN8Mx02dzxdU9FK5n2fN+36QAcRO75Em1myL4RfRjedDooOv6mLMi541vqh +tuJJOqTfGfM3lnNBh8GxifQTdFjfOKHKp+CCXVOPpzd40OG31mwTpeyCpaW7 +/8y60eHRLhpTtTrhp6u4qx3osHqWx2qdmQvu8IicfHaIDn3XZdlTT7ogFg6v +PHeADmaf5JuOeZP5etfFTSp0KKEppe7zJb54XDVfiQ53/FVly07926+TMyhP +B2MrHcf+YNJ3WGSvqxQdCkWsCnddI/dabPNOFqdD9OsQ91fpJE8l2K3gpcNJ +qQTFQMoFaVvKej7z0MGQnseukEF821Ba3Fo6cCQM0F9mEb/Lq1J8NR0u+pky +XhSQvpCYagd2OoRIiJx4Xkbui13nyE2jg0dClWf+D+KXnU+Z/KZAb/WAil8X +4YS9rQdGKPjvIo1bqoew+U/vPcMUDPjJZuX1k/wmb6W1DAocjVNHcoeJfzMj +19dPgeVKf6+cBbLf6dqTDx0U6Phv9snc6Ioo/FD1ZA0FZamX9OM2Ee542Xby +CwUq1RMigZtd8ey2jd+9qynYJ1r1TUOAcBqDNbCSAv6WYI3voq5Is3rIdecj +BUNKHRs5ZEl+fWHitrcU3FiR9ubYQVcsrVgbKplHAYckV6LRYZJ/a6Frk0vB +BetAP+kjxNN0/a7lUBBYYCq+fJTw12vdjCxyvxtT7G0nMi8uJ1GcQYF0pZPL +B1/C78SV0x5R0BIryikcQ/Zff3Ds5B0KsoH7+GAs4bhIRl0i6R+Zep91k8xv ++nZXlrCU3vswhQTSz6x0fkUCBdE05wmje//eq+uTcYsCbe+0b4GZZH7X78dS +MRRs23ZFTjWbeC7nSeoGBVOV3jeZc4nvLPDcQfiBGBhFPyPe5VbPumgK/nR0 +lD4sIt6ovnVlFAUFhluomgqyb5d1u/AVCiIXVqy8VUnmV9h3ZF6mwIliOFpV +E25ksMkTXstStKWvluTZDTuNL1Hg+dryxvzXf/ktl6MuUCC883aASD/xteX5 +cI6ChZbQxl8D5L0cZw9+P0tB3UXXfTmDZP70/W2BhMO6ZRiKw8TTGvY8D6eg +LbHR1mSSMF1c5UAYBXGsPFpBTG54NlSO+WIwBcUTHdanmN2w1N6xTILwz44M +P6+Vbog3pidqg8j/oUAzzYmd+KdrqB2EBxwCF/V5iE9Y79AYSO431FqnxUt8 +SCx1nrCy/DoJ2ED6dw85yhKO4c60kOZ3Q9qRKbGU/xFf1Jm3RZDkszLmQgMo +cHucWbFBmPh4y4+KhGNiznSuESU84s4ye5rsc+PlZpH4x+H1pwnH8OocH95H +uJct+8IpCor+8oYPSJG+Yfs/BoT7f3XFd8kQL15QvJ6wUmlQeZMC8WVikRn+ +FPR5Zgu8QeLZWd1++lGw2jJY9qU6uZd3k0wRYUUNXcM8TeLFGn2jCUfz95x5 +rEs4UFhFmfArlpyYVH3C4U8qeAn3jgY/uWNI3i/w7P2ILwUKHzc0XzclvKDG +mU7YKa9n6LI56bd/cfgC4evJOSsiDhGfdWuNC+EeP719AZakL/lUvThhbruN +Oj5Hyb0f3L9x/uvT67X1sCGekWM67kPy20Mj7RyID+a/Xkr4FYf+A0sn0tcg +ZZ5BuGd6Y6G5C5mfvXIpnjB3d2+toRvxSXw7IwgrVOcOaB8n+dI2FR/CTi9D +/6AHmc+uKbH/1/9Af72yJ/F/RnNM//Vf59sl60Xy0cprNf71B/apSfoQjs3u +lCPM5ZJnKeFHOFxbYDdheZMwb+FTJC/IVC30r1/J4NK2ANJ/uX1wM+Eo0U0p +fIHEr2k5tZ7wi7X9z3iCiHcd9V5DuHsxr5IzhHyvMJE2zn/9P8O6V4aR/pTT +z9gJyzUYzC2Hk7xpzyIb4f8D54pLaA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "PlotRange" -> {{0, 180}, {0., 3.792927480847265}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -1691,7 +6526,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5986424829233548}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -1719,7 +6555,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.792927480847265}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -1727,9 +6564,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991339493274267*^9}, - CellLabel-> - "Out[334]=",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] + CellChangeTimes->{3.991339493274267*^9, 3.9938288120934763`*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"86aa8ce8-06e4-4dbe-b21e-1cdf5a81e8d0"] }, Open ]], Cell[CellGroupData[{ @@ -1792,262 +6628,181 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849724783457*^9},ExpressionUUID->"6e33cb28-ef1e-1547-b52d-\ -2171e7786920"], + CellChangeTimes->{3.991849724783457*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2261575897868585`*^-267\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 335, - 333, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493498577*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.6494228768917945`*^-243\\\", \ +\\\"67615075532642592962076366156210530912566907412833894400000000000000\\\"]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 95, 9, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.993828812360921*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], +In[95]:=",ExpressionUUID->"00f9d322-cfff-4343-aecb-71946cd7cc37"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.273330099721687`*^-279\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 335, 334, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493508564*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.083018437727203`*^-251\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 10, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.993828812365058*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], +In[95]:=",ExpressionUUID->"ae997dc3-d045-4138-933c-59aedd91241c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.013344112917215`*^-290\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 335, 335, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493517563*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0790403780763925`*^-258\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 11, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.9938288123693*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], +In[95]:=",ExpressionUUID->"f880f2d2-ba9c-406e-b4d4-b394670b2920"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 335, 336, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493525564*^9}, +during this calculation.\"", 2, 95, 12, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.993828812372768*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], +In[95]:=",ExpressionUUID->"a4c1e17a-db3d-4dd5-bf1f-a59922f0f308"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8fB3CRaMne7rAqGcm83Ov9tmdCSYTMaAkJKZlJqK/RoChJGoR7 +TymjCElDQzJLQpJkKxX5nd9f5/H845zzOefzfr3f59B9Djr5c3NxcRkv4eL6 +//Fn77NGxdRCI2Of605+98yN2i5LHjHujIf9J1wj278pAIq99pHszITqP2KO +N79pQbjD7Q6ezgLg43y+dfKbKQiNSWT+7uDAk4yd/I7ftsKnGvuDMx31sCOy +LSF32BcsFEc+Tna0QpeB452PXw7B7w69cxMd/XA01OPceHcCNJjeKHxbMA1m +j3OL8PhZkP1UOeSjugBVS2J7Tf/lgej+Xbf5THlQuzH5t0rANcjUtKi2d+bH +ySUbcpJbb0BX9sa6ScHVuOoAr4dwajGkFsa85pYSwsessAR7kTKw0d4jLKYg +hG8GS08K08qAv9HJea2aEA4eyqpvUS2DxAGlHltjIbz58nrreosyOCb/cujs +HiG8kDIkGRlZBkH5kv+Uq4Qw74+k1r6eMnDMZava7hRGlye3BO03l4PE2YFT +WXki+KF1qf3Hf+UgueFe4lyRCL7pPFjcwMMG6fqkGI9yEbwKPVxF/GygTKw/ +vLZBBO3KQzI8hdmgZBfsVT0sgiYjKgZXlNigtXRBd0BLFKs+BGp52rJhS5j4 +4Kbnojix86Tf6yw2OKwc7r3wThRHby1t1spmg1NBZdf8B1FUDAkXPZvLhu1v +3F83jYuiqVztbqvrbPBQvVblJiaG1zynhmIq2LBvUCMj3ksMrWn7V6p0suHk +Nmuj1p9iGGD1pj9QkgPSd19Jcy8RR19WpmeeLAdKRbb90lwpjpeHWrlaaBxo +b/Usz6CK47WN4/fl1nNA0TFM3tFKHCPv948kMjhQv/nKsjc54rgtWZG115UD +Cxazr1qYEpjfHtDy3zkOpBdFFS9YSKCL9o9363LI85dxJas5SiBf4dhCTS4H +7J6sMD7tL4HzuRk17dc4cNGURtidkUD6msUvr9kc0EfbCy8+SeBfjcMLnS85 +cIhxddezeElMlzC3sVzkgE2+wIxtmiTezGeYCHMTIM93LPnVOUmU2qPA3bWU +gDdt29nvbkris9st3a4rCFAPXsXT+0oSZ70yf64TI2C4KKJoSloK/UaixBbW +E1C7+ovBYUUpTJt4V5KoSsD5MKfXv9SksKilRJBfgwBzE7W5eZTCY8I6wK1N +QMHHfmu+ACk0n9tq3MgiwF3U/ocMIYV/C8xUYxwI0DpaHXe5Rgpjxj5UNDgR +sKJ/nTi9SQrXM+ZFljoTUFnGA8pdUri5JdEy0pUAcdvK9I2LUjgtwZ2v7kOu +P05R29xWGtMlT0W/CyXAbPxPVNCANOp0Zu5fkkHAEauzKo9HpXFIqj3kQSYB +pVfVukV+SqNH7dKEfWcJkNzmxajkl8Ed1ntfPLlAwOiDJ7941GXQs+/kUtvL +BGTFp4flRMrg487qvOzbBDT3rFccjZPBhKPJNwVLCJjXbnhnlCqDf1pHmhPv +ELD76+ymwTwZTHy7bLN3OQEGdjsn1RtkMNVyPuz7PQL6xZSDGlfL4sPQz91m +dQRIHKyVk5CQxcqPG/47/pgAu+YdLXtosljjMuV7t56AiqhU1TVastjp0BEi ++oSAlE8TI647ZFH463GtomfkfuinXCzxlsV1vyhcj58TMJOhYLO4VxYHCunT +HS8I8DTbfqswWhadz+zY8qeFgE23qgPGC2SxeaXwT8FWAgK4nSVMSmRxrZHZ +ytXvCMjdOdZ09p4sJrSs2MzbRsAyAbqyQbMsZn5PcB15T0B3aNJg4g9ZVGkr +LUnqIiCO6egtrS+Hu/NHpvn7CLDyvDylZyKH8U/OWneSFoj9nuBsJ4d37b6r +XftMXr/hRFG6lxyKFa+8sWGAgAc2Vd+XnZLDydTQKL4hAmL280UrZslhZUeL +H0Ha4sw2AZM8OfQ91TXk9pWAtrdjG6PZcsgeya/IHSZgYodC+HSXHPZRLl3/ +PkLA/ahgPqFBOVwRKx0U9p2A47kPs9XH5PAJu7RjjvSqPpfqPdwUVBkYyJwZ +JeDdkut2J1dRMLZ6fGjfDwIuKkx9LBSnYIHIUF8v6bUBaVx9KhQk/kW8uD9G +wFhyV8aCNgVnBVIeyY0TcPe2soIMUDDkwiH3GNImY3Xm27dS0OjLszydCQKW +Cwp0HPKgoPqtB6YppN9o7gzMCKCgZV98Tjdpz8OzKS+PUrBh80PXoEkClC6Y +yI6coKBjX1UTe/L/9fjfHb50Clrklg5PkCa6PxgpXaTgb6K/bsMUAVHz69+Y +FFJwqLbAwYe0MSXC26uUgtEPDXPOkubHxqnoBxT8t3r+Uj3pV95CiZfqKeh5 +WMttlPS5BE+xypcUpEtpvReaJvN5vbiovZ2CGjGbBbRIyz+d05vpo2BtWvsy +B9Lfhs2fCX2noMIJhbpA0uUrstw0Zin4gD/VMJp0hGrfd7tFCl4V8Y86TdrI +Xi1673IqvpxfcTyHNG9wlECyCBUvh3VYXiX9MuPpletyVBxLUO4qJJ1FiGo2 +rKXi8xRnrf/b7b13fZ8mFb2hweUKafqv0q3/DKnYVPLa8jzpYcn5QRkLKg5q +flh6inSZgXU4w4GKirG26RGkw93P87m4UTH5Ytx3b9LM4wPZYX5UtG4bkLAi +zZO/USUziIqVrzvFVUg/fxxdXRZJxfXRzd/4SKcPPLdriaciW0o28zP5vlx4 +JXtH0qi4XN1I6D5pylr/g/wXqLjl9MXAZNJfrDhcylepOLX1co4z6ZK9ixmm +xVQMH7p/nULaoDTn7vFaKkb6jG4rJPfTrOPVwlgz+fyb8vP8SdtzLbXc1UpF +v/LzWxRI+zoFdcEXKkaE8s1kkfUSdPSafPkYFYV+fR62IB1Z2LmPNkfFJ0W1 +tj/J+rM4So+J5aVhTMAWLxvSL9bUXNNfQcO3sEd0nKxfh8LtzRMCNNR742yY +TnpnS6qQtyQNm/pjh56S9R5M/XnNeAMNn3+zaFtF5mOWSG/+rUFDtqSk8Tky +P1FWG36wtWmYdOCkijTpEyFeuvJGNBRM0IuUIvN3seF5M7cjDYvs39DHyLxS +d/j/qHKmYbFVzPn/57dwdFHokBsNNya9zWgg810mprNzwJeG6TKH6KlfCGgM +uPKjIZyGc5E+zRP9BFjPM4SPHaXh7U0fzxmTfpXepqsdS0MbC/2ZM2Q/6apc +Hlt4ioY3zB4FUsl+M7YyTPhELg0/6sQ6S3wk+3u5lZ5FPQ2t31r7+bUTkGc2 +sPNfEw3Fly5+OE72M/mu6NiKF+T9asr+niP7nRo38Uz5PQ3bPu/eWEX2R5Nt +cu58wzTcPbQ6r/sVAfvnJmObV9NRNqbr7rEmcj9DdosPCdNx9GGTow3Zn/lH +uot5JOm41WefpGgjAdd7GtqN5On4Rubn+lyyv/c+Oqd6T5eOjCT+9OM1BGw5 +wei8uouOZypl/p5mk/X0786BWj86Fu6vW0El58douDzPxz10FF8371VSSkBy +4Ep1yTA6hhtlDlcXE1Bn+zHhTDK5Hu9PF0qvk/1dOE7jKJuOhjRVicFsArhS +ZxuzK+iYe6YgyICcb6949rpVVNNRTyJG5fQ5AvbNOp2YfELHP6Pz7WvJ+VjY +qdgT0E1HJx6m/qZUct5eaU7axiOPqL34NPcYAb83CPaqOcvjpeRvN9rdCfiZ +Jx2n5SaP96tv0p+6kfNnjZIiY5c8ak+LeNzdQe7HNGOv2R55vDEeRjuxjZx/ +1b4/3aLl8Wu5pgCXHZk32/sCydfl8SavrLqHAVk/+zyhf1YeWzcE9D8WJfNa +XJJ//rwC9ipFf7tax4EeWvEV80sK6LkxJIv7EQeizt+6PHNFAWfGgzq8qjlw +P64o1+mWAq6Z4tUWr+DAph352QI1CiiWoXjAr5gD63nPpid9VsBNaYu26eT3 +l/iuo7HhqorIdg9U1wzkwKSwjdf2ekVMa20pmV7GgcE0r+2hfMoYw/q8s1KK +DdbjEdZfdNdiet2Wqa/0chj15T90N2YdZlesTFFZUkp+30twn6xfj/01Ipbm +pcUg3KJ8pnxcBXU/7Myci7gFssllDrq6qvjM1DVuWugGZG9gCIoEqOHf2fDE +5N5CeC5trDOdoY6szAxzy6cFYCBbn67RroHBLxuzPuXmgwBPQZh3/EbsMOfN +4OzNA0oclemqrInSD65+3J+VA8uV3Cucnmqi65aetd/lzoM6S6oswmMTflqQ +SKtQy4LQXuEGGy4tvLBt9WyjfTqMT6c5W2dr4ckAtc2O7algqdF00VpNG7dJ +9Mgm3TkJj6YN//56pY1nT9wqPPogAYJUN3W/9dfBS+VJbzsTYoE15tfmulwX +A0dHpEJWHwVzRcnNqwt0kXvktek+u3BYF5sSWa+nh2YmUnpSzqFQY3id185A +D9V2zUzamIeCw6/azPdMPfQoNFNO1gmFyKDZkmFjPZTcVNevKB4Kze5enwXs +9PACf/3iUEcIBDJ0bXZ66WFufl5oskcI3Jr6LDOTrIdePUa1YiHBoOLPqFXq +1kMVlUtJosEH4D95+z8JH/QQd13QOOdyAGY++ej09+phyrZg5lo4AI/c0oov +D+ghL5XfPUbgADg5fLog8UMPX/nFFf+7sx+OGJ4IXs6lj63LV7lqTuyDZqG3 +9B9K+mgQf7VbKW4v+D8KTLwboo/u8+Matu8CYOzASIR5mD46NZzRXvswACLl +9u9rD9dHYxPLX6I3AiDl2EGnuaP6eO3trhSlowFQbhBOYybp49KNcWVSigEw +X5FQ03BRH0MufTYzO7IbMssuz7Q26GNNIGPIeaM/1Oa3+U2KMbDt7OJp4dc+ +0GdH3xUuyUBNH6Mq94c+wPX7gOtfaQYaP/QOulfsAyaOfPa8NAYe3j1pmZns +A01LDPSkVBj47YbD3TkTH3jpc2W5sREDa/l/UIOrvKFbcW9p+m4GGlF8458S +XjBzc/GXxn0GvimJ19HI9YCh7Rb5pyoZGHnTL8YnzgM6l562Gqhm4CCmyRXv +9oBqL+mc83UMfFDzgXJM0wPiJXUMFp4x0DNQo1ym2R0Ek/cee/6BgeHXWL/M +fu8E1YD3XP7cBnjgNt/Nvr1u4KtUvPziZgMkZCTcnJNdIOqJ515lBwN0Sxnf +nBvsAun+wi84TgbY5boYOrfDBWquH0l74WKAU13HhCbWu4CostWaBW8DTDz9 +aqj75XZoUv4i6hVugG1fDplniG8HlXVUmvIVA0y9nEIXq9wGkypZupwJA7zn +Jaelp+cEnS/RXGTaAMXvtFdmKTlBXdDY1rBZAxzj9Y1dFHGCMxzrEN0/Bhg9 +p5W/dNIRVAy4Sqp4DDFC7dlUQ7Ej+FgfoDeIG6I+57D+akVHaAuwXNXGNMTG +iuENx6kO8KDw7+fZZENMDr69SyrGDnRNw37ZpBqiqz3PgouvHdz7PLoq/7Qh +Jt15MVhqaQccSq+eTaYh8mpn21wXtIOS7LrTly8Z4gvBqRDONVvITzvBsCw1 +xF1Wa/YYvbKBU2FrMrLfGaLq05wf+drWwC+SXPTjvSGeF7hh2CRjDUlsrhqT +TkNMLb5xZQmPNSSOTQ6NfjDE73Ul/lVvreB4YBvTeMgQT+xYL7Qp2ApC3XOG +v82R9/ONN9nAtgQ3MwU0pDAxo39wWauJBSy08Qs00Jg4TD10776KBeT7j/XY +KDCxYeb277vCFjCUVBnhto6JGnu+Ts32m0Posy1lRzYxMbGQGfVfojmk2B+j +PLBgYu4SrvNrXppB1Y7389oHmZizRvxMzT5T8PhW9bwmhIkCdpWSB7ebAldU +frZZGBML/ATe6hqbgsWlfdrbjjBRkGocxythCq0fl+w/lMDE7NzaT3kNJjDi +o97DvsBE6d4fj27TTEDmwMlK9TomBtzKHXvwDeHM4m6d1Hom7hQWzdboRODO +tGB/bWQiMSzYXNGEMFLBeyv/GRNHH48l/ryGUMWVmC38jonTz1NnGbsQ3M7G +Rvz8wkTxhO/vT7EBsquP6DxaycIe07kMuTIWrLJ3ZUsLsNBySdnw3H8siO3T +V4sQZOED3x1Lp4JZEMg7p7hRjIWTbhuUWVos0NsSLlpAYeHJUaardiUT2vtD +p09osvDPPfvP6c8NQWzFfvZmFxY+zGJSXbkNoNA0OmrClYUSJYNppwYYsCn6 +jGmWOwsj/Tc79DQywH6i/H2nNwuXqZbs6D/JgKT22d+++1kIkca/otYwYK4g +xiQqjoVyFj1/qxT1odsw611RMQsL947XXdmtC4GHC3OtS1nk/2nml0e2uvCz +9J7/aDkLT/kPZfzdqAvC8p2/NCtY+EmUKdDyVwds+eVkH9axsExe6VBLpg7U +tBX5vXvPQtOP6ms3NGmDjcADtfBOFj5TWxsqdkcbOi2f/ZTsYSFvDvlXfVYb +Zqq+J3v2sfB0hGN8lI82qF3deOfbCAvFG6+tiuPShppu4/C0HywMSkxMsBjW +AhvRraAxwcIWVsCQ8hst2H3y8NuwWXL9h6J49fO1YKYu6aLEHAsbPyWlBSZr +QfyfC75Vf8j18W8+RwRrgaD2LVWPBRZOF4fySrlqweUDVbOLiyzsrSHqs421 +4H9FRTB+ "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2061,221 +6816,137 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwV13c8Vf8fB3CRaMne7rAqGcm83Ov9tmdCSYTMaAkJKZlJqK/RoChJGoR7 +TymjCElDQzJLQpJkKxX5nd9f5/H845zzOefzfr3f59B9Djr5c3NxcRkv4eL6 +//Fn77NGxdRCI2Of605+98yN2i5LHjHujIf9J1wj278pAIq99pHszITqP2KO +N79pQbjD7Q6ezgLg43y+dfKbKQiNSWT+7uDAk4yd/I7ftsKnGvuDMx31sCOy +LSF32BcsFEc+Tna0QpeB452PXw7B7w69cxMd/XA01OPceHcCNJjeKHxbMA1m +j3OL8PhZkP1UOeSjugBVS2J7Tf/lgej+Xbf5THlQuzH5t0rANcjUtKi2d+bH +ySUbcpJbb0BX9sa6ScHVuOoAr4dwajGkFsa85pYSwsessAR7kTKw0d4jLKYg +hG8GS08K08qAv9HJea2aEA4eyqpvUS2DxAGlHltjIbz58nrreosyOCb/cujs +HiG8kDIkGRlZBkH5kv+Uq4Qw74+k1r6eMnDMZava7hRGlye3BO03l4PE2YFT +WXki+KF1qf3Hf+UgueFe4lyRCL7pPFjcwMMG6fqkGI9yEbwKPVxF/GygTKw/ +vLZBBO3KQzI8hdmgZBfsVT0sgiYjKgZXlNigtXRBd0BLFKs+BGp52rJhS5j4 +4Kbnojix86Tf6yw2OKwc7r3wThRHby1t1spmg1NBZdf8B1FUDAkXPZvLhu1v +3F83jYuiqVztbqvrbPBQvVblJiaG1zynhmIq2LBvUCMj3ksMrWn7V6p0suHk +Nmuj1p9iGGD1pj9QkgPSd19Jcy8RR19WpmeeLAdKRbb90lwpjpeHWrlaaBxo +b/Usz6CK47WN4/fl1nNA0TFM3tFKHCPv948kMjhQv/nKsjc54rgtWZG115UD +Cxazr1qYEpjfHtDy3zkOpBdFFS9YSKCL9o9363LI85dxJas5SiBf4dhCTS4H +7J6sMD7tL4HzuRk17dc4cNGURtidkUD6msUvr9kc0EfbCy8+SeBfjcMLnS85 +cIhxddezeElMlzC3sVzkgE2+wIxtmiTezGeYCHMTIM93LPnVOUmU2qPA3bWU +gDdt29nvbkris9st3a4rCFAPXsXT+0oSZ70yf64TI2C4KKJoSloK/UaixBbW +E1C7+ovBYUUpTJt4V5KoSsD5MKfXv9SksKilRJBfgwBzE7W5eZTCY8I6wK1N +QMHHfmu+ACk0n9tq3MgiwF3U/ocMIYV/C8xUYxwI0DpaHXe5Rgpjxj5UNDgR +sKJ/nTi9SQrXM+ZFljoTUFnGA8pdUri5JdEy0pUAcdvK9I2LUjgtwZ2v7kOu +P05R29xWGtMlT0W/CyXAbPxPVNCANOp0Zu5fkkHAEauzKo9HpXFIqj3kQSYB +pVfVukV+SqNH7dKEfWcJkNzmxajkl8Ed1ntfPLlAwOiDJ7941GXQs+/kUtvL +BGTFp4flRMrg487qvOzbBDT3rFccjZPBhKPJNwVLCJjXbnhnlCqDf1pHmhPv +ELD76+ymwTwZTHy7bLN3OQEGdjsn1RtkMNVyPuz7PQL6xZSDGlfL4sPQz91m +dQRIHKyVk5CQxcqPG/47/pgAu+YdLXtosljjMuV7t56AiqhU1TVastjp0BEi ++oSAlE8TI647ZFH463GtomfkfuinXCzxlsV1vyhcj58TMJOhYLO4VxYHCunT +HS8I8DTbfqswWhadz+zY8qeFgE23qgPGC2SxeaXwT8FWAgK4nSVMSmRxrZHZ +ytXvCMjdOdZ09p4sJrSs2MzbRsAyAbqyQbMsZn5PcB15T0B3aNJg4g9ZVGkr +LUnqIiCO6egtrS+Hu/NHpvn7CLDyvDylZyKH8U/OWneSFoj9nuBsJ4d37b6r +XftMXr/hRFG6lxyKFa+8sWGAgAc2Vd+XnZLDydTQKL4hAmL280UrZslhZUeL +H0Ha4sw2AZM8OfQ91TXk9pWAtrdjG6PZcsgeya/IHSZgYodC+HSXHPZRLl3/ +PkLA/ahgPqFBOVwRKx0U9p2A47kPs9XH5PAJu7RjjvSqPpfqPdwUVBkYyJwZ +JeDdkut2J1dRMLZ6fGjfDwIuKkx9LBSnYIHIUF8v6bUBaVx9KhQk/kW8uD9G +wFhyV8aCNgVnBVIeyY0TcPe2soIMUDDkwiH3GNImY3Xm27dS0OjLszydCQKW +Cwp0HPKgoPqtB6YppN9o7gzMCKCgZV98Tjdpz8OzKS+PUrBh80PXoEkClC6Y +yI6coKBjX1UTe/L/9fjfHb50Clrklg5PkCa6PxgpXaTgb6K/bsMUAVHz69+Y +FFJwqLbAwYe0MSXC26uUgtEPDXPOkubHxqnoBxT8t3r+Uj3pV95CiZfqKeh5 +WMttlPS5BE+xypcUpEtpvReaJvN5vbiovZ2CGjGbBbRIyz+d05vpo2BtWvsy +B9Lfhs2fCX2noMIJhbpA0uUrstw0Zin4gD/VMJp0hGrfd7tFCl4V8Y86TdrI +Xi1673IqvpxfcTyHNG9wlECyCBUvh3VYXiX9MuPpletyVBxLUO4qJJ1FiGo2 +rKXi8xRnrf/b7b13fZ8mFb2hweUKafqv0q3/DKnYVPLa8jzpYcn5QRkLKg5q +flh6inSZgXU4w4GKirG26RGkw93P87m4UTH5Ytx3b9LM4wPZYX5UtG4bkLAi +zZO/USUziIqVrzvFVUg/fxxdXRZJxfXRzd/4SKcPPLdriaciW0o28zP5vlx4 +JXtH0qi4XN1I6D5pylr/g/wXqLjl9MXAZNJfrDhcylepOLX1co4z6ZK9ixmm +xVQMH7p/nULaoDTn7vFaKkb6jG4rJPfTrOPVwlgz+fyb8vP8SdtzLbXc1UpF +v/LzWxRI+zoFdcEXKkaE8s1kkfUSdPSafPkYFYV+fR62IB1Z2LmPNkfFJ0W1 +tj/J+rM4So+J5aVhTMAWLxvSL9bUXNNfQcO3sEd0nKxfh8LtzRMCNNR742yY +TnpnS6qQtyQNm/pjh56S9R5M/XnNeAMNn3+zaFtF5mOWSG/+rUFDtqSk8Tky +P1FWG36wtWmYdOCkijTpEyFeuvJGNBRM0IuUIvN3seF5M7cjDYvs39DHyLxS +d/j/qHKmYbFVzPn/57dwdFHokBsNNya9zWgg810mprNzwJeG6TKH6KlfCGgM +uPKjIZyGc5E+zRP9BFjPM4SPHaXh7U0fzxmTfpXepqsdS0MbC/2ZM2Q/6apc +Hlt4ioY3zB4FUsl+M7YyTPhELg0/6sQ6S3wk+3u5lZ5FPQ2t31r7+bUTkGc2 +sPNfEw3Fly5+OE72M/mu6NiKF+T9asr+niP7nRo38Uz5PQ3bPu/eWEX2R5Nt +cu58wzTcPbQ6r/sVAfvnJmObV9NRNqbr7rEmcj9DdosPCdNx9GGTow3Zn/lH +uot5JOm41WefpGgjAdd7GtqN5On4Rubn+lyyv/c+Oqd6T5eOjCT+9OM1BGw5 +wei8uouOZypl/p5mk/X0786BWj86Fu6vW0El58douDzPxz10FF8371VSSkBy +4Ep1yTA6hhtlDlcXE1Bn+zHhTDK5Hu9PF0qvk/1dOE7jKJuOhjRVicFsArhS +ZxuzK+iYe6YgyICcb6949rpVVNNRTyJG5fQ5AvbNOp2YfELHP6Pz7WvJ+VjY +qdgT0E1HJx6m/qZUct5eaU7axiOPqL34NPcYAb83CPaqOcvjpeRvN9rdCfiZ +Jx2n5SaP96tv0p+6kfNnjZIiY5c8ak+LeNzdQe7HNGOv2R55vDEeRjuxjZx/ +1b4/3aLl8Wu5pgCXHZk32/sCydfl8SavrLqHAVk/+zyhf1YeWzcE9D8WJfNa +XJJ//rwC9ipFf7tax4EeWvEV80sK6LkxJIv7EQeizt+6PHNFAWfGgzq8qjlw +P64o1+mWAq6Z4tUWr+DAph352QI1CiiWoXjAr5gD63nPpid9VsBNaYu26eT3 +l/iuo7HhqorIdg9U1wzkwKSwjdf2ekVMa20pmV7GgcE0r+2hfMoYw/q8s1KK +DdbjEdZfdNdiet2Wqa/0chj15T90N2YdZlesTFFZUkp+30twn6xfj/01Ipbm +pcUg3KJ8pnxcBXU/7Myci7gFssllDrq6qvjM1DVuWugGZG9gCIoEqOHf2fDE +5N5CeC5trDOdoY6szAxzy6cFYCBbn67RroHBLxuzPuXmgwBPQZh3/EbsMOfN +4OzNA0oclemqrInSD65+3J+VA8uV3Cucnmqi65aetd/lzoM6S6oswmMTflqQ +SKtQy4LQXuEGGy4tvLBt9WyjfTqMT6c5W2dr4ckAtc2O7algqdF00VpNG7dJ +9Mgm3TkJj6YN//56pY1nT9wqPPogAYJUN3W/9dfBS+VJbzsTYoE15tfmulwX +A0dHpEJWHwVzRcnNqwt0kXvktek+u3BYF5sSWa+nh2YmUnpSzqFQY3id185A +D9V2zUzamIeCw6/azPdMPfQoNFNO1gmFyKDZkmFjPZTcVNevKB4Kze5enwXs +9PACf/3iUEcIBDJ0bXZ66WFufl5oskcI3Jr6LDOTrIdePUa1YiHBoOLPqFXq +1kMVlUtJosEH4D95+z8JH/QQd13QOOdyAGY++ej09+phyrZg5lo4AI/c0oov +D+ghL5XfPUbgADg5fLog8UMPX/nFFf+7sx+OGJ4IXs6lj63LV7lqTuyDZqG3 +9B9K+mgQf7VbKW4v+D8KTLwboo/u8+Matu8CYOzASIR5mD46NZzRXvswACLl +9u9rD9dHYxPLX6I3AiDl2EGnuaP6eO3trhSlowFQbhBOYybp49KNcWVSigEw +X5FQ03BRH0MufTYzO7IbMssuz7Q26GNNIGPIeaM/1Oa3+U2KMbDt7OJp4dc+ +0GdH3xUuyUBNH6Mq94c+wPX7gOtfaQYaP/QOulfsAyaOfPa8NAYe3j1pmZns +A01LDPSkVBj47YbD3TkTH3jpc2W5sREDa/l/UIOrvKFbcW9p+m4GGlF8458S +XjBzc/GXxn0GvimJ19HI9YCh7Rb5pyoZGHnTL8YnzgM6l562Gqhm4CCmyRXv +9oBqL+mc83UMfFDzgXJM0wPiJXUMFp4x0DNQo1ym2R0Ek/cee/6BgeHXWL/M +fu8E1YD3XP7cBnjgNt/Nvr1u4KtUvPziZgMkZCTcnJNdIOqJ515lBwN0Sxnf +nBvsAun+wi84TgbY5boYOrfDBWquH0l74WKAU13HhCbWu4CostWaBW8DTDz9 +aqj75XZoUv4i6hVugG1fDplniG8HlXVUmvIVA0y9nEIXq9wGkypZupwJA7zn +Jaelp+cEnS/RXGTaAMXvtFdmKTlBXdDY1rBZAxzj9Y1dFHGCMxzrEN0/Bhg9 +p5W/dNIRVAy4Sqp4DDFC7dlUQ7Ej+FgfoDeIG6I+57D+akVHaAuwXNXGNMTG +iuENx6kO8KDw7+fZZENMDr69SyrGDnRNw37ZpBqiqz3PgouvHdz7PLoq/7Qh +Jt15MVhqaQccSq+eTaYh8mpn21wXtIOS7LrTly8Z4gvBqRDONVvITzvBsCw1 +xF1Wa/YYvbKBU2FrMrLfGaLq05wf+drWwC+SXPTjvSGeF7hh2CRjDUlsrhqT +TkNMLb5xZQmPNSSOTQ6NfjDE73Ul/lVvreB4YBvTeMgQT+xYL7Qp2ApC3XOG +v82R9/ONN9nAtgQ3MwU0pDAxo39wWauJBSy08Qs00Jg4TD10776KBeT7j/XY +KDCxYeb277vCFjCUVBnhto6JGnu+Ts32m0Posy1lRzYxMbGQGfVfojmk2B+j +PLBgYu4SrvNrXppB1Y7389oHmZizRvxMzT5T8PhW9bwmhIkCdpWSB7ebAldU +frZZGBML/ATe6hqbgsWlfdrbjjBRkGocxythCq0fl+w/lMDE7NzaT3kNJjDi +o97DvsBE6d4fj27TTEDmwMlK9TomBtzKHXvwDeHM4m6d1Hom7hQWzdboRODO +tGB/bWQiMSzYXNGEMFLBeyv/GRNHH48l/ryGUMWVmC38jonTz1NnGbsQ3M7G +Rvz8wkTxhO/vT7EBsquP6DxaycIe07kMuTIWrLJ3ZUsLsNBySdnw3H8siO3T +V4sQZOED3x1Lp4JZEMg7p7hRjIWTbhuUWVos0NsSLlpAYeHJUaardiUT2vtD +p09osvDPPfvP6c8NQWzFfvZmFxY+zGJSXbkNoNA0OmrClYUSJYNppwYYsCn6 +jGmWOwsj/Tc79DQywH6i/H2nNwuXqZbs6D/JgKT22d+++1kIkca/otYwYK4g +xiQqjoVyFj1/qxT1odsw611RMQsL947XXdmtC4GHC3OtS1nk/2nml0e2uvCz +9J7/aDkLT/kPZfzdqAvC8p2/NCtY+EmUKdDyVwds+eVkH9axsExe6VBLpg7U +tBX5vXvPQtOP6ms3NGmDjcADtfBOFj5TWxsqdkcbOi2f/ZTsYSFvDvlXfVYb +Zqq+J3v2sfB0hGN8lI82qF3deOfbCAvFG6+tiuPShppu4/C0HywMSkxMsBjW +AhvRraAxwcIWVsCQ8hst2H3y8NuwWXL9h6J49fO1YKYu6aLEHAsbPyWlBSZr +QfyfC75Vf8j18W8+RwRrgaD2LVWPBRZOF4fySrlqweUDVbOLiyzsrSHqs421 +4H9FRTB+ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.07793646146320984}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -2287,19 +6958,19 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.07793646146320984}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2313,220 +6984,136 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwV13c8Vf8fB3CRaMne7rAqGcm83Ov9tmdCSYTMaAkJKZlJqK/RoChJGoR7 +TymjCElDQzJLQpJkKxX5nd9f5/H845zzOefzfr3f59B9Djr5c3NxcRkv4eL6 +//Fn77NGxdRCI2Of605+98yN2i5LHjHujIf9J1wj278pAIq99pHszITqP2KO +N79pQbjD7Q6ezgLg43y+dfKbKQiNSWT+7uDAk4yd/I7ftsKnGvuDMx31sCOy +LSF32BcsFEc+Tna0QpeB452PXw7B7w69cxMd/XA01OPceHcCNJjeKHxbMA1m +j3OL8PhZkP1UOeSjugBVS2J7Tf/lgej+Xbf5THlQuzH5t0rANcjUtKi2d+bH +ySUbcpJbb0BX9sa6ScHVuOoAr4dwajGkFsa85pYSwsessAR7kTKw0d4jLKYg +hG8GS08K08qAv9HJea2aEA4eyqpvUS2DxAGlHltjIbz58nrreosyOCb/cujs +HiG8kDIkGRlZBkH5kv+Uq4Qw74+k1r6eMnDMZava7hRGlye3BO03l4PE2YFT +WXki+KF1qf3Hf+UgueFe4lyRCL7pPFjcwMMG6fqkGI9yEbwKPVxF/GygTKw/ +vLZBBO3KQzI8hdmgZBfsVT0sgiYjKgZXlNigtXRBd0BLFKs+BGp52rJhS5j4 +4Kbnojix86Tf6yw2OKwc7r3wThRHby1t1spmg1NBZdf8B1FUDAkXPZvLhu1v +3F83jYuiqVztbqvrbPBQvVblJiaG1zynhmIq2LBvUCMj3ksMrWn7V6p0suHk +Nmuj1p9iGGD1pj9QkgPSd19Jcy8RR19WpmeeLAdKRbb90lwpjpeHWrlaaBxo +b/Usz6CK47WN4/fl1nNA0TFM3tFKHCPv948kMjhQv/nKsjc54rgtWZG115UD +Cxazr1qYEpjfHtDy3zkOpBdFFS9YSKCL9o9363LI85dxJas5SiBf4dhCTS4H +7J6sMD7tL4HzuRk17dc4cNGURtidkUD6msUvr9kc0EfbCy8+SeBfjcMLnS85 +cIhxddezeElMlzC3sVzkgE2+wIxtmiTezGeYCHMTIM93LPnVOUmU2qPA3bWU +gDdt29nvbkris9st3a4rCFAPXsXT+0oSZ70yf64TI2C4KKJoSloK/UaixBbW +E1C7+ovBYUUpTJt4V5KoSsD5MKfXv9SksKilRJBfgwBzE7W5eZTCY8I6wK1N +QMHHfmu+ACk0n9tq3MgiwF3U/ocMIYV/C8xUYxwI0DpaHXe5Rgpjxj5UNDgR +sKJ/nTi9SQrXM+ZFljoTUFnGA8pdUri5JdEy0pUAcdvK9I2LUjgtwZ2v7kOu +P05R29xWGtMlT0W/CyXAbPxPVNCANOp0Zu5fkkHAEauzKo9HpXFIqj3kQSYB +pVfVukV+SqNH7dKEfWcJkNzmxajkl8Ed1ntfPLlAwOiDJ7941GXQs+/kUtvL +BGTFp4flRMrg487qvOzbBDT3rFccjZPBhKPJNwVLCJjXbnhnlCqDf1pHmhPv +ELD76+ymwTwZTHy7bLN3OQEGdjsn1RtkMNVyPuz7PQL6xZSDGlfL4sPQz91m +dQRIHKyVk5CQxcqPG/47/pgAu+YdLXtosljjMuV7t56AiqhU1TVastjp0BEi ++oSAlE8TI647ZFH463GtomfkfuinXCzxlsV1vyhcj58TMJOhYLO4VxYHCunT +HS8I8DTbfqswWhadz+zY8qeFgE23qgPGC2SxeaXwT8FWAgK4nSVMSmRxrZHZ +ytXvCMjdOdZ09p4sJrSs2MzbRsAyAbqyQbMsZn5PcB15T0B3aNJg4g9ZVGkr +LUnqIiCO6egtrS+Hu/NHpvn7CLDyvDylZyKH8U/OWneSFoj9nuBsJ4d37b6r +XftMXr/hRFG6lxyKFa+8sWGAgAc2Vd+XnZLDydTQKL4hAmL280UrZslhZUeL +H0Ha4sw2AZM8OfQ91TXk9pWAtrdjG6PZcsgeya/IHSZgYodC+HSXHPZRLl3/ +PkLA/ahgPqFBOVwRKx0U9p2A47kPs9XH5PAJu7RjjvSqPpfqPdwUVBkYyJwZ +JeDdkut2J1dRMLZ6fGjfDwIuKkx9LBSnYIHIUF8v6bUBaVx9KhQk/kW8uD9G +wFhyV8aCNgVnBVIeyY0TcPe2soIMUDDkwiH3GNImY3Xm27dS0OjLszydCQKW +Cwp0HPKgoPqtB6YppN9o7gzMCKCgZV98Tjdpz8OzKS+PUrBh80PXoEkClC6Y +yI6coKBjX1UTe/L/9fjfHb50Clrklg5PkCa6PxgpXaTgb6K/bsMUAVHz69+Y +FFJwqLbAwYe0MSXC26uUgtEPDXPOkubHxqnoBxT8t3r+Uj3pV95CiZfqKeh5 +WMttlPS5BE+xypcUpEtpvReaJvN5vbiovZ2CGjGbBbRIyz+d05vpo2BtWvsy +B9Lfhs2fCX2noMIJhbpA0uUrstw0Zin4gD/VMJp0hGrfd7tFCl4V8Y86TdrI +Xi1673IqvpxfcTyHNG9wlECyCBUvh3VYXiX9MuPpletyVBxLUO4qJJ1FiGo2 +rKXi8xRnrf/b7b13fZ8mFb2hweUKafqv0q3/DKnYVPLa8jzpYcn5QRkLKg5q +flh6inSZgXU4w4GKirG26RGkw93P87m4UTH5Ytx3b9LM4wPZYX5UtG4bkLAi +zZO/USUziIqVrzvFVUg/fxxdXRZJxfXRzd/4SKcPPLdriaciW0o28zP5vlx4 +JXtH0qi4XN1I6D5pylr/g/wXqLjl9MXAZNJfrDhcylepOLX1co4z6ZK9ixmm +xVQMH7p/nULaoDTn7vFaKkb6jG4rJPfTrOPVwlgz+fyb8vP8SdtzLbXc1UpF +v/LzWxRI+zoFdcEXKkaE8s1kkfUSdPSafPkYFYV+fR62IB1Z2LmPNkfFJ0W1 +tj/J+rM4So+J5aVhTMAWLxvSL9bUXNNfQcO3sEd0nKxfh8LtzRMCNNR742yY +TnpnS6qQtyQNm/pjh56S9R5M/XnNeAMNn3+zaFtF5mOWSG/+rUFDtqSk8Tky +P1FWG36wtWmYdOCkijTpEyFeuvJGNBRM0IuUIvN3seF5M7cjDYvs39DHyLxS +d/j/qHKmYbFVzPn/57dwdFHokBsNNya9zWgg810mprNzwJeG6TKH6KlfCGgM +uPKjIZyGc5E+zRP9BFjPM4SPHaXh7U0fzxmTfpXepqsdS0MbC/2ZM2Q/6apc +Hlt4ioY3zB4FUsl+M7YyTPhELg0/6sQ6S3wk+3u5lZ5FPQ2t31r7+bUTkGc2 +sPNfEw3Fly5+OE72M/mu6NiKF+T9asr+niP7nRo38Uz5PQ3bPu/eWEX2R5Nt +cu58wzTcPbQ6r/sVAfvnJmObV9NRNqbr7rEmcj9DdosPCdNx9GGTow3Zn/lH +uot5JOm41WefpGgjAdd7GtqN5On4Rubn+lyyv/c+Oqd6T5eOjCT+9OM1BGw5 +wei8uouOZypl/p5mk/X0786BWj86Fu6vW0El58douDzPxz10FF8371VSSkBy +4Ep1yTA6hhtlDlcXE1Bn+zHhTDK5Hu9PF0qvk/1dOE7jKJuOhjRVicFsArhS +ZxuzK+iYe6YgyICcb6949rpVVNNRTyJG5fQ5AvbNOp2YfELHP6Pz7WvJ+VjY +qdgT0E1HJx6m/qZUct5eaU7axiOPqL34NPcYAb83CPaqOcvjpeRvN9rdCfiZ +Jx2n5SaP96tv0p+6kfNnjZIiY5c8ak+LeNzdQe7HNGOv2R55vDEeRjuxjZx/ +1b4/3aLl8Wu5pgCXHZk32/sCydfl8SavrLqHAVk/+zyhf1YeWzcE9D8WJfNa +XJJ//rwC9ipFf7tax4EeWvEV80sK6LkxJIv7EQeizt+6PHNFAWfGgzq8qjlw +P64o1+mWAq6Z4tUWr+DAph352QI1CiiWoXjAr5gD63nPpid9VsBNaYu26eT3 +l/iuo7HhqorIdg9U1wzkwKSwjdf2ekVMa20pmV7GgcE0r+2hfMoYw/q8s1KK +DdbjEdZfdNdiet2Wqa/0chj15T90N2YdZlesTFFZUkp+30twn6xfj/01Ipbm +pcUg3KJ8pnxcBXU/7Myci7gFssllDrq6qvjM1DVuWugGZG9gCIoEqOHf2fDE +5N5CeC5trDOdoY6szAxzy6cFYCBbn67RroHBLxuzPuXmgwBPQZh3/EbsMOfN +4OzNA0oclemqrInSD65+3J+VA8uV3Cucnmqi65aetd/lzoM6S6oswmMTflqQ +SKtQy4LQXuEGGy4tvLBt9WyjfTqMT6c5W2dr4ckAtc2O7algqdF00VpNG7dJ +9Mgm3TkJj6YN//56pY1nT9wqPPogAYJUN3W/9dfBS+VJbzsTYoE15tfmulwX +A0dHpEJWHwVzRcnNqwt0kXvktek+u3BYF5sSWa+nh2YmUnpSzqFQY3id185A +D9V2zUzamIeCw6/azPdMPfQoNFNO1gmFyKDZkmFjPZTcVNevKB4Kze5enwXs +9PACf/3iUEcIBDJ0bXZ66WFufl5oskcI3Jr6LDOTrIdePUa1YiHBoOLPqFXq +1kMVlUtJosEH4D95+z8JH/QQd13QOOdyAGY++ej09+phyrZg5lo4AI/c0oov +D+ghL5XfPUbgADg5fLog8UMPX/nFFf+7sx+OGJ4IXs6lj63LV7lqTuyDZqG3 +9B9K+mgQf7VbKW4v+D8KTLwboo/u8+Matu8CYOzASIR5mD46NZzRXvswACLl +9u9rD9dHYxPLX6I3AiDl2EGnuaP6eO3trhSlowFQbhBOYybp49KNcWVSigEw +X5FQ03BRH0MufTYzO7IbMssuz7Q26GNNIGPIeaM/1Oa3+U2KMbDt7OJp4dc+ +0GdH3xUuyUBNH6Mq94c+wPX7gOtfaQYaP/QOulfsAyaOfPa8NAYe3j1pmZns +A01LDPSkVBj47YbD3TkTH3jpc2W5sREDa/l/UIOrvKFbcW9p+m4GGlF8458S +XjBzc/GXxn0GvimJ19HI9YCh7Rb5pyoZGHnTL8YnzgM6l562Gqhm4CCmyRXv +9oBqL+mc83UMfFDzgXJM0wPiJXUMFp4x0DNQo1ym2R0Ek/cee/6BgeHXWL/M +fu8E1YD3XP7cBnjgNt/Nvr1u4KtUvPziZgMkZCTcnJNdIOqJ515lBwN0Sxnf +nBvsAun+wi84TgbY5boYOrfDBWquH0l74WKAU13HhCbWu4CostWaBW8DTDz9 +aqj75XZoUv4i6hVugG1fDplniG8HlXVUmvIVA0y9nEIXq9wGkypZupwJA7zn +Jaelp+cEnS/RXGTaAMXvtFdmKTlBXdDY1rBZAxzj9Y1dFHGCMxzrEN0/Bhg9 +p5W/dNIRVAy4Sqp4DDFC7dlUQ7Ej+FgfoDeIG6I+57D+akVHaAuwXNXGNMTG +iuENx6kO8KDw7+fZZENMDr69SyrGDnRNw37ZpBqiqz3PgouvHdz7PLoq/7Qh +Jt15MVhqaQccSq+eTaYh8mpn21wXtIOS7LrTly8Z4gvBqRDONVvITzvBsCw1 +xF1Wa/YYvbKBU2FrMrLfGaLq05wf+drWwC+SXPTjvSGeF7hh2CRjDUlsrhqT +TkNMLb5xZQmPNSSOTQ6NfjDE73Ul/lVvreB4YBvTeMgQT+xYL7Qp2ApC3XOG +v82R9/ONN9nAtgQ3MwU0pDAxo39wWauJBSy08Qs00Jg4TD10776KBeT7j/XY +KDCxYeb277vCFjCUVBnhto6JGnu+Ts32m0Posy1lRzYxMbGQGfVfojmk2B+j +PLBgYu4SrvNrXppB1Y7389oHmZizRvxMzT5T8PhW9bwmhIkCdpWSB7ebAldU +frZZGBML/ATe6hqbgsWlfdrbjjBRkGocxythCq0fl+w/lMDE7NzaT3kNJjDi +o97DvsBE6d4fj27TTEDmwMlK9TomBtzKHXvwDeHM4m6d1Hom7hQWzdboRODO +tGB/bWQiMSzYXNGEMFLBeyv/GRNHH48l/ryGUMWVmC38jonTz1NnGbsQ3M7G +Rvz8wkTxhO/vT7EBsquP6DxaycIe07kMuTIWrLJ3ZUsLsNBySdnw3H8siO3T +V4sQZOED3x1Lp4JZEMg7p7hRjIWTbhuUWVos0NsSLlpAYeHJUaardiUT2vtD +p09osvDPPfvP6c8NQWzFfvZmFxY+zGJSXbkNoNA0OmrClYUSJYNppwYYsCn6 +jGmWOwsj/Tc79DQywH6i/H2nNwuXqZbs6D/JgKT22d+++1kIkca/otYwYK4g +xiQqjoVyFj1/qxT1odsw611RMQsL947XXdmtC4GHC3OtS1nk/2nml0e2uvCz +9J7/aDkLT/kPZfzdqAvC8p2/NCtY+EmUKdDyVwds+eVkH9axsExe6VBLpg7U +tBX5vXvPQtOP6ms3NGmDjcADtfBOFj5TWxsqdkcbOi2f/ZTsYSFvDvlXfVYb +Zqq+J3v2sfB0hGN8lI82qF3deOfbCAvFG6+tiuPShppu4/C0HywMSkxMsBjW +AhvRraAxwcIWVsCQ8hst2H3y8NuwWXL9h6J49fO1YKYu6aLEHAsbPyWlBSZr +QfyfC75Vf8j18W8+RwRrgaD2LVWPBRZOF4fySrlqweUDVbOLiyzsrSHqs421 +4H9FRTB+ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.07793646146320984}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2537,6 +7124,7 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -2564,7 +7152,8 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.11602348907445073`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07793646146320984}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -2572,25 +7161,927 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991340117671425*^9}, - CellLabel-> - "Out[335]=",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] + CellChangeTimes->{3.991340117671425*^9, 3.993829347024098*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"acd30cee-3288-46f8-b31f-27a951b40c1c"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", - RowBox[{"{", "}"}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799458254999*^9, - 3.9917994623413925`*^9}},ExpressionUUID->"2d5a8299-5376-9747-8056-\ -2bd9764114a1"], + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0.013749"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1", ",", "0.038234"}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", "0.060049"}], "}"}], ",", + RowBox[{"{", + RowBox[{"3", ",", "0.076638"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.085764"}], "}"}], ",", + RowBox[{"{", + RowBox[{"5", ",", "0.090382"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.089758"}], "}"}], ",", + RowBox[{"{", + RowBox[{"7", ",", "0.084925"}], "}"}], ",", + RowBox[{"{", + RowBox[{"8", ",", "0.077936"}], "}"}], ",", + RowBox[{"{", + RowBox[{"9", ",", "0.069316"}], "}"}], ",", + RowBox[{"{", + RowBox[{"10", ",", "0.060067"}], "}"}], ",", + RowBox[{"{", + RowBox[{"11", ",", "0.051031"}], "}"}], ",", + RowBox[{"{", + RowBox[{"12", ",", "0.042528"}], "}"}], ",", + RowBox[{"{", + RowBox[{"13", ",", "0.034867"}], "}"}], ",", + RowBox[{"{", + RowBox[{"14", ",", "0.02819"}], "}"}], ",", + RowBox[{"{", + RowBox[{"15", ",", "0.022495"}], "}"}], ",", + RowBox[{"{", + RowBox[{"16", ",", "0.01774"}], "}"}], ",", + RowBox[{"{", + RowBox[{"17", ",", "0.013843"}], "}"}], ",", + RowBox[{"{", + RowBox[{"18", ",", "0.010692"}], "}"}], ",", + RowBox[{"{", + RowBox[{"19", ",", "0.008182"}], "}"}], ",", + RowBox[{"{", + RowBox[{"20", ",", "0.006204"}], "}"}], ",", + RowBox[{"{", + RowBox[{"21", ",", "0.004665"}], "}"}], ",", + RowBox[{"{", + RowBox[{"22", ",", "0.003479"}], "}"}], ",", + RowBox[{"{", + RowBox[{"23", ",", "0.002574"}], "}"}], ",", + RowBox[{"{", + RowBox[{"24", ",", "0.00189"}], "}"}], ",", + RowBox[{"{", + RowBox[{"25", ",", "0.001377"}], "}"}], ",", + RowBox[{"{", + RowBox[{"26", ",", "0.000997"}], "}"}], ",", + RowBox[{"{", + RowBox[{"27", ",", "0.000717"}], "}"}], ",", + RowBox[{"{", + RowBox[{"28", ",", "0.000511"}], "}"}], ",", + RowBox[{"{", + RowBox[{"29", ",", "0.000363"}], "}"}], ",", + RowBox[{"{", + RowBox[{"30", ",", "0.000256"}], "}"}]}], "}"}], "]"}]}]], "Input", + CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, + 3.993828253595996*^9}, + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel->"In[96]:=",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.090382}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829347157237*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"7d4b285f-8b87-46d5-b464-3c713ff21ba2"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-\ -0ac982b58a3a"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8fB3CRaMne7rAqGcm83Ov9tmdCSYTMaAkJKZlJqK/RoChJGoR7 +TymjCElDQzJLQpJkKxX5nd9f5/H845zzOefzfr3f59B9Djr5c3NxcRkv4eL6 +//Fn77NGxdRCI2Of605+98yN2i5LHjHujIf9J1wj278pAIq99pHszITqP2KO +N79pQbjD7Q6ezgLg43y+dfKbKQiNSWT+7uDAk4yd/I7ftsKnGvuDMx31sCOy +LSF32BcsFEc+Tna0QpeB452PXw7B7w69cxMd/XA01OPceHcCNJjeKHxbMA1m +j3OL8PhZkP1UOeSjugBVS2J7Tf/lgej+Xbf5THlQuzH5t0rANcjUtKi2d+bH +ySUbcpJbb0BX9sa6ScHVuOoAr4dwajGkFsa85pYSwsessAR7kTKw0d4jLKYg +hG8GS08K08qAv9HJea2aEA4eyqpvUS2DxAGlHltjIbz58nrreosyOCb/cujs +HiG8kDIkGRlZBkH5kv+Uq4Qw74+k1r6eMnDMZava7hRGlye3BO03l4PE2YFT +WXki+KF1qf3Hf+UgueFe4lyRCL7pPFjcwMMG6fqkGI9yEbwKPVxF/GygTKw/ +vLZBBO3KQzI8hdmgZBfsVT0sgiYjKgZXlNigtXRBd0BLFKs+BGp52rJhS5j4 +4Kbnojix86Tf6yw2OKwc7r3wThRHby1t1spmg1NBZdf8B1FUDAkXPZvLhu1v +3F83jYuiqVztbqvrbPBQvVblJiaG1zynhmIq2LBvUCMj3ksMrWn7V6p0suHk +Nmuj1p9iGGD1pj9QkgPSd19Jcy8RR19WpmeeLAdKRbb90lwpjpeHWrlaaBxo +b/Usz6CK47WN4/fl1nNA0TFM3tFKHCPv948kMjhQv/nKsjc54rgtWZG115UD +Cxazr1qYEpjfHtDy3zkOpBdFFS9YSKCL9o9363LI85dxJas5SiBf4dhCTS4H +7J6sMD7tL4HzuRk17dc4cNGURtidkUD6msUvr9kc0EfbCy8+SeBfjcMLnS85 +cIhxddezeElMlzC3sVzkgE2+wIxtmiTezGeYCHMTIM93LPnVOUmU2qPA3bWU +gDdt29nvbkris9st3a4rCFAPXsXT+0oSZ70yf64TI2C4KKJoSloK/UaixBbW +E1C7+ovBYUUpTJt4V5KoSsD5MKfXv9SksKilRJBfgwBzE7W5eZTCY8I6wK1N +QMHHfmu+ACk0n9tq3MgiwF3U/ocMIYV/C8xUYxwI0DpaHXe5Rgpjxj5UNDgR +sKJ/nTi9SQrXM+ZFljoTUFnGA8pdUri5JdEy0pUAcdvK9I2LUjgtwZ2v7kOu +P05R29xWGtMlT0W/CyXAbPxPVNCANOp0Zu5fkkHAEauzKo9HpXFIqj3kQSYB +pVfVukV+SqNH7dKEfWcJkNzmxajkl8Ed1ntfPLlAwOiDJ7941GXQs+/kUtvL +BGTFp4flRMrg487qvOzbBDT3rFccjZPBhKPJNwVLCJjXbnhnlCqDf1pHmhPv +ELD76+ymwTwZTHy7bLN3OQEGdjsn1RtkMNVyPuz7PQL6xZSDGlfL4sPQz91m +dQRIHKyVk5CQxcqPG/47/pgAu+YdLXtosljjMuV7t56AiqhU1TVastjp0BEi ++oSAlE8TI647ZFH463GtomfkfuinXCzxlsV1vyhcj58TMJOhYLO4VxYHCunT +HS8I8DTbfqswWhadz+zY8qeFgE23qgPGC2SxeaXwT8FWAgK4nSVMSmRxrZHZ +ytXvCMjdOdZ09p4sJrSs2MzbRsAyAbqyQbMsZn5PcB15T0B3aNJg4g9ZVGkr +LUnqIiCO6egtrS+Hu/NHpvn7CLDyvDylZyKH8U/OWneSFoj9nuBsJ4d37b6r +XftMXr/hRFG6lxyKFa+8sWGAgAc2Vd+XnZLDydTQKL4hAmL280UrZslhZUeL +H0Ha4sw2AZM8OfQ91TXk9pWAtrdjG6PZcsgeya/IHSZgYodC+HSXHPZRLl3/ +PkLA/ahgPqFBOVwRKx0U9p2A47kPs9XH5PAJu7RjjvSqPpfqPdwUVBkYyJwZ +JeDdkut2J1dRMLZ6fGjfDwIuKkx9LBSnYIHIUF8v6bUBaVx9KhQk/kW8uD9G +wFhyV8aCNgVnBVIeyY0TcPe2soIMUDDkwiH3GNImY3Xm27dS0OjLszydCQKW +Cwp0HPKgoPqtB6YppN9o7gzMCKCgZV98Tjdpz8OzKS+PUrBh80PXoEkClC6Y +yI6coKBjX1UTe/L/9fjfHb50Clrklg5PkCa6PxgpXaTgb6K/bsMUAVHz69+Y +FFJwqLbAwYe0MSXC26uUgtEPDXPOkubHxqnoBxT8t3r+Uj3pV95CiZfqKeh5 +WMttlPS5BE+xypcUpEtpvReaJvN5vbiovZ2CGjGbBbRIyz+d05vpo2BtWvsy +B9Lfhs2fCX2noMIJhbpA0uUrstw0Zin4gD/VMJp0hGrfd7tFCl4V8Y86TdrI +Xi1673IqvpxfcTyHNG9wlECyCBUvh3VYXiX9MuPpletyVBxLUO4qJJ1FiGo2 +rKXi8xRnrf/b7b13fZ8mFb2hweUKafqv0q3/DKnYVPLa8jzpYcn5QRkLKg5q +flh6inSZgXU4w4GKirG26RGkw93P87m4UTH5Ytx3b9LM4wPZYX5UtG4bkLAi +zZO/USUziIqVrzvFVUg/fxxdXRZJxfXRzd/4SKcPPLdriaciW0o28zP5vlx4 +JXtH0qi4XN1I6D5pylr/g/wXqLjl9MXAZNJfrDhcylepOLX1co4z6ZK9ixmm +xVQMH7p/nULaoDTn7vFaKkb6jG4rJPfTrOPVwlgz+fyb8vP8SdtzLbXc1UpF +v/LzWxRI+zoFdcEXKkaE8s1kkfUSdPSafPkYFYV+fR62IB1Z2LmPNkfFJ0W1 +tj/J+rM4So+J5aVhTMAWLxvSL9bUXNNfQcO3sEd0nKxfh8LtzRMCNNR742yY +TnpnS6qQtyQNm/pjh56S9R5M/XnNeAMNn3+zaFtF5mOWSG/+rUFDtqSk8Tky +P1FWG36wtWmYdOCkijTpEyFeuvJGNBRM0IuUIvN3seF5M7cjDYvs39DHyLxS +d/j/qHKmYbFVzPn/57dwdFHokBsNNya9zWgg810mprNzwJeG6TKH6KlfCGgM +uPKjIZyGc5E+zRP9BFjPM4SPHaXh7U0fzxmTfpXepqsdS0MbC/2ZM2Q/6apc +Hlt4ioY3zB4FUsl+M7YyTPhELg0/6sQ6S3wk+3u5lZ5FPQ2t31r7+bUTkGc2 +sPNfEw3Fly5+OE72M/mu6NiKF+T9asr+niP7nRo38Uz5PQ3bPu/eWEX2R5Nt +cu58wzTcPbQ6r/sVAfvnJmObV9NRNqbr7rEmcj9DdosPCdNx9GGTow3Zn/lH +uot5JOm41WefpGgjAdd7GtqN5On4Rubn+lyyv/c+Oqd6T5eOjCT+9OM1BGw5 +wei8uouOZypl/p5mk/X0786BWj86Fu6vW0El58douDzPxz10FF8371VSSkBy +4Ep1yTA6hhtlDlcXE1Bn+zHhTDK5Hu9PF0qvk/1dOE7jKJuOhjRVicFsArhS +ZxuzK+iYe6YgyICcb6949rpVVNNRTyJG5fQ5AvbNOp2YfELHP6Pz7WvJ+VjY +qdgT0E1HJx6m/qZUct5eaU7axiOPqL34NPcYAb83CPaqOcvjpeRvN9rdCfiZ +Jx2n5SaP96tv0p+6kfNnjZIiY5c8ak+LeNzdQe7HNGOv2R55vDEeRjuxjZx/ +1b4/3aLl8Wu5pgCXHZk32/sCydfl8SavrLqHAVk/+zyhf1YeWzcE9D8WJfNa +XJJ//rwC9ipFf7tax4EeWvEV80sK6LkxJIv7EQeizt+6PHNFAWfGgzq8qjlw +P64o1+mWAq6Z4tUWr+DAph352QI1CiiWoXjAr5gD63nPpid9VsBNaYu26eT3 +l/iuo7HhqorIdg9U1wzkwKSwjdf2ekVMa20pmV7GgcE0r+2hfMoYw/q8s1KK +DdbjEdZfdNdiet2Wqa/0chj15T90N2YdZlesTFFZUkp+30twn6xfj/01Ipbm +pcUg3KJ8pnxcBXU/7Myci7gFssllDrq6qvjM1DVuWugGZG9gCIoEqOHf2fDE +5N5CeC5trDOdoY6szAxzy6cFYCBbn67RroHBLxuzPuXmgwBPQZh3/EbsMOfN +4OzNA0oclemqrInSD65+3J+VA8uV3Cucnmqi65aetd/lzoM6S6oswmMTflqQ +SKtQy4LQXuEGGy4tvLBt9WyjfTqMT6c5W2dr4ckAtc2O7algqdF00VpNG7dJ +9Mgm3TkJj6YN//56pY1nT9wqPPogAYJUN3W/9dfBS+VJbzsTYoE15tfmulwX +A0dHpEJWHwVzRcnNqwt0kXvktek+u3BYF5sSWa+nh2YmUnpSzqFQY3id185A +D9V2zUzamIeCw6/azPdMPfQoNFNO1gmFyKDZkmFjPZTcVNevKB4Kze5enwXs +9PACf/3iUEcIBDJ0bXZ66WFufl5oskcI3Jr6LDOTrIdePUa1YiHBoOLPqFXq +1kMVlUtJosEH4D95+z8JH/QQd13QOOdyAGY++ej09+phyrZg5lo4AI/c0oov +D+ghL5XfPUbgADg5fLog8UMPX/nFFf+7sx+OGJ4IXs6lj63LV7lqTuyDZqG3 +9B9K+mgQf7VbKW4v+D8KTLwboo/u8+Matu8CYOzASIR5mD46NZzRXvswACLl +9u9rD9dHYxPLX6I3AiDl2EGnuaP6eO3trhSlowFQbhBOYybp49KNcWVSigEw +X5FQ03BRH0MufTYzO7IbMssuz7Q26GNNIGPIeaM/1Oa3+U2KMbDt7OJp4dc+ +0GdH3xUuyUBNH6Mq94c+wPX7gOtfaQYaP/QOulfsAyaOfPa8NAYe3j1pmZns +A01LDPSkVBj47YbD3TkTH3jpc2W5sREDa/l/UIOrvKFbcW9p+m4GGlF8458S +XjBzc/GXxn0GvimJ19HI9YCh7Rb5pyoZGHnTL8YnzgM6l562Gqhm4CCmyRXv +9oBqL+mc83UMfFDzgXJM0wPiJXUMFp4x0DNQo1ym2R0Ek/cee/6BgeHXWL/M +fu8E1YD3XP7cBnjgNt/Nvr1u4KtUvPziZgMkZCTcnJNdIOqJ515lBwN0Sxnf +nBvsAun+wi84TgbY5boYOrfDBWquH0l74WKAU13HhCbWu4CostWaBW8DTDz9 +aqj75XZoUv4i6hVugG1fDplniG8HlXVUmvIVA0y9nEIXq9wGkypZupwJA7zn +Jaelp+cEnS/RXGTaAMXvtFdmKTlBXdDY1rBZAxzj9Y1dFHGCMxzrEN0/Bhg9 +p5W/dNIRVAy4Sqp4DDFC7dlUQ7Ej+FgfoDeIG6I+57D+akVHaAuwXNXGNMTG +iuENx6kO8KDw7+fZZENMDr69SyrGDnRNw37ZpBqiqz3PgouvHdz7PLoq/7Qh +Jt15MVhqaQccSq+eTaYh8mpn21wXtIOS7LrTly8Z4gvBqRDONVvITzvBsCw1 +xF1Wa/YYvbKBU2FrMrLfGaLq05wf+drWwC+SXPTjvSGeF7hh2CRjDUlsrhqT +TkNMLb5xZQmPNSSOTQ6NfjDE73Ul/lVvreB4YBvTeMgQT+xYL7Qp2ApC3XOG +v82R9/ONN9nAtgQ3MwU0pDAxo39wWauJBSy08Qs00Jg4TD10776KBeT7j/XY +KDCxYeb277vCFjCUVBnhto6JGnu+Ts32m0Posy1lRzYxMbGQGfVfojmk2B+j +PLBgYu4SrvNrXppB1Y7389oHmZizRvxMzT5T8PhW9bwmhIkCdpWSB7ebAldU +frZZGBML/ATe6hqbgsWlfdrbjjBRkGocxythCq0fl+w/lMDE7NzaT3kNJjDi +o97DvsBE6d4fj27TTEDmwMlK9TomBtzKHXvwDeHM4m6d1Hom7hQWzdboRODO +tGB/bWQiMSzYXNGEMFLBeyv/GRNHH48l/ryGUMWVmC38jonTz1NnGbsQ3M7G +Rvz8wkTxhO/vT7EBsquP6DxaycIe07kMuTIWrLJ3ZUsLsNBySdnw3H8siO3T +V4sQZOED3x1Lp4JZEMg7p7hRjIWTbhuUWVos0NsSLlpAYeHJUaardiUT2vtD +p09osvDPPfvP6c8NQWzFfvZmFxY+zGJSXbkNoNA0OmrClYUSJYNppwYYsCn6 +jGmWOwsj/Tc79DQywH6i/H2nNwuXqZbs6D/JgKT22d+++1kIkca/otYwYK4g +xiQqjoVyFj1/qxT1odsw611RMQsL947XXdmtC4GHC3OtS1nk/2nml0e2uvCz +9J7/aDkLT/kPZfzdqAvC8p2/NCtY+EmUKdDyVwds+eVkH9axsExe6VBLpg7U +tBX5vXvPQtOP6ms3NGmDjcADtfBOFj5TWxsqdkcbOi2f/ZTsYSFvDvlXfVYb +Zqq+J3v2sfB0hGN8lI82qF3deOfbCAvFG6+tiuPShppu4/C0HywMSkxMsBjW +AhvRraAxwcIWVsCQ8hst2H3y8NuwWXL9h6J49fO1YKYu6aLEHAsbPyWlBSZr +QfyfC75Vf8j18W8+RwRrgaD2LVWPBRZOF4fySrlqweUDVbOLiyzsrSHqs421 +4H9FRTB+ + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8fB3CRaMne7rAqGcm83Ov9tmdCSYTMaAkJKZlJqK/RoChJGoR7 +TymjCElDQzJLQpJkKxX5nd9f5/H845zzOefzfr3f59B9Djr5c3NxcRkv4eL6 +//Fn77NGxdRCI2Of605+98yN2i5LHjHujIf9J1wj278pAIq99pHszITqP2KO +N79pQbjD7Q6ezgLg43y+dfKbKQiNSWT+7uDAk4yd/I7ftsKnGvuDMx31sCOy +LSF32BcsFEc+Tna0QpeB452PXw7B7w69cxMd/XA01OPceHcCNJjeKHxbMA1m +j3OL8PhZkP1UOeSjugBVS2J7Tf/lgej+Xbf5THlQuzH5t0rANcjUtKi2d+bH +ySUbcpJbb0BX9sa6ScHVuOoAr4dwajGkFsa85pYSwsessAR7kTKw0d4jLKYg +hG8GS08K08qAv9HJea2aEA4eyqpvUS2DxAGlHltjIbz58nrreosyOCb/cujs +HiG8kDIkGRlZBkH5kv+Uq4Qw74+k1r6eMnDMZava7hRGlye3BO03l4PE2YFT +WXki+KF1qf3Hf+UgueFe4lyRCL7pPFjcwMMG6fqkGI9yEbwKPVxF/GygTKw/ +vLZBBO3KQzI8hdmgZBfsVT0sgiYjKgZXlNigtXRBd0BLFKs+BGp52rJhS5j4 +4Kbnojix86Tf6yw2OKwc7r3wThRHby1t1spmg1NBZdf8B1FUDAkXPZvLhu1v +3F83jYuiqVztbqvrbPBQvVblJiaG1zynhmIq2LBvUCMj3ksMrWn7V6p0suHk +Nmuj1p9iGGD1pj9QkgPSd19Jcy8RR19WpmeeLAdKRbb90lwpjpeHWrlaaBxo +b/Usz6CK47WN4/fl1nNA0TFM3tFKHCPv948kMjhQv/nKsjc54rgtWZG115UD +Cxazr1qYEpjfHtDy3zkOpBdFFS9YSKCL9o9363LI85dxJas5SiBf4dhCTS4H +7J6sMD7tL4HzuRk17dc4cNGURtidkUD6msUvr9kc0EfbCy8+SeBfjcMLnS85 +cIhxddezeElMlzC3sVzkgE2+wIxtmiTezGeYCHMTIM93LPnVOUmU2qPA3bWU +gDdt29nvbkris9st3a4rCFAPXsXT+0oSZ70yf64TI2C4KKJoSloK/UaixBbW +E1C7+ovBYUUpTJt4V5KoSsD5MKfXv9SksKilRJBfgwBzE7W5eZTCY8I6wK1N +QMHHfmu+ACk0n9tq3MgiwF3U/ocMIYV/C8xUYxwI0DpaHXe5Rgpjxj5UNDgR +sKJ/nTi9SQrXM+ZFljoTUFnGA8pdUri5JdEy0pUAcdvK9I2LUjgtwZ2v7kOu +P05R29xWGtMlT0W/CyXAbPxPVNCANOp0Zu5fkkHAEauzKo9HpXFIqj3kQSYB +pVfVukV+SqNH7dKEfWcJkNzmxajkl8Ed1ntfPLlAwOiDJ7941GXQs+/kUtvL +BGTFp4flRMrg487qvOzbBDT3rFccjZPBhKPJNwVLCJjXbnhnlCqDf1pHmhPv +ELD76+ymwTwZTHy7bLN3OQEGdjsn1RtkMNVyPuz7PQL6xZSDGlfL4sPQz91m +dQRIHKyVk5CQxcqPG/47/pgAu+YdLXtosljjMuV7t56AiqhU1TVastjp0BEi ++oSAlE8TI647ZFH463GtomfkfuinXCzxlsV1vyhcj58TMJOhYLO4VxYHCunT +HS8I8DTbfqswWhadz+zY8qeFgE23qgPGC2SxeaXwT8FWAgK4nSVMSmRxrZHZ +ytXvCMjdOdZ09p4sJrSs2MzbRsAyAbqyQbMsZn5PcB15T0B3aNJg4g9ZVGkr +LUnqIiCO6egtrS+Hu/NHpvn7CLDyvDylZyKH8U/OWneSFoj9nuBsJ4d37b6r +XftMXr/hRFG6lxyKFa+8sWGAgAc2Vd+XnZLDydTQKL4hAmL280UrZslhZUeL +H0Ha4sw2AZM8OfQ91TXk9pWAtrdjG6PZcsgeya/IHSZgYodC+HSXHPZRLl3/ +PkLA/ahgPqFBOVwRKx0U9p2A47kPs9XH5PAJu7RjjvSqPpfqPdwUVBkYyJwZ +JeDdkut2J1dRMLZ6fGjfDwIuKkx9LBSnYIHIUF8v6bUBaVx9KhQk/kW8uD9G +wFhyV8aCNgVnBVIeyY0TcPe2soIMUDDkwiH3GNImY3Xm27dS0OjLszydCQKW +Cwp0HPKgoPqtB6YppN9o7gzMCKCgZV98Tjdpz8OzKS+PUrBh80PXoEkClC6Y +yI6coKBjX1UTe/L/9fjfHb50Clrklg5PkCa6PxgpXaTgb6K/bsMUAVHz69+Y +FFJwqLbAwYe0MSXC26uUgtEPDXPOkubHxqnoBxT8t3r+Uj3pV95CiZfqKeh5 +WMttlPS5BE+xypcUpEtpvReaJvN5vbiovZ2CGjGbBbRIyz+d05vpo2BtWvsy +B9Lfhs2fCX2noMIJhbpA0uUrstw0Zin4gD/VMJp0hGrfd7tFCl4V8Y86TdrI +Xi1673IqvpxfcTyHNG9wlECyCBUvh3VYXiX9MuPpletyVBxLUO4qJJ1FiGo2 +rKXi8xRnrf/b7b13fZ8mFb2hweUKafqv0q3/DKnYVPLa8jzpYcn5QRkLKg5q +flh6inSZgXU4w4GKirG26RGkw93P87m4UTH5Ytx3b9LM4wPZYX5UtG4bkLAi +zZO/USUziIqVrzvFVUg/fxxdXRZJxfXRzd/4SKcPPLdriaciW0o28zP5vlx4 +JXtH0qi4XN1I6D5pylr/g/wXqLjl9MXAZNJfrDhcylepOLX1co4z6ZK9ixmm +xVQMH7p/nULaoDTn7vFaKkb6jG4rJPfTrOPVwlgz+fyb8vP8SdtzLbXc1UpF +v/LzWxRI+zoFdcEXKkaE8s1kkfUSdPSafPkYFYV+fR62IB1Z2LmPNkfFJ0W1 +tj/J+rM4So+J5aVhTMAWLxvSL9bUXNNfQcO3sEd0nKxfh8LtzRMCNNR742yY +TnpnS6qQtyQNm/pjh56S9R5M/XnNeAMNn3+zaFtF5mOWSG/+rUFDtqSk8Tky +P1FWG36wtWmYdOCkijTpEyFeuvJGNBRM0IuUIvN3seF5M7cjDYvs39DHyLxS +d/j/qHKmYbFVzPn/57dwdFHokBsNNya9zWgg810mprNzwJeG6TKH6KlfCGgM +uPKjIZyGc5E+zRP9BFjPM4SPHaXh7U0fzxmTfpXepqsdS0MbC/2ZM2Q/6apc +Hlt4ioY3zB4FUsl+M7YyTPhELg0/6sQ6S3wk+3u5lZ5FPQ2t31r7+bUTkGc2 +sPNfEw3Fly5+OE72M/mu6NiKF+T9asr+niP7nRo38Uz5PQ3bPu/eWEX2R5Nt +cu58wzTcPbQ6r/sVAfvnJmObV9NRNqbr7rEmcj9DdosPCdNx9GGTow3Zn/lH +uot5JOm41WefpGgjAdd7GtqN5On4Rubn+lyyv/c+Oqd6T5eOjCT+9OM1BGw5 +wei8uouOZypl/p5mk/X0786BWj86Fu6vW0El58douDzPxz10FF8371VSSkBy +4Ep1yTA6hhtlDlcXE1Bn+zHhTDK5Hu9PF0qvk/1dOE7jKJuOhjRVicFsArhS +ZxuzK+iYe6YgyICcb6949rpVVNNRTyJG5fQ5AvbNOp2YfELHP6Pz7WvJ+VjY +qdgT0E1HJx6m/qZUct5eaU7axiOPqL34NPcYAb83CPaqOcvjpeRvN9rdCfiZ +Jx2n5SaP96tv0p+6kfNnjZIiY5c8ak+LeNzdQe7HNGOv2R55vDEeRjuxjZx/ +1b4/3aLl8Wu5pgCXHZk32/sCydfl8SavrLqHAVk/+zyhf1YeWzcE9D8WJfNa +XJJ//rwC9ipFf7tax4EeWvEV80sK6LkxJIv7EQeizt+6PHNFAWfGgzq8qjlw +P64o1+mWAq6Z4tUWr+DAph352QI1CiiWoXjAr5gD63nPpid9VsBNaYu26eT3 +l/iuo7HhqorIdg9U1wzkwKSwjdf2ekVMa20pmV7GgcE0r+2hfMoYw/q8s1KK +DdbjEdZfdNdiet2Wqa/0chj15T90N2YdZlesTFFZUkp+30twn6xfj/01Ipbm +pcUg3KJ8pnxcBXU/7Myci7gFssllDrq6qvjM1DVuWugGZG9gCIoEqOHf2fDE +5N5CeC5trDOdoY6szAxzy6cFYCBbn67RroHBLxuzPuXmgwBPQZh3/EbsMOfN +4OzNA0oclemqrInSD65+3J+VA8uV3Cucnmqi65aetd/lzoM6S6oswmMTflqQ +SKtQy4LQXuEGGy4tvLBt9WyjfTqMT6c5W2dr4ckAtc2O7algqdF00VpNG7dJ +9Mgm3TkJj6YN//56pY1nT9wqPPogAYJUN3W/9dfBS+VJbzsTYoE15tfmulwX +A0dHpEJWHwVzRcnNqwt0kXvktek+u3BYF5sSWa+nh2YmUnpSzqFQY3id185A +D9V2zUzamIeCw6/azPdMPfQoNFNO1gmFyKDZkmFjPZTcVNevKB4Kze5enwXs +9PACf/3iUEcIBDJ0bXZ66WFufl5oskcI3Jr6LDOTrIdePUa1YiHBoOLPqFXq +1kMVlUtJosEH4D95+z8JH/QQd13QOOdyAGY++ej09+phyrZg5lo4AI/c0oov +D+ghL5XfPUbgADg5fLog8UMPX/nFFf+7sx+OGJ4IXs6lj63LV7lqTuyDZqG3 +9B9K+mgQf7VbKW4v+D8KTLwboo/u8+Matu8CYOzASIR5mD46NZzRXvswACLl +9u9rD9dHYxPLX6I3AiDl2EGnuaP6eO3trhSlowFQbhBOYybp49KNcWVSigEw +X5FQ03BRH0MufTYzO7IbMssuz7Q26GNNIGPIeaM/1Oa3+U2KMbDt7OJp4dc+ +0GdH3xUuyUBNH6Mq94c+wPX7gOtfaQYaP/QOulfsAyaOfPa8NAYe3j1pmZns +A01LDPSkVBj47YbD3TkTH3jpc2W5sREDa/l/UIOrvKFbcW9p+m4GGlF8458S +XjBzc/GXxn0GvimJ19HI9YCh7Rb5pyoZGHnTL8YnzgM6l562Gqhm4CCmyRXv +9oBqL+mc83UMfFDzgXJM0wPiJXUMFp4x0DNQo1ym2R0Ek/cee/6BgeHXWL/M +fu8E1YD3XP7cBnjgNt/Nvr1u4KtUvPziZgMkZCTcnJNdIOqJ515lBwN0Sxnf +nBvsAun+wi84TgbY5boYOrfDBWquH0l74WKAU13HhCbWu4CostWaBW8DTDz9 +aqj75XZoUv4i6hVugG1fDplniG8HlXVUmvIVA0y9nEIXq9wGkypZupwJA7zn +Jaelp+cEnS/RXGTaAMXvtFdmKTlBXdDY1rBZAxzj9Y1dFHGCMxzrEN0/Bhg9 +p5W/dNIRVAy4Sqp4DDFC7dlUQ7Ej+FgfoDeIG6I+57D+akVHaAuwXNXGNMTG +iuENx6kO8KDw7+fZZENMDr69SyrGDnRNw37ZpBqiqz3PgouvHdz7PLoq/7Qh +Jt15MVhqaQccSq+eTaYh8mpn21wXtIOS7LrTly8Z4gvBqRDONVvITzvBsCw1 +xF1Wa/YYvbKBU2FrMrLfGaLq05wf+drWwC+SXPTjvSGeF7hh2CRjDUlsrhqT +TkNMLb5xZQmPNSSOTQ6NfjDE73Ul/lVvreB4YBvTeMgQT+xYL7Qp2ApC3XOG +v82R9/ONN9nAtgQ3MwU0pDAxo39wWauJBSy08Qs00Jg4TD10776KBeT7j/XY +KDCxYeb277vCFjCUVBnhto6JGnu+Ts32m0Posy1lRzYxMbGQGfVfojmk2B+j +PLBgYu4SrvNrXppB1Y7389oHmZizRvxMzT5T8PhW9bwmhIkCdpWSB7ebAldU +frZZGBML/ATe6hqbgsWlfdrbjjBRkGocxythCq0fl+w/lMDE7NzaT3kNJjDi +o97DvsBE6d4fj27TTEDmwMlK9TomBtzKHXvwDeHM4m6d1Hom7hQWzdboRODO +tGB/bWQiMSzYXNGEMFLBeyv/GRNHH48l/ryGUMWVmC38jonTz1NnGbsQ3M7G +Rvz8wkTxhO/vT7EBsquP6DxaycIe07kMuTIWrLJ3ZUsLsNBySdnw3H8siO3T +V4sQZOED3x1Lp4JZEMg7p7hRjIWTbhuUWVos0NsSLlpAYeHJUaardiUT2vtD +p09osvDPPfvP6c8NQWzFfvZmFxY+zGJSXbkNoNA0OmrClYUSJYNppwYYsCn6 +jGmWOwsj/Tc79DQywH6i/H2nNwuXqZbs6D/JgKT22d+++1kIkca/otYwYK4g +xiQqjoVyFj1/qxT1odsw611RMQsL947XXdmtC4GHC3OtS1nk/2nml0e2uvCz +9J7/aDkLT/kPZfzdqAvC8p2/NCtY+EmUKdDyVwds+eVkH9axsExe6VBLpg7U +tBX5vXvPQtOP6ms3NGmDjcADtfBOFj5TWxsqdkcbOi2f/ZTsYSFvDvlXfVYb +Zqq+J3v2sfB0hGN8lI82qF3deOfbCAvFG6+tiuPShppu4/C0HywMSkxMsBjW +AhvRraAxwcIWVsCQ8hst2H3y8NuwWXL9h6J49fO1YKYu6aLEHAsbPyWlBSZr +QfyfC75Vf8j18W8+RwRrgaD2LVWPBRZOF4fySrlqweUDVbOLiyzsrSHqs421 +4H9FRTB+ + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07793646146320984}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07793646146320984}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8fB3CRaMne7rAqGcm83Ov9tmdCSYTMaAkJKZlJqK/RoChJGoR7 +TymjCElDQzJLQpJkKxX5nd9f5/H845zzOefzfr3f59B9Djr5c3NxcRkv4eL6 +//Fn77NGxdRCI2Of605+98yN2i5LHjHujIf9J1wj278pAIq99pHszITqP2KO +N79pQbjD7Q6ezgLg43y+dfKbKQiNSWT+7uDAk4yd/I7ftsKnGvuDMx31sCOy +LSF32BcsFEc+Tna0QpeB452PXw7B7w69cxMd/XA01OPceHcCNJjeKHxbMA1m +j3OL8PhZkP1UOeSjugBVS2J7Tf/lgej+Xbf5THlQuzH5t0rANcjUtKi2d+bH +ySUbcpJbb0BX9sa6ScHVuOoAr4dwajGkFsa85pYSwsessAR7kTKw0d4jLKYg +hG8GS08K08qAv9HJea2aEA4eyqpvUS2DxAGlHltjIbz58nrreosyOCb/cujs +HiG8kDIkGRlZBkH5kv+Uq4Qw74+k1r6eMnDMZava7hRGlye3BO03l4PE2YFT +WXki+KF1qf3Hf+UgueFe4lyRCL7pPFjcwMMG6fqkGI9yEbwKPVxF/GygTKw/ +vLZBBO3KQzI8hdmgZBfsVT0sgiYjKgZXlNigtXRBd0BLFKs+BGp52rJhS5j4 +4Kbnojix86Tf6yw2OKwc7r3wThRHby1t1spmg1NBZdf8B1FUDAkXPZvLhu1v +3F83jYuiqVztbqvrbPBQvVblJiaG1zynhmIq2LBvUCMj3ksMrWn7V6p0suHk +Nmuj1p9iGGD1pj9QkgPSd19Jcy8RR19WpmeeLAdKRbb90lwpjpeHWrlaaBxo +b/Usz6CK47WN4/fl1nNA0TFM3tFKHCPv948kMjhQv/nKsjc54rgtWZG115UD +Cxazr1qYEpjfHtDy3zkOpBdFFS9YSKCL9o9363LI85dxJas5SiBf4dhCTS4H +7J6sMD7tL4HzuRk17dc4cNGURtidkUD6msUvr9kc0EfbCy8+SeBfjcMLnS85 +cIhxddezeElMlzC3sVzkgE2+wIxtmiTezGeYCHMTIM93LPnVOUmU2qPA3bWU +gDdt29nvbkris9st3a4rCFAPXsXT+0oSZ70yf64TI2C4KKJoSloK/UaixBbW +E1C7+ovBYUUpTJt4V5KoSsD5MKfXv9SksKilRJBfgwBzE7W5eZTCY8I6wK1N +QMHHfmu+ACk0n9tq3MgiwF3U/ocMIYV/C8xUYxwI0DpaHXe5Rgpjxj5UNDgR +sKJ/nTi9SQrXM+ZFljoTUFnGA8pdUri5JdEy0pUAcdvK9I2LUjgtwZ2v7kOu +P05R29xWGtMlT0W/CyXAbPxPVNCANOp0Zu5fkkHAEauzKo9HpXFIqj3kQSYB +pVfVukV+SqNH7dKEfWcJkNzmxajkl8Ed1ntfPLlAwOiDJ7941GXQs+/kUtvL +BGTFp4flRMrg487qvOzbBDT3rFccjZPBhKPJNwVLCJjXbnhnlCqDf1pHmhPv +ELD76+ymwTwZTHy7bLN3OQEGdjsn1RtkMNVyPuz7PQL6xZSDGlfL4sPQz91m +dQRIHKyVk5CQxcqPG/47/pgAu+YdLXtosljjMuV7t56AiqhU1TVastjp0BEi ++oSAlE8TI647ZFH463GtomfkfuinXCzxlsV1vyhcj58TMJOhYLO4VxYHCunT +HS8I8DTbfqswWhadz+zY8qeFgE23qgPGC2SxeaXwT8FWAgK4nSVMSmRxrZHZ +ytXvCMjdOdZ09p4sJrSs2MzbRsAyAbqyQbMsZn5PcB15T0B3aNJg4g9ZVGkr +LUnqIiCO6egtrS+Hu/NHpvn7CLDyvDylZyKH8U/OWneSFoj9nuBsJ4d37b6r +XftMXr/hRFG6lxyKFa+8sWGAgAc2Vd+XnZLDydTQKL4hAmL280UrZslhZUeL +H0Ha4sw2AZM8OfQ91TXk9pWAtrdjG6PZcsgeya/IHSZgYodC+HSXHPZRLl3/ +PkLA/ahgPqFBOVwRKx0U9p2A47kPs9XH5PAJu7RjjvSqPpfqPdwUVBkYyJwZ +JeDdkut2J1dRMLZ6fGjfDwIuKkx9LBSnYIHIUF8v6bUBaVx9KhQk/kW8uD9G +wFhyV8aCNgVnBVIeyY0TcPe2soIMUDDkwiH3GNImY3Xm27dS0OjLszydCQKW +Cwp0HPKgoPqtB6YppN9o7gzMCKCgZV98Tjdpz8OzKS+PUrBh80PXoEkClC6Y +yI6coKBjX1UTe/L/9fjfHb50Clrklg5PkCa6PxgpXaTgb6K/bsMUAVHz69+Y +FFJwqLbAwYe0MSXC26uUgtEPDXPOkubHxqnoBxT8t3r+Uj3pV95CiZfqKeh5 +WMttlPS5BE+xypcUpEtpvReaJvN5vbiovZ2CGjGbBbRIyz+d05vpo2BtWvsy +B9Lfhs2fCX2noMIJhbpA0uUrstw0Zin4gD/VMJp0hGrfd7tFCl4V8Y86TdrI +Xi1673IqvpxfcTyHNG9wlECyCBUvh3VYXiX9MuPpletyVBxLUO4qJJ1FiGo2 +rKXi8xRnrf/b7b13fZ8mFb2hweUKafqv0q3/DKnYVPLa8jzpYcn5QRkLKg5q +flh6inSZgXU4w4GKirG26RGkw93P87m4UTH5Ytx3b9LM4wPZYX5UtG4bkLAi +zZO/USUziIqVrzvFVUg/fxxdXRZJxfXRzd/4SKcPPLdriaciW0o28zP5vlx4 +JXtH0qi4XN1I6D5pylr/g/wXqLjl9MXAZNJfrDhcylepOLX1co4z6ZK9ixmm +xVQMH7p/nULaoDTn7vFaKkb6jG4rJPfTrOPVwlgz+fyb8vP8SdtzLbXc1UpF +v/LzWxRI+zoFdcEXKkaE8s1kkfUSdPSafPkYFYV+fR62IB1Z2LmPNkfFJ0W1 +tj/J+rM4So+J5aVhTMAWLxvSL9bUXNNfQcO3sEd0nKxfh8LtzRMCNNR742yY +TnpnS6qQtyQNm/pjh56S9R5M/XnNeAMNn3+zaFtF5mOWSG/+rUFDtqSk8Tky +P1FWG36wtWmYdOCkijTpEyFeuvJGNBRM0IuUIvN3seF5M7cjDYvs39DHyLxS +d/j/qHKmYbFVzPn/57dwdFHokBsNNya9zWgg810mprNzwJeG6TKH6KlfCGgM +uPKjIZyGc5E+zRP9BFjPM4SPHaXh7U0fzxmTfpXepqsdS0MbC/2ZM2Q/6apc +Hlt4ioY3zB4FUsl+M7YyTPhELg0/6sQ6S3wk+3u5lZ5FPQ2t31r7+bUTkGc2 +sPNfEw3Fly5+OE72M/mu6NiKF+T9asr+niP7nRo38Uz5PQ3bPu/eWEX2R5Nt +cu58wzTcPbQ6r/sVAfvnJmObV9NRNqbr7rEmcj9DdosPCdNx9GGTow3Zn/lH +uot5JOm41WefpGgjAdd7GtqN5On4Rubn+lyyv/c+Oqd6T5eOjCT+9OM1BGw5 +wei8uouOZypl/p5mk/X0786BWj86Fu6vW0El58douDzPxz10FF8371VSSkBy +4Ep1yTA6hhtlDlcXE1Bn+zHhTDK5Hu9PF0qvk/1dOE7jKJuOhjRVicFsArhS +ZxuzK+iYe6YgyICcb6949rpVVNNRTyJG5fQ5AvbNOp2YfELHP6Pz7WvJ+VjY +qdgT0E1HJx6m/qZUct5eaU7axiOPqL34NPcYAb83CPaqOcvjpeRvN9rdCfiZ +Jx2n5SaP96tv0p+6kfNnjZIiY5c8ak+LeNzdQe7HNGOv2R55vDEeRjuxjZx/ +1b4/3aLl8Wu5pgCXHZk32/sCydfl8SavrLqHAVk/+zyhf1YeWzcE9D8WJfNa +XJJ//rwC9ipFf7tax4EeWvEV80sK6LkxJIv7EQeizt+6PHNFAWfGgzq8qjlw +P64o1+mWAq6Z4tUWr+DAph352QI1CiiWoXjAr5gD63nPpid9VsBNaYu26eT3 +l/iuo7HhqorIdg9U1wzkwKSwjdf2ekVMa20pmV7GgcE0r+2hfMoYw/q8s1KK +DdbjEdZfdNdiet2Wqa/0chj15T90N2YdZlesTFFZUkp+30twn6xfj/01Ipbm +pcUg3KJ8pnxcBXU/7Myci7gFssllDrq6qvjM1DVuWugGZG9gCIoEqOHf2fDE +5N5CeC5trDOdoY6szAxzy6cFYCBbn67RroHBLxuzPuXmgwBPQZh3/EbsMOfN +4OzNA0oclemqrInSD65+3J+VA8uV3Cucnmqi65aetd/lzoM6S6oswmMTflqQ +SKtQy4LQXuEGGy4tvLBt9WyjfTqMT6c5W2dr4ckAtc2O7algqdF00VpNG7dJ +9Mgm3TkJj6YN//56pY1nT9wqPPogAYJUN3W/9dfBS+VJbzsTYoE15tfmulwX +A0dHpEJWHwVzRcnNqwt0kXvktek+u3BYF5sSWa+nh2YmUnpSzqFQY3id185A +D9V2zUzamIeCw6/azPdMPfQoNFNO1gmFyKDZkmFjPZTcVNevKB4Kze5enwXs +9PACf/3iUEcIBDJ0bXZ66WFufl5oskcI3Jr6LDOTrIdePUa1YiHBoOLPqFXq +1kMVlUtJosEH4D95+z8JH/QQd13QOOdyAGY++ej09+phyrZg5lo4AI/c0oov +D+ghL5XfPUbgADg5fLog8UMPX/nFFf+7sx+OGJ4IXs6lj63LV7lqTuyDZqG3 +9B9K+mgQf7VbKW4v+D8KTLwboo/u8+Matu8CYOzASIR5mD46NZzRXvswACLl +9u9rD9dHYxPLX6I3AiDl2EGnuaP6eO3trhSlowFQbhBOYybp49KNcWVSigEw +X5FQ03BRH0MufTYzO7IbMssuz7Q26GNNIGPIeaM/1Oa3+U2KMbDt7OJp4dc+ +0GdH3xUuyUBNH6Mq94c+wPX7gOtfaQYaP/QOulfsAyaOfPa8NAYe3j1pmZns +A01LDPSkVBj47YbD3TkTH3jpc2W5sREDa/l/UIOrvKFbcW9p+m4GGlF8458S +XjBzc/GXxn0GvimJ19HI9YCh7Rb5pyoZGHnTL8YnzgM6l562Gqhm4CCmyRXv +9oBqL+mc83UMfFDzgXJM0wPiJXUMFp4x0DNQo1ym2R0Ek/cee/6BgeHXWL/M +fu8E1YD3XP7cBnjgNt/Nvr1u4KtUvPziZgMkZCTcnJNdIOqJ515lBwN0Sxnf +nBvsAun+wi84TgbY5boYOrfDBWquH0l74WKAU13HhCbWu4CostWaBW8DTDz9 +aqj75XZoUv4i6hVugG1fDplniG8HlXVUmvIVA0y9nEIXq9wGkypZupwJA7zn +Jaelp+cEnS/RXGTaAMXvtFdmKTlBXdDY1rBZAxzj9Y1dFHGCMxzrEN0/Bhg9 +p5W/dNIRVAy4Sqp4DDFC7dlUQ7Ej+FgfoDeIG6I+57D+akVHaAuwXNXGNMTG +iuENx6kO8KDw7+fZZENMDr69SyrGDnRNw37ZpBqiqz3PgouvHdz7PLoq/7Qh +Jt15MVhqaQccSq+eTaYh8mpn21wXtIOS7LrTly8Z4gvBqRDONVvITzvBsCw1 +xF1Wa/YYvbKBU2FrMrLfGaLq05wf+drWwC+SXPTjvSGeF7hh2CRjDUlsrhqT +TkNMLb5xZQmPNSSOTQ6NfjDE73Ul/lVvreB4YBvTeMgQT+xYL7Qp2ApC3XOG +v82R9/ONN9nAtgQ3MwU0pDAxo39wWauJBSy08Qs00Jg4TD10776KBeT7j/XY +KDCxYeb277vCFjCUVBnhto6JGnu+Ts32m0Posy1lRzYxMbGQGfVfojmk2B+j +PLBgYu4SrvNrXppB1Y7389oHmZizRvxMzT5T8PhW9bwmhIkCdpWSB7ebAldU +frZZGBML/ATe6hqbgsWlfdrbjjBRkGocxythCq0fl+w/lMDE7NzaT3kNJjDi +o97DvsBE6d4fj27TTEDmwMlK9TomBtzKHXvwDeHM4m6d1Hom7hQWzdboRODO +tGB/bWQiMSzYXNGEMFLBeyv/GRNHH48l/ryGUMWVmC38jonTz1NnGbsQ3M7G +Rvz8wkTxhO/vT7EBsquP6DxaycIe07kMuTIWrLJ3ZUsLsNBySdnw3H8siO3T +V4sQZOED3x1Lp4JZEMg7p7hRjIWTbhuUWVos0NsSLlpAYeHJUaardiUT2vtD +p09osvDPPfvP6c8NQWzFfvZmFxY+zGJSXbkNoNA0OmrClYUSJYNppwYYsCn6 +jGmWOwsj/Tc79DQywH6i/H2nNwuXqZbs6D/JgKT22d+++1kIkca/otYwYK4g +xiQqjoVyFj1/qxT1odsw611RMQsL947XXdmtC4GHC3OtS1nk/2nml0e2uvCz +9J7/aDkLT/kPZfzdqAvC8p2/NCtY+EmUKdDyVwds+eVkH9axsExe6VBLpg7U +tBX5vXvPQtOP6ms3NGmDjcADtfBOFj5TWxsqdkcbOi2f/ZTsYSFvDvlXfVYb +Zqq+J3v2sfB0hGN8lI82qF3deOfbCAvFG6+tiuPShppu4/C0HywMSkxMsBjW +AhvRraAxwcIWVsCQ8hst2H3y8NuwWXL9h6J49fO1YKYu6aLEHAsbPyWlBSZr +QfyfC75Vf8j18W8+RwRrgaD2LVWPBRZOF4fySrlqweUDVbOLiyzsrSHqs421 +4H9FRTB+ + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07793646146320984}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07793646146320984}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829347174938*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"6f82cbb4-6f68-4062-aacc-06892d870172"] +}, Open ]], Cell[CellGroupData[{ @@ -2599,14 +8090,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918497405884743`*^9},ExpressionUUID->"650e43f8-1352-de46-8137-\ -52adca93b0cf"], + CellChangeTimes->{3.9918497405884743`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[BoxData["12.55365498952246`"], "Output", - CellChangeTimes->{3.991340544411957*^9}, - CellLabel-> - "Out[337]=",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[BoxData["12.351551244845487`"], "Output", + CellChangeTimes->{3.991340544411957*^9, 3.993829347195922*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"edcd936a-e028-44b7-831a-d61ac40bee62"] }, Open ]], Cell[CellGroupData[{ @@ -2662,157 +8151,293 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849742961588*^9},ExpressionUUID->"9ad75b45-8f6d-114b-80bd-\ -d2b12a49fd20"], + CellChangeTimes->{3.991849742961588*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 341, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544611845*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.391199687499616`*^-233\\\", \ +\\\"13837903517621823881868475992501522797012013156236308470069045755904000000\ +0000000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 99, 13, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.993829347253106*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], +In[99]:=",ExpressionUUID->"e4be6299-623a-403a-8952-fe9049469386"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 342, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913405446218624`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.904529881137401`*^-239\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 14, 25990558299389529475, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.993829347257051*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], +In[99]:=",ExpressionUUID->"91eb1d82-6956-4320-893d-b054ddab8db0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 338, 343, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544630844*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.728064769249007`*^-246\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 15, 25990558299389529475, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.993829347260379*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], +In[99]:=",ExpressionUUID->"70203d31-0f8e-4e0e-bd6a-421adb6a46b5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 338, 344, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544639845*^9}, +during this calculation.\"", 2, 99, 16, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.9938293472634687`*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], +In[99]:=",ExpressionUUID->"f6e41f9f-f1c4-49dd-b6d7-448ba353eef1"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlXk8VO8Xx5VKm32XdWYssw+y1dz7HEuWiDZCkmwRFSJKRWRLyVLITsg+ +krQgKkkqoUiWJPItSRQi229+/9z7er/u6znPOZ/zOecqOZ/c67aah4fnPPfx +//fsp5dNpNh8XJ3l7yoluh1/nyV1Rr8nDMne2FP5u0sKgfhbZ6meRLRqxcbz +UZcaOr275ANvTx569oL6LrlLFwlPSCbOf6hCe28kY0e7TNFgneXJ6Q9P0drg +lzt73tsiY9LYwNSHTsT8ucGyutMDzX/QuTH54QtSzJxfp9EahJ4Z3s7vyPuD +JI5Q/9SXxyDZwYejzrQlNOLkdu7910Qk5n24hM+QF7aZL+kl30pFierGtZbW +60F0q/rV7qQs9DGV1TglxA/9aPSZ7NdcFJsf8na1tDBM1g/YlYXlI8nrwzFJ +maJwiDpi5vihEEXtN8M7Z8Vhr22t5ExLETqll3v4ZZgU5AybO4vklKCdOQLT +5lekQOp8T4R7YQki8J2LbrshBW2FtIyashLU/t7mzrsiKbj6XTN758MSxPDZ +zPupTQqog6wp/c4S9K0wsPC3jDTIFbUfPM5bihzELH9uuSsNwdRjutXOpcjo +17+zJ4ZlYM3y/ZfjYmXojOl1ypNxGRB0/XVfQaYMVeTSe0VnZUAiv7rEUqEM +Se130nu4fgu0aazOzCGXofEHz//yMrYAYV18hRhehpLC4v1vBm0B/bXVBzD3 +MvRFXOVEE78s3N4Teena3TIkebJBTlJSFqqvmBcaPChDFi22bzwVZeGpO/3F +VF0ZqjkbSxPUlAU1t+61Rs1l6PLg5JidrSzM1PWfetBThjSKa4/+ypOFxPiq +5c+LZegie88RGV05yFn468gyKEemjlm/dQzkwKvj9InHxuVIIPRHuLWFHCg4 +731uYl6OMp5FFMY7yUHPPZKZxf5y9GDnox/rYuRgujyrWNa9HE3aEk//+SgH +0jbsrt7ocuQYMHP5dbA8BMz67X3TWo6UUwxkxyLk4af1zqNNbeXc+q+V88XL +Q9G7lec1neXo7CK53SBfHgjk20eu9pajG+GO4g9fy0Nqb6rE6rFy9DrhRXaB +nAKY1UXnbFhfgbZV3Ky+0KAAC3M+DYlQgYw+tC1NtCjA/KOB+oeGFciSZ43J +4U4F6GFcLeo3rkAue098RF8V4Oumu4YSuyqQcbBSSOhaRWjaaZRqa1eBfBRm +b+lTFYGaVTEr7VuBmo5m/3x2WhF25oqkJmRWILNFPZFzwYoQ9aW/RDunArXF +v9feGqoIvRqxdz/kVaCPDzeE5scowtNbq4r4iyrQxCZ/kYgMRfB7E65qVlWB +pCpNdYyfKsLba8vvl59XIO+5qdAWfiUQpBOrj45x6/F1lxgVUYKDF9xIj8Yr +0Pqx3lJeKSV4rts+wverAhX0PevGCUrw5JK77Y0/FejT4xu0e9pKYBRRJhO0 +WIGsIvR6cg8rQTdP4tVD/Bwkv1x+vMFVCSp/5+xwE+Sg8dME3gFPJeg6ueWA +hzAHRXtsYkj5KwElLjPaSZyDGs0HwuOilYCzNU9LWo6DNEQuMoPvKMGDFmlW +GZWDeGJnmlJrlMDqHbnRk85BbbzH7GtqlaCxbugOgclBXjN7I6aeK8Hgw/e1 +kRoclN9D6jvaqwT7NKVPSepxkER2S+R+XgL4kl+lH9zBQSOSmKzfegJkyHY7 +vzXmoKr4O3eu8RNAOdTwKm7KQVZhaf2tkgRYJ1iwUdCcm6+bt4Y+jQDBDV3J +Qbs5aJ4q9IluTYDtShabjttz0GymzEVNewI4BUprJRzkoGlBZZLeYQKYu5X2 +VDpw0MQfvWNGngS4HSMd9sWRg77UuszanyfAzydtqwVdOGiQfuKmUxgBihcG +cwRcOag/O4jtHkWAKIkb6RvcOKg7/GqYbwIBrGsgccqdg1rN7wtEFxDA64v6 +QPQxDnpR/+TO1RIu37KodfbioCbm6/1JHAI4yh19ouPNQY9Fh9KyHhLA4mqZ +0rvjHFQb8QPLf0yAQw/sPG6e4KAHf2c+Fz8jwNTcPMf+JFePvo2q994QwPtZ +gWibDwdxdom3PuokQKzRTYlQXw4qa1A43viBAOdubP9G8+Ogwltb774aIkCk +uF7d6VMclObliL7MECCg6cXelwEclDLg8eW/fwSY1wtdtDrNQdetTkX8XCHA +ciplpJ3LcZrRr+Y2EAHLMxZ8EshBsQWJJ5YFiOBueECRFcTVXzJTeI0YETKk +gjbe5HLYwp0DgvJE+EwUmDlwhoNCjtf9EyMS4VO2+P1yLp8bbM6UUSOCcy+9 +a5HLZ/Z0gCKdCCJ2bdQdZzno9LO+YWUNIgSvT7wRyeVTWqORVB0i2LKJPxq5 +7HN7kqzOJoImXZV3mssnpBdea+sTwaFLrUohmOu32LU+bGMiSFmEtxpy2WNJ +UNTAnAh+keayTlx2PylTY7KbCOuj9AL8uewyRLLbZU0Eu80JOaFcdtrHXNxr +TwSLvA1HL3H50HO9bNvDRDDTqokL4bK9jpGBoyv3vNB4ry+XDxRbfnXxJMIb +Z/Lmg1zev8Uu2vME9/v2hcFtXN5z1YV68hQRFnmGhYS5bLlyvM0/iAi3z263 +GeDmb+4b5Hv2PBFo++Vcs7lsOhwmFhpGhIuY4Q8bLu+wvno/IooIkfE/U3m5 +bPAixT72ChFWMp5LFHD1Q3p5S/EJRLh0tXHjdi6zS8tykpOJIPZ7leRzbj/6 +FEuzd6QTIbP78loLLp9NLs6azibCeYvnUy+4/ZTaXJR5K58IT5ibInW5fP9i +YcbeYiLXf2c9M7n9t/mbn76qgggC7Z/RLNcv09630iqriBBge6vYgMsatjmp +AnVESD1kdbua66+ON1kp9Y1EuEvFjn3k+s/HMDPZ+zkRFN1c5Se5/qxgpF1v +bSOCqvpw3BTXz7vyU5POvOPe15J1sI/r93HplES1HiLs62Btu8edB/La6/GR +Q0R4G3hUUYc7Py1nE69pjRLB8rKS5CdPbj8n4+NGxohAGby75OfB3S99V68Y +TBOhXrPJxJU7n4Z7rsROzRFBZ/OZ0w3cef7SfPlyzhIRYHYXdZ0zBylWRUUv +ryNBcF5lzD7u/DeoRkaVbyJBivO2HlvufnDMvBTpIESCUMHaWWPuPkmPvnjp +kTQJ5tam1fRac/fX4eDQ0zQSmP23s7CVu4/uvT8ToqxOAn0FgUUeM64fdgZd +eK9FgjpyQKM0d58lagWc00Ak6HoTtzKBOEi99FTwkCEJAu8N5RazOahd0e9s +vCkJDP2EVhty9yP/5pNBE3tIMGJuJijA3Z9lF48HZtqQgK9o9wOMwUE7/3qd +tjhIgl0p6pKmFO48fvHwL3ElAfFSdtU3JQ5a89DZxz2QBI/Ehg9s4+77W4wj +J8XPkUC778cbxY1cP+UfPtEUSoKJmej/etZw5/WagzfhMgkG6EPSD+crkPza +g14dcSSw7j1b+Yn7f6k7a3csNIkEkbSU0fafFeifm43HpwwSeJVsmhcfqkA3 ++/YfvZpLgiLWKoZ7bwXS3bPPnV1IgtgTf++ef1eBTrN3u6ZxSFD1PldrqakC +TYnsdLJ5ytWfFf1GoqAC9XgT2o+9IEG3M+/ruvQK1Nj8D4W8JoHk+0NZIokV +KP5sqUJRNwn6XyZoNZ+vQEHvw6/V9ZHA84kQQ/FUBXJiOKy0f+be/yvImeBR +gVhfNg/Oj5GAsQSvJfdw/7fsr5YCkySYCXQn8e2oQDzJ9Y8JMyT43P1pOVm3 +Ar01O5FlvkIC8enpoHj5CnTizttDmaLKEBbjZl39tRzZbCp6c0dKGRauOqb5 +dpcj3C0Ua5ZTBnEF98WG5nLEL60u90tVGabWEZLXF5ajstDEfmArQ7bWQpH4 +4XJ0vfeYhbW+Mgi7sszULMrRua2GdZ7GyuDYp3qjXrccmX/7k564WxmurTK4 +6ClUjsasrA+OuCrDZ85RvrSHZaizmP5qzlMZ/PVCqTfyytAj3nXb+U8qg9ca +auW62DIUc79GRvuMMugL7802sS9DagpSvVFXlWFG6GGNwu9SJHRm0iwjURme +ni1RLusuRXOdLQ8rU5Qh4UehWOGjUtQSeebmx1xlkL6PmQ+GlqKjE7221Bpl +oLy7b2O9rhRZmt5tQbXKwKcqEr59tARp58Xq7m9UBt7fhKnLz0vQOhu21PlW +ZfirfEXQLawEFdZnfmj7pAy6G16P8c0Uo5ErTjZ+fCoQ3Ow87Pa4CJ0YoxFY +m1Xgq6ta0cuUIvTXZP7nTyEVcP7vG1+VTxHayJsY4SmjAsMep/aIKxUh1pln +1U50FUjo1o0yP3cbnXdTEbXax42H53KG5QqRBD7+lpqtAhIZHet45G6hnPQH +6d9vqUDl6qRvxWN5iDx/6ejtIhUQO6CgrPQgD7Gr5VYIVSqw5nJx8qW9eciF +YsWQea4CG910I4IjclGlRNWV9T9UYP7Pigfelo3MfgWafdVWhXEXvbd5zjeR +rLp85Hq2KtRa2Kusn01FE35NT6n6qnCLk7nxT0wquj4rxPYzV4WpiEXVoLsp +6NNSMWPlsCq0/t3zVkAgGflt7heVjlEF07CLSm7/JSIjy7Dd7DhVMFvI2+Md +mYgk49WuHk5ShUmbxuwjKomoTjRgXWGmKnTL3j9O8UxA67YIzGtUqUKImFm3 +x8w1lEaGTxZ9qkD5dnHqd+5l5O01KuPzWRVUSijnElddRqj8yoGkr6rgebgW +O+8Sg0ZYH9s//lKF0jyxfH1GNGLo+j1zX6MGks84Wq8HIxDPWSmeyxvUQOjc +zWSBvRHoXe1jdrmAGkyqtjqUNV9CQWhTzR8pNWgsOvH9X004emacXxRKVwP5 +laslXXcvouTonV9vaaiBh53Bpf90LyKP1kmlFzpqQLr43GJXYygSsMTS+Q3U +YF72hr14WQiyte6+mmajBmqD5QHjeucQJeVca/1BNTCw0qou9AhGSz0EviEn +NTg/s4q/M/0synM4GarqpQY1t/qbbQTPoHGX9aeqQ9QgQyAx9x/5NJrIMqpv +uKQGYwbV/0wvBKBfH0P5XsWoQW3vG62r3f7ot9V8+lCSGrSpWhi1JJ5Cf7eP +NQkUqcF+4bt4pa4vmjutIihTrgY+2/64HCj1Qf/uONspV6nBnoag1mtKPmhR +te/n9jo1cFIKNVxknUCrxV5LeLarwczjDsP0Q8fQGqv1R/y71OBngX3MfJAn +WnvZqDSkVw1Ewxrk0tM80HqeepQ8wtVvUjRUa9Idbdw+H5P7XQ22PZx6NU10 +R5tOa70vm1ADibGPJy8dckMC4+Uez+bU4LfwUnLukAsSUh2raltSA/Xn2zNn +qC5I2Fll6eNqMghvP8B/O9gZifVkJUxuJoOlkbV4JeUIkm669khOiQwBX5gp +UdGHkMzKqzVkFTKwL9tpffB2QLLb1lttpZJh92r5CCX7g0i+MnR4pxYZth4P +/PvG0g4p/qij22wjA2f4oulza1ukpDIfeASRwdiJp2bI9QAiZfhuDjIjw84q +25uP0qyRyodym3BLMhjM284JPdmPVEXGcuL2kSGL7/fuxol9iBLtrFVwiAwv ++QqE3A7vRSz/fY6dvmRYbpqfllKyQhqca0UDp8mQPpyw/0PPLqQ59ur3t2Bu +Pa3z43YZFkjbyShqJYIMB+oT7+/ZsRPppId2bIwlw3Ru2ns5ihnS7a7bIhFP +hlV9HWsdpE3RdgutShp3SPwnR0QmxI0RO8r3n042GRZeN5cXEHYg/Gm5kWE+ +GZo7rPuTdY0Q6Kp8tKvg6qPur7dywQAZkyRXRz0lw7qvLvzu/Tj67mxStP0F +GZxObIk2TMDQldxAy8lXZLCa1nI8v5eN3sn3pNl1kSHwMnUyaE4PnT60Xl+g +lwxrfdzGz/TrIpkM3f+efiLDjo7Zh9avdJCT9E1N2jcyBGklXdRq0UK8ti8/ +fh7n5vOw6s/lrq2oMHk+5MYUGX5NTko7jmuicVH718v/yNBOIl/V1dJAZwS2 +uHXwU6A95FfiLRsGkt1lvilShAIhR0imGnM01BgbfGebJAUyyyM5YkVUtG5D +/9ItRQr8shg/95pFRsUmm/NtlSmQKKOge3u9GrKIZO/kp1AgfVcp7fO4Ckrk +zUw+rUmBifXnNbN7SEjL4A2bqkuBrtK/dJNBIuoJXfoyyKYApYUukDBJQArL +h5hmxhTwmDm/6pS6EnrKjuta2kkBg0rT3SZOisg9+HFwlRX3vjqNSi+WAiqb +k2/ZYkeBsow5g7+GsshKx+pE+yEKdCBdF8tRGfQ7IEQswpl73ubRN0qqNNL7 +M+g04UUBzYnh46vVJFG/uhDfLR8KLPDee9KxRgKF+kD5gQAKXPtr86ltQgw1 +/8yZb7xAgQCHaD2NbyLIk9aRHRBOgUH/TbrXZ4XRZq9VxpRoClgWXsO2CAmj +vd+OJCYlUGCH/PrUsOcCaEYlUdc0mQK2rRteL2vxo1S3p58W07jxn+t0w8NN +aPALgeqeT4ErZ6B1bHo9ClPa1yFTTIF1PasevC3lQypO4YFvy7n6+XUJ+vut +Q94Dw89071Pgu2vqJkPaGiQoK3bsZy0F7DPcDxDkeVGVvZFQXiMF3kh1T5Hl +VqO5D/kOm1q59R1/JOoEPChdomt1YxsF3Pa99/jWvIzj1muL/d9RoG3d7H+z +hCU8otNtZqCfAkMaM8ZdUv9wNeHk9MQhCvAb7Zp5XjmHv7Zq1jcZpQAh7cer +Afu/uMgblbjKX9z645vZ9C/T+PIvVkHrNAV0NvntGi74g4+JbK8bmadA6ahA +gXLwb/yprdWY1BoqELXQy0abSbwi2G6V5gYqjMQoUj7WTOBpWS5SuwSoIHSh +Iyepfxw/NRJofFGKCsyb0Z17Ar/jTnxhh9LlqCDcPAaJ3//DLShX/O8RqHDB +2PZ8ud8orrsrOfatKhX4a58tHxP+ipN8cvK+06gwHHzbN7dpGBdKKnnIq0EF +/ww/Ye3YL/jivep2OR0qSMEzPlnXIfz9QsvyHn0qeNzO3N2V8AlvlH8n7m1M +hcIn7779KejHy/QHaJHmVAgNTA/Z9aEXT3X9zzBnNxX+S1rjYkD6iEdETdk/ +sqaCpHWAtGnsB9yvZMH3vT0V8kbFj33b2I07vlkbM3GYCjziDScac9/j2qIy +9wnHqLDtkMSO/wQ7cYI2qY19kgqlzds2vBxpxwXsGF9t/KmQepqVwJ/6Fv8X +rLvoc4YKIgfU1hBj3uCjWQaisReoMB+5xrYj7RXe+cSCUhDO1fdp62rNVy/x +xyM2+g3RVHipYFV+TqoFT6F4nfyTyI2nQeOR4H2OX9oVEMmfSgUV6YvVxpnP +cB+fkEzVTCpQp3dsVbB8ijskxVTr51FhbsvXRSOxJ7hpTdKrg7epkG6iUzbU +34Bv/Zj5JaCMCpnf48r7aupxxcXb89fuUOED37/vrOpafE6/TrWplgorRvJd +p4Qe4COuzfinRm5+QbQjvl41eHtUu/Xccyq0umpXjw5V43Ulvd4ir7j5LGWo +K/ndxYvfjITT2rnxznR6RMlU4cmTE2nGXVSIk7GoT/lYiYeJzt9x6qWC8a1e +rO0gB7e34/98fYQKx/2qrvEQSnHjc5J/K75TwXX9yTXV24pxjWwlgZcTVDhf +rCOq5H8bl39KVR7+Q4XHlbt7Wa8L8I1ftdhLc1S4/Ts6dxzy8Vk+2Ce5TIV+ +hpvAufY8/Atl5zF1XhrMKWWfJJ7JxWt9HFPd+Gkw/Gz3ZK58Fl6U5MEJEaHB +C8NtL5/8Scev1/g135SkwdOKVdMav27ioR/PDdyVpcFsUNiBkwKpuPdi5PQb +JRr0SyvISlsl47YKCZu+qdCA1yZk31zFddzIIJ2wmkaDx6NujXPUJFw2mrNb +W5sGzI4evCogHi+pKH82v40GD356/UwviMN1u0q16xENft2MtfSLvII3LxQX +hxrRQFZfeOpU7GV8P6FI1siMBhmqR//trYrGv5gWXuOzpMG7lSb4OheJ+5zM +X/1qLw3MONaGhEMR+JW6nG97HGiwlNtjLRkYhssMZx0UP0KDby9XhqzJF/Gi +DZltPW40+HGhNi5hJATXZqXrZxyjgUH4cP/3nPN4k83N6sMnaUD8Rk/7eSkY +33s+RZXoT4M4/NGG1XFn8M+3bqSNBtHAl+hNrnkYiC9MJoQeD6NB8sqmYwsn +/fFoyfg/rCgaVMxtzHOb9cMl8Dj36VgaJA7OnJRL8cXzXa98vB9Pg23OGUJO +u31wjdjLFsE3aNBkXkAR1D+BN96JbsDTaPCn9qupyGZv3LInUmN1NleP1ozC +0WVP/JhyuFRMEQ14BD4Uuuxxx+fML8ZalNMgZ8fqPnKZKx7pF7IsWEWDni// +if0lueBiN8/7vquhQUrTt+zah0fwvIbgkeRaGjTqM85d9nDCWaNnDtg3cjnZ +xY1x2BF/vDmoVe45Dcreylw/KuOA99r5V+a30WDFaTh4eJMt7hHqR/R4RwPh +iNL682wbfLbQJ5naQ4OhkFd6n+P245fenNjwq5/Ln0+ll/Dsw0Wmvc9VDdFA +l9ZQWHBtD54j4/UrYJTrvzXaiY16u3GGvqez3g8aeC+dF5X7twvfGedm2jhN +g4amQB/veDO8p9qlNnyeBhfsj4aX3jTB3fuOMEyWaXA34uvK4ZYd+PQqp9yN +vHTYWu2p/0HaCA9TcxRr46ND2fvhS3GxBriQlUNUwmY6zKmq1jK36ONZAfb/ +9gvTIadut5zcVYQ/fGrzuU+GDvs72hJUO7bhxt/378tWoAN8dO3WvK+Lvxfc +1+xMosOm+d2vWc3auLP2Hj0VMh1O+T5QllnYik86WJV9p9NB9PW/M4R9mviF +8F0K5Rrc+2+2RnJeqeObS8wTfXToQPpTwbFxZuFqf02C/gIdAr7XeZg8peI1 +csY/Hu2gg6feU4crl8m4kZGR44WddJB7dm96/IIq3nnMoEPfig7HKjT9JDKU +cacEMFq7nw5t44Ybpj8R8Yn7+P0WWzpIh9FjSowI+LlPbMqVQ3RQGXlpdb1V +EU+l6gmJHqUDW2OPyBN7Wdza/E38Yy86THsfm/wuIYOLeB0RPubDzT9Qw4LK +I4W3XZ5JEA+gw5AOD1tOVAKPLYkReXKGDkl5UckpFmK4aatckvcFOvSpyPuX +F4vga8buiEqF0yHl0MelIlVh/AK5V+zkFTpcitr37MfcZny72YkbMgl0SGh7 +LZKWuRGf81gt0XyDDkfELT7I+a3Hq6OTk33T6BBTrb3Y7LcO9y2iSMpl02FR +aT8PLWMNzmh5nNJyiw47+Z70k36sxsf+2yvlX0SHV2rxxs0Oq3BX1WDpV3fo +4LXGiNG9bQlTMhFMO13DrV/JuMng7T/sk/stGUItHe79TTWvvzGHpUXqpL9p +4LKrwmfry7PYgcJXW8400UH3U+pNz+JpTKz5cAbpJTceb2hvxq/fWPvXP7Lt +b+gQq9qyrttuCtupLCuv+oEOGW1FSF/+J8a3ozKrs48O/+aaPrBLxrAmVyOF +C5/pwHlscfqr5zfs4qWebPJXOpxeWCMqYTeK4fneil3f6TBVZOe+eGoEW3jG +kxs6QQc/VevbIve/YA+GryvR/tBB+86tx9IKQ5g6sZ4Qvsitn/eCY0h+PzZh +sOcWYxUDLrAONquwerES56/E3rUM6IxeCPGd/IAdDTuTH7GRARvX71grMtSF +kfL4ldUFGVBs/z1YZPkdNvQkt6BflAG94VUTbww7sawhLZVoKQZM3UlZP1bR +jh1c1VqoKceA8I/B8XlBbZiUkqPqoBIDDls5GB/sfIV1we/bl1UYsPDTTOmF +20ss0SlSTZvKAK+0oW8yjBeYZahM8RCTAd20e88nVJ5jm3IqyFe3MuCAjPIJ +bYtnWEuDQYmuHgNqDymN66U9wS4NdlNGMAboVcVOxvE3Yvorx0qvGTCgrzR8 +n7JxPbYsv0LdbsIAPn2KagvnEVaLJ5WNmjPgzKLFyfq9D7AgR1V64m4GXJuI +LKVSarCtF2rLMWsGDNrO9mSrV2NTmVaM73YMuPHYRWutWxVWUT9ccd2RW0/u +cmFmYyV2bCCQCS4MmJcID5q5WIGpLm2q/HGUAS3Mnz4Tz0uxEdkcVoo3A7AY +eyNnk2Isl731joEvA97tCkhav+o25ujQoj4RwIDUacb5jRP5mMw5h6qbZxlw +77CezfyGW9iH9EmNHSEMKBIOlWvenYtdr710dzKcAV81FPBT57Ox3X1SWzOi +GTA+MHCyNycD418oqza5yoDd1Z8dotemYa0y+lp/EhhQenxA5VVBCtYuz1FZ +k8IAHV/N9g6rG1g3QU5KPIMBm4F1t0UzCetXid2gksuAgUlfPpZFAjZEmf+n +XcgAuxAFT3G1a9go4+i4SSkDLqX/+ZPPfwUb1+gasK1kgFaS9I5eiMF+axu+ +9bzHgA17ntvteBSJzW2703j2Ebcf5PxCtVOXsGVcoSq2gQEWj7MaPdzCsDWG +V29lNDGA9+fS2fOxodhGk4Xr5S8ZoJAmdq+l8TwmaO4Z+biNAZsKf4WoNZzF +xKw+BL59x4AukyGHkQ1BmMy+HZ6fexiwmvKYEnczAFM8cNd+aoDr1+ij/MeP +nsJUDipZrB5mwBXbkhjv474Y7fA1TPQbAz7b1eyXsTiJabgsMUg/ufpbPpQs +l/LGdI96KWr9ZsBdpTMON3Q8Mczro7DxXwa4EwuGqnPcMYOTJrwHFhng/C9L +r8bCFTM9dW/66ComqJVMv57f6oxZBhJHg9Yx4bfq98xL+5yw/cEJH2I2MUE8 +Xs9saMchzD5kpSVNiAnvDwxh9Wx7zCn8+KNScSZkf15w7Qw7gLlH9ZXWyTAh +sGAwXEPIGvOKNct8o8CEczxX7tYM7MV8rt2P+0RiQvjxJa3xkd3Y6STl0F9k +JnRtvaO+DiyxcylJvjxMJmz0YMyeEzXHwtJXuQhvZULK8X1Zr7eZYtHZJ/cT +9Jhg6vZj3L98BxZ3a2CHJs6E214XaG0uhtj12+Y6RoZM0Ov/KDxto4/dLH2o +Zm3KhN6IPiO3VQjL4qjKuO9iwkufd/3fa7Zj+XdvbArcyx0Bnqavx5p0sZL7 +vEtRB5gwNRQ2N6iojVXW+k6kOjDBeqnvJblJE6tpGBwsPsKEv6LF8guF6ljd +s10dj9yZIPzIajYqgok9fVH79JUXE4TWz1ZgRBr24hW5ut+HCfovwnaHyJKx +129TCn4GMGF0yF/u5VEVrPPd2pTls0y440IUil8kYj0fTkULhjJBQsZhQu2d +Evapb+iMYgQTOgna2S4vFbCRQSsv9ctMWJA3vbtgLYuNDdc7GFxjwlaN/vm1 ++tLY5H9Uy33XmWDD/99yYqgENvPjJnK9yYQ9NOO9jzaJYf9+8akHZDEhanVX +Z0ivMMYzHUCIvMWEoqdlRoGvBLF1c8OiKUVMsHiWtrLecjO2eXHP2qJyJiwt +HEvVVd+AifA0zj6oYoJWRNy6+mPrMKk1jG8v7zOhgHRgwmmKF5Nfn/Gxt44J +Yn0ndozWrcKImze++vGEm1+5YdHH2BW2mlBQ3WIzE94Q/t6o2bTIZoiNlvO/ +ZsJgZ5DNjZ9z7K1S+7PlO5gw4i4Y95/KLHub7NN4ZjcT7tt0mWAVf9hfiKRP +33uZcPG9Y/qTrCl2DDWSmj/IBNqTg2lesb/YLM1vQY4jTDiv3X6JsH2c3bNt +Z7PUdyZ0FJ5jVRl8Z4calIm++8kExW+p7qSbo2y1nQJHrv5mwjevs1ae2iPs +9j0+FSZ/mcBH23gXRL+wA+06F1Ytcv2pqXRCmfyZfY2VRnLkYcHL44JtASP9 +bJet5ua1q1lQ919ZTlDnR7aO7qKv1FoW9A4JyfaJfGBvYpenBvCxoGnuEHlL +5nt2laHgKHMzCy7MxVA8fdvZ9ua+mmNCLNg8ufWyvnYre/W+d6H54tz4A25G +pp+b2MX2Wm2OMizQ11ItFs5sZJ9zHJ2ulWXBLR+8cDm3nr3bOWWLtAIL7G98 +3yrq/Yg95znv8Y7IArbxSZWs5Wr26+Ml11gqLDg9EyQXdq+KneN7sOaqGgv4 +LDD6jtJKtsmZel5TOguEh0r5R/1K2MnRF7PqtFmQ/uh0ZnN6DvvYFY3n0nos +iLOUGJCIy2Tj8cM/Tm9nweHR2bmynWnsryk79NSBBWGJT90sX11nb7294X2B +GQtuK4rM7Z+OYXc+T9hwzYGrx7q4kmk+f7YAb57/kTBuPRdOiuWtGLPXzTfs +m7rEgszWf7BKyYi9PDGgcTGKBW13iD3rMvXZv3qlp3KusGBL01ITmt7Gbq9K +OP45mQXH6dnmG88y2YnOF90Pl7KgPVmi5/F2cbbEUyfbQ+9Z8LnmxIB/+Jft +8hcV2HYq6mAjO+7QUxe4fYOyQ83eF+rQM8EPV9ambmNg0pzAQxpQtkZe5mbB +PT2/TyLPdvJogmFhWHL3RLnurz9XrM1SNWFK48WTQ/X5OibM5jQz+laQp6to +hfQlaD/+s33hb9tWWM1IEafH7Nc6QdPo7XDTAouBN2K2o7JbsQnX93YbtKEh +wzxyj/wDjR0kqV38edrwRue0yAnLg+pqoZeDnuroQHR9dLmq6wyT4qbXoNyr +A9b1+0mrTY4w3B57XKr21YW+b19d/xZ30xpy3rtOievBWJe93QlsC3W6aOUv +874eZI3pXYlQtCG7KJduSNu1DS6r7aQuO+eqTlGStKsmt4Gaqs2A+d17yg/y +F4ZmordDx6/N9vlZ/UR7IyJsl2dDje9rvXy/ZaUtx6MeMhrZIHH5fOelI6MK +4hu97+w6gEG7J7J97DYil294/uykHQYvhK+YPgvrk9M4H2eY5IBBg2RyStSV +TjnLycquniMYyNp88p/tbZSL7J6Zd/HGQJQicGbyebrcXF6IwdmLGAyyz1xu +qNgr17s96V1hKQbvB8hYulWjrEdAfoZZBQZDysXTKp/uyc5W3HMbr8Sgak7/ +3E+rclkRQs9f9RoMBkSPRsXvSZM1Xy8nW9+IAZ2Ia5ylBsjWvS90fdeFQYtb +23+GKlTZnQIP6Kd7MCjfX/9bSZkg22PyclaqDwP5jXHfvyAp2elHP6IdP2NQ +I7pjpjh/rSw9l1X+fQwDr21HjzVrDm2p69U/feUnBsE/i4QKZrq37BTbh5iT +GAhXXb+x/1bbFveogA7/GQyuvkQ5AYa1W6YbI9Mk5zDQNHO6rsWo2hL2L8Xl +0T8M4gWawmTwoi1CW4tph5YwcFD2sZhRy9mSdfzRzMoKBjP7NV7v9j+65X/y +6M0A "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2826,116 +8451,247 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwVlXk8VO8Xx5VKm32XdWYssw+y1dz7HEuWiDZCkmwRFSJKRWRLyVLITsg+ +krQgKkkqoUiWJPItSRQi229+/9z7er/u6znPOZ/zOecqOZ/c67aah4fnPPfx +//fsp5dNpNh8XJ3l7yoluh1/nyV1Rr8nDMne2FP5u0sKgfhbZ6meRLRqxcbz +UZcaOr275ANvTx569oL6LrlLFwlPSCbOf6hCe28kY0e7TNFgneXJ6Q9P0drg +lzt73tsiY9LYwNSHTsT8ucGyutMDzX/QuTH54QtSzJxfp9EahJ4Z3s7vyPuD +JI5Q/9SXxyDZwYejzrQlNOLkdu7910Qk5n24hM+QF7aZL+kl30pFierGtZbW +60F0q/rV7qQs9DGV1TglxA/9aPSZ7NdcFJsf8na1tDBM1g/YlYXlI8nrwzFJ +maJwiDpi5vihEEXtN8M7Z8Vhr22t5ExLETqll3v4ZZgU5AybO4vklKCdOQLT +5lekQOp8T4R7YQki8J2LbrshBW2FtIyashLU/t7mzrsiKbj6XTN758MSxPDZ +zPupTQqog6wp/c4S9K0wsPC3jDTIFbUfPM5bihzELH9uuSsNwdRjutXOpcjo +17+zJ4ZlYM3y/ZfjYmXojOl1ypNxGRB0/XVfQaYMVeTSe0VnZUAiv7rEUqEM +Se130nu4fgu0aazOzCGXofEHz//yMrYAYV18hRhehpLC4v1vBm0B/bXVBzD3 +MvRFXOVEE78s3N4Teena3TIkebJBTlJSFqqvmBcaPChDFi22bzwVZeGpO/3F +VF0ZqjkbSxPUlAU1t+61Rs1l6PLg5JidrSzM1PWfetBThjSKa4/+ypOFxPiq +5c+LZegie88RGV05yFn468gyKEemjlm/dQzkwKvj9InHxuVIIPRHuLWFHCg4 +731uYl6OMp5FFMY7yUHPPZKZxf5y9GDnox/rYuRgujyrWNa9HE3aEk//+SgH +0jbsrt7ocuQYMHP5dbA8BMz67X3TWo6UUwxkxyLk4af1zqNNbeXc+q+V88XL +Q9G7lec1neXo7CK53SBfHgjk20eu9pajG+GO4g9fy0Nqb6rE6rFy9DrhRXaB +nAKY1UXnbFhfgbZV3Ky+0KAAC3M+DYlQgYw+tC1NtCjA/KOB+oeGFciSZ43J +4U4F6GFcLeo3rkAue098RF8V4Oumu4YSuyqQcbBSSOhaRWjaaZRqa1eBfBRm +b+lTFYGaVTEr7VuBmo5m/3x2WhF25oqkJmRWILNFPZFzwYoQ9aW/RDunArXF +v9feGqoIvRqxdz/kVaCPDzeE5scowtNbq4r4iyrQxCZ/kYgMRfB7E65qVlWB +pCpNdYyfKsLba8vvl59XIO+5qdAWfiUQpBOrj45x6/F1lxgVUYKDF9xIj8Yr +0Pqx3lJeKSV4rts+wverAhX0PevGCUrw5JK77Y0/FejT4xu0e9pKYBRRJhO0 +WIGsIvR6cg8rQTdP4tVD/Bwkv1x+vMFVCSp/5+xwE+Sg8dME3gFPJeg6ueWA +hzAHRXtsYkj5KwElLjPaSZyDGs0HwuOilYCzNU9LWo6DNEQuMoPvKMGDFmlW +GZWDeGJnmlJrlMDqHbnRk85BbbzH7GtqlaCxbugOgclBXjN7I6aeK8Hgw/e1 +kRoclN9D6jvaqwT7NKVPSepxkER2S+R+XgL4kl+lH9zBQSOSmKzfegJkyHY7 +vzXmoKr4O3eu8RNAOdTwKm7KQVZhaf2tkgRYJ1iwUdCcm6+bt4Y+jQDBDV3J +Qbs5aJ4q9IluTYDtShabjttz0GymzEVNewI4BUprJRzkoGlBZZLeYQKYu5X2 +VDpw0MQfvWNGngS4HSMd9sWRg77UuszanyfAzydtqwVdOGiQfuKmUxgBihcG +cwRcOag/O4jtHkWAKIkb6RvcOKg7/GqYbwIBrGsgccqdg1rN7wtEFxDA64v6 +QPQxDnpR/+TO1RIu37KodfbioCbm6/1JHAI4yh19ouPNQY9Fh9KyHhLA4mqZ +0rvjHFQb8QPLf0yAQw/sPG6e4KAHf2c+Fz8jwNTcPMf+JFePvo2q994QwPtZ +gWibDwdxdom3PuokQKzRTYlQXw4qa1A43viBAOdubP9G8+Ogwltb774aIkCk +uF7d6VMclObliL7MECCg6cXelwEclDLg8eW/fwSY1wtdtDrNQdetTkX8XCHA +ciplpJ3LcZrRr+Y2EAHLMxZ8EshBsQWJJ5YFiOBueECRFcTVXzJTeI0YETKk +gjbe5HLYwp0DgvJE+EwUmDlwhoNCjtf9EyMS4VO2+P1yLp8bbM6UUSOCcy+9 +a5HLZ/Z0gCKdCCJ2bdQdZzno9LO+YWUNIgSvT7wRyeVTWqORVB0i2LKJPxq5 +7HN7kqzOJoImXZV3mssnpBdea+sTwaFLrUohmOu32LU+bGMiSFmEtxpy2WNJ +UNTAnAh+keayTlx2PylTY7KbCOuj9AL8uewyRLLbZU0Eu80JOaFcdtrHXNxr +TwSLvA1HL3H50HO9bNvDRDDTqokL4bK9jpGBoyv3vNB4ry+XDxRbfnXxJMIb +Z/Lmg1zev8Uu2vME9/v2hcFtXN5z1YV68hQRFnmGhYS5bLlyvM0/iAi3z263 +GeDmb+4b5Hv2PBFo++Vcs7lsOhwmFhpGhIuY4Q8bLu+wvno/IooIkfE/U3m5 +bPAixT72ChFWMp5LFHD1Q3p5S/EJRLh0tXHjdi6zS8tykpOJIPZ7leRzbj/6 +FEuzd6QTIbP78loLLp9NLs6azibCeYvnUy+4/ZTaXJR5K58IT5ibInW5fP9i +YcbeYiLXf2c9M7n9t/mbn76qgggC7Z/RLNcv09630iqriBBge6vYgMsatjmp +AnVESD1kdbua66+ON1kp9Y1EuEvFjn3k+s/HMDPZ+zkRFN1c5Se5/qxgpF1v +bSOCqvpw3BTXz7vyU5POvOPe15J1sI/r93HplES1HiLs62Btu8edB/La6/GR +Q0R4G3hUUYc7Py1nE69pjRLB8rKS5CdPbj8n4+NGxohAGby75OfB3S99V68Y +TBOhXrPJxJU7n4Z7rsROzRFBZ/OZ0w3cef7SfPlyzhIRYHYXdZ0zBylWRUUv +ryNBcF5lzD7u/DeoRkaVbyJBivO2HlvufnDMvBTpIESCUMHaWWPuPkmPvnjp +kTQJ5tam1fRac/fX4eDQ0zQSmP23s7CVu4/uvT8ToqxOAn0FgUUeM64fdgZd +eK9FgjpyQKM0d58lagWc00Ak6HoTtzKBOEi99FTwkCEJAu8N5RazOahd0e9s +vCkJDP2EVhty9yP/5pNBE3tIMGJuJijA3Z9lF48HZtqQgK9o9wOMwUE7/3qd +tjhIgl0p6pKmFO48fvHwL3ElAfFSdtU3JQ5a89DZxz2QBI/Ehg9s4+77W4wj +J8XPkUC778cbxY1cP+UfPtEUSoKJmej/etZw5/WagzfhMgkG6EPSD+crkPza +g14dcSSw7j1b+Yn7f6k7a3csNIkEkbSU0fafFeifm43HpwwSeJVsmhcfqkA3 ++/YfvZpLgiLWKoZ7bwXS3bPPnV1IgtgTf++ef1eBTrN3u6ZxSFD1PldrqakC +TYnsdLJ5ytWfFf1GoqAC9XgT2o+9IEG3M+/ruvQK1Nj8D4W8JoHk+0NZIokV +KP5sqUJRNwn6XyZoNZ+vQEHvw6/V9ZHA84kQQ/FUBXJiOKy0f+be/yvImeBR +gVhfNg/Oj5GAsQSvJfdw/7fsr5YCkySYCXQn8e2oQDzJ9Y8JMyT43P1pOVm3 +Ar01O5FlvkIC8enpoHj5CnTizttDmaLKEBbjZl39tRzZbCp6c0dKGRauOqb5 +dpcj3C0Ua5ZTBnEF98WG5nLEL60u90tVGabWEZLXF5ajstDEfmArQ7bWQpH4 +4XJ0vfeYhbW+Mgi7sszULMrRua2GdZ7GyuDYp3qjXrccmX/7k564WxmurTK4 +6ClUjsasrA+OuCrDZ85RvrSHZaizmP5qzlMZ/PVCqTfyytAj3nXb+U8qg9ca +auW62DIUc79GRvuMMugL7802sS9DagpSvVFXlWFG6GGNwu9SJHRm0iwjURme +ni1RLusuRXOdLQ8rU5Qh4UehWOGjUtQSeebmx1xlkL6PmQ+GlqKjE7221Bpl +oLy7b2O9rhRZmt5tQbXKwKcqEr59tARp58Xq7m9UBt7fhKnLz0vQOhu21PlW +ZfirfEXQLawEFdZnfmj7pAy6G16P8c0Uo5ErTjZ+fCoQ3Ow87Pa4CJ0YoxFY +m1Xgq6ta0cuUIvTXZP7nTyEVcP7vG1+VTxHayJsY4SmjAsMep/aIKxUh1pln +1U50FUjo1o0yP3cbnXdTEbXax42H53KG5QqRBD7+lpqtAhIZHet45G6hnPQH +6d9vqUDl6qRvxWN5iDx/6ejtIhUQO6CgrPQgD7Gr5VYIVSqw5nJx8qW9eciF +YsWQea4CG910I4IjclGlRNWV9T9UYP7Pigfelo3MfgWafdVWhXEXvbd5zjeR +rLp85Hq2KtRa2Kusn01FE35NT6n6qnCLk7nxT0wquj4rxPYzV4WpiEXVoLsp +6NNSMWPlsCq0/t3zVkAgGflt7heVjlEF07CLSm7/JSIjy7Dd7DhVMFvI2+Md +mYgk49WuHk5ShUmbxuwjKomoTjRgXWGmKnTL3j9O8UxA67YIzGtUqUKImFm3 +x8w1lEaGTxZ9qkD5dnHqd+5l5O01KuPzWRVUSijnElddRqj8yoGkr6rgebgW +O+8Sg0ZYH9s//lKF0jyxfH1GNGLo+j1zX6MGks84Wq8HIxDPWSmeyxvUQOjc +zWSBvRHoXe1jdrmAGkyqtjqUNV9CQWhTzR8pNWgsOvH9X004emacXxRKVwP5 +laslXXcvouTonV9vaaiBh53Bpf90LyKP1kmlFzpqQLr43GJXYygSsMTS+Q3U +YF72hr14WQiyte6+mmajBmqD5QHjeucQJeVca/1BNTCw0qou9AhGSz0EviEn +NTg/s4q/M/0synM4GarqpQY1t/qbbQTPoHGX9aeqQ9QgQyAx9x/5NJrIMqpv +uKQGYwbV/0wvBKBfH0P5XsWoQW3vG62r3f7ot9V8+lCSGrSpWhi1JJ5Cf7eP +NQkUqcF+4bt4pa4vmjutIihTrgY+2/64HCj1Qf/uONspV6nBnoag1mtKPmhR +te/n9jo1cFIKNVxknUCrxV5LeLarwczjDsP0Q8fQGqv1R/y71OBngX3MfJAn +WnvZqDSkVw1Ewxrk0tM80HqeepQ8wtVvUjRUa9Idbdw+H5P7XQ22PZx6NU10 +R5tOa70vm1ADibGPJy8dckMC4+Uez+bU4LfwUnLukAsSUh2raltSA/Xn2zNn +qC5I2Fll6eNqMghvP8B/O9gZifVkJUxuJoOlkbV4JeUIkm669khOiQwBX5gp +UdGHkMzKqzVkFTKwL9tpffB2QLLb1lttpZJh92r5CCX7g0i+MnR4pxYZth4P +/PvG0g4p/qij22wjA2f4oulza1ukpDIfeASRwdiJp2bI9QAiZfhuDjIjw84q +25uP0qyRyodym3BLMhjM284JPdmPVEXGcuL2kSGL7/fuxol9iBLtrFVwiAwv ++QqE3A7vRSz/fY6dvmRYbpqfllKyQhqca0UDp8mQPpyw/0PPLqQ59ur3t2Bu +Pa3z43YZFkjbyShqJYIMB+oT7+/ZsRPppId2bIwlw3Ru2ns5ihnS7a7bIhFP +hlV9HWsdpE3RdgutShp3SPwnR0QmxI0RO8r3n042GRZeN5cXEHYg/Gm5kWE+ +GZo7rPuTdY0Q6Kp8tKvg6qPur7dywQAZkyRXRz0lw7qvLvzu/Tj67mxStP0F +GZxObIk2TMDQldxAy8lXZLCa1nI8v5eN3sn3pNl1kSHwMnUyaE4PnT60Xl+g +lwxrfdzGz/TrIpkM3f+efiLDjo7Zh9avdJCT9E1N2jcyBGklXdRq0UK8ti8/ +fh7n5vOw6s/lrq2oMHk+5MYUGX5NTko7jmuicVH718v/yNBOIl/V1dJAZwS2 +uHXwU6A95FfiLRsGkt1lvilShAIhR0imGnM01BgbfGebJAUyyyM5YkVUtG5D +/9ItRQr8shg/95pFRsUmm/NtlSmQKKOge3u9GrKIZO/kp1AgfVcp7fO4Ckrk +zUw+rUmBifXnNbN7SEjL4A2bqkuBrtK/dJNBIuoJXfoyyKYApYUukDBJQArL +h5hmxhTwmDm/6pS6EnrKjuta2kkBg0rT3SZOisg9+HFwlRX3vjqNSi+WAiqb +k2/ZYkeBsow5g7+GsshKx+pE+yEKdCBdF8tRGfQ7IEQswpl73ubRN0qqNNL7 +M+g04UUBzYnh46vVJFG/uhDfLR8KLPDee9KxRgKF+kD5gQAKXPtr86ltQgw1 +/8yZb7xAgQCHaD2NbyLIk9aRHRBOgUH/TbrXZ4XRZq9VxpRoClgWXsO2CAmj +vd+OJCYlUGCH/PrUsOcCaEYlUdc0mQK2rRteL2vxo1S3p58W07jxn+t0w8NN +aPALgeqeT4ErZ6B1bHo9ClPa1yFTTIF1PasevC3lQypO4YFvy7n6+XUJ+vut +Q94Dw89071Pgu2vqJkPaGiQoK3bsZy0F7DPcDxDkeVGVvZFQXiMF3kh1T5Hl +VqO5D/kOm1q59R1/JOoEPChdomt1YxsF3Pa99/jWvIzj1muL/d9RoG3d7H+z +hCU8otNtZqCfAkMaM8ZdUv9wNeHk9MQhCvAb7Zp5XjmHv7Zq1jcZpQAh7cer +Afu/uMgblbjKX9z645vZ9C/T+PIvVkHrNAV0NvntGi74g4+JbK8bmadA6ahA +gXLwb/yprdWY1BoqELXQy0abSbwi2G6V5gYqjMQoUj7WTOBpWS5SuwSoIHSh +Iyepfxw/NRJofFGKCsyb0Z17Ar/jTnxhh9LlqCDcPAaJ3//DLShX/O8RqHDB +2PZ8ud8orrsrOfatKhX4a58tHxP+ipN8cvK+06gwHHzbN7dpGBdKKnnIq0EF +/ww/Ye3YL/jivep2OR0qSMEzPlnXIfz9QsvyHn0qeNzO3N2V8AlvlH8n7m1M +hcIn7779KejHy/QHaJHmVAgNTA/Z9aEXT3X9zzBnNxX+S1rjYkD6iEdETdk/ +sqaCpHWAtGnsB9yvZMH3vT0V8kbFj33b2I07vlkbM3GYCjziDScac9/j2qIy +9wnHqLDtkMSO/wQ7cYI2qY19kgqlzds2vBxpxwXsGF9t/KmQepqVwJ/6Fv8X +rLvoc4YKIgfU1hBj3uCjWQaisReoMB+5xrYj7RXe+cSCUhDO1fdp62rNVy/x +xyM2+g3RVHipYFV+TqoFT6F4nfyTyI2nQeOR4H2OX9oVEMmfSgUV6YvVxpnP +cB+fkEzVTCpQp3dsVbB8ijskxVTr51FhbsvXRSOxJ7hpTdKrg7epkG6iUzbU +34Bv/Zj5JaCMCpnf48r7aupxxcXb89fuUOED37/vrOpafE6/TrWplgorRvJd +p4Qe4COuzfinRm5+QbQjvl41eHtUu/Xccyq0umpXjw5V43Ulvd4ir7j5LGWo +K/ndxYvfjITT2rnxznR6RMlU4cmTE2nGXVSIk7GoT/lYiYeJzt9x6qWC8a1e +rO0gB7e34/98fYQKx/2qrvEQSnHjc5J/K75TwXX9yTXV24pxjWwlgZcTVDhf +rCOq5H8bl39KVR7+Q4XHlbt7Wa8L8I1ftdhLc1S4/Ts6dxzy8Vk+2Ce5TIV+ +hpvAufY8/Atl5zF1XhrMKWWfJJ7JxWt9HFPd+Gkw/Gz3ZK58Fl6U5MEJEaHB +C8NtL5/8Scev1/g135SkwdOKVdMav27ioR/PDdyVpcFsUNiBkwKpuPdi5PQb +JRr0SyvISlsl47YKCZu+qdCA1yZk31zFddzIIJ2wmkaDx6NujXPUJFw2mrNb +W5sGzI4evCogHi+pKH82v40GD356/UwviMN1u0q16xENft2MtfSLvII3LxQX +hxrRQFZfeOpU7GV8P6FI1siMBhmqR//trYrGv5gWXuOzpMG7lSb4OheJ+5zM +X/1qLw3MONaGhEMR+JW6nG97HGiwlNtjLRkYhssMZx0UP0KDby9XhqzJF/Gi +DZltPW40+HGhNi5hJATXZqXrZxyjgUH4cP/3nPN4k83N6sMnaUD8Rk/7eSkY +33s+RZXoT4M4/NGG1XFn8M+3bqSNBtHAl+hNrnkYiC9MJoQeD6NB8sqmYwsn +/fFoyfg/rCgaVMxtzHOb9cMl8Dj36VgaJA7OnJRL8cXzXa98vB9Pg23OGUJO +u31wjdjLFsE3aNBkXkAR1D+BN96JbsDTaPCn9qupyGZv3LInUmN1NleP1ozC +0WVP/JhyuFRMEQ14BD4Uuuxxx+fML8ZalNMgZ8fqPnKZKx7pF7IsWEWDni// +if0lueBiN8/7vquhQUrTt+zah0fwvIbgkeRaGjTqM85d9nDCWaNnDtg3cjnZ +xY1x2BF/vDmoVe45Dcreylw/KuOA99r5V+a30WDFaTh4eJMt7hHqR/R4RwPh +iNL682wbfLbQJ5naQ4OhkFd6n+P245fenNjwq5/Ln0+ll/Dsw0Wmvc9VDdFA +l9ZQWHBtD54j4/UrYJTrvzXaiY16u3GGvqez3g8aeC+dF5X7twvfGedm2jhN +g4amQB/veDO8p9qlNnyeBhfsj4aX3jTB3fuOMEyWaXA34uvK4ZYd+PQqp9yN +vHTYWu2p/0HaCA9TcxRr46ND2fvhS3GxBriQlUNUwmY6zKmq1jK36ONZAfb/ +9gvTIadut5zcVYQ/fGrzuU+GDvs72hJUO7bhxt/378tWoAN8dO3WvK+Lvxfc +1+xMosOm+d2vWc3auLP2Hj0VMh1O+T5QllnYik86WJV9p9NB9PW/M4R9mviF +8F0K5Rrc+2+2RnJeqeObS8wTfXToQPpTwbFxZuFqf02C/gIdAr7XeZg8peI1 +csY/Hu2gg6feU4crl8m4kZGR44WddJB7dm96/IIq3nnMoEPfig7HKjT9JDKU +cacEMFq7nw5t44Ybpj8R8Yn7+P0WWzpIh9FjSowI+LlPbMqVQ3RQGXlpdb1V +EU+l6gmJHqUDW2OPyBN7Wdza/E38Yy86THsfm/wuIYOLeB0RPubDzT9Qw4LK +I4W3XZ5JEA+gw5AOD1tOVAKPLYkReXKGDkl5UckpFmK4aatckvcFOvSpyPuX +F4vga8buiEqF0yHl0MelIlVh/AK5V+zkFTpcitr37MfcZny72YkbMgl0SGh7 +LZKWuRGf81gt0XyDDkfELT7I+a3Hq6OTk33T6BBTrb3Y7LcO9y2iSMpl02FR +aT8PLWMNzmh5nNJyiw47+Z70k36sxsf+2yvlX0SHV2rxxs0Oq3BX1WDpV3fo +4LXGiNG9bQlTMhFMO13DrV/JuMng7T/sk/stGUItHe79TTWvvzGHpUXqpL9p +4LKrwmfry7PYgcJXW8400UH3U+pNz+JpTKz5cAbpJTceb2hvxq/fWPvXP7Lt +b+gQq9qyrttuCtupLCuv+oEOGW1FSF/+J8a3ozKrs48O/+aaPrBLxrAmVyOF +C5/pwHlscfqr5zfs4qWebPJXOpxeWCMqYTeK4fneil3f6TBVZOe+eGoEW3jG +kxs6QQc/VevbIve/YA+GryvR/tBB+86tx9IKQ5g6sZ4Qvsitn/eCY0h+PzZh +sOcWYxUDLrAONquwerES56/E3rUM6IxeCPGd/IAdDTuTH7GRARvX71grMtSF +kfL4ldUFGVBs/z1YZPkdNvQkt6BflAG94VUTbww7sawhLZVoKQZM3UlZP1bR +jh1c1VqoKceA8I/B8XlBbZiUkqPqoBIDDls5GB/sfIV1we/bl1UYsPDTTOmF +20ss0SlSTZvKAK+0oW8yjBeYZahM8RCTAd20e88nVJ5jm3IqyFe3MuCAjPIJ +bYtnWEuDQYmuHgNqDymN66U9wS4NdlNGMAboVcVOxvE3Yvorx0qvGTCgrzR8 +n7JxPbYsv0LdbsIAPn2KagvnEVaLJ5WNmjPgzKLFyfq9D7AgR1V64m4GXJuI +LKVSarCtF2rLMWsGDNrO9mSrV2NTmVaM73YMuPHYRWutWxVWUT9ccd2RW0/u +cmFmYyV2bCCQCS4MmJcID5q5WIGpLm2q/HGUAS3Mnz4Tz0uxEdkcVoo3A7AY +eyNnk2Isl731joEvA97tCkhav+o25ujQoj4RwIDUacb5jRP5mMw5h6qbZxlw +77CezfyGW9iH9EmNHSEMKBIOlWvenYtdr710dzKcAV81FPBT57Ox3X1SWzOi +GTA+MHCyNycD418oqza5yoDd1Z8dotemYa0y+lp/EhhQenxA5VVBCtYuz1FZ +k8IAHV/N9g6rG1g3QU5KPIMBm4F1t0UzCetXid2gksuAgUlfPpZFAjZEmf+n +XcgAuxAFT3G1a9go4+i4SSkDLqX/+ZPPfwUb1+gasK1kgFaS9I5eiMF+axu+ +9bzHgA17ntvteBSJzW2703j2Ebcf5PxCtVOXsGVcoSq2gQEWj7MaPdzCsDWG +V29lNDGA9+fS2fOxodhGk4Xr5S8ZoJAmdq+l8TwmaO4Z+biNAZsKf4WoNZzF +xKw+BL59x4AukyGHkQ1BmMy+HZ6fexiwmvKYEnczAFM8cNd+aoDr1+ij/MeP +nsJUDipZrB5mwBXbkhjv474Y7fA1TPQbAz7b1eyXsTiJabgsMUg/ufpbPpQs +l/LGdI96KWr9ZsBdpTMON3Q8Mczro7DxXwa4EwuGqnPcMYOTJrwHFhng/C9L +r8bCFTM9dW/66ComqJVMv57f6oxZBhJHg9Yx4bfq98xL+5yw/cEJH2I2MUE8 +Xs9saMchzD5kpSVNiAnvDwxh9Wx7zCn8+KNScSZkf15w7Qw7gLlH9ZXWyTAh +sGAwXEPIGvOKNct8o8CEczxX7tYM7MV8rt2P+0RiQvjxJa3xkd3Y6STl0F9k +JnRtvaO+DiyxcylJvjxMJmz0YMyeEzXHwtJXuQhvZULK8X1Zr7eZYtHZJ/cT +9Jhg6vZj3L98BxZ3a2CHJs6E214XaG0uhtj12+Y6RoZM0Ov/KDxto4/dLH2o +Zm3KhN6IPiO3VQjL4qjKuO9iwkufd/3fa7Zj+XdvbArcyx0Bnqavx5p0sZL7 +vEtRB5gwNRQ2N6iojVXW+k6kOjDBeqnvJblJE6tpGBwsPsKEv6LF8guF6ljd +s10dj9yZIPzIajYqgok9fVH79JUXE4TWz1ZgRBr24hW5ut+HCfovwnaHyJKx +129TCn4GMGF0yF/u5VEVrPPd2pTls0y440IUil8kYj0fTkULhjJBQsZhQu2d +Evapb+iMYgQTOgna2S4vFbCRQSsv9ctMWJA3vbtgLYuNDdc7GFxjwlaN/vm1 ++tLY5H9Uy33XmWDD/99yYqgENvPjJnK9yYQ9NOO9jzaJYf9+8akHZDEhanVX +Z0ivMMYzHUCIvMWEoqdlRoGvBLF1c8OiKUVMsHiWtrLecjO2eXHP2qJyJiwt +HEvVVd+AifA0zj6oYoJWRNy6+mPrMKk1jG8v7zOhgHRgwmmKF5Nfn/Gxt44J +Yn0ndozWrcKImze++vGEm1+5YdHH2BW2mlBQ3WIzE94Q/t6o2bTIZoiNlvO/ +ZsJgZ5DNjZ9z7K1S+7PlO5gw4i4Y95/KLHub7NN4ZjcT7tt0mWAVf9hfiKRP +33uZcPG9Y/qTrCl2DDWSmj/IBNqTg2lesb/YLM1vQY4jTDiv3X6JsH2c3bNt +Z7PUdyZ0FJ5jVRl8Z4calIm++8kExW+p7qSbo2y1nQJHrv5mwjevs1ae2iPs +9j0+FSZ/mcBH23gXRL+wA+06F1Ytcv2pqXRCmfyZfY2VRnLkYcHL44JtASP9 +bJet5ua1q1lQ919ZTlDnR7aO7qKv1FoW9A4JyfaJfGBvYpenBvCxoGnuEHlL +5nt2laHgKHMzCy7MxVA8fdvZ9ua+mmNCLNg8ufWyvnYre/W+d6H54tz4A25G +pp+b2MX2Wm2OMizQ11ItFs5sZJ9zHJ2ulWXBLR+8cDm3nr3bOWWLtAIL7G98 +3yrq/Yg95znv8Y7IArbxSZWs5Wr26+Ml11gqLDg9EyQXdq+KneN7sOaqGgv4 +LDD6jtJKtsmZel5TOguEh0r5R/1K2MnRF7PqtFmQ/uh0ZnN6DvvYFY3n0nos +iLOUGJCIy2Tj8cM/Tm9nweHR2bmynWnsryk79NSBBWGJT90sX11nb7294X2B +GQtuK4rM7Z+OYXc+T9hwzYGrx7q4kmk+f7YAb57/kTBuPRdOiuWtGLPXzTfs +m7rEgszWf7BKyYi9PDGgcTGKBW13iD3rMvXZv3qlp3KusGBL01ITmt7Gbq9K +OP45mQXH6dnmG88y2YnOF90Pl7KgPVmi5/F2cbbEUyfbQ+9Z8LnmxIB/+Jft +8hcV2HYq6mAjO+7QUxe4fYOyQ83eF+rQM8EPV9ambmNg0pzAQxpQtkZe5mbB +PT2/TyLPdvJogmFhWHL3RLnurz9XrM1SNWFK48WTQ/X5OibM5jQz+laQp6to +hfQlaD/+s33hb9tWWM1IEafH7Nc6QdPo7XDTAouBN2K2o7JbsQnX93YbtKEh +wzxyj/wDjR0kqV38edrwRue0yAnLg+pqoZeDnuroQHR9dLmq6wyT4qbXoNyr +A9b1+0mrTY4w3B57XKr21YW+b19d/xZ30xpy3rtOievBWJe93QlsC3W6aOUv +874eZI3pXYlQtCG7KJduSNu1DS6r7aQuO+eqTlGStKsmt4Gaqs2A+d17yg/y +F4ZmordDx6/N9vlZ/UR7IyJsl2dDje9rvXy/ZaUtx6MeMhrZIHH5fOelI6MK +4hu97+w6gEG7J7J97DYil294/uykHQYvhK+YPgvrk9M4H2eY5IBBg2RyStSV +TjnLycquniMYyNp88p/tbZSL7J6Zd/HGQJQicGbyebrcXF6IwdmLGAyyz1xu +qNgr17s96V1hKQbvB8hYulWjrEdAfoZZBQZDysXTKp/uyc5W3HMbr8Sgak7/ +3E+rclkRQs9f9RoMBkSPRsXvSZM1Xy8nW9+IAZ2Ia5ylBsjWvS90fdeFQYtb +23+GKlTZnQIP6Kd7MCjfX/9bSZkg22PyclaqDwP5jXHfvyAp2elHP6IdP2NQ +I7pjpjh/rSw9l1X+fQwDr21HjzVrDm2p69U/feUnBsE/i4QKZrq37BTbh5iT +GAhXXb+x/1bbFveogA7/GQyuvkQ5AYa1W6YbI9Mk5zDQNHO6rsWo2hL2L8Xl +0T8M4gWawmTwoi1CW4tph5YwcFD2sZhRy9mSdfzRzMoKBjP7NV7v9j+65X/y +6M0A "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.0614892364290581}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -2947,19 +8703,19 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.0614892364290581}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2973,115 +8729,246 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwVlXk8VO8Xx5VKm32XdWYssw+y1dz7HEuWiDZCkmwRFSJKRWRLyVLITsg+ +krQgKkkqoUiWJPItSRQi229+/9z7er/u6znPOZ/zOecqOZ/c67aah4fnPPfx +//fsp5dNpNh8XJ3l7yoluh1/nyV1Rr8nDMne2FP5u0sKgfhbZ6meRLRqxcbz +UZcaOr275ANvTx569oL6LrlLFwlPSCbOf6hCe28kY0e7TNFgneXJ6Q9P0drg +lzt73tsiY9LYwNSHTsT8ucGyutMDzX/QuTH54QtSzJxfp9EahJ4Z3s7vyPuD +JI5Q/9SXxyDZwYejzrQlNOLkdu7910Qk5n24hM+QF7aZL+kl30pFierGtZbW +60F0q/rV7qQs9DGV1TglxA/9aPSZ7NdcFJsf8na1tDBM1g/YlYXlI8nrwzFJ +maJwiDpi5vihEEXtN8M7Z8Vhr22t5ExLETqll3v4ZZgU5AybO4vklKCdOQLT +5lekQOp8T4R7YQki8J2LbrshBW2FtIyashLU/t7mzrsiKbj6XTN758MSxPDZ +zPupTQqog6wp/c4S9K0wsPC3jDTIFbUfPM5bihzELH9uuSsNwdRjutXOpcjo +17+zJ4ZlYM3y/ZfjYmXojOl1ypNxGRB0/XVfQaYMVeTSe0VnZUAiv7rEUqEM +Se130nu4fgu0aazOzCGXofEHz//yMrYAYV18hRhehpLC4v1vBm0B/bXVBzD3 +MvRFXOVEE78s3N4Teena3TIkebJBTlJSFqqvmBcaPChDFi22bzwVZeGpO/3F +VF0ZqjkbSxPUlAU1t+61Rs1l6PLg5JidrSzM1PWfetBThjSKa4/+ypOFxPiq +5c+LZegie88RGV05yFn468gyKEemjlm/dQzkwKvj9InHxuVIIPRHuLWFHCg4 +731uYl6OMp5FFMY7yUHPPZKZxf5y9GDnox/rYuRgujyrWNa9HE3aEk//+SgH +0jbsrt7ocuQYMHP5dbA8BMz67X3TWo6UUwxkxyLk4af1zqNNbeXc+q+V88XL +Q9G7lec1neXo7CK53SBfHgjk20eu9pajG+GO4g9fy0Nqb6rE6rFy9DrhRXaB +nAKY1UXnbFhfgbZV3Ky+0KAAC3M+DYlQgYw+tC1NtCjA/KOB+oeGFciSZ43J +4U4F6GFcLeo3rkAue098RF8V4Oumu4YSuyqQcbBSSOhaRWjaaZRqa1eBfBRm +b+lTFYGaVTEr7VuBmo5m/3x2WhF25oqkJmRWILNFPZFzwYoQ9aW/RDunArXF +v9feGqoIvRqxdz/kVaCPDzeE5scowtNbq4r4iyrQxCZ/kYgMRfB7E65qVlWB +pCpNdYyfKsLba8vvl59XIO+5qdAWfiUQpBOrj45x6/F1lxgVUYKDF9xIj8Yr +0Pqx3lJeKSV4rts+wverAhX0PevGCUrw5JK77Y0/FejT4xu0e9pKYBRRJhO0 +WIGsIvR6cg8rQTdP4tVD/Bwkv1x+vMFVCSp/5+xwE+Sg8dME3gFPJeg6ueWA +hzAHRXtsYkj5KwElLjPaSZyDGs0HwuOilYCzNU9LWo6DNEQuMoPvKMGDFmlW +GZWDeGJnmlJrlMDqHbnRk85BbbzH7GtqlaCxbugOgclBXjN7I6aeK8Hgw/e1 +kRoclN9D6jvaqwT7NKVPSepxkER2S+R+XgL4kl+lH9zBQSOSmKzfegJkyHY7 +vzXmoKr4O3eu8RNAOdTwKm7KQVZhaf2tkgRYJ1iwUdCcm6+bt4Y+jQDBDV3J +Qbs5aJ4q9IluTYDtShabjttz0GymzEVNewI4BUprJRzkoGlBZZLeYQKYu5X2 +VDpw0MQfvWNGngS4HSMd9sWRg77UuszanyfAzydtqwVdOGiQfuKmUxgBihcG +cwRcOag/O4jtHkWAKIkb6RvcOKg7/GqYbwIBrGsgccqdg1rN7wtEFxDA64v6 +QPQxDnpR/+TO1RIu37KodfbioCbm6/1JHAI4yh19ouPNQY9Fh9KyHhLA4mqZ +0rvjHFQb8QPLf0yAQw/sPG6e4KAHf2c+Fz8jwNTcPMf+JFePvo2q994QwPtZ +gWibDwdxdom3PuokQKzRTYlQXw4qa1A43viBAOdubP9G8+Ogwltb774aIkCk +uF7d6VMclObliL7MECCg6cXelwEclDLg8eW/fwSY1wtdtDrNQdetTkX8XCHA +ciplpJ3LcZrRr+Y2EAHLMxZ8EshBsQWJJ5YFiOBueECRFcTVXzJTeI0YETKk +gjbe5HLYwp0DgvJE+EwUmDlwhoNCjtf9EyMS4VO2+P1yLp8bbM6UUSOCcy+9 +a5HLZ/Z0gCKdCCJ2bdQdZzno9LO+YWUNIgSvT7wRyeVTWqORVB0i2LKJPxq5 +7HN7kqzOJoImXZV3mssnpBdea+sTwaFLrUohmOu32LU+bGMiSFmEtxpy2WNJ +UNTAnAh+keayTlx2PylTY7KbCOuj9AL8uewyRLLbZU0Eu80JOaFcdtrHXNxr +TwSLvA1HL3H50HO9bNvDRDDTqokL4bK9jpGBoyv3vNB4ry+XDxRbfnXxJMIb +Z/Lmg1zev8Uu2vME9/v2hcFtXN5z1YV68hQRFnmGhYS5bLlyvM0/iAi3z263 +GeDmb+4b5Hv2PBFo++Vcs7lsOhwmFhpGhIuY4Q8bLu+wvno/IooIkfE/U3m5 +bPAixT72ChFWMp5LFHD1Q3p5S/EJRLh0tXHjdi6zS8tykpOJIPZ7leRzbj/6 +FEuzd6QTIbP78loLLp9NLs6azibCeYvnUy+4/ZTaXJR5K58IT5ibInW5fP9i +YcbeYiLXf2c9M7n9t/mbn76qgggC7Z/RLNcv09630iqriBBge6vYgMsatjmp +AnVESD1kdbua66+ON1kp9Y1EuEvFjn3k+s/HMDPZ+zkRFN1c5Se5/qxgpF1v +bSOCqvpw3BTXz7vyU5POvOPe15J1sI/r93HplES1HiLs62Btu8edB/La6/GR +Q0R4G3hUUYc7Py1nE69pjRLB8rKS5CdPbj8n4+NGxohAGby75OfB3S99V68Y +TBOhXrPJxJU7n4Z7rsROzRFBZ/OZ0w3cef7SfPlyzhIRYHYXdZ0zBylWRUUv +ryNBcF5lzD7u/DeoRkaVbyJBivO2HlvufnDMvBTpIESCUMHaWWPuPkmPvnjp +kTQJ5tam1fRac/fX4eDQ0zQSmP23s7CVu4/uvT8ToqxOAn0FgUUeM64fdgZd +eK9FgjpyQKM0d58lagWc00Ak6HoTtzKBOEi99FTwkCEJAu8N5RazOahd0e9s +vCkJDP2EVhty9yP/5pNBE3tIMGJuJijA3Z9lF48HZtqQgK9o9wOMwUE7/3qd +tjhIgl0p6pKmFO48fvHwL3ElAfFSdtU3JQ5a89DZxz2QBI/Ehg9s4+77W4wj +J8XPkUC778cbxY1cP+UfPtEUSoKJmej/etZw5/WagzfhMgkG6EPSD+crkPza +g14dcSSw7j1b+Yn7f6k7a3csNIkEkbSU0fafFeifm43HpwwSeJVsmhcfqkA3 ++/YfvZpLgiLWKoZ7bwXS3bPPnV1IgtgTf++ef1eBTrN3u6ZxSFD1PldrqakC +TYnsdLJ5ytWfFf1GoqAC9XgT2o+9IEG3M+/ruvQK1Nj8D4W8JoHk+0NZIokV +KP5sqUJRNwn6XyZoNZ+vQEHvw6/V9ZHA84kQQ/FUBXJiOKy0f+be/yvImeBR +gVhfNg/Oj5GAsQSvJfdw/7fsr5YCkySYCXQn8e2oQDzJ9Y8JMyT43P1pOVm3 +Ar01O5FlvkIC8enpoHj5CnTizttDmaLKEBbjZl39tRzZbCp6c0dKGRauOqb5 +dpcj3C0Ua5ZTBnEF98WG5nLEL60u90tVGabWEZLXF5ajstDEfmArQ7bWQpH4 +4XJ0vfeYhbW+Mgi7sszULMrRua2GdZ7GyuDYp3qjXrccmX/7k564WxmurTK4 +6ClUjsasrA+OuCrDZ85RvrSHZaizmP5qzlMZ/PVCqTfyytAj3nXb+U8qg9ca +auW62DIUc79GRvuMMugL7802sS9DagpSvVFXlWFG6GGNwu9SJHRm0iwjURme +ni1RLusuRXOdLQ8rU5Qh4UehWOGjUtQSeebmx1xlkL6PmQ+GlqKjE7221Bpl +oLy7b2O9rhRZmt5tQbXKwKcqEr59tARp58Xq7m9UBt7fhKnLz0vQOhu21PlW +ZfirfEXQLawEFdZnfmj7pAy6G16P8c0Uo5ErTjZ+fCoQ3Ow87Pa4CJ0YoxFY +m1Xgq6ta0cuUIvTXZP7nTyEVcP7vG1+VTxHayJsY4SmjAsMep/aIKxUh1pln +1U50FUjo1o0yP3cbnXdTEbXax42H53KG5QqRBD7+lpqtAhIZHet45G6hnPQH +6d9vqUDl6qRvxWN5iDx/6ejtIhUQO6CgrPQgD7Gr5VYIVSqw5nJx8qW9eciF +YsWQea4CG910I4IjclGlRNWV9T9UYP7Pigfelo3MfgWafdVWhXEXvbd5zjeR +rLp85Hq2KtRa2Kusn01FE35NT6n6qnCLk7nxT0wquj4rxPYzV4WpiEXVoLsp +6NNSMWPlsCq0/t3zVkAgGflt7heVjlEF07CLSm7/JSIjy7Dd7DhVMFvI2+Md +mYgk49WuHk5ShUmbxuwjKomoTjRgXWGmKnTL3j9O8UxA67YIzGtUqUKImFm3 +x8w1lEaGTxZ9qkD5dnHqd+5l5O01KuPzWRVUSijnElddRqj8yoGkr6rgebgW +O+8Sg0ZYH9s//lKF0jyxfH1GNGLo+j1zX6MGks84Wq8HIxDPWSmeyxvUQOjc +zWSBvRHoXe1jdrmAGkyqtjqUNV9CQWhTzR8pNWgsOvH9X004emacXxRKVwP5 +laslXXcvouTonV9vaaiBh53Bpf90LyKP1kmlFzpqQLr43GJXYygSsMTS+Q3U +YF72hr14WQiyte6+mmajBmqD5QHjeucQJeVca/1BNTCw0qou9AhGSz0EviEn +NTg/s4q/M/0synM4GarqpQY1t/qbbQTPoHGX9aeqQ9QgQyAx9x/5NJrIMqpv +uKQGYwbV/0wvBKBfH0P5XsWoQW3vG62r3f7ot9V8+lCSGrSpWhi1JJ5Cf7eP +NQkUqcF+4bt4pa4vmjutIihTrgY+2/64HCj1Qf/uONspV6nBnoag1mtKPmhR +te/n9jo1cFIKNVxknUCrxV5LeLarwczjDsP0Q8fQGqv1R/y71OBngX3MfJAn +WnvZqDSkVw1Ewxrk0tM80HqeepQ8wtVvUjRUa9Idbdw+H5P7XQ22PZx6NU10 +R5tOa70vm1ADibGPJy8dckMC4+Uez+bU4LfwUnLukAsSUh2raltSA/Xn2zNn +qC5I2Fll6eNqMghvP8B/O9gZifVkJUxuJoOlkbV4JeUIkm669khOiQwBX5gp +UdGHkMzKqzVkFTKwL9tpffB2QLLb1lttpZJh92r5CCX7g0i+MnR4pxYZth4P +/PvG0g4p/qij22wjA2f4oulza1ukpDIfeASRwdiJp2bI9QAiZfhuDjIjw84q +25uP0qyRyodym3BLMhjM284JPdmPVEXGcuL2kSGL7/fuxol9iBLtrFVwiAwv ++QqE3A7vRSz/fY6dvmRYbpqfllKyQhqca0UDp8mQPpyw/0PPLqQ59ur3t2Bu +Pa3z43YZFkjbyShqJYIMB+oT7+/ZsRPppId2bIwlw3Ru2ns5ihnS7a7bIhFP +hlV9HWsdpE3RdgutShp3SPwnR0QmxI0RO8r3n042GRZeN5cXEHYg/Gm5kWE+ +GZo7rPuTdY0Q6Kp8tKvg6qPur7dywQAZkyRXRz0lw7qvLvzu/Tj67mxStP0F +GZxObIk2TMDQldxAy8lXZLCa1nI8v5eN3sn3pNl1kSHwMnUyaE4PnT60Xl+g +lwxrfdzGz/TrIpkM3f+efiLDjo7Zh9avdJCT9E1N2jcyBGklXdRq0UK8ti8/ +fh7n5vOw6s/lrq2oMHk+5MYUGX5NTko7jmuicVH718v/yNBOIl/V1dJAZwS2 +uHXwU6A95FfiLRsGkt1lvilShAIhR0imGnM01BgbfGebJAUyyyM5YkVUtG5D +/9ItRQr8shg/95pFRsUmm/NtlSmQKKOge3u9GrKIZO/kp1AgfVcp7fO4Ckrk +zUw+rUmBifXnNbN7SEjL4A2bqkuBrtK/dJNBIuoJXfoyyKYApYUukDBJQArL +h5hmxhTwmDm/6pS6EnrKjuta2kkBg0rT3SZOisg9+HFwlRX3vjqNSi+WAiqb +k2/ZYkeBsow5g7+GsshKx+pE+yEKdCBdF8tRGfQ7IEQswpl73ubRN0qqNNL7 +M+g04UUBzYnh46vVJFG/uhDfLR8KLPDee9KxRgKF+kD5gQAKXPtr86ltQgw1 +/8yZb7xAgQCHaD2NbyLIk9aRHRBOgUH/TbrXZ4XRZq9VxpRoClgWXsO2CAmj +vd+OJCYlUGCH/PrUsOcCaEYlUdc0mQK2rRteL2vxo1S3p58W07jxn+t0w8NN +aPALgeqeT4ErZ6B1bHo9ClPa1yFTTIF1PasevC3lQypO4YFvy7n6+XUJ+vut +Q94Dw89071Pgu2vqJkPaGiQoK3bsZy0F7DPcDxDkeVGVvZFQXiMF3kh1T5Hl +VqO5D/kOm1q59R1/JOoEPChdomt1YxsF3Pa99/jWvIzj1muL/d9RoG3d7H+z +hCU8otNtZqCfAkMaM8ZdUv9wNeHk9MQhCvAb7Zp5XjmHv7Zq1jcZpQAh7cer +Afu/uMgblbjKX9z645vZ9C/T+PIvVkHrNAV0NvntGi74g4+JbK8bmadA6ahA +gXLwb/yprdWY1BoqELXQy0abSbwi2G6V5gYqjMQoUj7WTOBpWS5SuwSoIHSh +Iyepfxw/NRJofFGKCsyb0Z17Ar/jTnxhh9LlqCDcPAaJ3//DLShX/O8RqHDB +2PZ8ud8orrsrOfatKhX4a58tHxP+ipN8cvK+06gwHHzbN7dpGBdKKnnIq0EF +/ww/Ye3YL/jivep2OR0qSMEzPlnXIfz9QsvyHn0qeNzO3N2V8AlvlH8n7m1M +hcIn7779KejHy/QHaJHmVAgNTA/Z9aEXT3X9zzBnNxX+S1rjYkD6iEdETdk/ +sqaCpHWAtGnsB9yvZMH3vT0V8kbFj33b2I07vlkbM3GYCjziDScac9/j2qIy +9wnHqLDtkMSO/wQ7cYI2qY19kgqlzds2vBxpxwXsGF9t/KmQepqVwJ/6Fv8X +rLvoc4YKIgfU1hBj3uCjWQaisReoMB+5xrYj7RXe+cSCUhDO1fdp62rNVy/x +xyM2+g3RVHipYFV+TqoFT6F4nfyTyI2nQeOR4H2OX9oVEMmfSgUV6YvVxpnP +cB+fkEzVTCpQp3dsVbB8ijskxVTr51FhbsvXRSOxJ7hpTdKrg7epkG6iUzbU +34Bv/Zj5JaCMCpnf48r7aupxxcXb89fuUOED37/vrOpafE6/TrWplgorRvJd +p4Qe4COuzfinRm5+QbQjvl41eHtUu/Xccyq0umpXjw5V43Ulvd4ir7j5LGWo +K/ndxYvfjITT2rnxznR6RMlU4cmTE2nGXVSIk7GoT/lYiYeJzt9x6qWC8a1e +rO0gB7e34/98fYQKx/2qrvEQSnHjc5J/K75TwXX9yTXV24pxjWwlgZcTVDhf +rCOq5H8bl39KVR7+Q4XHlbt7Wa8L8I1ftdhLc1S4/Ts6dxzy8Vk+2Ce5TIV+ +hpvAufY8/Atl5zF1XhrMKWWfJJ7JxWt9HFPd+Gkw/Gz3ZK58Fl6U5MEJEaHB +C8NtL5/8Scev1/g135SkwdOKVdMav27ioR/PDdyVpcFsUNiBkwKpuPdi5PQb +JRr0SyvISlsl47YKCZu+qdCA1yZk31zFddzIIJ2wmkaDx6NujXPUJFw2mrNb +W5sGzI4evCogHi+pKH82v40GD356/UwviMN1u0q16xENft2MtfSLvII3LxQX +hxrRQFZfeOpU7GV8P6FI1siMBhmqR//trYrGv5gWXuOzpMG7lSb4OheJ+5zM +X/1qLw3MONaGhEMR+JW6nG97HGiwlNtjLRkYhssMZx0UP0KDby9XhqzJF/Gi +DZltPW40+HGhNi5hJATXZqXrZxyjgUH4cP/3nPN4k83N6sMnaUD8Rk/7eSkY +33s+RZXoT4M4/NGG1XFn8M+3bqSNBtHAl+hNrnkYiC9MJoQeD6NB8sqmYwsn +/fFoyfg/rCgaVMxtzHOb9cMl8Dj36VgaJA7OnJRL8cXzXa98vB9Pg23OGUJO +u31wjdjLFsE3aNBkXkAR1D+BN96JbsDTaPCn9qupyGZv3LInUmN1NleP1ozC +0WVP/JhyuFRMEQ14BD4Uuuxxx+fML8ZalNMgZ8fqPnKZKx7pF7IsWEWDni// +if0lueBiN8/7vquhQUrTt+zah0fwvIbgkeRaGjTqM85d9nDCWaNnDtg3cjnZ +xY1x2BF/vDmoVe45Dcreylw/KuOA99r5V+a30WDFaTh4eJMt7hHqR/R4RwPh +iNL682wbfLbQJ5naQ4OhkFd6n+P245fenNjwq5/Ln0+ll/Dsw0Wmvc9VDdFA +l9ZQWHBtD54j4/UrYJTrvzXaiY16u3GGvqez3g8aeC+dF5X7twvfGedm2jhN +g4amQB/veDO8p9qlNnyeBhfsj4aX3jTB3fuOMEyWaXA34uvK4ZYd+PQqp9yN +vHTYWu2p/0HaCA9TcxRr46ND2fvhS3GxBriQlUNUwmY6zKmq1jK36ONZAfb/ +9gvTIadut5zcVYQ/fGrzuU+GDvs72hJUO7bhxt/378tWoAN8dO3WvK+Lvxfc +1+xMosOm+d2vWc3auLP2Hj0VMh1O+T5QllnYik86WJV9p9NB9PW/M4R9mviF +8F0K5Rrc+2+2RnJeqeObS8wTfXToQPpTwbFxZuFqf02C/gIdAr7XeZg8peI1 +csY/Hu2gg6feU4crl8m4kZGR44WddJB7dm96/IIq3nnMoEPfig7HKjT9JDKU +cacEMFq7nw5t44Ybpj8R8Yn7+P0WWzpIh9FjSowI+LlPbMqVQ3RQGXlpdb1V +EU+l6gmJHqUDW2OPyBN7Wdza/E38Yy86THsfm/wuIYOLeB0RPubDzT9Qw4LK +I4W3XZ5JEA+gw5AOD1tOVAKPLYkReXKGDkl5UckpFmK4aatckvcFOvSpyPuX +F4vga8buiEqF0yHl0MelIlVh/AK5V+zkFTpcitr37MfcZny72YkbMgl0SGh7 +LZKWuRGf81gt0XyDDkfELT7I+a3Hq6OTk33T6BBTrb3Y7LcO9y2iSMpl02FR +aT8PLWMNzmh5nNJyiw47+Z70k36sxsf+2yvlX0SHV2rxxs0Oq3BX1WDpV3fo +4LXGiNG9bQlTMhFMO13DrV/JuMng7T/sk/stGUItHe79TTWvvzGHpUXqpL9p +4LKrwmfry7PYgcJXW8400UH3U+pNz+JpTKz5cAbpJTceb2hvxq/fWPvXP7Lt +b+gQq9qyrttuCtupLCuv+oEOGW1FSF/+J8a3ozKrs48O/+aaPrBLxrAmVyOF +C5/pwHlscfqr5zfs4qWebPJXOpxeWCMqYTeK4fneil3f6TBVZOe+eGoEW3jG +kxs6QQc/VevbIve/YA+GryvR/tBB+86tx9IKQ5g6sZ4Qvsitn/eCY0h+PzZh +sOcWYxUDLrAONquwerES56/E3rUM6IxeCPGd/IAdDTuTH7GRARvX71grMtSF +kfL4ldUFGVBs/z1YZPkdNvQkt6BflAG94VUTbww7sawhLZVoKQZM3UlZP1bR +jh1c1VqoKceA8I/B8XlBbZiUkqPqoBIDDls5GB/sfIV1we/bl1UYsPDTTOmF +20ss0SlSTZvKAK+0oW8yjBeYZahM8RCTAd20e88nVJ5jm3IqyFe3MuCAjPIJ +bYtnWEuDQYmuHgNqDymN66U9wS4NdlNGMAboVcVOxvE3Yvorx0qvGTCgrzR8 +n7JxPbYsv0LdbsIAPn2KagvnEVaLJ5WNmjPgzKLFyfq9D7AgR1V64m4GXJuI +LKVSarCtF2rLMWsGDNrO9mSrV2NTmVaM73YMuPHYRWutWxVWUT9ccd2RW0/u +cmFmYyV2bCCQCS4MmJcID5q5WIGpLm2q/HGUAS3Mnz4Tz0uxEdkcVoo3A7AY +eyNnk2Isl731joEvA97tCkhav+o25ujQoj4RwIDUacb5jRP5mMw5h6qbZxlw +77CezfyGW9iH9EmNHSEMKBIOlWvenYtdr710dzKcAV81FPBT57Ox3X1SWzOi +GTA+MHCyNycD418oqza5yoDd1Z8dotemYa0y+lp/EhhQenxA5VVBCtYuz1FZ +k8IAHV/N9g6rG1g3QU5KPIMBm4F1t0UzCetXid2gksuAgUlfPpZFAjZEmf+n +XcgAuxAFT3G1a9go4+i4SSkDLqX/+ZPPfwUb1+gasK1kgFaS9I5eiMF+axu+ +9bzHgA17ntvteBSJzW2703j2Ebcf5PxCtVOXsGVcoSq2gQEWj7MaPdzCsDWG +V29lNDGA9+fS2fOxodhGk4Xr5S8ZoJAmdq+l8TwmaO4Z+biNAZsKf4WoNZzF +xKw+BL59x4AukyGHkQ1BmMy+HZ6fexiwmvKYEnczAFM8cNd+aoDr1+ij/MeP +nsJUDipZrB5mwBXbkhjv474Y7fA1TPQbAz7b1eyXsTiJabgsMUg/ufpbPpQs +l/LGdI96KWr9ZsBdpTMON3Q8Mczro7DxXwa4EwuGqnPcMYOTJrwHFhng/C9L +r8bCFTM9dW/66ComqJVMv57f6oxZBhJHg9Yx4bfq98xL+5yw/cEJH2I2MUE8 +Xs9saMchzD5kpSVNiAnvDwxh9Wx7zCn8+KNScSZkf15w7Qw7gLlH9ZXWyTAh +sGAwXEPIGvOKNct8o8CEczxX7tYM7MV8rt2P+0RiQvjxJa3xkd3Y6STl0F9k +JnRtvaO+DiyxcylJvjxMJmz0YMyeEzXHwtJXuQhvZULK8X1Zr7eZYtHZJ/cT +9Jhg6vZj3L98BxZ3a2CHJs6E214XaG0uhtj12+Y6RoZM0Ov/KDxto4/dLH2o +Zm3KhN6IPiO3VQjL4qjKuO9iwkufd/3fa7Zj+XdvbArcyx0Bnqavx5p0sZL7 +vEtRB5gwNRQ2N6iojVXW+k6kOjDBeqnvJblJE6tpGBwsPsKEv6LF8guF6ljd +s10dj9yZIPzIajYqgok9fVH79JUXE4TWz1ZgRBr24hW5ut+HCfovwnaHyJKx +129TCn4GMGF0yF/u5VEVrPPd2pTls0y440IUil8kYj0fTkULhjJBQsZhQu2d +Evapb+iMYgQTOgna2S4vFbCRQSsv9ctMWJA3vbtgLYuNDdc7GFxjwlaN/vm1 ++tLY5H9Uy33XmWDD/99yYqgENvPjJnK9yYQ9NOO9jzaJYf9+8akHZDEhanVX +Z0ivMMYzHUCIvMWEoqdlRoGvBLF1c8OiKUVMsHiWtrLecjO2eXHP2qJyJiwt +HEvVVd+AifA0zj6oYoJWRNy6+mPrMKk1jG8v7zOhgHRgwmmKF5Nfn/Gxt44J +Yn0ndozWrcKImze++vGEm1+5YdHH2BW2mlBQ3WIzE94Q/t6o2bTIZoiNlvO/ +ZsJgZ5DNjZ9z7K1S+7PlO5gw4i4Y95/KLHub7NN4ZjcT7tt0mWAVf9hfiKRP +33uZcPG9Y/qTrCl2DDWSmj/IBNqTg2lesb/YLM1vQY4jTDiv3X6JsH2c3bNt +Z7PUdyZ0FJ5jVRl8Z4calIm++8kExW+p7qSbo2y1nQJHrv5mwjevs1ae2iPs +9j0+FSZ/mcBH23gXRL+wA+06F1Ytcv2pqXRCmfyZfY2VRnLkYcHL44JtASP9 +bJet5ua1q1lQ919ZTlDnR7aO7qKv1FoW9A4JyfaJfGBvYpenBvCxoGnuEHlL +5nt2laHgKHMzCy7MxVA8fdvZ9ua+mmNCLNg8ufWyvnYre/W+d6H54tz4A25G +pp+b2MX2Wm2OMizQ11ItFs5sZJ9zHJ2ulWXBLR+8cDm3nr3bOWWLtAIL7G98 +3yrq/Yg95znv8Y7IArbxSZWs5Wr26+Ml11gqLDg9EyQXdq+KneN7sOaqGgv4 +LDD6jtJKtsmZel5TOguEh0r5R/1K2MnRF7PqtFmQ/uh0ZnN6DvvYFY3n0nos +iLOUGJCIy2Tj8cM/Tm9nweHR2bmynWnsryk79NSBBWGJT90sX11nb7294X2B +GQtuK4rM7Z+OYXc+T9hwzYGrx7q4kmk+f7YAb57/kTBuPRdOiuWtGLPXzTfs +m7rEgszWf7BKyYi9PDGgcTGKBW13iD3rMvXZv3qlp3KusGBL01ITmt7Gbq9K +OP45mQXH6dnmG88y2YnOF90Pl7KgPVmi5/F2cbbEUyfbQ+9Z8LnmxIB/+Jft +8hcV2HYq6mAjO+7QUxe4fYOyQ83eF+rQM8EPV9ambmNg0pzAQxpQtkZe5mbB +PT2/TyLPdvJogmFhWHL3RLnurz9XrM1SNWFK48WTQ/X5OibM5jQz+laQp6to +hfQlaD/+s33hb9tWWM1IEafH7Nc6QdPo7XDTAouBN2K2o7JbsQnX93YbtKEh +wzxyj/wDjR0kqV38edrwRue0yAnLg+pqoZeDnuroQHR9dLmq6wyT4qbXoNyr +A9b1+0mrTY4w3B57XKr21YW+b19d/xZ30xpy3rtOievBWJe93QlsC3W6aOUv +874eZI3pXYlQtCG7KJduSNu1DS6r7aQuO+eqTlGStKsmt4Gaqs2A+d17yg/y +F4ZmordDx6/N9vlZ/UR7IyJsl2dDje9rvXy/ZaUtx6MeMhrZIHH5fOelI6MK +4hu97+w6gEG7J7J97DYil294/uykHQYvhK+YPgvrk9M4H2eY5IBBg2RyStSV +TjnLycquniMYyNp88p/tbZSL7J6Zd/HGQJQicGbyebrcXF6IwdmLGAyyz1xu +qNgr17s96V1hKQbvB8hYulWjrEdAfoZZBQZDysXTKp/uyc5W3HMbr8Sgak7/ +3E+rclkRQs9f9RoMBkSPRsXvSZM1Xy8nW9+IAZ2Ia5ylBsjWvS90fdeFQYtb +23+GKlTZnQIP6Kd7MCjfX/9bSZkg22PyclaqDwP5jXHfvyAp2elHP6IdP2NQ +I7pjpjh/rSw9l1X+fQwDr21HjzVrDm2p69U/feUnBsE/i4QKZrq37BTbh5iT +GAhXXb+x/1bbFveogA7/GQyuvkQ5AYa1W6YbI9Mk5zDQNHO6rsWo2hL2L8Xl +0T8M4gWawmTwoi1CW4tph5YwcFD2sZhRy9mSdfzRzMoKBjP7NV7v9j+65X/y +6M0A "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.0614892364290581}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3092,6 +8979,7 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -3119,7 +9007,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.060553949877372025`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0614892364290581}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -3127,9 +9016,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913408819317417`*^9}, - CellLabel-> - "Out[338]=",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] + CellChangeTimes->{3.9913408819317417`*^9, 3.9938304278211393`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"9977a95b-fc52-46ad-abab-bd903b21bbab"] }, Open ]], Cell[CellGroupData[{ @@ -3182,66 +9070,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[339]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], + "In[100]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 339, 345, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881982744*^9}, + "\"\\!\\(\\*FractionBox[\\\"0.002463877444811381`\\\", \ +RowBox[{\\\"\ +888662635352462001777021748999539421035580108554314879524123307442442\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"169\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4688253622009728125737369600000000000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 17, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.993830427941711*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], +In[100]:=",ExpressionUUID->"204f9ea3-9c5f-4089-8fda-3a273015c247"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 346, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881991743*^9}, + "\"\\!\\(\\*FractionBox[\\\"0.0023174104993755316`\\\", \ +RowBox[{\\\"\ +870978248908948007941659016194448586556972064394084013421593253624337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"173\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9573749317345360351959449600000000000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 18, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.993830427948286*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], +In[100]:=",ExpressionUUID->"6dc326aa-9b66-44a0-849d-400419c8bd5d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 347, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882000746*^9}, + "\"\\!\\(\\*FractionBox[\\\"0.0021796503855844476`\\\", \ +RowBox[{\\\"\ +870978248908948007941659016194448586556972064394084013421593253624337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"177\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7493173453603519594496000000000000000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 19, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.993830427954125*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], +In[100]:=",ExpressionUUID->"15984b26-ab7f-4b1b-ad56-b3f148f40e67"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 339, 348, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882008745*^9}, +during this calculation.\"", 2, 100, 20, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.9938304279593773`*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], +In[100]:=",ExpressionUUID->"ab022b98-eb5d-4681-9d4f-062989059995"], -Cell[BoxData["12.553654989521348`"], "Output", - CellChangeTimes->{3.9913408882266617`*^9}, +Cell[BoxData["3.5244889596990427`"], "Output", + CellChangeTimes->{3.9913408882266617`*^9, 3.993830498032023*^9}, CellLabel-> - "Out[339]=",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] + "Out[100]=",ExpressionUUID->"7691b290-c7bf-4e48-b2b0-0d184fc172ee"] }, Open ]], Cell[CellGroupData[{ @@ -3309,68 +9207,78 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{ - 3.9918497473740044`*^9, {3.99184977815234*^9, - 3.991849780845421*^9}},ExpressionUUID->"1d118f77-7d68-dd41-b0af-\ -09454f88e7f1"], + 3.9918497473740044`*^9, {3.99184977815234*^9, 3.991849780845421*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 340, 349, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882626343`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.070983117181051`*^-101\\\", \ +RowBox[{\\\"\ +374965889271059465545581747778455803963093263903759088685381486711070\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"69\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9172612278061859168189007240401361305600000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 21, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.993830498091297*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], +In[101]:=",ExpressionUUID->"a662fa63-7786-4f23-8a26-b993d03fc35d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 340, 350, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882726326`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4624070445581468`*^-102\\\", \ +RowBox[{\\\"\ +199819322392547589189240513391139097931932400334313218360439794268329\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"73\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0850829791647507279219584098854397542400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 22, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.993830498096134*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], +In[101]:=",ExpressionUUID->"2413eb63-93fd-474e-8d86-1924eeb48cee"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 340, 351, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882816315`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.987589054447965`*^-104\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 23, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.9938304981005*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], +In[101]:=",ExpressionUUID->"1192c5ed-426e-40be-9e84-f14beee79ea0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 340, 352, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882906322`*^9}, +during this calculation.\"", 2, 101, 24, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.9938304981046047`*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], +In[101]:=",ExpressionUUID->"5b8f7902-e63b-4064-acb6-619be51c4cd2"], -Cell[BoxData["1.3456729512531673`"], "Output", - CellChangeTimes->{3.991340895263792*^9}, +Cell[BoxData["6.217999413690409`"], "Output", + CellChangeTimes->{3.991340895263792*^9, 3.9938305070649567`*^9}, CellLabel-> - "Out[340]=",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] + "Out[101]=",ExpressionUUID->"0c74a522-dfbc-4281-8e2f-bd2f4ee6b0b2"] }, Open ]], Cell[CellGroupData[{ @@ -3391,8 +9299,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3437,68 +9344,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497892022038`*^9, - 3.991849792285101*^9}},ExpressionUUID->"c8039063-5f4d-134a-b6ba-\ -e19335f7a9f6"], + CellChangeTimes->{{3.9918497892022038`*^9, 3.991849792285101*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 341, 353, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895297941*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.070983117181051`*^-101\\\", \ +RowBox[{\\\"\ +374965889271059465545581747778455803963093263903759088685381486711070\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"69\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9172612278061859168189007240401361305600000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 25, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.9938305070998907`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], +In[102]:=",ExpressionUUID->"4fc15356-af34-46b5-b1f6-f903c236928f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 341, 354, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895308939*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4624070445581468`*^-102\\\", \ +RowBox[{\\\"\ +199819322392547589189240513391139097931932400334313218360439794268329\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"73\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0850829791647507279219584098854397542400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 26, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.993830507107048*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], +In[102]:=",ExpressionUUID->"f5a4c722-bdb0-44f3-87ea-f482a4ba2178"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 341, 355, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895316965*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.987589054447965`*^-104\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 27, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.993830507111864*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], +In[102]:=",ExpressionUUID->"5d141a6f-a3b3-4889-ab6a-03d0f4c68ba9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 341, 356, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895324953*^9}, +during this calculation.\"", 2, 102, 28, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.993830507115888*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], +In[102]:=",ExpressionUUID->"908964c3-ffa0-44d1-8796-84dc27d41975"], -Cell[BoxData["11.729429210875175`"], "Output", - CellChangeTimes->{3.9913409010488796`*^9}, +Cell[BoxData["25.982556236967202`"], "Output", + CellChangeTimes->{3.9913409010488796`*^9, 3.993830516236203*^9}, CellLabel-> - "Out[341]=",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] + "Out[102]=",ExpressionUUID->"f511cffe-c0f6-4490-83e8-0e45b5f2456d"] }, Open ]], Cell[CellGroupData[{ @@ -3519,8 +9436,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3565,68 +9481,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497964884186`*^9, - 3.9918497998504505`*^9}},ExpressionUUID->"a474307a-af78-3040-90ec-\ -fb8d284b16bb"], + CellChangeTimes->{{3.9918497964884186`*^9, 3.9918497998504505`*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 342, 357, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010848827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.070983117181051`*^-101\\\", \ +RowBox[{\\\"\ +374965889271059465545581747778455803963093263903759088685381486711070\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"69\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9172612278061859168189007240401361305600000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 29, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.9938305162769833`*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], +In[103]:=",ExpressionUUID->"1eb293b1-4f81-4ab2-89ca-9af49a097d47"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 342, 358, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010938797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4624070445581468`*^-102\\\", \ +RowBox[{\\\"\ +199819322392547589189240513391139097931932400334313218360439794268329\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"73\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0850829791647507279219584098854397542400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 30, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.993830516282085*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], +In[103]:=",ExpressionUUID->"28ed9a69-177e-41d7-8a43-0558186f407d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 342, 359, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340901101883*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.987589054447965`*^-104\\\", \ +RowBox[{\\\"\ +109421060942159059840028105132987770027526182423069918374176831341337\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"77\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9143939061749861006442525326680942182400000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 31, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.993830516286817*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], +In[103]:=",ExpressionUUID->"236aacd4-f422-41db-bf89-e46f890f7aa5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 342, 360, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409011098804`*^9}, +during this calculation.\"", 2, 103, 32, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.99383051629084*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], +In[103]:=",ExpressionUUID->"37472fd1-43e3-434b-8550-89fc097000e7"], -Cell[BoxData["21.67464099510054`"], "Output", - CellChangeTimes->{3.991340904517517*^9}, +Cell[BoxData["2.063900070613502`"], "Output", + CellChangeTimes->{3.991340904517517*^9, 3.9938305222217293`*^9}, CellLabel-> - "Out[342]=",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] + "Out[103]=",ExpressionUUID->"06e5aa76-b852-499a-a731-ecaccba0955b"] }, Open ]], Cell[CellGroupData[{ @@ -3635,22 +9561,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849803549658*^9, - 3.9918498086143265`*^9}},ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-\ -f67bfdbd9bc7"], - -Cell[BoxData["0.0843966342510027`"], "Output", - CellChangeTimes->{3.991340904549515*^9}, + CellChangeTimes->{{3.991849803549658*^9, 3.9918498086143265`*^9}}, CellLabel-> - "Out[343]=",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] + "In[104]:=",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], + +Cell[BoxData["0.8491128353898479`"], "Output", + CellChangeTimes->{3.991340904549515*^9, 3.9938305222475357`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"3938ee08-791f-4861-89b8-c70ccc865564"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918501018852215`*^9, 3.991850105557743*^9}, - 3.99192470649716*^9},ExpressionUUID->"d104d373-080a-854b-92ff-\ -e87abbd4c41c"], + 3.99192470649716*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ @@ -3673,12 +9600,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[345]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], + "In[106]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.9913409045775146`*^9}, +Cell[BoxData["18.528762193323544`"], "Output", + CellChangeTimes->{3.9913409045775146`*^9, 3.99383052225882*^9}, CellLabel-> - "Out[345]=",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] + "Out[106]=",ExpressionUUID->"b6ddb65d-e621-4b58-a724-6f80db97e8cb"] }, Open ]], Cell[CellGroupData[{ @@ -3688,12 +9615,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[347]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], + "In[107]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.991340904625164*^9}, +Cell[BoxData["0.027882910463690284`"], "Output", + CellChangeTimes->{3.991340904625164*^9, 3.993830522266479*^9}, CellLabel-> - "Out[347]=",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] + "Out[107]=",ExpressionUUID->"efba9262-f2bf-477b-8b3f-99cd2ca42487"] }, Open ]], Cell[CellGroupData[{ @@ -3703,12 +9630,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[350]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], + "In[108]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913409046880226`*^9}, +Cell[BoxData["0.51663581723945`"], "Output", + CellChangeTimes->{3.9913409046880226`*^9, 3.9938305222739353`*^9}, CellLabel-> - "Out[350]=",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] + "Out[108]=",ExpressionUUID->"9bb84cb9-1a77-49c2-9508-e59a01a8c9ea"] }, Open ]], Cell[CellGroupData[{ @@ -3898,12 +9825,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[351]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], + "In[109]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[BoxData["0.021613768236132463`"], "Output", - CellChangeTimes->{3.9913409047132187`*^9}, +Cell[BoxData["0.008275696738347329`"], "Output", + CellChangeTimes->{3.9913409047132187`*^9, 3.993830522282791*^9}, CellLabel-> - "Out[351]=",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] + "Out[109]=",ExpressionUUID->"3c40ed91-4507-46c1-9fbc-69695f800b07"] }, Open ]], Cell[CellGroupData[{ @@ -3917,12 +9844,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[352]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], + "In[110]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[BoxData["6.028089553291302`"], "Output", - CellChangeTimes->{3.9913409048112164`*^9}, +Cell[BoxData["9.741877335532116`"], "Output", + CellChangeTimes->{3.9913409048112164`*^9, 3.993830522355167*^9}, CellLabel-> - "Out[352]=",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] + "Out[110]=",ExpressionUUID->"55a23ce5-cb2e-4f6d-91a2-6de75b0bf223"] }, Open ]], Cell[CellGroupData[{ @@ -4114,12 +10041,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[353]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], + "In[111]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[BoxData["0.010798036798660033`"], "Output", - CellChangeTimes->{3.991340904825058*^9}, +Cell[BoxData["0.10721557769865799`"], "Output", + CellChangeTimes->{3.991340904825058*^9, 3.993830522367737*^9}, CellLabel-> - "Out[353]=",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] + "Out[111]=",ExpressionUUID->"0bb00742-fe1d-446e-9745-07a8316f6331"] }, Open ]], Cell[CellGroupData[{ @@ -4133,12 +10060,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[354]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], + "In[112]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[BoxData["8.5284977476633`"], "Output", - CellChangeTimes->{3.9913409049303207`*^9}, +Cell[BoxData["2.7065496332928913`"], "Output", + CellChangeTimes->{3.9913409049303207`*^9, 3.9938305224501133`*^9}, CellLabel-> - "Out[354]=",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] + "Out[112]=",ExpressionUUID->"67b28ef0-6ea8-4e79-8314-00a4f9a0aff9"] }, Open ]], Cell[CellGroupData[{ @@ -4231,12 +10158,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[355]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], + "In[113]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991340904948307*^9}, +Cell[BoxData["0.2129709837599123`"], "Output", + CellChangeTimes->{3.991340904948307*^9, 3.993830522457954*^9}, CellLabel-> - "Out[355]=",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] + "Out[113]=",ExpressionUUID->"1177cf5a-0d8d-48c3-89de-ae8e05c3c362"] }, Open ]], Cell[CellGroupData[{ @@ -4326,12 +10253,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[356]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], + "In[114]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991340904981308*^9}, +Cell[BoxData["0.7870290162400877`"], "Output", + CellChangeTimes->{3.991340904981308*^9, 3.993830522467149*^9}, CellLabel-> - "Out[356]=",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] + "Out[114]=",ExpressionUUID->"7bb17fbf-ece2-4c48-8f4d-ca6371d6c635"] }, Open ]], Cell[CellGroupData[{ @@ -4454,12 +10381,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[357]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], + "In[115]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.99134090500931*^9}, +Cell[BoxData["0.16761434383624746`"], "Output", + CellChangeTimes->{3.99134090500931*^9, 3.993830522478487*^9}, CellLabel-> - "Out[357]=",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] + "Out[115]=",ExpressionUUID->"9b4d25ab-b974-42ee-a929-662b8b62ac87"] }, Open ]], Cell[CellGroupData[{ @@ -4521,68 +10448,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849824909197*^9},ExpressionUUID->"486d514f-ec65-1e4e-b780-\ -7e9487f745c3"], + CellChangeTimes->{3.991849824909197*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 361, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905038307*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.575607215730712`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 33, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.9938305224920464`*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], +In[116]:=",ExpressionUUID->"677cb072-fda2-4b18-8b8e-573f82c9d8b7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 362, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905047306*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.6645402700142574`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 34, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.993830522498914*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], +In[116]:=",ExpressionUUID->"6fab44b8-7ef6-4f5a-9dc9-c00d74f23b3c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 363, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905056307*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.755201857314594`*^-81\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 35, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.99383052250506*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], +In[116]:=",ExpressionUUID->"db5798e0-8ad9-4b8a-9d12-c0e4cf7f5a0a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 358, 364, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905064308*^9}, +during this calculation.\"", 2, 116, 36, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.993830522510322*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], +In[116]:=",ExpressionUUID->"51e2841e-d47c-4dc4-9023-f48edf7dc6c6"], -Cell[BoxData["6.028089553291301`"], "Output", - CellChangeTimes->{3.991340908920454*^9}, +Cell[BoxData["9.726819700247194`"], "Output", + CellChangeTimes->{3.991340908920454*^9, 3.993830527747773*^9}, CellLabel-> - "Out[358]=",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] + "Out[116]=",ExpressionUUID->"9f66be06-0685-46d5-889f-bf83e9b2be43"] }, Open ]], Cell[CellGroupData[{ @@ -4644,68 +10581,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918498299076843`*^9},ExpressionUUID->"c7144ce5-8356-d548-8854-\ -18c538c3321c"], + CellChangeTimes->{3.9918498299076843`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 365, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908954941*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.575607215730712`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 37, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.993830527784071*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], +In[117]:=",ExpressionUUID->"e0c48689-991b-4925-ad7e-51ff7d533804"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 366, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908964924*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.6645402700142574`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 38, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.9938305277892103`*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], +In[117]:=",ExpressionUUID->"c434cbfa-3ed9-4411-a637-ec1bfcec6e66"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 367, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409089739246`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.755201857314594`*^-81\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 39, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.993830527794733*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], +In[117]:=",ExpressionUUID->"d91bcd9c-0524-48fc-a041-00733cf09c18"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 359, 368, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908981924*^9}, +during this calculation.\"", 2, 117, 40, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.9938305277997637`*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], +In[117]:=",ExpressionUUID->"2a00f6ed-9b48-4f43-9819-7142f2bb75f9"], -Cell[BoxData["8.528497747663296`"], "Output", - CellChangeTimes->{3.991340912767397*^9}, +Cell[BoxData["2.702366226352424`"], "Output", + CellChangeTimes->{3.991340912767397*^9, 3.9938305330749073`*^9}, CellLabel-> - "Out[359]=",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] + "Out[117]=",ExpressionUUID->"bafa1c34-09d8-43b3-8086-3be69f5a33a3"] }, Open ]], Cell[CellGroupData[{ @@ -4763,95 +10710,117 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849833066021*^9},ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-\ -a45df2eabf0c"], + CellChangeTimes->{3.991849833066021*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc0110cB3CbzKRIVMpok6yfkc/H3ruE7JVVPJRERoOEUolU6vczo8em +SOWREU88kpGdPZJNGa3n9tf3vM77cz/3c+49557vLmdfczcGOjq6A/R0dH++ +ERyeGnRzMqjpbYr1yaw4HmsoacUii77vsjTFPVlR2OCkQOxmWZQ1lctzNmJF +c3Yvusrdsph2aLmqRpoVK6OvtYqCLK7+u/X4/DoLJkZWB86dl8XDaebb5m6y +oGY45Z+oz7Jo61Cs7fyaGVP9xUyfNclhRd3DfAEZJiz+VBW7tU8Ov42mF1wX +ZMJqfbv6kC9y2GxUwS1Cx4Sju5NU1dnlcda3aN+L/xhRoo310HsdefRnjcu5 +58WIuTJfNnyulsfHQXGtfU8ZsHy5qEb4hQJWFg7d1NKkx38djX+HNyigB/PO +858l6bGnaUpppFMBdbTusOQK0uP3DNHinG8KGH1J8XTcHB2qHk+kyctS8OhW +hdRnKXRY+ywo1LSAgkt8Ia1sa7+hJRAUrmYq4qktISujqT/hdPOjh9RSRUw4 +KBLTE/YT2CV+/K6oUUTOPHNretufoNVR3rAwpIhNHJ9uDPH/hAqZIzYOO5Sw +/XNv5OjNH5AxLxaqdE8JrydYhJdd+w5BXuw189HKODPeU/niwRpsqfbYw5ms +jLJ7x3+Zha5BsWB97J4nynhssVmUz3ENZhquHLOvU8ZNq5l7eCTWwHnPz7FG +ehWcXn11YaJkFQxH59ieBKug1CMl77GPK7DLvsPYzucoMkw/c4+mfIOMKp76 +s8FHcUfTsNW5Xd9AQlQf4qKPYhqrfG04+zc4OFkp9TLjKEYJGzhO930Fef/s +jYL9R3GbSOJhkStfwTAqpLXdSBXRSe9Xc/syBObvsjSUAjx49xS9ctwSrG60 +bXY5Cqiiwt8UE7QEIQFJ2iEGgO6hC7pLrksQQeFQeHoKsPzdtmYu1SWIrV4W +YKMBKq+kaLgtLILpl5FpJzZEU6HyUxG2i+D2+3n+9guIIi7bKyM1FmAzq9Dd +NxGI3mMT3GrSC1DNHX7BLRpxYcrr2eadCyCyQ0cz7x5i+iKDH9P3eehT6exW +eY54VG8/lb50HsyDV5hslxA3ab36x2L/PKh+VTj54LQaBh5MvNRqPAszPx6i +6jk1HLRun+mUmoUUJjqJ4YtqmPBbnMbMOwtrfA3z++LU0CQlZ6yrbQZKj1hF +vXiqhtolDH5WJ2dgv19QUdeEGtrLH02O/msaBL6Uswo4q2NP30z23hdTQFll +X6F4qmPcZl7PaNoU2DDbjdv4qaNvLq8Bc/QUpOykr3scpo4Zzkfaj5+Ygt3H +9C5LPFTHU1xtGUYrn0HydfcPuXZ1TJG+ahqo8hm049cXjmlrYJXkMkt2zwR4 +pBgOBRppYKNdTbxz3QRcz3ncknxMA1tU/dLlCiegqUa9oM9ZA2sir4yLRU2A ++WqMj2u4Bmb4GGuKyUyAnZPQREC5Bob6CWnG3B6HszIqfXf2a6LlA+8dwg5j +YCs/N3BLWhPZGS90sRqNgaZi2shNiibesXl0iVV5DPiA7UuMtiYGHrdRVBcY +g2L99rXLzppYnSTll9YyCvNOPgIBDzTxmn4X3ar2KHjfSjG3YNdChpXKPSZq +I2CeYGJpxquFKRJ39l6XHgGlJAYbk61aGOe9tr191wiwp3g4GUhoYXn1cnwK +wwhkP5H101DXwvzki4pfa4dhvLLphkywFnZyZxqVGA6D88yPBr4pLWSubGrv +ODUEZW+/fc1ZIPX7tnX1WA0BJ21+N65p4Sl6yvC8HsnNRy/6sGkjm86tfJOD +JC9vPFwnoY0XVEVyOhYG4dnlB8mBLtr4ZmogbS58ENi2Ujy6+7RRLj22Mc5k +AOwWpBN9R7WxoHKbwFW5ASh+d6CaeVobbSYV9icLDYBt6E7hI9+1ca9IJjf/ +5CcoGmZpiRHUwehPyUWulz+BTV6HgoqlDvY9m9996FU/5KkHsFLf62DQFO9w +gEYfnN11UrXkow6OTtreU5fsAxU6jXP1/Tp4axfLbQnBPmh6vWlk7osO2qnU +TB2a64VpSnElsumiAHb7KaT0wn6phXPDqIuHs7fTi6z3QLaQ76h4sS7+OmM+ +QK3tBr91SyGlF7r4zmduYqKoGyjdqubGVbo4ORsA6tRuaEjirgps1sX9g7VX +DwV3wwRv/sP6KV30Lpvk7TvcDRJsM+aeonqokkYdiErtgoxlrze5d/Xw+JcI +jaj4TujOub/LOkUPIyKdkuNCO4HboeESc4Ye9uofjcj07oQL/4qr25foYdBB +plxu3U4wfjxYzdOqh5LTC/Mv6TthTcey1p9HH088/nH1TNBHMH6oVk+J0ce1 +72eWUvw74Iqp356x2/q4JevKhkbnDihnpl67fV8ffUrfsm6w6ABRvx86U9n6 +yPJI2bdUpgNWNcsaHtbro/XnpJa3X9shffbgu19MBqjd1u7178V2WFXb+l9t +uAFeVS4pq09sg+XpJ2pG1wxwNI7z7MboNpi7p/C846YBmvEH27sHt8H4jCV1 +/JEBWrxeCVd0aIP2+4l/sb0yQHv+Lv2QfW1QtLCJ33DVAOfbFWcdqlrBK5XL +oc3PEGuXrkzqrnyAfjrGhSEnI3w9btBWFNUChkURvpMeRmjVf6Y44WILVDj9 +mpn1NcJjP/dLhvm3QFL12tT3UCNkYMjo9LFvAdOr86NbHhih3dXT6wXyLVDN ++qlLr9UIG2S/v4n98B6yuF9UFakb47Uk8hplNsMZYd9bl0RN0DCv/4BVSBPo +p8tQRA6Y4IOltZwozyaQ2L86UHnEBKtRpKf2RBP0K1yS+qFmgrlFfZx+sk1g +aJHQHOhogm+9fo6HzzbCvpgyTp9HJiiqu7bhvFsjLH4P1/ybwxTzH5TyHbN/ +B/meDVWJkaY4Fxh9Pz6oAToKUgXFrpuid+FlLwnvBvjxNdi/OM4UDfR6Xtbb +NYDB5UNi7xNMUcNMr2yfRgNMPrhzjS3NFP/LUlrz5G6AXU22xiGVpojCH7jb +surhruRCr+OKKZpfCBpnGngLwUuCKwc8zVBubPHHklcddGUkubKcNsNy8fO5 +X+3rQN6Sr3XQzwx5G7K20lvUwWI5Z15ikBnWv5Glk1OuA6+w386/r5nhncvV +v3g468B6w1hza5YZOj6VPBtTUAuUnYVZF0bNUNFk3NjsZw181de2rHcwx2P6 +rNm6xdUgf37pv3gXc3wZcONianY1BKXTtKxOmePG161P6anVsP59XfbzGXMM +4xNc64ythl+5BXwcYeb4trfkUa9bNbDwCH4wTjHH1COFexWFqkGg7YvBxy5z +7Pv35fudsW9A8eRttTEzC9T4h19MO6wKZGPkKn2OW+DmKB+h/wKrQPJFt9Ky +lQUuODfttfatgt0Cu2UZHS3QKyX7bIRjFXC2FUvsOmOBp/lLbDg0qmBQv53D +LsYC/VzKXnFvqIIoJYGP7dUWWCd9TsxB+h9oFXzkVStzDJ0N096xxr6GbVlX +XmXvPY7/jN5rNnCrgPLB/YbGXJbIwDq2e2KiDHa0z58KnLFEcXv2slvvn4FM +4u3c9MET+ErCzGWytwQeMS1J3qmxwjVK2+hG/WJ4ribVE/nCGi+GfRvX/1AI +yQoxvD+e2qD6pAHvt90F8L43M0om7iQuSjWXU7blwTOjFDG/CFucEuLx33vw +b1g4bUF3xtUOt1WZ2mxPzoGv2vs8ZjXs0fEmveA5pWzInuleDZB3QGee3gL3 +6SywSs10seN0xNI83MbXkwklxQYOjNccsf1ueEV4ewYoCrWuXV9zRJXgpT2b +fqWD6OCpng+eTpjs4x3SpJkOoxzeJikjTsjmWPN07m4atNw0dtE57oxV9GEL +IixpcDeIynGuxRkjLA08IiJS4VXl7zUXPRf080s4O7ExFaTfyFL2GLgg3e5v +jZ48qZBV4xk4ZehC/j/khWe4UuF2Q9uin6kLtmQoZn1jTwX31idfQk+4YOFI +pdUW5lTgHTfpv+fmgrRUlh8RazRw56JVNV5yQcccDg+eERrw2OI1mQqSe8z2 +rZfTQGRz/XvhVyR3/2T9uIwGh5uMtrJUuiBaVE+qP6eBucrJnK43JPdRV44v +ocFd4cDG0H/JPFmUv2XzabCt/2+ehi5ih3NBxek0ELMXSLZdIf2zGwbPx9NA +0XE2O1LWFSOOZwQKedEg6/58gLE88XMLrs2eNNjctqgqQHFFx6CbV7k8aDCr +tdKereyKItOf+RjdaZBxgI6+SZ3kqcJFq0404F7htd5kRuy18zWXDQ1Gb8ht +oJ52xapzH4b69WlgVq/QfsqX2H1OelGPBpV0StTDf5F+eWx2rMT3A1Tlqs+S +/dWjNGR1aGBsreM0FkLyt+JGyRo0eCFm/eJADMmvg9R1FRrcfHnRszyLODtO +kEuKBqeP3FMMyib9H/MnoCQNDHOKNlCeElva9Zw9RAP2e+M5ZXmk/mPSh4ED +NIj0N516XuqKWLNu/89eGlzcJ+b9rJrkKYxdGbtp4HWv0af4E8n7z9mzCdBA +j3tcxX+Q9Pt+wuQ4Pw32RtJxHRkmjprakL6FBuP+cnlFY2R9RXYvbqaBkzF1 +pnCa5Lq6s5G8NLBiDjhTsE7ynaHP5ThpoBOwzS+X3w1xszzXAQYaVFOj9O9s +dcOIHNO5K/Q0UGlaFAva5oZ0w6UV/XTk/sUbuzV2EBvkC+79TQXBzhCNXnFS +7zknJ7BOhS9K/fzsciT/1RZpOE+FeAba61MWJB8I6+H9RAV2Kc5ko+MkV+a7 +8LOPCldPBvnLnCB+8mp4qpcKQaWme37bkHq98/yN3VRwcqe/neRMPPlyjdZB +BZl3zq51fxGXS19O+48KnbfFOURvEecxanyvpEI+cHlM3ia+IxghSXx1Zrk2 +L4EYcnRcXlPhiF5tGOUeccvf5z68pMJNOpdFo8fEwpF6VeVU0PaldQflknn2 +pJdMFFNh+/ZoedV8YofCaBni5Xe+CYyFxNaHxiOKqJAmAUY3S/6cx09FkUIq +/Ozvr0qvIBYvUfsrjwqlhkLZzQ3ETBrlttlUiF1nYL77jngxleXNEyo4Z085 +WTcR8z/tlSDeyFQhNPqe+KqR4EomFXxeWsWvffyz/+bBnHQqiO5PChQbIx4R +iLKiUmG9M7Tt8zixo6VMx2MqtES6HS6YJA6ocLMgDhuSnVKcJr700PrYIyr0 +JLfZmSwRb/cM8XhIhTusvFrB9O5IR9VP7L5HhVeL/SfPMhIX+Eo7E0/0P/U/ +w0w8NFs4nUQFlVJNmvMG4sFka1bicceg7/q8xLU/jS3ukvkNtTZp8REXWzB+ +SaCCssKmfbCFOFj3wVXiW1y5ljKCxLHlvq/vkLxioEho15/9zjzXuk0F98zc +hi2ixPfPhk7fIvW3LgzwiBOnnpdIJB535+Ni2kdcemDHdDzJ+XQ8pg8Tb3FK +K7xJhYpffOHjR4iPOp93Jx77PJg4KEus0HVoB7FSVXBNO4VYZFw14QYVRn3y +d7xG4u6VuYQ4KnBbhciVqRNv5XhvRayooWtYpElsLha/k/im4PCFTF3iSUpx +cSwVypkKblH1iQ23bwknHpkLeXLfkPhtt5URMeXtlo4bpsQXii7PxZD7Lhr+ +cs2c+HO5Rw3xjZQChsvH/pyvn9R94mF/vcOBVsTy7+31ibns+XX8bIiXXevF +iSl6I3ZetsR0MRsZ/6zfGRpr70gs4aZZc53Mw66fZuVM3MQllUU8/JX/hbkr +cd/+9RhirqGR94buxMnPM/8ipjQVjmt7EOf+LW1D7FwW+hO9iPcwP9YkvpGm +v1nZ58/8lVOH//S/IXBA7gxxeJvAzj/9g0bVpPyIA1Gch5jTtchqnz8xIwMf +PbGCSZiv6Fnig1uGlqNJfyWDqO2BxM7n46eI48S3PhII+rNeYscw8fONYyW8 +wcRpIjd6iYe+F73juEh82bXvIzHnRNgQcxix8AJHO7F8q8Hq73DijjqhNuL/ +AaEXkzE= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -4865,106 +10834,127 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1nc0110cB3CbzKRIVMpok6yfkc/H3ruE7JVVPJRERoOEUolU6vczo8em +SOWREU88kpGdPZJNGa3n9tf3vM77cz/3c+49557vLmdfczcGOjq6A/R0dH++ +ERyeGnRzMqjpbYr1yaw4HmsoacUii77vsjTFPVlR2OCkQOxmWZQ1lctzNmJF +c3Yvusrdsph2aLmqRpoVK6OvtYqCLK7+u/X4/DoLJkZWB86dl8XDaebb5m6y +oGY45Z+oz7Jo61Cs7fyaGVP9xUyfNclhRd3DfAEZJiz+VBW7tU8Ov42mF1wX +ZMJqfbv6kC9y2GxUwS1Cx4Sju5NU1dnlcda3aN+L/xhRoo310HsdefRnjcu5 +58WIuTJfNnyulsfHQXGtfU8ZsHy5qEb4hQJWFg7d1NKkx38djX+HNyigB/PO +858l6bGnaUpppFMBdbTusOQK0uP3DNHinG8KGH1J8XTcHB2qHk+kyctS8OhW +hdRnKXRY+ywo1LSAgkt8Ia1sa7+hJRAUrmYq4qktISujqT/hdPOjh9RSRUw4 +KBLTE/YT2CV+/K6oUUTOPHNretufoNVR3rAwpIhNHJ9uDPH/hAqZIzYOO5Sw +/XNv5OjNH5AxLxaqdE8JrydYhJdd+w5BXuw189HKODPeU/niwRpsqfbYw5ms +jLJ7x3+Zha5BsWB97J4nynhssVmUz3ENZhquHLOvU8ZNq5l7eCTWwHnPz7FG +ehWcXn11YaJkFQxH59ieBKug1CMl77GPK7DLvsPYzucoMkw/c4+mfIOMKp76 +s8FHcUfTsNW5Xd9AQlQf4qKPYhqrfG04+zc4OFkp9TLjKEYJGzhO930Fef/s +jYL9R3GbSOJhkStfwTAqpLXdSBXRSe9Xc/syBObvsjSUAjx49xS9ctwSrG60 +bXY5Cqiiwt8UE7QEIQFJ2iEGgO6hC7pLrksQQeFQeHoKsPzdtmYu1SWIrV4W +YKMBKq+kaLgtLILpl5FpJzZEU6HyUxG2i+D2+3n+9guIIi7bKyM1FmAzq9Dd +NxGI3mMT3GrSC1DNHX7BLRpxYcrr2eadCyCyQ0cz7x5i+iKDH9P3eehT6exW +eY54VG8/lb50HsyDV5hslxA3ab36x2L/PKh+VTj54LQaBh5MvNRqPAszPx6i +6jk1HLRun+mUmoUUJjqJ4YtqmPBbnMbMOwtrfA3z++LU0CQlZ6yrbQZKj1hF +vXiqhtolDH5WJ2dgv19QUdeEGtrLH02O/msaBL6Uswo4q2NP30z23hdTQFll +X6F4qmPcZl7PaNoU2DDbjdv4qaNvLq8Bc/QUpOykr3scpo4Zzkfaj5+Ygt3H +9C5LPFTHU1xtGUYrn0HydfcPuXZ1TJG+ahqo8hm049cXjmlrYJXkMkt2zwR4 +pBgOBRppYKNdTbxz3QRcz3ncknxMA1tU/dLlCiegqUa9oM9ZA2sir4yLRU2A ++WqMj2u4Bmb4GGuKyUyAnZPQREC5Bob6CWnG3B6HszIqfXf2a6LlA+8dwg5j +YCs/N3BLWhPZGS90sRqNgaZi2shNiibesXl0iVV5DPiA7UuMtiYGHrdRVBcY +g2L99rXLzppYnSTll9YyCvNOPgIBDzTxmn4X3ar2KHjfSjG3YNdChpXKPSZq +I2CeYGJpxquFKRJ39l6XHgGlJAYbk61aGOe9tr191wiwp3g4GUhoYXn1cnwK +wwhkP5H101DXwvzki4pfa4dhvLLphkywFnZyZxqVGA6D88yPBr4pLWSubGrv +ODUEZW+/fc1ZIPX7tnX1WA0BJ21+N65p4Sl6yvC8HsnNRy/6sGkjm86tfJOD +JC9vPFwnoY0XVEVyOhYG4dnlB8mBLtr4ZmogbS58ENi2Ujy6+7RRLj22Mc5k +AOwWpBN9R7WxoHKbwFW5ASh+d6CaeVobbSYV9icLDYBt6E7hI9+1ca9IJjf/ +5CcoGmZpiRHUwehPyUWulz+BTV6HgoqlDvY9m9996FU/5KkHsFLf62DQFO9w +gEYfnN11UrXkow6OTtreU5fsAxU6jXP1/Tp4axfLbQnBPmh6vWlk7osO2qnU +TB2a64VpSnElsumiAHb7KaT0wn6phXPDqIuHs7fTi6z3QLaQ76h4sS7+OmM+ +QK3tBr91SyGlF7r4zmduYqKoGyjdqubGVbo4ORsA6tRuaEjirgps1sX9g7VX +DwV3wwRv/sP6KV30Lpvk7TvcDRJsM+aeonqokkYdiErtgoxlrze5d/Xw+JcI +jaj4TujOub/LOkUPIyKdkuNCO4HboeESc4Ye9uofjcj07oQL/4qr25foYdBB +plxu3U4wfjxYzdOqh5LTC/Mv6TthTcey1p9HH088/nH1TNBHMH6oVk+J0ce1 +72eWUvw74Iqp356x2/q4JevKhkbnDihnpl67fV8ffUrfsm6w6ABRvx86U9n6 +yPJI2bdUpgNWNcsaHtbro/XnpJa3X9shffbgu19MBqjd1u7178V2WFXb+l9t +uAFeVS4pq09sg+XpJ2pG1wxwNI7z7MboNpi7p/C846YBmvEH27sHt8H4jCV1 +/JEBWrxeCVd0aIP2+4l/sb0yQHv+Lv2QfW1QtLCJ33DVAOfbFWcdqlrBK5XL +oc3PEGuXrkzqrnyAfjrGhSEnI3w9btBWFNUChkURvpMeRmjVf6Y44WILVDj9 +mpn1NcJjP/dLhvm3QFL12tT3UCNkYMjo9LFvAdOr86NbHhih3dXT6wXyLVDN ++qlLr9UIG2S/v4n98B6yuF9UFakb47Uk8hplNsMZYd9bl0RN0DCv/4BVSBPo +p8tQRA6Y4IOltZwozyaQ2L86UHnEBKtRpKf2RBP0K1yS+qFmgrlFfZx+sk1g +aJHQHOhogm+9fo6HzzbCvpgyTp9HJiiqu7bhvFsjLH4P1/ybwxTzH5TyHbN/ +B/meDVWJkaY4Fxh9Pz6oAToKUgXFrpuid+FlLwnvBvjxNdi/OM4UDfR6Xtbb +NYDB5UNi7xNMUcNMr2yfRgNMPrhzjS3NFP/LUlrz5G6AXU22xiGVpojCH7jb +surhruRCr+OKKZpfCBpnGngLwUuCKwc8zVBubPHHklcddGUkubKcNsNy8fO5 +X+3rQN6Sr3XQzwx5G7K20lvUwWI5Z15ikBnWv5Glk1OuA6+w386/r5nhncvV +v3g468B6w1hza5YZOj6VPBtTUAuUnYVZF0bNUNFk3NjsZw181de2rHcwx2P6 +rNm6xdUgf37pv3gXc3wZcONianY1BKXTtKxOmePG161P6anVsP59XfbzGXMM +4xNc64ythl+5BXwcYeb4trfkUa9bNbDwCH4wTjHH1COFexWFqkGg7YvBxy5z +7Pv35fudsW9A8eRttTEzC9T4h19MO6wKZGPkKn2OW+DmKB+h/wKrQPJFt9Ky +lQUuODfttfatgt0Cu2UZHS3QKyX7bIRjFXC2FUvsOmOBp/lLbDg0qmBQv53D +LsYC/VzKXnFvqIIoJYGP7dUWWCd9TsxB+h9oFXzkVStzDJ0N096xxr6GbVlX +XmXvPY7/jN5rNnCrgPLB/YbGXJbIwDq2e2KiDHa0z58KnLFEcXv2slvvn4FM +4u3c9MET+ErCzGWytwQeMS1J3qmxwjVK2+hG/WJ4ribVE/nCGi+GfRvX/1AI +yQoxvD+e2qD6pAHvt90F8L43M0om7iQuSjWXU7blwTOjFDG/CFucEuLx33vw +b1g4bUF3xtUOt1WZ2mxPzoGv2vs8ZjXs0fEmveA5pWzInuleDZB3QGee3gL3 +6SywSs10seN0xNI83MbXkwklxQYOjNccsf1ueEV4ewYoCrWuXV9zRJXgpT2b +fqWD6OCpng+eTpjs4x3SpJkOoxzeJikjTsjmWPN07m4atNw0dtE57oxV9GEL +IixpcDeIynGuxRkjLA08IiJS4VXl7zUXPRf080s4O7ExFaTfyFL2GLgg3e5v +jZ48qZBV4xk4ZehC/j/khWe4UuF2Q9uin6kLtmQoZn1jTwX31idfQk+4YOFI +pdUW5lTgHTfpv+fmgrRUlh8RazRw56JVNV5yQcccDg+eERrw2OI1mQqSe8z2 +rZfTQGRz/XvhVyR3/2T9uIwGh5uMtrJUuiBaVE+qP6eBucrJnK43JPdRV44v +ocFd4cDG0H/JPFmUv2XzabCt/2+ehi5ih3NBxek0ELMXSLZdIf2zGwbPx9NA +0XE2O1LWFSOOZwQKedEg6/58gLE88XMLrs2eNNjctqgqQHFFx6CbV7k8aDCr +tdKereyKItOf+RjdaZBxgI6+SZ3kqcJFq0404F7htd5kRuy18zWXDQ1Gb8ht +oJ52xapzH4b69WlgVq/QfsqX2H1OelGPBpV0StTDf5F+eWx2rMT3A1Tlqs+S +/dWjNGR1aGBsreM0FkLyt+JGyRo0eCFm/eJADMmvg9R1FRrcfHnRszyLODtO +kEuKBqeP3FMMyib9H/MnoCQNDHOKNlCeElva9Zw9RAP2e+M5ZXmk/mPSh4ED +NIj0N516XuqKWLNu/89eGlzcJ+b9rJrkKYxdGbtp4HWv0af4E8n7z9mzCdBA +j3tcxX+Q9Pt+wuQ4Pw32RtJxHRkmjprakL6FBuP+cnlFY2R9RXYvbqaBkzF1 +pnCa5Lq6s5G8NLBiDjhTsE7ynaHP5ThpoBOwzS+X3w1xszzXAQYaVFOj9O9s +dcOIHNO5K/Q0UGlaFAva5oZ0w6UV/XTk/sUbuzV2EBvkC+79TQXBzhCNXnFS +7zknJ7BOhS9K/fzsciT/1RZpOE+FeAba61MWJB8I6+H9RAV2Kc5ko+MkV+a7 +8LOPCldPBvnLnCB+8mp4qpcKQaWme37bkHq98/yN3VRwcqe/neRMPPlyjdZB +BZl3zq51fxGXS19O+48KnbfFOURvEecxanyvpEI+cHlM3ia+IxghSXx1Zrk2 +L4EYcnRcXlPhiF5tGOUeccvf5z68pMJNOpdFo8fEwpF6VeVU0PaldQflknn2 +pJdMFFNh+/ZoedV8YofCaBni5Xe+CYyFxNaHxiOKqJAmAUY3S/6cx09FkUIq +/Ozvr0qvIBYvUfsrjwqlhkLZzQ3ETBrlttlUiF1nYL77jngxleXNEyo4Z085 +WTcR8z/tlSDeyFQhNPqe+KqR4EomFXxeWsWvffyz/+bBnHQqiO5PChQbIx4R +iLKiUmG9M7Tt8zixo6VMx2MqtES6HS6YJA6ocLMgDhuSnVKcJr700PrYIyr0 +JLfZmSwRb/cM8XhIhTusvFrB9O5IR9VP7L5HhVeL/SfPMhIX+Eo7E0/0P/U/ +w0w8NFs4nUQFlVJNmvMG4sFka1bicceg7/q8xLU/jS3ukvkNtTZp8REXWzB+ +SaCCssKmfbCFOFj3wVXiW1y5ljKCxLHlvq/vkLxioEho15/9zjzXuk0F98zc +hi2ixPfPhk7fIvW3LgzwiBOnnpdIJB535+Ni2kdcemDHdDzJ+XQ8pg8Tb3FK +K7xJhYpffOHjR4iPOp93Jx77PJg4KEus0HVoB7FSVXBNO4VYZFw14QYVRn3y +d7xG4u6VuYQ4KnBbhciVqRNv5XhvRayooWtYpElsLha/k/im4PCFTF3iSUpx +cSwVypkKblH1iQ23bwknHpkLeXLfkPhtt5URMeXtlo4bpsQXii7PxZD7Lhr+ +cs2c+HO5Rw3xjZQChsvH/pyvn9R94mF/vcOBVsTy7+31ibns+XX8bIiXXevF +iSl6I3ZetsR0MRsZ/6zfGRpr70gs4aZZc53Mw66fZuVM3MQllUU8/JX/hbkr +cd/+9RhirqGR94buxMnPM/8ipjQVjmt7EOf+LW1D7FwW+hO9iPcwP9YkvpGm +v1nZ58/8lVOH//S/IXBA7gxxeJvAzj/9g0bVpPyIA1Gch5jTtchqnz8xIwMf +PbGCSZiv6Fnig1uGlqNJfyWDqO2BxM7n46eI48S3PhII+rNeYscw8fONYyW8 +wcRpIjd6iYe+F73juEh82bXvIzHnRNgQcxix8AJHO7F8q8Hq73DijjqhNuL/ +AaEXkzE= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "PlotRange" -> {{0, 180}, {0., 2.949598791555589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -4976,20 +10966,19 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 2.949598791555589}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5003,105 +10992,126 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1nc0110cB3CbzKRIVMpok6yfkc/H3ruE7JVVPJRERoOEUolU6vczo8em +SOWREU88kpGdPZJNGa3n9tf3vM77cz/3c+49557vLmdfczcGOjq6A/R0dH++ +ERyeGnRzMqjpbYr1yaw4HmsoacUii77vsjTFPVlR2OCkQOxmWZQ1lctzNmJF +c3Yvusrdsph2aLmqRpoVK6OvtYqCLK7+u/X4/DoLJkZWB86dl8XDaebb5m6y +oGY45Z+oz7Jo61Cs7fyaGVP9xUyfNclhRd3DfAEZJiz+VBW7tU8Ov42mF1wX +ZMJqfbv6kC9y2GxUwS1Cx4Sju5NU1dnlcda3aN+L/xhRoo310HsdefRnjcu5 +58WIuTJfNnyulsfHQXGtfU8ZsHy5qEb4hQJWFg7d1NKkx38djX+HNyigB/PO +858l6bGnaUpppFMBdbTusOQK0uP3DNHinG8KGH1J8XTcHB2qHk+kyctS8OhW +hdRnKXRY+ywo1LSAgkt8Ia1sa7+hJRAUrmYq4qktISujqT/hdPOjh9RSRUw4 +KBLTE/YT2CV+/K6oUUTOPHNretufoNVR3rAwpIhNHJ9uDPH/hAqZIzYOO5Sw +/XNv5OjNH5AxLxaqdE8JrydYhJdd+w5BXuw189HKODPeU/niwRpsqfbYw5ms +jLJ7x3+Zha5BsWB97J4nynhssVmUz3ENZhquHLOvU8ZNq5l7eCTWwHnPz7FG +ehWcXn11YaJkFQxH59ieBKug1CMl77GPK7DLvsPYzucoMkw/c4+mfIOMKp76 +s8FHcUfTsNW5Xd9AQlQf4qKPYhqrfG04+zc4OFkp9TLjKEYJGzhO930Fef/s +jYL9R3GbSOJhkStfwTAqpLXdSBXRSe9Xc/syBObvsjSUAjx49xS9ctwSrG60 +bXY5Cqiiwt8UE7QEIQFJ2iEGgO6hC7pLrksQQeFQeHoKsPzdtmYu1SWIrV4W +YKMBKq+kaLgtLILpl5FpJzZEU6HyUxG2i+D2+3n+9guIIi7bKyM1FmAzq9Dd +NxGI3mMT3GrSC1DNHX7BLRpxYcrr2eadCyCyQ0cz7x5i+iKDH9P3eehT6exW +eY54VG8/lb50HsyDV5hslxA3ab36x2L/PKh+VTj54LQaBh5MvNRqPAszPx6i +6jk1HLRun+mUmoUUJjqJ4YtqmPBbnMbMOwtrfA3z++LU0CQlZ6yrbQZKj1hF +vXiqhtolDH5WJ2dgv19QUdeEGtrLH02O/msaBL6Uswo4q2NP30z23hdTQFll +X6F4qmPcZl7PaNoU2DDbjdv4qaNvLq8Bc/QUpOykr3scpo4Zzkfaj5+Ygt3H +9C5LPFTHU1xtGUYrn0HydfcPuXZ1TJG+ahqo8hm049cXjmlrYJXkMkt2zwR4 +pBgOBRppYKNdTbxz3QRcz3ncknxMA1tU/dLlCiegqUa9oM9ZA2sir4yLRU2A ++WqMj2u4Bmb4GGuKyUyAnZPQREC5Bob6CWnG3B6HszIqfXf2a6LlA+8dwg5j +YCs/N3BLWhPZGS90sRqNgaZi2shNiibesXl0iVV5DPiA7UuMtiYGHrdRVBcY +g2L99rXLzppYnSTll9YyCvNOPgIBDzTxmn4X3ar2KHjfSjG3YNdChpXKPSZq +I2CeYGJpxquFKRJ39l6XHgGlJAYbk61aGOe9tr191wiwp3g4GUhoYXn1cnwK +wwhkP5H101DXwvzki4pfa4dhvLLphkywFnZyZxqVGA6D88yPBr4pLWSubGrv +ODUEZW+/fc1ZIPX7tnX1WA0BJ21+N65p4Sl6yvC8HsnNRy/6sGkjm86tfJOD +JC9vPFwnoY0XVEVyOhYG4dnlB8mBLtr4ZmogbS58ENi2Ujy6+7RRLj22Mc5k +AOwWpBN9R7WxoHKbwFW5ASh+d6CaeVobbSYV9icLDYBt6E7hI9+1ca9IJjf/ +5CcoGmZpiRHUwehPyUWulz+BTV6HgoqlDvY9m9996FU/5KkHsFLf62DQFO9w +gEYfnN11UrXkow6OTtreU5fsAxU6jXP1/Tp4axfLbQnBPmh6vWlk7osO2qnU +TB2a64VpSnElsumiAHb7KaT0wn6phXPDqIuHs7fTi6z3QLaQ76h4sS7+OmM+ +QK3tBr91SyGlF7r4zmduYqKoGyjdqubGVbo4ORsA6tRuaEjirgps1sX9g7VX +DwV3wwRv/sP6KV30Lpvk7TvcDRJsM+aeonqokkYdiErtgoxlrze5d/Xw+JcI +jaj4TujOub/LOkUPIyKdkuNCO4HboeESc4Ye9uofjcj07oQL/4qr25foYdBB +plxu3U4wfjxYzdOqh5LTC/Mv6TthTcey1p9HH088/nH1TNBHMH6oVk+J0ce1 +72eWUvw74Iqp356x2/q4JevKhkbnDihnpl67fV8ffUrfsm6w6ABRvx86U9n6 +yPJI2bdUpgNWNcsaHtbro/XnpJa3X9shffbgu19MBqjd1u7178V2WFXb+l9t +uAFeVS4pq09sg+XpJ2pG1wxwNI7z7MboNpi7p/C846YBmvEH27sHt8H4jCV1 +/JEBWrxeCVd0aIP2+4l/sb0yQHv+Lv2QfW1QtLCJ33DVAOfbFWcdqlrBK5XL +oc3PEGuXrkzqrnyAfjrGhSEnI3w9btBWFNUChkURvpMeRmjVf6Y44WILVDj9 +mpn1NcJjP/dLhvm3QFL12tT3UCNkYMjo9LFvAdOr86NbHhih3dXT6wXyLVDN ++qlLr9UIG2S/v4n98B6yuF9UFakb47Uk8hplNsMZYd9bl0RN0DCv/4BVSBPo +p8tQRA6Y4IOltZwozyaQ2L86UHnEBKtRpKf2RBP0K1yS+qFmgrlFfZx+sk1g +aJHQHOhogm+9fo6HzzbCvpgyTp9HJiiqu7bhvFsjLH4P1/ybwxTzH5TyHbN/ +B/meDVWJkaY4Fxh9Pz6oAToKUgXFrpuid+FlLwnvBvjxNdi/OM4UDfR6Xtbb +NYDB5UNi7xNMUcNMr2yfRgNMPrhzjS3NFP/LUlrz5G6AXU22xiGVpojCH7jb +surhruRCr+OKKZpfCBpnGngLwUuCKwc8zVBubPHHklcddGUkubKcNsNy8fO5 +X+3rQN6Sr3XQzwx5G7K20lvUwWI5Z15ikBnWv5Glk1OuA6+w386/r5nhncvV +v3g468B6w1hza5YZOj6VPBtTUAuUnYVZF0bNUNFk3NjsZw181de2rHcwx2P6 +rNm6xdUgf37pv3gXc3wZcONianY1BKXTtKxOmePG161P6anVsP59XfbzGXMM +4xNc64ythl+5BXwcYeb4trfkUa9bNbDwCH4wTjHH1COFexWFqkGg7YvBxy5z +7Pv35fudsW9A8eRttTEzC9T4h19MO6wKZGPkKn2OW+DmKB+h/wKrQPJFt9Ky +lQUuODfttfatgt0Cu2UZHS3QKyX7bIRjFXC2FUvsOmOBp/lLbDg0qmBQv53D +LsYC/VzKXnFvqIIoJYGP7dUWWCd9TsxB+h9oFXzkVStzDJ0N096xxr6GbVlX +XmXvPY7/jN5rNnCrgPLB/YbGXJbIwDq2e2KiDHa0z58KnLFEcXv2slvvn4FM +4u3c9MET+ErCzGWytwQeMS1J3qmxwjVK2+hG/WJ4ribVE/nCGi+GfRvX/1AI +yQoxvD+e2qD6pAHvt90F8L43M0om7iQuSjWXU7blwTOjFDG/CFucEuLx33vw +b1g4bUF3xtUOt1WZ2mxPzoGv2vs8ZjXs0fEmveA5pWzInuleDZB3QGee3gL3 +6SywSs10seN0xNI83MbXkwklxQYOjNccsf1ueEV4ewYoCrWuXV9zRJXgpT2b +fqWD6OCpng+eTpjs4x3SpJkOoxzeJikjTsjmWPN07m4atNw0dtE57oxV9GEL +IixpcDeIynGuxRkjLA08IiJS4VXl7zUXPRf080s4O7ExFaTfyFL2GLgg3e5v +jZ48qZBV4xk4ZehC/j/khWe4UuF2Q9uin6kLtmQoZn1jTwX31idfQk+4YOFI +pdUW5lTgHTfpv+fmgrRUlh8RazRw56JVNV5yQcccDg+eERrw2OI1mQqSe8z2 +rZfTQGRz/XvhVyR3/2T9uIwGh5uMtrJUuiBaVE+qP6eBucrJnK43JPdRV44v +ocFd4cDG0H/JPFmUv2XzabCt/2+ehi5ih3NBxek0ELMXSLZdIf2zGwbPx9NA +0XE2O1LWFSOOZwQKedEg6/58gLE88XMLrs2eNNjctqgqQHFFx6CbV7k8aDCr +tdKereyKItOf+RjdaZBxgI6+SZ3kqcJFq0404F7htd5kRuy18zWXDQ1Gb8ht +oJ52xapzH4b69WlgVq/QfsqX2H1OelGPBpV0StTDf5F+eWx2rMT3A1Tlqs+S +/dWjNGR1aGBsreM0FkLyt+JGyRo0eCFm/eJADMmvg9R1FRrcfHnRszyLODtO +kEuKBqeP3FMMyib9H/MnoCQNDHOKNlCeElva9Zw9RAP2e+M5ZXmk/mPSh4ED +NIj0N516XuqKWLNu/89eGlzcJ+b9rJrkKYxdGbtp4HWv0af4E8n7z9mzCdBA +j3tcxX+Q9Pt+wuQ4Pw32RtJxHRkmjprakL6FBuP+cnlFY2R9RXYvbqaBkzF1 +pnCa5Lq6s5G8NLBiDjhTsE7ynaHP5ThpoBOwzS+X3w1xszzXAQYaVFOj9O9s +dcOIHNO5K/Q0UGlaFAva5oZ0w6UV/XTk/sUbuzV2EBvkC+79TQXBzhCNXnFS +7zknJ7BOhS9K/fzsciT/1RZpOE+FeAba61MWJB8I6+H9RAV2Kc5ko+MkV+a7 +8LOPCldPBvnLnCB+8mp4qpcKQaWme37bkHq98/yN3VRwcqe/neRMPPlyjdZB +BZl3zq51fxGXS19O+48KnbfFOURvEecxanyvpEI+cHlM3ia+IxghSXx1Zrk2 +L4EYcnRcXlPhiF5tGOUeccvf5z68pMJNOpdFo8fEwpF6VeVU0PaldQflknn2 +pJdMFFNh+/ZoedV8YofCaBni5Xe+CYyFxNaHxiOKqJAmAUY3S/6cx09FkUIq +/Ozvr0qvIBYvUfsrjwqlhkLZzQ3ETBrlttlUiF1nYL77jngxleXNEyo4Z085 +WTcR8z/tlSDeyFQhNPqe+KqR4EomFXxeWsWvffyz/+bBnHQqiO5PChQbIx4R +iLKiUmG9M7Tt8zixo6VMx2MqtES6HS6YJA6ocLMgDhuSnVKcJr700PrYIyr0 +JLfZmSwRb/cM8XhIhTusvFrB9O5IR9VP7L5HhVeL/SfPMhIX+Eo7E0/0P/U/ +w0w8NFs4nUQFlVJNmvMG4sFka1bicceg7/q8xLU/jS3ukvkNtTZp8REXWzB+ +SaCCssKmfbCFOFj3wVXiW1y5ljKCxLHlvq/vkLxioEho15/9zjzXuk0F98zc +hi2ixPfPhk7fIvW3LgzwiBOnnpdIJB535+Ni2kdcemDHdDzJ+XQ8pg8Tb3FK +K7xJhYpffOHjR4iPOp93Jx77PJg4KEus0HVoB7FSVXBNO4VYZFw14QYVRn3y +d7xG4u6VuYQ4KnBbhciVqRNv5XhvRayooWtYpElsLha/k/im4PCFTF3iSUpx +cSwVypkKblH1iQ23bwknHpkLeXLfkPhtt5URMeXtlo4bpsQXii7PxZD7Lhr+ +cs2c+HO5Rw3xjZQChsvH/pyvn9R94mF/vcOBVsTy7+31ibns+XX8bIiXXevF +iSl6I3ZetsR0MRsZ/6zfGRpr70gs4aZZc53Mw66fZuVM3MQllUU8/JX/hbkr +cd/+9RhirqGR94buxMnPM/8ipjQVjmt7EOf+LW1D7FwW+hO9iPcwP9YkvpGm +v1nZ58/8lVOH//S/IXBA7gxxeJvAzj/9g0bVpPyIA1Gch5jTtchqnz8xIwMf +PbGCSZiv6Fnig1uGlqNJfyWDqO2BxM7n46eI48S3PhII+rNeYscw8fONYyW8 +wcRpIjd6iYe+F73juEh82bXvIzHnRNgQcxix8AJHO7F8q8Hq73DijjqhNuL/ +AaEXkzE= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "PlotRange" -> {{0, 180}, {0., 2.949598791555589}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5111,7 +11121,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.42228371308737755`}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5139,7 +11150,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.4222837130873766, 2.103798844286089}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 2.949598791555589}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5147,9 +11159,9 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913411752988663`*^9}, + CellChangeTimes->{3.9913411752988663`*^9, 3.993830907578745*^9}, CellLabel-> - "Out[360]=",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] + "Out[118]=",ExpressionUUID->"b90946f8-b0ea-43e7-ba8b-985190217903"] }, Open ]], Cell[CellGroupData[{ @@ -5212,157 +11224,182 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918498397477245`*^9, - 3.9918498435341415`*^9}},ExpressionUUID->"92d458c4-bfde-c447-a06c-\ -70a15768b745"], + CellChangeTimes->{{3.9918498397477245`*^9, 3.9918498435341415`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.939746899581406`*^-267\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 361, - 369, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755393047`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.555286300273466`*^-238\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 41, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.9938309076757097`*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], +In[119]:=",ExpressionUUID->"5dbbafae-ceec-45a2-9307-bd8762e97d3d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7974258435449576`*^-278\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 361, 370, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755492897`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.744192009437409`*^-245\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 42, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.993830907680047*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], +In[119]:=",ExpressionUUID->"ae2c818c-a6f7-49fa-9326-d8d04ed97aa3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.87479384448772`*^-289\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 361, 371, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991341175557289*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.678407382654907`*^-253\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 43, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.993830907683782*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], +In[119]:=",ExpressionUUID->"188447ee-fe50-41e3-aa05-49368f77eba9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 361, 372, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755664787`*^9}, +during this calculation.\"", 2, 119, 44, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.993830907687173*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], +In[119]:=",ExpressionUUID->"c32df57e-c87a-45dd-87fe-26cd2c7cac5a"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VO0bB3CRl0pkH9sstkoku2Gm+0Z2CZWQbCVSKGuhIgpRkRIqSdQr +68yJCm+ESvuCbCVZWoTsJOV3fn+d63OdeeZ6znnu+3sfhk+wky8vDw+PyRIe +nv9fZ3qeNimnFGycK3TWn2ow39iaSzli0nECREJXm1rOKAFKvvahdJyHqrYd +C5QZHYhwuN3O15EPKtf7mHPTZiA6Kn3+VzsXpOTeuj2c3gqfau2Dp9ob4ED9 +p9kV07vBQnno43j7O3hky3fHeiIUfrUbXBxr74NvZf9Obv4aD41mtwre5k9C +56LRlsHTF0D+0/0vPup/gBkV0hSzKhckDnjeFjDjw/k3XLPKkBtwXsuixn67 +ICbx8ny26L0FnVkb6sdXrUSTl7fZe3OKIaXg+GteGVHUExFkPFUqBxvdfWKS +SqJ40bo9JG1DOQg2OW1frSGKqyWejNuzyyGhX6Xb1oS8f9IhkONcDjGKL75c +2CeKs+LD0kLJ5RCUR/mrWi2KQwdGNKWGy8HxCkfddqcYtsV7TVdtrwDpC/3J +GVfFsbz+XK6HAAco6yoT5m6KY/SlWn9zIQ7INpw6vqtCHPeLNqquEeUAdWxt ++OpGccx/KB/zWZYDKnYHvWq+iaPj7ZwYpfUc0Fn6R79fRwIHeTgeA1s5sCVM +akD7mQTGyY9YO1/hgMOKbz2XWiSQV001szqPA0759zsXPkggi8Z6IlvIAec3 +7q8f/5TAxNmk969KObBL/Ua1m6Qkzs08usZfx4H9A5rpJ7wk0Sdz/HxpLwcS +t1lvfDcjiQ6BIYsDdC7I3nkly7tECmOG7dsoKlwoE982q7VCCuUcZl9YruXC ++3ceFek0KfS0e02/pMUFZccwRUcrKZS9ILT9twkXGjZf++dNthS+SsZnnd5c ++GMx/eolSxoZYmrrRq9yIe1mVPEfC2k882N49uR1cv0/PEkajtJorVbQTynk +gt2j5SZnfKXRbYBB2VDChRwzOmF3VhopyhqzStVcMETbS88/SaPl5q/5jDYu +hDKvez49QcHb39SbwwUIsMkTnrJNpaCQ2BJpWE6AokBM0quLFEw0FVBbupKA +N63OnJZ/Kfjo2c2rcWIErD8oxNfzioL+WqEN1goEfLsZeXNCVgaTvdFERJuA +upWDRuHKMhjMXjJ1QZeAzDCn17MaMlgpnRUsZUCAuanG3ALKoLl/YYMQi4D8 +j33WAn4y2OrE6HtsToC7hP2IHCGDX8Uz3A65EKATXROXWyuDo3frHhNuBCzv +WyPFeCyD1x8PLJlwJ+B+OR+odsqgnX7rF29vAqRs76dtWJRBe88HkSIB5P7j +lHXNbWWx2m4DNT+KgE0/56OC+mWx+ehWoaIsAo5YXVB7OCyLC4+b0nflEFB2 +XaNLfEYWFZ7+pAlfIYCyzYt5X1AOtY7Xu+y+RsDwvUezfOvlcFU5166nkICM +E2lh2YflcAVb65EUl4Dm7rXKw3FyeLxkUiGVIGBBt7FlY4oc0i4ZJv+5Q8De +r9PaA1fl8MiHr9mtdwkwsts5vr5RDhOtQqu2/kdAn6RqUNNKeaSe/xOW+YQA +6eA6BWlpeXSYn7F42UyAXbPLy310eSzjP6LP84yAqqgUdREdeQz8y3vI7QUB +pz+NDbm6yOP8hkH/3jfkeRiezinxlsepxbfGc28JmEpXslkMkMfv3hu1hVoI +8NjkXFRwVB4Hu2+lrmkjQLuoxu9nvjwabzu6UqeTAD/e7dKmJfL4lkEVU+8i +4MrO0ccXKuXRZiwWGd0E/CPMUDVqlseqwUYFno8EdIWcGkgYkceLNL7xc70E +xLEcvWUNFTC90vLO3BcCrDxyJwxMFXBy4dappq8ECMf+iN9up4DaDacHUr6R +/9948maalwLaCztarhwi4J5N9Y9/khVwmkhs7hom4PgBgaPKGQroLZMlFT9C +gMXZbcKmVxUw39v8l+ooAa1vRzcc5SigHpce5/2TgDEXpYjJTgVcptpWc32c +gLtRBwVEBxRQoqP2teoEAceu/Je1flQBb6XVxt0iLdS7o2YfLxXffPnYdHmS +gJYlhXaJQlSclz3oIjJFQI7SxMcCKSpei/199hjp1X6pPL1qVNyk8vP7lmkC +RpM60//oUvFwUcsqLuk7t1WV5ICKll+LPonMEGA6Wm/uvJWKEkt0ox6QXrZK +uD10FxW1SoOtRGbJetXa6Z/uR8WpipLGnaQ9wqdPv4imopKkzeOvpFUumcoP +naRiVQnbYfXc/+vxXKlAGhW7BFxTfUgTXR82quRQEa2/R2eTjlpY+8a0gIpN +8yz6C9Im1EhvrzIqegoVRM2TFsSmiaP3qNj/LjhV+RcBr7xFEy43UJFfYNLZ +hvTFeA/J+y+oON0Y172ftHth8c3376kYfuqQXDJpxSdzBlO9VCxaJ0PJJ/39 +m/lT0R9UfP3zzbsq0hXLM9w0p6m4IXDC7gnpSPXeH3aLVOS93JHYQnqjvcbR +gGU0FH3xKaGbNP/BKOEkcRp+KvU1/0T6RfqTa4UKNGRZPn3WQzqDkNBqXE1D +jdkAqS7Sbm3eDb1aNPwQWrL2LWnGbNnWv8Y0NHs6xt9E+htlYUDOgoZrXK6U +cEmXG1lHMB1o2N4qQbtKOsI9U2CHGw15LB56xJNmHevPCttDw/N8ywN9SfPl +bVA7H0RDn0oXWzPSzx4erSk/TEM7J8pvedJp/c/sXp6gYQO18ugE+T538FN6 +hlJpWFN8pbWRNHW1b7DgJRoebWMvSSc9aMXlUb1OQ/8GQX430iUBi+lmxTQc ++Bz0mUraqCz7zrE6Gm7t7lh7hTzvTe2v/ow201BsqDHelbQ9z1JLz3c0rL7Q +skmc9G6noE4YpGFjkOqSGLKegqJvKFaM0vBR+6u/aqQPF3Tsp8/R0M1+r/97 +sh4tohnHY/npuHqjQYIi6ecitTcMl9NxJuajYSNZzw4Fzs1jwnRcvtXOw4v0 +zpcpot4UOkK6H08a2Q8HaTM3TNbR8Xg+b1MT2U/TRFrzL006jnpsZ1iTjrJa +N8LRpeMTHYdfT8cIOHnIS19xIx37dYD6kOzHnMZnzbyO5Ho6y/Mk2b80F9+R +6u10PN/JWzlC9nfB8KJoqBsd8ffpc06kyyX1dvbvpiN9aKFd9AcBTX7XRhoj +6HjDbG/XXjIvrBeYYjHRdDz5ZUMUQebJq7RWfd1YOr5wFi5aIPOm8/6y2IJk +OnpfMrqfMEj254owsZNX6Lg7Rap5fx+Z7xVWBhYNdIyUONWcSebZ1U39O/8+ +piMnY2C2hMw7xc6jsVXP6Zgykv28jsxDDV7iqWobHa9fiPDtbif7eZuCu8A3 +OkYcYyQPkXl6YG48tnklAxMUKU37npPneWiv1BcxBvqcscrTJvNacKirmI/C +wNSykIJZMs8Luxvfb1Rk4P7wD+siHhPQ8+CieqU+A6PRdZ/5QwK2nGR2XPdk +4LLod7rrq8h6+lsaWLeHgcdK9u2rJufJcIQi38d9DNz7SrjflJw3Sf4r1lPC +GKiY8b3EqoKAetuP8WeTGJh5t//V6ttkvovFaUZzGNjw59eo3lUCeFKmm7Kq +GCiu574t8TL5/vgC3KpqGDgg8ka+LZuA/dNOJ8cfMVDYLrXHN5M8nw7lbr8u +BrL0+93cz5Hz9lrzqW18irgtg/ElN5aAX+tW9WhsV8RgBdr3RC8CZq7Kxum4 +KWLQlN+eUA9y/oioKDM9FXHm3JG8neT8Hp1kBmzap4jlfck+iuS876vZPeN2 +VBGXnDtplryF7Dfbu8JJhYpYtE9B+QGbrJ/9HtA3rYipeR/b30qT/VpckpeZ +qYQSrkrHhRu50E0vvmZ+WQld08R9Auq5EJVZlDt1TQkbekZ7Gv/jwt24m1ec +ipRwU8ZoSfA9Lmi75GUJ1yph6NP3T26XcmEt/4W0U5+V8Iertn/FJfI73TM6 +NkJdGWO3nWtbGsCFcTEbL+cGZbxM/S6oKciFgVQv5xABVXQP2VnHkeGA9c9I +60H91ShKeWDUSK+A4d2CoXeOr0FG4Zmg4oVS8vtemjexYS2K7J0q/XCrGMRe +qp6t+KmGE5r80csPFoF8UrmDvr46CsYI3SkVvAVZ65irxP00sOac1q7NrQXw +TNZEbzJ9PaqaTgZ71+aDkXxDmuZ7TbxQLExPSc8DYb78MO8TG3DytGV47dar +QI2jsVxVtdC1qz8vLyYblqm4Vzk90cLjX1tMKgUyYT1bpjxylza+7Vw8souS +ASE9Yo02PDrYV/gxM88oDX5Opm63ztJBywc6AUUVKWCp+TjHWkMX0xL+/VJ2 +OhEeTBr/nn2li4f3X2d0ZsVDkLp211tfPXQL95oCv1hgj+5pdV2mj57aHtIP +u6LAXJmyeWW+Pv73wVcomxYBa2JPH24wMMBbVndlazVCoNa4kN/OyAD76t80 +LKWGgMNs3fk2lgFms859dBEOgcNB0yXfTAzQsm2Pk9LPQ9Ds7vVZ2M4AE10u +nkHOIfBn6tvs9DLA9MOTo5kGh6Bo4rPcVJIBtlflNiXZHQQ1X2adSpcBChkl +H/NSD4Rzivbz8R8M8K/ni1RBiUCY+uSj19djgC/y4sYf/j4AD9xSi3P7DbBl +LjbL//kBcHL4dEl6xABlnohsT9h/AI4Ynzy4jMcQb7Rtdxop2w/Nom8ZIyqG +uCIyWHOTaQD4PvBPuHPIEDee+S9qabYfjAYORZqHGWLndEGwQLwfHFY4sP99 +hCFm6/4VlQ/0g9MxwU5z0YaorLJDO8rEDyqMIuisU4YYIl9ZJPhjLyxUxdc2 +5hjiwcFb9XtM9sL58typd43k+h/sly/m90BdXuuecUkmbn/kWMaX6wO9dgzP +CAoTm0PPTgan+gDPr0DX37JMfH17T8VQlA+YOgrY89OZOGMZFbDCxQceLzEy +kFFjoqXrodY5MR944XNtmclGJjZZfNaITvGGLuWAsrS9TNw9P2z84ZQXTP27 +OKt5l4lrzbheVJtd8MXZIi/5PhMHG+f/S9bcBR1Lz1j11zCxgK9u63LJXVDj +JZudWc/E9Td/jdn0usMJip7Rn6dMvKpuG9gc6Q6rkgJinn1gotmYi9u/t3eC +ul8bjy+vEe43rSKu0Nxgt0rxspzNRijt27j6kNkOiHrkEaDqYITF4esSRtbt +gDRfsedcJyM09joycUxiB9QWHkl9vsMIo5RzHvUOOoOEqpXIH28jPOiYfiY3 +2Rkeqw5KeEUY4eUwlT9TrdtBbQ2NrnrNCKeFO7qvR22DcbUMfe6YEXJiDwvX +/HWEjhdoLj5phD1lzi6mI45QHzS6NWzaCD0yNjd3dDvCWa71If15I2TqdY9o +33cENSOekmo+YwQhFcrlMEfwsQ5kNEoZ45bFOVOtUQdo9bMUamUZ4/2fcr8c +O7bAvYLfn6eTjFFSunR+kmEH+mZhszYpxjhj7EGL+scOKj8PC+WdMcbww3Ke +lB+2wKX2GNicN8bl9LtfrtyxhZKs+jO5l41RYNW/Mk1WtpCXepJpWWaMSRcd +bKLDbSA5TCQ9q8UYT9WZt67qtQJB8aSbI23G2H9o2cPIJ1ZwisNTa9phjFr5 +YRemyqwgYXT8y/AHY/yl71GsecwKjvm3sky+GOPzO+H1RQpWEOKe/e37nDEG +ff7zKdfLEtw2KaExlYXiNybuy8yYw59WQeFGOgsnjn+lY4855PmOdtsosfCq +Y/HA0cfm8OXU/Ui3NSx0V1urDZfMIeTplvIj2iyMVMm5855pDqftY6j3LFgY +ZPfwr2X8Jqh2aVvQDWbhntjH8cWqZrDre/Wz2kMsnOqPPHZJ1Ax4ovKyNoWx +MKm0NCBrwRQsLu/X3XaEheSTvOx4ZwrvPi45EBrPwmqZ7HuOsaYw5LO+m3OJ +hVvkeNQkPpmAXGDi/fX1LHSo2yDrUYxwdnGvXkoDuZ/h3cv4chB4z1twvjax +8LtYqPm9JIShKv6ivKcsfP6Rc2DrXoRqnoQssRYWmuUemLZRRHC7EBs5M8jC +uu/XJ32NALJqjug9WMHGKMK3UpTNBiF7V46sMBuHVr7cZkRlQ2yvoUbkKjZK +rOcziF1kgT//nPIGSTZyqpx37W5ggcGWCIl8KhtvqyT4JViz4H1fyORJLTYe +DtzgLLfLGCSXH+Bs3sHGEo/TS39mMaHA7GjUmCsbyy43b/SJYoL20bNmGe5s +3HhlicTMTibYj1W0dXiz8fRA94rjNCacej/9a/cBNn4cr7wq9q8hzOUfN42K +Y+OtHMcFpToD6DLOaLlZzMb0luurxJbqg394wRXrMjaq7Lh1x+27HsyUVfoO +V7DRT+r40vpXeiCm2DGrVcXGkZgezd5sPbAVVJD/r56NKRkLoaFaelDbenNP +SxsbXT3DJ5776oKN8D2NiA7yecVVot7a6UKH5dMZSjcbv4cv6RzX0YWp6h9J +Hr1svDjAun2CVxc0rm8o/T7ERr5npXGf83SgtsskInWEjaJuokXVSTpgI7EV +NMfY2Gcx9qj0oA7sTQx/GzZN7p9/4eBn1IGp+lM50nNspK1984SxVgdOzF/a +XT3PxsEtQYXRojqwSrdIfdcf8vfndo+O/tKG3MDq6cVFcj+zWxOj+7Thf4x1 +L4c= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5376,116 +11413,137 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV1nk4VO0bB3CRl0pkH9sstkoku2Gm+0Z2CZWQbCVSKGuhIgpRkRIqSdQr +68yJCm+ESvuCbCVZWoTsJOV3fn+d63OdeeZ6znnu+3sfhk+wky8vDw+PyRIe +nv9fZ3qeNimnFGycK3TWn2ow39iaSzli0nECREJXm1rOKAFKvvahdJyHqrYd +C5QZHYhwuN3O15EPKtf7mHPTZiA6Kn3+VzsXpOTeuj2c3gqfau2Dp9ob4ED9 +p9kV07vBQnno43j7O3hky3fHeiIUfrUbXBxr74NvZf9Obv4aD41mtwre5k9C +56LRlsHTF0D+0/0vPup/gBkV0hSzKhckDnjeFjDjw/k3XLPKkBtwXsuixn67 +ICbx8ny26L0FnVkb6sdXrUSTl7fZe3OKIaXg+GteGVHUExFkPFUqBxvdfWKS +SqJ40bo9JG1DOQg2OW1frSGKqyWejNuzyyGhX6Xb1oS8f9IhkONcDjGKL75c +2CeKs+LD0kLJ5RCUR/mrWi2KQwdGNKWGy8HxCkfddqcYtsV7TVdtrwDpC/3J +GVfFsbz+XK6HAAco6yoT5m6KY/SlWn9zIQ7INpw6vqtCHPeLNqquEeUAdWxt ++OpGccx/KB/zWZYDKnYHvWq+iaPj7ZwYpfUc0Fn6R79fRwIHeTgeA1s5sCVM +akD7mQTGyY9YO1/hgMOKbz2XWiSQV001szqPA0759zsXPkggi8Z6IlvIAec3 +7q8f/5TAxNmk969KObBL/Ua1m6Qkzs08usZfx4H9A5rpJ7wk0Sdz/HxpLwcS +t1lvfDcjiQ6BIYsDdC7I3nkly7tECmOG7dsoKlwoE982q7VCCuUcZl9YruXC ++3ceFek0KfS0e02/pMUFZccwRUcrKZS9ILT9twkXGjZf++dNthS+SsZnnd5c ++GMx/eolSxoZYmrrRq9yIe1mVPEfC2k882N49uR1cv0/PEkajtJorVbQTynk +gt2j5SZnfKXRbYBB2VDChRwzOmF3VhopyhqzStVcMETbS88/SaPl5q/5jDYu +hDKvez49QcHb39SbwwUIsMkTnrJNpaCQ2BJpWE6AokBM0quLFEw0FVBbupKA +N63OnJZ/Kfjo2c2rcWIErD8oxNfzioL+WqEN1goEfLsZeXNCVgaTvdFERJuA +upWDRuHKMhjMXjJ1QZeAzDCn17MaMlgpnRUsZUCAuanG3ALKoLl/YYMQi4D8 +j33WAn4y2OrE6HtsToC7hP2IHCGDX8Uz3A65EKATXROXWyuDo3frHhNuBCzv +WyPFeCyD1x8PLJlwJ+B+OR+odsqgnX7rF29vAqRs76dtWJRBe88HkSIB5P7j +lHXNbWWx2m4DNT+KgE0/56OC+mWx+ehWoaIsAo5YXVB7OCyLC4+b0nflEFB2 +XaNLfEYWFZ7+pAlfIYCyzYt5X1AOtY7Xu+y+RsDwvUezfOvlcFU5166nkICM +E2lh2YflcAVb65EUl4Dm7rXKw3FyeLxkUiGVIGBBt7FlY4oc0i4ZJv+5Q8De +r9PaA1fl8MiHr9mtdwkwsts5vr5RDhOtQqu2/kdAn6RqUNNKeaSe/xOW+YQA +6eA6BWlpeXSYn7F42UyAXbPLy310eSzjP6LP84yAqqgUdREdeQz8y3vI7QUB +pz+NDbm6yOP8hkH/3jfkeRiezinxlsepxbfGc28JmEpXslkMkMfv3hu1hVoI +8NjkXFRwVB4Hu2+lrmkjQLuoxu9nvjwabzu6UqeTAD/e7dKmJfL4lkEVU+8i +4MrO0ccXKuXRZiwWGd0E/CPMUDVqlseqwUYFno8EdIWcGkgYkceLNL7xc70E +xLEcvWUNFTC90vLO3BcCrDxyJwxMFXBy4dappq8ECMf+iN9up4DaDacHUr6R +/9948maalwLaCztarhwi4J5N9Y9/khVwmkhs7hom4PgBgaPKGQroLZMlFT9C +gMXZbcKmVxUw39v8l+ooAa1vRzcc5SigHpce5/2TgDEXpYjJTgVcptpWc32c +gLtRBwVEBxRQoqP2teoEAceu/Je1flQBb6XVxt0iLdS7o2YfLxXffPnYdHmS +gJYlhXaJQlSclz3oIjJFQI7SxMcCKSpei/199hjp1X6pPL1qVNyk8vP7lmkC +RpM60//oUvFwUcsqLuk7t1WV5ICKll+LPonMEGA6Wm/uvJWKEkt0ox6QXrZK +uD10FxW1SoOtRGbJetXa6Z/uR8WpipLGnaQ9wqdPv4imopKkzeOvpFUumcoP +naRiVQnbYfXc/+vxXKlAGhW7BFxTfUgTXR82quRQEa2/R2eTjlpY+8a0gIpN +8yz6C9Im1EhvrzIqegoVRM2TFsSmiaP3qNj/LjhV+RcBr7xFEy43UJFfYNLZ +hvTFeA/J+y+oON0Y172ftHth8c3376kYfuqQXDJpxSdzBlO9VCxaJ0PJJ/39 +m/lT0R9UfP3zzbsq0hXLM9w0p6m4IXDC7gnpSPXeH3aLVOS93JHYQnqjvcbR +gGU0FH3xKaGbNP/BKOEkcRp+KvU1/0T6RfqTa4UKNGRZPn3WQzqDkNBqXE1D +jdkAqS7Sbm3eDb1aNPwQWrL2LWnGbNnWv8Y0NHs6xt9E+htlYUDOgoZrXK6U +cEmXG1lHMB1o2N4qQbtKOsI9U2CHGw15LB56xJNmHevPCttDw/N8ywN9SfPl +bVA7H0RDn0oXWzPSzx4erSk/TEM7J8pvedJp/c/sXp6gYQO18ugE+T538FN6 +hlJpWFN8pbWRNHW1b7DgJRoebWMvSSc9aMXlUb1OQ/8GQX430iUBi+lmxTQc ++Bz0mUraqCz7zrE6Gm7t7lh7hTzvTe2v/ow201BsqDHelbQ9z1JLz3c0rL7Q +skmc9G6noE4YpGFjkOqSGLKegqJvKFaM0vBR+6u/aqQPF3Tsp8/R0M1+r/97 +sh4tohnHY/npuHqjQYIi6ecitTcMl9NxJuajYSNZzw4Fzs1jwnRcvtXOw4v0 +zpcpot4UOkK6H08a2Q8HaTM3TNbR8Xg+b1MT2U/TRFrzL006jnpsZ1iTjrJa +N8LRpeMTHYdfT8cIOHnIS19xIx37dYD6kOzHnMZnzbyO5Ho6y/Mk2b80F9+R +6u10PN/JWzlC9nfB8KJoqBsd8ffpc06kyyX1dvbvpiN9aKFd9AcBTX7XRhoj +6HjDbG/XXjIvrBeYYjHRdDz5ZUMUQebJq7RWfd1YOr5wFi5aIPOm8/6y2IJk +OnpfMrqfMEj254owsZNX6Lg7Rap5fx+Z7xVWBhYNdIyUONWcSebZ1U39O/8+ +piMnY2C2hMw7xc6jsVXP6Zgykv28jsxDDV7iqWobHa9fiPDtbif7eZuCu8A3 +OkYcYyQPkXl6YG48tnklAxMUKU37npPneWiv1BcxBvqcscrTJvNacKirmI/C +wNSykIJZMs8Luxvfb1Rk4P7wD+siHhPQ8+CieqU+A6PRdZ/5QwK2nGR2XPdk +4LLod7rrq8h6+lsaWLeHgcdK9u2rJufJcIQi38d9DNz7SrjflJw3Sf4r1lPC +GKiY8b3EqoKAetuP8WeTGJh5t//V6ttkvovFaUZzGNjw59eo3lUCeFKmm7Kq +GCiu574t8TL5/vgC3KpqGDgg8ka+LZuA/dNOJ8cfMVDYLrXHN5M8nw7lbr8u +BrL0+93cz5Hz9lrzqW18irgtg/ElN5aAX+tW9WhsV8RgBdr3RC8CZq7Kxum4 +KWLQlN+eUA9y/oioKDM9FXHm3JG8neT8Hp1kBmzap4jlfck+iuS876vZPeN2 +VBGXnDtplryF7Dfbu8JJhYpYtE9B+QGbrJ/9HtA3rYipeR/b30qT/VpckpeZ +qYQSrkrHhRu50E0vvmZ+WQld08R9Auq5EJVZlDt1TQkbekZ7Gv/jwt24m1ec +ipRwU8ZoSfA9Lmi75GUJ1yph6NP3T26XcmEt/4W0U5+V8Iertn/FJfI73TM6 +NkJdGWO3nWtbGsCFcTEbL+cGZbxM/S6oKciFgVQv5xABVXQP2VnHkeGA9c9I +60H91ShKeWDUSK+A4d2CoXeOr0FG4Zmg4oVS8vtemjexYS2K7J0q/XCrGMRe +qp6t+KmGE5r80csPFoF8UrmDvr46CsYI3SkVvAVZ65irxP00sOac1q7NrQXw +TNZEbzJ9PaqaTgZ71+aDkXxDmuZ7TbxQLExPSc8DYb78MO8TG3DytGV47dar +QI2jsVxVtdC1qz8vLyYblqm4Vzk90cLjX1tMKgUyYT1bpjxylza+7Vw8souS +ASE9Yo02PDrYV/gxM88oDX5Opm63ztJBywc6AUUVKWCp+TjHWkMX0xL+/VJ2 +OhEeTBr/nn2li4f3X2d0ZsVDkLp211tfPXQL95oCv1hgj+5pdV2mj57aHtIP +u6LAXJmyeWW+Pv73wVcomxYBa2JPH24wMMBbVndlazVCoNa4kN/OyAD76t80 +LKWGgMNs3fk2lgFms859dBEOgcNB0yXfTAzQsm2Pk9LPQ9Ds7vVZ2M4AE10u +nkHOIfBn6tvs9DLA9MOTo5kGh6Bo4rPcVJIBtlflNiXZHQQ1X2adSpcBChkl +H/NSD4Rzivbz8R8M8K/ni1RBiUCY+uSj19djgC/y4sYf/j4AD9xSi3P7DbBl +LjbL//kBcHL4dEl6xABlnohsT9h/AI4Ynzy4jMcQb7Rtdxop2w/Nom8ZIyqG +uCIyWHOTaQD4PvBPuHPIEDee+S9qabYfjAYORZqHGWLndEGwQLwfHFY4sP99 +hCFm6/4VlQ/0g9MxwU5z0YaorLJDO8rEDyqMIuisU4YYIl9ZJPhjLyxUxdc2 +5hjiwcFb9XtM9sL58typd43k+h/sly/m90BdXuuecUkmbn/kWMaX6wO9dgzP +CAoTm0PPTgan+gDPr0DX37JMfH17T8VQlA+YOgrY89OZOGMZFbDCxQceLzEy +kFFjoqXrodY5MR944XNtmclGJjZZfNaITvGGLuWAsrS9TNw9P2z84ZQXTP27 +OKt5l4lrzbheVJtd8MXZIi/5PhMHG+f/S9bcBR1Lz1j11zCxgK9u63LJXVDj +JZudWc/E9Td/jdn0usMJip7Rn6dMvKpuG9gc6Q6rkgJinn1gotmYi9u/t3eC +ul8bjy+vEe43rSKu0Nxgt0rxspzNRijt27j6kNkOiHrkEaDqYITF4esSRtbt +gDRfsedcJyM09joycUxiB9QWHkl9vsMIo5RzHvUOOoOEqpXIH28jPOiYfiY3 +2Rkeqw5KeEUY4eUwlT9TrdtBbQ2NrnrNCKeFO7qvR22DcbUMfe6YEXJiDwvX +/HWEjhdoLj5phD1lzi6mI45QHzS6NWzaCD0yNjd3dDvCWa71If15I2TqdY9o +33cENSOekmo+YwQhFcrlMEfwsQ5kNEoZ45bFOVOtUQdo9bMUamUZ4/2fcr8c +O7bAvYLfn6eTjFFSunR+kmEH+mZhszYpxjhj7EGL+scOKj8PC+WdMcbww3Ke +lB+2wKX2GNicN8bl9LtfrtyxhZKs+jO5l41RYNW/Mk1WtpCXepJpWWaMSRcd +bKLDbSA5TCQ9q8UYT9WZt67qtQJB8aSbI23G2H9o2cPIJ1ZwisNTa9phjFr5 +YRemyqwgYXT8y/AHY/yl71GsecwKjvm3sky+GOPzO+H1RQpWEOKe/e37nDEG +ff7zKdfLEtw2KaExlYXiNybuy8yYw59WQeFGOgsnjn+lY4855PmOdtsosfCq +Y/HA0cfm8OXU/Ui3NSx0V1urDZfMIeTplvIj2iyMVMm5855pDqftY6j3LFgY +ZPfwr2X8Jqh2aVvQDWbhntjH8cWqZrDre/Wz2kMsnOqPPHZJ1Ax4ovKyNoWx +MKm0NCBrwRQsLu/X3XaEheSTvOx4ZwrvPi45EBrPwmqZ7HuOsaYw5LO+m3OJ +hVvkeNQkPpmAXGDi/fX1LHSo2yDrUYxwdnGvXkoDuZ/h3cv4chB4z1twvjax +8LtYqPm9JIShKv6ivKcsfP6Rc2DrXoRqnoQssRYWmuUemLZRRHC7EBs5M8jC +uu/XJ32NALJqjug9WMHGKMK3UpTNBiF7V46sMBuHVr7cZkRlQ2yvoUbkKjZK +rOcziF1kgT//nPIGSTZyqpx37W5ggcGWCIl8KhtvqyT4JViz4H1fyORJLTYe +DtzgLLfLGCSXH+Bs3sHGEo/TS39mMaHA7GjUmCsbyy43b/SJYoL20bNmGe5s +3HhlicTMTibYj1W0dXiz8fRA94rjNCacej/9a/cBNn4cr7wq9q8hzOUfN42K +Y+OtHMcFpToD6DLOaLlZzMb0luurxJbqg394wRXrMjaq7Lh1x+27HsyUVfoO +V7DRT+r40vpXeiCm2DGrVcXGkZgezd5sPbAVVJD/r56NKRkLoaFaelDbenNP +SxsbXT3DJ5776oKN8D2NiA7yecVVot7a6UKH5dMZSjcbv4cv6RzX0YWp6h9J +Hr1svDjAun2CVxc0rm8o/T7ERr5npXGf83SgtsskInWEjaJuokXVSTpgI7EV +NMfY2Gcx9qj0oA7sTQx/GzZN7p9/4eBn1IGp+lM50nNspK1984SxVgdOzF/a +XT3PxsEtQYXRojqwSrdIfdcf8vfndo+O/tKG3MDq6cVFcj+zWxOj+7Thf4x1 +L4c= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.0780314964701385}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5497,19 +11555,19 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.0780314964701385}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5523,115 +11581,136 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV1nk4VO0bB3CRl0pkH9sstkoku2Gm+0Z2CZWQbCVSKGuhIgpRkRIqSdQr +68yJCm+ESvuCbCVZWoTsJOV3fn+d63OdeeZ6znnu+3sfhk+wky8vDw+PyRIe +nv9fZ3qeNimnFGycK3TWn2ow39iaSzli0nECREJXm1rOKAFKvvahdJyHqrYd +C5QZHYhwuN3O15EPKtf7mHPTZiA6Kn3+VzsXpOTeuj2c3gqfau2Dp9ob4ED9 +p9kV07vBQnno43j7O3hky3fHeiIUfrUbXBxr74NvZf9Obv4aD41mtwre5k9C +56LRlsHTF0D+0/0vPup/gBkV0hSzKhckDnjeFjDjw/k3XLPKkBtwXsuixn67 +ICbx8ny26L0FnVkb6sdXrUSTl7fZe3OKIaXg+GteGVHUExFkPFUqBxvdfWKS +SqJ40bo9JG1DOQg2OW1frSGKqyWejNuzyyGhX6Xb1oS8f9IhkONcDjGKL75c +2CeKs+LD0kLJ5RCUR/mrWi2KQwdGNKWGy8HxCkfddqcYtsV7TVdtrwDpC/3J +GVfFsbz+XK6HAAco6yoT5m6KY/SlWn9zIQ7INpw6vqtCHPeLNqquEeUAdWxt ++OpGccx/KB/zWZYDKnYHvWq+iaPj7ZwYpfUc0Fn6R79fRwIHeTgeA1s5sCVM +akD7mQTGyY9YO1/hgMOKbz2XWiSQV001szqPA0759zsXPkggi8Z6IlvIAec3 +7q8f/5TAxNmk969KObBL/Ua1m6Qkzs08usZfx4H9A5rpJ7wk0Sdz/HxpLwcS +t1lvfDcjiQ6BIYsDdC7I3nkly7tECmOG7dsoKlwoE982q7VCCuUcZl9YruXC ++3ceFek0KfS0e02/pMUFZccwRUcrKZS9ILT9twkXGjZf++dNthS+SsZnnd5c ++GMx/eolSxoZYmrrRq9yIe1mVPEfC2k882N49uR1cv0/PEkajtJorVbQTynk +gt2j5SZnfKXRbYBB2VDChRwzOmF3VhopyhqzStVcMETbS88/SaPl5q/5jDYu +hDKvez49QcHb39SbwwUIsMkTnrJNpaCQ2BJpWE6AokBM0quLFEw0FVBbupKA +N63OnJZ/Kfjo2c2rcWIErD8oxNfzioL+WqEN1goEfLsZeXNCVgaTvdFERJuA +upWDRuHKMhjMXjJ1QZeAzDCn17MaMlgpnRUsZUCAuanG3ALKoLl/YYMQi4D8 +j33WAn4y2OrE6HtsToC7hP2IHCGDX8Uz3A65EKATXROXWyuDo3frHhNuBCzv +WyPFeCyD1x8PLJlwJ+B+OR+odsqgnX7rF29vAqRs76dtWJRBe88HkSIB5P7j +lHXNbWWx2m4DNT+KgE0/56OC+mWx+ehWoaIsAo5YXVB7OCyLC4+b0nflEFB2 +XaNLfEYWFZ7+pAlfIYCyzYt5X1AOtY7Xu+y+RsDwvUezfOvlcFU5166nkICM +E2lh2YflcAVb65EUl4Dm7rXKw3FyeLxkUiGVIGBBt7FlY4oc0i4ZJv+5Q8De +r9PaA1fl8MiHr9mtdwkwsts5vr5RDhOtQqu2/kdAn6RqUNNKeaSe/xOW+YQA +6eA6BWlpeXSYn7F42UyAXbPLy310eSzjP6LP84yAqqgUdREdeQz8y3vI7QUB +pz+NDbm6yOP8hkH/3jfkeRiezinxlsepxbfGc28JmEpXslkMkMfv3hu1hVoI +8NjkXFRwVB4Hu2+lrmkjQLuoxu9nvjwabzu6UqeTAD/e7dKmJfL4lkEVU+8i +4MrO0ccXKuXRZiwWGd0E/CPMUDVqlseqwUYFno8EdIWcGkgYkceLNL7xc70E +xLEcvWUNFTC90vLO3BcCrDxyJwxMFXBy4dappq8ECMf+iN9up4DaDacHUr6R +/9948maalwLaCztarhwi4J5N9Y9/khVwmkhs7hom4PgBgaPKGQroLZMlFT9C +gMXZbcKmVxUw39v8l+ooAa1vRzcc5SigHpce5/2TgDEXpYjJTgVcptpWc32c +gLtRBwVEBxRQoqP2teoEAceu/Je1flQBb6XVxt0iLdS7o2YfLxXffPnYdHmS +gJYlhXaJQlSclz3oIjJFQI7SxMcCKSpei/199hjp1X6pPL1qVNyk8vP7lmkC +RpM60//oUvFwUcsqLuk7t1WV5ICKll+LPonMEGA6Wm/uvJWKEkt0ox6QXrZK +uD10FxW1SoOtRGbJetXa6Z/uR8WpipLGnaQ9wqdPv4imopKkzeOvpFUumcoP +naRiVQnbYfXc/+vxXKlAGhW7BFxTfUgTXR82quRQEa2/R2eTjlpY+8a0gIpN +8yz6C9Im1EhvrzIqegoVRM2TFsSmiaP3qNj/LjhV+RcBr7xFEy43UJFfYNLZ +hvTFeA/J+y+oON0Y172ftHth8c3376kYfuqQXDJpxSdzBlO9VCxaJ0PJJ/39 +m/lT0R9UfP3zzbsq0hXLM9w0p6m4IXDC7gnpSPXeH3aLVOS93JHYQnqjvcbR +gGU0FH3xKaGbNP/BKOEkcRp+KvU1/0T6RfqTa4UKNGRZPn3WQzqDkNBqXE1D +jdkAqS7Sbm3eDb1aNPwQWrL2LWnGbNnWv8Y0NHs6xt9E+htlYUDOgoZrXK6U +cEmXG1lHMB1o2N4qQbtKOsI9U2CHGw15LB56xJNmHevPCttDw/N8ywN9SfPl +bVA7H0RDn0oXWzPSzx4erSk/TEM7J8pvedJp/c/sXp6gYQO18ugE+T538FN6 +hlJpWFN8pbWRNHW1b7DgJRoebWMvSSc9aMXlUb1OQ/8GQX430iUBi+lmxTQc ++Bz0mUraqCz7zrE6Gm7t7lh7hTzvTe2v/ow201BsqDHelbQ9z1JLz3c0rL7Q +skmc9G6noE4YpGFjkOqSGLKegqJvKFaM0vBR+6u/aqQPF3Tsp8/R0M1+r/97 +sh4tohnHY/npuHqjQYIi6ecitTcMl9NxJuajYSNZzw4Fzs1jwnRcvtXOw4v0 +zpcpot4UOkK6H08a2Q8HaTM3TNbR8Xg+b1MT2U/TRFrzL006jnpsZ1iTjrJa +N8LRpeMTHYdfT8cIOHnIS19xIx37dYD6kOzHnMZnzbyO5Ho6y/Mk2b80F9+R +6u10PN/JWzlC9nfB8KJoqBsd8ffpc06kyyX1dvbvpiN9aKFd9AcBTX7XRhoj +6HjDbG/XXjIvrBeYYjHRdDz5ZUMUQebJq7RWfd1YOr5wFi5aIPOm8/6y2IJk +OnpfMrqfMEj254owsZNX6Lg7Rap5fx+Z7xVWBhYNdIyUONWcSebZ1U39O/8+ +piMnY2C2hMw7xc6jsVXP6Zgykv28jsxDDV7iqWobHa9fiPDtbif7eZuCu8A3 +OkYcYyQPkXl6YG48tnklAxMUKU37npPneWiv1BcxBvqcscrTJvNacKirmI/C +wNSykIJZMs8Luxvfb1Rk4P7wD+siHhPQ8+CieqU+A6PRdZ/5QwK2nGR2XPdk +4LLod7rrq8h6+lsaWLeHgcdK9u2rJufJcIQi38d9DNz7SrjflJw3Sf4r1lPC +GKiY8b3EqoKAetuP8WeTGJh5t//V6ttkvovFaUZzGNjw59eo3lUCeFKmm7Kq +GCiu574t8TL5/vgC3KpqGDgg8ka+LZuA/dNOJ8cfMVDYLrXHN5M8nw7lbr8u +BrL0+93cz5Hz9lrzqW18irgtg/ElN5aAX+tW9WhsV8RgBdr3RC8CZq7Kxum4 +KWLQlN+eUA9y/oioKDM9FXHm3JG8neT8Hp1kBmzap4jlfck+iuS876vZPeN2 +VBGXnDtplryF7Dfbu8JJhYpYtE9B+QGbrJ/9HtA3rYipeR/b30qT/VpckpeZ +qYQSrkrHhRu50E0vvmZ+WQld08R9Auq5EJVZlDt1TQkbekZ7Gv/jwt24m1ec +ipRwU8ZoSfA9Lmi75GUJ1yph6NP3T26XcmEt/4W0U5+V8Iertn/FJfI73TM6 +NkJdGWO3nWtbGsCFcTEbL+cGZbxM/S6oKciFgVQv5xABVXQP2VnHkeGA9c9I +60H91ShKeWDUSK+A4d2CoXeOr0FG4Zmg4oVS8vtemjexYS2K7J0q/XCrGMRe +qp6t+KmGE5r80csPFoF8UrmDvr46CsYI3SkVvAVZ65irxP00sOac1q7NrQXw +TNZEbzJ9PaqaTgZ71+aDkXxDmuZ7TbxQLExPSc8DYb78MO8TG3DytGV47dar +QI2jsVxVtdC1qz8vLyYblqm4Vzk90cLjX1tMKgUyYT1bpjxylza+7Vw8souS +ASE9Yo02PDrYV/gxM88oDX5Opm63ztJBywc6AUUVKWCp+TjHWkMX0xL+/VJ2 +OhEeTBr/nn2li4f3X2d0ZsVDkLp211tfPXQL95oCv1hgj+5pdV2mj57aHtIP +u6LAXJmyeWW+Pv73wVcomxYBa2JPH24wMMBbVndlazVCoNa4kN/OyAD76t80 +LKWGgMNs3fk2lgFms859dBEOgcNB0yXfTAzQsm2Pk9LPQ9Ds7vVZ2M4AE10u +nkHOIfBn6tvs9DLA9MOTo5kGh6Bo4rPcVJIBtlflNiXZHQQ1X2adSpcBChkl +H/NSD4Rzivbz8R8M8K/ni1RBiUCY+uSj19djgC/y4sYf/j4AD9xSi3P7DbBl +LjbL//kBcHL4dEl6xABlnohsT9h/AI4Ynzy4jMcQb7Rtdxop2w/Nom8ZIyqG +uCIyWHOTaQD4PvBPuHPIEDee+S9qabYfjAYORZqHGWLndEGwQLwfHFY4sP99 +hCFm6/4VlQ/0g9MxwU5z0YaorLJDO8rEDyqMIuisU4YYIl9ZJPhjLyxUxdc2 +5hjiwcFb9XtM9sL58typd43k+h/sly/m90BdXuuecUkmbn/kWMaX6wO9dgzP +CAoTm0PPTgan+gDPr0DX37JMfH17T8VQlA+YOgrY89OZOGMZFbDCxQceLzEy +kFFjoqXrodY5MR944XNtmclGJjZZfNaITvGGLuWAsrS9TNw9P2z84ZQXTP27 +OKt5l4lrzbheVJtd8MXZIi/5PhMHG+f/S9bcBR1Lz1j11zCxgK9u63LJXVDj +JZudWc/E9Td/jdn0usMJip7Rn6dMvKpuG9gc6Q6rkgJinn1gotmYi9u/t3eC +ul8bjy+vEe43rSKu0Nxgt0rxspzNRijt27j6kNkOiHrkEaDqYITF4esSRtbt +gDRfsedcJyM09joycUxiB9QWHkl9vsMIo5RzHvUOOoOEqpXIH28jPOiYfiY3 +2Rkeqw5KeEUY4eUwlT9TrdtBbQ2NrnrNCKeFO7qvR22DcbUMfe6YEXJiDwvX +/HWEjhdoLj5phD1lzi6mI45QHzS6NWzaCD0yNjd3dDvCWa71If15I2TqdY9o +33cENSOekmo+YwQhFcrlMEfwsQ5kNEoZ45bFOVOtUQdo9bMUamUZ4/2fcr8c +O7bAvYLfn6eTjFFSunR+kmEH+mZhszYpxjhj7EGL+scOKj8PC+WdMcbww3Ke +lB+2wKX2GNicN8bl9LtfrtyxhZKs+jO5l41RYNW/Mk1WtpCXepJpWWaMSRcd +bKLDbSA5TCQ9q8UYT9WZt67qtQJB8aSbI23G2H9o2cPIJ1ZwisNTa9phjFr5 +YRemyqwgYXT8y/AHY/yl71GsecwKjvm3sky+GOPzO+H1RQpWEOKe/e37nDEG +ff7zKdfLEtw2KaExlYXiNybuy8yYw59WQeFGOgsnjn+lY4855PmOdtsosfCq +Y/HA0cfm8OXU/Ui3NSx0V1urDZfMIeTplvIj2iyMVMm5855pDqftY6j3LFgY +ZPfwr2X8Jqh2aVvQDWbhntjH8cWqZrDre/Wz2kMsnOqPPHZJ1Ax4ovKyNoWx +MKm0NCBrwRQsLu/X3XaEheSTvOx4ZwrvPi45EBrPwmqZ7HuOsaYw5LO+m3OJ +hVvkeNQkPpmAXGDi/fX1LHSo2yDrUYxwdnGvXkoDuZ/h3cv4chB4z1twvjax +8LtYqPm9JIShKv6ivKcsfP6Rc2DrXoRqnoQssRYWmuUemLZRRHC7EBs5M8jC +uu/XJ32NALJqjug9WMHGKMK3UpTNBiF7V46sMBuHVr7cZkRlQ2yvoUbkKjZK +rOcziF1kgT//nPIGSTZyqpx37W5ggcGWCIl8KhtvqyT4JViz4H1fyORJLTYe +DtzgLLfLGCSXH+Bs3sHGEo/TS39mMaHA7GjUmCsbyy43b/SJYoL20bNmGe5s +3HhlicTMTibYj1W0dXiz8fRA94rjNCacej/9a/cBNn4cr7wq9q8hzOUfN42K +Y+OtHMcFpToD6DLOaLlZzMb0luurxJbqg394wRXrMjaq7Lh1x+27HsyUVfoO +V7DRT+r40vpXeiCm2DGrVcXGkZgezd5sPbAVVJD/r56NKRkLoaFaelDbenNP +SxsbXT3DJ5776oKN8D2NiA7yecVVot7a6UKH5dMZSjcbv4cv6RzX0YWp6h9J +Hr1svDjAun2CVxc0rm8o/T7ERr5npXGf83SgtsskInWEjaJuokXVSTpgI7EV +NMfY2Gcx9qj0oA7sTQx/GzZN7p9/4eBn1IGp+lM50nNspK1984SxVgdOzF/a +XT3PxsEtQYXRojqwSrdIfdcf8vfndo+O/tKG3MDq6cVFcj+zWxOj+7Thf4x1 +L4c= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.0780314964701385}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5642,6 +11721,7 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5669,7 +11749,8 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1261051971575712}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0780314964701385}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5677,17 +11758,631 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913414579436264`*^9}, + CellChangeTimes->{3.9913414579436264`*^9, 3.9938314599649467`*^9}, CellLabel-> - "Out[361]=",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] + "Out[119]=",ExpressionUUID->"adbb93b9-f05d-4273-8d86-7118b9d1a534"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"e1c8585a-8b57-f841-82e1-\ -8e8787fb2589"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VO0bB3CRl0pkH9sstkoku2Gm+0Z2CZWQbCVSKGuhIgpRkRIqSdQr +68yJCm+ESvuCbCVZWoTsJOV3fn+d63OdeeZ6znnu+3sfhk+wky8vDw+PyRIe +nv9fZ3qeNimnFGycK3TWn2ow39iaSzli0nECREJXm1rOKAFKvvahdJyHqrYd +C5QZHYhwuN3O15EPKtf7mHPTZiA6Kn3+VzsXpOTeuj2c3gqfau2Dp9ob4ED9 +p9kV07vBQnno43j7O3hky3fHeiIUfrUbXBxr74NvZf9Obv4aD41mtwre5k9C +56LRlsHTF0D+0/0vPup/gBkV0hSzKhckDnjeFjDjw/k3XLPKkBtwXsuixn67 +ICbx8ny26L0FnVkb6sdXrUSTl7fZe3OKIaXg+GteGVHUExFkPFUqBxvdfWKS +SqJ40bo9JG1DOQg2OW1frSGKqyWejNuzyyGhX6Xb1oS8f9IhkONcDjGKL75c +2CeKs+LD0kLJ5RCUR/mrWi2KQwdGNKWGy8HxCkfddqcYtsV7TVdtrwDpC/3J +GVfFsbz+XK6HAAco6yoT5m6KY/SlWn9zIQ7INpw6vqtCHPeLNqquEeUAdWxt ++OpGccx/KB/zWZYDKnYHvWq+iaPj7ZwYpfUc0Fn6R79fRwIHeTgeA1s5sCVM +akD7mQTGyY9YO1/hgMOKbz2XWiSQV001szqPA0759zsXPkggi8Z6IlvIAec3 +7q8f/5TAxNmk969KObBL/Ua1m6Qkzs08usZfx4H9A5rpJ7wk0Sdz/HxpLwcS +t1lvfDcjiQ6BIYsDdC7I3nkly7tECmOG7dsoKlwoE982q7VCCuUcZl9YruXC ++3ceFek0KfS0e02/pMUFZccwRUcrKZS9ILT9twkXGjZf++dNthS+SsZnnd5c ++GMx/eolSxoZYmrrRq9yIe1mVPEfC2k882N49uR1cv0/PEkajtJorVbQTynk +gt2j5SZnfKXRbYBB2VDChRwzOmF3VhopyhqzStVcMETbS88/SaPl5q/5jDYu +hDKvez49QcHb39SbwwUIsMkTnrJNpaCQ2BJpWE6AokBM0quLFEw0FVBbupKA +N63OnJZ/Kfjo2c2rcWIErD8oxNfzioL+WqEN1goEfLsZeXNCVgaTvdFERJuA +upWDRuHKMhjMXjJ1QZeAzDCn17MaMlgpnRUsZUCAuanG3ALKoLl/YYMQi4D8 +j33WAn4y2OrE6HtsToC7hP2IHCGDX8Uz3A65EKATXROXWyuDo3frHhNuBCzv +WyPFeCyD1x8PLJlwJ+B+OR+odsqgnX7rF29vAqRs76dtWJRBe88HkSIB5P7j +lHXNbWWx2m4DNT+KgE0/56OC+mWx+ehWoaIsAo5YXVB7OCyLC4+b0nflEFB2 +XaNLfEYWFZ7+pAlfIYCyzYt5X1AOtY7Xu+y+RsDwvUezfOvlcFU5166nkICM +E2lh2YflcAVb65EUl4Dm7rXKw3FyeLxkUiGVIGBBt7FlY4oc0i4ZJv+5Q8De +r9PaA1fl8MiHr9mtdwkwsts5vr5RDhOtQqu2/kdAn6RqUNNKeaSe/xOW+YQA +6eA6BWlpeXSYn7F42UyAXbPLy310eSzjP6LP84yAqqgUdREdeQz8y3vI7QUB +pz+NDbm6yOP8hkH/3jfkeRiezinxlsepxbfGc28JmEpXslkMkMfv3hu1hVoI +8NjkXFRwVB4Hu2+lrmkjQLuoxu9nvjwabzu6UqeTAD/e7dKmJfL4lkEVU+8i +4MrO0ccXKuXRZiwWGd0E/CPMUDVqlseqwUYFno8EdIWcGkgYkceLNL7xc70E +xLEcvWUNFTC90vLO3BcCrDxyJwxMFXBy4dappq8ECMf+iN9up4DaDacHUr6R +/9948maalwLaCztarhwi4J5N9Y9/khVwmkhs7hom4PgBgaPKGQroLZMlFT9C +gMXZbcKmVxUw39v8l+ooAa1vRzcc5SigHpce5/2TgDEXpYjJTgVcptpWc32c +gLtRBwVEBxRQoqP2teoEAceu/Je1flQBb6XVxt0iLdS7o2YfLxXffPnYdHmS +gJYlhXaJQlSclz3oIjJFQI7SxMcCKSpei/199hjp1X6pPL1qVNyk8vP7lmkC +RpM60//oUvFwUcsqLuk7t1WV5ICKll+LPonMEGA6Wm/uvJWKEkt0ox6QXrZK +uD10FxW1SoOtRGbJetXa6Z/uR8WpipLGnaQ9wqdPv4imopKkzeOvpFUumcoP +naRiVQnbYfXc/+vxXKlAGhW7BFxTfUgTXR82quRQEa2/R2eTjlpY+8a0gIpN +8yz6C9Im1EhvrzIqegoVRM2TFsSmiaP3qNj/LjhV+RcBr7xFEy43UJFfYNLZ +hvTFeA/J+y+oON0Y172ftHth8c3376kYfuqQXDJpxSdzBlO9VCxaJ0PJJ/39 +m/lT0R9UfP3zzbsq0hXLM9w0p6m4IXDC7gnpSPXeH3aLVOS93JHYQnqjvcbR +gGU0FH3xKaGbNP/BKOEkcRp+KvU1/0T6RfqTa4UKNGRZPn3WQzqDkNBqXE1D +jdkAqS7Sbm3eDb1aNPwQWrL2LWnGbNnWv8Y0NHs6xt9E+htlYUDOgoZrXK6U +cEmXG1lHMB1o2N4qQbtKOsI9U2CHGw15LB56xJNmHevPCttDw/N8ywN9SfPl +bVA7H0RDn0oXWzPSzx4erSk/TEM7J8pvedJp/c/sXp6gYQO18ugE+T538FN6 +hlJpWFN8pbWRNHW1b7DgJRoebWMvSSc9aMXlUb1OQ/8GQX430iUBi+lmxTQc ++Bz0mUraqCz7zrE6Gm7t7lh7hTzvTe2v/ow201BsqDHelbQ9z1JLz3c0rL7Q +skmc9G6noE4YpGFjkOqSGLKegqJvKFaM0vBR+6u/aqQPF3Tsp8/R0M1+r/97 +sh4tohnHY/npuHqjQYIi6ecitTcMl9NxJuajYSNZzw4Fzs1jwnRcvtXOw4v0 +zpcpot4UOkK6H08a2Q8HaTM3TNbR8Xg+b1MT2U/TRFrzL006jnpsZ1iTjrJa +N8LRpeMTHYdfT8cIOHnIS19xIx37dYD6kOzHnMZnzbyO5Ho6y/Mk2b80F9+R +6u10PN/JWzlC9nfB8KJoqBsd8ffpc06kyyX1dvbvpiN9aKFd9AcBTX7XRhoj +6HjDbG/XXjIvrBeYYjHRdDz5ZUMUQebJq7RWfd1YOr5wFi5aIPOm8/6y2IJk +OnpfMrqfMEj254owsZNX6Lg7Rap5fx+Z7xVWBhYNdIyUONWcSebZ1U39O/8+ +piMnY2C2hMw7xc6jsVXP6Zgykv28jsxDDV7iqWobHa9fiPDtbif7eZuCu8A3 +OkYcYyQPkXl6YG48tnklAxMUKU37npPneWiv1BcxBvqcscrTJvNacKirmI/C +wNSykIJZMs8Luxvfb1Rk4P7wD+siHhPQ8+CieqU+A6PRdZ/5QwK2nGR2XPdk +4LLod7rrq8h6+lsaWLeHgcdK9u2rJufJcIQi38d9DNz7SrjflJw3Sf4r1lPC +GKiY8b3EqoKAetuP8WeTGJh5t//V6ttkvovFaUZzGNjw59eo3lUCeFKmm7Kq +GCiu574t8TL5/vgC3KpqGDgg8ka+LZuA/dNOJ8cfMVDYLrXHN5M8nw7lbr8u +BrL0+93cz5Hz9lrzqW18irgtg/ElN5aAX+tW9WhsV8RgBdr3RC8CZq7Kxum4 +KWLQlN+eUA9y/oioKDM9FXHm3JG8neT8Hp1kBmzap4jlfck+iuS876vZPeN2 +VBGXnDtplryF7Dfbu8JJhYpYtE9B+QGbrJ/9HtA3rYipeR/b30qT/VpckpeZ +qYQSrkrHhRu50E0vvmZ+WQld08R9Auq5EJVZlDt1TQkbekZ7Gv/jwt24m1ec +ipRwU8ZoSfA9Lmi75GUJ1yph6NP3T26XcmEt/4W0U5+V8Iertn/FJfI73TM6 +NkJdGWO3nWtbGsCFcTEbL+cGZbxM/S6oKciFgVQv5xABVXQP2VnHkeGA9c9I +60H91ShKeWDUSK+A4d2CoXeOr0FG4Zmg4oVS8vtemjexYS2K7J0q/XCrGMRe +qp6t+KmGE5r80csPFoF8UrmDvr46CsYI3SkVvAVZ65irxP00sOac1q7NrQXw +TNZEbzJ9PaqaTgZ71+aDkXxDmuZ7TbxQLExPSc8DYb78MO8TG3DytGV47dar +QI2jsVxVtdC1qz8vLyYblqm4Vzk90cLjX1tMKgUyYT1bpjxylza+7Vw8souS +ASE9Yo02PDrYV/gxM88oDX5Opm63ztJBywc6AUUVKWCp+TjHWkMX0xL+/VJ2 +OhEeTBr/nn2li4f3X2d0ZsVDkLp211tfPXQL95oCv1hgj+5pdV2mj57aHtIP +u6LAXJmyeWW+Pv73wVcomxYBa2JPH24wMMBbVndlazVCoNa4kN/OyAD76t80 +LKWGgMNs3fk2lgFms859dBEOgcNB0yXfTAzQsm2Pk9LPQ9Ds7vVZ2M4AE10u +nkHOIfBn6tvs9DLA9MOTo5kGh6Bo4rPcVJIBtlflNiXZHQQ1X2adSpcBChkl +H/NSD4Rzivbz8R8M8K/ni1RBiUCY+uSj19djgC/y4sYf/j4AD9xSi3P7DbBl +LjbL//kBcHL4dEl6xABlnohsT9h/AI4Ynzy4jMcQb7Rtdxop2w/Nom8ZIyqG +uCIyWHOTaQD4PvBPuHPIEDee+S9qabYfjAYORZqHGWLndEGwQLwfHFY4sP99 +hCFm6/4VlQ/0g9MxwU5z0YaorLJDO8rEDyqMIuisU4YYIl9ZJPhjLyxUxdc2 +5hjiwcFb9XtM9sL58typd43k+h/sly/m90BdXuuecUkmbn/kWMaX6wO9dgzP +CAoTm0PPTgan+gDPr0DX37JMfH17T8VQlA+YOgrY89OZOGMZFbDCxQceLzEy +kFFjoqXrodY5MR944XNtmclGJjZZfNaITvGGLuWAsrS9TNw9P2z84ZQXTP27 +OKt5l4lrzbheVJtd8MXZIi/5PhMHG+f/S9bcBR1Lz1j11zCxgK9u63LJXVDj +JZudWc/E9Td/jdn0usMJip7Rn6dMvKpuG9gc6Q6rkgJinn1gotmYi9u/t3eC +ul8bjy+vEe43rSKu0Nxgt0rxspzNRijt27j6kNkOiHrkEaDqYITF4esSRtbt +gDRfsedcJyM09joycUxiB9QWHkl9vsMIo5RzHvUOOoOEqpXIH28jPOiYfiY3 +2Rkeqw5KeEUY4eUwlT9TrdtBbQ2NrnrNCKeFO7qvR22DcbUMfe6YEXJiDwvX +/HWEjhdoLj5phD1lzi6mI45QHzS6NWzaCD0yNjd3dDvCWa71If15I2TqdY9o +33cENSOekmo+YwQhFcrlMEfwsQ5kNEoZ45bFOVOtUQdo9bMUamUZ4/2fcr8c +O7bAvYLfn6eTjFFSunR+kmEH+mZhszYpxjhj7EGL+scOKj8PC+WdMcbww3Ke +lB+2wKX2GNicN8bl9LtfrtyxhZKs+jO5l41RYNW/Mk1WtpCXepJpWWaMSRcd +bKLDbSA5TCQ9q8UYT9WZt67qtQJB8aSbI23G2H9o2cPIJ1ZwisNTa9phjFr5 +YRemyqwgYXT8y/AHY/yl71GsecwKjvm3sky+GOPzO+H1RQpWEOKe/e37nDEG +ff7zKdfLEtw2KaExlYXiNybuy8yYw59WQeFGOgsnjn+lY4855PmOdtsosfCq +Y/HA0cfm8OXU/Ui3NSx0V1urDZfMIeTplvIj2iyMVMm5855pDqftY6j3LFgY +ZPfwr2X8Jqh2aVvQDWbhntjH8cWqZrDre/Wz2kMsnOqPPHZJ1Ax4ovKyNoWx +MKm0NCBrwRQsLu/X3XaEheSTvOx4ZwrvPi45EBrPwmqZ7HuOsaYw5LO+m3OJ +hVvkeNQkPpmAXGDi/fX1LHSo2yDrUYxwdnGvXkoDuZ/h3cv4chB4z1twvjax +8LtYqPm9JIShKv6ivKcsfP6Rc2DrXoRqnoQssRYWmuUemLZRRHC7EBs5M8jC +uu/XJ32NALJqjug9WMHGKMK3UpTNBiF7V46sMBuHVr7cZkRlQ2yvoUbkKjZK +rOcziF1kgT//nPIGSTZyqpx37W5ggcGWCIl8KhtvqyT4JViz4H1fyORJLTYe +DtzgLLfLGCSXH+Bs3sHGEo/TS39mMaHA7GjUmCsbyy43b/SJYoL20bNmGe5s +3HhlicTMTibYj1W0dXiz8fRA94rjNCacej/9a/cBNn4cr7wq9q8hzOUfN42K +Y+OtHMcFpToD6DLOaLlZzMb0luurxJbqg394wRXrMjaq7Lh1x+27HsyUVfoO +V7DRT+r40vpXeiCm2DGrVcXGkZgezd5sPbAVVJD/r56NKRkLoaFaelDbenNP +SxsbXT3DJ5776oKN8D2NiA7yecVVot7a6UKH5dMZSjcbv4cv6RzX0YWp6h9J +Hr1svDjAun2CVxc0rm8o/T7ERr5npXGf83SgtsskInWEjaJuokXVSTpgI7EV +NMfY2Gcx9qj0oA7sTQx/GzZN7p9/4eBn1IGp+lM50nNspK1984SxVgdOzF/a +XT3PxsEtQYXRojqwSrdIfdcf8vfndo+O/tKG3MDq6cVFcj+zWxOj+7Thf4x1 +L4c= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VO0bB3CRl0pkH9sstkoku2Gm+0Z2CZWQbCVSKGuhIgpRkRIqSdQr +68yJCm+ESvuCbCVZWoTsJOV3fn+d63OdeeZ6znnu+3sfhk+wky8vDw+PyRIe +nv9fZ3qeNimnFGycK3TWn2ow39iaSzli0nECREJXm1rOKAFKvvahdJyHqrYd +C5QZHYhwuN3O15EPKtf7mHPTZiA6Kn3+VzsXpOTeuj2c3gqfau2Dp9ob4ED9 +p9kV07vBQnno43j7O3hky3fHeiIUfrUbXBxr74NvZf9Obv4aD41mtwre5k9C +56LRlsHTF0D+0/0vPup/gBkV0hSzKhckDnjeFjDjw/k3XLPKkBtwXsuixn67 +ICbx8ny26L0FnVkb6sdXrUSTl7fZe3OKIaXg+GteGVHUExFkPFUqBxvdfWKS +SqJ40bo9JG1DOQg2OW1frSGKqyWejNuzyyGhX6Xb1oS8f9IhkONcDjGKL75c +2CeKs+LD0kLJ5RCUR/mrWi2KQwdGNKWGy8HxCkfddqcYtsV7TVdtrwDpC/3J +GVfFsbz+XK6HAAco6yoT5m6KY/SlWn9zIQ7INpw6vqtCHPeLNqquEeUAdWxt ++OpGccx/KB/zWZYDKnYHvWq+iaPj7ZwYpfUc0Fn6R79fRwIHeTgeA1s5sCVM +akD7mQTGyY9YO1/hgMOKbz2XWiSQV001szqPA0759zsXPkggi8Z6IlvIAec3 +7q8f/5TAxNmk969KObBL/Ua1m6Qkzs08usZfx4H9A5rpJ7wk0Sdz/HxpLwcS +t1lvfDcjiQ6BIYsDdC7I3nkly7tECmOG7dsoKlwoE982q7VCCuUcZl9YruXC ++3ceFek0KfS0e02/pMUFZccwRUcrKZS9ILT9twkXGjZf++dNthS+SsZnnd5c ++GMx/eolSxoZYmrrRq9yIe1mVPEfC2k882N49uR1cv0/PEkajtJorVbQTynk +gt2j5SZnfKXRbYBB2VDChRwzOmF3VhopyhqzStVcMETbS88/SaPl5q/5jDYu +hDKvez49QcHb39SbwwUIsMkTnrJNpaCQ2BJpWE6AokBM0quLFEw0FVBbupKA +N63OnJZ/Kfjo2c2rcWIErD8oxNfzioL+WqEN1goEfLsZeXNCVgaTvdFERJuA +upWDRuHKMhjMXjJ1QZeAzDCn17MaMlgpnRUsZUCAuanG3ALKoLl/YYMQi4D8 +j33WAn4y2OrE6HtsToC7hP2IHCGDX8Uz3A65EKATXROXWyuDo3frHhNuBCzv +WyPFeCyD1x8PLJlwJ+B+OR+odsqgnX7rF29vAqRs76dtWJRBe88HkSIB5P7j +lHXNbWWx2m4DNT+KgE0/56OC+mWx+ehWoaIsAo5YXVB7OCyLC4+b0nflEFB2 +XaNLfEYWFZ7+pAlfIYCyzYt5X1AOtY7Xu+y+RsDwvUezfOvlcFU5166nkICM +E2lh2YflcAVb65EUl4Dm7rXKw3FyeLxkUiGVIGBBt7FlY4oc0i4ZJv+5Q8De +r9PaA1fl8MiHr9mtdwkwsts5vr5RDhOtQqu2/kdAn6RqUNNKeaSe/xOW+YQA +6eA6BWlpeXSYn7F42UyAXbPLy310eSzjP6LP84yAqqgUdREdeQz8y3vI7QUB +pz+NDbm6yOP8hkH/3jfkeRiezinxlsepxbfGc28JmEpXslkMkMfv3hu1hVoI +8NjkXFRwVB4Hu2+lrmkjQLuoxu9nvjwabzu6UqeTAD/e7dKmJfL4lkEVU+8i +4MrO0ccXKuXRZiwWGd0E/CPMUDVqlseqwUYFno8EdIWcGkgYkceLNL7xc70E +xLEcvWUNFTC90vLO3BcCrDxyJwxMFXBy4dappq8ECMf+iN9up4DaDacHUr6R +/9948maalwLaCztarhwi4J5N9Y9/khVwmkhs7hom4PgBgaPKGQroLZMlFT9C +gMXZbcKmVxUw39v8l+ooAa1vRzcc5SigHpce5/2TgDEXpYjJTgVcptpWc32c +gLtRBwVEBxRQoqP2teoEAceu/Je1flQBb6XVxt0iLdS7o2YfLxXffPnYdHmS +gJYlhXaJQlSclz3oIjJFQI7SxMcCKSpei/199hjp1X6pPL1qVNyk8vP7lmkC +RpM60//oUvFwUcsqLuk7t1WV5ICKll+LPonMEGA6Wm/uvJWKEkt0ox6QXrZK +uD10FxW1SoOtRGbJetXa6Z/uR8WpipLGnaQ9wqdPv4imopKkzeOvpFUumcoP +naRiVQnbYfXc/+vxXKlAGhW7BFxTfUgTXR82quRQEa2/R2eTjlpY+8a0gIpN +8yz6C9Im1EhvrzIqegoVRM2TFsSmiaP3qNj/LjhV+RcBr7xFEy43UJFfYNLZ +hvTFeA/J+y+oON0Y172ftHth8c3376kYfuqQXDJpxSdzBlO9VCxaJ0PJJ/39 +m/lT0R9UfP3zzbsq0hXLM9w0p6m4IXDC7gnpSPXeH3aLVOS93JHYQnqjvcbR +gGU0FH3xKaGbNP/BKOEkcRp+KvU1/0T6RfqTa4UKNGRZPn3WQzqDkNBqXE1D +jdkAqS7Sbm3eDb1aNPwQWrL2LWnGbNnWv8Y0NHs6xt9E+htlYUDOgoZrXK6U +cEmXG1lHMB1o2N4qQbtKOsI9U2CHGw15LB56xJNmHevPCttDw/N8ywN9SfPl +bVA7H0RDn0oXWzPSzx4erSk/TEM7J8pvedJp/c/sXp6gYQO18ugE+T538FN6 +hlJpWFN8pbWRNHW1b7DgJRoebWMvSSc9aMXlUb1OQ/8GQX430iUBi+lmxTQc ++Bz0mUraqCz7zrE6Gm7t7lh7hTzvTe2v/ow201BsqDHelbQ9z1JLz3c0rL7Q +skmc9G6noE4YpGFjkOqSGLKegqJvKFaM0vBR+6u/aqQPF3Tsp8/R0M1+r/97 +sh4tohnHY/npuHqjQYIi6ecitTcMl9NxJuajYSNZzw4Fzs1jwnRcvtXOw4v0 +zpcpot4UOkK6H08a2Q8HaTM3TNbR8Xg+b1MT2U/TRFrzL006jnpsZ1iTjrJa +N8LRpeMTHYdfT8cIOHnIS19xIx37dYD6kOzHnMZnzbyO5Ho6y/Mk2b80F9+R +6u10PN/JWzlC9nfB8KJoqBsd8ffpc06kyyX1dvbvpiN9aKFd9AcBTX7XRhoj +6HjDbG/XXjIvrBeYYjHRdDz5ZUMUQebJq7RWfd1YOr5wFi5aIPOm8/6y2IJk +OnpfMrqfMEj254owsZNX6Lg7Rap5fx+Z7xVWBhYNdIyUONWcSebZ1U39O/8+ +piMnY2C2hMw7xc6jsVXP6Zgykv28jsxDDV7iqWobHa9fiPDtbif7eZuCu8A3 +OkYcYyQPkXl6YG48tnklAxMUKU37npPneWiv1BcxBvqcscrTJvNacKirmI/C +wNSykIJZMs8Luxvfb1Rk4P7wD+siHhPQ8+CieqU+A6PRdZ/5QwK2nGR2XPdk +4LLod7rrq8h6+lsaWLeHgcdK9u2rJufJcIQi38d9DNz7SrjflJw3Sf4r1lPC +GKiY8b3EqoKAetuP8WeTGJh5t//V6ttkvovFaUZzGNjw59eo3lUCeFKmm7Kq +GCiu574t8TL5/vgC3KpqGDgg8ka+LZuA/dNOJ8cfMVDYLrXHN5M8nw7lbr8u +BrL0+93cz5Hz9lrzqW18irgtg/ElN5aAX+tW9WhsV8RgBdr3RC8CZq7Kxum4 +KWLQlN+eUA9y/oioKDM9FXHm3JG8neT8Hp1kBmzap4jlfck+iuS876vZPeN2 +VBGXnDtplryF7Dfbu8JJhYpYtE9B+QGbrJ/9HtA3rYipeR/b30qT/VpckpeZ +qYQSrkrHhRu50E0vvmZ+WQld08R9Auq5EJVZlDt1TQkbekZ7Gv/jwt24m1ec +ipRwU8ZoSfA9Lmi75GUJ1yph6NP3T26XcmEt/4W0U5+V8Iertn/FJfI73TM6 +NkJdGWO3nWtbGsCFcTEbL+cGZbxM/S6oKciFgVQv5xABVXQP2VnHkeGA9c9I +60H91ShKeWDUSK+A4d2CoXeOr0FG4Zmg4oVS8vtemjexYS2K7J0q/XCrGMRe +qp6t+KmGE5r80csPFoF8UrmDvr46CsYI3SkVvAVZ65irxP00sOac1q7NrQXw +TNZEbzJ9PaqaTgZ71+aDkXxDmuZ7TbxQLExPSc8DYb78MO8TG3DytGV47dar +QI2jsVxVtdC1qz8vLyYblqm4Vzk90cLjX1tMKgUyYT1bpjxylza+7Vw8souS +ASE9Yo02PDrYV/gxM88oDX5Opm63ztJBywc6AUUVKWCp+TjHWkMX0xL+/VJ2 +OhEeTBr/nn2li4f3X2d0ZsVDkLp211tfPXQL95oCv1hgj+5pdV2mj57aHtIP +u6LAXJmyeWW+Pv73wVcomxYBa2JPH24wMMBbVndlazVCoNa4kN/OyAD76t80 +LKWGgMNs3fk2lgFms859dBEOgcNB0yXfTAzQsm2Pk9LPQ9Ds7vVZ2M4AE10u +nkHOIfBn6tvs9DLA9MOTo5kGh6Bo4rPcVJIBtlflNiXZHQQ1X2adSpcBChkl +H/NSD4Rzivbz8R8M8K/ni1RBiUCY+uSj19djgC/y4sYf/j4AD9xSi3P7DbBl +LjbL//kBcHL4dEl6xABlnohsT9h/AI4Ynzy4jMcQb7Rtdxop2w/Nom8ZIyqG +uCIyWHOTaQD4PvBPuHPIEDee+S9qabYfjAYORZqHGWLndEGwQLwfHFY4sP99 +hCFm6/4VlQ/0g9MxwU5z0YaorLJDO8rEDyqMIuisU4YYIl9ZJPhjLyxUxdc2 +5hjiwcFb9XtM9sL58typd43k+h/sly/m90BdXuuecUkmbn/kWMaX6wO9dgzP +CAoTm0PPTgan+gDPr0DX37JMfH17T8VQlA+YOgrY89OZOGMZFbDCxQceLzEy +kFFjoqXrodY5MR944XNtmclGJjZZfNaITvGGLuWAsrS9TNw9P2z84ZQXTP27 +OKt5l4lrzbheVJtd8MXZIi/5PhMHG+f/S9bcBR1Lz1j11zCxgK9u63LJXVDj +JZudWc/E9Td/jdn0usMJip7Rn6dMvKpuG9gc6Q6rkgJinn1gotmYi9u/t3eC +ul8bjy+vEe43rSKu0Nxgt0rxspzNRijt27j6kNkOiHrkEaDqYITF4esSRtbt +gDRfsedcJyM09joycUxiB9QWHkl9vsMIo5RzHvUOOoOEqpXIH28jPOiYfiY3 +2Rkeqw5KeEUY4eUwlT9TrdtBbQ2NrnrNCKeFO7qvR22DcbUMfe6YEXJiDwvX +/HWEjhdoLj5phD1lzi6mI45QHzS6NWzaCD0yNjd3dDvCWa71If15I2TqdY9o +33cENSOekmo+YwQhFcrlMEfwsQ5kNEoZ45bFOVOtUQdo9bMUamUZ4/2fcr8c +O7bAvYLfn6eTjFFSunR+kmEH+mZhszYpxjhj7EGL+scOKj8PC+WdMcbww3Ke +lB+2wKX2GNicN8bl9LtfrtyxhZKs+jO5l41RYNW/Mk1WtpCXepJpWWaMSRcd +bKLDbSA5TCQ9q8UYT9WZt67qtQJB8aSbI23G2H9o2cPIJ1ZwisNTa9phjFr5 +YRemyqwgYXT8y/AHY/yl71GsecwKjvm3sky+GOPzO+H1RQpWEOKe/e37nDEG +ff7zKdfLEtw2KaExlYXiNybuy8yYw59WQeFGOgsnjn+lY4855PmOdtsosfCq +Y/HA0cfm8OXU/Ui3NSx0V1urDZfMIeTplvIj2iyMVMm5855pDqftY6j3LFgY +ZPfwr2X8Jqh2aVvQDWbhntjH8cWqZrDre/Wz2kMsnOqPPHZJ1Ax4ovKyNoWx +MKm0NCBrwRQsLu/X3XaEheSTvOx4ZwrvPi45EBrPwmqZ7HuOsaYw5LO+m3OJ +hVvkeNQkPpmAXGDi/fX1LHSo2yDrUYxwdnGvXkoDuZ/h3cv4chB4z1twvjax +8LtYqPm9JIShKv6ivKcsfP6Rc2DrXoRqnoQssRYWmuUemLZRRHC7EBs5M8jC +uu/XJ32NALJqjug9WMHGKMK3UpTNBiF7V46sMBuHVr7cZkRlQ2yvoUbkKjZK +rOcziF1kgT//nPIGSTZyqpx37W5ggcGWCIl8KhtvqyT4JViz4H1fyORJLTYe +DtzgLLfLGCSXH+Bs3sHGEo/TS39mMaHA7GjUmCsbyy43b/SJYoL20bNmGe5s +3HhlicTMTibYj1W0dXiz8fRA94rjNCacej/9a/cBNn4cr7wq9q8hzOUfN42K +Y+OtHMcFpToD6DLOaLlZzMb0luurxJbqg394wRXrMjaq7Lh1x+27HsyUVfoO +V7DRT+r40vpXeiCm2DGrVcXGkZgezd5sPbAVVJD/r56NKRkLoaFaelDbenNP +SxsbXT3DJ5776oKN8D2NiA7yecVVot7a6UKH5dMZSjcbv4cv6RzX0YWp6h9J +Hr1svDjAun2CVxc0rm8o/T7ERr5npXGf83SgtsskInWEjaJuokXVSTpgI7EV +NMfY2Gcx9qj0oA7sTQx/GzZN7p9/4eBn1IGp+lM50nNspK1984SxVgdOzF/a +XT3PxsEtQYXRojqwSrdIfdcf8vfndo+O/tKG3MDq6cVFcj+zWxOj+7Thf4x1 +L4c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0780314964701385}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0780314964701385}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VO0bB3CRl0pkH9sstkoku2Gm+0Z2CZWQbCVSKGuhIgpRkRIqSdQr +68yJCm+ESvuCbCVZWoTsJOV3fn+d63OdeeZ6znnu+3sfhk+wky8vDw+PyRIe +nv9fZ3qeNimnFGycK3TWn2ow39iaSzli0nECREJXm1rOKAFKvvahdJyHqrYd +C5QZHYhwuN3O15EPKtf7mHPTZiA6Kn3+VzsXpOTeuj2c3gqfau2Dp9ob4ED9 +p9kV07vBQnno43j7O3hky3fHeiIUfrUbXBxr74NvZf9Obv4aD41mtwre5k9C +56LRlsHTF0D+0/0vPup/gBkV0hSzKhckDnjeFjDjw/k3XLPKkBtwXsuixn67 +ICbx8ny26L0FnVkb6sdXrUSTl7fZe3OKIaXg+GteGVHUExFkPFUqBxvdfWKS +SqJ40bo9JG1DOQg2OW1frSGKqyWejNuzyyGhX6Xb1oS8f9IhkONcDjGKL75c +2CeKs+LD0kLJ5RCUR/mrWi2KQwdGNKWGy8HxCkfddqcYtsV7TVdtrwDpC/3J +GVfFsbz+XK6HAAco6yoT5m6KY/SlWn9zIQ7INpw6vqtCHPeLNqquEeUAdWxt ++OpGccx/KB/zWZYDKnYHvWq+iaPj7ZwYpfUc0Fn6R79fRwIHeTgeA1s5sCVM +akD7mQTGyY9YO1/hgMOKbz2XWiSQV001szqPA0759zsXPkggi8Z6IlvIAec3 +7q8f/5TAxNmk969KObBL/Ua1m6Qkzs08usZfx4H9A5rpJ7wk0Sdz/HxpLwcS +t1lvfDcjiQ6BIYsDdC7I3nkly7tECmOG7dsoKlwoE982q7VCCuUcZl9YruXC ++3ceFek0KfS0e02/pMUFZccwRUcrKZS9ILT9twkXGjZf++dNthS+SsZnnd5c ++GMx/eolSxoZYmrrRq9yIe1mVPEfC2k882N49uR1cv0/PEkajtJorVbQTynk +gt2j5SZnfKXRbYBB2VDChRwzOmF3VhopyhqzStVcMETbS88/SaPl5q/5jDYu +hDKvez49QcHb39SbwwUIsMkTnrJNpaCQ2BJpWE6AokBM0quLFEw0FVBbupKA +N63OnJZ/Kfjo2c2rcWIErD8oxNfzioL+WqEN1goEfLsZeXNCVgaTvdFERJuA +upWDRuHKMhjMXjJ1QZeAzDCn17MaMlgpnRUsZUCAuanG3ALKoLl/YYMQi4D8 +j33WAn4y2OrE6HtsToC7hP2IHCGDX8Uz3A65EKATXROXWyuDo3frHhNuBCzv +WyPFeCyD1x8PLJlwJ+B+OR+odsqgnX7rF29vAqRs76dtWJRBe88HkSIB5P7j +lHXNbWWx2m4DNT+KgE0/56OC+mWx+ehWoaIsAo5YXVB7OCyLC4+b0nflEFB2 +XaNLfEYWFZ7+pAlfIYCyzYt5X1AOtY7Xu+y+RsDwvUezfOvlcFU5166nkICM +E2lh2YflcAVb65EUl4Dm7rXKw3FyeLxkUiGVIGBBt7FlY4oc0i4ZJv+5Q8De +r9PaA1fl8MiHr9mtdwkwsts5vr5RDhOtQqu2/kdAn6RqUNNKeaSe/xOW+YQA +6eA6BWlpeXSYn7F42UyAXbPLy310eSzjP6LP84yAqqgUdREdeQz8y3vI7QUB +pz+NDbm6yOP8hkH/3jfkeRiezinxlsepxbfGc28JmEpXslkMkMfv3hu1hVoI +8NjkXFRwVB4Hu2+lrmkjQLuoxu9nvjwabzu6UqeTAD/e7dKmJfL4lkEVU+8i +4MrO0ccXKuXRZiwWGd0E/CPMUDVqlseqwUYFno8EdIWcGkgYkceLNL7xc70E +xLEcvWUNFTC90vLO3BcCrDxyJwxMFXBy4dappq8ECMf+iN9up4DaDacHUr6R +/9948maalwLaCztarhwi4J5N9Y9/khVwmkhs7hom4PgBgaPKGQroLZMlFT9C +gMXZbcKmVxUw39v8l+ooAa1vRzcc5SigHpce5/2TgDEXpYjJTgVcptpWc32c +gLtRBwVEBxRQoqP2teoEAceu/Je1flQBb6XVxt0iLdS7o2YfLxXffPnYdHmS +gJYlhXaJQlSclz3oIjJFQI7SxMcCKSpei/199hjp1X6pPL1qVNyk8vP7lmkC +RpM60//oUvFwUcsqLuk7t1WV5ICKll+LPonMEGA6Wm/uvJWKEkt0ox6QXrZK +uD10FxW1SoOtRGbJetXa6Z/uR8WpipLGnaQ9wqdPv4imopKkzeOvpFUumcoP +naRiVQnbYfXc/+vxXKlAGhW7BFxTfUgTXR82quRQEa2/R2eTjlpY+8a0gIpN +8yz6C9Im1EhvrzIqegoVRM2TFsSmiaP3qNj/LjhV+RcBr7xFEy43UJFfYNLZ +hvTFeA/J+y+oON0Y172ftHth8c3376kYfuqQXDJpxSdzBlO9VCxaJ0PJJ/39 +m/lT0R9UfP3zzbsq0hXLM9w0p6m4IXDC7gnpSPXeH3aLVOS93JHYQnqjvcbR +gGU0FH3xKaGbNP/BKOEkcRp+KvU1/0T6RfqTa4UKNGRZPn3WQzqDkNBqXE1D +jdkAqS7Sbm3eDb1aNPwQWrL2LWnGbNnWv8Y0NHs6xt9E+htlYUDOgoZrXK6U +cEmXG1lHMB1o2N4qQbtKOsI9U2CHGw15LB56xJNmHevPCttDw/N8ywN9SfPl +bVA7H0RDn0oXWzPSzx4erSk/TEM7J8pvedJp/c/sXp6gYQO18ugE+T538FN6 +hlJpWFN8pbWRNHW1b7DgJRoebWMvSSc9aMXlUb1OQ/8GQX430iUBi+lmxTQc ++Bz0mUraqCz7zrE6Gm7t7lh7hTzvTe2v/ow201BsqDHelbQ9z1JLz3c0rL7Q +skmc9G6noE4YpGFjkOqSGLKegqJvKFaM0vBR+6u/aqQPF3Tsp8/R0M1+r/97 +sh4tohnHY/npuHqjQYIi6ecitTcMl9NxJuajYSNZzw4Fzs1jwnRcvtXOw4v0 +zpcpot4UOkK6H08a2Q8HaTM3TNbR8Xg+b1MT2U/TRFrzL006jnpsZ1iTjrJa +N8LRpeMTHYdfT8cIOHnIS19xIx37dYD6kOzHnMZnzbyO5Ho6y/Mk2b80F9+R +6u10PN/JWzlC9nfB8KJoqBsd8ffpc06kyyX1dvbvpiN9aKFd9AcBTX7XRhoj +6HjDbG/XXjIvrBeYYjHRdDz5ZUMUQebJq7RWfd1YOr5wFi5aIPOm8/6y2IJk +OnpfMrqfMEj254owsZNX6Lg7Rap5fx+Z7xVWBhYNdIyUONWcSebZ1U39O/8+ +piMnY2C2hMw7xc6jsVXP6Zgykv28jsxDDV7iqWobHa9fiPDtbif7eZuCu8A3 +OkYcYyQPkXl6YG48tnklAxMUKU37npPneWiv1BcxBvqcscrTJvNacKirmI/C +wNSykIJZMs8Luxvfb1Rk4P7wD+siHhPQ8+CieqU+A6PRdZ/5QwK2nGR2XPdk +4LLod7rrq8h6+lsaWLeHgcdK9u2rJufJcIQi38d9DNz7SrjflJw3Sf4r1lPC +GKiY8b3EqoKAetuP8WeTGJh5t//V6ttkvovFaUZzGNjw59eo3lUCeFKmm7Kq +GCiu574t8TL5/vgC3KpqGDgg8ka+LZuA/dNOJ8cfMVDYLrXHN5M8nw7lbr8u +BrL0+93cz5Hz9lrzqW18irgtg/ElN5aAX+tW9WhsV8RgBdr3RC8CZq7Kxum4 +KWLQlN+eUA9y/oioKDM9FXHm3JG8neT8Hp1kBmzap4jlfck+iuS876vZPeN2 +VBGXnDtplryF7Dfbu8JJhYpYtE9B+QGbrJ/9HtA3rYipeR/b30qT/VpckpeZ +qYQSrkrHhRu50E0vvmZ+WQld08R9Auq5EJVZlDt1TQkbekZ7Gv/jwt24m1ec +ipRwU8ZoSfA9Lmi75GUJ1yph6NP3T26XcmEt/4W0U5+V8Iertn/FJfI73TM6 +NkJdGWO3nWtbGsCFcTEbL+cGZbxM/S6oKciFgVQv5xABVXQP2VnHkeGA9c9I +60H91ShKeWDUSK+A4d2CoXeOr0FG4Zmg4oVS8vtemjexYS2K7J0q/XCrGMRe +qp6t+KmGE5r80csPFoF8UrmDvr46CsYI3SkVvAVZ65irxP00sOac1q7NrQXw +TNZEbzJ9PaqaTgZ71+aDkXxDmuZ7TbxQLExPSc8DYb78MO8TG3DytGV47dar +QI2jsVxVtdC1qz8vLyYblqm4Vzk90cLjX1tMKgUyYT1bpjxylza+7Vw8souS +ASE9Yo02PDrYV/gxM88oDX5Opm63ztJBywc6AUUVKWCp+TjHWkMX0xL+/VJ2 +OhEeTBr/nn2li4f3X2d0ZsVDkLp211tfPXQL95oCv1hgj+5pdV2mj57aHtIP +u6LAXJmyeWW+Pv73wVcomxYBa2JPH24wMMBbVndlazVCoNa4kN/OyAD76t80 +LKWGgMNs3fk2lgFms859dBEOgcNB0yXfTAzQsm2Pk9LPQ9Ds7vVZ2M4AE10u +nkHOIfBn6tvs9DLA9MOTo5kGh6Bo4rPcVJIBtlflNiXZHQQ1X2adSpcBChkl +H/NSD4Rzivbz8R8M8K/ni1RBiUCY+uSj19djgC/y4sYf/j4AD9xSi3P7DbBl +LjbL//kBcHL4dEl6xABlnohsT9h/AI4Ynzy4jMcQb7Rtdxop2w/Nom8ZIyqG +uCIyWHOTaQD4PvBPuHPIEDee+S9qabYfjAYORZqHGWLndEGwQLwfHFY4sP99 +hCFm6/4VlQ/0g9MxwU5z0YaorLJDO8rEDyqMIuisU4YYIl9ZJPhjLyxUxdc2 +5hjiwcFb9XtM9sL58typd43k+h/sly/m90BdXuuecUkmbn/kWMaX6wO9dgzP +CAoTm0PPTgan+gDPr0DX37JMfH17T8VQlA+YOgrY89OZOGMZFbDCxQceLzEy +kFFjoqXrodY5MR944XNtmclGJjZZfNaITvGGLuWAsrS9TNw9P2z84ZQXTP27 +OKt5l4lrzbheVJtd8MXZIi/5PhMHG+f/S9bcBR1Lz1j11zCxgK9u63LJXVDj +JZudWc/E9Td/jdn0usMJip7Rn6dMvKpuG9gc6Q6rkgJinn1gotmYi9u/t3eC +ul8bjy+vEe43rSKu0Nxgt0rxspzNRijt27j6kNkOiHrkEaDqYITF4esSRtbt +gDRfsedcJyM09joycUxiB9QWHkl9vsMIo5RzHvUOOoOEqpXIH28jPOiYfiY3 +2Rkeqw5KeEUY4eUwlT9TrdtBbQ2NrnrNCKeFO7qvR22DcbUMfe6YEXJiDwvX +/HWEjhdoLj5phD1lzi6mI45QHzS6NWzaCD0yNjd3dDvCWa71If15I2TqdY9o +33cENSOekmo+YwQhFcrlMEfwsQ5kNEoZ45bFOVOtUQdo9bMUamUZ4/2fcr8c +O7bAvYLfn6eTjFFSunR+kmEH+mZhszYpxjhj7EGL+scOKj8PC+WdMcbww3Ke +lB+2wKX2GNicN8bl9LtfrtyxhZKs+jO5l41RYNW/Mk1WtpCXepJpWWaMSRcd +bKLDbSA5TCQ9q8UYT9WZt67qtQJB8aSbI23G2H9o2cPIJ1ZwisNTa9phjFr5 +YRemyqwgYXT8y/AHY/yl71GsecwKjvm3sky+GOPzO+H1RQpWEOKe/e37nDEG +ff7zKdfLEtw2KaExlYXiNybuy8yYw59WQeFGOgsnjn+lY4855PmOdtsosfCq +Y/HA0cfm8OXU/Ui3NSx0V1urDZfMIeTplvIj2iyMVMm5855pDqftY6j3LFgY +ZPfwr2X8Jqh2aVvQDWbhntjH8cWqZrDre/Wz2kMsnOqPPHZJ1Ax4ovKyNoWx +MKm0NCBrwRQsLu/X3XaEheSTvOx4ZwrvPi45EBrPwmqZ7HuOsaYw5LO+m3OJ +hVvkeNQkPpmAXGDi/fX1LHSo2yDrUYxwdnGvXkoDuZ/h3cv4chB4z1twvjax +8LtYqPm9JIShKv6ivKcsfP6Rc2DrXoRqnoQssRYWmuUemLZRRHC7EBs5M8jC +uu/XJ32NALJqjug9WMHGKMK3UpTNBiF7V46sMBuHVr7cZkRlQ2yvoUbkKjZK +rOcziF1kgT//nPIGSTZyqpx37W5ggcGWCIl8KhtvqyT4JViz4H1fyORJLTYe +DtzgLLfLGCSXH+Bs3sHGEo/TS39mMaHA7GjUmCsbyy43b/SJYoL20bNmGe5s +3HhlicTMTibYj1W0dXiz8fRA94rjNCacej/9a/cBNn4cr7wq9q8hzOUfN42K +Y+OtHMcFpToD6DLOaLlZzMb0luurxJbqg394wRXrMjaq7Lh1x+27HsyUVfoO +V7DRT+r40vpXeiCm2DGrVcXGkZgezd5sPbAVVJD/r56NKRkLoaFaelDbenNP +SxsbXT3DJ5776oKN8D2NiA7yecVVot7a6UKH5dMZSjcbv4cv6RzX0YWp6h9J +Hr1svDjAun2CVxc0rm8o/T7ERr5npXGf83SgtsskInWEjaJuokXVSTpgI7EV +NMfY2Gcx9qj0oA7sTQx/GzZN7p9/4eBn1IGp+lM50nNspK1984SxVgdOzF/a +XT3PxsEtQYXRojqwSrdIfdcf8vfndo+O/tKG3MDq6cVFcj+zWxOj+7Thf4x1 +L4c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0780314964701385}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0780314964701385}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9938314600113697`*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"9382affc-f6bf-41e7-a4c6-971425c97ca5"] +}, Open ]], Cell[CellGroupData[{ @@ -5739,66 +12434,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[365]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], + "In[121]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 365, 381, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423358439445`*^9}, +Cell[BoxData["2.0598907244413387`"], "Output", + CellChangeTimes->{3.9913423425170345`*^9, 3.993831529088087*^9}, CellLabel-> - "During evaluation of \ -In[365]:=",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 365, 382, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335853943*^9}, - CellLabel-> - "During evaluation of \ -In[365]:=",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 365, 383, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335861944*^9}, - CellLabel-> - "During evaluation of \ -In[365]:=",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 365, 384, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335870945*^9}, - CellLabel-> - "During evaluation of \ -In[365]:=",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], - -Cell[BoxData["12.5536549879565`"], "Output", - CellChangeTimes->{3.9913423425170345`*^9}, - CellLabel-> - "Out[365]=",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] + "Out[121]=",ExpressionUUID->"cf95c91e-f08f-42f2-a345-b54127ee47d4"] }, Open ]], Cell[CellGroupData[{ @@ -5865,68 +12506,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99184987967128*^9, - 3.9918498857615337`*^9}},ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-\ -30286a178ca1"], + CellChangeTimes->{{3.99184987967128*^9, 3.9918498857615337`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 385, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425545177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.575607215730712`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 45, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.993831529121933*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], +In[122]:=",ExpressionUUID->"94b6fccd-8a8b-4b6d-97fa-d5c12cd26e58"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 386, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342342564516*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.6645402700142574`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 46, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.993831529127016*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], +In[122]:=",ExpressionUUID->"cff882f6-c0e1-4c10-b322-508b82510ec7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 387, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425725136`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.755201857314594`*^-81\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 47, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.993831529131715*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], +In[122]:=",ExpressionUUID->"8591a624-0f5d-40b3-9414-185427f2b363"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 366, 388, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425815163`*^9}, +during this calculation.\"", 2, 122, 48, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.993831529135391*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], +In[122]:=",ExpressionUUID->"6915be16-b175-424c-a550-6b810e7e50ef"], -Cell[BoxData["2.904399821349581`"], "Output", - CellChangeTimes->{3.9913423499055786`*^9}, +Cell[BoxData["6.417523783235062`"], "Output", + CellChangeTimes->{3.9913423499055786`*^9, 3.993831538890389*^9}, CellLabel-> - "Out[366]=",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] + "Out[122]=",ExpressionUUID->"c3e0d551-e983-437a-9c82-60267772bbb0"] }, Open ]], Cell[CellGroupData[{ @@ -5947,8 +12598,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -5993,67 +12643,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849890499424*^9, - 3.9918498944226*^9}},ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], + CellChangeTimes->{{3.991849890499424*^9, 3.9918498944226*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 389, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499435787`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.575607215730712`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 49, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.993831538926978*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], +In[123]:=",ExpressionUUID->"d95efe55-3a28-4594-95dc-92e88658373e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 390, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342349953579*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.6645402700142574`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 50, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.99383153893192*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], +In[123]:=",ExpressionUUID->"55e7b282-e582-44b9-a0b8-9aec3d3d4ff9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 391, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499625797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.755201857314594`*^-81\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 51, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.993831538936384*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], +In[123]:=",ExpressionUUID->"9efca9e3-c4e5-4a4a-b188-088bf5ddd6c6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 367, 392, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499715805`*^9}, +during this calculation.\"", 2, 123, 52, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.993831538940549*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], +In[123]:=",ExpressionUUID->"c928a98a-68ea-43ae-a177-a3334b2b1ba6"], -Cell[BoxData["9.928941323789857`"], "Output", - CellChangeTimes->{3.991342356382967*^9}, +Cell[BoxData["25.70132179580754`"], "Output", + CellChangeTimes->{3.991342356382967*^9, 3.9938315480754232`*^9}, CellLabel-> - "Out[367]=",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] + "Out[123]=",ExpressionUUID->"a3f2bc42-c053-42b2-a31a-38b9f3e01cf1"] }, Open ]], Cell[CellGroupData[{ @@ -6074,8 +12735,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6120,68 +12780,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499002266407`*^9, - 3.9918499040814323`*^9}},ExpressionUUID->"935796a8-6280-564a-b4d0-\ -fc6fb6cd41f8"], + CellChangeTimes->{{3.9918499002266407`*^9, 3.9918499040814323`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 393, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356420965*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.575607215730712`*^-79\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 53, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.993831548106719*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], +In[124]:=",ExpressionUUID->"7d97f47a-7080-4ed5-87e6-c5687632aab8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 394, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356431965*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.6645402700142574`*^-80\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 54, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.9938315481119623`*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], +In[124]:=",ExpressionUUID->"5b5b46fd-3e8f-4785-9dd7-25f3fa17746c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 395, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356441965*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.755201857314594`*^-81\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 55, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.9938315481166553`*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], +In[124]:=",ExpressionUUID->"04a710d2-1623-4250-bbc1-b917e5164417"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 368, 396, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356450968*^9}, +during this calculation.\"", 2, 124, 56, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.993831548120699*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], +In[124]:=",ExpressionUUID->"4329bc9f-931b-4ab1-b2cf-83d7d9068686"], -Cell[BoxData["19.874153108015193`"], "Output", - CellChangeTimes->{3.9913423600715523`*^9}, +Cell[BoxData["1.9838188027026449`"], "Output", + CellChangeTimes->{3.9913423600715523`*^9, 3.993831554213661*^9}, CellLabel-> - "Out[368]=",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] + "Out[124]=",ExpressionUUID->"e852d360-4d73-4fa7-a08b-97914848b085"] }, Open ]], Cell[CellGroupData[{ @@ -6190,22 +12860,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849908545643*^9, - 3.9918499133398113`*^9}},ExpressionUUID->"ee52036b-90c5-e14a-aed9-\ -684ff23ed035"], - -Cell[BoxData["0.2067571864462191`"], "Output", - CellChangeTimes->{3.9913423601046352`*^9}, + CellChangeTimes->{{3.991849908545643*^9, 3.9918499133398113`*^9}}, CellLabel-> - "Out[369]=",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] + "In[125]:=",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], + +Cell[BoxData["0.8987496951750906`"], "Output", + CellChangeTimes->{3.9913423601046352`*^9, 3.9938315542453737`*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"e4752f69-fa1b-4ab1-9e24-369a7ac1fab1"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849916273302*^9, 3.9918499185334816`*^9}, - 3.9919247506818066`*^9},ExpressionUUID->"c6d4a146-4cca-7e4e-b483-\ -85227a6e6b51"], + 3.9919247506818066`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ @@ -6228,12 +12899,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[371]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], + "In[127]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913423601345863`*^9}, +Cell[BoxData["25.444661756003168`"], "Output", + CellChangeTimes->{3.9913423601345863`*^9, 3.9938315542592297`*^9}, CellLabel-> - "Out[371]=",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] + "Out[127]=",ExpressionUUID->"c980a2eb-cfb6-4bae-8101-f1a74032f57f"] }, Open ]], Cell[CellGroupData[{ @@ -6243,12 +12914,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[373]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], + "In[128]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.9913423601709976`*^9}, +Cell[BoxData["0.023793753982575144`"], "Output", + CellChangeTimes->{3.9913423601709976`*^9, 3.993831554268703*^9}, CellLabel-> - "Out[373]=",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] + "Out[128]=",ExpressionUUID->"03918a05-1d81-431d-b249-dfabdd3a1ab3"] }, Open ]], Cell[CellGroupData[{ @@ -6258,12 +12929,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[376]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], + "In[129]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913423602320137`*^9}, +Cell[BoxData["0.6054240219921778`"], "Output", + CellChangeTimes->{3.9913423602320137`*^9, 3.99383155427528*^9}, CellLabel-> - "Out[376]=",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] + "Out[129]=",ExpressionUUID->"3a414698-1e28-48f4-babd-de12130a2504"] }, Open ]], Cell[CellGroupData[{ @@ -6453,12 +13124,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[377]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], + "In[130]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[BoxData["0.02003459702393596`"], "Output", - CellChangeTimes->{3.991342360260002*^9}, +Cell[BoxData["0.008269620351506008`"], "Output", + CellChangeTimes->{3.991342360260002*^9, 3.993831554284215*^9}, CellLabel-> - "Out[377]=",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] + "Out[130]=",ExpressionUUID->"d3c14fe1-779a-43bb-bd61-e19f3cb932ae"] }, Open ]], Cell[CellGroupData[{ @@ -6472,12 +13143,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[378]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], + "In[131]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[BoxData["6.261157591052328`"], "Output", - CellChangeTimes->{3.9913423603598785`*^9}, +Cell[BoxData["9.745455767356317`"], "Output", + CellChangeTimes->{3.9913423603598785`*^9, 3.993831554387497*^9}, CellLabel-> - "Out[378]=",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] + "Out[131]=",ExpressionUUID->"5ab1dd58-32bc-457b-bc9e-30fc797515d8"] }, Open ]], Cell[CellGroupData[{ @@ -6669,12 +13340,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[379]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], + "In[132]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[BoxData["0.010388932679900494`"], "Output", - CellChangeTimes->{3.991342360375868*^9}, +Cell[BoxData["0.10620456560224041`"], "Output", + CellChangeTimes->{3.991342360375868*^9, 3.993831554398697*^9}, CellLabel-> - "Out[379]=",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] + "Out[132]=",ExpressionUUID->"b9b2cfa6-4b2e-4917-8cb3-4772e99df0fd"] }, Open ]], Cell[CellGroupData[{ @@ -6688,12 +13359,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[380]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], + "In[133]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[BoxData["8.694797556550151`"], "Output", - CellChangeTimes->{3.991342360471882*^9}, +Cell[BoxData["2.719401590501491`"], "Output", + CellChangeTimes->{3.991342360471882*^9, 3.993831554501285*^9}, CellLabel-> - "Out[380]=",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] + "Out[133]=",ExpressionUUID->"0a35dd78-ce26-4c38-a8fe-227f79774dcd"] }, Open ]], Cell[CellGroupData[{ @@ -6786,12 +13457,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[381]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], + "In[134]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991342360486868*^9}, +Cell[BoxData["0.2129709837599123`"], "Output", + CellChangeTimes->{3.991342360486868*^9, 3.993831554513115*^9}, CellLabel-> - "Out[381]=",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] + "Out[134]=",ExpressionUUID->"052a918b-cbfb-4321-aca1-e7dd48888a34"] }, Open ]], Cell[CellGroupData[{ @@ -6881,12 +13552,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[382]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], + "In[135]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.9913423605138645`*^9}, +Cell[BoxData["0.7870290162400877`"], "Output", + CellChangeTimes->{3.9913423605138645`*^9, 3.9938315545229883`*^9}, CellLabel-> - "Out[382]=",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] + "Out[135]=",ExpressionUUID->"cb122780-b9e9-4d6b-a13e-d5dee7a620a4"] }, Open ]], Cell[CellGroupData[{ @@ -7009,12 +13680,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[383]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], + "In[136]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.9913423605448647`*^9}, +Cell[BoxData["0.16761434383624746`"], "Output", + CellChangeTimes->{3.9913423605448647`*^9, 3.993831554531643*^9}, CellLabel-> - "Out[383]=",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] + "Out[136]=",ExpressionUUID->"d1d536cc-992f-4f28-af8e-db878ab4e495"] }, Open ]], Cell[CellGroupData[{ @@ -7076,68 +13747,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849936863495*^9},ExpressionUUID->"6b25ec99-ae49-ec4d-9652-\ -65328572e509"], + CellChangeTimes->{3.991849936863495*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 384, 397, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342360571863*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.619927965698743`*^-87\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 57, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.99383155454346*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], +In[137]:=",ExpressionUUID->"69a3dc69-25b4-44ba-a98d-c74a775db7c6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 384, 398, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605818653`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.101849248339923`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 58, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.993831554548624*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], +In[137]:=",ExpressionUUID->"b3d90d0a-3255-493a-bbfa-3061eaf3f2ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 384, - 399, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605898647`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2428940139660284`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1827538013769180618507747994894336000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 59, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.993831554553705*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], +In[137]:=",ExpressionUUID->"182f57da-2e63-4596-a446-f3155c28df13"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 384, 400, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605988636`*^9}, +during this calculation.\"", 2, 137, 60, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.993831554558404*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], +In[137]:=",ExpressionUUID->"38f6eb62-9a27-4b88-917e-8057f3dff69c"], -Cell[BoxData["6.261157591052324`"], "Output", - CellChangeTimes->{3.9913423642473736`*^9}, +Cell[BoxData["9.739420439770495`"], "Output", + CellChangeTimes->{3.9913423642473736`*^9, 3.993831559603108*^9}, CellLabel-> - "Out[384]=",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] + "Out[137]=",ExpressionUUID->"dfc5db93-8ba7-4e47-a31b-0b0f0c843a44"] }, Open ]], Cell[CellGroupData[{ @@ -7199,68 +13880,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849940282545*^9},ExpressionUUID->"3e2baf62-fab9-eb41-8de7-\ -aa229443ac14"], + CellChangeTimes->{3.991849940282545*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 385, 401, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364284378*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.619927965698743`*^-87\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 61, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.9938315596343937`*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], +In[138]:=",ExpressionUUID->"c0ed4486-6036-48bd-adf7-d737e1a59f7f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 385, 402, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423642935734`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.101849248339923`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 62, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.993831559641412*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], +In[138]:=",ExpressionUUID->"e350c9cf-2ec3-4c52-9600-55a306af9e71"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 385, - 403, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364302574*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2428940139660284`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1827538013769180618507747994894336000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 63, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.993831559647859*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], +In[138]:=",ExpressionUUID->"f9172c24-1666-4526-9a41-0c8d0f73c9a4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 385, 404, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423643105717`*^9}, +during this calculation.\"", 2, 138, 64, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.993831559653418*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], +In[138]:=",ExpressionUUID->"af3897d2-91f8-41d7-8995-9fb06e3be4d6"], -Cell[BoxData["8.694797556550144`"], "Output", - CellChangeTimes->{3.9913423679416714`*^9}, +Cell[BoxData["2.7177174743526042`"], "Output", + CellChangeTimes->{3.9913423679416714`*^9, 3.993831564853374*^9}, CellLabel-> - "Out[385]=",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] + "Out[138]=",ExpressionUUID->"ee2b3469-baee-4b58-a6e6-f118272187ce"] }, Open ]], Cell[CellGroupData[{ @@ -7318,95 +14009,113 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849946138607*^9},ExpressionUUID->"725c3011-bda9-4c42-96ce-\ -9a77a5dc787c"], + CellChangeTimes->{3.991849946138607*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV0nc4lX0cx3EUCQ1RSBPReqKsY+T7tfesRMieCVHIbqGiUhkVpfsoFImy +I6F4ImRUVvZROIV4rOT59de5Xtf79/uc+77O2e7gbebMxsLCso2VheXvZ8zv +ZnUlM2kcmnm/33lmJTKuGuyz4JDB2Vf01vCbnLhJ30rgKr8M9u0feOsewIlm +XB4s5SIy6LBRs9rXmhPLo6OaRUEGt9HZovvEOTH+UqX/zwAZLKGKwiXLVqBG +OO115HcZTI7mtwn4yYEPfcVM8utlMW+RpsHmwY55XyuuCnbJouCpmusZJuxY +qWdTEzwqiwVOrhe95dlxUCRBRY1LDr9SDV+Ps7OjeMuKfxq15VAFj15/TS3H +LOnRld8r5XDjo5OhHgPLsGgqt2pTsTyKL1as9Atmw3/tjJbCa+UR54TkR53Z +sKN+RHHgszyuPd5RGG7ChgtponmZ/8ljYJT/7sUdbKhyJD5VToaGO+ZiBbSa +WbE6PzDUJIeGW9IEHSYlWbHJH+QvPlLAw+mFNgmLS3CyIeXeg5cKyNL8r05V ++xJwif9eKqlSwKOT95u3FCyBZltR7USfAjIKOFrsvJegRPrAMdstivhclrGc +a/APpI2LhSomKqLfpti3ZW2LEOjBVTUerYTsKr5uG9sXYH2lmwRPkhJmCeks +PilZgDyhmqsS6UrYFe0i5Ji8AMzaC4ePv1VCmqQQn67dAjhILA7VsSpjCquk +HuP7PBgM/uRMD1LG7xuO+dGWz8P2421GNp4Hca/E0FTXoVlIq1hTczroIF5t +UV9dpDQL4qJ6EBN9EI1C7ux8LjoLe7+VS5amHcQuEKn779cMyPlmrBXqPohK +7Iyy9vgZMIgMbm41VMHjJ/5L+vT1P/B/tt3cQBJQJuDsh4KL0zC71rrB8SDg +GvU7C2Pe0xDsl6AVrA9oPaDWomQ1DRE0bvknroApBwSXRA5Mw9XKKQHOVECR +de+b+PqmwGR0YMyeE5G/XWSLk/oUOC8VPNt8FhHfDTswBX8B/wrh228iEFv3 +uh4IZv8FlavDzzpHI94tLE/dPjkJ27Zoa2QnItpumWsorJuELuXP7coFiJpF +fjnsEZNgFjSz3PoX4lhf2Gou5gSoTMtb3T2pitqnS+xbPo8D8/c9VDmjilek +V6jK1oxD8nIW8f4Q0m313jwtGIc5vtrxXTGq6GFZJPUpfhxeHrCILH6iipE6 +NzI2HxmH3T6BuV+GVXFxhUDPq2c/QWC0aIWAgxpyfdfw/tTCBNos1wzNXQ3F +Xxu9UCpmwjF2G8YxHzXcnVEn+vo+E5K3sr69H6aGPIrizK0eTBA5rHte/J4a +Jj3x6tdgY8K+svbfsq1qaHGzcvWC/BhoXZ+fOKyljlunUioEi0bALdmgz99Q +HSMSrN0XUkfgcub9pqTD6rgtwbp45vII1Fep5XQ5qOOQomadsvUImM1e8XQK +V8e4E6U7pllHwMZeeNivSB3XqfVUsJl9h9PSyl03d2tg9E+FLyXLvoG13M+e +G/s10DXKhHvh5zBoKFAD12gaGGpjjyZdw8AHnKNXtDSwMElYRyF/GPL0WufO +O2hgfZ3FApvbMIzbewr43dXAkf6IhuMfGXDiRrLZIS5N/JoY8zs2bwjMbhmb +m/Jq4ux+CU+Vh0OgmMB2zFhQE5HNrpPlxhBwJbvZ64troqBkvl3pySHISJfx +UVfTxN4N2Y+W7x4CRnl9rHSQJpbcfOzV9mgQHJi/a/lGNPFyiP6Z3swBKHz3 +33TmhCaaCCj12dwZAJ7UcRGcI3txt8KY0aSbDYZ4cmqhp0PJDzU30ovqpN6K +a2G0Hcf6aokByD9/N8nfUQsPzt13537SD5yCNLf2Li0MObnOlr+0D2wm9sd7 +D2rh3YaS81lZfZD3fk8l+5gWmmrVbT18vw+sQ7duOrCghRVDogEfz/VBbj9H +0xUhbXyVPRBwXrcPjmW3ySuba6PMdWuO7M5eyFbzW/GgURufbitaoHP1wunt +ViovPmljyVVe57LFHlBmUT9T062NnmxSLbqMHqgvWzfwc1QbmxuuaaYX9sAY +La8cOXVQnzp475RVD+yWnDjTjzrIdvgH/JP+FTKEvQd35OngV+1CljijbvCZ +NxdWLNbBycA8jnyFbqC1q5gZVZC+pnhyTKwbahNWV/g36KD46W/bkxa6YJj3 +2b2aER2UCtdzac/sAnFOppm7qC6+u2R3YGplF6RNebzJuq2Lcpftp6c/d0B7 +5p3tlsnEbuPbeqo6YLVt7Tn2NF38I5VxqyunA87+u0Pt+AtdFJvZPsYX3QFG +93sr1zTr4rU/1OtTCh0wp21e7btGD7k9mLxtD9rB6J5qDe2KHrpWA/fdoC8w +qyr4oTpcHzvz168IdfwEU2PpqoZR+nj+QY463+FP8DNRvqDtmj66zDPZijQ+ +AYNp/oCRoo9dn6Bmr/gnaL0Tf4rzlT5eeGaY8uZ7G+ROrNtgMKuPK3hTz1zx +awOPh6tsW3wMkL+ZUbk3rhW6WZZN9NkbYlvW1IabE81gkBvh/c3NEIPVRs3F +Gc1QYv+H+cPbEOv5i0SqO5ohoXJuZCHUEAv/cMlvqm4Gk4vjg+vvGuLp3lua +BxOboXLF1y+6zYbodGF5oSI0w+PVxRW5akYophS/aiD+I3ht8r5xTtQYWaXb +xXism0CPLk3btscYJbcr+UyZNoH47tme8gPGyDj2b9CQdhN0y5+T/K1qjMdu +nM7ok24Cg0O3GvztjNHNqdZZlacJdl0p5PFMMca96kc2/BPaCJML4RpPuU1w +VCYiJd+sAZ6511bEXzJBd1Ol0lV76qEt56GQ2GUTvMKpmtsoXA+/p4N882JM +8JvkC48UnnrQP/+PWOMtE1Q3C1qw+lEH3+7ejOKkTDB+ZZydU14dbK+3Ngou +N8F1Lo4VScp1cHvfRKfdjAlu3Xv6rJblewj6JTSzx90U5z26Ba/n1sKXtAQn +jpOmaAQROEivBTlzvuZeH1PM3klZaSTUwmQRT3Z8oCnm7z2puiO4FjzClhyW +okzx5X8bH7pp1oLlyqGG5semeEs/LXqsswZoW58/Pjtoii10JxFqbQ1M62mZ +19ia4UpWC8m8hLcgF/Drw3VHM3TvYIo9vfoWAumpmhauZrilbNglK+ItzC/M +y3z3MkPptV65NR5v4U9WDh93mBkmcjrF2MFb4Fgj9NEo2QzjDzZ95B+pBoGW +Uf1PX8zQOXpi/rBmNShYxakOmR5Ci6dhtoW8VdAslOJRLX0Y74RPrCsSfAMb +H194lbHzCK4NqD1Ycrscinp3GxitMsd1/b8jtxWVwpbWcVd/pjnOWE3wDhsV +g3R8XBa99yjG9x/tVFxTCCnLf+27WWWB7DGcWe8gHwpUJTsuFVvigsfjsLaY +F5Akf4X395NjuO6DzpkjwnnQ2PkoUjrGCs8NYpPej+eQb5gs5hNhjXYRPbGz +qTkwcfIQi5eTDUaVl/xS/JAN01q73H6oH8eKtRJHVWhZkMFsn/WTs8UK/+46 +sfwnYPHwkaMNjx2+bBzYszUgE17k6dsui7JDI+eZxirtDFAQbp67PGeHs7v3 +sbIYp4Nor2vHR3d7lKodnP0T8BgGuU8YJw/Y406HabHOp4+g6ZqRo/YRBwz8 +ZVnEzfEIbgc+4D7T5IDbdj+J6fJIg1flS3OOuo5Ywd/orPydDvvfyNAk9B1R +6ooB97lhOjyucvcfMXDE3omUj++G6BBX2zLpY+KIJuwhr4/008GlOX009Kgj +Nml6CZzrpAMvw7g70dkRsUjWb1UD6atSK+rOEfs+Lp9/QYc11hglXUL2RuMu +CFygwzb+msZNrxzR7mP7vfPn6CBVbyjIUU76RanJH+F0MFO2yvzyxhEjnhUf +rQuhw+1N/nWh/zrittgNizf96bCx++ma2i+kc79zs/Ggg9hxgSTrGfI+gRJx +XWZ0ULD7kXFJxgkjlkQC/CTI+9wZ9zOSc8JttqFOquJ04G+ZVBGgOaEdd6r5 +2h10+KE505qh5IQs35x0ckXokLaHhbVezQl759itlzbTYfUMr+U6U7K3l299 +PT8dBmNlVz446YQV5xmO4svoYFoj3+rqTfZL0y/ys9GhnEXxgdQpcv9INX0Z +Kx3u+KnIVp4mbjbqGvxDgZGltv1QMPGek/tfzFNQLGZZvOeKE+KrWLXwSQqu +lYa4Fz0m+6MsFS39FJw8kKgQmEGeL5LJx+ijwCAzdyXtCektHeZzvRRwJTIy +C7PJ/T6BTJEeCi75mowUvCT2qQmK6KQgZJfYifxKYq3B526tFHgk1nnmfSV7 +KWO2I+8o0F3NUPbtJXuvX+puJN55iWXVgX7yvmpNm/XfUsDwlc3OHSLnb/tf +zKmiwN7oAfP5GOnXy7QvVFBgwe7nlTNPehs92ryEAm2/jT5ZG5wRN8evefqM +gsoHkXo3BZ0x4umlL9+yKVCunxQL3EgcEvlcglhqR127+hZir+2xGU8pEPoc +rN65g9yXT5sqyKBgVLF7A5cs6YUfrDnoFFxnSy1zPUR6+ZFkryTy/pI8SYZH +nLFi4xRrQyIFF60CfaWPOiOLj5HvPuLAlyYSS8dIjy7xnYwnz+/CGpfgQHon +/8/IWxRIv3dwenuK7I9RpX3XKPgct4Nb9AbZp4V120RS8AxWuX2LI/bz6GVc +IvvMqersW+S+XWytD/EB3eowWiLZPyWhE3WR/H4sjpOG94lXR7K9Pk+Blndq +e2AWca7iIctwCjZvjpZTeUb2YqJSx8MomHrvfWvZ87/P2/0xmpgSB8NrL8jz +4PHe0lAKFru7K+gl5D5f85O9IRS8NBDOaKgl930mGbSzFFydZ2O//Z746Ijn +10AKHDJG7C3rie8Ptl0kXru8RHiwkexN0E1aAyjwLLW4PveJfF9YznCoPwWi +uxP8xYZIb4m6vuBHwfzn0JbvDNIT+1VyiJsuOUvlfCO91LbJkTisT2ZEYYx0 +l2t3Gn0p6EhqsTH+RRzgUJV7ioKbK3g1g1hdkOVRjEeqNwWvJrutTi8jnuJd +aUU83P3E14udWOxsxQZi5ZcaqQ4rXTCC5+XZOC/yf7MLXNDjJX2jJf/tk+T5 +DTTXafIRz7gFHiVWkl+3C9aT80E/poSJb6zKMpcWIi7eKZ/hSXpJT67wdnL+ +G1fPhxMUuDzKql0vSiwRwH6X+MaNsz1rdhDHL6i7EjNc+FYt30Xu3xdZyf63 +82m7jUkRl33IM/SgoOQPXzjjADm/62uSCPHQ9974XhlitqKEWXcKFCuCqlpp +5PyftPZ04kHPZ1vKkPT+4GA+4tUWwbKFaqQzmVsm3ChQUNcxyNUg3fJ7eyPx +NaH+s490SE+zS7hBXLQ858YDPWLVxkRf4oGfwel3DIgLs54fIaa9W98Wa0L8 +T/LOrcQOuf2jUWZk7zUVxU4cm5zDdv4wsRHrnzFXCvp9daX8LYg586ReE686 +vkHb5xjxnfmxTGKa7oCNh/Xf3yeqIp44dmvo1eN2ZN/cLtuHuIhLj7JwIE6i +v7P9uze9odjMiVhw04zx372+gUYDF3I/6p2K6t+9+ucMLTfS6x+kSBM7FIYu +ogfpvI/4JP7uU3r8Sp6k57WkCv/djxXYI+tFrL1Lk/fvfuCgqqQPOZ9JZ+Ek +5nHKtdjlS/oAtiy5UCBvHOYtepoYl17NEjso6kdu9ifnNbrLJoljdgimCASS +ntXexiQuWDv0gjeIdN9fy0eI+xZy33OHkF67S3+YmGc4rI89jHhzSMYQsVyz +/uxSOLHAyKa//h8PIGgY "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7420,107 +14129,123 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV0nc4lX0cx3EUCQ1RSBPReqKsY+T7tfesRMieCVHIbqGiUhkVpfsoFImy +I6F4ImRUVvZROIV4rOT59de5Xtf79/uc+77O2e7gbebMxsLCso2VheXvZ8zv +ZnUlM2kcmnm/33lmJTKuGuyz4JDB2Vf01vCbnLhJ30rgKr8M9u0feOsewIlm +XB4s5SIy6LBRs9rXmhPLo6OaRUEGt9HZovvEOTH+UqX/zwAZLKGKwiXLVqBG +OO115HcZTI7mtwn4yYEPfcVM8utlMW+RpsHmwY55XyuuCnbJouCpmusZJuxY +qWdTEzwqiwVOrhe95dlxUCRBRY1LDr9SDV+Ps7OjeMuKfxq15VAFj15/TS3H +LOnRld8r5XDjo5OhHgPLsGgqt2pTsTyKL1as9Atmw3/tjJbCa+UR54TkR53Z +sKN+RHHgszyuPd5RGG7ChgtponmZ/8ljYJT/7sUdbKhyJD5VToaGO+ZiBbSa +WbE6PzDUJIeGW9IEHSYlWbHJH+QvPlLAw+mFNgmLS3CyIeXeg5cKyNL8r05V ++xJwif9eKqlSwKOT95u3FCyBZltR7USfAjIKOFrsvJegRPrAMdstivhclrGc +a/APpI2LhSomKqLfpti3ZW2LEOjBVTUerYTsKr5uG9sXYH2lmwRPkhJmCeks +PilZgDyhmqsS6UrYFe0i5Ji8AMzaC4ePv1VCmqQQn67dAjhILA7VsSpjCquk +HuP7PBgM/uRMD1LG7xuO+dGWz8P2421GNp4Hca/E0FTXoVlIq1hTczroIF5t +UV9dpDQL4qJ6EBN9EI1C7ux8LjoLe7+VS5amHcQuEKn779cMyPlmrBXqPohK +7Iyy9vgZMIgMbm41VMHjJ/5L+vT1P/B/tt3cQBJQJuDsh4KL0zC71rrB8SDg +GvU7C2Pe0xDsl6AVrA9oPaDWomQ1DRE0bvknroApBwSXRA5Mw9XKKQHOVECR +de+b+PqmwGR0YMyeE5G/XWSLk/oUOC8VPNt8FhHfDTswBX8B/wrh228iEFv3 +uh4IZv8FlavDzzpHI94tLE/dPjkJ27Zoa2QnItpumWsorJuELuXP7coFiJpF +fjnsEZNgFjSz3PoX4lhf2Gou5gSoTMtb3T2pitqnS+xbPo8D8/c9VDmjilek +V6jK1oxD8nIW8f4Q0m313jwtGIc5vtrxXTGq6GFZJPUpfhxeHrCILH6iipE6 +NzI2HxmH3T6BuV+GVXFxhUDPq2c/QWC0aIWAgxpyfdfw/tTCBNos1wzNXQ3F +Xxu9UCpmwjF2G8YxHzXcnVEn+vo+E5K3sr69H6aGPIrizK0eTBA5rHte/J4a +Jj3x6tdgY8K+svbfsq1qaHGzcvWC/BhoXZ+fOKyljlunUioEi0bALdmgz99Q +HSMSrN0XUkfgcub9pqTD6rgtwbp45vII1Fep5XQ5qOOQomadsvUImM1e8XQK +V8e4E6U7pllHwMZeeNivSB3XqfVUsJl9h9PSyl03d2tg9E+FLyXLvoG13M+e +G/s10DXKhHvh5zBoKFAD12gaGGpjjyZdw8AHnKNXtDSwMElYRyF/GPL0WufO +O2hgfZ3FApvbMIzbewr43dXAkf6IhuMfGXDiRrLZIS5N/JoY8zs2bwjMbhmb +m/Jq4ux+CU+Vh0OgmMB2zFhQE5HNrpPlxhBwJbvZ64troqBkvl3pySHISJfx +UVfTxN4N2Y+W7x4CRnl9rHSQJpbcfOzV9mgQHJi/a/lGNPFyiP6Z3swBKHz3 +33TmhCaaCCj12dwZAJ7UcRGcI3txt8KY0aSbDYZ4cmqhp0PJDzU30ovqpN6K +a2G0Hcf6aokByD9/N8nfUQsPzt13537SD5yCNLf2Li0MObnOlr+0D2wm9sd7 +D2rh3YaS81lZfZD3fk8l+5gWmmrVbT18vw+sQ7duOrCghRVDogEfz/VBbj9H +0xUhbXyVPRBwXrcPjmW3ySuba6PMdWuO7M5eyFbzW/GgURufbitaoHP1wunt +ViovPmljyVVe57LFHlBmUT9T062NnmxSLbqMHqgvWzfwc1QbmxuuaaYX9sAY +La8cOXVQnzp475RVD+yWnDjTjzrIdvgH/JP+FTKEvQd35OngV+1CljijbvCZ +NxdWLNbBycA8jnyFbqC1q5gZVZC+pnhyTKwbahNWV/g36KD46W/bkxa6YJj3 +2b2aER2UCtdzac/sAnFOppm7qC6+u2R3YGplF6RNebzJuq2Lcpftp6c/d0B7 +5p3tlsnEbuPbeqo6YLVt7Tn2NF38I5VxqyunA87+u0Pt+AtdFJvZPsYX3QFG +93sr1zTr4rU/1OtTCh0wp21e7btGD7k9mLxtD9rB6J5qDe2KHrpWA/fdoC8w +qyr4oTpcHzvz168IdfwEU2PpqoZR+nj+QY463+FP8DNRvqDtmj66zDPZijQ+ +AYNp/oCRoo9dn6Bmr/gnaL0Tf4rzlT5eeGaY8uZ7G+ROrNtgMKuPK3hTz1zx +awOPh6tsW3wMkL+ZUbk3rhW6WZZN9NkbYlvW1IabE81gkBvh/c3NEIPVRs3F +Gc1QYv+H+cPbEOv5i0SqO5ohoXJuZCHUEAv/cMlvqm4Gk4vjg+vvGuLp3lua +BxOboXLF1y+6zYbodGF5oSI0w+PVxRW5akYophS/aiD+I3ht8r5xTtQYWaXb +xXism0CPLk3btscYJbcr+UyZNoH47tme8gPGyDj2b9CQdhN0y5+T/K1qjMdu +nM7ok24Cg0O3GvztjNHNqdZZlacJdl0p5PFMMca96kc2/BPaCJML4RpPuU1w +VCYiJd+sAZ6511bEXzJBd1Ol0lV76qEt56GQ2GUTvMKpmtsoXA+/p4N882JM +8JvkC48UnnrQP/+PWOMtE1Q3C1qw+lEH3+7ejOKkTDB+ZZydU14dbK+3Ngou +N8F1Lo4VScp1cHvfRKfdjAlu3Xv6rJblewj6JTSzx90U5z26Ba/n1sKXtAQn +jpOmaAQROEivBTlzvuZeH1PM3klZaSTUwmQRT3Z8oCnm7z2puiO4FjzClhyW +okzx5X8bH7pp1oLlyqGG5semeEs/LXqsswZoW58/Pjtoii10JxFqbQ1M62mZ +19ia4UpWC8m8hLcgF/Drw3VHM3TvYIo9vfoWAumpmhauZrilbNglK+ItzC/M +y3z3MkPptV65NR5v4U9WDh93mBkmcjrF2MFb4Fgj9NEo2QzjDzZ95B+pBoGW +Uf1PX8zQOXpi/rBmNShYxakOmR5Ci6dhtoW8VdAslOJRLX0Y74RPrCsSfAMb +H194lbHzCK4NqD1Ycrscinp3GxitMsd1/b8jtxWVwpbWcVd/pjnOWE3wDhsV +g3R8XBa99yjG9x/tVFxTCCnLf+27WWWB7DGcWe8gHwpUJTsuFVvigsfjsLaY +F5Akf4X395NjuO6DzpkjwnnQ2PkoUjrGCs8NYpPej+eQb5gs5hNhjXYRPbGz +qTkwcfIQi5eTDUaVl/xS/JAN01q73H6oH8eKtRJHVWhZkMFsn/WTs8UK/+46 +sfwnYPHwkaMNjx2+bBzYszUgE17k6dsui7JDI+eZxirtDFAQbp67PGeHs7v3 +sbIYp4Nor2vHR3d7lKodnP0T8BgGuU8YJw/Y406HabHOp4+g6ZqRo/YRBwz8 +ZVnEzfEIbgc+4D7T5IDbdj+J6fJIg1flS3OOuo5Ywd/orPydDvvfyNAk9B1R +6ooB97lhOjyucvcfMXDE3omUj++G6BBX2zLpY+KIJuwhr4/008GlOX009Kgj +Nml6CZzrpAMvw7g70dkRsUjWb1UD6atSK+rOEfs+Lp9/QYc11hglXUL2RuMu +CFygwzb+msZNrxzR7mP7vfPn6CBVbyjIUU76RanJH+F0MFO2yvzyxhEjnhUf +rQuhw+1N/nWh/zrittgNizf96bCx++ma2i+kc79zs/Ggg9hxgSTrGfI+gRJx +XWZ0ULD7kXFJxgkjlkQC/CTI+9wZ9zOSc8JttqFOquJ04G+ZVBGgOaEdd6r5 +2h10+KE505qh5IQs35x0ckXokLaHhbVezQl759itlzbTYfUMr+U6U7K3l299 +PT8dBmNlVz446YQV5xmO4svoYFoj3+rqTfZL0y/ys9GhnEXxgdQpcv9INX0Z +Kx3u+KnIVp4mbjbqGvxDgZGltv1QMPGek/tfzFNQLGZZvOeKE+KrWLXwSQqu +lYa4Fz0m+6MsFS39FJw8kKgQmEGeL5LJx+ijwCAzdyXtCektHeZzvRRwJTIy +C7PJ/T6BTJEeCi75mowUvCT2qQmK6KQgZJfYifxKYq3B526tFHgk1nnmfSV7 +KWO2I+8o0F3NUPbtJXuvX+puJN55iWXVgX7yvmpNm/XfUsDwlc3OHSLnb/tf +zKmiwN7oAfP5GOnXy7QvVFBgwe7nlTNPehs92ryEAm2/jT5ZG5wRN8evefqM +gsoHkXo3BZ0x4umlL9+yKVCunxQL3EgcEvlcglhqR127+hZir+2xGU8pEPoc +rN65g9yXT5sqyKBgVLF7A5cs6YUfrDnoFFxnSy1zPUR6+ZFkryTy/pI8SYZH +nLFi4xRrQyIFF60CfaWPOiOLj5HvPuLAlyYSS8dIjy7xnYwnz+/CGpfgQHon +/8/IWxRIv3dwenuK7I9RpX3XKPgct4Nb9AbZp4V120RS8AxWuX2LI/bz6GVc +IvvMqersW+S+XWytD/EB3eowWiLZPyWhE3WR/H4sjpOG94lXR7K9Pk+Blndq +e2AWca7iIctwCjZvjpZTeUb2YqJSx8MomHrvfWvZ87/P2/0xmpgSB8NrL8jz +4PHe0lAKFru7K+gl5D5f85O9IRS8NBDOaKgl930mGbSzFFydZ2O//Z746Ijn +10AKHDJG7C3rie8Ptl0kXru8RHiwkexN0E1aAyjwLLW4PveJfF9YznCoPwWi +uxP8xYZIb4m6vuBHwfzn0JbvDNIT+1VyiJsuOUvlfCO91LbJkTisT2ZEYYx0 +l2t3Gn0p6EhqsTH+RRzgUJV7ioKbK3g1g1hdkOVRjEeqNwWvJrutTi8jnuJd +aUU83P3E14udWOxsxQZi5ZcaqQ4rXTCC5+XZOC/yf7MLXNDjJX2jJf/tk+T5 +DTTXafIRz7gFHiVWkl+3C9aT80E/poSJb6zKMpcWIi7eKZ/hSXpJT67wdnL+ +G1fPhxMUuDzKql0vSiwRwH6X+MaNsz1rdhDHL6i7EjNc+FYt30Xu3xdZyf63 +82m7jUkRl33IM/SgoOQPXzjjADm/62uSCPHQ9974XhlitqKEWXcKFCuCqlpp +5PyftPZ04kHPZ1vKkPT+4GA+4tUWwbKFaqQzmVsm3ChQUNcxyNUg3fJ7eyPx +NaH+s490SE+zS7hBXLQ858YDPWLVxkRf4oGfwel3DIgLs54fIaa9W98Wa0L8 +T/LOrcQOuf2jUWZk7zUVxU4cm5zDdv4wsRHrnzFXCvp9daX8LYg586ReE686 +vkHb5xjxnfmxTGKa7oCNh/Xf3yeqIp44dmvo1eN2ZN/cLtuHuIhLj7JwIE6i +v7P9uze9odjMiVhw04zx372+gUYDF3I/6p2K6t+9+ucMLTfS6x+kSBM7FIYu +ogfpvI/4JP7uU3r8Sp6k57WkCv/djxXYI+tFrL1Lk/fvfuCgqqQPOZ9JZ+Ek +5nHKtdjlS/oAtiy5UCBvHOYtepoYl17NEjso6kdu9ifnNbrLJoljdgimCASS +ntXexiQuWDv0gjeIdN9fy0eI+xZy33OHkF67S3+YmGc4rI89jHhzSMYQsVyz +/uxSOLHAyKa//h8PIGgY "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0., 3.2457984819475194`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7532,21 +14257,19 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.2457984819475194`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7560,105 +14283,122 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV0nc4lX0cx3EUCQ1RSBPReqKsY+T7tfesRMieCVHIbqGiUhkVpfsoFImy +I6F4ImRUVvZROIV4rOT59de5Xtf79/uc+77O2e7gbebMxsLCso2VheXvZ8zv +ZnUlM2kcmnm/33lmJTKuGuyz4JDB2Vf01vCbnLhJ30rgKr8M9u0feOsewIlm +XB4s5SIy6LBRs9rXmhPLo6OaRUEGt9HZovvEOTH+UqX/zwAZLKGKwiXLVqBG +OO115HcZTI7mtwn4yYEPfcVM8utlMW+RpsHmwY55XyuuCnbJouCpmusZJuxY +qWdTEzwqiwVOrhe95dlxUCRBRY1LDr9SDV+Ps7OjeMuKfxq15VAFj15/TS3H +LOnRld8r5XDjo5OhHgPLsGgqt2pTsTyKL1as9Atmw3/tjJbCa+UR54TkR53Z +sKN+RHHgszyuPd5RGG7ChgtponmZ/8ljYJT/7sUdbKhyJD5VToaGO+ZiBbSa +WbE6PzDUJIeGW9IEHSYlWbHJH+QvPlLAw+mFNgmLS3CyIeXeg5cKyNL8r05V ++xJwif9eKqlSwKOT95u3FCyBZltR7USfAjIKOFrsvJegRPrAMdstivhclrGc +a/APpI2LhSomKqLfpti3ZW2LEOjBVTUerYTsKr5uG9sXYH2lmwRPkhJmCeks +PilZgDyhmqsS6UrYFe0i5Ji8AMzaC4ePv1VCmqQQn67dAjhILA7VsSpjCquk +HuP7PBgM/uRMD1LG7xuO+dGWz8P2421GNp4Hca/E0FTXoVlIq1hTczroIF5t +UV9dpDQL4qJ6EBN9EI1C7ux8LjoLe7+VS5amHcQuEKn779cMyPlmrBXqPohK +7Iyy9vgZMIgMbm41VMHjJ/5L+vT1P/B/tt3cQBJQJuDsh4KL0zC71rrB8SDg +GvU7C2Pe0xDsl6AVrA9oPaDWomQ1DRE0bvknroApBwSXRA5Mw9XKKQHOVECR +de+b+PqmwGR0YMyeE5G/XWSLk/oUOC8VPNt8FhHfDTswBX8B/wrh228iEFv3 +uh4IZv8FlavDzzpHI94tLE/dPjkJ27Zoa2QnItpumWsorJuELuXP7coFiJpF +fjnsEZNgFjSz3PoX4lhf2Gou5gSoTMtb3T2pitqnS+xbPo8D8/c9VDmjilek +V6jK1oxD8nIW8f4Q0m313jwtGIc5vtrxXTGq6GFZJPUpfhxeHrCILH6iipE6 +NzI2HxmH3T6BuV+GVXFxhUDPq2c/QWC0aIWAgxpyfdfw/tTCBNos1wzNXQ3F +Xxu9UCpmwjF2G8YxHzXcnVEn+vo+E5K3sr69H6aGPIrizK0eTBA5rHte/J4a +Jj3x6tdgY8K+svbfsq1qaHGzcvWC/BhoXZ+fOKyljlunUioEi0bALdmgz99Q +HSMSrN0XUkfgcub9pqTD6rgtwbp45vII1Fep5XQ5qOOQomadsvUImM1e8XQK +V8e4E6U7pllHwMZeeNivSB3XqfVUsJl9h9PSyl03d2tg9E+FLyXLvoG13M+e +G/s10DXKhHvh5zBoKFAD12gaGGpjjyZdw8AHnKNXtDSwMElYRyF/GPL0WufO +O2hgfZ3FApvbMIzbewr43dXAkf6IhuMfGXDiRrLZIS5N/JoY8zs2bwjMbhmb +m/Jq4ux+CU+Vh0OgmMB2zFhQE5HNrpPlxhBwJbvZ64troqBkvl3pySHISJfx +UVfTxN4N2Y+W7x4CRnl9rHSQJpbcfOzV9mgQHJi/a/lGNPFyiP6Z3swBKHz3 +33TmhCaaCCj12dwZAJ7UcRGcI3txt8KY0aSbDYZ4cmqhp0PJDzU30ovqpN6K +a2G0Hcf6aokByD9/N8nfUQsPzt13537SD5yCNLf2Li0MObnOlr+0D2wm9sd7 +D2rh3YaS81lZfZD3fk8l+5gWmmrVbT18vw+sQ7duOrCghRVDogEfz/VBbj9H +0xUhbXyVPRBwXrcPjmW3ySuba6PMdWuO7M5eyFbzW/GgURufbitaoHP1wunt +ViovPmljyVVe57LFHlBmUT9T062NnmxSLbqMHqgvWzfwc1QbmxuuaaYX9sAY +La8cOXVQnzp475RVD+yWnDjTjzrIdvgH/JP+FTKEvQd35OngV+1CljijbvCZ +NxdWLNbBycA8jnyFbqC1q5gZVZC+pnhyTKwbahNWV/g36KD46W/bkxa6YJj3 +2b2aER2UCtdzac/sAnFOppm7qC6+u2R3YGplF6RNebzJuq2Lcpftp6c/d0B7 +5p3tlsnEbuPbeqo6YLVt7Tn2NF38I5VxqyunA87+u0Pt+AtdFJvZPsYX3QFG +93sr1zTr4rU/1OtTCh0wp21e7btGD7k9mLxtD9rB6J5qDe2KHrpWA/fdoC8w +qyr4oTpcHzvz168IdfwEU2PpqoZR+nj+QY463+FP8DNRvqDtmj66zDPZijQ+ +AYNp/oCRoo9dn6Bmr/gnaL0Tf4rzlT5eeGaY8uZ7G+ROrNtgMKuPK3hTz1zx +awOPh6tsW3wMkL+ZUbk3rhW6WZZN9NkbYlvW1IabE81gkBvh/c3NEIPVRs3F +Gc1QYv+H+cPbEOv5i0SqO5ohoXJuZCHUEAv/cMlvqm4Gk4vjg+vvGuLp3lua +BxOboXLF1y+6zYbodGF5oSI0w+PVxRW5akYophS/aiD+I3ht8r5xTtQYWaXb +xXism0CPLk3btscYJbcr+UyZNoH47tme8gPGyDj2b9CQdhN0y5+T/K1qjMdu +nM7ok24Cg0O3GvztjNHNqdZZlacJdl0p5PFMMca96kc2/BPaCJML4RpPuU1w +VCYiJd+sAZ6511bEXzJBd1Ol0lV76qEt56GQ2GUTvMKpmtsoXA+/p4N882JM +8JvkC48UnnrQP/+PWOMtE1Q3C1qw+lEH3+7ejOKkTDB+ZZydU14dbK+3Ngou +N8F1Lo4VScp1cHvfRKfdjAlu3Xv6rJblewj6JTSzx90U5z26Ba/n1sKXtAQn +jpOmaAQROEivBTlzvuZeH1PM3klZaSTUwmQRT3Z8oCnm7z2puiO4FjzClhyW +okzx5X8bH7pp1oLlyqGG5semeEs/LXqsswZoW58/Pjtoii10JxFqbQ1M62mZ +19ia4UpWC8m8hLcgF/Drw3VHM3TvYIo9vfoWAumpmhauZrilbNglK+ItzC/M +y3z3MkPptV65NR5v4U9WDh93mBkmcjrF2MFb4Fgj9NEo2QzjDzZ95B+pBoGW +Uf1PX8zQOXpi/rBmNShYxakOmR5Ci6dhtoW8VdAslOJRLX0Y74RPrCsSfAMb +H194lbHzCK4NqD1Ycrscinp3GxitMsd1/b8jtxWVwpbWcVd/pjnOWE3wDhsV +g3R8XBa99yjG9x/tVFxTCCnLf+27WWWB7DGcWe8gHwpUJTsuFVvigsfjsLaY +F5Akf4X395NjuO6DzpkjwnnQ2PkoUjrGCs8NYpPej+eQb5gs5hNhjXYRPbGz +qTkwcfIQi5eTDUaVl/xS/JAN01q73H6oH8eKtRJHVWhZkMFsn/WTs8UK/+46 +sfwnYPHwkaMNjx2+bBzYszUgE17k6dsui7JDI+eZxirtDFAQbp67PGeHs7v3 +sbIYp4Nor2vHR3d7lKodnP0T8BgGuU8YJw/Y406HabHOp4+g6ZqRo/YRBwz8 +ZVnEzfEIbgc+4D7T5IDbdj+J6fJIg1flS3OOuo5Ywd/orPydDvvfyNAk9B1R +6ooB97lhOjyucvcfMXDE3omUj++G6BBX2zLpY+KIJuwhr4/008GlOX009Kgj +Nml6CZzrpAMvw7g70dkRsUjWb1UD6atSK+rOEfs+Lp9/QYc11hglXUL2RuMu +CFygwzb+msZNrxzR7mP7vfPn6CBVbyjIUU76RanJH+F0MFO2yvzyxhEjnhUf +rQuhw+1N/nWh/zrittgNizf96bCx++ma2i+kc79zs/Ggg9hxgSTrGfI+gRJx +XWZ0ULD7kXFJxgkjlkQC/CTI+9wZ9zOSc8JttqFOquJ04G+ZVBGgOaEdd6r5 +2h10+KE505qh5IQs35x0ckXokLaHhbVezQl759itlzbTYfUMr+U6U7K3l299 +PT8dBmNlVz446YQV5xmO4svoYFoj3+rqTfZL0y/ys9GhnEXxgdQpcv9INX0Z +Kx3u+KnIVp4mbjbqGvxDgZGltv1QMPGek/tfzFNQLGZZvOeKE+KrWLXwSQqu +lYa4Fz0m+6MsFS39FJw8kKgQmEGeL5LJx+ijwCAzdyXtCektHeZzvRRwJTIy +C7PJ/T6BTJEeCi75mowUvCT2qQmK6KQgZJfYifxKYq3B526tFHgk1nnmfSV7 +KWO2I+8o0F3NUPbtJXuvX+puJN55iWXVgX7yvmpNm/XfUsDwlc3OHSLnb/tf +zKmiwN7oAfP5GOnXy7QvVFBgwe7nlTNPehs92ryEAm2/jT5ZG5wRN8evefqM +gsoHkXo3BZ0x4umlL9+yKVCunxQL3EgcEvlcglhqR127+hZir+2xGU8pEPoc +rN65g9yXT5sqyKBgVLF7A5cs6YUfrDnoFFxnSy1zPUR6+ZFkryTy/pI8SYZH +nLFi4xRrQyIFF60CfaWPOiOLj5HvPuLAlyYSS8dIjy7xnYwnz+/CGpfgQHon +/8/IWxRIv3dwenuK7I9RpX3XKPgct4Nb9AbZp4V120RS8AxWuX2LI/bz6GVc +IvvMqersW+S+XWytD/EB3eowWiLZPyWhE3WR/H4sjpOG94lXR7K9Pk+Blndq +e2AWca7iIctwCjZvjpZTeUb2YqJSx8MomHrvfWvZ87/P2/0xmpgSB8NrL8jz +4PHe0lAKFru7K+gl5D5f85O9IRS8NBDOaKgl930mGbSzFFydZ2O//Z746Ijn +10AKHDJG7C3rie8Ptl0kXru8RHiwkexN0E1aAyjwLLW4PveJfF9YznCoPwWi +uxP8xYZIb4m6vuBHwfzn0JbvDNIT+1VyiJsuOUvlfCO91LbJkTisT2ZEYYx0 +l2t3Gn0p6EhqsTH+RRzgUJV7ioKbK3g1g1hdkOVRjEeqNwWvJrutTi8jnuJd +aUU83P3E14udWOxsxQZi5ZcaqQ4rXTCC5+XZOC/yf7MLXNDjJX2jJf/tk+T5 +DTTXafIRz7gFHiVWkl+3C9aT80E/poSJb6zKMpcWIi7eKZ/hSXpJT67wdnL+ +G1fPhxMUuDzKql0vSiwRwH6X+MaNsz1rdhDHL6i7EjNc+FYt30Xu3xdZyf63 +82m7jUkRl33IM/SgoOQPXzjjADm/62uSCPHQ9974XhlitqKEWXcKFCuCqlpp +5PyftPZ04kHPZ1vKkPT+4GA+4tUWwbKFaqQzmVsm3ChQUNcxyNUg3fJ7eyPx +NaH+s490SE+zS7hBXLQ858YDPWLVxkRf4oGfwel3DIgLs54fIaa9W98Wa0L8 +T/LOrcQOuf2jUWZk7zUVxU4cm5zDdv4wsRHrnzFXCvp9daX8LYg586ReE686 +vkHb5xjxnfmxTGKa7oCNh/Xf3yeqIp44dmvo1eN2ZN/cLtuHuIhLj7JwIE6i +v7P9uze9odjMiVhw04zx372+gUYDF3I/6p2K6t+9+ucMLTfS6x+kSBM7FIYu +ogfpvI/4JP7uU3r8Sp6k57WkCv/djxXYI+tFrL1Lk/fvfuCgqqQPOZ9JZ+Ek +5nHKtdjlS/oAtiy5UCBvHOYtepoYl17NEjso6kdu9ifnNbrLJoljdgimCASS +ntXexiQuWDv0gjeIdN9fy0eI+xZy33OHkF67S3+YmGc4rI89jHhzSMYQsVyz +/uxSOLHAyKa//h8PIGgY "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "PlotRange" -> {{0, 180}, {0., 3.2457984819475194`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7668,7 +14408,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5012481131960849}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7696,7 +14437,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.2457984819475194`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7704,9 +14446,9 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991342629715925*^9}, + CellChangeTimes->{3.991342629715925*^9, 3.993831936891191*^9}, CellLabel-> - "Out[386]=",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] + "Out[139]=",ExpressionUUID->"f1595829-813e-4526-9cbb-7a6c54746578"] }, Open ]], Cell[CellGroupData[{ @@ -7769,156 +14511,182 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991849950722357*^9, - 3.9918499540026855`*^9}},ExpressionUUID->"1ea503b1-33a1-2744-a92d-\ -2e1269faf5ed"], + CellChangeTimes->{{3.991849950722357*^9, 3.9918499540026855`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.03396961278019`*^-273\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 387, - 405, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299467087`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4906657519529878`*^-242\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 65, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.993831936999157*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], +In[140]:=",ExpressionUUID->"f06ee1fb-9677-4d74-94ac-7e60b20747c0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.366286872093514`*^-285\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 387, 406, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629956772*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.133314077616311`*^-250\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 66, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.993831937004122*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], +In[140]:=",ExpressionUUID->"a7f32528-67e3-414c-83dd-af84264e9fc1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.843812508005402`*^-296\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 387, 407, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629966284*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1460842406715453`*^-257\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 67, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.993831937008471*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], +In[140]:=",ExpressionUUID->"954bd881-710e-42c0-977a-0da2ec7c42e4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 387, 408, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299753895`*^9}, +during this calculation.\"", 2, 140, 68, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.993831937013027*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], +In[140]:=",ExpressionUUID->"ae112b15-463c-41f7-a0eb-190741efa65b"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VO8XB3BRSCL7PjOWJFFkHTPTOcgSKlvIkqUsbZSElCwhUZIllEpC +iWLmSlmiaJH27IpEpa9CtlCW3/39dV/v17yeO8/rOedznqvoE2Tvy83FxWW8 +hIvr/88/vS+eqCQXbGqoXSbcU2e2qfWq9DHjzlggH5yEcWVAibc+0p1p8HF7 +31GXcR0Itb3dwdOZD8bbC2oMxk1BZEQqbbaDA5ZuqqNc4w7wuXZb0GRHA/RE +ury1HtsN5ipDPWMdH8DH3iEjaeQIzHYYZP7u6IdrjXsn0gZOQaPpzYL3+RNw +/VcPVeJ0Bsh/rvruozEPHmnsj/MCV0H8gOdtPlMedCzeYWMUdAPStM1rtu3g +R/6UlD7FTzehK1vr0diqlWhSqrX4LLMEkgui3nLLiOAqgyr595QysNLdKyqh +LILVXXyHstaVAf8T+x1rNEWw76HzhKNhGcQNrP5obSyCDaGbo+/ZlcEJpVff +M/aKYHIY/ZBgXBkE5kkvqFaLoKmm/xXhwTKwy2VrWLuJohqrvl3ToRykMgbO +pF8RwwXau3VvlrJBet29uJkiMQy+HN5WsZwNsg0JUR7lYpiyixGSJcQGyu+1 +R9c0imG7+tsUW2k2rLY55FXzQwx1jj1RS1vHBp2l8/oDOuL4jVp7zN6ODdtD +JL9ubBbHy7rntJ/ksMF2xY/erBZxjJiVjFe7ygb7/KquuU/iWMiuqkvMZ4PT +O/e3z0bF0S6opZ9ZwgYPjRvVrhISaG8Y/PVILRv2f91wIdZLAoNpDqfke9lw +2nHLpg9/JFDxRqC2E4UDshVvZLmXSOK2/GJ6khIH7oo5TmuvkMQnnnK+Vaoc +aP+wq/wCVRLVdZ6qLN/AARW7ECU7S0k8dznbOBA40LD1Gu+7HEmMqgt8uc2T +A/PmU29eM6Uwtq7QK+AyB1KLIkrmzaWw5Yb3Wa5r5HperkRNOyl8VxPUmZ7P +AZunAsbnfKUwm+C8LynmwCVTGmGTIoXNXjlW1+9zwBCts15+lkJ68pd9+R84 +cIR+3fNFrDSuKBY6trCUAKs8oUnrs9LY4nLQsomPACW+E4lvMqXRIo3Wc06A +gHetTuyWW9IY2h3lLLiKgPWHBHl630jjpt07stplCfhRFFY0LiuDTx//jsnb +QED9ym9GR1VkMCll3XPVjQRcDLF/O60pg81azu23dAkwM9GcmUMZjM765JBH +JyC/p38Ln78MzpeGtLmbEuAuvm1YjpDBFCl3c0EnAnSO18RcrZXBQcEjTttd +CBDoV5NUfCaDbryZ+imuBFSV8YBqlwxaThEBi7sIkLSuStValMEezpO8Mn9y +/zEqumbWsrimd02TRTgBm0f/RgQOyGJFwruTrhcJOGaZof74lyyWrz/zVDib +gLvXNbvF/sgil9y4xOMcAqQdvehV/HJoy0drl7pCwK8HT6d51svhCTuTr5k3 +CEiPTQ3JCZfDsgthda1lBDR9XKvyK0YOk28XDlqxCZjTbWzZlCyHmGWq8pBD +gN/g1MavV+Qw/vy+7sx7BBjZuI2tb5TDFQk/baRrCOiXUA18slIe00Im+r2f +EiAVVK8gJUX69Pf0nGcE2DS5vN5Lk8eKv2a7Xz8noDIiWUNYRx4t4nW81jYT +kPT599BOF3lckRc4yHlD1sMw6VKptzza1nvnvXxLwOQFZavFffL4nkFE9r0j +YNdmp+KCSHn83hR9a+EDARuLa/xH8+VRcEtIq2AHAf7cO6RMSsn3qXA94+0k +INdt5FnGPXnkfrSmf440r5CiqlGTPP5dGnWlp5uA7uCEr3HD8viveVH/cC8B +MUw7b1lDBRQbvHT3y1cCLHddHTcwUcAo3rjUu98IEIr+eWqHjQIqPRpYCP1O +vr8xvijVSwEDRk7E/x0k4IFV9U/eMwrYfKNw56shAqIO8EWqpCugrGZT3dGf +BJinOAqZXCE9EVIl+4uA1vcjWpFsBQweEAtxHibgt4ty6ESXAvprWVFzRwm4 +H3GIT+SrAl7ou2in9JuAk7kPs9ePKKCgeL9SAWnBPueavdwUrPCyunlpjICW +JYU2pwUpGO/Y7i48TsAl5fGeAkkKNp3cVBlFeo3/Wa4+dQr6w4WdDhMEjCR2 +XZjXpaCs+5/CStIVt1WV5YCCh6o0LktMEmAy8sjMyYGCsatF45+RXr5KqOOI +BwWPmFickJ4i+1XbLeCCPwWdqncq+pHedXQq6dVxCgqf2RgxSXp1lon8UDwF +3eyTtPT+/L8fz9/hS6UgdWd/zmHSRPenTasvUfDzp4T7xaQj5ta+Mymg4Pip +p0k9pI0pYd5ed8n9uA6Lr5wmgB+fjEc+oODCu23OhqTfeIvEXW6gYGENw8GT +dOapXRJVryg4Y8snEEvavbCkqL2dXK/GG5lHWun5jMFkHwWv0lPuVJP+74fZ +C5GfFJT/+Cf3HelygXTXDVMUnHqUbdNPOkyj76fNIgXn/71+OEp60zbNyH3L +qWg/MzY2Q3rZoQihRDEq7jrhPTRP+tWF59cKFahYcjPi1gLpdEJcu3ENFc+P +5Wr+I+3a5t3Qp01FB7W1xydIK07fdVhgUJEIikkbJP1Deu6rnDkVeXH50Q7S +ZUZbQum2VHy+Z7VKI+lQ94t8zq5UzPzHuH6bNPPkQHbIHir+C64YPkeaJ09L +PS2Qit5npgUOkm5+HFlTFk7+v3XQXwvSqQPNNq9jqfhT7PRDCmnnZdK9Q2ep +KHCmZMcYed6UNb5B/FlU9Mu1elJP+pslh0v1OhXjzrQIJJEu3bd4wbSEihdb +K9VtSRvdzak4WU/F3bOOc2/Jem/ueDM/0kRFg27lhBTS27iWWnh+oGJUXnXY +FtK77QO74BsVa89xZ1WQ/RR4/IZS+QgVyw9KPd9DOrygcz9thorhN2p2i5A2 +P64YFb2MhoKDpwY9yf58KVx7w1CAhmGGYu+XkLYtcGr6LURDR19+jTyyv91e +J4t4S9PwudQyxgcyD4eof24Yr6Ph0Gze5xVkXqaI1KbZDTQMrmKHXiDzFWG5 +bpitS8O7T5ecESMdf9hLX2kTDT8981BZOULmp7G5iduOhjdvr93ZTuaX6uI7 +XL2DhgOV9sNAuuDXosgRVxo2mb/hLSLzXiah5zawm4bKjh1v/P8j4In/teHG +UBq6xMh2PCbnxZY5uuiJ4zSM+1xdJUz6TWqrvm40DbOWzq5zJedLV9Xy6IIz +NDRPjHvydYDM54oQ0fhcGmr2RA+96yPne7mlgXkDDbm/rdjIS86vK5sH3Bae +0TDdPL1UoYvs767I6MqXNCxQ+f1Sm5x3mtzEC9U2Gj7Ky1jY3k7m2VHBne8H +DauI3J17yPl5YGYsummlIga0tcmMvCDredhP8ruoIor80vZ90ETmbai7hEda +EWs6VnadJOd34cfG9k1KpLP3GnOR8763LlPjnr4imq/9Yd5WT8D2eHrndU9F +lP4zX/WiguynhTsH6/coouH9El9ngsx/qBJPz15FpN3scfpC3jeJASvWS4co +4r0XWiJDdwl4ZN1zKiVREcP6I2Te3iLnu2jMhuNsRayKeiv732UCuJKnnmRX +KuKXRd0FxiXy/Hj2uVbWKOL7k6JmyeR9uH/KPn7sqSJKKbxfSs0k69Op8tG/ +WxGFA1/HyKWQ9+21pgRHHiUMWvuPui+KgNl1q3o1dyhh//3IxP2eBPy5Ihuj +46qEfUkR8S4e5P0jvFqF7qmEjTviTE3cyHpM0Pdt3quEukNbBQSdyfuvZvcf +10gljC9/Oh2+jcyb9X2hxEIllO4unatikv2zfxf0Tylhyro/1O+SZF5LSvMu +XlTG1Xw8wo4NHPhIK7lmdlkZg8bafdj1HIi4WHx18poyVn+6aiv4kAP3Y4py +7YuVkVJ+nquG/D7a6JKXLVSrjGu6Cj//K+XA2mUZqQlflMn5Ocy/MosDkp7H +o0M1VPBKdVR8+F4OjIlaeTk1qKChlW3ROz4OfD3r5RTMp4q/GNF1FTJs2DIa +tuWb/hq02Cu6Tl6xHH7t5j9SEaWG58TdnvEt3CG/76W4TzesxcNdi8deFZeA +6GvVlPJRdZSg1aQEBReDfGKZrb6+BnqNahpErLgJ2evoq8T8NfHQ9fCi3R0F +0CxrrDdxYT3Wjyb9vV2fD0byDakb2jfg/s1LX05l5IEQT36Id6wWrpnPKb7l +egUoMVTmTlVtFHku9TLqVA4sX+1eaf9cGzcFKFf7CV2E9SyZsjCPjejCHyLy +ipIOwb2ijVZcOohX97ezMRVGJ87u2JKtg08rBG9y1SaDxYZnl7Zo6qK2rGia +RuZpqJtg/Jt+o4uc8Ji1nvmnIFBjY/d7Xz3c+ngo6GNQNLBG9rTuXK6PTm7f +O5YMRYCZivTWlfn6KF9nqC6hGQpq0UnhDQYGmBbFvTmdHgy1jMJlNkYGSLj9 +5mlbGwy20/VpbUwD3PMpzVBJNhjCA6dKfxgbYGHjnsHev4ehyd3ri5CNARpL +xZX11R6GALq+lZsXuX606jyX6WEoHv8iN5logHPVyYsJzodA3Zdev7rbACU+ +5lbX4kE4r7Tt76lPBnj7QfRPF7WDMPnZR6+/1wCXHv8ayrvqINS5ni25OmCA +HluDwjI/HwB7289ZUsMGqLp0XCo26gAcY8QfWs5liAo8+dfPNeyHJpH3isOr +DdHi9l62xo594FsXEFdx2BAFWqwWztz2h5GDQ2FmIYZ4Z76fHpPhD+EKB/a3 +hxpisMvkmqST/pB0Ish+5rghMj3aR97Z+0O5USiNmWCI3C9qR7Xm/GCu8lRt +4yVD7MtVEdS294O0squTHxoNMfVl6++vAr5Qn9e6Z0yCjrY93U0NpT7QZ6Po +GSpNx+KAe80ql32Aa/bgzn+ydPypJb4l84wPmNjxbVtGo2NK4d+M634+8GyJ +kYGMOh0Nu1I8/BR94JXPteXGm+j4by+PV3aON3Sr7Lub6kfHM/aFB90zvGDy +1uL0hvt0lJ1S423y8YDvTuZ5Z6roaCBBi1Oy9IDOpecsB2rouEJt2iRN0wNq +vGRzLj6iY/RElDV7xh1ipfWM5l/QsZ0zzv3rvDusStx3ovkTHSuoftMWDW6g +4d/G5ctthMojG3KN9F1h9+qS5Ze2GmEfy2aHioszRDzdtU/V1gilBXlupKIz +pPqKvuTYGyH/SiVB0bXOUFt47OxLZyN8cMJ3zOGvE4irWgrPexvhTHjo9g9X +nOCZ6jdxr1Aj/HlFjV3yYweoq1FpqteM8KL5TLTvOUcYU0/X5/w2QssQ4egK +YXvofIVmYhNG2AUfZtcv2MGjwBGHkCkj7AisvP7glx2kcLYc1v9rhP4LBttn +X9iBuhFXaTUPAzs8Xv23Pt4OfLYcVGyUZGBmwMtQ7wVbaPW3EGxlMjDW8+S/ +DdPb4UHBvy9TiQyMO0bwLLBsQN80ZNoqmYG1jwV5g5Rs4N6XX4J55xgodylP +Z4bXBjiUXgOrNAbKxqU/t39nDaXZj85dvczAL1m17ap7rCHvbDzd4i4Dj79n +txmlWsGZEOEL2S0MFD7yM/firCXwiyUWDbcx0EJkMWqozxIS2Fy1Jp0MZA1a +ujk2WULcyNj3X58YOHqvs3JvliWcDGhlGn9noOu9HPUcfUsIds/58d8MA8tl +SvfPhVuA62ZlZFCYmOrEyPNeaQ7zrfxCjTQmPpjX+nF0ygzyfEc+WikzkYs/ +o+B6jxl8T6gKc1Vj4uqpMnW4awbBL7aXHdvIRL/t2ZBqawZJ205QHpgz8aih +o8OxnM1Q7dI2pxvExJaL1bJ9DFPw+K+6ufYwE8dtVPUeqpoCV0Re9uYQJgaf +nPIoEzEF88v7dR2PMbG0K/DCh0ET+NCz5MCRU0z8qX4kRjTTBIZ81n9kZzEx +IpHrYcCEMcgdPF21/hETZyw7psbrEFIW/fSSG5i4IGL56twdBO40c/bgEyYm +5xcI03MRhiqXFee9YOIp3qKiR8cQqrniskVbmNjLe/hSmh6Ca0Z02J9vTLwh +PftgvxdAds0xvboVLES9H7EMHxYIbtvJlhVi4ctKtTkXUxZE9xlqhq1iYVzW +OoEMFRYELJtR0ZJgYceXk9E+g0ww2B4qnk9h4Xk/Z8quQCa09wdPxGuTvw+F +ZFXHMEBC4AB7qzMLDa/rPfN8SIcC08iI3ztZqP5QLrLlKh02RqaYpruzkNfF +0i4gmg7bfpe3dXqz8EOl0YdJUzoktE/N7j7AQrXe8MeZrwxhJj/KJCKGhZ99 +SxY/DhhANyO9paiEhQ/wuG/BWn0IOFqQu+UuC0WyPOYXhfThz917vr/KWXh2 +WOxH+KQeiCp1TmtXsnDdNV7Thno9sOZXkH/4iIUaModHy5z1oLa1aE9LGwsv +/jwU3HtWF6yEHmiGdrKwsdlwdEmILnRavPgj/ZGFm6PPz6ObLkxW/0zc1cdC +VcM6bxF1XdC8rnXnvyEWlt78bjvTpAO13cahZ4dZGGFu7TNVrgNW4g6w4TcL +mw/qaK7M0QG/00ffh0yR59W1Mf7sXh2YfJRwSWqGhRJjDj0TdjoQ+zdrd/Vf +FlbICsYfNdKBVbrFGh7zLOxMk/IRUdaBqwerpxYXyf1dsnR9vkIH/gdGCTX8 + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7932,115 +14700,137 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nk8VO8XB3BRSCL7PjOWJFFkHTPTOcgSKlvIkqUsbZSElCwhUZIllEpC +iWLmSlmiaJH27IpEpa9CtlCW3/39dV/v17yeO8/rOedznqvoE2Tvy83FxWW8 +hIvr/88/vS+eqCQXbGqoXSbcU2e2qfWq9DHjzlggH5yEcWVAibc+0p1p8HF7 +31GXcR0Itb3dwdOZD8bbC2oMxk1BZEQqbbaDA5ZuqqNc4w7wuXZb0GRHA/RE +ury1HtsN5ipDPWMdH8DH3iEjaeQIzHYYZP7u6IdrjXsn0gZOQaPpzYL3+RNw +/VcPVeJ0Bsh/rvruozEPHmnsj/MCV0H8gOdtPlMedCzeYWMUdAPStM1rtu3g +R/6UlD7FTzehK1vr0diqlWhSqrX4LLMEkgui3nLLiOAqgyr595QysNLdKyqh +LILVXXyHstaVAf8T+x1rNEWw76HzhKNhGcQNrP5obSyCDaGbo+/ZlcEJpVff +M/aKYHIY/ZBgXBkE5kkvqFaLoKmm/xXhwTKwy2VrWLuJohqrvl3ToRykMgbO +pF8RwwXau3VvlrJBet29uJkiMQy+HN5WsZwNsg0JUR7lYpiyixGSJcQGyu+1 +R9c0imG7+tsUW2k2rLY55FXzQwx1jj1RS1vHBp2l8/oDOuL4jVp7zN6ODdtD +JL9ubBbHy7rntJ/ksMF2xY/erBZxjJiVjFe7ygb7/KquuU/iWMiuqkvMZ4PT +O/e3z0bF0S6opZ9ZwgYPjRvVrhISaG8Y/PVILRv2f91wIdZLAoNpDqfke9lw +2nHLpg9/JFDxRqC2E4UDshVvZLmXSOK2/GJ6khIH7oo5TmuvkMQnnnK+Vaoc +aP+wq/wCVRLVdZ6qLN/AARW7ECU7S0k8dznbOBA40LD1Gu+7HEmMqgt8uc2T +A/PmU29eM6Uwtq7QK+AyB1KLIkrmzaWw5Yb3Wa5r5HperkRNOyl8VxPUmZ7P +AZunAsbnfKUwm+C8LynmwCVTGmGTIoXNXjlW1+9zwBCts15+lkJ68pd9+R84 +cIR+3fNFrDSuKBY6trCUAKs8oUnrs9LY4nLQsomPACW+E4lvMqXRIo3Wc06A +gHetTuyWW9IY2h3lLLiKgPWHBHl630jjpt07stplCfhRFFY0LiuDTx//jsnb +QED9ym9GR1VkMCll3XPVjQRcDLF/O60pg81azu23dAkwM9GcmUMZjM765JBH +JyC/p38Ln78MzpeGtLmbEuAuvm1YjpDBFCl3c0EnAnSO18RcrZXBQcEjTttd +CBDoV5NUfCaDbryZ+imuBFSV8YBqlwxaThEBi7sIkLSuStValMEezpO8Mn9y +/zEqumbWsrimd02TRTgBm0f/RgQOyGJFwruTrhcJOGaZof74lyyWrz/zVDib +gLvXNbvF/sgil9y4xOMcAqQdvehV/HJoy0drl7pCwK8HT6d51svhCTuTr5k3 +CEiPTQ3JCZfDsgthda1lBDR9XKvyK0YOk28XDlqxCZjTbWzZlCyHmGWq8pBD +gN/g1MavV+Qw/vy+7sx7BBjZuI2tb5TDFQk/baRrCOiXUA18slIe00Im+r2f +EiAVVK8gJUX69Pf0nGcE2DS5vN5Lk8eKv2a7Xz8noDIiWUNYRx4t4nW81jYT +kPT599BOF3lckRc4yHlD1sMw6VKptzza1nvnvXxLwOQFZavFffL4nkFE9r0j +YNdmp+KCSHn83hR9a+EDARuLa/xH8+VRcEtIq2AHAf7cO6RMSsn3qXA94+0k +INdt5FnGPXnkfrSmf440r5CiqlGTPP5dGnWlp5uA7uCEr3HD8viveVH/cC8B +MUw7b1lDBRQbvHT3y1cCLHddHTcwUcAo3rjUu98IEIr+eWqHjQIqPRpYCP1O +vr8xvijVSwEDRk7E/x0k4IFV9U/eMwrYfKNw56shAqIO8EWqpCugrGZT3dGf +BJinOAqZXCE9EVIl+4uA1vcjWpFsBQweEAtxHibgt4ty6ESXAvprWVFzRwm4 +H3GIT+SrAl7ou2in9JuAk7kPs9ePKKCgeL9SAWnBPueavdwUrPCyunlpjICW +JYU2pwUpGO/Y7i48TsAl5fGeAkkKNp3cVBlFeo3/Wa4+dQr6w4WdDhMEjCR2 +XZjXpaCs+5/CStIVt1WV5YCCh6o0LktMEmAy8sjMyYGCsatF45+RXr5KqOOI +BwWPmFickJ4i+1XbLeCCPwWdqncq+pHedXQq6dVxCgqf2RgxSXp1lon8UDwF +3eyTtPT+/L8fz9/hS6UgdWd/zmHSRPenTasvUfDzp4T7xaQj5ta+Mymg4Pip +p0k9pI0pYd5ed8n9uA6Lr5wmgB+fjEc+oODCu23OhqTfeIvEXW6gYGENw8GT +dOapXRJVryg4Y8snEEvavbCkqL2dXK/GG5lHWun5jMFkHwWv0lPuVJP+74fZ +C5GfFJT/+Cf3HelygXTXDVMUnHqUbdNPOkyj76fNIgXn/71+OEp60zbNyH3L +qWg/MzY2Q3rZoQihRDEq7jrhPTRP+tWF59cKFahYcjPi1gLpdEJcu3ENFc+P +5Wr+I+3a5t3Qp01FB7W1xydIK07fdVhgUJEIikkbJP1Deu6rnDkVeXH50Q7S +ZUZbQum2VHy+Z7VKI+lQ94t8zq5UzPzHuH6bNPPkQHbIHir+C64YPkeaJ09L +PS2Qit5npgUOkm5+HFlTFk7+v3XQXwvSqQPNNq9jqfhT7PRDCmnnZdK9Q2ep +KHCmZMcYed6UNb5B/FlU9Mu1elJP+pslh0v1OhXjzrQIJJEu3bd4wbSEihdb +K9VtSRvdzak4WU/F3bOOc2/Jem/ueDM/0kRFg27lhBTS27iWWnh+oGJUXnXY +FtK77QO74BsVa89xZ1WQ/RR4/IZS+QgVyw9KPd9DOrygcz9thorhN2p2i5A2 +P64YFb2MhoKDpwY9yf58KVx7w1CAhmGGYu+XkLYtcGr6LURDR19+jTyyv91e +J4t4S9PwudQyxgcyD4eof24Yr6Ph0Gze5xVkXqaI1KbZDTQMrmKHXiDzFWG5 +bpitS8O7T5ecESMdf9hLX2kTDT8981BZOULmp7G5iduOhjdvr93ZTuaX6uI7 +XL2DhgOV9sNAuuDXosgRVxo2mb/hLSLzXiah5zawm4bKjh1v/P8j4In/teHG +UBq6xMh2PCbnxZY5uuiJ4zSM+1xdJUz6TWqrvm40DbOWzq5zJedLV9Xy6IIz +NDRPjHvydYDM54oQ0fhcGmr2RA+96yPne7mlgXkDDbm/rdjIS86vK5sH3Bae +0TDdPL1UoYvs767I6MqXNCxQ+f1Sm5x3mtzEC9U2Gj7Ky1jY3k7m2VHBne8H +DauI3J17yPl5YGYsummlIga0tcmMvCDredhP8ruoIor80vZ90ETmbai7hEda +EWs6VnadJOd34cfG9k1KpLP3GnOR8763LlPjnr4imq/9Yd5WT8D2eHrndU9F +lP4zX/WiguynhTsH6/coouH9El9ngsx/qBJPz15FpN3scfpC3jeJASvWS4co +4r0XWiJDdwl4ZN1zKiVREcP6I2Te3iLnu2jMhuNsRayKeiv732UCuJKnnmRX +KuKXRd0FxiXy/Hj2uVbWKOL7k6JmyeR9uH/KPn7sqSJKKbxfSs0k69Op8tG/ +WxGFA1/HyKWQ9+21pgRHHiUMWvuPui+KgNl1q3o1dyhh//3IxP2eBPy5Ihuj +46qEfUkR8S4e5P0jvFqF7qmEjTviTE3cyHpM0Pdt3quEukNbBQSdyfuvZvcf +10gljC9/Oh2+jcyb9X2hxEIllO4unatikv2zfxf0Tylhyro/1O+SZF5LSvMu +XlTG1Xw8wo4NHPhIK7lmdlkZg8bafdj1HIi4WHx18poyVn+6aiv4kAP3Y4py +7YuVkVJ+nquG/D7a6JKXLVSrjGu6Cj//K+XA2mUZqQlflMn5Ocy/MosDkp7H +o0M1VPBKdVR8+F4OjIlaeTk1qKChlW3ROz4OfD3r5RTMp4q/GNF1FTJs2DIa +tuWb/hq02Cu6Tl6xHH7t5j9SEaWG58TdnvEt3CG/76W4TzesxcNdi8deFZeA +6GvVlPJRdZSg1aQEBReDfGKZrb6+BnqNahpErLgJ2evoq8T8NfHQ9fCi3R0F +0CxrrDdxYT3Wjyb9vV2fD0byDakb2jfg/s1LX05l5IEQT36Id6wWrpnPKb7l +egUoMVTmTlVtFHku9TLqVA4sX+1eaf9cGzcFKFf7CV2E9SyZsjCPjejCHyLy +ipIOwb2ijVZcOohX97ezMRVGJ87u2JKtg08rBG9y1SaDxYZnl7Zo6qK2rGia +RuZpqJtg/Jt+o4uc8Ji1nvmnIFBjY/d7Xz3c+ngo6GNQNLBG9rTuXK6PTm7f +O5YMRYCZivTWlfn6KF9nqC6hGQpq0UnhDQYGmBbFvTmdHgy1jMJlNkYGSLj9 +5mlbGwy20/VpbUwD3PMpzVBJNhjCA6dKfxgbYGHjnsHev4ehyd3ri5CNARpL +xZX11R6GALq+lZsXuX606jyX6WEoHv8iN5logHPVyYsJzodA3Zdev7rbACU+ +5lbX4kE4r7Tt76lPBnj7QfRPF7WDMPnZR6+/1wCXHv8ayrvqINS5ni25OmCA +HluDwjI/HwB7289ZUsMGqLp0XCo26gAcY8QfWs5liAo8+dfPNeyHJpH3isOr +DdHi9l62xo594FsXEFdx2BAFWqwWztz2h5GDQ2FmIYZ4Z76fHpPhD+EKB/a3 +hxpisMvkmqST/pB0Ish+5rghMj3aR97Z+0O5USiNmWCI3C9qR7Xm/GCu8lRt +4yVD7MtVEdS294O0squTHxoNMfVl6++vAr5Qn9e6Z0yCjrY93U0NpT7QZ6Po +GSpNx+KAe80ql32Aa/bgzn+ydPypJb4l84wPmNjxbVtGo2NK4d+M634+8GyJ +kYGMOh0Nu1I8/BR94JXPteXGm+j4by+PV3aON3Sr7Lub6kfHM/aFB90zvGDy +1uL0hvt0lJ1S423y8YDvTuZ5Z6roaCBBi1Oy9IDOpecsB2rouEJt2iRN0wNq +vGRzLj6iY/RElDV7xh1ipfWM5l/QsZ0zzv3rvDusStx3ovkTHSuoftMWDW6g +4d/G5ctthMojG3KN9F1h9+qS5Ze2GmEfy2aHioszRDzdtU/V1gilBXlupKIz +pPqKvuTYGyH/SiVB0bXOUFt47OxLZyN8cMJ3zOGvE4irWgrPexvhTHjo9g9X +nOCZ6jdxr1Aj/HlFjV3yYweoq1FpqteM8KL5TLTvOUcYU0/X5/w2QssQ4egK +YXvofIVmYhNG2AUfZtcv2MGjwBGHkCkj7AisvP7glx2kcLYc1v9rhP4LBttn +X9iBuhFXaTUPAzs8Xv23Pt4OfLYcVGyUZGBmwMtQ7wVbaPW3EGxlMjDW8+S/ +DdPb4UHBvy9TiQyMO0bwLLBsQN80ZNoqmYG1jwV5g5Rs4N6XX4J55xgodylP +Z4bXBjiUXgOrNAbKxqU/t39nDaXZj85dvczAL1m17ap7rCHvbDzd4i4Dj79n +txmlWsGZEOEL2S0MFD7yM/firCXwiyUWDbcx0EJkMWqozxIS2Fy1Jp0MZA1a +ujk2WULcyNj3X58YOHqvs3JvliWcDGhlGn9noOu9HPUcfUsIds/58d8MA8tl +SvfPhVuA62ZlZFCYmOrEyPNeaQ7zrfxCjTQmPpjX+nF0ygzyfEc+WikzkYs/ +o+B6jxl8T6gKc1Vj4uqpMnW4awbBL7aXHdvIRL/t2ZBqawZJ205QHpgz8aih +o8OxnM1Q7dI2pxvExJaL1bJ9DFPw+K+6ufYwE8dtVPUeqpoCV0Re9uYQJgaf +nPIoEzEF88v7dR2PMbG0K/DCh0ET+NCz5MCRU0z8qX4kRjTTBIZ81n9kZzEx +IpHrYcCEMcgdPF21/hETZyw7psbrEFIW/fSSG5i4IGL56twdBO40c/bgEyYm +5xcI03MRhiqXFee9YOIp3qKiR8cQqrniskVbmNjLe/hSmh6Ca0Z02J9vTLwh +PftgvxdAds0xvboVLES9H7EMHxYIbtvJlhVi4ctKtTkXUxZE9xlqhq1iYVzW +OoEMFRYELJtR0ZJgYceXk9E+g0ww2B4qnk9h4Xk/Z8quQCa09wdPxGuTvw+F +ZFXHMEBC4AB7qzMLDa/rPfN8SIcC08iI3ztZqP5QLrLlKh02RqaYpruzkNfF +0i4gmg7bfpe3dXqz8EOl0YdJUzoktE/N7j7AQrXe8MeZrwxhJj/KJCKGhZ99 +SxY/DhhANyO9paiEhQ/wuG/BWn0IOFqQu+UuC0WyPOYXhfThz917vr/KWXh2 +WOxH+KQeiCp1TmtXsnDdNV7Thno9sOZXkH/4iIUaModHy5z1oLa1aE9LGwsv +/jwU3HtWF6yEHmiGdrKwsdlwdEmILnRavPgj/ZGFm6PPz6ObLkxW/0zc1cdC +VcM6bxF1XdC8rnXnvyEWlt78bjvTpAO13cahZ4dZGGFu7TNVrgNW4g6w4TcL +mw/qaK7M0QG/00ffh0yR59W1Mf7sXh2YfJRwSWqGhRJjDj0TdjoQ+zdrd/Vf +FlbICsYfNdKBVbrFGh7zLOxMk/IRUdaBqwerpxYXyf1dsnR9vkIH/gdGCTX8 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.07800284970531261}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8052,19 +14842,19 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.07800284970531261}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8078,114 +14868,136 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nk8VO8XB3BRSCL7PjOWJFFkHTPTOcgSKlvIkqUsbZSElCwhUZIllEpC +iWLmSlmiaJH27IpEpa9CtlCW3/39dV/v17yeO8/rOedznqvoE2Tvy83FxWW8 +hIvr/88/vS+eqCQXbGqoXSbcU2e2qfWq9DHjzlggH5yEcWVAibc+0p1p8HF7 +31GXcR0Itb3dwdOZD8bbC2oMxk1BZEQqbbaDA5ZuqqNc4w7wuXZb0GRHA/RE +ury1HtsN5ipDPWMdH8DH3iEjaeQIzHYYZP7u6IdrjXsn0gZOQaPpzYL3+RNw +/VcPVeJ0Bsh/rvruozEPHmnsj/MCV0H8gOdtPlMedCzeYWMUdAPStM1rtu3g +R/6UlD7FTzehK1vr0diqlWhSqrX4LLMEkgui3nLLiOAqgyr595QysNLdKyqh +LILVXXyHstaVAf8T+x1rNEWw76HzhKNhGcQNrP5obSyCDaGbo+/ZlcEJpVff +M/aKYHIY/ZBgXBkE5kkvqFaLoKmm/xXhwTKwy2VrWLuJohqrvl3ToRykMgbO +pF8RwwXau3VvlrJBet29uJkiMQy+HN5WsZwNsg0JUR7lYpiyixGSJcQGyu+1 +R9c0imG7+tsUW2k2rLY55FXzQwx1jj1RS1vHBp2l8/oDOuL4jVp7zN6ODdtD +JL9ubBbHy7rntJ/ksMF2xY/erBZxjJiVjFe7ygb7/KquuU/iWMiuqkvMZ4PT +O/e3z0bF0S6opZ9ZwgYPjRvVrhISaG8Y/PVILRv2f91wIdZLAoNpDqfke9lw +2nHLpg9/JFDxRqC2E4UDshVvZLmXSOK2/GJ6khIH7oo5TmuvkMQnnnK+Vaoc +aP+wq/wCVRLVdZ6qLN/AARW7ECU7S0k8dznbOBA40LD1Gu+7HEmMqgt8uc2T +A/PmU29eM6Uwtq7QK+AyB1KLIkrmzaWw5Yb3Wa5r5HperkRNOyl8VxPUmZ7P +AZunAsbnfKUwm+C8LynmwCVTGmGTIoXNXjlW1+9zwBCts15+lkJ68pd9+R84 +cIR+3fNFrDSuKBY6trCUAKs8oUnrs9LY4nLQsomPACW+E4lvMqXRIo3Wc06A +gHetTuyWW9IY2h3lLLiKgPWHBHl630jjpt07stplCfhRFFY0LiuDTx//jsnb +QED9ym9GR1VkMCll3XPVjQRcDLF/O60pg81azu23dAkwM9GcmUMZjM765JBH +JyC/p38Ln78MzpeGtLmbEuAuvm1YjpDBFCl3c0EnAnSO18RcrZXBQcEjTttd +CBDoV5NUfCaDbryZ+imuBFSV8YBqlwxaThEBi7sIkLSuStValMEezpO8Mn9y +/zEqumbWsrimd02TRTgBm0f/RgQOyGJFwruTrhcJOGaZof74lyyWrz/zVDib +gLvXNbvF/sgil9y4xOMcAqQdvehV/HJoy0drl7pCwK8HT6d51svhCTuTr5k3 +CEiPTQ3JCZfDsgthda1lBDR9XKvyK0YOk28XDlqxCZjTbWzZlCyHmGWq8pBD +gN/g1MavV+Qw/vy+7sx7BBjZuI2tb5TDFQk/baRrCOiXUA18slIe00Im+r2f +EiAVVK8gJUX69Pf0nGcE2DS5vN5Lk8eKv2a7Xz8noDIiWUNYRx4t4nW81jYT +kPT599BOF3lckRc4yHlD1sMw6VKptzza1nvnvXxLwOQFZavFffL4nkFE9r0j +YNdmp+KCSHn83hR9a+EDARuLa/xH8+VRcEtIq2AHAf7cO6RMSsn3qXA94+0k +INdt5FnGPXnkfrSmf440r5CiqlGTPP5dGnWlp5uA7uCEr3HD8viveVH/cC8B +MUw7b1lDBRQbvHT3y1cCLHddHTcwUcAo3rjUu98IEIr+eWqHjQIqPRpYCP1O +vr8xvijVSwEDRk7E/x0k4IFV9U/eMwrYfKNw56shAqIO8EWqpCugrGZT3dGf +BJinOAqZXCE9EVIl+4uA1vcjWpFsBQweEAtxHibgt4ty6ESXAvprWVFzRwm4 +H3GIT+SrAl7ou2in9JuAk7kPs9ePKKCgeL9SAWnBPueavdwUrPCyunlpjICW +JYU2pwUpGO/Y7i48TsAl5fGeAkkKNp3cVBlFeo3/Wa4+dQr6w4WdDhMEjCR2 +XZjXpaCs+5/CStIVt1WV5YCCh6o0LktMEmAy8sjMyYGCsatF45+RXr5KqOOI +BwWPmFickJ4i+1XbLeCCPwWdqncq+pHedXQq6dVxCgqf2RgxSXp1lon8UDwF +3eyTtPT+/L8fz9/hS6UgdWd/zmHSRPenTasvUfDzp4T7xaQj5ta+Mymg4Pip +p0k9pI0pYd5ed8n9uA6Lr5wmgB+fjEc+oODCu23OhqTfeIvEXW6gYGENw8GT +dOapXRJVryg4Y8snEEvavbCkqL2dXK/GG5lHWun5jMFkHwWv0lPuVJP+74fZ +C5GfFJT/+Cf3HelygXTXDVMUnHqUbdNPOkyj76fNIgXn/71+OEp60zbNyH3L +qWg/MzY2Q3rZoQihRDEq7jrhPTRP+tWF59cKFahYcjPi1gLpdEJcu3ENFc+P +5Wr+I+3a5t3Qp01FB7W1xydIK07fdVhgUJEIikkbJP1Deu6rnDkVeXH50Q7S +ZUZbQum2VHy+Z7VKI+lQ94t8zq5UzPzHuH6bNPPkQHbIHir+C64YPkeaJ09L +PS2Qit5npgUOkm5+HFlTFk7+v3XQXwvSqQPNNq9jqfhT7PRDCmnnZdK9Q2ep +KHCmZMcYed6UNb5B/FlU9Mu1elJP+pslh0v1OhXjzrQIJJEu3bd4wbSEihdb +K9VtSRvdzak4WU/F3bOOc2/Jem/ueDM/0kRFg27lhBTS27iWWnh+oGJUXnXY +FtK77QO74BsVa89xZ1WQ/RR4/IZS+QgVyw9KPd9DOrygcz9thorhN2p2i5A2 +P64YFb2MhoKDpwY9yf58KVx7w1CAhmGGYu+XkLYtcGr6LURDR19+jTyyv91e +J4t4S9PwudQyxgcyD4eof24Yr6Ph0Gze5xVkXqaI1KbZDTQMrmKHXiDzFWG5 +bpitS8O7T5ecESMdf9hLX2kTDT8981BZOULmp7G5iduOhjdvr93ZTuaX6uI7 +XL2DhgOV9sNAuuDXosgRVxo2mb/hLSLzXiah5zawm4bKjh1v/P8j4In/teHG +UBq6xMh2PCbnxZY5uuiJ4zSM+1xdJUz6TWqrvm40DbOWzq5zJedLV9Xy6IIz +NDRPjHvydYDM54oQ0fhcGmr2RA+96yPne7mlgXkDDbm/rdjIS86vK5sH3Bae +0TDdPL1UoYvs767I6MqXNCxQ+f1Sm5x3mtzEC9U2Gj7Ky1jY3k7m2VHBne8H +DauI3J17yPl5YGYsummlIga0tcmMvCDredhP8ruoIor80vZ90ETmbai7hEda +EWs6VnadJOd34cfG9k1KpLP3GnOR8763LlPjnr4imq/9Yd5WT8D2eHrndU9F +lP4zX/WiguynhTsH6/coouH9El9ngsx/qBJPz15FpN3scfpC3jeJASvWS4co +4r0XWiJDdwl4ZN1zKiVREcP6I2Te3iLnu2jMhuNsRayKeiv732UCuJKnnmRX +KuKXRd0FxiXy/Hj2uVbWKOL7k6JmyeR9uH/KPn7sqSJKKbxfSs0k69Op8tG/ +WxGFA1/HyKWQ9+21pgRHHiUMWvuPui+KgNl1q3o1dyhh//3IxP2eBPy5Ihuj +46qEfUkR8S4e5P0jvFqF7qmEjTviTE3cyHpM0Pdt3quEukNbBQSdyfuvZvcf +10gljC9/Oh2+jcyb9X2hxEIllO4unatikv2zfxf0Tylhyro/1O+SZF5LSvMu +XlTG1Xw8wo4NHPhIK7lmdlkZg8bafdj1HIi4WHx18poyVn+6aiv4kAP3Y4py +7YuVkVJ+nquG/D7a6JKXLVSrjGu6Cj//K+XA2mUZqQlflMn5Ocy/MosDkp7H +o0M1VPBKdVR8+F4OjIlaeTk1qKChlW3ROz4OfD3r5RTMp4q/GNF1FTJs2DIa +tuWb/hq02Cu6Tl6xHH7t5j9SEaWG58TdnvEt3CG/76W4TzesxcNdi8deFZeA +6GvVlPJRdZSg1aQEBReDfGKZrb6+BnqNahpErLgJ2evoq8T8NfHQ9fCi3R0F +0CxrrDdxYT3Wjyb9vV2fD0byDakb2jfg/s1LX05l5IEQT36Id6wWrpnPKb7l +egUoMVTmTlVtFHku9TLqVA4sX+1eaf9cGzcFKFf7CV2E9SyZsjCPjejCHyLy +ipIOwb2ijVZcOohX97ezMRVGJ87u2JKtg08rBG9y1SaDxYZnl7Zo6qK2rGia +RuZpqJtg/Jt+o4uc8Ji1nvmnIFBjY/d7Xz3c+ngo6GNQNLBG9rTuXK6PTm7f +O5YMRYCZivTWlfn6KF9nqC6hGQpq0UnhDQYGmBbFvTmdHgy1jMJlNkYGSLj9 +5mlbGwy20/VpbUwD3PMpzVBJNhjCA6dKfxgbYGHjnsHev4ehyd3ri5CNARpL +xZX11R6GALq+lZsXuX606jyX6WEoHv8iN5logHPVyYsJzodA3Zdev7rbACU+ +5lbX4kE4r7Tt76lPBnj7QfRPF7WDMPnZR6+/1wCXHv8ayrvqINS5ni25OmCA +HluDwjI/HwB7289ZUsMGqLp0XCo26gAcY8QfWs5liAo8+dfPNeyHJpH3isOr +DdHi9l62xo594FsXEFdx2BAFWqwWztz2h5GDQ2FmIYZ4Z76fHpPhD+EKB/a3 +hxpisMvkmqST/pB0Ish+5rghMj3aR97Z+0O5USiNmWCI3C9qR7Xm/GCu8lRt +4yVD7MtVEdS294O0squTHxoNMfVl6++vAr5Qn9e6Z0yCjrY93U0NpT7QZ6Po +GSpNx+KAe80ql32Aa/bgzn+ydPypJb4l84wPmNjxbVtGo2NK4d+M634+8GyJ +kYGMOh0Nu1I8/BR94JXPteXGm+j4by+PV3aON3Sr7Lub6kfHM/aFB90zvGDy +1uL0hvt0lJ1S423y8YDvTuZ5Z6roaCBBi1Oy9IDOpecsB2rouEJt2iRN0wNq +vGRzLj6iY/RElDV7xh1ipfWM5l/QsZ0zzv3rvDusStx3ovkTHSuoftMWDW6g +4d/G5ctthMojG3KN9F1h9+qS5Ze2GmEfy2aHioszRDzdtU/V1gilBXlupKIz +pPqKvuTYGyH/SiVB0bXOUFt47OxLZyN8cMJ3zOGvE4irWgrPexvhTHjo9g9X +nOCZ6jdxr1Aj/HlFjV3yYweoq1FpqteM8KL5TLTvOUcYU0/X5/w2QssQ4egK +YXvofIVmYhNG2AUfZtcv2MGjwBGHkCkj7AisvP7glx2kcLYc1v9rhP4LBttn +X9iBuhFXaTUPAzs8Xv23Pt4OfLYcVGyUZGBmwMtQ7wVbaPW3EGxlMjDW8+S/ +DdPb4UHBvy9TiQyMO0bwLLBsQN80ZNoqmYG1jwV5g5Rs4N6XX4J55xgodylP +Z4bXBjiUXgOrNAbKxqU/t39nDaXZj85dvczAL1m17ap7rCHvbDzd4i4Dj79n +txmlWsGZEOEL2S0MFD7yM/firCXwiyUWDbcx0EJkMWqozxIS2Fy1Jp0MZA1a +ujk2WULcyNj3X58YOHqvs3JvliWcDGhlGn9noOu9HPUcfUsIds/58d8MA8tl +SvfPhVuA62ZlZFCYmOrEyPNeaQ7zrfxCjTQmPpjX+nF0ygzyfEc+WikzkYs/ +o+B6jxl8T6gKc1Vj4uqpMnW4awbBL7aXHdvIRL/t2ZBqawZJ205QHpgz8aih +o8OxnM1Q7dI2pxvExJaL1bJ9DFPw+K+6ufYwE8dtVPUeqpoCV0Re9uYQJgaf +nPIoEzEF88v7dR2PMbG0K/DCh0ET+NCz5MCRU0z8qX4kRjTTBIZ81n9kZzEx +IpHrYcCEMcgdPF21/hETZyw7psbrEFIW/fSSG5i4IGL56twdBO40c/bgEyYm +5xcI03MRhiqXFee9YOIp3qKiR8cQqrniskVbmNjLe/hSmh6Ca0Z02J9vTLwh +PftgvxdAds0xvboVLES9H7EMHxYIbtvJlhVi4ctKtTkXUxZE9xlqhq1iYVzW +OoEMFRYELJtR0ZJgYceXk9E+g0ww2B4qnk9h4Xk/Z8quQCa09wdPxGuTvw+F +ZFXHMEBC4AB7qzMLDa/rPfN8SIcC08iI3ztZqP5QLrLlKh02RqaYpruzkNfF +0i4gmg7bfpe3dXqz8EOl0YdJUzoktE/N7j7AQrXe8MeZrwxhJj/KJCKGhZ99 +SxY/DhhANyO9paiEhQ/wuG/BWn0IOFqQu+UuC0WyPOYXhfThz917vr/KWXh2 +WOxH+KQeiCp1TmtXsnDdNV7Thno9sOZXkH/4iIUaModHy5z1oLa1aE9LGwsv +/jwU3HtWF6yEHmiGdrKwsdlwdEmILnRavPgj/ZGFm6PPz6ObLkxW/0zc1cdC +VcM6bxF1XdC8rnXnvyEWlt78bjvTpAO13cahZ4dZGGFu7TNVrgNW4g6w4TcL +mw/qaK7M0QG/00ffh0yR59W1Mf7sXh2YfJRwSWqGhRJjDj0TdjoQ+zdrd/Vf +FlbICsYfNdKBVbrFGh7zLOxMk/IRUdaBqwerpxYXyf1dsnR9vkIH/gdGCTX8 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.07800284970531261}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8196,6 +15008,7 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8223,7 +15036,8 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12141098789525176`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07800284970531261}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8231,17 +15045,631 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913429049348164`*^9}, + CellChangeTimes->{3.9913429049348164`*^9, 3.993832486031774*^9}, CellLabel-> - "Out[387]=",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] + "Out[140]=",ExpressionUUID->"fb5c6d64-d61b-43ca-af4a-5029e0b0afab"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"b530b35f-2a32-0145-82a7-\ -25a7a01bdd8f"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VO8XB3BRSCL7PjOWJFFkHTPTOcgSKlvIkqUsbZSElCwhUZIllEpC +iWLmSlmiaJH27IpEpa9CtlCW3/39dV/v17yeO8/rOedznqvoE2Tvy83FxWW8 +hIvr/88/vS+eqCQXbGqoXSbcU2e2qfWq9DHjzlggH5yEcWVAibc+0p1p8HF7 +31GXcR0Itb3dwdOZD8bbC2oMxk1BZEQqbbaDA5ZuqqNc4w7wuXZb0GRHA/RE +ury1HtsN5ipDPWMdH8DH3iEjaeQIzHYYZP7u6IdrjXsn0gZOQaPpzYL3+RNw +/VcPVeJ0Bsh/rvruozEPHmnsj/MCV0H8gOdtPlMedCzeYWMUdAPStM1rtu3g +R/6UlD7FTzehK1vr0diqlWhSqrX4LLMEkgui3nLLiOAqgyr595QysNLdKyqh +LILVXXyHstaVAf8T+x1rNEWw76HzhKNhGcQNrP5obSyCDaGbo+/ZlcEJpVff +M/aKYHIY/ZBgXBkE5kkvqFaLoKmm/xXhwTKwy2VrWLuJohqrvl3ToRykMgbO +pF8RwwXau3VvlrJBet29uJkiMQy+HN5WsZwNsg0JUR7lYpiyixGSJcQGyu+1 +R9c0imG7+tsUW2k2rLY55FXzQwx1jj1RS1vHBp2l8/oDOuL4jVp7zN6ODdtD +JL9ubBbHy7rntJ/ksMF2xY/erBZxjJiVjFe7ygb7/KquuU/iWMiuqkvMZ4PT +O/e3z0bF0S6opZ9ZwgYPjRvVrhISaG8Y/PVILRv2f91wIdZLAoNpDqfke9lw +2nHLpg9/JFDxRqC2E4UDshVvZLmXSOK2/GJ6khIH7oo5TmuvkMQnnnK+Vaoc +aP+wq/wCVRLVdZ6qLN/AARW7ECU7S0k8dznbOBA40LD1Gu+7HEmMqgt8uc2T +A/PmU29eM6Uwtq7QK+AyB1KLIkrmzaWw5Yb3Wa5r5HperkRNOyl8VxPUmZ7P +AZunAsbnfKUwm+C8LynmwCVTGmGTIoXNXjlW1+9zwBCts15+lkJ68pd9+R84 +cIR+3fNFrDSuKBY6trCUAKs8oUnrs9LY4nLQsomPACW+E4lvMqXRIo3Wc06A +gHetTuyWW9IY2h3lLLiKgPWHBHl630jjpt07stplCfhRFFY0LiuDTx//jsnb +QED9ym9GR1VkMCll3XPVjQRcDLF/O60pg81azu23dAkwM9GcmUMZjM765JBH +JyC/p38Ln78MzpeGtLmbEuAuvm1YjpDBFCl3c0EnAnSO18RcrZXBQcEjTttd +CBDoV5NUfCaDbryZ+imuBFSV8YBqlwxaThEBi7sIkLSuStValMEezpO8Mn9y +/zEqumbWsrimd02TRTgBm0f/RgQOyGJFwruTrhcJOGaZof74lyyWrz/zVDib +gLvXNbvF/sgil9y4xOMcAqQdvehV/HJoy0drl7pCwK8HT6d51svhCTuTr5k3 +CEiPTQ3JCZfDsgthda1lBDR9XKvyK0YOk28XDlqxCZjTbWzZlCyHmGWq8pBD +gN/g1MavV+Qw/vy+7sx7BBjZuI2tb5TDFQk/baRrCOiXUA18slIe00Im+r2f +EiAVVK8gJUX69Pf0nGcE2DS5vN5Lk8eKv2a7Xz8noDIiWUNYRx4t4nW81jYT +kPT599BOF3lckRc4yHlD1sMw6VKptzza1nvnvXxLwOQFZavFffL4nkFE9r0j +YNdmp+KCSHn83hR9a+EDARuLa/xH8+VRcEtIq2AHAf7cO6RMSsn3qXA94+0k +INdt5FnGPXnkfrSmf440r5CiqlGTPP5dGnWlp5uA7uCEr3HD8viveVH/cC8B +MUw7b1lDBRQbvHT3y1cCLHddHTcwUcAo3rjUu98IEIr+eWqHjQIqPRpYCP1O +vr8xvijVSwEDRk7E/x0k4IFV9U/eMwrYfKNw56shAqIO8EWqpCugrGZT3dGf +BJinOAqZXCE9EVIl+4uA1vcjWpFsBQweEAtxHibgt4ty6ESXAvprWVFzRwm4 +H3GIT+SrAl7ou2in9JuAk7kPs9ePKKCgeL9SAWnBPueavdwUrPCyunlpjICW +JYU2pwUpGO/Y7i48TsAl5fGeAkkKNp3cVBlFeo3/Wa4+dQr6w4WdDhMEjCR2 +XZjXpaCs+5/CStIVt1WV5YCCh6o0LktMEmAy8sjMyYGCsatF45+RXr5KqOOI +BwWPmFickJ4i+1XbLeCCPwWdqncq+pHedXQq6dVxCgqf2RgxSXp1lon8UDwF +3eyTtPT+/L8fz9/hS6UgdWd/zmHSRPenTasvUfDzp4T7xaQj5ta+Mymg4Pip +p0k9pI0pYd5ed8n9uA6Lr5wmgB+fjEc+oODCu23OhqTfeIvEXW6gYGENw8GT +dOapXRJVryg4Y8snEEvavbCkqL2dXK/GG5lHWun5jMFkHwWv0lPuVJP+74fZ +C5GfFJT/+Cf3HelygXTXDVMUnHqUbdNPOkyj76fNIgXn/71+OEp60zbNyH3L +qWg/MzY2Q3rZoQihRDEq7jrhPTRP+tWF59cKFahYcjPi1gLpdEJcu3ENFc+P +5Wr+I+3a5t3Qp01FB7W1xydIK07fdVhgUJEIikkbJP1Deu6rnDkVeXH50Q7S +ZUZbQum2VHy+Z7VKI+lQ94t8zq5UzPzHuH6bNPPkQHbIHir+C64YPkeaJ09L +PS2Qit5npgUOkm5+HFlTFk7+v3XQXwvSqQPNNq9jqfhT7PRDCmnnZdK9Q2ep +KHCmZMcYed6UNb5B/FlU9Mu1elJP+pslh0v1OhXjzrQIJJEu3bd4wbSEihdb +K9VtSRvdzak4WU/F3bOOc2/Jem/ueDM/0kRFg27lhBTS27iWWnh+oGJUXnXY +FtK77QO74BsVa89xZ1WQ/RR4/IZS+QgVyw9KPd9DOrygcz9thorhN2p2i5A2 +P64YFb2MhoKDpwY9yf58KVx7w1CAhmGGYu+XkLYtcGr6LURDR19+jTyyv91e +J4t4S9PwudQyxgcyD4eof24Yr6Ph0Gze5xVkXqaI1KbZDTQMrmKHXiDzFWG5 +bpitS8O7T5ecESMdf9hLX2kTDT8981BZOULmp7G5iduOhjdvr93ZTuaX6uI7 +XL2DhgOV9sNAuuDXosgRVxo2mb/hLSLzXiah5zawm4bKjh1v/P8j4In/teHG +UBq6xMh2PCbnxZY5uuiJ4zSM+1xdJUz6TWqrvm40DbOWzq5zJedLV9Xy6IIz +NDRPjHvydYDM54oQ0fhcGmr2RA+96yPne7mlgXkDDbm/rdjIS86vK5sH3Bae +0TDdPL1UoYvs767I6MqXNCxQ+f1Sm5x3mtzEC9U2Gj7Ky1jY3k7m2VHBne8H +DauI3J17yPl5YGYsummlIga0tcmMvCDredhP8ruoIor80vZ90ETmbai7hEda +EWs6VnadJOd34cfG9k1KpLP3GnOR8763LlPjnr4imq/9Yd5WT8D2eHrndU9F +lP4zX/WiguynhTsH6/coouH9El9ngsx/qBJPz15FpN3scfpC3jeJASvWS4co +4r0XWiJDdwl4ZN1zKiVREcP6I2Te3iLnu2jMhuNsRayKeiv732UCuJKnnmRX +KuKXRd0FxiXy/Hj2uVbWKOL7k6JmyeR9uH/KPn7sqSJKKbxfSs0k69Op8tG/ +WxGFA1/HyKWQ9+21pgRHHiUMWvuPui+KgNl1q3o1dyhh//3IxP2eBPy5Ihuj +46qEfUkR8S4e5P0jvFqF7qmEjTviTE3cyHpM0Pdt3quEukNbBQSdyfuvZvcf +10gljC9/Oh2+jcyb9X2hxEIllO4unatikv2zfxf0Tylhyro/1O+SZF5LSvMu +XlTG1Xw8wo4NHPhIK7lmdlkZg8bafdj1HIi4WHx18poyVn+6aiv4kAP3Y4py +7YuVkVJ+nquG/D7a6JKXLVSrjGu6Cj//K+XA2mUZqQlflMn5Ocy/MosDkp7H +o0M1VPBKdVR8+F4OjIlaeTk1qKChlW3ROz4OfD3r5RTMp4q/GNF1FTJs2DIa +tuWb/hq02Cu6Tl6xHH7t5j9SEaWG58TdnvEt3CG/76W4TzesxcNdi8deFZeA +6GvVlPJRdZSg1aQEBReDfGKZrb6+BnqNahpErLgJ2evoq8T8NfHQ9fCi3R0F +0CxrrDdxYT3Wjyb9vV2fD0byDakb2jfg/s1LX05l5IEQT36Id6wWrpnPKb7l +egUoMVTmTlVtFHku9TLqVA4sX+1eaf9cGzcFKFf7CV2E9SyZsjCPjejCHyLy +ipIOwb2ijVZcOohX97ezMRVGJ87u2JKtg08rBG9y1SaDxYZnl7Zo6qK2rGia +RuZpqJtg/Jt+o4uc8Ji1nvmnIFBjY/d7Xz3c+ngo6GNQNLBG9rTuXK6PTm7f +O5YMRYCZivTWlfn6KF9nqC6hGQpq0UnhDQYGmBbFvTmdHgy1jMJlNkYGSLj9 +5mlbGwy20/VpbUwD3PMpzVBJNhjCA6dKfxgbYGHjnsHev4ehyd3ri5CNARpL +xZX11R6GALq+lZsXuX606jyX6WEoHv8iN5logHPVyYsJzodA3Zdev7rbACU+ +5lbX4kE4r7Tt76lPBnj7QfRPF7WDMPnZR6+/1wCXHv8ayrvqINS5ni25OmCA +HluDwjI/HwB7289ZUsMGqLp0XCo26gAcY8QfWs5liAo8+dfPNeyHJpH3isOr +DdHi9l62xo594FsXEFdx2BAFWqwWztz2h5GDQ2FmIYZ4Z76fHpPhD+EKB/a3 +hxpisMvkmqST/pB0Ish+5rghMj3aR97Z+0O5USiNmWCI3C9qR7Xm/GCu8lRt +4yVD7MtVEdS294O0squTHxoNMfVl6++vAr5Qn9e6Z0yCjrY93U0NpT7QZ6Po +GSpNx+KAe80ql32Aa/bgzn+ydPypJb4l84wPmNjxbVtGo2NK4d+M634+8GyJ +kYGMOh0Nu1I8/BR94JXPteXGm+j4by+PV3aON3Sr7Lub6kfHM/aFB90zvGDy +1uL0hvt0lJ1S423y8YDvTuZ5Z6roaCBBi1Oy9IDOpecsB2rouEJt2iRN0wNq +vGRzLj6iY/RElDV7xh1ipfWM5l/QsZ0zzv3rvDusStx3ovkTHSuoftMWDW6g +4d/G5ctthMojG3KN9F1h9+qS5Ze2GmEfy2aHioszRDzdtU/V1gilBXlupKIz +pPqKvuTYGyH/SiVB0bXOUFt47OxLZyN8cMJ3zOGvE4irWgrPexvhTHjo9g9X +nOCZ6jdxr1Aj/HlFjV3yYweoq1FpqteM8KL5TLTvOUcYU0/X5/w2QssQ4egK +YXvofIVmYhNG2AUfZtcv2MGjwBGHkCkj7AisvP7glx2kcLYc1v9rhP4LBttn +X9iBuhFXaTUPAzs8Xv23Pt4OfLYcVGyUZGBmwMtQ7wVbaPW3EGxlMjDW8+S/ +DdPb4UHBvy9TiQyMO0bwLLBsQN80ZNoqmYG1jwV5g5Rs4N6XX4J55xgodylP +Z4bXBjiUXgOrNAbKxqU/t39nDaXZj85dvczAL1m17ap7rCHvbDzd4i4Dj79n +txmlWsGZEOEL2S0MFD7yM/firCXwiyUWDbcx0EJkMWqozxIS2Fy1Jp0MZA1a +ujk2WULcyNj3X58YOHqvs3JvliWcDGhlGn9noOu9HPUcfUsIds/58d8MA8tl +SvfPhVuA62ZlZFCYmOrEyPNeaQ7zrfxCjTQmPpjX+nF0ygzyfEc+WikzkYs/ +o+B6jxl8T6gKc1Vj4uqpMnW4awbBL7aXHdvIRL/t2ZBqawZJ205QHpgz8aih +o8OxnM1Q7dI2pxvExJaL1bJ9DFPw+K+6ufYwE8dtVPUeqpoCV0Re9uYQJgaf +nPIoEzEF88v7dR2PMbG0K/DCh0ET+NCz5MCRU0z8qX4kRjTTBIZ81n9kZzEx +IpHrYcCEMcgdPF21/hETZyw7psbrEFIW/fSSG5i4IGL56twdBO40c/bgEyYm +5xcI03MRhiqXFee9YOIp3qKiR8cQqrniskVbmNjLe/hSmh6Ca0Z02J9vTLwh +PftgvxdAds0xvboVLES9H7EMHxYIbtvJlhVi4ctKtTkXUxZE9xlqhq1iYVzW +OoEMFRYELJtR0ZJgYceXk9E+g0ww2B4qnk9h4Xk/Z8quQCa09wdPxGuTvw+F +ZFXHMEBC4AB7qzMLDa/rPfN8SIcC08iI3ztZqP5QLrLlKh02RqaYpruzkNfF +0i4gmg7bfpe3dXqz8EOl0YdJUzoktE/N7j7AQrXe8MeZrwxhJj/KJCKGhZ99 +SxY/DhhANyO9paiEhQ/wuG/BWn0IOFqQu+UuC0WyPOYXhfThz917vr/KWXh2 +WOxH+KQeiCp1TmtXsnDdNV7Thno9sOZXkH/4iIUaModHy5z1oLa1aE9LGwsv +/jwU3HtWF6yEHmiGdrKwsdlwdEmILnRavPgj/ZGFm6PPz6ObLkxW/0zc1cdC +VcM6bxF1XdC8rnXnvyEWlt78bjvTpAO13cahZ4dZGGFu7TNVrgNW4g6w4TcL +mw/qaK7M0QG/00ffh0yR59W1Mf7sXh2YfJRwSWqGhRJjDj0TdjoQ+zdrd/Vf +FlbICsYfNdKBVbrFGh7zLOxMk/IRUdaBqwerpxYXyf1dsnR9vkIH/gdGCTX8 + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VO8XB3BRSCL7PjOWJFFkHTPTOcgSKlvIkqUsbZSElCwhUZIllEpC +iWLmSlmiaJH27IpEpa9CtlCW3/39dV/v17yeO8/rOedznqvoE2Tvy83FxWW8 +hIvr/88/vS+eqCQXbGqoXSbcU2e2qfWq9DHjzlggH5yEcWVAibc+0p1p8HF7 +31GXcR0Itb3dwdOZD8bbC2oMxk1BZEQqbbaDA5ZuqqNc4w7wuXZb0GRHA/RE +ury1HtsN5ipDPWMdH8DH3iEjaeQIzHYYZP7u6IdrjXsn0gZOQaPpzYL3+RNw +/VcPVeJ0Bsh/rvruozEPHmnsj/MCV0H8gOdtPlMedCzeYWMUdAPStM1rtu3g +R/6UlD7FTzehK1vr0diqlWhSqrX4LLMEkgui3nLLiOAqgyr595QysNLdKyqh +LILVXXyHstaVAf8T+x1rNEWw76HzhKNhGcQNrP5obSyCDaGbo+/ZlcEJpVff +M/aKYHIY/ZBgXBkE5kkvqFaLoKmm/xXhwTKwy2VrWLuJohqrvl3ToRykMgbO +pF8RwwXau3VvlrJBet29uJkiMQy+HN5WsZwNsg0JUR7lYpiyixGSJcQGyu+1 +R9c0imG7+tsUW2k2rLY55FXzQwx1jj1RS1vHBp2l8/oDOuL4jVp7zN6ODdtD +JL9ubBbHy7rntJ/ksMF2xY/erBZxjJiVjFe7ygb7/KquuU/iWMiuqkvMZ4PT +O/e3z0bF0S6opZ9ZwgYPjRvVrhISaG8Y/PVILRv2f91wIdZLAoNpDqfke9lw +2nHLpg9/JFDxRqC2E4UDshVvZLmXSOK2/GJ6khIH7oo5TmuvkMQnnnK+Vaoc +aP+wq/wCVRLVdZ6qLN/AARW7ECU7S0k8dznbOBA40LD1Gu+7HEmMqgt8uc2T +A/PmU29eM6Uwtq7QK+AyB1KLIkrmzaWw5Yb3Wa5r5HperkRNOyl8VxPUmZ7P +AZunAsbnfKUwm+C8LynmwCVTGmGTIoXNXjlW1+9zwBCts15+lkJ68pd9+R84 +cIR+3fNFrDSuKBY6trCUAKs8oUnrs9LY4nLQsomPACW+E4lvMqXRIo3Wc06A +gHetTuyWW9IY2h3lLLiKgPWHBHl630jjpt07stplCfhRFFY0LiuDTx//jsnb +QED9ym9GR1VkMCll3XPVjQRcDLF/O60pg81azu23dAkwM9GcmUMZjM765JBH +JyC/p38Ln78MzpeGtLmbEuAuvm1YjpDBFCl3c0EnAnSO18RcrZXBQcEjTttd +CBDoV5NUfCaDbryZ+imuBFSV8YBqlwxaThEBi7sIkLSuStValMEezpO8Mn9y +/zEqumbWsrimd02TRTgBm0f/RgQOyGJFwruTrhcJOGaZof74lyyWrz/zVDib +gLvXNbvF/sgil9y4xOMcAqQdvehV/HJoy0drl7pCwK8HT6d51svhCTuTr5k3 +CEiPTQ3JCZfDsgthda1lBDR9XKvyK0YOk28XDlqxCZjTbWzZlCyHmGWq8pBD +gN/g1MavV+Qw/vy+7sx7BBjZuI2tb5TDFQk/baRrCOiXUA18slIe00Im+r2f +EiAVVK8gJUX69Pf0nGcE2DS5vN5Lk8eKv2a7Xz8noDIiWUNYRx4t4nW81jYT +kPT599BOF3lckRc4yHlD1sMw6VKptzza1nvnvXxLwOQFZavFffL4nkFE9r0j +YNdmp+KCSHn83hR9a+EDARuLa/xH8+VRcEtIq2AHAf7cO6RMSsn3qXA94+0k +INdt5FnGPXnkfrSmf440r5CiqlGTPP5dGnWlp5uA7uCEr3HD8viveVH/cC8B +MUw7b1lDBRQbvHT3y1cCLHddHTcwUcAo3rjUu98IEIr+eWqHjQIqPRpYCP1O +vr8xvijVSwEDRk7E/x0k4IFV9U/eMwrYfKNw56shAqIO8EWqpCugrGZT3dGf +BJinOAqZXCE9EVIl+4uA1vcjWpFsBQweEAtxHibgt4ty6ESXAvprWVFzRwm4 +H3GIT+SrAl7ou2in9JuAk7kPs9ePKKCgeL9SAWnBPueavdwUrPCyunlpjICW +JYU2pwUpGO/Y7i48TsAl5fGeAkkKNp3cVBlFeo3/Wa4+dQr6w4WdDhMEjCR2 +XZjXpaCs+5/CStIVt1WV5YCCh6o0LktMEmAy8sjMyYGCsatF45+RXr5KqOOI +BwWPmFickJ4i+1XbLeCCPwWdqncq+pHedXQq6dVxCgqf2RgxSXp1lon8UDwF +3eyTtPT+/L8fz9/hS6UgdWd/zmHSRPenTasvUfDzp4T7xaQj5ta+Mymg4Pip +p0k9pI0pYd5ed8n9uA6Lr5wmgB+fjEc+oODCu23OhqTfeIvEXW6gYGENw8GT +dOapXRJVryg4Y8snEEvavbCkqL2dXK/GG5lHWun5jMFkHwWv0lPuVJP+74fZ +C5GfFJT/+Cf3HelygXTXDVMUnHqUbdNPOkyj76fNIgXn/71+OEp60zbNyH3L +qWg/MzY2Q3rZoQihRDEq7jrhPTRP+tWF59cKFahYcjPi1gLpdEJcu3ENFc+P +5Wr+I+3a5t3Qp01FB7W1xydIK07fdVhgUJEIikkbJP1Deu6rnDkVeXH50Q7S +ZUZbQum2VHy+Z7VKI+lQ94t8zq5UzPzHuH6bNPPkQHbIHir+C64YPkeaJ09L +PS2Qit5npgUOkm5+HFlTFk7+v3XQXwvSqQPNNq9jqfhT7PRDCmnnZdK9Q2ep +KHCmZMcYed6UNb5B/FlU9Mu1elJP+pslh0v1OhXjzrQIJJEu3bd4wbSEihdb +K9VtSRvdzak4WU/F3bOOc2/Jem/ueDM/0kRFg27lhBTS27iWWnh+oGJUXnXY +FtK77QO74BsVa89xZ1WQ/RR4/IZS+QgVyw9KPd9DOrygcz9thorhN2p2i5A2 +P64YFb2MhoKDpwY9yf58KVx7w1CAhmGGYu+XkLYtcGr6LURDR19+jTyyv91e +J4t4S9PwudQyxgcyD4eof24Yr6Ph0Gze5xVkXqaI1KbZDTQMrmKHXiDzFWG5 +bpitS8O7T5ecESMdf9hLX2kTDT8981BZOULmp7G5iduOhjdvr93ZTuaX6uI7 +XL2DhgOV9sNAuuDXosgRVxo2mb/hLSLzXiah5zawm4bKjh1v/P8j4In/teHG +UBq6xMh2PCbnxZY5uuiJ4zSM+1xdJUz6TWqrvm40DbOWzq5zJedLV9Xy6IIz +NDRPjHvydYDM54oQ0fhcGmr2RA+96yPne7mlgXkDDbm/rdjIS86vK5sH3Bae +0TDdPL1UoYvs767I6MqXNCxQ+f1Sm5x3mtzEC9U2Gj7Ky1jY3k7m2VHBne8H +DauI3J17yPl5YGYsummlIga0tcmMvCDredhP8ruoIor80vZ90ETmbai7hEda +EWs6VnadJOd34cfG9k1KpLP3GnOR8763LlPjnr4imq/9Yd5WT8D2eHrndU9F +lP4zX/WiguynhTsH6/coouH9El9ngsx/qBJPz15FpN3scfpC3jeJASvWS4co +4r0XWiJDdwl4ZN1zKiVREcP6I2Te3iLnu2jMhuNsRayKeiv732UCuJKnnmRX +KuKXRd0FxiXy/Hj2uVbWKOL7k6JmyeR9uH/KPn7sqSJKKbxfSs0k69Op8tG/ +WxGFA1/HyKWQ9+21pgRHHiUMWvuPui+KgNl1q3o1dyhh//3IxP2eBPy5Ihuj +46qEfUkR8S4e5P0jvFqF7qmEjTviTE3cyHpM0Pdt3quEukNbBQSdyfuvZvcf +10gljC9/Oh2+jcyb9X2hxEIllO4unatikv2zfxf0Tylhyro/1O+SZF5LSvMu +XlTG1Xw8wo4NHPhIK7lmdlkZg8bafdj1HIi4WHx18poyVn+6aiv4kAP3Y4py +7YuVkVJ+nquG/D7a6JKXLVSrjGu6Cj//K+XA2mUZqQlflMn5Ocy/MosDkp7H +o0M1VPBKdVR8+F4OjIlaeTk1qKChlW3ROz4OfD3r5RTMp4q/GNF1FTJs2DIa +tuWb/hq02Cu6Tl6xHH7t5j9SEaWG58TdnvEt3CG/76W4TzesxcNdi8deFZeA +6GvVlPJRdZSg1aQEBReDfGKZrb6+BnqNahpErLgJ2evoq8T8NfHQ9fCi3R0F +0CxrrDdxYT3Wjyb9vV2fD0byDakb2jfg/s1LX05l5IEQT36Id6wWrpnPKb7l +egUoMVTmTlVtFHku9TLqVA4sX+1eaf9cGzcFKFf7CV2E9SyZsjCPjejCHyLy +ipIOwb2ijVZcOohX97ezMRVGJ87u2JKtg08rBG9y1SaDxYZnl7Zo6qK2rGia +RuZpqJtg/Jt+o4uc8Ji1nvmnIFBjY/d7Xz3c+ngo6GNQNLBG9rTuXK6PTm7f +O5YMRYCZivTWlfn6KF9nqC6hGQpq0UnhDQYGmBbFvTmdHgy1jMJlNkYGSLj9 +5mlbGwy20/VpbUwD3PMpzVBJNhjCA6dKfxgbYGHjnsHev4ehyd3ri5CNARpL +xZX11R6GALq+lZsXuX606jyX6WEoHv8iN5logHPVyYsJzodA3Zdev7rbACU+ +5lbX4kE4r7Tt76lPBnj7QfRPF7WDMPnZR6+/1wCXHv8ayrvqINS5ni25OmCA +HluDwjI/HwB7289ZUsMGqLp0XCo26gAcY8QfWs5liAo8+dfPNeyHJpH3isOr +DdHi9l62xo594FsXEFdx2BAFWqwWztz2h5GDQ2FmIYZ4Z76fHpPhD+EKB/a3 +hxpisMvkmqST/pB0Ish+5rghMj3aR97Z+0O5USiNmWCI3C9qR7Xm/GCu8lRt +4yVD7MtVEdS294O0squTHxoNMfVl6++vAr5Qn9e6Z0yCjrY93U0NpT7QZ6Po +GSpNx+KAe80ql32Aa/bgzn+ydPypJb4l84wPmNjxbVtGo2NK4d+M634+8GyJ +kYGMOh0Nu1I8/BR94JXPteXGm+j4by+PV3aON3Sr7Lub6kfHM/aFB90zvGDy +1uL0hvt0lJ1S423y8YDvTuZ5Z6roaCBBi1Oy9IDOpecsB2rouEJt2iRN0wNq +vGRzLj6iY/RElDV7xh1ipfWM5l/QsZ0zzv3rvDusStx3ovkTHSuoftMWDW6g +4d/G5ctthMojG3KN9F1h9+qS5Ze2GmEfy2aHioszRDzdtU/V1gilBXlupKIz +pPqKvuTYGyH/SiVB0bXOUFt47OxLZyN8cMJ3zOGvE4irWgrPexvhTHjo9g9X +nOCZ6jdxr1Aj/HlFjV3yYweoq1FpqteM8KL5TLTvOUcYU0/X5/w2QssQ4egK +YXvofIVmYhNG2AUfZtcv2MGjwBGHkCkj7AisvP7glx2kcLYc1v9rhP4LBttn +X9iBuhFXaTUPAzs8Xv23Pt4OfLYcVGyUZGBmwMtQ7wVbaPW3EGxlMjDW8+S/ +DdPb4UHBvy9TiQyMO0bwLLBsQN80ZNoqmYG1jwV5g5Rs4N6XX4J55xgodylP +Z4bXBjiUXgOrNAbKxqU/t39nDaXZj85dvczAL1m17ap7rCHvbDzd4i4Dj79n +txmlWsGZEOEL2S0MFD7yM/firCXwiyUWDbcx0EJkMWqozxIS2Fy1Jp0MZA1a +ujk2WULcyNj3X58YOHqvs3JvliWcDGhlGn9noOu9HPUcfUsIds/58d8MA8tl +SvfPhVuA62ZlZFCYmOrEyPNeaQ7zrfxCjTQmPpjX+nF0ygzyfEc+WikzkYs/ +o+B6jxl8T6gKc1Vj4uqpMnW4awbBL7aXHdvIRL/t2ZBqawZJ205QHpgz8aih +o8OxnM1Q7dI2pxvExJaL1bJ9DFPw+K+6ufYwE8dtVPUeqpoCV0Re9uYQJgaf +nPIoEzEF88v7dR2PMbG0K/DCh0ET+NCz5MCRU0z8qX4kRjTTBIZ81n9kZzEx +IpHrYcCEMcgdPF21/hETZyw7psbrEFIW/fSSG5i4IGL56twdBO40c/bgEyYm +5xcI03MRhiqXFee9YOIp3qKiR8cQqrniskVbmNjLe/hSmh6Ca0Z02J9vTLwh +PftgvxdAds0xvboVLES9H7EMHxYIbtvJlhVi4ctKtTkXUxZE9xlqhq1iYVzW +OoEMFRYELJtR0ZJgYceXk9E+g0ww2B4qnk9h4Xk/Z8quQCa09wdPxGuTvw+F +ZFXHMEBC4AB7qzMLDa/rPfN8SIcC08iI3ztZqP5QLrLlKh02RqaYpruzkNfF +0i4gmg7bfpe3dXqz8EOl0YdJUzoktE/N7j7AQrXe8MeZrwxhJj/KJCKGhZ99 +SxY/DhhANyO9paiEhQ/wuG/BWn0IOFqQu+UuC0WyPOYXhfThz917vr/KWXh2 +WOxH+KQeiCp1TmtXsnDdNV7Thno9sOZXkH/4iIUaModHy5z1oLa1aE9LGwsv +/jwU3HtWF6yEHmiGdrKwsdlwdEmILnRavPgj/ZGFm6PPz6ObLkxW/0zc1cdC +VcM6bxF1XdC8rnXnvyEWlt78bjvTpAO13cahZ4dZGGFu7TNVrgNW4g6w4TcL +mw/qaK7M0QG/00ffh0yR59W1Mf7sXh2YfJRwSWqGhRJjDj0TdjoQ+zdrd/Vf +FlbICsYfNdKBVbrFGh7zLOxMk/IRUdaBqwerpxYXyf1dsnR9vkIH/gdGCTX8 + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07800284970531261}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07800284970531261}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VO8XB3BRSCL7PjOWJFFkHTPTOcgSKlvIkqUsbZSElCwhUZIllEpC +iWLmSlmiaJH27IpEpa9CtlCW3/39dV/v17yeO8/rOedznqvoE2Tvy83FxWW8 +hIvr/88/vS+eqCQXbGqoXSbcU2e2qfWq9DHjzlggH5yEcWVAibc+0p1p8HF7 +31GXcR0Itb3dwdOZD8bbC2oMxk1BZEQqbbaDA5ZuqqNc4w7wuXZb0GRHA/RE +ury1HtsN5ipDPWMdH8DH3iEjaeQIzHYYZP7u6IdrjXsn0gZOQaPpzYL3+RNw +/VcPVeJ0Bsh/rvruozEPHmnsj/MCV0H8gOdtPlMedCzeYWMUdAPStM1rtu3g +R/6UlD7FTzehK1vr0diqlWhSqrX4LLMEkgui3nLLiOAqgyr595QysNLdKyqh +LILVXXyHstaVAf8T+x1rNEWw76HzhKNhGcQNrP5obSyCDaGbo+/ZlcEJpVff +M/aKYHIY/ZBgXBkE5kkvqFaLoKmm/xXhwTKwy2VrWLuJohqrvl3ToRykMgbO +pF8RwwXau3VvlrJBet29uJkiMQy+HN5WsZwNsg0JUR7lYpiyixGSJcQGyu+1 +R9c0imG7+tsUW2k2rLY55FXzQwx1jj1RS1vHBp2l8/oDOuL4jVp7zN6ODdtD +JL9ubBbHy7rntJ/ksMF2xY/erBZxjJiVjFe7ygb7/KquuU/iWMiuqkvMZ4PT +O/e3z0bF0S6opZ9ZwgYPjRvVrhISaG8Y/PVILRv2f91wIdZLAoNpDqfke9lw +2nHLpg9/JFDxRqC2E4UDshVvZLmXSOK2/GJ6khIH7oo5TmuvkMQnnnK+Vaoc +aP+wq/wCVRLVdZ6qLN/AARW7ECU7S0k8dznbOBA40LD1Gu+7HEmMqgt8uc2T +A/PmU29eM6Uwtq7QK+AyB1KLIkrmzaWw5Yb3Wa5r5HperkRNOyl8VxPUmZ7P +AZunAsbnfKUwm+C8LynmwCVTGmGTIoXNXjlW1+9zwBCts15+lkJ68pd9+R84 +cIR+3fNFrDSuKBY6trCUAKs8oUnrs9LY4nLQsomPACW+E4lvMqXRIo3Wc06A +gHetTuyWW9IY2h3lLLiKgPWHBHl630jjpt07stplCfhRFFY0LiuDTx//jsnb +QED9ym9GR1VkMCll3XPVjQRcDLF/O60pg81azu23dAkwM9GcmUMZjM765JBH +JyC/p38Ln78MzpeGtLmbEuAuvm1YjpDBFCl3c0EnAnSO18RcrZXBQcEjTttd +CBDoV5NUfCaDbryZ+imuBFSV8YBqlwxaThEBi7sIkLSuStValMEezpO8Mn9y +/zEqumbWsrimd02TRTgBm0f/RgQOyGJFwruTrhcJOGaZof74lyyWrz/zVDib +gLvXNbvF/sgil9y4xOMcAqQdvehV/HJoy0drl7pCwK8HT6d51svhCTuTr5k3 +CEiPTQ3JCZfDsgthda1lBDR9XKvyK0YOk28XDlqxCZjTbWzZlCyHmGWq8pBD +gN/g1MavV+Qw/vy+7sx7BBjZuI2tb5TDFQk/baRrCOiXUA18slIe00Im+r2f +EiAVVK8gJUX69Pf0nGcE2DS5vN5Lk8eKv2a7Xz8noDIiWUNYRx4t4nW81jYT +kPT599BOF3lckRc4yHlD1sMw6VKptzza1nvnvXxLwOQFZavFffL4nkFE9r0j +YNdmp+KCSHn83hR9a+EDARuLa/xH8+VRcEtIq2AHAf7cO6RMSsn3qXA94+0k +INdt5FnGPXnkfrSmf440r5CiqlGTPP5dGnWlp5uA7uCEr3HD8viveVH/cC8B +MUw7b1lDBRQbvHT3y1cCLHddHTcwUcAo3rjUu98IEIr+eWqHjQIqPRpYCP1O +vr8xvijVSwEDRk7E/x0k4IFV9U/eMwrYfKNw56shAqIO8EWqpCugrGZT3dGf +BJinOAqZXCE9EVIl+4uA1vcjWpFsBQweEAtxHibgt4ty6ESXAvprWVFzRwm4 +H3GIT+SrAl7ou2in9JuAk7kPs9ePKKCgeL9SAWnBPueavdwUrPCyunlpjICW +JYU2pwUpGO/Y7i48TsAl5fGeAkkKNp3cVBlFeo3/Wa4+dQr6w4WdDhMEjCR2 +XZjXpaCs+5/CStIVt1WV5YCCh6o0LktMEmAy8sjMyYGCsatF45+RXr5KqOOI +BwWPmFickJ4i+1XbLeCCPwWdqncq+pHedXQq6dVxCgqf2RgxSXp1lon8UDwF +3eyTtPT+/L8fz9/hS6UgdWd/zmHSRPenTasvUfDzp4T7xaQj5ta+Mymg4Pip +p0k9pI0pYd5ed8n9uA6Lr5wmgB+fjEc+oODCu23OhqTfeIvEXW6gYGENw8GT +dOapXRJVryg4Y8snEEvavbCkqL2dXK/GG5lHWun5jMFkHwWv0lPuVJP+74fZ +C5GfFJT/+Cf3HelygXTXDVMUnHqUbdNPOkyj76fNIgXn/71+OEp60zbNyH3L +qWg/MzY2Q3rZoQihRDEq7jrhPTRP+tWF59cKFahYcjPi1gLpdEJcu3ENFc+P +5Wr+I+3a5t3Qp01FB7W1xydIK07fdVhgUJEIikkbJP1Deu6rnDkVeXH50Q7S +ZUZbQum2VHy+Z7VKI+lQ94t8zq5UzPzHuH6bNPPkQHbIHir+C64YPkeaJ09L +PS2Qit5npgUOkm5+HFlTFk7+v3XQXwvSqQPNNq9jqfhT7PRDCmnnZdK9Q2ep +KHCmZMcYed6UNb5B/FlU9Mu1elJP+pslh0v1OhXjzrQIJJEu3bd4wbSEihdb +K9VtSRvdzak4WU/F3bOOc2/Jem/ueDM/0kRFg27lhBTS27iWWnh+oGJUXnXY +FtK77QO74BsVa89xZ1WQ/RR4/IZS+QgVyw9KPd9DOrygcz9thorhN2p2i5A2 +P64YFb2MhoKDpwY9yf58KVx7w1CAhmGGYu+XkLYtcGr6LURDR19+jTyyv91e +J4t4S9PwudQyxgcyD4eof24Yr6Ph0Gze5xVkXqaI1KbZDTQMrmKHXiDzFWG5 +bpitS8O7T5ecESMdf9hLX2kTDT8981BZOULmp7G5iduOhjdvr93ZTuaX6uI7 +XL2DhgOV9sNAuuDXosgRVxo2mb/hLSLzXiah5zawm4bKjh1v/P8j4In/teHG +UBq6xMh2PCbnxZY5uuiJ4zSM+1xdJUz6TWqrvm40DbOWzq5zJedLV9Xy6IIz +NDRPjHvydYDM54oQ0fhcGmr2RA+96yPne7mlgXkDDbm/rdjIS86vK5sH3Bae +0TDdPL1UoYvs767I6MqXNCxQ+f1Sm5x3mtzEC9U2Gj7Ky1jY3k7m2VHBne8H +DauI3J17yPl5YGYsummlIga0tcmMvCDredhP8ruoIor80vZ90ETmbai7hEda +EWs6VnadJOd34cfG9k1KpLP3GnOR8763LlPjnr4imq/9Yd5WT8D2eHrndU9F +lP4zX/WiguynhTsH6/coouH9El9ngsx/qBJPz15FpN3scfpC3jeJASvWS4co +4r0XWiJDdwl4ZN1zKiVREcP6I2Te3iLnu2jMhuNsRayKeiv732UCuJKnnmRX +KuKXRd0FxiXy/Hj2uVbWKOL7k6JmyeR9uH/KPn7sqSJKKbxfSs0k69Op8tG/ +WxGFA1/HyKWQ9+21pgRHHiUMWvuPui+KgNl1q3o1dyhh//3IxP2eBPy5Ihuj +46qEfUkR8S4e5P0jvFqF7qmEjTviTE3cyHpM0Pdt3quEukNbBQSdyfuvZvcf +10gljC9/Oh2+jcyb9X2hxEIllO4unatikv2zfxf0Tylhyro/1O+SZF5LSvMu +XlTG1Xw8wo4NHPhIK7lmdlkZg8bafdj1HIi4WHx18poyVn+6aiv4kAP3Y4py +7YuVkVJ+nquG/D7a6JKXLVSrjGu6Cj//K+XA2mUZqQlflMn5Ocy/MosDkp7H +o0M1VPBKdVR8+F4OjIlaeTk1qKChlW3ROz4OfD3r5RTMp4q/GNF1FTJs2DIa +tuWb/hq02Cu6Tl6xHH7t5j9SEaWG58TdnvEt3CG/76W4TzesxcNdi8deFZeA +6GvVlPJRdZSg1aQEBReDfGKZrb6+BnqNahpErLgJ2evoq8T8NfHQ9fCi3R0F +0CxrrDdxYT3Wjyb9vV2fD0byDakb2jfg/s1LX05l5IEQT36Id6wWrpnPKb7l +egUoMVTmTlVtFHku9TLqVA4sX+1eaf9cGzcFKFf7CV2E9SyZsjCPjejCHyLy +ipIOwb2ijVZcOohX97ezMRVGJ87u2JKtg08rBG9y1SaDxYZnl7Zo6qK2rGia +RuZpqJtg/Jt+o4uc8Ji1nvmnIFBjY/d7Xz3c+ngo6GNQNLBG9rTuXK6PTm7f +O5YMRYCZivTWlfn6KF9nqC6hGQpq0UnhDQYGmBbFvTmdHgy1jMJlNkYGSLj9 +5mlbGwy20/VpbUwD3PMpzVBJNhjCA6dKfxgbYGHjnsHev4ehyd3ri5CNARpL +xZX11R6GALq+lZsXuX606jyX6WEoHv8iN5logHPVyYsJzodA3Zdev7rbACU+ +5lbX4kE4r7Tt76lPBnj7QfRPF7WDMPnZR6+/1wCXHv8ayrvqINS5ni25OmCA +HluDwjI/HwB7289ZUsMGqLp0XCo26gAcY8QfWs5liAo8+dfPNeyHJpH3isOr +DdHi9l62xo594FsXEFdx2BAFWqwWztz2h5GDQ2FmIYZ4Z76fHpPhD+EKB/a3 +hxpisMvkmqST/pB0Ish+5rghMj3aR97Z+0O5USiNmWCI3C9qR7Xm/GCu8lRt +4yVD7MtVEdS294O0squTHxoNMfVl6++vAr5Qn9e6Z0yCjrY93U0NpT7QZ6Po +GSpNx+KAe80ql32Aa/bgzn+ydPypJb4l84wPmNjxbVtGo2NK4d+M634+8GyJ +kYGMOh0Nu1I8/BR94JXPteXGm+j4by+PV3aON3Sr7Lub6kfHM/aFB90zvGDy +1uL0hvt0lJ1S423y8YDvTuZ5Z6roaCBBi1Oy9IDOpecsB2rouEJt2iRN0wNq +vGRzLj6iY/RElDV7xh1ipfWM5l/QsZ0zzv3rvDusStx3ovkTHSuoftMWDW6g +4d/G5ctthMojG3KN9F1h9+qS5Ze2GmEfy2aHioszRDzdtU/V1gilBXlupKIz +pPqKvuTYGyH/SiVB0bXOUFt47OxLZyN8cMJ3zOGvE4irWgrPexvhTHjo9g9X +nOCZ6jdxr1Aj/HlFjV3yYweoq1FpqteM8KL5TLTvOUcYU0/X5/w2QssQ4egK +YXvofIVmYhNG2AUfZtcv2MGjwBGHkCkj7AisvP7glx2kcLYc1v9rhP4LBttn +X9iBuhFXaTUPAzs8Xv23Pt4OfLYcVGyUZGBmwMtQ7wVbaPW3EGxlMjDW8+S/ +DdPb4UHBvy9TiQyMO0bwLLBsQN80ZNoqmYG1jwV5g5Rs4N6XX4J55xgodylP +Z4bXBjiUXgOrNAbKxqU/t39nDaXZj85dvczAL1m17ap7rCHvbDzd4i4Dj79n +txmlWsGZEOEL2S0MFD7yM/firCXwiyUWDbcx0EJkMWqozxIS2Fy1Jp0MZA1a +ujk2WULcyNj3X58YOHqvs3JvliWcDGhlGn9noOu9HPUcfUsIds/58d8MA8tl +SvfPhVuA62ZlZFCYmOrEyPNeaQ7zrfxCjTQmPpjX+nF0ygzyfEc+WikzkYs/ +o+B6jxl8T6gKc1Vj4uqpMnW4awbBL7aXHdvIRL/t2ZBqawZJ205QHpgz8aih +o8OxnM1Q7dI2pxvExJaL1bJ9DFPw+K+6ufYwE8dtVPUeqpoCV0Re9uYQJgaf +nPIoEzEF88v7dR2PMbG0K/DCh0ET+NCz5MCRU0z8qX4kRjTTBIZ81n9kZzEx +IpHrYcCEMcgdPF21/hETZyw7psbrEFIW/fSSG5i4IGL56twdBO40c/bgEyYm +5xcI03MRhiqXFee9YOIp3qKiR8cQqrniskVbmNjLe/hSmh6Ca0Z02J9vTLwh +PftgvxdAds0xvboVLES9H7EMHxYIbtvJlhVi4ctKtTkXUxZE9xlqhq1iYVzW +OoEMFRYELJtR0ZJgYceXk9E+g0ww2B4qnk9h4Xk/Z8quQCa09wdPxGuTvw+F +ZFXHMEBC4AB7qzMLDa/rPfN8SIcC08iI3ztZqP5QLrLlKh02RqaYpruzkNfF +0i4gmg7bfpe3dXqz8EOl0YdJUzoktE/N7j7AQrXe8MeZrwxhJj/KJCKGhZ99 +SxY/DhhANyO9paiEhQ/wuG/BWn0IOFqQu+UuC0WyPOYXhfThz917vr/KWXh2 +WOxH+KQeiCp1TmtXsnDdNV7Thno9sOZXkH/4iIUaModHy5z1oLa1aE9LGwsv +/jwU3HtWF6yEHmiGdrKwsdlwdEmILnRavPgj/ZGFm6PPz6ObLkxW/0zc1cdC +VcM6bxF1XdC8rnXnvyEWlt78bjvTpAO13cahZ4dZGGFu7TNVrgNW4g6w4TcL +mw/qaK7M0QG/00ffh0yR59W1Mf7sXh2YfJRwSWqGhRJjDj0TdjoQ+zdrd/Vf +FlbICsYfNdKBVbrFGh7zLOxMk/IRUdaBqwerpxYXyf1dsnR9vkIH/gdGCTX8 + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07800284970531261}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07800284970531261}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993832486075799*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"2f954841-6c9c-4143-8385-63ce4b0ac06f"] +}, Open ]], Cell[CellGroupData[{ @@ -8293,66 +15721,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[391]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], + "In[142]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 417, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437636167164`*^9}, +Cell[BoxData["2.5038072109183256`"], "Output", + CellChangeTimes->{3.991343769962549*^9, 3.993832554945249*^9}, CellLabel-> - "During evaluation of \ -In[391]:=",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 418, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763625717*^9}, - CellLabel-> - "During evaluation of \ -In[391]:=",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 391, 419, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763634718*^9}, - CellLabel-> - "During evaluation of \ -In[391]:=",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 391, 420, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763643717*^9}, - CellLabel-> - "During evaluation of \ -In[391]:=",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], - -Cell[BoxData["12.55365498945131`"], "Output", - CellChangeTimes->{3.991343769962549*^9}, - CellLabel-> - "Out[391]=",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] + "Out[142]=",ExpressionUUID->"f25f1694-f7b8-494c-8881-bdb04ff0e2b5"] }, Open ]], Cell[CellGroupData[{ @@ -8419,68 +15793,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499777649403`*^9, - 3.9918499820026073`*^9}},ExpressionUUID->"97b28b29-5d04-5c42-a0e8-\ -93b70f20e7f6"], + CellChangeTimes->{{3.9918499777649403`*^9, 3.9918499820026073`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 392, 421, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343769999645*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.619927965698743`*^-87\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 69, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.993832554986775*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], +In[143]:=",ExpressionUUID->"59f2c9a7-12ac-4cc9-9171-4d124a7aec4c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 392, 422, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700095463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.101849248339923`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 70, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9938325549924192`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], +In[143]:=",ExpressionUUID->"6e707896-e87e-4cc3-8606-cafc452868cc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 392, - 423, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343770018547*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2428940139660284`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1827538013769180618507747994894336000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 71, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.993832554997202*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], +In[143]:=",ExpressionUUID->"15e7707a-e786-4ea7-ad4d-692a3cabe3bc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 392, 424, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700265465`*^9}, +during this calculation.\"", 2, 143, 72, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9938325550022163`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], +In[143]:=",ExpressionUUID->"7e518b7f-4d63-44ae-b0f6-914a81e47874"], -Cell[BoxData["2.1234790234082306`"], "Output", - CellChangeTimes->{3.9913437771602173`*^9}, +Cell[BoxData["6.375536088084402`"], "Output", + CellChangeTimes->{3.9913437771602173`*^9, 3.993832564547277*^9}, CellLabel-> - "Out[392]=",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] + "Out[143]=",ExpressionUUID->"6570d8aa-5d64-4236-aa07-253fc62d54e2"] }, Open ]], Cell[CellGroupData[{ @@ -8501,8 +15885,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8547,68 +15930,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499862910366`*^9, - 3.991849989300226*^9}},ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-\ -cdce838d9efe"], + CellChangeTimes->{{3.9918499862910366`*^9, 3.991849989300226*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 393, 425, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437771982174`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.619927965698743`*^-87\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 73, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.993832564585874*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], +In[144]:=",ExpressionUUID->"7af0f848-51c7-479b-98c1-d0807ba1e66b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 393, 426, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772082157`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.101849248339923`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 74, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.993832564591061*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], +In[144]:=",ExpressionUUID->"df659011-399c-43ad-a99d-3aa917852d77"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 393, - 427, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134377721661*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2428940139660284`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1827538013769180618507747994894336000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 75, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.993832564595653*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], +In[144]:=",ExpressionUUID->"c2e71f10-563a-4c58-b2ce-00dc1c3c002d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 393, 428, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772256165`*^9}, +during this calculation.\"", 2, 144, 76, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.99383256460004*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], +In[144]:=",ExpressionUUID->"4df6e183-dc7c-4f63-93f8-a39577d6e110"], -Cell[BoxData["10.711562421053975`"], "Output", - CellChangeTimes->{3.991343783589731*^9}, +Cell[BoxData["25.859071095904575`"], "Output", + CellChangeTimes->{3.991343783589731*^9, 3.993832573624167*^9}, CellLabel-> - "Out[393]=",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] + "Out[144]=",ExpressionUUID->"d8ebd8fd-12a3-48cb-9da2-443d4441506e"] }, Open ]], Cell[CellGroupData[{ @@ -8629,8 +16022,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8675,68 +16067,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849992549782*^9, - 3.9918499952553864`*^9}},ExpressionUUID->"0794d062-69d5-0a45-936e-\ -533b19d33de6"], + CellChangeTimes->{{3.991849992549782*^9, 3.9918499952553864`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 394, 429, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836316223`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.619927965698743`*^-87\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 77, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.9938325736528187`*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], +In[145]:=",ExpressionUUID->"2c3a0a4c-68bc-4bfe-b28c-2d0a3b5fd649"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 394, 430, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836416245`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.101849248339923`*^-88\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 78, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.993832573658739*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], +In[145]:=",ExpressionUUID->"180376d3-bf67-4fd0-b2a5-b26210954527"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 394, - 431, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343783649622*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2428940139660284`*^-89\\\", \ +RowBox[{\\\"\ +128239344203077416983715805123996198713481050453062147645325860560290\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1827538013769180618507747994894336000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 79, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.993832573663375*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], +In[145]:=",ExpressionUUID->"71993753-cc0f-48a0-bbf0-901d77573d47"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 394, 432, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836576347`*^9}, +during this calculation.\"", 2, 145, 80, 25990558299389529475, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.993832573667707*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], +In[145]:=",ExpressionUUID->"ed74b6cc-511a-484f-9575-4d1167456d3e"], -Cell[BoxData["20.656774205279326`"], "Output", - CellChangeTimes->{3.9913437870822353`*^9}, +Cell[BoxData["2.013494229907962`"], "Output", + CellChangeTimes->{3.9913437870822353`*^9, 3.993832579854128*^9}, CellLabel-> - "Out[394]=",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] + "Out[145]=",ExpressionUUID->"7f342bc2-47af-4993-8b03-f9007f841008"] }, Open ]], Cell[CellGroupData[{ @@ -8745,20 +16147,21 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918500011025047`*^9, - 3.9918500053803673`*^9}},ExpressionUUID->"95c56266-e4d3-624e-89c1-\ -cedeeeb0247a"], - -Cell[BoxData["0.14275466609450368`"], "Output", - CellChangeTimes->{3.991343787117275*^9}, + CellChangeTimes->{{3.9918500011025047`*^9, 3.9918500053803673`*^9}}, CellLabel-> - "Out[395]=",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] + "In[146]:=",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], + +Cell[BoxData["0.883557979892278`"], "Output", + CellChangeTimes->{3.991343787117275*^9, 3.9938325798810987`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"cca53a85-f21c-44d0-8059-b1953affaeba"] }, Open ]] }, -WindowSize->{718.5, 729.75}, -WindowMargins->{{17.25, Automatic}, {Automatic, 24}}, +Evaluator->"kernel 4", +WindowSize->{714, 258}, +WindowMargins->{{-3, Automatic}, {3, Automatic}}, CellContext->Notebook, -FrontEndVersion->"14.1 for Microsoft Windows (64-bit) (July 16, 2024)", +FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"c5c6a337-d1c3-0f45-98d9-a2509510bd89" ] @@ -8773,368 +16176,632 @@ CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ -Cell[554, 20, 149, 4, 28, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], -Cell[706, 26, 156, 3, 28, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], -Cell[865, 31, 147, 4, 28, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], -Cell[1015, 37, 152, 3, 28, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[1192, 44, 1301, 43, 113, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[2496, 89, 176, 3, 32, "Output",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[576, 22, 449, 7, 29, "Input",ExpressionUUID->"7b253c96-53a2-4db3-872c-2141e825cd9f"], +Cell[1028, 31, 349, 5, 33, "Output",ExpressionUUID->"cf2efeb7-e25a-4a0b-8110-16760220c471"] }, Open ]], Cell[CellGroupData[{ -Cell[2709, 97, 908, 31, 56, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[3620, 130, 175, 3, 32, "Output",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[1414, 41, 197, 3, 29, "Input",ExpressionUUID->"12918b51-dfaa-47b5-ac18-49c9df18d6d8"], +Cell[1614, 46, 349, 5, 33, "Output",ExpressionUUID->"b2116fcf-b9e2-46d8-a0f8-73adb2c0eb85"] }, Open ]], Cell[CellGroupData[{ -Cell[3832, 138, 887, 30, 56, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[4722, 170, 177, 3, 32, "Output",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[2000, 56, 221, 4, 29, "Input",ExpressionUUID->"675d893f-e17a-475d-a12a-d44d0722b850"], +Cell[2224, 62, 376, 6, 33, "Output",ExpressionUUID->"c0cbc0d0-edb9-4432-8f1b-747efc4a0680"] }, Open ]], Cell[CellGroupData[{ -Cell[4936, 178, 558, 19, 52, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[5497, 199, 172, 3, 32, "Output",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[2637, 73, 175, 3, 29, "Input",ExpressionUUID->"fb2c206f-fe2e-46fe-82ec-9f2b8c9091a7"], +Cell[2815, 78, 348, 5, 33, "Output",ExpressionUUID->"0059b94d-56bd-4663-90c9-c9809292e8ce"] }, Open ]], Cell[CellGroupData[{ -Cell[5706, 207, 651, 22, 52, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[6360, 231, 170, 3, 32, "Output",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[3200, 88, 257, 7, 42, "Input",ExpressionUUID->"6914e16d-2b39-4591-8244-627b458bbdb0"], +Cell[3460, 97, 364, 5, 33, "Output",ExpressionUUID->"6c2780af-d50c-48cb-90eb-7903a9eba19c"] }, Open ]], Cell[CellGroupData[{ -Cell[6567, 239, 170, 5, 56, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[6740, 246, 173, 3, 32, "Output",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[3861, 107, 131, 2, 29, "Input",ExpressionUUID->"07dfb44e-d279-4897-9a13-598d7be7384e"], +Cell[3995, 111, 349, 5, 33, "Output",ExpressionUUID->"f3ca1d20-5fa1-4ddf-b0be-330e4ea89ea2"] }, Open ]], Cell[CellGroupData[{ -Cell[6950, 254, 170, 5, 55, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[7123, 261, 169, 3, 70, "Output",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[4381, 121, 276, 6, 29, "Input",ExpressionUUID->"2262019a-6890-43b9-8240-7852bbef306a"], +Cell[4660, 129, 362, 5, 33, "Output",ExpressionUUID->"0850af31-60c7-4cfb-ad60-98eaa0e5fad7"] }, Open ]], Cell[CellGroupData[{ -Cell[7329, 269, 181, 5, 70, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[7513, 276, 173, 3, 70, "Output",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[5059, 139, 257, 7, 29, "Input",ExpressionUUID->"22173aa9-71c8-4e01-b15a-90be71438024"], +Cell[5319, 148, 359, 5, 33, "Output",ExpressionUUID->"3b094d15-3bfb-46e9-b263-1aef66364242"] }, Open ]], Cell[CellGroupData[{ -Cell[7723, 284, 181, 5, 70, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[7907, 291, 170, 3, 70, "Output",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[5715, 158, 223, 4, 29, "Input",ExpressionUUID->"a6015a58-42c2-45b6-836d-28a802b37b44"], +Cell[5941, 164, 327, 5, 33, "Output",ExpressionUUID->"1c5cbbfd-a277-4961-88ec-4bc7d332bf8a"] }, Open ]], Cell[CellGroupData[{ -Cell[8114, 299, 6055, 185, 70, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[14172, 486, 174, 3, 70, "Output",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[6305, 174, 228, 4, 29, "Input",ExpressionUUID->"d45b90f9-604b-44c2-8168-ba016d65c24a"], +Cell[6536, 180, 327, 5, 33, "Output",ExpressionUUID->"60a97c8b-760a-4bfe-897b-16b38174eb97"] }, Open ]], Cell[CellGroupData[{ -Cell[14383, 494, 368, 9, 70, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[14754, 505, 170, 3, 70, "Output",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[6900, 190, 129, 2, 29, "Input",ExpressionUUID->"89f11eb1-a521-4168-886c-b6bdd10d4fca"], +Cell[7032, 194, 343, 5, 33, "Output",ExpressionUUID->"06489bfc-b999-4978-9152-5d5ec53ec37f"] }, Open ]], Cell[CellGroupData[{ -Cell[14961, 513, 6122, 187, 70, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[21086, 702, 174, 3, 70, "Output",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[7412, 204, 129, 2, 29, "Input",ExpressionUUID->"b38a18fd-a479-44cd-971f-112870dd2c33"], +Cell[7544, 208, 342, 5, 33, "Output",ExpressionUUID->"bee07433-5b66-43a4-8fc4-e8548e7a9c72"] }, Open ]], Cell[CellGroupData[{ -Cell[21297, 710, 368, 9, 70, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[21668, 721, 170, 3, 70, "Output",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[7923, 218, 557, 19, 79, "Input",ExpressionUUID->"c817f971-3b65-455e-adce-164479471999"], +Cell[8483, 239, 366, 5, 33, "Output",ExpressionUUID->"73d729d5-3bac-43ac-a39b-4c8364f932b8"] }, Open ]], Cell[CellGroupData[{ -Cell[21875, 729, 2663, 88, 70, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[24541, 819, 171, 3, 70, "Output",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[8886, 249, 557, 19, 79, "Input",ExpressionUUID->"40318108-7e6c-4c34-b692-94bf023cc0c1"], +Cell[9446, 270, 368, 5, 33, "Output",ExpressionUUID->"db5b4614-e0e9-48ed-b7f5-8fada89333d3"] }, Open ]], Cell[CellGroupData[{ -Cell[24749, 827, 2603, 85, 70, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[27355, 914, 171, 3, 70, "Output",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[9851, 280, 1492, 48, 79, "Input",ExpressionUUID->"dc0603ea-7510-412b-b034-8ea37be3d92e"], +Cell[11346, 330, 360, 5, 33, "Output",ExpressionUUID->"7be63c4f-17b2-424c-804b-602166a5d82d"] }, Open ]], Cell[CellGroupData[{ -Cell[27563, 922, 3712, 118, 70, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[31278, 1042, 171, 3, 70, "Output",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] -}, Open ]], -Cell[31464, 1048, 138, 3, 70, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], -Cell[CellGroupData[{ -Cell[31627, 1055, 2054, 59, 70, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], -Cell[33684, 1116, 566, 12, 70, "Message",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], -Cell[34253, 1130, 569, 12, 70, "Message",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], -Cell[34825, 1144, 570, 12, 70, "Message",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], -Cell[35398, 1158, 458, 10, 70, "Message",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], -Cell[35859, 1170, 172, 3, 70, "Output",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[11743, 340, 1331, 44, 79, "Input",ExpressionUUID->"2a67956b-52d6-4a7f-abdf-9ff3c12ed5bb"], +Cell[13077, 386, 377, 6, 33, "Output",ExpressionUUID->"95a16525-adef-4994-a290-99c590f4a1b7"] }, Open ]], Cell[CellGroupData[{ -Cell[36068, 1178, 2052, 59, 70, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], -Cell[38123, 1239, 564, 12, 70, "Message",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], -Cell[38690, 1253, 567, 12, 70, "Message",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], -Cell[39260, 1267, 570, 12, 70, "Message",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], -Cell[39833, 1281, 455, 10, 70, "Message",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], -Cell[40291, 1293, 169, 3, 70, "Output",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[13491, 397, 1331, 44, 79, "Input",ExpressionUUID->"af47e721-099b-4f0f-bf06-b19f56791ead"], +Cell[14825, 443, 386, 6, 33, "Output",ExpressionUUID->"cbf394c4-8682-4767-b7db-4726750fda87"] }, Open ]], Cell[CellGroupData[{ -Cell[40497, 1301, 1936, 53, 70, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], -Cell[42436, 1356, 19983, 375, 70, "Output",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] +Cell[15248, 454, 1492, 48, 79, "Input",ExpressionUUID->"3deb6f11-4f00-4d28-a134-8cf512743be3"], +Cell[16743, 504, 357, 5, 33, "Output",ExpressionUUID->"9d28df34-e3fd-440f-a89b-00d00173b4f0"] }, Open ]], Cell[CellGroupData[{ -Cell[62456, 1736, 2092, 60, 70, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], -Cell[64551, 1798, 501, 11, 70, "Message",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], -Cell[65055, 1811, 503, 11, 70, "Message",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], -Cell[65561, 1824, 506, 11, 70, "Message",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], -Cell[66070, 1837, 456, 10, 70, "Message",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], -Cell[66529, 1849, 41581, 727, 70, "Output",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] -}, Open ]], -Cell[108125, 2579, 232, 6, 70, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], -Cell[108360, 2587, 209, 5, 70, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], -Cell[CellGroupData[{ -Cell[108594, 2596, 217, 7, 70, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[108814, 2605, 170, 3, 70, "Output",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[17137, 514, 131, 2, 29, "Input",ExpressionUUID->"38508ee8-e6a4-4d7d-a680-522e91eb1bed"], +Cell[17271, 518, 349, 5, 33, "Output",ExpressionUUID->"9dae7ce1-9146-4513-9e06-2b1ba1205917"] }, Open ]], Cell[CellGroupData[{ -Cell[109021, 2613, 1814, 53, 70, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], -Cell[110838, 2668, 506, 11, 70, "Message",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], -Cell[111347, 2681, 512, 11, 70, "Message",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], -Cell[111862, 2694, 509, 11, 70, "Message",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], -Cell[112374, 2707, 456, 10, 70, "Message",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], -Cell[112833, 2719, 22336, 412, 70, "Output",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] +Cell[17657, 528, 133, 2, 29, "Input",ExpressionUUID->"f253a04d-d10e-4d20-b69c-8996b57f1826"], +Cell[17793, 532, 346, 5, 33, "Output",ExpressionUUID->"a5991de3-b7e4-4e21-a567-048f41f7f70c"] }, Open ]], Cell[CellGroupData[{ -Cell[135206, 3136, 1616, 48, 70, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], -Cell[136825, 3186, 584, 12, 70, "Message",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], -Cell[137412, 3200, 588, 12, 70, "Message",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], -Cell[138003, 3214, 591, 12, 70, "Message",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], -Cell[138597, 3228, 456, 10, 70, "Message",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], -Cell[139056, 3240, 173, 3, 70, "Output",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] +Cell[18176, 542, 134, 2, 29, "Input",ExpressionUUID->"345c9228-9333-4ab3-8591-651c41219ee9"], +Cell[18313, 546, 352, 5, 33, "Output",ExpressionUUID->"9fab72f5-3092-4c8c-9d04-41c2c8e6f0d7"] }, Open ]], Cell[CellGroupData[{ -Cell[139266, 3248, 2274, 65, 70, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], -Cell[141543, 3315, 566, 12, 70, "Message",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], -Cell[142112, 3329, 569, 12, 70, "Message",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], -Cell[142684, 3343, 572, 12, 70, "Message",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], -Cell[143259, 3357, 458, 10, 70, "Message",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], -Cell[143720, 3369, 171, 3, 70, "Output",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] +Cell[18702, 556, 219, 4, 29, "Input",ExpressionUUID->"1d7a3fc3-b860-4926-849a-3351ab6e1e7d"], +Cell[18924, 562, 363, 6, 33, "Output",ExpressionUUID->"c722ef05-d656-4907-a066-6884ff506078"] }, Open ]], Cell[CellGroupData[{ -Cell[143928, 3377, 2221, 64, 70, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], -Cell[146152, 3443, 564, 12, 70, "Message",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], -Cell[146719, 3457, 567, 12, 70, "Message",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], -Cell[147289, 3471, 570, 12, 70, "Message",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], -Cell[147862, 3485, 456, 10, 70, "Message",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], -Cell[148321, 3497, 173, 3, 70, "Output",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] +Cell[19324, 573, 134, 2, 29, "Input",ExpressionUUID->"9fee44ab-7b84-4c8e-b0a6-706860d00132"], +Cell[19461, 577, 350, 5, 33, "Output",ExpressionUUID->"e376a4e1-50bc-4f64-a848-3247a444d9e7"] }, Open ]], Cell[CellGroupData[{ -Cell[148531, 3505, 2223, 64, 70, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], -Cell[150757, 3571, 566, 12, 70, "Message",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], -Cell[151326, 3585, 569, 12, 70, "Message",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], -Cell[151898, 3599, 570, 12, 70, "Message",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], -Cell[152471, 3613, 458, 10, 70, "Message",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], -Cell[152932, 3625, 170, 3, 70, "Output",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] +Cell[19848, 587, 327, 5, 29, "Input",ExpressionUUID->"8693de9a-b36a-4e06-9f84-e16fe245e5be"], +Cell[20178, 594, 346, 5, 33, "Output",ExpressionUUID->"ae1c2dcc-a889-495f-8d29-ec43f4ca9d8b"] }, Open ]], Cell[CellGroupData[{ -Cell[153139, 3633, 213, 6, 70, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], -Cell[153355, 3641, 171, 3, 70, "Output",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] -}, Open ]], -Cell[153541, 3647, 244, 5, 70, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], -Cell[CellGroupData[{ -Cell[153810, 3656, 558, 19, 70, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[154371, 3677, 173, 3, 70, "Output",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] +Cell[20561, 604, 296, 5, 29, "Input",ExpressionUUID->"d60d8349-98d6-4285-8b6d-4f581afc2829"], +Cell[20860, 611, 345, 5, 33, "Output",ExpressionUUID->"b8a17cd5-c84b-4b36-b936-ecee44240444"] }, Open ]], Cell[CellGroupData[{ -Cell[154581, 3685, 170, 5, 70, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[154754, 3692, 171, 3, 70, "Output",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] +Cell[21242, 621, 219, 4, 29, "Input",ExpressionUUID->"d2244f39-a325-4e43-a829-b0e74043662d"], +Cell[21464, 627, 342, 5, 33, "Output",ExpressionUUID->"60ebe953-84f1-4a1f-b642-bcc2d0a4a9c1"] }, Open ]], Cell[CellGroupData[{ -Cell[154962, 3700, 181, 5, 70, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[155146, 3707, 173, 3, 70, "Output",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] +Cell[21843, 637, 350, 10, 42, "Input",ExpressionUUID->"8bf107ad-b39e-49f0-941a-efc14bc1b45d"], +Cell[22196, 649, 371, 5, 33, "Output",ExpressionUUID->"a32296b5-0f08-4898-9bb9-48d8cbd4332a"] }, Open ]], Cell[CellGroupData[{ -Cell[155356, 3715, 6055, 185, 70, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[161414, 3902, 175, 3, 70, "Output",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] +Cell[22604, 659, 350, 10, 42, "Input",ExpressionUUID->"d44789c9-2529-4c7e-aec1-4f66d54d6a58"], +Cell[22957, 671, 386, 6, 33, "Output",ExpressionUUID->"4b14d6c9-3202-459b-a0c4-76c9ba8548f0"] }, Open ]], Cell[CellGroupData[{ -Cell[161626, 3910, 368, 9, 70, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[161997, 3921, 172, 3, 70, "Output",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] +Cell[23380, 682, 994, 26, 81, "Input",ExpressionUUID->"38878574-ec2d-4548-b7b1-39482c329a6d"], +Cell[24377, 710, 361, 5, 33, "Output",ExpressionUUID->"b82266a4-b9d0-40aa-a189-9378485da9fd"] }, Open ]], Cell[CellGroupData[{ -Cell[162206, 3929, 6122, 187, 70, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[168331, 4118, 173, 3, 70, "Output",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] +Cell[24775, 720, 199, 3, 29, "Input",ExpressionUUID->"18bfdc8b-e7a3-44cf-9e4d-cf45f20352e5"], +Cell[24977, 725, 344, 5, 33, "Output",ExpressionUUID->"badedc03-6a1c-4a0b-8aa6-1d0278c297dc"] }, Open ]], Cell[CellGroupData[{ -Cell[168541, 4126, 368, 9, 70, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[168912, 4137, 170, 3, 70, "Output",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] +Cell[25358, 735, 325, 5, 29, "Input",ExpressionUUID->"5fef2d1b-f385-4989-b573-880dcb87e157"], +Cell[25686, 742, 325, 5, 33, "Output",ExpressionUUID->"017946aa-0e93-488d-885a-00b5aaa13dea"] +}, Open ]], +Cell[26026, 750, 173, 2, 70, "Input",ExpressionUUID->"f2f317d7-8ee1-4810-8fde-07cb8a32b563"], +Cell[CellGroupData[{ +Cell[26224, 756, 327, 5, 29, "Input",ExpressionUUID->"bd4634e9-565a-4b09-9cd1-4e9bf17131d9"], +Cell[26554, 763, 319, 5, 33, "Output",ExpressionUUID->"44fbe620-70c4-490e-8388-6ebd1759a99c"] +}, Open ]], +Cell[26888, 771, 173, 2, 70, "Input",ExpressionUUID->"14d91c8f-f927-4aca-b6dc-a15260a5bcd8"], +Cell[CellGroupData[{ +Cell[27086, 777, 332, 5, 29, "Input",ExpressionUUID->"2f161871-a44e-48fc-aa84-c4efc56cfdc5"], +Cell[27421, 784, 327, 5, 33, "Output",ExpressionUUID->"e31f28ab-1603-4b06-838d-a805433c7797"] +}, Open ]], +Cell[27763, 792, 173, 2, 70, "Input",ExpressionUUID->"5b6e8eac-438f-42a8-bb13-a3fde98e051c"], +Cell[CellGroupData[{ +Cell[27961, 798, 351, 5, 29, "Input",ExpressionUUID->"d77bf623-3fea-4225-905d-a358fd605430"], +Cell[28315, 805, 330, 5, 33, "Output",ExpressionUUID->"8260b06e-9547-4d82-a84c-b21dc2fc0019"] +}, Open ]], +Cell[28660, 813, 171, 2, 70, "Input",ExpressionUUID->"cf622c36-a850-4534-a417-885bedfc3339"], +Cell[CellGroupData[{ +Cell[28856, 819, 298, 5, 29, "Input",ExpressionUUID->"177bb5d2-54f3-4c69-8b0b-3c354632ae09"], +Cell[29157, 826, 326, 5, 33, "Output",ExpressionUUID->"32366072-d2a6-4333-a8f9-b8ca629a9e4e"] +}, Open ]], +Cell[29498, 834, 171, 2, 70, "Input",ExpressionUUID->"849ef8eb-7a7b-471f-a310-ad797e88dc16"], +Cell[CellGroupData[{ +Cell[29694, 840, 303, 5, 29, "Input",ExpressionUUID->"395ca36e-7075-4917-ba39-3522a45686bd"], +Cell[30000, 847, 329, 5, 33, "Output",ExpressionUUID->"27586805-c436-46ee-b928-bdef0ccfbdab"] +}, Open ]], +Cell[30344, 855, 173, 2, 70, "Input",ExpressionUUID->"c4807ff7-08a7-404a-99a9-15dd6057f1c2"], +Cell[CellGroupData[{ +Cell[30542, 861, 306, 5, 29, "Input",ExpressionUUID->"e8829cd8-dddf-407c-a332-142be067d633"], +Cell[30851, 868, 328, 5, 33, "Output",ExpressionUUID->"4188db86-c305-44b6-8c51-5e2840327fc7"] +}, Open ]], +Cell[31194, 876, 172, 2, 70, "Input",ExpressionUUID->"9166c9b9-770d-48e3-b073-394dc46d9435"], +Cell[CellGroupData[{ +Cell[31391, 882, 275, 4, 29, "Input",ExpressionUUID->"fe52da68-2188-44b9-800f-6cc3abbddd87"], +Cell[31669, 888, 325, 5, 33, "Output",ExpressionUUID->"53713c86-0d99-46ee-bda8-2497edb199cc"] +}, Open ]], +Cell[32009, 896, 175, 2, 70, "Input",ExpressionUUID->"43801940-2d6e-4b74-804f-106c6f26a15f"], +Cell[CellGroupData[{ +Cell[32209, 902, 19809, 485, 1844, "Input",ExpressionUUID->"429ff42a-52cc-4985-96cb-a12607b181c3"], +Cell[52021, 1389, 359, 5, 33, "Output",ExpressionUUID->"9142deec-0693-4b38-ade9-4916493647d2"] }, Open ]], Cell[CellGroupData[{ -Cell[169119, 4145, 2663, 88, 70, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[171785, 4235, 171, 3, 70, "Output",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] +Cell[52417, 1399, 19748, 489, 1981, "Input",ExpressionUUID->"b8312696-f3c8-43c7-a47e-762c2c8b1f38"], +Cell[72168, 1890, 363, 5, 33, "Output",ExpressionUUID->"f46ee19b-870b-4b21-a885-06ad98531168"] }, Open ]], Cell[CellGroupData[{ -Cell[171993, 4243, 2603, 85, 70, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[174599, 4330, 171, 3, 70, "Output",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] +Cell[72568, 1900, 19748, 483, 1970, "Input",ExpressionUUID->"a2572af3-e8e7-4630-964c-d6b1657d3462"], +Cell[92319, 2385, 376, 6, 33, "Output",ExpressionUUID->"ce024aae-28ae-4e13-ab6e-b3ac53c29230"] }, Open ]], Cell[CellGroupData[{ -Cell[174807, 4338, 3712, 118, 70, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[178522, 4458, 170, 3, 70, "Output",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] +Cell[92732, 2396, 22534, 553, 2217, "Input",ExpressionUUID->"2f81a41d-aedb-41b1-b0ca-ed792899709e"], +Cell[115269, 2951, 379, 6, 33, "Output",ExpressionUUID->"7ff2bf78-1947-402b-8a2f-ea1ed0460443"] }, Open ]], Cell[CellGroupData[{ -Cell[178729, 4466, 2052, 59, 70, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], -Cell[180784, 4527, 573, 12, 70, "Message",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], -Cell[181360, 4541, 577, 12, 70, "Message",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], -Cell[181940, 4555, 580, 12, 70, "Message",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], -Cell[182523, 4569, 456, 10, 70, "Message",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], -Cell[182982, 4581, 170, 3, 70, "Output",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] +Cell[115685, 2962, 22535, 553, 2254, "Input",ExpressionUUID->"d05218a0-c9ce-477f-9c3a-a5bd38334f82"], +Cell[138223, 3517, 380, 6, 33, "Output",ExpressionUUID->"46ee34f4-1c98-4f60-932c-4918611c7c5c"] }, Open ]], Cell[CellGroupData[{ -Cell[183189, 4589, 2054, 59, 70, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], -Cell[185246, 4650, 573, 12, 70, "Message",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], -Cell[185822, 4664, 577, 12, 70, "Message",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], -Cell[186402, 4678, 582, 12, 70, "Message",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], -Cell[186987, 4692, 456, 10, 70, "Message",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], -Cell[187446, 4704, 170, 3, 70, "Output",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] +Cell[138640, 3528, 25491, 626, 2501, "Input",ExpressionUUID->"663d75b3-2612-436a-b0c7-9526b2a06958"], +Cell[164134, 4156, 380, 6, 33, "Output",ExpressionUUID->"ed17fae9-7fc7-4a4c-bb29-bbbf2024c2a4"] }, Open ]], Cell[CellGroupData[{ -Cell[187653, 4712, 2028, 55, 70, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], -Cell[189684, 4769, 20422, 382, 70, "Output",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] +Cell[164551, 4167, 130, 2, 29, "Input",ExpressionUUID->"35173737-8133-43ce-b5b0-98b23d15b560"], +Cell[164684, 4171, 344, 5, 33, "Output",ExpressionUUID->"bd9b3ae1-a222-40e8-ba61-e5f624b68e50"] }, Open ]], Cell[CellGroupData[{ -Cell[210143, 5156, 2120, 60, 70, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], -Cell[212266, 5218, 502, 11, 70, "Message",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], -Cell[212771, 5231, 506, 11, 70, "Message",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], -Cell[213280, 5244, 505, 11, 70, "Message",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], -Cell[213788, 5257, 458, 10, 70, "Message",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], -Cell[214249, 5269, 22288, 412, 70, "Output",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] -}, Open ]], -Cell[236552, 5684, 209, 5, 70, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], -Cell[CellGroupData[{ -Cell[236786, 5693, 1616, 48, 70, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], -Cell[238405, 5743, 595, 12, 70, "Message",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], -Cell[239003, 5757, 595, 12, 70, "Message",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], -Cell[239601, 5771, 599, 12, 70, "Message",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], -Cell[240203, 5785, 456, 10, 70, "Message",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], -Cell[240662, 5797, 171, 3, 70, "Output",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] +Cell[165065, 4181, 130, 2, 29, "Input",ExpressionUUID->"9c5883ab-0183-4013-a340-45f66da41410"], +Cell[165198, 4185, 347, 5, 33, "Output",ExpressionUUID->"d6a79f70-a3fa-47ba-91e3-8306240c241d"] }, Open ]], Cell[CellGroupData[{ -Cell[240870, 5805, 2248, 64, 70, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], -Cell[243121, 5871, 575, 12, 70, "Message",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], -Cell[243699, 5885, 577, 12, 70, "Message",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], -Cell[244279, 5899, 582, 12, 70, "Message",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], -Cell[244864, 5913, 458, 10, 70, "Message",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], -Cell[245325, 5925, 172, 3, 70, "Output",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] +Cell[165582, 4195, 1144, 39, 107, "Input",ExpressionUUID->"cc111555-cbfb-4ad0-b36d-4856ede6924d"], +Cell[166729, 4236, 359, 5, 33, "Output",ExpressionUUID->"0b8d4556-6bab-4e61-9ff4-90c4d4894a06"] }, Open ]], Cell[CellGroupData[{ -Cell[245534, 5933, 2215, 63, 70, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], -Cell[247752, 5998, 575, 12, 70, "Message",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], -Cell[248330, 6012, 577, 12, 70, "Message",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], -Cell[248910, 6026, 582, 12, 70, "Message",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], -Cell[249495, 6040, 458, 10, 70, "Message",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], -Cell[249956, 6052, 170, 3, 70, "Output",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] +Cell[167125, 4246, 1041, 35, 107, "Input",ExpressionUUID->"73023971-71f2-4720-a131-529949d505eb"], +Cell[168169, 4283, 377, 6, 33, "Output",ExpressionUUID->"eb75e873-a781-4b67-8751-14b18d95d635"] }, Open ]], Cell[CellGroupData[{ -Cell[250163, 6060, 2223, 64, 70, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], -Cell[252389, 6126, 573, 12, 70, "Message",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], -Cell[252965, 6140, 577, 12, 70, "Message",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], -Cell[253545, 6154, 580, 12, 70, "Message",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], -Cell[254128, 6168, 456, 10, 70, "Message",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], -Cell[254587, 6180, 173, 3, 70, "Output",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] +Cell[168583, 4294, 1144, 39, 107, "Input",ExpressionUUID->"52078ef1-7651-4d68-9e86-9645fe40a354"], +Cell[169730, 4335, 361, 5, 33, "Output",ExpressionUUID->"0b08f008-63ff-4882-8015-d1cd839f6096"] }, Open ]], Cell[CellGroupData[{ -Cell[254797, 6188, 213, 6, 70, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], -Cell[255013, 6196, 173, 3, 70, "Output",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] -}, Open ]], -Cell[255201, 6202, 247, 5, 70, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], -Cell[CellGroupData[{ -Cell[255473, 6211, 558, 19, 70, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[256034, 6232, 173, 3, 70, "Output",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] +Cell[170128, 4345, 108, 1, 29, "Input",ExpressionUUID->"68a91f96-5c1e-481e-a7fd-076dfbcc21bb"], +Cell[170239, 4348, 366, 5, 33, "Output",ExpressionUUID->"cc5b54ea-5751-4f6e-9f27-84023aaa2221"] }, Open ]], Cell[CellGroupData[{ -Cell[256244, 6240, 170, 5, 70, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[256417, 6247, 173, 3, 70, "Output",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] +Cell[170642, 4358, 108, 1, 29, "Input",ExpressionUUID->"98c982e6-f3ff-4627-946a-2c554602cac8"], +Cell[170753, 4361, 381, 6, 33, "Output",ExpressionUUID->"c5012993-b9f8-472e-b2e5-6a2950ef2c6b"] }, Open ]], Cell[CellGroupData[{ -Cell[256627, 6255, 181, 5, 70, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[256811, 6262, 173, 3, 70, "Output",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] +Cell[171171, 4372, 108, 1, 29, "Input",ExpressionUUID->"3fbda7a7-9cb4-4907-8d8d-5bf5f117a5c2"], +Cell[171282, 4375, 382, 6, 33, "Output",ExpressionUUID->"c3c6a5a0-6d92-49e3-bfe2-3c453fcdb431"] }, Open ]], Cell[CellGroupData[{ -Cell[257021, 6270, 6055, 185, 70, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[263079, 6457, 172, 3, 70, "Output",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] +Cell[171701, 4386, 108, 1, 29, "Input",ExpressionUUID->"b9849504-41b9-49d3-9d41-9d3d421a0b2c"], +Cell[171812, 4389, 357, 5, 33, "Output",ExpressionUUID->"2ba09ba1-a773-41e8-b647-d41db91b05e3"] }, Open ]], Cell[CellGroupData[{ -Cell[263288, 6465, 368, 9, 70, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[263659, 6476, 172, 3, 70, "Output",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] +Cell[172206, 4399, 107, 1, 29, "Input",ExpressionUUID->"406314f0-f0e4-408b-9a96-ef8ed8a14423"], +Cell[172316, 4402, 362, 5, 33, "Output",ExpressionUUID->"30a7c76a-5f01-4773-9c41-9c68c6c3cb22"] }, Open ]], Cell[CellGroupData[{ -Cell[263868, 6484, 6122, 187, 70, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[269993, 6673, 173, 3, 70, "Output",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] +Cell[172715, 4412, 107, 1, 29, "Input",ExpressionUUID->"cbd50e41-5832-4e27-8b79-28fde9697ad1"], +Cell[172825, 4415, 367, 5, 33, "Output",ExpressionUUID->"35cd5355-716a-4131-bd0d-d53ef91d55a8"] }, Open ]], Cell[CellGroupData[{ -Cell[270203, 6681, 368, 9, 70, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[270574, 6692, 170, 3, 70, "Output",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] +Cell[173229, 4425, 497, 16, 55, "Input",ExpressionUUID->"723002c5-10f2-423d-8da2-ca1d63bbfbfe"], +Cell[173729, 4443, 381, 6, 33, "Output",ExpressionUUID->"acb5c522-087e-46c0-955b-9307c2189077"] }, Open ]], Cell[CellGroupData[{ -Cell[270781, 6700, 2663, 88, 70, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[273447, 6790, 171, 3, 70, "Output",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] +Cell[174147, 4454, 497, 16, 55, "Input",ExpressionUUID->"338cd336-fc9a-4a08-9dae-1ff3bcaa98b4"], +Cell[174647, 4472, 373, 6, 33, "Output",ExpressionUUID->"5b7d6742-76ea-4128-bb6d-2ba6053ab9c2"] }, Open ]], Cell[CellGroupData[{ -Cell[273655, 6798, 2603, 85, 70, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[276261, 6885, 173, 3, 70, "Output",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] +Cell[175057, 4483, 1788, 60, 183, "Input",ExpressionUUID->"cd0854bb-5807-492e-b426-fb27b36975bb"], +Cell[176848, 4545, 360, 5, 33, "Output",ExpressionUUID->"3d4001ff-2ae9-491f-86b4-ce69da9029d7"] }, Open ]], Cell[CellGroupData[{ -Cell[276471, 6893, 3712, 118, 70, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[280186, 7013, 173, 3, 70, "Output",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] +Cell[177245, 4555, 1101, 36, 131, "Input",ExpressionUUID->"feb60772-0956-4895-96b0-66d91ebea7c5"], +Cell[178349, 4593, 380, 6, 33, "Output",ExpressionUUID->"e04f6352-58bb-4136-b9a8-da8649235bd1"] }, Open ]], Cell[CellGroupData[{ -Cell[280396, 7021, 2052, 59, 70, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], -Cell[282451, 7082, 568, 12, 70, "Message",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], -Cell[283022, 7096, 573, 12, 70, "Message",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], -Cell[283598, 7110, 576, 12, 70, "Message",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], -Cell[284177, 7124, 458, 10, 70, "Message",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], -Cell[284638, 7136, 172, 3, 70, "Output",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] +Cell[178766, 4604, 1818, 61, 160, "Input",ExpressionUUID->"86d4b820-d47f-488f-a426-8cafefd03a1f"], +Cell[180587, 4667, 365, 5, 33, "Output",ExpressionUUID->"fe730263-913f-42d1-98e2-fd4a2582e2f3"] }, Open ]], Cell[CellGroupData[{ -Cell[284847, 7144, 2052, 59, 70, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], -Cell[286902, 7205, 568, 12, 70, "Message",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], -Cell[287473, 7219, 573, 12, 70, "Message",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], -Cell[288049, 7233, 574, 12, 70, "Message",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], -Cell[288626, 7247, 458, 10, 70, "Message",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], -Cell[289087, 7259, 172, 3, 70, "Output",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] +Cell[180989, 4677, 1631, 53, 162, "Input",ExpressionUUID->"3f494149-3100-473e-9f0f-e8c0e5a24458"], +Cell[182623, 4732, 367, 5, 33, "Output",ExpressionUUID->"363b0178-2da2-4012-ba52-87f401292552"] }, Open ]], Cell[CellGroupData[{ -Cell[289296, 7267, 2028, 55, 70, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], -Cell[291327, 7324, 20375, 384, 70, "Output",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] +Cell[183027, 4742, 1631, 53, 79, "Input",ExpressionUUID->"8aea9aac-2e0a-4e4d-89ee-28138abb09b3"], +Cell[184661, 4797, 363, 5, 33, "Output",ExpressionUUID->"e44ce607-e0a1-4c4f-af6a-25fa465ec1aa"] }, Open ]], Cell[CellGroupData[{ -Cell[311739, 7713, 2118, 60, 70, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], -Cell[313860, 7775, 501, 11, 70, "Message",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], -Cell[314364, 7788, 503, 11, 70, "Message",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], -Cell[314870, 7801, 506, 11, 70, "Message",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], -Cell[315379, 7814, 458, 10, 70, "Message",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], -Cell[315840, 7826, 22161, 409, 70, "Output",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] +Cell[185061, 4807, 230, 4, 29, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], +Cell[185294, 4813, 156, 2, 33, "Output",ExpressionUUID->"ea1c75a3-231c-459b-a2af-e8e1d983bb43"] }, Open ]], -Cell[338016, 8238, 209, 5, 70, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], +Cell[185465, 4818, 175, 2, 29, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], Cell[CellGroupData[{ -Cell[338250, 8247, 1616, 48, 70, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], -Cell[339869, 8297, 590, 12, 70, "Message",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], -Cell[340462, 8311, 589, 12, 70, "Message",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], -Cell[341054, 8325, 593, 12, 70, "Message",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], -Cell[341650, 8339, 456, 10, 70, "Message",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], -Cell[342109, 8351, 170, 3, 70, "Output",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] +Cell[185665, 4824, 228, 4, 29, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], +Cell[185896, 4830, 158, 2, 33, "Output",ExpressionUUID->"e9729d02-c804-45ba-a208-169861389a0a"] +}, Open ]], +Cell[186069, 4835, 171, 2, 29, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], +Cell[CellGroupData[{ +Cell[186265, 4841, 1297, 42, 47, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], +Cell[187565, 4885, 193, 2, 33, "Output",ExpressionUUID->"e9e59699-791e-4917-b700-fa14f12b1071"] }, Open ]], Cell[CellGroupData[{ -Cell[342316, 8359, 2251, 64, 70, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], -Cell[344570, 8425, 568, 12, 70, "Message",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], -Cell[345141, 8439, 573, 12, 70, "Message",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], -Cell[345717, 8453, 574, 12, 70, "Message",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], -Cell[346294, 8467, 458, 10, 70, "Message",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], -Cell[346755, 8479, 173, 3, 70, "Output",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] +Cell[187795, 4892, 927, 30, 55, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], +Cell[188725, 4924, 194, 2, 33, "Output",ExpressionUUID->"01a86d51-5bcc-43ea-9669-dfc43a079466"] }, Open ]], Cell[CellGroupData[{ -Cell[346965, 8487, 2221, 64, 70, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], -Cell[349189, 8553, 570, 12, 70, "Message",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], -Cell[349762, 8567, 573, 12, 70, "Message",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], -Cell[350338, 8581, 573, 12, 70, "Message",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], -Cell[350914, 8595, 458, 10, 70, "Message",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], -Cell[351375, 8607, 171, 3, 70, "Output",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] +Cell[188956, 4931, 906, 29, 55, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], +Cell[189865, 4962, 195, 2, 33, "Output",ExpressionUUID->"c1551c76-fb35-4de6-b937-da7354bef20c"] }, Open ]], Cell[CellGroupData[{ -Cell[351583, 8615, 2221, 64, 70, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], -Cell[353807, 8681, 570, 12, 70, "Message",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], -Cell[354380, 8695, 573, 12, 70, "Message",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], -Cell[354956, 8709, 574, 12, 70, "Message",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], -Cell[355533, 8723, 458, 10, 70, "Message",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], -Cell[355994, 8735, 173, 3, 70, "Output",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] +Cell[190097, 4969, 554, 18, 51, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], +Cell[190654, 4989, 190, 2, 33, "Output",ExpressionUUID->"6baff2a8-3952-4216-9b2e-4bc9c40ed8e2"] }, Open ]], Cell[CellGroupData[{ -Cell[356204, 8743, 215, 6, 70, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], -Cell[356422, 8751, 172, 3, 70, "Output",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] +Cell[190881, 4996, 647, 21, 51, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], +Cell[191531, 5019, 188, 2, 33, "Output",ExpressionUUID->"c1f49a54-9b66-4a80-9f18-cb2dcfbb695e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[191756, 5026, 166, 4, 55, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], +Cell[191925, 5032, 192, 2, 33, "Output",ExpressionUUID->"6ffbb294-955a-4c7c-aa1e-470a154d375d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192154, 5039, 166, 4, 54, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], +Cell[192323, 5045, 187, 2, 33, "Output",ExpressionUUID->"2f4f1a59-460a-4974-9b0d-871ef67fff42"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192547, 5052, 177, 4, 43, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], +Cell[192727, 5058, 191, 2, 33, "Output",ExpressionUUID->"af5e2ff4-6b0d-46c3-b7cb-97b411f4d497"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192955, 5065, 177, 4, 43, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], +Cell[193135, 5071, 189, 2, 33, "Output",ExpressionUUID->"443ab060-324a-471a-ad90-8dff3c22df74"] +}, Open ]], +Cell[CellGroupData[{ +Cell[193361, 5078, 6051, 184, 183, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], +Cell[199415, 5264, 192, 2, 33, "Output",ExpressionUUID->"627774fa-a001-4f4e-8c67-82351253858f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[199644, 5271, 364, 8, 41, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], +Cell[200011, 5281, 188, 2, 33, "Output",ExpressionUUID->"aaf90464-e85d-4cc7-a45f-6eeb7b32ba22"] +}, Open ]], +Cell[CellGroupData[{ +Cell[200236, 5288, 6118, 186, 183, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], +Cell[206357, 5476, 192, 2, 33, "Output",ExpressionUUID->"8de42204-84af-4f84-9f30-a93158d8e4f8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[206586, 5483, 364, 8, 41, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], +Cell[206953, 5493, 189, 2, 33, "Output",ExpressionUUID->"e37da5f5-56b5-4681-b53d-77342a5ac74b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[207179, 5500, 2659, 87, 107, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], +Cell[209841, 5589, 189, 2, 33, "Output",ExpressionUUID->"a0ee92f1-8a0a-4500-8bf4-3c7947e9b5dc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[210067, 5596, 2599, 84, 107, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], +Cell[212669, 5682, 188, 2, 33, "Output",ExpressionUUID->"94066686-07aa-4640-bc8b-d184ba362f0c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[212894, 5689, 3708, 117, 160, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], +Cell[216605, 5808, 189, 2, 33, "Output",ExpressionUUID->"27f2ae4e-8615-400d-82fb-b69d24f619a1"] +}, Open ]], +Cell[216809, 5813, 160, 3, 29, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], +Cell[CellGroupData[{ +Cell[216994, 5820, 2073, 58, 99, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], +Cell[219070, 5880, 724, 15, 45, "Message",ExpressionUUID->"3323beeb-6524-48ef-882b-81705288573f"], +Cell[219797, 5897, 725, 15, 45, "Message",ExpressionUUID->"88fc00f4-e9c9-4a81-a185-ea4393c02fce"], +Cell[220525, 5914, 724, 15, 45, "Message",ExpressionUUID->"9ff1235e-02cf-4193-a7c6-d13162d81468"], +Cell[221252, 5931, 494, 11, 26, "Message",ExpressionUUID->"0ec2609a-e878-4f79-82ba-217009e8f2fa"], +Cell[221749, 5944, 189, 2, 33, "Output",ExpressionUUID->"027c685f-5dc6-463d-af52-4909b546a9d0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[221975, 5951, 2071, 58, 99, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], +Cell[224049, 6011, 722, 15, 63, "Message",ExpressionUUID->"898f884f-56f3-4542-aa8b-1a2c655494cc"], +Cell[224774, 6028, 723, 15, 63, "Message",ExpressionUUID->"674ef972-9748-4f1a-aa71-1d6d0060c0bf"], +Cell[225500, 6045, 722, 15, 63, "Message",ExpressionUUID->"a5803a67-4620-4685-8d6c-de0698736fd3"], +Cell[226225, 6062, 492, 11, 26, "Message",ExpressionUUID->"0abdf350-8687-4417-a00d-38e715969dc8"], +Cell[226720, 6075, 190, 2, 33, "Output",ExpressionUUID->"96ac6b3c-069d-429a-9614-e6d46cf701cd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[226947, 6082, 1955, 52, 102, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], +Cell[228905, 6136, 23439, 431, 247, "Output",ExpressionUUID->"86aa8ce8-06e4-4dbe-b21e-1cdf5a81e8d0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[252381, 6572, 2111, 59, 261, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], +Cell[254495, 6633, 553, 12, 58, "Message",ExpressionUUID->"00f9d322-cfff-4343-aecb-71946cd7cc37"], +Cell[255051, 6647, 556, 12, 58, "Message",ExpressionUUID->"ae997dc3-d045-4138-933c-59aedd91241c"], +Cell[255610, 6661, 558, 12, 58, "Message",ExpressionUUID->"f880f2d2-ba9c-406e-b4d4-b394670b2920"], +Cell[256171, 6675, 491, 11, 26, "Message",ExpressionUUID->"a4c1e17a-db3d-4dd5-bf1f-a59922f0f308"], +Cell[256665, 6688, 26114, 476, 232, "Output",ExpressionUUID->"acd30cee-3288-46f8-b31f-27a951b40c1c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[282816, 7169, 2517, 70, 185, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], +Cell[285336, 7241, 9504, 222, 239, "Output",ExpressionUUID->"7d4b285f-8b87-46d5-b464-3c713ff21ba2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[294877, 7468, 228, 4, 29, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], +Cell[295108, 7474, 32488, 608, 232, "Output",ExpressionUUID->"6f82cbb4-6f68-4062-aacc-06892d870172"] +}, Open ]], +Cell[CellGroupData[{ +Cell[327633, 8087, 236, 6, 47, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], +Cell[327872, 8095, 189, 2, 33, "Output",ExpressionUUID->"edcd936a-e028-44b7-831a-d61ac40bee62"] +}, Open ]], +Cell[CellGroupData[{ +Cell[328098, 8102, 1833, 52, 190, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], +Cell[329934, 8156, 569, 12, 58, "Message",ExpressionUUID->"e4be6299-623a-403a-8952-fe9049469386"], +Cell[330506, 8170, 576, 13, 58, "Message",ExpressionUUID->"91eb1d82-6956-4320-893d-b054ddab8db0"], +Cell[331085, 8185, 579, 13, 58, "Message",ExpressionUUID->"70203d31-0f8e-4e0e-bd6a-421adb6a46b5"], +Cell[331667, 8200, 493, 11, 26, "Message",ExpressionUUID->"f6e41f9f-f1c4-49dd-b6d7-448ba353eef1"], +Cell[332163, 8213, 46232, 806, 232, "Output",ExpressionUUID->"9977a95b-fc52-46ad-abab-bd903b21bbab"] +}, Open ]], +Cell[CellGroupData[{ +Cell[378432, 9024, 1616, 48, 104, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], +Cell[380051, 9074, 723, 15, 61, "Message",ExpressionUUID->"204f9ea3-9c5f-4089-8fda-3a273015c247"], +Cell[380777, 9091, 724, 15, 61, "Message",ExpressionUUID->"6dc326aa-9b66-44a0-849d-400419c8bd5d"], +Cell[381504, 9108, 724, 15, 61, "Message",ExpressionUUID->"15984b26-ab7f-4b1b-ad56-b3f148f40e67"], +Cell[382231, 9125, 495, 11, 26, "Message",ExpressionUUID->"ab022b98-eb5d-4681-9d4f-062989059995"], +Cell[382729, 9138, 195, 3, 33, "Output",ExpressionUUID->"7691b290-c7bf-4e48-b2b0-0d184fc172ee"] +}, Open ]], +Cell[CellGroupData[{ +Cell[382961, 9146, 2296, 65, 212, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], +Cell[385260, 9213, 727, 15, 63, "Message",ExpressionUUID->"a662fa63-7786-4f23-8a26-b993d03fc35d"], +Cell[385990, 9230, 728, 15, 63, "Message",ExpressionUUID->"2413eb63-93fd-474e-8d86-1924eeb48cee"], +Cell[386721, 9247, 725, 15, 63, "Message",ExpressionUUID->"1192c5ed-426e-40be-9e84-f14beee79ea0"], +Cell[387449, 9264, 497, 11, 26, "Message",ExpressionUUID->"5b8f7902-e63b-4064-acb6-619be51c4cd2"], +Cell[387949, 9277, 194, 3, 33, "Output",ExpressionUUID->"0c74a522-dfbc-4281-8e2f-bd2f4ee6b0b2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[388180, 9285, 2233, 63, 212, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], +Cell[390416, 9350, 727, 15, 63, "Message",ExpressionUUID->"4fc15356-af34-46b5-b1f6-f903c236928f"], +Cell[391146, 9367, 726, 15, 63, "Message",ExpressionUUID->"f5a4c722-bdb0-44f3-87ea-f482a4ba2178"], +Cell[391875, 9384, 725, 15, 63, "Message",ExpressionUUID->"5d141a6f-a3b3-4889-ab6a-03d0f4c68ba9"], +Cell[392603, 9401, 493, 11, 26, "Message",ExpressionUUID->"908964c3-ffa0-44d1-8796-84dc27d41975"], +Cell[393099, 9414, 195, 3, 33, "Output",ExpressionUUID->"f511cffe-c0f6-4490-83e8-0e45b5f2456d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[393331, 9422, 2235, 63, 212, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], +Cell[395569, 9487, 729, 15, 63, "Message",ExpressionUUID->"1eb293b1-4f81-4ab2-89ca-9af49a097d47"], +Cell[396301, 9504, 728, 15, 63, "Message",ExpressionUUID->"28ed9a69-177e-41d7-8a43-0558186f407d"], +Cell[397032, 9521, 727, 15, 63, "Message",ExpressionUUID->"236aacd4-f422-41db-bf89-e46f890f7aa5"], +Cell[397762, 9538, 494, 11, 26, "Message",ExpressionUUID->"37472fd1-43e3-434b-8550-89fc097000e7"], +Cell[398259, 9551, 194, 3, 33, "Output",ExpressionUUID->"06e5aa76-b852-499a-a731-ecaccba0955b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[398490, 9559, 236, 6, 46, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], +Cell[398729, 9567, 195, 3, 33, "Output",ExpressionUUID->"3938ee08-791f-4861-89b8-c70ccc865564"] +}, Open ]], +Cell[398939, 9573, 270, 6, 70, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], +Cell[CellGroupData[{ +Cell[399234, 9583, 558, 19, 51, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], +Cell[399795, 9604, 194, 3, 33, "Output",ExpressionUUID->"b6ddb65d-e621-4b58-a724-6f80db97e8cb"] +}, Open ]], +Cell[CellGroupData[{ +Cell[400026, 9612, 170, 5, 55, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], +Cell[400199, 9619, 195, 3, 33, "Output",ExpressionUUID->"efba9262-f2bf-477b-8b3f-99cd2ca42487"] +}, Open ]], +Cell[CellGroupData[{ +Cell[400431, 9627, 181, 5, 43, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], +Cell[400615, 9634, 195, 3, 33, "Output",ExpressionUUID->"9bb84cb9-1a77-49c2-9508-e59a01a8c9ea"] +}, Open ]], +Cell[CellGroupData[{ +Cell[400847, 9642, 6055, 185, 474, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], +Cell[406905, 9829, 197, 3, 33, "Output",ExpressionUUID->"3c40ed91-4507-46c1-9fbc-69695f800b07"] +}, Open ]], +Cell[CellGroupData[{ +Cell[407139, 9837, 368, 9, 41, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], +Cell[407510, 9848, 194, 3, 33, "Output",ExpressionUUID->"55a23ce5-cb2e-4f6d-91a2-6de75b0bf223"] +}, Open ]], +Cell[CellGroupData[{ +Cell[407741, 9856, 6122, 187, 474, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], +Cell[413866, 10045, 194, 3, 33, "Output",ExpressionUUID->"0bb00742-fe1d-446e-9745-07a8316f6331"] +}, Open ]], +Cell[CellGroupData[{ +Cell[414097, 10053, 368, 9, 41, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], +Cell[414468, 10064, 197, 3, 33, "Output",ExpressionUUID->"67b28ef0-6ea8-4e79-8314-00a4f9a0aff9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[414702, 10072, 2663, 88, 285, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], +Cell[417368, 10162, 193, 3, 33, "Output",ExpressionUUID->"1177cf5a-0d8d-48c3-89de-ae8e05c3c362"] +}, Open ]], +Cell[CellGroupData[{ +Cell[417598, 10170, 2603, 85, 211, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], +Cell[420204, 10257, 193, 3, 33, "Output",ExpressionUUID->"7bb17fbf-ece2-4c48-8f4d-ca6371d6c635"] +}, Open ]], +Cell[CellGroupData[{ +Cell[420434, 10265, 3712, 118, 327, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], +Cell[424149, 10385, 193, 3, 33, "Output",ExpressionUUID->"9b4d25ab-b974-42ee-a929-662b8b62ac87"] +}, Open ]], +Cell[CellGroupData[{ +Cell[424379, 10393, 2075, 59, 234, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], +Cell[426457, 10454, 726, 15, 63, "Message",ExpressionUUID->"677cb072-fda2-4b18-8b8e-573f82c9d8b7"], +Cell[427186, 10471, 725, 15, 63, "Message",ExpressionUUID->"6fab44b8-7ef6-4f5a-9dc9-c00d74f23b3c"], +Cell[427914, 10488, 724, 15, 63, "Message",ExpressionUUID->"db5798e0-8ad9-4b8a-9d12-c0e4cf7f5a0a"], +Cell[428641, 10505, 493, 11, 26, "Message",ExpressionUUID->"51e2841e-d47c-4dc4-9023-f48edf7dc6c6"], +Cell[429137, 10518, 192, 3, 33, "Output",ExpressionUUID->"9f66be06-0685-46d5-889f-bf83e9b2be43"] +}, Open ]], +Cell[CellGroupData[{ +Cell[429366, 10526, 2077, 59, 234, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], +Cell[431446, 10587, 724, 15, 63, "Message",ExpressionUUID->"e0c48689-991b-4925-ad7e-51ff7d533804"], +Cell[432173, 10604, 727, 15, 63, "Message",ExpressionUUID->"c434cbfa-3ed9-4411-a637-ec1bfcec6e66"], +Cell[432903, 10621, 725, 15, 63, "Message",ExpressionUUID->"d91bcd9c-0524-48fc-a041-00733cf09c18"], +Cell[433631, 10638, 495, 11, 26, "Message",ExpressionUUID->"2a00f6ed-9b48-4f43-9819-7142f2bb75f9"], +Cell[434129, 10651, 194, 3, 33, "Output",ExpressionUUID->"bafa1c34-09d8-43b3-8086-3be69f5a33a3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[434360, 10659, 2051, 55, 151, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], +Cell[436414, 10716, 24286, 447, 236, "Output",ExpressionUUID->"b90946f8-b0ea-43e7-ba8b-985190217903"] +}, Open ]], +Cell[CellGroupData[{ +Cell[460737, 11168, 2143, 60, 261, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], +Cell[462883, 11230, 562, 12, 58, "Message",ExpressionUUID->"5dbbafae-ceec-45a2-9307-bd8762e97d3d"], +Cell[463448, 11244, 563, 12, 58, "Message",ExpressionUUID->"ae2c818c-a6f7-49fa-9326-d8d04ed97aa3"], +Cell[464014, 11258, 566, 12, 58, "Message",ExpressionUUID->"188447ee-fe50-41e3-aa05-49368f77eba9"], +Cell[464583, 11272, 495, 11, 26, "Message",ExpressionUUID->"c32df57e-c87a-45dd-87fe-26cd2c7cac5a"], +Cell[465081, 11285, 26106, 477, 232, "Output",ExpressionUUID->"adbb93b9-f05d-4273-8d86-7118b9d1a534"] +}, Open ]], +Cell[CellGroupData[{ +Cell[491224, 11767, 232, 5, 29, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], +Cell[491459, 11774, 32478, 609, 232, "Output",ExpressionUUID->"9382affc-f6bf-41e7-a4c6-971425c97ca5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[523974, 12388, 1616, 48, 104, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], +Cell[525593, 12438, 195, 3, 33, "Output",ExpressionUUID->"cf95c91e-f08f-42f2-a345-b54127ee47d4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[525825, 12446, 2271, 64, 212, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], +Cell[528099, 12512, 726, 15, 63, "Message",ExpressionUUID->"94b6fccd-8a8b-4b6d-97fa-d5c12cd26e58"], +Cell[528828, 12529, 727, 15, 63, "Message",ExpressionUUID->"cff882f6-c0e1-4c10-b322-508b82510ec7"], +Cell[529558, 12546, 727, 15, 63, "Message",ExpressionUUID->"8591a624-0f5d-40b3-9414-185427f2b363"], +Cell[530288, 12563, 495, 11, 26, "Message",ExpressionUUID->"6915be16-b175-424c-a550-6b810e7e50ef"], +Cell[530786, 12576, 194, 3, 33, "Output",ExpressionUUID->"c3e0d551-e983-437a-9c82-60267772bbb0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[531017, 12584, 2229, 63, 212, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], +Cell[533249, 12649, 726, 15, 63, "Message",ExpressionUUID->"d95efe55-3a28-4594-95dc-92e88658373e"], +Cell[533978, 12666, 726, 15, 63, "Message",ExpressionUUID->"55e7b282-e582-44b9-a0b8-9aec3d3d4ff9"], +Cell[534707, 12683, 727, 15, 63, "Message",ExpressionUUID->"9efca9e3-c4e5-4a4a-b188-088bf5ddd6c6"], +Cell[535437, 12700, 495, 11, 26, "Message",ExpressionUUID->"c928a98a-68ea-43ae-a177-a3334b2b1ba6"], +Cell[535935, 12713, 194, 3, 33, "Output",ExpressionUUID->"a3f2bc42-c053-42b2-a31a-38b9f3e01cf1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[536166, 12721, 2235, 63, 212, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], +Cell[538404, 12786, 724, 15, 63, "Message",ExpressionUUID->"7d97f47a-7080-4ed5-87e6-c5687632aab8"], +Cell[539131, 12803, 727, 15, 63, "Message",ExpressionUUID->"5b5b46fd-3e8f-4785-9dd7-25f3fa17746c"], +Cell[539861, 12820, 727, 15, 63, "Message",ExpressionUUID->"04a710d2-1623-4250-bbc1-b917e5164417"], +Cell[540591, 12837, 493, 11, 26, "Message",ExpressionUUID->"4329bc9f-931b-4ab1-b2cf-83d7d9068686"], +Cell[541087, 12850, 195, 3, 33, "Output",ExpressionUUID->"e852d360-4d73-4fa7-a08b-97914848b085"] +}, Open ]], +Cell[CellGroupData[{ +Cell[541319, 12858, 236, 6, 46, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], +Cell[541558, 12866, 197, 3, 33, "Output",ExpressionUUID->"e4752f69-fa1b-4ab1-9e24-369a7ac1fab1"] +}, Open ]], +Cell[541770, 12872, 273, 6, 70, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], +Cell[CellGroupData[{ +Cell[542068, 12882, 558, 19, 51, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], +Cell[542629, 12903, 197, 3, 33, "Output",ExpressionUUID->"c980a2eb-cfb6-4bae-8101-f1a74032f57f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[542863, 12911, 170, 5, 55, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], +Cell[543036, 12918, 197, 3, 33, "Output",ExpressionUUID->"03918a05-1d81-431d-b249-dfabdd3a1ab3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[543270, 12926, 181, 5, 43, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], +Cell[543454, 12933, 194, 3, 33, "Output",ExpressionUUID->"3a414698-1e28-48f4-babd-de12130a2504"] +}, Open ]], +Cell[CellGroupData[{ +Cell[543685, 12941, 6055, 185, 474, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], +Cell[549743, 13128, 195, 3, 33, "Output",ExpressionUUID->"d3c14fe1-779a-43bb-bd61-e19f3cb932ae"] +}, Open ]], +Cell[CellGroupData[{ +Cell[549975, 13136, 368, 9, 41, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], +Cell[550346, 13147, 194, 3, 33, "Output",ExpressionUUID->"5ab1dd58-32bc-457b-bc9e-30fc797515d8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[550577, 13155, 6122, 187, 474, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], +Cell[556702, 13344, 194, 3, 33, "Output",ExpressionUUID->"b9b2cfa6-4b2e-4917-8cb3-4772e99df0fd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[556933, 13352, 368, 9, 41, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], +Cell[557304, 13363, 192, 3, 33, "Output",ExpressionUUID->"0a35dd78-ce26-4c38-a8fe-227f79774dcd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[557533, 13371, 2663, 88, 285, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], +Cell[560199, 13461, 193, 3, 33, "Output",ExpressionUUID->"052a918b-cbfb-4321-aca1-e7dd48888a34"] +}, Open ]], +Cell[CellGroupData[{ +Cell[560429, 13469, 2603, 85, 211, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], +Cell[563035, 13556, 197, 3, 33, "Output",ExpressionUUID->"cb122780-b9e9-4d6b-a13e-d5dee7a620a4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[563269, 13564, 3712, 118, 327, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], +Cell[566984, 13684, 196, 3, 33, "Output",ExpressionUUID->"d1d536cc-992f-4f28-af8e-db878ab4e495"] +}, Open ]], +Cell[CellGroupData[{ +Cell[567217, 13692, 2075, 59, 234, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], +Cell[569295, 13753, 723, 15, 63, "Message",ExpressionUUID->"69a3dc69-25b4-44ba-a98d-c74a775db7c6"], +Cell[570021, 13770, 724, 15, 63, "Message",ExpressionUUID->"b3d90d0a-3255-493a-bbfa-3061eaf3f2ec"], +Cell[570748, 13787, 725, 15, 63, "Message",ExpressionUUID->"182f57da-2e63-4596-a446-f3155c28df13"], +Cell[571476, 13804, 493, 11, 26, "Message",ExpressionUUID->"38f6eb62-9a27-4b88-917e-8057f3dff69c"], +Cell[571972, 13817, 194, 3, 33, "Output",ExpressionUUID->"dfc5db93-8ba7-4e47-a31b-0b0f0c843a44"] +}, Open ]], +Cell[CellGroupData[{ +Cell[572203, 13825, 2075, 59, 234, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], +Cell[574281, 13886, 726, 15, 63, "Message",ExpressionUUID->"c0ed4486-6036-48bd-adf7-d737e1a59f7f"], +Cell[575010, 13903, 724, 15, 63, "Message",ExpressionUUID->"e350c9cf-2ec3-4c52-9600-55a306af9e71"], +Cell[575737, 13920, 725, 15, 63, "Message",ExpressionUUID->"f9172c24-1666-4526-9a41-0c8d0f73c9a4"], +Cell[576465, 13937, 493, 11, 26, "Message",ExpressionUUID->"af3897d2-91f8-41d7-8995-9fb06e3be4d6"], +Cell[576961, 13950, 195, 3, 33, "Output",ExpressionUUID->"ee2b3469-baee-4b58-a6e6-f118272187ce"] +}, Open ]], +Cell[CellGroupData[{ +Cell[577193, 13958, 2051, 55, 151, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], +Cell[579247, 14015, 23596, 435, 236, "Output",ExpressionUUID->"f1595829-813e-4526-9cbb-7a6c54746578"] +}, Open ]], +Cell[CellGroupData[{ +Cell[602880, 14455, 2141, 60, 261, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], +Cell[605024, 14517, 561, 12, 58, "Message",ExpressionUUID->"f06ee1fb-9677-4d74-94ac-7e60b20747c0"], +Cell[605588, 14531, 563, 12, 58, "Message",ExpressionUUID->"a7f32528-67e3-414c-83dd-af84264e9fc1"], +Cell[606154, 14545, 567, 12, 58, "Message",ExpressionUUID->"954bd881-710e-42c0-977a-0da2ec7c42e4"], +Cell[606724, 14559, 495, 11, 26, "Message",ExpressionUUID->"ae112b15-463c-41f7-a0eb-190741efa65b"], +Cell[607222, 14572, 26096, 477, 232, "Output",ExpressionUUID->"fb5c6d64-d61b-43ca-af4a-5029e0b0afab"] +}, Open ]], +Cell[CellGroupData[{ +Cell[633355, 15054, 232, 5, 29, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], +Cell[633590, 15061, 32468, 609, 232, "Output",ExpressionUUID->"2f954841-6c9c-4143-8385-63ce4b0ac06f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[666095, 15675, 1616, 48, 104, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], +Cell[667714, 15725, 193, 3, 33, "Output",ExpressionUUID->"f25f1694-f7b8-494c-8881-bdb04ff0e2b5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[667944, 15733, 2274, 64, 212, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], +Cell[670221, 15799, 724, 15, 63, "Message",ExpressionUUID->"59f2c9a7-12ac-4cc9-9171-4d124a7aec4c"], +Cell[670948, 15816, 726, 15, 63, "Message",ExpressionUUID->"6e707896-e87e-4cc3-8606-cafc452868cc"], +Cell[671677, 15833, 725, 15, 63, "Message",ExpressionUUID->"15e7707a-e786-4ea7-ad4d-692a3cabe3bc"], +Cell[672405, 15850, 495, 11, 26, "Message",ExpressionUUID->"7e518b7f-4d63-44ae-b0f6-914a81e47874"], +Cell[672903, 15863, 194, 3, 33, "Output",ExpressionUUID->"6570d8aa-5d64-4236-aa07-253fc62d54e2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[673134, 15871, 2233, 63, 212, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], +Cell[675370, 15936, 726, 15, 63, "Message",ExpressionUUID->"7af0f848-51c7-479b-98c1-d0807ba1e66b"], +Cell[676099, 15953, 726, 15, 63, "Message",ExpressionUUID->"df659011-399c-43ad-a99d-3aa917852d77"], +Cell[676828, 15970, 727, 15, 63, "Message",ExpressionUUID->"c2e71f10-563a-4c58-b2ce-00dc1c3c002d"], +Cell[677558, 15987, 494, 11, 26, "Message",ExpressionUUID->"4df6e183-dc7c-4f63-93f8-a39577d6e110"], +Cell[678055, 16000, 193, 3, 33, "Output",ExpressionUUID->"d8ebd8fd-12a3-48cb-9da2-443d4441506e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[678285, 16008, 2233, 63, 212, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], +Cell[680521, 16073, 728, 15, 63, "Message",ExpressionUUID->"2c3a0a4c-68bc-4bfe-b28c-2d0a3b5fd649"], +Cell[681252, 16090, 726, 15, 63, "Message",ExpressionUUID->"180376d3-bf67-4fd0-b2a5-b26210954527"], +Cell[681981, 16107, 727, 15, 63, "Message",ExpressionUUID->"71993753-cc0f-48a0-bbf0-901d77573d47"], +Cell[682711, 16124, 495, 11, 26, "Message",ExpressionUUID->"ed74b6cc-511a-484f-9575-4d1167456d3e"], +Cell[683209, 16137, 194, 3, 33, "Output",ExpressionUUID->"7f342bc2-47af-4993-8b03-f9007f841008"] +}, Open ]], +Cell[CellGroupData[{ +Cell[683440, 16145, 238, 6, 46, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], +Cell[683681, 16153, 194, 3, 33, "Output",ExpressionUUID->"cca53a85-f21c-44d0-8059-b1953affaeba"] }, Open ]] } ] *) -(* End of internal cache information *) - diff --git a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw1.nb b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw1.nb index 14330be..128650e 100644 --- a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw1.nb +++ b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw1.nb @@ -3,42 +3,4837 @@ (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) -(* CreatedBy='Wolfram 14.1' *) +(* CreatedBy='Wolfram 15.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 419556, 9759] -NotebookOptionsPosition[ 394772, 9385] -NotebookOutlinePosition[ 395226, 9403] -CellTagsIndexPosition[ 395183, 9400] +NotebookDataLength[ 773635, 17599] +NotebookOptionsPosition[ 734325, 16962] +NotebookOutlinePosition[ 734790, 16981] +CellTagsIndexPosition[ 734747, 16978] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ -Cell[BoxData[ - RowBox[{"f1", "="}]], "Input", - CellChangeTimes->{ - 3.9918488488187084`*^9},ExpressionUUID->"bdefbecf-0aaa-4a45-a861-\ -406cf54e52d1"], -Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848849725815*^9, - 3.9918488497328167`*^9}},ExpressionUUID->"a5161e25-7247-124f-8601-\ -7bcc4af89c62"], +Cell[CellGroupData[{ +Cell[BoxData[ + RowBox[{"d", "=", "2.88"}]], "Input", + CellChangeTimes->{ + 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, + 3.9920650045886707`*^9, {3.993801942128783*^9, 3.993801945433443*^9}, { + 3.9938026615010633`*^9, 3.993802739368286*^9}, {3.993802810187974*^9, + 3.9938028103007183`*^9}, {3.993803575340521*^9, 3.993803666300129*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"42143142-2d54-44a6-ac0c-8ee0f75a63ad"], + +Cell[BoxData["2.88`"], "Output", + CellChangeTimes->{ + 3.991320420900818*^9, 3.993800775970068*^9, 3.9938019548134403`*^9, { + 3.993802671037874*^9, 3.9938027475965223`*^9}, 3.9938028210918093`*^9, { + 3.993803586980714*^9, 3.993803670362015*^9}, 3.9938284696260443`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"7d28da99-91e2-47bb-81fd-83b7bc08f591"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f2", "="}]], "Input", + RowBox[{"A", "=", "236"}]], "Input", + CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"30c93cfa-adc5-481b-afb3-0763555403d7"], + +Cell[BoxData["236"], "Output", CellChangeTimes->{ - 3.9918488509977226`*^9},ExpressionUUID->"45ed831b-459a-9a41-990f-\ -c079ad464f5d"], + 3.9913196497381973`*^9, 3.9938007760760193`*^9, 3.993801954850832*^9, { + 3.9938026710743093`*^9, 3.993802747641852*^9}, 3.993802821127861*^9, { + 3.993803587016178*^9, 3.9938036703981237`*^9}, 3.993828469768077*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"2031e37d-f585-4d07-a472-0bc39fac7ec3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A1", "=", "152"}]], "Input", + CellChangeTimes->{ + 3.991798961431202*^9, {3.993800516328167*^9, 3.993800518467939*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"ff126f07-624b-4da3-bd67-fc819462df18"], + +Cell[BoxData["152"], "Output", + CellChangeTimes->{ + 3.9913196497578354`*^9, 3.993800520116021*^9, 3.9938007760814123`*^9, + 3.99380195486788*^9, {3.993802671090054*^9, 3.993802747658696*^9}, + 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}, + 3.993828469777816*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"571c4e82-c95a-46d3-ae1c-dbbaf4c27053"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a1", "=", "0.55"}]], "Input", + CellChangeTimes->{3.9434144380252676`*^9}, + CellLabel->"In[4]:=",ExpressionUUID->"ebab233f-ab29-4b0a-9d6e-682695edfcc1"], + +Cell[BoxData["0.55`"], "Output", + CellChangeTimes->{ + 3.991319649777508*^9, 3.9938007761127357`*^9, 3.993801954886694*^9, { + 3.993802671105547*^9, 3.993802747674674*^9}, 3.9938028211591873`*^9, { + 3.9938035870466833`*^9, 3.993803670422636*^9}, 3.9938284697979116`*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"7a53e520-d7e7-452c-b596-0d802bbe73e2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a2", "=", + RowBox[{"a1", "-", + RowBox[{"0.015", "*", + FractionBox[ + RowBox[{ + RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", + CellLabel->"In[5]:=",ExpressionUUID->"313c1035-41c9-46fd-a2c7-d316388154c0"], + +Cell[BoxData["0.545677966101695`"], "Output", + CellChangeTimes->{ + 3.9913196497965145`*^9, 3.993800776129066*^9, 3.9938019549039087`*^9, { + 3.9938026711227913`*^9, 3.993802747690078*^9}, 3.993802821174389*^9, { + 3.9938035870619383`*^9, 3.993803670434517*^9}, 3.993828469812446*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"b1c883bf-b923-4fd0-989a-0dfa14922d48"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"p0", "=", "0.17"}]], "Input", + CellLabel->"In[6]:=",ExpressionUUID->"03e56c2c-27d4-4edf-923c-22e47216e597"], + +Cell[BoxData["0.17`"], "Output", + CellChangeTimes->{ + 3.9913196498144608`*^9, 3.9938007761450787`*^9, 3.993801954921114*^9, { + 3.993802671138826*^9, 3.993802747705122*^9}, 3.993802821189831*^9, { + 3.993803587077704*^9, 3.993803670446403*^9}, 3.99382846982692*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"8f346c23-8e55-47d9-bada-0490ffe5f997"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R01", "=", + RowBox[{"1.16", "*", + SuperscriptBox["A1", + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, + CellLabel->"In[7]:=",ExpressionUUID->"fb12eac4-0919-4f65-8b36-0188d6b0f940"], + +Cell[BoxData["6.190691825034912`"], "Output", + CellChangeTimes->{ + 3.9913196498225155`*^9, 3.993800776161807*^9, 3.993801954937538*^9, { + 3.9938026711557207`*^9, 3.993802747719865*^9}, 3.993802821205323*^9, { + 3.993803587093586*^9, 3.9938036704581614`*^9}, 3.993828469841937*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"a43e2365-b8a6-4e5a-8722-abf633895e09"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R02", "=", + RowBox[{"1.16", "*", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"A", "-", "A1"}], ")"}], + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellLabel->"In[8]:=",ExpressionUUID->"b22346a5-c252-4644-aab0-5a208b6495ab"], + +Cell[BoxData["5.08024220226995`"], "Output", + CellChangeTimes->{ + 3.9913196498425236`*^9, 3.993800776178092*^9, 3.993801954954875*^9, { + 3.993802671171578*^9, 3.993802747723295*^9}, 3.993802821221133*^9, { + 3.993803587109274*^9, 3.993803670471842*^9}, 3.9938284698560266`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"77ed96d0-27eb-49aa-8258-3a017219209a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b1", "=", "0.97619"}]], "Input", + CellChangeTimes->{ + 3.991799283179735*^9, {3.9938005440294*^9, 3.993800567746181*^9}}, + CellLabel->"In[9]:=",ExpressionUUID->"67ecaf44-60c3-4e39-a33d-e1b4b819efa7"], + +Cell[BoxData["0.97619`"], "Output", + CellChangeTimes->{ + 3.993800776210225*^9, 3.993801954959785*^9, {3.993802671174962*^9, + 3.993802747749667*^9}, 3.9938028212246647`*^9, {3.9938035871245747`*^9, + 3.993803670475428*^9}, 3.993828469874213*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"7aeb3a62-6060-4453-8ff8-ca60810d339c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b2", "=", "0.59439"}]], "Input", + CellChangeTimes->{ + 3.991799280663351*^9, {3.9938005524325247`*^9, 3.993800560808515*^9}}, + CellLabel->"In[10]:=",ExpressionUUID->"e922e70d-be87-4dc4-aeda-37e2946a464f"], + +Cell[BoxData["0.59439`"], "Output", + CellChangeTimes->{ + 3.993800776226185*^9, 3.993801954993833*^9, {3.9938026712049103`*^9, + 3.993802747764641*^9}, 3.993802821251552*^9, {3.993803587139648*^9, + 3.993803670490211*^9}, 3.993828469894466*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"158406be-514f-4d85-a392-e0f4ace59916"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x1", "=", "0"}]], "Input", + CellLabel->"In[11]:=",ExpressionUUID->"776e549b-d58b-494c-9299-debaa424bf00"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498927155`*^9, 3.993800776256876*^9, 3.9938019550107737`*^9, { + 3.99380267122059*^9, 3.993802747779757*^9}, 3.993802821267166*^9, { + 3.993803587154791*^9, 3.993803670501927*^9}, 3.993828469912079*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"71a718b9-ca64-4133-bf55-8543177721b0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x2", "=", "0"}]], "Input", + CellLabel->"In[12]:=",ExpressionUUID->"bee8cb67-0fd1-461b-8d93-0b336c1d8568"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498996067`*^9, 3.993800776272674*^9, 3.993801955027381*^9, { + 3.993802671236315*^9, 3.993802747794403*^9}, 3.993802821282477*^9, { + 3.993803587158352*^9, 3.993803670513171*^9}, 3.993828469926819*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"d6f58acd-1b9d-4fab-8c36-17c6e7163fa0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w1", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[13]:=",ExpressionUUID->"a21e234f-55e3-4944-8add-66ca2754abd6"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913197863028755`*^9, 3.993800776289051*^9, 3.993801955044087*^9, { + 3.993802671251883*^9, 3.993802747809085*^9}, 3.9938028212979517`*^9, { + 3.9938035871856203`*^9, 3.9938036705241947`*^9}, 3.993828469947887*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"0bb2c6c6-7470-48f7-b13c-158bf23ea9ed"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w2", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[14]:=",ExpressionUUID->"14caad31-f736-4eff-84c1-cd92c83f4ae6"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913197864610195`*^9, 3.993800776304994*^9, 3.993801955061472*^9, { + 3.993802671267837*^9, 3.9938027478234367`*^9}, 3.9938028213134613`*^9, { + 3.9938035872015963`*^9, 3.9938036705351753`*^9}, 3.993828469969858*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"e9a4dc75-5397-4780-b6f6-a1648a30632d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c11", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"005fc586-a909-47f2-93d3-191933d48058"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.993800776320915*^9, 3.993801955077899*^9, { + 3.993802671285616*^9, 3.9938027478392677`*^9}, 3.993802821328992*^9, { + 3.993803587217046*^9, 3.993803670546205*^9}, 3.9938284699910297`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"0148fa83-1099-4905-9d0a-079a507a8612"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"be259cd6-ca0e-4aab-bb40-75632878fbbb"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.991319786540777*^9, 3.9938007763370247`*^9, 3.993801955093937*^9, { + 3.993802671301764*^9, 3.993802747854802*^9}, 3.993802821344532*^9, { + 3.993803587232232*^9, 3.993803670558001*^9}, 3.993828470007338*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"9e5d6c84-8c27-4204-bb21-c13f29719d78"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c21", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"ba94f1c0-c601-4095-87f7-be2c2217afc2"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.9913197865777817`*^9, 3.9938007763528843`*^9, 3.9938019551103783`*^9, { + 3.9938026713191147`*^9, 3.993802747870304*^9}, 3.993802821359898*^9, { + 3.993803587247026*^9, 3.9938036705701017`*^9}, 3.993828470022872*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"ca50f7ea-694c-4736-a5be-7e69fe580fe4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c22", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"3abc1b3a-f944-424d-9cd4-391816610821"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.9913197866129*^9, 3.9938007763688097`*^9, 3.993801955127124*^9, { + 3.993802671337201*^9, 3.99380274788591*^9}, 3.993802821375526*^9, { + 3.993803587262051*^9, 3.993803670582543*^9}, 3.993828471943109*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"f06ab141-74be-44b1-b70b-ddba61c43774"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"ac333677-7bac-4b10-a848-28560b506b26"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786620775*^9, 3.993800776384469*^9, 3.99380195514393*^9, { + 3.993802671355851*^9, 3.9938027479017677`*^9}, 3.9938028213910847`*^9, { + 3.993803587265461*^9, 3.9938036705956707`*^9}, 3.993828476567897*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"d44839a9-1314-4524-82c3-4b1e1838e9d1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fin", "=", "0.09"}]], "Input", + CellLabel->"In[20]:=",ExpressionUUID->"b9d35c0b-9545-4eaf-8ac0-0da8375c8a20"], + +Cell[BoxData["0.09`"], "Output", + CellChangeTimes->{ + 3.991319786657793*^9, 3.993800776400263*^9, 3.993801955160005*^9, { + 3.993802671372757*^9, 3.993802747917276*^9}, 3.9938028214069347`*^9, { + 3.993803587291121*^9, 3.993803670608396*^9}, 3.993828476698951*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"c25bf318-aed4-4a4e-8b38-a276e6607b20"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffin", "=", "0.42"}]], "Input", + CellLabel->"In[21]:=",ExpressionUUID->"561793e3-e069-4479-a254-178c0d6b1a3b"], + +Cell[BoxData["0.42`"], "Output", + CellChangeTimes->{ + 3.9913197866657925`*^9, 3.993800776415701*^9, 3.993801955176228*^9, { + 3.9938026713885727`*^9, 3.9938027479333763`*^9}, 3.9938028214226522`*^9, { + 3.993803587306354*^9, 3.993803670621553*^9}, 3.9938284767373667`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"6e1a1f51-d195-4132-8205-9e3801227699"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fex", "=", + RowBox[{"-", "2.59"}]}]], "Input", + CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"9fdb83bd-9ce2-47b3-b980-758016382871"], + +Cell[BoxData[ + RowBox[{"-", "2.59`"}]], "Output", + CellChangeTimes->{ + 3.9913197866996*^9, 3.993800776431301*^9, 3.993801955193372*^9, { + 3.993802671403956*^9, 3.9938027479492397`*^9}, 3.9938028214382277`*^9, { + 3.993803587321618*^9, 3.993803670634707*^9}, 3.993828476803856*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"5e5b4357-83ce-42f8-bf32-537a33c45051"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffex", "=", "0.54"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"e92c44ad-e67e-4fe7-8609-6b2e62c3b287"], + +Cell[BoxData["0.54`"], "Output", + CellChangeTimes->{ + 3.9913197867406044`*^9, 3.9938007764469233`*^9, 3.9938019552102613`*^9, { + 3.9938026714206*^9, 3.993802747964871*^9}, 3.993802821453787*^9, { + 3.993803587336917*^9, 3.9938036706484222`*^9}, 3.993828476820943*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"2a9cd11a-892e-4422-8ea9-347b6ec39e1d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z1", "=", " ", "66"}]], "Input", + CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { + 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { + 3.993800689005188*^9, 3.993800698859473*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"4351d6a8-e416-45af-9c65-28cca7ed0e9a"], + +Cell[BoxData["66"], "Output", + CellChangeTimes->{ + 3.9913197867861958`*^9, 3.993800776462777*^9, 3.993801955228032*^9, { + 3.9938026714376583`*^9, 3.99380274798144*^9}, 3.993802821469448*^9, { + 3.993803587352215*^9, 3.9938036706619053`*^9}, 3.9938284768375273`*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"2b06568b-fa3c-49c3-b1ba-6fe8ed5b7302"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z2", "=", + RowBox[{"94", "-", "Z1"}]}]], "Input", + CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, + 3.9916443064841423`*^9, {3.993800702787973*^9, 3.993800703931004*^9}}, + CellLabel->"In[25]:=",ExpressionUUID->"4ce5b406-827f-4cd0-aea1-29b605dcf26b"], + +Cell[BoxData["28"], "Output", + CellChangeTimes->{ + 3.9913197867928696`*^9, 3.993800776478297*^9, 3.993801955245349*^9, { + 3.993802671454508*^9, 3.993802747997691*^9}, 3.993802821484852*^9, { + 3.993803587367502*^9, 3.9938036706754093`*^9}, 3.993828476850408*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"d68787f0-5c9e-495c-8a2c-1f3cf2a124e5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A2", "=", + RowBox[{"A", "-", "A1"}]}]], "Input", + CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"f8885e79-2f36-4acb-ba21-c107b77007ad"], + +Cell[BoxData["84"], "Output", + CellChangeTimes->{ + 3.991319786827894*^9, 3.993800776493824*^9, 3.993801955261796*^9, { + 3.993802671472805*^9, 3.993802748017583*^9}, 3.99380282150027*^9, { + 3.993803587382532*^9, 3.993803670687777*^9}, 3.993828476890682*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"e81697f5-a799-4bbb-9f2a-aa5a6669617c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Din", "=", + RowBox[{"fin", "+", + RowBox[{"ffin", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"0454f847-4a7d-45a1-9732-9879835040f8"], + +Cell[BoxData["0.10842105263157895`"], "Output", + CellChangeTimes->{ + 3.9913197868648605`*^9, 3.9938007765094976`*^9, 3.9938019552787237`*^9, { + 3.993802671491748*^9, 3.9938027480331593`*^9}, 3.9938028215155582`*^9, { + 3.993803587397368*^9, 3.9938036706998672`*^9}, 3.9938284769250193`*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"07a36dfe-f559-4c5d-8be0-aeec775e67ef"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Dex", "=", + RowBox[{"fex", "+", + RowBox[{"ffex", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"a0d5621a-8b4b-4305-b03e-45727e24862c"], + +Cell[BoxData[ + RowBox[{"-", "2.566315789473684`"}]], "Output", + CellChangeTimes->{ + 3.9913197868718567`*^9, 3.9938007765252047`*^9, 3.9938019552955627`*^9, { + 3.9938026715153112`*^9, 3.993802748050967*^9}, 3.9938028215315247`*^9, { + 3.993803587413514*^9, 3.9938036707132397`*^9}, 3.993828476938013*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"cd95dd84-3dd9-4f6a-bcc4-a3872b0fccc5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R00", "=", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x1", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x2", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", "d"}]}]], "Input", + CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { + 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, + 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"88188a62-9d69-421a-96d2-9112d568a077"], + +Cell[BoxData["19.255392789884887`"], "Output", + CellChangeTimes->{ + 3.9913197869068584`*^9, 3.993800776541044*^9, 3.993801955312595*^9, { + 3.99380267153469*^9, 3.993802748068204*^9}, 3.993802821546997*^9, { + 3.9938035874293547`*^9, 3.993803670724801*^9}, 3.993828476951585*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"49e1c85f-85b6-44dc-936f-11860e0be7a1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"c20bb19a-21bb-4ed9-9c95-cf1f464aeb82"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786940857*^9, 3.993800776556777*^9, 3.993801955328986*^9, { + 3.993802671551854*^9, 3.993802748085292*^9}, 3.9938028215632277`*^9, { + 3.993803587445024*^9, 3.993803670737692*^9}, 3.9938284769609423`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"3324dc95-5b67-4664-ad8d-c93137480e14"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v1", "=", "1.63"}]], "Input", + CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, + 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { + 3.99380058189814*^9, 3.993800584279264*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"817cc206-4934-44c7-96e8-957395b05afe"], + +Cell[BoxData["1.63`"], "Output", + CellChangeTimes->{ + 3.993800776587946*^9, 3.993801955345385*^9, {3.993802671570458*^9, + 3.993802748111987*^9}, 3.9938028215786963`*^9, {3.9938035874604197`*^9, + 3.993803670750949*^9}, 3.993828476970292*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"f62a41d2-a50c-4672-b95b-437be2d438cc"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848851636154*^9, - 3.9918488516427097`*^9}},ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-\ -11f4dcb03e07"], + CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"0a8112e9-9786-4a3f-960f-13763fda2978"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n1", "=", "0.856"}]], "Input", + CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, + 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { + 3.993800591017771*^9, 3.993800594019471*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"a1270fba-446f-4b58-a174-16051a452516"], + +Cell[BoxData["0.856`"], "Output", + CellChangeTimes->{ + 3.9938007766183*^9, 3.993801955394834*^9, {3.99380267161954*^9, + 3.993802748161004*^9}, 3.993802821625576*^9, {3.993803587507737*^9, + 3.993803670776819*^9}, 3.993828476990059*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"381df8a1-6fdf-41d6-82af-5c558ec47a93"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"273cc367-92fa-40fa-9466-396154fcc0e1"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv1", "=", "2.615"}]], "Input", + CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { + 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { + 3.9938005968681726`*^9, 3.9938005993167686`*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"181f3fd1-3523-4e19-b3a3-3dd2f17b4164"], + +Cell[BoxData["2.615`"], "Output", + CellChangeTimes->{ + 3.993800776636183*^9, 3.9938019554430428`*^9, {3.993802671677952*^9, + 3.993802748207687*^9}, 3.993802821672069*^9, {3.993803587556972*^9, + 3.993803670795989*^9}, 3.993828477006918*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"daf19069-b4f5-4b03-a394-a48d8bc7b90b"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"1f736b66-34b4-4253-9cdc-ecde5f1d3da5"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn1", "=", "1.23"}]], "Input", + CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { + 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, + 3.991799359954439*^9, {3.993800602507454*^9, 3.993800603056312*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"40b3734b-24d1-4dfc-a6c4-d7a55a625cde"], + +Cell[BoxData["1.23`"], "Output", + CellChangeTimes->{ + 3.9938007766784554`*^9, 3.993801955495077*^9, {3.993802671729157*^9, + 3.993802748254798*^9}, 3.993802821718618*^9, {3.9938035876039553`*^9, + 3.9938036708157063`*^9}, 3.993828477022657*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"2cb88f11-280d-4c25-8004-6c958fd61452"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"11ec6105-6489-466c-9a3f-f64cc60b46d0"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v2", "=", "2.22"}]], "Input", + CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, + 3.991718016467348*^9, 3.991799361414671*^9, {3.993800605567752*^9, + 3.993800606070137*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"8fe7fa4f-8546-4a78-a36a-010c442399aa"], + +Cell[BoxData["2.22`"], "Output", + CellChangeTimes->{ + 3.993800776708939*^9, 3.993801955543845*^9, {3.993802671778071*^9, + 3.993802748303585*^9}, 3.993802821766041*^9, {3.993803587650766*^9, + 3.9938036708413343`*^9}, 3.993828477037966*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"bda1776f-cbd1-4592-8f90-a3761d429bc3"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"c2f25741-b47e-4fb9-8951-b547ee5a22c8"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n2", "=", "0.559"}]], "Input", + CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, + 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.993800609659601*^9, + 3.993800614079907*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"b578e50c-d549-45d2-958c-a8952dcc2d47"], + +Cell[BoxData["0.559`"], "Output", + CellChangeTimes->{ + 3.9938007767393847`*^9, 3.993801955593616*^9, {3.993802671829995*^9, + 3.993802748351069*^9}, 3.993802821813445*^9, {3.9938035876972513`*^9, + 3.993803670875149*^9}, 3.9938284770509987`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"c0dee2b1-34b1-4a9b-b448-825e3a554f77"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"2a01da94-fa48-462f-928d-3595aabb8616"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv2", "=", "2.428"}]], "Input", + CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, + 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.993800618121642*^9, + 3.993800621996191*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"30f5afbd-a86d-49e1-840b-9e2f816c1e6d"], + +Cell[BoxData["2.428`"], "Output", + CellChangeTimes->{ + 3.9938007767695208`*^9, 3.993801955646489*^9, {3.993802671878972*^9, + 3.99380274840051*^9}, 3.993802821860149*^9, {3.9938035877441607`*^9, + 3.993803670903119*^9}, 3.9938284770637197`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"96a94c60-7835-4972-90be-9ef73e9d8bf5"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"7a24d9ae-274f-48fc-973d-9980b4cf3817"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn2", "=", "0.738"}]], "Input", + CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, + 3.9917993660901737`*^9, {3.993800626883781*^9, 3.993800632244173*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"9f8f4d3d-152c-4c5c-9c76-e533896c8d3a"], + +Cell[BoxData["0.738`"], "Output", + CellChangeTimes->{ + 3.993800776800035*^9, 3.993801955694454*^9, {3.993802671926148*^9, + 3.99380274844981*^9}, 3.99380282190762*^9, {3.9938035877925863`*^9, + 3.9938036709348783`*^9}, 3.99382847707689*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"265a6131-d29f-4791-bb3d-5a1fc620784c"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"a3074821-cee3-4bb1-8015-477a7df2c7bb"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U31", "=", + RowBox[{"C0", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", "R1"}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "a1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "nn2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"Dex", "*", "v2", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/aR7S2Zj4lvHP7Jp2SD6t2ddPojOapZrBdETK9in +g+jbL87PBNEGxc+WgOhrG/jXgWi9vpDNIFrqcOcWEL1ki/glEK3Wwn0ZRDdb +HLoOonX+9D8E0abp/OxNQDq+aD4niN52MlAbRD/heKsDovPud4WB6HnRPNEg +uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt +Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr +ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== + "], + CellLabel->"In[47]:=",ExpressionUUID->"a3b4a6be-a4a7-4c0e-8723-1bcfd9a3cf22"], + +Cell[BoxData["0.04132444525810279`"], "Output", + CellChangeTimes->{ + 3.991319787430073*^9, 3.993800776881694*^9, 3.993801955753645*^9, { + 3.993802671993063*^9, 3.993802748523107*^9}, 3.993802821968258*^9, { + 3.993803587855629*^9, 3.993803670999495*^9}, 3.993828477185527*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"88be2ff9-0c3a-41db-ba54-bd99b7e599c5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U33", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", + FractionBox[ + RowBox[{"R01", "*", "R01"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"2", "*", "vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "a2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"Dex", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], + "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"6b5e352e-37e1-4de0-8158-72ad8fccd823"], + +Cell[BoxData["1.8561337112494445`"], "Output", + CellChangeTimes->{ + 3.991319787574972*^9, 3.9938007769078693`*^9, 3.993801955775502*^9, { + 3.993802672016849*^9, 3.993802748547914*^9}, 3.99380282199231*^9, { + 3.9938035878800983`*^9, 3.993803671028694*^9}, 3.993828477240703*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"a5531d53-2de6-4440-99dd-98bef6fbe59a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U32", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02"}], "1"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"80af8cf6-3df3-44b8-9f40-1de893e87058"], + +Cell[BoxData[ + RowBox[{"-", "12.258798326305717`"}]], "Output", + CellChangeTimes->{ + 3.991319787641424*^9, 3.9938007769327593`*^9, 3.993801955798092*^9, { + 3.9938026720456457`*^9, 3.99380274857216*^9}, 3.993802822015239*^9, { + 3.993803587903886*^9, 3.9938036710539*^9}, 3.993828477289167*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"88403ace-5f9e-426a-bfeb-992df44cdfd8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U41", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[50]:=",ExpressionUUID->"a6ae27b5-df61-4c34-b419-36564b3a04c7"], + +Cell[BoxData[ + RowBox[{"-", "22.790441070773312`"}]], "Output", + CellChangeTimes->{ + 3.991319787711939*^9, 3.9938007769622097`*^9, 3.9938019558251333`*^9, { + 3.993802672094524*^9, 3.993802748600835*^9}, 3.993802822044148*^9, { + 3.993803587933173*^9, 3.993803671083523*^9}, 3.993828477350009*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"eaa22d3e-dd7a-4b2f-8ddf-a22073680456"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U42", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[51]:=",ExpressionUUID->"ec5e354e-0666-4934-944d-8d3a926ffb5e"], + +Cell[BoxData[ + RowBox[{"-", "43.29548999246014`"}]], "Output", + CellChangeTimes->{ + 3.9913197877723045`*^9, 3.9938007769919767`*^9, 3.993801955868244*^9, { + 3.993802672122458*^9, 3.993802748645914*^9}, 3.993802822070863*^9, { + 3.9938035879612713`*^9, 3.993803671112574*^9}, 3.9938284774072657`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"4e855c81-71bc-42fe-895c-87d0084b122b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U51", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[52]:=",ExpressionUUID->"9c79728a-84fb-407b-b67b-315bd66717c5"], + +Cell[BoxData[ + RowBox[{"-", "161.3907844260869`"}]], "Output", + CellChangeTimes->{ + 3.991319787833355*^9, 3.993800777069632*^9, 3.9938019558996973`*^9, { + 3.9938026721544657`*^9, 3.9938027486794643`*^9}, 3.993802822104743*^9, { + 3.993803587995325*^9, 3.993803671146261*^9}, 3.993828477476267*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"d2499926-fe95-4c4c-a174-cad7d36b17da"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U21", "=", "0"}]], "Input", + CellLabel->"In[53]:=",ExpressionUUID->"c95435be-aef5-47ec-8dff-32c920d2012b"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210013676`*^9, 3.9938007770877237`*^9, 3.993801955916643*^9, { + 3.9938026721721487`*^9, 3.9938027486956*^9}, 3.993802822138073*^9, { + 3.993803588028162*^9, 3.993803671159233*^9}, 3.993828477491139*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"34fb997e-8b99-4b3c-9ad3-f16d7fc6df72"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U22", "=", "0"}]], "Input", + CellLabel->"In[54]:=",ExpressionUUID->"29779e8c-34e4-4ad3-8702-4080767b9b4b"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210355663`*^9, 3.9938007771059847`*^9, 3.99380195593331*^9, { + 3.993802672187916*^9, 3.9938027487122726`*^9}, 3.993802822156447*^9, { + 3.993803588044907*^9, 3.9938036711709633`*^9}, 3.993828477498435*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"533a9321-68b2-4e98-be9f-d7359943b84c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[55]:=",ExpressionUUID->"00ebff4c-51a5-4d36-b07a-4af2a4ce9bdb"], + +Cell[BoxData["68.50484772769052`"], "Output", + CellChangeTimes->{ + 3.991320421068556*^9, 3.993800777122861*^9, 3.99380195595057*^9, { + 3.9938026722039537`*^9, 3.9938027487289467`*^9}, 3.993802822174095*^9, { + 3.993803588061635*^9, 3.993803671182822*^9}, 3.993828477537743*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"3b16e6a6-1b04-4ede-8d95-b1599b1324c8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"5af2d744-f0be-488a-9371-68b8ac8ddb0b"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.991320421098543*^9, 3.993800777139863*^9, 3.993801955967062*^9, { + 3.993802672219776*^9, 3.9938027487454987`*^9}, 3.993802822191181*^9, { + 3.9938035880780478`*^9, 3.99380367119495*^9}, 3.993828477545804*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"534d9a36-d107-44b4-b89e-0cce089147ff"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[57]:=",ExpressionUUID->"0f6672c6-475a-4424-aac5-95e1390dd70c"], + +Cell[BoxData["78.36655133019532`"], "Output", + CellChangeTimes->{ + 3.9913204211275444`*^9, 3.993800777156836*^9, 3.993801955985046*^9, { + 3.993802672236104*^9, 3.9938027487612762`*^9}, 3.993802822207035*^9, { + 3.993803588095743*^9, 3.993803671207213*^9}, 3.993828477554213*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"2acdb385-6f18-4d84-9107-45d548cade16"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c11"], "Input", + CellLabel->"In[58]:=",ExpressionUUID->"647a95c5-fdff-458b-87ed-7c73ac1baaf6"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.9913204211385536`*^9, 3.993800777173678*^9, 3.9938019560022707`*^9, { + 3.9938026722521267`*^9, 3.993802748776864*^9}, 3.9938028222235823`*^9, { + 3.993803588111733*^9, 3.993803671219968*^9}, 3.993828477561648*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"cc1d3866-f162-4c86-a8ab-6252f69a3ddd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c12"], "Input", + CellLabel->"In[59]:=",ExpressionUUID->"339e68d2-ac81-4507-a125-e8f861b5d1c3"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.9913204211683464`*^9, 3.993800777190844*^9, 3.9938019560194187`*^9, { + 3.993802672268169*^9, 3.9938027487928667`*^9}, 3.993802822239389*^9, { + 3.993803588127493*^9, 3.993803671233239*^9}, 3.993828477568241*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"4f69de41-dfd2-4ccf-892c-a85bd0205606"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c21"], "Input", + CellLabel->"In[60]:=",ExpressionUUID->"9dcd9de9-e748-4c86-978a-bf1681d59287"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.991320421199068*^9, 3.9938007772073803`*^9, 3.993801956036744*^9, { + 3.993802672284265*^9, 3.993802748808551*^9}, 3.9938028222550507`*^9, { + 3.993803588143165*^9, 3.993803671247344*^9}, 3.9938284775732203`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"c490244a-4eed-416a-9c4a-8eedd9dbdb90"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c22"], "Input", + CellLabel->"In[61]:=",ExpressionUUID->"9ccec18a-684b-4a69-957e-a311737e8482"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.991320421228037*^9, 3.99380077722381*^9, 3.99380195605359*^9, { + 3.99380267230028*^9, 3.993802748824264*^9}, 3.993802822270421*^9, { + 3.9938035881589603`*^9, 3.993803671262602*^9}, 3.993828477585438*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"4a2d0fce-25ff-4c70-a5c4-0cc71299c973"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w1"], "Input", + CellLabel->"In[62]:=",ExpressionUUID->"3583a96c-29c4-4a62-88d2-103b2169dd27"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913204212585373`*^9, 3.99380077723999*^9, 3.9938019560701323`*^9, { + 3.99380267231618*^9, 3.993802748839958*^9}, 3.993802822285783*^9, { + 3.9938035881747913`*^9, 3.993803671266725*^9}, 3.993828477670231*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"b689c930-d234-41ee-b6f6-4d88f60d8ed8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w2"], "Input", + CellLabel->"In[63]:=",ExpressionUUID->"13480ebd-99af-4b89-8ff4-f2137ec923f3"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913204212884274`*^9, 3.99380077725603*^9, 3.993801956086666*^9, { + 3.9938026723320913`*^9, 3.993802748856078*^9}, 3.993802822300988*^9, { + 3.9938035881912737`*^9, 3.9938036712790813`*^9}, 3.99382847770114*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"eea3f6b2-da8e-487e-be03-27a41e187a01"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", + CellLabel->"In[64]:=",ExpressionUUID->"7f9ee95c-7c4f-4bef-807a-9bf9dc17ccb4"], + +Cell[BoxData[ + RowBox[{"-", "26.975748857822108`"}]], "Output", + CellChangeTimes->{ + 3.9913204213185234`*^9, 3.993800777272346*^9, 3.993801956103663*^9, { + 3.993802672348072*^9, 3.9938027488719177`*^9}, 3.9938028223163843`*^9, { + 3.993803588207057*^9, 3.993803671292569*^9}, 3.993828477729574*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"12ff7027-b2e1-4403-9f5a-38921ef2d72c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", + CellLabel->"In[65]:=",ExpressionUUID->"ab005516-c6e7-4a06-a0f1-63ec9525770a"], + +Cell[BoxData[ + RowBox[{"-", "9.274238671929899`"}]], "Output", + CellChangeTimes->{ + 3.991320421349531*^9, 3.993800777288783*^9, 3.993801956120541*^9, { + 3.993802672364458*^9, 3.993802748887658*^9}, 3.99380282233222*^9, { + 3.993803588227901*^9, 3.9938036713059*^9}, 3.993828477757043*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"e1c8fda7-09cc-4669-9521-a7e4d5f08230"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB11", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U22"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[66]:=",ExpressionUUID->"3d50f6d0-0134-4618-99f4-2275be4fa38e"], + +Cell[BoxData["41.529098869868406`"], "Output", + CellChangeTimes->{ + 3.9913204213784294`*^9, 3.993800777305213*^9, 3.993801956138081*^9, { + 3.99380267238068*^9, 3.993802748904031*^9}, 3.9938028223479433`*^9, { + 3.99380358824424*^9, 3.993803671318845*^9}, 3.993828477788617*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"9e056708-9ee6-4afd-8aaf-69253bc6a432"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB12", "=", + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[67]:=",ExpressionUUID->"12959b73-85b7-41a0-8e7d-12bd386022d8"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.9913204213904285`*^9, 3.993800777321735*^9, 3.993801956154997*^9, { + 3.9938026723977118`*^9, 3.9938027489203997`*^9}, 3.993802822363785*^9, { + 3.993803588260324*^9, 3.993803671330945*^9}, 3.993828477820157*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"25180c62-b8d2-4fe7-9e48-5386b1d974cb"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB22", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U21"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + "\[IndentingNewLine]", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[68]:=",ExpressionUUID->"0a70a019-5a37-4f41-950f-bf191df7c759"], + +Cell[BoxData["69.09231265826543`"], "Output", + CellChangeTimes->{ + 3.991320421419428*^9, 3.9938007773384323`*^9, 3.993801956172174*^9, { + 3.9938026724138613`*^9, 3.993802748938077*^9}, 3.993802822380664*^9, { + 3.9938035882645397`*^9, 3.9938036713443604`*^9}, 3.993828477852504*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"7fafd7dd-286a-49d0-a5b8-f78a5c03cd31"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kb", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "+", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"5faf041c-c5e8-4f9f-b2ed-e9cd654676f8"], + +Cell[BoxData["0.014405310234423041`"], "Output", + CellChangeTimes->{ + 3.9913204214494324`*^9, 3.9938007773549747`*^9, 3.993801956189353*^9, { + 3.993802672430953*^9, 3.9938027489557877`*^9}, 3.9938028223998747`*^9, { + 3.99380358829243*^9, 3.993803671364808*^9}, 3.9938284778850727`*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"83b2ff57-424e-4035-899e-8b7eeac1f919"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kw", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "-", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[70]:=",ExpressionUUID->"bca7ad7a-f24b-4a63-9988-2ea3001a23af"], + +Cell[BoxData["351.3032034374311`"], "Output", + CellChangeTimes->{ + 3.991320421481529*^9, 3.993800777371662*^9, 3.99380195620572*^9, { + 3.9938026724471073`*^9, 3.9938027489713907`*^9}, 3.9938028224237127`*^9, { + 3.9938035883102903`*^9, 3.993803671376803*^9}, 3.993828477914762*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"e141d665-5b0d-473f-bd38-01c57089923c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f1", "=", "0.4775655834"}]], "Input", + CellChangeTimes->{3.9918488488187084`*^9, 3.993823140005845*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], + +Cell[BoxData["0.4775655834`"], "Output", + CellChangeTimes->{3.9938284779422617`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"e0534f66-5d0e-425f-8e07-ab44bf8f22fe"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848849725815*^9, 3.9918488497328167`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f2", "=", "0.3681521012"}]], "Input", + CellChangeTimes->{3.9918488509977226`*^9, 3.993823145148045*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], + +Cell[BoxData["0.3681521012`"], "Output", + CellChangeTimes->{3.993828477995672*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"ac1d431d-a8a0-40df-b261-1dc4115c4fcf"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848851636154*^9, 3.9918488516427097`*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ @@ -84,13 +4879,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[150]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], + CellLabel->"In[75]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913279321052856`*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[BoxData["1.912822713352366`*^-53"], "Output", + CellChangeTimes->{3.9913279321052856`*^9, 3.993828478050267*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"b0f40d39-037c-4027-9011-ce284a698e37"] }, Open ]], Cell[CellGroupData[{ @@ -124,14 +4917,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575644922657`*^9},ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-\ -7221ff813b6d"], + CellChangeTimes->{3.9915575644922657`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.991327932129387*^9}, - CellLabel-> - "Out[151]=",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[BoxData["1.059475088057066`*^-54"], "Output", + CellChangeTimes->{3.991327932129387*^9, 3.993828478089802*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"503890ad-a9e4-4c47-84dc-5b35a2872c18"] }, Open ]], Cell[CellGroupData[{ @@ -164,14 +4955,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915575683388195`*^9, - 3.991557570173399*^9}},ExpressionUUID->"f22831a7-63b7-f444-8e3a-\ -fa370a62ac27"], + CellChangeTimes->{{3.9915575683388195`*^9, 3.991557570173399*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.991327932138338*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[BoxData["1.8117158583873223`*^-54"], "Output", + CellChangeTimes->{3.991327932138338*^9, 3.993828478113051*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"31494c40-0c49-46ee-abf7-d62cf8e11996"] }, Open ]], Cell[CellGroupData[{ @@ -194,13 +4983,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[153]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], + CellLabel->"In[78]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913279321616154`*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[BoxData["24.017660158242123`"], "Output", + CellChangeTimes->{3.9913279321616154`*^9, 3.993828478137541*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"95e88d9e-5c42-4c51-9873-06008de28a3a"] }, Open ]], Cell[CellGroupData[{ @@ -225,13 +5012,11 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[154]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], + CellLabel->"In[79]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[BoxData["37.77192070584817`"], "Output", - CellChangeTimes->{3.9913279321696014`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[BoxData["36.2298876508448`"], "Output", + CellChangeTimes->{3.9913279321696014`*^9, 3.993828478159219*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"e60425af-309e-46a9-94a4-4ee125684355"] }, Open ]], Cell[CellGroupData[{ @@ -240,13 +5025,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], + CellLabel->"In[80]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913279321926613`*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[BoxData["0.02449040460582216`"], "Output", + CellChangeTimes->{3.9913279321926613`*^9, 3.993828478180228*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"2f495dc5-3bd1-49e6-8ffa-5dc16f17d629"] }, Open ]], Cell[CellGroupData[{ @@ -255,13 +5038,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], + CellLabel->"In[81]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[BoxData["3.2238916343938024`"], "Output", - CellChangeTimes->{3.991327932200657*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[BoxData["3.1139207922303975`"], "Output", + CellChangeTimes->{3.991327932200657*^9, 3.993828478187792*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"5790a8f0-1df2-4f98-a087-3e2145565637"] }, Open ]], Cell[CellGroupData[{ @@ -270,13 +5051,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], + CellLabel->"In[82]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[BoxData["121.77257917856996`"], "Output", - CellChangeTimes->{3.99132793222501*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[BoxData["112.81700045613694`"], "Output", + CellChangeTimes->{3.99132793222501*^9, 3.99382847819585*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"658e442d-afc5-4bac-be15-45314fdcdef7"] }, Open ]], Cell[CellGroupData[{ @@ -285,13 +5064,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], + CellLabel->"In[83]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913279322642612`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[BoxData["0.5882022149604843`"], "Output", + CellChangeTimes->{3.9913279322642612`*^9, 3.993828478202272*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"947b231c-d302-40f0-9d4b-455e9abdadd8"] }, Open ]], Cell[CellGroupData[{ @@ -480,13 +5257,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], + CellLabel->"In[84]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[BoxData["0.032550594324745`"], "Output", - CellChangeTimes->{3.9913279322906475`*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[BoxData["0.013452440000663821`"], "Output", + CellChangeTimes->{3.9913279322906475`*^9, 3.9938284782159357`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"36cfef44-b8eb-4f24-abf5-8441543f33c1"] }, Open ]], Cell[CellGroupData[{ @@ -499,13 +5274,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], + CellLabel->"In[85]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[BoxData["4.91208054446651`"], "Output", - CellChangeTimes->{3.9913279323826447`*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[BoxData["7.640898115957646`"], "Output", + CellChangeTimes->{3.9913279323826447`*^9, 3.9938284783804617`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"2384f38c-a809-4920-bad1-7faa2e170ba7"] }, Open ]], Cell[CellGroupData[{ @@ -696,13 +5469,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], + CellLabel->"In[86]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[BoxData["0.012685641417856707`"], "Output", - CellChangeTimes->{3.991327932394655*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[BoxData["0.21164540105459953`"], "Output", + CellChangeTimes->{3.991327932394655*^9, 3.993828478390695*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"213c8055-45d9-4976-bbc9-ccbdbf059d04"] }, Open ]], Cell[CellGroupData[{ @@ -715,13 +5486,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], + CellLabel->"In[87]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.991327932491659*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[BoxData["1.9263736217235192`"], "Output", + CellChangeTimes->{3.991327932491659*^9, 3.9938284784462137`*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"28618e42-61e8-4cf4-b06b-72f2399be3b2"] }, Open ]], Cell[CellGroupData[{ @@ -813,13 +5582,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], + CellLabel->"In[88]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991327932509678*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[BoxData["0.19148677740942904`"], "Output", + CellChangeTimes->{3.991327932509678*^9, 3.9938284784544353`*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"759f5720-2e0d-46c6-8064-24b0b516e6a5"] }, Open ]], Cell[CellGroupData[{ @@ -908,13 +5675,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], + CellLabel->"In[89]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913279325457134`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[BoxData["0.808513222590571`"], "Output", + CellChangeTimes->{3.9913279325457134`*^9, 3.993828478461073*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"19c9f75e-f828-442e-815b-ec404d2ebcce"] }, Open ]], Cell[CellGroupData[{ @@ -1036,19 +5801,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], + CellLabel->"In[90]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913279325697117`*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[BoxData["0.15481959148678082`"], "Output", + CellChangeTimes->{3.9913279325697117`*^9, 3.993828478469283*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"14731ffa-2445-43a1-a2fb-0ce8b4351d0d"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"714abd93-e0d1-\ -eb45-a9e1-7a2f5d020eb1"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ @@ -1109,68 +5872,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918488620812244`*^9},ExpressionUUID->"137c38a2-741c-bd43-b6d9-\ -c0135e32eaf8"], + CellChangeTimes->{3.9918488620812244`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 166, 109, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279325947113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.505405894947004`*^-90\\\", \ +\\\"61549346779964471160015809137305620640483477612976829085474467629502252149\ +882733525660304130697111571885237067815001730354104927744028353155640323268465\ +7222342968161239204962580299776000000000000000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 1, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.99382847851608*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], +In[92]:=",ExpressionUUID->"27f7bab5-d7f1-4f91-b10f-ca5937bd9ffa"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 110, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326047096`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.208410132201455`*^-91\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 2, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.993828478524496*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], +In[92]:=",ExpressionUUID->"4347c0b0-932e-4456-9f32-5755a668b6b0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 111, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327932612709*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.722461307844363`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 92, 3, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9938284785284157`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], +In[92]:=",ExpressionUUID->"6a295aed-eac5-4387-803c-90c63082675c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 166, 112, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326207104`*^9}, +during this calculation.\"", 2, 92, 4, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.993828478532905*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], +In[92]:=",ExpressionUUID->"1aff5c44-e4c0-4fe5-ad2e-c0d9d9f732cc"], -Cell[BoxData["4.912080544466506`"], "Output", - CellChangeTimes->{3.9913279359974174`*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[BoxData["7.640895364244614`"], "Output", + CellChangeTimes->{3.9913279359974174`*^9, 3.993828482615058*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"ac4db101-f70e-4e6f-a540-768d805fce8f"] }, Open ]], Cell[CellGroupData[{ @@ -1232,68 +6003,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848865140564*^9},ExpressionUUID->"9b196534-2ca5-e54b-8014-\ -b0ab3cd09ac2"], + CellChangeTimes->{3.991848865140564*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 167, 113, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936033827*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.505405894947004`*^-90\\\", \ +\\\"61549346779964471160015809137305620640483477612976829085474467629502252149\ +882733525660304130697111571885237067815001730354104927744028353155640323268465\ +7222342968161239204962580299776000000000000000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 5, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.993828482771243*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], +In[93]:=",ExpressionUUID->"871c0284-1e4d-4c4b-b96e-4da755de134b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 114, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360428295`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.208410132201455`*^-91\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 6, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9938284827787046`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], +In[93]:=",ExpressionUUID->"7c6968e2-2c9b-4598-aaa0-2a987bccfb8c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 115, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936050829*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.722461307844363`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 93, 7, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.993828482783987*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], +In[93]:=",ExpressionUUID->"7f04fd8e-81f2-459a-aeac-e5837833f68f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 167, 116, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360588284`*^9}, +during this calculation.\"", 2, 93, 8, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.993828482788562*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], +In[93]:=",ExpressionUUID->"0543045b-514b-43a8-bc48-d2e1b1080219"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.9913279393385086`*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[BoxData["1.9263729279794954`"], "Output", + CellChangeTimes->{3.9913279393385086`*^9, 3.9938284866839447`*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"da74105e-0b66-47d4-8c36-351b564a9ade"] }, Open ]], Cell[CellGroupData[{ @@ -1349,95 +6128,97 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848869193308*^9},ExpressionUUID->"124cd7db-c537-8943-bef2-\ -1a154ab4a709"], + CellChangeTimes->{3.991848869193308*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVknc4lm0YxkUie1RIKZGiQmSVXFeyN8UnVMaLkiIkEZUvbWUmRVQSmc8r +s5KZ1ofsma3sEZnx3f54j+f4Hed1ntd53/crau9m5sjIwMDwm/xWvnYnI6nP +KdK4fL9yIEmVF3e/9OJYADmkPSv+a1zKic88xE2yvymgzS+t0OiXrEj/UXRX +sE0Bawdd3nOFsmKJ3vEKvyEFjDDffD7sMiv2bnuops6miG0WS/7lR1hRopZl +T5W2ItpYMt9pYWTFVPmhtQMlimhsOp5U4sCCeVNU6aZ8JdwTK2ceLrsGq71B +6fpLFSzfNI9T00x4tjL2SdwbFeyfa3O17mNCNonF5YJSFfyuFKVRXceEmvV5 +nya6VNBjkb2nO4sJC+TlrE6K7Mfd2t+1UzyYMGFc3H9/1H70aH1XVTrJiD4u +bKXjtw6gVzGT0sDiKhQ9UW903PUgBnkVbQxUYsCEIu4KL9+DqDoydpplFwNK +iOnBvVsHcUHp9KYoEQbc/atQ5m3CQdT/+D6knpkBFT2SeITaD2K+75W5J8nL +YHDDr6bOUA1ljR+zGw0sgXe6qIWBDOCeB2/bIy7+BcflnPTNlxDvXOFnTPs2 +D+tYhCOKryLuqpiQ/pozDyVcVy453kIM7H1c9jd+HraKaGukRSF+vFvRG3dh +HtpUG5tVcxATH7TyNWyZBzPfmdU2vxGTRT6zLlycA7VpJevHZw8hTrxMyFCc +BYGhPBYBe3XcwPc6d/PgNCjPss0on1bHdHed33+ap8GK+Xi/lbs6SnJ2nPjx +eRpitqwqfxqgjjq7q8Mbk6dh21HdQIkn6niu9KKAh8s0SL9vXlSoU8dtnpHZ +qqNToPVgfuKo1mGM3rPfs3b5N3jJq7aFSWkgx1Eeaz+dSbBRHOsI2auB7Qc5 +ZcsOTIKGyvOe+8oaWFBn3y0gMwn8wDp0R0sD8QaV27F+Euh6dXOB9hq4/2o5 +33jPBIzbuQp4PtZANnjNzx44AWdCYsyOsGmiQKDall/l42A/sviJf1ATB9Mj +++/VjULuxz/TyROamDSSxnywcBQ44se34Zwmyo+c8lmVRHSz3suurFpY8ukM +S4Uf0fO+ypZLaGEi5fFQXXwUsgMfP/J20EJnkwWuQZ8RYBVUPtXcpoWn8xs5 +PWWHIU3dkyWuShtzDYQ03eoGwEvUWi2rQRv/ZK+PqS4dAFWGwxcq2rWxbJwt +D7IG4Nt7vp6xIW2sOXSOXTtsAIaV6YXIqoO5ShkFsyYDICUzcaEbdVDQtFGp +vfoXJAm79W6n66DcTvU15i0/IWHKpTg1QhdnabM0H95+aE6OFj0Wo4stzXKe +Xxj7gevkp2vMCbrIJi1iKjnVB5c+b1c/kaWLnpfydDgb+8DoaWcJd40ujqVU +lrjG9sGctkWZB7cepk8YjATsJvqTQxXKd/SwrmxI7MmRXpg9JPhf2RV9LJFh +o+0r7Yap4VeHDG/qI+PO0k8Rud0wFqWUU39fH6+am1QupXRD/4hFXH+sPs7/ +rHg4FtENddGR51nf6aMYg4fwYeduoCb4NhjM6mPtV0/m15zd4PKM82StuwFy +2gU0qNh1QTsD00SXnSEmU64+YaKdYEBddft1yhBZC2a43gp2QoHd0siomyFG +9CupDXJ3wsOSucEFf0M8Xm8Xl7fYASbXx3vXPzbE4O8OBzbndkAJy48m3RpD +vFawo8dQugMSufKLKHUj5Oj607e8/Qec2+QWck3MGGv4tLRsldtA74W88tZd +xngjGLec2dkGElKzHYVyxmhzrcQrULAN2pWuySweMsaYdm7nhtlWMDgSXult +a4z3eix38BW0guSdXA7XWGO0ujS8t0qtFSYXrmiksJsgqx1/Mp9pC6Sf/lQU +GWSCC5mLY5cfNkF9xjMh8dsmuLNNYqP8nSZYnPb1oN8zweq3SUMT/k2gH7hH +vCrcBF9sTnC+7dgEvx6H3WR9boJPJULnRBSaQPSbjZFfoQlWvPAy+FHfCBHS +E622MyaYmLlLy39zI/j+FprZddoUrSoObqosrYemhIe0NWdNUXfGWiMmrx4U +LfhrOt1NUWWuOc0jrR4m8zjSIn1MMZ+vaodyVD24BCzbL98k/td7RsTP1MOx +tX2VNYmm+KtifeCVdfWgvCUz8VKvKVoK1bqwnq2DaT0ti4qTZhjtdHpkQb4W +FC/+/u+Bgxkqtj5orZaqBZ8X8ZqWzmY44WsvmypaC/ML8/sGzpmhMHfk7AXu +WlhKzeBnDzDDXbI858yHamANt9B3oxgzLL6wzxwSakCgdki/ockMB53WHXuy +sQZUrEMP9Zkewf8EGcccBb9DjVCsS5n8UbwrMe083VwJGxP/fZe00xxrw/de +htKvkNcpZWDEaYF77R7pcep/BpG6cWfvEQvMTDrBpyVXAfKRoakvOv9BBXuB +Za795RC7+rd0WKklRub8pxD0rBRyDsm0BOUfQ5O1o/RfW0rgkdId3sXXVpjX +cl06vKEIqlpf3pC/Z40xt5nieMI+QLZhjLj7VRscrlq6vjPkPUycPcJwjnYc +vfLfX+YdfAvTWpKnRg+fwFfr46Xc/AogaaR51lPxJKqfn/ozKZwPls9eOhzn +sMX4IaPrzvO5kEXXP8l00xbTDdTY7/TlgIpwzdztOVucbO9IWl6VA2Kdzi3f +T9th/Lut8zOq2dDLfsY4pscOQ4JDrMKuvYHq+0YO2ub2KJj7TnrrQBZE+MSx +X6i2R9mpWM9DVlnwrnB5zkHXAWUTz1iUd9Nhb/E+5R36Dlg03Om2u4sOiaWn +vQcNHNC2d2dYRAcdQj/VTrqbOKD73vXjzm10cKp5NeT/jwOGpCStFW6gA2+/ +cXuUI8nTyvSmfyY6Z3zR12sOGB94xiqBogO3Dd6UL3BAHin9paDrdNi6rqJq +0zviH/2rzPMvHWS/GQquKSR6xXzUk2t0MFO1Tm4qJvuEk4qzA+gQscn7q/9n +B0T97LczPnTY2J7C/amJ8NxdNvpZOoifEHhkM0PmCz9sWfqHDiq2o0lB+2gY +n9hs2SdDzhM97mmkSENZW8PIL9J0WFc7qSagTMOrjUPFmXvoMKo5U5d0gIbV +VT8Hr+yiQ8IuhlXf1Gk4rhnrLbmDDlwzvMf4TGm49Wy0frIIHXqDFdbGnaUh +FsQlW3HRwbRCqc7ZjfAQX+hxTjoUMuyPkz1PQxO/eXs7DjpEe6oplHiRPCm/ +8jNsdDA6pm3X50dY+snVu2vokC9+LH/XHRoybH7x+s8SBfffXj6dl0h078pM +33EKzspFqfgkkf0NZxefjlFgkEytVX5N+svfFC8bpYAtqj85N42ctzJ6Le8I +BUEeJoM5b0geJ00se4CCy5LiZ7JLaFgULn9RoocCl6ivrvQfhMUi3qQ2UKDL +1a/q0UlD2/UnDYfrKdgZxMAp103yuH0LdxPu91BIo/rIPn9xycxaCuyM4kYy +h4leMLGpuJoCS2bPcxnzRNcTpLF/pUDbc6N76gZH7PTVfolFFJTE3dALE3TE +rf25LMEfKFD9Ninus9ERi7Ju01oKKZDd/rX5sAjR/b9w+LynQKjR73DrdqLH +bVz3oYCCof3tG9gUHNFWyKHLL5uCB4zx752POOJVlsEnGSnk/DIcjwzNHRFV +8ziECV+39vGQ/8cRGbg5vG6+psDnjcmOZSuSH1W/3SGZ9HdaFfrQnuQ1TvBJ +vKJA/os9rfw88f/9s9D8nILG0O3sYiHEr7LOcu4xBenAeepXKNm34Yv6XcLX +R6bK0sLJfMD5VSKE5XTLApSjSH6O4bxmNHk/BodJw6dkvtukKS6KAi23+Gaf +VLKvKlbRL4KCzZtvKaqlExa1sdxIeOqLWzhTJrmviSWDgnAKnkuA4f0s4r+f +lb4YRsHf9vaiFwVEr5YyuxtKwRsD4aTKT+R+Zo9wVN+n4O48I3PEF6IvGZlf +JmyfNGh37Bvpo6ThLkmYZ3WBcG+VI8bb/RS+EUyB61vLB3MNhPfG6ejeo0BM +6qG3eB/xsxQM/7lNwXyjf+1AP8kvNzbOJFwd5Cib8YvkdQj860I4oGvfoMow +8bfxnui6RUHLo9rjxr9J30cXO5tuUhDGwqvpu8oJkarkHAui4N1ku7UXkxNu +ZTZvSSf8s/21xzlmJywSePvajbDqG414+7WEA39bTF0n/zdbnwU9XidkUHjX +upYwj4Emnya/E3bW95V//5eCA0p8krDeCa8+v5/1mHAIZ6qFvJAT2p7YGy2z +ohd0UMKiZN/hkHuOgRQ4vUz9tF6M6PQboQqEQ0IudXBvJ3m9SdFrCPc78XOu +liT8US8r5RrR+bVPDcuSeWsWdkbCBUv8V/rlSL+jx3e2XKWgb6AzsnMfyf/6 +SCeL8P4i39I6ZeKfjA89RbjXNV3kPRIel9DsuEIBl6WfQq46Oc/uJp8PhFUO +6xhQGqR/gUJGPOH7Qt2XXuqQ+a3tYk6E81ZnhMTpEd4mbK9HuGfM71W0AZn/ +NvJchrDyx/X1wSaEkw/s/htA3pvqHrppRu47OdWrj3BwTAZj4FHSfyD2QyXh +bg9dWW9L0p9xzCaBMOeJDdruVqSPvlZGCGFl3Z7jLjZOGJ/JsTpgxb/F/+4J +WzI/3vjGmnAem95zS3uS11bPY7CSN70h34xG9DUKbgdX8rp6qgycyH6/ySqZ +lbxvmf1ap4juwy4vttIv1/8vuhDd0/+RwEr+c711B1zJPl4tBs6V/GCBXQrn +iC7r4MK0ku/Te0jGnfh/1DTM+1PAQaMsJT3IfdiFa/4mrGQc4CbmRfS9L3KG +Cdvv17+x2Zu8xwKD1E/C97YLxgr4kPmnKXHdhHN4+rJ4fUl/uecCHYS7Fqgv +7JfJ/qWe0LaV/J8BXcwB5D6uuXO1Elas0Z9dvkL0M9rBLYT/ByOpNeo= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -1451,106 +6232,108 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwVknc4lm0YxkUie1RIKZGiQmSVXFeyN8UnVMaLkiIkEZUvbWUmRVQSmc8r +s5KZ1ofsma3sEZnx3f54j+f4Hed1ntd53/crau9m5sjIwMDwm/xWvnYnI6nP +KdK4fL9yIEmVF3e/9OJYADmkPSv+a1zKic88xE2yvymgzS+t0OiXrEj/UXRX +sE0Bawdd3nOFsmKJ3vEKvyEFjDDffD7sMiv2bnuops6miG0WS/7lR1hRopZl +T5W2ItpYMt9pYWTFVPmhtQMlimhsOp5U4sCCeVNU6aZ8JdwTK2ceLrsGq71B +6fpLFSzfNI9T00x4tjL2SdwbFeyfa3O17mNCNonF5YJSFfyuFKVRXceEmvV5 +nya6VNBjkb2nO4sJC+TlrE6K7Mfd2t+1UzyYMGFc3H9/1H70aH1XVTrJiD4u +bKXjtw6gVzGT0sDiKhQ9UW903PUgBnkVbQxUYsCEIu4KL9+DqDoydpplFwNK +iOnBvVsHcUHp9KYoEQbc/atQ5m3CQdT/+D6knpkBFT2SeITaD2K+75W5J8nL +YHDDr6bOUA1ljR+zGw0sgXe6qIWBDOCeB2/bIy7+BcflnPTNlxDvXOFnTPs2 +D+tYhCOKryLuqpiQ/pozDyVcVy453kIM7H1c9jd+HraKaGukRSF+vFvRG3dh +HtpUG5tVcxATH7TyNWyZBzPfmdU2vxGTRT6zLlycA7VpJevHZw8hTrxMyFCc +BYGhPBYBe3XcwPc6d/PgNCjPss0on1bHdHed33+ap8GK+Xi/lbs6SnJ2nPjx +eRpitqwqfxqgjjq7q8Mbk6dh21HdQIkn6niu9KKAh8s0SL9vXlSoU8dtnpHZ +qqNToPVgfuKo1mGM3rPfs3b5N3jJq7aFSWkgx1Eeaz+dSbBRHOsI2auB7Qc5 +ZcsOTIKGyvOe+8oaWFBn3y0gMwn8wDp0R0sD8QaV27F+Euh6dXOB9hq4/2o5 +33jPBIzbuQp4PtZANnjNzx44AWdCYsyOsGmiQKDall/l42A/sviJf1ATB9Mj +++/VjULuxz/TyROamDSSxnywcBQ44se34Zwmyo+c8lmVRHSz3suurFpY8ukM +S4Uf0fO+ypZLaGEi5fFQXXwUsgMfP/J20EJnkwWuQZ8RYBVUPtXcpoWn8xs5 +PWWHIU3dkyWuShtzDYQ03eoGwEvUWi2rQRv/ZK+PqS4dAFWGwxcq2rWxbJwt +D7IG4Nt7vp6xIW2sOXSOXTtsAIaV6YXIqoO5ShkFsyYDICUzcaEbdVDQtFGp +vfoXJAm79W6n66DcTvU15i0/IWHKpTg1QhdnabM0H95+aE6OFj0Wo4stzXKe +Xxj7gevkp2vMCbrIJi1iKjnVB5c+b1c/kaWLnpfydDgb+8DoaWcJd40ujqVU +lrjG9sGctkWZB7cepk8YjATsJvqTQxXKd/SwrmxI7MmRXpg9JPhf2RV9LJFh +o+0r7Yap4VeHDG/qI+PO0k8Rud0wFqWUU39fH6+am1QupXRD/4hFXH+sPs7/ +rHg4FtENddGR51nf6aMYg4fwYeduoCb4NhjM6mPtV0/m15zd4PKM82StuwFy +2gU0qNh1QTsD00SXnSEmU64+YaKdYEBddft1yhBZC2a43gp2QoHd0siomyFG +9CupDXJ3wsOSucEFf0M8Xm8Xl7fYASbXx3vXPzbE4O8OBzbndkAJy48m3RpD +vFawo8dQugMSufKLKHUj5Oj607e8/Qec2+QWck3MGGv4tLRsldtA74W88tZd +xngjGLec2dkGElKzHYVyxmhzrcQrULAN2pWuySweMsaYdm7nhtlWMDgSXult +a4z3eix38BW0guSdXA7XWGO0ujS8t0qtFSYXrmiksJsgqx1/Mp9pC6Sf/lQU +GWSCC5mLY5cfNkF9xjMh8dsmuLNNYqP8nSZYnPb1oN8zweq3SUMT/k2gH7hH +vCrcBF9sTnC+7dgEvx6H3WR9boJPJULnRBSaQPSbjZFfoQlWvPAy+FHfCBHS +E622MyaYmLlLy39zI/j+FprZddoUrSoObqosrYemhIe0NWdNUXfGWiMmrx4U +LfhrOt1NUWWuOc0jrR4m8zjSIn1MMZ+vaodyVD24BCzbL98k/td7RsTP1MOx +tX2VNYmm+KtifeCVdfWgvCUz8VKvKVoK1bqwnq2DaT0ti4qTZhjtdHpkQb4W +FC/+/u+Bgxkqtj5orZaqBZ8X8ZqWzmY44WsvmypaC/ML8/sGzpmhMHfk7AXu +WlhKzeBnDzDDXbI858yHamANt9B3oxgzLL6wzxwSakCgdki/ockMB53WHXuy +sQZUrEMP9Zkewf8EGcccBb9DjVCsS5n8UbwrMe083VwJGxP/fZe00xxrw/de +htKvkNcpZWDEaYF77R7pcep/BpG6cWfvEQvMTDrBpyVXAfKRoakvOv9BBXuB +Za795RC7+rd0WKklRub8pxD0rBRyDsm0BOUfQ5O1o/RfW0rgkdId3sXXVpjX +cl06vKEIqlpf3pC/Z40xt5nieMI+QLZhjLj7VRscrlq6vjPkPUycPcJwjnYc +vfLfX+YdfAvTWpKnRg+fwFfr46Xc/AogaaR51lPxJKqfn/ozKZwPls9eOhzn +sMX4IaPrzvO5kEXXP8l00xbTDdTY7/TlgIpwzdztOVucbO9IWl6VA2Kdzi3f +T9th/Lut8zOq2dDLfsY4pscOQ4JDrMKuvYHq+0YO2ub2KJj7TnrrQBZE+MSx +X6i2R9mpWM9DVlnwrnB5zkHXAWUTz1iUd9Nhb/E+5R36Dlg03Om2u4sOiaWn +vQcNHNC2d2dYRAcdQj/VTrqbOKD73vXjzm10cKp5NeT/jwOGpCStFW6gA2+/ +cXuUI8nTyvSmfyY6Z3zR12sOGB94xiqBogO3Dd6UL3BAHin9paDrdNi6rqJq +0zviH/2rzPMvHWS/GQquKSR6xXzUk2t0MFO1Tm4qJvuEk4qzA+gQscn7q/9n +B0T97LczPnTY2J7C/amJ8NxdNvpZOoifEHhkM0PmCz9sWfqHDiq2o0lB+2gY +n9hs2SdDzhM97mmkSENZW8PIL9J0WFc7qSagTMOrjUPFmXvoMKo5U5d0gIbV +VT8Hr+yiQ8IuhlXf1Gk4rhnrLbmDDlwzvMf4TGm49Wy0frIIHXqDFdbGnaUh +FsQlW3HRwbRCqc7ZjfAQX+hxTjoUMuyPkz1PQxO/eXs7DjpEe6oplHiRPCm/ +8jNsdDA6pm3X50dY+snVu2vokC9+LH/XHRoybH7x+s8SBfffXj6dl0h078pM +33EKzspFqfgkkf0NZxefjlFgkEytVX5N+svfFC8bpYAtqj85N42ctzJ6Le8I +BUEeJoM5b0geJ00se4CCy5LiZ7JLaFgULn9RoocCl6ivrvQfhMUi3qQ2UKDL +1a/q0UlD2/UnDYfrKdgZxMAp103yuH0LdxPu91BIo/rIPn9xycxaCuyM4kYy +h4leMLGpuJoCS2bPcxnzRNcTpLF/pUDbc6N76gZH7PTVfolFFJTE3dALE3TE +rf25LMEfKFD9Ninus9ERi7Ju01oKKZDd/rX5sAjR/b9w+LynQKjR73DrdqLH +bVz3oYCCof3tG9gUHNFWyKHLL5uCB4zx752POOJVlsEnGSnk/DIcjwzNHRFV +8ziECV+39vGQ/8cRGbg5vG6+psDnjcmOZSuSH1W/3SGZ9HdaFfrQnuQ1TvBJ +vKJA/os9rfw88f/9s9D8nILG0O3sYiHEr7LOcu4xBenAeepXKNm34Yv6XcLX +R6bK0sLJfMD5VSKE5XTLApSjSH6O4bxmNHk/BodJw6dkvtukKS6KAi23+Gaf +VLKvKlbRL4KCzZtvKaqlExa1sdxIeOqLWzhTJrmviSWDgnAKnkuA4f0s4r+f +lb4YRsHf9vaiFwVEr5YyuxtKwRsD4aTKT+R+Zo9wVN+n4O48I3PEF6IvGZlf +JmyfNGh37Bvpo6ThLkmYZ3WBcG+VI8bb/RS+EUyB61vLB3MNhPfG6ejeo0BM +6qG3eB/xsxQM/7lNwXyjf+1AP8kvNzbOJFwd5Cib8YvkdQj860I4oGvfoMow +8bfxnui6RUHLo9rjxr9J30cXO5tuUhDGwqvpu8oJkarkHAui4N1ku7UXkxNu +ZTZvSSf8s/21xzlmJywSePvajbDqG414+7WEA39bTF0n/zdbnwU9XidkUHjX +upYwj4Emnya/E3bW95V//5eCA0p8krDeCa8+v5/1mHAIZ6qFvJAT2p7YGy2z +ohd0UMKiZN/hkHuOgRQ4vUz9tF6M6PQboQqEQ0IudXBvJ3m9SdFrCPc78XOu +liT8US8r5RrR+bVPDcuSeWsWdkbCBUv8V/rlSL+jx3e2XKWgb6AzsnMfyf/6 +SCeL8P4i39I6ZeKfjA89RbjXNV3kPRIel9DsuEIBl6WfQq46Oc/uJp8PhFUO +6xhQGqR/gUJGPOH7Qt2XXuqQ+a3tYk6E81ZnhMTpEd4mbK9HuGfM71W0AZn/ +NvJchrDyx/X1wSaEkw/s/htA3pvqHrppRu47OdWrj3BwTAZj4FHSfyD2QyXh +bg9dWW9L0p9xzCaBMOeJDdruVqSPvlZGCGFl3Z7jLjZOGJ/JsTpgxb/F/+4J +WzI/3vjGmnAem95zS3uS11bPY7CSN70h34xG9DUKbgdX8rp6qgycyH6/ySqZ +lbxvmf1ap4juwy4vttIv1/8vuhDd0/+RwEr+c711B1zJPl4tBs6V/GCBXQrn +iC7r4MK0ku/Te0jGnfh/1DTM+1PAQaMsJT3IfdiFa/4mrGQc4CbmRfS9L3KG +Cdvv17+x2Zu8xwKD1E/C97YLxgr4kPmnKXHdhHN4+rJ4fUl/uecCHYS7Fqgv +7JfJ/qWe0LaV/J8BXcwB5D6uuXO1Elas0Z9dvkL0M9rBLYT/ByOpNeo= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "PlotRange" -> {{0, 180}, {0., 4.309238103134475}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -1562,132 +6345,133 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 4.309238103134475}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{91.80048673422971, - 202.7475686600987}, {-12.9358605040218, 4.401639495978198}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwVknc4lm0YxkUie1RIKZGiQmSVXFeyN8UnVMaLkiIkEZUvbWUmRVQSmc8r +s5KZ1ofsma3sEZnx3f54j+f4Hed1ntd53/crau9m5sjIwMDwm/xWvnYnI6nP +KdK4fL9yIEmVF3e/9OJYADmkPSv+a1zKic88xE2yvymgzS+t0OiXrEj/UXRX +sE0Bawdd3nOFsmKJ3vEKvyEFjDDffD7sMiv2bnuops6miG0WS/7lR1hRopZl +T5W2ItpYMt9pYWTFVPmhtQMlimhsOp5U4sCCeVNU6aZ8JdwTK2ceLrsGq71B +6fpLFSzfNI9T00x4tjL2SdwbFeyfa3O17mNCNonF5YJSFfyuFKVRXceEmvV5 +nya6VNBjkb2nO4sJC+TlrE6K7Mfd2t+1UzyYMGFc3H9/1H70aH1XVTrJiD4u +bKXjtw6gVzGT0sDiKhQ9UW903PUgBnkVbQxUYsCEIu4KL9+DqDoydpplFwNK +iOnBvVsHcUHp9KYoEQbc/atQ5m3CQdT/+D6knpkBFT2SeITaD2K+75W5J8nL +YHDDr6bOUA1ljR+zGw0sgXe6qIWBDOCeB2/bIy7+BcflnPTNlxDvXOFnTPs2 +D+tYhCOKryLuqpiQ/pozDyVcVy453kIM7H1c9jd+HraKaGukRSF+vFvRG3dh +HtpUG5tVcxATH7TyNWyZBzPfmdU2vxGTRT6zLlycA7VpJevHZw8hTrxMyFCc +BYGhPBYBe3XcwPc6d/PgNCjPss0on1bHdHed33+ap8GK+Xi/lbs6SnJ2nPjx +eRpitqwqfxqgjjq7q8Mbk6dh21HdQIkn6niu9KKAh8s0SL9vXlSoU8dtnpHZ +qqNToPVgfuKo1mGM3rPfs3b5N3jJq7aFSWkgx1Eeaz+dSbBRHOsI2auB7Qc5 +ZcsOTIKGyvOe+8oaWFBn3y0gMwn8wDp0R0sD8QaV27F+Euh6dXOB9hq4/2o5 +33jPBIzbuQp4PtZANnjNzx44AWdCYsyOsGmiQKDall/l42A/sviJf1ATB9Mj +++/VjULuxz/TyROamDSSxnywcBQ44se34Zwmyo+c8lmVRHSz3suurFpY8ukM +S4Uf0fO+ypZLaGEi5fFQXXwUsgMfP/J20EJnkwWuQZ8RYBVUPtXcpoWn8xs5 +PWWHIU3dkyWuShtzDYQ03eoGwEvUWi2rQRv/ZK+PqS4dAFWGwxcq2rWxbJwt +D7IG4Nt7vp6xIW2sOXSOXTtsAIaV6YXIqoO5ShkFsyYDICUzcaEbdVDQtFGp +vfoXJAm79W6n66DcTvU15i0/IWHKpTg1QhdnabM0H95+aE6OFj0Wo4stzXKe +Xxj7gevkp2vMCbrIJi1iKjnVB5c+b1c/kaWLnpfydDgb+8DoaWcJd40ujqVU +lrjG9sGctkWZB7cepk8YjATsJvqTQxXKd/SwrmxI7MmRXpg9JPhf2RV9LJFh +o+0r7Yap4VeHDG/qI+PO0k8Rud0wFqWUU39fH6+am1QupXRD/4hFXH+sPs7/ +rHg4FtENddGR51nf6aMYg4fwYeduoCb4NhjM6mPtV0/m15zd4PKM82StuwFy +2gU0qNh1QTsD00SXnSEmU64+YaKdYEBddft1yhBZC2a43gp2QoHd0siomyFG +9CupDXJ3wsOSucEFf0M8Xm8Xl7fYASbXx3vXPzbE4O8OBzbndkAJy48m3RpD +vFawo8dQugMSufKLKHUj5Oj607e8/Qec2+QWck3MGGv4tLRsldtA74W88tZd +xngjGLec2dkGElKzHYVyxmhzrcQrULAN2pWuySweMsaYdm7nhtlWMDgSXult +a4z3eix38BW0guSdXA7XWGO0ujS8t0qtFSYXrmiksJsgqx1/Mp9pC6Sf/lQU +GWSCC5mLY5cfNkF9xjMh8dsmuLNNYqP8nSZYnPb1oN8zweq3SUMT/k2gH7hH +vCrcBF9sTnC+7dgEvx6H3WR9boJPJULnRBSaQPSbjZFfoQlWvPAy+FHfCBHS +E622MyaYmLlLy39zI/j+FprZddoUrSoObqosrYemhIe0NWdNUXfGWiMmrx4U +LfhrOt1NUWWuOc0jrR4m8zjSIn1MMZ+vaodyVD24BCzbL98k/td7RsTP1MOx +tX2VNYmm+KtifeCVdfWgvCUz8VKvKVoK1bqwnq2DaT0ti4qTZhjtdHpkQb4W +FC/+/u+Bgxkqtj5orZaqBZ8X8ZqWzmY44WsvmypaC/ML8/sGzpmhMHfk7AXu +WlhKzeBnDzDDXbI858yHamANt9B3oxgzLL6wzxwSakCgdki/ockMB53WHXuy +sQZUrEMP9Zkewf8EGcccBb9DjVCsS5n8UbwrMe083VwJGxP/fZe00xxrw/de +htKvkNcpZWDEaYF77R7pcep/BpG6cWfvEQvMTDrBpyVXAfKRoakvOv9BBXuB +Za795RC7+rd0WKklRub8pxD0rBRyDsm0BOUfQ5O1o/RfW0rgkdId3sXXVpjX +cl06vKEIqlpf3pC/Z40xt5nieMI+QLZhjLj7VRscrlq6vjPkPUycPcJwjnYc +vfLfX+YdfAvTWpKnRg+fwFfr46Xc/AogaaR51lPxJKqfn/ozKZwPls9eOhzn +sMX4IaPrzvO5kEXXP8l00xbTDdTY7/TlgIpwzdztOVucbO9IWl6VA2Kdzi3f +T9th/Lut8zOq2dDLfsY4pscOQ4JDrMKuvYHq+0YO2ub2KJj7TnrrQBZE+MSx +X6i2R9mpWM9DVlnwrnB5zkHXAWUTz1iUd9Nhb/E+5R36Dlg03Om2u4sOiaWn +vQcNHNC2d2dYRAcdQj/VTrqbOKD73vXjzm10cKp5NeT/jwOGpCStFW6gA2+/ +cXuUI8nTyvSmfyY6Z3zR12sOGB94xiqBogO3Dd6UL3BAHin9paDrdNi6rqJq +0zviH/2rzPMvHWS/GQquKSR6xXzUk2t0MFO1Tm4qJvuEk4qzA+gQscn7q/9n +B0T97LczPnTY2J7C/amJ8NxdNvpZOoifEHhkM0PmCz9sWfqHDiq2o0lB+2gY +n9hs2SdDzhM97mmkSENZW8PIL9J0WFc7qSagTMOrjUPFmXvoMKo5U5d0gIbV +VT8Hr+yiQ8IuhlXf1Gk4rhnrLbmDDlwzvMf4TGm49Wy0frIIHXqDFdbGnaUh +FsQlW3HRwbRCqc7ZjfAQX+hxTjoUMuyPkz1PQxO/eXs7DjpEe6oplHiRPCm/ +8jNsdDA6pm3X50dY+snVu2vokC9+LH/XHRoybH7x+s8SBfffXj6dl0h078pM +33EKzspFqfgkkf0NZxefjlFgkEytVX5N+svfFC8bpYAtqj85N42ctzJ6Le8I +BUEeJoM5b0geJ00se4CCy5LiZ7JLaFgULn9RoocCl6ivrvQfhMUi3qQ2UKDL +1a/q0UlD2/UnDYfrKdgZxMAp103yuH0LdxPu91BIo/rIPn9xycxaCuyM4kYy +h4leMLGpuJoCS2bPcxnzRNcTpLF/pUDbc6N76gZH7PTVfolFFJTE3dALE3TE +rf25LMEfKFD9Ninus9ERi7Ju01oKKZDd/rX5sAjR/b9w+LynQKjR73DrdqLH +bVz3oYCCof3tG9gUHNFWyKHLL5uCB4zx752POOJVlsEnGSnk/DIcjwzNHRFV +8ziECV+39vGQ/8cRGbg5vG6+psDnjcmOZSuSH1W/3SGZ9HdaFfrQnuQ1TvBJ +vKJA/os9rfw88f/9s9D8nILG0O3sYiHEr7LOcu4xBenAeepXKNm34Yv6XcLX +R6bK0sLJfMD5VSKE5XTLApSjSH6O4bxmNHk/BodJw6dkvtukKS6KAi23+Gaf +VLKvKlbRL4KCzZtvKaqlExa1sdxIeOqLWzhTJrmviSWDgnAKnkuA4f0s4r+f +lb4YRsHf9vaiFwVEr5YyuxtKwRsD4aTKT+R+Zo9wVN+n4O48I3PEF6IvGZlf +JmyfNGh37Bvpo6ThLkmYZ3WBcG+VI8bb/RS+EUyB61vLB3MNhPfG6ejeo0BM +6qG3eB/xsxQM/7lNwXyjf+1AP8kvNzbOJFwd5Cib8YvkdQj860I4oGvfoMow +8bfxnui6RUHLo9rjxr9J30cXO5tuUhDGwqvpu8oJkarkHAui4N1ku7UXkxNu +ZTZvSSf8s/21xzlmJywSePvajbDqG414+7WEA39bTF0n/zdbnwU9XidkUHjX +upYwj4Emnya/E3bW95V//5eCA0p8krDeCa8+v5/1mHAIZ6qFvJAT2p7YGy2z +ohd0UMKiZN/hkHuOgRQ4vUz9tF6M6PQboQqEQ0IudXBvJ3m9SdFrCPc78XOu +liT8US8r5RrR+bVPDcuSeWsWdkbCBUv8V/rlSL+jx3e2XKWgb6AzsnMfyf/6 +SCeL8P4i39I6ZeKfjA89RbjXNV3kPRIel9DsuEIBl6WfQq46Oc/uJp8PhFUO +6xhQGqR/gUJGPOH7Qt2XXuqQ+a3tYk6E81ZnhMTpEd4mbK9HuGfM71W0AZn/ +NvJchrDyx/X1wSaEkw/s/htA3pvqHrppRu47OdWrj3BwTAZj4FHSfyD2QyXh +bg9dWW9L0p9xzCaBMOeJDdruVqSPvlZGCGFl3Z7jLjZOGJ/JsTpgxb/F/+4J +WzI/3vjGmnAem95zS3uS11bPY7CSN70h34xG9DUKbgdX8rp6qgycyH6/ySqZ +lbxvmf1ap4juwy4vttIv1/8vuhDd0/+RwEr+c711B1zJPl4tBs6V/GCBXQrn +iC7r4MK0ku/Te0jGnfh/1DTM+1PAQaMsJT3IfdiFa/4mrGQc4CbmRfS9L3KG +Cdvv17+x2Zu8xwKD1E/C97YLxgr4kPmnKXHdhHN4+rJ4fUl/uecCHYS7Fqgv +7JfJ/qWe0LaV/J8BXcwB5D6uuXO1Elas0Z9dvkL0M9rBLYT/ByOpNeo= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "PlotRange" -> {{0, 180}, {0., 4.309238103134475}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -1697,7 +6481,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.819001000320631}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -1725,7 +6510,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.8190010003206292, 1.212160280392001}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 4.309238103134475}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -1733,9 +6519,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913281932019863`*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] + CellChangeTimes->{3.9913281932019863`*^9, 3.993828777197198*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"962d51aa-3811-4bd1-9064-4308cff0d55c"] }, Open ]], Cell[CellGroupData[{ @@ -1798,348 +6583,232 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488717861137`*^9},ExpressionUUID->"5a7f9400-1446-9746-a463-\ -bade8ae5c530"], + CellChangeTimes->{3.9918488717861137`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0472568361461936`*^-267\\\", \ -\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 117, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934227676`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1776556969876615`*^-244\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 9, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.993828777487335*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], +In[95]:=",ExpressionUUID->"2c931046-b7f2-4538-a8b5-f4428ff6893c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5836247142456827`*^-279\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 118, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934317894`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.291165901012006`*^-252\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 10, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.993828777492049*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], +In[95]:=",ExpressionUUID->"9023685d-213d-4aff-a870-17980dc21eba"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.3739060311364366`*^-291\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 169, 119, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934409904`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2856227286416077`*^-259\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 95, 11, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.9938287774955473`*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], +In[95]:=",ExpressionUUID->"d46fa355-39b5-40cb-9952-762efe31cd93"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 169, 120, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132819344899*^9}, +during this calculation.\"", 2, 95, 12, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.993828777498981*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], +In[95]:=",ExpressionUUID->"fa0e8c28-9f24-4866-950f-bb4c39cdae74"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lF8XAHBLyVKyG3uEFMKYGQwz56DsSURosWQihJC1QiQhP0lJyVap +JNnNoFULksoeJdEiu0KFeOf96/l8P/c+z33OvefcexU9A+0ZXBwcHF2cHBz/ +f84PND9TTrlB33K0z/3L/V30zlxCpHHvKTBM8n8dbqANKP7Gk9CbAdvGbr2y +M0AIsyvu4e4tBOLk4gVtAzsQnpTM+NtTAY6tJdcm9N3hU4Nt4GzPU1C7MPiY +Qz8IzJRHP870tENecZHVflIs/O3RuzjdMwSUmsu2n1TSodH01o13hb9gQV4o +Q+h8Psh+Yn3z1PgHwVsqqMxVt0HM3614jSk3fgpfyWu9Vwpb1lx/YbeHG+3z +Zyn8zaWAhd+Gsv248akBvVj/Syn49x6R0cjkxh2bQn97S9+HZ9uOp9p95cZs +k+JRwcT7ECqXHZB9ZhUGbareRNUsg462dqJ662ocyeXfdnuxDDJ0zOptHXnx +AS2jMDmmArT6XcxpPrxYHXZT2Cm5AloTjnSoR/PiFnOPdqmLFcDTmznGW8CL +37v2GSYXV0D0yWGZxnFeVDzsYCvYVQFer2KP6yXwYU24ZkG+WiVQGPW0DZX8 +eGP6rWtvcyV0CL5pFnzBj/G7rg7c6qiEIOaQ479efry9Jt0+8GMlFAvwB/Qt +8+OcPJHj23QlKFQ452ZaCeCWY3JqwZJVwLsyt8w7JID9fNm+3Aer4P1l7ccz +Qutwe1/a+z+/quBKx931YSrr0IJAPnbiXxW4Cm5yWzBgt6s1wx+eavgQL7fM +dXAdcnQn7HkrVQ2DAfxGYtXrMCQjypofqmFk25daiosg8q5t17p+phr+TGfd +jy5YjwL3JlpdhGuApS66slK9HuO3tgznSdVA1KE024SW9ch93PNbv2INLPUn +TKT+Wo8W/Ptvk4k1EDvMFH+jJIQS/2A20L4GEtpuOgyGCmGE8yPf5fQaSLkR +84ZLShjvrL7pFMVTC1akwyLiG4WxsGmkwXVdLfA+s3fcpCmMvx9cstARq4WE +YZV+a2Nh7PG59/qxYi0cV2r9lnlYGPvg3snDRrUQkE9YVq0TRkvdF8KfA2th +V065hvVeERzkHxb2flMLQhpXA/czRFBfXD5QoKsW2uoTKgIDRXDg773Rm33s +8fv36GfGi+DrnFLag6+1YCK9bPrxrgi+d+l1PbZYC6TLVnsDl0TwVhfzmYAK +EyQzh89euCaKgqP85l1BTCCoVyf8KRLFVPPq5z9DmSD9NDFmf5kohnLaNqyJ +ZIL89OZjmxpFcTTrhhghjgkqNkHu9SOiuFXgcHJ7OhN0V/2jDOuKIalwzYH7 +pUwgXW3TsaCJ4U8LnpZtFUygEPM17pmJ4bPc+AfvqplAdTdVCncRwwmPeGhv +YIJxw9l1AjFiKCm89+2RFibsDJX4QmwRwwa5KqrQFybYCYwMZHWIYUyISZn8 +dybYF7LeL30Qw0CZlCfKo0xwervvzYspMfQQXWiQnGbCfo3rda7i4qjuJ4zZ +i0zw+6J1/pS7OHrfG34lIMwC/2jO1O+HxTFla0dZpigLAkQ6Em1CxDFEjmYl +LsGCYAw7LpEoji3HrAr+SbMgMqfBu/iuOJYJPBfyU2bBmd2W9PZ59vfVlM/U +kVkgXdUmzcUpgXJfK56P6rGgVHT3bx0BCeSbfsoQprKgu/1A2XkFtvuPdBrT +WaC8K1RplwXbS+6VWmYsYJb9XY61l8Cc86bbRS1YYCMU01+2TwKPrLfaMWHJ +gpA3ZzOFjkog79eYloQdLHi6I4/nbbYEyufOPjfezQKne8rDK9clsCuB5Pje +kQWja4sfaZVKoDXzepD3HhYIt1ZF/PdUAn9+PLnH25UF7lYto7ZjEmjS5EGZ +d2PB7J2dL0/OSaDXBq0IEw92fHxd10tXJLC1/9L+057seJo+7RMUk8Rc/10K +U14s+Gc21/baSBJXeNw77Q+zIL0o6u4/M0nsnXuZtNuXHR8PR5LmLkksZKb8 +tfFjx/Oc3/gcQxJ1V43JKh1hwaByutyDQPb7+XNdy2yHJIgvjEdKIqc21bk9 +gAVXTDdU2qRJYs6rM8/3B7Fg6/Wb/x2/LIn//VCrFT/Kjp9L3b+kUBJfipBi +nrHt5Flm8aFEEt/95lT0DWbBjydklbW1kmhtN53HE8KC44r1nEZP2P/X5bGS +zbZQHA74vZLErfDQRDmUBfponfXqkyRm+U2dkjvGgta8tyGLPyQxxr0kMZVt +9xVHO/VZSXydoXz8J9uzB/o19i5LYohb76GdYez5eujOl8JLQHuuHVbX2ZaW +//a1ToSA68+v3TLJdukJv6ejsgQ0nL/Jpx3OApOP07nSmwg4O1Yy7sN2t1FY +tJUOAZfnWd2X2fbNWdwTZUjAVA/fV4/Y/rcYSyreTkAdinvbR7bT9/II9+0k +YBXVZPgn28r1KRN8rgQcGK1ft8I2U1q4xcCLgIEhJ3ZxRbDnP+pS0eEAAraV +GFYssdsH38vEZ0cQkEeiTHeS7RCDArfmUwQMenP5fTfbVvmCs9apBAwQixFm +sa205nhS20UCOumfybrA9t8jP2R35RFwbc7LgENsv+10Ku+4TUAPcdcrOmzf +Nny23amCgGfH9srNseOPKdTp660noEXHxEIZ2058eQF7nxMQx3QpDLa3Bq3l +HmgjIIXp2C7M9uqeyCz3XgKC4sn2GvZ8f6B9Vx/+TEA1/36D3WxX3dj9mDFG +wCyDPIFR9vqlCDzdPTJLwF1xy1YRbHsGa/3wXSZgdJrO4jJ7vanvc05MrJHC +tsUQhZNsjxSFF/2UlsKVXpV3DHa+PFr3lXpMWQoNR2UZbex8uhRq/+a3phTe +v0SM0mJ7u4nmnyWUwhzWOKk/kAWyd66kxlhJYWwN8bMK27PreRW5dkvha4c+ +mcPs/C38OGS5xlsKk5KrLN/7s/ePbXYDZ4Ok8IB4oSkP23Z3HwSvjZLCTzLe +79XZ9bEScfmq8DkpXBpe/82dXU/7xGwnZCqlcNyocjiYwQLd6Pq43AYprL0g +J8tg1x//kJqE4gspPPzyk4DdQRaw7nOD6nsptEpgKAix61fCmpWuvSKFPkXT +EQb7WDBRrqpSySuNJYoxbTPs+n9GyGSRRaTRseDm70IX9vp/CxiiqkijModI +x5QTez3jlEnbraWx6LGvKGkXC26NnG96uVsaH92+5Vu5kwUnd67sszogjQI1 +oRXqtizQlOs7vfOoNI5Rg5TWWLMgmflfj0uWNHqp7Rs7vI0F26YWogKGpdE0 +eDtjiL1fRlpkbnkyLo3DtH+OS7rs+ijQ7BOdl8bdolC7nsgCwm53AxavDDoX +db1X2sqCcebz39xbZbDh28qqRRUWXDiVHpodIYPp2ZpqYWIsaOrfrDweJ4Ok +nQM9aiIsWCI1dtBTZFDz5ySxaz0LDn2fI365JoP/DWkvSAuw88Fm78zWRhn0 +7Suj7OVkwZC4asCzdbKo3MNTVz7OPh8DH8lJSsriia2c3zjY54tNk/Prwxtk +caOb+YIl+/ypiUrRWK8ri8x68ljzZyYkf5oedXGWRcORY3vjuplAvFPvPVUo +i4uGhkPvHjIhzmiXh7S+HJpO5ZuLpzDB4kDuTz0TOTwqk+154AwTBGPH4h1t +5FDm8Pnv+fFMyGk8XZTuLodNDU7bRI4zgWlVN8ZzVg7Xrj3SX+TPhGnnjWG/ +3sshX12GZI4NEw4cm0tujZZH7oXwT/1r2OdraXbVyUcKeEdQedOAfy1s62n7 +N9mkgMYDHbOrfGrBlmOVuVu7Ak79l0LcdLAWDtoHvIevCniBuErogEstmEUr +xsSu3oAlUW1vL26vhSCF+evG6hsw3LjGWUeuFp555000hm3AhyV1fPrNNeD/ +Zya2aZ0i8vkZ34kVr4G/6kIDmo5KqNAREx3Avu8Z3S3Jv3RpI2bymc09/K8C +ZkSs3J2eKuNYXqwFd1MZfEl1dwpeo4oOAtPvXhXfA8upcMuvlE34YOD8eKF0 +MYwf5A2pilFDc9G0LR99i9j3dUmuM083o+Dz9ys/BK6DyGvVtLKpLchbOmQu +qc6+nyfdt6NQNLDa0jH9fv0VuKxuICTqrYmvOZ63d8lfghZpY/Kv81uRfEdd +1l8jA6iyT9O1urUw4pj3c7dV52Boo/LAjz4tXN2rVus0lgpn1RPVb3zSwqJ8 +ltWB9lTopVq9IPzQwpjjvzAvPxXCXdoXOZe0cJ51svU7LRVcrY/qjgpp4/6u +Ue+06BS4lMQuX4o2cv3slufjTgZB7sJQj1Pa6MYFxl7GZ4Dn7yOHmQRt1L9e +rZCx5QwsT34kxp3Rxl/NlU/eiZ6BqT6pmfxUbcxdvKaV+C0R3lacPzJ4SRtd +LftfP01NhAzPuENud7VRLCPpU/yH0yDx1N15f6c2CvAPKI4lJYB8nIKRi6oO +njxQMhkqegpKQ3iVPqrp4E2NdKYa5ymgH5pZ46Gug9kOgpfHJuNgv3Vjh4+2 +Du4flgjPbYmDHHFvvwiqDm7fOfCm9lQcSBWXXsmy1UG35tCH5XOxINZB+9sV +poMFnQoSIq9jgE9lX439Sx3kf1K9PDMcDb5SYHW3WQfFV9VZuzVFQ8s6pQHu +VnZ/s2dmwyXRkDr/fXX1Wx104lkR1gqLBsGmEEfJPh386jeZ3MkXDSJ+KbP9 +4zo4M/0rypocBbLldUSGCBF9Dszan8uJgK00qfvh+4n49U3c4Jk7x6By4+FF +Lncijhb9c3E+fwz0+VnmaZ5ELHdJuQeRx8Ckx3nwhjcRM428Cu0tj4HT0cvC +7UeJeLqpniNpNBRibkqGaiQSUXmQkaqkEwpv10kYfC4l4hFl0/pbbcHgOMs4 +7V9ORLfO4EwSKxj6+qrf/a4k4i+uWZvu68Hw5ZajryCLiA93f5FzjgyGP8YX +rxo2EtF1KTrNQSUYFMPEli/2EDHl/iGSbNxRCB4QabTi0MVsXTfeZPMgaHqx +70Exly4WZNa69pCDQP5+US3/al08UP+HQlYOgpYYakkLny42FYrsV+IMAiVF +z4tWorroG3RY4VR4ILw7WO5tpaqLrMQVIwGfAND+sXOtlY0udtzeX1nu7g+J +77J5im118dq9Q0No7A8fWMMc/Lt0UfGPKnlS0R+SksPnmh11cXzWcbRw2A8G +1fMGLN10sV3TRTzYxw/SAybLLIN1sfOETe6FcF+Y+pXqaHlZF0lxUmLmd33g +Q2+B07UruvjgbY/54n8+0PKgZs9Mji4+IZJeNIf6wI0zgy7ZBbrIN3lkVzXd +B1xlSAd+FOtiqfcF32cd3vDcpP/Q2Qe6SP/Nva6cyxuunt8c0TzE7u/oDQYh +DEgKo0fKfdXF1f8ECEJ7GRC21yHq6HdddPig3rhswgA7lRPHpcZ1caokYNtG +UQbwsN7GHp5jt59SG0is8oKjg+Fn+XhJqN3hP3Jr8SCYa724YqlJQp2dTPKb +K57gzGOx+60WCV++FIwtifcE34/N6/YQSeg1w5K57u8JaSmvY730SHjZo3us +n+4J3d87D8UYk1CddS8k8osHeOUPE6sdSegx0R1iR/KAU8KcrzacJKHvRhGz +W6/cIHPkVMKtWBImHdz42e26GxQ9WkXfGk9C487M/O3RbtByhLfcMImEm5uk +v2Spu4Fwy/ospwwSLic7j9inHYD8U/IHU4tIKHC9++Ly3v3w8Jfh4u82Er6I +MKtcL7kXClprPR3ekXBPRK9NyLwrJNzUbSntIGFzIvX13y5XsNyjns3oJaH/ +woNVgRddobNOWq/jMwm57xwdnhd3hdG4v8GlsyRcuFhi4SHnAhJCtaNe0mRk +yDlqt27bA39HiPaPZclY4FJktkttD3x4UsqSUSDjKuW9J+YE9kBBSFFS+0Yy +zhmH9F7pcAKNnouqqElGQ+P9ik5eTmCSG+opg2Qkxj9SCEtxhAANYt87Bhmp +mc5Tl6cc4Nhv6QU3HzKWMz6q1XY6wPGn3NKTvmTkdvw4NMdygBTnLhf+IDLu +9Hm3qzPBAW4nRLw3iSIj7c5siLCsAwx9eNhbmUbGmw25w4F29uB0zrrnYi0Z +O3Oi7vS/sYP9zqTfG+vI6Oa98riFaQdeG+UkKxrIuMEO93QX2EEIa9Kp7QkZ +TygnJJqE2kH61/PdPK1kbFOKue4nbQcttN6u8EEyClXcSn7dYwu0Sa9OFz4K +cpE9/Hy324BEvXlhgwAFo7kq7p/fYAOTZ7YEKQhSsILatu/LojXkKk4LfBWh +4PjVuyBQaQ3Lu6NNg2Qp+Ib7oYPrRmt4VH++IlGLgm5DL872CFiB8dmH6ZWO +FHR9zVBUXjQHaaeCAxLOFBRZ172W0W8OP5USNCJdKSjjrCLZWm8OhQ2WTXQ3 +Cj5RMB8ROGEOXNOdK80+FLzE67jRltMcGp3GAgajKTgYllBQJ2QG25UJO9YV +UlAhvu/BJqttUDXxXNHrBgU1Q205fLW2gXJtyHxdEQUL5885toptg1VWb/J8 +7lJQfjWhfPqTKTwNTPzZWEVBvaP7YqrCTYFeP5sV9ZKCBxMtggTumQDF/t3Q +93EKqsnImIptNYYimZha+hQFX0VYBUtJGoP4V43UizMU9C42LqNyGMNseBLZ +dJ6Cce9dP71tR6i4Bkm5KxSc+DPzyCISQevHPU1HET0UzuNQyr4EoBabHPFU +Tw9v3HuxtWo1DRoMb662oeqhpc5pzn99RmD3+1FGl5Ee2iwIHYwpM4KIgLmS +EWM9nP/04aHWPiNo2uf+WdBGD/MeJh3QqzEEHwOK1V53PaTZ11neCqXCnZ+f +ZWaT9NDr2iIXSukDvXTp9okUPYyxZ2yhzulB+2FJypo0PRznfNTIeKcHC4M2 +dtIX9FD1/UsXu2Q9sHpTm4DX2O+rXo/xX6bA6N1zE6nlerj6j9xw6hQZtjAM +Hqn06WHG/JzCh1+68J+S7UL8Bz3c9O6LS1aPLsx+8iQPDehhc95oaHi9Ljx0 +Tb2bO6yH7cqJBTfjdcHe7lOW5IQeKtTEq1SL60Kk4ekgPg59TGrP+BGNRGgS +fqc4oaKPGX+6Us7e1wbNN1/3Wavpo75YxMH0LG3ISF3IurNFH39m9/LUxmjD +vjXKgoe09NFqqpNw0E4bppbCFgb09bEhKy/T65sWSIzIdry11sfUugdthBNb +gfHQJ6HqqD4OtzybOdStDpNHRsO3h+qjYWDBTHixOkTI+ft1h7H7C/PKNJ9U +h+TjgfZ/ovXx+KfDWVvU1KGMGrbBKFEff/Sk8nw+sQWWauIbGq/oY1xtRVQH +aTNk3M+dbW/UxxMCF8fz2lRB1m3DyMEX+vigTXOMUKwKNwUL+2eb2OPn3dva +dFoVmEduPpVo08e03afdmmiq8FG9JN21Vx9XaiMizctUQO02S2NoXB9DndS2 +cuUpw6P8Tq8ZcQMsarjDOlOgBIM2im5hBAOUDlc61xavBBx/j7gsShvgT071 +CONDSmCya43t6g0GWGIZWVSsrgQvOKl6UlsMUGU5fDKeqQitnnl8xnQDlCl/ +zVDo2wB9yr6l6YcM8POv2mvDYfKw+LbmtvhhA4wc/MO4sl0eZE9wX7/iZ8DO +33fRV8XkYX9XTtaNIAPcVJI8H1UpB4On38QyowxQVcxk/Y1ZWfj+jeQwmGaA +ulnTOeYJMjB7e+W3Vq0B/jpZ667bTYBvTmb5Z1kGmHzu8Yh2GQF6V52zGK43 +wL3P+J96JROg3l06+9JjA/SpSbYOAAKcIpCp/5oN0DXtLBdniSQIJfkeb/lg +gHYRf+xG0iRAw7uLg8FFxZy1E74/IsVAXlz2zsNVVPT0NFXUdBUDoUbPXYQ1 +VPz4wbk/lyoGv+SnC14JUDF9wYghsCQKdd38pkRxKj5fcNnMFScKFmZ4emUT +FQ8Gb9IgXhCBgyp3+a7soOL8GgMv3h4hiHp+wFfVjor2JdxunnVCkM4QeVVh +T8VrP4LWjF4Tgoabkamv9lAx8s7J3XEMIRBTtVj/z4OK07G9uucn1sML1a9i +7mFULPduTuE0FYQtagobVPPY30vaHPVEXQCwqT22ooCKHV9uWf1Y4gcnn8TP +9BtUhNf50/va+CH+9kThnjtUpLT0zasE88MHtQaVs5VU1NZZLCQ+4IO0zS7q +4y+pGNiGCt3uvDCz5QKlYpqKh6+Yc3j0r4beVtwu+ouK77fJ32TVrobHAZMO +oXNUDI4+umyRuRrSKiyPUhao+K/AIIvfdjVsoXKU1HEb4hBj1azQs1XgaXlE +sVHCEK9NMcgjLG7o9DZf22lkiKyo96GNLZxQzzcnTQZDbCK3ihy8xwmFdws3 +XzI2xEDOEk/tdE4Imvpn5mxmiEcy59c7OHHCuvCquA87DTEzUyaq/AsHmCUq +/v7iaYjeTRpHr/BxAPPG4ue5JEM8WRVu2/dliU4xDf1tlWKI+jdzGxOql+jV +n8fX5p8zRCuJHM+IxCV6hfyAnlWGITruaI4w2LxEL7n8+FzuVUO0tOPLkwxe +pOennjYwLzXEs5/t9o0KLdDPhq4/f7nDECvbeuUNYn/TeUWTiia6DFGv4Eex +mctvemI5R4NJryHKFT3VPU/8TU+YnPk2/sEQl3msevq/ztNP+nQaGX8zxHvJ +Bo9pO+fpwfuyR378McQUskzQiMYc3XXbRjSUN0JfuzD/C8K/6P86eQUbNxjh +XGP27e+TP+n5jMl+q41GWCPwNDm89Sf9WyIr3FWN7fDdTyySftKDm3fejyQa +ofyHuawirp/0ZNvj8kwzIxyy/spc5pyh1zl3LZECjfCv77WPjF2T9P0/6loa +jhohQ8DG5rLUJJ0jKv/ytlAjrL/tIqgxNEE3u+pH2h1phJKnw4WOhU7Q2z9y ++ofEG+HK35AP0dfG6aOeW/vLs4ywSmGbRDfHGF3myBnW1sdGqGSc/a2Wd4Se +tnKInPLUCPesJj+bGPhO58owK//+zAhzHv294FP9nT5as/pOfrMRXvT7ekD9 +4Hd6HUfCZZEOI2z0Wy/R9+Qb3TUzNnz+qxGOlLVejEv5Sr9cH0l+KEDDvO5G +JdMdw/S1ti7l0oI0vEOosndQH6bHDuprhgvRcBfTn5jDN0z3Wf1HWVuchnbu +hGvdL4boejvDxArladhHGDz5xXSI3j0U/Ou0Dg25E/tEpCw+08X5/ct37KGh +QdHeJPOJAfoN0xNR0y40tLUvzpq8P0AnnkgzvbCPhmt313vzhQzQbafLuno9 +aHiW67ho1sJHemL33N+D/jTkYqgylgQ/0v8UxphExdEwv2TwgrFNPz3xQ7qA +XAINz/TlLr0Q76eLSRR2PkqkoWzzxOfKT3107bPPDq1OpeEGmc20J6F99MOB +fCnpl2i4/zwP5dL19/Q+wwsdRXfZ8W/aIXJOtJfuc+xGjmUpDV0+u38mD/fQ +50urGeNl7P75HoqGlT10EaXe3zo1NPQJ1XZx3t1Dt+aVk33wmIa+byJvv7rS +TW/oLPLq6KLh3QbFnXz6XXQrQaZmWC8NcZMHaK7roveaN88T+mm4+WVN2fWh +Tvps3VjSgUEaWg2MPjyd1knXLNC+92OUhie1/7gKjnbQG/qMw1InaPi9dI98 +zZMOupWYA2hN03DOYqH1bnYH/dCZY+9C52jY9ie58qRVB332ceIVyT809FPK +fue6sYN+aiHrYN0CDekXNt06tdROFyLd0dj/j4bD+bl35rra6blH6uZWVtjt +Ert3Vt5vp/8PCmQ1Xw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2153,307 +6822,188 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV1nk8lF8XAHBLyVKyG3uEFMKYGQwz56DsSURosWQihJC1QiQhP0lJyVap +JNnNoFULksoeJdEiu0KFeOf96/l8P/c+z33OvefcexU9A+0ZXBwcHF2cHBz/ +f84PND9TTrlB33K0z/3L/V30zlxCpHHvKTBM8n8dbqANKP7Gk9CbAdvGbr2y +M0AIsyvu4e4tBOLk4gVtAzsQnpTM+NtTAY6tJdcm9N3hU4Nt4GzPU1C7MPiY +Qz8IzJRHP870tENecZHVflIs/O3RuzjdMwSUmsu2n1TSodH01o13hb9gQV4o +Q+h8Psh+Yn3z1PgHwVsqqMxVt0HM3614jSk3fgpfyWu9Vwpb1lx/YbeHG+3z +Zyn8zaWAhd+Gsv248akBvVj/Syn49x6R0cjkxh2bQn97S9+HZ9uOp9p95cZs +k+JRwcT7ECqXHZB9ZhUGbareRNUsg462dqJ662ocyeXfdnuxDDJ0zOptHXnx +AS2jMDmmArT6XcxpPrxYHXZT2Cm5AloTjnSoR/PiFnOPdqmLFcDTmznGW8CL +37v2GSYXV0D0yWGZxnFeVDzsYCvYVQFer2KP6yXwYU24ZkG+WiVQGPW0DZX8 +eGP6rWtvcyV0CL5pFnzBj/G7rg7c6qiEIOaQ479efry9Jt0+8GMlFAvwB/Qt +8+OcPJHj23QlKFQ452ZaCeCWY3JqwZJVwLsyt8w7JID9fNm+3Aer4P1l7ccz +Qutwe1/a+z+/quBKx931YSrr0IJAPnbiXxW4Cm5yWzBgt6s1wx+eavgQL7fM +dXAdcnQn7HkrVQ2DAfxGYtXrMCQjypofqmFk25daiosg8q5t17p+phr+TGfd +jy5YjwL3JlpdhGuApS66slK9HuO3tgznSdVA1KE024SW9ch93PNbv2INLPUn +TKT+Wo8W/Ptvk4k1EDvMFH+jJIQS/2A20L4GEtpuOgyGCmGE8yPf5fQaSLkR +84ZLShjvrL7pFMVTC1akwyLiG4WxsGmkwXVdLfA+s3fcpCmMvx9cstARq4WE +YZV+a2Nh7PG59/qxYi0cV2r9lnlYGPvg3snDRrUQkE9YVq0TRkvdF8KfA2th +V065hvVeERzkHxb2flMLQhpXA/czRFBfXD5QoKsW2uoTKgIDRXDg773Rm33s +8fv36GfGi+DrnFLag6+1YCK9bPrxrgi+d+l1PbZYC6TLVnsDl0TwVhfzmYAK +EyQzh89euCaKgqP85l1BTCCoVyf8KRLFVPPq5z9DmSD9NDFmf5kohnLaNqyJ +ZIL89OZjmxpFcTTrhhghjgkqNkHu9SOiuFXgcHJ7OhN0V/2jDOuKIalwzYH7 +pUwgXW3TsaCJ4U8LnpZtFUygEPM17pmJ4bPc+AfvqplAdTdVCncRwwmPeGhv +YIJxw9l1AjFiKCm89+2RFibsDJX4QmwRwwa5KqrQFybYCYwMZHWIYUyISZn8 +dybYF7LeL30Qw0CZlCfKo0xwervvzYspMfQQXWiQnGbCfo3rda7i4qjuJ4zZ +i0zw+6J1/pS7OHrfG34lIMwC/2jO1O+HxTFla0dZpigLAkQ6Em1CxDFEjmYl +LsGCYAw7LpEoji3HrAr+SbMgMqfBu/iuOJYJPBfyU2bBmd2W9PZ59vfVlM/U +kVkgXdUmzcUpgXJfK56P6rGgVHT3bx0BCeSbfsoQprKgu/1A2XkFtvuPdBrT +WaC8K1RplwXbS+6VWmYsYJb9XY61l8Cc86bbRS1YYCMU01+2TwKPrLfaMWHJ +gpA3ZzOFjkog79eYloQdLHi6I4/nbbYEyufOPjfezQKne8rDK9clsCuB5Pje +kQWja4sfaZVKoDXzepD3HhYIt1ZF/PdUAn9+PLnH25UF7lYto7ZjEmjS5EGZ +d2PB7J2dL0/OSaDXBq0IEw92fHxd10tXJLC1/9L+057seJo+7RMUk8Rc/10K +U14s+Gc21/baSBJXeNw77Q+zIL0o6u4/M0nsnXuZtNuXHR8PR5LmLkksZKb8 +tfFjx/Oc3/gcQxJ1V43JKh1hwaByutyDQPb7+XNdy2yHJIgvjEdKIqc21bk9 +gAVXTDdU2qRJYs6rM8/3B7Fg6/Wb/x2/LIn//VCrFT/Kjp9L3b+kUBJfipBi +nrHt5Flm8aFEEt/95lT0DWbBjydklbW1kmhtN53HE8KC44r1nEZP2P/X5bGS +zbZQHA74vZLErfDQRDmUBfponfXqkyRm+U2dkjvGgta8tyGLPyQxxr0kMZVt +9xVHO/VZSXydoXz8J9uzB/o19i5LYohb76GdYez5eujOl8JLQHuuHVbX2ZaW +//a1ToSA68+v3TLJdukJv6ejsgQ0nL/Jpx3OApOP07nSmwg4O1Yy7sN2t1FY +tJUOAZfnWd2X2fbNWdwTZUjAVA/fV4/Y/rcYSyreTkAdinvbR7bT9/II9+0k +YBXVZPgn28r1KRN8rgQcGK1ft8I2U1q4xcCLgIEhJ3ZxRbDnP+pS0eEAAraV +GFYssdsH38vEZ0cQkEeiTHeS7RCDArfmUwQMenP5fTfbVvmCs9apBAwQixFm +sa205nhS20UCOumfybrA9t8jP2R35RFwbc7LgENsv+10Ku+4TUAPcdcrOmzf +Nny23amCgGfH9srNseOPKdTp660noEXHxEIZ2058eQF7nxMQx3QpDLa3Bq3l +HmgjIIXp2C7M9uqeyCz3XgKC4sn2GvZ8f6B9Vx/+TEA1/36D3WxX3dj9mDFG +wCyDPIFR9vqlCDzdPTJLwF1xy1YRbHsGa/3wXSZgdJrO4jJ7vanvc05MrJHC +tsUQhZNsjxSFF/2UlsKVXpV3DHa+PFr3lXpMWQoNR2UZbex8uhRq/+a3phTe +v0SM0mJ7u4nmnyWUwhzWOKk/kAWyd66kxlhJYWwN8bMK27PreRW5dkvha4c+ +mcPs/C38OGS5xlsKk5KrLN/7s/ePbXYDZ4Ok8IB4oSkP23Z3HwSvjZLCTzLe +79XZ9bEScfmq8DkpXBpe/82dXU/7xGwnZCqlcNyocjiYwQLd6Pq43AYprL0g +J8tg1x//kJqE4gspPPzyk4DdQRaw7nOD6nsptEpgKAix61fCmpWuvSKFPkXT +EQb7WDBRrqpSySuNJYoxbTPs+n9GyGSRRaTRseDm70IX9vp/CxiiqkijModI +x5QTez3jlEnbraWx6LGvKGkXC26NnG96uVsaH92+5Vu5kwUnd67sszogjQI1 +oRXqtizQlOs7vfOoNI5Rg5TWWLMgmflfj0uWNHqp7Rs7vI0F26YWogKGpdE0 +eDtjiL1fRlpkbnkyLo3DtH+OS7rs+ijQ7BOdl8bdolC7nsgCwm53AxavDDoX +db1X2sqCcebz39xbZbDh28qqRRUWXDiVHpodIYPp2ZpqYWIsaOrfrDweJ4Ok +nQM9aiIsWCI1dtBTZFDz5ySxaz0LDn2fI365JoP/DWkvSAuw88Fm78zWRhn0 +7Suj7OVkwZC4asCzdbKo3MNTVz7OPh8DH8lJSsriia2c3zjY54tNk/Prwxtk +caOb+YIl+/ypiUrRWK8ri8x68ljzZyYkf5oedXGWRcORY3vjuplAvFPvPVUo +i4uGhkPvHjIhzmiXh7S+HJpO5ZuLpzDB4kDuTz0TOTwqk+154AwTBGPH4h1t +5FDm8Pnv+fFMyGk8XZTuLodNDU7bRI4zgWlVN8ZzVg7Xrj3SX+TPhGnnjWG/ +3sshX12GZI4NEw4cm0tujZZH7oXwT/1r2OdraXbVyUcKeEdQedOAfy1s62n7 +N9mkgMYDHbOrfGrBlmOVuVu7Ak79l0LcdLAWDtoHvIevCniBuErogEstmEUr +xsSu3oAlUW1vL26vhSCF+evG6hsw3LjGWUeuFp555000hm3AhyV1fPrNNeD/ +Zya2aZ0i8vkZ34kVr4G/6kIDmo5KqNAREx3Avu8Z3S3Jv3RpI2bymc09/K8C +ZkSs3J2eKuNYXqwFd1MZfEl1dwpeo4oOAtPvXhXfA8upcMuvlE34YOD8eKF0 +MYwf5A2pilFDc9G0LR99i9j3dUmuM083o+Dz9ys/BK6DyGvVtLKpLchbOmQu +qc6+nyfdt6NQNLDa0jH9fv0VuKxuICTqrYmvOZ63d8lfghZpY/Kv81uRfEdd +1l8jA6iyT9O1urUw4pj3c7dV52Boo/LAjz4tXN2rVus0lgpn1RPVb3zSwqJ8 +ltWB9lTopVq9IPzQwpjjvzAvPxXCXdoXOZe0cJ51svU7LRVcrY/qjgpp4/6u +Ue+06BS4lMQuX4o2cv3slufjTgZB7sJQj1Pa6MYFxl7GZ4Dn7yOHmQRt1L9e +rZCx5QwsT34kxp3Rxl/NlU/eiZ6BqT6pmfxUbcxdvKaV+C0R3lacPzJ4SRtd +LftfP01NhAzPuENud7VRLCPpU/yH0yDx1N15f6c2CvAPKI4lJYB8nIKRi6oO +njxQMhkqegpKQ3iVPqrp4E2NdKYa5ymgH5pZ46Gug9kOgpfHJuNgv3Vjh4+2 +Du4flgjPbYmDHHFvvwiqDm7fOfCm9lQcSBWXXsmy1UG35tCH5XOxINZB+9sV +poMFnQoSIq9jgE9lX439Sx3kf1K9PDMcDb5SYHW3WQfFV9VZuzVFQ8s6pQHu +VnZ/s2dmwyXRkDr/fXX1Wx104lkR1gqLBsGmEEfJPh386jeZ3MkXDSJ+KbP9 +4zo4M/0rypocBbLldUSGCBF9Dszan8uJgK00qfvh+4n49U3c4Jk7x6By4+FF +Lncijhb9c3E+fwz0+VnmaZ5ELHdJuQeRx8Ckx3nwhjcRM428Cu0tj4HT0cvC +7UeJeLqpniNpNBRibkqGaiQSUXmQkaqkEwpv10kYfC4l4hFl0/pbbcHgOMs4 +7V9ORLfO4EwSKxj6+qrf/a4k4i+uWZvu68Hw5ZajryCLiA93f5FzjgyGP8YX +rxo2EtF1KTrNQSUYFMPEli/2EDHl/iGSbNxRCB4QabTi0MVsXTfeZPMgaHqx +70Exly4WZNa69pCDQP5+US3/al08UP+HQlYOgpYYakkLny42FYrsV+IMAiVF +z4tWorroG3RY4VR4ILw7WO5tpaqLrMQVIwGfAND+sXOtlY0udtzeX1nu7g+J +77J5im118dq9Q0No7A8fWMMc/Lt0UfGPKnlS0R+SksPnmh11cXzWcbRw2A8G +1fMGLN10sV3TRTzYxw/SAybLLIN1sfOETe6FcF+Y+pXqaHlZF0lxUmLmd33g +Q2+B07UruvjgbY/54n8+0PKgZs9Mji4+IZJeNIf6wI0zgy7ZBbrIN3lkVzXd +B1xlSAd+FOtiqfcF32cd3vDcpP/Q2Qe6SP/Nva6cyxuunt8c0TzE7u/oDQYh +DEgKo0fKfdXF1f8ECEJ7GRC21yHq6HdddPig3rhswgA7lRPHpcZ1caokYNtG +UQbwsN7GHp5jt59SG0is8oKjg+Fn+XhJqN3hP3Jr8SCYa724YqlJQp2dTPKb +K57gzGOx+60WCV++FIwtifcE34/N6/YQSeg1w5K57u8JaSmvY730SHjZo3us +n+4J3d87D8UYk1CddS8k8osHeOUPE6sdSegx0R1iR/KAU8KcrzacJKHvRhGz +W6/cIHPkVMKtWBImHdz42e26GxQ9WkXfGk9C487M/O3RbtByhLfcMImEm5uk +v2Spu4Fwy/ospwwSLic7j9inHYD8U/IHU4tIKHC9++Ly3v3w8Jfh4u82Er6I +MKtcL7kXClprPR3ekXBPRK9NyLwrJNzUbSntIGFzIvX13y5XsNyjns3oJaH/ +woNVgRddobNOWq/jMwm57xwdnhd3hdG4v8GlsyRcuFhi4SHnAhJCtaNe0mRk +yDlqt27bA39HiPaPZclY4FJktkttD3x4UsqSUSDjKuW9J+YE9kBBSFFS+0Yy +zhmH9F7pcAKNnouqqElGQ+P9ik5eTmCSG+opg2Qkxj9SCEtxhAANYt87Bhmp +mc5Tl6cc4Nhv6QU3HzKWMz6q1XY6wPGn3NKTvmTkdvw4NMdygBTnLhf+IDLu +9Hm3qzPBAW4nRLw3iSIj7c5siLCsAwx9eNhbmUbGmw25w4F29uB0zrrnYi0Z +O3Oi7vS/sYP9zqTfG+vI6Oa98riFaQdeG+UkKxrIuMEO93QX2EEIa9Kp7QkZ +TygnJJqE2kH61/PdPK1kbFOKue4nbQcttN6u8EEyClXcSn7dYwu0Sa9OFz4K +cpE9/Hy324BEvXlhgwAFo7kq7p/fYAOTZ7YEKQhSsILatu/LojXkKk4LfBWh +4PjVuyBQaQ3Lu6NNg2Qp+Ib7oYPrRmt4VH++IlGLgm5DL872CFiB8dmH6ZWO +FHR9zVBUXjQHaaeCAxLOFBRZ172W0W8OP5USNCJdKSjjrCLZWm8OhQ2WTXQ3 +Cj5RMB8ROGEOXNOdK80+FLzE67jRltMcGp3GAgajKTgYllBQJ2QG25UJO9YV +UlAhvu/BJqttUDXxXNHrBgU1Q205fLW2gXJtyHxdEQUL5885toptg1VWb/J8 +7lJQfjWhfPqTKTwNTPzZWEVBvaP7YqrCTYFeP5sV9ZKCBxMtggTumQDF/t3Q +93EKqsnImIptNYYimZha+hQFX0VYBUtJGoP4V43UizMU9C42LqNyGMNseBLZ +dJ6Cce9dP71tR6i4Bkm5KxSc+DPzyCISQevHPU1HET0UzuNQyr4EoBabHPFU +Tw9v3HuxtWo1DRoMb662oeqhpc5pzn99RmD3+1FGl5Ee2iwIHYwpM4KIgLmS +EWM9nP/04aHWPiNo2uf+WdBGD/MeJh3QqzEEHwOK1V53PaTZ11neCqXCnZ+f +ZWaT9NDr2iIXSukDvXTp9okUPYyxZ2yhzulB+2FJypo0PRznfNTIeKcHC4M2 +dtIX9FD1/UsXu2Q9sHpTm4DX2O+rXo/xX6bA6N1zE6nlerj6j9xw6hQZtjAM +Hqn06WHG/JzCh1+68J+S7UL8Bz3c9O6LS1aPLsx+8iQPDehhc95oaHi9Ljx0 +Tb2bO6yH7cqJBTfjdcHe7lOW5IQeKtTEq1SL60Kk4ekgPg59TGrP+BGNRGgS +fqc4oaKPGX+6Us7e1wbNN1/3Wavpo75YxMH0LG3ISF3IurNFH39m9/LUxmjD +vjXKgoe09NFqqpNw0E4bppbCFgb09bEhKy/T65sWSIzIdry11sfUugdthBNb +gfHQJ6HqqD4OtzybOdStDpNHRsO3h+qjYWDBTHixOkTI+ft1h7H7C/PKNJ9U +h+TjgfZ/ovXx+KfDWVvU1KGMGrbBKFEff/Sk8nw+sQWWauIbGq/oY1xtRVQH +aTNk3M+dbW/UxxMCF8fz2lRB1m3DyMEX+vigTXOMUKwKNwUL+2eb2OPn3dva +dFoVmEduPpVo08e03afdmmiq8FG9JN21Vx9XaiMizctUQO02S2NoXB9DndS2 +cuUpw6P8Tq8ZcQMsarjDOlOgBIM2im5hBAOUDlc61xavBBx/j7gsShvgT071 +CONDSmCya43t6g0GWGIZWVSsrgQvOKl6UlsMUGU5fDKeqQitnnl8xnQDlCl/ +zVDo2wB9yr6l6YcM8POv2mvDYfKw+LbmtvhhA4wc/MO4sl0eZE9wX7/iZ8DO +33fRV8XkYX9XTtaNIAPcVJI8H1UpB4On38QyowxQVcxk/Y1ZWfj+jeQwmGaA +ulnTOeYJMjB7e+W3Vq0B/jpZ667bTYBvTmb5Z1kGmHzu8Yh2GQF6V52zGK43 +wL3P+J96JROg3l06+9JjA/SpSbYOAAKcIpCp/5oN0DXtLBdniSQIJfkeb/lg +gHYRf+xG0iRAw7uLg8FFxZy1E74/IsVAXlz2zsNVVPT0NFXUdBUDoUbPXYQ1 +VPz4wbk/lyoGv+SnC14JUDF9wYghsCQKdd38pkRxKj5fcNnMFScKFmZ4emUT +FQ8Gb9IgXhCBgyp3+a7soOL8GgMv3h4hiHp+wFfVjor2JdxunnVCkM4QeVVh +T8VrP4LWjF4Tgoabkamv9lAx8s7J3XEMIRBTtVj/z4OK07G9uucn1sML1a9i +7mFULPduTuE0FYQtagobVPPY30vaHPVEXQCwqT22ooCKHV9uWf1Y4gcnn8TP +9BtUhNf50/va+CH+9kThnjtUpLT0zasE88MHtQaVs5VU1NZZLCQ+4IO0zS7q +4y+pGNiGCt3uvDCz5QKlYpqKh6+Yc3j0r4beVtwu+ouK77fJ32TVrobHAZMO +oXNUDI4+umyRuRrSKiyPUhao+K/AIIvfdjVsoXKU1HEb4hBj1azQs1XgaXlE +sVHCEK9NMcgjLG7o9DZf22lkiKyo96GNLZxQzzcnTQZDbCK3ihy8xwmFdws3 +XzI2xEDOEk/tdE4Imvpn5mxmiEcy59c7OHHCuvCquA87DTEzUyaq/AsHmCUq +/v7iaYjeTRpHr/BxAPPG4ue5JEM8WRVu2/dliU4xDf1tlWKI+jdzGxOql+jV +n8fX5p8zRCuJHM+IxCV6hfyAnlWGITruaI4w2LxEL7n8+FzuVUO0tOPLkwxe +pOennjYwLzXEs5/t9o0KLdDPhq4/f7nDECvbeuUNYn/TeUWTiia6DFGv4Eex +mctvemI5R4NJryHKFT3VPU/8TU+YnPk2/sEQl3msevq/ztNP+nQaGX8zxHvJ +Bo9pO+fpwfuyR378McQUskzQiMYc3XXbRjSUN0JfuzD/C8K/6P86eQUbNxjh +XGP27e+TP+n5jMl+q41GWCPwNDm89Sf9WyIr3FWN7fDdTyySftKDm3fejyQa +ofyHuawirp/0ZNvj8kwzIxyy/spc5pyh1zl3LZECjfCv77WPjF2T9P0/6loa +jhohQ8DG5rLUJJ0jKv/ytlAjrL/tIqgxNEE3u+pH2h1phJKnw4WOhU7Q2z9y ++ofEG+HK35AP0dfG6aOeW/vLs4ywSmGbRDfHGF3myBnW1sdGqGSc/a2Wd4Se +tnKInPLUCPesJj+bGPhO58owK//+zAhzHv294FP9nT5as/pOfrMRXvT7ekD9 +4Hd6HUfCZZEOI2z0Wy/R9+Qb3TUzNnz+qxGOlLVejEv5Sr9cH0l+KEDDvO5G +JdMdw/S1ti7l0oI0vEOosndQH6bHDuprhgvRcBfTn5jDN0z3Wf1HWVuchnbu +hGvdL4boejvDxArladhHGDz5xXSI3j0U/Ou0Dg25E/tEpCw+08X5/ct37KGh +QdHeJPOJAfoN0xNR0y40tLUvzpq8P0AnnkgzvbCPhmt313vzhQzQbafLuno9 +aHiW67ho1sJHemL33N+D/jTkYqgylgQ/0v8UxphExdEwv2TwgrFNPz3xQ7qA +XAINz/TlLr0Q76eLSRR2PkqkoWzzxOfKT3107bPPDq1OpeEGmc20J6F99MOB +fCnpl2i4/zwP5dL19/Q+wwsdRXfZ8W/aIXJOtJfuc+xGjmUpDV0+u38mD/fQ +50urGeNl7P75HoqGlT10EaXe3zo1NPQJ1XZx3t1Dt+aVk33wmIa+byJvv7rS +TW/oLPLq6KLh3QbFnXz6XXQrQaZmWC8NcZMHaK7roveaN88T+mm4+WVN2fWh +Tvps3VjSgUEaWg2MPjyd1knXLNC+92OUhie1/7gKjnbQG/qMw1InaPi9dI98 +zZMOupWYA2hN03DOYqH1bnYH/dCZY+9C52jY9ie58qRVB332ceIVyT809FPK +fue6sYN+aiHrYN0CDekXNt06tdROFyLd0dj/j4bD+bl35rra6blH6uZWVtjt +Ert3Vt5vp/8PCmQ1Xw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.09948744287016863}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -2465,19 +7015,19 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.09948744287016863}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2491,306 +7041,187 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV1nk8lF8XAHBLyVKyG3uEFMKYGQwz56DsSURosWQihJC1QiQhP0lJyVap +JNnNoFULksoeJdEiu0KFeOf96/l8P/c+z33OvefcexU9A+0ZXBwcHF2cHBz/ +f84PND9TTrlB33K0z/3L/V30zlxCpHHvKTBM8n8dbqANKP7Gk9CbAdvGbr2y +M0AIsyvu4e4tBOLk4gVtAzsQnpTM+NtTAY6tJdcm9N3hU4Nt4GzPU1C7MPiY +Qz8IzJRHP870tENecZHVflIs/O3RuzjdMwSUmsu2n1TSodH01o13hb9gQV4o +Q+h8Psh+Yn3z1PgHwVsqqMxVt0HM3614jSk3fgpfyWu9Vwpb1lx/YbeHG+3z +Zyn8zaWAhd+Gsv248akBvVj/Syn49x6R0cjkxh2bQn97S9+HZ9uOp9p95cZs +k+JRwcT7ECqXHZB9ZhUGbareRNUsg462dqJ662ocyeXfdnuxDDJ0zOptHXnx +AS2jMDmmArT6XcxpPrxYHXZT2Cm5AloTjnSoR/PiFnOPdqmLFcDTmznGW8CL +37v2GSYXV0D0yWGZxnFeVDzsYCvYVQFer2KP6yXwYU24ZkG+WiVQGPW0DZX8 +eGP6rWtvcyV0CL5pFnzBj/G7rg7c6qiEIOaQ479efry9Jt0+8GMlFAvwB/Qt +8+OcPJHj23QlKFQ452ZaCeCWY3JqwZJVwLsyt8w7JID9fNm+3Aer4P1l7ccz +Qutwe1/a+z+/quBKx931YSrr0IJAPnbiXxW4Cm5yWzBgt6s1wx+eavgQL7fM +dXAdcnQn7HkrVQ2DAfxGYtXrMCQjypofqmFk25daiosg8q5t17p+phr+TGfd +jy5YjwL3JlpdhGuApS66slK9HuO3tgznSdVA1KE024SW9ch93PNbv2INLPUn +TKT+Wo8W/Ptvk4k1EDvMFH+jJIQS/2A20L4GEtpuOgyGCmGE8yPf5fQaSLkR +84ZLShjvrL7pFMVTC1akwyLiG4WxsGmkwXVdLfA+s3fcpCmMvx9cstARq4WE +YZV+a2Nh7PG59/qxYi0cV2r9lnlYGPvg3snDRrUQkE9YVq0TRkvdF8KfA2th +V065hvVeERzkHxb2flMLQhpXA/czRFBfXD5QoKsW2uoTKgIDRXDg773Rm33s +8fv36GfGi+DrnFLag6+1YCK9bPrxrgi+d+l1PbZYC6TLVnsDl0TwVhfzmYAK +EyQzh89euCaKgqP85l1BTCCoVyf8KRLFVPPq5z9DmSD9NDFmf5kohnLaNqyJ +ZIL89OZjmxpFcTTrhhghjgkqNkHu9SOiuFXgcHJ7OhN0V/2jDOuKIalwzYH7 +pUwgXW3TsaCJ4U8LnpZtFUygEPM17pmJ4bPc+AfvqplAdTdVCncRwwmPeGhv +YIJxw9l1AjFiKCm89+2RFibsDJX4QmwRwwa5KqrQFybYCYwMZHWIYUyISZn8 +dybYF7LeL30Qw0CZlCfKo0xwervvzYspMfQQXWiQnGbCfo3rda7i4qjuJ4zZ +i0zw+6J1/pS7OHrfG34lIMwC/2jO1O+HxTFla0dZpigLAkQ6Em1CxDFEjmYl +LsGCYAw7LpEoji3HrAr+SbMgMqfBu/iuOJYJPBfyU2bBmd2W9PZ59vfVlM/U +kVkgXdUmzcUpgXJfK56P6rGgVHT3bx0BCeSbfsoQprKgu/1A2XkFtvuPdBrT +WaC8K1RplwXbS+6VWmYsYJb9XY61l8Cc86bbRS1YYCMU01+2TwKPrLfaMWHJ +gpA3ZzOFjkog79eYloQdLHi6I4/nbbYEyufOPjfezQKne8rDK9clsCuB5Pje +kQWja4sfaZVKoDXzepD3HhYIt1ZF/PdUAn9+PLnH25UF7lYto7ZjEmjS5EGZ +d2PB7J2dL0/OSaDXBq0IEw92fHxd10tXJLC1/9L+057seJo+7RMUk8Rc/10K +U14s+Gc21/baSBJXeNw77Q+zIL0o6u4/M0nsnXuZtNuXHR8PR5LmLkksZKb8 +tfFjx/Oc3/gcQxJ1V43JKh1hwaByutyDQPb7+XNdy2yHJIgvjEdKIqc21bk9 +gAVXTDdU2qRJYs6rM8/3B7Fg6/Wb/x2/LIn//VCrFT/Kjp9L3b+kUBJfipBi +nrHt5Flm8aFEEt/95lT0DWbBjydklbW1kmhtN53HE8KC44r1nEZP2P/X5bGS +zbZQHA74vZLErfDQRDmUBfponfXqkyRm+U2dkjvGgta8tyGLPyQxxr0kMZVt +9xVHO/VZSXydoXz8J9uzB/o19i5LYohb76GdYez5eujOl8JLQHuuHVbX2ZaW +//a1ToSA68+v3TLJdukJv6ejsgQ0nL/Jpx3OApOP07nSmwg4O1Yy7sN2t1FY +tJUOAZfnWd2X2fbNWdwTZUjAVA/fV4/Y/rcYSyreTkAdinvbR7bT9/II9+0k +YBXVZPgn28r1KRN8rgQcGK1ft8I2U1q4xcCLgIEhJ3ZxRbDnP+pS0eEAAraV +GFYssdsH38vEZ0cQkEeiTHeS7RCDArfmUwQMenP5fTfbVvmCs9apBAwQixFm +sa205nhS20UCOumfybrA9t8jP2R35RFwbc7LgENsv+10Ku+4TUAPcdcrOmzf +Nny23amCgGfH9srNseOPKdTp660noEXHxEIZ2058eQF7nxMQx3QpDLa3Bq3l +HmgjIIXp2C7M9uqeyCz3XgKC4sn2GvZ8f6B9Vx/+TEA1/36D3WxX3dj9mDFG +wCyDPIFR9vqlCDzdPTJLwF1xy1YRbHsGa/3wXSZgdJrO4jJ7vanvc05MrJHC +tsUQhZNsjxSFF/2UlsKVXpV3DHa+PFr3lXpMWQoNR2UZbex8uhRq/+a3phTe +v0SM0mJ7u4nmnyWUwhzWOKk/kAWyd66kxlhJYWwN8bMK27PreRW5dkvha4c+ +mcPs/C38OGS5xlsKk5KrLN/7s/ePbXYDZ4Ok8IB4oSkP23Z3HwSvjZLCTzLe +79XZ9bEScfmq8DkpXBpe/82dXU/7xGwnZCqlcNyocjiYwQLd6Pq43AYprL0g +J8tg1x//kJqE4gspPPzyk4DdQRaw7nOD6nsptEpgKAix61fCmpWuvSKFPkXT +EQb7WDBRrqpSySuNJYoxbTPs+n9GyGSRRaTRseDm70IX9vp/CxiiqkijModI +x5QTez3jlEnbraWx6LGvKGkXC26NnG96uVsaH92+5Vu5kwUnd67sszogjQI1 +oRXqtizQlOs7vfOoNI5Rg5TWWLMgmflfj0uWNHqp7Rs7vI0F26YWogKGpdE0 +eDtjiL1fRlpkbnkyLo3DtH+OS7rs+ijQ7BOdl8bdolC7nsgCwm53AxavDDoX +db1X2sqCcebz39xbZbDh28qqRRUWXDiVHpodIYPp2ZpqYWIsaOrfrDweJ4Ok +nQM9aiIsWCI1dtBTZFDz5ySxaz0LDn2fI365JoP/DWkvSAuw88Fm78zWRhn0 +7Suj7OVkwZC4asCzdbKo3MNTVz7OPh8DH8lJSsriia2c3zjY54tNk/Prwxtk +caOb+YIl+/ypiUrRWK8ri8x68ljzZyYkf5oedXGWRcORY3vjuplAvFPvPVUo +i4uGhkPvHjIhzmiXh7S+HJpO5ZuLpzDB4kDuTz0TOTwqk+154AwTBGPH4h1t +5FDm8Pnv+fFMyGk8XZTuLodNDU7bRI4zgWlVN8ZzVg7Xrj3SX+TPhGnnjWG/ +3sshX12GZI4NEw4cm0tujZZH7oXwT/1r2OdraXbVyUcKeEdQedOAfy1s62n7 +N9mkgMYDHbOrfGrBlmOVuVu7Ak79l0LcdLAWDtoHvIevCniBuErogEstmEUr +xsSu3oAlUW1vL26vhSCF+evG6hsw3LjGWUeuFp555000hm3AhyV1fPrNNeD/ +Zya2aZ0i8vkZ34kVr4G/6kIDmo5KqNAREx3Avu8Z3S3Jv3RpI2bymc09/K8C +ZkSs3J2eKuNYXqwFd1MZfEl1dwpeo4oOAtPvXhXfA8upcMuvlE34YOD8eKF0 +MYwf5A2pilFDc9G0LR99i9j3dUmuM083o+Dz9ys/BK6DyGvVtLKpLchbOmQu +qc6+nyfdt6NQNLDa0jH9fv0VuKxuICTqrYmvOZ63d8lfghZpY/Kv81uRfEdd +1l8jA6iyT9O1urUw4pj3c7dV52Boo/LAjz4tXN2rVus0lgpn1RPVb3zSwqJ8 +ltWB9lTopVq9IPzQwpjjvzAvPxXCXdoXOZe0cJ51svU7LRVcrY/qjgpp4/6u +Ue+06BS4lMQuX4o2cv3slufjTgZB7sJQj1Pa6MYFxl7GZ4Dn7yOHmQRt1L9e +rZCx5QwsT34kxp3Rxl/NlU/eiZ6BqT6pmfxUbcxdvKaV+C0R3lacPzJ4SRtd +LftfP01NhAzPuENud7VRLCPpU/yH0yDx1N15f6c2CvAPKI4lJYB8nIKRi6oO +njxQMhkqegpKQ3iVPqrp4E2NdKYa5ymgH5pZ46Gug9kOgpfHJuNgv3Vjh4+2 +Du4flgjPbYmDHHFvvwiqDm7fOfCm9lQcSBWXXsmy1UG35tCH5XOxINZB+9sV +poMFnQoSIq9jgE9lX439Sx3kf1K9PDMcDb5SYHW3WQfFV9VZuzVFQ8s6pQHu +VnZ/s2dmwyXRkDr/fXX1Wx104lkR1gqLBsGmEEfJPh386jeZ3MkXDSJ+KbP9 +4zo4M/0rypocBbLldUSGCBF9Dszan8uJgK00qfvh+4n49U3c4Jk7x6By4+FF +Lncijhb9c3E+fwz0+VnmaZ5ELHdJuQeRx8Ckx3nwhjcRM428Cu0tj4HT0cvC +7UeJeLqpniNpNBRibkqGaiQSUXmQkaqkEwpv10kYfC4l4hFl0/pbbcHgOMs4 +7V9ORLfO4EwSKxj6+qrf/a4k4i+uWZvu68Hw5ZajryCLiA93f5FzjgyGP8YX +rxo2EtF1KTrNQSUYFMPEli/2EDHl/iGSbNxRCB4QabTi0MVsXTfeZPMgaHqx +70Exly4WZNa69pCDQP5+US3/al08UP+HQlYOgpYYakkLny42FYrsV+IMAiVF +z4tWorroG3RY4VR4ILw7WO5tpaqLrMQVIwGfAND+sXOtlY0udtzeX1nu7g+J +77J5im118dq9Q0No7A8fWMMc/Lt0UfGPKnlS0R+SksPnmh11cXzWcbRw2A8G +1fMGLN10sV3TRTzYxw/SAybLLIN1sfOETe6FcF+Y+pXqaHlZF0lxUmLmd33g +Q2+B07UruvjgbY/54n8+0PKgZs9Mji4+IZJeNIf6wI0zgy7ZBbrIN3lkVzXd +B1xlSAd+FOtiqfcF32cd3vDcpP/Q2Qe6SP/Nva6cyxuunt8c0TzE7u/oDQYh +DEgKo0fKfdXF1f8ECEJ7GRC21yHq6HdddPig3rhswgA7lRPHpcZ1caokYNtG +UQbwsN7GHp5jt59SG0is8oKjg+Fn+XhJqN3hP3Jr8SCYa724YqlJQp2dTPKb +K57gzGOx+60WCV++FIwtifcE34/N6/YQSeg1w5K57u8JaSmvY730SHjZo3us +n+4J3d87D8UYk1CddS8k8osHeOUPE6sdSegx0R1iR/KAU8KcrzacJKHvRhGz +W6/cIHPkVMKtWBImHdz42e26GxQ9WkXfGk9C487M/O3RbtByhLfcMImEm5uk +v2Spu4Fwy/ospwwSLic7j9inHYD8U/IHU4tIKHC9++Ly3v3w8Jfh4u82Er6I +MKtcL7kXClprPR3ekXBPRK9NyLwrJNzUbSntIGFzIvX13y5XsNyjns3oJaH/ +woNVgRddobNOWq/jMwm57xwdnhd3hdG4v8GlsyRcuFhi4SHnAhJCtaNe0mRk +yDlqt27bA39HiPaPZclY4FJktkttD3x4UsqSUSDjKuW9J+YE9kBBSFFS+0Yy +zhmH9F7pcAKNnouqqElGQ+P9ik5eTmCSG+opg2Qkxj9SCEtxhAANYt87Bhmp +mc5Tl6cc4Nhv6QU3HzKWMz6q1XY6wPGn3NKTvmTkdvw4NMdygBTnLhf+IDLu +9Hm3qzPBAW4nRLw3iSIj7c5siLCsAwx9eNhbmUbGmw25w4F29uB0zrrnYi0Z +O3Oi7vS/sYP9zqTfG+vI6Oa98riFaQdeG+UkKxrIuMEO93QX2EEIa9Kp7QkZ +TygnJJqE2kH61/PdPK1kbFOKue4nbQcttN6u8EEyClXcSn7dYwu0Sa9OFz4K +cpE9/Hy324BEvXlhgwAFo7kq7p/fYAOTZ7YEKQhSsILatu/LojXkKk4LfBWh +4PjVuyBQaQ3Lu6NNg2Qp+Ib7oYPrRmt4VH++IlGLgm5DL872CFiB8dmH6ZWO +FHR9zVBUXjQHaaeCAxLOFBRZ172W0W8OP5USNCJdKSjjrCLZWm8OhQ2WTXQ3 +Cj5RMB8ROGEOXNOdK80+FLzE67jRltMcGp3GAgajKTgYllBQJ2QG25UJO9YV +UlAhvu/BJqttUDXxXNHrBgU1Q205fLW2gXJtyHxdEQUL5885toptg1VWb/J8 +7lJQfjWhfPqTKTwNTPzZWEVBvaP7YqrCTYFeP5sV9ZKCBxMtggTumQDF/t3Q +93EKqsnImIptNYYimZha+hQFX0VYBUtJGoP4V43UizMU9C42LqNyGMNseBLZ +dJ6Cce9dP71tR6i4Bkm5KxSc+DPzyCISQevHPU1HET0UzuNQyr4EoBabHPFU +Tw9v3HuxtWo1DRoMb662oeqhpc5pzn99RmD3+1FGl5Ee2iwIHYwpM4KIgLmS +EWM9nP/04aHWPiNo2uf+WdBGD/MeJh3QqzEEHwOK1V53PaTZ11neCqXCnZ+f +ZWaT9NDr2iIXSukDvXTp9okUPYyxZ2yhzulB+2FJypo0PRznfNTIeKcHC4M2 +dtIX9FD1/UsXu2Q9sHpTm4DX2O+rXo/xX6bA6N1zE6nlerj6j9xw6hQZtjAM +Hqn06WHG/JzCh1+68J+S7UL8Bz3c9O6LS1aPLsx+8iQPDehhc95oaHi9Ljx0 +Tb2bO6yH7cqJBTfjdcHe7lOW5IQeKtTEq1SL60Kk4ekgPg59TGrP+BGNRGgS +fqc4oaKPGX+6Us7e1wbNN1/3Wavpo75YxMH0LG3ISF3IurNFH39m9/LUxmjD +vjXKgoe09NFqqpNw0E4bppbCFgb09bEhKy/T65sWSIzIdry11sfUugdthBNb +gfHQJ6HqqD4OtzybOdStDpNHRsO3h+qjYWDBTHixOkTI+ft1h7H7C/PKNJ9U +h+TjgfZ/ovXx+KfDWVvU1KGMGrbBKFEff/Sk8nw+sQWWauIbGq/oY1xtRVQH +aTNk3M+dbW/UxxMCF8fz2lRB1m3DyMEX+vigTXOMUKwKNwUL+2eb2OPn3dva +dFoVmEduPpVo08e03afdmmiq8FG9JN21Vx9XaiMizctUQO02S2NoXB9DndS2 +cuUpw6P8Tq8ZcQMsarjDOlOgBIM2im5hBAOUDlc61xavBBx/j7gsShvgT071 +CONDSmCya43t6g0GWGIZWVSsrgQvOKl6UlsMUGU5fDKeqQitnnl8xnQDlCl/ +zVDo2wB9yr6l6YcM8POv2mvDYfKw+LbmtvhhA4wc/MO4sl0eZE9wX7/iZ8DO +33fRV8XkYX9XTtaNIAPcVJI8H1UpB4On38QyowxQVcxk/Y1ZWfj+jeQwmGaA +ulnTOeYJMjB7e+W3Vq0B/jpZ667bTYBvTmb5Z1kGmHzu8Yh2GQF6V52zGK43 +wL3P+J96JROg3l06+9JjA/SpSbYOAAKcIpCp/5oN0DXtLBdniSQIJfkeb/lg +gHYRf+xG0iRAw7uLg8FFxZy1E74/IsVAXlz2zsNVVPT0NFXUdBUDoUbPXYQ1 +VPz4wbk/lyoGv+SnC14JUDF9wYghsCQKdd38pkRxKj5fcNnMFScKFmZ4emUT +FQ8Gb9IgXhCBgyp3+a7soOL8GgMv3h4hiHp+wFfVjor2JdxunnVCkM4QeVVh +T8VrP4LWjF4Tgoabkamv9lAx8s7J3XEMIRBTtVj/z4OK07G9uucn1sML1a9i +7mFULPduTuE0FYQtagobVPPY30vaHPVEXQCwqT22ooCKHV9uWf1Y4gcnn8TP +9BtUhNf50/va+CH+9kThnjtUpLT0zasE88MHtQaVs5VU1NZZLCQ+4IO0zS7q +4y+pGNiGCt3uvDCz5QKlYpqKh6+Yc3j0r4beVtwu+ouK77fJ32TVrobHAZMO +oXNUDI4+umyRuRrSKiyPUhao+K/AIIvfdjVsoXKU1HEb4hBj1azQs1XgaXlE +sVHCEK9NMcgjLG7o9DZf22lkiKyo96GNLZxQzzcnTQZDbCK3ihy8xwmFdws3 +XzI2xEDOEk/tdE4Imvpn5mxmiEcy59c7OHHCuvCquA87DTEzUyaq/AsHmCUq +/v7iaYjeTRpHr/BxAPPG4ue5JEM8WRVu2/dliU4xDf1tlWKI+jdzGxOql+jV +n8fX5p8zRCuJHM+IxCV6hfyAnlWGITruaI4w2LxEL7n8+FzuVUO0tOPLkwxe +pOennjYwLzXEs5/t9o0KLdDPhq4/f7nDECvbeuUNYn/TeUWTiia6DFGv4Eex +mctvemI5R4NJryHKFT3VPU/8TU+YnPk2/sEQl3msevq/ztNP+nQaGX8zxHvJ +Bo9pO+fpwfuyR378McQUskzQiMYc3XXbRjSUN0JfuzD/C8K/6P86eQUbNxjh +XGP27e+TP+n5jMl+q41GWCPwNDm89Sf9WyIr3FWN7fDdTyySftKDm3fejyQa +ofyHuawirp/0ZNvj8kwzIxyy/spc5pyh1zl3LZECjfCv77WPjF2T9P0/6loa +jhohQ8DG5rLUJJ0jKv/ytlAjrL/tIqgxNEE3u+pH2h1phJKnw4WOhU7Q2z9y ++ofEG+HK35AP0dfG6aOeW/vLs4ywSmGbRDfHGF3myBnW1sdGqGSc/a2Wd4Se +tnKInPLUCPesJj+bGPhO58owK//+zAhzHv294FP9nT5as/pOfrMRXvT7ekD9 +4Hd6HUfCZZEOI2z0Wy/R9+Qb3TUzNnz+qxGOlLVejEv5Sr9cH0l+KEDDvO5G +JdMdw/S1ti7l0oI0vEOosndQH6bHDuprhgvRcBfTn5jDN0z3Wf1HWVuchnbu +hGvdL4boejvDxArladhHGDz5xXSI3j0U/Ou0Dg25E/tEpCw+08X5/ct37KGh +QdHeJPOJAfoN0xNR0y40tLUvzpq8P0AnnkgzvbCPhmt313vzhQzQbafLuno9 +aHiW67ho1sJHemL33N+D/jTkYqgylgQ/0v8UxphExdEwv2TwgrFNPz3xQ7qA +XAINz/TlLr0Q76eLSRR2PkqkoWzzxOfKT3107bPPDq1OpeEGmc20J6F99MOB +fCnpl2i4/zwP5dL19/Q+wwsdRXfZ8W/aIXJOtJfuc+xGjmUpDV0+u38mD/fQ +50urGeNl7P75HoqGlT10EaXe3zo1NPQJ1XZx3t1Dt+aVk33wmIa+byJvv7rS +TW/oLPLq6KLh3QbFnXz6XXQrQaZmWC8NcZMHaK7roveaN88T+mm4+WVN2fWh +Tvps3VjSgUEaWg2MPjyd1knXLNC+92OUhie1/7gKjnbQG/qMw1InaPi9dI98 +zZMOupWYA2hN03DOYqH1bnYH/dCZY+9C52jY9ie58qRVB332ceIVyT809FPK +fue6sYN+aiHrYN0CDekXNt06tdROFyLd0dj/j4bD+bl35rra6blH6uZWVtjt +Ert3Vt5vp/8PCmQ1Xw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.09948744287016863}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2801,6 +7232,7 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -2828,7 +7260,8 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15475569508294718`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09948744287016863}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -2836,25 +7269,1080 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913290128289948`*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] + CellChangeTimes->{3.9913290128289948`*^9, 3.99382956026394*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"7a470660-ba17-4c65-8121-0c7d25eb3c7a"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", - RowBox[{"{", "}"}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799458254999*^9, - 3.9917994623413925`*^9}},ExpressionUUID->"0f83f761-b16d-5343-987d-\ -511095eaf120"], + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0.013749"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1", ",", "0.038234"}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", "0.060049"}], "}"}], ",", + RowBox[{"{", + RowBox[{"3", ",", "0.076638"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.085764"}], "}"}], ",", + RowBox[{"{", + RowBox[{"5", ",", "0.090382"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.089758"}], "}"}], ",", + RowBox[{"{", + RowBox[{"7", ",", "0.084925"}], "}"}], ",", + RowBox[{"{", + RowBox[{"8", ",", "0.077936"}], "}"}], ",", + RowBox[{"{", + RowBox[{"9", ",", "0.069316"}], "}"}], ",", + RowBox[{"{", + RowBox[{"10", ",", "0.060067"}], "}"}], ",", + RowBox[{"{", + RowBox[{"11", ",", "0.051031"}], "}"}], ",", + RowBox[{"{", + RowBox[{"12", ",", "0.042528"}], "}"}], ",", + RowBox[{"{", + RowBox[{"13", ",", "0.034867"}], "}"}], ",", + RowBox[{"{", + RowBox[{"14", ",", "0.02819"}], "}"}], ",", + RowBox[{"{", + RowBox[{"15", ",", "0.022495"}], "}"}], ",", + RowBox[{"{", + RowBox[{"16", ",", "0.01774"}], "}"}], ",", + RowBox[{"{", + RowBox[{"17", ",", "0.013843"}], "}"}], ",", + RowBox[{"{", + RowBox[{"18", ",", "0.010692"}], "}"}], ",", + RowBox[{"{", + RowBox[{"19", ",", "0.008182"}], "}"}], ",", + RowBox[{"{", + RowBox[{"20", ",", "0.006204"}], "}"}], ",", + RowBox[{"{", + RowBox[{"21", ",", "0.004665"}], "}"}], ",", + RowBox[{"{", + RowBox[{"22", ",", "0.003479"}], "}"}], ",", + RowBox[{"{", + RowBox[{"23", ",", "0.002574"}], "}"}], ",", + RowBox[{"{", + RowBox[{"24", ",", "0.00189"}], "}"}], ",", + RowBox[{"{", + RowBox[{"25", ",", "0.001377"}], "}"}], ",", + RowBox[{"{", + RowBox[{"26", ",", "0.000997"}], "}"}], ",", + RowBox[{"{", + RowBox[{"27", ",", "0.000717"}], "}"}], ",", + RowBox[{"{", + RowBox[{"28", ",", "0.000511"}], "}"}], ",", + RowBox[{"{", + RowBox[{"29", ",", "0.000363"}], "}"}], ",", + RowBox[{"{", + RowBox[{"30", ",", "0.000256"}], "}"}]}], "}"}], "]"}]}]], "Input", + CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, + 3.993827614911839*^9}, + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel->"In[96]:=",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.090382}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829560385489*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"eea86f13-35df-4b03-be09-6a01d4fd28fb"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"8cdd4baa-f7c9-104e-b978-\ -89d3982ba28f"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lF8XAHBLyVKyG3uEFMKYGQwz56DsSURosWQihJC1QiQhP0lJyVap +JNnNoFULksoeJdEiu0KFeOf96/l8P/c+z33OvefcexU9A+0ZXBwcHF2cHBz/ +f84PND9TTrlB33K0z/3L/V30zlxCpHHvKTBM8n8dbqANKP7Gk9CbAdvGbr2y +M0AIsyvu4e4tBOLk4gVtAzsQnpTM+NtTAY6tJdcm9N3hU4Nt4GzPU1C7MPiY +Qz8IzJRHP870tENecZHVflIs/O3RuzjdMwSUmsu2n1TSodH01o13hb9gQV4o +Q+h8Psh+Yn3z1PgHwVsqqMxVt0HM3614jSk3fgpfyWu9Vwpb1lx/YbeHG+3z +Zyn8zaWAhd+Gsv248akBvVj/Syn49x6R0cjkxh2bQn97S9+HZ9uOp9p95cZs +k+JRwcT7ECqXHZB9ZhUGbareRNUsg462dqJ662ocyeXfdnuxDDJ0zOptHXnx +AS2jMDmmArT6XcxpPrxYHXZT2Cm5AloTjnSoR/PiFnOPdqmLFcDTmznGW8CL +37v2GSYXV0D0yWGZxnFeVDzsYCvYVQFer2KP6yXwYU24ZkG+WiVQGPW0DZX8 +eGP6rWtvcyV0CL5pFnzBj/G7rg7c6qiEIOaQ479efry9Jt0+8GMlFAvwB/Qt +8+OcPJHj23QlKFQ452ZaCeCWY3JqwZJVwLsyt8w7JID9fNm+3Aer4P1l7ccz +Qutwe1/a+z+/quBKx931YSrr0IJAPnbiXxW4Cm5yWzBgt6s1wx+eavgQL7fM +dXAdcnQn7HkrVQ2DAfxGYtXrMCQjypofqmFk25daiosg8q5t17p+phr+TGfd +jy5YjwL3JlpdhGuApS66slK9HuO3tgznSdVA1KE024SW9ch93PNbv2INLPUn +TKT+Wo8W/Ptvk4k1EDvMFH+jJIQS/2A20L4GEtpuOgyGCmGE8yPf5fQaSLkR +84ZLShjvrL7pFMVTC1akwyLiG4WxsGmkwXVdLfA+s3fcpCmMvx9cstARq4WE +YZV+a2Nh7PG59/qxYi0cV2r9lnlYGPvg3snDRrUQkE9YVq0TRkvdF8KfA2th +V065hvVeERzkHxb2flMLQhpXA/czRFBfXD5QoKsW2uoTKgIDRXDg773Rm33s +8fv36GfGi+DrnFLag6+1YCK9bPrxrgi+d+l1PbZYC6TLVnsDl0TwVhfzmYAK +EyQzh89euCaKgqP85l1BTCCoVyf8KRLFVPPq5z9DmSD9NDFmf5kohnLaNqyJ +ZIL89OZjmxpFcTTrhhghjgkqNkHu9SOiuFXgcHJ7OhN0V/2jDOuKIalwzYH7 +pUwgXW3TsaCJ4U8LnpZtFUygEPM17pmJ4bPc+AfvqplAdTdVCncRwwmPeGhv +YIJxw9l1AjFiKCm89+2RFibsDJX4QmwRwwa5KqrQFybYCYwMZHWIYUyISZn8 +dybYF7LeL30Qw0CZlCfKo0xwervvzYspMfQQXWiQnGbCfo3rda7i4qjuJ4zZ +i0zw+6J1/pS7OHrfG34lIMwC/2jO1O+HxTFla0dZpigLAkQ6Em1CxDFEjmYl +LsGCYAw7LpEoji3HrAr+SbMgMqfBu/iuOJYJPBfyU2bBmd2W9PZ59vfVlM/U +kVkgXdUmzcUpgXJfK56P6rGgVHT3bx0BCeSbfsoQprKgu/1A2XkFtvuPdBrT +WaC8K1RplwXbS+6VWmYsYJb9XY61l8Cc86bbRS1YYCMU01+2TwKPrLfaMWHJ +gpA3ZzOFjkog79eYloQdLHi6I4/nbbYEyufOPjfezQKne8rDK9clsCuB5Pje +kQWja4sfaZVKoDXzepD3HhYIt1ZF/PdUAn9+PLnH25UF7lYto7ZjEmjS5EGZ +d2PB7J2dL0/OSaDXBq0IEw92fHxd10tXJLC1/9L+057seJo+7RMUk8Rc/10K +U14s+Gc21/baSBJXeNw77Q+zIL0o6u4/M0nsnXuZtNuXHR8PR5LmLkksZKb8 +tfFjx/Oc3/gcQxJ1V43JKh1hwaByutyDQPb7+XNdy2yHJIgvjEdKIqc21bk9 +gAVXTDdU2qRJYs6rM8/3B7Fg6/Wb/x2/LIn//VCrFT/Kjp9L3b+kUBJfipBi +nrHt5Flm8aFEEt/95lT0DWbBjydklbW1kmhtN53HE8KC44r1nEZP2P/X5bGS +zbZQHA74vZLErfDQRDmUBfponfXqkyRm+U2dkjvGgta8tyGLPyQxxr0kMZVt +9xVHO/VZSXydoXz8J9uzB/o19i5LYohb76GdYez5eujOl8JLQHuuHVbX2ZaW +//a1ToSA68+v3TLJdukJv6ejsgQ0nL/Jpx3OApOP07nSmwg4O1Yy7sN2t1FY +tJUOAZfnWd2X2fbNWdwTZUjAVA/fV4/Y/rcYSyreTkAdinvbR7bT9/II9+0k +YBXVZPgn28r1KRN8rgQcGK1ft8I2U1q4xcCLgIEhJ3ZxRbDnP+pS0eEAAraV +GFYssdsH38vEZ0cQkEeiTHeS7RCDArfmUwQMenP5fTfbVvmCs9apBAwQixFm +sa205nhS20UCOumfybrA9t8jP2R35RFwbc7LgENsv+10Ku+4TUAPcdcrOmzf +Nny23amCgGfH9srNseOPKdTp660noEXHxEIZ2058eQF7nxMQx3QpDLa3Bq3l +HmgjIIXp2C7M9uqeyCz3XgKC4sn2GvZ8f6B9Vx/+TEA1/36D3WxX3dj9mDFG +wCyDPIFR9vqlCDzdPTJLwF1xy1YRbHsGa/3wXSZgdJrO4jJ7vanvc05MrJHC +tsUQhZNsjxSFF/2UlsKVXpV3DHa+PFr3lXpMWQoNR2UZbex8uhRq/+a3phTe +v0SM0mJ7u4nmnyWUwhzWOKk/kAWyd66kxlhJYWwN8bMK27PreRW5dkvha4c+ +mcPs/C38OGS5xlsKk5KrLN/7s/ePbXYDZ4Ok8IB4oSkP23Z3HwSvjZLCTzLe +79XZ9bEScfmq8DkpXBpe/82dXU/7xGwnZCqlcNyocjiYwQLd6Pq43AYprL0g +J8tg1x//kJqE4gspPPzyk4DdQRaw7nOD6nsptEpgKAix61fCmpWuvSKFPkXT +EQb7WDBRrqpSySuNJYoxbTPs+n9GyGSRRaTRseDm70IX9vp/CxiiqkijModI +x5QTez3jlEnbraWx6LGvKGkXC26NnG96uVsaH92+5Vu5kwUnd67sszogjQI1 +oRXqtizQlOs7vfOoNI5Rg5TWWLMgmflfj0uWNHqp7Rs7vI0F26YWogKGpdE0 +eDtjiL1fRlpkbnkyLo3DtH+OS7rs+ijQ7BOdl8bdolC7nsgCwm53AxavDDoX +db1X2sqCcebz39xbZbDh28qqRRUWXDiVHpodIYPp2ZpqYWIsaOrfrDweJ4Ok +nQM9aiIsWCI1dtBTZFDz5ySxaz0LDn2fI365JoP/DWkvSAuw88Fm78zWRhn0 +7Suj7OVkwZC4asCzdbKo3MNTVz7OPh8DH8lJSsriia2c3zjY54tNk/Prwxtk +caOb+YIl+/ypiUrRWK8ri8x68ljzZyYkf5oedXGWRcORY3vjuplAvFPvPVUo +i4uGhkPvHjIhzmiXh7S+HJpO5ZuLpzDB4kDuTz0TOTwqk+154AwTBGPH4h1t +5FDm8Pnv+fFMyGk8XZTuLodNDU7bRI4zgWlVN8ZzVg7Xrj3SX+TPhGnnjWG/ +3sshX12GZI4NEw4cm0tujZZH7oXwT/1r2OdraXbVyUcKeEdQedOAfy1s62n7 +N9mkgMYDHbOrfGrBlmOVuVu7Ak79l0LcdLAWDtoHvIevCniBuErogEstmEUr +xsSu3oAlUW1vL26vhSCF+evG6hsw3LjGWUeuFp555000hm3AhyV1fPrNNeD/ +Zya2aZ0i8vkZ34kVr4G/6kIDmo5KqNAREx3Avu8Z3S3Jv3RpI2bymc09/K8C +ZkSs3J2eKuNYXqwFd1MZfEl1dwpeo4oOAtPvXhXfA8upcMuvlE34YOD8eKF0 +MYwf5A2pilFDc9G0LR99i9j3dUmuM083o+Dz9ys/BK6DyGvVtLKpLchbOmQu +qc6+nyfdt6NQNLDa0jH9fv0VuKxuICTqrYmvOZ63d8lfghZpY/Kv81uRfEdd +1l8jA6iyT9O1urUw4pj3c7dV52Boo/LAjz4tXN2rVus0lgpn1RPVb3zSwqJ8 +ltWB9lTopVq9IPzQwpjjvzAvPxXCXdoXOZe0cJ51svU7LRVcrY/qjgpp4/6u +Ue+06BS4lMQuX4o2cv3slufjTgZB7sJQj1Pa6MYFxl7GZ4Dn7yOHmQRt1L9e +rZCx5QwsT34kxp3Rxl/NlU/eiZ6BqT6pmfxUbcxdvKaV+C0R3lacPzJ4SRtd +LftfP01NhAzPuENud7VRLCPpU/yH0yDx1N15f6c2CvAPKI4lJYB8nIKRi6oO +njxQMhkqegpKQ3iVPqrp4E2NdKYa5ymgH5pZ46Gug9kOgpfHJuNgv3Vjh4+2 +Du4flgjPbYmDHHFvvwiqDm7fOfCm9lQcSBWXXsmy1UG35tCH5XOxINZB+9sV +poMFnQoSIq9jgE9lX439Sx3kf1K9PDMcDb5SYHW3WQfFV9VZuzVFQ8s6pQHu +VnZ/s2dmwyXRkDr/fXX1Wx104lkR1gqLBsGmEEfJPh386jeZ3MkXDSJ+KbP9 +4zo4M/0rypocBbLldUSGCBF9Dszan8uJgK00qfvh+4n49U3c4Jk7x6By4+FF +Lncijhb9c3E+fwz0+VnmaZ5ELHdJuQeRx8Ckx3nwhjcRM428Cu0tj4HT0cvC +7UeJeLqpniNpNBRibkqGaiQSUXmQkaqkEwpv10kYfC4l4hFl0/pbbcHgOMs4 +7V9ORLfO4EwSKxj6+qrf/a4k4i+uWZvu68Hw5ZajryCLiA93f5FzjgyGP8YX +rxo2EtF1KTrNQSUYFMPEli/2EDHl/iGSbNxRCB4QabTi0MVsXTfeZPMgaHqx +70Exly4WZNa69pCDQP5+US3/al08UP+HQlYOgpYYakkLny42FYrsV+IMAiVF +z4tWorroG3RY4VR4ILw7WO5tpaqLrMQVIwGfAND+sXOtlY0udtzeX1nu7g+J +77J5im118dq9Q0No7A8fWMMc/Lt0UfGPKnlS0R+SksPnmh11cXzWcbRw2A8G +1fMGLN10sV3TRTzYxw/SAybLLIN1sfOETe6FcF+Y+pXqaHlZF0lxUmLmd33g +Q2+B07UruvjgbY/54n8+0PKgZs9Mji4+IZJeNIf6wI0zgy7ZBbrIN3lkVzXd +B1xlSAd+FOtiqfcF32cd3vDcpP/Q2Qe6SP/Nva6cyxuunt8c0TzE7u/oDQYh +DEgKo0fKfdXF1f8ECEJ7GRC21yHq6HdddPig3rhswgA7lRPHpcZ1caokYNtG +UQbwsN7GHp5jt59SG0is8oKjg+Fn+XhJqN3hP3Jr8SCYa724YqlJQp2dTPKb +K57gzGOx+60WCV++FIwtifcE34/N6/YQSeg1w5K57u8JaSmvY730SHjZo3us +n+4J3d87D8UYk1CddS8k8osHeOUPE6sdSegx0R1iR/KAU8KcrzacJKHvRhGz +W6/cIHPkVMKtWBImHdz42e26GxQ9WkXfGk9C487M/O3RbtByhLfcMImEm5uk +v2Spu4Fwy/ospwwSLic7j9inHYD8U/IHU4tIKHC9++Ly3v3w8Jfh4u82Er6I +MKtcL7kXClprPR3ekXBPRK9NyLwrJNzUbSntIGFzIvX13y5XsNyjns3oJaH/ +woNVgRddobNOWq/jMwm57xwdnhd3hdG4v8GlsyRcuFhi4SHnAhJCtaNe0mRk +yDlqt27bA39HiPaPZclY4FJktkttD3x4UsqSUSDjKuW9J+YE9kBBSFFS+0Yy +zhmH9F7pcAKNnouqqElGQ+P9ik5eTmCSG+opg2Qkxj9SCEtxhAANYt87Bhmp +mc5Tl6cc4Nhv6QU3HzKWMz6q1XY6wPGn3NKTvmTkdvw4NMdygBTnLhf+IDLu +9Hm3qzPBAW4nRLw3iSIj7c5siLCsAwx9eNhbmUbGmw25w4F29uB0zrrnYi0Z +O3Oi7vS/sYP9zqTfG+vI6Oa98riFaQdeG+UkKxrIuMEO93QX2EEIa9Kp7QkZ +TygnJJqE2kH61/PdPK1kbFOKue4nbQcttN6u8EEyClXcSn7dYwu0Sa9OFz4K +cpE9/Hy324BEvXlhgwAFo7kq7p/fYAOTZ7YEKQhSsILatu/LojXkKk4LfBWh +4PjVuyBQaQ3Lu6NNg2Qp+Ib7oYPrRmt4VH++IlGLgm5DL872CFiB8dmH6ZWO +FHR9zVBUXjQHaaeCAxLOFBRZ172W0W8OP5USNCJdKSjjrCLZWm8OhQ2WTXQ3 +Cj5RMB8ROGEOXNOdK80+FLzE67jRltMcGp3GAgajKTgYllBQJ2QG25UJO9YV +UlAhvu/BJqttUDXxXNHrBgU1Q205fLW2gXJtyHxdEQUL5885toptg1VWb/J8 +7lJQfjWhfPqTKTwNTPzZWEVBvaP7YqrCTYFeP5sV9ZKCBxMtggTumQDF/t3Q +93EKqsnImIptNYYimZha+hQFX0VYBUtJGoP4V43UizMU9C42LqNyGMNseBLZ +dJ6Cce9dP71tR6i4Bkm5KxSc+DPzyCISQevHPU1HET0UzuNQyr4EoBabHPFU +Tw9v3HuxtWo1DRoMb662oeqhpc5pzn99RmD3+1FGl5Ee2iwIHYwpM4KIgLmS +EWM9nP/04aHWPiNo2uf+WdBGD/MeJh3QqzEEHwOK1V53PaTZ11neCqXCnZ+f +ZWaT9NDr2iIXSukDvXTp9okUPYyxZ2yhzulB+2FJypo0PRznfNTIeKcHC4M2 +dtIX9FD1/UsXu2Q9sHpTm4DX2O+rXo/xX6bA6N1zE6nlerj6j9xw6hQZtjAM +Hqn06WHG/JzCh1+68J+S7UL8Bz3c9O6LS1aPLsx+8iQPDehhc95oaHi9Ljx0 +Tb2bO6yH7cqJBTfjdcHe7lOW5IQeKtTEq1SL60Kk4ekgPg59TGrP+BGNRGgS +fqc4oaKPGX+6Us7e1wbNN1/3Wavpo75YxMH0LG3ISF3IurNFH39m9/LUxmjD +vjXKgoe09NFqqpNw0E4bppbCFgb09bEhKy/T65sWSIzIdry11sfUugdthBNb +gfHQJ6HqqD4OtzybOdStDpNHRsO3h+qjYWDBTHixOkTI+ft1h7H7C/PKNJ9U +h+TjgfZ/ovXx+KfDWVvU1KGMGrbBKFEff/Sk8nw+sQWWauIbGq/oY1xtRVQH +aTNk3M+dbW/UxxMCF8fz2lRB1m3DyMEX+vigTXOMUKwKNwUL+2eb2OPn3dva +dFoVmEduPpVo08e03afdmmiq8FG9JN21Vx9XaiMizctUQO02S2NoXB9DndS2 +cuUpw6P8Tq8ZcQMsarjDOlOgBIM2im5hBAOUDlc61xavBBx/j7gsShvgT071 +CONDSmCya43t6g0GWGIZWVSsrgQvOKl6UlsMUGU5fDKeqQitnnl8xnQDlCl/ +zVDo2wB9yr6l6YcM8POv2mvDYfKw+LbmtvhhA4wc/MO4sl0eZE9wX7/iZ8DO +33fRV8XkYX9XTtaNIAPcVJI8H1UpB4On38QyowxQVcxk/Y1ZWfj+jeQwmGaA +ulnTOeYJMjB7e+W3Vq0B/jpZ667bTYBvTmb5Z1kGmHzu8Yh2GQF6V52zGK43 +wL3P+J96JROg3l06+9JjA/SpSbYOAAKcIpCp/5oN0DXtLBdniSQIJfkeb/lg +gHYRf+xG0iRAw7uLg8FFxZy1E74/IsVAXlz2zsNVVPT0NFXUdBUDoUbPXYQ1 +VPz4wbk/lyoGv+SnC14JUDF9wYghsCQKdd38pkRxKj5fcNnMFScKFmZ4emUT +FQ8Gb9IgXhCBgyp3+a7soOL8GgMv3h4hiHp+wFfVjor2JdxunnVCkM4QeVVh +T8VrP4LWjF4Tgoabkamv9lAx8s7J3XEMIRBTtVj/z4OK07G9uucn1sML1a9i +7mFULPduTuE0FYQtagobVPPY30vaHPVEXQCwqT22ooCKHV9uWf1Y4gcnn8TP +9BtUhNf50/va+CH+9kThnjtUpLT0zasE88MHtQaVs5VU1NZZLCQ+4IO0zS7q +4y+pGNiGCt3uvDCz5QKlYpqKh6+Yc3j0r4beVtwu+ouK77fJ32TVrobHAZMO +oXNUDI4+umyRuRrSKiyPUhao+K/AIIvfdjVsoXKU1HEb4hBj1azQs1XgaXlE +sVHCEK9NMcgjLG7o9DZf22lkiKyo96GNLZxQzzcnTQZDbCK3ihy8xwmFdws3 +XzI2xEDOEk/tdE4Imvpn5mxmiEcy59c7OHHCuvCquA87DTEzUyaq/AsHmCUq +/v7iaYjeTRpHr/BxAPPG4ue5JEM8WRVu2/dliU4xDf1tlWKI+jdzGxOql+jV +n8fX5p8zRCuJHM+IxCV6hfyAnlWGITruaI4w2LxEL7n8+FzuVUO0tOPLkwxe +pOennjYwLzXEs5/t9o0KLdDPhq4/f7nDECvbeuUNYn/TeUWTiia6DFGv4Eex +mctvemI5R4NJryHKFT3VPU/8TU+YnPk2/sEQl3msevq/ztNP+nQaGX8zxHvJ +Bo9pO+fpwfuyR378McQUskzQiMYc3XXbRjSUN0JfuzD/C8K/6P86eQUbNxjh +XGP27e+TP+n5jMl+q41GWCPwNDm89Sf9WyIr3FWN7fDdTyySftKDm3fejyQa +ofyHuawirp/0ZNvj8kwzIxyy/spc5pyh1zl3LZECjfCv77WPjF2T9P0/6loa +jhohQ8DG5rLUJJ0jKv/ytlAjrL/tIqgxNEE3u+pH2h1phJKnw4WOhU7Q2z9y ++ofEG+HK35AP0dfG6aOeW/vLs4ywSmGbRDfHGF3myBnW1sdGqGSc/a2Wd4Se +tnKInPLUCPesJj+bGPhO58owK//+zAhzHv294FP9nT5as/pOfrMRXvT7ekD9 +4Hd6HUfCZZEOI2z0Wy/R9+Qb3TUzNnz+qxGOlLVejEv5Sr9cH0l+KEDDvO5G +JdMdw/S1ti7l0oI0vEOosndQH6bHDuprhgvRcBfTn5jDN0z3Wf1HWVuchnbu +hGvdL4boejvDxArladhHGDz5xXSI3j0U/Ou0Dg25E/tEpCw+08X5/ct37KGh +QdHeJPOJAfoN0xNR0y40tLUvzpq8P0AnnkgzvbCPhmt313vzhQzQbafLuno9 +aHiW67ho1sJHemL33N+D/jTkYqgylgQ/0v8UxphExdEwv2TwgrFNPz3xQ7qA +XAINz/TlLr0Q76eLSRR2PkqkoWzzxOfKT3107bPPDq1OpeEGmc20J6F99MOB +fCnpl2i4/zwP5dL19/Q+wwsdRXfZ8W/aIXJOtJfuc+xGjmUpDV0+u38mD/fQ +50urGeNl7P75HoqGlT10EaXe3zo1NPQJ1XZx3t1Dt+aVk33wmIa+byJvv7rS +TW/oLPLq6KLh3QbFnXz6XXQrQaZmWC8NcZMHaK7roveaN88T+mm4+WVN2fWh +Tvps3VjSgUEaWg2MPjyd1knXLNC+92OUhie1/7gKjnbQG/qMw1InaPi9dI98 +zZMOupWYA2hN03DOYqH1bnYH/dCZY+9C52jY9ie58qRVB332ceIVyT809FPK +fue6sYN+aiHrYN0CDekXNt06tdROFyLd0dj/j4bD+bl35rra6blH6uZWVtjt +Ert3Vt5vp/8PCmQ1Xw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lF8XAHBLyVKyG3uEFMKYGQwz56DsSURosWQihJC1QiQhP0lJyVap +JNnNoFULksoeJdEiu0KFeOf96/l8P/c+z33OvefcexU9A+0ZXBwcHF2cHBz/ +f84PND9TTrlB33K0z/3L/V30zlxCpHHvKTBM8n8dbqANKP7Gk9CbAdvGbr2y +M0AIsyvu4e4tBOLk4gVtAzsQnpTM+NtTAY6tJdcm9N3hU4Nt4GzPU1C7MPiY +Qz8IzJRHP870tENecZHVflIs/O3RuzjdMwSUmsu2n1TSodH01o13hb9gQV4o +Q+h8Psh+Yn3z1PgHwVsqqMxVt0HM3614jSk3fgpfyWu9Vwpb1lx/YbeHG+3z +Zyn8zaWAhd+Gsv248akBvVj/Syn49x6R0cjkxh2bQn97S9+HZ9uOp9p95cZs +k+JRwcT7ECqXHZB9ZhUGbareRNUsg462dqJ662ocyeXfdnuxDDJ0zOptHXnx +AS2jMDmmArT6XcxpPrxYHXZT2Cm5AloTjnSoR/PiFnOPdqmLFcDTmznGW8CL +37v2GSYXV0D0yWGZxnFeVDzsYCvYVQFer2KP6yXwYU24ZkG+WiVQGPW0DZX8 +eGP6rWtvcyV0CL5pFnzBj/G7rg7c6qiEIOaQ479efry9Jt0+8GMlFAvwB/Qt +8+OcPJHj23QlKFQ452ZaCeCWY3JqwZJVwLsyt8w7JID9fNm+3Aer4P1l7ccz +Qutwe1/a+z+/quBKx931YSrr0IJAPnbiXxW4Cm5yWzBgt6s1wx+eavgQL7fM +dXAdcnQn7HkrVQ2DAfxGYtXrMCQjypofqmFk25daiosg8q5t17p+phr+TGfd +jy5YjwL3JlpdhGuApS66slK9HuO3tgznSdVA1KE024SW9ch93PNbv2INLPUn +TKT+Wo8W/Ptvk4k1EDvMFH+jJIQS/2A20L4GEtpuOgyGCmGE8yPf5fQaSLkR +84ZLShjvrL7pFMVTC1akwyLiG4WxsGmkwXVdLfA+s3fcpCmMvx9cstARq4WE +YZV+a2Nh7PG59/qxYi0cV2r9lnlYGPvg3snDRrUQkE9YVq0TRkvdF8KfA2th +V065hvVeERzkHxb2flMLQhpXA/czRFBfXD5QoKsW2uoTKgIDRXDg773Rm33s +8fv36GfGi+DrnFLag6+1YCK9bPrxrgi+d+l1PbZYC6TLVnsDl0TwVhfzmYAK +EyQzh89euCaKgqP85l1BTCCoVyf8KRLFVPPq5z9DmSD9NDFmf5kohnLaNqyJ +ZIL89OZjmxpFcTTrhhghjgkqNkHu9SOiuFXgcHJ7OhN0V/2jDOuKIalwzYH7 +pUwgXW3TsaCJ4U8LnpZtFUygEPM17pmJ4bPc+AfvqplAdTdVCncRwwmPeGhv +YIJxw9l1AjFiKCm89+2RFibsDJX4QmwRwwa5KqrQFybYCYwMZHWIYUyISZn8 +dybYF7LeL30Qw0CZlCfKo0xwervvzYspMfQQXWiQnGbCfo3rda7i4qjuJ4zZ +i0zw+6J1/pS7OHrfG34lIMwC/2jO1O+HxTFla0dZpigLAkQ6Em1CxDFEjmYl +LsGCYAw7LpEoji3HrAr+SbMgMqfBu/iuOJYJPBfyU2bBmd2W9PZ59vfVlM/U +kVkgXdUmzcUpgXJfK56P6rGgVHT3bx0BCeSbfsoQprKgu/1A2XkFtvuPdBrT +WaC8K1RplwXbS+6VWmYsYJb9XY61l8Cc86bbRS1YYCMU01+2TwKPrLfaMWHJ +gpA3ZzOFjkog79eYloQdLHi6I4/nbbYEyufOPjfezQKne8rDK9clsCuB5Pje +kQWja4sfaZVKoDXzepD3HhYIt1ZF/PdUAn9+PLnH25UF7lYto7ZjEmjS5EGZ +d2PB7J2dL0/OSaDXBq0IEw92fHxd10tXJLC1/9L+057seJo+7RMUk8Rc/10K +U14s+Gc21/baSBJXeNw77Q+zIL0o6u4/M0nsnXuZtNuXHR8PR5LmLkksZKb8 +tfFjx/Oc3/gcQxJ1V43JKh1hwaByutyDQPb7+XNdy2yHJIgvjEdKIqc21bk9 +gAVXTDdU2qRJYs6rM8/3B7Fg6/Wb/x2/LIn//VCrFT/Kjp9L3b+kUBJfipBi +nrHt5Flm8aFEEt/95lT0DWbBjydklbW1kmhtN53HE8KC44r1nEZP2P/X5bGS +zbZQHA74vZLErfDQRDmUBfponfXqkyRm+U2dkjvGgta8tyGLPyQxxr0kMZVt +9xVHO/VZSXydoXz8J9uzB/o19i5LYohb76GdYez5eujOl8JLQHuuHVbX2ZaW +//a1ToSA68+v3TLJdukJv6ejsgQ0nL/Jpx3OApOP07nSmwg4O1Yy7sN2t1FY +tJUOAZfnWd2X2fbNWdwTZUjAVA/fV4/Y/rcYSyreTkAdinvbR7bT9/II9+0k +YBXVZPgn28r1KRN8rgQcGK1ft8I2U1q4xcCLgIEhJ3ZxRbDnP+pS0eEAAraV +GFYssdsH38vEZ0cQkEeiTHeS7RCDArfmUwQMenP5fTfbVvmCs9apBAwQixFm +sa205nhS20UCOumfybrA9t8jP2R35RFwbc7LgENsv+10Ku+4TUAPcdcrOmzf +Nny23amCgGfH9srNseOPKdTp660noEXHxEIZ2058eQF7nxMQx3QpDLa3Bq3l +HmgjIIXp2C7M9uqeyCz3XgKC4sn2GvZ8f6B9Vx/+TEA1/36D3WxX3dj9mDFG +wCyDPIFR9vqlCDzdPTJLwF1xy1YRbHsGa/3wXSZgdJrO4jJ7vanvc05MrJHC +tsUQhZNsjxSFF/2UlsKVXpV3DHa+PFr3lXpMWQoNR2UZbex8uhRq/+a3phTe +v0SM0mJ7u4nmnyWUwhzWOKk/kAWyd66kxlhJYWwN8bMK27PreRW5dkvha4c+ +mcPs/C38OGS5xlsKk5KrLN/7s/ePbXYDZ4Ok8IB4oSkP23Z3HwSvjZLCTzLe +79XZ9bEScfmq8DkpXBpe/82dXU/7xGwnZCqlcNyocjiYwQLd6Pq43AYprL0g +J8tg1x//kJqE4gspPPzyk4DdQRaw7nOD6nsptEpgKAix61fCmpWuvSKFPkXT +EQb7WDBRrqpSySuNJYoxbTPs+n9GyGSRRaTRseDm70IX9vp/CxiiqkijModI +x5QTez3jlEnbraWx6LGvKGkXC26NnG96uVsaH92+5Vu5kwUnd67sszogjQI1 +oRXqtizQlOs7vfOoNI5Rg5TWWLMgmflfj0uWNHqp7Rs7vI0F26YWogKGpdE0 +eDtjiL1fRlpkbnkyLo3DtH+OS7rs+ijQ7BOdl8bdolC7nsgCwm53AxavDDoX +db1X2sqCcebz39xbZbDh28qqRRUWXDiVHpodIYPp2ZpqYWIsaOrfrDweJ4Ok +nQM9aiIsWCI1dtBTZFDz5ySxaz0LDn2fI365JoP/DWkvSAuw88Fm78zWRhn0 +7Suj7OVkwZC4asCzdbKo3MNTVz7OPh8DH8lJSsriia2c3zjY54tNk/Prwxtk +caOb+YIl+/ypiUrRWK8ri8x68ljzZyYkf5oedXGWRcORY3vjuplAvFPvPVUo +i4uGhkPvHjIhzmiXh7S+HJpO5ZuLpzDB4kDuTz0TOTwqk+154AwTBGPH4h1t +5FDm8Pnv+fFMyGk8XZTuLodNDU7bRI4zgWlVN8ZzVg7Xrj3SX+TPhGnnjWG/ +3sshX12GZI4NEw4cm0tujZZH7oXwT/1r2OdraXbVyUcKeEdQedOAfy1s62n7 +N9mkgMYDHbOrfGrBlmOVuVu7Ak79l0LcdLAWDtoHvIevCniBuErogEstmEUr +xsSu3oAlUW1vL26vhSCF+evG6hsw3LjGWUeuFp555000hm3AhyV1fPrNNeD/ +Zya2aZ0i8vkZ34kVr4G/6kIDmo5KqNAREx3Avu8Z3S3Jv3RpI2bymc09/K8C +ZkSs3J2eKuNYXqwFd1MZfEl1dwpeo4oOAtPvXhXfA8upcMuvlE34YOD8eKF0 +MYwf5A2pilFDc9G0LR99i9j3dUmuM083o+Dz9ys/BK6DyGvVtLKpLchbOmQu +qc6+nyfdt6NQNLDa0jH9fv0VuKxuICTqrYmvOZ63d8lfghZpY/Kv81uRfEdd +1l8jA6iyT9O1urUw4pj3c7dV52Boo/LAjz4tXN2rVus0lgpn1RPVb3zSwqJ8 +ltWB9lTopVq9IPzQwpjjvzAvPxXCXdoXOZe0cJ51svU7LRVcrY/qjgpp4/6u +Ue+06BS4lMQuX4o2cv3slufjTgZB7sJQj1Pa6MYFxl7GZ4Dn7yOHmQRt1L9e +rZCx5QwsT34kxp3Rxl/NlU/eiZ6BqT6pmfxUbcxdvKaV+C0R3lacPzJ4SRtd +LftfP01NhAzPuENud7VRLCPpU/yH0yDx1N15f6c2CvAPKI4lJYB8nIKRi6oO +njxQMhkqegpKQ3iVPqrp4E2NdKYa5ymgH5pZ46Gug9kOgpfHJuNgv3Vjh4+2 +Du4flgjPbYmDHHFvvwiqDm7fOfCm9lQcSBWXXsmy1UG35tCH5XOxINZB+9sV +poMFnQoSIq9jgE9lX439Sx3kf1K9PDMcDb5SYHW3WQfFV9VZuzVFQ8s6pQHu +VnZ/s2dmwyXRkDr/fXX1Wx104lkR1gqLBsGmEEfJPh386jeZ3MkXDSJ+KbP9 +4zo4M/0rypocBbLldUSGCBF9Dszan8uJgK00qfvh+4n49U3c4Jk7x6By4+FF +Lncijhb9c3E+fwz0+VnmaZ5ELHdJuQeRx8Ckx3nwhjcRM428Cu0tj4HT0cvC +7UeJeLqpniNpNBRibkqGaiQSUXmQkaqkEwpv10kYfC4l4hFl0/pbbcHgOMs4 +7V9ORLfO4EwSKxj6+qrf/a4k4i+uWZvu68Hw5ZajryCLiA93f5FzjgyGP8YX +rxo2EtF1KTrNQSUYFMPEli/2EDHl/iGSbNxRCB4QabTi0MVsXTfeZPMgaHqx +70Exly4WZNa69pCDQP5+US3/al08UP+HQlYOgpYYakkLny42FYrsV+IMAiVF +z4tWorroG3RY4VR4ILw7WO5tpaqLrMQVIwGfAND+sXOtlY0udtzeX1nu7g+J +77J5im118dq9Q0No7A8fWMMc/Lt0UfGPKnlS0R+SksPnmh11cXzWcbRw2A8G +1fMGLN10sV3TRTzYxw/SAybLLIN1sfOETe6FcF+Y+pXqaHlZF0lxUmLmd33g +Q2+B07UruvjgbY/54n8+0PKgZs9Mji4+IZJeNIf6wI0zgy7ZBbrIN3lkVzXd +B1xlSAd+FOtiqfcF32cd3vDcpP/Q2Qe6SP/Nva6cyxuunt8c0TzE7u/oDQYh +DEgKo0fKfdXF1f8ECEJ7GRC21yHq6HdddPig3rhswgA7lRPHpcZ1caokYNtG +UQbwsN7GHp5jt59SG0is8oKjg+Fn+XhJqN3hP3Jr8SCYa724YqlJQp2dTPKb +K57gzGOx+60WCV++FIwtifcE34/N6/YQSeg1w5K57u8JaSmvY730SHjZo3us +n+4J3d87D8UYk1CddS8k8osHeOUPE6sdSegx0R1iR/KAU8KcrzacJKHvRhGz +W6/cIHPkVMKtWBImHdz42e26GxQ9WkXfGk9C487M/O3RbtByhLfcMImEm5uk +v2Spu4Fwy/ospwwSLic7j9inHYD8U/IHU4tIKHC9++Ly3v3w8Jfh4u82Er6I +MKtcL7kXClprPR3ekXBPRK9NyLwrJNzUbSntIGFzIvX13y5XsNyjns3oJaH/ +woNVgRddobNOWq/jMwm57xwdnhd3hdG4v8GlsyRcuFhi4SHnAhJCtaNe0mRk +yDlqt27bA39HiPaPZclY4FJktkttD3x4UsqSUSDjKuW9J+YE9kBBSFFS+0Yy +zhmH9F7pcAKNnouqqElGQ+P9ik5eTmCSG+opg2Qkxj9SCEtxhAANYt87Bhmp +mc5Tl6cc4Nhv6QU3HzKWMz6q1XY6wPGn3NKTvmTkdvw4NMdygBTnLhf+IDLu +9Hm3qzPBAW4nRLw3iSIj7c5siLCsAwx9eNhbmUbGmw25w4F29uB0zrrnYi0Z +O3Oi7vS/sYP9zqTfG+vI6Oa98riFaQdeG+UkKxrIuMEO93QX2EEIa9Kp7QkZ +TygnJJqE2kH61/PdPK1kbFOKue4nbQcttN6u8EEyClXcSn7dYwu0Sa9OFz4K +cpE9/Hy324BEvXlhgwAFo7kq7p/fYAOTZ7YEKQhSsILatu/LojXkKk4LfBWh +4PjVuyBQaQ3Lu6NNg2Qp+Ib7oYPrRmt4VH++IlGLgm5DL872CFiB8dmH6ZWO +FHR9zVBUXjQHaaeCAxLOFBRZ172W0W8OP5USNCJdKSjjrCLZWm8OhQ2WTXQ3 +Cj5RMB8ROGEOXNOdK80+FLzE67jRltMcGp3GAgajKTgYllBQJ2QG25UJO9YV +UlAhvu/BJqttUDXxXNHrBgU1Q205fLW2gXJtyHxdEQUL5885toptg1VWb/J8 +7lJQfjWhfPqTKTwNTPzZWEVBvaP7YqrCTYFeP5sV9ZKCBxMtggTumQDF/t3Q +93EKqsnImIptNYYimZha+hQFX0VYBUtJGoP4V43UizMU9C42LqNyGMNseBLZ +dJ6Cce9dP71tR6i4Bkm5KxSc+DPzyCISQevHPU1HET0UzuNQyr4EoBabHPFU +Tw9v3HuxtWo1DRoMb662oeqhpc5pzn99RmD3+1FGl5Ee2iwIHYwpM4KIgLmS +EWM9nP/04aHWPiNo2uf+WdBGD/MeJh3QqzEEHwOK1V53PaTZ11neCqXCnZ+f +ZWaT9NDr2iIXSukDvXTp9okUPYyxZ2yhzulB+2FJypo0PRznfNTIeKcHC4M2 +dtIX9FD1/UsXu2Q9sHpTm4DX2O+rXo/xX6bA6N1zE6nlerj6j9xw6hQZtjAM +Hqn06WHG/JzCh1+68J+S7UL8Bz3c9O6LS1aPLsx+8iQPDehhc95oaHi9Ljx0 +Tb2bO6yH7cqJBTfjdcHe7lOW5IQeKtTEq1SL60Kk4ekgPg59TGrP+BGNRGgS +fqc4oaKPGX+6Us7e1wbNN1/3Wavpo75YxMH0LG3ISF3IurNFH39m9/LUxmjD +vjXKgoe09NFqqpNw0E4bppbCFgb09bEhKy/T65sWSIzIdry11sfUugdthBNb +gfHQJ6HqqD4OtzybOdStDpNHRsO3h+qjYWDBTHixOkTI+ft1h7H7C/PKNJ9U +h+TjgfZ/ovXx+KfDWVvU1KGMGrbBKFEff/Sk8nw+sQWWauIbGq/oY1xtRVQH +aTNk3M+dbW/UxxMCF8fz2lRB1m3DyMEX+vigTXOMUKwKNwUL+2eb2OPn3dva +dFoVmEduPpVo08e03afdmmiq8FG9JN21Vx9XaiMizctUQO02S2NoXB9DndS2 +cuUpw6P8Tq8ZcQMsarjDOlOgBIM2im5hBAOUDlc61xavBBx/j7gsShvgT071 +CONDSmCya43t6g0GWGIZWVSsrgQvOKl6UlsMUGU5fDKeqQitnnl8xnQDlCl/ +zVDo2wB9yr6l6YcM8POv2mvDYfKw+LbmtvhhA4wc/MO4sl0eZE9wX7/iZ8DO +33fRV8XkYX9XTtaNIAPcVJI8H1UpB4On38QyowxQVcxk/Y1ZWfj+jeQwmGaA +ulnTOeYJMjB7e+W3Vq0B/jpZ667bTYBvTmb5Z1kGmHzu8Yh2GQF6V52zGK43 +wL3P+J96JROg3l06+9JjA/SpSbYOAAKcIpCp/5oN0DXtLBdniSQIJfkeb/lg +gHYRf+xG0iRAw7uLg8FFxZy1E74/IsVAXlz2zsNVVPT0NFXUdBUDoUbPXYQ1 +VPz4wbk/lyoGv+SnC14JUDF9wYghsCQKdd38pkRxKj5fcNnMFScKFmZ4emUT +FQ8Gb9IgXhCBgyp3+a7soOL8GgMv3h4hiHp+wFfVjor2JdxunnVCkM4QeVVh +T8VrP4LWjF4Tgoabkamv9lAx8s7J3XEMIRBTtVj/z4OK07G9uucn1sML1a9i +7mFULPduTuE0FYQtagobVPPY30vaHPVEXQCwqT22ooCKHV9uWf1Y4gcnn8TP +9BtUhNf50/va+CH+9kThnjtUpLT0zasE88MHtQaVs5VU1NZZLCQ+4IO0zS7q +4y+pGNiGCt3uvDCz5QKlYpqKh6+Yc3j0r4beVtwu+ouK77fJ32TVrobHAZMO +oXNUDI4+umyRuRrSKiyPUhao+K/AIIvfdjVsoXKU1HEb4hBj1azQs1XgaXlE +sVHCEK9NMcgjLG7o9DZf22lkiKyo96GNLZxQzzcnTQZDbCK3ihy8xwmFdws3 +XzI2xEDOEk/tdE4Imvpn5mxmiEcy59c7OHHCuvCquA87DTEzUyaq/AsHmCUq +/v7iaYjeTRpHr/BxAPPG4ue5JEM8WRVu2/dliU4xDf1tlWKI+jdzGxOql+jV +n8fX5p8zRCuJHM+IxCV6hfyAnlWGITruaI4w2LxEL7n8+FzuVUO0tOPLkwxe +pOennjYwLzXEs5/t9o0KLdDPhq4/f7nDECvbeuUNYn/TeUWTiia6DFGv4Eex +mctvemI5R4NJryHKFT3VPU/8TU+YnPk2/sEQl3msevq/ztNP+nQaGX8zxHvJ +Bo9pO+fpwfuyR378McQUskzQiMYc3XXbRjSUN0JfuzD/C8K/6P86eQUbNxjh +XGP27e+TP+n5jMl+q41GWCPwNDm89Sf9WyIr3FWN7fDdTyySftKDm3fejyQa +ofyHuawirp/0ZNvj8kwzIxyy/spc5pyh1zl3LZECjfCv77WPjF2T9P0/6loa +jhohQ8DG5rLUJJ0jKv/ytlAjrL/tIqgxNEE3u+pH2h1phJKnw4WOhU7Q2z9y ++ofEG+HK35AP0dfG6aOeW/vLs4ywSmGbRDfHGF3myBnW1sdGqGSc/a2Wd4Se +tnKInPLUCPesJj+bGPhO58owK//+zAhzHv294FP9nT5as/pOfrMRXvT7ekD9 +4Hd6HUfCZZEOI2z0Wy/R9+Qb3TUzNnz+qxGOlLVejEv5Sr9cH0l+KEDDvO5G +JdMdw/S1ti7l0oI0vEOosndQH6bHDuprhgvRcBfTn5jDN0z3Wf1HWVuchnbu +hGvdL4boejvDxArladhHGDz5xXSI3j0U/Ou0Dg25E/tEpCw+08X5/ct37KGh +QdHeJPOJAfoN0xNR0y40tLUvzpq8P0AnnkgzvbCPhmt313vzhQzQbafLuno9 +aHiW67ho1sJHemL33N+D/jTkYqgylgQ/0v8UxphExdEwv2TwgrFNPz3xQ7qA +XAINz/TlLr0Q76eLSRR2PkqkoWzzxOfKT3107bPPDq1OpeEGmc20J6F99MOB +fCnpl2i4/zwP5dL19/Q+wwsdRXfZ8W/aIXJOtJfuc+xGjmUpDV0+u38mD/fQ +50urGeNl7P75HoqGlT10EaXe3zo1NPQJ1XZx3t1Dt+aVk33wmIa+byJvv7rS +TW/oLPLq6KLh3QbFnXz6XXQrQaZmWC8NcZMHaK7roveaN88T+mm4+WVN2fWh +Tvps3VjSgUEaWg2MPjyd1knXLNC+92OUhie1/7gKjnbQG/qMw1InaPi9dI98 +zZMOupWYA2hN03DOYqH1bnYH/dCZY+9C52jY9ie58qRVB332ceIVyT809FPK +fue6sYN+aiHrYN0CDekXNt06tdROFyLd0dj/j4bD+bl35rra6blH6uZWVtjt +Ert3Vt5vp/8PCmQ1Xw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09948744287016863}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09948744287016863}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lF8XAHBLyVKyG3uEFMKYGQwz56DsSURosWQihJC1QiQhP0lJyVap +JNnNoFULksoeJdEiu0KFeOf96/l8P/c+z33OvefcexU9A+0ZXBwcHF2cHBz/ +f84PND9TTrlB33K0z/3L/V30zlxCpHHvKTBM8n8dbqANKP7Gk9CbAdvGbr2y +M0AIsyvu4e4tBOLk4gVtAzsQnpTM+NtTAY6tJdcm9N3hU4Nt4GzPU1C7MPiY +Qz8IzJRHP870tENecZHVflIs/O3RuzjdMwSUmsu2n1TSodH01o13hb9gQV4o +Q+h8Psh+Yn3z1PgHwVsqqMxVt0HM3614jSk3fgpfyWu9Vwpb1lx/YbeHG+3z +Zyn8zaWAhd+Gsv248akBvVj/Syn49x6R0cjkxh2bQn97S9+HZ9uOp9p95cZs +k+JRwcT7ECqXHZB9ZhUGbareRNUsg462dqJ662ocyeXfdnuxDDJ0zOptHXnx +AS2jMDmmArT6XcxpPrxYHXZT2Cm5AloTjnSoR/PiFnOPdqmLFcDTmznGW8CL +37v2GSYXV0D0yWGZxnFeVDzsYCvYVQFer2KP6yXwYU24ZkG+WiVQGPW0DZX8 +eGP6rWtvcyV0CL5pFnzBj/G7rg7c6qiEIOaQ479efry9Jt0+8GMlFAvwB/Qt +8+OcPJHj23QlKFQ452ZaCeCWY3JqwZJVwLsyt8w7JID9fNm+3Aer4P1l7ccz +Qutwe1/a+z+/quBKx931YSrr0IJAPnbiXxW4Cm5yWzBgt6s1wx+eavgQL7fM +dXAdcnQn7HkrVQ2DAfxGYtXrMCQjypofqmFk25daiosg8q5t17p+phr+TGfd +jy5YjwL3JlpdhGuApS66slK9HuO3tgznSdVA1KE024SW9ch93PNbv2INLPUn +TKT+Wo8W/Ptvk4k1EDvMFH+jJIQS/2A20L4GEtpuOgyGCmGE8yPf5fQaSLkR +84ZLShjvrL7pFMVTC1akwyLiG4WxsGmkwXVdLfA+s3fcpCmMvx9cstARq4WE +YZV+a2Nh7PG59/qxYi0cV2r9lnlYGPvg3snDRrUQkE9YVq0TRkvdF8KfA2th +V065hvVeERzkHxb2flMLQhpXA/czRFBfXD5QoKsW2uoTKgIDRXDg773Rm33s +8fv36GfGi+DrnFLag6+1YCK9bPrxrgi+d+l1PbZYC6TLVnsDl0TwVhfzmYAK +EyQzh89euCaKgqP85l1BTCCoVyf8KRLFVPPq5z9DmSD9NDFmf5kohnLaNqyJ +ZIL89OZjmxpFcTTrhhghjgkqNkHu9SOiuFXgcHJ7OhN0V/2jDOuKIalwzYH7 +pUwgXW3TsaCJ4U8LnpZtFUygEPM17pmJ4bPc+AfvqplAdTdVCncRwwmPeGhv +YIJxw9l1AjFiKCm89+2RFibsDJX4QmwRwwa5KqrQFybYCYwMZHWIYUyISZn8 +dybYF7LeL30Qw0CZlCfKo0xwervvzYspMfQQXWiQnGbCfo3rda7i4qjuJ4zZ +i0zw+6J1/pS7OHrfG34lIMwC/2jO1O+HxTFla0dZpigLAkQ6Em1CxDFEjmYl +LsGCYAw7LpEoji3HrAr+SbMgMqfBu/iuOJYJPBfyU2bBmd2W9PZ59vfVlM/U +kVkgXdUmzcUpgXJfK56P6rGgVHT3bx0BCeSbfsoQprKgu/1A2XkFtvuPdBrT +WaC8K1RplwXbS+6VWmYsYJb9XY61l8Cc86bbRS1YYCMU01+2TwKPrLfaMWHJ +gpA3ZzOFjkog79eYloQdLHi6I4/nbbYEyufOPjfezQKne8rDK9clsCuB5Pje +kQWja4sfaZVKoDXzepD3HhYIt1ZF/PdUAn9+PLnH25UF7lYto7ZjEmjS5EGZ +d2PB7J2dL0/OSaDXBq0IEw92fHxd10tXJLC1/9L+057seJo+7RMUk8Rc/10K +U14s+Gc21/baSBJXeNw77Q+zIL0o6u4/M0nsnXuZtNuXHR8PR5LmLkksZKb8 +tfFjx/Oc3/gcQxJ1V43JKh1hwaByutyDQPb7+XNdy2yHJIgvjEdKIqc21bk9 +gAVXTDdU2qRJYs6rM8/3B7Fg6/Wb/x2/LIn//VCrFT/Kjp9L3b+kUBJfipBi +nrHt5Flm8aFEEt/95lT0DWbBjydklbW1kmhtN53HE8KC44r1nEZP2P/X5bGS +zbZQHA74vZLErfDQRDmUBfponfXqkyRm+U2dkjvGgta8tyGLPyQxxr0kMZVt +9xVHO/VZSXydoXz8J9uzB/o19i5LYohb76GdYez5eujOl8JLQHuuHVbX2ZaW +//a1ToSA68+v3TLJdukJv6ejsgQ0nL/Jpx3OApOP07nSmwg4O1Yy7sN2t1FY +tJUOAZfnWd2X2fbNWdwTZUjAVA/fV4/Y/rcYSyreTkAdinvbR7bT9/II9+0k +YBXVZPgn28r1KRN8rgQcGK1ft8I2U1q4xcCLgIEhJ3ZxRbDnP+pS0eEAAraV +GFYssdsH38vEZ0cQkEeiTHeS7RCDArfmUwQMenP5fTfbVvmCs9apBAwQixFm +sa205nhS20UCOumfybrA9t8jP2R35RFwbc7LgENsv+10Ku+4TUAPcdcrOmzf +Nny23amCgGfH9srNseOPKdTp660noEXHxEIZ2058eQF7nxMQx3QpDLa3Bq3l +HmgjIIXp2C7M9uqeyCz3XgKC4sn2GvZ8f6B9Vx/+TEA1/36D3WxX3dj9mDFG +wCyDPIFR9vqlCDzdPTJLwF1xy1YRbHsGa/3wXSZgdJrO4jJ7vanvc05MrJHC +tsUQhZNsjxSFF/2UlsKVXpV3DHa+PFr3lXpMWQoNR2UZbex8uhRq/+a3phTe +v0SM0mJ7u4nmnyWUwhzWOKk/kAWyd66kxlhJYWwN8bMK27PreRW5dkvha4c+ +mcPs/C38OGS5xlsKk5KrLN/7s/ePbXYDZ4Ok8IB4oSkP23Z3HwSvjZLCTzLe +79XZ9bEScfmq8DkpXBpe/82dXU/7xGwnZCqlcNyocjiYwQLd6Pq43AYprL0g +J8tg1x//kJqE4gspPPzyk4DdQRaw7nOD6nsptEpgKAix61fCmpWuvSKFPkXT +EQb7WDBRrqpSySuNJYoxbTPs+n9GyGSRRaTRseDm70IX9vp/CxiiqkijModI +x5QTez3jlEnbraWx6LGvKGkXC26NnG96uVsaH92+5Vu5kwUnd67sszogjQI1 +oRXqtizQlOs7vfOoNI5Rg5TWWLMgmflfj0uWNHqp7Rs7vI0F26YWogKGpdE0 +eDtjiL1fRlpkbnkyLo3DtH+OS7rs+ijQ7BOdl8bdolC7nsgCwm53AxavDDoX +db1X2sqCcebz39xbZbDh28qqRRUWXDiVHpodIYPp2ZpqYWIsaOrfrDweJ4Ok +nQM9aiIsWCI1dtBTZFDz5ySxaz0LDn2fI365JoP/DWkvSAuw88Fm78zWRhn0 +7Suj7OVkwZC4asCzdbKo3MNTVz7OPh8DH8lJSsriia2c3zjY54tNk/Prwxtk +caOb+YIl+/ypiUrRWK8ri8x68ljzZyYkf5oedXGWRcORY3vjuplAvFPvPVUo +i4uGhkPvHjIhzmiXh7S+HJpO5ZuLpzDB4kDuTz0TOTwqk+154AwTBGPH4h1t +5FDm8Pnv+fFMyGk8XZTuLodNDU7bRI4zgWlVN8ZzVg7Xrj3SX+TPhGnnjWG/ +3sshX12GZI4NEw4cm0tujZZH7oXwT/1r2OdraXbVyUcKeEdQedOAfy1s62n7 +N9mkgMYDHbOrfGrBlmOVuVu7Ak79l0LcdLAWDtoHvIevCniBuErogEstmEUr +xsSu3oAlUW1vL26vhSCF+evG6hsw3LjGWUeuFp555000hm3AhyV1fPrNNeD/ +Zya2aZ0i8vkZ34kVr4G/6kIDmo5KqNAREx3Avu8Z3S3Jv3RpI2bymc09/K8C +ZkSs3J2eKuNYXqwFd1MZfEl1dwpeo4oOAtPvXhXfA8upcMuvlE34YOD8eKF0 +MYwf5A2pilFDc9G0LR99i9j3dUmuM083o+Dz9ys/BK6DyGvVtLKpLchbOmQu +qc6+nyfdt6NQNLDa0jH9fv0VuKxuICTqrYmvOZ63d8lfghZpY/Kv81uRfEdd +1l8jA6iyT9O1urUw4pj3c7dV52Boo/LAjz4tXN2rVus0lgpn1RPVb3zSwqJ8 +ltWB9lTopVq9IPzQwpjjvzAvPxXCXdoXOZe0cJ51svU7LRVcrY/qjgpp4/6u +Ue+06BS4lMQuX4o2cv3slufjTgZB7sJQj1Pa6MYFxl7GZ4Dn7yOHmQRt1L9e +rZCx5QwsT34kxp3Rxl/NlU/eiZ6BqT6pmfxUbcxdvKaV+C0R3lacPzJ4SRtd +LftfP01NhAzPuENud7VRLCPpU/yH0yDx1N15f6c2CvAPKI4lJYB8nIKRi6oO +njxQMhkqegpKQ3iVPqrp4E2NdKYa5ymgH5pZ46Gug9kOgpfHJuNgv3Vjh4+2 +Du4flgjPbYmDHHFvvwiqDm7fOfCm9lQcSBWXXsmy1UG35tCH5XOxINZB+9sV +poMFnQoSIq9jgE9lX439Sx3kf1K9PDMcDb5SYHW3WQfFV9VZuzVFQ8s6pQHu +VnZ/s2dmwyXRkDr/fXX1Wx104lkR1gqLBsGmEEfJPh386jeZ3MkXDSJ+KbP9 +4zo4M/0rypocBbLldUSGCBF9Dszan8uJgK00qfvh+4n49U3c4Jk7x6By4+FF +Lncijhb9c3E+fwz0+VnmaZ5ELHdJuQeRx8Ckx3nwhjcRM428Cu0tj4HT0cvC +7UeJeLqpniNpNBRibkqGaiQSUXmQkaqkEwpv10kYfC4l4hFl0/pbbcHgOMs4 +7V9ORLfO4EwSKxj6+qrf/a4k4i+uWZvu68Hw5ZajryCLiA93f5FzjgyGP8YX +rxo2EtF1KTrNQSUYFMPEli/2EDHl/iGSbNxRCB4QabTi0MVsXTfeZPMgaHqx +70Exly4WZNa69pCDQP5+US3/al08UP+HQlYOgpYYakkLny42FYrsV+IMAiVF +z4tWorroG3RY4VR4ILw7WO5tpaqLrMQVIwGfAND+sXOtlY0udtzeX1nu7g+J +77J5im118dq9Q0No7A8fWMMc/Lt0UfGPKnlS0R+SksPnmh11cXzWcbRw2A8G +1fMGLN10sV3TRTzYxw/SAybLLIN1sfOETe6FcF+Y+pXqaHlZF0lxUmLmd33g +Q2+B07UruvjgbY/54n8+0PKgZs9Mji4+IZJeNIf6wI0zgy7ZBbrIN3lkVzXd +B1xlSAd+FOtiqfcF32cd3vDcpP/Q2Qe6SP/Nva6cyxuunt8c0TzE7u/oDQYh +DEgKo0fKfdXF1f8ECEJ7GRC21yHq6HdddPig3rhswgA7lRPHpcZ1caokYNtG +UQbwsN7GHp5jt59SG0is8oKjg+Fn+XhJqN3hP3Jr8SCYa724YqlJQp2dTPKb +K57gzGOx+60WCV++FIwtifcE34/N6/YQSeg1w5K57u8JaSmvY730SHjZo3us +n+4J3d87D8UYk1CddS8k8osHeOUPE6sdSegx0R1iR/KAU8KcrzacJKHvRhGz +W6/cIHPkVMKtWBImHdz42e26GxQ9WkXfGk9C487M/O3RbtByhLfcMImEm5uk +v2Spu4Fwy/ospwwSLic7j9inHYD8U/IHU4tIKHC9++Ly3v3w8Jfh4u82Er6I +MKtcL7kXClprPR3ekXBPRK9NyLwrJNzUbSntIGFzIvX13y5XsNyjns3oJaH/ +woNVgRddobNOWq/jMwm57xwdnhd3hdG4v8GlsyRcuFhi4SHnAhJCtaNe0mRk +yDlqt27bA39HiPaPZclY4FJktkttD3x4UsqSUSDjKuW9J+YE9kBBSFFS+0Yy +zhmH9F7pcAKNnouqqElGQ+P9ik5eTmCSG+opg2Qkxj9SCEtxhAANYt87Bhmp +mc5Tl6cc4Nhv6QU3HzKWMz6q1XY6wPGn3NKTvmTkdvw4NMdygBTnLhf+IDLu +9Hm3qzPBAW4nRLw3iSIj7c5siLCsAwx9eNhbmUbGmw25w4F29uB0zrrnYi0Z +O3Oi7vS/sYP9zqTfG+vI6Oa98riFaQdeG+UkKxrIuMEO93QX2EEIa9Kp7QkZ +TygnJJqE2kH61/PdPK1kbFOKue4nbQcttN6u8EEyClXcSn7dYwu0Sa9OFz4K +cpE9/Hy324BEvXlhgwAFo7kq7p/fYAOTZ7YEKQhSsILatu/LojXkKk4LfBWh +4PjVuyBQaQ3Lu6NNg2Qp+Ib7oYPrRmt4VH++IlGLgm5DL872CFiB8dmH6ZWO +FHR9zVBUXjQHaaeCAxLOFBRZ172W0W8OP5USNCJdKSjjrCLZWm8OhQ2WTXQ3 +Cj5RMB8ROGEOXNOdK80+FLzE67jRltMcGp3GAgajKTgYllBQJ2QG25UJO9YV +UlAhvu/BJqttUDXxXNHrBgU1Q205fLW2gXJtyHxdEQUL5885toptg1VWb/J8 +7lJQfjWhfPqTKTwNTPzZWEVBvaP7YqrCTYFeP5sV9ZKCBxMtggTumQDF/t3Q +93EKqsnImIptNYYimZha+hQFX0VYBUtJGoP4V43UizMU9C42LqNyGMNseBLZ +dJ6Cce9dP71tR6i4Bkm5KxSc+DPzyCISQevHPU1HET0UzuNQyr4EoBabHPFU +Tw9v3HuxtWo1DRoMb662oeqhpc5pzn99RmD3+1FGl5Ee2iwIHYwpM4KIgLmS +EWM9nP/04aHWPiNo2uf+WdBGD/MeJh3QqzEEHwOK1V53PaTZ11neCqXCnZ+f +ZWaT9NDr2iIXSukDvXTp9okUPYyxZ2yhzulB+2FJypo0PRznfNTIeKcHC4M2 +dtIX9FD1/UsXu2Q9sHpTm4DX2O+rXo/xX6bA6N1zE6nlerj6j9xw6hQZtjAM +Hqn06WHG/JzCh1+68J+S7UL8Bz3c9O6LS1aPLsx+8iQPDehhc95oaHi9Ljx0 +Tb2bO6yH7cqJBTfjdcHe7lOW5IQeKtTEq1SL60Kk4ekgPg59TGrP+BGNRGgS +fqc4oaKPGX+6Us7e1wbNN1/3Wavpo75YxMH0LG3ISF3IurNFH39m9/LUxmjD +vjXKgoe09NFqqpNw0E4bppbCFgb09bEhKy/T65sWSIzIdry11sfUugdthBNb +gfHQJ6HqqD4OtzybOdStDpNHRsO3h+qjYWDBTHixOkTI+ft1h7H7C/PKNJ9U +h+TjgfZ/ovXx+KfDWVvU1KGMGrbBKFEff/Sk8nw+sQWWauIbGq/oY1xtRVQH +aTNk3M+dbW/UxxMCF8fz2lRB1m3DyMEX+vigTXOMUKwKNwUL+2eb2OPn3dva +dFoVmEduPpVo08e03afdmmiq8FG9JN21Vx9XaiMizctUQO02S2NoXB9DndS2 +cuUpw6P8Tq8ZcQMsarjDOlOgBIM2im5hBAOUDlc61xavBBx/j7gsShvgT071 +CONDSmCya43t6g0GWGIZWVSsrgQvOKl6UlsMUGU5fDKeqQitnnl8xnQDlCl/ +zVDo2wB9yr6l6YcM8POv2mvDYfKw+LbmtvhhA4wc/MO4sl0eZE9wX7/iZ8DO +33fRV8XkYX9XTtaNIAPcVJI8H1UpB4On38QyowxQVcxk/Y1ZWfj+jeQwmGaA +ulnTOeYJMjB7e+W3Vq0B/jpZ667bTYBvTmb5Z1kGmHzu8Yh2GQF6V52zGK43 +wL3P+J96JROg3l06+9JjA/SpSbYOAAKcIpCp/5oN0DXtLBdniSQIJfkeb/lg +gHYRf+xG0iRAw7uLg8FFxZy1E74/IsVAXlz2zsNVVPT0NFXUdBUDoUbPXYQ1 +VPz4wbk/lyoGv+SnC14JUDF9wYghsCQKdd38pkRxKj5fcNnMFScKFmZ4emUT +FQ8Gb9IgXhCBgyp3+a7soOL8GgMv3h4hiHp+wFfVjor2JdxunnVCkM4QeVVh +T8VrP4LWjF4Tgoabkamv9lAx8s7J3XEMIRBTtVj/z4OK07G9uucn1sML1a9i +7mFULPduTuE0FYQtagobVPPY30vaHPVEXQCwqT22ooCKHV9uWf1Y4gcnn8TP +9BtUhNf50/va+CH+9kThnjtUpLT0zasE88MHtQaVs5VU1NZZLCQ+4IO0zS7q +4y+pGNiGCt3uvDCz5QKlYpqKh6+Yc3j0r4beVtwu+ouK77fJ32TVrobHAZMO +oXNUDI4+umyRuRrSKiyPUhao+K/AIIvfdjVsoXKU1HEb4hBj1azQs1XgaXlE +sVHCEK9NMcgjLG7o9DZf22lkiKyo96GNLZxQzzcnTQZDbCK3ihy8xwmFdws3 +XzI2xEDOEk/tdE4Imvpn5mxmiEcy59c7OHHCuvCquA87DTEzUyaq/AsHmCUq +/v7iaYjeTRpHr/BxAPPG4ue5JEM8WRVu2/dliU4xDf1tlWKI+jdzGxOql+jV +n8fX5p8zRCuJHM+IxCV6hfyAnlWGITruaI4w2LxEL7n8+FzuVUO0tOPLkwxe +pOennjYwLzXEs5/t9o0KLdDPhq4/f7nDECvbeuUNYn/TeUWTiia6DFGv4Eex +mctvemI5R4NJryHKFT3VPU/8TU+YnPk2/sEQl3msevq/ztNP+nQaGX8zxHvJ +Bo9pO+fpwfuyR378McQUskzQiMYc3XXbRjSUN0JfuzD/C8K/6P86eQUbNxjh +XGP27e+TP+n5jMl+q41GWCPwNDm89Sf9WyIr3FWN7fDdTyySftKDm3fejyQa +ofyHuawirp/0ZNvj8kwzIxyy/spc5pyh1zl3LZECjfCv77WPjF2T9P0/6loa +jhohQ8DG5rLUJJ0jKv/ytlAjrL/tIqgxNEE3u+pH2h1phJKnw4WOhU7Q2z9y ++ofEG+HK35AP0dfG6aOeW/vLs4ywSmGbRDfHGF3myBnW1sdGqGSc/a2Wd4Se +tnKInPLUCPesJj+bGPhO58owK//+zAhzHv294FP9nT5as/pOfrMRXvT7ekD9 +4Hd6HUfCZZEOI2z0Wy/R9+Qb3TUzNnz+qxGOlLVejEv5Sr9cH0l+KEDDvO5G +JdMdw/S1ti7l0oI0vEOosndQH6bHDuprhgvRcBfTn5jDN0z3Wf1HWVuchnbu +hGvdL4boejvDxArladhHGDz5xXSI3j0U/Ou0Dg25E/tEpCw+08X5/ct37KGh +QdHeJPOJAfoN0xNR0y40tLUvzpq8P0AnnkgzvbCPhmt313vzhQzQbafLuno9 +aHiW67ho1sJHemL33N+D/jTkYqgylgQ/0v8UxphExdEwv2TwgrFNPz3xQ7qA +XAINz/TlLr0Q76eLSRR2PkqkoWzzxOfKT3107bPPDq1OpeEGmc20J6F99MOB +fCnpl2i4/zwP5dL19/Q+wwsdRXfZ8W/aIXJOtJfuc+xGjmUpDV0+u38mD/fQ +50urGeNl7P75HoqGlT10EaXe3zo1NPQJ1XZx3t1Dt+aVk33wmIa+byJvv7rS +TW/oLPLq6KLh3QbFnXz6XXQrQaZmWC8NcZMHaK7roveaN88T+mm4+WVN2fWh +Tvps3VjSgUEaWg2MPjyd1knXLNC+92OUhie1/7gKjnbQG/qMw1InaPi9dI98 +zZMOupWYA2hN03DOYqH1bnYH/dCZY+9C52jY9ie58qRVB332ceIVyT809FPK +fue6sYN+aiHrYN0CDekXNt06tdROFyLd0dj/j4bD+bl35rra6blH6uZWVtjt +Ert3Vt5vp/8PCmQ1Xw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09948744287016863}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09948744287016863}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829560408621*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"91c023e4-b3b3-4c58-be4f-f4ef575202ab"] +}, Open ]], Cell[CellGroupData[{ @@ -2863,14 +8351,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918488983507824`*^9},ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-\ -3438788b15d6"], + CellChangeTimes->{3.9918488983507824`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913294794877434`*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] +Cell[BoxData["9.413090085527655`"], "Output", + CellChangeTimes->{3.9913294794877434`*^9, 3.993829560441625*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"9c731138-c85a-47c4-ba6e-7f28204091ee"] }, Open ]], Cell[CellGroupData[{ @@ -2926,177 +8412,284 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488997875195`*^9},ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-\ -0e75880d5d98"], + CellChangeTimes->{3.9918488997875195`*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 125, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294796838703`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.079353408457313`*^-228\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 13, 25990558345276174249, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.993829560525627*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], +In[99]:=",ExpressionUUID->"633fa644-c8ef-4162-829a-99935a16c3ea"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 126, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479692892*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1852391941532678`*^-234\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 14, 25990558345276174249, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.993829560529846*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], +In[99]:=",ExpressionUUID->"2aa72bd3-ea94-4c64-82bb-7eeb98b04716"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 172, 127, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294797011433`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5507379966679197`*^-240\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 15, 25990558345276174249, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.993829560533506*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], +In[99]:=",ExpressionUUID->"4fcb0a63-0864-4e84-b255-b286b11213e3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 172, 128, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479709572*^9}, +during this calculation.\"", 2, 99, 16, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9938295605370283`*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], +In[99]:=",ExpressionUUID->"f9ba6b56-4df5-46a9-8372-0221558da0f3"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJxN13k0VVHbAHBRokzJPF/ubMys7jn7MVSmRDJkKIooiiRCZcoUGUslqWRI +keHeqBSFSiopIpUommTKTOE771rfenvvH+76reNs59nPcDbS7oBt3txcXFxB +xI//fE9/etZETi7AKVv6XYZsNuMdeVJhxu9ikPKZ3MkoTwoC8Ve7pd5lomck +XHOrpx4Ksb3RxfMuH8Usupioem5Ea0YkM+e6qtBWRrLKsIcD6r1vEzDZ1YB2 +Vp4IlffwRpvIgz2/u96g18uKQifcjqC5LoOzY11fUPMOnW0utnGo0bS44HX+ +BOpdd9+96s9ZJNd799tutQX0ZOn8ePWaK0jMf9eNlaY88OLS3JsDDQUoc92m +WhsHPki/90F8XUAJ6j6v9fC3iCBYLe1IVHAsQzntN4VDKIKQupi6c9q7DLkI +0XbNGwlCV23FvaYjZehjrPwi9x5BKOwemjQ7W4b6Dq5iid0WhLaAxzzt7WXo +h9lAjf4OIXjuVKypvPUWmh07Vx5xVRjirvlMBOHlKLkg8hW39BrQXkb3TY+s +QJa6+0TFVdbA6BW5ecX4CsTXtM2Bpr4GcipTztxIqUAn+ykfrIzXQLN/T0/F +hQp0TPnFtzP71sCr9/WXo9kV6OAVqUXqvTVglZzXof2tAtnlVqpZuYrC1rRH +lBebK5GI2sUAd29R6ImjJd3bUolaa09WBQSIwqBU9etr9pXI8oOT4ZlYUfCy +TxLy2VWJTGQWTXtuisIl3Ei+IqQS6Z63dA34KwofbQ83WxVUIskz/UlZl9aC +h0lO0bU/lUhK9fbJ2aK18GXCFmVyVSGZhvhI94q1YMr8YXtsRRVSGGMcoTWu +hQOWNz+aCFchinWgR+2PtSBwICvxgnIV0lm+oN+vIwbja081+5sTdRAsMaDd +IgYTCrpc19OrkO3qH5/OtYvBozvy75efrULb8u92//0oBiWRa5TcL1Qhxza3 +V09GxeBo7NzI0tUq5K527Z6LuDgcjfTIEGJXIb8BzYwYD3HQSzZhb+2oQgnb +LfA30+Jw/VApyWMtG8lwWmW4l0lA7pBBVYQkG91au31m3WoJMMlzfJ8hy0ad +b3ZWZChKQKyd4O8yFTYi2wUr25lLwN48hkGhDhs1bLnM23ZBAj42nyenb2Oj +hU1TrS9ZktAHOvNOKWyUXhR+c2GTJOg9+pnyJI24n5crUd1OEsoKft7VzGIj +68erjE97S8Lwvof9vy+wUY6pEts6VRLODqmd0CtmI0OwOve8VxKeL/4VufeQ +jQ4bXd31LEYKNIePmtaOspHlFaFJqxTCgpxFm3E2Ul55LLH1rBQ0i0WJfJpk +o7YOx8r261Jw0yvFaGSOjTQCBXg+tUpB0FvlW508HPSjKLRoXEYamvW9U5ol +OKhe8Ov6I2RpMD0592ONNAdlB297NaMuDcovR645ynLQRhP12b8gDSMP1Aze +KHJQfs8Xi5U+0lBWd/1LBp2D3MRshmXZ0tC9v7lNx4iDdCJqo/PuSwPHO89Z +ZwMHrfpClyA9kYbFNldzDYyD7pbzIGq3NPTtYeyWMOYgCau76VpL0pDrws4o +N+egtmiy7kYrGfBRXx3B68RBxT8ymp9ul4EjNlLt95056MTWJTfLnTKgXIrl +HXThIHX593FbD8nAOs/O9CZ3Djp1J61rxzkZ0Cus+2vkxUFmo/PhB/tloDfr +8hWrQA4KMz/DfDQkA0EhJzyqDnHQravq79dOy4BiDuml2GEOktruYXSXTxbC +jw6VvzjCQUN3Hs/waMgCr4NfFV8EB5FEdxU7GsgCz7jhqPUxDnL0m3UsAVmI +i9jVm3Kcgx7Kq1bb2MvCl0i5nqVIDsqKSQ++cFQWVjj57q06yUHNHxjkoWhZ +GE5a4dgRx0F/dRvb8WRZ+D33c+l3PAft/T6lPXBJFmpuSscrJXHQemvX3xqN +shD5yvGI5WkO+iJOPdgkKAeXY/PK3pzhIMmAenlJSTkw6PEqrzjLQdbNzi/3 +KcmBo4p1+KlsDqoOT1YT1pGDhV73gHXnif3pHRvc4SwHO5b9+m19kci/4amc +Uk85wHIFnflzOWgyQ8Vyab8c3LqjmvaI8E4zx5KC43LAsHcOpuRxkHZJrc9o +PnH/nQT92isc5MPtIGlSKgfVi2fA8SoH5bqOPDlzWw4EyotVhgnzCpGo65uJ +60I/jgpd46ANPvfepryWg9uDMsPnCQc+tI/rfS8H14zdccUCDnofFD9wclgO +9IsljikWcpDwC8UzXdNy4CqStv8CYTPKXVMmlzzMmkmvFy4i8tf1K/+VqDz8 +Dt8RNUK4Xytum7KcPFhX8c45FRP5PKXAfYQiD+/OsB0fEI5m2XnKGMrDr2X9 +TRHXOch8Z964gYk8nNxsa/SRsFDUr1gHa3koUF3WY1DCQW+vGoofdpSHtr8K +lamEcxvjitI95MH354vqPsJ7vr4xuLVfHkSMaaPqNziIuVLp2fNgeSi5ZOIa +QviO5b1fvEny4NH85c0s4Uj/lcfJWfLw84Fnn/ZNDtqUul3I5JI86LzKovgS +Fqy4enlXsTwsfHK6dp5wx+sRreOV8qC054RLE+GLExsacmrl4djYU6tfhHeL +J9nfeSwPWVf7QwVLOYhh0Dnw9pU85O880MskPOasEjLRLQ+x3EMxpoRrwgNX +rhmQhyCXV7udCJ/IfXBeY0QepucPRO4lvLFuFdN6Vh58fnJ3BxIW6HOq3cet +AFpyNwNCCLcvK7ROEFAA0cbdpqGEc1TGewokFMBiF/f2w4Q9NqKABiUFMLu6 +4ep+wjSfFK4+pgLgwtlMd8Ijid0ZC7oK8NnLb9SSMOcGVUUWKcCfO/0jOoQj +XhzmGFoogILjb5oUYZORhxsd7RXAdJP1hRkiXn4Roa7D7gqge+6A8RvCbetc +fTN8FOCC8SmF64TP2V+fu3VIAQrvndYII7zzyNSpFxEK8JoqFrCRMOWcidxg +nALMMb16BG7+p7/TylamK4CQvW/IKyI/7PcfcUqOAujwXdc/TTj8L6PNpICw +DMhsImysEOrpcUsBwp6+l5sn8s8HTePH7xB/z6LYqITw2did4ndfKEC42tTN +WaKe3ApvFnV2KoCno8zUecLKT2cNJvsUgEeqAOkSrliV5aI5pQCMDcvvuhL1 +GarW98t6SQE22gt2fifqGbdRP76fXxFmDz5pO0j4RcbTy4XyinAy21X7ANEP +WWyxdY00RUhbdIoaIPrH5a1nQ986RUhdTQl3JPxD6u+A7CZF4LoSpMMk+q18 +vUWIka0i1J9YbEvO56AQt+yVTi6KMJ5v2fmd6FeeK1rMzIOKEB8/25RK9HfL +o+O15UcVIfrKp6juyxyU3t9i/TJGEVjdOy0UCCvQvAP4zinC6QP8mWcvEfPq +1gXOiXpFGA00TjXIIfq1q3VhpFkRzJ9c4d91gYNsuJZv3vVGEeY4/b5RxDza +s+1gN/qqCHz4CFZBzKtNEaTIqBVKYHRbvrw+k4OeC9+/ZrhKCcR32DVVZnCQ +bYFj85iQEniZ8znkpnOQ68vkNZ5SSrBReWCZSyoxTxSnrxmrKoGFlFt8IDE/ +p9jpzXOaSiAVpZ+omEjk01x1uFJXCeLfWH1uIuZt3CEPfWVcCT5axBr/jiXe +V7x/XN6bKEHg8eOZoTFEvDlnIzM3KwF2U7Z1PIqo98aWZm47JbAhhfo+Iea9 +orP38D0HJViQXDMsT7wPCoaW1hx2UQKZsvpi33Biv8X1XPv3KAHvB7eOtyEc +1ORzebgxRAn6M7WDuAI4yOKvkeixCCWgLz+9rt+fg1rTO/R1o5Rgw4mXjzj7 +Oaj7Ln9UQZISCH97UUXaS9SzTUGBW6oSfH10vqp2DwcNfMGfiWUR8UdTHxl7 +Ev21Olg0LpfYPxkHLmE3Djp8RcgAu6oEA96fcrbv4KBZ3RLXqUIlOMz3VDLW +kcj3zk8F3uVKkC9bgs7ZEvOywtxgU4MS6GfOesWYctAls37XxSdKsF74k8cU +Iuq3+3hU9XMluL3hb5oFi3j/crOfUd8qgaBmq0qGLgdVZW8Z+dT9n/WemcZo +cZCh6g/Rc5+UIMQ8Q9BWjejn7fJuK38owZ60LY3HVDjo6Y+aqPohJRDababZ +rUC8v45vKwz9rQR/D2ltFJThIKeihJHv80pw81GN4owwB/nP/o5qFiSBINL4 +coM436w/tFfimygJboc2PpaeYCO+wfc3eaRI8KTlSKfVEBsVfmjsxJVJcKlV +u/J3DxsFbzf0d6ORQEYiM9qzk41MXpYuC1cjwcK6tJSUVjb6VHdW7bY+CcZH +HSUE6tio1GBVw5sNJFhakNjndpuNwitOOI0BCTSDjl7eVcpGEvk+MapWJDCY +S1MPIc5zW+OM3l3dRQLz+fkDxQFspLBYdqDeiwQJxZsub/Nio6EQZZ6efSQY +WKtx4LIzGyX6rtaQCiZBrpwoSxzYyPFzZKNeGAl2d8lNGBHnTbLLpLP9CRI0 +rCvjzFDY6KFVT2xqIglqvgzM6K1io9QmO+nS0yRIs8l0qfpThdywJ7eeZZJA +QP15cv1QFZrTKO9efokEqSu1I06+rELaotGaEZUkCJ9XmYxNqkJcyVNN56tJ +4P+aa9YutAq18ux3qa4lwZ5vydvzvYjz9NS2uN+PSVBf58XdhFWhgnfkDz7v +CXtXTw38rERBdhcC43qJeFrdhC63VyJoEeS9NkACLNoh7PX9StRTO631aYQE +9KPslbmnK5HE5eb47TzKcJtqureGXokGJDG5ID5lqN4r9EhZqBJVpVdWpgkq +w1nLiR7uiQq0NSbnY4ukMhhuF/lCqq1Aid7+2sZqyvBri4nYN7MKNKcq8knd +QRk69/vGFJ64haYvyUTruChDQqrNd4H1t9CkMIVstEsZ5sPepJ2aLEMjE0b7 +zfYpw1wcM+b93jL0pXbPtMtxZdivqC/ubFyKWqxqhBILlYE2nXNg5E0JyvHb +ib5MEb9/GnfDcgvQuR7fL9/nlYHVhMlpbi5AZ7YejhteUoa1ZgZsyvg1lKqT ++HyWXwXY0l/nN5pfQzF/Kp2EFVSAz7VV1276KvJLXhHI2qQCPJ+5y8425CHf +BeG1JlYq4CrvVelDykN7A2SqN9uqgGWuUKVj9CXkYa/5d5uLCnxJyHR4apaL +tsvuSNx3UAUUi3rPRH64gFg3S69kZxPrHUap5vZn0Qelm5c3XlSBxy1K77H2 +Myg8uyRv8rIKbAu5+KJ1+xlUE12Uu61EBfRW1MV+dMtC2s5XzgvdV4Gqd/MZ +KDoDvX6Zd+7BQxXY1VCnVCaUgQJNL2X7P1aBrschf3oupaNbGjlnWlpV4GtC +IlktNg0xVpxJj/+sAvOZD4zNsBTUHJ6ZpveNeB7XsY2fgpPR3rH01IFBFdib +HZkgX3EKFXw4nWIyqQKtP+JCTq9LQkpVCYmLvGRQthbLkvaIR/W0+ISy1WSY +WRu96hknDu28dDLeTYQMq+50IBHBOHQxMfrkPWkyxN4LPGvfHIskdkVEhaiR +4Zd5QJHwvmh0uyMskrKODMXcOcNfuqPQdsujJzr0yJB+RPi7rE0UytQ7ckwb +kSFV35y0PvoEEhQIODpiR4aiC1Gr2BfCUWn0gdBLjmS4SKWcvF0ehixn/EKs +XcnQoC3N/fP5UZT4xTf4hhcZVgzXCJ+SCEXL7+4O3BtKBs+xXS2q44fRNQ3P +APFjZBhtLHi4zuAwMinYdbApigyW3G9/3IwOQpFpbv7Kp8hAVSHbnaceQgor +XP1ep5JBU2SkoysqEN0P37E/KosMr71jNlo/DEDz3o6+n3LJ8DL2lbuI6wF0 +4cN2n9NXySCc9DOrTd8fGdrZ72UVkeFeguhor6wfCmHZeuWUk+G7eyuSX7YP +/Ra19HBsIOL7KzIfqO2N3vkrt+1/SoZFzXvtx8ELPXwyjyJfkKHpTuTLc057 +UHr4TcXrnWRoFtTNmrrsiY52xKbd/0CGyEwR6v02D+Sh4bbU1kcGqy3V0Wf5 +PZDWF4HeuUEyHJfoJ8lR3JEU66uN0BgZRClcUv5Nrogr+0Gd8hQZvPksvi0P +ckGvLA7mWS2RYbDz2O3N007oYOUr90trKSAmE5+3kG2PHFdff1kpRYHd41Pm +h3O3Idw7CnsiT4G7Tdtl2kvtkKD0OvlRGgWk9li+y+reiiaD+E/zqFMgu/T1 +tY0GNujji89/JbUp0BC4fHd7sTUqjcr8CCwKTFZoJ9XWWaAz7/dbOxhTYHhw +78UHe8zRMV3T+/s2UYBhVPx7UGozsvoxcTHTlgKsB7Jy5pVmSNvkxepiBwrk +Up7vN80yRTK5BRG1LhTIvN3WzxVrgga3OrgOeFGAOAKcTUoC9KZE/fnsPgqE +PcvxiscRusfDu0EwgAKnnq63N4jGUFJNtYx+GAVoOjRvX/P1KHBN2inLExRw +aS5bxvfcEDn7+czvjKXAqx0F3GRPA0RXlHqfcJoCD3m4aT5NukgkbMwiN5MC +U0Eb7YbSdNDsm+a7Feco0CfscqXETxs1x4dd6L5KgTX6W1ndtlqoos+Of6SI +AiXyxy8+qdRA59czw7hLKXBG/WlQyUc15DPy3lm1mgLr5dNkXh5nIBtzdjOq +pUA8/iq66DcN6ecnG25/SIFQRWuFyAgq4nVkSR1vocCQIIPW/0IFjZSLJWa8 +ogA7bn+wd6Yy6uQfninsoEDBjQ8CHftIqOjBpa7WTxTgLZbWrzqrgFIlQzb3 +91OAv+sKf3ChHAo5ZFMz84MCb1a7zui/kUE7n1NpAiPEepfzQ4NlpNFGylK2 +0gQFjgq1l9Uck0RqkV28erPE8xXJtOTOiCOx7vIQiwUK9IbMHGhLEkMDKR6O +QSupQI24G0oeXYMODqopawlQQZb/LSehXQTNbJ4bHhahgrfuOpGd6cIoqvDx +3ZviVHA+NOMSc14QreLJjNsnQ4UUC8aNnger0RmPnXY0RSqUyUolDizyI/k6 +pvxXFSrkGRaNyrvwIa2wRo6HOhXIh5Mgd8cKdK8zLUpBmwpewf4CG//wIFNd +N+uP+lQ4cIPU8a2Smzi/06VyNlBBMzkv3uXYMuQ4OtnvBFTYr/XoVMIOLtRn +/ahcfCMVfL9oWj9JX8T33zgd0W5BhahXcW29aX/x497UtVvtqVB+w97/xeAs +zts4/knAmQrnVbawyaYzeLpS/Y0WN+J5l0qyvt+ewmVOJIckelLBKjGnP9V4 +Ei/44GSyaS8VeHnvvLk+MI5rGJGFlvtRATZcX+y89BuvyR7rfhRAhQAPyfSX +fmN4i13SISyMCu11J82Pxgzh28sdsD/HqdB7stGqP2UQ7xFQ5r8bQ4U2eaW5 +1zU/8L37RzpCEqiw9ZJg8ZZl3/Gxp/eu6KZQ4Zf14r4In694OCXBfzydCsej +eu/m/OjHeWLtDSvOUqFwMY6yPPYLLoEPvVK9TAWBw0hZ9k8vfuXinYs/r1Fh +XDzZKf92D86YO+lTfJ0KLmoinM3nPuBVjnY63mVU2NNQ/THrUjfO4sgvKVdR +YYVwn5ruky78yZrBlr5qKrx3Cnw+K9SJ2wZUZ+fVUuHBZN3bN0c68D3MrRoy +j4n9ad/ER81+jQ8lyM53PSPyee7zZwnrNjzk6/fHZ1upILqM9kFUuxXnMuVk +2LcT8QzHvZ6afo6fuhLlvuYdFYo1hp25Bp7hYovWjFcfqdCixapNnH6KX3KV +nkr5TIXnPLtdhdWe4BUSVSl8v6ig76IOPdMN+PrgE85PRqmwsHEdT3/CI7zx +tSX55CQVHH4Ote/SeYhba0qOGc9R4Sd6mrRq9AHemdJfu7RAhR+zPv1mhbW4 +x2B5wgNuGvwJ/RhnFn8X/7n5mH3ESho86g3IXJtWg//lFv81LUKDatMjERsE +OXi8x+dqjjgNFt6cmck8XoUL15XFBMnQ4K3eeHnl6kr8vGy4jZYiDSISSOUz ++8tx5bBNMiMqNMhsj9Sf+F2Kl3aKfrtJp0F9hmZbyfUbuL5ub+U+dRpgnKfX +biVfxy1GQy2+6tOgLsPutFhLAS63TiGej0UDQcatK+cX8vGRoKYGVWMaTP2x +tXVzuooT/+Qs2WyiQXxzk0L59cv4mWkRVpAVDbiQrGBYfy6+17Dm6FlbGkwY +oIVvO3Jwo3D323ccCE8tyGmsPI8L3OcZ/+BCA7aFyZrP387inxZKNJZ20aAv +M8/852QWXoFs/ZS9aSDZF1oXpZ6Jx0ZPF2/cT4NiY1W62ul03LExd8A3gAZw +uWa1HykVp68wJaUE0+ClRzvJZn8yPr/pp3t5GA2mZRqXnx5NxF8mpuW8OUED +z/wlJ1JpPH6lRa9rKpYGodzOD/ZfPIkHCXxcK51Eg2akrkO7G4Ob2cTYslJp +sJbUOu+3LBqXTKef3pVFg3aLS3+xzyfwwdetz2LO02Cdzx7Xz7zH8Ptrj/AW +XaKBWfruc6UHwvBUB1nTZ/k0KM1u2MgvEop7nnsUOVRMWK/EsPNHMK7b7XNf +uIwGz6jXdu+cCMJ5ZYXmtKtooKLG72Wregh/58bRc6yhgfyW4QMHpAPwm3ku +QWH3if2eUP/UR/PHT/Rxlec+ooEYrx+vQ8Q+3Fa5+Ff9ExqUYboabEEfXNlr +C73/OQ1apQvCfLu98KnCCS/e1zQg81AtXbt3483fL1xldNJAQaD7wGc+TzyH +AZ+sP9BgG+2X/MGnO3F/v28ygX00GN0jdXPouSuOylKcsr7S4Fx7mbui1A5c +dFT7TPUgDRq/O7rFFTriA1rdbd2jNHg+8nJW4+B2vDooUnBhkqi/z2+yK/23 +4UkciqXSPFFvru0Jcrm2uNv083jTJRpwmq0ye0a34BqGQY17l9PhqOwwTXbW +EucKl+I6xU+HpXSnnaEW5nh7bR2rTIgOx0aNfyr3bMSLFrzC2tbSoUZQZ3aw +1BQ/ilZXT0jRAQUm1qmyjXGr6MpxCQU6rDLRVEt8i3CFRifN9Sp0aFAnbxHL +Y+Fjyxf93Ol04vzaMh9dY4Q3biq4HqVOh7/2qbwKMgZ4dqLl12vadNBo5Tk2 +WKeL+7aMkZ4a0MF827Xc1Mva+AaBczsHWXSQbmzSM6/WwoVssIuCJnToSDLd +f/+POt6X1t+ltZkOc2ORTfR+Js5+nSS23ZoOxWySJcjQ8fi1WnahdnQ4wGpM +YF2g4M4OnadzHOlQMtbAt3aHCs48d6zlgSsdClUo673sSfjCO+WVnz3ooCNe +fq5ruSLeJvPMdPleOhQ5kz4PPJLF890Comh+dDixf0VddIcUHpwn/sAykA7h +e16N03Ql8M19tXMHjtDBYQtpBbl7LS6jvFs/I5wOEg8MsqLvr8GH9vAd5kTS +YV+PVs94uTA+kmf2oP4k8fydXh73XATw0e6olc+T6NAlxCcv7M6Pj4k9sOtM +pcNFkRPbtW/x4uNb5y5+zqKDiK34TnzTcnzilN63ofN0oH78YS6qwI1PPj6k +NXuJDh535R2QJhc+zXUrnOcaHWYatxiMff+LzWwYbBK6Tgc/utYJ7tY5bDaE +KixTRsRns51388oZbL5y9w5KFR2idvU54smT2J+hvGtaNXTg2lfPZ7xtHPtL ++zC84T4dFKtDZ/c7jGGLuyUNNz8i7reubxWRH8aWLtnHbHtCh9saL+v5x35i +XN1pL9yf02FFZq9vjfR3jFvshcS+NjrkPD/4fW3GALZ8K59n8Fs6bB3o9OSx ++YKtOGV2M/I9HdJ2Ki/DLPow3sdRU6d66VB2ktvQf/Yjxsf1AGUPEPG79dYp +NHRjqzbMJV39SfiaWsrKr53Y6hC9jtIROmwQZ/pUOXVgApWHFO5M0KElaJ90 +4Zo3mNBQmW/jLB3qS0btNq1uw0Rog1WtC3T4YvFw8nTEC2zNbupCNzcDal7m +x8tueoaJXtq9+etKBoyvCfOy8HuCib3LyxgTYEDh6lIuu8+NmPjaDx/+rGHA +5S0KrMOXH2ESNpLUlZIM2Kur++LehnpMKsk+UFSOAYviDu9IN2sx6aa0e/Ik +BtyuY43mRN3BZJaeL2dQGVCqpR02X3Ebk1vPt1VXlQG5p3YnbtJmY/JHzC4g +LQb0X9nHde5PBaZQEdVvqceAYzqmo7/5b2FKv+6rO65ngGLzVu4bqTcwEnUu +1BMxQNd+n1rF0WJM2VOvwd+MAVdna+88uF+AkXMPCRy1YEBRbaD0E9t8jNpV +5hhrwwDJRdHkt6pXMJro4JVUewa8IU86fEvOxehbqL8uOBNDa5FuK6B1AWMm +7tYrdCfi/y57LMIgG1NrzIus2M2AsB4175nsLEx98f2zWh8GvMvfSIsxy8A0 +jCTFnvozoHfX+dHDB1MxrWD7nW8OMSB70DA/uPUUpl2edr0nhAG82wwbuC4m +YDqDz8d/RDDgy/zos4KnJzFdCh82GcUAg9AdFvYWMZi+h1nCUhwDjmw5noFJ +RGEGF6Ner0pmgHXIcg1Pq2OYYed9WYl0In+Nifq/eo9i69fMeZPOMqC8MP6A +/8cj2AZrvQo1YghXNSy2P9E9jLESDs0bXGbAtIflE/xTIIY3lJmZFjCgoZ7/ +QVHeAQwt/Ey1KWHAr1JpB/2lfRgYUrt33GLAKS6vSItXezGTw7tVvNkM8O5n +n7y9zAszvZV3IPAOA/46PFrRecoTM/v5vibiAQPEOvf5PXq4E9tEluROaGDA +s5SJ+YhxF+zn7s3XNzxlQOdBH7fnbU5YytVQm7HnDFAz09tZu8oB0+ornixo +Y8DXmQpB7uxtWLvCu5wdb4l6jCTXhO6zxULc+YyF3jNg66yu7OicNSaTa/i9 +4RMDXDI1NyZkWmAP3vueDu1nQKVOZGlX2ibMQ/qCjtoPBjDbHb8c/GaK8Tg/ +6+4bYoDZyj0myinGWFH2XOTZ3wxifs55d4zimMVbBtVymgGGlv6HT5puwIbW +urxYnGdA2Uv1P1IrDLG0baeC2EsMyOqovz1G08O0M+5J+S5ngnL9Or+uK9pY +56vBOjl+JvQGeUb3eGthYUKy3q8FmTD5NvSjz0c1TG6L1ep4USbc8V2vLuXF +wB4mR1Sul2TCGeF89+ntVGxPy02nUVkmuGiWhj3KV8F4+T8uXFNiQlGQ4MvL +JiSsZLNAgTOFCRpnxP8MOShg1vEsS0EmE5L1g3WSi2Sw0Sb/sUcaTDB6I2Ai +4iuJZfJcyg7RYcK5lkJ1zdNimJ7JS5aqIROyRGOOUVaJYu+iFr70spgg/c0i +R65EGDtWr550xpgJwTD/NfjJakxx0V3TYhMT0N+vYjJufFgDK/XtgiUTbgY3 +CN5xXYHtjaiLqNrKhBXbx85cv8ON8d8bIflsZ8LWfP3mRz5cWOmsQrPsDiYs +67T23V73l7XVYOvBNncm1Fdsa96jNscaPxIpFrebCU4vltXvWjXNyuaU3zPy +YYLSsQ7GU8sJltFEr8eIHxOE3J8lsj+PsT6uE1l5LZAJK5eKVm9LGmZFBUKZ +0xEmiCdm/+nq+MlSKQ+0FwhnwnIn9K767DfWk+Ercw9PMMFjTMb58oN+1j61 +15ePxDKh7tdJlXn0mSXgt2wTM5EJxzcKlPuofGKVl6wb+pTCBENFe4rCtves +bT88M7MymMAtxVczM9/JmqJmGppnM0FVPj/xu1AH67x3w6e/OUwYqVSP5kS9 +ZrEKxk9WXmaCg/rFxzFJrazeL8qqewuYIGD5ebD6aguL6hEb+qqMCWsfYB+X +YU0s/57+RsMaJpz6FRWYd7eOJSwntn+4lgkSYR+2r2m4x6pyMRPJf0hcL45v +nrGqYc12FbitbmHC3gP8IcsLK1kXJd5yP2xlAo91fkhH1S0W7rCiJLidCexu +y6/nqm6w4t54T/V8JPbDdFfDB7UCluhLamrFKBMeXa/kbJnJZi2OahW2TDLh +qXrg88SqLNag6Ib7A3NM2Gw2q3OoP53V4Lx1UGq5KvhZhxlvbU1kHR4I3RQt +pQq7M8yLjYvDWR1/mhftjFUhx3/6EZ/VTtY5pl/ARKYqOF9UedjuqcySSyy3 +1ddXA9u2ziB15cIN51WNRNb6qMPjH+L6f4aL17fIGOtNZGjAPCu4bU1zttF6 +uYZ0zU5N+OYzaivlZ28oxJMf7BmjBarJL3JMdwgYKEQrsnZQ18GOY93KyW5p +evwUt+ptT9fBhNzXPUFOCzoamHR5qLs2qH179T3obYB20CfRRksuHZjyctJQ +DSrUGp1IcbA4rwNWwvE2kyH9Gps1n+RYqOuCAtdhr8eaYup1Exv+zLTqgq1z +T5q48wrVg2ra719764GvgU7++koeBjbi1bGDXx9kli9L+eJYT91IltoimK8P +r277fLzRl0imR5062mBgAHnDwpHdtRbKTG+jesp7AwhtWb2jpLVB0bvO9yTn +kCHo5ri2SPnYyddf6fD6LW4Ewe+WjiYaZ8lMXl+a0awxAq7//+yh3OTP2bL+ +v/7NzNKvGvvnOwV/Pk8lbvivXcxUYIMC67+WPZBwV+PhP4uv8q/c4oT91wWm +x8PHdvyz9vFU0yy3f7YZq3j7zvOf4zun5vb4//NsfqRJePQ/v9+Q1V508599 +jxTkWtz65+lbt72HKv5ZVPndzLrqf7bik5d78PCf73cUebW//WdLoTvqIe/+ ++d3mZ9NSH/558t6vxJ19/6x+Vavs5+D/rPfeOCRl+H/WE7NHmmP/vDfhyOvg +qf9Z72F8juTsP8fMn9tzb/6fRXRL1NwX/jnvwL2ppaV//j90mhVd "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -3110,136 +8703,237 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK +1:eJxN13k0VVHbAHBRokzJPF/ubMys7jn7MVSmRDJkKIooiiRCZcoUGUslqWRI +keHeqBSFSiopIpUommTKTOE771rfenvvH+76reNs59nPcDbS7oBt3txcXFxB +xI//fE9/etZETi7AKVv6XYZsNuMdeVJhxu9ikPKZ3MkoTwoC8Ve7pd5lomck +XHOrpx4Ksb3RxfMuH8Usupioem5Ea0YkM+e6qtBWRrLKsIcD6r1vEzDZ1YB2 +Vp4IlffwRpvIgz2/u96g18uKQifcjqC5LoOzY11fUPMOnW0utnGo0bS44HX+ +BOpdd9+96s9ZJNd799tutQX0ZOn8ePWaK0jMf9eNlaY88OLS3JsDDQUoc92m +WhsHPki/90F8XUAJ6j6v9fC3iCBYLe1IVHAsQzntN4VDKIKQupi6c9q7DLkI +0XbNGwlCV23FvaYjZehjrPwi9x5BKOwemjQ7W4b6Dq5iid0WhLaAxzzt7WXo +h9lAjf4OIXjuVKypvPUWmh07Vx5xVRjirvlMBOHlKLkg8hW39BrQXkb3TY+s +QJa6+0TFVdbA6BW5ecX4CsTXtM2Bpr4GcipTztxIqUAn+ykfrIzXQLN/T0/F +hQp0TPnFtzP71sCr9/WXo9kV6OAVqUXqvTVglZzXof2tAtnlVqpZuYrC1rRH +lBebK5GI2sUAd29R6ImjJd3bUolaa09WBQSIwqBU9etr9pXI8oOT4ZlYUfCy +TxLy2VWJTGQWTXtuisIl3Ei+IqQS6Z63dA34KwofbQ83WxVUIskz/UlZl9aC +h0lO0bU/lUhK9fbJ2aK18GXCFmVyVSGZhvhI94q1YMr8YXtsRRVSGGMcoTWu +hQOWNz+aCFchinWgR+2PtSBwICvxgnIV0lm+oN+vIwbja081+5sTdRAsMaDd +IgYTCrpc19OrkO3qH5/OtYvBozvy75efrULb8u92//0oBiWRa5TcL1Qhxza3 +V09GxeBo7NzI0tUq5K527Z6LuDgcjfTIEGJXIb8BzYwYD3HQSzZhb+2oQgnb +LfA30+Jw/VApyWMtG8lwWmW4l0lA7pBBVYQkG91au31m3WoJMMlzfJ8hy0ad +b3ZWZChKQKyd4O8yFTYi2wUr25lLwN48hkGhDhs1bLnM23ZBAj42nyenb2Oj +hU1TrS9ZktAHOvNOKWyUXhR+c2GTJOg9+pnyJI24n5crUd1OEsoKft7VzGIj +68erjE97S8Lwvof9vy+wUY6pEts6VRLODqmd0CtmI0OwOve8VxKeL/4VufeQ +jQ4bXd31LEYKNIePmtaOspHlFaFJqxTCgpxFm3E2Ul55LLH1rBQ0i0WJfJpk +o7YOx8r261Jw0yvFaGSOjTQCBXg+tUpB0FvlW508HPSjKLRoXEYamvW9U5ol +OKhe8Ov6I2RpMD0592ONNAdlB297NaMuDcovR645ynLQRhP12b8gDSMP1Aze +KHJQfs8Xi5U+0lBWd/1LBp2D3MRshmXZ0tC9v7lNx4iDdCJqo/PuSwPHO89Z +ZwMHrfpClyA9kYbFNldzDYyD7pbzIGq3NPTtYeyWMOYgCau76VpL0pDrws4o +N+egtmiy7kYrGfBRXx3B68RBxT8ymp9ul4EjNlLt95056MTWJTfLnTKgXIrl +HXThIHX593FbD8nAOs/O9CZ3Djp1J61rxzkZ0Cus+2vkxUFmo/PhB/tloDfr +8hWrQA4KMz/DfDQkA0EhJzyqDnHQravq79dOy4BiDuml2GEOktruYXSXTxbC +jw6VvzjCQUN3Hs/waMgCr4NfFV8EB5FEdxU7GsgCz7jhqPUxDnL0m3UsAVmI +i9jVm3Kcgx7Kq1bb2MvCl0i5nqVIDsqKSQ++cFQWVjj57q06yUHNHxjkoWhZ +GE5a4dgRx0F/dRvb8WRZ+D33c+l3PAft/T6lPXBJFmpuSscrJXHQemvX3xqN +shD5yvGI5WkO+iJOPdgkKAeXY/PK3pzhIMmAenlJSTkw6PEqrzjLQdbNzi/3 +KcmBo4p1+KlsDqoOT1YT1pGDhV73gHXnif3pHRvc4SwHO5b9+m19kci/4amc +Uk85wHIFnflzOWgyQ8Vyab8c3LqjmvaI8E4zx5KC43LAsHcOpuRxkHZJrc9o +PnH/nQT92isc5MPtIGlSKgfVi2fA8SoH5bqOPDlzWw4EyotVhgnzCpGo65uJ +60I/jgpd46ANPvfepryWg9uDMsPnCQc+tI/rfS8H14zdccUCDnofFD9wclgO +9IsljikWcpDwC8UzXdNy4CqStv8CYTPKXVMmlzzMmkmvFy4i8tf1K/+VqDz8 +Dt8RNUK4Xytum7KcPFhX8c45FRP5PKXAfYQiD+/OsB0fEI5m2XnKGMrDr2X9 +TRHXOch8Z964gYk8nNxsa/SRsFDUr1gHa3koUF3WY1DCQW+vGoofdpSHtr8K +lamEcxvjitI95MH354vqPsJ7vr4xuLVfHkSMaaPqNziIuVLp2fNgeSi5ZOIa +QviO5b1fvEny4NH85c0s4Uj/lcfJWfLw84Fnn/ZNDtqUul3I5JI86LzKovgS +Fqy4enlXsTwsfHK6dp5wx+sRreOV8qC054RLE+GLExsacmrl4djYU6tfhHeL +J9nfeSwPWVf7QwVLOYhh0Dnw9pU85O880MskPOasEjLRLQ+x3EMxpoRrwgNX +rhmQhyCXV7udCJ/IfXBeY0QepucPRO4lvLFuFdN6Vh58fnJ3BxIW6HOq3cet +AFpyNwNCCLcvK7ROEFAA0cbdpqGEc1TGewokFMBiF/f2w4Q9NqKABiUFMLu6 +4ep+wjSfFK4+pgLgwtlMd8Ijid0ZC7oK8NnLb9SSMOcGVUUWKcCfO/0jOoQj +XhzmGFoogILjb5oUYZORhxsd7RXAdJP1hRkiXn4Roa7D7gqge+6A8RvCbetc +fTN8FOCC8SmF64TP2V+fu3VIAQrvndYII7zzyNSpFxEK8JoqFrCRMOWcidxg +nALMMb16BG7+p7/TylamK4CQvW/IKyI/7PcfcUqOAujwXdc/TTj8L6PNpICw +DMhsImysEOrpcUsBwp6+l5sn8s8HTePH7xB/z6LYqITw2did4ndfKEC42tTN +WaKe3ApvFnV2KoCno8zUecLKT2cNJvsUgEeqAOkSrliV5aI5pQCMDcvvuhL1 +GarW98t6SQE22gt2fifqGbdRP76fXxFmDz5pO0j4RcbTy4XyinAy21X7ANEP +WWyxdY00RUhbdIoaIPrH5a1nQ986RUhdTQl3JPxD6u+A7CZF4LoSpMMk+q18 +vUWIka0i1J9YbEvO56AQt+yVTi6KMJ5v2fmd6FeeK1rMzIOKEB8/25RK9HfL +o+O15UcVIfrKp6juyxyU3t9i/TJGEVjdOy0UCCvQvAP4zinC6QP8mWcvEfPq +1gXOiXpFGA00TjXIIfq1q3VhpFkRzJ9c4d91gYNsuJZv3vVGEeY4/b5RxDza +s+1gN/qqCHz4CFZBzKtNEaTIqBVKYHRbvrw+k4OeC9+/ZrhKCcR32DVVZnCQ +bYFj85iQEniZ8znkpnOQ68vkNZ5SSrBReWCZSyoxTxSnrxmrKoGFlFt8IDE/ +p9jpzXOaSiAVpZ+omEjk01x1uFJXCeLfWH1uIuZt3CEPfWVcCT5axBr/jiXe +V7x/XN6bKEHg8eOZoTFEvDlnIzM3KwF2U7Z1PIqo98aWZm47JbAhhfo+Iea9 +orP38D0HJViQXDMsT7wPCoaW1hx2UQKZsvpi33Biv8X1XPv3KAHvB7eOtyEc +1ORzebgxRAn6M7WDuAI4yOKvkeixCCWgLz+9rt+fg1rTO/R1o5Rgw4mXjzj7 +Oaj7Ln9UQZISCH97UUXaS9SzTUGBW6oSfH10vqp2DwcNfMGfiWUR8UdTHxl7 +Ev21Olg0LpfYPxkHLmE3Djp8RcgAu6oEA96fcrbv4KBZ3RLXqUIlOMz3VDLW +kcj3zk8F3uVKkC9bgs7ZEvOywtxgU4MS6GfOesWYctAls37XxSdKsF74k8cU +Iuq3+3hU9XMluL3hb5oFi3j/crOfUd8qgaBmq0qGLgdVZW8Z+dT9n/WemcZo +cZCh6g/Rc5+UIMQ8Q9BWjejn7fJuK38owZ60LY3HVDjo6Y+aqPohJRDababZ +rUC8v45vKwz9rQR/D2ltFJThIKeihJHv80pw81GN4owwB/nP/o5qFiSBINL4 +coM436w/tFfimygJboc2PpaeYCO+wfc3eaRI8KTlSKfVEBsVfmjsxJVJcKlV +u/J3DxsFbzf0d6ORQEYiM9qzk41MXpYuC1cjwcK6tJSUVjb6VHdW7bY+CcZH +HSUE6tio1GBVw5sNJFhakNjndpuNwitOOI0BCTSDjl7eVcpGEvk+MapWJDCY +S1MPIc5zW+OM3l3dRQLz+fkDxQFspLBYdqDeiwQJxZsub/Nio6EQZZ6efSQY +WKtx4LIzGyX6rtaQCiZBrpwoSxzYyPFzZKNeGAl2d8lNGBHnTbLLpLP9CRI0 +rCvjzFDY6KFVT2xqIglqvgzM6K1io9QmO+nS0yRIs8l0qfpThdywJ7eeZZJA +QP15cv1QFZrTKO9efokEqSu1I06+rELaotGaEZUkCJ9XmYxNqkJcyVNN56tJ +4P+aa9YutAq18ux3qa4lwZ5vydvzvYjz9NS2uN+PSVBf58XdhFWhgnfkDz7v +CXtXTw38rERBdhcC43qJeFrdhC63VyJoEeS9NkACLNoh7PX9StRTO631aYQE +9KPslbmnK5HE5eb47TzKcJtqureGXokGJDG5ID5lqN4r9EhZqBJVpVdWpgkq +w1nLiR7uiQq0NSbnY4ukMhhuF/lCqq1Aid7+2sZqyvBri4nYN7MKNKcq8knd +QRk69/vGFJ64haYvyUTruChDQqrNd4H1t9CkMIVstEsZ5sPepJ2aLEMjE0b7 +zfYpw1wcM+b93jL0pXbPtMtxZdivqC/ubFyKWqxqhBILlYE2nXNg5E0JyvHb +ib5MEb9/GnfDcgvQuR7fL9/nlYHVhMlpbi5AZ7YejhteUoa1ZgZsyvg1lKqT ++HyWXwXY0l/nN5pfQzF/Kp2EFVSAz7VV1276KvJLXhHI2qQCPJ+5y8425CHf +BeG1JlYq4CrvVelDykN7A2SqN9uqgGWuUKVj9CXkYa/5d5uLCnxJyHR4apaL +tsvuSNx3UAUUi3rPRH64gFg3S69kZxPrHUap5vZn0Qelm5c3XlSBxy1K77H2 +Myg8uyRv8rIKbAu5+KJ1+xlUE12Uu61EBfRW1MV+dMtC2s5XzgvdV4Gqd/MZ +KDoDvX6Zd+7BQxXY1VCnVCaUgQJNL2X7P1aBrschf3oupaNbGjlnWlpV4GtC +IlktNg0xVpxJj/+sAvOZD4zNsBTUHJ6ZpveNeB7XsY2fgpPR3rH01IFBFdib +HZkgX3EKFXw4nWIyqQKtP+JCTq9LQkpVCYmLvGRQthbLkvaIR/W0+ISy1WSY +WRu96hknDu28dDLeTYQMq+50IBHBOHQxMfrkPWkyxN4LPGvfHIskdkVEhaiR +4Zd5QJHwvmh0uyMskrKODMXcOcNfuqPQdsujJzr0yJB+RPi7rE0UytQ7ckwb +kSFV35y0PvoEEhQIODpiR4aiC1Gr2BfCUWn0gdBLjmS4SKWcvF0ehixn/EKs +XcnQoC3N/fP5UZT4xTf4hhcZVgzXCJ+SCEXL7+4O3BtKBs+xXS2q44fRNQ3P +APFjZBhtLHi4zuAwMinYdbApigyW3G9/3IwOQpFpbv7Kp8hAVSHbnaceQgor +XP1ep5JBU2SkoysqEN0P37E/KosMr71jNlo/DEDz3o6+n3LJ8DL2lbuI6wF0 +4cN2n9NXySCc9DOrTd8fGdrZ72UVkeFeguhor6wfCmHZeuWUk+G7eyuSX7YP +/Ra19HBsIOL7KzIfqO2N3vkrt+1/SoZFzXvtx8ELPXwyjyJfkKHpTuTLc057 +UHr4TcXrnWRoFtTNmrrsiY52xKbd/0CGyEwR6v02D+Sh4bbU1kcGqy3V0Wf5 +PZDWF4HeuUEyHJfoJ8lR3JEU66uN0BgZRClcUv5Nrogr+0Gd8hQZvPksvi0P +ckGvLA7mWS2RYbDz2O3N007oYOUr90trKSAmE5+3kG2PHFdff1kpRYHd41Pm +h3O3Idw7CnsiT4G7Tdtl2kvtkKD0OvlRGgWk9li+y+reiiaD+E/zqFMgu/T1 +tY0GNujji89/JbUp0BC4fHd7sTUqjcr8CCwKTFZoJ9XWWaAz7/dbOxhTYHhw +78UHe8zRMV3T+/s2UYBhVPx7UGozsvoxcTHTlgKsB7Jy5pVmSNvkxepiBwrk +Up7vN80yRTK5BRG1LhTIvN3WzxVrgga3OrgOeFGAOAKcTUoC9KZE/fnsPgqE +PcvxiscRusfDu0EwgAKnnq63N4jGUFJNtYx+GAVoOjRvX/P1KHBN2inLExRw +aS5bxvfcEDn7+czvjKXAqx0F3GRPA0RXlHqfcJoCD3m4aT5NukgkbMwiN5MC +U0Eb7YbSdNDsm+a7Feco0CfscqXETxs1x4dd6L5KgTX6W1ndtlqoos+Of6SI +AiXyxy8+qdRA59czw7hLKXBG/WlQyUc15DPy3lm1mgLr5dNkXh5nIBtzdjOq +pUA8/iq66DcN6ecnG25/SIFQRWuFyAgq4nVkSR1vocCQIIPW/0IFjZSLJWa8 +ogA7bn+wd6Yy6uQfninsoEDBjQ8CHftIqOjBpa7WTxTgLZbWrzqrgFIlQzb3 +91OAv+sKf3ChHAo5ZFMz84MCb1a7zui/kUE7n1NpAiPEepfzQ4NlpNFGylK2 +0gQFjgq1l9Uck0RqkV28erPE8xXJtOTOiCOx7vIQiwUK9IbMHGhLEkMDKR6O +QSupQI24G0oeXYMODqopawlQQZb/LSehXQTNbJ4bHhahgrfuOpGd6cIoqvDx +3ZviVHA+NOMSc14QreLJjNsnQ4UUC8aNnger0RmPnXY0RSqUyUolDizyI/k6 +pvxXFSrkGRaNyrvwIa2wRo6HOhXIh5Mgd8cKdK8zLUpBmwpewf4CG//wIFNd +N+uP+lQ4cIPU8a2Smzi/06VyNlBBMzkv3uXYMuQ4OtnvBFTYr/XoVMIOLtRn +/ahcfCMVfL9oWj9JX8T33zgd0W5BhahXcW29aX/x497UtVvtqVB+w97/xeAs +zts4/knAmQrnVbawyaYzeLpS/Y0WN+J5l0qyvt+ewmVOJIckelLBKjGnP9V4 +Ei/44GSyaS8VeHnvvLk+MI5rGJGFlvtRATZcX+y89BuvyR7rfhRAhQAPyfSX +fmN4i13SISyMCu11J82Pxgzh28sdsD/HqdB7stGqP2UQ7xFQ5r8bQ4U2eaW5 +1zU/8L37RzpCEqiw9ZJg8ZZl3/Gxp/eu6KZQ4Zf14r4In694OCXBfzydCsej +eu/m/OjHeWLtDSvOUqFwMY6yPPYLLoEPvVK9TAWBw0hZ9k8vfuXinYs/r1Fh +XDzZKf92D86YO+lTfJ0KLmoinM3nPuBVjnY63mVU2NNQ/THrUjfO4sgvKVdR +YYVwn5ruky78yZrBlr5qKrx3Cnw+K9SJ2wZUZ+fVUuHBZN3bN0c68D3MrRoy +j4n9ad/ER81+jQ8lyM53PSPyee7zZwnrNjzk6/fHZ1upILqM9kFUuxXnMuVk +2LcT8QzHvZ6afo6fuhLlvuYdFYo1hp25Bp7hYovWjFcfqdCixapNnH6KX3KV +nkr5TIXnPLtdhdWe4BUSVSl8v6ig76IOPdMN+PrgE85PRqmwsHEdT3/CI7zx +tSX55CQVHH4Ote/SeYhba0qOGc9R4Sd6mrRq9AHemdJfu7RAhR+zPv1mhbW4 +x2B5wgNuGvwJ/RhnFn8X/7n5mH3ESho86g3IXJtWg//lFv81LUKDatMjERsE +OXi8x+dqjjgNFt6cmck8XoUL15XFBMnQ4K3eeHnl6kr8vGy4jZYiDSISSOUz ++8tx5bBNMiMqNMhsj9Sf+F2Kl3aKfrtJp0F9hmZbyfUbuL5ub+U+dRpgnKfX +biVfxy1GQy2+6tOgLsPutFhLAS63TiGej0UDQcatK+cX8vGRoKYGVWMaTP2x +tXVzuooT/+Qs2WyiQXxzk0L59cv4mWkRVpAVDbiQrGBYfy6+17Dm6FlbGkwY +oIVvO3Jwo3D323ccCE8tyGmsPI8L3OcZ/+BCA7aFyZrP387inxZKNJZ20aAv +M8/852QWXoFs/ZS9aSDZF1oXpZ6Jx0ZPF2/cT4NiY1W62ul03LExd8A3gAZw +uWa1HykVp68wJaUE0+ClRzvJZn8yPr/pp3t5GA2mZRqXnx5NxF8mpuW8OUED +z/wlJ1JpPH6lRa9rKpYGodzOD/ZfPIkHCXxcK51Eg2akrkO7G4Ob2cTYslJp +sJbUOu+3LBqXTKef3pVFg3aLS3+xzyfwwdetz2LO02Cdzx7Xz7zH8Ptrj/AW +XaKBWfruc6UHwvBUB1nTZ/k0KM1u2MgvEop7nnsUOVRMWK/EsPNHMK7b7XNf +uIwGz6jXdu+cCMJ5ZYXmtKtooKLG72Wregh/58bRc6yhgfyW4QMHpAPwm3ku +QWH3if2eUP/UR/PHT/Rxlec+ooEYrx+vQ8Q+3Fa5+Ff9ExqUYboabEEfXNlr +C73/OQ1apQvCfLu98KnCCS/e1zQg81AtXbt3483fL1xldNJAQaD7wGc+TzyH +AZ+sP9BgG+2X/MGnO3F/v28ygX00GN0jdXPouSuOylKcsr7S4Fx7mbui1A5c +dFT7TPUgDRq/O7rFFTriA1rdbd2jNHg+8nJW4+B2vDooUnBhkqi/z2+yK/23 +4UkciqXSPFFvru0Jcrm2uNv083jTJRpwmq0ye0a34BqGQY17l9PhqOwwTXbW +EucKl+I6xU+HpXSnnaEW5nh7bR2rTIgOx0aNfyr3bMSLFrzC2tbSoUZQZ3aw +1BQ/ilZXT0jRAQUm1qmyjXGr6MpxCQU6rDLRVEt8i3CFRifN9Sp0aFAnbxHL +Y+Fjyxf93Ol04vzaMh9dY4Q3biq4HqVOh7/2qbwKMgZ4dqLl12vadNBo5Tk2 +WKeL+7aMkZ4a0MF827Xc1Mva+AaBczsHWXSQbmzSM6/WwoVssIuCJnToSDLd +f/+POt6X1t+ltZkOc2ORTfR+Js5+nSS23ZoOxWySJcjQ8fi1WnahdnQ4wGpM +YF2g4M4OnadzHOlQMtbAt3aHCs48d6zlgSsdClUo673sSfjCO+WVnz3ooCNe +fq5ruSLeJvPMdPleOhQ5kz4PPJLF890Comh+dDixf0VddIcUHpwn/sAykA7h +e16N03Ql8M19tXMHjtDBYQtpBbl7LS6jvFs/I5wOEg8MsqLvr8GH9vAd5kTS +YV+PVs94uTA+kmf2oP4k8fydXh73XATw0e6olc+T6NAlxCcv7M6Pj4k9sOtM +pcNFkRPbtW/x4uNb5y5+zqKDiK34TnzTcnzilN63ofN0oH78YS6qwI1PPj6k +NXuJDh535R2QJhc+zXUrnOcaHWYatxiMff+LzWwYbBK6Tgc/utYJ7tY5bDaE +KixTRsRns51388oZbL5y9w5KFR2idvU54smT2J+hvGtaNXTg2lfPZ7xtHPtL ++zC84T4dFKtDZ/c7jGGLuyUNNz8i7reubxWRH8aWLtnHbHtCh9saL+v5x35i +XN1pL9yf02FFZq9vjfR3jFvshcS+NjrkPD/4fW3GALZ8K59n8Fs6bB3o9OSx ++YKtOGV2M/I9HdJ2Ki/DLPow3sdRU6d66VB2ktvQf/Yjxsf1AGUPEPG79dYp +NHRjqzbMJV39SfiaWsrKr53Y6hC9jtIROmwQZ/pUOXVgApWHFO5M0KElaJ90 +4Zo3mNBQmW/jLB3qS0btNq1uw0Rog1WtC3T4YvFw8nTEC2zNbupCNzcDal7m +x8tueoaJXtq9+etKBoyvCfOy8HuCib3LyxgTYEDh6lIuu8+NmPjaDx/+rGHA +5S0KrMOXH2ESNpLUlZIM2Kur++LehnpMKsk+UFSOAYviDu9IN2sx6aa0e/Ik +BtyuY43mRN3BZJaeL2dQGVCqpR02X3Ebk1vPt1VXlQG5p3YnbtJmY/JHzC4g +LQb0X9nHde5PBaZQEdVvqceAYzqmo7/5b2FKv+6rO65ngGLzVu4bqTcwEnUu +1BMxQNd+n1rF0WJM2VOvwd+MAVdna+88uF+AkXMPCRy1YEBRbaD0E9t8jNpV +5hhrwwDJRdHkt6pXMJro4JVUewa8IU86fEvOxehbqL8uOBNDa5FuK6B1AWMm +7tYrdCfi/y57LMIgG1NrzIus2M2AsB4175nsLEx98f2zWh8GvMvfSIsxy8A0 +jCTFnvozoHfX+dHDB1MxrWD7nW8OMSB70DA/uPUUpl2edr0nhAG82wwbuC4m +YDqDz8d/RDDgy/zos4KnJzFdCh82GcUAg9AdFvYWMZi+h1nCUhwDjmw5noFJ +RGEGF6Ner0pmgHXIcg1Pq2OYYed9WYl0In+Nifq/eo9i69fMeZPOMqC8MP6A +/8cj2AZrvQo1YghXNSy2P9E9jLESDs0bXGbAtIflE/xTIIY3lJmZFjCgoZ7/ +QVHeAQwt/Ey1KWHAr1JpB/2lfRgYUrt33GLAKS6vSItXezGTw7tVvNkM8O5n +n7y9zAszvZV3IPAOA/46PFrRecoTM/v5vibiAQPEOvf5PXq4E9tEluROaGDA +s5SJ+YhxF+zn7s3XNzxlQOdBH7fnbU5YytVQm7HnDFAz09tZu8oB0+ornixo +Y8DXmQpB7uxtWLvCu5wdb4l6jCTXhO6zxULc+YyF3jNg66yu7OicNSaTa/i9 +4RMDXDI1NyZkWmAP3vueDu1nQKVOZGlX2ibMQ/qCjtoPBjDbHb8c/GaK8Tg/ +6+4bYoDZyj0myinGWFH2XOTZ3wxifs55d4zimMVbBtVymgGGlv6HT5puwIbW +urxYnGdA2Uv1P1IrDLG0baeC2EsMyOqovz1G08O0M+5J+S5ngnL9Or+uK9pY +56vBOjl+JvQGeUb3eGthYUKy3q8FmTD5NvSjz0c1TG6L1ep4USbc8V2vLuXF +wB4mR1Sul2TCGeF89+ntVGxPy02nUVkmuGiWhj3KV8F4+T8uXFNiQlGQ4MvL +JiSsZLNAgTOFCRpnxP8MOShg1vEsS0EmE5L1g3WSi2Sw0Sb/sUcaTDB6I2Ai +4iuJZfJcyg7RYcK5lkJ1zdNimJ7JS5aqIROyRGOOUVaJYu+iFr70spgg/c0i +R65EGDtWr550xpgJwTD/NfjJakxx0V3TYhMT0N+vYjJufFgDK/XtgiUTbgY3 +CN5xXYHtjaiLqNrKhBXbx85cv8ON8d8bIflsZ8LWfP3mRz5cWOmsQrPsDiYs +67T23V73l7XVYOvBNncm1Fdsa96jNscaPxIpFrebCU4vltXvWjXNyuaU3zPy +YYLSsQ7GU8sJltFEr8eIHxOE3J8lsj+PsT6uE1l5LZAJK5eKVm9LGmZFBUKZ +0xEmiCdm/+nq+MlSKQ+0FwhnwnIn9K767DfWk+Ercw9PMMFjTMb58oN+1j61 +15ePxDKh7tdJlXn0mSXgt2wTM5EJxzcKlPuofGKVl6wb+pTCBENFe4rCtves +bT88M7MymMAtxVczM9/JmqJmGppnM0FVPj/xu1AH67x3w6e/OUwYqVSP5kS9 +ZrEKxk9WXmaCg/rFxzFJrazeL8qqewuYIGD5ebD6aguL6hEb+qqMCWsfYB+X +YU0s/57+RsMaJpz6FRWYd7eOJSwntn+4lgkSYR+2r2m4x6pyMRPJf0hcL45v +nrGqYc12FbitbmHC3gP8IcsLK1kXJd5yP2xlAo91fkhH1S0W7rCiJLidCexu +y6/nqm6w4t54T/V8JPbDdFfDB7UCluhLamrFKBMeXa/kbJnJZi2OahW2TDLh +qXrg88SqLNag6Ib7A3NM2Gw2q3OoP53V4Lx1UGq5KvhZhxlvbU1kHR4I3RQt +pQq7M8yLjYvDWR1/mhftjFUhx3/6EZ/VTtY5pl/ARKYqOF9UedjuqcySSyy3 +1ddXA9u2ziB15cIN51WNRNb6qMPjH+L6f4aL17fIGOtNZGjAPCu4bU1zttF6 +uYZ0zU5N+OYzaivlZ28oxJMf7BmjBarJL3JMdwgYKEQrsnZQ18GOY93KyW5p +evwUt+ptT9fBhNzXPUFOCzoamHR5qLs2qH179T3obYB20CfRRksuHZjyctJQ +DSrUGp1IcbA4rwNWwvE2kyH9Gps1n+RYqOuCAtdhr8eaYup1Exv+zLTqgq1z +T5q48wrVg2ra719764GvgU7++koeBjbi1bGDXx9kli9L+eJYT91IltoimK8P +r277fLzRl0imR5062mBgAHnDwpHdtRbKTG+jesp7AwhtWb2jpLVB0bvO9yTn +kCHo5ri2SPnYyddf6fD6LW4Ewe+WjiYaZ8lMXl+a0awxAq7//+yh3OTP2bL+ +v/7NzNKvGvvnOwV/Pk8lbvivXcxUYIMC67+WPZBwV+PhP4uv8q/c4oT91wWm +x8PHdvyz9vFU0yy3f7YZq3j7zvOf4zun5vb4//NsfqRJePQ/v9+Q1V508599 +jxTkWtz65+lbt72HKv5ZVPndzLrqf7bik5d78PCf73cUebW//WdLoTvqIe/+ ++d3mZ9NSH/558t6vxJ19/6x+Vavs5+D/rPfeOCRl+H/WE7NHmmP/vDfhyOvg +qf9Z72F8juTsP8fMn9tzb/6fRXRL1NwX/jnvwL2ppaV//j90mhVd "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, + "PlotRange" -> {{0, 30}, {0., 0.0807566203609549}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -3251,19 +8945,19 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, + "PlotRange" -> {{0, 30}, {0., 0.0807566203609549}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3277,135 +8971,236 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK +1:eJxN13k0VVHbAHBRokzJPF/ubMys7jn7MVSmRDJkKIooiiRCZcoUGUslqWRI +keHeqBSFSiopIpUommTKTOE771rfenvvH+76reNs59nPcDbS7oBt3txcXFxB +xI//fE9/etZETi7AKVv6XYZsNuMdeVJhxu9ikPKZ3MkoTwoC8Ve7pd5lomck +XHOrpx4Ksb3RxfMuH8Usupioem5Ea0YkM+e6qtBWRrLKsIcD6r1vEzDZ1YB2 +Vp4IlffwRpvIgz2/u96g18uKQifcjqC5LoOzY11fUPMOnW0utnGo0bS44HX+ +BOpdd9+96s9ZJNd799tutQX0ZOn8ePWaK0jMf9eNlaY88OLS3JsDDQUoc92m +WhsHPki/90F8XUAJ6j6v9fC3iCBYLe1IVHAsQzntN4VDKIKQupi6c9q7DLkI +0XbNGwlCV23FvaYjZehjrPwi9x5BKOwemjQ7W4b6Dq5iid0WhLaAxzzt7WXo +h9lAjf4OIXjuVKypvPUWmh07Vx5xVRjirvlMBOHlKLkg8hW39BrQXkb3TY+s +QJa6+0TFVdbA6BW5ecX4CsTXtM2Bpr4GcipTztxIqUAn+ykfrIzXQLN/T0/F +hQp0TPnFtzP71sCr9/WXo9kV6OAVqUXqvTVglZzXof2tAtnlVqpZuYrC1rRH +lBebK5GI2sUAd29R6ImjJd3bUolaa09WBQSIwqBU9etr9pXI8oOT4ZlYUfCy +TxLy2VWJTGQWTXtuisIl3Ei+IqQS6Z63dA34KwofbQ83WxVUIskz/UlZl9aC +h0lO0bU/lUhK9fbJ2aK18GXCFmVyVSGZhvhI94q1YMr8YXtsRRVSGGMcoTWu +hQOWNz+aCFchinWgR+2PtSBwICvxgnIV0lm+oN+vIwbja081+5sTdRAsMaDd +IgYTCrpc19OrkO3qH5/OtYvBozvy75efrULb8u92//0oBiWRa5TcL1Qhxza3 +V09GxeBo7NzI0tUq5K527Z6LuDgcjfTIEGJXIb8BzYwYD3HQSzZhb+2oQgnb +LfA30+Jw/VApyWMtG8lwWmW4l0lA7pBBVYQkG91au31m3WoJMMlzfJ8hy0ad +b3ZWZChKQKyd4O8yFTYi2wUr25lLwN48hkGhDhs1bLnM23ZBAj42nyenb2Oj +hU1TrS9ZktAHOvNOKWyUXhR+c2GTJOg9+pnyJI24n5crUd1OEsoKft7VzGIj +68erjE97S8Lwvof9vy+wUY6pEts6VRLODqmd0CtmI0OwOve8VxKeL/4VufeQ +jQ4bXd31LEYKNIePmtaOspHlFaFJqxTCgpxFm3E2Ul55LLH1rBQ0i0WJfJpk +o7YOx8r261Jw0yvFaGSOjTQCBXg+tUpB0FvlW508HPSjKLRoXEYamvW9U5ol +OKhe8Ov6I2RpMD0592ONNAdlB297NaMuDcovR645ynLQRhP12b8gDSMP1Aze +KHJQfs8Xi5U+0lBWd/1LBp2D3MRshmXZ0tC9v7lNx4iDdCJqo/PuSwPHO89Z +ZwMHrfpClyA9kYbFNldzDYyD7pbzIGq3NPTtYeyWMOYgCau76VpL0pDrws4o +N+egtmiy7kYrGfBRXx3B68RBxT8ymp9ul4EjNlLt95056MTWJTfLnTKgXIrl +HXThIHX593FbD8nAOs/O9CZ3Djp1J61rxzkZ0Cus+2vkxUFmo/PhB/tloDfr +8hWrQA4KMz/DfDQkA0EhJzyqDnHQravq79dOy4BiDuml2GEOktruYXSXTxbC +jw6VvzjCQUN3Hs/waMgCr4NfFV8EB5FEdxU7GsgCz7jhqPUxDnL0m3UsAVmI +i9jVm3Kcgx7Kq1bb2MvCl0i5nqVIDsqKSQ++cFQWVjj57q06yUHNHxjkoWhZ +GE5a4dgRx0F/dRvb8WRZ+D33c+l3PAft/T6lPXBJFmpuSscrJXHQemvX3xqN +shD5yvGI5WkO+iJOPdgkKAeXY/PK3pzhIMmAenlJSTkw6PEqrzjLQdbNzi/3 +KcmBo4p1+KlsDqoOT1YT1pGDhV73gHXnif3pHRvc4SwHO5b9+m19kci/4amc +Uk85wHIFnflzOWgyQ8Vyab8c3LqjmvaI8E4zx5KC43LAsHcOpuRxkHZJrc9o +PnH/nQT92isc5MPtIGlSKgfVi2fA8SoH5bqOPDlzWw4EyotVhgnzCpGo65uJ +60I/jgpd46ANPvfepryWg9uDMsPnCQc+tI/rfS8H14zdccUCDnofFD9wclgO +9IsljikWcpDwC8UzXdNy4CqStv8CYTPKXVMmlzzMmkmvFy4i8tf1K/+VqDz8 +Dt8RNUK4Xytum7KcPFhX8c45FRP5PKXAfYQiD+/OsB0fEI5m2XnKGMrDr2X9 +TRHXOch8Z964gYk8nNxsa/SRsFDUr1gHa3koUF3WY1DCQW+vGoofdpSHtr8K +lamEcxvjitI95MH354vqPsJ7vr4xuLVfHkSMaaPqNziIuVLp2fNgeSi5ZOIa +QviO5b1fvEny4NH85c0s4Uj/lcfJWfLw84Fnn/ZNDtqUul3I5JI86LzKovgS +Fqy4enlXsTwsfHK6dp5wx+sRreOV8qC054RLE+GLExsacmrl4djYU6tfhHeL +J9nfeSwPWVf7QwVLOYhh0Dnw9pU85O880MskPOasEjLRLQ+x3EMxpoRrwgNX +rhmQhyCXV7udCJ/IfXBeY0QepucPRO4lvLFuFdN6Vh58fnJ3BxIW6HOq3cet +AFpyNwNCCLcvK7ROEFAA0cbdpqGEc1TGewokFMBiF/f2w4Q9NqKABiUFMLu6 +4ep+wjSfFK4+pgLgwtlMd8Ijid0ZC7oK8NnLb9SSMOcGVUUWKcCfO/0jOoQj +XhzmGFoogILjb5oUYZORhxsd7RXAdJP1hRkiXn4Roa7D7gqge+6A8RvCbetc +fTN8FOCC8SmF64TP2V+fu3VIAQrvndYII7zzyNSpFxEK8JoqFrCRMOWcidxg +nALMMb16BG7+p7/TylamK4CQvW/IKyI/7PcfcUqOAujwXdc/TTj8L6PNpICw +DMhsImysEOrpcUsBwp6+l5sn8s8HTePH7xB/z6LYqITw2did4ndfKEC42tTN +WaKe3ApvFnV2KoCno8zUecLKT2cNJvsUgEeqAOkSrliV5aI5pQCMDcvvuhL1 +GarW98t6SQE22gt2fifqGbdRP76fXxFmDz5pO0j4RcbTy4XyinAy21X7ANEP +WWyxdY00RUhbdIoaIPrH5a1nQ986RUhdTQl3JPxD6u+A7CZF4LoSpMMk+q18 +vUWIka0i1J9YbEvO56AQt+yVTi6KMJ5v2fmd6FeeK1rMzIOKEB8/25RK9HfL +o+O15UcVIfrKp6juyxyU3t9i/TJGEVjdOy0UCCvQvAP4zinC6QP8mWcvEfPq +1gXOiXpFGA00TjXIIfq1q3VhpFkRzJ9c4d91gYNsuJZv3vVGEeY4/b5RxDza +s+1gN/qqCHz4CFZBzKtNEaTIqBVKYHRbvrw+k4OeC9+/ZrhKCcR32DVVZnCQ +bYFj85iQEniZ8znkpnOQ68vkNZ5SSrBReWCZSyoxTxSnrxmrKoGFlFt8IDE/ +p9jpzXOaSiAVpZ+omEjk01x1uFJXCeLfWH1uIuZt3CEPfWVcCT5axBr/jiXe +V7x/XN6bKEHg8eOZoTFEvDlnIzM3KwF2U7Z1PIqo98aWZm47JbAhhfo+Iea9 +orP38D0HJViQXDMsT7wPCoaW1hx2UQKZsvpi33Biv8X1XPv3KAHvB7eOtyEc +1ORzebgxRAn6M7WDuAI4yOKvkeixCCWgLz+9rt+fg1rTO/R1o5Rgw4mXjzj7 +Oaj7Ln9UQZISCH97UUXaS9SzTUGBW6oSfH10vqp2DwcNfMGfiWUR8UdTHxl7 +Ev21Olg0LpfYPxkHLmE3Djp8RcgAu6oEA96fcrbv4KBZ3RLXqUIlOMz3VDLW +kcj3zk8F3uVKkC9bgs7ZEvOywtxgU4MS6GfOesWYctAls37XxSdKsF74k8cU +Iuq3+3hU9XMluL3hb5oFi3j/crOfUd8qgaBmq0qGLgdVZW8Z+dT9n/WemcZo +cZCh6g/Rc5+UIMQ8Q9BWjejn7fJuK38owZ60LY3HVDjo6Y+aqPohJRDababZ +rUC8v45vKwz9rQR/D2ltFJThIKeihJHv80pw81GN4owwB/nP/o5qFiSBINL4 +coM436w/tFfimygJboc2PpaeYCO+wfc3eaRI8KTlSKfVEBsVfmjsxJVJcKlV +u/J3DxsFbzf0d6ORQEYiM9qzk41MXpYuC1cjwcK6tJSUVjb6VHdW7bY+CcZH +HSUE6tio1GBVw5sNJFhakNjndpuNwitOOI0BCTSDjl7eVcpGEvk+MapWJDCY +S1MPIc5zW+OM3l3dRQLz+fkDxQFspLBYdqDeiwQJxZsub/Nio6EQZZ6efSQY +WKtx4LIzGyX6rtaQCiZBrpwoSxzYyPFzZKNeGAl2d8lNGBHnTbLLpLP9CRI0 +rCvjzFDY6KFVT2xqIglqvgzM6K1io9QmO+nS0yRIs8l0qfpThdywJ7eeZZJA +QP15cv1QFZrTKO9efokEqSu1I06+rELaotGaEZUkCJ9XmYxNqkJcyVNN56tJ +4P+aa9YutAq18ux3qa4lwZ5vydvzvYjz9NS2uN+PSVBf58XdhFWhgnfkDz7v +CXtXTw38rERBdhcC43qJeFrdhC63VyJoEeS9NkACLNoh7PX9StRTO631aYQE +9KPslbmnK5HE5eb47TzKcJtqureGXokGJDG5ID5lqN4r9EhZqBJVpVdWpgkq +w1nLiR7uiQq0NSbnY4ukMhhuF/lCqq1Aid7+2sZqyvBri4nYN7MKNKcq8knd +QRk69/vGFJ64haYvyUTruChDQqrNd4H1t9CkMIVstEsZ5sPepJ2aLEMjE0b7 +zfYpw1wcM+b93jL0pXbPtMtxZdivqC/ubFyKWqxqhBILlYE2nXNg5E0JyvHb +ib5MEb9/GnfDcgvQuR7fL9/nlYHVhMlpbi5AZ7YejhteUoa1ZgZsyvg1lKqT ++HyWXwXY0l/nN5pfQzF/Kp2EFVSAz7VV1276KvJLXhHI2qQCPJ+5y8425CHf +BeG1JlYq4CrvVelDykN7A2SqN9uqgGWuUKVj9CXkYa/5d5uLCnxJyHR4apaL +tsvuSNx3UAUUi3rPRH64gFg3S69kZxPrHUap5vZn0Qelm5c3XlSBxy1K77H2 +Myg8uyRv8rIKbAu5+KJ1+xlUE12Uu61EBfRW1MV+dMtC2s5XzgvdV4Gqd/MZ +KDoDvX6Zd+7BQxXY1VCnVCaUgQJNL2X7P1aBrschf3oupaNbGjlnWlpV4GtC +IlktNg0xVpxJj/+sAvOZD4zNsBTUHJ6ZpveNeB7XsY2fgpPR3rH01IFBFdib +HZkgX3EKFXw4nWIyqQKtP+JCTq9LQkpVCYmLvGRQthbLkvaIR/W0+ISy1WSY +WRu96hknDu28dDLeTYQMq+50IBHBOHQxMfrkPWkyxN4LPGvfHIskdkVEhaiR +4Zd5QJHwvmh0uyMskrKODMXcOcNfuqPQdsujJzr0yJB+RPi7rE0UytQ7ckwb +kSFV35y0PvoEEhQIODpiR4aiC1Gr2BfCUWn0gdBLjmS4SKWcvF0ehixn/EKs +XcnQoC3N/fP5UZT4xTf4hhcZVgzXCJ+SCEXL7+4O3BtKBs+xXS2q44fRNQ3P +APFjZBhtLHi4zuAwMinYdbApigyW3G9/3IwOQpFpbv7Kp8hAVSHbnaceQgor +XP1ep5JBU2SkoysqEN0P37E/KosMr71jNlo/DEDz3o6+n3LJ8DL2lbuI6wF0 +4cN2n9NXySCc9DOrTd8fGdrZ72UVkeFeguhor6wfCmHZeuWUk+G7eyuSX7YP +/Ra19HBsIOL7KzIfqO2N3vkrt+1/SoZFzXvtx8ELPXwyjyJfkKHpTuTLc057 +UHr4TcXrnWRoFtTNmrrsiY52xKbd/0CGyEwR6v02D+Sh4bbU1kcGqy3V0Wf5 +PZDWF4HeuUEyHJfoJ8lR3JEU66uN0BgZRClcUv5Nrogr+0Gd8hQZvPksvi0P +ckGvLA7mWS2RYbDz2O3N007oYOUr90trKSAmE5+3kG2PHFdff1kpRYHd41Pm +h3O3Idw7CnsiT4G7Tdtl2kvtkKD0OvlRGgWk9li+y+reiiaD+E/zqFMgu/T1 +tY0GNujji89/JbUp0BC4fHd7sTUqjcr8CCwKTFZoJ9XWWaAz7/dbOxhTYHhw +78UHe8zRMV3T+/s2UYBhVPx7UGozsvoxcTHTlgKsB7Jy5pVmSNvkxepiBwrk +Up7vN80yRTK5BRG1LhTIvN3WzxVrgga3OrgOeFGAOAKcTUoC9KZE/fnsPgqE +PcvxiscRusfDu0EwgAKnnq63N4jGUFJNtYx+GAVoOjRvX/P1KHBN2inLExRw +aS5bxvfcEDn7+czvjKXAqx0F3GRPA0RXlHqfcJoCD3m4aT5NukgkbMwiN5MC +U0Eb7YbSdNDsm+a7Feco0CfscqXETxs1x4dd6L5KgTX6W1ndtlqoos+Of6SI +AiXyxy8+qdRA59czw7hLKXBG/WlQyUc15DPy3lm1mgLr5dNkXh5nIBtzdjOq +pUA8/iq66DcN6ecnG25/SIFQRWuFyAgq4nVkSR1vocCQIIPW/0IFjZSLJWa8 +ogA7bn+wd6Yy6uQfninsoEDBjQ8CHftIqOjBpa7WTxTgLZbWrzqrgFIlQzb3 +91OAv+sKf3ChHAo5ZFMz84MCb1a7zui/kUE7n1NpAiPEepfzQ4NlpNFGylK2 +0gQFjgq1l9Uck0RqkV28erPE8xXJtOTOiCOx7vIQiwUK9IbMHGhLEkMDKR6O +QSupQI24G0oeXYMODqopawlQQZb/LSehXQTNbJ4bHhahgrfuOpGd6cIoqvDx +3ZviVHA+NOMSc14QreLJjNsnQ4UUC8aNnger0RmPnXY0RSqUyUolDizyI/k6 +pvxXFSrkGRaNyrvwIa2wRo6HOhXIh5Mgd8cKdK8zLUpBmwpewf4CG//wIFNd +N+uP+lQ4cIPU8a2Smzi/06VyNlBBMzkv3uXYMuQ4OtnvBFTYr/XoVMIOLtRn +/ahcfCMVfL9oWj9JX8T33zgd0W5BhahXcW29aX/x497UtVvtqVB+w97/xeAs +zts4/knAmQrnVbawyaYzeLpS/Y0WN+J5l0qyvt+ewmVOJIckelLBKjGnP9V4 +Ei/44GSyaS8VeHnvvLk+MI5rGJGFlvtRATZcX+y89BuvyR7rfhRAhQAPyfSX +fmN4i13SISyMCu11J82Pxgzh28sdsD/HqdB7stGqP2UQ7xFQ5r8bQ4U2eaW5 +1zU/8L37RzpCEqiw9ZJg8ZZl3/Gxp/eu6KZQ4Zf14r4In694OCXBfzydCsej +eu/m/OjHeWLtDSvOUqFwMY6yPPYLLoEPvVK9TAWBw0hZ9k8vfuXinYs/r1Fh +XDzZKf92D86YO+lTfJ0KLmoinM3nPuBVjnY63mVU2NNQ/THrUjfO4sgvKVdR +YYVwn5ruky78yZrBlr5qKrx3Cnw+K9SJ2wZUZ+fVUuHBZN3bN0c68D3MrRoy +j4n9ad/ER81+jQ8lyM53PSPyee7zZwnrNjzk6/fHZ1upILqM9kFUuxXnMuVk +2LcT8QzHvZ6afo6fuhLlvuYdFYo1hp25Bp7hYovWjFcfqdCixapNnH6KX3KV +nkr5TIXnPLtdhdWe4BUSVSl8v6ig76IOPdMN+PrgE85PRqmwsHEdT3/CI7zx +tSX55CQVHH4Ote/SeYhba0qOGc9R4Sd6mrRq9AHemdJfu7RAhR+zPv1mhbW4 +x2B5wgNuGvwJ/RhnFn8X/7n5mH3ESho86g3IXJtWg//lFv81LUKDatMjERsE +OXi8x+dqjjgNFt6cmck8XoUL15XFBMnQ4K3eeHnl6kr8vGy4jZYiDSISSOUz ++8tx5bBNMiMqNMhsj9Sf+F2Kl3aKfrtJp0F9hmZbyfUbuL5ub+U+dRpgnKfX +biVfxy1GQy2+6tOgLsPutFhLAS63TiGej0UDQcatK+cX8vGRoKYGVWMaTP2x +tXVzuooT/+Qs2WyiQXxzk0L59cv4mWkRVpAVDbiQrGBYfy6+17Dm6FlbGkwY +oIVvO3Jwo3D323ccCE8tyGmsPI8L3OcZ/+BCA7aFyZrP387inxZKNJZ20aAv +M8/852QWXoFs/ZS9aSDZF1oXpZ6Jx0ZPF2/cT4NiY1W62ul03LExd8A3gAZw +uWa1HykVp68wJaUE0+ClRzvJZn8yPr/pp3t5GA2mZRqXnx5NxF8mpuW8OUED +z/wlJ1JpPH6lRa9rKpYGodzOD/ZfPIkHCXxcK51Eg2akrkO7G4Ob2cTYslJp +sJbUOu+3LBqXTKef3pVFg3aLS3+xzyfwwdetz2LO02Cdzx7Xz7zH8Ptrj/AW +XaKBWfruc6UHwvBUB1nTZ/k0KM1u2MgvEop7nnsUOVRMWK/EsPNHMK7b7XNf +uIwGz6jXdu+cCMJ5ZYXmtKtooKLG72Wregh/58bRc6yhgfyW4QMHpAPwm3ku +QWH3if2eUP/UR/PHT/Rxlec+ooEYrx+vQ8Q+3Fa5+Ff9ExqUYboabEEfXNlr +C73/OQ1apQvCfLu98KnCCS/e1zQg81AtXbt3483fL1xldNJAQaD7wGc+TzyH +AZ+sP9BgG+2X/MGnO3F/v28ygX00GN0jdXPouSuOylKcsr7S4Fx7mbui1A5c +dFT7TPUgDRq/O7rFFTriA1rdbd2jNHg+8nJW4+B2vDooUnBhkqi/z2+yK/23 +4UkciqXSPFFvru0Jcrm2uNv083jTJRpwmq0ye0a34BqGQY17l9PhqOwwTXbW +EucKl+I6xU+HpXSnnaEW5nh7bR2rTIgOx0aNfyr3bMSLFrzC2tbSoUZQZ3aw +1BQ/ilZXT0jRAQUm1qmyjXGr6MpxCQU6rDLRVEt8i3CFRifN9Sp0aFAnbxHL +Y+Fjyxf93Ol04vzaMh9dY4Q3biq4HqVOh7/2qbwKMgZ4dqLl12vadNBo5Tk2 +WKeL+7aMkZ4a0MF827Xc1Mva+AaBczsHWXSQbmzSM6/WwoVssIuCJnToSDLd +f/+POt6X1t+ltZkOc2ORTfR+Js5+nSS23ZoOxWySJcjQ8fi1WnahdnQ4wGpM +YF2g4M4OnadzHOlQMtbAt3aHCs48d6zlgSsdClUo673sSfjCO+WVnz3ooCNe +fq5ruSLeJvPMdPleOhQ5kz4PPJLF890Comh+dDixf0VddIcUHpwn/sAykA7h +e16N03Ql8M19tXMHjtDBYQtpBbl7LS6jvFs/I5wOEg8MsqLvr8GH9vAd5kTS +YV+PVs94uTA+kmf2oP4k8fydXh73XATw0e6olc+T6NAlxCcv7M6Pj4k9sOtM +pcNFkRPbtW/x4uNb5y5+zqKDiK34TnzTcnzilN63ofN0oH78YS6qwI1PPj6k +NXuJDh535R2QJhc+zXUrnOcaHWYatxiMff+LzWwYbBK6Tgc/utYJ7tY5bDaE +KixTRsRns51388oZbL5y9w5KFR2idvU54smT2J+hvGtaNXTg2lfPZ7xtHPtL ++zC84T4dFKtDZ/c7jGGLuyUNNz8i7reubxWRH8aWLtnHbHtCh9saL+v5x35i +XN1pL9yf02FFZq9vjfR3jFvshcS+NjrkPD/4fW3GALZ8K59n8Fs6bB3o9OSx ++YKtOGV2M/I9HdJ2Ki/DLPow3sdRU6d66VB2ktvQf/Yjxsf1AGUPEPG79dYp +NHRjqzbMJV39SfiaWsrKr53Y6hC9jtIROmwQZ/pUOXVgApWHFO5M0KElaJ90 +4Zo3mNBQmW/jLB3qS0btNq1uw0Rog1WtC3T4YvFw8nTEC2zNbupCNzcDal7m +x8tueoaJXtq9+etKBoyvCfOy8HuCib3LyxgTYEDh6lIuu8+NmPjaDx/+rGHA +5S0KrMOXH2ESNpLUlZIM2Kur++LehnpMKsk+UFSOAYviDu9IN2sx6aa0e/Ik +BtyuY43mRN3BZJaeL2dQGVCqpR02X3Ebk1vPt1VXlQG5p3YnbtJmY/JHzC4g +LQb0X9nHde5PBaZQEdVvqceAYzqmo7/5b2FKv+6rO65ngGLzVu4bqTcwEnUu +1BMxQNd+n1rF0WJM2VOvwd+MAVdna+88uF+AkXMPCRy1YEBRbaD0E9t8jNpV +5hhrwwDJRdHkt6pXMJro4JVUewa8IU86fEvOxehbqL8uOBNDa5FuK6B1AWMm +7tYrdCfi/y57LMIgG1NrzIus2M2AsB4175nsLEx98f2zWh8GvMvfSIsxy8A0 +jCTFnvozoHfX+dHDB1MxrWD7nW8OMSB70DA/uPUUpl2edr0nhAG82wwbuC4m +YDqDz8d/RDDgy/zos4KnJzFdCh82GcUAg9AdFvYWMZi+h1nCUhwDjmw5noFJ +RGEGF6Ner0pmgHXIcg1Pq2OYYed9WYl0In+Nifq/eo9i69fMeZPOMqC8MP6A +/8cj2AZrvQo1YghXNSy2P9E9jLESDs0bXGbAtIflE/xTIIY3lJmZFjCgoZ7/ +QVHeAQwt/Ey1KWHAr1JpB/2lfRgYUrt33GLAKS6vSItXezGTw7tVvNkM8O5n +n7y9zAszvZV3IPAOA/46PFrRecoTM/v5vibiAQPEOvf5PXq4E9tEluROaGDA +s5SJ+YhxF+zn7s3XNzxlQOdBH7fnbU5YytVQm7HnDFAz09tZu8oB0+ornixo +Y8DXmQpB7uxtWLvCu5wdb4l6jCTXhO6zxULc+YyF3jNg66yu7OicNSaTa/i9 +4RMDXDI1NyZkWmAP3vueDu1nQKVOZGlX2ibMQ/qCjtoPBjDbHb8c/GaK8Tg/ +6+4bYoDZyj0myinGWFH2XOTZ3wxifs55d4zimMVbBtVymgGGlv6HT5puwIbW +urxYnGdA2Uv1P1IrDLG0baeC2EsMyOqovz1G08O0M+5J+S5ngnL9Or+uK9pY +56vBOjl+JvQGeUb3eGthYUKy3q8FmTD5NvSjz0c1TG6L1ep4USbc8V2vLuXF +wB4mR1Sul2TCGeF89+ntVGxPy02nUVkmuGiWhj3KV8F4+T8uXFNiQlGQ4MvL +JiSsZLNAgTOFCRpnxP8MOShg1vEsS0EmE5L1g3WSi2Sw0Sb/sUcaTDB6I2Ai +4iuJZfJcyg7RYcK5lkJ1zdNimJ7JS5aqIROyRGOOUVaJYu+iFr70spgg/c0i +R65EGDtWr550xpgJwTD/NfjJakxx0V3TYhMT0N+vYjJufFgDK/XtgiUTbgY3 +CN5xXYHtjaiLqNrKhBXbx85cv8ON8d8bIflsZ8LWfP3mRz5cWOmsQrPsDiYs +67T23V73l7XVYOvBNncm1Fdsa96jNscaPxIpFrebCU4vltXvWjXNyuaU3zPy +YYLSsQ7GU8sJltFEr8eIHxOE3J8lsj+PsT6uE1l5LZAJK5eKVm9LGmZFBUKZ +0xEmiCdm/+nq+MlSKQ+0FwhnwnIn9K767DfWk+Ercw9PMMFjTMb58oN+1j61 +15ePxDKh7tdJlXn0mSXgt2wTM5EJxzcKlPuofGKVl6wb+pTCBENFe4rCtves +bT88M7MymMAtxVczM9/JmqJmGppnM0FVPj/xu1AH67x3w6e/OUwYqVSP5kS9 +ZrEKxk9WXmaCg/rFxzFJrazeL8qqewuYIGD5ebD6aguL6hEb+qqMCWsfYB+X +YU0s/57+RsMaJpz6FRWYd7eOJSwntn+4lgkSYR+2r2m4x6pyMRPJf0hcL45v +nrGqYc12FbitbmHC3gP8IcsLK1kXJd5yP2xlAo91fkhH1S0W7rCiJLidCexu +y6/nqm6w4t54T/V8JPbDdFfDB7UCluhLamrFKBMeXa/kbJnJZi2OahW2TDLh +qXrg88SqLNag6Ib7A3NM2Gw2q3OoP53V4Lx1UGq5KvhZhxlvbU1kHR4I3RQt +pQq7M8yLjYvDWR1/mhftjFUhx3/6EZ/VTtY5pl/ARKYqOF9UedjuqcySSyy3 +1ddXA9u2ziB15cIN51WNRNb6qMPjH+L6f4aL17fIGOtNZGjAPCu4bU1zttF6 +uYZ0zU5N+OYzaivlZ28oxJMf7BmjBarJL3JMdwgYKEQrsnZQ18GOY93KyW5p +evwUt+ptT9fBhNzXPUFOCzoamHR5qLs2qH179T3obYB20CfRRksuHZjyctJQ +DSrUGp1IcbA4rwNWwvE2kyH9Gps1n+RYqOuCAtdhr8eaYup1Exv+zLTqgq1z +T5q48wrVg2ra719764GvgU7++koeBjbi1bGDXx9kli9L+eJYT91IltoimK8P +r277fLzRl0imR5062mBgAHnDwpHdtRbKTG+jesp7AwhtWb2jpLVB0bvO9yTn +kCHo5ri2SPnYyddf6fD6LW4Ewe+WjiYaZ8lMXl+a0awxAq7//+yh3OTP2bL+ +v/7NzNKvGvvnOwV/Pk8lbvivXcxUYIMC67+WPZBwV+PhP4uv8q/c4oT91wWm +x8PHdvyz9vFU0yy3f7YZq3j7zvOf4zun5vb4//NsfqRJePQ/v9+Q1V508599 +jxTkWtz65+lbt72HKv5ZVPndzLrqf7bik5d78PCf73cUebW//WdLoTvqIe/+ ++d3mZ9NSH/558t6vxJ19/6x+Vavs5+D/rPfeOCRl+H/WE7NHmmP/vDfhyOvg +qf9Z72F8juTsP8fMn9tzb/6fRXRL1NwX/jnvwL2ppaV//j90mhVd "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, + "PlotRange" -> {{0, 30}, {0., 0.0807566203609549}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3416,6 +9211,7 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -3443,7 +9239,8 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07773075306777268}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0807566203609549}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -3451,9 +9248,8 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913298974454536`*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] + CellChangeTimes->{3.9913298974454536`*^9, 3.99383055605497*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"c72c00ed-2509-4515-a595-5d26141bb334"] }, Open ]], Cell[CellGroupData[{ @@ -3506,66 +9302,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[173]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], + "In[100]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 173, 129, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298974999084`*^9}, +Cell[BoxData["3.224737707228918`"], "Output", + CellChangeTimes->{3.991329904262455*^9, 3.993830641195739*^9}, CellLabel-> - "During evaluation of \ -In[173]:=",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 130, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897510906*^9}, - CellLabel-> - "During evaluation of \ -In[173]:=",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 131, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298975189075`*^9}, - CellLabel-> - "During evaluation of \ -In[173]:=",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 173, 132, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897526905*^9}, - CellLabel-> - "During evaluation of \ -In[173]:=",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], - -Cell[BoxData["9.77956849963325`"], "Output", - CellChangeTimes->{3.991329904262455*^9}, - CellLabel-> - "Out[173]=",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] + "Out[100]=",ExpressionUUID->"95aa7f30-ef3a-4023-883d-6597f3d7a774"] }, Open ]], Cell[CellGroupData[{ @@ -3632,68 +9374,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489049186344`*^9, - 3.991848908595253*^9}},ExpressionUUID->"eb852908-4d60-c84e-80d9-\ -a57fd4094f56"], + CellChangeTimes->{{3.9918489049186344`*^9, 3.991848908595253*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 174, 133, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904300501*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.505405894947004`*^-90\\\", \ +\\\"61549346779964471160015809137305620640483477612976829085474467629502252149\ +882733525660304130697111571885237067815001730354104927744028353155640323268465\ +7222342968161239204962580299776000000000000000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 17, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.99383064123919*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], +In[101]:=",ExpressionUUID->"10b11239-bb92-4722-a74c-9d6ce2148a7d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 134, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904310505*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.208410132201455`*^-91\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 18, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.993830641243972*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], +In[101]:=",ExpressionUUID->"b38171f1-bf68-4e48-bb7d-e9aac25c792a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 135, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043185062`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.722461307844363`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 101, 19, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.993830641248603*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], +In[101]:=",ExpressionUUID->"b02170df-5f33-4256-8403-2a2bcf508a81"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 174, 136, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043256874`*^9}, +during this calculation.\"", 2, 101, 20, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.993830641252812*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], +In[101]:=",ExpressionUUID->"8392bb86-f054-45fd-98dd-056af81b672d"], -Cell[BoxData["0.1491428555515254`"], "Output", - CellChangeTimes->{3.9913299110465336`*^9}, +Cell[BoxData["3.1839062844101105`"], "Output", + CellChangeTimes->{3.9913299110465336`*^9, 3.993830650330216*^9}, CellLabel-> - "Out[174]=",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] + "Out[101]=",ExpressionUUID->"2afede13-e98c-4ae8-84d1-fe1aba5df8fc"] }, Open ]], Cell[CellGroupData[{ @@ -3714,8 +9466,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3760,68 +9511,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489121661835`*^9, - 3.9918489145264854`*^9}},ExpressionUUID->"d11037f6-09e7-b44f-8a1d-\ -47c1a485c608"], + CellChangeTimes->{{3.9918489121661835`*^9, 3.9918489145264854`*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 175, 137, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911081766*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.505405894947004`*^-90\\\", \ +\\\"61549346779964471160015809137305620640483477612976829085474467629502252149\ +882733525660304130697111571885237067815001730354104927744028353155640323268465\ +7222342968161239204962580299776000000000000000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 21, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.99383065036213*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], +In[102]:=",ExpressionUUID->"7c8f7168-2b6b-42e0-a5be-abd54142b43f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 138, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911090769*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.208410132201455`*^-91\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 22, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.9938306503671713`*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], +In[102]:=",ExpressionUUID->"89d9f713-7872-44f8-aaa5-6dd5a6e3f5c1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 139, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911098768*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.722461307844363`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 102, 23, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.993830650373642*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], +In[102]:=",ExpressionUUID->"e4b6cf8f-dec4-4011-8bb2-7bba21e0a139"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 175, 140, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299111067944`*^9}, +during this calculation.\"", 2, 102, 24, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.9938306503798027`*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], +In[102]:=",ExpressionUUID->"a459bc10-e1ba-4c09-911d-570fa72e7263"], -Cell[BoxData["6.5928699937564845`"], "Output", - CellChangeTimes->{3.9913299163114815`*^9}, +Cell[BoxData["15.952586739795505`"], "Output", + CellChangeTimes->{3.9913299163114815`*^9, 3.993830659237358*^9}, CellLabel-> - "Out[175]=",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] + "Out[102]=",ExpressionUUID->"57717e56-ab16-4506-9cf4-9d3625919cf5"] }, Open ]], Cell[CellGroupData[{ @@ -3842,8 +9603,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3888,68 +9648,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489192162857`*^9, - 3.991848922582632*^9}},ExpressionUUID->"431dd2fa-6331-2449-bc19-\ -0d79e6ed8953"], + CellChangeTimes->{{3.9918489192162857`*^9, 3.991848922582632*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 176, 141, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163444805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.505405894947004`*^-90\\\", \ +\\\"61549346779964471160015809137305620640483477612976829085474467629502252149\ +882733525660304130697111571885237067815001730354104927744028353155640323268465\ +7222342968161239204962580299776000000000000000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 25, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.9938306592800493`*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], +In[103]:=",ExpressionUUID->"4a934517-41cb-4da1-8ebf-f53b518cc59c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 142, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916354479*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.208410132201455`*^-91\\\", \ +\\\"35550902700107478542025131357707726481943256669255416479770052502800500841\ +772266884421391665890651643920912930369944999452531006264950776782697850719865\ +80116252984099317647863863811506176000000000000000000000000000000000000\\\"]\\\ +) is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 26, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.993830659284885*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], +In[103]:=",ExpressionUUID->"b40bb072-33c3-4ef1-b73a-26560d6a1cbb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 143, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163634796`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.722461307844363`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104169490867\ +77035773443118706567359680709276\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"6\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39017540563361448931555446155569180843350926394272485433418484853842011750\ +4000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 103, 27, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.993830659289391*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], +In[103]:=",ExpressionUUID->"a43256fa-e79c-47d8-bb39-3b718665834d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 176, 144, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916371479*^9}, +during this calculation.\"", 2, 103, 28, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.993830659293756*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], +In[103]:=",ExpressionUUID->"d934452d-bbf0-4c7d-8e6e-0f0fb2e9dfc3"], -Cell[BoxData["16.916908616104454`"], "Output", - CellChangeTimes->{3.9913299193276234`*^9}, +Cell[BoxData["1.0139658848867579`"], "Output", + CellChangeTimes->{3.9913299193276234`*^9, 3.9938306651510277`*^9}, CellLabel-> - "Out[176]=",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] + "Out[103]=",ExpressionUUID->"599ea0fc-2242-4ae0-8b4d-80a7e6997a6d"] }, Open ]], Cell[CellGroupData[{ @@ -3958,22 +9728,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991848926103155*^9, - 3.9918489295815735`*^9}},ExpressionUUID->"8c5df121-e0b9-a146-bc34-\ -b231aa8028b9"], - -Cell[BoxData["0.01412227604937243`"], "Output", - CellChangeTimes->{3.99132991935894*^9}, + CellChangeTimes->{{3.991848926103155*^9, 3.9918489295815735`*^9}}, CellLabel-> - "Out[177]=",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] + "In[104]:=",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], + +Cell[BoxData["0.791649692031832`"], "Output", + CellChangeTimes->{3.99132991935894*^9, 3.993830665176832*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"2118b185-9038-472e-a7d7-61d088713614"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918489327910748`*^9, 3.991848934830887*^9}, - 3.991924914130762*^9},ExpressionUUID->"831a27fc-89ff-e041-97f1-\ -0ec5d19a7879"], + 3.991924914130762*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ @@ -3996,12 +9767,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[179]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], + "In[106]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.9913299193849545`*^9}, +Cell[BoxData["9.701974835645975`"], "Output", + CellChangeTimes->{3.9913299193849545`*^9, 3.993830665189004*^9}, CellLabel-> - "Out[179]=",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] + "Out[106]=",ExpressionUUID->"056bd6c5-ecc2-4b68-9549-6e5ea54bbf4b"] }, Open ]], Cell[CellGroupData[{ @@ -4011,12 +9782,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[181]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], + "In[107]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913299194207077`*^9}, +Cell[BoxData["0.03853285923433961`"], "Output", + CellChangeTimes->{3.9913299194207077`*^9, 3.9938306651971407`*^9}, CellLabel-> - "Out[181]=",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] + "Out[107]=",ExpressionUUID->"ffbd1ce9-3bd4-4130-ac62-1eef6c01dca9"] }, Open ]], Cell[CellGroupData[{ @@ -4026,12 +9797,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[184]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], + "In[108]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.9913299194738407`*^9}, +Cell[BoxData["0.3738448306370516`"], "Output", + CellChangeTimes->{3.9913299194738407`*^9, 3.993830665206091*^9}, CellLabel-> - "Out[184]=",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] + "Out[108]=",ExpressionUUID->"ba8219fd-a9d3-4b83-b556-9ea83738c8ec"] }, Open ]], Cell[CellGroupData[{ @@ -4221,12 +9992,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[185]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], + "In[109]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[BoxData["0.04472011299838893`"], "Output", - CellChangeTimes->{3.991329919501911*^9}, +Cell[BoxData["0.013491344043080746`"], "Output", + CellChangeTimes->{3.991329919501911*^9, 3.9938306652172747`*^9}, CellLabel-> - "Out[185]=",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] + "Out[109]=",ExpressionUUID->"a69f82a0-9aec-454b-93de-5fad693d8112"] }, Open ]], Cell[CellGroupData[{ @@ -4240,12 +10011,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[186]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], + "In[110]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329919596855*^9}, +Cell[BoxData["7.629873401471798`"], "Output", + CellChangeTimes->{3.991329919596855*^9, 3.9938306653060913`*^9}, CellLabel-> - "Out[186]=",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] + "Out[110]=",ExpressionUUID->"15cbbee3-85df-415c-bcac-6549f901362b"] }, Open ]], Cell[CellGroupData[{ @@ -4437,12 +10208,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[187]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], + "In[111]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[BoxData["0.014190600885170185`"], "Output", - CellChangeTimes->{3.9913299196126003`*^9}, +Cell[BoxData["0.2217035953569603`"], "Output", + CellChangeTimes->{3.9913299196126003`*^9, 3.993830665317622*^9}, CellLabel-> - "Out[187]=",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] + "Out[111]=",ExpressionUUID->"8d41fc61-ed25-4d65-86d7-e1d7ac27af98"] }, Open ]], Cell[CellGroupData[{ @@ -4456,12 +10227,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[188]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], + "In[112]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[BoxData["7.439513700547701`"], "Output", - CellChangeTimes->{3.9913299197036095`*^9}, +Cell[BoxData["1.8821688113752937`"], "Output", + CellChangeTimes->{3.9913299197036095`*^9, 3.99383066541472*^9}, CellLabel-> - "Out[188]=",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] + "Out[112]=",ExpressionUUID->"214b4aa2-20a7-40e6-adf3-a23cd3f9ac3f"] }, Open ]], Cell[CellGroupData[{ @@ -4554,12 +10325,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[189]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], + "In[113]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913299197165985`*^9}, +Cell[BoxData["0.19148677740942904`"], "Output", + CellChangeTimes->{3.9913299197165985`*^9, 3.99383066542319*^9}, CellLabel-> - "Out[189]=",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] + "Out[113]=",ExpressionUUID->"7d1a3d9b-d4e4-45b0-9613-2dfffe64741d"] }, Open ]], Cell[CellGroupData[{ @@ -4649,12 +10420,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[190]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], + "In[114]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991329919739599*^9}, +Cell[BoxData["0.808513222590571`"], "Output", + CellChangeTimes->{3.991329919739599*^9, 3.9938306654331007`*^9}, CellLabel-> - "Out[190]=",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] + "Out[114]=",ExpressionUUID->"53d65677-dd77-4164-9afa-b566075a95ef"] }, Open ]], Cell[CellGroupData[{ @@ -4777,12 +10548,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[191]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], + "In[115]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913299197646008`*^9}, +Cell[BoxData["0.15481959148678082`"], "Output", + CellChangeTimes->{3.9913299197646008`*^9, 3.9938306654453287`*^9}, CellLabel-> - "Out[191]=",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] + "Out[115]=",ExpressionUUID->"37978c33-c32b-4e41-bc42-eb3379cc093a"] }, Open ]], Cell[CellGroupData[{ @@ -4844,68 +10615,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848964116934*^9},ExpressionUUID->"220bdeed-2e17-e94c-a7b0-\ -3e066daf15d7"], + CellChangeTimes->{3.991848964116934*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 145, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919788595*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.667046484460589`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677014376571\ +83766930031662987798788637389089\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"73037642020067135698106962500927414407927270768241537997833403576048680960\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 116, 29, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.993830665461838*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], +In[116]:=",ExpressionUUID->"4ba7fd20-906c-41d1-9c5c-a52bab9eb669"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 146, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299197985992`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.665107500026424`*^-66\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194495204020\ +33897038098812632294585492297343\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"56315876242497824258864668888957856210968322415955267074317235399363133440\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 116, 30, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9938306654668407`*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], +In[116]:=",ExpressionUUID->"74b647d3-4842-45b8-86e4-bf2ba3c1b993"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 192, 147, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299198065968`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2589091019896285`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391635815956\ +75117750082522193347059523365005\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"64822767064647970549103680486633424592482966980364476382412977906269552640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 116, 31, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.993830665471561*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], +In[116]:=",ExpressionUUID->"c61dded1-1edb-4df7-8f0a-a912fdcf6755"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 192, 148, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919814598*^9}, +during this calculation.\"", 2, 116, 32, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.993830665475871*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], +In[116]:=",ExpressionUUID->"25c60359-dd0b-4519-9109-a3f0ae9ba056"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329923627493*^9}, +Cell[BoxData["7.629563917720126`"], "Output", + CellChangeTimes->{3.991329923627493*^9, 3.993830670898724*^9}, CellLabel-> - "Out[192]=",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] + "Out[116]=",ExpressionUUID->"31b9a2d2-c98c-4d53-a441-581652a9d6b4"] }, Open ]], Cell[CellGroupData[{ @@ -4967,68 +10754,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918489685110855`*^9},ExpressionUUID->"b8791a07-33fe-8c4f-9c59-\ -dd23af9a4471"], + CellChangeTimes->{3.9918489685110855`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 149, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236609*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.667046484460589`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677014376571\ +83766930031662987798788637389089\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"73037642020067135698106962500927414407927270768241537997833403576048680960\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 117, 33, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.993830670938243*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], +In[117]:=",ExpressionUUID->"acff21c7-30fd-4f80-bce9-93ee55881a00"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 150, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329923669897*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.665107500026424`*^-66\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194495204020\ +33897038098812632294585492297343\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"56315876242497824258864668888957856210968322415955267074317235399363133440\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 117, 34, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.993830670944117*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], +In[117]:=",ExpressionUUID->"31ced317-9a29-4674-b707-b4a34e0c2581"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 193, 151, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236779003`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2589091019896285`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391635815956\ +75117750082522193347059523365005\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"64822767064647970549103680486633424592482966980364476382412977906269552640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 117, 35, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.993830670948901*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], +In[117]:=",ExpressionUUID->"d078c715-ba39-4a99-9034-4ad1b826ad71"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 193, 152, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236858997`*^9}, +during this calculation.\"", 2, 117, 36, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.9938306709540567`*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], +In[117]:=",ExpressionUUID->"3cea9d0d-3d86-4dd4-a068-353fc82c4cba"], -Cell[BoxData["7.439513700547696`"], "Output", - CellChangeTimes->{3.9913299274564743`*^9}, +Cell[BoxData["1.8820924666400174`"], "Output", + CellChangeTimes->{3.9913299274564743`*^9, 3.9938306764630833`*^9}, CellLabel-> - "Out[193]=",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] + "Out[117]=",ExpressionUUID->"49a8d0d3-e2ce-441e-8429-1c9b5689a519"] }, Open ]], Cell[CellGroupData[{ @@ -5086,93 +10889,113 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848973885317*^9},ExpressionUUID->"3fe6e7f1-b44a-234f-af77-\ -3cf1fdaf28d9"], + CellChangeTimes->{3.991848973885317*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4FHoXB/CRfUuRJOpWlkLdyjaj6Bx79jUkxKAkxUVeOy2ilFRCJUtp +ZpQIZbtyRUVZsyUlu8qWtSzh/fXXPJ/ne873d8YfntlK97Z0X0WhULawUSh/ +Pk9M22joaimiAu8O2wyqINLdzs/uMlXEydDnBzP+EsRkqRtfnB0U0fkIR7Mk +uyCy3899+iZQEaUtzIqc3glgZ+qw9Y08RQxsc6oWtBfAS8nO9+SklPCokCxL +LJwfh2KN/7bjUsZtr7Wzyzt4UdLoiFjsOmUcLauYUPuPFy35PCnl25TRee21 +pPqHvFgeE90sBcrof7r1q4YfL96Kqgz48T9lLP7sFqMpxIs6EbT/Ln5XxhsV +vyprjXgww1fa/HmdCgamvll1p50L879UxG74rIJLO+M/yZVzYaWhY3XIiAp6 +fDBKaH3IhQPbEg9o8alizJeQI8FnuFC2hXtXo74q2vYK7+Vcz4XZSiO83ytV +8dHf1WzcDpxYPJNXJVlCRcMbAhK7FtnxrbPpSkQNFcd8VaKnBtmxs254X/8H +KqpnSOs1NbHjYqZUftZPKio++OLWymDHA4dupasq0/Ctd075byt2fPU8MMw8 +l4ZD1+qjS/NXYVMAUC88VMNWa99NpmfZ8FTDvbtpz9Tw01ic00FvNuST/b1S +WqWGP4MaXWwd2VC3rbhmslcNlwt6DxeosWGpkqL90c378JyA6H/O0xTMnJAO +25e0D9MO7egP96RgoCdf1UTMfsxcqJDxalgG0UqP7QLJ+5FDeKUBcpchX7w6 +djtzP8b4L72hxi/DWM15a6fX+3Gi/RBbguUy0LcvDdayqaPkdUfqfMcSGA/8 +4GEGq+MB3YMlVqO/YatTm6mjlwaOn7cTpO5chMwKoWr/YA3cNhLlt15kEWSl +DOFKjAa23pOkrV1YgJ3fynf/m6mBISZH3OxqFkDVl7VGvEsDoyalOOWPLYDx +xZDmVpMD2Nj/JbGCMQ8BOVttjHcD7pHdEDi5bw7m1jg0uGoAHspgIIfMHIT4 +JeqFGAEm8ra0/i00B5E0fuqj44BvVlFn3vX/gtjKGTGedECebuFtknG/wHyk +f9SFB/HQ3HNp/q8/wX2lMGdTEGKx7YyZR9YsrOOWSHgZibixYEPKw4RZqFwd +EeQeg5h/zlFqMWIWtmzW13mShFghz+U5bjMLn9U/fFQvROxSvhw3xTkLlsG/ +OBymEZfdDtnbeszAgVnqkTunNDHnhNPGWo1pGPt9Fw+c0URXduv4DwrTkMJB +ke0L1cRc2dKiOfFpmBepmZC7ookXb2B+4M8peKZod7HkkSae0uA96/V0CuR9 +AvM6vmri1IE72oI7pkBspJhbjK6FPy/oP4iWmQTaHN8v2gktzFzymmATmwR7 +Tschex8tLA5qy4jlmYSUv9hep4ZrYeHejG91IxOwzdrgnOxdLYwJ2ifIWTAB +f7/4+FulVQuvKhzcq64zAXrXFiat9bSxdqeDXkrfOHikGPcGmGjjXfk10bJv +x+FSVmpTsrU22rXwWtXmjkNdlVbuZ7o2vky4L+QWNg6Wc5e93CK0sd37WlGD ++Dg4ukh89SvWxgyl4c2nbcfAX0n98w15HcyxMC7gHhwBB9Uf3fF7dTCdp2pQ +vHEEdNTu98fRdLDghYSkVskIiADPyGU9Hex86rS79eoI5Bu2zp+j66Ax3VTp +N3UEJly8xPzu6OAWCmWXXvwwnIxPsbTi0yX/v0IbJMy/g+VNMxuLtbpIlw4o ++U/9O+xLXGVvtkEXD24vKQqQ+w58KR4uRrK6yC/vkLSJ/TuwmMo+2lq6WCua +dcm46BsMldddVQrWxfR1Ea8kpb4Bfex3jciwLkb2RorOcX+Fojc/Z7MmdXFb +w6Q6fXYIBNIntuG8LsYc1ezu7huCIsuBUC8ePdxZHK0iWk7y4to9r2X10PRL +b6L7mSF4fu5OcoCrHtYqtrBf+joIPBtoHh8/62HwOnlX+DgAjpN7b3kP6KF2 +JkN2rGYA8t8pVHKO6uEkWyzjcfEAOIT9Jam4qIcrg9tj7ZMHIK+Pq+myuD7m +e78rDbMbAPsnbVR1G32k84vfr/nUD0+0/LjTGvVRLen93rGxPvDfeuRAQbs+ +htvHHDjf0wfqFO0z1V36mEC50CHT0gd1L4T7f4zoo1XpaGh8cR+M0vLLkecg +jvzI5l443wfyuyfP9OFBzEmZdBDe1AcsCe8BmfyDKKT+W2zJthcyZzxfZicY +4LWl5/+T/9wNH7Nubz2cYoAHrefPC77uhtVHa85yZhrghOYcJ3dONwS9ldFy +KjDAmG4rdo3IbjBN7akUajbAgSyRdfky3TCvb/PKV8gQX5nQIh75fwHTu5rV +tMuGaPgw+J78ti6Y09xQ/yrCCD230yNCCjthZpSpaRJtRE5m2SVndsKPJGph +W5wR3pQ+E/L6RicMjdmkDd0zwgsvom3MvTuh9fatf3jKjLB3NfOMrFwn5E0K +rzeeM8LsyvfU12kfwTND8GiLjzGyK/6QsEvugC4K+2Sviwla0NNjThe0g3Fe +pPc3DxM8urZvpyijHUpdlsfGvU1wYMWT8Sa5HRIr54cXw0wwlToybhDeDuYX +JgZE75ig/qpTuU0G7VDJ/aXDoNkEe+zV+tv62oCxuqQiT8sU1VncwkGSbXBa +0jv+rJQZPnbOvi+a3QKGD5RoWxTMcKqnIY6W3gKy8nPd5YpmeKFpR7h7Qgt0 +Uc/u/q1phuiRqNEV2gLGVjcbApzN0IkeJaVt2gJyl4sEvO6Zof/Gza3dU80w +tRih85jfHGcuGHiIazdDzomailtR5vjy0XzHraUmaMvNEJe+ZI7OLVNOCTNN +8Hs22Df/ijk+sQzKuT3SBEbndkk33jRH+/2W14s/NsG3Ozeiee6bo3tFRole +YRNsrXMwDSk3R5OQON00nyZI+Hvyk/Mvc6SIzO3f09oIwdPivxROWGC4bbbk +UFc9dGQmunGdssCO/lqBnPp6ULURae7xscDbA9LPz72oh6ligSe3Ai3QKvLH +ksW9evAMX6GvRFugcXLL5mjHejjMO9jQzLDAnAfLqNlTB7S/njKCBiyQPdW+ +OnO8FmYN9Wyqj1qiT7vDx4ad70D1f9P111wt8U3UwqnHf72DwAfpunbHLdG8 +Xvz5deF3sLC4oPz9tCXu4P1JDZl7C8vZuSL84ZbYn/Vh08tXb4FLSPy9aYol +rjdKm11z9C2ItYwYtXdY4qqq4ysX79SA2pHrmoMWVnhFOVVKXKEamsXveb5S +ssbpIprfrYZXsJFxvoy14xCeFZhak/qgEop75I1NBW1QJziBvX+4Aja3ThwP +GLPBqbCwa6lj5aB063r2gx5bFLuZ/UBHtQzucUz/faPKDq0Kdqdc5CyFQs3d +nVElh5ErKXoi7GcRJFMvr/39yB6juPIkpFQLofHTw4tKV47gN2psu2fNM3hu +kiLtE+mAt+NbOtq8CmDylBXltJsj3m+KGpUyz4dZPTmPcW0nDN2CDO/DecAa ++zjnp3oUA3l+avieegp2GQ9dHQWccYduKLPLJhcK8o2Oskc747fliP6IgSeg +JtE8f2neGZNLjK+kPMsGqZ7jne9PuJDfXVL/a3/yGAb4T5ql9LtgTeaI8P5n +j6ApztRV/xAdfSInejy+Z0FCYBr/mSbiJsktUQpZUFa+Mu9q4IqRse9HO6+w +YO9LZdp2I1dc84apUHaZBYyqEwHDxq7o/PZybWoMC67XtEz5mLsiNk/t9LjA +gmPNzJEwW7KvVnaSP5QFa4fMupLcXXFLWFbUzZMkF0yvqD3ripRv6+8xjVgg +5IDRSqVkn9+roVaIBVvWVTdKlrlihVEX22dBFuypM9nAVU72z5iXjvGzwFL9 +SFbHS7Lvn1ksysOCBMmA2rC3rtizc7z7fxQWbOx6LFTTQfrOnTt7YZIJ0k5i +yQ6/yD3njx0ra2WCmvM4K0rZDXFGM+xGGhMYtyf8TFXdsGLbgwyJVCasa5k6 +IEZzw8hPMpyMFCaM6/5qZe13wx6jmJjy20zIVKCw1WmRXPR20PJNJqz+tfaw +sAXJ6d51JTFMGLiqwpt2ivTxHw6T9GOCRTW19bi3G6Zbs/jq/2FCOWVf2p5/ +iHeYNob7MOG23wGVSn83pIQWLA2eYoLpYX2XwRDil7HfKj2YUCJ9uEThMnnv +6vFXhU5MiPs39EQxg/RX7FoTZcSEU4pJaoEsksvVjLsYMsE4K4+X9ohYYWkS +DJjAlzSUVfSEfF/DM+4rekyI8jUfLnxG8kOOi7FaTAiVkz75vJL03cwt+aTG +BM+kWq/8L8Si3WAtxwSD1UPqvj3knqwXtod2MGFHFEVQsY/kspfjbLczYchX +5UneIOn317E7KsMEF9O0saejJOfMsQ3dygQ7Tr/TuQvERf59I+JM0Pfb6JO9 +3h0jZz8Lp/MzoTLtouGNDcQysTL5fExQr5uSDtzojpThPRde8zJhj0ztR+3N +xIcfS09wM0H8Q4j2Jxl3xLuuY9YcTBjZ17WeT4Xs754PcFhiwLVV6S+OW7lj +xYVZpE8wgG+3QLLJIWL/k+H3fjDgwpFAXyVbMv8jaVXnOAMCn5lvX7En9gv7 +YjPGAJdjbNcT6eQ91+M9R4cZoPSO7vb6H/Ke8Y/RnAEGfLguwy8VT/pW8qnY +yYAcEPT4dp3sB1l553wk/WMzr57cJPPLL/7bRKxo8CqclkSsEv9o5QMD4iiu +UyapZF/36sOmNgboead/DMwm+z4PJZnvGbBpU4zqgRzy/q6xNlnimXfeN9mf +Er+NZzCbGHBfFkziCsh8YuLV7EYGLHV1VTwoJXmAlU9VPQOeGUuwGmpI/8BA +gMw7BsQurOJMeEfyWuuUwrcMoLOGXQ7XkXtKez8cJF7DUSox0Ejyf3iv+9Qw +wOtfu2vz7cTnbvPWv2GAlHxigPQgsVw6R2kVAxY+hLV8HyLvqz0+70DcFOW+ +J/cbyU9UiVGIw3uVh9VGia90hRtWMqAzucXRbJq4V0R/tIIBN7jX6gazHcNI +2ny+azkDyqa6jvizH0PcUPt0NfHXrke+pzmPYcXcf1z/vmCA+jOddDrvMaR4 +1peKEQ85By4ariW2y9Ds/Zfcb6wrrCtC5h8ULCcS76cKy4EoyWPdRUyJ4wWz +bZTESX/bSe2KUpKXdudJbCW5y8myZyUMOPYwu0ZUiuTPepXPEMfHB3ULyZA+ +hYscVOKhYyKCHHLEG2WzyotJLqLvMbqH3J9+gutLEQNKl0UihhTJfvVP1Szi +we89t3qUyXyQZfkZ4n0VwVWtNDK/bPhemHjAK2fzCyR5miy3YyEDVtuFqBRp +kXu0BMYUidW0Dxrn6ZD5R75yfMRx4n1BDw+SfH/6w7LnDCjmyI1PMyS5nu1g +EnH/jxDmbWPir6dD/Ilpb0TbrpoTl91/tJeYntc3Em1J9oXytIWJr6bkrjpn +TazMoTTzjAF9vgZ7AuzIvKbzujJiQaf1+j72JD/nyHWfmGbQ7+jpQKwbY3qJ ++OpfYbFOzsSrLXuPEBfzGd63oxOzviro/+mbXV9i6Ub6BpPqlP709fY3Gh8j +rnCq2vqnr+7pkJ4HmQ+lrVlLTC8KW0JP4rStBWx/+u8brtvvRTy/Pnu6gPRf +FVNQOf3n7y26OETcFziguduH5NMb0z8RC7jl2cn5Et+SvvuemGoW7i3lT/zP +ntEaYvo+o4ubAohL1W++JL4is+GeWCDxsH78v8SFawYL1gb/uc+8v5C4dzHv +HX8osa7NlYI//V/DeznDyXy1bWwesWqz0dxKBMk7rXueEv8fVRJsDg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5186,105 +11009,123 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1nk4FHoXB/CRfUuRJOpWlkLdyjaj6Bx79jUkxKAkxUVeOy2ilFRCJUtp +ZpQIZbtyRUVZsyUlu8qWtSzh/fXXPJ/ne873d8YfntlK97Z0X0WhULawUSh/ +Pk9M22joaimiAu8O2wyqINLdzs/uMlXEydDnBzP+EsRkqRtfnB0U0fkIR7Mk +uyCy3899+iZQEaUtzIqc3glgZ+qw9Y08RQxsc6oWtBfAS8nO9+SklPCokCxL +LJwfh2KN/7bjUsZtr7Wzyzt4UdLoiFjsOmUcLauYUPuPFy35PCnl25TRee21 +pPqHvFgeE90sBcrof7r1q4YfL96Kqgz48T9lLP7sFqMpxIs6EbT/Ln5XxhsV +vyprjXgww1fa/HmdCgamvll1p50L879UxG74rIJLO+M/yZVzYaWhY3XIiAp6 +fDBKaH3IhQPbEg9o8alizJeQI8FnuFC2hXtXo74q2vYK7+Vcz4XZSiO83ytV +8dHf1WzcDpxYPJNXJVlCRcMbAhK7FtnxrbPpSkQNFcd8VaKnBtmxs254X/8H +KqpnSOs1NbHjYqZUftZPKio++OLWymDHA4dupasq0/Ctd075byt2fPU8MMw8 +l4ZD1+qjS/NXYVMAUC88VMNWa99NpmfZ8FTDvbtpz9Tw01ic00FvNuST/b1S +WqWGP4MaXWwd2VC3rbhmslcNlwt6DxeosWGpkqL90c378JyA6H/O0xTMnJAO +25e0D9MO7egP96RgoCdf1UTMfsxcqJDxalgG0UqP7QLJ+5FDeKUBcpchX7w6 +djtzP8b4L72hxi/DWM15a6fX+3Gi/RBbguUy0LcvDdayqaPkdUfqfMcSGA/8 +4GEGq+MB3YMlVqO/YatTm6mjlwaOn7cTpO5chMwKoWr/YA3cNhLlt15kEWSl +DOFKjAa23pOkrV1YgJ3fynf/m6mBISZH3OxqFkDVl7VGvEsDoyalOOWPLYDx +xZDmVpMD2Nj/JbGCMQ8BOVttjHcD7pHdEDi5bw7m1jg0uGoAHspgIIfMHIT4 +JeqFGAEm8ra0/i00B5E0fuqj44BvVlFn3vX/gtjKGTGedECebuFtknG/wHyk +f9SFB/HQ3HNp/q8/wX2lMGdTEGKx7YyZR9YsrOOWSHgZibixYEPKw4RZqFwd +EeQeg5h/zlFqMWIWtmzW13mShFghz+U5bjMLn9U/fFQvROxSvhw3xTkLlsG/ +OBymEZfdDtnbeszAgVnqkTunNDHnhNPGWo1pGPt9Fw+c0URXduv4DwrTkMJB +ke0L1cRc2dKiOfFpmBepmZC7ookXb2B+4M8peKZod7HkkSae0uA96/V0CuR9 +AvM6vmri1IE72oI7pkBspJhbjK6FPy/oP4iWmQTaHN8v2gktzFzymmATmwR7 +Tschex8tLA5qy4jlmYSUv9hep4ZrYeHejG91IxOwzdrgnOxdLYwJ2ifIWTAB +f7/4+FulVQuvKhzcq64zAXrXFiat9bSxdqeDXkrfOHikGPcGmGjjXfk10bJv +x+FSVmpTsrU22rXwWtXmjkNdlVbuZ7o2vky4L+QWNg6Wc5e93CK0sd37WlGD ++Dg4ukh89SvWxgyl4c2nbcfAX0n98w15HcyxMC7gHhwBB9Uf3fF7dTCdp2pQ +vHEEdNTu98fRdLDghYSkVskIiADPyGU9Hex86rS79eoI5Bu2zp+j66Ax3VTp +N3UEJly8xPzu6OAWCmWXXvwwnIxPsbTi0yX/v0IbJMy/g+VNMxuLtbpIlw4o ++U/9O+xLXGVvtkEXD24vKQqQ+w58KR4uRrK6yC/vkLSJ/TuwmMo+2lq6WCua +dcm46BsMldddVQrWxfR1Ea8kpb4Bfex3jciwLkb2RorOcX+Fojc/Z7MmdXFb +w6Q6fXYIBNIntuG8LsYc1ezu7huCIsuBUC8ePdxZHK0iWk7y4to9r2X10PRL +b6L7mSF4fu5OcoCrHtYqtrBf+joIPBtoHh8/62HwOnlX+DgAjpN7b3kP6KF2 +JkN2rGYA8t8pVHKO6uEkWyzjcfEAOIT9Jam4qIcrg9tj7ZMHIK+Pq+myuD7m +e78rDbMbAPsnbVR1G32k84vfr/nUD0+0/LjTGvVRLen93rGxPvDfeuRAQbs+ +htvHHDjf0wfqFO0z1V36mEC50CHT0gd1L4T7f4zoo1XpaGh8cR+M0vLLkecg +jvzI5l443wfyuyfP9OFBzEmZdBDe1AcsCe8BmfyDKKT+W2zJthcyZzxfZicY +4LWl5/+T/9wNH7Nubz2cYoAHrefPC77uhtVHa85yZhrghOYcJ3dONwS9ldFy +KjDAmG4rdo3IbjBN7akUajbAgSyRdfky3TCvb/PKV8gQX5nQIh75fwHTu5rV +tMuGaPgw+J78ti6Y09xQ/yrCCD230yNCCjthZpSpaRJtRE5m2SVndsKPJGph +W5wR3pQ+E/L6RicMjdmkDd0zwgsvom3MvTuh9fatf3jKjLB3NfOMrFwn5E0K +rzeeM8LsyvfU12kfwTND8GiLjzGyK/6QsEvugC4K+2Sviwla0NNjThe0g3Fe +pPc3DxM8urZvpyijHUpdlsfGvU1wYMWT8Sa5HRIr54cXw0wwlToybhDeDuYX +JgZE75ig/qpTuU0G7VDJ/aXDoNkEe+zV+tv62oCxuqQiT8sU1VncwkGSbXBa +0jv+rJQZPnbOvi+a3QKGD5RoWxTMcKqnIY6W3gKy8nPd5YpmeKFpR7h7Qgt0 +Uc/u/q1phuiRqNEV2gLGVjcbApzN0IkeJaVt2gJyl4sEvO6Zof/Gza3dU80w +tRih85jfHGcuGHiIazdDzomailtR5vjy0XzHraUmaMvNEJe+ZI7OLVNOCTNN +8Hs22Df/ijk+sQzKuT3SBEbndkk33jRH+/2W14s/NsG3Ozeiee6bo3tFRole +YRNsrXMwDSk3R5OQON00nyZI+Hvyk/Mvc6SIzO3f09oIwdPivxROWGC4bbbk +UFc9dGQmunGdssCO/lqBnPp6ULURae7xscDbA9LPz72oh6ligSe3Ai3QKvLH +ksW9evAMX6GvRFugcXLL5mjHejjMO9jQzLDAnAfLqNlTB7S/njKCBiyQPdW+ +OnO8FmYN9Wyqj1qiT7vDx4ad70D1f9P111wt8U3UwqnHf72DwAfpunbHLdG8 +Xvz5deF3sLC4oPz9tCXu4P1JDZl7C8vZuSL84ZbYn/Vh08tXb4FLSPy9aYol +rjdKm11z9C2ItYwYtXdY4qqq4ysX79SA2pHrmoMWVnhFOVVKXKEamsXveb5S +ssbpIprfrYZXsJFxvoy14xCeFZhak/qgEop75I1NBW1QJziBvX+4Aja3ThwP +GLPBqbCwa6lj5aB063r2gx5bFLuZ/UBHtQzucUz/faPKDq0Kdqdc5CyFQs3d +nVElh5ErKXoi7GcRJFMvr/39yB6juPIkpFQLofHTw4tKV47gN2psu2fNM3hu +kiLtE+mAt+NbOtq8CmDylBXltJsj3m+KGpUyz4dZPTmPcW0nDN2CDO/DecAa ++zjnp3oUA3l+avieegp2GQ9dHQWccYduKLPLJhcK8o2Oskc747fliP6IgSeg +JtE8f2neGZNLjK+kPMsGqZ7jne9PuJDfXVL/a3/yGAb4T5ql9LtgTeaI8P5n +j6ApztRV/xAdfSInejy+Z0FCYBr/mSbiJsktUQpZUFa+Mu9q4IqRse9HO6+w +YO9LZdp2I1dc84apUHaZBYyqEwHDxq7o/PZybWoMC67XtEz5mLsiNk/t9LjA +gmPNzJEwW7KvVnaSP5QFa4fMupLcXXFLWFbUzZMkF0yvqD3ripRv6+8xjVgg +5IDRSqVkn9+roVaIBVvWVTdKlrlihVEX22dBFuypM9nAVU72z5iXjvGzwFL9 +SFbHS7Lvn1ksysOCBMmA2rC3rtizc7z7fxQWbOx6LFTTQfrOnTt7YZIJ0k5i +yQ6/yD3njx0ra2WCmvM4K0rZDXFGM+xGGhMYtyf8TFXdsGLbgwyJVCasa5k6 +IEZzw8hPMpyMFCaM6/5qZe13wx6jmJjy20zIVKCw1WmRXPR20PJNJqz+tfaw +sAXJ6d51JTFMGLiqwpt2ivTxHw6T9GOCRTW19bi3G6Zbs/jq/2FCOWVf2p5/ +iHeYNob7MOG23wGVSn83pIQWLA2eYoLpYX2XwRDil7HfKj2YUCJ9uEThMnnv +6vFXhU5MiPs39EQxg/RX7FoTZcSEU4pJaoEsksvVjLsYMsE4K4+X9ohYYWkS +DJjAlzSUVfSEfF/DM+4rekyI8jUfLnxG8kOOi7FaTAiVkz75vJL03cwt+aTG +BM+kWq/8L8Si3WAtxwSD1UPqvj3knqwXtod2MGFHFEVQsY/kspfjbLczYchX +5UneIOn317E7KsMEF9O0saejJOfMsQ3dygQ7Tr/TuQvERf59I+JM0Pfb6JO9 +3h0jZz8Lp/MzoTLtouGNDcQysTL5fExQr5uSDtzojpThPRde8zJhj0ztR+3N +xIcfS09wM0H8Q4j2Jxl3xLuuY9YcTBjZ17WeT4Xs754PcFhiwLVV6S+OW7lj +xYVZpE8wgG+3QLLJIWL/k+H3fjDgwpFAXyVbMv8jaVXnOAMCn5lvX7En9gv7 +YjPGAJdjbNcT6eQ91+M9R4cZoPSO7vb6H/Ke8Y/RnAEGfLguwy8VT/pW8qnY +yYAcEPT4dp3sB1l553wk/WMzr57cJPPLL/7bRKxo8CqclkSsEv9o5QMD4iiu +UyapZF/36sOmNgboead/DMwm+z4PJZnvGbBpU4zqgRzy/q6xNlnimXfeN9mf +Er+NZzCbGHBfFkziCsh8YuLV7EYGLHV1VTwoJXmAlU9VPQOeGUuwGmpI/8BA +gMw7BsQurOJMeEfyWuuUwrcMoLOGXQ7XkXtKez8cJF7DUSox0Ejyf3iv+9Qw +wOtfu2vz7cTnbvPWv2GAlHxigPQgsVw6R2kVAxY+hLV8HyLvqz0+70DcFOW+ +J/cbyU9UiVGIw3uVh9VGia90hRtWMqAzucXRbJq4V0R/tIIBN7jX6gazHcNI +2ny+azkDyqa6jvizH0PcUPt0NfHXrke+pzmPYcXcf1z/vmCA+jOddDrvMaR4 +1peKEQ85By4ariW2y9Ds/Zfcb6wrrCtC5h8ULCcS76cKy4EoyWPdRUyJ4wWz +bZTESX/bSe2KUpKXdudJbCW5y8myZyUMOPYwu0ZUiuTPepXPEMfHB3ULyZA+ +hYscVOKhYyKCHHLEG2WzyotJLqLvMbqH3J9+gutLEQNKl0UihhTJfvVP1Szi +we89t3qUyXyQZfkZ4n0VwVWtNDK/bPhemHjAK2fzCyR5miy3YyEDVtuFqBRp +kXu0BMYUidW0Dxrn6ZD5R75yfMRx4n1BDw+SfH/6w7LnDCjmyI1PMyS5nu1g +EnH/jxDmbWPir6dD/Ilpb0TbrpoTl91/tJeYntc3Em1J9oXytIWJr6bkrjpn +TazMoTTzjAF9vgZ7AuzIvKbzujJiQaf1+j72JD/nyHWfmGbQ7+jpQKwbY3qJ ++OpfYbFOzsSrLXuPEBfzGd63oxOzviro/+mbXV9i6Ub6BpPqlP709fY3Gh8j +rnCq2vqnr+7pkJ4HmQ+lrVlLTC8KW0JP4rStBWx/+u8brtvvRTy/Pnu6gPRf +FVNQOf3n7y26OETcFziguduH5NMb0z8RC7jl2cn5Et+SvvuemGoW7i3lT/zP +ntEaYvo+o4ubAohL1W++JL4is+GeWCDxsH78v8SFawYL1gb/uc+8v5C4dzHv +HX8osa7NlYI//V/DeznDyXy1bWwesWqz0dxKBMk7rXueEv8fVRJsDg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0., 3.6521632012455902`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5296,21 +11137,19 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.6521632012455902`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5324,103 +11163,122 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1nk4FHoXB/CRfUuRJOpWlkLdyjaj6Bx79jUkxKAkxUVeOy2ilFRCJUtp +ZpQIZbtyRUVZsyUlu8qWtSzh/fXXPJ/ne873d8YfntlK97Z0X0WhULawUSh/ +Pk9M22joaimiAu8O2wyqINLdzs/uMlXEydDnBzP+EsRkqRtfnB0U0fkIR7Mk +uyCy3899+iZQEaUtzIqc3glgZ+qw9Y08RQxsc6oWtBfAS8nO9+SklPCokCxL +LJwfh2KN/7bjUsZtr7Wzyzt4UdLoiFjsOmUcLauYUPuPFy35PCnl25TRee21 +pPqHvFgeE90sBcrof7r1q4YfL96Kqgz48T9lLP7sFqMpxIs6EbT/Ln5XxhsV +vyprjXgww1fa/HmdCgamvll1p50L879UxG74rIJLO+M/yZVzYaWhY3XIiAp6 +fDBKaH3IhQPbEg9o8alizJeQI8FnuFC2hXtXo74q2vYK7+Vcz4XZSiO83ytV +8dHf1WzcDpxYPJNXJVlCRcMbAhK7FtnxrbPpSkQNFcd8VaKnBtmxs254X/8H +KqpnSOs1NbHjYqZUftZPKio++OLWymDHA4dupasq0/Ctd075byt2fPU8MMw8 +l4ZD1+qjS/NXYVMAUC88VMNWa99NpmfZ8FTDvbtpz9Tw01ic00FvNuST/b1S +WqWGP4MaXWwd2VC3rbhmslcNlwt6DxeosWGpkqL90c378JyA6H/O0xTMnJAO +25e0D9MO7egP96RgoCdf1UTMfsxcqJDxalgG0UqP7QLJ+5FDeKUBcpchX7w6 +djtzP8b4L72hxi/DWM15a6fX+3Gi/RBbguUy0LcvDdayqaPkdUfqfMcSGA/8 +4GEGq+MB3YMlVqO/YatTm6mjlwaOn7cTpO5chMwKoWr/YA3cNhLlt15kEWSl +DOFKjAa23pOkrV1YgJ3fynf/m6mBISZH3OxqFkDVl7VGvEsDoyalOOWPLYDx +xZDmVpMD2Nj/JbGCMQ8BOVttjHcD7pHdEDi5bw7m1jg0uGoAHspgIIfMHIT4 +JeqFGAEm8ra0/i00B5E0fuqj44BvVlFn3vX/gtjKGTGedECebuFtknG/wHyk +f9SFB/HQ3HNp/q8/wX2lMGdTEGKx7YyZR9YsrOOWSHgZibixYEPKw4RZqFwd +EeQeg5h/zlFqMWIWtmzW13mShFghz+U5bjMLn9U/fFQvROxSvhw3xTkLlsG/ +OBymEZfdDtnbeszAgVnqkTunNDHnhNPGWo1pGPt9Fw+c0URXduv4DwrTkMJB +ke0L1cRc2dKiOfFpmBepmZC7ookXb2B+4M8peKZod7HkkSae0uA96/V0CuR9 +AvM6vmri1IE72oI7pkBspJhbjK6FPy/oP4iWmQTaHN8v2gktzFzymmATmwR7 +Tschex8tLA5qy4jlmYSUv9hep4ZrYeHejG91IxOwzdrgnOxdLYwJ2ifIWTAB +f7/4+FulVQuvKhzcq64zAXrXFiat9bSxdqeDXkrfOHikGPcGmGjjXfk10bJv +x+FSVmpTsrU22rXwWtXmjkNdlVbuZ7o2vky4L+QWNg6Wc5e93CK0sd37WlGD ++Dg4ukh89SvWxgyl4c2nbcfAX0n98w15HcyxMC7gHhwBB9Uf3fF7dTCdp2pQ +vHEEdNTu98fRdLDghYSkVskIiADPyGU9Hex86rS79eoI5Bu2zp+j66Ax3VTp +N3UEJly8xPzu6OAWCmWXXvwwnIxPsbTi0yX/v0IbJMy/g+VNMxuLtbpIlw4o ++U/9O+xLXGVvtkEXD24vKQqQ+w58KR4uRrK6yC/vkLSJ/TuwmMo+2lq6WCua +dcm46BsMldddVQrWxfR1Ea8kpb4Bfex3jciwLkb2RorOcX+Fojc/Z7MmdXFb +w6Q6fXYIBNIntuG8LsYc1ezu7huCIsuBUC8ePdxZHK0iWk7y4to9r2X10PRL +b6L7mSF4fu5OcoCrHtYqtrBf+joIPBtoHh8/62HwOnlX+DgAjpN7b3kP6KF2 +JkN2rGYA8t8pVHKO6uEkWyzjcfEAOIT9Jam4qIcrg9tj7ZMHIK+Pq+myuD7m +e78rDbMbAPsnbVR1G32k84vfr/nUD0+0/LjTGvVRLen93rGxPvDfeuRAQbs+ +htvHHDjf0wfqFO0z1V36mEC50CHT0gd1L4T7f4zoo1XpaGh8cR+M0vLLkecg +jvzI5l443wfyuyfP9OFBzEmZdBDe1AcsCe8BmfyDKKT+W2zJthcyZzxfZicY +4LWl5/+T/9wNH7Nubz2cYoAHrefPC77uhtVHa85yZhrghOYcJ3dONwS9ldFy +KjDAmG4rdo3IbjBN7akUajbAgSyRdfky3TCvb/PKV8gQX5nQIh75fwHTu5rV +tMuGaPgw+J78ti6Y09xQ/yrCCD230yNCCjthZpSpaRJtRE5m2SVndsKPJGph +W5wR3pQ+E/L6RicMjdmkDd0zwgsvom3MvTuh9fatf3jKjLB3NfOMrFwn5E0K +rzeeM8LsyvfU12kfwTND8GiLjzGyK/6QsEvugC4K+2Sviwla0NNjThe0g3Fe +pPc3DxM8urZvpyijHUpdlsfGvU1wYMWT8Sa5HRIr54cXw0wwlToybhDeDuYX +JgZE75ig/qpTuU0G7VDJ/aXDoNkEe+zV+tv62oCxuqQiT8sU1VncwkGSbXBa +0jv+rJQZPnbOvi+a3QKGD5RoWxTMcKqnIY6W3gKy8nPd5YpmeKFpR7h7Qgt0 +Uc/u/q1phuiRqNEV2gLGVjcbApzN0IkeJaVt2gJyl4sEvO6Zof/Gza3dU80w +tRih85jfHGcuGHiIazdDzomailtR5vjy0XzHraUmaMvNEJe+ZI7OLVNOCTNN +8Hs22Df/ijk+sQzKuT3SBEbndkk33jRH+/2W14s/NsG3Ozeiee6bo3tFRole +YRNsrXMwDSk3R5OQON00nyZI+Hvyk/Mvc6SIzO3f09oIwdPivxROWGC4bbbk +UFc9dGQmunGdssCO/lqBnPp6ULURae7xscDbA9LPz72oh6ligSe3Ai3QKvLH +ksW9evAMX6GvRFugcXLL5mjHejjMO9jQzLDAnAfLqNlTB7S/njKCBiyQPdW+ +OnO8FmYN9Wyqj1qiT7vDx4ad70D1f9P111wt8U3UwqnHf72DwAfpunbHLdG8 +Xvz5deF3sLC4oPz9tCXu4P1JDZl7C8vZuSL84ZbYn/Vh08tXb4FLSPy9aYol +rjdKm11z9C2ItYwYtXdY4qqq4ysX79SA2pHrmoMWVnhFOVVKXKEamsXveb5S +ssbpIprfrYZXsJFxvoy14xCeFZhak/qgEop75I1NBW1QJziBvX+4Aja3ThwP +GLPBqbCwa6lj5aB063r2gx5bFLuZ/UBHtQzucUz/faPKDq0Kdqdc5CyFQs3d +nVElh5ErKXoi7GcRJFMvr/39yB6juPIkpFQLofHTw4tKV47gN2psu2fNM3hu +kiLtE+mAt+NbOtq8CmDylBXltJsj3m+KGpUyz4dZPTmPcW0nDN2CDO/DecAa ++zjnp3oUA3l+avieegp2GQ9dHQWccYduKLPLJhcK8o2Oskc747fliP6IgSeg +JtE8f2neGZNLjK+kPMsGqZ7jne9PuJDfXVL/a3/yGAb4T5ql9LtgTeaI8P5n +j6ApztRV/xAdfSInejy+Z0FCYBr/mSbiJsktUQpZUFa+Mu9q4IqRse9HO6+w +YO9LZdp2I1dc84apUHaZBYyqEwHDxq7o/PZybWoMC67XtEz5mLsiNk/t9LjA +gmPNzJEwW7KvVnaSP5QFa4fMupLcXXFLWFbUzZMkF0yvqD3ripRv6+8xjVgg +5IDRSqVkn9+roVaIBVvWVTdKlrlihVEX22dBFuypM9nAVU72z5iXjvGzwFL9 +SFbHS7Lvn1ksysOCBMmA2rC3rtizc7z7fxQWbOx6LFTTQfrOnTt7YZIJ0k5i +yQ6/yD3njx0ra2WCmvM4K0rZDXFGM+xGGhMYtyf8TFXdsGLbgwyJVCasa5k6 +IEZzw8hPMpyMFCaM6/5qZe13wx6jmJjy20zIVKCw1WmRXPR20PJNJqz+tfaw +sAXJ6d51JTFMGLiqwpt2ivTxHw6T9GOCRTW19bi3G6Zbs/jq/2FCOWVf2p5/ +iHeYNob7MOG23wGVSn83pIQWLA2eYoLpYX2XwRDil7HfKj2YUCJ9uEThMnnv +6vFXhU5MiPs39EQxg/RX7FoTZcSEU4pJaoEsksvVjLsYMsE4K4+X9ohYYWkS +DJjAlzSUVfSEfF/DM+4rekyI8jUfLnxG8kOOi7FaTAiVkz75vJL03cwt+aTG +BM+kWq/8L8Si3WAtxwSD1UPqvj3knqwXtod2MGFHFEVQsY/kspfjbLczYchX +5UneIOn317E7KsMEF9O0saejJOfMsQ3dygQ7Tr/TuQvERf59I+JM0Pfb6JO9 +3h0jZz8Lp/MzoTLtouGNDcQysTL5fExQr5uSDtzojpThPRde8zJhj0ztR+3N +xIcfS09wM0H8Q4j2Jxl3xLuuY9YcTBjZ17WeT4Xs754PcFhiwLVV6S+OW7lj +xYVZpE8wgG+3QLLJIWL/k+H3fjDgwpFAXyVbMv8jaVXnOAMCn5lvX7En9gv7 +YjPGAJdjbNcT6eQ91+M9R4cZoPSO7vb6H/Ke8Y/RnAEGfLguwy8VT/pW8qnY +yYAcEPT4dp3sB1l553wk/WMzr57cJPPLL/7bRKxo8CqclkSsEv9o5QMD4iiu +UyapZF/36sOmNgboead/DMwm+z4PJZnvGbBpU4zqgRzy/q6xNlnimXfeN9mf +Er+NZzCbGHBfFkziCsh8YuLV7EYGLHV1VTwoJXmAlU9VPQOeGUuwGmpI/8BA +gMw7BsQurOJMeEfyWuuUwrcMoLOGXQ7XkXtKez8cJF7DUSox0Ejyf3iv+9Qw +wOtfu2vz7cTnbvPWv2GAlHxigPQgsVw6R2kVAxY+hLV8HyLvqz0+70DcFOW+ +J/cbyU9UiVGIw3uVh9VGia90hRtWMqAzucXRbJq4V0R/tIIBN7jX6gazHcNI +2ny+azkDyqa6jvizH0PcUPt0NfHXrke+pzmPYcXcf1z/vmCA+jOddDrvMaR4 +1peKEQ85By4ariW2y9Ds/Zfcb6wrrCtC5h8ULCcS76cKy4EoyWPdRUyJ4wWz +bZTESX/bSe2KUpKXdudJbCW5y8myZyUMOPYwu0ZUiuTPepXPEMfHB3ULyZA+ +hYscVOKhYyKCHHLEG2WzyotJLqLvMbqH3J9+gutLEQNKl0UihhTJfvVP1Szi +we89t3qUyXyQZfkZ4n0VwVWtNDK/bPhemHjAK2fzCyR5miy3YyEDVtuFqBRp +kXu0BMYUidW0Dxrn6ZD5R75yfMRx4n1BDw+SfH/6w7LnDCjmyI1PMyS5nu1g +EnH/jxDmbWPir6dD/Ilpb0TbrpoTl91/tJeYntc3Em1J9oXytIWJr6bkrjpn +TazMoTTzjAF9vgZ7AuzIvKbzujJiQaf1+j72JD/nyHWfmGbQ7+jpQKwbY3qJ ++OpfYbFOzsSrLXuPEBfzGd63oxOzviro/+mbXV9i6Ub6BpPqlP709fY3Gh8j +rnCq2vqnr+7pkJ4HmQ+lrVlLTC8KW0JP4rStBWx/+u8brtvvRTy/Pnu6gPRf +FVNQOf3n7y26OETcFziguduH5NMb0z8RC7jl2cn5Et+SvvuemGoW7i3lT/zP +ntEaYvo+o4ubAohL1W++JL4is+GeWCDxsH78v8SFawYL1gb/uc+8v5C4dzHv +HX8osa7NlYI//V/DeznDyXy1bWwesWqz0dxKBMk7rXueEv8fVRJsDg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "PlotRange" -> {{0, 180}, {0., 3.6521632012455902`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5430,7 +11288,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5311368545847414}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5458,7 +11317,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.6521632012455902`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5466,9 +11326,9 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913301734961166`*^9}, + CellChangeTimes->{3.9913301734961166`*^9, 3.9938310188601847`*^9}, CellLabel-> - "Out[194]=",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] + "Out[118]=",ExpressionUUID->"22f76777-138b-4af8-9128-bd704fef8633"] }, Open ]], Cell[CellGroupData[{ @@ -5531,213 +11391,231 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991848978152012*^9, - 3.99184898469532*^9}},ExpressionUUID->"ab29778f-f183-804b-b871-\ -4070462057d7"], + CellChangeTimes->{{3.991848978152012*^9, 3.99184898469532*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.47138536392029`*^-264\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 195, - 153, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913301737143345`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1924020625155469`*^-238\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 37, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.9938310189607363`*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], +In[119]:=",ExpressionUUID->"1749216a-c4b1-4aee-95da-6b85e2832628"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.656148098260251`*^-275\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 195, 154, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173723337*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.355587166484278`*^-246\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 38, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.993831018967072*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], +In[119]:=",ExpressionUUID->"855e90b2-9baa-4212-ab0f-4ee67079fa91"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.85074473590452`*^-286\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 195, 155, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173731432*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.537451272904252`*^-253\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 39, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.9938310189724483`*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], +In[119]:=",ExpressionUUID->"96128add-9cc6-4d22-a7ca-cc7a7cfe8831"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 195, 156, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173739336*^9}, +during this calculation.\"", 2, 119, 40, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.993831018976407*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], +In[119]:=",ExpressionUUID->"84005616-8f82-48a9-9744-959590dd76ae"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k4lG8Xx0llS3bGvqvsDIMxM+eglCVEdiGRkn1fQwlFJaksLVI/LUqy +zqCNUkkqhIRE1hCFspR33r+e63Pd1/Pc9/ec873PeeS8g+1817GwsLxnZWH5 +/3Nx4PVzxcybNNLilfOrDXtonVcJscY9x0C3yfdN3A4tQOF33oSeHNj3hOeu +/Q6EKNu73Ww9xUB588iGuMMW+GdEc5a6K+Dyv6rVH9u94EuDdfB8dyM4Wq01 +sW4PATPFyf657nbY87520hmTYalb/8Js9xA0+pjEvdDOhibTWzc/FP+ClU+W +V4WuFIHkF8aot9pf+FjaZVQlfBuEAjzvspuy4ZnsmsCGxjJQYb/RbOvEhlU8 +H3s4BsoAi0eH8o+w4ccMJ26zpTII6AmUUMtlw6L25Us5mg/g+faELNsRNnxm +X7ApvPABREjlB+Wnr8ddX78wFAzKoaOtXUe1dQPWQceDPxsfQo62Wb21Awf6 +SApzp2dWgOZnl53UQxx4JyHqrePFCmhNDexQjedANXuXbunrFbCxJ/c7x3UO +rH2mUHWppgLijw5LNE1xYIperK7a1wrweZOcoJ/KiVm1ytH9upVA8q2nylZy +YV5lvJNlVyV0bH73enMzF14zqxuRGqyEEPqQw98eLtQdf+YyPlEJd7m5gnr/ +ceFE8v5xn7+VIFPhfDXXghvdzU86rCpUAcfawj+OIW6c0mvQKA6ugk95Wk/n ++HjwuCf7HzpLNRR0lPJGKfFgfp9jJHBVg+vmLZ7LhjxYccxWuEGwGvqOS/1b +d4AHeR15Ki8pV8NgEBdFqJoHvXjHZHosq2F8+7dakstm7NvOdTc+txr+zF56 +EH+dFwtz8w7TpGuAoSq4tlbNi//eqnxOVa6BuINnrFNbeDH2vpPaM40aWP2c +Op31ixcTvsr4SUANJA/Thd/J82FEq7+go2cNpLb9Zz8YwYfkqBn24Ss1kHkz +6d06MX4ck43/bSdYCxa6hwWEFfjRJz6fpiNeCxzP7Ry2qPNjzmrzNXa5Wkgd +VvpsacyPob6f7udq1EKCfOto7mF+HDmkPKFvXgtBRYR/ynX8+KgmOLI4oRb2 +XH6oZukmgBWeV0Q29tUCn1ph8D5fAdz7sXf21tdaaKtPrQgOFsBtfhcHYIy5 +/2cng9zjAmhUnLiw52ctmIj/M+0vFcBNKhSxNXY66OZZuAWvCuDbhr6zidp0 +EM0dPnn+iiA+kp+24U2kA0G1OvVPiSDGPZOhbkuhg3hjWtK+ckFsH/HPJ5+g +g/TstsgtTYJ4oZ5ebHqaDkpWIV7144J4LdSE/8dlOhDX/yUNE4XQ6r0Z6V4d +c7/CNu1dVCE8yPPxBPUxHUg6RWr3zYRQXthzb/MzOpC9TOWjXYRwH21D+ONX +dDBuOMnDnSSE8+y/u3d10cEmQuSbTosQ6gfnu778QQdb7vGBSx1CqBkgp/Hh +Jx3sihmfVvuEsPQ8+UL7Ah0c37u/a/4hhP4+owoNK3TYp3ajzlVYGN19MwNU +2Blw5JvmuWNewsgeyrohUpIBAfGsWWOHhVHdXPbVH2kGBAl0pFmFC6Ni4Kx+ +hBwDwjAqQSRNGF0K0hXtlBkQe7nB726pMFJi6rzvajIgfa85rX1RGHefKuFq +QwaIV7WJr2MVwaIUZ90/JgwoE9z7W5tbBKWO9dUQdjCgq92j/JyMCJ76cew9 +xZwBinsi5PfsEsG05pKr/HsYQC9f+pdsJ4JT56S6Z+wYYMWX9LncXQSnj1kl +Nu5lQPi7k7l8oSLoZlQhtduZAY27r218ny+C3CzzKz88GOB4X3F47YYIblRz ++5HsxYDJTXefaJaJ4IjIm4Mc3gzgb62KOdsogn6iTtPLPgzwsmiZtP4ugsf2 +2ZYG+TNg/o7Ny6MLIrjegZ2/6ghTH+fHG2VrIug9EyMwG8DU8+qL+2YhUVR7 +/2beMpgBf80W2t5SRFE6X+zM+XAGZJfElf41E0WqyuGtZyKY+jayZKjvEcXn +IonRSZFMPS+4jE/7imLg5140i2bAoGK21KNgUfwjWfJMIoapL1V4eSpWFG8c +M1g/zuQCU9lKqzOieNVs5rNPHAM0bvx3NiFPFLlIDdHC8Uz961QD7hWL4tL+ +kqEGJjt6l+/quyeK/73cLOuWwICJZ3pKm2pF8UCIO3GWyQly9ayUZ6IYFLAi +k5DIAL4UHDjyhnneNveJf0w2QMtLb76IYs9vU9mJowxovfY+fGVCFIefPs+1 +TWLGa83BVnVeFCvH/v4qY/K8x2c1t3+iWEyJNV6fzIzXYy/OTA4C5oW/SLZl +srj06EidAAEbpaOqzzO5LPFI46QkAe/dURh+y2ST/tmr4lsI+NX+CM8ak7so +UfEW2gRkU/uhvyWFAf6XV5zijAgYweV40IzJf1eSde/uIKBoluVldyZnu23k +77UhoA9Pcv9hJivWZ05zuhLw+83b6kFMpovztxj6ENBaOin7/+tWcRdLDgcR +cGH+Gef/3x/8JHE8P4aALda6V3YwOdzwuufrYwSU/X3FWpnJFkWb5y2zCPii +7LggK5Pl2RMy2i4Q0PzfL9lO5nmXAick91wjoIg6T9w1Jr/vdHzYcZuAmcuz +cgeYfNvo+Q7HCgKKFzyXkGFyUrF2b089Ac8/KPfvYMbPkfNakNsLAnpZfuVP +ZrJGyCa2gTYCVoyeEFJi8obu2EtePQSs9fwQ2cjMRx91THX4KwEHF5YMnJmc +yd24d3yeqdesdS6AmT/vMM0J/38EfLr91/R3Zr7Jny4nTrOLIcvAnPMBJo+X +RJf8FBfDki+5GUbMennCM0KOVBTDB6vv7S8z6+tihN273+piWC8iVLgQy4Ad +Jup/VlEMx2LXlZ5j1qPknYKsJAvmepBnXCezfud5OeTW7RVD/3LlDl4mF/cP +mbP7ieHMxTiNEGa9x263HTgZIoYxB9r1LzD9YFv6KGxTnBhqP1fpqWD6ZS0m +r5D/tBhmb7r4vTuUAe5C1tMSlWJ4MJP/8etABhDj61OuNoihxgeBwUqm/7iG +torINYvhAHRVXWT6k/GADZQ/iaEK/+NUs8MMELFkZGutieEds1A5G6a/px8q +K1VyiGNPZBtljen/54Rchp4Ak88Fb7m9n5nv0aAhspI4Mt4sxHxj3h/vUxR1 +d1iKo2rYShi7CwNujZ979XKvODrOWAUddWLAUZs1dwsPcZw/LOk448AAdane +Ezah4uh3iH2ZzryvTtHPdrtcEkdlB5+VJUsGbP+xHBc0zGSbWk0NKjMeu3JV +nk2J49BMXgUYMf1wXb1XcFEc02wLii0MGUDY62XI4JDA1rDsHis9BkzRX/xm +05BAi/GudWzqDDh/LDsiP0YC2RczswwlGPDq8zbFqRQJbHoeWDhMYMCqblMH +LVMC/bMa7dJFGHBwbEHn2xUJ7KSNvK7nZ9aDlducRpME2k8d2P6J2Q+GhJWD +nvNIYt6lE00TzH4iGvxESlRUEsNMTytozdLB6pXz28OykqjKHno4ZJoONXGZ +arxESRRJ8a8ZGKPDqS+zky7OkphL+9wY1kcHnTv1fj+KJbFNmyKW8JwOKZQ9 ++8UNpJB0RfShZjYddnlc/alvIoWY774alEWHzcnfjztYSeGCyPiDWxl0uNx0 +oiTbSwoz+dp8NjD7L92i7vvGk1K401Q2PyyUDrPOClG/Pkmh+0/VVsIeOnhE +LpxqjZdGX3/FWgY3s5+W5VcdfSKDCbGtqonBtbC9u+3vzCsZVP3+r7zAvxas +Wdbv9GyXQZxqKqn0rYUDdkGfYEQGC4WFFrvdasEsXi4peYMsfvGwKJ7cWQsh +Mos3jFVlUdKIokyRqYXnftemm6JkkcfG5MKDlhoI+DOX/IpHDvt2L5p2CdfA +kirfgLqDPK5yt8WH7q8CSum9oosXFbBwMed6A3M+nROw8HJsVERp7wcF/o3l +8C3LyzGMXRnXKT0THrl8H8x/RJuPkLZgJL+l4jTXXZg6wBFelbQVSyuU2RZd +Spjzuei69MZtaNYXlHdmuRgE3iqfKf+hgt0G/tMDYsx5POOBLYmkhvMbvsSf +LiiAPFVDPkE/dQxckR+7vXYBWsSN9X6d08D8ydqh27w5QJZszNbs0sQXvSc6 +m99nwZCC4sBErybee1HW2FmbBSdV01RvftFEO4qC06+rWdBDtmgmTGjiX4aV +u3dgFkS7tK+wrmoiWdDMgJ07C1wtQ4mTfFo4GuOj4WeeCRczmPYlaSEhrYrV +qf0kbGYrjth/TAsVmzcpFgumw8alJ/ZzqVroli9xamI1Df7N9OukpGthTHB/ +pcloGvzoFZsrytLCmmPHtFUYafC+4lzg4EUtzHb/Mt3qmQY53ikHPUuZ/C5H +ybX8BIg0ejnv69RC6bM6Pc4eqSCdIkNxUdZGpcC3xlxTKVAWziHfv1Ube9aO +FXR9SgHawTn2/ara2GzSsb7iZQrss2zqOKSljY0e5tMXbqTAZWG/IzFkbczz +OqvM754CYnfLCi5Za6PI5QGWtnfJINRBXfoYpY3hC5yT1qlJwKnkXmP3UhvP +3QitE7oeD/5iYFH6WhtvRH83uX8iHlp45AfYWrVR6+O+QHf/eMhaHNtQ/V4b +N7SuC/9HjIfNr8IdRHu10Xsp9a3NqzgQOJI5/3lKG/ViHihLLsSC5MM6HV8B +HZzfY71xzSMGNKhiD6L36WBRVVYlf2gkVCocXlnnpYN8N/c58bhEggEXY+cZ +bx08dDqwScY4Eky6nQdv+ulgiGtxZQZ/JDiG5vG3h+qgl+NLrcOVEZD0n2iE +WpoONvUfz3ZcCYf3PCKGX8t0sK/+TEx4YRg4zPueCHjI5KRnatvSwqC3t/rD +70od/LOodv9XSBh8u+Xgv5mhg7m70zqbzcLgj/GFQqMmHRxv9OT2+RUKclFC +/y506yDP1u7LAbahEDYg0GTBQkTS72/nLcVC4FWz+6O764jYxXO9sYE9BKQf +lNRybSDifMa7joSpYGhJIt9r4STiMOn58EhJMMjLeV+wECTi5d0uGiAVDB8O +PPSzUCZi5FRg+hJvEGhN2GyysCKiOFZtGt8UAGkf8jfetSaicvD82brpI9DH +GGbh2kPEoM2hgqVtRyDjVPTCawciBpzJfzKSfQQGVa8NmHsSMXGcqPFE5Ahk +B82Um4cRMTPLKWdmiz/8+JXlYJ5HxDWdMpYbnoegr+e645UCIjrvnunO3X4I +Wh7VOM1dJmIRy9Huom2H4Gb6oEv+dSJqjhL/bZz3A1cJXY+Ju0Tsx6oKzlN+ +8MLk88GTj4hYu0FGurvuIBSe2xbzeoiIpWFXSOyavpARRYuVGmHy7N4joqK+ +EOVmHxc6RsR9paG2sOYDtkqJCWJTRPxSHfvl4zsf2Mh4n3x4gYh79WxWJcJ8 +IHQw+iQnhy4OC4aXrdQdgJ2azQXm6rqoxF49l7bPG5w37tr7XlMXn7DEfr1i +5g3+/a95nHR08R9dZuWtpjecyXyb7KOvi12wahu7zhu6xjoPJhnrImWLw6bl +2/vBp2hYp9qB+b2OV+LZy15wjJ/1jexRXZQTazox7uEJuePHUm8l66JUZ3s5 +l74nlDxZT9M4rou6laWVLrye0BLI8dAoQxcNSefyEp96AH8L7yXHHF0sAKJV +j6IHFB2TPpBVootHB+5KVy+4w+NfRiu/23RxRHDMdLbGFa631nrbf9BF4d2J +efcvukLqf8SWsg5dZFNoO386yhXMnVTzfXt08Sb/dtZqkit01onrd3zVxaXH +p6yv0l1gMmUprGxeF8tVX5Y9aXQGEb7aSR9xPZTUeX798A9HWBrXsXsqqYdm +pfGF2OEIfc/KGBIyemg+4RRDqnWE6+ElGe0Kenhx2fvQ0SRHUOu+oIzqeviS +w58lgd8RTK5GeEugHlbLOe0UNnKAIDWd3g++erjjdxjLvxv2EPlbfNnzkB6O +qVl9CzhpDwmNbOIz/npo99J1/WqQPWQ6f3ThCtFD/e2y4XFke7idGvPJJE4P +X3h4+s2328FQ3+OeyjN6GJl9c+gJpx04nrbsvlCrh2dNTlp1nraFfc66vxXq +9LDLOewld7Qt+ChIiVY06OH3FPEUTy9bCGfMOLY908Mtbo36bkRbyB4517Wx +VQ/H6wI6sNoGWqg9H6MH9VAtKLz3rLs1UGd8Ol04Sdiysvwzpd0SROp3Fjdw +k1DmbO2KXJklzKSrhMhsJqH+94AN0yct4arcLPeIAAmzNs/6s5lYwr+98aYh +kiRkzGWVq1VZwJP6cxVpmiRcjTPRsCwyB+OTj7MrHUh4ttHtxNmLO0Hc8bqH +iDMJZ87uuE+J3gk/5VPVYl1J6KVw7Tyv804objB/RfMk4dKZiFUl8Z2wbrZz +7fUhEk5yDH7nKzKDJsfvQYPxJKysChR/VLEDdigSdvMUkzA7k27v89MUqqZf +yPncJGG7HdV+Q48pKNaGL9aVkPBE0S/e5kemsN7i3bVDpSR8cyCOXHLSFBqD +0342VZGwanztXr+8KdDq5y/FvSRhxPW3mpvcTIBk92FobIqELnUKrWlfEUok +kmppP0j4zqYqeLAFQXhELevCHAn/+Fp1OFQhzEdn6JkukrBtluZ9Ph2h4gpk +XF0jYb/5e1dHTQTNifvqDgL6aOin2NPEDrA1+VRMo74+Dt5y3ns6mQINRv9t +sCLro1ogcSDGkQK2v5/kfKToo53Fzt1X1CgQE7Rwb9xYHzleJL4++8kIXrl7 +fd1spY9Fp9beCpKM4JAhycLNSx8P7Fyfvm/JEO78/Coxn6GPsfs5UrVv6QOt +bPV2YqY+clc/1aw7rg/th0VJ7Gf0UU6CWBXupQ/Lg1a24uf1cdq9xTFGXB8s +3tWm4hV9XOqUS3yWTYLJ0tPTWQ/1Uepow7RMmh6o+Bo+UerVR4cHgV+O5hDh +rLz18vE+fXTkEVQsiyLC/BdvvaEBfRT7PvCB1Y0Ij12zSq8O66PQ+UePhBWJ +YGf75ZLotD76mrdpf6/VgVijEyGcLAZIZts6t2VUG17xf5CbVjJALpfC3FY3 +LVB/N+JuudUA1fzOEQ23a0FO1vKlOyoG6OSLOi/UtMCdXXHzQU0DlE+KCIlc +1YQfq1HLAwYG2PEksVhzhyaIjEt2vLc0wOq1pyLzX9XB9/Gh1KpQA9wzQdzY +YqYKM4GT0TsiDDAz8vybQglViJEKONIVZYBK3oLd92ZV4FRCsN2feAPkFOoO +ySxUgXJylCwlzQC3PttzSXt+G6zWHG9oKjDA8cs+23rLt0LOg6vz7U0G2C8x +5hHuoAySnrLjB5oNcPvEpH2OtjL8t7n48/wrpp4jTc9HeZSBHvhfo0ibAT69 +YvRH46US9Kvey3btMUD2J4S3uhQl2HqboTY0ZYA23z/E92gqwpOiTp85YUNU +P9njdsNIHgat5DyjCIZYySI8ESktDyxLgS4r4oY4esV+OJxVHkz2sFtvkDVE +AVEp4txLOWhmJeuLqRiixl/D/klHOWj1vsZpTDNEU1cx1dsJstCr6F+WfdAQ +zY8sGp55IwUr72tuCx82RLu/Jvt1C6VAMpHtRsERQ3w4m3dX4YgU7Pt4+dLN +EEPMHT29uY9bCgZPvEumxxmiyveNSndsJWFsVNd+8AxzPVDO32NMHOZvr/3W +rDXECDbdt5fNCDDqaFZ0kmGImkJFQ85yBOhZf3rXcL0hHnTX8LVYFYV6L/H8 +i08NcX1eSF5rhSgcI+iR/742ROuqdoKZvCjwZfgntPQZYsxK9cUPXCKg5veR +xXcdGfk2yKfGswiBtLDkncfryegEr396fxUEvibvPQR2Mka/cbwc3SgIv6Rn +r7/hJmNCf9f9LScEoa6Ly1RHmIwNEurky5sEYZcZnljbQsZOwtn9NxQE4IBS +KWfBbjKSX0icLgzhg7gXHv7KtmTM4uUPPL2XD7J9Bd5U2JFRL11e9Z4BHzT8 +F5v1xomMipypBsGsfCCkvIv3734y9kw1d3Oo8EKz8oiQVxQZjd/96/PN4AGV +rTKyytfIuJ9+5ftAChfgq/bkiutkVJq3Ydm4lwscD6V9pd0ko4r1sZRoZS44 +fnu62OkOGV9WJnAatHJC39YGpZOVZKQ8PsuvIMEJZ7a5qE69JKPMx/ll42Z2 +mFM5T6qYZZ73BtezV9YboKcVdwj+ImPbCzbbcdUN8DRoxj5igYwXrblTqJwb +4EyFeShpmYz1XLSL6c/XgwqZ5V4dmxEm5dyn5lDXg7d5oFyTiBFuDDTegYZs +0Om3c1MnxQjfMtb1cjiwQj3ngrgeGOHNV1q8NgasUFxavO2isRHe57vB1ijB +CiE//po5mxmhy9taJfVhFuCJrkrpszFCSrOkMX8EC5ilyf3+5m2E0PhjpcJo +jUa/ufJ1IcMIt164eiBZZpVGMo34bZFphGyvxM0N51Zo1V+nNhWdNsL2DzSG +YdMKrUJ6QN8ixwgVcSSf99AK7V7e09NXC43wgYm31PrqZVpR1gnDnWVGONjf +P1XrtkQ7GcF7Lq/DCN8cnk+/8WmRxiGYUTL90QgDgjLwTOUiLe0hS4NJjxHO +CLGkVJ1epKXOzI1O9Rmhk89PwwqTRdrRQ50U41EjNJaV5jj8YIEW5p4/PvHH +CN0YQpGx5+dprtsV0EiaghWvhhvGjv+k/e3k2NwkS0GRONunK/t/0op8Zz5b +KFBQ/O9Avzn+pI2mMaJdt1IQt/BO5/ydo4W9tnkQq0NBJ4q1fFvcHO2UdYI0 +3YyC7U0tw3lJs7Q654+rusEUzDpQ6EHymqbtm6hraQilYPHXpnOntk3TWOKK +8rZHUJj/a7sdqL+maGaFR3T3xlJQbu6tREP6FK29nzUg/DgFJ06tPuap/k6b +9Nb4/PASBeuTn21JlJ2kSQSmMzSeUnASNj3MJ43Rzqwd1MtspODOjkLzbJ4x +2rocs4djzynoQmWtef1tlDZZs+FO0WsKHs/iOsSWO0qrY0nNE+igYNwX7uG0 +hRGaa25y9OIIBS0M02sjn3+j5dXH6j3mpuJ5lXzS7rNDtE3WLg/FN1MR3OYf +DwQO0ZIHDdSj+ah42HRQ/pbVEO3Qhj+KWsJULLgvqfCZa4imbxMlVCxNxRuN +03eaT36ldQ2F/TqhTcWjb29f9z43SBPmCni424mKLreuavw91U+7aZoYN+tC +RW+/JY3d1v00ncQzpufdqUj1ZWjzCPTTrGfLP/bspyKZ865yb0EfLa1rYelA +ABUTB+Qjch5+pv0pTjKJS6Fi+Le7ql0/P9F6jc53lJRSsfOC5izjSRftUOTN +y+ZlVOR85hV642wXbbGs2neqnIrj6aylo55dNAH5nt/aNVTcSZV9F83aRbPk +kJJ89JSKUtNGbZW7PtIaOkt8Oj5SEf0WP/GMddAsNtPVo3qo+KnEm9uyoYPW +s/P1IuEzFQMyus71nOugzdd9z/AYpOJK8tvDQ9QOmvp1rfsTk1R8IsctUJzf +TmvoNY7Kmqai7Vx+uV1oO81CyB40Z5nxYOV1tDFvpx1Mj/wQsUBFRUfSdZXl +D7T5p2kFon+o+PYgP3B0fKAdW750oG6ZirE/ZTs1732g8eneUdv3l4r7PT4O +FJ34QLsaWLewtsaM363TA66eH2j/Az8RDaI= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5751,172 +11629,186 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwVl3k4lG8Xx0llS3bGvqvsDIMxM+eglCVEdiGRkn1fQwlFJaksLVI/LUqy +zqCNUkkqhIRE1hCFspR33r+e63Pd1/Pc9/ec873PeeS8g+1817GwsLxnZWH5 +/3Nx4PVzxcybNNLilfOrDXtonVcJscY9x0C3yfdN3A4tQOF33oSeHNj3hOeu +/Q6EKNu73Ww9xUB588iGuMMW+GdEc5a6K+Dyv6rVH9u94EuDdfB8dyM4Wq01 +sW4PATPFyf657nbY87520hmTYalb/8Js9xA0+pjEvdDOhibTWzc/FP+ClU+W +V4WuFIHkF8aot9pf+FjaZVQlfBuEAjzvspuy4ZnsmsCGxjJQYb/RbOvEhlU8 +H3s4BsoAi0eH8o+w4ccMJ26zpTII6AmUUMtlw6L25Us5mg/g+faELNsRNnxm +X7ApvPABREjlB+Wnr8ddX78wFAzKoaOtXUe1dQPWQceDPxsfQo62Wb21Awf6 +SApzp2dWgOZnl53UQxx4JyHqrePFCmhNDexQjedANXuXbunrFbCxJ/c7x3UO +rH2mUHWppgLijw5LNE1xYIperK7a1wrweZOcoJ/KiVm1ytH9upVA8q2nylZy +YV5lvJNlVyV0bH73enMzF14zqxuRGqyEEPqQw98eLtQdf+YyPlEJd7m5gnr/ +ceFE8v5xn7+VIFPhfDXXghvdzU86rCpUAcfawj+OIW6c0mvQKA6ugk95Wk/n ++HjwuCf7HzpLNRR0lPJGKfFgfp9jJHBVg+vmLZ7LhjxYccxWuEGwGvqOS/1b +d4AHeR15Ki8pV8NgEBdFqJoHvXjHZHosq2F8+7dakstm7NvOdTc+txr+zF56 +EH+dFwtz8w7TpGuAoSq4tlbNi//eqnxOVa6BuINnrFNbeDH2vpPaM40aWP2c +Op31ixcTvsr4SUANJA/Thd/J82FEq7+go2cNpLb9Zz8YwYfkqBn24Ss1kHkz +6d06MX4ck43/bSdYCxa6hwWEFfjRJz6fpiNeCxzP7Ry2qPNjzmrzNXa5Wkgd +VvpsacyPob6f7udq1EKCfOto7mF+HDmkPKFvXgtBRYR/ynX8+KgmOLI4oRb2 +XH6oZukmgBWeV0Q29tUCn1ph8D5fAdz7sXf21tdaaKtPrQgOFsBtfhcHYIy5 +/2cng9zjAmhUnLiw52ctmIj/M+0vFcBNKhSxNXY66OZZuAWvCuDbhr6zidp0 +EM0dPnn+iiA+kp+24U2kA0G1OvVPiSDGPZOhbkuhg3hjWtK+ckFsH/HPJ5+g +g/TstsgtTYJ4oZ5ebHqaDkpWIV7144J4LdSE/8dlOhDX/yUNE4XQ6r0Z6V4d +c7/CNu1dVCE8yPPxBPUxHUg6RWr3zYRQXthzb/MzOpC9TOWjXYRwH21D+ONX +dDBuOMnDnSSE8+y/u3d10cEmQuSbTosQ6gfnu778QQdb7vGBSx1CqBkgp/Hh +Jx3sihmfVvuEsPQ8+UL7Ah0c37u/a/4hhP4+owoNK3TYp3ajzlVYGN19MwNU +2Blw5JvmuWNewsgeyrohUpIBAfGsWWOHhVHdXPbVH2kGBAl0pFmFC6Ni4Kx+ +hBwDwjAqQSRNGF0K0hXtlBkQe7nB726pMFJi6rzvajIgfa85rX1RGHefKuFq +QwaIV7WJr2MVwaIUZ90/JgwoE9z7W5tbBKWO9dUQdjCgq92j/JyMCJ76cew9 +xZwBinsi5PfsEsG05pKr/HsYQC9f+pdsJ4JT56S6Z+wYYMWX9LncXQSnj1kl +Nu5lQPi7k7l8oSLoZlQhtduZAY27r218ny+C3CzzKz88GOB4X3F47YYIblRz ++5HsxYDJTXefaJaJ4IjIm4Mc3gzgb62KOdsogn6iTtPLPgzwsmiZtP4ugsf2 +2ZYG+TNg/o7Ny6MLIrjegZ2/6ghTH+fHG2VrIug9EyMwG8DU8+qL+2YhUVR7 +/2beMpgBf80W2t5SRFE6X+zM+XAGZJfElf41E0WqyuGtZyKY+jayZKjvEcXn +IonRSZFMPS+4jE/7imLg5140i2bAoGK21KNgUfwjWfJMIoapL1V4eSpWFG8c +M1g/zuQCU9lKqzOieNVs5rNPHAM0bvx3NiFPFLlIDdHC8Uz961QD7hWL4tL+ +kqEGJjt6l+/quyeK/73cLOuWwICJZ3pKm2pF8UCIO3GWyQly9ayUZ6IYFLAi +k5DIAL4UHDjyhnneNveJf0w2QMtLb76IYs9vU9mJowxovfY+fGVCFIefPs+1 +TWLGa83BVnVeFCvH/v4qY/K8x2c1t3+iWEyJNV6fzIzXYy/OTA4C5oW/SLZl +srj06EidAAEbpaOqzzO5LPFI46QkAe/dURh+y2ST/tmr4lsI+NX+CM8ak7so +UfEW2gRkU/uhvyWFAf6XV5zijAgYweV40IzJf1eSde/uIKBoluVldyZnu23k +77UhoA9Pcv9hJivWZ05zuhLw+83b6kFMpovztxj6ENBaOin7/+tWcRdLDgcR +cGH+Gef/3x/8JHE8P4aALda6V3YwOdzwuufrYwSU/X3FWpnJFkWb5y2zCPii +7LggK5Pl2RMy2i4Q0PzfL9lO5nmXAick91wjoIg6T9w1Jr/vdHzYcZuAmcuz +cgeYfNvo+Q7HCgKKFzyXkGFyUrF2b089Ac8/KPfvYMbPkfNakNsLAnpZfuVP +ZrJGyCa2gTYCVoyeEFJi8obu2EtePQSs9fwQ2cjMRx91THX4KwEHF5YMnJmc +yd24d3yeqdesdS6AmT/vMM0J/38EfLr91/R3Zr7Jny4nTrOLIcvAnPMBJo+X +RJf8FBfDki+5GUbMennCM0KOVBTDB6vv7S8z6+tihN273+piWC8iVLgQy4Ad +Jup/VlEMx2LXlZ5j1qPknYKsJAvmepBnXCezfud5OeTW7RVD/3LlDl4mF/cP +mbP7ieHMxTiNEGa9x263HTgZIoYxB9r1LzD9YFv6KGxTnBhqP1fpqWD6ZS0m +r5D/tBhmb7r4vTuUAe5C1tMSlWJ4MJP/8etABhDj61OuNoihxgeBwUqm/7iG +torINYvhAHRVXWT6k/GADZQ/iaEK/+NUs8MMELFkZGutieEds1A5G6a/px8q +K1VyiGNPZBtljen/54Rchp4Ak88Fb7m9n5nv0aAhspI4Mt4sxHxj3h/vUxR1 +d1iKo2rYShi7CwNujZ979XKvODrOWAUddWLAUZs1dwsPcZw/LOk448AAdane +Ezah4uh3iH2ZzryvTtHPdrtcEkdlB5+VJUsGbP+xHBc0zGSbWk0NKjMeu3JV +nk2J49BMXgUYMf1wXb1XcFEc02wLii0MGUDY62XI4JDA1rDsHis9BkzRX/xm +05BAi/GudWzqDDh/LDsiP0YC2RczswwlGPDq8zbFqRQJbHoeWDhMYMCqblMH +LVMC/bMa7dJFGHBwbEHn2xUJ7KSNvK7nZ9aDlducRpME2k8d2P6J2Q+GhJWD +nvNIYt6lE00TzH4iGvxESlRUEsNMTytozdLB6pXz28OykqjKHno4ZJoONXGZ +arxESRRJ8a8ZGKPDqS+zky7OkphL+9wY1kcHnTv1fj+KJbFNmyKW8JwOKZQ9 ++8UNpJB0RfShZjYddnlc/alvIoWY774alEWHzcnfjztYSeGCyPiDWxl0uNx0 +oiTbSwoz+dp8NjD7L92i7vvGk1K401Q2PyyUDrPOClG/Pkmh+0/VVsIeOnhE +LpxqjZdGX3/FWgY3s5+W5VcdfSKDCbGtqonBtbC9u+3vzCsZVP3+r7zAvxas +Wdbv9GyXQZxqKqn0rYUDdkGfYEQGC4WFFrvdasEsXi4peYMsfvGwKJ7cWQsh +Mos3jFVlUdKIokyRqYXnftemm6JkkcfG5MKDlhoI+DOX/IpHDvt2L5p2CdfA +kirfgLqDPK5yt8WH7q8CSum9oosXFbBwMed6A3M+nROw8HJsVERp7wcF/o3l +8C3LyzGMXRnXKT0THrl8H8x/RJuPkLZgJL+l4jTXXZg6wBFelbQVSyuU2RZd +Spjzuei69MZtaNYXlHdmuRgE3iqfKf+hgt0G/tMDYsx5POOBLYmkhvMbvsSf +LiiAPFVDPkE/dQxckR+7vXYBWsSN9X6d08D8ydqh27w5QJZszNbs0sQXvSc6 +m99nwZCC4sBErybee1HW2FmbBSdV01RvftFEO4qC06+rWdBDtmgmTGjiX4aV +u3dgFkS7tK+wrmoiWdDMgJ07C1wtQ4mTfFo4GuOj4WeeCRczmPYlaSEhrYrV +qf0kbGYrjth/TAsVmzcpFgumw8alJ/ZzqVroli9xamI1Df7N9OukpGthTHB/ +pcloGvzoFZsrytLCmmPHtFUYafC+4lzg4EUtzHb/Mt3qmQY53ikHPUuZ/C5H +ybX8BIg0ejnv69RC6bM6Pc4eqSCdIkNxUdZGpcC3xlxTKVAWziHfv1Ube9aO +FXR9SgHawTn2/ara2GzSsb7iZQrss2zqOKSljY0e5tMXbqTAZWG/IzFkbczz +OqvM754CYnfLCi5Za6PI5QGWtnfJINRBXfoYpY3hC5yT1qlJwKnkXmP3UhvP +3QitE7oeD/5iYFH6WhtvRH83uX8iHlp45AfYWrVR6+O+QHf/eMhaHNtQ/V4b +N7SuC/9HjIfNr8IdRHu10Xsp9a3NqzgQOJI5/3lKG/ViHihLLsSC5MM6HV8B +HZzfY71xzSMGNKhiD6L36WBRVVYlf2gkVCocXlnnpYN8N/c58bhEggEXY+cZ +bx08dDqwScY4Eky6nQdv+ulgiGtxZQZ/JDiG5vG3h+qgl+NLrcOVEZD0n2iE +WpoONvUfz3ZcCYf3PCKGX8t0sK/+TEx4YRg4zPueCHjI5KRnatvSwqC3t/rD +70od/LOodv9XSBh8u+Xgv5mhg7m70zqbzcLgj/GFQqMmHRxv9OT2+RUKclFC +/y506yDP1u7LAbahEDYg0GTBQkTS72/nLcVC4FWz+6O764jYxXO9sYE9BKQf +lNRybSDifMa7joSpYGhJIt9r4STiMOn58EhJMMjLeV+wECTi5d0uGiAVDB8O +PPSzUCZi5FRg+hJvEGhN2GyysCKiOFZtGt8UAGkf8jfetSaicvD82brpI9DH +GGbh2kPEoM2hgqVtRyDjVPTCawciBpzJfzKSfQQGVa8NmHsSMXGcqPFE5Ahk +B82Um4cRMTPLKWdmiz/8+JXlYJ5HxDWdMpYbnoegr+e645UCIjrvnunO3X4I +Wh7VOM1dJmIRy9Huom2H4Gb6oEv+dSJqjhL/bZz3A1cJXY+Ju0Tsx6oKzlN+ +8MLk88GTj4hYu0FGurvuIBSe2xbzeoiIpWFXSOyavpARRYuVGmHy7N4joqK+ +EOVmHxc6RsR9paG2sOYDtkqJCWJTRPxSHfvl4zsf2Mh4n3x4gYh79WxWJcJ8 +IHQw+iQnhy4OC4aXrdQdgJ2azQXm6rqoxF49l7bPG5w37tr7XlMXn7DEfr1i +5g3+/a95nHR08R9dZuWtpjecyXyb7KOvi12wahu7zhu6xjoPJhnrImWLw6bl +2/vBp2hYp9qB+b2OV+LZy15wjJ/1jexRXZQTazox7uEJuePHUm8l66JUZ3s5 +l74nlDxZT9M4rou6laWVLrye0BLI8dAoQxcNSefyEp96AH8L7yXHHF0sAKJV +j6IHFB2TPpBVootHB+5KVy+4w+NfRiu/23RxRHDMdLbGFa631nrbf9BF4d2J +efcvukLqf8SWsg5dZFNoO386yhXMnVTzfXt08Sb/dtZqkit01onrd3zVxaXH +p6yv0l1gMmUprGxeF8tVX5Y9aXQGEb7aSR9xPZTUeX798A9HWBrXsXsqqYdm +pfGF2OEIfc/KGBIyemg+4RRDqnWE6+ElGe0Kenhx2fvQ0SRHUOu+oIzqeviS +w58lgd8RTK5GeEugHlbLOe0UNnKAIDWd3g++erjjdxjLvxv2EPlbfNnzkB6O +qVl9CzhpDwmNbOIz/npo99J1/WqQPWQ6f3ThCtFD/e2y4XFke7idGvPJJE4P +X3h4+s2328FQ3+OeyjN6GJl9c+gJpx04nrbsvlCrh2dNTlp1nraFfc66vxXq +9LDLOewld7Qt+ChIiVY06OH3FPEUTy9bCGfMOLY908Mtbo36bkRbyB4517Wx +VQ/H6wI6sNoGWqg9H6MH9VAtKLz3rLs1UGd8Ol04Sdiysvwzpd0SROp3Fjdw +k1DmbO2KXJklzKSrhMhsJqH+94AN0yct4arcLPeIAAmzNs/6s5lYwr+98aYh +kiRkzGWVq1VZwJP6cxVpmiRcjTPRsCwyB+OTj7MrHUh4ttHtxNmLO0Hc8bqH +iDMJZ87uuE+J3gk/5VPVYl1J6KVw7Tyv804objB/RfMk4dKZiFUl8Z2wbrZz +7fUhEk5yDH7nKzKDJsfvQYPxJKysChR/VLEDdigSdvMUkzA7k27v89MUqqZf +yPncJGG7HdV+Q48pKNaGL9aVkPBE0S/e5kemsN7i3bVDpSR8cyCOXHLSFBqD +0342VZGwanztXr+8KdDq5y/FvSRhxPW3mpvcTIBk92FobIqELnUKrWlfEUok +kmppP0j4zqYqeLAFQXhELevCHAn/+Fp1OFQhzEdn6JkukrBtluZ9Ph2h4gpk +XF0jYb/5e1dHTQTNifvqDgL6aOin2NPEDrA1+VRMo74+Dt5y3ns6mQINRv9t +sCLro1ogcSDGkQK2v5/kfKToo53Fzt1X1CgQE7Rwb9xYHzleJL4++8kIXrl7 +fd1spY9Fp9beCpKM4JAhycLNSx8P7Fyfvm/JEO78/Coxn6GPsfs5UrVv6QOt +bPV2YqY+clc/1aw7rg/th0VJ7Gf0UU6CWBXupQ/Lg1a24uf1cdq9xTFGXB8s +3tWm4hV9XOqUS3yWTYLJ0tPTWQ/1Uepow7RMmh6o+Bo+UerVR4cHgV+O5hDh +rLz18vE+fXTkEVQsiyLC/BdvvaEBfRT7PvCB1Y0Ij12zSq8O66PQ+UePhBWJ +YGf75ZLotD76mrdpf6/VgVijEyGcLAZIZts6t2VUG17xf5CbVjJALpfC3FY3 +LVB/N+JuudUA1fzOEQ23a0FO1vKlOyoG6OSLOi/UtMCdXXHzQU0DlE+KCIlc +1YQfq1HLAwYG2PEksVhzhyaIjEt2vLc0wOq1pyLzX9XB9/Gh1KpQA9wzQdzY +YqYKM4GT0TsiDDAz8vybQglViJEKONIVZYBK3oLd92ZV4FRCsN2feAPkFOoO +ySxUgXJylCwlzQC3PttzSXt+G6zWHG9oKjDA8cs+23rLt0LOg6vz7U0G2C8x +5hHuoAySnrLjB5oNcPvEpH2OtjL8t7n48/wrpp4jTc9HeZSBHvhfo0ibAT69 +YvRH46US9Kvey3btMUD2J4S3uhQl2HqboTY0ZYA23z/E92gqwpOiTp85YUNU +P9njdsNIHgat5DyjCIZYySI8ESktDyxLgS4r4oY4esV+OJxVHkz2sFtvkDVE +AVEp4txLOWhmJeuLqRiixl/D/klHOWj1vsZpTDNEU1cx1dsJstCr6F+WfdAQ +zY8sGp55IwUr72tuCx82RLu/Jvt1C6VAMpHtRsERQ3w4m3dX4YgU7Pt4+dLN +EEPMHT29uY9bCgZPvEumxxmiyveNSndsJWFsVNd+8AxzPVDO32NMHOZvr/3W +rDXECDbdt5fNCDDqaFZ0kmGImkJFQ85yBOhZf3rXcL0hHnTX8LVYFYV6L/H8 +i08NcX1eSF5rhSgcI+iR/742ROuqdoKZvCjwZfgntPQZYsxK9cUPXCKg5veR +xXcdGfk2yKfGswiBtLDkncfryegEr396fxUEvibvPQR2Mka/cbwc3SgIv6Rn +r7/hJmNCf9f9LScEoa6Ly1RHmIwNEurky5sEYZcZnljbQsZOwtn9NxQE4IBS +KWfBbjKSX0icLgzhg7gXHv7KtmTM4uUPPL2XD7J9Bd5U2JFRL11e9Z4BHzT8 +F5v1xomMipypBsGsfCCkvIv3734y9kw1d3Oo8EKz8oiQVxQZjd/96/PN4AGV +rTKyytfIuJ9+5ftAChfgq/bkiutkVJq3Ydm4lwscD6V9pd0ko4r1sZRoZS44 +fnu62OkOGV9WJnAatHJC39YGpZOVZKQ8PsuvIMEJZ7a5qE69JKPMx/ll42Z2 +mFM5T6qYZZ73BtezV9YboKcVdwj+ImPbCzbbcdUN8DRoxj5igYwXrblTqJwb +4EyFeShpmYz1XLSL6c/XgwqZ5V4dmxEm5dyn5lDXg7d5oFyTiBFuDDTegYZs +0Om3c1MnxQjfMtb1cjiwQj3ngrgeGOHNV1q8NgasUFxavO2isRHe57vB1ijB +CiE//po5mxmhy9taJfVhFuCJrkrpszFCSrOkMX8EC5ilyf3+5m2E0PhjpcJo +jUa/ufJ1IcMIt164eiBZZpVGMo34bZFphGyvxM0N51Zo1V+nNhWdNsL2DzSG +YdMKrUJ6QN8ixwgVcSSf99AK7V7e09NXC43wgYm31PrqZVpR1gnDnWVGONjf +P1XrtkQ7GcF7Lq/DCN8cnk+/8WmRxiGYUTL90QgDgjLwTOUiLe0hS4NJjxHO +CLGkVJ1epKXOzI1O9Rmhk89PwwqTRdrRQ50U41EjNJaV5jj8YIEW5p4/PvHH +CN0YQpGx5+dprtsV0EiaghWvhhvGjv+k/e3k2NwkS0GRONunK/t/0op8Zz5b +KFBQ/O9Avzn+pI2mMaJdt1IQt/BO5/ydo4W9tnkQq0NBJ4q1fFvcHO2UdYI0 +3YyC7U0tw3lJs7Q654+rusEUzDpQ6EHymqbtm6hraQilYPHXpnOntk3TWOKK +8rZHUJj/a7sdqL+maGaFR3T3xlJQbu6tREP6FK29nzUg/DgFJ06tPuap/k6b +9Nb4/PASBeuTn21JlJ2kSQSmMzSeUnASNj3MJ43Rzqwd1MtspODOjkLzbJ4x +2rocs4djzynoQmWtef1tlDZZs+FO0WsKHs/iOsSWO0qrY0nNE+igYNwX7uG0 +hRGaa25y9OIIBS0M02sjn3+j5dXH6j3mpuJ5lXzS7rNDtE3WLg/FN1MR3OYf +DwQO0ZIHDdSj+ah42HRQ/pbVEO3Qhj+KWsJULLgvqfCZa4imbxMlVCxNxRuN +03eaT36ldQ2F/TqhTcWjb29f9z43SBPmCni424mKLreuavw91U+7aZoYN+tC +RW+/JY3d1v00ncQzpufdqUj1ZWjzCPTTrGfLP/bspyKZ865yb0EfLa1rYelA +ABUTB+Qjch5+pv0pTjKJS6Fi+Le7ql0/P9F6jc53lJRSsfOC5izjSRftUOTN +y+ZlVOR85hV642wXbbGs2neqnIrj6aylo55dNAH5nt/aNVTcSZV9F83aRbPk +kJJ89JSKUtNGbZW7PtIaOkt8Oj5SEf0WP/GMddAsNtPVo3qo+KnEm9uyoYPW +s/P1IuEzFQMyus71nOugzdd9z/AYpOJK8tvDQ9QOmvp1rfsTk1R8IsctUJzf +TmvoNY7Kmqai7Vx+uV1oO81CyB40Z5nxYOV1tDFvpx1Mj/wQsUBFRUfSdZXl +D7T5p2kFon+o+PYgP3B0fKAdW750oG6ZirE/ZTs1732g8eneUdv3l4r7PT4O +FJ34QLsaWLewtsaM363TA66eH2j/Az8RDaI= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.09963120093074777}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5928,19 +11820,19 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.09963120093074777}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5954,171 +11846,185 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwVl3k4lG8Xx0llS3bGvqvsDIMxM+eglCVEdiGRkn1fQwlFJaksLVI/LUqy +zqCNUkkqhIRE1hCFspR33r+e63Pd1/Pc9/ec873PeeS8g+1817GwsLxnZWH5 +/3Nx4PVzxcybNNLilfOrDXtonVcJscY9x0C3yfdN3A4tQOF33oSeHNj3hOeu +/Q6EKNu73Ww9xUB588iGuMMW+GdEc5a6K+Dyv6rVH9u94EuDdfB8dyM4Wq01 +sW4PATPFyf657nbY87520hmTYalb/8Js9xA0+pjEvdDOhibTWzc/FP+ClU+W +V4WuFIHkF8aot9pf+FjaZVQlfBuEAjzvspuy4ZnsmsCGxjJQYb/RbOvEhlU8 +H3s4BsoAi0eH8o+w4ccMJ26zpTII6AmUUMtlw6L25Us5mg/g+faELNsRNnxm +X7ApvPABREjlB+Wnr8ddX78wFAzKoaOtXUe1dQPWQceDPxsfQo62Wb21Awf6 +SApzp2dWgOZnl53UQxx4JyHqrePFCmhNDexQjedANXuXbunrFbCxJ/c7x3UO +rH2mUHWppgLijw5LNE1xYIperK7a1wrweZOcoJ/KiVm1ytH9upVA8q2nylZy +YV5lvJNlVyV0bH73enMzF14zqxuRGqyEEPqQw98eLtQdf+YyPlEJd7m5gnr/ +ceFE8v5xn7+VIFPhfDXXghvdzU86rCpUAcfawj+OIW6c0mvQKA6ugk95Wk/n ++HjwuCf7HzpLNRR0lPJGKfFgfp9jJHBVg+vmLZ7LhjxYccxWuEGwGvqOS/1b +d4AHeR15Ki8pV8NgEBdFqJoHvXjHZHosq2F8+7dakstm7NvOdTc+txr+zF56 +EH+dFwtz8w7TpGuAoSq4tlbNi//eqnxOVa6BuINnrFNbeDH2vpPaM40aWP2c +Op31ixcTvsr4SUANJA/Thd/J82FEq7+go2cNpLb9Zz8YwYfkqBn24Ss1kHkz +6d06MX4ck43/bSdYCxa6hwWEFfjRJz6fpiNeCxzP7Ry2qPNjzmrzNXa5Wkgd +VvpsacyPob6f7udq1EKCfOto7mF+HDmkPKFvXgtBRYR/ynX8+KgmOLI4oRb2 +XH6oZukmgBWeV0Q29tUCn1ph8D5fAdz7sXf21tdaaKtPrQgOFsBtfhcHYIy5 +/2cng9zjAmhUnLiw52ctmIj/M+0vFcBNKhSxNXY66OZZuAWvCuDbhr6zidp0 +EM0dPnn+iiA+kp+24U2kA0G1OvVPiSDGPZOhbkuhg3hjWtK+ckFsH/HPJ5+g +g/TstsgtTYJ4oZ5ebHqaDkpWIV7144J4LdSE/8dlOhDX/yUNE4XQ6r0Z6V4d +c7/CNu1dVCE8yPPxBPUxHUg6RWr3zYRQXthzb/MzOpC9TOWjXYRwH21D+ONX +dDBuOMnDnSSE8+y/u3d10cEmQuSbTosQ6gfnu778QQdb7vGBSx1CqBkgp/Hh +Jx3sihmfVvuEsPQ8+UL7Ah0c37u/a/4hhP4+owoNK3TYp3ajzlVYGN19MwNU +2Blw5JvmuWNewsgeyrohUpIBAfGsWWOHhVHdXPbVH2kGBAl0pFmFC6Ni4Kx+ +hBwDwjAqQSRNGF0K0hXtlBkQe7nB726pMFJi6rzvajIgfa85rX1RGHefKuFq +QwaIV7WJr2MVwaIUZ90/JgwoE9z7W5tbBKWO9dUQdjCgq92j/JyMCJ76cew9 +xZwBinsi5PfsEsG05pKr/HsYQC9f+pdsJ4JT56S6Z+wYYMWX9LncXQSnj1kl +Nu5lQPi7k7l8oSLoZlQhtduZAY27r218ny+C3CzzKz88GOB4X3F47YYIblRz ++5HsxYDJTXefaJaJ4IjIm4Mc3gzgb62KOdsogn6iTtPLPgzwsmiZtP4ugsf2 +2ZYG+TNg/o7Ny6MLIrjegZ2/6ghTH+fHG2VrIug9EyMwG8DU8+qL+2YhUVR7 +/2beMpgBf80W2t5SRFE6X+zM+XAGZJfElf41E0WqyuGtZyKY+jayZKjvEcXn +IonRSZFMPS+4jE/7imLg5140i2bAoGK21KNgUfwjWfJMIoapL1V4eSpWFG8c +M1g/zuQCU9lKqzOieNVs5rNPHAM0bvx3NiFPFLlIDdHC8Uz961QD7hWL4tL+ +kqEGJjt6l+/quyeK/73cLOuWwICJZ3pKm2pF8UCIO3GWyQly9ayUZ6IYFLAi +k5DIAL4UHDjyhnneNveJf0w2QMtLb76IYs9vU9mJowxovfY+fGVCFIefPs+1 +TWLGa83BVnVeFCvH/v4qY/K8x2c1t3+iWEyJNV6fzIzXYy/OTA4C5oW/SLZl +srj06EidAAEbpaOqzzO5LPFI46QkAe/dURh+y2ST/tmr4lsI+NX+CM8ak7so +UfEW2gRkU/uhvyWFAf6XV5zijAgYweV40IzJf1eSde/uIKBoluVldyZnu23k +77UhoA9Pcv9hJivWZ05zuhLw+83b6kFMpovztxj6ENBaOin7/+tWcRdLDgcR +cGH+Gef/3x/8JHE8P4aALda6V3YwOdzwuufrYwSU/X3FWpnJFkWb5y2zCPii +7LggK5Pl2RMy2i4Q0PzfL9lO5nmXAick91wjoIg6T9w1Jr/vdHzYcZuAmcuz +cgeYfNvo+Q7HCgKKFzyXkGFyUrF2b089Ac8/KPfvYMbPkfNakNsLAnpZfuVP +ZrJGyCa2gTYCVoyeEFJi8obu2EtePQSs9fwQ2cjMRx91THX4KwEHF5YMnJmc +yd24d3yeqdesdS6AmT/vMM0J/38EfLr91/R3Zr7Jny4nTrOLIcvAnPMBJo+X +RJf8FBfDki+5GUbMennCM0KOVBTDB6vv7S8z6+tihN273+piWC8iVLgQy4Ad +Jup/VlEMx2LXlZ5j1qPknYKsJAvmepBnXCezfud5OeTW7RVD/3LlDl4mF/cP +mbP7ieHMxTiNEGa9x263HTgZIoYxB9r1LzD9YFv6KGxTnBhqP1fpqWD6ZS0m +r5D/tBhmb7r4vTuUAe5C1tMSlWJ4MJP/8etABhDj61OuNoihxgeBwUqm/7iG +torINYvhAHRVXWT6k/GADZQ/iaEK/+NUs8MMELFkZGutieEds1A5G6a/px8q +K1VyiGNPZBtljen/54Rchp4Ak88Fb7m9n5nv0aAhspI4Mt4sxHxj3h/vUxR1 +d1iKo2rYShi7CwNujZ979XKvODrOWAUddWLAUZs1dwsPcZw/LOk448AAdane +Ezah4uh3iH2ZzryvTtHPdrtcEkdlB5+VJUsGbP+xHBc0zGSbWk0NKjMeu3JV +nk2J49BMXgUYMf1wXb1XcFEc02wLii0MGUDY62XI4JDA1rDsHis9BkzRX/xm +05BAi/GudWzqDDh/LDsiP0YC2RczswwlGPDq8zbFqRQJbHoeWDhMYMCqblMH +LVMC/bMa7dJFGHBwbEHn2xUJ7KSNvK7nZ9aDlducRpME2k8d2P6J2Q+GhJWD +nvNIYt6lE00TzH4iGvxESlRUEsNMTytozdLB6pXz28OykqjKHno4ZJoONXGZ +arxESRRJ8a8ZGKPDqS+zky7OkphL+9wY1kcHnTv1fj+KJbFNmyKW8JwOKZQ9 ++8UNpJB0RfShZjYddnlc/alvIoWY774alEWHzcnfjztYSeGCyPiDWxl0uNx0 +oiTbSwoz+dp8NjD7L92i7vvGk1K401Q2PyyUDrPOClG/Pkmh+0/VVsIeOnhE +LpxqjZdGX3/FWgY3s5+W5VcdfSKDCbGtqonBtbC9u+3vzCsZVP3+r7zAvxas +Wdbv9GyXQZxqKqn0rYUDdkGfYEQGC4WFFrvdasEsXi4peYMsfvGwKJ7cWQsh +Mos3jFVlUdKIokyRqYXnftemm6JkkcfG5MKDlhoI+DOX/IpHDvt2L5p2CdfA +kirfgLqDPK5yt8WH7q8CSum9oosXFbBwMed6A3M+nROw8HJsVERp7wcF/o3l +8C3LyzGMXRnXKT0THrl8H8x/RJuPkLZgJL+l4jTXXZg6wBFelbQVSyuU2RZd +Spjzuei69MZtaNYXlHdmuRgE3iqfKf+hgt0G/tMDYsx5POOBLYmkhvMbvsSf +LiiAPFVDPkE/dQxckR+7vXYBWsSN9X6d08D8ydqh27w5QJZszNbs0sQXvSc6 +m99nwZCC4sBErybee1HW2FmbBSdV01RvftFEO4qC06+rWdBDtmgmTGjiX4aV +u3dgFkS7tK+wrmoiWdDMgJ07C1wtQ4mTfFo4GuOj4WeeCRczmPYlaSEhrYrV +qf0kbGYrjth/TAsVmzcpFgumw8alJ/ZzqVroli9xamI1Df7N9OukpGthTHB/ +pcloGvzoFZsrytLCmmPHtFUYafC+4lzg4EUtzHb/Mt3qmQY53ikHPUuZ/C5H +ybX8BIg0ejnv69RC6bM6Pc4eqSCdIkNxUdZGpcC3xlxTKVAWziHfv1Ube9aO +FXR9SgHawTn2/ara2GzSsb7iZQrss2zqOKSljY0e5tMXbqTAZWG/IzFkbczz +OqvM754CYnfLCi5Za6PI5QGWtnfJINRBXfoYpY3hC5yT1qlJwKnkXmP3UhvP +3QitE7oeD/5iYFH6WhtvRH83uX8iHlp45AfYWrVR6+O+QHf/eMhaHNtQ/V4b +N7SuC/9HjIfNr8IdRHu10Xsp9a3NqzgQOJI5/3lKG/ViHihLLsSC5MM6HV8B +HZzfY71xzSMGNKhiD6L36WBRVVYlf2gkVCocXlnnpYN8N/c58bhEggEXY+cZ +bx08dDqwScY4Eky6nQdv+ulgiGtxZQZ/JDiG5vG3h+qgl+NLrcOVEZD0n2iE +WpoONvUfz3ZcCYf3PCKGX8t0sK/+TEx4YRg4zPueCHjI5KRnatvSwqC3t/rD +70od/LOodv9XSBh8u+Xgv5mhg7m70zqbzcLgj/GFQqMmHRxv9OT2+RUKclFC +/y506yDP1u7LAbahEDYg0GTBQkTS72/nLcVC4FWz+6O764jYxXO9sYE9BKQf +lNRybSDifMa7joSpYGhJIt9r4STiMOn58EhJMMjLeV+wECTi5d0uGiAVDB8O +PPSzUCZi5FRg+hJvEGhN2GyysCKiOFZtGt8UAGkf8jfetSaicvD82brpI9DH +GGbh2kPEoM2hgqVtRyDjVPTCawciBpzJfzKSfQQGVa8NmHsSMXGcqPFE5Ahk +B82Um4cRMTPLKWdmiz/8+JXlYJ5HxDWdMpYbnoegr+e645UCIjrvnunO3X4I +Wh7VOM1dJmIRy9Huom2H4Gb6oEv+dSJqjhL/bZz3A1cJXY+Ju0Tsx6oKzlN+ +8MLk88GTj4hYu0FGurvuIBSe2xbzeoiIpWFXSOyavpARRYuVGmHy7N4joqK+ +EOVmHxc6RsR9paG2sOYDtkqJCWJTRPxSHfvl4zsf2Mh4n3x4gYh79WxWJcJ8 +IHQw+iQnhy4OC4aXrdQdgJ2azQXm6rqoxF49l7bPG5w37tr7XlMXn7DEfr1i +5g3+/a95nHR08R9dZuWtpjecyXyb7KOvi12wahu7zhu6xjoPJhnrImWLw6bl +2/vBp2hYp9qB+b2OV+LZy15wjJ/1jexRXZQTazox7uEJuePHUm8l66JUZ3s5 +l74nlDxZT9M4rou6laWVLrye0BLI8dAoQxcNSefyEp96AH8L7yXHHF0sAKJV +j6IHFB2TPpBVootHB+5KVy+4w+NfRiu/23RxRHDMdLbGFa631nrbf9BF4d2J +efcvukLqf8SWsg5dZFNoO386yhXMnVTzfXt08Sb/dtZqkit01onrd3zVxaXH +p6yv0l1gMmUprGxeF8tVX5Y9aXQGEb7aSR9xPZTUeX798A9HWBrXsXsqqYdm +pfGF2OEIfc/KGBIyemg+4RRDqnWE6+ElGe0Kenhx2fvQ0SRHUOu+oIzqeviS +w58lgd8RTK5GeEugHlbLOe0UNnKAIDWd3g++erjjdxjLvxv2EPlbfNnzkB6O +qVl9CzhpDwmNbOIz/npo99J1/WqQPWQ6f3ThCtFD/e2y4XFke7idGvPJJE4P +X3h4+s2328FQ3+OeyjN6GJl9c+gJpx04nrbsvlCrh2dNTlp1nraFfc66vxXq +9LDLOewld7Qt+ChIiVY06OH3FPEUTy9bCGfMOLY908Mtbo36bkRbyB4517Wx +VQ/H6wI6sNoGWqg9H6MH9VAtKLz3rLs1UGd8Ol04Sdiysvwzpd0SROp3Fjdw +k1DmbO2KXJklzKSrhMhsJqH+94AN0yct4arcLPeIAAmzNs/6s5lYwr+98aYh +kiRkzGWVq1VZwJP6cxVpmiRcjTPRsCwyB+OTj7MrHUh4ttHtxNmLO0Hc8bqH +iDMJZ87uuE+J3gk/5VPVYl1J6KVw7Tyv804objB/RfMk4dKZiFUl8Z2wbrZz +7fUhEk5yDH7nKzKDJsfvQYPxJKysChR/VLEDdigSdvMUkzA7k27v89MUqqZf +yPncJGG7HdV+Q48pKNaGL9aVkPBE0S/e5kemsN7i3bVDpSR8cyCOXHLSFBqD +0342VZGwanztXr+8KdDq5y/FvSRhxPW3mpvcTIBk92FobIqELnUKrWlfEUok +kmppP0j4zqYqeLAFQXhELevCHAn/+Fp1OFQhzEdn6JkukrBtluZ9Ph2h4gpk +XF0jYb/5e1dHTQTNifvqDgL6aOin2NPEDrA1+VRMo74+Dt5y3ns6mQINRv9t +sCLro1ogcSDGkQK2v5/kfKToo53Fzt1X1CgQE7Rwb9xYHzleJL4++8kIXrl7 +fd1spY9Fp9beCpKM4JAhycLNSx8P7Fyfvm/JEO78/Coxn6GPsfs5UrVv6QOt +bPV2YqY+clc/1aw7rg/th0VJ7Gf0UU6CWBXupQ/Lg1a24uf1cdq9xTFGXB8s +3tWm4hV9XOqUS3yWTYLJ0tPTWQ/1Uepow7RMmh6o+Bo+UerVR4cHgV+O5hDh +rLz18vE+fXTkEVQsiyLC/BdvvaEBfRT7PvCB1Y0Ij12zSq8O66PQ+UePhBWJ +YGf75ZLotD76mrdpf6/VgVijEyGcLAZIZts6t2VUG17xf5CbVjJALpfC3FY3 +LVB/N+JuudUA1fzOEQ23a0FO1vKlOyoG6OSLOi/UtMCdXXHzQU0DlE+KCIlc +1YQfq1HLAwYG2PEksVhzhyaIjEt2vLc0wOq1pyLzX9XB9/Gh1KpQA9wzQdzY +YqYKM4GT0TsiDDAz8vybQglViJEKONIVZYBK3oLd92ZV4FRCsN2feAPkFOoO +ySxUgXJylCwlzQC3PttzSXt+G6zWHG9oKjDA8cs+23rLt0LOg6vz7U0G2C8x +5hHuoAySnrLjB5oNcPvEpH2OtjL8t7n48/wrpp4jTc9HeZSBHvhfo0ibAT69 +YvRH46US9Kvey3btMUD2J4S3uhQl2HqboTY0ZYA23z/E92gqwpOiTp85YUNU +P9njdsNIHgat5DyjCIZYySI8ESktDyxLgS4r4oY4esV+OJxVHkz2sFtvkDVE +AVEp4txLOWhmJeuLqRiixl/D/klHOWj1vsZpTDNEU1cx1dsJstCr6F+WfdAQ +zY8sGp55IwUr72tuCx82RLu/Jvt1C6VAMpHtRsERQ3w4m3dX4YgU7Pt4+dLN +EEPMHT29uY9bCgZPvEumxxmiyveNSndsJWFsVNd+8AxzPVDO32NMHOZvr/3W +rDXECDbdt5fNCDDqaFZ0kmGImkJFQ85yBOhZf3rXcL0hHnTX8LVYFYV6L/H8 +i08NcX1eSF5rhSgcI+iR/742ROuqdoKZvCjwZfgntPQZYsxK9cUPXCKg5veR +xXcdGfk2yKfGswiBtLDkncfryegEr396fxUEvibvPQR2Mka/cbwc3SgIv6Rn +r7/hJmNCf9f9LScEoa6Ly1RHmIwNEurky5sEYZcZnljbQsZOwtn9NxQE4IBS +KWfBbjKSX0icLgzhg7gXHv7KtmTM4uUPPL2XD7J9Bd5U2JFRL11e9Z4BHzT8 +F5v1xomMipypBsGsfCCkvIv3734y9kw1d3Oo8EKz8oiQVxQZjd/96/PN4AGV +rTKyytfIuJ9+5ftAChfgq/bkiutkVJq3Ydm4lwscD6V9pd0ko4r1sZRoZS44 +fnu62OkOGV9WJnAatHJC39YGpZOVZKQ8PsuvIMEJZ7a5qE69JKPMx/ll42Z2 +mFM5T6qYZZ73BtezV9YboKcVdwj+ImPbCzbbcdUN8DRoxj5igYwXrblTqJwb +4EyFeShpmYz1XLSL6c/XgwqZ5V4dmxEm5dyn5lDXg7d5oFyTiBFuDDTegYZs +0Om3c1MnxQjfMtb1cjiwQj3ngrgeGOHNV1q8NgasUFxavO2isRHe57vB1ijB +CiE//po5mxmhy9taJfVhFuCJrkrpszFCSrOkMX8EC5ilyf3+5m2E0PhjpcJo +jUa/ufJ1IcMIt164eiBZZpVGMo34bZFphGyvxM0N51Zo1V+nNhWdNsL2DzSG +YdMKrUJ6QN8ixwgVcSSf99AK7V7e09NXC43wgYm31PrqZVpR1gnDnWVGONjf +P1XrtkQ7GcF7Lq/DCN8cnk+/8WmRxiGYUTL90QgDgjLwTOUiLe0hS4NJjxHO +CLGkVJ1epKXOzI1O9Rmhk89PwwqTRdrRQ50U41EjNJaV5jj8YIEW5p4/PvHH +CN0YQpGx5+dprtsV0EiaghWvhhvGjv+k/e3k2NwkS0GRONunK/t/0op8Zz5b +KFBQ/O9Avzn+pI2mMaJdt1IQt/BO5/ydo4W9tnkQq0NBJ4q1fFvcHO2UdYI0 +3YyC7U0tw3lJs7Q654+rusEUzDpQ6EHymqbtm6hraQilYPHXpnOntk3TWOKK +8rZHUJj/a7sdqL+maGaFR3T3xlJQbu6tREP6FK29nzUg/DgFJ06tPuap/k6b +9Nb4/PASBeuTn21JlJ2kSQSmMzSeUnASNj3MJ43Rzqwd1MtspODOjkLzbJ4x +2rocs4djzynoQmWtef1tlDZZs+FO0WsKHs/iOsSWO0qrY0nNE+igYNwX7uG0 +hRGaa25y9OIIBS0M02sjn3+j5dXH6j3mpuJ5lXzS7rNDtE3WLg/FN1MR3OYf +DwQO0ZIHDdSj+ah42HRQ/pbVEO3Qhj+KWsJULLgvqfCZa4imbxMlVCxNxRuN +03eaT36ldQ2F/TqhTcWjb29f9z43SBPmCni424mKLreuavw91U+7aZoYN+tC +RW+/JY3d1v00ncQzpufdqUj1ZWjzCPTTrGfLP/bspyKZ865yb0EfLa1rYelA +ABUTB+Qjch5+pv0pTjKJS6Fi+Le7ql0/P9F6jc53lJRSsfOC5izjSRftUOTN +y+ZlVOR85hV642wXbbGs2neqnIrj6aylo55dNAH5nt/aNVTcSZV9F83aRbPk +kJJ89JSKUtNGbZW7PtIaOkt8Oj5SEf0WP/GMddAsNtPVo3qo+KnEm9uyoYPW +s/P1IuEzFQMyus71nOugzdd9z/AYpOJK8tvDQ9QOmvp1rfsTk1R8IsctUJzf +TmvoNY7Kmqai7Vx+uV1oO81CyB40Z5nxYOV1tDFvpx1Mj/wQsUBFRUfSdZXl +D7T5p2kFon+o+PYgP3B0fKAdW750oG6ZirE/ZTs1732g8eneUdv3l4r7PT4O +FJ34QLsaWLewtsaM363TA66eH2j/Az8RDaI= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.09963120093074777}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6129,6 +12035,7 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6156,7 +12063,8 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1813924222088017}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09963120093074777}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6164,17 +12072,778 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913306567510605`*^9}, + CellChangeTimes->{3.9913306567510605`*^9, 3.9938317911828136`*^9}, CellLabel-> - "Out[195]=",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] + "Out[119]=",ExpressionUUID->"7b7bbb14-3b65-4159-a7f5-17ce7a2239da"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-\ -6bd251746ea6"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k4lG8Xx0llS3bGvqvsDIMxM+eglCVEdiGRkn1fQwlFJaksLVI/LUqy +zqCNUkkqhIRE1hCFspR33r+e63Pd1/Pc9/ec873PeeS8g+1817GwsLxnZWH5 +/3Nx4PVzxcybNNLilfOrDXtonVcJscY9x0C3yfdN3A4tQOF33oSeHNj3hOeu +/Q6EKNu73Ww9xUB588iGuMMW+GdEc5a6K+Dyv6rVH9u94EuDdfB8dyM4Wq01 +sW4PATPFyf657nbY87520hmTYalb/8Js9xA0+pjEvdDOhibTWzc/FP+ClU+W +V4WuFIHkF8aot9pf+FjaZVQlfBuEAjzvspuy4ZnsmsCGxjJQYb/RbOvEhlU8 +H3s4BsoAi0eH8o+w4ccMJ26zpTII6AmUUMtlw6L25Us5mg/g+faELNsRNnxm +X7ApvPABREjlB+Wnr8ddX78wFAzKoaOtXUe1dQPWQceDPxsfQo62Wb21Awf6 +SApzp2dWgOZnl53UQxx4JyHqrePFCmhNDexQjedANXuXbunrFbCxJ/c7x3UO +rH2mUHWppgLijw5LNE1xYIperK7a1wrweZOcoJ/KiVm1ytH9upVA8q2nylZy +YV5lvJNlVyV0bH73enMzF14zqxuRGqyEEPqQw98eLtQdf+YyPlEJd7m5gnr/ +ceFE8v5xn7+VIFPhfDXXghvdzU86rCpUAcfawj+OIW6c0mvQKA6ugk95Wk/n ++HjwuCf7HzpLNRR0lPJGKfFgfp9jJHBVg+vmLZ7LhjxYccxWuEGwGvqOS/1b +d4AHeR15Ki8pV8NgEBdFqJoHvXjHZHosq2F8+7dakstm7NvOdTc+txr+zF56 +EH+dFwtz8w7TpGuAoSq4tlbNi//eqnxOVa6BuINnrFNbeDH2vpPaM40aWP2c +Op31ixcTvsr4SUANJA/Thd/J82FEq7+go2cNpLb9Zz8YwYfkqBn24Ss1kHkz +6d06MX4ck43/bSdYCxa6hwWEFfjRJz6fpiNeCxzP7Ry2qPNjzmrzNXa5Wkgd +VvpsacyPob6f7udq1EKCfOto7mF+HDmkPKFvXgtBRYR/ynX8+KgmOLI4oRb2 +XH6oZukmgBWeV0Q29tUCn1ph8D5fAdz7sXf21tdaaKtPrQgOFsBtfhcHYIy5 +/2cng9zjAmhUnLiw52ctmIj/M+0vFcBNKhSxNXY66OZZuAWvCuDbhr6zidp0 +EM0dPnn+iiA+kp+24U2kA0G1OvVPiSDGPZOhbkuhg3hjWtK+ckFsH/HPJ5+g +g/TstsgtTYJ4oZ5ebHqaDkpWIV7144J4LdSE/8dlOhDX/yUNE4XQ6r0Z6V4d +c7/CNu1dVCE8yPPxBPUxHUg6RWr3zYRQXthzb/MzOpC9TOWjXYRwH21D+ONX +dDBuOMnDnSSE8+y/u3d10cEmQuSbTosQ6gfnu778QQdb7vGBSx1CqBkgp/Hh +Jx3sihmfVvuEsPQ8+UL7Ah0c37u/a/4hhP4+owoNK3TYp3ajzlVYGN19MwNU +2Blw5JvmuWNewsgeyrohUpIBAfGsWWOHhVHdXPbVH2kGBAl0pFmFC6Ni4Kx+ +hBwDwjAqQSRNGF0K0hXtlBkQe7nB726pMFJi6rzvajIgfa85rX1RGHefKuFq +QwaIV7WJr2MVwaIUZ90/JgwoE9z7W5tbBKWO9dUQdjCgq92j/JyMCJ76cew9 +xZwBinsi5PfsEsG05pKr/HsYQC9f+pdsJ4JT56S6Z+wYYMWX9LncXQSnj1kl +Nu5lQPi7k7l8oSLoZlQhtduZAY27r218ny+C3CzzKz88GOB4X3F47YYIblRz ++5HsxYDJTXefaJaJ4IjIm4Mc3gzgb62KOdsogn6iTtPLPgzwsmiZtP4ugsf2 +2ZYG+TNg/o7Ny6MLIrjegZ2/6ghTH+fHG2VrIug9EyMwG8DU8+qL+2YhUVR7 +/2beMpgBf80W2t5SRFE6X+zM+XAGZJfElf41E0WqyuGtZyKY+jayZKjvEcXn +IonRSZFMPS+4jE/7imLg5140i2bAoGK21KNgUfwjWfJMIoapL1V4eSpWFG8c +M1g/zuQCU9lKqzOieNVs5rNPHAM0bvx3NiFPFLlIDdHC8Uz961QD7hWL4tL+ +kqEGJjt6l+/quyeK/73cLOuWwICJZ3pKm2pF8UCIO3GWyQly9ayUZ6IYFLAi +k5DIAL4UHDjyhnneNveJf0w2QMtLb76IYs9vU9mJowxovfY+fGVCFIefPs+1 +TWLGa83BVnVeFCvH/v4qY/K8x2c1t3+iWEyJNV6fzIzXYy/OTA4C5oW/SLZl +srj06EidAAEbpaOqzzO5LPFI46QkAe/dURh+y2ST/tmr4lsI+NX+CM8ak7so +UfEW2gRkU/uhvyWFAf6XV5zijAgYweV40IzJf1eSde/uIKBoluVldyZnu23k +77UhoA9Pcv9hJivWZ05zuhLw+83b6kFMpovztxj6ENBaOin7/+tWcRdLDgcR +cGH+Gef/3x/8JHE8P4aALda6V3YwOdzwuufrYwSU/X3FWpnJFkWb5y2zCPii +7LggK5Pl2RMy2i4Q0PzfL9lO5nmXAick91wjoIg6T9w1Jr/vdHzYcZuAmcuz +cgeYfNvo+Q7HCgKKFzyXkGFyUrF2b089Ac8/KPfvYMbPkfNakNsLAnpZfuVP +ZrJGyCa2gTYCVoyeEFJi8obu2EtePQSs9fwQ2cjMRx91THX4KwEHF5YMnJmc +yd24d3yeqdesdS6AmT/vMM0J/38EfLr91/R3Zr7Jny4nTrOLIcvAnPMBJo+X +RJf8FBfDki+5GUbMennCM0KOVBTDB6vv7S8z6+tihN273+piWC8iVLgQy4Ad +Jup/VlEMx2LXlZ5j1qPknYKsJAvmepBnXCezfud5OeTW7RVD/3LlDl4mF/cP +mbP7ieHMxTiNEGa9x263HTgZIoYxB9r1LzD9YFv6KGxTnBhqP1fpqWD6ZS0m +r5D/tBhmb7r4vTuUAe5C1tMSlWJ4MJP/8etABhDj61OuNoihxgeBwUqm/7iG +torINYvhAHRVXWT6k/GADZQ/iaEK/+NUs8MMELFkZGutieEds1A5G6a/px8q +K1VyiGNPZBtljen/54Rchp4Ak88Fb7m9n5nv0aAhspI4Mt4sxHxj3h/vUxR1 +d1iKo2rYShi7CwNujZ979XKvODrOWAUddWLAUZs1dwsPcZw/LOk448AAdane +Ezah4uh3iH2ZzryvTtHPdrtcEkdlB5+VJUsGbP+xHBc0zGSbWk0NKjMeu3JV +nk2J49BMXgUYMf1wXb1XcFEc02wLii0MGUDY62XI4JDA1rDsHis9BkzRX/xm +05BAi/GudWzqDDh/LDsiP0YC2RczswwlGPDq8zbFqRQJbHoeWDhMYMCqblMH +LVMC/bMa7dJFGHBwbEHn2xUJ7KSNvK7nZ9aDlducRpME2k8d2P6J2Q+GhJWD +nvNIYt6lE00TzH4iGvxESlRUEsNMTytozdLB6pXz28OykqjKHno4ZJoONXGZ +arxESRRJ8a8ZGKPDqS+zky7OkphL+9wY1kcHnTv1fj+KJbFNmyKW8JwOKZQ9 ++8UNpJB0RfShZjYddnlc/alvIoWY774alEWHzcnfjztYSeGCyPiDWxl0uNx0 +oiTbSwoz+dp8NjD7L92i7vvGk1K401Q2PyyUDrPOClG/Pkmh+0/VVsIeOnhE +LpxqjZdGX3/FWgY3s5+W5VcdfSKDCbGtqonBtbC9u+3vzCsZVP3+r7zAvxas +Wdbv9GyXQZxqKqn0rYUDdkGfYEQGC4WFFrvdasEsXi4peYMsfvGwKJ7cWQsh +Mos3jFVlUdKIokyRqYXnftemm6JkkcfG5MKDlhoI+DOX/IpHDvt2L5p2CdfA +kirfgLqDPK5yt8WH7q8CSum9oosXFbBwMed6A3M+nROw8HJsVERp7wcF/o3l +8C3LyzGMXRnXKT0THrl8H8x/RJuPkLZgJL+l4jTXXZg6wBFelbQVSyuU2RZd +Spjzuei69MZtaNYXlHdmuRgE3iqfKf+hgt0G/tMDYsx5POOBLYmkhvMbvsSf +LiiAPFVDPkE/dQxckR+7vXYBWsSN9X6d08D8ydqh27w5QJZszNbs0sQXvSc6 +m99nwZCC4sBErybee1HW2FmbBSdV01RvftFEO4qC06+rWdBDtmgmTGjiX4aV +u3dgFkS7tK+wrmoiWdDMgJ07C1wtQ4mTfFo4GuOj4WeeCRczmPYlaSEhrYrV +qf0kbGYrjth/TAsVmzcpFgumw8alJ/ZzqVroli9xamI1Df7N9OukpGthTHB/ +pcloGvzoFZsrytLCmmPHtFUYafC+4lzg4EUtzHb/Mt3qmQY53ikHPUuZ/C5H +ybX8BIg0ejnv69RC6bM6Pc4eqSCdIkNxUdZGpcC3xlxTKVAWziHfv1Ube9aO +FXR9SgHawTn2/ara2GzSsb7iZQrss2zqOKSljY0e5tMXbqTAZWG/IzFkbczz +OqvM754CYnfLCi5Za6PI5QGWtnfJINRBXfoYpY3hC5yT1qlJwKnkXmP3UhvP +3QitE7oeD/5iYFH6WhtvRH83uX8iHlp45AfYWrVR6+O+QHf/eMhaHNtQ/V4b +N7SuC/9HjIfNr8IdRHu10Xsp9a3NqzgQOJI5/3lKG/ViHihLLsSC5MM6HV8B +HZzfY71xzSMGNKhiD6L36WBRVVYlf2gkVCocXlnnpYN8N/c58bhEggEXY+cZ +bx08dDqwScY4Eky6nQdv+ulgiGtxZQZ/JDiG5vG3h+qgl+NLrcOVEZD0n2iE +WpoONvUfz3ZcCYf3PCKGX8t0sK/+TEx4YRg4zPueCHjI5KRnatvSwqC3t/rD +70od/LOodv9XSBh8u+Xgv5mhg7m70zqbzcLgj/GFQqMmHRxv9OT2+RUKclFC +/y506yDP1u7LAbahEDYg0GTBQkTS72/nLcVC4FWz+6O764jYxXO9sYE9BKQf +lNRybSDifMa7joSpYGhJIt9r4STiMOn58EhJMMjLeV+wECTi5d0uGiAVDB8O +PPSzUCZi5FRg+hJvEGhN2GyysCKiOFZtGt8UAGkf8jfetSaicvD82brpI9DH +GGbh2kPEoM2hgqVtRyDjVPTCawciBpzJfzKSfQQGVa8NmHsSMXGcqPFE5Ahk +B82Um4cRMTPLKWdmiz/8+JXlYJ5HxDWdMpYbnoegr+e645UCIjrvnunO3X4I +Wh7VOM1dJmIRy9Huom2H4Gb6oEv+dSJqjhL/bZz3A1cJXY+Ju0Tsx6oKzlN+ +8MLk88GTj4hYu0FGurvuIBSe2xbzeoiIpWFXSOyavpARRYuVGmHy7N4joqK+ +EOVmHxc6RsR9paG2sOYDtkqJCWJTRPxSHfvl4zsf2Mh4n3x4gYh79WxWJcJ8 +IHQw+iQnhy4OC4aXrdQdgJ2azQXm6rqoxF49l7bPG5w37tr7XlMXn7DEfr1i +5g3+/a95nHR08R9dZuWtpjecyXyb7KOvi12wahu7zhu6xjoPJhnrImWLw6bl +2/vBp2hYp9qB+b2OV+LZy15wjJ/1jexRXZQTazox7uEJuePHUm8l66JUZ3s5 +l74nlDxZT9M4rou6laWVLrye0BLI8dAoQxcNSefyEp96AH8L7yXHHF0sAKJV +j6IHFB2TPpBVootHB+5KVy+4w+NfRiu/23RxRHDMdLbGFa631nrbf9BF4d2J +efcvukLqf8SWsg5dZFNoO386yhXMnVTzfXt08Sb/dtZqkit01onrd3zVxaXH +p6yv0l1gMmUprGxeF8tVX5Y9aXQGEb7aSR9xPZTUeX798A9HWBrXsXsqqYdm +pfGF2OEIfc/KGBIyemg+4RRDqnWE6+ElGe0Kenhx2fvQ0SRHUOu+oIzqeviS +w58lgd8RTK5GeEugHlbLOe0UNnKAIDWd3g++erjjdxjLvxv2EPlbfNnzkB6O +qVl9CzhpDwmNbOIz/npo99J1/WqQPWQ6f3ThCtFD/e2y4XFke7idGvPJJE4P +X3h4+s2328FQ3+OeyjN6GJl9c+gJpx04nrbsvlCrh2dNTlp1nraFfc66vxXq +9LDLOewld7Qt+ChIiVY06OH3FPEUTy9bCGfMOLY908Mtbo36bkRbyB4517Wx +VQ/H6wI6sNoGWqg9H6MH9VAtKLz3rLs1UGd8Ol04Sdiysvwzpd0SROp3Fjdw +k1DmbO2KXJklzKSrhMhsJqH+94AN0yct4arcLPeIAAmzNs/6s5lYwr+98aYh +kiRkzGWVq1VZwJP6cxVpmiRcjTPRsCwyB+OTj7MrHUh4ttHtxNmLO0Hc8bqH +iDMJZ87uuE+J3gk/5VPVYl1J6KVw7Tyv804objB/RfMk4dKZiFUl8Z2wbrZz +7fUhEk5yDH7nKzKDJsfvQYPxJKysChR/VLEDdigSdvMUkzA7k27v89MUqqZf +yPncJGG7HdV+Q48pKNaGL9aVkPBE0S/e5kemsN7i3bVDpSR8cyCOXHLSFBqD +0342VZGwanztXr+8KdDq5y/FvSRhxPW3mpvcTIBk92FobIqELnUKrWlfEUok +kmppP0j4zqYqeLAFQXhELevCHAn/+Fp1OFQhzEdn6JkukrBtluZ9Ph2h4gpk +XF0jYb/5e1dHTQTNifvqDgL6aOin2NPEDrA1+VRMo74+Dt5y3ns6mQINRv9t +sCLro1ogcSDGkQK2v5/kfKToo53Fzt1X1CgQE7Rwb9xYHzleJL4++8kIXrl7 +fd1spY9Fp9beCpKM4JAhycLNSx8P7Fyfvm/JEO78/Coxn6GPsfs5UrVv6QOt +bPV2YqY+clc/1aw7rg/th0VJ7Gf0UU6CWBXupQ/Lg1a24uf1cdq9xTFGXB8s +3tWm4hV9XOqUS3yWTYLJ0tPTWQ/1Uepow7RMmh6o+Bo+UerVR4cHgV+O5hDh +rLz18vE+fXTkEVQsiyLC/BdvvaEBfRT7PvCB1Y0Ij12zSq8O66PQ+UePhBWJ +YGf75ZLotD76mrdpf6/VgVijEyGcLAZIZts6t2VUG17xf5CbVjJALpfC3FY3 +LVB/N+JuudUA1fzOEQ23a0FO1vKlOyoG6OSLOi/UtMCdXXHzQU0DlE+KCIlc +1YQfq1HLAwYG2PEksVhzhyaIjEt2vLc0wOq1pyLzX9XB9/Gh1KpQA9wzQdzY +YqYKM4GT0TsiDDAz8vybQglViJEKONIVZYBK3oLd92ZV4FRCsN2feAPkFOoO +ySxUgXJylCwlzQC3PttzSXt+G6zWHG9oKjDA8cs+23rLt0LOg6vz7U0G2C8x +5hHuoAySnrLjB5oNcPvEpH2OtjL8t7n48/wrpp4jTc9HeZSBHvhfo0ibAT69 +YvRH46US9Kvey3btMUD2J4S3uhQl2HqboTY0ZYA23z/E92gqwpOiTp85YUNU +P9njdsNIHgat5DyjCIZYySI8ESktDyxLgS4r4oY4esV+OJxVHkz2sFtvkDVE +AVEp4txLOWhmJeuLqRiixl/D/klHOWj1vsZpTDNEU1cx1dsJstCr6F+WfdAQ +zY8sGp55IwUr72tuCx82RLu/Jvt1C6VAMpHtRsERQ3w4m3dX4YgU7Pt4+dLN +EEPMHT29uY9bCgZPvEumxxmiyveNSndsJWFsVNd+8AxzPVDO32NMHOZvr/3W +rDXECDbdt5fNCDDqaFZ0kmGImkJFQ85yBOhZf3rXcL0hHnTX8LVYFYV6L/H8 +i08NcX1eSF5rhSgcI+iR/742ROuqdoKZvCjwZfgntPQZYsxK9cUPXCKg5veR +xXcdGfk2yKfGswiBtLDkncfryegEr396fxUEvibvPQR2Mka/cbwc3SgIv6Rn +r7/hJmNCf9f9LScEoa6Ly1RHmIwNEurky5sEYZcZnljbQsZOwtn9NxQE4IBS +KWfBbjKSX0icLgzhg7gXHv7KtmTM4uUPPL2XD7J9Bd5U2JFRL11e9Z4BHzT8 +F5v1xomMipypBsGsfCCkvIv3734y9kw1d3Oo8EKz8oiQVxQZjd/96/PN4AGV +rTKyytfIuJ9+5ftAChfgq/bkiutkVJq3Ydm4lwscD6V9pd0ko4r1sZRoZS44 +fnu62OkOGV9WJnAatHJC39YGpZOVZKQ8PsuvIMEJZ7a5qE69JKPMx/ll42Z2 +mFM5T6qYZZ73BtezV9YboKcVdwj+ImPbCzbbcdUN8DRoxj5igYwXrblTqJwb +4EyFeShpmYz1XLSL6c/XgwqZ5V4dmxEm5dyn5lDXg7d5oFyTiBFuDDTegYZs +0Om3c1MnxQjfMtb1cjiwQj3ngrgeGOHNV1q8NgasUFxavO2isRHe57vB1ijB +CiE//po5mxmhy9taJfVhFuCJrkrpszFCSrOkMX8EC5ilyf3+5m2E0PhjpcJo +jUa/ufJ1IcMIt164eiBZZpVGMo34bZFphGyvxM0N51Zo1V+nNhWdNsL2DzSG +YdMKrUJ6QN8ixwgVcSSf99AK7V7e09NXC43wgYm31PrqZVpR1gnDnWVGONjf +P1XrtkQ7GcF7Lq/DCN8cnk+/8WmRxiGYUTL90QgDgjLwTOUiLe0hS4NJjxHO +CLGkVJ1epKXOzI1O9Rmhk89PwwqTRdrRQ50U41EjNJaV5jj8YIEW5p4/PvHH +CN0YQpGx5+dprtsV0EiaghWvhhvGjv+k/e3k2NwkS0GRONunK/t/0op8Zz5b +KFBQ/O9Avzn+pI2mMaJdt1IQt/BO5/ydo4W9tnkQq0NBJ4q1fFvcHO2UdYI0 +3YyC7U0tw3lJs7Q654+rusEUzDpQ6EHymqbtm6hraQilYPHXpnOntk3TWOKK +8rZHUJj/a7sdqL+maGaFR3T3xlJQbu6tREP6FK29nzUg/DgFJ06tPuap/k6b +9Nb4/PASBeuTn21JlJ2kSQSmMzSeUnASNj3MJ43Rzqwd1MtspODOjkLzbJ4x +2rocs4djzynoQmWtef1tlDZZs+FO0WsKHs/iOsSWO0qrY0nNE+igYNwX7uG0 +hRGaa25y9OIIBS0M02sjn3+j5dXH6j3mpuJ5lXzS7rNDtE3WLg/FN1MR3OYf +DwQO0ZIHDdSj+ah42HRQ/pbVEO3Qhj+KWsJULLgvqfCZa4imbxMlVCxNxRuN +03eaT36ldQ2F/TqhTcWjb29f9z43SBPmCni424mKLreuavw91U+7aZoYN+tC +RW+/JY3d1v00ncQzpufdqUj1ZWjzCPTTrGfLP/bspyKZ865yb0EfLa1rYelA +ABUTB+Qjch5+pv0pTjKJS6Fi+Le7ql0/P9F6jc53lJRSsfOC5izjSRftUOTN +y+ZlVOR85hV642wXbbGs2neqnIrj6aylo55dNAH5nt/aNVTcSZV9F83aRbPk +kJJ89JSKUtNGbZW7PtIaOkt8Oj5SEf0WP/GMddAsNtPVo3qo+KnEm9uyoYPW +s/P1IuEzFQMyus71nOugzdd9z/AYpOJK8tvDQ9QOmvp1rfsTk1R8IsctUJzf +TmvoNY7Kmqai7Vx+uV1oO81CyB40Z5nxYOV1tDFvpx1Mj/wQsUBFRUfSdZXl +D7T5p2kFon+o+PYgP3B0fKAdW750oG6ZirE/ZTs1732g8eneUdv3l4r7PT4O +FJ34QLsaWLewtsaM363TA66eH2j/Az8RDaI= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k4lG8Xx0llS3bGvqvsDIMxM+eglCVEdiGRkn1fQwlFJaksLVI/LUqy +zqCNUkkqhIRE1hCFspR33r+e63Pd1/Pc9/ec873PeeS8g+1817GwsLxnZWH5 +/3Nx4PVzxcybNNLilfOrDXtonVcJscY9x0C3yfdN3A4tQOF33oSeHNj3hOeu +/Q6EKNu73Ww9xUB588iGuMMW+GdEc5a6K+Dyv6rVH9u94EuDdfB8dyM4Wq01 +sW4PATPFyf657nbY87520hmTYalb/8Js9xA0+pjEvdDOhibTWzc/FP+ClU+W +V4WuFIHkF8aot9pf+FjaZVQlfBuEAjzvspuy4ZnsmsCGxjJQYb/RbOvEhlU8 +H3s4BsoAi0eH8o+w4ccMJ26zpTII6AmUUMtlw6L25Us5mg/g+faELNsRNnxm +X7ApvPABREjlB+Wnr8ddX78wFAzKoaOtXUe1dQPWQceDPxsfQo62Wb21Awf6 +SApzp2dWgOZnl53UQxx4JyHqrePFCmhNDexQjedANXuXbunrFbCxJ/c7x3UO +rH2mUHWppgLijw5LNE1xYIperK7a1wrweZOcoJ/KiVm1ytH9upVA8q2nylZy +YV5lvJNlVyV0bH73enMzF14zqxuRGqyEEPqQw98eLtQdf+YyPlEJd7m5gnr/ +ceFE8v5xn7+VIFPhfDXXghvdzU86rCpUAcfawj+OIW6c0mvQKA6ugk95Wk/n ++HjwuCf7HzpLNRR0lPJGKfFgfp9jJHBVg+vmLZ7LhjxYccxWuEGwGvqOS/1b +d4AHeR15Ki8pV8NgEBdFqJoHvXjHZHosq2F8+7dakstm7NvOdTc+txr+zF56 +EH+dFwtz8w7TpGuAoSq4tlbNi//eqnxOVa6BuINnrFNbeDH2vpPaM40aWP2c +Op31ixcTvsr4SUANJA/Thd/J82FEq7+go2cNpLb9Zz8YwYfkqBn24Ss1kHkz +6d06MX4ck43/bSdYCxa6hwWEFfjRJz6fpiNeCxzP7Ry2qPNjzmrzNXa5Wkgd +VvpsacyPob6f7udq1EKCfOto7mF+HDmkPKFvXgtBRYR/ynX8+KgmOLI4oRb2 +XH6oZukmgBWeV0Q29tUCn1ph8D5fAdz7sXf21tdaaKtPrQgOFsBtfhcHYIy5 +/2cng9zjAmhUnLiw52ctmIj/M+0vFcBNKhSxNXY66OZZuAWvCuDbhr6zidp0 +EM0dPnn+iiA+kp+24U2kA0G1OvVPiSDGPZOhbkuhg3hjWtK+ckFsH/HPJ5+g +g/TstsgtTYJ4oZ5ebHqaDkpWIV7144J4LdSE/8dlOhDX/yUNE4XQ6r0Z6V4d +c7/CNu1dVCE8yPPxBPUxHUg6RWr3zYRQXthzb/MzOpC9TOWjXYRwH21D+ONX +dDBuOMnDnSSE8+y/u3d10cEmQuSbTosQ6gfnu778QQdb7vGBSx1CqBkgp/Hh +Jx3sihmfVvuEsPQ8+UL7Ah0c37u/a/4hhP4+owoNK3TYp3ajzlVYGN19MwNU +2Blw5JvmuWNewsgeyrohUpIBAfGsWWOHhVHdXPbVH2kGBAl0pFmFC6Ni4Kx+ +hBwDwjAqQSRNGF0K0hXtlBkQe7nB726pMFJi6rzvajIgfa85rX1RGHefKuFq +QwaIV7WJr2MVwaIUZ90/JgwoE9z7W5tbBKWO9dUQdjCgq92j/JyMCJ76cew9 +xZwBinsi5PfsEsG05pKr/HsYQC9f+pdsJ4JT56S6Z+wYYMWX9LncXQSnj1kl +Nu5lQPi7k7l8oSLoZlQhtduZAY27r218ny+C3CzzKz88GOB4X3F47YYIblRz ++5HsxYDJTXefaJaJ4IjIm4Mc3gzgb62KOdsogn6iTtPLPgzwsmiZtP4ugsf2 +2ZYG+TNg/o7Ny6MLIrjegZ2/6ghTH+fHG2VrIug9EyMwG8DU8+qL+2YhUVR7 +/2beMpgBf80W2t5SRFE6X+zM+XAGZJfElf41E0WqyuGtZyKY+jayZKjvEcXn +IonRSZFMPS+4jE/7imLg5140i2bAoGK21KNgUfwjWfJMIoapL1V4eSpWFG8c +M1g/zuQCU9lKqzOieNVs5rNPHAM0bvx3NiFPFLlIDdHC8Uz961QD7hWL4tL+ +kqEGJjt6l+/quyeK/73cLOuWwICJZ3pKm2pF8UCIO3GWyQly9ayUZ6IYFLAi +k5DIAL4UHDjyhnneNveJf0w2QMtLb76IYs9vU9mJowxovfY+fGVCFIefPs+1 +TWLGa83BVnVeFCvH/v4qY/K8x2c1t3+iWEyJNV6fzIzXYy/OTA4C5oW/SLZl +srj06EidAAEbpaOqzzO5LPFI46QkAe/dURh+y2ST/tmr4lsI+NX+CM8ak7so +UfEW2gRkU/uhvyWFAf6XV5zijAgYweV40IzJf1eSde/uIKBoluVldyZnu23k +77UhoA9Pcv9hJivWZ05zuhLw+83b6kFMpovztxj6ENBaOin7/+tWcRdLDgcR +cGH+Gef/3x/8JHE8P4aALda6V3YwOdzwuufrYwSU/X3FWpnJFkWb5y2zCPii +7LggK5Pl2RMy2i4Q0PzfL9lO5nmXAick91wjoIg6T9w1Jr/vdHzYcZuAmcuz +cgeYfNvo+Q7HCgKKFzyXkGFyUrF2b089Ac8/KPfvYMbPkfNakNsLAnpZfuVP +ZrJGyCa2gTYCVoyeEFJi8obu2EtePQSs9fwQ2cjMRx91THX4KwEHF5YMnJmc +yd24d3yeqdesdS6AmT/vMM0J/38EfLr91/R3Zr7Jny4nTrOLIcvAnPMBJo+X +RJf8FBfDki+5GUbMennCM0KOVBTDB6vv7S8z6+tihN273+piWC8iVLgQy4Ad +Jup/VlEMx2LXlZ5j1qPknYKsJAvmepBnXCezfud5OeTW7RVD/3LlDl4mF/cP +mbP7ieHMxTiNEGa9x263HTgZIoYxB9r1LzD9YFv6KGxTnBhqP1fpqWD6ZS0m +r5D/tBhmb7r4vTuUAe5C1tMSlWJ4MJP/8etABhDj61OuNoihxgeBwUqm/7iG +torINYvhAHRVXWT6k/GADZQ/iaEK/+NUs8MMELFkZGutieEds1A5G6a/px8q +K1VyiGNPZBtljen/54Rchp4Ak88Fb7m9n5nv0aAhspI4Mt4sxHxj3h/vUxR1 +d1iKo2rYShi7CwNujZ979XKvODrOWAUddWLAUZs1dwsPcZw/LOk448AAdane +Ezah4uh3iH2ZzryvTtHPdrtcEkdlB5+VJUsGbP+xHBc0zGSbWk0NKjMeu3JV +nk2J49BMXgUYMf1wXb1XcFEc02wLii0MGUDY62XI4JDA1rDsHis9BkzRX/xm +05BAi/GudWzqDDh/LDsiP0YC2RczswwlGPDq8zbFqRQJbHoeWDhMYMCqblMH +LVMC/bMa7dJFGHBwbEHn2xUJ7KSNvK7nZ9aDlducRpME2k8d2P6J2Q+GhJWD +nvNIYt6lE00TzH4iGvxESlRUEsNMTytozdLB6pXz28OykqjKHno4ZJoONXGZ +arxESRRJ8a8ZGKPDqS+zky7OkphL+9wY1kcHnTv1fj+KJbFNmyKW8JwOKZQ9 ++8UNpJB0RfShZjYddnlc/alvIoWY774alEWHzcnfjztYSeGCyPiDWxl0uNx0 +oiTbSwoz+dp8NjD7L92i7vvGk1K401Q2PyyUDrPOClG/Pkmh+0/VVsIeOnhE +LpxqjZdGX3/FWgY3s5+W5VcdfSKDCbGtqonBtbC9u+3vzCsZVP3+r7zAvxas +Wdbv9GyXQZxqKqn0rYUDdkGfYEQGC4WFFrvdasEsXi4peYMsfvGwKJ7cWQsh +Mos3jFVlUdKIokyRqYXnftemm6JkkcfG5MKDlhoI+DOX/IpHDvt2L5p2CdfA +kirfgLqDPK5yt8WH7q8CSum9oosXFbBwMed6A3M+nROw8HJsVERp7wcF/o3l +8C3LyzGMXRnXKT0THrl8H8x/RJuPkLZgJL+l4jTXXZg6wBFelbQVSyuU2RZd +Spjzuei69MZtaNYXlHdmuRgE3iqfKf+hgt0G/tMDYsx5POOBLYmkhvMbvsSf +LiiAPFVDPkE/dQxckR+7vXYBWsSN9X6d08D8ydqh27w5QJZszNbs0sQXvSc6 +m99nwZCC4sBErybee1HW2FmbBSdV01RvftFEO4qC06+rWdBDtmgmTGjiX4aV +u3dgFkS7tK+wrmoiWdDMgJ07C1wtQ4mTfFo4GuOj4WeeCRczmPYlaSEhrYrV +qf0kbGYrjth/TAsVmzcpFgumw8alJ/ZzqVroli9xamI1Df7N9OukpGthTHB/ +pcloGvzoFZsrytLCmmPHtFUYafC+4lzg4EUtzHb/Mt3qmQY53ikHPUuZ/C5H +ybX8BIg0ejnv69RC6bM6Pc4eqSCdIkNxUdZGpcC3xlxTKVAWziHfv1Ube9aO +FXR9SgHawTn2/ara2GzSsb7iZQrss2zqOKSljY0e5tMXbqTAZWG/IzFkbczz +OqvM754CYnfLCi5Za6PI5QGWtnfJINRBXfoYpY3hC5yT1qlJwKnkXmP3UhvP +3QitE7oeD/5iYFH6WhtvRH83uX8iHlp45AfYWrVR6+O+QHf/eMhaHNtQ/V4b +N7SuC/9HjIfNr8IdRHu10Xsp9a3NqzgQOJI5/3lKG/ViHihLLsSC5MM6HV8B +HZzfY71xzSMGNKhiD6L36WBRVVYlf2gkVCocXlnnpYN8N/c58bhEggEXY+cZ +bx08dDqwScY4Eky6nQdv+ulgiGtxZQZ/JDiG5vG3h+qgl+NLrcOVEZD0n2iE +WpoONvUfz3ZcCYf3PCKGX8t0sK/+TEx4YRg4zPueCHjI5KRnatvSwqC3t/rD +70od/LOodv9XSBh8u+Xgv5mhg7m70zqbzcLgj/GFQqMmHRxv9OT2+RUKclFC +/y506yDP1u7LAbahEDYg0GTBQkTS72/nLcVC4FWz+6O764jYxXO9sYE9BKQf +lNRybSDifMa7joSpYGhJIt9r4STiMOn58EhJMMjLeV+wECTi5d0uGiAVDB8O +PPSzUCZi5FRg+hJvEGhN2GyysCKiOFZtGt8UAGkf8jfetSaicvD82brpI9DH +GGbh2kPEoM2hgqVtRyDjVPTCawciBpzJfzKSfQQGVa8NmHsSMXGcqPFE5Ahk +B82Um4cRMTPLKWdmiz/8+JXlYJ5HxDWdMpYbnoegr+e645UCIjrvnunO3X4I +Wh7VOM1dJmIRy9Huom2H4Gb6oEv+dSJqjhL/bZz3A1cJXY+Ju0Tsx6oKzlN+ +8MLk88GTj4hYu0FGurvuIBSe2xbzeoiIpWFXSOyavpARRYuVGmHy7N4joqK+ +EOVmHxc6RsR9paG2sOYDtkqJCWJTRPxSHfvl4zsf2Mh4n3x4gYh79WxWJcJ8 +IHQw+iQnhy4OC4aXrdQdgJ2azQXm6rqoxF49l7bPG5w37tr7XlMXn7DEfr1i +5g3+/a95nHR08R9dZuWtpjecyXyb7KOvi12wahu7zhu6xjoPJhnrImWLw6bl +2/vBp2hYp9qB+b2OV+LZy15wjJ/1jexRXZQTazox7uEJuePHUm8l66JUZ3s5 +l74nlDxZT9M4rou6laWVLrye0BLI8dAoQxcNSefyEp96AH8L7yXHHF0sAKJV +j6IHFB2TPpBVootHB+5KVy+4w+NfRiu/23RxRHDMdLbGFa631nrbf9BF4d2J +efcvukLqf8SWsg5dZFNoO386yhXMnVTzfXt08Sb/dtZqkit01onrd3zVxaXH +p6yv0l1gMmUprGxeF8tVX5Y9aXQGEb7aSR9xPZTUeX798A9HWBrXsXsqqYdm +pfGF2OEIfc/KGBIyemg+4RRDqnWE6+ElGe0Kenhx2fvQ0SRHUOu+oIzqeviS +w58lgd8RTK5GeEugHlbLOe0UNnKAIDWd3g++erjjdxjLvxv2EPlbfNnzkB6O +qVl9CzhpDwmNbOIz/npo99J1/WqQPWQ6f3ThCtFD/e2y4XFke7idGvPJJE4P +X3h4+s2328FQ3+OeyjN6GJl9c+gJpx04nrbsvlCrh2dNTlp1nraFfc66vxXq +9LDLOewld7Qt+ChIiVY06OH3FPEUTy9bCGfMOLY908Mtbo36bkRbyB4517Wx +VQ/H6wI6sNoGWqg9H6MH9VAtKLz3rLs1UGd8Ol04Sdiysvwzpd0SROp3Fjdw +k1DmbO2KXJklzKSrhMhsJqH+94AN0yct4arcLPeIAAmzNs/6s5lYwr+98aYh +kiRkzGWVq1VZwJP6cxVpmiRcjTPRsCwyB+OTj7MrHUh4ttHtxNmLO0Hc8bqH +iDMJZ87uuE+J3gk/5VPVYl1J6KVw7Tyv804objB/RfMk4dKZiFUl8Z2wbrZz +7fUhEk5yDH7nKzKDJsfvQYPxJKysChR/VLEDdigSdvMUkzA7k27v89MUqqZf +yPncJGG7HdV+Q48pKNaGL9aVkPBE0S/e5kemsN7i3bVDpSR8cyCOXHLSFBqD +0342VZGwanztXr+8KdDq5y/FvSRhxPW3mpvcTIBk92FobIqELnUKrWlfEUok +kmppP0j4zqYqeLAFQXhELevCHAn/+Fp1OFQhzEdn6JkukrBtluZ9Ph2h4gpk +XF0jYb/5e1dHTQTNifvqDgL6aOin2NPEDrA1+VRMo74+Dt5y3ns6mQINRv9t +sCLro1ogcSDGkQK2v5/kfKToo53Fzt1X1CgQE7Rwb9xYHzleJL4++8kIXrl7 +fd1spY9Fp9beCpKM4JAhycLNSx8P7Fyfvm/JEO78/Coxn6GPsfs5UrVv6QOt +bPV2YqY+clc/1aw7rg/th0VJ7Gf0UU6CWBXupQ/Lg1a24uf1cdq9xTFGXB8s +3tWm4hV9XOqUS3yWTYLJ0tPTWQ/1Uepow7RMmh6o+Bo+UerVR4cHgV+O5hDh +rLz18vE+fXTkEVQsiyLC/BdvvaEBfRT7PvCB1Y0Ij12zSq8O66PQ+UePhBWJ +YGf75ZLotD76mrdpf6/VgVijEyGcLAZIZts6t2VUG17xf5CbVjJALpfC3FY3 +LVB/N+JuudUA1fzOEQ23a0FO1vKlOyoG6OSLOi/UtMCdXXHzQU0DlE+KCIlc +1YQfq1HLAwYG2PEksVhzhyaIjEt2vLc0wOq1pyLzX9XB9/Gh1KpQA9wzQdzY +YqYKM4GT0TsiDDAz8vybQglViJEKONIVZYBK3oLd92ZV4FRCsN2feAPkFOoO +ySxUgXJylCwlzQC3PttzSXt+G6zWHG9oKjDA8cs+23rLt0LOg6vz7U0G2C8x +5hHuoAySnrLjB5oNcPvEpH2OtjL8t7n48/wrpp4jTc9HeZSBHvhfo0ibAT69 +YvRH46US9Kvey3btMUD2J4S3uhQl2HqboTY0ZYA23z/E92gqwpOiTp85YUNU +P9njdsNIHgat5DyjCIZYySI8ESktDyxLgS4r4oY4esV+OJxVHkz2sFtvkDVE +AVEp4txLOWhmJeuLqRiixl/D/klHOWj1vsZpTDNEU1cx1dsJstCr6F+WfdAQ +zY8sGp55IwUr72tuCx82RLu/Jvt1C6VAMpHtRsERQ3w4m3dX4YgU7Pt4+dLN +EEPMHT29uY9bCgZPvEumxxmiyveNSndsJWFsVNd+8AxzPVDO32NMHOZvr/3W +rDXECDbdt5fNCDDqaFZ0kmGImkJFQ85yBOhZf3rXcL0hHnTX8LVYFYV6L/H8 +i08NcX1eSF5rhSgcI+iR/742ROuqdoKZvCjwZfgntPQZYsxK9cUPXCKg5veR +xXcdGfk2yKfGswiBtLDkncfryegEr396fxUEvibvPQR2Mka/cbwc3SgIv6Rn +r7/hJmNCf9f9LScEoa6Ly1RHmIwNEurky5sEYZcZnljbQsZOwtn9NxQE4IBS +KWfBbjKSX0icLgzhg7gXHv7KtmTM4uUPPL2XD7J9Bd5U2JFRL11e9Z4BHzT8 +F5v1xomMipypBsGsfCCkvIv3734y9kw1d3Oo8EKz8oiQVxQZjd/96/PN4AGV +rTKyytfIuJ9+5ftAChfgq/bkiutkVJq3Ydm4lwscD6V9pd0ko4r1sZRoZS44 +fnu62OkOGV9WJnAatHJC39YGpZOVZKQ8PsuvIMEJZ7a5qE69JKPMx/ll42Z2 +mFM5T6qYZZ73BtezV9YboKcVdwj+ImPbCzbbcdUN8DRoxj5igYwXrblTqJwb +4EyFeShpmYz1XLSL6c/XgwqZ5V4dmxEm5dyn5lDXg7d5oFyTiBFuDDTegYZs +0Om3c1MnxQjfMtb1cjiwQj3ngrgeGOHNV1q8NgasUFxavO2isRHe57vB1ijB +CiE//po5mxmhy9taJfVhFuCJrkrpszFCSrOkMX8EC5ilyf3+5m2E0PhjpcJo +jUa/ufJ1IcMIt164eiBZZpVGMo34bZFphGyvxM0N51Zo1V+nNhWdNsL2DzSG +YdMKrUJ6QN8ixwgVcSSf99AK7V7e09NXC43wgYm31PrqZVpR1gnDnWVGONjf +P1XrtkQ7GcF7Lq/DCN8cnk+/8WmRxiGYUTL90QgDgjLwTOUiLe0hS4NJjxHO +CLGkVJ1epKXOzI1O9Rmhk89PwwqTRdrRQ50U41EjNJaV5jj8YIEW5p4/PvHH +CN0YQpGx5+dprtsV0EiaghWvhhvGjv+k/e3k2NwkS0GRONunK/t/0op8Zz5b +KFBQ/O9Avzn+pI2mMaJdt1IQt/BO5/ydo4W9tnkQq0NBJ4q1fFvcHO2UdYI0 +3YyC7U0tw3lJs7Q654+rusEUzDpQ6EHymqbtm6hraQilYPHXpnOntk3TWOKK +8rZHUJj/a7sdqL+maGaFR3T3xlJQbu6tREP6FK29nzUg/DgFJ06tPuap/k6b +9Nb4/PASBeuTn21JlJ2kSQSmMzSeUnASNj3MJ43Rzqwd1MtspODOjkLzbJ4x +2rocs4djzynoQmWtef1tlDZZs+FO0WsKHs/iOsSWO0qrY0nNE+igYNwX7uG0 +hRGaa25y9OIIBS0M02sjn3+j5dXH6j3mpuJ5lXzS7rNDtE3WLg/FN1MR3OYf +DwQO0ZIHDdSj+ah42HRQ/pbVEO3Qhj+KWsJULLgvqfCZa4imbxMlVCxNxRuN +03eaT36ldQ2F/TqhTcWjb29f9z43SBPmCni424mKLreuavw91U+7aZoYN+tC +RW+/JY3d1v00ncQzpufdqUj1ZWjzCPTTrGfLP/bspyKZ865yb0EfLa1rYelA +ABUTB+Qjch5+pv0pTjKJS6Fi+Le7ql0/P9F6jc53lJRSsfOC5izjSRftUOTN +y+ZlVOR85hV642wXbbGs2neqnIrj6aylo55dNAH5nt/aNVTcSZV9F83aRbPk +kJJ89JSKUtNGbZW7PtIaOkt8Oj5SEf0WP/GMddAsNtPVo3qo+KnEm9uyoYPW +s/P1IuEzFQMyus71nOugzdd9z/AYpOJK8tvDQ9QOmvp1rfsTk1R8IsctUJzf +TmvoNY7Kmqai7Vx+uV1oO81CyB40Z5nxYOV1tDFvpx1Mj/wQsUBFRUfSdZXl +D7T5p2kFon+o+PYgP3B0fKAdW750oG6ZirE/ZTs1732g8eneUdv3l4r7PT4O +FJ34QLsaWLewtsaM363TA66eH2j/Az8RDaI= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09963120093074777}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09963120093074777}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k4lG8Xx0llS3bGvqvsDIMxM+eglCVEdiGRkn1fQwlFJaksLVI/LUqy +zqCNUkkqhIRE1hCFspR33r+e63Pd1/Pc9/ec873PeeS8g+1817GwsLxnZWH5 +/3Nx4PVzxcybNNLilfOrDXtonVcJscY9x0C3yfdN3A4tQOF33oSeHNj3hOeu +/Q6EKNu73Ww9xUB588iGuMMW+GdEc5a6K+Dyv6rVH9u94EuDdfB8dyM4Wq01 +sW4PATPFyf657nbY87520hmTYalb/8Js9xA0+pjEvdDOhibTWzc/FP+ClU+W +V4WuFIHkF8aot9pf+FjaZVQlfBuEAjzvspuy4ZnsmsCGxjJQYb/RbOvEhlU8 +H3s4BsoAi0eH8o+w4ccMJ26zpTII6AmUUMtlw6L25Us5mg/g+faELNsRNnxm +X7ApvPABREjlB+Wnr8ddX78wFAzKoaOtXUe1dQPWQceDPxsfQo62Wb21Awf6 +SApzp2dWgOZnl53UQxx4JyHqrePFCmhNDexQjedANXuXbunrFbCxJ/c7x3UO +rH2mUHWppgLijw5LNE1xYIperK7a1wrweZOcoJ/KiVm1ytH9upVA8q2nylZy +YV5lvJNlVyV0bH73enMzF14zqxuRGqyEEPqQw98eLtQdf+YyPlEJd7m5gnr/ +ceFE8v5xn7+VIFPhfDXXghvdzU86rCpUAcfawj+OIW6c0mvQKA6ugk95Wk/n ++HjwuCf7HzpLNRR0lPJGKfFgfp9jJHBVg+vmLZ7LhjxYccxWuEGwGvqOS/1b +d4AHeR15Ki8pV8NgEBdFqJoHvXjHZHosq2F8+7dakstm7NvOdTc+txr+zF56 +EH+dFwtz8w7TpGuAoSq4tlbNi//eqnxOVa6BuINnrFNbeDH2vpPaM40aWP2c +Op31ixcTvsr4SUANJA/Thd/J82FEq7+go2cNpLb9Zz8YwYfkqBn24Ss1kHkz +6d06MX4ck43/bSdYCxa6hwWEFfjRJz6fpiNeCxzP7Ry2qPNjzmrzNXa5Wkgd +VvpsacyPob6f7udq1EKCfOto7mF+HDmkPKFvXgtBRYR/ynX8+KgmOLI4oRb2 +XH6oZukmgBWeV0Q29tUCn1ph8D5fAdz7sXf21tdaaKtPrQgOFsBtfhcHYIy5 +/2cng9zjAmhUnLiw52ctmIj/M+0vFcBNKhSxNXY66OZZuAWvCuDbhr6zidp0 +EM0dPnn+iiA+kp+24U2kA0G1OvVPiSDGPZOhbkuhg3hjWtK+ckFsH/HPJ5+g +g/TstsgtTYJ4oZ5ebHqaDkpWIV7144J4LdSE/8dlOhDX/yUNE4XQ6r0Z6V4d +c7/CNu1dVCE8yPPxBPUxHUg6RWr3zYRQXthzb/MzOpC9TOWjXYRwH21D+ONX +dDBuOMnDnSSE8+y/u3d10cEmQuSbTosQ6gfnu778QQdb7vGBSx1CqBkgp/Hh +Jx3sihmfVvuEsPQ8+UL7Ah0c37u/a/4hhP4+owoNK3TYp3ajzlVYGN19MwNU +2Blw5JvmuWNewsgeyrohUpIBAfGsWWOHhVHdXPbVH2kGBAl0pFmFC6Ni4Kx+ +hBwDwjAqQSRNGF0K0hXtlBkQe7nB726pMFJi6rzvajIgfa85rX1RGHefKuFq +QwaIV7WJr2MVwaIUZ90/JgwoE9z7W5tbBKWO9dUQdjCgq92j/JyMCJ76cew9 +xZwBinsi5PfsEsG05pKr/HsYQC9f+pdsJ4JT56S6Z+wYYMWX9LncXQSnj1kl +Nu5lQPi7k7l8oSLoZlQhtduZAY27r218ny+C3CzzKz88GOB4X3F47YYIblRz ++5HsxYDJTXefaJaJ4IjIm4Mc3gzgb62KOdsogn6iTtPLPgzwsmiZtP4ugsf2 +2ZYG+TNg/o7Ny6MLIrjegZ2/6ghTH+fHG2VrIug9EyMwG8DU8+qL+2YhUVR7 +/2beMpgBf80W2t5SRFE6X+zM+XAGZJfElf41E0WqyuGtZyKY+jayZKjvEcXn +IonRSZFMPS+4jE/7imLg5140i2bAoGK21KNgUfwjWfJMIoapL1V4eSpWFG8c +M1g/zuQCU9lKqzOieNVs5rNPHAM0bvx3NiFPFLlIDdHC8Uz961QD7hWL4tL+ +kqEGJjt6l+/quyeK/73cLOuWwICJZ3pKm2pF8UCIO3GWyQly9ayUZ6IYFLAi +k5DIAL4UHDjyhnneNveJf0w2QMtLb76IYs9vU9mJowxovfY+fGVCFIefPs+1 +TWLGa83BVnVeFCvH/v4qY/K8x2c1t3+iWEyJNV6fzIzXYy/OTA4C5oW/SLZl +srj06EidAAEbpaOqzzO5LPFI46QkAe/dURh+y2ST/tmr4lsI+NX+CM8ak7so +UfEW2gRkU/uhvyWFAf6XV5zijAgYweV40IzJf1eSde/uIKBoluVldyZnu23k +77UhoA9Pcv9hJivWZ05zuhLw+83b6kFMpovztxj6ENBaOin7/+tWcRdLDgcR +cGH+Gef/3x/8JHE8P4aALda6V3YwOdzwuufrYwSU/X3FWpnJFkWb5y2zCPii +7LggK5Pl2RMy2i4Q0PzfL9lO5nmXAick91wjoIg6T9w1Jr/vdHzYcZuAmcuz +cgeYfNvo+Q7HCgKKFzyXkGFyUrF2b089Ac8/KPfvYMbPkfNakNsLAnpZfuVP +ZrJGyCa2gTYCVoyeEFJi8obu2EtePQSs9fwQ2cjMRx91THX4KwEHF5YMnJmc +yd24d3yeqdesdS6AmT/vMM0J/38EfLr91/R3Zr7Jny4nTrOLIcvAnPMBJo+X +RJf8FBfDki+5GUbMennCM0KOVBTDB6vv7S8z6+tihN273+piWC8iVLgQy4Ad +Jup/VlEMx2LXlZ5j1qPknYKsJAvmepBnXCezfud5OeTW7RVD/3LlDl4mF/cP +mbP7ieHMxTiNEGa9x263HTgZIoYxB9r1LzD9YFv6KGxTnBhqP1fpqWD6ZS0m +r5D/tBhmb7r4vTuUAe5C1tMSlWJ4MJP/8etABhDj61OuNoihxgeBwUqm/7iG +torINYvhAHRVXWT6k/GADZQ/iaEK/+NUs8MMELFkZGutieEds1A5G6a/px8q +K1VyiGNPZBtljen/54Rchp4Ak88Fb7m9n5nv0aAhspI4Mt4sxHxj3h/vUxR1 +d1iKo2rYShi7CwNujZ979XKvODrOWAUddWLAUZs1dwsPcZw/LOk448AAdane +Ezah4uh3iH2ZzryvTtHPdrtcEkdlB5+VJUsGbP+xHBc0zGSbWk0NKjMeu3JV +nk2J49BMXgUYMf1wXb1XcFEc02wLii0MGUDY62XI4JDA1rDsHis9BkzRX/xm +05BAi/GudWzqDDh/LDsiP0YC2RczswwlGPDq8zbFqRQJbHoeWDhMYMCqblMH +LVMC/bMa7dJFGHBwbEHn2xUJ7KSNvK7nZ9aDlducRpME2k8d2P6J2Q+GhJWD +nvNIYt6lE00TzH4iGvxESlRUEsNMTytozdLB6pXz28OykqjKHno4ZJoONXGZ +arxESRRJ8a8ZGKPDqS+zky7OkphL+9wY1kcHnTv1fj+KJbFNmyKW8JwOKZQ9 ++8UNpJB0RfShZjYddnlc/alvIoWY774alEWHzcnfjztYSeGCyPiDWxl0uNx0 +oiTbSwoz+dp8NjD7L92i7vvGk1K401Q2PyyUDrPOClG/Pkmh+0/VVsIeOnhE +LpxqjZdGX3/FWgY3s5+W5VcdfSKDCbGtqonBtbC9u+3vzCsZVP3+r7zAvxas +Wdbv9GyXQZxqKqn0rYUDdkGfYEQGC4WFFrvdasEsXi4peYMsfvGwKJ7cWQsh +Mos3jFVlUdKIokyRqYXnftemm6JkkcfG5MKDlhoI+DOX/IpHDvt2L5p2CdfA +kirfgLqDPK5yt8WH7q8CSum9oosXFbBwMed6A3M+nROw8HJsVERp7wcF/o3l +8C3LyzGMXRnXKT0THrl8H8x/RJuPkLZgJL+l4jTXXZg6wBFelbQVSyuU2RZd +Spjzuei69MZtaNYXlHdmuRgE3iqfKf+hgt0G/tMDYsx5POOBLYmkhvMbvsSf +LiiAPFVDPkE/dQxckR+7vXYBWsSN9X6d08D8ydqh27w5QJZszNbs0sQXvSc6 +m99nwZCC4sBErybee1HW2FmbBSdV01RvftFEO4qC06+rWdBDtmgmTGjiX4aV +u3dgFkS7tK+wrmoiWdDMgJ07C1wtQ4mTfFo4GuOj4WeeCRczmPYlaSEhrYrV +qf0kbGYrjth/TAsVmzcpFgumw8alJ/ZzqVroli9xamI1Df7N9OukpGthTHB/ +pcloGvzoFZsrytLCmmPHtFUYafC+4lzg4EUtzHb/Mt3qmQY53ikHPUuZ/C5H +ybX8BIg0ejnv69RC6bM6Pc4eqSCdIkNxUdZGpcC3xlxTKVAWziHfv1Ube9aO +FXR9SgHawTn2/ara2GzSsb7iZQrss2zqOKSljY0e5tMXbqTAZWG/IzFkbczz +OqvM754CYnfLCi5Za6PI5QGWtnfJINRBXfoYpY3hC5yT1qlJwKnkXmP3UhvP +3QitE7oeD/5iYFH6WhtvRH83uX8iHlp45AfYWrVR6+O+QHf/eMhaHNtQ/V4b +N7SuC/9HjIfNr8IdRHu10Xsp9a3NqzgQOJI5/3lKG/ViHihLLsSC5MM6HV8B +HZzfY71xzSMGNKhiD6L36WBRVVYlf2gkVCocXlnnpYN8N/c58bhEggEXY+cZ +bx08dDqwScY4Eky6nQdv+ulgiGtxZQZ/JDiG5vG3h+qgl+NLrcOVEZD0n2iE +WpoONvUfz3ZcCYf3PCKGX8t0sK/+TEx4YRg4zPueCHjI5KRnatvSwqC3t/rD +70od/LOodv9XSBh8u+Xgv5mhg7m70zqbzcLgj/GFQqMmHRxv9OT2+RUKclFC +/y506yDP1u7LAbahEDYg0GTBQkTS72/nLcVC4FWz+6O764jYxXO9sYE9BKQf +lNRybSDifMa7joSpYGhJIt9r4STiMOn58EhJMMjLeV+wECTi5d0uGiAVDB8O +PPSzUCZi5FRg+hJvEGhN2GyysCKiOFZtGt8UAGkf8jfetSaicvD82brpI9DH +GGbh2kPEoM2hgqVtRyDjVPTCawciBpzJfzKSfQQGVa8NmHsSMXGcqPFE5Ahk +B82Um4cRMTPLKWdmiz/8+JXlYJ5HxDWdMpYbnoegr+e645UCIjrvnunO3X4I +Wh7VOM1dJmIRy9Huom2H4Gb6oEv+dSJqjhL/bZz3A1cJXY+Ju0Tsx6oKzlN+ +8MLk88GTj4hYu0FGurvuIBSe2xbzeoiIpWFXSOyavpARRYuVGmHy7N4joqK+ +EOVmHxc6RsR9paG2sOYDtkqJCWJTRPxSHfvl4zsf2Mh4n3x4gYh79WxWJcJ8 +IHQw+iQnhy4OC4aXrdQdgJ2azQXm6rqoxF49l7bPG5w37tr7XlMXn7DEfr1i +5g3+/a95nHR08R9dZuWtpjecyXyb7KOvi12wahu7zhu6xjoPJhnrImWLw6bl +2/vBp2hYp9qB+b2OV+LZy15wjJ/1jexRXZQTazox7uEJuePHUm8l66JUZ3s5 +l74nlDxZT9M4rou6laWVLrye0BLI8dAoQxcNSefyEp96AH8L7yXHHF0sAKJV +j6IHFB2TPpBVootHB+5KVy+4w+NfRiu/23RxRHDMdLbGFa631nrbf9BF4d2J +efcvukLqf8SWsg5dZFNoO386yhXMnVTzfXt08Sb/dtZqkit01onrd3zVxaXH +p6yv0l1gMmUprGxeF8tVX5Y9aXQGEb7aSR9xPZTUeX798A9HWBrXsXsqqYdm +pfGF2OEIfc/KGBIyemg+4RRDqnWE6+ElGe0Kenhx2fvQ0SRHUOu+oIzqeviS +w58lgd8RTK5GeEugHlbLOe0UNnKAIDWd3g++erjjdxjLvxv2EPlbfNnzkB6O +qVl9CzhpDwmNbOIz/npo99J1/WqQPWQ6f3ThCtFD/e2y4XFke7idGvPJJE4P +X3h4+s2328FQ3+OeyjN6GJl9c+gJpx04nrbsvlCrh2dNTlp1nraFfc66vxXq +9LDLOewld7Qt+ChIiVY06OH3FPEUTy9bCGfMOLY908Mtbo36bkRbyB4517Wx +VQ/H6wI6sNoGWqg9H6MH9VAtKLz3rLs1UGd8Ol04Sdiysvwzpd0SROp3Fjdw +k1DmbO2KXJklzKSrhMhsJqH+94AN0yct4arcLPeIAAmzNs/6s5lYwr+98aYh +kiRkzGWVq1VZwJP6cxVpmiRcjTPRsCwyB+OTj7MrHUh4ttHtxNmLO0Hc8bqH +iDMJZ87uuE+J3gk/5VPVYl1J6KVw7Tyv804objB/RfMk4dKZiFUl8Z2wbrZz +7fUhEk5yDH7nKzKDJsfvQYPxJKysChR/VLEDdigSdvMUkzA7k27v89MUqqZf +yPncJGG7HdV+Q48pKNaGL9aVkPBE0S/e5kemsN7i3bVDpSR8cyCOXHLSFBqD +0342VZGwanztXr+8KdDq5y/FvSRhxPW3mpvcTIBk92FobIqELnUKrWlfEUok +kmppP0j4zqYqeLAFQXhELevCHAn/+Fp1OFQhzEdn6JkukrBtluZ9Ph2h4gpk +XF0jYb/5e1dHTQTNifvqDgL6aOin2NPEDrA1+VRMo74+Dt5y3ns6mQINRv9t +sCLro1ogcSDGkQK2v5/kfKToo53Fzt1X1CgQE7Rwb9xYHzleJL4++8kIXrl7 +fd1spY9Fp9beCpKM4JAhycLNSx8P7Fyfvm/JEO78/Coxn6GPsfs5UrVv6QOt +bPV2YqY+clc/1aw7rg/th0VJ7Gf0UU6CWBXupQ/Lg1a24uf1cdq9xTFGXB8s +3tWm4hV9XOqUS3yWTYLJ0tPTWQ/1Uepow7RMmh6o+Bo+UerVR4cHgV+O5hDh +rLz18vE+fXTkEVQsiyLC/BdvvaEBfRT7PvCB1Y0Ij12zSq8O66PQ+UePhBWJ +YGf75ZLotD76mrdpf6/VgVijEyGcLAZIZts6t2VUG17xf5CbVjJALpfC3FY3 +LVB/N+JuudUA1fzOEQ23a0FO1vKlOyoG6OSLOi/UtMCdXXHzQU0DlE+KCIlc +1YQfq1HLAwYG2PEksVhzhyaIjEt2vLc0wOq1pyLzX9XB9/Gh1KpQA9wzQdzY +YqYKM4GT0TsiDDAz8vybQglViJEKONIVZYBK3oLd92ZV4FRCsN2feAPkFOoO +ySxUgXJylCwlzQC3PttzSXt+G6zWHG9oKjDA8cs+23rLt0LOg6vz7U0G2C8x +5hHuoAySnrLjB5oNcPvEpH2OtjL8t7n48/wrpp4jTc9HeZSBHvhfo0ibAT69 +YvRH46US9Kvey3btMUD2J4S3uhQl2HqboTY0ZYA23z/E92gqwpOiTp85YUNU +P9njdsNIHgat5DyjCIZYySI8ESktDyxLgS4r4oY4esV+OJxVHkz2sFtvkDVE +AVEp4txLOWhmJeuLqRiixl/D/klHOWj1vsZpTDNEU1cx1dsJstCr6F+WfdAQ +zY8sGp55IwUr72tuCx82RLu/Jvt1C6VAMpHtRsERQ3w4m3dX4YgU7Pt4+dLN +EEPMHT29uY9bCgZPvEumxxmiyveNSndsJWFsVNd+8AxzPVDO32NMHOZvr/3W +rDXECDbdt5fNCDDqaFZ0kmGImkJFQ85yBOhZf3rXcL0hHnTX8LVYFYV6L/H8 +i08NcX1eSF5rhSgcI+iR/742ROuqdoKZvCjwZfgntPQZYsxK9cUPXCKg5veR +xXcdGfk2yKfGswiBtLDkncfryegEr396fxUEvibvPQR2Mka/cbwc3SgIv6Rn +r7/hJmNCf9f9LScEoa6Ly1RHmIwNEurky5sEYZcZnljbQsZOwtn9NxQE4IBS +KWfBbjKSX0icLgzhg7gXHv7KtmTM4uUPPL2XD7J9Bd5U2JFRL11e9Z4BHzT8 +F5v1xomMipypBsGsfCCkvIv3734y9kw1d3Oo8EKz8oiQVxQZjd/96/PN4AGV +rTKyytfIuJ9+5ftAChfgq/bkiutkVJq3Ydm4lwscD6V9pd0ko4r1sZRoZS44 +fnu62OkOGV9WJnAatHJC39YGpZOVZKQ8PsuvIMEJZ7a5qE69JKPMx/ll42Z2 +mFM5T6qYZZ73BtezV9YboKcVdwj+ImPbCzbbcdUN8DRoxj5igYwXrblTqJwb +4EyFeShpmYz1XLSL6c/XgwqZ5V4dmxEm5dyn5lDXg7d5oFyTiBFuDDTegYZs +0Om3c1MnxQjfMtb1cjiwQj3ngrgeGOHNV1q8NgasUFxavO2isRHe57vB1ijB +CiE//po5mxmhy9taJfVhFuCJrkrpszFCSrOkMX8EC5ilyf3+5m2E0PhjpcJo +jUa/ufJ1IcMIt164eiBZZpVGMo34bZFphGyvxM0N51Zo1V+nNhWdNsL2DzSG +YdMKrUJ6QN8ixwgVcSSf99AK7V7e09NXC43wgYm31PrqZVpR1gnDnWVGONjf +P1XrtkQ7GcF7Lq/DCN8cnk+/8WmRxiGYUTL90QgDgjLwTOUiLe0hS4NJjxHO +CLGkVJ1epKXOzI1O9Rmhk89PwwqTRdrRQ50U41EjNJaV5jj8YIEW5p4/PvHH +CN0YQpGx5+dprtsV0EiaghWvhhvGjv+k/e3k2NwkS0GRONunK/t/0op8Zz5b +KFBQ/O9Avzn+pI2mMaJdt1IQt/BO5/ydo4W9tnkQq0NBJ4q1fFvcHO2UdYI0 +3YyC7U0tw3lJs7Q654+rusEUzDpQ6EHymqbtm6hraQilYPHXpnOntk3TWOKK +8rZHUJj/a7sdqL+maGaFR3T3xlJQbu6tREP6FK29nzUg/DgFJ06tPuap/k6b +9Nb4/PASBeuTn21JlJ2kSQSmMzSeUnASNj3MJ43Rzqwd1MtspODOjkLzbJ4x +2rocs4djzynoQmWtef1tlDZZs+FO0WsKHs/iOsSWO0qrY0nNE+igYNwX7uG0 +hRGaa25y9OIIBS0M02sjn3+j5dXH6j3mpuJ5lXzS7rNDtE3WLg/FN1MR3OYf +DwQO0ZIHDdSj+ah42HRQ/pbVEO3Qhj+KWsJULLgvqfCZa4imbxMlVCxNxRuN +03eaT36ldQ2F/TqhTcWjb29f9z43SBPmCni424mKLreuavw91U+7aZoYN+tC +RW+/JY3d1v00ncQzpufdqUj1ZWjzCPTTrGfLP/bspyKZ865yb0EfLa1rYelA +ABUTB+Qjch5+pv0pTjKJS6Fi+Le7ql0/P9F6jc53lJRSsfOC5izjSRftUOTN +y+ZlVOR85hV642wXbbGs2neqnIrj6aylo55dNAH5nt/aNVTcSZV9F83aRbPk +kJJ89JSKUtNGbZW7PtIaOkt8Oj5SEf0WP/GMddAsNtPVo3qo+KnEm9uyoYPW +s/P1IuEzFQMyus71nOugzdd9z/AYpOJK8tvDQ9QOmvp1rfsTk1R8IsctUJzf +TmvoNY7Kmqai7Vx+uV1oO81CyB40Z5nxYOV1tDFvpx1Mj/wQsUBFRUfSdZXl +D7T5p2kFon+o+PYgP3B0fKAdW750oG6ZirE/ZTs1732g8eneUdv3l4r7PT4O +FJ34QLsaWLewtsaM363TA66eH2j/Az8RDaI= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09963120093074777}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09963120093074777}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831791243081*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"1e7665cd-829d-4497-9f44-b606e833fae9"] +}, Open ]], Cell[CellGroupData[{ @@ -6226,66 +12895,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[199]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], + "In[121]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 199, 165, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752212366*^9}, +Cell[BoxData["1.9253155772559734`"], "Output", + CellChangeTimes->{3.991331759108553*^9, 3.993831874885695*^9}, CellLabel-> - "During evaluation of \ -In[199]:=",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 199, 166, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133175222237*^9}, - CellLabel-> - "During evaluation of \ -In[199]:=",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 199, 167, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317522303677`*^9}, - CellLabel-> - "During evaluation of \ -In[199]:=",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 199, 168, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752237467*^9}, - CellLabel-> - "During evaluation of \ -In[199]:=",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], - -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.991331759108553*^9}, - CellLabel-> - "Out[199]=",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] + "Out[121]=",ExpressionUUID->"bfcfe936-7bc3-4106-912d-871fe7314541"] }, Open ]], Cell[CellGroupData[{ @@ -6352,68 +12967,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849016830597*^9, - 3.991849020984995*^9}},ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-\ -7a397847208f"], + CellChangeTimes->{{3.991849016830597*^9, 3.991849020984995*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 169, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591425533`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.667046484460589`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677014376571\ +83766930031662987798788637389089\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"73037642020067135698106962500927414407927270768241537997833403576048680960\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 41, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9938318749222307`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], +In[122]:=",ExpressionUUID->"272e9a4a-28b8-4003-82ef-986c4af9b4eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 170, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591525517`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.665107500026424`*^-66\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194495204020\ +33897038098812632294585492297343\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"56315876242497824258864668888957856210968322415955267074317235399363133440\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 42, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9938318749283867`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], +In[122]:=",ExpressionUUID->"3d7ab2b6-3133-47c0-86c6-2ff9397b4185"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 200, 171, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331759160553*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2589091019896285`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391635815956\ +75117750082522193347059523365005\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"64822767064647970549103680486633424592482966980364476382412977906269552640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 43, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.993831874933382*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], +In[122]:=",ExpressionUUID->"ef29c465-62e3-432c-af35-68d858db3ab9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 200, 172, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591685543`*^9}, +during this calculation.\"", 2, 122, 44, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9938318749378843`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], +In[122]:=",ExpressionUUID->"fa66516e-9024-4c80-87d8-b6e188d7787c"], -Cell[BoxData["1.044718879268698`"], "Output", - CellChangeTimes->{3.991331766558941*^9}, +Cell[BoxData["3.369815978523014`"], "Output", + CellChangeTimes->{3.991331766558941*^9, 3.993831884413664*^9}, CellLabel-> - "Out[200]=",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] + "Out[122]=",ExpressionUUID->"8f75f4ac-5d83-43a0-92db-b0ae46724637"] }, Open ]], Cell[CellGroupData[{ @@ -6434,8 +13065,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6480,68 +13110,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849024657757*^9, - 3.991849027138817*^9}},ExpressionUUID->"22b50200-0b82-dc47-9932-\ -f1f0210d6caf"], + CellChangeTimes->{{3.991849024657757*^9, 3.991849027138817*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 173, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317665951805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.667046484460589`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677014376571\ +83766930031662987798788637389089\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"73037642020067135698106962500927414407927270768241537997833403576048680960\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 123, 45, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.993831884446257*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], +In[123]:=",ExpressionUUID->"94bbc0ff-b57c-4836-8352-ebd0109c855d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 174, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666041794`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.665107500026424`*^-66\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194495204020\ +33897038098812632294585492297343\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"56315876242497824258864668888957856210968322415955267074317235399363133440\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 123, 46, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.99383188445359*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], +In[123]:=",ExpressionUUID->"b53ef6d7-c6c6-4a24-be2b-c3cb9b6358c7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 201, 175, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666131783`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2589091019896285`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391635815956\ +75117750082522193347059523365005\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"64822767064647970549103680486633424592482966980364476382412977906269552640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 123, 47, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.99383188446006*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], +In[123]:=",ExpressionUUID->"fbd1c6c4-eb60-40e9-b014-03dc15e29cc9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 201, 176, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666211815`*^9}, +during this calculation.\"", 2, 123, 48, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.9938318844658337`*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], +In[123]:=",ExpressionUUID->"b2337dcb-c404-4850-8125-26c85f2fc967"], -Cell[BoxData["4.7987767072565894`"], "Output", - CellChangeTimes->{3.991331773590704*^9}, +Cell[BoxData["15.902700548334115`"], "Output", + CellChangeTimes->{3.991331773590704*^9, 3.993831894188163*^9}, CellLabel-> - "Out[201]=",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] + "Out[123]=",ExpressionUUID->"d1eadcde-1e0a-41c6-849f-f6208619eba8"] }, Open ]], Cell[CellGroupData[{ @@ -6562,8 +13208,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6608,68 +13253,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849031047804*^9, - 3.9918490341764317`*^9}},ExpressionUUID->"8a5105db-666c-444e-9451-\ -d3e8d1574bcd"], + CellChangeTimes->{{3.991849031047804*^9, 3.9918490341764317`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 177, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736257057`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.667046484460589`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677014376571\ +83766930031662987798788637389089\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"73037642020067135698106962500927414407927270768241537997833403576048680960\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 124, 49, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.993831894221396*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], +In[124]:=",ExpressionUUID->"540c8d55-d63d-49b2-a3ef-a81e520de47c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 178, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736361847`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.665107500026424`*^-66\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194495204020\ +33897038098812632294585492297343\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"56315876242497824258864668888957856210968322415955267074317235399363133440\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 124, 50, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.993831894226611*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], +In[124]:=",ExpressionUUID->"87cbcd80-5320-4ff2-8ab6-223a44f0bc69"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 202, 179, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773644182*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2589091019896285`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391635815956\ +75117750082522193347059523365005\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"64822767064647970549103680486633424592482966980364476382412977906269552640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 124, 51, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9938318942316008`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], +In[124]:=",ExpressionUUID->"0158cf26-b9eb-4bb1-9423-6650b7b6db2b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 202, 180, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773653183*^9}, +during this calculation.\"", 2, 124, 52, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.993831894236208*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], +In[124]:=",ExpressionUUID->"daf14e84-bf35-4311-90ee-9b5440eaae65"], -Cell[BoxData["15.12281532960454`"], "Output", - CellChangeTimes->{3.991331777337887*^9}, +Cell[BoxData["0.9677270318577154`"], "Output", + CellChangeTimes->{3.991331777337887*^9, 3.993831900958338*^9}, CellLabel-> - "Out[202]=",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] + "Out[124]=",ExpressionUUID->"0423ecdc-98d9-4344-bbe2-490f2d1a73fe"] }, Open ]], Cell[CellGroupData[{ @@ -6678,22 +13339,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918490375675926`*^9, - 3.991849040901537*^9}},ExpressionUUID->"d0efa798-230b-fa46-b413-\ -76bfd8e40ccb"], - -Cell[BoxData["0.12263596348954131`"], "Output", - CellChangeTimes->{3.9913317773679104`*^9}, + CellChangeTimes->{{3.9918490375675926`*^9, 3.991849040901537*^9}}, CellLabel-> - "Out[203]=",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] + "In[125]:=",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], + +Cell[BoxData["0.8590022638663178`"], "Output", + CellChangeTimes->{3.9913317773679104`*^9, 3.9938319009853973`*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"abf9833b-3043-4f22-9ff2-c3a4a15cc2a1"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918490438339844`*^9, 3.991849046673996*^9}, - 3.9919249287922287`*^9},ExpressionUUID->"f842f74e-f562-934a-9011-\ -6604b8708636"], + 3.9919249287922287`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ @@ -6716,12 +13378,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[205]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], + "In[127]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.9913317774008274`*^9}, +Cell[BoxData["14.568671940986045`"], "Output", + CellChangeTimes->{3.9913317774008274`*^9, 3.993831900996635*^9}, CellLabel-> - "Out[205]=",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] + "Out[127]=",ExpressionUUID->"5f40ec4e-ec59-4179-9300-4016557a1dbd"] }, Open ]], Cell[CellGroupData[{ @@ -6731,12 +13393,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[207]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], + "In[128]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.9913317774358253`*^9}, +Cell[BoxData["0.03144498022209902`"], "Output", + CellChangeTimes->{3.9913317774358253`*^9, 3.993831901003209*^9}, CellLabel-> - "Out[207]=",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] + "Out[128]=",ExpressionUUID->"a5badafa-5f0b-45ea-97c8-534d8a7893c7"] }, Open ]], Cell[CellGroupData[{ @@ -6746,12 +13408,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[210]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], + "In[129]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.991331777510603*^9}, +Cell[BoxData["0.4581116010465551`"], "Output", + CellChangeTimes->{3.991331777510603*^9, 3.99383190101059*^9}, CellLabel-> - "Out[210]=",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] + "Out[129]=",ExpressionUUID->"80c83d10-0d1e-457f-9493-b6e7b463e8c7"] }, Open ]], Cell[CellGroupData[{ @@ -6941,12 +13603,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[211]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], + "In[130]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[BoxData["0.041096786108657246`"], "Output", - CellChangeTimes->{3.991331777537592*^9}, +Cell[BoxData["0.01347602352938022`"], "Output", + CellChangeTimes->{3.991331777537592*^9, 3.993831901023405*^9}, CellLabel-> - "Out[211]=",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] + "Out[130]=",ExpressionUUID->"2a44b085-ca41-4a0b-9d34-1da12f152515"] }, Open ]], Cell[CellGroupData[{ @@ -6960,12 +13622,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[212]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], + "In[131]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[BoxData["4.371605972693579`"], "Output", - CellChangeTimes->{3.9913317776362495`*^9}, +Cell[BoxData["7.634209264174108`"], "Output", + CellChangeTimes->{3.9913317776362495`*^9, 3.993831901105986*^9}, CellLabel-> - "Out[212]=",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] + "Out[131]=",ExpressionUUID->"1c3d18da-6111-4249-8718-6977427122e4"] }, Open ]], Cell[CellGroupData[{ @@ -7157,12 +13819,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[213]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], + "In[132]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[BoxData["0.013804398425195999`"], "Output", - CellChangeTimes->{3.9913317776511555`*^9}, +Cell[BoxData["0.21763763551811957`"], "Output", + CellChangeTimes->{3.9913317776511555`*^9, 3.993831901116253*^9}, CellLabel-> - "Out[213]=",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] + "Out[132]=",ExpressionUUID->"676e8e35-27bd-45ea-9dbd-5cc7032c7011"] }, Open ]], Cell[CellGroupData[{ @@ -7176,12 +13838,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[214]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], + "In[133]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[BoxData["7.5428626210616345`"], "Output", - CellChangeTimes->{3.991331777742655*^9}, +Cell[BoxData["1.8996690241273464`"], "Output", + CellChangeTimes->{3.991331777742655*^9, 3.993831901210209*^9}, CellLabel-> - "Out[214]=",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] + "Out[133]=",ExpressionUUID->"ae9e2876-3cdf-43f9-bdcc-7d2cf06f50bc"] }, Open ]], Cell[CellGroupData[{ @@ -7274,12 +13936,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[215]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], + "In[134]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913317777546787`*^9}, +Cell[BoxData["0.19148677740942904`"], "Output", + CellChangeTimes->{3.9913317777546787`*^9, 3.993831901222394*^9}, CellLabel-> - "Out[215]=",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] + "Out[134]=",ExpressionUUID->"cfa43b4e-357f-462a-92d3-b4f9143eea08"] }, Open ]], Cell[CellGroupData[{ @@ -7369,12 +14031,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[216]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], + "In[135]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991331777779663*^9}, +Cell[BoxData["0.808513222590571`"], "Output", + CellChangeTimes->{3.991331777779663*^9, 3.993831901230427*^9}, CellLabel-> - "Out[216]=",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] + "Out[135]=",ExpressionUUID->"6c373bab-43cd-4454-8065-67a9c31454cb"] }, Open ]], Cell[CellGroupData[{ @@ -7497,12 +14159,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[217]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], + "In[136]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913317778036633`*^9}, +Cell[BoxData["0.15481959148678082`"], "Output", + CellChangeTimes->{3.9913317778036633`*^9, 3.993831901239525*^9}, CellLabel-> - "Out[217]=",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] + "Out[136]=",ExpressionUUID->"bd67ed08-0d29-4897-b4eb-5b72842ba5dc"] }, Open ]], Cell[CellGroupData[{ @@ -7564,68 +14226,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918490946810665`*^9},ExpressionUUID->"1dec41a6-6752-2041-9d38-\ -804123b5ccd0"], + CellChangeTimes->{3.9918490946810665`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 218, 181, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778296604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.435728214838839`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 137, 53, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.9938319012527313`*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], +In[137]:=",ExpressionUUID->"77d96af7-3fc8-41c8-a2f7-4165b6fca3e8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 182, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777838663*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.886826681360608`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 137, 54, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.993831901258057*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], +In[137]:=",ExpressionUUID->"1dde086e-11e5-4be0-9c43-1ef55c6cd678"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 183, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778466587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.375360762478207`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053263498768\ +34870508672907477392606539841001\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"21\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"11373146585666280061823037918277948752886366340090458289410742623970263040\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 137, 55, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.993831901263226*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], +In[137]:=",ExpressionUUID->"b64683f0-231e-4ce5-8cd7-16fc195c3320"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 218, 184, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777854885*^9}, +during this calculation.\"", 2, 137, 56, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.993831901268696*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], +In[137]:=",ExpressionUUID->"44636ef2-f183-4253-af8d-6b1ff7327a06"], -Cell[BoxData["4.37160597269358`"], "Output", - CellChangeTimes->{3.991331781456501*^9}, +Cell[BoxData["7.634165159262859`"], "Output", + CellChangeTimes->{3.991331781456501*^9, 3.993831906640046*^9}, CellLabel-> - "Out[218]=",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] + "Out[137]=",ExpressionUUID->"da76b896-13fc-4af4-9485-fe75a2bfc9da"] }, Open ]], Cell[CellGroupData[{ @@ -7687,67 +14365,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99184909912471*^9},ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], + CellChangeTimes->{3.99184909912471*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 219, 185, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331781491499*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.435728214838839`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 138, 57, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.993831906682787*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], +In[138]:=",ExpressionUUID->"16b74b71-df0d-4fd9-b49e-ab71390bc64f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 186, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815004997`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.886826681360608`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 138, 58, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.993831906690504*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], +In[138]:=",ExpressionUUID->"3ac13cd8-2559-44cf-871b-328998a69040"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 187, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815094967`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.375360762478207`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053263498768\ +34870508672907477392606539841001\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"21\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"11373146585666280061823037918277948752886366340090458289410742623970263040\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 138, 59, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.993831906695785*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], +In[138]:=",ExpressionUUID->"e3447169-dedc-4d46-bf19-3a17123a49d5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 219, 188, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815164986`*^9}, +during this calculation.\"", 2, 138, 60, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.99383190670044*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], +In[138]:=",ExpressionUUID->"1b2a030f-2ec9-4de1-889f-d1a2294f2943"], -Cell[BoxData["7.54286262106163`"], "Output", - CellChangeTimes->{3.9913317851500416`*^9}, +Cell[BoxData["1.8996580492207347`"], "Output", + CellChangeTimes->{3.9913317851500416`*^9, 3.993831912049721*^9}, CellLabel-> - "Out[219]=",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] + "Out[138]=",ExpressionUUID->"39ead403-0836-4de7-9d8f-7ca8de499754"] }, Open ]], Cell[CellGroupData[{ @@ -7805,93 +14500,109 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918491043389053`*^9},ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-\ -b799ae260294"], + CellChangeTimes->{3.9918491043389053`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV0nc8lX8UB/BLZISUMtoyQoOMXPMcO1yzkpXsJMVPKoSkpIGMjKRIlNx7 +MxpWSaJURlYpiazClR2S/L79dV/v1+dzznOe13PFXX2tPdgpFMpKNgrl36+P +vUZkDedOHMsTzSoWEsRtOQF886CItxI/Jr9/xo+u7uemt5srovlTjWqhbH5M +lUj46uyoiGFZ5Re8LvPjkqz8gleBinh/r/eU4X5+/HxraG9CoSKaWmuebR/n +w0upzjdlJZSwsvtNzT45Phy4Qtthu1QZB1vYtvXl8uJtf0nLx3UquGSPn+u7 +L1xY9LXyiugXFXwlc2ZrUw0XVpkceH16WAVz7XkkWQ+4sG9zsrYu7y786tRw +yeUsF0q3cG1vNNqF7dKmXsZbuJChNMwzWLULo2kNDUtPLcWSqcKX60pVMTe8 +7O+cFCe+cTZfPFOritu6mp4nreDEz3VD6r0fVfHDjGG0wQIHzmdLFN3/pYrt +3CJi31o5UHtfUuYuZSpei84tWRrJgdWPA0Mt86lYOyp9hG1wCb4/Carnc9SQ +seRnlf1zdjzacPNGxiM1LLihf+4hkx15pf8slr1Uw8B99Us3pLOjQVtJ7fg3 +NQw4L7VZJogdy5QU7Q9uUEdGnb3icmV2zB6TDFVPUceahbmOdUw2DPTmfTl2 +UQNf0i93tNEpuLrKawtfqgZWDv+6TEunYJHY6ytb7mkgT72yfks0BUdqz+11 +qtHA+JjGG4LHKOi6ZaH/HZsm0m4M7zXeSUFa3yj3vWBNTLvLqWh2YhHEndrM +D/hoIct0qsuhcAGyK5e/DgjWwpWSfxIHUxZAWsIEoi9q4fnvplJxYQuw7UeF +fHm2Fopf+R65hbYAu/xzBcU6tfDa6vx3IT/+AO3C6eZWM22MTp78wZT6Aycf +iNvQ5AF5ufoM4gp/w6ygY4ObFuBQhdBzgRu/4fTxZMPTpoC61SP775z/DeHU +Zap5hwDlKSWJAra/4UrVlAh3JuBEzlTv0OIcWA73sly4EQuWFSXk7pkDj8Un +D9YHIX5wKFDJ5Z2FVVxrr70IR2TXeXN39fQMVAmcCfK4iNjkPi+S1jUDmzYY +6TNTEFdHLE35/mgGvmh+/KT5BHH61A3rBOcZsA6e4XCcRLQcOGa34ukv0J5W +dUg7qoNsqvF0gXPTMPLnBmqf0MGxdfUHtvtNQzoHRbonRAf9Tm1Y43xgGuaE +asdko3VQ4UjxfjbqNDxStL1QmqeD9kU2wQo/p0DOL7Cw/bsOVvyiwA6nKRAZ +LuEScdXFZfsHxYVok0Cd5Z2hHtbFRhMOuSzNSbDnPDBg76eL4fOxTrh9EtI3 +stXcCtPFPWbVfHkCk7B5r3GE9A1dFDB5+1yheQJ2PPv0R6VVF4UbvrxccJgA +w6u/x/ca6qFf+olzW4PHIUBJ80uCnD7myUa4u5SPguOu0a64nfooUG6akXNn +FPTVsnpjqfq4XYFDnhI9CkLAPXzZUB8nYvJHZxxHocikdS7CVR/nxk18Rhd/ +wpiLj8jxNH38tO/73iHjn3AkLt16D68BujNLWgNGWGCdaGFjtcIAmze4bLRt +Z4F6Mru9hagBvnlUsGj+kgW86V4uptIGeHu9o/yp6yzIvafsp6drgB+SrFbm +G7JgoKIuRinYAN82ux2mZw+D68ifWqEhA8z1nn9nfmwIil/9mr4/boBa6Qti +A3ZDwJc5thnnDFA9tjgz3oDk1n0hPtyGuEaFb0FyPclL3inUSBvixZidger1 +g/A4Ii31pJshsmrOcfHvHARuUarXpy+GaClyeE/Z0h/A1D3OldFohD6l06db ++/shQNxB++EHI9T0NC76/qEfNCl6J153GqHMcJMKd20/1D1b2Ts6bISc6lEj +fnn9wKIWVSD3bpTO5srq8u0HOfnxEz24Gz/ogof0Qh/krvXtkyrajWcvsC79 +3dQH2VPeLxjXjPHsUvH3Cld64NP96+J26cbI7vNpVjGsBwQO1p7lzDZG67Sr +ajr/9UDQGyldp4fGGBW5ruHs/h4wv9VdtbzZGG29jdriJXtgzsim2n+5CUZ0 +NK3tqfwG5jd0XlMvm+D2fs1cFts3mNURra8+Y4ppov2H9Ay7YIp1T8csyhSD +07t+/trZBaMpqk/aYk1xTGKr7tP1XTAwYpMxcJPkeY+XhEx/hdbrSf9xPzXF +ptA94/U5X6FwfKUwbdYUBeWoRXSer+B9m/9gix8Nt3E86G7t/AKdlCXj31zM +cNMlTUvzR5+BVhju+8PLDL9cmWrnyfkMZS5/R376muGFnYuOTUmfIblqbmg+ +1Az9rm2QO3/qM1ieH+tbnWaGsWZZmac0PkMV19d242YzdLcz9oyu+QR3BUor +C3XNcXnap8HNPe1wbJ1v3FkJC7z/qVagVf0jmNxRom7aaoFdEpNV27Z/BGm5 +2a4KRQu8OXUpJ27jR+hUPSv/R8cCf8WyvQ3i+Ai0PYkNJ50tsOcky+l9wweQ +vVzM53PTAlm7TfdHenyAifkz+vRlluj3sau3Jq0NHhyurUyKtMRly7n5zm5u +hbb822KSlywxQOOyxirRVvgzHexfFG2J7LE9gvn8rWAasV2yMdESefKWJMzP +tsCPtIQo7ixLlMnnUxxtbAHxOkfz0xWWyDFTulHjTAtc2zHe4TxjiWGhLi+o +vc0QPCk2s/WwFY5FVSgHPm+C9uxk96VHrTAvdcd9nidNsMtGqLnbzwo9tYL2 +ZTGaYKKEj5kUaIXhr3vVB683gXfYoutilBWuOXDhTF1AE9jx9Dc03yX7zs+o +925tAurGgrtBfVZI1apQl8p4D9MmhjavD1oj68QT0wM7G2HXqcn6q27W2M2K +FubY3AiBdzINbA9Z43t/xV+PVzbC7/nfyoPHrJG7Y1O9+lQD/GXkCy0Ls8Zl +vQp1r4sbYOlysSbzdGv8FWhdPYANINIybPqh3RpXHs2hztrXg5pDvE6/1R6M +38YXe47xDprFbnpXK+3FaJcYwbiBWlhz99zTXJl9GJSQ/6TZ9hWUdMvRzPlt +8PCCXqC2ZTVsaB07dHLEBust56Kep1SBUlI84073fvTQbnUznK+EmxyTOxJe +2iL9ZXobj+NzeKIj/zmy1A4dZoJ5Lv54Cqmql1f8ybPHC/3+jZ1NZdDYkXNB +KdoBS6hMa5n1pfDYLF3SL9wRK2P02tJCi2H86B7KMfcDeGCHcccXmScwbSjr +9VPPCb+KyzyzYHsMuSOfZo/vOoheVzuE7QYegu3tHLcDfM5ofrl4PGqhCB4W +mR5cEuWM9oGPC6Q3FoHa2ua5S3POGP7NPjHeqxAkug99bjrsgs5RoX3X3xZA +37IjFum9LsjiEWQPUi6A97Hmbkb7XHFTgNrJjoB8uBaYsezEe1esvLI6Rivu +ATytWJxzM3bDsdlUllQTE3a+UKZuMXXDAlm3zakNTLj78vDJIRrJ+UsofHVM +iK9tmfCzdEPnV0qPZ18xwbP53nDofjfs9u8Z63/KhBUDFp0pHiRve2Cx/D7J ++TMr350lVnqdmRbBhOWOGKVU5oZorkULUWfCplWvG9c9dcNw87FBaSoTFOrM +RJdWuGHm+XKHFhUmWGs63G9/4YaUrEelO3cy4dq6k+9C35B9cotWHDJMWNNJ +X17bTswsvUIRZoKkk0iq4wzpx8nNWE0yQM35Z26ksjtS7E2S8SED7l4fO26+ +yx27q+yaQgoZsKplQluESnLevOiyfAb8NJhpzdVwR2fhlgh1BgOyt1LY6nTd +MXNtpTsthwECMyvsVlq5I5aXlBenMKAvRoUn4yjp25jn5YUywOq1aushX3fc +lJRiLxzCgAqKeobCf2S/ZfvZc8EMuH5cW6UqgMy7ySq7nmKAuZ2RS/9pkqsE +bdr5HwNKJe1Kt152x0qa3JdVHgyILQ85XHLXHcPX3BKcMGPAUcUUtcBckneX +SyTSGEC7X8hDzSPzIjYpKqYM4E0ZuF/MJP0x0Yyw3QyI9LccevKI9AOS5MT1 +GBAiK3nkcRXx6TWUXCoDvFPe+RR9JfP7dLaUSzLAWGBA07+b+Hrc1ygJBshE +UvgVe8i+wNTRfZsZMOCvwizsJ/fL82z4tZEBLuYZIwUs4uSFu4ZrGWDLefxY +/m8yn3tEW2YlA4yOr/FjCHtguKmEGovCgKqMCyYJosQab93qF+mgWTchGbjG +AyvdwzcU/KWDgtS7T3obiOVBL/gPHcQ+ntbrkPJAjBbTF5+lw7B6pzCvCnFI +x1TpKB2usmc+O7SHWD8kf1U3HXjl+VLN9nkg5SL91JYuOpx3CPRX2k9ytrtv +NL7SIfCR5ZZFe5K77+Y9/IUOLp5s8cmu5HmZnnNt7XRQeuvqXvMfuW9E/PBc +Ex0+xkstk4gjNmbz9aihwwPg9/oRT+Zl7uQ9rib7R6aqmYkkr3tB5SJWNK4O +o6YQ17DRHlTRIZbiNmF2izjO15Svkg6GvpmfAhnknsK2JK5yOqxff3GX9gOS +d21j+ZTRYeqtb+KSAnKPIC2xpZQOWdJgFvuQ9DlDW7JL6LDQ2Vl5p4zYeVR0 +/xM6PKKtzW2oJf2SxazfhXS48pud89pb4tlDvwOIXXOHXOzqyL0/1t4eK6CD +IEfZ2r5Gknsu/zKcTwefcturcx/IPp16zgkmHSTkkk9K9pN71G8Ja+XR4ffH +0JbBAZIn/bKtu0+H95EeCvk/SI42g47EYd+Uh9RYxLw9k2dz6fA5teWAxSR5 +HlXlQcddOiRwrTAIZvPE8D/1ufV36PB0otMhYIknUloFZA8Rf+/M8z/GSeyi +uZudWPORfqYrD+n38rppZdFhwDlw3mSFJ1aqG3C/ziT30wxWGgiRXKw09Cix +hupKWVhN5n+GxK8mjuNn2CiJeSIGMhK9M0he1lW4VpzMx9dQZG7RwTOHUbta +gti+ybPjJunHBXUtlyL7ynO844gHPIX4OWRJPuxtuphOciEjL5YCyZXrfMdu +0KHsr9CZAUWyP/VMVQFx/2B3UrcycdSlIn9i9crgl61UMr/nmPd8Gh36fB5s +eIbkPout1E3EAranVYp1Se6JASPX6aCmt5tWqE+sZ2H2lDhWrCcoZzfpayh+ +cCIu4ciPyzAh+cbJSEXi3tHT967TiJ2imrmIqa9Wt8VYkr4Ul25xKvnehT3D +UdbEG3vc44lj0vPZI/aS+218JY8S9/gbK5y0JfOc54JkifmdhI387Ek/eV6A +l5hq3HvA25Hk13h1WClkfmPoFSdn8n5FLcGPiUt4TbJsXUk/LiIinbhnWrjU +2p3kdoXSkcT833obaZ7Eug6HfImpdQUDhl7Ezaf1HYhdi0MX0JvMDwhU7P63 +P8tklYYPyQsFW1X/7Y8R2apyjNxbHHpB5t/+wD4deT/Sb7NuW0PM515oK+tP ++uoxlQLEqhZhvhIBJPeW283xb7+66YX1J4l1ZHzmk+kQLSV6UySQ9IfOb5si +fiLY/3BFMMkHtS/9JP42X/h2WQjJhfdFDBHzfQ/7xhlG3v/GK5EfxLuaTWcX +z/z7/yYYfyf+H/V694k= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7905,105 +14616,119 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV0nc8lX8UB/BLZISUMtoyQoOMXPMcO1yzkpXsJMVPKoSkpIGMjKRIlNx7 +MxpWSaJURlYpiazClR2S/L79dV/v1+dzznOe13PFXX2tPdgpFMpKNgrl36+P +vUZkDedOHMsTzSoWEsRtOQF886CItxI/Jr9/xo+u7uemt5srovlTjWqhbH5M +lUj46uyoiGFZ5Re8LvPjkqz8gleBinh/r/eU4X5+/HxraG9CoSKaWmuebR/n +w0upzjdlJZSwsvtNzT45Phy4Qtthu1QZB1vYtvXl8uJtf0nLx3UquGSPn+u7 +L1xY9LXyiugXFXwlc2ZrUw0XVpkceH16WAVz7XkkWQ+4sG9zsrYu7y786tRw +yeUsF0q3cG1vNNqF7dKmXsZbuJChNMwzWLULo2kNDUtPLcWSqcKX60pVMTe8 +7O+cFCe+cTZfPFOritu6mp4nreDEz3VD6r0fVfHDjGG0wQIHzmdLFN3/pYrt +3CJi31o5UHtfUuYuZSpei84tWRrJgdWPA0Mt86lYOyp9hG1wCb4/Carnc9SQ +seRnlf1zdjzacPNGxiM1LLihf+4hkx15pf8slr1Uw8B99Us3pLOjQVtJ7fg3 +NQw4L7VZJogdy5QU7Q9uUEdGnb3icmV2zB6TDFVPUceahbmOdUw2DPTmfTl2 +UQNf0i93tNEpuLrKawtfqgZWDv+6TEunYJHY6ytb7mkgT72yfks0BUdqz+11 +qtHA+JjGG4LHKOi6ZaH/HZsm0m4M7zXeSUFa3yj3vWBNTLvLqWh2YhHEndrM +D/hoIct0qsuhcAGyK5e/DgjWwpWSfxIHUxZAWsIEoi9q4fnvplJxYQuw7UeF +fHm2Fopf+R65hbYAu/xzBcU6tfDa6vx3IT/+AO3C6eZWM22MTp78wZT6Aycf +iNvQ5AF5ufoM4gp/w6ygY4ObFuBQhdBzgRu/4fTxZMPTpoC61SP775z/DeHU +Zap5hwDlKSWJAra/4UrVlAh3JuBEzlTv0OIcWA73sly4EQuWFSXk7pkDj8Un +D9YHIX5wKFDJ5Z2FVVxrr70IR2TXeXN39fQMVAmcCfK4iNjkPi+S1jUDmzYY +6TNTEFdHLE35/mgGvmh+/KT5BHH61A3rBOcZsA6e4XCcRLQcOGa34ukv0J5W +dUg7qoNsqvF0gXPTMPLnBmqf0MGxdfUHtvtNQzoHRbonRAf9Tm1Y43xgGuaE +asdko3VQ4UjxfjbqNDxStL1QmqeD9kU2wQo/p0DOL7Cw/bsOVvyiwA6nKRAZ +LuEScdXFZfsHxYVok0Cd5Z2hHtbFRhMOuSzNSbDnPDBg76eL4fOxTrh9EtI3 +stXcCtPFPWbVfHkCk7B5r3GE9A1dFDB5+1yheQJ2PPv0R6VVF4UbvrxccJgA +w6u/x/ca6qFf+olzW4PHIUBJ80uCnD7myUa4u5SPguOu0a64nfooUG6akXNn +FPTVsnpjqfq4XYFDnhI9CkLAPXzZUB8nYvJHZxxHocikdS7CVR/nxk18Rhd/ +wpiLj8jxNH38tO/73iHjn3AkLt16D68BujNLWgNGWGCdaGFjtcIAmze4bLRt +Z4F6Mru9hagBvnlUsGj+kgW86V4uptIGeHu9o/yp6yzIvafsp6drgB+SrFbm +G7JgoKIuRinYAN82ux2mZw+D68ifWqEhA8z1nn9nfmwIil/9mr4/boBa6Qti +A3ZDwJc5thnnDFA9tjgz3oDk1n0hPtyGuEaFb0FyPclL3inUSBvixZidger1 +g/A4Ii31pJshsmrOcfHvHARuUarXpy+GaClyeE/Z0h/A1D3OldFohD6l06db ++/shQNxB++EHI9T0NC76/qEfNCl6J153GqHMcJMKd20/1D1b2Ts6bISc6lEj +fnn9wKIWVSD3bpTO5srq8u0HOfnxEz24Gz/ogof0Qh/krvXtkyrajWcvsC79 +3dQH2VPeLxjXjPHsUvH3Cld64NP96+J26cbI7vNpVjGsBwQO1p7lzDZG67Sr +ajr/9UDQGyldp4fGGBW5ruHs/h4wv9VdtbzZGG29jdriJXtgzsim2n+5CUZ0 +NK3tqfwG5jd0XlMvm+D2fs1cFts3mNURra8+Y4ppov2H9Ay7YIp1T8csyhSD +07t+/trZBaMpqk/aYk1xTGKr7tP1XTAwYpMxcJPkeY+XhEx/hdbrSf9xPzXF +ptA94/U5X6FwfKUwbdYUBeWoRXSer+B9m/9gix8Nt3E86G7t/AKdlCXj31zM +cNMlTUvzR5+BVhju+8PLDL9cmWrnyfkMZS5/R376muGFnYuOTUmfIblqbmg+ +1Az9rm2QO3/qM1ieH+tbnWaGsWZZmac0PkMV19d242YzdLcz9oyu+QR3BUor +C3XNcXnap8HNPe1wbJ1v3FkJC7z/qVagVf0jmNxRom7aaoFdEpNV27Z/BGm5 +2a4KRQu8OXUpJ27jR+hUPSv/R8cCf8WyvQ3i+Ai0PYkNJ50tsOcky+l9wweQ +vVzM53PTAlm7TfdHenyAifkz+vRlluj3sau3Jq0NHhyurUyKtMRly7n5zm5u +hbb822KSlywxQOOyxirRVvgzHexfFG2J7LE9gvn8rWAasV2yMdESefKWJMzP +tsCPtIQo7ixLlMnnUxxtbAHxOkfz0xWWyDFTulHjTAtc2zHe4TxjiWGhLi+o +vc0QPCk2s/WwFY5FVSgHPm+C9uxk96VHrTAvdcd9nidNsMtGqLnbzwo9tYL2 +ZTGaYKKEj5kUaIXhr3vVB683gXfYoutilBWuOXDhTF1AE9jx9Dc03yX7zs+o +925tAurGgrtBfVZI1apQl8p4D9MmhjavD1oj68QT0wM7G2HXqcn6q27W2M2K +FubY3AiBdzINbA9Z43t/xV+PVzbC7/nfyoPHrJG7Y1O9+lQD/GXkCy0Ls8Zl +vQp1r4sbYOlysSbzdGv8FWhdPYANINIybPqh3RpXHs2hztrXg5pDvE6/1R6M +38YXe47xDprFbnpXK+3FaJcYwbiBWlhz99zTXJl9GJSQ/6TZ9hWUdMvRzPlt +8PCCXqC2ZTVsaB07dHLEBust56Kep1SBUlI84073fvTQbnUznK+EmxyTOxJe +2iL9ZXobj+NzeKIj/zmy1A4dZoJ5Lv54Cqmql1f8ybPHC/3+jZ1NZdDYkXNB +KdoBS6hMa5n1pfDYLF3SL9wRK2P02tJCi2H86B7KMfcDeGCHcccXmScwbSjr +9VPPCb+KyzyzYHsMuSOfZo/vOoheVzuE7QYegu3tHLcDfM5ofrl4PGqhCB4W +mR5cEuWM9oGPC6Q3FoHa2ua5S3POGP7NPjHeqxAkug99bjrsgs5RoX3X3xZA +37IjFum9LsjiEWQPUi6A97Hmbkb7XHFTgNrJjoB8uBaYsezEe1esvLI6Rivu +ATytWJxzM3bDsdlUllQTE3a+UKZuMXXDAlm3zakNTLj78vDJIRrJ+UsofHVM +iK9tmfCzdEPnV0qPZ18xwbP53nDofjfs9u8Z63/KhBUDFp0pHiRve2Cx/D7J ++TMr350lVnqdmRbBhOWOGKVU5oZorkULUWfCplWvG9c9dcNw87FBaSoTFOrM +RJdWuGHm+XKHFhUmWGs63G9/4YaUrEelO3cy4dq6k+9C35B9cotWHDJMWNNJ +X17bTswsvUIRZoKkk0iq4wzpx8nNWE0yQM35Z26ksjtS7E2S8SED7l4fO26+ +yx27q+yaQgoZsKplQluESnLevOiyfAb8NJhpzdVwR2fhlgh1BgOyt1LY6nTd +MXNtpTsthwECMyvsVlq5I5aXlBenMKAvRoUn4yjp25jn5YUywOq1aushX3fc +lJRiLxzCgAqKeobCf2S/ZfvZc8EMuH5cW6UqgMy7ySq7nmKAuZ2RS/9pkqsE +bdr5HwNKJe1Kt152x0qa3JdVHgyILQ85XHLXHcPX3BKcMGPAUcUUtcBckneX +SyTSGEC7X8hDzSPzIjYpKqYM4E0ZuF/MJP0x0Yyw3QyI9LccevKI9AOS5MT1 +GBAiK3nkcRXx6TWUXCoDvFPe+RR9JfP7dLaUSzLAWGBA07+b+Hrc1ygJBshE +UvgVe8i+wNTRfZsZMOCvwizsJ/fL82z4tZEBLuYZIwUs4uSFu4ZrGWDLefxY +/m8yn3tEW2YlA4yOr/FjCHtguKmEGovCgKqMCyYJosQab93qF+mgWTchGbjG +AyvdwzcU/KWDgtS7T3obiOVBL/gPHcQ+ntbrkPJAjBbTF5+lw7B6pzCvCnFI +x1TpKB2usmc+O7SHWD8kf1U3HXjl+VLN9nkg5SL91JYuOpx3CPRX2k9ytrtv +NL7SIfCR5ZZFe5K77+Y9/IUOLp5s8cmu5HmZnnNt7XRQeuvqXvMfuW9E/PBc +Ex0+xkstk4gjNmbz9aihwwPg9/oRT+Zl7uQ9rib7R6aqmYkkr3tB5SJWNK4O +o6YQ17DRHlTRIZbiNmF2izjO15Svkg6GvpmfAhnknsK2JK5yOqxff3GX9gOS +d21j+ZTRYeqtb+KSAnKPIC2xpZQOWdJgFvuQ9DlDW7JL6LDQ2Vl5p4zYeVR0 +/xM6PKKtzW2oJf2SxazfhXS48pud89pb4tlDvwOIXXOHXOzqyL0/1t4eK6CD +IEfZ2r5Gknsu/zKcTwefcturcx/IPp16zgkmHSTkkk9K9pN71G8Ja+XR4ffH +0JbBAZIn/bKtu0+H95EeCvk/SI42g47EYd+Uh9RYxLw9k2dz6fA5teWAxSR5 +HlXlQcddOiRwrTAIZvPE8D/1ufV36PB0otMhYIknUloFZA8Rf+/M8z/GSeyi +uZudWPORfqYrD+n38rppZdFhwDlw3mSFJ1aqG3C/ziT30wxWGgiRXKw09Cix +hupKWVhN5n+GxK8mjuNn2CiJeSIGMhK9M0he1lW4VpzMx9dQZG7RwTOHUbta +gti+ybPjJunHBXUtlyL7ynO844gHPIX4OWRJPuxtuphOciEjL5YCyZXrfMdu +0KHsr9CZAUWyP/VMVQFx/2B3UrcycdSlIn9i9crgl61UMr/nmPd8Gh36fB5s +eIbkPout1E3EAranVYp1Se6JASPX6aCmt5tWqE+sZ2H2lDhWrCcoZzfpayh+ +cCIu4ciPyzAh+cbJSEXi3tHT967TiJ2imrmIqa9Wt8VYkr4Ul25xKvnehT3D +UdbEG3vc44lj0vPZI/aS+218JY8S9/gbK5y0JfOc54JkifmdhI387Ek/eV6A +l5hq3HvA25Hk13h1WClkfmPoFSdn8n5FLcGPiUt4TbJsXUk/LiIinbhnWrjU +2p3kdoXSkcT833obaZ7Eug6HfImpdQUDhl7Ezaf1HYhdi0MX0JvMDwhU7P63 +P8tklYYPyQsFW1X/7Y8R2apyjNxbHHpB5t/+wD4deT/Sb7NuW0PM515oK+tP ++uoxlQLEqhZhvhIBJPeW283xb7+66YX1J4l1ZHzmk+kQLSV6UySQ9IfOb5si +fiLY/3BFMMkHtS/9JP42X/h2WQjJhfdFDBHzfQ/7xhlG3v/GK5EfxLuaTWcX +z/z7/yYYfyf+H/V694k= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0., 4.019255192523573}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8015,21 +14740,19 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 4.019255192523573}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8043,103 +14766,118 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV0nc8lX8UB/BLZISUMtoyQoOMXPMcO1yzkpXsJMVPKoSkpIGMjKRIlNx7 +MxpWSaJURlYpiazClR2S/L79dV/v1+dzznOe13PFXX2tPdgpFMpKNgrl36+P +vUZkDedOHMsTzSoWEsRtOQF886CItxI/Jr9/xo+u7uemt5srovlTjWqhbH5M +lUj46uyoiGFZ5Re8LvPjkqz8gleBinh/r/eU4X5+/HxraG9CoSKaWmuebR/n +w0upzjdlJZSwsvtNzT45Phy4Qtthu1QZB1vYtvXl8uJtf0nLx3UquGSPn+u7 +L1xY9LXyiugXFXwlc2ZrUw0XVpkceH16WAVz7XkkWQ+4sG9zsrYu7y786tRw +yeUsF0q3cG1vNNqF7dKmXsZbuJChNMwzWLULo2kNDUtPLcWSqcKX60pVMTe8 +7O+cFCe+cTZfPFOritu6mp4nreDEz3VD6r0fVfHDjGG0wQIHzmdLFN3/pYrt +3CJi31o5UHtfUuYuZSpei84tWRrJgdWPA0Mt86lYOyp9hG1wCb4/Carnc9SQ +seRnlf1zdjzacPNGxiM1LLihf+4hkx15pf8slr1Uw8B99Us3pLOjQVtJ7fg3 +NQw4L7VZJogdy5QU7Q9uUEdGnb3icmV2zB6TDFVPUceahbmOdUw2DPTmfTl2 +UQNf0i93tNEpuLrKawtfqgZWDv+6TEunYJHY6ytb7mkgT72yfks0BUdqz+11 +qtHA+JjGG4LHKOi6ZaH/HZsm0m4M7zXeSUFa3yj3vWBNTLvLqWh2YhHEndrM +D/hoIct0qsuhcAGyK5e/DgjWwpWSfxIHUxZAWsIEoi9q4fnvplJxYQuw7UeF +fHm2Fopf+R65hbYAu/xzBcU6tfDa6vx3IT/+AO3C6eZWM22MTp78wZT6Aycf +iNvQ5AF5ufoM4gp/w6ygY4ObFuBQhdBzgRu/4fTxZMPTpoC61SP775z/DeHU +Zap5hwDlKSWJAra/4UrVlAh3JuBEzlTv0OIcWA73sly4EQuWFSXk7pkDj8Un +D9YHIX5wKFDJ5Z2FVVxrr70IR2TXeXN39fQMVAmcCfK4iNjkPi+S1jUDmzYY +6TNTEFdHLE35/mgGvmh+/KT5BHH61A3rBOcZsA6e4XCcRLQcOGa34ukv0J5W +dUg7qoNsqvF0gXPTMPLnBmqf0MGxdfUHtvtNQzoHRbonRAf9Tm1Y43xgGuaE +asdko3VQ4UjxfjbqNDxStL1QmqeD9kU2wQo/p0DOL7Cw/bsOVvyiwA6nKRAZ +LuEScdXFZfsHxYVok0Cd5Z2hHtbFRhMOuSzNSbDnPDBg76eL4fOxTrh9EtI3 +stXcCtPFPWbVfHkCk7B5r3GE9A1dFDB5+1yheQJ2PPv0R6VVF4UbvrxccJgA +w6u/x/ca6qFf+olzW4PHIUBJ80uCnD7myUa4u5SPguOu0a64nfooUG6akXNn +FPTVsnpjqfq4XYFDnhI9CkLAPXzZUB8nYvJHZxxHocikdS7CVR/nxk18Rhd/ +wpiLj8jxNH38tO/73iHjn3AkLt16D68BujNLWgNGWGCdaGFjtcIAmze4bLRt +Z4F6Mru9hagBvnlUsGj+kgW86V4uptIGeHu9o/yp6yzIvafsp6drgB+SrFbm +G7JgoKIuRinYAN82ux2mZw+D68ifWqEhA8z1nn9nfmwIil/9mr4/boBa6Qti +A3ZDwJc5thnnDFA9tjgz3oDk1n0hPtyGuEaFb0FyPclL3inUSBvixZidger1 +g/A4Ii31pJshsmrOcfHvHARuUarXpy+GaClyeE/Z0h/A1D3OldFohD6l06db ++/shQNxB++EHI9T0NC76/qEfNCl6J153GqHMcJMKd20/1D1b2Ts6bISc6lEj +fnn9wKIWVSD3bpTO5srq8u0HOfnxEz24Gz/ogof0Qh/krvXtkyrajWcvsC79 +3dQH2VPeLxjXjPHsUvH3Cld64NP96+J26cbI7vNpVjGsBwQO1p7lzDZG67Sr +ajr/9UDQGyldp4fGGBW5ruHs/h4wv9VdtbzZGG29jdriJXtgzsim2n+5CUZ0 +NK3tqfwG5jd0XlMvm+D2fs1cFts3mNURra8+Y4ppov2H9Ay7YIp1T8csyhSD +07t+/trZBaMpqk/aYk1xTGKr7tP1XTAwYpMxcJPkeY+XhEx/hdbrSf9xPzXF +ptA94/U5X6FwfKUwbdYUBeWoRXSer+B9m/9gix8Nt3E86G7t/AKdlCXj31zM +cNMlTUvzR5+BVhju+8PLDL9cmWrnyfkMZS5/R376muGFnYuOTUmfIblqbmg+ +1Az9rm2QO3/qM1ieH+tbnWaGsWZZmac0PkMV19d242YzdLcz9oyu+QR3BUor +C3XNcXnap8HNPe1wbJ1v3FkJC7z/qVagVf0jmNxRom7aaoFdEpNV27Z/BGm5 +2a4KRQu8OXUpJ27jR+hUPSv/R8cCf8WyvQ3i+Ai0PYkNJ50tsOcky+l9wweQ +vVzM53PTAlm7TfdHenyAifkz+vRlluj3sau3Jq0NHhyurUyKtMRly7n5zm5u +hbb822KSlywxQOOyxirRVvgzHexfFG2J7LE9gvn8rWAasV2yMdESefKWJMzP +tsCPtIQo7ixLlMnnUxxtbAHxOkfz0xWWyDFTulHjTAtc2zHe4TxjiWGhLi+o +vc0QPCk2s/WwFY5FVSgHPm+C9uxk96VHrTAvdcd9nidNsMtGqLnbzwo9tYL2 +ZTGaYKKEj5kUaIXhr3vVB683gXfYoutilBWuOXDhTF1AE9jx9Dc03yX7zs+o +925tAurGgrtBfVZI1apQl8p4D9MmhjavD1oj68QT0wM7G2HXqcn6q27W2M2K +FubY3AiBdzINbA9Z43t/xV+PVzbC7/nfyoPHrJG7Y1O9+lQD/GXkCy0Ls8Zl +vQp1r4sbYOlysSbzdGv8FWhdPYANINIybPqh3RpXHs2hztrXg5pDvE6/1R6M +38YXe47xDprFbnpXK+3FaJcYwbiBWlhz99zTXJl9GJSQ/6TZ9hWUdMvRzPlt +8PCCXqC2ZTVsaB07dHLEBust56Kep1SBUlI84073fvTQbnUznK+EmxyTOxJe +2iL9ZXobj+NzeKIj/zmy1A4dZoJ5Lv54Cqmql1f8ybPHC/3+jZ1NZdDYkXNB +KdoBS6hMa5n1pfDYLF3SL9wRK2P02tJCi2H86B7KMfcDeGCHcccXmScwbSjr +9VPPCb+KyzyzYHsMuSOfZo/vOoheVzuE7QYegu3tHLcDfM5ofrl4PGqhCB4W +mR5cEuWM9oGPC6Q3FoHa2ua5S3POGP7NPjHeqxAkug99bjrsgs5RoX3X3xZA +37IjFum9LsjiEWQPUi6A97Hmbkb7XHFTgNrJjoB8uBaYsezEe1esvLI6Rivu +ATytWJxzM3bDsdlUllQTE3a+UKZuMXXDAlm3zakNTLj78vDJIRrJ+UsofHVM +iK9tmfCzdEPnV0qPZ18xwbP53nDofjfs9u8Z63/KhBUDFp0pHiRve2Cx/D7J ++TMr350lVnqdmRbBhOWOGKVU5oZorkULUWfCplWvG9c9dcNw87FBaSoTFOrM +RJdWuGHm+XKHFhUmWGs63G9/4YaUrEelO3cy4dq6k+9C35B9cotWHDJMWNNJ +X17bTswsvUIRZoKkk0iq4wzpx8nNWE0yQM35Z26ksjtS7E2S8SED7l4fO26+ +yx27q+yaQgoZsKplQluESnLevOiyfAb8NJhpzdVwR2fhlgh1BgOyt1LY6nTd +MXNtpTsthwECMyvsVlq5I5aXlBenMKAvRoUn4yjp25jn5YUywOq1aushX3fc +lJRiLxzCgAqKeobCf2S/ZfvZc8EMuH5cW6UqgMy7ySq7nmKAuZ2RS/9pkqsE +bdr5HwNKJe1Kt152x0qa3JdVHgyILQ85XHLXHcPX3BKcMGPAUcUUtcBckneX +SyTSGEC7X8hDzSPzIjYpKqYM4E0ZuF/MJP0x0Yyw3QyI9LccevKI9AOS5MT1 +GBAiK3nkcRXx6TWUXCoDvFPe+RR9JfP7dLaUSzLAWGBA07+b+Hrc1ygJBshE +UvgVe8i+wNTRfZsZMOCvwizsJ/fL82z4tZEBLuYZIwUs4uSFu4ZrGWDLefxY +/m8yn3tEW2YlA4yOr/FjCHtguKmEGovCgKqMCyYJosQab93qF+mgWTchGbjG +AyvdwzcU/KWDgtS7T3obiOVBL/gPHcQ+ntbrkPJAjBbTF5+lw7B6pzCvCnFI +x1TpKB2usmc+O7SHWD8kf1U3HXjl+VLN9nkg5SL91JYuOpx3CPRX2k9ytrtv +NL7SIfCR5ZZFe5K77+Y9/IUOLp5s8cmu5HmZnnNt7XRQeuvqXvMfuW9E/PBc +Ex0+xkstk4gjNmbz9aihwwPg9/oRT+Zl7uQ9rib7R6aqmYkkr3tB5SJWNK4O +o6YQ17DRHlTRIZbiNmF2izjO15Svkg6GvpmfAhnknsK2JK5yOqxff3GX9gOS +d21j+ZTRYeqtb+KSAnKPIC2xpZQOWdJgFvuQ9DlDW7JL6LDQ2Vl5p4zYeVR0 +/xM6PKKtzW2oJf2SxazfhXS48pud89pb4tlDvwOIXXOHXOzqyL0/1t4eK6CD +IEfZ2r5Gknsu/zKcTwefcturcx/IPp16zgkmHSTkkk9K9pN71G8Ja+XR4ffH +0JbBAZIn/bKtu0+H95EeCvk/SI42g47EYd+Uh9RYxLw9k2dz6fA5teWAxSR5 +HlXlQcddOiRwrTAIZvPE8D/1ufV36PB0otMhYIknUloFZA8Rf+/M8z/GSeyi +uZudWPORfqYrD+n38rppZdFhwDlw3mSFJ1aqG3C/ziT30wxWGgiRXKw09Cix +hupKWVhN5n+GxK8mjuNn2CiJeSIGMhK9M0he1lW4VpzMx9dQZG7RwTOHUbta +gti+ybPjJunHBXUtlyL7ynO844gHPIX4OWRJPuxtuphOciEjL5YCyZXrfMdu +0KHsr9CZAUWyP/VMVQFx/2B3UrcycdSlIn9i9crgl61UMr/nmPd8Gh36fB5s +eIbkPout1E3EAranVYp1Se6JASPX6aCmt5tWqE+sZ2H2lDhWrCcoZzfpayh+ +cCIu4ciPyzAh+cbJSEXi3tHT967TiJ2imrmIqa9Wt8VYkr4Ul25xKvnehT3D +UdbEG3vc44lj0vPZI/aS+218JY8S9/gbK5y0JfOc54JkifmdhI387Ek/eV6A +l5hq3HvA25Hk13h1WClkfmPoFSdn8n5FLcGPiUt4TbJsXUk/LiIinbhnWrjU +2p3kdoXSkcT833obaZ7Eug6HfImpdQUDhl7Ezaf1HYhdi0MX0JvMDwhU7P63 +P8tklYYPyQsFW1X/7Y8R2apyjNxbHHpB5t/+wD4deT/Sb7NuW0PM515oK+tP ++uoxlQLEqhZhvhIBJPeW283xb7+66YX1J4l1ZHzmk+kQLSV6UySQ9IfOb5si +fiLY/3BFMMkHtS/9JP42X/h2WQjJhfdFDBHzfQ/7xhlG3v/GK5EfxLuaTWcX +z/z7/yYYfyf+H/V694k= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "PlotRange" -> {{0, 180}, {0., 4.019255192523573}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8149,7 +14887,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6044061540843444}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8177,7 +14916,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 4.019255192523573}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8185,9 +14925,9 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913320330871353`*^9}, + CellChangeTimes->{3.9913320330871353`*^9, 3.993832242006922*^9}, CellLabel-> - "Out[220]=",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] + "Out[139]=",ExpressionUUID->"94df3071-edb1-44dc-b874-61786598e499"] }, Open ]], Cell[CellGroupData[{ @@ -8250,205 +14990,233 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918491076725483`*^9, - 3.9918491120260525`*^9}},ExpressionUUID->"cbec275e-4d01-7747-9ece-\ -7fa9a2a651b1"], + CellChangeTimes->{{3.9918491076725483`*^9, 3.9918491120260525`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2976471457269651`*^-270\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 221, - 189, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033325203*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2831772721458108`*^-244\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 61, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.99383224211445*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], +In[140]:=",ExpressionUUID->"cadacce7-1e62-4e63-ac19-bb2ca07a9d15"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.376858869110442`*^-282\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 221, 190, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913320333342056`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.219497316903649`*^-252\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 62, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.993832242119135*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], +In[140]:=",ExpressionUUID->"8ebef459-812c-4212-8720-ea899feea3e7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.193593532260836`*^-293\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 221, 191, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033342205*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1231012138803437`*^-259\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 63, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.993832242123087*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], +In[140]:=",ExpressionUUID->"ec8a7fff-491f-426d-aee2-9b0e88402b34"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 221, 192, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033351204*^9}, +during this calculation.\"", 2, 140, 64, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.993832242126583*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], +In[140]:=",ExpressionUUID->"ee6f62c8-2f82-4607-856c-7b6cb1a0c1c4"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk8lN8Xx6WUJfs21lIoJMswGOY5J4osiQqRIrvIvmQpRCIq7UhI0qJk +N4M2JOQraySlRKJsZV/ym99fz+v9uq/7nPs553PuuTJOvgdcWVlYWLrWsLD8 +/zv7pbFONimX+LDx66nOCkuiM5MUtqvnLCy/qO99iaqAwu+dSD1X4c6pL29S +ESHE4nH32p4cOHdfI+wUWgD/uOjVhe5iEPCoMNFER+ivNved7q4Bk0NbbhuB +HxjKjn6e6m6HBEf3b9m60bDQrXVjsnsAsqpfDQkrp0CtwYPctpy/4PLDwdw2 +NRsk+xk/nHasgJlpqtQ63ocg5O3weIPBWqSVW64/U1kAihvu1VvYrMXRl463 +67oKAHN+DKR5rcUmshDL8mQBePeclNhxfS2yvh/noG17BnW7I5Mthtbi4t++ +vvXXnkGQVJpP2vl1+GB5e1M3uRA6WtrVlZrZ8OJAglEcaxFcVTOsMrdix9Na +UYst8cWg8snWiObBjpY9Lhx3rhRDc9zJDqUIdvTlb3Z2ziiG9T3Xf7HfZUfW +uHtjPUXFEHHmu0Ttb3b8ukqbd+srBpd30ZFacRy4gX+Qb6NqCVBcq2ibSzix +LVbqoUtbCXTwvG/kqedEw6WAdZRPJeBHH7Ba6eFErfCHJquDJfCYi9On9x8n +BkeOJobNl8Cm4sOZ1024sGrP6cSNm0qBfXXmH/sAFxoNeJs9PlEKH1NVX03x +cWN3otO/kqVSSO/I5w2R40apjIYXOmxlYMezzWFRhxvr6p/mlfGUQV+s1D9W +Z2705341cFmmDL76cOoJlXHjBUdq/X+GZfBz92AFxZYHPRMM5E5eLoP5yVvP +Iu7yYtbJSEUlsXJgKAmurpbx4jlPhTB/mXIId7tkHtfEizoG2k+eKpTD8qe4 +seS/vPjxtwhjA7Ucor/Thd9v4cPWy6/19e3KIa7l/sGvQXyYcn3dh/ep5ZCU +G/WeVYwfX3NlJ+3mqQATDU8B4a38KFryZLescAWw1x2w2qbMj5sv7pJclKiA +uO9yn0x3Mdk2QTZBoQIitzT/uO7JjyyvnyYq764An2zSP/lKfjT5IUXcCa0A +y4yiHaZHBNDZGEJ4uiuAb8dt36OuAvjX7ap5UV8FtFTFFfv6CmDjiYeEyQAz +/icb7euxArhRm8v92FgF6Iv/M/icL4CT/blfedfSQSPV5IjvsgAeHX/bfGsH +HUSvf0+8dkcQ0/+SUuAUHUhKZXHzeYLoqvZhyC6SDuI18VFHCwVR5bZ8wclo +OkhPKgRvqxVEFv7htLAEOsiZ+TlW/RTE6/kvZhVT6UBet0L5ThbCewXUjOky +ZrzbLWp7aUL4UXJj0nkGHSjq2TueGgohP5KX+Z/TgeposCXUVgiftpJOcNfR +YVd1IjdXlBCaPDt+I7ONDvuDRAbVm4RQbFxeX+kXHSy4fn651SGEezMujFDG +6XAgh/FxuU8Ib8+WbaNO0cG61f59/YQQ9p/Z7LNtjg5Hd9yrtBMWRt29XmZ3 +WBngNahy5ayjMDL+vMibE2WAd8Sa5GFPJqez+50WZ4CPQEe8WaAwtigLjSxK +MiAAQyJF4oXxhZnJVJ8MA8Iyqt0f5wtjuI1IEk2JAecPGRPts8IYnRQQFqDH +APHSFnHWNSJYqM/PkUUwoEDw0Jwalwi6yYxNv0YGfGg/VnhlkwimhoX+Gt3N +AFnLoC2We0XwIVf37UYzBtALF/5FHxBB3UaK1SNzBpjxRX0qtBfBfIWsqCgL +BgS+T7zO5y+C1qVH1HkPMaBmX9b61jQRfFMZYV9txwDrp7LfV++JYG/u5Oh+ +ewaMbnz8UqVABKfP3GPpPcoA/ubSU5drRDBR3Oi/NkcGOJo0jZr/EsGzMlY0 +CzcGTD/a//bMjAjGcjjZpLoz9XF03StYFcHBbn2+bg+mnoZ+ex4hUXz2X9EJ +bS8GrBjOtPynJ4qffjeRknwZkJIXnr9iKIqxCt1RCX5MfetZEpQtRfF9bG5m +pD9TzxvOXRddRfH1qj2fcSADvsqmSD33FcWm/TWeMkFMfXHCi7/DRNGT7/P5 +SSanG2wuMbskincGHDYFhjBg5737lyNTRbFIxytLPpSpn1XJ+0mOKMacDZhq +ZbK1U+Heviei6MfbSQo4xYCR15pyGytEcUrvL4kzjAGRMlVr9F6L4nVv7ZlU +JvPF4Bevd6L4Z5WvSDqcAdpoeutdvyj6Vpp08UQwoDmrNXBphHn+0KzdYUx2 +XLWyUJoWRc0qn7u9TJ4+9mnHkX+iOJBOTKhHMvP1wpEjiZ2EPTzpameZLC79 +Y6hSgIRZv/i8G5hccNqrZlSShBaftXLYTjNA//Nkpvg2Elo7PezWYfIHvZAI +EzUSOtaz8Lky+UTGkk24Lgl1pQbNzzN5ZSla4/EeEl6iLd7KZnLKkfX8vftJ +2F81MV7IZNmqpDEOOxLKDQXb0JlMF+dv0nEh4ShDv6ucyWbhN/M8fUhY9ZPP ++wmTv36UiE07RcJdjVmb0pgcqHPXofEsCT9al/yNZLJJNs+0aTIJJz9qPbRj +8pYNkQktN0jYMhX2QJXJCydHJC2zSHi64fr0P6a+1k7roo6HJMz+l3f1DZMf +6tbtsS4m4d8H7XFxTI7KUevtqSKhqxGtRZfJ1hxZPkfekDD4HW/AL2Y+d/pt +XPulhYS2F0ICrzGZrTvslmMPCU2Iu11kJvfRhpW+fyPh0zW1t5uZ9SrNPfTK +9RcJA00FGo8yOYmr5tDPaRIK/GpwHGbW1ylAZeTEPxIur5N182Qy9WPG6bEN +YpjF49L3nemPn3mheX/ExTB2z/3tNUz/vOQeogbLimFTqxbb//11M+jA+zll +MbRlaXc4y/TfHn3l+WUUQ/b/nDNkgxkg+Sg9OcpEDC3o68+dYPp1mpddhvWQ +GO7t27DwkOnvnM8DxhvcxfBbfGYKbwDz/tht8SXRTwz/a52v1GL2g0X+84CN +4WLo3U49c5jZL6unUm/zXxTD5RmZz7E+DLAXMh+TKBHD+cLP9mdPMIAcURWT +WS2GLmWvCnw9GcA5sF1Epl4MMy3JZVbM/mQ8WwvyH5n6vneOcTH7WcSUkaK6 +KoZ3qnn8ZY4zYKxIXq6EXRyVi481dTowoI50naEpII4VcnnT0ceY9f/hM0CV +E8fRhvim2iPMesbIauwxFccWmtS3v1YMePDzSsPbQ+KYuPneNh/m/XNm/6q9 +yTFx7LmO9t8OMEBZqvfcfn9x3EI+n1m8nwEX6Je7bW+J464WYoLFmAG7JxbD +fb6Lo2DAAocFlZmPvdcVX/8Wx9Ae7n4XbWZ/3FXuFZwVR6vAtC2BFAaQDjnq +MNgl8C575tpIdQb8pr+ZW7tTAjOXr14DRQZcO5sSlHZKAvU6tGSvkBjQ8ElB +9neMBIbIW6YRIgxY1qjtIJIk0CBqLX1IkAFuwzPqg3ck0GKz0RoZXqYfzI5M +7ayVQG/vvcpmbAwYEJb3qeOWxBj9l7tOTTLno+9LKVFRSTw8/ZtUM0YHs4bD +/3lulsT6gF8f2JjzqDw8aQcvWRI3qP0WiRiiw4X+yVHbw5J4J81eSKqXDuqP +qtwnciRx9WlbsH4NHWL0LI+La0vhkUsvi3deosPeY5l/tPSl8GyW3Sf/C3Tg +if4Va2UmhdETP70L4umQUXsuL8VRCvMPv+sXjKID3aTy1/pEKaS2n7uV4kuH +ycNbQ/5+lMLat3W/rPbT4VjwzIXmCGn0f8fnocnJnK8FaaVnXm5Cc1aXEyE+ +FbC7u2VlvGETpsY73rrlWQHmLOuMHNo3Yc5ghUapSwU4H/D5CEOb8K1ReHu/ +XQUYRshERbNtRgFGBGmNUQX4bZq9t0tpM7rrK7z2la6AOvessdqQzVh8+pui +VFM5eM9PRTdwy6BSUPi/MuFyWFDi+6JstQUlF+T1dJ1KQS//SfbNm1uxO8fv +p+XFYpgSMHG0rpFFx5djj7PqCmEw2dE6YIM8tr6oe+qQ8xSMJ0KNhyjbcKJD +JlqK/zH8dmYPLI3ajiPL5H93HPOY73VR1vM1Ctix4Xad85p7IPCf/KXCCUUs +GrnZcn8z832e8MyCQtmBLfE7r918kA6pSjp8gu7KGLY+duUX101oEt+l+ffK +TrQJ1TWcF78KVMmaFJUPKng75Zw/71AyDGyV/TLSq4J/yrkshZqTIVEpXim3 +XwVjn0t3KZQkQw/VpJ40ooI3zN1L42OSIdS2fWnNsgq6KMypbtiUDHam/uRR +PlXMbhLZLH00CW4mMNuXooqGReS58KFE4FmbE3T8rCq+lZkfuSN3HtYvvDw4 +FaeK34319D/xnId/45/VY86rouL0tmOK8/Ew0Ss2lZ2siiyaUq9WmuKhtfjK +ya83VZFv7vueU/7xcNUpxs0hXxWF5cjiZa/PgUiN4+Gjncz49jcdBX3jQDpm +k56tvBrKJal+jl+KgYJA9i2ft6vh00OHkoxHYoBwm9pwXEkNy80fm0l0x8BR +09oOD1U1DNNi//mrOAYyhN29TlHVULFO/jZ6xYDY44L0W+Zq+Lln/Hnhl2gQ +6qAtdIWoIf10auBgdhRwyNmXH3irhs5cA7KHqyLghBiY5Deq4UjB8uP+rAho +4t7yZW2zGrZkd3afjouA5NlhtrJWNfypkT+5si8CeBoCrUR71XBpb1s+10A4 +CHglTX/6rYYeCvalljzhIFlUqe4qoI5/NOvblEJPwU6a2LPQo+ro/+BoMu18 +MJRs9VxidVTHL9oalO2+waDNyTC65KSOe3YffKZgEwz63Ye/5rqrY1xSV4vf +tmCw9k/lb/dXx9yn7avcjUEQdV80aEe8Ov6o4d0cwhcErdwiOt8K1PHCzvfs +l54FgNW06znvInVc/eb+hJweAL29ZW1zJeo4wVOzdTwuAAYfWJ3gYagjjT97 +/127AJjfdeO2bq06vlsIHf23PgBkQoT+3ehWx0bOY8WJzv4Q8EWg1oSFjCr+ +LQMBSn7QUG///DErGWPbPOa7xPxA+lleBScbGWWm3C4as/tBUxT1SRMHGf8m +1nLWNfnCFhmnGyaCZKz9oVf5FH2hzbnI3USejK+kJQKT1H1AdWT/RhMzMlLM +325+p+wN8W1p6x+bk9FfTVg5lscb+hjfWTgtybi057aR7YQXJFwInWm0IqNg +4ntThyIv+KqU9cXYgYxnuRMFWilekOIzXmgcQMYLqmsaVI1OwMTfZCvjVDJ2 +i8c4HTjtAX09d63vpJNxdVckyw4nD2h6Xm4zlUFGZzbTzk1GHpB7/qtt2l0y ++iZzNlvxe4CdhMaxkcdkjCHX183nucMb/U9uic/JeO/lDHJ0u8HtKwqnGgfI ++GHdzVuNxq6QEEKESQ2RsTo9Xr9WzRVCjhwM9x8m4/3VvfmdYq5gIXc6Uuw3 +8/z3+zyJURdYz2iN9pwhY6FPTrxSsgv4fw1N5GDXQGLoaeWRTmcwUqlPN1bW +wMa7O1euBDvB4fV7D7WqaKCCho3R1WNOcOJzI7eNugZeVhxtyjdygktJ/0W7 +aGng03aFrYriTvBhuNMtapcGGoLEHctXx8El+7t6mZUG+jBkubX5j8NZ/jXv +Np/RwDU/Hn9LSXSA6z/Pxj2I1kC3Ao6biccdIO/lOmJnrAbK5FrjMx0HaDrJ +XqSboIFqDv4t0aPHgL+J95b1VQ28UPtST9v8GGSflXZOztPAs/PvpTqljsKL +v7pLcy0amN3bEHuvzw7uNlc4HWzTQAzYd5tWbQdx98lNBR0a+KOkNmDxth0Y +2yilufZoIM/XDYOfjthBZ6W4Vsc3DcyX43SjfraF0ZiFgIJpDdzelddn8uMw +iPBVjLqIa2L86CX/IT4bWPipfuCVpCaO+XHtzpi2hr7XBQyJTZrobFTHH9Bj +DXcD8xLat2pizsZHSuHZ1rCj+4Y8Kmuij8xHyoKaNehnBjlJoCZyNAZ+TLOz +Ap8d6r1trpro8HRTb87rgxA8J77o4KGJhUL8gn/yDkJkzVrx8ROaOHmU/97x +5IOQdLjLltNPEwV4BfTv2hyEh3GnPuqHa2LZSumHzIkDMND3oqfkkiZ2pbbF +h8gdAOuLpt03KjSx76hyc/kDCzh6WGNua6Umpse5fm5LsQCXrVKixdWaaLn3 +nCFHuAUEMsatW15r4kjQsQfNZhaQMnTlw/pmTbxj7le8e3g/NNF6ukK/amKg +V9nyl2RzoI27dNpyUDB0u/dQ0qopiFQZ5VRzUfBv1IXE5V5TGD+v6LeJh4LB +M342qeWmkCkzyTUkQMHYCPeXFj6m8O9QhIGfJAW1Mu5PvOw3gZdVV4rjVSjY +KL3zjX+TMexKfJFSYkXBU4O85MXnRiBuffeYyGEKiokrf4/MNII/W+J2hNlR +8OLbrFC5KCPIqTZuIBwoqCGz9HQYjYB1snO10YOCgb/IS0r1hlBr/cvnawQF +XXUWPl3p3gN7ZEn7uHMoyMcqX/RWaDeUjr2Rccml4Cs8FG+waACyFYGzlXkU +LF20ovb3G8A6k/dZHvkUnDNhpQfnG0CNb/yf2lIKHsEnjhK7DYComr4V/paC +gkfkI3dE6APlQNvA8G8K6nBzusStIuRJRFUQExR0L0wYrv6JIDy0I/nGFAVD ++P4Z87cjTIcmaBrMUpByZyuZ+z5C8R1IyFyl4Lreh/vNzRBURp4qWwlo4bm+ +2YcVALA9+sKpGi0trO76q1BWqgfVuvfZzKhaWC8UNuh4QQ8s5l5e7dLTwobC +1vo9jnpwymfmyc9dWvhs+PwkY6MeNNg7fuMx08LWaTW33R664KFDMTniqIWv +h712PFCgwqM/3ySmE7RQoDn5XF+HFhAFyw9PJ2mhu3KghXKhFrR7ilI2XNLC +1TZd1WfJWrD41cxC/JoWDqqr0PYYaoHJ+4o4vKOF4BG7prSKAqP5F8eSi7Tw +0ImsBx7PNEHRVeelXK8WPjTOvppJJ8PlLeaLsX1a+MhH2C47gwzT/U6aA1+0 +8ODxekZ9NBle2CXnZ37XwpkGoZvRxmQ4YNF/S3RMC8ms7mK5feoQpnvOj4NF +GxOcXC6f41CHBv42mTE5bTy7sn3heqQqKL8fsjfdro12QaqlH11U4Wry4q1H +itpoE229QNunCvYbZHncVLTRy+bLBRdpVZhYDln8oq2NJzNFnE3jVEDkp2RH +q6k2uv97FPtMeie4vvCIK/XXxvS6tlKWKCUYPzkauidIG+96GkzGH1SCU1Le +Xh9CtFF9QvCd2XYluBDpe2A+Qhttd/Zx32xXhEJqyGa9eG2sj0rJE1ZUhOXy +2OradG3kVXtwMGZwO1x9ljndXquNKy2WB/vj5EHSYfNP53ptPEfNMnjuKA/3 +eXI+TTdoY0XHw3+tevJAP3m/RqSFuT94pSh1Rg4+Kz1JsevRRs3L35XuesrB +9oeMHQO/tfGA40Dw4SOy8DK702VKWAcDV5KqY5y3wFczGYcQkg7OL0WmSBlu +AZaFk7ZL4jrY0XVcaGj7FtC33GDOtlkHr5Xpwey4DNSvoWqJKeog4alYIX5a +Bpqdsjh2Ecz1B0N1Onc3Q6/siYIUNx00/L5u5QaPNCy1lj8U9tRBs1Ynny+f +pUDy9Np76V46GGYTGur3VAqOdmXcyvXTwTd311f67pOCr+feR9PDdZCa0L38 +PkUShn9oHPx6SQdbL7OPv5KVgOmHq3MqFTq4KUGuruEMCX5YG2YnMnRwg5m1 +OdWWBD3rLu79XqWDvyjBWd/IJKhyFE+7+UoHtzb3RrSOiMJZkiZ1pVEHN4f/ +Cdp2WBT4Ek5ENvXpYFHUHvUzhAjscO9icWWlImF14MKKihBIC0s+erGOiriy +jfU+nxDw1TpZkjZQcXDJYF34lCD8lZ68+46LisHDjSX5JYJQ+YHTQF2YivYT +jtu2UQVhryGeW91GRWXJl+dN9guAs1w+R/o+Kqb6QktxKh+Evzl2Qt6CigZ8 +3yI8I/kgxVXgXfEBKja3gd0+Rz6ovh+W/M6Gisbkpszb2/lASH4v78pxKkrP +/ttyM4QX6uWHhBxDqDhlEScV3sYNits3bZbPoqKSStuDoDpOwIb26OK7VJxo +OdygfZMTrD3ivxG5VJy0Vxk28uCE2IdjOTaPqNg1X3h0Dzcn9G2vlkssoWJa +YB1LkR0HXFKwVfr9looWXZ05v1jZYUrxGqV4korUgWQfvng26GnGPYJ/qbg9 +0qrwuxMbvPIZPxg0Q8XS+SK2MWCDS8XG/pRFKt5OrS7PXlwHilSWJ5VrdXHD +Ts6PsQHrwMn4pEytiC4GNgqlzXmthU53o42derqYnLHmTEbsGqjimBHXBF3U +e7d1/p7bGsjJz1G4uUsX37eZpfUYrwG/iRXDw4a62MLPZdrAtwa4Q0tj+vbr +okZcrE1lNgsYxsvMDTrp4m6OTRudr6wS9NylbzMJuijeYXs6xmeZoBgEzZkk +6aLEj0M/u2GZKPv2e2P2RV1MP3b6Vgj/MlEs/UXL5Koumhw1k0kqWyKepL66 +mHlbF8fdStLY1iwR2cnndIwKdDHXYjZlOHeBSAzivZLaoYs5H9q0yqXmCHbB +hLyxLl3s6vrBajU3S8QXsVTr9+jiTLwFm2rbLBE3PvXjd58u5i847k87N0uc +8ejU2/VDFxN+i51UmZohAuzTfo7M62KWxdIf6Y5pwm73VtSV1sPEFwbn3738 +Q6x0svPUbtbDDPZB39w7f4hs1/FPJlv1kIvPX4se8Yf4Ec8Itduuh4/Hy4cv +af8hAhr3PwtT10PBkzEXxkuniAvmkdJ0Qz18tudOkjx9kqg83LWs4auHLyzl +BeSax4ijI5VN1f56aHm/ZVb9xhjBEp6dujtID6se6fRnHxsjDG97aRwK08O5 +c8GG6X9+E+2f13gHxurhq0Yjvz/Sv4lRp52fim7p4T0nL1pJwighcfI8Y+cr +PXz7n8TJ0xnDxKVVN82kGj0MdfISsg8cJlivGhYN1+mh8AtL+hmTYWK0nO1R +dqMe5o217L+08IOoZIlLFejQwyTrrYfe2f0g7K5Hh84OMf+/MLXfWWGISK0K +03zBRcP+Gpc7R6cHiI3mtkXiPDS8lJShtdg+QER/1VYO5aNhe79/UUvRAOHB +Ni+rKkzDIyHyg1J+A4TW/hChHGkaltdsrTWd+EZ8GAj4e06NhnOn5ybT574S +wpzeRftsaDhy6G1L6pEvRK7B6fBJWxrGB49lGWz6QqifvmRwzZ6GYUs7Ixy/ +fybMJwu7eo7TMH9d2tYx789E/IeZBWdvGq68v2mud66PmM+J0g+PoeE2DvlP +65t6ifi+FC6pOBo6DizVB1/vJYREcjpfxtMw5AJvtolDL6GaWOfGlkxD+xJN +YuvsR8LTlyMp5SYNleO2eUVu/0j06l7ryMunYe3gYWeNrG7CIzg3w7iAhvsc +JtsKfLuJ2YIy19+FNGwcXG8Yh92EwJaeObVyGqZYEU9o3z8QpuxSks9f0XCT +9L4nPTs+ENWdeS4dXTRk7CW1y7Z2EiY8dOWQHhoOq1rlrsvrJHqMGmdJn5jx +t4w/0YzsJKYrfyUc+0rDK/Y0/kSFTkL5rurTkVEaShrEKQ+d7yCqe3eFJI/R +kGeyq5hw7CBMhA6CyiQNeyZHhwe1Owi388FtQTPM9ddGqsK/2onpV/HpovM0 +5Pt1RDmzrp04u3jLuXKRhmZKjU/9M9sJPo1HO46u0DBytX775VPtRObJypnV +VRq+uxkqMnugnfgfMvxJJg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8462,164 +15230,188 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwVlnk8lN8Xx6WUJfs21lIoJMswGOY5J4osiQqRIrvIvmQpRCIq7UhI0qJk +N4M2JOQraySlRKJsZV/ym99fz+v9uq/7nPs553PuuTJOvgdcWVlYWLrWsLD8 +/zv7pbFONimX+LDx66nOCkuiM5MUtqvnLCy/qO99iaqAwu+dSD1X4c6pL29S +ESHE4nH32p4cOHdfI+wUWgD/uOjVhe5iEPCoMNFER+ivNved7q4Bk0NbbhuB +HxjKjn6e6m6HBEf3b9m60bDQrXVjsnsAsqpfDQkrp0CtwYPctpy/4PLDwdw2 +NRsk+xk/nHasgJlpqtQ63ocg5O3weIPBWqSVW64/U1kAihvu1VvYrMXRl463 +67oKAHN+DKR5rcUmshDL8mQBePeclNhxfS2yvh/noG17BnW7I5Mthtbi4t++ +vvXXnkGQVJpP2vl1+GB5e1M3uRA6WtrVlZrZ8OJAglEcaxFcVTOsMrdix9Na +UYst8cWg8snWiObBjpY9Lhx3rhRDc9zJDqUIdvTlb3Z2ziiG9T3Xf7HfZUfW +uHtjPUXFEHHmu0Ttb3b8ukqbd+srBpd30ZFacRy4gX+Qb6NqCVBcq2ibSzix +LVbqoUtbCXTwvG/kqedEw6WAdZRPJeBHH7Ba6eFErfCHJquDJfCYi9On9x8n +BkeOJobNl8Cm4sOZ1024sGrP6cSNm0qBfXXmH/sAFxoNeJs9PlEKH1NVX03x +cWN3otO/kqVSSO/I5w2R40apjIYXOmxlYMezzWFRhxvr6p/mlfGUQV+s1D9W +Z2705341cFmmDL76cOoJlXHjBUdq/X+GZfBz92AFxZYHPRMM5E5eLoP5yVvP +Iu7yYtbJSEUlsXJgKAmurpbx4jlPhTB/mXIId7tkHtfEizoG2k+eKpTD8qe4 +seS/vPjxtwhjA7Ucor/Thd9v4cPWy6/19e3KIa7l/sGvQXyYcn3dh/ep5ZCU +G/WeVYwfX3NlJ+3mqQATDU8B4a38KFryZLescAWw1x2w2qbMj5sv7pJclKiA +uO9yn0x3Mdk2QTZBoQIitzT/uO7JjyyvnyYq764An2zSP/lKfjT5IUXcCa0A +y4yiHaZHBNDZGEJ4uiuAb8dt36OuAvjX7ap5UV8FtFTFFfv6CmDjiYeEyQAz +/icb7euxArhRm8v92FgF6Iv/M/icL4CT/blfedfSQSPV5IjvsgAeHX/bfGsH +HUSvf0+8dkcQ0/+SUuAUHUhKZXHzeYLoqvZhyC6SDuI18VFHCwVR5bZ8wclo +OkhPKgRvqxVEFv7htLAEOsiZ+TlW/RTE6/kvZhVT6UBet0L5ThbCewXUjOky +ZrzbLWp7aUL4UXJj0nkGHSjq2TueGgohP5KX+Z/TgeposCXUVgiftpJOcNfR +YVd1IjdXlBCaPDt+I7ONDvuDRAbVm4RQbFxeX+kXHSy4fn651SGEezMujFDG +6XAgh/FxuU8Ib8+WbaNO0cG61f59/YQQ9p/Z7LNtjg5Hd9yrtBMWRt29XmZ3 +WBngNahy5ayjMDL+vMibE2WAd8Sa5GFPJqez+50WZ4CPQEe8WaAwtigLjSxK +MiAAQyJF4oXxhZnJVJ8MA8Iyqt0f5wtjuI1IEk2JAecPGRPts8IYnRQQFqDH +APHSFnHWNSJYqM/PkUUwoEDw0Jwalwi6yYxNv0YGfGg/VnhlkwimhoX+Gt3N +AFnLoC2We0XwIVf37UYzBtALF/5FHxBB3UaK1SNzBpjxRX0qtBfBfIWsqCgL +BgS+T7zO5y+C1qVH1HkPMaBmX9b61jQRfFMZYV9txwDrp7LfV++JYG/u5Oh+ +ewaMbnz8UqVABKfP3GPpPcoA/ubSU5drRDBR3Oi/NkcGOJo0jZr/EsGzMlY0 +CzcGTD/a//bMjAjGcjjZpLoz9XF03StYFcHBbn2+bg+mnoZ+ex4hUXz2X9EJ +bS8GrBjOtPynJ4qffjeRknwZkJIXnr9iKIqxCt1RCX5MfetZEpQtRfF9bG5m +pD9TzxvOXRddRfH1qj2fcSADvsqmSD33FcWm/TWeMkFMfXHCi7/DRNGT7/P5 +SSanG2wuMbskincGHDYFhjBg5737lyNTRbFIxytLPpSpn1XJ+0mOKMacDZhq +ZbK1U+Heviei6MfbSQo4xYCR15pyGytEcUrvL4kzjAGRMlVr9F6L4nVv7ZlU +JvPF4Bevd6L4Z5WvSDqcAdpoeutdvyj6Vpp08UQwoDmrNXBphHn+0KzdYUx2 +XLWyUJoWRc0qn7u9TJ4+9mnHkX+iOJBOTKhHMvP1wpEjiZ2EPTzpameZLC79 +Y6hSgIRZv/i8G5hccNqrZlSShBaftXLYTjNA//Nkpvg2Elo7PezWYfIHvZAI +EzUSOtaz8Lky+UTGkk24Lgl1pQbNzzN5ZSla4/EeEl6iLd7KZnLKkfX8vftJ +2F81MV7IZNmqpDEOOxLKDQXb0JlMF+dv0nEh4ShDv6ucyWbhN/M8fUhY9ZPP ++wmTv36UiE07RcJdjVmb0pgcqHPXofEsCT9al/yNZLJJNs+0aTIJJz9qPbRj +8pYNkQktN0jYMhX2QJXJCydHJC2zSHi64fr0P6a+1k7roo6HJMz+l3f1DZMf +6tbtsS4m4d8H7XFxTI7KUevtqSKhqxGtRZfJ1hxZPkfekDD4HW/AL2Y+d/pt +XPulhYS2F0ICrzGZrTvslmMPCU2Iu11kJvfRhpW+fyPh0zW1t5uZ9SrNPfTK +9RcJA00FGo8yOYmr5tDPaRIK/GpwHGbW1ylAZeTEPxIur5N182Qy9WPG6bEN +YpjF49L3nemPn3mheX/ExTB2z/3tNUz/vOQeogbLimFTqxbb//11M+jA+zll +MbRlaXc4y/TfHn3l+WUUQ/b/nDNkgxkg+Sg9OcpEDC3o68+dYPp1mpddhvWQ +GO7t27DwkOnvnM8DxhvcxfBbfGYKbwDz/tht8SXRTwz/a52v1GL2g0X+84CN +4WLo3U49c5jZL6unUm/zXxTD5RmZz7E+DLAXMh+TKBHD+cLP9mdPMIAcURWT +WS2GLmWvCnw9GcA5sF1Epl4MMy3JZVbM/mQ8WwvyH5n6vneOcTH7WcSUkaK6 +KoZ3qnn8ZY4zYKxIXq6EXRyVi481dTowoI50naEpII4VcnnT0ceY9f/hM0CV +E8fRhvim2iPMesbIauwxFccWmtS3v1YMePDzSsPbQ+KYuPneNh/m/XNm/6q9 +yTFx7LmO9t8OMEBZqvfcfn9x3EI+n1m8nwEX6Je7bW+J464WYoLFmAG7JxbD +fb6Lo2DAAocFlZmPvdcVX/8Wx9Ae7n4XbWZ/3FXuFZwVR6vAtC2BFAaQDjnq +MNgl8C575tpIdQb8pr+ZW7tTAjOXr14DRQZcO5sSlHZKAvU6tGSvkBjQ8ElB +9neMBIbIW6YRIgxY1qjtIJIk0CBqLX1IkAFuwzPqg3ck0GKz0RoZXqYfzI5M +7ayVQG/vvcpmbAwYEJb3qeOWxBj9l7tOTTLno+9LKVFRSTw8/ZtUM0YHs4bD +/3lulsT6gF8f2JjzqDw8aQcvWRI3qP0WiRiiw4X+yVHbw5J4J81eSKqXDuqP +qtwnciRx9WlbsH4NHWL0LI+La0vhkUsvi3deosPeY5l/tPSl8GyW3Sf/C3Tg +if4Va2UmhdETP70L4umQUXsuL8VRCvMPv+sXjKID3aTy1/pEKaS2n7uV4kuH +ycNbQ/5+lMLat3W/rPbT4VjwzIXmCGn0f8fnocnJnK8FaaVnXm5Cc1aXEyE+ +FbC7u2VlvGETpsY73rrlWQHmLOuMHNo3Yc5ghUapSwU4H/D5CEOb8K1ReHu/ +XQUYRshERbNtRgFGBGmNUQX4bZq9t0tpM7rrK7z2la6AOvessdqQzVh8+pui +VFM5eM9PRTdwy6BSUPi/MuFyWFDi+6JstQUlF+T1dJ1KQS//SfbNm1uxO8fv +p+XFYpgSMHG0rpFFx5djj7PqCmEw2dE6YIM8tr6oe+qQ8xSMJ0KNhyjbcKJD +JlqK/zH8dmYPLI3ajiPL5H93HPOY73VR1vM1Ctix4Xad85p7IPCf/KXCCUUs +GrnZcn8z832e8MyCQtmBLfE7r918kA6pSjp8gu7KGLY+duUX101oEt+l+ffK +TrQJ1TWcF78KVMmaFJUPKng75Zw/71AyDGyV/TLSq4J/yrkshZqTIVEpXim3 +XwVjn0t3KZQkQw/VpJ40ooI3zN1L42OSIdS2fWnNsgq6KMypbtiUDHam/uRR +PlXMbhLZLH00CW4mMNuXooqGReS58KFE4FmbE3T8rCq+lZkfuSN3HtYvvDw4 +FaeK34319D/xnId/45/VY86rouL0tmOK8/Ew0Ss2lZ2siiyaUq9WmuKhtfjK +ya83VZFv7vueU/7xcNUpxs0hXxWF5cjiZa/PgUiN4+Gjncz49jcdBX3jQDpm +k56tvBrKJal+jl+KgYJA9i2ft6vh00OHkoxHYoBwm9pwXEkNy80fm0l0x8BR +09oOD1U1DNNi//mrOAYyhN29TlHVULFO/jZ6xYDY44L0W+Zq+Lln/Hnhl2gQ +6qAtdIWoIf10auBgdhRwyNmXH3irhs5cA7KHqyLghBiY5Deq4UjB8uP+rAho +4t7yZW2zGrZkd3afjouA5NlhtrJWNfypkT+5si8CeBoCrUR71XBpb1s+10A4 +CHglTX/6rYYeCvalljzhIFlUqe4qoI5/NOvblEJPwU6a2LPQo+ro/+BoMu18 +MJRs9VxidVTHL9oalO2+waDNyTC65KSOe3YffKZgEwz63Ye/5rqrY1xSV4vf +tmCw9k/lb/dXx9yn7avcjUEQdV80aEe8Ov6o4d0cwhcErdwiOt8K1PHCzvfs +l54FgNW06znvInVc/eb+hJweAL29ZW1zJeo4wVOzdTwuAAYfWJ3gYagjjT97 +/127AJjfdeO2bq06vlsIHf23PgBkQoT+3ehWx0bOY8WJzv4Q8EWg1oSFjCr+ +LQMBSn7QUG///DErGWPbPOa7xPxA+lleBScbGWWm3C4as/tBUxT1SRMHGf8m +1nLWNfnCFhmnGyaCZKz9oVf5FH2hzbnI3USejK+kJQKT1H1AdWT/RhMzMlLM +325+p+wN8W1p6x+bk9FfTVg5lscb+hjfWTgtybi057aR7YQXJFwInWm0IqNg +4ntThyIv+KqU9cXYgYxnuRMFWilekOIzXmgcQMYLqmsaVI1OwMTfZCvjVDJ2 +i8c4HTjtAX09d63vpJNxdVckyw4nD2h6Xm4zlUFGZzbTzk1GHpB7/qtt2l0y ++iZzNlvxe4CdhMaxkcdkjCHX183nucMb/U9uic/JeO/lDHJ0u8HtKwqnGgfI ++GHdzVuNxq6QEEKESQ2RsTo9Xr9WzRVCjhwM9x8m4/3VvfmdYq5gIXc6Uuw3 +8/z3+zyJURdYz2iN9pwhY6FPTrxSsgv4fw1N5GDXQGLoaeWRTmcwUqlPN1bW +wMa7O1euBDvB4fV7D7WqaKCCho3R1WNOcOJzI7eNugZeVhxtyjdygktJ/0W7 +aGng03aFrYriTvBhuNMtapcGGoLEHctXx8El+7t6mZUG+jBkubX5j8NZ/jXv +Np/RwDU/Hn9LSXSA6z/Pxj2I1kC3Ao6biccdIO/lOmJnrAbK5FrjMx0HaDrJ +XqSboIFqDv4t0aPHgL+J95b1VQ28UPtST9v8GGSflXZOztPAs/PvpTqljsKL +v7pLcy0amN3bEHuvzw7uNlc4HWzTQAzYd5tWbQdx98lNBR0a+KOkNmDxth0Y +2yilufZoIM/XDYOfjthBZ6W4Vsc3DcyX43SjfraF0ZiFgIJpDdzelddn8uMw +iPBVjLqIa2L86CX/IT4bWPipfuCVpCaO+XHtzpi2hr7XBQyJTZrobFTHH9Bj +DXcD8xLat2pizsZHSuHZ1rCj+4Y8Kmuij8xHyoKaNehnBjlJoCZyNAZ+TLOz +Ap8d6r1trpro8HRTb87rgxA8J77o4KGJhUL8gn/yDkJkzVrx8ROaOHmU/97x +5IOQdLjLltNPEwV4BfTv2hyEh3GnPuqHa2LZSumHzIkDMND3oqfkkiZ2pbbF +h8gdAOuLpt03KjSx76hyc/kDCzh6WGNua6Umpse5fm5LsQCXrVKixdWaaLn3 +nCFHuAUEMsatW15r4kjQsQfNZhaQMnTlw/pmTbxj7le8e3g/NNF6ukK/amKg +V9nyl2RzoI27dNpyUDB0u/dQ0qopiFQZ5VRzUfBv1IXE5V5TGD+v6LeJh4LB +M342qeWmkCkzyTUkQMHYCPeXFj6m8O9QhIGfJAW1Mu5PvOw3gZdVV4rjVSjY +KL3zjX+TMexKfJFSYkXBU4O85MXnRiBuffeYyGEKiokrf4/MNII/W+J2hNlR +8OLbrFC5KCPIqTZuIBwoqCGz9HQYjYB1snO10YOCgb/IS0r1hlBr/cvnawQF +XXUWPl3p3gN7ZEn7uHMoyMcqX/RWaDeUjr2Rccml4Cs8FG+waACyFYGzlXkU +LF20ovb3G8A6k/dZHvkUnDNhpQfnG0CNb/yf2lIKHsEnjhK7DYComr4V/paC +gkfkI3dE6APlQNvA8G8K6nBzusStIuRJRFUQExR0L0wYrv6JIDy0I/nGFAVD ++P4Z87cjTIcmaBrMUpByZyuZ+z5C8R1IyFyl4Lreh/vNzRBURp4qWwlo4bm+ +2YcVALA9+sKpGi0trO76q1BWqgfVuvfZzKhaWC8UNuh4QQ8s5l5e7dLTwobC +1vo9jnpwymfmyc9dWvhs+PwkY6MeNNg7fuMx08LWaTW33R664KFDMTniqIWv +h712PFCgwqM/3ySmE7RQoDn5XF+HFhAFyw9PJ2mhu3KghXKhFrR7ilI2XNLC +1TZd1WfJWrD41cxC/JoWDqqr0PYYaoHJ+4o4vKOF4BG7prSKAqP5F8eSi7Tw +0ImsBx7PNEHRVeelXK8WPjTOvppJJ8PlLeaLsX1a+MhH2C47gwzT/U6aA1+0 +8ODxekZ9NBle2CXnZ37XwpkGoZvRxmQ4YNF/S3RMC8ms7mK5feoQpnvOj4NF +GxOcXC6f41CHBv42mTE5bTy7sn3heqQqKL8fsjfdro12QaqlH11U4Wry4q1H +itpoE229QNunCvYbZHncVLTRy+bLBRdpVZhYDln8oq2NJzNFnE3jVEDkp2RH +q6k2uv97FPtMeie4vvCIK/XXxvS6tlKWKCUYPzkauidIG+96GkzGH1SCU1Le +Xh9CtFF9QvCd2XYluBDpe2A+Qhttd/Zx32xXhEJqyGa9eG2sj0rJE1ZUhOXy +2OradG3kVXtwMGZwO1x9ljndXquNKy2WB/vj5EHSYfNP53ptPEfNMnjuKA/3 +eXI+TTdoY0XHw3+tevJAP3m/RqSFuT94pSh1Rg4+Kz1JsevRRs3L35XuesrB +9oeMHQO/tfGA40Dw4SOy8DK702VKWAcDV5KqY5y3wFczGYcQkg7OL0WmSBlu +AZaFk7ZL4jrY0XVcaGj7FtC33GDOtlkHr5Xpwey4DNSvoWqJKeog4alYIX5a +Bpqdsjh2Ecz1B0N1Onc3Q6/siYIUNx00/L5u5QaPNCy1lj8U9tRBs1Ynny+f +pUDy9Np76V46GGYTGur3VAqOdmXcyvXTwTd311f67pOCr+feR9PDdZCa0L38 +PkUShn9oHPx6SQdbL7OPv5KVgOmHq3MqFTq4KUGuruEMCX5YG2YnMnRwg5m1 +OdWWBD3rLu79XqWDvyjBWd/IJKhyFE+7+UoHtzb3RrSOiMJZkiZ1pVEHN4f/ +Cdp2WBT4Ek5ENvXpYFHUHvUzhAjscO9icWWlImF14MKKihBIC0s+erGOiriy +jfU+nxDw1TpZkjZQcXDJYF34lCD8lZ68+46LisHDjSX5JYJQ+YHTQF2YivYT +jtu2UQVhryGeW91GRWXJl+dN9guAs1w+R/o+Kqb6QktxKh+Evzl2Qt6CigZ8 +3yI8I/kgxVXgXfEBKja3gd0+Rz6ovh+W/M6Gisbkpszb2/lASH4v78pxKkrP +/ttyM4QX6uWHhBxDqDhlEScV3sYNits3bZbPoqKSStuDoDpOwIb26OK7VJxo +OdygfZMTrD3ivxG5VJy0Vxk28uCE2IdjOTaPqNg1X3h0Dzcn9G2vlkssoWJa +YB1LkR0HXFKwVfr9looWXZ05v1jZYUrxGqV4korUgWQfvng26GnGPYJ/qbg9 +0qrwuxMbvPIZPxg0Q8XS+SK2MWCDS8XG/pRFKt5OrS7PXlwHilSWJ5VrdXHD +Ts6PsQHrwMn4pEytiC4GNgqlzXmthU53o42derqYnLHmTEbsGqjimBHXBF3U +e7d1/p7bGsjJz1G4uUsX37eZpfUYrwG/iRXDw4a62MLPZdrAtwa4Q0tj+vbr +okZcrE1lNgsYxsvMDTrp4m6OTRudr6wS9NylbzMJuijeYXs6xmeZoBgEzZkk +6aLEj0M/u2GZKPv2e2P2RV1MP3b6Vgj/MlEs/UXL5Koumhw1k0kqWyKepL66 +mHlbF8fdStLY1iwR2cnndIwKdDHXYjZlOHeBSAzivZLaoYs5H9q0yqXmCHbB +hLyxLl3s6vrBajU3S8QXsVTr9+jiTLwFm2rbLBE3PvXjd58u5i847k87N0uc +8ejU2/VDFxN+i51UmZohAuzTfo7M62KWxdIf6Y5pwm73VtSV1sPEFwbn3738 +Q6x0svPUbtbDDPZB39w7f4hs1/FPJlv1kIvPX4se8Yf4Ec8Itduuh4/Hy4cv +af8hAhr3PwtT10PBkzEXxkuniAvmkdJ0Qz18tudOkjx9kqg83LWs4auHLyzl +BeSax4ijI5VN1f56aHm/ZVb9xhjBEp6dujtID6se6fRnHxsjDG97aRwK08O5 +c8GG6X9+E+2f13gHxurhq0Yjvz/Sv4lRp52fim7p4T0nL1pJwighcfI8Y+cr +PXz7n8TJ0xnDxKVVN82kGj0MdfISsg8cJlivGhYN1+mh8AtL+hmTYWK0nO1R +dqMe5o217L+08IOoZIlLFejQwyTrrYfe2f0g7K5Hh84OMf+/MLXfWWGISK0K +03zBRcP+Gpc7R6cHiI3mtkXiPDS8lJShtdg+QER/1VYO5aNhe79/UUvRAOHB +Ni+rKkzDIyHyg1J+A4TW/hChHGkaltdsrTWd+EZ8GAj4e06NhnOn5ybT574S +wpzeRftsaDhy6G1L6pEvRK7B6fBJWxrGB49lGWz6QqifvmRwzZ6GYUs7Ixy/ +fybMJwu7eo7TMH9d2tYx789E/IeZBWdvGq68v2mud66PmM+J0g+PoeE2DvlP +65t6ifi+FC6pOBo6DizVB1/vJYREcjpfxtMw5AJvtolDL6GaWOfGlkxD+xJN +YuvsR8LTlyMp5SYNleO2eUVu/0j06l7ryMunYe3gYWeNrG7CIzg3w7iAhvsc +JtsKfLuJ2YIy19+FNGwcXG8Yh92EwJaeObVyGqZYEU9o3z8QpuxSks9f0XCT +9L4nPTs+ENWdeS4dXTRk7CW1y7Z2EiY8dOWQHhoOq1rlrsvrJHqMGmdJn5jx +t4w/0YzsJKYrfyUc+0rDK/Y0/kSFTkL5rurTkVEaShrEKQ+d7yCqe3eFJI/R +kGeyq5hw7CBMhA6CyiQNeyZHhwe1Owi388FtQTPM9ddGqsK/2onpV/HpovM0 +5Pt1RDmzrp04u3jLuXKRhmZKjU/9M9sJPo1HO46u0DBytX775VPtRObJypnV +VRq+uxkqMnugnfgfMvxJJg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.09957458625094213}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8631,19 +15423,19 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.09957458625094213}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8657,163 +15449,187 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwVlnk8lN8Xx6WUJfs21lIoJMswGOY5J4osiQqRIrvIvmQpRCIq7UhI0qJk +N4M2JOQraySlRKJsZV/ym99fz+v9uq/7nPs553PuuTJOvgdcWVlYWLrWsLD8 +/zv7pbFONimX+LDx66nOCkuiM5MUtqvnLCy/qO99iaqAwu+dSD1X4c6pL29S +ESHE4nH32p4cOHdfI+wUWgD/uOjVhe5iEPCoMNFER+ivNved7q4Bk0NbbhuB +HxjKjn6e6m6HBEf3b9m60bDQrXVjsnsAsqpfDQkrp0CtwYPctpy/4PLDwdw2 +NRsk+xk/nHasgJlpqtQ63ocg5O3weIPBWqSVW64/U1kAihvu1VvYrMXRl463 +67oKAHN+DKR5rcUmshDL8mQBePeclNhxfS2yvh/noG17BnW7I5Mthtbi4t++ +vvXXnkGQVJpP2vl1+GB5e1M3uRA6WtrVlZrZ8OJAglEcaxFcVTOsMrdix9Na +UYst8cWg8snWiObBjpY9Lhx3rhRDc9zJDqUIdvTlb3Z2ziiG9T3Xf7HfZUfW +uHtjPUXFEHHmu0Ttb3b8ukqbd+srBpd30ZFacRy4gX+Qb6NqCVBcq2ibSzix +LVbqoUtbCXTwvG/kqedEw6WAdZRPJeBHH7Ba6eFErfCHJquDJfCYi9On9x8n +BkeOJobNl8Cm4sOZ1024sGrP6cSNm0qBfXXmH/sAFxoNeJs9PlEKH1NVX03x +cWN3otO/kqVSSO/I5w2R40apjIYXOmxlYMezzWFRhxvr6p/mlfGUQV+s1D9W +Z2705341cFmmDL76cOoJlXHjBUdq/X+GZfBz92AFxZYHPRMM5E5eLoP5yVvP +Iu7yYtbJSEUlsXJgKAmurpbx4jlPhTB/mXIId7tkHtfEizoG2k+eKpTD8qe4 +seS/vPjxtwhjA7Ucor/Thd9v4cPWy6/19e3KIa7l/sGvQXyYcn3dh/ep5ZCU +G/WeVYwfX3NlJ+3mqQATDU8B4a38KFryZLescAWw1x2w2qbMj5sv7pJclKiA +uO9yn0x3Mdk2QTZBoQIitzT/uO7JjyyvnyYq764An2zSP/lKfjT5IUXcCa0A +y4yiHaZHBNDZGEJ4uiuAb8dt36OuAvjX7ap5UV8FtFTFFfv6CmDjiYeEyQAz +/icb7euxArhRm8v92FgF6Iv/M/icL4CT/blfedfSQSPV5IjvsgAeHX/bfGsH +HUSvf0+8dkcQ0/+SUuAUHUhKZXHzeYLoqvZhyC6SDuI18VFHCwVR5bZ8wclo +OkhPKgRvqxVEFv7htLAEOsiZ+TlW/RTE6/kvZhVT6UBet0L5ThbCewXUjOky +ZrzbLWp7aUL4UXJj0nkGHSjq2TueGgohP5KX+Z/TgeposCXUVgiftpJOcNfR +YVd1IjdXlBCaPDt+I7ONDvuDRAbVm4RQbFxeX+kXHSy4fn651SGEezMujFDG +6XAgh/FxuU8Ib8+WbaNO0cG61f59/YQQ9p/Z7LNtjg5Hd9yrtBMWRt29XmZ3 +WBngNahy5ayjMDL+vMibE2WAd8Sa5GFPJqez+50WZ4CPQEe8WaAwtigLjSxK +MiAAQyJF4oXxhZnJVJ8MA8Iyqt0f5wtjuI1IEk2JAecPGRPts8IYnRQQFqDH +APHSFnHWNSJYqM/PkUUwoEDw0Jwalwi6yYxNv0YGfGg/VnhlkwimhoX+Gt3N +AFnLoC2We0XwIVf37UYzBtALF/5FHxBB3UaK1SNzBpjxRX0qtBfBfIWsqCgL +BgS+T7zO5y+C1qVH1HkPMaBmX9b61jQRfFMZYV9txwDrp7LfV++JYG/u5Oh+ +ewaMbnz8UqVABKfP3GPpPcoA/ubSU5drRDBR3Oi/NkcGOJo0jZr/EsGzMlY0 +CzcGTD/a//bMjAjGcjjZpLoz9XF03StYFcHBbn2+bg+mnoZ+ex4hUXz2X9EJ +bS8GrBjOtPynJ4qffjeRknwZkJIXnr9iKIqxCt1RCX5MfetZEpQtRfF9bG5m +pD9TzxvOXRddRfH1qj2fcSADvsqmSD33FcWm/TWeMkFMfXHCi7/DRNGT7/P5 +SSanG2wuMbskincGHDYFhjBg5737lyNTRbFIxytLPpSpn1XJ+0mOKMacDZhq +ZbK1U+Heviei6MfbSQo4xYCR15pyGytEcUrvL4kzjAGRMlVr9F6L4nVv7ZlU +JvPF4Bevd6L4Z5WvSDqcAdpoeutdvyj6Vpp08UQwoDmrNXBphHn+0KzdYUx2 +XLWyUJoWRc0qn7u9TJ4+9mnHkX+iOJBOTKhHMvP1wpEjiZ2EPTzpameZLC79 +Y6hSgIRZv/i8G5hccNqrZlSShBaftXLYTjNA//Nkpvg2Elo7PezWYfIHvZAI +EzUSOtaz8Lky+UTGkk24Lgl1pQbNzzN5ZSla4/EeEl6iLd7KZnLKkfX8vftJ +2F81MV7IZNmqpDEOOxLKDQXb0JlMF+dv0nEh4ShDv6ucyWbhN/M8fUhY9ZPP ++wmTv36UiE07RcJdjVmb0pgcqHPXofEsCT9al/yNZLJJNs+0aTIJJz9qPbRj +8pYNkQktN0jYMhX2QJXJCydHJC2zSHi64fr0P6a+1k7roo6HJMz+l3f1DZMf +6tbtsS4m4d8H7XFxTI7KUevtqSKhqxGtRZfJ1hxZPkfekDD4HW/AL2Y+d/pt +XPulhYS2F0ICrzGZrTvslmMPCU2Iu11kJvfRhpW+fyPh0zW1t5uZ9SrNPfTK +9RcJA00FGo8yOYmr5tDPaRIK/GpwHGbW1ylAZeTEPxIur5N182Qy9WPG6bEN +YpjF49L3nemPn3mheX/ExTB2z/3tNUz/vOQeogbLimFTqxbb//11M+jA+zll +MbRlaXc4y/TfHn3l+WUUQ/b/nDNkgxkg+Sg9OcpEDC3o68+dYPp1mpddhvWQ +GO7t27DwkOnvnM8DxhvcxfBbfGYKbwDz/tht8SXRTwz/a52v1GL2g0X+84CN +4WLo3U49c5jZL6unUm/zXxTD5RmZz7E+DLAXMh+TKBHD+cLP9mdPMIAcURWT +WS2GLmWvCnw9GcA5sF1Epl4MMy3JZVbM/mQ8WwvyH5n6vneOcTH7WcSUkaK6 +KoZ3qnn8ZY4zYKxIXq6EXRyVi481dTowoI50naEpII4VcnnT0ceY9f/hM0CV +E8fRhvim2iPMesbIauwxFccWmtS3v1YMePDzSsPbQ+KYuPneNh/m/XNm/6q9 +yTFx7LmO9t8OMEBZqvfcfn9x3EI+n1m8nwEX6Je7bW+J464WYoLFmAG7JxbD +fb6Lo2DAAocFlZmPvdcVX/8Wx9Ae7n4XbWZ/3FXuFZwVR6vAtC2BFAaQDjnq +MNgl8C575tpIdQb8pr+ZW7tTAjOXr14DRQZcO5sSlHZKAvU6tGSvkBjQ8ElB +9neMBIbIW6YRIgxY1qjtIJIk0CBqLX1IkAFuwzPqg3ck0GKz0RoZXqYfzI5M +7ayVQG/vvcpmbAwYEJb3qeOWxBj9l7tOTTLno+9LKVFRSTw8/ZtUM0YHs4bD +/3lulsT6gF8f2JjzqDw8aQcvWRI3qP0WiRiiw4X+yVHbw5J4J81eSKqXDuqP +qtwnciRx9WlbsH4NHWL0LI+La0vhkUsvi3deosPeY5l/tPSl8GyW3Sf/C3Tg +if4Va2UmhdETP70L4umQUXsuL8VRCvMPv+sXjKID3aTy1/pEKaS2n7uV4kuH +ycNbQ/5+lMLat3W/rPbT4VjwzIXmCGn0f8fnocnJnK8FaaVnXm5Cc1aXEyE+ +FbC7u2VlvGETpsY73rrlWQHmLOuMHNo3Yc5ghUapSwU4H/D5CEOb8K1ReHu/ +XQUYRshERbNtRgFGBGmNUQX4bZq9t0tpM7rrK7z2la6AOvessdqQzVh8+pui +VFM5eM9PRTdwy6BSUPi/MuFyWFDi+6JstQUlF+T1dJ1KQS//SfbNm1uxO8fv +p+XFYpgSMHG0rpFFx5djj7PqCmEw2dE6YIM8tr6oe+qQ8xSMJ0KNhyjbcKJD +JlqK/zH8dmYPLI3ajiPL5H93HPOY73VR1vM1Ctix4Xad85p7IPCf/KXCCUUs +GrnZcn8z832e8MyCQtmBLfE7r918kA6pSjp8gu7KGLY+duUX101oEt+l+ffK +TrQJ1TWcF78KVMmaFJUPKng75Zw/71AyDGyV/TLSq4J/yrkshZqTIVEpXim3 +XwVjn0t3KZQkQw/VpJ40ooI3zN1L42OSIdS2fWnNsgq6KMypbtiUDHam/uRR +PlXMbhLZLH00CW4mMNuXooqGReS58KFE4FmbE3T8rCq+lZkfuSN3HtYvvDw4 +FaeK34319D/xnId/45/VY86rouL0tmOK8/Ew0Ss2lZ2siiyaUq9WmuKhtfjK +ya83VZFv7vueU/7xcNUpxs0hXxWF5cjiZa/PgUiN4+Gjncz49jcdBX3jQDpm +k56tvBrKJal+jl+KgYJA9i2ft6vh00OHkoxHYoBwm9pwXEkNy80fm0l0x8BR +09oOD1U1DNNi//mrOAYyhN29TlHVULFO/jZ6xYDY44L0W+Zq+Lln/Hnhl2gQ +6qAtdIWoIf10auBgdhRwyNmXH3irhs5cA7KHqyLghBiY5Deq4UjB8uP+rAho +4t7yZW2zGrZkd3afjouA5NlhtrJWNfypkT+5si8CeBoCrUR71XBpb1s+10A4 +CHglTX/6rYYeCvalljzhIFlUqe4qoI5/NOvblEJPwU6a2LPQo+ro/+BoMu18 +MJRs9VxidVTHL9oalO2+waDNyTC65KSOe3YffKZgEwz63Ye/5rqrY1xSV4vf +tmCw9k/lb/dXx9yn7avcjUEQdV80aEe8Ov6o4d0cwhcErdwiOt8K1PHCzvfs +l54FgNW06znvInVc/eb+hJweAL29ZW1zJeo4wVOzdTwuAAYfWJ3gYagjjT97 +/127AJjfdeO2bq06vlsIHf23PgBkQoT+3ehWx0bOY8WJzv4Q8EWg1oSFjCr+ +LQMBSn7QUG///DErGWPbPOa7xPxA+lleBScbGWWm3C4as/tBUxT1SRMHGf8m +1nLWNfnCFhmnGyaCZKz9oVf5FH2hzbnI3USejK+kJQKT1H1AdWT/RhMzMlLM +325+p+wN8W1p6x+bk9FfTVg5lscb+hjfWTgtybi057aR7YQXJFwInWm0IqNg +4ntThyIv+KqU9cXYgYxnuRMFWilekOIzXmgcQMYLqmsaVI1OwMTfZCvjVDJ2 +i8c4HTjtAX09d63vpJNxdVckyw4nD2h6Xm4zlUFGZzbTzk1GHpB7/qtt2l0y ++iZzNlvxe4CdhMaxkcdkjCHX183nucMb/U9uic/JeO/lDHJ0u8HtKwqnGgfI ++GHdzVuNxq6QEEKESQ2RsTo9Xr9WzRVCjhwM9x8m4/3VvfmdYq5gIXc6Uuw3 +8/z3+zyJURdYz2iN9pwhY6FPTrxSsgv4fw1N5GDXQGLoaeWRTmcwUqlPN1bW +wMa7O1euBDvB4fV7D7WqaKCCho3R1WNOcOJzI7eNugZeVhxtyjdygktJ/0W7 +aGng03aFrYriTvBhuNMtapcGGoLEHctXx8El+7t6mZUG+jBkubX5j8NZ/jXv +Np/RwDU/Hn9LSXSA6z/Pxj2I1kC3Ao6biccdIO/lOmJnrAbK5FrjMx0HaDrJ +XqSboIFqDv4t0aPHgL+J95b1VQ28UPtST9v8GGSflXZOztPAs/PvpTqljsKL +v7pLcy0amN3bEHuvzw7uNlc4HWzTQAzYd5tWbQdx98lNBR0a+KOkNmDxth0Y +2yilufZoIM/XDYOfjthBZ6W4Vsc3DcyX43SjfraF0ZiFgIJpDdzelddn8uMw +iPBVjLqIa2L86CX/IT4bWPipfuCVpCaO+XHtzpi2hr7XBQyJTZrobFTHH9Bj +DXcD8xLat2pizsZHSuHZ1rCj+4Y8Kmuij8xHyoKaNehnBjlJoCZyNAZ+TLOz +Ap8d6r1trpro8HRTb87rgxA8J77o4KGJhUL8gn/yDkJkzVrx8ROaOHmU/97x +5IOQdLjLltNPEwV4BfTv2hyEh3GnPuqHa2LZSumHzIkDMND3oqfkkiZ2pbbF +h8gdAOuLpt03KjSx76hyc/kDCzh6WGNua6Umpse5fm5LsQCXrVKixdWaaLn3 +nCFHuAUEMsatW15r4kjQsQfNZhaQMnTlw/pmTbxj7le8e3g/NNF6ukK/amKg +V9nyl2RzoI27dNpyUDB0u/dQ0qopiFQZ5VRzUfBv1IXE5V5TGD+v6LeJh4LB +M342qeWmkCkzyTUkQMHYCPeXFj6m8O9QhIGfJAW1Mu5PvOw3gZdVV4rjVSjY +KL3zjX+TMexKfJFSYkXBU4O85MXnRiBuffeYyGEKiokrf4/MNII/W+J2hNlR +8OLbrFC5KCPIqTZuIBwoqCGz9HQYjYB1snO10YOCgb/IS0r1hlBr/cvnawQF +XXUWPl3p3gN7ZEn7uHMoyMcqX/RWaDeUjr2Rccml4Cs8FG+waACyFYGzlXkU +LF20ovb3G8A6k/dZHvkUnDNhpQfnG0CNb/yf2lIKHsEnjhK7DYComr4V/paC +gkfkI3dE6APlQNvA8G8K6nBzusStIuRJRFUQExR0L0wYrv6JIDy0I/nGFAVD ++P4Z87cjTIcmaBrMUpByZyuZ+z5C8R1IyFyl4Lreh/vNzRBURp4qWwlo4bm+ +2YcVALA9+sKpGi0trO76q1BWqgfVuvfZzKhaWC8UNuh4QQ8s5l5e7dLTwobC +1vo9jnpwymfmyc9dWvhs+PwkY6MeNNg7fuMx08LWaTW33R664KFDMTniqIWv +h712PFCgwqM/3ySmE7RQoDn5XF+HFhAFyw9PJ2mhu3KghXKhFrR7ilI2XNLC +1TZd1WfJWrD41cxC/JoWDqqr0PYYaoHJ+4o4vKOF4BG7prSKAqP5F8eSi7Tw +0ImsBx7PNEHRVeelXK8WPjTOvppJJ8PlLeaLsX1a+MhH2C47gwzT/U6aA1+0 +8ODxekZ9NBle2CXnZ37XwpkGoZvRxmQ4YNF/S3RMC8ms7mK5feoQpnvOj4NF +GxOcXC6f41CHBv42mTE5bTy7sn3heqQqKL8fsjfdro12QaqlH11U4Wry4q1H +itpoE229QNunCvYbZHncVLTRy+bLBRdpVZhYDln8oq2NJzNFnE3jVEDkp2RH +q6k2uv97FPtMeie4vvCIK/XXxvS6tlKWKCUYPzkauidIG+96GkzGH1SCU1Le +Xh9CtFF9QvCd2XYluBDpe2A+Qhttd/Zx32xXhEJqyGa9eG2sj0rJE1ZUhOXy +2OradG3kVXtwMGZwO1x9ljndXquNKy2WB/vj5EHSYfNP53ptPEfNMnjuKA/3 +eXI+TTdoY0XHw3+tevJAP3m/RqSFuT94pSh1Rg4+Kz1JsevRRs3L35XuesrB +9oeMHQO/tfGA40Dw4SOy8DK702VKWAcDV5KqY5y3wFczGYcQkg7OL0WmSBlu +AZaFk7ZL4jrY0XVcaGj7FtC33GDOtlkHr5Xpwey4DNSvoWqJKeog4alYIX5a +Bpqdsjh2Ecz1B0N1Onc3Q6/siYIUNx00/L5u5QaPNCy1lj8U9tRBs1Ynny+f +pUDy9Np76V46GGYTGur3VAqOdmXcyvXTwTd311f67pOCr+feR9PDdZCa0L38 +PkUShn9oHPx6SQdbL7OPv5KVgOmHq3MqFTq4KUGuruEMCX5YG2YnMnRwg5m1 +OdWWBD3rLu79XqWDvyjBWd/IJKhyFE+7+UoHtzb3RrSOiMJZkiZ1pVEHN4f/ +Cdp2WBT4Ek5ENvXpYFHUHvUzhAjscO9icWWlImF14MKKihBIC0s+erGOiriy +jfU+nxDw1TpZkjZQcXDJYF34lCD8lZ68+46LisHDjSX5JYJQ+YHTQF2YivYT +jtu2UQVhryGeW91GRWXJl+dN9guAs1w+R/o+Kqb6QktxKh+Evzl2Qt6CigZ8 +3yI8I/kgxVXgXfEBKja3gd0+Rz6ovh+W/M6Gisbkpszb2/lASH4v78pxKkrP +/ttyM4QX6uWHhBxDqDhlEScV3sYNits3bZbPoqKSStuDoDpOwIb26OK7VJxo +OdygfZMTrD3ivxG5VJy0Vxk28uCE2IdjOTaPqNg1X3h0Dzcn9G2vlkssoWJa +YB1LkR0HXFKwVfr9looWXZ05v1jZYUrxGqV4korUgWQfvng26GnGPYJ/qbg9 +0qrwuxMbvPIZPxg0Q8XS+SK2MWCDS8XG/pRFKt5OrS7PXlwHilSWJ5VrdXHD +Ts6PsQHrwMn4pEytiC4GNgqlzXmthU53o42derqYnLHmTEbsGqjimBHXBF3U +e7d1/p7bGsjJz1G4uUsX37eZpfUYrwG/iRXDw4a62MLPZdrAtwa4Q0tj+vbr +okZcrE1lNgsYxsvMDTrp4m6OTRudr6wS9NylbzMJuijeYXs6xmeZoBgEzZkk +6aLEj0M/u2GZKPv2e2P2RV1MP3b6Vgj/MlEs/UXL5Koumhw1k0kqWyKepL66 +mHlbF8fdStLY1iwR2cnndIwKdDHXYjZlOHeBSAzivZLaoYs5H9q0yqXmCHbB +hLyxLl3s6vrBajU3S8QXsVTr9+jiTLwFm2rbLBE3PvXjd58u5i847k87N0uc +8ejU2/VDFxN+i51UmZohAuzTfo7M62KWxdIf6Y5pwm73VtSV1sPEFwbn3738 +Q6x0svPUbtbDDPZB39w7f4hs1/FPJlv1kIvPX4se8Yf4Ec8Itduuh4/Hy4cv +af8hAhr3PwtT10PBkzEXxkuniAvmkdJ0Qz18tudOkjx9kqg83LWs4auHLyzl +BeSax4ijI5VN1f56aHm/ZVb9xhjBEp6dujtID6se6fRnHxsjDG97aRwK08O5 +c8GG6X9+E+2f13gHxurhq0Yjvz/Sv4lRp52fim7p4T0nL1pJwighcfI8Y+cr +PXz7n8TJ0xnDxKVVN82kGj0MdfISsg8cJlivGhYN1+mh8AtL+hmTYWK0nO1R +dqMe5o217L+08IOoZIlLFejQwyTrrYfe2f0g7K5Hh84OMf+/MLXfWWGISK0K +03zBRcP+Gpc7R6cHiI3mtkXiPDS8lJShtdg+QER/1VYO5aNhe79/UUvRAOHB +Ni+rKkzDIyHyg1J+A4TW/hChHGkaltdsrTWd+EZ8GAj4e06NhnOn5ybT574S +wpzeRftsaDhy6G1L6pEvRK7B6fBJWxrGB49lGWz6QqifvmRwzZ6GYUs7Ixy/ +fybMJwu7eo7TMH9d2tYx789E/IeZBWdvGq68v2mud66PmM+J0g+PoeE2DvlP +65t6ifi+FC6pOBo6DizVB1/vJYREcjpfxtMw5AJvtolDL6GaWOfGlkxD+xJN +YuvsR8LTlyMp5SYNleO2eUVu/0j06l7ryMunYe3gYWeNrG7CIzg3w7iAhvsc +JtsKfLuJ2YIy19+FNGwcXG8Yh92EwJaeObVyGqZYEU9o3z8QpuxSks9f0XCT +9L4nPTs+ENWdeS4dXTRk7CW1y7Z2EiY8dOWQHhoOq1rlrsvrJHqMGmdJn5jx +t4w/0YzsJKYrfyUc+0rDK/Y0/kSFTkL5rurTkVEaShrEKQ+d7yCqe3eFJI/R +kGeyq5hw7CBMhA6CyiQNeyZHhwe1Owi388FtQTPM9ddGqsK/2onpV/HpovM0 +5Pt1RDmzrp04u3jLuXKRhmZKjU/9M9sJPo1HO46u0DBytX775VPtRObJypnV +VRq+uxkqMnugnfgfMvxJJg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.09957458625094213}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8824,6 +15640,7 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8851,7 +15668,8 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.17388882737814787`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09957458625094213}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8859,17 +15677,784 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913324679337597`*^9}, + CellChangeTimes->{3.9913324679337597`*^9, 3.9938329385376673`*^9}, CellLabel-> - "Out[221]=",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] + "Out[140]=",ExpressionUUID->"aa661f12-8532-4dc4-9862-8e7af4aa5bfa"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"f380af60-a605-c546-a4c8-\ -b989835aa113"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk8lN8Xx6WUJfs21lIoJMswGOY5J4osiQqRIrvIvmQpRCIq7UhI0qJk +N4M2JOQraySlRKJsZV/ym99fz+v9uq/7nPs553PuuTJOvgdcWVlYWLrWsLD8 +/zv7pbFONimX+LDx66nOCkuiM5MUtqvnLCy/qO99iaqAwu+dSD1X4c6pL29S +ESHE4nH32p4cOHdfI+wUWgD/uOjVhe5iEPCoMNFER+ivNved7q4Bk0NbbhuB +HxjKjn6e6m6HBEf3b9m60bDQrXVjsnsAsqpfDQkrp0CtwYPctpy/4PLDwdw2 +NRsk+xk/nHasgJlpqtQ63ocg5O3weIPBWqSVW64/U1kAihvu1VvYrMXRl463 +67oKAHN+DKR5rcUmshDL8mQBePeclNhxfS2yvh/noG17BnW7I5Mthtbi4t++ +vvXXnkGQVJpP2vl1+GB5e1M3uRA6WtrVlZrZ8OJAglEcaxFcVTOsMrdix9Na +UYst8cWg8snWiObBjpY9Lhx3rhRDc9zJDqUIdvTlb3Z2ziiG9T3Xf7HfZUfW +uHtjPUXFEHHmu0Ttb3b8ukqbd+srBpd30ZFacRy4gX+Qb6NqCVBcq2ibSzix +LVbqoUtbCXTwvG/kqedEw6WAdZRPJeBHH7Ba6eFErfCHJquDJfCYi9On9x8n +BkeOJobNl8Cm4sOZ1024sGrP6cSNm0qBfXXmH/sAFxoNeJs9PlEKH1NVX03x +cWN3otO/kqVSSO/I5w2R40apjIYXOmxlYMezzWFRhxvr6p/mlfGUQV+s1D9W +Z2705341cFmmDL76cOoJlXHjBUdq/X+GZfBz92AFxZYHPRMM5E5eLoP5yVvP +Iu7yYtbJSEUlsXJgKAmurpbx4jlPhTB/mXIId7tkHtfEizoG2k+eKpTD8qe4 +seS/vPjxtwhjA7Ucor/Thd9v4cPWy6/19e3KIa7l/sGvQXyYcn3dh/ep5ZCU +G/WeVYwfX3NlJ+3mqQATDU8B4a38KFryZLescAWw1x2w2qbMj5sv7pJclKiA +uO9yn0x3Mdk2QTZBoQIitzT/uO7JjyyvnyYq764An2zSP/lKfjT5IUXcCa0A +y4yiHaZHBNDZGEJ4uiuAb8dt36OuAvjX7ap5UV8FtFTFFfv6CmDjiYeEyQAz +/icb7euxArhRm8v92FgF6Iv/M/icL4CT/blfedfSQSPV5IjvsgAeHX/bfGsH +HUSvf0+8dkcQ0/+SUuAUHUhKZXHzeYLoqvZhyC6SDuI18VFHCwVR5bZ8wclo +OkhPKgRvqxVEFv7htLAEOsiZ+TlW/RTE6/kvZhVT6UBet0L5ThbCewXUjOky +ZrzbLWp7aUL4UXJj0nkGHSjq2TueGgohP5KX+Z/TgeposCXUVgiftpJOcNfR +YVd1IjdXlBCaPDt+I7ONDvuDRAbVm4RQbFxeX+kXHSy4fn651SGEezMujFDG +6XAgh/FxuU8Ib8+WbaNO0cG61f59/YQQ9p/Z7LNtjg5Hd9yrtBMWRt29XmZ3 +WBngNahy5ayjMDL+vMibE2WAd8Sa5GFPJqez+50WZ4CPQEe8WaAwtigLjSxK +MiAAQyJF4oXxhZnJVJ8MA8Iyqt0f5wtjuI1IEk2JAecPGRPts8IYnRQQFqDH +APHSFnHWNSJYqM/PkUUwoEDw0Jwalwi6yYxNv0YGfGg/VnhlkwimhoX+Gt3N +AFnLoC2We0XwIVf37UYzBtALF/5FHxBB3UaK1SNzBpjxRX0qtBfBfIWsqCgL +BgS+T7zO5y+C1qVH1HkPMaBmX9b61jQRfFMZYV9txwDrp7LfV++JYG/u5Oh+ +ewaMbnz8UqVABKfP3GPpPcoA/ubSU5drRDBR3Oi/NkcGOJo0jZr/EsGzMlY0 +CzcGTD/a//bMjAjGcjjZpLoz9XF03StYFcHBbn2+bg+mnoZ+ex4hUXz2X9EJ +bS8GrBjOtPynJ4qffjeRknwZkJIXnr9iKIqxCt1RCX5MfetZEpQtRfF9bG5m +pD9TzxvOXRddRfH1qj2fcSADvsqmSD33FcWm/TWeMkFMfXHCi7/DRNGT7/P5 +SSanG2wuMbskincGHDYFhjBg5737lyNTRbFIxytLPpSpn1XJ+0mOKMacDZhq +ZbK1U+Heviei6MfbSQo4xYCR15pyGytEcUrvL4kzjAGRMlVr9F6L4nVv7ZlU +JvPF4Bevd6L4Z5WvSDqcAdpoeutdvyj6Vpp08UQwoDmrNXBphHn+0KzdYUx2 +XLWyUJoWRc0qn7u9TJ4+9mnHkX+iOJBOTKhHMvP1wpEjiZ2EPTzpameZLC79 +Y6hSgIRZv/i8G5hccNqrZlSShBaftXLYTjNA//Nkpvg2Elo7PezWYfIHvZAI +EzUSOtaz8Lky+UTGkk24Lgl1pQbNzzN5ZSla4/EeEl6iLd7KZnLKkfX8vftJ +2F81MV7IZNmqpDEOOxLKDQXb0JlMF+dv0nEh4ShDv6ucyWbhN/M8fUhY9ZPP ++wmTv36UiE07RcJdjVmb0pgcqHPXofEsCT9al/yNZLJJNs+0aTIJJz9qPbRj +8pYNkQktN0jYMhX2QJXJCydHJC2zSHi64fr0P6a+1k7roo6HJMz+l3f1DZMf +6tbtsS4m4d8H7XFxTI7KUevtqSKhqxGtRZfJ1hxZPkfekDD4HW/AL2Y+d/pt +XPulhYS2F0ICrzGZrTvslmMPCU2Iu11kJvfRhpW+fyPh0zW1t5uZ9SrNPfTK +9RcJA00FGo8yOYmr5tDPaRIK/GpwHGbW1ylAZeTEPxIur5N182Qy9WPG6bEN +YpjF49L3nemPn3mheX/ExTB2z/3tNUz/vOQeogbLimFTqxbb//11M+jA+zll +MbRlaXc4y/TfHn3l+WUUQ/b/nDNkgxkg+Sg9OcpEDC3o68+dYPp1mpddhvWQ +GO7t27DwkOnvnM8DxhvcxfBbfGYKbwDz/tht8SXRTwz/a52v1GL2g0X+84CN +4WLo3U49c5jZL6unUm/zXxTD5RmZz7E+DLAXMh+TKBHD+cLP9mdPMIAcURWT +WS2GLmWvCnw9GcA5sF1Epl4MMy3JZVbM/mQ8WwvyH5n6vneOcTH7WcSUkaK6 +KoZ3qnn8ZY4zYKxIXq6EXRyVi481dTowoI50naEpII4VcnnT0ceY9f/hM0CV +E8fRhvim2iPMesbIauwxFccWmtS3v1YMePDzSsPbQ+KYuPneNh/m/XNm/6q9 +yTFx7LmO9t8OMEBZqvfcfn9x3EI+n1m8nwEX6Je7bW+J464WYoLFmAG7JxbD +fb6Lo2DAAocFlZmPvdcVX/8Wx9Ae7n4XbWZ/3FXuFZwVR6vAtC2BFAaQDjnq +MNgl8C575tpIdQb8pr+ZW7tTAjOXr14DRQZcO5sSlHZKAvU6tGSvkBjQ8ElB +9neMBIbIW6YRIgxY1qjtIJIk0CBqLX1IkAFuwzPqg3ck0GKz0RoZXqYfzI5M +7ayVQG/vvcpmbAwYEJb3qeOWxBj9l7tOTTLno+9LKVFRSTw8/ZtUM0YHs4bD +/3lulsT6gF8f2JjzqDw8aQcvWRI3qP0WiRiiw4X+yVHbw5J4J81eSKqXDuqP +qtwnciRx9WlbsH4NHWL0LI+La0vhkUsvi3deosPeY5l/tPSl8GyW3Sf/C3Tg +if4Va2UmhdETP70L4umQUXsuL8VRCvMPv+sXjKID3aTy1/pEKaS2n7uV4kuH +ycNbQ/5+lMLat3W/rPbT4VjwzIXmCGn0f8fnocnJnK8FaaVnXm5Cc1aXEyE+ +FbC7u2VlvGETpsY73rrlWQHmLOuMHNo3Yc5ghUapSwU4H/D5CEOb8K1ReHu/ +XQUYRshERbNtRgFGBGmNUQX4bZq9t0tpM7rrK7z2la6AOvessdqQzVh8+pui +VFM5eM9PRTdwy6BSUPi/MuFyWFDi+6JstQUlF+T1dJ1KQS//SfbNm1uxO8fv +p+XFYpgSMHG0rpFFx5djj7PqCmEw2dE6YIM8tr6oe+qQ8xSMJ0KNhyjbcKJD +JlqK/zH8dmYPLI3ajiPL5H93HPOY73VR1vM1Ctix4Xad85p7IPCf/KXCCUUs +GrnZcn8z832e8MyCQtmBLfE7r918kA6pSjp8gu7KGLY+duUX101oEt+l+ffK +TrQJ1TWcF78KVMmaFJUPKng75Zw/71AyDGyV/TLSq4J/yrkshZqTIVEpXim3 +XwVjn0t3KZQkQw/VpJ40ooI3zN1L42OSIdS2fWnNsgq6KMypbtiUDHam/uRR +PlXMbhLZLH00CW4mMNuXooqGReS58KFE4FmbE3T8rCq+lZkfuSN3HtYvvDw4 +FaeK34319D/xnId/45/VY86rouL0tmOK8/Ew0Ss2lZ2siiyaUq9WmuKhtfjK +ya83VZFv7vueU/7xcNUpxs0hXxWF5cjiZa/PgUiN4+Gjncz49jcdBX3jQDpm +k56tvBrKJal+jl+KgYJA9i2ft6vh00OHkoxHYoBwm9pwXEkNy80fm0l0x8BR +09oOD1U1DNNi//mrOAYyhN29TlHVULFO/jZ6xYDY44L0W+Zq+Lln/Hnhl2gQ +6qAtdIWoIf10auBgdhRwyNmXH3irhs5cA7KHqyLghBiY5Deq4UjB8uP+rAho +4t7yZW2zGrZkd3afjouA5NlhtrJWNfypkT+5si8CeBoCrUR71XBpb1s+10A4 +CHglTX/6rYYeCvalljzhIFlUqe4qoI5/NOvblEJPwU6a2LPQo+ro/+BoMu18 +MJRs9VxidVTHL9oalO2+waDNyTC65KSOe3YffKZgEwz63Ye/5rqrY1xSV4vf +tmCw9k/lb/dXx9yn7avcjUEQdV80aEe8Ov6o4d0cwhcErdwiOt8K1PHCzvfs +l54FgNW06znvInVc/eb+hJweAL29ZW1zJeo4wVOzdTwuAAYfWJ3gYagjjT97 +/127AJjfdeO2bq06vlsIHf23PgBkQoT+3ehWx0bOY8WJzv4Q8EWg1oSFjCr+ +LQMBSn7QUG///DErGWPbPOa7xPxA+lleBScbGWWm3C4as/tBUxT1SRMHGf8m +1nLWNfnCFhmnGyaCZKz9oVf5FH2hzbnI3USejK+kJQKT1H1AdWT/RhMzMlLM +325+p+wN8W1p6x+bk9FfTVg5lscb+hjfWTgtybi057aR7YQXJFwInWm0IqNg +4ntThyIv+KqU9cXYgYxnuRMFWilekOIzXmgcQMYLqmsaVI1OwMTfZCvjVDJ2 +i8c4HTjtAX09d63vpJNxdVckyw4nD2h6Xm4zlUFGZzbTzk1GHpB7/qtt2l0y ++iZzNlvxe4CdhMaxkcdkjCHX183nucMb/U9uic/JeO/lDHJ0u8HtKwqnGgfI ++GHdzVuNxq6QEEKESQ2RsTo9Xr9WzRVCjhwM9x8m4/3VvfmdYq5gIXc6Uuw3 +8/z3+zyJURdYz2iN9pwhY6FPTrxSsgv4fw1N5GDXQGLoaeWRTmcwUqlPN1bW +wMa7O1euBDvB4fV7D7WqaKCCho3R1WNOcOJzI7eNugZeVhxtyjdygktJ/0W7 +aGng03aFrYriTvBhuNMtapcGGoLEHctXx8El+7t6mZUG+jBkubX5j8NZ/jXv +Np/RwDU/Hn9LSXSA6z/Pxj2I1kC3Ao6biccdIO/lOmJnrAbK5FrjMx0HaDrJ +XqSboIFqDv4t0aPHgL+J95b1VQ28UPtST9v8GGSflXZOztPAs/PvpTqljsKL +v7pLcy0amN3bEHuvzw7uNlc4HWzTQAzYd5tWbQdx98lNBR0a+KOkNmDxth0Y +2yilufZoIM/XDYOfjthBZ6W4Vsc3DcyX43SjfraF0ZiFgIJpDdzelddn8uMw +iPBVjLqIa2L86CX/IT4bWPipfuCVpCaO+XHtzpi2hr7XBQyJTZrobFTHH9Bj +DXcD8xLat2pizsZHSuHZ1rCj+4Y8Kmuij8xHyoKaNehnBjlJoCZyNAZ+TLOz +Ap8d6r1trpro8HRTb87rgxA8J77o4KGJhUL8gn/yDkJkzVrx8ROaOHmU/97x +5IOQdLjLltNPEwV4BfTv2hyEh3GnPuqHa2LZSumHzIkDMND3oqfkkiZ2pbbF +h8gdAOuLpt03KjSx76hyc/kDCzh6WGNua6Umpse5fm5LsQCXrVKixdWaaLn3 +nCFHuAUEMsatW15r4kjQsQfNZhaQMnTlw/pmTbxj7le8e3g/NNF6ukK/amKg +V9nyl2RzoI27dNpyUDB0u/dQ0qopiFQZ5VRzUfBv1IXE5V5TGD+v6LeJh4LB +M342qeWmkCkzyTUkQMHYCPeXFj6m8O9QhIGfJAW1Mu5PvOw3gZdVV4rjVSjY +KL3zjX+TMexKfJFSYkXBU4O85MXnRiBuffeYyGEKiokrf4/MNII/W+J2hNlR +8OLbrFC5KCPIqTZuIBwoqCGz9HQYjYB1snO10YOCgb/IS0r1hlBr/cvnawQF +XXUWPl3p3gN7ZEn7uHMoyMcqX/RWaDeUjr2Rccml4Cs8FG+waACyFYGzlXkU +LF20ovb3G8A6k/dZHvkUnDNhpQfnG0CNb/yf2lIKHsEnjhK7DYComr4V/paC +gkfkI3dE6APlQNvA8G8K6nBzusStIuRJRFUQExR0L0wYrv6JIDy0I/nGFAVD ++P4Z87cjTIcmaBrMUpByZyuZ+z5C8R1IyFyl4Lreh/vNzRBURp4qWwlo4bm+ +2YcVALA9+sKpGi0trO76q1BWqgfVuvfZzKhaWC8UNuh4QQ8s5l5e7dLTwobC +1vo9jnpwymfmyc9dWvhs+PwkY6MeNNg7fuMx08LWaTW33R664KFDMTniqIWv +h712PFCgwqM/3ySmE7RQoDn5XF+HFhAFyw9PJ2mhu3KghXKhFrR7ilI2XNLC +1TZd1WfJWrD41cxC/JoWDqqr0PYYaoHJ+4o4vKOF4BG7prSKAqP5F8eSi7Tw +0ImsBx7PNEHRVeelXK8WPjTOvppJJ8PlLeaLsX1a+MhH2C47gwzT/U6aA1+0 +8ODxekZ9NBle2CXnZ37XwpkGoZvRxmQ4YNF/S3RMC8ms7mK5feoQpnvOj4NF +GxOcXC6f41CHBv42mTE5bTy7sn3heqQqKL8fsjfdro12QaqlH11U4Wry4q1H +itpoE229QNunCvYbZHncVLTRy+bLBRdpVZhYDln8oq2NJzNFnE3jVEDkp2RH +q6k2uv97FPtMeie4vvCIK/XXxvS6tlKWKCUYPzkauidIG+96GkzGH1SCU1Le +Xh9CtFF9QvCd2XYluBDpe2A+Qhttd/Zx32xXhEJqyGa9eG2sj0rJE1ZUhOXy +2OradG3kVXtwMGZwO1x9ljndXquNKy2WB/vj5EHSYfNP53ptPEfNMnjuKA/3 +eXI+TTdoY0XHw3+tevJAP3m/RqSFuT94pSh1Rg4+Kz1JsevRRs3L35XuesrB +9oeMHQO/tfGA40Dw4SOy8DK702VKWAcDV5KqY5y3wFczGYcQkg7OL0WmSBlu +AZaFk7ZL4jrY0XVcaGj7FtC33GDOtlkHr5Xpwey4DNSvoWqJKeog4alYIX5a +Bpqdsjh2Ecz1B0N1Onc3Q6/siYIUNx00/L5u5QaPNCy1lj8U9tRBs1Ynny+f +pUDy9Np76V46GGYTGur3VAqOdmXcyvXTwTd311f67pOCr+feR9PDdZCa0L38 +PkUShn9oHPx6SQdbL7OPv5KVgOmHq3MqFTq4KUGuruEMCX5YG2YnMnRwg5m1 +OdWWBD3rLu79XqWDvyjBWd/IJKhyFE+7+UoHtzb3RrSOiMJZkiZ1pVEHN4f/ +Cdp2WBT4Ek5ENvXpYFHUHvUzhAjscO9icWWlImF14MKKihBIC0s+erGOiriy +jfU+nxDw1TpZkjZQcXDJYF34lCD8lZ68+46LisHDjSX5JYJQ+YHTQF2YivYT +jtu2UQVhryGeW91GRWXJl+dN9guAs1w+R/o+Kqb6QktxKh+Evzl2Qt6CigZ8 +3yI8I/kgxVXgXfEBKja3gd0+Rz6ovh+W/M6Gisbkpszb2/lASH4v78pxKkrP +/ttyM4QX6uWHhBxDqDhlEScV3sYNits3bZbPoqKSStuDoDpOwIb26OK7VJxo +OdygfZMTrD3ivxG5VJy0Vxk28uCE2IdjOTaPqNg1X3h0Dzcn9G2vlkssoWJa +YB1LkR0HXFKwVfr9looWXZ05v1jZYUrxGqV4korUgWQfvng26GnGPYJ/qbg9 +0qrwuxMbvPIZPxg0Q8XS+SK2MWCDS8XG/pRFKt5OrS7PXlwHilSWJ5VrdXHD +Ts6PsQHrwMn4pEytiC4GNgqlzXmthU53o42derqYnLHmTEbsGqjimBHXBF3U +e7d1/p7bGsjJz1G4uUsX37eZpfUYrwG/iRXDw4a62MLPZdrAtwa4Q0tj+vbr +okZcrE1lNgsYxsvMDTrp4m6OTRudr6wS9NylbzMJuijeYXs6xmeZoBgEzZkk +6aLEj0M/u2GZKPv2e2P2RV1MP3b6Vgj/MlEs/UXL5Koumhw1k0kqWyKepL66 +mHlbF8fdStLY1iwR2cnndIwKdDHXYjZlOHeBSAzivZLaoYs5H9q0yqXmCHbB +hLyxLl3s6vrBajU3S8QXsVTr9+jiTLwFm2rbLBE3PvXjd58u5i847k87N0uc +8ejU2/VDFxN+i51UmZohAuzTfo7M62KWxdIf6Y5pwm73VtSV1sPEFwbn3738 +Q6x0svPUbtbDDPZB39w7f4hs1/FPJlv1kIvPX4se8Yf4Ec8Itduuh4/Hy4cv +af8hAhr3PwtT10PBkzEXxkuniAvmkdJ0Qz18tudOkjx9kqg83LWs4auHLyzl +BeSax4ijI5VN1f56aHm/ZVb9xhjBEp6dujtID6se6fRnHxsjDG97aRwK08O5 +c8GG6X9+E+2f13gHxurhq0Yjvz/Sv4lRp52fim7p4T0nL1pJwighcfI8Y+cr +PXz7n8TJ0xnDxKVVN82kGj0MdfISsg8cJlivGhYN1+mh8AtL+hmTYWK0nO1R +dqMe5o217L+08IOoZIlLFejQwyTrrYfe2f0g7K5Hh84OMf+/MLXfWWGISK0K +03zBRcP+Gpc7R6cHiI3mtkXiPDS8lJShtdg+QER/1VYO5aNhe79/UUvRAOHB +Ni+rKkzDIyHyg1J+A4TW/hChHGkaltdsrTWd+EZ8GAj4e06NhnOn5ybT574S +wpzeRftsaDhy6G1L6pEvRK7B6fBJWxrGB49lGWz6QqifvmRwzZ6GYUs7Ixy/ +fybMJwu7eo7TMH9d2tYx789E/IeZBWdvGq68v2mud66PmM+J0g+PoeE2DvlP +65t6ifi+FC6pOBo6DizVB1/vJYREcjpfxtMw5AJvtolDL6GaWOfGlkxD+xJN +YuvsR8LTlyMp5SYNleO2eUVu/0j06l7ryMunYe3gYWeNrG7CIzg3w7iAhvsc +JtsKfLuJ2YIy19+FNGwcXG8Yh92EwJaeObVyGqZYEU9o3z8QpuxSks9f0XCT +9L4nPTs+ENWdeS4dXTRk7CW1y7Z2EiY8dOWQHhoOq1rlrsvrJHqMGmdJn5jx +t4w/0YzsJKYrfyUc+0rDK/Y0/kSFTkL5rurTkVEaShrEKQ+d7yCqe3eFJI/R +kGeyq5hw7CBMhA6CyiQNeyZHhwe1Owi388FtQTPM9ddGqsK/2onpV/HpovM0 +5Pt1RDmzrp04u3jLuXKRhmZKjU/9M9sJPo1HO46u0DBytX775VPtRObJypnV +VRq+uxkqMnugnfgfMvxJJg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk8lN8Xx6WUJfs21lIoJMswGOY5J4osiQqRIrvIvmQpRCIq7UhI0qJk +N4M2JOQraySlRKJsZV/ym99fz+v9uq/7nPs553PuuTJOvgdcWVlYWLrWsLD8 +/zv7pbFONimX+LDx66nOCkuiM5MUtqvnLCy/qO99iaqAwu+dSD1X4c6pL29S +ESHE4nH32p4cOHdfI+wUWgD/uOjVhe5iEPCoMNFER+ivNved7q4Bk0NbbhuB +HxjKjn6e6m6HBEf3b9m60bDQrXVjsnsAsqpfDQkrp0CtwYPctpy/4PLDwdw2 +NRsk+xk/nHasgJlpqtQ63ocg5O3weIPBWqSVW64/U1kAihvu1VvYrMXRl463 +67oKAHN+DKR5rcUmshDL8mQBePeclNhxfS2yvh/noG17BnW7I5Mthtbi4t++ +vvXXnkGQVJpP2vl1+GB5e1M3uRA6WtrVlZrZ8OJAglEcaxFcVTOsMrdix9Na +UYst8cWg8snWiObBjpY9Lhx3rhRDc9zJDqUIdvTlb3Z2ziiG9T3Xf7HfZUfW +uHtjPUXFEHHmu0Ttb3b8ukqbd+srBpd30ZFacRy4gX+Qb6NqCVBcq2ibSzix +LVbqoUtbCXTwvG/kqedEw6WAdZRPJeBHH7Ba6eFErfCHJquDJfCYi9On9x8n +BkeOJobNl8Cm4sOZ1024sGrP6cSNm0qBfXXmH/sAFxoNeJs9PlEKH1NVX03x +cWN3otO/kqVSSO/I5w2R40apjIYXOmxlYMezzWFRhxvr6p/mlfGUQV+s1D9W +Z2705341cFmmDL76cOoJlXHjBUdq/X+GZfBz92AFxZYHPRMM5E5eLoP5yVvP +Iu7yYtbJSEUlsXJgKAmurpbx4jlPhTB/mXIId7tkHtfEizoG2k+eKpTD8qe4 +seS/vPjxtwhjA7Ucor/Thd9v4cPWy6/19e3KIa7l/sGvQXyYcn3dh/ep5ZCU +G/WeVYwfX3NlJ+3mqQATDU8B4a38KFryZLescAWw1x2w2qbMj5sv7pJclKiA +uO9yn0x3Mdk2QTZBoQIitzT/uO7JjyyvnyYq764An2zSP/lKfjT5IUXcCa0A +y4yiHaZHBNDZGEJ4uiuAb8dt36OuAvjX7ap5UV8FtFTFFfv6CmDjiYeEyQAz +/icb7euxArhRm8v92FgF6Iv/M/icL4CT/blfedfSQSPV5IjvsgAeHX/bfGsH +HUSvf0+8dkcQ0/+SUuAUHUhKZXHzeYLoqvZhyC6SDuI18VFHCwVR5bZ8wclo +OkhPKgRvqxVEFv7htLAEOsiZ+TlW/RTE6/kvZhVT6UBet0L5ThbCewXUjOky +ZrzbLWp7aUL4UXJj0nkGHSjq2TueGgohP5KX+Z/TgeposCXUVgiftpJOcNfR +YVd1IjdXlBCaPDt+I7ONDvuDRAbVm4RQbFxeX+kXHSy4fn651SGEezMujFDG +6XAgh/FxuU8Ib8+WbaNO0cG61f59/YQQ9p/Z7LNtjg5Hd9yrtBMWRt29XmZ3 +WBngNahy5ayjMDL+vMibE2WAd8Sa5GFPJqez+50WZ4CPQEe8WaAwtigLjSxK +MiAAQyJF4oXxhZnJVJ8MA8Iyqt0f5wtjuI1IEk2JAecPGRPts8IYnRQQFqDH +APHSFnHWNSJYqM/PkUUwoEDw0Jwalwi6yYxNv0YGfGg/VnhlkwimhoX+Gt3N +AFnLoC2We0XwIVf37UYzBtALF/5FHxBB3UaK1SNzBpjxRX0qtBfBfIWsqCgL +BgS+T7zO5y+C1qVH1HkPMaBmX9b61jQRfFMZYV9txwDrp7LfV++JYG/u5Oh+ +ewaMbnz8UqVABKfP3GPpPcoA/ubSU5drRDBR3Oi/NkcGOJo0jZr/EsGzMlY0 +CzcGTD/a//bMjAjGcjjZpLoz9XF03StYFcHBbn2+bg+mnoZ+ex4hUXz2X9EJ +bS8GrBjOtPynJ4qffjeRknwZkJIXnr9iKIqxCt1RCX5MfetZEpQtRfF9bG5m +pD9TzxvOXRddRfH1qj2fcSADvsqmSD33FcWm/TWeMkFMfXHCi7/DRNGT7/P5 +SSanG2wuMbskincGHDYFhjBg5737lyNTRbFIxytLPpSpn1XJ+0mOKMacDZhq +ZbK1U+Heviei6MfbSQo4xYCR15pyGytEcUrvL4kzjAGRMlVr9F6L4nVv7ZlU +JvPF4Bevd6L4Z5WvSDqcAdpoeutdvyj6Vpp08UQwoDmrNXBphHn+0KzdYUx2 +XLWyUJoWRc0qn7u9TJ4+9mnHkX+iOJBOTKhHMvP1wpEjiZ2EPTzpameZLC79 +Y6hSgIRZv/i8G5hccNqrZlSShBaftXLYTjNA//Nkpvg2Elo7PezWYfIHvZAI +EzUSOtaz8Lky+UTGkk24Lgl1pQbNzzN5ZSla4/EeEl6iLd7KZnLKkfX8vftJ +2F81MV7IZNmqpDEOOxLKDQXb0JlMF+dv0nEh4ShDv6ucyWbhN/M8fUhY9ZPP ++wmTv36UiE07RcJdjVmb0pgcqHPXofEsCT9al/yNZLJJNs+0aTIJJz9qPbRj +8pYNkQktN0jYMhX2QJXJCydHJC2zSHi64fr0P6a+1k7roo6HJMz+l3f1DZMf +6tbtsS4m4d8H7XFxTI7KUevtqSKhqxGtRZfJ1hxZPkfekDD4HW/AL2Y+d/pt +XPulhYS2F0ICrzGZrTvslmMPCU2Iu11kJvfRhpW+fyPh0zW1t5uZ9SrNPfTK +9RcJA00FGo8yOYmr5tDPaRIK/GpwHGbW1ylAZeTEPxIur5N182Qy9WPG6bEN +YpjF49L3nemPn3mheX/ExTB2z/3tNUz/vOQeogbLimFTqxbb//11M+jA+zll +MbRlaXc4y/TfHn3l+WUUQ/b/nDNkgxkg+Sg9OcpEDC3o68+dYPp1mpddhvWQ +GO7t27DwkOnvnM8DxhvcxfBbfGYKbwDz/tht8SXRTwz/a52v1GL2g0X+84CN +4WLo3U49c5jZL6unUm/zXxTD5RmZz7E+DLAXMh+TKBHD+cLP9mdPMIAcURWT +WS2GLmWvCnw9GcA5sF1Epl4MMy3JZVbM/mQ8WwvyH5n6vneOcTH7WcSUkaK6 +KoZ3qnn8ZY4zYKxIXq6EXRyVi481dTowoI50naEpII4VcnnT0ceY9f/hM0CV +E8fRhvim2iPMesbIauwxFccWmtS3v1YMePDzSsPbQ+KYuPneNh/m/XNm/6q9 +yTFx7LmO9t8OMEBZqvfcfn9x3EI+n1m8nwEX6Je7bW+J464WYoLFmAG7JxbD +fb6Lo2DAAocFlZmPvdcVX/8Wx9Ae7n4XbWZ/3FXuFZwVR6vAtC2BFAaQDjnq +MNgl8C575tpIdQb8pr+ZW7tTAjOXr14DRQZcO5sSlHZKAvU6tGSvkBjQ8ElB +9neMBIbIW6YRIgxY1qjtIJIk0CBqLX1IkAFuwzPqg3ck0GKz0RoZXqYfzI5M +7ayVQG/vvcpmbAwYEJb3qeOWxBj9l7tOTTLno+9LKVFRSTw8/ZtUM0YHs4bD +/3lulsT6gF8f2JjzqDw8aQcvWRI3qP0WiRiiw4X+yVHbw5J4J81eSKqXDuqP +qtwnciRx9WlbsH4NHWL0LI+La0vhkUsvi3deosPeY5l/tPSl8GyW3Sf/C3Tg +if4Va2UmhdETP70L4umQUXsuL8VRCvMPv+sXjKID3aTy1/pEKaS2n7uV4kuH +ycNbQ/5+lMLat3W/rPbT4VjwzIXmCGn0f8fnocnJnK8FaaVnXm5Cc1aXEyE+ +FbC7u2VlvGETpsY73rrlWQHmLOuMHNo3Yc5ghUapSwU4H/D5CEOb8K1ReHu/ +XQUYRshERbNtRgFGBGmNUQX4bZq9t0tpM7rrK7z2la6AOvessdqQzVh8+pui +VFM5eM9PRTdwy6BSUPi/MuFyWFDi+6JstQUlF+T1dJ1KQS//SfbNm1uxO8fv +p+XFYpgSMHG0rpFFx5djj7PqCmEw2dE6YIM8tr6oe+qQ8xSMJ0KNhyjbcKJD +JlqK/zH8dmYPLI3ajiPL5H93HPOY73VR1vM1Ctix4Xad85p7IPCf/KXCCUUs +GrnZcn8z832e8MyCQtmBLfE7r918kA6pSjp8gu7KGLY+duUX101oEt+l+ffK +TrQJ1TWcF78KVMmaFJUPKng75Zw/71AyDGyV/TLSq4J/yrkshZqTIVEpXim3 +XwVjn0t3KZQkQw/VpJ40ooI3zN1L42OSIdS2fWnNsgq6KMypbtiUDHam/uRR +PlXMbhLZLH00CW4mMNuXooqGReS58KFE4FmbE3T8rCq+lZkfuSN3HtYvvDw4 +FaeK34319D/xnId/45/VY86rouL0tmOK8/Ew0Ss2lZ2siiyaUq9WmuKhtfjK +ya83VZFv7vueU/7xcNUpxs0hXxWF5cjiZa/PgUiN4+Gjncz49jcdBX3jQDpm +k56tvBrKJal+jl+KgYJA9i2ft6vh00OHkoxHYoBwm9pwXEkNy80fm0l0x8BR +09oOD1U1DNNi//mrOAYyhN29TlHVULFO/jZ6xYDY44L0W+Zq+Lln/Hnhl2gQ +6qAtdIWoIf10auBgdhRwyNmXH3irhs5cA7KHqyLghBiY5Deq4UjB8uP+rAho +4t7yZW2zGrZkd3afjouA5NlhtrJWNfypkT+5si8CeBoCrUR71XBpb1s+10A4 +CHglTX/6rYYeCvalljzhIFlUqe4qoI5/NOvblEJPwU6a2LPQo+ro/+BoMu18 +MJRs9VxidVTHL9oalO2+waDNyTC65KSOe3YffKZgEwz63Ye/5rqrY1xSV4vf +tmCw9k/lb/dXx9yn7avcjUEQdV80aEe8Ov6o4d0cwhcErdwiOt8K1PHCzvfs +l54FgNW06znvInVc/eb+hJweAL29ZW1zJeo4wVOzdTwuAAYfWJ3gYagjjT97 +/127AJjfdeO2bq06vlsIHf23PgBkQoT+3ehWx0bOY8WJzv4Q8EWg1oSFjCr+ +LQMBSn7QUG///DErGWPbPOa7xPxA+lleBScbGWWm3C4as/tBUxT1SRMHGf8m +1nLWNfnCFhmnGyaCZKz9oVf5FH2hzbnI3USejK+kJQKT1H1AdWT/RhMzMlLM +325+p+wN8W1p6x+bk9FfTVg5lscb+hjfWTgtybi057aR7YQXJFwInWm0IqNg +4ntThyIv+KqU9cXYgYxnuRMFWilekOIzXmgcQMYLqmsaVI1OwMTfZCvjVDJ2 +i8c4HTjtAX09d63vpJNxdVckyw4nD2h6Xm4zlUFGZzbTzk1GHpB7/qtt2l0y ++iZzNlvxe4CdhMaxkcdkjCHX183nucMb/U9uic/JeO/lDHJ0u8HtKwqnGgfI ++GHdzVuNxq6QEEKESQ2RsTo9Xr9WzRVCjhwM9x8m4/3VvfmdYq5gIXc6Uuw3 +8/z3+zyJURdYz2iN9pwhY6FPTrxSsgv4fw1N5GDXQGLoaeWRTmcwUqlPN1bW +wMa7O1euBDvB4fV7D7WqaKCCho3R1WNOcOJzI7eNugZeVhxtyjdygktJ/0W7 +aGng03aFrYriTvBhuNMtapcGGoLEHctXx8El+7t6mZUG+jBkubX5j8NZ/jXv +Np/RwDU/Hn9LSXSA6z/Pxj2I1kC3Ao6biccdIO/lOmJnrAbK5FrjMx0HaDrJ +XqSboIFqDv4t0aPHgL+J95b1VQ28UPtST9v8GGSflXZOztPAs/PvpTqljsKL +v7pLcy0amN3bEHuvzw7uNlc4HWzTQAzYd5tWbQdx98lNBR0a+KOkNmDxth0Y +2yilufZoIM/XDYOfjthBZ6W4Vsc3DcyX43SjfraF0ZiFgIJpDdzelddn8uMw +iPBVjLqIa2L86CX/IT4bWPipfuCVpCaO+XHtzpi2hr7XBQyJTZrobFTHH9Bj +DXcD8xLat2pizsZHSuHZ1rCj+4Y8Kmuij8xHyoKaNehnBjlJoCZyNAZ+TLOz +Ap8d6r1trpro8HRTb87rgxA8J77o4KGJhUL8gn/yDkJkzVrx8ROaOHmU/97x +5IOQdLjLltNPEwV4BfTv2hyEh3GnPuqHa2LZSumHzIkDMND3oqfkkiZ2pbbF +h8gdAOuLpt03KjSx76hyc/kDCzh6WGNua6Umpse5fm5LsQCXrVKixdWaaLn3 +nCFHuAUEMsatW15r4kjQsQfNZhaQMnTlw/pmTbxj7le8e3g/NNF6ukK/amKg +V9nyl2RzoI27dNpyUDB0u/dQ0qopiFQZ5VRzUfBv1IXE5V5TGD+v6LeJh4LB +M342qeWmkCkzyTUkQMHYCPeXFj6m8O9QhIGfJAW1Mu5PvOw3gZdVV4rjVSjY +KL3zjX+TMexKfJFSYkXBU4O85MXnRiBuffeYyGEKiokrf4/MNII/W+J2hNlR +8OLbrFC5KCPIqTZuIBwoqCGz9HQYjYB1snO10YOCgb/IS0r1hlBr/cvnawQF +XXUWPl3p3gN7ZEn7uHMoyMcqX/RWaDeUjr2Rccml4Cs8FG+waACyFYGzlXkU +LF20ovb3G8A6k/dZHvkUnDNhpQfnG0CNb/yf2lIKHsEnjhK7DYComr4V/paC +gkfkI3dE6APlQNvA8G8K6nBzusStIuRJRFUQExR0L0wYrv6JIDy0I/nGFAVD ++P4Z87cjTIcmaBrMUpByZyuZ+z5C8R1IyFyl4Lreh/vNzRBURp4qWwlo4bm+ +2YcVALA9+sKpGi0trO76q1BWqgfVuvfZzKhaWC8UNuh4QQ8s5l5e7dLTwobC +1vo9jnpwymfmyc9dWvhs+PwkY6MeNNg7fuMx08LWaTW33R664KFDMTniqIWv +h712PFCgwqM/3ySmE7RQoDn5XF+HFhAFyw9PJ2mhu3KghXKhFrR7ilI2XNLC +1TZd1WfJWrD41cxC/JoWDqqr0PYYaoHJ+4o4vKOF4BG7prSKAqP5F8eSi7Tw +0ImsBx7PNEHRVeelXK8WPjTOvppJJ8PlLeaLsX1a+MhH2C47gwzT/U6aA1+0 +8ODxekZ9NBle2CXnZ37XwpkGoZvRxmQ4YNF/S3RMC8ms7mK5feoQpnvOj4NF +GxOcXC6f41CHBv42mTE5bTy7sn3heqQqKL8fsjfdro12QaqlH11U4Wry4q1H +itpoE229QNunCvYbZHncVLTRy+bLBRdpVZhYDln8oq2NJzNFnE3jVEDkp2RH +q6k2uv97FPtMeie4vvCIK/XXxvS6tlKWKCUYPzkauidIG+96GkzGH1SCU1Le +Xh9CtFF9QvCd2XYluBDpe2A+Qhttd/Zx32xXhEJqyGa9eG2sj0rJE1ZUhOXy +2OradG3kVXtwMGZwO1x9ljndXquNKy2WB/vj5EHSYfNP53ptPEfNMnjuKA/3 +eXI+TTdoY0XHw3+tevJAP3m/RqSFuT94pSh1Rg4+Kz1JsevRRs3L35XuesrB +9oeMHQO/tfGA40Dw4SOy8DK702VKWAcDV5KqY5y3wFczGYcQkg7OL0WmSBlu +AZaFk7ZL4jrY0XVcaGj7FtC33GDOtlkHr5Xpwey4DNSvoWqJKeog4alYIX5a +Bpqdsjh2Ecz1B0N1Onc3Q6/siYIUNx00/L5u5QaPNCy1lj8U9tRBs1Ynny+f +pUDy9Np76V46GGYTGur3VAqOdmXcyvXTwTd311f67pOCr+feR9PDdZCa0L38 +PkUShn9oHPx6SQdbL7OPv5KVgOmHq3MqFTq4KUGuruEMCX5YG2YnMnRwg5m1 +OdWWBD3rLu79XqWDvyjBWd/IJKhyFE+7+UoHtzb3RrSOiMJZkiZ1pVEHN4f/ +Cdp2WBT4Ek5ENvXpYFHUHvUzhAjscO9icWWlImF14MKKihBIC0s+erGOiriy +jfU+nxDw1TpZkjZQcXDJYF34lCD8lZ68+46LisHDjSX5JYJQ+YHTQF2YivYT +jtu2UQVhryGeW91GRWXJl+dN9guAs1w+R/o+Kqb6QktxKh+Evzl2Qt6CigZ8 +3yI8I/kgxVXgXfEBKja3gd0+Rz6ovh+W/M6Gisbkpszb2/lASH4v78pxKkrP +/ttyM4QX6uWHhBxDqDhlEScV3sYNits3bZbPoqKSStuDoDpOwIb26OK7VJxo +OdygfZMTrD3ivxG5VJy0Vxk28uCE2IdjOTaPqNg1X3h0Dzcn9G2vlkssoWJa +YB1LkR0HXFKwVfr9looWXZ05v1jZYUrxGqV4korUgWQfvng26GnGPYJ/qbg9 +0qrwuxMbvPIZPxg0Q8XS+SK2MWCDS8XG/pRFKt5OrS7PXlwHilSWJ5VrdXHD +Ts6PsQHrwMn4pEytiC4GNgqlzXmthU53o42derqYnLHmTEbsGqjimBHXBF3U +e7d1/p7bGsjJz1G4uUsX37eZpfUYrwG/iRXDw4a62MLPZdrAtwa4Q0tj+vbr +okZcrE1lNgsYxsvMDTrp4m6OTRudr6wS9NylbzMJuijeYXs6xmeZoBgEzZkk +6aLEj0M/u2GZKPv2e2P2RV1MP3b6Vgj/MlEs/UXL5Koumhw1k0kqWyKepL66 +mHlbF8fdStLY1iwR2cnndIwKdDHXYjZlOHeBSAzivZLaoYs5H9q0yqXmCHbB +hLyxLl3s6vrBajU3S8QXsVTr9+jiTLwFm2rbLBE3PvXjd58u5i847k87N0uc +8ejU2/VDFxN+i51UmZohAuzTfo7M62KWxdIf6Y5pwm73VtSV1sPEFwbn3738 +Q6x0svPUbtbDDPZB39w7f4hs1/FPJlv1kIvPX4se8Yf4Ec8Itduuh4/Hy4cv +af8hAhr3PwtT10PBkzEXxkuniAvmkdJ0Qz18tudOkjx9kqg83LWs4auHLyzl +BeSax4ijI5VN1f56aHm/ZVb9xhjBEp6dujtID6se6fRnHxsjDG97aRwK08O5 +c8GG6X9+E+2f13gHxurhq0Yjvz/Sv4lRp52fim7p4T0nL1pJwighcfI8Y+cr +PXz7n8TJ0xnDxKVVN82kGj0MdfISsg8cJlivGhYN1+mh8AtL+hmTYWK0nO1R +dqMe5o217L+08IOoZIlLFejQwyTrrYfe2f0g7K5Hh84OMf+/MLXfWWGISK0K +03zBRcP+Gpc7R6cHiI3mtkXiPDS8lJShtdg+QER/1VYO5aNhe79/UUvRAOHB +Ni+rKkzDIyHyg1J+A4TW/hChHGkaltdsrTWd+EZ8GAj4e06NhnOn5ybT574S +wpzeRftsaDhy6G1L6pEvRK7B6fBJWxrGB49lGWz6QqifvmRwzZ6GYUs7Ixy/ +fybMJwu7eo7TMH9d2tYx789E/IeZBWdvGq68v2mud66PmM+J0g+PoeE2DvlP +65t6ifi+FC6pOBo6DizVB1/vJYREcjpfxtMw5AJvtolDL6GaWOfGlkxD+xJN +YuvsR8LTlyMp5SYNleO2eUVu/0j06l7ryMunYe3gYWeNrG7CIzg3w7iAhvsc +JtsKfLuJ2YIy19+FNGwcXG8Yh92EwJaeObVyGqZYEU9o3z8QpuxSks9f0XCT +9L4nPTs+ENWdeS4dXTRk7CW1y7Z2EiY8dOWQHhoOq1rlrsvrJHqMGmdJn5jx +t4w/0YzsJKYrfyUc+0rDK/Y0/kSFTkL5rurTkVEaShrEKQ+d7yCqe3eFJI/R +kGeyq5hw7CBMhA6CyiQNeyZHhwe1Owi388FtQTPM9ddGqsK/2onpV/HpovM0 +5Pt1RDmzrp04u3jLuXKRhmZKjU/9M9sJPo1HO46u0DBytX775VPtRObJypnV +VRq+uxkqMnugnfgfMvxJJg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09957458625094213}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09957458625094213}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk8lN8Xx6WUJfs21lIoJMswGOY5J4osiQqRIrvIvmQpRCIq7UhI0qJk +N4M2JOQraySlRKJsZV/ym99fz+v9uq/7nPs553PuuTJOvgdcWVlYWLrWsLD8 +/zv7pbFONimX+LDx66nOCkuiM5MUtqvnLCy/qO99iaqAwu+dSD1X4c6pL29S +ESHE4nH32p4cOHdfI+wUWgD/uOjVhe5iEPCoMNFER+ivNved7q4Bk0NbbhuB +HxjKjn6e6m6HBEf3b9m60bDQrXVjsnsAsqpfDQkrp0CtwYPctpy/4PLDwdw2 +NRsk+xk/nHasgJlpqtQ63ocg5O3weIPBWqSVW64/U1kAihvu1VvYrMXRl463 +67oKAHN+DKR5rcUmshDL8mQBePeclNhxfS2yvh/noG17BnW7I5Mthtbi4t++ +vvXXnkGQVJpP2vl1+GB5e1M3uRA6WtrVlZrZ8OJAglEcaxFcVTOsMrdix9Na +UYst8cWg8snWiObBjpY9Lhx3rhRDc9zJDqUIdvTlb3Z2ziiG9T3Xf7HfZUfW +uHtjPUXFEHHmu0Ttb3b8ukqbd+srBpd30ZFacRy4gX+Qb6NqCVBcq2ibSzix +LVbqoUtbCXTwvG/kqedEw6WAdZRPJeBHH7Ba6eFErfCHJquDJfCYi9On9x8n +BkeOJobNl8Cm4sOZ1024sGrP6cSNm0qBfXXmH/sAFxoNeJs9PlEKH1NVX03x +cWN3otO/kqVSSO/I5w2R40apjIYXOmxlYMezzWFRhxvr6p/mlfGUQV+s1D9W +Z2705341cFmmDL76cOoJlXHjBUdq/X+GZfBz92AFxZYHPRMM5E5eLoP5yVvP +Iu7yYtbJSEUlsXJgKAmurpbx4jlPhTB/mXIId7tkHtfEizoG2k+eKpTD8qe4 +seS/vPjxtwhjA7Ucor/Thd9v4cPWy6/19e3KIa7l/sGvQXyYcn3dh/ep5ZCU +G/WeVYwfX3NlJ+3mqQATDU8B4a38KFryZLescAWw1x2w2qbMj5sv7pJclKiA +uO9yn0x3Mdk2QTZBoQIitzT/uO7JjyyvnyYq764An2zSP/lKfjT5IUXcCa0A +y4yiHaZHBNDZGEJ4uiuAb8dt36OuAvjX7ap5UV8FtFTFFfv6CmDjiYeEyQAz +/icb7euxArhRm8v92FgF6Iv/M/icL4CT/blfedfSQSPV5IjvsgAeHX/bfGsH +HUSvf0+8dkcQ0/+SUuAUHUhKZXHzeYLoqvZhyC6SDuI18VFHCwVR5bZ8wclo +OkhPKgRvqxVEFv7htLAEOsiZ+TlW/RTE6/kvZhVT6UBet0L5ThbCewXUjOky +ZrzbLWp7aUL4UXJj0nkGHSjq2TueGgohP5KX+Z/TgeposCXUVgiftpJOcNfR +YVd1IjdXlBCaPDt+I7ONDvuDRAbVm4RQbFxeX+kXHSy4fn651SGEezMujFDG +6XAgh/FxuU8Ib8+WbaNO0cG61f59/YQQ9p/Z7LNtjg5Hd9yrtBMWRt29XmZ3 +WBngNahy5ayjMDL+vMibE2WAd8Sa5GFPJqez+50WZ4CPQEe8WaAwtigLjSxK +MiAAQyJF4oXxhZnJVJ8MA8Iyqt0f5wtjuI1IEk2JAecPGRPts8IYnRQQFqDH +APHSFnHWNSJYqM/PkUUwoEDw0Jwalwi6yYxNv0YGfGg/VnhlkwimhoX+Gt3N +AFnLoC2We0XwIVf37UYzBtALF/5FHxBB3UaK1SNzBpjxRX0qtBfBfIWsqCgL +BgS+T7zO5y+C1qVH1HkPMaBmX9b61jQRfFMZYV9txwDrp7LfV++JYG/u5Oh+ +ewaMbnz8UqVABKfP3GPpPcoA/ubSU5drRDBR3Oi/NkcGOJo0jZr/EsGzMlY0 +CzcGTD/a//bMjAjGcjjZpLoz9XF03StYFcHBbn2+bg+mnoZ+ex4hUXz2X9EJ +bS8GrBjOtPynJ4qffjeRknwZkJIXnr9iKIqxCt1RCX5MfetZEpQtRfF9bG5m +pD9TzxvOXRddRfH1qj2fcSADvsqmSD33FcWm/TWeMkFMfXHCi7/DRNGT7/P5 +SSanG2wuMbskincGHDYFhjBg5737lyNTRbFIxytLPpSpn1XJ+0mOKMacDZhq +ZbK1U+Heviei6MfbSQo4xYCR15pyGytEcUrvL4kzjAGRMlVr9F6L4nVv7ZlU +JvPF4Bevd6L4Z5WvSDqcAdpoeutdvyj6Vpp08UQwoDmrNXBphHn+0KzdYUx2 +XLWyUJoWRc0qn7u9TJ4+9mnHkX+iOJBOTKhHMvP1wpEjiZ2EPTzpameZLC79 +Y6hSgIRZv/i8G5hccNqrZlSShBaftXLYTjNA//Nkpvg2Elo7PezWYfIHvZAI +EzUSOtaz8Lky+UTGkk24Lgl1pQbNzzN5ZSla4/EeEl6iLd7KZnLKkfX8vftJ +2F81MV7IZNmqpDEOOxLKDQXb0JlMF+dv0nEh4ShDv6ucyWbhN/M8fUhY9ZPP ++wmTv36UiE07RcJdjVmb0pgcqHPXofEsCT9al/yNZLJJNs+0aTIJJz9qPbRj +8pYNkQktN0jYMhX2QJXJCydHJC2zSHi64fr0P6a+1k7roo6HJMz+l3f1DZMf +6tbtsS4m4d8H7XFxTI7KUevtqSKhqxGtRZfJ1hxZPkfekDD4HW/AL2Y+d/pt +XPulhYS2F0ICrzGZrTvslmMPCU2Iu11kJvfRhpW+fyPh0zW1t5uZ9SrNPfTK +9RcJA00FGo8yOYmr5tDPaRIK/GpwHGbW1ylAZeTEPxIur5N182Qy9WPG6bEN +YpjF49L3nemPn3mheX/ExTB2z/3tNUz/vOQeogbLimFTqxbb//11M+jA+zll +MbRlaXc4y/TfHn3l+WUUQ/b/nDNkgxkg+Sg9OcpEDC3o68+dYPp1mpddhvWQ +GO7t27DwkOnvnM8DxhvcxfBbfGYKbwDz/tht8SXRTwz/a52v1GL2g0X+84CN +4WLo3U49c5jZL6unUm/zXxTD5RmZz7E+DLAXMh+TKBHD+cLP9mdPMIAcURWT +WS2GLmWvCnw9GcA5sF1Epl4MMy3JZVbM/mQ8WwvyH5n6vneOcTH7WcSUkaK6 +KoZ3qnn8ZY4zYKxIXq6EXRyVi481dTowoI50naEpII4VcnnT0ceY9f/hM0CV +E8fRhvim2iPMesbIauwxFccWmtS3v1YMePDzSsPbQ+KYuPneNh/m/XNm/6q9 +yTFx7LmO9t8OMEBZqvfcfn9x3EI+n1m8nwEX6Je7bW+J464WYoLFmAG7JxbD +fb6Lo2DAAocFlZmPvdcVX/8Wx9Ae7n4XbWZ/3FXuFZwVR6vAtC2BFAaQDjnq +MNgl8C575tpIdQb8pr+ZW7tTAjOXr14DRQZcO5sSlHZKAvU6tGSvkBjQ8ElB +9neMBIbIW6YRIgxY1qjtIJIk0CBqLX1IkAFuwzPqg3ck0GKz0RoZXqYfzI5M +7ayVQG/vvcpmbAwYEJb3qeOWxBj9l7tOTTLno+9LKVFRSTw8/ZtUM0YHs4bD +/3lulsT6gF8f2JjzqDw8aQcvWRI3qP0WiRiiw4X+yVHbw5J4J81eSKqXDuqP +qtwnciRx9WlbsH4NHWL0LI+La0vhkUsvi3deosPeY5l/tPSl8GyW3Sf/C3Tg +if4Va2UmhdETP70L4umQUXsuL8VRCvMPv+sXjKID3aTy1/pEKaS2n7uV4kuH +ycNbQ/5+lMLat3W/rPbT4VjwzIXmCGn0f8fnocnJnK8FaaVnXm5Cc1aXEyE+ +FbC7u2VlvGETpsY73rrlWQHmLOuMHNo3Yc5ghUapSwU4H/D5CEOb8K1ReHu/ +XQUYRshERbNtRgFGBGmNUQX4bZq9t0tpM7rrK7z2la6AOvessdqQzVh8+pui +VFM5eM9PRTdwy6BSUPi/MuFyWFDi+6JstQUlF+T1dJ1KQS//SfbNm1uxO8fv +p+XFYpgSMHG0rpFFx5djj7PqCmEw2dE6YIM8tr6oe+qQ8xSMJ0KNhyjbcKJD +JlqK/zH8dmYPLI3ajiPL5H93HPOY73VR1vM1Ctix4Xad85p7IPCf/KXCCUUs +GrnZcn8z832e8MyCQtmBLfE7r918kA6pSjp8gu7KGLY+duUX101oEt+l+ffK +TrQJ1TWcF78KVMmaFJUPKng75Zw/71AyDGyV/TLSq4J/yrkshZqTIVEpXim3 +XwVjn0t3KZQkQw/VpJ40ooI3zN1L42OSIdS2fWnNsgq6KMypbtiUDHam/uRR +PlXMbhLZLH00CW4mMNuXooqGReS58KFE4FmbE3T8rCq+lZkfuSN3HtYvvDw4 +FaeK34319D/xnId/45/VY86rouL0tmOK8/Ew0Ss2lZ2siiyaUq9WmuKhtfjK +ya83VZFv7vueU/7xcNUpxs0hXxWF5cjiZa/PgUiN4+Gjncz49jcdBX3jQDpm +k56tvBrKJal+jl+KgYJA9i2ft6vh00OHkoxHYoBwm9pwXEkNy80fm0l0x8BR +09oOD1U1DNNi//mrOAYyhN29TlHVULFO/jZ6xYDY44L0W+Zq+Lln/Hnhl2gQ +6qAtdIWoIf10auBgdhRwyNmXH3irhs5cA7KHqyLghBiY5Deq4UjB8uP+rAho +4t7yZW2zGrZkd3afjouA5NlhtrJWNfypkT+5si8CeBoCrUR71XBpb1s+10A4 +CHglTX/6rYYeCvalljzhIFlUqe4qoI5/NOvblEJPwU6a2LPQo+ro/+BoMu18 +MJRs9VxidVTHL9oalO2+waDNyTC65KSOe3YffKZgEwz63Ye/5rqrY1xSV4vf +tmCw9k/lb/dXx9yn7avcjUEQdV80aEe8Ov6o4d0cwhcErdwiOt8K1PHCzvfs +l54FgNW06znvInVc/eb+hJweAL29ZW1zJeo4wVOzdTwuAAYfWJ3gYagjjT97 +/127AJjfdeO2bq06vlsIHf23PgBkQoT+3ehWx0bOY8WJzv4Q8EWg1oSFjCr+ +LQMBSn7QUG///DErGWPbPOa7xPxA+lleBScbGWWm3C4as/tBUxT1SRMHGf8m +1nLWNfnCFhmnGyaCZKz9oVf5FH2hzbnI3USejK+kJQKT1H1AdWT/RhMzMlLM +325+p+wN8W1p6x+bk9FfTVg5lscb+hjfWTgtybi057aR7YQXJFwInWm0IqNg +4ntThyIv+KqU9cXYgYxnuRMFWilekOIzXmgcQMYLqmsaVI1OwMTfZCvjVDJ2 +i8c4HTjtAX09d63vpJNxdVckyw4nD2h6Xm4zlUFGZzbTzk1GHpB7/qtt2l0y ++iZzNlvxe4CdhMaxkcdkjCHX183nucMb/U9uic/JeO/lDHJ0u8HtKwqnGgfI ++GHdzVuNxq6QEEKESQ2RsTo9Xr9WzRVCjhwM9x8m4/3VvfmdYq5gIXc6Uuw3 +8/z3+zyJURdYz2iN9pwhY6FPTrxSsgv4fw1N5GDXQGLoaeWRTmcwUqlPN1bW +wMa7O1euBDvB4fV7D7WqaKCCho3R1WNOcOJzI7eNugZeVhxtyjdygktJ/0W7 +aGng03aFrYriTvBhuNMtapcGGoLEHctXx8El+7t6mZUG+jBkubX5j8NZ/jXv +Np/RwDU/Hn9LSXSA6z/Pxj2I1kC3Ao6biccdIO/lOmJnrAbK5FrjMx0HaDrJ +XqSboIFqDv4t0aPHgL+J95b1VQ28UPtST9v8GGSflXZOztPAs/PvpTqljsKL +v7pLcy0amN3bEHuvzw7uNlc4HWzTQAzYd5tWbQdx98lNBR0a+KOkNmDxth0Y +2yilufZoIM/XDYOfjthBZ6W4Vsc3DcyX43SjfraF0ZiFgIJpDdzelddn8uMw +iPBVjLqIa2L86CX/IT4bWPipfuCVpCaO+XHtzpi2hr7XBQyJTZrobFTHH9Bj +DXcD8xLat2pizsZHSuHZ1rCj+4Y8Kmuij8xHyoKaNehnBjlJoCZyNAZ+TLOz +Ap8d6r1trpro8HRTb87rgxA8J77o4KGJhUL8gn/yDkJkzVrx8ROaOHmU/97x +5IOQdLjLltNPEwV4BfTv2hyEh3GnPuqHa2LZSumHzIkDMND3oqfkkiZ2pbbF +h8gdAOuLpt03KjSx76hyc/kDCzh6WGNua6Umpse5fm5LsQCXrVKixdWaaLn3 +nCFHuAUEMsatW15r4kjQsQfNZhaQMnTlw/pmTbxj7le8e3g/NNF6ukK/amKg +V9nyl2RzoI27dNpyUDB0u/dQ0qopiFQZ5VRzUfBv1IXE5V5TGD+v6LeJh4LB +M342qeWmkCkzyTUkQMHYCPeXFj6m8O9QhIGfJAW1Mu5PvOw3gZdVV4rjVSjY +KL3zjX+TMexKfJFSYkXBU4O85MXnRiBuffeYyGEKiokrf4/MNII/W+J2hNlR +8OLbrFC5KCPIqTZuIBwoqCGz9HQYjYB1snO10YOCgb/IS0r1hlBr/cvnawQF +XXUWPl3p3gN7ZEn7uHMoyMcqX/RWaDeUjr2Rccml4Cs8FG+waACyFYGzlXkU +LF20ovb3G8A6k/dZHvkUnDNhpQfnG0CNb/yf2lIKHsEnjhK7DYComr4V/paC +gkfkI3dE6APlQNvA8G8K6nBzusStIuRJRFUQExR0L0wYrv6JIDy0I/nGFAVD ++P4Z87cjTIcmaBrMUpByZyuZ+z5C8R1IyFyl4Lreh/vNzRBURp4qWwlo4bm+ +2YcVALA9+sKpGi0trO76q1BWqgfVuvfZzKhaWC8UNuh4QQ8s5l5e7dLTwobC +1vo9jnpwymfmyc9dWvhs+PwkY6MeNNg7fuMx08LWaTW33R664KFDMTniqIWv +h712PFCgwqM/3ySmE7RQoDn5XF+HFhAFyw9PJ2mhu3KghXKhFrR7ilI2XNLC +1TZd1WfJWrD41cxC/JoWDqqr0PYYaoHJ+4o4vKOF4BG7prSKAqP5F8eSi7Tw +0ImsBx7PNEHRVeelXK8WPjTOvppJJ8PlLeaLsX1a+MhH2C47gwzT/U6aA1+0 +8ODxekZ9NBle2CXnZ37XwpkGoZvRxmQ4YNF/S3RMC8ms7mK5feoQpnvOj4NF +GxOcXC6f41CHBv42mTE5bTy7sn3heqQqKL8fsjfdro12QaqlH11U4Wry4q1H +itpoE229QNunCvYbZHncVLTRy+bLBRdpVZhYDln8oq2NJzNFnE3jVEDkp2RH +q6k2uv97FPtMeie4vvCIK/XXxvS6tlKWKCUYPzkauidIG+96GkzGH1SCU1Le +Xh9CtFF9QvCd2XYluBDpe2A+Qhttd/Zx32xXhEJqyGa9eG2sj0rJE1ZUhOXy +2OradG3kVXtwMGZwO1x9ljndXquNKy2WB/vj5EHSYfNP53ptPEfNMnjuKA/3 +eXI+TTdoY0XHw3+tevJAP3m/RqSFuT94pSh1Rg4+Kz1JsevRRs3L35XuesrB +9oeMHQO/tfGA40Dw4SOy8DK702VKWAcDV5KqY5y3wFczGYcQkg7OL0WmSBlu +AZaFk7ZL4jrY0XVcaGj7FtC33GDOtlkHr5Xpwey4DNSvoWqJKeog4alYIX5a +Bpqdsjh2Ecz1B0N1Onc3Q6/siYIUNx00/L5u5QaPNCy1lj8U9tRBs1Ynny+f +pUDy9Np76V46GGYTGur3VAqOdmXcyvXTwTd311f67pOCr+feR9PDdZCa0L38 +PkUShn9oHPx6SQdbL7OPv5KVgOmHq3MqFTq4KUGuruEMCX5YG2YnMnRwg5m1 +OdWWBD3rLu79XqWDvyjBWd/IJKhyFE+7+UoHtzb3RrSOiMJZkiZ1pVEHN4f/ +Cdp2WBT4Ek5ENvXpYFHUHvUzhAjscO9icWWlImF14MKKihBIC0s+erGOiriy +jfU+nxDw1TpZkjZQcXDJYF34lCD8lZ68+46LisHDjSX5JYJQ+YHTQF2YivYT +jtu2UQVhryGeW91GRWXJl+dN9guAs1w+R/o+Kqb6QktxKh+Evzl2Qt6CigZ8 +3yI8I/kgxVXgXfEBKja3gd0+Rz6ovh+W/M6Gisbkpszb2/lASH4v78pxKkrP +/ttyM4QX6uWHhBxDqDhlEScV3sYNits3bZbPoqKSStuDoDpOwIb26OK7VJxo +OdygfZMTrD3ivxG5VJy0Vxk28uCE2IdjOTaPqNg1X3h0Dzcn9G2vlkssoWJa +YB1LkR0HXFKwVfr9looWXZ05v1jZYUrxGqV4korUgWQfvng26GnGPYJ/qbg9 +0qrwuxMbvPIZPxg0Q8XS+SK2MWCDS8XG/pRFKt5OrS7PXlwHilSWJ5VrdXHD +Ts6PsQHrwMn4pEytiC4GNgqlzXmthU53o42derqYnLHmTEbsGqjimBHXBF3U +e7d1/p7bGsjJz1G4uUsX37eZpfUYrwG/iRXDw4a62MLPZdrAtwa4Q0tj+vbr +okZcrE1lNgsYxsvMDTrp4m6OTRudr6wS9NylbzMJuijeYXs6xmeZoBgEzZkk +6aLEj0M/u2GZKPv2e2P2RV1MP3b6Vgj/MlEs/UXL5Koumhw1k0kqWyKepL66 +mHlbF8fdStLY1iwR2cnndIwKdDHXYjZlOHeBSAzivZLaoYs5H9q0yqXmCHbB +hLyxLl3s6vrBajU3S8QXsVTr9+jiTLwFm2rbLBE3PvXjd58u5i847k87N0uc +8ejU2/VDFxN+i51UmZohAuzTfo7M62KWxdIf6Y5pwm73VtSV1sPEFwbn3738 +Q6x0svPUbtbDDPZB39w7f4hs1/FPJlv1kIvPX4se8Yf4Ec8Itduuh4/Hy4cv +af8hAhr3PwtT10PBkzEXxkuniAvmkdJ0Qz18tudOkjx9kqg83LWs4auHLyzl +BeSax4ijI5VN1f56aHm/ZVb9xhjBEp6dujtID6se6fRnHxsjDG97aRwK08O5 +c8GG6X9+E+2f13gHxurhq0Yjvz/Sv4lRp52fim7p4T0nL1pJwighcfI8Y+cr +PXz7n8TJ0xnDxKVVN82kGj0MdfISsg8cJlivGhYN1+mh8AtL+hmTYWK0nO1R +dqMe5o217L+08IOoZIlLFejQwyTrrYfe2f0g7K5Hh84OMf+/MLXfWWGISK0K +03zBRcP+Gpc7R6cHiI3mtkXiPDS8lJShtdg+QER/1VYO5aNhe79/UUvRAOHB +Ni+rKkzDIyHyg1J+A4TW/hChHGkaltdsrTWd+EZ8GAj4e06NhnOn5ybT574S +wpzeRftsaDhy6G1L6pEvRK7B6fBJWxrGB49lGWz6QqifvmRwzZ6GYUs7Ixy/ +fybMJwu7eo7TMH9d2tYx789E/IeZBWdvGq68v2mud66PmM+J0g+PoeE2DvlP +65t6ifi+FC6pOBo6DizVB1/vJYREcjpfxtMw5AJvtolDL6GaWOfGlkxD+xJN +YuvsR8LTlyMp5SYNleO2eUVu/0j06l7ryMunYe3gYWeNrG7CIzg3w7iAhvsc +JtsKfLuJ2YIy19+FNGwcXG8Yh92EwJaeObVyGqZYEU9o3z8QpuxSks9f0XCT +9L4nPTs+ENWdeS4dXTRk7CW1y7Z2EiY8dOWQHhoOq1rlrsvrJHqMGmdJn5jx +t4w/0YzsJKYrfyUc+0rDK/Y0/kSFTkL5rurTkVEaShrEKQ+d7yCqe3eFJI/R +kGeyq5hw7CBMhA6CyiQNeyZHhwe1Owi388FtQTPM9ddGqsK/2onpV/HpovM0 +5Pt1RDmzrp04u3jLuXKRhmZKjU/9M9sJPo1HO46u0DBytX775VPtRObJypnV +VRq+uxkqMnugnfgfMvxJJg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09957458625094213}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09957458625094213}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993832938576909*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"870451bd-b02e-49a4-b65e-459d97dee867"] +}, Open ]], Cell[CellGroupData[{ @@ -8921,66 +16506,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[225]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], + "In[142]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5794624625701512`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 225, 201, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512859148*^9}, +Cell[BoxData["2.446623424259859`"], "Output", + CellChangeTimes->{3.9913335200445786`*^9, 3.993832999615963*^9}, CellLabel-> - "During evaluation of \ -In[225]:=",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.303016475329449`*^-178\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 225, 202, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512868147*^9}, - CellLabel-> - "During evaluation of \ -In[225]:=",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3647813242367804`*^-181\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 225, 203, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335128761463`*^9}, - CellLabel-> - "During evaluation of \ -In[225]:=",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 225, 204, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512885145*^9}, - CellLabel-> - "During evaluation of \ -In[225]:=",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], - -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913335200445786`*^9}, - CellLabel-> - "Out[225]=",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] + "Out[142]=",ExpressionUUID->"8381cf78-168b-44e1-85de-450211e47f36"] }, Open ]], Cell[CellGroupData[{ @@ -9047,68 +16578,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491385551624`*^9, - 3.991849142620474*^9}},ExpressionUUID->"f2835c98-560f-8e47-bdab-\ -0d2700971836"], + CellChangeTimes->{{3.9918491385551624`*^9, 3.991849142620474*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 226, 205, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200775414`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.435728214838839`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 143, 65, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.9938329996408567`*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], +In[143]:=",ExpressionUUID->"812cc474-56ef-4ae0-b16f-f90fda12cdac"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 206, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200875454`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.886826681360608`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 143, 66, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.993832999645076*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], +In[143]:=",ExpressionUUID->"31c2ba9f-584f-4ce1-bd46-7ae0af8ff882"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 207, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200945435`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.375360762478207`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053263498768\ +34870508672907477392606539841001\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"21\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"11373146585666280061823037918277948752886366340090458289410742623970263040\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 143, 67, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.993832999648534*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], +In[143]:=",ExpressionUUID->"4b993684-9760-4356-934c-0c86ed58bb38"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 226, 208, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335201035423`*^9}, +during this calculation.\"", 2, 143, 68, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.9938329996518097`*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], +In[143]:=",ExpressionUUID->"e086060a-e7a1-4c1e-88e4-90b7c5593c77"], -Cell[BoxData["0.7348275136088338`"], "Output", - CellChangeTimes->{3.9913335271231823`*^9}, +Cell[BoxData["3.295025407378599`"], "Output", + CellChangeTimes->{3.9913335271231823`*^9, 3.993833006701853*^9}, CellLabel-> - "Out[226]=",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] + "Out[143]=",ExpressionUUID->"77946ea3-3ab8-42e9-96ed-674cac37b295"] }, Open ]], Cell[CellGroupData[{ @@ -9129,8 +16676,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9175,68 +16721,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849146408966*^9, - 3.9918491485488663`*^9}},ExpressionUUID->"ca837916-250f-4d4e-8368-\ -5a08f479e656"], + CellChangeTimes->{{3.991849146408966*^9, 3.9918491485488663`*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 227, 209, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271591835`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.435728214838839`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 144, 69, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.9938330067275133`*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], +In[144]:=",ExpressionUUID->"5c43a3ed-0f46-44d8-ace9-9e451d69042b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 210, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271681843`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.886826681360608`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 144, 70, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.993833006731447*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], +In[144]:=",ExpressionUUID->"89ab174e-139f-4014-8693-a4c189f876a7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 211, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527176182*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.375360762478207`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053263498768\ +34870508672907477392606539841001\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"21\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"11373146585666280061823037918277948752886366340090458289410742623970263040\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 144, 71, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.993833006734788*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], +In[144]:=",ExpressionUUID->"c5754db9-3c9a-44ee-b677-84a791dd2e9d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 227, 212, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527184183*^9}, +during this calculation.\"", 2, 144, 72, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.9938330067380133`*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], +In[144]:=",ExpressionUUID->"dbcea773-a283-4453-9076-02c29d8533be"], -Cell[BoxData["5.221864211842707`"], "Output", - CellChangeTimes->{3.9913335331581306`*^9}, +Cell[BoxData["15.923911959115`"], "Output", + CellChangeTimes->{3.9913335331581306`*^9, 3.99383301416661*^9}, CellLabel-> - "Out[227]=",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] + "Out[144]=",ExpressionUUID->"5842b564-3cdc-4e62-a6e5-138f4cfe40d8"] }, Open ]], Cell[CellGroupData[{ @@ -9257,8 +16819,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9303,68 +16864,84 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491518098984`*^9, - 3.9918491543107758`*^9}},ExpressionUUID->"b579991f-985b-234a-94aa-\ -ed18c097f8c0"], + CellChangeTimes->{{3.9918491518098984`*^9, 3.9918491543107758`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 228, 213, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335331923027`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.435728214838839`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775985698560\ +50122191436393740932704951229331\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"13\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"35470731676124699590055823755502160452816566474393345624010685523613555097\ +6000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 145, 73, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.993833014191312*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], +In[145]:=",ExpressionUUID->"c4dccc7a-0bec-4b58-b8f0-8c0ca09c2c9e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 214, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533202278*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.886826681360608`*^-78\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336630847078\ +72078202519291994196931168786772\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"17\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"12682727198077376357272035213826898026025436117411993668387351126752624640\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 145, 74, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.993833014195533*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], +In[145]:=",ExpressionUUID->"acf3335e-c471-4b5b-b472-ad9316d84a6b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 215, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335332102795`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.375360762478207`*^-79\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053263498768\ +34870508672907477392606539841001\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"21\ +\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"11373146585666280061823037918277948752886366340090458289410742623970263040\ +0000000000000000000000000000000000000\\\"}]]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 145, 75, + 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.99383301419916*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], +In[145]:=",ExpressionUUID->"0de10dbb-ab97-479e-a4de-cc858477f8db"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 228, 216, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533218281*^9}, +during this calculation.\"", 2, 145, 76, 25990558345276174249, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.993833014202737*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], +In[145]:=",ExpressionUUID->"3dd5a3cc-bc35-4d87-a659-23052dff25e8"], -Cell[BoxData["15.545902834190647`"], "Output", - CellChangeTimes->{3.9913335366055527`*^9}, +Cell[BoxData["0.9860013950235988`"], "Output", + CellChangeTimes->{3.9913335366055527`*^9, 3.993833018621348*^9}, CellLabel-> - "Out[228]=",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] + "Out[145]=",ExpressionUUID->"82a653c5-ac82-4b57-a01f-26d8a090f850"] }, Open ]], Cell[CellGroupData[{ @@ -9373,21 +16950,22 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918491594691143`*^9, - 3.9918491632611027`*^9}},ExpressionUUID->"afb7855c-8700-d444-926c-\ -6d96abe14e67"], - -Cell[BoxData["0.08155763943441016`"], "Output", - CellChangeTimes->{3.9913335366395893`*^9}, + CellChangeTimes->{{3.9918491594691143`*^9, 3.9918491632611027`*^9}}, CellLabel-> - "Out[229]=",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] + "In[146]:=",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], + +Cell[BoxData["0.8315629267958276`"], "Output", + CellChangeTimes->{3.9913335366395893`*^9, 3.993833018640397*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"90a4059f-7491-4c2d-80b2-65f268a1127b"] }, Open ]] }, -WindowSize->{718.5, 729.75}, -WindowMargins->{{0, Automatic}, {Automatic, 0}}, +Evaluator->"kernel 2", +WindowSize->{714, 258}, +WindowMargins->{{Automatic, 3}, {267, Automatic}}, CellContext->Notebook, Magnification:>0.8 Inherited, -FrontEndVersion->"14.1 for Microsoft Windows (64-bit) (July 16, 2024)", +FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"5cbbdd72-8791-4241-8a7a-ad89ed63e6b0" ] @@ -9402,368 +16980,628 @@ CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ -Cell[554, 20, 149, 4, 22, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], -Cell[706, 26, 154, 3, 22, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], -Cell[863, 31, 149, 4, 22, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], -Cell[1015, 37, 154, 3, 22, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[1194, 44, 1301, 43, 39, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[2498, 89, 178, 3, 25, "Output",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[576, 22, 449, 7, 23, "Input",ExpressionUUID->"42143142-2d54-44a6-ac0c-8ee0f75a63ad"], +Cell[1028, 31, 351, 5, 26, "Output",ExpressionUUID->"7d28da99-91e2-47bb-81fd-83b7bc08f591"] }, Open ]], Cell[CellGroupData[{ -Cell[2713, 97, 910, 31, 46, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[3626, 130, 175, 3, 25, "Output",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[1416, 41, 197, 3, 23, "Input",ExpressionUUID->"30c93cfa-adc5-481b-afb3-0763555403d7"], +Cell[1616, 46, 349, 5, 26, "Output",ExpressionUUID->"2031e37d-f585-4d07-a472-0bc39fac7ec3"] }, Open ]], Cell[CellGroupData[{ -Cell[3838, 138, 887, 30, 46, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[4728, 170, 176, 3, 25, "Output",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[2002, 56, 221, 4, 23, "Input",ExpressionUUID->"ff126f07-624b-4da3-bd67-fc819462df18"], +Cell[2226, 62, 374, 6, 26, "Output",ExpressionUUID->"571c4e82-c95a-46d3-ae1c-dbbaf4c27053"] }, Open ]], Cell[CellGroupData[{ -Cell[4941, 178, 558, 19, 42, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[5502, 199, 172, 3, 25, "Output",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[2637, 73, 175, 3, 23, "Input",ExpressionUUID->"ebab233f-ab29-4b0a-9d6e-682695edfcc1"], +Cell[2815, 78, 351, 5, 26, "Output",ExpressionUUID->"7a53e520-d7e7-452c-b596-0d802bbe73e2"] }, Open ]], Cell[CellGroupData[{ -Cell[5711, 207, 623, 21, 42, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[6337, 230, 172, 3, 25, "Output",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[3203, 88, 257, 7, 35, "Input",ExpressionUUID->"313c1035-41c9-46fd-a2c7-d316388154c0"], +Cell[3463, 97, 364, 5, 26, "Output",ExpressionUUID->"b1c883bf-b923-4fd0-989a-0dfa14922d48"] }, Open ]], Cell[CellGroupData[{ -Cell[6546, 238, 170, 5, 46, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[6719, 245, 172, 3, 25, "Output",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[3864, 107, 131, 2, 23, "Input",ExpressionUUID->"03e56c2c-27d4-4edf-923c-22e47216e597"], +Cell[3998, 111, 346, 5, 26, "Output",ExpressionUUID->"8f346c23-8e55-47d9-bada-0490ffe5f997"] }, Open ]], Cell[CellGroupData[{ -Cell[6928, 253, 170, 5, 45, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[7101, 260, 171, 3, 25, "Output",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[4381, 121, 276, 6, 23, "Input",ExpressionUUID->"fb12eac4-0919-4f65-8b36-0188d6b0f940"], +Cell[4660, 129, 362, 5, 26, "Output",ExpressionUUID->"a43e2365-b8a6-4e5a-8722-abf633895e09"] }, Open ]], Cell[CellGroupData[{ -Cell[7309, 268, 181, 5, 35, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[7493, 275, 170, 3, 25, "Output",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[5059, 139, 257, 7, 23, "Input",ExpressionUUID->"b22346a5-c252-4644-aab0-5a208b6495ab"], +Cell[5319, 148, 359, 5, 26, "Output",ExpressionUUID->"77ed96d0-27eb-49aa-8258-3a017219209a"] }, Open ]], Cell[CellGroupData[{ -Cell[7700, 283, 181, 5, 35, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[7884, 290, 172, 3, 25, "Output",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[5715, 158, 223, 4, 23, "Input",ExpressionUUID->"67ecaf44-60c3-4e39-a33d-e1b4b819efa7"], +Cell[5941, 164, 328, 5, 26, "Output",ExpressionUUID->"7aeb3a62-6060-4453-8ff8-ca60810d339c"] }, Open ]], Cell[CellGroupData[{ -Cell[8093, 298, 6055, 185, 310, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[14151, 485, 172, 3, 25, "Output",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[6306, 174, 228, 4, 23, "Input",ExpressionUUID->"e922e70d-be87-4dc4-aeda-37e2946a464f"], +Cell[6537, 180, 327, 5, 26, "Output",ExpressionUUID->"158406be-514f-4d85-a392-e0f4ace59916"] }, Open ]], Cell[CellGroupData[{ -Cell[14360, 493, 368, 9, 33, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[14731, 504, 171, 3, 25, "Output",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[6901, 190, 129, 2, 23, "Input",ExpressionUUID->"776e549b-d58b-494c-9299-debaa424bf00"], +Cell[7033, 194, 343, 5, 26, "Output",ExpressionUUID->"71a718b9-ca64-4133-bf55-8543177721b0"] }, Open ]], Cell[CellGroupData[{ -Cell[14939, 512, 6122, 187, 353, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[21064, 701, 173, 3, 25, "Output",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[7413, 204, 129, 2, 23, "Input",ExpressionUUID->"bee8cb67-0fd1-461b-8d93-0b336c1d8568"], +Cell[7545, 208, 342, 5, 26, "Output",ExpressionUUID->"d6f58acd-1b9d-4fab-8c36-17c6e7163fa0"] }, Open ]], Cell[CellGroupData[{ -Cell[21274, 709, 368, 9, 33, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[21645, 720, 170, 3, 25, "Output",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[7924, 218, 557, 19, 67, "Input",ExpressionUUID->"a21e234f-55e3-4944-8add-66ca2754abd6"], +Cell[8484, 239, 366, 5, 26, "Output",ExpressionUUID->"0bb2c6c6-7470-48f7-b13c-158bf23ea9ed"] }, Open ]], Cell[CellGroupData[{ -Cell[21852, 728, 2663, 88, 135, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[24518, 818, 171, 3, 25, "Output",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[8887, 249, 557, 19, 67, "Input",ExpressionUUID->"14caad31-f736-4eff-84c1-cd92c83f4ae6"], +Cell[9447, 270, 368, 5, 26, "Output",ExpressionUUID->"e9a4dc75-5397-4780-b6f6-a1648a30632d"] }, Open ]], Cell[CellGroupData[{ -Cell[24726, 826, 2603, 85, 135, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[27332, 913, 173, 3, 25, "Output",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[9852, 280, 1492, 48, 67, "Input",ExpressionUUID->"005fc586-a909-47f2-93d3-191933d48058"], +Cell[11347, 330, 362, 5, 26, "Output",ExpressionUUID->"0148fa83-1099-4905-9d0a-079a507a8612"] }, Open ]], Cell[CellGroupData[{ -Cell[27542, 921, 3712, 118, 197, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[31257, 1041, 174, 3, 25, "Output",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] -}, Open ]], -Cell[31446, 1047, 138, 3, 34, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], -Cell[CellGroupData[{ -Cell[31609, 1054, 2054, 59, 92, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], -Cell[33666, 1115, 557, 12, 50, "Message",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], -Cell[34226, 1129, 559, 12, 50, "Message",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], -Cell[34788, 1143, 561, 12, 50, "Message",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], -Cell[35352, 1157, 458, 10, 20, "Message",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], -Cell[35813, 1169, 172, 3, 25, "Output",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[11746, 340, 1331, 44, 67, "Input",ExpressionUUID->"be259cd6-ca0e-4aab-bb40-75632878fbbb"], +Cell[13080, 386, 377, 6, 26, "Output",ExpressionUUID->"9e5d6c84-8c27-4204-bb21-c13f29719d78"] }, Open ]], Cell[CellGroupData[{ -Cell[36022, 1177, 2052, 59, 92, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], -Cell[38077, 1238, 555, 12, 50, "Message",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], -Cell[38635, 1252, 559, 12, 50, "Message",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], -Cell[39197, 1266, 561, 12, 50, "Message",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], -Cell[39761, 1280, 458, 10, 20, "Message",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], -Cell[40222, 1292, 172, 3, 25, "Output",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[13494, 397, 1331, 44, 67, "Input",ExpressionUUID->"ba94f1c0-c601-4095-87f7-be2c2217afc2"], +Cell[14828, 443, 386, 6, 26, "Output",ExpressionUUID->"ca50f7ea-694c-4736-a5be-7e69fe580fe4"] }, Open ]], Cell[CellGroupData[{ -Cell[40431, 1300, 1936, 53, 69, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], -Cell[42370, 1355, 20440, 382, 190, "Output",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] +Cell[15251, 454, 1492, 48, 67, "Input",ExpressionUUID->"3abc1b3a-f944-424d-9cd4-391816610821"], +Cell[16746, 504, 357, 5, 26, "Output",ExpressionUUID->"f06ab141-74be-44b1-b70b-ddba61c43774"] }, Open ]], Cell[CellGroupData[{ -Cell[62847, 1742, 2094, 60, 56, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], -Cell[64944, 1804, 500, 11, 56, "Message",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], -Cell[65447, 1817, 503, 11, 33, "Message",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], -Cell[65953, 1830, 506, 11, 33, "Message",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], -Cell[66462, 1843, 455, 10, 20, "Message",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], -Cell[66920, 1855, 57321, 985, 187, "Output",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] -}, Open ]], -Cell[124256, 2843, 232, 6, 34, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], -Cell[124491, 2851, 209, 5, 34, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], -Cell[CellGroupData[{ -Cell[124725, 2860, 217, 7, 39, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], -Cell[124945, 2869, 172, 3, 25, "Output",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] +Cell[17140, 514, 131, 2, 23, "Input",ExpressionUUID->"ac333677-7bac-4b10-a848-28560b506b26"], +Cell[17274, 518, 347, 5, 26, "Output",ExpressionUUID->"d44839a9-1314-4524-82c3-4b1e1838e9d1"] }, Open ]], Cell[CellGroupData[{ -Cell[125154, 2877, 1816, 53, 92, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], -Cell[126973, 2932, 508, 11, 50, "Message",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], -Cell[127484, 2945, 508, 11, 50, "Message",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], -Cell[127995, 2958, 511, 11, 50, "Message",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], -Cell[128509, 2971, 456, 10, 20, "Message",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], -Cell[128968, 2983, 26000, 472, 187, "Output",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] +Cell[17658, 528, 133, 2, 23, "Input",ExpressionUUID->"b9d35c0b-9545-4eaf-8ac0-0da8375c8a20"], +Cell[17794, 532, 346, 5, 26, "Output",ExpressionUUID->"c25bf318-aed4-4a4e-8b38-a276e6607b20"] }, Open ]], Cell[CellGroupData[{ -Cell[155005, 3460, 1616, 48, 69, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], -Cell[156624, 3510, 584, 12, 53, "Message",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], -Cell[157211, 3524, 588, 12, 53, "Message",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], -Cell[157802, 3538, 592, 12, 53, "Message",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], -Cell[158397, 3552, 456, 10, 20, "Message",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], -Cell[158856, 3564, 169, 3, 25, "Output",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] +Cell[18177, 542, 134, 2, 23, "Input",ExpressionUUID->"561793e3-e069-4479-a254-178c0d6b1a3b"], +Cell[18314, 546, 354, 5, 26, "Output",ExpressionUUID->"6e1a1f51-d195-4132-8205-9e3801227699"] }, Open ]], Cell[CellGroupData[{ -Cell[159062, 3572, 2249, 64, 131, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], -Cell[161314, 3638, 555, 12, 50, "Message",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], -Cell[161872, 3652, 557, 12, 56, "Message",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], -Cell[162432, 3666, 563, 12, 56, "Message",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], -Cell[162998, 3680, 458, 10, 56, "Message",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], -Cell[163459, 3692, 173, 3, 56, "Output",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] +Cell[18705, 556, 219, 4, 23, "Input",ExpressionUUID->"9fdb83bd-9ce2-47b3-b980-758016382871"], +Cell[18927, 562, 363, 6, 26, "Output",ExpressionUUID->"5e5b4357-83ce-42f8-bf32-537a33c45051"] }, Open ]], Cell[CellGroupData[{ -Cell[163669, 3700, 2223, 64, 56, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], -Cell[165895, 3766, 555, 12, 56, "Message",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], -Cell[166453, 3780, 557, 12, 56, "Message",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], -Cell[167013, 3794, 561, 12, 56, "Message",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], -Cell[167577, 3808, 458, 10, 56, "Message",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], -Cell[168038, 3820, 173, 3, 56, "Output",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] +Cell[19327, 573, 134, 2, 23, "Input",ExpressionUUID->"e92c44ad-e67e-4fe7-8609-6b2e62c3b287"], +Cell[19464, 577, 350, 5, 26, "Output",ExpressionUUID->"2a9cd11a-892e-4422-8ea9-347b6ec39e1d"] }, Open ]], Cell[CellGroupData[{ -Cell[168248, 3828, 2221, 64, 56, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], -Cell[170472, 3894, 557, 12, 56, "Message",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], -Cell[171032, 3908, 557, 12, 56, "Message",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], -Cell[171592, 3922, 563, 12, 56, "Message",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], -Cell[172158, 3936, 456, 10, 56, "Message",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], -Cell[172617, 3948, 173, 3, 56, "Output",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] +Cell[19851, 587, 327, 5, 23, "Input",ExpressionUUID->"4351d6a8-e416-45af-9c65-28cca7ed0e9a"], +Cell[20181, 594, 348, 5, 26, "Output",ExpressionUUID->"2b06568b-fa3c-49c3-b1ba-6fe8ed5b7302"] }, Open ]], Cell[CellGroupData[{ -Cell[172827, 3956, 213, 6, 56, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], -Cell[173043, 3964, 171, 3, 56, "Output",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] -}, Open ]], -Cell[173229, 3970, 245, 5, 56, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], -Cell[CellGroupData[{ -Cell[173499, 3979, 558, 19, 56, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[174060, 4000, 172, 3, 56, "Output",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] +Cell[20566, 604, 296, 5, 23, "Input",ExpressionUUID->"4ce5b406-827f-4cd0-aea1-29b605dcf26b"], +Cell[20865, 611, 345, 5, 26, "Output",ExpressionUUID->"d68787f0-5c9e-495c-8a2c-1f3cf2a124e5"] }, Open ]], Cell[CellGroupData[{ -Cell[174269, 4008, 170, 5, 56, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[174442, 4015, 173, 3, 56, "Output",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] +Cell[21247, 621, 219, 4, 23, "Input",ExpressionUUID->"f8885e79-2f36-4acb-ba21-c107b77007ad"], +Cell[21469, 627, 340, 5, 26, "Output",ExpressionUUID->"e81697f5-a799-4bbb-9f2a-aa5a6669617c"] }, Open ]], Cell[CellGroupData[{ -Cell[174652, 4023, 181, 5, 56, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[174836, 4030, 173, 3, 56, "Output",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] +Cell[21846, 637, 350, 10, 35, "Input",ExpressionUUID->"0454f847-4a7d-45a1-9732-9879835040f8"], +Cell[22199, 649, 373, 5, 26, "Output",ExpressionUUID->"07a36dfe-f559-4c5d-8be0-aeec775e67ef"] }, Open ]], Cell[CellGroupData[{ -Cell[175046, 4038, 6055, 185, 56, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[181104, 4225, 172, 3, 56, "Output",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] +Cell[22609, 659, 350, 10, 35, "Input",ExpressionUUID->"a0d5621a-8b4b-4305-b03e-45727e24862c"], +Cell[22962, 671, 386, 6, 26, "Output",ExpressionUUID->"cd95dd84-3dd9-4f6a-bcc4-a3872b0fccc5"] }, Open ]], Cell[CellGroupData[{ -Cell[181313, 4233, 368, 9, 56, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[181684, 4244, 170, 3, 56, "Output",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] +Cell[23385, 682, 994, 26, 72, "Input",ExpressionUUID->"88188a62-9d69-421a-96d2-9112d568a077"], +Cell[24382, 710, 361, 5, 26, "Output",ExpressionUUID->"49e1c85f-85b6-44dc-936f-11860e0be7a1"] }, Open ]], Cell[CellGroupData[{ -Cell[181891, 4252, 6122, 187, 56, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[188016, 4441, 175, 3, 56, "Output",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] +Cell[24780, 720, 199, 3, 23, "Input",ExpressionUUID->"c20bb19a-21bb-4ed9-9c95-cf1f464aeb82"], +Cell[24982, 725, 346, 5, 26, "Output",ExpressionUUID->"3324dc95-5b67-4664-ad8d-c93137480e14"] }, Open ]], Cell[CellGroupData[{ -Cell[188228, 4449, 368, 9, 56, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[188599, 4460, 172, 3, 56, "Output",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] +Cell[25365, 735, 325, 5, 23, "Input",ExpressionUUID->"817cc206-4934-44c7-96e8-957395b05afe"], +Cell[25693, 742, 326, 5, 26, "Output",ExpressionUUID->"f62a41d2-a50c-4672-b95b-437be2d438cc"] +}, Open ]], +Cell[26034, 750, 173, 2, 70, "Input",ExpressionUUID->"0a8112e9-9786-4a3f-960f-13763fda2978"], +Cell[CellGroupData[{ +Cell[26232, 756, 327, 5, 23, "Input",ExpressionUUID->"a1270fba-446f-4b58-a174-16051a452516"], +Cell[26562, 763, 320, 5, 26, "Output",ExpressionUUID->"381df8a1-6fdf-41d6-82af-5c558ec47a93"] +}, Open ]], +Cell[26897, 771, 173, 2, 70, "Input",ExpressionUUID->"273cc367-92fa-40fa-9466-396154fcc0e1"], +Cell[CellGroupData[{ +Cell[27095, 777, 332, 5, 23, "Input",ExpressionUUID->"181f3fd1-3523-4e19-b3a3-3dd2f17b4164"], +Cell[27430, 784, 325, 5, 26, "Output",ExpressionUUID->"daf19069-b4f5-4b03-a394-a48d8bc7b90b"] +}, Open ]], +Cell[27770, 792, 173, 2, 70, "Input",ExpressionUUID->"1f736b66-34b4-4253-9cdc-ecde5f1d3da5"], +Cell[CellGroupData[{ +Cell[27968, 798, 351, 5, 23, "Input",ExpressionUUID->"40b3734b-24d1-4dfc-a6c4-d7a55a625cde"], +Cell[28322, 805, 328, 5, 26, "Output",ExpressionUUID->"2cb88f11-280d-4c25-8004-6c958fd61452"] +}, Open ]], +Cell[28665, 813, 171, 2, 70, "Input",ExpressionUUID->"11ec6105-6489-466c-9a3f-f64cc60b46d0"], +Cell[CellGroupData[{ +Cell[28861, 819, 298, 5, 23, "Input",ExpressionUUID->"8fe7fa4f-8546-4a78-a36a-010c442399aa"], +Cell[29162, 826, 324, 5, 26, "Output",ExpressionUUID->"bda1776f-cbd1-4592-8f90-a3761d429bc3"] +}, Open ]], +Cell[29501, 834, 171, 2, 70, "Input",ExpressionUUID->"c2f25741-b47e-4fb9-8951-b547ee5a22c8"], +Cell[CellGroupData[{ +Cell[29697, 840, 303, 5, 23, "Input",ExpressionUUID->"b578e50c-d549-45d2-958c-a8952dcc2d47"], +Cell[30003, 847, 329, 5, 26, "Output",ExpressionUUID->"c0dee2b1-34b1-4a9b-b448-825e3a554f77"] +}, Open ]], +Cell[30347, 855, 173, 2, 70, "Input",ExpressionUUID->"2a01da94-fa48-462f-928d-3595aabb8616"], +Cell[CellGroupData[{ +Cell[30545, 861, 306, 5, 23, "Input",ExpressionUUID->"30f5afbd-a86d-49e1-840b-9e2f816c1e6d"], +Cell[30854, 868, 328, 5, 26, "Output",ExpressionUUID->"96a94c60-7835-4972-90be-9ef73e9d8bf5"] +}, Open ]], +Cell[31197, 876, 172, 2, 70, "Input",ExpressionUUID->"7a24d9ae-274f-48fc-973d-9980b4cf3817"], +Cell[CellGroupData[{ +Cell[31394, 882, 275, 4, 23, "Input",ExpressionUUID->"9f8f4d3d-152c-4c5c-9c76-e533896c8d3a"], +Cell[31672, 888, 324, 5, 26, "Output",ExpressionUUID->"265a6131-d29f-4791-bb3d-5a1fc620784c"] +}, Open ]], +Cell[32011, 896, 175, 2, 70, "Input",ExpressionUUID->"a3074821-cee3-4bb1-8015-477a7df2c7bb"], +Cell[CellGroupData[{ +Cell[32211, 902, 19809, 485, 1218, "Input",ExpressionUUID->"a3b4a6be-a4a7-4c0e-8723-1bcfd9a3cf22"], +Cell[52023, 1389, 359, 5, 26, "Output",ExpressionUUID->"88be2ff9-0c3a-41db-ba54-bd99b7e599c5"] }, Open ]], Cell[CellGroupData[{ -Cell[188808, 4468, 2663, 88, 56, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[191474, 4558, 173, 3, 56, "Output",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] +Cell[52419, 1399, 19748, 489, 1218, "Input",ExpressionUUID->"6b5e352e-37e1-4de0-8158-72ad8fccd823"], +Cell[72170, 1890, 361, 5, 26, "Output",ExpressionUUID->"a5531d53-2de6-4440-99dd-98bef6fbe59a"] }, Open ]], Cell[CellGroupData[{ -Cell[191684, 4566, 2603, 85, 56, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[194290, 4653, 171, 3, 56, "Output",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] +Cell[72568, 1900, 19748, 483, 1218, "Input",ExpressionUUID->"80af8cf6-3df3-44b8-9f40-1de893e87058"], +Cell[92319, 2385, 376, 6, 26, "Output",ExpressionUUID->"88403ace-5f9e-426a-bfeb-992df44cdfd8"] }, Open ]], Cell[CellGroupData[{ -Cell[194498, 4661, 3712, 118, 56, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[198213, 4781, 174, 3, 56, "Output",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] +Cell[92732, 2396, 22534, 553, 1356, "Input",ExpressionUUID->"a6ae27b5-df61-4c34-b419-36564b3a04c7"], +Cell[115269, 2951, 379, 6, 26, "Output",ExpressionUUID->"eaa22d3e-dd7a-4b2f-8ddf-a22073680456"] }, Open ]], Cell[CellGroupData[{ -Cell[198424, 4789, 2052, 59, 56, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], -Cell[200479, 4850, 578, 12, 56, "Message",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], -Cell[201060, 4864, 583, 12, 56, "Message",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], -Cell[201646, 4878, 586, 12, 56, "Message",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], -Cell[202235, 4892, 456, 10, 56, "Message",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], -Cell[202694, 4904, 170, 3, 56, "Output",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] +Cell[115685, 2962, 22535, 553, 1356, "Input",ExpressionUUID->"ec5e354e-0666-4934-944d-8d3a926ffb5e"], +Cell[138223, 3517, 382, 6, 26, "Output",ExpressionUUID->"4e855c81-71bc-42fe-895c-87d0084b122b"] }, Open ]], Cell[CellGroupData[{ -Cell[202901, 4912, 2054, 59, 56, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], -Cell[204958, 4973, 576, 12, 56, "Message",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], -Cell[205537, 4987, 581, 12, 56, "Message",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], -Cell[206121, 5001, 586, 12, 56, "Message",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], -Cell[206710, 5015, 458, 10, 56, "Message",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], -Cell[207171, 5027, 172, 3, 56, "Output",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] +Cell[138642, 3528, 25491, 626, 1512, "Input",ExpressionUUID->"9c79728a-84fb-407b-b67b-315bd66717c5"], +Cell[164136, 4156, 380, 6, 26, "Output",ExpressionUUID->"d2499926-fe95-4c4c-a174-cad7d36b17da"] }, Open ]], Cell[CellGroupData[{ -Cell[207380, 5035, 2028, 55, 56, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], -Cell[209411, 5092, 20011, 378, 56, "Output",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] +Cell[164553, 4167, 130, 2, 23, "Input",ExpressionUUID->"c95435be-aef5-47ec-8dff-32c920d2012b"], +Cell[164686, 4171, 344, 5, 26, "Output",ExpressionUUID->"34fb997e-8b99-4b3c-9ad3-f16d7fc6df72"] }, Open ]], Cell[CellGroupData[{ -Cell[229459, 5475, 2115, 60, 56, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], -Cell[231577, 5537, 501, 11, 56, "Message",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], -Cell[232081, 5550, 503, 11, 56, "Message",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], -Cell[232587, 5563, 505, 11, 56, "Message",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], -Cell[233095, 5576, 456, 10, 56, "Message",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], -Cell[233554, 5588, 32548, 580, 56, "Output",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] -}, Open ]], -Cell[266117, 6171, 209, 5, 56, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], -Cell[CellGroupData[{ -Cell[266351, 6180, 1616, 48, 56, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], -Cell[267970, 6230, 596, 12, 56, "Message",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], -Cell[268569, 6244, 599, 12, 56, "Message",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], -Cell[269171, 6258, 605, 12, 56, "Message",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], -Cell[269779, 6272, 456, 10, 56, "Message",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], -Cell[270238, 6284, 170, 3, 56, "Output",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] +Cell[165067, 4181, 130, 2, 23, "Input",ExpressionUUID->"29779e8c-34e4-4ad3-8702-4080767b9b4b"], +Cell[165200, 4185, 347, 5, 26, "Output",ExpressionUUID->"533a9321-68b2-4e98-be9f-d7359943b84c"] }, Open ]], Cell[CellGroupData[{ -Cell[270445, 6292, 2247, 64, 56, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], -Cell[272695, 6358, 580, 12, 56, "Message",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], -Cell[273278, 6372, 583, 12, 56, "Message",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], -Cell[273864, 6386, 584, 12, 56, "Message",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], -Cell[274451, 6400, 458, 10, 56, "Message",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], -Cell[274912, 6412, 170, 3, 56, "Output",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] +Cell[165584, 4195, 1144, 39, 95, "Input",ExpressionUUID->"00ebff4c-51a5-4d36-b07a-4af2a4ce9bdb"], +Cell[166731, 4236, 360, 5, 26, "Output",ExpressionUUID->"3b16e6a6-1b04-4ede-8d95-b1599b1324c8"] }, Open ]], Cell[CellGroupData[{ -Cell[275119, 6420, 2219, 64, 56, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], -Cell[277341, 6486, 580, 12, 56, "Message",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], -Cell[277924, 6500, 583, 12, 56, "Message",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], -Cell[278510, 6514, 586, 12, 56, "Message",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], -Cell[279099, 6528, 458, 10, 56, "Message",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], -Cell[279560, 6540, 171, 3, 56, "Output",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] +Cell[167128, 4246, 1041, 35, 129, "Input",ExpressionUUID->"5af2d744-f0be-488a-9371-68b8ac8ddb0b"], +Cell[168172, 4283, 377, 6, 26, "Output",ExpressionUUID->"534d9a36-d107-44b4-b89e-0cce089147ff"] }, Open ]], Cell[CellGroupData[{ -Cell[279768, 6548, 2221, 64, 56, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], -Cell[281992, 6614, 580, 12, 56, "Message",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], -Cell[282575, 6628, 583, 12, 56, "Message",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], -Cell[283161, 6642, 584, 12, 56, "Message",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], -Cell[283748, 6656, 456, 10, 56, "Message",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], -Cell[284207, 6668, 170, 3, 56, "Output",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] +Cell[168586, 4294, 1144, 39, 95, "Input",ExpressionUUID->"0f6672c6-475a-4424-aac5-95e1390dd70c"], +Cell[169733, 4335, 361, 5, 26, "Output",ExpressionUUID->"2acdb385-6f18-4d84-9107-45d548cade16"] }, Open ]], Cell[CellGroupData[{ -Cell[284414, 6676, 213, 6, 56, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], -Cell[284630, 6684, 174, 3, 56, "Output",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] -}, Open ]], -Cell[284819, 6690, 247, 5, 56, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], -Cell[CellGroupData[{ -Cell[285091, 6699, 558, 19, 56, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[285652, 6720, 173, 3, 56, "Output",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] +Cell[170131, 4345, 108, 1, 23, "Input",ExpressionUUID->"647a95c5-fdff-458b-87ed-7c73ac1baaf6"], +Cell[170242, 4348, 366, 5, 26, "Output",ExpressionUUID->"cc1d3866-f162-4c86-a8ab-6252f69a3ddd"] }, Open ]], Cell[CellGroupData[{ -Cell[285862, 6728, 170, 5, 56, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[286035, 6735, 173, 3, 56, "Output",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] +Cell[170645, 4358, 108, 1, 23, "Input",ExpressionUUID->"339e68d2-ac81-4507-a125-e8f861b5d1c3"], +Cell[170756, 4361, 381, 6, 26, "Output",ExpressionUUID->"4f69de41-dfd2-4ccf-892c-a85bd0205606"] }, Open ]], Cell[CellGroupData[{ -Cell[286245, 6743, 181, 5, 56, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[286429, 6750, 171, 3, 56, "Output",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] +Cell[171174, 4372, 108, 1, 23, "Input",ExpressionUUID->"9dcd9de9-e748-4c86-978a-bf1681d59287"], +Cell[171285, 4375, 382, 6, 26, "Output",ExpressionUUID->"c490244a-4eed-416a-9c4a-8eedd9dbdb90"] }, Open ]], Cell[CellGroupData[{ -Cell[286637, 6758, 6055, 185, 56, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[292695, 6945, 173, 3, 56, "Output",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] +Cell[171704, 4386, 108, 1, 23, "Input",ExpressionUUID->"9ccec18a-684b-4a69-957e-a311737e8482"], +Cell[171815, 4389, 357, 5, 26, "Output",ExpressionUUID->"4a2d0fce-25ff-4c70-a5c4-0cc71299c973"] }, Open ]], Cell[CellGroupData[{ -Cell[292905, 6953, 368, 9, 56, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[293276, 6964, 172, 3, 56, "Output",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] +Cell[172209, 4399, 107, 1, 23, "Input",ExpressionUUID->"3583a96c-29c4-4a62-88d2-103b2169dd27"], +Cell[172319, 4402, 362, 5, 26, "Output",ExpressionUUID->"b689c930-d234-41ee-b6f6-4d88f60d8ed8"] }, Open ]], Cell[CellGroupData[{ -Cell[293485, 6972, 6122, 187, 56, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[299610, 7161, 175, 3, 56, "Output",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] +Cell[172718, 4412, 107, 1, 23, "Input",ExpressionUUID->"13480ebd-99af-4b89-8ff4-f2137ec923f3"], +Cell[172828, 4415, 364, 5, 26, "Output",ExpressionUUID->"eea3f6b2-da8e-487e-be03-27a41e187a01"] }, Open ]], Cell[CellGroupData[{ -Cell[299822, 7169, 368, 9, 56, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[300193, 7180, 171, 3, 56, "Output",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] +Cell[173229, 4425, 497, 16, 46, "Input",ExpressionUUID->"7f9ee95c-7c4f-4bef-807a-9bf9dc17ccb4"], +Cell[173729, 4443, 381, 6, 26, "Output",ExpressionUUID->"12ff7027-b2e1-4403-9f5a-38921ef2d72c"] }, Open ]], Cell[CellGroupData[{ -Cell[300401, 7188, 2663, 88, 56, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[303067, 7278, 173, 3, 56, "Output",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] +Cell[174147, 4454, 497, 16, 46, "Input",ExpressionUUID->"ab005516-c6e7-4a06-a0f1-63ec9525770a"], +Cell[174647, 4472, 371, 6, 26, "Output",ExpressionUUID->"e1c8fda7-09cc-4669-9521-a7e4d5f08230"] }, Open ]], Cell[CellGroupData[{ -Cell[303277, 7286, 2603, 85, 56, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[305883, 7373, 171, 3, 56, "Output",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] +Cell[175055, 4483, 1788, 60, 48, "Input",ExpressionUUID->"3d50f6d0-0134-4618-99f4-2275be4fa38e"], +Cell[176846, 4545, 360, 5, 26, "Output",ExpressionUUID->"9e056708-9ee6-4afd-8aaf-69253bc6a432"] }, Open ]], Cell[CellGroupData[{ -Cell[306091, 7381, 3712, 118, 56, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[309806, 7501, 174, 3, 56, "Output",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] +Cell[177243, 4555, 1101, 36, 48, "Input",ExpressionUUID->"12959b73-85b7-41a0-8e7d-12bd386022d8"], +Cell[178347, 4593, 380, 6, 26, "Output",ExpressionUUID->"25180c62-b8d2-4fe7-9e48-5386b1d974cb"] }, Open ]], Cell[CellGroupData[{ -Cell[310017, 7509, 2054, 59, 56, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], -Cell[312074, 7570, 572, 12, 56, "Message",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], -Cell[312649, 7584, 573, 12, 56, "Message",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], -Cell[313225, 7598, 579, 12, 56, "Message",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], -Cell[313807, 7612, 456, 10, 56, "Message",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], -Cell[314266, 7624, 169, 3, 56, "Output",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] +Cell[178764, 4604, 1818, 61, 95, "Input",ExpressionUUID->"0a70a019-5a37-4f41-950f-bf191df7c759"], +Cell[180585, 4667, 365, 5, 26, "Output",ExpressionUUID->"7fafd7dd-286a-49d0-a5b8-f78a5c03cd31"] }, Open ]], Cell[CellGroupData[{ -Cell[314472, 7632, 2049, 58, 56, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], -Cell[316524, 7692, 570, 12, 56, "Message",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], -Cell[317097, 7706, 575, 12, 56, "Message",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], -Cell[317675, 7720, 579, 12, 56, "Message",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], -Cell[318257, 7734, 458, 10, 56, "Message",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], -Cell[318718, 7746, 171, 3, 56, "Output",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] +Cell[180987, 4677, 1631, 53, 67, "Input",ExpressionUUID->"5faf041c-c5e8-4f9f-b2ed-e9cd654676f8"], +Cell[182621, 4732, 369, 5, 26, "Output",ExpressionUUID->"83b2ff57-424e-4035-899e-8b7eeac1f919"] }, Open ]], Cell[CellGroupData[{ -Cell[318926, 7754, 2030, 55, 56, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], -Cell[320959, 7811, 20011, 378, 56, "Output",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] +Cell[183027, 4742, 1631, 53, 67, "Input",ExpressionUUID->"bca7ad7a-f24b-4a63-9988-2ea3001a23af"], +Cell[184661, 4797, 364, 5, 26, "Output",ExpressionUUID->"e141d665-5b0d-473f-bd38-01c57089923c"] }, Open ]], Cell[CellGroupData[{ -Cell[341007, 8194, 2120, 60, 56, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], -Cell[343130, 8256, 501, 11, 56, "Message",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], -Cell[343634, 8269, 505, 11, 56, "Message",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], -Cell[344142, 8282, 506, 11, 56, "Message",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], -Cell[344651, 8295, 456, 10, 56, "Message",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], -Cell[345110, 8307, 31008, 556, 56, "Output",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] +Cell[185062, 4807, 206, 3, 23, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], +Cell[185271, 4812, 163, 2, 26, "Output",ExpressionUUID->"e0534f66-5d0e-425f-8e07-ab44bf8f22fe"] }, Open ]], -Cell[376133, 8866, 209, 5, 56, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], +Cell[185449, 4817, 173, 2, 23, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], Cell[CellGroupData[{ -Cell[376367, 8875, 1616, 48, 56, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], -Cell[377986, 8925, 593, 12, 56, "Message",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], -Cell[378582, 8939, 595, 12, 56, "Message",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], -Cell[379180, 8953, 602, 12, 56, "Message",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], -Cell[379785, 8967, 456, 10, 56, "Message",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], -Cell[380244, 8979, 172, 3, 56, "Output",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] +Cell[185647, 4823, 206, 3, 23, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], +Cell[185856, 4828, 161, 2, 26, "Output",ExpressionUUID->"ac1d431d-a8a0-40df-b261-1dc4115c4fcf"] +}, Open ]], +Cell[186032, 4833, 173, 2, 23, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], +Cell[CellGroupData[{ +Cell[186230, 4839, 1297, 42, 40, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], +Cell[187530, 4883, 195, 2, 26, "Output",ExpressionUUID->"b0f40d39-037c-4027-9011-ce284a698e37"] }, Open ]], Cell[CellGroupData[{ -Cell[380453, 8987, 2249, 64, 56, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], -Cell[382705, 9053, 572, 12, 56, "Message",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], -Cell[383280, 9067, 575, 12, 56, "Message",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], -Cell[383858, 9081, 579, 12, 56, "Message",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], -Cell[384440, 9095, 458, 10, 56, "Message",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], -Cell[384901, 9107, 173, 3, 56, "Output",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] +Cell[187762, 4890, 929, 30, 48, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], +Cell[188694, 4922, 193, 2, 26, "Output",ExpressionUUID->"503890ad-a9e4-4c47-84dc-5b35a2872c18"] }, Open ]], Cell[CellGroupData[{ -Cell[385111, 9115, 2221, 64, 56, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], -Cell[387335, 9181, 572, 12, 56, "Message",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], -Cell[387910, 9195, 575, 12, 56, "Message",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], -Cell[388488, 9209, 577, 12, 56, "Message",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], -Cell[389068, 9223, 456, 10, 56, "Message",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], -Cell[389527, 9235, 172, 3, 56, "Output",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] +Cell[188924, 4929, 906, 29, 48, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], +Cell[189833, 4960, 194, 2, 26, "Output",ExpressionUUID->"31494c40-0c49-46ee-abf7-d62cf8e11996"] }, Open ]], Cell[CellGroupData[{ -Cell[389736, 9243, 2223, 64, 56, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], -Cell[391962, 9309, 572, 12, 56, "Message",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], -Cell[392537, 9323, 573, 12, 56, "Message",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], -Cell[393113, 9337, 579, 12, 56, "Message",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], -Cell[393695, 9351, 456, 10, 56, "Message",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], -Cell[394154, 9363, 173, 3, 56, "Output",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] +Cell[190064, 4967, 554, 18, 43, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], +Cell[190621, 4987, 191, 2, 26, "Output",ExpressionUUID->"95e88d9e-5c42-4c51-9873-06008de28a3a"] }, Open ]], Cell[CellGroupData[{ -Cell[394364, 9371, 215, 6, 56, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], -Cell[394582, 9379, 174, 3, 56, "Output",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] +Cell[190849, 4994, 619, 20, 43, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], +Cell[191471, 5016, 189, 2, 26, "Output",ExpressionUUID->"e60425af-309e-46a9-94a4-4ee125684355"] +}, Open ]], +Cell[CellGroupData[{ +Cell[191697, 5023, 166, 4, 47, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], +Cell[191866, 5029, 192, 2, 26, "Output",ExpressionUUID->"2f495dc5-3bd1-49e6-8ffa-5dc16f17d629"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192095, 5036, 166, 4, 46, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], +Cell[192264, 5042, 189, 2, 26, "Output",ExpressionUUID->"5790a8f0-1df2-4f98-a087-3e2145565637"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192490, 5049, 177, 4, 36, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], +Cell[192670, 5055, 187, 2, 26, "Output",ExpressionUUID->"658e442d-afc5-4bac-be15-45314fdcdef7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192894, 5062, 177, 4, 36, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], +Cell[193074, 5068, 191, 2, 26, "Output",ExpressionUUID->"947b231c-d302-40f0-9d4b-455e9abdadd8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[193302, 5075, 6051, 184, 161, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], +Cell[199356, 5261, 195, 2, 26, "Output",ExpressionUUID->"36cfef44-b8eb-4f24-abf5-8441543f33c1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[199588, 5268, 364, 8, 33, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], +Cell[199955, 5278, 192, 2, 26, "Output",ExpressionUUID->"2384f38c-a809-4920-bad1-7faa2e170ba7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[200184, 5285, 6118, 186, 161, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], +Cell[206305, 5473, 190, 2, 26, "Output",ExpressionUUID->"213c8055-45d9-4976-bbc9-ccbdbf059d04"] +}, Open ]], +Cell[CellGroupData[{ +Cell[206532, 5480, 364, 8, 33, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], +Cell[206899, 5490, 191, 2, 26, "Output",ExpressionUUID->"28618e42-61e8-4cf4-b06b-72f2399be3b2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[207127, 5497, 2659, 87, 95, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], +Cell[209789, 5586, 192, 2, 26, "Output",ExpressionUUID->"759f5720-2e0d-46c6-8064-24b0b516e6a5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[210018, 5593, 2599, 84, 95, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], +Cell[212620, 5679, 190, 2, 26, "Output",ExpressionUUID->"19c9f75e-f828-442e-815b-ec404d2ebcce"] +}, Open ]], +Cell[CellGroupData[{ +Cell[212847, 5686, 3708, 117, 142, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], +Cell[216558, 5805, 192, 2, 26, "Output",ExpressionUUID->"14731ffa-2445-43a1-a2fb-0ce8b4351d0d"] +}, Open ]], +Cell[216765, 5810, 160, 3, 23, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], +Cell[CellGroupData[{ +Cell[216950, 5817, 2073, 58, 83, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], +Cell[219026, 5877, 707, 14, 35, "Message",ExpressionUUID->"27f7bab5-d7f1-4f91-b10f-ca5937bd9ffa"], +Cell[219736, 5893, 712, 14, 64, "Message",ExpressionUUID->"4347c0b0-932e-4456-9f32-5755a668b6b0"], +Cell[220451, 5909, 812, 17, 64, "Message",ExpressionUUID->"6a295aed-eac5-4387-803c-90c63082675c"], +Cell[221266, 5928, 492, 11, 20, "Message",ExpressionUUID->"1aff5c44-e4c0-4fe5-ad2e-c0d9d9f732cc"], +Cell[221761, 5941, 190, 2, 26, "Output",ExpressionUUID->"ac4db101-f70e-4e6f-a540-768d805fce8f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[221988, 5948, 2071, 58, 83, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], +Cell[224062, 6008, 706, 14, 35, "Message",ExpressionUUID->"871c0284-1e4d-4c4b-b96e-4da755de134b"], +Cell[224771, 6024, 712, 14, 35, "Message",ExpressionUUID->"7c6968e2-2c9b-4598-aaa0-2a987bccfb8c"], +Cell[225486, 6040, 808, 17, 35, "Message",ExpressionUUID->"7f04fd8e-81f2-459a-aeac-e5837833f68f"], +Cell[226297, 6059, 490, 11, 20, "Message",ExpressionUUID->"0543045b-514b-43a8-bc48-d2e1b1080219"], +Cell[226790, 6072, 193, 2, 26, "Output",ExpressionUUID->"da74105e-0b66-47d4-8c36-351b564a9ade"] +}, Open ]], +Cell[CellGroupData[{ +Cell[227020, 6079, 1955, 52, 61, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], +Cell[228978, 6133, 20949, 389, 194, "Output",ExpressionUUID->"962d51aa-3811-4bd1-9064-4308cff0d55c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[249964, 6527, 2113, 59, 112, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], +Cell[252080, 6588, 558, 12, 48, "Message",ExpressionUUID->"2c931046-b7f2-4538-a8b5-f4428ff6893c"], +Cell[252641, 6602, 561, 12, 48, "Message",ExpressionUUID->"9023685d-213d-4aff-a870-17980dc21eba"], +Cell[253205, 6616, 567, 12, 48, "Message",ExpressionUUID->"d46fa355-39b5-40cb-9952-762efe31cd93"], +Cell[253775, 6630, 493, 11, 20, "Message",ExpressionUUID->"fa0e8c28-9f24-4866-950f-bb4c39cdae74"], +Cell[254271, 6643, 35484, 629, 186, "Output",ExpressionUUID->"7a470660-ba17-4c65-8121-0c7d25eb3c7a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[289792, 7277, 2517, 70, 119, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], +Cell[292312, 7349, 9504, 222, 191, "Output",ExpressionUUID->"eea86f13-35df-4b03-be09-6a01d4fd28fb"] +}, Open ]], +Cell[CellGroupData[{ +Cell[301853, 7576, 228, 4, 23, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], +Cell[302084, 7582, 41857, 761, 186, "Output",ExpressionUUID->"91c023e4-b3b3-4c58-be4f-f4ef575202ab"] +}, Open ]], +Cell[CellGroupData[{ +Cell[343978, 8348, 236, 6, 40, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], +Cell[344217, 8356, 190, 2, 26, "Output",ExpressionUUID->"9c731138-c85a-47c4-ba6e-7f28204091ee"] +}, Open ]], +Cell[CellGroupData[{ +Cell[344444, 8363, 1835, 52, 83, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], +Cell[346282, 8417, 578, 13, 48, "Message",ExpressionUUID->"633fa644-c8ef-4162-829a-99935a16c3ea"], +Cell[346863, 8432, 582, 13, 48, "Message",ExpressionUUID->"2aa72bd3-ea94-4c64-82bb-7eeb98b04716"], +Cell[347448, 8447, 585, 13, 48, "Message",ExpressionUUID->"4fcb0a63-0864-4e84-b255-b286b11213e3"], +Cell[348036, 8462, 495, 11, 20, "Message",ExpressionUUID->"f9ba6b56-4df5-46a9-8372-0221558da0f3"], +Cell[348534, 8475, 44543, 776, 186, "Output",ExpressionUUID->"c72c00ed-2509-4515-a595-5d26141bb334"] +}, Open ]], +Cell[CellGroupData[{ +Cell[393114, 9256, 1616, 48, 60, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], +Cell[394733, 9306, 192, 3, 26, "Output",ExpressionUUID->"95aa7f30-ef3a-4023-883d-6597f3d7a774"] +}, Open ]], +Cell[CellGroupData[{ +Cell[394962, 9314, 2272, 64, 128, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], +Cell[397237, 9380, 708, 14, 64, "Message",ExpressionUUID->"10b11239-bb92-4722-a74c-9d6ce2148a7d"], +Cell[397948, 9396, 713, 14, 64, "Message",ExpressionUUID->"b38171f1-bf68-4e48-bb7d-e9aac25c792a"], +Cell[398664, 9412, 811, 17, 64, "Message",ExpressionUUID->"b02170df-5f33-4256-8403-2a2bcf508a81"], +Cell[399478, 9431, 493, 11, 20, "Message",ExpressionUUID->"8392bb86-f054-45fd-98dd-056af81b672d"], +Cell[399974, 9444, 195, 3, 26, "Output",ExpressionUUID->"2afede13-e98c-4ae8-84d1-fe1aba5df8fc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[400206, 9452, 2235, 63, 128, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], +Cell[402444, 9517, 708, 14, 64, "Message",ExpressionUUID->"7c8f7168-2b6b-42e0-a5be-abd54142b43f"], +Cell[403155, 9533, 715, 14, 64, "Message",ExpressionUUID->"89d9f713-7872-44f8-aaa5-6dd5a6e3f5c1"], +Cell[403873, 9549, 811, 17, 64, "Message",ExpressionUUID->"e4b6cf8f-dec4-4011-8bb2-7bba21e0a139"], +Cell[404687, 9568, 495, 11, 20, "Message",ExpressionUUID->"a459bc10-e1ba-4c09-911d-570fa72e7263"], +Cell[405185, 9581, 195, 3, 26, "Output",ExpressionUUID->"57717e56-ab16-4506-9cf4-9d3625919cf5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[405417, 9589, 2233, 63, 128, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], +Cell[407653, 9654, 713, 14, 64, "Message",ExpressionUUID->"4a934517-41cb-4da1-8ebf-f53b518cc59c"], +Cell[408369, 9670, 715, 14, 64, "Message",ExpressionUUID->"b40bb072-33c3-4ef1-b73a-26560d6a1cbb"], +Cell[409087, 9686, 813, 17, 64, "Message",ExpressionUUID->"a43256fa-e79c-47d8-bb39-3b718665834d"], +Cell[409903, 9705, 495, 11, 20, "Message",ExpressionUUID->"d934452d-bbf0-4c7d-8e6e-0f0fb2e9dfc3"], +Cell[410401, 9718, 197, 3, 26, "Output",ExpressionUUID->"599ea0fc-2242-4ae0-8b4d-80a7e6997a6d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[410635, 9726, 236, 6, 39, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], +Cell[410874, 9734, 191, 3, 38, "Output",ExpressionUUID->"2118b185-9038-472e-a7d7-61d088713614"] +}, Open ]], +Cell[411080, 9740, 271, 6, 70, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], +Cell[CellGroupData[{ +Cell[411376, 9750, 558, 19, 43, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], +Cell[411937, 9771, 194, 3, 38, "Output",ExpressionUUID->"056bd6c5-ecc2-4b68-9549-6e5ea54bbf4b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[412168, 9779, 170, 5, 47, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], +Cell[412341, 9786, 198, 3, 38, "Output",ExpressionUUID->"ffbd1ce9-3bd4-4130-ac62-1eef6c01dca9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[412576, 9794, 181, 5, 36, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], +Cell[412760, 9801, 195, 3, 38, "Output",ExpressionUUID->"ba8219fd-a9d3-4b83-b556-9ea83738c8ec"] +}, Open ]], +Cell[CellGroupData[{ +Cell[412992, 9809, 6055, 185, 413, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], +Cell[419050, 9996, 197, 3, 38, "Output",ExpressionUUID->"a69f82a0-9aec-454b-93de-5fad693d8112"] +}, Open ]], +Cell[CellGroupData[{ +Cell[419284, 10004, 368, 9, 33, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], +Cell[419655, 10015, 194, 3, 38, "Output",ExpressionUUID->"15cbbee3-85df-415c-bcac-6549f901362b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[419886, 10023, 6122, 187, 413, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], +Cell[426011, 10212, 195, 3, 38, "Output",ExpressionUUID->"8d41fc61-ed25-4d65-86d7-e1d7ac27af98"] +}, Open ]], +Cell[CellGroupData[{ +Cell[426243, 10220, 368, 9, 33, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], +Cell[426614, 10231, 194, 3, 38, "Output",ExpressionUUID->"214b4aa2-20a7-40e6-adf3-a23cd3f9ac3f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[426845, 10239, 2663, 88, 142, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], +Cell[429511, 10329, 195, 3, 38, "Output",ExpressionUUID->"7d1a3d9b-d4e4-45b0-9613-2dfffe64741d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[429743, 10337, 2603, 85, 142, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], +Cell[432349, 10424, 194, 3, 38, "Output",ExpressionUUID->"53d65677-dd77-4164-9afa-b566075a95ef"] +}, Open ]], +Cell[CellGroupData[{ +Cell[432580, 10432, 3712, 118, 208, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], +Cell[436295, 10552, 198, 3, 38, "Output",ExpressionUUID->"37978c33-c32b-4e41-bc42-eb3379cc093a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[436530, 10560, 2075, 59, 83, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], +Cell[438608, 10621, 812, 17, 64, "Message",ExpressionUUID->"4ba7fd20-906c-41d1-9c5c-a52bab9eb669"], +Cell[439423, 10640, 814, 17, 64, "Message",ExpressionUUID->"74b647d3-4842-45b8-86e4-bf2ba3c1b993"], +Cell[440240, 10659, 813, 17, 64, "Message",ExpressionUUID->"c61dded1-1edb-4df7-8f0a-a912fdcf6755"], +Cell[441056, 10678, 493, 11, 20, "Message",ExpressionUUID->"25c60359-dd0b-4519-9109-a3f0ae9ba056"], +Cell[441552, 10691, 192, 3, 26, "Output",ExpressionUUID->"31b9a2d2-c98c-4d53-a441-581652a9d6b4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[441781, 10699, 2077, 59, 83, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], +Cell[443861, 10760, 810, 17, 64, "Message",ExpressionUUID->"acff21c7-30fd-4f80-bce9-93ee55881a00"], +Cell[444674, 10779, 810, 17, 64, "Message",ExpressionUUID->"31ced317-9a29-4674-b707-b4a34e0c2581"], +Cell[445487, 10798, 811, 17, 64, "Message",ExpressionUUID->"d078c715-ba39-4a99-9034-4ad1b826ad71"], +Cell[446301, 10817, 493, 11, 20, "Message",ExpressionUUID->"3cea9d0d-3d86-4dd4-a068-353fc82c4cba"], +Cell[446797, 10830, 197, 3, 26, "Output",ExpressionUUID->"49a8d0d3-e2ce-441e-8429-1c9b5689a519"] +}, Open ]], +Cell[CellGroupData[{ +Cell[447031, 10838, 2051, 55, 69, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], +Cell[449085, 10895, 23708, 435, 194, "Output",ExpressionUUID->"22f76777-138b-4af8-9128-bd704fef8633"] +}, Open ]], +Cell[CellGroupData[{ +Cell[472830, 11335, 2138, 60, 112, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], +Cell[474971, 11397, 566, 12, 48, "Message",ExpressionUUID->"1749216a-c4b1-4aee-95da-6b85e2832628"], +Cell[475540, 11411, 566, 12, 48, "Message",ExpressionUUID->"855e90b2-9baa-4212-ab0f-4ee67079fa91"], +Cell[476109, 11425, 572, 12, 48, "Message",ExpressionUUID->"96128add-9cc6-4d22-a7ca-cc7a7cfe8831"], +Cell[476684, 11439, 495, 11, 20, "Message",ExpressionUUID->"84005616-8f82-48a9-9744-959590dd76ae"], +Cell[477182, 11452, 35173, 624, 186, "Output",ExpressionUUID->"7b7bbb14-3b65-4159-a7f5-17ce7a2239da"] +}, Open ]], +Cell[CellGroupData[{ +Cell[512392, 12081, 232, 5, 23, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], +Cell[512627, 12088, 41543, 756, 186, "Output",ExpressionUUID->"1e7665cd-829d-4497-9f44-b606e833fae9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[554207, 12849, 1616, 48, 60, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], +Cell[555826, 12899, 193, 3, 26, "Output",ExpressionUUID->"bfcfe936-7bc3-4106-912d-871fe7314541"] +}, Open ]], +Cell[CellGroupData[{ +Cell[556056, 12907, 2270, 64, 128, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], +Cell[558329, 12973, 816, 17, 64, "Message",ExpressionUUID->"272e9a4a-28b8-4003-82ef-986c4af9b4eb"], +Cell[559148, 12992, 816, 17, 64, "Message",ExpressionUUID->"3d7ab2b6-3133-47c0-86c6-2ff9397b4185"], +Cell[559967, 13011, 815, 17, 64, "Message",ExpressionUUID->"ef29c465-62e3-432c-af35-68d858db3ab9"], +Cell[560785, 13030, 497, 11, 20, "Message",ExpressionUUID->"fa66516e-9024-4c80-87d8-b6e188d7787c"], +Cell[561285, 13043, 192, 3, 26, "Output",ExpressionUUID->"8f75f4ac-5d83-43a0-92db-b0ae46724637"] +}, Open ]], +Cell[CellGroupData[{ +Cell[561514, 13051, 2231, 63, 128, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], +Cell[563748, 13116, 814, 17, 64, "Message",ExpressionUUID->"94bbc0ff-b57c-4836-8352-ebd0109c855d"], +Cell[564565, 13135, 813, 17, 64, "Message",ExpressionUUID->"b53ef6d7-c6c6-4a24-be2b-c3cb9b6358c7"], +Cell[565381, 13154, 814, 17, 64, "Message",ExpressionUUID->"fbd1c6c4-eb60-40e9-b014-03dc15e29cc9"], +Cell[566198, 13173, 497, 11, 20, "Message",ExpressionUUID->"b2337dcb-c404-4850-8125-26c85f2fc967"], +Cell[566698, 13186, 193, 3, 26, "Output",ExpressionUUID->"d1eadcde-1e0a-41c6-849f-f6208619eba8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[566928, 13194, 2233, 63, 128, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], +Cell[569164, 13259, 814, 17, 64, "Message",ExpressionUUID->"540c8d55-d63d-49b2-a3ef-a81e520de47c"], +Cell[569981, 13278, 814, 17, 64, "Message",ExpressionUUID->"87cbcd80-5320-4ff2-8ab6-223a44f0bc69"], +Cell[570798, 13297, 817, 17, 64, "Message",ExpressionUUID->"0158cf26-b9eb-4bb1-9423-6650b7b6db2b"], +Cell[571618, 13316, 495, 11, 20, "Message",ExpressionUUID->"daf14e84-bf35-4311-90ee-9b5440eaae65"], +Cell[572116, 13329, 193, 3, 26, "Output",ExpressionUUID->"0423ecdc-98d9-4344-bbe2-490f2d1a73fe"] +}, Open ]], +Cell[CellGroupData[{ +Cell[572346, 13337, 236, 6, 39, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], +Cell[572585, 13345, 197, 3, 38, "Output",ExpressionUUID->"abf9833b-3043-4f22-9ff2-c3a4a15cc2a1"] +}, Open ]], +Cell[572797, 13351, 273, 6, 70, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], +Cell[CellGroupData[{ +Cell[573095, 13361, 558, 19, 43, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], +Cell[573656, 13382, 195, 3, 38, "Output",ExpressionUUID->"5f40ec4e-ec59-4179-9300-4016557a1dbd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[573888, 13390, 170, 5, 47, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], +Cell[574061, 13397, 196, 3, 38, "Output",ExpressionUUID->"a5badafa-5f0b-45ea-97c8-534d8a7893c7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[574294, 13405, 181, 5, 36, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], +Cell[574478, 13412, 192, 3, 38, "Output",ExpressionUUID->"80c83d10-0d1e-457f-9493-b6e7b463e8c7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[574707, 13420, 6055, 185, 413, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], +Cell[580765, 13607, 194, 3, 38, "Output",ExpressionUUID->"2a44b085-ca41-4a0b-9d34-1da12f152515"] +}, Open ]], +Cell[CellGroupData[{ +Cell[580996, 13615, 368, 9, 33, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], +Cell[581367, 13626, 194, 3, 38, "Output",ExpressionUUID->"1c3d18da-6111-4249-8718-6977427122e4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[581598, 13634, 6122, 187, 413, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], +Cell[587723, 13823, 196, 3, 38, "Output",ExpressionUUID->"676e8e35-27bd-45ea-9dbd-5cc7032c7011"] +}, Open ]], +Cell[CellGroupData[{ +Cell[587956, 13831, 368, 9, 33, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], +Cell[588327, 13842, 193, 3, 38, "Output",ExpressionUUID->"ae9e2876-3cdf-43f9-bdcc-7d2cf06f50bc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[588557, 13850, 2663, 88, 142, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], +Cell[591223, 13940, 196, 3, 38, "Output",ExpressionUUID->"cfa43b4e-357f-462a-92d3-b4f9143eea08"] +}, Open ]], +Cell[CellGroupData[{ +Cell[591456, 13948, 2603, 85, 142, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], +Cell[594062, 14035, 192, 3, 38, "Output",ExpressionUUID->"6c373bab-43cd-4454-8065-67a9c31454cb"] +}, Open ]], +Cell[CellGroupData[{ +Cell[594291, 14043, 3712, 118, 208, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], +Cell[598006, 14163, 196, 3, 38, "Output",ExpressionUUID->"bd67ed08-0d29-4897-b4eb-5b72842ba5dc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[598239, 14171, 2077, 59, 83, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], +Cell[600319, 14232, 816, 17, 64, "Message",ExpressionUUID->"77d96af7-3fc8-41c8-a2f7-4165b6fca3e8"], +Cell[601138, 14251, 814, 17, 64, "Message",ExpressionUUID->"1dde086e-11e5-4be0-9c43-1ef55c6cd678"], +Cell[601955, 14270, 814, 17, 64, "Message",ExpressionUUID->"b64683f0-231e-4ce5-8cd7-16fc195c3320"], +Cell[602772, 14289, 495, 11, 20, "Message",ExpressionUUID->"44636ef2-f183-4253-af8d-6b1ff7327a06"], +Cell[603270, 14302, 192, 3, 26, "Output",ExpressionUUID->"da76b896-13fc-4af4-9485-fe75a2bfc9da"] +}, Open ]], +Cell[CellGroupData[{ +Cell[603499, 14310, 2074, 59, 83, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], +Cell[605576, 14371, 812, 17, 64, "Message",ExpressionUUID->"16b74b71-df0d-4fd9-b49e-ab71390bc64f"], +Cell[606391, 14390, 812, 17, 64, "Message",ExpressionUUID->"3ac13cd8-2559-44cf-871b-328998a69040"], +Cell[607206, 14409, 812, 17, 64, "Message",ExpressionUUID->"e3447169-dedc-4d46-bf19-3a17123a49d5"], +Cell[608021, 14428, 492, 11, 20, "Message",ExpressionUUID->"1b2a030f-2ec9-4de1-889f-d1a2294f2943"], +Cell[608516, 14441, 195, 3, 26, "Output",ExpressionUUID->"39ead403-0836-4de7-9d8f-7ca8de499754"] +}, Open ]], +Cell[CellGroupData[{ +Cell[608748, 14449, 2053, 55, 69, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], +Cell[610804, 14506, 22858, 423, 194, "Output",ExpressionUUID->"94df3071-edb1-44dc-b874-61786598e499"] +}, Open ]], +Cell[CellGroupData[{ +Cell[633699, 14934, 2143, 60, 112, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], +Cell[635845, 14996, 561, 12, 48, "Message",ExpressionUUID->"cadacce7-1e62-4e63-ac19-bb2ca07a9d15"], +Cell[636409, 15010, 564, 12, 48, "Message",ExpressionUUID->"8ebef459-812c-4212-8720-ea899feea3e7"], +Cell[636976, 15024, 569, 12, 48, "Message",ExpressionUUID->"ec8a7fff-491f-426d-aee2-9b0e88402b34"], +Cell[637548, 15038, 493, 11, 20, "Message",ExpressionUUID->"ee6f62c8-2f82-4607-856c-7b6cb1a0c1c4"], +Cell[638044, 15051, 35503, 630, 186, "Output",ExpressionUUID->"aa661f12-8532-4dc4-9862-8e7af4aa5bfa"] +}, Open ]], +Cell[CellGroupData[{ +Cell[673584, 15686, 232, 5, 23, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], +Cell[673819, 15693, 41873, 762, 186, "Output",ExpressionUUID->"870451bd-b02e-49a4-b65e-459d97dee867"] +}, Open ]], +Cell[CellGroupData[{ +Cell[715729, 16460, 1616, 48, 60, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], +Cell[717348, 16510, 194, 3, 26, "Output",ExpressionUUID->"8381cf78-168b-44e1-85de-450211e47f36"] +}, Open ]], +Cell[CellGroupData[{ +Cell[717579, 16518, 2272, 64, 128, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], +Cell[719854, 16584, 816, 17, 64, "Message",ExpressionUUID->"812cc474-56ef-4ae0-b16f-f90fda12cdac"], +Cell[720673, 16603, 814, 17, 64, "Message",ExpressionUUID->"31c2ba9f-584f-4ce1-bd46-7ae0af8ff882"], +Cell[721490, 16622, 814, 17, 64, "Message",ExpressionUUID->"4b993684-9760-4356-934c-0c86ed58bb38"], +Cell[722307, 16641, 497, 11, 20, "Message",ExpressionUUID->"e086060a-e7a1-4c1e-88e4-90b7c5593c77"], +Cell[722807, 16654, 194, 3, 26, "Output",ExpressionUUID->"77946ea3-3ab8-42e9-96ed-674cac37b295"] +}, Open ]], +Cell[CellGroupData[{ +Cell[723038, 16662, 2233, 63, 128, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], +Cell[725274, 16727, 816, 17, 64, "Message",ExpressionUUID->"5c43a3ed-0f46-44d8-ace9-9e451d69042b"], +Cell[726093, 16746, 814, 17, 64, "Message",ExpressionUUID->"89ab174e-139f-4014-8693-a4c189f876a7"], +Cell[726910, 16765, 814, 17, 64, "Message",ExpressionUUID->"c5754db9-3c9a-44ee-b677-84a791dd2e9d"], +Cell[727727, 16784, 497, 11, 20, "Message",ExpressionUUID->"dbcea773-a283-4453-9076-02c29d8533be"], +Cell[728227, 16797, 191, 3, 26, "Output",ExpressionUUID->"5842b564-3cdc-4e62-a6e5-138f4cfe40d8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[728455, 16805, 2235, 63, 128, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], +Cell[730693, 16870, 814, 17, 64, "Message",ExpressionUUID->"c4dccc7a-0bec-4b58-b8f0-8c0ca09c2c9e"], +Cell[731510, 16889, 814, 17, 64, "Message",ExpressionUUID->"acf3335e-c471-4b5b-b472-ad9316d84a6b"], +Cell[732327, 16908, 813, 17, 64, "Message",ExpressionUUID->"0de10dbb-ab97-479e-a4de-cc858477f8db"], +Cell[733143, 16927, 495, 11, 20, "Message",ExpressionUUID->"3dd5a3cc-bc35-4d87-a659-23052dff25e8"], +Cell[733641, 16940, 195, 3, 26, "Output",ExpressionUUID->"82a653c5-ac82-4b57-a01f-26d8a090f850"] +}, Open ]], +Cell[CellGroupData[{ +Cell[733873, 16948, 238, 6, 39, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], +Cell[734114, 16956, 195, 3, 38, "Output",ExpressionUUID->"90a4059f-7491-4c2d-80b2-65f268a1127b"] }, Open ]] } ] *) -(* End of internal cache information *) - diff --git a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw2.nb b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw2.nb index 1226680..f60d3ef 100644 --- a/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw2.nb +++ b/Pu240_798-811_TitovAA/152-88_h_Pu240_6-7/h_152-88_h_Pu240_6-7_pr_Qw2.nb @@ -3,42 +3,4837 @@ (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) -(* CreatedBy='Wolfram 14.1' *) +(* CreatedBy='Wolfram 15.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 407368, 9500] -NotebookOptionsPosition[ 383518, 9136] -NotebookOutlinePosition[ 383944, 9153] -CellTagsIndexPosition[ 383901, 9150] +NotebookDataLength[ 757060, 17327] +NotebookOptionsPosition[ 717663, 16690] +NotebookOutlinePosition[ 718099, 16708] +CellTagsIndexPosition[ 718056, 16705] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ -Cell[BoxData[ - RowBox[{"f1", "="}]], "Input", - CellChangeTimes->{ - 3.9918501413985214`*^9},ExpressionUUID->"5894836c-9594-0940-b94c-\ -299085c765cc"], -Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918501359768734`*^9, - 3.991850137465685*^9}},ExpressionUUID->"5965eb10-01f8-5545-9b6f-\ -8fab318cd4b7"], +Cell[CellGroupData[{ +Cell[BoxData[ + RowBox[{"d", "=", "2.88"}]], "Input", + CellChangeTimes->{ + 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, + 3.9920650045886707`*^9, {3.993801942128783*^9, 3.993801945433443*^9}, { + 3.9938026615010633`*^9, 3.993802739368286*^9}, {3.993802810187974*^9, + 3.9938028103007183`*^9}, {3.993803575340521*^9, 3.993803666300129*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"fe3f2277-1272-4196-8405-df31b2cbaabb"], + +Cell[BoxData["2.88`"], "Output", + CellChangeTimes->{ + 3.991320420900818*^9, 3.993800775970068*^9, 3.9938019548134403`*^9, { + 3.993802671037874*^9, 3.9938027475965223`*^9}, 3.9938028210918093`*^9, { + 3.993803586980714*^9, 3.993803670362015*^9}, 3.993828407350103*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"1a85a118-4fca-46d8-8501-82c72b1430f6"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f2", "="}]], "Input", + RowBox[{"A", "=", "236"}]], "Input", + CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"c7051a21-345d-441f-9bd1-0192959cec3f"], + +Cell[BoxData["236"], "Output", CellChangeTimes->{ - 3.9918501402114105`*^9},ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-\ -092c5143dcf0"], + 3.9913196497381973`*^9, 3.9938007760760193`*^9, 3.993801954850832*^9, { + 3.9938026710743093`*^9, 3.993802747641852*^9}, 3.993802821127861*^9, { + 3.993803587016178*^9, 3.9938036703981237`*^9}, 3.993828407429408*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"bf176a9e-e402-48be-ba15-e640453511a3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A1", "=", "152"}]], "Input", + CellChangeTimes->{ + 3.991798961431202*^9, {3.993800516328167*^9, 3.993800518467939*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"3841f7aa-eec9-451e-86f4-313baa01f6cb"], + +Cell[BoxData["152"], "Output", + CellChangeTimes->{ + 3.9913196497578354`*^9, 3.993800520116021*^9, 3.9938007760814123`*^9, + 3.99380195486788*^9, {3.993802671090054*^9, 3.993802747658696*^9}, + 3.9938028211437397`*^9, {3.9938035870314083`*^9, 3.993803670410161*^9}, + 3.993828407443159*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"07b4af58-f180-4ed3-b355-67abb246b108"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a1", "=", "0.55"}]], "Input", + CellChangeTimes->{3.9434144380252676`*^9}, + CellLabel->"In[4]:=",ExpressionUUID->"6a1392c5-0467-41e5-849e-e195bf753a46"], + +Cell[BoxData["0.55`"], "Output", + CellChangeTimes->{ + 3.991319649777508*^9, 3.9938007761127357`*^9, 3.993801954886694*^9, { + 3.993802671105547*^9, 3.993802747674674*^9}, 3.9938028211591873`*^9, { + 3.9938035870466833`*^9, 3.993803670422636*^9}, 3.993828407455119*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"1029d473-8a78-4cb8-abe2-ac6349db1471"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a2", "=", + RowBox[{"a1", "-", + RowBox[{"0.015", "*", + FractionBox[ + RowBox[{ + RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", + CellLabel->"In[5]:=",ExpressionUUID->"a9ea2461-d2dc-4486-ac73-06c5eb55b612"], + +Cell[BoxData["0.545677966101695`"], "Output", + CellChangeTimes->{ + 3.9913196497965145`*^9, 3.993800776129066*^9, 3.9938019549039087`*^9, { + 3.9938026711227913`*^9, 3.993802747690078*^9}, 3.993802821174389*^9, { + 3.9938035870619383`*^9, 3.993803670434517*^9}, 3.993828407467299*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"0fe5420c-c15b-46e5-a724-a3d84ce20efe"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"p0", "=", "0.17"}]], "Input", + CellLabel->"In[6]:=",ExpressionUUID->"43f84b6b-62fe-41eb-974d-ad3c37278bdb"], + +Cell[BoxData["0.17`"], "Output", + CellChangeTimes->{ + 3.9913196498144608`*^9, 3.9938007761450787`*^9, 3.993801954921114*^9, { + 3.993802671138826*^9, 3.993802747705122*^9}, 3.993802821189831*^9, { + 3.993803587077704*^9, 3.993803670446403*^9}, 3.993828407478821*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"da9430d7-4cf4-43b9-a561-0b490a29246f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R01", "=", + RowBox[{"1.16", "*", + SuperscriptBox["A1", + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, + CellLabel->"In[7]:=",ExpressionUUID->"6948bfd1-61b5-463f-9671-f2676aa3b53d"], + +Cell[BoxData["6.190691825034912`"], "Output", + CellChangeTimes->{ + 3.9913196498225155`*^9, 3.993800776161807*^9, 3.993801954937538*^9, { + 3.9938026711557207`*^9, 3.993802747719865*^9}, 3.993802821205323*^9, { + 3.993803587093586*^9, 3.9938036704581614`*^9}, 3.993828407490321*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"3b7e11bf-4d36-41b4-b160-ac59069188ee"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R02", "=", + RowBox[{"1.16", "*", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"A", "-", "A1"}], ")"}], + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellLabel->"In[8]:=",ExpressionUUID->"cbedb3cb-8aea-443d-9e23-50c589cb64bc"], + +Cell[BoxData["5.08024220226995`"], "Output", + CellChangeTimes->{ + 3.9913196498425236`*^9, 3.993800776178092*^9, 3.993801954954875*^9, { + 3.993802671171578*^9, 3.993802747723295*^9}, 3.993802821221133*^9, { + 3.993803587109274*^9, 3.993803670471842*^9}, 3.9938284075021973`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"4f9eb49e-8f43-4b6e-84e5-32aa5ab19405"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b1", "=", "0.97619"}]], "Input", + CellChangeTimes->{ + 3.991799283179735*^9, {3.9938005440294*^9, 3.993800567746181*^9}}, + CellLabel->"In[9]:=",ExpressionUUID->"706f1a60-0385-4b9b-8bc2-f92853732756"], + +Cell[BoxData["0.97619`"], "Output", + CellChangeTimes->{ + 3.993800776210225*^9, 3.993801954959785*^9, {3.993802671174962*^9, + 3.993802747749667*^9}, 3.9938028212246647`*^9, {3.9938035871245747`*^9, + 3.993803670475428*^9}, 3.9938284075142937`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"b60659fd-bbb5-4940-a5a3-f097b9404db0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b2", "=", "0.59439"}]], "Input", + CellChangeTimes->{ + 3.991799280663351*^9, {3.9938005524325247`*^9, 3.993800560808515*^9}}, + CellLabel->"In[10]:=",ExpressionUUID->"43d50480-eee6-4f73-a871-c8f8b32193a3"], + +Cell[BoxData["0.59439`"], "Output", + CellChangeTimes->{ + 3.993800776226185*^9, 3.993801954993833*^9, {3.9938026712049103`*^9, + 3.993802747764641*^9}, 3.993802821251552*^9, {3.993803587139648*^9, + 3.993803670490211*^9}, 3.9938284075259933`*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"555babeb-af49-44c1-8a7c-cd38fea2db03"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x1", "=", "0"}]], "Input", + CellLabel->"In[11]:=",ExpressionUUID->"c84f5eca-a69a-4902-8a52-d9c93d93b660"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498927155`*^9, 3.993800776256876*^9, 3.9938019550107737`*^9, { + 3.99380267122059*^9, 3.993802747779757*^9}, 3.993802821267166*^9, { + 3.993803587154791*^9, 3.993803670501927*^9}, 3.993828407537416*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"6f55594f-fb40-498a-bced-7f43007466e1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x2", "=", "0"}]], "Input", + CellLabel->"In[12]:=",ExpressionUUID->"ce6fddb3-150a-41bf-8808-38104d7f681e"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498996067`*^9, 3.993800776272674*^9, 3.993801955027381*^9, { + 3.993802671236315*^9, 3.993802747794403*^9}, 3.993802821282477*^9, { + 3.993803587158352*^9, 3.993803670513171*^9}, 3.993828407548876*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"b9084075-f96e-476f-a1ee-f79f59aa7029"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w1", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[13]:=",ExpressionUUID->"4b72cf2e-6b4e-46cb-9647-63e93ecdd943"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913197863028755`*^9, 3.993800776289051*^9, 3.993801955044087*^9, { + 3.993802671251883*^9, 3.993802747809085*^9}, 3.9938028212979517`*^9, { + 3.9938035871856203`*^9, 3.9938036705241947`*^9}, 3.993828407561018*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"b8dfbad8-be84-4d90-a2a7-24242b815684"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w2", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[14]:=",ExpressionUUID->"43a43bb0-0963-4c43-a56e-dc76e8485867"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913197864610195`*^9, 3.993800776304994*^9, 3.993801955061472*^9, { + 3.993802671267837*^9, 3.9938027478234367`*^9}, 3.9938028213134613`*^9, { + 3.9938035872015963`*^9, 3.9938036705351753`*^9}, 3.9938284075730877`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"80eca207-22de-4cb7-82df-81b3dd13695a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c11", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"4c689c79-41c8-447b-9a6c-4e58c6148ed0"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.993800776320915*^9, 3.993801955077899*^9, { + 3.993802671285616*^9, 3.9938027478392677`*^9}, 3.993802821328992*^9, { + 3.993803587217046*^9, 3.993803670546205*^9}, 3.9938284075854483`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"859388df-54a6-49d0-9892-7d74c8d23f12"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"a7cc9c4e-50ad-42e5-9ca4-1804de347598"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.991319786540777*^9, 3.9938007763370247`*^9, 3.993801955093937*^9, { + 3.993802671301764*^9, 3.993802747854802*^9}, 3.993802821344532*^9, { + 3.993803587232232*^9, 3.993803670558001*^9}, 3.993828407597742*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"f930b250-7e82-4225-8e35-6c8dd88fb5e1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c21", "=", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"0510d64d-4469-49cd-85bb-841516c5f48e"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.9913197865777817`*^9, 3.9938007763528843`*^9, 3.9938019551103783`*^9, { + 3.9938026713191147`*^9, 3.993802747870304*^9}, 3.993802821359898*^9, { + 3.993803587247026*^9, 3.9938036705701017`*^9}, 3.993828407609795*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"835907cf-8fd1-4fa8-a549-fb584a9e2f8c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c22", "=", + RowBox[{"1", "-", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"dbfb9276-36dd-4280-8f2b-4ab001add74a"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.9913197866129*^9, 3.9938007763688097`*^9, 3.993801955127124*^9, { + 3.993802671337201*^9, 3.99380274788591*^9}, 3.993802821375526*^9, { + 3.993803587262051*^9, 3.993803670582543*^9}, 3.993828407622057*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"50ef223b-bef8-4629-9271-f450d491f68d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"770160cf-fcaf-4f83-8f80-882c1e845ddd"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786620775*^9, 3.993800776384469*^9, 3.99380195514393*^9, { + 3.993802671355851*^9, 3.9938027479017677`*^9}, 3.9938028213910847`*^9, { + 3.993803587265461*^9, 3.9938036705956707`*^9}, 3.9938284076339817`*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"044ff085-fefd-4d1c-a8a7-0866110b3b29"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fin", "=", "0.09"}]], "Input", + CellLabel->"In[20]:=",ExpressionUUID->"d926bcc2-f3f2-4c8d-ab63-6b161bb968c4"], + +Cell[BoxData["0.09`"], "Output", + CellChangeTimes->{ + 3.991319786657793*^9, 3.993800776400263*^9, 3.993801955160005*^9, { + 3.993802671372757*^9, 3.993802747917276*^9}, 3.9938028214069347`*^9, { + 3.993803587291121*^9, 3.993803670608396*^9}, 3.9938284076459208`*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"5e9059a7-cf52-4341-85ca-5a5a00554d88"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffin", "=", "0.42"}]], "Input", + CellLabel->"In[21]:=",ExpressionUUID->"20f02384-fea8-4fe3-b0ac-bdf94709760b"], + +Cell[BoxData["0.42`"], "Output", + CellChangeTimes->{ + 3.9913197866657925`*^9, 3.993800776415701*^9, 3.993801955176228*^9, { + 3.9938026713885727`*^9, 3.9938027479333763`*^9}, 3.9938028214226522`*^9, { + 3.993803587306354*^9, 3.993803670621553*^9}, 3.993828407657846*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"56ee318b-e9e2-4408-bb5a-99f63130c424"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fex", "=", + RowBox[{"-", "2.59"}]}]], "Input", + CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"f58f6553-910b-4750-9299-6937693aee22"], + +Cell[BoxData[ + RowBox[{"-", "2.59`"}]], "Output", + CellChangeTimes->{ + 3.9913197866996*^9, 3.993800776431301*^9, 3.993801955193372*^9, { + 3.993802671403956*^9, 3.9938027479492397`*^9}, 3.9938028214382277`*^9, { + 3.993803587321618*^9, 3.993803670634707*^9}, 3.993828407669935*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"c08f9265-914a-47b8-bda7-741b85a6f3f7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffex", "=", "0.54"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"4c60fe38-a578-4498-b0ab-20d340e7a82a"], + +Cell[BoxData["0.54`"], "Output", + CellChangeTimes->{ + 3.9913197867406044`*^9, 3.9938007764469233`*^9, 3.9938019552102613`*^9, { + 3.9938026714206*^9, 3.993802747964871*^9}, 3.993802821453787*^9, { + 3.993803587336917*^9, 3.9938036706484222`*^9}, 3.993828407681863*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"5ee0e59c-c5f3-4976-96fd-d3b269fd900f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z1", "=", " ", "66"}]], "Input", + CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { + 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { + 3.993800689005188*^9, 3.993800698859473*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"71e312f3-b390-49c7-b390-54c8629cf2b5"], + +Cell[BoxData["66"], "Output", + CellChangeTimes->{ + 3.9913197867861958`*^9, 3.993800776462777*^9, 3.993801955228032*^9, { + 3.9938026714376583`*^9, 3.99380274798144*^9}, 3.993802821469448*^9, { + 3.993803587352215*^9, 3.9938036706619053`*^9}, 3.993828407693584*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"ce6bbd63-7f57-4426-948d-fb254f21efc6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z2", "=", + RowBox[{"94", "-", "Z1"}]}]], "Input", + CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, + 3.9916443064841423`*^9, {3.993800702787973*^9, 3.993800703931004*^9}}, + CellLabel->"In[25]:=",ExpressionUUID->"52d6569b-97df-4fec-a599-f2861bdcade7"], + +Cell[BoxData["28"], "Output", + CellChangeTimes->{ + 3.9913197867928696`*^9, 3.993800776478297*^9, 3.993801955245349*^9, { + 3.993802671454508*^9, 3.993802747997691*^9}, 3.993802821484852*^9, { + 3.993803587367502*^9, 3.9938036706754093`*^9}, 3.993828407705531*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"17b730de-3285-4587-b012-bfc3c3d85427"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A2", "=", + RowBox[{"A", "-", "A1"}]}]], "Input", + CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"13fde7f1-fd2a-49c6-bf5b-6c06d1182783"], + +Cell[BoxData["84"], "Output", + CellChangeTimes->{ + 3.991319786827894*^9, 3.993800776493824*^9, 3.993801955261796*^9, { + 3.993802671472805*^9, 3.993802748017583*^9}, 3.99380282150027*^9, { + 3.993803587382532*^9, 3.993803670687777*^9}, 3.993828407717763*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"9cde789c-c9ea-4d08-a652-89aeabd87cd1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Din", "=", + RowBox[{"fin", "+", + RowBox[{"ffin", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"b7f2a7f4-dd06-4f76-82ec-528173bf32f8"], + +Cell[BoxData["0.10842105263157895`"], "Output", + CellChangeTimes->{ + 3.9913197868648605`*^9, 3.9938007765094976`*^9, 3.9938019552787237`*^9, { + 3.993802671491748*^9, 3.9938027480331593`*^9}, 3.9938028215155582`*^9, { + 3.993803587397368*^9, 3.9938036706998672`*^9}, 3.993828407729884*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"791aeda3-eeff-46c3-a6f0-2d35b1b0f17a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Dex", "=", + RowBox[{"fex", "+", + RowBox[{"ffex", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"3826620b-7675-4ffe-a7e1-c61ff7679276"], + +Cell[BoxData[ + RowBox[{"-", "2.566315789473684`"}]], "Output", + CellChangeTimes->{ + 3.9913197868718567`*^9, 3.9938007765252047`*^9, 3.9938019552955627`*^9, { + 3.9938026715153112`*^9, 3.993802748050967*^9}, 3.9938028215315247`*^9, { + 3.993803587413514*^9, 3.9938036707132397`*^9}, 3.993828407741733*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"325adb0b-109d-4778-bf38-7463f6f48657"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R00", "=", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x1", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x2", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", "d"}]}]], "Input", + CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { + 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, + 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"74804ca6-8841-4499-8926-7ca99d8e59de"], + +Cell[BoxData["19.255392789884887`"], "Output", + CellChangeTimes->{ + 3.9913197869068584`*^9, 3.993800776541044*^9, 3.993801955312595*^9, { + 3.99380267153469*^9, 3.993802748068204*^9}, 3.993802821546997*^9, { + 3.9938035874293547`*^9, 3.993803670724801*^9}, 3.993828407754293*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"336c2371-a464-43cd-ad12-d3e2d9fd9bdd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"4beca30c-a272-418f-8bda-a360e9946021"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786940857*^9, 3.993800776556777*^9, 3.993801955328986*^9, { + 3.993802671551854*^9, 3.993802748085292*^9}, 3.9938028215632277`*^9, { + 3.993803587445024*^9, 3.993803670737692*^9}, 3.993828407766762*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"d7276474-fde6-4c22-b424-b09b2921adfd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v1", "=", "1.63"}]], "Input", + CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, + 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { + 3.99380058189814*^9, 3.993800584279264*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"0eb2b933-0b2a-4112-9fc7-ac3e946075c5"], + +Cell[BoxData["1.63`"], "Output", + CellChangeTimes->{ + 3.993800776587946*^9, 3.993801955345385*^9, {3.993802671570458*^9, + 3.993802748111987*^9}, 3.9938028215786963`*^9, {3.9938035874604197`*^9, + 3.993803670750949*^9}, 3.9938284077791452`*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"2ae952ec-2c15-4bdf-bd08-81a0e60bc07e"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918501388085117`*^9, - 3.991850138811516*^9}},ExpressionUUID->"6e7c45d7-0298-ce41-ba97-\ -a3c857e6ae57"], + CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"efd99408-9261-490a-b04a-1e50202c946a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n1", "=", "0.856"}]], "Input", + CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, + 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { + 3.993800591017771*^9, 3.993800594019471*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"093d7718-dfdd-4e43-9b09-be60eb4eb0b7"], + +Cell[BoxData["0.856`"], "Output", + CellChangeTimes->{ + 3.9938007766183*^9, 3.993801955394834*^9, {3.99380267161954*^9, + 3.993802748161004*^9}, 3.993802821625576*^9, {3.993803587507737*^9, + 3.993803670776819*^9}, 3.99382840780221*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"8f66b9e8-b8ea-44c4-858a-869fa3115d31"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"4e0b06ec-a188-4f85-86c3-922e5d92e17e"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv1", "=", "2.615"}]], "Input", + CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { + 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { + 3.9938005968681726`*^9, 3.9938005993167686`*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"ec66ca03-a2c8-4043-a9c7-34952b23ffd6"], + +Cell[BoxData["2.615`"], "Output", + CellChangeTimes->{ + 3.993800776636183*^9, 3.9938019554430428`*^9, {3.993802671677952*^9, + 3.993802748207687*^9}, 3.993802821672069*^9, {3.993803587556972*^9, + 3.993803670795989*^9}, 3.9938284078246737`*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"29bcbc7f-01ba-4449-a406-5d62ff2388ae"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"1d9b6449-7b08-4e77-a8c5-478311aee425"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn1", "=", "1.23"}]], "Input", + CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { + 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, + 3.991799359954439*^9, {3.993800602507454*^9, 3.993800603056312*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"0f2021b7-03da-4976-9aeb-8c46f01e405a"], + +Cell[BoxData["1.23`"], "Output", + CellChangeTimes->{ + 3.9938007766784554`*^9, 3.993801955495077*^9, {3.993802671729157*^9, + 3.993802748254798*^9}, 3.993802821718618*^9, {3.9938035876039553`*^9, + 3.9938036708157063`*^9}, 3.993828407847455*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"6cd68675-affa-48db-a096-ee12717a9f72"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"dd79ec79-ccd6-4356-ab60-a848f68579e4"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v2", "=", "2.22"}]], "Input", + CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, + 3.991718016467348*^9, 3.991799361414671*^9, {3.993800605567752*^9, + 3.993800606070137*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"d69b26e3-7674-4a5c-9ec6-dc98784ee653"], + +Cell[BoxData["2.22`"], "Output", + CellChangeTimes->{ + 3.993800776708939*^9, 3.993801955543845*^9, {3.993802671778071*^9, + 3.993802748303585*^9}, 3.993802821766041*^9, {3.993803587650766*^9, + 3.9938036708413343`*^9}, 3.9938284078703127`*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"949211d6-a029-43a7-9e1a-6d0119d07cbd"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"795f7197-80dd-4905-9d23-14ab6af940fb"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n2", "=", "0.559"}]], "Input", + CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, + 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.993800609659601*^9, + 3.993800614079907*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"b65ed57b-652e-4909-bc25-946fd82943e0"], + +Cell[BoxData["0.559`"], "Output", + CellChangeTimes->{ + 3.9938007767393847`*^9, 3.993801955593616*^9, {3.993802671829995*^9, + 3.993802748351069*^9}, 3.993802821813445*^9, {3.9938035876972513`*^9, + 3.993803670875149*^9}, 3.9938284078931437`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"dd85e150-1a3d-4258-acf7-cf529ca5ea9e"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"4e6f1173-cc4f-41d3-bdc3-04fa1c3c37db"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv2", "=", "2.428"}]], "Input", + CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, + 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.993800618121642*^9, + 3.993800621996191*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"f71b7e9a-a2ad-4baf-b821-53d00fb0a0d6"], + +Cell[BoxData["2.428`"], "Output", + CellChangeTimes->{ + 3.9938007767695208`*^9, 3.993801955646489*^9, {3.993802671878972*^9, + 3.99380274840051*^9}, 3.993802821860149*^9, {3.9938035877441607`*^9, + 3.993803670903119*^9}, 3.993828407917294*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"1c71f79e-54dc-43c7-a168-e591e6cb95a2"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"d5752b4e-d8db-47a1-b38a-6bc1a98e7732"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn2", "=", "0.738"}]], "Input", + CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, + 3.9917993660901737`*^9, {3.993800626883781*^9, 3.993800632244173*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"dbae0811-81e4-4224-b123-aa10797d8bbb"], + +Cell[BoxData["0.738`"], "Output", + CellChangeTimes->{ + 3.993800776800035*^9, 3.993801955694454*^9, {3.993802671926148*^9, + 3.99380274844981*^9}, 3.99380282190762*^9, {3.9938035877925863`*^9, + 3.9938036709348783`*^9}, 3.993828407942498*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"47207b76-05a8-47b5-bb1a-b44640cfd632"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"57aa8928-9b98-4ea6-9d8b-e4d135e606f5"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U31", "=", + RowBox[{"C0", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", "R1"}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "a1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "nn2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"Dex", "*", "v2", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/aR7S2Zj4lvHP7Jp2SD6t2ddPojOapZrBdETK9in +g+jbL87PBNEGxc+WgOhrG/jXgWi9vpDNIFrqcOcWEL1ki/glEK3Wwn0ZRDdb +HLoOonX+9D8E0abp/OxNQDq+aD4niN52MlAbRD/heKsDovPud4WB6HnRPNEg +uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt +Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr +ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== + "], + CellLabel->"In[47]:=",ExpressionUUID->"34c12653-04a9-4373-a483-034f6d22819c"], + +Cell[BoxData["0.04132444525810279`"], "Output", + CellChangeTimes->{ + 3.991319787430073*^9, 3.993800776881694*^9, 3.993801955753645*^9, { + 3.993802671993063*^9, 3.993802748523107*^9}, 3.993802821968258*^9, { + 3.993803587855629*^9, 3.993803670999495*^9}, 3.99382840803312*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"0a4b8e77-4d8b-4c34-a0ef-7ff89257008a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U33", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", + FractionBox[ + RowBox[{"R01", "*", "R01"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"2", "*", "vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "a2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"Dex", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], + "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"ce5b02ef-04f4-4b78-8a10-5278e6d0a747"], + +Cell[BoxData["1.8561337112494445`"], "Output", + CellChangeTimes->{ + 3.991319787574972*^9, 3.9938007769078693`*^9, 3.993801955775502*^9, { + 3.993802672016849*^9, 3.993802748547914*^9}, 3.99380282199231*^9, { + 3.9938035878800983`*^9, 3.993803671028694*^9}, 3.993828408070086*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"6e2603a8-1331-4862-adde-3e54e83627f6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U32", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02"}], "1"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"8b33ecea-5b18-4e5b-b0f4-af9397d090d9"], + +Cell[BoxData[ + RowBox[{"-", "12.258798326305717`"}]], "Output", + CellChangeTimes->{ + 3.991319787641424*^9, 3.9938007769327593`*^9, 3.993801955798092*^9, { + 3.9938026720456457`*^9, 3.99380274857216*^9}, 3.993802822015239*^9, { + 3.993803587903886*^9, 3.9938036710539*^9}, 3.9938284081001997`*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"d758a2ef-27e3-416a-9860-33f01cc1f164"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U41", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[50]:=",ExpressionUUID->"47f7fede-68d9-4d90-b133-5de57c98071e"], + +Cell[BoxData[ + RowBox[{"-", "22.790441070773312`"}]], "Output", + CellChangeTimes->{ + 3.991319787711939*^9, 3.9938007769622097`*^9, 3.9938019558251333`*^9, { + 3.993802672094524*^9, 3.993802748600835*^9}, 3.993802822044148*^9, { + 3.993803587933173*^9, 3.993803671083523*^9}, 3.99382840813525*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"59c81938-27f2-4f44-9e67-ea192ef862bc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U42", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[51]:=",ExpressionUUID->"c5560b7d-0c3d-4ca4-8064-6b28990e0195"], + +Cell[BoxData[ + RowBox[{"-", "43.29548999246014`"}]], "Output", + CellChangeTimes->{ + 3.9913197877723045`*^9, 3.9938007769919767`*^9, 3.993801955868244*^9, { + 3.993802672122458*^9, 3.993802748645914*^9}, 3.993802822070863*^9, { + 3.9938035879612713`*^9, 3.993803671112574*^9}, 3.993828408169032*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"29ed192b-af8c-4d63-a3e4-52668e07f588"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U51", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[52]:=",ExpressionUUID->"4954379f-e1d4-4dbd-9ba2-1e2b723f2158"], + +Cell[BoxData[ + RowBox[{"-", "161.3907844260869`"}]], "Output", + CellChangeTimes->{ + 3.991319787833355*^9, 3.993800777069632*^9, 3.9938019558996973`*^9, { + 3.9938026721544657`*^9, 3.9938027486794643`*^9}, 3.993802822104743*^9, { + 3.993803587995325*^9, 3.993803671146261*^9}, 3.9938284082101927`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"99004acd-676e-4c53-8331-1a0a66623760"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U21", "=", "0"}]], "Input", + CellLabel->"In[53]:=",ExpressionUUID->"64466210-a0a4-4eea-9dbc-75c83fc19ffe"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210013676`*^9, 3.9938007770877237`*^9, 3.993801955916643*^9, { + 3.9938026721721487`*^9, 3.9938027486956*^9}, 3.993802822138073*^9, { + 3.993803588028162*^9, 3.993803671159233*^9}, 3.993828408222101*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"4e06d330-5aaf-4b26-a585-254ff5df0911"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U22", "=", "0"}]], "Input", + CellLabel->"In[54]:=",ExpressionUUID->"6f752b4e-7785-42d6-93da-b266ae1442b5"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210355663`*^9, 3.9938007771059847`*^9, 3.99380195593331*^9, { + 3.993802672187916*^9, 3.9938027487122726`*^9}, 3.993802822156447*^9, { + 3.993803588044907*^9, 3.9938036711709633`*^9}, 3.993828408235519*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"57a120de-b9f5-4c21-bc1d-0609172078f1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[55]:=",ExpressionUUID->"c4b08bbd-e49f-49c5-a3a7-f9c14aa27194"], + +Cell[BoxData["68.50484772769052`"], "Output", + CellChangeTimes->{ + 3.991320421068556*^9, 3.993800777122861*^9, 3.99380195595057*^9, { + 3.9938026722039537`*^9, 3.9938027487289467`*^9}, 3.993802822174095*^9, { + 3.993803588061635*^9, 3.993803671182822*^9}, 3.993828408246924*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"176f5256-5e3f-48fe-b118-b0dc47c52377"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"950b89c9-8a1a-4d7c-a537-34464acaf831"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.991320421098543*^9, 3.993800777139863*^9, 3.993801955967062*^9, { + 3.993802672219776*^9, 3.9938027487454987`*^9}, 3.993802822191181*^9, { + 3.9938035880780478`*^9, 3.99380367119495*^9}, 3.993828408257872*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"7c21a65c-33c3-4d23-bff4-7f4fd7eb4e1a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[57]:=",ExpressionUUID->"86f0489f-ee40-4bbb-8cd7-2af1e4ae48a9"], + +Cell[BoxData["78.36655133019532`"], "Output", + CellChangeTimes->{ + 3.9913204211275444`*^9, 3.993800777156836*^9, 3.993801955985046*^9, { + 3.993802672236104*^9, 3.9938027487612762`*^9}, 3.993802822207035*^9, { + 3.993803588095743*^9, 3.993803671207213*^9}, 3.993828408268873*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"41ce3679-5ab2-4572-aec5-2aadc1e032ec"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c11"], "Input", + CellLabel->"In[58]:=",ExpressionUUID->"976f566a-90c3-4463-a909-a6668898f071"], + +Cell[BoxData["0.3507608730000904`"], "Output", + CellChangeTimes->{ + 3.9913204211385536`*^9, 3.993800777173678*^9, 3.9938019560022707`*^9, { + 3.9938026722521267`*^9, 3.993802748776864*^9}, 3.9938028222235823`*^9, { + 3.993803588111733*^9, 3.993803671219968*^9}, 3.9938284082795477`*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"b773ff07-81f9-483f-8184-2a4906cd8eed"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c12"], "Input", + CellLabel->"In[59]:=",ExpressionUUID->"10fa2904-cb5e-4349-bcf4-d963b717d8d2"], + +Cell[BoxData[ + RowBox[{"-", "0.1076302078509941`"}]], "Output", + CellChangeTimes->{ + 3.9913204211683464`*^9, 3.993800777190844*^9, 3.9938019560194187`*^9, { + 3.993802672268169*^9, 3.9938027487928667`*^9}, 3.993802822239389*^9, { + 3.993803588127493*^9, 3.993803671233239*^9}, 3.9938284082904263`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"c95fd763-050a-463b-b346-4d9bdd01e83a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c21"], "Input", + CellLabel->"In[60]:=",ExpressionUUID->"41cc612b-3b38-4216-aa0c-ac4f04077370"], + +Cell[BoxData[ + RowBox[{"-", "0.40368202266316894`"}]], "Output", + CellChangeTimes->{ + 3.991320421199068*^9, 3.9938007772073803`*^9, 3.993801956036744*^9, { + 3.993802672284265*^9, 3.993802748808551*^9}, 3.9938028222550507`*^9, { + 3.993803588143165*^9, 3.993803671247344*^9}, 3.993828408301032*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"6ba97b21-b3b4-46a1-9cd2-862b90ad6ac9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c22"], "Input", + CellLabel->"In[61]:=",ExpressionUUID->"849325f0-5f99-4e5b-b076-2d8fdc625072"], + +Cell[BoxData["0.5671765418692641`"], "Output", + CellChangeTimes->{ + 3.991320421228037*^9, 3.99380077722381*^9, 3.99380195605359*^9, { + 3.99380267230028*^9, 3.993802748824264*^9}, 3.993802822270421*^9, { + 3.9938035881589603`*^9, 3.993803671262602*^9}, 3.9938284083043833`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"2998869b-9f8c-4beb-8877-6b48861430d1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w1"], "Input", + CellLabel->"In[62]:=",ExpressionUUID->"1d6f43fc-49c7-4c23-bf8e-78c637e4092f"], + +Cell[BoxData["2.4987328480773474`"], "Output", + CellChangeTimes->{ + 3.9913204212585373`*^9, 3.99380077723999*^9, 3.9938019560701323`*^9, { + 3.99380267231618*^9, 3.993802748839958*^9}, 3.993802822285783*^9, { + 3.9938035881747913`*^9, 3.993803671266725*^9}, 3.993828408320715*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"10a53652-25d2-4b2c-a68d-df8d5ebe4e28"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w2"], "Input", + CellLabel->"In[63]:=",ExpressionUUID->"2918d468-02b3-4294-bb1c-589070d69307"], + +Cell[BoxData["1.7169589911284653`"], "Output", + CellChangeTimes->{ + 3.9913204212884274`*^9, 3.99380077725603*^9, 3.993801956086666*^9, { + 3.9938026723320913`*^9, 3.993802748856078*^9}, 3.993802822300988*^9, { + 3.9938035881912737`*^9, 3.9938036712790813`*^9}, 3.993828408330764*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"55aec178-5b4b-49e5-8c2f-39f0ac9adbe5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", + CellLabel->"In[64]:=",ExpressionUUID->"605c363d-6848-452b-9a6f-972bb5085535"], + +Cell[BoxData[ + RowBox[{"-", "26.975748857822108`"}]], "Output", + CellChangeTimes->{ + 3.9913204213185234`*^9, 3.993800777272346*^9, 3.993801956103663*^9, { + 3.993802672348072*^9, 3.9938027488719177`*^9}, 3.9938028223163843`*^9, { + 3.993803588207057*^9, 3.993803671292569*^9}, 3.993828408340947*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"06302506-b381-48bc-b513-ff66d42bcb1c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", + CellLabel->"In[65]:=",ExpressionUUID->"bb4a66b6-1cd2-4e74-8c5e-e63147f2d3a1"], + +Cell[BoxData[ + RowBox[{"-", "9.274238671929899`"}]], "Output", + CellChangeTimes->{ + 3.991320421349531*^9, 3.993800777288783*^9, 3.993801956120541*^9, { + 3.993802672364458*^9, 3.993802748887658*^9}, 3.99380282233222*^9, { + 3.993803588227901*^9, 3.9938036713059*^9}, 3.993828408351654*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"6bc262d7-80a0-4a45-85e7-2fa0503a14e5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB11", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U22"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[66]:=",ExpressionUUID->"0c63395b-9711-4549-8741-46bc19f82077"], + +Cell[BoxData["41.529098869868406`"], "Output", + CellChangeTimes->{ + 3.9913204213784294`*^9, 3.993800777305213*^9, 3.993801956138081*^9, { + 3.99380267238068*^9, 3.993802748904031*^9}, 3.9938028223479433`*^9, { + 3.99380358824424*^9, 3.993803671318845*^9}, 3.993828408362146*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"26cec038-9c05-43ce-b2f0-6c756a58254e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB12", "=", + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[67]:=",ExpressionUUID->"f3ef4162-d581-42ee-9dea-a910793bbda0"], + +Cell[BoxData[ + RowBox[{"-", "63.03136165702115`"}]], "Output", + CellChangeTimes->{ + 3.9913204213904285`*^9, 3.993800777321735*^9, 3.993801956154997*^9, { + 3.9938026723977118`*^9, 3.9938027489203997`*^9}, 3.993802822363785*^9, { + 3.993803588260324*^9, 3.993803671330945*^9}, 3.9938284084051867`*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"0676a0c4-d421-49e0-92aa-939c99ee7ad4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB22", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U21"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + "\[IndentingNewLine]", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[68]:=",ExpressionUUID->"3310b6ca-f5b8-4895-b96d-2c1fc8107bd0"], + +Cell[BoxData["69.09231265826543`"], "Output", + CellChangeTimes->{ + 3.991320421419428*^9, 3.9938007773384323`*^9, 3.993801956172174*^9, { + 3.9938026724138613`*^9, 3.993802748938077*^9}, 3.993802822380664*^9, { + 3.9938035882645397`*^9, 3.9938036713443604`*^9}, 3.9938284084187393`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"05af189c-70a7-4c5d-a10b-e4b12ec5b9a4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kb", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "+", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"bd080782-1d93-41c6-b71e-e1fdf67ad5ed"], + +Cell[BoxData["0.014405310234423041`"], "Output", + CellChangeTimes->{ + 3.9913204214494324`*^9, 3.9938007773549747`*^9, 3.993801956189353*^9, { + 3.993802672430953*^9, 3.9938027489557877`*^9}, 3.9938028223998747`*^9, { + 3.99380358829243*^9, 3.993803671364808*^9}, 3.993828408429172*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"3081bcf2-3553-4e93-b277-508386699f51"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kw", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "-", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[70]:=",ExpressionUUID->"f933a84a-1908-447b-a1e7-3ac2fe925011"], + +Cell[BoxData["351.3032034374311`"], "Output", + CellChangeTimes->{ + 3.991320421481529*^9, 3.993800777371662*^9, 3.99380195620572*^9, { + 3.9938026724471073`*^9, 3.9938027489713907`*^9}, 3.9938028224237127`*^9, { + 3.9938035883102903`*^9, 3.993803671376803*^9}, 3.993828408439247*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"4faf17e6-f9ff-4cf9-8923-7de8e5e37103"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f1", "=", "0.4775655834"}]], "Input", + CellChangeTimes->{3.9918501413985214`*^9, 3.993827870400235*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], + +Cell[BoxData["0.4775655834`"], "Output", + CellChangeTimes->{3.993828408448827*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"e5210e59-bde1-4cf3-845e-91b17606d0c4"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918501359768734`*^9, 3.991850137465685*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f2", "=", "0.3681521012"}]], "Input", + CellChangeTimes->{3.9918501402114105`*^9, 3.993827901979868*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], + +Cell[BoxData["0.3681521012`"], "Output", + CellChangeTimes->{3.993828408466209*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"a5f515fe-62f8-43be-a09d-319a181aebc4"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918501388085117`*^9, 3.991850138811516*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ @@ -84,13 +4879,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[399]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], + CellLabel->"In[75]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913437871842365`*^9}, - CellLabel-> - "Out[399]=",ExpressionUUID->"d7904bcf-fc55-b844-b4d2-059d830f1317"] +Cell[BoxData["1.912822713352366`*^-53"], "Output", + CellChangeTimes->{3.9913437871842365`*^9, 3.993828408484867*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"5df0384e-868a-4b97-a2d4-177305c7bd56"] }, Open ]], Cell[CellGroupData[{ @@ -124,14 +4917,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557655438551*^9},ExpressionUUID->"f2e6289f-a8bc-6d44-a856-\ -301cf9f22a61"], + CellChangeTimes->{3.991557655438551*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.9913437872132397`*^9}, - CellLabel-> - "Out[400]=",ExpressionUUID->"7c075ec9-a97b-ab47-b241-cc392b585c5e"] +Cell[BoxData["1.059475088057066`*^-54"], "Output", + CellChangeTimes->{3.9913437872132397`*^9, 3.993828408494762*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"62a989b2-96cc-4a81-a8a2-207f44bb944e"] }, Open ]], Cell[CellGroupData[{ @@ -164,14 +4955,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915576595317745`*^9, - 3.9915576617156334`*^9}},ExpressionUUID->"cdf84d2f-1e96-4c43-9286-\ -fda42549e334"], + CellChangeTimes->{{3.9915576595317745`*^9, 3.9915576617156334`*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.9913437872412376`*^9}, - CellLabel-> - "Out[401]=",ExpressionUUID->"ddda4800-8c90-d44b-acfd-6ccb39eee852"] +Cell[BoxData["1.8117158583873223`*^-54"], "Output", + CellChangeTimes->{3.9913437872412376`*^9, 3.9938284085042973`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"261c25d3-124f-444b-adda-b3db1a0ab13f"] }, Open ]], Cell[CellGroupData[{ @@ -194,13 +4983,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[402]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], + CellLabel->"In[78]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913437872672386`*^9}, - CellLabel-> - "Out[402]=",ExpressionUUID->"046d7438-d73f-9343-9ae7-b01adfd6d8f5"] +Cell[BoxData["24.017660158242123`"], "Output", + CellChangeTimes->{3.9913437872672386`*^9, 3.99382840851398*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"b38d23f9-671a-4467-bc27-b507dbc49935"] }, Open ]], Cell[CellGroupData[{ @@ -226,13 +5013,11 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", - CellLabel-> - "In[403]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], + CellLabel->"In[79]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[BoxData["47.62007062351`"], "Output", - CellChangeTimes->{3.991343787279253*^9}, - CellLabel-> - "Out[403]=",ExpressionUUID->"d2928e96-58be-3a4f-8bee-5b9e193c2ac6"] +Cell[BoxData["47.92255158375172`"], "Output", + CellChangeTimes->{3.991343787279253*^9, 3.993828408637121*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"0c77d573-5365-4319-b513-a03fd4e99ca5"] }, Open ]], Cell[CellGroupData[{ @@ -241,13 +5026,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[404]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], + CellLabel->"In[80]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913437873062572`*^9}, - CellLabel-> - "Out[404]=",ExpressionUUID->"bf655ed3-7200-2249-b687-593ee351a598"] +Cell[BoxData["0.02449040460582216`"], "Output", + CellChangeTimes->{3.9913437873062572`*^9, 3.993828408647697*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"39b67b71-8af4-4461-a747-9df3d5b20804"] }, Open ]], Cell[CellGroupData[{ @@ -256,13 +5039,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[405]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], + CellLabel->"In[81]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[BoxData["2.8712430196956706`"], "Output", - CellChangeTimes->{3.9913437873353844`*^9}, - CellLabel-> - "Out[405]=",ExpressionUUID->"56f5f06b-52e2-6941-b28e-41b961cb42e9"] +Cell[BoxData["2.7075163521630516`"], "Output", + CellChangeTimes->{3.9913437873353844`*^9, 3.993828408657826*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"9bb25952-4d72-4aa7-a811-65a4d22e97cd"] }, Open ]], Cell[CellGroupData[{ @@ -271,13 +5052,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[406]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], + CellLabel->"In[82]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[BoxData["136.72879537516795`"], "Output", - CellChangeTimes->{3.991343787361582*^9}, - CellLabel-> - "Out[406]=",ExpressionUUID->"8c210f75-69a5-5340-94a4-65e97302ca45"] +Cell[BoxData["129.75109205038513`"], "Output", + CellChangeTimes->{3.991343787361582*^9, 3.993828408667427*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"c93e58dd-e37b-4675-be69-e95fe00657ac"] }, Open ]], Cell[CellGroupData[{ @@ -286,13 +5065,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[407]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], + CellLabel->"In[83]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913437873734856`*^9}, - CellLabel-> - "Out[407]=",ExpressionUUID->"bad7f5b6-1bd3-6b4b-87e4-44aee3a120fc"] +Cell[BoxData["0.5882022149604843`"], "Output", + CellChangeTimes->{3.9913437873734856`*^9, 3.993828408677248*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"bb7429bb-8a9b-4d96-acdc-d6f15aea391c"] }, Open ]], Cell[CellGroupData[{ @@ -481,13 +5258,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[408]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], + CellLabel->"In[84]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[BoxData["0.03116264120310575`"], "Output", - CellChangeTimes->{3.9913437874002857`*^9}, - CellLabel-> - "Out[408]=",ExpressionUUID->"ffdf2eb3-13bd-724f-a87b-fb40655ae9c4"] +Cell[BoxData["0.011708825208642875`"], "Output", + CellChangeTimes->{3.9913437874002857`*^9, 3.9938284086888037`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"bcfaaaed-1030-4d1b-907e-2f8b43ec6e2f"] }, Open ]], Cell[CellGroupData[{ @@ -500,13 +5275,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[409]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], + CellLabel->"In[85]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[BoxData["5.020278507983894`"], "Output", - CellChangeTimes->{3.9913437875033875`*^9}, - CellLabel-> - "Out[409]=",ExpressionUUID->"609425d6-cf9c-7a45-bc21-030ca3aa1290"] +Cell[BoxData["8.19008255224062`"], "Output", + CellChangeTimes->{3.9913437875033875`*^9, 3.993828408855715*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"2635c8b8-5ffa-4af6-9082-8d619dc1ec87"] }, Open ]], Cell[CellGroupData[{ @@ -697,13 +5470,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[410]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], + CellLabel->"In[86]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[BoxData["0.011613560908040731`"], "Output", - CellChangeTimes->{3.9913437875342865`*^9}, - CellLabel-> - "Out[410]=",ExpressionUUID->"b20cbe94-36a3-8548-a61e-959a25814c62"] +Cell[BoxData["0.18706240383706477`"], "Output", + CellChangeTimes->{3.9913437875342865`*^9, 3.9938284088701267`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"a548892a-7fa6-4729-a274-88c89eac986a"] }, Open ]], Cell[CellGroupData[{ @@ -716,13 +5487,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[411]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], + CellLabel->"In[87]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[BoxData["8.223604958038852`"], "Output", - CellChangeTimes->{3.9913437876352882`*^9}, - CellLabel-> - "Out[411]=",ExpressionUUID->"4fc2e2c1-457d-3d4a-a5b7-180877c6f370"] +Cell[BoxData["2.0490458916122467`"], "Output", + CellChangeTimes->{3.9913437876352882`*^9, 3.993828408911963*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"4c599de7-511b-4078-8db6-4d8e8ad145d4"] }, Open ]], Cell[CellGroupData[{ @@ -814,13 +5583,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], + CellLabel->"In[88]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991343787650694*^9}, - CellLabel-> - "Out[412]=",ExpressionUUID->"08fcefa1-a87b-bf4b-998d-0c9017752dd4"] +Cell[BoxData["0.19148677740942904`"], "Output", + CellChangeTimes->{3.991343787650694*^9, 3.993828408926074*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"324c767e-bd05-4006-bee1-17adeca01e1a"] }, Open ]], Cell[CellGroupData[{ @@ -909,13 +5676,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], + CellLabel->"In[89]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913437876776943`*^9}, - CellLabel-> - "Out[413]=",ExpressionUUID->"5678b502-e98a-5d4b-9c03-fe98b2cc6f78"] +Cell[BoxData["0.808513222590571`"], "Output", + CellChangeTimes->{3.9913437876776943`*^9, 3.9938284089380207`*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"4232bf42-072f-49b3-9073-f1dd2c9e536e"] }, Open ]], Cell[CellGroupData[{ @@ -1037,19 +5802,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[414]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], + CellLabel->"In[90]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913437877049465`*^9}, - CellLabel-> - "Out[414]=",ExpressionUUID->"d74c1470-6eae-4841-b978-069a86bca67d"] +Cell[BoxData["0.15481959148678082`"], "Output", + CellChangeTimes->{3.9913437877049465`*^9, 3.9938284089496403`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"66dfa685-ab4d-4013-bdc5-36bbabe380d7"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"8111b6bb-cdcb-\ -ad40-9440-412e77bed40d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ @@ -1110,68 +5873,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501532204666`*^9},ExpressionUUID->"fc88a60e-e348-d344-96c4-\ -1f4f66f53217"], + CellChangeTimes->{3.9918501532204666`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 433, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877189426`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2849952523554315`*^-89\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 1, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.993828408986957*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], +In[92]:=",ExpressionUUID->"32475968-1f29-4f63-b09b-05fc47116795"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 434, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787730139*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.38854959909203`*^-91\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 2, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.993828408998988*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], +In[92]:=",ExpressionUUID->"a421e5cd-63ef-42d0-9a6f-e34dec33cee3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 435, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877381363`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.476110845346785`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 92, 3, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.99382840900274*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], +In[92]:=",ExpressionUUID->"1fe95495-6e0d-4723-ad41-4b956fbede80"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 415, 436, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787747137*^9}, +during this calculation.\"", 2, 92, 4, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.993828409005663*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], +In[92]:=",ExpressionUUID->"90388585-8b48-4235-aac8-59995beea30c"], -Cell[BoxData["5.020278507983898`"], "Output", - CellChangeTimes->{3.991343791131052*^9}, - CellLabel-> - "Out[415]=",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[BoxData["8.19006056030895`"], "Output", + CellChangeTimes->{3.991343791131052*^9, 3.993828411476898*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"07d6f137-20e3-46e1-a1cd-01565865ef4d"] }, Open ]], Cell[CellGroupData[{ @@ -1233,68 +6004,76 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501579408264`*^9},ExpressionUUID->"dca13eb7-7f94-3e45-81a8-\ -b62dad3009d2"], + CellChangeTimes->{3.9918501579408264`*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 437, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911686516`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2849952523554315`*^-89\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 5, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.9938284115525923`*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], +In[93]:=",ExpressionUUID->"267404f3-97f7-4548-a8ab-096d46bcb3b1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 438, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134379117865*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.38854959909203`*^-91\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 6, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.993828411556388*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], +In[93]:=",ExpressionUUID->"0a62ee0c-d611-4196-9c89-3bfa7989969d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 439, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911866493`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.476110845346785`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 93, 7, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.9938284115596247`*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], +In[93]:=",ExpressionUUID->"8f2291a6-d315-489e-b76e-84767b120127"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 416, 440, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911946507`*^9}, +during this calculation.\"", 2, 93, 8, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.993828411562319*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], +In[93]:=",ExpressionUUID->"15b91f68-f00d-4eba-8f8f-c325c63599ad"], -Cell[BoxData["8.223604958038848`"], "Output", - CellChangeTimes->{3.991343794599764*^9}, - CellLabel-> - "Out[416]=",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[BoxData["2.049040389533732`"], "Output", + CellChangeTimes->{3.991343794599764*^9, 3.993828414030635*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"2fca82ac-f874-4194-908f-0cf8fadb0f68"] }, Open ]], Cell[CellGroupData[{ @@ -1350,94 +6129,103 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501631488323`*^9},ExpressionUUID->"46451e4d-f5ef-b246-91c6-\ -4265c9fafb97"], + CellChangeTimes->{3.9918501631488323`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc4Ff4XB/CLZIRChW+SMgoVmVfkHDKyV8Msrl02+RmlIQ1FthRRIYl7 +LyFFvpIifLNXUcqqUGYR5ffpL8/reb8/5xye+9zHVpqflRsrhUJhY6FQ/v4s +mrbguCChgKo+ToqvOtbhztxgniVQxNotahWdnbxIc42a32WmiLQTZTcaqnjx +hkTieycHRVwnmny5MYcX2e4ymK9CFfFc1MXmhWBefHv768HEYkWMzJs1o2zk +xSs3nDJlJJTQP6Yq5aUdD45eNdlts1oZY6Kn7X2+c+OdQEmLsmYV9JULb4/S +58SS9zVXhftVsLBM2P6KAifWGjnWR4yrYMmZQL47/3Di8LZULR1uVdz3WWhq +9XcOlO7g2NVioIovdyX5Ft7gwEKlca4vtaoonv1AxuH7aqyYK34h+kQNhfMn +vJQK2LE1BNQu5Kpj4jMNG/eDbOjzJvNWVqk6XmnIPrhtPxtySy+vPH2hjuaD +I6bf9rChXldFw/RHdaxj1+IvX8uGT5UU7Y6J7UVNk643bM2smDMleXpv2l7k +F3BKuG7AiqHHuV9MXdbAWjHbEXEjFtx6tMvM0Xsfau9+d/ve/B/IqVlbHxy+ +D1VFDu417P8D0hJGcO3yPiwobmBd/eIP7PxcLV+Zsw+DZd3a6uL/gGpg/jqR +gX34MqjE9dCuP2ByMaK901QLTdjDnUqO/4YQ+tbDJvKAmhIClP75JVhY5/DG +ZR/gemeHd/s/LEFEUKp+hDEgncsts6ZhCc5S16gVeACu+zEVu3BrCa7Wzglx +ZpN+wE85p/1LYDE+NOHMiYjFMQ1/Un6B20o5fXMYYtPOSIc/houwnmNT8vOz +iPnDZlryyotQy3cmzO0yIiXqmViI2CKIixnoFqUhNiR1XdCbXYB+zZ4+zXLE +2rduMZ8zF8Aq/Ocqh1nEhT+tr3f+/Ala82r2N320UVtPynnTkx8wuXwLtU5q +YzOkbBnK/QEZqyjSn05po6FHlXZ14g9YFGyYkrmmjePVWc507x9Qqmhz8UmB +Ngaqbh4N2voDZP1Di3vHtLGKJ2rsfNw8CI1XcAjRdDBqz4isXMgcUBe4f1K9 +dDA27No9W/c5sGN3HLXz10GrX0dmUg/PQcYWlpe3I3VQmXOpZ5/aHGw7aHhe ++pYOpukE7dJYnIXdz/qWVTp1sCV6MXTszCzoX/81fVB/P144ebMpJ20GgpU0 ++xNldVHrdVJY0+QUOKh+/xC/RxcFMu2Eoj5Oga763aE4qi7G81W26HVNgSBw +jsfo6+I1XU/XiaopKDHqXDxP00VNn6SJqmtTMOXsLRR0UxdZL/UK0HZPwYn4 +DCtrbj0sjbOFsZlvQJtcbhD8qoc6EVxWG20n4PGrH/MPpvXwaJsTT8P+CeDJ +ntqGi3pY1cQqG7eb5FbDp7w59XHF5qLakVUkr2hSeCmtj99r3TXeMseh7PzN +GyEu+mjiuFEpgXccOIWpnn39+ija/5tdsesLFOkEcWS1GKBMwZePlPQxCN5q +r/Wo2wCD01fPm1wZA03K/pP1AwY4tF0iIy9sDJqfCQx9HzdAAclz/uftxmCC +WlKNnAdQ9+Fs5VvRMZCVnz75CQ/goDnDgTVnFPI3+Q1LlRxA7kTWmM7KEciZ +O/68MNkQL5SNOI7wDUPfg/StthmGePVXdKwkyzDwHWs4x55jiBy3zJX9Z4cg +7LWUztFHhniSraVkZ+8QmN0erF3bbohiG9+tJn96WDQ4XBe41ghpBc3dSVSS +39Kup8YYYbVFpteSzydY0Bb+r+6MMfpoyNVzLQ7C3MR9bdNLxnj8BkuqxrdB ++J6mVt4VZ4zdlV9zQ4YGYXTycNZopjGWat534XwzCJ3pKQGcVcaY4frNOv3e +IBRPC2w0WTDGLbOpAl4Wg3D8Du+xDn8TdBZP7Fnl/AEGKGzTH51Nsd9XxiCT +fwBMis/6ffY0RZtEvYADLAPw1PnP5Dc/U6y9m7WDMt0PqbWLX5dOm+LEOuBP +ae0HiwtTwxtumuJnKeFr1vH9UMvxvtew3RRDze47igj0Qx7fk5piHTN0PpLt +fUrsHfiK+sWfkzDHZUY3utj0gdE9Jaq4nDkKtijteGrYB9KyCx+qFc1xVKe/ +R1SjDwbUzskva5ujlEg7jV2sD0ysk96EOJnjj1GbSefhXpCJeczjnWmOde+/ +74SgXphZOqP7cI0FRhepR0F6D9C9GmpSoi3w0df261KruqGLcUdE8ooF/tcV +9OjLQhcsz4cHllyzwCe+0dNlk11gfH6XZEuSBfl+/pzt3tMFn28mXuK8a4Fn +kiu4djzsgq3NDmYR1RboZmLJKnWwC5J3T79z+mmBY4fOjPQ+7ITwWZGfcl6W +eFH9zXK9fwf05qS6rvaxRBVBlsxU9w5QPSzYPuhviUoxvePeDh0wU8FTlBJq +iVrp18MUDnTA8cgV2solS9wV45ckIN4Btlwjb9rzLHH9pESTZls7ULcw88KG +LfF3f9iaJWo7zBvpH64/ZoXPK7lSakXbQPV/s/9dd7FCRdXRwoD1bRB6L1vP +xsMKn7YXM6V52uDX0i/lL75W2F5Y4XF3qRX+FDIE10RaYakj/+rBt62weq1I +m1mGFYYKN+T73WwFoY5x4+5eK6zj9C2q3twK6vYJ2iOW1qi6QlOner6BdpHM +43VKB5GNm73d2bUJ/smLqsrfcQijLLRZrDMaoGJQ1sSM9zDO74njsXd9BWKd +Ux4hk4fRJ7SvUTCqDpRSEgrvDR7BoJen5jv+rYXMVbO7E1/YYJqVuHWr1XMo +15Z/G/3EFm/dDEq4Mf8v3FCL4V8usEP/DqpUY8EzaHmXe1Hpmj3azfLLCDVV +QplphqT/WQdksS6XMmR9CtM+1hRfV0cc9SrlCblaAfP6Mp7f9h/FRrPcvu36 +jyF/sm8hSPUYrlvK6L7MVw42d3JdHHmcUP/2rjpWvjJ4VGJ8jO2SE2Zs3HB1 +ULgU1De1L15ZdMID2Q6sl80fgcSgx9s2L2cU1wVOvTslMLzmhHnGkDMu2C4d +vblUDK1xZi4Gh2iYXT2dNRRcDMmhWWtOttJQYYdqKf0HE6qqVxZdDF2wdeZU +m2wsE/Y8V6ZuN3ZB/3qd+udXmZD3wivkq4kL4m/qfdsYJiQ0dMz4W7jgWb0n +ktcuMcG9/f746SMumB0rvXb5HBP4R80H0txcsEZX9QTH/0jOm13TdM4FB+fv +pTQ6M2GtA15Sekr6mlUz8+pMEF9f3yJa5YIWZi2UQioTFJpNhVdXu6DCgjK/ +ixoTrDTtH/Q+J/3CSbVOZSYki4Y0nX5N7NCbUivPhH8GHq5t6CXz9X3sWqSY +IHlU6IbDTxeMt+MxvC/ABHWnb/nRyq7o5OvCc+k9A/LSp4LMVF1R3DHye1I/ +A9Z3zGgJUV2xpuVD+N23DPim97MzX8MVsWLzlbpuBuTIUViadVyRwiEXLtrC +AL6f/LYCliQfqnDdVMOA4VgVriwf4hC2zdb3GGBZr9bp4Uf2hbR6JN9hQDVl +b5ZCAJm/qdSiJ4sB6UFaKrXBrnjWL3bJOYMBZrYGziMRJD+lURSTwoAnkrZP +5GLI++ENIHOZAXGVp7wq8sh+kVTxdF8G+CimqYfmk32u4rQNPgwweVDMRS0g +ue/yjqQTDOBOG33wuIjM9yzUS/JkQHSgxdfyUtI34y3NpTHglIzkibJa4qyK +3YJHGHA8rcm75D3pf4pY4NNmgCHfqGbg4N97AnwrgQE7oim8ip9IP92E5qXF +gNFAlaLiEZL/6q59rcEAZ7OsSeYE2f9hv3OGKgNs2IN8Gb9I3hc7fHknAwyC +/vEv3OiGlP9F3TwtwoDarItGicJuiNu256EwAzSbZyRD/yG2f3GCXYgBClJN +ffvFSH9iTiJ5PQNEeiL2v5Nyw7O3KrVfrWXA+N6BjdwqblgjOLFyajUDrrNm +P/OwJnmsNIvSPB245XlumB4ieUDZwM45OlywDw1UOkLyaw4+O2bpEFpqsX3F +jsx/sCtXcpoOzu4sCak0kndGB+yZpINSI831ZQDJc4KtM0bo0JMgtUYintx3 +upBS3kMHOvB6fk4g/bDeF7PdZP7kXF1REukncP1WJFY0rIukppG+7HJrWScd +4iguM6a3yT0OFUvNbXTQ98vuCy0kfsumo91Mh82bL6tq0cn7sxJHUpvoMNfo +l8TGJB7wHJxopMNdaTCNe0T6zvNmt1/T4ffAQM29pyTPEkoXqKdDqcmm/DcN +5J5y+0aspcPVX6zsyY2k/9twQ9FzOtDyvzrbNpM8uqr9H+J1q55uGm4h93m9 +yfn1Lx28K22uL3aTeSh4r+kZHSRkU0MkR/7us5kreUKHXz2nO76Mkly2yUGV +uDXaTYHxmbzfcVS1soIOkR+Vv6pPkFw0WfP1Yzq8vdHhaD5LfFs46UcZHRI5 ++PXCWdzx7FF+m9QSOlTNDNgHsxFv7eSXIh4bKAj0ZXfHmiWx1LJiOmiW6mbT +uNyRsmPm9zsmHUadQpeM+EnfavsBLQa530RPQE+Q5PLPrd/R6aChJiADG0gu +qCYTThzPW3hYSYR41GPPsyKSP/1QvGkr6Tc3lNoU0sE9t7Bhg4Q7YpAc7yri ++PiwD2ulyP4rXbuLH5J97oK8q2SIH1b9t444XtDAc0KB9FsEQ0ce0OHpH8Ez +o4pkvveEcBbxyJfBlEFlkhtcP29HvLcm/EUnleQ85D+MfDoMe9PFniHxfUrg +8H068NlEqDzWIQ56fKSQWH3/AZNiXfI+r509hDhO5FNY7gFiHe5KPuKKVYz4 +LCPiFP7agTw6DH2PuJ9uQu7bZp1AJ6a+2tAVa0H84ujlQ8S04k/jl6zI71uw +kSlHHJvBYD1/kOwLGM5iI/4UaKgQYkNscqenIpd8mo9uNPC3I33Rc1tSiamG +Q47HHYgNbORPEsduOX31qBPZL9meRyWu4Da6a0Mj7yM8+TYTf5rf+MTKlewP +HdjH9nfex6EWE3fiLjmV8Rwyr5k5qu9J+g/N5jqJaY9P/8bjZL6fdkQNcexd +o/Ua3iSfXXldRFwRKySn4kvscXEwg/hT6LC2vD/p27RVxxLzuBbbyASSe+gD +rmeJ1cwj/SSCyT5mfnvw3/l7jS9uDiHvWRU4TxBfkxLOFAolzg1gdyEuXzfy +iD+cvP9xotGB+ONSceOaU+Q9Y/MRm7/zxyI/skeSfZ+jHx4iVm03Xlg5Q/ob +cuoPEv8f6miLEQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -1451,105 +6239,114 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1nc4Ff4XB/CLZIRChW+SMgoVmVfkHDKyV8Msrl02+RmlIQ1FthRRIYl7 +LyFFvpIifLNXUcqqUGYR5ffpL8/reb8/5xye+9zHVpqflRsrhUJhY6FQ/v4s +mrbguCChgKo+ToqvOtbhztxgniVQxNotahWdnbxIc42a32WmiLQTZTcaqnjx +hkTieycHRVwnmny5MYcX2e4ymK9CFfFc1MXmhWBefHv768HEYkWMzJs1o2zk +xSs3nDJlJJTQP6Yq5aUdD45eNdlts1oZY6Kn7X2+c+OdQEmLsmYV9JULb4/S +58SS9zVXhftVsLBM2P6KAifWGjnWR4yrYMmZQL47/3Di8LZULR1uVdz3WWhq +9XcOlO7g2NVioIovdyX5Ft7gwEKlca4vtaoonv1AxuH7aqyYK34h+kQNhfMn +vJQK2LE1BNQu5Kpj4jMNG/eDbOjzJvNWVqk6XmnIPrhtPxtySy+vPH2hjuaD +I6bf9rChXldFw/RHdaxj1+IvX8uGT5UU7Y6J7UVNk643bM2smDMleXpv2l7k +F3BKuG7AiqHHuV9MXdbAWjHbEXEjFtx6tMvM0Xsfau9+d/ve/B/IqVlbHxy+ +D1VFDu417P8D0hJGcO3yPiwobmBd/eIP7PxcLV+Zsw+DZd3a6uL/gGpg/jqR +gX34MqjE9dCuP2ByMaK901QLTdjDnUqO/4YQ+tbDJvKAmhIClP75JVhY5/DG +ZR/gemeHd/s/LEFEUKp+hDEgncsts6ZhCc5S16gVeACu+zEVu3BrCa7Wzglx +ZpN+wE85p/1LYDE+NOHMiYjFMQ1/Un6B20o5fXMYYtPOSIc/houwnmNT8vOz +iPnDZlryyotQy3cmzO0yIiXqmViI2CKIixnoFqUhNiR1XdCbXYB+zZ4+zXLE +2rduMZ8zF8Aq/Ocqh1nEhT+tr3f+/Ala82r2N320UVtPynnTkx8wuXwLtU5q +YzOkbBnK/QEZqyjSn05po6FHlXZ14g9YFGyYkrmmjePVWc507x9Qqmhz8UmB +Ngaqbh4N2voDZP1Di3vHtLGKJ2rsfNw8CI1XcAjRdDBqz4isXMgcUBe4f1K9 +dDA27No9W/c5sGN3HLXz10GrX0dmUg/PQcYWlpe3I3VQmXOpZ5/aHGw7aHhe ++pYOpukE7dJYnIXdz/qWVTp1sCV6MXTszCzoX/81fVB/P144ebMpJ20GgpU0 ++xNldVHrdVJY0+QUOKh+/xC/RxcFMu2Eoj5Oga763aE4qi7G81W26HVNgSBw +jsfo6+I1XU/XiaopKDHqXDxP00VNn6SJqmtTMOXsLRR0UxdZL/UK0HZPwYn4 +DCtrbj0sjbOFsZlvQJtcbhD8qoc6EVxWG20n4PGrH/MPpvXwaJsTT8P+CeDJ +ntqGi3pY1cQqG7eb5FbDp7w59XHF5qLakVUkr2hSeCmtj99r3TXeMseh7PzN +GyEu+mjiuFEpgXccOIWpnn39+ija/5tdsesLFOkEcWS1GKBMwZePlPQxCN5q +r/Wo2wCD01fPm1wZA03K/pP1AwY4tF0iIy9sDJqfCQx9HzdAAclz/uftxmCC +WlKNnAdQ9+Fs5VvRMZCVnz75CQ/goDnDgTVnFPI3+Q1LlRxA7kTWmM7KEciZ +O/68MNkQL5SNOI7wDUPfg/StthmGePVXdKwkyzDwHWs4x55jiBy3zJX9Z4cg +7LWUztFHhniSraVkZ+8QmN0erF3bbohiG9+tJn96WDQ4XBe41ghpBc3dSVSS +39Kup8YYYbVFpteSzydY0Bb+r+6MMfpoyNVzLQ7C3MR9bdNLxnj8BkuqxrdB ++J6mVt4VZ4zdlV9zQ4YGYXTycNZopjGWat534XwzCJ3pKQGcVcaY4frNOv3e +IBRPC2w0WTDGLbOpAl4Wg3D8Du+xDn8TdBZP7Fnl/AEGKGzTH51Nsd9XxiCT +fwBMis/6ffY0RZtEvYADLAPw1PnP5Dc/U6y9m7WDMt0PqbWLX5dOm+LEOuBP +ae0HiwtTwxtumuJnKeFr1vH9UMvxvtew3RRDze47igj0Qx7fk5piHTN0PpLt +fUrsHfiK+sWfkzDHZUY3utj0gdE9Jaq4nDkKtijteGrYB9KyCx+qFc1xVKe/ +R1SjDwbUzskva5ujlEg7jV2sD0ysk96EOJnjj1GbSefhXpCJeczjnWmOde+/ +74SgXphZOqP7cI0FRhepR0F6D9C9GmpSoi3w0df261KruqGLcUdE8ooF/tcV +9OjLQhcsz4cHllyzwCe+0dNlk11gfH6XZEuSBfl+/pzt3tMFn28mXuK8a4Fn +kiu4djzsgq3NDmYR1RboZmLJKnWwC5J3T79z+mmBY4fOjPQ+7ITwWZGfcl6W +eFH9zXK9fwf05qS6rvaxRBVBlsxU9w5QPSzYPuhviUoxvePeDh0wU8FTlBJq +iVrp18MUDnTA8cgV2solS9wV45ckIN4Btlwjb9rzLHH9pESTZls7ULcw88KG +LfF3f9iaJWo7zBvpH64/ZoXPK7lSakXbQPV/s/9dd7FCRdXRwoD1bRB6L1vP +xsMKn7YXM6V52uDX0i/lL75W2F5Y4XF3qRX+FDIE10RaYakj/+rBt62weq1I +m1mGFYYKN+T73WwFoY5x4+5eK6zj9C2q3twK6vYJ2iOW1qi6QlOner6BdpHM +43VKB5GNm73d2bUJ/smLqsrfcQijLLRZrDMaoGJQ1sSM9zDO74njsXd9BWKd +Ux4hk4fRJ7SvUTCqDpRSEgrvDR7BoJen5jv+rYXMVbO7E1/YYJqVuHWr1XMo +15Z/G/3EFm/dDEq4Mf8v3FCL4V8usEP/DqpUY8EzaHmXe1Hpmj3azfLLCDVV +QplphqT/WQdksS6XMmR9CtM+1hRfV0cc9SrlCblaAfP6Mp7f9h/FRrPcvu36 +jyF/sm8hSPUYrlvK6L7MVw42d3JdHHmcUP/2rjpWvjJ4VGJ8jO2SE2Zs3HB1 +ULgU1De1L15ZdMID2Q6sl80fgcSgx9s2L2cU1wVOvTslMLzmhHnGkDMu2C4d +vblUDK1xZi4Gh2iYXT2dNRRcDMmhWWtOttJQYYdqKf0HE6qqVxZdDF2wdeZU +m2wsE/Y8V6ZuN3ZB/3qd+udXmZD3wivkq4kL4m/qfdsYJiQ0dMz4W7jgWb0n +ktcuMcG9/f746SMumB0rvXb5HBP4R80H0txcsEZX9QTH/0jOm13TdM4FB+fv +pTQ6M2GtA15Sekr6mlUz8+pMEF9f3yJa5YIWZi2UQioTFJpNhVdXu6DCgjK/ +ixoTrDTtH/Q+J/3CSbVOZSYki4Y0nX5N7NCbUivPhH8GHq5t6CXz9X3sWqSY +IHlU6IbDTxeMt+MxvC/ABHWnb/nRyq7o5OvCc+k9A/LSp4LMVF1R3DHye1I/ +A9Z3zGgJUV2xpuVD+N23DPim97MzX8MVsWLzlbpuBuTIUViadVyRwiEXLtrC +AL6f/LYCliQfqnDdVMOA4VgVriwf4hC2zdb3GGBZr9bp4Uf2hbR6JN9hQDVl +b5ZCAJm/qdSiJ4sB6UFaKrXBrnjWL3bJOYMBZrYGziMRJD+lURSTwoAnkrZP +5GLI++ENIHOZAXGVp7wq8sh+kVTxdF8G+CimqYfmk32u4rQNPgwweVDMRS0g +ue/yjqQTDOBOG33wuIjM9yzUS/JkQHSgxdfyUtI34y3NpTHglIzkibJa4qyK +3YJHGHA8rcm75D3pf4pY4NNmgCHfqGbg4N97AnwrgQE7oim8ip9IP92E5qXF +gNFAlaLiEZL/6q59rcEAZ7OsSeYE2f9hv3OGKgNs2IN8Gb9I3hc7fHknAwyC +/vEv3OiGlP9F3TwtwoDarItGicJuiNu256EwAzSbZyRD/yG2f3GCXYgBClJN +ffvFSH9iTiJ5PQNEeiL2v5Nyw7O3KrVfrWXA+N6BjdwqblgjOLFyajUDrrNm +P/OwJnmsNIvSPB245XlumB4ieUDZwM45OlywDw1UOkLyaw4+O2bpEFpqsX3F +jsx/sCtXcpoOzu4sCak0kndGB+yZpINSI831ZQDJc4KtM0bo0JMgtUYintx3 +upBS3kMHOvB6fk4g/bDeF7PdZP7kXF1REukncP1WJFY0rIukppG+7HJrWScd +4iguM6a3yT0OFUvNbXTQ98vuCy0kfsumo91Mh82bL6tq0cn7sxJHUpvoMNfo +l8TGJB7wHJxopMNdaTCNe0T6zvNmt1/T4ffAQM29pyTPEkoXqKdDqcmm/DcN +5J5y+0aspcPVX6zsyY2k/9twQ9FzOtDyvzrbNpM8uqr9H+J1q55uGm4h93m9 +yfn1Lx28K22uL3aTeSh4r+kZHSRkU0MkR/7us5kreUKHXz2nO76Mkly2yUGV +uDXaTYHxmbzfcVS1soIOkR+Vv6pPkFw0WfP1Yzq8vdHhaD5LfFs46UcZHRI5 ++PXCWdzx7FF+m9QSOlTNDNgHsxFv7eSXIh4bKAj0ZXfHmiWx1LJiOmiW6mbT +uNyRsmPm9zsmHUadQpeM+EnfavsBLQa530RPQE+Q5PLPrd/R6aChJiADG0gu +qCYTThzPW3hYSYR41GPPsyKSP/1QvGkr6Tc3lNoU0sE9t7Bhg4Q7YpAc7yri ++PiwD2ulyP4rXbuLH5J97oK8q2SIH1b9t444XtDAc0KB9FsEQ0ce0OHpH8Ez +o4pkvveEcBbxyJfBlEFlkhtcP29HvLcm/EUnleQ85D+MfDoMe9PFniHxfUrg +8H068NlEqDzWIQ56fKSQWH3/AZNiXfI+r509hDhO5FNY7gFiHe5KPuKKVYz4 +LCPiFP7agTw6DH2PuJ9uQu7bZp1AJ6a+2tAVa0H84ujlQ8S04k/jl6zI71uw +kSlHHJvBYD1/kOwLGM5iI/4UaKgQYkNscqenIpd8mo9uNPC3I33Rc1tSiamG +Q47HHYgNbORPEsduOX31qBPZL9meRyWu4Da6a0Mj7yM8+TYTf5rf+MTKlewP +HdjH9nfex6EWE3fiLjmV8Rwyr5k5qu9J+g/N5jqJaY9P/8bjZL6fdkQNcexd +o/Ua3iSfXXldRFwRKySn4kvscXEwg/hT6LC2vD/p27RVxxLzuBbbyASSe+gD +rmeJ1cwj/SSCyT5mfnvw3/l7jS9uDiHvWRU4TxBfkxLOFAolzg1gdyEuXzfy +iD+cvP9xotGB+ONSceOaU+Q9Y/MRm7/zxyI/skeSfZ+jHx4iVm03Xlg5Q/ob +cuoPEv8f6miLEQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "PlotRange" -> {{0, 180}, {0., 4.206810748229421}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -1561,131 +6358,139 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 4.206810748229421}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{115.12306105754324`, - 253.30690491292427`}, {-15.402138689748767`, 5.769736310251233}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1nc4Ff4XB/CLZIRChW+SMgoVmVfkHDKyV8Msrl02+RmlIQ1FthRRIYl7 +LyFFvpIifLNXUcqqUGYR5ffpL8/reb8/5xye+9zHVpqflRsrhUJhY6FQ/v4s +mrbguCChgKo+ToqvOtbhztxgniVQxNotahWdnbxIc42a32WmiLQTZTcaqnjx +hkTieycHRVwnmny5MYcX2e4ymK9CFfFc1MXmhWBefHv768HEYkWMzJs1o2zk +xSs3nDJlJJTQP6Yq5aUdD45eNdlts1oZY6Kn7X2+c+OdQEmLsmYV9JULb4/S +58SS9zVXhftVsLBM2P6KAifWGjnWR4yrYMmZQL47/3Di8LZULR1uVdz3WWhq +9XcOlO7g2NVioIovdyX5Ft7gwEKlca4vtaoonv1AxuH7aqyYK34h+kQNhfMn +vJQK2LE1BNQu5Kpj4jMNG/eDbOjzJvNWVqk6XmnIPrhtPxtySy+vPH2hjuaD +I6bf9rChXldFw/RHdaxj1+IvX8uGT5UU7Y6J7UVNk643bM2smDMleXpv2l7k +F3BKuG7AiqHHuV9MXdbAWjHbEXEjFtx6tMvM0Xsfau9+d/ve/B/IqVlbHxy+ +D1VFDu417P8D0hJGcO3yPiwobmBd/eIP7PxcLV+Zsw+DZd3a6uL/gGpg/jqR +gX34MqjE9dCuP2ByMaK901QLTdjDnUqO/4YQ+tbDJvKAmhIClP75JVhY5/DG +ZR/gemeHd/s/LEFEUKp+hDEgncsts6ZhCc5S16gVeACu+zEVu3BrCa7Wzglx +ZpN+wE85p/1LYDE+NOHMiYjFMQ1/Un6B20o5fXMYYtPOSIc/houwnmNT8vOz +iPnDZlryyotQy3cmzO0yIiXqmViI2CKIixnoFqUhNiR1XdCbXYB+zZ4+zXLE +2rduMZ8zF8Aq/Ocqh1nEhT+tr3f+/Ala82r2N320UVtPynnTkx8wuXwLtU5q +YzOkbBnK/QEZqyjSn05po6FHlXZ14g9YFGyYkrmmjePVWc507x9Qqmhz8UmB +Ngaqbh4N2voDZP1Di3vHtLGKJ2rsfNw8CI1XcAjRdDBqz4isXMgcUBe4f1K9 +dDA27No9W/c5sGN3HLXz10GrX0dmUg/PQcYWlpe3I3VQmXOpZ5/aHGw7aHhe ++pYOpukE7dJYnIXdz/qWVTp1sCV6MXTszCzoX/81fVB/P144ebMpJ20GgpU0 ++xNldVHrdVJY0+QUOKh+/xC/RxcFMu2Eoj5Oga763aE4qi7G81W26HVNgSBw +jsfo6+I1XU/XiaopKDHqXDxP00VNn6SJqmtTMOXsLRR0UxdZL/UK0HZPwYn4 +DCtrbj0sjbOFsZlvQJtcbhD8qoc6EVxWG20n4PGrH/MPpvXwaJsTT8P+CeDJ +ntqGi3pY1cQqG7eb5FbDp7w59XHF5qLakVUkr2hSeCmtj99r3TXeMseh7PzN +GyEu+mjiuFEpgXccOIWpnn39+ija/5tdsesLFOkEcWS1GKBMwZePlPQxCN5q +r/Wo2wCD01fPm1wZA03K/pP1AwY4tF0iIy9sDJqfCQx9HzdAAclz/uftxmCC +WlKNnAdQ9+Fs5VvRMZCVnz75CQ/goDnDgTVnFPI3+Q1LlRxA7kTWmM7KEciZ +O/68MNkQL5SNOI7wDUPfg/StthmGePVXdKwkyzDwHWs4x55jiBy3zJX9Z4cg +7LWUztFHhniSraVkZ+8QmN0erF3bbohiG9+tJn96WDQ4XBe41ghpBc3dSVSS +39Kup8YYYbVFpteSzydY0Bb+r+6MMfpoyNVzLQ7C3MR9bdNLxnj8BkuqxrdB ++J6mVt4VZ4zdlV9zQ4YGYXTycNZopjGWat534XwzCJ3pKQGcVcaY4frNOv3e +IBRPC2w0WTDGLbOpAl4Wg3D8Du+xDn8TdBZP7Fnl/AEGKGzTH51Nsd9XxiCT +fwBMis/6ffY0RZtEvYADLAPw1PnP5Dc/U6y9m7WDMt0PqbWLX5dOm+LEOuBP +ae0HiwtTwxtumuJnKeFr1vH9UMvxvtew3RRDze47igj0Qx7fk5piHTN0PpLt +fUrsHfiK+sWfkzDHZUY3utj0gdE9Jaq4nDkKtijteGrYB9KyCx+qFc1xVKe/ +R1SjDwbUzskva5ujlEg7jV2sD0ysk96EOJnjj1GbSefhXpCJeczjnWmOde+/ +74SgXphZOqP7cI0FRhepR0F6D9C9GmpSoi3w0df261KruqGLcUdE8ooF/tcV +9OjLQhcsz4cHllyzwCe+0dNlk11gfH6XZEuSBfl+/pzt3tMFn28mXuK8a4Fn +kiu4djzsgq3NDmYR1RboZmLJKnWwC5J3T79z+mmBY4fOjPQ+7ITwWZGfcl6W +eFH9zXK9fwf05qS6rvaxRBVBlsxU9w5QPSzYPuhviUoxvePeDh0wU8FTlBJq +iVrp18MUDnTA8cgV2solS9wV45ckIN4Btlwjb9rzLHH9pESTZls7ULcw88KG +LfF3f9iaJWo7zBvpH64/ZoXPK7lSakXbQPV/s/9dd7FCRdXRwoD1bRB6L1vP +xsMKn7YXM6V52uDX0i/lL75W2F5Y4XF3qRX+FDIE10RaYakj/+rBt62weq1I +m1mGFYYKN+T73WwFoY5x4+5eK6zj9C2q3twK6vYJ2iOW1qi6QlOner6BdpHM +43VKB5GNm73d2bUJ/smLqsrfcQijLLRZrDMaoGJQ1sSM9zDO74njsXd9BWKd +Ux4hk4fRJ7SvUTCqDpRSEgrvDR7BoJen5jv+rYXMVbO7E1/YYJqVuHWr1XMo +15Z/G/3EFm/dDEq4Mf8v3FCL4V8usEP/DqpUY8EzaHmXe1Hpmj3azfLLCDVV +QplphqT/WQdksS6XMmR9CtM+1hRfV0cc9SrlCblaAfP6Mp7f9h/FRrPcvu36 +jyF/sm8hSPUYrlvK6L7MVw42d3JdHHmcUP/2rjpWvjJ4VGJ8jO2SE2Zs3HB1 +ULgU1De1L15ZdMID2Q6sl80fgcSgx9s2L2cU1wVOvTslMLzmhHnGkDMu2C4d +vblUDK1xZi4Gh2iYXT2dNRRcDMmhWWtOttJQYYdqKf0HE6qqVxZdDF2wdeZU +m2wsE/Y8V6ZuN3ZB/3qd+udXmZD3wivkq4kL4m/qfdsYJiQ0dMz4W7jgWb0n +ktcuMcG9/f746SMumB0rvXb5HBP4R80H0txcsEZX9QTH/0jOm13TdM4FB+fv +pTQ6M2GtA15Sekr6mlUz8+pMEF9f3yJa5YIWZi2UQioTFJpNhVdXu6DCgjK/ +ixoTrDTtH/Q+J/3CSbVOZSYki4Y0nX5N7NCbUivPhH8GHq5t6CXz9X3sWqSY +IHlU6IbDTxeMt+MxvC/ABHWnb/nRyq7o5OvCc+k9A/LSp4LMVF1R3DHye1I/ +A9Z3zGgJUV2xpuVD+N23DPim97MzX8MVsWLzlbpuBuTIUViadVyRwiEXLtrC +AL6f/LYCliQfqnDdVMOA4VgVriwf4hC2zdb3GGBZr9bp4Uf2hbR6JN9hQDVl +b5ZCAJm/qdSiJ4sB6UFaKrXBrnjWL3bJOYMBZrYGziMRJD+lURSTwoAnkrZP +5GLI++ENIHOZAXGVp7wq8sh+kVTxdF8G+CimqYfmk32u4rQNPgwweVDMRS0g +ue/yjqQTDOBOG33wuIjM9yzUS/JkQHSgxdfyUtI34y3NpTHglIzkibJa4qyK +3YJHGHA8rcm75D3pf4pY4NNmgCHfqGbg4N97AnwrgQE7oim8ip9IP92E5qXF +gNFAlaLiEZL/6q59rcEAZ7OsSeYE2f9hv3OGKgNs2IN8Gb9I3hc7fHknAwyC +/vEv3OiGlP9F3TwtwoDarItGicJuiNu256EwAzSbZyRD/yG2f3GCXYgBClJN +ffvFSH9iTiJ5PQNEeiL2v5Nyw7O3KrVfrWXA+N6BjdwqblgjOLFyajUDrrNm +P/OwJnmsNIvSPB245XlumB4ieUDZwM45OlywDw1UOkLyaw4+O2bpEFpqsX3F +jsx/sCtXcpoOzu4sCak0kndGB+yZpINSI831ZQDJc4KtM0bo0JMgtUYintx3 +upBS3kMHOvB6fk4g/bDeF7PdZP7kXF1REukncP1WJFY0rIukppG+7HJrWScd +4iguM6a3yT0OFUvNbXTQ98vuCy0kfsumo91Mh82bL6tq0cn7sxJHUpvoMNfo +l8TGJB7wHJxopMNdaTCNe0T6zvNmt1/T4ffAQM29pyTPEkoXqKdDqcmm/DcN +5J5y+0aspcPVX6zsyY2k/9twQ9FzOtDyvzrbNpM8uqr9H+J1q55uGm4h93m9 +yfn1Lx28K22uL3aTeSh4r+kZHSRkU0MkR/7us5kreUKHXz2nO76Mkly2yUGV +uDXaTYHxmbzfcVS1soIOkR+Vv6pPkFw0WfP1Yzq8vdHhaD5LfFs46UcZHRI5 ++PXCWdzx7FF+m9QSOlTNDNgHsxFv7eSXIh4bKAj0ZXfHmiWx1LJiOmiW6mbT +uNyRsmPm9zsmHUadQpeM+EnfavsBLQa530RPQE+Q5PLPrd/R6aChJiADG0gu +qCYTThzPW3hYSYR41GPPsyKSP/1QvGkr6Tc3lNoU0sE9t7Bhg4Q7YpAc7yri ++PiwD2ulyP4rXbuLH5J97oK8q2SIH1b9t444XtDAc0KB9FsEQ0ce0OHpH8Ez +o4pkvveEcBbxyJfBlEFlkhtcP29HvLcm/EUnleQ85D+MfDoMe9PFniHxfUrg +8H068NlEqDzWIQ56fKSQWH3/AZNiXfI+r509hDhO5FNY7gFiHe5KPuKKVYz4 +LCPiFP7agTw6DH2PuJ9uQu7bZp1AJ6a+2tAVa0H84ujlQ8S04k/jl6zI71uw +kSlHHJvBYD1/kOwLGM5iI/4UaKgQYkNscqenIpd8mo9uNPC3I33Rc1tSiamG +Q47HHYgNbORPEsduOX31qBPZL9meRyWu4Da6a0Mj7yM8+TYTf5rf+MTKlewP +HdjH9nfex6EWE3fiLjmV8Rwyr5k5qu9J+g/N5jqJaY9P/8bjZL6fdkQNcexd +o/Ua3iSfXXldRFwRKySn4kvscXEwg/hT6LC2vD/p27RVxxLzuBbbyASSe+gD +rmeJ1cwj/SSCyT5mfnvw3/l7jS9uDiHvWRU4TxBfkxLOFAolzg1gdyEuXzfy +iD+cvP9xotGB+ONSceOaU+Q9Y/MRm7/zxyI/skeSfZ+jHx4iVm03Xlg5Q/ob +cuoPEv8f6miLEQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "PlotRange" -> {{0, 180}, {0., 4.206810748229421}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -1695,7 +6500,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.7504249066936067}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -1723,7 +6529,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.7504249066936051, 1.313047485013753}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 4.206810748229421}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -1731,9 +6538,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913440619685707`*^9}, - CellLabel-> - "Out[417]=",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] + CellChangeTimes->{3.9913440619685707`*^9, 3.993828696347402*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"8805f436-5eee-45f2-bc14-b002d1c5ccc6"] }, Open ]], Cell[CellGroupData[{ @@ -1796,340 +6602,219 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501659425144`*^9},ExpressionUUID->"06bd0169-a5a6-404c-935d-\ -e1a61565f71e"], + CellChangeTimes->{3.9918501659425144`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7414575136308495`*^-273\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 418, - 441, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621885586`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9115446554293564`*^-244\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 9, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.993828696733323*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], +In[95]:=",ExpressionUUID->"e75b4126-be56-4633-9797-7033bd803215"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.133412609607657`*^-284\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 418, 442, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621975574`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.138834493576108`*^-252\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 95, 10, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.993828696739593*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], +In[95]:=",ExpressionUUID->"16369f7f-285a-4ddb-be4c-5038b2c9c0b5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.599262146182568`*^-296\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 418, 443, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991344062205559*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.7503752804078732`*^-259\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 95, 11, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.993828696744022*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], +In[95]:=",ExpressionUUID->"a7a16024-337d-4aad-b272-fa17f69b3f3f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 418, 444, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134406221356*^9}, +during this calculation.\"", 2, 95, 12, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.993828696748192*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], +In[95]:=",ExpressionUUID->"08ee6e0c-abb2-48b1-8500-8ca345c2e899"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VO8XAHDZoiL7MvYllC2MMcbMnIMiS4oQkmRPJUWEQoWSJSpLqyVU +SNYZawsqW4gWIWmhvrKGUOQ3v7/u83nufd7lvOec9yp4HLPzZmdjY3u0ho3t +/8/fQ63Nygl59DhlUgdPmw39zR2JMOO+c0C4mREEdA1A0S4Pib4rUKwe4rZM +o0LI7sL3HH25IPnYL+UlzRoEJ8WvLL0vh67j+6Xdaa7wqd7m2Nz7RjA2MTRc +NDoCZspjH2fe9wD7WLhlMOk0LL03SJt+/wV620efnJZPhCbTe3mvc2eh4Sjh +9KaxWyD9qWbUQ2MFXGzWhw9z54PIkQOFa005MIvXRt9yqRCu6JjV2TjwoILP +wZmXrqWgPeBsTvPjwUN4fbDBpxQ6Yo72qkfw4J6t4+0PA0uBu+/aT54cHlzD +Z1cUEVMKEZFfpZrGefB56bR0V1EpeLVHnzaI4UXR+o2OdkulQPKuo8lXrMON +u8b0mZfL4EPm1qczAnz4xCvv9rEH5XCjt2hjyCY+lFbjiIstLwcXftUDfwz5 +8G9u36OrdeUweF7mH7snHzKl/zZkviqH4YB1VJEqPjzysitq+0w5/Nj2jUly +5sfvrU0XVQ0qYHE641FEzkakk/vwX30F1KgLr65WbUTbI+aT4s8rINwn2Sam +bSPy/l7I2PyqApYHYiYSZzeic/rHPuLHCoj+Wi3apSiA3W3qn8aWKyCmM3/P +cLAA3jywfK6XUgkJeVFd7JKC2JHY7J9YWgmWxENCokqCOGztFX2WWQk8zXYO +qpqCqHrqaEnA40qI+bppwMpYELkaD+3S6aiE04odo9cOCSJx0/CFvd8rISBb +4p9KrSAe5a9bUpGuAttbZRpW+4QwZz5euiOqCgQ0bh7b7y2EW53XxjbGVkFn +XUz5sWNCWCbQOl6aUAWWA3vJ186zvtegV5/MqAITwj/Tj0VCeG6ETS+rpAqI +mZb7ji0L4Zytv9/xgSoQv/Y1/uptYXQMemAvqM0ACfWqmMUCYRRK8uEs12MA +oTEuan+pMDIHsqqtyAyQnd58UrVJGLfN/tbyN2bAJutA97ofwsiryL93zx4G +6HGukL7qieBJLfMn704ygHizU2cHTQSZ8abta8MZQNLN1nhoJoJfpCQ+6UQy +gOJuqhjqLIIvUm7JHY9jgHF9PN/6KBE8ekWS/1Y6A3YFi33TbRNB376E5btV +DNi9/sdQRq8IKg/PV3rXMMAut+bD8qAIWv0SOy3fwADHbteuF1Mi6DNZQj7b +zID9GndrXURFcfafZcRUDwMOf9NOPecuig+XucqjJhlwwd6C3vNbFE9HEOaD +5JlAqOwksK8Rw4j1SRwZSkwoEbZf0FkvhrsDQzjLVZjwrsetNFVODAO0b33p +0mCCsm2wou0OMXxrVqFXRGZC484s7u7rYij4NmfPZxsmOD5U/rp6VwyrFQtV +YmyZMLah8Il2iRhyNI6skbNngmBH5anLjWL4Lnb1HdWZCe6WbWM2P8XQ+MmY +iqQnE1bM5jtfUcWRW4Lw3OEkE1IKwotWzMQxEigfwkJZ83OzXdS0FUeTuayN +6WFMsH6+zjjJWxzB2H6McYYJN0zlK6yTxTGG+Cv+RiwTtO7mXz6dKY7SthVf +oi6w1suufqQ4Vxy/fXc4sj+eCf8909+0gSmOVYEDkmuSmEBGq4z2T+JYncYv +8vMqEzqyuoP+/sca78LI5itprPWuOuxWnxNH9yl6tE4GEy48dudN4JFAvaG0 +3043WPGihkRY6kjgQECEqVU2E/xv/d0bbiSBDuYz6ZU5rP39jSYWbpfAzlfx +RmJ3WfupS5jgdZFAmdMN0Y35TAgyzDnQek4CI8xNyE8KmWCZzT9nlSiBxo/O +335fxATFtacvdqZJYJpE14H/ipnQ/caxrPe+BFadHmVfKmHtN3ADx1CnBH7l +9V9oKWcC1/uwDPc+CfxbYxhWXMGEQdp39a+fJfBen6JvfCUTEtY32v+YY82/ +8C9Zm8GEHwWhBb8IkngxvnC7Zg0TnvCNUE4qS+Ke6hW3QZbTg+26FjQlkbRG +ay6mlgnbTTQXl1ESLenUG411TJB+cCMxylISxUkaj/bWM2FuI48Cu70kXraU +2THKcu7HLxZrfSWxtGQb/3QDE8K27R6KD5TEDyW5cPgxE3YXNZzYEC6JPGq2 +K59YVhNSX3v5vCTO5Ptb2DxhwuqpzJuCSZJo5rZBhcHyu09cW6+lS+JuLcc0 +8aes/DULahbLlsTiTP/rJ1h2FbGZkKqQRIGgS36iz5igF1F39k69JMbw/TDY +z/K6L2piCi8k8ciVyrw7LH/ZkV54t0sS/W/KlX1gueYRB6h8kERD530H+BtZ ++Sh2vPf+F9Z8qbfKqCz7nRnyVR+XxMCbhEIvluGb1fLDeVa8Dmy0imNZzKom +ZeuqJFLtmOk5LE+UqWyq4CFgUrDtZQbLzRLXavSFCOi3S87gOcu3otbYVEsR +WPXtlfKK5aDRgC+UTQRMnfa73cWy5c7BkAYtAoofCHZvZ1mx0mI9kgnY/rpn +4CnLSwRmVqMxAW2dewRLWe4+q0zcbkXAwOgmzuss3/uR2vLSnoBNFkuMCJYj +d626WroRkKLZusWJZUfGkZkOXwLeF03w0GJZU6Y/dtdxAjq7XXf/x4oHZ4w5 +oSecgBndu1VbWB4cqyyxjyGgXo5ATQLLFbaKpu+TCCgXQJGwYPlS9eX3zhkE +HDbSNWdj+aDcyuHBbAKqBbntKGOdDznOn+1AIQH3DanKurIsMPH+2ucKAgrd +W2pjY/n7nu2bvRoIeH2PsW0W67wf15Y3jL4gYGJzQIUBy+kK8naHuglI1J2b +bWXly7apP+EBXwn4OXFAcvD/+bXj2pZn4wTcnWeW6cZySY5mv/BvAr6uzzEa +YOWjhL27YQ2PFN6yT/rz//zd+XDpx3ohKextfUvQYvkc99VMNykpjFSNPHSV +le/j1c8XOLSk8Pe5kzetWfWgIHTgnqOBFEYrJJ3PrmbF7/Ci4wOUwvMjaXcn +mUx4KqPOsNkjhQNVimlhrPq6ei4l+PopKZRfp3vOklWPLQOblcfPSiHPmldH +A1n1ukxs6qUnSKGPzce8lDIm+Hyf1/12WwpTJ7avPnnEBIr1vhmtJil0Hl0u +7Gf1gy+iKgHNfNKYxndeiJ3VT8SPPZERF5fGIc/8L69Y/ca6xenVIXlpPKVY +r3KN1Y8Y4QkaG/Wk0UtfTVTgDut8Pk2POTtJo1Up75vnmUzQfVDnO5UrjSqz +JmrqrH7oy+4gblIsjfF/W05kJbDyc9/ki2tV0igzlb6P/xITuPkVVCgt0pg0 +NiA0GMeE/hNx32ImpLE/V97LIJoJZ6m2BwlkGaSp5y9MHWfCDrc7vwxMZDCw +78fe0WNM4I/+ed7BWgaJNq7p746yxm+KLUhxl0GZr6r1eYeYUG1Z+5M7XgaL +jaQFFt2ZMO2kFDL7QQbNL1zkjmTdN8zwwLWC32SwKm/DsrA1K59vNWRqTcqg +/V32dXkWTNgwvLfuELssGt6RjCzfxgRV30S24S2yKNSgox1PYYLbyflLHRGy ++IC0tCy/iQmbMkykx2JlcetvP4qL4v/P+/LDtSmyuK/4REeSHBPClzd3m+TJ +4v3JGytfJZmQdt5NtKZDFjOjE1at+Vn3RerLrHwZOez5lPpZ5Dfrvi+5Xhn5 +RA5L7ev9M54xYNv7zpXJFjkcIJlIuT1mgA0bp/mBHjm89q57h3wdAzztAj7A +iBxeOsWtllHJALMIhahoLnmUMV+y3XWPAYFyv+8aq8uj7C2+reMJDGj2zZpo +CpHHzI6d8lO2DDiyOBPdwqeAmScCgt+8rgLKcR+xUSEFjP35dob8qgp4xvqL +OCQUULVyr8z1lirIH2h6R1dUwOGPK5etn1TB0OM0jSqSApZ+J+6PLq6CXbGG +fTkHFHBWPNpTLq4KdIXOakeUKaC24IPLzqQqWFIXGNJ0UMRThO/byhMqgVpU +nJ2eroRMAfYNryUqYEbI0t2xURmz45xaRrPK4Fuiu+OJtSqoGnnzSsH3R2Ax +FWoxQlJFm0HBPcX1xTDuyRNUGaWGH0qnQp46PWD974uzX2jcjOkX6jJPKRWA +0CuV5NKpLSjWMdTfZXMXpC8+2k0iaeDDcbPm2JPZkKluKCDsq8nqtx/PlArc +gjaCsf5sqha6vOxsKnyeARTpxhTtd9o41kQ4XJl3Ffg5coMPntuK5zPaEpTN +U0D2rBzVWUUHkw4X3TM0uwS8m1wZdi91UN3KV6t8Yyz4S4JlUasO+mSlH59Y +iYE2PsUhjg4dHF77Ppc4HgOJv79zVXXrYFSOY/1oSwzwtwQ5iPfrYPRA6rYP +52JA6HDC3MC4Drrsjzo2u3gepMtqdb2FdFGDyCHZP3EOtGiSj0L366LOSNNl +16VoqFA69JfdXReHXO46b/kvGsjrasyTPXTxnrc5k/NDNJi8dxrO89XFYkNd +kU/V0eB4PFOw57guCsS9yN4cFg1R+eLBGnG6+FX4Tav8YhR084kZfi7RRRtH +lQ1TopFwYkioyZJND0MeannFZYRDywvXhkJ2PWz9ILbaEhkOso8KmOu49DC5 +RKda1icc2qIoxW28erjkvmsfh344KCp4pFkK66FZTKpxaW8YvPYs87VU0cPR +4s7gyyJhsPW/XRssrfWwPP3jD0JeKEzNJjpYZOphyrHkPSqLwTDYl+N4+4Ye +nqErWGz/FgxtDYy9M7f0MDbhvmpwdzDkXRh2vp6jh7zbX4eteRAMLlJEt/8K +9bDhRIH/B5dgeG4y4BPfoIfSbZJmIc+C4Gbq5lOtX/RwV2PaNcUbJ8Bc+8UN +C00iegSJtpiEBoIT9w77bm0i9t4QWVfhHQj+H1v59uoSsTnumb2efSAkJ7yK +9jIgotkyz3tPnUB49/2NT5QxEcOauu9zfzgGXtlfdascWN9bne32ag+Ac4Jr +2uUjiYg/5qe4Xx6Bx7NGfxc6ichLGNmhInoIcjqYHnteE7Ey38+Q8tcPYvL1 +2kp6ieiz2uzt/dkPLPaqX/fuI6Kib432mhI/eFNLMOj9TMQSjV811jv8YOzs +0omSOSI+e/vMYtNZXxATYI55EfTxJhcO+nP4wNIPXbun0vqo9VTvkdm4Nww+ +K6mRktPH0LP8NQZvvSEnqOBij5I+/pOr13W+5w0a79NUUFMf9wV78WRae4PJ +nWAPKdTHumNwf+GGFwRo6Pa/9tbH5eCatF4zTzi5QPhzwE8fNzK8v57Z6gmn +GzkIk/76uId6ephO8IQEp7fO6wL1UVyl9DbnpAfcjzn1wSRcHyPPjYnfTveA +L4OP+yqS9VGpUrJ95udBcEyyep/G1Mee1PBthQXusN+JuKBUy1qfYV4P91V3 +8FKSES+v18ekJvG20Ch3CKqZdOx8po8c5e0l6U7ukDKS+o67Qx9Vvun5vljv +Dm20vrehw6zxOe78qP/pBrRJrzfOvCSkiNvDXKkriNWZ59avJ+E3z7dL7Smu +MHlhS6AcPwnDuIyymgJd4Y7C9PoRIRL+ll1AIR1X+GcfYRooTcIMi5DVzRX7 +4EldanmcNgkVeVmNscEFjOMfp1Q4kJA8Evik7bsTEBxz3MScSHj5ZH/z0XYn ++KUYoxHmQsLbDv0xmo+cILfeooV+gISQequHPdQJ2KffrLb6kXCxLvrPGh4n +aHL8GTAcQcJ904lONO29sF1ZYidfLgl9J91t2a84QOXEcwWvPBIKXzttmRDm +AMrMoN+1BST80Oa8XvOgA3BadmX5FZGQ66v05dqtDtB4LO5XUyUJRa8q7fzb +bQ/0urmM8JckvFImZbpGzB5Idq+/fB8nYWryynBymR0USEUx6VMk1NhglsBz +yw5ERzQS02ZIOPTR52hmnB3MhV7UN/1NQiWH2kt/9tlB+W24eGeVhDpVO9e+ +WGsH2v891HQQMsC0pFL5Q562oBZ96VSjgQEKadtb7NuyG+qN8rmsKQao89BI +Y0h0N+xeeHLlLdUAD3HvP3JqzW44FTBf/MPYACdGOW1HynZBi6v7Z35rA/za +aaW0ILgL/AxJlvvcDXCzh/u79P6d8ODXZ6m5iwb4W7emOzXRCugly/fPJBhg +4YmLlyQOWUHPIXHS2mQDFGgkx7Rst4I/w9a7CVcN8KnNm5S7q5Zg2cWMwdsG ++DnYL974pCWMFSVNJJYZ4PzlPeQlXwvY4m34ZFO/AQrfWzRHf3O4rGjz5/yg +ARYHU+IKd5rD3CcP/S9DBvhXs9OTqGMOj10Si+58NcDA/ufnChbNwG73pwzx +CQPcxqv8jy3eDMKMYgN52cj4LPv+g+BH26FF8LXCxCYyDkdsz4gX2gaaXSOu +VmpkfMiZZ1uyZApXEv9kPNhCxqmyWu6pYVNwXavM76NNxi+bI341PTKFqeWQ +P0NkMj7mFOuqtjEFsR/Svd1WZDR+PDbASDUB78d+MZXHyQhJHnWW6sYweXQs +dHswGRPVDmyeFDaGUzJHDr8LIaMOd/CVkmWES6eP2S1GkPGuI/v72E6EUkqI +PDWOjHXX6pmXghCWGefrm26QMddyo1V+LMCVR3fmeprI+Ouixgv+n1SQPiD/ +w/MFGfNngu7JNFEhnz93YK6FjO806v+63aRC9dH8RrFOMvI1kqVOWVPho3px +iksfGUd0Pgr9KzUCtfs1Gl/Gyeh1QSBM7TwFnmS/8ZoRNcQq4jHXSEsyDFsr +HAiRMESq64vDApvJwLZ01PkvwRBj5zWKO9aSwcR2rQ2XvCEmtliyNz03gBdr +KAaSWwwRlzMHc0wNoMMji9eYbogTf1/nrpqRoF/ZvyTFxxA7mndsX/Unwt9u +xn3RQ4ZYxz7WHGlDBOkzHHdvHDbEmLkr/Yq6RNj/9lZGXqAhJhu3yPUt6cFw +bFd0dbghrqTsO/vrkh58HyXuGU42xKslnHmNFbowd391QZtpiPV7hKurZXVg +1NEsO77GEHNcdIjSPDrQx5m042udIepu3E6+ObMV6twJ19OfGuK1nfUHfjZv +hXMS+pSVVkM0slId7T6yFQQu+p9uGzTEBG6zf5rntUHD9y2bNzsFOdcn/U1c +1gBZUekHjzkpOGHnZfz8rQYINHnYSqylYDfnmVDNRxowKzud076eggrpMUOJ +HhpQ+26dqa4oBS8UVLeebVeHHWYYu6pKQVsxYSuxgi3guamI98ZOCjp1Jf2J +Pa0G4c/d/FV2U5DHSMIy2UkNUryF2svtKGhvIh73kqgG9flhie17KajZfbCn +fUIVRFR2bFw5SEFRZp+uqIcqvFAZEXEPoaBfytiN0D0qsEVNTl4li4KUz/Ly +43uVAVt6ostzKEhN9xzNMVQGR7+4z/Q8Ck4r6Fw8K6UM5+9P5O59QMFWGeXE +hk9KMKhWvym+goLjpwhfFP2VIHmzs/r4SwoWXuz+fjJOEWa2XCWVT1Pwtil5 +5POAPPR14HbhWQr+C217Kd8sD08DJvcEz1NQ/ld+e2SxPCSXWxwn/aHg0x6/ +3Iwz8rCFwlZcy2GELR5c58kK8uBhcVShScwIc0RDkrUGZeGNr/mGN1QjXHpr +WJ1HkYY63nmCPhjhOh6irbuQNOQW5W5ONzZC4o/OQNsxKQicWjFzMjPCgrpM +6L0hBXyhlWcHdxnhs/3MDTb/CGAWp7DwzcMIFf++6PnRKQnVeX8/z180Qnj3 +1Y8zTRxIpsELlglGOLoxsS43SByqPo9vyE4ywsg/WepH7cShXHbIwPKKEXYR +VJNjBcShOPNp0p2bRvhUSyblcbIYZCfGGpqXGKHlQNSQ0lVRiA/emJrZa4Rh +gXWvnWuFgUf4YsHEWyP0dLrvIXFHGOLK2OpN+oxQ4UVsx/JZYYiZnBkdHzTC +D/KZgSRLYYj0e0M1HjVC0xXOcd9BITjhev3Hf4tGOMYvO3pzrRC4bFNCI1kq +5nwKbBE+JQArb3j4m+Sp+Cohy0/HTQCyvScHLJWoGHkYN53cJgCjcTWhLmpU +JG2ZVg4QFIATrbsehelSUdRuwczYZSNcsjktW21GxUse9VuY7/ig1untMvEY +FQdfs3EWcayH/f/VttUfp+KSvxxHSd86YAvPztwWTMVtVSeIMw/XgdnNw0T7 +MCpSK+3aSc7roOfjmiNB56l4Y6e7TlU5L4x5aA2UZVCR69yRKL3jPCB19EKN +1lMqel2r/jktyQ3Jqz76CY1U/Ln2kgVjkQvYr5iVfW+mIoNT63bhey4YY3A9 +yG6lYsOdZW25dC6oZYvJFOql4gcvURcdUS5wuRYd+nuEir8iHhx4LsUJmXVh ++o/X01j1qnRN3IIdNtg4lxH4aXhdn7PdQpMdoofJmqECNPQ5aNp5V5Ad/LgW +lbeK0rD5gZVPZ/8aMNgVIpIrS8OpTQkKiwFr4N2XE7OxOjRU0xWsD7zDBqLr +jpTt3EtDhf1Fj/R1/tHzTM+ETzvTUDkh/6Hvygpd90yy6VVXGl4LqDo10bpC +t5kufdt3kIb13wvO/PJcoce9m1/yPEJDiYV7t9/cXKYv5kaZhJ+l4afkZGoy +4S+93+hqb0ERDc/wZ8nm7F6k+53Mu2VRQsMRpZ5OL5VF+u+SKu/xUho+W61v +Prq8QBdS7FvQYdCwxYW7f+eDBboVj4x0w1MaEvqmiEbcC/T6NwVevW9pmJQc +8SmwY55uyV+tGdJHQ7as5CCngnl6n3nrb4kBGs6cOzsdGT1Pn6v9edFtmIaq +CXoKF/Tn6Zo5Wx/+N0bDDN6V4bDcOXp9v3FI4gTrfdxJI5vIObqlyB7Qnqah +ScS/GDeXObrPhZOvg+dpKDZlf0JHeI4+9zTuhvgiDb+Tf++fnZqln/uT4Vn7 +h4b+aNMy1TFLFyA+0Ni/QsOlrcmOKoWz9DtHa+dXV2l4ctqvJP3CLP1/T4kh +NQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2143,299 +6828,175 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV1nk4VO8XAHDZoiL7MvYllC2MMcbMnIMiS4oQkmRPJUWEQoWSJSpLqyVU +SNYZawsqW4gWIWmhvrKGUOQ3v7/u83nufd7lvOec9yp4HLPzZmdjY3u0ho3t +/8/fQ63Nygl59DhlUgdPmw39zR2JMOO+c0C4mREEdA1A0S4Pib4rUKwe4rZM +o0LI7sL3HH25IPnYL+UlzRoEJ8WvLL0vh67j+6Xdaa7wqd7m2Nz7RjA2MTRc +NDoCZspjH2fe9wD7WLhlMOk0LL03SJt+/wV620efnJZPhCbTe3mvc2eh4Sjh +9KaxWyD9qWbUQ2MFXGzWhw9z54PIkQOFa005MIvXRt9yqRCu6JjV2TjwoILP +wZmXrqWgPeBsTvPjwUN4fbDBpxQ6Yo72qkfw4J6t4+0PA0uBu+/aT54cHlzD +Z1cUEVMKEZFfpZrGefB56bR0V1EpeLVHnzaI4UXR+o2OdkulQPKuo8lXrMON +u8b0mZfL4EPm1qczAnz4xCvv9rEH5XCjt2hjyCY+lFbjiIstLwcXftUDfwz5 +8G9u36OrdeUweF7mH7snHzKl/zZkviqH4YB1VJEqPjzysitq+0w5/Nj2jUly +5sfvrU0XVQ0qYHE641FEzkakk/vwX30F1KgLr65WbUTbI+aT4s8rINwn2Sam +bSPy/l7I2PyqApYHYiYSZzeic/rHPuLHCoj+Wi3apSiA3W3qn8aWKyCmM3/P +cLAA3jywfK6XUgkJeVFd7JKC2JHY7J9YWgmWxENCokqCOGztFX2WWQk8zXYO +qpqCqHrqaEnA40qI+bppwMpYELkaD+3S6aiE04odo9cOCSJx0/CFvd8rISBb +4p9KrSAe5a9bUpGuAttbZRpW+4QwZz5euiOqCgQ0bh7b7y2EW53XxjbGVkFn +XUz5sWNCWCbQOl6aUAWWA3vJ186zvtegV5/MqAITwj/Tj0VCeG6ETS+rpAqI +mZb7ji0L4Zytv9/xgSoQv/Y1/uptYXQMemAvqM0ACfWqmMUCYRRK8uEs12MA +oTEuan+pMDIHsqqtyAyQnd58UrVJGLfN/tbyN2bAJutA97ofwsiryL93zx4G +6HGukL7qieBJLfMn704ygHizU2cHTQSZ8abta8MZQNLN1nhoJoJfpCQ+6UQy +gOJuqhjqLIIvUm7JHY9jgHF9PN/6KBE8ekWS/1Y6A3YFi33TbRNB376E5btV +DNi9/sdQRq8IKg/PV3rXMMAut+bD8qAIWv0SOy3fwADHbteuF1Mi6DNZQj7b +zID9GndrXURFcfafZcRUDwMOf9NOPecuig+XucqjJhlwwd6C3vNbFE9HEOaD +5JlAqOwksK8Rw4j1SRwZSkwoEbZf0FkvhrsDQzjLVZjwrsetNFVODAO0b33p +0mCCsm2wou0OMXxrVqFXRGZC484s7u7rYij4NmfPZxsmOD5U/rp6VwyrFQtV +YmyZMLah8Il2iRhyNI6skbNngmBH5anLjWL4Lnb1HdWZCe6WbWM2P8XQ+MmY +iqQnE1bM5jtfUcWRW4Lw3OEkE1IKwotWzMQxEigfwkJZ83OzXdS0FUeTuayN +6WFMsH6+zjjJWxzB2H6McYYJN0zlK6yTxTGG+Cv+RiwTtO7mXz6dKY7SthVf +oi6w1suufqQ4Vxy/fXc4sj+eCf8909+0gSmOVYEDkmuSmEBGq4z2T+JYncYv +8vMqEzqyuoP+/sca78LI5itprPWuOuxWnxNH9yl6tE4GEy48dudN4JFAvaG0 +3043WPGihkRY6kjgQECEqVU2E/xv/d0bbiSBDuYz6ZU5rP39jSYWbpfAzlfx +RmJ3WfupS5jgdZFAmdMN0Y35TAgyzDnQek4CI8xNyE8KmWCZzT9nlSiBxo/O +335fxATFtacvdqZJYJpE14H/ipnQ/caxrPe+BFadHmVfKmHtN3ADx1CnBH7l +9V9oKWcC1/uwDPc+CfxbYxhWXMGEQdp39a+fJfBen6JvfCUTEtY32v+YY82/ +8C9Zm8GEHwWhBb8IkngxvnC7Zg0TnvCNUE4qS+Ke6hW3QZbTg+26FjQlkbRG +ay6mlgnbTTQXl1ESLenUG411TJB+cCMxylISxUkaj/bWM2FuI48Cu70kXraU +2THKcu7HLxZrfSWxtGQb/3QDE8K27R6KD5TEDyW5cPgxE3YXNZzYEC6JPGq2 +K59YVhNSX3v5vCTO5Ptb2DxhwuqpzJuCSZJo5rZBhcHyu09cW6+lS+JuLcc0 +8aes/DULahbLlsTiTP/rJ1h2FbGZkKqQRIGgS36iz5igF1F39k69JMbw/TDY +z/K6L2piCi8k8ciVyrw7LH/ZkV54t0sS/W/KlX1gueYRB6h8kERD530H+BtZ ++Sh2vPf+F9Z8qbfKqCz7nRnyVR+XxMCbhEIvluGb1fLDeVa8Dmy0imNZzKom +ZeuqJFLtmOk5LE+UqWyq4CFgUrDtZQbLzRLXavSFCOi3S87gOcu3otbYVEsR +WPXtlfKK5aDRgC+UTQRMnfa73cWy5c7BkAYtAoofCHZvZ1mx0mI9kgnY/rpn +4CnLSwRmVqMxAW2dewRLWe4+q0zcbkXAwOgmzuss3/uR2vLSnoBNFkuMCJYj +d626WroRkKLZusWJZUfGkZkOXwLeF03w0GJZU6Y/dtdxAjq7XXf/x4oHZ4w5 +oSecgBndu1VbWB4cqyyxjyGgXo5ATQLLFbaKpu+TCCgXQJGwYPlS9eX3zhkE +HDbSNWdj+aDcyuHBbAKqBbntKGOdDznOn+1AIQH3DanKurIsMPH+2ucKAgrd +W2pjY/n7nu2bvRoIeH2PsW0W67wf15Y3jL4gYGJzQIUBy+kK8naHuglI1J2b +bWXly7apP+EBXwn4OXFAcvD/+bXj2pZn4wTcnWeW6cZySY5mv/BvAr6uzzEa +YOWjhL27YQ2PFN6yT/rz//zd+XDpx3ohKextfUvQYvkc99VMNykpjFSNPHSV +le/j1c8XOLSk8Pe5kzetWfWgIHTgnqOBFEYrJJ3PrmbF7/Ci4wOUwvMjaXcn +mUx4KqPOsNkjhQNVimlhrPq6ei4l+PopKZRfp3vOklWPLQOblcfPSiHPmldH +A1n1ukxs6qUnSKGPzce8lDIm+Hyf1/12WwpTJ7avPnnEBIr1vhmtJil0Hl0u +7Gf1gy+iKgHNfNKYxndeiJ3VT8SPPZERF5fGIc/8L69Y/ca6xenVIXlpPKVY +r3KN1Y8Y4QkaG/Wk0UtfTVTgDut8Pk2POTtJo1Up75vnmUzQfVDnO5UrjSqz +JmrqrH7oy+4gblIsjfF/W05kJbDyc9/ki2tV0igzlb6P/xITuPkVVCgt0pg0 +NiA0GMeE/hNx32ImpLE/V97LIJoJZ6m2BwlkGaSp5y9MHWfCDrc7vwxMZDCw +78fe0WNM4I/+ed7BWgaJNq7p746yxm+KLUhxl0GZr6r1eYeYUG1Z+5M7XgaL +jaQFFt2ZMO2kFDL7QQbNL1zkjmTdN8zwwLWC32SwKm/DsrA1K59vNWRqTcqg +/V32dXkWTNgwvLfuELssGt6RjCzfxgRV30S24S2yKNSgox1PYYLbyflLHRGy ++IC0tCy/iQmbMkykx2JlcetvP4qL4v/P+/LDtSmyuK/4REeSHBPClzd3m+TJ +4v3JGytfJZmQdt5NtKZDFjOjE1at+Vn3RerLrHwZOez5lPpZ5Dfrvi+5Xhn5 +RA5L7ev9M54xYNv7zpXJFjkcIJlIuT1mgA0bp/mBHjm89q57h3wdAzztAj7A +iBxeOsWtllHJALMIhahoLnmUMV+y3XWPAYFyv+8aq8uj7C2+reMJDGj2zZpo +CpHHzI6d8lO2DDiyOBPdwqeAmScCgt+8rgLKcR+xUSEFjP35dob8qgp4xvqL +OCQUULVyr8z1lirIH2h6R1dUwOGPK5etn1TB0OM0jSqSApZ+J+6PLq6CXbGG +fTkHFHBWPNpTLq4KdIXOakeUKaC24IPLzqQqWFIXGNJ0UMRThO/byhMqgVpU +nJ2eroRMAfYNryUqYEbI0t2xURmz45xaRrPK4Fuiu+OJtSqoGnnzSsH3R2Ax +FWoxQlJFm0HBPcX1xTDuyRNUGaWGH0qnQp46PWD974uzX2jcjOkX6jJPKRWA +0CuV5NKpLSjWMdTfZXMXpC8+2k0iaeDDcbPm2JPZkKluKCDsq8nqtx/PlArc +gjaCsf5sqha6vOxsKnyeARTpxhTtd9o41kQ4XJl3Ffg5coMPntuK5zPaEpTN +U0D2rBzVWUUHkw4X3TM0uwS8m1wZdi91UN3KV6t8Yyz4S4JlUasO+mSlH59Y +iYE2PsUhjg4dHF77Ppc4HgOJv79zVXXrYFSOY/1oSwzwtwQ5iPfrYPRA6rYP +52JA6HDC3MC4Drrsjzo2u3gepMtqdb2FdFGDyCHZP3EOtGiSj0L366LOSNNl +16VoqFA69JfdXReHXO46b/kvGsjrasyTPXTxnrc5k/NDNJi8dxrO89XFYkNd +kU/V0eB4PFOw57guCsS9yN4cFg1R+eLBGnG6+FX4Tav8YhR084kZfi7RRRtH +lQ1TopFwYkioyZJND0MeannFZYRDywvXhkJ2PWz9ILbaEhkOso8KmOu49DC5 +RKda1icc2qIoxW28erjkvmsfh344KCp4pFkK66FZTKpxaW8YvPYs87VU0cPR +4s7gyyJhsPW/XRssrfWwPP3jD0JeKEzNJjpYZOphyrHkPSqLwTDYl+N4+4Ye +nqErWGz/FgxtDYy9M7f0MDbhvmpwdzDkXRh2vp6jh7zbX4eteRAMLlJEt/8K +9bDhRIH/B5dgeG4y4BPfoIfSbZJmIc+C4Gbq5lOtX/RwV2PaNcUbJ8Bc+8UN +C00iegSJtpiEBoIT9w77bm0i9t4QWVfhHQj+H1v59uoSsTnumb2efSAkJ7yK +9jIgotkyz3tPnUB49/2NT5QxEcOauu9zfzgGXtlfdascWN9bne32ag+Ac4Jr +2uUjiYg/5qe4Xx6Bx7NGfxc6ichLGNmhInoIcjqYHnteE7Ey38+Q8tcPYvL1 +2kp6ieiz2uzt/dkPLPaqX/fuI6Kib432mhI/eFNLMOj9TMQSjV811jv8YOzs +0omSOSI+e/vMYtNZXxATYI55EfTxJhcO+nP4wNIPXbun0vqo9VTvkdm4Nww+ +K6mRktPH0LP8NQZvvSEnqOBij5I+/pOr13W+5w0a79NUUFMf9wV78WRae4PJ +nWAPKdTHumNwf+GGFwRo6Pa/9tbH5eCatF4zTzi5QPhzwE8fNzK8v57Z6gmn +GzkIk/76uId6ephO8IQEp7fO6wL1UVyl9DbnpAfcjzn1wSRcHyPPjYnfTveA +L4OP+yqS9VGpUrJ95udBcEyyep/G1Mee1PBthQXusN+JuKBUy1qfYV4P91V3 +8FKSES+v18ekJvG20Ch3CKqZdOx8po8c5e0l6U7ukDKS+o67Qx9Vvun5vljv +Dm20vrehw6zxOe78qP/pBrRJrzfOvCSkiNvDXKkriNWZ59avJ+E3z7dL7Smu +MHlhS6AcPwnDuIyymgJd4Y7C9PoRIRL+ll1AIR1X+GcfYRooTcIMi5DVzRX7 +4EldanmcNgkVeVmNscEFjOMfp1Q4kJA8Evik7bsTEBxz3MScSHj5ZH/z0XYn ++KUYoxHmQsLbDv0xmo+cILfeooV+gISQequHPdQJ2KffrLb6kXCxLvrPGh4n +aHL8GTAcQcJ904lONO29sF1ZYidfLgl9J91t2a84QOXEcwWvPBIKXzttmRDm +AMrMoN+1BST80Oa8XvOgA3BadmX5FZGQ66v05dqtDtB4LO5XUyUJRa8q7fzb +bQ/0urmM8JckvFImZbpGzB5Idq+/fB8nYWryynBymR0USEUx6VMk1NhglsBz +yw5ERzQS02ZIOPTR52hmnB3MhV7UN/1NQiWH2kt/9tlB+W24eGeVhDpVO9e+ +WGsH2v891HQQMsC0pFL5Q562oBZ96VSjgQEKadtb7NuyG+qN8rmsKQao89BI +Y0h0N+xeeHLlLdUAD3HvP3JqzW44FTBf/MPYACdGOW1HynZBi6v7Z35rA/za +aaW0ILgL/AxJlvvcDXCzh/u79P6d8ODXZ6m5iwb4W7emOzXRCugly/fPJBhg +4YmLlyQOWUHPIXHS2mQDFGgkx7Rst4I/w9a7CVcN8KnNm5S7q5Zg2cWMwdsG ++DnYL974pCWMFSVNJJYZ4PzlPeQlXwvY4m34ZFO/AQrfWzRHf3O4rGjz5/yg +ARYHU+IKd5rD3CcP/S9DBvhXs9OTqGMOj10Si+58NcDA/ufnChbNwG73pwzx +CQPcxqv8jy3eDMKMYgN52cj4LPv+g+BH26FF8LXCxCYyDkdsz4gX2gaaXSOu +VmpkfMiZZ1uyZApXEv9kPNhCxqmyWu6pYVNwXavM76NNxi+bI341PTKFqeWQ +P0NkMj7mFOuqtjEFsR/Svd1WZDR+PDbASDUB78d+MZXHyQhJHnWW6sYweXQs +dHswGRPVDmyeFDaGUzJHDr8LIaMOd/CVkmWES6eP2S1GkPGuI/v72E6EUkqI +PDWOjHXX6pmXghCWGefrm26QMddyo1V+LMCVR3fmeprI+Ouixgv+n1SQPiD/ +w/MFGfNngu7JNFEhnz93YK6FjO806v+63aRC9dH8RrFOMvI1kqVOWVPho3px +iksfGUd0Pgr9KzUCtfs1Gl/Gyeh1QSBM7TwFnmS/8ZoRNcQq4jHXSEsyDFsr +HAiRMESq64vDApvJwLZ01PkvwRBj5zWKO9aSwcR2rQ2XvCEmtliyNz03gBdr +KAaSWwwRlzMHc0wNoMMji9eYbogTf1/nrpqRoF/ZvyTFxxA7mndsX/Unwt9u +xn3RQ4ZYxz7WHGlDBOkzHHdvHDbEmLkr/Yq6RNj/9lZGXqAhJhu3yPUt6cFw +bFd0dbghrqTsO/vrkh58HyXuGU42xKslnHmNFbowd391QZtpiPV7hKurZXVg +1NEsO77GEHNcdIjSPDrQx5m042udIepu3E6+ObMV6twJ19OfGuK1nfUHfjZv +hXMS+pSVVkM0slId7T6yFQQu+p9uGzTEBG6zf5rntUHD9y2bNzsFOdcn/U1c +1gBZUekHjzkpOGHnZfz8rQYINHnYSqylYDfnmVDNRxowKzud076eggrpMUOJ +HhpQ+26dqa4oBS8UVLeebVeHHWYYu6pKQVsxYSuxgi3guamI98ZOCjp1Jf2J +Pa0G4c/d/FV2U5DHSMIy2UkNUryF2svtKGhvIh73kqgG9flhie17KajZfbCn +fUIVRFR2bFw5SEFRZp+uqIcqvFAZEXEPoaBfytiN0D0qsEVNTl4li4KUz/Ly +43uVAVt6ostzKEhN9xzNMVQGR7+4z/Q8Ck4r6Fw8K6UM5+9P5O59QMFWGeXE +hk9KMKhWvym+goLjpwhfFP2VIHmzs/r4SwoWXuz+fjJOEWa2XCWVT1Pwtil5 +5POAPPR14HbhWQr+C217Kd8sD08DJvcEz1NQ/ld+e2SxPCSXWxwn/aHg0x6/ +3Iwz8rCFwlZcy2GELR5c58kK8uBhcVShScwIc0RDkrUGZeGNr/mGN1QjXHpr +WJ1HkYY63nmCPhjhOh6irbuQNOQW5W5ONzZC4o/OQNsxKQicWjFzMjPCgrpM +6L0hBXyhlWcHdxnhs/3MDTb/CGAWp7DwzcMIFf++6PnRKQnVeX8/z180Qnj3 +1Y8zTRxIpsELlglGOLoxsS43SByqPo9vyE4ywsg/WepH7cShXHbIwPKKEXYR +VJNjBcShOPNp0p2bRvhUSyblcbIYZCfGGpqXGKHlQNSQ0lVRiA/emJrZa4Rh +gXWvnWuFgUf4YsHEWyP0dLrvIXFHGOLK2OpN+oxQ4UVsx/JZYYiZnBkdHzTC +D/KZgSRLYYj0e0M1HjVC0xXOcd9BITjhev3Hf4tGOMYvO3pzrRC4bFNCI1kq +5nwKbBE+JQArb3j4m+Sp+Cohy0/HTQCyvScHLJWoGHkYN53cJgCjcTWhLmpU +JG2ZVg4QFIATrbsehelSUdRuwczYZSNcsjktW21GxUse9VuY7/ig1untMvEY +FQdfs3EWcayH/f/VttUfp+KSvxxHSd86YAvPztwWTMVtVSeIMw/XgdnNw0T7 +MCpSK+3aSc7roOfjmiNB56l4Y6e7TlU5L4x5aA2UZVCR69yRKL3jPCB19EKN +1lMqel2r/jktyQ3Jqz76CY1U/Ln2kgVjkQvYr5iVfW+mIoNT63bhey4YY3A9 +yG6lYsOdZW25dC6oZYvJFOql4gcvURcdUS5wuRYd+nuEir8iHhx4LsUJmXVh ++o/X01j1qnRN3IIdNtg4lxH4aXhdn7PdQpMdoofJmqECNPQ5aNp5V5Ad/LgW +lbeK0rD5gZVPZ/8aMNgVIpIrS8OpTQkKiwFr4N2XE7OxOjRU0xWsD7zDBqLr +jpTt3EtDhf1Fj/R1/tHzTM+ETzvTUDkh/6Hvygpd90yy6VVXGl4LqDo10bpC +t5kufdt3kIb13wvO/PJcoce9m1/yPEJDiYV7t9/cXKYv5kaZhJ+l4afkZGoy +4S+93+hqb0ERDc/wZ8nm7F6k+53Mu2VRQsMRpZ5OL5VF+u+SKu/xUho+W61v +Prq8QBdS7FvQYdCwxYW7f+eDBboVj4x0w1MaEvqmiEbcC/T6NwVevW9pmJQc +8SmwY55uyV+tGdJHQ7as5CCngnl6n3nrb4kBGs6cOzsdGT1Pn6v9edFtmIaq +CXoKF/Tn6Zo5Wx/+N0bDDN6V4bDcOXp9v3FI4gTrfdxJI5vIObqlyB7Qnqah +ScS/GDeXObrPhZOvg+dpKDZlf0JHeI4+9zTuhvgiDb+Tf++fnZqln/uT4Vn7 +h4b+aNMy1TFLFyA+0Ni/QsOlrcmOKoWz9DtHa+dXV2l4ctqvJP3CLP1/T4kh +NQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.09281632988944667}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -2447,19 +7008,19 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.09281632988944667}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2473,298 +7034,174 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV1nk4VO8XAHDZoiL7MvYllC2MMcbMnIMiS4oQkmRPJUWEQoWSJSpLqyVU +SNYZawsqW4gWIWmhvrKGUOQ3v7/u83nufd7lvOec9yp4HLPzZmdjY3u0ho3t +/8/fQ63Nygl59DhlUgdPmw39zR2JMOO+c0C4mREEdA1A0S4Pib4rUKwe4rZM +o0LI7sL3HH25IPnYL+UlzRoEJ8WvLL0vh67j+6Xdaa7wqd7m2Nz7RjA2MTRc +NDoCZspjH2fe9wD7WLhlMOk0LL03SJt+/wV620efnJZPhCbTe3mvc2eh4Sjh +9KaxWyD9qWbUQ2MFXGzWhw9z54PIkQOFa005MIvXRt9yqRCu6JjV2TjwoILP +wZmXrqWgPeBsTvPjwUN4fbDBpxQ6Yo72qkfw4J6t4+0PA0uBu+/aT54cHlzD +Z1cUEVMKEZFfpZrGefB56bR0V1EpeLVHnzaI4UXR+o2OdkulQPKuo8lXrMON +u8b0mZfL4EPm1qczAnz4xCvv9rEH5XCjt2hjyCY+lFbjiIstLwcXftUDfwz5 +8G9u36OrdeUweF7mH7snHzKl/zZkviqH4YB1VJEqPjzysitq+0w5/Nj2jUly +5sfvrU0XVQ0qYHE641FEzkakk/vwX30F1KgLr65WbUTbI+aT4s8rINwn2Sam +bSPy/l7I2PyqApYHYiYSZzeic/rHPuLHCoj+Wi3apSiA3W3qn8aWKyCmM3/P +cLAA3jywfK6XUgkJeVFd7JKC2JHY7J9YWgmWxENCokqCOGztFX2WWQk8zXYO +qpqCqHrqaEnA40qI+bppwMpYELkaD+3S6aiE04odo9cOCSJx0/CFvd8rISBb +4p9KrSAe5a9bUpGuAttbZRpW+4QwZz5euiOqCgQ0bh7b7y2EW53XxjbGVkFn +XUz5sWNCWCbQOl6aUAWWA3vJ186zvtegV5/MqAITwj/Tj0VCeG6ETS+rpAqI +mZb7ji0L4Zytv9/xgSoQv/Y1/uptYXQMemAvqM0ACfWqmMUCYRRK8uEs12MA +oTEuan+pMDIHsqqtyAyQnd58UrVJGLfN/tbyN2bAJutA97ofwsiryL93zx4G +6HGukL7qieBJLfMn704ygHizU2cHTQSZ8abta8MZQNLN1nhoJoJfpCQ+6UQy +gOJuqhjqLIIvUm7JHY9jgHF9PN/6KBE8ekWS/1Y6A3YFi33TbRNB376E5btV +DNi9/sdQRq8IKg/PV3rXMMAut+bD8qAIWv0SOy3fwADHbteuF1Mi6DNZQj7b +zID9GndrXURFcfafZcRUDwMOf9NOPecuig+XucqjJhlwwd6C3vNbFE9HEOaD +5JlAqOwksK8Rw4j1SRwZSkwoEbZf0FkvhrsDQzjLVZjwrsetNFVODAO0b33p +0mCCsm2wou0OMXxrVqFXRGZC484s7u7rYij4NmfPZxsmOD5U/rp6VwyrFQtV +YmyZMLah8Il2iRhyNI6skbNngmBH5anLjWL4Lnb1HdWZCe6WbWM2P8XQ+MmY +iqQnE1bM5jtfUcWRW4Lw3OEkE1IKwotWzMQxEigfwkJZ83OzXdS0FUeTuayN +6WFMsH6+zjjJWxzB2H6McYYJN0zlK6yTxTGG+Cv+RiwTtO7mXz6dKY7SthVf +oi6w1suufqQ4Vxy/fXc4sj+eCf8909+0gSmOVYEDkmuSmEBGq4z2T+JYncYv +8vMqEzqyuoP+/sca78LI5itprPWuOuxWnxNH9yl6tE4GEy48dudN4JFAvaG0 +3043WPGihkRY6kjgQECEqVU2E/xv/d0bbiSBDuYz6ZU5rP39jSYWbpfAzlfx +RmJ3WfupS5jgdZFAmdMN0Y35TAgyzDnQek4CI8xNyE8KmWCZzT9nlSiBxo/O +335fxATFtacvdqZJYJpE14H/ipnQ/caxrPe+BFadHmVfKmHtN3ADx1CnBH7l +9V9oKWcC1/uwDPc+CfxbYxhWXMGEQdp39a+fJfBen6JvfCUTEtY32v+YY82/ +8C9Zm8GEHwWhBb8IkngxvnC7Zg0TnvCNUE4qS+Ke6hW3QZbTg+26FjQlkbRG +ay6mlgnbTTQXl1ESLenUG411TJB+cCMxylISxUkaj/bWM2FuI48Cu70kXraU +2THKcu7HLxZrfSWxtGQb/3QDE8K27R6KD5TEDyW5cPgxE3YXNZzYEC6JPGq2 +K59YVhNSX3v5vCTO5Ptb2DxhwuqpzJuCSZJo5rZBhcHyu09cW6+lS+JuLcc0 +8aes/DULahbLlsTiTP/rJ1h2FbGZkKqQRIGgS36iz5igF1F39k69JMbw/TDY +z/K6L2piCi8k8ciVyrw7LH/ZkV54t0sS/W/KlX1gueYRB6h8kERD530H+BtZ ++Sh2vPf+F9Z8qbfKqCz7nRnyVR+XxMCbhEIvluGb1fLDeVa8Dmy0imNZzKom +ZeuqJFLtmOk5LE+UqWyq4CFgUrDtZQbLzRLXavSFCOi3S87gOcu3otbYVEsR +WPXtlfKK5aDRgC+UTQRMnfa73cWy5c7BkAYtAoofCHZvZ1mx0mI9kgnY/rpn +4CnLSwRmVqMxAW2dewRLWe4+q0zcbkXAwOgmzuss3/uR2vLSnoBNFkuMCJYj +d626WroRkKLZusWJZUfGkZkOXwLeF03w0GJZU6Y/dtdxAjq7XXf/x4oHZ4w5 +oSecgBndu1VbWB4cqyyxjyGgXo5ATQLLFbaKpu+TCCgXQJGwYPlS9eX3zhkE +HDbSNWdj+aDcyuHBbAKqBbntKGOdDznOn+1AIQH3DanKurIsMPH+2ucKAgrd +W2pjY/n7nu2bvRoIeH2PsW0W67wf15Y3jL4gYGJzQIUBy+kK8naHuglI1J2b +bWXly7apP+EBXwn4OXFAcvD/+bXj2pZn4wTcnWeW6cZySY5mv/BvAr6uzzEa +YOWjhL27YQ2PFN6yT/rz//zd+XDpx3ohKextfUvQYvkc99VMNykpjFSNPHSV +le/j1c8XOLSk8Pe5kzetWfWgIHTgnqOBFEYrJJ3PrmbF7/Ci4wOUwvMjaXcn +mUx4KqPOsNkjhQNVimlhrPq6ei4l+PopKZRfp3vOklWPLQOblcfPSiHPmldH +A1n1ukxs6qUnSKGPzce8lDIm+Hyf1/12WwpTJ7avPnnEBIr1vhmtJil0Hl0u +7Gf1gy+iKgHNfNKYxndeiJ3VT8SPPZERF5fGIc/8L69Y/ca6xenVIXlpPKVY +r3KN1Y8Y4QkaG/Wk0UtfTVTgDut8Pk2POTtJo1Up75vnmUzQfVDnO5UrjSqz +JmrqrH7oy+4gblIsjfF/W05kJbDyc9/ki2tV0igzlb6P/xITuPkVVCgt0pg0 +NiA0GMeE/hNx32ImpLE/V97LIJoJZ6m2BwlkGaSp5y9MHWfCDrc7vwxMZDCw +78fe0WNM4I/+ed7BWgaJNq7p746yxm+KLUhxl0GZr6r1eYeYUG1Z+5M7XgaL +jaQFFt2ZMO2kFDL7QQbNL1zkjmTdN8zwwLWC32SwKm/DsrA1K59vNWRqTcqg +/V32dXkWTNgwvLfuELssGt6RjCzfxgRV30S24S2yKNSgox1PYYLbyflLHRGy ++IC0tCy/iQmbMkykx2JlcetvP4qL4v/P+/LDtSmyuK/4REeSHBPClzd3m+TJ +4v3JGytfJZmQdt5NtKZDFjOjE1at+Vn3RerLrHwZOez5lPpZ5Dfrvi+5Xhn5 +RA5L7ev9M54xYNv7zpXJFjkcIJlIuT1mgA0bp/mBHjm89q57h3wdAzztAj7A +iBxeOsWtllHJALMIhahoLnmUMV+y3XWPAYFyv+8aq8uj7C2+reMJDGj2zZpo +CpHHzI6d8lO2DDiyOBPdwqeAmScCgt+8rgLKcR+xUSEFjP35dob8qgp4xvqL +OCQUULVyr8z1lirIH2h6R1dUwOGPK5etn1TB0OM0jSqSApZ+J+6PLq6CXbGG +fTkHFHBWPNpTLq4KdIXOakeUKaC24IPLzqQqWFIXGNJ0UMRThO/byhMqgVpU +nJ2eroRMAfYNryUqYEbI0t2xURmz45xaRrPK4Fuiu+OJtSqoGnnzSsH3R2Ax +FWoxQlJFm0HBPcX1xTDuyRNUGaWGH0qnQp46PWD974uzX2jcjOkX6jJPKRWA +0CuV5NKpLSjWMdTfZXMXpC8+2k0iaeDDcbPm2JPZkKluKCDsq8nqtx/PlArc +gjaCsf5sqha6vOxsKnyeARTpxhTtd9o41kQ4XJl3Ffg5coMPntuK5zPaEpTN +U0D2rBzVWUUHkw4X3TM0uwS8m1wZdi91UN3KV6t8Yyz4S4JlUasO+mSlH59Y +iYE2PsUhjg4dHF77Ppc4HgOJv79zVXXrYFSOY/1oSwzwtwQ5iPfrYPRA6rYP +52JA6HDC3MC4Drrsjzo2u3gepMtqdb2FdFGDyCHZP3EOtGiSj0L366LOSNNl +16VoqFA69JfdXReHXO46b/kvGsjrasyTPXTxnrc5k/NDNJi8dxrO89XFYkNd +kU/V0eB4PFOw57guCsS9yN4cFg1R+eLBGnG6+FX4Tav8YhR084kZfi7RRRtH +lQ1TopFwYkioyZJND0MeannFZYRDywvXhkJ2PWz9ILbaEhkOso8KmOu49DC5 +RKda1icc2qIoxW28erjkvmsfh344KCp4pFkK66FZTKpxaW8YvPYs87VU0cPR +4s7gyyJhsPW/XRssrfWwPP3jD0JeKEzNJjpYZOphyrHkPSqLwTDYl+N4+4Ye +nqErWGz/FgxtDYy9M7f0MDbhvmpwdzDkXRh2vp6jh7zbX4eteRAMLlJEt/8K +9bDhRIH/B5dgeG4y4BPfoIfSbZJmIc+C4Gbq5lOtX/RwV2PaNcUbJ8Bc+8UN +C00iegSJtpiEBoIT9w77bm0i9t4QWVfhHQj+H1v59uoSsTnumb2efSAkJ7yK +9jIgotkyz3tPnUB49/2NT5QxEcOauu9zfzgGXtlfdascWN9bne32ag+Ac4Jr +2uUjiYg/5qe4Xx6Bx7NGfxc6ichLGNmhInoIcjqYHnteE7Ey38+Q8tcPYvL1 +2kp6ieiz2uzt/dkPLPaqX/fuI6Kib432mhI/eFNLMOj9TMQSjV811jv8YOzs +0omSOSI+e/vMYtNZXxATYI55EfTxJhcO+nP4wNIPXbun0vqo9VTvkdm4Nww+ +K6mRktPH0LP8NQZvvSEnqOBij5I+/pOr13W+5w0a79NUUFMf9wV78WRae4PJ +nWAPKdTHumNwf+GGFwRo6Pa/9tbH5eCatF4zTzi5QPhzwE8fNzK8v57Z6gmn +GzkIk/76uId6ephO8IQEp7fO6wL1UVyl9DbnpAfcjzn1wSRcHyPPjYnfTveA +L4OP+yqS9VGpUrJ95udBcEyyep/G1Mee1PBthQXusN+JuKBUy1qfYV4P91V3 +8FKSES+v18ekJvG20Ch3CKqZdOx8po8c5e0l6U7ukDKS+o67Qx9Vvun5vljv +Dm20vrehw6zxOe78qP/pBrRJrzfOvCSkiNvDXKkriNWZ59avJ+E3z7dL7Smu +MHlhS6AcPwnDuIyymgJd4Y7C9PoRIRL+ll1AIR1X+GcfYRooTcIMi5DVzRX7 +4EldanmcNgkVeVmNscEFjOMfp1Q4kJA8Evik7bsTEBxz3MScSHj5ZH/z0XYn ++KUYoxHmQsLbDv0xmo+cILfeooV+gISQequHPdQJ2KffrLb6kXCxLvrPGh4n +aHL8GTAcQcJ904lONO29sF1ZYidfLgl9J91t2a84QOXEcwWvPBIKXzttmRDm +AMrMoN+1BST80Oa8XvOgA3BadmX5FZGQ66v05dqtDtB4LO5XUyUJRa8q7fzb +bQ/0urmM8JckvFImZbpGzB5Idq+/fB8nYWryynBymR0USEUx6VMk1NhglsBz +yw5ERzQS02ZIOPTR52hmnB3MhV7UN/1NQiWH2kt/9tlB+W24eGeVhDpVO9e+ +WGsH2v891HQQMsC0pFL5Q562oBZ96VSjgQEKadtb7NuyG+qN8rmsKQao89BI +Y0h0N+xeeHLlLdUAD3HvP3JqzW44FTBf/MPYACdGOW1HynZBi6v7Z35rA/za +aaW0ILgL/AxJlvvcDXCzh/u79P6d8ODXZ6m5iwb4W7emOzXRCugly/fPJBhg +4YmLlyQOWUHPIXHS2mQDFGgkx7Rst4I/w9a7CVcN8KnNm5S7q5Zg2cWMwdsG ++DnYL974pCWMFSVNJJYZ4PzlPeQlXwvY4m34ZFO/AQrfWzRHf3O4rGjz5/yg +ARYHU+IKd5rD3CcP/S9DBvhXs9OTqGMOj10Si+58NcDA/ufnChbNwG73pwzx +CQPcxqv8jy3eDMKMYgN52cj4LPv+g+BH26FF8LXCxCYyDkdsz4gX2gaaXSOu +VmpkfMiZZ1uyZApXEv9kPNhCxqmyWu6pYVNwXavM76NNxi+bI341PTKFqeWQ +P0NkMj7mFOuqtjEFsR/Svd1WZDR+PDbASDUB78d+MZXHyQhJHnWW6sYweXQs +dHswGRPVDmyeFDaGUzJHDr8LIaMOd/CVkmWES6eP2S1GkPGuI/v72E6EUkqI +PDWOjHXX6pmXghCWGefrm26QMddyo1V+LMCVR3fmeprI+Ouixgv+n1SQPiD/ +w/MFGfNngu7JNFEhnz93YK6FjO806v+63aRC9dH8RrFOMvI1kqVOWVPho3px +iksfGUd0Pgr9KzUCtfs1Gl/Gyeh1QSBM7TwFnmS/8ZoRNcQq4jHXSEsyDFsr +HAiRMESq64vDApvJwLZ01PkvwRBj5zWKO9aSwcR2rQ2XvCEmtliyNz03gBdr +KAaSWwwRlzMHc0wNoMMji9eYbogTf1/nrpqRoF/ZvyTFxxA7mndsX/Unwt9u +xn3RQ4ZYxz7WHGlDBOkzHHdvHDbEmLkr/Yq6RNj/9lZGXqAhJhu3yPUt6cFw +bFd0dbghrqTsO/vrkh58HyXuGU42xKslnHmNFbowd391QZtpiPV7hKurZXVg +1NEsO77GEHNcdIjSPDrQx5m042udIepu3E6+ObMV6twJ19OfGuK1nfUHfjZv +hXMS+pSVVkM0slId7T6yFQQu+p9uGzTEBG6zf5rntUHD9y2bNzsFOdcn/U1c +1gBZUekHjzkpOGHnZfz8rQYINHnYSqylYDfnmVDNRxowKzud076eggrpMUOJ +HhpQ+26dqa4oBS8UVLeebVeHHWYYu6pKQVsxYSuxgi3guamI98ZOCjp1Jf2J +Pa0G4c/d/FV2U5DHSMIy2UkNUryF2svtKGhvIh73kqgG9flhie17KajZfbCn +fUIVRFR2bFw5SEFRZp+uqIcqvFAZEXEPoaBfytiN0D0qsEVNTl4li4KUz/Ly +43uVAVt6ostzKEhN9xzNMVQGR7+4z/Q8Ck4r6Fw8K6UM5+9P5O59QMFWGeXE +hk9KMKhWvym+goLjpwhfFP2VIHmzs/r4SwoWXuz+fjJOEWa2XCWVT1Pwtil5 +5POAPPR14HbhWQr+C217Kd8sD08DJvcEz1NQ/ld+e2SxPCSXWxwn/aHg0x6/ +3Iwz8rCFwlZcy2GELR5c58kK8uBhcVShScwIc0RDkrUGZeGNr/mGN1QjXHpr +WJ1HkYY63nmCPhjhOh6irbuQNOQW5W5ONzZC4o/OQNsxKQicWjFzMjPCgrpM +6L0hBXyhlWcHdxnhs/3MDTb/CGAWp7DwzcMIFf++6PnRKQnVeX8/z180Qnj3 +1Y8zTRxIpsELlglGOLoxsS43SByqPo9vyE4ywsg/WepH7cShXHbIwPKKEXYR +VJNjBcShOPNp0p2bRvhUSyblcbIYZCfGGpqXGKHlQNSQ0lVRiA/emJrZa4Rh +gXWvnWuFgUf4YsHEWyP0dLrvIXFHGOLK2OpN+oxQ4UVsx/JZYYiZnBkdHzTC +D/KZgSRLYYj0e0M1HjVC0xXOcd9BITjhev3Hf4tGOMYvO3pzrRC4bFNCI1kq +5nwKbBE+JQArb3j4m+Sp+Cohy0/HTQCyvScHLJWoGHkYN53cJgCjcTWhLmpU +JG2ZVg4QFIATrbsehelSUdRuwczYZSNcsjktW21GxUse9VuY7/ig1untMvEY +FQdfs3EWcayH/f/VttUfp+KSvxxHSd86YAvPztwWTMVtVSeIMw/XgdnNw0T7 +MCpSK+3aSc7roOfjmiNB56l4Y6e7TlU5L4x5aA2UZVCR69yRKL3jPCB19EKN +1lMqel2r/jktyQ3Jqz76CY1U/Ln2kgVjkQvYr5iVfW+mIoNT63bhey4YY3A9 +yG6lYsOdZW25dC6oZYvJFOql4gcvURcdUS5wuRYd+nuEir8iHhx4LsUJmXVh ++o/X01j1qnRN3IIdNtg4lxH4aXhdn7PdQpMdoofJmqECNPQ5aNp5V5Ad/LgW +lbeK0rD5gZVPZ/8aMNgVIpIrS8OpTQkKiwFr4N2XE7OxOjRU0xWsD7zDBqLr +jpTt3EtDhf1Fj/R1/tHzTM+ETzvTUDkh/6Hvygpd90yy6VVXGl4LqDo10bpC +t5kufdt3kIb13wvO/PJcoce9m1/yPEJDiYV7t9/cXKYv5kaZhJ+l4afkZGoy +4S+93+hqb0ERDc/wZ8nm7F6k+53Mu2VRQsMRpZ5OL5VF+u+SKu/xUho+W61v +Prq8QBdS7FvQYdCwxYW7f+eDBboVj4x0w1MaEvqmiEbcC/T6NwVevW9pmJQc +8SmwY55uyV+tGdJHQ7as5CCngnl6n3nrb4kBGs6cOzsdGT1Pn6v9edFtmIaq +CXoKF/Tn6Zo5Wx/+N0bDDN6V4bDcOXp9v3FI4gTrfdxJI5vIObqlyB7Qnqah +ScS/GDeXObrPhZOvg+dpKDZlf0JHeI4+9zTuhvgiDb+Tf++fnZqln/uT4Vn7 +h4b+aNMy1TFLFyA+0Ni/QsOlrcmOKoWz9DtHa+dXV2l4ctqvJP3CLP1/T4kh +NQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.09281632988944667}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2775,6 +7212,7 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -2802,7 +7240,8 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15142054732361562`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09281632988944667}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -2810,25 +7249,1041 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.99134491550045*^9}, - CellLabel-> - "Out[418]=",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] + CellChangeTimes->{3.99134491550045*^9, 3.993829417249873*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"e6f0ea17-59b7-45dc-ac2b-fa01c0b86224"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", - RowBox[{"{", "}"}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799458254999*^9, - 3.9917994623413925`*^9}},ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-\ -b938908ab9a4"], + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0.013749"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1", ",", "0.038234"}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", "0.060049"}], "}"}], ",", + RowBox[{"{", + RowBox[{"3", ",", "0.076638"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.085764"}], "}"}], ",", + RowBox[{"{", + RowBox[{"5", ",", "0.090382"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.089758"}], "}"}], ",", + RowBox[{"{", + RowBox[{"7", ",", "0.084925"}], "}"}], ",", + RowBox[{"{", + RowBox[{"8", ",", "0.077936"}], "}"}], ",", + RowBox[{"{", + RowBox[{"9", ",", "0.069316"}], "}"}], ",", + RowBox[{"{", + RowBox[{"10", ",", "0.060067"}], "}"}], ",", + RowBox[{"{", + RowBox[{"11", ",", "0.051031"}], "}"}], ",", + RowBox[{"{", + RowBox[{"12", ",", "0.042528"}], "}"}], ",", + RowBox[{"{", + RowBox[{"13", ",", "0.034867"}], "}"}], ",", + RowBox[{"{", + RowBox[{"14", ",", "0.02819"}], "}"}], ",", + RowBox[{"{", + RowBox[{"15", ",", "0.022495"}], "}"}], ",", + RowBox[{"{", + RowBox[{"16", ",", "0.01774"}], "}"}], ",", + RowBox[{"{", + RowBox[{"17", ",", "0.013843"}], "}"}], ",", + RowBox[{"{", + RowBox[{"18", ",", "0.010692"}], "}"}], ",", + RowBox[{"{", + RowBox[{"19", ",", "0.008182"}], "}"}], ",", + RowBox[{"{", + RowBox[{"20", ",", "0.006204"}], "}"}], ",", + RowBox[{"{", + RowBox[{"21", ",", "0.004665"}], "}"}], ",", + RowBox[{"{", + RowBox[{"22", ",", "0.003479"}], "}"}], ",", + RowBox[{"{", + RowBox[{"23", ",", "0.002574"}], "}"}], ",", + RowBox[{"{", + RowBox[{"24", ",", "0.00189"}], "}"}], ",", + RowBox[{"{", + RowBox[{"25", ",", "0.001377"}], "}"}], ",", + RowBox[{"{", + RowBox[{"26", ",", "0.000997"}], "}"}], ",", + RowBox[{"{", + RowBox[{"27", ",", "0.000717"}], "}"}], ",", + RowBox[{"{", + RowBox[{"28", ",", "0.000511"}], "}"}], ",", + RowBox[{"{", + RowBox[{"29", ",", "0.000363"}], "}"}], ",", + RowBox[{"{", + RowBox[{"30", ",", "0.000256"}], "}"}]}], "}"}], "]"}]}]], "Input", + CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, + 3.9938282344653587`*^9}, + Background->RGBColor[0.4, 0.6, 1, 0.33], + CellLabel->"In[96]:=",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.090382}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829417427917*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"6ea5a15a-9916-4c6d-beb1-cd57891a5fa1"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6b0777bb-40fd-b54e-aa03-\ -b6e82cb2e939"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VO8XAHDZoiL7MvYllC2MMcbMnIMiS4oQkmRPJUWEQoWSJSpLqyVU +SNYZawsqW4gWIWmhvrKGUOQ3v7/u83nufd7lvOec9yp4HLPzZmdjY3u0ho3t +/8/fQ63Nygl59DhlUgdPmw39zR2JMOO+c0C4mREEdA1A0S4Pib4rUKwe4rZM +o0LI7sL3HH25IPnYL+UlzRoEJ8WvLL0vh67j+6Xdaa7wqd7m2Nz7RjA2MTRc +NDoCZspjH2fe9wD7WLhlMOk0LL03SJt+/wV620efnJZPhCbTe3mvc2eh4Sjh +9KaxWyD9qWbUQ2MFXGzWhw9z54PIkQOFa005MIvXRt9yqRCu6JjV2TjwoILP +wZmXrqWgPeBsTvPjwUN4fbDBpxQ6Yo72qkfw4J6t4+0PA0uBu+/aT54cHlzD +Z1cUEVMKEZFfpZrGefB56bR0V1EpeLVHnzaI4UXR+o2OdkulQPKuo8lXrMON +u8b0mZfL4EPm1qczAnz4xCvv9rEH5XCjt2hjyCY+lFbjiIstLwcXftUDfwz5 +8G9u36OrdeUweF7mH7snHzKl/zZkviqH4YB1VJEqPjzysitq+0w5/Nj2jUly +5sfvrU0XVQ0qYHE641FEzkakk/vwX30F1KgLr65WbUTbI+aT4s8rINwn2Sam +bSPy/l7I2PyqApYHYiYSZzeic/rHPuLHCoj+Wi3apSiA3W3qn8aWKyCmM3/P +cLAA3jywfK6XUgkJeVFd7JKC2JHY7J9YWgmWxENCokqCOGztFX2WWQk8zXYO +qpqCqHrqaEnA40qI+bppwMpYELkaD+3S6aiE04odo9cOCSJx0/CFvd8rISBb +4p9KrSAe5a9bUpGuAttbZRpW+4QwZz5euiOqCgQ0bh7b7y2EW53XxjbGVkFn +XUz5sWNCWCbQOl6aUAWWA3vJ186zvtegV5/MqAITwj/Tj0VCeG6ETS+rpAqI +mZb7ji0L4Zytv9/xgSoQv/Y1/uptYXQMemAvqM0ACfWqmMUCYRRK8uEs12MA +oTEuan+pMDIHsqqtyAyQnd58UrVJGLfN/tbyN2bAJutA97ofwsiryL93zx4G +6HGukL7qieBJLfMn704ygHizU2cHTQSZ8abta8MZQNLN1nhoJoJfpCQ+6UQy +gOJuqhjqLIIvUm7JHY9jgHF9PN/6KBE8ekWS/1Y6A3YFi33TbRNB376E5btV +DNi9/sdQRq8IKg/PV3rXMMAut+bD8qAIWv0SOy3fwADHbteuF1Mi6DNZQj7b +zID9GndrXURFcfafZcRUDwMOf9NOPecuig+XucqjJhlwwd6C3vNbFE9HEOaD +5JlAqOwksK8Rw4j1SRwZSkwoEbZf0FkvhrsDQzjLVZjwrsetNFVODAO0b33p +0mCCsm2wou0OMXxrVqFXRGZC484s7u7rYij4NmfPZxsmOD5U/rp6VwyrFQtV +YmyZMLah8Il2iRhyNI6skbNngmBH5anLjWL4Lnb1HdWZCe6WbWM2P8XQ+MmY +iqQnE1bM5jtfUcWRW4Lw3OEkE1IKwotWzMQxEigfwkJZ83OzXdS0FUeTuayN +6WFMsH6+zjjJWxzB2H6McYYJN0zlK6yTxTGG+Cv+RiwTtO7mXz6dKY7SthVf +oi6w1suufqQ4Vxy/fXc4sj+eCf8909+0gSmOVYEDkmuSmEBGq4z2T+JYncYv +8vMqEzqyuoP+/sca78LI5itprPWuOuxWnxNH9yl6tE4GEy48dudN4JFAvaG0 +3043WPGihkRY6kjgQECEqVU2E/xv/d0bbiSBDuYz6ZU5rP39jSYWbpfAzlfx +RmJ3WfupS5jgdZFAmdMN0Y35TAgyzDnQek4CI8xNyE8KmWCZzT9nlSiBxo/O +335fxATFtacvdqZJYJpE14H/ipnQ/caxrPe+BFadHmVfKmHtN3ADx1CnBH7l +9V9oKWcC1/uwDPc+CfxbYxhWXMGEQdp39a+fJfBen6JvfCUTEtY32v+YY82/ +8C9Zm8GEHwWhBb8IkngxvnC7Zg0TnvCNUE4qS+Ke6hW3QZbTg+26FjQlkbRG +ay6mlgnbTTQXl1ESLenUG411TJB+cCMxylISxUkaj/bWM2FuI48Cu70kXraU +2THKcu7HLxZrfSWxtGQb/3QDE8K27R6KD5TEDyW5cPgxE3YXNZzYEC6JPGq2 +K59YVhNSX3v5vCTO5Ptb2DxhwuqpzJuCSZJo5rZBhcHyu09cW6+lS+JuLcc0 +8aes/DULahbLlsTiTP/rJ1h2FbGZkKqQRIGgS36iz5igF1F39k69JMbw/TDY +z/K6L2piCi8k8ciVyrw7LH/ZkV54t0sS/W/KlX1gueYRB6h8kERD530H+BtZ ++Sh2vPf+F9Z8qbfKqCz7nRnyVR+XxMCbhEIvluGb1fLDeVa8Dmy0imNZzKom +ZeuqJFLtmOk5LE+UqWyq4CFgUrDtZQbLzRLXavSFCOi3S87gOcu3otbYVEsR +WPXtlfKK5aDRgC+UTQRMnfa73cWy5c7BkAYtAoofCHZvZ1mx0mI9kgnY/rpn +4CnLSwRmVqMxAW2dewRLWe4+q0zcbkXAwOgmzuss3/uR2vLSnoBNFkuMCJYj +d626WroRkKLZusWJZUfGkZkOXwLeF03w0GJZU6Y/dtdxAjq7XXf/x4oHZ4w5 +oSecgBndu1VbWB4cqyyxjyGgXo5ATQLLFbaKpu+TCCgXQJGwYPlS9eX3zhkE +HDbSNWdj+aDcyuHBbAKqBbntKGOdDznOn+1AIQH3DanKurIsMPH+2ucKAgrd +W2pjY/n7nu2bvRoIeH2PsW0W67wf15Y3jL4gYGJzQIUBy+kK8naHuglI1J2b +bWXly7apP+EBXwn4OXFAcvD/+bXj2pZn4wTcnWeW6cZySY5mv/BvAr6uzzEa +YOWjhL27YQ2PFN6yT/rz//zd+XDpx3ohKextfUvQYvkc99VMNykpjFSNPHSV +le/j1c8XOLSk8Pe5kzetWfWgIHTgnqOBFEYrJJ3PrmbF7/Ci4wOUwvMjaXcn +mUx4KqPOsNkjhQNVimlhrPq6ei4l+PopKZRfp3vOklWPLQOblcfPSiHPmldH +A1n1ukxs6qUnSKGPzce8lDIm+Hyf1/12WwpTJ7avPnnEBIr1vhmtJil0Hl0u +7Gf1gy+iKgHNfNKYxndeiJ3VT8SPPZERF5fGIc/8L69Y/ca6xenVIXlpPKVY +r3KN1Y8Y4QkaG/Wk0UtfTVTgDut8Pk2POTtJo1Up75vnmUzQfVDnO5UrjSqz +JmrqrH7oy+4gblIsjfF/W05kJbDyc9/ki2tV0igzlb6P/xITuPkVVCgt0pg0 +NiA0GMeE/hNx32ImpLE/V97LIJoJZ6m2BwlkGaSp5y9MHWfCDrc7vwxMZDCw +78fe0WNM4I/+ed7BWgaJNq7p746yxm+KLUhxl0GZr6r1eYeYUG1Z+5M7XgaL +jaQFFt2ZMO2kFDL7QQbNL1zkjmTdN8zwwLWC32SwKm/DsrA1K59vNWRqTcqg +/V32dXkWTNgwvLfuELssGt6RjCzfxgRV30S24S2yKNSgox1PYYLbyflLHRGy ++IC0tCy/iQmbMkykx2JlcetvP4qL4v/P+/LDtSmyuK/4REeSHBPClzd3m+TJ +4v3JGytfJZmQdt5NtKZDFjOjE1at+Vn3RerLrHwZOez5lPpZ5Dfrvi+5Xhn5 +RA5L7ev9M54xYNv7zpXJFjkcIJlIuT1mgA0bp/mBHjm89q57h3wdAzztAj7A +iBxeOsWtllHJALMIhahoLnmUMV+y3XWPAYFyv+8aq8uj7C2+reMJDGj2zZpo +CpHHzI6d8lO2DDiyOBPdwqeAmScCgt+8rgLKcR+xUSEFjP35dob8qgp4xvqL +OCQUULVyr8z1lirIH2h6R1dUwOGPK5etn1TB0OM0jSqSApZ+J+6PLq6CXbGG +fTkHFHBWPNpTLq4KdIXOakeUKaC24IPLzqQqWFIXGNJ0UMRThO/byhMqgVpU +nJ2eroRMAfYNryUqYEbI0t2xURmz45xaRrPK4Fuiu+OJtSqoGnnzSsH3R2Ax +FWoxQlJFm0HBPcX1xTDuyRNUGaWGH0qnQp46PWD974uzX2jcjOkX6jJPKRWA +0CuV5NKpLSjWMdTfZXMXpC8+2k0iaeDDcbPm2JPZkKluKCDsq8nqtx/PlArc +gjaCsf5sqha6vOxsKnyeARTpxhTtd9o41kQ4XJl3Ffg5coMPntuK5zPaEpTN +U0D2rBzVWUUHkw4X3TM0uwS8m1wZdi91UN3KV6t8Yyz4S4JlUasO+mSlH59Y +iYE2PsUhjg4dHF77Ppc4HgOJv79zVXXrYFSOY/1oSwzwtwQ5iPfrYPRA6rYP +52JA6HDC3MC4Drrsjzo2u3gepMtqdb2FdFGDyCHZP3EOtGiSj0L366LOSNNl +16VoqFA69JfdXReHXO46b/kvGsjrasyTPXTxnrc5k/NDNJi8dxrO89XFYkNd +kU/V0eB4PFOw57guCsS9yN4cFg1R+eLBGnG6+FX4Tav8YhR084kZfi7RRRtH +lQ1TopFwYkioyZJND0MeannFZYRDywvXhkJ2PWz9ILbaEhkOso8KmOu49DC5 +RKda1icc2qIoxW28erjkvmsfh344KCp4pFkK66FZTKpxaW8YvPYs87VU0cPR +4s7gyyJhsPW/XRssrfWwPP3jD0JeKEzNJjpYZOphyrHkPSqLwTDYl+N4+4Ye +nqErWGz/FgxtDYy9M7f0MDbhvmpwdzDkXRh2vp6jh7zbX4eteRAMLlJEt/8K +9bDhRIH/B5dgeG4y4BPfoIfSbZJmIc+C4Gbq5lOtX/RwV2PaNcUbJ8Bc+8UN +C00iegSJtpiEBoIT9w77bm0i9t4QWVfhHQj+H1v59uoSsTnumb2efSAkJ7yK +9jIgotkyz3tPnUB49/2NT5QxEcOauu9zfzgGXtlfdascWN9bne32ag+Ac4Jr +2uUjiYg/5qe4Xx6Bx7NGfxc6ichLGNmhInoIcjqYHnteE7Ey38+Q8tcPYvL1 +2kp6ieiz2uzt/dkPLPaqX/fuI6Kib432mhI/eFNLMOj9TMQSjV811jv8YOzs +0omSOSI+e/vMYtNZXxATYI55EfTxJhcO+nP4wNIPXbun0vqo9VTvkdm4Nww+ +K6mRktPH0LP8NQZvvSEnqOBij5I+/pOr13W+5w0a79NUUFMf9wV78WRae4PJ +nWAPKdTHumNwf+GGFwRo6Pa/9tbH5eCatF4zTzi5QPhzwE8fNzK8v57Z6gmn +GzkIk/76uId6ephO8IQEp7fO6wL1UVyl9DbnpAfcjzn1wSRcHyPPjYnfTveA +L4OP+yqS9VGpUrJ95udBcEyyep/G1Mee1PBthQXusN+JuKBUy1qfYV4P91V3 +8FKSES+v18ekJvG20Ch3CKqZdOx8po8c5e0l6U7ukDKS+o67Qx9Vvun5vljv +Dm20vrehw6zxOe78qP/pBrRJrzfOvCSkiNvDXKkriNWZ59avJ+E3z7dL7Smu +MHlhS6AcPwnDuIyymgJd4Y7C9PoRIRL+ll1AIR1X+GcfYRooTcIMi5DVzRX7 +4EldanmcNgkVeVmNscEFjOMfp1Q4kJA8Evik7bsTEBxz3MScSHj5ZH/z0XYn ++KUYoxHmQsLbDv0xmo+cILfeooV+gISQequHPdQJ2KffrLb6kXCxLvrPGh4n +aHL8GTAcQcJ904lONO29sF1ZYidfLgl9J91t2a84QOXEcwWvPBIKXzttmRDm +AMrMoN+1BST80Oa8XvOgA3BadmX5FZGQ66v05dqtDtB4LO5XUyUJRa8q7fzb +bQ/0urmM8JckvFImZbpGzB5Idq+/fB8nYWryynBymR0USEUx6VMk1NhglsBz +yw5ERzQS02ZIOPTR52hmnB3MhV7UN/1NQiWH2kt/9tlB+W24eGeVhDpVO9e+ +WGsH2v891HQQMsC0pFL5Q562oBZ96VSjgQEKadtb7NuyG+qN8rmsKQao89BI +Y0h0N+xeeHLlLdUAD3HvP3JqzW44FTBf/MPYACdGOW1HynZBi6v7Z35rA/za +aaW0ILgL/AxJlvvcDXCzh/u79P6d8ODXZ6m5iwb4W7emOzXRCugly/fPJBhg +4YmLlyQOWUHPIXHS2mQDFGgkx7Rst4I/w9a7CVcN8KnNm5S7q5Zg2cWMwdsG ++DnYL974pCWMFSVNJJYZ4PzlPeQlXwvY4m34ZFO/AQrfWzRHf3O4rGjz5/yg +ARYHU+IKd5rD3CcP/S9DBvhXs9OTqGMOj10Si+58NcDA/ufnChbNwG73pwzx +CQPcxqv8jy3eDMKMYgN52cj4LPv+g+BH26FF8LXCxCYyDkdsz4gX2gaaXSOu +VmpkfMiZZ1uyZApXEv9kPNhCxqmyWu6pYVNwXavM76NNxi+bI341PTKFqeWQ +P0NkMj7mFOuqtjEFsR/Svd1WZDR+PDbASDUB78d+MZXHyQhJHnWW6sYweXQs +dHswGRPVDmyeFDaGUzJHDr8LIaMOd/CVkmWES6eP2S1GkPGuI/v72E6EUkqI +PDWOjHXX6pmXghCWGefrm26QMddyo1V+LMCVR3fmeprI+Ouixgv+n1SQPiD/ +w/MFGfNngu7JNFEhnz93YK6FjO806v+63aRC9dH8RrFOMvI1kqVOWVPho3px +iksfGUd0Pgr9KzUCtfs1Gl/Gyeh1QSBM7TwFnmS/8ZoRNcQq4jHXSEsyDFsr +HAiRMESq64vDApvJwLZ01PkvwRBj5zWKO9aSwcR2rQ2XvCEmtliyNz03gBdr +KAaSWwwRlzMHc0wNoMMji9eYbogTf1/nrpqRoF/ZvyTFxxA7mndsX/Unwt9u +xn3RQ4ZYxz7WHGlDBOkzHHdvHDbEmLkr/Yq6RNj/9lZGXqAhJhu3yPUt6cFw +bFd0dbghrqTsO/vrkh58HyXuGU42xKslnHmNFbowd391QZtpiPV7hKurZXVg +1NEsO77GEHNcdIjSPDrQx5m042udIepu3E6+ObMV6twJ19OfGuK1nfUHfjZv +hXMS+pSVVkM0slId7T6yFQQu+p9uGzTEBG6zf5rntUHD9y2bNzsFOdcn/U1c +1gBZUekHjzkpOGHnZfz8rQYINHnYSqylYDfnmVDNRxowKzud076eggrpMUOJ +HhpQ+26dqa4oBS8UVLeebVeHHWYYu6pKQVsxYSuxgi3guamI98ZOCjp1Jf2J +Pa0G4c/d/FV2U5DHSMIy2UkNUryF2svtKGhvIh73kqgG9flhie17KajZfbCn +fUIVRFR2bFw5SEFRZp+uqIcqvFAZEXEPoaBfytiN0D0qsEVNTl4li4KUz/Ly +43uVAVt6ostzKEhN9xzNMVQGR7+4z/Q8Ck4r6Fw8K6UM5+9P5O59QMFWGeXE +hk9KMKhWvym+goLjpwhfFP2VIHmzs/r4SwoWXuz+fjJOEWa2XCWVT1Pwtil5 +5POAPPR14HbhWQr+C217Kd8sD08DJvcEz1NQ/ld+e2SxPCSXWxwn/aHg0x6/ +3Iwz8rCFwlZcy2GELR5c58kK8uBhcVShScwIc0RDkrUGZeGNr/mGN1QjXHpr +WJ1HkYY63nmCPhjhOh6irbuQNOQW5W5ONzZC4o/OQNsxKQicWjFzMjPCgrpM +6L0hBXyhlWcHdxnhs/3MDTb/CGAWp7DwzcMIFf++6PnRKQnVeX8/z180Qnj3 +1Y8zTRxIpsELlglGOLoxsS43SByqPo9vyE4ywsg/WepH7cShXHbIwPKKEXYR +VJNjBcShOPNp0p2bRvhUSyblcbIYZCfGGpqXGKHlQNSQ0lVRiA/emJrZa4Rh +gXWvnWuFgUf4YsHEWyP0dLrvIXFHGOLK2OpN+oxQ4UVsx/JZYYiZnBkdHzTC +D/KZgSRLYYj0e0M1HjVC0xXOcd9BITjhev3Hf4tGOMYvO3pzrRC4bFNCI1kq +5nwKbBE+JQArb3j4m+Sp+Cohy0/HTQCyvScHLJWoGHkYN53cJgCjcTWhLmpU +JG2ZVg4QFIATrbsehelSUdRuwczYZSNcsjktW21GxUse9VuY7/ig1untMvEY +FQdfs3EWcayH/f/VttUfp+KSvxxHSd86YAvPztwWTMVtVSeIMw/XgdnNw0T7 +MCpSK+3aSc7roOfjmiNB56l4Y6e7TlU5L4x5aA2UZVCR69yRKL3jPCB19EKN +1lMqel2r/jktyQ3Jqz76CY1U/Ln2kgVjkQvYr5iVfW+mIoNT63bhey4YY3A9 +yG6lYsOdZW25dC6oZYvJFOql4gcvURcdUS5wuRYd+nuEir8iHhx4LsUJmXVh ++o/X01j1qnRN3IIdNtg4lxH4aXhdn7PdQpMdoofJmqECNPQ5aNp5V5Ad/LgW +lbeK0rD5gZVPZ/8aMNgVIpIrS8OpTQkKiwFr4N2XE7OxOjRU0xWsD7zDBqLr +jpTt3EtDhf1Fj/R1/tHzTM+ETzvTUDkh/6Hvygpd90yy6VVXGl4LqDo10bpC +t5kufdt3kIb13wvO/PJcoce9m1/yPEJDiYV7t9/cXKYv5kaZhJ+l4afkZGoy +4S+93+hqb0ERDc/wZ8nm7F6k+53Mu2VRQsMRpZ5OL5VF+u+SKu/xUho+W61v +Prq8QBdS7FvQYdCwxYW7f+eDBboVj4x0w1MaEvqmiEbcC/T6NwVevW9pmJQc +8SmwY55uyV+tGdJHQ7as5CCngnl6n3nrb4kBGs6cOzsdGT1Pn6v9edFtmIaq +CXoKF/Tn6Zo5Wx/+N0bDDN6V4bDcOXp9v3FI4gTrfdxJI5vIObqlyB7Qnqah +ScS/GDeXObrPhZOvg+dpKDZlf0JHeI4+9zTuhvgiDb+Tf++fnZqln/uT4Vn7 +h4b+aNMy1TFLFyA+0Ni/QsOlrcmOKoWz9DtHa+dXV2l4ctqvJP3CLP1/T4kh +NQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VO8XAHDZoiL7MvYllC2MMcbMnIMiS4oQkmRPJUWEQoWSJSpLqyVU +SNYZawsqW4gWIWmhvrKGUOQ3v7/u83nufd7lvOec9yp4HLPzZmdjY3u0ho3t +/8/fQ63Nygl59DhlUgdPmw39zR2JMOO+c0C4mREEdA1A0S4Pib4rUKwe4rZM +o0LI7sL3HH25IPnYL+UlzRoEJ8WvLL0vh67j+6Xdaa7wqd7m2Nz7RjA2MTRc +NDoCZspjH2fe9wD7WLhlMOk0LL03SJt+/wV620efnJZPhCbTe3mvc2eh4Sjh +9KaxWyD9qWbUQ2MFXGzWhw9z54PIkQOFa005MIvXRt9yqRCu6JjV2TjwoILP +wZmXrqWgPeBsTvPjwUN4fbDBpxQ6Yo72qkfw4J6t4+0PA0uBu+/aT54cHlzD +Z1cUEVMKEZFfpZrGefB56bR0V1EpeLVHnzaI4UXR+o2OdkulQPKuo8lXrMON +u8b0mZfL4EPm1qczAnz4xCvv9rEH5XCjt2hjyCY+lFbjiIstLwcXftUDfwz5 +8G9u36OrdeUweF7mH7snHzKl/zZkviqH4YB1VJEqPjzysitq+0w5/Nj2jUly +5sfvrU0XVQ0qYHE641FEzkakk/vwX30F1KgLr65WbUTbI+aT4s8rINwn2Sam +bSPy/l7I2PyqApYHYiYSZzeic/rHPuLHCoj+Wi3apSiA3W3qn8aWKyCmM3/P +cLAA3jywfK6XUgkJeVFd7JKC2JHY7J9YWgmWxENCokqCOGztFX2WWQk8zXYO +qpqCqHrqaEnA40qI+bppwMpYELkaD+3S6aiE04odo9cOCSJx0/CFvd8rISBb +4p9KrSAe5a9bUpGuAttbZRpW+4QwZz5euiOqCgQ0bh7b7y2EW53XxjbGVkFn +XUz5sWNCWCbQOl6aUAWWA3vJ186zvtegV5/MqAITwj/Tj0VCeG6ETS+rpAqI +mZb7ji0L4Zytv9/xgSoQv/Y1/uptYXQMemAvqM0ACfWqmMUCYRRK8uEs12MA +oTEuan+pMDIHsqqtyAyQnd58UrVJGLfN/tbyN2bAJutA97ofwsiryL93zx4G +6HGukL7qieBJLfMn704ygHizU2cHTQSZ8abta8MZQNLN1nhoJoJfpCQ+6UQy +gOJuqhjqLIIvUm7JHY9jgHF9PN/6KBE8ekWS/1Y6A3YFi33TbRNB376E5btV +DNi9/sdQRq8IKg/PV3rXMMAut+bD8qAIWv0SOy3fwADHbteuF1Mi6DNZQj7b +zID9GndrXURFcfafZcRUDwMOf9NOPecuig+XucqjJhlwwd6C3vNbFE9HEOaD +5JlAqOwksK8Rw4j1SRwZSkwoEbZf0FkvhrsDQzjLVZjwrsetNFVODAO0b33p +0mCCsm2wou0OMXxrVqFXRGZC484s7u7rYij4NmfPZxsmOD5U/rp6VwyrFQtV +YmyZMLah8Il2iRhyNI6skbNngmBH5anLjWL4Lnb1HdWZCe6WbWM2P8XQ+MmY +iqQnE1bM5jtfUcWRW4Lw3OEkE1IKwotWzMQxEigfwkJZ83OzXdS0FUeTuayN +6WFMsH6+zjjJWxzB2H6McYYJN0zlK6yTxTGG+Cv+RiwTtO7mXz6dKY7SthVf +oi6w1suufqQ4Vxy/fXc4sj+eCf8909+0gSmOVYEDkmuSmEBGq4z2T+JYncYv +8vMqEzqyuoP+/sca78LI5itprPWuOuxWnxNH9yl6tE4GEy48dudN4JFAvaG0 +3043WPGihkRY6kjgQECEqVU2E/xv/d0bbiSBDuYz6ZU5rP39jSYWbpfAzlfx +RmJ3WfupS5jgdZFAmdMN0Y35TAgyzDnQek4CI8xNyE8KmWCZzT9nlSiBxo/O +335fxATFtacvdqZJYJpE14H/ipnQ/caxrPe+BFadHmVfKmHtN3ADx1CnBH7l +9V9oKWcC1/uwDPc+CfxbYxhWXMGEQdp39a+fJfBen6JvfCUTEtY32v+YY82/ +8C9Zm8GEHwWhBb8IkngxvnC7Zg0TnvCNUE4qS+Ke6hW3QZbTg+26FjQlkbRG +ay6mlgnbTTQXl1ESLenUG411TJB+cCMxylISxUkaj/bWM2FuI48Cu70kXraU +2THKcu7HLxZrfSWxtGQb/3QDE8K27R6KD5TEDyW5cPgxE3YXNZzYEC6JPGq2 +K59YVhNSX3v5vCTO5Ptb2DxhwuqpzJuCSZJo5rZBhcHyu09cW6+lS+JuLcc0 +8aes/DULahbLlsTiTP/rJ1h2FbGZkKqQRIGgS36iz5igF1F39k69JMbw/TDY +z/K6L2piCi8k8ciVyrw7LH/ZkV54t0sS/W/KlX1gueYRB6h8kERD530H+BtZ ++Sh2vPf+F9Z8qbfKqCz7nRnyVR+XxMCbhEIvluGb1fLDeVa8Dmy0imNZzKom +ZeuqJFLtmOk5LE+UqWyq4CFgUrDtZQbLzRLXavSFCOi3S87gOcu3otbYVEsR +WPXtlfKK5aDRgC+UTQRMnfa73cWy5c7BkAYtAoofCHZvZ1mx0mI9kgnY/rpn +4CnLSwRmVqMxAW2dewRLWe4+q0zcbkXAwOgmzuss3/uR2vLSnoBNFkuMCJYj +d626WroRkKLZusWJZUfGkZkOXwLeF03w0GJZU6Y/dtdxAjq7XXf/x4oHZ4w5 +oSecgBndu1VbWB4cqyyxjyGgXo5ATQLLFbaKpu+TCCgXQJGwYPlS9eX3zhkE +HDbSNWdj+aDcyuHBbAKqBbntKGOdDznOn+1AIQH3DanKurIsMPH+2ucKAgrd +W2pjY/n7nu2bvRoIeH2PsW0W67wf15Y3jL4gYGJzQIUBy+kK8naHuglI1J2b +bWXly7apP+EBXwn4OXFAcvD/+bXj2pZn4wTcnWeW6cZySY5mv/BvAr6uzzEa +YOWjhL27YQ2PFN6yT/rz//zd+XDpx3ohKextfUvQYvkc99VMNykpjFSNPHSV +le/j1c8XOLSk8Pe5kzetWfWgIHTgnqOBFEYrJJ3PrmbF7/Ci4wOUwvMjaXcn +mUx4KqPOsNkjhQNVimlhrPq6ei4l+PopKZRfp3vOklWPLQOblcfPSiHPmldH +A1n1ukxs6qUnSKGPzce8lDIm+Hyf1/12WwpTJ7avPnnEBIr1vhmtJil0Hl0u +7Gf1gy+iKgHNfNKYxndeiJ3VT8SPPZERF5fGIc/8L69Y/ca6xenVIXlpPKVY +r3KN1Y8Y4QkaG/Wk0UtfTVTgDut8Pk2POTtJo1Up75vnmUzQfVDnO5UrjSqz +JmrqrH7oy+4gblIsjfF/W05kJbDyc9/ki2tV0igzlb6P/xITuPkVVCgt0pg0 +NiA0GMeE/hNx32ImpLE/V97LIJoJZ6m2BwlkGaSp5y9MHWfCDrc7vwxMZDCw +78fe0WNM4I/+ed7BWgaJNq7p746yxm+KLUhxl0GZr6r1eYeYUG1Z+5M7XgaL +jaQFFt2ZMO2kFDL7QQbNL1zkjmTdN8zwwLWC32SwKm/DsrA1K59vNWRqTcqg +/V32dXkWTNgwvLfuELssGt6RjCzfxgRV30S24S2yKNSgox1PYYLbyflLHRGy ++IC0tCy/iQmbMkykx2JlcetvP4qL4v/P+/LDtSmyuK/4REeSHBPClzd3m+TJ +4v3JGytfJZmQdt5NtKZDFjOjE1at+Vn3RerLrHwZOez5lPpZ5Dfrvi+5Xhn5 +RA5L7ev9M54xYNv7zpXJFjkcIJlIuT1mgA0bp/mBHjm89q57h3wdAzztAj7A +iBxeOsWtllHJALMIhahoLnmUMV+y3XWPAYFyv+8aq8uj7C2+reMJDGj2zZpo +CpHHzI6d8lO2DDiyOBPdwqeAmScCgt+8rgLKcR+xUSEFjP35dob8qgp4xvqL +OCQUULVyr8z1lirIH2h6R1dUwOGPK5etn1TB0OM0jSqSApZ+J+6PLq6CXbGG +fTkHFHBWPNpTLq4KdIXOakeUKaC24IPLzqQqWFIXGNJ0UMRThO/byhMqgVpU +nJ2eroRMAfYNryUqYEbI0t2xURmz45xaRrPK4Fuiu+OJtSqoGnnzSsH3R2Ax +FWoxQlJFm0HBPcX1xTDuyRNUGaWGH0qnQp46PWD974uzX2jcjOkX6jJPKRWA +0CuV5NKpLSjWMdTfZXMXpC8+2k0iaeDDcbPm2JPZkKluKCDsq8nqtx/PlArc +gjaCsf5sqha6vOxsKnyeARTpxhTtd9o41kQ4XJl3Ffg5coMPntuK5zPaEpTN +U0D2rBzVWUUHkw4X3TM0uwS8m1wZdi91UN3KV6t8Yyz4S4JlUasO+mSlH59Y +iYE2PsUhjg4dHF77Ppc4HgOJv79zVXXrYFSOY/1oSwzwtwQ5iPfrYPRA6rYP +52JA6HDC3MC4Drrsjzo2u3gepMtqdb2FdFGDyCHZP3EOtGiSj0L366LOSNNl +16VoqFA69JfdXReHXO46b/kvGsjrasyTPXTxnrc5k/NDNJi8dxrO89XFYkNd +kU/V0eB4PFOw57guCsS9yN4cFg1R+eLBGnG6+FX4Tav8YhR084kZfi7RRRtH +lQ1TopFwYkioyZJND0MeannFZYRDywvXhkJ2PWz9ILbaEhkOso8KmOu49DC5 +RKda1icc2qIoxW28erjkvmsfh344KCp4pFkK66FZTKpxaW8YvPYs87VU0cPR +4s7gyyJhsPW/XRssrfWwPP3jD0JeKEzNJjpYZOphyrHkPSqLwTDYl+N4+4Ye +nqErWGz/FgxtDYy9M7f0MDbhvmpwdzDkXRh2vp6jh7zbX4eteRAMLlJEt/8K +9bDhRIH/B5dgeG4y4BPfoIfSbZJmIc+C4Gbq5lOtX/RwV2PaNcUbJ8Bc+8UN +C00iegSJtpiEBoIT9w77bm0i9t4QWVfhHQj+H1v59uoSsTnumb2efSAkJ7yK +9jIgotkyz3tPnUB49/2NT5QxEcOauu9zfzgGXtlfdascWN9bne32ag+Ac4Jr +2uUjiYg/5qe4Xx6Bx7NGfxc6ichLGNmhInoIcjqYHnteE7Ey38+Q8tcPYvL1 +2kp6ieiz2uzt/dkPLPaqX/fuI6Kib432mhI/eFNLMOj9TMQSjV811jv8YOzs +0omSOSI+e/vMYtNZXxATYI55EfTxJhcO+nP4wNIPXbun0vqo9VTvkdm4Nww+ +K6mRktPH0LP8NQZvvSEnqOBij5I+/pOr13W+5w0a79NUUFMf9wV78WRae4PJ +nWAPKdTHumNwf+GGFwRo6Pa/9tbH5eCatF4zTzi5QPhzwE8fNzK8v57Z6gmn +GzkIk/76uId6ephO8IQEp7fO6wL1UVyl9DbnpAfcjzn1wSRcHyPPjYnfTveA +L4OP+yqS9VGpUrJ95udBcEyyep/G1Mee1PBthQXusN+JuKBUy1qfYV4P91V3 +8FKSES+v18ekJvG20Ch3CKqZdOx8po8c5e0l6U7ukDKS+o67Qx9Vvun5vljv +Dm20vrehw6zxOe78qP/pBrRJrzfOvCSkiNvDXKkriNWZ59avJ+E3z7dL7Smu +MHlhS6AcPwnDuIyymgJd4Y7C9PoRIRL+ll1AIR1X+GcfYRooTcIMi5DVzRX7 +4EldanmcNgkVeVmNscEFjOMfp1Q4kJA8Evik7bsTEBxz3MScSHj5ZH/z0XYn ++KUYoxHmQsLbDv0xmo+cILfeooV+gISQequHPdQJ2KffrLb6kXCxLvrPGh4n +aHL8GTAcQcJ904lONO29sF1ZYidfLgl9J91t2a84QOXEcwWvPBIKXzttmRDm +AMrMoN+1BST80Oa8XvOgA3BadmX5FZGQ66v05dqtDtB4LO5XUyUJRa8q7fzb +bQ/0urmM8JckvFImZbpGzB5Idq+/fB8nYWryynBymR0USEUx6VMk1NhglsBz +yw5ERzQS02ZIOPTR52hmnB3MhV7UN/1NQiWH2kt/9tlB+W24eGeVhDpVO9e+ +WGsH2v891HQQMsC0pFL5Q562oBZ96VSjgQEKadtb7NuyG+qN8rmsKQao89BI +Y0h0N+xeeHLlLdUAD3HvP3JqzW44FTBf/MPYACdGOW1HynZBi6v7Z35rA/za +aaW0ILgL/AxJlvvcDXCzh/u79P6d8ODXZ6m5iwb4W7emOzXRCugly/fPJBhg +4YmLlyQOWUHPIXHS2mQDFGgkx7Rst4I/w9a7CVcN8KnNm5S7q5Zg2cWMwdsG ++DnYL974pCWMFSVNJJYZ4PzlPeQlXwvY4m34ZFO/AQrfWzRHf3O4rGjz5/yg +ARYHU+IKd5rD3CcP/S9DBvhXs9OTqGMOj10Si+58NcDA/ufnChbNwG73pwzx +CQPcxqv8jy3eDMKMYgN52cj4LPv+g+BH26FF8LXCxCYyDkdsz4gX2gaaXSOu +VmpkfMiZZ1uyZApXEv9kPNhCxqmyWu6pYVNwXavM76NNxi+bI341PTKFqeWQ +P0NkMj7mFOuqtjEFsR/Svd1WZDR+PDbASDUB78d+MZXHyQhJHnWW6sYweXQs +dHswGRPVDmyeFDaGUzJHDr8LIaMOd/CVkmWES6eP2S1GkPGuI/v72E6EUkqI +PDWOjHXX6pmXghCWGefrm26QMddyo1V+LMCVR3fmeprI+Ouixgv+n1SQPiD/ +w/MFGfNngu7JNFEhnz93YK6FjO806v+63aRC9dH8RrFOMvI1kqVOWVPho3px +iksfGUd0Pgr9KzUCtfs1Gl/Gyeh1QSBM7TwFnmS/8ZoRNcQq4jHXSEsyDFsr +HAiRMESq64vDApvJwLZ01PkvwRBj5zWKO9aSwcR2rQ2XvCEmtliyNz03gBdr +KAaSWwwRlzMHc0wNoMMji9eYbogTf1/nrpqRoF/ZvyTFxxA7mndsX/Unwt9u +xn3RQ4ZYxz7WHGlDBOkzHHdvHDbEmLkr/Yq6RNj/9lZGXqAhJhu3yPUt6cFw +bFd0dbghrqTsO/vrkh58HyXuGU42xKslnHmNFbowd391QZtpiPV7hKurZXVg +1NEsO77GEHNcdIjSPDrQx5m042udIepu3E6+ObMV6twJ19OfGuK1nfUHfjZv +hXMS+pSVVkM0slId7T6yFQQu+p9uGzTEBG6zf5rntUHD9y2bNzsFOdcn/U1c +1gBZUekHjzkpOGHnZfz8rQYINHnYSqylYDfnmVDNRxowKzud076eggrpMUOJ +HhpQ+26dqa4oBS8UVLeebVeHHWYYu6pKQVsxYSuxgi3guamI98ZOCjp1Jf2J +Pa0G4c/d/FV2U5DHSMIy2UkNUryF2svtKGhvIh73kqgG9flhie17KajZfbCn +fUIVRFR2bFw5SEFRZp+uqIcqvFAZEXEPoaBfytiN0D0qsEVNTl4li4KUz/Ly +43uVAVt6ostzKEhN9xzNMVQGR7+4z/Q8Ck4r6Fw8K6UM5+9P5O59QMFWGeXE +hk9KMKhWvym+goLjpwhfFP2VIHmzs/r4SwoWXuz+fjJOEWa2XCWVT1Pwtil5 +5POAPPR14HbhWQr+C217Kd8sD08DJvcEz1NQ/ld+e2SxPCSXWxwn/aHg0x6/ +3Iwz8rCFwlZcy2GELR5c58kK8uBhcVShScwIc0RDkrUGZeGNr/mGN1QjXHpr +WJ1HkYY63nmCPhjhOh6irbuQNOQW5W5ONzZC4o/OQNsxKQicWjFzMjPCgrpM +6L0hBXyhlWcHdxnhs/3MDTb/CGAWp7DwzcMIFf++6PnRKQnVeX8/z180Qnj3 +1Y8zTRxIpsELlglGOLoxsS43SByqPo9vyE4ywsg/WepH7cShXHbIwPKKEXYR +VJNjBcShOPNp0p2bRvhUSyblcbIYZCfGGpqXGKHlQNSQ0lVRiA/emJrZa4Rh +gXWvnWuFgUf4YsHEWyP0dLrvIXFHGOLK2OpN+oxQ4UVsx/JZYYiZnBkdHzTC +D/KZgSRLYYj0e0M1HjVC0xXOcd9BITjhev3Hf4tGOMYvO3pzrRC4bFNCI1kq +5nwKbBE+JQArb3j4m+Sp+Cohy0/HTQCyvScHLJWoGHkYN53cJgCjcTWhLmpU +JG2ZVg4QFIATrbsehelSUdRuwczYZSNcsjktW21GxUse9VuY7/ig1untMvEY +FQdfs3EWcayH/f/VttUfp+KSvxxHSd86YAvPztwWTMVtVSeIMw/XgdnNw0T7 +MCpSK+3aSc7roOfjmiNB56l4Y6e7TlU5L4x5aA2UZVCR69yRKL3jPCB19EKN +1lMqel2r/jktyQ3Jqz76CY1U/Ln2kgVjkQvYr5iVfW+mIoNT63bhey4YY3A9 +yG6lYsOdZW25dC6oZYvJFOql4gcvURcdUS5wuRYd+nuEir8iHhx4LsUJmXVh ++o/X01j1qnRN3IIdNtg4lxH4aXhdn7PdQpMdoofJmqECNPQ5aNp5V5Ad/LgW +lbeK0rD5gZVPZ/8aMNgVIpIrS8OpTQkKiwFr4N2XE7OxOjRU0xWsD7zDBqLr +jpTt3EtDhf1Fj/R1/tHzTM+ETzvTUDkh/6Hvygpd90yy6VVXGl4LqDo10bpC +t5kufdt3kIb13wvO/PJcoce9m1/yPEJDiYV7t9/cXKYv5kaZhJ+l4afkZGoy +4S+93+hqb0ERDc/wZ8nm7F6k+53Mu2VRQsMRpZ5OL5VF+u+SKu/xUho+W61v +Prq8QBdS7FvQYdCwxYW7f+eDBboVj4x0w1MaEvqmiEbcC/T6NwVevW9pmJQc +8SmwY55uyV+tGdJHQ7as5CCngnl6n3nrb4kBGs6cOzsdGT1Pn6v9edFtmIaq +CXoKF/Tn6Zo5Wx/+N0bDDN6V4bDcOXp9v3FI4gTrfdxJI5vIObqlyB7Qnqah +ScS/GDeXObrPhZOvg+dpKDZlf0JHeI4+9zTuhvgiDb+Tf++fnZqln/uT4Vn7 +h4b+aNMy1TFLFyA+0Ni/QsOlrcmOKoWz9DtHa+dXV2l4ctqvJP3CLP1/T4kh +NQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09281632988944667}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09281632988944667}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VO8XAHDZoiL7MvYllC2MMcbMnIMiS4oQkmRPJUWEQoWSJSpLqyVU +SNYZawsqW4gWIWmhvrKGUOQ3v7/u83nufd7lvOec9yp4HLPzZmdjY3u0ho3t +/8/fQ63Nygl59DhlUgdPmw39zR2JMOO+c0C4mREEdA1A0S4Pib4rUKwe4rZM +o0LI7sL3HH25IPnYL+UlzRoEJ8WvLL0vh67j+6Xdaa7wqd7m2Nz7RjA2MTRc +NDoCZspjH2fe9wD7WLhlMOk0LL03SJt+/wV620efnJZPhCbTe3mvc2eh4Sjh +9KaxWyD9qWbUQ2MFXGzWhw9z54PIkQOFa005MIvXRt9yqRCu6JjV2TjwoILP +wZmXrqWgPeBsTvPjwUN4fbDBpxQ6Yo72qkfw4J6t4+0PA0uBu+/aT54cHlzD +Z1cUEVMKEZFfpZrGefB56bR0V1EpeLVHnzaI4UXR+o2OdkulQPKuo8lXrMON +u8b0mZfL4EPm1qczAnz4xCvv9rEH5XCjt2hjyCY+lFbjiIstLwcXftUDfwz5 +8G9u36OrdeUweF7mH7snHzKl/zZkviqH4YB1VJEqPjzysitq+0w5/Nj2jUly +5sfvrU0XVQ0qYHE641FEzkakk/vwX30F1KgLr65WbUTbI+aT4s8rINwn2Sam +bSPy/l7I2PyqApYHYiYSZzeic/rHPuLHCoj+Wi3apSiA3W3qn8aWKyCmM3/P +cLAA3jywfK6XUgkJeVFd7JKC2JHY7J9YWgmWxENCokqCOGztFX2WWQk8zXYO +qpqCqHrqaEnA40qI+bppwMpYELkaD+3S6aiE04odo9cOCSJx0/CFvd8rISBb +4p9KrSAe5a9bUpGuAttbZRpW+4QwZz5euiOqCgQ0bh7b7y2EW53XxjbGVkFn +XUz5sWNCWCbQOl6aUAWWA3vJ186zvtegV5/MqAITwj/Tj0VCeG6ETS+rpAqI +mZb7ji0L4Zytv9/xgSoQv/Y1/uptYXQMemAvqM0ACfWqmMUCYRRK8uEs12MA +oTEuan+pMDIHsqqtyAyQnd58UrVJGLfN/tbyN2bAJutA97ofwsiryL93zx4G +6HGukL7qieBJLfMn704ygHizU2cHTQSZ8abta8MZQNLN1nhoJoJfpCQ+6UQy +gOJuqhjqLIIvUm7JHY9jgHF9PN/6KBE8ekWS/1Y6A3YFi33TbRNB376E5btV +DNi9/sdQRq8IKg/PV3rXMMAut+bD8qAIWv0SOy3fwADHbteuF1Mi6DNZQj7b +zID9GndrXURFcfafZcRUDwMOf9NOPecuig+XucqjJhlwwd6C3vNbFE9HEOaD +5JlAqOwksK8Rw4j1SRwZSkwoEbZf0FkvhrsDQzjLVZjwrsetNFVODAO0b33p +0mCCsm2wou0OMXxrVqFXRGZC484s7u7rYij4NmfPZxsmOD5U/rp6VwyrFQtV +YmyZMLah8Il2iRhyNI6skbNngmBH5anLjWL4Lnb1HdWZCe6WbWM2P8XQ+MmY +iqQnE1bM5jtfUcWRW4Lw3OEkE1IKwotWzMQxEigfwkJZ83OzXdS0FUeTuayN +6WFMsH6+zjjJWxzB2H6McYYJN0zlK6yTxTGG+Cv+RiwTtO7mXz6dKY7SthVf +oi6w1suufqQ4Vxy/fXc4sj+eCf8909+0gSmOVYEDkmuSmEBGq4z2T+JYncYv +8vMqEzqyuoP+/sca78LI5itprPWuOuxWnxNH9yl6tE4GEy48dudN4JFAvaG0 +3043WPGihkRY6kjgQECEqVU2E/xv/d0bbiSBDuYz6ZU5rP39jSYWbpfAzlfx +RmJ3WfupS5jgdZFAmdMN0Y35TAgyzDnQek4CI8xNyE8KmWCZzT9nlSiBxo/O +335fxATFtacvdqZJYJpE14H/ipnQ/caxrPe+BFadHmVfKmHtN3ADx1CnBH7l +9V9oKWcC1/uwDPc+CfxbYxhWXMGEQdp39a+fJfBen6JvfCUTEtY32v+YY82/ +8C9Zm8GEHwWhBb8IkngxvnC7Zg0TnvCNUE4qS+Ke6hW3QZbTg+26FjQlkbRG +ay6mlgnbTTQXl1ESLenUG411TJB+cCMxylISxUkaj/bWM2FuI48Cu70kXraU +2THKcu7HLxZrfSWxtGQb/3QDE8K27R6KD5TEDyW5cPgxE3YXNZzYEC6JPGq2 +K59YVhNSX3v5vCTO5Ptb2DxhwuqpzJuCSZJo5rZBhcHyu09cW6+lS+JuLcc0 +8aes/DULahbLlsTiTP/rJ1h2FbGZkKqQRIGgS36iz5igF1F39k69JMbw/TDY +z/K6L2piCi8k8ciVyrw7LH/ZkV54t0sS/W/KlX1gueYRB6h8kERD530H+BtZ ++Sh2vPf+F9Z8qbfKqCz7nRnyVR+XxMCbhEIvluGb1fLDeVa8Dmy0imNZzKom +ZeuqJFLtmOk5LE+UqWyq4CFgUrDtZQbLzRLXavSFCOi3S87gOcu3otbYVEsR +WPXtlfKK5aDRgC+UTQRMnfa73cWy5c7BkAYtAoofCHZvZ1mx0mI9kgnY/rpn +4CnLSwRmVqMxAW2dewRLWe4+q0zcbkXAwOgmzuss3/uR2vLSnoBNFkuMCJYj +d626WroRkKLZusWJZUfGkZkOXwLeF03w0GJZU6Y/dtdxAjq7XXf/x4oHZ4w5 +oSecgBndu1VbWB4cqyyxjyGgXo5ATQLLFbaKpu+TCCgXQJGwYPlS9eX3zhkE +HDbSNWdj+aDcyuHBbAKqBbntKGOdDznOn+1AIQH3DanKurIsMPH+2ucKAgrd +W2pjY/n7nu2bvRoIeH2PsW0W67wf15Y3jL4gYGJzQIUBy+kK8naHuglI1J2b +bWXly7apP+EBXwn4OXFAcvD/+bXj2pZn4wTcnWeW6cZySY5mv/BvAr6uzzEa +YOWjhL27YQ2PFN6yT/rz//zd+XDpx3ohKextfUvQYvkc99VMNykpjFSNPHSV +le/j1c8XOLSk8Pe5kzetWfWgIHTgnqOBFEYrJJ3PrmbF7/Ci4wOUwvMjaXcn +mUx4KqPOsNkjhQNVimlhrPq6ei4l+PopKZRfp3vOklWPLQOblcfPSiHPmldH +A1n1ukxs6qUnSKGPzce8lDIm+Hyf1/12WwpTJ7avPnnEBIr1vhmtJil0Hl0u +7Gf1gy+iKgHNfNKYxndeiJ3VT8SPPZERF5fGIc/8L69Y/ca6xenVIXlpPKVY +r3KN1Y8Y4QkaG/Wk0UtfTVTgDut8Pk2POTtJo1Up75vnmUzQfVDnO5UrjSqz +JmrqrH7oy+4gblIsjfF/W05kJbDyc9/ki2tV0igzlb6P/xITuPkVVCgt0pg0 +NiA0GMeE/hNx32ImpLE/V97LIJoJZ6m2BwlkGaSp5y9MHWfCDrc7vwxMZDCw +78fe0WNM4I/+ed7BWgaJNq7p746yxm+KLUhxl0GZr6r1eYeYUG1Z+5M7XgaL +jaQFFt2ZMO2kFDL7QQbNL1zkjmTdN8zwwLWC32SwKm/DsrA1K59vNWRqTcqg +/V32dXkWTNgwvLfuELssGt6RjCzfxgRV30S24S2yKNSgox1PYYLbyflLHRGy ++IC0tCy/iQmbMkykx2JlcetvP4qL4v/P+/LDtSmyuK/4REeSHBPClzd3m+TJ +4v3JGytfJZmQdt5NtKZDFjOjE1at+Vn3RerLrHwZOez5lPpZ5Dfrvi+5Xhn5 +RA5L7ev9M54xYNv7zpXJFjkcIJlIuT1mgA0bp/mBHjm89q57h3wdAzztAj7A +iBxeOsWtllHJALMIhahoLnmUMV+y3XWPAYFyv+8aq8uj7C2+reMJDGj2zZpo +CpHHzI6d8lO2DDiyOBPdwqeAmScCgt+8rgLKcR+xUSEFjP35dob8qgp4xvqL +OCQUULVyr8z1lirIH2h6R1dUwOGPK5etn1TB0OM0jSqSApZ+J+6PLq6CXbGG +fTkHFHBWPNpTLq4KdIXOakeUKaC24IPLzqQqWFIXGNJ0UMRThO/byhMqgVpU +nJ2eroRMAfYNryUqYEbI0t2xURmz45xaRrPK4Fuiu+OJtSqoGnnzSsH3R2Ax +FWoxQlJFm0HBPcX1xTDuyRNUGaWGH0qnQp46PWD974uzX2jcjOkX6jJPKRWA +0CuV5NKpLSjWMdTfZXMXpC8+2k0iaeDDcbPm2JPZkKluKCDsq8nqtx/PlArc +gjaCsf5sqha6vOxsKnyeARTpxhTtd9o41kQ4XJl3Ffg5coMPntuK5zPaEpTN +U0D2rBzVWUUHkw4X3TM0uwS8m1wZdi91UN3KV6t8Yyz4S4JlUasO+mSlH59Y +iYE2PsUhjg4dHF77Ppc4HgOJv79zVXXrYFSOY/1oSwzwtwQ5iPfrYPRA6rYP +52JA6HDC3MC4Drrsjzo2u3gepMtqdb2FdFGDyCHZP3EOtGiSj0L366LOSNNl +16VoqFA69JfdXReHXO46b/kvGsjrasyTPXTxnrc5k/NDNJi8dxrO89XFYkNd +kU/V0eB4PFOw57guCsS9yN4cFg1R+eLBGnG6+FX4Tav8YhR084kZfi7RRRtH +lQ1TopFwYkioyZJND0MeannFZYRDywvXhkJ2PWz9ILbaEhkOso8KmOu49DC5 +RKda1icc2qIoxW28erjkvmsfh344KCp4pFkK66FZTKpxaW8YvPYs87VU0cPR +4s7gyyJhsPW/XRssrfWwPP3jD0JeKEzNJjpYZOphyrHkPSqLwTDYl+N4+4Ye +nqErWGz/FgxtDYy9M7f0MDbhvmpwdzDkXRh2vp6jh7zbX4eteRAMLlJEt/8K +9bDhRIH/B5dgeG4y4BPfoIfSbZJmIc+C4Gbq5lOtX/RwV2PaNcUbJ8Bc+8UN +C00iegSJtpiEBoIT9w77bm0i9t4QWVfhHQj+H1v59uoSsTnumb2efSAkJ7yK +9jIgotkyz3tPnUB49/2NT5QxEcOauu9zfzgGXtlfdascWN9bne32ag+Ac4Jr +2uUjiYg/5qe4Xx6Bx7NGfxc6ichLGNmhInoIcjqYHnteE7Ey38+Q8tcPYvL1 +2kp6ieiz2uzt/dkPLPaqX/fuI6Kib432mhI/eFNLMOj9TMQSjV811jv8YOzs +0omSOSI+e/vMYtNZXxATYI55EfTxJhcO+nP4wNIPXbun0vqo9VTvkdm4Nww+ +K6mRktPH0LP8NQZvvSEnqOBij5I+/pOr13W+5w0a79NUUFMf9wV78WRae4PJ +nWAPKdTHumNwf+GGFwRo6Pa/9tbH5eCatF4zTzi5QPhzwE8fNzK8v57Z6gmn +GzkIk/76uId6ephO8IQEp7fO6wL1UVyl9DbnpAfcjzn1wSRcHyPPjYnfTveA +L4OP+yqS9VGpUrJ95udBcEyyep/G1Mee1PBthQXusN+JuKBUy1qfYV4P91V3 +8FKSES+v18ekJvG20Ch3CKqZdOx8po8c5e0l6U7ukDKS+o67Qx9Vvun5vljv +Dm20vrehw6zxOe78qP/pBrRJrzfOvCSkiNvDXKkriNWZ59avJ+E3z7dL7Smu +MHlhS6AcPwnDuIyymgJd4Y7C9PoRIRL+ll1AIR1X+GcfYRooTcIMi5DVzRX7 +4EldanmcNgkVeVmNscEFjOMfp1Q4kJA8Evik7bsTEBxz3MScSHj5ZH/z0XYn ++KUYoxHmQsLbDv0xmo+cILfeooV+gISQequHPdQJ2KffrLb6kXCxLvrPGh4n +aHL8GTAcQcJ904lONO29sF1ZYidfLgl9J91t2a84QOXEcwWvPBIKXzttmRDm +AMrMoN+1BST80Oa8XvOgA3BadmX5FZGQ66v05dqtDtB4LO5XUyUJRa8q7fzb +bQ/0urmM8JckvFImZbpGzB5Idq+/fB8nYWryynBymR0USEUx6VMk1NhglsBz +yw5ERzQS02ZIOPTR52hmnB3MhV7UN/1NQiWH2kt/9tlB+W24eGeVhDpVO9e+ +WGsH2v891HQQMsC0pFL5Q562oBZ96VSjgQEKadtb7NuyG+qN8rmsKQao89BI +Y0h0N+xeeHLlLdUAD3HvP3JqzW44FTBf/MPYACdGOW1HynZBi6v7Z35rA/za +aaW0ILgL/AxJlvvcDXCzh/u79P6d8ODXZ6m5iwb4W7emOzXRCugly/fPJBhg +4YmLlyQOWUHPIXHS2mQDFGgkx7Rst4I/w9a7CVcN8KnNm5S7q5Zg2cWMwdsG ++DnYL974pCWMFSVNJJYZ4PzlPeQlXwvY4m34ZFO/AQrfWzRHf3O4rGjz5/yg +ARYHU+IKd5rD3CcP/S9DBvhXs9OTqGMOj10Si+58NcDA/ufnChbNwG73pwzx +CQPcxqv8jy3eDMKMYgN52cj4LPv+g+BH26FF8LXCxCYyDkdsz4gX2gaaXSOu +VmpkfMiZZ1uyZApXEv9kPNhCxqmyWu6pYVNwXavM76NNxi+bI341PTKFqeWQ +P0NkMj7mFOuqtjEFsR/Svd1WZDR+PDbASDUB78d+MZXHyQhJHnWW6sYweXQs +dHswGRPVDmyeFDaGUzJHDr8LIaMOd/CVkmWES6eP2S1GkPGuI/v72E6EUkqI +PDWOjHXX6pmXghCWGefrm26QMddyo1V+LMCVR3fmeprI+Ouixgv+n1SQPiD/ +w/MFGfNngu7JNFEhnz93YK6FjO806v+63aRC9dH8RrFOMvI1kqVOWVPho3px +iksfGUd0Pgr9KzUCtfs1Gl/Gyeh1QSBM7TwFnmS/8ZoRNcQq4jHXSEsyDFsr +HAiRMESq64vDApvJwLZ01PkvwRBj5zWKO9aSwcR2rQ2XvCEmtliyNz03gBdr +KAaSWwwRlzMHc0wNoMMji9eYbogTf1/nrpqRoF/ZvyTFxxA7mndsX/Unwt9u +xn3RQ4ZYxz7WHGlDBOkzHHdvHDbEmLkr/Yq6RNj/9lZGXqAhJhu3yPUt6cFw +bFd0dbghrqTsO/vrkh58HyXuGU42xKslnHmNFbowd391QZtpiPV7hKurZXVg +1NEsO77GEHNcdIjSPDrQx5m042udIepu3E6+ObMV6twJ19OfGuK1nfUHfjZv +hXMS+pSVVkM0slId7T6yFQQu+p9uGzTEBG6zf5rntUHD9y2bNzsFOdcn/U1c +1gBZUekHjzkpOGHnZfz8rQYINHnYSqylYDfnmVDNRxowKzud076eggrpMUOJ +HhpQ+26dqa4oBS8UVLeebVeHHWYYu6pKQVsxYSuxgi3guamI98ZOCjp1Jf2J +Pa0G4c/d/FV2U5DHSMIy2UkNUryF2svtKGhvIh73kqgG9flhie17KajZfbCn +fUIVRFR2bFw5SEFRZp+uqIcqvFAZEXEPoaBfytiN0D0qsEVNTl4li4KUz/Ly +43uVAVt6ostzKEhN9xzNMVQGR7+4z/Q8Ck4r6Fw8K6UM5+9P5O59QMFWGeXE +hk9KMKhWvym+goLjpwhfFP2VIHmzs/r4SwoWXuz+fjJOEWa2XCWVT1Pwtil5 +5POAPPR14HbhWQr+C217Kd8sD08DJvcEz1NQ/ld+e2SxPCSXWxwn/aHg0x6/ +3Iwz8rCFwlZcy2GELR5c58kK8uBhcVShScwIc0RDkrUGZeGNr/mGN1QjXHpr +WJ1HkYY63nmCPhjhOh6irbuQNOQW5W5ONzZC4o/OQNsxKQicWjFzMjPCgrpM +6L0hBXyhlWcHdxnhs/3MDTb/CGAWp7DwzcMIFf++6PnRKQnVeX8/z180Qnj3 +1Y8zTRxIpsELlglGOLoxsS43SByqPo9vyE4ywsg/WepH7cShXHbIwPKKEXYR +VJNjBcShOPNp0p2bRvhUSyblcbIYZCfGGpqXGKHlQNSQ0lVRiA/emJrZa4Rh +gXWvnWuFgUf4YsHEWyP0dLrvIXFHGOLK2OpN+oxQ4UVsx/JZYYiZnBkdHzTC +D/KZgSRLYYj0e0M1HjVC0xXOcd9BITjhev3Hf4tGOMYvO3pzrRC4bFNCI1kq +5nwKbBE+JQArb3j4m+Sp+Cohy0/HTQCyvScHLJWoGHkYN53cJgCjcTWhLmpU +JG2ZVg4QFIATrbsehelSUdRuwczYZSNcsjktW21GxUse9VuY7/ig1untMvEY +FQdfs3EWcayH/f/VttUfp+KSvxxHSd86YAvPztwWTMVtVSeIMw/XgdnNw0T7 +MCpSK+3aSc7roOfjmiNB56l4Y6e7TlU5L4x5aA2UZVCR69yRKL3jPCB19EKN +1lMqel2r/jktyQ3Jqz76CY1U/Ln2kgVjkQvYr5iVfW+mIoNT63bhey4YY3A9 +yG6lYsOdZW25dC6oZYvJFOql4gcvURcdUS5wuRYd+nuEir8iHhx4LsUJmXVh ++o/X01j1qnRN3IIdNtg4lxH4aXhdn7PdQpMdoofJmqECNPQ5aNp5V5Ad/LgW +lbeK0rD5gZVPZ/8aMNgVIpIrS8OpTQkKiwFr4N2XE7OxOjRU0xWsD7zDBqLr +jpTt3EtDhf1Fj/R1/tHzTM+ETzvTUDkh/6Hvygpd90yy6VVXGl4LqDo10bpC +t5kufdt3kIb13wvO/PJcoce9m1/yPEJDiYV7t9/cXKYv5kaZhJ+l4afkZGoy +4S+93+hqb0ERDc/wZ8nm7F6k+53Mu2VRQsMRpZ5OL5VF+u+SKu/xUho+W61v +Prq8QBdS7FvQYdCwxYW7f+eDBboVj4x0w1MaEvqmiEbcC/T6NwVevW9pmJQc +8SmwY55uyV+tGdJHQ7as5CCngnl6n3nrb4kBGs6cOzsdGT1Pn6v9edFtmIaq +CXoKF/Tn6Zo5Wx/+N0bDDN6V4bDcOXp9v3FI4gTrfdxJI5vIObqlyB7Qnqah +ScS/GDeXObrPhZOvg+dpKDZlf0JHeI4+9zTuhvgiDb+Tf++fnZqln/uT4Vn7 +h4b+aNMy1TFLFyA+0Ni/QsOlrcmOKoWz9DtHa+dXV2l4ctqvJP3CLP1/T4kh +NQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09281632988944667}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09281632988944667}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993829417446856*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"82db6c04-ac18-4b30-abc2-4886ff81415a"] +}, Open ]], Cell[CellGroupData[{ @@ -2837,14 +8292,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918501819649506`*^9},ExpressionUUID->"1ec1e156-ca0f-9240-857c-\ -ac86e3a0e3fd"], + CellChangeTimes->{3.9918501819649506`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[BoxData["10.362747935330784`"], "Output", - CellChangeTimes->{3.9913453868532257`*^9}, - CellLabel-> - "Out[420]=",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[BoxData["10.094863515431287`"], "Output", + CellChangeTimes->{3.9913453868532257`*^9, 3.993829417468314*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"0b74ab5b-177f-4485-b22b-7fe45ca9e169"] }, Open ]], Cell[CellGroupData[{ @@ -2900,171 +8353,275 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850184857586*^9},ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-\ -da901e49f6f1"], + CellChangeTimes->{3.991850184857586*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 449, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387062414*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.079353408457313`*^-228\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 13, 25990557938932473318, + "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.993829417525586*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], +In[99]:=",ExpressionUUID->"4d3c632d-5460-4778-8bed-34a812011307"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 450, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387076412*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1852391941532678`*^-234\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 14, 25990557938932473318, + "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.993829417529851*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], +In[99]:=",ExpressionUUID->"fb8a6b18-6fc4-4088-97c9-eab891f85cc0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 421, 451, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387088339*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5507379966679197`*^-240\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 99, 15, 25990557938932473318, + "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.993829417533182*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], +In[99]:=",ExpressionUUID->"48dfb865-5596-4283-9ac9-cce1d4411cba"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 421, 452, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913453870973415`*^9}, +during this calculation.\"", 2, 99, 16, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.993829417536315*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], +In[99]:=",ExpressionUUID->"1355e0c0-014b-4cc8-9b27-466fb506261b"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJxN13k01N//OHBRRJI1O2PMbgnZm9frPkP2lDVJQpEoVCIkWyJJQgiJ0IYw +o5QlopUWSpZIQiWVLUsUfvM+53c+feePmfM4577u8nw97/PeUfIMsPPi5uLi +cuR8/fc72//8EelsEf6C/KuHYWKCd+RJhW7ujkHqyZ7G5EwiAonXnlLdqeib +cbLzQoYWCt5+q4un+yp69z0qsS/DCImMSabOd7GQvjBzc2mGHfpYZxMw3dWE +ervfZQhleCJT0uiHya43yCst+P3NtCNovkvv4kTXIDLZYNJJTIxBzcbXi9qv +/kISi/LbG8hpSO7j/S+eqovI8ljUFr21uUj84J5bfMY8kG0S/+KHylWUqmla +a+O4GroI80u2LtdQT5ZG46TwWsAK+v0Of7mJzhZFvuaWFoGXrr/2Xdhahiy1 +D4hKKIvAGSnHt792lqHVj+wcqWoisPXz3WAb7zJ0aojca7VZBELqtex/nCxD +J4gvvqQfEAGGUQexpbwM+edLLVFqRGB1ux1FUPg2ss2tVLXaJQr3jzk2Zrfc +RpLpQ2fSLovB49mQvhqxCiSlcufU72tisH1J7ewFqQok03Q6cneFGFy+vrFg +n3wFUpigH6M2i8HLz2+4uKgViGwd6F47IgZ7b6mfXGNYgTauXNQd2igOOvqk +6aA9FWhb0PphrRZxMPdYS0++XoG2rxnpz3wrDgUPG+5OlFQgu6v3e/72icPb +jUdytlVUIKc219dPxsXB34ziw32/Au1WLaxxkZCAGirOw2ypQH7DGy7EuEsA +ypcbWfpegeIdLPA3sxLQZ3V0slG1EslUvZLhXrEepLrTmdyalei2mMOc5pr1 +sGJ2QRXpVKLON24VFxTXQwfvlr8lWCUi2QYRbc3XQ3ITr7WtTSVq2nqFt+3S +esgRGAxo8a9Ei6Yzr14yJWGN/RXSsdJKlHItrGTRVBJWaddmMio4z/NyJajZ +SsIuPsGbvexKZP1YYPM5L0mQPjlYrFFbibKNCWzrZEm49u7jqmvPK5E+WGW2 +fuT0R+nY/uBzJTpqULDneYwUJIm9/lskw0KW+ULTVklS4GMfEpslz0JEvhMJ +ry5KgYHmCf0EAgu1dThVvr0hBVnGf9RcKSykHijI0/9KCiL2V1l0arLQyLWQ +a1My0kDZEL9HzJyFXMVtfsqypaH6tD2JdZiFNobXRufVSUOX1a56lSAWEhik +rVd6Ig2bGjYmFgSz0P1yHkTpkQb1aZfG6HAWWm91P0VjWRoKBb4Wi8dxxo8m +aW+xkoFrEfoXT2WykMn4Qpj/kAxQs7Xh/H0WCjVPZzz8IQNSrcF9cbUsdLtA +7b3YrAzA0ai+4/UsJOXgbnB/tSxslwnid3jIQj/uPZ7jUZeFVIMBpY/PWCgt +JiXo0nFZsHsQdcOcsy+f9dJJP6JlYabuVuWqHhb6q938Fj8rC+HvjMgN71nI +++uM1vBlWbBKTNpK7WchQ+tdk+rNspB4ybf8xTALDUpQ/B+tlQOB7EfEg5Ms +JBnQIC8pKQfMZc01E1MsZP3M+eUBghxsknrgFTjNQnfDzqqu2ygHPgP4Ue85 +Fkr8ODG605nz/DuvJeoiC2ndrN0/flUOtHoTrVasZqP93I6SRqVyEF7bnG7N +z0a5u8aepN+Rg5HgdOd0ATbiFVKiGD6TA1kNip30WjZ6f+T08KmfcuB4SUJu +XoSNopm2HjL68vD1zLMoYVk2MnfLm9IzkoeDxnpjhnJsJBT1PdbRWh72NFPB +Q57Tf3PctRR3eRBWbUorUGSje5Y133nPyIO40ju+SWU2ijzIF0FKkwd7CZ/r +CyQ2Mk12EDK6LA/tEoobuChs1NE+phFRKQ+SRfy/l6hsNOGsHPyrRx7sTs4d +bVVho+qwQD6RYXmgOMnsrFJlo5O59VnqY5z+555TLqmxkeDAjtoD3ApwiLg/ +zGkDG1H3J3ENMBTglcfC5BUtNhpL6LmwqK0A01nRa3w2slHVLYqyLFIAjzlz +PlVtNjIaa9ziZK8ABeTNV67rsJHbsZnEF+EKkHwsTPKQPhuRM43kRuMUoP3C +BwFxAzYnP86X8aUoQOdvrZd3OQ77S28zKlIASq10+bghG21WCPFwv60Aoxd7 +H8dtYqPV8Ggq4h7Hmz9dkmSy0cVYN4n7LxRgK2nRUx1jI9fikmudnQrQeG6P +FZtj4tPfetMDCiByLrFrI85GFQJpLhtmFMDwi0QtFbFRiOrAd+tlBfhqUMiV +wzFuoxbhy68IbqcNn/ADG7248PRKsbwilEhJF/dwnMYW12ymKsKZoaFiw81s +5PLOo2lAUxFKHQpmMjhWmrttv7RJEXzn4uPGOB6R+jssa6oIL1klWzYbsVG5 +oUWwwXZFeFv7nXSe42DXDL4dLoqwVPBRuJtjnnwNRqq/Ihz/7fnAxZiNWh5G +1JYfV4SgCR6HdI5ThlqsX8YogqvrtrxnHO9YJdU/mqQIa1oNYuc4VqB6BazO +VITtF0e/EEzY6LM5i4tSoAhzCldLTDgu9V2+YFyiCG3LeZWeHB9Nslb2uKPI +yT3urjCODW9fqjrZoAgXKyrnkjg26Xq1OPZMEUS/h9plcWzDtdJszxtFuLNh +k1oex850g5TXvYrwdF/Hvv+8186/B31WBFlpyY7/2vuHFxIrxhRBGiu3P8fx +8aJuP8JvRRhXEKgJ5/jhl9Muz7gIoF3F7N3LsWm4UmTUKgKEEL4lbOG4dV1d +ob4AAb4nK6f+t57tRU7PJoQI4LzdqXmas95O/ckfN8QIMG5D/vKQ410vz4p4 +SBFA/c32h/EcD3hQdKXlCUDIyZQy5dh7ttGlXYkA7/Zklf7lxPt74q7IMxQC +nLrFMizhOFBxtnCzCgG+Kn89YcvxDDvl2fwGAsTbVNPHOe8zzFzlZ6U2Aaab +Vk7Hcsz14bGIrwEBjnwbT1zHcdxhd10iToCwrXcvXeDkiwDvH5f3RgT4FpXy +9L98Ssm+GJlqRoA/rPPVIZx8y25uecZtS4BJvVKH//JT0dnrZ40jAfab/NSM +4uRv0Y9lkaMuBChyc9B8yMl3RnS2rsoeAhzjU/o4w9kP5RI6u4b2EoB6L6tJ +nmPtW68jc3wIYFY1tFufs39qcN8i+0ME+CQyqraFs78e7b/yszmYALKh90w2 +6rGRxV8D0RPhBNiyueeAmC4bvUrp0NWOIsDha8pRQ5z93HOfP6roDAG8dj37 +u52z/91siopckwkgz9AV/anBRsOD+HPxNAL8sK0ODubUi7E1QaJxuQRwhMIt +Npz6cjRfSA8rIABtWVA1h8FGv7Vv7popJkDoYYedb2icfHfrL/Iq58zP6rDu +X049S5g6/ly+igD6t/6q/CRy6mO82Ni7ewTIriv59YjARlIV5nqmTQSoctmn +R+bUz8smQ7uWnhDgp0Z0Y4k0Z7/3RETdbSVAiX2HjoQkG6lxs59T3hGg+MHr +8iROPWZlbB3r7yGAisXt+CwhNtJXGRHN7CeAzwqtqZg1nPrlIO/KN8LJj8lV +nWMr2ejpSHVUww8CtLa+Hzm0go2sI+yKQyYJMKES/vAJ57zYcS1+7OsCJ/6J +929yzbLQwd+TUc/WKnHuB2lKgZzzyfCw9/ovokrgWmYgov6RhVaPvi/hkVKC +8+nSdBbnvCvube7EiUpQHYBZrnrFQkEO+gddqUqww0Yjou0pCxm9LF0RpqoE +b9JiVF0452n/g4uqd3SVwMYFFyhgs1CpnkDTm01KoLfLeoNLKQuFVZzcMQFK +MOfO3/C8iHO+X90fo2KlBAQ/endzOgttizPoLtijBEQxiuO3QBZSWCo71LBP +Cc5RS3fI7uec18FEng8HlGCfDeHPlCsLJfisUZcKUgI+kaXqRDMWcvoU2awT +qgTJSUP5pkwWIrlMO9ufVIJFae/WKxos1Gj1ITY5QQnWTM1XKEmxUPIjW+nS +c0qwPMFyN13Dua9gT24/T1WC/JpNGNdSJZpXL+9ZeVkJJtvqalUGK5GWaPSG +8EoloPuHvVQrrkRcZ2ceZd1VAvydQfnT9Er0isfX5W6tEjhfjPQZia1EfjN2 +cZOPlSDlmrDZPfdKVNRN6t3/Xgn4xVUF/cQr0RHbS4FxH5VghZ7cRXGuSgQt +a3kLh5VgVje4yZBzv/xQO6vRP6YEf9uUc+YbKtD6K89OO/AQ4USl6KL63go0 +LInJHVlNBKMdEbW3LCsQK6Wy8vxaIjw9I8F7RZNz/43J7muRJEKdUOaTwT/l +KMHroNZmVSKcvdB1LpFQjuZVhPvVHIlQnh5VXqlfhmYvy0RvdCGCtep+v+jf +pWh6HZlksIcI+u8U032rS9HYLwNfkwNEyGDb37qkVYoGa/fOukQQYbK+z+SH +QglqsaoWSigmwouZoTDtjhso288NDc4QgaIu/spisBBlfvAZ/LpABFUp1Vmb +C4UofdvRuJ/LnPapJyW2QyFK3pjQ+ptfGRoyrU8eyLuKYv5U7linoAx7JVbH +j+0qQH5nVwUyTZVhc1WBaujTy8hncZ2YkZUy0GZZO0TULiPvAJm7ZtuVQV14 +a1JpWi5yt9/w185FGVqT1E5R9uUgB9mdCQf8lYEl5nSrTOwSYpaU5mdkKEO7 +n7Hox+p01EsoubIlRxnqwuejk5jpKCzjZt70FWXQv+6vXN+Uhqqjr+Xa3VSG +cvNDog/fpiIt5/wsoTrOePy9PmOrL6D2l3mZ9Y3KYP780RO77BQUaHw54+Bj +ZSgZ9uzwVEtBt9Wz01teKYNvmKgbpTIZ0Velp5z+pAwv0+TL5k+fRc/CUs/r +fFGG49q0s6KPE5H3REry8KgySJ2ye1/Em4iKes8lGU0rA3xpzzNIT0AEVnzC +Ei8J/Kq/EmR64lAD9XR82RoSXBvVqp/XikNul0+ddhUmAbuYNW2RcgrlJESf +qpEmwY72iydUHWPR+j3hUcGqJGhw2G/uzxeN7nSERpI1SXD+dyHV6kQUcrA8 +frJDhwQWZymTXSORKFXn2AktRALsq0J1VV8EWisYcHzMlgTRZl2Gs+vCUGn0 +oZDLTiS459+pKqkaiizn/IKtd5GA2+3MRw2b4yhh0Cfo1j4StP1OUfxTGIxW +3vcM9A4hQaO62++EtKOoUN0jQOIECZZ4Hn8V+XAEGRXt8X8URQL6fEHZJ5Uj +KPK860FiIgk6//45NtsdiBRW7fJrTyZBaK371jV6gagubKdvVBoJ8iRafddq +B6AFLyef/lwSZI51B+X1HUSXeh32nysggWDXBeh84If0be29mddIIMx/wH/9 +LV8UzNy+L7ucE4/HAi6j2T5oUtTS3amJBOtbCv0iBvah7oPENt+nJNDXEHE6 +8GsvanyygCJfkGAwx7Jeed1elBJWonijkwRifQGewu4e6HhH7Pm6XhIwZVV0 +WtLdkbu663LbAAlWbpRLbb66B2kMCn6cHyWBEs1cPbrJFUkxP9sITZDg7Cfd +R3SfXYgro/4BcYYE9QcSzJtkXdBrC/88q2USpATnxfKX7ED+la93XxYjg1OL +XqCxmz1yWnPjZaUUGU7ciohi7bdDuFcU9kSeDKdSFsVeh9uitdKa8uNUMrxl +qD1kxG1D00f4z/GokQGPvbJ97betqO/Fp7+SWmQYnurUOrDHGpVGpfYBkwwB +ZT5r3kdZoPT3vtaOm8mgssnfOp9hjk5oG9cdMCXD4xX8IUbDpshq5FdO6nYy +MK7kOpeeMkFaRi/WXHckw5HirqtmvsZIJrcovNaFDD/4aZNeu43Q6DbHXcP7 +yPDw5wxhhS+gNzfVWn8fIIPcVyXjLysRquHh3bQ2gAwlc5k5RdYYOlN9V0Y3 +lAwt/CFTH+QMUaDI+UTLk2Tg+xsSEluoj5z99i+4xZJh4MUZZWdMD9EUpd7H +nyODZoOWqP51bSQcOmGRm0qGz13j9reObUS/3zy7X5FJhoNXUo9IO2ihZ6dD +L/UUkGEsdLOJAK6BKgZs+ceukSHNZqbHMUUdZRkyQrlLydBx9Ii8YIMq2j/2 +3lnlLhl47wp9/ORNRzbm7Geolgx5qqd3FH+gIt2rZ/UdGskwNEQUJftSEK8T +UyqihQxd8e0PlBqV0Vi5eMKF12Q4dOvw8bx4Iurk/zlX3EGGFbYst053JXSt +/nLXq35Oex8rxtszCihZMthsaIgMB1rEDqrmyqHgwzbVcyNkOHaJIgCtMsit +lUIVHCOD76KV6TkJabSFvJxB+EUGUn3RzaJQSaQa2cWr85sM3bHjftRZCSTe +Ux5ssUgGbv7NH56cEUfDSe5OR/gokCmbK+Y/KYL8R1WJGoIUCMxsu1bZKYzm +zOZ//hSmgKdHSb5u1joUVfz4fokEBaLlv368UbAWCfCkxh2QoQB33xYHwrM1 +KN3dzZaqSIG81qOS6wUEkPwDhvxnZQqYPwnZI+G9GmmENle5q1FgQHD5Kdt7 +FarpPB+loEWB4w1dT+tXr0TG2q7WfboUqBOXeljcwM35v0OTyt5EgfqRlpNm +iSuQ0/j00A6ggJUvQ+Dcfi40YP2wXGILZ/wxDUZf6RLue+tc+FsLCvSbr3jT +X/IXj/CiiG2z58y/SOOkOe88zts81S/oTIHNI9M9m9zm8BRCw60WVwoozz3y +P902g8ucPBuc4EEBr6mhb0W7pvGi3h1Gpt4U0Jh9uo62NIWrG5CEVvpR4Nud +0Hfsu5N4dcZEz8MAChxLWxmzFDuBt9ieOYyFUiBYs/gsV8UP3KHcEfsTwZn/ +vgMwcW8U/yBI5L8fQwH+EduHuwdHcG/fsY7geAqsnmvqdWB8xSee1uRrJ1Hg +6t0jHX+TP+Nh5PiDUykUuOubL5opNIzzxNrrV1ykwPr5vu6I64P4evzHa5Ur +FLhupLdineIAnp9zL+dbIQV4Lv16+WDmA06fP7X/+g0KBJR83JrU0YuznGw3 +epVRQOCW4CPh7h6cWSW/TGRRQIa4a3hhsQt/IjLaMnCXAo8dmBOyJp349oC7 +GXm1nPgG3fjqdaMD38vYpi7zmAIPIhv5Opvb8R/xsgtdzylQ7JLUEBTShgd/ +/vr44isKbO+p6XU49QrnMq66YP+WAjZOe1+OmLzAE/Ojdot0U2AFsBdeqbXg +4kvW9Nd9FHCzsw3czXyGX94lPZP0iQKnXu+lifs/wSvWs5JWf+eMF1E0Xq/Z +jBsGnXR+Mk4BM5VSbv+Gh3hzuyXp1DTn/UkJMuv2N+LWGyQnNs9TwOF9bADL +9gHemTRUu7xIgQjVMAkKdx3uPloeX89NhaDAF2LXP9zHv5mdsA/no0Kxkcl2 +7FM1/pdb4vusMBWwkbiBWscq/LT7p7tVElRIZbKV8x6y8HUPymKOyFDh5kFb +hVNWlXiWbJiNhiIVru35ZHVlsBwnhprKjClTYX4qU2atZxle2in6pYRGBZu2 +iPf5IiW4rvbHygNqVIgKLZX59vMGbjEeYvFZlwqqrUpVs4rFuJymwunVTCqc +KlE75rG1EB878qhJZTMVCm7/+eVfUIA/rPJdtjGlgqGt/riIdD6ePivMPGJF +Bb40FcFxz8u4t3718YvbOevj4rHgbcvGDcJ237nnSIXvcqH7LgZl4YJ1PFO9 +LlTQqRHhplhn4P2LN9WX91DhXGL6jyy7dLwCbfcjelFhIX9bj+KpVDw2evb6 +Fl8qRIg9S9f7kII7NecO+wRQ4epVbfKWO8k4bZWxUlIQFR4q6t15OnUWXzD9 +trs8lAoW33Rzgg6dwV8mnM9+c5IKnln9x/UJ8Xh+i07XTCwVXtwIyPLmjcOP +CPaJSZ+hwt1eddNK2VjcxCZmOzOZCuEX8yuJrtG4ZArt3J40Kqhb8eaqJkTi +o+2vnsdkUSEL9dp75Z/A68SO8V67zIlfUe/BpwuheLKjrPHzq1Qwt+/7cetC +CO6R+TDyx3UqCBFUFfv3HMO1e/bXrSujwnJMyMFc96M4r6zQvBaLCqJv6/ri +zh/Gu12rdJyqOfHTGw1Qbw/AS/JcjoTWUeGPwOljW9oO4icHuMpzH1KhVox5 +K1XCF99OvP694QkVnGSk345k78eJ+7bShlqpcKWIujrfxQufKf61j7edCqG3 +iCvObtuLP/t6qYDeSQV964OaP4M88Gw69Fv3UsHD189iKGkPftDvi0zgABV+ +1njLb4lyxVFZ0o60z1Rwv7SRu7luJy46rpV+d5QKhbVfQho37cCHNXraesY5 ++WqwTUZ7zgG/eyRy7eI0Ffp2px3I+WaHn6kiWxIWqDBU/S1hfK0t7jrbetp4 +mQr2xzOadBpscHX9I83eK2nw65Cf+scqK5wrTIorkZ8GDVzh8diMOf629gGz +TIgG0bNxj9xDTfFri/tC28RoIPjVomXO0AQ/jtbc/SVFg4hNYc+NtI1wq+jK +qfUKNDAQZt3ndQdcoXnHBkNlGpTeGLjLcxTDJ1Yu+e2m0SDBOXpn03FDvNm0 +6EaUGg26kVP4oed6eEaC5edCLRrMBDwp/rRbB/dpmVB6qscZ/83PpMING/FN +gpluo0wanB/vV2/X18SFbLCctUY0sON+fYA2oo4PnB/q0jCjwf1oiQXGfRWc +3X5G3MGaBsuO1/cP9dLw02IatiG2NGin9rftNqfgzo6d57KdaEB1c1zrPaeM +MzJPtNTvosEjtoB58KASvthN5PvkTgO9fQNy13kIeJvMc+OV3jR4PPpJy6hE +Dr/qGhBF9aOBTK4Fn+J1aTwoT6LeMpAGPpszLtKm1uNmA7Xzh47RgHKeKR52 +ShyXIXrqXgijwYcvWmumnETxH3tXH62KpMFW4TpJwl5hfCzPpL7hFA2kwg8v +v3dci4/3RPG1nuGsL/ijQRoSwCfE6207k2mwkpRc5B/Gh09tm8/5lEaDUIoT +2C6txH8l6nz5kUUDyD0QOdLMjU8/Pqzx+zINiKsou7IeceGzXLfDeAo56wch +6JhexOY2jT4SukGDlKbjafMNC9jvYMo6mTJOPD7xX/o5MIctVHruJLNokNVf +tWPKZgb78yOvUKOaBkUvDGKo3L+wv9Ten5vqaMDHeql+7NcEtuQpqW/2kAYi +pFfrJvXHsOXL9jF2Tzjtc51Th8dGMa6e8y92t9Lg6e2SB4eWvmLc4i/WH2ij +gTK9WgDcPmMrt632CHpHg+/nuUOXVw1hqxJNSiLf0+CFy+Vl2tgAxvs4aibx +Iw1edY46Lyj2Y6u56lHGMA3OrrIo7ml5jwlsmj9T8I2Tn8xapXVvurA1wTod +pWM0kO+tFOhWeYcJVh5WuPeLBozRSaGjr99gQj/KfJp/0+DjeFcc7502TJg6 +ynq1SINCKeWtoiUvMRFPymIPNx12BvivdnFswUQve5p95qODh5qWxqXdTzHx +7rwLE4J0kD222pZ9/xEmIdbb+0eEDgm7LtbnuDdh620kKXySdGjSn3piYNmI +SZ2xDxSVo0OPe/GhK/11mPSj8zXySnSwAqPzz1LvYzLLrSvpFDrslaHXuBbf +xeQMV2/TVqGD6+BE4irBKkz+mMklpEGH5ETy1fj6SkyhImrIUocOZ2xNzSz3 +lmOE73VqToZ0+HXyszdvUwmmRJkP8UB0WI++WpASb2BED52mgyZ0OB4ToTFR +XoyRcg8LHregg2iKS8ofWiFG6SpzirWhA0933tWF7/kYVXQ0P9meDrmnRxYt +P13GaFsp3y8500FvJbtdf082xkjw1CneTYdDf/vmL5tkYqrNeZEVnnQw+aM4 +0hqXjqktvX9eu58OeRtzjrhJpWLqBpLiTw/S4Y2b7U6NL+cxjSB7tzeHOfEJ +9Fw+JZuEaZWfv/EhmA6V8TeNiU0J2MbR1qmRcM56Do8ri7yMw7TJq7HpKDp8 +fUhMe6URi+m6m8Qvx9EhaJ/kfeJQFKaXE9UucJYOb/nbZObvRGD6nXWy61Po +YPHsM+sqIQwzFJn3UrpIh6e5pkeW54KxTdY6FaqcIlxhkhHqtyEIY8YfXtC7 +QgcdE1Y5u/YwhjeVmRgX0YFlYGrcQw7A0OK3ZJubdIglVdfkOPthoE/p2Xmb +DgF8/DlELh/M6KinshebDqEjFnalQl6Y8e28Q4H36FDDl8gQOu6JmXx7Xx1e +z1lP8e3NpzXdMVOSJHd8Ex2+7DugSd7rin3zNLux6SkdJj26bfZI7cSSCkJs +JlrpMH/YQKBazQnTGLg+XdRGhxNJNmn7s+yxtwrd2Tvf0aFx/Yh6r40tFrx7 +9Wah93Q494mXIHHBBpPJ1f/a1E+H+BOzxg1/LLH69z7nQoboMF2k/ka3zQxz +l760UXWEDpecn2yL4N6C8Tg/7xn4QQfLhtfL3+KNsGsZ85EXJzn5MpObuXIH +YBbv6BTLWc549ND+p6+Y2A8xlxdLC5z57IZ4wl4D7Lxd4hH2Mic/vh51bN+t +i2ldqJHyWcmAZEvrp+vZG7HO16MP5PgZcEww3i/aWRMLFZL1al/LgKkhNe/8 +M+qY3FarNadFGaCud7Tq8kcG1ng2vNJQkgE6Z3f/CiiiYntbSnaMyzKAUlZ+ +T7uVhPHy9y0WEhicevwyMsaciN00EyxyJjMgfErdAxclYNanmZZrGQx4SKR+ ++oHLYeOPDk48VGdAyOn42Kg2KSyV53JG8EYGXLEgGOm2SmA6Ri+ZKvoMiC0e +0SwhimHdUYuDH5kM6HhEf/O9VRg70aB2Jn0zA4InzY+kh63FFJd2b7AwZQDb +I7PncB8/1sRMfrdoyYCMUavn9rd5Me/wB+GsbQwwe9obOTjIg/HXjCntd2CA +lN2G807+K7DS3wrPZHcyIPpF2ImLSUvMbXrb/Nt2M0AO1zahNC8wp45Fisd5 +MiCnmVWlGTjHzKgqrzHYz4BXASE9R+OmmQa/PrqP+THg+4P59J2zk8w+TWG+ +wkAGVJq92ZkbMM6MCoSyHccYsOLza0P5qO9M5fJAe8EwBhB8KTIr144wn/zM +n288yXk+90eOGt9n5gHV9ivHYhkwFHnvtanHIFPQb4UpI4Ezf2Eu/4x1A8zy +m5o/+pMYQMz36sta18e0G/FITbvAAMB3ht6O7mbOUFL1zTMYMLhwqjvc6x0z +y6up/282A1ZJiBUulr5hMoumTlVeYcCHupuCw1ZtzI+DRBXvIgZse9F3pt7/ +BZPiHhvyuozzPl6qqp7Me8w8+GGoWb+aASNSdmvi/BqZ6+TEfX/WMqCGepJy +K6eOyXIxEb7ayABfnnWJ8qP3mL+7ilzXtDBg4r7Cl4BPLGbO+nfcja8YsKwj +M9d/qIKJO666GfSWAf60rv74i6XMuDdeMx/6GHDTRH9+LreYKfqSklwxzoA0 +p32iZwuymEvjGsUt0wz42za4sUXpInNUdFPd8DwDNKezvR8ppjKbnLeNSq1U +ATEeO2/VwkTm0eEQ02gpFcg8O1C04cYJZsefZ0u2m1VgRW8AM8TenZnJ8Av4 +laoCLV+ygxe/KTPlEsq36+qqgsndY0XXla5vylIxEBbbrwYx7cKVMdW3DFtk +Nuv8uqAOi++vU1KmLxkYyjWlbOjcAEYX5cSzrzrpC/FcDfKI0QAfk7/TKcPC +egrRisydFE1QF9pp/peWpsNPdr1r91QTGgfdY+h7ubXVMenykN1a4GNPTmg+ +HKR1pF+02ZJrI0znOdV4bS/VGP+V5GiRtRFMI9YrhO8dVTfb8CTbQk0bRMz2 +mmvKyak9+LXpz9wrbRgn+z6UyRdS8VfVet/upQN61WvrYsTX0rGxfR07+XWB +a9eLiFWfn1K2kKS2rr2qC8KkCtUn59NItKjE4016evC77x633UcHIsPLoIH8 +Xg+G22OuVqW/VvR64HOq6rA+iMQUSJ7SdpNvyO/YNylhAL3Hc+mqTgUy0zeW +5zZUGwDX///sJZfwZ281/J8nGWm6rIl/vlf059NMwqb/2cVEGTYpMP9n2UPx +99Ub/1lC4GDl1h3Y/1xkHBE2sfOftSKSjdNc/9lmouJdt8c/n+6cmd978J9/ +X400Cov+5/eb0t5eK/lnn2NFuRa3/3n29h2vHxX/LErsntO8+89Wq+Xl6hv/ +ua7j2r637/7ZUuieWnD3P3ebPZ+V6v3n6ZrvCW4D/6xWoFH2bfT/9Pd+c3DS +z//Tn7g92jDxz97xx9qDZv5Pf42nsyV//3PMQubemoV/Fta+qbp78Z/zDtXM +LC//8/8Dw8wefg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -3078,130 +8635,228 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJxN13k01N//OHBRRJI1O2PMbgnZm9frPkP2lDVJQpEoVCIkWyJJQgiJ0IYw +o5QlopUWSpZIQiWVLUsUfvM+53c+feePmfM4577u8nw97/PeUfIMsPPi5uLi +cuR8/fc72//8EelsEf6C/KuHYWKCd+RJhW7ujkHqyZ7G5EwiAonXnlLdqeib +cbLzQoYWCt5+q4un+yp69z0qsS/DCImMSabOd7GQvjBzc2mGHfpYZxMw3dWE +ervfZQhleCJT0uiHya43yCst+P3NtCNovkvv4kTXIDLZYNJJTIxBzcbXi9qv +/kISi/LbG8hpSO7j/S+eqovI8ljUFr21uUj84J5bfMY8kG0S/+KHylWUqmla +a+O4GroI80u2LtdQT5ZG46TwWsAK+v0Of7mJzhZFvuaWFoGXrr/2Xdhahiy1 +D4hKKIvAGSnHt792lqHVj+wcqWoisPXz3WAb7zJ0aojca7VZBELqtex/nCxD +J4gvvqQfEAGGUQexpbwM+edLLVFqRGB1ux1FUPg2ss2tVLXaJQr3jzk2Zrfc +RpLpQ2fSLovB49mQvhqxCiSlcufU72tisH1J7ewFqQok03Q6cneFGFy+vrFg +n3wFUpigH6M2i8HLz2+4uKgViGwd6F47IgZ7b6mfXGNYgTauXNQd2igOOvqk +6aA9FWhb0PphrRZxMPdYS0++XoG2rxnpz3wrDgUPG+5OlFQgu6v3e/72icPb +jUdytlVUIKc219dPxsXB34ziw32/Au1WLaxxkZCAGirOw2ypQH7DGy7EuEsA +ypcbWfpegeIdLPA3sxLQZ3V0slG1EslUvZLhXrEepLrTmdyalei2mMOc5pr1 +sGJ2QRXpVKLON24VFxTXQwfvlr8lWCUi2QYRbc3XQ3ITr7WtTSVq2nqFt+3S +esgRGAxo8a9Ei6Yzr14yJWGN/RXSsdJKlHItrGTRVBJWaddmMio4z/NyJajZ +SsIuPsGbvexKZP1YYPM5L0mQPjlYrFFbibKNCWzrZEm49u7jqmvPK5E+WGW2 +fuT0R+nY/uBzJTpqULDneYwUJIm9/lskw0KW+ULTVklS4GMfEpslz0JEvhMJ +ry5KgYHmCf0EAgu1dThVvr0hBVnGf9RcKSykHijI0/9KCiL2V1l0arLQyLWQ +a1My0kDZEL9HzJyFXMVtfsqypaH6tD2JdZiFNobXRufVSUOX1a56lSAWEhik +rVd6Ig2bGjYmFgSz0P1yHkTpkQb1aZfG6HAWWm91P0VjWRoKBb4Wi8dxxo8m +aW+xkoFrEfoXT2WykMn4Qpj/kAxQs7Xh/H0WCjVPZzz8IQNSrcF9cbUsdLtA +7b3YrAzA0ai+4/UsJOXgbnB/tSxslwnid3jIQj/uPZ7jUZeFVIMBpY/PWCgt +JiXo0nFZsHsQdcOcsy+f9dJJP6JlYabuVuWqHhb6q938Fj8rC+HvjMgN71nI +++uM1vBlWbBKTNpK7WchQ+tdk+rNspB4ybf8xTALDUpQ/B+tlQOB7EfEg5Ms +JBnQIC8pKQfMZc01E1MsZP3M+eUBghxsknrgFTjNQnfDzqqu2ygHPgP4Ue85 +Fkr8ODG605nz/DuvJeoiC2ndrN0/flUOtHoTrVasZqP93I6SRqVyEF7bnG7N +z0a5u8aepN+Rg5HgdOd0ATbiFVKiGD6TA1kNip30WjZ6f+T08KmfcuB4SUJu +XoSNopm2HjL68vD1zLMoYVk2MnfLm9IzkoeDxnpjhnJsJBT1PdbRWh72NFPB +Q57Tf3PctRR3eRBWbUorUGSje5Y133nPyIO40ju+SWU2ijzIF0FKkwd7CZ/r +CyQ2Mk12EDK6LA/tEoobuChs1NE+phFRKQ+SRfy/l6hsNOGsHPyrRx7sTs4d +bVVho+qwQD6RYXmgOMnsrFJlo5O59VnqY5z+555TLqmxkeDAjtoD3ApwiLg/ +zGkDG1H3J3ENMBTglcfC5BUtNhpL6LmwqK0A01nRa3w2slHVLYqyLFIAjzlz +PlVtNjIaa9ziZK8ABeTNV67rsJHbsZnEF+EKkHwsTPKQPhuRM43kRuMUoP3C +BwFxAzYnP86X8aUoQOdvrZd3OQ77S28zKlIASq10+bghG21WCPFwv60Aoxd7 +H8dtYqPV8Ggq4h7Hmz9dkmSy0cVYN4n7LxRgK2nRUx1jI9fikmudnQrQeG6P +FZtj4tPfetMDCiByLrFrI85GFQJpLhtmFMDwi0QtFbFRiOrAd+tlBfhqUMiV +wzFuoxbhy68IbqcNn/ADG7248PRKsbwilEhJF/dwnMYW12ymKsKZoaFiw81s +5PLOo2lAUxFKHQpmMjhWmrttv7RJEXzn4uPGOB6R+jssa6oIL1klWzYbsVG5 +oUWwwXZFeFv7nXSe42DXDL4dLoqwVPBRuJtjnnwNRqq/Ihz/7fnAxZiNWh5G +1JYfV4SgCR6HdI5ThlqsX8YogqvrtrxnHO9YJdU/mqQIa1oNYuc4VqB6BazO +VITtF0e/EEzY6LM5i4tSoAhzCldLTDgu9V2+YFyiCG3LeZWeHB9Nslb2uKPI +yT3urjCODW9fqjrZoAgXKyrnkjg26Xq1OPZMEUS/h9plcWzDtdJszxtFuLNh +k1oex850g5TXvYrwdF/Hvv+8186/B31WBFlpyY7/2vuHFxIrxhRBGiu3P8fx +8aJuP8JvRRhXEKgJ5/jhl9Muz7gIoF3F7N3LsWm4UmTUKgKEEL4lbOG4dV1d +ob4AAb4nK6f+t57tRU7PJoQI4LzdqXmas95O/ckfN8QIMG5D/vKQ410vz4p4 +SBFA/c32h/EcD3hQdKXlCUDIyZQy5dh7ttGlXYkA7/Zklf7lxPt74q7IMxQC +nLrFMizhOFBxtnCzCgG+Kn89YcvxDDvl2fwGAsTbVNPHOe8zzFzlZ6U2Aaab +Vk7Hcsz14bGIrwEBjnwbT1zHcdxhd10iToCwrXcvXeDkiwDvH5f3RgT4FpXy +9L98Ssm+GJlqRoA/rPPVIZx8y25uecZtS4BJvVKH//JT0dnrZ40jAfab/NSM +4uRv0Y9lkaMuBChyc9B8yMl3RnS2rsoeAhzjU/o4w9kP5RI6u4b2EoB6L6tJ +nmPtW68jc3wIYFY1tFufs39qcN8i+0ME+CQyqraFs78e7b/yszmYALKh90w2 +6rGRxV8D0RPhBNiyueeAmC4bvUrp0NWOIsDha8pRQ5z93HOfP6roDAG8dj37 +u52z/91siopckwkgz9AV/anBRsOD+HPxNAL8sK0ODubUi7E1QaJxuQRwhMIt +Npz6cjRfSA8rIABtWVA1h8FGv7Vv7popJkDoYYedb2icfHfrL/Iq58zP6rDu +X049S5g6/ly+igD6t/6q/CRy6mO82Ni7ewTIriv59YjARlIV5nqmTQSoctmn +R+bUz8smQ7uWnhDgp0Z0Y4k0Z7/3RETdbSVAiX2HjoQkG6lxs59T3hGg+MHr +8iROPWZlbB3r7yGAisXt+CwhNtJXGRHN7CeAzwqtqZg1nPrlIO/KN8LJj8lV +nWMr2ejpSHVUww8CtLa+Hzm0go2sI+yKQyYJMKES/vAJ57zYcS1+7OsCJ/6J +929yzbLQwd+TUc/WKnHuB2lKgZzzyfCw9/ovokrgWmYgov6RhVaPvi/hkVKC +8+nSdBbnvCvube7EiUpQHYBZrnrFQkEO+gddqUqww0Yjou0pCxm9LF0RpqoE +b9JiVF0452n/g4uqd3SVwMYFFyhgs1CpnkDTm01KoLfLeoNLKQuFVZzcMQFK +MOfO3/C8iHO+X90fo2KlBAQ/endzOgttizPoLtijBEQxiuO3QBZSWCo71LBP +Cc5RS3fI7uec18FEng8HlGCfDeHPlCsLJfisUZcKUgI+kaXqRDMWcvoU2awT +qgTJSUP5pkwWIrlMO9ufVIJFae/WKxos1Gj1ITY5QQnWTM1XKEmxUPIjW+nS +c0qwPMFyN13Dua9gT24/T1WC/JpNGNdSJZpXL+9ZeVkJJtvqalUGK5GWaPSG +8EoloPuHvVQrrkRcZ2ceZd1VAvydQfnT9Er0isfX5W6tEjhfjPQZia1EfjN2 +cZOPlSDlmrDZPfdKVNRN6t3/Xgn4xVUF/cQr0RHbS4FxH5VghZ7cRXGuSgQt +a3kLh5VgVje4yZBzv/xQO6vRP6YEf9uUc+YbKtD6K89OO/AQ4USl6KL63go0 +LInJHVlNBKMdEbW3LCsQK6Wy8vxaIjw9I8F7RZNz/43J7muRJEKdUOaTwT/l +KMHroNZmVSKcvdB1LpFQjuZVhPvVHIlQnh5VXqlfhmYvy0RvdCGCtep+v+jf +pWh6HZlksIcI+u8U032rS9HYLwNfkwNEyGDb37qkVYoGa/fOukQQYbK+z+SH +QglqsaoWSigmwouZoTDtjhso288NDc4QgaIu/spisBBlfvAZ/LpABFUp1Vmb +C4UofdvRuJ/LnPapJyW2QyFK3pjQ+ptfGRoyrU8eyLuKYv5U7linoAx7JVbH +j+0qQH5nVwUyTZVhc1WBaujTy8hncZ2YkZUy0GZZO0TULiPvAJm7ZtuVQV14 +a1JpWi5yt9/w185FGVqT1E5R9uUgB9mdCQf8lYEl5nSrTOwSYpaU5mdkKEO7 +n7Hox+p01EsoubIlRxnqwuejk5jpKCzjZt70FWXQv+6vXN+Uhqqjr+Xa3VSG +cvNDog/fpiIt5/wsoTrOePy9PmOrL6D2l3mZ9Y3KYP780RO77BQUaHw54+Bj +ZSgZ9uzwVEtBt9Wz01teKYNvmKgbpTIZ0Velp5z+pAwv0+TL5k+fRc/CUs/r +fFGG49q0s6KPE5H3REry8KgySJ2ye1/Em4iKes8lGU0rA3xpzzNIT0AEVnzC +Ei8J/Kq/EmR64lAD9XR82RoSXBvVqp/XikNul0+ddhUmAbuYNW2RcgrlJESf +qpEmwY72iydUHWPR+j3hUcGqJGhw2G/uzxeN7nSERpI1SXD+dyHV6kQUcrA8 +frJDhwQWZymTXSORKFXn2AktRALsq0J1VV8EWisYcHzMlgTRZl2Gs+vCUGn0 +oZDLTiS459+pKqkaiizn/IKtd5GA2+3MRw2b4yhh0Cfo1j4StP1OUfxTGIxW +3vcM9A4hQaO62++EtKOoUN0jQOIECZZ4Hn8V+XAEGRXt8X8URQL6fEHZJ5Uj +KPK860FiIgk6//45NtsdiBRW7fJrTyZBaK371jV6gagubKdvVBoJ8iRafddq +B6AFLyef/lwSZI51B+X1HUSXeh32nysggWDXBeh84If0be29mddIIMx/wH/9 +LV8UzNy+L7ucE4/HAi6j2T5oUtTS3amJBOtbCv0iBvah7oPENt+nJNDXEHE6 +8GsvanyygCJfkGAwx7Jeed1elBJWonijkwRifQGewu4e6HhH7Pm6XhIwZVV0 +WtLdkbu663LbAAlWbpRLbb66B2kMCn6cHyWBEs1cPbrJFUkxP9sITZDg7Cfd +R3SfXYgro/4BcYYE9QcSzJtkXdBrC/88q2USpATnxfKX7ED+la93XxYjg1OL +XqCxmz1yWnPjZaUUGU7ciohi7bdDuFcU9kSeDKdSFsVeh9uitdKa8uNUMrxl +qD1kxG1D00f4z/GokQGPvbJ97betqO/Fp7+SWmQYnurUOrDHGpVGpfYBkwwB +ZT5r3kdZoPT3vtaOm8mgssnfOp9hjk5oG9cdMCXD4xX8IUbDpshq5FdO6nYy +MK7kOpeeMkFaRi/WXHckw5HirqtmvsZIJrcovNaFDD/4aZNeu43Q6DbHXcP7 +yPDw5wxhhS+gNzfVWn8fIIPcVyXjLysRquHh3bQ2gAwlc5k5RdYYOlN9V0Y3 +lAwt/CFTH+QMUaDI+UTLk2Tg+xsSEluoj5z99i+4xZJh4MUZZWdMD9EUpd7H +nyODZoOWqP51bSQcOmGRm0qGz13j9reObUS/3zy7X5FJhoNXUo9IO2ihZ6dD +L/UUkGEsdLOJAK6BKgZs+ceukSHNZqbHMUUdZRkyQrlLydBx9Ii8YIMq2j/2 +3lnlLhl47wp9/ORNRzbm7Geolgx5qqd3FH+gIt2rZ/UdGskwNEQUJftSEK8T +UyqihQxd8e0PlBqV0Vi5eMKF12Q4dOvw8bx4Iurk/zlX3EGGFbYst053JXSt +/nLXq35Oex8rxtszCihZMthsaIgMB1rEDqrmyqHgwzbVcyNkOHaJIgCtMsit +lUIVHCOD76KV6TkJabSFvJxB+EUGUn3RzaJQSaQa2cWr85sM3bHjftRZCSTe +Ux5ssUgGbv7NH56cEUfDSe5OR/gokCmbK+Y/KYL8R1WJGoIUCMxsu1bZKYzm +zOZ//hSmgKdHSb5u1joUVfz4fokEBaLlv368UbAWCfCkxh2QoQB33xYHwrM1 +KN3dzZaqSIG81qOS6wUEkPwDhvxnZQqYPwnZI+G9GmmENle5q1FgQHD5Kdt7 +FarpPB+loEWB4w1dT+tXr0TG2q7WfboUqBOXeljcwM35v0OTyt5EgfqRlpNm +iSuQ0/j00A6ggJUvQ+Dcfi40YP2wXGILZ/wxDUZf6RLue+tc+FsLCvSbr3jT +X/IXj/CiiG2z58y/SOOkOe88zts81S/oTIHNI9M9m9zm8BRCw60WVwoozz3y +P902g8ucPBuc4EEBr6mhb0W7pvGi3h1Gpt4U0Jh9uo62NIWrG5CEVvpR4Nud +0Hfsu5N4dcZEz8MAChxLWxmzFDuBt9ieOYyFUiBYs/gsV8UP3KHcEfsTwZn/ +vgMwcW8U/yBI5L8fQwH+EduHuwdHcG/fsY7geAqsnmvqdWB8xSee1uRrJ1Hg +6t0jHX+TP+Nh5PiDUykUuOubL5opNIzzxNrrV1ykwPr5vu6I64P4evzHa5Ur +FLhupLdineIAnp9zL+dbIQV4Lv16+WDmA06fP7X/+g0KBJR83JrU0YuznGw3 +epVRQOCW4CPh7h6cWSW/TGRRQIa4a3hhsQt/IjLaMnCXAo8dmBOyJp349oC7 +GXm1nPgG3fjqdaMD38vYpi7zmAIPIhv5Opvb8R/xsgtdzylQ7JLUEBTShgd/ +/vr44isKbO+p6XU49QrnMq66YP+WAjZOe1+OmLzAE/Ojdot0U2AFsBdeqbXg +4kvW9Nd9FHCzsw3czXyGX94lPZP0iQKnXu+lifs/wSvWs5JWf+eMF1E0Xq/Z +jBsGnXR+Mk4BM5VSbv+Gh3hzuyXp1DTn/UkJMuv2N+LWGyQnNs9TwOF9bADL +9gHemTRUu7xIgQjVMAkKdx3uPloeX89NhaDAF2LXP9zHv5mdsA/no0Kxkcl2 +7FM1/pdb4vusMBWwkbiBWscq/LT7p7tVElRIZbKV8x6y8HUPymKOyFDh5kFb +hVNWlXiWbJiNhiIVru35ZHVlsBwnhprKjClTYX4qU2atZxle2in6pYRGBZu2 +iPf5IiW4rvbHygNqVIgKLZX59vMGbjEeYvFZlwqqrUpVs4rFuJymwunVTCqc +KlE75rG1EB878qhJZTMVCm7/+eVfUIA/rPJdtjGlgqGt/riIdD6ePivMPGJF +Bb40FcFxz8u4t3718YvbOevj4rHgbcvGDcJ237nnSIXvcqH7LgZl4YJ1PFO9 +LlTQqRHhplhn4P2LN9WX91DhXGL6jyy7dLwCbfcjelFhIX9bj+KpVDw2evb6 +Fl8qRIg9S9f7kII7NecO+wRQ4epVbfKWO8k4bZWxUlIQFR4q6t15OnUWXzD9 +trs8lAoW33Rzgg6dwV8mnM9+c5IKnln9x/UJ8Xh+i07XTCwVXtwIyPLmjcOP +CPaJSZ+hwt1eddNK2VjcxCZmOzOZCuEX8yuJrtG4ZArt3J40Kqhb8eaqJkTi +o+2vnsdkUSEL9dp75Z/A68SO8V67zIlfUe/BpwuheLKjrPHzq1Qwt+/7cetC +CO6R+TDyx3UqCBFUFfv3HMO1e/bXrSujwnJMyMFc96M4r6zQvBaLCqJv6/ri +zh/Gu12rdJyqOfHTGw1Qbw/AS/JcjoTWUeGPwOljW9oO4icHuMpzH1KhVox5 +K1XCF99OvP694QkVnGSk345k78eJ+7bShlqpcKWIujrfxQufKf61j7edCqG3 +iCvObtuLP/t6qYDeSQV964OaP4M88Gw69Fv3UsHD189iKGkPftDvi0zgABV+ +1njLb4lyxVFZ0o60z1Rwv7SRu7luJy46rpV+d5QKhbVfQho37cCHNXraesY5 ++WqwTUZ7zgG/eyRy7eI0Ffp2px3I+WaHn6kiWxIWqDBU/S1hfK0t7jrbetp4 +mQr2xzOadBpscHX9I83eK2nw65Cf+scqK5wrTIorkZ8GDVzh8diMOf629gGz +TIgG0bNxj9xDTfFri/tC28RoIPjVomXO0AQ/jtbc/SVFg4hNYc+NtI1wq+jK +qfUKNDAQZt3ndQdcoXnHBkNlGpTeGLjLcxTDJ1Yu+e2m0SDBOXpn03FDvNm0 +6EaUGg26kVP4oed6eEaC5edCLRrMBDwp/rRbB/dpmVB6qscZ/83PpMING/FN +gpluo0wanB/vV2/X18SFbLCctUY0sON+fYA2oo4PnB/q0jCjwf1oiQXGfRWc +3X5G3MGaBsuO1/cP9dLw02IatiG2NGin9rftNqfgzo6d57KdaEB1c1zrPaeM +MzJPtNTvosEjtoB58KASvthN5PvkTgO9fQNy13kIeJvMc+OV3jR4PPpJy6hE +Dr/qGhBF9aOBTK4Fn+J1aTwoT6LeMpAGPpszLtKm1uNmA7Xzh47RgHKeKR52 +ShyXIXrqXgijwYcvWmumnETxH3tXH62KpMFW4TpJwl5hfCzPpL7hFA2kwg8v +v3dci4/3RPG1nuGsL/ijQRoSwCfE6207k2mwkpRc5B/Gh09tm8/5lEaDUIoT +2C6txH8l6nz5kUUDyD0QOdLMjU8/Pqzx+zINiKsou7IeceGzXLfDeAo56wch +6JhexOY2jT4SukGDlKbjafMNC9jvYMo6mTJOPD7xX/o5MIctVHruJLNokNVf +tWPKZgb78yOvUKOaBkUvDGKo3L+wv9Ten5vqaMDHeql+7NcEtuQpqW/2kAYi +pFfrJvXHsOXL9jF2Tzjtc51Th8dGMa6e8y92t9Lg6e2SB4eWvmLc4i/WH2ij +gTK9WgDcPmMrt632CHpHg+/nuUOXVw1hqxJNSiLf0+CFy+Vl2tgAxvs4aibx +Iw1edY46Lyj2Y6u56lHGMA3OrrIo7ml5jwlsmj9T8I2Tn8xapXVvurA1wTod +pWM0kO+tFOhWeYcJVh5WuPeLBozRSaGjr99gQj/KfJp/0+DjeFcc7502TJg6 +ynq1SINCKeWtoiUvMRFPymIPNx12BvivdnFswUQve5p95qODh5qWxqXdTzHx +7rwLE4J0kD222pZ9/xEmIdbb+0eEDgm7LtbnuDdh620kKXySdGjSn3piYNmI +SZ2xDxSVo0OPe/GhK/11mPSj8zXySnSwAqPzz1LvYzLLrSvpFDrslaHXuBbf +xeQMV2/TVqGD6+BE4irBKkz+mMklpEGH5ETy1fj6SkyhImrIUocOZ2xNzSz3 +lmOE73VqToZ0+HXyszdvUwmmRJkP8UB0WI++WpASb2BED52mgyZ0OB4ToTFR +XoyRcg8LHregg2iKS8ofWiFG6SpzirWhA0933tWF7/kYVXQ0P9meDrmnRxYt +P13GaFsp3y8500FvJbtdf082xkjw1CneTYdDf/vmL5tkYqrNeZEVnnQw+aM4 +0hqXjqktvX9eu58OeRtzjrhJpWLqBpLiTw/S4Y2b7U6NL+cxjSB7tzeHOfEJ +9Fw+JZuEaZWfv/EhmA6V8TeNiU0J2MbR1qmRcM56Do8ri7yMw7TJq7HpKDp8 +fUhMe6URi+m6m8Qvx9EhaJ/kfeJQFKaXE9UucJYOb/nbZObvRGD6nXWy61Po +YPHsM+sqIQwzFJn3UrpIh6e5pkeW54KxTdY6FaqcIlxhkhHqtyEIY8YfXtC7 +QgcdE1Y5u/YwhjeVmRgX0YFlYGrcQw7A0OK3ZJubdIglVdfkOPthoE/p2Xmb +DgF8/DlELh/M6KinshebDqEjFnalQl6Y8e28Q4H36FDDl8gQOu6JmXx7Xx1e +z1lP8e3NpzXdMVOSJHd8Ex2+7DugSd7rin3zNLux6SkdJj26bfZI7cSSCkJs +JlrpMH/YQKBazQnTGLg+XdRGhxNJNmn7s+yxtwrd2Tvf0aFx/Yh6r40tFrx7 +9Wah93Q494mXIHHBBpPJ1f/a1E+H+BOzxg1/LLH69z7nQoboMF2k/ka3zQxz +l760UXWEDpecn2yL4N6C8Tg/7xn4QQfLhtfL3+KNsGsZ85EXJzn5MpObuXIH +YBbv6BTLWc549ND+p6+Y2A8xlxdLC5z57IZ4wl4D7Lxd4hH2Mic/vh51bN+t +i2ldqJHyWcmAZEvrp+vZG7HO16MP5PgZcEww3i/aWRMLFZL1al/LgKkhNe/8 +M+qY3FarNadFGaCud7Tq8kcG1ng2vNJQkgE6Z3f/CiiiYntbSnaMyzKAUlZ+ +T7uVhPHy9y0WEhicevwyMsaciN00EyxyJjMgfErdAxclYNanmZZrGQx4SKR+ ++oHLYeOPDk48VGdAyOn42Kg2KSyV53JG8EYGXLEgGOm2SmA6Ri+ZKvoMiC0e +0SwhimHdUYuDH5kM6HhEf/O9VRg70aB2Jn0zA4InzY+kh63FFJd2b7AwZQDb +I7PncB8/1sRMfrdoyYCMUavn9rd5Me/wB+GsbQwwe9obOTjIg/HXjCntd2CA +lN2G807+K7DS3wrPZHcyIPpF2ImLSUvMbXrb/Nt2M0AO1zahNC8wp45Fisd5 +MiCnmVWlGTjHzKgqrzHYz4BXASE9R+OmmQa/PrqP+THg+4P59J2zk8w+TWG+ +wkAGVJq92ZkbMM6MCoSyHccYsOLza0P5qO9M5fJAe8EwBhB8KTIr144wn/zM +n288yXk+90eOGt9n5gHV9ivHYhkwFHnvtanHIFPQb4UpI4Ezf2Eu/4x1A8zy +m5o/+pMYQMz36sta18e0G/FITbvAAMB3ht6O7mbOUFL1zTMYMLhwqjvc6x0z +y6up/282A1ZJiBUulr5hMoumTlVeYcCHupuCw1ZtzI+DRBXvIgZse9F3pt7/ +BZPiHhvyuozzPl6qqp7Me8w8+GGoWb+aASNSdmvi/BqZ6+TEfX/WMqCGepJy +K6eOyXIxEb7ayABfnnWJ8qP3mL+7ilzXtDBg4r7Cl4BPLGbO+nfcja8YsKwj +M9d/qIKJO666GfSWAf60rv74i6XMuDdeMx/6GHDTRH9+LreYKfqSklwxzoA0 +p32iZwuymEvjGsUt0wz42za4sUXpInNUdFPd8DwDNKezvR8ppjKbnLeNSq1U +ATEeO2/VwkTm0eEQ02gpFcg8O1C04cYJZsefZ0u2m1VgRW8AM8TenZnJ8Av4 +laoCLV+ygxe/KTPlEsq36+qqgsndY0XXla5vylIxEBbbrwYx7cKVMdW3DFtk +Nuv8uqAOi++vU1KmLxkYyjWlbOjcAEYX5cSzrzrpC/FcDfKI0QAfk7/TKcPC +egrRisydFE1QF9pp/peWpsNPdr1r91QTGgfdY+h7ubXVMenykN1a4GNPTmg+ +HKR1pF+02ZJrI0znOdV4bS/VGP+V5GiRtRFMI9YrhO8dVTfb8CTbQk0bRMz2 +mmvKyak9+LXpz9wrbRgn+z6UyRdS8VfVet/upQN61WvrYsTX0rGxfR07+XWB +a9eLiFWfn1K2kKS2rr2qC8KkCtUn59NItKjE4016evC77x633UcHIsPLoIH8 +Xg+G22OuVqW/VvR64HOq6rA+iMQUSJ7SdpNvyO/YNylhAL3Hc+mqTgUy0zeW +5zZUGwDX///sJZfwZ281/J8nGWm6rIl/vlf059NMwqb/2cVEGTYpMP9n2UPx +99Ub/1lC4GDl1h3Y/1xkHBE2sfOftSKSjdNc/9lmouJdt8c/n+6cmd978J9/ +X400Cov+5/eb0t5eK/lnn2NFuRa3/3n29h2vHxX/LErsntO8+89Wq+Xl6hv/ +ua7j2r637/7ZUuieWnD3P3ebPZ+V6v3n6ZrvCW4D/6xWoFH2bfT/9Pd+c3DS +z//Tn7g92jDxz97xx9qDZv5Pf42nsyV//3PMQubemoV/Fta+qbp78Z/zDtXM +LC//8/8Dw8wefg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07526578866635979}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -3213,19 +8868,19 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07526578866635979}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3239,129 +8894,227 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJxN13k01N//OHBRRJI1O2PMbgnZm9frPkP2lDVJQpEoVCIkWyJJQgiJ0IYw +o5QlopUWSpZIQiWVLUsUfvM+53c+feePmfM4577u8nw97/PeUfIMsPPi5uLi +cuR8/fc72//8EelsEf6C/KuHYWKCd+RJhW7ujkHqyZ7G5EwiAonXnlLdqeib +cbLzQoYWCt5+q4un+yp69z0qsS/DCImMSabOd7GQvjBzc2mGHfpYZxMw3dWE +ervfZQhleCJT0uiHya43yCst+P3NtCNovkvv4kTXIDLZYNJJTIxBzcbXi9qv +/kISi/LbG8hpSO7j/S+eqovI8ljUFr21uUj84J5bfMY8kG0S/+KHylWUqmla +a+O4GroI80u2LtdQT5ZG46TwWsAK+v0Of7mJzhZFvuaWFoGXrr/2Xdhahiy1 +D4hKKIvAGSnHt792lqHVj+wcqWoisPXz3WAb7zJ0aojca7VZBELqtex/nCxD +J4gvvqQfEAGGUQexpbwM+edLLVFqRGB1ux1FUPg2ss2tVLXaJQr3jzk2Zrfc +RpLpQ2fSLovB49mQvhqxCiSlcufU72tisH1J7ewFqQok03Q6cneFGFy+vrFg +n3wFUpigH6M2i8HLz2+4uKgViGwd6F47IgZ7b6mfXGNYgTauXNQd2igOOvqk +6aA9FWhb0PphrRZxMPdYS0++XoG2rxnpz3wrDgUPG+5OlFQgu6v3e/72icPb +jUdytlVUIKc219dPxsXB34ziw32/Au1WLaxxkZCAGirOw2ypQH7DGy7EuEsA +ypcbWfpegeIdLPA3sxLQZ3V0slG1EslUvZLhXrEepLrTmdyalei2mMOc5pr1 +sGJ2QRXpVKLON24VFxTXQwfvlr8lWCUi2QYRbc3XQ3ITr7WtTSVq2nqFt+3S +esgRGAxo8a9Ei6Yzr14yJWGN/RXSsdJKlHItrGTRVBJWaddmMio4z/NyJajZ +SsIuPsGbvexKZP1YYPM5L0mQPjlYrFFbibKNCWzrZEm49u7jqmvPK5E+WGW2 +fuT0R+nY/uBzJTpqULDneYwUJIm9/lskw0KW+ULTVklS4GMfEpslz0JEvhMJ +ry5KgYHmCf0EAgu1dThVvr0hBVnGf9RcKSykHijI0/9KCiL2V1l0arLQyLWQ +a1My0kDZEL9HzJyFXMVtfsqypaH6tD2JdZiFNobXRufVSUOX1a56lSAWEhik +rVd6Ig2bGjYmFgSz0P1yHkTpkQb1aZfG6HAWWm91P0VjWRoKBb4Wi8dxxo8m +aW+xkoFrEfoXT2WykMn4Qpj/kAxQs7Xh/H0WCjVPZzz8IQNSrcF9cbUsdLtA +7b3YrAzA0ai+4/UsJOXgbnB/tSxslwnid3jIQj/uPZ7jUZeFVIMBpY/PWCgt +JiXo0nFZsHsQdcOcsy+f9dJJP6JlYabuVuWqHhb6q938Fj8rC+HvjMgN71nI +++uM1vBlWbBKTNpK7WchQ+tdk+rNspB4ybf8xTALDUpQ/B+tlQOB7EfEg5Ms +JBnQIC8pKQfMZc01E1MsZP3M+eUBghxsknrgFTjNQnfDzqqu2ygHPgP4Ue85 +Fkr8ODG605nz/DuvJeoiC2ndrN0/flUOtHoTrVasZqP93I6SRqVyEF7bnG7N +z0a5u8aepN+Rg5HgdOd0ATbiFVKiGD6TA1kNip30WjZ6f+T08KmfcuB4SUJu +XoSNopm2HjL68vD1zLMoYVk2MnfLm9IzkoeDxnpjhnJsJBT1PdbRWh72NFPB +Q57Tf3PctRR3eRBWbUorUGSje5Y133nPyIO40ju+SWU2ijzIF0FKkwd7CZ/r +CyQ2Mk12EDK6LA/tEoobuChs1NE+phFRKQ+SRfy/l6hsNOGsHPyrRx7sTs4d +bVVho+qwQD6RYXmgOMnsrFJlo5O59VnqY5z+555TLqmxkeDAjtoD3ApwiLg/ +zGkDG1H3J3ENMBTglcfC5BUtNhpL6LmwqK0A01nRa3w2slHVLYqyLFIAjzlz +PlVtNjIaa9ziZK8ABeTNV67rsJHbsZnEF+EKkHwsTPKQPhuRM43kRuMUoP3C +BwFxAzYnP86X8aUoQOdvrZd3OQ77S28zKlIASq10+bghG21WCPFwv60Aoxd7 +H8dtYqPV8Ggq4h7Hmz9dkmSy0cVYN4n7LxRgK2nRUx1jI9fikmudnQrQeG6P +FZtj4tPfetMDCiByLrFrI85GFQJpLhtmFMDwi0QtFbFRiOrAd+tlBfhqUMiV +wzFuoxbhy68IbqcNn/ADG7248PRKsbwilEhJF/dwnMYW12ymKsKZoaFiw81s +5PLOo2lAUxFKHQpmMjhWmrttv7RJEXzn4uPGOB6R+jssa6oIL1klWzYbsVG5 +oUWwwXZFeFv7nXSe42DXDL4dLoqwVPBRuJtjnnwNRqq/Ihz/7fnAxZiNWh5G +1JYfV4SgCR6HdI5ThlqsX8YogqvrtrxnHO9YJdU/mqQIa1oNYuc4VqB6BazO +VITtF0e/EEzY6LM5i4tSoAhzCldLTDgu9V2+YFyiCG3LeZWeHB9Nslb2uKPI +yT3urjCODW9fqjrZoAgXKyrnkjg26Xq1OPZMEUS/h9plcWzDtdJszxtFuLNh +k1oex850g5TXvYrwdF/Hvv+8186/B31WBFlpyY7/2vuHFxIrxhRBGiu3P8fx +8aJuP8JvRRhXEKgJ5/jhl9Muz7gIoF3F7N3LsWm4UmTUKgKEEL4lbOG4dV1d +ob4AAb4nK6f+t57tRU7PJoQI4LzdqXmas95O/ckfN8QIMG5D/vKQ410vz4p4 +SBFA/c32h/EcD3hQdKXlCUDIyZQy5dh7ttGlXYkA7/Zklf7lxPt74q7IMxQC +nLrFMizhOFBxtnCzCgG+Kn89YcvxDDvl2fwGAsTbVNPHOe8zzFzlZ6U2Aaab +Vk7Hcsz14bGIrwEBjnwbT1zHcdxhd10iToCwrXcvXeDkiwDvH5f3RgT4FpXy +9L98Ssm+GJlqRoA/rPPVIZx8y25uecZtS4BJvVKH//JT0dnrZ40jAfab/NSM +4uRv0Y9lkaMuBChyc9B8yMl3RnS2rsoeAhzjU/o4w9kP5RI6u4b2EoB6L6tJ +nmPtW68jc3wIYFY1tFufs39qcN8i+0ME+CQyqraFs78e7b/yszmYALKh90w2 +6rGRxV8D0RPhBNiyueeAmC4bvUrp0NWOIsDha8pRQ5z93HOfP6roDAG8dj37 +u52z/91siopckwkgz9AV/anBRsOD+HPxNAL8sK0ODubUi7E1QaJxuQRwhMIt +Npz6cjRfSA8rIABtWVA1h8FGv7Vv7popJkDoYYedb2icfHfrL/Iq58zP6rDu +X049S5g6/ly+igD6t/6q/CRy6mO82Ni7ewTIriv59YjARlIV5nqmTQSoctmn +R+bUz8smQ7uWnhDgp0Z0Y4k0Z7/3RETdbSVAiX2HjoQkG6lxs59T3hGg+MHr +8iROPWZlbB3r7yGAisXt+CwhNtJXGRHN7CeAzwqtqZg1nPrlIO/KN8LJj8lV +nWMr2ejpSHVUww8CtLa+Hzm0go2sI+yKQyYJMKES/vAJ57zYcS1+7OsCJ/6J +929yzbLQwd+TUc/WKnHuB2lKgZzzyfCw9/ovokrgWmYgov6RhVaPvi/hkVKC +8+nSdBbnvCvube7EiUpQHYBZrnrFQkEO+gddqUqww0Yjou0pCxm9LF0RpqoE +b9JiVF0452n/g4uqd3SVwMYFFyhgs1CpnkDTm01KoLfLeoNLKQuFVZzcMQFK +MOfO3/C8iHO+X90fo2KlBAQ/endzOgttizPoLtijBEQxiuO3QBZSWCo71LBP +Cc5RS3fI7uec18FEng8HlGCfDeHPlCsLJfisUZcKUgI+kaXqRDMWcvoU2awT +qgTJSUP5pkwWIrlMO9ufVIJFae/WKxos1Gj1ITY5QQnWTM1XKEmxUPIjW+nS +c0qwPMFyN13Dua9gT24/T1WC/JpNGNdSJZpXL+9ZeVkJJtvqalUGK5GWaPSG +8EoloPuHvVQrrkRcZ2ceZd1VAvydQfnT9Er0isfX5W6tEjhfjPQZia1EfjN2 +cZOPlSDlmrDZPfdKVNRN6t3/Xgn4xVUF/cQr0RHbS4FxH5VghZ7cRXGuSgQt +a3kLh5VgVje4yZBzv/xQO6vRP6YEf9uUc+YbKtD6K89OO/AQ4USl6KL63go0 +LInJHVlNBKMdEbW3LCsQK6Wy8vxaIjw9I8F7RZNz/43J7muRJEKdUOaTwT/l +KMHroNZmVSKcvdB1LpFQjuZVhPvVHIlQnh5VXqlfhmYvy0RvdCGCtep+v+jf +pWh6HZlksIcI+u8U032rS9HYLwNfkwNEyGDb37qkVYoGa/fOukQQYbK+z+SH +QglqsaoWSigmwouZoTDtjhso288NDc4QgaIu/spisBBlfvAZ/LpABFUp1Vmb +C4UofdvRuJ/LnPapJyW2QyFK3pjQ+ptfGRoyrU8eyLuKYv5U7linoAx7JVbH +j+0qQH5nVwUyTZVhc1WBaujTy8hncZ2YkZUy0GZZO0TULiPvAJm7ZtuVQV14 +a1JpWi5yt9/w185FGVqT1E5R9uUgB9mdCQf8lYEl5nSrTOwSYpaU5mdkKEO7 +n7Hox+p01EsoubIlRxnqwuejk5jpKCzjZt70FWXQv+6vXN+Uhqqjr+Xa3VSG +cvNDog/fpiIt5/wsoTrOePy9PmOrL6D2l3mZ9Y3KYP780RO77BQUaHw54+Bj +ZSgZ9uzwVEtBt9Wz01teKYNvmKgbpTIZ0Velp5z+pAwv0+TL5k+fRc/CUs/r +fFGG49q0s6KPE5H3REry8KgySJ2ye1/Em4iKes8lGU0rA3xpzzNIT0AEVnzC +Ei8J/Kq/EmR64lAD9XR82RoSXBvVqp/XikNul0+ddhUmAbuYNW2RcgrlJESf +qpEmwY72iydUHWPR+j3hUcGqJGhw2G/uzxeN7nSERpI1SXD+dyHV6kQUcrA8 +frJDhwQWZymTXSORKFXn2AktRALsq0J1VV8EWisYcHzMlgTRZl2Gs+vCUGn0 +oZDLTiS459+pKqkaiizn/IKtd5GA2+3MRw2b4yhh0Cfo1j4StP1OUfxTGIxW +3vcM9A4hQaO62++EtKOoUN0jQOIECZZ4Hn8V+XAEGRXt8X8URQL6fEHZJ5Uj +KPK860FiIgk6//45NtsdiBRW7fJrTyZBaK371jV6gagubKdvVBoJ8iRafddq +B6AFLyef/lwSZI51B+X1HUSXeh32nysggWDXBeh84If0be29mddIIMx/wH/9 +LV8UzNy+L7ucE4/HAi6j2T5oUtTS3amJBOtbCv0iBvah7oPENt+nJNDXEHE6 +8GsvanyygCJfkGAwx7Jeed1elBJWonijkwRifQGewu4e6HhH7Pm6XhIwZVV0 +WtLdkbu663LbAAlWbpRLbb66B2kMCn6cHyWBEs1cPbrJFUkxP9sITZDg7Cfd +R3SfXYgro/4BcYYE9QcSzJtkXdBrC/88q2USpATnxfKX7ED+la93XxYjg1OL +XqCxmz1yWnPjZaUUGU7ciohi7bdDuFcU9kSeDKdSFsVeh9uitdKa8uNUMrxl +qD1kxG1D00f4z/GokQGPvbJ97betqO/Fp7+SWmQYnurUOrDHGpVGpfYBkwwB +ZT5r3kdZoPT3vtaOm8mgssnfOp9hjk5oG9cdMCXD4xX8IUbDpshq5FdO6nYy +MK7kOpeeMkFaRi/WXHckw5HirqtmvsZIJrcovNaFDD/4aZNeu43Q6DbHXcP7 +yPDw5wxhhS+gNzfVWn8fIIPcVyXjLysRquHh3bQ2gAwlc5k5RdYYOlN9V0Y3 +lAwt/CFTH+QMUaDI+UTLk2Tg+xsSEluoj5z99i+4xZJh4MUZZWdMD9EUpd7H +nyODZoOWqP51bSQcOmGRm0qGz13j9reObUS/3zy7X5FJhoNXUo9IO2ihZ6dD +L/UUkGEsdLOJAK6BKgZs+ceukSHNZqbHMUUdZRkyQrlLydBx9Ii8YIMq2j/2 +3lnlLhl47wp9/ORNRzbm7Geolgx5qqd3FH+gIt2rZ/UdGskwNEQUJftSEK8T +UyqihQxd8e0PlBqV0Vi5eMKF12Q4dOvw8bx4Iurk/zlX3EGGFbYst053JXSt +/nLXq35Oex8rxtszCihZMthsaIgMB1rEDqrmyqHgwzbVcyNkOHaJIgCtMsit +lUIVHCOD76KV6TkJabSFvJxB+EUGUn3RzaJQSaQa2cWr85sM3bHjftRZCSTe +Ux5ssUgGbv7NH56cEUfDSe5OR/gokCmbK+Y/KYL8R1WJGoIUCMxsu1bZKYzm +zOZ//hSmgKdHSb5u1joUVfz4fokEBaLlv368UbAWCfCkxh2QoQB33xYHwrM1 +KN3dzZaqSIG81qOS6wUEkPwDhvxnZQqYPwnZI+G9GmmENle5q1FgQHD5Kdt7 +FarpPB+loEWB4w1dT+tXr0TG2q7WfboUqBOXeljcwM35v0OTyt5EgfqRlpNm +iSuQ0/j00A6ggJUvQ+Dcfi40YP2wXGILZ/wxDUZf6RLue+tc+FsLCvSbr3jT +X/IXj/CiiG2z58y/SOOkOe88zts81S/oTIHNI9M9m9zm8BRCw60WVwoozz3y +P902g8ucPBuc4EEBr6mhb0W7pvGi3h1Gpt4U0Jh9uo62NIWrG5CEVvpR4Nud +0Hfsu5N4dcZEz8MAChxLWxmzFDuBt9ieOYyFUiBYs/gsV8UP3KHcEfsTwZn/ +vgMwcW8U/yBI5L8fQwH+EduHuwdHcG/fsY7geAqsnmvqdWB8xSee1uRrJ1Hg +6t0jHX+TP+Nh5PiDUykUuOubL5opNIzzxNrrV1ykwPr5vu6I64P4evzHa5Ur +FLhupLdineIAnp9zL+dbIQV4Lv16+WDmA06fP7X/+g0KBJR83JrU0YuznGw3 +epVRQOCW4CPh7h6cWSW/TGRRQIa4a3hhsQt/IjLaMnCXAo8dmBOyJp349oC7 +GXm1nPgG3fjqdaMD38vYpi7zmAIPIhv5Opvb8R/xsgtdzylQ7JLUEBTShgd/ +/vr44isKbO+p6XU49QrnMq66YP+WAjZOe1+OmLzAE/Ojdot0U2AFsBdeqbXg +4kvW9Nd9FHCzsw3czXyGX94lPZP0iQKnXu+lifs/wSvWs5JWf+eMF1E0Xq/Z +jBsGnXR+Mk4BM5VSbv+Gh3hzuyXp1DTn/UkJMuv2N+LWGyQnNs9TwOF9bADL +9gHemTRUu7xIgQjVMAkKdx3uPloeX89NhaDAF2LXP9zHv5mdsA/no0Kxkcl2 +7FM1/pdb4vusMBWwkbiBWscq/LT7p7tVElRIZbKV8x6y8HUPymKOyFDh5kFb +hVNWlXiWbJiNhiIVru35ZHVlsBwnhprKjClTYX4qU2atZxle2in6pYRGBZu2 +iPf5IiW4rvbHygNqVIgKLZX59vMGbjEeYvFZlwqqrUpVs4rFuJymwunVTCqc +KlE75rG1EB878qhJZTMVCm7/+eVfUIA/rPJdtjGlgqGt/riIdD6ePivMPGJF +Bb40FcFxz8u4t3718YvbOevj4rHgbcvGDcJ237nnSIXvcqH7LgZl4YJ1PFO9 +LlTQqRHhplhn4P2LN9WX91DhXGL6jyy7dLwCbfcjelFhIX9bj+KpVDw2evb6 +Fl8qRIg9S9f7kII7NecO+wRQ4epVbfKWO8k4bZWxUlIQFR4q6t15OnUWXzD9 +trs8lAoW33Rzgg6dwV8mnM9+c5IKnln9x/UJ8Xh+i07XTCwVXtwIyPLmjcOP +CPaJSZ+hwt1eddNK2VjcxCZmOzOZCuEX8yuJrtG4ZArt3J40Kqhb8eaqJkTi +o+2vnsdkUSEL9dp75Z/A68SO8V67zIlfUe/BpwuheLKjrPHzq1Qwt+/7cetC +CO6R+TDyx3UqCBFUFfv3HMO1e/bXrSujwnJMyMFc96M4r6zQvBaLCqJv6/ri +zh/Gu12rdJyqOfHTGw1Qbw/AS/JcjoTWUeGPwOljW9oO4icHuMpzH1KhVox5 +K1XCF99OvP694QkVnGSk345k78eJ+7bShlqpcKWIujrfxQufKf61j7edCqG3 +iCvObtuLP/t6qYDeSQV964OaP4M88Gw69Fv3UsHD189iKGkPftDvi0zgABV+ +1njLb4lyxVFZ0o60z1Rwv7SRu7luJy46rpV+d5QKhbVfQho37cCHNXraesY5 ++WqwTUZ7zgG/eyRy7eI0Ffp2px3I+WaHn6kiWxIWqDBU/S1hfK0t7jrbetp4 +mQr2xzOadBpscHX9I83eK2nw65Cf+scqK5wrTIorkZ8GDVzh8diMOf629gGz +TIgG0bNxj9xDTfFri/tC28RoIPjVomXO0AQ/jtbc/SVFg4hNYc+NtI1wq+jK +qfUKNDAQZt3ndQdcoXnHBkNlGpTeGLjLcxTDJ1Yu+e2m0SDBOXpn03FDvNm0 +6EaUGg26kVP4oed6eEaC5edCLRrMBDwp/rRbB/dpmVB6qscZ/83PpMING/FN +gpluo0wanB/vV2/X18SFbLCctUY0sON+fYA2oo4PnB/q0jCjwf1oiQXGfRWc +3X5G3MGaBsuO1/cP9dLw02IatiG2NGin9rftNqfgzo6d57KdaEB1c1zrPaeM +MzJPtNTvosEjtoB58KASvthN5PvkTgO9fQNy13kIeJvMc+OV3jR4PPpJy6hE +Dr/qGhBF9aOBTK4Fn+J1aTwoT6LeMpAGPpszLtKm1uNmA7Xzh47RgHKeKR52 +ShyXIXrqXgijwYcvWmumnETxH3tXH62KpMFW4TpJwl5hfCzPpL7hFA2kwg8v +v3dci4/3RPG1nuGsL/ijQRoSwCfE6207k2mwkpRc5B/Gh09tm8/5lEaDUIoT +2C6txH8l6nz5kUUDyD0QOdLMjU8/Pqzx+zINiKsou7IeceGzXLfDeAo56wch +6JhexOY2jT4SukGDlKbjafMNC9jvYMo6mTJOPD7xX/o5MIctVHruJLNokNVf +tWPKZgb78yOvUKOaBkUvDGKo3L+wv9Ten5vqaMDHeql+7NcEtuQpqW/2kAYi +pFfrJvXHsOXL9jF2Tzjtc51Th8dGMa6e8y92t9Lg6e2SB4eWvmLc4i/WH2ij +gTK9WgDcPmMrt632CHpHg+/nuUOXVw1hqxJNSiLf0+CFy+Vl2tgAxvs4aibx +Iw1edY46Lyj2Y6u56lHGMA3OrrIo7ml5jwlsmj9T8I2Tn8xapXVvurA1wTod +pWM0kO+tFOhWeYcJVh5WuPeLBozRSaGjr99gQj/KfJp/0+DjeFcc7502TJg6 +ynq1SINCKeWtoiUvMRFPymIPNx12BvivdnFswUQve5p95qODh5qWxqXdTzHx +7rwLE4J0kD222pZ9/xEmIdbb+0eEDgm7LtbnuDdh620kKXySdGjSn3piYNmI +SZ2xDxSVo0OPe/GhK/11mPSj8zXySnSwAqPzz1LvYzLLrSvpFDrslaHXuBbf +xeQMV2/TVqGD6+BE4irBKkz+mMklpEGH5ETy1fj6SkyhImrIUocOZ2xNzSz3 +lmOE73VqToZ0+HXyszdvUwmmRJkP8UB0WI++WpASb2BED52mgyZ0OB4ToTFR +XoyRcg8LHregg2iKS8ofWiFG6SpzirWhA0933tWF7/kYVXQ0P9meDrmnRxYt +P13GaFsp3y8500FvJbtdf082xkjw1CneTYdDf/vmL5tkYqrNeZEVnnQw+aM4 +0hqXjqktvX9eu58OeRtzjrhJpWLqBpLiTw/S4Y2b7U6NL+cxjSB7tzeHOfEJ +9Fw+JZuEaZWfv/EhmA6V8TeNiU0J2MbR1qmRcM56Do8ri7yMw7TJq7HpKDp8 +fUhMe6URi+m6m8Qvx9EhaJ/kfeJQFKaXE9UucJYOb/nbZObvRGD6nXWy61Po +YPHsM+sqIQwzFJn3UrpIh6e5pkeW54KxTdY6FaqcIlxhkhHqtyEIY8YfXtC7 +QgcdE1Y5u/YwhjeVmRgX0YFlYGrcQw7A0OK3ZJubdIglVdfkOPthoE/p2Xmb +DgF8/DlELh/M6KinshebDqEjFnalQl6Y8e28Q4H36FDDl8gQOu6JmXx7Xx1e +z1lP8e3NpzXdMVOSJHd8Ex2+7DugSd7rin3zNLux6SkdJj26bfZI7cSSCkJs +JlrpMH/YQKBazQnTGLg+XdRGhxNJNmn7s+yxtwrd2Tvf0aFx/Yh6r40tFrx7 +9Wah93Q494mXIHHBBpPJ1f/a1E+H+BOzxg1/LLH69z7nQoboMF2k/ka3zQxz +l760UXWEDpecn2yL4N6C8Tg/7xn4QQfLhtfL3+KNsGsZ85EXJzn5MpObuXIH +YBbv6BTLWc549ND+p6+Y2A8xlxdLC5z57IZ4wl4D7Lxd4hH2Mic/vh51bN+t +i2ldqJHyWcmAZEvrp+vZG7HO16MP5PgZcEww3i/aWRMLFZL1al/LgKkhNe/8 +M+qY3FarNadFGaCud7Tq8kcG1ng2vNJQkgE6Z3f/CiiiYntbSnaMyzKAUlZ+ +T7uVhPHy9y0WEhicevwyMsaciN00EyxyJjMgfErdAxclYNanmZZrGQx4SKR+ ++oHLYeOPDk48VGdAyOn42Kg2KSyV53JG8EYGXLEgGOm2SmA6Ri+ZKvoMiC0e +0SwhimHdUYuDH5kM6HhEf/O9VRg70aB2Jn0zA4InzY+kh63FFJd2b7AwZQDb +I7PncB8/1sRMfrdoyYCMUavn9rd5Me/wB+GsbQwwe9obOTjIg/HXjCntd2CA +lN2G807+K7DS3wrPZHcyIPpF2ImLSUvMbXrb/Nt2M0AO1zahNC8wp45Fisd5 +MiCnmVWlGTjHzKgqrzHYz4BXASE9R+OmmQa/PrqP+THg+4P59J2zk8w+TWG+ +wkAGVJq92ZkbMM6MCoSyHccYsOLza0P5qO9M5fJAe8EwBhB8KTIr144wn/zM +n288yXk+90eOGt9n5gHV9ivHYhkwFHnvtanHIFPQb4UpI4Ezf2Eu/4x1A8zy +m5o/+pMYQMz36sta18e0G/FITbvAAMB3ht6O7mbOUFL1zTMYMLhwqjvc6x0z +y6up/282A1ZJiBUulr5hMoumTlVeYcCHupuCw1ZtzI+DRBXvIgZse9F3pt7/ +BZPiHhvyuozzPl6qqp7Me8w8+GGoWb+aASNSdmvi/BqZ6+TEfX/WMqCGepJy +K6eOyXIxEb7ayABfnnWJ8qP3mL+7ilzXtDBg4r7Cl4BPLGbO+nfcja8YsKwj +M9d/qIKJO666GfSWAf60rv74i6XMuDdeMx/6GHDTRH9+LreYKfqSklwxzoA0 +p32iZwuymEvjGsUt0wz42za4sUXpInNUdFPd8DwDNKezvR8ppjKbnLeNSq1U +ATEeO2/VwkTm0eEQ02gpFcg8O1C04cYJZsefZ0u2m1VgRW8AM8TenZnJ8Av4 +laoCLV+ygxe/KTPlEsq36+qqgsndY0XXla5vylIxEBbbrwYx7cKVMdW3DFtk +Nuv8uqAOi++vU1KmLxkYyjWlbOjcAEYX5cSzrzrpC/FcDfKI0QAfk7/TKcPC +egrRisydFE1QF9pp/peWpsNPdr1r91QTGgfdY+h7ubXVMenykN1a4GNPTmg+ +HKR1pF+02ZJrI0znOdV4bS/VGP+V5GiRtRFMI9YrhO8dVTfb8CTbQk0bRMz2 +mmvKyak9+LXpz9wrbRgn+z6UyRdS8VfVet/upQN61WvrYsTX0rGxfR07+XWB +a9eLiFWfn1K2kKS2rr2qC8KkCtUn59NItKjE4016evC77x633UcHIsPLoIH8 +Xg+G22OuVqW/VvR64HOq6rA+iMQUSJ7SdpNvyO/YNylhAL3Hc+mqTgUy0zeW +5zZUGwDX///sJZfwZ281/J8nGWm6rIl/vlf059NMwqb/2cVEGTYpMP9n2UPx +99Ub/1lC4GDl1h3Y/1xkHBE2sfOftSKSjdNc/9lmouJdt8c/n+6cmd978J9/ +X400Cov+5/eb0t5eK/lnn2NFuRa3/3n29h2vHxX/LErsntO8+89Wq+Xl6hv/ +ua7j2r637/7ZUuieWnD3P3ebPZ+V6v3n6ZrvCW4D/6xWoFH2bfT/9Pd+c3DS +z//Tn7g92jDxz97xx9qDZv5Pf42nsyV//3PMQubemoV/Fta+qbp78Z/zDtXM +LC//8/8Dw8wefg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07526578866635979}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3372,6 +9125,7 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -3399,7 +9153,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07335635796919572}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07526578866635979}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -3407,9 +9162,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913457856953163`*^9}, - CellLabel-> - "Out[421]=",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] + CellChangeTimes->{3.9913457856953163`*^9, 3.99383034990637*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"9dc0a1c6-563d-4b17-818a-59f8d48638f8"] }, Open ]], Cell[CellGroupData[{ @@ -3462,66 +9216,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[422]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], + "In[100]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 422, 453, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785749161*^9}, +Cell[BoxData["2.9713205092376938`"], "Output", + CellChangeTimes->{3.991345792196575*^9, 3.9938304275276814`*^9}, CellLabel-> - "During evaluation of \ -In[422]:=",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 454, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785759161*^9}, - CellLabel-> - "During evaluation of \ -In[422]:=",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 455, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785767502*^9}, - CellLabel-> - "During evaluation of \ -In[422]:=",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 422, 456, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457857765007`*^9}, - CellLabel-> - "During evaluation of \ -In[422]:=",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], - -Cell[BoxData["10.362747935330768`"], "Output", - CellChangeTimes->{3.991345792196575*^9}, - CellLabel-> - "Out[422]=",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] + "Out[100]=",ExpressionUUID->"ddc9640f-b3fa-409b-87f8-3f6ccad05128"] }, Open ]], Cell[CellGroupData[{ @@ -3588,68 +9288,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918501903071613`*^9, - 3.9918501951272774`*^9}},ExpressionUUID->"0b10f52e-4583-2a4b-993d-\ -96e59dd43e6a"], + CellChangeTimes->{{3.9918501903071613`*^9, 3.9918501951272774`*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 457, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792232563*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2849952523554315`*^-89\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 17, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.9938304275675907`*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], +In[101]:=",ExpressionUUID->"d00f77f7-3d9f-4a2b-9da1-ec7b4f8164bc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 458, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792242544*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.38854959909203`*^-91\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 18, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.993830427573051*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], +In[101]:=",ExpressionUUID->"733cf8b9-db43-4059-b56d-54eac23734f5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 459, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922505417`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.476110845346785`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 101, 19, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.9938304275780163`*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], +In[101]:=",ExpressionUUID->"828bd0c3-e453-49ae-99f9-9f935175104a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 423, 460, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922595577`*^9}, +during this calculation.\"", 2, 101, 20, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.993830427582251*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], +In[101]:=",ExpressionUUID->"78dfd776-5521-4f5a-8b4c-dec9c729a565"], -Cell[BoxData["0.32136877427435395`"], "Output", - CellChangeTimes->{3.991345799137081*^9}, +Cell[BoxData["3.7364170825813074`"], "Output", + CellChangeTimes->{3.991345799137081*^9, 3.9938304366610603`*^9}, CellLabel-> - "Out[423]=",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] + "Out[101]=",ExpressionUUID->"969b290e-5e60-486a-96c8-3763d3362542"] }, Open ]], Cell[CellGroupData[{ @@ -3670,8 +9380,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3716,68 +9425,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185020477277*^9, - 3.991850207864538*^9}},ExpressionUUID->"a58948c9-6d3d-e847-a269-\ -d2e0cc5d1484"], + CellChangeTimes->{{3.99185020477277*^9, 3.991850207864538*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 461, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991730843`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2849952523554315`*^-89\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 21, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.993830436690034*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], +In[102]:=",ExpressionUUID->"69b3202d-35ab-46a9-8e25-52c8c77a8b47"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 462, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991830807`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.38854959909203`*^-91\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 22, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.993830436695327*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], +In[102]:=",ExpressionUUID->"516528af-fa87-4d7d-b04e-3cd376288df1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 463, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345799191578*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.476110845346785`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 102, 23, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.993830436700018*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], +In[102]:=",ExpressionUUID->"10ac4616-ea93-4ca9-b90d-d2466364c514"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 424, 464, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457992005787`*^9}, +during this calculation.\"", 2, 102, 24, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.993830436704424*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], +In[102]:=",ExpressionUUID->"360bbead-2298-4d9a-a762-c90bfa838b26"], -Cell[BoxData["6.886509882261309`"], "Output", - CellChangeTimes->{3.991345804559931*^9}, +Cell[BoxData["18.32784024546469`"], "Output", + CellChangeTimes->{3.991345804559931*^9, 3.9938304456608067`*^9}, CellLabel-> - "Out[424]=",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] + "Out[102]=",ExpressionUUID->"e0b49e68-daac-4dc8-9291-bf2cb18d41bb"] }, Open ]], Cell[CellGroupData[{ @@ -3798,8 +9517,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3844,68 +9562,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918502122939777`*^9, - 3.991850217343153*^9}},ExpressionUUID->"c817b2d1-7deb-5a45-9938-\ -ca10003188eb"], + CellChangeTimes->{{3.9918502122939777`*^9, 3.991850217343153*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 465, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046014442`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2849952523554315`*^-89\\\", \ +RowBox[{\\\"\ +615493467799644711600158091373056206404834776129768290854744676295022\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"80\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4657222342968161239204962580299776000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 25, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9938304456991787`*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], +In[103]:=",ExpressionUUID->"40319569-a63f-4cd6-bd7d-364f0aa2a9aa"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 466, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046114445`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.38854959909203`*^-91\\\", \ +RowBox[{\\\"\ +355509027001074785420251313577077264819432566692554164797700525028005\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"84\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0116252984099317647863863811506176000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 26, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.993830445704273*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], +In[103]:=",ExpressionUUID->"bdbad927-4fae-4921-9764-884f9c81befe"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 467, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345804619444*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.476110845346785`*^-92\\\", \ +RowBox[{\\\"\ +210781302108937240275667003819849110311441568792015364308556641289104\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9263942724854334184848538420117504000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 103, 27, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.993830445709029*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], +In[103]:=",ExpressionUUID->"a3b59fde-7d87-440b-9804-18bd458531d3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 425, 468, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046274433`*^9}, +during this calculation.\"", 2, 103, 28, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9938304457132998`*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], +In[103]:=",ExpressionUUID->"e95a05e2-abaa-4c14-b288-04fdec437c63"], -Cell[BoxData["18.478556086442907`"], "Output", - CellChangeTimes->{3.991345807954506*^9}, +Cell[BoxData["1.1471972534745736`"], "Output", + CellChangeTimes->{3.991345807954506*^9, 3.993830451822839*^9}, CellLabel-> - "Out[425]=",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] + "Out[103]=",ExpressionUUID->"4903f00a-aae9-4c8e-b136-aad8a41f4767"] }, Open ]], Cell[CellGroupData[{ @@ -3914,22 +9642,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991850221900238*^9, - 3.9918502257325497`*^9}},ExpressionUUID->"350334c7-7c47-c24c-8adc-\ -781173809e57"], - -Cell[BoxData["0.028488532115740543`"], "Output", - CellChangeTimes->{3.991345807987507*^9}, + CellChangeTimes->{{3.991850221900238*^9, 3.9918502257325497`*^9}}, CellLabel-> - "Out[426]=",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] + "In[104]:=",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], + +Cell[BoxData["0.8148555996530753`"], "Output", + CellChangeTimes->{3.991345807987507*^9, 3.993830451846655*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"7367d422-3ed3-4b25-9ebe-e7f5d709e20e"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991850228782873*^9, 3.991850231287325*^9}, - 3.9919246253575134`*^9},ExpressionUUID->"597921e5-69d3-564d-a8fa-\ -092e912c15e0"], + 3.9919246253575134`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ @@ -3952,12 +9681,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[428]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], + "In[106]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.991345808020666*^9}, +Cell[BoxData["9.701974835645975`"], "Output", + CellChangeTimes->{3.991345808020666*^9, 3.9938304518594217`*^9}, CellLabel-> - "Out[428]=",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] + "Out[106]=",ExpressionUUID->"52127656-fa5e-4202-8df7-df167986e853"] }, Open ]], Cell[CellGroupData[{ @@ -3967,12 +9696,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[430]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], + "In[107]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913458080616665`*^9}, +Cell[BoxData["0.03853285923433961`"], "Output", + CellChangeTimes->{3.9913458080616665`*^9, 3.993830451866145*^9}, CellLabel-> - "Out[430]=",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] + "Out[107]=",ExpressionUUID->"87fd9e61-2302-4b5f-8c95-360136898abc"] }, Open ]], Cell[CellGroupData[{ @@ -3982,12 +9711,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[433]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], + "In[108]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.991345808188246*^9}, +Cell[BoxData["0.3738448306370516`"], "Output", + CellChangeTimes->{3.991345808188246*^9, 3.993830451872622*^9}, CellLabel-> - "Out[433]=",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] + "Out[108]=",ExpressionUUID->"7742039d-8d3a-4805-9ecb-f9c79c3d644e"] }, Open ]], Cell[CellGroupData[{ @@ -4177,12 +9906,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[434]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], + "In[109]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[BoxData["0.04214145338799881`"], "Output", - CellChangeTimes->{3.991345808220566*^9}, +Cell[BoxData["0.011738286819502092`"], "Output", + CellChangeTimes->{3.991345808220566*^9, 3.993830451881022*^9}, CellLabel-> - "Out[434]=",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] + "Out[109]=",ExpressionUUID->"8c974d32-c9fa-4c1b-89ec-ef7d609093ee"] }, Open ]], Cell[CellGroupData[{ @@ -4196,12 +9925,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[435]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], + "In[110]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[BoxData["4.317080886816563`"], "Output", - CellChangeTimes->{3.9913458083195686`*^9}, +Cell[BoxData["8.179798060866657`"], "Output", + CellChangeTimes->{3.9913458083195686`*^9, 3.993830451952383*^9}, CellLabel-> - "Out[435]=",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] + "Out[110]=",ExpressionUUID->"6f24820a-5191-4555-8510-46eac18044a7"] }, Open ]], Cell[CellGroupData[{ @@ -4393,12 +10122,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[436]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], + "In[111]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[BoxData["0.012862376162526763`"], "Output", - CellChangeTimes->{3.991345808334568*^9}, +Cell[BoxData["0.1948766064575799`"], "Output", + CellChangeTimes->{3.991345808334568*^9, 3.993830451961699*^9}, CellLabel-> - "Out[436]=",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] + "Out[111]=",ExpressionUUID->"cab55e7c-9b3b-493c-8644-b1caeec8dbc0"] }, Open ]], Cell[CellGroupData[{ @@ -4412,12 +10141,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[437]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], + "In[112]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[BoxData["7.814196669618258`"], "Output", - CellChangeTimes->{3.991345808432392*^9}, +Cell[BoxData["2.0075440642672633`"], "Output", + CellChangeTimes->{3.991345808432392*^9, 3.993830452051428*^9}, CellLabel-> - "Out[437]=",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] + "Out[112]=",ExpressionUUID->"a95a8331-ae74-489d-927a-1f50ef500e59"] }, Open ]], Cell[CellGroupData[{ @@ -4510,12 +10239,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[438]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], + "In[113]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991345808448488*^9}, +Cell[BoxData["0.19148677740942904`"], "Output", + CellChangeTimes->{3.991345808448488*^9, 3.99383045205931*^9}, CellLabel-> - "Out[438]=",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] + "Out[113]=",ExpressionUUID->"a01dd86d-6e27-4bb1-827e-ffecde3fa1b9"] }, Open ]], Cell[CellGroupData[{ @@ -4605,12 +10334,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[439]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], + "In[114]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913458084773808`*^9}, +Cell[BoxData["0.808513222590571`"], "Output", + CellChangeTimes->{3.9913458084773808`*^9, 3.993830452066558*^9}, CellLabel-> - "Out[439]=",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] + "Out[114]=",ExpressionUUID->"ed92884e-ab3d-452c-8735-edb8fa99550f"] }, Open ]], Cell[CellGroupData[{ @@ -4733,12 +10462,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[440]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], + "In[115]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913458085134735`*^9}, +Cell[BoxData["0.15481959148678082`"], "Output", + CellChangeTimes->{3.9913458085134735`*^9, 3.993830452074379*^9}, CellLabel-> - "Out[440]=",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] + "Out[115]=",ExpressionUUID->"33eb8692-cf2c-413c-a48a-66f3c13c958b"] }, Open ]], Cell[CellGroupData[{ @@ -4800,67 +10529,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185025346871*^9},ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], + CellChangeTimes->{3.99185025346871*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 469, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085463753`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.448453200473932`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"107\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2707682415379978334035760486809600000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 29, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.99383045208746*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], +In[116]:=",ExpressionUUID->"14445f4a-dee7-40ed-8fd2-e4fa1b68df9d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 470, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085563755`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2303200991204093`*^-65\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"111\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3224159552670743172353993631334400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 30, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.993830452094507*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], +In[116]:=",ExpressionUUID->"2368104c-8c96-4962-814e-677a72b34aa0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 441, 471, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345808564377*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.032217301443663`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9669803644763824129779062695526400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 31, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.993830452100624*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], +In[116]:=",ExpressionUUID->"f0366ce7-ad16-4825-9831-0aaa7e983174"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 441, 472, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085733776`*^9}, +during this calculation.\"", 2, 116, 32, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.993830452105995*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], +In[116]:=",ExpressionUUID->"c6df33d9-b32a-4266-beb5-f4ed4448882e"], -Cell[BoxData["4.317080886816564`"], "Output", - CellChangeTimes->{3.9913458125059433`*^9}, +Cell[BoxData["8.178443842897524`"], "Output", + CellChangeTimes->{3.9913458125059433`*^9, 3.993830457320282*^9}, CellLabel-> - "Out[441]=",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] + "Out[116]=",ExpressionUUID->"20138d1d-0225-4be1-90ab-9d229664f1f0"] }, Open ]], Cell[CellGroupData[{ @@ -4922,68 +10662,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918502579298553`*^9},ExpressionUUID->"baacd3f7-96e4-2949-b9f9-\ -9afb90e551d9"], + CellChangeTimes->{3.9918502579298553`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 473, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812542961*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.448453200473932`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"107\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2707682415379978334035760486809600000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 33, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9938304573506804`*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], +In[117]:=",ExpressionUUID->"6c09d7d9-609d-44e7-bb6b-296ac631e808"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 474, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812552984*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2303200991204093`*^-65\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"111\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3224159552670743172353993631334400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 34, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9938304573569927`*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], +In[117]:=",ExpressionUUID->"2ca67db2-c7d0-4075-993f-4cceb043d9b5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 442, 475, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134581256196*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.032217301443663`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9669803644763824129779062695526400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 35, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9938304573627853`*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], +In[117]:=",ExpressionUUID->"06b40117-6b1e-486c-b347-ba30ce1524e1"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 442, 476, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812570959*^9}, +during this calculation.\"", 2, 117, 36, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.993830457368185*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], +In[117]:=",ExpressionUUID->"1b0291d2-a12c-4bd2-a6e3-1e46e962b590"], -Cell[BoxData["7.8141966696182585`"], "Output", - CellChangeTimes->{3.991345816415531*^9}, +Cell[BoxData["2.0072117024870053`"], "Output", + CellChangeTimes->{3.991345816415531*^9, 3.993830463020876*^9}, CellLabel-> - "Out[442]=",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] + "Out[117]=",ExpressionUUID->"8cf8f6b7-bb26-4080-b9d0-a6ae31a64d05"] }, Open ]], Cell[CellGroupData[{ @@ -5041,95 +10791,114 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918502605597496`*^9},ExpressionUUID->"ea08a5a9-d446-9147-ba82-\ -e3924f732df2"], + CellChangeTimes->{3.9918502605597496`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hc81X0UB/CbiEillIqGkVJPkXlJzrHXtRtkr8gjs2QkmrSRJBGP+xMV +ihIpEhXJzkhcO2XvjJTn66/7er8+53x+547XFXbwNHVmo9FowktotMXXoywD +n72z0hhu+96fXZgHr8TaJUiIyuCUjfpxh8/c2HuNsdd8mSz6pG6vklyzHIX0 +LQWu8ctiFfu++dvTXGjK7UYrFJFF/gvrW/lZXFgYHlYnCrJIrZVzdU/jwjuX +iv1GTstiSxHzoRdyoUYI/e3lPll00airfXOKE//zETPOqZDDC91aNfWTHJjd +VnRtQ6scmo881HjVwoHFetalQQNy6Boa4fSmmAN7RGJU1LjlUVO2VXZLJAeK +f+HcU60tjyLcohMMSQ5MlxlY3lcsj3oCc+cOeLNj3mRWidArBSyKEW6O516K +n+wMF0LKFNDRK27vlik2/FbRr9TdpIAJ646ez29nw9+UaPajXwp4eS42Qz2H +DVUO3UmSl6XjxTpGXbQ9G77P8Q82fkpH+msruw1vl2CNHyhcTFHEgwYJBY3X +aXiiKuF+4gtFPHnRQKw+kIbc4vML+SWKmKlyevlPVxpqNuSVjXUqYsmS0m5T +TRrmy0gftd2ihL8etzU5/l0AalQsWOmuEtro3lCdH/oL/m7cJaPh+3FL1B0X +mcF5WFfsumNF7H70eH3Fy7VyHrI3ll7bkbof/yb9w/k+cx6Gyi4ctPmwH+20 +/TcNe8+Dw44/3z8vUUZZz5obXHO/gdEzwpUaqIxhospd//D9BmGbBkNr9wO4 +qWNP/LDFLFBFq0pPBh7A+DxrNRvVWRAX1YPr4QdQjdl+qn/nLPzzs1DyNXUA +P74KmD0yMwPyPmmrN7LI/jmjJxdiZ4BxOaiu3kAFtw0xxhdY0+CXKXyYIQnY +lbNRLuXML5hZbVXleABw09biJ84uvyDIN0YrSB9wW6/6PRXTXxBK51F47AJ4 +Hk1sFXf+gmvFkwJcSYDP5JMZRg1TYDzQPWjPhejmvPVjl8wUOC+8zNwcgHgx ++wxbx5JJ4OcUjH4Xivhy0M++f2gCileGBDiHIx6zPXSE99sEbNuirZFxF5G9 +0ux8fPYEtCo3NSu/JPvvVim2Ok2AaeA0u9UEmbdyaXxfOQ4qUwqWcSdUsbFP +a9Lu2RgMzd9HlVOqKC6XW4CJYxDPThPvOqOKNX+m1OVujsHs2rJRieuqqDTP +WG/lPgYvpM0vv3qsineDWB8TJMZgl5d/1tcfqqi6UO/fnDoKAgN5nAIOang4 +wCJyymkE6DPc0/Tjatg/HL7WW3cEjnJY9x71UsPMqEoBnr0jEL91yYcHZ9Uw +4sGnFXHTwyByUPe8+H01VNNYFrL1+jDsLWiel6tXQ8VVf1tS84dA69bc2EEt +dRxcZSH8/J9BcI1ndPoZqOOD3XXL8vgH4cqjBzWxB9VRZZ3LfOP8AFSUqD1t +dVDH8JmsOw6VA2A6c9XdKUQd5xu/z6V7DoC1veAP3zx1zFUPGhzP64eTMsqt +Ubs0MD06/LOHdR9YyY+0R+zTwPdld1d36/SBhmJy9026Bibb7PngLtsHa4Fr +4KqWBoZa7FtXxNMH2Xr1s+cdNBCtx885vv4Jo/buAr5xGsj4/uRy2Jaf8G9E +vKkZtybGSk4kx030gulto8MmfJo4l3eT80ZnLyjFsB012qCJhjpPWiKre4E7 +3tVeX1wTuXg8Auue9EJaqqyXupomFn2Kktrj3Au9hRU3ZAI18dDwQLVcy3dw +GJovW9uvicqGxfNL63sg9+OvqUdjmujb5n2wuLgHViSNiuCsJp7KP2B7O4vk +pj1n3Lm0UL++Y++JWyTP+yz1QVwLO8yfiPzR74Gc83Gxfo5aeHsz7A4s6wau +DXTX5lYtbM84XWhQ1QXWY/vuePZoYfS+mhz5t12QXb67mGNQC//bVJQs+awL +rIK3Ckn/1kI7xxu8JlFdkNW1rObqRm0siuf+a3SkC45mNCgoH9bGb5rl1nt6 +OiFDzZczsVobzxW9Eurh6oSTwpYqzxu1MehzoOeV+Q5QpqmfKmVpY8WaDWlK +ox1QUbCme2RAGy/5H48uauqAQXp2IXLpYGhXZbt5agfskhw71YU6aLbCM+Op +TgekCXr2bM/WwfPGp1mKO9rBa+6woNIrHUzz+PNMn68d6M0qpoZFOtiXvWmn +z+82KItZWeRXpYMvQ8yp+eo2+MGXeb+0Xwc/Gi8z5QhsA3GuIdPjorp48PaZ +8tpaFlCTbu/So3UxbbpH+u2tVmh+dE/YIl4XLyevG7kb2AorbcvOcVC6KP3c +u+iScysEfNquZvNcF7V4Zg8k7W8FwwcdxavqdPHaxZb+yp8tMKt9+L3PKj30 +W9OQ+UurBQzvq5bSr+ohK+bE/Wa+bzCjuqHyfYg+ZmYYd29nNcHkYKqqQZg+ +1skmjbRVNMHIXYWXDTf1cf0He9HUN03QO3Q4sTdBH9Mtdhc4xTdB/b073lxv +9HFrmEJXlFUTZI2tWc+Y0ce4ie9B6e2N4PYfr+0XLwauaTQIdR5tABZt6Vin +vQG+i74o/ZxeD4ysUM+frgb4dZ3glvh/6iHf/u/QsKcBWpy24bm1rR5iimf7 +fwcb4MCnkuIornowvjjasy7OAJ9mnLm5uvkLFHO2fdWtM8Dcuh5uVtAXeLjy +VVGWmiEqXix0PV1WBx5CnhHnRI1wZ5X8peKgWtBjytC37TZC5SvBkiu9a0F8 +10x7obQRmjuU8jgeqwWWwjnJeVUjfB3wS2anSS0wzG5X+dkZ4RURQ/rWHbUg +cTV3hXuCEXoM/ejKra+B8d8hGk94jPG43YuYg/I1kHm8rOjOJWOs992VVCZS +BQ1P/9sodsUYpeNmX8SsqYL5qUCf7OvGeOykopQ3WxXon98jVn3bGH8xcnfr +d1XCz7ioMK5kY7xaJzoVmVwJwhVWhkGFxvjnreWw3fZKiN471mI3bYxs4Vea +c2UqIHBi4/Tu4yb496bQ8HLvcvhKxTgtO2GCMpv+CIU4lIP84bV1HV4mmBNw +i7VgVg7jeSsy7vib4PndVb2iCuXgdnbBYSHMBB1Kkjon/3wCi+Xfq+oemmDE +qROdz258AvrWZw8Dekww8bJxnVZOGUzpaR0utTVFyYQX/oUipSB/eqLylqMp +toWq5P5dXwr+zCRNcxdT5CxIKtTmKYW533OyfR6mOLG3gnNy4iP8TX+6lues +KT7dm0O9+PARlq3aWGsYb4rRPP7/VLt9BIEvA/qNX03Rl3JQl339ARQtI1W/ +m5ihTfiJh3t930PdxgS39zIH0dK3jl/PvBg2PbzwJm3nITzFPm1y0q0I8jp2 +MQx5D6Oz7bRPxYcC2FI/6uI3dBjD2mfnI/e9Bpk7kenMjiP4Jp//k8unPEhg +n9gbVWKOAQ28e9Y2v4SXqpLfLr2yQF6dcwU8nDkQq3CVb/7xUVQpyBCcDHwO +1S0pl2WuW6JM4kW/LfRsyDGIF/MKtcKgld52FziyYOyEGc3DyRojBrHrKvcz +mNKScB1Wt8HkpavjrB0yIW2oecZX3pb8o/BbFhSng/l/KY7WK+xQ6Z18pcyJ +J/A8W992aZgdnimRZJrveAyKgnWzV2btcLJP/B6/0CMQ7XD5VnvcHmsEYq+t +kEuDHp5/jeK77bGD/WtWmkUq1Nw0dNQ+5ID+bZcVvVIfQrR/Is+pGgeUkn6f +/ID2EN4ULsw66jqil5BFp9qpFNj3Tpa+Q98RpdbPyR/zTYGHJcf9+hmOGJo4 +V3zVOwUiy76Mexk7YtJg8ZmmEylwrC51IPiIIxbt2OQRciwF+HqNWHedHbFj +kvaXy5zkvElFn885ot1q/wiacgqsssIwmXyy72yh4MWZAtv4S6uF3jgiOn/7 +9oYjBaQqDDYsK3TEbQJy9dzsKWCqbPno6zuyX7uy9DEtBaKF/D4HfyLzYWHM +uVkKNrGerCr7Suar9/Q3D1IgZiMQazVNnu+1wyz6CwWKdsNpl2SdkMZoze6l +KHh4b9TXUH7R76ITmBTwfxlXEaA7oV3Zn5uHkikY1pyuT9vvhEVK0Z/LEimg +dtOWVKiR+dZumzdxFKyc5rNYY0JcK/qmKYKCnhtyyxNPkH3b9ApWMAUmpQr1 +Lp7EfFGM3DMUFNKUEqW8nbBDfpAVGUTBPV8VueKTToibJWX1AigwtNC2/x7k +hKGHzB6VnqTglZjFq91XiXtbr0z9S8HN12eO5z0k90hFVAhaUnBC+q6ifxrJ +A1bQhY5SwHiUtZz+mPSxQqjNFhRw3+19lJtB7qtLChE9QsElH+P+ly/IvMsO +pf1mFJyREPs3p5j0ub2+H6dPgdvdz+7ZbWS/tWFK4AAFuit7lX06yH4+U4qu +TMHOSzRe6S4yv9/ZxWI/Bb0+chlZ30mf5d6yB4oU2BsmDj0bJP5RYyonT4E5 +h6/H0znSx0hxj5SkQNt3k1f6emcs8u0oYBeloDjxsl7UBmfEx+e6ZEQoUK4Y +F/Pf5Iy0T3G7nIQpkNr+uVl9C8mPRomVbaVgY1OQest2sj8k/TpBiIIBJdZ6 +bjmSr2wxDllPwS22pAIXM2cMzXq7XpCHvH/JFbEGh8i8KbudBzcFFy39fWSO +kDxXqKx4OQX+L4x3LBwlz7NVn/TgIvcfWxIZ40DyiKq8eg4KZModnD54k37j +8sYGGgVNkdt5RCNIn5htZMY0EzKB1/VnJMlfNMbtIb44NPk+4zbJ8z/HZf5i +grTu+7P0uyQP/xr8fIoJN2mO4wYPSM4vWVU2wQQtz6Rm/3Rixb5LwqNM2Lw5 +XF4lk9zz4fLQsxEmTJZ73l76jOxb2+ipEieLg8HN5+S+KK9up2Em/GGxipj5 +ZN5BKDJ3kAkvGIJpVWVk/sFk+dU+JlybY+OILid5yutgCWKHtH57iwryPCGm +2KefTFjNni/YU03yx1GGPMTur81vzTaSfhU63/1eJojuivET+07Mpqnxs5sJ +c03BX/p6iXd82RdDXHPJWerpT+LoyDWaxGc7ZfsVB0nfD9eMlC4mfIv9Ym00 +QfJbvNo+nUyI4uTTDFxyDEOXCSzQ25nwZpxleXLpMaTFPLIfbmPCD9ZjHw8O +4hyDcYpY+YVGksNyYtcbCeuIe+38f+vxkf1q/U0cLHI/Q3ON5lqSm5cPlLQy +Yb/CGglYR+zS23+BOII3/bDMRuIP77w5F/P89ixBYbK/7UGSUAsTjqWkl60T +Jc5PZPV8I/MRAe2rthMnf9POJO49tpaXXYLsT1UxNRbztdqug1LE58/5hzQz +If/v2pBeaeJXgltMiL/3ddzpkCWujRsVJVYqCiypp5O+DSJClV+Z0OOeuaUA +ifmtru8hXmkeJJerRuYfiMRyESuq6zCyNIgtr9T0NJHfy8augBQd4pKNpUnE +eexPIxL1yL6c3KVQ4u6RoNR7DJK713vaE9M/rmu4YUxyu4vl4sQOWV0DYaYk +bwtX4iG+Ef+U7fxBksfNNI42MqHLR1fKz5x4Cfudt8S8Nuu1vY6Sebs7L9OI +6brd1m5Wi59/MPtt4htbg6/Z2JH5m7D9X+I8br1kcwdiC74Z88W+qfWvTJ3I +vJjEtPZiX2d3NePYYt8FEfpiX8WzXi1XMl8oFChB7JAb/AfdSC41/kdwsT9Z +j3+/O8l7aJmrFvtvCOyW8yDW0rrKvtjv36Mq6UXMXhQ118CEFU5Z5hI+xMvd +S8eIFYzOeoqeJD6rs7Of2EFJ//JmP+Jys5xu4uvbNyQI+BPHXPdoI365+vtz +vkDi0jGzb8Sdv7PKec4sfr/nnZsW+3+c7eQ4S3IJFWYDsXyd/sxCCMntxXgX +/T9pOn5g "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5143,107 +10912,124 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1Hc81X0UB/CbiEillIqGkVJPkXlJzrHXtRtkr8gjs2QkmrSRJBGP+xMV +ihIpEhXJzkhcO2XvjJTn66/7er8+53x+547XFXbwNHVmo9FowktotMXXoywD +n72z0hhu+96fXZgHr8TaJUiIyuCUjfpxh8/c2HuNsdd8mSz6pG6vklyzHIX0 +LQWu8ctiFfu++dvTXGjK7UYrFJFF/gvrW/lZXFgYHlYnCrJIrZVzdU/jwjuX +iv1GTstiSxHzoRdyoUYI/e3lPll00airfXOKE//zETPOqZDDC91aNfWTHJjd +VnRtQ6scmo881HjVwoHFetalQQNy6Boa4fSmmAN7RGJU1LjlUVO2VXZLJAeK +f+HcU60tjyLcohMMSQ5MlxlY3lcsj3oCc+cOeLNj3mRWidArBSyKEW6O516K +n+wMF0LKFNDRK27vlik2/FbRr9TdpIAJ646ez29nw9+UaPajXwp4eS42Qz2H +DVUO3UmSl6XjxTpGXbQ9G77P8Q82fkpH+msruw1vl2CNHyhcTFHEgwYJBY3X +aXiiKuF+4gtFPHnRQKw+kIbc4vML+SWKmKlyevlPVxpqNuSVjXUqYsmS0m5T +TRrmy0gftd2ihL8etzU5/l0AalQsWOmuEtro3lCdH/oL/m7cJaPh+3FL1B0X +mcF5WFfsumNF7H70eH3Fy7VyHrI3ll7bkbof/yb9w/k+cx6Gyi4ctPmwH+20 +/TcNe8+Dw44/3z8vUUZZz5obXHO/gdEzwpUaqIxhospd//D9BmGbBkNr9wO4 +qWNP/LDFLFBFq0pPBh7A+DxrNRvVWRAX1YPr4QdQjdl+qn/nLPzzs1DyNXUA +P74KmD0yMwPyPmmrN7LI/jmjJxdiZ4BxOaiu3kAFtw0xxhdY0+CXKXyYIQnY +lbNRLuXML5hZbVXleABw09biJ84uvyDIN0YrSB9wW6/6PRXTXxBK51F47AJ4 +Hk1sFXf+gmvFkwJcSYDP5JMZRg1TYDzQPWjPhejmvPVjl8wUOC+8zNwcgHgx ++wxbx5JJ4OcUjH4Xivhy0M++f2gCileGBDiHIx6zPXSE99sEbNuirZFxF5G9 +0ux8fPYEtCo3NSu/JPvvVim2Ok2AaeA0u9UEmbdyaXxfOQ4qUwqWcSdUsbFP +a9Lu2RgMzd9HlVOqKC6XW4CJYxDPThPvOqOKNX+m1OVujsHs2rJRieuqqDTP +WG/lPgYvpM0vv3qsineDWB8TJMZgl5d/1tcfqqi6UO/fnDoKAgN5nAIOang4 +wCJyymkE6DPc0/Tjatg/HL7WW3cEjnJY9x71UsPMqEoBnr0jEL91yYcHZ9Uw +4sGnFXHTwyByUPe8+H01VNNYFrL1+jDsLWiel6tXQ8VVf1tS84dA69bc2EEt +dRxcZSH8/J9BcI1ndPoZqOOD3XXL8vgH4cqjBzWxB9VRZZ3LfOP8AFSUqD1t +dVDH8JmsOw6VA2A6c9XdKUQd5xu/z6V7DoC1veAP3zx1zFUPGhzP64eTMsqt +Ubs0MD06/LOHdR9YyY+0R+zTwPdld1d36/SBhmJy9026Bibb7PngLtsHa4Fr +4KqWBoZa7FtXxNMH2Xr1s+cdNBCtx885vv4Jo/buAr5xGsj4/uRy2Jaf8G9E +vKkZtybGSk4kx030gulto8MmfJo4l3eT80ZnLyjFsB012qCJhjpPWiKre4E7 +3tVeX1wTuXg8Auue9EJaqqyXupomFn2Kktrj3Au9hRU3ZAI18dDwQLVcy3dw +GJovW9uvicqGxfNL63sg9+OvqUdjmujb5n2wuLgHViSNiuCsJp7KP2B7O4vk +pj1n3Lm0UL++Y++JWyTP+yz1QVwLO8yfiPzR74Gc83Gxfo5aeHsz7A4s6wau +DXTX5lYtbM84XWhQ1QXWY/vuePZoYfS+mhz5t12QXb67mGNQC//bVJQs+awL +rIK3Ckn/1kI7xxu8JlFdkNW1rObqRm0siuf+a3SkC45mNCgoH9bGb5rl1nt6 +OiFDzZczsVobzxW9Eurh6oSTwpYqzxu1MehzoOeV+Q5QpqmfKmVpY8WaDWlK +ox1QUbCme2RAGy/5H48uauqAQXp2IXLpYGhXZbt5agfskhw71YU6aLbCM+Op +TgekCXr2bM/WwfPGp1mKO9rBa+6woNIrHUzz+PNMn68d6M0qpoZFOtiXvWmn +z+82KItZWeRXpYMvQ8yp+eo2+MGXeb+0Xwc/Gi8z5QhsA3GuIdPjorp48PaZ +8tpaFlCTbu/So3UxbbpH+u2tVmh+dE/YIl4XLyevG7kb2AorbcvOcVC6KP3c +u+iScysEfNquZvNcF7V4Zg8k7W8FwwcdxavqdPHaxZb+yp8tMKt9+L3PKj30 +W9OQ+UurBQzvq5bSr+ohK+bE/Wa+bzCjuqHyfYg+ZmYYd29nNcHkYKqqQZg+ +1skmjbRVNMHIXYWXDTf1cf0He9HUN03QO3Q4sTdBH9Mtdhc4xTdB/b073lxv +9HFrmEJXlFUTZI2tWc+Y0ce4ie9B6e2N4PYfr+0XLwauaTQIdR5tABZt6Vin +vQG+i74o/ZxeD4ysUM+frgb4dZ3glvh/6iHf/u/QsKcBWpy24bm1rR5iimf7 +fwcb4MCnkuIornowvjjasy7OAJ9mnLm5uvkLFHO2fdWtM8Dcuh5uVtAXeLjy +VVGWmiEqXix0PV1WBx5CnhHnRI1wZ5X8peKgWtBjytC37TZC5SvBkiu9a0F8 +10x7obQRmjuU8jgeqwWWwjnJeVUjfB3wS2anSS0wzG5X+dkZ4RURQ/rWHbUg +cTV3hXuCEXoM/ejKra+B8d8hGk94jPG43YuYg/I1kHm8rOjOJWOs992VVCZS +BQ1P/9sodsUYpeNmX8SsqYL5qUCf7OvGeOykopQ3WxXon98jVn3bGH8xcnfr +d1XCz7ioMK5kY7xaJzoVmVwJwhVWhkGFxvjnreWw3fZKiN471mI3bYxs4Vea +c2UqIHBi4/Tu4yb496bQ8HLvcvhKxTgtO2GCMpv+CIU4lIP84bV1HV4mmBNw +i7VgVg7jeSsy7vib4PndVb2iCuXgdnbBYSHMBB1Kkjon/3wCi+Xfq+oemmDE +qROdz258AvrWZw8Dekww8bJxnVZOGUzpaR0utTVFyYQX/oUipSB/eqLylqMp +toWq5P5dXwr+zCRNcxdT5CxIKtTmKYW533OyfR6mOLG3gnNy4iP8TX+6lues +KT7dm0O9+PARlq3aWGsYb4rRPP7/VLt9BIEvA/qNX03Rl3JQl339ARQtI1W/ +m5ihTfiJh3t930PdxgS39zIH0dK3jl/PvBg2PbzwJm3nITzFPm1y0q0I8jp2 +MQx5D6Oz7bRPxYcC2FI/6uI3dBjD2mfnI/e9Bpk7kenMjiP4Jp//k8unPEhg +n9gbVWKOAQ28e9Y2v4SXqpLfLr2yQF6dcwU8nDkQq3CVb/7xUVQpyBCcDHwO +1S0pl2WuW6JM4kW/LfRsyDGIF/MKtcKgld52FziyYOyEGc3DyRojBrHrKvcz +mNKScB1Wt8HkpavjrB0yIW2oecZX3pb8o/BbFhSng/l/KY7WK+xQ6Z18pcyJ +J/A8W992aZgdnimRZJrveAyKgnWzV2btcLJP/B6/0CMQ7XD5VnvcHmsEYq+t +kEuDHp5/jeK77bGD/WtWmkUq1Nw0dNQ+5ID+bZcVvVIfQrR/Is+pGgeUkn6f +/ID2EN4ULsw66jqil5BFp9qpFNj3Tpa+Q98RpdbPyR/zTYGHJcf9+hmOGJo4 +V3zVOwUiy76Mexk7YtJg8ZmmEylwrC51IPiIIxbt2OQRciwF+HqNWHedHbFj +kvaXy5zkvElFn885ot1q/wiacgqsssIwmXyy72yh4MWZAtv4S6uF3jgiOn/7 +9oYjBaQqDDYsK3TEbQJy9dzsKWCqbPno6zuyX7uy9DEtBaKF/D4HfyLzYWHM +uVkKNrGerCr7Suar9/Q3D1IgZiMQazVNnu+1wyz6CwWKdsNpl2SdkMZoze6l +KHh4b9TXUH7R76ITmBTwfxlXEaA7oV3Zn5uHkikY1pyuT9vvhEVK0Z/LEimg +dtOWVKiR+dZumzdxFKyc5rNYY0JcK/qmKYKCnhtyyxNPkH3b9ApWMAUmpQr1 +Lp7EfFGM3DMUFNKUEqW8nbBDfpAVGUTBPV8VueKTToibJWX1AigwtNC2/x7k +hKGHzB6VnqTglZjFq91XiXtbr0z9S8HN12eO5z0k90hFVAhaUnBC+q6ifxrJ +A1bQhY5SwHiUtZz+mPSxQqjNFhRw3+19lJtB7qtLChE9QsElH+P+ly/IvMsO +pf1mFJyREPs3p5j0ub2+H6dPgdvdz+7ZbWS/tWFK4AAFuit7lX06yH4+U4qu +TMHOSzRe6S4yv9/ZxWI/Bb0+chlZ30mf5d6yB4oU2BsmDj0bJP5RYyonT4E5 +h6/H0znSx0hxj5SkQNt3k1f6emcs8u0oYBeloDjxsl7UBmfEx+e6ZEQoUK4Y +F/Pf5Iy0T3G7nIQpkNr+uVl9C8mPRomVbaVgY1OQest2sj8k/TpBiIIBJdZ6 +bjmSr2wxDllPwS22pAIXM2cMzXq7XpCHvH/JFbEGh8i8KbudBzcFFy39fWSO +kDxXqKx4OQX+L4x3LBwlz7NVn/TgIvcfWxIZ40DyiKq8eg4KZModnD54k37j +8sYGGgVNkdt5RCNIn5htZMY0EzKB1/VnJMlfNMbtIb44NPk+4zbJ8z/HZf5i +grTu+7P0uyQP/xr8fIoJN2mO4wYPSM4vWVU2wQQtz6Rm/3Rixb5LwqNM2Lw5 +XF4lk9zz4fLQsxEmTJZ73l76jOxb2+ipEieLg8HN5+S+KK9up2Em/GGxipj5 +ZN5BKDJ3kAkvGIJpVWVk/sFk+dU+JlybY+OILid5yutgCWKHtH57iwryPCGm +2KefTFjNni/YU03yx1GGPMTur81vzTaSfhU63/1eJojuivET+07Mpqnxs5sJ +c03BX/p6iXd82RdDXHPJWerpT+LoyDWaxGc7ZfsVB0nfD9eMlC4mfIv9Ym00 +QfJbvNo+nUyI4uTTDFxyDEOXCSzQ25nwZpxleXLpMaTFPLIfbmPCD9ZjHw8O +4hyDcYpY+YVGksNyYtcbCeuIe+38f+vxkf1q/U0cLHI/Q3ON5lqSm5cPlLQy +Yb/CGglYR+zS23+BOII3/bDMRuIP77w5F/P89ixBYbK/7UGSUAsTjqWkl60T +Jc5PZPV8I/MRAe2rthMnf9POJO49tpaXXYLsT1UxNRbztdqug1LE58/5hzQz +If/v2pBeaeJXgltMiL/3ddzpkCWujRsVJVYqCiypp5O+DSJClV+Z0OOeuaUA +ifmtru8hXmkeJJerRuYfiMRyESuq6zCyNIgtr9T0NJHfy8augBQd4pKNpUnE +eexPIxL1yL6c3KVQ4u6RoNR7DJK713vaE9M/rmu4YUxyu4vl4sQOWV0DYaYk +bwtX4iG+Ef+U7fxBksfNNI42MqHLR1fKz5x4Cfudt8S8Nuu1vY6Sebs7L9OI +6brd1m5Wi59/MPtt4htbg6/Z2JH5m7D9X+I8br1kcwdiC74Z88W+qfWvTJ3I +vJjEtPZiX2d3NePYYt8FEfpiX8WzXi1XMl8oFChB7JAb/AfdSC41/kdwsT9Z +j3+/O8l7aJmrFvtvCOyW8yDW0rrKvtjv36Mq6UXMXhQ118CEFU5Z5hI+xMvd +S8eIFYzOeoqeJD6rs7Of2EFJ//JmP+Jys5xu4uvbNyQI+BPHXPdoI365+vtz +vkDi0jGzb8Sdv7PKec4sfr/nnZsW+3+c7eQ4S3IJFWYDsXyd/sxCCMntxXgX +/T9pOn5g "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, + "PlotRange" -> {{0, 180}, {0., 3.3911218104294143`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5255,21 +11041,19 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.3911218104294143`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5283,105 +11067,123 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1Hc81X0UB/CbiEillIqGkVJPkXlJzrHXtRtkr8gjs2QkmrSRJBGP+xMV +ihIpEhXJzkhcO2XvjJTn66/7er8+53x+547XFXbwNHVmo9FowktotMXXoywD +n72z0hhu+96fXZgHr8TaJUiIyuCUjfpxh8/c2HuNsdd8mSz6pG6vklyzHIX0 +LQWu8ctiFfu++dvTXGjK7UYrFJFF/gvrW/lZXFgYHlYnCrJIrZVzdU/jwjuX +iv1GTstiSxHzoRdyoUYI/e3lPll00airfXOKE//zETPOqZDDC91aNfWTHJjd +VnRtQ6scmo881HjVwoHFetalQQNy6Boa4fSmmAN7RGJU1LjlUVO2VXZLJAeK +f+HcU60tjyLcohMMSQ5MlxlY3lcsj3oCc+cOeLNj3mRWidArBSyKEW6O516K +n+wMF0LKFNDRK27vlik2/FbRr9TdpIAJ646ez29nw9+UaPajXwp4eS42Qz2H +DVUO3UmSl6XjxTpGXbQ9G77P8Q82fkpH+msruw1vl2CNHyhcTFHEgwYJBY3X +aXiiKuF+4gtFPHnRQKw+kIbc4vML+SWKmKlyevlPVxpqNuSVjXUqYsmS0m5T +TRrmy0gftd2ihL8etzU5/l0AalQsWOmuEtro3lCdH/oL/m7cJaPh+3FL1B0X +mcF5WFfsumNF7H70eH3Fy7VyHrI3ll7bkbof/yb9w/k+cx6Gyi4ctPmwH+20 +/TcNe8+Dw44/3z8vUUZZz5obXHO/gdEzwpUaqIxhospd//D9BmGbBkNr9wO4 +qWNP/LDFLFBFq0pPBh7A+DxrNRvVWRAX1YPr4QdQjdl+qn/nLPzzs1DyNXUA +P74KmD0yMwPyPmmrN7LI/jmjJxdiZ4BxOaiu3kAFtw0xxhdY0+CXKXyYIQnY +lbNRLuXML5hZbVXleABw09biJ84uvyDIN0YrSB9wW6/6PRXTXxBK51F47AJ4 +Hk1sFXf+gmvFkwJcSYDP5JMZRg1TYDzQPWjPhejmvPVjl8wUOC+8zNwcgHgx ++wxbx5JJ4OcUjH4Xivhy0M++f2gCileGBDiHIx6zPXSE99sEbNuirZFxF5G9 +0ux8fPYEtCo3NSu/JPvvVim2Ok2AaeA0u9UEmbdyaXxfOQ4qUwqWcSdUsbFP +a9Lu2RgMzd9HlVOqKC6XW4CJYxDPThPvOqOKNX+m1OVujsHs2rJRieuqqDTP +WG/lPgYvpM0vv3qsineDWB8TJMZgl5d/1tcfqqi6UO/fnDoKAgN5nAIOang4 +wCJyymkE6DPc0/Tjatg/HL7WW3cEjnJY9x71UsPMqEoBnr0jEL91yYcHZ9Uw +4sGnFXHTwyByUPe8+H01VNNYFrL1+jDsLWiel6tXQ8VVf1tS84dA69bc2EEt +dRxcZSH8/J9BcI1ndPoZqOOD3XXL8vgH4cqjBzWxB9VRZZ3LfOP8AFSUqD1t +dVDH8JmsOw6VA2A6c9XdKUQd5xu/z6V7DoC1veAP3zx1zFUPGhzP64eTMsqt +Ubs0MD06/LOHdR9YyY+0R+zTwPdld1d36/SBhmJy9026Bibb7PngLtsHa4Fr +4KqWBoZa7FtXxNMH2Xr1s+cdNBCtx885vv4Jo/buAr5xGsj4/uRy2Jaf8G9E +vKkZtybGSk4kx030gulto8MmfJo4l3eT80ZnLyjFsB012qCJhjpPWiKre4E7 +3tVeX1wTuXg8Auue9EJaqqyXupomFn2Kktrj3Au9hRU3ZAI18dDwQLVcy3dw +GJovW9uvicqGxfNL63sg9+OvqUdjmujb5n2wuLgHViSNiuCsJp7KP2B7O4vk +pj1n3Lm0UL++Y++JWyTP+yz1QVwLO8yfiPzR74Gc83Gxfo5aeHsz7A4s6wau +DXTX5lYtbM84XWhQ1QXWY/vuePZoYfS+mhz5t12QXb67mGNQC//bVJQs+awL +rIK3Ckn/1kI7xxu8JlFdkNW1rObqRm0siuf+a3SkC45mNCgoH9bGb5rl1nt6 +OiFDzZczsVobzxW9Eurh6oSTwpYqzxu1MehzoOeV+Q5QpqmfKmVpY8WaDWlK +ox1QUbCme2RAGy/5H48uauqAQXp2IXLpYGhXZbt5agfskhw71YU6aLbCM+Op +TgekCXr2bM/WwfPGp1mKO9rBa+6woNIrHUzz+PNMn68d6M0qpoZFOtiXvWmn +z+82KItZWeRXpYMvQ8yp+eo2+MGXeb+0Xwc/Gi8z5QhsA3GuIdPjorp48PaZ +8tpaFlCTbu/So3UxbbpH+u2tVmh+dE/YIl4XLyevG7kb2AorbcvOcVC6KP3c +u+iScysEfNquZvNcF7V4Zg8k7W8FwwcdxavqdPHaxZb+yp8tMKt9+L3PKj30 +W9OQ+UurBQzvq5bSr+ohK+bE/Wa+bzCjuqHyfYg+ZmYYd29nNcHkYKqqQZg+ +1skmjbRVNMHIXYWXDTf1cf0He9HUN03QO3Q4sTdBH9Mtdhc4xTdB/b073lxv +9HFrmEJXlFUTZI2tWc+Y0ce4ie9B6e2N4PYfr+0XLwauaTQIdR5tABZt6Vin +vQG+i74o/ZxeD4ysUM+frgb4dZ3glvh/6iHf/u/QsKcBWpy24bm1rR5iimf7 +fwcb4MCnkuIornowvjjasy7OAJ9mnLm5uvkLFHO2fdWtM8Dcuh5uVtAXeLjy +VVGWmiEqXix0PV1WBx5CnhHnRI1wZ5X8peKgWtBjytC37TZC5SvBkiu9a0F8 +10x7obQRmjuU8jgeqwWWwjnJeVUjfB3wS2anSS0wzG5X+dkZ4RURQ/rWHbUg +cTV3hXuCEXoM/ejKra+B8d8hGk94jPG43YuYg/I1kHm8rOjOJWOs992VVCZS +BQ1P/9sodsUYpeNmX8SsqYL5qUCf7OvGeOykopQ3WxXon98jVn3bGH8xcnfr +d1XCz7ioMK5kY7xaJzoVmVwJwhVWhkGFxvjnreWw3fZKiN471mI3bYxs4Vea +c2UqIHBi4/Tu4yb496bQ8HLvcvhKxTgtO2GCMpv+CIU4lIP84bV1HV4mmBNw +i7VgVg7jeSsy7vib4PndVb2iCuXgdnbBYSHMBB1Kkjon/3wCi+Xfq+oemmDE +qROdz258AvrWZw8Dekww8bJxnVZOGUzpaR0utTVFyYQX/oUipSB/eqLylqMp +toWq5P5dXwr+zCRNcxdT5CxIKtTmKYW533OyfR6mOLG3gnNy4iP8TX+6lues +KT7dm0O9+PARlq3aWGsYb4rRPP7/VLt9BIEvA/qNX03Rl3JQl339ARQtI1W/ +m5ihTfiJh3t930PdxgS39zIH0dK3jl/PvBg2PbzwJm3nITzFPm1y0q0I8jp2 +MQx5D6Oz7bRPxYcC2FI/6uI3dBjD2mfnI/e9Bpk7kenMjiP4Jp//k8unPEhg +n9gbVWKOAQ28e9Y2v4SXqpLfLr2yQF6dcwU8nDkQq3CVb/7xUVQpyBCcDHwO +1S0pl2WuW6JM4kW/LfRsyDGIF/MKtcKgld52FziyYOyEGc3DyRojBrHrKvcz +mNKScB1Wt8HkpavjrB0yIW2oecZX3pb8o/BbFhSng/l/KY7WK+xQ6Z18pcyJ +J/A8W992aZgdnimRZJrveAyKgnWzV2btcLJP/B6/0CMQ7XD5VnvcHmsEYq+t +kEuDHp5/jeK77bGD/WtWmkUq1Nw0dNQ+5ID+bZcVvVIfQrR/Is+pGgeUkn6f +/ID2EN4ULsw66jqil5BFp9qpFNj3Tpa+Q98RpdbPyR/zTYGHJcf9+hmOGJo4 +V3zVOwUiy76Mexk7YtJg8ZmmEylwrC51IPiIIxbt2OQRciwF+HqNWHedHbFj +kvaXy5zkvElFn885ot1q/wiacgqsssIwmXyy72yh4MWZAtv4S6uF3jgiOn/7 +9oYjBaQqDDYsK3TEbQJy9dzsKWCqbPno6zuyX7uy9DEtBaKF/D4HfyLzYWHM +uVkKNrGerCr7Suar9/Q3D1IgZiMQazVNnu+1wyz6CwWKdsNpl2SdkMZoze6l +KHh4b9TXUH7R76ITmBTwfxlXEaA7oV3Zn5uHkikY1pyuT9vvhEVK0Z/LEimg +dtOWVKiR+dZumzdxFKyc5rNYY0JcK/qmKYKCnhtyyxNPkH3b9ApWMAUmpQr1 +Lp7EfFGM3DMUFNKUEqW8nbBDfpAVGUTBPV8VueKTToibJWX1AigwtNC2/x7k +hKGHzB6VnqTglZjFq91XiXtbr0z9S8HN12eO5z0k90hFVAhaUnBC+q6ifxrJ +A1bQhY5SwHiUtZz+mPSxQqjNFhRw3+19lJtB7qtLChE9QsElH+P+ly/IvMsO +pf1mFJyREPs3p5j0ub2+H6dPgdvdz+7ZbWS/tWFK4AAFuit7lX06yH4+U4qu +TMHOSzRe6S4yv9/ZxWI/Bb0+chlZ30mf5d6yB4oU2BsmDj0bJP5RYyonT4E5 +h6/H0znSx0hxj5SkQNt3k1f6emcs8u0oYBeloDjxsl7UBmfEx+e6ZEQoUK4Y +F/Pf5Iy0T3G7nIQpkNr+uVl9C8mPRomVbaVgY1OQest2sj8k/TpBiIIBJdZ6 +bjmSr2wxDllPwS22pAIXM2cMzXq7XpCHvH/JFbEGh8i8KbudBzcFFy39fWSO +kDxXqKx4OQX+L4x3LBwlz7NVn/TgIvcfWxIZ40DyiKq8eg4KZModnD54k37j +8sYGGgVNkdt5RCNIn5htZMY0EzKB1/VnJMlfNMbtIb44NPk+4zbJ8z/HZf5i +grTu+7P0uyQP/xr8fIoJN2mO4wYPSM4vWVU2wQQtz6Rm/3Rixb5LwqNM2Lw5 +XF4lk9zz4fLQsxEmTJZ73l76jOxb2+ipEieLg8HN5+S+KK9up2Em/GGxipj5 +ZN5BKDJ3kAkvGIJpVWVk/sFk+dU+JlybY+OILid5yutgCWKHtH57iwryPCGm +2KefTFjNni/YU03yx1GGPMTur81vzTaSfhU63/1eJojuivET+07Mpqnxs5sJ +c03BX/p6iXd82RdDXHPJWerpT+LoyDWaxGc7ZfsVB0nfD9eMlC4mfIv9Ym00 +QfJbvNo+nUyI4uTTDFxyDEOXCSzQ25nwZpxleXLpMaTFPLIfbmPCD9ZjHw8O +4hyDcYpY+YVGksNyYtcbCeuIe+38f+vxkf1q/U0cLHI/Q3ON5lqSm5cPlLQy +Yb/CGglYR+zS23+BOII3/bDMRuIP77w5F/P89ixBYbK/7UGSUAsTjqWkl60T +Jc5PZPV8I/MRAe2rthMnf9POJO49tpaXXYLsT1UxNRbztdqug1LE58/5hzQz +If/v2pBeaeJXgltMiL/3ddzpkCWujRsVJVYqCiypp5O+DSJClV+Z0OOeuaUA +ifmtru8hXmkeJJerRuYfiMRyESuq6zCyNIgtr9T0NJHfy8augBQd4pKNpUnE +eexPIxL1yL6c3KVQ4u6RoNR7DJK713vaE9M/rmu4YUxyu4vl4sQOWV0DYaYk +bwtX4iG+Ef+U7fxBksfNNI42MqHLR1fKz5x4Cfudt8S8Nuu1vY6Sebs7L9OI +6brd1m5Wi59/MPtt4htbg6/Z2JH5m7D9X+I8br1kcwdiC74Z88W+qfWvTJ3I +vJjEtPZiX2d3NePYYt8FEfpiX8WzXi1XMl8oFChB7JAb/AfdSC41/kdwsT9Z +j3+/O8l7aJmrFvtvCOyW8yDW0rrKvtjv36Mq6UXMXhQ118CEFU5Z5hI+xMvd +S8eIFYzOeoqeJD6rs7Of2EFJ//JmP+Jys5xu4uvbNyQI+BPHXPdoI365+vtz +vkDi0jGzb8Sdv7PKec4sfr/nnZsW+3+c7eQ4S3IJFWYDsXyd/sxCCMntxXgX +/T9pOn5g "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0., 3.3911218104294143`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5391,7 +11193,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.4834141591801878}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5419,7 +11222,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.3911218104294143`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5427,9 +11231,9 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913460797739086`*^9}, + CellChangeTimes->{3.9913460797739086`*^9, 3.9938308250788193`*^9}, CellLabel-> - "Out[443]=",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] + "Out[118]=",ExpressionUUID->"a58a0bbc-4dcc-4b85-b6be-b6693cda0f8a"] }, Open ]], Cell[CellGroupData[{ @@ -5492,207 +11296,220 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918502644064465`*^9, - 3.9918502684162617`*^9}},ExpressionUUID->"42ddbf41-0bd8-b749-bead-\ -56c89a9b7467"], + CellChangeTimes->{{3.9918502644064465`*^9, 3.9918502684162617`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7282513679946418`*^-262\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 444, - 477, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080016945*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4392209948244305`*^-238\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 37, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.993830825201199*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], +In[119]:=",ExpressionUUID->"defe81e2-646f-41e3-82df-06d3298949ba"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.1421038932835147`*^-273\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 444, 478, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080026985*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.928901161791318`*^-246\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 38, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.9938308252055883`*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], +In[119]:=",ExpressionUUID->"6e4f8540-b2e2-49f2-b9a9-ccc9d47f64f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.655058850000931`*^-284\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 444, 479, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913460800358925`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.53947421860421`*^-253\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 119, 39, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.993830825209105*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], +In[119]:=",ExpressionUUID->"0167b45a-4f7f-4dd6-a24d-5ae691dda338"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 444, 480, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080043894*^9}, +during this calculation.\"", 2, 119, 40, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.993830825212461*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], +In[119]:=",ExpressionUUID->"8959d357-76b6-495a-98aa-8d969d180dff"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k8VO8XxyVFys5g7EJlKevMGDNzDkqhkBCyZUslS0TJN7KlqFSKaEEo +KdnHTpQiUQhFUqRCJclefvf31329X+c+z3POeT7n3HMV3P2tvTg5ODiKVnBw +/P85M9jyRCkhm5U2vDjz/r0Fq/uWxAnDvij4MLvwJMBKHVCsw12i7zLcuCN2 +WsOKASFW93tX9mVBh/zLqDnLnSD0Q/zyfG8xpDsbXkmydIIPNRb+072NUC81 +OqJi4QsmSmPvf/V2gjlluj99RzjM91KvTvZ+gvYV/1bFaydCk/Hd7NdZvyHW +YR8zcOkGSH+oHHVX/wtTq3bEjojkgKiv631u45W4e5fZhZNr8uGylkm1hS0P +9r+uUNLwLoQt/Q7bmT48uFkv8p9KQCG0xRzpUjvJg/Qjnm/IYYWwui95nCeT +Bw/CN7/J84Vw8tSwVNMED+p/DOPYU1YIni8iw6kxa1BVN1blN2cRULyqmfIl +vLj2kvKZxOtF8DZVs+GXIB/uWqdLSy0phrSufIEQZT6carzgX1hTDI78G1wX +9PlQPqvuQ8PTYhiIlvnH6cGH2tQCt1YiL0N+vAzRMj7canM4I2KxGL5uHWFT +HPjRduz7qkDDEpibTHl0MlMA6zbyz7k+K4FKNZHl5TIBXKt+8kNYRwmEeV+w +iGkVQNn3kVXne0tgqT/me+JvAYwEia3pX0ogcrhCrENREJuv/w6y5S6FmPac +PUPBggjyHG1bt5VCQnZEB6ekEArpeuZyVZeCme5BYbH1QtjAlflx/nEp8Dyx +tt2gIYTHg9ZofHlOrB9W7jc3FEJtEJzM6ymFcMW20eSDQvh6emrNq1+l4Jch +8U+lSgivSduX3VQpg903itTN9wnj1z5dbf1zZSConu7v7CWMW7gaqzcnlUF7 +dUyxv78wkqwuMqSvlYFZ/15acrQw8ihKKH7ILAMj8j/j9/nCmKxECeSqLAPd +VLN9/kvCGJdg1tn2uQzEk4fPXrkpgjPndunu0S8HCbWymLlcERSsy980xSwH +cmNchHOhCEb39EqfMyoH2clNxzY0iaDFG5G/2ebloLwzwK36qwgKrTXIi3Mu +Bx2uv5RhHVGsa+B6Px9RDrrp7Vo7mKKo5rr4ZGNMOVC0M9Qfmohireb2Aqv4 +cqC7GSuGOojiYgojLiGpHAxrzvKtjRDFva9nbB9mlINlMGlEu1UU25InOjPr +y8Fq7dfBlC5RFHCN5tjfVA7WWZVvlwZEsWD3KYrks3Kwe+XU0fxTFN1FB2uD +28vBWf1OlaOYGLaElpj1DZTD4ZEtl6LcxPD1Ec/x3XPlcMbGlNU5I4aHT9ID +RFXZQC5tJ3OuICFXreFXHQ02FIjYzGqtJeGaR6/NzTXZ0NPpUnhJjoTUleff +7aewQWl3sOLuHSS8WRlC32zEhsZdt1e/uk7CE8dHtbfZs8HuodLw8h0S/rs5 +zDniyIaxdffrtxSQ8DZncHeYMxuE2kqPX2wkYYPt4agkdza4mbWOWYyT0Dg6 +QM/Jlw1/Tf60v2SIo0nkG4+QU2xIyg3L/2sijsmN1nzXIonzV3PEa+wWR6nC +550Po9iw8ymv4XkvcfRhtFU8jWNDmrF8yc4L4rhNdJ9SygU2bL6TczE8VRyb +d+QNhSYR/nKq+T7IEke3YPYzq8ts+PZYT3kdWxxPZj2VGb/KBhqap7z4II6P +SIflG2+woe32q6DFb+L49p/zQc9bhL/LtlZq0+KobTM48e82G87Uua1J4JFA +/0tV+dJ3iHwxQk6aaUlgks0G48V7bDh0Y3FvmIEEupx5lOZ6n4hvMVL3/jYJ +PPX5MrMmn4inOuH7GkcJVG2V9nMpYEOQfqZrS5QESntMsU1K2GCWwT9tniiB +EYr3zB1L2aDIHR7fflUCH96Nox4oY8OrbruirnsSmFOqI3eEzYZ7Bk+22RVL +oLX5E1nvCjZEZGm966uWQPLjFafsK4l8BKxbOdgugeNTKh6bqtmwqvdEiluf +BLLufJngrmHDAPOL2vBHCXxC4h78QHDC2kabr9MSuLBX59/JOjZ8zQ3NnSJL +ogLXtSNej9lQz/eZfkxJEh3Lzh8UaGTDtWDrjlkNSTzH3zFQTPA2I425JZRE +2id7rdEmNkjnpSVGmEliws5aUsgTNkwL8Chw2kjilP6dk8sEZ73/ZMp9QBKL +j5m2/XvKhhNbrQbPBkhiZ5BBTXAzG6zya4+uC5PEZkth3RGCNwqrcV+MlsSc +tO96u56xYfl4arrQeUnsuvSz6RHBPR9WaSZfk8RQaebQ2ueEvk2CnpAyJHFX +y9/E/QTHPhyyv54nidS2fW2FBDuJWnyXKpHEJ4vRGfME65ysPn2rRhJ/t+es +ZbSwgffTRpJCsySWOP4WOE7wpx3X7t/pkMTrlpmPHhJc+WglqLwl9p8dnRgg +OIkU2HXvkyTaa/9rWdXKBp//Bg+oTUhiyrH1phsJhhHzpYd/JHHs2VXfrQST +zCuTNJcJe/01iiPB34tUlEt4yKgeeSjvIMFPJJIr9YTJ2Mfe++wowTciVlhU +SJFR4Obdy8cIDhr1+0RXJiNpIofv/3azXQMhtZvJeGUkg+5DsGKp6VqkEfbt +36TsCZ4ns283GpKx07qzxJDgV6eVdLeZk/F1YxGXMsF3v156/syGjM0vPghy +EnzKctnJzIWM1yTZ7/qI+OzKfX+1HSBjRVuyZx7BGjLvYi0DCf9C+wqDCOaK +2U7uDCOjr8zIYyrBA2OlBTYxZJxRl077Q+S3ZLeice95Mn6I/GLwkOBzFRd7 +HVLIOLTvUZ4Lwfvl/h4eyCCjjfeHz2sIpsUd4nC9T8bJ/M9TBcT9ftmzbZNn +LRk552lnRwk91FUV1442E/7/OiJ+guBrCvLWB1+R8fhK08hVBG/9uRDmN0xG +Efn+8bX/19eOZNXHE2RM8rbOiSf0V5Cp8U5khowPhjFymdCrhI2bfiWPFH4b +XbrTT+h518P5r2uFpfCnd+IvJDhq9ZVUFykpfLdO/FAGUQ8TFU9nV26WwgvN +FZ93NbBBQdj1rh1VCrvjs76n1xP5Ojxnl4dSaNOirjpC1FODjFq5xR4plHo6 +aOZRy4YrUUnB149LIeWihb90FRue929Smjgthedqm9wYRP0u6TZ1sRKkkJc7 +Ls2OqG/vL3+0R25K4Ue9H5MnytlA37nv1+YmKQz/mOEfXkzoU0zF7wmfNJJN +Yr8fzWODuH+9jLi4NBqcd7tCI/rTzuf2Lw/KS+PRcw7353LZUB6WoC6gI415 +kWSKTzZxHx8mxxzspTHpcwj/KqLfaedVH/iZJY2a1T5itCtsOMBpK270QBqf +OWXz5l4i9LjvR3NymTRaH7yTzk/029X8Cir059K4svh1ekciG94djRuJ+S6N +nc1X9wsR/fo0Y/d+Mk0Gxc9YHrkWyoYdLremqEYyeH3Njqexx9jAHzkebbtT +BtGsf84viNi/KTY3yU0GndmGK7b4s6HCrGp89VkZnD12acnLmw2T9utDfr+V +wfEgwVfFe9jADgvgFhqRQX0+wRTD3YR+b9Smbv4hg9aztsGtFmxYN7S3+iCn +LFKPZEe2mrJhw4FEjiFVWVywMDKNATa4HPtzru2kLB7M1Pz6cRMblFOMpMdi +ZTHwaWivyIb/3/fFh9xJsljuSTQZJTaELW16ZZQti/K61TlnZNlwNdpFrLJN +Fvd05Zp2CRPfk0vPbufIyGHrBjdltwViHii4XnqqXg7dpq1yDz8th6297X9/ +PJfDX55CzmqN5WDBwbXdtVMOX/mvThqtKwcPa7+38FkO9ViZoZYV5WByUiEi +cpU8plZY5Y3fL4cAuZk7hmryOE5SC7W6WA5PDtz+3hQijwn68+OfbMrBd+5X +5HM+BfSMM50Z7SoDeqA3aVRYAXnLGt4Yd5QBz9i7/JUSCphU8MrjRmsZ5PQ3 +9bAUFfDpK5Wb+LgMBuuuqpdRFPBfaOk/24IysIzV78t0VUC/8/UWFWfKQFv4 +9JaTRQp4qrCx+gS1DObVBAc1bBXxT3jfyEhCKTDyH2Rcu7Ye405YmZmKl8Av +YTM3u0YlfB7aHj1+owhGEt3sjnKroMvlj7VLg4/A9Geo6WfKBgxdR6+eLXoA +Ex48QaURG9FvvOe++8484n9AnPNM4yY0vHfqATcpF4Rfqlwo/KmKv+79zerB +OyAd/8iKQlHHltyvDP8DGZCqpi8ockADM74dKFj3Jx1ayYZ6vy9txh/3J7Yo +5KcAXboxaUvPFnTiLXk+kHAF+FdmBe+P0kR/l5G9VM0kkD0tx3BQ0cL/Lle8 +nJM+B2uUncqtn2kh9+fHuzaNx8AhSTDLb9HCmyk3t4a8jYFWPsXBlW1a2Bxj +sanjWQwkznxZVfZKC/92dN/Lzo4B/udBtuLvtFAjKHfuvUsMCB9OmO6f0CLm +w+TU2DfRIF1Upe0lrI0f7xdGxb2Igs1MyUehztoYbdc3TnsbCSXrDy5yumnj +3WMj5yRbIoHGW7n9grs23qSOVK2ujASjXvuh7APaeMjke8nq65FgF5gq1Bmo +jQ17LG1vOERCRI54sHqcNl6l2DlqVUXAKz6S/scCbbTyra2zevcfHB0UbjLj +0EG+x+Grj7qFwfNmp9r7nDoYf2Vy4c32MJB9lMvmXaWDvtvlV+3aEgatEfQH +rWt0MDmnVzP43wlQVHC/aiaig6Umgw05N0/Aa4+iA2YqOpj+9X5G4ofjoPnN +cp3ZTmJ9nGuCfGAo/PydaGuaqoN14Wcd5FqCYaAv0+5mmg5qXd58x6ksGFpr +y/f+uqGDjttPvcjLDIbsM0MO1zN1sKcXLgeFBYOjlK7Lt/s6mEIv+tmkHgxP +jfq9z9bq4PjDuAeWyUGQfmnT8ZZPOljxcH3Za7+jsH1Lc5qphi4+HtlJDrcM +APvVO2xebdHFlqSHZrysADj0voVvr7Yucj5TCrmnHgAXEl5GelJ1cfD8pkui +vAHQ86XbO8JQF29/dqbZJviDZ8awdpmtLs6O/QiIj/CDKKEVL+RP6aJczopv +9ad8oe63weJsuy5yxAjcLOvygcw2tvue17qocLD200KlD8Tk6LQWdOniUnqY ++d4MHzDdq3bdq08X82vbjW2P+EB3FZna9VEXcxelV3jy+MDY6fmjBdO6qCh0 +w7LO6ACQBNljnmQ9jIu+Xzf9zAvmv2pbN0jrYd9Wy7Z/hV4w8LigUkpODzVT +eOZk0rwgMyg3vnO9HioeWD6U7usF6r1XVVBDj5h/49ZcEvYCo1vB7lKoh7f6 +3K46uHuCn7r2u9deeuiu3NAxLegBx2bJC64+elhv9vLDywV3CG9cSf5xSA+J +Dh1VO+IOCfZvHHgD9FD8R7/OUIU73Is5/tYoTA8zbwUxtNzd4dNAXV/JBT0s +CP+b+6tiP9idN++9ytbDwymHJX1D3MDZXnd2fZUevh2xe/Pb3Q0818uIF9fo +YZodffCipRsEVf6wa3+sh8Hqk0lcm9wg6fOlntVteth1hKRcW+kKrcy+N6FD +eniOy7MvIckFmD88ux3WUPBw/P6LPY5OQKrenlWzloKi5V0H5+hO8OOMaoAc +PwXvzLKW9aWc4JbC5NrPwhSMSQj5JTWwD/7ZnDQOkKbg9hcCovau+6C++lJx +3BYKevkfOpd22BEMz9YlldhSMOiKqvbVNHsg22W6kOwp+OpFTVD4KXuYUoxR +P+FIQcn2h4aR7vaQVWP6nOVKwa7mUfn3qvbAOdm93OJDwUNc+cbfavZCk924 +39BJCh6LDOOijNrBNiWJXXxZFAzoLhhe3GkLpd+fKnhmU1AjWoHSqGsLSuyg +mapcCq6walXOlLYFLrOO2z75FLwb23Dm3oQNNPrHTTWVUpCZt2d1/3kbYFVP +p4Q9I/yd606v6d4DFOvXn75MUFDW2s3jU5A15EpFsFk/KfjiSoxusos1iH1W +T7z6i4KnMhZFnUytYTo0Xs94hoIcUgVlGnLWUHwT4m8tU9ApNdO258Vu2PLt +oYatMBUFc5Wp6pt2w8bIc8cbqVQsfJDR3zZqCTUGOat20qnY4e5XaVhnCVaz +9ZffMKiYV3NwduSqJRz3+/PgqyEVXzZzvy/bZgnPndw+8u+k4lkXX7vwuxbg +o08x2+dGxUn9bUXBQbsgb+qj1HQ8Ffls1TM/qJkDq2Dp3n8JVJR65BPVymMO +nQfFKdwXqBhvOmcx+NkMFoZ2WpGvUHHDLXeuyAwzMOtgxxDNEyOmvrneFTeD +sfzz3xOLqBjQ89LInc8UVL3065XfUdF5Oa3yqNh2uKhosRA9QEW/2fYxzXkT +mP7grvdpkIr1To9D+N+bQJ1jYv6tYYL9bZQ35JiAtdWHFPHvVBxOOX/xBcUE +ThjEBqzhoGF9dsXxZtdt8FzotcJ3ZRraLjF9K54Zg0bHZyfzjTTMTlh6tfGR +MVxOXEjJU6XhuXdZk6XXjMGJW4nfewsNu4zypuS8jeHnUsjCII2GVUtJXKzV +xkD6Kt31ypyGOTybGqLMjcCrziemNJCGxUNrSSHfEH4cGQvdFkzDFz3dqh6d +CMdlfA/3hNBw6e/uP77VCOfC/a3nTtJQLs9Io+c8QiE9RJ4RR0O/A7SaRR2E +pfLomqY0GtLOeKRP8gJcfnRrurOJhtu2bAhoOc4AaVf5rx7NNOQ+fGLJcTcD +cviz+qef09CnqDJcVpUBFUdyGkntNIziczlOHzCA92oPkhz7aEhvpRs3GBnA +xnuV6p8maBgy7L+2S4IO9Rndnr/E9LG5SIB8+wsVhnYquIZI6OPTLy7xWc1U +4Jg/4rBI1kdPN+mKjhwqGO3mtlglr4/f1u2+netJheYVdKqkqj4G6Eb5GY5Q +oM399hpDlj6GOnkXcY7rwTulQwVJ3vpYJ3ru9QkxXVh8VX5P7KA+xnp4ODrP +64D0fyvvpB3Wx+RTDSJe73XA+c2NlOwAfTx1eG3gUI4ODMV2RFaE6eO2Yi6L +KJoOfBnV3TN0gThP8W+vhac2TN9bnt3C1sevwx8v/unWhFE7k4yzlfpoqsEl +ml+nCX1c53cMV+tju+Fsx8l7mlDtRr5+rUEfXcXyQv3CNSFKQo/+t0Uf06Te +mlxV1gTB+EPhrQP6aBWve+7W/GZQP/CGw4uTjjnNca8cw9VBVkw6r46Ljj+9 +JBfW26mDYJP7bgluOsqV3D0trakOv2UnM1+speOjicCetBE1qOrhNdYWo+M/ +mmB3s6Ua7DDB2OUNdIwQf1ZYsFkVPJTz16TtoiNJurHEiW8jhD11OaRiRceB +q4FSP79tgCQv4RfF1nQ8neLYWdS8AWpyTiS+2EtHi7eZrGeRG0BUZYfA3/10 +9HaKT1abVYFmlc+ibiF0XJc6oHB3QhlUN8rJq9ym41Fa7Pv3c+sBn3dGFmcS +/jmI/uDtXw92PnEfWdl05Pl7xmx/7XqIvvc9a28eHa8EOpDORq2HgY01ymdL +6Pibt8uqnn89XNjkoDbxjI4y/6hPrm9WhF+qVyjFk3T0dXpy9eE5eehrw20i +v+l4/eXtKvMgeWjw+7En+A8dPy//TORxkocLxaaBlAXC3xH+3Pca8qBK53hQ +tdIAhf9jWA7nyIG76RGFJpIBjpGiMoy2yUL3ge3ruhkGqKUjusumQAqq1/wh +64EBHnGn7SiOk4Ks/KxN1wyJ91cr/NzqKgUBP/+a2JsQdhcWk1tICvhCS08P +WBrgQlxt91wIGUziFGZH3A2IeSM9036nJFRkL378E2+A44/mvztLiQPFOHjW +LMEAmVH+aqcXSFD2cWJdxnkDHFZaqu54S4Ji2UGq2WUDlAvUWvEjlQQPUhvO +30o3wKZL3jabJEmQkRirv73AAEVoN68fURCDs8ECl1K7DFDyNKX1haUI8IjE +535/Y4DyYarbZ3REIK6Io8aozwAHXij0bpMQgZgfv0YnBgzQOpYzZM9HYTjl +080wHDVAflPe7PXHhOGo0/Wv3+YM8GF/DG/AHSFw3LoeDWQZWPzN/VCspCD8 +7ebhb5JnoMR36tuFZQHI8PrRb7aegelX9pjpvRSA0bjKUMeNDORM9HhzxkcA +jrZYPjqhzcB8UqpLahY/nLMIl60wYSC/3Q5bASU+qLJ/s6Trz8ANl97eK3Dg +BedvVa01gQxc19exVWMLL3CEZaRuDWbgN/eaXWNcvGCSfljX5gQDtfkct8kW +rYHO9yt8g6IZmPzhNMNz3RoYc9/cX5TCQG87B5Bp5wapI2cqNzcwMOCCdMaK +8FVwYdlbL6GRgdGrOsxX71sFnJdNir48YeCPqfgAGn0VjJWvystoYaDYi0Qt +pXkuqOKISRXuYqCf5ad54RNc4JgcGTrzmYFX5aMGJE+vhNTqE3p1a5m4vLBy +hFm4AtZZOBSR+ZmYlStgdDp5BUQO0TRCBZnY6OzNO358BfismlPSFGPi+eB+ +Xi2jFUC1DBHNkmXiF359zdM9HNDz6ejvWC0mMY/vJa1ezQFivL5Fu/Yy8fNl +h1MZ/5ZY2cb/hU06MFFC1SYovXWJpf3fBeMrTkw0qVLU/XJtiWUxWfimbz8T +SbV7df01l1hxPX/mPXyZ6D96gKR7YJE1lxVhFHaaiX/9A1eoDc+z3hlc6crN +Z2KTrdLLeqFZls+x7BumBUz0rLm6ODM6w5opKPOaKGRi4Al11cCaGZawYt+s +VjkT2f1Vi+o+MyxzHhnp2gYmHrN7WM9u/MOq6c717HrDxDKxbJvm6GmWGX+F +RkgfExU8Ug9yOE+z+ra3zEj0M3FGkSsllDLNmq4aj3cZYmKdx40eqbHfLI1M +zYffxpjYHr/OVNvmN6vmnWFI4ncm/opu/898y2+Wmege2DLJxMdmbwVv8/5m +eZ859jr4DxNr5pOWfz+eYk03xKWJzzHx1M74kumbU6yohRSPqgUmikXvC9kc +NsUS1M1Td/7LxJbjl/9k2E2xbh2p+rO8zMTpPYYfzHWmWP8DPTlJ2g== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5706,166 +11523,175 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwVl3k8VO8XxyVFys5g7EJlKevMGDNzDkqhkBCyZUslS0TJN7KlqFSKaEEo +KdnHTpQiUQhFUqRCJclefvf31329X+c+z3POeT7n3HMV3P2tvTg5ODiKVnBw +/P85M9jyRCkhm5U2vDjz/r0Fq/uWxAnDvij4MLvwJMBKHVCsw12i7zLcuCN2 +WsOKASFW93tX9mVBh/zLqDnLnSD0Q/zyfG8xpDsbXkmydIIPNRb+072NUC81 +OqJi4QsmSmPvf/V2gjlluj99RzjM91KvTvZ+gvYV/1bFaydCk/Hd7NdZvyHW +YR8zcOkGSH+oHHVX/wtTq3bEjojkgKiv631u45W4e5fZhZNr8uGylkm1hS0P +9r+uUNLwLoQt/Q7bmT48uFkv8p9KQCG0xRzpUjvJg/Qjnm/IYYWwui95nCeT +Bw/CN7/J84Vw8tSwVNMED+p/DOPYU1YIni8iw6kxa1BVN1blN2cRULyqmfIl +vLj2kvKZxOtF8DZVs+GXIB/uWqdLSy0phrSufIEQZT6carzgX1hTDI78G1wX +9PlQPqvuQ8PTYhiIlvnH6cGH2tQCt1YiL0N+vAzRMj7canM4I2KxGL5uHWFT +HPjRduz7qkDDEpibTHl0MlMA6zbyz7k+K4FKNZHl5TIBXKt+8kNYRwmEeV+w +iGkVQNn3kVXne0tgqT/me+JvAYwEia3pX0ogcrhCrENREJuv/w6y5S6FmPac +PUPBggjyHG1bt5VCQnZEB6ekEArpeuZyVZeCme5BYbH1QtjAlflx/nEp8Dyx +tt2gIYTHg9ZofHlOrB9W7jc3FEJtEJzM6ymFcMW20eSDQvh6emrNq1+l4Jch +8U+lSgivSduX3VQpg903itTN9wnj1z5dbf1zZSConu7v7CWMW7gaqzcnlUF7 +dUyxv78wkqwuMqSvlYFZ/15acrQw8ihKKH7ILAMj8j/j9/nCmKxECeSqLAPd +VLN9/kvCGJdg1tn2uQzEk4fPXrkpgjPndunu0S8HCbWymLlcERSsy980xSwH +cmNchHOhCEb39EqfMyoH2clNxzY0iaDFG5G/2ebloLwzwK36qwgKrTXIi3Mu +Bx2uv5RhHVGsa+B6Px9RDrrp7Vo7mKKo5rr4ZGNMOVC0M9Qfmohireb2Aqv4 +cqC7GSuGOojiYgojLiGpHAxrzvKtjRDFva9nbB9mlINlMGlEu1UU25InOjPr +y8Fq7dfBlC5RFHCN5tjfVA7WWZVvlwZEsWD3KYrks3Kwe+XU0fxTFN1FB2uD +28vBWf1OlaOYGLaElpj1DZTD4ZEtl6LcxPD1Ec/x3XPlcMbGlNU5I4aHT9ID +RFXZQC5tJ3OuICFXreFXHQ02FIjYzGqtJeGaR6/NzTXZ0NPpUnhJjoTUleff +7aewQWl3sOLuHSS8WRlC32zEhsZdt1e/uk7CE8dHtbfZs8HuodLw8h0S/rs5 +zDniyIaxdffrtxSQ8DZncHeYMxuE2kqPX2wkYYPt4agkdza4mbWOWYyT0Dg6 +QM/Jlw1/Tf60v2SIo0nkG4+QU2xIyg3L/2sijsmN1nzXIonzV3PEa+wWR6nC +550Po9iw8ymv4XkvcfRhtFU8jWNDmrF8yc4L4rhNdJ9SygU2bL6TczE8VRyb +d+QNhSYR/nKq+T7IEke3YPYzq8ts+PZYT3kdWxxPZj2VGb/KBhqap7z4II6P +SIflG2+woe32q6DFb+L49p/zQc9bhL/LtlZq0+KobTM48e82G87Uua1J4JFA +/0tV+dJ3iHwxQk6aaUlgks0G48V7bDh0Y3FvmIEEupx5lOZ6n4hvMVL3/jYJ +PPX5MrMmn4inOuH7GkcJVG2V9nMpYEOQfqZrS5QESntMsU1K2GCWwT9tniiB +EYr3zB1L2aDIHR7fflUCH96Nox4oY8OrbruirnsSmFOqI3eEzYZ7Bk+22RVL +oLX5E1nvCjZEZGm966uWQPLjFafsK4l8BKxbOdgugeNTKh6bqtmwqvdEiluf +BLLufJngrmHDAPOL2vBHCXxC4h78QHDC2kabr9MSuLBX59/JOjZ8zQ3NnSJL +ogLXtSNej9lQz/eZfkxJEh3Lzh8UaGTDtWDrjlkNSTzH3zFQTPA2I425JZRE +2id7rdEmNkjnpSVGmEliws5aUsgTNkwL8Chw2kjilP6dk8sEZ73/ZMp9QBKL +j5m2/XvKhhNbrQbPBkhiZ5BBTXAzG6zya4+uC5PEZkth3RGCNwqrcV+MlsSc +tO96u56xYfl4arrQeUnsuvSz6RHBPR9WaSZfk8RQaebQ2ueEvk2CnpAyJHFX +y9/E/QTHPhyyv54nidS2fW2FBDuJWnyXKpHEJ4vRGfME65ysPn2rRhJ/t+es +ZbSwgffTRpJCsySWOP4WOE7wpx3X7t/pkMTrlpmPHhJc+WglqLwl9p8dnRgg +OIkU2HXvkyTaa/9rWdXKBp//Bg+oTUhiyrH1phsJhhHzpYd/JHHs2VXfrQST +zCuTNJcJe/01iiPB34tUlEt4yKgeeSjvIMFPJJIr9YTJ2Mfe++wowTciVlhU +SJFR4Obdy8cIDhr1+0RXJiNpIofv/3azXQMhtZvJeGUkg+5DsGKp6VqkEfbt +36TsCZ4ns283GpKx07qzxJDgV6eVdLeZk/F1YxGXMsF3v156/syGjM0vPghy +EnzKctnJzIWM1yTZ7/qI+OzKfX+1HSBjRVuyZx7BGjLvYi0DCf9C+wqDCOaK +2U7uDCOjr8zIYyrBA2OlBTYxZJxRl077Q+S3ZLeice95Mn6I/GLwkOBzFRd7 +HVLIOLTvUZ4Lwfvl/h4eyCCjjfeHz2sIpsUd4nC9T8bJ/M9TBcT9ftmzbZNn +LRk552lnRwk91FUV1442E/7/OiJ+guBrCvLWB1+R8fhK08hVBG/9uRDmN0xG +Efn+8bX/19eOZNXHE2RM8rbOiSf0V5Cp8U5khowPhjFymdCrhI2bfiWPFH4b +XbrTT+h518P5r2uFpfCnd+IvJDhq9ZVUFykpfLdO/FAGUQ8TFU9nV26WwgvN +FZ93NbBBQdj1rh1VCrvjs76n1xP5Ojxnl4dSaNOirjpC1FODjFq5xR4plHo6 +aOZRy4YrUUnB149LIeWihb90FRue929Smjgthedqm9wYRP0u6TZ1sRKkkJc7 +Ls2OqG/vL3+0R25K4Ue9H5MnytlA37nv1+YmKQz/mOEfXkzoU0zF7wmfNJJN +Yr8fzWODuH+9jLi4NBqcd7tCI/rTzuf2Lw/KS+PRcw7353LZUB6WoC6gI415 +kWSKTzZxHx8mxxzspTHpcwj/KqLfaedVH/iZJY2a1T5itCtsOMBpK270QBqf +OWXz5l4i9LjvR3NymTRaH7yTzk/029X8Cir059K4svh1ekciG94djRuJ+S6N +nc1X9wsR/fo0Y/d+Mk0Gxc9YHrkWyoYdLremqEYyeH3Njqexx9jAHzkebbtT +BtGsf84viNi/KTY3yU0GndmGK7b4s6HCrGp89VkZnD12acnLmw2T9utDfr+V +wfEgwVfFe9jADgvgFhqRQX0+wRTD3YR+b9Smbv4hg9aztsGtFmxYN7S3+iCn +LFKPZEe2mrJhw4FEjiFVWVywMDKNATa4HPtzru2kLB7M1Pz6cRMblFOMpMdi +ZTHwaWivyIb/3/fFh9xJsljuSTQZJTaELW16ZZQti/K61TlnZNlwNdpFrLJN +Fvd05Zp2CRPfk0vPbufIyGHrBjdltwViHii4XnqqXg7dpq1yDz8th6297X9/ +PJfDX55CzmqN5WDBwbXdtVMOX/mvThqtKwcPa7+38FkO9ViZoZYV5WByUiEi +cpU8plZY5Y3fL4cAuZk7hmryOE5SC7W6WA5PDtz+3hQijwn68+OfbMrBd+5X +5HM+BfSMM50Z7SoDeqA3aVRYAXnLGt4Yd5QBz9i7/JUSCphU8MrjRmsZ5PQ3 +9bAUFfDpK5Wb+LgMBuuuqpdRFPBfaOk/24IysIzV78t0VUC/8/UWFWfKQFv4 +9JaTRQp4qrCx+gS1DObVBAc1bBXxT3jfyEhCKTDyH2Rcu7Ye405YmZmKl8Av +YTM3u0YlfB7aHj1+owhGEt3sjnKroMvlj7VLg4/A9Geo6WfKBgxdR6+eLXoA +Ex48QaURG9FvvOe++8484n9AnPNM4yY0vHfqATcpF4Rfqlwo/KmKv+79zerB +OyAd/8iKQlHHltyvDP8DGZCqpi8ockADM74dKFj3Jx1ayYZ6vy9txh/3J7Yo +5KcAXboxaUvPFnTiLXk+kHAF+FdmBe+P0kR/l5G9VM0kkD0tx3BQ0cL/Lle8 +nJM+B2uUncqtn2kh9+fHuzaNx8AhSTDLb9HCmyk3t4a8jYFWPsXBlW1a2Bxj +sanjWQwkznxZVfZKC/92dN/Lzo4B/udBtuLvtFAjKHfuvUsMCB9OmO6f0CLm +w+TU2DfRIF1Upe0lrI0f7xdGxb2Igs1MyUehztoYbdc3TnsbCSXrDy5yumnj +3WMj5yRbIoHGW7n9grs23qSOVK2ujASjXvuh7APaeMjke8nq65FgF5gq1Bmo +jQ17LG1vOERCRI54sHqcNl6l2DlqVUXAKz6S/scCbbTyra2zevcfHB0UbjLj +0EG+x+Grj7qFwfNmp9r7nDoYf2Vy4c32MJB9lMvmXaWDvtvlV+3aEgatEfQH +rWt0MDmnVzP43wlQVHC/aiaig6Umgw05N0/Aa4+iA2YqOpj+9X5G4ofjoPnN +cp3ZTmJ9nGuCfGAo/PydaGuaqoN14Wcd5FqCYaAv0+5mmg5qXd58x6ksGFpr +y/f+uqGDjttPvcjLDIbsM0MO1zN1sKcXLgeFBYOjlK7Lt/s6mEIv+tmkHgxP +jfq9z9bq4PjDuAeWyUGQfmnT8ZZPOljxcH3Za7+jsH1Lc5qphi4+HtlJDrcM +APvVO2xebdHFlqSHZrysADj0voVvr7Yucj5TCrmnHgAXEl5GelJ1cfD8pkui +vAHQ86XbO8JQF29/dqbZJviDZ8awdpmtLs6O/QiIj/CDKKEVL+RP6aJczopv +9ad8oe63weJsuy5yxAjcLOvygcw2tvue17qocLD200KlD8Tk6LQWdOniUnqY ++d4MHzDdq3bdq08X82vbjW2P+EB3FZna9VEXcxelV3jy+MDY6fmjBdO6qCh0 +w7LO6ACQBNljnmQ9jIu+Xzf9zAvmv2pbN0jrYd9Wy7Z/hV4w8LigUkpODzVT +eOZk0rwgMyg3vnO9HioeWD6U7usF6r1XVVBDj5h/49ZcEvYCo1vB7lKoh7f6 +3K46uHuCn7r2u9deeuiu3NAxLegBx2bJC64+elhv9vLDywV3CG9cSf5xSA+J +Dh1VO+IOCfZvHHgD9FD8R7/OUIU73Is5/tYoTA8zbwUxtNzd4dNAXV/JBT0s +CP+b+6tiP9idN++9ytbDwymHJX1D3MDZXnd2fZUevh2xe/Pb3Q0818uIF9fo +YZodffCipRsEVf6wa3+sh8Hqk0lcm9wg6fOlntVteth1hKRcW+kKrcy+N6FD +eniOy7MvIckFmD88ux3WUPBw/P6LPY5OQKrenlWzloKi5V0H5+hO8OOMaoAc +PwXvzLKW9aWc4JbC5NrPwhSMSQj5JTWwD/7ZnDQOkKbg9hcCovau+6C++lJx +3BYKevkfOpd22BEMz9YlldhSMOiKqvbVNHsg22W6kOwp+OpFTVD4KXuYUoxR +P+FIQcn2h4aR7vaQVWP6nOVKwa7mUfn3qvbAOdm93OJDwUNc+cbfavZCk924 +39BJCh6LDOOijNrBNiWJXXxZFAzoLhhe3GkLpd+fKnhmU1AjWoHSqGsLSuyg +mapcCq6walXOlLYFLrOO2z75FLwb23Dm3oQNNPrHTTWVUpCZt2d1/3kbYFVP +p4Q9I/yd606v6d4DFOvXn75MUFDW2s3jU5A15EpFsFk/KfjiSoxusos1iH1W +T7z6i4KnMhZFnUytYTo0Xs94hoIcUgVlGnLWUHwT4m8tU9ApNdO258Vu2PLt +oYatMBUFc5Wp6pt2w8bIc8cbqVQsfJDR3zZqCTUGOat20qnY4e5XaVhnCVaz +9ZffMKiYV3NwduSqJRz3+/PgqyEVXzZzvy/bZgnPndw+8u+k4lkXX7vwuxbg +o08x2+dGxUn9bUXBQbsgb+qj1HQ8Ffls1TM/qJkDq2Dp3n8JVJR65BPVymMO +nQfFKdwXqBhvOmcx+NkMFoZ2WpGvUHHDLXeuyAwzMOtgxxDNEyOmvrneFTeD +sfzz3xOLqBjQ89LInc8UVL3065XfUdF5Oa3yqNh2uKhosRA9QEW/2fYxzXkT +mP7grvdpkIr1To9D+N+bQJ1jYv6tYYL9bZQ35JiAtdWHFPHvVBxOOX/xBcUE +ThjEBqzhoGF9dsXxZtdt8FzotcJ3ZRraLjF9K54Zg0bHZyfzjTTMTlh6tfGR +MVxOXEjJU6XhuXdZk6XXjMGJW4nfewsNu4zypuS8jeHnUsjCII2GVUtJXKzV +xkD6Kt31ypyGOTybGqLMjcCrziemNJCGxUNrSSHfEH4cGQvdFkzDFz3dqh6d +CMdlfA/3hNBw6e/uP77VCOfC/a3nTtJQLs9Io+c8QiE9RJ4RR0O/A7SaRR2E +pfLomqY0GtLOeKRP8gJcfnRrurOJhtu2bAhoOc4AaVf5rx7NNOQ+fGLJcTcD +cviz+qef09CnqDJcVpUBFUdyGkntNIziczlOHzCA92oPkhz7aEhvpRs3GBnA +xnuV6p8maBgy7L+2S4IO9Rndnr/E9LG5SIB8+wsVhnYquIZI6OPTLy7xWc1U +4Jg/4rBI1kdPN+mKjhwqGO3mtlglr4/f1u2+netJheYVdKqkqj4G6Eb5GY5Q +oM399hpDlj6GOnkXcY7rwTulQwVJ3vpYJ3ru9QkxXVh8VX5P7KA+xnp4ODrP +64D0fyvvpB3Wx+RTDSJe73XA+c2NlOwAfTx1eG3gUI4ODMV2RFaE6eO2Yi6L +KJoOfBnV3TN0gThP8W+vhac2TN9bnt3C1sevwx8v/unWhFE7k4yzlfpoqsEl +ml+nCX1c53cMV+tju+Fsx8l7mlDtRr5+rUEfXcXyQv3CNSFKQo/+t0Uf06Te +mlxV1gTB+EPhrQP6aBWve+7W/GZQP/CGw4uTjjnNca8cw9VBVkw6r46Ljj+9 +JBfW26mDYJP7bgluOsqV3D0trakOv2UnM1+speOjicCetBE1qOrhNdYWo+M/ +mmB3s6Ua7DDB2OUNdIwQf1ZYsFkVPJTz16TtoiNJurHEiW8jhD11OaRiRceB +q4FSP79tgCQv4RfF1nQ8neLYWdS8AWpyTiS+2EtHi7eZrGeRG0BUZYfA3/10 +9HaKT1abVYFmlc+ibiF0XJc6oHB3QhlUN8rJq9ym41Fa7Pv3c+sBn3dGFmcS +/jmI/uDtXw92PnEfWdl05Pl7xmx/7XqIvvc9a28eHa8EOpDORq2HgY01ymdL +6Pibt8uqnn89XNjkoDbxjI4y/6hPrm9WhF+qVyjFk3T0dXpy9eE5eehrw20i +v+l4/eXtKvMgeWjw+7En+A8dPy//TORxkocLxaaBlAXC3xH+3Pca8qBK53hQ +tdIAhf9jWA7nyIG76RGFJpIBjpGiMoy2yUL3ge3ruhkGqKUjusumQAqq1/wh +64EBHnGn7SiOk4Ks/KxN1wyJ91cr/NzqKgUBP/+a2JsQdhcWk1tICvhCS08P +WBrgQlxt91wIGUziFGZH3A2IeSM9036nJFRkL378E2+A44/mvztLiQPFOHjW +LMEAmVH+aqcXSFD2cWJdxnkDHFZaqu54S4Ji2UGq2WUDlAvUWvEjlQQPUhvO +30o3wKZL3jabJEmQkRirv73AAEVoN68fURCDs8ECl1K7DFDyNKX1haUI8IjE +535/Y4DyYarbZ3REIK6Io8aozwAHXij0bpMQgZgfv0YnBgzQOpYzZM9HYTjl +080wHDVAflPe7PXHhOGo0/Wv3+YM8GF/DG/AHSFw3LoeDWQZWPzN/VCspCD8 +7ebhb5JnoMR36tuFZQHI8PrRb7aegelX9pjpvRSA0bjKUMeNDORM9HhzxkcA +jrZYPjqhzcB8UqpLahY/nLMIl60wYSC/3Q5bASU+qLJ/s6Trz8ANl97eK3Dg +BedvVa01gQxc19exVWMLL3CEZaRuDWbgN/eaXWNcvGCSfljX5gQDtfkct8kW +rYHO9yt8g6IZmPzhNMNz3RoYc9/cX5TCQG87B5Bp5wapI2cqNzcwMOCCdMaK +8FVwYdlbL6GRgdGrOsxX71sFnJdNir48YeCPqfgAGn0VjJWvystoYaDYi0Qt +pXkuqOKISRXuYqCf5ad54RNc4JgcGTrzmYFX5aMGJE+vhNTqE3p1a5m4vLBy +hFm4AtZZOBSR+ZmYlStgdDp5BUQO0TRCBZnY6OzNO358BfismlPSFGPi+eB+ +Xi2jFUC1DBHNkmXiF359zdM9HNDz6ejvWC0mMY/vJa1ezQFivL5Fu/Yy8fNl +h1MZ/5ZY2cb/hU06MFFC1SYovXWJpf3fBeMrTkw0qVLU/XJtiWUxWfimbz8T +SbV7df01l1hxPX/mPXyZ6D96gKR7YJE1lxVhFHaaiX/9A1eoDc+z3hlc6crN +Z2KTrdLLeqFZls+x7BumBUz0rLm6ODM6w5opKPOaKGRi4Al11cCaGZawYt+s +VjkT2f1Vi+o+MyxzHhnp2gYmHrN7WM9u/MOq6c717HrDxDKxbJvm6GmWGX+F +RkgfExU8Ug9yOE+z+ra3zEj0M3FGkSsllDLNmq4aj3cZYmKdx40eqbHfLI1M +zYffxpjYHr/OVNvmN6vmnWFI4ncm/opu/898y2+Wmege2DLJxMdmbwVv8/5m +eZ859jr4DxNr5pOWfz+eYk03xKWJzzHx1M74kumbU6yohRSPqgUmikXvC9kc +NsUS1M1Td/7LxJbjl/9k2E2xbh2p+rO8zMTpPYYfzHWmWP8DPTlJ2g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0929330332797813}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5877,19 +11703,19 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0929330332797813}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5903,165 +11729,174 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwVl3k8VO8XxyVFys5g7EJlKevMGDNzDkqhkBCyZUslS0TJN7KlqFSKaEEo +KdnHTpQiUQhFUqRCJclefvf31329X+c+z3POeT7n3HMV3P2tvTg5ODiKVnBw +/P85M9jyRCkhm5U2vDjz/r0Fq/uWxAnDvij4MLvwJMBKHVCsw12i7zLcuCN2 +WsOKASFW93tX9mVBh/zLqDnLnSD0Q/zyfG8xpDsbXkmydIIPNRb+072NUC81 +OqJi4QsmSmPvf/V2gjlluj99RzjM91KvTvZ+gvYV/1bFaydCk/Hd7NdZvyHW +YR8zcOkGSH+oHHVX/wtTq3bEjojkgKiv631u45W4e5fZhZNr8uGylkm1hS0P +9r+uUNLwLoQt/Q7bmT48uFkv8p9KQCG0xRzpUjvJg/Qjnm/IYYWwui95nCeT +Bw/CN7/J84Vw8tSwVNMED+p/DOPYU1YIni8iw6kxa1BVN1blN2cRULyqmfIl +vLj2kvKZxOtF8DZVs+GXIB/uWqdLSy0phrSufIEQZT6carzgX1hTDI78G1wX +9PlQPqvuQ8PTYhiIlvnH6cGH2tQCt1YiL0N+vAzRMj7canM4I2KxGL5uHWFT +HPjRduz7qkDDEpibTHl0MlMA6zbyz7k+K4FKNZHl5TIBXKt+8kNYRwmEeV+w +iGkVQNn3kVXne0tgqT/me+JvAYwEia3pX0ogcrhCrENREJuv/w6y5S6FmPac +PUPBggjyHG1bt5VCQnZEB6ekEArpeuZyVZeCme5BYbH1QtjAlflx/nEp8Dyx +tt2gIYTHg9ZofHlOrB9W7jc3FEJtEJzM6ymFcMW20eSDQvh6emrNq1+l4Jch +8U+lSgivSduX3VQpg903itTN9wnj1z5dbf1zZSConu7v7CWMW7gaqzcnlUF7 +dUyxv78wkqwuMqSvlYFZ/15acrQw8ihKKH7ILAMj8j/j9/nCmKxECeSqLAPd +VLN9/kvCGJdg1tn2uQzEk4fPXrkpgjPndunu0S8HCbWymLlcERSsy980xSwH +cmNchHOhCEb39EqfMyoH2clNxzY0iaDFG5G/2ebloLwzwK36qwgKrTXIi3Mu +Bx2uv5RhHVGsa+B6Px9RDrrp7Vo7mKKo5rr4ZGNMOVC0M9Qfmohireb2Aqv4 +cqC7GSuGOojiYgojLiGpHAxrzvKtjRDFva9nbB9mlINlMGlEu1UU25InOjPr +y8Fq7dfBlC5RFHCN5tjfVA7WWZVvlwZEsWD3KYrks3Kwe+XU0fxTFN1FB2uD +28vBWf1OlaOYGLaElpj1DZTD4ZEtl6LcxPD1Ec/x3XPlcMbGlNU5I4aHT9ID +RFXZQC5tJ3OuICFXreFXHQ02FIjYzGqtJeGaR6/NzTXZ0NPpUnhJjoTUleff +7aewQWl3sOLuHSS8WRlC32zEhsZdt1e/uk7CE8dHtbfZs8HuodLw8h0S/rs5 +zDniyIaxdffrtxSQ8DZncHeYMxuE2kqPX2wkYYPt4agkdza4mbWOWYyT0Dg6 +QM/Jlw1/Tf60v2SIo0nkG4+QU2xIyg3L/2sijsmN1nzXIonzV3PEa+wWR6nC +550Po9iw8ymv4XkvcfRhtFU8jWNDmrF8yc4L4rhNdJ9SygU2bL6TczE8VRyb +d+QNhSYR/nKq+T7IEke3YPYzq8ts+PZYT3kdWxxPZj2VGb/KBhqap7z4II6P +SIflG2+woe32q6DFb+L49p/zQc9bhL/LtlZq0+KobTM48e82G87Uua1J4JFA +/0tV+dJ3iHwxQk6aaUlgks0G48V7bDh0Y3FvmIEEupx5lOZ6n4hvMVL3/jYJ +PPX5MrMmn4inOuH7GkcJVG2V9nMpYEOQfqZrS5QESntMsU1K2GCWwT9tniiB +EYr3zB1L2aDIHR7fflUCH96Nox4oY8OrbruirnsSmFOqI3eEzYZ7Bk+22RVL +oLX5E1nvCjZEZGm966uWQPLjFafsK4l8BKxbOdgugeNTKh6bqtmwqvdEiluf +BLLufJngrmHDAPOL2vBHCXxC4h78QHDC2kabr9MSuLBX59/JOjZ8zQ3NnSJL +ogLXtSNej9lQz/eZfkxJEh3Lzh8UaGTDtWDrjlkNSTzH3zFQTPA2I425JZRE +2id7rdEmNkjnpSVGmEliws5aUsgTNkwL8Chw2kjilP6dk8sEZ73/ZMp9QBKL +j5m2/XvKhhNbrQbPBkhiZ5BBTXAzG6zya4+uC5PEZkth3RGCNwqrcV+MlsSc +tO96u56xYfl4arrQeUnsuvSz6RHBPR9WaSZfk8RQaebQ2ueEvk2CnpAyJHFX +y9/E/QTHPhyyv54nidS2fW2FBDuJWnyXKpHEJ4vRGfME65ysPn2rRhJ/t+es +ZbSwgffTRpJCsySWOP4WOE7wpx3X7t/pkMTrlpmPHhJc+WglqLwl9p8dnRgg +OIkU2HXvkyTaa/9rWdXKBp//Bg+oTUhiyrH1phsJhhHzpYd/JHHs2VXfrQST +zCuTNJcJe/01iiPB34tUlEt4yKgeeSjvIMFPJJIr9YTJ2Mfe++wowTciVlhU +SJFR4Obdy8cIDhr1+0RXJiNpIofv/3azXQMhtZvJeGUkg+5DsGKp6VqkEfbt +36TsCZ4ns283GpKx07qzxJDgV6eVdLeZk/F1YxGXMsF3v156/syGjM0vPghy +EnzKctnJzIWM1yTZ7/qI+OzKfX+1HSBjRVuyZx7BGjLvYi0DCf9C+wqDCOaK +2U7uDCOjr8zIYyrBA2OlBTYxZJxRl077Q+S3ZLeice95Mn6I/GLwkOBzFRd7 +HVLIOLTvUZ4Lwfvl/h4eyCCjjfeHz2sIpsUd4nC9T8bJ/M9TBcT9ftmzbZNn +LRk552lnRwk91FUV1442E/7/OiJ+guBrCvLWB1+R8fhK08hVBG/9uRDmN0xG +Efn+8bX/19eOZNXHE2RM8rbOiSf0V5Cp8U5khowPhjFymdCrhI2bfiWPFH4b +XbrTT+h518P5r2uFpfCnd+IvJDhq9ZVUFykpfLdO/FAGUQ8TFU9nV26WwgvN +FZ93NbBBQdj1rh1VCrvjs76n1xP5Ojxnl4dSaNOirjpC1FODjFq5xR4plHo6 +aOZRy4YrUUnB149LIeWihb90FRue929Smjgthedqm9wYRP0u6TZ1sRKkkJc7 +Ls2OqG/vL3+0R25K4Ue9H5MnytlA37nv1+YmKQz/mOEfXkzoU0zF7wmfNJJN +Yr8fzWODuH+9jLi4NBqcd7tCI/rTzuf2Lw/KS+PRcw7353LZUB6WoC6gI415 +kWSKTzZxHx8mxxzspTHpcwj/KqLfaedVH/iZJY2a1T5itCtsOMBpK270QBqf +OWXz5l4i9LjvR3NymTRaH7yTzk/029X8Cir059K4svh1ekciG94djRuJ+S6N +nc1X9wsR/fo0Y/d+Mk0Gxc9YHrkWyoYdLremqEYyeH3Njqexx9jAHzkebbtT +BtGsf84viNi/KTY3yU0GndmGK7b4s6HCrGp89VkZnD12acnLmw2T9utDfr+V +wfEgwVfFe9jADgvgFhqRQX0+wRTD3YR+b9Smbv4hg9aztsGtFmxYN7S3+iCn +LFKPZEe2mrJhw4FEjiFVWVywMDKNATa4HPtzru2kLB7M1Pz6cRMblFOMpMdi +ZTHwaWivyIb/3/fFh9xJsljuSTQZJTaELW16ZZQti/K61TlnZNlwNdpFrLJN +Fvd05Zp2CRPfk0vPbufIyGHrBjdltwViHii4XnqqXg7dpq1yDz8th6297X9/ +PJfDX55CzmqN5WDBwbXdtVMOX/mvThqtKwcPa7+38FkO9ViZoZYV5WByUiEi +cpU8plZY5Y3fL4cAuZk7hmryOE5SC7W6WA5PDtz+3hQijwn68+OfbMrBd+5X +5HM+BfSMM50Z7SoDeqA3aVRYAXnLGt4Yd5QBz9i7/JUSCphU8MrjRmsZ5PQ3 +9bAUFfDpK5Wb+LgMBuuuqpdRFPBfaOk/24IysIzV78t0VUC/8/UWFWfKQFv4 +9JaTRQp4qrCx+gS1DObVBAc1bBXxT3jfyEhCKTDyH2Rcu7Ye405YmZmKl8Av +YTM3u0YlfB7aHj1+owhGEt3sjnKroMvlj7VLg4/A9Geo6WfKBgxdR6+eLXoA +Ex48QaURG9FvvOe++8484n9AnPNM4yY0vHfqATcpF4Rfqlwo/KmKv+79zerB +OyAd/8iKQlHHltyvDP8DGZCqpi8ockADM74dKFj3Jx1ayYZ6vy9txh/3J7Yo +5KcAXboxaUvPFnTiLXk+kHAF+FdmBe+P0kR/l5G9VM0kkD0tx3BQ0cL/Lle8 +nJM+B2uUncqtn2kh9+fHuzaNx8AhSTDLb9HCmyk3t4a8jYFWPsXBlW1a2Bxj +sanjWQwkznxZVfZKC/92dN/Lzo4B/udBtuLvtFAjKHfuvUsMCB9OmO6f0CLm +w+TU2DfRIF1Upe0lrI0f7xdGxb2Igs1MyUehztoYbdc3TnsbCSXrDy5yumnj +3WMj5yRbIoHGW7n9grs23qSOVK2ujASjXvuh7APaeMjke8nq65FgF5gq1Bmo +jQ17LG1vOERCRI54sHqcNl6l2DlqVUXAKz6S/scCbbTyra2zevcfHB0UbjLj +0EG+x+Grj7qFwfNmp9r7nDoYf2Vy4c32MJB9lMvmXaWDvtvlV+3aEgatEfQH +rWt0MDmnVzP43wlQVHC/aiaig6Umgw05N0/Aa4+iA2YqOpj+9X5G4ofjoPnN +cp3ZTmJ9nGuCfGAo/PydaGuaqoN14Wcd5FqCYaAv0+5mmg5qXd58x6ksGFpr +y/f+uqGDjttPvcjLDIbsM0MO1zN1sKcXLgeFBYOjlK7Lt/s6mEIv+tmkHgxP +jfq9z9bq4PjDuAeWyUGQfmnT8ZZPOljxcH3Za7+jsH1Lc5qphi4+HtlJDrcM +APvVO2xebdHFlqSHZrysADj0voVvr7Yucj5TCrmnHgAXEl5GelJ1cfD8pkui +vAHQ86XbO8JQF29/dqbZJviDZ8awdpmtLs6O/QiIj/CDKKEVL+RP6aJczopv +9ad8oe63weJsuy5yxAjcLOvygcw2tvue17qocLD200KlD8Tk6LQWdOniUnqY ++d4MHzDdq3bdq08X82vbjW2P+EB3FZna9VEXcxelV3jy+MDY6fmjBdO6qCh0 +w7LO6ACQBNljnmQ9jIu+Xzf9zAvmv2pbN0jrYd9Wy7Z/hV4w8LigUkpODzVT +eOZk0rwgMyg3vnO9HioeWD6U7usF6r1XVVBDj5h/49ZcEvYCo1vB7lKoh7f6 +3K46uHuCn7r2u9deeuiu3NAxLegBx2bJC64+elhv9vLDywV3CG9cSf5xSA+J +Dh1VO+IOCfZvHHgD9FD8R7/OUIU73Is5/tYoTA8zbwUxtNzd4dNAXV/JBT0s +CP+b+6tiP9idN++9ytbDwymHJX1D3MDZXnd2fZUevh2xe/Pb3Q0818uIF9fo +YZodffCipRsEVf6wa3+sh8Hqk0lcm9wg6fOlntVteth1hKRcW+kKrcy+N6FD +eniOy7MvIckFmD88ux3WUPBw/P6LPY5OQKrenlWzloKi5V0H5+hO8OOMaoAc +PwXvzLKW9aWc4JbC5NrPwhSMSQj5JTWwD/7ZnDQOkKbg9hcCovau+6C++lJx +3BYKevkfOpd22BEMz9YlldhSMOiKqvbVNHsg22W6kOwp+OpFTVD4KXuYUoxR +P+FIQcn2h4aR7vaQVWP6nOVKwa7mUfn3qvbAOdm93OJDwUNc+cbfavZCk924 +39BJCh6LDOOijNrBNiWJXXxZFAzoLhhe3GkLpd+fKnhmU1AjWoHSqGsLSuyg +mapcCq6walXOlLYFLrOO2z75FLwb23Dm3oQNNPrHTTWVUpCZt2d1/3kbYFVP +p4Q9I/yd606v6d4DFOvXn75MUFDW2s3jU5A15EpFsFk/KfjiSoxusos1iH1W +T7z6i4KnMhZFnUytYTo0Xs94hoIcUgVlGnLWUHwT4m8tU9ApNdO258Vu2PLt +oYatMBUFc5Wp6pt2w8bIc8cbqVQsfJDR3zZqCTUGOat20qnY4e5XaVhnCVaz +9ZffMKiYV3NwduSqJRz3+/PgqyEVXzZzvy/bZgnPndw+8u+k4lkXX7vwuxbg +o08x2+dGxUn9bUXBQbsgb+qj1HQ8Ffls1TM/qJkDq2Dp3n8JVJR65BPVymMO +nQfFKdwXqBhvOmcx+NkMFoZ2WpGvUHHDLXeuyAwzMOtgxxDNEyOmvrneFTeD +sfzz3xOLqBjQ89LInc8UVL3065XfUdF5Oa3yqNh2uKhosRA9QEW/2fYxzXkT +mP7grvdpkIr1To9D+N+bQJ1jYv6tYYL9bZQ35JiAtdWHFPHvVBxOOX/xBcUE +ThjEBqzhoGF9dsXxZtdt8FzotcJ3ZRraLjF9K54Zg0bHZyfzjTTMTlh6tfGR +MVxOXEjJU6XhuXdZk6XXjMGJW4nfewsNu4zypuS8jeHnUsjCII2GVUtJXKzV +xkD6Kt31ypyGOTybGqLMjcCrziemNJCGxUNrSSHfEH4cGQvdFkzDFz3dqh6d +CMdlfA/3hNBw6e/uP77VCOfC/a3nTtJQLs9Io+c8QiE9RJ4RR0O/A7SaRR2E +pfLomqY0GtLOeKRP8gJcfnRrurOJhtu2bAhoOc4AaVf5rx7NNOQ+fGLJcTcD +cviz+qef09CnqDJcVpUBFUdyGkntNIziczlOHzCA92oPkhz7aEhvpRs3GBnA +xnuV6p8maBgy7L+2S4IO9Rndnr/E9LG5SIB8+wsVhnYquIZI6OPTLy7xWc1U +4Jg/4rBI1kdPN+mKjhwqGO3mtlglr4/f1u2+netJheYVdKqkqj4G6Eb5GY5Q +oM399hpDlj6GOnkXcY7rwTulQwVJ3vpYJ3ru9QkxXVh8VX5P7KA+xnp4ODrP +64D0fyvvpB3Wx+RTDSJe73XA+c2NlOwAfTx1eG3gUI4ODMV2RFaE6eO2Yi6L +KJoOfBnV3TN0gThP8W+vhac2TN9bnt3C1sevwx8v/unWhFE7k4yzlfpoqsEl +ml+nCX1c53cMV+tju+Fsx8l7mlDtRr5+rUEfXcXyQv3CNSFKQo/+t0Uf06Te +mlxV1gTB+EPhrQP6aBWve+7W/GZQP/CGw4uTjjnNca8cw9VBVkw6r46Ljj+9 +JBfW26mDYJP7bgluOsqV3D0trakOv2UnM1+speOjicCetBE1qOrhNdYWo+M/ +mmB3s6Ua7DDB2OUNdIwQf1ZYsFkVPJTz16TtoiNJurHEiW8jhD11OaRiRceB +q4FSP79tgCQv4RfF1nQ8neLYWdS8AWpyTiS+2EtHi7eZrGeRG0BUZYfA3/10 +9HaKT1abVYFmlc+ibiF0XJc6oHB3QhlUN8rJq9ym41Fa7Pv3c+sBn3dGFmcS +/jmI/uDtXw92PnEfWdl05Pl7xmx/7XqIvvc9a28eHa8EOpDORq2HgY01ymdL +6Pibt8uqnn89XNjkoDbxjI4y/6hPrm9WhF+qVyjFk3T0dXpy9eE5eehrw20i +v+l4/eXtKvMgeWjw+7En+A8dPy//TORxkocLxaaBlAXC3xH+3Pca8qBK53hQ +tdIAhf9jWA7nyIG76RGFJpIBjpGiMoy2yUL3ge3ruhkGqKUjusumQAqq1/wh +64EBHnGn7SiOk4Ks/KxN1wyJ91cr/NzqKgUBP/+a2JsQdhcWk1tICvhCS08P +WBrgQlxt91wIGUziFGZH3A2IeSM9036nJFRkL378E2+A44/mvztLiQPFOHjW +LMEAmVH+aqcXSFD2cWJdxnkDHFZaqu54S4Ji2UGq2WUDlAvUWvEjlQQPUhvO +30o3wKZL3jabJEmQkRirv73AAEVoN68fURCDs8ECl1K7DFDyNKX1haUI8IjE +535/Y4DyYarbZ3REIK6Io8aozwAHXij0bpMQgZgfv0YnBgzQOpYzZM9HYTjl +080wHDVAflPe7PXHhOGo0/Wv3+YM8GF/DG/AHSFw3LoeDWQZWPzN/VCspCD8 +7ebhb5JnoMR36tuFZQHI8PrRb7aegelX9pjpvRSA0bjKUMeNDORM9HhzxkcA +jrZYPjqhzcB8UqpLahY/nLMIl60wYSC/3Q5bASU+qLJ/s6Trz8ANl97eK3Dg +BedvVa01gQxc19exVWMLL3CEZaRuDWbgN/eaXWNcvGCSfljX5gQDtfkct8kW +rYHO9yt8g6IZmPzhNMNz3RoYc9/cX5TCQG87B5Bp5wapI2cqNzcwMOCCdMaK +8FVwYdlbL6GRgdGrOsxX71sFnJdNir48YeCPqfgAGn0VjJWvystoYaDYi0Qt +pXkuqOKISRXuYqCf5ad54RNc4JgcGTrzmYFX5aMGJE+vhNTqE3p1a5m4vLBy +hFm4AtZZOBSR+ZmYlStgdDp5BUQO0TRCBZnY6OzNO358BfismlPSFGPi+eB+ +Xi2jFUC1DBHNkmXiF359zdM9HNDz6ejvWC0mMY/vJa1ezQFivL5Fu/Yy8fNl +h1MZ/5ZY2cb/hU06MFFC1SYovXWJpf3fBeMrTkw0qVLU/XJtiWUxWfimbz8T +SbV7df01l1hxPX/mPXyZ6D96gKR7YJE1lxVhFHaaiX/9A1eoDc+z3hlc6crN +Z2KTrdLLeqFZls+x7BumBUz0rLm6ODM6w5opKPOaKGRi4Al11cCaGZawYt+s +VjkT2f1Vi+o+MyxzHhnp2gYmHrN7WM9u/MOq6c717HrDxDKxbJvm6GmWGX+F +RkgfExU8Ug9yOE+z+ra3zEj0M3FGkSsllDLNmq4aj3cZYmKdx40eqbHfLI1M +zYffxpjYHr/OVNvmN6vmnWFI4ncm/opu/898y2+Wmege2DLJxMdmbwVv8/5m +eZ859jr4DxNr5pOWfz+eYk03xKWJzzHx1M74kumbU6yohRSPqgUmikXvC9kc +NsUS1M1Td/7LxJbjl/9k2E2xbh2p+rO8zMTpPYYfzHWmWP8DPTlJ2g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0929330332797813}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6072,6 +11907,7 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6099,7 +11935,8 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1760850255633475}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0929330332797813}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6107,17 +11944,745 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913465524249306`*^9}, + CellChangeTimes->{3.9913465524249306`*^9, 3.9938315615956078`*^9}, CellLabel-> - "Out[444]=",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] + "Out[119]=",ExpressionUUID->"f533b536-ce58-48e7-ac92-216196974bc1"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6883477e-2a54-0a45-979a-\ -ae60c73e9e82"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVl3k8VO8XxyVFys5g7EJlKevMGDNzDkqhkBCyZUslS0TJN7KlqFSKaEEo +KdnHTpQiUQhFUqRCJclefvf31329X+c+z3POeT7n3HMV3P2tvTg5ODiKVnBw +/P85M9jyRCkhm5U2vDjz/r0Fq/uWxAnDvij4MLvwJMBKHVCsw12i7zLcuCN2 +WsOKASFW93tX9mVBh/zLqDnLnSD0Q/zyfG8xpDsbXkmydIIPNRb+072NUC81 +OqJi4QsmSmPvf/V2gjlluj99RzjM91KvTvZ+gvYV/1bFaydCk/Hd7NdZvyHW +YR8zcOkGSH+oHHVX/wtTq3bEjojkgKiv631u45W4e5fZhZNr8uGylkm1hS0P +9r+uUNLwLoQt/Q7bmT48uFkv8p9KQCG0xRzpUjvJg/Qjnm/IYYWwui95nCeT +Bw/CN7/J84Vw8tSwVNMED+p/DOPYU1YIni8iw6kxa1BVN1blN2cRULyqmfIl +vLj2kvKZxOtF8DZVs+GXIB/uWqdLSy0phrSufIEQZT6carzgX1hTDI78G1wX +9PlQPqvuQ8PTYhiIlvnH6cGH2tQCt1YiL0N+vAzRMj7canM4I2KxGL5uHWFT +HPjRduz7qkDDEpibTHl0MlMA6zbyz7k+K4FKNZHl5TIBXKt+8kNYRwmEeV+w +iGkVQNn3kVXne0tgqT/me+JvAYwEia3pX0ogcrhCrENREJuv/w6y5S6FmPac +PUPBggjyHG1bt5VCQnZEB6ekEArpeuZyVZeCme5BYbH1QtjAlflx/nEp8Dyx +tt2gIYTHg9ZofHlOrB9W7jc3FEJtEJzM6ymFcMW20eSDQvh6emrNq1+l4Jch +8U+lSgivSduX3VQpg903itTN9wnj1z5dbf1zZSConu7v7CWMW7gaqzcnlUF7 +dUyxv78wkqwuMqSvlYFZ/15acrQw8ihKKH7ILAMj8j/j9/nCmKxECeSqLAPd +VLN9/kvCGJdg1tn2uQzEk4fPXrkpgjPndunu0S8HCbWymLlcERSsy980xSwH +cmNchHOhCEb39EqfMyoH2clNxzY0iaDFG5G/2ebloLwzwK36qwgKrTXIi3Mu +Bx2uv5RhHVGsa+B6Px9RDrrp7Vo7mKKo5rr4ZGNMOVC0M9Qfmohireb2Aqv4 +cqC7GSuGOojiYgojLiGpHAxrzvKtjRDFva9nbB9mlINlMGlEu1UU25InOjPr +y8Fq7dfBlC5RFHCN5tjfVA7WWZVvlwZEsWD3KYrks3Kwe+XU0fxTFN1FB2uD +28vBWf1OlaOYGLaElpj1DZTD4ZEtl6LcxPD1Ec/x3XPlcMbGlNU5I4aHT9ID +RFXZQC5tJ3OuICFXreFXHQ02FIjYzGqtJeGaR6/NzTXZ0NPpUnhJjoTUleff +7aewQWl3sOLuHSS8WRlC32zEhsZdt1e/uk7CE8dHtbfZs8HuodLw8h0S/rs5 +zDniyIaxdffrtxSQ8DZncHeYMxuE2kqPX2wkYYPt4agkdza4mbWOWYyT0Dg6 +QM/Jlw1/Tf60v2SIo0nkG4+QU2xIyg3L/2sijsmN1nzXIonzV3PEa+wWR6nC +550Po9iw8ymv4XkvcfRhtFU8jWNDmrF8yc4L4rhNdJ9SygU2bL6TczE8VRyb +d+QNhSYR/nKq+T7IEke3YPYzq8ts+PZYT3kdWxxPZj2VGb/KBhqap7z4II6P +SIflG2+woe32q6DFb+L49p/zQc9bhL/LtlZq0+KobTM48e82G87Uua1J4JFA +/0tV+dJ3iHwxQk6aaUlgks0G48V7bDh0Y3FvmIEEupx5lOZ6n4hvMVL3/jYJ +PPX5MrMmn4inOuH7GkcJVG2V9nMpYEOQfqZrS5QESntMsU1K2GCWwT9tniiB +EYr3zB1L2aDIHR7fflUCH96Nox4oY8OrbruirnsSmFOqI3eEzYZ7Bk+22RVL +oLX5E1nvCjZEZGm966uWQPLjFafsK4l8BKxbOdgugeNTKh6bqtmwqvdEiluf +BLLufJngrmHDAPOL2vBHCXxC4h78QHDC2kabr9MSuLBX59/JOjZ8zQ3NnSJL +ogLXtSNej9lQz/eZfkxJEh3Lzh8UaGTDtWDrjlkNSTzH3zFQTPA2I425JZRE +2id7rdEmNkjnpSVGmEliws5aUsgTNkwL8Chw2kjilP6dk8sEZ73/ZMp9QBKL +j5m2/XvKhhNbrQbPBkhiZ5BBTXAzG6zya4+uC5PEZkth3RGCNwqrcV+MlsSc +tO96u56xYfl4arrQeUnsuvSz6RHBPR9WaSZfk8RQaebQ2ueEvk2CnpAyJHFX +y9/E/QTHPhyyv54nidS2fW2FBDuJWnyXKpHEJ4vRGfME65ysPn2rRhJ/t+es +ZbSwgffTRpJCsySWOP4WOE7wpx3X7t/pkMTrlpmPHhJc+WglqLwl9p8dnRgg +OIkU2HXvkyTaa/9rWdXKBp//Bg+oTUhiyrH1phsJhhHzpYd/JHHs2VXfrQST +zCuTNJcJe/01iiPB34tUlEt4yKgeeSjvIMFPJJIr9YTJ2Mfe++wowTciVlhU +SJFR4Obdy8cIDhr1+0RXJiNpIofv/3azXQMhtZvJeGUkg+5DsGKp6VqkEfbt +36TsCZ4ns283GpKx07qzxJDgV6eVdLeZk/F1YxGXMsF3v156/syGjM0vPghy +EnzKctnJzIWM1yTZ7/qI+OzKfX+1HSBjRVuyZx7BGjLvYi0DCf9C+wqDCOaK +2U7uDCOjr8zIYyrBA2OlBTYxZJxRl077Q+S3ZLeice95Mn6I/GLwkOBzFRd7 +HVLIOLTvUZ4Lwfvl/h4eyCCjjfeHz2sIpsUd4nC9T8bJ/M9TBcT9ftmzbZNn +LRk552lnRwk91FUV1442E/7/OiJ+guBrCvLWB1+R8fhK08hVBG/9uRDmN0xG +Efn+8bX/19eOZNXHE2RM8rbOiSf0V5Cp8U5khowPhjFymdCrhI2bfiWPFH4b +XbrTT+h518P5r2uFpfCnd+IvJDhq9ZVUFykpfLdO/FAGUQ8TFU9nV26WwgvN +FZ93NbBBQdj1rh1VCrvjs76n1xP5Ojxnl4dSaNOirjpC1FODjFq5xR4plHo6 +aOZRy4YrUUnB149LIeWihb90FRue929Smjgthedqm9wYRP0u6TZ1sRKkkJc7 +Ls2OqG/vL3+0R25K4Ue9H5MnytlA37nv1+YmKQz/mOEfXkzoU0zF7wmfNJJN +Yr8fzWODuH+9jLi4NBqcd7tCI/rTzuf2Lw/KS+PRcw7353LZUB6WoC6gI415 +kWSKTzZxHx8mxxzspTHpcwj/KqLfaedVH/iZJY2a1T5itCtsOMBpK270QBqf +OWXz5l4i9LjvR3NymTRaH7yTzk/029X8Cir059K4svh1ekciG94djRuJ+S6N +nc1X9wsR/fo0Y/d+Mk0Gxc9YHrkWyoYdLremqEYyeH3Njqexx9jAHzkebbtT +BtGsf84viNi/KTY3yU0GndmGK7b4s6HCrGp89VkZnD12acnLmw2T9utDfr+V +wfEgwVfFe9jADgvgFhqRQX0+wRTD3YR+b9Smbv4hg9aztsGtFmxYN7S3+iCn +LFKPZEe2mrJhw4FEjiFVWVywMDKNATa4HPtzru2kLB7M1Pz6cRMblFOMpMdi +ZTHwaWivyIb/3/fFh9xJsljuSTQZJTaELW16ZZQti/K61TlnZNlwNdpFrLJN +Fvd05Zp2CRPfk0vPbufIyGHrBjdltwViHii4XnqqXg7dpq1yDz8th6297X9/ +PJfDX55CzmqN5WDBwbXdtVMOX/mvThqtKwcPa7+38FkO9ViZoZYV5WByUiEi +cpU8plZY5Y3fL4cAuZk7hmryOE5SC7W6WA5PDtz+3hQijwn68+OfbMrBd+5X +5HM+BfSMM50Z7SoDeqA3aVRYAXnLGt4Yd5QBz9i7/JUSCphU8MrjRmsZ5PQ3 +9bAUFfDpK5Wb+LgMBuuuqpdRFPBfaOk/24IysIzV78t0VUC/8/UWFWfKQFv4 +9JaTRQp4qrCx+gS1DObVBAc1bBXxT3jfyEhCKTDyH2Rcu7Ye405YmZmKl8Av +YTM3u0YlfB7aHj1+owhGEt3sjnKroMvlj7VLg4/A9Geo6WfKBgxdR6+eLXoA +Ex48QaURG9FvvOe++8484n9AnPNM4yY0vHfqATcpF4Rfqlwo/KmKv+79zerB +OyAd/8iKQlHHltyvDP8DGZCqpi8ockADM74dKFj3Jx1ayYZ6vy9txh/3J7Yo +5KcAXboxaUvPFnTiLXk+kHAF+FdmBe+P0kR/l5G9VM0kkD0tx3BQ0cL/Lle8 +nJM+B2uUncqtn2kh9+fHuzaNx8AhSTDLb9HCmyk3t4a8jYFWPsXBlW1a2Bxj +sanjWQwkznxZVfZKC/92dN/Lzo4B/udBtuLvtFAjKHfuvUsMCB9OmO6f0CLm +w+TU2DfRIF1Upe0lrI0f7xdGxb2Igs1MyUehztoYbdc3TnsbCSXrDy5yumnj +3WMj5yRbIoHGW7n9grs23qSOVK2ujASjXvuh7APaeMjke8nq65FgF5gq1Bmo +jQ17LG1vOERCRI54sHqcNl6l2DlqVUXAKz6S/scCbbTyra2zevcfHB0UbjLj +0EG+x+Grj7qFwfNmp9r7nDoYf2Vy4c32MJB9lMvmXaWDvtvlV+3aEgatEfQH +rWt0MDmnVzP43wlQVHC/aiaig6Umgw05N0/Aa4+iA2YqOpj+9X5G4ofjoPnN +cp3ZTmJ9nGuCfGAo/PydaGuaqoN14Wcd5FqCYaAv0+5mmg5qXd58x6ksGFpr +y/f+uqGDjttPvcjLDIbsM0MO1zN1sKcXLgeFBYOjlK7Lt/s6mEIv+tmkHgxP +jfq9z9bq4PjDuAeWyUGQfmnT8ZZPOljxcH3Za7+jsH1Lc5qphi4+HtlJDrcM +APvVO2xebdHFlqSHZrysADj0voVvr7Yucj5TCrmnHgAXEl5GelJ1cfD8pkui +vAHQ86XbO8JQF29/dqbZJviDZ8awdpmtLs6O/QiIj/CDKKEVL+RP6aJczopv +9ad8oe63weJsuy5yxAjcLOvygcw2tvue17qocLD200KlD8Tk6LQWdOniUnqY ++d4MHzDdq3bdq08X82vbjW2P+EB3FZna9VEXcxelV3jy+MDY6fmjBdO6qCh0 +w7LO6ACQBNljnmQ9jIu+Xzf9zAvmv2pbN0jrYd9Wy7Z/hV4w8LigUkpODzVT +eOZk0rwgMyg3vnO9HioeWD6U7usF6r1XVVBDj5h/49ZcEvYCo1vB7lKoh7f6 +3K46uHuCn7r2u9deeuiu3NAxLegBx2bJC64+elhv9vLDywV3CG9cSf5xSA+J +Dh1VO+IOCfZvHHgD9FD8R7/OUIU73Is5/tYoTA8zbwUxtNzd4dNAXV/JBT0s +CP+b+6tiP9idN++9ytbDwymHJX1D3MDZXnd2fZUevh2xe/Pb3Q0818uIF9fo +YZodffCipRsEVf6wa3+sh8Hqk0lcm9wg6fOlntVteth1hKRcW+kKrcy+N6FD +eniOy7MvIckFmD88ux3WUPBw/P6LPY5OQKrenlWzloKi5V0H5+hO8OOMaoAc +PwXvzLKW9aWc4JbC5NrPwhSMSQj5JTWwD/7ZnDQOkKbg9hcCovau+6C++lJx +3BYKevkfOpd22BEMz9YlldhSMOiKqvbVNHsg22W6kOwp+OpFTVD4KXuYUoxR +P+FIQcn2h4aR7vaQVWP6nOVKwa7mUfn3qvbAOdm93OJDwUNc+cbfavZCk924 +39BJCh6LDOOijNrBNiWJXXxZFAzoLhhe3GkLpd+fKnhmU1AjWoHSqGsLSuyg +mapcCq6walXOlLYFLrOO2z75FLwb23Dm3oQNNPrHTTWVUpCZt2d1/3kbYFVP +p4Q9I/yd606v6d4DFOvXn75MUFDW2s3jU5A15EpFsFk/KfjiSoxusos1iH1W +T7z6i4KnMhZFnUytYTo0Xs94hoIcUgVlGnLWUHwT4m8tU9ApNdO258Vu2PLt +oYatMBUFc5Wp6pt2w8bIc8cbqVQsfJDR3zZqCTUGOat20qnY4e5XaVhnCVaz +9ZffMKiYV3NwduSqJRz3+/PgqyEVXzZzvy/bZgnPndw+8u+k4lkXX7vwuxbg +o08x2+dGxUn9bUXBQbsgb+qj1HQ8Ffls1TM/qJkDq2Dp3n8JVJR65BPVymMO +nQfFKdwXqBhvOmcx+NkMFoZ2WpGvUHHDLXeuyAwzMOtgxxDNEyOmvrneFTeD +sfzz3xOLqBjQ89LInc8UVL3065XfUdF5Oa3yqNh2uKhosRA9QEW/2fYxzXkT +mP7grvdpkIr1To9D+N+bQJ1jYv6tYYL9bZQ35JiAtdWHFPHvVBxOOX/xBcUE +ThjEBqzhoGF9dsXxZtdt8FzotcJ3ZRraLjF9K54Zg0bHZyfzjTTMTlh6tfGR +MVxOXEjJU6XhuXdZk6XXjMGJW4nfewsNu4zypuS8jeHnUsjCII2GVUtJXKzV +xkD6Kt31ypyGOTybGqLMjcCrziemNJCGxUNrSSHfEH4cGQvdFkzDFz3dqh6d +CMdlfA/3hNBw6e/uP77VCOfC/a3nTtJQLs9Io+c8QiE9RJ4RR0O/A7SaRR2E +pfLomqY0GtLOeKRP8gJcfnRrurOJhtu2bAhoOc4AaVf5rx7NNOQ+fGLJcTcD +cviz+qef09CnqDJcVpUBFUdyGkntNIziczlOHzCA92oPkhz7aEhvpRs3GBnA +xnuV6p8maBgy7L+2S4IO9Rndnr/E9LG5SIB8+wsVhnYquIZI6OPTLy7xWc1U +4Jg/4rBI1kdPN+mKjhwqGO3mtlglr4/f1u2+netJheYVdKqkqj4G6Eb5GY5Q +oM399hpDlj6GOnkXcY7rwTulQwVJ3vpYJ3ru9QkxXVh8VX5P7KA+xnp4ODrP +64D0fyvvpB3Wx+RTDSJe73XA+c2NlOwAfTx1eG3gUI4ODMV2RFaE6eO2Yi6L +KJoOfBnV3TN0gThP8W+vhac2TN9bnt3C1sevwx8v/unWhFE7k4yzlfpoqsEl +ml+nCX1c53cMV+tju+Fsx8l7mlDtRr5+rUEfXcXyQv3CNSFKQo/+t0Uf06Te +mlxV1gTB+EPhrQP6aBWve+7W/GZQP/CGw4uTjjnNca8cw9VBVkw6r46Ljj+9 +JBfW26mDYJP7bgluOsqV3D0trakOv2UnM1+speOjicCetBE1qOrhNdYWo+M/ +mmB3s6Ua7DDB2OUNdIwQf1ZYsFkVPJTz16TtoiNJurHEiW8jhD11OaRiRceB +q4FSP79tgCQv4RfF1nQ8neLYWdS8AWpyTiS+2EtHi7eZrGeRG0BUZYfA3/10 +9HaKT1abVYFmlc+ibiF0XJc6oHB3QhlUN8rJq9ym41Fa7Pv3c+sBn3dGFmcS +/jmI/uDtXw92PnEfWdl05Pl7xmx/7XqIvvc9a28eHa8EOpDORq2HgY01ymdL +6Pibt8uqnn89XNjkoDbxjI4y/6hPrm9WhF+qVyjFk3T0dXpy9eE5eehrw20i +v+l4/eXtKvMgeWjw+7En+A8dPy//TORxkocLxaaBlAXC3xH+3Pca8qBK53hQ +tdIAhf9jWA7nyIG76RGFJpIBjpGiMoy2yUL3ge3ruhkGqKUjusumQAqq1/wh +64EBHnGn7SiOk4Ks/KxN1wyJ91cr/NzqKgUBP/+a2JsQdhcWk1tICvhCS08P +WBrgQlxt91wIGUziFGZH3A2IeSM9036nJFRkL378E2+A44/mvztLiQPFOHjW +LMEAmVH+aqcXSFD2cWJdxnkDHFZaqu54S4Ji2UGq2WUDlAvUWvEjlQQPUhvO +30o3wKZL3jabJEmQkRirv73AAEVoN68fURCDs8ECl1K7DFDyNKX1haUI8IjE +535/Y4DyYarbZ3REIK6Io8aozwAHXij0bpMQgZgfv0YnBgzQOpYzZM9HYTjl +080wHDVAflPe7PXHhOGo0/Wv3+YM8GF/DG/AHSFw3LoeDWQZWPzN/VCspCD8 +7ebhb5JnoMR36tuFZQHI8PrRb7aegelX9pjpvRSA0bjKUMeNDORM9HhzxkcA +jrZYPjqhzcB8UqpLahY/nLMIl60wYSC/3Q5bASU+qLJ/s6Trz8ANl97eK3Dg +BedvVa01gQxc19exVWMLL3CEZaRuDWbgN/eaXWNcvGCSfljX5gQDtfkct8kW +rYHO9yt8g6IZmPzhNMNz3RoYc9/cX5TCQG87B5Bp5wapI2cqNzcwMOCCdMaK +8FVwYdlbL6GRgdGrOsxX71sFnJdNir48YeCPqfgAGn0VjJWvystoYaDYi0Qt +pXkuqOKISRXuYqCf5ad54RNc4JgcGTrzmYFX5aMGJE+vhNTqE3p1a5m4vLBy +hFm4AtZZOBSR+ZmYlStgdDp5BUQO0TRCBZnY6OzNO358BfismlPSFGPi+eB+ +Xi2jFUC1DBHNkmXiF359zdM9HNDz6ejvWC0mMY/vJa1ezQFivL5Fu/Yy8fNl +h1MZ/5ZY2cb/hU06MFFC1SYovXWJpf3fBeMrTkw0qVLU/XJtiWUxWfimbz8T +SbV7df01l1hxPX/mPXyZ6D96gKR7YJE1lxVhFHaaiX/9A1eoDc+z3hlc6crN +Z2KTrdLLeqFZls+x7BumBUz0rLm6ODM6w5opKPOaKGRi4Al11cCaGZawYt+s +VjkT2f1Vi+o+MyxzHhnp2gYmHrN7WM9u/MOq6c717HrDxDKxbJvm6GmWGX+F +RkgfExU8Ug9yOE+z+ra3zEj0M3FGkSsllDLNmq4aj3cZYmKdx40eqbHfLI1M +zYffxpjYHr/OVNvmN6vmnWFI4ncm/opu/898y2+Wmege2DLJxMdmbwVv8/5m +eZ859jr4DxNr5pOWfz+eYk03xKWJzzHx1M74kumbU6yohRSPqgUmikXvC9kc +NsUS1M1Td/7LxJbjl/9k2E2xbh2p+rO8zMTpPYYfzHWmWP8DPTlJ2g== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k8VO8XxyVFys5g7EJlKevMGDNzDkqhkBCyZUslS0TJN7KlqFSKaEEo +KdnHTpQiUQhFUqRCJclefvf31329X+c+z3POeT7n3HMV3P2tvTg5ODiKVnBw +/P85M9jyRCkhm5U2vDjz/r0Fq/uWxAnDvij4MLvwJMBKHVCsw12i7zLcuCN2 +WsOKASFW93tX9mVBh/zLqDnLnSD0Q/zyfG8xpDsbXkmydIIPNRb+072NUC81 +OqJi4QsmSmPvf/V2gjlluj99RzjM91KvTvZ+gvYV/1bFaydCk/Hd7NdZvyHW +YR8zcOkGSH+oHHVX/wtTq3bEjojkgKiv631u45W4e5fZhZNr8uGylkm1hS0P +9r+uUNLwLoQt/Q7bmT48uFkv8p9KQCG0xRzpUjvJg/Qjnm/IYYWwui95nCeT +Bw/CN7/J84Vw8tSwVNMED+p/DOPYU1YIni8iw6kxa1BVN1blN2cRULyqmfIl +vLj2kvKZxOtF8DZVs+GXIB/uWqdLSy0phrSufIEQZT6carzgX1hTDI78G1wX +9PlQPqvuQ8PTYhiIlvnH6cGH2tQCt1YiL0N+vAzRMj7canM4I2KxGL5uHWFT +HPjRduz7qkDDEpibTHl0MlMA6zbyz7k+K4FKNZHl5TIBXKt+8kNYRwmEeV+w +iGkVQNn3kVXne0tgqT/me+JvAYwEia3pX0ogcrhCrENREJuv/w6y5S6FmPac +PUPBggjyHG1bt5VCQnZEB6ekEArpeuZyVZeCme5BYbH1QtjAlflx/nEp8Dyx +tt2gIYTHg9ZofHlOrB9W7jc3FEJtEJzM6ymFcMW20eSDQvh6emrNq1+l4Jch +8U+lSgivSduX3VQpg903itTN9wnj1z5dbf1zZSConu7v7CWMW7gaqzcnlUF7 +dUyxv78wkqwuMqSvlYFZ/15acrQw8ihKKH7ILAMj8j/j9/nCmKxECeSqLAPd +VLN9/kvCGJdg1tn2uQzEk4fPXrkpgjPndunu0S8HCbWymLlcERSsy980xSwH +cmNchHOhCEb39EqfMyoH2clNxzY0iaDFG5G/2ebloLwzwK36qwgKrTXIi3Mu +Bx2uv5RhHVGsa+B6Px9RDrrp7Vo7mKKo5rr4ZGNMOVC0M9Qfmohireb2Aqv4 +cqC7GSuGOojiYgojLiGpHAxrzvKtjRDFva9nbB9mlINlMGlEu1UU25InOjPr +y8Fq7dfBlC5RFHCN5tjfVA7WWZVvlwZEsWD3KYrks3Kwe+XU0fxTFN1FB2uD +28vBWf1OlaOYGLaElpj1DZTD4ZEtl6LcxPD1Ec/x3XPlcMbGlNU5I4aHT9ID +RFXZQC5tJ3OuICFXreFXHQ02FIjYzGqtJeGaR6/NzTXZ0NPpUnhJjoTUleff +7aewQWl3sOLuHSS8WRlC32zEhsZdt1e/uk7CE8dHtbfZs8HuodLw8h0S/rs5 +zDniyIaxdffrtxSQ8DZncHeYMxuE2kqPX2wkYYPt4agkdza4mbWOWYyT0Dg6 +QM/Jlw1/Tf60v2SIo0nkG4+QU2xIyg3L/2sijsmN1nzXIonzV3PEa+wWR6nC +550Po9iw8ymv4XkvcfRhtFU8jWNDmrF8yc4L4rhNdJ9SygU2bL6TczE8VRyb +d+QNhSYR/nKq+T7IEke3YPYzq8ts+PZYT3kdWxxPZj2VGb/KBhqap7z4II6P +SIflG2+woe32q6DFb+L49p/zQc9bhL/LtlZq0+KobTM48e82G87Uua1J4JFA +/0tV+dJ3iHwxQk6aaUlgks0G48V7bDh0Y3FvmIEEupx5lOZ6n4hvMVL3/jYJ +PPX5MrMmn4inOuH7GkcJVG2V9nMpYEOQfqZrS5QESntMsU1K2GCWwT9tniiB +EYr3zB1L2aDIHR7fflUCH96Nox4oY8OrbruirnsSmFOqI3eEzYZ7Bk+22RVL +oLX5E1nvCjZEZGm966uWQPLjFafsK4l8BKxbOdgugeNTKh6bqtmwqvdEiluf +BLLufJngrmHDAPOL2vBHCXxC4h78QHDC2kabr9MSuLBX59/JOjZ8zQ3NnSJL +ogLXtSNej9lQz/eZfkxJEh3Lzh8UaGTDtWDrjlkNSTzH3zFQTPA2I425JZRE +2id7rdEmNkjnpSVGmEliws5aUsgTNkwL8Chw2kjilP6dk8sEZ73/ZMp9QBKL +j5m2/XvKhhNbrQbPBkhiZ5BBTXAzG6zya4+uC5PEZkth3RGCNwqrcV+MlsSc +tO96u56xYfl4arrQeUnsuvSz6RHBPR9WaSZfk8RQaebQ2ueEvk2CnpAyJHFX +y9/E/QTHPhyyv54nidS2fW2FBDuJWnyXKpHEJ4vRGfME65ysPn2rRhJ/t+es +ZbSwgffTRpJCsySWOP4WOE7wpx3X7t/pkMTrlpmPHhJc+WglqLwl9p8dnRgg +OIkU2HXvkyTaa/9rWdXKBp//Bg+oTUhiyrH1phsJhhHzpYd/JHHs2VXfrQST +zCuTNJcJe/01iiPB34tUlEt4yKgeeSjvIMFPJJIr9YTJ2Mfe++wowTciVlhU +SJFR4Obdy8cIDhr1+0RXJiNpIofv/3azXQMhtZvJeGUkg+5DsGKp6VqkEfbt +36TsCZ4ns283GpKx07qzxJDgV6eVdLeZk/F1YxGXMsF3v156/syGjM0vPghy +EnzKctnJzIWM1yTZ7/qI+OzKfX+1HSBjRVuyZx7BGjLvYi0DCf9C+wqDCOaK +2U7uDCOjr8zIYyrBA2OlBTYxZJxRl077Q+S3ZLeice95Mn6I/GLwkOBzFRd7 +HVLIOLTvUZ4Lwfvl/h4eyCCjjfeHz2sIpsUd4nC9T8bJ/M9TBcT9ftmzbZNn +LRk552lnRwk91FUV1442E/7/OiJ+guBrCvLWB1+R8fhK08hVBG/9uRDmN0xG +Efn+8bX/19eOZNXHE2RM8rbOiSf0V5Cp8U5khowPhjFymdCrhI2bfiWPFH4b +XbrTT+h518P5r2uFpfCnd+IvJDhq9ZVUFykpfLdO/FAGUQ8TFU9nV26WwgvN +FZ93NbBBQdj1rh1VCrvjs76n1xP5Ojxnl4dSaNOirjpC1FODjFq5xR4plHo6 +aOZRy4YrUUnB149LIeWihb90FRue929Smjgthedqm9wYRP0u6TZ1sRKkkJc7 +Ls2OqG/vL3+0R25K4Ue9H5MnytlA37nv1+YmKQz/mOEfXkzoU0zF7wmfNJJN +Yr8fzWODuH+9jLi4NBqcd7tCI/rTzuf2Lw/KS+PRcw7353LZUB6WoC6gI415 +kWSKTzZxHx8mxxzspTHpcwj/KqLfaedVH/iZJY2a1T5itCtsOMBpK270QBqf +OWXz5l4i9LjvR3NymTRaH7yTzk/029X8Cir059K4svh1ekciG94djRuJ+S6N +nc1X9wsR/fo0Y/d+Mk0Gxc9YHrkWyoYdLremqEYyeH3Njqexx9jAHzkebbtT +BtGsf84viNi/KTY3yU0GndmGK7b4s6HCrGp89VkZnD12acnLmw2T9utDfr+V +wfEgwVfFe9jADgvgFhqRQX0+wRTD3YR+b9Smbv4hg9aztsGtFmxYN7S3+iCn +LFKPZEe2mrJhw4FEjiFVWVywMDKNATa4HPtzru2kLB7M1Pz6cRMblFOMpMdi +ZTHwaWivyIb/3/fFh9xJsljuSTQZJTaELW16ZZQti/K61TlnZNlwNdpFrLJN +Fvd05Zp2CRPfk0vPbufIyGHrBjdltwViHii4XnqqXg7dpq1yDz8th6297X9/ +PJfDX55CzmqN5WDBwbXdtVMOX/mvThqtKwcPa7+38FkO9ViZoZYV5WByUiEi +cpU8plZY5Y3fL4cAuZk7hmryOE5SC7W6WA5PDtz+3hQijwn68+OfbMrBd+5X +5HM+BfSMM50Z7SoDeqA3aVRYAXnLGt4Yd5QBz9i7/JUSCphU8MrjRmsZ5PQ3 +9bAUFfDpK5Wb+LgMBuuuqpdRFPBfaOk/24IysIzV78t0VUC/8/UWFWfKQFv4 +9JaTRQp4qrCx+gS1DObVBAc1bBXxT3jfyEhCKTDyH2Rcu7Ye405YmZmKl8Av +YTM3u0YlfB7aHj1+owhGEt3sjnKroMvlj7VLg4/A9Geo6WfKBgxdR6+eLXoA +Ex48QaURG9FvvOe++8484n9AnPNM4yY0vHfqATcpF4Rfqlwo/KmKv+79zerB +OyAd/8iKQlHHltyvDP8DGZCqpi8ockADM74dKFj3Jx1ayYZ6vy9txh/3J7Yo +5KcAXboxaUvPFnTiLXk+kHAF+FdmBe+P0kR/l5G9VM0kkD0tx3BQ0cL/Lle8 +nJM+B2uUncqtn2kh9+fHuzaNx8AhSTDLb9HCmyk3t4a8jYFWPsXBlW1a2Bxj +sanjWQwkznxZVfZKC/92dN/Lzo4B/udBtuLvtFAjKHfuvUsMCB9OmO6f0CLm +w+TU2DfRIF1Upe0lrI0f7xdGxb2Igs1MyUehztoYbdc3TnsbCSXrDy5yumnj +3WMj5yRbIoHGW7n9grs23qSOVK2ujASjXvuh7APaeMjke8nq65FgF5gq1Bmo +jQ17LG1vOERCRI54sHqcNl6l2DlqVUXAKz6S/scCbbTyra2zevcfHB0UbjLj +0EG+x+Grj7qFwfNmp9r7nDoYf2Vy4c32MJB9lMvmXaWDvtvlV+3aEgatEfQH +rWt0MDmnVzP43wlQVHC/aiaig6Umgw05N0/Aa4+iA2YqOpj+9X5G4ofjoPnN +cp3ZTmJ9nGuCfGAo/PydaGuaqoN14Wcd5FqCYaAv0+5mmg5qXd58x6ksGFpr +y/f+uqGDjttPvcjLDIbsM0MO1zN1sKcXLgeFBYOjlK7Lt/s6mEIv+tmkHgxP +jfq9z9bq4PjDuAeWyUGQfmnT8ZZPOljxcH3Za7+jsH1Lc5qphi4+HtlJDrcM +APvVO2xebdHFlqSHZrysADj0voVvr7Yucj5TCrmnHgAXEl5GelJ1cfD8pkui +vAHQ86XbO8JQF29/dqbZJviDZ8awdpmtLs6O/QiIj/CDKKEVL+RP6aJczopv +9ad8oe63weJsuy5yxAjcLOvygcw2tvue17qocLD200KlD8Tk6LQWdOniUnqY ++d4MHzDdq3bdq08X82vbjW2P+EB3FZna9VEXcxelV3jy+MDY6fmjBdO6qCh0 +w7LO6ACQBNljnmQ9jIu+Xzf9zAvmv2pbN0jrYd9Wy7Z/hV4w8LigUkpODzVT +eOZk0rwgMyg3vnO9HioeWD6U7usF6r1XVVBDj5h/49ZcEvYCo1vB7lKoh7f6 +3K46uHuCn7r2u9deeuiu3NAxLegBx2bJC64+elhv9vLDywV3CG9cSf5xSA+J +Dh1VO+IOCfZvHHgD9FD8R7/OUIU73Is5/tYoTA8zbwUxtNzd4dNAXV/JBT0s +CP+b+6tiP9idN++9ytbDwymHJX1D3MDZXnd2fZUevh2xe/Pb3Q0818uIF9fo +YZodffCipRsEVf6wa3+sh8Hqk0lcm9wg6fOlntVteth1hKRcW+kKrcy+N6FD +eniOy7MvIckFmD88ux3WUPBw/P6LPY5OQKrenlWzloKi5V0H5+hO8OOMaoAc +PwXvzLKW9aWc4JbC5NrPwhSMSQj5JTWwD/7ZnDQOkKbg9hcCovau+6C++lJx +3BYKevkfOpd22BEMz9YlldhSMOiKqvbVNHsg22W6kOwp+OpFTVD4KXuYUoxR +P+FIQcn2h4aR7vaQVWP6nOVKwa7mUfn3qvbAOdm93OJDwUNc+cbfavZCk924 +39BJCh6LDOOijNrBNiWJXXxZFAzoLhhe3GkLpd+fKnhmU1AjWoHSqGsLSuyg +mapcCq6walXOlLYFLrOO2z75FLwb23Dm3oQNNPrHTTWVUpCZt2d1/3kbYFVP +p4Q9I/yd606v6d4DFOvXn75MUFDW2s3jU5A15EpFsFk/KfjiSoxusos1iH1W +T7z6i4KnMhZFnUytYTo0Xs94hoIcUgVlGnLWUHwT4m8tU9ApNdO258Vu2PLt +oYatMBUFc5Wp6pt2w8bIc8cbqVQsfJDR3zZqCTUGOat20qnY4e5XaVhnCVaz +9ZffMKiYV3NwduSqJRz3+/PgqyEVXzZzvy/bZgnPndw+8u+k4lkXX7vwuxbg +o08x2+dGxUn9bUXBQbsgb+qj1HQ8Ffls1TM/qJkDq2Dp3n8JVJR65BPVymMO +nQfFKdwXqBhvOmcx+NkMFoZ2WpGvUHHDLXeuyAwzMOtgxxDNEyOmvrneFTeD +sfzz3xOLqBjQ89LInc8UVL3065XfUdF5Oa3yqNh2uKhosRA9QEW/2fYxzXkT +mP7grvdpkIr1To9D+N+bQJ1jYv6tYYL9bZQ35JiAtdWHFPHvVBxOOX/xBcUE +ThjEBqzhoGF9dsXxZtdt8FzotcJ3ZRraLjF9K54Zg0bHZyfzjTTMTlh6tfGR +MVxOXEjJU6XhuXdZk6XXjMGJW4nfewsNu4zypuS8jeHnUsjCII2GVUtJXKzV +xkD6Kt31ypyGOTybGqLMjcCrziemNJCGxUNrSSHfEH4cGQvdFkzDFz3dqh6d +CMdlfA/3hNBw6e/uP77VCOfC/a3nTtJQLs9Io+c8QiE9RJ4RR0O/A7SaRR2E +pfLomqY0GtLOeKRP8gJcfnRrurOJhtu2bAhoOc4AaVf5rx7NNOQ+fGLJcTcD +cviz+qef09CnqDJcVpUBFUdyGkntNIziczlOHzCA92oPkhz7aEhvpRs3GBnA +xnuV6p8maBgy7L+2S4IO9Rndnr/E9LG5SIB8+wsVhnYquIZI6OPTLy7xWc1U +4Jg/4rBI1kdPN+mKjhwqGO3mtlglr4/f1u2+netJheYVdKqkqj4G6Eb5GY5Q +oM399hpDlj6GOnkXcY7rwTulQwVJ3vpYJ3ru9QkxXVh8VX5P7KA+xnp4ODrP +64D0fyvvpB3Wx+RTDSJe73XA+c2NlOwAfTx1eG3gUI4ODMV2RFaE6eO2Yi6L +KJoOfBnV3TN0gThP8W+vhac2TN9bnt3C1sevwx8v/unWhFE7k4yzlfpoqsEl +ml+nCX1c53cMV+tju+Fsx8l7mlDtRr5+rUEfXcXyQv3CNSFKQo/+t0Uf06Te +mlxV1gTB+EPhrQP6aBWve+7W/GZQP/CGw4uTjjnNca8cw9VBVkw6r46Ljj+9 +JBfW26mDYJP7bgluOsqV3D0trakOv2UnM1+speOjicCetBE1qOrhNdYWo+M/ +mmB3s6Ua7DDB2OUNdIwQf1ZYsFkVPJTz16TtoiNJurHEiW8jhD11OaRiRceB +q4FSP79tgCQv4RfF1nQ8neLYWdS8AWpyTiS+2EtHi7eZrGeRG0BUZYfA3/10 +9HaKT1abVYFmlc+ibiF0XJc6oHB3QhlUN8rJq9ym41Fa7Pv3c+sBn3dGFmcS +/jmI/uDtXw92PnEfWdl05Pl7xmx/7XqIvvc9a28eHa8EOpDORq2HgY01ymdL +6Pibt8uqnn89XNjkoDbxjI4y/6hPrm9WhF+qVyjFk3T0dXpy9eE5eehrw20i +v+l4/eXtKvMgeWjw+7En+A8dPy//TORxkocLxaaBlAXC3xH+3Pca8qBK53hQ +tdIAhf9jWA7nyIG76RGFJpIBjpGiMoy2yUL3ge3ruhkGqKUjusumQAqq1/wh +64EBHnGn7SiOk4Ks/KxN1wyJ91cr/NzqKgUBP/+a2JsQdhcWk1tICvhCS08P +WBrgQlxt91wIGUziFGZH3A2IeSM9036nJFRkL378E2+A44/mvztLiQPFOHjW +LMEAmVH+aqcXSFD2cWJdxnkDHFZaqu54S4Ji2UGq2WUDlAvUWvEjlQQPUhvO +30o3wKZL3jabJEmQkRirv73AAEVoN68fURCDs8ECl1K7DFDyNKX1haUI8IjE +535/Y4DyYarbZ3REIK6Io8aozwAHXij0bpMQgZgfv0YnBgzQOpYzZM9HYTjl +080wHDVAflPe7PXHhOGo0/Wv3+YM8GF/DG/AHSFw3LoeDWQZWPzN/VCspCD8 +7ebhb5JnoMR36tuFZQHI8PrRb7aegelX9pjpvRSA0bjKUMeNDORM9HhzxkcA +jrZYPjqhzcB8UqpLahY/nLMIl60wYSC/3Q5bASU+qLJ/s6Trz8ANl97eK3Dg +BedvVa01gQxc19exVWMLL3CEZaRuDWbgN/eaXWNcvGCSfljX5gQDtfkct8kW +rYHO9yt8g6IZmPzhNMNz3RoYc9/cX5TCQG87B5Bp5wapI2cqNzcwMOCCdMaK +8FVwYdlbL6GRgdGrOsxX71sFnJdNir48YeCPqfgAGn0VjJWvystoYaDYi0Qt +pXkuqOKISRXuYqCf5ad54RNc4JgcGTrzmYFX5aMGJE+vhNTqE3p1a5m4vLBy +hFm4AtZZOBSR+ZmYlStgdDp5BUQO0TRCBZnY6OzNO358BfismlPSFGPi+eB+ +Xi2jFUC1DBHNkmXiF359zdM9HNDz6ejvWC0mMY/vJa1ezQFivL5Fu/Yy8fNl +h1MZ/5ZY2cb/hU06MFFC1SYovXWJpf3fBeMrTkw0qVLU/XJtiWUxWfimbz8T +SbV7df01l1hxPX/mPXyZ6D96gKR7YJE1lxVhFHaaiX/9A1eoDc+z3hlc6crN +Z2KTrdLLeqFZls+x7BumBUz0rLm6ODM6w5opKPOaKGRi4Al11cCaGZawYt+s +VjkT2f1Vi+o+MyxzHhnp2gYmHrN7WM9u/MOq6c717HrDxDKxbJvm6GmWGX+F +RkgfExU8Ug9yOE+z+ra3zEj0M3FGkSsllDLNmq4aj3cZYmKdx40eqbHfLI1M +zYffxpjYHr/OVNvmN6vmnWFI4ncm/opu/898y2+Wmege2DLJxMdmbwVv8/5m +eZ859jr4DxNr5pOWfz+eYk03xKWJzzHx1M74kumbU6yohRSPqgUmikXvC9kc +NsUS1M1Td/7LxJbjl/9k2E2xbh2p+rO8zMTpPYYfzHWmWP8DPTlJ2g== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0929330332797813}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0929330332797813}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVl3k8VO8XxyVFys5g7EJlKevMGDNzDkqhkBCyZUslS0TJN7KlqFSKaEEo +KdnHTpQiUQhFUqRCJclefvf31329X+c+z3POeT7n3HMV3P2tvTg5ODiKVnBw +/P85M9jyRCkhm5U2vDjz/r0Fq/uWxAnDvij4MLvwJMBKHVCsw12i7zLcuCN2 +WsOKASFW93tX9mVBh/zLqDnLnSD0Q/zyfG8xpDsbXkmydIIPNRb+072NUC81 +OqJi4QsmSmPvf/V2gjlluj99RzjM91KvTvZ+gvYV/1bFaydCk/Hd7NdZvyHW +YR8zcOkGSH+oHHVX/wtTq3bEjojkgKiv631u45W4e5fZhZNr8uGylkm1hS0P +9r+uUNLwLoQt/Q7bmT48uFkv8p9KQCG0xRzpUjvJg/Qjnm/IYYWwui95nCeT +Bw/CN7/J84Vw8tSwVNMED+p/DOPYU1YIni8iw6kxa1BVN1blN2cRULyqmfIl +vLj2kvKZxOtF8DZVs+GXIB/uWqdLSy0phrSufIEQZT6carzgX1hTDI78G1wX +9PlQPqvuQ8PTYhiIlvnH6cGH2tQCt1YiL0N+vAzRMj7canM4I2KxGL5uHWFT +HPjRduz7qkDDEpibTHl0MlMA6zbyz7k+K4FKNZHl5TIBXKt+8kNYRwmEeV+w +iGkVQNn3kVXne0tgqT/me+JvAYwEia3pX0ogcrhCrENREJuv/w6y5S6FmPac +PUPBggjyHG1bt5VCQnZEB6ekEArpeuZyVZeCme5BYbH1QtjAlflx/nEp8Dyx +tt2gIYTHg9ZofHlOrB9W7jc3FEJtEJzM6ymFcMW20eSDQvh6emrNq1+l4Jch +8U+lSgivSduX3VQpg903itTN9wnj1z5dbf1zZSConu7v7CWMW7gaqzcnlUF7 +dUyxv78wkqwuMqSvlYFZ/15acrQw8ihKKH7ILAMj8j/j9/nCmKxECeSqLAPd +VLN9/kvCGJdg1tn2uQzEk4fPXrkpgjPndunu0S8HCbWymLlcERSsy980xSwH +cmNchHOhCEb39EqfMyoH2clNxzY0iaDFG5G/2ebloLwzwK36qwgKrTXIi3Mu +Bx2uv5RhHVGsa+B6Px9RDrrp7Vo7mKKo5rr4ZGNMOVC0M9Qfmohireb2Aqv4 +cqC7GSuGOojiYgojLiGpHAxrzvKtjRDFva9nbB9mlINlMGlEu1UU25InOjPr +y8Fq7dfBlC5RFHCN5tjfVA7WWZVvlwZEsWD3KYrks3Kwe+XU0fxTFN1FB2uD +28vBWf1OlaOYGLaElpj1DZTD4ZEtl6LcxPD1Ec/x3XPlcMbGlNU5I4aHT9ID +RFXZQC5tJ3OuICFXreFXHQ02FIjYzGqtJeGaR6/NzTXZ0NPpUnhJjoTUleff +7aewQWl3sOLuHSS8WRlC32zEhsZdt1e/uk7CE8dHtbfZs8HuodLw8h0S/rs5 +zDniyIaxdffrtxSQ8DZncHeYMxuE2kqPX2wkYYPt4agkdza4mbWOWYyT0Dg6 +QM/Jlw1/Tf60v2SIo0nkG4+QU2xIyg3L/2sijsmN1nzXIonzV3PEa+wWR6nC +550Po9iw8ymv4XkvcfRhtFU8jWNDmrF8yc4L4rhNdJ9SygU2bL6TczE8VRyb +d+QNhSYR/nKq+T7IEke3YPYzq8ts+PZYT3kdWxxPZj2VGb/KBhqap7z4II6P +SIflG2+woe32q6DFb+L49p/zQc9bhL/LtlZq0+KobTM48e82G87Uua1J4JFA +/0tV+dJ3iHwxQk6aaUlgks0G48V7bDh0Y3FvmIEEupx5lOZ6n4hvMVL3/jYJ +PPX5MrMmn4inOuH7GkcJVG2V9nMpYEOQfqZrS5QESntMsU1K2GCWwT9tniiB +EYr3zB1L2aDIHR7fflUCH96Nox4oY8OrbruirnsSmFOqI3eEzYZ7Bk+22RVL +oLX5E1nvCjZEZGm966uWQPLjFafsK4l8BKxbOdgugeNTKh6bqtmwqvdEiluf +BLLufJngrmHDAPOL2vBHCXxC4h78QHDC2kabr9MSuLBX59/JOjZ8zQ3NnSJL +ogLXtSNej9lQz/eZfkxJEh3Lzh8UaGTDtWDrjlkNSTzH3zFQTPA2I425JZRE +2id7rdEmNkjnpSVGmEliws5aUsgTNkwL8Chw2kjilP6dk8sEZ73/ZMp9QBKL +j5m2/XvKhhNbrQbPBkhiZ5BBTXAzG6zya4+uC5PEZkth3RGCNwqrcV+MlsSc +tO96u56xYfl4arrQeUnsuvSz6RHBPR9WaSZfk8RQaebQ2ueEvk2CnpAyJHFX +y9/E/QTHPhyyv54nidS2fW2FBDuJWnyXKpHEJ4vRGfME65ysPn2rRhJ/t+es +ZbSwgffTRpJCsySWOP4WOE7wpx3X7t/pkMTrlpmPHhJc+WglqLwl9p8dnRgg +OIkU2HXvkyTaa/9rWdXKBp//Bg+oTUhiyrH1phsJhhHzpYd/JHHs2VXfrQST +zCuTNJcJe/01iiPB34tUlEt4yKgeeSjvIMFPJJIr9YTJ2Mfe++wowTciVlhU +SJFR4Obdy8cIDhr1+0RXJiNpIofv/3azXQMhtZvJeGUkg+5DsGKp6VqkEfbt +36TsCZ4ns283GpKx07qzxJDgV6eVdLeZk/F1YxGXMsF3v156/syGjM0vPghy +EnzKctnJzIWM1yTZ7/qI+OzKfX+1HSBjRVuyZx7BGjLvYi0DCf9C+wqDCOaK +2U7uDCOjr8zIYyrBA2OlBTYxZJxRl077Q+S3ZLeice95Mn6I/GLwkOBzFRd7 +HVLIOLTvUZ4Lwfvl/h4eyCCjjfeHz2sIpsUd4nC9T8bJ/M9TBcT9ftmzbZNn +LRk552lnRwk91FUV1442E/7/OiJ+guBrCvLWB1+R8fhK08hVBG/9uRDmN0xG +Efn+8bX/19eOZNXHE2RM8rbOiSf0V5Cp8U5khowPhjFymdCrhI2bfiWPFH4b +XbrTT+h518P5r2uFpfCnd+IvJDhq9ZVUFykpfLdO/FAGUQ8TFU9nV26WwgvN +FZ93NbBBQdj1rh1VCrvjs76n1xP5Ojxnl4dSaNOirjpC1FODjFq5xR4plHo6 +aOZRy4YrUUnB149LIeWihb90FRue929Smjgthedqm9wYRP0u6TZ1sRKkkJc7 +Ls2OqG/vL3+0R25K4Ue9H5MnytlA37nv1+YmKQz/mOEfXkzoU0zF7wmfNJJN +Yr8fzWODuH+9jLi4NBqcd7tCI/rTzuf2Lw/KS+PRcw7353LZUB6WoC6gI415 +kWSKTzZxHx8mxxzspTHpcwj/KqLfaedVH/iZJY2a1T5itCtsOMBpK270QBqf +OWXz5l4i9LjvR3NymTRaH7yTzk/029X8Cir059K4svh1ekciG94djRuJ+S6N +nc1X9wsR/fo0Y/d+Mk0Gxc9YHrkWyoYdLremqEYyeH3Njqexx9jAHzkebbtT +BtGsf84viNi/KTY3yU0GndmGK7b4s6HCrGp89VkZnD12acnLmw2T9utDfr+V +wfEgwVfFe9jADgvgFhqRQX0+wRTD3YR+b9Smbv4hg9aztsGtFmxYN7S3+iCn +LFKPZEe2mrJhw4FEjiFVWVywMDKNATa4HPtzru2kLB7M1Pz6cRMblFOMpMdi +ZTHwaWivyIb/3/fFh9xJsljuSTQZJTaELW16ZZQti/K61TlnZNlwNdpFrLJN +Fvd05Zp2CRPfk0vPbufIyGHrBjdltwViHii4XnqqXg7dpq1yDz8th6297X9/ +PJfDX55CzmqN5WDBwbXdtVMOX/mvThqtKwcPa7+38FkO9ViZoZYV5WByUiEi +cpU8plZY5Y3fL4cAuZk7hmryOE5SC7W6WA5PDtz+3hQijwn68+OfbMrBd+5X +5HM+BfSMM50Z7SoDeqA3aVRYAXnLGt4Yd5QBz9i7/JUSCphU8MrjRmsZ5PQ3 +9bAUFfDpK5Wb+LgMBuuuqpdRFPBfaOk/24IysIzV78t0VUC/8/UWFWfKQFv4 +9JaTRQp4qrCx+gS1DObVBAc1bBXxT3jfyEhCKTDyH2Rcu7Ye405YmZmKl8Av +YTM3u0YlfB7aHj1+owhGEt3sjnKroMvlj7VLg4/A9Geo6WfKBgxdR6+eLXoA +Ex48QaURG9FvvOe++8484n9AnPNM4yY0vHfqATcpF4Rfqlwo/KmKv+79zerB +OyAd/8iKQlHHltyvDP8DGZCqpi8ockADM74dKFj3Jx1ayYZ6vy9txh/3J7Yo +5KcAXboxaUvPFnTiLXk+kHAF+FdmBe+P0kR/l5G9VM0kkD0tx3BQ0cL/Lle8 +nJM+B2uUncqtn2kh9+fHuzaNx8AhSTDLb9HCmyk3t4a8jYFWPsXBlW1a2Bxj +sanjWQwkznxZVfZKC/92dN/Lzo4B/udBtuLvtFAjKHfuvUsMCB9OmO6f0CLm +w+TU2DfRIF1Upe0lrI0f7xdGxb2Igs1MyUehztoYbdc3TnsbCSXrDy5yumnj +3WMj5yRbIoHGW7n9grs23qSOVK2ujASjXvuh7APaeMjke8nq65FgF5gq1Bmo +jQ17LG1vOERCRI54sHqcNl6l2DlqVUXAKz6S/scCbbTyra2zevcfHB0UbjLj +0EG+x+Grj7qFwfNmp9r7nDoYf2Vy4c32MJB9lMvmXaWDvtvlV+3aEgatEfQH +rWt0MDmnVzP43wlQVHC/aiaig6Umgw05N0/Aa4+iA2YqOpj+9X5G4ofjoPnN +cp3ZTmJ9nGuCfGAo/PydaGuaqoN14Wcd5FqCYaAv0+5mmg5qXd58x6ksGFpr +y/f+uqGDjttPvcjLDIbsM0MO1zN1sKcXLgeFBYOjlK7Lt/s6mEIv+tmkHgxP +jfq9z9bq4PjDuAeWyUGQfmnT8ZZPOljxcH3Za7+jsH1Lc5qphi4+HtlJDrcM +APvVO2xebdHFlqSHZrysADj0voVvr7Yucj5TCrmnHgAXEl5GelJ1cfD8pkui +vAHQ86XbO8JQF29/dqbZJviDZ8awdpmtLs6O/QiIj/CDKKEVL+RP6aJczopv +9ad8oe63weJsuy5yxAjcLOvygcw2tvue17qocLD200KlD8Tk6LQWdOniUnqY ++d4MHzDdq3bdq08X82vbjW2P+EB3FZna9VEXcxelV3jy+MDY6fmjBdO6qCh0 +w7LO6ACQBNljnmQ9jIu+Xzf9zAvmv2pbN0jrYd9Wy7Z/hV4w8LigUkpODzVT +eOZk0rwgMyg3vnO9HioeWD6U7usF6r1XVVBDj5h/49ZcEvYCo1vB7lKoh7f6 +3K46uHuCn7r2u9deeuiu3NAxLegBx2bJC64+elhv9vLDywV3CG9cSf5xSA+J +Dh1VO+IOCfZvHHgD9FD8R7/OUIU73Is5/tYoTA8zbwUxtNzd4dNAXV/JBT0s +CP+b+6tiP9idN++9ytbDwymHJX1D3MDZXnd2fZUevh2xe/Pb3Q0818uIF9fo +YZodffCipRsEVf6wa3+sh8Hqk0lcm9wg6fOlntVteth1hKRcW+kKrcy+N6FD +eniOy7MvIckFmD88ux3WUPBw/P6LPY5OQKrenlWzloKi5V0H5+hO8OOMaoAc +PwXvzLKW9aWc4JbC5NrPwhSMSQj5JTWwD/7ZnDQOkKbg9hcCovau+6C++lJx +3BYKevkfOpd22BEMz9YlldhSMOiKqvbVNHsg22W6kOwp+OpFTVD4KXuYUoxR +P+FIQcn2h4aR7vaQVWP6nOVKwa7mUfn3qvbAOdm93OJDwUNc+cbfavZCk924 +39BJCh6LDOOijNrBNiWJXXxZFAzoLhhe3GkLpd+fKnhmU1AjWoHSqGsLSuyg +mapcCq6walXOlLYFLrOO2z75FLwb23Dm3oQNNPrHTTWVUpCZt2d1/3kbYFVP +p4Q9I/yd606v6d4DFOvXn75MUFDW2s3jU5A15EpFsFk/KfjiSoxusos1iH1W +T7z6i4KnMhZFnUytYTo0Xs94hoIcUgVlGnLWUHwT4m8tU9ApNdO258Vu2PLt +oYatMBUFc5Wp6pt2w8bIc8cbqVQsfJDR3zZqCTUGOat20qnY4e5XaVhnCVaz +9ZffMKiYV3NwduSqJRz3+/PgqyEVXzZzvy/bZgnPndw+8u+k4lkXX7vwuxbg +o08x2+dGxUn9bUXBQbsgb+qj1HQ8Ffls1TM/qJkDq2Dp3n8JVJR65BPVymMO +nQfFKdwXqBhvOmcx+NkMFoZ2WpGvUHHDLXeuyAwzMOtgxxDNEyOmvrneFTeD +sfzz3xOLqBjQ89LInc8UVL3065XfUdF5Oa3yqNh2uKhosRA9QEW/2fYxzXkT +mP7grvdpkIr1To9D+N+bQJ1jYv6tYYL9bZQ35JiAtdWHFPHvVBxOOX/xBcUE +ThjEBqzhoGF9dsXxZtdt8FzotcJ3ZRraLjF9K54Zg0bHZyfzjTTMTlh6tfGR +MVxOXEjJU6XhuXdZk6XXjMGJW4nfewsNu4zypuS8jeHnUsjCII2GVUtJXKzV +xkD6Kt31ypyGOTybGqLMjcCrziemNJCGxUNrSSHfEH4cGQvdFkzDFz3dqh6d +CMdlfA/3hNBw6e/uP77VCOfC/a3nTtJQLs9Io+c8QiE9RJ4RR0O/A7SaRR2E +pfLomqY0GtLOeKRP8gJcfnRrurOJhtu2bAhoOc4AaVf5rx7NNOQ+fGLJcTcD +cviz+qef09CnqDJcVpUBFUdyGkntNIziczlOHzCA92oPkhz7aEhvpRs3GBnA +xnuV6p8maBgy7L+2S4IO9Rndnr/E9LG5SIB8+wsVhnYquIZI6OPTLy7xWc1U +4Jg/4rBI1kdPN+mKjhwqGO3mtlglr4/f1u2+netJheYVdKqkqj4G6Eb5GY5Q +oM399hpDlj6GOnkXcY7rwTulQwVJ3vpYJ3ru9QkxXVh8VX5P7KA+xnp4ODrP +64D0fyvvpB3Wx+RTDSJe73XA+c2NlOwAfTx1eG3gUI4ODMV2RFaE6eO2Yi6L +KJoOfBnV3TN0gThP8W+vhac2TN9bnt3C1sevwx8v/unWhFE7k4yzlfpoqsEl +ml+nCX1c53cMV+tju+Fsx8l7mlDtRr5+rUEfXcXyQv3CNSFKQo/+t0Uf06Te +mlxV1gTB+EPhrQP6aBWve+7W/GZQP/CGw4uTjjnNca8cw9VBVkw6r46Ljj+9 +JBfW26mDYJP7bgluOsqV3D0trakOv2UnM1+speOjicCetBE1qOrhNdYWo+M/ +mmB3s6Ua7DDB2OUNdIwQf1ZYsFkVPJTz16TtoiNJurHEiW8jhD11OaRiRceB +q4FSP79tgCQv4RfF1nQ8neLYWdS8AWpyTiS+2EtHi7eZrGeRG0BUZYfA3/10 +9HaKT1abVYFmlc+ibiF0XJc6oHB3QhlUN8rJq9ym41Fa7Pv3c+sBn3dGFmcS +/jmI/uDtXw92PnEfWdl05Pl7xmx/7XqIvvc9a28eHa8EOpDORq2HgY01ymdL +6Pibt8uqnn89XNjkoDbxjI4y/6hPrm9WhF+qVyjFk3T0dXpy9eE5eehrw20i +v+l4/eXtKvMgeWjw+7En+A8dPy//TORxkocLxaaBlAXC3xH+3Pca8qBK53hQ +tdIAhf9jWA7nyIG76RGFJpIBjpGiMoy2yUL3ge3ruhkGqKUjusumQAqq1/wh +64EBHnGn7SiOk4Ks/KxN1wyJ91cr/NzqKgUBP/+a2JsQdhcWk1tICvhCS08P +WBrgQlxt91wIGUziFGZH3A2IeSM9036nJFRkL378E2+A44/mvztLiQPFOHjW +LMEAmVH+aqcXSFD2cWJdxnkDHFZaqu54S4Ji2UGq2WUDlAvUWvEjlQQPUhvO +30o3wKZL3jabJEmQkRirv73AAEVoN68fURCDs8ECl1K7DFDyNKX1haUI8IjE +535/Y4DyYarbZ3REIK6Io8aozwAHXij0bpMQgZgfv0YnBgzQOpYzZM9HYTjl +080wHDVAflPe7PXHhOGo0/Wv3+YM8GF/DG/AHSFw3LoeDWQZWPzN/VCspCD8 +7ebhb5JnoMR36tuFZQHI8PrRb7aegelX9pjpvRSA0bjKUMeNDORM9HhzxkcA +jrZYPjqhzcB8UqpLahY/nLMIl60wYSC/3Q5bASU+qLJ/s6Trz8ANl97eK3Dg +BedvVa01gQxc19exVWMLL3CEZaRuDWbgN/eaXWNcvGCSfljX5gQDtfkct8kW +rYHO9yt8g6IZmPzhNMNz3RoYc9/cX5TCQG87B5Bp5wapI2cqNzcwMOCCdMaK +8FVwYdlbL6GRgdGrOsxX71sFnJdNir48YeCPqfgAGn0VjJWvystoYaDYi0Qt +pXkuqOKISRXuYqCf5ad54RNc4JgcGTrzmYFX5aMGJE+vhNTqE3p1a5m4vLBy +hFm4AtZZOBSR+ZmYlStgdDp5BUQO0TRCBZnY6OzNO358BfismlPSFGPi+eB+ +Xi2jFUC1DBHNkmXiF359zdM9HNDz6ejvWC0mMY/vJa1ezQFivL5Fu/Yy8fNl +h1MZ/5ZY2cb/hU06MFFC1SYovXWJpf3fBeMrTkw0qVLU/XJtiWUxWfimbz8T +SbV7df01l1hxPX/mPXyZ6D96gKR7YJE1lxVhFHaaiX/9A1eoDc+z3hlc6crN +Z2KTrdLLeqFZls+x7BumBUz0rLm6ODM6w5opKPOaKGRi4Al11cCaGZawYt+s +VjkT2f1Vi+o+MyxzHhnp2gYmHrN7WM9u/MOq6c717HrDxDKxbJvm6GmWGX+F +RkgfExU8Ug9yOE+z+ra3zEj0M3FGkSsllDLNmq4aj3cZYmKdx40eqbHfLI1M +zYffxpjYHr/OVNvmN6vmnWFI4ncm/opu/898y2+Wmege2DLJxMdmbwVv8/5m +eZ859jr4DxNr5pOWfz+eYk03xKWJzzHx1M74kumbU6yohRSPqgUmikXvC9kc +NsUS1M1Td/7LxJbjl/9k2E2xbh2p+rO8zMTpPYYfzHWmWP8DPTlJ2g== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0929330332797813}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0929330332797813}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993831561641715*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"f20191f5-fc28-4a24-8e26-6fa32bacfa36"] +}, Open ]], Cell[CellGroupData[{ @@ -6169,66 +12734,12 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[448]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], + "In[121]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 448, 489, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347571140808*^9}, +Cell[BoxData["1.7393415773658933`"], "Output", + CellChangeTimes->{3.991347578228073*^9, 3.993831644768199*^9}, CellLabel-> - "During evaluation of \ -In[448]:=",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 448, 490, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711508217`*^9}, - CellLabel-> - "During evaluation of \ -In[448]:=",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 448, 491, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711592274`*^9}, - CellLabel-> - "During evaluation of \ -In[448]:=",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 448, 492, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711683846`*^9}, - CellLabel-> - "During evaluation of \ -In[448]:=",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], - -Cell[BoxData["10.362747935330763`"], "Output", - CellChangeTimes->{3.991347578228073*^9}, - CellLabel-> - "Out[448]=",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] + "Out[121]=",ExpressionUUID->"80828ff9-e763-4da6-99bf-d75fd24e11e1"] }, Open ]], Cell[CellGroupData[{ @@ -6295,68 +12806,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918503106317043`*^9, - 3.9918503148567924`*^9}},ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-\ -2a98ba29b602"], + CellChangeTimes->{{3.9918503106317043`*^9, 3.9918503148567924`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 493, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578265545*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.448453200473932`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"107\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2707682415379978334035760486809600000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 41, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9938316448051767`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], +In[122]:=",ExpressionUUID->"3b866c46-7c49-4fae-81f7-f2053a4483bb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 494, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578275551*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2303200991204093`*^-65\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"111\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3224159552670743172353993631334400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 42, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.993831644810693*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], +In[122]:=",ExpressionUUID->"60a0c190-185a-4cdf-b119-bc3d3ba8a222"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 449, 495, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782835484`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.032217301443663`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9669803644763824129779062695526400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 43, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9938316448166533`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], +In[122]:=",ExpressionUUID->"c5e9f27a-c76c-40ca-9c1a-67810933edcd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 449, 496, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782930756`*^9}, +during this calculation.\"", 2, 122, 44, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9938316448225803`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], +In[122]:=",ExpressionUUID->"36a7cc9d-8f00-430a-a443-278caeed1d1e"], -Cell[BoxData["1.4359199941844076`"], "Output", - CellChangeTimes->{3.9913475858902473`*^9}, +Cell[BoxData["3.9240294023153166`"], "Output", + CellChangeTimes->{3.9913475858902473`*^9, 3.9938316546351*^9}, CellLabel-> - "Out[449]=",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] + "Out[122]=",ExpressionUUID->"822279ae-2325-46c1-8c4f-10eee6a68da8"] }, Open ]], Cell[CellGroupData[{ @@ -6377,8 +12898,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6423,68 +12943,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850318596199*^9, - 3.991850321359722*^9}},ExpressionUUID->"edfdd675-c60b-304e-9e16-\ -68452b971319"], + CellChangeTimes->{{3.991850318596199*^9, 3.991850321359722*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 497, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859272156`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.448453200473932`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"107\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2707682415379978334035760486809600000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 45, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.993831654666356*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], +In[123]:=",ExpressionUUID->"1e2d0570-fe3a-4a2e-ab7f-ca8a1b453646"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 498, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347585937319*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2303200991204093`*^-65\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"111\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3224159552670743172353993631334400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 46, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.9938316546716223`*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], +In[123]:=",ExpressionUUID->"6b95cafa-410a-4ad2-9c0d-ff07b6d9e5a1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 450, 499, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859463177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.032217301443663`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9669803644763824129779062695526400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 47, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.993831654676229*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], +In[123]:=",ExpressionUUID->"ee354f63-e92a-4a54-9efa-b29bf1f8b04e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 450, 500, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859543304`*^9}, +during this calculation.\"", 2, 123, 48, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.993831654680874*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], +In[123]:=",ExpressionUUID->"3a4106c6-ae67-4e6c-8c4e-4c92a6d00685"], -Cell[BoxData["5.09241659576143`"], "Output", - CellChangeTimes->{3.9913475931276417`*^9}, +Cell[BoxData["18.26336023399786`"], "Output", + CellChangeTimes->{3.9913475931276417`*^9, 3.99383166466052*^9}, CellLabel-> - "Out[450]=",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] + "Out[123]=",ExpressionUUID->"e91f92c5-1a4e-469c-ac63-8e7b8ba3ab16"] }, Open ]], Cell[CellGroupData[{ @@ -6505,8 +13035,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6551,68 +13080,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850325611994*^9, - 3.991850328926569*^9}},ExpressionUUID->"d0469d46-2e74-494a-be85-\ -b41cb2f3fa92"], + CellChangeTimes->{{3.991850325611994*^9, 3.991850328926569*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 501, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134759316485*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.448453200473932`*^-65\\\", \ +RowBox[{\\\"\ +225971249755265857526376312002687511530482299410900217421692087529677\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"107\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2707682415379978334035760486809600000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 49, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.9938316646962137`*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], +In[124]:=",ExpressionUUID->"20246af8-f0f8-4892-8684-03a09f0a82f8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 502, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593173849*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2303200991204093`*^-65\\\", \ +RowBox[{\\\"\ +155671593956402649249920641338651426693349256064169159781803679099194\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"111\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3224159552670743172353993631334400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 50, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.993831664703825*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], +In[124]:=",ExpressionUUID->"f88fdffa-8a4a-4e6d-80a8-49dd0d6fdd25"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 451, 503, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593182852*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.032217301443663`*^-66\\\", \ +RowBox[{\\\"\ +109841876695637709310744004528552446674827235078877759142040675972391\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9669803644763824129779062695526400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 51, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.993831664710095*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], +In[124]:=",ExpressionUUID->"008c4446-cf21-4f25-9070-c5a12d0066a7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 451, 504, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475931908703`*^9}, +during this calculation.\"", 2, 124, 52, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.993831664716416*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], +In[124]:=",ExpressionUUID->"54df2ff1-a3ab-4c1c-b593-48396afa6a06"], -Cell[BoxData["16.684462799943017`"], "Output", - CellChangeTimes->{3.9913475973006153`*^9}, +Cell[BoxData["1.1000799578612197`"], "Output", + CellChangeTimes->{3.9913475973006153`*^9, 3.993831671243224*^9}, CellLabel-> - "Out[451]=",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] + "Out[124]=",ExpressionUUID->"efc19e6d-25bd-4d4e-8cf0-319f95cd78e5"] }, Open ]], Cell[CellGroupData[{ @@ -6621,22 +13160,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.99185033265069*^9, - 3.9918503366548977`*^9}},ExpressionUUID->"58b5e243-0972-1946-bd17-\ -aca0f3e8a35b"], - -Cell[BoxData["0.15578016747845222`"], "Output", - CellChangeTimes->{3.991347597341627*^9}, + CellChangeTimes->{{3.99185033265069*^9, 3.9918503366548977`*^9}}, CellLabel-> - "Out[452]=",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] + "In[125]:=",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], + +Cell[BoxData["0.8754468490500874`"], "Output", + CellChangeTimes->{3.991347597341627*^9, 3.993831671271863*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"f48f1f6f-2908-4951-a627-0d46b421e07c"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918503408077297`*^9, 3.99185034363356*^9}, - 3.991924645514969*^9},ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-\ -a3711ba632a4"], + 3.991924645514969*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ @@ -6659,12 +13199,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[454]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], + "In[127]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.991347597372614*^9}, +Cell[BoxData["14.568671940986045`"], "Output", + CellChangeTimes->{3.991347597372614*^9, 3.9938316712828293`*^9}, CellLabel-> - "Out[454]=",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] + "Out[127]=",ExpressionUUID->"896e23ef-7101-48b1-8d6a-3052416842e3"] }, Open ]], Cell[CellGroupData[{ @@ -6674,12 +13214,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[456]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], + "In[128]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.991347597428034*^9}, +Cell[BoxData["0.03144498022209902`"], "Output", + CellChangeTimes->{3.991347597428034*^9, 3.993831671289754*^9}, CellLabel-> - "Out[456]=",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] + "Out[128]=",ExpressionUUID->"8fd9ad64-9c44-4a62-9a4c-83a18605cf85"] }, Open ]], Cell[CellGroupData[{ @@ -6689,12 +13229,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[459]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], + "In[129]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.9913475974971066`*^9}, +Cell[BoxData["0.4581116010465551`"], "Output", + CellChangeTimes->{3.9913475974971066`*^9, 3.993831671296576*^9}, CellLabel-> - "Out[459]=",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] + "Out[129]=",ExpressionUUID->"ea30ec88-762e-450a-a53a-4e20a363398a"] }, Open ]], Cell[CellGroupData[{ @@ -6884,12 +13424,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[460]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], + "In[130]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[BoxData["0.038908834568544604`"], "Output", - CellChangeTimes->{3.991347597528105*^9}, +Cell[BoxData["0.011726687395741855`"], "Output", + CellChangeTimes->{3.991347597528105*^9, 3.993831671306066*^9}, CellLabel-> - "Out[460]=",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] + "Out[130]=",ExpressionUUID->"56fec9c4-56b3-426b-b8da-4bd88b7c6a55"] }, Open ]], Cell[CellGroupData[{ @@ -6903,12 +13443,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[461]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], + "In[131]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[BoxData["4.492838724335521`"], "Output", - CellChangeTimes->{3.9913475976441536`*^9}, +Cell[BoxData["8.183842574443444`"], "Output", + CellChangeTimes->{3.9913475976441536`*^9, 3.9938316713884172`*^9}, CellLabel-> - "Out[461]=",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] + "Out[131]=",ExpressionUUID->"98003fcf-8033-4f20-87fc-bd83073cf087"] }, Open ]], Cell[CellGroupData[{ @@ -7100,12 +13640,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[462]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], + "In[132]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[BoxData["0.012544276227890849`"], "Output", - CellChangeTimes->{3.991347597671173*^9}, +Cell[BoxData["0.19172811970028772`"], "Output", + CellChangeTimes->{3.991347597671173*^9, 3.9938316713982067`*^9}, CellLabel-> - "Out[462]=",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] + "Out[132]=",ExpressionUUID->"d3b95ab4-f9d8-4ff8-b78e-cd6b4db4e4ef"] }, Open ]], Cell[CellGroupData[{ @@ -7119,12 +13659,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[463]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], + "In[133]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[BoxData["7.912653285153153`"], "Output", - CellChangeTimes->{3.9913475977705975`*^9}, +Cell[BoxData["2.0239605076902505`"], "Output", + CellChangeTimes->{3.9913475977705975`*^9, 3.993831671492177*^9}, CellLabel-> - "Out[463]=",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] + "Out[133]=",ExpressionUUID->"4e195c83-28b6-4cc2-90c8-f8fc021216db"] }, Open ]], Cell[CellGroupData[{ @@ -7217,12 +13757,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[464]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], + "In[134]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913475977856007`*^9}, +Cell[BoxData["0.19148677740942904`"], "Output", + CellChangeTimes->{3.9913475977856007`*^9, 3.993831671502058*^9}, CellLabel-> - "Out[464]=",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] + "Out[134]=",ExpressionUUID->"123d7887-806e-4ec1-94ac-1e3cadaa8e6d"] }, Open ]], Cell[CellGroupData[{ @@ -7312,12 +13852,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[465]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], + "In[135]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991347597813669*^9}, +Cell[BoxData["0.808513222590571`"], "Output", + CellChangeTimes->{3.991347597813669*^9, 3.9938316715094624`*^9}, CellLabel-> - "Out[465]=",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] + "Out[135]=",ExpressionUUID->"e520ef05-b3d8-4b0b-9160-3781f0cc8197"] }, Open ]], Cell[CellGroupData[{ @@ -7440,12 +13980,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[466]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], + "In[136]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913475978426323`*^9}, +Cell[BoxData["0.15481959148678082`"], "Output", + CellChangeTimes->{3.9913475978426323`*^9, 3.993831671517457*^9}, CellLabel-> - "Out[466]=",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] + "Out[136]=",ExpressionUUID->"db142c37-b56d-4c74-a4cb-06a175a4e35b"] }, Open ]], Cell[CellGroupData[{ @@ -7507,68 +14047,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503626529236`*^9},ExpressionUUID->"ba508068-6b78-254c-87d6-\ -cf1adc0753dd"], + CellChangeTimes->{3.9918503626529236`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 505, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597872814*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.463475750551175`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 53, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.993831671529716*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], +In[137]:=",ExpressionUUID->"32ca47d5-89bd-4546-aa20-8ab2531b7225"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 506, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475978828144`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0321010054469777`*^-77\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 54, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.993831671534543*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], +In[137]:=",ExpressionUUID->"71d124f8-a29b-42d6-abbc-64c372f9ccdc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 507, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597891815*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1256249960619612`*^-78\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 137, 55, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.993831671539467*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], +In[137]:=",ExpressionUUID->"f445c1cc-6eae-4086-aeb1-a147cba5fdf4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 467, 508, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597900812*^9}, +during this calculation.\"", 2, 137, 56, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.9938316715436172`*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], +In[137]:=",ExpressionUUID->"b2241da7-9a53-490b-a46c-a5f2524db669"], -Cell[BoxData["4.492838724335523`"], "Output", - CellChangeTimes->{3.9913476018505497`*^9}, +Cell[BoxData["8.183594535651944`"], "Output", + CellChangeTimes->{3.9913476018505497`*^9, 3.993831676697136*^9}, CellLabel-> - "Out[467]=",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] + "Out[137]=",ExpressionUUID->"1dfe9deb-d9cc-43f7-9752-c1661f9fe280"] }, Open ]], Cell[CellGroupData[{ @@ -7630,68 +14180,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503657638073`*^9},ExpressionUUID->"842e33e4-ae06-f746-ab8b-\ -97489285cc9c"], + CellChangeTimes->{3.9918503657638073`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 509, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476018885117`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.463475750551175`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 57, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.993831676726472*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], +In[138]:=",ExpressionUUID->"4b41bf57-832a-4b25-af79-4ff91b84f64b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 510, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134760189851*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0321010054469777`*^-77\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 58, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.993831676731585*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], +In[138]:=",ExpressionUUID->"e71368f9-cf45-4ab0-8d2e-58ab52307a89"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 511, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019065113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1256249960619612`*^-78\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 138, 59, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.993831676736244*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], +In[138]:=",ExpressionUUID->"0d7b8419-c871-4658-afba-23b0a6dc05a2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 468, 512, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019158936`*^9}, +during this calculation.\"", 2, 138, 60, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.993831676741735*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], +In[138]:=",ExpressionUUID->"6a71bee1-8925-41ca-85f9-89d3c3194fbd"], -Cell[BoxData["7.912653285153152`"], "Output", - CellChangeTimes->{3.9913476058912296`*^9}, +Cell[BoxData["2.023899164780268`"], "Output", + CellChangeTimes->{3.9913476058912296`*^9, 3.993831681868834*^9}, CellLabel-> - "Out[468]=",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] + "Out[138]=",ExpressionUUID->"004f1b46-fd10-4722-b6d3-832e3c0b0b8a"] }, Open ]], Cell[CellGroupData[{ @@ -7749,93 +14309,112 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850369070572*^9},ExpressionUUID->"b2e314f8-a6f0-6942-a94c-\ -5ac1cacd7190"], + CellChangeTimes->{3.991850369070572*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlHc4lX8Yxs3IqKRIWiKlFJnHyPPY2ZJEZO8UWYnMlihpGBUlofeclEgZ +ZSYUPzurFFmZkURRft/+Otfn+tz3/T7vdc51RBy9zVxYmJiYNjAzMf37rIoW +DW4f3ourPvNN3hJfgZKZ/jwLIIPpo3/L3vnwoqPz2dndxjKYYRK9nvMQLyaL +Xv9kbyODPqXuS9ZKvMianvO0OkgGq9pngnRZeLH77qj59VwZtDTmv7w7gQcv +JdunSojK4rn+3atpZdw4FGu4x3KZHH5q07ytJcaFGwysBWPXyGEeX/+SOTcX +mnF5MpVulUNKaU9HyPflWBp9sUUU5LCua6yKp2I5JpyvDPx2Sg4PK/39qWy3 +HLXCaWUXRuTwNve6+sp7nHjfV8z0eb08Bq3vCdbZy4F5n8pj132Ux9mv7+dV +hDiwUv9oTciYPLp1eF/TZ+bAga2JahpcCriapbczr3kZirdy7G7UVUAfpY2i +T/yWYbbs2PKRSgXsGn4pqfGKHQt/5L7eUKSIdw1Za73s2PCtvfFSeK0ihm1t +K3fVZ8Pu+lHl/g5FLKzaU35Kng0XMkTz6D8Vsb4uK/oTNxuqHUpIU5CjIY94 +jGJJEStWPQ8KNc2hYbFH1JUnQqzYFAiK5zKVkEH749c9wozHG1Lv3MtXQjQW +ujnYwYxc4otLxa+VUGOVzE22ambUfl9YO92nhLuP3R0JTWfGYlmZI3ablDF2 +brjH2oYZM6bEQpWTlFGyozouv5UJgzy5Xk9Fq2CkRsd4dtoSrK10386TrIJ5 +D6lu38glyBOqid3+UAUTr0/3WTsuwUTtWXPbNypoeO44I1FsCRy3/xmsY1bF +zqghsUeMv2A48I3zYbAq2n+NYpUu+QMitu+Nj3rtQ98PWto5vxcgo3xljX/w +PhRf6JV17lsAcVF9uBy9D48YCDTL1i6A5NdSqZcZ+zDOwoXamrgACr7UKqGe +fcijpFOtIrsAhhdCWtqM1NAycXu3pu9vCHwiYmEoBejrJ0GbYvkF86tsGpz2 +AS6ufMGoHp+HEL9EnRADwKDJq6fz2+chgsatyHADnDorV/OeMQ+xlT8EOdMI +F2xxljSfB9Ox/nEHTsROWbNf/I/mwGXpxZONpxGnW5Xvinr8hDUcwjcrIhBv +HtGi85v/hMoV4addohG5VktlCMNP2LJJV+txEiJG5v/0XfsTPqp2dKm+QJwS +cJhSeT0LZsFzbDYziK6NSg83ic6C2qyi9e3j6jgenVrmPjMDE4t3UC1AHW1u +huqL9M1AChuT+Jcz6ng7d7PrZMMM/OKvnZK4rI7xcx5jbxgzkC9jeaGIoY6v +VW4EujnNwE6foNzOYXVkGC+Ttuv8DoJjhRyCjho4KcQ/EdI0DbR5rjmahwYG +2Ew1Z1ZMwxH2o0NHfDQwbKxS8HPeNKRsZn5zN0wD/U07wsMTpmGruV6U+B0N +lHT60xlgPQ17SroW5ds0sBQv0yVGp0Dn6u9pcx1NpFmpXFBaPQXuKYZ9gUaa +6G50umsP+xRcot9tSjbXxI9zV/84Tn2D+tcaOR8dNfHF3h3sJa++gdl8jJdz +uCY++GB39ZHFNzjqIDzsV6iJ4mHOVy2vToK/rOrH6zu10KxFbZ8E/wTYKHz7 +HL9XC1m1T5o/WBwHLaX0/jiaFjaxb7gjOzQO/MA5FqOjhVlU1sHEonHI02/7 +FeWohdTJgAoHh3GYcvAS9LutheL8cV4L+WNwLD7F7CCXNsZ4GyQmHhsFsxsm +Fgf4tHHSTSWdOjwKyoksR0zWaSPP2YX5/zRHgSvF3cFAXBvLKf29ZhtGgXoo +56OpoY3TuC9ErWEEhkrrr8gGa+P6zSUKN+VHwHFisZZ/VBvxbf7Bh3xfoaD6 +5yx9WhtPvN6uFvJ3GHjSprbiL200bK0adxwbhgKzgTNenDroO6BBO/6G+MI6 +6TfiOrj/4MEFz+BheB51OznQSQfjN17aNTc8BJzraO5dH3Uw0o5zoqBpEB5r ++HHca9TFiSGLQoe2fvAXsVZ71q6LCnYlrqHV/aDKpBlQ06OL/t3Fg5mF/VBf +srr/25guxqmwbtqY2g/jtLxS5NyPtcaic+mu/bBTajrgC+5H19yvIUyLX4AS +9h7YlrcfR7p2xj+U+gIZPzwrsm/qYYqkcN1iQS900W+JWKXooemDjuCFR72w +wq42kj1DD7mfFOSwp/XC6bfbNGyf6eH2sVB/1eheML7bW7myRQ8XjZYv7bXq +hV+6FlW+K/Xxk7f6qNPvz2B8R72GFqOPsybJG+1uf4J59XX/VYUb4MWmPGHd +tR/hx/hDdaOLBjhy4m9/BstH+Jak+OJ9nAGeucHvzz/1AYYmLO4NpRpgg479 +g611H6DtVsJJzlcGGJFWqscR9QFyp1cLGM4b4NHBWIvu793geZ/XrtXHEI/9 +jKqW7u2CHibW6T4HI+SeUzHfOdQBhrkR3l/djTAvJH2rcmcHFDv8nZj0NkLn +t2Fih951QGLlr9GFUCOsGzdIyn7SAabnpgbW3jbCgNgSnt5THVDJ8alTr8UI +yzf2/jLh6YCsFUXluRrG+HdNgRHPvnY4scE7PlLUBN957m/vedkG+g9kaVt2 +mSC11bHLP6cNxHfOfy6VMcG7r/TUBB60QY9ipNSiuglefhvLGhTTBoYHbzQE +2pug6N5ayxdWbSARU8DjlWqCktxM+9b+boXvC+Faj7hNsXmFSY2ARis88agt +Tzhvih+CYh6LTjTD+5z7QmKXTNH0woHOZ/3NsDgb7Jt32RQbWi/wGXQ3g0HU +brHGG6bk/yYzIa6mGb7evn6RM90Ut8Ytl/VIbwaRehvjkFJTzNnxU9/Nqhlu +7pn+YD9niu2CTBds6psgeEZobpfHAezL3FbYcakROjMSnZcdP4ANsV6fW4Ia +QcGCv6XX5wA2nlLS/eDWCN8LeR4nBB1AhVHVLH6dRvAMW3JcungAof29tghr +I1gtH2xoyTqAzIH2hzPDG4C2+WnW6YEDGLQ9sPtP5H8wq69jUWNnhsMSX39G +0utA4dTMf1edzFDH23tF/p06CHqQpm3pZoYdFVe1p67Uwe+F33IjJ8yQseLU +5AXfOvibncPPHWaGIkLfpSRV62DZSqFm4xQzdDpTUGjc/A4EW8cM2jvNsOp7 +wmwByztQsr6mPnjgICYmMDUcjqiFFqFUzypZc1xFPaTLsFXD+qyzr6gdh9A+ +fsXx7JevobB3p6ExrwUyPHYVC41VwKa2KbfACQssUzn+4L5jOcgmXMt+0HsY +B2L9S6yGSyCVbWbP9deWuMD9iVkq6SW8UJfqPl9khWVZHDcsPIsgWTGGb5Fx +BDN9Eyrc4gug8UPmBdnL1uhb0OT9iPcFPDdKEfOJsMGocaaZhdR8mD5+kOmE +81GEuIDRIp9nMKsj4T6paYurAlWHko/lATXRNe+nYIf/SaeXlZ7MBcv7mU5H +eeyRLZpK0Mt4Cs/yDOxYL9qjqYlSsm55DigJt/y69Mse66/xR1iEPQHRXrfu +Zg8HLE8/5ffV7TEMcB8zSel3QOmTF/ud7LKhKc7YSfeQI5ruKHvhFf0Ibgbd +4w5ocsRel3xZsTIGvCpd+uWk54RMTo+OTgkwYG+FHG27gROaxqyffbqGAVmv +PQJHDZ1wVfsDFr/VDLhW2/rdx9QJm5I8wxZ4GeDa8nAs9LAT+kTdn9jIzgC+ +IZOeJBcnjLjoa0bN0MGVN628LtIJ7cs+RDU102GlDV6ULXbCtL9CnVbX6bBl +TU3jhleED27cbRhPB+l6o3XLSgkHemzCODqYqVrTOyuccMuiZJtkDB1ubgis +C31L9q0eRQhF0WF9z6OVtZ3EDyyPBF86iNkKJtvMEcYjxi8P0kHJfpI6L+eM +9sWvXtoI0yHr1pSfsYIzbhkf0WwUosOa1u9qgjRnjOBy2KS5jg6T2nNtlIoz +9voJvN2zlg4Zu5iY6zWckamWd3LtSjqsmOOzWn2A9LtClUVZ6TBwRX75veNk +/3QTD22cggM1im1u3oQjflq3jVJQyqR8T/ok6XPtnD05QsEtPzX5Sn+yb1vJ +ljtEgbGVrsNgiDOmXWa5rtZHQZGYVdGuGGfE+o9SSe0UxL0841GYRfocqp9U +Kyk4LpOkFEQRVnOS4KygwJCeu5zGIHnRCkZbGQVcSUP0gsfEg7nJyRIKzvua +jr7IJxyjv76okIIzEmLHnleSvFRZbFQOBZ5JdV55n5yxPIAzZiGVAr0VQ6q+ +vSTP/l51IoWCHeeZeGW+EN/Qubn3DgVDvvKPcwdJf1lbwNtbFDgY35t4Ok7y +W6ptGAkUWLL7ncj5TfJMj6cyrlCg67feJ1vABbG2mvtMGAWV9y7oX19HmKWw +NDyUAtX672JB610wIjSz+dwZCqS31XVpbiJ+Ik/gRjAFQh0hmh+2EW6zWFce +SMGYco8AlzzJD91vsvam4CpLWonbQRdk2n+2O9mBvL8UT7LRIRcsP8EmV2tP +wTnrIF/ZwyTP+WN43o6CoHzT7UtHiB8Os7W1Jfe7Ml9LdCT7bj8ilawpkH3n +6PzmJNmD6gjpQxR0XNvGLRpP8pdF7bboU/AEeN2/XiP+2XD1eT2yP/Gj6vEN +0jc+Zjm+nwIZvaowWhJhD/35V7rk+2Ny+m50l/THM3d4aVOg453WFZRNWNxF +gUWdgo0boxXUnpB8zoU9wUjBj3feN1ifkv2kAeMZoCBdHIzinpH7kxY4RtQo ++NPTU/6gmPDALqsvqhTkGwpTDbUknz7ozKNEQexvFvab74ifZbQn0ihwpEYd +rOqJT7b23kp4FVux8EAjeZ7p3rX7FCnweml59Vc7uWfTHekIeQpEdyYGig0S +z+OduE+Ggt8doa0jQ2QvX+VE914Kms67SOd8JSzbdiyIcFif3KjSOMmnbu8s +kKagO7n1qMkM2Vt2x09LioLrHHzawcyuGFHhRd2UpODV9x5rf1ZXcq9HlDLh +4R6G7wl24nccftu3i/we8rXSHJcT31GcKkd4yD5oQZ+P+N35tmMS5H5D7dXa +/K6ItzXvphBWUVwtAWuJf0PTNyEcz5ttIStEOGLNcOEO4os/5wqLkD3LfpnU +7RS4ZmbXrhUl7D7VakU4Pv7055XbXLEcx3oFCQ+58vOySZD+iJ9asjjx/Lru +49LEc7osY2yjoPgvf/iQDPGyvuy+hAdHehN65Qiv5fRRIaxcHvy6jUbyy+9f +bBGjYMDryaYSJPc+P1rGR3iFZYh8gQbJB5wTGhSlQElzv2GuFsk/6/tURDhO +6MvpzP0kv2fDIzfChWw58ff0yb2OX3ORcP+3kIe3DP/tvxUVJkyrXvv+iinJ +D1L727aS7zv3y9hFM+KP31rII3wlJYclypx4vkihG4S/+OpJB1oSHy+ceJgw +r62Ars8Rcs/6yh8qhGl6/Uc9bf6xbqnIv/7m0Fhbe9IX6Lg2LULu4dJPt3Qk +faHOOx8If5kVKDJzJv7+g1U1hHn7+hsNXcm9x+WnnhGm1T8d0nEnPvqScjph +x4LQP+hJ9nVSvl0jfCVdf42KF9nT81x59t/+FcFd8idI/szUrYB/+0ED6lI+ +JC8gedWDMI9zrqWEL+Hb67/ZElY0CfMW9Sf9lqKiQ//2lQ0ubAwkz+/m+GZE ++PK2damCQf/en/WqLuEXqwaf8QUT3s64pUG4byH3HfcZ0hdYXAH/9ofD+tjD +CIvMT6oSVmgxmF8KJ8/rSlX6x/8DepkvDQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7849,105 +14428,122 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwVlHc4lX8Yxs3IqKRIWiKlFJnHyPPY2ZJEZO8UWYnMlihpGBUlofeclEgZ +ZSYUPzurFFmZkURRft/+Otfn+tz3/T7vdc51RBy9zVxYmJiYNjAzMf37rIoW +DW4f3ourPvNN3hJfgZKZ/jwLIIPpo3/L3vnwoqPz2dndxjKYYRK9nvMQLyaL +Xv9kbyODPqXuS9ZKvMianvO0OkgGq9pngnRZeLH77qj59VwZtDTmv7w7gQcv +JdunSojK4rn+3atpZdw4FGu4x3KZHH5q07ytJcaFGwysBWPXyGEeX/+SOTcX +mnF5MpVulUNKaU9HyPflWBp9sUUU5LCua6yKp2I5JpyvDPx2Sg4PK/39qWy3 +HLXCaWUXRuTwNve6+sp7nHjfV8z0eb08Bq3vCdbZy4F5n8pj132Ux9mv7+dV +hDiwUv9oTciYPLp1eF/TZ+bAga2JahpcCriapbczr3kZirdy7G7UVUAfpY2i +T/yWYbbs2PKRSgXsGn4pqfGKHQt/5L7eUKSIdw1Za73s2PCtvfFSeK0ihm1t +K3fVZ8Pu+lHl/g5FLKzaU35Kng0XMkTz6D8Vsb4uK/oTNxuqHUpIU5CjIY94 +jGJJEStWPQ8KNc2hYbFH1JUnQqzYFAiK5zKVkEH749c9wozHG1Lv3MtXQjQW +ujnYwYxc4otLxa+VUGOVzE22ambUfl9YO92nhLuP3R0JTWfGYlmZI3ablDF2 +brjH2oYZM6bEQpWTlFGyozouv5UJgzy5Xk9Fq2CkRsd4dtoSrK10386TrIJ5 +D6lu38glyBOqid3+UAUTr0/3WTsuwUTtWXPbNypoeO44I1FsCRy3/xmsY1bF +zqghsUeMv2A48I3zYbAq2n+NYpUu+QMitu+Nj3rtQ98PWto5vxcgo3xljX/w +PhRf6JV17lsAcVF9uBy9D48YCDTL1i6A5NdSqZcZ+zDOwoXamrgACr7UKqGe +fcijpFOtIrsAhhdCWtqM1NAycXu3pu9vCHwiYmEoBejrJ0GbYvkF86tsGpz2 +AS6ufMGoHp+HEL9EnRADwKDJq6fz2+chgsatyHADnDorV/OeMQ+xlT8EOdMI +F2xxljSfB9Ox/nEHTsROWbNf/I/mwGXpxZONpxGnW5Xvinr8hDUcwjcrIhBv +HtGi85v/hMoV4addohG5VktlCMNP2LJJV+txEiJG5v/0XfsTPqp2dKm+QJwS +cJhSeT0LZsFzbDYziK6NSg83ic6C2qyi9e3j6jgenVrmPjMDE4t3UC1AHW1u +huqL9M1AChuT+Jcz6ng7d7PrZMMM/OKvnZK4rI7xcx5jbxgzkC9jeaGIoY6v +VW4EujnNwE6foNzOYXVkGC+Ttuv8DoJjhRyCjho4KcQ/EdI0DbR5rjmahwYG +2Ew1Z1ZMwxH2o0NHfDQwbKxS8HPeNKRsZn5zN0wD/U07wsMTpmGruV6U+B0N +lHT60xlgPQ17SroW5ds0sBQv0yVGp0Dn6u9pcx1NpFmpXFBaPQXuKYZ9gUaa +6G50umsP+xRcot9tSjbXxI9zV/84Tn2D+tcaOR8dNfHF3h3sJa++gdl8jJdz +uCY++GB39ZHFNzjqIDzsV6iJ4mHOVy2vToK/rOrH6zu10KxFbZ8E/wTYKHz7 +HL9XC1m1T5o/WBwHLaX0/jiaFjaxb7gjOzQO/MA5FqOjhVlU1sHEonHI02/7 +FeWohdTJgAoHh3GYcvAS9LutheL8cV4L+WNwLD7F7CCXNsZ4GyQmHhsFsxsm +Fgf4tHHSTSWdOjwKyoksR0zWaSPP2YX5/zRHgSvF3cFAXBvLKf29ZhtGgXoo +56OpoY3TuC9ErWEEhkrrr8gGa+P6zSUKN+VHwHFisZZ/VBvxbf7Bh3xfoaD6 +5yx9WhtPvN6uFvJ3GHjSprbiL200bK0adxwbhgKzgTNenDroO6BBO/6G+MI6 +6TfiOrj/4MEFz+BheB51OznQSQfjN17aNTc8BJzraO5dH3Uw0o5zoqBpEB5r ++HHca9TFiSGLQoe2fvAXsVZ71q6LCnYlrqHV/aDKpBlQ06OL/t3Fg5mF/VBf +srr/25guxqmwbtqY2g/jtLxS5NyPtcaic+mu/bBTajrgC+5H19yvIUyLX4AS +9h7YlrcfR7p2xj+U+gIZPzwrsm/qYYqkcN1iQS900W+JWKXooemDjuCFR72w +wq42kj1DD7mfFOSwp/XC6bfbNGyf6eH2sVB/1eheML7bW7myRQ8XjZYv7bXq +hV+6FlW+K/Xxk7f6qNPvz2B8R72GFqOPsybJG+1uf4J59XX/VYUb4MWmPGHd +tR/hx/hDdaOLBjhy4m9/BstH+Jak+OJ9nAGeucHvzz/1AYYmLO4NpRpgg479 +g611H6DtVsJJzlcGGJFWqscR9QFyp1cLGM4b4NHBWIvu793geZ/XrtXHEI/9 +jKqW7u2CHibW6T4HI+SeUzHfOdQBhrkR3l/djTAvJH2rcmcHFDv8nZj0NkLn +t2Fih951QGLlr9GFUCOsGzdIyn7SAabnpgbW3jbCgNgSnt5THVDJ8alTr8UI +yzf2/jLh6YCsFUXluRrG+HdNgRHPvnY4scE7PlLUBN957m/vedkG+g9kaVt2 +mSC11bHLP6cNxHfOfy6VMcG7r/TUBB60QY9ipNSiuglefhvLGhTTBoYHbzQE +2pug6N5ayxdWbSARU8DjlWqCktxM+9b+boXvC+Faj7hNsXmFSY2ARis88agt +Tzhvih+CYh6LTjTD+5z7QmKXTNH0woHOZ/3NsDgb7Jt32RQbWi/wGXQ3g0HU +brHGG6bk/yYzIa6mGb7evn6RM90Ut8Ytl/VIbwaRehvjkFJTzNnxU9/Nqhlu +7pn+YD9niu2CTBds6psgeEZobpfHAezL3FbYcakROjMSnZcdP4ANsV6fW4Ia +QcGCv6XX5wA2nlLS/eDWCN8LeR4nBB1AhVHVLH6dRvAMW3JcungAof29tghr +I1gtH2xoyTqAzIH2hzPDG4C2+WnW6YEDGLQ9sPtP5H8wq69jUWNnhsMSX39G +0utA4dTMf1edzFDH23tF/p06CHqQpm3pZoYdFVe1p67Uwe+F33IjJ8yQseLU +5AXfOvibncPPHWaGIkLfpSRV62DZSqFm4xQzdDpTUGjc/A4EW8cM2jvNsOp7 +wmwByztQsr6mPnjgICYmMDUcjqiFFqFUzypZc1xFPaTLsFXD+qyzr6gdh9A+ +fsXx7JevobB3p6ExrwUyPHYVC41VwKa2KbfACQssUzn+4L5jOcgmXMt+0HsY +B2L9S6yGSyCVbWbP9deWuMD9iVkq6SW8UJfqPl9khWVZHDcsPIsgWTGGb5Fx +BDN9Eyrc4gug8UPmBdnL1uhb0OT9iPcFPDdKEfOJsMGocaaZhdR8mD5+kOmE +81GEuIDRIp9nMKsj4T6paYurAlWHko/lATXRNe+nYIf/SaeXlZ7MBcv7mU5H +eeyRLZpK0Mt4Cs/yDOxYL9qjqYlSsm55DigJt/y69Mse66/xR1iEPQHRXrfu +Zg8HLE8/5ffV7TEMcB8zSel3QOmTF/ud7LKhKc7YSfeQI5ruKHvhFf0Ibgbd +4w5ocsRel3xZsTIGvCpd+uWk54RMTo+OTgkwYG+FHG27gROaxqyffbqGAVmv +PQJHDZ1wVfsDFr/VDLhW2/rdx9QJm5I8wxZ4GeDa8nAs9LAT+kTdn9jIzgC+ +IZOeJBcnjLjoa0bN0MGVN628LtIJ7cs+RDU102GlDV6ULXbCtL9CnVbX6bBl +TU3jhleED27cbRhPB+l6o3XLSgkHemzCODqYqVrTOyuccMuiZJtkDB1ubgis +C31L9q0eRQhF0WF9z6OVtZ3EDyyPBF86iNkKJtvMEcYjxi8P0kHJfpI6L+eM +9sWvXtoI0yHr1pSfsYIzbhkf0WwUosOa1u9qgjRnjOBy2KS5jg6T2nNtlIoz +9voJvN2zlg4Zu5iY6zWckamWd3LtSjqsmOOzWn2A9LtClUVZ6TBwRX75veNk +/3QTD22cggM1im1u3oQjflq3jVJQyqR8T/ok6XPtnD05QsEtPzX5Sn+yb1vJ +ljtEgbGVrsNgiDOmXWa5rtZHQZGYVdGuGGfE+o9SSe0UxL0841GYRfocqp9U +Kyk4LpOkFEQRVnOS4KygwJCeu5zGIHnRCkZbGQVcSUP0gsfEg7nJyRIKzvua +jr7IJxyjv76okIIzEmLHnleSvFRZbFQOBZ5JdV55n5yxPIAzZiGVAr0VQ6q+ +vSTP/l51IoWCHeeZeGW+EN/Qubn3DgVDvvKPcwdJf1lbwNtbFDgY35t4Ok7y +W6ptGAkUWLL7ncj5TfJMj6cyrlCg67feJ1vABbG2mvtMGAWV9y7oX19HmKWw +NDyUAtX672JB610wIjSz+dwZCqS31XVpbiJ+Ik/gRjAFQh0hmh+2EW6zWFce +SMGYco8AlzzJD91vsvam4CpLWonbQRdk2n+2O9mBvL8UT7LRIRcsP8EmV2tP +wTnrIF/ZwyTP+WN43o6CoHzT7UtHiB8Os7W1Jfe7Ml9LdCT7bj8ilawpkH3n +6PzmJNmD6gjpQxR0XNvGLRpP8pdF7bboU/AEeN2/XiP+2XD1eT2yP/Gj6vEN +0jc+Zjm+nwIZvaowWhJhD/35V7rk+2Ny+m50l/THM3d4aVOg453WFZRNWNxF +gUWdgo0boxXUnpB8zoU9wUjBj3feN1ifkv2kAeMZoCBdHIzinpH7kxY4RtQo ++NPTU/6gmPDALqsvqhTkGwpTDbUknz7ozKNEQexvFvab74ifZbQn0ihwpEYd +rOqJT7b23kp4FVux8EAjeZ7p3rX7FCnweml59Vc7uWfTHekIeQpEdyYGig0S +z+OduE+Ggt8doa0jQ2QvX+VE914Kms67SOd8JSzbdiyIcFif3KjSOMmnbu8s +kKagO7n1qMkM2Vt2x09LioLrHHzawcyuGFHhRd2UpODV9x5rf1ZXcq9HlDLh +4R6G7wl24nccftu3i/we8rXSHJcT31GcKkd4yD5oQZ+P+N35tmMS5H5D7dXa +/K6ItzXvphBWUVwtAWuJf0PTNyEcz5ttIStEOGLNcOEO4os/5wqLkD3LfpnU +7RS4ZmbXrhUl7D7VakU4Pv7055XbXLEcx3oFCQ+58vOySZD+iJ9asjjx/Lru +49LEc7osY2yjoPgvf/iQDPGyvuy+hAdHehN65Qiv5fRRIaxcHvy6jUbyy+9f +bBGjYMDryaYSJPc+P1rGR3iFZYh8gQbJB5wTGhSlQElzv2GuFsk/6/tURDhO +6MvpzP0kv2fDIzfChWw58ff0yb2OX3ORcP+3kIe3DP/tvxUVJkyrXvv+iinJ +D1L727aS7zv3y9hFM+KP31rII3wlJYclypx4vkihG4S/+OpJB1oSHy+ceJgw +r62Ars8Rcs/6yh8qhGl6/Uc9bf6xbqnIv/7m0Fhbe9IX6Lg2LULu4dJPt3Qk +faHOOx8If5kVKDJzJv7+g1U1hHn7+hsNXcm9x+WnnhGm1T8d0nEnPvqScjph +x4LQP+hJ9nVSvl0jfCVdf42KF9nT81x59t/+FcFd8idI/szUrYB/+0ED6lI+ +JC8gedWDMI9zrqWEL+Hb67/ZElY0CfMW9Sf9lqKiQ//2lQ0ubAwkz+/m+GZE ++PK2damCQf/en/WqLuEXqwaf8QUT3s64pUG4byH3HfcZ0hdYXAH/9ofD+tjD +CIvMT6oSVmgxmF8KJ8/rSlX6x/8DepkvDQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0., 3.7688482855991268`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7959,21 +14555,19 @@ wTw= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "PlotRange" -> {{0, 180}, {0., 3.7688482855991268`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7987,103 +14581,121 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwVlHc4lX8Yxs3IqKRIWiKlFJnHyPPY2ZJEZO8UWYnMlihpGBUlofeclEgZ +ZSYUPzurFFmZkURRft/+Otfn+tz3/T7vdc51RBy9zVxYmJiYNjAzMf37rIoW +DW4f3ourPvNN3hJfgZKZ/jwLIIPpo3/L3vnwoqPz2dndxjKYYRK9nvMQLyaL +Xv9kbyODPqXuS9ZKvMianvO0OkgGq9pngnRZeLH77qj59VwZtDTmv7w7gQcv +JdunSojK4rn+3atpZdw4FGu4x3KZHH5q07ytJcaFGwysBWPXyGEeX/+SOTcX +mnF5MpVulUNKaU9HyPflWBp9sUUU5LCua6yKp2I5JpyvDPx2Sg4PK/39qWy3 +HLXCaWUXRuTwNve6+sp7nHjfV8z0eb08Bq3vCdbZy4F5n8pj132Ux9mv7+dV +hDiwUv9oTciYPLp1eF/TZ+bAga2JahpcCriapbczr3kZirdy7G7UVUAfpY2i +T/yWYbbs2PKRSgXsGn4pqfGKHQt/5L7eUKSIdw1Za73s2PCtvfFSeK0ihm1t +K3fVZ8Pu+lHl/g5FLKzaU35Kng0XMkTz6D8Vsb4uK/oTNxuqHUpIU5CjIY94 +jGJJEStWPQ8KNc2hYbFH1JUnQqzYFAiK5zKVkEH749c9wozHG1Lv3MtXQjQW +ujnYwYxc4otLxa+VUGOVzE22ambUfl9YO92nhLuP3R0JTWfGYlmZI3ablDF2 +brjH2oYZM6bEQpWTlFGyozouv5UJgzy5Xk9Fq2CkRsd4dtoSrK10386TrIJ5 +D6lu38glyBOqid3+UAUTr0/3WTsuwUTtWXPbNypoeO44I1FsCRy3/xmsY1bF +zqghsUeMv2A48I3zYbAq2n+NYpUu+QMitu+Nj3rtQ98PWto5vxcgo3xljX/w +PhRf6JV17lsAcVF9uBy9D48YCDTL1i6A5NdSqZcZ+zDOwoXamrgACr7UKqGe +fcijpFOtIrsAhhdCWtqM1NAycXu3pu9vCHwiYmEoBejrJ0GbYvkF86tsGpz2 +AS6ufMGoHp+HEL9EnRADwKDJq6fz2+chgsatyHADnDorV/OeMQ+xlT8EOdMI +F2xxljSfB9Ox/nEHTsROWbNf/I/mwGXpxZONpxGnW5Xvinr8hDUcwjcrIhBv +HtGi85v/hMoV4addohG5VktlCMNP2LJJV+txEiJG5v/0XfsTPqp2dKm+QJwS +cJhSeT0LZsFzbDYziK6NSg83ic6C2qyi9e3j6jgenVrmPjMDE4t3UC1AHW1u +huqL9M1AChuT+Jcz6ng7d7PrZMMM/OKvnZK4rI7xcx5jbxgzkC9jeaGIoY6v +VW4EujnNwE6foNzOYXVkGC+Ttuv8DoJjhRyCjho4KcQ/EdI0DbR5rjmahwYG +2Ew1Z1ZMwxH2o0NHfDQwbKxS8HPeNKRsZn5zN0wD/U07wsMTpmGruV6U+B0N +lHT60xlgPQ17SroW5ds0sBQv0yVGp0Dn6u9pcx1NpFmpXFBaPQXuKYZ9gUaa +6G50umsP+xRcot9tSjbXxI9zV/84Tn2D+tcaOR8dNfHF3h3sJa++gdl8jJdz +uCY++GB39ZHFNzjqIDzsV6iJ4mHOVy2vToK/rOrH6zu10KxFbZ8E/wTYKHz7 +HL9XC1m1T5o/WBwHLaX0/jiaFjaxb7gjOzQO/MA5FqOjhVlU1sHEonHI02/7 +FeWohdTJgAoHh3GYcvAS9LutheL8cV4L+WNwLD7F7CCXNsZ4GyQmHhsFsxsm +Fgf4tHHSTSWdOjwKyoksR0zWaSPP2YX5/zRHgSvF3cFAXBvLKf29ZhtGgXoo +56OpoY3TuC9ErWEEhkrrr8gGa+P6zSUKN+VHwHFisZZ/VBvxbf7Bh3xfoaD6 +5yx9WhtPvN6uFvJ3GHjSprbiL200bK0adxwbhgKzgTNenDroO6BBO/6G+MI6 +6TfiOrj/4MEFz+BheB51OznQSQfjN17aNTc8BJzraO5dH3Uw0o5zoqBpEB5r ++HHca9TFiSGLQoe2fvAXsVZ71q6LCnYlrqHV/aDKpBlQ06OL/t3Fg5mF/VBf +srr/25guxqmwbtqY2g/jtLxS5NyPtcaic+mu/bBTajrgC+5H19yvIUyLX4AS +9h7YlrcfR7p2xj+U+gIZPzwrsm/qYYqkcN1iQS900W+JWKXooemDjuCFR72w +wq42kj1DD7mfFOSwp/XC6bfbNGyf6eH2sVB/1eheML7bW7myRQ8XjZYv7bXq +hV+6FlW+K/Xxk7f6qNPvz2B8R72GFqOPsybJG+1uf4J59XX/VYUb4MWmPGHd +tR/hx/hDdaOLBjhy4m9/BstH+Jak+OJ9nAGeucHvzz/1AYYmLO4NpRpgg479 +g611H6DtVsJJzlcGGJFWqscR9QFyp1cLGM4b4NHBWIvu793geZ/XrtXHEI/9 +jKqW7u2CHibW6T4HI+SeUzHfOdQBhrkR3l/djTAvJH2rcmcHFDv8nZj0NkLn +t2Fih951QGLlr9GFUCOsGzdIyn7SAabnpgbW3jbCgNgSnt5THVDJ8alTr8UI +yzf2/jLh6YCsFUXluRrG+HdNgRHPvnY4scE7PlLUBN957m/vedkG+g9kaVt2 +mSC11bHLP6cNxHfOfy6VMcG7r/TUBB60QY9ipNSiuglefhvLGhTTBoYHbzQE +2pug6N5ayxdWbSARU8DjlWqCktxM+9b+boXvC+Faj7hNsXmFSY2ARis88agt +Tzhvih+CYh6LTjTD+5z7QmKXTNH0woHOZ/3NsDgb7Jt32RQbWi/wGXQ3g0HU +brHGG6bk/yYzIa6mGb7evn6RM90Ut8Ytl/VIbwaRehvjkFJTzNnxU9/Nqhlu +7pn+YD9niu2CTBds6psgeEZobpfHAezL3FbYcakROjMSnZcdP4ANsV6fW4Ia +QcGCv6XX5wA2nlLS/eDWCN8LeR4nBB1AhVHVLH6dRvAMW3JcungAof29tghr +I1gtH2xoyTqAzIH2hzPDG4C2+WnW6YEDGLQ9sPtP5H8wq69jUWNnhsMSX39G +0utA4dTMf1edzFDH23tF/p06CHqQpm3pZoYdFVe1p67Uwe+F33IjJ8yQseLU +5AXfOvibncPPHWaGIkLfpSRV62DZSqFm4xQzdDpTUGjc/A4EW8cM2jvNsOp7 +wmwByztQsr6mPnjgICYmMDUcjqiFFqFUzypZc1xFPaTLsFXD+qyzr6gdh9A+ +fsXx7JevobB3p6ExrwUyPHYVC41VwKa2KbfACQssUzn+4L5jOcgmXMt+0HsY +B2L9S6yGSyCVbWbP9deWuMD9iVkq6SW8UJfqPl9khWVZHDcsPIsgWTGGb5Fx +BDN9Eyrc4gug8UPmBdnL1uhb0OT9iPcFPDdKEfOJsMGocaaZhdR8mD5+kOmE +81GEuIDRIp9nMKsj4T6paYurAlWHko/lATXRNe+nYIf/SaeXlZ7MBcv7mU5H +eeyRLZpK0Mt4Cs/yDOxYL9qjqYlSsm55DigJt/y69Mse66/xR1iEPQHRXrfu +Zg8HLE8/5ffV7TEMcB8zSel3QOmTF/ud7LKhKc7YSfeQI5ruKHvhFf0Ibgbd +4w5ocsRel3xZsTIGvCpd+uWk54RMTo+OTgkwYG+FHG27gROaxqyffbqGAVmv +PQJHDZ1wVfsDFr/VDLhW2/rdx9QJm5I8wxZ4GeDa8nAs9LAT+kTdn9jIzgC+ +IZOeJBcnjLjoa0bN0MGVN628LtIJ7cs+RDU102GlDV6ULXbCtL9CnVbX6bBl +TU3jhleED27cbRhPB+l6o3XLSgkHemzCODqYqVrTOyuccMuiZJtkDB1ubgis +C31L9q0eRQhF0WF9z6OVtZ3EDyyPBF86iNkKJtvMEcYjxi8P0kHJfpI6L+eM +9sWvXtoI0yHr1pSfsYIzbhkf0WwUosOa1u9qgjRnjOBy2KS5jg6T2nNtlIoz +9voJvN2zlg4Zu5iY6zWckamWd3LtSjqsmOOzWn2A9LtClUVZ6TBwRX75veNk +/3QTD22cggM1im1u3oQjflq3jVJQyqR8T/ok6XPtnD05QsEtPzX5Sn+yb1vJ +ljtEgbGVrsNgiDOmXWa5rtZHQZGYVdGuGGfE+o9SSe0UxL0841GYRfocqp9U +Kyk4LpOkFEQRVnOS4KygwJCeu5zGIHnRCkZbGQVcSUP0gsfEg7nJyRIKzvua +jr7IJxyjv76okIIzEmLHnleSvFRZbFQOBZ5JdV55n5yxPIAzZiGVAr0VQ6q+ +vSTP/l51IoWCHeeZeGW+EN/Qubn3DgVDvvKPcwdJf1lbwNtbFDgY35t4Ok7y +W6ptGAkUWLL7ncj5TfJMj6cyrlCg67feJ1vABbG2mvtMGAWV9y7oX19HmKWw +NDyUAtX672JB610wIjSz+dwZCqS31XVpbiJ+Ik/gRjAFQh0hmh+2EW6zWFce +SMGYco8AlzzJD91vsvam4CpLWonbQRdk2n+2O9mBvL8UT7LRIRcsP8EmV2tP +wTnrIF/ZwyTP+WN43o6CoHzT7UtHiB8Os7W1Jfe7Ml9LdCT7bj8ilawpkH3n +6PzmJNmD6gjpQxR0XNvGLRpP8pdF7bboU/AEeN2/XiP+2XD1eT2yP/Gj6vEN +0jc+Zjm+nwIZvaowWhJhD/35V7rk+2Ny+m50l/THM3d4aVOg453WFZRNWNxF +gUWdgo0boxXUnpB8zoU9wUjBj3feN1ifkv2kAeMZoCBdHIzinpH7kxY4RtQo ++NPTU/6gmPDALqsvqhTkGwpTDbUknz7ozKNEQexvFvab74ifZbQn0ihwpEYd +rOqJT7b23kp4FVux8EAjeZ7p3rX7FCnweml59Vc7uWfTHekIeQpEdyYGig0S +z+OduE+Ggt8doa0jQ2QvX+VE914Kms67SOd8JSzbdiyIcFif3KjSOMmnbu8s +kKagO7n1qMkM2Vt2x09LioLrHHzawcyuGFHhRd2UpODV9x5rf1ZXcq9HlDLh +4R6G7wl24nccftu3i/we8rXSHJcT31GcKkd4yD5oQZ+P+N35tmMS5H5D7dXa +/K6ItzXvphBWUVwtAWuJf0PTNyEcz5ttIStEOGLNcOEO4os/5wqLkD3LfpnU +7RS4ZmbXrhUl7D7VakU4Pv7055XbXLEcx3oFCQ+58vOySZD+iJ9asjjx/Lru +49LEc7osY2yjoPgvf/iQDPGyvuy+hAdHehN65Qiv5fRRIaxcHvy6jUbyy+9f +bBGjYMDryaYSJPc+P1rGR3iFZYh8gQbJB5wTGhSlQElzv2GuFsk/6/tURDhO +6MvpzP0kv2fDIzfChWw58ff0yb2OX3ORcP+3kIe3DP/tvxUVJkyrXvv+iinJ +D1L727aS7zv3y9hFM+KP31rII3wlJYclypx4vkihG4S/+OpJB1oSHy+ceJgw +r62Ars8Rcs/6yh8qhGl6/Uc9bf6xbqnIv/7m0Fhbe9IX6Lg2LULu4dJPt3Qk +faHOOx8If5kVKDJzJv7+g1U1hHn7+hsNXcm9x+WnnhGm1T8d0nEnPvqScjph +x4LQP+hJ9nVSvl0jfCVdf42KF9nT81x59t/+FcFd8idI/szUrYB/+0ED6lI+ +JC8gedWDMI9zrqWEL+Hb67/ZElY0CfMW9Sf9lqKiQ//2lQ0ubAwkz+/m+GZE ++PK2damCQf/en/WqLuEXqwaf8QUT3s64pUG4byH3HfcZ0hdYXAH/9ofD+tjD +CIvMT6oSVmgxmF8KJ8/rSlX6x/8DepkvDQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "PlotRange" -> {{0, 180}, {0., 3.7688482855991268`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8093,7 +14705,8 @@ wTw= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5511670383120088}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8121,7 +14734,8 @@ wTw= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0., 3.7688482855991268`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8129,9 +14743,9 @@ wTw= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991347865018469*^9}, + CellChangeTimes->{3.991347865018469*^9, 3.9938320265896378`*^9}, CellLabel-> - "Out[469]=",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] + "Out[139]=",ExpressionUUID->"d6d1a7ed-c77c-4a5c-844a-611f28db6176"] }, Open ]], Cell[CellGroupData[{ @@ -8195,199 +14809,220 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918503718899097`*^9, {3.991850469268881*^9, - 3.9918504694651966`*^9}},ExpressionUUID->"497f9779-a3e4-c84e-a207-\ -0aac70483e3c"], + 3.9918503718899097`*^9, {3.991850469268881*^9, 3.9918504694651966`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.458740908982352`*^-268\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 470, - 513, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652482224`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.617599675843047`*^-244\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 61, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.993832026681808*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], +In[140]:=",ExpressionUUID->"e98739f0-b677-4ad0-95ee-aefff3078998"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7391049816418008`*^-279\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 470, 514, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652572174`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.62614725428349`*^-252\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 62, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.993832026686307*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], +In[140]:=",ExpressionUUID->"901cf128-69f7-4d21-909c-33e59ef1d370"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.230095503809359`*^-290\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 470, 515, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652662163`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.7142579274174334`*^-259\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 140, 63, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.99383202669026*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], +In[140]:=",ExpressionUUID->"687f3374-8478-4660-852b-66d3d3e6d2a6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 470, 516, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347865275215*^9}, +during this calculation.\"", 2, 140, 64, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.993832026694138*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], +In[140]:=",ExpressionUUID->"4e3f3397-3664-4d08-a6f8-67029a16a153"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vv8XAHAjJSF7PEZ2CpnP8KxzUHZWWRESUamQkAYhDZImGkJIlO25 +mYkGkoqSb2YplZBCSsnv+f11X+/XvfdzP+d8zufce1X997kE8vHw8JTz8vD8 +//hzsO2hRnIe+2Xq3iUrexzYr7LkDpr1xkNIqsUqKxtdQOnn/nK956HSonWC +34YJkU5Fb/h7cyFTI5bvubU9iE/Knv/9pgI8v161CLL2hqF6h30zb5phQdrA +9p9lCFhqjA18f9MF1wVuikSaHYbfb6iXpt68h6joW1v36KRAi8WtvJe50zCI +fQzW7DVQHKoZ9dddAGayYN1D0XyQCvEtWmbBj22FhrcU+IvhvKFlnYOrINo/ +KvOM8S8D/T5PK1awIN5qSrwVHlIGHYl7unUOCeL2dspsQGQZLO29+FUwRxCL +grISqafL4NDREYWWcUEcFV6rfrG8DAKexh2mJi7Haiz7rL1YBpTAOpZKpRD2 +3r1w8+6lcvgvw6Dpu5gIflV3S88orYAr3cUrIzVF8P2pQ6Ol9ypgi+hq33lT +Eaza0R92/0EF9Cco/ePbLoItov7GT7orYHivEFOqWgTjNdWVDs5VwOf1HwiK +pyi2KrNiAliV8GsqvfRQzkpcYnthzKalEmp0JBcXq1disd0Ht4CnlRCzI9Uh +sX0lGgpQayO7K+FvX+JEyvRKvClw0ydhpBLiRu5JP1cTwy9yIhMM/ipI7Mzf +NBwhhr3C1/K1zaogOS/2OZ+8OEr2+XR85FSBrclOCWl1cdxm7fb7bUMVCD50 +cV2tJ465lHumrQ+5949o9tmZiaPCqZCp011VcFitY/TiTnF8/CZRrnyiCvZm +y/3TqhXHkJe0Q7Fq1eB8rVzXzksCa3P2PVNOqgYx3av7tgZK4INql1KplGro +rEus2LdPAueEspL5zleDbZ877WKCBLZUphs+vl4N5qR/FgPFEvjvhNPqiapq +MMmw9dr3VwJPBRbsrnlXDbIXR05duC6JpH6+jzZkDsjpVCf+KpDEZF3pU19M +OUBqTordWiaJdZ2X9eLZHFCeWnNgdYsk9sj7RGdZcUDTPtSv7rMkhgvwyCd4 +csB4yQJlxFgKq2b8K/4e4oDJ1U5Da5YU/hwvCNeN4wDFKFv3rqUUau97QXFN +5ADdz0ItylMKRyv0Os6lcMCs/pTIilgpvBhsQyauccAxQuaDUbsU8jea+VTW +ccBpxefB9G4p1NlyI2X/fQ645Nb897dfChnRg490Wzjg9sL7+eNvUvgiy9Tr +dDsHturerN0iLY2T10pUf/RyYPcH/XPxftLozVAtjpjhwInNNuyun9LoPqDW +aatFAKmqk8THK4MMK9ey3WsIKJHcPGe4QgajmtvjEnUJ6OnyKTu3SganeqK/ +XzciQMM5Qs3ZWgY/kSrIoWwCmjfeWPoiUwYtX9ZHXthMgNtdjZHFmzL4VfRW +n7E7AWPCRff1S2TwrlrT+g5PAsQ7qqLPNsvg5qwLaz76EOBn2z7m8FUGy35b +7CSCCViwnO18xpTFG795dYZiCEgriClesJTF/XZG53mOcJ+/lOeknrMsXhPv +kSXFEmD/SMjsTKAsapOvHycnEHDFQqXSPlUWkyiyyqLJBKy7mX/2cIYsqptU +Fk+lcOfLpxNyJ1cW5XujdzxNJeDLA7KmMCGL/1zX7t55ngAa2qU/HZLF9U1F +n6wyCei48WL/ny+yePblH6nxK9z5Lro66czIYt8Bo9iT1wg40ei3PFlQDn8M +xEgU3eDmixl5yNZQDi3SYvem5ROw69of9xiGHAqnfK7/WcCN70+cSdEGORQb +/eHhWsiNpy55YvkWOdRZfzH+TxEB+01zfNvi5XCg/+h/X0sJsM0WnbFLkUOG +zZZNvOUEqC07fLLzkhwqLLddLVZBwItXbuXdhXKYX/jqg3wVAYWMhxvcKuRw +V6del1Q1AbG5hm976+Qw+bms6nIONx+hwvyDnXKYuo/+dYAgQODNwXS/XjmM +NLTe1XiPgH7WJ52Rd3JoInbOJaOGgOQVzZs/z8hhW9L1HbQ6Aj4XRBX8IMlj +iVJT95pGAu6LfKQf0JDHXTXl3a+5vhzh8nxOTx4dh2vsD90nYIO53q+/KI+a +OgYVFU0EKN6+khJrK4+xrpzc9Q8ImFkpqMq3WR49JROkXnCdO/DeZlmQPHqv +Zyd2NxNwcL3T4KlQedwduSXJroUAp+KGcOEYeZSplpNo4FpbQmfZ2QR5vH/5 +8hrthwQsRmdcFT8jj9StM50pXPcMCRhcvCyPatObl3zlusRy/0OZbHmc/jLw +1PwRAcfvDntk3pZH+yhi9UWuvaUcJhQq5bExXJg0xLXxobpjWfXyaLVJKF/9 +MQFC77VlVB/Lo4neu/ZtXL+3vlx087k87i1tOZPJdU0pP2j9J49s1U/f2rlO +kwnrLnwvjz99E6ZnuQ4+MhikMy6PR/q7rpCeEAAf7P7enZXHZxkSn2lcy9jV +pBkscvOrGT/gxPVEuZZmpSAJIXv7EX+uH8pdrCFLkPBi6Z+2PVxfi+V1uKdA +wnXx5x6Fc71/dO97uiYJS57uDQ/j2nZjf2TDOhJubR7q2sm1WpXNCqSRsFzR ++IsX179JxI1mMxJOidYSVly/OKZhssGOhDesW1GP61ufz7U+2UxC7R+VScJc +H3Vc9Lb1IWFc0evkj9x43Dgh3zuCSLgr8aTLPa71lN4edwwjIWXJ2oFErpck +WpG6YkjoqERaZ8d1/1hVyeZEEmbr11mt4LrSWc3izRkSkgXCdR9x83363tk3 +nukkbHiePxjN9bZVC7v7s0m4VKvJT4trWtIuHt8iEh7k1at+xl3PT5s2rAlo +ICFduHZwOdeNtRUNo49J6CzQeC+LWx+XVVVcdr4goZ5E/149rtd/m4/ZO0JC +pyarg7T/15f1xbUPxknokpMdTXDrryRH763kTxL+ondeMeBabrOfaY2gAl4h +yTuLc+t3493fn1dIKKBA8MyXaG59xy+9kOGjoIAu0Sqlb7n1P37v0Rz/OgX0 +nF54ktJAgKqE7y03qgKyZY6qDNRz87X7l9ttVMDCoPGS1Vw3KelwHDZxx8+z +iiquJeBCfFpEZrQCrq5zm9/D3Z+tfWs0xo8p4CHFDMs07v79a9LSzU5WQHGv +gP473P2949Os0YfrCrik/tzkq0oC6PZe39e1cMcf8poe5vaP99Jaex+KKKLz +ivfVY9z+I7vvvpKsrCIekT3QVsHtT/atHs92qiji2hgLxwN5BHBiknVXGivi +neU89V9yuOsxNDXm6aGIMzY+29O4/c7odl3Qt1xFrKPX0N+kERDE5yprfkcR +9f5dKLE6y61Hr8nHF6sVkblT/37FGQKWiqpq0VsVsV8g6UH0aQLehid9SJxQ +RCFQSX/I7dfHmM7bSDQlPP3t1eTWAwRY+2T9oJor4eUHIyuc9hMgGvc1wdVe +CTf9SBNghnHHbzlekOanhMx6neu8ewi4Z1v7dekpJTyx/XqzRQABUx7qkdP/ +KaHO3D+ZW84EEDGhy8Q/KGG8qmwFzZFbv9caMtZNKqFbiWPAQ3sChIfd63by +KeMX9jKldisCVgel8AyvVca7UmzrsywCfA7Mnu44pIxnHMkv+bUJ0Ew3Vxw7 +rox5GxezaZr/X++zd5elKePxcOeHQWoExPxd88I8TxmrFz9IVSsScCnBR7qm +QxmH2hJthMW575NzT27kK61Czo0H28t+cb8HSjKrjt5fhbarzB6Ocd/n6990 +Lky2rkKNdUb0u00ccOBZYuXbtQplaop0dzdwYLvL3v/g4yps5mFd/I/DActD +qrFxAiqI1IC2uNscCF3186aZjgr+UTpd9OcMBx4G3ZhoiVTBywvrd9Zu4kDI +r+9xrSKqyPosrSXbXQ30sB0yoxKqKHrHRCCqsxoEx94W88up4rmbNee72qoh +v6+lh62mirwxHu2Hm6phsPGSbjVFFds1yjSz7laD43HT3hxfVbx9S91b7kQ1 +GEkc0z9UropxmcrOy6nV8FtHbFDPVQ3H2lfOv0yuAmbxnezLl9Vxs4THgQ+y +lfBdwtbPrVkDAzw3vZbLKocPKX5u4cu0cP+PU6ZB70vB5luUzUfKahzczC7R +59yB8e2C+6titVHvyOQ1M+fb3P8BWb4TzWtQffFHkotCAUg800ot+7YWn8Ws +fuJmeRMUT5Y6USi62L70dvJ8SDZk6JiKSQbpIbV0TcH44lVoJ5mRp8+tw7th +5qfOVacDXbE5Tb9HH5eMuA/kXLoAovy5EdviDTA/S0OMYZoGysdWMT21DPFD +ub6tgd5pWK7pzXF5YogHqjaQjv9OhF3yYFvcZogWNfzyTz8lQruI2iB/hyFu +9C0XUOpJhJSfnwSqXxjiobSzlz5UJIJo635X2beG2NA0s4xvTyJI7E6e6Rs3 +xKU+A3NhIwmgWF5rFChhhLHiRY/5/4uHdSz50qitRhi/w77jv49xUKm+8w+f +nxFGu//krXwdBzShGqtUfyMUO13RlvEoDszfeAznBXHPB9+YPZUfB25hGeJd +YUZoRB4Q4tsRB7H5shG6SUbY++3LihNdsfBCRMb0XYkRZuY2CDV8PwLhgxIt +tjzGuP704hrpyBhofezdUMRnjPNXKxd3b40B5dICQkjAGBM8Dk++Xh8D7bH0 +O+3LjdFq47GJ95IxoKbqf8lW0hglXi3bOFxxEF5uLw+y1TLGudml+31nosHg +i6Owrb0xatReztU6HgXfplNcbTKMsWpkMi+9LwL6e3Pcrl8xxkIdad62JxHQ +3sBx/37NGM9kzoJQVQTknRj2zMwxRvt4caxPiYAtCiY+X4qMUZXpbzbAjoBH +5n07TjUYY5piq/CKgv1w9dya6Lb3xqhwcXrrq9hwsNJ/fMVGzwRLjh0PJ/mG +gsdS680v9E1QZMp68NrGUNg10CbibmSCk1eP2uozQyE1+VlcANUET5uR5hLk +Q6Hn06sdsWYmyDj35GnP7X0QkD1iVO1qgsI6A1ecr++FeHHepypHTVCnzzVM +5WoINE4z/sx1mmDtD3HlHRPBkNNB+G96aYK7f7xbTO8OhsR84/aSbhPUXkgU +fVcTDDbuOpmBvSbIlPyx715SMLyqJVG735lgo2BVRIxqMIwd+x1eMmOC5rn7 +VrO8gkBGjBgLIJFx6Q3zaruhQPj92cilSZGM2e0/0y1aA6H/QUmNwioyvhBM +ynUqD4Sc/QUnu9TJKNESM3U7IRB031zSQj0y9grQa93XBIJ5VoS/ApJxLnNZ +2PnoANira/T2ZSAZb8nGO8hrbYcDc6R532AyNvfM/htauR0ON/OTJneR8cbN +jRsbfvtDssdrT6FQrnljouue+UNhYvR/5jHc57nX/W2J9If3/Y29lalkdH6+ +6+hsxzZwO2P35hJBxsZR4tyWU36w1cNkTr2WjMrXhtxeHvCDAHUl2Yp6MhrM +a0R4+/vB/ppJt84HZPwxJRBWyvCDtI/nepZ2kPEpM0/uzKAvtLN6X0cNk3GP +OXpurvIB1mTAK8/lFLxkr5qdfdgbZOqscutXUDCpJ9Y739sbJk+sDV0lSsGG +worRNqY3ZKlOrfgoQcFRnbn5sAUv+Lf5kEWoIgX59aQtGHFecL/uXEWSPgV1 +hwqPX03eAmanGtMqXSno8Y2SP3TPA0huOT4yHhTk2/xT/s41D/ihlqh7cAsF +D9Is9C7FeUBuvU0r25eC5LrCZ/XWHsA39WqxLZiCau4zdr5v3aHF7eve4UMU +ZLCc1fv53GGDhtxGkVwKgmhG/MpgV6iaeKQakEfBRrsDDQ2OrqBB7P9ZW0DB ++1nrCxKprrDE9vmN4GIK1qy5qeu9zBWa9yX9aKmi4Nuxx3X6hZuBXTeTHvOE +gkeufU92m9wEFJeX7z+NU1Bq2o9PMsUFChRiCfY3ChqFkJ+URLqA9EfdlEvf +KfhOzb7Yb5sLzESdJFv85Mb/6Hv8UqoLVFyHk1mLFLxyc9jBY8QZ9L/c1XOV +oKLJg+4YfnQG7bjT0c1UKoJp+/C0oBPUM/IF7OlUNGNP8hp+cQSnufvnXzOp +KKA486iwyRGi987e+WxGRU54n6p6qCO0evu9E7WnYjWjfB37pQMEm1Jsvfyo +qF9gxhy9uhFu/3inMHOSinOi7ebtznbALvlbeCSZipGumd1n1tlB105ZyrJU +Ks5O/QqNWWEH88P2TqQLVFzmFabT+cgWbJ8TiXidioNRHYpeTFsYKz4zkVJO +xYdd2rafDGxgbaDpfc233Ov9tzhVUKzgrJrDfEI/FYttBlMdSVYwM+RPfj9I +RbVsKQvhf5bQuCWlOGuEioyTz8+PPLIEF6ehdNkJKoZcNY5b6m4JBxnHQ5fz +0HBN2kIgf+wGaBV/qTqhSUM/wb5m4Y8WoPf8o7edNg2jEl0jfTss4HzKfPrt +tTRU+fZ04VmlBXgv0xDdoU/DTr/9pH/xFvDtb+T8II2GgeX/km+pWYDMZ8Xu +F3Y0TD7ndXNZkDkENgYnVoXR0LT5Y60FvxlM7hmL2hBBww/2v79IjiNEK4Xs +7omk4dHtS8d4XiOcPrzP5dchGs6HXhs0uIVQRo9UYSbR8NWqsbUf7RH+chLq +W67QcEnnqr2CDIDzpVkzXS00dDfn1z2fzwRFX5XP2x/TMHJ9Y+TUESbki+b2 +zbTS8JmZ96c4Nybc25PfLNNJwxCtFZ5UQSYM6NxJ29JLw3Efh20zexigXVij ++36chkKbdrcfNafD/exXAd+lTTHe5U/9VlEaDNur+kbKmeLD+GyOyQQVeH7v +8fxDMsWWwtzr5A4qmDsvcxBQMUVxuBNZdZoKj3npVPm1pjgTQjbOWU6FDv8b +y83Ypmgr2OAlupICbzV2laTtMMWdaZUZfykm8OcFp1B6pyl+ye6euEcyAcUj +/Dev7DbFauWkq5n/jGHr62vpeaGm2MYw9Hzy2BiGjz+PuxdjijZ2J7ueexjD +p1GTTcOppthwF8ZCE4xgpnBxTp8wxaaoHXYD3w1g1M0y+1SNKc7O51WF9xlA +75Iz1iN1pvhDJOGA+iMDqPMjZV5uMkXfWdWkngwDiJcj0xfaTLHP2DQn1swA +xE7uOtzeb4rkTwWkk/r6oBv0mieQj45hVVVlV0t0QVla8XbjEjq+iN9qo3tS +F8Ra/J3lltHxZWZJzPg2XZhWnsp5uoKO5j0RXfPSulDbI2RhJE3HqM9L02zi +dMDaEo8vrqajdk8E59jWtbBds3j5lY10nHz8OG2epg0xj3x2aTnRsUZTbJO7 +tDakBUo8rXChY+b9/rwP31dDff7BlKfudLwwxlqWVrwapLSsVy5so+Oi4g9L +ddXV8Fjro5RfJB0/hejEC0prwVrtVSpaN+g45xNuaqasAdjaFVeRQ0f3Jav2 +I48GuAUnvWPn0VHg7THyzvfqkFA4ket+m3t9l3sC5ZY69GvXa56qpOMS+6CM +WiN1SF3jqTP+hI407XhhprMafF97gVIxRUcGx6mqvUgFejtwg+Q0HV1I5kIb +LqhA097JTRGzdHzaucNs8JAKpFbYhFHm6Zjn5X8/ZKMKrKXz3KnlZ+DV5ZWT +X0dWgb/NHtUWGQZ+VBqKNT6mDK+CrIRfMRkYOrzp4PZRBahbPksiAwOdDz/r +TGpUgNzi3DWXzRioPHWHNnRZAUK/LVh6WDLQ/PVvy3XWCiASVXWs35GBrgNZ +tuy7JLBMUp374M/Af09SiMk4ebiX9+fd7EkGPhddcP5oLwsUi4g522QG8t8r +UurXkYXqd+PC2WcYWJaL+f+EZKFCeZBqe56BfvFlko/bZOBORtOZrKsMHH0h +UOxhIwPZKcdNrUoYyI732OnrJA2nIlaey+hm4Kv8sLoLhyVBUPJkwcRrBl4W +fWN2w08Sksp56s17GTiw66bti/WSkDj5fXS8n4EVf9avzRWRhKPBr5hmowx8 ++uy2Ik+OBIR7Z37+8ouBu86O2h3pFIct69WRoczEHSYZo7YWYrDwSlC0RYWJ +ngUWU2VrxCA7cLLPVp2Jwqkb6pliYjCaVBO1RZuJva1Pr56qWwnhbY6lB42Y +2O4qfFZtVhROOxxWvmfJRLaYRuPQARGo9Xj912QfE7sWVSs+FAnB1i+17fVh +TBS677Vje5wQ8MRkZ6yPYOKKhJ2lqm5CYHl1t8nmg0wsYdtle/EJQdcAb8j+ +BCa+HDaKqtu6HMb81/WVpzMxs95Ob3iVICjsOVGzromJJyXifh9+LgCpizvI +yc1M/Ly09kpeiQDwnbcs//SQO58/rrXzZwRgjCNwO7uNicaM0jjDjQJQy5OY +IdHNRBmTvDPNz5bAlotxUT8/MjGHs72c/YYfMuoOkhtXsFCRs40jIsQHwg6e +5SRRFqKmlfbFSV6IG6bpRYmxMDD1yoJZNy8EC/zSMJBm4akHxTyS13mB6hgp +lavMwiVWUJNoxAs978OnjxuyMMKf1zomgAekhULKN7qzUFnUYPH24wV2nsWR +mClPFtIgOurwhQW20ZFUiwveLDTZI/Imx2+B7TBV9rp3Gwtv0J+4j/z5y07q +mf29PYSFNtl3eowpf9m/cmPNY46xcG2xaWl2zTz7LeNCd0ExC89r/r4Z82uO +HXwg75pNCQunj2j+aumcY/8sqQ4cL2NhRVl8u3P+HFtCrXfOkMNCq9rUDaab +5th2gkqKDU0sdE/fRNWt+Mmuf1UQ0P2aha5738xZH55l24re04vsZWGLsbdi +kdssu9eq7adcHze+wch9Noaz7Jnaryd9hlnoRdxXMfs0w9bLMbj7ZYyFWRsu +WQu5zbDr35pFpkyw8GHt70gXoxm2rdQm0J9ioaWD0/Br0Rn2jhMHXkbMsnBX +1uh0Sus0e6Yp6YrsLxY+UI76dD9/mh0/n769dp6FIzOZhboJ02wxk9u6Wxe4 +400yBrr8ptlZe2pnFxdZ+Dy8XaeCPc3+H+kkL/8= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8401,158 +15036,175 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13c8Vv8XAHAjJSF7PEZ2CpnP8KxzUHZWWRESUamQkAYhDZImGkJIlO25 +mYkGkoqSb2YplZBCSsnv+f11X+/XvfdzP+d8zufce1X997kE8vHw8JTz8vD8 +//hzsO2hRnIe+2Xq3iUrexzYr7LkDpr1xkNIqsUqKxtdQOnn/nK956HSonWC +34YJkU5Fb/h7cyFTI5bvubU9iE/Knv/9pgI8v161CLL2hqF6h30zb5phQdrA +9p9lCFhqjA18f9MF1wVuikSaHYbfb6iXpt68h6joW1v36KRAi8WtvJe50zCI +fQzW7DVQHKoZ9dddAGayYN1D0XyQCvEtWmbBj22FhrcU+IvhvKFlnYOrINo/ +KvOM8S8D/T5PK1awIN5qSrwVHlIGHYl7unUOCeL2dspsQGQZLO29+FUwRxCL +grISqafL4NDREYWWcUEcFV6rfrG8DAKexh2mJi7Haiz7rL1YBpTAOpZKpRD2 +3r1w8+6lcvgvw6Dpu5gIflV3S88orYAr3cUrIzVF8P2pQ6Ol9ypgi+hq33lT +Eaza0R92/0EF9Cco/ePbLoItov7GT7orYHivEFOqWgTjNdWVDs5VwOf1HwiK +pyi2KrNiAliV8GsqvfRQzkpcYnthzKalEmp0JBcXq1disd0Ht4CnlRCzI9Uh +sX0lGgpQayO7K+FvX+JEyvRKvClw0ydhpBLiRu5JP1cTwy9yIhMM/ipI7Mzf +NBwhhr3C1/K1zaogOS/2OZ+8OEr2+XR85FSBrclOCWl1cdxm7fb7bUMVCD50 +cV2tJ465lHumrQ+5949o9tmZiaPCqZCp011VcFitY/TiTnF8/CZRrnyiCvZm +y/3TqhXHkJe0Q7Fq1eB8rVzXzksCa3P2PVNOqgYx3av7tgZK4INql1KplGro +rEus2LdPAueEspL5zleDbZ877WKCBLZUphs+vl4N5qR/FgPFEvjvhNPqiapq +MMmw9dr3VwJPBRbsrnlXDbIXR05duC6JpH6+jzZkDsjpVCf+KpDEZF3pU19M +OUBqTordWiaJdZ2X9eLZHFCeWnNgdYsk9sj7RGdZcUDTPtSv7rMkhgvwyCd4 +csB4yQJlxFgKq2b8K/4e4oDJ1U5Da5YU/hwvCNeN4wDFKFv3rqUUau97QXFN +5ADdz0ItylMKRyv0Os6lcMCs/pTIilgpvBhsQyauccAxQuaDUbsU8jea+VTW +ccBpxefB9G4p1NlyI2X/fQ645Nb897dfChnRg490Wzjg9sL7+eNvUvgiy9Tr +dDsHturerN0iLY2T10pUf/RyYPcH/XPxftLozVAtjpjhwInNNuyun9LoPqDW +aatFAKmqk8THK4MMK9ey3WsIKJHcPGe4QgajmtvjEnUJ6OnyKTu3SganeqK/ +XzciQMM5Qs3ZWgY/kSrIoWwCmjfeWPoiUwYtX9ZHXthMgNtdjZHFmzL4VfRW +n7E7AWPCRff1S2TwrlrT+g5PAsQ7qqLPNsvg5qwLaz76EOBn2z7m8FUGy35b +7CSCCViwnO18xpTFG795dYZiCEgriClesJTF/XZG53mOcJ+/lOeknrMsXhPv +kSXFEmD/SMjsTKAsapOvHycnEHDFQqXSPlUWkyiyyqLJBKy7mX/2cIYsqptU +Fk+lcOfLpxNyJ1cW5XujdzxNJeDLA7KmMCGL/1zX7t55ngAa2qU/HZLF9U1F +n6wyCei48WL/ny+yePblH6nxK9z5Lro66czIYt8Bo9iT1wg40ei3PFlQDn8M +xEgU3eDmixl5yNZQDi3SYvem5ROw69of9xiGHAqnfK7/WcCN70+cSdEGORQb +/eHhWsiNpy55YvkWOdRZfzH+TxEB+01zfNvi5XCg/+h/X0sJsM0WnbFLkUOG +zZZNvOUEqC07fLLzkhwqLLddLVZBwItXbuXdhXKYX/jqg3wVAYWMhxvcKuRw +V6del1Q1AbG5hm976+Qw+bms6nIONx+hwvyDnXKYuo/+dYAgQODNwXS/XjmM +NLTe1XiPgH7WJ52Rd3JoInbOJaOGgOQVzZs/z8hhW9L1HbQ6Aj4XRBX8IMlj +iVJT95pGAu6LfKQf0JDHXTXl3a+5vhzh8nxOTx4dh2vsD90nYIO53q+/KI+a +OgYVFU0EKN6+khJrK4+xrpzc9Q8ImFkpqMq3WR49JROkXnCdO/DeZlmQPHqv +Zyd2NxNwcL3T4KlQedwduSXJroUAp+KGcOEYeZSplpNo4FpbQmfZ2QR5vH/5 +8hrthwQsRmdcFT8jj9StM50pXPcMCRhcvCyPatObl3zlusRy/0OZbHmc/jLw +1PwRAcfvDntk3pZH+yhi9UWuvaUcJhQq5bExXJg0xLXxobpjWfXyaLVJKF/9 +MQFC77VlVB/Lo4neu/ZtXL+3vlx087k87i1tOZPJdU0pP2j9J49s1U/f2rlO +kwnrLnwvjz99E6ZnuQ4+MhikMy6PR/q7rpCeEAAf7P7enZXHZxkSn2lcy9jV +pBkscvOrGT/gxPVEuZZmpSAJIXv7EX+uH8pdrCFLkPBi6Z+2PVxfi+V1uKdA +wnXx5x6Fc71/dO97uiYJS57uDQ/j2nZjf2TDOhJubR7q2sm1WpXNCqSRsFzR ++IsX179JxI1mMxJOidYSVly/OKZhssGOhDesW1GP61ufz7U+2UxC7R+VScJc +H3Vc9Lb1IWFc0evkj9x43Dgh3zuCSLgr8aTLPa71lN4edwwjIWXJ2oFErpck +WpG6YkjoqERaZ8d1/1hVyeZEEmbr11mt4LrSWc3izRkSkgXCdR9x83363tk3 +nukkbHiePxjN9bZVC7v7s0m4VKvJT4trWtIuHt8iEh7k1at+xl3PT5s2rAlo +ICFduHZwOdeNtRUNo49J6CzQeC+LWx+XVVVcdr4goZ5E/149rtd/m4/ZO0JC +pyarg7T/15f1xbUPxknokpMdTXDrryRH763kTxL+ondeMeBabrOfaY2gAl4h +yTuLc+t3493fn1dIKKBA8MyXaG59xy+9kOGjoIAu0Sqlb7n1P37v0Rz/OgX0 +nF54ktJAgKqE7y03qgKyZY6qDNRz87X7l9ttVMDCoPGS1Vw3KelwHDZxx8+z +iiquJeBCfFpEZrQCrq5zm9/D3Z+tfWs0xo8p4CHFDMs07v79a9LSzU5WQHGv +gP473P2949Os0YfrCrik/tzkq0oC6PZe39e1cMcf8poe5vaP99Jaex+KKKLz +ivfVY9z+I7vvvpKsrCIekT3QVsHtT/atHs92qiji2hgLxwN5BHBiknVXGivi +neU89V9yuOsxNDXm6aGIMzY+29O4/c7odl3Qt1xFrKPX0N+kERDE5yprfkcR +9f5dKLE6y61Hr8nHF6sVkblT/37FGQKWiqpq0VsVsV8g6UH0aQLehid9SJxQ +RCFQSX/I7dfHmM7bSDQlPP3t1eTWAwRY+2T9oJor4eUHIyuc9hMgGvc1wdVe +CTf9SBNghnHHbzlekOanhMx6neu8ewi4Z1v7dekpJTyx/XqzRQABUx7qkdP/ +KaHO3D+ZW84EEDGhy8Q/KGG8qmwFzZFbv9caMtZNKqFbiWPAQ3sChIfd63by +KeMX9jKldisCVgel8AyvVca7UmzrsywCfA7Mnu44pIxnHMkv+bUJ0Ew3Vxw7 +rox5GxezaZr/X++zd5elKePxcOeHQWoExPxd88I8TxmrFz9IVSsScCnBR7qm +QxmH2hJthMW575NzT27kK61Czo0H28t+cb8HSjKrjt5fhbarzB6Ocd/n6990 +Lky2rkKNdUb0u00ccOBZYuXbtQplaop0dzdwYLvL3v/g4yps5mFd/I/DActD +qrFxAiqI1IC2uNscCF3186aZjgr+UTpd9OcMBx4G3ZhoiVTBywvrd9Zu4kDI +r+9xrSKqyPosrSXbXQ30sB0yoxKqKHrHRCCqsxoEx94W88up4rmbNee72qoh +v6+lh62mirwxHu2Hm6phsPGSbjVFFds1yjSz7laD43HT3hxfVbx9S91b7kQ1 +GEkc0z9UropxmcrOy6nV8FtHbFDPVQ3H2lfOv0yuAmbxnezLl9Vxs4THgQ+y +lfBdwtbPrVkDAzw3vZbLKocPKX5u4cu0cP+PU6ZB70vB5luUzUfKahzczC7R +59yB8e2C+6titVHvyOQ1M+fb3P8BWb4TzWtQffFHkotCAUg800ot+7YWn8Ws +fuJmeRMUT5Y6USi62L70dvJ8SDZk6JiKSQbpIbV0TcH44lVoJ5mRp8+tw7th +5qfOVacDXbE5Tb9HH5eMuA/kXLoAovy5EdviDTA/S0OMYZoGysdWMT21DPFD +ub6tgd5pWK7pzXF5YogHqjaQjv9OhF3yYFvcZogWNfzyTz8lQruI2iB/hyFu +9C0XUOpJhJSfnwSqXxjiobSzlz5UJIJo635X2beG2NA0s4xvTyJI7E6e6Rs3 +xKU+A3NhIwmgWF5rFChhhLHiRY/5/4uHdSz50qitRhi/w77jv49xUKm+8w+f +nxFGu//krXwdBzShGqtUfyMUO13RlvEoDszfeAznBXHPB9+YPZUfB25hGeJd +YUZoRB4Q4tsRB7H5shG6SUbY++3LihNdsfBCRMb0XYkRZuY2CDV8PwLhgxIt +tjzGuP704hrpyBhofezdUMRnjPNXKxd3b40B5dICQkjAGBM8Dk++Xh8D7bH0 +O+3LjdFq47GJ95IxoKbqf8lW0hglXi3bOFxxEF5uLw+y1TLGudml+31nosHg +i6Owrb0xatReztU6HgXfplNcbTKMsWpkMi+9LwL6e3Pcrl8xxkIdad62JxHQ +3sBx/37NGM9kzoJQVQTknRj2zMwxRvt4caxPiYAtCiY+X4qMUZXpbzbAjoBH +5n07TjUYY5piq/CKgv1w9dya6Lb3xqhwcXrrq9hwsNJ/fMVGzwRLjh0PJ/mG +gsdS680v9E1QZMp68NrGUNg10CbibmSCk1eP2uozQyE1+VlcANUET5uR5hLk +Q6Hn06sdsWYmyDj35GnP7X0QkD1iVO1qgsI6A1ecr++FeHHepypHTVCnzzVM +5WoINE4z/sx1mmDtD3HlHRPBkNNB+G96aYK7f7xbTO8OhsR84/aSbhPUXkgU +fVcTDDbuOpmBvSbIlPyx715SMLyqJVG735lgo2BVRIxqMIwd+x1eMmOC5rn7 +VrO8gkBGjBgLIJFx6Q3zaruhQPj92cilSZGM2e0/0y1aA6H/QUmNwioyvhBM +ynUqD4Sc/QUnu9TJKNESM3U7IRB031zSQj0y9grQa93XBIJ5VoS/ApJxLnNZ +2PnoANira/T2ZSAZb8nGO8hrbYcDc6R532AyNvfM/htauR0ON/OTJneR8cbN +jRsbfvtDssdrT6FQrnljouue+UNhYvR/5jHc57nX/W2J9If3/Y29lalkdH6+ +6+hsxzZwO2P35hJBxsZR4tyWU36w1cNkTr2WjMrXhtxeHvCDAHUl2Yp6MhrM +a0R4+/vB/ppJt84HZPwxJRBWyvCDtI/nepZ2kPEpM0/uzKAvtLN6X0cNk3GP +OXpurvIB1mTAK8/lFLxkr5qdfdgbZOqscutXUDCpJ9Y739sbJk+sDV0lSsGG +worRNqY3ZKlOrfgoQcFRnbn5sAUv+Lf5kEWoIgX59aQtGHFecL/uXEWSPgV1 +hwqPX03eAmanGtMqXSno8Y2SP3TPA0huOT4yHhTk2/xT/s41D/ihlqh7cAsF +D9Is9C7FeUBuvU0r25eC5LrCZ/XWHsA39WqxLZiCau4zdr5v3aHF7eve4UMU +ZLCc1fv53GGDhtxGkVwKgmhG/MpgV6iaeKQakEfBRrsDDQ2OrqBB7P9ZW0DB ++1nrCxKprrDE9vmN4GIK1qy5qeu9zBWa9yX9aKmi4Nuxx3X6hZuBXTeTHvOE +gkeufU92m9wEFJeX7z+NU1Bq2o9PMsUFChRiCfY3ChqFkJ+URLqA9EfdlEvf +KfhOzb7Yb5sLzESdJFv85Mb/6Hv8UqoLVFyHk1mLFLxyc9jBY8QZ9L/c1XOV +oKLJg+4YfnQG7bjT0c1UKoJp+/C0oBPUM/IF7OlUNGNP8hp+cQSnufvnXzOp +KKA486iwyRGi987e+WxGRU54n6p6qCO0evu9E7WnYjWjfB37pQMEm1Jsvfyo +qF9gxhy9uhFu/3inMHOSinOi7ebtznbALvlbeCSZipGumd1n1tlB105ZyrJU +Ks5O/QqNWWEH88P2TqQLVFzmFabT+cgWbJ8TiXidioNRHYpeTFsYKz4zkVJO +xYdd2rafDGxgbaDpfc233Ov9tzhVUKzgrJrDfEI/FYttBlMdSVYwM+RPfj9I +RbVsKQvhf5bQuCWlOGuEioyTz8+PPLIEF6ehdNkJKoZcNY5b6m4JBxnHQ5fz +0HBN2kIgf+wGaBV/qTqhSUM/wb5m4Y8WoPf8o7edNg2jEl0jfTss4HzKfPrt +tTRU+fZ04VmlBXgv0xDdoU/DTr/9pH/xFvDtb+T8II2GgeX/km+pWYDMZ8Xu +F3Y0TD7ndXNZkDkENgYnVoXR0LT5Y60FvxlM7hmL2hBBww/2v79IjiNEK4Xs +7omk4dHtS8d4XiOcPrzP5dchGs6HXhs0uIVQRo9UYSbR8NWqsbUf7RH+chLq +W67QcEnnqr2CDIDzpVkzXS00dDfn1z2fzwRFX5XP2x/TMHJ9Y+TUESbki+b2 +zbTS8JmZ96c4Nybc25PfLNNJwxCtFZ5UQSYM6NxJ29JLw3Efh20zexigXVij ++36chkKbdrcfNafD/exXAd+lTTHe5U/9VlEaDNur+kbKmeLD+GyOyQQVeH7v +8fxDMsWWwtzr5A4qmDsvcxBQMUVxuBNZdZoKj3npVPm1pjgTQjbOWU6FDv8b +y83Ypmgr2OAlupICbzV2laTtMMWdaZUZfykm8OcFp1B6pyl+ye6euEcyAcUj +/Dev7DbFauWkq5n/jGHr62vpeaGm2MYw9Hzy2BiGjz+PuxdjijZ2J7ueexjD +p1GTTcOppthwF8ZCE4xgpnBxTp8wxaaoHXYD3w1g1M0y+1SNKc7O51WF9xlA +75Iz1iN1pvhDJOGA+iMDqPMjZV5uMkXfWdWkngwDiJcj0xfaTLHP2DQn1swA +xE7uOtzeb4rkTwWkk/r6oBv0mieQj45hVVVlV0t0QVla8XbjEjq+iN9qo3tS +F8Ra/J3lltHxZWZJzPg2XZhWnsp5uoKO5j0RXfPSulDbI2RhJE3HqM9L02zi +dMDaEo8vrqajdk8E59jWtbBds3j5lY10nHz8OG2epg0xj3x2aTnRsUZTbJO7 +tDakBUo8rXChY+b9/rwP31dDff7BlKfudLwwxlqWVrwapLSsVy5so+Oi4g9L +ddXV8Fjro5RfJB0/hejEC0prwVrtVSpaN+g45xNuaqasAdjaFVeRQ0f3Jav2 +I48GuAUnvWPn0VHg7THyzvfqkFA4ket+m3t9l3sC5ZY69GvXa56qpOMS+6CM +WiN1SF3jqTP+hI407XhhprMafF97gVIxRUcGx6mqvUgFejtwg+Q0HV1I5kIb +LqhA097JTRGzdHzaucNs8JAKpFbYhFHm6Zjn5X8/ZKMKrKXz3KnlZ+DV5ZWT +X0dWgb/NHtUWGQZ+VBqKNT6mDK+CrIRfMRkYOrzp4PZRBahbPksiAwOdDz/r +TGpUgNzi3DWXzRioPHWHNnRZAUK/LVh6WDLQ/PVvy3XWCiASVXWs35GBrgNZ +tuy7JLBMUp374M/Af09SiMk4ebiX9+fd7EkGPhddcP5oLwsUi4g522QG8t8r +UurXkYXqd+PC2WcYWJaL+f+EZKFCeZBqe56BfvFlko/bZOBORtOZrKsMHH0h +UOxhIwPZKcdNrUoYyI732OnrJA2nIlaey+hm4Kv8sLoLhyVBUPJkwcRrBl4W +fWN2w08Sksp56s17GTiw66bti/WSkDj5fXS8n4EVf9avzRWRhKPBr5hmowx8 ++uy2Ik+OBIR7Z37+8ouBu86O2h3pFIct69WRoczEHSYZo7YWYrDwSlC0RYWJ +ngUWU2VrxCA7cLLPVp2Jwqkb6pliYjCaVBO1RZuJva1Pr56qWwnhbY6lB42Y +2O4qfFZtVhROOxxWvmfJRLaYRuPQARGo9Xj912QfE7sWVSs+FAnB1i+17fVh +TBS677Vje5wQ8MRkZ6yPYOKKhJ2lqm5CYHl1t8nmg0wsYdtle/EJQdcAb8j+ +BCa+HDaKqtu6HMb81/WVpzMxs95Ob3iVICjsOVGzromJJyXifh9+LgCpizvI +yc1M/Ly09kpeiQDwnbcs//SQO58/rrXzZwRgjCNwO7uNicaM0jjDjQJQy5OY +IdHNRBmTvDPNz5bAlotxUT8/MjGHs72c/YYfMuoOkhtXsFCRs40jIsQHwg6e +5SRRFqKmlfbFSV6IG6bpRYmxMDD1yoJZNy8EC/zSMJBm4akHxTyS13mB6hgp +lavMwiVWUJNoxAs978OnjxuyMMKf1zomgAekhULKN7qzUFnUYPH24wV2nsWR +mClPFtIgOurwhQW20ZFUiwveLDTZI/Imx2+B7TBV9rp3Gwtv0J+4j/z5y07q +mf29PYSFNtl3eowpf9m/cmPNY46xcG2xaWl2zTz7LeNCd0ExC89r/r4Z82uO +HXwg75pNCQunj2j+aumcY/8sqQ4cL2NhRVl8u3P+HFtCrXfOkMNCq9rUDaab +5th2gkqKDU0sdE/fRNWt+Mmuf1UQ0P2aha5738xZH55l24re04vsZWGLsbdi +kdssu9eq7adcHze+wch9Noaz7Jnaryd9hlnoRdxXMfs0w9bLMbj7ZYyFWRsu +WQu5zbDr35pFpkyw8GHt70gXoxm2rdQm0J9ioaWD0/Br0Rn2jhMHXkbMsnBX +1uh0Sus0e6Yp6YrsLxY+UI76dD9/mh0/n769dp6FIzOZhboJ02wxk9u6Wxe4 +400yBrr8ptlZe2pnFxdZ+Dy8XaeCPc3+H+kkL/8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.09288708995291792}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8564,183 +15216,200 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.09288708995291792}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{117.9605728938093, - 256.1444167491903}, {-15.489822627663699`, 5.682052372336301}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13c8Vv8XAHAjJSF7PEZ2CpnP8KxzUHZWWRESUamQkAYhDZImGkJIlO25 +mYkGkoqSb2YplZBCSsnv+f11X+/XvfdzP+d8zufce1X997kE8vHw8JTz8vD8 +//hzsO2hRnIe+2Xq3iUrexzYr7LkDpr1xkNIqsUqKxtdQOnn/nK956HSonWC +34YJkU5Fb/h7cyFTI5bvubU9iE/Knv/9pgI8v161CLL2hqF6h30zb5phQdrA +9p9lCFhqjA18f9MF1wVuikSaHYbfb6iXpt68h6joW1v36KRAi8WtvJe50zCI +fQzW7DVQHKoZ9dddAGayYN1D0XyQCvEtWmbBj22FhrcU+IvhvKFlnYOrINo/ +KvOM8S8D/T5PK1awIN5qSrwVHlIGHYl7unUOCeL2dspsQGQZLO29+FUwRxCL +grISqafL4NDREYWWcUEcFV6rfrG8DAKexh2mJi7Haiz7rL1YBpTAOpZKpRD2 +3r1w8+6lcvgvw6Dpu5gIflV3S88orYAr3cUrIzVF8P2pQ6Ol9ypgi+hq33lT +Eaza0R92/0EF9Cco/ePbLoItov7GT7orYHivEFOqWgTjNdWVDs5VwOf1HwiK +pyi2KrNiAliV8GsqvfRQzkpcYnthzKalEmp0JBcXq1disd0Ht4CnlRCzI9Uh +sX0lGgpQayO7K+FvX+JEyvRKvClw0ydhpBLiRu5JP1cTwy9yIhMM/ipI7Mzf +NBwhhr3C1/K1zaogOS/2OZ+8OEr2+XR85FSBrclOCWl1cdxm7fb7bUMVCD50 +cV2tJ465lHumrQ+5949o9tmZiaPCqZCp011VcFitY/TiTnF8/CZRrnyiCvZm +y/3TqhXHkJe0Q7Fq1eB8rVzXzksCa3P2PVNOqgYx3av7tgZK4INql1KplGro +rEus2LdPAueEspL5zleDbZ877WKCBLZUphs+vl4N5qR/FgPFEvjvhNPqiapq +MMmw9dr3VwJPBRbsrnlXDbIXR05duC6JpH6+jzZkDsjpVCf+KpDEZF3pU19M +OUBqTordWiaJdZ2X9eLZHFCeWnNgdYsk9sj7RGdZcUDTPtSv7rMkhgvwyCd4 +csB4yQJlxFgKq2b8K/4e4oDJ1U5Da5YU/hwvCNeN4wDFKFv3rqUUau97QXFN +5ADdz0ItylMKRyv0Os6lcMCs/pTIilgpvBhsQyauccAxQuaDUbsU8jea+VTW +ccBpxefB9G4p1NlyI2X/fQ645Nb897dfChnRg490Wzjg9sL7+eNvUvgiy9Tr +dDsHturerN0iLY2T10pUf/RyYPcH/XPxftLozVAtjpjhwInNNuyun9LoPqDW +aatFAKmqk8THK4MMK9ey3WsIKJHcPGe4QgajmtvjEnUJ6OnyKTu3SganeqK/ +XzciQMM5Qs3ZWgY/kSrIoWwCmjfeWPoiUwYtX9ZHXthMgNtdjZHFmzL4VfRW +n7E7AWPCRff1S2TwrlrT+g5PAsQ7qqLPNsvg5qwLaz76EOBn2z7m8FUGy35b +7CSCCViwnO18xpTFG795dYZiCEgriClesJTF/XZG53mOcJ+/lOeknrMsXhPv +kSXFEmD/SMjsTKAsapOvHycnEHDFQqXSPlUWkyiyyqLJBKy7mX/2cIYsqptU +Fk+lcOfLpxNyJ1cW5XujdzxNJeDLA7KmMCGL/1zX7t55ngAa2qU/HZLF9U1F +n6wyCei48WL/ny+yePblH6nxK9z5Lro66czIYt8Bo9iT1wg40ei3PFlQDn8M +xEgU3eDmixl5yNZQDi3SYvem5ROw69of9xiGHAqnfK7/WcCN70+cSdEGORQb +/eHhWsiNpy55YvkWOdRZfzH+TxEB+01zfNvi5XCg/+h/X0sJsM0WnbFLkUOG +zZZNvOUEqC07fLLzkhwqLLddLVZBwItXbuXdhXKYX/jqg3wVAYWMhxvcKuRw +V6del1Q1AbG5hm976+Qw+bms6nIONx+hwvyDnXKYuo/+dYAgQODNwXS/XjmM +NLTe1XiPgH7WJ52Rd3JoInbOJaOGgOQVzZs/z8hhW9L1HbQ6Aj4XRBX8IMlj +iVJT95pGAu6LfKQf0JDHXTXl3a+5vhzh8nxOTx4dh2vsD90nYIO53q+/KI+a +OgYVFU0EKN6+khJrK4+xrpzc9Q8ImFkpqMq3WR49JROkXnCdO/DeZlmQPHqv +Zyd2NxNwcL3T4KlQedwduSXJroUAp+KGcOEYeZSplpNo4FpbQmfZ2QR5vH/5 +8hrthwQsRmdcFT8jj9StM50pXPcMCRhcvCyPatObl3zlusRy/0OZbHmc/jLw +1PwRAcfvDntk3pZH+yhi9UWuvaUcJhQq5bExXJg0xLXxobpjWfXyaLVJKF/9 +MQFC77VlVB/Lo4neu/ZtXL+3vlx087k87i1tOZPJdU0pP2j9J49s1U/f2rlO +kwnrLnwvjz99E6ZnuQ4+MhikMy6PR/q7rpCeEAAf7P7enZXHZxkSn2lcy9jV +pBkscvOrGT/gxPVEuZZmpSAJIXv7EX+uH8pdrCFLkPBi6Z+2PVxfi+V1uKdA +wnXx5x6Fc71/dO97uiYJS57uDQ/j2nZjf2TDOhJubR7q2sm1WpXNCqSRsFzR ++IsX179JxI1mMxJOidYSVly/OKZhssGOhDesW1GP61ufz7U+2UxC7R+VScJc +H3Vc9Lb1IWFc0evkj9x43Dgh3zuCSLgr8aTLPa71lN4edwwjIWXJ2oFErpck +WpG6YkjoqERaZ8d1/1hVyeZEEmbr11mt4LrSWc3izRkSkgXCdR9x83363tk3 +nukkbHiePxjN9bZVC7v7s0m4VKvJT4trWtIuHt8iEh7k1at+xl3PT5s2rAlo +ICFduHZwOdeNtRUNo49J6CzQeC+LWx+XVVVcdr4goZ5E/149rtd/m4/ZO0JC +pyarg7T/15f1xbUPxknokpMdTXDrryRH763kTxL+ondeMeBabrOfaY2gAl4h +yTuLc+t3493fn1dIKKBA8MyXaG59xy+9kOGjoIAu0Sqlb7n1P37v0Rz/OgX0 +nF54ktJAgKqE7y03qgKyZY6qDNRz87X7l9ttVMDCoPGS1Vw3KelwHDZxx8+z +iiquJeBCfFpEZrQCrq5zm9/D3Z+tfWs0xo8p4CHFDMs07v79a9LSzU5WQHGv +gP473P2949Os0YfrCrik/tzkq0oC6PZe39e1cMcf8poe5vaP99Jaex+KKKLz +ivfVY9z+I7vvvpKsrCIekT3QVsHtT/atHs92qiji2hgLxwN5BHBiknVXGivi +neU89V9yuOsxNDXm6aGIMzY+29O4/c7odl3Qt1xFrKPX0N+kERDE5yprfkcR +9f5dKLE6y61Hr8nHF6sVkblT/37FGQKWiqpq0VsVsV8g6UH0aQLehid9SJxQ +RCFQSX/I7dfHmM7bSDQlPP3t1eTWAwRY+2T9oJor4eUHIyuc9hMgGvc1wdVe +CTf9SBNghnHHbzlekOanhMx6neu8ewi4Z1v7dekpJTyx/XqzRQABUx7qkdP/ +KaHO3D+ZW84EEDGhy8Q/KGG8qmwFzZFbv9caMtZNKqFbiWPAQ3sChIfd63by +KeMX9jKldisCVgel8AyvVca7UmzrsywCfA7Mnu44pIxnHMkv+bUJ0Ew3Vxw7 +rox5GxezaZr/X++zd5elKePxcOeHQWoExPxd88I8TxmrFz9IVSsScCnBR7qm +QxmH2hJthMW575NzT27kK61Czo0H28t+cb8HSjKrjt5fhbarzB6Ocd/n6990 +Lky2rkKNdUb0u00ccOBZYuXbtQplaop0dzdwYLvL3v/g4yps5mFd/I/DActD +qrFxAiqI1IC2uNscCF3186aZjgr+UTpd9OcMBx4G3ZhoiVTBywvrd9Zu4kDI +r+9xrSKqyPosrSXbXQ30sB0yoxKqKHrHRCCqsxoEx94W88up4rmbNee72qoh +v6+lh62mirwxHu2Hm6phsPGSbjVFFds1yjSz7laD43HT3hxfVbx9S91b7kQ1 +GEkc0z9UropxmcrOy6nV8FtHbFDPVQ3H2lfOv0yuAmbxnezLl9Vxs4THgQ+y +lfBdwtbPrVkDAzw3vZbLKocPKX5u4cu0cP+PU6ZB70vB5luUzUfKahzczC7R +59yB8e2C+6titVHvyOQ1M+fb3P8BWb4TzWtQffFHkotCAUg800ot+7YWn8Ws +fuJmeRMUT5Y6USi62L70dvJ8SDZk6JiKSQbpIbV0TcH44lVoJ5mRp8+tw7th +5qfOVacDXbE5Tb9HH5eMuA/kXLoAovy5EdviDTA/S0OMYZoGysdWMT21DPFD +ub6tgd5pWK7pzXF5YogHqjaQjv9OhF3yYFvcZogWNfzyTz8lQruI2iB/hyFu +9C0XUOpJhJSfnwSqXxjiobSzlz5UJIJo635X2beG2NA0s4xvTyJI7E6e6Rs3 +xKU+A3NhIwmgWF5rFChhhLHiRY/5/4uHdSz50qitRhi/w77jv49xUKm+8w+f +nxFGu//krXwdBzShGqtUfyMUO13RlvEoDszfeAznBXHPB9+YPZUfB25hGeJd +YUZoRB4Q4tsRB7H5shG6SUbY++3LihNdsfBCRMb0XYkRZuY2CDV8PwLhgxIt +tjzGuP704hrpyBhofezdUMRnjPNXKxd3b40B5dICQkjAGBM8Dk++Xh8D7bH0 +O+3LjdFq47GJ95IxoKbqf8lW0hglXi3bOFxxEF5uLw+y1TLGudml+31nosHg +i6Owrb0xatReztU6HgXfplNcbTKMsWpkMi+9LwL6e3Pcrl8xxkIdad62JxHQ +3sBx/37NGM9kzoJQVQTknRj2zMwxRvt4caxPiYAtCiY+X4qMUZXpbzbAjoBH +5n07TjUYY5piq/CKgv1w9dya6Lb3xqhwcXrrq9hwsNJ/fMVGzwRLjh0PJ/mG +gsdS680v9E1QZMp68NrGUNg10CbibmSCk1eP2uozQyE1+VlcANUET5uR5hLk +Q6Hn06sdsWYmyDj35GnP7X0QkD1iVO1qgsI6A1ecr++FeHHepypHTVCnzzVM +5WoINE4z/sx1mmDtD3HlHRPBkNNB+G96aYK7f7xbTO8OhsR84/aSbhPUXkgU +fVcTDDbuOpmBvSbIlPyx715SMLyqJVG735lgo2BVRIxqMIwd+x1eMmOC5rn7 +VrO8gkBGjBgLIJFx6Q3zaruhQPj92cilSZGM2e0/0y1aA6H/QUmNwioyvhBM +ynUqD4Sc/QUnu9TJKNESM3U7IRB031zSQj0y9grQa93XBIJ5VoS/ApJxLnNZ +2PnoANira/T2ZSAZb8nGO8hrbYcDc6R532AyNvfM/htauR0ON/OTJneR8cbN +jRsbfvtDssdrT6FQrnljouue+UNhYvR/5jHc57nX/W2J9If3/Y29lalkdH6+ +6+hsxzZwO2P35hJBxsZR4tyWU36w1cNkTr2WjMrXhtxeHvCDAHUl2Yp6MhrM +a0R4+/vB/ppJt84HZPwxJRBWyvCDtI/nepZ2kPEpM0/uzKAvtLN6X0cNk3GP +OXpurvIB1mTAK8/lFLxkr5qdfdgbZOqscutXUDCpJ9Y739sbJk+sDV0lSsGG +worRNqY3ZKlOrfgoQcFRnbn5sAUv+Lf5kEWoIgX59aQtGHFecL/uXEWSPgV1 +hwqPX03eAmanGtMqXSno8Y2SP3TPA0huOT4yHhTk2/xT/s41D/ihlqh7cAsF +D9Is9C7FeUBuvU0r25eC5LrCZ/XWHsA39WqxLZiCau4zdr5v3aHF7eve4UMU +ZLCc1fv53GGDhtxGkVwKgmhG/MpgV6iaeKQakEfBRrsDDQ2OrqBB7P9ZW0DB ++1nrCxKprrDE9vmN4GIK1qy5qeu9zBWa9yX9aKmi4Nuxx3X6hZuBXTeTHvOE +gkeufU92m9wEFJeX7z+NU1Bq2o9PMsUFChRiCfY3ChqFkJ+URLqA9EfdlEvf +KfhOzb7Yb5sLzESdJFv85Mb/6Hv8UqoLVFyHk1mLFLxyc9jBY8QZ9L/c1XOV +oKLJg+4YfnQG7bjT0c1UKoJp+/C0oBPUM/IF7OlUNGNP8hp+cQSnufvnXzOp +KKA486iwyRGi987e+WxGRU54n6p6qCO0evu9E7WnYjWjfB37pQMEm1Jsvfyo +qF9gxhy9uhFu/3inMHOSinOi7ebtznbALvlbeCSZipGumd1n1tlB105ZyrJU +Ks5O/QqNWWEH88P2TqQLVFzmFabT+cgWbJ8TiXidioNRHYpeTFsYKz4zkVJO +xYdd2rafDGxgbaDpfc233Ov9tzhVUKzgrJrDfEI/FYttBlMdSVYwM+RPfj9I +RbVsKQvhf5bQuCWlOGuEioyTz8+PPLIEF6ehdNkJKoZcNY5b6m4JBxnHQ5fz +0HBN2kIgf+wGaBV/qTqhSUM/wb5m4Y8WoPf8o7edNg2jEl0jfTss4HzKfPrt +tTRU+fZ04VmlBXgv0xDdoU/DTr/9pH/xFvDtb+T8II2GgeX/km+pWYDMZ8Xu +F3Y0TD7ndXNZkDkENgYnVoXR0LT5Y60FvxlM7hmL2hBBww/2v79IjiNEK4Xs +7omk4dHtS8d4XiOcPrzP5dchGs6HXhs0uIVQRo9UYSbR8NWqsbUf7RH+chLq +W67QcEnnqr2CDIDzpVkzXS00dDfn1z2fzwRFX5XP2x/TMHJ9Y+TUESbki+b2 +zbTS8JmZ96c4Nybc25PfLNNJwxCtFZ5UQSYM6NxJ29JLw3Efh20zexigXVij ++36chkKbdrcfNafD/exXAd+lTTHe5U/9VlEaDNur+kbKmeLD+GyOyQQVeH7v +8fxDMsWWwtzr5A4qmDsvcxBQMUVxuBNZdZoKj3npVPm1pjgTQjbOWU6FDv8b +y83Ypmgr2OAlupICbzV2laTtMMWdaZUZfykm8OcFp1B6pyl+ye6euEcyAcUj +/Dev7DbFauWkq5n/jGHr62vpeaGm2MYw9Hzy2BiGjz+PuxdjijZ2J7ueexjD +p1GTTcOppthwF8ZCE4xgpnBxTp8wxaaoHXYD3w1g1M0y+1SNKc7O51WF9xlA +75Iz1iN1pvhDJOGA+iMDqPMjZV5uMkXfWdWkngwDiJcj0xfaTLHP2DQn1swA +xE7uOtzeb4rkTwWkk/r6oBv0mieQj45hVVVlV0t0QVla8XbjEjq+iN9qo3tS +F8Ra/J3lltHxZWZJzPg2XZhWnsp5uoKO5j0RXfPSulDbI2RhJE3HqM9L02zi +dMDaEo8vrqajdk8E59jWtbBds3j5lY10nHz8OG2epg0xj3x2aTnRsUZTbJO7 +tDakBUo8rXChY+b9/rwP31dDff7BlKfudLwwxlqWVrwapLSsVy5so+Oi4g9L +ddXV8Fjro5RfJB0/hejEC0prwVrtVSpaN+g45xNuaqasAdjaFVeRQ0f3Jav2 +I48GuAUnvWPn0VHg7THyzvfqkFA4ket+m3t9l3sC5ZY69GvXa56qpOMS+6CM +WiN1SF3jqTP+hI407XhhprMafF97gVIxRUcGx6mqvUgFejtwg+Q0HV1I5kIb +LqhA097JTRGzdHzaucNs8JAKpFbYhFHm6Zjn5X8/ZKMKrKXz3KnlZ+DV5ZWT +X0dWgb/NHtUWGQZ+VBqKNT6mDK+CrIRfMRkYOrzp4PZRBahbPksiAwOdDz/r +TGpUgNzi3DWXzRioPHWHNnRZAUK/LVh6WDLQ/PVvy3XWCiASVXWs35GBrgNZ +tuy7JLBMUp374M/Af09SiMk4ebiX9+fd7EkGPhddcP5oLwsUi4g522QG8t8r +UurXkYXqd+PC2WcYWJaL+f+EZKFCeZBqe56BfvFlko/bZOBORtOZrKsMHH0h +UOxhIwPZKcdNrUoYyI732OnrJA2nIlaey+hm4Kv8sLoLhyVBUPJkwcRrBl4W +fWN2w08Sksp56s17GTiw66bti/WSkDj5fXS8n4EVf9avzRWRhKPBr5hmowx8 ++uy2Ik+OBIR7Z37+8ouBu86O2h3pFIct69WRoczEHSYZo7YWYrDwSlC0RYWJ +ngUWU2VrxCA7cLLPVp2Jwqkb6pliYjCaVBO1RZuJva1Pr56qWwnhbY6lB42Y +2O4qfFZtVhROOxxWvmfJRLaYRuPQARGo9Xj912QfE7sWVSs+FAnB1i+17fVh +TBS677Vje5wQ8MRkZ6yPYOKKhJ2lqm5CYHl1t8nmg0wsYdtle/EJQdcAb8j+ +BCa+HDaKqtu6HMb81/WVpzMxs95Ob3iVICjsOVGzromJJyXifh9+LgCpizvI +yc1M/Ly09kpeiQDwnbcs//SQO58/rrXzZwRgjCNwO7uNicaM0jjDjQJQy5OY +IdHNRBmTvDPNz5bAlotxUT8/MjGHs72c/YYfMuoOkhtXsFCRs40jIsQHwg6e +5SRRFqKmlfbFSV6IG6bpRYmxMDD1yoJZNy8EC/zSMJBm4akHxTyS13mB6hgp +lavMwiVWUJNoxAs978OnjxuyMMKf1zomgAekhULKN7qzUFnUYPH24wV2nsWR +mClPFtIgOurwhQW20ZFUiwveLDTZI/Imx2+B7TBV9rp3Gwtv0J+4j/z5y07q +mf29PYSFNtl3eowpf9m/cmPNY46xcG2xaWl2zTz7LeNCd0ExC89r/r4Z82uO +HXwg75pNCQunj2j+aumcY/8sqQ4cL2NhRVl8u3P+HFtCrXfOkMNCq9rUDaab +5th2gkqKDU0sdE/fRNWt+Mmuf1UQ0P2aha5738xZH55l24re04vsZWGLsbdi +kdssu9eq7adcHze+wch9Noaz7Jnaryd9hlnoRdxXMfs0w9bLMbj7ZYyFWRsu +WQu5zbDr35pFpkyw8GHt70gXoxm2rdQm0J9ioaWD0/Br0Rn2jhMHXkbMsnBX +1uh0Sus0e6Yp6YrsLxY+UI76dD9/mh0/n769dp6FIzOZhboJ02wxk9u6Wxe4 +400yBrr8ptlZe2pnFxdZ+Dy8XaeCPc3+H+kkL/8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.09288708995291792}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8751,6 +15420,7 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8778,7 +15448,8 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.16919668648256683`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09288708995291792}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8786,17 +15457,745 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913483238131485`*^9}, + CellChangeTimes->{3.9913483238131485`*^9, 3.993832747088583*^9}, CellLabel-> - "Out[470]=",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] + "Out[140]=",ExpressionUUID->"c56d2a4a-43dd-4325-b24a-bdb73a881535"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"54d9c986-d109-3d4c-9ee8-\ -76427bb63659"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vv8XAHAjJSF7PEZ2CpnP8KxzUHZWWRESUamQkAYhDZImGkJIlO25 +mYkGkoqSb2YplZBCSsnv+f11X+/XvfdzP+d8zufce1X997kE8vHw8JTz8vD8 +//hzsO2hRnIe+2Xq3iUrexzYr7LkDpr1xkNIqsUqKxtdQOnn/nK956HSonWC +34YJkU5Fb/h7cyFTI5bvubU9iE/Knv/9pgI8v161CLL2hqF6h30zb5phQdrA +9p9lCFhqjA18f9MF1wVuikSaHYbfb6iXpt68h6joW1v36KRAi8WtvJe50zCI +fQzW7DVQHKoZ9dddAGayYN1D0XyQCvEtWmbBj22FhrcU+IvhvKFlnYOrINo/ +KvOM8S8D/T5PK1awIN5qSrwVHlIGHYl7unUOCeL2dspsQGQZLO29+FUwRxCL +grISqafL4NDREYWWcUEcFV6rfrG8DAKexh2mJi7Haiz7rL1YBpTAOpZKpRD2 +3r1w8+6lcvgvw6Dpu5gIflV3S88orYAr3cUrIzVF8P2pQ6Ol9ypgi+hq33lT +Eaza0R92/0EF9Cco/ePbLoItov7GT7orYHivEFOqWgTjNdWVDs5VwOf1HwiK +pyi2KrNiAliV8GsqvfRQzkpcYnthzKalEmp0JBcXq1disd0Ht4CnlRCzI9Uh +sX0lGgpQayO7K+FvX+JEyvRKvClw0ydhpBLiRu5JP1cTwy9yIhMM/ipI7Mzf +NBwhhr3C1/K1zaogOS/2OZ+8OEr2+XR85FSBrclOCWl1cdxm7fb7bUMVCD50 +cV2tJ465lHumrQ+5949o9tmZiaPCqZCp011VcFitY/TiTnF8/CZRrnyiCvZm +y/3TqhXHkJe0Q7Fq1eB8rVzXzksCa3P2PVNOqgYx3av7tgZK4INql1KplGro +rEus2LdPAueEspL5zleDbZ877WKCBLZUphs+vl4N5qR/FgPFEvjvhNPqiapq +MMmw9dr3VwJPBRbsrnlXDbIXR05duC6JpH6+jzZkDsjpVCf+KpDEZF3pU19M +OUBqTordWiaJdZ2X9eLZHFCeWnNgdYsk9sj7RGdZcUDTPtSv7rMkhgvwyCd4 +csB4yQJlxFgKq2b8K/4e4oDJ1U5Da5YU/hwvCNeN4wDFKFv3rqUUau97QXFN +5ADdz0ItylMKRyv0Os6lcMCs/pTIilgpvBhsQyauccAxQuaDUbsU8jea+VTW +ccBpxefB9G4p1NlyI2X/fQ645Nb897dfChnRg490Wzjg9sL7+eNvUvgiy9Tr +dDsHturerN0iLY2T10pUf/RyYPcH/XPxftLozVAtjpjhwInNNuyun9LoPqDW +aatFAKmqk8THK4MMK9ey3WsIKJHcPGe4QgajmtvjEnUJ6OnyKTu3SganeqK/ +XzciQMM5Qs3ZWgY/kSrIoWwCmjfeWPoiUwYtX9ZHXthMgNtdjZHFmzL4VfRW +n7E7AWPCRff1S2TwrlrT+g5PAsQ7qqLPNsvg5qwLaz76EOBn2z7m8FUGy35b +7CSCCViwnO18xpTFG795dYZiCEgriClesJTF/XZG53mOcJ+/lOeknrMsXhPv +kSXFEmD/SMjsTKAsapOvHycnEHDFQqXSPlUWkyiyyqLJBKy7mX/2cIYsqptU +Fk+lcOfLpxNyJ1cW5XujdzxNJeDLA7KmMCGL/1zX7t55ngAa2qU/HZLF9U1F +n6wyCei48WL/ny+yePblH6nxK9z5Lro66czIYt8Bo9iT1wg40ei3PFlQDn8M +xEgU3eDmixl5yNZQDi3SYvem5ROw69of9xiGHAqnfK7/WcCN70+cSdEGORQb +/eHhWsiNpy55YvkWOdRZfzH+TxEB+01zfNvi5XCg/+h/X0sJsM0WnbFLkUOG +zZZNvOUEqC07fLLzkhwqLLddLVZBwItXbuXdhXKYX/jqg3wVAYWMhxvcKuRw +V6del1Q1AbG5hm976+Qw+bms6nIONx+hwvyDnXKYuo/+dYAgQODNwXS/XjmM +NLTe1XiPgH7WJ52Rd3JoInbOJaOGgOQVzZs/z8hhW9L1HbQ6Aj4XRBX8IMlj +iVJT95pGAu6LfKQf0JDHXTXl3a+5vhzh8nxOTx4dh2vsD90nYIO53q+/KI+a +OgYVFU0EKN6+khJrK4+xrpzc9Q8ImFkpqMq3WR49JROkXnCdO/DeZlmQPHqv +Zyd2NxNwcL3T4KlQedwduSXJroUAp+KGcOEYeZSplpNo4FpbQmfZ2QR5vH/5 +8hrthwQsRmdcFT8jj9StM50pXPcMCRhcvCyPatObl3zlusRy/0OZbHmc/jLw +1PwRAcfvDntk3pZH+yhi9UWuvaUcJhQq5bExXJg0xLXxobpjWfXyaLVJKF/9 +MQFC77VlVB/Lo4neu/ZtXL+3vlx087k87i1tOZPJdU0pP2j9J49s1U/f2rlO +kwnrLnwvjz99E6ZnuQ4+MhikMy6PR/q7rpCeEAAf7P7enZXHZxkSn2lcy9jV +pBkscvOrGT/gxPVEuZZmpSAJIXv7EX+uH8pdrCFLkPBi6Z+2PVxfi+V1uKdA +wnXx5x6Fc71/dO97uiYJS57uDQ/j2nZjf2TDOhJubR7q2sm1WpXNCqSRsFzR ++IsX179JxI1mMxJOidYSVly/OKZhssGOhDesW1GP61ufz7U+2UxC7R+VScJc +H3Vc9Lb1IWFc0evkj9x43Dgh3zuCSLgr8aTLPa71lN4edwwjIWXJ2oFErpck +WpG6YkjoqERaZ8d1/1hVyeZEEmbr11mt4LrSWc3izRkSkgXCdR9x83363tk3 +nukkbHiePxjN9bZVC7v7s0m4VKvJT4trWtIuHt8iEh7k1at+xl3PT5s2rAlo +ICFduHZwOdeNtRUNo49J6CzQeC+LWx+XVVVcdr4goZ5E/149rtd/m4/ZO0JC +pyarg7T/15f1xbUPxknokpMdTXDrryRH763kTxL+ondeMeBabrOfaY2gAl4h +yTuLc+t3493fn1dIKKBA8MyXaG59xy+9kOGjoIAu0Sqlb7n1P37v0Rz/OgX0 +nF54ktJAgKqE7y03qgKyZY6qDNRz87X7l9ttVMDCoPGS1Vw3KelwHDZxx8+z +iiquJeBCfFpEZrQCrq5zm9/D3Z+tfWs0xo8p4CHFDMs07v79a9LSzU5WQHGv +gP473P2949Os0YfrCrik/tzkq0oC6PZe39e1cMcf8poe5vaP99Jaex+KKKLz +ivfVY9z+I7vvvpKsrCIekT3QVsHtT/atHs92qiji2hgLxwN5BHBiknVXGivi +neU89V9yuOsxNDXm6aGIMzY+29O4/c7odl3Qt1xFrKPX0N+kERDE5yprfkcR +9f5dKLE6y61Hr8nHF6sVkblT/37FGQKWiqpq0VsVsV8g6UH0aQLehid9SJxQ +RCFQSX/I7dfHmM7bSDQlPP3t1eTWAwRY+2T9oJor4eUHIyuc9hMgGvc1wdVe +CTf9SBNghnHHbzlekOanhMx6neu8ewi4Z1v7dekpJTyx/XqzRQABUx7qkdP/ +KaHO3D+ZW84EEDGhy8Q/KGG8qmwFzZFbv9caMtZNKqFbiWPAQ3sChIfd63by +KeMX9jKldisCVgel8AyvVca7UmzrsywCfA7Mnu44pIxnHMkv+bUJ0Ew3Vxw7 +rox5GxezaZr/X++zd5elKePxcOeHQWoExPxd88I8TxmrFz9IVSsScCnBR7qm +QxmH2hJthMW575NzT27kK61Czo0H28t+cb8HSjKrjt5fhbarzB6Ocd/n6990 +Lky2rkKNdUb0u00ccOBZYuXbtQplaop0dzdwYLvL3v/g4yps5mFd/I/DActD +qrFxAiqI1IC2uNscCF3186aZjgr+UTpd9OcMBx4G3ZhoiVTBywvrd9Zu4kDI +r+9xrSKqyPosrSXbXQ30sB0yoxKqKHrHRCCqsxoEx94W88up4rmbNee72qoh +v6+lh62mirwxHu2Hm6phsPGSbjVFFds1yjSz7laD43HT3hxfVbx9S91b7kQ1 +GEkc0z9UropxmcrOy6nV8FtHbFDPVQ3H2lfOv0yuAmbxnezLl9Vxs4THgQ+y +lfBdwtbPrVkDAzw3vZbLKocPKX5u4cu0cP+PU6ZB70vB5luUzUfKahzczC7R +59yB8e2C+6titVHvyOQ1M+fb3P8BWb4TzWtQffFHkotCAUg800ot+7YWn8Ws +fuJmeRMUT5Y6USi62L70dvJ8SDZk6JiKSQbpIbV0TcH44lVoJ5mRp8+tw7th +5qfOVacDXbE5Tb9HH5eMuA/kXLoAovy5EdviDTA/S0OMYZoGysdWMT21DPFD +ub6tgd5pWK7pzXF5YogHqjaQjv9OhF3yYFvcZogWNfzyTz8lQruI2iB/hyFu +9C0XUOpJhJSfnwSqXxjiobSzlz5UJIJo635X2beG2NA0s4xvTyJI7E6e6Rs3 +xKU+A3NhIwmgWF5rFChhhLHiRY/5/4uHdSz50qitRhi/w77jv49xUKm+8w+f +nxFGu//krXwdBzShGqtUfyMUO13RlvEoDszfeAznBXHPB9+YPZUfB25hGeJd +YUZoRB4Q4tsRB7H5shG6SUbY++3LihNdsfBCRMb0XYkRZuY2CDV8PwLhgxIt +tjzGuP704hrpyBhofezdUMRnjPNXKxd3b40B5dICQkjAGBM8Dk++Xh8D7bH0 +O+3LjdFq47GJ95IxoKbqf8lW0hglXi3bOFxxEF5uLw+y1TLGudml+31nosHg +i6Owrb0xatReztU6HgXfplNcbTKMsWpkMi+9LwL6e3Pcrl8xxkIdad62JxHQ +3sBx/37NGM9kzoJQVQTknRj2zMwxRvt4caxPiYAtCiY+X4qMUZXpbzbAjoBH +5n07TjUYY5piq/CKgv1w9dya6Lb3xqhwcXrrq9hwsNJ/fMVGzwRLjh0PJ/mG +gsdS680v9E1QZMp68NrGUNg10CbibmSCk1eP2uozQyE1+VlcANUET5uR5hLk +Q6Hn06sdsWYmyDj35GnP7X0QkD1iVO1qgsI6A1ecr++FeHHepypHTVCnzzVM +5WoINE4z/sx1mmDtD3HlHRPBkNNB+G96aYK7f7xbTO8OhsR84/aSbhPUXkgU +fVcTDDbuOpmBvSbIlPyx715SMLyqJVG735lgo2BVRIxqMIwd+x1eMmOC5rn7 +VrO8gkBGjBgLIJFx6Q3zaruhQPj92cilSZGM2e0/0y1aA6H/QUmNwioyvhBM +ynUqD4Sc/QUnu9TJKNESM3U7IRB031zSQj0y9grQa93XBIJ5VoS/ApJxLnNZ +2PnoANira/T2ZSAZb8nGO8hrbYcDc6R532AyNvfM/htauR0ON/OTJneR8cbN +jRsbfvtDssdrT6FQrnljouue+UNhYvR/5jHc57nX/W2J9If3/Y29lalkdH6+ +6+hsxzZwO2P35hJBxsZR4tyWU36w1cNkTr2WjMrXhtxeHvCDAHUl2Yp6MhrM +a0R4+/vB/ppJt84HZPwxJRBWyvCDtI/nepZ2kPEpM0/uzKAvtLN6X0cNk3GP +OXpurvIB1mTAK8/lFLxkr5qdfdgbZOqscutXUDCpJ9Y739sbJk+sDV0lSsGG +worRNqY3ZKlOrfgoQcFRnbn5sAUv+Lf5kEWoIgX59aQtGHFecL/uXEWSPgV1 +hwqPX03eAmanGtMqXSno8Y2SP3TPA0huOT4yHhTk2/xT/s41D/ihlqh7cAsF +D9Is9C7FeUBuvU0r25eC5LrCZ/XWHsA39WqxLZiCau4zdr5v3aHF7eve4UMU +ZLCc1fv53GGDhtxGkVwKgmhG/MpgV6iaeKQakEfBRrsDDQ2OrqBB7P9ZW0DB ++1nrCxKprrDE9vmN4GIK1qy5qeu9zBWa9yX9aKmi4Nuxx3X6hZuBXTeTHvOE +gkeufU92m9wEFJeX7z+NU1Bq2o9PMsUFChRiCfY3ChqFkJ+URLqA9EfdlEvf +KfhOzb7Yb5sLzESdJFv85Mb/6Hv8UqoLVFyHk1mLFLxyc9jBY8QZ9L/c1XOV +oKLJg+4YfnQG7bjT0c1UKoJp+/C0oBPUM/IF7OlUNGNP8hp+cQSnufvnXzOp +KKA486iwyRGi987e+WxGRU54n6p6qCO0evu9E7WnYjWjfB37pQMEm1Jsvfyo +qF9gxhy9uhFu/3inMHOSinOi7ebtznbALvlbeCSZipGumd1n1tlB105ZyrJU +Ks5O/QqNWWEH88P2TqQLVFzmFabT+cgWbJ8TiXidioNRHYpeTFsYKz4zkVJO +xYdd2rafDGxgbaDpfc233Ov9tzhVUKzgrJrDfEI/FYttBlMdSVYwM+RPfj9I +RbVsKQvhf5bQuCWlOGuEioyTz8+PPLIEF6ehdNkJKoZcNY5b6m4JBxnHQ5fz +0HBN2kIgf+wGaBV/qTqhSUM/wb5m4Y8WoPf8o7edNg2jEl0jfTss4HzKfPrt +tTRU+fZ04VmlBXgv0xDdoU/DTr/9pH/xFvDtb+T8II2GgeX/km+pWYDMZ8Xu +F3Y0TD7ndXNZkDkENgYnVoXR0LT5Y60FvxlM7hmL2hBBww/2v79IjiNEK4Xs +7omk4dHtS8d4XiOcPrzP5dchGs6HXhs0uIVQRo9UYSbR8NWqsbUf7RH+chLq +W67QcEnnqr2CDIDzpVkzXS00dDfn1z2fzwRFX5XP2x/TMHJ9Y+TUESbki+b2 +zbTS8JmZ96c4Nybc25PfLNNJwxCtFZ5UQSYM6NxJ29JLw3Efh20zexigXVij ++36chkKbdrcfNafD/exXAd+lTTHe5U/9VlEaDNur+kbKmeLD+GyOyQQVeH7v +8fxDMsWWwtzr5A4qmDsvcxBQMUVxuBNZdZoKj3npVPm1pjgTQjbOWU6FDv8b +y83Ypmgr2OAlupICbzV2laTtMMWdaZUZfykm8OcFp1B6pyl+ye6euEcyAcUj +/Dev7DbFauWkq5n/jGHr62vpeaGm2MYw9Hzy2BiGjz+PuxdjijZ2J7ueexjD +p1GTTcOppthwF8ZCE4xgpnBxTp8wxaaoHXYD3w1g1M0y+1SNKc7O51WF9xlA +75Iz1iN1pvhDJOGA+iMDqPMjZV5uMkXfWdWkngwDiJcj0xfaTLHP2DQn1swA +xE7uOtzeb4rkTwWkk/r6oBv0mieQj45hVVVlV0t0QVla8XbjEjq+iN9qo3tS +F8Ra/J3lltHxZWZJzPg2XZhWnsp5uoKO5j0RXfPSulDbI2RhJE3HqM9L02zi +dMDaEo8vrqajdk8E59jWtbBds3j5lY10nHz8OG2epg0xj3x2aTnRsUZTbJO7 +tDakBUo8rXChY+b9/rwP31dDff7BlKfudLwwxlqWVrwapLSsVy5so+Oi4g9L +ddXV8Fjro5RfJB0/hejEC0prwVrtVSpaN+g45xNuaqasAdjaFVeRQ0f3Jav2 +I48GuAUnvWPn0VHg7THyzvfqkFA4ket+m3t9l3sC5ZY69GvXa56qpOMS+6CM +WiN1SF3jqTP+hI407XhhprMafF97gVIxRUcGx6mqvUgFejtwg+Q0HV1I5kIb +LqhA097JTRGzdHzaucNs8JAKpFbYhFHm6Zjn5X8/ZKMKrKXz3KnlZ+DV5ZWT +X0dWgb/NHtUWGQZ+VBqKNT6mDK+CrIRfMRkYOrzp4PZRBahbPksiAwOdDz/r +TGpUgNzi3DWXzRioPHWHNnRZAUK/LVh6WDLQ/PVvy3XWCiASVXWs35GBrgNZ +tuy7JLBMUp374M/Af09SiMk4ebiX9+fd7EkGPhddcP5oLwsUi4g522QG8t8r +UurXkYXqd+PC2WcYWJaL+f+EZKFCeZBqe56BfvFlko/bZOBORtOZrKsMHH0h +UOxhIwPZKcdNrUoYyI732OnrJA2nIlaey+hm4Kv8sLoLhyVBUPJkwcRrBl4W +fWN2w08Sksp56s17GTiw66bti/WSkDj5fXS8n4EVf9avzRWRhKPBr5hmowx8 ++uy2Ik+OBIR7Z37+8ouBu86O2h3pFIct69WRoczEHSYZo7YWYrDwSlC0RYWJ +ngUWU2VrxCA7cLLPVp2Jwqkb6pliYjCaVBO1RZuJva1Pr56qWwnhbY6lB42Y +2O4qfFZtVhROOxxWvmfJRLaYRuPQARGo9Xj912QfE7sWVSs+FAnB1i+17fVh +TBS677Vje5wQ8MRkZ6yPYOKKhJ2lqm5CYHl1t8nmg0wsYdtle/EJQdcAb8j+ +BCa+HDaKqtu6HMb81/WVpzMxs95Ob3iVICjsOVGzromJJyXifh9+LgCpizvI +yc1M/Ly09kpeiQDwnbcs//SQO58/rrXzZwRgjCNwO7uNicaM0jjDjQJQy5OY +IdHNRBmTvDPNz5bAlotxUT8/MjGHs72c/YYfMuoOkhtXsFCRs40jIsQHwg6e +5SRRFqKmlfbFSV6IG6bpRYmxMDD1yoJZNy8EC/zSMJBm4akHxTyS13mB6hgp +lavMwiVWUJNoxAs978OnjxuyMMKf1zomgAekhULKN7qzUFnUYPH24wV2nsWR +mClPFtIgOurwhQW20ZFUiwveLDTZI/Imx2+B7TBV9rp3Gwtv0J+4j/z5y07q +mf29PYSFNtl3eowpf9m/cmPNY46xcG2xaWl2zTz7LeNCd0ExC89r/r4Z82uO +HXwg75pNCQunj2j+aumcY/8sqQ4cL2NhRVl8u3P+HFtCrXfOkMNCq9rUDaab +5th2gkqKDU0sdE/fRNWt+Mmuf1UQ0P2aha5738xZH55l24re04vsZWGLsbdi +kdssu9eq7adcHze+wch9Noaz7Jnaryd9hlnoRdxXMfs0w9bLMbj7ZYyFWRsu +WQu5zbDr35pFpkyw8GHt70gXoxm2rdQm0J9ioaWD0/Br0Rn2jhMHXkbMsnBX +1uh0Sus0e6Yp6YrsLxY+UI76dD9/mh0/n769dp6FIzOZhboJ02wxk9u6Wxe4 +400yBrr8ptlZe2pnFxdZ+Dy8XaeCPc3+H+kkL/8= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vv8XAHAjJSF7PEZ2CpnP8KxzUHZWWRESUamQkAYhDZImGkJIlO25 +mYkGkoqSb2YplZBCSsnv+f11X+/XvfdzP+d8zufce1X997kE8vHw8JTz8vD8 +//hzsO2hRnIe+2Xq3iUrexzYr7LkDpr1xkNIqsUqKxtdQOnn/nK956HSonWC +34YJkU5Fb/h7cyFTI5bvubU9iE/Knv/9pgI8v161CLL2hqF6h30zb5phQdrA +9p9lCFhqjA18f9MF1wVuikSaHYbfb6iXpt68h6joW1v36KRAi8WtvJe50zCI +fQzW7DVQHKoZ9dddAGayYN1D0XyQCvEtWmbBj22FhrcU+IvhvKFlnYOrINo/ +KvOM8S8D/T5PK1awIN5qSrwVHlIGHYl7unUOCeL2dspsQGQZLO29+FUwRxCL +grISqafL4NDREYWWcUEcFV6rfrG8DAKexh2mJi7Haiz7rL1YBpTAOpZKpRD2 +3r1w8+6lcvgvw6Dpu5gIflV3S88orYAr3cUrIzVF8P2pQ6Ol9ypgi+hq33lT +Eaza0R92/0EF9Cco/ePbLoItov7GT7orYHivEFOqWgTjNdWVDs5VwOf1HwiK +pyi2KrNiAliV8GsqvfRQzkpcYnthzKalEmp0JBcXq1disd0Ht4CnlRCzI9Uh +sX0lGgpQayO7K+FvX+JEyvRKvClw0ydhpBLiRu5JP1cTwy9yIhMM/ipI7Mzf +NBwhhr3C1/K1zaogOS/2OZ+8OEr2+XR85FSBrclOCWl1cdxm7fb7bUMVCD50 +cV2tJ465lHumrQ+5949o9tmZiaPCqZCp011VcFitY/TiTnF8/CZRrnyiCvZm +y/3TqhXHkJe0Q7Fq1eB8rVzXzksCa3P2PVNOqgYx3av7tgZK4INql1KplGro +rEus2LdPAueEspL5zleDbZ877WKCBLZUphs+vl4N5qR/FgPFEvjvhNPqiapq +MMmw9dr3VwJPBRbsrnlXDbIXR05duC6JpH6+jzZkDsjpVCf+KpDEZF3pU19M +OUBqTordWiaJdZ2X9eLZHFCeWnNgdYsk9sj7RGdZcUDTPtSv7rMkhgvwyCd4 +csB4yQJlxFgKq2b8K/4e4oDJ1U5Da5YU/hwvCNeN4wDFKFv3rqUUau97QXFN +5ADdz0ItylMKRyv0Os6lcMCs/pTIilgpvBhsQyauccAxQuaDUbsU8jea+VTW +ccBpxefB9G4p1NlyI2X/fQ645Nb897dfChnRg490Wzjg9sL7+eNvUvgiy9Tr +dDsHturerN0iLY2T10pUf/RyYPcH/XPxftLozVAtjpjhwInNNuyun9LoPqDW +aatFAKmqk8THK4MMK9ey3WsIKJHcPGe4QgajmtvjEnUJ6OnyKTu3SganeqK/ +XzciQMM5Qs3ZWgY/kSrIoWwCmjfeWPoiUwYtX9ZHXthMgNtdjZHFmzL4VfRW +n7E7AWPCRff1S2TwrlrT+g5PAsQ7qqLPNsvg5qwLaz76EOBn2z7m8FUGy35b +7CSCCViwnO18xpTFG795dYZiCEgriClesJTF/XZG53mOcJ+/lOeknrMsXhPv +kSXFEmD/SMjsTKAsapOvHycnEHDFQqXSPlUWkyiyyqLJBKy7mX/2cIYsqptU +Fk+lcOfLpxNyJ1cW5XujdzxNJeDLA7KmMCGL/1zX7t55ngAa2qU/HZLF9U1F +n6wyCei48WL/ny+yePblH6nxK9z5Lro66czIYt8Bo9iT1wg40ei3PFlQDn8M +xEgU3eDmixl5yNZQDi3SYvem5ROw69of9xiGHAqnfK7/WcCN70+cSdEGORQb +/eHhWsiNpy55YvkWOdRZfzH+TxEB+01zfNvi5XCg/+h/X0sJsM0WnbFLkUOG +zZZNvOUEqC07fLLzkhwqLLddLVZBwItXbuXdhXKYX/jqg3wVAYWMhxvcKuRw +V6del1Q1AbG5hm976+Qw+bms6nIONx+hwvyDnXKYuo/+dYAgQODNwXS/XjmM +NLTe1XiPgH7WJ52Rd3JoInbOJaOGgOQVzZs/z8hhW9L1HbQ6Aj4XRBX8IMlj +iVJT95pGAu6LfKQf0JDHXTXl3a+5vhzh8nxOTx4dh2vsD90nYIO53q+/KI+a +OgYVFU0EKN6+khJrK4+xrpzc9Q8ImFkpqMq3WR49JROkXnCdO/DeZlmQPHqv +Zyd2NxNwcL3T4KlQedwduSXJroUAp+KGcOEYeZSplpNo4FpbQmfZ2QR5vH/5 +8hrthwQsRmdcFT8jj9StM50pXPcMCRhcvCyPatObl3zlusRy/0OZbHmc/jLw +1PwRAcfvDntk3pZH+yhi9UWuvaUcJhQq5bExXJg0xLXxobpjWfXyaLVJKF/9 +MQFC77VlVB/Lo4neu/ZtXL+3vlx087k87i1tOZPJdU0pP2j9J49s1U/f2rlO +kwnrLnwvjz99E6ZnuQ4+MhikMy6PR/q7rpCeEAAf7P7enZXHZxkSn2lcy9jV +pBkscvOrGT/gxPVEuZZmpSAJIXv7EX+uH8pdrCFLkPBi6Z+2PVxfi+V1uKdA +wnXx5x6Fc71/dO97uiYJS57uDQ/j2nZjf2TDOhJubR7q2sm1WpXNCqSRsFzR ++IsX179JxI1mMxJOidYSVly/OKZhssGOhDesW1GP61ufz7U+2UxC7R+VScJc +H3Vc9Lb1IWFc0evkj9x43Dgh3zuCSLgr8aTLPa71lN4edwwjIWXJ2oFErpck +WpG6YkjoqERaZ8d1/1hVyeZEEmbr11mt4LrSWc3izRkSkgXCdR9x83363tk3 +nukkbHiePxjN9bZVC7v7s0m4VKvJT4trWtIuHt8iEh7k1at+xl3PT5s2rAlo +ICFduHZwOdeNtRUNo49J6CzQeC+LWx+XVVVcdr4goZ5E/149rtd/m4/ZO0JC +pyarg7T/15f1xbUPxknokpMdTXDrryRH763kTxL+ondeMeBabrOfaY2gAl4h +yTuLc+t3493fn1dIKKBA8MyXaG59xy+9kOGjoIAu0Sqlb7n1P37v0Rz/OgX0 +nF54ktJAgKqE7y03qgKyZY6qDNRz87X7l9ttVMDCoPGS1Vw3KelwHDZxx8+z +iiquJeBCfFpEZrQCrq5zm9/D3Z+tfWs0xo8p4CHFDMs07v79a9LSzU5WQHGv +gP473P2949Os0YfrCrik/tzkq0oC6PZe39e1cMcf8poe5vaP99Jaex+KKKLz +ivfVY9z+I7vvvpKsrCIekT3QVsHtT/atHs92qiji2hgLxwN5BHBiknVXGivi +neU89V9yuOsxNDXm6aGIMzY+29O4/c7odl3Qt1xFrKPX0N+kERDE5yprfkcR +9f5dKLE6y61Hr8nHF6sVkblT/37FGQKWiqpq0VsVsV8g6UH0aQLehid9SJxQ +RCFQSX/I7dfHmM7bSDQlPP3t1eTWAwRY+2T9oJor4eUHIyuc9hMgGvc1wdVe +CTf9SBNghnHHbzlekOanhMx6neu8ewi4Z1v7dekpJTyx/XqzRQABUx7qkdP/ +KaHO3D+ZW84EEDGhy8Q/KGG8qmwFzZFbv9caMtZNKqFbiWPAQ3sChIfd63by +KeMX9jKldisCVgel8AyvVca7UmzrsywCfA7Mnu44pIxnHMkv+bUJ0Ew3Vxw7 +rox5GxezaZr/X++zd5elKePxcOeHQWoExPxd88I8TxmrFz9IVSsScCnBR7qm +QxmH2hJthMW575NzT27kK61Czo0H28t+cb8HSjKrjt5fhbarzB6Ocd/n6990 +Lky2rkKNdUb0u00ccOBZYuXbtQplaop0dzdwYLvL3v/g4yps5mFd/I/DActD +qrFxAiqI1IC2uNscCF3186aZjgr+UTpd9OcMBx4G3ZhoiVTBywvrd9Zu4kDI +r+9xrSKqyPosrSXbXQ30sB0yoxKqKHrHRCCqsxoEx94W88up4rmbNee72qoh +v6+lh62mirwxHu2Hm6phsPGSbjVFFds1yjSz7laD43HT3hxfVbx9S91b7kQ1 +GEkc0z9UropxmcrOy6nV8FtHbFDPVQ3H2lfOv0yuAmbxnezLl9Vxs4THgQ+y +lfBdwtbPrVkDAzw3vZbLKocPKX5u4cu0cP+PU6ZB70vB5luUzUfKahzczC7R +59yB8e2C+6titVHvyOQ1M+fb3P8BWb4TzWtQffFHkotCAUg800ot+7YWn8Ws +fuJmeRMUT5Y6USi62L70dvJ8SDZk6JiKSQbpIbV0TcH44lVoJ5mRp8+tw7th +5qfOVacDXbE5Tb9HH5eMuA/kXLoAovy5EdviDTA/S0OMYZoGysdWMT21DPFD +ub6tgd5pWK7pzXF5YogHqjaQjv9OhF3yYFvcZogWNfzyTz8lQruI2iB/hyFu +9C0XUOpJhJSfnwSqXxjiobSzlz5UJIJo635X2beG2NA0s4xvTyJI7E6e6Rs3 +xKU+A3NhIwmgWF5rFChhhLHiRY/5/4uHdSz50qitRhi/w77jv49xUKm+8w+f +nxFGu//krXwdBzShGqtUfyMUO13RlvEoDszfeAznBXHPB9+YPZUfB25hGeJd +YUZoRB4Q4tsRB7H5shG6SUbY++3LihNdsfBCRMb0XYkRZuY2CDV8PwLhgxIt +tjzGuP704hrpyBhofezdUMRnjPNXKxd3b40B5dICQkjAGBM8Dk++Xh8D7bH0 +O+3LjdFq47GJ95IxoKbqf8lW0hglXi3bOFxxEF5uLw+y1TLGudml+31nosHg +i6Owrb0xatReztU6HgXfplNcbTKMsWpkMi+9LwL6e3Pcrl8xxkIdad62JxHQ +3sBx/37NGM9kzoJQVQTknRj2zMwxRvt4caxPiYAtCiY+X4qMUZXpbzbAjoBH +5n07TjUYY5piq/CKgv1w9dya6Lb3xqhwcXrrq9hwsNJ/fMVGzwRLjh0PJ/mG +gsdS680v9E1QZMp68NrGUNg10CbibmSCk1eP2uozQyE1+VlcANUET5uR5hLk +Q6Hn06sdsWYmyDj35GnP7X0QkD1iVO1qgsI6A1ecr++FeHHepypHTVCnzzVM +5WoINE4z/sx1mmDtD3HlHRPBkNNB+G96aYK7f7xbTO8OhsR84/aSbhPUXkgU +fVcTDDbuOpmBvSbIlPyx715SMLyqJVG735lgo2BVRIxqMIwd+x1eMmOC5rn7 +VrO8gkBGjBgLIJFx6Q3zaruhQPj92cilSZGM2e0/0y1aA6H/QUmNwioyvhBM +ynUqD4Sc/QUnu9TJKNESM3U7IRB031zSQj0y9grQa93XBIJ5VoS/ApJxLnNZ +2PnoANira/T2ZSAZb8nGO8hrbYcDc6R532AyNvfM/htauR0ON/OTJneR8cbN +jRsbfvtDssdrT6FQrnljouue+UNhYvR/5jHc57nX/W2J9If3/Y29lalkdH6+ +6+hsxzZwO2P35hJBxsZR4tyWU36w1cNkTr2WjMrXhtxeHvCDAHUl2Yp6MhrM +a0R4+/vB/ppJt84HZPwxJRBWyvCDtI/nepZ2kPEpM0/uzKAvtLN6X0cNk3GP +OXpurvIB1mTAK8/lFLxkr5qdfdgbZOqscutXUDCpJ9Y739sbJk+sDV0lSsGG +worRNqY3ZKlOrfgoQcFRnbn5sAUv+Lf5kEWoIgX59aQtGHFecL/uXEWSPgV1 +hwqPX03eAmanGtMqXSno8Y2SP3TPA0huOT4yHhTk2/xT/s41D/ihlqh7cAsF +D9Is9C7FeUBuvU0r25eC5LrCZ/XWHsA39WqxLZiCau4zdr5v3aHF7eve4UMU +ZLCc1fv53GGDhtxGkVwKgmhG/MpgV6iaeKQakEfBRrsDDQ2OrqBB7P9ZW0DB ++1nrCxKprrDE9vmN4GIK1qy5qeu9zBWa9yX9aKmi4Nuxx3X6hZuBXTeTHvOE +gkeufU92m9wEFJeX7z+NU1Bq2o9PMsUFChRiCfY3ChqFkJ+URLqA9EfdlEvf +KfhOzb7Yb5sLzESdJFv85Mb/6Hv8UqoLVFyHk1mLFLxyc9jBY8QZ9L/c1XOV +oKLJg+4YfnQG7bjT0c1UKoJp+/C0oBPUM/IF7OlUNGNP8hp+cQSnufvnXzOp +KKA486iwyRGi987e+WxGRU54n6p6qCO0evu9E7WnYjWjfB37pQMEm1Jsvfyo +qF9gxhy9uhFu/3inMHOSinOi7ebtznbALvlbeCSZipGumd1n1tlB105ZyrJU +Ks5O/QqNWWEH88P2TqQLVFzmFabT+cgWbJ8TiXidioNRHYpeTFsYKz4zkVJO +xYdd2rafDGxgbaDpfc233Ov9tzhVUKzgrJrDfEI/FYttBlMdSVYwM+RPfj9I +RbVsKQvhf5bQuCWlOGuEioyTz8+PPLIEF6ehdNkJKoZcNY5b6m4JBxnHQ5fz +0HBN2kIgf+wGaBV/qTqhSUM/wb5m4Y8WoPf8o7edNg2jEl0jfTss4HzKfPrt +tTRU+fZ04VmlBXgv0xDdoU/DTr/9pH/xFvDtb+T8II2GgeX/km+pWYDMZ8Xu +F3Y0TD7ndXNZkDkENgYnVoXR0LT5Y60FvxlM7hmL2hBBww/2v79IjiNEK4Xs +7omk4dHtS8d4XiOcPrzP5dchGs6HXhs0uIVQRo9UYSbR8NWqsbUf7RH+chLq +W67QcEnnqr2CDIDzpVkzXS00dDfn1z2fzwRFX5XP2x/TMHJ9Y+TUESbki+b2 +zbTS8JmZ96c4Nybc25PfLNNJwxCtFZ5UQSYM6NxJ29JLw3Efh20zexigXVij ++36chkKbdrcfNafD/exXAd+lTTHe5U/9VlEaDNur+kbKmeLD+GyOyQQVeH7v +8fxDMsWWwtzr5A4qmDsvcxBQMUVxuBNZdZoKj3npVPm1pjgTQjbOWU6FDv8b +y83Ypmgr2OAlupICbzV2laTtMMWdaZUZfykm8OcFp1B6pyl+ye6euEcyAcUj +/Dev7DbFauWkq5n/jGHr62vpeaGm2MYw9Hzy2BiGjz+PuxdjijZ2J7ueexjD +p1GTTcOppthwF8ZCE4xgpnBxTp8wxaaoHXYD3w1g1M0y+1SNKc7O51WF9xlA +75Iz1iN1pvhDJOGA+iMDqPMjZV5uMkXfWdWkngwDiJcj0xfaTLHP2DQn1swA +xE7uOtzeb4rkTwWkk/r6oBv0mieQj45hVVVlV0t0QVla8XbjEjq+iN9qo3tS +F8Ra/J3lltHxZWZJzPg2XZhWnsp5uoKO5j0RXfPSulDbI2RhJE3HqM9L02zi +dMDaEo8vrqajdk8E59jWtbBds3j5lY10nHz8OG2epg0xj3x2aTnRsUZTbJO7 +tDakBUo8rXChY+b9/rwP31dDff7BlKfudLwwxlqWVrwapLSsVy5so+Oi4g9L +ddXV8Fjro5RfJB0/hejEC0prwVrtVSpaN+g45xNuaqasAdjaFVeRQ0f3Jav2 +I48GuAUnvWPn0VHg7THyzvfqkFA4ket+m3t9l3sC5ZY69GvXa56qpOMS+6CM +WiN1SF3jqTP+hI407XhhprMafF97gVIxRUcGx6mqvUgFejtwg+Q0HV1I5kIb +LqhA097JTRGzdHzaucNs8JAKpFbYhFHm6Zjn5X8/ZKMKrKXz3KnlZ+DV5ZWT +X0dWgb/NHtUWGQZ+VBqKNT6mDK+CrIRfMRkYOrzp4PZRBahbPksiAwOdDz/r +TGpUgNzi3DWXzRioPHWHNnRZAUK/LVh6WDLQ/PVvy3XWCiASVXWs35GBrgNZ +tuy7JLBMUp374M/Af09SiMk4ebiX9+fd7EkGPhddcP5oLwsUi4g522QG8t8r +UurXkYXqd+PC2WcYWJaL+f+EZKFCeZBqe56BfvFlko/bZOBORtOZrKsMHH0h +UOxhIwPZKcdNrUoYyI732OnrJA2nIlaey+hm4Kv8sLoLhyVBUPJkwcRrBl4W +fWN2w08Sksp56s17GTiw66bti/WSkDj5fXS8n4EVf9avzRWRhKPBr5hmowx8 ++uy2Ik+OBIR7Z37+8ouBu86O2h3pFIct69WRoczEHSYZo7YWYrDwSlC0RYWJ +ngUWU2VrxCA7cLLPVp2Jwqkb6pliYjCaVBO1RZuJva1Pr56qWwnhbY6lB42Y +2O4qfFZtVhROOxxWvmfJRLaYRuPQARGo9Xj912QfE7sWVSs+FAnB1i+17fVh +TBS677Vje5wQ8MRkZ6yPYOKKhJ2lqm5CYHl1t8nmg0wsYdtle/EJQdcAb8j+ +BCa+HDaKqtu6HMb81/WVpzMxs95Ob3iVICjsOVGzromJJyXifh9+LgCpizvI +yc1M/Ly09kpeiQDwnbcs//SQO58/rrXzZwRgjCNwO7uNicaM0jjDjQJQy5OY +IdHNRBmTvDPNz5bAlotxUT8/MjGHs72c/YYfMuoOkhtXsFCRs40jIsQHwg6e +5SRRFqKmlfbFSV6IG6bpRYmxMDD1yoJZNy8EC/zSMJBm4akHxTyS13mB6hgp +lavMwiVWUJNoxAs978OnjxuyMMKf1zomgAekhULKN7qzUFnUYPH24wV2nsWR +mClPFtIgOurwhQW20ZFUiwveLDTZI/Imx2+B7TBV9rp3Gwtv0J+4j/z5y07q +mf29PYSFNtl3eowpf9m/cmPNY46xcG2xaWl2zTz7LeNCd0ExC89r/r4Z82uO +HXwg75pNCQunj2j+aumcY/8sqQ4cL2NhRVl8u3P+HFtCrXfOkMNCq9rUDaab +5th2gkqKDU0sdE/fRNWt+Mmuf1UQ0P2aha5738xZH55l24re04vsZWGLsbdi +kdssu9eq7adcHze+wch9Noaz7Jnaryd9hlnoRdxXMfs0w9bLMbj7ZYyFWRsu +WQu5zbDr35pFpkyw8GHt70gXoxm2rdQm0J9ioaWD0/Br0Rn2jhMHXkbMsnBX +1uh0Sus0e6Yp6YrsLxY+UI76dD9/mh0/n769dp6FIzOZhboJ02wxk9u6Wxe4 +400yBrr8ptlZe2pnFxdZ+Dy8XaeCPc3+H+kkL/8= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09288708995291792}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09288708995291792}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vv8XAHAjJSF7PEZ2CpnP8KxzUHZWWRESUamQkAYhDZImGkJIlO25 +mYkGkoqSb2YplZBCSsnv+f11X+/XvfdzP+d8zufce1X997kE8vHw8JTz8vD8 +//hzsO2hRnIe+2Xq3iUrexzYr7LkDpr1xkNIqsUqKxtdQOnn/nK956HSonWC +34YJkU5Fb/h7cyFTI5bvubU9iE/Knv/9pgI8v161CLL2hqF6h30zb5phQdrA +9p9lCFhqjA18f9MF1wVuikSaHYbfb6iXpt68h6joW1v36KRAi8WtvJe50zCI +fQzW7DVQHKoZ9dddAGayYN1D0XyQCvEtWmbBj22FhrcU+IvhvKFlnYOrINo/ +KvOM8S8D/T5PK1awIN5qSrwVHlIGHYl7unUOCeL2dspsQGQZLO29+FUwRxCL +grISqafL4NDREYWWcUEcFV6rfrG8DAKexh2mJi7Haiz7rL1YBpTAOpZKpRD2 +3r1w8+6lcvgvw6Dpu5gIflV3S88orYAr3cUrIzVF8P2pQ6Ol9ypgi+hq33lT +Eaza0R92/0EF9Cco/ePbLoItov7GT7orYHivEFOqWgTjNdWVDs5VwOf1HwiK +pyi2KrNiAliV8GsqvfRQzkpcYnthzKalEmp0JBcXq1disd0Ht4CnlRCzI9Uh +sX0lGgpQayO7K+FvX+JEyvRKvClw0ydhpBLiRu5JP1cTwy9yIhMM/ipI7Mzf +NBwhhr3C1/K1zaogOS/2OZ+8OEr2+XR85FSBrclOCWl1cdxm7fb7bUMVCD50 +cV2tJ465lHumrQ+5949o9tmZiaPCqZCp011VcFitY/TiTnF8/CZRrnyiCvZm +y/3TqhXHkJe0Q7Fq1eB8rVzXzksCa3P2PVNOqgYx3av7tgZK4INql1KplGro +rEus2LdPAueEspL5zleDbZ877WKCBLZUphs+vl4N5qR/FgPFEvjvhNPqiapq +MMmw9dr3VwJPBRbsrnlXDbIXR05duC6JpH6+jzZkDsjpVCf+KpDEZF3pU19M +OUBqTordWiaJdZ2X9eLZHFCeWnNgdYsk9sj7RGdZcUDTPtSv7rMkhgvwyCd4 +csB4yQJlxFgKq2b8K/4e4oDJ1U5Da5YU/hwvCNeN4wDFKFv3rqUUau97QXFN +5ADdz0ItylMKRyv0Os6lcMCs/pTIilgpvBhsQyauccAxQuaDUbsU8jea+VTW +ccBpxefB9G4p1NlyI2X/fQ645Nb897dfChnRg490Wzjg9sL7+eNvUvgiy9Tr +dDsHturerN0iLY2T10pUf/RyYPcH/XPxftLozVAtjpjhwInNNuyun9LoPqDW +aatFAKmqk8THK4MMK9ey3WsIKJHcPGe4QgajmtvjEnUJ6OnyKTu3SganeqK/ +XzciQMM5Qs3ZWgY/kSrIoWwCmjfeWPoiUwYtX9ZHXthMgNtdjZHFmzL4VfRW +n7E7AWPCRff1S2TwrlrT+g5PAsQ7qqLPNsvg5qwLaz76EOBn2z7m8FUGy35b +7CSCCViwnO18xpTFG795dYZiCEgriClesJTF/XZG53mOcJ+/lOeknrMsXhPv +kSXFEmD/SMjsTKAsapOvHycnEHDFQqXSPlUWkyiyyqLJBKy7mX/2cIYsqptU +Fk+lcOfLpxNyJ1cW5XujdzxNJeDLA7KmMCGL/1zX7t55ngAa2qU/HZLF9U1F +n6wyCei48WL/ny+yePblH6nxK9z5Lro66czIYt8Bo9iT1wg40ei3PFlQDn8M +xEgU3eDmixl5yNZQDi3SYvem5ROw69of9xiGHAqnfK7/WcCN70+cSdEGORQb +/eHhWsiNpy55YvkWOdRZfzH+TxEB+01zfNvi5XCg/+h/X0sJsM0WnbFLkUOG +zZZNvOUEqC07fLLzkhwqLLddLVZBwItXbuXdhXKYX/jqg3wVAYWMhxvcKuRw +V6del1Q1AbG5hm976+Qw+bms6nIONx+hwvyDnXKYuo/+dYAgQODNwXS/XjmM +NLTe1XiPgH7WJ52Rd3JoInbOJaOGgOQVzZs/z8hhW9L1HbQ6Aj4XRBX8IMlj +iVJT95pGAu6LfKQf0JDHXTXl3a+5vhzh8nxOTx4dh2vsD90nYIO53q+/KI+a +OgYVFU0EKN6+khJrK4+xrpzc9Q8ImFkpqMq3WR49JROkXnCdO/DeZlmQPHqv +Zyd2NxNwcL3T4KlQedwduSXJroUAp+KGcOEYeZSplpNo4FpbQmfZ2QR5vH/5 +8hrthwQsRmdcFT8jj9StM50pXPcMCRhcvCyPatObl3zlusRy/0OZbHmc/jLw +1PwRAcfvDntk3pZH+yhi9UWuvaUcJhQq5bExXJg0xLXxobpjWfXyaLVJKF/9 +MQFC77VlVB/Lo4neu/ZtXL+3vlx087k87i1tOZPJdU0pP2j9J49s1U/f2rlO +kwnrLnwvjz99E6ZnuQ4+MhikMy6PR/q7rpCeEAAf7P7enZXHZxkSn2lcy9jV +pBkscvOrGT/gxPVEuZZmpSAJIXv7EX+uH8pdrCFLkPBi6Z+2PVxfi+V1uKdA +wnXx5x6Fc71/dO97uiYJS57uDQ/j2nZjf2TDOhJubR7q2sm1WpXNCqSRsFzR ++IsX179JxI1mMxJOidYSVly/OKZhssGOhDesW1GP61ufz7U+2UxC7R+VScJc +H3Vc9Lb1IWFc0evkj9x43Dgh3zuCSLgr8aTLPa71lN4edwwjIWXJ2oFErpck +WpG6YkjoqERaZ8d1/1hVyeZEEmbr11mt4LrSWc3izRkSkgXCdR9x83363tk3 +nukkbHiePxjN9bZVC7v7s0m4VKvJT4trWtIuHt8iEh7k1at+xl3PT5s2rAlo +ICFduHZwOdeNtRUNo49J6CzQeC+LWx+XVVVcdr4goZ5E/149rtd/m4/ZO0JC +pyarg7T/15f1xbUPxknokpMdTXDrryRH763kTxL+ondeMeBabrOfaY2gAl4h +yTuLc+t3493fn1dIKKBA8MyXaG59xy+9kOGjoIAu0Sqlb7n1P37v0Rz/OgX0 +nF54ktJAgKqE7y03qgKyZY6qDNRz87X7l9ttVMDCoPGS1Vw3KelwHDZxx8+z +iiquJeBCfFpEZrQCrq5zm9/D3Z+tfWs0xo8p4CHFDMs07v79a9LSzU5WQHGv +gP473P2949Os0YfrCrik/tzkq0oC6PZe39e1cMcf8poe5vaP99Jaex+KKKLz +ivfVY9z+I7vvvpKsrCIekT3QVsHtT/atHs92qiji2hgLxwN5BHBiknVXGivi +neU89V9yuOsxNDXm6aGIMzY+29O4/c7odl3Qt1xFrKPX0N+kERDE5yprfkcR +9f5dKLE6y61Hr8nHF6sVkblT/37FGQKWiqpq0VsVsV8g6UH0aQLehid9SJxQ +RCFQSX/I7dfHmM7bSDQlPP3t1eTWAwRY+2T9oJor4eUHIyuc9hMgGvc1wdVe +CTf9SBNghnHHbzlekOanhMx6neu8ewi4Z1v7dekpJTyx/XqzRQABUx7qkdP/ +KaHO3D+ZW84EEDGhy8Q/KGG8qmwFzZFbv9caMtZNKqFbiWPAQ3sChIfd63by +KeMX9jKldisCVgel8AyvVca7UmzrsywCfA7Mnu44pIxnHMkv+bUJ0Ew3Vxw7 +rox5GxezaZr/X++zd5elKePxcOeHQWoExPxd88I8TxmrFz9IVSsScCnBR7qm +QxmH2hJthMW575NzT27kK61Czo0H28t+cb8HSjKrjt5fhbarzB6Ocd/n6990 +Lky2rkKNdUb0u00ccOBZYuXbtQplaop0dzdwYLvL3v/g4yps5mFd/I/DActD +qrFxAiqI1IC2uNscCF3186aZjgr+UTpd9OcMBx4G3ZhoiVTBywvrd9Zu4kDI +r+9xrSKqyPosrSXbXQ30sB0yoxKqKHrHRCCqsxoEx94W88up4rmbNee72qoh +v6+lh62mirwxHu2Hm6phsPGSbjVFFds1yjSz7laD43HT3hxfVbx9S91b7kQ1 +GEkc0z9UropxmcrOy6nV8FtHbFDPVQ3H2lfOv0yuAmbxnezLl9Vxs4THgQ+y +lfBdwtbPrVkDAzw3vZbLKocPKX5u4cu0cP+PU6ZB70vB5luUzUfKahzczC7R +59yB8e2C+6titVHvyOQ1M+fb3P8BWb4TzWtQffFHkotCAUg800ot+7YWn8Ws +fuJmeRMUT5Y6USi62L70dvJ8SDZk6JiKSQbpIbV0TcH44lVoJ5mRp8+tw7th +5qfOVacDXbE5Tb9HH5eMuA/kXLoAovy5EdviDTA/S0OMYZoGysdWMT21DPFD +ub6tgd5pWK7pzXF5YogHqjaQjv9OhF3yYFvcZogWNfzyTz8lQruI2iB/hyFu +9C0XUOpJhJSfnwSqXxjiobSzlz5UJIJo635X2beG2NA0s4xvTyJI7E6e6Rs3 +xKU+A3NhIwmgWF5rFChhhLHiRY/5/4uHdSz50qitRhi/w77jv49xUKm+8w+f +nxFGu//krXwdBzShGqtUfyMUO13RlvEoDszfeAznBXHPB9+YPZUfB25hGeJd +YUZoRB4Q4tsRB7H5shG6SUbY++3LihNdsfBCRMb0XYkRZuY2CDV8PwLhgxIt +tjzGuP704hrpyBhofezdUMRnjPNXKxd3b40B5dICQkjAGBM8Dk++Xh8D7bH0 +O+3LjdFq47GJ95IxoKbqf8lW0hglXi3bOFxxEF5uLw+y1TLGudml+31nosHg +i6Owrb0xatReztU6HgXfplNcbTKMsWpkMi+9LwL6e3Pcrl8xxkIdad62JxHQ +3sBx/37NGM9kzoJQVQTknRj2zMwxRvt4caxPiYAtCiY+X4qMUZXpbzbAjoBH +5n07TjUYY5piq/CKgv1w9dya6Lb3xqhwcXrrq9hwsNJ/fMVGzwRLjh0PJ/mG +gsdS680v9E1QZMp68NrGUNg10CbibmSCk1eP2uozQyE1+VlcANUET5uR5hLk +Q6Hn06sdsWYmyDj35GnP7X0QkD1iVO1qgsI6A1ecr++FeHHepypHTVCnzzVM +5WoINE4z/sx1mmDtD3HlHRPBkNNB+G96aYK7f7xbTO8OhsR84/aSbhPUXkgU +fVcTDDbuOpmBvSbIlPyx715SMLyqJVG735lgo2BVRIxqMIwd+x1eMmOC5rn7 +VrO8gkBGjBgLIJFx6Q3zaruhQPj92cilSZGM2e0/0y1aA6H/QUmNwioyvhBM +ynUqD4Sc/QUnu9TJKNESM3U7IRB031zSQj0y9grQa93XBIJ5VoS/ApJxLnNZ +2PnoANira/T2ZSAZb8nGO8hrbYcDc6R532AyNvfM/htauR0ON/OTJneR8cbN +jRsbfvtDssdrT6FQrnljouue+UNhYvR/5jHc57nX/W2J9If3/Y29lalkdH6+ +6+hsxzZwO2P35hJBxsZR4tyWU36w1cNkTr2WjMrXhtxeHvCDAHUl2Yp6MhrM +a0R4+/vB/ppJt84HZPwxJRBWyvCDtI/nepZ2kPEpM0/uzKAvtLN6X0cNk3GP +OXpurvIB1mTAK8/lFLxkr5qdfdgbZOqscutXUDCpJ9Y739sbJk+sDV0lSsGG +worRNqY3ZKlOrfgoQcFRnbn5sAUv+Lf5kEWoIgX59aQtGHFecL/uXEWSPgV1 +hwqPX03eAmanGtMqXSno8Y2SP3TPA0huOT4yHhTk2/xT/s41D/ihlqh7cAsF +D9Is9C7FeUBuvU0r25eC5LrCZ/XWHsA39WqxLZiCau4zdr5v3aHF7eve4UMU +ZLCc1fv53GGDhtxGkVwKgmhG/MpgV6iaeKQakEfBRrsDDQ2OrqBB7P9ZW0DB ++1nrCxKprrDE9vmN4GIK1qy5qeu9zBWa9yX9aKmi4Nuxx3X6hZuBXTeTHvOE +gkeufU92m9wEFJeX7z+NU1Bq2o9PMsUFChRiCfY3ChqFkJ+URLqA9EfdlEvf +KfhOzb7Yb5sLzESdJFv85Mb/6Hv8UqoLVFyHk1mLFLxyc9jBY8QZ9L/c1XOV +oKLJg+4YfnQG7bjT0c1UKoJp+/C0oBPUM/IF7OlUNGNP8hp+cQSnufvnXzOp +KKA486iwyRGi987e+WxGRU54n6p6qCO0evu9E7WnYjWjfB37pQMEm1Jsvfyo +qF9gxhy9uhFu/3inMHOSinOi7ebtznbALvlbeCSZipGumd1n1tlB105ZyrJU +Ks5O/QqNWWEH88P2TqQLVFzmFabT+cgWbJ8TiXidioNRHYpeTFsYKz4zkVJO +xYdd2rafDGxgbaDpfc233Ov9tzhVUKzgrJrDfEI/FYttBlMdSVYwM+RPfj9I +RbVsKQvhf5bQuCWlOGuEioyTz8+PPLIEF6ehdNkJKoZcNY5b6m4JBxnHQ5fz +0HBN2kIgf+wGaBV/qTqhSUM/wb5m4Y8WoPf8o7edNg2jEl0jfTss4HzKfPrt +tTRU+fZ04VmlBXgv0xDdoU/DTr/9pH/xFvDtb+T8II2GgeX/km+pWYDMZ8Xu +F3Y0TD7ndXNZkDkENgYnVoXR0LT5Y60FvxlM7hmL2hBBww/2v79IjiNEK4Xs +7omk4dHtS8d4XiOcPrzP5dchGs6HXhs0uIVQRo9UYSbR8NWqsbUf7RH+chLq +W67QcEnnqr2CDIDzpVkzXS00dDfn1z2fzwRFX5XP2x/TMHJ9Y+TUESbki+b2 +zbTS8JmZ96c4Nybc25PfLNNJwxCtFZ5UQSYM6NxJ29JLw3Efh20zexigXVij ++36chkKbdrcfNafD/exXAd+lTTHe5U/9VlEaDNur+kbKmeLD+GyOyQQVeH7v +8fxDMsWWwtzr5A4qmDsvcxBQMUVxuBNZdZoKj3npVPm1pjgTQjbOWU6FDv8b +y83Ypmgr2OAlupICbzV2laTtMMWdaZUZfykm8OcFp1B6pyl+ye6euEcyAcUj +/Dev7DbFauWkq5n/jGHr62vpeaGm2MYw9Hzy2BiGjz+PuxdjijZ2J7ueexjD +p1GTTcOppthwF8ZCE4xgpnBxTp8wxaaoHXYD3w1g1M0y+1SNKc7O51WF9xlA +75Iz1iN1pvhDJOGA+iMDqPMjZV5uMkXfWdWkngwDiJcj0xfaTLHP2DQn1swA +xE7uOtzeb4rkTwWkk/r6oBv0mieQj45hVVVlV0t0QVla8XbjEjq+iN9qo3tS +F8Ra/J3lltHxZWZJzPg2XZhWnsp5uoKO5j0RXfPSulDbI2RhJE3HqM9L02zi +dMDaEo8vrqajdk8E59jWtbBds3j5lY10nHz8OG2epg0xj3x2aTnRsUZTbJO7 +tDakBUo8rXChY+b9/rwP31dDff7BlKfudLwwxlqWVrwapLSsVy5so+Oi4g9L +ddXV8Fjro5RfJB0/hejEC0prwVrtVSpaN+g45xNuaqasAdjaFVeRQ0f3Jav2 +I48GuAUnvWPn0VHg7THyzvfqkFA4ket+m3t9l3sC5ZY69GvXa56qpOMS+6CM +WiN1SF3jqTP+hI407XhhprMafF97gVIxRUcGx6mqvUgFejtwg+Q0HV1I5kIb +LqhA097JTRGzdHzaucNs8JAKpFbYhFHm6Zjn5X8/ZKMKrKXz3KnlZ+DV5ZWT +X0dWgb/NHtUWGQZ+VBqKNT6mDK+CrIRfMRkYOrzp4PZRBahbPksiAwOdDz/r +TGpUgNzi3DWXzRioPHWHNnRZAUK/LVh6WDLQ/PVvy3XWCiASVXWs35GBrgNZ +tuy7JLBMUp374M/Af09SiMk4ebiX9+fd7EkGPhddcP5oLwsUi4g522QG8t8r +UurXkYXqd+PC2WcYWJaL+f+EZKFCeZBqe56BfvFlko/bZOBORtOZrKsMHH0h +UOxhIwPZKcdNrUoYyI732OnrJA2nIlaey+hm4Kv8sLoLhyVBUPJkwcRrBl4W +fWN2w08Sksp56s17GTiw66bti/WSkDj5fXS8n4EVf9avzRWRhKPBr5hmowx8 ++uy2Ik+OBIR7Z37+8ouBu86O2h3pFIct69WRoczEHSYZo7YWYrDwSlC0RYWJ +ngUWU2VrxCA7cLLPVp2Jwqkb6pliYjCaVBO1RZuJva1Pr56qWwnhbY6lB42Y +2O4qfFZtVhROOxxWvmfJRLaYRuPQARGo9Xj912QfE7sWVSs+FAnB1i+17fVh +TBS677Vje5wQ8MRkZ6yPYOKKhJ2lqm5CYHl1t8nmg0wsYdtle/EJQdcAb8j+ +BCa+HDaKqtu6HMb81/WVpzMxs95Ob3iVICjsOVGzromJJyXifh9+LgCpizvI +yc1M/Ly09kpeiQDwnbcs//SQO58/rrXzZwRgjCNwO7uNicaM0jjDjQJQy5OY +IdHNRBmTvDPNz5bAlotxUT8/MjGHs72c/YYfMuoOkhtXsFCRs40jIsQHwg6e +5SRRFqKmlfbFSV6IG6bpRYmxMDD1yoJZNy8EC/zSMJBm4akHxTyS13mB6hgp +lavMwiVWUJNoxAs978OnjxuyMMKf1zomgAekhULKN7qzUFnUYPH24wV2nsWR +mClPFtIgOurwhQW20ZFUiwveLDTZI/Imx2+B7TBV9rp3Gwtv0J+4j/z5y07q +mf29PYSFNtl3eowpf9m/cmPNY46xcG2xaWl2zTz7LeNCd0ExC89r/r4Z82uO +HXwg75pNCQunj2j+aumcY/8sqQ4cL2NhRVl8u3P+HFtCrXfOkMNCq9rUDaab +5th2gkqKDU0sdE/fRNWt+Mmuf1UQ0P2aha5738xZH55l24re04vsZWGLsbdi +kdssu9eq7adcHze+wch9Noaz7Jnaryd9hlnoRdxXMfs0w9bLMbj7ZYyFWRsu +WQu5zbDr35pFpkyw8GHt70gXoxm2rdQm0J9ioaWD0/Br0Rn2jhMHXkbMsnBX +1uh0Sus0e6Yp6YrsLxY+UI76dD9/mh0/n769dp6FIzOZhboJ02wxk9u6Wxe4 +400yBrr8ptlZe2pnFxdZ+Dy8XaeCPc3+H+kkL/8= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09288708995291792}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNVYZe68jV67CG8D/aFxwzUMyYvhvIZHGKXBIjt +27cOyudwcKxf6N4zbzOUL+CwZYqO+sIvW6F8EYfmZaphbsrboXwJB4HXvVGJ +v7ZB+TIOZQ/mCC7dC1Ov4LAhUk967meYeUoOV1+LNW7ctxHKV3H4bKssKHUQ +Zr+aw08hLYs9CqugfA2HftmQR1bHlkL5Wg6PQ7ITxW4thPJ1HCax+jy4dncO +lK/ncMXD++lbjulQvoGD2p8g+3ytSVC+ocPjHCumHZGw8DByWFO08NP6p61Q +vrHD5i3BxTsPNkD5Jg79fasnxmZWQvmmDrHGP9NmSxdD+WYOL7kVn/+tz4Hy +zR0CltvsEhRLhfItHD6fkOex+R4H5Vs6bFxyp7avPwzKt3LoUrScuSM0AMq3 +dtA62ndsYZ07lG/jMG3SU5Up+xygfFuH698fKiieMofy7Rx6325d8P2YgT0A +fhiGdQ== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.090382}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09288708995291792}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.993832747125758*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"e4435438-2588-4789-a74d-5fd618f2c6d7"] +}, Open ]], Cell[CellGroupData[{ @@ -8846,18 +16245,14 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], - -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[BoxData["2.227939500611314`"], "Output", + CellChangeTimes->{3.993832805778373*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"65de811e-a611-4743-9354-b01dc13050b5"] }, Open ]], Cell[CellGroupData[{ @@ -8924,27 +16319,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850391956293*^9, - 3.9918503966918755`*^9}},ExpressionUUID->"a3e3d205-e3b4-874a-a36c-\ -53cfa72184b4"], + CellChangeTimes->{{3.991850391956293*^9, 3.9918503966918755`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.463475750551175`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 65, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832805808547*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"974c8d03-79a4-4d21-847b-9629b419d97a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0321010054469777`*^-77\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 66, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832805814877*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"5ce1f4cd-0997-46e3-9412-4569fb94e59b"], -Cell[BoxData["1.0713232818739324`"], "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1256249960619612`*^-78\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 143, 67, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832805820416*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"2da36458-5663-4f1f-b854-e1ab8f5c30fc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 68, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938328058252087`*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"967e722c-65a9-4c19-8803-467a127bcc93"], + +Cell[BoxData["3.8500820430586735`"], "Output", + CellChangeTimes->{3.993832813631818*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"dde45f09-eff1-4086-9bf2-8acfe26469e9"] }, Open ]], Cell[CellGroupData[{ @@ -8965,8 +16411,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9011,27 +16456,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504007528324`*^9, - 3.991850403970867*^9}},ExpressionUUID->"6977f025-454e-0e4a-b118-\ -07bad9ba3e82"], + CellChangeTimes->{{3.9918504007528324`*^9, 3.991850403970867*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566a849f-fc85-4d42-a545-a46d44cf7346"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.463475750551175`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 69, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832813656127*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"d79ffc1f-7cbb-4420-9e3b-89c9537fb457"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0321010054469777`*^-77\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 70, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832813660905*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"db99c7c8-56b9-47ca-9c39-726d9bf3bdba"], -Cell[BoxData["5.515504100347031`"], "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1256249960619612`*^-78\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 144, 71, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938328136651917`*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"dd9cb203-de23-4b28-8592-4ab66a2d7a1b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 72, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832813668927*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"2e70867e-fc16-47db-a18d-604971b8b562"], + +Cell[BoxData["18.295895701492967`"], "Output", + CellChangeTimes->{3.993832821455508*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"6f6222b8-45bb-4da1-bc45-86a9371ede1c"] }, Open ]], Cell[CellGroupData[{ @@ -9052,8 +16548,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9098,27 +16593,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504078476295`*^9, - 3.9918504110344543`*^9}},ExpressionUUID->"df8ecb01-788a-604d-b773-\ -f29bb610eb30"], + CellChangeTimes->{{3.9918504078476295`*^9, 3.9918504110344543`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.463475750551175`*^-77\\\", \ +RowBox[{\\\"\ +800341747171406159395370339778860276170835235877560863454478695756775\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5664743933456240106855236135550976000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 73, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832821480764*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"63167a5a-26cf-44a4-a797-c3c007a55dc0"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0321010054469777`*^-77\\\", \ +RowBox[{\\\"\ +512218718189699942013037017458470576749334550961638952610866365284336\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4361174119936683873511267526246400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 74, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9938328214851847`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"7c104b1d-ca09-43b3-b223-b8152eaeda96"], -Cell[BoxData["17.107550304528036`"], "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1256249960619612`*^-78\\\", \ +RowBox[{\\\"\ +336066701004262131954753587154502545405238398885931316807989422263053\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3663400904582894107426239702630400000000000000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 145, 75, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832821489505*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"39300c0d-9c97-4c31-ad24-d0d72fce34c6"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 76, 25990557938932473318, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.993832821493444*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"abc26cc3-27c8-4072-b4aa-970204f81120"], + +Cell[BoxData["1.119033816430286`"], "Output", + CellChangeTimes->{3.993832826266573*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"d215678b-5f87-4dbb-a4ef-1e8da40b64f8"] }, Open ]], Cell[CellGroupData[{ @@ -9127,17 +16673,26 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918504490520267`*^9, - 3.991850453720993*^9}},ExpressionUUID->"54a5e329-20bd-e742-afe8-\ -d2cfa007cfcf"], + CellChangeTimes->{{3.9918504490520267`*^9, 3.991850453720993*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[BoxData["0.11028946354837708`"], "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] -}, Open ]] +Cell[BoxData["0.850886318908469`"], "Output", + CellChangeTimes->{3.993832826286248*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"16600dd9-5874-4769-a3a0-6f0383baad67"] +}, Open ]], + +Cell[BoxData["ss"], "Input", + CellChangeTimes->{{3.993828678967884*^9, + 3.993828678990304*^9}},ExpressionUUID->"c7f7047c-c0ff-4b07-94d6-\ +9bb08fef1c61"] }, -WindowSize->{718.5, 729.75}, -WindowMargins->{{6, Automatic}, {Automatic, 4.5}}, +Evaluator->"kernel 5", +WindowSize->{714, 258}, +WindowMargins->{{-3, Automatic}, {267, Automatic}}, CellContext->Notebook, -FrontEndVersion->"14.1 for Microsoft Windows (64-bit) (July 16, 2024)", +FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"f83c5602-f0d5-2d47-8a1b-23029521caf0" ] @@ -9152,359 +16707,629 @@ CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ -Cell[554, 20, 149, 4, 28, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], -Cell[706, 26, 154, 3, 28, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], -Cell[863, 31, 149, 4, 28, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], -Cell[1015, 37, 154, 3, 28, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[1194, 44, 1301, 43, 113, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[2498, 89, 178, 3, 32, "Output",ExpressionUUID->"d7904bcf-fc55-b844-b4d2-059d830f1317"] +Cell[576, 22, 449, 7, 29, "Input",ExpressionUUID->"fe3f2277-1272-4196-8405-df31b2cbaabb"], +Cell[1028, 31, 349, 5, 33, "Output",ExpressionUUID->"1a85a118-4fca-46d8-8501-82c72b1430f6"] }, Open ]], Cell[CellGroupData[{ -Cell[2713, 97, 908, 31, 56, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[3624, 130, 177, 3, 32, "Output",ExpressionUUID->"7c075ec9-a97b-ab47-b241-cc392b585c5e"] +Cell[1414, 41, 197, 3, 29, "Input",ExpressionUUID->"c7051a21-345d-441f-9bd1-0192959cec3f"], +Cell[1614, 46, 349, 5, 33, "Output",ExpressionUUID->"bf176a9e-e402-48be-ba15-e640453511a3"] }, Open ]], Cell[CellGroupData[{ -Cell[3838, 138, 889, 30, 56, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[4730, 170, 178, 3, 32, "Output",ExpressionUUID->"ddda4800-8c90-d44b-acfd-6ccb39eee852"] +Cell[2000, 56, 221, 4, 29, "Input",ExpressionUUID->"3841f7aa-eec9-451e-86f4-313baa01f6cb"], +Cell[2224, 62, 374, 6, 33, "Output",ExpressionUUID->"07b4af58-f180-4ed3-b355-67abb246b108"] }, Open ]], Cell[CellGroupData[{ -Cell[4945, 178, 558, 19, 52, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[5506, 199, 172, 3, 32, "Output",ExpressionUUID->"046d7438-d73f-9343-9ae7-b01adfd6d8f5"] +Cell[2635, 73, 175, 3, 29, "Input",ExpressionUUID->"6a1392c5-0467-41e5-849e-e195bf753a46"], +Cell[2813, 78, 349, 5, 33, "Output",ExpressionUUID->"1029d473-8a78-4cb8-abe2-ac6349db1471"] }, Open ]], Cell[CellGroupData[{ -Cell[5715, 207, 651, 22, 52, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[6369, 231, 167, 3, 32, "Output",ExpressionUUID->"d2928e96-58be-3a4f-8bee-5b9e193c2ac6"] +Cell[3199, 88, 257, 7, 42, "Input",ExpressionUUID->"a9ea2461-d2dc-4486-ac73-06c5eb55b612"], +Cell[3459, 97, 364, 5, 33, "Output",ExpressionUUID->"0fe5420c-c15b-46e5-a724-a3d84ce20efe"] }, Open ]], Cell[CellGroupData[{ -Cell[6573, 239, 170, 5, 56, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[6746, 246, 172, 3, 32, "Output",ExpressionUUID->"bf655ed3-7200-2249-b687-593ee351a598"] +Cell[3860, 107, 131, 2, 29, "Input",ExpressionUUID->"43f84b6b-62fe-41eb-974d-ad3c37278bdb"], +Cell[3994, 111, 347, 5, 33, "Output",ExpressionUUID->"da9430d7-4cf4-43b9-a561-0b490a29246f"] }, Open ]], Cell[CellGroupData[{ -Cell[6955, 254, 170, 5, 55, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[7128, 261, 173, 3, 70, "Output",ExpressionUUID->"56f5f06b-52e2-6941-b28e-41b961cb42e9"] +Cell[4378, 121, 276, 6, 29, "Input",ExpressionUUID->"6948bfd1-61b5-463f-9671-f2676aa3b53d"], +Cell[4657, 129, 362, 5, 33, "Output",ExpressionUUID->"3b7e11bf-4d36-41b4-b160-ac59069188ee"] }, Open ]], Cell[CellGroupData[{ -Cell[7338, 269, 181, 5, 70, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[7522, 276, 171, 3, 70, "Output",ExpressionUUID->"8c210f75-69a5-5340-94a4-65e97302ca45"] +Cell[5056, 139, 257, 7, 29, "Input",ExpressionUUID->"cbedb3cb-8aea-443d-9e23-50c589cb64bc"], +Cell[5316, 148, 359, 5, 33, "Output",ExpressionUUID->"4f9eb49e-8f43-4b6e-84e5-32aa5ab19405"] }, Open ]], Cell[CellGroupData[{ -Cell[7730, 284, 181, 5, 70, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[7914, 291, 172, 3, 70, "Output",ExpressionUUID->"bad7f5b6-1bd3-6b4b-87e4-44aee3a120fc"] +Cell[5712, 158, 223, 4, 29, "Input",ExpressionUUID->"706f1a60-0385-4b9b-8bc2-f92853732756"], +Cell[5938, 164, 330, 5, 33, "Output",ExpressionUUID->"b60659fd-bbb5-4940-a5a3-f097b9404db0"] }, Open ]], Cell[CellGroupData[{ -Cell[8123, 299, 6055, 185, 70, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[14181, 486, 174, 3, 70, "Output",ExpressionUUID->"ffdf2eb3-13bd-724f-a87b-fb40655ae9c4"] +Cell[6305, 174, 228, 4, 29, "Input",ExpressionUUID->"43d50480-eee6-4f73-a871-c8f8b32193a3"], +Cell[6536, 180, 329, 5, 33, "Output",ExpressionUUID->"555babeb-af49-44c1-8a7c-cd38fea2db03"] }, Open ]], Cell[CellGroupData[{ -Cell[14392, 494, 368, 9, 70, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[14763, 505, 172, 3, 70, "Output",ExpressionUUID->"609425d6-cf9c-7a45-bc21-030ca3aa1290"] +Cell[6902, 190, 129, 2, 29, "Input",ExpressionUUID->"c84f5eca-a69a-4902-8a52-d9c93d93b660"], +Cell[7034, 194, 343, 5, 33, "Output",ExpressionUUID->"6f55594f-fb40-498a-bced-7f43007466e1"] }, Open ]], Cell[CellGroupData[{ -Cell[14972, 513, 6122, 187, 70, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[21097, 702, 175, 3, 70, "Output",ExpressionUUID->"b20cbe94-36a3-8548-a61e-959a25814c62"] +Cell[7414, 204, 129, 2, 29, "Input",ExpressionUUID->"ce6fddb3-150a-41bf-8808-38104d7f681e"], +Cell[7546, 208, 342, 5, 33, "Output",ExpressionUUID->"b9084075-f96e-476f-a1ee-f79f59aa7029"] }, Open ]], Cell[CellGroupData[{ -Cell[21309, 710, 368, 9, 70, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[21680, 721, 172, 3, 70, "Output",ExpressionUUID->"4fc2e2c1-457d-3d4a-a5b7-180877c6f370"] +Cell[7925, 218, 557, 19, 79, "Input",ExpressionUUID->"4b72cf2e-6b4e-46cb-9647-63e93ecdd943"], +Cell[8485, 239, 366, 5, 33, "Output",ExpressionUUID->"b8dfbad8-be84-4d90-a2a7-24242b815684"] }, Open ]], Cell[CellGroupData[{ -Cell[21889, 729, 2663, 88, 70, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[24555, 819, 171, 3, 70, "Output",ExpressionUUID->"08fcefa1-a87b-bf4b-998d-0c9017752dd4"] +Cell[8888, 249, 557, 19, 79, "Input",ExpressionUUID->"43a43bb0-0963-4c43-a56e-dc76e8485867"], +Cell[9448, 270, 370, 5, 33, "Output",ExpressionUUID->"80eca207-22de-4cb7-82df-81b3dd13695a"] }, Open ]], Cell[CellGroupData[{ -Cell[24763, 827, 2603, 85, 70, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[27369, 914, 173, 3, 70, "Output",ExpressionUUID->"5678b502-e98a-5d4b-9c03-fe98b2cc6f78"] +Cell[9855, 280, 1492, 48, 79, "Input",ExpressionUUID->"4c689c79-41c8-447b-9a6c-4e58c6148ed0"], +Cell[11350, 330, 362, 5, 33, "Output",ExpressionUUID->"859388df-54a6-49d0-9892-7d74c8d23f12"] }, Open ]], Cell[CellGroupData[{ -Cell[27579, 922, 3712, 118, 70, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[31294, 1042, 174, 3, 70, "Output",ExpressionUUID->"d74c1470-6eae-4841-b978-069a86bca67d"] -}, Open ]], -Cell[31483, 1048, 138, 3, 70, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], -Cell[CellGroupData[{ -Cell[31646, 1055, 2054, 59, 70, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], -Cell[33703, 1116, 559, 12, 70, "Message",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], -Cell[34265, 1130, 560, 12, 70, "Message",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], -Cell[34828, 1144, 565, 12, 70, "Message",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], -Cell[35396, 1158, 456, 10, 70, "Message",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], -Cell[35855, 1170, 170, 3, 70, "Output",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[11749, 340, 1331, 44, 79, "Input",ExpressionUUID->"a7cc9c4e-50ad-42e5-9ca4-1804de347598"], +Cell[13083, 386, 377, 6, 33, "Output",ExpressionUUID->"f930b250-7e82-4225-8e35-6c8dd88fb5e1"] }, Open ]], Cell[CellGroupData[{ -Cell[36062, 1178, 2054, 59, 70, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], -Cell[38119, 1239, 559, 12, 70, "Message",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], -Cell[38681, 1253, 559, 12, 70, "Message",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], -Cell[39243, 1267, 565, 12, 70, "Message",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], -Cell[39811, 1281, 458, 10, 70, "Message",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], -Cell[40272, 1293, 170, 3, 70, "Output",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[13497, 397, 1331, 44, 79, "Input",ExpressionUUID->"0510d64d-4469-49cd-85bb-841516c5f48e"], +Cell[14831, 443, 386, 6, 33, "Output",ExpressionUUID->"835907cf-8fd1-4fa8-a549-fb584a9e2f8c"] }, Open ]], Cell[CellGroupData[{ -Cell[40479, 1301, 1938, 53, 70, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], -Cell[42420, 1356, 20196, 379, 70, "Output",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] +Cell[15254, 454, 1492, 48, 79, "Input",ExpressionUUID->"dbfb9276-36dd-4280-8f2b-4ab001add74a"], +Cell[16749, 504, 357, 5, 33, "Output",ExpressionUUID->"50ef223b-bef8-4629-9271-f450d491f68d"] }, Open ]], Cell[CellGroupData[{ -Cell[62653, 1740, 2094, 60, 70, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], -Cell[64750, 1802, 503, 11, 70, "Message",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], -Cell[65256, 1815, 505, 11, 70, "Message",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], -Cell[65764, 1828, 506, 11, 70, "Message",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], -Cell[66273, 1841, 455, 10, 70, "Message",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], -Cell[66731, 1853, 55770, 961, 70, "Output",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] -}, Open ]], -Cell[122516, 2817, 232, 6, 70, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], -Cell[122751, 2825, 209, 5, 70, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], -Cell[CellGroupData[{ -Cell[122985, 2834, 217, 7, 70, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[123205, 2843, 173, 3, 70, "Output",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[17143, 514, 131, 2, 29, "Input",ExpressionUUID->"770160cf-fcaf-4f83-8f80-882c1e845ddd"], +Cell[17277, 518, 349, 5, 33, "Output",ExpressionUUID->"044ff085-fefd-4d1c-a8a7-0866110b3b29"] }, Open ]], Cell[CellGroupData[{ -Cell[123415, 2851, 1814, 53, 70, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], -Cell[125232, 2906, 506, 11, 70, "Message",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], -Cell[125741, 2919, 508, 11, 70, "Message",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], -Cell[126252, 2932, 509, 11, 70, "Message",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], -Cell[126764, 2945, 458, 10, 70, "Message",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], -Cell[127225, 2957, 24818, 454, 70, "Output",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] +Cell[17663, 528, 133, 2, 29, "Input",ExpressionUUID->"d926bcc2-f3f2-4c8d-ab63-6b161bb968c4"], +Cell[17799, 532, 348, 5, 33, "Output",ExpressionUUID->"5e9059a7-cf52-4341-85ca-5a5a00554d88"] }, Open ]], Cell[CellGroupData[{ -Cell[152080, 3416, 1616, 48, 70, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], -Cell[153699, 3466, 582, 12, 70, "Message",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], -Cell[154284, 3480, 588, 12, 70, "Message",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], -Cell[154875, 3494, 590, 12, 70, "Message",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], -Cell[155468, 3508, 458, 10, 70, "Message",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], -Cell[155929, 3520, 171, 3, 70, "Output",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] +Cell[18184, 542, 134, 2, 29, "Input",ExpressionUUID->"20f02384-fea8-4fe3-b0ac-bdf94709760b"], +Cell[18321, 546, 352, 5, 33, "Output",ExpressionUUID->"56ee318b-e9e2-4408-bb5a-99f63130c424"] }, Open ]], Cell[CellGroupData[{ -Cell[156137, 3528, 2251, 64, 70, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], -Cell[158391, 3594, 557, 12, 70, "Message",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], -Cell[158951, 3608, 560, 12, 70, "Message",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], -Cell[159514, 3622, 565, 12, 70, "Message",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], -Cell[160082, 3636, 458, 10, 70, "Message",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], -Cell[160543, 3648, 172, 3, 70, "Output",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] +Cell[18710, 556, 219, 4, 29, "Input",ExpressionUUID->"f58f6553-910b-4750-9299-6937693aee22"], +Cell[18932, 562, 363, 6, 33, "Output",ExpressionUUID->"c08f9265-914a-47b8-bda7-741b85a6f3f7"] }, Open ]], Cell[CellGroupData[{ -Cell[160752, 3656, 2218, 64, 70, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], -Cell[162973, 3722, 559, 12, 70, "Message",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], -Cell[163535, 3736, 562, 12, 70, "Message",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], -Cell[164100, 3750, 563, 12, 70, "Message",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], -Cell[164666, 3764, 458, 10, 70, "Message",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], -Cell[165127, 3776, 170, 3, 70, "Output",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] +Cell[19332, 573, 134, 2, 29, "Input",ExpressionUUID->"4c60fe38-a578-4498-b0ab-20d340e7a82a"], +Cell[19469, 577, 350, 5, 33, "Output",ExpressionUUID->"5ee0e59c-c5f3-4976-96fd-d3b269fd900f"] }, Open ]], Cell[CellGroupData[{ -Cell[165334, 3784, 2221, 64, 70, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], -Cell[167558, 3850, 559, 12, 70, "Message",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], -Cell[168120, 3864, 562, 12, 70, "Message",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], -Cell[168685, 3878, 563, 12, 70, "Message",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], -Cell[169251, 3892, 458, 10, 70, "Message",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], -Cell[169712, 3904, 171, 3, 70, "Output",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] +Cell[19856, 587, 327, 5, 29, "Input",ExpressionUUID->"71e312f3-b390-49c7-b390-54c8629cf2b5"], +Cell[20186, 594, 346, 5, 33, "Output",ExpressionUUID->"ce6bbd63-7f57-4426-948d-fb254f21efc6"] }, Open ]], Cell[CellGroupData[{ -Cell[169920, 3912, 213, 6, 70, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], -Cell[170136, 3920, 173, 3, 70, "Output",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] -}, Open ]], -Cell[170324, 3926, 245, 5, 70, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], -Cell[CellGroupData[{ -Cell[170594, 3935, 558, 19, 70, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[171155, 3956, 170, 3, 70, "Output",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] +Cell[20569, 604, 296, 5, 29, "Input",ExpressionUUID->"52d6569b-97df-4fec-a599-f2861bdcade7"], +Cell[20868, 611, 345, 5, 33, "Output",ExpressionUUID->"17b730de-3285-4587-b012-bfc3c3d85427"] }, Open ]], Cell[CellGroupData[{ -Cell[171362, 3964, 170, 5, 70, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[171535, 3971, 173, 3, 70, "Output",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] +Cell[21250, 621, 219, 4, 29, "Input",ExpressionUUID->"13fde7f1-fd2a-49c6-bf5b-6c06d1182783"], +Cell[21472, 627, 340, 5, 33, "Output",ExpressionUUID->"9cde789c-c9ea-4d08-a652-89aeabd87cd1"] }, Open ]], Cell[CellGroupData[{ -Cell[171745, 3979, 181, 5, 70, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[171929, 3986, 171, 3, 70, "Output",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] +Cell[21849, 637, 350, 10, 42, "Input",ExpressionUUID->"b7f2a7f4-dd06-4f76-82ec-528173bf32f8"], +Cell[22202, 649, 371, 5, 33, "Output",ExpressionUUID->"791aeda3-eeff-46c3-a6f0-2d35b1b0f17a"] }, Open ]], Cell[CellGroupData[{ -Cell[172137, 3994, 6055, 185, 70, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[178195, 4181, 172, 3, 70, "Output",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] +Cell[22610, 659, 350, 10, 42, "Input",ExpressionUUID->"3826620b-7675-4ffe-a7e1-c61ff7679276"], +Cell[22963, 671, 386, 6, 33, "Output",ExpressionUUID->"325adb0b-109d-4778-bf38-7463f6f48657"] }, Open ]], Cell[CellGroupData[{ -Cell[178404, 4189, 368, 9, 70, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[178775, 4200, 172, 3, 70, "Output",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] +Cell[23386, 682, 994, 26, 81, "Input",ExpressionUUID->"74804ca6-8841-4499-8926-7ca99d8e59de"], +Cell[24383, 710, 361, 5, 33, "Output",ExpressionUUID->"336c2371-a464-43cd-ad12-d3e2d9fd9bdd"] }, Open ]], Cell[CellGroupData[{ -Cell[178984, 4208, 6122, 187, 70, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[185109, 4397, 173, 3, 70, "Output",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] +Cell[24781, 720, 199, 3, 29, "Input",ExpressionUUID->"4beca30c-a272-418f-8bda-a360e9946021"], +Cell[24983, 725, 344, 5, 33, "Output",ExpressionUUID->"d7276474-fde6-4c22-b424-b09b2921adfd"] }, Open ]], Cell[CellGroupData[{ -Cell[185319, 4405, 368, 9, 70, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[185690, 4416, 170, 3, 70, "Output",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] +Cell[25364, 735, 325, 5, 29, "Input",ExpressionUUID->"0eb2b933-0b2a-4112-9fc7-ac3e946075c5"], +Cell[25692, 742, 328, 5, 33, "Output",ExpressionUUID->"2ae952ec-2c15-4bdf-bd08-81a0e60bc07e"] +}, Open ]], +Cell[26035, 750, 173, 2, 29, "Input",ExpressionUUID->"efd99408-9261-490a-b04a-1e50202c946a"], +Cell[CellGroupData[{ +Cell[26233, 756, 327, 5, 29, "Input",ExpressionUUID->"093d7718-dfdd-4e43-9b09-be60eb4eb0b7"], +Cell[26563, 763, 319, 5, 33, "Output",ExpressionUUID->"8f66b9e8-b8ea-44c4-858a-869fa3115d31"] +}, Open ]], +Cell[26897, 771, 173, 2, 29, "Input",ExpressionUUID->"4e0b06ec-a188-4f85-86c3-922e5d92e17e"], +Cell[CellGroupData[{ +Cell[27095, 777, 332, 5, 29, "Input",ExpressionUUID->"ec66ca03-a2c8-4043-a9c7-34952b23ffd6"], +Cell[27430, 784, 327, 5, 33, "Output",ExpressionUUID->"29bcbc7f-01ba-4449-a406-5d62ff2388ae"] +}, Open ]], +Cell[27772, 792, 173, 2, 29, "Input",ExpressionUUID->"1d9b6449-7b08-4e77-a8c5-478311aee425"], +Cell[CellGroupData[{ +Cell[27970, 798, 351, 5, 29, "Input",ExpressionUUID->"0f2021b7-03da-4976-9aeb-8c46f01e405a"], +Cell[28324, 805, 328, 5, 33, "Output",ExpressionUUID->"6cd68675-affa-48db-a096-ee12717a9f72"] +}, Open ]], +Cell[28667, 813, 171, 2, 29, "Input",ExpressionUUID->"dd79ec79-ccd6-4356-ab60-a848f68579e4"], +Cell[CellGroupData[{ +Cell[28863, 819, 298, 5, 29, "Input",ExpressionUUID->"d69b26e3-7674-4a5c-9ec6-dc98784ee653"], +Cell[29164, 826, 326, 5, 33, "Output",ExpressionUUID->"949211d6-a029-43a7-9e1a-6d0119d07cbd"] +}, Open ]], +Cell[29505, 834, 171, 2, 70, "Input",ExpressionUUID->"795f7197-80dd-4905-9d23-14ab6af940fb"], +Cell[CellGroupData[{ +Cell[29701, 840, 303, 5, 29, "Input",ExpressionUUID->"b65ed57b-652e-4909-bc25-946fd82943e0"], +Cell[30007, 847, 329, 5, 33, "Output",ExpressionUUID->"dd85e150-1a3d-4258-acf7-cf529ca5ea9e"] +}, Open ]], +Cell[30351, 855, 173, 2, 70, "Input",ExpressionUUID->"4e6f1173-cc4f-41d3-bdc3-04fa1c3c37db"], +Cell[CellGroupData[{ +Cell[30549, 861, 306, 5, 29, "Input",ExpressionUUID->"f71b7e9a-a2ad-4baf-b821-53d00fb0a0d6"], +Cell[30858, 868, 326, 5, 33, "Output",ExpressionUUID->"1c71f79e-54dc-43c7-a168-e591e6cb95a2"] +}, Open ]], +Cell[31199, 876, 172, 2, 70, "Input",ExpressionUUID->"d5752b4e-d8db-47a1-b38a-6bc1a98e7732"], +Cell[CellGroupData[{ +Cell[31396, 882, 275, 4, 29, "Input",ExpressionUUID->"dbae0811-81e4-4224-b123-aa10797d8bbb"], +Cell[31674, 888, 325, 5, 33, "Output",ExpressionUUID->"47207b76-05a8-47b5-bb1a-b44640cfd632"] +}, Open ]], +Cell[32014, 896, 175, 2, 70, "Input",ExpressionUUID->"57aa8928-9b98-4ea6-9d8b-e4d135e606f5"], +Cell[CellGroupData[{ +Cell[32214, 902, 19809, 485, 1844, "Input",ExpressionUUID->"34c12653-04a9-4373-a483-034f6d22819c"], +Cell[52026, 1389, 358, 5, 33, "Output",ExpressionUUID->"0a4b8e77-4d8b-4c34-a0ef-7ff89257008a"] }, Open ]], Cell[CellGroupData[{ -Cell[185897, 4424, 2663, 88, 70, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[188563, 4514, 171, 3, 70, "Output",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] +Cell[52421, 1399, 19748, 489, 1981, "Input",ExpressionUUID->"ce5b02ef-04f4-4b78-8a10-5278e6d0a747"], +Cell[72172, 1890, 361, 5, 33, "Output",ExpressionUUID->"6e2603a8-1331-4862-adde-3e54e83627f6"] }, Open ]], Cell[CellGroupData[{ -Cell[188771, 4522, 2603, 85, 70, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[191377, 4609, 173, 3, 70, "Output",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] +Cell[72570, 1900, 19748, 483, 1970, "Input",ExpressionUUID->"8b33ecea-5b18-4e5b-b0f4-af9397d090d9"], +Cell[92321, 2385, 378, 6, 33, "Output",ExpressionUUID->"d758a2ef-27e3-416a-9860-33f01cc1f164"] }, Open ]], Cell[CellGroupData[{ -Cell[191587, 4617, 3712, 118, 70, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[195302, 4737, 174, 3, 70, "Output",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] +Cell[92736, 2396, 22534, 553, 2217, "Input",ExpressionUUID->"47f7fede-68d9-4d90-b133-5de57c98071e"], +Cell[115273, 2951, 378, 6, 33, "Output",ExpressionUUID->"59c81938-27f2-4f44-9e67-ea192ef862bc"] }, Open ]], Cell[CellGroupData[{ -Cell[195513, 4745, 2049, 58, 70, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], -Cell[197565, 4805, 579, 12, 70, "Message",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], -Cell[198147, 4819, 582, 12, 70, "Message",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], -Cell[198732, 4833, 584, 12, 70, "Message",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], -Cell[199319, 4847, 458, 10, 70, "Message",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], -Cell[199780, 4859, 172, 3, 70, "Output",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] +Cell[115688, 2962, 22535, 553, 2254, "Input",ExpressionUUID->"c5560b7d-0c3d-4ca4-8064-6b28990e0195"], +Cell[138226, 3517, 380, 6, 33, "Output",ExpressionUUID->"29ed192b-af8c-4d63-a3e4-52668e07f588"] }, Open ]], Cell[CellGroupData[{ -Cell[199989, 4867, 2054, 59, 70, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], -Cell[202046, 4928, 577, 12, 70, "Message",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], -Cell[202626, 4942, 580, 12, 70, "Message",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], -Cell[203209, 4956, 583, 12, 70, "Message",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], -Cell[203795, 4970, 456, 10, 70, "Message",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], -Cell[204254, 4982, 171, 3, 70, "Output",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] +Cell[138643, 3528, 25491, 626, 2501, "Input",ExpressionUUID->"4954379f-e1d4-4dbd-9ba2-1e2b723f2158"], +Cell[164137, 4156, 382, 6, 33, "Output",ExpressionUUID->"99004acd-676e-4c53-8331-1a0a66623760"] }, Open ]], Cell[CellGroupData[{ -Cell[204462, 4990, 2030, 55, 70, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], -Cell[206495, 5047, 20493, 384, 70, "Output",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] +Cell[164556, 4167, 130, 2, 29, "Input",ExpressionUUID->"64466210-a0a4-4eea-9dbc-75c83fc19ffe"], +Cell[164689, 4171, 344, 5, 33, "Output",ExpressionUUID->"4e06d330-5aaf-4b26-a585-254ff5df0911"] }, Open ]], Cell[CellGroupData[{ -Cell[227025, 5436, 2120, 60, 70, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], -Cell[229148, 5498, 501, 11, 70, "Message",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], -Cell[229652, 5511, 504, 11, 70, "Message",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], -Cell[230159, 5524, 508, 11, 70, "Message",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], -Cell[230670, 5537, 456, 10, 70, "Message",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], -Cell[231129, 5549, 31462, 562, 70, "Output",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] -}, Open ]], -Cell[262606, 6114, 209, 5, 70, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], -Cell[CellGroupData[{ -Cell[262840, 6123, 1616, 48, 70, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], -Cell[264459, 6173, 596, 12, 70, "Message",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], -Cell[265058, 6187, 602, 12, 70, "Message",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], -Cell[265663, 6201, 605, 12, 70, "Message",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], -Cell[266271, 6215, 458, 10, 70, "Message",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], -Cell[266732, 6227, 171, 3, 70, "Output",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] +Cell[165070, 4181, 130, 2, 29, "Input",ExpressionUUID->"6f752b4e-7785-42d6-93da-b266ae1442b5"], +Cell[165203, 4185, 347, 5, 33, "Output",ExpressionUUID->"57a120de-b9f5-4c21-bc1d-0609172078f1"] }, Open ]], Cell[CellGroupData[{ -Cell[266940, 6235, 2251, 64, 70, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], -Cell[269194, 6301, 577, 12, 70, "Message",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], -Cell[269774, 6315, 580, 12, 70, "Message",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], -Cell[270357, 6329, 586, 12, 70, "Message",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], -Cell[270946, 6343, 458, 10, 70, "Message",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], -Cell[271407, 6355, 173, 3, 70, "Output",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] +Cell[165587, 4195, 1144, 39, 107, "Input",ExpressionUUID->"c4b08bbd-e49f-49c5-a3a7-f9c14aa27194"], +Cell[166734, 4236, 360, 5, 33, "Output",ExpressionUUID->"176f5256-5e3f-48fe-b118-b0dc47c52377"] }, Open ]], Cell[CellGroupData[{ -Cell[271617, 6363, 2219, 64, 70, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], -Cell[273839, 6429, 579, 12, 70, "Message",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], -Cell[274421, 6443, 580, 12, 70, "Message",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], -Cell[275004, 6457, 586, 12, 70, "Message",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], -Cell[275593, 6471, 458, 10, 70, "Message",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], -Cell[276054, 6483, 171, 3, 70, "Output",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] +Cell[167131, 4246, 1041, 35, 107, "Input",ExpressionUUID->"950b89c9-8a1a-4d7c-a537-34464acaf831"], +Cell[168175, 4283, 377, 6, 33, "Output",ExpressionUUID->"7c21a65c-33c3-4d23-bff4-7f4fd7eb4e1a"] }, Open ]], Cell[CellGroupData[{ -Cell[276262, 6491, 2219, 64, 70, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], -Cell[278484, 6557, 576, 12, 70, "Message",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], -Cell[279063, 6571, 580, 12, 70, "Message",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], -Cell[279646, 6585, 584, 12, 70, "Message",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], -Cell[280233, 6599, 458, 10, 70, "Message",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], -Cell[280694, 6611, 173, 3, 70, "Output",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] +Cell[168589, 4294, 1144, 39, 107, "Input",ExpressionUUID->"86f0489f-ee40-4bbb-8cd7-2af1e4ae48a9"], +Cell[169736, 4335, 361, 5, 33, "Output",ExpressionUUID->"41ce3679-5ab2-4572-aec5-2aadc1e032ec"] }, Open ]], Cell[CellGroupData[{ -Cell[280904, 6619, 212, 6, 70, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], -Cell[281119, 6627, 172, 3, 70, "Output",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] -}, Open ]], -Cell[281306, 6633, 244, 5, 70, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], -Cell[CellGroupData[{ -Cell[281575, 6642, 558, 19, 70, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[282136, 6663, 171, 3, 70, "Output",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] +Cell[170134, 4345, 108, 1, 29, "Input",ExpressionUUID->"976f566a-90c3-4463-a909-a6668898f071"], +Cell[170245, 4348, 368, 5, 33, "Output",ExpressionUUID->"b773ff07-81f9-483f-8184-2a4906cd8eed"] }, Open ]], Cell[CellGroupData[{ -Cell[282344, 6671, 170, 5, 70, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[282517, 6678, 171, 3, 70, "Output",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] +Cell[170650, 4358, 108, 1, 29, "Input",ExpressionUUID->"10fa2904-cb5e-4349-bcf4-d963b717d8d2"], +Cell[170761, 4361, 383, 6, 33, "Output",ExpressionUUID->"c95fd763-050a-463b-b346-4d9bdd01e83a"] }, Open ]], Cell[CellGroupData[{ -Cell[282725, 6686, 181, 5, 70, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[282909, 6693, 173, 3, 70, "Output",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] +Cell[171181, 4372, 108, 1, 29, "Input",ExpressionUUID->"41cc612b-3b38-4216-aa0c-ac4f04077370"], +Cell[171292, 4375, 380, 6, 33, "Output",ExpressionUUID->"6ba97b21-b3b4-46a1-9cd2-862b90ad6ac9"] }, Open ]], Cell[CellGroupData[{ -Cell[283119, 6701, 6055, 185, 70, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[289177, 6888, 173, 3, 70, "Output",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] +Cell[171709, 4386, 108, 1, 29, "Input",ExpressionUUID->"849325f0-5f99-4e5b-b076-2d8fdc625072"], +Cell[171820, 4389, 359, 5, 33, "Output",ExpressionUUID->"2998869b-9f8c-4beb-8877-6b48861430d1"] }, Open ]], Cell[CellGroupData[{ -Cell[289387, 6896, 368, 9, 70, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[289758, 6907, 172, 3, 70, "Output",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] +Cell[172216, 4399, 107, 1, 29, "Input",ExpressionUUID->"1d6f43fc-49c7-4c23-bf8e-78c637e4092f"], +Cell[172326, 4402, 362, 5, 33, "Output",ExpressionUUID->"10a53652-25d2-4b2c-a68d-df8d5ebe4e28"] }, Open ]], Cell[CellGroupData[{ -Cell[289967, 6915, 6122, 187, 70, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[296092, 7104, 173, 3, 70, "Output",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] +Cell[172725, 4412, 107, 1, 29, "Input",ExpressionUUID->"2918d468-02b3-4294-bb1c-589070d69307"], +Cell[172835, 4415, 365, 5, 33, "Output",ExpressionUUID->"55aec178-5b4b-49e5-8c2f-39f0ac9adbe5"] }, Open ]], Cell[CellGroupData[{ -Cell[296302, 7112, 368, 9, 70, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[296673, 7123, 172, 3, 70, "Output",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] +Cell[173237, 4425, 497, 16, 55, "Input",ExpressionUUID->"605c363d-6848-452b-9a6f-972bb5085535"], +Cell[173737, 4443, 381, 6, 33, "Output",ExpressionUUID->"06302506-b381-48bc-b513-ff66d42bcb1c"] }, Open ]], Cell[CellGroupData[{ -Cell[296882, 7131, 2663, 88, 70, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[299548, 7221, 173, 3, 70, "Output",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] +Cell[174155, 4454, 497, 16, 55, "Input",ExpressionUUID->"bb4a66b6-1cd2-4e74-8c5e-e63147f2d3a1"], +Cell[174655, 4472, 371, 6, 33, "Output",ExpressionUUID->"6bc262d7-80a0-4a45-85e7-2fa0503a14e5"] }, Open ]], Cell[CellGroupData[{ -Cell[299758, 7229, 2603, 85, 70, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[302364, 7316, 171, 3, 70, "Output",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] +Cell[175063, 4483, 1788, 60, 183, "Input",ExpressionUUID->"0c63395b-9711-4549-8741-46bc19f82077"], +Cell[176854, 4545, 360, 5, 33, "Output",ExpressionUUID->"26cec038-9c05-43ce-b2f0-6c756a58254e"] }, Open ]], Cell[CellGroupData[{ -Cell[302572, 7324, 3712, 118, 70, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[306287, 7444, 174, 3, 70, "Output",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] +Cell[177251, 4555, 1101, 36, 131, "Input",ExpressionUUID->"f3ef4162-d581-42ee-9dea-a910793bbda0"], +Cell[178355, 4593, 382, 6, 33, "Output",ExpressionUUID->"0676a0c4-d421-49e0-92aa-939c99ee7ad4"] }, Open ]], Cell[CellGroupData[{ -Cell[306498, 7452, 2054, 59, 70, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], -Cell[308555, 7513, 574, 12, 70, "Message",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], -Cell[309132, 7527, 580, 12, 70, "Message",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], -Cell[309715, 7541, 580, 12, 70, "Message",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], -Cell[310298, 7555, 456, 10, 70, "Message",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], -Cell[310757, 7567, 172, 3, 70, "Output",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] +Cell[178774, 4604, 1818, 61, 160, "Input",ExpressionUUID->"3310b6ca-f5b8-4895-b96d-2c1fc8107bd0"], +Cell[180595, 4667, 367, 5, 33, "Output",ExpressionUUID->"05af189c-70a7-4c5d-a10b-e4b12ec5b9a4"] }, Open ]], Cell[CellGroupData[{ -Cell[310966, 7575, 2054, 59, 70, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], -Cell[313023, 7636, 576, 12, 70, "Message",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], -Cell[313602, 7650, 577, 12, 70, "Message",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], -Cell[314182, 7664, 582, 12, 70, "Message",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], -Cell[314767, 7678, 458, 10, 70, "Message",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], -Cell[315228, 7690, 172, 3, 70, "Output",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] +Cell[180999, 4677, 1631, 53, 162, "Input",ExpressionUUID->"bd080782-1d93-41c6-b71e-e1fdf67ad5ed"], +Cell[182633, 4732, 367, 5, 33, "Output",ExpressionUUID->"3081bcf2-3553-4e93-b277-508386699f51"] }, Open ]], Cell[CellGroupData[{ -Cell[315437, 7698, 2028, 55, 70, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], -Cell[317468, 7755, 20021, 378, 70, "Output",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] +Cell[183037, 4742, 1631, 53, 162, "Input",ExpressionUUID->"f933a84a-1908-447b-a1e7-3ac2fe925011"], +Cell[184671, 4797, 364, 5, 33, "Output",ExpressionUUID->"4faf17e6-f9ff-4cf9-8923-7de8e5e37103"] }, Open ]], Cell[CellGroupData[{ -Cell[337526, 8138, 2146, 61, 70, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], -Cell[339675, 8201, 502, 11, 70, "Message",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], -Cell[340180, 8214, 506, 11, 70, "Message",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], -Cell[340689, 8227, 508, 11, 70, "Message",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], -Cell[341200, 8240, 456, 10, 70, "Message",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], -Cell[341659, 8252, 30015, 538, 70, "Output",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] +Cell[185072, 4807, 206, 3, 29, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], +Cell[185281, 4812, 161, 2, 33, "Output",ExpressionUUID->"e5210e59-bde1-4cf3-845e-91b17606d0c4"] }, Open ]], -Cell[371689, 8793, 209, 5, 70, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], +Cell[185457, 4817, 173, 2, 29, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], Cell[CellGroupData[{ -Cell[371923, 8802, 1590, 47, 70, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], -Cell[373516, 8851, 342, 6, 70, "Message",ExpressionUUID->"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], -Cell[373861, 8859, 101, 0, 70, "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[185655, 4823, 206, 3, 29, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], +Cell[185864, 4828, 161, 2, 33, "Output",ExpressionUUID->"a5f515fe-62f8-43be-a09d-319a181aebc4"] +}, Open ]], +Cell[186040, 4833, 173, 2, 29, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], +Cell[CellGroupData[{ +Cell[186238, 4839, 1297, 42, 111, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], +Cell[187538, 4883, 195, 2, 33, "Output",ExpressionUUID->"5df0384e-868a-4b97-a2d4-177305c7bd56"] }, Open ]], Cell[CellGroupData[{ -Cell[373999, 8864, 2249, 64, 70, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], -Cell[376251, 8930, 342, 6, 70, "Message",ExpressionUUID->"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], -Cell[376596, 8938, 342, 6, 70, "Message",ExpressionUUID->"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], -Cell[376941, 8946, 101, 0, 70, "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[187770, 4890, 927, 30, 96, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], +Cell[188700, 4922, 195, 2, 33, "Output",ExpressionUUID->"62a989b2-96cc-4a81-a8a2-207f44bb944e"] }, Open ]], Cell[CellGroupData[{ -Cell[377079, 8951, 2221, 64, 70, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], -Cell[379303, 9017, 342, 6, 70, "Message",ExpressionUUID->"566a849f-fc85-4d42-a545-a46d44cf7346"], -Cell[379648, 9025, 342, 6, 70, "Message",ExpressionUUID->"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], -Cell[379993, 9033, 100, 0, 70, "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[188932, 4929, 908, 29, 55, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], +Cell[189843, 4960, 198, 2, 33, "Output",ExpressionUUID->"261c25d3-124f-444b-adda-b3db1a0ab13f"] }, Open ]], Cell[CellGroupData[{ -Cell[380130, 9038, 2223, 64, 70, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], -Cell[382356, 9104, 342, 6, 70, "Message",ExpressionUUID->"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], -Cell[382701, 9112, 342, 6, 70, "Message",ExpressionUUID->"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], -Cell[383046, 9120, 101, 0, 70, "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[190078, 4967, 554, 18, 51, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], +Cell[190635, 4987, 190, 2, 33, "Output",ExpressionUUID->"b38d23f9-671a-4467-bc27-b507dbc49935"] }, Open ]], Cell[CellGroupData[{ -Cell[383184, 9125, 213, 6, 70, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[383400, 9133, 102, 0, 70, "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] -}, Open ]] +Cell[190862, 4994, 647, 21, 51, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], +Cell[191512, 5017, 188, 2, 33, "Output",ExpressionUUID->"0c77d573-5365-4319-b513-a03fd4e99ca5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[191737, 5024, 166, 4, 55, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], +Cell[191906, 5030, 192, 2, 33, "Output",ExpressionUUID->"39b67b71-8af4-4461-a747-9df3d5b20804"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192135, 5037, 166, 4, 54, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], +Cell[192304, 5043, 191, 2, 33, "Output",ExpressionUUID->"9bb25952-4d72-4aa7-a811-65a4d22e97cd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192532, 5050, 177, 4, 43, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], +Cell[192712, 5056, 189, 2, 33, "Output",ExpressionUUID->"c93e58dd-e37b-4675-be69-e95fe00657ac"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192938, 5063, 177, 4, 43, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], +Cell[193118, 5069, 191, 2, 33, "Output",ExpressionUUID->"bb7429bb-8a9b-4d96-acdc-d6f15aea391c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[193346, 5076, 6051, 184, 183, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], +Cell[199400, 5262, 195, 2, 33, "Output",ExpressionUUID->"bcfaaaed-1030-4d1b-907e-2f8b43ec6e2f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[199632, 5269, 364, 8, 41, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], +Cell[199999, 5279, 189, 2, 33, "Output",ExpressionUUID->"2635c8b8-5ffa-4af6-9082-8d619dc1ec87"] +}, Open ]], +Cell[CellGroupData[{ +Cell[200225, 5286, 6118, 186, 183, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], +Cell[206346, 5474, 194, 2, 33, "Output",ExpressionUUID->"a548892a-7fa6-4729-a274-88c89eac986a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[206577, 5481, 364, 8, 41, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], +Cell[206944, 5491, 191, 2, 33, "Output",ExpressionUUID->"4c599de7-511b-4078-8db6-4d8e8ad145d4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[207172, 5498, 2659, 87, 107, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], +Cell[209834, 5587, 190, 2, 33, "Output",ExpressionUUID->"324c767e-bd05-4006-bee1-17adeca01e1a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[210061, 5594, 2599, 84, 107, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], +Cell[212663, 5680, 192, 2, 33, "Output",ExpressionUUID->"4232bf42-072f-49b3-9073-f1dd2c9e536e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[212892, 5687, 3708, 117, 160, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], +Cell[216603, 5806, 194, 2, 33, "Output",ExpressionUUID->"66dfa685-ab4d-4013-bdc5-36bbabe380d7"] +}, Open ]], +Cell[216812, 5811, 160, 3, 29, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], +Cell[CellGroupData[{ +Cell[216997, 5818, 2073, 58, 234, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], +Cell[219073, 5878, 724, 15, 63, "Message",ExpressionUUID->"32475968-1f29-4f63-b09b-05fc47116795"], +Cell[219800, 5895, 722, 15, 63, "Message",ExpressionUUID->"a421e5cd-63ef-42d0-9a6f-e34dec33cee3"], +Cell[220525, 5912, 722, 15, 63, "Message",ExpressionUUID->"1fe95495-6e0d-4723-ad41-4b956fbede80"], +Cell[221250, 5929, 492, 11, 26, "Message",ExpressionUUID->"90388585-8b48-4235-aac8-59995beea30c"], +Cell[221745, 5942, 187, 2, 33, "Output",ExpressionUUID->"07d6f137-20e3-46e1-a1cd-01565865ef4d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[221969, 5949, 2073, 58, 99, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], +Cell[224045, 6009, 726, 15, 45, "Message",ExpressionUUID->"267404f3-97f7-4548-a8ab-096d46bcb3b1"], +Cell[224774, 6026, 722, 15, 45, "Message",ExpressionUUID->"0a62ee0c-d611-4196-9c89-3bfa7989969d"], +Cell[225499, 6043, 725, 15, 45, "Message",ExpressionUUID->"8f2291a6-d315-489e-b76e-84767b120127"], +Cell[226227, 6060, 492, 11, 26, "Message",ExpressionUUID->"15b91f68-f00d-4eba-8f8f-c325c63599ad"], +Cell[226722, 6073, 188, 2, 33, "Output",ExpressionUUID->"2fca82ac-f874-4194-908f-0cf8fadb0f68"] +}, Open ]], +Cell[CellGroupData[{ +Cell[226947, 6080, 1957, 52, 102, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], +Cell[228907, 6134, 21927, 407, 242, "Output",ExpressionUUID->"8805f436-5eee-45f2-bc14-b002d1c5ccc6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[250871, 6546, 2113, 59, 261, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], +Cell[252987, 6607, 558, 12, 58, "Message",ExpressionUUID->"e75b4126-be56-4633-9797-7033bd803215"], +Cell[253548, 6621, 561, 12, 58, "Message",ExpressionUUID->"16369f7f-285a-4ddb-be4c-5038b2c9c0b5"], +Cell[254112, 6635, 565, 12, 58, "Message",ExpressionUUID->"a7a16024-337d-4aad-b272-fa17f69b3f3f"], +Cell[254680, 6649, 493, 11, 26, "Message",ExpressionUUID->"08ee6e0c-abb2-48b1-8500-8ca345c2e899"], +Cell[255176, 6662, 33055, 590, 232, "Output",ExpressionUUID->"e6f0ea17-59b7-45dc-ac2b-fa01c0b86224"] +}, Open ]], +Cell[CellGroupData[{ +Cell[288268, 7257, 2519, 70, 185, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], +Cell[290790, 7329, 9504, 222, 239, "Output",ExpressionUUID->"6ea5a15a-9916-4c6d-beb1-cd57891a5fa1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[300331, 7556, 228, 4, 29, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], +Cell[300562, 7562, 39430, 722, 232, "Output",ExpressionUUID->"82db6c04-ac18-4b30-abc2-4886ff81415a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[340029, 8289, 236, 6, 47, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], +Cell[340268, 8297, 191, 2, 33, "Output",ExpressionUUID->"0b74ab5b-177f-4485-b22b-7fe45ca9e169"] +}, Open ]], +Cell[CellGroupData[{ +Cell[340496, 8304, 1833, 52, 190, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], +Cell[342332, 8358, 576, 13, 58, "Message",ExpressionUUID->"4d3c632d-5460-4778-8bed-34a812011307"], +Cell[342911, 8373, 580, 13, 58, "Message",ExpressionUUID->"fb8a6b18-6fc4-4088-97c9-eab891f85cc0"], +Cell[343494, 8388, 583, 13, 58, "Message",ExpressionUUID->"48dfb865-5596-4283-9ac9-cce1d4411cba"], +Cell[344080, 8403, 491, 11, 26, "Message",ExpressionUUID->"1355e0c0-014b-4cc8-9b27-466fb506261b"], +Cell[344574, 8416, 42792, 749, 232, "Output",ExpressionUUID->"9dc0a1c6-563d-4b17-818a-59f8d48638f8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[387403, 9170, 1616, 48, 104, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], +Cell[389022, 9220, 195, 3, 33, "Output",ExpressionUUID->"ddc9640f-b3fa-409b-87f8-3f6ccad05128"] +}, Open ]], +Cell[CellGroupData[{ +Cell[389254, 9228, 2274, 64, 212, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], +Cell[391531, 9294, 727, 15, 63, "Message",ExpressionUUID->"d00f77f7-3d9f-4a2b-9da1-ec7b4f8164bc"], +Cell[392261, 9311, 723, 15, 63, "Message",ExpressionUUID->"733cf8b9-db43-4059-b56d-54eac23734f5"], +Cell[392987, 9328, 726, 15, 63, "Message",ExpressionUUID->"828bd0c3-e453-49ae-99f9-9f935175104a"], +Cell[393716, 9345, 493, 11, 26, "Message",ExpressionUUID->"78dfd776-5521-4f5a-8b4c-dec9c729a565"], +Cell[394212, 9358, 195, 3, 33, "Output",ExpressionUUID->"969b290e-5e60-486a-96c8-3763d3362542"] +}, Open ]], +Cell[CellGroupData[{ +Cell[394444, 9366, 2230, 63, 212, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], +Cell[396677, 9431, 727, 15, 63, "Message",ExpressionUUID->"69b3202d-35ab-46a9-8e25-52c8c77a8b47"], +Cell[397407, 9448, 725, 15, 63, "Message",ExpressionUUID->"516528af-fa87-4d7d-b04e-3cd376288df1"], +Cell[398135, 9465, 726, 15, 63, "Message",ExpressionUUID->"10ac4616-ea93-4ca9-b90d-d2466364c514"], +Cell[398864, 9482, 495, 11, 26, "Message",ExpressionUUID->"360bbead-2298-4d9a-a762-c90bfa838b26"], +Cell[399362, 9495, 194, 3, 33, "Output",ExpressionUUID->"e0b49e68-daac-4dc8-9291-bf2cb18d41bb"] +}, Open ]], +Cell[CellGroupData[{ +Cell[399593, 9503, 2233, 63, 212, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], +Cell[401829, 9568, 729, 15, 63, "Message",ExpressionUUID->"40319569-a63f-4cd6-bd7d-364f0aa2a9aa"], +Cell[402561, 9585, 725, 15, 63, "Message",ExpressionUUID->"bdbad927-4fae-4921-9764-884f9c81befe"], +Cell[403289, 9602, 726, 15, 63, "Message",ExpressionUUID->"a3b59fde-7d87-440b-9804-18bd458531d3"], +Cell[404018, 9619, 497, 11, 26, "Message",ExpressionUUID->"e95a05e2-abaa-4c14-b288-04fdec437c63"], +Cell[404518, 9632, 193, 3, 33, "Output",ExpressionUUID->"4903f00a-aae9-4c8e-b136-aad8a41f4767"] +}, Open ]], +Cell[CellGroupData[{ +Cell[404748, 9640, 236, 6, 46, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], +Cell[404987, 9648, 193, 3, 33, "Output",ExpressionUUID->"7367d422-3ed3-4b25-9ebe-e7f5d709e20e"] +}, Open ]], +Cell[405195, 9654, 271, 6, 70, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], +Cell[CellGroupData[{ +Cell[405491, 9664, 558, 19, 51, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], +Cell[406052, 9685, 194, 3, 33, "Output",ExpressionUUID->"52127656-fa5e-4202-8df7-df167986e853"] +}, Open ]], +Cell[CellGroupData[{ +Cell[406283, 9693, 170, 5, 55, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], +Cell[406456, 9700, 196, 3, 33, "Output",ExpressionUUID->"87fd9e61-2302-4b5f-8c95-360136898abc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[406689, 9708, 181, 5, 43, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], +Cell[406873, 9715, 193, 3, 33, "Output",ExpressionUUID->"7742039d-8d3a-4805-9ecb-f9c79c3d644e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[407103, 9723, 6055, 185, 474, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], +Cell[413161, 9910, 195, 3, 33, "Output",ExpressionUUID->"8c974d32-c9fa-4c1b-89ec-ef7d609093ee"] +}, Open ]], +Cell[CellGroupData[{ +Cell[413393, 9918, 368, 9, 41, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], +Cell[413764, 9929, 194, 3, 33, "Output",ExpressionUUID->"6f24820a-5191-4555-8510-46eac18044a7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[413995, 9937, 6122, 187, 474, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], +Cell[420120, 10126, 193, 3, 33, "Output",ExpressionUUID->"cab55e7c-9b3b-493c-8644-b1caeec8dbc0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[420350, 10134, 368, 9, 41, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], +Cell[420721, 10145, 193, 3, 33, "Output",ExpressionUUID->"a95a8331-ae74-489d-927a-1f50ef500e59"] +}, Open ]], +Cell[CellGroupData[{ +Cell[420951, 10153, 2663, 88, 285, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], +Cell[423617, 10243, 193, 3, 33, "Output",ExpressionUUID->"a01dd86d-6e27-4bb1-827e-ffecde3fa1b9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[423847, 10251, 2603, 85, 211, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], +Cell[426453, 10338, 194, 3, 33, "Output",ExpressionUUID->"ed92884e-ab3d-452c-8735-edb8fa99550f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[426684, 10346, 3712, 118, 327, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], +Cell[430399, 10466, 196, 3, 33, "Output",ExpressionUUID->"33eb8692-cf2c-413c-a48a-66f3c13c958b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[430632, 10474, 2074, 59, 234, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], +Cell[432709, 10535, 726, 15, 63, "Message",ExpressionUUID->"14445f4a-dee7-40ed-8fd2-e4fa1b68df9d"], +Cell[433438, 10552, 728, 15, 63, "Message",ExpressionUUID->"2368104c-8c96-4962-814e-677a72b34aa0"], +Cell[434169, 10569, 727, 15, 63, "Message",ExpressionUUID->"f0366ce7-ad16-4825-9831-0aaa7e983174"], +Cell[434899, 10586, 495, 11, 26, "Message",ExpressionUUID->"c6df33d9-b32a-4266-beb5-f4ed4448882e"], +Cell[435397, 10599, 194, 3, 33, "Output",ExpressionUUID->"20138d1d-0225-4be1-90ab-9d229664f1f0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[435628, 10607, 2077, 59, 234, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], +Cell[437708, 10668, 727, 15, 63, "Message",ExpressionUUID->"6c09d7d9-609d-44e7-bb6b-296ac631e808"], +Cell[438438, 10685, 728, 15, 63, "Message",ExpressionUUID->"2ca67db2-c7d0-4075-993f-4cceb043d9b5"], +Cell[439169, 10702, 727, 15, 63, "Message",ExpressionUUID->"06b40117-6b1e-486c-b347-ba30ce1524e1"], +Cell[439899, 10719, 493, 11, 26, "Message",ExpressionUUID->"1b0291d2-a12c-4bd2-a6e3-1e46e962b590"], +Cell[440395, 10732, 193, 3, 33, "Output",ExpressionUUID->"8cf8f6b7-bb26-4080-b9d0-a6ae31a64d05"] +}, Open ]], +Cell[CellGroupData[{ +Cell[440625, 10740, 2053, 55, 151, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], +Cell[442681, 10797, 23747, 438, 237, "Output",ExpressionUUID->"a58a0bbc-4dcc-4b85-b6be-b6693cda0f8a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[466465, 11240, 2143, 60, 261, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], +Cell[468611, 11302, 562, 12, 58, "Message",ExpressionUUID->"defe81e2-646f-41e3-82df-06d3298949ba"], +Cell[469176, 11316, 566, 12, 58, "Message",ExpressionUUID->"6e4f8540-b2e2-49f2-b9a9-ccc9d47f64f0"], +Cell[469745, 11330, 567, 12, 58, "Message",ExpressionUUID->"0167b45a-4f7f-4dd6-a24d-5ae691dda338"], +Cell[470315, 11344, 493, 11, 26, "Message",ExpressionUUID->"8959d357-76b6-495a-98aa-8d969d180dff"], +Cell[470811, 11357, 33216, 591, 232, "Output",ExpressionUUID->"f533b536-ce58-48e7-ac92-216196974bc1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[504064, 11953, 232, 5, 29, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], +Cell[504299, 11960, 39586, 723, 232, "Output",ExpressionUUID->"f20191f5-fc28-4a24-8e26-6fa32bacfa36"] +}, Open ]], +Cell[CellGroupData[{ +Cell[543922, 12688, 1616, 48, 104, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], +Cell[545541, 12738, 193, 3, 33, "Output",ExpressionUUID->"80828ff9-e763-4da6-99bf-d75fd24e11e1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[545771, 12746, 2274, 64, 212, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], +Cell[548048, 12812, 727, 15, 63, "Message",ExpressionUUID->"3b866c46-7c49-4fae-81f7-f2053a4483bb"], +Cell[548778, 12829, 726, 15, 63, "Message",ExpressionUUID->"60a0c190-185a-4cdf-b119-bc3d3ba8a222"], +Cell[549507, 12846, 727, 15, 63, "Message",ExpressionUUID->"c5e9f27a-c76c-40ca-9c1a-67810933edcd"], +Cell[550237, 12863, 495, 11, 26, "Message",ExpressionUUID->"36a7cc9d-8f00-430a-a443-278caeed1d1e"], +Cell[550735, 12876, 193, 3, 33, "Output",ExpressionUUID->"822279ae-2325-46c1-8c4f-10eee6a68da8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[550965, 12884, 2231, 63, 212, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], +Cell[553199, 12949, 727, 15, 63, "Message",ExpressionUUID->"1e2d0570-fe3a-4a2e-ab7f-ca8a1b453646"], +Cell[553929, 12966, 730, 15, 63, "Message",ExpressionUUID->"6b95cafa-410a-4ad2-9c0d-ff07b6d9e5a1"], +Cell[554662, 12983, 727, 15, 63, "Message",ExpressionUUID->"ee354f63-e92a-4a54-9efa-b29bf1f8b04e"], +Cell[555392, 13000, 495, 11, 26, "Message",ExpressionUUID->"3a4106c6-ae67-4e6c-8c4e-4c92a6d00685"], +Cell[555890, 13013, 193, 3, 33, "Output",ExpressionUUID->"e91f92c5-1a4e-469c-ac63-8e7b8ba3ab16"] +}, Open ]], +Cell[CellGroupData[{ +Cell[556120, 13021, 2231, 63, 212, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], +Cell[558354, 13086, 726, 15, 63, "Message",ExpressionUUID->"20246af8-f0f8-4892-8684-03a09f0a82f8"], +Cell[559083, 13103, 725, 15, 63, "Message",ExpressionUUID->"f88fdffa-8a4a-4e6d-80a8-49dd0d6fdd25"], +Cell[559811, 13120, 724, 15, 63, "Message",ExpressionUUID->"008c4446-cf21-4f25-9070-c5a12d0066a7"], +Cell[560538, 13137, 492, 11, 26, "Message",ExpressionUUID->"54df2ff1-a3ab-4c1c-b593-48396afa6a06"], +Cell[561033, 13150, 195, 3, 33, "Output",ExpressionUUID->"efc19e6d-25bd-4d4e-8cf0-319f95cd78e5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[561265, 13158, 235, 6, 46, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], +Cell[561503, 13166, 193, 3, 33, "Output",ExpressionUUID->"f48f1f6f-2908-4951-a627-0d46b421e07c"] +}, Open ]], +Cell[561711, 13172, 270, 6, 70, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], +Cell[CellGroupData[{ +Cell[562006, 13182, 558, 19, 51, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], +Cell[562567, 13203, 195, 3, 33, "Output",ExpressionUUID->"896e23ef-7101-48b1-8d6a-3052416842e3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[562799, 13211, 170, 5, 55, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], +Cell[562972, 13218, 194, 3, 33, "Output",ExpressionUUID->"8fd9ad64-9c44-4a62-9a4c-83a18605cf85"] +}, Open ]], +Cell[CellGroupData[{ +Cell[563203, 13226, 181, 5, 43, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], +Cell[563387, 13233, 195, 3, 33, "Output",ExpressionUUID->"ea30ec88-762e-450a-a53a-4e20a363398a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[563619, 13241, 6055, 185, 474, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], +Cell[569677, 13428, 195, 3, 33, "Output",ExpressionUUID->"56fec9c4-56b3-426b-b8da-4bd88b7c6a55"] +}, Open ]], +Cell[CellGroupData[{ +Cell[569909, 13436, 368, 9, 41, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], +Cell[570280, 13447, 196, 3, 33, "Output",ExpressionUUID->"98003fcf-8033-4f20-87fc-bd83073cf087"] +}, Open ]], +Cell[CellGroupData[{ +Cell[570513, 13455, 6122, 187, 474, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], +Cell[576638, 13644, 196, 3, 33, "Output",ExpressionUUID->"d3b95ab4-f9d8-4ff8-b78e-cd6b4db4e4ef"] +}, Open ]], +Cell[CellGroupData[{ +Cell[576871, 13652, 368, 9, 41, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], +Cell[577242, 13663, 195, 3, 33, "Output",ExpressionUUID->"4e195c83-28b6-4cc2-90c8-f8fc021216db"] +}, Open ]], +Cell[CellGroupData[{ +Cell[577474, 13671, 2663, 88, 285, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], +Cell[580140, 13761, 196, 3, 33, "Output",ExpressionUUID->"123d7887-806e-4ec1-94ac-1e3cadaa8e6d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[580373, 13769, 2603, 85, 211, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], +Cell[582979, 13856, 194, 3, 33, "Output",ExpressionUUID->"e520ef05-b3d8-4b0b-9160-3781f0cc8197"] +}, Open ]], +Cell[CellGroupData[{ +Cell[583210, 13864, 3712, 118, 327, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], +Cell[586925, 13984, 196, 3, 33, "Output",ExpressionUUID->"db142c37-b56d-4c74-a4cb-06a175a4e35b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[587158, 13992, 2077, 59, 234, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], +Cell[589238, 14053, 724, 15, 63, "Message",ExpressionUUID->"32ca47d5-89bd-4546-aa20-8ab2531b7225"], +Cell[589965, 14070, 725, 15, 63, "Message",ExpressionUUID->"71d124f8-a29b-42d6-abbc-64c372f9ccdc"], +Cell[590693, 14087, 726, 15, 63, "Message",ExpressionUUID->"f445c1cc-6eae-4086-aeb1-a147cba5fdf4"], +Cell[591422, 14104, 495, 11, 26, "Message",ExpressionUUID->"b2241da7-9a53-490b-a46c-a5f2524db669"], +Cell[591920, 14117, 194, 3, 33, "Output",ExpressionUUID->"1dfe9deb-d9cc-43f7-9752-c1661f9fe280"] +}, Open ]], +Cell[CellGroupData[{ +Cell[592151, 14125, 2077, 59, 234, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], +Cell[594231, 14186, 726, 15, 63, "Message",ExpressionUUID->"4b41bf57-832a-4b25-af79-4ff91b84f64b"], +Cell[594960, 14203, 727, 15, 63, "Message",ExpressionUUID->"e71368f9-cf45-4ab0-8d2e-58ab52307a89"], +Cell[595690, 14220, 728, 15, 63, "Message",ExpressionUUID->"0d7b8419-c871-4658-afba-23b0a6dc05a2"], +Cell[596421, 14237, 495, 11, 26, "Message",ExpressionUUID->"6a71bee1-8925-41ca-85f9-89d3c3194fbd"], +Cell[596919, 14250, 194, 3, 33, "Output",ExpressionUUID->"004f1b46-fd10-4722-b6d3-832e3c0b0b8a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[597150, 14258, 2051, 55, 151, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], +Cell[599204, 14315, 23463, 432, 242, "Output",ExpressionUUID->"d6d1a7ed-c77c-4a5c-844a-611f28db6176"] +}, Open ]], +Cell[CellGroupData[{ +Cell[622704, 14752, 2168, 61, 261, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], +Cell[624875, 14815, 563, 12, 58, "Message",ExpressionUUID->"e98739f0-b677-4ad0-95ee-aefff3078998"], +Cell[625441, 14829, 565, 12, 58, "Message",ExpressionUUID->"901cf128-69f7-4d21-909c-33e59ef1d370"], +Cell[626009, 14843, 570, 12, 58, "Message",ExpressionUUID->"687f3374-8478-4660-852b-66d3d3e6d2a6"], +Cell[626582, 14857, 495, 11, 26, "Message",ExpressionUUID->"4e3f3397-3664-4d08-a6f8-67029a16a153"], +Cell[627080, 14870, 33170, 591, 232, "Output",ExpressionUUID->"c56d2a4a-43dd-4325-b24a-bdb73a881535"] +}, Open ]], +Cell[CellGroupData[{ +Cell[660287, 15466, 232, 5, 29, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], +Cell[660522, 15473, 39542, 723, 232, "Output",ExpressionUUID->"e4435438-2588-4789-a74d-5fd618f2c6d7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[700101, 16201, 1616, 48, 104, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], +Cell[701720, 16251, 170, 3, 33, "Output",ExpressionUUID->"65de811e-a611-4743-9354-b01dc13050b5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[701927, 16259, 2272, 64, 212, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], +Cell[704202, 16325, 702, 15, 63, "Message",ExpressionUUID->"974c8d03-79a4-4d21-847b-9629b419d97a"], +Cell[704907, 16342, 703, 15, 63, "Message",ExpressionUUID->"5ce1f4cd-0997-46e3-9412-4569fb94e59b"], +Cell[705613, 16359, 704, 15, 63, "Message",ExpressionUUID->"2da36458-5663-4f1f-b854-e1ab8f5c30fc"], +Cell[706320, 16376, 473, 11, 26, "Message",ExpressionUUID->"967e722c-65a9-4c19-8803-467a127bcc93"], +Cell[706796, 16389, 171, 3, 33, "Output",ExpressionUUID->"dde45f09-eff1-4086-9bf2-8acfe26469e9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[707004, 16397, 2233, 63, 212, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], +Cell[709240, 16462, 702, 15, 63, "Message",ExpressionUUID->"d79ffc1f-7cbb-4420-9e3b-89c9537fb457"], +Cell[709945, 16479, 703, 15, 63, "Message",ExpressionUUID->"db99c7c8-56b9-47ca-9c39-726d9bf3bdba"], +Cell[710651, 16496, 706, 15, 63, "Message",ExpressionUUID->"dd9cb203-de23-4b28-8592-4ab66a2d7a1b"], +Cell[711360, 16513, 471, 11, 26, "Message",ExpressionUUID->"2e70867e-fc16-47db-a18d-604971b8b562"], +Cell[711834, 16526, 171, 3, 33, "Output",ExpressionUUID->"6f6222b8-45bb-4da1-bc45-86a9371ede1c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[712042, 16534, 2235, 63, 212, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], +Cell[714280, 16599, 702, 15, 63, "Message",ExpressionUUID->"63167a5a-26cf-44a4-a797-c3c007a55dc0"], +Cell[714985, 16616, 705, 15, 63, "Message",ExpressionUUID->"7c104b1d-ca09-43b3-b223-b8152eaeda96"], +Cell[715693, 16633, 704, 15, 63, "Message",ExpressionUUID->"39300c0d-9c97-4c31-ad24-d0d72fce34c6"], +Cell[716400, 16650, 471, 11, 26, "Message",ExpressionUUID->"abc26cc3-27c8-4072-b4aa-970204f81120"], +Cell[716874, 16663, 170, 3, 33, "Output",ExpressionUUID->"d215678b-5f87-4dbb-a4ef-1e8da40b64f8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[717081, 16671, 236, 6, 46, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], +Cell[717320, 16679, 170, 3, 33, "Output",ExpressionUUID->"16600dd9-5874-4769-a3a0-6f0383baad67"] +}, Open ]], +Cell[717505, 16685, 154, 3, 29, "Input",ExpressionUUID->"c7f7047c-c0ff-4b07-94d6-9bb08fef1c61"] } ] *) -(* End of internal cache information *) - diff --git a/Pu240_798-811_TitovAA/154-86_h_Pu240_8-9/h_154-86_Pu240_8-9_pr_Qw2.nb b/Pu240_798-811_TitovAA/154-86_h_Pu240_8-9/h_154-86_Pu240_8-9_pr_Qw2.nb index e455cd2..b9f0585 100644 --- a/Pu240_798-811_TitovAA/154-86_h_Pu240_8-9/h_154-86_Pu240_8-9_pr_Qw2.nb +++ b/Pu240_798-811_TitovAA/154-86_h_Pu240_8-9/h_154-86_Pu240_8-9_pr_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 634769, 15170] -NotebookOptionsPosition[ 595524, 14542] -NotebookOutlinePosition[ 595987, 14561] -CellTagsIndexPosition[ 595944, 14558] +NotebookDataLength[ 747171, 17268] +NotebookOptionsPosition[ 706645, 16619] +NotebookOutlinePosition[ 707109, 16638] +CellTagsIndexPosition[ 707066, 16635] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -30,8 +30,9 @@ Cell[BoxData[ Cell[BoxData["4.2`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.99380408955241*^9, {3.993804138192917*^9, - 3.993804174131279*^9}, 3.993848807080508*^9, 3.993850014886361*^9}, - CellLabel->"Out[1]=",ExpressionUUID->"f3563bd7-af39-4b63-9eb3-1a10e7541960"] + 3.993804174131279*^9}, 3.993848807080508*^9, 3.993850014886361*^9, + 3.994357759464162*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"605c0dd8-5cf5-4e34-8d2a-cac55cbc5a4b"] }, Open ]], Cell[CellGroupData[{ @@ -45,8 +46,9 @@ Cell[BoxData[ Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.993804089814312*^9, {3.993804138273077*^9, - 3.993804174168432*^9}, 3.993848807152666*^9, 3.993850014997057*^9}, - CellLabel->"Out[2]=",ExpressionUUID->"326aff7f-2fea-41a5-be13-ddd445eab4e0"] + 3.993804174168432*^9}, 3.993848807152666*^9, 3.993850014997057*^9, + 3.994357759473771*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"5f655f1c-f6da-4557-bfed-836eae5dfd13"] }, Open ]], Cell[CellGroupData[{ @@ -60,8 +62,9 @@ Cell[BoxData[ Cell[BoxData["154"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.993804089831574*^9, {3.993804138291234*^9, - 3.993804174184713*^9}, 3.993848807170314*^9, 3.99385001501414*^9}, - CellLabel->"Out[3]=",ExpressionUUID->"2891c05b-7bf2-47a9-80d8-8c378e6748ae"] + 3.993804174184713*^9}, 3.993848807170314*^9, 3.99385001501414*^9, + 3.9943577594835978`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"4c42da71-c076-483b-81fb-39d0c2c33451"] }, Open ]], Cell[CellGroupData[{ @@ -74,8 +77,9 @@ Cell[BoxData[ Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.993804089848836*^9, {3.993804138308714*^9, - 3.9938041741991873`*^9}, 3.993848807187145*^9, 3.993850015029634*^9}, - CellLabel->"Out[4]=",ExpressionUUID->"fc34fd03-4a55-4cf3-ad3b-848224b5213b"] + 3.9938041741991873`*^9}, 3.993848807187145*^9, 3.993850015029634*^9, + 3.994357759494472*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"611e2f3a-ae2d-42bc-848a-474b0ba08bcf"] }, Open ]], Cell[CellGroupData[{ @@ -92,8 +96,9 @@ Cell[BoxData[ Cell[BoxData["0.5457500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.993804089866067*^9, {3.993804138325652*^9, - 3.993804174213254*^9}, 3.993848807191246*^9, 3.993850015045536*^9}, - CellLabel->"Out[5]=",ExpressionUUID->"3554a330-5391-4d9c-a154-30b98f84b573"] + 3.993804174213254*^9}, 3.993848807191246*^9, 3.993850015045536*^9, + 3.994357759506022*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"b7a1b761-4b4b-4a36-9816-7fd329b9d1b4"] }, Open ]], Cell[CellGroupData[{ @@ -105,8 +110,9 @@ Cell[BoxData[ Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.9938040898834*^9, {3.993804138342436*^9, - 3.993804174228182*^9}, 3.9938488072167788`*^9, 3.9938500150617867`*^9}, - CellLabel->"Out[6]=",ExpressionUUID->"0d7eca86-e8a0-404f-a50c-84315f736b8c"] + 3.993804174228182*^9}, 3.9938488072167788`*^9, 3.9938500150617867`*^9, + 3.9943577595183353`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"5506af8f-232d-47bc-a619-9401cd66baf1"] }, Open ]], Cell[CellGroupData[{ @@ -122,8 +128,9 @@ Cell[BoxData[ Cell[BoxData["6.21772575671982`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.99380408990067*^9, {3.9938041383460903`*^9, - 3.9938041742424393`*^9}, 3.993848807233614*^9, 3.993850015079445*^9}, - CellLabel->"Out[7]=",ExpressionUUID->"199abe01-34a0-41e2-a37f-b58d2a1b6624"] + 3.9938041742424393`*^9}, 3.993848807233614*^9, 3.993850015079445*^9, + 3.9943577595295267`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"1c8fd4b3-3775-48d5-9fa1-7f5f184ddcf0"] }, Open ]], Cell[CellGroupData[{ @@ -140,8 +147,9 @@ Cell[BoxData[ Cell[BoxData["5.12024575643284`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.993804089917811*^9, {3.993804138377798*^9, - 3.993804174256633*^9}, 3.993848807250407*^9, 3.9938500151003723`*^9}, - CellLabel->"Out[8]=",ExpressionUUID->"b5582a08-4023-408c-a924-a3f240af55df"] + 3.993804174256633*^9}, 3.993848807250407*^9, 3.9938500151003723`*^9, + 3.9943577595380573`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"a43e7ce0-fcfb-40b8-a877-6df827bdcb1b"] }, Open ]], Cell[CellGroupData[{ @@ -155,8 +163,8 @@ Cell[BoxData[ Cell[BoxData["1.0205`"], "Output", CellChangeTimes->{ 3.993804089951392*^9, {3.993804138395643*^9, 3.993804174270754*^9}, - 3.993848807267117*^9, 3.99385001512027*^9}, - CellLabel->"Out[9]=",ExpressionUUID->"e0d1d1ba-c5fb-4817-a0ca-96b5a7ec8bdf"] + 3.993848807267117*^9, 3.99385001512027*^9, 3.994357759546897*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"c7517266-8c33-478a-bb2a-a5064332d856"] }, Open ]], Cell[CellGroupData[{ @@ -170,8 +178,8 @@ Cell[BoxData[ Cell[BoxData["0.4896`"], "Output", CellChangeTimes->{ 3.9938040899683237`*^9, {3.993804138413007*^9, 3.993804174284833*^9}, - 3.993848807283663*^9, 3.9938500151378098`*^9}, - CellLabel->"Out[10]=",ExpressionUUID->"d39d1c0b-af89-447a-a8e5-8c35e6437216"] + 3.993848807283663*^9, 3.9938500151378098`*^9, 3.994357759558692*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"0d465331-fd4a-4fea-96ae-ea6dec7d0fdd"] }, Open ]], Cell[CellGroupData[{ @@ -183,8 +191,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.993804090003015*^9, {3.993804138429922*^9, - 3.993804174299185*^9}, 3.993848807299727*^9, 3.99385001515484*^9}, - CellLabel->"Out[11]=",ExpressionUUID->"c5bde84d-2703-457d-9097-aa902836ab96"] + 3.993804174299185*^9}, 3.993848807299727*^9, 3.99385001515484*^9, + 3.994357759569087*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"834b2610-0f29-4cb4-bd14-6204a65a7d7b"] }, Open ]], Cell[CellGroupData[{ @@ -196,8 +205,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.993804090019147*^9, {3.993804138446356*^9, - 3.993804174313979*^9}, 3.993848807315777*^9, 3.993850015170484*^9}, - CellLabel->"Out[12]=",ExpressionUUID->"b8f5fee9-c6c1-42fe-8d8c-7e32b9ea8d72"] + 3.993804174313979*^9}, 3.993848807315777*^9, 3.993850015170484*^9, + 3.994357759580513*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"e1ce7fb8-52f5-4f67-b4e6-bda51b3f1bdc"] }, Open ]], Cell[CellGroupData[{ @@ -226,8 +236,9 @@ Cell[BoxData[ Cell[BoxData["2.622074662477555`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.993804090035692*^9, {3.9938041384628077`*^9, - 3.9938041743173933`*^9}, 3.9938488073318787`*^9, 3.993850015186336*^9}, - CellLabel->"Out[13]=",ExpressionUUID->"48e33ba1-cf69-46ca-855e-fb9af129fec4"] + 3.9938041743173933`*^9}, 3.9938488073318787`*^9, 3.993850015186336*^9, + 3.994357759591086*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"584a9122-bbbb-4c5f-aff4-57cd807545fd"] }, Open ]], Cell[CellGroupData[{ @@ -256,8 +267,9 @@ Cell[BoxData[ Cell[BoxData["1.560486547241578`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.993804090054099*^9, {3.993804138479048*^9, - 3.9938041743344707`*^9}, 3.99384880734788*^9, 3.993850015201384*^9}, - CellLabel->"Out[14]=",ExpressionUUID->"86ef11bf-adf7-4235-bbb2-3d7918124d23"] + 3.9938041743344707`*^9}, 3.99384880734788*^9, 3.993850015201384*^9, + 3.99435775960155*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"42137ad4-fbdb-42ea-9101-b9886f8c11b0"] }, Open ]], Cell[CellGroupData[{ @@ -317,8 +329,9 @@ Cell[BoxData[ Cell[BoxData["0.2903701468853932`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.993804090071563*^9, {3.993804138496574*^9, - 3.99380417434737*^9}, 3.993848807363336*^9, 3.993850015215604*^9}, - CellLabel->"Out[15]=",ExpressionUUID->"15d72347-a19d-4cc5-a7ff-b399d509b59a"] + 3.99380417434737*^9}, 3.993848807363336*^9, 3.993850015215604*^9, + 3.9943577596122217`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"81e06ad6-0bc4-4899-8336-476a0101f47f"] }, Open ]], Cell[CellGroupData[{ @@ -375,8 +388,9 @@ Cell[BoxData[ RowBox[{"-", "0.06800962519581188`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.9938040900903397`*^9, {3.993804138513081*^9, - 3.993804174360331*^9}, 3.9938488073821497`*^9, 3.993850015233636*^9}, - CellLabel->"Out[16]=",ExpressionUUID->"992554df-c8b9-4758-9a90-cacea04f536f"] + 3.993804174360331*^9}, 3.9938488073821497`*^9, 3.993850015233636*^9, + 3.994357759623601*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"23eb0274-913e-4c76-af5e-c56188e5cd71"] }, Open ]], Cell[CellGroupData[{ @@ -433,8 +447,9 @@ Cell[BoxData[ RowBox[{"-", "0.40916894338639737`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.9938040901078167`*^9, {3.993804138530313*^9, - 3.993804174375409*^9}, 3.9938488073997*^9, 3.993850015252336*^9}, - CellLabel->"Out[17]=",ExpressionUUID->"f67a0899-9ea3-4a7a-83f3-38f269cd12ba"] + 3.993804174375409*^9}, 3.9938488073997*^9, 3.993850015252336*^9, + 3.994357759635666*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"7e953fab-27cd-4e3c-bd6c-dceb2d097234"] }, Open ]], Cell[CellGroupData[{ @@ -494,8 +509,9 @@ Cell[BoxData[ Cell[BoxData["0.6026750051187908`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9938040901250677`*^9, {3.993804138546773*^9, - 3.993804174388777*^9}, 3.99384880741957*^9, 3.993850015290463*^9}, - CellLabel->"Out[18]=",ExpressionUUID->"6f85cf2a-3631-454f-af43-dc6b727f47c6"] + 3.993804174388777*^9}, 3.99384880741957*^9, 3.993850015290463*^9, + 3.9943577596458683`*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"e33e465d-900f-4b9b-bdcc-a6981d89caa1"] }, Open ]], Cell[CellGroupData[{ @@ -507,8 +523,9 @@ Cell[BoxData[ Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.993804090141823*^9, {3.9938041385623407`*^9, - 3.993804174402438*^9}, 3.993848807437189*^9, 3.993850015315119*^9}, - CellLabel->"Out[19]=",ExpressionUUID->"da6c54cd-ef7f-49b4-8dfe-efbc1933ab0a"] + 3.993804174402438*^9}, 3.993848807437189*^9, 3.993850015315119*^9, + 3.994357759656818*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"7ac43e8f-1a66-4820-ac01-256bde56814f"] }, Open ]], Cell[CellGroupData[{ @@ -520,8 +537,9 @@ Cell[BoxData[ Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.993804090158958*^9, {3.993804138578629*^9, - 3.99380417441667*^9}, 3.9938488074549294`*^9, 3.993850015328617*^9}, - CellLabel->"Out[20]=",ExpressionUUID->"89391acf-6cd4-4ee0-81d2-3a91d5782fea"] + 3.99380417441667*^9}, 3.9938488074549294`*^9, 3.993850015328617*^9, + 3.9943577596671867`*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"43a22b19-c88f-49a4-aa14-eece2bc612fb"] }, Open ]], Cell[CellGroupData[{ @@ -533,8 +551,9 @@ Cell[BoxData[ Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.993804090177505*^9, {3.993804138595006*^9, - 3.993804174430525*^9}, 3.9938488074728813`*^9, 3.993850015343734*^9}, - CellLabel->"Out[21]=",ExpressionUUID->"99f511cc-8a95-431b-9c1f-ceafdceb17fc"] + 3.993804174430525*^9}, 3.9938488074728813`*^9, 3.993850015343734*^9, + 3.994357759676675*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"b9bb60fe-2bad-498c-99be-fe2893792232"] }, Open ]], Cell[CellGroupData[{ @@ -549,8 +568,9 @@ Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.993804090194539*^9, {3.993804138611753*^9, - 3.993804174445389*^9}, 3.993848807490819*^9, 3.993850015359054*^9}, - CellLabel->"Out[22]=",ExpressionUUID->"e468c1d1-d37a-406c-a570-d975a8693fc3"] + 3.993804174445389*^9}, 3.993848807490819*^9, 3.993850015359054*^9, + 3.994357759686672*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"2931a8ff-df0c-4057-b90d-ce9aa0106ff9"] }, Open ]], Cell[CellGroupData[{ @@ -562,8 +582,9 @@ Cell[BoxData[ Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.9938040902126007`*^9, {3.99380413862824*^9, - 3.9938041744613132`*^9}, 3.993848807508507*^9, 3.9938500153719788`*^9}, - CellLabel->"Out[23]=",ExpressionUUID->"e4a0e6a0-3e0d-4645-9a1e-1a6537417ec1"] + 3.9938041744613132`*^9}, 3.993848807508507*^9, 3.9938500153719788`*^9, + 3.994357759699048*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"27fbcc3e-e9cb-4dc4-b698-6ad701716dcb"] }, Open ]], Cell[CellGroupData[{ @@ -578,8 +599,9 @@ Cell[BoxData[ Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.993804090230994*^9, {3.9938041386443443`*^9, - 3.993804174475325*^9}, 3.993848807527059*^9, 3.9938500153861322`*^9}, - CellLabel->"Out[24]=",ExpressionUUID->"83bd7b71-fb1f-4bc0-b01c-76a22698f557"] + 3.993804174475325*^9}, 3.993848807527059*^9, 3.9938500153861322`*^9, + 3.9943577597113543`*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"96fd70c9-2dac-43fe-a6e4-1c0e71dec043"] }, Open ]], Cell[CellGroupData[{ @@ -594,8 +616,9 @@ Cell[BoxData[ Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.993804090250367*^9, {3.993804138660377*^9, - 3.993804174489229*^9}, 3.9938488075448914`*^9, 3.993850015401675*^9}, - CellLabel->"Out[25]=",ExpressionUUID->"bf4e7aec-93a1-4d41-8dee-b7602c0247cd"] + 3.993804174489229*^9}, 3.9938488075448914`*^9, 3.993850015401675*^9, + 3.994357759723673*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"c6d3d6cb-761c-4fe9-93c5-faeb3dc0bcb5"] }, Open ]], Cell[CellGroupData[{ @@ -609,8 +632,9 @@ Cell[BoxData[ Cell[BoxData["86"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.993804090267005*^9, {3.9938041386777277`*^9, - 3.993804174504216*^9}, 3.9938488075630293`*^9, 3.993850015416362*^9}, - CellLabel->"Out[26]=",ExpressionUUID->"9f2a2e41-77e4-40c9-95fa-6b28f952c064"] + 3.993804174504216*^9}, 3.9938488075630293`*^9, 3.993850015416362*^9, + 3.99435775973533*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"ebd10f95-8e54-4f58-a069-bb20b06141be"] }, Open ]], Cell[CellGroupData[{ @@ -630,8 +654,9 @@ Cell[BoxData[ Cell[BoxData["0.11093023255813952`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9938040902837143`*^9, {3.9938041386945467`*^9, - 3.9938041745182133`*^9}, 3.9938488075813007`*^9, 3.9938500154318733`*^9}, - CellLabel->"Out[27]=",ExpressionUUID->"4d89a307-fce4-48be-8285-a9c7c9ce2360"] + 3.9938041745182133`*^9}, 3.9938488075813007`*^9, 3.9938500154318733`*^9, + 3.994357759745295*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"f942b924-45d3-4c39-b6ee-c7295c1ca407"] }, Open ]], Cell[CellGroupData[{ @@ -652,8 +677,9 @@ Cell[BoxData[ RowBox[{"-", "2.5630897009966778`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.993804090300918*^9, {3.993804138711464*^9, - 3.99380417453297*^9}, 3.993848807599778*^9, 3.9938500154470463`*^9}, - CellLabel->"Out[28]=",ExpressionUUID->"d5d7e83b-00ce-4523-bf11-20a782c1cfda"] + 3.99380417453297*^9}, 3.993848807599778*^9, 3.9938500154470463`*^9, + 3.994357759755495*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"eba91c38-781c-4063-9b96-e08212267260"] }, Open ]], Cell[CellGroupData[{ @@ -689,8 +715,9 @@ Cell[BoxData[ Cell[BoxData["20.50874671482353`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.993804090321062*^9, {3.9938041387284813`*^9, - 3.993804174547089*^9}, 3.993848807619718*^9, 3.993850015463646*^9}, - CellLabel->"Out[29]=",ExpressionUUID->"987d16a5-125d-420a-88d8-52e2829fc176"] + 3.993804174547089*^9}, 3.993848807619718*^9, 3.993850015463646*^9, + 3.994357759771172*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"edadf388-e3b3-4b86-8c3d-421dcd76c54d"] }, Open ]], Cell[CellGroupData[{ @@ -703,8 +730,9 @@ Cell[BoxData[ Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.9938040903372*^9, {3.9938041387455187`*^9, - 3.993804174560532*^9}, 3.9938488076417303`*^9, 3.99385001547721*^9}, - CellLabel->"Out[30]=",ExpressionUUID->"80022cdf-b28d-43b5-8c1b-f42b64e684b2"] + 3.993804174560532*^9}, 3.9938488076417303`*^9, 3.99385001547721*^9, + 3.994357759783143*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"ab96ffc6-c1b9-4a03-90f3-93cf8b86086f"] }, Open ]], Cell[CellGroupData[{ @@ -719,8 +747,8 @@ Cell[BoxData[ Cell[BoxData["1.82`"], "Output", CellChangeTimes->{ 3.993804090368265*^9, {3.993804138763773*^9, 3.993804174574923*^9}, - 3.993848807660918*^9, 3.993850015490944*^9}, - CellLabel->"Out[31]=",ExpressionUUID->"65c3c7c9-1acb-41c4-b7aa-28442266c944"] + 3.993848807660918*^9, 3.993850015490944*^9, 3.994357759793268*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"a165b895-a536-430b-9f6b-8238f7790854"] }, Open ]], Cell[BoxData[""], "Input", @@ -739,8 +767,8 @@ Cell[BoxData[ Cell[BoxData["0.845`"], "Output", CellChangeTimes->{ 3.993804090400498*^9, {3.9938041388176193`*^9, 3.9938041746000147`*^9}, - 3.993848807703788*^9, 3.9938500155144253`*^9}, - CellLabel->"Out[33]=",ExpressionUUID->"8c1c74b2-34df-46b1-8998-59d05f5928c3"] + 3.993848807703788*^9, 3.9938500155144253`*^9, 3.9943577598142967`*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"b707c338-05f7-47ba-a313-96317535186f"] }, Open ]], Cell[BoxData[""], "Input", @@ -759,8 +787,8 @@ Cell[BoxData[ Cell[BoxData["2.34`"], "Output", CellChangeTimes->{ 3.993804090432963*^9, {3.993804138872542*^9, 3.9938041746232433`*^9}, - 3.993848807741784*^9, 3.993850015538205*^9}, - CellLabel->"Out[35]=",ExpressionUUID->"f696af0e-7376-4e24-ae0f-0b33366beb4a"] + 3.993848807741784*^9, 3.993850015538205*^9, 3.994357759834429*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"74f86e41-f9e3-4503-b7e9-d36588ce48a3"] }, Open ]], Cell[BoxData[""], "Input", @@ -779,8 +807,8 @@ Cell[BoxData[ Cell[BoxData["1.235`"], "Output", CellChangeTimes->{ 3.99380409046647*^9, {3.9938041389300737`*^9, 3.993804174645626*^9}, - 3.993848807767399*^9, 3.9938500197905807`*^9}, - CellLabel->"Out[37]=",ExpressionUUID->"822198f2-7d3e-4942-b28e-26bd1a6ad4bb"] + 3.993848807767399*^9, 3.9938500197905807`*^9, 3.994357759855328*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"94ac32ab-293c-463e-a47d-7b8b3fd52945"] }, Open ]], Cell[BoxData[""], "Input", @@ -799,8 +827,8 @@ Cell[BoxData[ Cell[BoxData["2.157`"], "Output", CellChangeTimes->{ 3.993804090500058*^9, {3.993804138981492*^9, 3.993804174669353*^9}, - 3.993848807792426*^9, 3.993850020182446*^9}, - CellLabel->"Out[39]=",ExpressionUUID->"d03d3926-2b96-423e-a160-479212485ea1"] + 3.993848807792426*^9, 3.993850020182446*^9, 3.994357759875355*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"66f3761b-8780-4f8c-8986-ea967c841921"] }, Open ]], Cell[BoxData[""], "Input", @@ -819,8 +847,8 @@ Cell[BoxData[ Cell[BoxData["0.647`"], "Output", CellChangeTimes->{ 3.993804090532151*^9, {3.993804139031171*^9, 3.993804174692378*^9}, - 3.9938488078179283`*^9, 3.9938500202294903`*^9}, - CellLabel->"Out[41]=",ExpressionUUID->"6e7ff47c-ca8d-4d20-b867-4cf5ac8afe5f"] + 3.9938488078179283`*^9, 3.9938500202294903`*^9, 3.9943577598950768`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"cfe79b63-f89d-425a-b7be-a4a7458cea34"] }, Open ]], Cell[BoxData[""], "Input", @@ -839,8 +867,8 @@ Cell[BoxData[ Cell[BoxData["1.76`"], "Output", CellChangeTimes->{ 3.993804090566051*^9, {3.993804139085739*^9, 3.9938041747149076`*^9}, - 3.993848807844983*^9, 3.9938500202522993`*^9}, - CellLabel->"Out[43]=",ExpressionUUID->"9ff93c4e-23c1-49cf-b3b9-aa7bd2be95b2"] + 3.993848807844983*^9, 3.9938500202522993`*^9, 3.9943577599136333`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"ee616125-36fd-470f-ac7d-115081a68cd9"] }, Open ]], Cell[BoxData[""], "Input", @@ -858,8 +886,8 @@ Cell[BoxData[ Cell[BoxData["1.075`"], "Output", CellChangeTimes->{ 3.993804090634049*^9, {3.993804139137789*^9, 3.99380417473573*^9}, - 3.993848807872305*^9, 3.9938500203036222`*^9}, - CellLabel->"Out[45]=",ExpressionUUID->"e5534b50-a36d-4716-b90e-9d1bc207ccc3"] + 3.993848807872305*^9, 3.9938500203036222`*^9, 3.9943577599315166`*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"c5d1130c-6b1a-437b-8219-4929519b1741"] }, Open ]], Cell[BoxData[""], "Input", @@ -1358,8 +1386,9 @@ ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== Cell[BoxData["0.01224942383714716`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.993804090716114*^9, {3.993804139208848*^9, - 3.993804174782381*^9}, 3.9938488102384644`*^9, 3.993850020432776*^9}, - CellLabel->"Out[47]=",ExpressionUUID->"3a18a05a-7d36-4f65-a8c2-5b86e5955cb9"] + 3.993804174782381*^9}, 3.9938488102384644`*^9, 3.993850020432776*^9, + 3.994357760036113*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"4596213f-657f-4141-91f9-af9226ff98ee"] }, Open ]], Cell[CellGroupData[{ @@ -1858,8 +1887,9 @@ Cell[BoxData[ Cell[BoxData["0.5889492852231504`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9938040907433662`*^9, {3.9938041392562933`*^9, - 3.99380417480917*^9}, 3.9938488104573317`*^9, 3.9938500205801888`*^9}, - CellLabel->"Out[48]=",ExpressionUUID->"fbdb1562-eb20-42de-af62-1003404da298"] + 3.99380417480917*^9}, 3.9938488104573317`*^9, 3.9938500205801888`*^9, + 3.994357760113679*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"3f486017-ca1e-4452-9512-caf0604cd5e1"] }, Open ]], Cell[CellGroupData[{ @@ -2353,8 +2383,9 @@ Cell[BoxData[ RowBox[{"-", "12.704649244928842`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.993804090767948*^9, {3.993804139281644*^9, - 3.99380417483276*^9}, 3.993848810481243*^9, 3.993850020641766*^9}, - CellLabel->"Out[49]=",ExpressionUUID->"2fc4431c-8e5b-4259-8436-f9bd7e780897"] + 3.99380417483276*^9}, 3.993848810481243*^9, 3.993850020641766*^9, + 3.994357760184553*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"65e5e4d6-a79c-448b-87ef-e1bfbc3a9fe6"] }, Open ]], Cell[CellGroupData[{ @@ -2918,8 +2949,9 @@ Cell[BoxData[ RowBox[{"-", "15.223385141555047`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.993804090797073*^9, {3.993804139310915*^9, - 3.993804174861484*^9}, 3.9938488105114737`*^9, 3.993850020696823*^9}, - CellLabel->"Out[50]=",ExpressionUUID->"e299d0d0-3001-4a95-9311-637a7a6eb28c"] + 3.993804174861484*^9}, 3.9938488105114737`*^9, 3.993850020696823*^9, + 3.994357760289063*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"557d3c81-2c8f-4ba8-acad-0d4879909a42"] }, Open ]], Cell[CellGroupData[{ @@ -3483,8 +3515,9 @@ Cell[BoxData[ RowBox[{"-", "39.03111013094529`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.993804090827354*^9, {3.9938041393422422`*^9, - 3.9938041748908043`*^9}, 3.9938488105468807`*^9, 3.993850020762871*^9}, - CellLabel->"Out[51]=",ExpressionUUID->"f906fa8a-fc1f-4b22-841c-fd4c739d1553"] + 3.9938041748908043`*^9}, 3.9938488105468807`*^9, 3.993850020762871*^9, + 3.994357760389351*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"cd7910ef-5dfc-42bf-bda4-ad3fbb7e2631"] }, Open ]], Cell[CellGroupData[{ @@ -4121,8 +4154,9 @@ Cell[BoxData[ RowBox[{"-", "94.34556705329022`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.993804090863044*^9, {3.993804139389662*^9, - 3.993804174924636*^9}, 3.993848810587708*^9, 3.993850020833549*^9}, - CellLabel->"Out[52]=",ExpressionUUID->"c40f6db5-e25e-4c0c-bd4e-6478d62ecba7"] + 3.993804174924636*^9}, 3.993848810587708*^9, 3.993850020833549*^9, + 3.9943577604805393`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"9e1702b9-3dd6-41c4-a9fb-47e11c3319e3"] }, Open ]], Cell[CellGroupData[{ @@ -4134,8 +4168,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.993804090879141*^9, {3.9938041394058332`*^9, - 3.993804174941469*^9}, 3.99384881061217*^9, 3.993850020897704*^9}, - CellLabel->"Out[53]=",ExpressionUUID->"df6d9ecc-0801-4375-8b35-37d27df296b0"] + 3.993804174941469*^9}, 3.99384881061217*^9, 3.993850020897704*^9, + 3.994357760542159*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"e86ed846-856a-474b-8566-8a26a5a0511c"] }, Open ]], Cell[CellGroupData[{ @@ -4147,8 +4182,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.993804090895958*^9, {3.9938041394218063`*^9, - 3.993804174954442*^9}, 3.993848810635922*^9, 3.993850020915135*^9}, - CellLabel->"Out[54]=",ExpressionUUID->"2f2952fc-54a0-4378-9556-9a82df82dedc"] + 3.993804174954442*^9}, 3.993848810635922*^9, 3.993850020915135*^9, + 3.994357760554384*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"6fe27167-5c08-4209-aeec-c9f435b7cd76"] }, Open ]], Cell[CellGroupData[{ @@ -4197,8 +4233,9 @@ Cell[BoxData[ Cell[BoxData["40.9342324933027`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.993804090912829*^9, {3.99380413943988*^9, - 3.9938041749678583`*^9}, 3.993848810656166*^9, 3.99385002093215*^9}, - CellLabel->"Out[55]=",ExpressionUUID->"b9faac28-29de-4d9d-a2e9-24bb071b5403"] + 3.9938041749678583`*^9}, 3.993848810656166*^9, 3.99385002093215*^9, + 3.9943577605665293`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"e0093824-de42-4f0f-831d-dce5c58dcafd"] }, Open ]], Cell[CellGroupData[{ @@ -4244,8 +4281,9 @@ Cell[BoxData[ RowBox[{"-", "42.16041879106114`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.993804090929619*^9, {3.993804139457325*^9, - 3.9938041749824657`*^9}, 3.9938488106762447`*^9, 3.993850020950242*^9}, - CellLabel->"Out[56]=",ExpressionUUID->"8f265979-08bb-46d9-996e-46373b9ca35c"] + 3.9938041749824657`*^9}, 3.9938488106762447`*^9, 3.993850020950242*^9, + 3.9943577605808496`*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"dd4199f0-73e1-4b51-9168-4e5c0d26014c"] }, Open ]], Cell[CellGroupData[{ @@ -4294,8 +4332,9 @@ Cell[BoxData[ Cell[BoxData["57.85215050076255`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.993804090946455*^9, {3.9938041394733677`*^9, - 3.993804174995661*^9}, 3.99384881069589*^9, 3.993850020969178*^9}, - CellLabel->"Out[57]=",ExpressionUUID->"fd430dce-d127-4df7-8d18-ada9b1f42400"] + 3.993804174995661*^9}, 3.99384881069589*^9, 3.993850020969178*^9, + 3.9943577605942307`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"df3e6420-202c-4928-9564-751e95427899"] }, Open ]], Cell[CellGroupData[{ @@ -4306,8 +4345,9 @@ Cell[BoxData["c11"], "Input", Cell[BoxData["0.2903701468853932`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.993804090963214*^9, {3.99380413948948*^9, - 3.993804175008822*^9}, 3.99384881071603*^9, 3.993850020983549*^9}, - CellLabel->"Out[58]=",ExpressionUUID->"7e665a03-e5dd-4d1b-b3c7-d12c8aabdb47"] + 3.993804175008822*^9}, 3.99384881071603*^9, 3.993850020983549*^9, + 3.994357760607087*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"adbb61de-0b8a-4f09-ac88-cb963f782354"] }, Open ]], Cell[CellGroupData[{ @@ -4319,8 +4359,9 @@ Cell[BoxData[ RowBox[{"-", "0.06800962519581188`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9938040909800377`*^9, {3.993804139506342*^9, - 3.993804175022502*^9}, 3.993848810736079*^9, 3.993850020999296*^9}, - CellLabel->"Out[59]=",ExpressionUUID->"3c53c2fa-10e8-49dc-bf07-639b76e8e996"] + 3.993804175022502*^9}, 3.993848810736079*^9, 3.993850020999296*^9, + 3.994357760619862*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"c2cae2fa-4b9d-47de-8020-2dd69d93a378"] }, Open ]], Cell[CellGroupData[{ @@ -4332,8 +4373,9 @@ Cell[BoxData[ RowBox[{"-", "0.40916894338639737`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.9938040909970512`*^9, {3.993804139523937*^9, - 3.99380417503624*^9}, 3.993848810755718*^9, 3.993850021015654*^9}, - CellLabel->"Out[60]=",ExpressionUUID->"db7aac0b-4d27-4cb2-a868-cf2b3017df41"] + 3.99380417503624*^9}, 3.993848810755718*^9, 3.993850021015654*^9, + 3.994357760632707*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"6476b6d8-4431-43f5-889f-10daf426631a"] }, Open ]], Cell[CellGroupData[{ @@ -4344,8 +4386,9 @@ Cell[BoxData["c22"], "Input", Cell[BoxData["0.6026750051187908`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.9938040910160313`*^9, {3.993804139541357*^9, - 3.9938041750504208`*^9}, 3.993848810776074*^9, 3.993850021037685*^9}, - CellLabel->"Out[61]=",ExpressionUUID->"c4fa88e5-dcd6-4f89-aadb-8b6fe0170664"] + 3.9938041750504208`*^9}, 3.993848810776074*^9, 3.993850021037685*^9, + 3.9943577606449842`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"070fdcd7-3ef9-4def-abde-2958efb31a5b"] }, Open ]], Cell[CellGroupData[{ @@ -4356,8 +4399,9 @@ Cell[BoxData["w1"], "Input", Cell[BoxData["2.622074662477555`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.9938040910322237`*^9, {3.993804139560528*^9, - 3.99380417506885*^9}, 3.9938488107953978`*^9, 3.9938500210559673`*^9}, - CellLabel->"Out[62]=",ExpressionUUID->"4d05cf70-54d2-4fd4-835e-ecffb1194531"] + 3.99380417506885*^9}, 3.9938488107953978`*^9, 3.9938500210559673`*^9, + 3.994357760655678*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"9b47f781-c565-4567-8972-2b59e27a256a"] }, Open ]], Cell[CellGroupData[{ @@ -4368,8 +4412,9 @@ Cell[BoxData["w2"], "Input", Cell[BoxData["1.560486547241578`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.9938040910476837`*^9, {3.99380413957936*^9, - 3.993804175086857*^9}, 3.993848810814839*^9, 3.993850021077848*^9}, - CellLabel->"Out[63]=",ExpressionUUID->"046dd38a-0f3c-4ff2-ace3-d1b7172fbf23"] + 3.993804175086857*^9}, 3.993848810814839*^9, 3.993850021077848*^9, + 3.994357760664904*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"aa67049f-1852-496d-9852-2b4201d6ab5a"] }, Open ]], Cell[CellGroupData[{ @@ -4396,8 +4441,9 @@ Cell[BoxData[ RowBox[{"-", "23.985225206889808`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.9938040910636168`*^9, {3.993804139598442*^9, - 3.993804175099869*^9}, 3.99384881083464*^9, 3.993850021096923*^9}, - CellLabel->"Out[64]=",ExpressionUUID->"0b9c76b1-2ef6-45e5-b0d2-7aa689b6906b"] + 3.993804175099869*^9}, 3.99384881083464*^9, 3.993850021096923*^9, + 3.994357760676257*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"23386e1a-71ac-400d-a3fe-ca8d20d8b606"] }, Open ]], Cell[CellGroupData[{ @@ -4424,8 +4470,9 @@ Cell[BoxData[ RowBox[{"-", "6.082813498068469`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.993804091079459*^9, {3.99380413961532*^9, - 3.993804175113451*^9}, 3.993848810854089*^9, 3.9938500211150293`*^9}, - CellLabel->"Out[65]=",ExpressionUUID->"4ba94c8b-1edc-4ad6-b2de-26b1710ab941"] + 3.993804175113451*^9}, 3.993848810854089*^9, 3.9938500211150293`*^9, + 3.994357760686386*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"1fb7154b-32f3-40e9-bea9-1954942ab885"] }, Open ]], Cell[CellGroupData[{ @@ -4495,8 +4542,9 @@ Cell[BoxData[ Cell[BoxData["16.949007286412893`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.993804091095646*^9, {3.9938041396344*^9, - 3.99380417512825*^9}, 3.9938488108741703`*^9, 3.993850021132896*^9}, - CellLabel->"Out[66]=",ExpressionUUID->"c254c0c7-fd30-4db3-be7e-c4f4456d3c64"] + 3.99380417512825*^9}, 3.9938488108741703`*^9, 3.993850021132896*^9, + 3.994357760698193*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"12aa871d-9ca6-4a87-ae94-5ab9615c9cc0"] }, Open ]], Cell[CellGroupData[{ @@ -4543,8 +4591,9 @@ Cell[BoxData[ RowBox[{"-", "42.16041879106114`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9938040911120157`*^9, {3.993804139651782*^9, - 3.9938041751438704`*^9}, 3.993848810893611*^9, 3.993850021146674*^9}, - CellLabel->"Out[67]=",ExpressionUUID->"1ce0a5ee-d6cb-4072-9d62-f34f70b317f6"] + 3.9938041751438704`*^9}, 3.993848810893611*^9, 3.993850021146674*^9, + 3.994357760710338*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"fe49c2de-64a5-46c1-bf21-c27f1ae9964b"] }, Open ]], Cell[CellGroupData[{ @@ -4615,8 +4664,9 @@ Cell[BoxData[ Cell[BoxData["51.76933700269408`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.993804091132085*^9, {3.993804139668528*^9, - 3.993804175187551*^9}, 3.993848810913933*^9, 3.993850021161421*^9}, - CellLabel->"Out[68]=",ExpressionUUID->"20f05eb1-acf3-4f8d-90e5-9623763d342c"] + 3.993804175187551*^9}, 3.993848810913933*^9, 3.993850021161421*^9, + 3.994357760721842*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"2863ff51-6456-457f-b8fd-f0f2fec3059d"] }, Open ]], Cell[CellGroupData[{ @@ -4681,8 +4731,9 @@ Cell[BoxData[ Cell[BoxData["4.836891405194621`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.993804091148937*^9, {3.9938041396855717`*^9, - 3.993804175204822*^9}, 3.993848810933175*^9, 3.9938500211811733`*^9}, - CellLabel->"Out[69]=",ExpressionUUID->"ba616d5b-5ceb-4f2e-a7cf-330b106c3d4d"] + 3.993804175204822*^9}, 3.993848810933175*^9, 3.9938500211811733`*^9, + 3.994357760732127*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"3d4e077b-753f-4be3-af21-b8c712d62b85"] }, Open ]], Cell[CellGroupData[{ @@ -4745,8 +4796,9 @@ Cell[BoxData[ Cell[BoxData["252.66846904104736`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.993804091165813*^9, {3.993804139705405*^9, - 3.993804175222055*^9}, 3.9938488109528217`*^9, 3.9938500212041197`*^9}, - CellLabel->"Out[70]=",ExpressionUUID->"dad1fb57-eb9a-41a0-a6c6-df4a30dbb003"] + 3.993804175222055*^9}, 3.9938488109528217`*^9, 3.9938500212041197`*^9, + 3.994357760745338*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"0a22e1ce-6dec-416e-9f6c-dc2a5648da34"] }, Open ]], Cell[CellGroupData[{ @@ -4757,8 +4809,8 @@ Cell[BoxData[ CellLabel->"In[71]:=",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], Cell[BoxData["0.47855`"], "Output", - CellChangeTimes->{3.993850021223638*^9}, - CellLabel->"Out[71]=",ExpressionUUID->"3cdd4ecc-0254-4edc-825b-cc30af281abe"] + CellChangeTimes->{3.993850021223638*^9, 3.9943577607556353`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"af0e570a-2419-429e-bb34-326035aff1d1"] }, Open ]], Cell[BoxData[""], "Input", @@ -4768,16 +4820,14 @@ Cell[BoxData[""], "Input", Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f2", "=", - RowBox[{"0.23891", "s"}]}]], "Input", + RowBox[{"f2", "=", "0.23891"}]], "Input", CellChangeTimes->{3.9918501402114105`*^9, 3.9938497464692574`*^9, - 3.9938498763235598`*^9}, + 3.9938498763235598`*^9, 3.994347842202589*^9}, CellLabel->"In[73]:=",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], -Cell[BoxData[ - RowBox[{"0.23891`", " ", "s"}]], "Output", - CellChangeTimes->{3.993850021247918*^9}, - CellLabel->"Out[73]=",ExpressionUUID->"61cfed40-e997-47a8-8f8b-543cc5e1fedf"] +Cell[BoxData["0.23891`"], "Output", + CellChangeTimes->{3.993850021247918*^9, 3.99435776077326*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"741b973d-644a-40f8-9d03-18a7abb7ca61"] }, Open ]], Cell[BoxData[""], "Input", @@ -4831,8 +4881,9 @@ Cell[BoxData[ CellLabel->"In[75]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], Cell[BoxData["2.401224501209607`*^-53"], "Output", - CellChangeTimes->{3.9913437871842365`*^9, 3.9938500212781267`*^9}, - CellLabel->"Out[75]=",ExpressionUUID->"a6766189-32c2-4eb6-ad1b-e2a63cd87dc7"] + CellChangeTimes->{3.9913437871842365`*^9, 3.9938500212781267`*^9, + 3.994357760795074*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"9e753c34-34c1-4b95-a725-fc7fd13f5400"] }, Open ]], Cell[CellGroupData[{ @@ -4870,8 +4921,9 @@ Cell[BoxData[ CellLabel->"In[76]:=",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], Cell[BoxData["1.1298344621202283`*^-54"], "Output", - CellChangeTimes->{3.9913437872132397`*^9, 3.993850021301969*^9}, - CellLabel->"Out[76]=",ExpressionUUID->"508d530f-05d1-449d-af8f-cc04be47f8c7"] + CellChangeTimes->{3.9913437872132397`*^9, 3.993850021301969*^9, + 3.9943577608057117`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"96a45ea7-d8d9-4eae-84b1-e2ecaf4cb946"] }, Open ]], Cell[CellGroupData[{ @@ -4907,10 +4959,10 @@ Cell[BoxData[ CellChangeTimes->{{3.9915576595317745`*^9, 3.9915576617156334`*^9}}, CellLabel->"In[77]:=",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[BoxData[ - RowBox[{"1.14384340371805`*^-54", " ", "s"}]], "Output", - CellChangeTimes->{3.9913437872412376`*^9, 3.9938500213235407`*^9}, - CellLabel->"Out[77]=",ExpressionUUID->"82f493a3-1030-43eb-beef-23f47d30fc0e"] +Cell[BoxData["1.1438434037180499`*^-54"], "Output", + CellChangeTimes->{3.9913437872412376`*^9, 3.9938500213235407`*^9, + 3.994357760816284*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"d06ea0b3-6748-4b03-9d92-a8a5d7bbb74e"] }, Open ]], Cell[CellGroupData[{ @@ -4935,13 +4987,10 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", CellLabel->"In[78]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[BoxData[ - FractionBox[ - RowBox[{"3.986031465294909`*^-52", " ", "s"}], - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}]]], "Output", - CellChangeTimes->{3.9913437872672386`*^9, 3.993850021341467*^9}, - CellLabel->"Out[78]=",ExpressionUUID->"452ab8f1-139e-467e-b1c2-23a3efc605dc"] +Cell[BoxData["15.845195800747504`"], "Output", + CellChangeTimes->{3.9913437872672386`*^9, 3.993850021341467*^9, + 3.994357760826386*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"8794016a-ffd8-48b3-bac1-e9f3eb7120dd"] }, Open ]], Cell[CellGroupData[{ @@ -4969,16 +5018,10 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", CellLabel->"In[79]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[BoxData[ - RowBox[{"6.04377959995752`*^107", " ", - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}]], "Output", - CellChangeTimes->{3.991343787279253*^9, 3.993850021359563*^9}, - CellLabel->"Out[79]=",ExpressionUUID->"62f358d6-3654-4015-8c3e-6608f325c5c7"] +Cell[BoxData["36.12108455420444`"], "Output", + CellChangeTimes->{3.991343787279253*^9, 3.993850021359563*^9, + 3.994357760836958*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"866c9251-02e6-42fa-bdbf-793fe22e1375"] }, Open ]], Cell[CellGroupData[{ @@ -4989,14 +5032,10 @@ Cell[BoxData[ FractionBox["Kb", "Qb3"]]}]], "Input", CellLabel->"In[80]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[BoxData[ - RowBox[{"1.1015717939774447`*^26", " ", - SqrtBox[ - FractionBox[ - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], "s"]]}]], "Output", - CellChangeTimes->{3.9913437873062572`*^9, 3.993850021378891*^9}, - CellLabel->"Out[80]=",ExpressionUUID->"f9031242-0a9e-43e5-b3b6-acf3f7e37dfb"] +Cell[BoxData["0.5525026474719789`"], "Output", + CellChangeTimes->{3.9913437873062572`*^9, 3.993850021378891*^9, + 3.994357760847679*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"7d5fc4f4-f245-4643-b556-70a540b1bd67"] }, Open ]], Cell[CellGroupData[{ @@ -5007,22 +5046,10 @@ Cell[BoxData[ FractionBox["Kw", "Qw3"]]}]], "Input", CellLabel->"In[81]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[BoxData[ - RowBox[{"2.04466053829128`*^-53", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], ")"}]}], - ")"}]}]}]], "Output", - CellChangeTimes->{3.9913437873353844`*^9, 3.993850021426485*^9}, - CellLabel->"Out[81]=",ExpressionUUID->"490578d9-e33d-40f1-a4be-419dc40fa4c6"] +Cell[BoxData["2.644813990594982`"], "Output", + CellChangeTimes->{3.9913437873353844`*^9, 3.993850021426485*^9, + 3.9943577608600817`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"1d8ca7e3-e9b5-453b-81cd-fac2fb1587a4"] }, Open ]], Cell[CellGroupData[{ @@ -5033,28 +5060,10 @@ Cell[BoxData[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", CellLabel->"In[82]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[BoxData[ - RowBox[{"1.2357477650162998`*^55", " ", - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], ")"}]}], - ")"}]}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}]], "Output", - CellChangeTimes->{3.991343787361582*^9, 3.9938500214523*^9}, - CellLabel->"Out[82]=",ExpressionUUID->"3e705fd2-b9a4-42f4-8102-0d64ff5cbe1e"] +Cell[BoxData["95.53354978442421`"], "Output", + CellChangeTimes->{3.991343787361582*^9, 3.9938500214523*^9, + 3.9943577608711576`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"2820dfd4-4c0f-42b6-b2e3-b70e1caac307"] }, Open ]], Cell[CellGroupData[{ @@ -5065,17 +5074,10 @@ Cell[BoxData[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", CellLabel->"In[83]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[BoxData[ - FractionBox[ - RowBox[{"4.3908998320754557`*^-26", " ", - SqrtBox[ - FractionBox[ - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], "s"]], " ", "s"}], - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}]]], "Output", - CellChangeTimes->{3.9913437873734856`*^9, 3.993850021476367*^9}, - CellLabel->"Out[83]=",ExpressionUUID->"b6c6e5a8-2be5-46ed-972f-e7921d6f7da2"] +Cell[BoxData["8.754512629624879`"], "Output", + CellChangeTimes->{3.9913437873734856`*^9, 3.993850021476367*^9, + 3.994357760881236*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"9aa31804-e87b-470b-9fb2-af3dd88f42a1"] }, Open ]], Cell[CellGroupData[{ @@ -5266,54 +5268,10 @@ Cell[BoxData[ RowBox[{"-", "2"}]]}]}]], "Input", CellLabel->"In[84]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[BoxData[ - RowBox[{ - RowBox[{"(", - RowBox[{"2.1061183354672167`*^110", " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"]}], ")"}], - "/", - RowBox[{"(", - RowBox[{ - RowBox[{"3.654191096947039`*^58", " ", - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], ")"}]}], - ")"}]}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], "+", - RowBox[{ - RowBox[{"(", - RowBox[{"9.24775464553404`*^84", " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"], " ", - SqrtBox[ - FractionBox[ - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], "s"]], " ", "s"}], - ")"}], "/", - RowBox[{"(", - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}]}], - ")"}]}]], "Output", - CellChangeTimes->{3.9913437874002857`*^9, 3.9938500215066137`*^9}, - CellLabel->"Out[84]=",ExpressionUUID->"e0312a76-7bba-4a5b-a8b5-1e07a2a24b2b"] +Cell[BoxData["0.012254995915062995`"], "Output", + CellChangeTimes->{3.9913437874002857`*^9, 3.9938500215066137`*^9, + 3.994357760895767*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"1ee54fbb-e65d-433e-93e6-07c5774eb8f5"] }, Open ]], Cell[CellGroupData[{ @@ -5328,254 +5286,10 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel->"In[85]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[BoxData[ - TemplateBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{"3.79230282449538`*^107", " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"]}], - ")"}], "/", - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{"9.24775464553404`*^84", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}], - " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], - "2"], " ", "s"}], ")"}], "/", - RowBox[{"(", - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], - "+", - RowBox[{"3.654191096947039`*^58", " ", - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}]}], ")"}], - " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{"1.1390541939552816`*^-51", "+", - RowBox[{"3.850240573554612`*^-52", " ", "s"}], "+", - RowBox[{"3.976847742971191`*^-53", " ", - SuperscriptBox["s", "2"]}], "+", - RowBox[{"1.14384340371805`*^-54", " ", - SuperscriptBox["s", "3"]}]}], ")"}], "/", - RowBox[{"(", - RowBox[{ - RowBox[{"2.4925279302047645`*^-101", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}], "+", - RowBox[{ - SuperscriptBox["s", "3"], " ", - RowBox[{"(", - RowBox[{ - RowBox[{"2.7371798230433217`*^-24", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}]}], - "+", - RowBox[{"5.46878652950234`*^-104", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}]}], - ")"}]}], "+", - RowBox[{ - SuperscriptBox["s", "2"], " ", - RowBox[{"(", - RowBox[{ - RowBox[{"3.7704148417950625`*^-23", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}]}], - "+", - RowBox[{"2.4041169465215256`*^-102", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}]}], - ")"}]}], "+", - RowBox[{"s", " ", - RowBox[{"(", - RowBox[{ - RowBox[{"1.2984192671183783`*^-22", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}]}], - "+", - RowBox[{"2.755564717590059`*^-101", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}]}], - ")"}]}]}], ")"}]}], ")"}], - RowBox[{"3", "/", "2"}]]}], ")"}]}], - InterpretationBox[ - DynamicModuleBox[{Typeset`open = False}, - TemplateBox[{"Expression", - StyleBox[ - TagBox[ - TooltipBox["\"condition\"", - TagBox[ - RowBox[{ - RowBox[{"Re", "[", - FractionBox[ - RowBox[{"7.10058593063731`*^-50", "+", - RowBox[{ - RowBox[{"\[LeftSkeleton]", "22", "\[RightSkeleton]"}], - " ", "s"}], "+", - RowBox[{ - RowBox[{"\[LeftSkeleton]", "24", "\[RightSkeleton]"}], - " ", - SuperscriptBox["s", "2"]}], "+", - RowBox[{"7.130440695793217`*^-53", " ", - SuperscriptBox["s", "3"]}]}], - RowBox[{ - RowBox[{"2.4925279302047645`*^-101", " ", - SqrtBox[ - FractionBox["1", - RowBox[{ - RowBox[{"\[LeftSkeleton]", "23", "\[RightSkeleton]"}], - "+", - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "+", - RowBox[{ - RowBox[{"\[LeftSkeleton]", "25", "\[RightSkeleton]"}], - " ", - - RowBox[{ - "\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}]}]]]}], "+", - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "+", - RowBox[{"s", " ", - RowBox[{"(", - RowBox[{ - RowBox[{ - RowBox[{"\[LeftSkeleton]", "24", "\[RightSkeleton]"}], - " ", - SqrtBox[ - RowBox[{ - RowBox[{"\[LeftSkeleton]", "22", "\[RightSkeleton]"}], - "+", - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}]]}], - "+", - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}], - ")"}]}]}]], "]"}], ">", "0"}], Short[#, 7]& ]], - Annotation[#, - Short[ - Re[(7.10058593063731*^-50 + 2.40014603266753*^-50 $CellContext`s + - 2.4790698530307665`*^-51 $CellContext`s^2 + - 7.130440695793217*^-53 $CellContext`s^3)/( - 2.4925279302047645`*^-101 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2] + $CellContext`s^3 ( - 2.7371798230433217`*^-24 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 5.46878652950234*^-104 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2]) + $CellContext`s^2 ( - 3.7704148417950625`*^-23 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 2.4041169465215256`*^-102 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2]) + $CellContext`s ( - 1.2984192671183783`*^-22 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 2.755564717590059*^-101 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2]))] > 0, 7], "Tooltip"]& ], - "IconizedCustomName", StripOnInput -> False], - GridBox[{{ - RowBox[{ - TagBox["\"Head: \"", "IconizedLabel"], "\[InvisibleSpace]", - TagBox["Greater", "IconizedItem"]}]}, { - RowBox[{ - TagBox["\"Byte count: \"", "IconizedLabel"], "\[InvisibleSpace]", - TagBox["4656", "IconizedItem"]}]}}, - GridBoxAlignment -> {"Columns" -> {{Left}}}, DefaultBaseStyle -> - "Column", - GridBoxItemSize -> { - "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], - Dynamic[Typeset`open]}, "IconizedObject"]], - Re[(7.10058593063731*^-50 + 2.40014603266753*^-50 $CellContext`s + - 2.4790698530307665`*^-51 $CellContext`s^2 + - 7.130440695793217*^-53 $CellContext`s^3)/( - 2.4925279302047645`*^-101 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2] + $CellContext`s^3 ( - 2.7371798230433217`*^-24 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 5.46878652950234*^-104 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2]) + $CellContext`s^2 ( - 3.7704148417950625`*^-23 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 2.4041169465215256`*^-102 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2]) + $CellContext`s ( - 1.2984192671183783`*^-22 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 2.755564717590059*^-101 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2]))] > 0, SelectWithContents -> True, Selectable -> - False]}, - "ConditionalExpression"]], "Output", - CellChangeTimes->{3.9913437875033875`*^9, 3.9938500423476353`*^9}, - CellLabel->"Out[85]=",ExpressionUUID->"3784ccc0-8df8-40b4-868c-96283e8eed01"] +Cell[BoxData["8.005498035209872`"], "Output", + CellChangeTimes->{3.9913437875033875`*^9, 3.9938500423476353`*^9, + 3.994357761012226*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"67824216-6027-4064-bd85-554880337133"] }, Open ]], Cell[CellGroupData[{ @@ -5768,54 +5482,10 @@ Cell[BoxData[ RowBox[{"-", "2"}]]}]}]], "Input", CellLabel->"In[86]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[BoxData[ - RowBox[{ - RowBox[{"(", - RowBox[{"2.1061183354672167`*^110", " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"]}], ")"}], - "/", - RowBox[{"(", - RowBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{"9.24775464553404`*^84", " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"], " ", - SqrtBox[ - FractionBox[ - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], "s"]], " ", "s"}], - ")"}], "/", - RowBox[{"(", - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], "+", - RowBox[{"7.703350060651919`*^56", " ", - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], ")"}]}], - ")"}]}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - SuperscriptBox["s", "2"]}]}], ")"}]}]], "Output", - CellChangeTimes->{3.9913437875342865`*^9, 3.993850042532795*^9}, - CellLabel->"Out[86]=",ExpressionUUID->"06044e5d-7ba0-4a8b-bf9d-300a60982fdc"] +Cell[BoxData["0.09718035896501462`"], "Output", + CellChangeTimes->{3.9913437875342865`*^9, 3.993850042532795*^9, + 3.9943577610281963`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"c828d25a-aef3-4336-b567-393a557a3054"] }, Open ]], Cell[CellGroupData[{ @@ -5830,233 +5500,10 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel->"In[87]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[BoxData[ - TemplateBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{"1.8664987770807917`*^110", " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"]}], - ")"}], "/", - RowBox[{"(", - RowBox[{"s", " ", - RowBox[{"(", - RowBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{"9.24775464553404`*^84", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}], - " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], - "2"]}], ")"}], "/", - RowBox[{"(", - RowBox[{"2.401224501209607`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}]}], - "+", - RowBox[{"7.703350060651919`*^56", " ", - RowBox[{"(", - RowBox[{"1.1298344621202283`*^-54", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - RowBox[{"(", - RowBox[{"2.5142079474216295`*^-53", "+", - RowBox[{"1.14384340371805`*^-54", " ", "s"}]}], ")"}], " ", - "s", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}]}], ")"}], - " ", - SuperscriptBox[ - RowBox[{"(", - RowBox[{ - RowBox[{"(", - RowBox[{"7.100585930637311`*^-50", "+", - RowBox[{"2.40014603266753`*^-50", " ", "s"}], "+", - RowBox[{"2.4790698530307668`*^-51", " ", - SuperscriptBox["s", "2"]}], "+", - RowBox[{"7.130440695793217`*^-53", " ", - SuperscriptBox["s", "3"]}]}], ")"}], "/", - RowBox[{"(", - RowBox[{"s", " ", - RowBox[{"(", - RowBox[{ - RowBox[{"1.2984192671183783`*^-22", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}]}], - "+", - RowBox[{"3.7704148417950625`*^-23", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}], - " ", "s"}], "+", - RowBox[{"2.7371798230433217`*^-24", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox["2.401224501209607`*^-53", "s"]}], ")"}]}], - " ", - SuperscriptBox["s", "2"]}], "+", - RowBox[{"5.254463894447432`*^-103", " ", "s", " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}], "+", - RowBox[{"5.808968133087572`*^-103", " ", - SuperscriptBox["s", "2"], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}], "+", - RowBox[{"5.0680859140819334`*^-104", " ", - SuperscriptBox["s", "3"], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}], "+", - RowBox[{"1.152867376830151`*^-105", " ", - SuperscriptBox["s", "4"], " ", - RowBox[{"\[Sqrt]", - RowBox[{"(", - RowBox[{"1", "/", - RowBox[{"(", - RowBox[{"2.84063878393352`*^-107", "+", - RowBox[{"3.005095545912684`*^-107", " ", "s"}], "+", - RowBox[{"1.3083777322292941`*^-108", " ", - SuperscriptBox["s", "2"]}]}], ")"}]}], ")"}]}]}]}], - ")"}]}], ")"}]}], ")"}], - RowBox[{"3", "/", "2"}]]}], ")"}]}], - InterpretationBox[ - DynamicModuleBox[{Typeset`open = False}, - TemplateBox[{"Expression", - StyleBox[ - TagBox[ - TooltipBox["\"condition\"", - TagBox[ - RowBox[{ - RowBox[{"Re", "[", - FractionBox[ - RowBox[{"7.100585930637311`*^-50", "+", - RowBox[{ - RowBox[{"\[LeftSkeleton]", "22", "\[RightSkeleton]"}], - " ", "s"}], "+", - RowBox[{ - RowBox[{"\[LeftSkeleton]", "24", "\[RightSkeleton]"}], - " ", - SuperscriptBox["s", "2"]}], "+", - RowBox[{"7.130440695793217`*^-53", " ", - SuperscriptBox["s", "3"]}]}], - RowBox[{"s", " ", - RowBox[{"(", - RowBox[{ - RowBox[{"1.2984192671183783`*^-22", " ", - SqrtBox[ - RowBox[{"1.14384340371805`*^-54", "+", - FractionBox[ - RowBox[{"\[LeftSkeleton]", "23", "\[RightSkeleton]"}], - "s"]}]]}], "+", - RowBox[{"\[LeftSkeleton]", "5", "\[RightSkeleton]"}], "+", - RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}], - ")"}]}]], "]"}], ">", "0"}], Short[#, 7]& ]], - Annotation[#, - Short[ - Re[$CellContext`s^(-1) (7.100585930637311*^-50 + - 2.40014603266753*^-50 $CellContext`s + - 2.4790698530307668`*^-51 $CellContext`s^2 + - 7.130440695793217*^-53 $CellContext`s^3)/( - 1.2984192671183783`*^-22 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 3.7704148417950625`*^-23 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^ - Rational[1, 2] $CellContext`s + - 2.7371798230433217`*^-24 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^ - Rational[1, 2] $CellContext`s^2 + - 5.254463894447432*^-103 $CellContext`s ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2] + - 5.808968133087572*^-103 $CellContext`s^2 (( - 2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2] + - 5.0680859140819334`*^-104 $CellContext`s^3 (( - 2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2] + - 1.152867376830151*^-105 $CellContext`s^4 (( - 2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^ - Rational[1, 2])] > 0, 7], "Tooltip"]& ], "IconizedCustomName", - StripOnInput -> False], - GridBox[{{ - RowBox[{ - TagBox["\"Head: \"", "IconizedLabel"], "\[InvisibleSpace]", - TagBox["Greater", "IconizedItem"]}]}, { - RowBox[{ - TagBox["\"Byte count: \"", "IconizedLabel"], "\[InvisibleSpace]", - TagBox["4616", "IconizedItem"]}]}}, - GridBoxAlignment -> {"Columns" -> {{Left}}}, DefaultBaseStyle -> - "Column", - GridBoxItemSize -> { - "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], - Dynamic[Typeset`open]}, "IconizedObject"]], - Re[$CellContext`s^(-1) (7.100585930637311*^-50 + - 2.40014603266753*^-50 $CellContext`s + - 2.4790698530307668`*^-51 $CellContext`s^2 + - 7.130440695793217*^-53 $CellContext`s^3)/( - 1.2984192671183783`*^-22 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] + - 3.7704148417950625`*^-23 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^Rational[1, 2] $CellContext`s + - 2.7371798230433217`*^-24 (1.14384340371805*^-54 + - 2.401224501209607*^-53/$CellContext`s)^ - Rational[1, 2] $CellContext`s^2 + - 5.254463894447432*^-103 $CellContext`s ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^Rational[1, 2] + - 5.808968133087572*^-103 $CellContext`s^2 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^Rational[1, 2] + - 5.0680859140819334`*^-104 $CellContext`s^3 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^Rational[1, 2] + - 1.152867376830151*^-105 $CellContext`s^4 ((2.84063878393352*^-107 + - 3.005095545912684*^-107 $CellContext`s + - 1.3083777322292941`*^-108 $CellContext`s^2)^(-1))^Rational[1, 2])] > - 0, SelectWithContents -> True, Selectable -> False]}, - "ConditionalExpression"]], "Output", - CellChangeTimes->{3.9913437876352882`*^9, 3.993850060686965*^9}, - CellLabel->"Out[87]=",ExpressionUUID->"6537e137-20f7-4823-beab-2cbc71db42ac"] +Cell[BoxData["2.8428614292844037`"], "Output", + CellChangeTimes->{3.9913437876352882`*^9, 3.993850060686965*^9, + 3.994357761141567*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"eb7aed9c-840a-4d37-91ff-ac8923b17d09"] }, Open ]], Cell[CellGroupData[{ @@ -6150,13 +5597,10 @@ Cell[BoxData[ ")"}]}]}]], "Input", CellLabel->"In[88]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[BoxData[ - FractionBox[ - RowBox[{"5.4404336176520004`*^-55", " ", "s"}], - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}]]], "Output", - CellChangeTimes->{3.991343787650694*^9, 3.993850060738029*^9}, - CellLabel->"Out[88]=",ExpressionUUID->"059ce4e7-8334-4422-a214-5ec1836337ea"] +Cell[BoxData["0.12678436313657984`"], "Output", + CellChangeTimes->{3.991343787650694*^9, 3.993850060738029*^9, + 3.994357761156453*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"5d3a9f30-e842-4e02-9571-3cfa503cf6df"] }, Open ]], Cell[CellGroupData[{ @@ -6247,12 +5691,10 @@ Cell[BoxData[ ")"}]}]}]], "Input", CellLabel->"In[89]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[BoxData[ - FractionBox["3.747048601832261`*^-54", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}]]], "Output", - CellChangeTimes->{3.9913437876776943`*^9, 3.993850060751561*^9}, - CellLabel->"Out[89]=",ExpressionUUID->"6606a7bb-8510-4ab0-81dc-b22e9f063ef3"] +Cell[BoxData["0.8732156368634202`"], "Output", + CellChangeTimes->{3.9913437876776943`*^9, 3.993850060751561*^9, + 3.994357761167495*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"edfca05d-e9b5-4a6b-af5b-c87c1a421683"] }, Open ]], Cell[CellGroupData[{ @@ -6376,15 +5818,10 @@ Cell[BoxData[ "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel->"In[90]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[BoxData[ - FractionBox[ - RowBox[{"2.0385569180384156`*^-108", " ", "s"}], - SuperscriptBox[ - RowBox[{"(", - RowBox[{"3.747048601832261`*^-54", "+", - RowBox[{"5.4404336176520004`*^-55", " ", "s"}]}], ")"}], "2"]]], "Output", - CellChangeTimes->{3.9913437877049465`*^9, 3.993850060767543*^9}, - CellLabel->"Out[90]=",ExpressionUUID->"520a62d6-80de-4c85-91e6-40ee9a38270e"] +Cell[BoxData["0.1107100884006317`"], "Output", + CellChangeTimes->{3.9913437877049465`*^9, 3.993850060767543*^9, + 3.994357761180122*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"8e4dfd4d-2166-4ed7-8e07-98cdc30626a6"] }, Open ]], Cell[BoxData[ @@ -6460,61 +5897,64 @@ Cell[BoxData[ Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1301260100698846`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 92, 89, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.99435776119917*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"849ec881-1e9a-4842-bf47-8768b0b52554"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.3635834516406854`*^-219\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 92, 90, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994357761218882*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"dc001830-b5fb-4377-b907-f6b0eacfceba"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.5455592727163994`*^-224\\\", \ \\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ 29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 433, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877189426`*^9}, +normalized machine number; precision may be lost.\"", 2, 92, 91, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994357761226305*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 434, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787730139*^9}, - CellLabel-> - "During evaluation of \ -In[415]:=",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 435, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877381363`*^9}, - CellLabel-> - "During evaluation of \ -In[415]:=",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], +In[92]:=",ExpressionUUID->"d9261fd7-8134-4e4a-a08a-522ae3e8f1c8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 415, 436, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787747137*^9}, +during this calculation.\"", 2, 92, 92, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994357761232881*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], +In[92]:=",ExpressionUUID->"78a59107-fb59-4505-b390-f5c588b3b3ca"], -Cell[BoxData["5.020278507983898`"], "Output", - CellChangeTimes->{3.991343791131052*^9}, - CellLabel-> - "Out[415]=",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[BoxData["8.005498035209872`"], "Output", + CellChangeTimes->{3.991343791131052*^9, 3.99435776497088*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"e822c059-c388-473d-b41d-521228ff7372"] }, Open ]], Cell[CellGroupData[{ @@ -6576,68 +6016,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501579408264`*^9},ExpressionUUID->"dca13eb7-7f94-3e45-81a8-\ -b62dad3009d2"], + CellChangeTimes->{3.9918501579408264`*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1301260100698846`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 93, 93, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994357765025435*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"e17091f0-7674-4dcb-935b-9687c3efc0c0"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.3635834516406854`*^-219\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 93, 94, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994357765033719*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"ca158417-3429-4550-8ae8-73324f6f7f47"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.5455592727163994`*^-224\\\", \ \\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ 29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 437, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911686516`*^9}, +normalized machine number; precision may be lost.\"", 2, 93, 95, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994357765041852*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 438, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134379117865*^9}, - CellLabel-> - "During evaluation of \ -In[416]:=",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 439, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911866493`*^9}, - CellLabel-> - "During evaluation of \ -In[416]:=",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], +In[93]:=",ExpressionUUID->"829c19a4-28a1-46ac-85de-25e44249ea06"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 416, 440, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911946507`*^9}, +during this calculation.\"", 2, 93, 96, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.99435776504954*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], +In[93]:=",ExpressionUUID->"9d9c10cc-2343-4c6f-927c-d8be07aa6533"], -Cell[BoxData["8.223604958038848`"], "Output", - CellChangeTimes->{3.991343794599764*^9}, - CellLabel-> - "Out[416]=",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[BoxData["2.842861429284403`"], "Output", + CellChangeTimes->{3.991343794599764*^9, 3.994357768688344*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"5d5ec438-f37e-41c5-ad0c-4fe07f391e73"] }, Open ]], Cell[CellGroupData[{ @@ -6693,94 +6135,93 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501631488323`*^9},ExpressionUUID->"46451e4d-f5ef-b246-91c6-\ -4265c9fafb97"], + CellChangeTimes->{3.9918501631488323`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VVsfB3BDVIYyZI7MN0RykKFr/UKJkCgz17DPNlTmZCpXhtIgCXFl +yFCSsZTQaChJpZKkhOTkxcaRWfKu88d+9vN51trf9V177WfLeQXa0jnY2Ngo +fLHuwW80/qrrfGN0P3pMKKuEiYwminW8TMuR8KuwNSwP5OumK5o+RI/uC36+ +im1DvObmo7WiOuOmVJZrImKbuUw7UOHxJDWWk5+LP40te4e6Hd1vZWLXdwbn +/db6iPYumPOwPNrbHhPZ2IOueplbZ2BLDiu4zJl8RWK3XI+nY++fjNEP7ehH +df3xsVewH/8e5Y0oG0QS0k+OpmF3x4lF3w8YQvFRG/6+jD3BbTo6ozWMhoVD +pi5hc18IcqLNM1Dv2tGkFGwZwdy24MYRVHIinO0itrXU3I0Jk3Ek5Pb6WjI2 +WSAvqr5uAp2Vz3pyBjtW6UDikY5JFMEZ0ZqI3SPWtSOsjInquk5ExWETzv5+ +Vy5MI2nVLJVY7KlrbNfvBPxCOvQ3jTHY6+TVBZhas2gi9GTyCex0otlMQGQO +TT+bawnDlr3pFLt9fg75jSYNBWPrbUuaONa4gOq+jr88gu2r298xavIbNTt9 +MnTHnok4voZHeQU9i96Y6oz9byPvLpV1f5DdoMcLe+ws0Lvt07GKHL7Z9Fuz ++pW0mYaUscMa7qDav7HLnl8ZiJPiAL+sGDl9Vt+f7jGXL3BAXlxJsDZ2jOrs +3eoATojaZN2oyupbJacwqcUFRrPcMyLYvZ3jj/8UcUH2D44oAVb/6TrnDSLc +8POnzBAPdrm2dZr6PDc4G9a7rxYzUUt9FPvRxnUgKpe0zMCebf7QP2LCBzFz +7B3V2EKWfALRj/ngto06oxRbs8sU+PX5gV0y7FsBtv+PewU7NDaAYbiDXyp2 +EEeH5t98ArAuKWXkGPawfCUzcU4Qrp69clEee4ZsX/+WJgTpk8PJ4tgctxly +4sFCUOjmTWzAlqVtsS0bE4LrtUN3F4uYyNkk9c6bAWEoHpR49Ab7rXdIqNgr +EaC1EpEh2N9uppz3WCcKmgK/HEns8bGyolt7RGEp74moMzZP2NAHw6eiYNwt +rr4b2zThkLbHPTHwzWG28GM3FOvOluZLgO7gicKCQiYqHl4KNwiThi9mQVsq +rjPRvsNnvoVWSMOHtOf9udjjLcJ7KxjSIB7y+XQKtnbxNhFZJxkwvG8QHIjd +4uV+l8toC4D/psnt2NOTAydG4mUhSjo86HYBEwkfM629ayUPDRYbMi7kMxGj +mMfXxl8ephvmqyKxH3ztlKKS5CGS9q6CxHa1dItXfioPzp4utoBdrBZum62l +AK7Gq0bTeXj90ZtTp8QU4V6MfKkN9iEfXnWLQSUYqbN+MX+NiVD4YS2HFSWo +jdK9N4itmpi/k5BQBhuhI2deYbMV0YxPHVSGmw+bevKwK765ONx5pgx3Aont +ptjc9uVxkoV/wc7hXZXJObifqVX3qJcKBNTKsLP9x0RFdle/zJ9SgcorFTGM +bCZK8RocWJOjAs3vX3/twCb+PT4m80EFZItfWWRjCz7MZbMzUYV/E1b6NLH9 +aROqjQpq4FxkPuScxURS8pdiz//YBvVbY6L+y2Sih+dmVBY51OGtyZhYNLbr +L6cuUk4dvkoGZrhg57Uoqhi7q8Mf4ybNzdjyPg3vFz6pA7/0zEhOBt5v+bAS ++UoDXt856ZWRzkTSUjKkrJMmMAxT04LSmGhbSRjfMtICV9fw2raLTORFxM+q +W2tB9Y5PQsXYWQpp3zxcteBrur59LDZnYVX18wgtyPYWuKCD3Zs3eiitRgt4 +jYjaggv4f5rlkauiQIP/+ecuBZ/H53veUsORWxvMbl05zpbMRNdDFG3udegA +Y4l78nU8E3WGo50JJfqQ8vriEeUTTCTn/tHa7ejfsNmKuM70ZSL66v1K6UiA +28vanerOTCQ29mCtmJcxcMdvvH1tHxOF0XZ9TVM1BWWaon6PLu5P/W4THt0D +B4TK1v2tiM/TOHRt/lsz0Jxr8unagL+fGf9n5enmsE8lI7VzcQot7BZ/3RK7 +H3xuK3Vwf59CfWyczEFPK0i2Nfj24uUUCtgcmBqncAD0bZNaY+5MoUq/tqcZ +iTZwvPGBVk7WFIr6JTGv5ncQXt9si/8dO4VmLfbav/jHFpSccmUmiSmk73J5 +9/BBO7jssa9li8UUei+R699COwQrmfbZbDumkOSN+IelWw/DwauzRc0iU+jB +gKqlNb89WPj69QwsTCKZrimfcMoeWv3/JOW+mES0jMvlRQMO0C1Z/+pd2iTK +XfNLI63ZEYJcIjQcvSbR/d3bexPrneBPK4j1a0yirJ3nBH+XOYNvnp91zsoE +evulJIl2wQXy1o+o/uqcQPesrikG/esKamZufeKFE4h5zI4tgHADK3Vpt+UT +E2h2r4rvhIk7bGZ+HrC3mUCl1OeFUN1/QCY55JPFXxPI8XqJtxufBwwSrc4z +HBPo7p39/3Ce8QDnip5LnX0U0pd6v5i86AGOBw3YnR5RSGHAp/ednyfUZEl8 +Ls+n0A/eIweuDXnChqawfStxFOpMsfY2O+wFZgkF5+76Uig9Ip/3eKcXPMuw +EGW3odDDx6uL3ubeQGU+2nbJgEIbXeEMrcEboqkOJKVCIdlNL95ufugNowrN +vB+3Ukizw0qc+7E3pGS8476EbbvL5VbPM28IzjM+x4mdvjn81cmX3nDod8vz +CWUKSfbd3tjW4w215c/E3yhSSNFdLMt13hvabn6nVcvi/XhMlCZqE3C4W6mX +Q4JCN7KnQq11CZD/9PyfDnEKbfowbSSmR0ClP9fGTOyJPfNdpYYEmI55japg +F6uxsXcYE5Di2ZVuJ0ahDfOCTkIHCahK0G6oFMHv46LO+vxjBLzcdtcuQYhC +B1/s7PIJJKBCIUfADvsxm0G+ZjABlk+c5+Wws0ONdJrCCKCe+Bg/FaSQtZOZ +53A0AbnJI2/+CFCoXtGpXu0cAeaHVpriN1IopTHG78ENArp7huQr+Ch0TOuq +fkQpAX6vRZfjsC1v1azXKyMga9edZXtsnquMW3UVBLSbbQ1nx04MsRm9X0vA ++VE9G0deCsWoKB6510TAuVTl//h5KOR/9dXRO99wX53GlMy1FDLfwNgVMkBA +un1ZeBD21kQ2fq3vBASrqp+xwGaE6FTUDBPwZGZabpWbQp7W+VT1OF6fu9DI +H9uRKzSgaokAULsuso+LQmahkkHlonTI/x5iLM9Joab8JIs0cTr4H1MO/cNB +oV0d04oRknTg7H35oRdbU+nVZxMZOkQODSumY0t8ijb5okQHSiybez32mEGf +KI8OHd61ir9cZqPQJY6CRz52dEhYPGXHtTqOeLbzZVkdpkMmoz7h559xlOAS +EUJzoMNpX37GS+yIWpu/Vp3pwNvEoX8J25Nkv5zpRQfZuL2ym7Fp7V5EazCe +X6Qya7Qyjj5dVuJVSKWDSPX9J6XL46gS8fuOXKZD4OD782nYCdRMS8UVOpQ+ +HI+LwdYybzmld5UO6j6bx22wU9i8p63y6MC/FPtgeWkc7Q0s+BxRTof5rrkd +TtjS0md1jSrpcDbNJG8P9kx74BXOajr4amRra2EXKiOrlLt0MLjm2c+LvdLX +97SogQ5qRpHqzxbHUa2lVOmbNjoseViX07DPL3FwpbfTocoorF4e26t01NOp +gw5STeVTgtgCaxqkfrylQ+eiQ9/Uwjg62uh4abEb98+9UVWNraCaGa44TAfN +1Bw9PeylTyc//I9BB0OHbT9VsDsT6ZpVI3g/W3qeSGGfGtQe1R+ng1bm6cnV ++XHUm/XB7cAvOoCo5r527LS1gnui2EnYedimn8R+ON3nEsZJgkRdVrcT9s++ +spAALhK62z05rLB31ZoWeK0n4alqxDwNm+ERsWwhSILgnhaHNdgClnuE9giT +MPVI9tfC3Dgy3CmkgkRw/ix7M4Wdyl9uT5MgQT36EFsPa7yhv0ZKjgTj4L3M +SmyypLxNRIEE94iPmiWs+amR/RuVSMh+NF6cg80ghfnXqJBwNOueajJrXNjM +d1yTBNXtjeUkdsMf4ViGFglLHzNT3bGH/zeQMaBNgmjlSqk9tsHTqOYuPRI8 +dgecMMP+cbRS5hGQkF86dE4Ne4NjtE6dMQl1OXLCStj6Jvssa0xJiFCm3spg +p0h8jyzZR4I9n8ZPIewHa6pS8y1IqGcU7ebHHpqMvpltSYKjQ2nnWmy95yIf +L9qQcGnQ7cLKLD7vmu9jZ2xJ6PPdWL+AffFaFcfpQyQ88bSRnMH+HmKuGe5I +QumRuKgxbH53UbMgZxKe9wRH/sTWMx9y83cloT9wunyI9fyWk+fdPUj40lhc +8xX7AY9FoaMXCScau09/ZuXNitbbEiQoRGWf7WblDQ69tSRJaBWjmj6w8jqq +GXt9SRirebfjHatf3ckV8CeBmzD7+IaVX2ixyfAoCWZm1hUdrPyLYmo6ASR0 +hjDq21n5ET92bw8iwW1543IbNh9R46gSQkL1r/agF9g7D5wKVAgjQeOomNRz +Vr7B/iTpcBI4QmcXW7AvKInnikWQELOJzs/yfYHhu4JRJGg6k4ebsQeXa9p5 +Y3Afy8V3Taz8n6cGuU7h85+UjmdZ9/3+hdVY/H2Ydfmy/H+hC07S "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6794,105 +6235,106 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1Hk4VVsfB3BDVIYyZI7MN0RykKFr/UKJkCgz17DPNlTmZCpXhtIgCXFl +yFCSsZTQaChJpZKkhOTkxcaRWfKu88d+9vN51trf9V177WfLeQXa0jnY2Ngo +fLHuwW80/qrrfGN0P3pMKKuEiYwminW8TMuR8KuwNSwP5OumK5o+RI/uC36+ +im1DvObmo7WiOuOmVJZrImKbuUw7UOHxJDWWk5+LP40te4e6Hd1vZWLXdwbn +/db6iPYumPOwPNrbHhPZ2IOueplbZ2BLDiu4zJl8RWK3XI+nY++fjNEP7ehH +df3xsVewH/8e5Y0oG0QS0k+OpmF3x4lF3w8YQvFRG/6+jD3BbTo6ozWMhoVD +pi5hc18IcqLNM1Dv2tGkFGwZwdy24MYRVHIinO0itrXU3I0Jk3Ek5Pb6WjI2 +WSAvqr5uAp2Vz3pyBjtW6UDikY5JFMEZ0ZqI3SPWtSOsjInquk5ExWETzv5+ +Vy5MI2nVLJVY7KlrbNfvBPxCOvQ3jTHY6+TVBZhas2gi9GTyCex0otlMQGQO +TT+bawnDlr3pFLt9fg75jSYNBWPrbUuaONa4gOq+jr88gu2r298xavIbNTt9 +MnTHnok4voZHeQU9i96Y6oz9byPvLpV1f5DdoMcLe+ws0Lvt07GKHL7Z9Fuz ++pW0mYaUscMa7qDav7HLnl8ZiJPiAL+sGDl9Vt+f7jGXL3BAXlxJsDZ2jOrs +3eoATojaZN2oyupbJacwqcUFRrPcMyLYvZ3jj/8UcUH2D44oAVb/6TrnDSLc +8POnzBAPdrm2dZr6PDc4G9a7rxYzUUt9FPvRxnUgKpe0zMCebf7QP2LCBzFz +7B3V2EKWfALRj/ngto06oxRbs8sU+PX5gV0y7FsBtv+PewU7NDaAYbiDXyp2 +EEeH5t98ArAuKWXkGPawfCUzcU4Qrp69clEee4ZsX/+WJgTpk8PJ4tgctxly +4sFCUOjmTWzAlqVtsS0bE4LrtUN3F4uYyNkk9c6bAWEoHpR49Ab7rXdIqNgr +EaC1EpEh2N9uppz3WCcKmgK/HEns8bGyolt7RGEp74moMzZP2NAHw6eiYNwt +rr4b2zThkLbHPTHwzWG28GM3FOvOluZLgO7gicKCQiYqHl4KNwiThi9mQVsq +rjPRvsNnvoVWSMOHtOf9udjjLcJ7KxjSIB7y+XQKtnbxNhFZJxkwvG8QHIjd +4uV+l8toC4D/psnt2NOTAydG4mUhSjo86HYBEwkfM629ayUPDRYbMi7kMxGj +mMfXxl8ephvmqyKxH3ztlKKS5CGS9q6CxHa1dItXfioPzp4utoBdrBZum62l +AK7Gq0bTeXj90ZtTp8QU4V6MfKkN9iEfXnWLQSUYqbN+MX+NiVD4YS2HFSWo +jdK9N4itmpi/k5BQBhuhI2deYbMV0YxPHVSGmw+bevKwK765ONx5pgx3Aont +ptjc9uVxkoV/wc7hXZXJObifqVX3qJcKBNTKsLP9x0RFdle/zJ9SgcorFTGM +bCZK8RocWJOjAs3vX3/twCb+PT4m80EFZItfWWRjCz7MZbMzUYV/E1b6NLH9 +aROqjQpq4FxkPuScxURS8pdiz//YBvVbY6L+y2Sih+dmVBY51OGtyZhYNLbr +L6cuUk4dvkoGZrhg57Uoqhi7q8Mf4ybNzdjyPg3vFz6pA7/0zEhOBt5v+bAS ++UoDXt856ZWRzkTSUjKkrJMmMAxT04LSmGhbSRjfMtICV9fw2raLTORFxM+q +W2tB9Y5PQsXYWQpp3zxcteBrur59LDZnYVX18wgtyPYWuKCD3Zs3eiitRgt4 +jYjaggv4f5rlkauiQIP/+ecuBZ/H53veUsORWxvMbl05zpbMRNdDFG3udegA +Y4l78nU8E3WGo50JJfqQ8vriEeUTTCTn/tHa7ejfsNmKuM70ZSL66v1K6UiA +28vanerOTCQ29mCtmJcxcMdvvH1tHxOF0XZ9TVM1BWWaon6PLu5P/W4THt0D +B4TK1v2tiM/TOHRt/lsz0Jxr8unagL+fGf9n5enmsE8lI7VzcQot7BZ/3RK7 +H3xuK3Vwf59CfWyczEFPK0i2Nfj24uUUCtgcmBqncAD0bZNaY+5MoUq/tqcZ +iTZwvPGBVk7WFIr6JTGv5ncQXt9si/8dO4VmLfbav/jHFpSccmUmiSmk73J5 +9/BBO7jssa9li8UUei+R699COwQrmfbZbDumkOSN+IelWw/DwauzRc0iU+jB +gKqlNb89WPj69QwsTCKZrimfcMoeWv3/JOW+mES0jMvlRQMO0C1Z/+pd2iTK +XfNLI63ZEYJcIjQcvSbR/d3bexPrneBPK4j1a0yirJ3nBH+XOYNvnp91zsoE +evulJIl2wQXy1o+o/uqcQPesrikG/esKamZufeKFE4h5zI4tgHADK3Vpt+UT +E2h2r4rvhIk7bGZ+HrC3mUCl1OeFUN1/QCY55JPFXxPI8XqJtxufBwwSrc4z +HBPo7p39/3Ce8QDnip5LnX0U0pd6v5i86AGOBw3YnR5RSGHAp/ednyfUZEl8 +Ls+n0A/eIweuDXnChqawfStxFOpMsfY2O+wFZgkF5+76Uig9Ip/3eKcXPMuw +EGW3odDDx6uL3ubeQGU+2nbJgEIbXeEMrcEboqkOJKVCIdlNL95ufugNowrN +vB+3Ukizw0qc+7E3pGS8476EbbvL5VbPM28IzjM+x4mdvjn81cmX3nDod8vz +CWUKSfbd3tjW4w215c/E3yhSSNFdLMt13hvabn6nVcvi/XhMlCZqE3C4W6mX +Q4JCN7KnQq11CZD/9PyfDnEKbfowbSSmR0ClP9fGTOyJPfNdpYYEmI55japg +F6uxsXcYE5Di2ZVuJ0ahDfOCTkIHCahK0G6oFMHv46LO+vxjBLzcdtcuQYhC +B1/s7PIJJKBCIUfADvsxm0G+ZjABlk+c5+Wws0ONdJrCCKCe+Bg/FaSQtZOZ +53A0AbnJI2/+CFCoXtGpXu0cAeaHVpriN1IopTHG78ENArp7huQr+Ch0TOuq +fkQpAX6vRZfjsC1v1azXKyMga9edZXtsnquMW3UVBLSbbQ1nx04MsRm9X0vA ++VE9G0deCsWoKB6510TAuVTl//h5KOR/9dXRO99wX53GlMy1FDLfwNgVMkBA +un1ZeBD21kQ2fq3vBASrqp+xwGaE6FTUDBPwZGZabpWbQp7W+VT1OF6fu9DI +H9uRKzSgaokAULsuso+LQmahkkHlonTI/x5iLM9Joab8JIs0cTr4H1MO/cNB +oV0d04oRknTg7H35oRdbU+nVZxMZOkQODSumY0t8ijb5okQHSiybez32mEGf +KI8OHd61ir9cZqPQJY6CRz52dEhYPGXHtTqOeLbzZVkdpkMmoz7h559xlOAS +EUJzoMNpX37GS+yIWpu/Vp3pwNvEoX8J25Nkv5zpRQfZuL2ym7Fp7V5EazCe +X6Qya7Qyjj5dVuJVSKWDSPX9J6XL46gS8fuOXKZD4OD782nYCdRMS8UVOpQ+ +HI+LwdYybzmld5UO6j6bx22wU9i8p63y6MC/FPtgeWkc7Q0s+BxRTof5rrkd +TtjS0md1jSrpcDbNJG8P9kx74BXOajr4amRra2EXKiOrlLt0MLjm2c+LvdLX +97SogQ5qRpHqzxbHUa2lVOmbNjoseViX07DPL3FwpbfTocoorF4e26t01NOp +gw5STeVTgtgCaxqkfrylQ+eiQ9/Uwjg62uh4abEb98+9UVWNraCaGa44TAfN +1Bw9PeylTyc//I9BB0OHbT9VsDsT6ZpVI3g/W3qeSGGfGtQe1R+ng1bm6cnV ++XHUm/XB7cAvOoCo5r527LS1gnui2EnYedimn8R+ON3nEsZJgkRdVrcT9s++ +spAALhK62z05rLB31ZoWeK0n4alqxDwNm+ERsWwhSILgnhaHNdgClnuE9giT +MPVI9tfC3Dgy3CmkgkRw/ix7M4Wdyl9uT5MgQT36EFsPa7yhv0ZKjgTj4L3M +SmyypLxNRIEE94iPmiWs+amR/RuVSMh+NF6cg80ghfnXqJBwNOueajJrXNjM +d1yTBNXtjeUkdsMf4ViGFglLHzNT3bGH/zeQMaBNgmjlSqk9tsHTqOYuPRI8 +dgecMMP+cbRS5hGQkF86dE4Ne4NjtE6dMQl1OXLCStj6Jvssa0xJiFCm3spg +p0h8jyzZR4I9n8ZPIewHa6pS8y1IqGcU7ebHHpqMvpltSYKjQ2nnWmy95yIf +L9qQcGnQ7cLKLD7vmu9jZ2xJ6PPdWL+AffFaFcfpQyQ88bSRnMH+HmKuGe5I +QumRuKgxbH53UbMgZxKe9wRH/sTWMx9y83cloT9wunyI9fyWk+fdPUj40lhc +8xX7AY9FoaMXCScau09/ZuXNitbbEiQoRGWf7WblDQ69tSRJaBWjmj6w8jqq +GXt9SRirebfjHatf3ckV8CeBmzD7+IaVX2ixyfAoCWZm1hUdrPyLYmo6ASR0 +hjDq21n5ET92bw8iwW1543IbNh9R46gSQkL1r/agF9g7D5wKVAgjQeOomNRz +Vr7B/iTpcBI4QmcXW7AvKInnikWQELOJzs/yfYHhu4JRJGg6k4ebsQeXa9p5 +Y3Afy8V3Taz8n6cGuU7h85+UjmdZ9/3+hdVY/H2Ydfmy/H+hC07S "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "PlotRange" -> {{0, 180}, {0.9049999282308249, + 1.1029282321030514`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.9049999282308269}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6904,131 +6346,132 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.9049999282308249, + 1.1029282321030514`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.9049999282308269}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{115.12306105754324`, - 253.30690491292427`}, {-15.402138689748767`, 5.769736310251233}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1Hk4VVsfB3BDVIYyZI7MN0RykKFr/UKJkCgz17DPNlTmZCpXhtIgCXFl +yFCSsZTQaChJpZKkhOTkxcaRWfKu88d+9vN51trf9V177WfLeQXa0jnY2Ngo +fLHuwW80/qrrfGN0P3pMKKuEiYwminW8TMuR8KuwNSwP5OumK5o+RI/uC36+ +im1DvObmo7WiOuOmVJZrImKbuUw7UOHxJDWWk5+LP40te4e6Hd1vZWLXdwbn +/db6iPYumPOwPNrbHhPZ2IOueplbZ2BLDiu4zJl8RWK3XI+nY++fjNEP7ehH +df3xsVewH/8e5Y0oG0QS0k+OpmF3x4lF3w8YQvFRG/6+jD3BbTo6ozWMhoVD +pi5hc18IcqLNM1Dv2tGkFGwZwdy24MYRVHIinO0itrXU3I0Jk3Ek5Pb6WjI2 +WSAvqr5uAp2Vz3pyBjtW6UDikY5JFMEZ0ZqI3SPWtSOsjInquk5ExWETzv5+ +Vy5MI2nVLJVY7KlrbNfvBPxCOvQ3jTHY6+TVBZhas2gi9GTyCex0otlMQGQO +TT+bawnDlr3pFLt9fg75jSYNBWPrbUuaONa4gOq+jr88gu2r298xavIbNTt9 +MnTHnok4voZHeQU9i96Y6oz9byPvLpV1f5DdoMcLe+ws0Lvt07GKHL7Z9Fuz ++pW0mYaUscMa7qDav7HLnl8ZiJPiAL+sGDl9Vt+f7jGXL3BAXlxJsDZ2jOrs +3eoATojaZN2oyupbJacwqcUFRrPcMyLYvZ3jj/8UcUH2D44oAVb/6TrnDSLc +8POnzBAPdrm2dZr6PDc4G9a7rxYzUUt9FPvRxnUgKpe0zMCebf7QP2LCBzFz +7B3V2EKWfALRj/ngto06oxRbs8sU+PX5gV0y7FsBtv+PewU7NDaAYbiDXyp2 +EEeH5t98ArAuKWXkGPawfCUzcU4Qrp69clEee4ZsX/+WJgTpk8PJ4tgctxly +4sFCUOjmTWzAlqVtsS0bE4LrtUN3F4uYyNkk9c6bAWEoHpR49Ab7rXdIqNgr +EaC1EpEh2N9uppz3WCcKmgK/HEns8bGyolt7RGEp74moMzZP2NAHw6eiYNwt +rr4b2zThkLbHPTHwzWG28GM3FOvOluZLgO7gicKCQiYqHl4KNwiThi9mQVsq +rjPRvsNnvoVWSMOHtOf9udjjLcJ7KxjSIB7y+XQKtnbxNhFZJxkwvG8QHIjd +4uV+l8toC4D/psnt2NOTAydG4mUhSjo86HYBEwkfM629ayUPDRYbMi7kMxGj +mMfXxl8ephvmqyKxH3ztlKKS5CGS9q6CxHa1dItXfioPzp4utoBdrBZum62l +AK7Gq0bTeXj90ZtTp8QU4V6MfKkN9iEfXnWLQSUYqbN+MX+NiVD4YS2HFSWo +jdK9N4itmpi/k5BQBhuhI2deYbMV0YxPHVSGmw+bevKwK765ONx5pgx3Aont +ptjc9uVxkoV/wc7hXZXJObifqVX3qJcKBNTKsLP9x0RFdle/zJ9SgcorFTGM +bCZK8RocWJOjAs3vX3/twCb+PT4m80EFZItfWWRjCz7MZbMzUYV/E1b6NLH9 +aROqjQpq4FxkPuScxURS8pdiz//YBvVbY6L+y2Sih+dmVBY51OGtyZhYNLbr +L6cuUk4dvkoGZrhg57Uoqhi7q8Mf4ybNzdjyPg3vFz6pA7/0zEhOBt5v+bAS ++UoDXt856ZWRzkTSUjKkrJMmMAxT04LSmGhbSRjfMtICV9fw2raLTORFxM+q +W2tB9Y5PQsXYWQpp3zxcteBrur59LDZnYVX18wgtyPYWuKCD3Zs3eiitRgt4 +jYjaggv4f5rlkauiQIP/+ecuBZ/H53veUsORWxvMbl05zpbMRNdDFG3udegA +Y4l78nU8E3WGo50JJfqQ8vriEeUTTCTn/tHa7ejfsNmKuM70ZSL66v1K6UiA +28vanerOTCQ29mCtmJcxcMdvvH1tHxOF0XZ9TVM1BWWaon6PLu5P/W4THt0D +B4TK1v2tiM/TOHRt/lsz0Jxr8unagL+fGf9n5enmsE8lI7VzcQot7BZ/3RK7 +H3xuK3Vwf59CfWyczEFPK0i2Nfj24uUUCtgcmBqncAD0bZNaY+5MoUq/tqcZ +iTZwvPGBVk7WFIr6JTGv5ncQXt9si/8dO4VmLfbav/jHFpSccmUmiSmk73J5 +9/BBO7jssa9li8UUei+R699COwQrmfbZbDumkOSN+IelWw/DwauzRc0iU+jB +gKqlNb89WPj69QwsTCKZrimfcMoeWv3/JOW+mES0jMvlRQMO0C1Z/+pd2iTK +XfNLI63ZEYJcIjQcvSbR/d3bexPrneBPK4j1a0yirJ3nBH+XOYNvnp91zsoE +evulJIl2wQXy1o+o/uqcQPesrikG/esKamZufeKFE4h5zI4tgHADK3Vpt+UT +E2h2r4rvhIk7bGZ+HrC3mUCl1OeFUN1/QCY55JPFXxPI8XqJtxufBwwSrc4z +HBPo7p39/3Ce8QDnip5LnX0U0pd6v5i86AGOBw3YnR5RSGHAp/ednyfUZEl8 +Ls+n0A/eIweuDXnChqawfStxFOpMsfY2O+wFZgkF5+76Uig9Ip/3eKcXPMuw +EGW3odDDx6uL3ubeQGU+2nbJgEIbXeEMrcEboqkOJKVCIdlNL95ufugNowrN +vB+3Ukizw0qc+7E3pGS8476EbbvL5VbPM28IzjM+x4mdvjn81cmX3nDod8vz +CWUKSfbd3tjW4w215c/E3yhSSNFdLMt13hvabn6nVcvi/XhMlCZqE3C4W6mX +Q4JCN7KnQq11CZD/9PyfDnEKbfowbSSmR0ClP9fGTOyJPfNdpYYEmI55japg +F6uxsXcYE5Di2ZVuJ0ahDfOCTkIHCahK0G6oFMHv46LO+vxjBLzcdtcuQYhC +B1/s7PIJJKBCIUfADvsxm0G+ZjABlk+c5+Wws0ONdJrCCKCe+Bg/FaSQtZOZ +53A0AbnJI2/+CFCoXtGpXu0cAeaHVpriN1IopTHG78ENArp7huQr+Ch0TOuq +fkQpAX6vRZfjsC1v1azXKyMga9edZXtsnquMW3UVBLSbbQ1nx04MsRm9X0vA ++VE9G0deCsWoKB6510TAuVTl//h5KOR/9dXRO99wX53GlMy1FDLfwNgVMkBA +un1ZeBD21kQ2fq3vBASrqp+xwGaE6FTUDBPwZGZabpWbQp7W+VT1OF6fu9DI +H9uRKzSgaokAULsuso+LQmahkkHlonTI/x5iLM9Joab8JIs0cTr4H1MO/cNB +oV0d04oRknTg7H35oRdbU+nVZxMZOkQODSumY0t8ijb5okQHSiybez32mEGf +KI8OHd61ir9cZqPQJY6CRz52dEhYPGXHtTqOeLbzZVkdpkMmoz7h559xlOAS +EUJzoMNpX37GS+yIWpu/Vp3pwNvEoX8J25Nkv5zpRQfZuL2ym7Fp7V5EazCe +X6Qya7Qyjj5dVuJVSKWDSPX9J6XL46gS8fuOXKZD4OD782nYCdRMS8UVOpQ+ +HI+LwdYybzmld5UO6j6bx22wU9i8p63y6MC/FPtgeWkc7Q0s+BxRTof5rrkd +TtjS0md1jSrpcDbNJG8P9kx74BXOajr4amRra2EXKiOrlLt0MLjm2c+LvdLX +97SogQ5qRpHqzxbHUa2lVOmbNjoseViX07DPL3FwpbfTocoorF4e26t01NOp +gw5STeVTgtgCaxqkfrylQ+eiQ9/Uwjg62uh4abEb98+9UVWNraCaGa44TAfN +1Bw9PeylTyc//I9BB0OHbT9VsDsT6ZpVI3g/W3qeSGGfGtQe1R+ng1bm6cnV ++XHUm/XB7cAvOoCo5r527LS1gnui2EnYedimn8R+ON3nEsZJgkRdVrcT9s++ +spAALhK62z05rLB31ZoWeK0n4alqxDwNm+ERsWwhSILgnhaHNdgClnuE9giT +MPVI9tfC3Dgy3CmkgkRw/ix7M4Wdyl9uT5MgQT36EFsPa7yhv0ZKjgTj4L3M +SmyypLxNRIEE94iPmiWs+amR/RuVSMh+NF6cg80ghfnXqJBwNOueajJrXNjM +d1yTBNXtjeUkdsMf4ViGFglLHzNT3bGH/zeQMaBNgmjlSqk9tsHTqOYuPRI8 +dgecMMP+cbRS5hGQkF86dE4Ne4NjtE6dMQl1OXLCStj6Jvssa0xJiFCm3spg +p0h8jyzZR4I9n8ZPIewHa6pS8y1IqGcU7ebHHpqMvpltSYKjQ2nnWmy95yIf +L9qQcGnQ7cLKLD7vmu9jZ2xJ6PPdWL+AffFaFcfpQyQ88bSRnMH+HmKuGe5I +QumRuKgxbH53UbMgZxKe9wRH/sTWMx9y83cloT9wunyI9fyWk+fdPUj40lhc +8xX7AY9FoaMXCScau09/ZuXNitbbEiQoRGWf7WblDQ69tSRJaBWjmj6w8jqq +GXt9SRirebfjHatf3ckV8CeBmzD7+IaVX2ixyfAoCWZm1hUdrPyLYmo6ASR0 +hjDq21n5ET92bw8iwW1543IbNh9R46gSQkL1r/agF9g7D5wKVAgjQeOomNRz +Vr7B/iTpcBI4QmcXW7AvKInnikWQELOJzs/yfYHhu4JRJGg6k4ebsQeXa9p5 +Y3Afy8V3Taz8n6cGuU7h85+UjmdZ9/3+hdVY/H2Ydfmy/H+hC07S "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.9049999282308249, 1.1029282321030514`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.9049999282308269}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7038,7 +6481,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.7504249066936067}, + AxesOrigin->{0, 0.9049999282308269}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7066,7 +6510,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.7504249066936051, 1.313047485013753}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.9049999282308249, 1.1029282321030514`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7074,9 +6519,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913440619685707`*^9}, - CellLabel-> - "Out[417]=",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] + CellChangeTimes->{3.9913440619685707`*^9, 3.9943580278818913`*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"0988a80d-3378-47c2-827c-3c216632343d"] }, Open ]], Cell[CellGroupData[{ @@ -7139,340 +6583,226 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501659425144`*^9},ExpressionUUID->"06bd0169-a5a6-404c-935d-\ -e1a61565f71e"], + CellChangeTimes->{3.9918501659425144`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7414575136308495`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.943928140142778`*^-271\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 95, + 97, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994358027991748*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"1de818c0-9064-40d7-8431-46adcda332c0"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0595470006536119`*^-282\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 418, - 441, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621885586`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, + 98, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994358027998794*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], +In[95]:=",ExpressionUUID->"79e0a43f-d5d5-406c-a514-6f498cc0f961"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.133412609607657`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.888717057348372`*^-294\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 418, 442, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621975574`*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 99, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.9943580280060472`*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.599262146182568`*^-296\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 418, 443, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991344062205559*^9}, - CellLabel-> - "During evaluation of \ -In[418]:=",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], +In[95]:=",ExpressionUUID->"5e4541e1-f657-48c8-b62b-d2b135f773d7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 418, 444, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134406221356*^9}, +during this calculation.\"", 2, 95, 100, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994358028012705*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], +In[95]:=",ExpressionUUID->"9d4495c4-d094-40ca-a23d-dd7f890cd4af"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4lN8XAHBLhcq+ztgipGzZxsyYmXOQPUuLtSzZpZSSXQmpvmgvUgmh +UMo6Y4tQ0SLZQ5IWEiFrJf3m99f7fJ7nPu97z73nnHtfBa9DO325ODg4mjg5 +OP7/XBhqbVZKzmUYWzy9807GntGVKRVp1BcPXdNpGfHnNQDF33hJ9V2Ceq+b +8rTzdAizL+zl7suBK5w9z7nP24DwD8lLv3pLQXjsve7lc27wodb20FxvI+hf +E3fkSz0IZkrj72d6O+DWbFPvSlIs/Oo1uDrdOwJnOk4aTQWnQpPJ3dy3ObMw +V7xyVYCeCTIfqr56qf+Foke719Qv5oHYAY9CHhNuPJyYty5F6T5c0jarsXXg +RbuHWydF1paA1oCLOT2AF/lXCYzZiZXAq8SDnWrRvFjQ7u2dJFcCa/qufOfN +5sWMUbM3H3RKIPr4J+mmCV6s8AjdtG1PCfi8jIsxSOTDuQeWJu2FJUDyraFv +KFuLEZqJO0e2lcK79K0NM0L8GLbz+NxenzLI6CwSDFPmR+HZJvUbB8vAVWCT +x28KPzrdS171NqwMBhNkV7i8+XEgMOnMxrNlMBy8liZWwY+K7rU3vR+Uwdi2 +z0ySiwDuHzw0ZDNXBkvTaQ+jswVR7XnytprocqhSE/33r0IQq7oO/BpLKIco +v3O2iS8EUf1SEK9ASjksDyROpswKotjTexqMm+UQ94kl/kZRCGW+PvEh1ZZD +YlveruFQIbTfoiVx6nc5JOeeeMNFEEZOmVLzi4crwEovUER8ozC6VIxhUngF +8DbvdNikIYxnFK+wjhyvgMRPygPWRsJYpxEgr5NSATGKr75eCRTG8l0iJVZ3 +KyA4S2pFpVoY723k2DQyUAE7bpaoW+8RwRcZxMt5jEoQUr9xyM1XBKuGRUfO +bKuEtprE0kOHRHAmYynD26oSrAacyFcSRDDlyj7Lfw6VYExcMXlfJILdjycu +vjlQCXrpVnsOLYvg199HH3SmV4LklU9nL98SxQ+i89z7xytBSq0icSlfFDlt +ufpHf1QCsTHphNsjUTxmGkF2n60EuenNxzY1ieKDwHfn9ZYrQXn7Yc+aMVHs +3jFecpqfCbqr/pI+6Yrh+7RF6RZNJujdaNO2oIvhypNbeW06TCDpZKk/MBPD +1zUej1+TmED1NFEMdxFDJfUDtysYTDCqPcu/7gTbjJ9a6rZMsAuV+KzzQgx9 +ue8QKoKYYL9ubCitUwzd12l/2HaICTtzqt4tD4qhw6UgxusjTHBs3/vm2ZQY +3qAJvn4eyQQ39TvVruLiGLeJ29jnNBOCPmtdjPcUR96FYFvDbCYciOZMGQ0U +Rx/abnGHXCYEi3QmbT8qjiXyhon+d5lwBMNiJJLE8bS5knvYAyZE3qz1LywS +R6+1bfK0Kiac3m3J6Fhgj08veRvwhgnE8jYiF6cEtnkcczPrYEKx6O5F7XUS +uP3G9B7pbib0dLg/uigvgSJjQcyifiYo7QhV3GEhgVJ8MhJ+X5jQaHN7Tft1 +CUztDpky/sWO54HSp393JHD5xrND6X+YML6+sF6rWAJzn8Yc//KXCcKvyiPO +N0qgc2ymrR8XCzytXozbfpfAMWrlFNc6Fvw1m297TZNEe3H/uQIiCy7kRxX9 +NZPEmFvh5pEyLFBaw3FGY4ckJvWaW6IcC7Y/XWuU6iuJxyuH9lUosCDDZEPZ +9nOS+EnqsxJNlQWad/LOx6RLIjm1Xa11MwsaudQO3M+RxHhHj1kbNRZ8e6Kv +vJ4piSVWBa8Zmiwgo3Xayw+SSBBuna7TZcGr2+1H/3yTxHV3Exh8+uz5/nOw +V5uTROvEQY/tJBacfuzJl8wrhScFKZuqySwgyn39Ui0ihU98tTo+U1hQHBvU +OC4jha+2F7jyGLKghxYWbaUthe0NhgJ6dBbsv/nHKcqQPb4tgMFgsOP/E6dX +aCqFegHGjgjseGuSJ/lcpdB0205zdSMWHKVke7TGS2HvikbEnW0ssMoSmLNO +kcJ5L28eT1MWKPLEnGm7KoXHL9dniJuxoL3LsaTznhQa+9X3BJmz4J5hs6lj +qRTeMuxKWG/BghM52v19NVLoxfhJz2db8/B67qE2KRx5bDPSbMmC1b2RaZ59 +UhjeIvbW0ooFg/RRtU8fpbBNeKn7OdvlubsbfL9LocmoySzDmgXJ6xp3j81J +4d9L5moP2fY6ovVt/4oUars6xEltZwH13c3YSR4Cxkc1zkWxPZYfnv+TSMDH +SXKmajYsqOf/Qj2mRMCrD58pR7J9LXTnm0UNAv7JQ60GtoMH6r2jDNh2nvbm +sGWBqbHG0jISsO027RmFbZmCjJQTVgRcbXDe+QDbc4K8Cly7CfizbrdsOtsv +w45VJLoRsLVsWaKO7Zz3I5Y8/gT8FfrLfIDtyG32Q2cPE9CZ3FD6k237oroj +66MIeGR9qwu3HQtURdR4zicQ8EnXOeBn+19E+g3hVAJ+NTvvJ8R2z4fVW69c +I+D7Uau369kuNjvaLJFFQFs+03gutk89GHa+XkDA/GfcMTPs9+8Vs52ULiNg +IJfQk3ds60bXnMysJeAu7/ldNWyvHVGVUHhGwOs7jA2usT1ica3wzhsCis2d +Prif7aqH3KDyjoDRGq6/DNi+IBHSeW+EgCnX7d6vsNcrIHbIX22CgJT/OGXq +2YbP1ssP5gk4tGo9K4JtCeuqC1v/seOr5y////pPlqgol/ES8bbsPZE+9v40 +S12p0hchIqfmiZ5Ytm+e4LRlSRPR+C6FS5bto1+DR6jKRLT5Epdewd5vK5vB +sDpNIgZ/5bhpzrZiueU6JBMx1CJAsJOdL+0nlfRMrYm4rqzcvoedX3fHLrY8 +301E8h9uJVu2j9v922vlTsRGWcEj9ex81JDtP2UXQsTLjZZnz7Hzd1WiObEj +iogqAktOE+z8HhwvL96dSMRPDR73Tdj+j3W+1yWNiBpPQmeG2PWxT/5v0GAW +EcNXV4wqsk1O2s/hUUjEzPSuYE8TFozuMt3sU0dE84mf1BZ2fW2b+h0V/ImI +O4+vEKzZ9RhpcWXLkwkixh95WejJrtfibI1+0QUi2ncdVTxMY4HUbk9KFa80 +rihT38ZQWTDBerrIrSmNmhttI23Y/UFBxOOuo4E0xqmkp+qw+4dj0JJjAUoj +/+XaTGE9FjTIqlXa7pLGyMHaxjptFlyOvxB6PUIaeXS2eLaps6BlYLPSxElp +lLr2vCCB3a+W9Zo6GcnSWCH8bI3uFhb4jc7rfL4ljdNP7dfEbWLX1/Y9M5pN +0phFXQzqZPfDEXGV4GZ+GVQ9887VS5wFkofqZSUlZfBO3Qb9alF2/2xxfh24 +QQY9lpx2rBdhQWVUsrqgrgw274ndc1uAvZ4fpsddnGXwo/metSd5WKBTUOM/ +lSODzyuFwvSXmHCStmMfkSyLUu/9V8LZ54WFe+ZPA2NZFLLTuzDOPk8E4r4n +OGyXRXo+q9OxnQk3m07lX/CUxZph7TiZl0xgWVV/X3NWFq2nnD/ubWDCtPPG +sNl3shi7VOpeUcAE92Pz/72KlsPgTfExI+FMUE4zlhk/JYek7mGby6FM9nqf +f8BzQQ4nNkw4MkKYELW8ud04Vw6PfqMpJOxnwtUEd/GqV3L4WjBVsGUvE15d +fH47T1Ye22PXypkg+zwvvl5+vF4ep+tv5clwM2Fbb9vfHy3y+PXl2rP7/lWC +Lccqc48OeVz3Mfl99p9K8N4Z/A6+yKNvhs2Y2FwlmEUrnIhbvQGbKVfGmz9X +wmH5hTtGahtwMKW3w+5pJTT7355sCtuAVfE8g1sSKuHA0kxcC78CmlRZLDT/ +rABqiJ/EVxEF9K13v39zkn3/Gu8v4pZSwBjjcdnDYxWQN9DUw1BUwL8Nx8zW +DlXA0OOr6hUkBXS2m9VZ31oBdqcofdkeCnha+HS+VWYF6Iic1IouUcCDhx94 +dppWwC81oSENB0UUOOrbK/dfOdCK7mddu7YRL9vvHi1eLIUZEStPx0YlnG7Y +sDHepwQ+p3g6HuFRQT+OwxGp+BAsp8Itv5A24R5ZMjltpggmvHmPlp9QRY8T +r4X4Q+6x7/OSXKcbN6PhJYlezi15IPJa5dyjqS1o+Lfxzn6bHJA589CeRFLH +KSdbVv9oJqSrUYRE/TWwrvm5TSoxA14QjfRnL2oi98piTfTXq0CVabyg1aOF +B1vmJVeNXgQB7pzQffFb8dqnQPf/9qbCml/1u2YSt6LTjQ+qJcapsPLjvc7J +01uR9d3G/ptqKkz1E2ayUrZiWFvb7dT5FGgvvXhw+NpW9CbY5+adT4FLXif9 +PIq2YkllkaXA82SQaPR0duvainXULN3rxv+B3El5mouKNnoOaahj0GkoPsqr ++F5VGwOm3a7OOZwGht8Mzz41bdQrHUQWngY366bOgK3aqCD52PSgxGm4Ke4f +FEHVxpk2qlNqYxIQCosz0my1UexlmnCWbBKIddJ/dYdpY84qLqVPQ4nAp7y3 +cudzbXzVFl16JCUe9hPAqqhVG8PvfP81Fx0PL/gVh7hfaeNm7zyZhKB4SFkY +XV3Rro2tZ4hDjVbxINBy1EGyXxvtzQaYb/jiQSQoeW5gQhubq/p+E/47CTIl +1Tq+Ijq4cisdrC7HgSad8DDcTQeP3Nb93JIaC2UbA/9weeog37CluPjhWCCv +rTI/56WDdxxyv0XujAXjXufhXH8d1OJ5ZJIqGQuOIenCHSE6SApfr/MuJwZO +5EmGqifp4Ix8dvavumho55egfCzWQbrDW9vfq6PgyJBIkxWHLpaHH2r8/i4M +Wp7trSvk0kWy38bvZ5vCQO5hPnPtal1UEZmJpz4IgxcnqPdf8Okisc6lsyMu +DBQVvK5aiepisKdrw5BqGLz1LvG3UtFF3edUomvMMdj6zW691XZdfMEv3nhx +ayhMzaY4WKbr4l6jMM68lyEw2JfteCtDF+uKYlZ9rgqBF3WVTjM3dbGp9oay +zr0QyD097HI9WxdBuTXjT2IIuErruX8r1MXlcgGGMYTAU+MBv7N1unj8/KOB +q5WH4cbFzRGtI7rYbvPUR9nzEJwJY0TKftHFjYq3TU3xEITt2RUVMqqLWx8N +LcVtOAT2yrExhAldDLy6Jtn6YzCsqWqPC5zXxX3VlbZqPsEQMhx+lo9XDy3G +aqZWHToI5lrPMiw19FDp7aeRzPQgcF5jsbtdSw8L39scuBcZBPvft/I76ejh +hgHxlTeuQXAu+XWcj4EeesmxhiJkg6BntMvvhJEeNp81EdHK3Q8+WZ90Khz0 +MO7qxV0EZiDEC3O+3HBcD1uZnB/Nf/rDlbH4xLtxeigmX5jztccf8utXMTQT +9FD0yPTtrBp/eHGQt8TwjB6ex4gF31P+IPxCMM3xkh7er3pYoUv0h6x4Oe+U +fD1UETxZ0mLhB49nDf8stulh01ta+LYqH8h+xfTa9VYPJ8LMEx/n+EBinu6L +4k49nHxDWbZJ8QFLJ7Xrvn3s+TnljN/38IGuaqJB50c9tPb8PhvA4wPjJ38d +KZ7Tw7vBfX4vXb1BQog57kPURz3mvYUWIS/4Naazs0FGHzuSmBPty/tg8Elx +lbS8PlalTlpPjO2D7KP5Zzo26uPBy8943J7sA/XeqyqooY9cjc3NSkf3gXFm +qJc06mP0Le0J6PeEYHWd/re++uh872p32AEPOLZI/O0RoI+pn3r7tcw8IKaR +m/hjvz72dhWIimzwgGTnbpe1h/WxPys/ZUeXO9xLjHhnHKWPBU4V11kMdxgZ +fNxXdk4fzZ95u/BIu4FjqnXvVaY+Ph7fOvNg2hXcnPUWN1brY211f535G1fw +2SgrWVqrjy4uaLem2BWOVv1wbHuij2WtXuSZIFe48OViz5pX+pgWvhQS9c0F +XtD7usOH9XGVRAyN/t0Z6D98ulz4SDi6d1d2Jq8TSNSY59SuI+Hir/ojMZOO +8OP0lsPyAiQ0mSc8D+twhEyF6XVfREi4f0XicsNNR1jZHW1yWIaEyvX75/N0 +HKG+5mJpkhYJe5m6q3K8HcDo7OMLZQ4kDIm+UVP2bhcQHbPdJZxJ+H1c9u/M +k13wUzFRPdKVhFHKnhWWhbsgp9ayheFBwpdLP9RNo3cB13TXv9YAEkom7HgY +KLcLmhy/Bw9Hk7DccPPU7sCdYKokZcOfQ8LWhbsSksI7oHzyqYJPLgnlU7vl +GpbtQYl5dKE6n4Ra/t0zx8fsYZXVm9sBRSRUHV26S2+wh8ZDST+bykmYu+aR +ct1he2DUzKVFPSehdGAbxa/IDkg7346MTpDwoVb3plE3G8iXPsFkTJGQ2LFA +8qTagPgX9ZSrMyTMWF+8nkPSBubCz+ibLJDwA591ZFn7dii9BWcy/5HwSzp9 +zxfT7aD17YGGg4gBhp70rnEwsAbVuP8iGg0MkIfqCUf0LaHWMG/1dqoBNsiy +cj6KWoL9Yv2lbpoBai4sRkX+tICI4Pn7Y0YG6O2DwwqPLKBlr+dHge0G+CrY +aNhewwICKCSrPZ4GyOVrRufWMoeCnx+l584YYIup8cBNW1NgFC/fi002wLF2 +DtWX2qbQEShJ4jlngIr7DN/LiJvC7+Ht9sTLBmhhnDa2eXAbWL1hJuItA9xt +4en+NWgbjBelTqaUGKBLBLdgy0UT2OJLqVfuN8A3yYqJWgtGcF7R9nfCoAH+ +aeEu3fTBCOY+eOmPDBlgU/qqVvaFGR67phRlfjLAiSuxJiUZRrDT/kOa5KQB +LpYq+g+iEUQanjrMx0FGh9mGm6KXEFqE3ypMKpNx6419uunnGKDx5stea1Uy +Sucbdvf7MeBSyu+0gi1kPCnys3Q7MGAvj5KAnxYZL+b+dK2bpsPUctjvITIZ ++6Rezr9yoIPEmExnuzUZFZ9eKIhSpYHv44DE8hAy+m9s8G76QYEfB8fDTUPJ +mL9OvqiilQIRsgeCesLI2HJPIaIvlwL/xRzauRRNxoKe5w3FeyjwiBq2gZZE +xpy2mrG0l2RYrkyobcogI4OOm9XLDeDSw8y5jiYyxli9N/icrw8yHhvGvJ+R +0f3Axduxp/UhTyBnYK6FjHzU0Y8YoA+sg3mNEm1k9Prcq7ltiz68V7t/wbWP +jGIJCSfIj/RA9V6V+sgEGR3tvWwfNOlCfVaXz4w4BRO1VmxjeHRgeLuCR5gU +BTXQKvbQpDZw/Dro8odIwdwJ2p5TndpgvIPHdvUGCm7oFI+TytKGZ5xUA8IW +Ckpkjk30UrXhlddtPiMGBUuiqH1pYVuhX2l/8QU/Cv4wc6IKr9eEP+2V98QD +Kdh5690A77AGyMRy38kIouCTpvtEWrkGuHXfTMs9TMHyKyvbd7tpwPCpN3Gs +KAqKPiVnmpSqw+hXvV3D5yjYtbCn9oOfGszd+7eoxaTgkUD+eLVfqvDV0Szr +bBUFmyzPNif3qELfqlSLTzUU9HEkREuVq0KNJ/H6tQYK/ksuOVZ5SBXipfSp +f1vZ43kGVv0b2wRCZ/bHvBikYE+PhOO1Tyqg7t/N4ctFxclLZ/9LWlQCOXGZ +gserqMgdd/ynWL8SCDV57ZDioWKcTnBVa60SzMpNZ79cR8X4pYjivHglqO5Z +a6IjTkWtHxrmikJKYGGGp/5touIJztk9PDobwVu5iC/Dhooe2wJrd11QgKin +7vtV7KmoZLKnF44pwAVfkZelO6lI4rRr3umqALV5kSkvnagYRLaynFBSADEV +C8G/+6gYXP/kxFjNBnim8kXMM4yKasSlmvKP8rBFVX6Dym0quhUeGCoclwFs +6Ygrzabi4k/uwOg6GXAMSPrIyKXiDkVCQ+oFGUi4N5njVEDFfw0Gx8IMZGBQ +tVb5bBkVWVPmMbZnpOHcZhe1iefs+OwCHdr0iTCz5TKpdJqKhZtdg17VSULf +KzQVnaWiOH94akmGJDQE/9gVOk/FkYWMTc/DJeFcqWUI6Tf7+9d82+J1JGEL +leN+NbchRnjqMvQLJcDL8qBCk4QhGnmvtdyZIw5d/ubru2iGqClD6e8tE4Ua +vnmiPhiiKbTxuV4ThZyinM3XjAxx7/k7iasjReHw1F8zZzNDlL5pe7qXIQr8 +4eUnB+0MUV6la3nfKxEwS1JY/OxliP/ReXd8+iEMrNw/H+fPGKJAdNRqir0Q +kExCF62SDdGWe3LNioEQVHycWJ+VaoiN0s+ffJYXglK5IQOrS4a4+7bYQY1h +Qbif3pCaecMQjzXZ9QgqCUJWyimKebEhyik56s4z+eFsqODF9E5D9HtNPMAj +sA54Rc/kT3Yb4sJ+V7rHl7WQVMJRa9xniN+MfvhN166FxB8zXycGDfF61++0 +ugNr4XhAF83oqyE6vDNz+tPGB0f2Xh/7tmSIIfm8V5tv8YLrto1oKEfDNTue +Ps32WgN/u3gFmjbQ0Im2Ysuir4Es3x8DVhtpGCOoLsRLWANfk6rCXVVp+Ons +w5kd7avhSKvdw0gdGr4Kr7dOMloN/9nGyLHMaLhgd+qsmuYqqHbuXtY7RMPW +L4Q7tppc4Pat+kVtCA2Pf9e+PSfIBRxRWenbQmkofDRgx4sZTjC7EaS3O5KG +fN1Xn3BXckLHe84DRxNoWH3gp9ld5IRxL82BkjQaBgwuNBxz5wDpg6erNBto +mPx47GdH6F/GuX9++smNNORsrDnhZvaXwXXJrGS0mYaCcrMqGlJ/GeOVqwuy +Wmk48mPINKN2mVHNkZgu0knD5cWdgdm8ywzXK3HhC19oSCv0/C784DcjvSZS +//E6On5Z5m3nVV5irLd1KSEK0FFPxvX3qZVFRtwwWSNciI7c7zduovctMgJW +LyltFaejboSKsXPKIsPALkwsR46Onh9XCsmLC4yekSOzp7TpuJa2xO3WO88Q +X3ugxMaJjq/fJu6Qq59l5JrERk270HEo3cnnyo1Zhk7sOZPLe+mYVKY4ZxYx +y7CdftTdt4+O2aVDfJ46s4yknvlf3gfo6LLX4a5TwU/GUs4J46iTdFw6Lmy4 +LmeG0W94uTO/iI5yvhUJmyKmGAHHcm9aFtPZ/8uWtA7GFGOhuMJ34hEdvSij +Hz+snmKIKPYtalfS0c5J8JjC1R8Ma15ZmboGOopcLwhVZ00yarvyfTq76bgs +uzuvX3CCYSXA0gjro2PglkL1oMHvjD7z1gWpATr+FRridyj4zpir/n7GfZj9 +fmehdJ1t3xka2VsffBtnz2/LE5HVx8cZtf1GYSmTdGQmSBTa24wzrMR2gdY0 +HRPrqpRnZMYZfqePvQ2dp+NvwdW3Neu+MeYakjIkl+j47JX52Rep3xjxv9O8 +q3+z4zu6TrvK/RtDSK9A3e0vHVNs8wR+a31jZB6snv/3j45H88k3Uji/Mf4H +woCTEw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7486,299 +6816,182 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13k4lN8XAHBLhcq+ztgipGzZxsyYmXOQPUuLtSzZpZSSXQmpvmgvUgmh +UMo6Y4tQ0SLZQ5IWEiFrJf3m99f7fJ7nPu97z73nnHtfBa9DO325ODg4mjg5 +OP7/XBhqbVZKzmUYWzy9807GntGVKRVp1BcPXdNpGfHnNQDF33hJ9V2Ceq+b +8rTzdAizL+zl7suBK5w9z7nP24DwD8lLv3pLQXjsve7lc27wodb20FxvI+hf +E3fkSz0IZkrj72d6O+DWbFPvSlIs/Oo1uDrdOwJnOk4aTQWnQpPJ3dy3ObMw +V7xyVYCeCTIfqr56qf+Foke719Qv5oHYAY9CHhNuPJyYty5F6T5c0jarsXXg +RbuHWydF1paA1oCLOT2AF/lXCYzZiZXAq8SDnWrRvFjQ7u2dJFcCa/qufOfN +5sWMUbM3H3RKIPr4J+mmCV6s8AjdtG1PCfi8jIsxSOTDuQeWJu2FJUDyraFv +KFuLEZqJO0e2lcK79K0NM0L8GLbz+NxenzLI6CwSDFPmR+HZJvUbB8vAVWCT +x28KPzrdS171NqwMBhNkV7i8+XEgMOnMxrNlMBy8liZWwY+K7rU3vR+Uwdi2 +z0ySiwDuHzw0ZDNXBkvTaQ+jswVR7XnytprocqhSE/33r0IQq7oO/BpLKIco +v3O2iS8EUf1SEK9ASjksDyROpswKotjTexqMm+UQ94kl/kZRCGW+PvEh1ZZD +YlveruFQIbTfoiVx6nc5JOeeeMNFEEZOmVLzi4crwEovUER8ozC6VIxhUngF +8DbvdNikIYxnFK+wjhyvgMRPygPWRsJYpxEgr5NSATGKr75eCRTG8l0iJVZ3 +KyA4S2pFpVoY723k2DQyUAE7bpaoW+8RwRcZxMt5jEoQUr9xyM1XBKuGRUfO +bKuEtprE0kOHRHAmYynD26oSrAacyFcSRDDlyj7Lfw6VYExcMXlfJILdjycu +vjlQCXrpVnsOLYvg199HH3SmV4LklU9nL98SxQ+i89z7xytBSq0icSlfFDlt +ufpHf1QCsTHphNsjUTxmGkF2n60EuenNxzY1ieKDwHfn9ZYrQXn7Yc+aMVHs +3jFecpqfCbqr/pI+6Yrh+7RF6RZNJujdaNO2oIvhypNbeW06TCDpZKk/MBPD +1zUej1+TmED1NFEMdxFDJfUDtysYTDCqPcu/7gTbjJ9a6rZMsAuV+KzzQgx9 +ue8QKoKYYL9ubCitUwzd12l/2HaICTtzqt4tD4qhw6UgxusjTHBs3/vm2ZQY +3qAJvn4eyQQ39TvVruLiGLeJ29jnNBOCPmtdjPcUR96FYFvDbCYciOZMGQ0U +Rx/abnGHXCYEi3QmbT8qjiXyhon+d5lwBMNiJJLE8bS5knvYAyZE3qz1LywS +R6+1bfK0Kiac3m3J6Fhgj08veRvwhgnE8jYiF6cEtnkcczPrYEKx6O5F7XUS +uP3G9B7pbib0dLg/uigvgSJjQcyifiYo7QhV3GEhgVJ8MhJ+X5jQaHN7Tft1 +CUztDpky/sWO54HSp393JHD5xrND6X+YML6+sF6rWAJzn8Yc//KXCcKvyiPO +N0qgc2ymrR8XCzytXozbfpfAMWrlFNc6Fvw1m297TZNEe3H/uQIiCy7kRxX9 +NZPEmFvh5pEyLFBaw3FGY4ckJvWaW6IcC7Y/XWuU6iuJxyuH9lUosCDDZEPZ +9nOS+EnqsxJNlQWad/LOx6RLIjm1Xa11MwsaudQO3M+RxHhHj1kbNRZ8e6Kv +vJ4piSVWBa8Zmiwgo3Xayw+SSBBuna7TZcGr2+1H/3yTxHV3Exh8+uz5/nOw +V5uTROvEQY/tJBacfuzJl8wrhScFKZuqySwgyn39Ui0ihU98tTo+U1hQHBvU +OC4jha+2F7jyGLKghxYWbaUthe0NhgJ6dBbsv/nHKcqQPb4tgMFgsOP/E6dX +aCqFegHGjgjseGuSJ/lcpdB0205zdSMWHKVke7TGS2HvikbEnW0ssMoSmLNO +kcJ5L28eT1MWKPLEnGm7KoXHL9dniJuxoL3LsaTznhQa+9X3BJmz4J5hs6lj +qRTeMuxKWG/BghM52v19NVLoxfhJz2db8/B67qE2KRx5bDPSbMmC1b2RaZ59 +UhjeIvbW0ooFg/RRtU8fpbBNeKn7OdvlubsbfL9LocmoySzDmgXJ6xp3j81J +4d9L5moP2fY6ovVt/4oUars6xEltZwH13c3YSR4Cxkc1zkWxPZYfnv+TSMDH +SXKmajYsqOf/Qj2mRMCrD58pR7J9LXTnm0UNAv7JQ60GtoMH6r2jDNh2nvbm +sGWBqbHG0jISsO027RmFbZmCjJQTVgRcbXDe+QDbc4K8Cly7CfizbrdsOtsv +w45VJLoRsLVsWaKO7Zz3I5Y8/gT8FfrLfIDtyG32Q2cPE9CZ3FD6k237oroj +66MIeGR9qwu3HQtURdR4zicQ8EnXOeBn+19E+g3hVAJ+NTvvJ8R2z4fVW69c +I+D7Uau369kuNjvaLJFFQFs+03gutk89GHa+XkDA/GfcMTPs9+8Vs52ULiNg +IJfQk3ds60bXnMysJeAu7/ldNWyvHVGVUHhGwOs7jA2usT1ica3wzhsCis2d +Prif7aqH3KDyjoDRGq6/DNi+IBHSeW+EgCnX7d6vsNcrIHbIX22CgJT/OGXq +2YbP1ssP5gk4tGo9K4JtCeuqC1v/seOr5y////pPlqgol/ES8bbsPZE+9v40 +S12p0hchIqfmiZ5Ytm+e4LRlSRPR+C6FS5bto1+DR6jKRLT5Epdewd5vK5vB +sDpNIgZ/5bhpzrZiueU6JBMx1CJAsJOdL+0nlfRMrYm4rqzcvoedX3fHLrY8 +301E8h9uJVu2j9v922vlTsRGWcEj9ex81JDtP2UXQsTLjZZnz7Hzd1WiObEj +iogqAktOE+z8HhwvL96dSMRPDR73Tdj+j3W+1yWNiBpPQmeG2PWxT/5v0GAW +EcNXV4wqsk1O2s/hUUjEzPSuYE8TFozuMt3sU0dE84mf1BZ2fW2b+h0V/ImI +O4+vEKzZ9RhpcWXLkwkixh95WejJrtfibI1+0QUi2ncdVTxMY4HUbk9KFa80 +rihT38ZQWTDBerrIrSmNmhttI23Y/UFBxOOuo4E0xqmkp+qw+4dj0JJjAUoj +/+XaTGE9FjTIqlXa7pLGyMHaxjptFlyOvxB6PUIaeXS2eLaps6BlYLPSxElp +lLr2vCCB3a+W9Zo6GcnSWCH8bI3uFhb4jc7rfL4ljdNP7dfEbWLX1/Y9M5pN +0phFXQzqZPfDEXGV4GZ+GVQ9887VS5wFkofqZSUlZfBO3Qb9alF2/2xxfh24 +QQY9lpx2rBdhQWVUsrqgrgw274ndc1uAvZ4fpsddnGXwo/metSd5WKBTUOM/ +lSODzyuFwvSXmHCStmMfkSyLUu/9V8LZ54WFe+ZPA2NZFLLTuzDOPk8E4r4n +OGyXRXo+q9OxnQk3m07lX/CUxZph7TiZl0xgWVV/X3NWFq2nnD/ubWDCtPPG +sNl3shi7VOpeUcAE92Pz/72KlsPgTfExI+FMUE4zlhk/JYek7mGby6FM9nqf +f8BzQQ4nNkw4MkKYELW8ud04Vw6PfqMpJOxnwtUEd/GqV3L4WjBVsGUvE15d +fH47T1Ye22PXypkg+zwvvl5+vF4ep+tv5clwM2Fbb9vfHy3y+PXl2rP7/lWC +Lccqc48OeVz3Mfl99p9K8N4Z/A6+yKNvhs2Y2FwlmEUrnIhbvQGbKVfGmz9X +wmH5hTtGahtwMKW3w+5pJTT7355sCtuAVfE8g1sSKuHA0kxcC78CmlRZLDT/ +rABqiJ/EVxEF9K13v39zkn3/Gu8v4pZSwBjjcdnDYxWQN9DUw1BUwL8Nx8zW +DlXA0OOr6hUkBXS2m9VZ31oBdqcofdkeCnha+HS+VWYF6Iic1IouUcCDhx94 +dppWwC81oSENB0UUOOrbK/dfOdCK7mddu7YRL9vvHi1eLIUZEStPx0YlnG7Y +sDHepwQ+p3g6HuFRQT+OwxGp+BAsp8Itv5A24R5ZMjltpggmvHmPlp9QRY8T +r4X4Q+6x7/OSXKcbN6PhJYlezi15IPJa5dyjqS1o+Lfxzn6bHJA589CeRFLH +KSdbVv9oJqSrUYRE/TWwrvm5TSoxA14QjfRnL2oi98piTfTXq0CVabyg1aOF +B1vmJVeNXgQB7pzQffFb8dqnQPf/9qbCml/1u2YSt6LTjQ+qJcapsPLjvc7J +01uR9d3G/ptqKkz1E2ayUrZiWFvb7dT5FGgvvXhw+NpW9CbY5+adT4FLXif9 +PIq2YkllkaXA82SQaPR0duvainXULN3rxv+B3El5mouKNnoOaahj0GkoPsqr ++F5VGwOm3a7OOZwGht8Mzz41bdQrHUQWngY366bOgK3aqCD52PSgxGm4Ke4f +FEHVxpk2qlNqYxIQCosz0my1UexlmnCWbBKIddJ/dYdpY84qLqVPQ4nAp7y3 +cudzbXzVFl16JCUe9hPAqqhVG8PvfP81Fx0PL/gVh7hfaeNm7zyZhKB4SFkY +XV3Rro2tZ4hDjVbxINBy1EGyXxvtzQaYb/jiQSQoeW5gQhubq/p+E/47CTIl +1Tq+Ijq4cisdrC7HgSad8DDcTQeP3Nb93JIaC2UbA/9weeog37CluPjhWCCv +rTI/56WDdxxyv0XujAXjXufhXH8d1OJ5ZJIqGQuOIenCHSE6SApfr/MuJwZO +5EmGqifp4Ix8dvavumho55egfCzWQbrDW9vfq6PgyJBIkxWHLpaHH2r8/i4M +Wp7trSvk0kWy38bvZ5vCQO5hPnPtal1UEZmJpz4IgxcnqPdf8Okisc6lsyMu +DBQVvK5aiepisKdrw5BqGLz1LvG3UtFF3edUomvMMdj6zW691XZdfMEv3nhx +ayhMzaY4WKbr4l6jMM68lyEw2JfteCtDF+uKYlZ9rgqBF3WVTjM3dbGp9oay +zr0QyD097HI9WxdBuTXjT2IIuErruX8r1MXlcgGGMYTAU+MBv7N1unj8/KOB +q5WH4cbFzRGtI7rYbvPUR9nzEJwJY0TKftHFjYq3TU3xEITt2RUVMqqLWx8N +LcVtOAT2yrExhAldDLy6Jtn6YzCsqWqPC5zXxX3VlbZqPsEQMhx+lo9XDy3G +aqZWHToI5lrPMiw19FDp7aeRzPQgcF5jsbtdSw8L39scuBcZBPvft/I76ejh +hgHxlTeuQXAu+XWcj4EeesmxhiJkg6BntMvvhJEeNp81EdHK3Q8+WZ90Khz0 +MO7qxV0EZiDEC3O+3HBcD1uZnB/Nf/rDlbH4xLtxeigmX5jztccf8utXMTQT +9FD0yPTtrBp/eHGQt8TwjB6ex4gF31P+IPxCMM3xkh7er3pYoUv0h6x4Oe+U +fD1UETxZ0mLhB49nDf8stulh01ta+LYqH8h+xfTa9VYPJ8LMEx/n+EBinu6L +4k49nHxDWbZJ8QFLJ7Xrvn3s+TnljN/38IGuaqJB50c9tPb8PhvA4wPjJ38d +KZ7Tw7vBfX4vXb1BQog57kPURz3mvYUWIS/4Naazs0FGHzuSmBPty/tg8Elx +lbS8PlalTlpPjO2D7KP5Zzo26uPBy8943J7sA/XeqyqooY9cjc3NSkf3gXFm +qJc06mP0Le0J6PeEYHWd/re++uh872p32AEPOLZI/O0RoI+pn3r7tcw8IKaR +m/hjvz72dhWIimzwgGTnbpe1h/WxPys/ZUeXO9xLjHhnHKWPBU4V11kMdxgZ +fNxXdk4fzZ95u/BIu4FjqnXvVaY+Ph7fOvNg2hXcnPUWN1brY211f535G1fw +2SgrWVqrjy4uaLem2BWOVv1wbHuij2WtXuSZIFe48OViz5pX+pgWvhQS9c0F +XtD7usOH9XGVRAyN/t0Z6D98ulz4SDi6d1d2Jq8TSNSY59SuI+Hir/ojMZOO +8OP0lsPyAiQ0mSc8D+twhEyF6XVfREi4f0XicsNNR1jZHW1yWIaEyvX75/N0 +HKG+5mJpkhYJe5m6q3K8HcDo7OMLZQ4kDIm+UVP2bhcQHbPdJZxJ+H1c9u/M +k13wUzFRPdKVhFHKnhWWhbsgp9ayheFBwpdLP9RNo3cB13TXv9YAEkom7HgY +KLcLmhy/Bw9Hk7DccPPU7sCdYKokZcOfQ8LWhbsSksI7oHzyqYJPLgnlU7vl +GpbtQYl5dKE6n4Ra/t0zx8fsYZXVm9sBRSRUHV26S2+wh8ZDST+bykmYu+aR +ct1he2DUzKVFPSehdGAbxa/IDkg7346MTpDwoVb3plE3G8iXPsFkTJGQ2LFA +8qTagPgX9ZSrMyTMWF+8nkPSBubCz+ibLJDwA591ZFn7dii9BWcy/5HwSzp9 +zxfT7aD17YGGg4gBhp70rnEwsAbVuP8iGg0MkIfqCUf0LaHWMG/1dqoBNsiy +cj6KWoL9Yv2lbpoBai4sRkX+tICI4Pn7Y0YG6O2DwwqPLKBlr+dHge0G+CrY +aNhewwICKCSrPZ4GyOVrRufWMoeCnx+l584YYIup8cBNW1NgFC/fi002wLF2 +DtWX2qbQEShJ4jlngIr7DN/LiJvC7+Ht9sTLBmhhnDa2eXAbWL1hJuItA9xt +4en+NWgbjBelTqaUGKBLBLdgy0UT2OJLqVfuN8A3yYqJWgtGcF7R9nfCoAH+ +aeEu3fTBCOY+eOmPDBlgU/qqVvaFGR67phRlfjLAiSuxJiUZRrDT/kOa5KQB +LpYq+g+iEUQanjrMx0FGh9mGm6KXEFqE3ypMKpNx6419uunnGKDx5stea1Uy +Sucbdvf7MeBSyu+0gi1kPCnys3Q7MGAvj5KAnxYZL+b+dK2bpsPUctjvITIZ ++6Rezr9yoIPEmExnuzUZFZ9eKIhSpYHv44DE8hAy+m9s8G76QYEfB8fDTUPJ +mL9OvqiilQIRsgeCesLI2HJPIaIvlwL/xRzauRRNxoKe5w3FeyjwiBq2gZZE +xpy2mrG0l2RYrkyobcogI4OOm9XLDeDSw8y5jiYyxli9N/icrw8yHhvGvJ+R +0f3Axduxp/UhTyBnYK6FjHzU0Y8YoA+sg3mNEm1k9Prcq7ltiz68V7t/wbWP +jGIJCSfIj/RA9V6V+sgEGR3tvWwfNOlCfVaXz4w4BRO1VmxjeHRgeLuCR5gU +BTXQKvbQpDZw/Dro8odIwdwJ2p5TndpgvIPHdvUGCm7oFI+TytKGZ5xUA8IW +Ckpkjk30UrXhlddtPiMGBUuiqH1pYVuhX2l/8QU/Cv4wc6IKr9eEP+2V98QD +Kdh5690A77AGyMRy38kIouCTpvtEWrkGuHXfTMs9TMHyKyvbd7tpwPCpN3Gs +KAqKPiVnmpSqw+hXvV3D5yjYtbCn9oOfGszd+7eoxaTgkUD+eLVfqvDV0Szr +bBUFmyzPNif3qELfqlSLTzUU9HEkREuVq0KNJ/H6tQYK/ksuOVZ5SBXipfSp +f1vZ43kGVv0b2wRCZ/bHvBikYE+PhOO1Tyqg7t/N4ctFxclLZ/9LWlQCOXGZ +gserqMgdd/ynWL8SCDV57ZDioWKcTnBVa60SzMpNZ79cR8X4pYjivHglqO5Z +a6IjTkWtHxrmikJKYGGGp/5touIJztk9PDobwVu5iC/Dhooe2wJrd11QgKin +7vtV7KmoZLKnF44pwAVfkZelO6lI4rRr3umqALV5kSkvnagYRLaynFBSADEV +C8G/+6gYXP/kxFjNBnim8kXMM4yKasSlmvKP8rBFVX6Dym0quhUeGCoclwFs +6Ygrzabi4k/uwOg6GXAMSPrIyKXiDkVCQ+oFGUi4N5njVEDFfw0Gx8IMZGBQ +tVb5bBkVWVPmMbZnpOHcZhe1iefs+OwCHdr0iTCz5TKpdJqKhZtdg17VSULf +KzQVnaWiOH94akmGJDQE/9gVOk/FkYWMTc/DJeFcqWUI6Tf7+9d82+J1JGEL +leN+NbchRnjqMvQLJcDL8qBCk4QhGnmvtdyZIw5d/ubru2iGqClD6e8tE4Ua +vnmiPhiiKbTxuV4ThZyinM3XjAxx7/k7iasjReHw1F8zZzNDlL5pe7qXIQr8 +4eUnB+0MUV6la3nfKxEwS1JY/OxliP/ReXd8+iEMrNw/H+fPGKJAdNRqir0Q +kExCF62SDdGWe3LNioEQVHycWJ+VaoiN0s+ffJYXglK5IQOrS4a4+7bYQY1h +Qbif3pCaecMQjzXZ9QgqCUJWyimKebEhyik56s4z+eFsqODF9E5D9HtNPMAj +sA54Rc/kT3Yb4sJ+V7rHl7WQVMJRa9xniN+MfvhN166FxB8zXycGDfF61++0 +ugNr4XhAF83oqyE6vDNz+tPGB0f2Xh/7tmSIIfm8V5tv8YLrto1oKEfDNTue +Ps32WgN/u3gFmjbQ0Im2Ysuir4Es3x8DVhtpGCOoLsRLWANfk6rCXVVp+Ons +w5kd7avhSKvdw0gdGr4Kr7dOMloN/9nGyLHMaLhgd+qsmuYqqHbuXtY7RMPW +L4Q7tppc4Pat+kVtCA2Pf9e+PSfIBRxRWenbQmkofDRgx4sZTjC7EaS3O5KG +fN1Xn3BXckLHe84DRxNoWH3gp9ld5IRxL82BkjQaBgwuNBxz5wDpg6erNBto +mPx47GdH6F/GuX9++smNNORsrDnhZvaXwXXJrGS0mYaCcrMqGlJ/GeOVqwuy +Wmk48mPINKN2mVHNkZgu0knD5cWdgdm8ywzXK3HhC19oSCv0/C784DcjvSZS +//E6On5Z5m3nVV5irLd1KSEK0FFPxvX3qZVFRtwwWSNciI7c7zduovctMgJW +LyltFaejboSKsXPKIsPALkwsR46Onh9XCsmLC4yekSOzp7TpuJa2xO3WO88Q +X3ugxMaJjq/fJu6Qq59l5JrERk270HEo3cnnyo1Zhk7sOZPLe+mYVKY4ZxYx +y7CdftTdt4+O2aVDfJ46s4yknvlf3gfo6LLX4a5TwU/GUs4J46iTdFw6Lmy4 +LmeG0W94uTO/iI5yvhUJmyKmGAHHcm9aFtPZ/8uWtA7GFGOhuMJ34hEdvSij +Hz+snmKIKPYtalfS0c5J8JjC1R8Ma15ZmboGOopcLwhVZ00yarvyfTq76bgs +uzuvX3CCYSXA0gjro2PglkL1oMHvjD7z1gWpATr+FRridyj4zpir/n7GfZj9 +fmehdJ1t3xka2VsffBtnz2/LE5HVx8cZtf1GYSmTdGQmSBTa24wzrMR2gdY0 +HRPrqpRnZMYZfqePvQ2dp+NvwdW3Neu+MeYakjIkl+j47JX52Rep3xjxv9O8 +q3+z4zu6TrvK/RtDSK9A3e0vHVNs8wR+a31jZB6snv/3j45H88k3Uji/Mf4H +woCTEw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.09495642188928918}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7790,19 +7003,19 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.09495642188928918}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7816,298 +7029,181 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13k4lN8XAHBLhcq+ztgipGzZxsyYmXOQPUuLtSzZpZSSXQmpvmgvUgmh +UMo6Y4tQ0SLZQ5IWEiFrJf3m99f7fJ7nPu97z73nnHtfBa9DO325ODg4mjg5 +OP7/XBhqbVZKzmUYWzy9807GntGVKRVp1BcPXdNpGfHnNQDF33hJ9V2Ceq+b +8rTzdAizL+zl7suBK5w9z7nP24DwD8lLv3pLQXjsve7lc27wodb20FxvI+hf +E3fkSz0IZkrj72d6O+DWbFPvSlIs/Oo1uDrdOwJnOk4aTQWnQpPJ3dy3ObMw +V7xyVYCeCTIfqr56qf+Foke719Qv5oHYAY9CHhNuPJyYty5F6T5c0jarsXXg +RbuHWydF1paA1oCLOT2AF/lXCYzZiZXAq8SDnWrRvFjQ7u2dJFcCa/qufOfN +5sWMUbM3H3RKIPr4J+mmCV6s8AjdtG1PCfi8jIsxSOTDuQeWJu2FJUDyraFv +KFuLEZqJO0e2lcK79K0NM0L8GLbz+NxenzLI6CwSDFPmR+HZJvUbB8vAVWCT +x28KPzrdS171NqwMBhNkV7i8+XEgMOnMxrNlMBy8liZWwY+K7rU3vR+Uwdi2 +z0ySiwDuHzw0ZDNXBkvTaQ+jswVR7XnytprocqhSE/33r0IQq7oO/BpLKIco +v3O2iS8EUf1SEK9ASjksDyROpswKotjTexqMm+UQ94kl/kZRCGW+PvEh1ZZD +YlveruFQIbTfoiVx6nc5JOeeeMNFEEZOmVLzi4crwEovUER8ozC6VIxhUngF +8DbvdNikIYxnFK+wjhyvgMRPygPWRsJYpxEgr5NSATGKr75eCRTG8l0iJVZ3 +KyA4S2pFpVoY723k2DQyUAE7bpaoW+8RwRcZxMt5jEoQUr9xyM1XBKuGRUfO +bKuEtprE0kOHRHAmYynD26oSrAacyFcSRDDlyj7Lfw6VYExcMXlfJILdjycu +vjlQCXrpVnsOLYvg199HH3SmV4LklU9nL98SxQ+i89z7xytBSq0icSlfFDlt +ufpHf1QCsTHphNsjUTxmGkF2n60EuenNxzY1ieKDwHfn9ZYrQXn7Yc+aMVHs +3jFecpqfCbqr/pI+6Yrh+7RF6RZNJujdaNO2oIvhypNbeW06TCDpZKk/MBPD +1zUej1+TmED1NFEMdxFDJfUDtysYTDCqPcu/7gTbjJ9a6rZMsAuV+KzzQgx9 +ue8QKoKYYL9ubCitUwzd12l/2HaICTtzqt4tD4qhw6UgxusjTHBs3/vm2ZQY +3qAJvn4eyQQ39TvVruLiGLeJ29jnNBOCPmtdjPcUR96FYFvDbCYciOZMGQ0U +Rx/abnGHXCYEi3QmbT8qjiXyhon+d5lwBMNiJJLE8bS5knvYAyZE3qz1LywS +R6+1bfK0Kiac3m3J6Fhgj08veRvwhgnE8jYiF6cEtnkcczPrYEKx6O5F7XUS +uP3G9B7pbib0dLg/uigvgSJjQcyifiYo7QhV3GEhgVJ8MhJ+X5jQaHN7Tft1 +CUztDpky/sWO54HSp393JHD5xrND6X+YML6+sF6rWAJzn8Yc//KXCcKvyiPO +N0qgc2ymrR8XCzytXozbfpfAMWrlFNc6Fvw1m297TZNEe3H/uQIiCy7kRxX9 +NZPEmFvh5pEyLFBaw3FGY4ckJvWaW6IcC7Y/XWuU6iuJxyuH9lUosCDDZEPZ +9nOS+EnqsxJNlQWad/LOx6RLIjm1Xa11MwsaudQO3M+RxHhHj1kbNRZ8e6Kv +vJ4piSVWBa8Zmiwgo3Xayw+SSBBuna7TZcGr2+1H/3yTxHV3Exh8+uz5/nOw +V5uTROvEQY/tJBacfuzJl8wrhScFKZuqySwgyn39Ui0ihU98tTo+U1hQHBvU +OC4jha+2F7jyGLKghxYWbaUthe0NhgJ6dBbsv/nHKcqQPb4tgMFgsOP/E6dX +aCqFegHGjgjseGuSJ/lcpdB0205zdSMWHKVke7TGS2HvikbEnW0ssMoSmLNO +kcJ5L28eT1MWKPLEnGm7KoXHL9dniJuxoL3LsaTznhQa+9X3BJmz4J5hs6lj +qRTeMuxKWG/BghM52v19NVLoxfhJz2db8/B67qE2KRx5bDPSbMmC1b2RaZ59 +UhjeIvbW0ooFg/RRtU8fpbBNeKn7OdvlubsbfL9LocmoySzDmgXJ6xp3j81J +4d9L5moP2fY6ovVt/4oUars6xEltZwH13c3YSR4Cxkc1zkWxPZYfnv+TSMDH +SXKmajYsqOf/Qj2mRMCrD58pR7J9LXTnm0UNAv7JQ60GtoMH6r2jDNh2nvbm +sGWBqbHG0jISsO027RmFbZmCjJQTVgRcbXDe+QDbc4K8Cly7CfizbrdsOtsv +w45VJLoRsLVsWaKO7Zz3I5Y8/gT8FfrLfIDtyG32Q2cPE9CZ3FD6k237oroj +66MIeGR9qwu3HQtURdR4zicQ8EnXOeBn+19E+g3hVAJ+NTvvJ8R2z4fVW69c +I+D7Uau369kuNjvaLJFFQFs+03gutk89GHa+XkDA/GfcMTPs9+8Vs52ULiNg +IJfQk3ds60bXnMysJeAu7/ldNWyvHVGVUHhGwOs7jA2usT1ica3wzhsCis2d +Prif7aqH3KDyjoDRGq6/DNi+IBHSeW+EgCnX7d6vsNcrIHbIX22CgJT/OGXq +2YbP1ssP5gk4tGo9K4JtCeuqC1v/seOr5y////pPlqgol/ES8bbsPZE+9v40 +S12p0hchIqfmiZ5Ytm+e4LRlSRPR+C6FS5bto1+DR6jKRLT5Epdewd5vK5vB +sDpNIgZ/5bhpzrZiueU6JBMx1CJAsJOdL+0nlfRMrYm4rqzcvoedX3fHLrY8 +301E8h9uJVu2j9v922vlTsRGWcEj9ex81JDtP2UXQsTLjZZnz7Hzd1WiObEj +iogqAktOE+z8HhwvL96dSMRPDR73Tdj+j3W+1yWNiBpPQmeG2PWxT/5v0GAW +EcNXV4wqsk1O2s/hUUjEzPSuYE8TFozuMt3sU0dE84mf1BZ2fW2b+h0V/ImI +O4+vEKzZ9RhpcWXLkwkixh95WejJrtfibI1+0QUi2ncdVTxMY4HUbk9KFa80 +rihT38ZQWTDBerrIrSmNmhttI23Y/UFBxOOuo4E0xqmkp+qw+4dj0JJjAUoj +/+XaTGE9FjTIqlXa7pLGyMHaxjptFlyOvxB6PUIaeXS2eLaps6BlYLPSxElp +lLr2vCCB3a+W9Zo6GcnSWCH8bI3uFhb4jc7rfL4ljdNP7dfEbWLX1/Y9M5pN +0phFXQzqZPfDEXGV4GZ+GVQ9887VS5wFkofqZSUlZfBO3Qb9alF2/2xxfh24 +QQY9lpx2rBdhQWVUsrqgrgw274ndc1uAvZ4fpsddnGXwo/metSd5WKBTUOM/ +lSODzyuFwvSXmHCStmMfkSyLUu/9V8LZ54WFe+ZPA2NZFLLTuzDOPk8E4r4n +OGyXRXo+q9OxnQk3m07lX/CUxZph7TiZl0xgWVV/X3NWFq2nnD/ubWDCtPPG +sNl3shi7VOpeUcAE92Pz/72KlsPgTfExI+FMUE4zlhk/JYek7mGby6FM9nqf +f8BzQQ4nNkw4MkKYELW8ud04Vw6PfqMpJOxnwtUEd/GqV3L4WjBVsGUvE15d +fH47T1Ye22PXypkg+zwvvl5+vF4ep+tv5clwM2Fbb9vfHy3y+PXl2rP7/lWC +Lccqc48OeVz3Mfl99p9K8N4Z/A6+yKNvhs2Y2FwlmEUrnIhbvQGbKVfGmz9X +wmH5hTtGahtwMKW3w+5pJTT7355sCtuAVfE8g1sSKuHA0kxcC78CmlRZLDT/ +rABqiJ/EVxEF9K13v39zkn3/Gu8v4pZSwBjjcdnDYxWQN9DUw1BUwL8Nx8zW +DlXA0OOr6hUkBXS2m9VZ31oBdqcofdkeCnha+HS+VWYF6Iic1IouUcCDhx94 +dppWwC81oSENB0UUOOrbK/dfOdCK7mddu7YRL9vvHi1eLIUZEStPx0YlnG7Y +sDHepwQ+p3g6HuFRQT+OwxGp+BAsp8Itv5A24R5ZMjltpggmvHmPlp9QRY8T +r4X4Q+6x7/OSXKcbN6PhJYlezi15IPJa5dyjqS1o+Lfxzn6bHJA589CeRFLH +KSdbVv9oJqSrUYRE/TWwrvm5TSoxA14QjfRnL2oi98piTfTXq0CVabyg1aOF +B1vmJVeNXgQB7pzQffFb8dqnQPf/9qbCml/1u2YSt6LTjQ+qJcapsPLjvc7J +01uR9d3G/ptqKkz1E2ayUrZiWFvb7dT5FGgvvXhw+NpW9CbY5+adT4FLXif9 +PIq2YkllkaXA82SQaPR0duvainXULN3rxv+B3El5mouKNnoOaahj0GkoPsqr ++F5VGwOm3a7OOZwGht8Mzz41bdQrHUQWngY366bOgK3aqCD52PSgxGm4Ke4f +FEHVxpk2qlNqYxIQCosz0my1UexlmnCWbBKIddJ/dYdpY84qLqVPQ4nAp7y3 +cudzbXzVFl16JCUe9hPAqqhVG8PvfP81Fx0PL/gVh7hfaeNm7zyZhKB4SFkY +XV3Rro2tZ4hDjVbxINBy1EGyXxvtzQaYb/jiQSQoeW5gQhubq/p+E/47CTIl +1Tq+Ijq4cisdrC7HgSad8DDcTQeP3Nb93JIaC2UbA/9weeog37CluPjhWCCv +rTI/56WDdxxyv0XujAXjXufhXH8d1OJ5ZJIqGQuOIenCHSE6SApfr/MuJwZO +5EmGqifp4Ix8dvavumho55egfCzWQbrDW9vfq6PgyJBIkxWHLpaHH2r8/i4M +Wp7trSvk0kWy38bvZ5vCQO5hPnPtal1UEZmJpz4IgxcnqPdf8Okisc6lsyMu +DBQVvK5aiepisKdrw5BqGLz1LvG3UtFF3edUomvMMdj6zW691XZdfMEv3nhx +ayhMzaY4WKbr4l6jMM68lyEw2JfteCtDF+uKYlZ9rgqBF3WVTjM3dbGp9oay +zr0QyD097HI9WxdBuTXjT2IIuErruX8r1MXlcgGGMYTAU+MBv7N1unj8/KOB +q5WH4cbFzRGtI7rYbvPUR9nzEJwJY0TKftHFjYq3TU3xEITt2RUVMqqLWx8N +LcVtOAT2yrExhAldDLy6Jtn6YzCsqWqPC5zXxX3VlbZqPsEQMhx+lo9XDy3G +aqZWHToI5lrPMiw19FDp7aeRzPQgcF5jsbtdSw8L39scuBcZBPvft/I76ejh +hgHxlTeuQXAu+XWcj4EeesmxhiJkg6BntMvvhJEeNp81EdHK3Q8+WZ90Khz0 +MO7qxV0EZiDEC3O+3HBcD1uZnB/Nf/rDlbH4xLtxeigmX5jztccf8utXMTQT +9FD0yPTtrBp/eHGQt8TwjB6ex4gF31P+IPxCMM3xkh7er3pYoUv0h6x4Oe+U +fD1UETxZ0mLhB49nDf8stulh01ta+LYqH8h+xfTa9VYPJ8LMEx/n+EBinu6L +4k49nHxDWbZJ8QFLJ7Xrvn3s+TnljN/38IGuaqJB50c9tPb8PhvA4wPjJ38d +KZ7Tw7vBfX4vXb1BQog57kPURz3mvYUWIS/4Naazs0FGHzuSmBPty/tg8Elx +lbS8PlalTlpPjO2D7KP5Zzo26uPBy8943J7sA/XeqyqooY9cjc3NSkf3gXFm +qJc06mP0Le0J6PeEYHWd/re++uh872p32AEPOLZI/O0RoI+pn3r7tcw8IKaR +m/hjvz72dhWIimzwgGTnbpe1h/WxPys/ZUeXO9xLjHhnHKWPBU4V11kMdxgZ +fNxXdk4fzZ95u/BIu4FjqnXvVaY+Ph7fOvNg2hXcnPUWN1brY211f535G1fw +2SgrWVqrjy4uaLem2BWOVv1wbHuij2WtXuSZIFe48OViz5pX+pgWvhQS9c0F +XtD7usOH9XGVRAyN/t0Z6D98ulz4SDi6d1d2Jq8TSNSY59SuI+Hir/ojMZOO +8OP0lsPyAiQ0mSc8D+twhEyF6XVfREi4f0XicsNNR1jZHW1yWIaEyvX75/N0 +HKG+5mJpkhYJe5m6q3K8HcDo7OMLZQ4kDIm+UVP2bhcQHbPdJZxJ+H1c9u/M +k13wUzFRPdKVhFHKnhWWhbsgp9ayheFBwpdLP9RNo3cB13TXv9YAEkom7HgY +KLcLmhy/Bw9Hk7DccPPU7sCdYKokZcOfQ8LWhbsSksI7oHzyqYJPLgnlU7vl +GpbtQYl5dKE6n4Ra/t0zx8fsYZXVm9sBRSRUHV26S2+wh8ZDST+bykmYu+aR +ct1he2DUzKVFPSehdGAbxa/IDkg7346MTpDwoVb3plE3G8iXPsFkTJGQ2LFA +8qTagPgX9ZSrMyTMWF+8nkPSBubCz+ibLJDwA591ZFn7dii9BWcy/5HwSzp9 +zxfT7aD17YGGg4gBhp70rnEwsAbVuP8iGg0MkIfqCUf0LaHWMG/1dqoBNsiy +cj6KWoL9Yv2lbpoBai4sRkX+tICI4Pn7Y0YG6O2DwwqPLKBlr+dHge0G+CrY +aNhewwICKCSrPZ4GyOVrRufWMoeCnx+l584YYIup8cBNW1NgFC/fi002wLF2 +DtWX2qbQEShJ4jlngIr7DN/LiJvC7+Ht9sTLBmhhnDa2eXAbWL1hJuItA9xt +4en+NWgbjBelTqaUGKBLBLdgy0UT2OJLqVfuN8A3yYqJWgtGcF7R9nfCoAH+ +aeEu3fTBCOY+eOmPDBlgU/qqVvaFGR67phRlfjLAiSuxJiUZRrDT/kOa5KQB +LpYq+g+iEUQanjrMx0FGh9mGm6KXEFqE3ypMKpNx6419uunnGKDx5stea1Uy +Sucbdvf7MeBSyu+0gi1kPCnys3Q7MGAvj5KAnxYZL+b+dK2bpsPUctjvITIZ ++6Rezr9yoIPEmExnuzUZFZ9eKIhSpYHv44DE8hAy+m9s8G76QYEfB8fDTUPJ +mL9OvqiilQIRsgeCesLI2HJPIaIvlwL/xRzauRRNxoKe5w3FeyjwiBq2gZZE +xpy2mrG0l2RYrkyobcogI4OOm9XLDeDSw8y5jiYyxli9N/icrw8yHhvGvJ+R +0f3Axduxp/UhTyBnYK6FjHzU0Y8YoA+sg3mNEm1k9Prcq7ltiz68V7t/wbWP +jGIJCSfIj/RA9V6V+sgEGR3tvWwfNOlCfVaXz4w4BRO1VmxjeHRgeLuCR5gU +BTXQKvbQpDZw/Dro8odIwdwJ2p5TndpgvIPHdvUGCm7oFI+TytKGZ5xUA8IW +Ckpkjk30UrXhlddtPiMGBUuiqH1pYVuhX2l/8QU/Cv4wc6IKr9eEP+2V98QD +Kdh5690A77AGyMRy38kIouCTpvtEWrkGuHXfTMs9TMHyKyvbd7tpwPCpN3Gs +KAqKPiVnmpSqw+hXvV3D5yjYtbCn9oOfGszd+7eoxaTgkUD+eLVfqvDV0Szr +bBUFmyzPNif3qELfqlSLTzUU9HEkREuVq0KNJ/H6tQYK/ksuOVZ5SBXipfSp +f1vZ43kGVv0b2wRCZ/bHvBikYE+PhOO1Tyqg7t/N4ctFxclLZ/9LWlQCOXGZ +gserqMgdd/ynWL8SCDV57ZDioWKcTnBVa60SzMpNZ79cR8X4pYjivHglqO5Z +a6IjTkWtHxrmikJKYGGGp/5touIJztk9PDobwVu5iC/Dhooe2wJrd11QgKin +7vtV7KmoZLKnF44pwAVfkZelO6lI4rRr3umqALV5kSkvnagYRLaynFBSADEV +C8G/+6gYXP/kxFjNBnim8kXMM4yKasSlmvKP8rBFVX6Dym0quhUeGCoclwFs +6Ygrzabi4k/uwOg6GXAMSPrIyKXiDkVCQ+oFGUi4N5njVEDFfw0Gx8IMZGBQ +tVb5bBkVWVPmMbZnpOHcZhe1iefs+OwCHdr0iTCz5TKpdJqKhZtdg17VSULf +KzQVnaWiOH94akmGJDQE/9gVOk/FkYWMTc/DJeFcqWUI6Tf7+9d82+J1JGEL +leN+NbchRnjqMvQLJcDL8qBCk4QhGnmvtdyZIw5d/ubru2iGqClD6e8tE4Ua +vnmiPhiiKbTxuV4ThZyinM3XjAxx7/k7iasjReHw1F8zZzNDlL5pe7qXIQr8 +4eUnB+0MUV6la3nfKxEwS1JY/OxliP/ReXd8+iEMrNw/H+fPGKJAdNRqir0Q +kExCF62SDdGWe3LNioEQVHycWJ+VaoiN0s+ffJYXglK5IQOrS4a4+7bYQY1h +Qbif3pCaecMQjzXZ9QgqCUJWyimKebEhyik56s4z+eFsqODF9E5D9HtNPMAj +sA54Rc/kT3Yb4sJ+V7rHl7WQVMJRa9xniN+MfvhN166FxB8zXycGDfF61++0 +ugNr4XhAF83oqyE6vDNz+tPGB0f2Xh/7tmSIIfm8V5tv8YLrto1oKEfDNTue +Ps32WgN/u3gFmjbQ0Im2Ysuir4Es3x8DVhtpGCOoLsRLWANfk6rCXVVp+Ons +w5kd7avhSKvdw0gdGr4Kr7dOMloN/9nGyLHMaLhgd+qsmuYqqHbuXtY7RMPW +L4Q7tppc4Pat+kVtCA2Pf9e+PSfIBRxRWenbQmkofDRgx4sZTjC7EaS3O5KG +fN1Xn3BXckLHe84DRxNoWH3gp9ld5IRxL82BkjQaBgwuNBxz5wDpg6erNBto +mPx47GdH6F/GuX9++smNNORsrDnhZvaXwXXJrGS0mYaCcrMqGlJ/GeOVqwuy +Wmk48mPINKN2mVHNkZgu0knD5cWdgdm8ywzXK3HhC19oSCv0/C784DcjvSZS +//E6On5Z5m3nVV5irLd1KSEK0FFPxvX3qZVFRtwwWSNciI7c7zduovctMgJW +LyltFaejboSKsXPKIsPALkwsR46Onh9XCsmLC4yekSOzp7TpuJa2xO3WO88Q +X3ugxMaJjq/fJu6Qq59l5JrERk270HEo3cnnyo1Zhk7sOZPLe+mYVKY4ZxYx +y7CdftTdt4+O2aVDfJ46s4yknvlf3gfo6LLX4a5TwU/GUs4J46iTdFw6Lmy4 +LmeG0W94uTO/iI5yvhUJmyKmGAHHcm9aFtPZ/8uWtA7GFGOhuMJ34hEdvSij +Hz+snmKIKPYtalfS0c5J8JjC1R8Ma15ZmboGOopcLwhVZ00yarvyfTq76bgs +uzuvX3CCYSXA0gjro2PglkL1oMHvjD7z1gWpATr+FRridyj4zpir/n7GfZj9 +fmehdJ1t3xka2VsffBtnz2/LE5HVx8cZtf1GYSmTdGQmSBTa24wzrMR2gdY0 +HRPrqpRnZMYZfqePvQ2dp+NvwdW3Neu+MeYakjIkl+j47JX52Rep3xjxv9O8 +q3+z4zu6TrvK/RtDSK9A3e0vHVNs8wR+a31jZB6snv/3j45H88k3Uji/Mf4H +woCTEw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.09495642188928918}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8118,6 +7214,7 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8145,7 +7242,8 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15142054732361562`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09495642188928918}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8153,11 +7251,12 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.99134491550045*^9}, - CellLabel-> - "Out[418]=",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] + CellChangeTimes->{3.99134491550045*^9, 3.994358374924075*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"c478ee92-46bf-45fe-b78d-cf9262d28a40"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -8226,15 +7325,987 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.000667"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.9938499103562326`*^9},ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-\ -b938908ab9a4"], + 3.9938499103562326`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.081589}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994358375012776*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"6ebcfe82-ad06-4fea-a5b2-7dae575b1738"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6b0777bb-40fd-b54e-aa03-\ -b6e82cb2e939"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4lN8XAHBLhcq+ztgipGzZxsyYmXOQPUuLtSzZpZSSXQmpvmgvUgmh +UMo6Y4tQ0SLZQ5IWEiFrJf3m99f7fJ7nPu97z73nnHtfBa9DO325ODg4mjg5 +OP7/XBhqbVZKzmUYWzy9807GntGVKRVp1BcPXdNpGfHnNQDF33hJ9V2Ceq+b +8rTzdAizL+zl7suBK5w9z7nP24DwD8lLv3pLQXjsve7lc27wodb20FxvI+hf +E3fkSz0IZkrj72d6O+DWbFPvSlIs/Oo1uDrdOwJnOk4aTQWnQpPJ3dy3ObMw +V7xyVYCeCTIfqr56qf+Foke719Qv5oHYAY9CHhNuPJyYty5F6T5c0jarsXXg +RbuHWydF1paA1oCLOT2AF/lXCYzZiZXAq8SDnWrRvFjQ7u2dJFcCa/qufOfN +5sWMUbM3H3RKIPr4J+mmCV6s8AjdtG1PCfi8jIsxSOTDuQeWJu2FJUDyraFv +KFuLEZqJO0e2lcK79K0NM0L8GLbz+NxenzLI6CwSDFPmR+HZJvUbB8vAVWCT +x28KPzrdS171NqwMBhNkV7i8+XEgMOnMxrNlMBy8liZWwY+K7rU3vR+Uwdi2 +z0ySiwDuHzw0ZDNXBkvTaQ+jswVR7XnytprocqhSE/33r0IQq7oO/BpLKIco +v3O2iS8EUf1SEK9ASjksDyROpswKotjTexqMm+UQ94kl/kZRCGW+PvEh1ZZD +YlveruFQIbTfoiVx6nc5JOeeeMNFEEZOmVLzi4crwEovUER8ozC6VIxhUngF +8DbvdNikIYxnFK+wjhyvgMRPygPWRsJYpxEgr5NSATGKr75eCRTG8l0iJVZ3 +KyA4S2pFpVoY723k2DQyUAE7bpaoW+8RwRcZxMt5jEoQUr9xyM1XBKuGRUfO +bKuEtprE0kOHRHAmYynD26oSrAacyFcSRDDlyj7Lfw6VYExcMXlfJILdjycu +vjlQCXrpVnsOLYvg199HH3SmV4LklU9nL98SxQ+i89z7xytBSq0icSlfFDlt +ufpHf1QCsTHphNsjUTxmGkF2n60EuenNxzY1ieKDwHfn9ZYrQXn7Yc+aMVHs +3jFecpqfCbqr/pI+6Yrh+7RF6RZNJujdaNO2oIvhypNbeW06TCDpZKk/MBPD +1zUej1+TmED1NFEMdxFDJfUDtysYTDCqPcu/7gTbjJ9a6rZMsAuV+KzzQgx9 +ue8QKoKYYL9ubCitUwzd12l/2HaICTtzqt4tD4qhw6UgxusjTHBs3/vm2ZQY +3qAJvn4eyQQ39TvVruLiGLeJ29jnNBOCPmtdjPcUR96FYFvDbCYciOZMGQ0U +Rx/abnGHXCYEi3QmbT8qjiXyhon+d5lwBMNiJJLE8bS5knvYAyZE3qz1LywS +R6+1bfK0Kiac3m3J6Fhgj08veRvwhgnE8jYiF6cEtnkcczPrYEKx6O5F7XUS +uP3G9B7pbib0dLg/uigvgSJjQcyifiYo7QhV3GEhgVJ8MhJ+X5jQaHN7Tft1 +CUztDpky/sWO54HSp393JHD5xrND6X+YML6+sF6rWAJzn8Yc//KXCcKvyiPO +N0qgc2ymrR8XCzytXozbfpfAMWrlFNc6Fvw1m297TZNEe3H/uQIiCy7kRxX9 +NZPEmFvh5pEyLFBaw3FGY4ckJvWaW6IcC7Y/XWuU6iuJxyuH9lUosCDDZEPZ +9nOS+EnqsxJNlQWad/LOx6RLIjm1Xa11MwsaudQO3M+RxHhHj1kbNRZ8e6Kv +vJ4piSVWBa8Zmiwgo3Xayw+SSBBuna7TZcGr2+1H/3yTxHV3Exh8+uz5/nOw +V5uTROvEQY/tJBacfuzJl8wrhScFKZuqySwgyn39Ui0ihU98tTo+U1hQHBvU +OC4jha+2F7jyGLKghxYWbaUthe0NhgJ6dBbsv/nHKcqQPb4tgMFgsOP/E6dX +aCqFegHGjgjseGuSJ/lcpdB0205zdSMWHKVke7TGS2HvikbEnW0ssMoSmLNO +kcJ5L28eT1MWKPLEnGm7KoXHL9dniJuxoL3LsaTznhQa+9X3BJmz4J5hs6lj +qRTeMuxKWG/BghM52v19NVLoxfhJz2db8/B67qE2KRx5bDPSbMmC1b2RaZ59 +UhjeIvbW0ooFg/RRtU8fpbBNeKn7OdvlubsbfL9LocmoySzDmgXJ6xp3j81J +4d9L5moP2fY6ovVt/4oUars6xEltZwH13c3YSR4Cxkc1zkWxPZYfnv+TSMDH +SXKmajYsqOf/Qj2mRMCrD58pR7J9LXTnm0UNAv7JQ60GtoMH6r2jDNh2nvbm +sGWBqbHG0jISsO027RmFbZmCjJQTVgRcbXDe+QDbc4K8Cly7CfizbrdsOtsv +w45VJLoRsLVsWaKO7Zz3I5Y8/gT8FfrLfIDtyG32Q2cPE9CZ3FD6k237oroj +66MIeGR9qwu3HQtURdR4zicQ8EnXOeBn+19E+g3hVAJ+NTvvJ8R2z4fVW69c +I+D7Uau369kuNjvaLJFFQFs+03gutk89GHa+XkDA/GfcMTPs9+8Vs52ULiNg +IJfQk3ds60bXnMysJeAu7/ldNWyvHVGVUHhGwOs7jA2usT1ica3wzhsCis2d +Prif7aqH3KDyjoDRGq6/DNi+IBHSeW+EgCnX7d6vsNcrIHbIX22CgJT/OGXq +2YbP1ssP5gk4tGo9K4JtCeuqC1v/seOr5y////pPlqgol/ES8bbsPZE+9v40 +S12p0hchIqfmiZ5Ytm+e4LRlSRPR+C6FS5bto1+DR6jKRLT5Epdewd5vK5vB +sDpNIgZ/5bhpzrZiueU6JBMx1CJAsJOdL+0nlfRMrYm4rqzcvoedX3fHLrY8 +301E8h9uJVu2j9v922vlTsRGWcEj9ex81JDtP2UXQsTLjZZnz7Hzd1WiObEj +iogqAktOE+z8HhwvL96dSMRPDR73Tdj+j3W+1yWNiBpPQmeG2PWxT/5v0GAW +EcNXV4wqsk1O2s/hUUjEzPSuYE8TFozuMt3sU0dE84mf1BZ2fW2b+h0V/ImI +O4+vEKzZ9RhpcWXLkwkixh95WejJrtfibI1+0QUi2ncdVTxMY4HUbk9KFa80 +rihT38ZQWTDBerrIrSmNmhttI23Y/UFBxOOuo4E0xqmkp+qw+4dj0JJjAUoj +/+XaTGE9FjTIqlXa7pLGyMHaxjptFlyOvxB6PUIaeXS2eLaps6BlYLPSxElp +lLr2vCCB3a+W9Zo6GcnSWCH8bI3uFhb4jc7rfL4ljdNP7dfEbWLX1/Y9M5pN +0phFXQzqZPfDEXGV4GZ+GVQ9887VS5wFkofqZSUlZfBO3Qb9alF2/2xxfh24 +QQY9lpx2rBdhQWVUsrqgrgw274ndc1uAvZ4fpsddnGXwo/metSd5WKBTUOM/ +lSODzyuFwvSXmHCStmMfkSyLUu/9V8LZ54WFe+ZPA2NZFLLTuzDOPk8E4r4n +OGyXRXo+q9OxnQk3m07lX/CUxZph7TiZl0xgWVV/X3NWFq2nnD/ubWDCtPPG +sNl3shi7VOpeUcAE92Pz/72KlsPgTfExI+FMUE4zlhk/JYek7mGby6FM9nqf +f8BzQQ4nNkw4MkKYELW8ud04Vw6PfqMpJOxnwtUEd/GqV3L4WjBVsGUvE15d +fH47T1Ye22PXypkg+zwvvl5+vF4ep+tv5clwM2Fbb9vfHy3y+PXl2rP7/lWC +Lccqc48OeVz3Mfl99p9K8N4Z/A6+yKNvhs2Y2FwlmEUrnIhbvQGbKVfGmz9X +wmH5hTtGahtwMKW3w+5pJTT7355sCtuAVfE8g1sSKuHA0kxcC78CmlRZLDT/ +rABqiJ/EVxEF9K13v39zkn3/Gu8v4pZSwBjjcdnDYxWQN9DUw1BUwL8Nx8zW +DlXA0OOr6hUkBXS2m9VZ31oBdqcofdkeCnha+HS+VWYF6Iic1IouUcCDhx94 +dppWwC81oSENB0UUOOrbK/dfOdCK7mddu7YRL9vvHi1eLIUZEStPx0YlnG7Y +sDHepwQ+p3g6HuFRQT+OwxGp+BAsp8Itv5A24R5ZMjltpggmvHmPlp9QRY8T +r4X4Q+6x7/OSXKcbN6PhJYlezi15IPJa5dyjqS1o+Lfxzn6bHJA589CeRFLH +KSdbVv9oJqSrUYRE/TWwrvm5TSoxA14QjfRnL2oi98piTfTXq0CVabyg1aOF +B1vmJVeNXgQB7pzQffFb8dqnQPf/9qbCml/1u2YSt6LTjQ+qJcapsPLjvc7J +01uR9d3G/ptqKkz1E2ayUrZiWFvb7dT5FGgvvXhw+NpW9CbY5+adT4FLXif9 +PIq2YkllkaXA82SQaPR0duvainXULN3rxv+B3El5mouKNnoOaahj0GkoPsqr ++F5VGwOm3a7OOZwGht8Mzz41bdQrHUQWngY366bOgK3aqCD52PSgxGm4Ke4f +FEHVxpk2qlNqYxIQCosz0my1UexlmnCWbBKIddJ/dYdpY84qLqVPQ4nAp7y3 +cudzbXzVFl16JCUe9hPAqqhVG8PvfP81Fx0PL/gVh7hfaeNm7zyZhKB4SFkY +XV3Rro2tZ4hDjVbxINBy1EGyXxvtzQaYb/jiQSQoeW5gQhubq/p+E/47CTIl +1Tq+Ijq4cisdrC7HgSad8DDcTQeP3Nb93JIaC2UbA/9weeog37CluPjhWCCv +rTI/56WDdxxyv0XujAXjXufhXH8d1OJ5ZJIqGQuOIenCHSE6SApfr/MuJwZO +5EmGqifp4Ix8dvavumho55egfCzWQbrDW9vfq6PgyJBIkxWHLpaHH2r8/i4M +Wp7trSvk0kWy38bvZ5vCQO5hPnPtal1UEZmJpz4IgxcnqPdf8Okisc6lsyMu +DBQVvK5aiepisKdrw5BqGLz1LvG3UtFF3edUomvMMdj6zW691XZdfMEv3nhx +ayhMzaY4WKbr4l6jMM68lyEw2JfteCtDF+uKYlZ9rgqBF3WVTjM3dbGp9oay +zr0QyD097HI9WxdBuTXjT2IIuErruX8r1MXlcgGGMYTAU+MBv7N1unj8/KOB +q5WH4cbFzRGtI7rYbvPUR9nzEJwJY0TKftHFjYq3TU3xEITt2RUVMqqLWx8N +LcVtOAT2yrExhAldDLy6Jtn6YzCsqWqPC5zXxX3VlbZqPsEQMhx+lo9XDy3G +aqZWHToI5lrPMiw19FDp7aeRzPQgcF5jsbtdSw8L39scuBcZBPvft/I76ejh +hgHxlTeuQXAu+XWcj4EeesmxhiJkg6BntMvvhJEeNp81EdHK3Q8+WZ90Khz0 +MO7qxV0EZiDEC3O+3HBcD1uZnB/Nf/rDlbH4xLtxeigmX5jztccf8utXMTQT +9FD0yPTtrBp/eHGQt8TwjB6ex4gF31P+IPxCMM3xkh7er3pYoUv0h6x4Oe+U +fD1UETxZ0mLhB49nDf8stulh01ta+LYqH8h+xfTa9VYPJ8LMEx/n+EBinu6L +4k49nHxDWbZJ8QFLJ7Xrvn3s+TnljN/38IGuaqJB50c9tPb8PhvA4wPjJ38d +KZ7Tw7vBfX4vXb1BQog57kPURz3mvYUWIS/4Naazs0FGHzuSmBPty/tg8Elx +lbS8PlalTlpPjO2D7KP5Zzo26uPBy8943J7sA/XeqyqooY9cjc3NSkf3gXFm +qJc06mP0Le0J6PeEYHWd/re++uh872p32AEPOLZI/O0RoI+pn3r7tcw8IKaR +m/hjvz72dhWIimzwgGTnbpe1h/WxPys/ZUeXO9xLjHhnHKWPBU4V11kMdxgZ +fNxXdk4fzZ95u/BIu4FjqnXvVaY+Ph7fOvNg2hXcnPUWN1brY211f535G1fw +2SgrWVqrjy4uaLem2BWOVv1wbHuij2WtXuSZIFe48OViz5pX+pgWvhQS9c0F +XtD7usOH9XGVRAyN/t0Z6D98ulz4SDi6d1d2Jq8TSNSY59SuI+Hir/ojMZOO +8OP0lsPyAiQ0mSc8D+twhEyF6XVfREi4f0XicsNNR1jZHW1yWIaEyvX75/N0 +HKG+5mJpkhYJe5m6q3K8HcDo7OMLZQ4kDIm+UVP2bhcQHbPdJZxJ+H1c9u/M +k13wUzFRPdKVhFHKnhWWhbsgp9ayheFBwpdLP9RNo3cB13TXv9YAEkom7HgY +KLcLmhy/Bw9Hk7DccPPU7sCdYKokZcOfQ8LWhbsSksI7oHzyqYJPLgnlU7vl +GpbtQYl5dKE6n4Ra/t0zx8fsYZXVm9sBRSRUHV26S2+wh8ZDST+bykmYu+aR +ct1he2DUzKVFPSehdGAbxa/IDkg7346MTpDwoVb3plE3G8iXPsFkTJGQ2LFA +8qTagPgX9ZSrMyTMWF+8nkPSBubCz+ibLJDwA591ZFn7dii9BWcy/5HwSzp9 +zxfT7aD17YGGg4gBhp70rnEwsAbVuP8iGg0MkIfqCUf0LaHWMG/1dqoBNsiy +cj6KWoL9Yv2lbpoBai4sRkX+tICI4Pn7Y0YG6O2DwwqPLKBlr+dHge0G+CrY +aNhewwICKCSrPZ4GyOVrRufWMoeCnx+l584YYIup8cBNW1NgFC/fi002wLF2 +DtWX2qbQEShJ4jlngIr7DN/LiJvC7+Ht9sTLBmhhnDa2eXAbWL1hJuItA9xt +4en+NWgbjBelTqaUGKBLBLdgy0UT2OJLqVfuN8A3yYqJWgtGcF7R9nfCoAH+ +aeEu3fTBCOY+eOmPDBlgU/qqVvaFGR67phRlfjLAiSuxJiUZRrDT/kOa5KQB +LpYq+g+iEUQanjrMx0FGh9mGm6KXEFqE3ypMKpNx6419uunnGKDx5stea1Uy +Sucbdvf7MeBSyu+0gi1kPCnys3Q7MGAvj5KAnxYZL+b+dK2bpsPUctjvITIZ ++6Rezr9yoIPEmExnuzUZFZ9eKIhSpYHv44DE8hAy+m9s8G76QYEfB8fDTUPJ +mL9OvqiilQIRsgeCesLI2HJPIaIvlwL/xRzauRRNxoKe5w3FeyjwiBq2gZZE +xpy2mrG0l2RYrkyobcogI4OOm9XLDeDSw8y5jiYyxli9N/icrw8yHhvGvJ+R +0f3Axduxp/UhTyBnYK6FjHzU0Y8YoA+sg3mNEm1k9Prcq7ltiz68V7t/wbWP +jGIJCSfIj/RA9V6V+sgEGR3tvWwfNOlCfVaXz4w4BRO1VmxjeHRgeLuCR5gU +BTXQKvbQpDZw/Dro8odIwdwJ2p5TndpgvIPHdvUGCm7oFI+TytKGZ5xUA8IW +Ckpkjk30UrXhlddtPiMGBUuiqH1pYVuhX2l/8QU/Cv4wc6IKr9eEP+2V98QD +Kdh5690A77AGyMRy38kIouCTpvtEWrkGuHXfTMs9TMHyKyvbd7tpwPCpN3Gs +KAqKPiVnmpSqw+hXvV3D5yjYtbCn9oOfGszd+7eoxaTgkUD+eLVfqvDV0Szr +bBUFmyzPNif3qELfqlSLTzUU9HEkREuVq0KNJ/H6tQYK/ksuOVZ5SBXipfSp +f1vZ43kGVv0b2wRCZ/bHvBikYE+PhOO1Tyqg7t/N4ctFxclLZ/9LWlQCOXGZ +gserqMgdd/ynWL8SCDV57ZDioWKcTnBVa60SzMpNZ79cR8X4pYjivHglqO5Z +a6IjTkWtHxrmikJKYGGGp/5touIJztk9PDobwVu5iC/Dhooe2wJrd11QgKin +7vtV7KmoZLKnF44pwAVfkZelO6lI4rRr3umqALV5kSkvnagYRLaynFBSADEV +C8G/+6gYXP/kxFjNBnim8kXMM4yKasSlmvKP8rBFVX6Dym0quhUeGCoclwFs +6Ygrzabi4k/uwOg6GXAMSPrIyKXiDkVCQ+oFGUi4N5njVEDFfw0Gx8IMZGBQ +tVb5bBkVWVPmMbZnpOHcZhe1iefs+OwCHdr0iTCz5TKpdJqKhZtdg17VSULf +KzQVnaWiOH94akmGJDQE/9gVOk/FkYWMTc/DJeFcqWUI6Tf7+9d82+J1JGEL +leN+NbchRnjqMvQLJcDL8qBCk4QhGnmvtdyZIw5d/ubru2iGqClD6e8tE4Ua +vnmiPhiiKbTxuV4ThZyinM3XjAxx7/k7iasjReHw1F8zZzNDlL5pe7qXIQr8 +4eUnB+0MUV6la3nfKxEwS1JY/OxliP/ReXd8+iEMrNw/H+fPGKJAdNRqir0Q +kExCF62SDdGWe3LNioEQVHycWJ+VaoiN0s+ffJYXglK5IQOrS4a4+7bYQY1h +Qbif3pCaecMQjzXZ9QgqCUJWyimKebEhyik56s4z+eFsqODF9E5D9HtNPMAj +sA54Rc/kT3Yb4sJ+V7rHl7WQVMJRa9xniN+MfvhN166FxB8zXycGDfF61++0 +ugNr4XhAF83oqyE6vDNz+tPGB0f2Xh/7tmSIIfm8V5tv8YLrto1oKEfDNTue +Ps32WgN/u3gFmjbQ0Im2Ysuir4Es3x8DVhtpGCOoLsRLWANfk6rCXVVp+Ons +w5kd7avhSKvdw0gdGr4Kr7dOMloN/9nGyLHMaLhgd+qsmuYqqHbuXtY7RMPW +L4Q7tppc4Pat+kVtCA2Pf9e+PSfIBRxRWenbQmkofDRgx4sZTjC7EaS3O5KG +fN1Xn3BXckLHe84DRxNoWH3gp9ld5IRxL82BkjQaBgwuNBxz5wDpg6erNBto +mPx47GdH6F/GuX9++smNNORsrDnhZvaXwXXJrGS0mYaCcrMqGlJ/GeOVqwuy +Wmk48mPINKN2mVHNkZgu0knD5cWdgdm8ywzXK3HhC19oSCv0/C784DcjvSZS +//E6On5Z5m3nVV5irLd1KSEK0FFPxvX3qZVFRtwwWSNciI7c7zduovctMgJW +LyltFaejboSKsXPKIsPALkwsR46Onh9XCsmLC4yekSOzp7TpuJa2xO3WO88Q +X3ugxMaJjq/fJu6Qq59l5JrERk270HEo3cnnyo1Zhk7sOZPLe+mYVKY4ZxYx +y7CdftTdt4+O2aVDfJ46s4yknvlf3gfo6LLX4a5TwU/GUs4J46iTdFw6Lmy4 +LmeG0W94uTO/iI5yvhUJmyKmGAHHcm9aFtPZ/8uWtA7GFGOhuMJ34hEdvSij +Hz+snmKIKPYtalfS0c5J8JjC1R8Ma15ZmboGOopcLwhVZ00yarvyfTq76bgs +uzuvX3CCYSXA0gjro2PglkL1oMHvjD7z1gWpATr+FRridyj4zpir/n7GfZj9 +fmehdJ1t3xka2VsffBtnz2/LE5HVx8cZtf1GYSmTdGQmSBTa24wzrMR2gdY0 +HRPrqpRnZMYZfqePvQ2dp+NvwdW3Neu+MeYakjIkl+j47JX52Rep3xjxv9O8 +q3+z4zu6TrvK/RtDSK9A3e0vHVNs8wR+a31jZB6snv/3j45H88k3Uji/Mf4H +woCTEw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4lN8XAHBLhcq+ztgipGzZxsyYmXOQPUuLtSzZpZSSXQmpvmgvUgmh +UMo6Y4tQ0SLZQ5IWEiFrJf3m99f7fJ7nPu97z73nnHtfBa9DO325ODg4mjg5 +OP7/XBhqbVZKzmUYWzy9807GntGVKRVp1BcPXdNpGfHnNQDF33hJ9V2Ceq+b +8rTzdAizL+zl7suBK5w9z7nP24DwD8lLv3pLQXjsve7lc27wodb20FxvI+hf +E3fkSz0IZkrj72d6O+DWbFPvSlIs/Oo1uDrdOwJnOk4aTQWnQpPJ3dy3ObMw +V7xyVYCeCTIfqr56qf+Foke719Qv5oHYAY9CHhNuPJyYty5F6T5c0jarsXXg +RbuHWydF1paA1oCLOT2AF/lXCYzZiZXAq8SDnWrRvFjQ7u2dJFcCa/qufOfN +5sWMUbM3H3RKIPr4J+mmCV6s8AjdtG1PCfi8jIsxSOTDuQeWJu2FJUDyraFv +KFuLEZqJO0e2lcK79K0NM0L8GLbz+NxenzLI6CwSDFPmR+HZJvUbB8vAVWCT +x28KPzrdS171NqwMBhNkV7i8+XEgMOnMxrNlMBy8liZWwY+K7rU3vR+Uwdi2 +z0ySiwDuHzw0ZDNXBkvTaQ+jswVR7XnytprocqhSE/33r0IQq7oO/BpLKIco +v3O2iS8EUf1SEK9ASjksDyROpswKotjTexqMm+UQ94kl/kZRCGW+PvEh1ZZD +YlveruFQIbTfoiVx6nc5JOeeeMNFEEZOmVLzi4crwEovUER8ozC6VIxhUngF +8DbvdNikIYxnFK+wjhyvgMRPygPWRsJYpxEgr5NSATGKr75eCRTG8l0iJVZ3 +KyA4S2pFpVoY723k2DQyUAE7bpaoW+8RwRcZxMt5jEoQUr9xyM1XBKuGRUfO +bKuEtprE0kOHRHAmYynD26oSrAacyFcSRDDlyj7Lfw6VYExcMXlfJILdjycu +vjlQCXrpVnsOLYvg199HH3SmV4LklU9nL98SxQ+i89z7xytBSq0icSlfFDlt +ufpHf1QCsTHphNsjUTxmGkF2n60EuenNxzY1ieKDwHfn9ZYrQXn7Yc+aMVHs +3jFecpqfCbqr/pI+6Yrh+7RF6RZNJujdaNO2oIvhypNbeW06TCDpZKk/MBPD +1zUej1+TmED1NFEMdxFDJfUDtysYTDCqPcu/7gTbjJ9a6rZMsAuV+KzzQgx9 +ue8QKoKYYL9ubCitUwzd12l/2HaICTtzqt4tD4qhw6UgxusjTHBs3/vm2ZQY +3qAJvn4eyQQ39TvVruLiGLeJ29jnNBOCPmtdjPcUR96FYFvDbCYciOZMGQ0U +Rx/abnGHXCYEi3QmbT8qjiXyhon+d5lwBMNiJJLE8bS5knvYAyZE3qz1LywS +R6+1bfK0Kiac3m3J6Fhgj08veRvwhgnE8jYiF6cEtnkcczPrYEKx6O5F7XUS +uP3G9B7pbib0dLg/uigvgSJjQcyifiYo7QhV3GEhgVJ8MhJ+X5jQaHN7Tft1 +CUztDpky/sWO54HSp393JHD5xrND6X+YML6+sF6rWAJzn8Yc//KXCcKvyiPO +N0qgc2ymrR8XCzytXozbfpfAMWrlFNc6Fvw1m297TZNEe3H/uQIiCy7kRxX9 +NZPEmFvh5pEyLFBaw3FGY4ckJvWaW6IcC7Y/XWuU6iuJxyuH9lUosCDDZEPZ +9nOS+EnqsxJNlQWad/LOx6RLIjm1Xa11MwsaudQO3M+RxHhHj1kbNRZ8e6Kv +vJ4piSVWBa8Zmiwgo3Xayw+SSBBuna7TZcGr2+1H/3yTxHV3Exh8+uz5/nOw +V5uTROvEQY/tJBacfuzJl8wrhScFKZuqySwgyn39Ui0ihU98tTo+U1hQHBvU +OC4jha+2F7jyGLKghxYWbaUthe0NhgJ6dBbsv/nHKcqQPb4tgMFgsOP/E6dX +aCqFegHGjgjseGuSJ/lcpdB0205zdSMWHKVke7TGS2HvikbEnW0ssMoSmLNO +kcJ5L28eT1MWKPLEnGm7KoXHL9dniJuxoL3LsaTznhQa+9X3BJmz4J5hs6lj +qRTeMuxKWG/BghM52v19NVLoxfhJz2db8/B67qE2KRx5bDPSbMmC1b2RaZ59 +UhjeIvbW0ooFg/RRtU8fpbBNeKn7OdvlubsbfL9LocmoySzDmgXJ6xp3j81J +4d9L5moP2fY6ovVt/4oUars6xEltZwH13c3YSR4Cxkc1zkWxPZYfnv+TSMDH +SXKmajYsqOf/Qj2mRMCrD58pR7J9LXTnm0UNAv7JQ60GtoMH6r2jDNh2nvbm +sGWBqbHG0jISsO027RmFbZmCjJQTVgRcbXDe+QDbc4K8Cly7CfizbrdsOtsv +w45VJLoRsLVsWaKO7Zz3I5Y8/gT8FfrLfIDtyG32Q2cPE9CZ3FD6k237oroj +66MIeGR9qwu3HQtURdR4zicQ8EnXOeBn+19E+g3hVAJ+NTvvJ8R2z4fVW69c +I+D7Uau369kuNjvaLJFFQFs+03gutk89GHa+XkDA/GfcMTPs9+8Vs52ULiNg +IJfQk3ds60bXnMysJeAu7/ldNWyvHVGVUHhGwOs7jA2usT1ica3wzhsCis2d +Prif7aqH3KDyjoDRGq6/DNi+IBHSeW+EgCnX7d6vsNcrIHbIX22CgJT/OGXq +2YbP1ssP5gk4tGo9K4JtCeuqC1v/seOr5y////pPlqgol/ES8bbsPZE+9v40 +S12p0hchIqfmiZ5Ytm+e4LRlSRPR+C6FS5bto1+DR6jKRLT5Epdewd5vK5vB +sDpNIgZ/5bhpzrZiueU6JBMx1CJAsJOdL+0nlfRMrYm4rqzcvoedX3fHLrY8 +301E8h9uJVu2j9v922vlTsRGWcEj9ex81JDtP2UXQsTLjZZnz7Hzd1WiObEj +iogqAktOE+z8HhwvL96dSMRPDR73Tdj+j3W+1yWNiBpPQmeG2PWxT/5v0GAW +EcNXV4wqsk1O2s/hUUjEzPSuYE8TFozuMt3sU0dE84mf1BZ2fW2b+h0V/ImI +O4+vEKzZ9RhpcWXLkwkixh95WejJrtfibI1+0QUi2ncdVTxMY4HUbk9KFa80 +rihT38ZQWTDBerrIrSmNmhttI23Y/UFBxOOuo4E0xqmkp+qw+4dj0JJjAUoj +/+XaTGE9FjTIqlXa7pLGyMHaxjptFlyOvxB6PUIaeXS2eLaps6BlYLPSxElp +lLr2vCCB3a+W9Zo6GcnSWCH8bI3uFhb4jc7rfL4ljdNP7dfEbWLX1/Y9M5pN +0phFXQzqZPfDEXGV4GZ+GVQ9887VS5wFkofqZSUlZfBO3Qb9alF2/2xxfh24 +QQY9lpx2rBdhQWVUsrqgrgw274ndc1uAvZ4fpsddnGXwo/metSd5WKBTUOM/ +lSODzyuFwvSXmHCStmMfkSyLUu/9V8LZ54WFe+ZPA2NZFLLTuzDOPk8E4r4n +OGyXRXo+q9OxnQk3m07lX/CUxZph7TiZl0xgWVV/X3NWFq2nnD/ubWDCtPPG +sNl3shi7VOpeUcAE92Pz/72KlsPgTfExI+FMUE4zlhk/JYek7mGby6FM9nqf +f8BzQQ4nNkw4MkKYELW8ud04Vw6PfqMpJOxnwtUEd/GqV3L4WjBVsGUvE15d +fH47T1Ye22PXypkg+zwvvl5+vF4ep+tv5clwM2Fbb9vfHy3y+PXl2rP7/lWC +Lccqc48OeVz3Mfl99p9K8N4Z/A6+yKNvhs2Y2FwlmEUrnIhbvQGbKVfGmz9X +wmH5hTtGahtwMKW3w+5pJTT7355sCtuAVfE8g1sSKuHA0kxcC78CmlRZLDT/ +rABqiJ/EVxEF9K13v39zkn3/Gu8v4pZSwBjjcdnDYxWQN9DUw1BUwL8Nx8zW +DlXA0OOr6hUkBXS2m9VZ31oBdqcofdkeCnha+HS+VWYF6Iic1IouUcCDhx94 +dppWwC81oSENB0UUOOrbK/dfOdCK7mddu7YRL9vvHi1eLIUZEStPx0YlnG7Y +sDHepwQ+p3g6HuFRQT+OwxGp+BAsp8Itv5A24R5ZMjltpggmvHmPlp9QRY8T +r4X4Q+6x7/OSXKcbN6PhJYlezi15IPJa5dyjqS1o+Lfxzn6bHJA589CeRFLH +KSdbVv9oJqSrUYRE/TWwrvm5TSoxA14QjfRnL2oi98piTfTXq0CVabyg1aOF +B1vmJVeNXgQB7pzQffFb8dqnQPf/9qbCml/1u2YSt6LTjQ+qJcapsPLjvc7J +01uR9d3G/ptqKkz1E2ayUrZiWFvb7dT5FGgvvXhw+NpW9CbY5+adT4FLXif9 +PIq2YkllkaXA82SQaPR0duvainXULN3rxv+B3El5mouKNnoOaahj0GkoPsqr ++F5VGwOm3a7OOZwGht8Mzz41bdQrHUQWngY366bOgK3aqCD52PSgxGm4Ke4f +FEHVxpk2qlNqYxIQCosz0my1UexlmnCWbBKIddJ/dYdpY84qLqVPQ4nAp7y3 +cudzbXzVFl16JCUe9hPAqqhVG8PvfP81Fx0PL/gVh7hfaeNm7zyZhKB4SFkY +XV3Rro2tZ4hDjVbxINBy1EGyXxvtzQaYb/jiQSQoeW5gQhubq/p+E/47CTIl +1Tq+Ijq4cisdrC7HgSad8DDcTQeP3Nb93JIaC2UbA/9weeog37CluPjhWCCv +rTI/56WDdxxyv0XujAXjXufhXH8d1OJ5ZJIqGQuOIenCHSE6SApfr/MuJwZO +5EmGqifp4Ix8dvavumho55egfCzWQbrDW9vfq6PgyJBIkxWHLpaHH2r8/i4M +Wp7trSvk0kWy38bvZ5vCQO5hPnPtal1UEZmJpz4IgxcnqPdf8Okisc6lsyMu +DBQVvK5aiepisKdrw5BqGLz1LvG3UtFF3edUomvMMdj6zW691XZdfMEv3nhx +ayhMzaY4WKbr4l6jMM68lyEw2JfteCtDF+uKYlZ9rgqBF3WVTjM3dbGp9oay +zr0QyD097HI9WxdBuTXjT2IIuErruX8r1MXlcgGGMYTAU+MBv7N1unj8/KOB +q5WH4cbFzRGtI7rYbvPUR9nzEJwJY0TKftHFjYq3TU3xEITt2RUVMqqLWx8N +LcVtOAT2yrExhAldDLy6Jtn6YzCsqWqPC5zXxX3VlbZqPsEQMhx+lo9XDy3G +aqZWHToI5lrPMiw19FDp7aeRzPQgcF5jsbtdSw8L39scuBcZBPvft/I76ejh +hgHxlTeuQXAu+XWcj4EeesmxhiJkg6BntMvvhJEeNp81EdHK3Q8+WZ90Khz0 +MO7qxV0EZiDEC3O+3HBcD1uZnB/Nf/rDlbH4xLtxeigmX5jztccf8utXMTQT +9FD0yPTtrBp/eHGQt8TwjB6ex4gF31P+IPxCMM3xkh7er3pYoUv0h6x4Oe+U +fD1UETxZ0mLhB49nDf8stulh01ta+LYqH8h+xfTa9VYPJ8LMEx/n+EBinu6L +4k49nHxDWbZJ8QFLJ7Xrvn3s+TnljN/38IGuaqJB50c9tPb8PhvA4wPjJ38d +KZ7Tw7vBfX4vXb1BQog57kPURz3mvYUWIS/4Naazs0FGHzuSmBPty/tg8Elx +lbS8PlalTlpPjO2D7KP5Zzo26uPBy8943J7sA/XeqyqooY9cjc3NSkf3gXFm +qJc06mP0Le0J6PeEYHWd/re++uh872p32AEPOLZI/O0RoI+pn3r7tcw8IKaR +m/hjvz72dhWIimzwgGTnbpe1h/WxPys/ZUeXO9xLjHhnHKWPBU4V11kMdxgZ +fNxXdk4fzZ95u/BIu4FjqnXvVaY+Ph7fOvNg2hXcnPUWN1brY211f535G1fw +2SgrWVqrjy4uaLem2BWOVv1wbHuij2WtXuSZIFe48OViz5pX+pgWvhQS9c0F +XtD7usOH9XGVRAyN/t0Z6D98ulz4SDi6d1d2Jq8TSNSY59SuI+Hir/ojMZOO +8OP0lsPyAiQ0mSc8D+twhEyF6XVfREi4f0XicsNNR1jZHW1yWIaEyvX75/N0 +HKG+5mJpkhYJe5m6q3K8HcDo7OMLZQ4kDIm+UVP2bhcQHbPdJZxJ+H1c9u/M +k13wUzFRPdKVhFHKnhWWhbsgp9ayheFBwpdLP9RNo3cB13TXv9YAEkom7HgY +KLcLmhy/Bw9Hk7DccPPU7sCdYKokZcOfQ8LWhbsSksI7oHzyqYJPLgnlU7vl +GpbtQYl5dKE6n4Ra/t0zx8fsYZXVm9sBRSRUHV26S2+wh8ZDST+bykmYu+aR +ct1he2DUzKVFPSehdGAbxa/IDkg7346MTpDwoVb3plE3G8iXPsFkTJGQ2LFA +8qTagPgX9ZSrMyTMWF+8nkPSBubCz+ibLJDwA591ZFn7dii9BWcy/5HwSzp9 +zxfT7aD17YGGg4gBhp70rnEwsAbVuP8iGg0MkIfqCUf0LaHWMG/1dqoBNsiy +cj6KWoL9Yv2lbpoBai4sRkX+tICI4Pn7Y0YG6O2DwwqPLKBlr+dHge0G+CrY +aNhewwICKCSrPZ4GyOVrRufWMoeCnx+l584YYIup8cBNW1NgFC/fi002wLF2 +DtWX2qbQEShJ4jlngIr7DN/LiJvC7+Ht9sTLBmhhnDa2eXAbWL1hJuItA9xt +4en+NWgbjBelTqaUGKBLBLdgy0UT2OJLqVfuN8A3yYqJWgtGcF7R9nfCoAH+ +aeEu3fTBCOY+eOmPDBlgU/qqVvaFGR67phRlfjLAiSuxJiUZRrDT/kOa5KQB +LpYq+g+iEUQanjrMx0FGh9mGm6KXEFqE3ypMKpNx6419uunnGKDx5stea1Uy +Sucbdvf7MeBSyu+0gi1kPCnys3Q7MGAvj5KAnxYZL+b+dK2bpsPUctjvITIZ ++6Rezr9yoIPEmExnuzUZFZ9eKIhSpYHv44DE8hAy+m9s8G76QYEfB8fDTUPJ +mL9OvqiilQIRsgeCesLI2HJPIaIvlwL/xRzauRRNxoKe5w3FeyjwiBq2gZZE +xpy2mrG0l2RYrkyobcogI4OOm9XLDeDSw8y5jiYyxli9N/icrw8yHhvGvJ+R +0f3Axduxp/UhTyBnYK6FjHzU0Y8YoA+sg3mNEm1k9Prcq7ltiz68V7t/wbWP +jGIJCSfIj/RA9V6V+sgEGR3tvWwfNOlCfVaXz4w4BRO1VmxjeHRgeLuCR5gU +BTXQKvbQpDZw/Dro8odIwdwJ2p5TndpgvIPHdvUGCm7oFI+TytKGZ5xUA8IW +Ckpkjk30UrXhlddtPiMGBUuiqH1pYVuhX2l/8QU/Cv4wc6IKr9eEP+2V98QD +Kdh5690A77AGyMRy38kIouCTpvtEWrkGuHXfTMs9TMHyKyvbd7tpwPCpN3Gs +KAqKPiVnmpSqw+hXvV3D5yjYtbCn9oOfGszd+7eoxaTgkUD+eLVfqvDV0Szr +bBUFmyzPNif3qELfqlSLTzUU9HEkREuVq0KNJ/H6tQYK/ksuOVZ5SBXipfSp +f1vZ43kGVv0b2wRCZ/bHvBikYE+PhOO1Tyqg7t/N4ctFxclLZ/9LWlQCOXGZ +gserqMgdd/ynWL8SCDV57ZDioWKcTnBVa60SzMpNZ79cR8X4pYjivHglqO5Z +a6IjTkWtHxrmikJKYGGGp/5touIJztk9PDobwVu5iC/Dhooe2wJrd11QgKin +7vtV7KmoZLKnF44pwAVfkZelO6lI4rRr3umqALV5kSkvnagYRLaynFBSADEV +C8G/+6gYXP/kxFjNBnim8kXMM4yKasSlmvKP8rBFVX6Dym0quhUeGCoclwFs +6Ygrzabi4k/uwOg6GXAMSPrIyKXiDkVCQ+oFGUi4N5njVEDFfw0Gx8IMZGBQ +tVb5bBkVWVPmMbZnpOHcZhe1iefs+OwCHdr0iTCz5TKpdJqKhZtdg17VSULf +KzQVnaWiOH94akmGJDQE/9gVOk/FkYWMTc/DJeFcqWUI6Tf7+9d82+J1JGEL +leN+NbchRnjqMvQLJcDL8qBCk4QhGnmvtdyZIw5d/ubru2iGqClD6e8tE4Ua +vnmiPhiiKbTxuV4ThZyinM3XjAxx7/k7iasjReHw1F8zZzNDlL5pe7qXIQr8 +4eUnB+0MUV6la3nfKxEwS1JY/OxliP/ReXd8+iEMrNw/H+fPGKJAdNRqir0Q +kExCF62SDdGWe3LNioEQVHycWJ+VaoiN0s+ffJYXglK5IQOrS4a4+7bYQY1h +Qbif3pCaecMQjzXZ9QgqCUJWyimKebEhyik56s4z+eFsqODF9E5D9HtNPMAj +sA54Rc/kT3Yb4sJ+V7rHl7WQVMJRa9xniN+MfvhN166FxB8zXycGDfF61++0 +ugNr4XhAF83oqyE6vDNz+tPGB0f2Xh/7tmSIIfm8V5tv8YLrto1oKEfDNTue +Ps32WgN/u3gFmjbQ0Im2Ysuir4Es3x8DVhtpGCOoLsRLWANfk6rCXVVp+Ons +w5kd7avhSKvdw0gdGr4Kr7dOMloN/9nGyLHMaLhgd+qsmuYqqHbuXtY7RMPW +L4Q7tppc4Pat+kVtCA2Pf9e+PSfIBRxRWenbQmkofDRgx4sZTjC7EaS3O5KG +fN1Xn3BXckLHe84DRxNoWH3gp9ld5IRxL82BkjQaBgwuNBxz5wDpg6erNBto +mPx47GdH6F/GuX9++smNNORsrDnhZvaXwXXJrGS0mYaCcrMqGlJ/GeOVqwuy +Wmk48mPINKN2mVHNkZgu0knD5cWdgdm8ywzXK3HhC19oSCv0/C784DcjvSZS +//E6On5Z5m3nVV5irLd1KSEK0FFPxvX3qZVFRtwwWSNciI7c7zduovctMgJW +LyltFaejboSKsXPKIsPALkwsR46Onh9XCsmLC4yekSOzp7TpuJa2xO3WO88Q +X3ugxMaJjq/fJu6Qq59l5JrERk270HEo3cnnyo1Zhk7sOZPLe+mYVKY4ZxYx +y7CdftTdt4+O2aVDfJ46s4yknvlf3gfo6LLX4a5TwU/GUs4J46iTdFw6Lmy4 +LmeG0W94uTO/iI5yvhUJmyKmGAHHcm9aFtPZ/8uWtA7GFGOhuMJ34hEdvSij +Hz+snmKIKPYtalfS0c5J8JjC1R8Ma15ZmboGOopcLwhVZ00yarvyfTq76bgs +uzuvX3CCYSXA0gjro2PglkL1oMHvjD7z1gWpATr+FRridyj4zpir/n7GfZj9 +fmehdJ1t3xka2VsffBtnz2/LE5HVx8cZtf1GYSmTdGQmSBTa24wzrMR2gdY0 +HRPrqpRnZMYZfqePvQ2dp+NvwdW3Neu+MeYakjIkl+j47JX52Rep3xjxv9O8 +q3+z4zu6TrvK/RtDSK9A3e0vHVNs8wR+a31jZB6snv/3j45H88k3Uji/Mf4H +woCTEw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09495642188928918}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09495642188928918}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4lN8XAHBLhcq+ztgipGzZxsyYmXOQPUuLtSzZpZSSXQmpvmgvUgmh +UMo6Y4tQ0SLZQ5IWEiFrJf3m99f7fJ7nPu97z73nnHtfBa9DO325ODg4mjg5 +OP7/XBhqbVZKzmUYWzy9807GntGVKRVp1BcPXdNpGfHnNQDF33hJ9V2Ceq+b +8rTzdAizL+zl7suBK5w9z7nP24DwD8lLv3pLQXjsve7lc27wodb20FxvI+hf +E3fkSz0IZkrj72d6O+DWbFPvSlIs/Oo1uDrdOwJnOk4aTQWnQpPJ3dy3ObMw +V7xyVYCeCTIfqr56qf+Foke719Qv5oHYAY9CHhNuPJyYty5F6T5c0jarsXXg +RbuHWydF1paA1oCLOT2AF/lXCYzZiZXAq8SDnWrRvFjQ7u2dJFcCa/qufOfN +5sWMUbM3H3RKIPr4J+mmCV6s8AjdtG1PCfi8jIsxSOTDuQeWJu2FJUDyraFv +KFuLEZqJO0e2lcK79K0NM0L8GLbz+NxenzLI6CwSDFPmR+HZJvUbB8vAVWCT +x28KPzrdS171NqwMBhNkV7i8+XEgMOnMxrNlMBy8liZWwY+K7rU3vR+Uwdi2 +z0ySiwDuHzw0ZDNXBkvTaQ+jswVR7XnytprocqhSE/33r0IQq7oO/BpLKIco +v3O2iS8EUf1SEK9ASjksDyROpswKotjTexqMm+UQ94kl/kZRCGW+PvEh1ZZD +YlveruFQIbTfoiVx6nc5JOeeeMNFEEZOmVLzi4crwEovUER8ozC6VIxhUngF +8DbvdNikIYxnFK+wjhyvgMRPygPWRsJYpxEgr5NSATGKr75eCRTG8l0iJVZ3 +KyA4S2pFpVoY723k2DQyUAE7bpaoW+8RwRcZxMt5jEoQUr9xyM1XBKuGRUfO +bKuEtprE0kOHRHAmYynD26oSrAacyFcSRDDlyj7Lfw6VYExcMXlfJILdjycu +vjlQCXrpVnsOLYvg199HH3SmV4LklU9nL98SxQ+i89z7xytBSq0icSlfFDlt +ufpHf1QCsTHphNsjUTxmGkF2n60EuenNxzY1ieKDwHfn9ZYrQXn7Yc+aMVHs +3jFecpqfCbqr/pI+6Yrh+7RF6RZNJujdaNO2oIvhypNbeW06TCDpZKk/MBPD +1zUej1+TmED1NFEMdxFDJfUDtysYTDCqPcu/7gTbjJ9a6rZMsAuV+KzzQgx9 +ue8QKoKYYL9ubCitUwzd12l/2HaICTtzqt4tD4qhw6UgxusjTHBs3/vm2ZQY +3qAJvn4eyQQ39TvVruLiGLeJ29jnNBOCPmtdjPcUR96FYFvDbCYciOZMGQ0U +Rx/abnGHXCYEi3QmbT8qjiXyhon+d5lwBMNiJJLE8bS5knvYAyZE3qz1LywS +R6+1bfK0Kiac3m3J6Fhgj08veRvwhgnE8jYiF6cEtnkcczPrYEKx6O5F7XUS +uP3G9B7pbib0dLg/uigvgSJjQcyifiYo7QhV3GEhgVJ8MhJ+X5jQaHN7Tft1 +CUztDpky/sWO54HSp393JHD5xrND6X+YML6+sF6rWAJzn8Yc//KXCcKvyiPO +N0qgc2ymrR8XCzytXozbfpfAMWrlFNc6Fvw1m297TZNEe3H/uQIiCy7kRxX9 +NZPEmFvh5pEyLFBaw3FGY4ckJvWaW6IcC7Y/XWuU6iuJxyuH9lUosCDDZEPZ +9nOS+EnqsxJNlQWad/LOx6RLIjm1Xa11MwsaudQO3M+RxHhHj1kbNRZ8e6Kv +vJ4piSVWBa8Zmiwgo3Xayw+SSBBuna7TZcGr2+1H/3yTxHV3Exh8+uz5/nOw +V5uTROvEQY/tJBacfuzJl8wrhScFKZuqySwgyn39Ui0ihU98tTo+U1hQHBvU +OC4jha+2F7jyGLKghxYWbaUthe0NhgJ6dBbsv/nHKcqQPb4tgMFgsOP/E6dX +aCqFegHGjgjseGuSJ/lcpdB0205zdSMWHKVke7TGS2HvikbEnW0ssMoSmLNO +kcJ5L28eT1MWKPLEnGm7KoXHL9dniJuxoL3LsaTznhQa+9X3BJmz4J5hs6lj +qRTeMuxKWG/BghM52v19NVLoxfhJz2db8/B67qE2KRx5bDPSbMmC1b2RaZ59 +UhjeIvbW0ooFg/RRtU8fpbBNeKn7OdvlubsbfL9LocmoySzDmgXJ6xp3j81J +4d9L5moP2fY6ovVt/4oUars6xEltZwH13c3YSR4Cxkc1zkWxPZYfnv+TSMDH +SXKmajYsqOf/Qj2mRMCrD58pR7J9LXTnm0UNAv7JQ60GtoMH6r2jDNh2nvbm +sGWBqbHG0jISsO027RmFbZmCjJQTVgRcbXDe+QDbc4K8Cly7CfizbrdsOtsv +w45VJLoRsLVsWaKO7Zz3I5Y8/gT8FfrLfIDtyG32Q2cPE9CZ3FD6k237oroj +66MIeGR9qwu3HQtURdR4zicQ8EnXOeBn+19E+g3hVAJ+NTvvJ8R2z4fVW69c +I+D7Uau369kuNjvaLJFFQFs+03gutk89GHa+XkDA/GfcMTPs9+8Vs52ULiNg +IJfQk3ds60bXnMysJeAu7/ldNWyvHVGVUHhGwOs7jA2usT1ica3wzhsCis2d +Prif7aqH3KDyjoDRGq6/DNi+IBHSeW+EgCnX7d6vsNcrIHbIX22CgJT/OGXq +2YbP1ssP5gk4tGo9K4JtCeuqC1v/seOr5y////pPlqgol/ES8bbsPZE+9v40 +S12p0hchIqfmiZ5Ytm+e4LRlSRPR+C6FS5bto1+DR6jKRLT5Epdewd5vK5vB +sDpNIgZ/5bhpzrZiueU6JBMx1CJAsJOdL+0nlfRMrYm4rqzcvoedX3fHLrY8 +301E8h9uJVu2j9v922vlTsRGWcEj9ex81JDtP2UXQsTLjZZnz7Hzd1WiObEj +iogqAktOE+z8HhwvL96dSMRPDR73Tdj+j3W+1yWNiBpPQmeG2PWxT/5v0GAW +EcNXV4wqsk1O2s/hUUjEzPSuYE8TFozuMt3sU0dE84mf1BZ2fW2b+h0V/ImI +O4+vEKzZ9RhpcWXLkwkixh95WejJrtfibI1+0QUi2ncdVTxMY4HUbk9KFa80 +rihT38ZQWTDBerrIrSmNmhttI23Y/UFBxOOuo4E0xqmkp+qw+4dj0JJjAUoj +/+XaTGE9FjTIqlXa7pLGyMHaxjptFlyOvxB6PUIaeXS2eLaps6BlYLPSxElp +lLr2vCCB3a+W9Zo6GcnSWCH8bI3uFhb4jc7rfL4ljdNP7dfEbWLX1/Y9M5pN +0phFXQzqZPfDEXGV4GZ+GVQ9887VS5wFkofqZSUlZfBO3Qb9alF2/2xxfh24 +QQY9lpx2rBdhQWVUsrqgrgw274ndc1uAvZ4fpsddnGXwo/metSd5WKBTUOM/ +lSODzyuFwvSXmHCStmMfkSyLUu/9V8LZ54WFe+ZPA2NZFLLTuzDOPk8E4r4n +OGyXRXo+q9OxnQk3m07lX/CUxZph7TiZl0xgWVV/X3NWFq2nnD/ubWDCtPPG +sNl3shi7VOpeUcAE92Pz/72KlsPgTfExI+FMUE4zlhk/JYek7mGby6FM9nqf +f8BzQQ4nNkw4MkKYELW8ud04Vw6PfqMpJOxnwtUEd/GqV3L4WjBVsGUvE15d +fH47T1Ye22PXypkg+zwvvl5+vF4ep+tv5clwM2Fbb9vfHy3y+PXl2rP7/lWC +Lccqc48OeVz3Mfl99p9K8N4Z/A6+yKNvhs2Y2FwlmEUrnIhbvQGbKVfGmz9X +wmH5hTtGahtwMKW3w+5pJTT7355sCtuAVfE8g1sSKuHA0kxcC78CmlRZLDT/ +rABqiJ/EVxEF9K13v39zkn3/Gu8v4pZSwBjjcdnDYxWQN9DUw1BUwL8Nx8zW +DlXA0OOr6hUkBXS2m9VZ31oBdqcofdkeCnha+HS+VWYF6Iic1IouUcCDhx94 +dppWwC81oSENB0UUOOrbK/dfOdCK7mddu7YRL9vvHi1eLIUZEStPx0YlnG7Y +sDHepwQ+p3g6HuFRQT+OwxGp+BAsp8Itv5A24R5ZMjltpggmvHmPlp9QRY8T +r4X4Q+6x7/OSXKcbN6PhJYlezi15IPJa5dyjqS1o+Lfxzn6bHJA589CeRFLH +KSdbVv9oJqSrUYRE/TWwrvm5TSoxA14QjfRnL2oi98piTfTXq0CVabyg1aOF +B1vmJVeNXgQB7pzQffFb8dqnQPf/9qbCml/1u2YSt6LTjQ+qJcapsPLjvc7J +01uR9d3G/ptqKkz1E2ayUrZiWFvb7dT5FGgvvXhw+NpW9CbY5+adT4FLXif9 +PIq2YkllkaXA82SQaPR0duvainXULN3rxv+B3El5mouKNnoOaahj0GkoPsqr ++F5VGwOm3a7OOZwGht8Mzz41bdQrHUQWngY366bOgK3aqCD52PSgxGm4Ke4f +FEHVxpk2qlNqYxIQCosz0my1UexlmnCWbBKIddJ/dYdpY84qLqVPQ4nAp7y3 +cudzbXzVFl16JCUe9hPAqqhVG8PvfP81Fx0PL/gVh7hfaeNm7zyZhKB4SFkY +XV3Rro2tZ4hDjVbxINBy1EGyXxvtzQaYb/jiQSQoeW5gQhubq/p+E/47CTIl +1Tq+Ijq4cisdrC7HgSad8DDcTQeP3Nb93JIaC2UbA/9weeog37CluPjhWCCv +rTI/56WDdxxyv0XujAXjXufhXH8d1OJ5ZJIqGQuOIenCHSE6SApfr/MuJwZO +5EmGqifp4Ix8dvavumho55egfCzWQbrDW9vfq6PgyJBIkxWHLpaHH2r8/i4M +Wp7trSvk0kWy38bvZ5vCQO5hPnPtal1UEZmJpz4IgxcnqPdf8Okisc6lsyMu +DBQVvK5aiepisKdrw5BqGLz1LvG3UtFF3edUomvMMdj6zW691XZdfMEv3nhx +ayhMzaY4WKbr4l6jMM68lyEw2JfteCtDF+uKYlZ9rgqBF3WVTjM3dbGp9oay +zr0QyD097HI9WxdBuTXjT2IIuErruX8r1MXlcgGGMYTAU+MBv7N1unj8/KOB +q5WH4cbFzRGtI7rYbvPUR9nzEJwJY0TKftHFjYq3TU3xEITt2RUVMqqLWx8N +LcVtOAT2yrExhAldDLy6Jtn6YzCsqWqPC5zXxX3VlbZqPsEQMhx+lo9XDy3G +aqZWHToI5lrPMiw19FDp7aeRzPQgcF5jsbtdSw8L39scuBcZBPvft/I76ejh +hgHxlTeuQXAu+XWcj4EeesmxhiJkg6BntMvvhJEeNp81EdHK3Q8+WZ90Khz0 +MO7qxV0EZiDEC3O+3HBcD1uZnB/Nf/rDlbH4xLtxeigmX5jztccf8utXMTQT +9FD0yPTtrBp/eHGQt8TwjB6ex4gF31P+IPxCMM3xkh7er3pYoUv0h6x4Oe+U +fD1UETxZ0mLhB49nDf8stulh01ta+LYqH8h+xfTa9VYPJ8LMEx/n+EBinu6L +4k49nHxDWbZJ8QFLJ7Xrvn3s+TnljN/38IGuaqJB50c9tPb8PhvA4wPjJ38d +KZ7Tw7vBfX4vXb1BQog57kPURz3mvYUWIS/4Naazs0FGHzuSmBPty/tg8Elx +lbS8PlalTlpPjO2D7KP5Zzo26uPBy8943J7sA/XeqyqooY9cjc3NSkf3gXFm +qJc06mP0Le0J6PeEYHWd/re++uh872p32AEPOLZI/O0RoI+pn3r7tcw8IKaR +m/hjvz72dhWIimzwgGTnbpe1h/WxPys/ZUeXO9xLjHhnHKWPBU4V11kMdxgZ +fNxXdk4fzZ95u/BIu4FjqnXvVaY+Ph7fOvNg2hXcnPUWN1brY211f535G1fw +2SgrWVqrjy4uaLem2BWOVv1wbHuij2WtXuSZIFe48OViz5pX+pgWvhQS9c0F +XtD7usOH9XGVRAyN/t0Z6D98ulz4SDi6d1d2Jq8TSNSY59SuI+Hir/ojMZOO +8OP0lsPyAiQ0mSc8D+twhEyF6XVfREi4f0XicsNNR1jZHW1yWIaEyvX75/N0 +HKG+5mJpkhYJe5m6q3K8HcDo7OMLZQ4kDIm+UVP2bhcQHbPdJZxJ+H1c9u/M +k13wUzFRPdKVhFHKnhWWhbsgp9ayheFBwpdLP9RNo3cB13TXv9YAEkom7HgY +KLcLmhy/Bw9Hk7DccPPU7sCdYKokZcOfQ8LWhbsSksI7oHzyqYJPLgnlU7vl +GpbtQYl5dKE6n4Ra/t0zx8fsYZXVm9sBRSRUHV26S2+wh8ZDST+bykmYu+aR +ct1he2DUzKVFPSehdGAbxa/IDkg7346MTpDwoVb3plE3G8iXPsFkTJGQ2LFA +8qTagPgX9ZSrMyTMWF+8nkPSBubCz+ibLJDwA591ZFn7dii9BWcy/5HwSzp9 +zxfT7aD17YGGg4gBhp70rnEwsAbVuP8iGg0MkIfqCUf0LaHWMG/1dqoBNsiy +cj6KWoL9Yv2lbpoBai4sRkX+tICI4Pn7Y0YG6O2DwwqPLKBlr+dHge0G+CrY +aNhewwICKCSrPZ4GyOVrRufWMoeCnx+l584YYIup8cBNW1NgFC/fi002wLF2 +DtWX2qbQEShJ4jlngIr7DN/LiJvC7+Ht9sTLBmhhnDa2eXAbWL1hJuItA9xt +4en+NWgbjBelTqaUGKBLBLdgy0UT2OJLqVfuN8A3yYqJWgtGcF7R9nfCoAH+ +aeEu3fTBCOY+eOmPDBlgU/qqVvaFGR67phRlfjLAiSuxJiUZRrDT/kOa5KQB +LpYq+g+iEUQanjrMx0FGh9mGm6KXEFqE3ypMKpNx6419uunnGKDx5stea1Uy +Sucbdvf7MeBSyu+0gi1kPCnys3Q7MGAvj5KAnxYZL+b+dK2bpsPUctjvITIZ ++6Rezr9yoIPEmExnuzUZFZ9eKIhSpYHv44DE8hAy+m9s8G76QYEfB8fDTUPJ +mL9OvqiilQIRsgeCesLI2HJPIaIvlwL/xRzauRRNxoKe5w3FeyjwiBq2gZZE +xpy2mrG0l2RYrkyobcogI4OOm9XLDeDSw8y5jiYyxli9N/icrw8yHhvGvJ+R +0f3Axduxp/UhTyBnYK6FjHzU0Y8YoA+sg3mNEm1k9Prcq7ltiz68V7t/wbWP +jGIJCSfIj/RA9V6V+sgEGR3tvWwfNOlCfVaXz4w4BRO1VmxjeHRgeLuCR5gU +BTXQKvbQpDZw/Dro8odIwdwJ2p5TndpgvIPHdvUGCm7oFI+TytKGZ5xUA8IW +Ckpkjk30UrXhlddtPiMGBUuiqH1pYVuhX2l/8QU/Cv4wc6IKr9eEP+2V98QD +Kdh5690A77AGyMRy38kIouCTpvtEWrkGuHXfTMs9TMHyKyvbd7tpwPCpN3Gs +KAqKPiVnmpSqw+hXvV3D5yjYtbCn9oOfGszd+7eoxaTgkUD+eLVfqvDV0Szr +bBUFmyzPNif3qELfqlSLTzUU9HEkREuVq0KNJ/H6tQYK/ksuOVZ5SBXipfSp +f1vZ43kGVv0b2wRCZ/bHvBikYE+PhOO1Tyqg7t/N4ctFxclLZ/9LWlQCOXGZ +gserqMgdd/ynWL8SCDV57ZDioWKcTnBVa60SzMpNZ79cR8X4pYjivHglqO5Z +a6IjTkWtHxrmikJKYGGGp/5touIJztk9PDobwVu5iC/Dhooe2wJrd11QgKin +7vtV7KmoZLKnF44pwAVfkZelO6lI4rRr3umqALV5kSkvnagYRLaynFBSADEV +C8G/+6gYXP/kxFjNBnim8kXMM4yKasSlmvKP8rBFVX6Dym0quhUeGCoclwFs +6Ygrzabi4k/uwOg6GXAMSPrIyKXiDkVCQ+oFGUi4N5njVEDFfw0Gx8IMZGBQ +tVb5bBkVWVPmMbZnpOHcZhe1iefs+OwCHdr0iTCz5TKpdJqKhZtdg17VSULf +KzQVnaWiOH94akmGJDQE/9gVOk/FkYWMTc/DJeFcqWUI6Tf7+9d82+J1JGEL +leN+NbchRnjqMvQLJcDL8qBCk4QhGnmvtdyZIw5d/ubru2iGqClD6e8tE4Ua +vnmiPhiiKbTxuV4ThZyinM3XjAxx7/k7iasjReHw1F8zZzNDlL5pe7qXIQr8 +4eUnB+0MUV6la3nfKxEwS1JY/OxliP/ReXd8+iEMrNw/H+fPGKJAdNRqir0Q +kExCF62SDdGWe3LNioEQVHycWJ+VaoiN0s+ffJYXglK5IQOrS4a4+7bYQY1h +Qbif3pCaecMQjzXZ9QgqCUJWyimKebEhyik56s4z+eFsqODF9E5D9HtNPMAj +sA54Rc/kT3Yb4sJ+V7rHl7WQVMJRa9xniN+MfvhN166FxB8zXycGDfF61++0 +ugNr4XhAF83oqyE6vDNz+tPGB0f2Xh/7tmSIIfm8V5tv8YLrto1oKEfDNTue +Ps32WgN/u3gFmjbQ0Im2Ysuir4Es3x8DVhtpGCOoLsRLWANfk6rCXVVp+Ons +w5kd7avhSKvdw0gdGr4Kr7dOMloN/9nGyLHMaLhgd+qsmuYqqHbuXtY7RMPW +L4Q7tppc4Pat+kVtCA2Pf9e+PSfIBRxRWenbQmkofDRgx4sZTjC7EaS3O5KG +fN1Xn3BXckLHe84DRxNoWH3gp9ld5IRxL82BkjQaBgwuNBxz5wDpg6erNBto +mPx47GdH6F/GuX9++smNNORsrDnhZvaXwXXJrGS0mYaCcrMqGlJ/GeOVqwuy +Wmk48mPINKN2mVHNkZgu0knD5cWdgdm8ywzXK3HhC19oSCv0/C784DcjvSZS +//E6On5Z5m3nVV5irLd1KSEK0FFPxvX3qZVFRtwwWSNciI7c7zduovctMgJW +LyltFaejboSKsXPKIsPALkwsR46Onh9XCsmLC4yekSOzp7TpuJa2xO3WO88Q +X3ugxMaJjq/fJu6Qq59l5JrERk270HEo3cnnyo1Zhk7sOZPLe+mYVKY4ZxYx +y7CdftTdt4+O2aVDfJ46s4yknvlf3gfo6LLX4a5TwU/GUs4J46iTdFw6Lmy4 +LmeG0W94uTO/iI5yvhUJmyKmGAHHcm9aFtPZ/8uWtA7GFGOhuMJ34hEdvSij +Hz+snmKIKPYtalfS0c5J8JjC1R8Ma15ZmboGOopcLwhVZ00yarvyfTq76bgs +uzuvX3CCYSXA0gjro2PglkL1oMHvjD7z1gWpATr+FRridyj4zpir/n7GfZj9 +fmehdJ1t3xka2VsffBtnz2/LE5HVx8cZtf1GYSmTdGQmSBTa24wzrMR2gdY0 +HRPrqpRnZMYZfqePvQ2dp+NvwdW3Neu+MeYakjIkl+j47JX52Rep3xjxv9O8 +q3+z4zu6TrvK/RtDSK9A3e0vHVNs8wR+a31jZB6snv/3j45H88k3Uji/Mf4H +woCTEw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09495642188928918}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09495642188928918}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994358375031125*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"6db2a28f-86c2-4803-b2c8-b89139bbacee"] +}, Open ]], Cell[CellGroupData[{ @@ -8243,14 +8314,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918501819649506`*^9},ExpressionUUID->"1ec1e156-ca0f-9240-857c-\ -ac86e3a0e3fd"], + CellChangeTimes->{3.9918501819649506`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[BoxData["10.362747935330784`"], "Output", - CellChangeTimes->{3.9913453868532257`*^9}, - CellLabel-> - "Out[420]=",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[BoxData["8.662094119987698`"], "Output", + CellChangeTimes->{3.9913453868532257`*^9, 3.994358375055757*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"a82e7a06-020b-44f5-ad45-fad788dba838"] }, Open ]], Cell[CellGroupData[{ @@ -8306,171 +8375,210 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850184857586*^9},ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-\ -da901e49f6f1"], + CellChangeTimes->{3.991850184857586*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 449, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387062414*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.495984044999624`*^-253\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 99, 101, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.99435837511523*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], +In[99]:=",ExpressionUUID->"d682b4bc-1203-416f-bf14-a1e34fb11551"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 450, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387076412*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.59016371708571`*^-262\\\", \ +\\\"67615075532642592962076366156210530912566907412833894400000000000000\\\"]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 99, 102, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994358375119473*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], +In[99]:=",ExpressionUUID->"09ed3f23-74b7-445c-9f4e-569be0538752"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 421, 451, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387088339*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.08892136839798`*^-270\\\", \ +\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 99, 103, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994358375123343*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], +In[99]:=",ExpressionUUID->"f4857fd2-e3c4-4601-ac35-e5522d693ce9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 421, 452, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913453870973415`*^9}, +during this calculation.\"", 2, 99, 104, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.9943583751271067`*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], +In[99]:=",ExpressionUUID->"ccf12e6d-d6a6-4bb1-9417-599b0cc7e25f"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4lO/XAHBRIfvOzNi37GWZMWPGOcheZF8SIqSESrYoJCXyLS1UZAkp +kW0mW+pHSZIUoUiiRbKkkEp55/3ruT7Xs93nPOec+3oUAyKcgzg5ODhy13Bw +/P9xafTJQ5WMElO+ro9D+9PsTfuvSceZDaVATfD7d/dAA1DieYD0UDa8dRoP +SwEqRG+/Ncg1VAzSC+IObmALIrNS2b8Ga+HxVnXNNeAF71ocIhYG2yBXYuHZ +GCMUrFSm3s4PvoR8/szZGGoc/BqkXPw2OA7VMZ9VJtXTod3iRsmL4h/wcXAp +r/vjZSC9a/wUoP0XXHqY87JjxSAe5neL24ILzw7ef99rWw7Zm62aHdx4MH8y ++eFMTiXoDXtZM/bwoLCtblrcrUroTt3fp3WEB+n3jdL+tFTC+qELX3mKeHDb +NhOd8feVcOToBLF9mge/hmRnULWqYPfTpARKKi/WXb1uyt9SBeSgZoZC3QZ0 +PjS5RWHgDrzO3fRgXlgAZQwPnj2xWA1X+iqEolUFcCb+Kaf2v2rwFlT3+00V +QE3Oa5Ld62tg5LjsP85AAQxvj5T5JVUDY+Eb6OJMAVT9smy/nlYDk1s+3CV7 +CeJDTY5DXxNqYPlbzp0jRUJ4fi2f4Mu/NdCoJba6yhRC1avdSeXraiE+OMsh +tUsIFV7WOccK1MLKcOpM5g8hVJ5i8q+VrYWkiQaJ50rCGH+29cZTk1pI7Sl1 +GYsSRu5DA8sysbWQUXLsOaeMCEqGpfTd+FoLdoahohLKIji0ILMj7Xst8Dx0 +dlPXEUH/wF4H31/s+ydUh+3NRFBj6tbh3+vrIEGp+9OFUBHcW+lfMKFYB+GF +0v/UmkSwq+bYrlj3OnDKq9G23yGKc3s/7yhpqgNh7asRO4NEMWziiV3Vgzro +aU6tjYgQxfjy5BM1HXVgN+xhfOG4KBrdDRy+/rIOzAn/LN5WiOLv0aAFylQd +GOba7YhYEcW+Z5YWstL1IHVhIv18vhimb9voMRReD9JazNTlMjG0Yhr71Byq +B0Jb2rGd1WIoKs2RmBpbD3LfNA6rt4vh9elGYZmUelDdGunfPCmGRKPC+D8X +6sFg7V/yhIE4dlFS9Eob68ExSvKDfpc4qulU78n4Vw/b+SZHc/rEcXGuq+AG +JxOcixtfr4yIYy+n0Ld765ng3uvzvGOObcfYkSFBJuzUvt7kLSGBDGGtycdy +TNj3Qe9cir8EDra2zp5mMOGkq63pyyUJ7OuQCSiLZgKhvofAuUYSf4hXNTnE +M6FKzPXnZj5JPEhP1v6WyISBl77V5+QlseKYlK/cCSaoOEUpOdlIYhTRkHfj +eSa0bStY33tZEoNYvvzzlez1VKpMrF6XRAe6jblWDROm+G/d16uSxIH+N1d9 +65kg0l0f+1+bJLpsErlX3cQEf7uuKYevknjcUb6H8zET/lot9jyjS+Hg17Vf +fEeZcLYsvuKvlRT2HsV7Wu/Z71/PcUrHSQonrAXb5yeYsPXRBrMzQVLIfdM5 +JPQLE65YKNRtzWJfrzWsy73ABGO0z3n6TgrHPftv/OVmQXdB76E/X6SwjJoh +6ruBBf6rbtu1FqTwoLDSg7v8LDjZ6s+bwSONGip3J91FWDBAjz5it1kaPybc +OreFwIJD1CK/JynS2NJ913dUkwV2hYIL9pnSOJNEO1yrzQIl7oRTPRelsauT +1Jqky4LefveavnJp3DKR/pVPnwW6kfxcoz3SSBvd/mrEmAXrBuNy/IekMWmO +tyCFxoIRxmetiffS6EuJKlGisyCDr811ckEaBS31Q5yABZNlMWXfCTIo3Fw9 +G2rJgvsCH2mHVWTwrwc0vLdiwaUo5+c/dWTwUkPIYxcbFlia6yyvoAxGU8qa +1exZUPx23JY7RAbvaJoqnNrOAh9xhxlinQwem41eS/NmgcGR5uRrLTIopKvV +4b6DBRvGN0oqdsjgYTuuif0+LGi8wwVqr2Uw2aLXIMOXBZL2jWc3rcrg5Ngm +75QAFszUqKnW8RCQU8FG9mAgCx5KX2g0EiWgTZOctc9udv4+hY/TVAmoT17z +Sj6YnZ9kFUNLewLmpw9w7Q5lwY3Jc52PXQmoWSaurr6XBUcdV33sfAm4Kcz4 +3ge2dWTfnHA8QMC1RWE2jmEsWJtqTXgZT8D/tAtxhe2Rqfoq11QCDuas1lzf +z4LTDf8NeuUQMNG7YP14OAt2yf/dN1JIwIossZnYCBYYp+3l8LtFwDlPosuG +SBZ8drHU2H2PgDOGu0tIB1jQ2lR771MHAeHOl+x8ti8pKjiH9hLwwJkMbpmD +LNgy9zs+fIKAr560p6+yHWdzQfN/0wTs+T6fuecQC6qKdN6ILRHwxU1jl262 +J353pAevEvCwh+6oZhQLpF39qY08RMyGfXqpbG+r/DXJJ0rER8fSbYbYTll/ +PteXSMRPAqpa6odZMN3w6CeXLhE/E7e5MNlWFPW74U4homgdIW+Bbfd9y+43 +kYhD7Z/rdaPZ9fPw3PoVWyLmBHsVBLL9QFaL5eBCxMIUyZ3n2V6MfhhU5EPE +L92P5+6xrdm7U2IhiIh2HVJeE2z7avx8aBVBRO2m2itcMSw4n3I26nIsEQda +rFhybHcOa6hMJxNx5ObxSkO2Vwzb+0wziFipREyxZHtzls/xcxeIOJ/5wMiJ +7eDPi/of8om4RkSjy4Ptq/jfOPkGEf1z+cy82O69vDE7vZp9vlshz43tdT/+ +ZzbSSMQxUeW3W9mmbd0xr9tOxMSzPeuA7YjShcLkbiISld9LabNd8u/M9v5X +RDQPIEiIs/3aQ51D/R0RNfJNVpfY8QjWPLgTN0nEza+5h/rZttjg7dc9T0RG +r0VRJduxgT8E5f8QUXOO6ZPMdmVLZuuBtSSUcFXj3872uIRa+EMBEgo9862R +YVsq4r6slBQJ9QY0HUbZ+d/a6fksVIGElFyPD/lsJyt+T2jRIOHIp7rDnmyz +4jO0hQxIaA7CawXZ/tqnMrKLTkKLDtNzrezvraDTmlFvSUIuazH5vWyffvdt +ysuThJCzbkstu37uG5++cnsXCSN0+kYd2F44p2y3upeELtZlyZ/Y9ee7xf1m +SSIJc/f2fFrPtv7N5pC5YhJqClwJ5GfXdwinm5T5bRKOrlk5mMyu/7wdsx0X +mCTkfxZxeZ7dH+sFFdVonSSUl9ls0M7unzcH0z6kzpDw58zsc619LBDqlr8w +uETCX7/Kn8Wx+3GLaqOFJocsLsd8nG9j92/V4Nfi56KyWKLezLTaw46f7rSL +YCyLhoJcAeJBLLDxvfadYi6LHEuiGhrseSCY9PW421ZZ9NUM32bMnhd57SfK +zvrL4rsHlg2Wu1jQYNf0dX26LMrIlPrK7mTBsTDuRJXzsvj7orbnOvY8sspy +FTTPl0WX0Zr2z+z51f9idlNijSySUw3/XPVkwTdP5egfr2Xxq+JfozYXFtyN +j+QW+SCLVmDDe9SZPV/y7uXqzsqi0cEHgYZOLOAf82gO5ZRDg9ofDWcdWKAe +kskxpimHXXGzejy27PweXjzdfUQOHY9G1S6w57Nqjjlp6oQcim53M/U2+f/+ +/K+S+6wc3vyhnNhEZUH8ikaveYkcxsc1yO0js+DicV+Jxm45PNq6E8/osfej +c48LSmXlUSZ4XeygAru+qy7XH70vjy/KN4zlrDJhy2DP39lOefxe6TF97C8T +HDjWWvu9lMd8hcMVgX+YEOgc/ho+yqOd3oC93E8mWB1RPJa0TgGL3Hd6+c8y +IVJ+6bqZlgJ+9qV2y4ww4WFIwUx7tAKOXOTde4i9H9uuUEUTjijg70edlwbY ++3XP2X6yYZIC/hUYfmR0hwmvG3mTStIV0ClS1WjyJhNm+aJET+QpIL2dVSBb +wATpahuKVZsCen7JHO8+xYSw5fmkTgFFjN1GNnT0YgLtQLDkJ1FFjKPvXr/o +xgSeqTcVXNKKSF9Xk37JmQmlw+0DpkqKmEEXrum2Z8Jo60VtJlkRq3W+j60z +ZYLjCepQkZ8ivhYlN1QpMkFfNFnvSI0iDjzJXfP9Yz380hIe1XFTQg3nq73/ +AuphKZ+QbOCthGHRXWse+NbDgpCqCtVPCWNue7xL9K6H2R/UvVtClVBFrf72 +nFM9jDcHLnknKuGZjgvTFVgPXfZ3BU+VKqGIgdd4umw9XNnnC+OLSphg86z+ +e38d0CtuF166pIx/uq45bjKpg3lRO3/3NhXc8WjmQyNnLXzI9Hc/yK2GvNQ+ +b9ML1WA7F2P7kayOVU8cFhZ3VsF0IM+h+mMb8Zb7c8bhrRXs/xEpzpNtGriq +8d+oplM5iD5Ty6qe08Rtbsby5ddKgXTqznYyWRs/3ew5ozFQDLlaVGGxEB2E +py0zTSGF0EUwM/pxTheDFJLCPgbnAY3UdlZvQA/L//P9YymQC4JcxVG7Ujah +oO2yll7oBZBLlqd7qW3GrlldCPh6FnhVfVjOjzdjntrQ7Oy7DNBlyNyJ2amP +9wKlVw4In4SDo6LtdhwGeCOR5XXkagrM/ch0s801wJMCjDM7Nh+FkaEi9/wr +Buj9Wi5fRfoodN1jecznGaCt+8rnf/8SoeTkmNflIgP0bZUW+tydCN5EQ98v +twwwX6jnUWpoIjwyHw5Ov2eAV69YTs+WJsDVcxqxT8YNcM9p75dWWkfAWq/j +iq2OISrqNcnbB8eC53ob1149Q3xVsq3J0zEW9r59IuChb4hxd3/bxxrHQlbG +s6TdFEOUDyvXntkQCwOf+4OPmRli18n7T29Xx8Duwgl9ppsh/gONzvjVaEgR +WfNU4aghJi7LUPlvHYbWHyZ/fvYY4rPoowKjmw5BUffdAJcXhtgvcumFj/wh +SC016KrqM0Suyy5SXwQOga2H1uWgIUOkq1fwaH49CP1NBErfe0NsWZN7c2vZ +QZhK/nWwasEQ78VmKgjKHwRJ4btTuwlG+OV1jfJWwgEI19Z/8yLICO9UPX4i +ExYOh38SfvvtMcIEUhTPz63hkNDGRZjda4QWh+5fmtMJhwzPV14bIo3w/rKa +p/63/VCeGvvaPN4IX1fZhK4c3g/jI61DdVlGqPlqW212Whi4n7EfvHjXCE+Y +ORbZNO8Fxuzufi9eMpLIDopL4SEg2Wxd3MJHRhfXdZGtHiEwe1IzUl6QjOZX +TtRfwRC4pviN76MoGUd+ak9miYbAP9cjFpEkMto99k3YfTcY7jefq03TI+Pm +tLmEhrXBYJbeerbOjYwFjabaZZW7wVJFeptAMRl7L0D0PaMAqJ95pLi7hIyt +3ILhscoBoHL30FJTGRnlNHljLEQCYK3d84I9FWRMFQ7K4p3ZBW0Rad/b68k4 +ELTmnGvpLjBtXsiJf0zGXaUKU8PSu4Ds/GL88zQZ397cq7OLzx/KiMfums6R +Uel6cL3wkh9IfNTOvDhPxoYPpMCEV36wEHPKyGKJjPeM9UIrLvhBbT6curZK +Rh2Ol01B4n6g96VSx02UgtxP8Y6xjC9sTDod20ahYIhuw2I7xQdaTErXbaVR +UD2SJUSS9oHtP+9nv6JT8H+CEdnnl3dAbPji7UkzCkaWO+8da9wBnT7+7wW3 +UlA/kufcLGMH7KGS7Xb4U3DUftS1w94bbn5/T1w4RUHSVd3iukRPMK1aKU/M +oGDh3p7qx7s84WWoFJk7i4JOc4vrly094ffY1u2E8xS0CC7SqBT0BLvnd1Mx +n4JdO4VvBRd5wFTFmZnMGgoKJFNerel2B80g6n3VNxTcNfH5qZGRG/yn5PD7 ++AgFs3myxq3l3GDhXYDR+CgFlSUyJSO53aDVO7Pi2gQFF5PtsjjfuILz9nc5 +UjMUbA52eaST5ApxJicieTmMUY9yp/FMrwt0irxQnFE1Ri+x7dRfSc6g8/yj +j/1GY0z3Feq8HeYM2Zm/c25qGqNB5xOrKE9n8OFWEQzWM8Zafs8XppucYW4l ++veosTFWS9jYPhhzAslJUl+vvTEmMNu8gy2dIKh1T2r9AWNUK40be0baDrP7 +p2Iso4zR8110gT/vdoiVDds3EG2MB5fq+oWnHeF0QoTz8hFj5M77ckunwBGq +adEK9DRjDDwtdt+L2xFWWMdb2q8Yo3BI7lOvd9sg+861hZftxng4Rdtz/rY9 +kPwUJgM7jJG24ceSUIY9lAoWDy90GmPwmakVl1B7aNhf2ibZw16fTvodezV7 +eKt1+6z3kDGWf9j8bLHIDjaWN2qPTxvjZMdxPclCW7hf2L97XoKK1xOqNXNY +1jC2VdEvWpqKyQGhxeWXrYHj136vPwQqShksbXiTYA3mTtwO6xSouHqh1SDP +who61tAoMppUXHct78yVl1bQHVDAa2ZKRQPD7Su7lyzhjcreqrPBVOz2OO4Z +4LoF/vSyyiVCqaisv1HD2GQLkBK5rl/ZR8XnHedQU2kL7HyVl1MSScW5Q3v6 +A75ZwNiJ50kN8VS0PPUzXSnLAj5/MnQZy6LiIvmxxcMec1goX/2pd5eKtdK1 +qgOBZvDJ3aowvZGKKxJlWjGOZjC09ozNRDMV2+ovftUxMYNmf8LlSw+oeN6y +23pE1AxSpI1of59Q8Ul4J5XWjiB8am9C1wgVXQumY7+oI2iHvOII4qQhsZAr +XHqNKchJkG62rqWhf+xzo4S3DBBuD3CS5qahnM2L7PVNDPgh963oKR8NpYTS +Y7MOMaBpYIOFvgQNK6qbZoIn6WBjhSdW1WkY9aOSRXhtAoGqFbxXttHY/dwb +evEVFeIf+e5V207D6Dzd/C91VDgbJPq01pmGAwq2f4KyqdBSGpf51IOGYaf8 +zgw4UkFczUbo7y4aGtjxhGZ3G0OH2kdx/2gaHnLQidv+jAKaG+UV1ApoqFje +HPJkygiw82VSbRENnRQ4N/c9MwL3PWnvTUto6E57I81RYwTHy2eKPW7S8OGy +0u22GCMY2diiml5Hwwj9mfuf1htBloaX1vRjdnynHdae1jKEec3z5NpvNIyN +PmAIZ/RhqBstxX7QcJepizJftD48CJ91iVqk4StRhYfzvvqQVWt7gPybhudP +mlUKbtYHTRrH7SYuExSQ3imfOrAZAmz3K7ZLmmDk6Zh3lmqboT/Emr+fboK3 +A/TEXlfrQTPvIsEITPBAQJYa65QeFFcUa1wyM8H0fVribf56EDn318rTim2N +6YYgET0QiKlPHnE0wbW7XjwbiNIFqzTFnx8CTND0aOo7oy060FDy5/3iKROU +ciM6XOPSArJF1E+7DBN06rxtV/5eE5jvp/kLz5hg632L2tf3NaFWbpRil22C +LQH1pNoETbid++DMtasmKL9WY9RwWQMKM09QratM0H1y7pTv0kZIjxI6l9tn +gglf9+TpCKoDj9ipsplXJlhw/NHOwW9qkFbD0WI+ZIKdy78Lr/epQers/Kfp +ERPMrlkjc/2yGhzd0083+2SCHLcDn1LV1eCgz+XJL8smSCn9nlZmowreW5TR +RI6O7oOa6WnXleFvP49guwIdL7bCLclTylAYNDtsp0zHBclY6ApThk9pjTHe +G+nooE2Vu0pWhoNPHO/E6dPxpPIV2XdPleC0Q4JcgxUdJ3lJBt0ritDk+WrF +MIKO0Y4HKpRjFGDnl6aulgN0/G9/+HKfnwJwxBfmbomiozQz83GxjQJYXd1n +6BpHRwsbH8+rBAV4+XZN2KHjdIw68fH45DF5mArQHa7JoWPEMQGGvYIcEPef +bNR9QEdDXYnHShlEyFoNNspoo+O2kuHdjGAicGZb1Xx+SMcdB7bknDAjwhRr +3c3CJ3Ss4bP+nL9MgCaO1FzRPjpaDSckTO4hgPeFpJilj3RkqgTtaXCSgdzm +OKNWPgY2664T/GguBfwOXjUEQQYauJguOipLQdKYsU6MMAMDlNbSx7mkYM+6 +ZZVNEgy8viZUN+GRJFAco8WL5Rh4YNg1L8lOEgbGD/44sZmB9aU6H67vkACJ +DWE12zwYWMo7/VT+shiUWCTGf/NioNO1TxH/4sVAPzHL4rwPA/N4vR25d4qB +w7fqV0O7GOhX+u7tJUUxSBtY/BUYxl6fZpj4jduisFx8zDw+mf087qjcHV0i +8MbkfF9ZBQPVuSS6C5SEYc/hkjzbKgbuHq0b9OEVhqUqZtB0NQOZ/Pw8R8aE +QFRp6OdmFgPHXt/6+SJBCOx5ZEn3HjAw2iHfrKNBEFr6y3b3vWLgzm9V5w8z +BMBOsEEneoiBL8+c56UICcCQ9ZMl6WEGiikmv6O+54eFpq+nfMcYaCatZ8GZ +xg86RZsqv0wx0HuKR+PCSz5oeWMWnTnDwPfKJsPuZXxgJ+4Cet8YeNUwY6Nn +PB8Enzz8ImqRgdXCSTQJZT5YeJB2RWqZgWcbTFx6f26AlN85gU2/GbhgZn6n +s3sDCBve1N75l4H9g6xff4s2wLX9TYurqwyMm9QajYjZAP8HShBFeg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8484,130 +8592,166 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k4lO/XAHBRIfvOzNi37GWZMWPGOcheZF8SIqSESrYoJCXyLS1UZAkp +kW0mW+pHSZIUoUiiRbKkkEp55/3ruT7Xs93nPOec+3oUAyKcgzg5ODhy13Bw +/P9xafTJQ5WMElO+ro9D+9PsTfuvSceZDaVATfD7d/dAA1DieYD0UDa8dRoP +SwEqRG+/Ncg1VAzSC+IObmALIrNS2b8Ga+HxVnXNNeAF71ocIhYG2yBXYuHZ +GCMUrFSm3s4PvoR8/szZGGoc/BqkXPw2OA7VMZ9VJtXTod3iRsmL4h/wcXAp +r/vjZSC9a/wUoP0XXHqY87JjxSAe5neL24ILzw7ef99rWw7Zm62aHdx4MH8y ++eFMTiXoDXtZM/bwoLCtblrcrUroTt3fp3WEB+n3jdL+tFTC+qELX3mKeHDb +NhOd8feVcOToBLF9mge/hmRnULWqYPfTpARKKi/WXb1uyt9SBeSgZoZC3QZ0 +PjS5RWHgDrzO3fRgXlgAZQwPnj2xWA1X+iqEolUFcCb+Kaf2v2rwFlT3+00V +QE3Oa5Ld62tg5LjsP85AAQxvj5T5JVUDY+Eb6OJMAVT9smy/nlYDk1s+3CV7 +CeJDTY5DXxNqYPlbzp0jRUJ4fi2f4Mu/NdCoJba6yhRC1avdSeXraiE+OMsh +tUsIFV7WOccK1MLKcOpM5g8hVJ5i8q+VrYWkiQaJ50rCGH+29cZTk1pI7Sl1 +GYsSRu5DA8sysbWQUXLsOaeMCEqGpfTd+FoLdoahohLKIji0ILMj7Xst8Dx0 +dlPXEUH/wF4H31/s+ydUh+3NRFBj6tbh3+vrIEGp+9OFUBHcW+lfMKFYB+GF +0v/UmkSwq+bYrlj3OnDKq9G23yGKc3s/7yhpqgNh7asRO4NEMWziiV3Vgzro +aU6tjYgQxfjy5BM1HXVgN+xhfOG4KBrdDRy+/rIOzAn/LN5WiOLv0aAFylQd +GOba7YhYEcW+Z5YWstL1IHVhIv18vhimb9voMRReD9JazNTlMjG0Yhr71Byq +B0Jb2rGd1WIoKs2RmBpbD3LfNA6rt4vh9elGYZmUelDdGunfPCmGRKPC+D8X +6sFg7V/yhIE4dlFS9Eob68ExSvKDfpc4qulU78n4Vw/b+SZHc/rEcXGuq+AG +JxOcixtfr4yIYy+n0Ld765ng3uvzvGOObcfYkSFBJuzUvt7kLSGBDGGtycdy +TNj3Qe9cir8EDra2zp5mMOGkq63pyyUJ7OuQCSiLZgKhvofAuUYSf4hXNTnE +M6FKzPXnZj5JPEhP1v6WyISBl77V5+QlseKYlK/cCSaoOEUpOdlIYhTRkHfj +eSa0bStY33tZEoNYvvzzlez1VKpMrF6XRAe6jblWDROm+G/d16uSxIH+N1d9 +65kg0l0f+1+bJLpsErlX3cQEf7uuKYevknjcUb6H8zET/lot9jyjS+Hg17Vf +fEeZcLYsvuKvlRT2HsV7Wu/Z71/PcUrHSQonrAXb5yeYsPXRBrMzQVLIfdM5 +JPQLE65YKNRtzWJfrzWsy73ABGO0z3n6TgrHPftv/OVmQXdB76E/X6SwjJoh +6ruBBf6rbtu1FqTwoLDSg7v8LDjZ6s+bwSONGip3J91FWDBAjz5it1kaPybc +OreFwIJD1CK/JynS2NJ913dUkwV2hYIL9pnSOJNEO1yrzQIl7oRTPRelsauT +1Jqky4LefveavnJp3DKR/pVPnwW6kfxcoz3SSBvd/mrEmAXrBuNy/IekMWmO +tyCFxoIRxmetiffS6EuJKlGisyCDr811ckEaBS31Q5yABZNlMWXfCTIo3Fw9 +G2rJgvsCH2mHVWTwrwc0vLdiwaUo5+c/dWTwUkPIYxcbFlia6yyvoAxGU8qa +1exZUPx23JY7RAbvaJoqnNrOAh9xhxlinQwem41eS/NmgcGR5uRrLTIopKvV +4b6DBRvGN0oqdsjgYTuuif0+LGi8wwVqr2Uw2aLXIMOXBZL2jWc3rcrg5Ngm +75QAFszUqKnW8RCQU8FG9mAgCx5KX2g0EiWgTZOctc9udv4+hY/TVAmoT17z +Sj6YnZ9kFUNLewLmpw9w7Q5lwY3Jc52PXQmoWSaurr6XBUcdV33sfAm4Kcz4 +3ge2dWTfnHA8QMC1RWE2jmEsWJtqTXgZT8D/tAtxhe2Rqfoq11QCDuas1lzf +z4LTDf8NeuUQMNG7YP14OAt2yf/dN1JIwIossZnYCBYYp+3l8LtFwDlPosuG +SBZ8drHU2H2PgDOGu0tIB1jQ2lR771MHAeHOl+x8ti8pKjiH9hLwwJkMbpmD +LNgy9zs+fIKAr560p6+yHWdzQfN/0wTs+T6fuecQC6qKdN6ILRHwxU1jl262 +J353pAevEvCwh+6oZhQLpF39qY08RMyGfXqpbG+r/DXJJ0rER8fSbYbYTll/ +PteXSMRPAqpa6odZMN3w6CeXLhE/E7e5MNlWFPW74U4homgdIW+Bbfd9y+43 +kYhD7Z/rdaPZ9fPw3PoVWyLmBHsVBLL9QFaL5eBCxMIUyZ3n2V6MfhhU5EPE +L92P5+6xrdm7U2IhiIh2HVJeE2z7avx8aBVBRO2m2itcMSw4n3I26nIsEQda +rFhybHcOa6hMJxNx5ObxSkO2Vwzb+0wziFipREyxZHtzls/xcxeIOJ/5wMiJ +7eDPi/of8om4RkSjy4Ptq/jfOPkGEf1z+cy82O69vDE7vZp9vlshz43tdT/+ +ZzbSSMQxUeW3W9mmbd0xr9tOxMSzPeuA7YjShcLkbiISld9LabNd8u/M9v5X +RDQPIEiIs/3aQ51D/R0RNfJNVpfY8QjWPLgTN0nEza+5h/rZttjg7dc9T0RG +r0VRJduxgT8E5f8QUXOO6ZPMdmVLZuuBtSSUcFXj3872uIRa+EMBEgo9862R +YVsq4r6slBQJ9QY0HUbZ+d/a6fksVIGElFyPD/lsJyt+T2jRIOHIp7rDnmyz +4jO0hQxIaA7CawXZ/tqnMrKLTkKLDtNzrezvraDTmlFvSUIuazH5vWyffvdt +ysuThJCzbkstu37uG5++cnsXCSN0+kYd2F44p2y3upeELtZlyZ/Y9ee7xf1m +SSIJc/f2fFrPtv7N5pC5YhJqClwJ5GfXdwinm5T5bRKOrlk5mMyu/7wdsx0X +mCTkfxZxeZ7dH+sFFdVonSSUl9ls0M7unzcH0z6kzpDw58zsc619LBDqlr8w +uETCX7/Kn8Wx+3GLaqOFJocsLsd8nG9j92/V4Nfi56KyWKLezLTaw46f7rSL +YCyLhoJcAeJBLLDxvfadYi6LHEuiGhrseSCY9PW421ZZ9NUM32bMnhd57SfK +zvrL4rsHlg2Wu1jQYNf0dX26LMrIlPrK7mTBsTDuRJXzsvj7orbnOvY8sspy +FTTPl0WX0Zr2z+z51f9idlNijSySUw3/XPVkwTdP5egfr2Xxq+JfozYXFtyN +j+QW+SCLVmDDe9SZPV/y7uXqzsqi0cEHgYZOLOAf82gO5ZRDg9ofDWcdWKAe +kskxpimHXXGzejy27PweXjzdfUQOHY9G1S6w57Nqjjlp6oQcim53M/U2+f/+ +/K+S+6wc3vyhnNhEZUH8ikaveYkcxsc1yO0js+DicV+Jxm45PNq6E8/osfej +c48LSmXlUSZ4XeygAru+qy7XH70vjy/KN4zlrDJhy2DP39lOefxe6TF97C8T +HDjWWvu9lMd8hcMVgX+YEOgc/ho+yqOd3oC93E8mWB1RPJa0TgGL3Hd6+c8y +IVJ+6bqZlgJ+9qV2y4ww4WFIwUx7tAKOXOTde4i9H9uuUEUTjijg70edlwbY ++3XP2X6yYZIC/hUYfmR0hwmvG3mTStIV0ClS1WjyJhNm+aJET+QpIL2dVSBb +wATpahuKVZsCen7JHO8+xYSw5fmkTgFFjN1GNnT0YgLtQLDkJ1FFjKPvXr/o +xgSeqTcVXNKKSF9Xk37JmQmlw+0DpkqKmEEXrum2Z8Jo60VtJlkRq3W+j60z +ZYLjCepQkZ8ivhYlN1QpMkFfNFnvSI0iDjzJXfP9Yz380hIe1XFTQg3nq73/ +AuphKZ+QbOCthGHRXWse+NbDgpCqCtVPCWNue7xL9K6H2R/UvVtClVBFrf72 +nFM9jDcHLnknKuGZjgvTFVgPXfZ3BU+VKqGIgdd4umw9XNnnC+OLSphg86z+ +e38d0CtuF166pIx/uq45bjKpg3lRO3/3NhXc8WjmQyNnLXzI9Hc/yK2GvNQ+ +b9ML1WA7F2P7kayOVU8cFhZ3VsF0IM+h+mMb8Zb7c8bhrRXs/xEpzpNtGriq +8d+oplM5iD5Ty6qe08Rtbsby5ddKgXTqznYyWRs/3ew5ozFQDLlaVGGxEB2E +py0zTSGF0EUwM/pxTheDFJLCPgbnAY3UdlZvQA/L//P9YymQC4JcxVG7Ujah +oO2yll7oBZBLlqd7qW3GrlldCPh6FnhVfVjOjzdjntrQ7Oy7DNBlyNyJ2amP +9wKlVw4In4SDo6LtdhwGeCOR5XXkagrM/ch0s801wJMCjDM7Nh+FkaEi9/wr +Buj9Wi5fRfoodN1jecznGaCt+8rnf/8SoeTkmNflIgP0bZUW+tydCN5EQ98v +twwwX6jnUWpoIjwyHw5Ov2eAV69YTs+WJsDVcxqxT8YNcM9p75dWWkfAWq/j +iq2OISrqNcnbB8eC53ob1149Q3xVsq3J0zEW9r59IuChb4hxd3/bxxrHQlbG +s6TdFEOUDyvXntkQCwOf+4OPmRli18n7T29Xx8Duwgl9ppsh/gONzvjVaEgR +WfNU4aghJi7LUPlvHYbWHyZ/fvYY4rPoowKjmw5BUffdAJcXhtgvcumFj/wh +SC016KrqM0Suyy5SXwQOga2H1uWgIUOkq1fwaH49CP1NBErfe0NsWZN7c2vZ +QZhK/nWwasEQ78VmKgjKHwRJ4btTuwlG+OV1jfJWwgEI19Z/8yLICO9UPX4i +ExYOh38SfvvtMcIEUhTPz63hkNDGRZjda4QWh+5fmtMJhwzPV14bIo3w/rKa +p/63/VCeGvvaPN4IX1fZhK4c3g/jI61DdVlGqPlqW212Whi4n7EfvHjXCE+Y +ORbZNO8Fxuzufi9eMpLIDopL4SEg2Wxd3MJHRhfXdZGtHiEwe1IzUl6QjOZX +TtRfwRC4pviN76MoGUd+ak9miYbAP9cjFpEkMto99k3YfTcY7jefq03TI+Pm +tLmEhrXBYJbeerbOjYwFjabaZZW7wVJFeptAMRl7L0D0PaMAqJ95pLi7hIyt +3ILhscoBoHL30FJTGRnlNHljLEQCYK3d84I9FWRMFQ7K4p3ZBW0Rad/b68k4 +ELTmnGvpLjBtXsiJf0zGXaUKU8PSu4Ds/GL88zQZ397cq7OLzx/KiMfums6R +Uel6cL3wkh9IfNTOvDhPxoYPpMCEV36wEHPKyGKJjPeM9UIrLvhBbT6curZK +Rh2Ol01B4n6g96VSx02UgtxP8Y6xjC9sTDod20ahYIhuw2I7xQdaTErXbaVR +UD2SJUSS9oHtP+9nv6JT8H+CEdnnl3dAbPji7UkzCkaWO+8da9wBnT7+7wW3 +UlA/kufcLGMH7KGS7Xb4U3DUftS1w94bbn5/T1w4RUHSVd3iukRPMK1aKU/M +oGDh3p7qx7s84WWoFJk7i4JOc4vrly094ffY1u2E8xS0CC7SqBT0BLvnd1Mx +n4JdO4VvBRd5wFTFmZnMGgoKJFNerel2B80g6n3VNxTcNfH5qZGRG/yn5PD7 ++AgFs3myxq3l3GDhXYDR+CgFlSUyJSO53aDVO7Pi2gQFF5PtsjjfuILz9nc5 +UjMUbA52eaST5ApxJicieTmMUY9yp/FMrwt0irxQnFE1Ri+x7dRfSc6g8/yj +j/1GY0z3Feq8HeYM2Zm/c25qGqNB5xOrKE9n8OFWEQzWM8Zafs8XppucYW4l ++veosTFWS9jYPhhzAslJUl+vvTEmMNu8gy2dIKh1T2r9AWNUK40be0baDrP7 +p2Iso4zR8110gT/vdoiVDds3EG2MB5fq+oWnHeF0QoTz8hFj5M77ckunwBGq +adEK9DRjDDwtdt+L2xFWWMdb2q8Yo3BI7lOvd9sg+861hZftxng4Rdtz/rY9 +kPwUJgM7jJG24ceSUIY9lAoWDy90GmPwmakVl1B7aNhf2ibZw16fTvodezV7 +eKt1+6z3kDGWf9j8bLHIDjaWN2qPTxvjZMdxPclCW7hf2L97XoKK1xOqNXNY +1jC2VdEvWpqKyQGhxeWXrYHj136vPwQqShksbXiTYA3mTtwO6xSouHqh1SDP +who61tAoMppUXHct78yVl1bQHVDAa2ZKRQPD7Su7lyzhjcreqrPBVOz2OO4Z +4LoF/vSyyiVCqaisv1HD2GQLkBK5rl/ZR8XnHedQU2kL7HyVl1MSScW5Q3v6 +A75ZwNiJ50kN8VS0PPUzXSnLAj5/MnQZy6LiIvmxxcMec1goX/2pd5eKtdK1 +qgOBZvDJ3aowvZGKKxJlWjGOZjC09ozNRDMV2+ovftUxMYNmf8LlSw+oeN6y +23pE1AxSpI1of59Q8Ul4J5XWjiB8am9C1wgVXQumY7+oI2iHvOII4qQhsZAr +XHqNKchJkG62rqWhf+xzo4S3DBBuD3CS5qahnM2L7PVNDPgh963oKR8NpYTS +Y7MOMaBpYIOFvgQNK6qbZoIn6WBjhSdW1WkY9aOSRXhtAoGqFbxXttHY/dwb +evEVFeIf+e5V207D6Dzd/C91VDgbJPq01pmGAwq2f4KyqdBSGpf51IOGYaf8 +zgw4UkFczUbo7y4aGtjxhGZ3G0OH2kdx/2gaHnLQidv+jAKaG+UV1ApoqFje +HPJkygiw82VSbRENnRQ4N/c9MwL3PWnvTUto6E57I81RYwTHy2eKPW7S8OGy +0u22GCMY2diiml5Hwwj9mfuf1htBloaX1vRjdnynHdae1jKEec3z5NpvNIyN +PmAIZ/RhqBstxX7QcJepizJftD48CJ91iVqk4StRhYfzvvqQVWt7gPybhudP +mlUKbtYHTRrH7SYuExSQ3imfOrAZAmz3K7ZLmmDk6Zh3lmqboT/Emr+fboK3 +A/TEXlfrQTPvIsEITPBAQJYa65QeFFcUa1wyM8H0fVribf56EDn318rTim2N +6YYgET0QiKlPHnE0wbW7XjwbiNIFqzTFnx8CTND0aOo7oy060FDy5/3iKROU +ciM6XOPSArJF1E+7DBN06rxtV/5eE5jvp/kLz5hg632L2tf3NaFWbpRil22C +LQH1pNoETbid++DMtasmKL9WY9RwWQMKM09QratM0H1y7pTv0kZIjxI6l9tn +gglf9+TpCKoDj9ipsplXJlhw/NHOwW9qkFbD0WI+ZIKdy78Lr/epQers/Kfp +ERPMrlkjc/2yGhzd0083+2SCHLcDn1LV1eCgz+XJL8smSCn9nlZmowreW5TR +RI6O7oOa6WnXleFvP49guwIdL7bCLclTylAYNDtsp0zHBclY6ApThk9pjTHe +G+nooE2Vu0pWhoNPHO/E6dPxpPIV2XdPleC0Q4JcgxUdJ3lJBt0ritDk+WrF +MIKO0Y4HKpRjFGDnl6aulgN0/G9/+HKfnwJwxBfmbomiozQz83GxjQJYXd1n +6BpHRwsbH8+rBAV4+XZN2KHjdIw68fH45DF5mArQHa7JoWPEMQGGvYIcEPef +bNR9QEdDXYnHShlEyFoNNspoo+O2kuHdjGAicGZb1Xx+SMcdB7bknDAjwhRr +3c3CJ3Ss4bP+nL9MgCaO1FzRPjpaDSckTO4hgPeFpJilj3RkqgTtaXCSgdzm +OKNWPgY2664T/GguBfwOXjUEQQYauJguOipLQdKYsU6MMAMDlNbSx7mkYM+6 +ZZVNEgy8viZUN+GRJFAco8WL5Rh4YNg1L8lOEgbGD/44sZmB9aU6H67vkACJ +DWE12zwYWMo7/VT+shiUWCTGf/NioNO1TxH/4sVAPzHL4rwPA/N4vR25d4qB +w7fqV0O7GOhX+u7tJUUxSBtY/BUYxl6fZpj4jduisFx8zDw+mf087qjcHV0i +8MbkfF9ZBQPVuSS6C5SEYc/hkjzbKgbuHq0b9OEVhqUqZtB0NQOZ/Pw8R8aE +QFRp6OdmFgPHXt/6+SJBCOx5ZEn3HjAw2iHfrKNBEFr6y3b3vWLgzm9V5w8z +BMBOsEEneoiBL8+c56UICcCQ9ZMl6WEGiikmv6O+54eFpq+nfMcYaCatZ8GZ +xg86RZsqv0wx0HuKR+PCSz5oeWMWnTnDwPfKJsPuZXxgJ+4Cet8YeNUwY6Nn +PB8Enzz8ImqRgdXCSTQJZT5YeJB2RWqZgWcbTFx6f26AlN85gU2/GbhgZn6n +s3sDCBve1N75l4H9g6xff4s2wLX9TYurqwyMm9QajYjZAP8HShBFeg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.08775861585636013}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8619,19 +8763,19 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.08775861585636013}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8645,129 +8789,165 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k4lO/XAHBRIfvOzNi37GWZMWPGOcheZF8SIqSESrYoJCXyLS1UZAkp +kW0mW+pHSZIUoUiiRbKkkEp55/3ruT7Xs93nPOec+3oUAyKcgzg5ODhy13Bw +/P9xafTJQ5WMElO+ro9D+9PsTfuvSceZDaVATfD7d/dAA1DieYD0UDa8dRoP +SwEqRG+/Ncg1VAzSC+IObmALIrNS2b8Ga+HxVnXNNeAF71ocIhYG2yBXYuHZ +GCMUrFSm3s4PvoR8/szZGGoc/BqkXPw2OA7VMZ9VJtXTod3iRsmL4h/wcXAp +r/vjZSC9a/wUoP0XXHqY87JjxSAe5neL24ILzw7ef99rWw7Zm62aHdx4MH8y ++eFMTiXoDXtZM/bwoLCtblrcrUroTt3fp3WEB+n3jdL+tFTC+qELX3mKeHDb +NhOd8feVcOToBLF9mge/hmRnULWqYPfTpARKKi/WXb1uyt9SBeSgZoZC3QZ0 +PjS5RWHgDrzO3fRgXlgAZQwPnj2xWA1X+iqEolUFcCb+Kaf2v2rwFlT3+00V +QE3Oa5Ld62tg5LjsP85AAQxvj5T5JVUDY+Eb6OJMAVT9smy/nlYDk1s+3CV7 +CeJDTY5DXxNqYPlbzp0jRUJ4fi2f4Mu/NdCoJba6yhRC1avdSeXraiE+OMsh +tUsIFV7WOccK1MLKcOpM5g8hVJ5i8q+VrYWkiQaJ50rCGH+29cZTk1pI7Sl1 +GYsSRu5DA8sysbWQUXLsOaeMCEqGpfTd+FoLdoahohLKIji0ILMj7Xst8Dx0 +dlPXEUH/wF4H31/s+ydUh+3NRFBj6tbh3+vrIEGp+9OFUBHcW+lfMKFYB+GF +0v/UmkSwq+bYrlj3OnDKq9G23yGKc3s/7yhpqgNh7asRO4NEMWziiV3Vgzro +aU6tjYgQxfjy5BM1HXVgN+xhfOG4KBrdDRy+/rIOzAn/LN5WiOLv0aAFylQd +GOba7YhYEcW+Z5YWstL1IHVhIv18vhimb9voMRReD9JazNTlMjG0Yhr71Byq +B0Jb2rGd1WIoKs2RmBpbD3LfNA6rt4vh9elGYZmUelDdGunfPCmGRKPC+D8X +6sFg7V/yhIE4dlFS9Eob68ExSvKDfpc4qulU78n4Vw/b+SZHc/rEcXGuq+AG +JxOcixtfr4yIYy+n0Ld765ng3uvzvGOObcfYkSFBJuzUvt7kLSGBDGGtycdy +TNj3Qe9cir8EDra2zp5mMOGkq63pyyUJ7OuQCSiLZgKhvofAuUYSf4hXNTnE +M6FKzPXnZj5JPEhP1v6WyISBl77V5+QlseKYlK/cCSaoOEUpOdlIYhTRkHfj +eSa0bStY33tZEoNYvvzzlez1VKpMrF6XRAe6jblWDROm+G/d16uSxIH+N1d9 +65kg0l0f+1+bJLpsErlX3cQEf7uuKYevknjcUb6H8zET/lot9jyjS+Hg17Vf +fEeZcLYsvuKvlRT2HsV7Wu/Z71/PcUrHSQonrAXb5yeYsPXRBrMzQVLIfdM5 +JPQLE65YKNRtzWJfrzWsy73ABGO0z3n6TgrHPftv/OVmQXdB76E/X6SwjJoh +6ruBBf6rbtu1FqTwoLDSg7v8LDjZ6s+bwSONGip3J91FWDBAjz5it1kaPybc +OreFwIJD1CK/JynS2NJ913dUkwV2hYIL9pnSOJNEO1yrzQIl7oRTPRelsauT +1Jqky4LefveavnJp3DKR/pVPnwW6kfxcoz3SSBvd/mrEmAXrBuNy/IekMWmO +tyCFxoIRxmetiffS6EuJKlGisyCDr811ckEaBS31Q5yABZNlMWXfCTIo3Fw9 +G2rJgvsCH2mHVWTwrwc0vLdiwaUo5+c/dWTwUkPIYxcbFlia6yyvoAxGU8qa +1exZUPx23JY7RAbvaJoqnNrOAh9xhxlinQwem41eS/NmgcGR5uRrLTIopKvV +4b6DBRvGN0oqdsjgYTuuif0+LGi8wwVqr2Uw2aLXIMOXBZL2jWc3rcrg5Ngm +75QAFszUqKnW8RCQU8FG9mAgCx5KX2g0EiWgTZOctc9udv4+hY/TVAmoT17z +Sj6YnZ9kFUNLewLmpw9w7Q5lwY3Jc52PXQmoWSaurr6XBUcdV33sfAm4Kcz4 +3ge2dWTfnHA8QMC1RWE2jmEsWJtqTXgZT8D/tAtxhe2Rqfoq11QCDuas1lzf +z4LTDf8NeuUQMNG7YP14OAt2yf/dN1JIwIossZnYCBYYp+3l8LtFwDlPosuG +SBZ8drHU2H2PgDOGu0tIB1jQ2lR771MHAeHOl+x8ti8pKjiH9hLwwJkMbpmD +LNgy9zs+fIKAr560p6+yHWdzQfN/0wTs+T6fuecQC6qKdN6ILRHwxU1jl262 +J353pAevEvCwh+6oZhQLpF39qY08RMyGfXqpbG+r/DXJJ0rER8fSbYbYTll/ +PteXSMRPAqpa6odZMN3w6CeXLhE/E7e5MNlWFPW74U4homgdIW+Bbfd9y+43 +kYhD7Z/rdaPZ9fPw3PoVWyLmBHsVBLL9QFaL5eBCxMIUyZ3n2V6MfhhU5EPE +L92P5+6xrdm7U2IhiIh2HVJeE2z7avx8aBVBRO2m2itcMSw4n3I26nIsEQda +rFhybHcOa6hMJxNx5ObxSkO2Vwzb+0wziFipREyxZHtzls/xcxeIOJ/5wMiJ +7eDPi/of8om4RkSjy4Ptq/jfOPkGEf1z+cy82O69vDE7vZp9vlshz43tdT/+ +ZzbSSMQxUeW3W9mmbd0xr9tOxMSzPeuA7YjShcLkbiISld9LabNd8u/M9v5X +RDQPIEiIs/3aQ51D/R0RNfJNVpfY8QjWPLgTN0nEza+5h/rZttjg7dc9T0RG +r0VRJduxgT8E5f8QUXOO6ZPMdmVLZuuBtSSUcFXj3872uIRa+EMBEgo9862R +YVsq4r6slBQJ9QY0HUbZ+d/a6fksVIGElFyPD/lsJyt+T2jRIOHIp7rDnmyz +4jO0hQxIaA7CawXZ/tqnMrKLTkKLDtNzrezvraDTmlFvSUIuazH5vWyffvdt +ysuThJCzbkstu37uG5++cnsXCSN0+kYd2F44p2y3upeELtZlyZ/Y9ee7xf1m +SSIJc/f2fFrPtv7N5pC5YhJqClwJ5GfXdwinm5T5bRKOrlk5mMyu/7wdsx0X +mCTkfxZxeZ7dH+sFFdVonSSUl9ls0M7unzcH0z6kzpDw58zsc619LBDqlr8w +uETCX7/Kn8Wx+3GLaqOFJocsLsd8nG9j92/V4Nfi56KyWKLezLTaw46f7rSL +YCyLhoJcAeJBLLDxvfadYi6LHEuiGhrseSCY9PW421ZZ9NUM32bMnhd57SfK +zvrL4rsHlg2Wu1jQYNf0dX26LMrIlPrK7mTBsTDuRJXzsvj7orbnOvY8sspy +FTTPl0WX0Zr2z+z51f9idlNijSySUw3/XPVkwTdP5egfr2Xxq+JfozYXFtyN +j+QW+SCLVmDDe9SZPV/y7uXqzsqi0cEHgYZOLOAf82gO5ZRDg9ofDWcdWKAe +kskxpimHXXGzejy27PweXjzdfUQOHY9G1S6w57Nqjjlp6oQcim53M/U2+f/+ +/K+S+6wc3vyhnNhEZUH8ikaveYkcxsc1yO0js+DicV+Jxm45PNq6E8/osfej +c48LSmXlUSZ4XeygAru+qy7XH70vjy/KN4zlrDJhy2DP39lOefxe6TF97C8T +HDjWWvu9lMd8hcMVgX+YEOgc/ho+yqOd3oC93E8mWB1RPJa0TgGL3Hd6+c8y +IVJ+6bqZlgJ+9qV2y4ww4WFIwUx7tAKOXOTde4i9H9uuUEUTjijg70edlwbY ++3XP2X6yYZIC/hUYfmR0hwmvG3mTStIV0ClS1WjyJhNm+aJET+QpIL2dVSBb +wATpahuKVZsCen7JHO8+xYSw5fmkTgFFjN1GNnT0YgLtQLDkJ1FFjKPvXr/o +xgSeqTcVXNKKSF9Xk37JmQmlw+0DpkqKmEEXrum2Z8Jo60VtJlkRq3W+j60z +ZYLjCepQkZ8ivhYlN1QpMkFfNFnvSI0iDjzJXfP9Yz380hIe1XFTQg3nq73/ +AuphKZ+QbOCthGHRXWse+NbDgpCqCtVPCWNue7xL9K6H2R/UvVtClVBFrf72 +nFM9jDcHLnknKuGZjgvTFVgPXfZ3BU+VKqGIgdd4umw9XNnnC+OLSphg86z+ +e38d0CtuF166pIx/uq45bjKpg3lRO3/3NhXc8WjmQyNnLXzI9Hc/yK2GvNQ+ +b9ML1WA7F2P7kayOVU8cFhZ3VsF0IM+h+mMb8Zb7c8bhrRXs/xEpzpNtGriq +8d+oplM5iD5Ty6qe08Rtbsby5ddKgXTqznYyWRs/3ew5ozFQDLlaVGGxEB2E +py0zTSGF0EUwM/pxTheDFJLCPgbnAY3UdlZvQA/L//P9YymQC4JcxVG7Ujah +oO2yll7oBZBLlqd7qW3GrlldCPh6FnhVfVjOjzdjntrQ7Oy7DNBlyNyJ2amP +9wKlVw4In4SDo6LtdhwGeCOR5XXkagrM/ch0s801wJMCjDM7Nh+FkaEi9/wr +Buj9Wi5fRfoodN1jecznGaCt+8rnf/8SoeTkmNflIgP0bZUW+tydCN5EQ98v +twwwX6jnUWpoIjwyHw5Ov2eAV69YTs+WJsDVcxqxT8YNcM9p75dWWkfAWq/j +iq2OISrqNcnbB8eC53ob1149Q3xVsq3J0zEW9r59IuChb4hxd3/bxxrHQlbG +s6TdFEOUDyvXntkQCwOf+4OPmRli18n7T29Xx8Duwgl9ppsh/gONzvjVaEgR +WfNU4aghJi7LUPlvHYbWHyZ/fvYY4rPoowKjmw5BUffdAJcXhtgvcumFj/wh +SC016KrqM0Suyy5SXwQOga2H1uWgIUOkq1fwaH49CP1NBErfe0NsWZN7c2vZ +QZhK/nWwasEQ78VmKgjKHwRJ4btTuwlG+OV1jfJWwgEI19Z/8yLICO9UPX4i +ExYOh38SfvvtMcIEUhTPz63hkNDGRZjda4QWh+5fmtMJhwzPV14bIo3w/rKa +p/63/VCeGvvaPN4IX1fZhK4c3g/jI61DdVlGqPlqW212Whi4n7EfvHjXCE+Y +ORbZNO8Fxuzufi9eMpLIDopL4SEg2Wxd3MJHRhfXdZGtHiEwe1IzUl6QjOZX +TtRfwRC4pviN76MoGUd+ak9miYbAP9cjFpEkMto99k3YfTcY7jefq03TI+Pm +tLmEhrXBYJbeerbOjYwFjabaZZW7wVJFeptAMRl7L0D0PaMAqJ95pLi7hIyt +3ILhscoBoHL30FJTGRnlNHljLEQCYK3d84I9FWRMFQ7K4p3ZBW0Rad/b68k4 +ELTmnGvpLjBtXsiJf0zGXaUKU8PSu4Ds/GL88zQZ397cq7OLzx/KiMfums6R +Uel6cL3wkh9IfNTOvDhPxoYPpMCEV36wEHPKyGKJjPeM9UIrLvhBbT6curZK +Rh2Ol01B4n6g96VSx02UgtxP8Y6xjC9sTDod20ahYIhuw2I7xQdaTErXbaVR +UD2SJUSS9oHtP+9nv6JT8H+CEdnnl3dAbPji7UkzCkaWO+8da9wBnT7+7wW3 +UlA/kufcLGMH7KGS7Xb4U3DUftS1w94bbn5/T1w4RUHSVd3iukRPMK1aKU/M +oGDh3p7qx7s84WWoFJk7i4JOc4vrly094ffY1u2E8xS0CC7SqBT0BLvnd1Mx +n4JdO4VvBRd5wFTFmZnMGgoKJFNerel2B80g6n3VNxTcNfH5qZGRG/yn5PD7 ++AgFs3myxq3l3GDhXYDR+CgFlSUyJSO53aDVO7Pi2gQFF5PtsjjfuILz9nc5 +UjMUbA52eaST5ApxJicieTmMUY9yp/FMrwt0irxQnFE1Ri+x7dRfSc6g8/yj +j/1GY0z3Feq8HeYM2Zm/c25qGqNB5xOrKE9n8OFWEQzWM8Zafs8XppucYW4l ++veosTFWS9jYPhhzAslJUl+vvTEmMNu8gy2dIKh1T2r9AWNUK40be0baDrP7 +p2Iso4zR8110gT/vdoiVDds3EG2MB5fq+oWnHeF0QoTz8hFj5M77ckunwBGq +adEK9DRjDDwtdt+L2xFWWMdb2q8Yo3BI7lOvd9sg+861hZftxng4Rdtz/rY9 +kPwUJgM7jJG24ceSUIY9lAoWDy90GmPwmakVl1B7aNhf2ibZw16fTvodezV7 +eKt1+6z3kDGWf9j8bLHIDjaWN2qPTxvjZMdxPclCW7hf2L97XoKK1xOqNXNY +1jC2VdEvWpqKyQGhxeWXrYHj136vPwQqShksbXiTYA3mTtwO6xSouHqh1SDP +who61tAoMppUXHct78yVl1bQHVDAa2ZKRQPD7Su7lyzhjcreqrPBVOz2OO4Z +4LoF/vSyyiVCqaisv1HD2GQLkBK5rl/ZR8XnHedQU2kL7HyVl1MSScW5Q3v6 +A75ZwNiJ50kN8VS0PPUzXSnLAj5/MnQZy6LiIvmxxcMec1goX/2pd5eKtdK1 +qgOBZvDJ3aowvZGKKxJlWjGOZjC09ozNRDMV2+ovftUxMYNmf8LlSw+oeN6y +23pE1AxSpI1of59Q8Ul4J5XWjiB8am9C1wgVXQumY7+oI2iHvOII4qQhsZAr +XHqNKchJkG62rqWhf+xzo4S3DBBuD3CS5qahnM2L7PVNDPgh963oKR8NpYTS +Y7MOMaBpYIOFvgQNK6qbZoIn6WBjhSdW1WkY9aOSRXhtAoGqFbxXttHY/dwb +evEVFeIf+e5V207D6Dzd/C91VDgbJPq01pmGAwq2f4KyqdBSGpf51IOGYaf8 +zgw4UkFczUbo7y4aGtjxhGZ3G0OH2kdx/2gaHnLQidv+jAKaG+UV1ApoqFje +HPJkygiw82VSbRENnRQ4N/c9MwL3PWnvTUto6E57I81RYwTHy2eKPW7S8OGy +0u22GCMY2diiml5Hwwj9mfuf1htBloaX1vRjdnynHdae1jKEec3z5NpvNIyN +PmAIZ/RhqBstxX7QcJepizJftD48CJ91iVqk4StRhYfzvvqQVWt7gPybhudP +mlUKbtYHTRrH7SYuExSQ3imfOrAZAmz3K7ZLmmDk6Zh3lmqboT/Emr+fboK3 +A/TEXlfrQTPvIsEITPBAQJYa65QeFFcUa1wyM8H0fVribf56EDn318rTim2N +6YYgET0QiKlPHnE0wbW7XjwbiNIFqzTFnx8CTND0aOo7oy060FDy5/3iKROU +ciM6XOPSArJF1E+7DBN06rxtV/5eE5jvp/kLz5hg632L2tf3NaFWbpRil22C +LQH1pNoETbid++DMtasmKL9WY9RwWQMKM09QratM0H1y7pTv0kZIjxI6l9tn +gglf9+TpCKoDj9ipsplXJlhw/NHOwW9qkFbD0WI+ZIKdy78Lr/epQers/Kfp +ERPMrlkjc/2yGhzd0083+2SCHLcDn1LV1eCgz+XJL8smSCn9nlZmowreW5TR +RI6O7oOa6WnXleFvP49guwIdL7bCLclTylAYNDtsp0zHBclY6ApThk9pjTHe +G+nooE2Vu0pWhoNPHO/E6dPxpPIV2XdPleC0Q4JcgxUdJ3lJBt0ritDk+WrF +MIKO0Y4HKpRjFGDnl6aulgN0/G9/+HKfnwJwxBfmbomiozQz83GxjQJYXd1n +6BpHRwsbH8+rBAV4+XZN2KHjdIw68fH45DF5mArQHa7JoWPEMQGGvYIcEPef +bNR9QEdDXYnHShlEyFoNNspoo+O2kuHdjGAicGZb1Xx+SMcdB7bknDAjwhRr +3c3CJ3Ss4bP+nL9MgCaO1FzRPjpaDSckTO4hgPeFpJilj3RkqgTtaXCSgdzm +OKNWPgY2664T/GguBfwOXjUEQQYauJguOipLQdKYsU6MMAMDlNbSx7mkYM+6 +ZZVNEgy8viZUN+GRJFAco8WL5Rh4YNg1L8lOEgbGD/44sZmB9aU6H67vkACJ +DWE12zwYWMo7/VT+shiUWCTGf/NioNO1TxH/4sVAPzHL4rwPA/N4vR25d4qB +w7fqV0O7GOhX+u7tJUUxSBtY/BUYxl6fZpj4jduisFx8zDw+mf087qjcHV0i +8MbkfF9ZBQPVuSS6C5SEYc/hkjzbKgbuHq0b9OEVhqUqZtB0NQOZ/Pw8R8aE +QFRp6OdmFgPHXt/6+SJBCOx5ZEn3HjAw2iHfrKNBEFr6y3b3vWLgzm9V5w8z +BMBOsEEneoiBL8+c56UICcCQ9ZMl6WEGiikmv6O+54eFpq+nfMcYaCatZ8GZ +xg86RZsqv0wx0HuKR+PCSz5oeWMWnTnDwPfKJsPuZXxgJ+4Cet8YeNUwY6Nn +PB8Enzz8ImqRgdXCSTQJZT5YeJB2RWqZgWcbTFx6f26AlN85gU2/GbhgZn6n +s3sDCBve1N75l4H9g6xff4s2wLX9TYurqwyMm9QajYjZAP8HShBFeg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.08775861585636013}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8778,6 +8958,7 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8805,7 +8986,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07335635796919572}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08775861585636013}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8813,9 +8995,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913457856953163`*^9}, - CellLabel-> - "Out[421]=",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] + CellChangeTimes->{3.9913457856953163`*^9, 3.994358905024078*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"2e0d6e42-9f45-4051-a53f-bf8084dca349"] }, Open ]], Cell[CellGroupData[{ @@ -8868,66 +9049,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[422]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], + "In[100]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 422, 453, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785749161*^9}, - CellLabel-> - "During evaluation of \ -In[422]:=",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ + "\"\\!\\(\\*FractionBox[\\\"7.171978322139785`*^-131\\\", \ +RowBox[{\\\"68023740289078328950450781972622203792902576953271358\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"951822384455180747800576000000000000000000000000000000\\\"}]]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 454, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785759161*^9}, + 2, 100, 105, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994358905064641*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], +In[100]:=",ExpressionUUID->"2ab3bdea-208e-4de3-9334-b8cc7008a7f9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ + "\"\\!\\(\\*FractionBox[\\\"7.135395156665936`*^-133\\\", \ +RowBox[{\\\"29631141269922520090816360627274231972188362520845003\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"79\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"138306686767337419309056000000000000000000000000000000\\\"}]]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 455, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785767502*^9}, + 2, 100, 106, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994358905068838*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], +In[100]:=",ExpressionUUID->"6436b2a2-ea65-44a2-b080-0d65c6d8e791"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.098998596328906`*^-135\\\", \ +RowBox[{\\\"13301419316068219268767464285583402732315355935607322\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"83\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"858716898577675278352384000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 100, 107, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994358905072914*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"013f91a9-d653-42dd-930e-eddb328b81cd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 422, 456, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457857765007`*^9}, +during this calculation.\"", 2, 100, 108, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994358905077128*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], +In[100]:=",ExpressionUUID->"a8aaa43e-9160-4051-a5c6-4bb649ffbf66"], -Cell[BoxData["10.362747935330768`"], "Output", - CellChangeTimes->{3.991345792196575*^9}, +Cell[BoxData["8.648194307190197`"], "Output", + CellChangeTimes->{3.991345792196575*^9, 3.994358944894597*^9}, CellLabel-> - "Out[422]=",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] + "Out[100]=",ExpressionUUID->"3f0d51b9-52a6-4606-9a9f-8e595c80b719"] }, Open ]], Cell[CellGroupData[{ @@ -8994,68 +9182,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918501903071613`*^9, - 3.9918501951272774`*^9}},ExpressionUUID->"0b10f52e-4583-2a4b-993d-\ -96e59dd43e6a"], + CellChangeTimes->{{3.9918501903071613`*^9, 3.9918501951272774`*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1301260100698846`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 101, 109, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994358944925452*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"331dc5eb-70b7-415c-97a8-e14017190f52"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.3635834516406854`*^-219\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 101, 110, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994358944931509*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"11f4f747-f465-482d-8a98-ec51f5c476ce"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.5455592727163994`*^-224\\\", \ \\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ 29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 457, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792232563*^9}, +normalized machine number; precision may be lost.\"", 2, 101, 111, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.9943589449377327`*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 458, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792242544*^9}, - CellLabel-> - "During evaluation of \ -In[423]:=",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 459, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922505417`*^9}, - CellLabel-> - "During evaluation of \ -In[423]:=",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], +In[101]:=",ExpressionUUID->"5965d8de-1f79-4266-8f15-bb4f350c8f1d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 423, 460, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922595577`*^9}, +during this calculation.\"", 2, 101, 112, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994358944943735*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], +In[101]:=",ExpressionUUID->"b88e950c-b516-458f-9add-b8ba687f7432"], -Cell[BoxData["0.32136877427435395`"], "Output", - CellChangeTimes->{3.991345799137081*^9}, +Cell[BoxData["0.022500236465494993`"], "Output", + CellChangeTimes->{3.991345799137081*^9, 3.994358948798006*^9}, CellLabel-> - "Out[423]=",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] + "Out[101]=",ExpressionUUID->"6e3027b6-2aa4-4714-840d-a21350ec50b8"] }, Open ]], Cell[CellGroupData[{ @@ -9076,8 +9268,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9122,68 +9313,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185020477277*^9, - 3.991850207864538*^9}},ExpressionUUID->"a58948c9-6d3d-e847-a269-\ -d2e0cc5d1484"], + CellChangeTimes->{{3.99185020477277*^9, 3.991850207864538*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1301260100698846`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 102, 113, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994358948825135*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"b0c4ea83-3393-43db-aae1-2784ab3fd6c9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.3635834516406854`*^-219\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 102, 114, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994358948829299*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"da049c93-d11a-45be-bd8f-f0b7b725046e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.5455592727163994`*^-224\\\", \ \\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ 29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 461, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991730843`*^9}, +normalized machine number; precision may be lost.\"", 2, 102, 115, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.9943589488333273`*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 462, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991830807`*^9}, - CellLabel-> - "During evaluation of \ -In[424]:=",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 463, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345799191578*^9}, - CellLabel-> - "During evaluation of \ -In[424]:=",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], +In[102]:=",ExpressionUUID->"b2036a51-dc31-417b-8f13-faf3f9349356"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 424, 464, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457992005787`*^9}, +during this calculation.\"", 2, 102, 116, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994358948837579*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], +In[102]:=",ExpressionUUID->"81fbfae6-f724-4880-ac72-0a1cddeee7dd"], -Cell[BoxData["6.886509882261309`"], "Output", - CellChangeTimes->{3.991345804559931*^9}, +Cell[BoxData["17.51137561284518`"], "Output", + CellChangeTimes->{3.991345804559931*^9, 3.9943589526369953`*^9}, CellLabel-> - "Out[424]=",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] + "Out[102]=",ExpressionUUID->"5651e8e2-afe5-413b-bfa4-84bb1e342d08"] }, Open ]], Cell[CellGroupData[{ @@ -9204,8 +9399,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9250,68 +9444,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918502122939777`*^9, - 3.991850217343153*^9}},ExpressionUUID->"c817b2d1-7deb-5a45-9938-\ -ca10003188eb"], + CellChangeTimes->{{3.9918502122939777`*^9, 3.991850217343153*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1301260100698846`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 103, 117, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994358952664654*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"a8fe2386-5c97-4121-a48b-5841605f050d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.3635834516406854`*^-219\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 103, 118, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9943589526690187`*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"1ec5ffe5-80a9-42ab-b92a-26fc169bf5fd"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.5455592727163994`*^-224\\\", \ \\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ 29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 465, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046014442`*^9}, +normalized machine number; precision may be lost.\"", 2, 103, 119, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994358952673252*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 466, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046114445`*^9}, - CellLabel-> - "During evaluation of \ -In[425]:=",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 467, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345804619444*^9}, - CellLabel-> - "During evaluation of \ -In[425]:=",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], +In[103]:=",ExpressionUUID->"0f004897-3ac5-4cc7-8933-b67449d9982c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 425, 468, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046274433`*^9}, +during this calculation.\"", 2, 103, 120, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994358952677672*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], +In[103]:=",ExpressionUUID->"b31d2bd4-cc60-41b3-a39d-89f535a428fd"], -Cell[BoxData["18.478556086442907`"], "Output", - CellChangeTimes->{3.991345807954506*^9}, +Cell[BoxData["2.208284049247127`"], "Output", + CellChangeTimes->{3.991345807954506*^9, 3.994358955007044*^9}, CellLabel-> - "Out[425]=",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] + "Out[103]=",ExpressionUUID->"09e9d68c-a1d0-4eda-aaca-6476b2556dea"] }, Open ]], Cell[CellGroupData[{ @@ -9320,22 +9518,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991850221900238*^9, - 3.9918502257325497`*^9}},ExpressionUUID->"350334c7-7c47-c24c-8adc-\ -781173809e57"], - -Cell[BoxData["0.028488532115740543`"], "Output", - CellChangeTimes->{3.991345807987507*^9}, + CellChangeTimes->{{3.991850221900238*^9, 3.9918502257325497`*^9}}, CellLabel-> - "Out[426]=",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] + "In[104]:=",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], + +Cell[BoxData["0.0036182575983207273`"], "Output", + CellChangeTimes->{3.991345807987507*^9, 3.994358955031687*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"e4593657-96dc-4e77-a736-fd659d25882a"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991850228782873*^9, 3.991850231287325*^9}, - 3.9919246253575134`*^9},ExpressionUUID->"597921e5-69d3-564d-a8fa-\ -092e912c15e0"], + 3.9919246253575134`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ @@ -9358,12 +9557,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[428]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], + "In[106]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.991345808020666*^9}, +Cell[BoxData["8.248858237621514`"], "Output", + CellChangeTimes->{3.991345808020666*^9, 3.994358955042192*^9}, CellLabel-> - "Out[428]=",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] + "Out[106]=",ExpressionUUID->"b1094f66-ba44-45cd-b249-c691cb27a0a4"] }, Open ]], Cell[CellGroupData[{ @@ -9373,12 +9572,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[430]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], + "In[107]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913458080616665`*^9}, +Cell[BoxData["0.7657486652755594`"], "Output", + CellChangeTimes->{3.9913458080616665`*^9, 3.994358955048541*^9}, CellLabel-> - "Out[430]=",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] + "Out[107]=",ExpressionUUID->"ee651c3b-4804-4352-8a2b-a6bf5f745a64"] }, Open ]], Cell[CellGroupData[{ @@ -9388,12 +9587,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[433]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], + "In[108]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.991345808188246*^9}, +Cell[BoxData["6.316552185505977`"], "Output", + CellChangeTimes->{3.991345808188246*^9, 3.994358955054921*^9}, CellLabel-> - "Out[433]=",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] + "Out[108]=",ExpressionUUID->"c671c4b9-e274-4e75-9930-2466384db40f"] }, Open ]], Cell[CellGroupData[{ @@ -9583,12 +9782,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[434]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], + "In[109]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[BoxData["0.04214145338799881`"], "Output", - CellChangeTimes->{3.991345808220566*^9}, +Cell[BoxData["0.012632417107901715`"], "Output", + CellChangeTimes->{3.991345808220566*^9, 3.9943589550635853`*^9}, CellLabel-> - "Out[434]=",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] + "Out[109]=",ExpressionUUID->"dc4ad591-7faf-4e9e-a95b-4324dffac2f3"] }, Open ]], Cell[CellGroupData[{ @@ -9602,12 +9801,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[435]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], + "In[110]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[BoxData["4.317080886816563`"], "Output", - CellChangeTimes->{3.9913458083195686`*^9}, +Cell[BoxData["7.885000262301995`"], "Output", + CellChangeTimes->{3.9913458083195686`*^9, 3.99435895513083*^9}, CellLabel-> - "Out[435]=",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] + "Out[110]=",ExpressionUUID->"d59eda15-d961-4d8e-9509-8c1851c4ec1c"] }, Open ]], Cell[CellGroupData[{ @@ -9799,12 +9998,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[436]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], + "In[111]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[BoxData["0.012862376162526763`"], "Output", - CellChangeTimes->{3.991345808334568*^9}, +Cell[BoxData["0.12735309175399293`"], "Output", + CellChangeTimes->{3.991345808334568*^9, 3.994358955139735*^9}, CellLabel-> - "Out[436]=",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] + "Out[111]=",ExpressionUUID->"5b97c732-b2ec-4387-85e0-4ae479163aaf"] }, Open ]], Cell[CellGroupData[{ @@ -9818,12 +10017,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[437]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], + "In[112]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[BoxData["7.814196669618258`"], "Output", - CellChangeTimes->{3.991345808432392*^9}, +Cell[BoxData["2.4833629317653823`"], "Output", + CellChangeTimes->{3.991345808432392*^9, 3.994358955206828*^9}, CellLabel-> - "Out[437]=",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] + "Out[112]=",ExpressionUUID->"686beb38-d95f-4734-923c-313682ede43e"] }, Open ]], Cell[CellGroupData[{ @@ -9916,12 +10115,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[438]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], + "In[113]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991345808448488*^9}, +Cell[BoxData["0.12678436313657984`"], "Output", + CellChangeTimes->{3.991345808448488*^9, 3.994358955214032*^9}, CellLabel-> - "Out[438]=",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] + "Out[113]=",ExpressionUUID->"d13e959c-10c7-40ca-8fba-5ed58f54e1b1"] }, Open ]], Cell[CellGroupData[{ @@ -10011,12 +10210,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[439]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], + "In[114]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913458084773808`*^9}, +Cell[BoxData["0.8732156368634202`"], "Output", + CellChangeTimes->{3.9913458084773808`*^9, 3.9943589552208548`*^9}, CellLabel-> - "Out[439]=",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] + "Out[114]=",ExpressionUUID->"59b4079e-664f-49bf-a9d8-fa84e5151a8f"] }, Open ]], Cell[CellGroupData[{ @@ -10139,12 +10338,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[440]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], + "In[115]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913458085134735`*^9}, +Cell[BoxData["0.1107100884006317`"], "Output", + CellChangeTimes->{3.9913458085134735`*^9, 3.994358955228245*^9}, CellLabel-> - "Out[440]=",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] + "Out[115]=",ExpressionUUID->"92d71c09-997e-4d92-abe5-dce720e194c6"] }, Open ]], Cell[CellGroupData[{ @@ -10206,67 +10405,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185025346871*^9},ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], + CellChangeTimes->{3.99185025346871*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 469, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085463753`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2216351049793959`*^-198\\\", \ +RowBox[{\\\"30278850633655058582710149233337530603447722122319635\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"934564270838098005054611040868761600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 116, 121, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994358955238531*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], +In[116]:=",ExpressionUUID->"7b083571-3b24-450c-a4f4-20a4f75e25e9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 470, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085563755`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.088127103631531`*^-203\\\", \ +RowBox[{\\\"66885981049744024409206719656442605103016018168204074\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"452474281358493165635789279094374400000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 116, 122, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994358955242614*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], +In[116]:=",ExpressionUUID->"15722a0a-75f6-45bd-8ae3-3bd38813fba1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 441, 471, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345808564377*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0340722429221574`*^-207\\\", \ +RowBox[{\\\"15410530033861023223881228208844376215734890585954218\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"500744249968253624858499033438617600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 116, 123, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994358955246645*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], +In[116]:=",ExpressionUUID->"f9a573ea-2999-4483-b960-95466624ba3f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 441, 472, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085733776`*^9}, +during this calculation.\"", 2, 116, 124, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.9943589552508*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], +In[116]:=",ExpressionUUID->"4a34a127-7cab-4a60-9b3f-5b042c4be8dc"], -Cell[BoxData["4.317080886816564`"], "Output", - CellChangeTimes->{3.9913458125059433`*^9}, +Cell[BoxData["7.885000262301998`"], "Output", + CellChangeTimes->{3.9913458125059433`*^9, 3.994358957559609*^9}, CellLabel-> - "Out[441]=",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] + "Out[116]=",ExpressionUUID->"b185cb1a-3938-4286-9f05-45d80accddfc"] }, Open ]], Cell[CellGroupData[{ @@ -10328,68 +10535,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918502579298553`*^9},ExpressionUUID->"baacd3f7-96e4-2949-b9f9-\ -9afb90e551d9"], + CellChangeTimes->{3.9918502579298553`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 473, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812542961*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2216351049793959`*^-198\\\", \ +RowBox[{\\\"30278850633655058582710149233337530603447722122319635\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"934564270838098005054611040868761600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 125, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994358957586629*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], +In[117]:=",ExpressionUUID->"bc601bac-35ae-49c0-9796-76c737e31884"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 474, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812552984*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.088127103631531`*^-203\\\", \ +RowBox[{\\\"66885981049744024409206719656442605103016018168204074\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"452474281358493165635789279094374400000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 126, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994358957590908*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], +In[117]:=",ExpressionUUID->"76e4c624-c0dd-45cb-9b5e-54bac08b6d9a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 442, 475, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134581256196*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0340722429221574`*^-207\\\", \ +RowBox[{\\\"15410530033861023223881228208844376215734890585954218\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"500744249968253624858499033438617600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 127, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994358957595119*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], +In[117]:=",ExpressionUUID->"1f3f2fa6-dfab-44e9-b05c-87a7bc6f4e95"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 442, 476, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812570959*^9}, +during this calculation.\"", 2, 117, 128, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994358957599996*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], +In[117]:=",ExpressionUUID->"8200829d-3cf4-4d70-8420-ac466c38cd3f"], -Cell[BoxData["7.8141966696182585`"], "Output", - CellChangeTimes->{3.991345816415531*^9}, +Cell[BoxData["2.4833629317653814`"], "Output", + CellChangeTimes->{3.991345816415531*^9, 3.994358959914114*^9}, CellLabel-> - "Out[442]=",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] + "Out[117]=",ExpressionUUID->"099c299e-1b5f-4fb6-9bed-abcbef7d3cdb"] }, Open ]], Cell[CellGroupData[{ @@ -10447,95 +10661,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918502605597496`*^9},ExpressionUUID->"ea08a5a9-d446-9147-ba82-\ -e3924f732df2"], + CellChangeTimes->{3.9918502605597496`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VdsbB3BDKEOmkETGukS5R6aS9XJImdKJDCHO2WejDGW6KlEht/Ga +mm6mihISkbGkq0E5IZTql8i4Tcd0JFJ+yx/72c/nWWt/9/uutddWY4Yw2AJ8 +fHwUvpbuR5o2bahoaTK3GJF+Wvmeh8y5OYZMq0I0mf3i3JK7s4zSNK0eI1eP +vrEKbCfirbC4wQs0uzmYKscuiYqtF7LioFpb1rFH2Gdfrq6LzX+H+nrrb5di +V7UcyVygvUeS1klECfbw5zfRR2s+os0NDY+LsNf0a+z/Tv+CsjqCCguw7caj +TcM4XUiUG2uQh127MCwWlf8NRV1Z3JOD/eGUwvHy4F7kGDgmko3NFbYa5tH6 +kZOSrcsNbOELh90NZgdQygH5rVewVaQzGo7UUOis0N7yJGxHpe93uPRRpDuv +GhGPTWary+st56Jog7KKE9ixWrsTDnHGUcvtmuRI7I8K7X+G50+iew83ivth +Ex4HA1IvTKHLtVcKvbEn0vluPgyeRvu/HOtzwV6uric1SZtBMl9K19Cx04h6 +Gym570izSEzRFFv1rnvs5tnvaG9oT9EmbBPdM9ygmh9okZC9uRrb36iLM0xf +QC7JZVmD7TzEi4pYJrr+F/q4ztDjM/bJGjEz7eW/0cvD9EIO9jUwKfDjLCLh +H9IKxdhEboNVaD4/HDpZLhKKnf8ytfuUkgAw0vpifLEnBr2jky8IQKtj6UUn +7GidmdLiYEGwO7A9VA877YGaxjhNCCJlGa49bTz0uWW09vdtIQiTbDvfhK06 +VeGxUk4YTueJuVVjF25xTNGbFQY1ZnFFEvbzqmP8gTXLoYehmWaCPVPf1kXR +xYET0PQ8vJWHZOzFpY7XioNtBW2bG7Z+uxVImEpAoKud8Tbsg32Psv/ctBLa +JorqFt/x0GEBjv52cSm4JfN5dRx2v3rRZMJ3adiR0tkb2oLXh3yzotlABhJv +GFU6YgsUDKitPiIDKlduy+hgqxqsY+SPyMC1Pe3uXc085EFPetjULQuJHgya +FXYzKzRMoVEOXq2Tk5l9y0Nf714677NcHrKPCto1Yo+O5N++Zy0P99KOi2Zh +i4b3tm2rk4ebZ7SVrbGt4p23+DxSgJQwIuU8h4eqc4xm8rIUoWlbVz1/Iw/l +9M9Hbg1Xhibz/LjUVzy00yXxa9h9Zfh2Z+6sJ/boc9kd9weUYW9SwAYt7C05 +unKq7irA1Wna8OglXk+md6mQ+TrIGslBLS94aGq8+y8qThX44pLbpup5SDbI +qqzUQR3iXQVahp7y0ECOqL/TQXVonLrHycWu/NKiNHZGHebXFvj6Ynvae8Wt +r1OHnIh+545aXN/GSMZ1mgaoKwb51j7B7x++OxGjoAnelqlrj9bwkLOfmJ7t +Ny3wVGwJvFnOQyjSheb6Swv8XsypMbB1ErKMCcX1oFE9Fi6AzXfbwDJmz3rY +U0HwfB/x0P2v+10fPlsPAiW9HmvL8PncV3hqza0N0FI01xJTguuzcvgwzNSG +D0krauYLeEhJ/Z/Y8326oG7kdfJdFg89PsfTnhPQA+f1Eja+2J7T7u2kmh4U +/rE1cyKThzKfa2pbeuuBf7THbwlsdb/q1h8deP6ynkR6Oq6vsF+LbNwELkNl +765f4yFlJRVS1V0frBZc3k0n8ZBubrj4T0QDUU1jC+ZJHmIScTN6jjToSixd +1x2Lz5dGylcfTxps0Wy/6YUteOtB8csoGlhbOCW7xuDzkTnsnFJCA7aLxzqb +aPz/u+aToa1hAGpcyRVyUXg/zttvchPeAvsirLMDQ3joZqim0yOOIZjZbwuW +9OKhlkhkHJ9rCuP/zavm6POQmvd7R6/A7cBqMq6kL04j9mJ5kfJRgKJ9ItPR +nGmkMFIposC0hLaa1T0NSdMo3MDsS4qOFZS/PyCv6zKNmGMLDbLD1jBjddQ+ +SWEa3bcME8lqtoGPPFZkybsplMM7+KwwbRe8V6jI17o0hX5YrH77PNYOrowI +Ng5aTqFOPsHJb74OsNmXNRU/O4mC14YkndLYDXoq3Q8ciydRUUBD3eUEJ1AZ +ltlwgTmJjk0rzm4M2AO5wpMO3xQn0Yztjn2vDjDARPLtj8jGCWS6P9mif89e +OGn7O5gWO4FaFTMOPjdwhlqpokl+0wm05k7c47w/XMD+arv+2S/jqLJbx95R +Yh+I3GwaF3UeRyrtE36RY/sgxNyQefYdFxlcTi683e0Kw3fdElft5KKMZdOb +UurdwGbyUIAQZwyVW2z+nFDlDm/cDVVibMfQNeNz0gv5HiAXtkbt35ZR1Py/ +3DMGF/ZDqsnIwnvWKHrkkK55+KQnOK6N7AqdHkGTQXv5ggkvUPlzxz7qnxE0 +s0Pbn0v3BqeMDO8ogxGUN/bpR5jRASgQn5sTej+M3G7msrzEfaCOS+lGnR5G +pQ/tDggm+sCiuO2VNZuHkalS69zZOR/YniEAEoNDSKPb7/O7AF/QK7qV0Jk7 +hPrEDu1O7/WFwxODT3awh1DLJUeWjQsT9nbVZtZuGkJpUVliES1MMG6TKh6e +o9Dj2sU51i4WyC1/1sPkUEjSExINqlmwN1NjZ9JdCqmuetW89jELGDecryzc +oZA+x2G1cC0LqkW4tgHYDLP99z4+Y8HiKtdBei6F0tZGNp54zYIGm9HRX7co +tKazQLLhIwsERCJ0EjIppOmtcM1zlgVTJy8GdF+mkKkPNy9hCwFG/G6c1wkU +unN9IszRiIAXclavXLFXtU2ZK5gQ0M6wURqIpxDXerY9bxsBOW+TmgSxczby +8XMsCdgUo8Kkn6bQyllpd5k9BHBUb5i1xVCo76LhiqwgAvwlP1QbRlFozyvj +dr8QAk6P/dXR9BeFavm2ZukfIeDZGWUHf+zrYeaG/4UT0Hn+CD09kkKO7ja+ +/ccJKHDR9VweQaEqTfeqjecIKAsO2D55hEKXaqIDKu8Q8CGRVy0USKEg2lXT +qDwC6hf66wsOUcj+XskKk3wCYhwY6gxs0asD9yru4/4CrndlHaRQQqjTcHkZ +AY8nW/ejAApFa2seevQfAVX+sR6XSAodvNoY+PArAX+f1w8K9KXQrpUDZqHd +BHRdjdVUxv4jgU+C1kOAlYfpn00+FBoINbxf0k8AfdWI7Z/Yvo5ZY8WjBHB5 +prE/vSnkJhQW/GCeAMkApZEsTwrZhK05XCjPhojCEs4fbhT6L+uMbcpqNkiH +ufp8daWQGWdKM2oNG74H/+WWhq2v1fiJrsKGwlaNSH5sxY7j9P9psUHkt4pf +twuFRrZ2yosasuFTwvp1JXsp9I9A9hO/vWww6O/ozdiN+98sfs3BhQ0pebVC +Ptjx+6NCDVzZsG6T5AV17Kgypw2LHmxITR95keeI6yf5k68w2VDCi+dWOVDI +4A2TeHGEDetN2mTG7SjUkawlppHEhgW75pycnRQqQhL+VDIbxgogPRI7foz3 +/H4qG2xqV43sxKbteh5jcpUNlVW9l7g2eP/4WFMOmWx4y141vh17R0j2p6hC +Njw1OSE9Zk0hZeW/jcyL2MBgzMQ8x+a9CUkVLGaDtWcjPR371nrkcKmUDbqa +SW322L86O+tuV7PB41O42EMrCpXZK+U1NbBhiBny5QKdQufnBYTS3rChyu7O +0wBsZt6wrzuHDWHTRvM7sKWWVSv1NbNBL5GIEMAOrHH7Z+4DG4wVhuNOWFJI +Q+dKpGY/GyxPHOKPt6DQfMeJtqEB3G+ougeJ3ZLA1n9AseH4uc2iu7Bjvm0Z +Nh1lQ4G93WFJ7M/X2rx2T7OBFh3nnA0UShGRtj7GT8KpiMboVoT/B1Od+8MF +SbBIVDpZgT3YmR8aLETCuf+ZTaRjm5VZZTNXkCDmNSUfgD3gE/XTVpqEjyHq +McLYUvbWMtayJPzY9n2Qa06hbcYy2kiOBHrC9doO7CSJwn0GiiQU1Do8zF8a +r+4qUVLD8+38Sl2wydzCBjkNEoKOlcRZLM1POtolqUWCRsbrOj3sAVJWYpk2 +CZPirFMiS+OyNv6j+iTEDBuurdtOoerfsrEDNBK6lo8wHmD3D3Vf7t6Cx5sD +v2dib607Vt9uQkLqs/dxsdh9gUUqT4AEK8K00hp7pdtxwwpLEt5Qu11MsE3p +O+1LrHB/wrQDG7EvKfYczd1Jgs+/blUy2JXLHiRl2ZLwuCN9hQh27/jxu9ft +SXAxL3z504xCJi/l3l90IiFfTTdxAJtZ0jOSyCBhJij93Bfsi+kPBE47k/Dv +6Y75Vuye0F36kW4kDBXdV3uGLeEtb3PYg4TBjJ0fK5fydvV6HfQk4aVg0c/i +pefXnTjv7UPC9FjH37ewK0Vtb7kxSdDdkz51YylvRr6KQZBwfEjn9eWlvG+9 +zfYkCXV5ceJJS3mc4oEd/iQIn77z+NxSfRUnfsFBEqQDUj8lLOXfsl21LZCE +pwxb1qml/IsKGw2DSZjY0uh+Yik/qs9i82ESCGH5J0exxYkSN+1QEl7X6lyM +xDbeHROiEY773bfiTdhS/la7M8qR+HtqKAk7gn1Ba3WGQhQJJis1z4Vgl0v1 +l0ofI+Gmho9EMPa3nyVvxKJJ8BQifwUu5Q/GfBOKIeF3saHHko1a7X4sxpIg +pdWsseT/A9foACg= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10549,107 +10762,105 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1Hk4VdsbB3BDKEOmkETGukS5R6aS9XJImdKJDCHO2WejDGW6KlEht/Ga +mm6mihISkbGkq0E5IZTql8i4Tcd0JFJ+yx/72c/nWWt/9/uutddWY4Yw2AJ8 +fHwUvpbuR5o2bahoaTK3GJF+Wvmeh8y5OYZMq0I0mf3i3JK7s4zSNK0eI1eP +vrEKbCfirbC4wQs0uzmYKscuiYqtF7LioFpb1rFH2Gdfrq6LzX+H+nrrb5di +V7UcyVygvUeS1klECfbw5zfRR2s+os0NDY+LsNf0a+z/Tv+CsjqCCguw7caj +TcM4XUiUG2uQh127MCwWlf8NRV1Z3JOD/eGUwvHy4F7kGDgmko3NFbYa5tH6 +kZOSrcsNbOELh90NZgdQygH5rVewVaQzGo7UUOis0N7yJGxHpe93uPRRpDuv +GhGPTWary+st56Jog7KKE9ixWrsTDnHGUcvtmuRI7I8K7X+G50+iew83ivth +Ex4HA1IvTKHLtVcKvbEn0vluPgyeRvu/HOtzwV6uric1SZtBMl9K19Cx04h6 +Gym570izSEzRFFv1rnvs5tnvaG9oT9EmbBPdM9ygmh9okZC9uRrb36iLM0xf +QC7JZVmD7TzEi4pYJrr+F/q4ztDjM/bJGjEz7eW/0cvD9EIO9jUwKfDjLCLh +H9IKxdhEboNVaD4/HDpZLhKKnf8ytfuUkgAw0vpifLEnBr2jky8IQKtj6UUn +7GidmdLiYEGwO7A9VA877YGaxjhNCCJlGa49bTz0uWW09vdtIQiTbDvfhK06 +VeGxUk4YTueJuVVjF25xTNGbFQY1ZnFFEvbzqmP8gTXLoYehmWaCPVPf1kXR +xYET0PQ8vJWHZOzFpY7XioNtBW2bG7Z+uxVImEpAoKud8Tbsg32Psv/ctBLa +JorqFt/x0GEBjv52cSm4JfN5dRx2v3rRZMJ3adiR0tkb2oLXh3yzotlABhJv +GFU6YgsUDKitPiIDKlduy+hgqxqsY+SPyMC1Pe3uXc085EFPetjULQuJHgya +FXYzKzRMoVEOXq2Tk5l9y0Nf714677NcHrKPCto1Yo+O5N++Zy0P99KOi2Zh +i4b3tm2rk4ebZ7SVrbGt4p23+DxSgJQwIuU8h4eqc4xm8rIUoWlbVz1/Iw/l +9M9Hbg1Xhibz/LjUVzy00yXxa9h9Zfh2Z+6sJ/boc9kd9weUYW9SwAYt7C05 +unKq7irA1Wna8OglXk+md6mQ+TrIGslBLS94aGq8+y8qThX44pLbpup5SDbI +qqzUQR3iXQVahp7y0ECOqL/TQXVonLrHycWu/NKiNHZGHebXFvj6Ynvae8Wt +r1OHnIh+545aXN/GSMZ1mgaoKwb51j7B7x++OxGjoAnelqlrj9bwkLOfmJ7t +Ny3wVGwJvFnOQyjSheb6Swv8XsypMbB1ErKMCcX1oFE9Fi6AzXfbwDJmz3rY +U0HwfB/x0P2v+10fPlsPAiW9HmvL8PncV3hqza0N0FI01xJTguuzcvgwzNSG +D0krauYLeEhJ/Z/Y8326oG7kdfJdFg89PsfTnhPQA+f1Eja+2J7T7u2kmh4U +/rE1cyKThzKfa2pbeuuBf7THbwlsdb/q1h8deP6ynkR6Oq6vsF+LbNwELkNl +765f4yFlJRVS1V0frBZc3k0n8ZBubrj4T0QDUU1jC+ZJHmIScTN6jjToSixd +1x2Lz5dGylcfTxps0Wy/6YUteOtB8csoGlhbOCW7xuDzkTnsnFJCA7aLxzqb +aPz/u+aToa1hAGpcyRVyUXg/zttvchPeAvsirLMDQ3joZqim0yOOIZjZbwuW +9OKhlkhkHJ9rCuP/zavm6POQmvd7R6/A7cBqMq6kL04j9mJ5kfJRgKJ9ItPR +nGmkMFIposC0hLaa1T0NSdMo3MDsS4qOFZS/PyCv6zKNmGMLDbLD1jBjddQ+ +SWEa3bcME8lqtoGPPFZkybsplMM7+KwwbRe8V6jI17o0hX5YrH77PNYOrowI +Ng5aTqFOPsHJb74OsNmXNRU/O4mC14YkndLYDXoq3Q8ciydRUUBD3eUEJ1AZ +ltlwgTmJjk0rzm4M2AO5wpMO3xQn0Yztjn2vDjDARPLtj8jGCWS6P9mif89e +OGn7O5gWO4FaFTMOPjdwhlqpokl+0wm05k7c47w/XMD+arv+2S/jqLJbx95R +Yh+I3GwaF3UeRyrtE36RY/sgxNyQefYdFxlcTi683e0Kw3fdElft5KKMZdOb +UurdwGbyUIAQZwyVW2z+nFDlDm/cDVVibMfQNeNz0gv5HiAXtkbt35ZR1Py/ +3DMGF/ZDqsnIwnvWKHrkkK55+KQnOK6N7AqdHkGTQXv5ggkvUPlzxz7qnxE0 +s0Pbn0v3BqeMDO8ogxGUN/bpR5jRASgQn5sTej+M3G7msrzEfaCOS+lGnR5G +pQ/tDggm+sCiuO2VNZuHkalS69zZOR/YniEAEoNDSKPb7/O7AF/QK7qV0Jk7 +hPrEDu1O7/WFwxODT3awh1DLJUeWjQsT9nbVZtZuGkJpUVliES1MMG6TKh6e +o9Dj2sU51i4WyC1/1sPkUEjSExINqlmwN1NjZ9JdCqmuetW89jELGDecryzc +oZA+x2G1cC0LqkW4tgHYDLP99z4+Y8HiKtdBei6F0tZGNp54zYIGm9HRX7co +tKazQLLhIwsERCJ0EjIppOmtcM1zlgVTJy8GdF+mkKkPNy9hCwFG/G6c1wkU +unN9IszRiIAXclavXLFXtU2ZK5gQ0M6wURqIpxDXerY9bxsBOW+TmgSxczby +8XMsCdgUo8Kkn6bQyllpd5k9BHBUb5i1xVCo76LhiqwgAvwlP1QbRlFozyvj +dr8QAk6P/dXR9BeFavm2ZukfIeDZGWUHf+zrYeaG/4UT0Hn+CD09kkKO7ja+ +/ccJKHDR9VweQaEqTfeqjecIKAsO2D55hEKXaqIDKu8Q8CGRVy0USKEg2lXT +qDwC6hf66wsOUcj+XskKk3wCYhwY6gxs0asD9yru4/4CrndlHaRQQqjTcHkZ +AY8nW/ejAApFa2seevQfAVX+sR6XSAodvNoY+PArAX+f1w8K9KXQrpUDZqHd +BHRdjdVUxv4jgU+C1kOAlYfpn00+FBoINbxf0k8AfdWI7Z/Yvo5ZY8WjBHB5 +prE/vSnkJhQW/GCeAMkApZEsTwrZhK05XCjPhojCEs4fbhT6L+uMbcpqNkiH +ufp8daWQGWdKM2oNG74H/+WWhq2v1fiJrsKGwlaNSH5sxY7j9P9psUHkt4pf +twuFRrZ2yosasuFTwvp1JXsp9I9A9hO/vWww6O/ozdiN+98sfs3BhQ0pebVC +Ptjx+6NCDVzZsG6T5AV17Kgypw2LHmxITR95keeI6yf5k68w2VDCi+dWOVDI +4A2TeHGEDetN2mTG7SjUkawlppHEhgW75pycnRQqQhL+VDIbxgogPRI7foz3 +/H4qG2xqV43sxKbteh5jcpUNlVW9l7g2eP/4WFMOmWx4y141vh17R0j2p6hC +Njw1OSE9Zk0hZeW/jcyL2MBgzMQ8x+a9CUkVLGaDtWcjPR371nrkcKmUDbqa +SW322L86O+tuV7PB41O42EMrCpXZK+U1NbBhiBny5QKdQufnBYTS3rChyu7O +0wBsZt6wrzuHDWHTRvM7sKWWVSv1NbNBL5GIEMAOrHH7Z+4DG4wVhuNOWFJI +Q+dKpGY/GyxPHOKPt6DQfMeJtqEB3G+ougeJ3ZLA1n9AseH4uc2iu7Bjvm0Z +Nh1lQ4G93WFJ7M/X2rx2T7OBFh3nnA0UShGRtj7GT8KpiMboVoT/B1Od+8MF +SbBIVDpZgT3YmR8aLETCuf+ZTaRjm5VZZTNXkCDmNSUfgD3gE/XTVpqEjyHq +McLYUvbWMtayJPzY9n2Qa06hbcYy2kiOBHrC9doO7CSJwn0GiiQU1Do8zF8a +r+4qUVLD8+38Sl2wydzCBjkNEoKOlcRZLM1POtolqUWCRsbrOj3sAVJWYpk2 +CZPirFMiS+OyNv6j+iTEDBuurdtOoerfsrEDNBK6lo8wHmD3D3Vf7t6Cx5sD +v2dib607Vt9uQkLqs/dxsdh9gUUqT4AEK8K00hp7pdtxwwpLEt5Qu11MsE3p +O+1LrHB/wrQDG7EvKfYczd1Jgs+/blUy2JXLHiRl2ZLwuCN9hQh27/jxu9ft +SXAxL3z504xCJi/l3l90IiFfTTdxAJtZ0jOSyCBhJij93Bfsi+kPBE47k/Dv +6Y75Vuye0F36kW4kDBXdV3uGLeEtb3PYg4TBjJ0fK5fydvV6HfQk4aVg0c/i +pefXnTjv7UPC9FjH37ewK0Vtb7kxSdDdkz51YylvRr6KQZBwfEjn9eWlvG+9 +zfYkCXV5ceJJS3mc4oEd/iQIn77z+NxSfRUnfsFBEqQDUj8lLOXfsl21LZCE +pwxb1qml/IsKGw2DSZjY0uh+Yik/qs9i82ESCGH5J0exxYkSN+1QEl7X6lyM +xDbeHROiEY773bfiTdhS/la7M8qR+HtqKAk7gn1Ba3WGQhQJJis1z4Vgl0v1 +l0ofI+Gmho9EMPa3nyVvxKJJ8BQifwUu5Q/GfBOKIeF3saHHko1a7X4sxpIg +pdWsseT/A9foACg= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.7573757838628428, 1.302178140990421}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7573757838628444}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10661,21 +10872,20 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, + "PlotRange" -> {{0, 180}, {0.7573757838628428, 1.302178140990421}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "AxesOrigin" -> {0, 0.7573757838628444}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10689,105 +10899,104 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1Hk4VdsbB3BDKEOmkETGukS5R6aS9XJImdKJDCHO2WejDGW6KlEht/Ga +mm6mihISkbGkq0E5IZTql8i4Tcd0JFJ+yx/72c/nWWt/9/uutddWY4Yw2AJ8 +fHwUvpbuR5o2bahoaTK3GJF+Wvmeh8y5OYZMq0I0mf3i3JK7s4zSNK0eI1eP +vrEKbCfirbC4wQs0uzmYKscuiYqtF7LioFpb1rFH2Gdfrq6LzX+H+nrrb5di +V7UcyVygvUeS1klECfbw5zfRR2s+os0NDY+LsNf0a+z/Tv+CsjqCCguw7caj +TcM4XUiUG2uQh127MCwWlf8NRV1Z3JOD/eGUwvHy4F7kGDgmko3NFbYa5tH6 +kZOSrcsNbOELh90NZgdQygH5rVewVaQzGo7UUOis0N7yJGxHpe93uPRRpDuv +GhGPTWary+st56Jog7KKE9ixWrsTDnHGUcvtmuRI7I8K7X+G50+iew83ivth +Ex4HA1IvTKHLtVcKvbEn0vluPgyeRvu/HOtzwV6uric1SZtBMl9K19Cx04h6 +Gym570izSEzRFFv1rnvs5tnvaG9oT9EmbBPdM9ygmh9okZC9uRrb36iLM0xf +QC7JZVmD7TzEi4pYJrr+F/q4ztDjM/bJGjEz7eW/0cvD9EIO9jUwKfDjLCLh +H9IKxdhEboNVaD4/HDpZLhKKnf8ytfuUkgAw0vpifLEnBr2jky8IQKtj6UUn +7GidmdLiYEGwO7A9VA877YGaxjhNCCJlGa49bTz0uWW09vdtIQiTbDvfhK06 +VeGxUk4YTueJuVVjF25xTNGbFQY1ZnFFEvbzqmP8gTXLoYehmWaCPVPf1kXR +xYET0PQ8vJWHZOzFpY7XioNtBW2bG7Z+uxVImEpAoKud8Tbsg32Psv/ctBLa +JorqFt/x0GEBjv52cSm4JfN5dRx2v3rRZMJ3adiR0tkb2oLXh3yzotlABhJv +GFU6YgsUDKitPiIDKlduy+hgqxqsY+SPyMC1Pe3uXc085EFPetjULQuJHgya +FXYzKzRMoVEOXq2Tk5l9y0Nf714677NcHrKPCto1Yo+O5N++Zy0P99KOi2Zh +i4b3tm2rk4ebZ7SVrbGt4p23+DxSgJQwIuU8h4eqc4xm8rIUoWlbVz1/Iw/l +9M9Hbg1Xhibz/LjUVzy00yXxa9h9Zfh2Z+6sJ/boc9kd9weUYW9SwAYt7C05 +unKq7irA1Wna8OglXk+md6mQ+TrIGslBLS94aGq8+y8qThX44pLbpup5SDbI +qqzUQR3iXQVahp7y0ECOqL/TQXVonLrHycWu/NKiNHZGHebXFvj6Ynvae8Wt +r1OHnIh+545aXN/GSMZ1mgaoKwb51j7B7x++OxGjoAnelqlrj9bwkLOfmJ7t +Ny3wVGwJvFnOQyjSheb6Swv8XsypMbB1ErKMCcX1oFE9Fi6AzXfbwDJmz3rY +U0HwfB/x0P2v+10fPlsPAiW9HmvL8PncV3hqza0N0FI01xJTguuzcvgwzNSG +D0krauYLeEhJ/Z/Y8326oG7kdfJdFg89PsfTnhPQA+f1Eja+2J7T7u2kmh4U +/rE1cyKThzKfa2pbeuuBf7THbwlsdb/q1h8deP6ynkR6Oq6vsF+LbNwELkNl +765f4yFlJRVS1V0frBZc3k0n8ZBubrj4T0QDUU1jC+ZJHmIScTN6jjToSixd +1x2Lz5dGylcfTxps0Wy/6YUteOtB8csoGlhbOCW7xuDzkTnsnFJCA7aLxzqb +aPz/u+aToa1hAGpcyRVyUXg/zttvchPeAvsirLMDQ3joZqim0yOOIZjZbwuW +9OKhlkhkHJ9rCuP/zavm6POQmvd7R6/A7cBqMq6kL04j9mJ5kfJRgKJ9ItPR +nGmkMFIposC0hLaa1T0NSdMo3MDsS4qOFZS/PyCv6zKNmGMLDbLD1jBjddQ+ +SWEa3bcME8lqtoGPPFZkybsplMM7+KwwbRe8V6jI17o0hX5YrH77PNYOrowI +Ng5aTqFOPsHJb74OsNmXNRU/O4mC14YkndLYDXoq3Q8ciydRUUBD3eUEJ1AZ +ltlwgTmJjk0rzm4M2AO5wpMO3xQn0Yztjn2vDjDARPLtj8jGCWS6P9mif89e +OGn7O5gWO4FaFTMOPjdwhlqpokl+0wm05k7c47w/XMD+arv+2S/jqLJbx95R +Yh+I3GwaF3UeRyrtE36RY/sgxNyQefYdFxlcTi683e0Kw3fdElft5KKMZdOb +UurdwGbyUIAQZwyVW2z+nFDlDm/cDVVibMfQNeNz0gv5HiAXtkbt35ZR1Py/ +3DMGF/ZDqsnIwnvWKHrkkK55+KQnOK6N7AqdHkGTQXv5ggkvUPlzxz7qnxE0 +s0Pbn0v3BqeMDO8ogxGUN/bpR5jRASgQn5sTej+M3G7msrzEfaCOS+lGnR5G +pQ/tDggm+sCiuO2VNZuHkalS69zZOR/YniEAEoNDSKPb7/O7AF/QK7qV0Jk7 +hPrEDu1O7/WFwxODT3awh1DLJUeWjQsT9nbVZtZuGkJpUVliES1MMG6TKh6e +o9Dj2sU51i4WyC1/1sPkUEjSExINqlmwN1NjZ9JdCqmuetW89jELGDecryzc +oZA+x2G1cC0LqkW4tgHYDLP99z4+Y8HiKtdBei6F0tZGNp54zYIGm9HRX7co +tKazQLLhIwsERCJ0EjIppOmtcM1zlgVTJy8GdF+mkKkPNy9hCwFG/G6c1wkU +unN9IszRiIAXclavXLFXtU2ZK5gQ0M6wURqIpxDXerY9bxsBOW+TmgSxczby +8XMsCdgUo8Kkn6bQyllpd5k9BHBUb5i1xVCo76LhiqwgAvwlP1QbRlFozyvj +dr8QAk6P/dXR9BeFavm2ZukfIeDZGWUHf+zrYeaG/4UT0Hn+CD09kkKO7ja+ +/ccJKHDR9VweQaEqTfeqjecIKAsO2D55hEKXaqIDKu8Q8CGRVy0USKEg2lXT +qDwC6hf66wsOUcj+XskKk3wCYhwY6gxs0asD9yru4/4CrndlHaRQQqjTcHkZ +AY8nW/ejAApFa2seevQfAVX+sR6XSAodvNoY+PArAX+f1w8K9KXQrpUDZqHd +BHRdjdVUxv4jgU+C1kOAlYfpn00+FBoINbxf0k8AfdWI7Z/Yvo5ZY8WjBHB5 +prE/vSnkJhQW/GCeAMkApZEsTwrZhK05XCjPhojCEs4fbhT6L+uMbcpqNkiH +ufp8daWQGWdKM2oNG74H/+WWhq2v1fiJrsKGwlaNSH5sxY7j9P9psUHkt4pf +twuFRrZ2yosasuFTwvp1JXsp9I9A9hO/vWww6O/ozdiN+98sfs3BhQ0pebVC +Ptjx+6NCDVzZsG6T5AV17Kgypw2LHmxITR95keeI6yf5k68w2VDCi+dWOVDI +4A2TeHGEDetN2mTG7SjUkawlppHEhgW75pycnRQqQhL+VDIbxgogPRI7foz3 +/H4qG2xqV43sxKbteh5jcpUNlVW9l7g2eP/4WFMOmWx4y141vh17R0j2p6hC +Njw1OSE9Zk0hZeW/jcyL2MBgzMQ8x+a9CUkVLGaDtWcjPR371nrkcKmUDbqa +SW322L86O+tuV7PB41O42EMrCpXZK+U1NbBhiBny5QKdQufnBYTS3rChyu7O +0wBsZt6wrzuHDWHTRvM7sKWWVSv1NbNBL5GIEMAOrHH7Z+4DG4wVhuNOWFJI +Q+dKpGY/GyxPHOKPt6DQfMeJtqEB3G+ougeJ3ZLA1n9AseH4uc2iu7Bjvm0Z +Nh1lQ4G93WFJ7M/X2rx2T7OBFh3nnA0UShGRtj7GT8KpiMboVoT/B1Od+8MF +SbBIVDpZgT3YmR8aLETCuf+ZTaRjm5VZZTNXkCDmNSUfgD3gE/XTVpqEjyHq +McLYUvbWMtayJPzY9n2Qa06hbcYy2kiOBHrC9doO7CSJwn0GiiQU1Do8zF8a +r+4qUVLD8+38Sl2wydzCBjkNEoKOlcRZLM1POtolqUWCRsbrOj3sAVJWYpk2 +CZPirFMiS+OyNv6j+iTEDBuurdtOoerfsrEDNBK6lo8wHmD3D3Vf7t6Cx5sD +v2dib607Vt9uQkLqs/dxsdh9gUUqT4AEK8K00hp7pdtxwwpLEt5Qu11MsE3p +O+1LrHB/wrQDG7EvKfYczd1Jgs+/blUy2JXLHiRl2ZLwuCN9hQh27/jxu9ft +SXAxL3z504xCJi/l3l90IiFfTTdxAJtZ0jOSyCBhJij93Bfsi+kPBE47k/Dv +6Y75Vuye0F36kW4kDBXdV3uGLeEtb3PYg4TBjJ0fK5fydvV6HfQk4aVg0c/i +pefXnTjv7UPC9FjH37ewK0Vtb7kxSdDdkz51YylvRr6KQZBwfEjn9eWlvG+9 +zfYkCXV5ceJJS3mc4oEd/iQIn77z+NxSfRUnfsFBEqQDUj8lLOXfsl21LZCE +pwxb1qml/IsKGw2DSZjY0uh+Yik/qs9i82ESCGH5J0exxYkSN+1QEl7X6lyM +xDbeHROiEY773bfiTdhS/la7M8qR+HtqKAk7gn1Ba3WGQhQJJis1z4Vgl0v1 +l0ofI+Gmho9EMPa3nyVvxKJJ8BQifwUu5Q/GfBOKIeF3saHHko1a7X4sxpIg +pdWsseT/A9foACg= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.7573757838628428, 1.302178140990421}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7573757838628444}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10797,7 +11006,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.4834141591801878}, + AxesOrigin->{0, 0.7573757838628444}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10825,7 +11035,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7573757838628428, 1.302178140990421}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10833,9 +11044,9 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913460797739086`*^9}, + CellChangeTimes->{3.9913460797739086`*^9, 3.994359122773506*^9}, CellLabel-> - "Out[443]=",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] + "Out[118]=",ExpressionUUID->"35e9d865-e063-4705-b00b-554ab91fa99b"] }, Open ]], Cell[CellGroupData[{ @@ -10898,207 +11109,227 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918502644064465`*^9, - 3.9918502684162617`*^9}},ExpressionUUID->"42ddbf41-0bd8-b749-bead-\ -56c89a9b7467"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7282513679946418`*^-262\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 444, - 477, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080016945*^9}, + CellChangeTimes->{{3.9918502644064465`*^9, 3.9918502684162617`*^9}}, CellLabel-> - "During evaluation of \ -In[444]:=",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], + "In[119]:=",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.1421038932835147`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"6.404979938780776`*^-269\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 444, 478, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080026985*^9}, + 119, 129, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994359122854348*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], +In[119]:=",ExpressionUUID->"9d6d9519-bf0d-40c6-b5c4-42392ef64cf1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.655058850000931`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1988876453360011`*^-279\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 444, 479, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913460800358925`*^9}, + 2, 119, 130, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.9943591228588943`*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], +In[119]:=",ExpressionUUID->"84589396-e48a-4353-963d-66a825c450ee"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.244084446598447`*^-290\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 119, 131, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994359122864193*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"3c9781ed-3658-433d-99cb-cc71727ed007"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 444, 480, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080043894*^9}, +during this calculation.\"", 2, 119, 132, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994359122869924*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], +In[119]:=",ExpressionUUID->"1d86076f-6c02-46b6-bc28-2a4b9d8c3f57"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk4lF8bx5UWKrIOM/ZCZck6g2Hmvq3ZQoQSJUuJkAiRKNJiCSlS2ZKE +FGEmRKEiihCKVBSSip+1hPd5/3quz3XOee71e58j4+Zv67mSg4Pj+QoOjv9/ +ZweaG2Xj8piqVGrA4A0bZlem6En93rMgLn/5fnLodkDhNjfR3hS4xzv8zjSU +CcE2hT2cvbmwhv59kSfUCvh/iaT86SkDL0O/wWsh++FTjZX/dE89cDgez5s+ +4QcmsmMfJ3s6wHw45NpF/9Pwp0fr6kTPIMjQxZ3/2CdCg+HdvLe5UyD3z0/y +p3wWiH96POymtAiqk+FuxbfyQejogcK1hpy4Z1DQQ/2/YkhRM6m2sudCi9wX +7CdRpaDSt3cHw4sL23X8k7bFlUJrjG+nYjgXNhiqxCVeLYU1vak/uHK4UEF5 +70fDwlIIPz0k1jDOhTtw7a19naXg0RJ1SiuGGxPnJAf0ZMuA5lnNkH60Djn5 +ZedKn5ZBJ29bM++LdSiYvtZH71UZHGMP2i/2rkOKV/Wdus4yKFy/zu/D0jos +ntLzfDhcBlJlezJTzdejUKbZc/qGR8C1PLPENbge1808/zhh/wjep6s+neTj +QY6mFWs6hh5BRmfRxmA5HrRpqePb9vMROPFuOfBXhwfJ6c9MQ2YfQX+0xNJK +dx58UXGQ9oerHD77rdMTquDBU4W0+hTlchg1+sqi7eXF0KvxZyknymF+Iu1B +eM5GjCh3V/ZdLIfHioLLyxUb8frLI0fvrK6AsEOJVjGvNmLZ04wrXTwV8K8v +5mf81EZc7ZdwRUSyAqKG2MJtm/iQcilZQZVZATFv7th9DuLDXW2MXYWnKiAu +L7JtJZkfB9ZHV7L/qwBzzSMCwpv50V5CRqHwTwVwNdrab1Hmx9VGoQ9TOCoh +Zkiuz0KfH9+Ytk2a8lbCqU2tw6lH+PHj3z4V822V4JctuiRfxY8VhW/+y3Sp +hF03S5Us9gmgU2Dh1YS6SuBTuuHv4imARttUJVyfV8Kb6pgyf38BTCvPyd/W +UgnmfY7aqdECmBHBqs3prgQDypLhxyIBLHzyj0P+ZyVoppvv8/8ngBPxji2n +RVkgkjp08cotQfRMOnf5uBcLRBUrYubzBTFZAsa6jrKAUh8b6fJQEDnTQ0NU +AlggObHtxJYGQeQYMFB8fZIFcpbHXKtHBTGUc/Waokss0Fi1SBvSEMJZ28hV +k4Us0LzxRs2UIYQnbLe87C5hAU09W+m+iRCmX0t5Xl7GArqr4aaQvUK4ajo1 +dG8VC/RrLvKsjxTCJ3+dW42bWWAdRPqq/org14ufC7+xwGb96EBapxBmxbXW +Cn1ngW3u4/f/+oXQ/Gzdt+BxFji0O7e9+C2EM0VzArJTLHBRul3lJCyMVvo9 +azZxsMHnq0ryWVdh7Lc5b3BflA1Hw1fEjxwRRsUAtspNMTb4CXTGWgYKo7OB +f0i0JBuOY/ApUqww5vlYi+nKsuHkzZrDhUXC6Gnd32Olwobzu82YHbPCKLX0 +1pTbiA2U8jeUlStIeIR/reYjEzaUCO6eU1tPQr/kcvpuMzZ0d+x/mCxFwlSz +HznhVmyQ3RW0aZcpCeV5uXlc97CB/fDPUpQtCbfek+RucGKDJV9k30NnEn7h +EVGVcGFDYNvFVL4AEuowX6xhHWRD/c6sNe3XSbius4PvjDcbHO7LDi3fJiHX +08u3bh1lw9iGwjqVEhJmUAc8S/3YwN9aHnq5noRFg99Ka4+zwdX81ZjVDxJa +hD84cSyMDYsmM29e64ng+bHiYvULbEjKDytaNBHBzXOLKxovEv6u4bigvEsE +OVt+sSzjCP+er9NP8BTBwZ03rI0S2ZBhKP3IMlEER6LTglqvsGH77TuXT6WL +oL4TQ5h8lfB3peLR4lwRVH7cqeByjQ3fn1HlNrBEMD7Ttq4lnQ3aaJHW8olg +Q4leg1tsaM1qD1z4LoLVekXeFpmEv8v2NorTIkj2zjlvkUXkv9aVO45LFEf4 +e33Uc4j8Sw5/qxIQReOEYm1yLpH/CJ/6MXFRzKHx35gjuFsvONxcTRTze4YU +b+SxwfvmgmOYriiOqnG7ut4h4l+I0iw0FkUIUaZK5BPxVsf95HYSRanr/G8i +7hL1ofC/0vEQRS92UZpMARF/2LX8I37EOv7heUJwoE7Ogeazoujpk7Kh7x4b +zLN5py3iRZH9olfFvpANm9aeuvDmqih2xI2INRH8x/e7+K4sUYyLonVqFLGh +vcuhtLNAFGsycU86wQW6jcYOZaJowB9zf4bgyFy1D73VorioevadRTFRb+4s +v33PRfHPmbqODIK3H9vAOfBGFK0eNtwdJHh1z8k0117ifALZcfN9NvQzRhSH +voii2QbrIWeCy/N2P/X8IYpzMGN1meC49fW7R6dFUcAx+2YVwW7HVb57L4li +0vWRNwME09/fjPi5loxxnp6jCwTz4zqBY/xkNFBi/eAvYcNofkj+fxQySvpH +9EkTXMfzjX5ClowZNfuqthJ8Lci2bU6ZjDvuz1/aRrBfX517mBYZqz4vWm8m +2NhAef4fkjHpr8gGEsHi9zLiI83JaJ01+2wFwdMbuWRW7iaja4Bl0DBhvyX4 +REWMCxl5eNvkGgnO/ThotvYwGXet03qfQfBJI5uBi8fIOPIbkr0Jtil6cnxD +GBll6QU2GgRvFVBcezmajEO2apQZIl/Loek3+BPIGH45a+IBwd2fVqumXiNj +unJVtzvBJSaBjaRsMm6zsWjjI9hZyOqn2CMyUklcnA5EfTTCq89k1pBx0qXb +8BdR33WDW0kyL8gYdtQ1N5Lgxw84Qf49GQV9NjQmEP2RRAroLBgk4/r7I/Hr +CPaKGDisOE7GvXaTp6OIfiJZPE5SXSZjiaLMmCPRfz9L5eUecVFwaZ505DHR +n42iqY+pAhT87fRBXIjgwGG/QbocBW8Ynt9eQfR3+xlZTWMLCu53gJ35hD7u +jiY3vdxNwUjt3c/fZrPhtPWys/l+Cupkz12cJfSkLPHhnHUABYNEFlcpEXq7 +xL7cszeNgjuTKSI7MthwUGrRpz+bglnLBaaM64ReY705DhRS0O6+yiclQr8j +dsbbPJ5QcLVz3I55Qu9Gv/+G+Q1R8FdjmzMmE/UwTVV4Nk7Bx8FnXLmSiHzm +KH8QnKXgNeONm18R80N0t6vOYy4xXLrEmqDHs2Gc/XyOc7sYfs86s7Ijlg1X +ziYFXQ8Vw/NC7vd6iXnV1LdNdvyMGO6LjljDPMmGf5oNncw4Mbx+0dbuVggb +Do3MqH+9JYajWiVNZkFE/1rum9zeIIaOQYphTr5sGBSW92vkEUfBmZZal/1s +EPGvkxARIbjsvxR3Z0LfTXteH5EWx3aphovuxDyuDItT2qghjl6XXMd3ORD5 ++TQxtnePOA4NTn4e3ckG9XvVh3/niuM+5fNeK/XYcEZv10GKtgRKX3trvyDI +BtP9mf9pGUjgiVfyDH5+NvBG/Yi2t5RA3hU11dK8bLjZcC4/yVUCDxXuTlLi +IuaNedWPNRcl0LU3SHB+gQUTezYHT72XwJXUO0fcBlmw/8TMpdZwSXyysPDn +NnHfyqUZiI+dk0R23tbTM/ksIn+X769NkkSuHbcU9G+zIOzftnaDPEls+zHB ++/IGC65G7xd+3CqJU0+unk+IZ0Fr8susOxJS2HRTxobbl7ifS66Xn66Twmd2 +lYyP21hg1PNm8VeTFPaIFqxukmOBFceqHQc6pDA8OZteIsMCd1u/9/BNCjdN +0BeOkllgEi4TGbVaGlHW1qiciwXHpGZv6ytKo1eGtJvvcCU0Hs762RAsjWld +fJZ3Mivh6PxkVBOPDJbCGWtuzkqgBxwiDQvIYDp/fHDUIvGeGvtQxCkqg3Uv +Dx2emquAO30N3cxNMigS9q6qdbwCBmqvKlXQZPDtlfTKnd0VYH1OpzfngAzu +N/YKSCioAHWBMyrhpTJ4V9n78BbzCvijyDegbL8JRwUn8j+dLQe9ouLsa9c2 +46d7Ca/0+8pgUsDc1aFeFmt/6e98RiuFr/GuDsfXyiPzn6pb7/MSMPsdYvaN +tgUz2pN/7XItgnF3rsDyyK24w6DgSt6bu8R7X2Tl+fpteHXTy/zvEXkg8Fo+ +8eFvBYyceC24KTMHxC88sKHRlPAU85lDRMItSFfU4RM8rIxPP7XNNLamwyuK +PnUqeTui9jEp16JUoIvXJ6l0q2C4eu+A+fMk4OXMDTp4VhV3kAefZlnFwZo/ +dXaTMaroEtnBy6LGwdKvj+pnzqviis0nfn8Sj4PfH8iT2fGqeLKWbH3oxyVo +L0v2/XxNFb/7d3UYXbwEKW5nDh0oUsVZap6mYdNFINW77nHpUkWFuNP1JLsL +IHlGSm+vvBrGKF33SMs4ByWBXJs+blXD89UDvczYc8A8NLn2oKIaJsVMp8wE +nAMXi4ZOL1U1TBkdqkkyOwc3hQ/7hNLV0KI8Uy7iTwyQC0sy0qzU0HVKRn2r +cwwIdTL+vAtWwyPBqfzXlKKBW8650valGtYnTdcazEeBNxnMi5rV8FloMk/e +aBS84tk0wNmqhmmmXBT+91EQPzuyuqJdDc2erbLnrYoC3qZAe5EPatg596Ak +9VQUCPjETfeNq6Egu7ylhTMKxEur1D0F1PFAydhcEPU0bGeQH4S4qKPr8pmq +7I4weLT5yMJKV3XsLvliU1UZBtrrHu9IdFPHmmYlvvGMMDDo2fM577A6nv3N ++ybNPQwcAtL5OwLUseuh8l3e2ZMQeUckSClWHd8VZ3QflToJ7TwknS8l6njb +Pb4vOjoEjg8INJhzaOBCznjhWEIQNL1wflK4UgMrN2Qpk04GgeSDfNa61RoY +4zGbYucRBK8i6cWvuDXwBjW5h1M3CDbJuF01F9TAPXvWr9X5Hghv3UsPm8tr +YMujvMUfpoGg+t16g7mlBjJ+cg7JCh+H31Px9mbpGmgk5PPga40/9PfmONzK +0MBAAzte2Zv+8OpJpePkTQ3UH4kPjQr3h7zzn/dez9HAYwuvJZPo/uAkprn/ +e6EGqrdsjOaq8oPnBn2HLj7RQCGRLyaWtb5wI3lbaPOgBm69rCl3rc8HLgQz +T0p808Av+dvv2tT6QPA+u7CAEQ3sVwt6JpfjAzZyEafI4xqYbhN1XOqwD6x5 +3B51ZEYDVeiFpVbT3hDwOeQiN5cm3hZJJMULesMOlRcZZsqa+LyE9mDZwwv2 +rDHd3a6iiQvSny+XmnqB98dmHkd1Tbz16eyKKCUvSIx7HeWhpYnuJBPd49OH +oXuk61CkviZK90LMvXOHwSN7SL3CXhNtE8/5Wt8/BGf5V7RIn9bEc16ja/v4 +PCF19GzM3ShNDORvEZua84D8ulXM7dGamPuJNiX7yQNe+XKV6l7QxMU07mvv +7nsA/6uNaQ4pmujD99ray9IDss9Kusfna+KJRlI/JrpD7ZTuwtwbTeyZ/75W +UdYNclpZbnZvCf9dEpyaNrpBzB2NVyWdmpjx0bjr5MJBMHNUvO7Zq4mqlw4v +iHYehK4qilbnF02MszhjbRJ9EMbO/DleMq2Jpov236xGXIHExxrzoFDxtmNn +gU34Afgzqm77VJyKHoO1ww6OB6D/WcljMSkqKte6njqjcQByAvMvdGymIkXh +kabh+H5Q6rkqj8pU3Ow6G3viwH4wyAxyE0MqnkuT3xNu6QJ+Suof3npSMaS1 +IUEP98GJOcrfA15UnJ/6oTYusQ9O1XNSfnlTcf9Ve2r9ghPE7Xm3d90xKlLX +DDR/ZjlBQUzoe4MwKr5dW8n8quYEg/21vY8SqRg+vc/6m9JecEiw6LnKomJL +wIXmfoYjuOzRnNtcRUUjz8B9QtKO4LFZQqSshopL3pf/+q50hMDHvxzePKNi +lfCR/tiXDpD0Lbl7TSsVK5iQbmHnAK8Yve9CPhP+J9rHrQqwB8Yvj6693DQ8 +ww08Do12QKrekVuznoZqg1H8xsV28Ou8wjEpXhpunlB0tEq1g0yZifXfBGiY +ENBp9MDDDpZ2hxseE6fhs9y3y3fX2EFddXJZrAqxX+Tj5wPWtqB/sTbpkT0N +m0dz6UZTNkBxyNlP2kNDu64g450DNvDfphilk040vDdJv+3bbAO5NWZNzAM0 +3K61Y2kqywZWTnQtN3vRcPed041CVjbQ4PDD73M4DVUDWaXyLtZgLCu6kyeX +hnO0yND+ZUso//lcxiOPhirllsly/ZYgywqcrcqnoXGe8oFrbEtYZd6W5VVE +Q+1YkTO/Aiyh3j/2v4ZyGlY2B5QHDVsAs3o6LewlDU3dpn6zus2BZvt2cGSc +hrV+co6inaaQLxbJYv6m4ZbObXx85aYg/E0p/uokDb3KUscVrprCdMgFquEs +DfW+tsY0O5pC2S24kLlMw6s+FN/8gR2g8v2+sr2AFjKH28ye/WcCW6MuhdZr +aeHly9JbUzSMoUb3zmpLuhZ6zU46HiYZg81cXco7PS3c0Z665PrHCEL9ZopH +9bXQuNyB71mdETQ5u37htdTCke89P1WsjMBLh2a+z1ULtf0+GecHGMK9/76I +TV8g1sd2Goy91Qdmyb+CiDgt/Hus0pvzsT50HBGhrU3UQou3q3fqZevD38+W +NpQrWlgyef/hBn99MG9jxeAtLTSVYQnJ8urDWFHCz/hS4nyy4VNeWwQFT506 +uQ+Ev8YWt1o+MeDyJqu/0f1a2DoVS9JhM2D6kxt1cEALT58WjupOYkCtU3xR +5pAWZskJO2QbMMDW5lOayE/C/tKWE94FenBS99wxbg5tjBqttS0+pQtN/G9l +fspp4/u+yKOJJjqg3PbN2WKrNgaKvQy7LqsDKfF/0+4paOPf7hUH3qzUAee1 +sryHVLTRtDN+srxOG37/C/47oK2NJgFj+sd0tYE0Kt7ZbqGN7lvWq4fStcCz +1iumPEAbhauejWbYU+GX71iIcZA2+q3RmJWgUSFU4qhPd7A2nn9tV9dCosKl +U/628+HaqHB+tjy/VxMe0oOl9WK1cY97U9zu/ZrwrzK6piFDG09J3ol1D9CA +lAeZ0x0N2rjoXuE6W64G4gekR91faOOlDn/VYxlqcIc3t2+6SRublaVyeaPU +gO17p570Rht9llwr2BZq8FGxOMmpVxsTc9WKa76qwtaCx0qD49q4PmB4yVlC +FeqyuzwmhXXQJ6B9VZ61Mny2lDkQLKqDgTFfFYY3KwPHH9+9CxQdTNiZf9dj +XgkMdq21Wi2tg8N2SaHCuUrwYgVdi6ygg6R1VruY84rQ6pbFrc/UwYFd4Q+P +PlCAD7LeJUmHdPBmhEaP+Y6tsNBeWSB8RAfNxMT54zdtBfEIztsZPsT/U0s6 +OJa2gMu7m2l5xwj7N14PR1dsgc/n2qLYYTp40LhR+7v8FhgZ1rT7nKiDz9V5 +MucF5GG6YHlOhaWDkgynByd5ZWHYwST74mMdXNPI5q2f3Ay9qxJMh6p18Lqv +yy3Vd5uh2pVy/dpTHdSQqrwceXMznBWl0hebifNlvC8+KW0Gvgvep17162Ch +GXnV2d2bQOnwOw7PlXQcfZ/VL1YrDZLC4vdqV9ExQUlSveuONPA1uO0SXUsn +7sN4i/sJ0jAlOZHTsp6OvQmvtz5zkYaq7nWG6sJ0FAjfsbd7SQpMTfDc8hY6 +eg1ItFokS4K7XBF3xk46ppCqgxyGxCDs+X5veRs6JnvTX09UikGSp0BLmS0d +J5qub3h9SQxq7pyMb3Gko6DX2/dmGmIgJG+6cfEgHS8us/6an6fAC/lvQq7B +dNQ0MyRL6ZJBYauUtHwWHdvz9HXr20iATR1RZTl0/O9GdvVUIQkcvGK/MPPo +GHjble0cS4Logp+5jvfoaNP4bqqTQYL+rTVyFx/RUfEvScb6gTAkbturOP6S +sDcR+492UwgmFa7QyibouLvtdUnXDQHobUVjwSk6Zvy4dMEnUgCe+v2yC5qh +Y/2Wkn8K7gKQWGYWQPtLx4gHRwc2KQqAAp2juIpTF7Pbo55M1PCDm5mvTANJ +F8nmTI+eET7oOrxjQ5eeLt7k36D3pYwXqrlnKFTQxaE1Ucn+0byQW5S77Zq+ +LpakqhYY7OaFY78XTfaY6GKoxr57FbM8wBNSfqbfWhc11t/hfM7kAZNYmbmv +brpIHWx8Tu9bD+y8hS8zF3Tx9rbut3KG3EAzDJozj9PFvafmD3iJc0PFl/EN +2Qm6+MHrWtXgDBeUSQ5omafoolLBi6KIe1xQnP40IfOGLn6LkPU3EuSC7Phz +OjtKdPHd9Vq57ok1cDFoY3J6py7anCv2kOlYBVyCF/J/vtPFWqMXfZ2lqyC2 +lKPGoFcXe/ZJh1Ykr4KYX5PD4/26hJ6tZVbbroLTXl16+sO6OKXwzqKtixOO +O18f/T6vi3dNgkt7B1eCk9Fm1JXUw9MZ/hXiUitgsYuLt0Ga4LPJ1nMrVkC2 +568+88166B2XWsDxjQOGYx+HOG3VQ0/TmKjMIg443mz94KS6Hg4nFjGW6Rxw +yeqUJNtED4P81NI1GpeYVXve/dP0J/b/VTn/PmuB6fK96lVNgB7OqW9ZYhxb +YHKEZacbBemhXgHnl9+4wDS54aO5+6QeepXsFKYP/WV2fFxxNDBaD9eQPpzf +p/iXOea2va80TQ9bT+yT8m+eZ4r5nn+8/ake8gQaG3zUmWUmLh+ixtXrodDz +I873hWeZK1NMSkca9TC3zUi2YnKGOVa5+l52sx6G1+lGeBfOMKs4YtIFOgn7 +bZzF7pIzTKfUqJDZb3q4o9aPz5JvmplefZJau56B38wf6Y+R/2NusNpbSuFl +YEnm6fvi/yaZUZ+1lUP4GFitdu5CxMAk02v1vKyqMAObvW9FNN+eZGpZBwvl +SjJwXachf7TqJLN78PjUOTUGGg199zW0nWAKrztautORgYXugRdOe/9k5hlG +hE3sZaB3zSaO9xo/meoRiYZXnBk43Pnm3pXFcabVxMN3vQcZmBOaJLolZZwZ +2z3zx/0oA4Nf3GNW1P1gzudGGoSdYeDk97nEUcUx5gfdK535RQy0bz+0557R +CNPrRN5NsxIGMibaR0ZER5izJRWe4w8ZKPar41LQz2GmwKbeObVKBn7wT+QI +ThtmWnBJiD95ykDWw4aL639/Y9Z05Xt0vmPgyB1mmkDxV6Y5L1s5uJeBdvxi +ZbMxX5m9O5pnRfsY2Jeqxiuz/ytzuurHhf2fGfgqsPmBCf9XpnKO6v3vYwzU +tnZsbgobYtZ80A+O/8lAeVoSucN+iGkuZAcqEwx8tF2VW1JtiHno/Im3QTMM +POKpznlqdJA5/TQ2Q2SegcvFacoJjYPMs3/T3Kv+MjCP4qX1KXuQyad5T8ll +kYFKdJeygIhBZqZv1czyMgPVOgdUjZwGmf8Dp23ESw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -11112,166 +11343,182 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwVlnk4lF8bx5UWKrIOM/ZCZck6g2Hmvq3ZQoQSJUuJkAiRKNJiCSlS2ZKE +FGEmRKEiihCKVBSSip+1hPd5/3quz3XOee71e58j4+Zv67mSg4Pj+QoOjv9/ +ZweaG2Xj8piqVGrA4A0bZlem6En93rMgLn/5fnLodkDhNjfR3hS4xzv8zjSU +CcE2hT2cvbmwhv59kSfUCvh/iaT86SkDL0O/wWsh++FTjZX/dE89cDgez5s+ +4QcmsmMfJ3s6wHw45NpF/9Pwp0fr6kTPIMjQxZ3/2CdCg+HdvLe5UyD3z0/y +p3wWiH96POymtAiqk+FuxbfyQejogcK1hpy4Z1DQQ/2/YkhRM6m2sudCi9wX +7CdRpaDSt3cHw4sL23X8k7bFlUJrjG+nYjgXNhiqxCVeLYU1vak/uHK4UEF5 +70fDwlIIPz0k1jDOhTtw7a19naXg0RJ1SiuGGxPnJAf0ZMuA5lnNkH60Djn5 +ZedKn5ZBJ29bM++LdSiYvtZH71UZHGMP2i/2rkOKV/Wdus4yKFy/zu/D0jos +ntLzfDhcBlJlezJTzdejUKbZc/qGR8C1PLPENbge1808/zhh/wjep6s+neTj +QY6mFWs6hh5BRmfRxmA5HrRpqePb9vMROPFuOfBXhwfJ6c9MQ2YfQX+0xNJK +dx58UXGQ9oerHD77rdMTquDBU4W0+hTlchg1+sqi7eXF0KvxZyknymF+Iu1B +eM5GjCh3V/ZdLIfHioLLyxUb8frLI0fvrK6AsEOJVjGvNmLZ04wrXTwV8K8v +5mf81EZc7ZdwRUSyAqKG2MJtm/iQcilZQZVZATFv7th9DuLDXW2MXYWnKiAu +L7JtJZkfB9ZHV7L/qwBzzSMCwpv50V5CRqHwTwVwNdrab1Hmx9VGoQ9TOCoh +Zkiuz0KfH9+Ytk2a8lbCqU2tw6lH+PHj3z4V822V4JctuiRfxY8VhW/+y3Sp +hF03S5Us9gmgU2Dh1YS6SuBTuuHv4imARttUJVyfV8Kb6pgyf38BTCvPyd/W +UgnmfY7aqdECmBHBqs3prgQDypLhxyIBLHzyj0P+ZyVoppvv8/8ngBPxji2n +RVkgkjp08cotQfRMOnf5uBcLRBUrYubzBTFZAsa6jrKAUh8b6fJQEDnTQ0NU +AlggObHtxJYGQeQYMFB8fZIFcpbHXKtHBTGUc/Waokss0Fi1SBvSEMJZ28hV +k4Us0LzxRs2UIYQnbLe87C5hAU09W+m+iRCmX0t5Xl7GArqr4aaQvUK4ajo1 +dG8VC/RrLvKsjxTCJ3+dW42bWWAdRPqq/org14ufC7+xwGb96EBapxBmxbXW +Cn1ngW3u4/f/+oXQ/Gzdt+BxFji0O7e9+C2EM0VzArJTLHBRul3lJCyMVvo9 +azZxsMHnq0ryWVdh7Lc5b3BflA1Hw1fEjxwRRsUAtspNMTb4CXTGWgYKo7OB +f0i0JBuOY/ApUqww5vlYi+nKsuHkzZrDhUXC6Gnd32Olwobzu82YHbPCKLX0 +1pTbiA2U8jeUlStIeIR/reYjEzaUCO6eU1tPQr/kcvpuMzZ0d+x/mCxFwlSz +HznhVmyQ3RW0aZcpCeV5uXlc97CB/fDPUpQtCbfek+RucGKDJV9k30NnEn7h +EVGVcGFDYNvFVL4AEuowX6xhHWRD/c6sNe3XSbius4PvjDcbHO7LDi3fJiHX +08u3bh1lw9iGwjqVEhJmUAc8S/3YwN9aHnq5noRFg99Ka4+zwdX81ZjVDxJa +hD84cSyMDYsmM29e64ng+bHiYvULbEjKDytaNBHBzXOLKxovEv6u4bigvEsE +OVt+sSzjCP+er9NP8BTBwZ03rI0S2ZBhKP3IMlEER6LTglqvsGH77TuXT6WL +oL4TQ5h8lfB3peLR4lwRVH7cqeByjQ3fn1HlNrBEMD7Ttq4lnQ3aaJHW8olg +Q4leg1tsaM1qD1z4LoLVekXeFpmEv8v2NorTIkj2zjlvkUXkv9aVO45LFEf4 +e33Uc4j8Sw5/qxIQReOEYm1yLpH/CJ/6MXFRzKHx35gjuFsvONxcTRTze4YU +b+SxwfvmgmOYriiOqnG7ut4h4l+I0iw0FkUIUaZK5BPxVsf95HYSRanr/G8i +7hL1ofC/0vEQRS92UZpMARF/2LX8I37EOv7heUJwoE7Ogeazoujpk7Kh7x4b +zLN5py3iRZH9olfFvpANm9aeuvDmqih2xI2INRH8x/e7+K4sUYyLonVqFLGh +vcuhtLNAFGsycU86wQW6jcYOZaJowB9zf4bgyFy1D73VorioevadRTFRb+4s +v33PRfHPmbqODIK3H9vAOfBGFK0eNtwdJHh1z8k0117ifALZcfN9NvQzRhSH +voii2QbrIWeCy/N2P/X8IYpzMGN1meC49fW7R6dFUcAx+2YVwW7HVb57L4li +0vWRNwME09/fjPi5loxxnp6jCwTz4zqBY/xkNFBi/eAvYcNofkj+fxQySvpH +9EkTXMfzjX5ClowZNfuqthJ8Lci2bU6ZjDvuz1/aRrBfX517mBYZqz4vWm8m +2NhAef4fkjHpr8gGEsHi9zLiI83JaJ01+2wFwdMbuWRW7iaja4Bl0DBhvyX4 +REWMCxl5eNvkGgnO/ThotvYwGXet03qfQfBJI5uBi8fIOPIbkr0Jtil6cnxD +GBll6QU2GgRvFVBcezmajEO2apQZIl/Loek3+BPIGH45a+IBwd2fVqumXiNj +unJVtzvBJSaBjaRsMm6zsWjjI9hZyOqn2CMyUklcnA5EfTTCq89k1pBx0qXb +8BdR33WDW0kyL8gYdtQ1N5Lgxw84Qf49GQV9NjQmEP2RRAroLBgk4/r7I/Hr +CPaKGDisOE7GvXaTp6OIfiJZPE5SXSZjiaLMmCPRfz9L5eUecVFwaZ505DHR +n42iqY+pAhT87fRBXIjgwGG/QbocBW8Ynt9eQfR3+xlZTWMLCu53gJ35hD7u +jiY3vdxNwUjt3c/fZrPhtPWys/l+Cupkz12cJfSkLPHhnHUABYNEFlcpEXq7 +xL7cszeNgjuTKSI7MthwUGrRpz+bglnLBaaM64ReY705DhRS0O6+yiclQr8j +dsbbPJ5QcLVz3I55Qu9Gv/+G+Q1R8FdjmzMmE/UwTVV4Nk7Bx8FnXLmSiHzm +KH8QnKXgNeONm18R80N0t6vOYy4xXLrEmqDHs2Gc/XyOc7sYfs86s7Ijlg1X +ziYFXQ8Vw/NC7vd6iXnV1LdNdvyMGO6LjljDPMmGf5oNncw4Mbx+0dbuVggb +Do3MqH+9JYajWiVNZkFE/1rum9zeIIaOQYphTr5sGBSW92vkEUfBmZZal/1s +EPGvkxARIbjsvxR3Z0LfTXteH5EWx3aphovuxDyuDItT2qghjl6XXMd3ORD5 ++TQxtnePOA4NTn4e3ckG9XvVh3/niuM+5fNeK/XYcEZv10GKtgRKX3trvyDI +BtP9mf9pGUjgiVfyDH5+NvBG/Yi2t5RA3hU11dK8bLjZcC4/yVUCDxXuTlLi +IuaNedWPNRcl0LU3SHB+gQUTezYHT72XwJXUO0fcBlmw/8TMpdZwSXyysPDn +NnHfyqUZiI+dk0R23tbTM/ksIn+X769NkkSuHbcU9G+zIOzftnaDPEls+zHB ++/IGC65G7xd+3CqJU0+unk+IZ0Fr8susOxJS2HRTxobbl7ifS66Xn66Twmd2 +lYyP21hg1PNm8VeTFPaIFqxukmOBFceqHQc6pDA8OZteIsMCd1u/9/BNCjdN +0BeOkllgEi4TGbVaGlHW1qiciwXHpGZv6ytKo1eGtJvvcCU0Hs762RAsjWld +fJZ3Mivh6PxkVBOPDJbCGWtuzkqgBxwiDQvIYDp/fHDUIvGeGvtQxCkqg3Uv +Dx2emquAO30N3cxNMigS9q6qdbwCBmqvKlXQZPDtlfTKnd0VYH1OpzfngAzu +N/YKSCioAHWBMyrhpTJ4V9n78BbzCvijyDegbL8JRwUn8j+dLQe9ouLsa9c2 +46d7Ca/0+8pgUsDc1aFeFmt/6e98RiuFr/GuDsfXyiPzn6pb7/MSMPsdYvaN +tgUz2pN/7XItgnF3rsDyyK24w6DgSt6bu8R7X2Tl+fpteHXTy/zvEXkg8Fo+ +8eFvBYyceC24KTMHxC88sKHRlPAU85lDRMItSFfU4RM8rIxPP7XNNLamwyuK +PnUqeTui9jEp16JUoIvXJ6l0q2C4eu+A+fMk4OXMDTp4VhV3kAefZlnFwZo/ +dXaTMaroEtnBy6LGwdKvj+pnzqviis0nfn8Sj4PfH8iT2fGqeLKWbH3oxyVo +L0v2/XxNFb/7d3UYXbwEKW5nDh0oUsVZap6mYdNFINW77nHpUkWFuNP1JLsL +IHlGSm+vvBrGKF33SMs4ByWBXJs+blXD89UDvczYc8A8NLn2oKIaJsVMp8wE +nAMXi4ZOL1U1TBkdqkkyOwc3hQ/7hNLV0KI8Uy7iTwyQC0sy0qzU0HVKRn2r +cwwIdTL+vAtWwyPBqfzXlKKBW8650valGtYnTdcazEeBNxnMi5rV8FloMk/e +aBS84tk0wNmqhmmmXBT+91EQPzuyuqJdDc2erbLnrYoC3qZAe5EPatg596Ak +9VQUCPjETfeNq6Egu7ylhTMKxEur1D0F1PFAydhcEPU0bGeQH4S4qKPr8pmq +7I4weLT5yMJKV3XsLvliU1UZBtrrHu9IdFPHmmYlvvGMMDDo2fM577A6nv3N ++ybNPQwcAtL5OwLUseuh8l3e2ZMQeUckSClWHd8VZ3QflToJ7TwknS8l6njb +Pb4vOjoEjg8INJhzaOBCznjhWEIQNL1wflK4UgMrN2Qpk04GgeSDfNa61RoY +4zGbYucRBK8i6cWvuDXwBjW5h1M3CDbJuF01F9TAPXvWr9X5Hghv3UsPm8tr +YMujvMUfpoGg+t16g7mlBjJ+cg7JCh+H31Px9mbpGmgk5PPga40/9PfmONzK +0MBAAzte2Zv+8OpJpePkTQ3UH4kPjQr3h7zzn/dez9HAYwuvJZPo/uAkprn/ +e6EGqrdsjOaq8oPnBn2HLj7RQCGRLyaWtb5wI3lbaPOgBm69rCl3rc8HLgQz +T0p808Av+dvv2tT6QPA+u7CAEQ3sVwt6JpfjAzZyEafI4xqYbhN1XOqwD6x5 +3B51ZEYDVeiFpVbT3hDwOeQiN5cm3hZJJMULesMOlRcZZsqa+LyE9mDZwwv2 +rDHd3a6iiQvSny+XmnqB98dmHkd1Tbz16eyKKCUvSIx7HeWhpYnuJBPd49OH +oXuk61CkviZK90LMvXOHwSN7SL3CXhNtE8/5Wt8/BGf5V7RIn9bEc16ja/v4 +PCF19GzM3ShNDORvEZua84D8ulXM7dGamPuJNiX7yQNe+XKV6l7QxMU07mvv +7nsA/6uNaQ4pmujD99ray9IDss9Kusfna+KJRlI/JrpD7ZTuwtwbTeyZ/75W +UdYNclpZbnZvCf9dEpyaNrpBzB2NVyWdmpjx0bjr5MJBMHNUvO7Zq4mqlw4v +iHYehK4qilbnF02MszhjbRJ9EMbO/DleMq2Jpov236xGXIHExxrzoFDxtmNn +gU34Afgzqm77VJyKHoO1ww6OB6D/WcljMSkqKte6njqjcQByAvMvdGymIkXh +kabh+H5Q6rkqj8pU3Ow6G3viwH4wyAxyE0MqnkuT3xNu6QJ+Suof3npSMaS1 +IUEP98GJOcrfA15UnJ/6oTYusQ9O1XNSfnlTcf9Ve2r9ghPE7Xm3d90xKlLX +DDR/ZjlBQUzoe4MwKr5dW8n8quYEg/21vY8SqRg+vc/6m9JecEiw6LnKomJL +wIXmfoYjuOzRnNtcRUUjz8B9QtKO4LFZQqSshopL3pf/+q50hMDHvxzePKNi +lfCR/tiXDpD0Lbl7TSsVK5iQbmHnAK8Yve9CPhP+J9rHrQqwB8Yvj6693DQ8 +ww08Do12QKrekVuznoZqg1H8xsV28Ou8wjEpXhpunlB0tEq1g0yZifXfBGiY +ENBp9MDDDpZ2hxseE6fhs9y3y3fX2EFddXJZrAqxX+Tj5wPWtqB/sTbpkT0N +m0dz6UZTNkBxyNlP2kNDu64g450DNvDfphilk040vDdJv+3bbAO5NWZNzAM0 +3K61Y2kqywZWTnQtN3vRcPed041CVjbQ4PDD73M4DVUDWaXyLtZgLCu6kyeX +hnO0yND+ZUso//lcxiOPhirllsly/ZYgywqcrcqnoXGe8oFrbEtYZd6W5VVE +Q+1YkTO/Aiyh3j/2v4ZyGlY2B5QHDVsAs3o6LewlDU3dpn6zus2BZvt2cGSc +hrV+co6inaaQLxbJYv6m4ZbObXx85aYg/E0p/uokDb3KUscVrprCdMgFquEs +DfW+tsY0O5pC2S24kLlMw6s+FN/8gR2g8v2+sr2AFjKH28ye/WcCW6MuhdZr +aeHly9JbUzSMoUb3zmpLuhZ6zU46HiYZg81cXco7PS3c0Z665PrHCEL9ZopH +9bXQuNyB71mdETQ5u37htdTCke89P1WsjMBLh2a+z1ULtf0+GecHGMK9/76I +TV8g1sd2Goy91Qdmyb+CiDgt/Hus0pvzsT50HBGhrU3UQou3q3fqZevD38+W +NpQrWlgyef/hBn99MG9jxeAtLTSVYQnJ8urDWFHCz/hS4nyy4VNeWwQFT506 +uQ+Ev8YWt1o+MeDyJqu/0f1a2DoVS9JhM2D6kxt1cEALT58WjupOYkCtU3xR +5pAWZskJO2QbMMDW5lOayE/C/tKWE94FenBS99wxbg5tjBqttS0+pQtN/G9l +fspp4/u+yKOJJjqg3PbN2WKrNgaKvQy7LqsDKfF/0+4paOPf7hUH3qzUAee1 +sryHVLTRtDN+srxOG37/C/47oK2NJgFj+sd0tYE0Kt7ZbqGN7lvWq4fStcCz +1iumPEAbhauejWbYU+GX71iIcZA2+q3RmJWgUSFU4qhPd7A2nn9tV9dCosKl +U/628+HaqHB+tjy/VxMe0oOl9WK1cY97U9zu/ZrwrzK6piFDG09J3ol1D9CA +lAeZ0x0N2rjoXuE6W64G4gekR91faOOlDn/VYxlqcIc3t2+6SRublaVyeaPU +gO17p570Rht9llwr2BZq8FGxOMmpVxsTc9WKa76qwtaCx0qD49q4PmB4yVlC +FeqyuzwmhXXQJ6B9VZ61Mny2lDkQLKqDgTFfFYY3KwPHH9+9CxQdTNiZf9dj +XgkMdq21Wi2tg8N2SaHCuUrwYgVdi6ygg6R1VruY84rQ6pbFrc/UwYFd4Q+P +PlCAD7LeJUmHdPBmhEaP+Y6tsNBeWSB8RAfNxMT54zdtBfEIztsZPsT/U0s6 +OJa2gMu7m2l5xwj7N14PR1dsgc/n2qLYYTp40LhR+7v8FhgZ1rT7nKiDz9V5 +MucF5GG6YHlOhaWDkgynByd5ZWHYwST74mMdXNPI5q2f3Ay9qxJMh6p18Lqv +yy3Vd5uh2pVy/dpTHdSQqrwceXMznBWl0hebifNlvC8+KW0Gvgvep17162Ch +GXnV2d2bQOnwOw7PlXQcfZ/VL1YrDZLC4vdqV9ExQUlSveuONPA1uO0SXUsn +7sN4i/sJ0jAlOZHTsp6OvQmvtz5zkYaq7nWG6sJ0FAjfsbd7SQpMTfDc8hY6 +eg1ItFokS4K7XBF3xk46ppCqgxyGxCDs+X5veRs6JnvTX09UikGSp0BLmS0d +J5qub3h9SQxq7pyMb3Gko6DX2/dmGmIgJG+6cfEgHS8us/6an6fAC/lvQq7B +dNQ0MyRL6ZJBYauUtHwWHdvz9HXr20iATR1RZTl0/O9GdvVUIQkcvGK/MPPo +GHjble0cS4Logp+5jvfoaNP4bqqTQYL+rTVyFx/RUfEvScb6gTAkbturOP6S +sDcR+492UwgmFa7QyibouLvtdUnXDQHobUVjwSk6Zvy4dMEnUgCe+v2yC5qh +Y/2Wkn8K7gKQWGYWQPtLx4gHRwc2KQqAAp2juIpTF7Pbo55M1PCDm5mvTANJ +F8nmTI+eET7oOrxjQ5eeLt7k36D3pYwXqrlnKFTQxaE1Ucn+0byQW5S77Zq+ +LpakqhYY7OaFY78XTfaY6GKoxr57FbM8wBNSfqbfWhc11t/hfM7kAZNYmbmv +brpIHWx8Tu9bD+y8hS8zF3Tx9rbut3KG3EAzDJozj9PFvafmD3iJc0PFl/EN +2Qm6+MHrWtXgDBeUSQ5omafoolLBi6KIe1xQnP40IfOGLn6LkPU3EuSC7Phz +OjtKdPHd9Vq57ok1cDFoY3J6py7anCv2kOlYBVyCF/J/vtPFWqMXfZ2lqyC2 +lKPGoFcXe/ZJh1Ykr4KYX5PD4/26hJ6tZVbbroLTXl16+sO6OKXwzqKtixOO +O18f/T6vi3dNgkt7B1eCk9Fm1JXUw9MZ/hXiUitgsYuLt0Ga4LPJ1nMrVkC2 +568+88166B2XWsDxjQOGYx+HOG3VQ0/TmKjMIg443mz94KS6Hg4nFjGW6Rxw +yeqUJNtED4P81NI1GpeYVXve/dP0J/b/VTn/PmuB6fK96lVNgB7OqW9ZYhxb +YHKEZacbBemhXgHnl9+4wDS54aO5+6QeepXsFKYP/WV2fFxxNDBaD9eQPpzf +p/iXOea2va80TQ9bT+yT8m+eZ4r5nn+8/ake8gQaG3zUmWUmLh+ixtXrodDz +I873hWeZK1NMSkca9TC3zUi2YnKGOVa5+l52sx6G1+lGeBfOMKs4YtIFOgn7 +bZzF7pIzTKfUqJDZb3q4o9aPz5JvmplefZJau56B38wf6Y+R/2NusNpbSuFl +YEnm6fvi/yaZUZ+1lUP4GFitdu5CxMAk02v1vKyqMAObvW9FNN+eZGpZBwvl +SjJwXachf7TqJLN78PjUOTUGGg199zW0nWAKrztautORgYXugRdOe/9k5hlG +hE3sZaB3zSaO9xo/meoRiYZXnBk43Pnm3pXFcabVxMN3vQcZmBOaJLolZZwZ +2z3zx/0oA4Nf3GNW1P1gzudGGoSdYeDk97nEUcUx5gfdK535RQy0bz+0557R +CNPrRN5NsxIGMibaR0ZER5izJRWe4w8ZKPar41LQz2GmwKbeObVKBn7wT+QI +ThtmWnBJiD95ykDWw4aL639/Y9Z05Xt0vmPgyB1mmkDxV6Y5L1s5uJeBdvxi +ZbMxX5m9O5pnRfsY2Jeqxiuz/ytzuurHhf2fGfgqsPmBCf9XpnKO6v3vYwzU +tnZsbgobYtZ80A+O/8lAeVoSucN+iGkuZAcqEwx8tF2VW1JtiHno/Im3QTMM +POKpznlqdJA5/TQ2Q2SegcvFacoJjYPMs3/T3Kv+MjCP4qX1KXuQyad5T8ll +kYFKdJeygIhBZqZv1czyMgPVOgdUjZwGmf8Dp23ESw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0964075054441099}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -11283,19 +11530,19 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0964075054441099}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11309,165 +11556,181 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwVlnk4lF8bx5UWKrIOM/ZCZck6g2Hmvq3ZQoQSJUuJkAiRKNJiCSlS2ZKE +FGEmRKEiihCKVBSSip+1hPd5/3quz3XOee71e58j4+Zv67mSg4Pj+QoOjv9/ +ZweaG2Xj8piqVGrA4A0bZlem6En93rMgLn/5fnLodkDhNjfR3hS4xzv8zjSU +CcE2hT2cvbmwhv59kSfUCvh/iaT86SkDL0O/wWsh++FTjZX/dE89cDgez5s+ +4QcmsmMfJ3s6wHw45NpF/9Pwp0fr6kTPIMjQxZ3/2CdCg+HdvLe5UyD3z0/y +p3wWiH96POymtAiqk+FuxbfyQejogcK1hpy4Z1DQQ/2/YkhRM6m2sudCi9wX +7CdRpaDSt3cHw4sL23X8k7bFlUJrjG+nYjgXNhiqxCVeLYU1vak/uHK4UEF5 +70fDwlIIPz0k1jDOhTtw7a19naXg0RJ1SiuGGxPnJAf0ZMuA5lnNkH60Djn5 +ZedKn5ZBJ29bM++LdSiYvtZH71UZHGMP2i/2rkOKV/Wdus4yKFy/zu/D0jos +ntLzfDhcBlJlezJTzdejUKbZc/qGR8C1PLPENbge1808/zhh/wjep6s+neTj +QY6mFWs6hh5BRmfRxmA5HrRpqePb9vMROPFuOfBXhwfJ6c9MQ2YfQX+0xNJK +dx58UXGQ9oerHD77rdMTquDBU4W0+hTlchg1+sqi7eXF0KvxZyknymF+Iu1B +eM5GjCh3V/ZdLIfHioLLyxUb8frLI0fvrK6AsEOJVjGvNmLZ04wrXTwV8K8v +5mf81EZc7ZdwRUSyAqKG2MJtm/iQcilZQZVZATFv7th9DuLDXW2MXYWnKiAu +L7JtJZkfB9ZHV7L/qwBzzSMCwpv50V5CRqHwTwVwNdrab1Hmx9VGoQ9TOCoh +Zkiuz0KfH9+Ytk2a8lbCqU2tw6lH+PHj3z4V822V4JctuiRfxY8VhW/+y3Sp +hF03S5Us9gmgU2Dh1YS6SuBTuuHv4imARttUJVyfV8Kb6pgyf38BTCvPyd/W +UgnmfY7aqdECmBHBqs3prgQDypLhxyIBLHzyj0P+ZyVoppvv8/8ngBPxji2n +RVkgkjp08cotQfRMOnf5uBcLRBUrYubzBTFZAsa6jrKAUh8b6fJQEDnTQ0NU +AlggObHtxJYGQeQYMFB8fZIFcpbHXKtHBTGUc/Waokss0Fi1SBvSEMJZ28hV +k4Us0LzxRs2UIYQnbLe87C5hAU09W+m+iRCmX0t5Xl7GArqr4aaQvUK4ajo1 +dG8VC/RrLvKsjxTCJ3+dW42bWWAdRPqq/org14ufC7+xwGb96EBapxBmxbXW +Cn1ngW3u4/f/+oXQ/Gzdt+BxFji0O7e9+C2EM0VzArJTLHBRul3lJCyMVvo9 +azZxsMHnq0ryWVdh7Lc5b3BflA1Hw1fEjxwRRsUAtspNMTb4CXTGWgYKo7OB +f0i0JBuOY/ApUqww5vlYi+nKsuHkzZrDhUXC6Gnd32Olwobzu82YHbPCKLX0 +1pTbiA2U8jeUlStIeIR/reYjEzaUCO6eU1tPQr/kcvpuMzZ0d+x/mCxFwlSz +HznhVmyQ3RW0aZcpCeV5uXlc97CB/fDPUpQtCbfek+RucGKDJV9k30NnEn7h +EVGVcGFDYNvFVL4AEuowX6xhHWRD/c6sNe3XSbius4PvjDcbHO7LDi3fJiHX +08u3bh1lw9iGwjqVEhJmUAc8S/3YwN9aHnq5noRFg99Ka4+zwdX81ZjVDxJa +hD84cSyMDYsmM29e64ng+bHiYvULbEjKDytaNBHBzXOLKxovEv6u4bigvEsE +OVt+sSzjCP+er9NP8BTBwZ03rI0S2ZBhKP3IMlEER6LTglqvsGH77TuXT6WL +oL4TQ5h8lfB3peLR4lwRVH7cqeByjQ3fn1HlNrBEMD7Ttq4lnQ3aaJHW8olg +Q4leg1tsaM1qD1z4LoLVekXeFpmEv8v2NorTIkj2zjlvkUXkv9aVO45LFEf4 +e33Uc4j8Sw5/qxIQReOEYm1yLpH/CJ/6MXFRzKHx35gjuFsvONxcTRTze4YU +b+SxwfvmgmOYriiOqnG7ut4h4l+I0iw0FkUIUaZK5BPxVsf95HYSRanr/G8i +7hL1ofC/0vEQRS92UZpMARF/2LX8I37EOv7heUJwoE7Ogeazoujpk7Kh7x4b +zLN5py3iRZH9olfFvpANm9aeuvDmqih2xI2INRH8x/e7+K4sUYyLonVqFLGh +vcuhtLNAFGsycU86wQW6jcYOZaJowB9zf4bgyFy1D73VorioevadRTFRb+4s +v33PRfHPmbqODIK3H9vAOfBGFK0eNtwdJHh1z8k0117ifALZcfN9NvQzRhSH +voii2QbrIWeCy/N2P/X8IYpzMGN1meC49fW7R6dFUcAx+2YVwW7HVb57L4li +0vWRNwME09/fjPi5loxxnp6jCwTz4zqBY/xkNFBi/eAvYcNofkj+fxQySvpH +9EkTXMfzjX5ClowZNfuqthJ8Lci2bU6ZjDvuz1/aRrBfX517mBYZqz4vWm8m +2NhAef4fkjHpr8gGEsHi9zLiI83JaJ01+2wFwdMbuWRW7iaja4Bl0DBhvyX4 +REWMCxl5eNvkGgnO/ThotvYwGXet03qfQfBJI5uBi8fIOPIbkr0Jtil6cnxD +GBll6QU2GgRvFVBcezmajEO2apQZIl/Loek3+BPIGH45a+IBwd2fVqumXiNj +unJVtzvBJSaBjaRsMm6zsWjjI9hZyOqn2CMyUklcnA5EfTTCq89k1pBx0qXb +8BdR33WDW0kyL8gYdtQ1N5Lgxw84Qf49GQV9NjQmEP2RRAroLBgk4/r7I/Hr +CPaKGDisOE7GvXaTp6OIfiJZPE5SXSZjiaLMmCPRfz9L5eUecVFwaZ505DHR +n42iqY+pAhT87fRBXIjgwGG/QbocBW8Ynt9eQfR3+xlZTWMLCu53gJ35hD7u +jiY3vdxNwUjt3c/fZrPhtPWys/l+Cupkz12cJfSkLPHhnHUABYNEFlcpEXq7 +xL7cszeNgjuTKSI7MthwUGrRpz+bglnLBaaM64ReY705DhRS0O6+yiclQr8j +dsbbPJ5QcLVz3I55Qu9Gv/+G+Q1R8FdjmzMmE/UwTVV4Nk7Bx8FnXLmSiHzm +KH8QnKXgNeONm18R80N0t6vOYy4xXLrEmqDHs2Gc/XyOc7sYfs86s7Ijlg1X +ziYFXQ8Vw/NC7vd6iXnV1LdNdvyMGO6LjljDPMmGf5oNncw4Mbx+0dbuVggb +Do3MqH+9JYajWiVNZkFE/1rum9zeIIaOQYphTr5sGBSW92vkEUfBmZZal/1s +EPGvkxARIbjsvxR3Z0LfTXteH5EWx3aphovuxDyuDItT2qghjl6XXMd3ORD5 ++TQxtnePOA4NTn4e3ckG9XvVh3/niuM+5fNeK/XYcEZv10GKtgRKX3trvyDI +BtP9mf9pGUjgiVfyDH5+NvBG/Yi2t5RA3hU11dK8bLjZcC4/yVUCDxXuTlLi +IuaNedWPNRcl0LU3SHB+gQUTezYHT72XwJXUO0fcBlmw/8TMpdZwSXyysPDn +NnHfyqUZiI+dk0R23tbTM/ksIn+X769NkkSuHbcU9G+zIOzftnaDPEls+zHB ++/IGC65G7xd+3CqJU0+unk+IZ0Fr8susOxJS2HRTxobbl7ifS66Xn66Twmd2 +lYyP21hg1PNm8VeTFPaIFqxukmOBFceqHQc6pDA8OZteIsMCd1u/9/BNCjdN +0BeOkllgEi4TGbVaGlHW1qiciwXHpGZv6ytKo1eGtJvvcCU0Hs762RAsjWld +fJZ3Mivh6PxkVBOPDJbCGWtuzkqgBxwiDQvIYDp/fHDUIvGeGvtQxCkqg3Uv +Dx2emquAO30N3cxNMigS9q6qdbwCBmqvKlXQZPDtlfTKnd0VYH1OpzfngAzu +N/YKSCioAHWBMyrhpTJ4V9n78BbzCvijyDegbL8JRwUn8j+dLQe9ouLsa9c2 +46d7Ca/0+8pgUsDc1aFeFmt/6e98RiuFr/GuDsfXyiPzn6pb7/MSMPsdYvaN +tgUz2pN/7XItgnF3rsDyyK24w6DgSt6bu8R7X2Tl+fpteHXTy/zvEXkg8Fo+ +8eFvBYyceC24KTMHxC88sKHRlPAU85lDRMItSFfU4RM8rIxPP7XNNLamwyuK +PnUqeTui9jEp16JUoIvXJ6l0q2C4eu+A+fMk4OXMDTp4VhV3kAefZlnFwZo/ +dXaTMaroEtnBy6LGwdKvj+pnzqviis0nfn8Sj4PfH8iT2fGqeLKWbH3oxyVo +L0v2/XxNFb/7d3UYXbwEKW5nDh0oUsVZap6mYdNFINW77nHpUkWFuNP1JLsL +IHlGSm+vvBrGKF33SMs4ByWBXJs+blXD89UDvczYc8A8NLn2oKIaJsVMp8wE +nAMXi4ZOL1U1TBkdqkkyOwc3hQ/7hNLV0KI8Uy7iTwyQC0sy0qzU0HVKRn2r +cwwIdTL+vAtWwyPBqfzXlKKBW8650valGtYnTdcazEeBNxnMi5rV8FloMk/e +aBS84tk0wNmqhmmmXBT+91EQPzuyuqJdDc2erbLnrYoC3qZAe5EPatg596Ak +9VQUCPjETfeNq6Egu7ylhTMKxEur1D0F1PFAydhcEPU0bGeQH4S4qKPr8pmq +7I4weLT5yMJKV3XsLvliU1UZBtrrHu9IdFPHmmYlvvGMMDDo2fM577A6nv3N ++ybNPQwcAtL5OwLUseuh8l3e2ZMQeUckSClWHd8VZ3QflToJ7TwknS8l6njb +Pb4vOjoEjg8INJhzaOBCznjhWEIQNL1wflK4UgMrN2Qpk04GgeSDfNa61RoY +4zGbYucRBK8i6cWvuDXwBjW5h1M3CDbJuF01F9TAPXvWr9X5Hghv3UsPm8tr +YMujvMUfpoGg+t16g7mlBjJ+cg7JCh+H31Px9mbpGmgk5PPga40/9PfmONzK +0MBAAzte2Zv+8OpJpePkTQ3UH4kPjQr3h7zzn/dez9HAYwuvJZPo/uAkprn/ +e6EGqrdsjOaq8oPnBn2HLj7RQCGRLyaWtb5wI3lbaPOgBm69rCl3rc8HLgQz +T0p808Av+dvv2tT6QPA+u7CAEQ3sVwt6JpfjAzZyEafI4xqYbhN1XOqwD6x5 +3B51ZEYDVeiFpVbT3hDwOeQiN5cm3hZJJMULesMOlRcZZsqa+LyE9mDZwwv2 +rDHd3a6iiQvSny+XmnqB98dmHkd1Tbz16eyKKCUvSIx7HeWhpYnuJBPd49OH +oXuk61CkviZK90LMvXOHwSN7SL3CXhNtE8/5Wt8/BGf5V7RIn9bEc16ja/v4 +PCF19GzM3ShNDORvEZua84D8ulXM7dGamPuJNiX7yQNe+XKV6l7QxMU07mvv +7nsA/6uNaQ4pmujD99ray9IDss9Kusfna+KJRlI/JrpD7ZTuwtwbTeyZ/75W +UdYNclpZbnZvCf9dEpyaNrpBzB2NVyWdmpjx0bjr5MJBMHNUvO7Zq4mqlw4v +iHYehK4qilbnF02MszhjbRJ9EMbO/DleMq2Jpov236xGXIHExxrzoFDxtmNn +gU34Afgzqm77VJyKHoO1ww6OB6D/WcljMSkqKte6njqjcQByAvMvdGymIkXh +kabh+H5Q6rkqj8pU3Ow6G3viwH4wyAxyE0MqnkuT3xNu6QJ+Suof3npSMaS1 +IUEP98GJOcrfA15UnJ/6oTYusQ9O1XNSfnlTcf9Ve2r9ghPE7Xm3d90xKlLX +DDR/ZjlBQUzoe4MwKr5dW8n8quYEg/21vY8SqRg+vc/6m9JecEiw6LnKomJL +wIXmfoYjuOzRnNtcRUUjz8B9QtKO4LFZQqSshopL3pf/+q50hMDHvxzePKNi +lfCR/tiXDpD0Lbl7TSsVK5iQbmHnAK8Yve9CPhP+J9rHrQqwB8Yvj6693DQ8 +ww08Do12QKrekVuznoZqg1H8xsV28Ou8wjEpXhpunlB0tEq1g0yZifXfBGiY +ENBp9MDDDpZ2hxseE6fhs9y3y3fX2EFddXJZrAqxX+Tj5wPWtqB/sTbpkT0N +m0dz6UZTNkBxyNlP2kNDu64g450DNvDfphilk040vDdJv+3bbAO5NWZNzAM0 +3K61Y2kqywZWTnQtN3vRcPed041CVjbQ4PDD73M4DVUDWaXyLtZgLCu6kyeX +hnO0yND+ZUso//lcxiOPhirllsly/ZYgywqcrcqnoXGe8oFrbEtYZd6W5VVE +Q+1YkTO/Aiyh3j/2v4ZyGlY2B5QHDVsAs3o6LewlDU3dpn6zus2BZvt2cGSc +hrV+co6inaaQLxbJYv6m4ZbObXx85aYg/E0p/uokDb3KUscVrprCdMgFquEs +DfW+tsY0O5pC2S24kLlMw6s+FN/8gR2g8v2+sr2AFjKH28ye/WcCW6MuhdZr +aeHly9JbUzSMoUb3zmpLuhZ6zU46HiYZg81cXco7PS3c0Z665PrHCEL9ZopH +9bXQuNyB71mdETQ5u37htdTCke89P1WsjMBLh2a+z1ULtf0+GecHGMK9/76I +TV8g1sd2Goy91Qdmyb+CiDgt/Hus0pvzsT50HBGhrU3UQou3q3fqZevD38+W +NpQrWlgyef/hBn99MG9jxeAtLTSVYQnJ8urDWFHCz/hS4nyy4VNeWwQFT506 +uQ+Ev8YWt1o+MeDyJqu/0f1a2DoVS9JhM2D6kxt1cEALT58WjupOYkCtU3xR +5pAWZskJO2QbMMDW5lOayE/C/tKWE94FenBS99wxbg5tjBqttS0+pQtN/G9l +fspp4/u+yKOJJjqg3PbN2WKrNgaKvQy7LqsDKfF/0+4paOPf7hUH3qzUAee1 +sryHVLTRtDN+srxOG37/C/47oK2NJgFj+sd0tYE0Kt7ZbqGN7lvWq4fStcCz +1iumPEAbhauejWbYU+GX71iIcZA2+q3RmJWgUSFU4qhPd7A2nn9tV9dCosKl +U/628+HaqHB+tjy/VxMe0oOl9WK1cY97U9zu/ZrwrzK6piFDG09J3ol1D9CA +lAeZ0x0N2rjoXuE6W64G4gekR91faOOlDn/VYxlqcIc3t2+6SRublaVyeaPU +gO17p570Rht9llwr2BZq8FGxOMmpVxsTc9WKa76qwtaCx0qD49q4PmB4yVlC +FeqyuzwmhXXQJ6B9VZ61Mny2lDkQLKqDgTFfFYY3KwPHH9+9CxQdTNiZf9dj +XgkMdq21Wi2tg8N2SaHCuUrwYgVdi6ygg6R1VruY84rQ6pbFrc/UwYFd4Q+P +PlCAD7LeJUmHdPBmhEaP+Y6tsNBeWSB8RAfNxMT54zdtBfEIztsZPsT/U0s6 +OJa2gMu7m2l5xwj7N14PR1dsgc/n2qLYYTp40LhR+7v8FhgZ1rT7nKiDz9V5 +MucF5GG6YHlOhaWDkgynByd5ZWHYwST74mMdXNPI5q2f3Ay9qxJMh6p18Lqv +yy3Vd5uh2pVy/dpTHdSQqrwceXMznBWl0hebifNlvC8+KW0Gvgvep17162Ch +GXnV2d2bQOnwOw7PlXQcfZ/VL1YrDZLC4vdqV9ExQUlSveuONPA1uO0SXUsn +7sN4i/sJ0jAlOZHTsp6OvQmvtz5zkYaq7nWG6sJ0FAjfsbd7SQpMTfDc8hY6 +eg1ItFokS4K7XBF3xk46ppCqgxyGxCDs+X5veRs6JnvTX09UikGSp0BLmS0d +J5qub3h9SQxq7pyMb3Gko6DX2/dmGmIgJG+6cfEgHS8us/6an6fAC/lvQq7B +dNQ0MyRL6ZJBYauUtHwWHdvz9HXr20iATR1RZTl0/O9GdvVUIQkcvGK/MPPo +GHjble0cS4Logp+5jvfoaNP4bqqTQYL+rTVyFx/RUfEvScb6gTAkbturOP6S +sDcR+492UwgmFa7QyibouLvtdUnXDQHobUVjwSk6Zvy4dMEnUgCe+v2yC5qh +Y/2Wkn8K7gKQWGYWQPtLx4gHRwc2KQqAAp2juIpTF7Pbo55M1PCDm5mvTANJ +F8nmTI+eET7oOrxjQ5eeLt7k36D3pYwXqrlnKFTQxaE1Ucn+0byQW5S77Zq+ +LpakqhYY7OaFY78XTfaY6GKoxr57FbM8wBNSfqbfWhc11t/hfM7kAZNYmbmv +brpIHWx8Tu9bD+y8hS8zF3Tx9rbut3KG3EAzDJozj9PFvafmD3iJc0PFl/EN +2Qm6+MHrWtXgDBeUSQ5omafoolLBi6KIe1xQnP40IfOGLn6LkPU3EuSC7Phz +OjtKdPHd9Vq57ok1cDFoY3J6py7anCv2kOlYBVyCF/J/vtPFWqMXfZ2lqyC2 +lKPGoFcXe/ZJh1Ykr4KYX5PD4/26hJ6tZVbbroLTXl16+sO6OKXwzqKtixOO +O18f/T6vi3dNgkt7B1eCk9Fm1JXUw9MZ/hXiUitgsYuLt0Ga4LPJ1nMrVkC2 +568+88166B2XWsDxjQOGYx+HOG3VQ0/TmKjMIg443mz94KS6Hg4nFjGW6Rxw +yeqUJNtED4P81NI1GpeYVXve/dP0J/b/VTn/PmuB6fK96lVNgB7OqW9ZYhxb +YHKEZacbBemhXgHnl9+4wDS54aO5+6QeepXsFKYP/WV2fFxxNDBaD9eQPpzf +p/iXOea2va80TQ9bT+yT8m+eZ4r5nn+8/ake8gQaG3zUmWUmLh+ixtXrodDz +I873hWeZK1NMSkca9TC3zUi2YnKGOVa5+l52sx6G1+lGeBfOMKs4YtIFOgn7 +bZzF7pIzTKfUqJDZb3q4o9aPz5JvmplefZJau56B38wf6Y+R/2NusNpbSuFl +YEnm6fvi/yaZUZ+1lUP4GFitdu5CxMAk02v1vKyqMAObvW9FNN+eZGpZBwvl +SjJwXachf7TqJLN78PjUOTUGGg199zW0nWAKrztautORgYXugRdOe/9k5hlG +hE3sZaB3zSaO9xo/meoRiYZXnBk43Pnm3pXFcabVxMN3vQcZmBOaJLolZZwZ +2z3zx/0oA4Nf3GNW1P1gzudGGoSdYeDk97nEUcUx5gfdK535RQy0bz+0557R +CNPrRN5NsxIGMibaR0ZER5izJRWe4w8ZKPar41LQz2GmwKbeObVKBn7wT+QI +ThtmWnBJiD95ykDWw4aL639/Y9Z05Xt0vmPgyB1mmkDxV6Y5L1s5uJeBdvxi +ZbMxX5m9O5pnRfsY2Jeqxiuz/ytzuurHhf2fGfgqsPmBCf9XpnKO6v3vYwzU +tnZsbgobYtZ80A+O/8lAeVoSucN+iGkuZAcqEwx8tF2VW1JtiHno/Im3QTMM +POKpznlqdJA5/TQ2Q2SegcvFacoJjYPMs3/T3Kv+MjCP4qX1KXuQyad5T8ll +kYFKdJeygIhBZqZv1czyMgPVOgdUjZwGmf8Dp23ESw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0964075054441099}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11478,6 +11741,7 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11505,7 +11769,8 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1760850255633475}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0964075054441099}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11513,17 +11778,766 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913465524249306`*^9}, + CellChangeTimes->{3.9913465524249306`*^9, 3.994359511832491*^9}, CellLabel-> - "Out[444]=",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] + "Out[119]=",ExpressionUUID->"d3e8fbcb-deea-4f94-9c4e-60c66f8fadd6"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6883477e-2a54-0a45-979a-\ -ae60c73e9e82"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwVlnk4lF8bx5UWKrIOM/ZCZck6g2Hmvq3ZQoQSJUuJkAiRKNJiCSlS2ZKE +FGEmRKEiihCKVBSSip+1hPd5/3quz3XOee71e58j4+Zv67mSg4Pj+QoOjv9/ +ZweaG2Xj8piqVGrA4A0bZlem6En93rMgLn/5fnLodkDhNjfR3hS4xzv8zjSU +CcE2hT2cvbmwhv59kSfUCvh/iaT86SkDL0O/wWsh++FTjZX/dE89cDgez5s+ +4QcmsmMfJ3s6wHw45NpF/9Pwp0fr6kTPIMjQxZ3/2CdCg+HdvLe5UyD3z0/y +p3wWiH96POymtAiqk+FuxbfyQejogcK1hpy4Z1DQQ/2/YkhRM6m2sudCi9wX +7CdRpaDSt3cHw4sL23X8k7bFlUJrjG+nYjgXNhiqxCVeLYU1vak/uHK4UEF5 +70fDwlIIPz0k1jDOhTtw7a19naXg0RJ1SiuGGxPnJAf0ZMuA5lnNkH60Djn5 +ZedKn5ZBJ29bM++LdSiYvtZH71UZHGMP2i/2rkOKV/Wdus4yKFy/zu/D0jos +ntLzfDhcBlJlezJTzdejUKbZc/qGR8C1PLPENbge1808/zhh/wjep6s+neTj +QY6mFWs6hh5BRmfRxmA5HrRpqePb9vMROPFuOfBXhwfJ6c9MQ2YfQX+0xNJK +dx58UXGQ9oerHD77rdMTquDBU4W0+hTlchg1+sqi7eXF0KvxZyknymF+Iu1B +eM5GjCh3V/ZdLIfHioLLyxUb8frLI0fvrK6AsEOJVjGvNmLZ04wrXTwV8K8v +5mf81EZc7ZdwRUSyAqKG2MJtm/iQcilZQZVZATFv7th9DuLDXW2MXYWnKiAu +L7JtJZkfB9ZHV7L/qwBzzSMCwpv50V5CRqHwTwVwNdrab1Hmx9VGoQ9TOCoh +Zkiuz0KfH9+Ytk2a8lbCqU2tw6lH+PHj3z4V822V4JctuiRfxY8VhW/+y3Sp +hF03S5Us9gmgU2Dh1YS6SuBTuuHv4imARttUJVyfV8Kb6pgyf38BTCvPyd/W +UgnmfY7aqdECmBHBqs3prgQDypLhxyIBLHzyj0P+ZyVoppvv8/8ngBPxji2n +RVkgkjp08cotQfRMOnf5uBcLRBUrYubzBTFZAsa6jrKAUh8b6fJQEDnTQ0NU +AlggObHtxJYGQeQYMFB8fZIFcpbHXKtHBTGUc/Waokss0Fi1SBvSEMJZ28hV +k4Us0LzxRs2UIYQnbLe87C5hAU09W+m+iRCmX0t5Xl7GArqr4aaQvUK4ajo1 +dG8VC/RrLvKsjxTCJ3+dW42bWWAdRPqq/org14ufC7+xwGb96EBapxBmxbXW +Cn1ngW3u4/f/+oXQ/Gzdt+BxFji0O7e9+C2EM0VzArJTLHBRul3lJCyMVvo9 +azZxsMHnq0ryWVdh7Lc5b3BflA1Hw1fEjxwRRsUAtspNMTb4CXTGWgYKo7OB +f0i0JBuOY/ApUqww5vlYi+nKsuHkzZrDhUXC6Gnd32Olwobzu82YHbPCKLX0 +1pTbiA2U8jeUlStIeIR/reYjEzaUCO6eU1tPQr/kcvpuMzZ0d+x/mCxFwlSz +HznhVmyQ3RW0aZcpCeV5uXlc97CB/fDPUpQtCbfek+RucGKDJV9k30NnEn7h +EVGVcGFDYNvFVL4AEuowX6xhHWRD/c6sNe3XSbius4PvjDcbHO7LDi3fJiHX +08u3bh1lw9iGwjqVEhJmUAc8S/3YwN9aHnq5noRFg99Ka4+zwdX81ZjVDxJa +hD84cSyMDYsmM29e64ng+bHiYvULbEjKDytaNBHBzXOLKxovEv6u4bigvEsE +OVt+sSzjCP+er9NP8BTBwZ03rI0S2ZBhKP3IMlEER6LTglqvsGH77TuXT6WL +oL4TQ5h8lfB3peLR4lwRVH7cqeByjQ3fn1HlNrBEMD7Ttq4lnQ3aaJHW8olg +Q4leg1tsaM1qD1z4LoLVekXeFpmEv8v2NorTIkj2zjlvkUXkv9aVO45LFEf4 +e33Uc4j8Sw5/qxIQReOEYm1yLpH/CJ/6MXFRzKHx35gjuFsvONxcTRTze4YU +b+SxwfvmgmOYriiOqnG7ut4h4l+I0iw0FkUIUaZK5BPxVsf95HYSRanr/G8i +7hL1ofC/0vEQRS92UZpMARF/2LX8I37EOv7heUJwoE7Ogeazoujpk7Kh7x4b +zLN5py3iRZH9olfFvpANm9aeuvDmqih2xI2INRH8x/e7+K4sUYyLonVqFLGh +vcuhtLNAFGsycU86wQW6jcYOZaJowB9zf4bgyFy1D73VorioevadRTFRb+4s +v33PRfHPmbqODIK3H9vAOfBGFK0eNtwdJHh1z8k0117ifALZcfN9NvQzRhSH +voii2QbrIWeCy/N2P/X8IYpzMGN1meC49fW7R6dFUcAx+2YVwW7HVb57L4li +0vWRNwME09/fjPi5loxxnp6jCwTz4zqBY/xkNFBi/eAvYcNofkj+fxQySvpH +9EkTXMfzjX5ClowZNfuqthJ8Lci2bU6ZjDvuz1/aRrBfX517mBYZqz4vWm8m +2NhAef4fkjHpr8gGEsHi9zLiI83JaJ01+2wFwdMbuWRW7iaja4Bl0DBhvyX4 +REWMCxl5eNvkGgnO/ThotvYwGXet03qfQfBJI5uBi8fIOPIbkr0Jtil6cnxD +GBll6QU2GgRvFVBcezmajEO2apQZIl/Loek3+BPIGH45a+IBwd2fVqumXiNj +unJVtzvBJSaBjaRsMm6zsWjjI9hZyOqn2CMyUklcnA5EfTTCq89k1pBx0qXb +8BdR33WDW0kyL8gYdtQ1N5Lgxw84Qf49GQV9NjQmEP2RRAroLBgk4/r7I/Hr +CPaKGDisOE7GvXaTp6OIfiJZPE5SXSZjiaLMmCPRfz9L5eUecVFwaZ505DHR +n42iqY+pAhT87fRBXIjgwGG/QbocBW8Ynt9eQfR3+xlZTWMLCu53gJ35hD7u +jiY3vdxNwUjt3c/fZrPhtPWys/l+Cupkz12cJfSkLPHhnHUABYNEFlcpEXq7 +xL7cszeNgjuTKSI7MthwUGrRpz+bglnLBaaM64ReY705DhRS0O6+yiclQr8j +dsbbPJ5QcLVz3I55Qu9Gv/+G+Q1R8FdjmzMmE/UwTVV4Nk7Bx8FnXLmSiHzm +KH8QnKXgNeONm18R80N0t6vOYy4xXLrEmqDHs2Gc/XyOc7sYfs86s7Ijlg1X +ziYFXQ8Vw/NC7vd6iXnV1LdNdvyMGO6LjljDPMmGf5oNncw4Mbx+0dbuVggb +Do3MqH+9JYajWiVNZkFE/1rum9zeIIaOQYphTr5sGBSW92vkEUfBmZZal/1s +EPGvkxARIbjsvxR3Z0LfTXteH5EWx3aphovuxDyuDItT2qghjl6XXMd3ORD5 ++TQxtnePOA4NTn4e3ckG9XvVh3/niuM+5fNeK/XYcEZv10GKtgRKX3trvyDI +BtP9mf9pGUjgiVfyDH5+NvBG/Yi2t5RA3hU11dK8bLjZcC4/yVUCDxXuTlLi +IuaNedWPNRcl0LU3SHB+gQUTezYHT72XwJXUO0fcBlmw/8TMpdZwSXyysPDn +NnHfyqUZiI+dk0R23tbTM/ksIn+X769NkkSuHbcU9G+zIOzftnaDPEls+zHB ++/IGC65G7xd+3CqJU0+unk+IZ0Fr8susOxJS2HRTxobbl7ifS66Xn66Twmd2 +lYyP21hg1PNm8VeTFPaIFqxukmOBFceqHQc6pDA8OZteIsMCd1u/9/BNCjdN +0BeOkllgEi4TGbVaGlHW1qiciwXHpGZv6ytKo1eGtJvvcCU0Hs762RAsjWld +fJZ3Mivh6PxkVBOPDJbCGWtuzkqgBxwiDQvIYDp/fHDUIvGeGvtQxCkqg3Uv +Dx2emquAO30N3cxNMigS9q6qdbwCBmqvKlXQZPDtlfTKnd0VYH1OpzfngAzu +N/YKSCioAHWBMyrhpTJ4V9n78BbzCvijyDegbL8JRwUn8j+dLQe9ouLsa9c2 +46d7Ca/0+8pgUsDc1aFeFmt/6e98RiuFr/GuDsfXyiPzn6pb7/MSMPsdYvaN +tgUz2pN/7XItgnF3rsDyyK24w6DgSt6bu8R7X2Tl+fpteHXTy/zvEXkg8Fo+ +8eFvBYyceC24KTMHxC88sKHRlPAU85lDRMItSFfU4RM8rIxPP7XNNLamwyuK +PnUqeTui9jEp16JUoIvXJ6l0q2C4eu+A+fMk4OXMDTp4VhV3kAefZlnFwZo/ +dXaTMaroEtnBy6LGwdKvj+pnzqviis0nfn8Sj4PfH8iT2fGqeLKWbH3oxyVo +L0v2/XxNFb/7d3UYXbwEKW5nDh0oUsVZap6mYdNFINW77nHpUkWFuNP1JLsL +IHlGSm+vvBrGKF33SMs4ByWBXJs+blXD89UDvczYc8A8NLn2oKIaJsVMp8wE +nAMXi4ZOL1U1TBkdqkkyOwc3hQ/7hNLV0KI8Uy7iTwyQC0sy0qzU0HVKRn2r +cwwIdTL+vAtWwyPBqfzXlKKBW8650valGtYnTdcazEeBNxnMi5rV8FloMk/e +aBS84tk0wNmqhmmmXBT+91EQPzuyuqJdDc2erbLnrYoC3qZAe5EPatg596Ak +9VQUCPjETfeNq6Egu7ylhTMKxEur1D0F1PFAydhcEPU0bGeQH4S4qKPr8pmq +7I4weLT5yMJKV3XsLvliU1UZBtrrHu9IdFPHmmYlvvGMMDDo2fM577A6nv3N ++ybNPQwcAtL5OwLUseuh8l3e2ZMQeUckSClWHd8VZ3QflToJ7TwknS8l6njb +Pb4vOjoEjg8INJhzaOBCznjhWEIQNL1wflK4UgMrN2Qpk04GgeSDfNa61RoY +4zGbYucRBK8i6cWvuDXwBjW5h1M3CDbJuF01F9TAPXvWr9X5Hghv3UsPm8tr +YMujvMUfpoGg+t16g7mlBjJ+cg7JCh+H31Px9mbpGmgk5PPga40/9PfmONzK +0MBAAzte2Zv+8OpJpePkTQ3UH4kPjQr3h7zzn/dez9HAYwuvJZPo/uAkprn/ +e6EGqrdsjOaq8oPnBn2HLj7RQCGRLyaWtb5wI3lbaPOgBm69rCl3rc8HLgQz +T0p808Av+dvv2tT6QPA+u7CAEQ3sVwt6JpfjAzZyEafI4xqYbhN1XOqwD6x5 +3B51ZEYDVeiFpVbT3hDwOeQiN5cm3hZJJMULesMOlRcZZsqa+LyE9mDZwwv2 +rDHd3a6iiQvSny+XmnqB98dmHkd1Tbz16eyKKCUvSIx7HeWhpYnuJBPd49OH +oXuk61CkviZK90LMvXOHwSN7SL3CXhNtE8/5Wt8/BGf5V7RIn9bEc16ja/v4 +PCF19GzM3ShNDORvEZua84D8ulXM7dGamPuJNiX7yQNe+XKV6l7QxMU07mvv +7nsA/6uNaQ4pmujD99ray9IDss9Kusfna+KJRlI/JrpD7ZTuwtwbTeyZ/75W +UdYNclpZbnZvCf9dEpyaNrpBzB2NVyWdmpjx0bjr5MJBMHNUvO7Zq4mqlw4v +iHYehK4qilbnF02MszhjbRJ9EMbO/DleMq2Jpov236xGXIHExxrzoFDxtmNn +gU34Afgzqm77VJyKHoO1ww6OB6D/WcljMSkqKte6njqjcQByAvMvdGymIkXh +kabh+H5Q6rkqj8pU3Ow6G3viwH4wyAxyE0MqnkuT3xNu6QJ+Suof3npSMaS1 +IUEP98GJOcrfA15UnJ/6oTYusQ9O1XNSfnlTcf9Ve2r9ghPE7Xm3d90xKlLX +DDR/ZjlBQUzoe4MwKr5dW8n8quYEg/21vY8SqRg+vc/6m9JecEiw6LnKomJL +wIXmfoYjuOzRnNtcRUUjz8B9QtKO4LFZQqSshopL3pf/+q50hMDHvxzePKNi +lfCR/tiXDpD0Lbl7TSsVK5iQbmHnAK8Yve9CPhP+J9rHrQqwB8Yvj6693DQ8 +ww08Do12QKrekVuznoZqg1H8xsV28Ou8wjEpXhpunlB0tEq1g0yZifXfBGiY +ENBp9MDDDpZ2hxseE6fhs9y3y3fX2EFddXJZrAqxX+Tj5wPWtqB/sTbpkT0N +m0dz6UZTNkBxyNlP2kNDu64g450DNvDfphilk040vDdJv+3bbAO5NWZNzAM0 +3K61Y2kqywZWTnQtN3vRcPed041CVjbQ4PDD73M4DVUDWaXyLtZgLCu6kyeX +hnO0yND+ZUso//lcxiOPhirllsly/ZYgywqcrcqnoXGe8oFrbEtYZd6W5VVE +Q+1YkTO/Aiyh3j/2v4ZyGlY2B5QHDVsAs3o6LewlDU3dpn6zus2BZvt2cGSc +hrV+co6inaaQLxbJYv6m4ZbObXx85aYg/E0p/uokDb3KUscVrprCdMgFquEs +DfW+tsY0O5pC2S24kLlMw6s+FN/8gR2g8v2+sr2AFjKH28ye/WcCW6MuhdZr +aeHly9JbUzSMoUb3zmpLuhZ6zU46HiYZg81cXco7PS3c0Z665PrHCEL9ZopH +9bXQuNyB71mdETQ5u37htdTCke89P1WsjMBLh2a+z1ULtf0+GecHGMK9/76I +TV8g1sd2Goy91Qdmyb+CiDgt/Hus0pvzsT50HBGhrU3UQou3q3fqZevD38+W +NpQrWlgyef/hBn99MG9jxeAtLTSVYQnJ8urDWFHCz/hS4nyy4VNeWwQFT506 +uQ+Ev8YWt1o+MeDyJqu/0f1a2DoVS9JhM2D6kxt1cEALT58WjupOYkCtU3xR +5pAWZskJO2QbMMDW5lOayE/C/tKWE94FenBS99wxbg5tjBqttS0+pQtN/G9l +fspp4/u+yKOJJjqg3PbN2WKrNgaKvQy7LqsDKfF/0+4paOPf7hUH3qzUAee1 +sryHVLTRtDN+srxOG37/C/47oK2NJgFj+sd0tYE0Kt7ZbqGN7lvWq4fStcCz +1iumPEAbhauejWbYU+GX71iIcZA2+q3RmJWgUSFU4qhPd7A2nn9tV9dCosKl +U/628+HaqHB+tjy/VxMe0oOl9WK1cY97U9zu/ZrwrzK6piFDG09J3ol1D9CA +lAeZ0x0N2rjoXuE6W64G4gekR91faOOlDn/VYxlqcIc3t2+6SRublaVyeaPU +gO17p570Rht9llwr2BZq8FGxOMmpVxsTc9WKa76qwtaCx0qD49q4PmB4yVlC +FeqyuzwmhXXQJ6B9VZ61Mny2lDkQLKqDgTFfFYY3KwPHH9+9CxQdTNiZf9dj +XgkMdq21Wi2tg8N2SaHCuUrwYgVdi6ygg6R1VruY84rQ6pbFrc/UwYFd4Q+P +PlCAD7LeJUmHdPBmhEaP+Y6tsNBeWSB8RAfNxMT54zdtBfEIztsZPsT/U0s6 +OJa2gMu7m2l5xwj7N14PR1dsgc/n2qLYYTp40LhR+7v8FhgZ1rT7nKiDz9V5 +MucF5GG6YHlOhaWDkgynByd5ZWHYwST74mMdXNPI5q2f3Ay9qxJMh6p18Lqv +yy3Vd5uh2pVy/dpTHdSQqrwceXMznBWl0hebifNlvC8+KW0Gvgvep17162Ch +GXnV2d2bQOnwOw7PlXQcfZ/VL1YrDZLC4vdqV9ExQUlSveuONPA1uO0SXUsn +7sN4i/sJ0jAlOZHTsp6OvQmvtz5zkYaq7nWG6sJ0FAjfsbd7SQpMTfDc8hY6 +eg1ItFokS4K7XBF3xk46ppCqgxyGxCDs+X5veRs6JnvTX09UikGSp0BLmS0d +J5qub3h9SQxq7pyMb3Gko6DX2/dmGmIgJG+6cfEgHS8us/6an6fAC/lvQq7B +dNQ0MyRL6ZJBYauUtHwWHdvz9HXr20iATR1RZTl0/O9GdvVUIQkcvGK/MPPo +GHjble0cS4Logp+5jvfoaNP4bqqTQYL+rTVyFx/RUfEvScb6gTAkbturOP6S +sDcR+492UwgmFa7QyibouLvtdUnXDQHobUVjwSk6Zvy4dMEnUgCe+v2yC5qh +Y/2Wkn8K7gKQWGYWQPtLx4gHRwc2KQqAAp2juIpTF7Pbo55M1PCDm5mvTANJ +F8nmTI+eET7oOrxjQ5eeLt7k36D3pYwXqrlnKFTQxaE1Ucn+0byQW5S77Zq+ +LpakqhYY7OaFY78XTfaY6GKoxr57FbM8wBNSfqbfWhc11t/hfM7kAZNYmbmv +brpIHWx8Tu9bD+y8hS8zF3Tx9rbut3KG3EAzDJozj9PFvafmD3iJc0PFl/EN +2Qm6+MHrWtXgDBeUSQ5omafoolLBi6KIe1xQnP40IfOGLn6LkPU3EuSC7Phz +OjtKdPHd9Vq57ok1cDFoY3J6py7anCv2kOlYBVyCF/J/vtPFWqMXfZ2lqyC2 +lKPGoFcXe/ZJh1Ykr4KYX5PD4/26hJ6tZVbbroLTXl16+sO6OKXwzqKtixOO +O18f/T6vi3dNgkt7B1eCk9Fm1JXUw9MZ/hXiUitgsYuLt0Ga4LPJ1nMrVkC2 +568+88166B2XWsDxjQOGYx+HOG3VQ0/TmKjMIg443mz94KS6Hg4nFjGW6Rxw +yeqUJNtED4P81NI1GpeYVXve/dP0J/b/VTn/PmuB6fK96lVNgB7OqW9ZYhxb +YHKEZacbBemhXgHnl9+4wDS54aO5+6QeepXsFKYP/WV2fFxxNDBaD9eQPpzf +p/iXOea2va80TQ9bT+yT8m+eZ4r5nn+8/ake8gQaG3zUmWUmLh+ixtXrodDz +I873hWeZK1NMSkca9TC3zUi2YnKGOVa5+l52sx6G1+lGeBfOMKs4YtIFOgn7 +bZzF7pIzTKfUqJDZb3q4o9aPz5JvmplefZJau56B38wf6Y+R/2NusNpbSuFl +YEnm6fvi/yaZUZ+1lUP4GFitdu5CxMAk02v1vKyqMAObvW9FNN+eZGpZBwvl +SjJwXachf7TqJLN78PjUOTUGGg199zW0nWAKrztautORgYXugRdOe/9k5hlG +hE3sZaB3zSaO9xo/meoRiYZXnBk43Pnm3pXFcabVxMN3vQcZmBOaJLolZZwZ +2z3zx/0oA4Nf3GNW1P1gzudGGoSdYeDk97nEUcUx5gfdK535RQy0bz+0557R +CNPrRN5NsxIGMibaR0ZER5izJRWe4w8ZKPar41LQz2GmwKbeObVKBn7wT+QI +ThtmWnBJiD95ykDWw4aL639/Y9Z05Xt0vmPgyB1mmkDxV6Y5L1s5uJeBdvxi +ZbMxX5m9O5pnRfsY2Jeqxiuz/ytzuurHhf2fGfgqsPmBCf9XpnKO6v3vYwzU +tnZsbgobYtZ80A+O/8lAeVoSucN+iGkuZAcqEwx8tF2VW1JtiHno/Im3QTMM +POKpznlqdJA5/TQ2Q2SegcvFacoJjYPMs3/T3Kv+MjCP4qX1KXuQyad5T8ll +kYFKdJeygIhBZqZv1czyMgPVOgdUjZwGmf8Dp23ESw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk4lF8bx5UWKrIOM/ZCZck6g2Hmvq3ZQoQSJUuJkAiRKNJiCSlS2ZKE +FGEmRKEiihCKVBSSip+1hPd5/3quz3XOee71e58j4+Zv67mSg4Pj+QoOjv9/ +ZweaG2Xj8piqVGrA4A0bZlem6En93rMgLn/5fnLodkDhNjfR3hS4xzv8zjSU +CcE2hT2cvbmwhv59kSfUCvh/iaT86SkDL0O/wWsh++FTjZX/dE89cDgez5s+ +4QcmsmMfJ3s6wHw45NpF/9Pwp0fr6kTPIMjQxZ3/2CdCg+HdvLe5UyD3z0/y +p3wWiH96POymtAiqk+FuxbfyQejogcK1hpy4Z1DQQ/2/YkhRM6m2sudCi9wX +7CdRpaDSt3cHw4sL23X8k7bFlUJrjG+nYjgXNhiqxCVeLYU1vak/uHK4UEF5 +70fDwlIIPz0k1jDOhTtw7a19naXg0RJ1SiuGGxPnJAf0ZMuA5lnNkH60Djn5 +ZedKn5ZBJ29bM++LdSiYvtZH71UZHGMP2i/2rkOKV/Wdus4yKFy/zu/D0jos +ntLzfDhcBlJlezJTzdejUKbZc/qGR8C1PLPENbge1808/zhh/wjep6s+neTj +QY6mFWs6hh5BRmfRxmA5HrRpqePb9vMROPFuOfBXhwfJ6c9MQ2YfQX+0xNJK +dx58UXGQ9oerHD77rdMTquDBU4W0+hTlchg1+sqi7eXF0KvxZyknymF+Iu1B +eM5GjCh3V/ZdLIfHioLLyxUb8frLI0fvrK6AsEOJVjGvNmLZ04wrXTwV8K8v +5mf81EZc7ZdwRUSyAqKG2MJtm/iQcilZQZVZATFv7th9DuLDXW2MXYWnKiAu +L7JtJZkfB9ZHV7L/qwBzzSMCwpv50V5CRqHwTwVwNdrab1Hmx9VGoQ9TOCoh +Zkiuz0KfH9+Ytk2a8lbCqU2tw6lH+PHj3z4V822V4JctuiRfxY8VhW/+y3Sp +hF03S5Us9gmgU2Dh1YS6SuBTuuHv4imARttUJVyfV8Kb6pgyf38BTCvPyd/W +UgnmfY7aqdECmBHBqs3prgQDypLhxyIBLHzyj0P+ZyVoppvv8/8ngBPxji2n +RVkgkjp08cotQfRMOnf5uBcLRBUrYubzBTFZAsa6jrKAUh8b6fJQEDnTQ0NU +AlggObHtxJYGQeQYMFB8fZIFcpbHXKtHBTGUc/Waokss0Fi1SBvSEMJZ28hV +k4Us0LzxRs2UIYQnbLe87C5hAU09W+m+iRCmX0t5Xl7GArqr4aaQvUK4ajo1 +dG8VC/RrLvKsjxTCJ3+dW42bWWAdRPqq/org14ufC7+xwGb96EBapxBmxbXW +Cn1ngW3u4/f/+oXQ/Gzdt+BxFji0O7e9+C2EM0VzArJTLHBRul3lJCyMVvo9 +azZxsMHnq0ryWVdh7Lc5b3BflA1Hw1fEjxwRRsUAtspNMTb4CXTGWgYKo7OB +f0i0JBuOY/ApUqww5vlYi+nKsuHkzZrDhUXC6Gnd32Olwobzu82YHbPCKLX0 +1pTbiA2U8jeUlStIeIR/reYjEzaUCO6eU1tPQr/kcvpuMzZ0d+x/mCxFwlSz +HznhVmyQ3RW0aZcpCeV5uXlc97CB/fDPUpQtCbfek+RucGKDJV9k30NnEn7h +EVGVcGFDYNvFVL4AEuowX6xhHWRD/c6sNe3XSbius4PvjDcbHO7LDi3fJiHX +08u3bh1lw9iGwjqVEhJmUAc8S/3YwN9aHnq5noRFg99Ka4+zwdX81ZjVDxJa +hD84cSyMDYsmM29e64ng+bHiYvULbEjKDytaNBHBzXOLKxovEv6u4bigvEsE +OVt+sSzjCP+er9NP8BTBwZ03rI0S2ZBhKP3IMlEER6LTglqvsGH77TuXT6WL +oL4TQ5h8lfB3peLR4lwRVH7cqeByjQ3fn1HlNrBEMD7Ttq4lnQ3aaJHW8olg +Q4leg1tsaM1qD1z4LoLVekXeFpmEv8v2NorTIkj2zjlvkUXkv9aVO45LFEf4 +e33Uc4j8Sw5/qxIQReOEYm1yLpH/CJ/6MXFRzKHx35gjuFsvONxcTRTze4YU +b+SxwfvmgmOYriiOqnG7ut4h4l+I0iw0FkUIUaZK5BPxVsf95HYSRanr/G8i +7hL1ofC/0vEQRS92UZpMARF/2LX8I37EOv7heUJwoE7Ogeazoujpk7Kh7x4b +zLN5py3iRZH9olfFvpANm9aeuvDmqih2xI2INRH8x/e7+K4sUYyLonVqFLGh +vcuhtLNAFGsycU86wQW6jcYOZaJowB9zf4bgyFy1D73VorioevadRTFRb+4s +v33PRfHPmbqODIK3H9vAOfBGFK0eNtwdJHh1z8k0117ifALZcfN9NvQzRhSH +voii2QbrIWeCy/N2P/X8IYpzMGN1meC49fW7R6dFUcAx+2YVwW7HVb57L4li +0vWRNwME09/fjPi5loxxnp6jCwTz4zqBY/xkNFBi/eAvYcNofkj+fxQySvpH +9EkTXMfzjX5ClowZNfuqthJ8Lci2bU6ZjDvuz1/aRrBfX517mBYZqz4vWm8m +2NhAef4fkjHpr8gGEsHi9zLiI83JaJ01+2wFwdMbuWRW7iaja4Bl0DBhvyX4 +REWMCxl5eNvkGgnO/ThotvYwGXet03qfQfBJI5uBi8fIOPIbkr0Jtil6cnxD +GBll6QU2GgRvFVBcezmajEO2apQZIl/Loek3+BPIGH45a+IBwd2fVqumXiNj +unJVtzvBJSaBjaRsMm6zsWjjI9hZyOqn2CMyUklcnA5EfTTCq89k1pBx0qXb +8BdR33WDW0kyL8gYdtQ1N5Lgxw84Qf49GQV9NjQmEP2RRAroLBgk4/r7I/Hr +CPaKGDisOE7GvXaTp6OIfiJZPE5SXSZjiaLMmCPRfz9L5eUecVFwaZ505DHR +n42iqY+pAhT87fRBXIjgwGG/QbocBW8Ynt9eQfR3+xlZTWMLCu53gJ35hD7u +jiY3vdxNwUjt3c/fZrPhtPWys/l+Cupkz12cJfSkLPHhnHUABYNEFlcpEXq7 +xL7cszeNgjuTKSI7MthwUGrRpz+bglnLBaaM64ReY705DhRS0O6+yiclQr8j +dsbbPJ5QcLVz3I55Qu9Gv/+G+Q1R8FdjmzMmE/UwTVV4Nk7Bx8FnXLmSiHzm +KH8QnKXgNeONm18R80N0t6vOYy4xXLrEmqDHs2Gc/XyOc7sYfs86s7Ijlg1X +ziYFXQ8Vw/NC7vd6iXnV1LdNdvyMGO6LjljDPMmGf5oNncw4Mbx+0dbuVggb +Do3MqH+9JYajWiVNZkFE/1rum9zeIIaOQYphTr5sGBSW92vkEUfBmZZal/1s +EPGvkxARIbjsvxR3Z0LfTXteH5EWx3aphovuxDyuDItT2qghjl6XXMd3ORD5 ++TQxtnePOA4NTn4e3ckG9XvVh3/niuM+5fNeK/XYcEZv10GKtgRKX3trvyDI +BtP9mf9pGUjgiVfyDH5+NvBG/Yi2t5RA3hU11dK8bLjZcC4/yVUCDxXuTlLi +IuaNedWPNRcl0LU3SHB+gQUTezYHT72XwJXUO0fcBlmw/8TMpdZwSXyysPDn +NnHfyqUZiI+dk0R23tbTM/ksIn+X769NkkSuHbcU9G+zIOzftnaDPEls+zHB ++/IGC65G7xd+3CqJU0+unk+IZ0Fr8susOxJS2HRTxobbl7ifS66Xn66Twmd2 +lYyP21hg1PNm8VeTFPaIFqxukmOBFceqHQc6pDA8OZteIsMCd1u/9/BNCjdN +0BeOkllgEi4TGbVaGlHW1qiciwXHpGZv6ytKo1eGtJvvcCU0Hs762RAsjWld +fJZ3Mivh6PxkVBOPDJbCGWtuzkqgBxwiDQvIYDp/fHDUIvGeGvtQxCkqg3Uv +Dx2emquAO30N3cxNMigS9q6qdbwCBmqvKlXQZPDtlfTKnd0VYH1OpzfngAzu +N/YKSCioAHWBMyrhpTJ4V9n78BbzCvijyDegbL8JRwUn8j+dLQe9ouLsa9c2 +46d7Ca/0+8pgUsDc1aFeFmt/6e98RiuFr/GuDsfXyiPzn6pb7/MSMPsdYvaN +tgUz2pN/7XItgnF3rsDyyK24w6DgSt6bu8R7X2Tl+fpteHXTy/zvEXkg8Fo+ +8eFvBYyceC24KTMHxC88sKHRlPAU85lDRMItSFfU4RM8rIxPP7XNNLamwyuK +PnUqeTui9jEp16JUoIvXJ6l0q2C4eu+A+fMk4OXMDTp4VhV3kAefZlnFwZo/ +dXaTMaroEtnBy6LGwdKvj+pnzqviis0nfn8Sj4PfH8iT2fGqeLKWbH3oxyVo +L0v2/XxNFb/7d3UYXbwEKW5nDh0oUsVZap6mYdNFINW77nHpUkWFuNP1JLsL +IHlGSm+vvBrGKF33SMs4ByWBXJs+blXD89UDvczYc8A8NLn2oKIaJsVMp8wE +nAMXi4ZOL1U1TBkdqkkyOwc3hQ/7hNLV0KI8Uy7iTwyQC0sy0qzU0HVKRn2r +cwwIdTL+vAtWwyPBqfzXlKKBW8650valGtYnTdcazEeBNxnMi5rV8FloMk/e +aBS84tk0wNmqhmmmXBT+91EQPzuyuqJdDc2erbLnrYoC3qZAe5EPatg596Ak +9VQUCPjETfeNq6Egu7ylhTMKxEur1D0F1PFAydhcEPU0bGeQH4S4qKPr8pmq +7I4weLT5yMJKV3XsLvliU1UZBtrrHu9IdFPHmmYlvvGMMDDo2fM577A6nv3N ++ybNPQwcAtL5OwLUseuh8l3e2ZMQeUckSClWHd8VZ3QflToJ7TwknS8l6njb +Pb4vOjoEjg8INJhzaOBCznjhWEIQNL1wflK4UgMrN2Qpk04GgeSDfNa61RoY +4zGbYucRBK8i6cWvuDXwBjW5h1M3CDbJuF01F9TAPXvWr9X5Hghv3UsPm8tr +YMujvMUfpoGg+t16g7mlBjJ+cg7JCh+H31Px9mbpGmgk5PPga40/9PfmONzK +0MBAAzte2Zv+8OpJpePkTQ3UH4kPjQr3h7zzn/dez9HAYwuvJZPo/uAkprn/ +e6EGqrdsjOaq8oPnBn2HLj7RQCGRLyaWtb5wI3lbaPOgBm69rCl3rc8HLgQz +T0p808Av+dvv2tT6QPA+u7CAEQ3sVwt6JpfjAzZyEafI4xqYbhN1XOqwD6x5 +3B51ZEYDVeiFpVbT3hDwOeQiN5cm3hZJJMULesMOlRcZZsqa+LyE9mDZwwv2 +rDHd3a6iiQvSny+XmnqB98dmHkd1Tbz16eyKKCUvSIx7HeWhpYnuJBPd49OH +oXuk61CkviZK90LMvXOHwSN7SL3CXhNtE8/5Wt8/BGf5V7RIn9bEc16ja/v4 +PCF19GzM3ShNDORvEZua84D8ulXM7dGamPuJNiX7yQNe+XKV6l7QxMU07mvv +7nsA/6uNaQ4pmujD99ray9IDss9Kusfna+KJRlI/JrpD7ZTuwtwbTeyZ/75W +UdYNclpZbnZvCf9dEpyaNrpBzB2NVyWdmpjx0bjr5MJBMHNUvO7Zq4mqlw4v +iHYehK4qilbnF02MszhjbRJ9EMbO/DleMq2Jpov236xGXIHExxrzoFDxtmNn +gU34Afgzqm77VJyKHoO1ww6OB6D/WcljMSkqKte6njqjcQByAvMvdGymIkXh +kabh+H5Q6rkqj8pU3Ow6G3viwH4wyAxyE0MqnkuT3xNu6QJ+Suof3npSMaS1 +IUEP98GJOcrfA15UnJ/6oTYusQ9O1XNSfnlTcf9Ve2r9ghPE7Xm3d90xKlLX +DDR/ZjlBQUzoe4MwKr5dW8n8quYEg/21vY8SqRg+vc/6m9JecEiw6LnKomJL +wIXmfoYjuOzRnNtcRUUjz8B9QtKO4LFZQqSshopL3pf/+q50hMDHvxzePKNi +lfCR/tiXDpD0Lbl7TSsVK5iQbmHnAK8Yve9CPhP+J9rHrQqwB8Yvj6693DQ8 +ww08Do12QKrekVuznoZqg1H8xsV28Ou8wjEpXhpunlB0tEq1g0yZifXfBGiY +ENBp9MDDDpZ2hxseE6fhs9y3y3fX2EFddXJZrAqxX+Tj5wPWtqB/sTbpkT0N +m0dz6UZTNkBxyNlP2kNDu64g450DNvDfphilk040vDdJv+3bbAO5NWZNzAM0 +3K61Y2kqywZWTnQtN3vRcPed041CVjbQ4PDD73M4DVUDWaXyLtZgLCu6kyeX +hnO0yND+ZUso//lcxiOPhirllsly/ZYgywqcrcqnoXGe8oFrbEtYZd6W5VVE +Q+1YkTO/Aiyh3j/2v4ZyGlY2B5QHDVsAs3o6LewlDU3dpn6zus2BZvt2cGSc +hrV+co6inaaQLxbJYv6m4ZbObXx85aYg/E0p/uokDb3KUscVrprCdMgFquEs +DfW+tsY0O5pC2S24kLlMw6s+FN/8gR2g8v2+sr2AFjKH28ye/WcCW6MuhdZr +aeHly9JbUzSMoUb3zmpLuhZ6zU46HiYZg81cXco7PS3c0Z665PrHCEL9ZopH +9bXQuNyB71mdETQ5u37htdTCke89P1WsjMBLh2a+z1ULtf0+GecHGMK9/76I +TV8g1sd2Goy91Qdmyb+CiDgt/Hus0pvzsT50HBGhrU3UQou3q3fqZevD38+W +NpQrWlgyef/hBn99MG9jxeAtLTSVYQnJ8urDWFHCz/hS4nyy4VNeWwQFT506 +uQ+Ev8YWt1o+MeDyJqu/0f1a2DoVS9JhM2D6kxt1cEALT58WjupOYkCtU3xR +5pAWZskJO2QbMMDW5lOayE/C/tKWE94FenBS99wxbg5tjBqttS0+pQtN/G9l +fspp4/u+yKOJJjqg3PbN2WKrNgaKvQy7LqsDKfF/0+4paOPf7hUH3qzUAee1 +sryHVLTRtDN+srxOG37/C/47oK2NJgFj+sd0tYE0Kt7ZbqGN7lvWq4fStcCz +1iumPEAbhauejWbYU+GX71iIcZA2+q3RmJWgUSFU4qhPd7A2nn9tV9dCosKl +U/628+HaqHB+tjy/VxMe0oOl9WK1cY97U9zu/ZrwrzK6piFDG09J3ol1D9CA +lAeZ0x0N2rjoXuE6W64G4gekR91faOOlDn/VYxlqcIc3t2+6SRublaVyeaPU +gO17p570Rht9llwr2BZq8FGxOMmpVxsTc9WKa76qwtaCx0qD49q4PmB4yVlC +FeqyuzwmhXXQJ6B9VZ61Mny2lDkQLKqDgTFfFYY3KwPHH9+9CxQdTNiZf9dj +XgkMdq21Wi2tg8N2SaHCuUrwYgVdi6ygg6R1VruY84rQ6pbFrc/UwYFd4Q+P +PlCAD7LeJUmHdPBmhEaP+Y6tsNBeWSB8RAfNxMT54zdtBfEIztsZPsT/U0s6 +OJa2gMu7m2l5xwj7N14PR1dsgc/n2qLYYTp40LhR+7v8FhgZ1rT7nKiDz9V5 +MucF5GG6YHlOhaWDkgynByd5ZWHYwST74mMdXNPI5q2f3Ay9qxJMh6p18Lqv +yy3Vd5uh2pVy/dpTHdSQqrwceXMznBWl0hebifNlvC8+KW0Gvgvep17162Ch +GXnV2d2bQOnwOw7PlXQcfZ/VL1YrDZLC4vdqV9ExQUlSveuONPA1uO0SXUsn +7sN4i/sJ0jAlOZHTsp6OvQmvtz5zkYaq7nWG6sJ0FAjfsbd7SQpMTfDc8hY6 +eg1ItFokS4K7XBF3xk46ppCqgxyGxCDs+X5veRs6JnvTX09UikGSp0BLmS0d +J5qub3h9SQxq7pyMb3Gko6DX2/dmGmIgJG+6cfEgHS8us/6an6fAC/lvQq7B +dNQ0MyRL6ZJBYauUtHwWHdvz9HXr20iATR1RZTl0/O9GdvVUIQkcvGK/MPPo +GHjble0cS4Logp+5jvfoaNP4bqqTQYL+rTVyFx/RUfEvScb6gTAkbturOP6S +sDcR+492UwgmFa7QyibouLvtdUnXDQHobUVjwSk6Zvy4dMEnUgCe+v2yC5qh +Y/2Wkn8K7gKQWGYWQPtLx4gHRwc2KQqAAp2juIpTF7Pbo55M1PCDm5mvTANJ +F8nmTI+eET7oOrxjQ5eeLt7k36D3pYwXqrlnKFTQxaE1Ucn+0byQW5S77Zq+ +LpakqhYY7OaFY78XTfaY6GKoxr57FbM8wBNSfqbfWhc11t/hfM7kAZNYmbmv +brpIHWx8Tu9bD+y8hS8zF3Tx9rbut3KG3EAzDJozj9PFvafmD3iJc0PFl/EN +2Qm6+MHrWtXgDBeUSQ5omafoolLBi6KIe1xQnP40IfOGLn6LkPU3EuSC7Phz +OjtKdPHd9Vq57ok1cDFoY3J6py7anCv2kOlYBVyCF/J/vtPFWqMXfZ2lqyC2 +lKPGoFcXe/ZJh1Ykr4KYX5PD4/26hJ6tZVbbroLTXl16+sO6OKXwzqKtixOO +O18f/T6vi3dNgkt7B1eCk9Fm1JXUw9MZ/hXiUitgsYuLt0Ga4LPJ1nMrVkC2 +568+88166B2XWsDxjQOGYx+HOG3VQ0/TmKjMIg443mz94KS6Hg4nFjGW6Rxw +yeqUJNtED4P81NI1GpeYVXve/dP0J/b/VTn/PmuB6fK96lVNgB7OqW9ZYhxb +YHKEZacbBemhXgHnl9+4wDS54aO5+6QeepXsFKYP/WV2fFxxNDBaD9eQPpzf +p/iXOea2va80TQ9bT+yT8m+eZ4r5nn+8/ake8gQaG3zUmWUmLh+ixtXrodDz +I873hWeZK1NMSkca9TC3zUi2YnKGOVa5+l52sx6G1+lGeBfOMKs4YtIFOgn7 +bZzF7pIzTKfUqJDZb3q4o9aPz5JvmplefZJau56B38wf6Y+R/2NusNpbSuFl +YEnm6fvi/yaZUZ+1lUP4GFitdu5CxMAk02v1vKyqMAObvW9FNN+eZGpZBwvl +SjJwXachf7TqJLN78PjUOTUGGg199zW0nWAKrztautORgYXugRdOe/9k5hlG +hE3sZaB3zSaO9xo/meoRiYZXnBk43Pnm3pXFcabVxMN3vQcZmBOaJLolZZwZ +2z3zx/0oA4Nf3GNW1P1gzudGGoSdYeDk97nEUcUx5gfdK535RQy0bz+0557R +CNPrRN5NsxIGMibaR0ZER5izJRWe4w8ZKPar41LQz2GmwKbeObVKBn7wT+QI +ThtmWnBJiD95ykDWw4aL639/Y9Z05Xt0vmPgyB1mmkDxV6Y5L1s5uJeBdvxi +ZbMxX5m9O5pnRfsY2Jeqxiuz/ytzuurHhf2fGfgqsPmBCf9XpnKO6v3vYwzU +tnZsbgobYtZ80A+O/8lAeVoSucN+iGkuZAcqEwx8tF2VW1JtiHno/Im3QTMM +POKpznlqdJA5/TQ2Q2SegcvFacoJjYPMs3/T3Kv+MjCP4qX1KXuQyad5T8ll +kYFKdJeygIhBZqZv1czyMgPVOgdUjZwGmf8Dp23ESw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0964075054441099}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0964075054441099}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwVlnk4lF8bx5UWKrIOM/ZCZck6g2Hmvq3ZQoQSJUuJkAiRKNJiCSlS2ZKE +FGEmRKEiihCKVBSSip+1hPd5/3quz3XOee71e58j4+Zv67mSg4Pj+QoOjv9/ +ZweaG2Xj8piqVGrA4A0bZlem6En93rMgLn/5fnLodkDhNjfR3hS4xzv8zjSU +CcE2hT2cvbmwhv59kSfUCvh/iaT86SkDL0O/wWsh++FTjZX/dE89cDgez5s+ +4QcmsmMfJ3s6wHw45NpF/9Pwp0fr6kTPIMjQxZ3/2CdCg+HdvLe5UyD3z0/y +p3wWiH96POymtAiqk+FuxbfyQejogcK1hpy4Z1DQQ/2/YkhRM6m2sudCi9wX +7CdRpaDSt3cHw4sL23X8k7bFlUJrjG+nYjgXNhiqxCVeLYU1vak/uHK4UEF5 +70fDwlIIPz0k1jDOhTtw7a19naXg0RJ1SiuGGxPnJAf0ZMuA5lnNkH60Djn5 +ZedKn5ZBJ29bM++LdSiYvtZH71UZHGMP2i/2rkOKV/Wdus4yKFy/zu/D0jos +ntLzfDhcBlJlezJTzdejUKbZc/qGR8C1PLPENbge1808/zhh/wjep6s+neTj +QY6mFWs6hh5BRmfRxmA5HrRpqePb9vMROPFuOfBXhwfJ6c9MQ2YfQX+0xNJK +dx58UXGQ9oerHD77rdMTquDBU4W0+hTlchg1+sqi7eXF0KvxZyknymF+Iu1B +eM5GjCh3V/ZdLIfHioLLyxUb8frLI0fvrK6AsEOJVjGvNmLZ04wrXTwV8K8v +5mf81EZc7ZdwRUSyAqKG2MJtm/iQcilZQZVZATFv7th9DuLDXW2MXYWnKiAu +L7JtJZkfB9ZHV7L/qwBzzSMCwpv50V5CRqHwTwVwNdrab1Hmx9VGoQ9TOCoh +Zkiuz0KfH9+Ytk2a8lbCqU2tw6lH+PHj3z4V822V4JctuiRfxY8VhW/+y3Sp +hF03S5Us9gmgU2Dh1YS6SuBTuuHv4imARttUJVyfV8Kb6pgyf38BTCvPyd/W +UgnmfY7aqdECmBHBqs3prgQDypLhxyIBLHzyj0P+ZyVoppvv8/8ngBPxji2n +RVkgkjp08cotQfRMOnf5uBcLRBUrYubzBTFZAsa6jrKAUh8b6fJQEDnTQ0NU +AlggObHtxJYGQeQYMFB8fZIFcpbHXKtHBTGUc/Waokss0Fi1SBvSEMJZ28hV +k4Us0LzxRs2UIYQnbLe87C5hAU09W+m+iRCmX0t5Xl7GArqr4aaQvUK4ajo1 +dG8VC/RrLvKsjxTCJ3+dW42bWWAdRPqq/org14ufC7+xwGb96EBapxBmxbXW +Cn1ngW3u4/f/+oXQ/Gzdt+BxFji0O7e9+C2EM0VzArJTLHBRul3lJCyMVvo9 +azZxsMHnq0ryWVdh7Lc5b3BflA1Hw1fEjxwRRsUAtspNMTb4CXTGWgYKo7OB +f0i0JBuOY/ApUqww5vlYi+nKsuHkzZrDhUXC6Gnd32Olwobzu82YHbPCKLX0 +1pTbiA2U8jeUlStIeIR/reYjEzaUCO6eU1tPQr/kcvpuMzZ0d+x/mCxFwlSz +HznhVmyQ3RW0aZcpCeV5uXlc97CB/fDPUpQtCbfek+RucGKDJV9k30NnEn7h +EVGVcGFDYNvFVL4AEuowX6xhHWRD/c6sNe3XSbius4PvjDcbHO7LDi3fJiHX +08u3bh1lw9iGwjqVEhJmUAc8S/3YwN9aHnq5noRFg99Ka4+zwdX81ZjVDxJa +hD84cSyMDYsmM29e64ng+bHiYvULbEjKDytaNBHBzXOLKxovEv6u4bigvEsE +OVt+sSzjCP+er9NP8BTBwZ03rI0S2ZBhKP3IMlEER6LTglqvsGH77TuXT6WL +oL4TQ5h8lfB3peLR4lwRVH7cqeByjQ3fn1HlNrBEMD7Ttq4lnQ3aaJHW8olg +Q4leg1tsaM1qD1z4LoLVekXeFpmEv8v2NorTIkj2zjlvkUXkv9aVO45LFEf4 +e33Uc4j8Sw5/qxIQReOEYm1yLpH/CJ/6MXFRzKHx35gjuFsvONxcTRTze4YU +b+SxwfvmgmOYriiOqnG7ut4h4l+I0iw0FkUIUaZK5BPxVsf95HYSRanr/G8i +7hL1ofC/0vEQRS92UZpMARF/2LX8I37EOv7heUJwoE7Ogeazoujpk7Kh7x4b +zLN5py3iRZH9olfFvpANm9aeuvDmqih2xI2INRH8x/e7+K4sUYyLonVqFLGh +vcuhtLNAFGsycU86wQW6jcYOZaJowB9zf4bgyFy1D73VorioevadRTFRb+4s +v33PRfHPmbqODIK3H9vAOfBGFK0eNtwdJHh1z8k0117ifALZcfN9NvQzRhSH +voii2QbrIWeCy/N2P/X8IYpzMGN1meC49fW7R6dFUcAx+2YVwW7HVb57L4li +0vWRNwME09/fjPi5loxxnp6jCwTz4zqBY/xkNFBi/eAvYcNofkj+fxQySvpH +9EkTXMfzjX5ClowZNfuqthJ8Lci2bU6ZjDvuz1/aRrBfX517mBYZqz4vWm8m +2NhAef4fkjHpr8gGEsHi9zLiI83JaJ01+2wFwdMbuWRW7iaja4Bl0DBhvyX4 +REWMCxl5eNvkGgnO/ThotvYwGXet03qfQfBJI5uBi8fIOPIbkr0Jtil6cnxD +GBll6QU2GgRvFVBcezmajEO2apQZIl/Loek3+BPIGH45a+IBwd2fVqumXiNj +unJVtzvBJSaBjaRsMm6zsWjjI9hZyOqn2CMyUklcnA5EfTTCq89k1pBx0qXb +8BdR33WDW0kyL8gYdtQ1N5Lgxw84Qf49GQV9NjQmEP2RRAroLBgk4/r7I/Hr +CPaKGDisOE7GvXaTp6OIfiJZPE5SXSZjiaLMmCPRfz9L5eUecVFwaZ505DHR +n42iqY+pAhT87fRBXIjgwGG/QbocBW8Ynt9eQfR3+xlZTWMLCu53gJ35hD7u +jiY3vdxNwUjt3c/fZrPhtPWys/l+Cupkz12cJfSkLPHhnHUABYNEFlcpEXq7 +xL7cszeNgjuTKSI7MthwUGrRpz+bglnLBaaM64ReY705DhRS0O6+yiclQr8j +dsbbPJ5QcLVz3I55Qu9Gv/+G+Q1R8FdjmzMmE/UwTVV4Nk7Bx8FnXLmSiHzm +KH8QnKXgNeONm18R80N0t6vOYy4xXLrEmqDHs2Gc/XyOc7sYfs86s7Ijlg1X +ziYFXQ8Vw/NC7vd6iXnV1LdNdvyMGO6LjljDPMmGf5oNncw4Mbx+0dbuVggb +Do3MqH+9JYajWiVNZkFE/1rum9zeIIaOQYphTr5sGBSW92vkEUfBmZZal/1s +EPGvkxARIbjsvxR3Z0LfTXteH5EWx3aphovuxDyuDItT2qghjl6XXMd3ORD5 ++TQxtnePOA4NTn4e3ckG9XvVh3/niuM+5fNeK/XYcEZv10GKtgRKX3trvyDI +BtP9mf9pGUjgiVfyDH5+NvBG/Yi2t5RA3hU11dK8bLjZcC4/yVUCDxXuTlLi +IuaNedWPNRcl0LU3SHB+gQUTezYHT72XwJXUO0fcBlmw/8TMpdZwSXyysPDn +NnHfyqUZiI+dk0R23tbTM/ksIn+X769NkkSuHbcU9G+zIOzftnaDPEls+zHB ++/IGC65G7xd+3CqJU0+unk+IZ0Fr8susOxJS2HRTxobbl7ifS66Xn66Twmd2 +lYyP21hg1PNm8VeTFPaIFqxukmOBFceqHQc6pDA8OZteIsMCd1u/9/BNCjdN +0BeOkllgEi4TGbVaGlHW1qiciwXHpGZv6ytKo1eGtJvvcCU0Hs762RAsjWld +fJZ3Mivh6PxkVBOPDJbCGWtuzkqgBxwiDQvIYDp/fHDUIvGeGvtQxCkqg3Uv +Dx2emquAO30N3cxNMigS9q6qdbwCBmqvKlXQZPDtlfTKnd0VYH1OpzfngAzu +N/YKSCioAHWBMyrhpTJ4V9n78BbzCvijyDegbL8JRwUn8j+dLQe9ouLsa9c2 +46d7Ca/0+8pgUsDc1aFeFmt/6e98RiuFr/GuDsfXyiPzn6pb7/MSMPsdYvaN +tgUz2pN/7XItgnF3rsDyyK24w6DgSt6bu8R7X2Tl+fpteHXTy/zvEXkg8Fo+ +8eFvBYyceC24KTMHxC88sKHRlPAU85lDRMItSFfU4RM8rIxPP7XNNLamwyuK +PnUqeTui9jEp16JUoIvXJ6l0q2C4eu+A+fMk4OXMDTp4VhV3kAefZlnFwZo/ +dXaTMaroEtnBy6LGwdKvj+pnzqviis0nfn8Sj4PfH8iT2fGqeLKWbH3oxyVo +L0v2/XxNFb/7d3UYXbwEKW5nDh0oUsVZap6mYdNFINW77nHpUkWFuNP1JLsL +IHlGSm+vvBrGKF33SMs4ByWBXJs+blXD89UDvczYc8A8NLn2oKIaJsVMp8wE +nAMXi4ZOL1U1TBkdqkkyOwc3hQ/7hNLV0KI8Uy7iTwyQC0sy0qzU0HVKRn2r +cwwIdTL+vAtWwyPBqfzXlKKBW8650valGtYnTdcazEeBNxnMi5rV8FloMk/e +aBS84tk0wNmqhmmmXBT+91EQPzuyuqJdDc2erbLnrYoC3qZAe5EPatg596Ak +9VQUCPjETfeNq6Egu7ylhTMKxEur1D0F1PFAydhcEPU0bGeQH4S4qKPr8pmq +7I4weLT5yMJKV3XsLvliU1UZBtrrHu9IdFPHmmYlvvGMMDDo2fM577A6nv3N ++ybNPQwcAtL5OwLUseuh8l3e2ZMQeUckSClWHd8VZ3QflToJ7TwknS8l6njb +Pb4vOjoEjg8INJhzaOBCznjhWEIQNL1wflK4UgMrN2Qpk04GgeSDfNa61RoY +4zGbYucRBK8i6cWvuDXwBjW5h1M3CDbJuF01F9TAPXvWr9X5Hghv3UsPm8tr +YMujvMUfpoGg+t16g7mlBjJ+cg7JCh+H31Px9mbpGmgk5PPga40/9PfmONzK +0MBAAzte2Zv+8OpJpePkTQ3UH4kPjQr3h7zzn/dez9HAYwuvJZPo/uAkprn/ +e6EGqrdsjOaq8oPnBn2HLj7RQCGRLyaWtb5wI3lbaPOgBm69rCl3rc8HLgQz +T0p808Av+dvv2tT6QPA+u7CAEQ3sVwt6JpfjAzZyEafI4xqYbhN1XOqwD6x5 +3B51ZEYDVeiFpVbT3hDwOeQiN5cm3hZJJMULesMOlRcZZsqa+LyE9mDZwwv2 +rDHd3a6iiQvSny+XmnqB98dmHkd1Tbz16eyKKCUvSIx7HeWhpYnuJBPd49OH +oXuk61CkviZK90LMvXOHwSN7SL3CXhNtE8/5Wt8/BGf5V7RIn9bEc16ja/v4 +PCF19GzM3ShNDORvEZua84D8ulXM7dGamPuJNiX7yQNe+XKV6l7QxMU07mvv +7nsA/6uNaQ4pmujD99ray9IDss9Kusfna+KJRlI/JrpD7ZTuwtwbTeyZ/75W +UdYNclpZbnZvCf9dEpyaNrpBzB2NVyWdmpjx0bjr5MJBMHNUvO7Zq4mqlw4v +iHYehK4qilbnF02MszhjbRJ9EMbO/DleMq2Jpov236xGXIHExxrzoFDxtmNn +gU34Afgzqm77VJyKHoO1ww6OB6D/WcljMSkqKte6njqjcQByAvMvdGymIkXh +kabh+H5Q6rkqj8pU3Ow6G3viwH4wyAxyE0MqnkuT3xNu6QJ+Suof3npSMaS1 +IUEP98GJOcrfA15UnJ/6oTYusQ9O1XNSfnlTcf9Ve2r9ghPE7Xm3d90xKlLX +DDR/ZjlBQUzoe4MwKr5dW8n8quYEg/21vY8SqRg+vc/6m9JecEiw6LnKomJL +wIXmfoYjuOzRnNtcRUUjz8B9QtKO4LFZQqSshopL3pf/+q50hMDHvxzePKNi +lfCR/tiXDpD0Lbl7TSsVK5iQbmHnAK8Yve9CPhP+J9rHrQqwB8Yvj6693DQ8 +ww08Do12QKrekVuznoZqg1H8xsV28Ou8wjEpXhpunlB0tEq1g0yZifXfBGiY +ENBp9MDDDpZ2hxseE6fhs9y3y3fX2EFddXJZrAqxX+Tj5wPWtqB/sTbpkT0N +m0dz6UZTNkBxyNlP2kNDu64g450DNvDfphilk040vDdJv+3bbAO5NWZNzAM0 +3K61Y2kqywZWTnQtN3vRcPed041CVjbQ4PDD73M4DVUDWaXyLtZgLCu6kyeX +hnO0yND+ZUso//lcxiOPhirllsly/ZYgywqcrcqnoXGe8oFrbEtYZd6W5VVE +Q+1YkTO/Aiyh3j/2v4ZyGlY2B5QHDVsAs3o6LewlDU3dpn6zus2BZvt2cGSc +hrV+co6inaaQLxbJYv6m4ZbObXx85aYg/E0p/uokDb3KUscVrprCdMgFquEs +DfW+tsY0O5pC2S24kLlMw6s+FN/8gR2g8v2+sr2AFjKH28ye/WcCW6MuhdZr +aeHly9JbUzSMoUb3zmpLuhZ6zU46HiYZg81cXco7PS3c0Z665PrHCEL9ZopH +9bXQuNyB71mdETQ5u37htdTCke89P1WsjMBLh2a+z1ULtf0+GecHGMK9/76I +TV8g1sd2Goy91Qdmyb+CiDgt/Hus0pvzsT50HBGhrU3UQou3q3fqZevD38+W +NpQrWlgyef/hBn99MG9jxeAtLTSVYQnJ8urDWFHCz/hS4nyy4VNeWwQFT506 +uQ+Ev8YWt1o+MeDyJqu/0f1a2DoVS9JhM2D6kxt1cEALT58WjupOYkCtU3xR +5pAWZskJO2QbMMDW5lOayE/C/tKWE94FenBS99wxbg5tjBqttS0+pQtN/G9l +fspp4/u+yKOJJjqg3PbN2WKrNgaKvQy7LqsDKfF/0+4paOPf7hUH3qzUAee1 +sryHVLTRtDN+srxOG37/C/47oK2NJgFj+sd0tYE0Kt7ZbqGN7lvWq4fStcCz +1iumPEAbhauejWbYU+GX71iIcZA2+q3RmJWgUSFU4qhPd7A2nn9tV9dCosKl +U/628+HaqHB+tjy/VxMe0oOl9WK1cY97U9zu/ZrwrzK6piFDG09J3ol1D9CA +lAeZ0x0N2rjoXuE6W64G4gekR91faOOlDn/VYxlqcIc3t2+6SRublaVyeaPU +gO17p570Rht9llwr2BZq8FGxOMmpVxsTc9WKa76qwtaCx0qD49q4PmB4yVlC +FeqyuzwmhXXQJ6B9VZ61Mny2lDkQLKqDgTFfFYY3KwPHH9+9CxQdTNiZf9dj +XgkMdq21Wi2tg8N2SaHCuUrwYgVdi6ygg6R1VruY84rQ6pbFrc/UwYFd4Q+P +PlCAD7LeJUmHdPBmhEaP+Y6tsNBeWSB8RAfNxMT54zdtBfEIztsZPsT/U0s6 +OJa2gMu7m2l5xwj7N14PR1dsgc/n2qLYYTp40LhR+7v8FhgZ1rT7nKiDz9V5 +MucF5GG6YHlOhaWDkgynByd5ZWHYwST74mMdXNPI5q2f3Ay9qxJMh6p18Lqv +yy3Vd5uh2pVy/dpTHdSQqrwceXMznBWl0hebifNlvC8+KW0Gvgvep17162Ch +GXnV2d2bQOnwOw7PlXQcfZ/VL1YrDZLC4vdqV9ExQUlSveuONPA1uO0SXUsn +7sN4i/sJ0jAlOZHTsp6OvQmvtz5zkYaq7nWG6sJ0FAjfsbd7SQpMTfDc8hY6 +eg1ItFokS4K7XBF3xk46ppCqgxyGxCDs+X5veRs6JnvTX09UikGSp0BLmS0d +J5qub3h9SQxq7pyMb3Gko6DX2/dmGmIgJG+6cfEgHS8us/6an6fAC/lvQq7B +dNQ0MyRL6ZJBYauUtHwWHdvz9HXr20iATR1RZTl0/O9GdvVUIQkcvGK/MPPo +GHjble0cS4Logp+5jvfoaNP4bqqTQYL+rTVyFx/RUfEvScb6gTAkbturOP6S +sDcR+492UwgmFa7QyibouLvtdUnXDQHobUVjwSk6Zvy4dMEnUgCe+v2yC5qh +Y/2Wkn8K7gKQWGYWQPtLx4gHRwc2KQqAAp2juIpTF7Pbo55M1PCDm5mvTANJ +F8nmTI+eET7oOrxjQ5eeLt7k36D3pYwXqrlnKFTQxaE1Ucn+0byQW5S77Zq+ +LpakqhYY7OaFY78XTfaY6GKoxr57FbM8wBNSfqbfWhc11t/hfM7kAZNYmbmv +brpIHWx8Tu9bD+y8hS8zF3Tx9rbut3KG3EAzDJozj9PFvafmD3iJc0PFl/EN +2Qm6+MHrWtXgDBeUSQ5omafoolLBi6KIe1xQnP40IfOGLn6LkPU3EuSC7Phz +OjtKdPHd9Vq57ok1cDFoY3J6py7anCv2kOlYBVyCF/J/vtPFWqMXfZ2lqyC2 +lKPGoFcXe/ZJh1Ykr4KYX5PD4/26hJ6tZVbbroLTXl16+sO6OKXwzqKtixOO +O18f/T6vi3dNgkt7B1eCk9Fm1JXUw9MZ/hXiUitgsYuLt0Ga4LPJ1nMrVkC2 +568+88166B2XWsDxjQOGYx+HOG3VQ0/TmKjMIg443mz94KS6Hg4nFjGW6Rxw +yeqUJNtED4P81NI1GpeYVXve/dP0J/b/VTn/PmuB6fK96lVNgB7OqW9ZYhxb +YHKEZacbBemhXgHnl9+4wDS54aO5+6QeepXsFKYP/WV2fFxxNDBaD9eQPpzf +p/iXOea2va80TQ9bT+yT8m+eZ4r5nn+8/ake8gQaG3zUmWUmLh+ixtXrodDz +I873hWeZK1NMSkca9TC3zUi2YnKGOVa5+l52sx6G1+lGeBfOMKs4YtIFOgn7 +bZzF7pIzTKfUqJDZb3q4o9aPz5JvmplefZJau56B38wf6Y+R/2NusNpbSuFl +YEnm6fvi/yaZUZ+1lUP4GFitdu5CxMAk02v1vKyqMAObvW9FNN+eZGpZBwvl +SjJwXachf7TqJLN78PjUOTUGGg199zW0nWAKrztautORgYXugRdOe/9k5hlG +hE3sZaB3zSaO9xo/meoRiYZXnBk43Pnm3pXFcabVxMN3vQcZmBOaJLolZZwZ +2z3zx/0oA4Nf3GNW1P1gzudGGoSdYeDk97nEUcUx5gfdK535RQy0bz+0557R +CNPrRN5NsxIGMibaR0ZER5izJRWe4w8ZKPar41LQz2GmwKbeObVKBn7wT+QI +ThtmWnBJiD95ykDWw4aL639/Y9Z05Xt0vmPgyB1mmkDxV6Y5L1s5uJeBdvxi +ZbMxX5m9O5pnRfsY2Jeqxiuz/ytzuurHhf2fGfgqsPmBCf9XpnKO6v3vYwzU +tnZsbgobYtZ80A+O/8lAeVoSucN+iGkuZAcqEwx8tF2VW1JtiHno/Im3QTMM +POKpznlqdJA5/TQ2Q2SegcvFacoJjYPMs3/T3Kv+MjCP4qX1KXuQyad5T8ll +kYFKdJeygIhBZqZv1czyMgPVOgdUjZwGmf8Dp23ESw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0964075054441099}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0964075054441099}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994359511874199*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"5d571f3d-f3a5-4b31-8e05-fcd0e1aea837"] +}, Open ]], Cell[CellGroupData[{ @@ -11575,66 +12589,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[448]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], + "In[121]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 448, 489, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347571140808*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3403941468924261`*^-117\\\", \ +RowBox[{\\\"61505762917499445898780754856537654234226205846248257\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"86\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"706939023170487101423616000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 121, 133, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.9943595119053993`*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], +In[121]:=",ExpressionUUID->"9966bda9-7a51-48fe-82e4-d372b4bbc10a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 448, 490, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711508217`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.561623825548579`*^-119\\\", \ +RowBox[{\\\"29282893725021486192409517387197577180915096603398795\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"90\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"736689314689089877835776000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 121, 134, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.9943595119095707`*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], +In[121]:=",ExpressionUUID->"93cddabd-590c-4d0a-b047-cd2d60d0deb7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 448, 491, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711592274`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8955127406601295`*^-121\\\", \ +RowBox[{\\\"14348617925260528234280663519726812818648397335665409\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"94\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"777641976540401395302400000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 121, 135, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994359511913542*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], +In[121]:=",ExpressionUUID->"70222a3c-aab3-4e86-804b-83fe829d3cff"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 448, 492, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711683846`*^9}, +during this calculation.\"", 2, 121, 136, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994359511917297*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], +In[121]:=",ExpressionUUID->"a4380b7e-6409-4ff7-a79a-62aff43a1148"], -Cell[BoxData["10.362747935330763`"], "Output", - CellChangeTimes->{3.991347578228073*^9}, +Cell[BoxData["8.594023018330335`"], "Output", + CellChangeTimes->{3.991347578228073*^9, 3.994359553141263*^9}, CellLabel-> - "Out[448]=",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] + "Out[121]=",ExpressionUUID->"3ea148cc-efb2-4760-9609-47bc49c03317"] }, Open ]], Cell[CellGroupData[{ @@ -11701,68 +12722,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918503106317043`*^9, - 3.9918503148567924`*^9}},ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-\ -2a98ba29b602"], + CellChangeTimes->{{3.9918503106317043`*^9, 3.9918503148567924`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 493, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578265545*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2216351049793959`*^-198\\\", \ +RowBox[{\\\"30278850633655058582710149233337530603447722122319635\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"934564270838098005054611040868761600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 122, 137, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9943595531694717`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], +In[122]:=",ExpressionUUID->"1e0ecd04-b28d-45d3-9492-90737fb557f2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 494, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578275551*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.088127103631531`*^-203\\\", \ +RowBox[{\\\"66885981049744024409206719656442605103016018168204074\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"452474281358493165635789279094374400000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 122, 138, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.99435955317377*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], +In[122]:=",ExpressionUUID->"b24777d1-7449-4574-8462-0127a077c169"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 449, 495, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782835484`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0340722429221574`*^-207\\\", \ +RowBox[{\\\"15410530033861023223881228208844376215734890585954218\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"500744249968253624858499033438617600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 122, 139, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9943595531777573`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], +In[122]:=",ExpressionUUID->"9c2d716c-c235-4fdd-ac38-909995236d6c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 449, 496, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782930756`*^9}, +during this calculation.\"", 2, 122, 140, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9943595531819143`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], +In[122]:=",ExpressionUUID->"8b81e957-7003-45cb-872a-bffa66df5ec1"], -Cell[BoxData["1.4359199941844076`"], "Output", - CellChangeTimes->{3.9913475858902473`*^9}, +Cell[BoxData["0.14318240475384927`"], "Output", + CellChangeTimes->{3.9913475858902473`*^9, 3.994359557372628*^9}, CellLabel-> - "Out[449]=",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] + "Out[122]=",ExpressionUUID->"a6290de8-e7bb-4f59-81e5-0d40223e164a"] }, Open ]], Cell[CellGroupData[{ @@ -11783,8 +12811,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11829,68 +12856,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850318596199*^9, - 3.991850321359722*^9}},ExpressionUUID->"edfdd675-c60b-304e-9e16-\ -68452b971319"], + CellChangeTimes->{{3.991850318596199*^9, 3.991850321359722*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 497, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859272156`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2216351049793959`*^-198\\\", \ +RowBox[{\\\"30278850633655058582710149233337530603447722122319635\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"934564270838098005054611040868761600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 123, 141, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994359557400014*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], +In[123]:=",ExpressionUUID->"6f9fe1a9-9713-41a7-997c-c2270c3d22ab"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 498, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347585937319*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.088127103631531`*^-203\\\", \ +RowBox[{\\\"66885981049744024409206719656442605103016018168204074\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"452474281358493165635789279094374400000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 123, 142, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994359557404492*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], +In[123]:=",ExpressionUUID->"e50dae8f-f685-45cd-bac2-97417a7df1b6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 450, 499, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859463177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0340722429221574`*^-207\\\", \ +RowBox[{\\\"15410530033861023223881228208844376215734890585954218\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"500744249968253624858499033438617600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 123, 143, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.9943595574088783`*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], +In[123]:=",ExpressionUUID->"1cd0b58f-d016-490e-88f9-573aba7d8b9a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 450, 500, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859543304`*^9}, +during this calculation.\"", 2, 123, 144, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994359557413814*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], +In[123]:=",ExpressionUUID->"4878c0c6-a2fd-4316-ac07-85a9cc889456"], -Cell[BoxData["5.09241659576143`"], "Output", - CellChangeTimes->{3.9913475931276417`*^9}, +Cell[BoxData["16.988184823972908`"], "Output", + CellChangeTimes->{3.9913475931276417`*^9, 3.994359561562924*^9}, CellLabel-> - "Out[450]=",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] + "Out[123]=",ExpressionUUID->"c37ba2e4-e0a7-4fed-a1c3-987b456ecac3"] }, Open ]], Cell[CellGroupData[{ @@ -11911,8 +12945,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11957,68 +12990,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850325611994*^9, - 3.991850328926569*^9}},ExpressionUUID->"d0469d46-2e74-494a-be85-\ -b41cb2f3fa92"], + CellChangeTimes->{{3.991850325611994*^9, 3.991850328926569*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 501, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134759316485*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2216351049793959`*^-198\\\", \ +RowBox[{\\\"30278850633655058582710149233337530603447722122319635\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"934564270838098005054611040868761600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 124, 145, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994359561588007*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], +In[124]:=",ExpressionUUID->"67b70df9-42d2-4449-9c58-326cdc414715"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 502, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593173849*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.088127103631531`*^-203\\\", \ +RowBox[{\\\"66885981049744024409206719656442605103016018168204074\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"452474281358493165635789279094374400000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 124, 146, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994359561592112*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], +In[124]:=",ExpressionUUID->"10c5e8ee-5ce4-4618-b014-9338708cfc0a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 451, 503, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593182852*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0340722429221574`*^-207\\\", \ +RowBox[{\\\"15410530033861023223881228208844376215734890585954218\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"500744249968253624858499033438617600000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 124, 147, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994359561595941*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], +In[124]:=",ExpressionUUID->"97101a92-3720-438d-a550-91e3faae76ac"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 451, 504, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475931908703`*^9}, +during this calculation.\"", 2, 124, 148, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.9943595615999537`*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], +In[124]:=",ExpressionUUID->"a10f44ed-7e4d-4bd7-bf9b-ca64a71072dd"], -Cell[BoxData["16.684462799943017`"], "Output", - CellChangeTimes->{3.9913475973006153`*^9}, +Cell[BoxData["1.6850932603748383`"], "Output", + CellChangeTimes->{3.9913475973006153`*^9, 3.994359564180887*^9}, CellLabel-> - "Out[451]=",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] + "Out[124]=",ExpressionUUID->"9ab71817-4107-42f9-88fe-a9a652d84aa9"] }, Open ]], Cell[CellGroupData[{ @@ -12027,22 +13067,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.99185033265069*^9, - 3.9918503366548977`*^9}},ExpressionUUID->"58b5e243-0972-1946-bd17-\ -aca0f3e8a35b"], - -Cell[BoxData["0.15578016747845222`"], "Output", - CellChangeTimes->{3.991347597341627*^9}, + CellChangeTimes->{{3.99185033265069*^9, 3.9918503366548977`*^9}}, CellLabel-> - "Out[452]=",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] + "In[125]:=",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], + +Cell[BoxData["0.026761114283197104`"], "Output", + CellChangeTimes->{3.991347597341627*^9, 3.994359564202141*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"8f2527e1-6d98-4355-b133-dc93ccade311"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918503408077297`*^9, 3.99185034363356*^9}, - 3.991924645514969*^9},ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-\ -a3711ba632a4"], + 3.991924645514969*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ @@ -12065,12 +13106,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[454]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], + "In[127]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.991347597372614*^9}, +Cell[BoxData["15.659856323347766`"], "Output", + CellChangeTimes->{3.991347597372614*^9, 3.994359564213912*^9}, CellLabel-> - "Out[454]=",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] + "Out[127]=",ExpressionUUID->"0dfc1141-5bf6-41ed-acd1-2447d39f19e2"] }, Open ]], Cell[CellGroupData[{ @@ -12080,12 +13121,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[456]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], + "In[128]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.991347597428034*^9}, +Cell[BoxData["0.5557625543228705`"], "Output", + CellChangeTimes->{3.991347597428034*^9, 3.9943595642213697`*^9}, CellLabel-> - "Out[456]=",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] + "Out[128]=",ExpressionUUID->"fe4df285-a7d2-4fd5-a4f8-68b41d8409a6"] }, Open ]], Cell[CellGroupData[{ @@ -12095,12 +13136,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[459]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], + "In[129]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.9913475974971066`*^9}, +Cell[BoxData["8.70316175059291`"], "Output", + CellChangeTimes->{3.9913475974971066`*^9, 3.994359564227409*^9}, CellLabel-> - "Out[459]=",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] + "Out[129]=",ExpressionUUID->"8b204121-c441-41be-a100-8dcf34ebdcf9"] }, Open ]], Cell[CellGroupData[{ @@ -12290,12 +13331,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[460]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], + "In[130]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[BoxData["0.038908834568544604`"], "Output", - CellChangeTimes->{3.991347597528105*^9}, +Cell[BoxData["0.012262712899308166`"], "Output", + CellChangeTimes->{3.991347597528105*^9, 3.9943595642349243`*^9}, CellLabel-> - "Out[460]=",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] + "Out[130]=",ExpressionUUID->"40dae0b4-e090-49bc-a4fc-efddfc7e217d"] }, Open ]], Cell[CellGroupData[{ @@ -12309,12 +13350,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[461]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], + "In[131]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[BoxData["4.492838724335521`"], "Output", - CellChangeTimes->{3.9913475976441536`*^9}, +Cell[BoxData["8.002978689567316`"], "Output", + CellChangeTimes->{3.9913475976441536`*^9, 3.994359564299802*^9}, CellLabel-> - "Out[461]=",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] + "Out[131]=",ExpressionUUID->"77cd98c7-253a-4da8-a63b-0e7b272d5164"] }, Open ]], Cell[CellGroupData[{ @@ -12506,12 +13547,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[462]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], + "In[132]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[BoxData["0.012544276227890849`"], "Output", - CellChangeTimes->{3.991347597671173*^9}, +Cell[BoxData["0.09766775003107336`"], "Output", + CellChangeTimes->{3.991347597671173*^9, 3.994359564308544*^9}, CellLabel-> - "Out[462]=",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] + "Out[132]=",ExpressionUUID->"0b4bd14d-246e-40dc-b9cf-73538ed7d3a5"] }, Open ]], Cell[CellGroupData[{ @@ -12525,12 +13566,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[463]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], + "In[133]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[BoxData["7.912653285153153`"], "Output", - CellChangeTimes->{3.9913475977705975`*^9}, +Cell[BoxData["2.8357591964115016`"], "Output", + CellChangeTimes->{3.9913475977705975`*^9, 3.9943595643735723`*^9}, CellLabel-> - "Out[463]=",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] + "Out[133]=",ExpressionUUID->"e591610d-7d6c-485c-8ea4-f32af8e70aec"] }, Open ]], Cell[CellGroupData[{ @@ -12623,12 +13664,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[464]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], + "In[134]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913475977856007`*^9}, +Cell[BoxData["0.12678436313657984`"], "Output", + CellChangeTimes->{3.9913475977856007`*^9, 3.994359564381576*^9}, CellLabel-> - "Out[464]=",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] + "Out[134]=",ExpressionUUID->"51a85ab4-2825-448e-95c8-25ebf1a8a93f"] }, Open ]], Cell[CellGroupData[{ @@ -12718,12 +13759,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[465]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], + "In[135]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991347597813669*^9}, +Cell[BoxData["0.8732156368634202`"], "Output", + CellChangeTimes->{3.991347597813669*^9, 3.994359564389133*^9}, CellLabel-> - "Out[465]=",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] + "Out[135]=",ExpressionUUID->"4e3bcbdc-59a8-45aa-ab6b-5f8bcd29c5cf"] }, Open ]], Cell[CellGroupData[{ @@ -12846,12 +13887,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[466]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], + "In[136]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913475978426323`*^9}, +Cell[BoxData["0.1107100884006317`"], "Output", + CellChangeTimes->{3.9913475978426323`*^9, 3.994359564396875*^9}, CellLabel-> - "Out[466]=",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] + "Out[136]=",ExpressionUUID->"4bc7f256-a031-4ee9-ab22-f790fd4dea29"] }, Open ]], Cell[CellGroupData[{ @@ -12913,68 +13954,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503626529236`*^9},ExpressionUUID->"ba508068-6b78-254c-87d6-\ -cf1adc0753dd"], + CellChangeTimes->{3.9918503626529236`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 505, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597872814*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.48696165239937`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 137, 149, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994359564409464*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], +In[137]:=",ExpressionUUID->"0489423e-f9f6-4666-98bf-cd04cc047586"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 506, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475978828144`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.308554221869812`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 137, 150, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.9943595644137383`*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], +In[137]:=",ExpressionUUID->"6d78dc66-5b4d-4c20-b7c7-ecb6cef16665"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 507, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597891815*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1873127560961716`*^-228\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 137, 151, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994359564417718*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], +In[137]:=",ExpressionUUID->"0c0cd42d-f9a7-4717-9338-0fc2990e5f90"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 467, 508, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597900812*^9}, +during this calculation.\"", 2, 137, 152, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994359564421982*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], +In[137]:=",ExpressionUUID->"2c2aad03-797d-4d5c-9b70-1b321a769d51"], -Cell[BoxData["4.492838724335523`"], "Output", - CellChangeTimes->{3.9913476018505497`*^9}, +Cell[BoxData["8.002978689567318`"], "Output", + CellChangeTimes->{3.9913476018505497`*^9, 3.994359566490451*^9}, CellLabel-> - "Out[467]=",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] + "Out[137]=",ExpressionUUID->"e7886ffb-7631-44d5-bba4-8628e2abffae"] }, Open ]], Cell[CellGroupData[{ @@ -13036,68 +14081,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503657638073`*^9},ExpressionUUID->"842e33e4-ae06-f746-ab8b-\ -97489285cc9c"], + CellChangeTimes->{3.9918503657638073`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 509, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476018885117`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.48696165239937`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 138, 153, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994359566516302*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], +In[138]:=",ExpressionUUID->"7df75dc9-0c97-48c6-9171-9c72a229c153"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 510, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134760189851*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.308554221869812`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 138, 154, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994359566520336*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], +In[138]:=",ExpressionUUID->"eca1ffa6-2bb2-4220-bb1a-e293a6a57cf3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 511, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019065113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1873127560961716`*^-228\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 138, 155, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.99435956652426*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], +In[138]:=",ExpressionUUID->"67114fe2-21c5-4474-86b1-41a21ac2e5e3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 468, 512, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019158936`*^9}, +during this calculation.\"", 2, 138, 156, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994359566528328*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], +In[138]:=",ExpressionUUID->"e362ab9b-62a9-4c65-b76f-4be170911eda"], -Cell[BoxData["7.912653285153152`"], "Output", - CellChangeTimes->{3.9913476058912296`*^9}, +Cell[BoxData["2.835759196411502`"], "Output", + CellChangeTimes->{3.9913476058912296`*^9, 3.994359568551374*^9}, CellLabel-> - "Out[468]=",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] + "Out[138]=",ExpressionUUID->"45a40c24-0da2-4396-82d5-0a63196b8ea4"] }, Open ]], Cell[CellGroupData[{ @@ -13155,93 +14204,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850369070572*^9},ExpressionUUID->"b2e314f8-a6f0-6942-a94c-\ -5ac1cacd7190"], + CellChangeTimes->{3.991850369070572*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk8VN0fB/AhVLZsWRLZZU0z1pTzDalsCYnII2auLNlJES3U74lQFHrS +VFKSJUnZ8lQkQiSy9NiyJGaGsWRJ9Tvzx33d1/t17/nc7/ecc+9V9A52pHGT +SCQmPjjn0A+66i/aP5jRG+S3WZWxkRnrvoG3ZSHaTFdU4HiIbpihYlmDvLZp +ze3BdqC28glS3qKcGNN8jkuj4+t4LVtQ02VHxPHfDdKv4gs+okdESIUldmV7 +6O1VchdqlL0uzvFk3/vYU9U96EzlKwcL7E1jyu4/LP5Dkwfngs2xbaZjTcJb +BtHisnbobuza1UmB6IJh5Np0whmwP5+TinkeNIJS+splEDaLz3JynjyG+q15 +X+/C5ksOcaMsjiO3HR7WO7HlRXMaQ6sn0EBzVfkObHvZHw9YFgx0JCiVbIRN +3FGS1FnHQisdvJYG2PGqBxIDWqbR9NkEIwp2j1Tn9ogCNuqK+6deF5t6xN8v +PXkWVRnre2pjz9wi3X0aNIeGNnzu1cBep6QjwiYvoKh1hidVsDOodXtFNv5A +mgXzWYrYCg/d4rct/kA5fi9vyWMba19knaheQpNeQdbS2McNB1smLVbRjocu +ZvzY89GRPPxqv9CF7KAQPuyz1QI7Ndb9RnZ66Qnc2Flg/Ni35Q+6U7fGaeUp +ri+v0TKsgAtsfK/8bwK7oCF96JwsNywd2Ng8gj3zzTP2ajI3yEgWTQ9gx2ou +lD0JWgPSgsKDndgZJYrK02RecJ6/5/Ivdl87o/Z3Li/E8794VImtMPviiPBG +PtD+PjBQhl2ob39NZ5EPqJqB0w+x6ytPcwVWr4PIs8mPUrAX6j4NTlgIQmNl +wHkXbDFbQZGYWkFITtVzssfW67QEIRMhGF3/mWSF7T9afme7rjCopTfM6mOH +cLfo7RIUAXtP1+2i2GNKxezEH6KQniW/qa4Uzw/xfn0bRQzCtvtUVmBzPx5X +lA4VA5WGLINibAXKFseCKTG4FvelPgv7iEXa0w9D4hBkPmQWiN3mExYu1bwR +z8/qXUHsgYcpSV7rJIH07qsICZsxVZD7aI8knPL+4DH3hI34I0Y+mb6SBNUb +VUm92JYJzvpe5VKwuVTY6j521X3DhXy6DJjqzehQsO+PrUTtiJCDk9JlXYYl +bLTv0KWB8CI5UBmNWqeOzagXtyoal4Nsx4nNUtj697U3KrjJg6N63+SPYjyf +3p5lvGZbwL1GRbYce3Z66OTEBQXIcn7xQQtb/ITlszI7JSCqI69wF7HR+H3+ +4w7+StBvJL7MKmSjiv/aZZkXleAMZFh9wfawPXpB7ZUSuITuu1SGfV8ryjGb +rAw+dsV0b2z9yYczcVIq4CKoqFv9mI2cfQV0rIdVQZb0b9sh/B6gqEPkw79U +wTxMjG2GrZlIN6LKqMFkQtmCOjYpl2Ied1ANOr6P5y8/YqOiAffDT1+rwa5O +uxf/YPO5FJ7bdE8dJnN/Rfbl4/os7T5PemtA0beoy+YP2SjXKfPLYpwGcFnW +yGzFTvEeHuL5RwM+CGcmC2FTz0ZOyX/SgAvpknI9D9hItCaH5GShCZu9zn0P +wPansDSrlbVg5bQuOSWPjWSVUuOTRrXB8V1RxstcNqq5PK+xzK0DzXc7N+Rg +e8y5dRKKOiCnzPCLxb5dr6Jh7qkDsVw/q3ZgK/lWdSx160CM2Up7+T3cb+GY +KtGsCyvBN9vy7rKRnKw8oeCmB/4mbL0TdDbSzosQ/InI8Lwrwv3mTTbypl5Y +0LEnw6mXQscjsLOUrw14eZAhI6XM1R57zb2SJw3RZHjLoIxzYffdnnS+VkqG +XEX/p77Z+Hua5ZWjoUyBl2WNYrpZeH2TbHVd+fRBbe0TwQfX2ehumIpDeYsB +KH0RqbBIY6P2KGSUkGcClx6d09p6gY0UPbvsjwbuAq5LfhWhEWxE+/O8WO4U +gOnYxw51GhtJTVWslfI2hzMNfsJLjmwUQdn53zVNSyh6+kknA3D9zNVG8ck9 +sEe7VdZJB6+nefhaetteSD/A/1NbCu+fef/XhRn7of/ou+QQLjZa2i3dWh9v +Ayb71lzunphB/aQ17OFjdkAx6TB71zaDgjYHp51TPgBl7p5Nz17MoGK/xlfX +Ex3gZFPev4u3ZtDpOZlFLb+DYGRCs718YQYtWFu5vPvLEVLfRP34x3cGmbhf +3T120Aliy6t5ZmxmUIdMjn89xRmWarUteMgzaNODCzX5Ww/BSK9O89TGGVQx +pGlrL+QCryt7rXMWp5F854xvFNMF1HhrdbvqpxHl+tXC3KHDUBxA0j6RMo1y +eOZ0r9W5Qm3Ss7VnPKbR893b+hIr3UDt0kDkafVplGV0WXS14Ai4CFeqvpln +obYveRcpye7gUbjzbXMDC5Xb3VIJOesBvQcjHW/cYCH2CSdSEPUoHFSq6LcI +YKEFK43jLAtPePu2Z1e8OQvlM3uXwg3/gtTCgiwbaRZyvZvnc1TQC16tRNSy +Z5mo7KnNX2suecF4goTCuxYmMpHtWP572QsUr34rCXjMRMpDvn0f/Y4Baa94 +y0wyE40KBBy4NXIMPEg3B8ODmKg9xd5n7yFvuGxdfyTWmYkyoukCke3esPSx +wVDRlIlqav8s++z3gUDzzIdyqky0wQMuUap8YKLIuo4izkQKEu/aNtf4gGft +u/IpMSbSa7GT5qv1gS+D93pysR13uj/qee0DKl1xJRLYGZujms80+YBEsty9 +JREm2tT/eENjjw+s7gvOaRJmIhVPqSyPRR/YVfbyTyo/7seLlZ+oT4UQuSm+ +Em4mepA9E25vSIXxw1nyJ7ElPs2aSRlTQfP+Hy+Ezdqz2JlvSoV1MjxEOxcT +f79IXC3mVGgqlAmdJzGR8KKom9hBKrTKbr5i+YeBRq8YrKefoMIW0YPfeVYZ +6OA7o07fYCqcau927/jJQLWkHXS9UCo4DDgu07Gzw80M3kRQYb5eu9wU295t +77GxGCpkn6frRa4wUKWKW6XWZSq86Fg2mllioJTqWL+KB1QwpC2n8/1goBPk +TJPofCrccNKy6VtgINtHpeuNC6jQH9qtVYzNnzn+6EURFd78zvVzwU4Mc5h8 +/owKLdaG3fnzDBSroRJQ/oYKv7NPxxyaYyD/zObApwO4/783zLbOMNB+4fGd +YUNU0B43+PIAe2siSYj8lQpV9VyseOzxMIOi0jEqyIinppGxj9nTmU8YVOhb +udeUPc1ArrzhQSUrVDDPrBMMYTHQ3vBNIYWSNNjSbjpoymCgN/SL1tekaSAq +8FRBCntny6xK9CYaaCUfSZ+dYiA91eZeC3kaXGLtFSzAlumOsfiiSoPlB1W2 +sthTO/ol+Q1oEGSks37tJAOlct956etEg++9tqfWTOD+twlm2R2igcmOrJHR +bwyU4B4dRjlMg94HZvEN2NHPHNT/HKHBbrO71pexjxFcV2940+D81v7tEtiU +997Ut6E0aHmvbrF9nIG6r6oKKKfRIDjTJzptlIGKkdDxias0kEwKfXIKO4E5 +X1+UToOE1eviPtjk/fVxxpk0WOug6m6InULymbW7TYNtemHTAyMMZBV8pze6 +kAYB7T46xthycv8zNCumwbeSbVIq2PPvg9PXPKHB5z1y2iLY99SQXUoZDa5u +9+qe+MpAv/r7X+VW0YC5eoNyC/uZrWz+h0YaSB91WiOAnbTCzZvxngatq4n0 +5WEG8s6fPObWQgM5+VFiAluEp0p2tI0GqmqqJxuwA6tdU5c/08D4TVNOAray +5o0olTEaLOhK8KzHXuk+8+n7OA3qriCnlSEGak+k6ZVM0MCw5XbrFHbcsP6k +CYMGEh9WLNqw+7I+HT0wR4OX/QZGWdjX1oruOc1FwKKVrDEZu2a23z1iDQGR +rLQeFexv/QVhQbwE8NmMFUth73xmecd7PQE5Vtq/fg3i/eYV/dNalACPt7sV +WrFFbPeI7REn8P+1Ovg1tqmRmAbaSIDYbumFcuw0oUIXigwBenkxd+mc61WD +pbKKBJhlLJ6NxCbyChs3KhOgrp4RH8C5P+3U4AZVAp78knx2jPM8QlyIR4OA +HsGPtfac6+J7jzP0CBg8pOiuhV31Wzx+nEyAZ+XKOmXsse9D14f0CShxfsnY +hL3j1em6TmMCxs7/OSSAPRpYLP8SCAiMOFvCGmAgYdcYgxfmBGz1KBScwDax +2GdbaknA0tc6+jB2iszXU3n7CPjU/dy3C7uCpySNbk2A5ttrt9qwR6ZjHmbb +EhDj4L72PbZxw8auKw4EPFMvi/sX27v069QlRwIihs2TqrCv3CrhPu9MQKvE +q9Zy7K9h+/WiXAngKbwwX4gt5Cm5N+QIAfKB73vyOXn7R476exAQ6vln9j5n +/JYzSZ5eBHCd1m/K4dTDb33P1ZuA70z9xJucvAXJSkcq7k9D5WQmJ294pM2W +IMDblpuewclreTJudZwAv4i21auc+l6c+QX+BMzVJKWlcvLvWUuYBhJgiYyO +XOHkX5HSMgjC/Yl1uCVx8qNHd28LweNtPFL/xhaklrpqhBHQsNq1cgnb6EBc +sHIE7scI3brIyd9hc1EuigDquqzwROxkVekcqWi8v84MnU3Afi4yViZ6moC6 +29L1F7CHf5a+F4glwDUSdnEs+C1umDeOAAqfK+M8tmGHzdKfeALynf/6yPH/ +AeD0SzA= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13255,105 +14306,107 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Xk8VN0fB/AhVLZsWRLZZU0z1pTzDalsCYnII2auLNlJES3U74lQFHrS +VFKSJUnZ8lQkQiSy9NiyJGaGsWRJ9Tvzx33d1/t17/nc7/ecc+9V9A52pHGT +SCQmPjjn0A+66i/aP5jRG+S3WZWxkRnrvoG3ZSHaTFdU4HiIbpihYlmDvLZp +ze3BdqC28glS3qKcGNN8jkuj4+t4LVtQ02VHxPHfDdKv4gs+okdESIUldmV7 +6O1VchdqlL0uzvFk3/vYU9U96EzlKwcL7E1jyu4/LP5Dkwfngs2xbaZjTcJb +BtHisnbobuza1UmB6IJh5Np0whmwP5+TinkeNIJS+splEDaLz3JynjyG+q15 +X+/C5ksOcaMsjiO3HR7WO7HlRXMaQ6sn0EBzVfkObHvZHw9YFgx0JCiVbIRN +3FGS1FnHQisdvJYG2PGqBxIDWqbR9NkEIwp2j1Tn9ogCNuqK+6deF5t6xN8v +PXkWVRnre2pjz9wi3X0aNIeGNnzu1cBep6QjwiYvoKh1hidVsDOodXtFNv5A +mgXzWYrYCg/d4rct/kA5fi9vyWMba19knaheQpNeQdbS2McNB1smLVbRjocu +ZvzY89GRPPxqv9CF7KAQPuyz1QI7Ndb9RnZ66Qnc2Flg/Ni35Q+6U7fGaeUp +ri+v0TKsgAtsfK/8bwK7oCF96JwsNywd2Ng8gj3zzTP2ajI3yEgWTQ9gx2ou +lD0JWgPSgsKDndgZJYrK02RecJ6/5/Ivdl87o/Z3Li/E8794VImtMPviiPBG +PtD+PjBQhl2ob39NZ5EPqJqB0w+x6ytPcwVWr4PIs8mPUrAX6j4NTlgIQmNl +wHkXbDFbQZGYWkFITtVzssfW67QEIRMhGF3/mWSF7T9afme7rjCopTfM6mOH +cLfo7RIUAXtP1+2i2GNKxezEH6KQniW/qa4Uzw/xfn0bRQzCtvtUVmBzPx5X +lA4VA5WGLINibAXKFseCKTG4FvelPgv7iEXa0w9D4hBkPmQWiN3mExYu1bwR +z8/qXUHsgYcpSV7rJIH07qsICZsxVZD7aI8knPL+4DH3hI34I0Y+mb6SBNUb +VUm92JYJzvpe5VKwuVTY6j521X3DhXy6DJjqzehQsO+PrUTtiJCDk9JlXYYl +bLTv0KWB8CI5UBmNWqeOzagXtyoal4Nsx4nNUtj697U3KrjJg6N63+SPYjyf +3p5lvGZbwL1GRbYce3Z66OTEBQXIcn7xQQtb/ITlszI7JSCqI69wF7HR+H3+ +4w7+StBvJL7MKmSjiv/aZZkXleAMZFh9wfawPXpB7ZUSuITuu1SGfV8ryjGb +rAw+dsV0b2z9yYczcVIq4CKoqFv9mI2cfQV0rIdVQZb0b9sh/B6gqEPkw79U +wTxMjG2GrZlIN6LKqMFkQtmCOjYpl2Ied1ANOr6P5y8/YqOiAffDT1+rwa5O +uxf/YPO5FJ7bdE8dJnN/Rfbl4/os7T5PemtA0beoy+YP2SjXKfPLYpwGcFnW +yGzFTvEeHuL5RwM+CGcmC2FTz0ZOyX/SgAvpknI9D9hItCaH5GShCZu9zn0P +wPansDSrlbVg5bQuOSWPjWSVUuOTRrXB8V1RxstcNqq5PK+xzK0DzXc7N+Rg +e8y5dRKKOiCnzPCLxb5dr6Jh7qkDsVw/q3ZgK/lWdSx160CM2Up7+T3cb+GY +KtGsCyvBN9vy7rKRnKw8oeCmB/4mbL0TdDbSzosQ/InI8Lwrwv3mTTbypl5Y +0LEnw6mXQscjsLOUrw14eZAhI6XM1R57zb2SJw3RZHjLoIxzYffdnnS+VkqG +XEX/p77Z+Hua5ZWjoUyBl2WNYrpZeH2TbHVd+fRBbe0TwQfX2ehumIpDeYsB +KH0RqbBIY6P2KGSUkGcClx6d09p6gY0UPbvsjwbuAq5LfhWhEWxE+/O8WO4U +gOnYxw51GhtJTVWslfI2hzMNfsJLjmwUQdn53zVNSyh6+kknA3D9zNVG8ck9 +sEe7VdZJB6+nefhaetteSD/A/1NbCu+fef/XhRn7of/ou+QQLjZa2i3dWh9v +Ayb71lzunphB/aQ17OFjdkAx6TB71zaDgjYHp51TPgBl7p5Nz17MoGK/xlfX +Ex3gZFPev4u3ZtDpOZlFLb+DYGRCs718YQYtWFu5vPvLEVLfRP34x3cGmbhf +3T120Aliy6t5ZmxmUIdMjn89xRmWarUteMgzaNODCzX5Ww/BSK9O89TGGVQx +pGlrL+QCryt7rXMWp5F854xvFNMF1HhrdbvqpxHl+tXC3KHDUBxA0j6RMo1y +eOZ0r9W5Qm3Ss7VnPKbR893b+hIr3UDt0kDkafVplGV0WXS14Ai4CFeqvpln +obYveRcpye7gUbjzbXMDC5Xb3VIJOesBvQcjHW/cYCH2CSdSEPUoHFSq6LcI +YKEFK43jLAtPePu2Z1e8OQvlM3uXwg3/gtTCgiwbaRZyvZvnc1TQC16tRNSy +Z5mo7KnNX2suecF4goTCuxYmMpHtWP572QsUr34rCXjMRMpDvn0f/Y4Baa94 +y0wyE40KBBy4NXIMPEg3B8ODmKg9xd5n7yFvuGxdfyTWmYkyoukCke3esPSx +wVDRlIlqav8s++z3gUDzzIdyqky0wQMuUap8YKLIuo4izkQKEu/aNtf4gGft +u/IpMSbSa7GT5qv1gS+D93pysR13uj/qee0DKl1xJRLYGZujms80+YBEsty9 +JREm2tT/eENjjw+s7gvOaRJmIhVPqSyPRR/YVfbyTyo/7seLlZ+oT4UQuSm+ +Em4mepA9E25vSIXxw1nyJ7ElPs2aSRlTQfP+Hy+Ezdqz2JlvSoV1MjxEOxcT +f79IXC3mVGgqlAmdJzGR8KKom9hBKrTKbr5i+YeBRq8YrKefoMIW0YPfeVYZ +6OA7o07fYCqcau927/jJQLWkHXS9UCo4DDgu07Gzw80M3kRQYb5eu9wU295t +77GxGCpkn6frRa4wUKWKW6XWZSq86Fg2mllioJTqWL+KB1QwpC2n8/1goBPk +TJPofCrccNKy6VtgINtHpeuNC6jQH9qtVYzNnzn+6EURFd78zvVzwU4Mc5h8 +/owKLdaG3fnzDBSroRJQ/oYKv7NPxxyaYyD/zObApwO4/783zLbOMNB+4fGd +YUNU0B43+PIAe2siSYj8lQpV9VyseOzxMIOi0jEqyIinppGxj9nTmU8YVOhb +udeUPc1ArrzhQSUrVDDPrBMMYTHQ3vBNIYWSNNjSbjpoymCgN/SL1tekaSAq +8FRBCntny6xK9CYaaCUfSZ+dYiA91eZeC3kaXGLtFSzAlumOsfiiSoPlB1W2 +sthTO/ol+Q1oEGSks37tJAOlct956etEg++9tqfWTOD+twlm2R2igcmOrJHR +bwyU4B4dRjlMg94HZvEN2NHPHNT/HKHBbrO71pexjxFcV2940+D81v7tEtiU +997Ut6E0aHmvbrF9nIG6r6oKKKfRIDjTJzptlIGKkdDxias0kEwKfXIKO4E5 +X1+UToOE1eviPtjk/fVxxpk0WOug6m6InULymbW7TYNtemHTAyMMZBV8pze6 +kAYB7T46xthycv8zNCumwbeSbVIq2PPvg9PXPKHB5z1y2iLY99SQXUoZDa5u +9+qe+MpAv/r7X+VW0YC5eoNyC/uZrWz+h0YaSB91WiOAnbTCzZvxngatq4n0 +5WEG8s6fPObWQgM5+VFiAluEp0p2tI0GqmqqJxuwA6tdU5c/08D4TVNOAray +5o0olTEaLOhK8KzHXuk+8+n7OA3qriCnlSEGak+k6ZVM0MCw5XbrFHbcsP6k +CYMGEh9WLNqw+7I+HT0wR4OX/QZGWdjX1oruOc1FwKKVrDEZu2a23z1iDQGR +rLQeFexv/QVhQbwE8NmMFUth73xmecd7PQE5Vtq/fg3i/eYV/dNalACPt7sV +WrFFbPeI7REn8P+1Ovg1tqmRmAbaSIDYbumFcuw0oUIXigwBenkxd+mc61WD +pbKKBJhlLJ6NxCbyChs3KhOgrp4RH8C5P+3U4AZVAp78knx2jPM8QlyIR4OA +HsGPtfac6+J7jzP0CBg8pOiuhV31Wzx+nEyAZ+XKOmXsse9D14f0CShxfsnY +hL3j1em6TmMCxs7/OSSAPRpYLP8SCAiMOFvCGmAgYdcYgxfmBGz1KBScwDax +2GdbaknA0tc6+jB2iszXU3n7CPjU/dy3C7uCpySNbk2A5ttrt9qwR6ZjHmbb +EhDj4L72PbZxw8auKw4EPFMvi/sX27v069QlRwIihs2TqrCv3CrhPu9MQKvE +q9Zy7K9h+/WiXAngKbwwX4gt5Cm5N+QIAfKB73vyOXn7R476exAQ6vln9j5n +/JYzSZ5eBHCd1m/K4dTDb33P1ZuA70z9xJucvAXJSkcq7k9D5WQmJ294pM2W +IMDblpuewclreTJudZwAv4i21auc+l6c+QX+BMzVJKWlcvLvWUuYBhJgiYyO +XOHkX5HSMgjC/Yl1uCVx8qNHd28LweNtPFL/xhaklrpqhBHQsNq1cgnb6EBc +sHIE7scI3brIyd9hc1EuigDquqzwROxkVekcqWi8v84MnU3Afi4yViZ6moC6 +29L1F7CHf5a+F4glwDUSdnEs+C1umDeOAAqfK+M8tmGHzdKfeALynf/6yPH/ +AeD0SzA= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.9021619881920246, + 1.1062681046136402`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.9021619881920266}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13365,21 +14418,21 @@ wTw= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.9021619881920246, + 1.1062681046136402`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.9021619881920266}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13393,103 +14446,105 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Xk8VN0fB/AhVLZsWRLZZU0z1pTzDalsCYnII2auLNlJES3U74lQFHrS +VFKSJUnZ8lQkQiSy9NiyJGaGsWRJ9Tvzx33d1/t17/nc7/ecc+9V9A52pHGT +SCQmPjjn0A+66i/aP5jRG+S3WZWxkRnrvoG3ZSHaTFdU4HiIbpihYlmDvLZp +ze3BdqC28glS3qKcGNN8jkuj4+t4LVtQ02VHxPHfDdKv4gs+okdESIUldmV7 +6O1VchdqlL0uzvFk3/vYU9U96EzlKwcL7E1jyu4/LP5Dkwfngs2xbaZjTcJb +BtHisnbobuza1UmB6IJh5Np0whmwP5+TinkeNIJS+splEDaLz3JynjyG+q15 +X+/C5ksOcaMsjiO3HR7WO7HlRXMaQ6sn0EBzVfkObHvZHw9YFgx0JCiVbIRN +3FGS1FnHQisdvJYG2PGqBxIDWqbR9NkEIwp2j1Tn9ogCNuqK+6deF5t6xN8v +PXkWVRnre2pjz9wi3X0aNIeGNnzu1cBep6QjwiYvoKh1hidVsDOodXtFNv5A +mgXzWYrYCg/d4rct/kA5fi9vyWMba19knaheQpNeQdbS2McNB1smLVbRjocu +ZvzY89GRPPxqv9CF7KAQPuyz1QI7Ndb9RnZ66Qnc2Flg/Ni35Q+6U7fGaeUp +ri+v0TKsgAtsfK/8bwK7oCF96JwsNywd2Ng8gj3zzTP2ajI3yEgWTQ9gx2ou +lD0JWgPSgsKDndgZJYrK02RecJ6/5/Ivdl87o/Z3Li/E8794VImtMPviiPBG +PtD+PjBQhl2ob39NZ5EPqJqB0w+x6ytPcwVWr4PIs8mPUrAX6j4NTlgIQmNl +wHkXbDFbQZGYWkFITtVzssfW67QEIRMhGF3/mWSF7T9afme7rjCopTfM6mOH +cLfo7RIUAXtP1+2i2GNKxezEH6KQniW/qa4Uzw/xfn0bRQzCtvtUVmBzPx5X +lA4VA5WGLINibAXKFseCKTG4FvelPgv7iEXa0w9D4hBkPmQWiN3mExYu1bwR +z8/qXUHsgYcpSV7rJIH07qsICZsxVZD7aI8knPL+4DH3hI34I0Y+mb6SBNUb +VUm92JYJzvpe5VKwuVTY6j521X3DhXy6DJjqzehQsO+PrUTtiJCDk9JlXYYl +bLTv0KWB8CI5UBmNWqeOzagXtyoal4Nsx4nNUtj697U3KrjJg6N63+SPYjyf +3p5lvGZbwL1GRbYce3Z66OTEBQXIcn7xQQtb/ITlszI7JSCqI69wF7HR+H3+ +4w7+StBvJL7MKmSjiv/aZZkXleAMZFh9wfawPXpB7ZUSuITuu1SGfV8ryjGb +rAw+dsV0b2z9yYczcVIq4CKoqFv9mI2cfQV0rIdVQZb0b9sh/B6gqEPkw79U +wTxMjG2GrZlIN6LKqMFkQtmCOjYpl2Ied1ANOr6P5y8/YqOiAffDT1+rwa5O +uxf/YPO5FJ7bdE8dJnN/Rfbl4/os7T5PemtA0beoy+YP2SjXKfPLYpwGcFnW +yGzFTvEeHuL5RwM+CGcmC2FTz0ZOyX/SgAvpknI9D9hItCaH5GShCZu9zn0P +wPansDSrlbVg5bQuOSWPjWSVUuOTRrXB8V1RxstcNqq5PK+xzK0DzXc7N+Rg +e8y5dRKKOiCnzPCLxb5dr6Jh7qkDsVw/q3ZgK/lWdSx160CM2Up7+T3cb+GY +KtGsCyvBN9vy7rKRnKw8oeCmB/4mbL0TdDbSzosQ/InI8Lwrwv3mTTbypl5Y +0LEnw6mXQscjsLOUrw14eZAhI6XM1R57zb2SJw3RZHjLoIxzYffdnnS+VkqG +XEX/p77Z+Hua5ZWjoUyBl2WNYrpZeH2TbHVd+fRBbe0TwQfX2ehumIpDeYsB +KH0RqbBIY6P2KGSUkGcClx6d09p6gY0UPbvsjwbuAq5LfhWhEWxE+/O8WO4U +gOnYxw51GhtJTVWslfI2hzMNfsJLjmwUQdn53zVNSyh6+kknA3D9zNVG8ck9 +sEe7VdZJB6+nefhaetteSD/A/1NbCu+fef/XhRn7of/ou+QQLjZa2i3dWh9v +Ayb71lzunphB/aQ17OFjdkAx6TB71zaDgjYHp51TPgBl7p5Nz17MoGK/xlfX +Ex3gZFPev4u3ZtDpOZlFLb+DYGRCs718YQYtWFu5vPvLEVLfRP34x3cGmbhf +3T120Aliy6t5ZmxmUIdMjn89xRmWarUteMgzaNODCzX5Ww/BSK9O89TGGVQx +pGlrL+QCryt7rXMWp5F854xvFNMF1HhrdbvqpxHl+tXC3KHDUBxA0j6RMo1y +eOZ0r9W5Qm3Ss7VnPKbR893b+hIr3UDt0kDkafVplGV0WXS14Ai4CFeqvpln +obYveRcpye7gUbjzbXMDC5Xb3VIJOesBvQcjHW/cYCH2CSdSEPUoHFSq6LcI +YKEFK43jLAtPePu2Z1e8OQvlM3uXwg3/gtTCgiwbaRZyvZvnc1TQC16tRNSy +Z5mo7KnNX2suecF4goTCuxYmMpHtWP572QsUr34rCXjMRMpDvn0f/Y4Baa94 +y0wyE40KBBy4NXIMPEg3B8ODmKg9xd5n7yFvuGxdfyTWmYkyoukCke3esPSx +wVDRlIlqav8s++z3gUDzzIdyqky0wQMuUap8YKLIuo4izkQKEu/aNtf4gGft +u/IpMSbSa7GT5qv1gS+D93pysR13uj/qee0DKl1xJRLYGZujms80+YBEsty9 +JREm2tT/eENjjw+s7gvOaRJmIhVPqSyPRR/YVfbyTyo/7seLlZ+oT4UQuSm+ +Em4mepA9E25vSIXxw1nyJ7ElPs2aSRlTQfP+Hy+Ezdqz2JlvSoV1MjxEOxcT +f79IXC3mVGgqlAmdJzGR8KKom9hBKrTKbr5i+YeBRq8YrKefoMIW0YPfeVYZ +6OA7o07fYCqcau927/jJQLWkHXS9UCo4DDgu07Gzw80M3kRQYb5eu9wU295t +77GxGCpkn6frRa4wUKWKW6XWZSq86Fg2mllioJTqWL+KB1QwpC2n8/1goBPk +TJPofCrccNKy6VtgINtHpeuNC6jQH9qtVYzNnzn+6EURFd78zvVzwU4Mc5h8 +/owKLdaG3fnzDBSroRJQ/oYKv7NPxxyaYyD/zObApwO4/783zLbOMNB+4fGd +YUNU0B43+PIAe2siSYj8lQpV9VyseOzxMIOi0jEqyIinppGxj9nTmU8YVOhb +udeUPc1ArrzhQSUrVDDPrBMMYTHQ3vBNIYWSNNjSbjpoymCgN/SL1tekaSAq +8FRBCntny6xK9CYaaCUfSZ+dYiA91eZeC3kaXGLtFSzAlumOsfiiSoPlB1W2 +sthTO/ol+Q1oEGSks37tJAOlct956etEg++9tqfWTOD+twlm2R2igcmOrJHR +bwyU4B4dRjlMg94HZvEN2NHPHNT/HKHBbrO71pexjxFcV2940+D81v7tEtiU +997Ut6E0aHmvbrF9nIG6r6oKKKfRIDjTJzptlIGKkdDxias0kEwKfXIKO4E5 +X1+UToOE1eviPtjk/fVxxpk0WOug6m6InULymbW7TYNtemHTAyMMZBV8pze6 +kAYB7T46xthycv8zNCumwbeSbVIq2PPvg9PXPKHB5z1y2iLY99SQXUoZDa5u +9+qe+MpAv/r7X+VW0YC5eoNyC/uZrWz+h0YaSB91WiOAnbTCzZvxngatq4n0 +5WEG8s6fPObWQgM5+VFiAluEp0p2tI0GqmqqJxuwA6tdU5c/08D4TVNOAray +5o0olTEaLOhK8KzHXuk+8+n7OA3qriCnlSEGak+k6ZVM0MCw5XbrFHbcsP6k +CYMGEh9WLNqw+7I+HT0wR4OX/QZGWdjX1oruOc1FwKKVrDEZu2a23z1iDQGR +rLQeFexv/QVhQbwE8NmMFUth73xmecd7PQE5Vtq/fg3i/eYV/dNalACPt7sV +WrFFbPeI7REn8P+1Ovg1tqmRmAbaSIDYbumFcuw0oUIXigwBenkxd+mc61WD +pbKKBJhlLJ6NxCbyChs3KhOgrp4RH8C5P+3U4AZVAp78knx2jPM8QlyIR4OA +HsGPtfac6+J7jzP0CBg8pOiuhV31Wzx+nEyAZ+XKOmXsse9D14f0CShxfsnY +hL3j1em6TmMCxs7/OSSAPRpYLP8SCAiMOFvCGmAgYdcYgxfmBGz1KBScwDax +2GdbaknA0tc6+jB2iszXU3n7CPjU/dy3C7uCpySNbk2A5ttrt9qwR6ZjHmbb +EhDj4L72PbZxw8auKw4EPFMvi/sX27v069QlRwIihs2TqrCv3CrhPu9MQKvE +q9Zy7K9h+/WiXAngKbwwX4gt5Cm5N+QIAfKB73vyOXn7R476exAQ6vln9j5n +/JYzSZ5eBHCd1m/K4dTDb33P1ZuA70z9xJucvAXJSkcq7k9D5WQmJ294pM2W +IMDblpuewclreTJudZwAv4i21auc+l6c+QX+BMzVJKWlcvLvWUuYBhJgiYyO +XOHkX5HSMgjC/Yl1uCVx8qNHd28LweNtPFL/xhaklrpqhBHQsNq1cgnb6EBc +sHIE7scI3brIyd9hc1EuigDquqzwROxkVekcqWi8v84MnU3Afi4yViZ6moC6 +29L1F7CHf5a+F4glwDUSdnEs+C1umDeOAAqfK+M8tmGHzdKfeALynf/6yPH/ +AeD0SzA= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.9021619881920246, 1.1062681046136402`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.9021619881920266}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13499,7 +14554,8 @@ wTw= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5511670383120088}, + AxesOrigin->{0, 0.9021619881920266}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13527,7 +14583,8 @@ wTw= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.9021619881920246, 1.1062681046136402`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13535,9 +14592,9 @@ wTw= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991347865018469*^9}, + CellChangeTimes->{3.991347865018469*^9, 3.994359739534212*^9}, CellLabel-> - "Out[469]=",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] + "Out[139]=",ExpressionUUID->"8de8dace-5ffa-450b-81bb-4ba21972a037"] }, Open ]], Cell[CellGroupData[{ @@ -13601,199 +14658,227 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918503718899097`*^9, {3.991850469268881*^9, - 3.9918504694651966`*^9}},ExpressionUUID->"497f9779-a3e4-c84e-a207-\ -0aac70483e3c"], + 3.9918503718899097`*^9, {3.991850469268881*^9, 3.9918504694651966`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.458740908982352`*^-268\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 470, - 513, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652482224`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.7980149271293202`*^-270\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 157, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994359739629208*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], +In[140]:=",ExpressionUUID->"e7f0afbc-82a4-4c7a-a859-31237d92edc5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7391049816418008`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.33516498775198`*^-282\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 158, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.9943597396350317`*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"fa65900b-694b-4e0d-ae28-54a772106008"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.017292122731375`*^-293\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 470, 514, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652572174`*^9}, + 140, 159, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994359739640252*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.230095503809359`*^-290\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 470, 515, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652662163`*^9}, - CellLabel-> - "During evaluation of \ -In[470]:=",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], +In[140]:=",ExpressionUUID->"8271f12a-48f4-4398-b202-b4c1d870a145"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 470, 516, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347865275215*^9}, +during this calculation.\"", 2, 140, 160, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994359739644656*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], +In[140]:=",ExpressionUUID->"8b2f8971-cf81-4c46-85ab-62f3d27fbff2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8Vf8bAHCR2bLHNbJTNtfF5d7nQfZIKaFkZFQSZWSmkMwiijZCRsm+ +FxVfVFJpkLQkKzuyV37399d5vV/ndc55Pp/zjI+Uu98+T2YmJqbmDUxM/7/O +97xqkU3Ko+6pDso4s92W2nlXONSgOxqOZ81Hm2QoAwq8cxfuvgpGwfkr6+kU +CLYt/szSnQuurEPXX6ZbA8+k0NWlzxWw1KTzyz7dGX4+sfGb/dwE4ntqL75J +8wUT2dEf058/wn9hwQKNSZGw9Fn72tTnPvDXKmgoDEiBZqMHeR9yZ+AVBJ78 +bHAXxH7WDrkrrYEhiZQru5IP/CdditmNWNDImbmvSeEhXFU3qbc5wIFvZwoP +RG8uB9VvjqaUYxwowBpl0ShYDm9ifTsUwzlQ++XI0wXJcmDrzhjjyOHAJH1z +fjutcgg/1y/aPM6BOySKd9U7l4PH6/MR2rGcKPbV2dvmUTmQPOspkpVc2DS0 +ZOJrWgFfstQap7m34JHE02UrXpVws6NkW7DcFlxVm/Mn+1eC09YdLsu6W3Cw +qqjdP7QSvseI/2M+ugXdxhIOtiRVQu8pLn3+6i2YIEtzZCurhOHdAzSS41bs +ubvMPjtfCYtTmY/Dc7bhAf1nCV7nqqBWkW99vXobFkkURGTEVUGY12Wb2LZt +OC5+6GXt5SpY/RY7kTyzDXk7+ZxH71bB+X66wDtpblxL9nTsf1YFse35dr2B +3GjadE5ec60KkvKi3jGL8CChwLMLAqrBgnicV0CGB7fb7GshhlUDR8u+AzuU +eXD4SrSK1IVqiO2X+2ZpwIPN7u0BvZerIUL6zVDGcR5MzFEuXCyqhlPZwv/k +63hQU2/TyuWeath7u1zJ8hAvFnGyxtgY1AC30i0/Z09eNF5Jv6BuWgPt9bEV +fn68KJnw5/cm6xqw+HZQJyOGFzefHR8tcKgBQ8I/ox8lvMi7wbo5yK8GiFkW +h/xWeVHC48eN4Fs1IJTRn5B+hw9VVTK+bJyoAWHF6tjFAj58bfFWPnq6BghN +cVHOZXz4pPTR8sJcDUhM7Qza0cyHxEO52m//1YCclb9r/TAfRnWNbpPgpoHm +xjVSvyY/jg4eSndUpwHxVru6GYUfdbyCQly0aEDSyFZ6ZMKPl6TmR511aUB2 +NZI+68iPgU89w3Yb0MDgScKWTVH8aPvT1Y5uS4M9gYIDGm38uBQfHql3iga2 +m4Z7Mjv4scb0dkzbaRrsy639svqdHx9KNEvtC6KB/fvD71784cfmsT07LSNo +4Kx0v85JQADnT56JGEiggc+Aalq0qwAqP49eqLpPg5PhG5J/HxdAqinb4NsC +Gpzi7YizChDAg16zIT+LaHAGgyME4wQwlUMxa/wxDUJvP/EuLhFAmlj8h9J6 +Glzab079OC+Apn9FFDo/0IBQ1U5g3iCInnIsj8o6aVDKt39BfZMgBr3uzo39 +TIOuj0fK0rYLIsn10W/eHzSQ3RsovddMEDP8Wlle/aZBk/U9tvc3BLHg49aN +d1YY63kk279+XxBtuqPcptdoMLq5uEG1VBD9Gu9YUpjowPOmKuRKkyCuGJ59 +W7+RDq4WbaM2Y4IY09r61G4LHdZM5trf6gvhFJc7z7QYHVILwkrWTISwqntB +vkGCDrJsTPHKe4Xwz8OykVhJOlg95zJI8RTCxz1mUQsydLhpJFlpdVkIG+L0 +d4buooPK/fwrEVlCeJJldnCjEh2amBVPPswVQpuEp27xynQY+U9LbjNNCNcc +Pt4LVqODDlpmvv4phP9iOUOmtOjw5t77gJURIUzt0/EjazPiXT9gqzgrhKH9 +0ToROnS49MyVM4lDGI9rUCx/k+lAkBgarOMVxnMu929w69OhNNKnaVRMGP8M +bWtRp9ChSz843EJdGO1OC9IOAR1O3F45GKYnjBrE1lgPZKx/5Tyx2FgYOdse +63gaMNZbnzTB6SSM0v8inW2M6BCgm+PyKloYp7+kDDSY0MEie+usZbIwzhiK +S4Sb0kGaPSK+/ZowuhhnOama0eF9p315R6Ew7k7eORhtTodCvRZj+wph1K2r +1Ja2oENUrvrX7nphPLCH53odwyr+m1l62oVxScA2qsuSDqyfQzNdu4VR4MrT +rU5WdPhO+a3Y/0sYVZYEK7sYrsrb3+g5JoxyTMWnrKzpkLSpaf/wrDCCzUuj +eobdz6iOnPgnjFEJTUQZGzqQv9yOnGAXwSHbv0axDA8XnC34SxBB4luHF+p7 +6NCwZZAcJCuCI7GW1HMMXw/c925BWQQ3vBr90czwqW8NR8O0RXBu/NYDZls6 +GBsqL66iCG5UfnmHzLBY0c3kKAsR9Cr53OTD8Ow2Dinm/SJ4w1dP5DrDr4OD +qmOdRTDT8ej9WoZzf/SZs3uLoLhm89EuhkN32/Yk+IvgZNaHw+MM25Y8PbM5 +TAT/beBIW2FYgVeR/UqMCLbU9TFv3EuH9ZCsWzwpIujR11vFynDXT1a1jOsi +OOUdW8TEcKlJQItgNuP77Pv6ZxnPX3zU63CjiPF+0w8efQwf5reZEK0UQa6z +yWqvGNYMr79w94kIvn7AbV7EMFefgqDUCxFkfjxRFs1wn9n14vvvRLBQsubE +AYZrH7OA/BcR5LReD5FiOFXwdEdhnwjOU9x6hhj7dSyyx1txnOHK4Dv5DMOA +5eqjORH0lflBd2ZY0LI2VW1dBF+VEzW3MTxRLi9XyUHAQg3JbXWM/9MinFGr +xUtALjnjPUcYvh21wYYuSsCAMsv5Fcb/DRg61UeWIyBPbg9bOsMW1t+Dn6oQ +cPB4SYwMw9JV5ptQh4A/hNz9HjHy5f0FWaKxJQGfBDrdfcTIrwfDaa0v9xMw +3pzztwzD5/asH7Y4QsA7FhFF6Yx8VBb/enHPaQLuCsgvcGHk78ZYU8LHMAJ6 +W/8Yqmfk9/fRqtL9sQS8V/m9hIfhRPqVz46ZBLR03fuuiFEfbtvXfL5nE3Ao +4bDmuDGjvuNOMLkUE3B23WmHAsO/7Yx3ejwl4NfJkLZkRn3t/rMcdqqfgE93 +VFlxMuox1Cxj13/jBNwkJGclzqjX0hzlr3zzBEwZvqGuSKWD8H5X3VoOUbzE +FlJLZNT7OP35AouKKHqb9XCuM/qFFK/LA3ttURToI8X1kehg77NoX4Si6Hvu +zr8GRn9pFFessbETxdzEpsljmnRIj04NvBEiioMS0qIBKnRo/bZTdvyCKIZt +u/pCntGvVonNHdQkUdQZyIntVKSD1+85jYE7othuzbNbYiejvqwOTas0i+K1 +K2WSPox+2Ccgf6plixgeVYn8Ni5IByG/BnEhITH8EKK02UiA0T9bHd4elxTD +FYLUuXQ+OtSEJSlt0xRDh9EX6jLcjP38OTXq6CCGbY/6Ff9x0EGjqN77T64Y +Gtpbcucv0eCC/l43go44uk0/E3vTRQOzI3f/ahuKI9/Lq2/0GfNk6/mxmANW +4rgwn6j8gDFvbjdfLEh1Fcepszp8x9/QgG5RN8aWII7vvyr15vxHgykHmeCZ +L+Lo0WAqNlZMgyNBc4lvwiXw6L4G16UQGshlGoqNXpRAsxYVg0LG/BynX3nE +niqB6denHPaeoUHY6s73hnkSqNpWAFd9aHAt5ohA7RsJfPCy0/2dMw3epL28 +ly++Hct+DbwhM+Y3ufRG1bmG7ci2rPtzloUGuz+3r022bkfvxntj2kw0sGHa +aOrycTsmxK8cC16tgaP7Tn2Bwe3IJS3xfHC2BkzCpaLOs0rilNHKscuDNeC/ +ff6+gaIk1v6eSeV6UQMt3vcmmoMlcV8NCLTG1MDJxenzrVuk8L6uqsuOmWog +n/YSHOKVQgM+QcLaBOP8Nfq1hEVYCsUGKlLbh6sh/1tzF1VaCk80K7R4MM5X +Pc+uKVWTpJDf5sWrI6+qYc9F3e4cFymcfi97LuVuNWjwXlANL5fCNd6Wf/PG +1bCkyN2jfEAa6yyljrEmVoF+ycPs69dlMGVEDeQWKmCa18LVvkkWQxJ/cN4+ +Wg4Dya72Z9jlcZ291UmE+hjM/5w1HyTtwMr999UKJ0tg/ChHQFWUAt5q/vjj +mW8h4zwvxHypaSd6JqrfC5fPB9638pfL/uzCvLysbe/Mc0Es/rEtiaSEkzft +48p670KWoi43n7cysu191XOH7ya0EQy0ZtJUcM+4aPzwz2tAFmtKVe1SRZG1 +6tDp3jTYypIb6Batht9zWc6F7E0BtqUGu+lYNVTrGZXN006Bf5M/NC5cUkON +cpFdv8RT4M9XkensZDX8R5rXuTKaDO8r0nx7r6th7B6R13WxyXDV/YKXS4ka +zjn4Nls8SQLBJlcH5041/DEvySenkwgSF7brO8qroxvrl+GTbpegNIBD+oeC +Ot74z9dM3uoSUL2m2d0U1fHzWuroJOkSOFs2dxxTU8fr507+eLT5EtwW8PYJ +Iavjixrq21/0OBApLr2ZaaOOuTX1FmL8ccDfQVn6FKyOVILbYOmnWOCUO1yz +76U6Yjlr9/eYaDghAhYlr9TRxWes5mhANLRtke5heaOOfY9y/OfdoyF5/jdr +9Xt1lK+6eQQMo2Fra8ABoa/q6Khnm3RkQzTw+iTNfhtXx9MUJqe3Fy6AWHmd +hievBj5YOUU1SToPKhSRx2edNfDPBtbnPecioVLm+AqzqwYumafGEd0iQYer +1vSyuwYefy46kmsUCYafHXrzvDXwet5Dh1cckWB/Oovn42kNPOejaK+XEQFR ++UKBSnEaGCHwyf/B43B4v0VQ91epBo5N6idTFkPhTA9vswWTJq60cZ3d+zYY +Wl8cflrMrInvxFtGF2qCQeJxAY2LVRNFp763lWUHQ1sU+WEbpyYquubddwwM +Bmkp92sWfJpo88z0fJxYMHw4Wu5tIa+Jmm93aRr5B4HayJ7NFlaaeGBAwmtF +NhD+zCQfMM/SxFBt12ds/52G79059nduaqKZEf9O68enoe1pzcHp25p4d8+X +0tw7pyHvUq/jjRxN9FXTHggLOw1OosQjI8Wa+PaubX8P8TQ8N/zmlfBUE8d5 +Q/JPPvSHW2k7Q171aeKLCx/7a6z8ID6YGio+qIlMLzTaB5T8IPiQXdjp35qY +s/NRrMoWP7CVi4wQGddEGoc7l0D7KWCrfX/++JwmykW5HVfaewpO955N4OQg +4kzWY+7Aw75gqvriprkyEVPXJkwG43zAgc1s/3tVIgobKqmsefvAiR+vthzU +IOKvW0RBTXMfuJz09ryHNhFvELOSFzf5QNfvTq8oAyL+rryS+vvqCfDI7teo +PkBE95QSVsOC4xDNs+G15DkiPvNLMLTs84aM4ejYB+eJeFJG/9TCC28oaNhI +VYlh3NcYfvusxBvafDnK9eKJyBtt/fFukDfwtG3LtL9KxIuZl9JyuLwhO1ri +aHIBEUtjUiTu6XrBsxm9lYV2In6TQ+uhYg/IeUNzt/tAxMLY4mWfDA+Izdds +K+0gokCr82b2cx5gflDxhmc3ER/P+hIi93pAZx1Bu+MXEW/vKOXzXjoKoxeW +zpTOEpGdVr9T1vooCHLTRj0IWsh8eZ3nI4s7LA1r7GsU08KHbxc+Dfxxg+// +ldaKbtfCWxJXV7m+u0FOQEH8RxktvB9RqJlW5QZKn6/Jo7IWdpXx3ojxcgPD +u4HuoqiFQdmEr3/fusIpJY2vHzy18LaTsp/MARcIWiAsuxzTwqN+ZlJ/VVwg +oomFMHlCC9cG/i2McLhAksMnRy5/LbR4PB+1/+kRKIwN+WIYpoXztcqL3ApH +oO/7s+7Ky1rokOjxgp3VGexTLD9fo2mhRM+O0JlvTuDsQFyQqdPCCJYZ0Zw6 +J/CQEReqeKKFZSubggJuOEFA7aR9+39aGNvp3HTxoBOkDqZ1sb3RQnu1JSHn +T47QRun+dLZXC41vOvjWfnYAyqRHpyMnCT2Ob7Y3mrcHwXrT3CebSBig5MOu +8c0eJi/t8t++lYQfoFSV0mgPd6WmNg3yklDnU0BUYaI9/NsfbuQvRsLVrEeO +7yXtoaE+rSJOlYQOq5Hie/YdAIOEZ6mVB0g4OtwR4PzKDgj2OUcEHUioqjQk +VlJuB3+lY5VCnUiYMWygznvTDnKfmLdSXUh4aqqSquRjB8xTneuvjpFQ2lbW +I2WrHTTbj53qDSehsnHA6z+O+8BYVth6Sy4JrX8+Hclk3gtVE8+lPPJImBY5 +98hm0hZkaQHzdQUkDM2+qiH61RY2Wry7d6yEhIMZT5Xmym2hyS/ub3MVCUW8 +KDXF7rZArZ/NDHtJwnexZmUCqXuAtO9D3+9xEtbd4JJX220NBaJRNOofEiZ2 +v5dtkrQGgUGl5GvTJIypT+wKW7OC2bPxWkbzjHj/O9XoQrOCijsQf3edhBcf +bqqcUbIC1ZFHygd4tTEpu/Ca7HZLUDifGNKkrY39aTPDlRLm8EQvn9WKrI0J +vNCst2YGtgsNVz/pa6PNyofVsW9mEHJq7uGwgTZe0uIdaLlhBq2HXX9ttdLG +46NlQ3ZCZnBMl2RxyFUbS+uHbJpETKHo7y/R2Xht3M3MH9RCNgZq6WphZJI2 +3szIusMhYQwfjwuR2C9r48bmdIL/BmNY7rWyJaRro/Vyemhh626weEeLxTuM +eEg3CuscdsNoScpEcrk2/vtCl9gdZQS7PHUb5L5qI0ufdcv4gAFckbZZjvmu +jX4pMYSFtwYw+9Ndq69HGy3kXpuL0QzgmVNyyd1+bazp/dBSk2AA+2x/ZgpN +aGPDy4pdO9UMIFTvoj8nkw4ahuPfsQsIrTwfpCbkdFCp8bykqz8VlN8NHrZU +0MH8VGXtZjMqXE1ezizapYP2dvInD0hR4TC77FYvVR0UOWdxgq2DAn9Wg5d7 +dHSw2F5w3zUdCggOi3W8t9TBO3K/NfU364Pns2OxVad18PnD3XLunbow6Tt6 +1jhQB/0k+xoCHutCiPhJn65gHazQsWusTtSFxAi/fYvhOri7oZW7zUAXysjB +kvpxjPjEP7UrV+jAak3Mk+abOpjK13Wi/JY2XH18d/Zjsw6Gfhq7rp6qBWIu +ksNHX+jgKszFDflrQf7W3G+zrTqo0dFBfL5XC+i++U2C7TqoH9rOvM6nBT8U +H6Y6devg7/D19SM3iaBQWKvUN66DBKFNQ/mlmtCQ3ekxLaCLUWBbunFWHXqt +pFyChXVR7N7QpW1f1YFpyddxhaCLLe+kF/Ub1cFwL7sNq6Quhh3pnf+XrA4v +NpC1RXbpYnTj5j8EBXV4436P04CqiwUxUW5XPNTgq+yJ0lQvXWQJOLTp8agy +rLyvKRQ4rouXHQl8758pg1gky/2bPrrIuYRJSunK4Pzpdmaevy6OMYsVX9dX +ht6L787Tw3TRvFGvccdVJfg9RLTrvayLmsVRuuumijBbuL6gStNFIZbbbLnf +FWDI3iQ7oVYX9eY6pmXqFKB7Y4pZf70u7lhSVvmYqQD1roQb1xt1MaBr+XWF +nQJEC2uR117pYpeQDUvU2x3AHX8iou27Lm54kmEs9EoelLw/MXkyk7H7h3rR +VI8sSAiIFT3bSEY7Ua6M2//JAnez+15hdjIGE2OencqThRmJqZzXm8hILdgg +fvGELNR1cRlpCJAxflVGIGhRBsxM8OL6DjIyBrOGnqgMHJUr4bxpTcbjnwXj +NcOlIOz5kRPytmSc8Qq8qecqBamevK8r9pGRPX/A+YSxFDzJD01+fZCM0X0p +ynrcUsAvb7ZtzY3xfs7GgLwHkvBCfpDfNZiMTj/7JzrrtsMuhe2S8vfIuKPe +6dLECzHA1o/nK3LIONTeApM3xMD+WNwvah4Z74fdTFTzFYOYwoncg0VkZH08 +FRrCLwbfFZ7IJVSSkd+xwWSzlyhc3umoOP6SjH47S2WW+AkwvSudVDFFRoOO +0fLCe0LQ/QaN+WbIaJTz7XRVhBA0npq0C5wjo1S3a+SUoxBcrjA/TVomo3i0 +cfQivxDsIjM9rGPRw8Ufx7INUgTB3dxXqllQD/sFZeZj4gSg09t0c6e+Hnbs ++rJKvMkH9ZxzBC3QwwMbfC53R/BBbknuzusGetgTzrY734UP/P+smTiY6GHv +YV3TWjk+2HK26sL3PXro6bJt8nklL5jESS0MuOvhNQuh+N2feYCet/JrLl4P +tyeKuoaSuYFkFLhgkaSHm2NYMp2kuaH61/jm7BQ9XGNW93Lm4oYKiR5ti6t6 +2PkoxOBy9TZ4mNWYcvcWI556coXV8lbITr6oa1qqh/CGj9BzZQskBG5Ly+rQ +Q7aD78QJI1zAwRdfMPFJDznb7qfmNnJBXDnTE8NuPTTry5TyyOKC2MnpofHv +ehhlUh+QZsYF54516hsM6eE7OdXnySWccObwjeGRRT28kB5/60U4BzjtlkE9 +CX28EiTtfdiIDdY6ObY2S+rjmeULZtkSbJDtOfnNQkYf4471yokvs8JQXO1Z +JwV95Li+nNxYzgpnXu15HKqhj66J91XyZVgh0SZCgm6ij0qx4juzeTZCncOn +VaKfPg4KOxoZ8zOD80hd25PT+hj1xekWz/wGYArLztodqI/vd7cEbeneACa3 +fIj7Q/VxUWHX7au3N8DHHxtOBsTo48OlBcXXOzbAqLvKt/JMfaxp/M+7zoQJ +RH0v1ao06mNppfpApvka9fK6l1ZSkz7entj84YjoGpX5qkn57xZ9dCgaSDwx +sUodrWEtyn6lj055esM2V1epdUyxWbwd+ph2pW0ef65QnTLOn50f1MeQ77/s +Qi8uU7PqQ7WebaKgrv2kTRvTInWzjWM5YSsFdfJTPoR9XaCe79VRPstNwfrS +Uj7PqgXqMdZFWTUBCu6Wq0obPLZA1d4TzJ8rQUE/Z7filM55alffmZmL6hS8 +sqZhrVUzRxXgOllufZCCXf80frZnz1DzjCLDphwpqHFte2JQ5AxVI/KyUfph +Cob6CZ9wcJqh2kyVfep2o+C72VHzD/wz1LiuuaWjJymoafhD6WLyX+pibpRh +2AXG9z+GuefFTVO/6qV3FJRQsNipnanA5A/1WFDebfNSCmrpLO7N2fKHOl9a +7TleRsGTzRWC652TVF7p7gX1GgriuN65nx6TVEsOcbGnjRQsubgrTTphgvqk +s8Cj4xMF43Z82K7YP0a12EpXDu6mYIjYjtmNZWPUbtNX88LfKFh3qK9CO3KM +Ols3Fn+kl4K1YpIP84XHqMo5ao9GRik4OR01mG43Sn3y1SA4eYKCv+rrjsjJ +jFIt+O1AdYqC97df3LtpZoTqdSnoQ+AcBX2va4Z/TB+hzjbG3RRapOA21+57 +FR4j1OjlzKN1yxRM+5skMqg1QuUmFik5r1HQfpDodpx9hHrXt25ufZ2xX4RL +U9Qvw9T/AdDMpmk= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13807,158 +14892,182 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV1nc8Vf8bAHCR2bLHNbJTNtfF5d7nQfZIKaFkZFQSZWSmkMwiijZCRsm+ +FxVfVFJpkLQkKzuyV37399d5vV/ndc55Pp/zjI+Uu98+T2YmJqbmDUxM/7/O +97xqkU3Ko+6pDso4s92W2nlXONSgOxqOZ81Hm2QoAwq8cxfuvgpGwfkr6+kU +CLYt/szSnQuurEPXX6ZbA8+k0NWlzxWw1KTzyz7dGX4+sfGb/dwE4ntqL75J +8wUT2dEf058/wn9hwQKNSZGw9Fn72tTnPvDXKmgoDEiBZqMHeR9yZ+AVBJ78 +bHAXxH7WDrkrrYEhiZQru5IP/CdditmNWNDImbmvSeEhXFU3qbc5wIFvZwoP +RG8uB9VvjqaUYxwowBpl0ShYDm9ifTsUwzlQ++XI0wXJcmDrzhjjyOHAJH1z +fjutcgg/1y/aPM6BOySKd9U7l4PH6/MR2rGcKPbV2dvmUTmQPOspkpVc2DS0 +ZOJrWgFfstQap7m34JHE02UrXpVws6NkW7DcFlxVm/Mn+1eC09YdLsu6W3Cw +qqjdP7QSvseI/2M+ugXdxhIOtiRVQu8pLn3+6i2YIEtzZCurhOHdAzSS41bs +ubvMPjtfCYtTmY/Dc7bhAf1nCV7nqqBWkW99vXobFkkURGTEVUGY12Wb2LZt +OC5+6GXt5SpY/RY7kTyzDXk7+ZxH71bB+X66wDtpblxL9nTsf1YFse35dr2B +3GjadE5ec60KkvKi3jGL8CChwLMLAqrBgnicV0CGB7fb7GshhlUDR8u+AzuU +eXD4SrSK1IVqiO2X+2ZpwIPN7u0BvZerIUL6zVDGcR5MzFEuXCyqhlPZwv/k +63hQU2/TyuWeath7u1zJ8hAvFnGyxtgY1AC30i0/Z09eNF5Jv6BuWgPt9bEV +fn68KJnw5/cm6xqw+HZQJyOGFzefHR8tcKgBQ8I/ox8lvMi7wbo5yK8GiFkW +h/xWeVHC48eN4Fs1IJTRn5B+hw9VVTK+bJyoAWHF6tjFAj58bfFWPnq6BghN +cVHOZXz4pPTR8sJcDUhM7Qza0cyHxEO52m//1YCclb9r/TAfRnWNbpPgpoHm +xjVSvyY/jg4eSndUpwHxVru6GYUfdbyCQly0aEDSyFZ6ZMKPl6TmR511aUB2 +NZI+68iPgU89w3Yb0MDgScKWTVH8aPvT1Y5uS4M9gYIDGm38uBQfHql3iga2 +m4Z7Mjv4scb0dkzbaRrsy639svqdHx9KNEvtC6KB/fvD71784cfmsT07LSNo +4Kx0v85JQADnT56JGEiggc+Aalq0qwAqP49eqLpPg5PhG5J/HxdAqinb4NsC +Gpzi7YizChDAg16zIT+LaHAGgyME4wQwlUMxa/wxDUJvP/EuLhFAmlj8h9J6 +Glzab079OC+Apn9FFDo/0IBQ1U5g3iCInnIsj8o6aVDKt39BfZMgBr3uzo39 +TIOuj0fK0rYLIsn10W/eHzSQ3RsovddMEDP8Wlle/aZBk/U9tvc3BLHg49aN +d1YY63kk279+XxBtuqPcptdoMLq5uEG1VBD9Gu9YUpjowPOmKuRKkyCuGJ59 +W7+RDq4WbaM2Y4IY09r61G4LHdZM5trf6gvhFJc7z7QYHVILwkrWTISwqntB +vkGCDrJsTPHKe4Xwz8OykVhJOlg95zJI8RTCxz1mUQsydLhpJFlpdVkIG+L0 +d4buooPK/fwrEVlCeJJldnCjEh2amBVPPswVQpuEp27xynQY+U9LbjNNCNcc +Pt4LVqODDlpmvv4phP9iOUOmtOjw5t77gJURIUzt0/EjazPiXT9gqzgrhKH9 +0ToROnS49MyVM4lDGI9rUCx/k+lAkBgarOMVxnMu929w69OhNNKnaVRMGP8M +bWtRp9ChSz843EJdGO1OC9IOAR1O3F45GKYnjBrE1lgPZKx/5Tyx2FgYOdse +63gaMNZbnzTB6SSM0v8inW2M6BCgm+PyKloYp7+kDDSY0MEie+usZbIwzhiK +S4Sb0kGaPSK+/ZowuhhnOama0eF9p315R6Ew7k7eORhtTodCvRZj+wph1K2r +1Ja2oENUrvrX7nphPLCH53odwyr+m1l62oVxScA2qsuSDqyfQzNdu4VR4MrT +rU5WdPhO+a3Y/0sYVZYEK7sYrsrb3+g5JoxyTMWnrKzpkLSpaf/wrDCCzUuj +eobdz6iOnPgnjFEJTUQZGzqQv9yOnGAXwSHbv0axDA8XnC34SxBB4luHF+p7 +6NCwZZAcJCuCI7GW1HMMXw/c925BWQQ3vBr90czwqW8NR8O0RXBu/NYDZls6 +GBsqL66iCG5UfnmHzLBY0c3kKAsR9Cr53OTD8Ow2Dinm/SJ4w1dP5DrDr4OD +qmOdRTDT8ej9WoZzf/SZs3uLoLhm89EuhkN32/Yk+IvgZNaHw+MM25Y8PbM5 +TAT/beBIW2FYgVeR/UqMCLbU9TFv3EuH9ZCsWzwpIujR11vFynDXT1a1jOsi +OOUdW8TEcKlJQItgNuP77Pv6ZxnPX3zU63CjiPF+0w8efQwf5reZEK0UQa6z +yWqvGNYMr79w94kIvn7AbV7EMFefgqDUCxFkfjxRFs1wn9n14vvvRLBQsubE +AYZrH7OA/BcR5LReD5FiOFXwdEdhnwjOU9x6hhj7dSyyx1txnOHK4Dv5DMOA +5eqjORH0lflBd2ZY0LI2VW1dBF+VEzW3MTxRLi9XyUHAQg3JbXWM/9MinFGr +xUtALjnjPUcYvh21wYYuSsCAMsv5Fcb/DRg61UeWIyBPbg9bOsMW1t+Dn6oQ +cPB4SYwMw9JV5ptQh4A/hNz9HjHy5f0FWaKxJQGfBDrdfcTIrwfDaa0v9xMw +3pzztwzD5/asH7Y4QsA7FhFF6Yx8VBb/enHPaQLuCsgvcGHk78ZYU8LHMAJ6 +W/8Yqmfk9/fRqtL9sQS8V/m9hIfhRPqVz46ZBLR03fuuiFEfbtvXfL5nE3Ao +4bDmuDGjvuNOMLkUE3B23WmHAsO/7Yx3ejwl4NfJkLZkRn3t/rMcdqqfgE93 +VFlxMuox1Cxj13/jBNwkJGclzqjX0hzlr3zzBEwZvqGuSKWD8H5X3VoOUbzE +FlJLZNT7OP35AouKKHqb9XCuM/qFFK/LA3ttURToI8X1kehg77NoX4Si6Hvu +zr8GRn9pFFessbETxdzEpsljmnRIj04NvBEiioMS0qIBKnRo/bZTdvyCKIZt +u/pCntGvVonNHdQkUdQZyIntVKSD1+85jYE7othuzbNbYiejvqwOTas0i+K1 +K2WSPox+2Ccgf6plixgeVYn8Ni5IByG/BnEhITH8EKK02UiA0T9bHd4elxTD +FYLUuXQ+OtSEJSlt0xRDh9EX6jLcjP38OTXq6CCGbY/6Ff9x0EGjqN77T64Y +Gtpbcucv0eCC/l43go44uk0/E3vTRQOzI3f/ahuKI9/Lq2/0GfNk6/mxmANW +4rgwn6j8gDFvbjdfLEh1Fcepszp8x9/QgG5RN8aWII7vvyr15vxHgykHmeCZ +L+Lo0WAqNlZMgyNBc4lvwiXw6L4G16UQGshlGoqNXpRAsxYVg0LG/BynX3nE +niqB6denHPaeoUHY6s73hnkSqNpWAFd9aHAt5ohA7RsJfPCy0/2dMw3epL28 +ly++Hct+DbwhM+Y3ufRG1bmG7ci2rPtzloUGuz+3r022bkfvxntj2kw0sGHa +aOrycTsmxK8cC16tgaP7Tn2Bwe3IJS3xfHC2BkzCpaLOs0rilNHKscuDNeC/ +ff6+gaIk1v6eSeV6UQMt3vcmmoMlcV8NCLTG1MDJxenzrVuk8L6uqsuOmWog +n/YSHOKVQgM+QcLaBOP8Nfq1hEVYCsUGKlLbh6sh/1tzF1VaCk80K7R4MM5X +Pc+uKVWTpJDf5sWrI6+qYc9F3e4cFymcfi97LuVuNWjwXlANL5fCNd6Wf/PG +1bCkyN2jfEAa6yyljrEmVoF+ycPs69dlMGVEDeQWKmCa18LVvkkWQxJ/cN4+ +Wg4Dya72Z9jlcZ291UmE+hjM/5w1HyTtwMr999UKJ0tg/ChHQFWUAt5q/vjj +mW8h4zwvxHypaSd6JqrfC5fPB9638pfL/uzCvLysbe/Mc0Es/rEtiaSEkzft +48p670KWoi43n7cysu191XOH7ya0EQy0ZtJUcM+4aPzwz2tAFmtKVe1SRZG1 +6tDp3jTYypIb6Batht9zWc6F7E0BtqUGu+lYNVTrGZXN006Bf5M/NC5cUkON +cpFdv8RT4M9XkensZDX8R5rXuTKaDO8r0nx7r6th7B6R13WxyXDV/YKXS4ka +zjn4Nls8SQLBJlcH5041/DEvySenkwgSF7brO8qroxvrl+GTbpegNIBD+oeC +Ot74z9dM3uoSUL2m2d0U1fHzWuroJOkSOFs2dxxTU8fr507+eLT5EtwW8PYJ +Iavjixrq21/0OBApLr2ZaaOOuTX1FmL8ccDfQVn6FKyOVILbYOmnWOCUO1yz +76U6Yjlr9/eYaDghAhYlr9TRxWes5mhANLRtke5heaOOfY9y/OfdoyF5/jdr +9Xt1lK+6eQQMo2Fra8ABoa/q6Khnm3RkQzTw+iTNfhtXx9MUJqe3Fy6AWHmd +hievBj5YOUU1SToPKhSRx2edNfDPBtbnPecioVLm+AqzqwYumafGEd0iQYer +1vSyuwYefy46kmsUCYafHXrzvDXwet5Dh1cckWB/Oovn42kNPOejaK+XEQFR ++UKBSnEaGCHwyf/B43B4v0VQ91epBo5N6idTFkPhTA9vswWTJq60cZ3d+zYY +Wl8cflrMrInvxFtGF2qCQeJxAY2LVRNFp763lWUHQ1sU+WEbpyYquubddwwM +Bmkp92sWfJpo88z0fJxYMHw4Wu5tIa+Jmm93aRr5B4HayJ7NFlaaeGBAwmtF +NhD+zCQfMM/SxFBt12ds/52G79059nduaqKZEf9O68enoe1pzcHp25p4d8+X +0tw7pyHvUq/jjRxN9FXTHggLOw1OosQjI8Wa+PaubX8P8TQ8N/zmlfBUE8d5 +Q/JPPvSHW2k7Q171aeKLCx/7a6z8ID6YGio+qIlMLzTaB5T8IPiQXdjp35qY +s/NRrMoWP7CVi4wQGddEGoc7l0D7KWCrfX/++JwmykW5HVfaewpO955N4OQg +4kzWY+7Aw75gqvriprkyEVPXJkwG43zAgc1s/3tVIgobKqmsefvAiR+vthzU +IOKvW0RBTXMfuJz09ryHNhFvELOSFzf5QNfvTq8oAyL+rryS+vvqCfDI7teo +PkBE95QSVsOC4xDNs+G15DkiPvNLMLTs84aM4ejYB+eJeFJG/9TCC28oaNhI +VYlh3NcYfvusxBvafDnK9eKJyBtt/fFukDfwtG3LtL9KxIuZl9JyuLwhO1ri +aHIBEUtjUiTu6XrBsxm9lYV2In6TQ+uhYg/IeUNzt/tAxMLY4mWfDA+Izdds +K+0gokCr82b2cx5gflDxhmc3ER/P+hIi93pAZx1Bu+MXEW/vKOXzXjoKoxeW +zpTOEpGdVr9T1vooCHLTRj0IWsh8eZ3nI4s7LA1r7GsU08KHbxc+Dfxxg+// +ldaKbtfCWxJXV7m+u0FOQEH8RxktvB9RqJlW5QZKn6/Jo7IWdpXx3ojxcgPD +u4HuoqiFQdmEr3/fusIpJY2vHzy18LaTsp/MARcIWiAsuxzTwqN+ZlJ/VVwg +oomFMHlCC9cG/i2McLhAksMnRy5/LbR4PB+1/+kRKIwN+WIYpoXztcqL3ApH +oO/7s+7Ky1rokOjxgp3VGexTLD9fo2mhRM+O0JlvTuDsQFyQqdPCCJYZ0Zw6 +J/CQEReqeKKFZSubggJuOEFA7aR9+39aGNvp3HTxoBOkDqZ1sb3RQnu1JSHn +T47QRun+dLZXC41vOvjWfnYAyqRHpyMnCT2Ob7Y3mrcHwXrT3CebSBig5MOu +8c0eJi/t8t++lYQfoFSV0mgPd6WmNg3yklDnU0BUYaI9/NsfbuQvRsLVrEeO +7yXtoaE+rSJOlYQOq5Hie/YdAIOEZ6mVB0g4OtwR4PzKDgj2OUcEHUioqjQk +VlJuB3+lY5VCnUiYMWygznvTDnKfmLdSXUh4aqqSquRjB8xTneuvjpFQ2lbW +I2WrHTTbj53qDSehsnHA6z+O+8BYVth6Sy4JrX8+Hclk3gtVE8+lPPJImBY5 +98hm0hZkaQHzdQUkDM2+qiH61RY2Wry7d6yEhIMZT5Xmym2hyS/ub3MVCUW8 +KDXF7rZArZ/NDHtJwnexZmUCqXuAtO9D3+9xEtbd4JJX220NBaJRNOofEiZ2 +v5dtkrQGgUGl5GvTJIypT+wKW7OC2bPxWkbzjHj/O9XoQrOCijsQf3edhBcf +bqqcUbIC1ZFHygd4tTEpu/Ca7HZLUDifGNKkrY39aTPDlRLm8EQvn9WKrI0J +vNCst2YGtgsNVz/pa6PNyofVsW9mEHJq7uGwgTZe0uIdaLlhBq2HXX9ttdLG +46NlQ3ZCZnBMl2RxyFUbS+uHbJpETKHo7y/R2Xht3M3MH9RCNgZq6WphZJI2 +3szIusMhYQwfjwuR2C9r48bmdIL/BmNY7rWyJaRro/Vyemhh626weEeLxTuM +eEg3CuscdsNoScpEcrk2/vtCl9gdZQS7PHUb5L5qI0ufdcv4gAFckbZZjvmu +jX4pMYSFtwYw+9Ndq69HGy3kXpuL0QzgmVNyyd1+bazp/dBSk2AA+2x/ZgpN +aGPDy4pdO9UMIFTvoj8nkw4ahuPfsQsIrTwfpCbkdFCp8bykqz8VlN8NHrZU +0MH8VGXtZjMqXE1ezizapYP2dvInD0hR4TC77FYvVR0UOWdxgq2DAn9Wg5d7 +dHSw2F5w3zUdCggOi3W8t9TBO3K/NfU364Pns2OxVad18PnD3XLunbow6Tt6 +1jhQB/0k+xoCHutCiPhJn65gHazQsWusTtSFxAi/fYvhOri7oZW7zUAXysjB +kvpxjPjEP7UrV+jAak3Mk+abOpjK13Wi/JY2XH18d/Zjsw6Gfhq7rp6qBWIu +ksNHX+jgKszFDflrQf7W3G+zrTqo0dFBfL5XC+i++U2C7TqoH9rOvM6nBT8U +H6Y6devg7/D19SM3iaBQWKvUN66DBKFNQ/mlmtCQ3ekxLaCLUWBbunFWHXqt +pFyChXVR7N7QpW1f1YFpyddxhaCLLe+kF/Ub1cFwL7sNq6Quhh3pnf+XrA4v +NpC1RXbpYnTj5j8EBXV4436P04CqiwUxUW5XPNTgq+yJ0lQvXWQJOLTp8agy +rLyvKRQ4rouXHQl8758pg1gky/2bPrrIuYRJSunK4Pzpdmaevy6OMYsVX9dX +ht6L787Tw3TRvFGvccdVJfg9RLTrvayLmsVRuuumijBbuL6gStNFIZbbbLnf +FWDI3iQ7oVYX9eY6pmXqFKB7Y4pZf70u7lhSVvmYqQD1roQb1xt1MaBr+XWF +nQJEC2uR117pYpeQDUvU2x3AHX8iou27Lm54kmEs9EoelLw/MXkyk7H7h3rR +VI8sSAiIFT3bSEY7Ua6M2//JAnez+15hdjIGE2OencqThRmJqZzXm8hILdgg +fvGELNR1cRlpCJAxflVGIGhRBsxM8OL6DjIyBrOGnqgMHJUr4bxpTcbjnwXj +NcOlIOz5kRPytmSc8Qq8qecqBamevK8r9pGRPX/A+YSxFDzJD01+fZCM0X0p +ynrcUsAvb7ZtzY3xfs7GgLwHkvBCfpDfNZiMTj/7JzrrtsMuhe2S8vfIuKPe +6dLECzHA1o/nK3LIONTeApM3xMD+WNwvah4Z74fdTFTzFYOYwoncg0VkZH08 +FRrCLwbfFZ7IJVSSkd+xwWSzlyhc3umoOP6SjH47S2WW+AkwvSudVDFFRoOO +0fLCe0LQ/QaN+WbIaJTz7XRVhBA0npq0C5wjo1S3a+SUoxBcrjA/TVomo3i0 +cfQivxDsIjM9rGPRw8Ufx7INUgTB3dxXqllQD/sFZeZj4gSg09t0c6e+Hnbs ++rJKvMkH9ZxzBC3QwwMbfC53R/BBbknuzusGetgTzrY734UP/P+smTiY6GHv +YV3TWjk+2HK26sL3PXro6bJt8nklL5jESS0MuOvhNQuh+N2feYCet/JrLl4P +tyeKuoaSuYFkFLhgkaSHm2NYMp2kuaH61/jm7BQ9XGNW93Lm4oYKiR5ti6t6 +2PkoxOBy9TZ4mNWYcvcWI556coXV8lbITr6oa1qqh/CGj9BzZQskBG5Ly+rQ +Q7aD78QJI1zAwRdfMPFJDznb7qfmNnJBXDnTE8NuPTTry5TyyOKC2MnpofHv +ehhlUh+QZsYF54516hsM6eE7OdXnySWccObwjeGRRT28kB5/60U4BzjtlkE9 +CX28EiTtfdiIDdY6ObY2S+rjmeULZtkSbJDtOfnNQkYf4471yokvs8JQXO1Z +JwV95Li+nNxYzgpnXu15HKqhj66J91XyZVgh0SZCgm6ij0qx4juzeTZCncOn +VaKfPg4KOxoZ8zOD80hd25PT+hj1xekWz/wGYArLztodqI/vd7cEbeneACa3 +fIj7Q/VxUWHX7au3N8DHHxtOBsTo48OlBcXXOzbAqLvKt/JMfaxp/M+7zoQJ +RH0v1ao06mNppfpApvka9fK6l1ZSkz7entj84YjoGpX5qkn57xZ9dCgaSDwx +sUodrWEtyn6lj055esM2V1epdUyxWbwd+ph2pW0ef65QnTLOn50f1MeQ77/s +Qi8uU7PqQ7WebaKgrv2kTRvTInWzjWM5YSsFdfJTPoR9XaCe79VRPstNwfrS +Uj7PqgXqMdZFWTUBCu6Wq0obPLZA1d4TzJ8rQUE/Z7filM55alffmZmL6hS8 +sqZhrVUzRxXgOllufZCCXf80frZnz1DzjCLDphwpqHFte2JQ5AxVI/KyUfph +Cob6CZ9wcJqh2kyVfep2o+C72VHzD/wz1LiuuaWjJymoafhD6WLyX+pibpRh +2AXG9z+GuefFTVO/6qV3FJRQsNipnanA5A/1WFDebfNSCmrpLO7N2fKHOl9a +7TleRsGTzRWC652TVF7p7gX1GgriuN65nx6TVEsOcbGnjRQsubgrTTphgvqk +s8Cj4xMF43Z82K7YP0a12EpXDu6mYIjYjtmNZWPUbtNX88LfKFh3qK9CO3KM +Ols3Fn+kl4K1YpIP84XHqMo5ao9GRik4OR01mG43Sn3y1SA4eYKCv+rrjsjJ +jFIt+O1AdYqC97df3LtpZoTqdSnoQ+AcBX2va4Z/TB+hzjbG3RRapOA21+57 +FR4j1OjlzKN1yxRM+5skMqg1QuUmFik5r1HQfpDodpx9hHrXt25ufZ2xX4RL +U9Qvw9T/AdDMpmk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.09498630205133335}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13970,183 +15079,207 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.09498630205133335}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{117.9605728938093, - 256.1444167491903}, {-15.489822627663699`, 5.682052372336301}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV1nc8Vf8bAHCR2bLHNbJTNtfF5d7nQfZIKaFkZFQSZWSmkMwiijZCRsm+ +FxVfVFJpkLQkKzuyV37399d5vV/ndc55Pp/zjI+Uu98+T2YmJqbmDUxM/7/O +97xqkU3Ko+6pDso4s92W2nlXONSgOxqOZ81Hm2QoAwq8cxfuvgpGwfkr6+kU +CLYt/szSnQuurEPXX6ZbA8+k0NWlzxWw1KTzyz7dGX4+sfGb/dwE4ntqL75J +8wUT2dEf058/wn9hwQKNSZGw9Fn72tTnPvDXKmgoDEiBZqMHeR9yZ+AVBJ78 +bHAXxH7WDrkrrYEhiZQru5IP/CdditmNWNDImbmvSeEhXFU3qbc5wIFvZwoP +RG8uB9VvjqaUYxwowBpl0ShYDm9ifTsUwzlQ++XI0wXJcmDrzhjjyOHAJH1z +fjutcgg/1y/aPM6BOySKd9U7l4PH6/MR2rGcKPbV2dvmUTmQPOspkpVc2DS0 +ZOJrWgFfstQap7m34JHE02UrXpVws6NkW7DcFlxVm/Mn+1eC09YdLsu6W3Cw +qqjdP7QSvseI/2M+ugXdxhIOtiRVQu8pLn3+6i2YIEtzZCurhOHdAzSS41bs +ubvMPjtfCYtTmY/Dc7bhAf1nCV7nqqBWkW99vXobFkkURGTEVUGY12Wb2LZt +OC5+6GXt5SpY/RY7kTyzDXk7+ZxH71bB+X66wDtpblxL9nTsf1YFse35dr2B +3GjadE5ec60KkvKi3jGL8CChwLMLAqrBgnicV0CGB7fb7GshhlUDR8u+AzuU +eXD4SrSK1IVqiO2X+2ZpwIPN7u0BvZerIUL6zVDGcR5MzFEuXCyqhlPZwv/k +63hQU2/TyuWeath7u1zJ8hAvFnGyxtgY1AC30i0/Z09eNF5Jv6BuWgPt9bEV +fn68KJnw5/cm6xqw+HZQJyOGFzefHR8tcKgBQ8I/ox8lvMi7wbo5yK8GiFkW +h/xWeVHC48eN4Fs1IJTRn5B+hw9VVTK+bJyoAWHF6tjFAj58bfFWPnq6BghN +cVHOZXz4pPTR8sJcDUhM7Qza0cyHxEO52m//1YCclb9r/TAfRnWNbpPgpoHm +xjVSvyY/jg4eSndUpwHxVru6GYUfdbyCQly0aEDSyFZ6ZMKPl6TmR511aUB2 +NZI+68iPgU89w3Yb0MDgScKWTVH8aPvT1Y5uS4M9gYIDGm38uBQfHql3iga2 +m4Z7Mjv4scb0dkzbaRrsy639svqdHx9KNEvtC6KB/fvD71784cfmsT07LSNo +4Kx0v85JQADnT56JGEiggc+Aalq0qwAqP49eqLpPg5PhG5J/HxdAqinb4NsC +Gpzi7YizChDAg16zIT+LaHAGgyME4wQwlUMxa/wxDUJvP/EuLhFAmlj8h9J6 +Glzab079OC+Apn9FFDo/0IBQ1U5g3iCInnIsj8o6aVDKt39BfZMgBr3uzo39 +TIOuj0fK0rYLIsn10W/eHzSQ3RsovddMEDP8Wlle/aZBk/U9tvc3BLHg49aN +d1YY63kk279+XxBtuqPcptdoMLq5uEG1VBD9Gu9YUpjowPOmKuRKkyCuGJ59 +W7+RDq4WbaM2Y4IY09r61G4LHdZM5trf6gvhFJc7z7QYHVILwkrWTISwqntB +vkGCDrJsTPHKe4Xwz8OykVhJOlg95zJI8RTCxz1mUQsydLhpJFlpdVkIG+L0 +d4buooPK/fwrEVlCeJJldnCjEh2amBVPPswVQpuEp27xynQY+U9LbjNNCNcc +Pt4LVqODDlpmvv4phP9iOUOmtOjw5t77gJURIUzt0/EjazPiXT9gqzgrhKH9 +0ToROnS49MyVM4lDGI9rUCx/k+lAkBgarOMVxnMu929w69OhNNKnaVRMGP8M +bWtRp9ChSz843EJdGO1OC9IOAR1O3F45GKYnjBrE1lgPZKx/5Tyx2FgYOdse +63gaMNZbnzTB6SSM0v8inW2M6BCgm+PyKloYp7+kDDSY0MEie+usZbIwzhiK +S4Sb0kGaPSK+/ZowuhhnOama0eF9p315R6Ew7k7eORhtTodCvRZj+wph1K2r +1Ja2oENUrvrX7nphPLCH53odwyr+m1l62oVxScA2qsuSDqyfQzNdu4VR4MrT +rU5WdPhO+a3Y/0sYVZYEK7sYrsrb3+g5JoxyTMWnrKzpkLSpaf/wrDCCzUuj +eobdz6iOnPgnjFEJTUQZGzqQv9yOnGAXwSHbv0axDA8XnC34SxBB4luHF+p7 +6NCwZZAcJCuCI7GW1HMMXw/c925BWQQ3vBr90czwqW8NR8O0RXBu/NYDZls6 +GBsqL66iCG5UfnmHzLBY0c3kKAsR9Cr53OTD8Ow2Dinm/SJ4w1dP5DrDr4OD +qmOdRTDT8ej9WoZzf/SZs3uLoLhm89EuhkN32/Yk+IvgZNaHw+MM25Y8PbM5 +TAT/beBIW2FYgVeR/UqMCLbU9TFv3EuH9ZCsWzwpIujR11vFynDXT1a1jOsi +OOUdW8TEcKlJQItgNuP77Pv6ZxnPX3zU63CjiPF+0w8efQwf5reZEK0UQa6z +yWqvGNYMr79w94kIvn7AbV7EMFefgqDUCxFkfjxRFs1wn9n14vvvRLBQsubE +AYZrH7OA/BcR5LReD5FiOFXwdEdhnwjOU9x6hhj7dSyyx1txnOHK4Dv5DMOA +5eqjORH0lflBd2ZY0LI2VW1dBF+VEzW3MTxRLi9XyUHAQg3JbXWM/9MinFGr +xUtALjnjPUcYvh21wYYuSsCAMsv5Fcb/DRg61UeWIyBPbg9bOsMW1t+Dn6oQ +cPB4SYwMw9JV5ptQh4A/hNz9HjHy5f0FWaKxJQGfBDrdfcTIrwfDaa0v9xMw +3pzztwzD5/asH7Y4QsA7FhFF6Yx8VBb/enHPaQLuCsgvcGHk78ZYU8LHMAJ6 +W/8Yqmfk9/fRqtL9sQS8V/m9hIfhRPqVz46ZBLR03fuuiFEfbtvXfL5nE3Ao +4bDmuDGjvuNOMLkUE3B23WmHAsO/7Yx3ejwl4NfJkLZkRn3t/rMcdqqfgE93 +VFlxMuox1Cxj13/jBNwkJGclzqjX0hzlr3zzBEwZvqGuSKWD8H5X3VoOUbzE +FlJLZNT7OP35AouKKHqb9XCuM/qFFK/LA3ttURToI8X1kehg77NoX4Si6Hvu +zr8GRn9pFFessbETxdzEpsljmnRIj04NvBEiioMS0qIBKnRo/bZTdvyCKIZt +u/pCntGvVonNHdQkUdQZyIntVKSD1+85jYE7othuzbNbYiejvqwOTas0i+K1 +K2WSPox+2Ccgf6plixgeVYn8Ni5IByG/BnEhITH8EKK02UiA0T9bHd4elxTD +FYLUuXQ+OtSEJSlt0xRDh9EX6jLcjP38OTXq6CCGbY/6Ff9x0EGjqN77T64Y +Gtpbcucv0eCC/l43go44uk0/E3vTRQOzI3f/ahuKI9/Lq2/0GfNk6/mxmANW +4rgwn6j8gDFvbjdfLEh1Fcepszp8x9/QgG5RN8aWII7vvyr15vxHgykHmeCZ +L+Lo0WAqNlZMgyNBc4lvwiXw6L4G16UQGshlGoqNXpRAsxYVg0LG/BynX3nE +niqB6denHPaeoUHY6s73hnkSqNpWAFd9aHAt5ohA7RsJfPCy0/2dMw3epL28 +ly++Hct+DbwhM+Y3ufRG1bmG7ci2rPtzloUGuz+3r022bkfvxntj2kw0sGHa +aOrycTsmxK8cC16tgaP7Tn2Bwe3IJS3xfHC2BkzCpaLOs0rilNHKscuDNeC/ +ff6+gaIk1v6eSeV6UQMt3vcmmoMlcV8NCLTG1MDJxenzrVuk8L6uqsuOmWog +n/YSHOKVQgM+QcLaBOP8Nfq1hEVYCsUGKlLbh6sh/1tzF1VaCk80K7R4MM5X +Pc+uKVWTpJDf5sWrI6+qYc9F3e4cFymcfi97LuVuNWjwXlANL5fCNd6Wf/PG +1bCkyN2jfEAa6yyljrEmVoF+ycPs69dlMGVEDeQWKmCa18LVvkkWQxJ/cN4+ +Wg4Dya72Z9jlcZ291UmE+hjM/5w1HyTtwMr999UKJ0tg/ChHQFWUAt5q/vjj +mW8h4zwvxHypaSd6JqrfC5fPB9638pfL/uzCvLysbe/Mc0Es/rEtiaSEkzft +48p670KWoi43n7cysu191XOH7ya0EQy0ZtJUcM+4aPzwz2tAFmtKVe1SRZG1 +6tDp3jTYypIb6Batht9zWc6F7E0BtqUGu+lYNVTrGZXN006Bf5M/NC5cUkON +cpFdv8RT4M9XkensZDX8R5rXuTKaDO8r0nx7r6th7B6R13WxyXDV/YKXS4ka +zjn4Nls8SQLBJlcH5041/DEvySenkwgSF7brO8qroxvrl+GTbpegNIBD+oeC +Ot74z9dM3uoSUL2m2d0U1fHzWuroJOkSOFs2dxxTU8fr507+eLT5EtwW8PYJ +Iavjixrq21/0OBApLr2ZaaOOuTX1FmL8ccDfQVn6FKyOVILbYOmnWOCUO1yz +76U6Yjlr9/eYaDghAhYlr9TRxWes5mhANLRtke5heaOOfY9y/OfdoyF5/jdr +9Xt1lK+6eQQMo2Fra8ABoa/q6Khnm3RkQzTw+iTNfhtXx9MUJqe3Fy6AWHmd +hievBj5YOUU1SToPKhSRx2edNfDPBtbnPecioVLm+AqzqwYumafGEd0iQYer +1vSyuwYefy46kmsUCYafHXrzvDXwet5Dh1cckWB/Oovn42kNPOejaK+XEQFR ++UKBSnEaGCHwyf/B43B4v0VQ91epBo5N6idTFkPhTA9vswWTJq60cZ3d+zYY +Wl8cflrMrInvxFtGF2qCQeJxAY2LVRNFp763lWUHQ1sU+WEbpyYquubddwwM +Bmkp92sWfJpo88z0fJxYMHw4Wu5tIa+Jmm93aRr5B4HayJ7NFlaaeGBAwmtF +NhD+zCQfMM/SxFBt12ds/52G79059nduaqKZEf9O68enoe1pzcHp25p4d8+X +0tw7pyHvUq/jjRxN9FXTHggLOw1OosQjI8Wa+PaubX8P8TQ8N/zmlfBUE8d5 +Q/JPPvSHW2k7Q171aeKLCx/7a6z8ID6YGio+qIlMLzTaB5T8IPiQXdjp35qY +s/NRrMoWP7CVi4wQGddEGoc7l0D7KWCrfX/++JwmykW5HVfaewpO955N4OQg +4kzWY+7Aw75gqvriprkyEVPXJkwG43zAgc1s/3tVIgobKqmsefvAiR+vthzU +IOKvW0RBTXMfuJz09ryHNhFvELOSFzf5QNfvTq8oAyL+rryS+vvqCfDI7teo +PkBE95QSVsOC4xDNs+G15DkiPvNLMLTs84aM4ejYB+eJeFJG/9TCC28oaNhI +VYlh3NcYfvusxBvafDnK9eKJyBtt/fFukDfwtG3LtL9KxIuZl9JyuLwhO1ri +aHIBEUtjUiTu6XrBsxm9lYV2In6TQ+uhYg/IeUNzt/tAxMLY4mWfDA+Izdds +K+0gokCr82b2cx5gflDxhmc3ER/P+hIi93pAZx1Bu+MXEW/vKOXzXjoKoxeW +zpTOEpGdVr9T1vooCHLTRj0IWsh8eZ3nI4s7LA1r7GsU08KHbxc+Dfxxg+// +ldaKbtfCWxJXV7m+u0FOQEH8RxktvB9RqJlW5QZKn6/Jo7IWdpXx3ojxcgPD +u4HuoqiFQdmEr3/fusIpJY2vHzy18LaTsp/MARcIWiAsuxzTwqN+ZlJ/VVwg +oomFMHlCC9cG/i2McLhAksMnRy5/LbR4PB+1/+kRKIwN+WIYpoXztcqL3ApH +oO/7s+7Ky1rokOjxgp3VGexTLD9fo2mhRM+O0JlvTuDsQFyQqdPCCJYZ0Zw6 +J/CQEReqeKKFZSubggJuOEFA7aR9+39aGNvp3HTxoBOkDqZ1sb3RQnu1JSHn +T47QRun+dLZXC41vOvjWfnYAyqRHpyMnCT2Ob7Y3mrcHwXrT3CebSBig5MOu +8c0eJi/t8t++lYQfoFSV0mgPd6WmNg3yklDnU0BUYaI9/NsfbuQvRsLVrEeO +7yXtoaE+rSJOlYQOq5Hie/YdAIOEZ6mVB0g4OtwR4PzKDgj2OUcEHUioqjQk +VlJuB3+lY5VCnUiYMWygznvTDnKfmLdSXUh4aqqSquRjB8xTneuvjpFQ2lbW +I2WrHTTbj53qDSehsnHA6z+O+8BYVth6Sy4JrX8+Hclk3gtVE8+lPPJImBY5 +98hm0hZkaQHzdQUkDM2+qiH61RY2Wry7d6yEhIMZT5Xmym2hyS/ub3MVCUW8 +KDXF7rZArZ/NDHtJwnexZmUCqXuAtO9D3+9xEtbd4JJX220NBaJRNOofEiZ2 +v5dtkrQGgUGl5GvTJIypT+wKW7OC2bPxWkbzjHj/O9XoQrOCijsQf3edhBcf +bqqcUbIC1ZFHygd4tTEpu/Ca7HZLUDifGNKkrY39aTPDlRLm8EQvn9WKrI0J +vNCst2YGtgsNVz/pa6PNyofVsW9mEHJq7uGwgTZe0uIdaLlhBq2HXX9ttdLG +46NlQ3ZCZnBMl2RxyFUbS+uHbJpETKHo7y/R2Xht3M3MH9RCNgZq6WphZJI2 +3szIusMhYQwfjwuR2C9r48bmdIL/BmNY7rWyJaRro/Vyemhh626weEeLxTuM +eEg3CuscdsNoScpEcrk2/vtCl9gdZQS7PHUb5L5qI0ufdcv4gAFckbZZjvmu +jX4pMYSFtwYw+9Ndq69HGy3kXpuL0QzgmVNyyd1+bazp/dBSk2AA+2x/ZgpN +aGPDy4pdO9UMIFTvoj8nkw4ahuPfsQsIrTwfpCbkdFCp8bykqz8VlN8NHrZU +0MH8VGXtZjMqXE1ezizapYP2dvInD0hR4TC77FYvVR0UOWdxgq2DAn9Wg5d7 +dHSw2F5w3zUdCggOi3W8t9TBO3K/NfU364Pns2OxVad18PnD3XLunbow6Tt6 +1jhQB/0k+xoCHutCiPhJn65gHazQsWusTtSFxAi/fYvhOri7oZW7zUAXysjB +kvpxjPjEP7UrV+jAak3Mk+abOpjK13Wi/JY2XH18d/Zjsw6Gfhq7rp6qBWIu +ksNHX+jgKszFDflrQf7W3G+zrTqo0dFBfL5XC+i++U2C7TqoH9rOvM6nBT8U +H6Y6devg7/D19SM3iaBQWKvUN66DBKFNQ/mlmtCQ3ekxLaCLUWBbunFWHXqt +pFyChXVR7N7QpW1f1YFpyddxhaCLLe+kF/Ub1cFwL7sNq6Quhh3pnf+XrA4v +NpC1RXbpYnTj5j8EBXV4436P04CqiwUxUW5XPNTgq+yJ0lQvXWQJOLTp8agy +rLyvKRQ4rouXHQl8758pg1gky/2bPrrIuYRJSunK4Pzpdmaevy6OMYsVX9dX +ht6L787Tw3TRvFGvccdVJfg9RLTrvayLmsVRuuumijBbuL6gStNFIZbbbLnf +FWDI3iQ7oVYX9eY6pmXqFKB7Y4pZf70u7lhSVvmYqQD1roQb1xt1MaBr+XWF +nQJEC2uR117pYpeQDUvU2x3AHX8iou27Lm54kmEs9EoelLw/MXkyk7H7h3rR +VI8sSAiIFT3bSEY7Ua6M2//JAnez+15hdjIGE2OencqThRmJqZzXm8hILdgg +fvGELNR1cRlpCJAxflVGIGhRBsxM8OL6DjIyBrOGnqgMHJUr4bxpTcbjnwXj +NcOlIOz5kRPytmSc8Qq8qecqBamevK8r9pGRPX/A+YSxFDzJD01+fZCM0X0p +ynrcUsAvb7ZtzY3xfs7GgLwHkvBCfpDfNZiMTj/7JzrrtsMuhe2S8vfIuKPe +6dLECzHA1o/nK3LIONTeApM3xMD+WNwvah4Z74fdTFTzFYOYwoncg0VkZH08 +FRrCLwbfFZ7IJVSSkd+xwWSzlyhc3umoOP6SjH47S2WW+AkwvSudVDFFRoOO +0fLCe0LQ/QaN+WbIaJTz7XRVhBA0npq0C5wjo1S3a+SUoxBcrjA/TVomo3i0 +cfQivxDsIjM9rGPRw8Ufx7INUgTB3dxXqllQD/sFZeZj4gSg09t0c6e+Hnbs ++rJKvMkH9ZxzBC3QwwMbfC53R/BBbknuzusGetgTzrY734UP/P+smTiY6GHv +YV3TWjk+2HK26sL3PXro6bJt8nklL5jESS0MuOvhNQuh+N2feYCet/JrLl4P +tyeKuoaSuYFkFLhgkaSHm2NYMp2kuaH61/jm7BQ9XGNW93Lm4oYKiR5ti6t6 +2PkoxOBy9TZ4mNWYcvcWI556coXV8lbITr6oa1qqh/CGj9BzZQskBG5Ly+rQ +Q7aD78QJI1zAwRdfMPFJDznb7qfmNnJBXDnTE8NuPTTry5TyyOKC2MnpofHv +ehhlUh+QZsYF54516hsM6eE7OdXnySWccObwjeGRRT28kB5/60U4BzjtlkE9 +CX28EiTtfdiIDdY6ObY2S+rjmeULZtkSbJDtOfnNQkYf4471yokvs8JQXO1Z +JwV95Li+nNxYzgpnXu15HKqhj66J91XyZVgh0SZCgm6ij0qx4juzeTZCncOn +VaKfPg4KOxoZ8zOD80hd25PT+hj1xekWz/wGYArLztodqI/vd7cEbeneACa3 +fIj7Q/VxUWHX7au3N8DHHxtOBsTo48OlBcXXOzbAqLvKt/JMfaxp/M+7zoQJ +RH0v1ao06mNppfpApvka9fK6l1ZSkz7entj84YjoGpX5qkn57xZ9dCgaSDwx +sUodrWEtyn6lj055esM2V1epdUyxWbwd+ph2pW0ef65QnTLOn50f1MeQ77/s +Qi8uU7PqQ7WebaKgrv2kTRvTInWzjWM5YSsFdfJTPoR9XaCe79VRPstNwfrS +Uj7PqgXqMdZFWTUBCu6Wq0obPLZA1d4TzJ8rQUE/Z7filM55alffmZmL6hS8 +sqZhrVUzRxXgOllufZCCXf80frZnz1DzjCLDphwpqHFte2JQ5AxVI/KyUfph +Cob6CZ9wcJqh2kyVfep2o+C72VHzD/wz1LiuuaWjJymoafhD6WLyX+pibpRh +2AXG9z+GuefFTVO/6qV3FJRQsNipnanA5A/1WFDebfNSCmrpLO7N2fKHOl9a +7TleRsGTzRWC652TVF7p7gX1GgriuN65nx6TVEsOcbGnjRQsubgrTTphgvqk +s8Cj4xMF43Z82K7YP0a12EpXDu6mYIjYjtmNZWPUbtNX88LfKFh3qK9CO3KM +Ols3Fn+kl4K1YpIP84XHqMo5ao9GRik4OR01mG43Sn3y1SA4eYKCv+rrjsjJ +jFIt+O1AdYqC97df3LtpZoTqdSnoQ+AcBX2va4Z/TB+hzjbG3RRapOA21+57 +FR4j1OjlzKN1yxRM+5skMqg1QuUmFik5r1HQfpDodpx9hHrXt25ufZ2xX4RL +U9Qvw9T/AdDMpmk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.09498630205133335}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -14157,6 +15290,7 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -14184,7 +15318,8 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.16919668648256683`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09498630205133335}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -14192,17 +15327,766 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913483238131485`*^9}, + CellChangeTimes->{3.9913483238131485`*^9, 3.994360070327298*^9}, CellLabel-> - "Out[470]=",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] + "Out[140]=",ExpressionUUID->"dec9ef89-3423-4a35-aaf9-e931a815364c"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"54d9c986-d109-3d4c-9ee8-\ -76427bb63659"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8Vf8bAHCR2bLHNbJTNtfF5d7nQfZIKaFkZFQSZWSmkMwiijZCRsm+ +FxVfVFJpkLQkKzuyV37399d5vV/ndc55Pp/zjI+Uu98+T2YmJqbmDUxM/7/O +97xqkU3Ko+6pDso4s92W2nlXONSgOxqOZ81Hm2QoAwq8cxfuvgpGwfkr6+kU +CLYt/szSnQuurEPXX6ZbA8+k0NWlzxWw1KTzyz7dGX4+sfGb/dwE4ntqL75J +8wUT2dEf058/wn9hwQKNSZGw9Fn72tTnPvDXKmgoDEiBZqMHeR9yZ+AVBJ78 +bHAXxH7WDrkrrYEhiZQru5IP/CdditmNWNDImbmvSeEhXFU3qbc5wIFvZwoP +RG8uB9VvjqaUYxwowBpl0ShYDm9ifTsUwzlQ++XI0wXJcmDrzhjjyOHAJH1z +fjutcgg/1y/aPM6BOySKd9U7l4PH6/MR2rGcKPbV2dvmUTmQPOspkpVc2DS0 +ZOJrWgFfstQap7m34JHE02UrXpVws6NkW7DcFlxVm/Mn+1eC09YdLsu6W3Cw +qqjdP7QSvseI/2M+ugXdxhIOtiRVQu8pLn3+6i2YIEtzZCurhOHdAzSS41bs +ubvMPjtfCYtTmY/Dc7bhAf1nCV7nqqBWkW99vXobFkkURGTEVUGY12Wb2LZt +OC5+6GXt5SpY/RY7kTyzDXk7+ZxH71bB+X66wDtpblxL9nTsf1YFse35dr2B +3GjadE5ec60KkvKi3jGL8CChwLMLAqrBgnicV0CGB7fb7GshhlUDR8u+AzuU +eXD4SrSK1IVqiO2X+2ZpwIPN7u0BvZerIUL6zVDGcR5MzFEuXCyqhlPZwv/k +63hQU2/TyuWeath7u1zJ8hAvFnGyxtgY1AC30i0/Z09eNF5Jv6BuWgPt9bEV +fn68KJnw5/cm6xqw+HZQJyOGFzefHR8tcKgBQ8I/ox8lvMi7wbo5yK8GiFkW +h/xWeVHC48eN4Fs1IJTRn5B+hw9VVTK+bJyoAWHF6tjFAj58bfFWPnq6BghN +cVHOZXz4pPTR8sJcDUhM7Qza0cyHxEO52m//1YCclb9r/TAfRnWNbpPgpoHm +xjVSvyY/jg4eSndUpwHxVru6GYUfdbyCQly0aEDSyFZ6ZMKPl6TmR511aUB2 +NZI+68iPgU89w3Yb0MDgScKWTVH8aPvT1Y5uS4M9gYIDGm38uBQfHql3iga2 +m4Z7Mjv4scb0dkzbaRrsy639svqdHx9KNEvtC6KB/fvD71784cfmsT07LSNo +4Kx0v85JQADnT56JGEiggc+Aalq0qwAqP49eqLpPg5PhG5J/HxdAqinb4NsC +Gpzi7YizChDAg16zIT+LaHAGgyME4wQwlUMxa/wxDUJvP/EuLhFAmlj8h9J6 +Glzab079OC+Apn9FFDo/0IBQ1U5g3iCInnIsj8o6aVDKt39BfZMgBr3uzo39 +TIOuj0fK0rYLIsn10W/eHzSQ3RsovddMEDP8Wlle/aZBk/U9tvc3BLHg49aN +d1YY63kk279+XxBtuqPcptdoMLq5uEG1VBD9Gu9YUpjowPOmKuRKkyCuGJ59 +W7+RDq4WbaM2Y4IY09r61G4LHdZM5trf6gvhFJc7z7QYHVILwkrWTISwqntB +vkGCDrJsTPHKe4Xwz8OykVhJOlg95zJI8RTCxz1mUQsydLhpJFlpdVkIG+L0 +d4buooPK/fwrEVlCeJJldnCjEh2amBVPPswVQpuEp27xynQY+U9LbjNNCNcc +Pt4LVqODDlpmvv4phP9iOUOmtOjw5t77gJURIUzt0/EjazPiXT9gqzgrhKH9 +0ToROnS49MyVM4lDGI9rUCx/k+lAkBgarOMVxnMu929w69OhNNKnaVRMGP8M +bWtRp9ChSz843EJdGO1OC9IOAR1O3F45GKYnjBrE1lgPZKx/5Tyx2FgYOdse +63gaMNZbnzTB6SSM0v8inW2M6BCgm+PyKloYp7+kDDSY0MEie+usZbIwzhiK +S4Sb0kGaPSK+/ZowuhhnOama0eF9p315R6Ew7k7eORhtTodCvRZj+wph1K2r +1Ja2oENUrvrX7nphPLCH53odwyr+m1l62oVxScA2qsuSDqyfQzNdu4VR4MrT +rU5WdPhO+a3Y/0sYVZYEK7sYrsrb3+g5JoxyTMWnrKzpkLSpaf/wrDCCzUuj +eobdz6iOnPgnjFEJTUQZGzqQv9yOnGAXwSHbv0axDA8XnC34SxBB4luHF+p7 +6NCwZZAcJCuCI7GW1HMMXw/c925BWQQ3vBr90czwqW8NR8O0RXBu/NYDZls6 +GBsqL66iCG5UfnmHzLBY0c3kKAsR9Cr53OTD8Ow2Dinm/SJ4w1dP5DrDr4OD +qmOdRTDT8ej9WoZzf/SZs3uLoLhm89EuhkN32/Yk+IvgZNaHw+MM25Y8PbM5 +TAT/beBIW2FYgVeR/UqMCLbU9TFv3EuH9ZCsWzwpIujR11vFynDXT1a1jOsi +OOUdW8TEcKlJQItgNuP77Pv6ZxnPX3zU63CjiPF+0w8efQwf5reZEK0UQa6z +yWqvGNYMr79w94kIvn7AbV7EMFefgqDUCxFkfjxRFs1wn9n14vvvRLBQsubE +AYZrH7OA/BcR5LReD5FiOFXwdEdhnwjOU9x6hhj7dSyyx1txnOHK4Dv5DMOA +5eqjORH0lflBd2ZY0LI2VW1dBF+VEzW3MTxRLi9XyUHAQg3JbXWM/9MinFGr +xUtALjnjPUcYvh21wYYuSsCAMsv5Fcb/DRg61UeWIyBPbg9bOsMW1t+Dn6oQ +cPB4SYwMw9JV5ptQh4A/hNz9HjHy5f0FWaKxJQGfBDrdfcTIrwfDaa0v9xMw +3pzztwzD5/asH7Y4QsA7FhFF6Yx8VBb/enHPaQLuCsgvcGHk78ZYU8LHMAJ6 +W/8Yqmfk9/fRqtL9sQS8V/m9hIfhRPqVz46ZBLR03fuuiFEfbtvXfL5nE3Ao +4bDmuDGjvuNOMLkUE3B23WmHAsO/7Yx3ejwl4NfJkLZkRn3t/rMcdqqfgE93 +VFlxMuox1Cxj13/jBNwkJGclzqjX0hzlr3zzBEwZvqGuSKWD8H5X3VoOUbzE +FlJLZNT7OP35AouKKHqb9XCuM/qFFK/LA3ttURToI8X1kehg77NoX4Si6Hvu +zr8GRn9pFFessbETxdzEpsljmnRIj04NvBEiioMS0qIBKnRo/bZTdvyCKIZt +u/pCntGvVonNHdQkUdQZyIntVKSD1+85jYE7othuzbNbYiejvqwOTas0i+K1 +K2WSPox+2Ccgf6plixgeVYn8Ni5IByG/BnEhITH8EKK02UiA0T9bHd4elxTD +FYLUuXQ+OtSEJSlt0xRDh9EX6jLcjP38OTXq6CCGbY/6Ff9x0EGjqN77T64Y +Gtpbcucv0eCC/l43go44uk0/E3vTRQOzI3f/ahuKI9/Lq2/0GfNk6/mxmANW +4rgwn6j8gDFvbjdfLEh1Fcepszp8x9/QgG5RN8aWII7vvyr15vxHgykHmeCZ +L+Lo0WAqNlZMgyNBc4lvwiXw6L4G16UQGshlGoqNXpRAsxYVg0LG/BynX3nE +niqB6denHPaeoUHY6s73hnkSqNpWAFd9aHAt5ohA7RsJfPCy0/2dMw3epL28 +ly++Hct+DbwhM+Y3ufRG1bmG7ci2rPtzloUGuz+3r022bkfvxntj2kw0sGHa +aOrycTsmxK8cC16tgaP7Tn2Bwe3IJS3xfHC2BkzCpaLOs0rilNHKscuDNeC/ +ff6+gaIk1v6eSeV6UQMt3vcmmoMlcV8NCLTG1MDJxenzrVuk8L6uqsuOmWog +n/YSHOKVQgM+QcLaBOP8Nfq1hEVYCsUGKlLbh6sh/1tzF1VaCk80K7R4MM5X +Pc+uKVWTpJDf5sWrI6+qYc9F3e4cFymcfi97LuVuNWjwXlANL5fCNd6Wf/PG +1bCkyN2jfEAa6yyljrEmVoF+ycPs69dlMGVEDeQWKmCa18LVvkkWQxJ/cN4+ +Wg4Dya72Z9jlcZ291UmE+hjM/5w1HyTtwMr999UKJ0tg/ChHQFWUAt5q/vjj +mW8h4zwvxHypaSd6JqrfC5fPB9638pfL/uzCvLysbe/Mc0Es/rEtiaSEkzft +48p670KWoi43n7cysu191XOH7ya0EQy0ZtJUcM+4aPzwz2tAFmtKVe1SRZG1 +6tDp3jTYypIb6Batht9zWc6F7E0BtqUGu+lYNVTrGZXN006Bf5M/NC5cUkON +cpFdv8RT4M9XkensZDX8R5rXuTKaDO8r0nx7r6th7B6R13WxyXDV/YKXS4ka +zjn4Nls8SQLBJlcH5041/DEvySenkwgSF7brO8qroxvrl+GTbpegNIBD+oeC +Ot74z9dM3uoSUL2m2d0U1fHzWuroJOkSOFs2dxxTU8fr507+eLT5EtwW8PYJ +Iavjixrq21/0OBApLr2ZaaOOuTX1FmL8ccDfQVn6FKyOVILbYOmnWOCUO1yz +76U6Yjlr9/eYaDghAhYlr9TRxWes5mhANLRtke5heaOOfY9y/OfdoyF5/jdr +9Xt1lK+6eQQMo2Fra8ABoa/q6Khnm3RkQzTw+iTNfhtXx9MUJqe3Fy6AWHmd +hievBj5YOUU1SToPKhSRx2edNfDPBtbnPecioVLm+AqzqwYumafGEd0iQYer +1vSyuwYefy46kmsUCYafHXrzvDXwet5Dh1cckWB/Oovn42kNPOejaK+XEQFR ++UKBSnEaGCHwyf/B43B4v0VQ91epBo5N6idTFkPhTA9vswWTJq60cZ3d+zYY +Wl8cflrMrInvxFtGF2qCQeJxAY2LVRNFp763lWUHQ1sU+WEbpyYquubddwwM +Bmkp92sWfJpo88z0fJxYMHw4Wu5tIa+Jmm93aRr5B4HayJ7NFlaaeGBAwmtF +NhD+zCQfMM/SxFBt12ds/52G79059nduaqKZEf9O68enoe1pzcHp25p4d8+X +0tw7pyHvUq/jjRxN9FXTHggLOw1OosQjI8Wa+PaubX8P8TQ8N/zmlfBUE8d5 +Q/JPPvSHW2k7Q171aeKLCx/7a6z8ID6YGio+qIlMLzTaB5T8IPiQXdjp35qY +s/NRrMoWP7CVi4wQGddEGoc7l0D7KWCrfX/++JwmykW5HVfaewpO955N4OQg +4kzWY+7Aw75gqvriprkyEVPXJkwG43zAgc1s/3tVIgobKqmsefvAiR+vthzU +IOKvW0RBTXMfuJz09ryHNhFvELOSFzf5QNfvTq8oAyL+rryS+vvqCfDI7teo +PkBE95QSVsOC4xDNs+G15DkiPvNLMLTs84aM4ejYB+eJeFJG/9TCC28oaNhI +VYlh3NcYfvusxBvafDnK9eKJyBtt/fFukDfwtG3LtL9KxIuZl9JyuLwhO1ri +aHIBEUtjUiTu6XrBsxm9lYV2In6TQ+uhYg/IeUNzt/tAxMLY4mWfDA+Izdds +K+0gokCr82b2cx5gflDxhmc3ER/P+hIi93pAZx1Bu+MXEW/vKOXzXjoKoxeW +zpTOEpGdVr9T1vooCHLTRj0IWsh8eZ3nI4s7LA1r7GsU08KHbxc+Dfxxg+// +ldaKbtfCWxJXV7m+u0FOQEH8RxktvB9RqJlW5QZKn6/Jo7IWdpXx3ojxcgPD +u4HuoqiFQdmEr3/fusIpJY2vHzy18LaTsp/MARcIWiAsuxzTwqN+ZlJ/VVwg +oomFMHlCC9cG/i2McLhAksMnRy5/LbR4PB+1/+kRKIwN+WIYpoXztcqL3ApH +oO/7s+7Ky1rokOjxgp3VGexTLD9fo2mhRM+O0JlvTuDsQFyQqdPCCJYZ0Zw6 +J/CQEReqeKKFZSubggJuOEFA7aR9+39aGNvp3HTxoBOkDqZ1sb3RQnu1JSHn +T47QRun+dLZXC41vOvjWfnYAyqRHpyMnCT2Ob7Y3mrcHwXrT3CebSBig5MOu +8c0eJi/t8t++lYQfoFSV0mgPd6WmNg3yklDnU0BUYaI9/NsfbuQvRsLVrEeO +7yXtoaE+rSJOlYQOq5Hie/YdAIOEZ6mVB0g4OtwR4PzKDgj2OUcEHUioqjQk +VlJuB3+lY5VCnUiYMWygznvTDnKfmLdSXUh4aqqSquRjB8xTneuvjpFQ2lbW +I2WrHTTbj53qDSehsnHA6z+O+8BYVth6Sy4JrX8+Hclk3gtVE8+lPPJImBY5 +98hm0hZkaQHzdQUkDM2+qiH61RY2Wry7d6yEhIMZT5Xmym2hyS/ub3MVCUW8 +KDXF7rZArZ/NDHtJwnexZmUCqXuAtO9D3+9xEtbd4JJX220NBaJRNOofEiZ2 +v5dtkrQGgUGl5GvTJIypT+wKW7OC2bPxWkbzjHj/O9XoQrOCijsQf3edhBcf +bqqcUbIC1ZFHygd4tTEpu/Ca7HZLUDifGNKkrY39aTPDlRLm8EQvn9WKrI0J +vNCst2YGtgsNVz/pa6PNyofVsW9mEHJq7uGwgTZe0uIdaLlhBq2HXX9ttdLG +46NlQ3ZCZnBMl2RxyFUbS+uHbJpETKHo7y/R2Xht3M3MH9RCNgZq6WphZJI2 +3szIusMhYQwfjwuR2C9r48bmdIL/BmNY7rWyJaRro/Vyemhh626weEeLxTuM +eEg3CuscdsNoScpEcrk2/vtCl9gdZQS7PHUb5L5qI0ufdcv4gAFckbZZjvmu +jX4pMYSFtwYw+9Ndq69HGy3kXpuL0QzgmVNyyd1+bazp/dBSk2AA+2x/ZgpN +aGPDy4pdO9UMIFTvoj8nkw4ahuPfsQsIrTwfpCbkdFCp8bykqz8VlN8NHrZU +0MH8VGXtZjMqXE1ezizapYP2dvInD0hR4TC77FYvVR0UOWdxgq2DAn9Wg5d7 +dHSw2F5w3zUdCggOi3W8t9TBO3K/NfU364Pns2OxVad18PnD3XLunbow6Tt6 +1jhQB/0k+xoCHutCiPhJn65gHazQsWusTtSFxAi/fYvhOri7oZW7zUAXysjB +kvpxjPjEP7UrV+jAak3Mk+abOpjK13Wi/JY2XH18d/Zjsw6Gfhq7rp6qBWIu +ksNHX+jgKszFDflrQf7W3G+zrTqo0dFBfL5XC+i++U2C7TqoH9rOvM6nBT8U +H6Y6devg7/D19SM3iaBQWKvUN66DBKFNQ/mlmtCQ3ekxLaCLUWBbunFWHXqt +pFyChXVR7N7QpW1f1YFpyddxhaCLLe+kF/Ub1cFwL7sNq6Quhh3pnf+XrA4v +NpC1RXbpYnTj5j8EBXV4436P04CqiwUxUW5XPNTgq+yJ0lQvXWQJOLTp8agy +rLyvKRQ4rouXHQl8758pg1gky/2bPrrIuYRJSunK4Pzpdmaevy6OMYsVX9dX +ht6L787Tw3TRvFGvccdVJfg9RLTrvayLmsVRuuumijBbuL6gStNFIZbbbLnf +FWDI3iQ7oVYX9eY6pmXqFKB7Y4pZf70u7lhSVvmYqQD1roQb1xt1MaBr+XWF +nQJEC2uR117pYpeQDUvU2x3AHX8iou27Lm54kmEs9EoelLw/MXkyk7H7h3rR +VI8sSAiIFT3bSEY7Ua6M2//JAnez+15hdjIGE2OencqThRmJqZzXm8hILdgg +fvGELNR1cRlpCJAxflVGIGhRBsxM8OL6DjIyBrOGnqgMHJUr4bxpTcbjnwXj +NcOlIOz5kRPytmSc8Qq8qecqBamevK8r9pGRPX/A+YSxFDzJD01+fZCM0X0p +ynrcUsAvb7ZtzY3xfs7GgLwHkvBCfpDfNZiMTj/7JzrrtsMuhe2S8vfIuKPe +6dLECzHA1o/nK3LIONTeApM3xMD+WNwvah4Z74fdTFTzFYOYwoncg0VkZH08 +FRrCLwbfFZ7IJVSSkd+xwWSzlyhc3umoOP6SjH47S2WW+AkwvSudVDFFRoOO +0fLCe0LQ/QaN+WbIaJTz7XRVhBA0npq0C5wjo1S3a+SUoxBcrjA/TVomo3i0 +cfQivxDsIjM9rGPRw8Ufx7INUgTB3dxXqllQD/sFZeZj4gSg09t0c6e+Hnbs ++rJKvMkH9ZxzBC3QwwMbfC53R/BBbknuzusGetgTzrY734UP/P+smTiY6GHv +YV3TWjk+2HK26sL3PXro6bJt8nklL5jESS0MuOvhNQuh+N2feYCet/JrLl4P +tyeKuoaSuYFkFLhgkaSHm2NYMp2kuaH61/jm7BQ9XGNW93Lm4oYKiR5ti6t6 +2PkoxOBy9TZ4mNWYcvcWI556coXV8lbITr6oa1qqh/CGj9BzZQskBG5Ly+rQ +Q7aD78QJI1zAwRdfMPFJDznb7qfmNnJBXDnTE8NuPTTry5TyyOKC2MnpofHv +ehhlUh+QZsYF54516hsM6eE7OdXnySWccObwjeGRRT28kB5/60U4BzjtlkE9 +CX28EiTtfdiIDdY6ObY2S+rjmeULZtkSbJDtOfnNQkYf4471yokvs8JQXO1Z +JwV95Li+nNxYzgpnXu15HKqhj66J91XyZVgh0SZCgm6ij0qx4juzeTZCncOn +VaKfPg4KOxoZ8zOD80hd25PT+hj1xekWz/wGYArLztodqI/vd7cEbeneACa3 +fIj7Q/VxUWHX7au3N8DHHxtOBsTo48OlBcXXOzbAqLvKt/JMfaxp/M+7zoQJ +RH0v1ao06mNppfpApvka9fK6l1ZSkz7entj84YjoGpX5qkn57xZ9dCgaSDwx +sUodrWEtyn6lj055esM2V1epdUyxWbwd+ph2pW0ef65QnTLOn50f1MeQ77/s +Qi8uU7PqQ7WebaKgrv2kTRvTInWzjWM5YSsFdfJTPoR9XaCe79VRPstNwfrS +Uj7PqgXqMdZFWTUBCu6Wq0obPLZA1d4TzJ8rQUE/Z7filM55alffmZmL6hS8 +sqZhrVUzRxXgOllufZCCXf80frZnz1DzjCLDphwpqHFte2JQ5AxVI/KyUfph +Cob6CZ9wcJqh2kyVfep2o+C72VHzD/wz1LiuuaWjJymoafhD6WLyX+pibpRh +2AXG9z+GuefFTVO/6qV3FJRQsNipnanA5A/1WFDebfNSCmrpLO7N2fKHOl9a +7TleRsGTzRWC652TVF7p7gX1GgriuN65nx6TVEsOcbGnjRQsubgrTTphgvqk +s8Cj4xMF43Z82K7YP0a12EpXDu6mYIjYjtmNZWPUbtNX88LfKFh3qK9CO3KM +Ols3Fn+kl4K1YpIP84XHqMo5ao9GRik4OR01mG43Sn3y1SA4eYKCv+rrjsjJ +jFIt+O1AdYqC97df3LtpZoTqdSnoQ+AcBX2va4Z/TB+hzjbG3RRapOA21+57 +FR4j1OjlzKN1yxRM+5skMqg1QuUmFik5r1HQfpDodpx9hHrXt25ufZ2xX4RL +U9Qvw9T/AdDMpmk= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc8Vf8bAHCR2bLHNbJTNtfF5d7nQfZIKaFkZFQSZWSmkMwiijZCRsm+ +FxVfVFJpkLQkKzuyV37399d5vV/ndc55Pp/zjI+Uu98+T2YmJqbmDUxM/7/O +97xqkU3Ko+6pDso4s92W2nlXONSgOxqOZ81Hm2QoAwq8cxfuvgpGwfkr6+kU +CLYt/szSnQuurEPXX6ZbA8+k0NWlzxWw1KTzyz7dGX4+sfGb/dwE4ntqL75J +8wUT2dEf058/wn9hwQKNSZGw9Fn72tTnPvDXKmgoDEiBZqMHeR9yZ+AVBJ78 +bHAXxH7WDrkrrYEhiZQru5IP/CdditmNWNDImbmvSeEhXFU3qbc5wIFvZwoP +RG8uB9VvjqaUYxwowBpl0ShYDm9ifTsUwzlQ++XI0wXJcmDrzhjjyOHAJH1z +fjutcgg/1y/aPM6BOySKd9U7l4PH6/MR2rGcKPbV2dvmUTmQPOspkpVc2DS0 +ZOJrWgFfstQap7m34JHE02UrXpVws6NkW7DcFlxVm/Mn+1eC09YdLsu6W3Cw +qqjdP7QSvseI/2M+ugXdxhIOtiRVQu8pLn3+6i2YIEtzZCurhOHdAzSS41bs +ubvMPjtfCYtTmY/Dc7bhAf1nCV7nqqBWkW99vXobFkkURGTEVUGY12Wb2LZt +OC5+6GXt5SpY/RY7kTyzDXk7+ZxH71bB+X66wDtpblxL9nTsf1YFse35dr2B +3GjadE5ec60KkvKi3jGL8CChwLMLAqrBgnicV0CGB7fb7GshhlUDR8u+AzuU +eXD4SrSK1IVqiO2X+2ZpwIPN7u0BvZerIUL6zVDGcR5MzFEuXCyqhlPZwv/k +63hQU2/TyuWeath7u1zJ8hAvFnGyxtgY1AC30i0/Z09eNF5Jv6BuWgPt9bEV +fn68KJnw5/cm6xqw+HZQJyOGFzefHR8tcKgBQ8I/ox8lvMi7wbo5yK8GiFkW +h/xWeVHC48eN4Fs1IJTRn5B+hw9VVTK+bJyoAWHF6tjFAj58bfFWPnq6BghN +cVHOZXz4pPTR8sJcDUhM7Qza0cyHxEO52m//1YCclb9r/TAfRnWNbpPgpoHm +xjVSvyY/jg4eSndUpwHxVru6GYUfdbyCQly0aEDSyFZ6ZMKPl6TmR511aUB2 +NZI+68iPgU89w3Yb0MDgScKWTVH8aPvT1Y5uS4M9gYIDGm38uBQfHql3iga2 +m4Z7Mjv4scb0dkzbaRrsy639svqdHx9KNEvtC6KB/fvD71784cfmsT07LSNo +4Kx0v85JQADnT56JGEiggc+Aalq0qwAqP49eqLpPg5PhG5J/HxdAqinb4NsC +Gpzi7YizChDAg16zIT+LaHAGgyME4wQwlUMxa/wxDUJvP/EuLhFAmlj8h9J6 +Glzab079OC+Apn9FFDo/0IBQ1U5g3iCInnIsj8o6aVDKt39BfZMgBr3uzo39 +TIOuj0fK0rYLIsn10W/eHzSQ3RsovddMEDP8Wlle/aZBk/U9tvc3BLHg49aN +d1YY63kk279+XxBtuqPcptdoMLq5uEG1VBD9Gu9YUpjowPOmKuRKkyCuGJ59 +W7+RDq4WbaM2Y4IY09r61G4LHdZM5trf6gvhFJc7z7QYHVILwkrWTISwqntB +vkGCDrJsTPHKe4Xwz8OykVhJOlg95zJI8RTCxz1mUQsydLhpJFlpdVkIG+L0 +d4buooPK/fwrEVlCeJJldnCjEh2amBVPPswVQpuEp27xynQY+U9LbjNNCNcc +Pt4LVqODDlpmvv4phP9iOUOmtOjw5t77gJURIUzt0/EjazPiXT9gqzgrhKH9 +0ToROnS49MyVM4lDGI9rUCx/k+lAkBgarOMVxnMu929w69OhNNKnaVRMGP8M +bWtRp9ChSz843EJdGO1OC9IOAR1O3F45GKYnjBrE1lgPZKx/5Tyx2FgYOdse +63gaMNZbnzTB6SSM0v8inW2M6BCgm+PyKloYp7+kDDSY0MEie+usZbIwzhiK +S4Sb0kGaPSK+/ZowuhhnOama0eF9p315R6Ew7k7eORhtTodCvRZj+wph1K2r +1Ja2oENUrvrX7nphPLCH53odwyr+m1l62oVxScA2qsuSDqyfQzNdu4VR4MrT +rU5WdPhO+a3Y/0sYVZYEK7sYrsrb3+g5JoxyTMWnrKzpkLSpaf/wrDCCzUuj +eobdz6iOnPgnjFEJTUQZGzqQv9yOnGAXwSHbv0axDA8XnC34SxBB4luHF+p7 +6NCwZZAcJCuCI7GW1HMMXw/c925BWQQ3vBr90czwqW8NR8O0RXBu/NYDZls6 +GBsqL66iCG5UfnmHzLBY0c3kKAsR9Cr53OTD8Ow2Dinm/SJ4w1dP5DrDr4OD +qmOdRTDT8ej9WoZzf/SZs3uLoLhm89EuhkN32/Yk+IvgZNaHw+MM25Y8PbM5 +TAT/beBIW2FYgVeR/UqMCLbU9TFv3EuH9ZCsWzwpIujR11vFynDXT1a1jOsi +OOUdW8TEcKlJQItgNuP77Pv6ZxnPX3zU63CjiPF+0w8efQwf5reZEK0UQa6z +yWqvGNYMr79w94kIvn7AbV7EMFefgqDUCxFkfjxRFs1wn9n14vvvRLBQsubE +AYZrH7OA/BcR5LReD5FiOFXwdEdhnwjOU9x6hhj7dSyyx1txnOHK4Dv5DMOA +5eqjORH0lflBd2ZY0LI2VW1dBF+VEzW3MTxRLi9XyUHAQg3JbXWM/9MinFGr +xUtALjnjPUcYvh21wYYuSsCAMsv5Fcb/DRg61UeWIyBPbg9bOsMW1t+Dn6oQ +cPB4SYwMw9JV5ptQh4A/hNz9HjHy5f0FWaKxJQGfBDrdfcTIrwfDaa0v9xMw +3pzztwzD5/asH7Y4QsA7FhFF6Yx8VBb/enHPaQLuCsgvcGHk78ZYU8LHMAJ6 +W/8Yqmfk9/fRqtL9sQS8V/m9hIfhRPqVz46ZBLR03fuuiFEfbtvXfL5nE3Ao +4bDmuDGjvuNOMLkUE3B23WmHAsO/7Yx3ejwl4NfJkLZkRn3t/rMcdqqfgE93 +VFlxMuox1Cxj13/jBNwkJGclzqjX0hzlr3zzBEwZvqGuSKWD8H5X3VoOUbzE +FlJLZNT7OP35AouKKHqb9XCuM/qFFK/LA3ttURToI8X1kehg77NoX4Si6Hvu +zr8GRn9pFFessbETxdzEpsljmnRIj04NvBEiioMS0qIBKnRo/bZTdvyCKIZt +u/pCntGvVonNHdQkUdQZyIntVKSD1+85jYE7othuzbNbYiejvqwOTas0i+K1 +K2WSPox+2Ccgf6plixgeVYn8Ni5IByG/BnEhITH8EKK02UiA0T9bHd4elxTD +FYLUuXQ+OtSEJSlt0xRDh9EX6jLcjP38OTXq6CCGbY/6Ff9x0EGjqN77T64Y +Gtpbcucv0eCC/l43go44uk0/E3vTRQOzI3f/ahuKI9/Lq2/0GfNk6/mxmANW +4rgwn6j8gDFvbjdfLEh1Fcepszp8x9/QgG5RN8aWII7vvyr15vxHgykHmeCZ +L+Lo0WAqNlZMgyNBc4lvwiXw6L4G16UQGshlGoqNXpRAsxYVg0LG/BynX3nE +niqB6denHPaeoUHY6s73hnkSqNpWAFd9aHAt5ohA7RsJfPCy0/2dMw3epL28 +ly++Hct+DbwhM+Y3ufRG1bmG7ci2rPtzloUGuz+3r022bkfvxntj2kw0sGHa +aOrycTsmxK8cC16tgaP7Tn2Bwe3IJS3xfHC2BkzCpaLOs0rilNHKscuDNeC/ +ff6+gaIk1v6eSeV6UQMt3vcmmoMlcV8NCLTG1MDJxenzrVuk8L6uqsuOmWog +n/YSHOKVQgM+QcLaBOP8Nfq1hEVYCsUGKlLbh6sh/1tzF1VaCk80K7R4MM5X +Pc+uKVWTpJDf5sWrI6+qYc9F3e4cFymcfi97LuVuNWjwXlANL5fCNd6Wf/PG +1bCkyN2jfEAa6yyljrEmVoF+ycPs69dlMGVEDeQWKmCa18LVvkkWQxJ/cN4+ +Wg4Dya72Z9jlcZ291UmE+hjM/5w1HyTtwMr999UKJ0tg/ChHQFWUAt5q/vjj +mW8h4zwvxHypaSd6JqrfC5fPB9638pfL/uzCvLysbe/Mc0Es/rEtiaSEkzft +48p670KWoi43n7cysu191XOH7ya0EQy0ZtJUcM+4aPzwz2tAFmtKVe1SRZG1 +6tDp3jTYypIb6Batht9zWc6F7E0BtqUGu+lYNVTrGZXN006Bf5M/NC5cUkON +cpFdv8RT4M9XkensZDX8R5rXuTKaDO8r0nx7r6th7B6R13WxyXDV/YKXS4ka +zjn4Nls8SQLBJlcH5041/DEvySenkwgSF7brO8qroxvrl+GTbpegNIBD+oeC +Ot74z9dM3uoSUL2m2d0U1fHzWuroJOkSOFs2dxxTU8fr507+eLT5EtwW8PYJ +Iavjixrq21/0OBApLr2ZaaOOuTX1FmL8ccDfQVn6FKyOVILbYOmnWOCUO1yz +76U6Yjlr9/eYaDghAhYlr9TRxWes5mhANLRtke5heaOOfY9y/OfdoyF5/jdr +9Xt1lK+6eQQMo2Fra8ABoa/q6Khnm3RkQzTw+iTNfhtXx9MUJqe3Fy6AWHmd +hievBj5YOUU1SToPKhSRx2edNfDPBtbnPecioVLm+AqzqwYumafGEd0iQYer +1vSyuwYefy46kmsUCYafHXrzvDXwet5Dh1cckWB/Oovn42kNPOejaK+XEQFR ++UKBSnEaGCHwyf/B43B4v0VQ91epBo5N6idTFkPhTA9vswWTJq60cZ3d+zYY +Wl8cflrMrInvxFtGF2qCQeJxAY2LVRNFp763lWUHQ1sU+WEbpyYquubddwwM +Bmkp92sWfJpo88z0fJxYMHw4Wu5tIa+Jmm93aRr5B4HayJ7NFlaaeGBAwmtF +NhD+zCQfMM/SxFBt12ds/52G79059nduaqKZEf9O68enoe1pzcHp25p4d8+X +0tw7pyHvUq/jjRxN9FXTHggLOw1OosQjI8Wa+PaubX8P8TQ8N/zmlfBUE8d5 +Q/JPPvSHW2k7Q171aeKLCx/7a6z8ID6YGio+qIlMLzTaB5T8IPiQXdjp35qY +s/NRrMoWP7CVi4wQGddEGoc7l0D7KWCrfX/++JwmykW5HVfaewpO955N4OQg +4kzWY+7Aw75gqvriprkyEVPXJkwG43zAgc1s/3tVIgobKqmsefvAiR+vthzU +IOKvW0RBTXMfuJz09ryHNhFvELOSFzf5QNfvTq8oAyL+rryS+vvqCfDI7teo +PkBE95QSVsOC4xDNs+G15DkiPvNLMLTs84aM4ejYB+eJeFJG/9TCC28oaNhI +VYlh3NcYfvusxBvafDnK9eKJyBtt/fFukDfwtG3LtL9KxIuZl9JyuLwhO1ri +aHIBEUtjUiTu6XrBsxm9lYV2In6TQ+uhYg/IeUNzt/tAxMLY4mWfDA+Izdds +K+0gokCr82b2cx5gflDxhmc3ER/P+hIi93pAZx1Bu+MXEW/vKOXzXjoKoxeW +zpTOEpGdVr9T1vooCHLTRj0IWsh8eZ3nI4s7LA1r7GsU08KHbxc+Dfxxg+// +ldaKbtfCWxJXV7m+u0FOQEH8RxktvB9RqJlW5QZKn6/Jo7IWdpXx3ojxcgPD +u4HuoqiFQdmEr3/fusIpJY2vHzy18LaTsp/MARcIWiAsuxzTwqN+ZlJ/VVwg +oomFMHlCC9cG/i2McLhAksMnRy5/LbR4PB+1/+kRKIwN+WIYpoXztcqL3ApH +oO/7s+7Ky1rokOjxgp3VGexTLD9fo2mhRM+O0JlvTuDsQFyQqdPCCJYZ0Zw6 +J/CQEReqeKKFZSubggJuOEFA7aR9+39aGNvp3HTxoBOkDqZ1sb3RQnu1JSHn +T47QRun+dLZXC41vOvjWfnYAyqRHpyMnCT2Ob7Y3mrcHwXrT3CebSBig5MOu +8c0eJi/t8t++lYQfoFSV0mgPd6WmNg3yklDnU0BUYaI9/NsfbuQvRsLVrEeO +7yXtoaE+rSJOlYQOq5Hie/YdAIOEZ6mVB0g4OtwR4PzKDgj2OUcEHUioqjQk +VlJuB3+lY5VCnUiYMWygznvTDnKfmLdSXUh4aqqSquRjB8xTneuvjpFQ2lbW +I2WrHTTbj53qDSehsnHA6z+O+8BYVth6Sy4JrX8+Hclk3gtVE8+lPPJImBY5 +98hm0hZkaQHzdQUkDM2+qiH61RY2Wry7d6yEhIMZT5Xmym2hyS/ub3MVCUW8 +KDXF7rZArZ/NDHtJwnexZmUCqXuAtO9D3+9xEtbd4JJX220NBaJRNOofEiZ2 +v5dtkrQGgUGl5GvTJIypT+wKW7OC2bPxWkbzjHj/O9XoQrOCijsQf3edhBcf +bqqcUbIC1ZFHygd4tTEpu/Ca7HZLUDifGNKkrY39aTPDlRLm8EQvn9WKrI0J +vNCst2YGtgsNVz/pa6PNyofVsW9mEHJq7uGwgTZe0uIdaLlhBq2HXX9ttdLG +46NlQ3ZCZnBMl2RxyFUbS+uHbJpETKHo7y/R2Xht3M3MH9RCNgZq6WphZJI2 +3szIusMhYQwfjwuR2C9r48bmdIL/BmNY7rWyJaRro/Vyemhh626weEeLxTuM +eEg3CuscdsNoScpEcrk2/vtCl9gdZQS7PHUb5L5qI0ufdcv4gAFckbZZjvmu +jX4pMYSFtwYw+9Ndq69HGy3kXpuL0QzgmVNyyd1+bazp/dBSk2AA+2x/ZgpN +aGPDy4pdO9UMIFTvoj8nkw4ahuPfsQsIrTwfpCbkdFCp8bykqz8VlN8NHrZU +0MH8VGXtZjMqXE1ezizapYP2dvInD0hR4TC77FYvVR0UOWdxgq2DAn9Wg5d7 +dHSw2F5w3zUdCggOi3W8t9TBO3K/NfU364Pns2OxVad18PnD3XLunbow6Tt6 +1jhQB/0k+xoCHutCiPhJn65gHazQsWusTtSFxAi/fYvhOri7oZW7zUAXysjB +kvpxjPjEP7UrV+jAak3Mk+abOpjK13Wi/JY2XH18d/Zjsw6Gfhq7rp6qBWIu +ksNHX+jgKszFDflrQf7W3G+zrTqo0dFBfL5XC+i++U2C7TqoH9rOvM6nBT8U +H6Y6devg7/D19SM3iaBQWKvUN66DBKFNQ/mlmtCQ3ekxLaCLUWBbunFWHXqt +pFyChXVR7N7QpW1f1YFpyddxhaCLLe+kF/Ub1cFwL7sNq6Quhh3pnf+XrA4v +NpC1RXbpYnTj5j8EBXV4436P04CqiwUxUW5XPNTgq+yJ0lQvXWQJOLTp8agy +rLyvKRQ4rouXHQl8758pg1gky/2bPrrIuYRJSunK4Pzpdmaevy6OMYsVX9dX +ht6L787Tw3TRvFGvccdVJfg9RLTrvayLmsVRuuumijBbuL6gStNFIZbbbLnf +FWDI3iQ7oVYX9eY6pmXqFKB7Y4pZf70u7lhSVvmYqQD1roQb1xt1MaBr+XWF +nQJEC2uR117pYpeQDUvU2x3AHX8iou27Lm54kmEs9EoelLw/MXkyk7H7h3rR +VI8sSAiIFT3bSEY7Ua6M2//JAnez+15hdjIGE2OencqThRmJqZzXm8hILdgg +fvGELNR1cRlpCJAxflVGIGhRBsxM8OL6DjIyBrOGnqgMHJUr4bxpTcbjnwXj +NcOlIOz5kRPytmSc8Qq8qecqBamevK8r9pGRPX/A+YSxFDzJD01+fZCM0X0p +ynrcUsAvb7ZtzY3xfs7GgLwHkvBCfpDfNZiMTj/7JzrrtsMuhe2S8vfIuKPe +6dLECzHA1o/nK3LIONTeApM3xMD+WNwvah4Z74fdTFTzFYOYwoncg0VkZH08 +FRrCLwbfFZ7IJVSSkd+xwWSzlyhc3umoOP6SjH47S2WW+AkwvSudVDFFRoOO +0fLCe0LQ/QaN+WbIaJTz7XRVhBA0npq0C5wjo1S3a+SUoxBcrjA/TVomo3i0 +cfQivxDsIjM9rGPRw8Ufx7INUgTB3dxXqllQD/sFZeZj4gSg09t0c6e+Hnbs ++rJKvMkH9ZxzBC3QwwMbfC53R/BBbknuzusGetgTzrY734UP/P+smTiY6GHv +YV3TWjk+2HK26sL3PXro6bJt8nklL5jESS0MuOvhNQuh+N2feYCet/JrLl4P +tyeKuoaSuYFkFLhgkaSHm2NYMp2kuaH61/jm7BQ9XGNW93Lm4oYKiR5ti6t6 +2PkoxOBy9TZ4mNWYcvcWI556coXV8lbITr6oa1qqh/CGj9BzZQskBG5Ly+rQ +Q7aD78QJI1zAwRdfMPFJDznb7qfmNnJBXDnTE8NuPTTry5TyyOKC2MnpofHv +ehhlUh+QZsYF54516hsM6eE7OdXnySWccObwjeGRRT28kB5/60U4BzjtlkE9 +CX28EiTtfdiIDdY6ObY2S+rjmeULZtkSbJDtOfnNQkYf4471yokvs8JQXO1Z +JwV95Li+nNxYzgpnXu15HKqhj66J91XyZVgh0SZCgm6ij0qx4juzeTZCncOn +VaKfPg4KOxoZ8zOD80hd25PT+hj1xekWz/wGYArLztodqI/vd7cEbeneACa3 +fIj7Q/VxUWHX7au3N8DHHxtOBsTo48OlBcXXOzbAqLvKt/JMfaxp/M+7zoQJ +RH0v1ao06mNppfpApvka9fK6l1ZSkz7entj84YjoGpX5qkn57xZ9dCgaSDwx +sUodrWEtyn6lj055esM2V1epdUyxWbwd+ph2pW0ef65QnTLOn50f1MeQ77/s +Qi8uU7PqQ7WebaKgrv2kTRvTInWzjWM5YSsFdfJTPoR9XaCe79VRPstNwfrS +Uj7PqgXqMdZFWTUBCu6Wq0obPLZA1d4TzJ8rQUE/Z7filM55alffmZmL6hS8 +sqZhrVUzRxXgOllufZCCXf80frZnz1DzjCLDphwpqHFte2JQ5AxVI/KyUfph +Cob6CZ9wcJqh2kyVfep2o+C72VHzD/wz1LiuuaWjJymoafhD6WLyX+pibpRh +2AXG9z+GuefFTVO/6qV3FJRQsNipnanA5A/1WFDebfNSCmrpLO7N2fKHOl9a +7TleRsGTzRWC652TVF7p7gX1GgriuN65nx6TVEsOcbGnjRQsubgrTTphgvqk +s8Cj4xMF43Z82K7YP0a12EpXDu6mYIjYjtmNZWPUbtNX88LfKFh3qK9CO3KM +Ols3Fn+kl4K1YpIP84XHqMo5ao9GRik4OR01mG43Sn3y1SA4eYKCv+rrjsjJ +jFIt+O1AdYqC97df3LtpZoTqdSnoQ+AcBX2va4Z/TB+hzjbG3RRapOA21+57 +FR4j1OjlzKN1yxRM+5skMqg1QuUmFik5r1HQfpDodpx9hHrXt25ufZ2xX4RL +U9Qvw9T/AdDMpmk= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09498630205133335}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09498630205133335}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc8Vf8bAHCR2bLHNbJTNtfF5d7nQfZIKaFkZFQSZWSmkMwiijZCRsm+ +FxVfVFJpkLQkKzuyV37399d5vV/ndc55Pp/zjI+Uu98+T2YmJqbmDUxM/7/O +97xqkU3Ko+6pDso4s92W2nlXONSgOxqOZ81Hm2QoAwq8cxfuvgpGwfkr6+kU +CLYt/szSnQuurEPXX6ZbA8+k0NWlzxWw1KTzyz7dGX4+sfGb/dwE4ntqL75J +8wUT2dEf058/wn9hwQKNSZGw9Fn72tTnPvDXKmgoDEiBZqMHeR9yZ+AVBJ78 +bHAXxH7WDrkrrYEhiZQru5IP/CdditmNWNDImbmvSeEhXFU3qbc5wIFvZwoP +RG8uB9VvjqaUYxwowBpl0ShYDm9ifTsUwzlQ++XI0wXJcmDrzhjjyOHAJH1z +fjutcgg/1y/aPM6BOySKd9U7l4PH6/MR2rGcKPbV2dvmUTmQPOspkpVc2DS0 +ZOJrWgFfstQap7m34JHE02UrXpVws6NkW7DcFlxVm/Mn+1eC09YdLsu6W3Cw +qqjdP7QSvseI/2M+ugXdxhIOtiRVQu8pLn3+6i2YIEtzZCurhOHdAzSS41bs +ubvMPjtfCYtTmY/Dc7bhAf1nCV7nqqBWkW99vXobFkkURGTEVUGY12Wb2LZt +OC5+6GXt5SpY/RY7kTyzDXk7+ZxH71bB+X66wDtpblxL9nTsf1YFse35dr2B +3GjadE5ec60KkvKi3jGL8CChwLMLAqrBgnicV0CGB7fb7GshhlUDR8u+AzuU +eXD4SrSK1IVqiO2X+2ZpwIPN7u0BvZerIUL6zVDGcR5MzFEuXCyqhlPZwv/k +63hQU2/TyuWeath7u1zJ8hAvFnGyxtgY1AC30i0/Z09eNF5Jv6BuWgPt9bEV +fn68KJnw5/cm6xqw+HZQJyOGFzefHR8tcKgBQ8I/ox8lvMi7wbo5yK8GiFkW +h/xWeVHC48eN4Fs1IJTRn5B+hw9VVTK+bJyoAWHF6tjFAj58bfFWPnq6BghN +cVHOZXz4pPTR8sJcDUhM7Qza0cyHxEO52m//1YCclb9r/TAfRnWNbpPgpoHm +xjVSvyY/jg4eSndUpwHxVru6GYUfdbyCQly0aEDSyFZ6ZMKPl6TmR511aUB2 +NZI+68iPgU89w3Yb0MDgScKWTVH8aPvT1Y5uS4M9gYIDGm38uBQfHql3iga2 +m4Z7Mjv4scb0dkzbaRrsy639svqdHx9KNEvtC6KB/fvD71784cfmsT07LSNo +4Kx0v85JQADnT56JGEiggc+Aalq0qwAqP49eqLpPg5PhG5J/HxdAqinb4NsC +Gpzi7YizChDAg16zIT+LaHAGgyME4wQwlUMxa/wxDUJvP/EuLhFAmlj8h9J6 +Glzab079OC+Apn9FFDo/0IBQ1U5g3iCInnIsj8o6aVDKt39BfZMgBr3uzo39 +TIOuj0fK0rYLIsn10W/eHzSQ3RsovddMEDP8Wlle/aZBk/U9tvc3BLHg49aN +d1YY63kk279+XxBtuqPcptdoMLq5uEG1VBD9Gu9YUpjowPOmKuRKkyCuGJ59 +W7+RDq4WbaM2Y4IY09r61G4LHdZM5trf6gvhFJc7z7QYHVILwkrWTISwqntB +vkGCDrJsTPHKe4Xwz8OykVhJOlg95zJI8RTCxz1mUQsydLhpJFlpdVkIG+L0 +d4buooPK/fwrEVlCeJJldnCjEh2amBVPPswVQpuEp27xynQY+U9LbjNNCNcc +Pt4LVqODDlpmvv4phP9iOUOmtOjw5t77gJURIUzt0/EjazPiXT9gqzgrhKH9 +0ToROnS49MyVM4lDGI9rUCx/k+lAkBgarOMVxnMu929w69OhNNKnaVRMGP8M +bWtRp9ChSz843EJdGO1OC9IOAR1O3F45GKYnjBrE1lgPZKx/5Tyx2FgYOdse +63gaMNZbnzTB6SSM0v8inW2M6BCgm+PyKloYp7+kDDSY0MEie+usZbIwzhiK +S4Sb0kGaPSK+/ZowuhhnOama0eF9p315R6Ew7k7eORhtTodCvRZj+wph1K2r +1Ja2oENUrvrX7nphPLCH53odwyr+m1l62oVxScA2qsuSDqyfQzNdu4VR4MrT +rU5WdPhO+a3Y/0sYVZYEK7sYrsrb3+g5JoxyTMWnrKzpkLSpaf/wrDCCzUuj +eobdz6iOnPgnjFEJTUQZGzqQv9yOnGAXwSHbv0axDA8XnC34SxBB4luHF+p7 +6NCwZZAcJCuCI7GW1HMMXw/c925BWQQ3vBr90czwqW8NR8O0RXBu/NYDZls6 +GBsqL66iCG5UfnmHzLBY0c3kKAsR9Cr53OTD8Ow2Dinm/SJ4w1dP5DrDr4OD +qmOdRTDT8ej9WoZzf/SZs3uLoLhm89EuhkN32/Yk+IvgZNaHw+MM25Y8PbM5 +TAT/beBIW2FYgVeR/UqMCLbU9TFv3EuH9ZCsWzwpIujR11vFynDXT1a1jOsi +OOUdW8TEcKlJQItgNuP77Pv6ZxnPX3zU63CjiPF+0w8efQwf5reZEK0UQa6z +yWqvGNYMr79w94kIvn7AbV7EMFefgqDUCxFkfjxRFs1wn9n14vvvRLBQsubE +AYZrH7OA/BcR5LReD5FiOFXwdEdhnwjOU9x6hhj7dSyyx1txnOHK4Dv5DMOA +5eqjORH0lflBd2ZY0LI2VW1dBF+VEzW3MTxRLi9XyUHAQg3JbXWM/9MinFGr +xUtALjnjPUcYvh21wYYuSsCAMsv5Fcb/DRg61UeWIyBPbg9bOsMW1t+Dn6oQ +cPB4SYwMw9JV5ptQh4A/hNz9HjHy5f0FWaKxJQGfBDrdfcTIrwfDaa0v9xMw +3pzztwzD5/asH7Y4QsA7FhFF6Yx8VBb/enHPaQLuCsgvcGHk78ZYU8LHMAJ6 +W/8Yqmfk9/fRqtL9sQS8V/m9hIfhRPqVz46ZBLR03fuuiFEfbtvXfL5nE3Ao +4bDmuDGjvuNOMLkUE3B23WmHAsO/7Yx3ejwl4NfJkLZkRn3t/rMcdqqfgE93 +VFlxMuox1Cxj13/jBNwkJGclzqjX0hzlr3zzBEwZvqGuSKWD8H5X3VoOUbzE +FlJLZNT7OP35AouKKHqb9XCuM/qFFK/LA3ttURToI8X1kehg77NoX4Si6Hvu +zr8GRn9pFFessbETxdzEpsljmnRIj04NvBEiioMS0qIBKnRo/bZTdvyCKIZt +u/pCntGvVonNHdQkUdQZyIntVKSD1+85jYE7othuzbNbYiejvqwOTas0i+K1 +K2WSPox+2Ccgf6plixgeVYn8Ni5IByG/BnEhITH8EKK02UiA0T9bHd4elxTD +FYLUuXQ+OtSEJSlt0xRDh9EX6jLcjP38OTXq6CCGbY/6Ff9x0EGjqN77T64Y +Gtpbcucv0eCC/l43go44uk0/E3vTRQOzI3f/ahuKI9/Lq2/0GfNk6/mxmANW +4rgwn6j8gDFvbjdfLEh1Fcepszp8x9/QgG5RN8aWII7vvyr15vxHgykHmeCZ +L+Lo0WAqNlZMgyNBc4lvwiXw6L4G16UQGshlGoqNXpRAsxYVg0LG/BynX3nE +niqB6denHPaeoUHY6s73hnkSqNpWAFd9aHAt5ohA7RsJfPCy0/2dMw3epL28 +ly++Hct+DbwhM+Y3ufRG1bmG7ci2rPtzloUGuz+3r022bkfvxntj2kw0sGHa +aOrycTsmxK8cC16tgaP7Tn2Bwe3IJS3xfHC2BkzCpaLOs0rilNHKscuDNeC/ +ff6+gaIk1v6eSeV6UQMt3vcmmoMlcV8NCLTG1MDJxenzrVuk8L6uqsuOmWog +n/YSHOKVQgM+QcLaBOP8Nfq1hEVYCsUGKlLbh6sh/1tzF1VaCk80K7R4MM5X +Pc+uKVWTpJDf5sWrI6+qYc9F3e4cFymcfi97LuVuNWjwXlANL5fCNd6Wf/PG +1bCkyN2jfEAa6yyljrEmVoF+ycPs69dlMGVEDeQWKmCa18LVvkkWQxJ/cN4+ +Wg4Dya72Z9jlcZ291UmE+hjM/5w1HyTtwMr999UKJ0tg/ChHQFWUAt5q/vjj +mW8h4zwvxHypaSd6JqrfC5fPB9638pfL/uzCvLysbe/Mc0Es/rEtiaSEkzft +48p670KWoi43n7cysu191XOH7ya0EQy0ZtJUcM+4aPzwz2tAFmtKVe1SRZG1 +6tDp3jTYypIb6Batht9zWc6F7E0BtqUGu+lYNVTrGZXN006Bf5M/NC5cUkON +cpFdv8RT4M9XkensZDX8R5rXuTKaDO8r0nx7r6th7B6R13WxyXDV/YKXS4ka +zjn4Nls8SQLBJlcH5041/DEvySenkwgSF7brO8qroxvrl+GTbpegNIBD+oeC +Ot74z9dM3uoSUL2m2d0U1fHzWuroJOkSOFs2dxxTU8fr507+eLT5EtwW8PYJ +Iavjixrq21/0OBApLr2ZaaOOuTX1FmL8ccDfQVn6FKyOVILbYOmnWOCUO1yz +76U6Yjlr9/eYaDghAhYlr9TRxWes5mhANLRtke5heaOOfY9y/OfdoyF5/jdr +9Xt1lK+6eQQMo2Fra8ABoa/q6Khnm3RkQzTw+iTNfhtXx9MUJqe3Fy6AWHmd +hievBj5YOUU1SToPKhSRx2edNfDPBtbnPecioVLm+AqzqwYumafGEd0iQYer +1vSyuwYefy46kmsUCYafHXrzvDXwet5Dh1cckWB/Oovn42kNPOejaK+XEQFR ++UKBSnEaGCHwyf/B43B4v0VQ91epBo5N6idTFkPhTA9vswWTJq60cZ3d+zYY +Wl8cflrMrInvxFtGF2qCQeJxAY2LVRNFp763lWUHQ1sU+WEbpyYquubddwwM +Bmkp92sWfJpo88z0fJxYMHw4Wu5tIa+Jmm93aRr5B4HayJ7NFlaaeGBAwmtF +NhD+zCQfMM/SxFBt12ds/52G79059nduaqKZEf9O68enoe1pzcHp25p4d8+X +0tw7pyHvUq/jjRxN9FXTHggLOw1OosQjI8Wa+PaubX8P8TQ8N/zmlfBUE8d5 +Q/JPPvSHW2k7Q171aeKLCx/7a6z8ID6YGio+qIlMLzTaB5T8IPiQXdjp35qY +s/NRrMoWP7CVi4wQGddEGoc7l0D7KWCrfX/++JwmykW5HVfaewpO955N4OQg +4kzWY+7Aw75gqvriprkyEVPXJkwG43zAgc1s/3tVIgobKqmsefvAiR+vthzU +IOKvW0RBTXMfuJz09ryHNhFvELOSFzf5QNfvTq8oAyL+rryS+vvqCfDI7teo +PkBE95QSVsOC4xDNs+G15DkiPvNLMLTs84aM4ejYB+eJeFJG/9TCC28oaNhI +VYlh3NcYfvusxBvafDnK9eKJyBtt/fFukDfwtG3LtL9KxIuZl9JyuLwhO1ri +aHIBEUtjUiTu6XrBsxm9lYV2In6TQ+uhYg/IeUNzt/tAxMLY4mWfDA+Izdds +K+0gokCr82b2cx5gflDxhmc3ER/P+hIi93pAZx1Bu+MXEW/vKOXzXjoKoxeW +zpTOEpGdVr9T1vooCHLTRj0IWsh8eZ3nI4s7LA1r7GsU08KHbxc+Dfxxg+// +ldaKbtfCWxJXV7m+u0FOQEH8RxktvB9RqJlW5QZKn6/Jo7IWdpXx3ojxcgPD +u4HuoqiFQdmEr3/fusIpJY2vHzy18LaTsp/MARcIWiAsuxzTwqN+ZlJ/VVwg +oomFMHlCC9cG/i2McLhAksMnRy5/LbR4PB+1/+kRKIwN+WIYpoXztcqL3ApH +oO/7s+7Ky1rokOjxgp3VGexTLD9fo2mhRM+O0JlvTuDsQFyQqdPCCJYZ0Zw6 +J/CQEReqeKKFZSubggJuOEFA7aR9+39aGNvp3HTxoBOkDqZ1sb3RQnu1JSHn +T47QRun+dLZXC41vOvjWfnYAyqRHpyMnCT2Ob7Y3mrcHwXrT3CebSBig5MOu +8c0eJi/t8t++lYQfoFSV0mgPd6WmNg3yklDnU0BUYaI9/NsfbuQvRsLVrEeO +7yXtoaE+rSJOlYQOq5Hie/YdAIOEZ6mVB0g4OtwR4PzKDgj2OUcEHUioqjQk +VlJuB3+lY5VCnUiYMWygznvTDnKfmLdSXUh4aqqSquRjB8xTneuvjpFQ2lbW +I2WrHTTbj53qDSehsnHA6z+O+8BYVth6Sy4JrX8+Hclk3gtVE8+lPPJImBY5 +98hm0hZkaQHzdQUkDM2+qiH61RY2Wry7d6yEhIMZT5Xmym2hyS/ub3MVCUW8 +KDXF7rZArZ/NDHtJwnexZmUCqXuAtO9D3+9xEtbd4JJX220NBaJRNOofEiZ2 +v5dtkrQGgUGl5GvTJIypT+wKW7OC2bPxWkbzjHj/O9XoQrOCijsQf3edhBcf +bqqcUbIC1ZFHygd4tTEpu/Ca7HZLUDifGNKkrY39aTPDlRLm8EQvn9WKrI0J +vNCst2YGtgsNVz/pa6PNyofVsW9mEHJq7uGwgTZe0uIdaLlhBq2HXX9ttdLG +46NlQ3ZCZnBMl2RxyFUbS+uHbJpETKHo7y/R2Xht3M3MH9RCNgZq6WphZJI2 +3szIusMhYQwfjwuR2C9r48bmdIL/BmNY7rWyJaRro/Vyemhh626weEeLxTuM +eEg3CuscdsNoScpEcrk2/vtCl9gdZQS7PHUb5L5qI0ufdcv4gAFckbZZjvmu +jX4pMYSFtwYw+9Ndq69HGy3kXpuL0QzgmVNyyd1+bazp/dBSk2AA+2x/ZgpN +aGPDy4pdO9UMIFTvoj8nkw4ahuPfsQsIrTwfpCbkdFCp8bykqz8VlN8NHrZU +0MH8VGXtZjMqXE1ezizapYP2dvInD0hR4TC77FYvVR0UOWdxgq2DAn9Wg5d7 +dHSw2F5w3zUdCggOi3W8t9TBO3K/NfU364Pns2OxVad18PnD3XLunbow6Tt6 +1jhQB/0k+xoCHutCiPhJn65gHazQsWusTtSFxAi/fYvhOri7oZW7zUAXysjB +kvpxjPjEP7UrV+jAak3Mk+abOpjK13Wi/JY2XH18d/Zjsw6Gfhq7rp6qBWIu +ksNHX+jgKszFDflrQf7W3G+zrTqo0dFBfL5XC+i++U2C7TqoH9rOvM6nBT8U +H6Y6devg7/D19SM3iaBQWKvUN66DBKFNQ/mlmtCQ3ekxLaCLUWBbunFWHXqt +pFyChXVR7N7QpW1f1YFpyddxhaCLLe+kF/Ub1cFwL7sNq6Quhh3pnf+XrA4v +NpC1RXbpYnTj5j8EBXV4436P04CqiwUxUW5XPNTgq+yJ0lQvXWQJOLTp8agy +rLyvKRQ4rouXHQl8758pg1gky/2bPrrIuYRJSunK4Pzpdmaevy6OMYsVX9dX +ht6L787Tw3TRvFGvccdVJfg9RLTrvayLmsVRuuumijBbuL6gStNFIZbbbLnf +FWDI3iQ7oVYX9eY6pmXqFKB7Y4pZf70u7lhSVvmYqQD1roQb1xt1MaBr+XWF +nQJEC2uR117pYpeQDUvU2x3AHX8iou27Lm54kmEs9EoelLw/MXkyk7H7h3rR +VI8sSAiIFT3bSEY7Ua6M2//JAnez+15hdjIGE2OencqThRmJqZzXm8hILdgg +fvGELNR1cRlpCJAxflVGIGhRBsxM8OL6DjIyBrOGnqgMHJUr4bxpTcbjnwXj +NcOlIOz5kRPytmSc8Qq8qecqBamevK8r9pGRPX/A+YSxFDzJD01+fZCM0X0p +ynrcUsAvb7ZtzY3xfs7GgLwHkvBCfpDfNZiMTj/7JzrrtsMuhe2S8vfIuKPe +6dLECzHA1o/nK3LIONTeApM3xMD+WNwvah4Z74fdTFTzFYOYwoncg0VkZH08 +FRrCLwbfFZ7IJVSSkd+xwWSzlyhc3umoOP6SjH47S2WW+AkwvSudVDFFRoOO +0fLCe0LQ/QaN+WbIaJTz7XRVhBA0npq0C5wjo1S3a+SUoxBcrjA/TVomo3i0 +cfQivxDsIjM9rGPRw8Ufx7INUgTB3dxXqllQD/sFZeZj4gSg09t0c6e+Hnbs ++rJKvMkH9ZxzBC3QwwMbfC53R/BBbknuzusGetgTzrY734UP/P+smTiY6GHv +YV3TWjk+2HK26sL3PXro6bJt8nklL5jESS0MuOvhNQuh+N2feYCet/JrLl4P +tyeKuoaSuYFkFLhgkaSHm2NYMp2kuaH61/jm7BQ9XGNW93Lm4oYKiR5ti6t6 +2PkoxOBy9TZ4mNWYcvcWI556coXV8lbITr6oa1qqh/CGj9BzZQskBG5Ly+rQ +Q7aD78QJI1zAwRdfMPFJDznb7qfmNnJBXDnTE8NuPTTry5TyyOKC2MnpofHv +ehhlUh+QZsYF54516hsM6eE7OdXnySWccObwjeGRRT28kB5/60U4BzjtlkE9 +CX28EiTtfdiIDdY6ObY2S+rjmeULZtkSbJDtOfnNQkYf4471yokvs8JQXO1Z +JwV95Li+nNxYzgpnXu15HKqhj66J91XyZVgh0SZCgm6ij0qx4juzeTZCncOn +VaKfPg4KOxoZ8zOD80hd25PT+hj1xekWz/wGYArLztodqI/vd7cEbeneACa3 +fIj7Q/VxUWHX7au3N8DHHxtOBsTo48OlBcXXOzbAqLvKt/JMfaxp/M+7zoQJ +RH0v1ao06mNppfpApvka9fK6l1ZSkz7entj84YjoGpX5qkn57xZ9dCgaSDwx +sUodrWEtyn6lj055esM2V1epdUyxWbwd+ph2pW0ef65QnTLOn50f1MeQ77/s +Qi8uU7PqQ7WebaKgrv2kTRvTInWzjWM5YSsFdfJTPoR9XaCe79VRPstNwfrS +Uj7PqgXqMdZFWTUBCu6Wq0obPLZA1d4TzJ8rQUE/Z7filM55alffmZmL6hS8 +sqZhrVUzRxXgOllufZCCXf80frZnz1DzjCLDphwpqHFte2JQ5AxVI/KyUfph +Cob6CZ9wcJqh2kyVfep2o+C72VHzD/wz1LiuuaWjJymoafhD6WLyX+pibpRh +2AXG9z+GuefFTVO/6qV3FJRQsNipnanA5A/1WFDebfNSCmrpLO7N2fKHOl9a +7TleRsGTzRWC652TVF7p7gX1GgriuN65nx6TVEsOcbGnjRQsubgrTTphgvqk +s8Cj4xMF43Z82K7YP0a12EpXDu6mYIjYjtmNZWPUbtNX88LfKFh3qK9CO3KM +Ols3Fn+kl4K1YpIP84XHqMo5ao9GRik4OR01mG43Sn3y1SA4eYKCv+rrjsjJ +jFIt+O1AdYqC97df3LtpZoTqdSnoQ+AcBX2va4Z/TB+hzjbG3RRapOA21+57 +FR4j1OjlzKN1yxRM+5skMqg1QuUmFik5r1HQfpDodpx9hHrXt25ufZ2xX4RL +U9Qvw9T/AdDMpmk= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.09498630205133335}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQOJdyvKU9a02UN4H+zND5r7zpddAOUzOOyUzDvw +vH0llM/h0LXGdMqt7g1QvoBD0/Ht5by/NkH5Ig71P1OOFpRugfIlHLbN3ebG +8hjGl3GQ2Sg2nykBxldweH+s6dACn81QvpJDKlA3w5GNUL6KQ+2GHt67b9ZD ++WoOLoutO+ZqroHyNRxyatR+P89cAeVrOaRfWvZK7uYSKF/H4cXdiACJKQuh +fD0HJ0UmvoVec6F8AwfroNrn4qozoHxDhz/m+n41WydD+UYOj1dtet/1oB/K +N3Zok4k+L9DXCeWbOEQER4qUBbZA+aYOgsd37ehla4DyzRx6vvL65IlUQvnm +DiJ20ezs1cVQvoWDxf7ERY5ceVC+pcP3yNRlW/6lQflWDu4Tt7YFVSdC+dYO +VeZiImypUVC+jYPtvGnyO04FQ/m2DpNO13vsr/WF8u0cvjPcnW5829UeAOhB +gVg= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.081589}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.09498630205133335}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943600703675547`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"5bead7a7-317f-4b73-9ccd-f1af2008a4ba"] +}, Open ]], Cell[CellGroupData[{ @@ -14252,18 +16136,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5409139068924253`*^-130\\\", \ +RowBox[{\\\"68023740289078328950450781972622203792902576953271358\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"951822384455180747800576000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 142, 161, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360070395656*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"129a88b2-5038-434f-88a5-d161f172ef9c"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5511981310088803`*^-132\\\", \ +RowBox[{\\\"29631141269922520090816360627274231972188362520845003\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"79\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"138306686767337419309056000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 142, 162, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360070400066*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"26dab22c-f7e1-4323-a6eb-ecbf460c80f5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5615509931363275`*^-134\\\", \ +RowBox[{\\\"13301419316068219268767464285583402732315355935607322\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"83\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"858716898577675278352384000000000000000000000000000000\\\"}]]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 142, 163, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943600704044323`*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"ef4bbb65-d6d4-48b8-8dce-c4aa225409ef"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 142, 164, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943600704086123`*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"752088a2-1021-46f6-8e5d-2f0b735928ab"], + +Cell[BoxData["8.647629298909`"], "Output", + CellChangeTimes->{3.994360107926495*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"a6149f7a-f556-4671-8be5-2b568296e95b"] }, Open ]], Cell[CellGroupData[{ @@ -14330,27 +16271,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850391956293*^9, - 3.9918503966918755`*^9}},ExpressionUUID->"a3e3d205-e3b4-874a-a36c-\ -53cfa72184b4"], + CellChangeTimes->{{3.991850391956293*^9, 3.9918503966918755`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.48696165239937`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 143, 165, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99436010795392*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"474385f1-256f-4341-9d54-401b448c56c3"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.308554221869812`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 143, 166, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360107957946*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"86261edb-266a-455c-a33e-6f18f64970ac"], -Cell[BoxData["1.0713232818739324`"], "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1873127560961716`*^-228\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 143, 167, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360107961776*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"26679921-a02b-42b6-8b18-14c4ee42a29b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 168, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360107966004*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"8487f86e-9a27-4f54-9ea8-8bae7594376f"], + +Cell[BoxData["0.02385383553007864`"], "Output", + CellChangeTimes->{3.99436011175445*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"ccb53a91-ca57-4d73-bc20-b2bd45c814ac"] }, Open ]], Cell[CellGroupData[{ @@ -14371,8 +16357,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14417,27 +16402,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504007528324`*^9, - 3.991850403970867*^9}},ExpressionUUID->"6977f025-454e-0e4a-b118-\ -07bad9ba3e82"], + CellChangeTimes->{{3.9918504007528324`*^9, 3.991850403970867*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566a849f-fc85-4d42-a545-a46d44cf7346"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.48696165239937`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 144, 169, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360111778596*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"97cb0235-2fa8-404f-9022-a03caae533cb"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.308554221869812`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 144, 170, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360111782692*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"af245512-ea9d-433c-9413-d5fa3a36f7e4"], -Cell[BoxData["5.515504100347031`"], "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1873127560961716`*^-228\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 144, 171, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99436011178675*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"93f9af8c-a637-4a15-8297-556605b67ddb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 172, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360111790794*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"5dd0fb26-2eee-4766-9abc-40c5d6d81d45"], + +Cell[BoxData["17.50035561989374`"], "Output", + CellChangeTimes->{3.994360115565619*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"b5ab214c-d137-4345-984e-32d8df4fa95c"] }, Open ]], Cell[CellGroupData[{ @@ -14458,8 +16488,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14504,27 +16533,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504078476295`*^9, - 3.9918504110344543`*^9}},ExpressionUUID->"df8ecb01-788a-604d-b773-\ -f29bb610eb30"], + CellChangeTimes->{{3.9918504078476295`*^9, 3.9918504110344543`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.48696165239937`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 145, 173, 31388290425217551397, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360115589863*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"f1a8785f-ff26-489b-bfde-358158b23ca7"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.308554221869812`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 145, 174, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360115593803*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"1a0bfbab-9bd8-41fe-87e3-db6a9352fff0"], -Cell[BoxData["17.107550304528036`"], "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1873127560961716`*^-228\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 145, 175, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994360115597691*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"7bbab25d-8680-4107-9c44-8508065a6849"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 176, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99436011560218*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"afa3b479-52d7-4b51-9988-c0979d268326"], + +Cell[BoxData["2.1972640562957078`"], "Output", + CellChangeTimes->{3.994360117952703*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"79324107-abdf-4481-a2b4-6b4bbbb0e6ba"] }, Open ]], Cell[CellGroupData[{ @@ -14533,18 +16607,21 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918504490520267`*^9, - 3.991850453720993*^9}},ExpressionUUID->"54a5e329-20bd-e742-afe8-\ -d2cfa007cfcf"], + CellChangeTimes->{{3.9918504490520267`*^9, 3.991850453720993*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[BoxData["0.11028946354837708`"], "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[BoxData["0.0038467473017303176`"], "Output", + CellChangeTimes->{3.9943601179740133`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"f0a46db4-6ace-473a-8e8e-735e9cba84d2"] }, Open ]] }, -Evaluator->"kernel 3", -WindowSize->{714, 288}, -WindowMargins->{{Automatic, 3}, {3, Automatic}}, +Evaluator->"kernel 2", +WindowSize->{1440, 882}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, -Magnification:>1.8 Inherited, +Magnification:>1.3 Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"f83c5602-f0d5-2d47-8a1b-23029521caf0" @@ -14561,618 +16638,641 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 300, 5, 52, "Input",ExpressionUUID->"8e5d3540-6ffc-411c-96eb-dadf9a7438ec"], -Cell[879, 29, 269, 4, 59, "Output",ExpressionUUID->"f3563bd7-af39-4b63-9eb3-1a10e7541960"] +Cell[576, 22, 300, 5, 47, "Input",ExpressionUUID->"8e5d3540-6ffc-411c-96eb-dadf9a7438ec"], +Cell[879, 29, 295, 5, 54, "Output",ExpressionUUID->"605c0dd8-5cf5-4e34-8d2a-cac55cbc5a4b"] }, Open ]], Cell[CellGroupData[{ -Cell[1185, 38, 245, 4, 52, "Input",ExpressionUUID->"abbbc09c-d92f-4931-8344-3a8133c0d4e0"], -Cell[1433, 44, 271, 4, 59, "Output",ExpressionUUID->"326aff7f-2fea-41a5-be13-ddd445eab4e0"] +Cell[1211, 39, 245, 4, 47, "Input",ExpressionUUID->"abbbc09c-d92f-4931-8344-3a8133c0d4e0"], +Cell[1459, 45, 297, 5, 54, "Output",ExpressionUUID->"5f655f1c-f6da-4557-bfed-836eae5dfd13"] }, Open ]], Cell[CellGroupData[{ -Cell[1741, 53, 228, 4, 52, "Input",ExpressionUUID->"adaa1e5b-d09b-4e11-855c-9c30ebedd0a7"], -Cell[1972, 59, 270, 4, 59, "Output",ExpressionUUID->"2891c05b-7bf2-47a9-80d8-8c378e6748ae"] +Cell[1793, 55, 228, 4, 47, "Input",ExpressionUUID->"adaa1e5b-d09b-4e11-855c-9c30ebedd0a7"], +Cell[2024, 61, 298, 5, 54, "Output",ExpressionUUID->"4c42da71-c076-483b-81fb-39d0c2c33451"] }, Open ]], Cell[CellGroupData[{ -Cell[2279, 68, 175, 3, 52, "Input",ExpressionUUID->"aa27695c-3499-4e54-a940-a0723424ec35"], -Cell[2457, 73, 273, 4, 59, "Output",ExpressionUUID->"fc34fd03-4a55-4cf3-ad3b-848224b5213b"] +Cell[2359, 71, 175, 3, 47, "Input",ExpressionUUID->"aa27695c-3499-4e54-a940-a0723424ec35"], +Cell[2537, 76, 299, 5, 54, "Output",ExpressionUUID->"611e2f3a-ae2d-42bc-848a-474b0ba08bcf"] }, Open ]], Cell[CellGroupData[{ -Cell[2767, 82, 257, 7, 75, "Input",ExpressionUUID->"6dde0841-46eb-46e4-9e28-ba13f2552a0e"], -Cell[3027, 91, 287, 4, 59, "Output",ExpressionUUID->"3554a330-5391-4d9c-a154-30b98f84b573"] +Cell[2873, 86, 257, 7, 69, "Input",ExpressionUUID->"6dde0841-46eb-46e4-9e28-ba13f2552a0e"], +Cell[3133, 95, 313, 5, 54, "Output",ExpressionUUID->"b7a1b761-4b4b-4a36-9816-7fd329b9d1b4"] }, Open ]], Cell[CellGroupData[{ -Cell[3351, 100, 131, 2, 52, "Input",ExpressionUUID->"3d46be30-e088-47d4-b9c4-fca73f603d34"], -Cell[3485, 104, 275, 4, 59, "Output",ExpressionUUID->"0d7eca86-e8a0-404f-a50c-84315f736b8c"] +Cell[3483, 105, 131, 2, 47, "Input",ExpressionUUID->"3d46be30-e088-47d4-b9c4-fca73f603d34"], +Cell[3617, 109, 303, 5, 54, "Output",ExpressionUUID->"5506af8f-232d-47bc-a619-9401cd66baf1"] }, Open ]], Cell[CellGroupData[{ -Cell[3797, 113, 276, 6, 52, "Input",ExpressionUUID->"6eae20c3-99e3-4523-a8cb-2691b914ae6d"], -Cell[4076, 121, 288, 4, 59, "Output",ExpressionUUID->"199abe01-34a0-41e2-a37f-b58d2a1b6624"] +Cell[3957, 119, 276, 6, 47, "Input",ExpressionUUID->"6eae20c3-99e3-4523-a8cb-2691b914ae6d"], +Cell[4236, 127, 316, 5, 54, "Output",ExpressionUUID->"1c8fd4b3-3775-48d5-9fa1-7f5f184ddcf0"] }, Open ]], Cell[CellGroupData[{ -Cell[4401, 130, 257, 7, 52, "Input",ExpressionUUID->"7ddbaf61-f950-4acd-a96d-a80764bc9971"], -Cell[4661, 139, 287, 4, 59, "Output",ExpressionUUID->"b5582a08-4023-408c-a924-a3f240af55df"] +Cell[4589, 137, 257, 7, 47, "Input",ExpressionUUID->"7ddbaf61-f950-4acd-a96d-a80764bc9971"], +Cell[4849, 146, 315, 5, 54, "Output",ExpressionUUID->"a43e7ce0-fcfb-40b8-a877-6df827bdcb1b"] }, Open ]], Cell[CellGroupData[{ -Cell[4985, 148, 224, 4, 52, "Input",ExpressionUUID->"5c04ac5a-097d-486a-8642-e32e3fc4f07d"], -Cell[5212, 154, 250, 4, 59, "Output",ExpressionUUID->"e0d1d1ba-c5fb-4817-a0ca-96b5a7ec8bdf"] +Cell[5201, 156, 224, 4, 47, "Input",ExpressionUUID->"5c04ac5a-097d-486a-8642-e32e3fc4f07d"], +Cell[5428, 162, 272, 4, 54, "Output",ExpressionUUID->"c7517266-8c33-478a-bb2a-a5064332d856"] }, Open ]], Cell[CellGroupData[{ -Cell[5499, 163, 226, 4, 52, "Input",ExpressionUUID->"107444a4-71f5-4e3e-af34-133b3ef874bb"], -Cell[5728, 169, 256, 4, 59, "Output",ExpressionUUID->"d39d1c0b-af89-447a-a8e5-8c35e6437216"] +Cell[5737, 171, 226, 4, 47, "Input",ExpressionUUID->"107444a4-71f5-4e3e-af34-133b3ef874bb"], +Cell[5966, 177, 278, 4, 54, "Output",ExpressionUUID->"0d465331-fd4a-4fea-96ae-ea6dec7d0fdd"] }, Open ]], Cell[CellGroupData[{ -Cell[6021, 178, 129, 2, 52, "Input",ExpressionUUID->"6a35c8ff-e15e-410b-8c5b-22387fa5399d"], -Cell[6153, 182, 269, 4, 59, "Output",ExpressionUUID->"c5bde84d-2703-457d-9097-aa902836ab96"] +Cell[6281, 186, 129, 2, 47, "Input",ExpressionUUID->"6a35c8ff-e15e-410b-8c5b-22387fa5399d"], +Cell[6413, 190, 295, 5, 54, "Output",ExpressionUUID->"834b2610-0f29-4cb4-bd14-6204a65a7d7b"] }, Open ]], Cell[CellGroupData[{ -Cell[6459, 191, 129, 2, 52, "Input",ExpressionUUID->"ef652dfc-7a22-4879-a526-499b5cf48896"], -Cell[6591, 195, 270, 4, 59, "Output",ExpressionUUID->"b8f5fee9-c6c1-42fe-8d8c-7e32b9ea8d72"] +Cell[6745, 200, 129, 2, 47, "Input",ExpressionUUID->"ef652dfc-7a22-4879-a526-499b5cf48896"], +Cell[6877, 204, 296, 5, 54, "Output",ExpressionUUID->"e1ce7fb8-52f5-4f67-b4e6-bda51b3f1bdc"] }, Open ]], Cell[CellGroupData[{ -Cell[6898, 204, 557, 19, 141, "Input",ExpressionUUID->"f6c104af-2858-4534-80cb-b52c7666273b"], -Cell[7458, 225, 293, 4, 59, "Output",ExpressionUUID->"48e33ba1-cf69-46ca-855e-fb9af129fec4"] +Cell[7210, 214, 557, 19, 128, "Input",ExpressionUUID->"f6c104af-2858-4534-80cb-b52c7666273b"], +Cell[7770, 235, 319, 5, 54, "Output",ExpressionUUID->"584a9122-bbbb-4c5f-aff4-57cd807545fd"] }, Open ]], Cell[CellGroupData[{ -Cell[7788, 234, 557, 19, 141, "Input",ExpressionUUID->"9372372d-b6eb-4c05-b96e-50136663406f"], -Cell[8348, 255, 288, 4, 59, "Output",ExpressionUUID->"86ef11bf-adf7-4235-bbb2-3d7918124d23"] +Cell[8126, 245, 557, 19, 128, "Input",ExpressionUUID->"9372372d-b6eb-4c05-b96e-50136663406f"], +Cell[8686, 266, 313, 5, 54, "Output",ExpressionUUID->"42137ad4-fbdb-42ea-9101-b9886f8c11b0"] }, Open ]], Cell[CellGroupData[{ -Cell[8673, 264, 1588, 50, 555, "Input",ExpressionUUID->"bdf46e79-f9f0-48e5-adad-d3b12a2bd932"], -Cell[10264, 316, 285, 4, 59, "Output",ExpressionUUID->"15d72347-a19d-4cc5-a7ff-b399d509b59a"] +Cell[9036, 276, 1588, 50, 217, "Input",ExpressionUUID->"bdf46e79-f9f0-48e5-adad-d3b12a2bd932"], +Cell[10627, 328, 313, 5, 54, "Output",ExpressionUUID->"81e06ad6-0bc4-4899-8336-476a0101f47f"] }, Open ]], Cell[CellGroupData[{ -Cell[10586, 325, 1422, 46, 518, "Input",ExpressionUUID->"ec3af131-da22-40e1-80e7-ad28458c8ace"], -Cell[12011, 373, 308, 5, 59, "Output",ExpressionUUID->"992554df-c8b9-4758-9a90-cacea04f536f"] +Cell[10977, 338, 1422, 46, 179, "Input",ExpressionUUID->"ec3af131-da22-40e1-80e7-ad28458c8ace"], +Cell[12402, 386, 334, 6, 54, "Output",ExpressionUUID->"23eb0274-913e-4c76-af5e-c56188e5cd71"] }, Open ]], Cell[CellGroupData[{ -Cell[12356, 383, 1422, 46, 518, "Input",ExpressionUUID->"9080adde-f95a-4035-81fb-15e78ad0678d"], -Cell[13781, 431, 306, 5, 59, "Output",ExpressionUUID->"f67a0899-9ea3-4a7a-83f3-38f269cd12ba"] +Cell[12773, 397, 1422, 46, 179, "Input",ExpressionUUID->"9080adde-f95a-4035-81fb-15e78ad0678d"], +Cell[14198, 445, 332, 6, 54, "Output",ExpressionUUID->"7e953fab-27cd-4e3c-bd6c-dceb2d097234"] }, Open ]], Cell[CellGroupData[{ -Cell[14124, 441, 1588, 50, 555, "Input",ExpressionUUID->"607b6ab3-f4e5-43f4-99a6-9a136d58f8ab"], -Cell[15715, 493, 285, 4, 59, "Output",ExpressionUUID->"6f85cf2a-3631-454f-af43-dc6b727f47c6"] +Cell[14567, 456, 1588, 50, 217, "Input",ExpressionUUID->"607b6ab3-f4e5-43f4-99a6-9a136d58f8ab"], +Cell[16158, 508, 313, 5, 54, "Output",ExpressionUUID->"e33e465d-900f-4b9b-bdcc-a6981d89caa1"] }, Open ]], Cell[CellGroupData[{ -Cell[16037, 502, 131, 2, 52, "Input",ExpressionUUID->"3ca6077f-e524-45f5-8fcc-52627deb04a0"], -Cell[16171, 506, 272, 4, 59, "Output",ExpressionUUID->"da6c54cd-ef7f-49b4-8dfe-efbc1933ab0a"] +Cell[16508, 518, 131, 2, 47, "Input",ExpressionUUID->"3ca6077f-e524-45f5-8fcc-52627deb04a0"], +Cell[16642, 522, 298, 5, 54, "Output",ExpressionUUID->"7ac43e8f-1a66-4820-ac01-256bde56814f"] }, Open ]], Cell[CellGroupData[{ -Cell[16480, 515, 133, 2, 52, "Input",ExpressionUUID->"c4f248a8-5df7-4a03-bbb4-b01f8d03c604"], -Cell[16616, 519, 273, 4, 59, "Output",ExpressionUUID->"89391acf-6cd4-4ee0-81d2-3a91d5782fea"] +Cell[16977, 532, 133, 2, 47, "Input",ExpressionUUID->"c4f248a8-5df7-4a03-bbb4-b01f8d03c604"], +Cell[17113, 536, 301, 5, 54, "Output",ExpressionUUID->"43a22b19-c88f-49a4-aa14-eece2bc612fb"] }, Open ]], Cell[CellGroupData[{ -Cell[16926, 528, 134, 2, 52, "Input",ExpressionUUID->"f750652d-a6d6-46d1-b907-c2e8b1cf40f9"], -Cell[17063, 532, 276, 4, 59, "Output",ExpressionUUID->"99f511cc-8a95-431b-9c1f-ceafdceb17fc"] +Cell[17451, 546, 134, 2, 47, "Input",ExpressionUUID->"f750652d-a6d6-46d1-b907-c2e8b1cf40f9"], +Cell[17588, 550, 302, 5, 54, "Output",ExpressionUUID->"b9bb60fe-2bad-498c-99be-fe2893792232"] }, Open ]], Cell[CellGroupData[{ -Cell[17376, 541, 219, 4, 52, "Input",ExpressionUUID->"720d5765-8263-44e5-9989-fd40b9f718d8"], -Cell[17598, 547, 287, 5, 59, "Output",ExpressionUUID->"e468c1d1-d37a-406c-a570-d975a8693fc3"] +Cell[17927, 560, 219, 4, 47, "Input",ExpressionUUID->"720d5765-8263-44e5-9989-fd40b9f718d8"], +Cell[18149, 566, 313, 6, 54, "Output",ExpressionUUID->"2931a8ff-df0c-4057-b90d-ce9aa0106ff9"] }, Open ]], Cell[CellGroupData[{ -Cell[17922, 557, 134, 2, 52, "Input",ExpressionUUID->"2b91139f-4f4e-4dea-a68b-5e49638605cb"], -Cell[18059, 561, 279, 4, 59, "Output",ExpressionUUID->"e4a0e6a0-3e0d-4645-9a1e-1a6537417ec1"] +Cell[18499, 577, 134, 2, 47, "Input",ExpressionUUID->"2b91139f-4f4e-4dea-a68b-5e49638605cb"], +Cell[18636, 581, 305, 5, 54, "Output",ExpressionUUID->"27fbcc3e-e9cb-4dc4-b698-6ad701716dcb"] }, Open ]], Cell[CellGroupData[{ -Cell[18375, 570, 328, 5, 52, "Input",ExpressionUUID->"4bc5dd5d-22ca-4118-a8d0-e9664ed01a31"], -Cell[18706, 577, 275, 4, 59, "Output",ExpressionUUID->"83bd7b71-fb1f-4bc0-b01c-76a22698f557"] +Cell[18978, 591, 328, 5, 47, "Input",ExpressionUUID->"4bc5dd5d-22ca-4118-a8d0-e9664ed01a31"], +Cell[19309, 598, 303, 5, 54, "Output",ExpressionUUID->"96fd70c9-2dac-43fe-a6e4-1c0e71dec043"] }, Open ]], Cell[CellGroupData[{ -Cell[19018, 586, 295, 5, 52, "Input",ExpressionUUID->"270d3ddc-eaae-4c2a-9364-dd051a2d494c"], -Cell[19316, 593, 273, 4, 59, "Output",ExpressionUUID->"bf4e7aec-93a1-4d41-8dee-b7602c0247cd"] +Cell[19649, 608, 295, 5, 47, "Input",ExpressionUUID->"270d3ddc-eaae-4c2a-9364-dd051a2d494c"], +Cell[19947, 615, 299, 5, 54, "Output",ExpressionUUID->"c6d3d6cb-761c-4fe9-93c5-faeb3dc0bcb5"] }, Open ]], Cell[CellGroupData[{ -Cell[19626, 602, 219, 4, 52, "Input",ExpressionUUID->"2654dd54-41ad-4515-baeb-2df460340c19"], -Cell[19848, 608, 273, 4, 59, "Output",ExpressionUUID->"9f2a2e41-77e4-40c9-95fa-6b28f952c064"] +Cell[20283, 625, 219, 4, 47, "Input",ExpressionUUID->"2654dd54-41ad-4515-baeb-2df460340c19"], +Cell[20505, 631, 298, 5, 54, "Output",ExpressionUUID->"ebd10f95-8e54-4f58-a069-bb20b06141be"] }, Open ]], Cell[CellGroupData[{ -Cell[20158, 617, 350, 10, 75, "Input",ExpressionUUID->"135d7813-d47a-423e-a6ad-8d1cbf7124ea"], -Cell[20511, 629, 299, 4, 59, "Output",ExpressionUUID->"4d89a307-fce4-48be-8285-a9c7c9ce2360"] +Cell[20840, 641, 350, 10, 69, "Input",ExpressionUUID->"135d7813-d47a-423e-a6ad-8d1cbf7124ea"], +Cell[21193, 653, 325, 5, 54, "Output",ExpressionUUID->"f942b924-45d3-4c39-b6ee-c7295c1ca407"] }, Open ]], Cell[CellGroupData[{ -Cell[20847, 638, 350, 10, 75, "Input",ExpressionUUID->"0da75f14-aa91-42a8-82cd-d8bcad1418c0"], -Cell[21200, 650, 306, 5, 59, "Output",ExpressionUUID->"d5d7e83b-00ce-4523-bf11-20a782c1cfda"] +Cell[21555, 663, 350, 10, 69, "Input",ExpressionUUID->"0da75f14-aa91-42a8-82cd-d8bcad1418c0"], +Cell[21908, 675, 332, 6, 54, "Output",ExpressionUUID->"eba91c38-781c-4063-9b96-e08212267260"] }, Open ]], Cell[CellGroupData[{ -Cell[21543, 660, 994, 26, 459, "Input",ExpressionUUID->"f71a4039-8bb2-40ac-9ec6-edf953190386"], -Cell[22540, 688, 289, 4, 59, "Output",ExpressionUUID->"987d16a5-125d-420a-88d8-52e2829fc176"] +Cell[22277, 686, 994, 26, 133, "Input",ExpressionUUID->"f71a4039-8bb2-40ac-9ec6-edf953190386"], +Cell[23274, 714, 315, 5, 54, "Output",ExpressionUUID->"edadf388-e3b3-4b86-8c3d-421dcd76c54d"] }, Open ]], Cell[CellGroupData[{ -Cell[22866, 697, 199, 3, 52, "Input",ExpressionUUID->"626823f4-43a5-45b5-98ea-61aa026fafe0"], -Cell[23068, 702, 271, 4, 59, "Output",ExpressionUUID->"80022cdf-b28d-43b5-8c1b-f42b64e684b2"] +Cell[23626, 724, 199, 3, 47, "Input",ExpressionUUID->"626823f4-43a5-45b5-98ea-61aa026fafe0"], +Cell[23828, 729, 297, 5, 54, "Output",ExpressionUUID->"ab96ffc6-c1b9-4a03-90f3-93cf8b86086f"] }, Open ]], Cell[CellGroupData[{ -Cell[23376, 711, 326, 5, 52, "Input",ExpressionUUID->"18219664-2cbd-4501-8696-958e5d97cefd"], -Cell[23705, 718, 250, 4, 59, "Output",ExpressionUUID->"65c3c7c9-1acb-41c4-b7aa-28442266c944"] +Cell[24162, 739, 326, 5, 47, "Input",ExpressionUUID->"18219664-2cbd-4501-8696-958e5d97cefd"], +Cell[24491, 746, 272, 4, 54, "Output",ExpressionUUID->"a165b895-a536-430b-9f6b-8238f7790854"] }, Open ]], -Cell[23970, 725, 173, 2, 73, "Input",ExpressionUUID->"8bcf809d-290e-4c39-b997-cf964d793a91"], +Cell[24778, 753, 173, 2, 47, "Input",ExpressionUUID->"8bcf809d-290e-4c39-b997-cf964d793a91"], Cell[CellGroupData[{ -Cell[24168, 731, 327, 5, 52, "Input",ExpressionUUID->"6e3cdb74-df73-4a1d-8e82-88437d1ea616"], -Cell[24498, 738, 257, 4, 59, "Output",ExpressionUUID->"8c1c74b2-34df-46b1-8998-59d05f5928c3"] +Cell[24976, 759, 327, 5, 47, "Input",ExpressionUUID->"6e3cdb74-df73-4a1d-8e82-88437d1ea616"], +Cell[25306, 766, 281, 4, 54, "Output",ExpressionUUID->"b707c338-05f7-47ba-a313-96317535186f"] }, Open ]], -Cell[24770, 745, 173, 2, 73, "Input",ExpressionUUID->"8249f1f4-164b-4115-8fed-cfd1a77085cf"], +Cell[25602, 773, 173, 2, 47, "Input",ExpressionUUID->"8249f1f4-164b-4115-8fed-cfd1a77085cf"], Cell[CellGroupData[{ -Cell[24968, 751, 329, 5, 52, "Input",ExpressionUUID->"a48c6937-60f6-4a07-8710-d09b65f7f005"], -Cell[25300, 758, 252, 4, 59, "Output",ExpressionUUID->"f696af0e-7376-4e24-ae0f-0b33366beb4a"] +Cell[25800, 779, 329, 5, 47, "Input",ExpressionUUID->"a48c6937-60f6-4a07-8710-d09b65f7f005"], +Cell[26132, 786, 274, 4, 54, "Output",ExpressionUUID->"74f86e41-f9e3-4503-b7e9-d36588ce48a3"] }, Open ]], -Cell[25567, 765, 173, 2, 73, "Input",ExpressionUUID->"b72af8de-1c16-46ab-bf24-d89fae50cf56"], +Cell[26421, 793, 173, 2, 47, "Input",ExpressionUUID->"b72af8de-1c16-46ab-bf24-d89fae50cf56"], Cell[CellGroupData[{ -Cell[25765, 771, 354, 5, 52, "Input",ExpressionUUID->"3fb5f3d6-cd7b-499f-8b07-0e9e7b090cbc"], -Cell[26122, 778, 254, 4, 59, "Output",ExpressionUUID->"822198f2-7d3e-4942-b28e-26bd1a6ad4bb"] +Cell[26619, 799, 354, 5, 47, "Input",ExpressionUUID->"3fb5f3d6-cd7b-499f-8b07-0e9e7b090cbc"], +Cell[26976, 806, 276, 4, 54, "Output",ExpressionUUID->"94ac32ab-293c-463e-a47d-7b8b3fd52945"] }, Open ]], -Cell[26391, 785, 171, 2, 73, "Input",ExpressionUUID->"8a7aefe7-d390-4b34-a849-2e82e2ed0427"], +Cell[27267, 813, 171, 2, 47, "Input",ExpressionUUID->"8a7aefe7-d390-4b34-a849-2e82e2ed0427"], Cell[CellGroupData[{ -Cell[26587, 791, 299, 5, 52, "Input",ExpressionUUID->"02a146ce-363f-45f5-98f7-684b8f667119"], -Cell[26889, 798, 251, 4, 59, "Output",ExpressionUUID->"d03d3926-2b96-423e-a160-479212485ea1"] +Cell[27463, 819, 299, 5, 47, "Input",ExpressionUUID->"02a146ce-363f-45f5-98f7-684b8f667119"], +Cell[27765, 826, 273, 4, 54, "Output",ExpressionUUID->"66f3761b-8780-4f8c-8986-ea967c841921"] }, Open ]], -Cell[27155, 805, 171, 2, 73, "Input",ExpressionUUID->"3239a0a2-8ec7-496c-80ff-bb069dff505c"], +Cell[28053, 833, 171, 2, 47, "Input",ExpressionUUID->"3239a0a2-8ec7-496c-80ff-bb069dff505c"], Cell[CellGroupData[{ -Cell[27351, 811, 303, 5, 52, "Input",ExpressionUUID->"96dc1617-59e7-4180-bb85-3e84d4bdcf0b"], -Cell[27657, 818, 255, 4, 59, "Output",ExpressionUUID->"6e7ff47c-ca8d-4d20-b867-4cf5ac8afe5f"] +Cell[28249, 839, 303, 5, 47, "Input",ExpressionUUID->"96dc1617-59e7-4180-bb85-3e84d4bdcf0b"], +Cell[28555, 846, 279, 4, 54, "Output",ExpressionUUID->"cfe79b63-f89d-425a-b7be-a4a7458cea34"] }, Open ]], -Cell[27927, 825, 173, 2, 73, "Input",ExpressionUUID->"1be7c961-ef24-4960-8009-5777bbc8bd23"], +Cell[28849, 853, 173, 2, 47, "Input",ExpressionUUID->"1be7c961-ef24-4960-8009-5777bbc8bd23"], Cell[CellGroupData[{ -Cell[28125, 831, 306, 5, 52, "Input",ExpressionUUID->"e0843e12-3c2d-4570-8e50-ecd458dccecd"], -Cell[28434, 838, 254, 4, 59, "Output",ExpressionUUID->"9ff93c4e-23c1-49cf-b3b9-aa7bd2be95b2"] +Cell[29047, 859, 306, 5, 47, "Input",ExpressionUUID->"e0843e12-3c2d-4570-8e50-ecd458dccecd"], +Cell[29356, 866, 278, 4, 54, "Output",ExpressionUUID->"ee616125-36fd-470f-ac7d-115081a68cd9"] }, Open ]], -Cell[28703, 845, 172, 2, 73, "Input",ExpressionUUID->"d0d4ff4e-97a6-4f9b-9b63-4f397ecd400c"], +Cell[29649, 873, 172, 2, 47, "Input",ExpressionUUID->"d0d4ff4e-97a6-4f9b-9b63-4f397ecd400c"], Cell[CellGroupData[{ -Cell[28900, 851, 275, 4, 52, "Input",ExpressionUUID->"156386f5-75f5-4bc1-a4f7-35f549004207"], -Cell[29178, 857, 252, 4, 59, "Output",ExpressionUUID->"e5534b50-a36d-4716-b90e-9d1bc207ccc3"] +Cell[29846, 879, 275, 4, 47, "Input",ExpressionUUID->"156386f5-75f5-4bc1-a4f7-35f549004207"], +Cell[30124, 885, 276, 4, 54, "Output",ExpressionUUID->"c5d1130c-6b1a-437b-8219-4929519b1741"] }, Open ]], -Cell[29445, 864, 175, 2, 73, "Input",ExpressionUUID->"ebfa35bf-a356-4939-bd96-1a9ec65af390"], +Cell[30415, 892, 175, 2, 47, "Input",ExpressionUUID->"ebfa35bf-a356-4939-bd96-1a9ec65af390"], Cell[CellGroupData[{ -Cell[29645, 870, 19809, 485, 6103, "Input",ExpressionUUID->"098dbe47-bb3c-4cce-86ac-cfadf9737172"], -Cell[49457, 1357, 289, 4, 59, "Output",ExpressionUUID->"3a18a05a-7d36-4f65-a8c2-5b86e5955cb9"] +Cell[30615, 898, 19809, 485, 2352, "Input",ExpressionUUID->"098dbe47-bb3c-4cce-86ac-cfadf9737172"], +Cell[50427, 1385, 315, 5, 54, "Output",ExpressionUUID->"4596213f-657f-4141-91f9-af9226ff98ee"] }, Open ]], Cell[CellGroupData[{ -Cell[49783, 1366, 19748, 489, 6152, "Input",ExpressionUUID->"42c026af-e9df-43c0-8953-cf50f4b1a6ed"], -Cell[69534, 1857, 293, 4, 59, "Output",ExpressionUUID->"fbdb1562-eb20-42de-af62-1003404da298"] +Cell[50779, 1395, 19748, 489, 2352, "Input",ExpressionUUID->"42c026af-e9df-43c0-8953-cf50f4b1a6ed"], +Cell[70530, 1886, 319, 5, 54, "Output",ExpressionUUID->"3f486017-ca1e-4452-9512-caf0604cd5e1"] }, Open ]], Cell[CellGroupData[{ -Cell[69864, 1866, 19748, 483, 6126, "Input",ExpressionUUID->"892e3d7a-c8a1-4996-941c-b985032d768e"], -Cell[89615, 2351, 302, 5, 59, "Output",ExpressionUUID->"2fc4431c-8e5b-4259-8436-f9bd7e780897"] +Cell[70886, 1896, 19748, 483, 2351, "Input",ExpressionUUID->"892e3d7a-c8a1-4996-941c-b985032d768e"], +Cell[90637, 2381, 328, 6, 54, "Output",ExpressionUUID->"65e5e4d6-a79c-448b-87ef-e1bfbc3a9fe6"] }, Open ]], Cell[CellGroupData[{ -Cell[89954, 2361, 22534, 553, 6975, "Input",ExpressionUUID->"b9566d6c-2b1e-4439-8079-565ed9af2d35"], -Cell[112491, 2916, 305, 5, 59, "Output",ExpressionUUID->"e299d0d0-3001-4a95-9311-637a7a6eb28c"] +Cell[91002, 2392, 22534, 553, 2617, "Input",ExpressionUUID->"b9566d6c-2b1e-4439-8079-565ed9af2d35"], +Cell[113539, 2947, 331, 6, 54, "Output",ExpressionUUID->"557d3c81-2c8f-4ba8-acad-0d4879909a42"] }, Open ]], Cell[CellGroupData[{ -Cell[112833, 2926, 22535, 553, 7037, "Input",ExpressionUUID->"be089085-39e9-4150-a0a4-ba60ce1d7fb1"], -Cell[135371, 3481, 310, 5, 59, "Output",ExpressionUUID->"f906fa8a-fc1f-4b22-841c-fd4c739d1553"] +Cell[113907, 2958, 22535, 553, 2617, "Input",ExpressionUUID->"be089085-39e9-4150-a0a4-ba60ce1d7fb1"], +Cell[136445, 3513, 336, 6, 54, "Output",ExpressionUUID->"cd7910ef-5dfc-42bf-bda4-ad3fbb7e2631"] }, Open ]], Cell[CellGroupData[{ -Cell[135718, 3491, 25491, 626, 7925, "Input",ExpressionUUID->"ee51dfad-ab97-4672-b8bb-6dfb7ad4fa09"], -Cell[161212, 4119, 302, 5, 59, "Output",ExpressionUUID->"c40f6db5-e25e-4c0c-bd4e-6478d62ecba7"] +Cell[136818, 3524, 25491, 626, 2919, "Input",ExpressionUUID->"ee51dfad-ab97-4672-b8bb-6dfb7ad4fa09"], +Cell[162312, 4152, 330, 6, 54, "Output",ExpressionUUID->"9e1702b9-3dd6-41c4-a9fb-47e11c3319e3"] }, Open ]], Cell[CellGroupData[{ -Cell[161551, 4129, 130, 2, 52, "Input",ExpressionUUID->"6bd3f940-bb94-434b-855b-2e9c4e9b76bd"], -Cell[161684, 4133, 271, 4, 59, "Output",ExpressionUUID->"df6d9ecc-0801-4375-8b35-37d27df296b0"] +Cell[162679, 4163, 130, 2, 47, "Input",ExpressionUUID->"6bd3f940-bb94-434b-855b-2e9c4e9b76bd"], +Cell[162812, 4167, 297, 5, 54, "Output",ExpressionUUID->"e86ed846-856a-474b-8566-8a26a5a0511c"] }, Open ]], Cell[CellGroupData[{ -Cell[161992, 4142, 130, 2, 52, "Input",ExpressionUUID->"42096a87-6a2b-46d6-be4c-8374fbc3912e"], -Cell[162125, 4146, 272, 4, 59, "Output",ExpressionUUID->"2f2952fc-54a0-4378-9556-9a82df82dedc"] +Cell[163146, 4177, 130, 2, 47, "Input",ExpressionUUID->"42096a87-6a2b-46d6-be4c-8374fbc3912e"], +Cell[163279, 4181, 298, 5, 54, "Output",ExpressionUUID->"6fe27167-5c08-4209-aeec-c9f435b7cd76"] }, Open ]], Cell[CellGroupData[{ -Cell[162434, 4155, 1144, 39, 581, "Input",ExpressionUUID->"5b897118-7053-4da0-83c6-ee759993d8ae"], -Cell[163581, 4196, 284, 4, 59, "Output",ExpressionUUID->"b9faac28-29de-4d9d-a2e9-24bb071b5403"] +Cell[163614, 4191, 1144, 39, 91, "Input",ExpressionUUID->"5b897118-7053-4da0-83c6-ee759993d8ae"], +Cell[164761, 4232, 312, 5, 54, "Output",ExpressionUUID->"e0093824-de42-4f0f-831d-dce5c58dcafd"] }, Open ]], Cell[CellGroupData[{ -Cell[163902, 4205, 1041, 35, 578, "Input",ExpressionUUID->"bfaf0e40-1db9-4406-8fb4-119adbb43a55"], -Cell[164946, 4242, 306, 5, 59, "Output",ExpressionUUID->"8f265979-08bb-46d9-996e-46373b9ca35c"] +Cell[165110, 4242, 1041, 35, 154, "Input",ExpressionUUID->"bfaf0e40-1db9-4406-8fb4-119adbb43a55"], +Cell[166154, 4279, 334, 6, 54, "Output",ExpressionUUID->"dd4199f0-73e1-4b51-9168-4e5c0d26014c"] }, Open ]], Cell[CellGroupData[{ -Cell[165289, 4252, 1144, 39, 581, "Input",ExpressionUUID->"f816aee8-0ea6-4571-8219-cae0761d601c"], -Cell[166436, 4293, 288, 4, 59, "Output",ExpressionUUID->"fd430dce-d127-4df7-8d18-ada9b1f42400"] +Cell[166525, 4290, 1144, 39, 91, "Input",ExpressionUUID->"f816aee8-0ea6-4571-8219-cae0761d601c"], +Cell[167672, 4331, 316, 5, 54, "Output",ExpressionUUID->"df3e6420-202c-4928-9564-751e95427899"] }, Open ]], Cell[CellGroupData[{ -Cell[166761, 4302, 108, 1, 52, "Input",ExpressionUUID->"3c600905-d23c-4f5b-9236-c67229e17070"], -Cell[166872, 4305, 286, 4, 59, "Output",ExpressionUUID->"7e665a03-e5dd-4d1b-b3c7-d12c8aabdb47"] +Cell[168025, 4341, 108, 1, 47, "Input",ExpressionUUID->"3c600905-d23c-4f5b-9236-c67229e17070"], +Cell[168136, 4344, 312, 5, 54, "Output",ExpressionUUID->"adbb61de-0b8a-4f09-ac88-cb963f782354"] }, Open ]], Cell[CellGroupData[{ -Cell[167195, 4314, 108, 1, 52, "Input",ExpressionUUID->"aab7b393-bb56-42d8-8c37-1178b6ec3d13"], -Cell[167306, 4317, 308, 5, 59, "Output",ExpressionUUID->"3c53c2fa-10e8-49dc-bf07-639b76e8e996"] +Cell[168485, 4354, 108, 1, 47, "Input",ExpressionUUID->"aab7b393-bb56-42d8-8c37-1178b6ec3d13"], +Cell[168596, 4357, 334, 6, 54, "Output",ExpressionUUID->"c2cae2fa-4b9d-47de-8020-2dd69d93a378"] }, Open ]], Cell[CellGroupData[{ -Cell[167651, 4327, 108, 1, 52, "Input",ExpressionUUID->"3e5c6b15-0b6e-4230-b57b-8757eeafc2e3"], -Cell[167762, 4330, 305, 5, 59, "Output",ExpressionUUID->"db7aac0b-4d27-4cb2-a868-cf2b3017df41"] +Cell[168967, 4368, 108, 1, 47, "Input",ExpressionUUID->"3e5c6b15-0b6e-4230-b57b-8757eeafc2e3"], +Cell[169078, 4371, 331, 6, 54, "Output",ExpressionUUID->"6476b6d8-4431-43f5-889f-10daf426631a"] }, Open ]], Cell[CellGroupData[{ -Cell[168104, 4340, 108, 1, 52, "Input",ExpressionUUID->"e0809b5b-01ee-44eb-9bcf-dbb5c6c1e7dd"], -Cell[168215, 4343, 290, 4, 59, "Output",ExpressionUUID->"c4fa88e5-dcd6-4f89-aadb-8b6fe0170664"] +Cell[169446, 4382, 108, 1, 47, "Input",ExpressionUUID->"e0809b5b-01ee-44eb-9bcf-dbb5c6c1e7dd"], +Cell[169557, 4385, 318, 5, 54, "Output",ExpressionUUID->"070fdcd7-3ef9-4def-abde-2958efb31a5b"] }, Open ]], Cell[CellGroupData[{ -Cell[168542, 4352, 107, 1, 52, "Input",ExpressionUUID->"86240aba-5dcd-48e6-88b9-f87b96559ecf"], -Cell[168652, 4355, 292, 4, 59, "Output",ExpressionUUID->"4d05cf70-54d2-4fd4-835e-ecffb1194531"] +Cell[169912, 4395, 107, 1, 47, "Input",ExpressionUUID->"86240aba-5dcd-48e6-88b9-f87b96559ecf"], +Cell[170022, 4398, 318, 5, 54, "Output",ExpressionUUID->"9b47f781-c565-4567-8972-2b59e27a256a"] }, Open ]], Cell[CellGroupData[{ -Cell[168981, 4364, 107, 1, 52, "Input",ExpressionUUID->"0d7172e5-955a-450d-b837-2c9cd9d2056b"], -Cell[169091, 4367, 288, 4, 59, "Output",ExpressionUUID->"046dd38a-0f3c-4ff2-ace3-d1b7172fbf23"] +Cell[170377, 4408, 107, 1, 47, "Input",ExpressionUUID->"0d7172e5-955a-450d-b837-2c9cd9d2056b"], +Cell[170487, 4411, 314, 5, 54, "Output",ExpressionUUID->"aa67049f-1852-496d-9852-2b4201d6ab5a"] }, Open ]], Cell[CellGroupData[{ -Cell[169416, 4376, 497, 16, 170, "Input",ExpressionUUID->"ecbfd6e9-056f-4a02-8d38-ab9aecb9e8a8"], -Cell[169916, 4394, 306, 5, 59, "Output",ExpressionUUID->"0b9c76b1-2ef6-45e5-b0d2-7aa689b6906b"] +Cell[170838, 4421, 497, 16, 91, "Input",ExpressionUUID->"ecbfd6e9-056f-4a02-8d38-ab9aecb9e8a8"], +Cell[171338, 4439, 332, 6, 54, "Output",ExpressionUUID->"23386e1a-71ac-400d-a3fe-ca8d20d8b606"] }, Open ]], Cell[CellGroupData[{ -Cell[170259, 4404, 497, 16, 170, "Input",ExpressionUUID->"4d41eb40-b04a-4065-a59b-b513404e5be9"], -Cell[170759, 4422, 303, 5, 59, "Output",ExpressionUUID->"4ba94c8b-1edc-4ad6-b2de-26b1710ab941"] +Cell[171707, 4450, 497, 16, 91, "Input",ExpressionUUID->"4d41eb40-b04a-4065-a59b-b513404e5be9"], +Cell[172207, 4468, 329, 6, 54, "Output",ExpressionUUID->"1fb7154b-32f3-40e9-bea9-1954942ab885"] }, Open ]], Cell[CellGroupData[{ -Cell[171099, 4432, 1788, 60, 850, "Input",ExpressionUUID->"009fdf0b-21d4-4bb5-8cee-4e5437ff741f"], -Cell[172890, 4494, 287, 4, 59, "Output",ExpressionUUID->"c254c0c7-fd30-4db3-be7e-c4f4456d3c64"] +Cell[172573, 4479, 1788, 60, 217, "Input",ExpressionUUID->"009fdf0b-21d4-4bb5-8cee-4e5437ff741f"], +Cell[174364, 4541, 313, 5, 54, "Output",ExpressionUUID->"12aa871d-9ca6-4a87-ae94-5ab9615c9cc0"] }, Open ]], Cell[CellGroupData[{ -Cell[173214, 4503, 1101, 36, 617, "Input",ExpressionUUID->"76c2f253-1be6-4c66-9710-57d486131ca1"], -Cell[174318, 4541, 308, 5, 59, "Output",ExpressionUUID->"1ce0a5ee-d6cb-4072-9d62-f34f70b317f6"] +Cell[174714, 4551, 1101, 36, 217, "Input",ExpressionUUID->"76c2f253-1be6-4c66-9710-57d486131ca1"], +Cell[175818, 4589, 334, 6, 54, "Output",ExpressionUUID->"fe49c2de-64a5-46c1-bf21-c27f1ae9964b"] }, Open ]], Cell[CellGroupData[{ -Cell[174663, 4551, 1818, 61, 850, "Input",ExpressionUUID->"8226ff0a-a57a-4a3b-855f-d15f3ea97af5"], -Cell[176484, 4614, 285, 4, 59, "Output",ExpressionUUID->"20f05eb1-acf3-4f8d-90e5-9623763d342c"] +Cell[176189, 4600, 1818, 61, 179, "Input",ExpressionUUID->"8226ff0a-a57a-4a3b-855f-d15f3ea97af5"], +Cell[178010, 4663, 311, 5, 54, "Output",ExpressionUUID->"2863ff51-6456-457f-b8fd-f0f2fec3059d"] }, Open ]], Cell[CellGroupData[{ -Cell[176806, 4623, 1710, 55, 597, "Input",ExpressionUUID->"28f4804a-f01b-4247-9d09-85cb978be55a"], -Cell[178519, 4680, 291, 4, 59, "Output",ExpressionUUID->"ba616d5b-5ceb-4f2e-a7cf-330b106c3d4d"] +Cell[178358, 4673, 1710, 55, 222, "Input",ExpressionUUID->"28f4804a-f01b-4247-9d09-85cb978be55a"], +Cell[180071, 4730, 317, 5, 54, "Output",ExpressionUUID->"3d4e077b-753f-4be3-af21-b8c712d62b85"] }, Open ]], Cell[CellGroupData[{ -Cell[178847, 4689, 1631, 53, 464, "Input",ExpressionUUID->"db7056d3-bb58-471a-b774-b87da1b63e78"], -Cell[180481, 4744, 290, 4, 59, "Output",ExpressionUUID->"dad1fb57-eb9a-41a0-a6c6-df4a30dbb003"] +Cell[180425, 4740, 1631, 53, 130, "Input",ExpressionUUID->"db7056d3-bb58-471a-b774-b87da1b63e78"], +Cell[182059, 4795, 316, 5, 54, "Output",ExpressionUUID->"0a22e1ce-6dec-416e-9f6c-dc2a5648da34"] }, Open ]], Cell[CellGroupData[{ -Cell[180808, 4753, 201, 3, 52, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], -Cell[181012, 4758, 156, 2, 59, "Output",ExpressionUUID->"3cdd4ecc-0254-4edc-825b-cc30af281abe"] +Cell[182412, 4805, 201, 3, 47, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], +Cell[182616, 4810, 180, 2, 54, "Output",ExpressionUUID->"af0e570a-2419-429e-bb34-326035aff1d1"] }, Open ]], -Cell[181183, 4763, 173, 2, 52, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], +Cell[182811, 4815, 173, 2, 47, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], Cell[CellGroupData[{ -Cell[181381, 4769, 248, 5, 52, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], -Cell[181632, 4776, 178, 3, 59, "Output",ExpressionUUID->"61cfed40-e997-47a8-8f8b-543cc5e1fedf"] +Cell[183009, 4821, 252, 4, 47, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], +Cell[183264, 4827, 177, 2, 54, "Output",ExpressionUUID->"741b973d-644a-40f8-9d03-18a7abb7ca61"] }, Open ]], -Cell[181825, 4782, 173, 2, 52, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], +Cell[183456, 4832, 173, 2, 47, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[182023, 4788, 1297, 42, 244, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[183323, 4832, 197, 2, 59, "Output",ExpressionUUID->"a6766189-32c2-4eb6-ad1b-e2a63cd87dc7"] +Cell[183654, 4838, 1297, 42, 79, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], +Cell[184954, 4882, 222, 3, 54, "Output",ExpressionUUID->"9e753c34-34c1-4b95-a725-fc7fd13f5400"] }, Open ]], Cell[CellGroupData[{ -Cell[183557, 4839, 927, 30, 241, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[184487, 4871, 196, 2, 59, "Output",ExpressionUUID->"508d530f-05d1-449d-af8f-cc04be47f8c7"] +Cell[185213, 4890, 927, 30, 91, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], +Cell[186143, 4922, 223, 3, 54, "Output",ExpressionUUID->"96a45ea7-d8d9-4eae-84b1-e2ecaf4cb946"] }, Open ]], Cell[CellGroupData[{ -Cell[184720, 4878, 908, 29, 241, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[185631, 4909, 218, 3, 59, "Output",ExpressionUUID->"82f493a3-1030-43eb-beef-23f47d30fc0e"] +Cell[186403, 4930, 908, 29, 91, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], +Cell[187314, 4961, 223, 3, 54, "Output",ExpressionUUID->"d06ea0b3-6748-4b03-9d92-a8a5d7bbb74e"] }, Open ]], Cell[CellGroupData[{ -Cell[185886, 4917, 554, 18, 93, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[186443, 4937, 328, 6, 82, "Output",ExpressionUUID->"452ab8f1-139e-467e-b1c2-23a3efc605dc"] +Cell[187574, 4969, 554, 18, 85, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], +Cell[188131, 4989, 216, 3, 54, "Output",ExpressionUUID->"8794016a-ffd8-48b3-bac1-e9f3eb7120dd"] }, Open ]], Cell[CellGroupData[{ -Cell[186808, 4948, 647, 21, 163, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[187458, 4971, 456, 9, 140, "Output",ExpressionUUID->"62f358d6-3654-4015-8c3e-6608f325c5c7"] +Cell[188384, 4997, 647, 21, 85, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], +Cell[189034, 5020, 213, 3, 54, "Output",ExpressionUUID->"866c9251-02e6-42fa-bdbf-793fe22e1375"] }, Open ]], Cell[CellGroupData[{ -Cell[187951, 4985, 166, 4, 98, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[188120, 4991, 345, 7, 133, "Output",ExpressionUUID->"f9031242-0a9e-43e5-b3b6-acf3f7e37dfb"] +Cell[189284, 5028, 166, 4, 91, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], +Cell[189453, 5034, 216, 3, 54, "Output",ExpressionUUID->"7d5fc4f4-f245-4643-b556-70a540b1bd67"] }, Open ]], Cell[CellGroupData[{ -Cell[188502, 5003, 166, 4, 97, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[188671, 5009, 609, 15, 181, "Output",ExpressionUUID->"490578d9-e33d-40f1-a4be-419dc40fa4c6"] +Cell[189706, 5042, 166, 4, 89, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], +Cell[189875, 5048, 217, 3, 54, "Output",ExpressionUUID->"1d8ca7e3-e9b5-453b-81cd-fac2fb1587a4"] }, Open ]], Cell[CellGroupData[{ -Cell[189317, 5029, 177, 4, 77, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[189497, 5035, 858, 21, 262, "Output",ExpressionUUID->"3e705fd2-b9a4-42f4-8102-0d64ff5cbe1e"] +Cell[190129, 5056, 177, 4, 70, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], +Cell[190309, 5062, 213, 3, 54, "Output",ExpressionUUID->"2820dfd4-4c0f-42b6-b2e3-b70e1caac307"] }, Open ]], Cell[CellGroupData[{ -Cell[190392, 5061, 177, 4, 77, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[190572, 5067, 471, 10, 107, "Output",ExpressionUUID->"b6c6e5a8-2be5-46ed-972f-e7921d6f7da2"] +Cell[190559, 5070, 177, 4, 70, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], +Cell[190739, 5076, 215, 3, 54, "Output",ExpressionUUID->"9aa31804-e87b-470b-9fb2-af3dd88f42a1"] }, Open ]], Cell[CellGroupData[{ -Cell[191080, 5082, 6051, 184, 1957, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[197134, 5268, 1779, 47, 796, "Output",ExpressionUUID->"e0312a76-7bba-4a5b-a8b5-1e07a2a24b2b"] +Cell[190991, 5084, 6051, 184, 616, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], +Cell[197045, 5270, 220, 3, 54, "Output",ExpressionUUID->"1ee54fbb-e65d-433e-93e6-07c5774eb8f5"] }, Open ]], Cell[CellGroupData[{ -Cell[198950, 5320, 364, 8, 75, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[199317, 5330, 12070, 247, 2783, "Output",ExpressionUUID->"3784ccc0-8df8-40b4-868c-96283e8eed01"] +Cell[197302, 5278, 364, 8, 68, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], +Cell[197669, 5288, 217, 3, 54, "Output",ExpressionUUID->"67824216-6027-4064-bd85-554880337133"] }, Open ]], Cell[CellGroupData[{ -Cell[211424, 5582, 6118, 186, 1865, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[217545, 5770, 1810, 47, 784, "Output",ExpressionUUID->"06044e5d-7ba0-4a8b-bf9d-300a60982fdc"] +Cell[197923, 5296, 6118, 186, 701, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], +Cell[204044, 5484, 219, 3, 54, "Output",ExpressionUUID->"c828d25a-aef3-4336-b567-393a557a3054"] }, Open ]], Cell[CellGroupData[{ -Cell[219392, 5822, 364, 8, 75, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[219759, 5832, 11209, 226, 2566, "Output",ExpressionUUID->"6537e137-20f7-4823-beab-2cbc71db42ac"] +Cell[204300, 5492, 364, 8, 68, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], +Cell[204667, 5502, 216, 3, 54, "Output",ExpressionUUID->"eb7aed9c-840a-4d37-91ff-ac8923b17d09"] }, Open ]], Cell[CellGroupData[{ -Cell[231005, 6063, 2659, 87, 804, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[233667, 6152, 329, 6, 82, "Output",ExpressionUUID->"059ce4e7-8334-4422-a214-5ec1836337ea"] +Cell[204920, 5510, 2659, 87, 266, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], +Cell[207582, 5599, 215, 3, 54, "Output",ExpressionUUID->"5d3a9f30-e842-4e02-9571-3cfa503cf6df"] }, Open ]], Cell[CellGroupData[{ -Cell[234033, 6163, 2599, 84, 804, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[236635, 6249, 307, 5, 82, "Output",ExpressionUUID->"6606a7bb-8510-4ab0-81dc-b22e9f063ef3"] +Cell[207834, 5607, 2599, 84, 266, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], +Cell[210436, 5693, 216, 3, 54, "Output",ExpressionUUID->"edfca05d-e9b5-4a6b-af5b-c87c1a421683"] }, Open ]], Cell[CellGroupData[{ -Cell[236979, 6259, 3708, 117, 1253, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[240690, 6378, 384, 8, 92, "Output",ExpressionUUID->"520a62d6-80de-4c85-91e6-40ee9a38270e"] +Cell[210689, 5701, 3708, 117, 393, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], +Cell[214400, 5820, 216, 3, 54, "Output",ExpressionUUID->"8e4dfd4d-2166-4ed7-8e07-98cdc30626a6"] }, Open ]], -Cell[241089, 6389, 160, 3, 126, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], +Cell[214631, 5826, 160, 3, 47, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ -Cell[241274, 6396, 2209, 61, 594, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], -Cell[243486, 6459, 559, 12, 206, "Message",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], -Cell[244048, 6473, 560, 12, 206, "Message",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], -Cell[244611, 6487, 565, 12, 206, "Message",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], -Cell[245179, 6501, 456, 10, 77, "Message",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], -Cell[245638, 6513, 170, 3, 59, "Output",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[214816, 5833, 2209, 61, 242, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], +Cell[217028, 5896, 587, 13, 94, "Message",ExpressionUUID->"849ec881-1e9a-4842-bf47-8768b0b52554"], +Cell[217618, 5911, 592, 13, 94, "Message",ExpressionUUID->"dc001830-b5fb-4377-b907-f6b0eacfceba"], +Cell[218213, 5926, 595, 13, 94, "Message",ExpressionUUID->"d9261fd7-8134-4e4a-a08a-522ae3e8f1c8"], +Cell[218811, 5941, 493, 11, 42, "Message",ExpressionUUID->"78a59107-fb59-4505-b390-f5c588b3b3ca"], +Cell[219307, 5954, 187, 2, 54, "Output",ExpressionUUID->"e822c059-c388-473d-b41d-521228ff7372"] }, Open ]], Cell[CellGroupData[{ -Cell[245845, 6521, 2054, 59, 594, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], -Cell[247902, 6582, 559, 12, 126, "Message",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], -Cell[248464, 6596, 559, 12, 126, "Message",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], -Cell[249026, 6610, 565, 12, 126, "Message",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], -Cell[249594, 6624, 458, 10, 126, "Message",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], -Cell[250055, 6636, 170, 3, 126, "Output",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[219531, 5961, 2073, 58, 148, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], +Cell[221607, 6021, 588, 13, 94, "Message",ExpressionUUID->"e17091f0-7674-4dcb-935b-9687c3efc0c0"], +Cell[222198, 6036, 592, 13, 94, "Message",ExpressionUUID->"ca158417-3429-4550-8ae8-73324f6f7f47"], +Cell[222793, 6051, 595, 13, 94, "Message",ExpressionUUID->"829c19a4-28a1-46ac-85de-25e44249ea06"], +Cell[223391, 6066, 492, 11, 42, "Message",ExpressionUUID->"9d9c10cc-2343-4c6f-927c-d8be07aa6533"], +Cell[223886, 6079, 188, 2, 54, "Output",ExpressionUUID->"5d5ec438-f37e-41c5-ad0c-4fe07f391e73"] }, Open ]], Cell[CellGroupData[{ -Cell[250262, 6644, 1938, 53, 126, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], -Cell[252203, 6699, 20196, 379, 126, "Output",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] +Cell[224111, 6086, 1957, 52, 111, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], +Cell[226071, 6140, 20405, 382, 378, "Output",ExpressionUUID->"0988a80d-3378-47c2-827c-3c216632343d"] }, Open ]], Cell[CellGroupData[{ -Cell[272436, 7083, 2094, 60, 698, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], -Cell[274533, 7145, 503, 11, 176, "Message",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], -Cell[275039, 7158, 505, 11, 176, "Message",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], -Cell[275547, 7171, 506, 11, 176, "Message",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], -Cell[276056, 7184, 455, 10, 77, "Message",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], -Cell[276514, 7196, 55770, 961, 320, "Output",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] +Cell[246513, 6527, 2113, 59, 204, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], +Cell[248629, 6588, 534, 12, 64, "Message",ExpressionUUID->"1de818c0-9064-40d7-8431-46adcda332c0"], +Cell[249166, 6602, 538, 12, 64, "Message",ExpressionUUID->"79e0a43f-d5d5-406c-a514-6f498cc0f961"], +Cell[249707, 6616, 542, 12, 64, "Message",ExpressionUUID->"5e4541e1-f657-48c8-b62b-d2b135f773d7"], +Cell[250252, 6630, 494, 11, 42, "Message",ExpressionUUID->"9d4495c4-d094-40ca-a23d-dd7f890cd4af"], +Cell[250749, 6643, 34348, 611, 386, "Output",ExpressionUUID->"c478ee92-46bf-45fe-b78d-cf9262d28a40"] }, Open ]], -Cell[332299, 8160, 2455, 69, 637, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], -Cell[334757, 8231, 209, 5, 52, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], Cell[CellGroupData[{ -Cell[334991, 8240, 217, 7, 85, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[335211, 8249, 173, 3, 59, "Output",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[285134, 7259, 2477, 69, 212, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], +Cell[287614, 7330, 9492, 222, 388, "Output",ExpressionUUID->"6ebcfe82-ad06-4fea-a5b2-7dae575b1738"] }, Open ]], Cell[CellGroupData[{ -Cell[335421, 8257, 1814, 53, 643, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], -Cell[337238, 8312, 506, 11, 126, "Message",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], -Cell[337747, 8325, 508, 11, 126, "Message",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], -Cell[338258, 8338, 509, 11, 126, "Message",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], -Cell[338770, 8351, 458, 10, 126, "Message",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], -Cell[339231, 8363, 24818, 454, 126, "Output",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] +Cell[297143, 7557, 228, 4, 47, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], +Cell[297374, 7563, 40711, 743, 386, "Output",ExpressionUUID->"6db2a28f-86c2-4803-b2c8-b89139bbacee"] }, Open ]], Cell[CellGroupData[{ -Cell[364086, 8822, 1616, 48, 126, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], -Cell[365705, 8872, 582, 12, 126, "Message",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], -Cell[366290, 8886, 588, 12, 126, "Message",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], -Cell[366881, 8900, 590, 12, 126, "Message",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], -Cell[367474, 8914, 458, 10, 126, "Message",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], -Cell[367935, 8926, 171, 3, 126, "Output",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] +Cell[338122, 8311, 236, 6, 78, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], +Cell[338361, 8319, 190, 2, 54, "Output",ExpressionUUID->"a82e7a06-020b-44f5-ad45-fad788dba838"] }, Open ]], Cell[CellGroupData[{ -Cell[368143, 8934, 2251, 64, 126, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], -Cell[370397, 9000, 557, 12, 126, "Message",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], -Cell[370957, 9014, 560, 12, 126, "Message",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], -Cell[371520, 9028, 565, 12, 126, "Message",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], -Cell[372088, 9042, 458, 10, 126, "Message",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], -Cell[372549, 9054, 172, 3, 126, "Output",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] +Cell[338588, 8326, 1833, 52, 148, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], +Cell[340424, 8380, 550, 12, 94, "Message",ExpressionUUID->"d682b4bc-1203-416f-bf14-a1e34fb11551"], +Cell[340977, 8394, 553, 12, 94, "Message",ExpressionUUID->"09ed3f23-74b7-445c-9f4e-569be0538752"], +Cell[341533, 8408, 556, 12, 94, "Message",ExpressionUUID->"f4857fd2-e3c4-4601-ac35-e5522d693ce9"], +Cell[342092, 8422, 494, 11, 42, "Message",ExpressionUUID->"ccf12e6d-d6a6-4bb1-9417-599b0cc7e25f"], +Cell[342589, 8435, 31567, 563, 378, "Output",ExpressionUUID->"2e0d6e42-9f45-4051-a53f-bf8084dca349"] }, Open ]], Cell[CellGroupData[{ -Cell[372758, 9062, 2218, 64, 126, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], -Cell[374979, 9128, 559, 12, 126, "Message",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], -Cell[375541, 9142, 562, 12, 126, "Message",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], -Cell[376106, 9156, 563, 12, 126, "Message",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], -Cell[376672, 9170, 458, 10, 126, "Message",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], -Cell[377133, 9182, 170, 3, 126, "Output",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] +Cell[374193, 9003, 1616, 48, 110, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], +Cell[375812, 9053, 694, 14, 94, "Message",ExpressionUUID->"2ab3bdea-208e-4de3-9334-b8cc7008a7f9"], +Cell[376509, 9069, 694, 14, 94, "Message",ExpressionUUID->"6436b2a2-ea65-44a2-b080-0d65c6d8e791"], +Cell[377206, 9085, 694, 14, 94, "Message",ExpressionUUID->"013f91a9-d653-42dd-930e-eddb328b81cd"], +Cell[377903, 9101, 494, 11, 42, "Message",ExpressionUUID->"a8aaa43e-9160-4051-a5c6-4bb649ffbf66"], +Cell[378400, 9114, 192, 3, 54, "Output",ExpressionUUID->"3f0d51b9-52a6-4606-9a9f-8e595c80b719"] }, Open ]], Cell[CellGroupData[{ -Cell[377340, 9190, 2221, 64, 126, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], -Cell[379564, 9256, 559, 12, 126, "Message",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], -Cell[380126, 9270, 562, 12, 126, "Message",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], -Cell[380691, 9284, 563, 12, 126, "Message",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], -Cell[381257, 9298, 458, 10, 126, "Message",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], -Cell[381718, 9310, 171, 3, 126, "Output",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] +Cell[378629, 9122, 2274, 64, 242, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], +Cell[380906, 9188, 589, 13, 94, "Message",ExpressionUUID->"331dc5eb-70b7-415c-97a8-e14017190f52"], +Cell[381498, 9203, 593, 13, 94, "Message",ExpressionUUID->"11f4f747-f465-482d-8a98-ec51f5c476ce"], +Cell[382094, 9218, 598, 13, 94, "Message",ExpressionUUID->"5965d8de-1f79-4266-8f15-bb4f350c8f1d"], +Cell[382695, 9233, 494, 11, 42, "Message",ExpressionUUID->"b88e950c-b516-458f-9add-b8ba687f7432"], +Cell[383192, 9246, 195, 3, 54, "Output",ExpressionUUID->"6e3027b6-2aa4-4714-840d-a21350ec50b8"] }, Open ]], Cell[CellGroupData[{ -Cell[381926, 9318, 213, 6, 126, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], -Cell[382142, 9326, 173, 3, 126, "Output",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] +Cell[383424, 9254, 2230, 63, 242, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], +Cell[385657, 9319, 591, 13, 94, "Message",ExpressionUUID->"b0c4ea83-3393-43db-aae1-2784ab3fd6c9"], +Cell[386251, 9334, 595, 13, 94, "Message",ExpressionUUID->"da049c93-d11a-45be-bd8f-f0b7b725046e"], +Cell[386849, 9349, 600, 13, 94, "Message",ExpressionUUID->"b2036a51-dc31-417b-8f13-faf3f9349356"], +Cell[387452, 9364, 496, 11, 42, "Message",ExpressionUUID->"81fbfae6-f724-4880-ac72-0a1cddeee7dd"], +Cell[387951, 9377, 194, 3, 54, "Output",ExpressionUUID->"5651e8e2-afe5-413b-bfa4-84bb1e342d08"] }, Open ]], -Cell[382330, 9332, 245, 5, 126, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[382600, 9341, 558, 19, 126, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[383161, 9362, 170, 3, 126, "Output",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] +Cell[388182, 9385, 2233, 63, 242, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], +Cell[390418, 9450, 591, 13, 94, "Message",ExpressionUUID->"a8fe2386-5c97-4121-a48b-5841605f050d"], +Cell[391012, 9465, 597, 13, 94, "Message",ExpressionUUID->"1ec5ffe5-80a9-42ab-b92a-26fc169bf5fd"], +Cell[391612, 9480, 598, 13, 94, "Message",ExpressionUUID->"0f004897-3ac5-4cc7-8933-b67449d9982c"], +Cell[392213, 9495, 496, 11, 42, "Message",ExpressionUUID->"b31d2bd4-cc60-41b3-a39d-89f535a428fd"], +Cell[392712, 9508, 192, 3, 54, "Output",ExpressionUUID->"09e9d68c-a1d0-4eda-aaca-6476b2556dea"] }, Open ]], Cell[CellGroupData[{ -Cell[383368, 9370, 170, 5, 126, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[383541, 9377, 173, 3, 126, "Output",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] +Cell[392941, 9516, 236, 6, 76, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], +Cell[393180, 9524, 196, 3, 54, "Output",ExpressionUUID->"e4593657-96dc-4e77-a736-fd659d25882a"] }, Open ]], +Cell[393391, 9530, 271, 6, 47, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[383751, 9385, 181, 5, 126, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[383935, 9392, 171, 3, 126, "Output",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] +Cell[393687, 9540, 558, 19, 85, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], +Cell[394248, 9561, 192, 3, 54, "Output",ExpressionUUID->"b1094f66-ba44-45cd-b249-c691cb27a0a4"] }, Open ]], Cell[CellGroupData[{ -Cell[384143, 9400, 6055, 185, 126, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[390201, 9587, 172, 3, 126, "Output",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] +Cell[394477, 9569, 170, 5, 91, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], +Cell[394650, 9576, 195, 3, 54, "Output",ExpressionUUID->"ee651c3b-4804-4352-8a2b-a6bf5f745a64"] }, Open ]], Cell[CellGroupData[{ -Cell[390410, 9595, 368, 9, 126, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[390781, 9606, 172, 3, 126, "Output",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] +Cell[394882, 9584, 181, 5, 70, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], +Cell[395066, 9591, 192, 3, 54, "Output",ExpressionUUID->"c671c4b9-e274-4e75-9930-2466384db40f"] }, Open ]], Cell[CellGroupData[{ -Cell[390990, 9614, 6122, 187, 126, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[397115, 9803, 173, 3, 126, "Output",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] +Cell[395295, 9599, 6055, 185, 616, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], +Cell[401353, 9786, 197, 3, 54, "Output",ExpressionUUID->"dc4ad591-7faf-4e9e-a95b-4324dffac2f3"] }, Open ]], Cell[CellGroupData[{ -Cell[397325, 9811, 368, 9, 126, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[397696, 9822, 170, 3, 126, "Output",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] +Cell[401587, 9794, 368, 9, 68, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], +Cell[401958, 9805, 193, 3, 54, "Output",ExpressionUUID->"d59eda15-d961-4d8e-9509-8c1851c4ec1c"] }, Open ]], Cell[CellGroupData[{ -Cell[397903, 9830, 2663, 88, 126, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[400569, 9920, 171, 3, 126, "Output",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] +Cell[402188, 9813, 6122, 187, 701, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], +Cell[408313, 10002, 194, 3, 54, "Output",ExpressionUUID->"5b97c732-b2ec-4387-85e0-4ae479163aaf"] }, Open ]], Cell[CellGroupData[{ -Cell[400777, 9928, 2603, 85, 126, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[403383, 10015, 173, 3, 126, "Output",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] +Cell[408544, 10010, 368, 9, 68, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], +Cell[408915, 10021, 193, 3, 54, "Output",ExpressionUUID->"686beb38-d95f-4734-923c-313682ede43e"] }, Open ]], Cell[CellGroupData[{ -Cell[403593, 10023, 3712, 118, 126, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[407308, 10143, 174, 3, 126, "Output",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] +Cell[409145, 10029, 2663, 88, 266, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], +Cell[411811, 10119, 194, 3, 54, "Output",ExpressionUUID->"d13e959c-10c7-40ca-8fba-5ed58f54e1b1"] }, Open ]], Cell[CellGroupData[{ -Cell[407519, 10151, 2049, 58, 126, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], -Cell[409571, 10211, 579, 12, 126, "Message",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], -Cell[410153, 10225, 582, 12, 126, "Message",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], -Cell[410738, 10239, 584, 12, 126, "Message",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], -Cell[411325, 10253, 458, 10, 126, "Message",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], -Cell[411786, 10265, 172, 3, 126, "Output",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] +Cell[412042, 10127, 2603, 85, 266, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], +Cell[414648, 10214, 197, 3, 54, "Output",ExpressionUUID->"59b4079e-664f-49bf-a9d8-fa84e5151a8f"] }, Open ]], Cell[CellGroupData[{ -Cell[411995, 10273, 2054, 59, 126, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], -Cell[414052, 10334, 577, 12, 126, "Message",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], -Cell[414632, 10348, 580, 12, 126, "Message",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], -Cell[415215, 10362, 583, 12, 126, "Message",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], -Cell[415801, 10376, 456, 10, 126, "Message",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], -Cell[416260, 10388, 171, 3, 126, "Output",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] +Cell[414882, 10222, 3712, 118, 393, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], +Cell[418597, 10342, 195, 3, 54, "Output",ExpressionUUID->"92d71c09-997e-4d92-abe5-dce720e194c6"] }, Open ]], Cell[CellGroupData[{ -Cell[416468, 10396, 2030, 55, 126, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], -Cell[418501, 10453, 20493, 384, 126, "Output",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] +Cell[418829, 10350, 2074, 59, 148, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], +Cell[420906, 10411, 696, 14, 94, "Message",ExpressionUUID->"7b083571-3b24-450c-a4f4-20a4f75e25e9"], +Cell[421605, 10427, 696, 14, 94, "Message",ExpressionUUID->"15722a0a-75f6-45bd-8ae3-3bd38813fba1"], +Cell[422304, 10443, 697, 14, 94, "Message",ExpressionUUID->"f9a573ea-2999-4483-b960-95466624ba3f"], +Cell[423004, 10459, 494, 11, 42, "Message",ExpressionUUID->"4a34a127-7cab-4a60-9b3f-5b042c4be8dc"], +Cell[423501, 10472, 194, 3, 54, "Output",ExpressionUUID->"b185cb1a-3938-4286-9f05-45d80accddfc"] }, Open ]], Cell[CellGroupData[{ -Cell[439031, 10842, 2120, 60, 126, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], -Cell[441154, 10904, 501, 11, 126, "Message",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], -Cell[441658, 10917, 504, 11, 126, "Message",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], -Cell[442165, 10930, 508, 11, 126, "Message",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], -Cell[442676, 10943, 456, 10, 126, "Message",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], -Cell[443135, 10955, 31462, 562, 126, "Output",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] +Cell[423732, 10480, 2077, 59, 148, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], +Cell[425812, 10541, 694, 14, 94, "Message",ExpressionUUID->"bc601bac-35ae-49c0-9796-76c737e31884"], +Cell[426509, 10557, 694, 14, 94, "Message",ExpressionUUID->"76e4c624-c0dd-45cb-9b5e-54bac08b6d9a"], +Cell[427206, 10573, 695, 14, 94, "Message",ExpressionUUID->"1f3f2fa6-dfab-44e9-b05c-87a7bc6f4e95"], +Cell[427904, 10589, 494, 11, 42, "Message",ExpressionUUID->"8200829d-3cf4-4d70-8420-ac466c38cd3f"], +Cell[428401, 10602, 193, 3, 54, "Output",ExpressionUUID->"099c299e-1b5f-4fb6-9bed-abcbef7d3cdb"] }, Open ]], -Cell[474612, 11520, 209, 5, 126, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], Cell[CellGroupData[{ -Cell[474846, 11529, 1616, 48, 126, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], -Cell[476465, 11579, 596, 12, 126, "Message",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], -Cell[477064, 11593, 602, 12, 126, "Message",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], -Cell[477669, 11607, 605, 12, 126, "Message",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], -Cell[478277, 11621, 458, 10, 126, "Message",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], -Cell[478738, 11633, 171, 3, 126, "Output",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] +Cell[428631, 10610, 2053, 55, 81, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], +Cell[430687, 10667, 20264, 381, 384, "Output",ExpressionUUID->"35e9d865-e063-4705-b00b-554ab91fa99b"] }, Open ]], Cell[CellGroupData[{ -Cell[478946, 11641, 2251, 64, 126, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], -Cell[481200, 11707, 577, 12, 126, "Message",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], -Cell[481780, 11721, 580, 12, 126, "Message",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], -Cell[482363, 11735, 586, 12, 126, "Message",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], -Cell[482952, 11749, 458, 10, 126, "Message",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], -Cell[483413, 11761, 173, 3, 126, "Output",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] +Cell[450988, 11053, 2143, 60, 204, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], +Cell[453134, 11115, 541, 12, 64, "Message",ExpressionUUID->"9d6d9519-bf0d-40c6-b5c4-42392ef64cf1"], +Cell[453678, 11129, 547, 12, 94, "Message",ExpressionUUID->"84589396-e48a-4353-963d-66a825c450ee"], +Cell[454228, 11143, 547, 12, 94, "Message",ExpressionUUID->"3c9781ed-3658-433d-99cb-cc71727ed007"], +Cell[454778, 11157, 494, 11, 42, "Message",ExpressionUUID->"1d86076f-6c02-46b6-bc28-2a4b9d8c3f57"], +Cell[455275, 11170, 34459, 612, 381, "Output",ExpressionUUID->"d3e8fbcb-deea-4f94-9c4e-60c66f8fadd6"] }, Open ]], Cell[CellGroupData[{ -Cell[483623, 11769, 2219, 64, 126, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], -Cell[485845, 11835, 579, 12, 126, "Message",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], -Cell[486427, 11849, 580, 12, 126, "Message",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], -Cell[487010, 11863, 586, 12, 126, "Message",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], -Cell[487599, 11877, 458, 10, 126, "Message",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], -Cell[488060, 11889, 171, 3, 126, "Output",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] +Cell[489771, 11787, 232, 5, 47, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], +Cell[490006, 11794, 40819, 744, 381, "Output",ExpressionUUID->"5d571f3d-f3a5-4b31-8e05-fcd0e1aea837"] }, Open ]], Cell[CellGroupData[{ -Cell[488268, 11897, 2219, 64, 126, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], -Cell[490490, 11963, 576, 12, 126, "Message",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], -Cell[491069, 11977, 580, 12, 126, "Message",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], -Cell[491652, 11991, 584, 12, 126, "Message",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], -Cell[492239, 12005, 458, 10, 126, "Message",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], -Cell[492700, 12017, 173, 3, 126, "Output",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] +Cell[530862, 12543, 1616, 48, 110, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], +Cell[532481, 12593, 697, 14, 94, "Message",ExpressionUUID->"9966bda9-7a51-48fe-82e4-d372b4bbc10a"], +Cell[533181, 12609, 696, 14, 94, "Message",ExpressionUUID->"93cddabd-590c-4d0a-b047-cd2d60d0deb7"], +Cell[533880, 12625, 695, 14, 94, "Message",ExpressionUUID->"70222a3c-aab3-4e86-804b-83fe829d3cff"], +Cell[534578, 12641, 494, 11, 42, "Message",ExpressionUUID->"a4380b7e-6409-4ff7-a79a-62aff43a1148"], +Cell[535075, 12654, 192, 3, 54, "Output",ExpressionUUID->"3ea148cc-efb2-4760-9609-47bc49c03317"] }, Open ]], Cell[CellGroupData[{ -Cell[492910, 12025, 212, 6, 126, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], -Cell[493125, 12033, 172, 3, 126, "Output",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] +Cell[535304, 12662, 2274, 64, 242, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], +Cell[537581, 12728, 696, 14, 94, "Message",ExpressionUUID->"1e0ecd04-b28d-45d3-9492-90737fb557f2"], +Cell[538280, 12744, 693, 14, 94, "Message",ExpressionUUID->"b24777d1-7449-4574-8462-0127a077c169"], +Cell[538976, 12760, 697, 14, 94, "Message",ExpressionUUID->"9c2d716c-c235-4fdd-ac38-909995236d6c"], +Cell[539676, 12776, 496, 11, 42, "Message",ExpressionUUID->"8b81e957-7003-45cb-872a-bffa66df5ec1"], +Cell[540175, 12789, 196, 3, 54, "Output",ExpressionUUID->"a6290de8-e7bb-4f59-81e5-0d40223e164a"] }, Open ]], -Cell[493312, 12039, 244, 5, 126, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[493581, 12048, 558, 19, 126, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[494142, 12069, 171, 3, 126, "Output",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] +Cell[540408, 12797, 2231, 63, 242, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], +Cell[542642, 12862, 696, 14, 94, "Message",ExpressionUUID->"6f9fe1a9-9713-41a7-997c-c2270c3d22ab"], +Cell[543341, 12878, 696, 14, 94, "Message",ExpressionUUID->"e50dae8f-f685-45cd-bac2-97417a7df1b6"], +Cell[544040, 12894, 699, 14, 94, "Message",ExpressionUUID->"1cd0b58f-d016-490e-88f9-573aba7d8b9a"], +Cell[544742, 12910, 496, 11, 42, "Message",ExpressionUUID->"4878c0c6-a2fd-4316-ac07-85a9cc889456"], +Cell[545241, 12923, 195, 3, 54, "Output",ExpressionUUID->"c37ba2e4-e0a7-4fed-a1c3-987b456ecac3"] }, Open ]], Cell[CellGroupData[{ -Cell[494350, 12077, 170, 5, 126, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[494523, 12084, 171, 3, 126, "Output",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] +Cell[545473, 12931, 2231, 63, 242, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], +Cell[547707, 12996, 693, 14, 94, "Message",ExpressionUUID->"67b70df9-42d2-4449-9c58-326cdc414715"], +Cell[548403, 13012, 693, 14, 94, "Message",ExpressionUUID->"10c5e8ee-5ce4-4618-b014-9338708cfc0a"], +Cell[549099, 13028, 694, 14, 94, "Message",ExpressionUUID->"97101a92-3720-438d-a550-91e3faae76ac"], +Cell[549796, 13044, 495, 11, 42, "Message",ExpressionUUID->"a10f44ed-7e4d-4bd7-bf9b-ca64a71072dd"], +Cell[550294, 13057, 195, 3, 54, "Output",ExpressionUUID->"9ab71817-4107-42f9-88fe-a9a652d84aa9"] }, Open ]], Cell[CellGroupData[{ -Cell[494731, 12092, 181, 5, 126, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[494915, 12099, 173, 3, 126, "Output",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] +Cell[550526, 13065, 235, 6, 76, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], +Cell[550764, 13073, 195, 3, 54, "Output",ExpressionUUID->"8f2527e1-6d98-4355-b133-dc93ccade311"] }, Open ]], +Cell[550974, 13079, 270, 6, 47, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[495125, 12107, 6055, 185, 126, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[501183, 12294, 173, 3, 126, "Output",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] +Cell[551269, 13089, 558, 19, 85, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], +Cell[551830, 13110, 193, 3, 54, "Output",ExpressionUUID->"0dfc1141-5bf6-41ed-acd1-2447d39f19e2"] }, Open ]], Cell[CellGroupData[{ -Cell[501393, 12302, 368, 9, 126, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[501764, 12313, 172, 3, 126, "Output",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] +Cell[552060, 13118, 170, 5, 91, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], +Cell[552233, 13125, 195, 3, 54, "Output",ExpressionUUID->"fe4df285-a7d2-4fd5-a4f8-68b41d8409a6"] }, Open ]], Cell[CellGroupData[{ -Cell[501973, 12321, 6122, 187, 126, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[508098, 12510, 173, 3, 126, "Output",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] +Cell[552465, 13133, 181, 5, 70, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], +Cell[552649, 13140, 193, 3, 54, "Output",ExpressionUUID->"8b204121-c441-41be-a100-8dcf34ebdcf9"] }, Open ]], Cell[CellGroupData[{ -Cell[508308, 12518, 368, 9, 126, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[508679, 12529, 172, 3, 126, "Output",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] +Cell[552879, 13148, 6055, 185, 616, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], +Cell[558937, 13335, 197, 3, 54, "Output",ExpressionUUID->"40dae0b4-e090-49bc-a4fc-efddfc7e217d"] }, Open ]], Cell[CellGroupData[{ -Cell[508888, 12537, 2663, 88, 126, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[511554, 12627, 173, 3, 126, "Output",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] +Cell[559171, 13343, 368, 9, 68, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], +Cell[559542, 13354, 194, 3, 54, "Output",ExpressionUUID->"77cd98c7-253a-4da8-a63b-0e7b272d5164"] }, Open ]], Cell[CellGroupData[{ -Cell[511764, 12635, 2603, 85, 126, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[514370, 12722, 171, 3, 126, "Output",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] +Cell[559773, 13362, 6122, 187, 701, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], +Cell[565898, 13551, 194, 3, 54, "Output",ExpressionUUID->"0b4bd14d-246e-40dc-b9cf-73538ed7d3a5"] }, Open ]], Cell[CellGroupData[{ -Cell[514578, 12730, 3712, 118, 126, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[518293, 12850, 174, 3, 126, "Output",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] +Cell[566129, 13559, 368, 9, 68, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], +Cell[566500, 13570, 197, 3, 54, "Output",ExpressionUUID->"e591610d-7d6c-485c-8ea4-f32af8e70aec"] }, Open ]], Cell[CellGroupData[{ -Cell[518504, 12858, 2054, 59, 126, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], -Cell[520561, 12919, 574, 12, 126, "Message",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], -Cell[521138, 12933, 580, 12, 126, "Message",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], -Cell[521721, 12947, 580, 12, 126, "Message",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], -Cell[522304, 12961, 456, 10, 126, "Message",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], -Cell[522763, 12973, 172, 3, 126, "Output",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] +Cell[566734, 13578, 2663, 88, 266, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], +Cell[569400, 13668, 196, 3, 54, "Output",ExpressionUUID->"51a85ab4-2825-448e-95c8-25ebf1a8a93f"] }, Open ]], Cell[CellGroupData[{ -Cell[522972, 12981, 2054, 59, 126, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], -Cell[525029, 13042, 576, 12, 126, "Message",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], -Cell[525608, 13056, 577, 12, 126, "Message",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], -Cell[526188, 13070, 582, 12, 126, "Message",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], -Cell[526773, 13084, 458, 10, 126, "Message",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], -Cell[527234, 13096, 172, 3, 126, "Output",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] +Cell[569633, 13676, 2603, 85, 266, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], +Cell[572239, 13763, 193, 3, 54, "Output",ExpressionUUID->"4e3bcbdc-59a8-45aa-ab6b-5f8bcd29c5cf"] }, Open ]], Cell[CellGroupData[{ -Cell[527443, 13104, 2028, 55, 126, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], -Cell[529474, 13161, 20021, 378, 126, "Output",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] +Cell[572469, 13771, 3712, 118, 393, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], +Cell[576184, 13891, 195, 3, 54, "Output",ExpressionUUID->"4bc7f256-a031-4ee9-ab22-f790fd4dea29"] }, Open ]], Cell[CellGroupData[{ -Cell[549532, 13544, 2146, 61, 126, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], -Cell[551681, 13607, 502, 11, 126, "Message",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], -Cell[552186, 13620, 506, 11, 126, "Message",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], -Cell[552695, 13633, 508, 11, 126, "Message",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], -Cell[553206, 13646, 456, 10, 126, "Message",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], -Cell[553665, 13658, 30015, 538, 126, "Output",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] +Cell[576416, 13899, 2077, 59, 148, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], +Cell[578496, 13960, 591, 13, 94, "Message",ExpressionUUID->"0489423e-f9f6-4666-98bf-cd04cc047586"], +Cell[579090, 13975, 597, 13, 94, "Message",ExpressionUUID->"6d78dc66-5b4d-4c20-b7c7-ecb6cef16665"], +Cell[579690, 13990, 599, 13, 94, "Message",ExpressionUUID->"0c0cd42d-f9a7-4717-9338-0fc2990e5f90"], +Cell[580292, 14005, 494, 11, 42, "Message",ExpressionUUID->"2c2aad03-797d-4d5c-9b70-1b321a769d51"], +Cell[580789, 14018, 194, 3, 54, "Output",ExpressionUUID->"e7886ffb-7631-44d5-bba4-8628e2abffae"] }, Open ]], -Cell[583695, 14199, 209, 5, 126, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], Cell[CellGroupData[{ -Cell[583929, 14208, 1590, 47, 126, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], -Cell[585522, 14257, 342, 6, 126, "Message",ExpressionUUID->"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], -Cell[585867, 14265, 101, 0, 126, "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[581020, 14026, 2077, 59, 148, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], +Cell[583100, 14087, 593, 13, 94, "Message",ExpressionUUID->"7df75dc9-0c97-48c6-9171-9c72a229c153"], +Cell[583696, 14102, 597, 13, 94, "Message",ExpressionUUID->"eca1ffa6-2bb2-4220-bb1a-e293a6a57cf3"], +Cell[584296, 14117, 600, 13, 94, "Message",ExpressionUUID->"67114fe2-21c5-4474-86b1-41a21ac2e5e3"], +Cell[584899, 14132, 496, 11, 42, "Message",ExpressionUUID->"e362ab9b-62a9-4c65-b76f-4be170911eda"], +Cell[585398, 14145, 194, 3, 54, "Output",ExpressionUUID->"45a40c24-0da2-4396-82d5-0a63196b8ea4"] }, Open ]], Cell[CellGroupData[{ -Cell[586005, 14270, 2249, 64, 126, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], -Cell[588257, 14336, 342, 6, 126, "Message",ExpressionUUID->"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], -Cell[588602, 14344, 342, 6, 126, "Message",ExpressionUUID->"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], -Cell[588947, 14352, 101, 0, 126, "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[585629, 14153, 2051, 55, 81, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], +Cell[587683, 14210, 20456, 386, 378, "Output",ExpressionUUID->"8de8dace-5ffa-450b-81bb-4ba21972a037"] }, Open ]], Cell[CellGroupData[{ -Cell[589085, 14357, 2221, 64, 126, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], -Cell[591309, 14423, 342, 6, 126, "Message",ExpressionUUID->"566a849f-fc85-4d42-a545-a46d44cf7346"], -Cell[591654, 14431, 342, 6, 126, "Message",ExpressionUUID->"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], -Cell[591999, 14439, 100, 0, 126, "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[608176, 14601, 2168, 61, 204, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], +Cell[610347, 14664, 538, 12, 64, "Message",ExpressionUUID->"e7f0afbc-82a4-4c7a-a859-31237d92edc5"], +Cell[610888, 14678, 541, 12, 64, "Message",ExpressionUUID->"fa65900b-694b-4e0d-ae28-54a772106008"], +Cell[611432, 14692, 543, 12, 64, "Message",ExpressionUUID->"8271f12a-48f4-4398-b202-b4c1d870a145"], +Cell[611978, 14706, 496, 11, 42, "Message",ExpressionUUID->"8b2f8971-cf81-4c46-85ab-62f3d27fbff2"], +Cell[612477, 14719, 34379, 612, 385, "Output",ExpressionUUID->"dec9ef89-3423-4a35-aaf9-e931a815364c"] }, Open ]], Cell[CellGroupData[{ -Cell[592136, 14444, 2223, 64, 126, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], -Cell[594362, 14510, 342, 6, 126, "Message",ExpressionUUID->"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], -Cell[594707, 14518, 342, 6, 126, "Message",ExpressionUUID->"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], -Cell[595052, 14526, 101, 0, 126, "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[646893, 15336, 232, 5, 47, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], +Cell[647128, 15343, 40741, 744, 385, "Output",ExpressionUUID->"5bead7a7-317f-4b73-9ccd-f1af2008a4ba"] }, Open ]], Cell[CellGroupData[{ -Cell[595190, 14531, 213, 6, 126, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[595406, 14539, 102, 0, 126, "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[687906, 16092, 1616, 48, 110, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], +Cell[689525, 16142, 673, 14, 94, "Message",ExpressionUUID->"129a88b2-5038-434f-88a5-d161f172ef9c"], +Cell[690201, 16158, 673, 14, 94, "Message",ExpressionUUID->"26dab22c-f7e1-4323-a6eb-ecbf460c80f5"], +Cell[690877, 16174, 675, 14, 94, "Message",ExpressionUUID->"ef4bbb65-d6d4-48b8-8dce-c4aa225409ef"], +Cell[691555, 16190, 474, 11, 42, "Message",ExpressionUUID->"752088a2-1021-46f6-8e5d-2f0b735928ab"], +Cell[692032, 16203, 167, 3, 54, "Output",ExpressionUUID->"a6149f7a-f556-4671-8be5-2b568296e95b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[692236, 16211, 2272, 64, 242, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], +Cell[694511, 16277, 568, 13, 94, "Message",ExpressionUUID->"474385f1-256f-4341-9d54-401b448c56c3"], +Cell[695082, 16292, 573, 13, 94, "Message",ExpressionUUID->"86261edb-266a-455c-a33e-6f18f64970ac"], +Cell[695658, 16307, 577, 13, 94, "Message",ExpressionUUID->"26679921-a02b-42b6-8b18-14c4ee42a29b"], +Cell[696238, 16322, 472, 11, 42, "Message",ExpressionUUID->"8487f86e-9a27-4f54-9ea8-8bae7594376f"], +Cell[696713, 16335, 171, 3, 54, "Output",ExpressionUUID->"ccb53a91-ca57-4d73-bc20-b2bd45c814ac"] +}, Open ]], +Cell[CellGroupData[{ +Cell[696921, 16343, 2233, 63, 242, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], +Cell[699157, 16408, 569, 13, 94, "Message",ExpressionUUID->"97cb0235-2fa8-404f-9022-a03caae533cb"], +Cell[699729, 16423, 573, 13, 94, "Message",ExpressionUUID->"af245512-ea9d-433c-9413-d5fa3a36f7e4"], +Cell[700305, 16438, 576, 13, 94, "Message",ExpressionUUID->"93f9af8c-a637-4a15-8297-556605b67ddb"], +Cell[700884, 16453, 472, 11, 42, "Message",ExpressionUUID->"5dd0fb26-2eee-4766-9abc-40c5d6d81d45"], +Cell[701359, 16466, 170, 3, 54, "Output",ExpressionUUID->"b5ab214c-d137-4345-984e-32d8df4fa95c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[701566, 16474, 2235, 63, 242, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], +Cell[703804, 16539, 569, 13, 94, "Message",ExpressionUUID->"f1a8785f-ff26-489b-bfde-358158b23ca7"], +Cell[704376, 16554, 573, 13, 94, "Message",ExpressionUUID->"1a0bfbab-9bd8-41fe-87e3-db6a9352fff0"], +Cell[704952, 16569, 577, 13, 94, "Message",ExpressionUUID->"7bbab25d-8680-4107-9c44-8508065a6849"], +Cell[705532, 16584, 471, 11, 42, "Message",ExpressionUUID->"afa3b479-52d7-4b51-9988-c0979d268326"], +Cell[706006, 16597, 171, 3, 54, "Output",ExpressionUUID->"79324107-abdf-4481-a2b4-6b4bbbb0e6ba"] +}, Open ]], +Cell[CellGroupData[{ +Cell[706214, 16605, 236, 6, 76, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], +Cell[706453, 16613, 176, 3, 54, "Output",ExpressionUUID->"f0a46db4-6ace-473a-8e8e-735e9cba84d2"] }, Open ]] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw1.nb b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw1.nb index 91a9469..bd457a9 100644 --- a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw1.nb +++ b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 595945, 14522] -NotebookOptionsPosition[ 556929, 13901] -NotebookOutlinePosition[ 557340, 13918] -CellTagsIndexPosition[ 557297, 13915] +NotebookDataLength[ 706340, 16633] +NotebookOptionsPosition[ 665931, 15986] +NotebookOutlinePosition[ 666361, 16004] +CellTagsIndexPosition[ 666318, 16001] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,16 +26,14 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.9940735873936653`*^9, 3.9940735896443777`*^9}, { 3.994075218023417*^9, 3.994075221411705*^9}}, - CellLabel-> - "In[106]:=",ExpressionUUID->"654de044-0e50-46e4-a030-5c51782643e2"], + CellLabel->"In[1]:=",ExpressionUUID->"654de044-0e50-46e4-a030-5c51782643e2"], Cell[BoxData["1.9`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.9940735644974327`*^9, 3.994073590895896*^9}, { 3.994075171996416*^9, 3.994075180507247*^9}, {3.994075219377726*^9, - 3.9940752234153214`*^9}}, - CellLabel-> - "Out[106]=",ExpressionUUID->"9b3880c8-5b7d-42a6-8a83-2fa12a7fc99c"] + 3.9940752234153214`*^9}, 3.994349739615056*^9, 3.994352658209177*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"9dea8eeb-0e31-4ccb-87a7-5434d1ea4f44"] }, Open ]], Cell[CellGroupData[{ @@ -44,15 +42,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940732811688833`*^9, 3.994073289502289*^9}}, - CellLabel-> - "In[107]:=",ExpressionUUID->"1bff45ef-3366-47ea-aac1-eb064d64cd81"], + CellLabel->"In[2]:=",ExpressionUUID->"1bff45ef-3366-47ea-aac1-eb064d64cd81"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.994073564560362*^9, 3.994073590977919*^9}, - 3.994075180702458*^9, 3.9940752234546824`*^9}, - CellLabel-> - "Out[107]=",ExpressionUUID->"2005cc7b-c4fd-4227-a5bb-236b098bb58a"] + 3.994075180702458*^9, 3.9940752234546824`*^9, 3.994349740030868*^9, + 3.99435265876375*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"ad35c4b5-daee-4144-b027-b9e2002f0a02"] }, Open ]], Cell[CellGroupData[{ @@ -61,15 +58,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "168"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073284506165*^9, 3.994073287626708*^9}}, - CellLabel-> - "In[108]:=",ExpressionUUID->"6d89bceb-0dc2-4a2c-a79a-2d190d748f3b"], + CellLabel->"In[3]:=",ExpressionUUID->"6d89bceb-0dc2-4a2c-a79a-2d190d748f3b"], Cell[BoxData["168"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994073564571506*^9, 3.994073590992278*^9}, - 3.994075180712758*^9, 3.9940752234670067`*^9}, - CellLabel-> - "Out[108]=",ExpressionUUID->"d47cb3a4-c75b-4103-98ac-3d9fdf97da0c"] + 3.994075180712758*^9, 3.9940752234670067`*^9, 3.9943497400461683`*^9, + 3.994352658781711*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"e3870ce1-843d-4a26-87b1-b923aec5eb01"] }, Open ]], Cell[CellGroupData[{ @@ -77,15 +73,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[109]:=",ExpressionUUID->"38d94942-1353-4515-8e2c-98eaa63b1e8f"], + CellLabel->"In[4]:=",ExpressionUUID->"38d94942-1353-4515-8e2c-98eaa63b1e8f"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.994073564582589*^9, 3.994073590996417*^9}, - 3.994075180723978*^9, 3.994075223478387*^9}, - CellLabel-> - "Out[109]=",ExpressionUUID->"1b1cc60d-b3db-48fe-a607-04702dd6ee18"] + 3.994075180723978*^9, 3.994075223478387*^9, 3.9943497400605783`*^9, + 3.9943526587997932`*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"999e2237-8e65-4f69-b2d8-1c84dc0fe282"] }, Open ]], Cell[CellGroupData[{ @@ -97,30 +92,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[110]:=",ExpressionUUID->"1b256968-e387-489a-8829-57f3de16e065"], + CellLabel->"In[5]:=",ExpressionUUID->"1b256968-e387-489a-8829-57f3de16e065"], Cell[BoxData["0.544`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.994073564593708*^9, 3.994073591015129*^9}, - 3.994075180735317*^9, 3.994075223489546*^9}, - CellLabel-> - "Out[110]=",ExpressionUUID->"e6bd806a-a758-4351-b20b-63f102cc0917"] + 3.994075180735317*^9, 3.994075223489546*^9, 3.99434974007579*^9, + 3.9943526588425913`*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"7927ecb3-9274-4cee-9a1c-bc77362250b9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[111]:=",ExpressionUUID->"d3b9ea6b-d791-4b3d-90f3-8d5f2213b559"], + CellLabel->"In[6]:=",ExpressionUUID->"d3b9ea6b-d791-4b3d-90f3-8d5f2213b559"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.994073564604851*^9, 3.9940735910271397`*^9}, - 3.9940751807454844`*^9, 3.994075223493987*^9}, - CellLabel-> - "Out[111]=",ExpressionUUID->"26dcec8d-d627-4ff5-813b-4faf3b6f8638"] + 3.9940751807454844`*^9, 3.994075223493987*^9, 3.9943497401086187`*^9, + 3.994352658865222*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"44c638ef-e68b-4f76-ab88-294d7ddcd959"] }, Open ]], Cell[CellGroupData[{ @@ -131,15 +124,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[112]:=",ExpressionUUID->"be3f42c2-01c3-4d2c-89be-538333e1aa03"], + CellLabel->"In[7]:=",ExpressionUUID->"be3f42c2-01c3-4d2c-89be-538333e1aa03"], Cell[BoxData["6.400704089204199`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.9940735646161203`*^9, 3.9940735910381737`*^9}, - 3.99407518075636*^9, 3.9940752235073977`*^9}, - CellLabel-> - "Out[112]=",ExpressionUUID->"80c159bd-d267-4f8b-8390-7a09001d97fc"] + 3.99407518075636*^9, 3.9940752235073977`*^9, 3.994349740123146*^9, + 3.994352658881974*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"1bc884ca-4286-49ee-a578-4fea02231b7c"] }, Open ]], Cell[CellGroupData[{ @@ -151,15 +143,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[113]:=",ExpressionUUID->"47c6e29f-3d13-4327-943d-eaa5040dcc82"], + CellLabel->"In[8]:=",ExpressionUUID->"47c6e29f-3d13-4327-943d-eaa5040dcc82"], Cell[BoxData["4.825794469480417`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.994073564627458*^9, 3.9940735910486517`*^9}, - 3.994075180767749*^9, 3.9940752235185337`*^9}, - CellLabel-> - "Out[113]=",ExpressionUUID->"c310b58a-cd33-499e-a1ef-93ca2913a8bc"] + 3.994075180767749*^9, 3.9940752235185337`*^9, 3.9943497401536217`*^9, + 3.9943526588981647`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"58cabf1b-669f-4a85-9c39-4f1d4e60672a"] }, Open ]], Cell[CellGroupData[{ @@ -167,14 +158,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8877902834"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073298855084*^9}, - CellLabel-> - "In[114]:=",ExpressionUUID->"df71849f-efb2-4261-b6d8-8ccc7f214f9f"], + CellLabel->"In[9]:=",ExpressionUUID->"df71849f-efb2-4261-b6d8-8ccc7f214f9f"], Cell[BoxData["0.8877902834`"], "Output", CellChangeTimes->{{3.99407356463848*^9, 3.994073591058733*^9}, - 3.994075180779163*^9, 3.994075223529882*^9}, - CellLabel-> - "Out[114]=",ExpressionUUID->"90e44468-f2ed-4c13-9652-b7c5aa423df8"] + 3.994075180779163*^9, 3.994075223529882*^9, 3.994349740178688*^9, + 3.9943526589632053`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"36503367-ed42-4e97-9535-6396f54cbb1e"] }, Open ]], Cell[CellGroupData[{ @@ -182,44 +172,41 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3862529089"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.994073304321521*^9}, - CellLabel-> - "In[115]:=",ExpressionUUID->"2970230d-e92a-491c-8f9b-8b9995b13f72"], + CellLabel->"In[10]:=",ExpressionUUID->"2970230d-e92a-491c-8f9b-8b9995b13f72"], Cell[BoxData["0.3862529089`"], "Output", CellChangeTimes->{{3.9940735646497602`*^9, 3.994073591068905*^9}, - 3.994075180790642*^9, 3.994075223541339*^9}, - CellLabel-> - "Out[115]=",ExpressionUUID->"fc5bd5dc-e939-4366-9f60-44a94c646ee7"] + 3.994075180790642*^9, 3.994075223541339*^9, 3.994349740201682*^9, + 3.994352658980842*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"6a3d4922-58f3-4aad-8f86-b8389feb289a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[116]:=",ExpressionUUID->"8fcec1cb-6367-48d5-84a8-488e55773556"], + CellLabel->"In[11]:=",ExpressionUUID->"8fcec1cb-6367-48d5-84a8-488e55773556"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.994073564660372*^9, 3.994073591079844*^9}, - 3.9940751808023157`*^9, 3.99407522355291*^9}, - CellLabel-> - "Out[116]=",ExpressionUUID->"c29a2188-b064-46d8-a12b-0f83885966ca"] + 3.9940751808023157`*^9, 3.99407522355291*^9, 3.994349740215981*^9, + 3.994352659000555*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"e16b8e3a-39f9-4935-9c7e-d1c5d535f5fb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[117]:=",ExpressionUUID->"afa8b026-e9e2-4c2a-b598-7adf346042e7"], + CellLabel->"In[12]:=",ExpressionUUID->"afa8b026-e9e2-4c2a-b598-7adf346042e7"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.994073564670796*^9, 3.994073591090024*^9}, - 3.994075180813775*^9, 3.994075223564582*^9}, - CellLabel-> - "Out[117]=",ExpressionUUID->"9c52aa91-d4d1-4e91-91f0-e3989f9dcf8a"] + 3.994075180813775*^9, 3.994075223564582*^9, 3.994349740241399*^9, + 3.994352659017125*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"4c0b984d-06f8-4097-a408-95e33981b26c"] }, Open ]], Cell[CellGroupData[{ @@ -243,15 +230,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[118]:=",ExpressionUUID->"46f248de-e191-4429-960f-89c025ca6bee"], + CellLabel->"In[13]:=",ExpressionUUID->"46f248de-e191-4429-960f-89c025ca6bee"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.9940735646817017`*^9, 3.994073591101307*^9}, - 3.9940751808204927`*^9, 3.99407522357547*^9}, - CellLabel-> - "Out[118]=",ExpressionUUID->"d8ea0a76-d1ee-404b-8a3e-cffb3f85794b"] + 3.9940751808204927`*^9, 3.99407522357547*^9, 3.994349740266613*^9, + 3.994352659056781*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"9943d719-7088-4cd2-98ee-6839367746f2"] }, Open ]], Cell[CellGroupData[{ @@ -275,15 +261,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[119]:=",ExpressionUUID->"4732b5af-12aa-43ce-a050-406d6060aa53"], + CellLabel->"In[14]:=",ExpressionUUID->"4732b5af-12aa-43ce-a050-406d6060aa53"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.9940735646923637`*^9, 3.994073591111409*^9}, - 3.994075180833333*^9, 3.99407522358539*^9}, - CellLabel-> - "Out[119]=",ExpressionUUID->"55c31971-9787-4118-8c22-ce7065e3695a"] + 3.994075180833333*^9, 3.99407522358539*^9, 3.994349740288047*^9, + 3.9943526590794907`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"45550dd8-fb4d-4036-8ca5-f5603fee6a51"] }, Open ]], Cell[CellGroupData[{ @@ -338,15 +323,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[120]:=",ExpressionUUID->"f5c402e7-7872-40cd-a967-4fd1559482f6"], + CellLabel->"In[15]:=",ExpressionUUID->"f5c402e7-7872-40cd-a967-4fd1559482f6"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994073564703178*^9, 3.99407359112132*^9}, - 3.994075180844792*^9, 3.994075223596579*^9}, - CellLabel-> - "Out[120]=",ExpressionUUID->"4f1853a1-b0e8-41bb-9e10-159f8abfc671"] + 3.994075180844792*^9, 3.994075223596579*^9, 3.9943497403137207`*^9, + 3.994352659124826*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"a34a2b3a-55d8-45d1-911e-06cb82818b15"] }, Open ]], Cell[CellGroupData[{ @@ -397,16 +381,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[121]:=",ExpressionUUID->"71043eea-bc06-49fa-a1f1-46b6dd6c128a"], + CellLabel->"In[16]:=",ExpressionUUID->"71043eea-bc06-49fa-a1f1-46b6dd6c128a"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.994073564714039*^9, 3.994073591132222*^9}, - 3.994075180888361*^9, 3.994075223608573*^9}, - CellLabel-> - "Out[121]=",ExpressionUUID->"3420a2b4-5230-4f67-8994-069d2d6ac33c"] + 3.994075180888361*^9, 3.994075223608573*^9, 3.994349740333736*^9, + 3.994352659173023*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"0b1cf049-dc45-4825-8e46-d4e6b5fee3b7"] }, Open ]], Cell[CellGroupData[{ @@ -457,16 +440,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[122]:=",ExpressionUUID->"c54f827c-9ced-4bd2-8efc-3e09d9172516"], + CellLabel->"In[17]:=",ExpressionUUID->"c54f827c-9ced-4bd2-8efc-3e09d9172516"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.9940735647250757`*^9, 3.994073591143152*^9}, - 3.994075180901285*^9, 3.994075223621201*^9}, - CellLabel-> - "Out[122]=",ExpressionUUID->"3c0c71ee-8031-4092-855f-8c578539af0b"] + 3.994075180901285*^9, 3.994075223621201*^9, 3.994349740362116*^9, + 3.9943526592019377`*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"0505ffcf-1843-423f-b2ba-411a60edcd87"] }, Open ]], Cell[CellGroupData[{ @@ -521,60 +503,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[123]:=",ExpressionUUID->"4252dd08-5614-43a1-af53-09613750d7ff"], + CellLabel->"In[18]:=",ExpressionUUID->"4252dd08-5614-43a1-af53-09613750d7ff"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994073564736117*^9, 3.994073591154641*^9}, - 3.9940751809127274`*^9, 3.994075223631315*^9}, - CellLabel-> - "Out[123]=",ExpressionUUID->"316e0695-b38f-4832-b75c-0fca45037f05"] + 3.9940751809127274`*^9, 3.994075223631315*^9, 3.994349740387021*^9, + 3.99435265922151*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"35ad3576-8917-4e59-9afd-ab508ec9273f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[124]:=",ExpressionUUID->"11e60afc-d5e0-42be-839f-81e4e339a1a8"], + CellLabel->"In[19]:=",ExpressionUUID->"11e60afc-d5e0-42be-839f-81e4e339a1a8"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.994073564745685*^9, 3.9940735911671133`*^9}, - 3.9940751809237967`*^9, 3.994075223641436*^9}, - CellLabel-> - "Out[124]=",ExpressionUUID->"7839a583-0c5e-45b7-b21e-8d630f368922"] + 3.9940751809237967`*^9, 3.994075223641436*^9, 3.99434974040728*^9, + 3.994352659330428*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"a202c10c-145e-407f-bd51-d9aa70e88ecf"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[125]:=",ExpressionUUID->"b8419fae-7d4c-403d-91dd-7cbb6be5fa8a"], + CellLabel->"In[20]:=",ExpressionUUID->"b8419fae-7d4c-403d-91dd-7cbb6be5fa8a"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994073564755136*^9, 3.994073591178863*^9}, - 3.9940751809343033`*^9, 3.9940752236530647`*^9}, - CellLabel-> - "Out[125]=",ExpressionUUID->"cdbd6e17-3be3-4c8d-a31c-814a789d7474"] + 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.9943497404444857`*^9, + 3.994352659370597*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"515cad28-d14b-4691-9aa6-22c3aff5922c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[126]:=",ExpressionUUID->"6bdd48c9-606a-47e3-8d77-8a971e25ae45"], + CellLabel->"In[21]:=",ExpressionUUID->"6bdd48c9-606a-47e3-8d77-8a971e25ae45"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940735647648563`*^9, 3.994073591190179*^9}, - 3.9940751809451323`*^9, 3.994075223664682*^9}, - CellLabel-> - "Out[126]=",ExpressionUUID->"8d5e3cb0-0cf5-4466-8d6a-6ecf07d3dd2e"] + 3.9940751809451323`*^9, 3.994075223664682*^9, 3.994349740474415*^9, + 3.9943526594062366`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"27581209-0e4b-404e-aced-bdda937990c0"] }, Open ]], Cell[CellGroupData[{ @@ -583,31 +561,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[127]:=",ExpressionUUID->"28e5ef3d-8836-4b8b-b9c3-a61da2dbfbcf"], + CellLabel->"In[22]:=",ExpressionUUID->"28e5ef3d-8836-4b8b-b9c3-a61da2dbfbcf"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.994073564774688*^9, 3.994073591201717*^9}, - 3.994075180956657*^9, 3.994075223675436*^9}, - CellLabel-> - "Out[127]=",ExpressionUUID->"83fdab78-1fc9-4885-aa2c-d5b9ab4cffab"] + 3.994075180956657*^9, 3.994075223675436*^9, 3.9943497404956503`*^9, + 3.994352659430586*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"844b1dc5-a3ce-42e6-ae62-a38fe609afb0"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[128]:=",ExpressionUUID->"5c28b10c-735d-4661-a1c2-55e9b6ea4a8a"], + CellLabel->"In[23]:=",ExpressionUUID->"5c28b10c-735d-4661-a1c2-55e9b6ea4a8a"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994073564784115*^9, 3.994073591213622*^9}, - 3.9940751809686193`*^9, 3.9940752236862583`*^9}, - CellLabel-> - "Out[128]=",ExpressionUUID->"40d42391-3305-4ab1-86b2-ef08748814c2"] + 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.994349740514598*^9, + 3.994352659476663*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"93f5e2a2-e432-4960-bb95-ce7e5f8f76e2"] }, Open ]], Cell[CellGroupData[{ @@ -617,15 +593,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073317560268*^9, 3.994073317727027*^9}}, - CellLabel-> - "In[129]:=",ExpressionUUID->"a2bae7c2-8b8a-4c64-948a-54151bd4a28a"], + CellLabel->"In[24]:=",ExpressionUUID->"a2bae7c2-8b8a-4c64-948a-54151bd4a28a"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.994073564793541*^9, 3.994073591224018*^9}, - 3.994075180980678*^9, 3.994075223697234*^9}, - CellLabel-> - "Out[129]=",ExpressionUUID->"a75bb78f-119b-48fc-b0c8-fa8af117f5bf"] + 3.994075180980678*^9, 3.994075223697234*^9, 3.994349740540743*^9, + 3.994352659505435*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"53e74b74-bc55-42be-96c1-5fbc5b5af7a0"] }, Open ]], Cell[CellGroupData[{ @@ -635,15 +610,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.9940733207460938`*^9, 3.994073320804184*^9}}, - CellLabel-> - "In[130]:=",ExpressionUUID->"ef64e7ce-f7c5-409b-83f9-9929007e2a69"], + CellLabel->"In[25]:=",ExpressionUUID->"ef64e7ce-f7c5-409b-83f9-9929007e2a69"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.9940735648031883`*^9, 3.9940735912353287`*^9}, - 3.9940751809920683`*^9, 3.994075223707429*^9}, - CellLabel-> - "Out[130]=",ExpressionUUID->"60b2213c-6129-4f9b-882f-3626bb753259"] + 3.9940751809920683`*^9, 3.994075223707429*^9, 3.9943497405659857`*^9, + 3.994352659531169*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"a5aa6358-5fc2-4213-9747-08f55282f7dc"] }, Open ]], Cell[CellGroupData[{ @@ -652,15 +626,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[131]:=",ExpressionUUID->"02cfe06e-a2c5-47f2-bd0e-da365d14055b"], + CellLabel->"In[26]:=",ExpressionUUID->"02cfe06e-a2c5-47f2-bd0e-da365d14055b"], Cell[BoxData["72"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.99407356481284*^9, 3.994073591246372*^9}, - 3.994075181003516*^9, 3.994075223717374*^9}, - CellLabel-> - "Out[131]=",ExpressionUUID->"11168aca-c5f6-4e28-a7b9-10bf8d3da8de"] + 3.994075181003516*^9, 3.994075223717374*^9, 3.994349740587887*^9, + 3.994352659561473*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"301597eb-a1ff-49cb-930a-64c65675becb"] }, Open ]], Cell[CellGroupData[{ @@ -675,15 +648,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[132]:=",ExpressionUUID->"34054da0-34c4-4ed2-b5e7-ba513c08970f"], + CellLabel->"In[27]:=",ExpressionUUID->"34054da0-34c4-4ed2-b5e7-ba513c08970f"], Cell[BoxData["0.10999999999999999`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994073564822513*^9, 3.9940735912565413`*^9}, - 3.994075181014969*^9, 3.994075223727599*^9}, - CellLabel-> - "Out[132]=",ExpressionUUID->"d706937e-4232-4d2e-9ade-32e4cb6ba51e"] + 3.994075181014969*^9, 3.994075223727599*^9, 3.9943497406062613`*^9, + 3.994352659589465*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"85c0c9d3-4e12-48e2-ad96-ee5117948331"] }, Open ]], Cell[CellGroupData[{ @@ -698,16 +670,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[133]:=",ExpressionUUID->"6973c3cf-3f46-4d19-8fbc-9846d4d6f09a"], + CellLabel->"In[28]:=",ExpressionUUID->"6973c3cf-3f46-4d19-8fbc-9846d4d6f09a"], Cell[BoxData[ RowBox[{"-", "2.564285714285714`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994073564832857*^9, 3.994073591267404*^9}, - 3.9940751810260887`*^9, 3.9940752237376823`*^9}, - CellLabel-> - "Out[133]=",ExpressionUUID->"edc0225a-fcad-40b4-bbb6-ec17b380955b"] + 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.994349740630638*^9, + 3.994352659621757*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"f3933a52-c5a1-4802-9861-7c4499801ad8"] }, Open ]], Cell[CellGroupData[{ @@ -738,15 +709,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[134]:=",ExpressionUUID->"d7e713ef-32a0-45b6-811b-285e81ec9257"], + CellLabel->"In[29]:=",ExpressionUUID->"d7e713ef-32a0-45b6-811b-285e81ec9257"], Cell[BoxData["17.427928477019236`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994073564842832*^9, 3.9940735912778807`*^9}, - 3.9940751810379477`*^9, 3.994075223748026*^9}, - CellLabel-> - "Out[134]=",ExpressionUUID->"a116a9c3-c3a5-46a1-aa13-2ee22a0829c7"] + 3.9940751810379477`*^9, 3.994075223748026*^9, 3.994349740667588*^9, + 3.9943526596472063`*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"f5155601-1075-43c5-ba92-42d0402128fa"] }, Open ]], Cell[CellGroupData[{ @@ -754,15 +724,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[135]:=",ExpressionUUID->"c78ba437-3544-44ae-a68a-2918bbc821f8"], + CellLabel->"In[30]:=",ExpressionUUID->"c78ba437-3544-44ae-a68a-2918bbc821f8"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.994073564851839*^9, 3.994073591288074*^9}, - 3.99407518104945*^9, 3.994075223758711*^9}, - CellLabel-> - "Out[135]=",ExpressionUUID->"7032efca-8a24-4818-b7d3-3e93ecbdf6c0"] + 3.99407518104945*^9, 3.994075223758711*^9, 3.994349740686735*^9, + 3.994352659674312*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"15d8b626-f04d-461a-9b1b-a28a8e6bcfdf"] }, Open ]], Cell[CellGroupData[{ @@ -772,20 +741,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994073341190873*^9, 3.994073342038845*^9}}, - CellLabel-> - "In[136]:=",ExpressionUUID->"ebfbd65d-60e9-4c6b-8cd5-97cf7e7b59e6"], + CellLabel->"In[31]:=",ExpressionUUID->"ebfbd65d-60e9-4c6b-8cd5-97cf7e7b59e6"], Cell[BoxData["2.155`"], "Output", CellChangeTimes->{{3.994073564860754*^9, 3.994073591298296*^9}, - 3.994075181060684*^9, 3.994075223775366*^9}, - CellLabel-> - "Out[136]=",ExpressionUUID->"3b160b7e-adb2-4621-8abc-6580c062fce6"] + 3.994075181060684*^9, 3.994075223775366*^9, 3.994349740728677*^9, + 3.994352659700811*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"8e0a368f-2888-46b2-a879-b8eaf6b4f9b0"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[137]:=",ExpressionUUID->"a7681eef-67d2-4f8d-a607-83e1b8eb15d3"], + CellLabel->"In[32]:=",ExpressionUUID->"a7681eef-67d2-4f8d-a607-83e1b8eb15d3"], Cell[CellGroupData[{ @@ -794,20 +761,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073344618413*^9, 3.994073345759185*^9}}, - CellLabel-> - "In[138]:=",ExpressionUUID->"ba79384a-2558-4f42-90b9-a9174c76935e"], + CellLabel->"In[33]:=",ExpressionUUID->"ba79384a-2558-4f42-90b9-a9174c76935e"], Cell[BoxData["0.755`"], "Output", CellChangeTimes->{{3.994073564877489*^9, 3.994073591311125*^9}, - 3.9940751810754833`*^9, 3.9940752237900457`*^9}, - CellLabel-> - "Out[138]=",ExpressionUUID->"e9aeeae4-8c37-408a-b6b6-6a96b59fb57c"] + 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.99434974079126*^9, + 3.994352659758155*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"473587e3-3266-468f-ae19-f71f001d1d9e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[139]:=",ExpressionUUID->"90cd403c-b3c8-44af-89f3-c87b24208c4f"], + CellLabel->"In[34]:=",ExpressionUUID->"90cd403c-b3c8-44af-89f3-c87b24208c4f"], Cell[CellGroupData[{ @@ -816,20 +781,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940733478949413`*^9, 3.994073348567162*^9}}, - CellLabel-> - "In[140]:=",ExpressionUUID->"231f573a-63ae-4cab-a335-c22117bf3178"], + CellLabel->"In[35]:=",ExpressionUUID->"231f573a-63ae-4cab-a335-c22117bf3178"], Cell[BoxData["2.62`"], "Output", CellChangeTimes->{{3.994073564894133*^9, 3.9940735913232403`*^9}, - 3.994075181088438*^9, 3.994075223803163*^9}, - CellLabel-> - "Out[140]=",ExpressionUUID->"0716c625-fc30-4fc8-9286-670a022ea3d4"] + 3.994075181088438*^9, 3.994075223803163*^9, 3.994349740836391*^9, + 3.9943526598231277`*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"bf494d8b-6380-4b18-aa91-5e65d15194ec"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[141]:=",ExpressionUUID->"081a4ceb-c4d7-4ac4-af60-22b59f2c6c7d"], + CellLabel->"In[36]:=",ExpressionUUID->"081a4ceb-c4d7-4ac4-af60-22b59f2c6c7d"], Cell[CellGroupData[{ @@ -838,20 +801,18 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.99407335112987*^9, 3.9940733523562517`*^9}}, - CellLabel-> - "In[142]:=",ExpressionUUID->"a2a0a3bc-e8db-4bae-b7be-e050d9292d34"], + CellLabel->"In[37]:=",ExpressionUUID->"a2a0a3bc-e8db-4bae-b7be-e050d9292d34"], Cell[BoxData["1.135`"], "Output", CellChangeTimes->{{3.994073564911627*^9, 3.994073591335389*^9}, - 3.994075181101487*^9, 3.994075223815889*^9}, - CellLabel-> - "Out[142]=",ExpressionUUID->"1cf20bfd-75cc-40f7-9b75-d0d27e97664f"] + 3.994075181101487*^9, 3.994075223815889*^9, 3.994349740886994*^9, + 3.994352659879796*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"1dc1fc81-70e0-4bb7-9f9b-52723f59f7c6"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[143]:=",ExpressionUUID->"73f6a3e2-e8b4-4d89-8532-3cdb6911efa1"], + CellLabel->"In[38]:=",ExpressionUUID->"73f6a3e2-e8b4-4d89-8532-3cdb6911efa1"], Cell[CellGroupData[{ @@ -860,20 +821,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994073355091783*^9, 3.994073355935183*^9}}, - CellLabel-> - "In[144]:=",ExpressionUUID->"b3215d13-b4cb-4fd6-8407-e0b6af7f32f0"], + CellLabel->"In[39]:=",ExpressionUUID->"b3215d13-b4cb-4fd6-8407-e0b6af7f32f0"], Cell[BoxData["1.025`"], "Output", CellChangeTimes->{{3.994073564928769*^9, 3.9940735913488693`*^9}, - 3.994075181114448*^9, 3.994075223832756*^9}, - CellLabel-> - "Out[144]=",ExpressionUUID->"566ed76e-32cb-4804-8e41-5f1289ea131e"] + 3.994075181114448*^9, 3.994075223832756*^9, 3.994349740929501*^9, + 3.994352659927582*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"5abc47c4-e0cb-4efc-899d-aad3855cc987"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[145]:=",ExpressionUUID->"f8468766-c01d-4218-9357-b27f88ed876c"], + CellLabel->"In[40]:=",ExpressionUUID->"f8468766-c01d-4218-9357-b27f88ed876c"], Cell[CellGroupData[{ @@ -882,20 +841,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994073359153013*^9, 3.9940733600822906`*^9}}, - CellLabel-> - "In[146]:=",ExpressionUUID->"e697212f-4ac1-4f24-b113-4b8b823d4160"], + CellLabel->"In[41]:=",ExpressionUUID->"e697212f-4ac1-4f24-b113-4b8b823d4160"], Cell[BoxData["0.575`"], "Output", CellChangeTimes->{{3.994073564946273*^9, 3.99407359136164*^9}, - 3.9940751811274652`*^9, 3.9940752238459263`*^9}, - CellLabel-> - "Out[146]=",ExpressionUUID->"b30e7d73-c3ee-4932-9a14-c35bb895f77b"] + 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994349740973515*^9, + 3.994352659961987*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"09c088fc-768d-412a-84ed-413ded98e2be"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[147]:=",ExpressionUUID->"e1140db4-a145-41f1-aa15-c22c84d26e51"], + CellLabel->"In[42]:=",ExpressionUUID->"e1140db4-a145-41f1-aa15-c22c84d26e51"], Cell[CellGroupData[{ @@ -904,20 +861,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, 3.994073366138835*^9, { 3.994073396938322*^9, 3.994073398601803*^9}}, - CellLabel-> - "In[148]:=",ExpressionUUID->"67830d0d-3b05-499f-9f43-f9e2a2e96c1f"], + CellLabel->"In[43]:=",ExpressionUUID->"67830d0d-3b05-499f-9f43-f9e2a2e96c1f"], Cell[BoxData["1.44`"], "Output", CellChangeTimes->{{3.994073564964167*^9, 3.9940735913757553`*^9}, - 3.9940751811406727`*^9, 3.9940752238589993`*^9}, - CellLabel-> - "Out[148]=",ExpressionUUID->"1b24339f-0d5e-4de8-8cda-513396a0a437"] + 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.99434974100167*^9, + 3.994352660036819*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"7d927b97-9546-4dac-a364-90434ccd5315"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[149]:=",ExpressionUUID->"95a2cd4c-f71b-407d-a8c8-42d33e1b5db5"], + CellLabel->"In[44]:=",ExpressionUUID->"95a2cd4c-f71b-407d-a8c8-42d33e1b5db5"], Cell[CellGroupData[{ @@ -925,20 +880,18 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.645"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.9940734006045856`*^9, 3.99407340214142*^9}}, - CellLabel-> - "In[150]:=",ExpressionUUID->"76b73b14-23cc-4e57-b98e-07a0e5c48928"], + CellLabel->"In[45]:=",ExpressionUUID->"76b73b14-23cc-4e57-b98e-07a0e5c48928"], Cell[BoxData["0.645`"], "Output", CellChangeTimes->{{3.9940735649821672`*^9, 3.994073591389337*^9}, - 3.994075181153781*^9, 3.994075223871763*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"b32d8e2e-2248-4cbb-863d-6e4b1ca4a65d"] + 3.994075181153781*^9, 3.994075223871763*^9, 3.9943497410372667`*^9, + 3.994352660080554*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"69248fcc-1372-46ed-8338-7d77002886a1"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[151]:=",ExpressionUUID->"47dbed8a-06d7-4a89-bed1-7f0f0e09af87"], + CellLabel->"In[46]:=",ExpressionUUID->"47dbed8a-06d7-4a89-bed1-7f0f0e09af87"], Cell[CellGroupData[{ @@ -1427,15 +1380,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[152]:=",ExpressionUUID->"977a22c1-7f05-4ef0-ab0f-3487f42964a3"], + CellLabel->"In[47]:=",ExpressionUUID->"977a22c1-7f05-4ef0-ab0f-3487f42964a3"], Cell[BoxData["0.1377756020325425`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.9940735650538073`*^9, 3.99407359143029*^9}, - 3.994075181231205*^9, 3.9940752239087954`*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"87ac0de1-f633-4baa-aeb4-953445646a3a"] + 3.994075181231205*^9, 3.9940752239087954`*^9, 3.9943497411904163`*^9, + 3.9943526602854843`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"8bb72c1f-97a5-4e99-8bec-7a82e379154c"] }, Open ]], Cell[CellGroupData[{ @@ -1929,15 +1881,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[153]:=",ExpressionUUID->"0154fad5-7f06-4a30-8cc3-5a2d45318328"], + CellLabel->"In[48]:=",ExpressionUUID->"0154fad5-7f06-4a30-8cc3-5a2d45318328"], Cell[BoxData["7.524926889811008`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.99407356508613*^9, 3.994073591458125*^9}, - 3.994075181264968*^9, 3.994075223937818*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"f024000d-7527-4f5c-a875-84a8e4c887cc"] + 3.994075181264968*^9, 3.994075223937818*^9, 3.994349741269977*^9, + 3.994352660431068*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"546eb412-6129-472b-b8fd-2873bb1533f9"] }, Open ]], Cell[CellGroupData[{ @@ -2425,16 +2376,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[154]:=",ExpressionUUID->"8b62c611-b190-42db-9d66-9023afda65c0"], + CellLabel->"In[49]:=",ExpressionUUID->"8b62c611-b190-42db-9d66-9023afda65c0"], Cell[BoxData[ RowBox[{"-", "14.084113046357718`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994073565118821*^9, 3.994073591484323*^9}, - 3.994075181298151*^9, 3.9940752239647293`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"ca1d9fd8-f604-4b10-8672-36682db5079e"] + 3.994075181298151*^9, 3.9940752239647293`*^9, 3.994349741396079*^9, + 3.994352660528393*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"61c204fe-5e2e-459a-8f1e-fc6ab790675b"] }, Open ]], Cell[CellGroupData[{ @@ -2992,16 +2942,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"41b0e6b5-d875-4a41-bddc-b96726f30b8e"], + CellLabel->"In[50]:=",ExpressionUUID->"41b0e6b5-d875-4a41-bddc-b96726f30b8e"], Cell[BoxData[ RowBox[{"-", "18.31263149263108`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.9940735651553993`*^9, 3.994073591515855*^9}, - 3.9940751813370543`*^9, 3.994075223996374*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"2e9b67d2-1d0a-4210-ba7d-fc6651a8d8e9"] + 3.9940751813370543`*^9, 3.994075223996374*^9, 3.994349741500245*^9, + 3.994352660628952*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"24560498-6148-4367-ad99-73dbf2ef186e"] }, Open ]], Cell[CellGroupData[{ @@ -3559,16 +3508,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"f5dfe48c-c744-404c-a83e-906f1d590bad"], + CellLabel->"In[51]:=",ExpressionUUID->"f5dfe48c-c744-404c-a83e-906f1d590bad"], Cell[BoxData[ RowBox[{"-", "53.236632839784775`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.994073565191607*^9, 3.9940735915482073`*^9}, - 3.9940751813752813`*^9, 3.994075224029221*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"189fe403-7aba-468e-b5ec-d167d4ae7c02"] + 3.9940751813752813`*^9, 3.994075224029221*^9, 3.99434974159794*^9, + 3.994352660759454*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"ee7a3b97-ccab-4de2-a9c6-2092be54896f"] }, Open ]], Cell[CellGroupData[{ @@ -4199,46 +4147,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"3dce4f21-8853-4356-9c51-0e01f426e7d3"], + CellLabel->"In[52]:=",ExpressionUUID->"3dce4f21-8853-4356-9c51-0e01f426e7d3"], Cell[BoxData[ RowBox[{"-", "137.72173412227852`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.9940735652337313`*^9, 3.9940735915861683`*^9}, - 3.9940751814204807`*^9, 3.99407522406466*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"7c6bc069-444a-46aa-bdbc-7dac8546bf9c"] + 3.9940751814204807`*^9, 3.99407522406466*^9, 3.99434974172733*^9, + 3.994352660883295*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"d21af38a-31d8-4caa-97d4-36c0c012863e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"0c7b3f73-53fe-46f6-b876-55160b5b6f32"], + CellLabel->"In[53]:=",ExpressionUUID->"0c7b3f73-53fe-46f6-b876-55160b5b6f32"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994073565247233*^9, 3.99407359159737*^9}, - 3.994075181435895*^9, 3.9940752240755796`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"b86d1cc9-90bc-4b34-9ba1-2a64d2c0c604"] + 3.994075181435895*^9, 3.9940752240755796`*^9, 3.994349741785164*^9, + 3.9943526610506783`*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"401fae93-d4c5-4628-8aa8-2902417e6f1a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"3e524e61-6281-4bfd-8c3d-124dde1d850b"], + CellLabel->"In[54]:=",ExpressionUUID->"3e524e61-6281-4bfd-8c3d-124dde1d850b"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994073565259305*^9, 3.994073591607201*^9}, - 3.9940751814462433`*^9, 3.994075224085256*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"28b2ad46-611c-4eed-b39f-7fbe339cc12c"] + 3.9940751814462433`*^9, 3.994075224085256*^9, 3.99434974180044*^9, + 3.9943526610760612`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"7fcb8690-80b0-4646-b5b3-b9829a5d3203"] }, Open ]], Cell[CellGroupData[{ @@ -4282,15 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"635f4e4a-0c8e-4483-a3a6-0e96e17e79ba"], + CellLabel->"In[55]:=",ExpressionUUID->"635f4e4a-0c8e-4483-a3a6-0e96e17e79ba"], Cell[BoxData["109.03965674383026`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940735652689238`*^9, 3.99407359161714*^9}, - 3.994075181457575*^9, 3.994075224089169*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"0fb17b6d-48ce-45c7-800b-a73a61d8374b"] + 3.994075181457575*^9, 3.994075224089169*^9, 3.994349741816691*^9, + 3.994352661095924*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"da1af26d-2ea9-451a-bac3-94ce5245b9db"] }, Open ]], Cell[CellGroupData[{ @@ -4330,16 +4274,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"16076403-4cf2-4dd2-adeb-8ec26990a906"], + CellLabel->"In[56]:=",ExpressionUUID->"16076403-4cf2-4dd2-adeb-8ec26990a906"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.9940735652791967`*^9, 3.994073591627187*^9}, - 3.994075181468134*^9, 3.9940752240986977`*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"99dea3a3-ac4f-4919-91ca-b0d5f01eac97"] + 3.994075181468134*^9, 3.9940752240986977`*^9, 3.994349741833424*^9, + 3.9943526611208763`*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"e52d112d-6b58-4a06-8bb1-61c3a08d9494"] }, Open ]], Cell[CellGroupData[{ @@ -4383,101 +4326,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"eace7e71-d77b-4244-9165-1769e36be22d"], + CellLabel->"In[57]:=",ExpressionUUID->"eace7e71-d77b-4244-9165-1769e36be22d"], Cell[BoxData["112.13680293055965`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994073565289288*^9, 3.994073591637117*^9}, - 3.994075181479414*^9, 3.9940752241080437`*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"6bc418f6-0e0c-4cb4-9311-82e8028c408a"] + 3.994075181479414*^9, 3.9940752241080437`*^9, 3.9943497418487663`*^9, + 3.99435266114284*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"b6f72177-ad4e-4f17-913f-ffa08deca22a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"84d17c99-5bd0-4360-9f94-db9e257c08b8"], + CellLabel->"In[58]:=",ExpressionUUID->"84d17c99-5bd0-4360-9f94-db9e257c08b8"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.99407356529922*^9, 3.994073591647008*^9}, - 3.994075181491456*^9, 3.994075224117897*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"0462b6f9-4c07-469b-9f46-ddc24cee93db"] + 3.994075181491456*^9, 3.994075224117897*^9, 3.9943497418705606`*^9, + 3.994352661209969*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"0bdfd251-eaff-4c61-bef2-3af2384a4fee"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"f1c9aaa0-649f-41fd-b4b5-5cdf7d9e4994"], + CellLabel->"In[59]:=",ExpressionUUID->"f1c9aaa0-649f-41fd-b4b5-5cdf7d9e4994"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.994073565311245*^9, 3.994073591656905*^9}, - 3.994075181502122*^9, 3.9940752241273518`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"1a591bd3-666f-466d-a23d-6d2b845c8fb5"] + 3.994075181502122*^9, 3.9940752241273518`*^9, 3.994349741891841*^9, + 3.9943526612330923`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"cca68665-41a8-4ebd-bc41-1be0c58f6818"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"a0471ab2-6038-4a17-ab69-10536cd0ccac"], + CellLabel->"In[60]:=",ExpressionUUID->"a0471ab2-6038-4a17-ab69-10536cd0ccac"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.9940735653224297`*^9, 3.994073591666703*^9}, - 3.994075181512973*^9, 3.994075224138131*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"77aa9a60-c9bf-4578-9ff1-4206379f9f14"] + 3.994075181512973*^9, 3.994075224138131*^9, 3.994349741905321*^9, + 3.994352661257848*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"8deca9d4-d6f2-4506-a483-b71fe00917d2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[166]:=",ExpressionUUID->"3ca58a31-103c-45b8-a596-f20c7d5d0eb6"], + CellLabel->"In[61]:=",ExpressionUUID->"3ca58a31-103c-45b8-a596-f20c7d5d0eb6"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.994073565332736*^9, 3.994073591676529*^9}, - 3.9940751815232983`*^9, 3.99407522414828*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"e694da90-2caf-44c5-afc6-e9e2810f4efe"] + 3.9940751815232983`*^9, 3.99407522414828*^9, 3.994349741920176*^9, + 3.9943526612754393`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"38aeb17f-b136-4ba5-850f-b7bd835e2f32"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[167]:=",ExpressionUUID->"ea2830d3-1c19-45c3-9c69-02e548b27a25"], + CellLabel->"In[62]:=",ExpressionUUID->"ea2830d3-1c19-45c3-9c69-02e548b27a25"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994073565343382*^9, 3.994073591686304*^9}, - 3.9940751815621433`*^9, 3.994075224158536*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"2b8dfe4f-27e8-4e22-bb12-4b4482cf3b4e"] + 3.9940751815621433`*^9, 3.994075224158536*^9, 3.994349741935339*^9, + 3.994352661296671*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"026405e3-df24-42ff-adf8-247067b3ae79"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[168]:=",ExpressionUUID->"809f0a50-4913-458a-a1e7-cb270263a73f"], + CellLabel->"In[63]:=",ExpressionUUID->"809f0a50-4913-458a-a1e7-cb270263a73f"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.9940735677968397`*^9, 3.994073591696135*^9}, - 3.994075181571867*^9, 3.994075224168653*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"9b8c15c5-99bd-403e-8850-0382767a19d2"] + 3.994075181571867*^9, 3.994075224168653*^9, 3.994349741949875*^9, + 3.994352661315942*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"bdb238ad-5422-44ee-86a2-00dd58ac4401"] }, Open ]], Cell[CellGroupData[{ @@ -4498,16 +4434,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[169]:=",ExpressionUUID->"e52951a6-435a-47e8-b932-62cc03f01a8e"], + CellLabel->"In[64]:=",ExpressionUUID->"e52951a6-435a-47e8-b932-62cc03f01a8e"], Cell[BoxData[ RowBox[{"-", "34.047906297441784`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994073567991251*^9, 3.994073591706287*^9}, - 3.994075181582259*^9, 3.994075224178802*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"487fe44e-81b3-4b9a-87ad-a2e075b0b7c6"] + 3.994075181582259*^9, 3.994075224178802*^9, 3.99434974196357*^9, + 3.994352661346774*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"bac0090a-5a5f-4cbd-94ab-5e97eb4a1a0e"] }, Open ]], Cell[CellGroupData[{ @@ -4528,16 +4463,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[170]:=",ExpressionUUID->"f7f11b32-3aac-4fe6-899b-165a4303e96e"], + CellLabel->"In[65]:=",ExpressionUUID->"f7f11b32-3aac-4fe6-899b-165a4303e96e"], Cell[BoxData[ RowBox[{"-", "6.56405378738986`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994073568001831*^9, 3.994073591716386*^9}, - 3.994075181592502*^9, 3.994075224188962*^9}, - CellLabel-> - "Out[170]=",ExpressionUUID->"2b99fdb6-f533-4ed5-8c0d-c06a80cc56c1"] + 3.994075181592502*^9, 3.994075224188962*^9, 3.9943497419804*^9, + 3.994352661364842*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"2470173c-05f8-4deb-83ad-0be62a1e5cb4"] }, Open ]], Cell[CellGroupData[{ @@ -4602,15 +4536,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[171]:=",ExpressionUUID->"81bc1609-b94f-4e55-9120-4324a33ca2f3"], + CellLabel->"In[66]:=",ExpressionUUID->"81bc1609-b94f-4e55-9120-4324a33ca2f3"], Cell[BoxData["74.99175044638848`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.994073568012953*^9, 3.994073591726822*^9}, - 3.9940751816039963`*^9, 3.994075224199308*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"722935c4-2c7a-43e1-8248-3b27ad3bfa8e"] + 3.9940751816039963`*^9, 3.994075224199308*^9, 3.994349741998554*^9, + 3.994352661386426*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"db645164-6626-4ab3-8c3f-43c0f40599f3"] }, Open ]], Cell[CellGroupData[{ @@ -4651,16 +4584,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[172]:=",ExpressionUUID->"ae67d1a1-c662-498f-a276-9ee8d2caa351"], + CellLabel->"In[67]:=",ExpressionUUID->"ae67d1a1-c662-498f-a276-9ee8d2caa351"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994073568023205*^9, 3.9940735917368*^9}, - 3.994075181615046*^9, 3.994075224209613*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"907b9465-e011-4ead-815a-9da0021532cf"] + 3.994075181615046*^9, 3.994075224209613*^9, 3.994349742017256*^9, + 3.99435266140527*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"4212ba88-d23f-4f10-ba8b-326b84514f59"] }, Open ]], Cell[CellGroupData[{ @@ -4726,15 +4658,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[173]:=",ExpressionUUID->"ea3ceea0-934b-4be6-8221-5a3c3c00657d"], + CellLabel->"In[68]:=",ExpressionUUID->"ea3ceea0-934b-4be6-8221-5a3c3c00657d"], Cell[BoxData["105.57274914316979`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994073568033989*^9, 3.994073591747006*^9}, - 3.994075181626021*^9, 3.994075224219851*^9}, - CellLabel-> - "Out[173]=",ExpressionUUID->"c288ca2f-aae0-4da7-b3d2-8a15dfecf03e"] + 3.994075181626021*^9, 3.994075224219851*^9, 3.994349742033599*^9, + 3.9943526615925922`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"631e986d-d124-4be5-b7b6-b8d01da17ebe"] }, Open ]], Cell[CellGroupData[{ @@ -4792,15 +4723,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[174]:=",ExpressionUUID->"57ee0694-2a18-4150-9247-6165f96999ff"], + CellLabel->"In[69]:=",ExpressionUUID->"57ee0694-2a18-4150-9247-6165f96999ff"], Cell[BoxData["39.10949309233206`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994073568045323*^9, 3.99407359175727*^9}, - 3.994075181636903*^9, 3.99407522423002*^9}, - CellLabel-> - "Out[174]=",ExpressionUUID->"5d1a1f43-33c3-43da-974c-99fe009f9fec"] + 3.994075181636903*^9, 3.99407522423002*^9, 3.994349742050702*^9, + 3.99435266162257*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"0bb6d199-8578-4dbb-a9f9-75815d21357d"] }, Open ]], Cell[CellGroupData[{ @@ -4858,30 +4788,43 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[175]:=",ExpressionUUID->"388b4d86-49b2-4271-a4a0-3c7028dff9d2"], + CellLabel->"In[70]:=",ExpressionUUID->"388b4d86-49b2-4271-a4a0-3c7028dff9d2"], Cell[BoxData["659.7171122788135`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994073568055649*^9, 3.994073591768012*^9}, - 3.9940751816477003`*^9, 3.99407522424048*^9}, - CellLabel-> - "Out[175]=",ExpressionUUID->"656d020b-75a2-4f99-a8e2-2431d894f988"] + 3.9940751816477003`*^9, 3.99407522424048*^9, 3.994349742067957*^9, + 3.994352661646744*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"56d12455-3ab0-4c7d-bbcf-ea40e9e73dd3"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4209192664"}]], "Input", CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{3.991849227197853*^9, 3.994084804228025*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[71]:=",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + +Cell[BoxData["0.4209192664`"], "Output", + CellChangeTimes->{3.994349742084289*^9, 3.994352661667573*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"043db049-1e79-4fa7-94fb-e6f1cd3b864a"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1119271435"}]], "Input", CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{3.9918492290557346`*^9, 3.994084809875893*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[72]:=",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + +Cell[BoxData["0.1119271435`"], "Output", + CellChangeTimes->{3.994349742100389*^9, 3.994352661689804*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"b199b882-4cfb-43fa-a996-cf2a6c844c99"] +}, Open ]], Cell[CellGroupData[{ @@ -4927,13 +4870,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[233]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], + CellLabel->"In[73]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913335367025833`*^9}, - CellLabel-> - "Out[233]=",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[BoxData["1.5054805119396558`*^-53"], "Output", + CellChangeTimes->{3.9913335367025833`*^9, 3.9943497421171637`*^9, + 3.994352661711589*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"da7791a4-8911-499e-8700-f1d023812f2e"] }, Open ]], Cell[CellGroupData[{ @@ -4967,14 +4909,13 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575926932735`*^9},ExpressionUUID->"e4db2648-4e1a-2c46-83ab-\ -fcd932c3b663"], + CellChangeTimes->{3.9915575926932735`*^9}, + CellLabel->"In[74]:=",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[BoxData["5.020725113795862`*^-55"], "Output", - CellChangeTimes->{3.991333536726557*^9}, - CellLabel-> - "Out[234]=",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[BoxData["6.90043917210766`*^-55"], "Output", + CellChangeTimes->{3.991333536726557*^9, 3.994349742133301*^9, + 3.994352661732354*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"d115b238-de90-40b6-b576-7bd73798e216"] }, Open ]], Cell[CellGroupData[{ @@ -5007,14 +4948,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557595005127*^9, - 3.991557596789215*^9}},ExpressionUUID->"e4649c3d-e19e-ca42-95a0-\ -23b66397f1fd"], + CellChangeTimes->{{3.991557595005127*^9, 3.991557596789215*^9}}, + CellLabel->"In[75]:=",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[BoxData["1.871372642785671`*^-54"], "Output", - CellChangeTimes->{3.9913335367515736`*^9}, - CellLabel-> - "Out[235]=",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[BoxData["5.9139089901686424`*^-55"], "Output", + CellChangeTimes->{3.9913335367515736`*^9, 3.994349742150187*^9, + 3.9943526617558947`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"8b06f1ed-3a3c-46be-9c4a-5c34de9fe950"] }, Open ]], Cell[CellGroupData[{ @@ -5037,13 +4977,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[236]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], + CellLabel->"In[76]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[BoxData["25.178011816139865`"], "Output", - CellChangeTimes->{3.9913335367605553`*^9}, - CellLabel-> - "Out[236]=",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[BoxData["8.258142878047346`"], "Output", + CellChangeTimes->{3.9913335367605553`*^9, 3.994349742167821*^9, + 3.9943526617802553`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"6d5a6b56-20b7-4518-9526-10e48bc7a476"] }, Open ]], Cell[CellGroupData[{ @@ -5068,13 +5007,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[237]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], + CellLabel->"In[77]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[BoxData["31.32034821453639`"], "Output", - CellChangeTimes->{3.991333536783556*^9}, - CellLabel-> - "Out[237]=",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[BoxData["17.138031574879513`"], "Output", + CellChangeTimes->{3.991333536783556*^9, 3.994349742183922*^9, + 3.9943526618047523`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"1841cc25-3b23-4eb0-a46c-5846f15fa4aa"] }, Open ]], Cell[CellGroupData[{ @@ -5083,13 +5021,12 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[238]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], + CellLabel->"In[78]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[BoxData["0.7475613664925793`"], "Output", - CellChangeTimes->{3.9913335367915726`*^9}, - CellLabel-> - "Out[238]=",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[BoxData["2.176205468199348`"], "Output", + CellChangeTimes->{3.9913335367915726`*^9, 3.994349742199548*^9, + 3.994352661828208*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"2aa9ae65-b0f4-4393-9d6c-0f56e07c17ce"] }, Open ]], Cell[CellGroupData[{ @@ -5098,13 +5035,12 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[239]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], + CellLabel->"In[79]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[BoxData["3.5403946764909393`"], "Output", - CellChangeTimes->{3.99133353681583*^9}, - CellLabel-> - "Out[239]=",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[BoxData["6.204380230350324`"], "Output", + CellChangeTimes->{3.99133353681583*^9, 3.994349742213768*^9, + 3.9943526618490553`*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"65175395-f73c-4268-8bc8-436e38deae9b"] }, Open ]], Cell[CellGroupData[{ @@ -5113,13 +5049,12 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[240]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], + CellLabel->"In[80]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[BoxData["110.88639408458714`"], "Output", - CellChangeTimes->{3.991333536826782*^9}, - CellLabel-> - "Out[240]=",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[BoxData["106.33086429030207`"], "Output", + CellChangeTimes->{3.991333536826782*^9, 3.994349742227079*^9, + 3.9943526618621387`*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"1209a81e-58b2-48a2-902f-1e5f9617e226"] }, Open ]], Cell[CellGroupData[{ @@ -5128,13 +5063,12 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[241]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], + CellLabel->"In[81]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[BoxData["18.822108918839827`"], "Output", - CellChangeTimes->{3.9913335368508377`*^9}, - CellLabel-> - "Out[241]=",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[BoxData["17.971415688378137`"], "Output", + CellChangeTimes->{3.9913335368508377`*^9, 3.994349742241316*^9, + 3.9943526618892183`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"be7c9310-c72b-4aa1-99e0-2158f22fe86b"] }, Open ]], Cell[CellGroupData[{ @@ -5323,13 +5257,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[242]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], + CellLabel->"In[82]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[BoxData["0.042044960793272385`"], "Output", - CellChangeTimes->{3.9913335368758316`*^9}, - CellLabel-> - "Out[242]=",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[BoxData["0.008752110207703409`"], "Output", + CellChangeTimes->{3.9913335368758316`*^9, 3.994349742263234*^9, + 3.9943526619159203`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"bb23a7a1-bdd8-457f-9af5-599eb2ef4422"] }, Open ]], Cell[CellGroupData[{ @@ -5342,13 +5275,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[243]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], + CellLabel->"In[83]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[BoxData["4.322031867849089`"], "Output", - CellChangeTimes->{3.991333536973074*^9}, - CellLabel-> - "Out[243]=",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[BoxData["9.473022129127402`"], "Output", + CellChangeTimes->{3.991333536973074*^9, 3.994349742488184*^9, + 3.9943526622605762`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"e5d418ba-a0b8-4e2d-8f35-8c30dc3454d5"] }, Open ]], Cell[CellGroupData[{ @@ -5539,13 +5471,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[244]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], + CellLabel->"In[84]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[BoxData["0.011395075201487413`"], "Output", - CellChangeTimes->{3.9913335369870644`*^9}, - CellLabel-> - "Out[244]=",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[BoxData["0.05488317136205649`"], "Output", + CellChangeTimes->{3.9913335369870644`*^9, 3.994349742508181*^9, + 3.9943526622867126`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"f215954e-b97a-4c53-81a5-3188ae005c15"] }, Open ]], Cell[CellGroupData[{ @@ -5558,13 +5489,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[245]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], + CellLabel->"In[85]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[BoxData["8.302069082299768`"], "Output", - CellChangeTimes->{3.9913335370800858`*^9}, - CellLabel-> - "Out[245]=",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[BoxData["3.782904184353575`"], "Output", + CellChangeTimes->{3.9913335370800858`*^9, 3.9943497425818653`*^9, + 3.994352662401511*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"b1b504fe-204f-416c-a5cf-ff5133768e11"] }, Open ]], Cell[CellGroupData[{ @@ -5656,13 +5586,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[246]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], + CellLabel->"In[86]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913335370930634`*^9}, - CellLabel-> - "Out[246]=",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[BoxData["0.04840187632890963`"], "Output", + CellChangeTimes->{3.9913335370930634`*^9, 3.994349742592576*^9, + 3.994352662537672*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"4c57ba16-25d7-4ec0-bcfe-b3f242b38d23"] }, Open ]], Cell[CellGroupData[{ @@ -5751,13 +5680,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[247]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], + CellLabel->"In[87]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991333537118065*^9}, - CellLabel-> - "Out[247]=",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[BoxData["0.9515981236710904`"], "Output", + CellChangeTimes->{3.991333537118065*^9, 3.9943497426074944`*^9, + 3.9943526625555563`*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"a2a06b10-c2c2-41cf-8d03-c6d563e0279a"] }, Open ]], Cell[CellGroupData[{ @@ -5879,19 +5807,18 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[248]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], + CellLabel->"In[88]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913335371420746`*^9}, - CellLabel-> - "Out[248]=",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[BoxData["0.046059134696750575`"], "Output", + CellChangeTimes->{3.9913335371420746`*^9, 3.994349742621019*^9, + 3.994352662601059*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"e98e58f9-d92d-492c-8010-dc8ee665b31f"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"ba4a3eff-9e3b-\ -5e47-a896-3a959bbbf44d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ @@ -5952,65 +5879,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849241512779*^9},ExpressionUUID->"738a48f3-b38c-f441-aec4-\ -53babaa73a14"], + CellChangeTimes->{3.991849241512779*^9}, + CellLabel->"In[90]:=",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 217, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371540604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.840203496665924`*^-200\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 1, + 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.9943497426603317`*^9, + 3.994352662645615*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], +In[90]:=",ExpressionUUID->"71d4a8c3-313c-455c-b70e-0e42a4a67a08"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 218, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371630745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.201817762902973`*^-204\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 2, + 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.9943497426603317`*^9, + 3.9943526627306013`*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], +In[90]:=",ExpressionUUID->"997e08d4-fc02-48bd-b7c4-7378024ccf1f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 249, 219, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371710587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4987327484976006`*^-208\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 3, + 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.9943497426603317`*^9, + 3.994352662740872*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], +In[90]:=",ExpressionUUID->"f126b77f-d840-4609-b647-70289b55765e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 249, 220, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133353717906*^9}, +during this calculation.\"", 2, 90, 4, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.9943497426603317`*^9, + 3.994352662748432*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], +In[90]:=",ExpressionUUID->"d08a9658-d500-4124-9090-615d1abc397b"], -Cell[BoxData["4.322031867849086`"], "Output", - CellChangeTimes->{3.9913335399194164`*^9}, - CellLabel-> - "Out[249]=",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[BoxData["9.4730221291274`"], "Output", + CellChangeTimes->{3.9913335399194164`*^9, 3.9943497455053368`*^9, + 3.994352666539071*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"67d9d217-73a9-4fc0-a660-b91fe52fbb36"] }, Open ]], Cell[CellGroupData[{ @@ -6072,65 +6012,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918492463930817`*^9},ExpressionUUID->"86c33485-ed26-8f49-b3d0-\ -7d040d3b48f0"], + CellChangeTimes->{3.9918492463930817`*^9}, + CellLabel->"In[91]:=",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 221, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399544125`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.840203496665924`*^-200\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 5, + 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994349745617772*^9, + 3.9943526666212053`*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], +In[91]:=",ExpressionUUID->"e72d1317-8294-4126-aa72-ea9dc2d214bc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 222, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399644184`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.201817762902973`*^-204\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 6, + 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994349745617772*^9, + 3.994352666631886*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], +In[91]:=",ExpressionUUID->"642e40e6-67ce-424d-a651-364637c10dfc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 250, 223, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539972414*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4987327484976006`*^-208\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 7, + 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994349745617772*^9, + 3.994352666641694*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], +In[91]:=",ExpressionUUID->"76c5fa06-9e5b-47e2-a315-c5d155274f67"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 250, 224, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539979416*^9}, +during this calculation.\"", 2, 91, 8, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994349745617772*^9, + 3.994352666650271*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], +In[91]:=",ExpressionUUID->"8bad4a1a-1c7c-4a5d-b9ca-86ad387e1bd4"], -Cell[BoxData["8.302069082299772`"], "Output", - CellChangeTimes->{3.991333542631773*^9}, - CellLabel-> - "Out[250]=",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[BoxData["3.782904184353576`"], "Output", + CellChangeTimes->{3.991333542631773*^9, 3.994349748488695*^9, + 3.994352670410974*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"d310410b-8071-45e2-bba7-1c23f5f9bc09"] }, Open ]], Cell[CellGroupData[{ @@ -6140,138 +6093,139 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492535482903`*^9},ExpressionUUID->"f373fe4f-940c-0842-9236-\ -63ec36d318ad"], + CellChangeTimes->{3.9918492535482903`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VV0XAHCRipAhJJGxPgq9SGlaKxdFxpQhQ7ruPYYMGepVKmRoQtGk +N0OFkgzJWCqaJAmVVEou916ZMzuV6tv+OM95fs86Z62191n7qDKDtrMFBQQE +usg1cw9u1F1e0dy46c3U6p8R1VzYNJS9mmmaD5om7qsOE3Myjc5rmD6A0ZCm +tzO2Y72eI2bwHPSSEzqPEBeHRz4VNm2AtNzzbpHEJ2sX1UTmvQHmy2+MaOJ7 +zcEZ0/rvIXle/KUY4r62+sMHqz5CVWSQUzzxYr666yTjCxhaZ8ecJN72/bBx +aEMHtJzTWJJI/Gi6b354XifYRwyrJBO3RstHlAdy4YXevJQLxENzTPvG9flg +0bU36D/iOQn7XAymusG8TvFeJrGyVHpdcFUPSC5ZFJRDbKM4eWOIMQCS4lNL +7xJTV9XkdOYNwRyjtsX3iCM1beP2NnyHdTzRYzXEH+Vb/gnLG4F5io4XmolZ +u/x8zyWMQt6O4M2fiIfTBK7dDRyDuP2fXbqI56npSI7oT4CEYEbTBPF51tMt +krKTIGM6tVKghgsqN10i9aYmoVbh2qQo8dqV8UMBVTQYevY0qhL7GHU09DGm +4XyEw7kdxOPh+2eLLvsNVe7gwCSOqpq/QWveH1AXi4rcR5yKa297N/yFEBNB +pSRiVk6daUjeLLxmucS/kTiv9hwnWlEQR7NqkjqIh795HE5OEMRfK6qVRogP +a0+U3AkUQs6b11Gyj0m/Rarq3/WF0fThFlcv4rbmgUd/soRRoPQd519ildGK +XRKyc/A1u+ZtAnG+oU2KztQclLhc/auC+Nm9Q7P8q+ZheWoQU+YJFyaevuvo +YYhhrHR4zFdiaSsxyYhHYshvZKhME69qMUVxY3EsyI3ZsPgpF/x4ZVf/0ZXA +xCb2mBPxPsGGVRvFJHFYkrPrEzFfrXAkblIKs6+rSY8/I/tD1Ys0GUgjp2j8 +hsJzLgje7lZdFCyNXXqOVUCsYrB0e16/NPI2NjETiXcxzt5t5Mig1Ghzvm4t +F5q8QkLlX8niRHWX7skXXPh6M+m05zw5zE64+rCceKA/L+uWmRzeOLWggUcs +GsZ9t75GDo/7ifqY1HHBNHaHoWeZPHrYlKcJveTC/WyjidxMBbxoIfkrvZ4L +2fyfB9aFKeF4oW+GfiMXtu48/jW0QAnTzzpJ+hMPPJMxL+hWQk8p/kgOsWH2 +SlkVF2WsUuwVUmwi+8n0KBHetBSjz7d7iTZzYfQ759+eGBU8+eul7J83XJAJ +MC0tsVZD1pWNO41budCdLepj56eGpzneNVHElV+aFQfj1VDJJeFKHbGblXvM +sho1pA41X3P5QPpbcWD7ZX11dMrOGIr6SOr33Rw+Kq+BTy+sSOC1cWGH93wd +y05N9MCGob8dXIADO/WdfmtiYWxCsQOHC9pxmWtYCsvwEdeRc5NYIMvA5Kj9 +MiySXHTMvpMLBV9dne4+XoZDw0Wtt7rI+XTMj158fTkGZjNfBPJJf6bWrX1M +LYyardZp0c+FLIdLn6eOaqFitu3K28RJzE7O7CtaKFIpwBMbIPMdtb9f+Z0W +eiX9Tn1DLPUgXcCBoY1uy94reA6R+TEY0q5SX4GTPVmHkke4oKh2JvI0byVO +m/FazWguPDg1rvVDUAfNk99qPiJ2G3NpoVR1sKB+4YTRDy5kPNPQMvHQQdHc +/IXaP7mg5n3/Lf1BB8drmp3lpsl68/ma1CtdXFFu8HOOAA+UFJUpFZdVyFrf +27B1Hg9W5oSJ/QJ9rN3yWNVuMQ+YrJgJHRt9fJQiGfeVOFU95aunmz5GVF50 +CVDkgdD1oju14fp4L3W3Y8ISHrRl9O1IKdZH/tOEzCZlHpxM9UzXUjfAQ3Pz +9+9V50H3aStd5zmGmDaY6Uav5MG1EA27sobVKKrTEOWzmQfNB2BNbI4xyn1u +8+8K5YGqx3sbd/+N2Dh9oehlAQ/Yf8sLlQ4iZqwTjaf6eSDfXzlXnmmChuvS +TxcY8SHMYMOXFG1TrC+Z+rkwjg/Mwek6mT4z1NJpTXj4iQ8FJqFzM5u24DWj +tOCTm7ohe9zvcf55C9whLHJBL6cb6M2LXj+L3IYHmhrXSSp/g3YBoZHOPda4 +30c1sTjjGwQuCTobrW6LNxNp/ydLe6DQt67mQpwdGp0wV+SX9cChMYWpFb72 +OCVqk/1wWy9MWJo7vti9HY2rbRZw6F4wdk3ezLd3wLmiEMsr6IO3Cul+zwx2 +4B3rx96lnv2w+EbMg9z/7UTfewDBOgNQydG2shF3xNl2KWVPJgdAuWXY+8Cg +I/7X47T8xPNBMLiQnJ/FccKzm9uXa9wZgvTZY7opT53R6e1JB+/z36F8s15b +3D0XrP4b1VthOQypa05JTeftwoqrbvt9Xw9D0+eceIMEVwyo2R49ZjkCZdZp +Gvui3FD1XKJ/XOsIjAQ4CASy3DE638MiwHUUJsy1fIYYHphTOdfyWMco5A5+ +okONdqPIcsa3X0Fj4Hwtx8tdzBOPhKWWjU2OQcndbbuFjnvikEqrk/WJcTBW +fPvj5A9PLNR57DkuPgHqHO+2N757cEj+hGx74gTw5u+1TePuQY9Dbv+VykxC +c5KN15adTNzY8vpWzqlJOB+eOX9/MxMdXIs/hAhNwYNHf394WXih6s3YKca+ +KVjghscN7nuhisiJtTdeTYGx51BunCELHRKbr5iq0XDj8nCojRELff999ShA +nYaF70Y3ya9lYTU3VOGiBg1DZlMtuetZuCjqQRhvGU3+LwKzGkxYKBFZXfXv +ChokpqRcpO1ZmH0mzS7ckAZe4mqRzAAWblooWNthRkNS1WHfyhssHPjN4BlT +NAToXzIOz2Xhb78aNW1vGqxuFYuszWNh5esjyQo+NIhe6r5VUcBCt0HOnwlf +GuJC7PrKS1m4+I+TTE4ADYe1NPaWPWFhkKXE+OcwGvwuvfK/+5WFtcxIzdvH +aLCQ6N4QwmFh1sRu4egYGv4XJyCu30XqB/6RcIyloTtkdUExn4X2ancyfsfR +sMcmc/DOAAuf1iTmmZykwVk4NLDoJwuFBAQss8/QsCV08b58OTbmZl/e/ewK +DU8y4y1TFrHRh9c4mJRGw4aGUY3wxWw8FjgW7pxOwyrNV58Yymyk01bG9WTQ +oPAhgvFZk417k9yDpq/R0L+uXU50NRtjauNdx27ScEbw6kNvBzZ6JTKWLykh +69cTS7XeycZPJt8HnhPHuoaHGDixka+rdCuwlIbwUrvlf3exUVrRdPbDMtI/ +NSv5IpON5U/y0bqSBoN6Jut5MBv3dJnlrX9Iw4dkzfnqZ9nYXaIlbVtLQyGI ++/Qks7Frg/+mRuLYwfFnBefYGHup86jVCxr0LZ4dXXuJjfZJvevN68j3E/Aa +tc5g48CuJVm69TSYB139FJ7PxtRbhmLvXtOgpHTCaFMhG48n5QYwGmkYrw86 +J3SHjdPjEZ13ia8vA+ukEjbq6rX8TWqi4Xd7e03WfTZq67ou3PCGhlIrxdzG +OjYqFAvH+7bQcPqnoPD5elLffOmsV8TM3L49Lg1srB/6nbDiPQ2Ss+8r8prY +GF91u7WX2L/K+cyPVjaOP9ik5/qBBnXtiwc0+GwUupXfKdlGw88PR971drNx +n+1+Dy/i5jj2qqIeNn70ut5XSny007DPeICNgTc/rdr5mYa21HfutmOkP83U +kFNfaEiZK2V2aBaFImaj9198peHBaLtrmBCFYr6xA9IdNHxrzwsJFKaw8cub +YTfiDaWmV5kiFLb2M4IHibs9w39ZSlEY7aRkK9BJ+rcykzaTofCipspCE+L1 +a6S1QJZClqT+7WPEZ8XzHQ0UKHw9bWAr0EXi9zuKFVUp1Cm77D9ITOXk18mq +U0hR09WaXPL82YMdCzQp/KL0iedG3E3JiM/WorB08sH1FzNxmS0+A6sopOf6 +DibxaLj/RyayW5/CrQot9Q+J+b2cCxxDCgPt1x/sJ15Xc+hpy1oK2/VqtzL4 +5Dz7Fyo/RApNOl2KecQSzhGrK0xIvY96sqLdNBgztloVm5I4+4qFLnGSQtfB +nK0UJnXN0QglrpxddDbTkkL3syMvzxFzv0fcvGxF4TurLVhCvLZW9n2iHYWa +weIZQ8TM4q7+49sp/HBsb5zoNxoS04oEj+2gcHBywUZN4q4Qi1UHnCnM95yv +5EQs7iG3Zd8uEh/cbhZIvNaC6+7nRmGd2JONsTPvLz1y2sOTQiOj6Yx84kpR +y+vOTLK/tffnVs/km5C7t51FocTEcWyeydfJbbKiKMwL9LDgzORruNNt7kOh +LhirfSdmVhz5jX4UijfLvJqeyX/dcuF6fwpv9fQyRHpI/kT5FasDKbQvrEhY +SNwVztust4/CTdkHc5SJxVjFzlohFKbfXpm0nHiN7dEg9TAKM4QazfWImeu2 +xSsdoNDJwrVpNXGC5qJ0+XAyT/++Xb6euFySXyJ1iEL9nn/sgLjzV3H9/MMU +htmHbzWZyf/taKfwUQoz67IlTYmN3m6j/0ZSWFFTnjvj/wMGAgHM "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6285,104 +6239,103 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV1Hk4VV0XAHCRipAhJJGxPgq9SGlaKxdFxpQhQ7ruPYYMGepVKmRoQtGk +N0OFkgzJWCqaJAmVVEou916ZMzuV6tv+OM95fs86Z62191n7qDKDtrMFBQQE +usg1cw9u1F1e0dy46c3U6p8R1VzYNJS9mmmaD5om7qsOE3Myjc5rmD6A0ZCm +tzO2Y72eI2bwHPSSEzqPEBeHRz4VNm2AtNzzbpHEJ2sX1UTmvQHmy2+MaOJ7 +zcEZ0/rvIXle/KUY4r62+sMHqz5CVWSQUzzxYr666yTjCxhaZ8ecJN72/bBx +aEMHtJzTWJJI/Gi6b354XifYRwyrJBO3RstHlAdy4YXevJQLxENzTPvG9flg +0bU36D/iOQn7XAymusG8TvFeJrGyVHpdcFUPSC5ZFJRDbKM4eWOIMQCS4lNL +7xJTV9XkdOYNwRyjtsX3iCM1beP2NnyHdTzRYzXEH+Vb/gnLG4F5io4XmolZ +u/x8zyWMQt6O4M2fiIfTBK7dDRyDuP2fXbqI56npSI7oT4CEYEbTBPF51tMt +krKTIGM6tVKghgsqN10i9aYmoVbh2qQo8dqV8UMBVTQYevY0qhL7GHU09DGm +4XyEw7kdxOPh+2eLLvsNVe7gwCSOqpq/QWveH1AXi4rcR5yKa297N/yFEBNB +pSRiVk6daUjeLLxmucS/kTiv9hwnWlEQR7NqkjqIh795HE5OEMRfK6qVRogP +a0+U3AkUQs6b11Gyj0m/Rarq3/WF0fThFlcv4rbmgUd/soRRoPQd519ildGK +XRKyc/A1u+ZtAnG+oU2KztQclLhc/auC+Nm9Q7P8q+ZheWoQU+YJFyaevuvo +YYhhrHR4zFdiaSsxyYhHYshvZKhME69qMUVxY3EsyI3ZsPgpF/x4ZVf/0ZXA +xCb2mBPxPsGGVRvFJHFYkrPrEzFfrXAkblIKs6+rSY8/I/tD1Ys0GUgjp2j8 +hsJzLgje7lZdFCyNXXqOVUCsYrB0e16/NPI2NjETiXcxzt5t5Mig1Ghzvm4t +F5q8QkLlX8niRHWX7skXXPh6M+m05zw5zE64+rCceKA/L+uWmRzeOLWggUcs +GsZ9t75GDo/7ifqY1HHBNHaHoWeZPHrYlKcJveTC/WyjidxMBbxoIfkrvZ4L +2fyfB9aFKeF4oW+GfiMXtu48/jW0QAnTzzpJ+hMPPJMxL+hWQk8p/kgOsWH2 +SlkVF2WsUuwVUmwi+8n0KBHetBSjz7d7iTZzYfQ759+eGBU8+eul7J83XJAJ +MC0tsVZD1pWNO41budCdLepj56eGpzneNVHElV+aFQfj1VDJJeFKHbGblXvM +sho1pA41X3P5QPpbcWD7ZX11dMrOGIr6SOr33Rw+Kq+BTy+sSOC1cWGH93wd +y05N9MCGob8dXIADO/WdfmtiYWxCsQOHC9pxmWtYCsvwEdeRc5NYIMvA5Kj9 +MiySXHTMvpMLBV9dne4+XoZDw0Wtt7rI+XTMj158fTkGZjNfBPJJf6bWrX1M +LYyardZp0c+FLIdLn6eOaqFitu3K28RJzE7O7CtaKFIpwBMbIPMdtb9f+Z0W +eiX9Tn1DLPUgXcCBoY1uy94reA6R+TEY0q5SX4GTPVmHkke4oKh2JvI0byVO +m/FazWguPDg1rvVDUAfNk99qPiJ2G3NpoVR1sKB+4YTRDy5kPNPQMvHQQdHc +/IXaP7mg5n3/Lf1BB8drmp3lpsl68/ma1CtdXFFu8HOOAA+UFJUpFZdVyFrf +27B1Hg9W5oSJ/QJ9rN3yWNVuMQ+YrJgJHRt9fJQiGfeVOFU95aunmz5GVF50 +CVDkgdD1oju14fp4L3W3Y8ISHrRl9O1IKdZH/tOEzCZlHpxM9UzXUjfAQ3Pz +9+9V50H3aStd5zmGmDaY6Uav5MG1EA27sobVKKrTEOWzmQfNB2BNbI4xyn1u +8+8K5YGqx3sbd/+N2Dh9oehlAQ/Yf8sLlQ4iZqwTjaf6eSDfXzlXnmmChuvS +TxcY8SHMYMOXFG1TrC+Z+rkwjg/Mwek6mT4z1NJpTXj4iQ8FJqFzM5u24DWj +tOCTm7ohe9zvcf55C9whLHJBL6cb6M2LXj+L3IYHmhrXSSp/g3YBoZHOPda4 +30c1sTjjGwQuCTobrW6LNxNp/ydLe6DQt67mQpwdGp0wV+SX9cChMYWpFb72 +OCVqk/1wWy9MWJo7vti9HY2rbRZw6F4wdk3ezLd3wLmiEMsr6IO3Cul+zwx2 +4B3rx96lnv2w+EbMg9z/7UTfewDBOgNQydG2shF3xNl2KWVPJgdAuWXY+8Cg +I/7X47T8xPNBMLiQnJ/FccKzm9uXa9wZgvTZY7opT53R6e1JB+/z36F8s15b +3D0XrP4b1VthOQypa05JTeftwoqrbvt9Xw9D0+eceIMEVwyo2R49ZjkCZdZp +Gvui3FD1XKJ/XOsIjAQ4CASy3DE638MiwHUUJsy1fIYYHphTOdfyWMco5A5+ +okONdqPIcsa3X0Fj4Hwtx8tdzBOPhKWWjU2OQcndbbuFjnvikEqrk/WJcTBW +fPvj5A9PLNR57DkuPgHqHO+2N757cEj+hGx74gTw5u+1TePuQY9Dbv+VykxC +c5KN15adTNzY8vpWzqlJOB+eOX9/MxMdXIs/hAhNwYNHf394WXih6s3YKca+ +KVjghscN7nuhisiJtTdeTYGx51BunCELHRKbr5iq0XDj8nCojRELff999ShA +nYaF70Y3ya9lYTU3VOGiBg1DZlMtuetZuCjqQRhvGU3+LwKzGkxYKBFZXfXv +ChokpqRcpO1ZmH0mzS7ckAZe4mqRzAAWblooWNthRkNS1WHfyhssHPjN4BlT +NAToXzIOz2Xhb78aNW1vGqxuFYuszWNh5esjyQo+NIhe6r5VUcBCt0HOnwlf +GuJC7PrKS1m4+I+TTE4ADYe1NPaWPWFhkKXE+OcwGvwuvfK/+5WFtcxIzdvH +aLCQ6N4QwmFh1sRu4egYGv4XJyCu30XqB/6RcIyloTtkdUExn4X2ancyfsfR +sMcmc/DOAAuf1iTmmZykwVk4NLDoJwuFBAQss8/QsCV08b58OTbmZl/e/ewK +DU8y4y1TFrHRh9c4mJRGw4aGUY3wxWw8FjgW7pxOwyrNV58Yymyk01bG9WTQ +oPAhgvFZk417k9yDpq/R0L+uXU50NRtjauNdx27ScEbw6kNvBzZ6JTKWLykh +69cTS7XeycZPJt8HnhPHuoaHGDixka+rdCuwlIbwUrvlf3exUVrRdPbDMtI/ +NSv5IpON5U/y0bqSBoN6Jut5MBv3dJnlrX9Iw4dkzfnqZ9nYXaIlbVtLQyGI ++/Qks7Frg/+mRuLYwfFnBefYGHup86jVCxr0LZ4dXXuJjfZJvevN68j3E/Aa +tc5g48CuJVm69TSYB139FJ7PxtRbhmLvXtOgpHTCaFMhG48n5QYwGmkYrw86 +J3SHjdPjEZ13ia8vA+ukEjbq6rX8TWqi4Xd7e03WfTZq67ou3PCGhlIrxdzG +OjYqFAvH+7bQcPqnoPD5elLffOmsV8TM3L49Lg1srB/6nbDiPQ2Ss+8r8prY +GF91u7WX2L/K+cyPVjaOP9ik5/qBBnXtiwc0+GwUupXfKdlGw88PR971drNx +n+1+Dy/i5jj2qqIeNn70ut5XSny007DPeICNgTc/rdr5mYa21HfutmOkP83U +kFNfaEiZK2V2aBaFImaj9198peHBaLtrmBCFYr6xA9IdNHxrzwsJFKaw8cub +YTfiDaWmV5kiFLb2M4IHibs9w39ZSlEY7aRkK9BJ+rcykzaTofCipspCE+L1 +a6S1QJZClqT+7WPEZ8XzHQ0UKHw9bWAr0EXi9zuKFVUp1Cm77D9ITOXk18mq +U0hR09WaXPL82YMdCzQp/KL0iedG3E3JiM/WorB08sH1FzNxmS0+A6sopOf6 +DibxaLj/RyayW5/CrQot9Q+J+b2cCxxDCgPt1x/sJ15Xc+hpy1oK2/VqtzL4 +5Dz7Fyo/RApNOl2KecQSzhGrK0xIvY96sqLdNBgztloVm5I4+4qFLnGSQtfB +nK0UJnXN0QglrpxddDbTkkL3syMvzxFzv0fcvGxF4TurLVhCvLZW9n2iHYWa +weIZQ8TM4q7+49sp/HBsb5zoNxoS04oEj+2gcHBywUZN4q4Qi1UHnCnM95yv +5EQs7iG3Zd8uEh/cbhZIvNaC6+7nRmGd2JONsTPvLz1y2sOTQiOj6Yx84kpR +y+vOTLK/tffnVs/km5C7t51FocTEcWyeydfJbbKiKMwL9LDgzORruNNt7kOh +LhirfSdmVhz5jX4UijfLvJqeyX/dcuF6fwpv9fQyRHpI/kT5FasDKbQvrEhY +SNwVztust4/CTdkHc5SJxVjFzlohFKbfXpm0nHiN7dEg9TAKM4QazfWImeu2 +xSsdoNDJwrVpNXGC5qJ0+XAyT/++Xb6euFySXyJ1iEL9nn/sgLjzV3H9/MMU +htmHbzWZyf/taKfwUQoz67IlTYmN3m6j/0ZSWFFTnjvj/wMGAgHM "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "PlotRange" -> {{0, 180}, {0.6171245467119154, 1.556706103361689}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6171245467119167}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6394,21 +6347,20 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.6171245467119154, 1.556706103361689}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.6171245467119167}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6422,102 +6374,102 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV1Hk4VV0XAHCRipAhJJGxPgq9SGlaKxdFxpQhQ7ruPYYMGepVKmRoQtGk +N0OFkgzJWCqaJAmVVEou916ZMzuV6tv+OM95fs86Z62191n7qDKDtrMFBQQE +usg1cw9u1F1e0dy46c3U6p8R1VzYNJS9mmmaD5om7qsOE3Myjc5rmD6A0ZCm +tzO2Y72eI2bwHPSSEzqPEBeHRz4VNm2AtNzzbpHEJ2sX1UTmvQHmy2+MaOJ7 +zcEZ0/rvIXle/KUY4r62+sMHqz5CVWSQUzzxYr666yTjCxhaZ8ecJN72/bBx +aEMHtJzTWJJI/Gi6b354XifYRwyrJBO3RstHlAdy4YXevJQLxENzTPvG9flg +0bU36D/iOQn7XAymusG8TvFeJrGyVHpdcFUPSC5ZFJRDbKM4eWOIMQCS4lNL +7xJTV9XkdOYNwRyjtsX3iCM1beP2NnyHdTzRYzXEH+Vb/gnLG4F5io4XmolZ +u/x8zyWMQt6O4M2fiIfTBK7dDRyDuP2fXbqI56npSI7oT4CEYEbTBPF51tMt +krKTIGM6tVKghgsqN10i9aYmoVbh2qQo8dqV8UMBVTQYevY0qhL7GHU09DGm +4XyEw7kdxOPh+2eLLvsNVe7gwCSOqpq/QWveH1AXi4rcR5yKa297N/yFEBNB +pSRiVk6daUjeLLxmucS/kTiv9hwnWlEQR7NqkjqIh795HE5OEMRfK6qVRogP +a0+U3AkUQs6b11Gyj0m/Rarq3/WF0fThFlcv4rbmgUd/soRRoPQd519ildGK +XRKyc/A1u+ZtAnG+oU2KztQclLhc/auC+Nm9Q7P8q+ZheWoQU+YJFyaevuvo +YYhhrHR4zFdiaSsxyYhHYshvZKhME69qMUVxY3EsyI3ZsPgpF/x4ZVf/0ZXA +xCb2mBPxPsGGVRvFJHFYkrPrEzFfrXAkblIKs6+rSY8/I/tD1Ys0GUgjp2j8 +hsJzLgje7lZdFCyNXXqOVUCsYrB0e16/NPI2NjETiXcxzt5t5Mig1Ghzvm4t +F5q8QkLlX8niRHWX7skXXPh6M+m05zw5zE64+rCceKA/L+uWmRzeOLWggUcs +GsZ9t75GDo/7ifqY1HHBNHaHoWeZPHrYlKcJveTC/WyjidxMBbxoIfkrvZ4L +2fyfB9aFKeF4oW+GfiMXtu48/jW0QAnTzzpJ+hMPPJMxL+hWQk8p/kgOsWH2 +SlkVF2WsUuwVUmwi+8n0KBHetBSjz7d7iTZzYfQ759+eGBU8+eul7J83XJAJ +MC0tsVZD1pWNO41budCdLepj56eGpzneNVHElV+aFQfj1VDJJeFKHbGblXvM +sho1pA41X3P5QPpbcWD7ZX11dMrOGIr6SOr33Rw+Kq+BTy+sSOC1cWGH93wd +y05N9MCGob8dXIADO/WdfmtiYWxCsQOHC9pxmWtYCsvwEdeRc5NYIMvA5Kj9 +MiySXHTMvpMLBV9dne4+XoZDw0Wtt7rI+XTMj158fTkGZjNfBPJJf6bWrX1M +LYyardZp0c+FLIdLn6eOaqFitu3K28RJzE7O7CtaKFIpwBMbIPMdtb9f+Z0W +eiX9Tn1DLPUgXcCBoY1uy94reA6R+TEY0q5SX4GTPVmHkke4oKh2JvI0byVO +m/FazWguPDg1rvVDUAfNk99qPiJ2G3NpoVR1sKB+4YTRDy5kPNPQMvHQQdHc +/IXaP7mg5n3/Lf1BB8drmp3lpsl68/ma1CtdXFFu8HOOAA+UFJUpFZdVyFrf +27B1Hg9W5oSJ/QJ9rN3yWNVuMQ+YrJgJHRt9fJQiGfeVOFU95aunmz5GVF50 +CVDkgdD1oju14fp4L3W3Y8ISHrRl9O1IKdZH/tOEzCZlHpxM9UzXUjfAQ3Pz +9+9V50H3aStd5zmGmDaY6Uav5MG1EA27sobVKKrTEOWzmQfNB2BNbI4xyn1u +8+8K5YGqx3sbd/+N2Dh9oehlAQ/Yf8sLlQ4iZqwTjaf6eSDfXzlXnmmChuvS +TxcY8SHMYMOXFG1TrC+Z+rkwjg/Mwek6mT4z1NJpTXj4iQ8FJqFzM5u24DWj +tOCTm7ohe9zvcf55C9whLHJBL6cb6M2LXj+L3IYHmhrXSSp/g3YBoZHOPda4 +30c1sTjjGwQuCTobrW6LNxNp/ydLe6DQt67mQpwdGp0wV+SX9cChMYWpFb72 +OCVqk/1wWy9MWJo7vti9HY2rbRZw6F4wdk3ezLd3wLmiEMsr6IO3Cul+zwx2 +4B3rx96lnv2w+EbMg9z/7UTfewDBOgNQydG2shF3xNl2KWVPJgdAuWXY+8Cg +I/7X47T8xPNBMLiQnJ/FccKzm9uXa9wZgvTZY7opT53R6e1JB+/z36F8s15b +3D0XrP4b1VthOQypa05JTeftwoqrbvt9Xw9D0+eceIMEVwyo2R49ZjkCZdZp +Gvui3FD1XKJ/XOsIjAQ4CASy3DE638MiwHUUJsy1fIYYHphTOdfyWMco5A5+ +okONdqPIcsa3X0Fj4Hwtx8tdzBOPhKWWjU2OQcndbbuFjnvikEqrk/WJcTBW +fPvj5A9PLNR57DkuPgHqHO+2N757cEj+hGx74gTw5u+1TePuQY9Dbv+VykxC +c5KN15adTNzY8vpWzqlJOB+eOX9/MxMdXIs/hAhNwYNHf394WXih6s3YKca+ +KVjghscN7nuhisiJtTdeTYGx51BunCELHRKbr5iq0XDj8nCojRELff999ShA +nYaF70Y3ya9lYTU3VOGiBg1DZlMtuetZuCjqQRhvGU3+LwKzGkxYKBFZXfXv +ChokpqRcpO1ZmH0mzS7ckAZe4mqRzAAWblooWNthRkNS1WHfyhssHPjN4BlT +NAToXzIOz2Xhb78aNW1vGqxuFYuszWNh5esjyQo+NIhe6r5VUcBCt0HOnwlf +GuJC7PrKS1m4+I+TTE4ADYe1NPaWPWFhkKXE+OcwGvwuvfK/+5WFtcxIzdvH +aLCQ6N4QwmFh1sRu4egYGv4XJyCu30XqB/6RcIyloTtkdUExn4X2ancyfsfR +sMcmc/DOAAuf1iTmmZykwVk4NLDoJwuFBAQss8/QsCV08b58OTbmZl/e/ewK +DU8y4y1TFrHRh9c4mJRGw4aGUY3wxWw8FjgW7pxOwyrNV58Yymyk01bG9WTQ +oPAhgvFZk417k9yDpq/R0L+uXU50NRtjauNdx27ScEbw6kNvBzZ6JTKWLykh +69cTS7XeycZPJt8HnhPHuoaHGDixka+rdCuwlIbwUrvlf3exUVrRdPbDMtI/ +NSv5IpON5U/y0bqSBoN6Jut5MBv3dJnlrX9Iw4dkzfnqZ9nYXaIlbVtLQyGI ++/Qks7Frg/+mRuLYwfFnBefYGHup86jVCxr0LZ4dXXuJjfZJvevN68j3E/Aa +tc5g48CuJVm69TSYB139FJ7PxtRbhmLvXtOgpHTCaFMhG48n5QYwGmkYrw86 +J3SHjdPjEZ13ia8vA+ukEjbq6rX8TWqi4Xd7e03WfTZq67ou3PCGhlIrxdzG +OjYqFAvH+7bQcPqnoPD5elLffOmsV8TM3L49Lg1srB/6nbDiPQ2Ss+8r8prY +GF91u7WX2L/K+cyPVjaOP9ik5/qBBnXtiwc0+GwUupXfKdlGw88PR971drNx +n+1+Dy/i5jj2qqIeNn70ut5XSny007DPeICNgTc/rdr5mYa21HfutmOkP83U +kFNfaEiZK2V2aBaFImaj9198peHBaLtrmBCFYr6xA9IdNHxrzwsJFKaw8cub +YTfiDaWmV5kiFLb2M4IHibs9w39ZSlEY7aRkK9BJ+rcykzaTofCipspCE+L1 +a6S1QJZClqT+7WPEZ8XzHQ0UKHw9bWAr0EXi9zuKFVUp1Cm77D9ITOXk18mq +U0hR09WaXPL82YMdCzQp/KL0iedG3E3JiM/WorB08sH1FzNxmS0+A6sopOf6 +DibxaLj/RyayW5/CrQot9Q+J+b2cCxxDCgPt1x/sJ15Xc+hpy1oK2/VqtzL4 +5Dz7Fyo/RApNOl2KecQSzhGrK0xIvY96sqLdNBgztloVm5I4+4qFLnGSQtfB +nK0UJnXN0QglrpxddDbTkkL3syMvzxFzv0fcvGxF4TurLVhCvLZW9n2iHYWa +weIZQ8TM4q7+49sp/HBsb5zoNxoS04oEj+2gcHBywUZN4q4Qi1UHnCnM95yv +5EQs7iG3Zd8uEh/cbhZIvNaC6+7nRmGd2JONsTPvLz1y2sOTQiOj6Yx84kpR +y+vOTLK/tffnVs/km5C7t51FocTEcWyeydfJbbKiKMwL9LDgzORruNNt7kOh +LhirfSdmVhz5jX4UijfLvJqeyX/dcuF6fwpv9fQyRHpI/kT5FasDKbQvrEhY +SNwVztust4/CTdkHc5SJxVjFzlohFKbfXpm0nHiN7dEg9TAKM4QazfWImeu2 +xSsdoNDJwrVpNXGC5qJ0+XAyT/++Xb6euFySXyJ1iEL9nn/sgLjzV3H9/MMU +htmHbzWZyf/taKfwUQoz67IlTYmN3m6j/0ZSWFFTnjvj/wMGAgHM "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.6171245467119154, 1.556706103361689}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.6171245467119167}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6527,7 +6479,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.9887929549829141}, + AxesOrigin->{0, 0.6171245467119167}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6555,7 +6508,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6171245467119154, 1.556706103361689}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6563,9 +6517,9 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991333813212965*^9}, - CellLabel-> - "Out[251]=",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] + CellChangeTimes->{3.991333813212965*^9, 3.994350122499069*^9, + 3.9943532200530767`*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"ca01ad66-cc1c-47ed-9f77-a5d9f1e8c1f9"] }, Open ]], Cell[CellGroupData[{ @@ -6628,372 +6582,191 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849261714945*^9},ExpressionUUID->"24fa5db0-1063-354a-bd60-\ -c117a27ff3e1"], + CellChangeTimes->{3.991849261714945*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.0784227471040894`*^-281\\\", \ -\\\"5919012181389927685417441689600000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 252, 225, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813432829*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.33706430410896`*^-269\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, 93, + 9, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.9943501231825647`*^9, + 3.9943532206216383`*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], +In[93]:=",ExpressionUUID->"9f037cef-e7d9-47ba-b370-5cc4f11e6cc4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9214123648785273`*^-295\\\", \ -\\\"2610284371992958109269091785113600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 226, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813442087*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.35070638138332`*^-280\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 93, 10, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.9943501231825647`*^9, + 3.994353220633595*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], +In[93]:=",ExpressionUUID->"e5a5f4ab-72d1-4759-95ab-24efde85d72a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*SuperscriptBox[RowBox[{\\\"(\\\", RowBox[{\\\"-\\\", \ -\\\"9.614868462060315`*^-8\\\"}], \\\")\\\"}], \\\"44\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 227, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813450123*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.132800849214769`*^-291\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 93, 11, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.9943501231825647`*^9, + 3.99435322064363*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], +In[93]:=",ExpressionUUID->"97942cf1-24b2-4a5a-a6b8-03214eb0f226"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 252, 228, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813469118*^9}, +during this calculation.\"", 2, 93, 12, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.9943501231825647`*^9, + 3.994353220653935*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], +In[93]:=",ExpressionUUID->"2da8e26c-cd98-4975-94ba-c0c9a57661f6"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VN8bB3BRoeyyj7ErQkiGGeN5SLJlqxTZfS0hSlLIviQkkoiKhDbE +zJS1kqVQqbQgKhVR9kIU+d3fX/f1ft37uq9zz3k+zzlXzjPY3pudjY1t9yo2 +tv9f5z92tCqmlRimBnHY3eTYafjmini4UW88qM5obz5OUgIUeeEp3nsO+i/n +CZiStkGY7a0ejt5iSHsz9VCetAMEJ8XOLfYwwK0gf903qb3wqdE6eLanGXb8 +y46VkvIGU8UfH2Z6umGoQrV1jfgxWOyh5Ez3fAHJw3xu99cnQcv26yWvin9B +jpMpvexuDpA+1X3zVFuG+xmtg+UPCmFDoNstzu0cePxU1eVn8SVwTsu0wXov +F9LyfnyuUbgJfXmaTTMCvGgYdd52P3sF5L++zR+mxIsGI1XBQkIV4MS30e2P +Pi++PnbSskWuAgYSpP+xe/HigHaaCrdRBQwGrTPYcJcXr3+IE1aKqYBRk6Ea +XUc+/DbbZ52/WAEL07l3Iq/yI5uI+Kj7SCWklcS8YJcQxO5MyrVX9lVgoXNQ +SERBEIUCPGMcHauAq9V+70Z1QSwODo0ZcKuCxK9K/ZZGgpjcZPftdWAVnJR/ +9u38QUFcpXxOLSW5CoKKxP8p1wticA1v5pq6KrC7VK1meUAIi6y0ey0lq0FA +rSDYxVsIB6iHZ7fJVkNXQyIjOFgIfXp2CkopV4NF/z698wlC+OPBX7N3WtVg +LPlv+4fbQvj1efwFAfNq0MmzOBC8JISP+Z2/ZIdVg9j5r6ezLwuj05xJ9Ivn +1SC++W7iQpkwGiWD2f3uapBsTo5xqRLGK8fqi8t6qoE8rXJsY4sw/hwW5wz8 +XA1KVofdG0aF8aaydsyj2WrYunpZ9+vWDahVcLnpgiQDbEJFh7Q7NyBbwPOk +EU8G2K4f/Zj7egPmJhpEm/oywL64rm9pYAMOPBpYLApggMNL5xePpzZgSGtM +uFkoA1zUrtU7iYhgjbnrOY8kBgQMbcmKdxfBArfu6YYyBpzaY27YPS+CikZr +Z/i/MUCS1SXJvkoU/YxMRzR/MKBSeM9vrfWiOOEVf9ZqkgHvul2rsmREsUUs +Y+7oPAMU7ULl7cxEcTr+jUjCWiY07ypc+/KiKFpUSV4pVmLCsulc13MDMVzw +GeYYcWNCZlnE7WVTMZT9z1bP1YsJimvZUtTtxPCRwE7Zlz5MsGpbZ3TGWwxv +rdxYX3KICfnbZZlWGWKYfSzKgSeSCXpomfv0kxim2HPNfzzPhKP6V9064sXx +fmD0tYxWJlgU8c1apovjLKPMUv0JE+Q5T6Z05YhjQbiK25MOJrx841D9+oY4 +Lgv1dkx0MUHjMA/Hxy5xpL8PqOPoY8Jo2fGyn5ISeJnjvNeecSY85B2mHlOU +QLrA6OzNSSZcCLV/8VtdAl+XP1r4M82EHcbqC0sogdam653OzjGh+MMXc05f +CSwUjMqK+8cE5w3WE1JMCYw4cnRXOj8LtkY2xF1plMBd+6k7LwqyYN2XTaJy +jyXQLs2l8aowC+rucIBynwSGj2+UKhVjgahlXabmigTGLGk2HpNhwcs4RZ0d +lpL482csCTRYcH00q/3JHklUPuknvlqTBdE2K84WrpLo7q6Q36rFAnXp90k2 +RySxs3VUS28bC1Jrz/Y45krircHBx99pLDCZ+hMR9FUS4+PJ6sfNWBBudl71 +0bgkRnBo+k6Ys6Dyqvp74XlJXE+2dHOzZIH4Hnf9Oi4p3CJwPV3XmgXjtW2/ +OTSkMJ2WMFO9mwXZ8ZmhF09IoVnFs/MfXFjQ3q+iOB4nhY8jD/IKuLFgSafl +tWGaFHaFvbU1dGeBz8ic9tBlKSQVnKRleLKAanVgRqNFCv+ardT89WHBFxHl +oFZeEp6kswnxBbNALPihtJgYCSPDnxcuE7Zq3//8oCwJHzDS134/zIJ7EWlq +/FtJOOyU58kMIb730/QPx/0kHAnRDBYNY8FDvdT8cg8S1tm+/DhEeDZLwWLF +n4RCWT817hxngauJw82SKBKOcxeGUsJZoH2zwXeqmIS8LmuqRU+ywJd9r5hx +OQkrWknYSvjSgcnH5++SsCbwYs2hKBas5ZNTpraT8Nf6Z16saBa8D0keSpwg +4UR94XOBOBbwP5M53zNPwuwoj8bLhE2U6rarskkjRaWxQDmemO+eseIXQtLo +W3FIUy2BBXEGdh6SetIo4Oj+Ym0SC8xcr/ykGEujUWpCwEnCfLFjCXutpLGo +c6PFBOFLLUllme7SuNY57k1TMgu8hrsplf7SWN6xKkHhFAtUOWU7noZKo1TU +xfA4wrUW9WNrT0ujskqNyZYUFsQEckYpZktjRLgIKYawacYePuPL0ujSSDPq +JMxbdbXQ7bo0Rm/LvytwmgVvXk1qRlUT4+kojrAnXPCL1pzfII1Bf9uzzhL2 +FDm9u7ZNGl9NxC09IaxCeTf09oU0jruaNP4lPL1fIexXnzRm3EjpVk1lQU3E +YU7BIcIP2nEv4ehL9/M0JqXxgHosVyThHQ/WqVotSGOFuNrmS4R5Bvc1HGQn +ozLV8lYt4derSq1O8ZBx+ZPLqZeE8xV+figRJeOZseGWr4Tdd0BwsywZBV76 +ePwkvNE3nW1QlYyqWd4eS4QnU/qylnXIWPjIr21VGgtYt5QVpICMH+MWMtgJ +Rz47ytIzJ2Nt9JWH/4jnjSebdjjsJuPY1PD+ecLcAnw9R13I+OzCAefvhF9q +HfDL8iXjl8YzT3sI5+6+sVh5hIxJ2jw3HhF2PTaX+iySjGG7/H6VEVbKNSb9 +SCJj4ojOnVOp/8/X2QrOTDLKuqz94EWY+X7AUCmfjP/SQqJphCOWVF4al5Cx +/JVADh9hI/JxD/dKMm5ZFyH/gZhfLmz9GVVLxksZZpuuE85JcBWpe0ZGX7Pk +a+qEnUtvl717R9w/r0X6Qayv/JMFyuwgGfP31QsXE65al+20ZY6M/WnjSasJ +H1cbHLNaISOl9QPHHaJ+DK3Vo/y5ZfDBPxrnXsLPsp4UlkrLYNa3jyXZRP1l +MzdotWyUwT8fwozVCDu99Wge1JLBGT/5wCaiXkfFl4akTGVw/yF///5EFtyh +mofp28qgT7K3sSfhMOcLnPucZDAwWKtiiMgDR5Gm6rkgGXS14zIeIPLS+Siq +4c4JGbwvGBVsRzjza6fV83gZ5NW4oNtM5Iu80TuYK1cG/6nm5V2IJfpL5UVW +9EMZNKQ7Dawj8mnS07U82S6D3EszT/2I/Fqzrd7p1i2Di0e//Gwm8u1lH9QH +wzJYxZEyHhBJ5CFSLiZ2jSyK3dWtyTzBgqf8jdf01sniWfrH0y+J/mFb4tA+ +zSeL/2iHCnkIH3ieJughLovmJVIXw4+x4LDM/DWjzbIoFPltSpnoT3PMzPbF +LbKosnWK3fwIsZ5mmyeqdWQx5Ej5f75EP0s64q4rbyiLEaJ0yYtBRD23dLaz +28niQbea4y/9WdDqWzjREiaLqe/EbDKJ/mm+pC90MlIW/w4dZT/hwYKuzDe6 +OrGyeMzkFcmZ6Ld9ddyxJadlsSyhOV3Claj39aFCSZdkcd8JwaSDjkR/rzKj +mDbL4tO2Zl03GxYELszEtvPK4bWda9rK9Yj5O+Ij+k1IDn3J+TYcFKK+fry/ +zSEuh+cu2wzsJfaX0v6Wd4bycqh3IGn1FLH/fHyQo3ZXVw4F2bWfzqiywCZJ +v/eqmxyeJify0khEfxWK2xJZLYc8bS+Oj/1lAlvaXGvePTk863054PEiE7o4 +/J3uNchhXVFJ2eXfTAiYs0+aaZPD1BLDv/iLCSW9iv2+7+XQp2zY+cAPJogW +tifv4ZDHnLqm+cEeJixuFviovlcev+u42kMVE+YvS8ZtdZLH330yTGYFE2b5 +lRT13eQxm8etRfE2EyZ/6fubHJTH6BnBv0ulTPjS4DXvFCWP10vSVycXMKHT +soYvpVQeP5x4ELCURJxPAlzhy5w8OqYVrkndzwSD2+VFFy4ooGk83iudZUC/ +7O3CHQUKWNTIlZM5w4CICzevzBYqoEWNM184cZ6qiSu7ZH9TAYW+CfQajzJA +e39RHl+jAvJ5nftb188AlTXnM5M/K+A70Yfyes0MEHWLjA1TU8Tsw2PzsWcY +MCNk4e7QrIirg9lVK6QZMJTu7hDCqYxPV2LMWYLVYD513HxYdyPmJNhuXVy+ +A+NeXEdZMZuwXeT04ZjkCuJ/Qoz9VLMKlu9qrQpdexuEnitnVE2pYqTrckBr ++Q0gpdyx1dVVwz4DPSeFTWWQt1lfQNhXHZX5JCXiP12DTkmjbb+yNHD63nDp +lvqrQCU1Z255twX9N/qM6vMXAh9HcahHvCZGn34QKkQvAHKcjIGjshaePTKS +zxuUC9xKzvfsn2ihu2HWWM6686BBl7hz3EUbbfSVnTy1syDko1CLBdtWjFjO +rZz8lg5Tv9L3mudtxak04+pkrxTYueVxvrm6DjLawzVm4hLhwS/a399dOpg4 +L7KGMRALQWra7195b8NtW7JGzIYjgT753xtHbl1MdatSGEwJgx2K4rt4i3Xx +86X8oIt7QoA10Sb3X4kucqsMjCfvCAHFmqPz9WW66MMX+ilaNwRWW7wo9Lut +iyyGFk+GeAg0Byf/bGHp4pjEyMSmD0fAsGE2N+KJLjoVFShZ+R0BXftXX0bG +dbH+xS+KQvJh2BSbeqKZQkFaSR8M3D8EjbTSNVZUCpanPn0cWXwIbH8/PPfW +gIK8PSPdmqcOwYmgufJRIwq2/ntt2m97CNqd3T/zWVFwZEPtVs3hQPDT17U4 +4E5BzYODn7oEA+Hmz89SsykUZE+5S0uO8AdVb/2HSu8p+Ls68q3MKV84K2/9 +J2GAglrb1O9TQ3xh9pPnti8fKUiusanwdvGFB07pt698peDUQdHYsa2+YG/7 +KVdsgoJ8F28P3v3sA+G0pMPcbHroJzMnS0cfaBd8JTehpIcr5dSRbi5v8H7g +l8g6oocZnPUSgo89YfLQj+M7QvXwxjP5M6FMTzghHRjwLkwPBYuqJEaLPCH1 +ZLD9QqQeDrAZ261EekIVNUzWIFkPOz9Hs01oe8LSvYTGlnw9vPy59WrDNQ84 +d+fKbHeLHv5S8eTqy3SHh0Vv/psR0cfFJ2AVqe4Cg1ZybmHi+ug9ljarIeAC +bIuHHP9K6uNY5/rkpZ/OYGzHab1GVh+jt/NKDNc6w+NVVIqEqj6Wzs1Ofd/h +DM88C7mNDPXRjVefk/HfAXiv6F+Z6aOPK52XFutZjjB7Y+X3lhp9fPzixv0n ++Q7wzcG06HSdPir4JoouJDpA7+ozZl8b9JF/X5cMLdgBGtwlL15o0kfhzFHe +xe0OEC++jbrcoY8h6PrZfnIvCKT4n+wc0MePvkltIaZ7Qc33LZs3OxWlDG/+ +5Fy9B7yUbnPn76LirMt94eZqO4hoc/VXtqWizYC2/cMrdpDpLfSUYU9Fpw1N +b7rS7KCxNDz96T4qCqa4+Cv62MEGZTP+ZQ8qrpPcRbkhZQePlYc3uIdRUSEg +9uiaVFtQ3SQjq1xIxRu1bV6eI9aA7d2xjKtU3C6SduBumzU4+CV/NiyhYs49 +JWOVEmtIuDFRvO8mFZvZAg8d9bCGgU2NSqeZVHTwI9EyPuyCDBXHzeNPqFgn +6zTU1m8FM6rZuoxpKu5TC7oQP2UBvc9wh/AvYnyHO4xrX1tAU9Dk7tA5Kj4Z +1mvirLWADIb5Ed0/VGycz+z/FWsBqlS28noOGlYmle7+J2wBnuaH5FpEaah7 +tye409Ac3vju5HljQMO+1X/UmWU7obbk7+e5FBpe7AnszmgwAd3tob8t0mi4 ++98oD0+ZCdz9PM5TdIaGZWZdUZczTYBB/kixOEfDW5zZTUveJlCe13TmSgEN +pQ8XLd0SNIGi9CT9nZU05Cux56wN3A6nQ/mz8l7T8MHDKHdFLWPgEk4pm3hL +w1iOPhI32RiSq9kajXtpyHVDUohtvTEkTs58Gx+gIb3S219x2Aii/d4YGH2j +4bWAKZUd+UYQ4nxx9PsCDc/9s2jr4zQCJxMFpJENcE79msCrTwDLb7j4WmQN +8PET+zn+BoAi78l+CwUDHO7rCz52AeBbct1xp00GaKnQmcvcBRDSYXMnXNsA +j2wr6V64bwip1ifJtaYGaLNWyyyllA71+98u6QQbYGqZyc6nZ2ng8r2+s/GI +Adbguo6LwTRgiyjKMwk1wMoZkyupNjQwLQjQ2RNugIqiVx5189Og+8OqwKMJ +BohkHt/FLCr88NTor841wI0xM/sTL+mD1KFTdRpNBkhzs91d00GBjBWfbWnN +BjjwRUwz9A4F2M+ZVo+0GuAzT98cyxwK/Li35mZRhwFy0VzyzT0oUM+WmCf0 +2gC3fW+fj/mjC07nY4/PDxtg0F29qEdaupDXEL7twXo63tokdeI3Qwd4rB2r +JfnoOGKUmtlboAOxg3rqxwXoKEJb2f8qUQf81iwoaorQ8cXHg9e49+kAxSZs +QzGZjseEZ1vOLW2Fd19CfiVp0XGd1ljurOVWEFkXWL1rHx15Ygo4vf9qQcn2 +qIhpR+L9OVbvaoa0QDsqY3u2Mx3FkgsnFbu0wHq66m2vBx25bYTO7rqqBcnv +5ha9AumYVdCW99ZMCxaKY4wj4ug4NFXuf/OSJrynZb8uu03HaomfAbsrNMDv +WMkl80o6mnL0GCkla8B85V3v8So69oVQtiq5aYCQfO9vrXt0fNsRUFopqAGW +XNKk+010lPffd/LLCXVofFP23+u3dJx++16lxEYNLPhq1cN66Wh1PV/PaLMa +9O7smBfvpyM5lOHPzakGs/VjKa6DdLTLeRIr+XAzqF/VrPj+g44df/tCqVqb +ofG9UVj6BB0VX8Ve3sy3GSw27IYt03T8jzMxynRMFXxOHXsVOkfH7vT7VQul +qjDblJwvtkDHiegft84mqEL8n1yv+j90PNrvfsvGQxUEdG6quSzTcVaYI0EP +VOHKofq5lRU6ipcMcFlIq8L/APejiA8= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7007,331 +6780,143 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwV13k8VN8bB3BRoeyyj7ErQkiGGeN5SLJlqxTZfS0hSlLIviQkkoiKhDbE +zJS1kqVQqbQgKhVR9kIU+d3fX/f1ft37uq9zz3k+zzlXzjPY3pudjY1t9yo2 +tv9f5z92tCqmlRimBnHY3eTYafjmini4UW88qM5obz5OUgIUeeEp3nsO+i/n +CZiStkGY7a0ejt5iSHsz9VCetAMEJ8XOLfYwwK0gf903qb3wqdE6eLanGXb8 +y46VkvIGU8UfH2Z6umGoQrV1jfgxWOyh5Ez3fAHJw3xu99cnQcv26yWvin9B +jpMpvexuDpA+1X3zVFuG+xmtg+UPCmFDoNstzu0cePxU1eVn8SVwTsu0wXov +F9LyfnyuUbgJfXmaTTMCvGgYdd52P3sF5L++zR+mxIsGI1XBQkIV4MS30e2P +Pi++PnbSskWuAgYSpP+xe/HigHaaCrdRBQwGrTPYcJcXr3+IE1aKqYBRk6Ea +XUc+/DbbZ52/WAEL07l3Iq/yI5uI+Kj7SCWklcS8YJcQxO5MyrVX9lVgoXNQ +SERBEIUCPGMcHauAq9V+70Z1QSwODo0ZcKuCxK9K/ZZGgpjcZPftdWAVnJR/ +9u38QUFcpXxOLSW5CoKKxP8p1wticA1v5pq6KrC7VK1meUAIi6y0ey0lq0FA +rSDYxVsIB6iHZ7fJVkNXQyIjOFgIfXp2CkopV4NF/z698wlC+OPBX7N3WtVg +LPlv+4fbQvj1efwFAfNq0MmzOBC8JISP+Z2/ZIdVg9j5r6ezLwuj05xJ9Ivn +1SC++W7iQpkwGiWD2f3uapBsTo5xqRLGK8fqi8t6qoE8rXJsY4sw/hwW5wz8 +XA1KVofdG0aF8aaydsyj2WrYunpZ9+vWDahVcLnpgiQDbEJFh7Q7NyBbwPOk +EU8G2K4f/Zj7egPmJhpEm/oywL64rm9pYAMOPBpYLApggMNL5xePpzZgSGtM +uFkoA1zUrtU7iYhgjbnrOY8kBgQMbcmKdxfBArfu6YYyBpzaY27YPS+CikZr +Z/i/MUCS1SXJvkoU/YxMRzR/MKBSeM9vrfWiOOEVf9ZqkgHvul2rsmREsUUs +Y+7oPAMU7ULl7cxEcTr+jUjCWiY07ypc+/KiKFpUSV4pVmLCsulc13MDMVzw +GeYYcWNCZlnE7WVTMZT9z1bP1YsJimvZUtTtxPCRwE7Zlz5MsGpbZ3TGWwxv +rdxYX3KICfnbZZlWGWKYfSzKgSeSCXpomfv0kxim2HPNfzzPhKP6V9064sXx +fmD0tYxWJlgU8c1apovjLKPMUv0JE+Q5T6Z05YhjQbiK25MOJrx841D9+oY4 +Lgv1dkx0MUHjMA/Hxy5xpL8PqOPoY8Jo2fGyn5ISeJnjvNeecSY85B2mHlOU +QLrA6OzNSSZcCLV/8VtdAl+XP1r4M82EHcbqC0sogdam653OzjGh+MMXc05f +CSwUjMqK+8cE5w3WE1JMCYw4cnRXOj8LtkY2xF1plMBd+6k7LwqyYN2XTaJy +jyXQLs2l8aowC+rucIBynwSGj2+UKhVjgahlXabmigTGLGk2HpNhwcs4RZ0d +lpL482csCTRYcH00q/3JHklUPuknvlqTBdE2K84WrpLo7q6Q36rFAnXp90k2 +RySxs3VUS28bC1Jrz/Y45krircHBx99pLDCZ+hMR9FUS4+PJ6sfNWBBudl71 +0bgkRnBo+k6Ys6Dyqvp74XlJXE+2dHOzZIH4Hnf9Oi4p3CJwPV3XmgXjtW2/ +OTSkMJ2WMFO9mwXZ8ZmhF09IoVnFs/MfXFjQ3q+iOB4nhY8jD/IKuLFgSafl +tWGaFHaFvbU1dGeBz8ic9tBlKSQVnKRleLKAanVgRqNFCv+ardT89WHBFxHl +oFZeEp6kswnxBbNALPihtJgYCSPDnxcuE7Zq3//8oCwJHzDS134/zIJ7EWlq +/FtJOOyU58kMIb730/QPx/0kHAnRDBYNY8FDvdT8cg8S1tm+/DhEeDZLwWLF +n4RCWT817hxngauJw82SKBKOcxeGUsJZoH2zwXeqmIS8LmuqRU+ywJd9r5hx +OQkrWknYSvjSgcnH5++SsCbwYs2hKBas5ZNTpraT8Nf6Z16saBa8D0keSpwg +4UR94XOBOBbwP5M53zNPwuwoj8bLhE2U6rarskkjRaWxQDmemO+eseIXQtLo +W3FIUy2BBXEGdh6SetIo4Oj+Ym0SC8xcr/ykGEujUWpCwEnCfLFjCXutpLGo +c6PFBOFLLUllme7SuNY57k1TMgu8hrsplf7SWN6xKkHhFAtUOWU7noZKo1TU +xfA4wrUW9WNrT0ujskqNyZYUFsQEckYpZktjRLgIKYawacYePuPL0ujSSDPq +JMxbdbXQ7bo0Rm/LvytwmgVvXk1qRlUT4+kojrAnXPCL1pzfII1Bf9uzzhL2 +FDm9u7ZNGl9NxC09IaxCeTf09oU0jruaNP4lPL1fIexXnzRm3EjpVk1lQU3E +YU7BIcIP2nEv4ehL9/M0JqXxgHosVyThHQ/WqVotSGOFuNrmS4R5Bvc1HGQn +ozLV8lYt4derSq1O8ZBx+ZPLqZeE8xV+figRJeOZseGWr4Tdd0BwsywZBV76 +ePwkvNE3nW1QlYyqWd4eS4QnU/qylnXIWPjIr21VGgtYt5QVpICMH+MWMtgJ +Rz47ytIzJ2Nt9JWH/4jnjSebdjjsJuPY1PD+ecLcAnw9R13I+OzCAefvhF9q +HfDL8iXjl8YzT3sI5+6+sVh5hIxJ2jw3HhF2PTaX+iySjGG7/H6VEVbKNSb9 +SCJj4ojOnVOp/8/X2QrOTDLKuqz94EWY+X7AUCmfjP/SQqJphCOWVF4al5Cx +/JVADh9hI/JxD/dKMm5ZFyH/gZhfLmz9GVVLxksZZpuuE85JcBWpe0ZGX7Pk +a+qEnUtvl717R9w/r0X6Qayv/JMFyuwgGfP31QsXE65al+20ZY6M/WnjSasJ +H1cbHLNaISOl9QPHHaJ+DK3Vo/y5ZfDBPxrnXsLPsp4UlkrLYNa3jyXZRP1l +MzdotWyUwT8fwozVCDu99Wge1JLBGT/5wCaiXkfFl4akTGVw/yF///5EFtyh +mofp28qgT7K3sSfhMOcLnPucZDAwWKtiiMgDR5Gm6rkgGXS14zIeIPLS+Siq +4c4JGbwvGBVsRzjza6fV83gZ5NW4oNtM5Iu80TuYK1cG/6nm5V2IJfpL5UVW +9EMZNKQ7Dawj8mnS07U82S6D3EszT/2I/Fqzrd7p1i2Di0e//Gwm8u1lH9QH +wzJYxZEyHhBJ5CFSLiZ2jSyK3dWtyTzBgqf8jdf01sniWfrH0y+J/mFb4tA+ +zSeL/2iHCnkIH3ieJughLovmJVIXw4+x4LDM/DWjzbIoFPltSpnoT3PMzPbF +LbKosnWK3fwIsZ5mmyeqdWQx5Ej5f75EP0s64q4rbyiLEaJ0yYtBRD23dLaz +28niQbea4y/9WdDqWzjREiaLqe/EbDKJ/mm+pC90MlIW/w4dZT/hwYKuzDe6 +OrGyeMzkFcmZ6Ld9ddyxJadlsSyhOV3Claj39aFCSZdkcd8JwaSDjkR/rzKj +mDbL4tO2Zl03GxYELszEtvPK4bWda9rK9Yj5O+Ij+k1IDn3J+TYcFKK+fry/ +zSEuh+cu2wzsJfaX0v6Wd4bycqh3IGn1FLH/fHyQo3ZXVw4F2bWfzqiywCZJ +v/eqmxyeJify0khEfxWK2xJZLYc8bS+Oj/1lAlvaXGvePTk863054PEiE7o4 +/J3uNchhXVFJ2eXfTAiYs0+aaZPD1BLDv/iLCSW9iv2+7+XQp2zY+cAPJogW +tifv4ZDHnLqm+cEeJixuFviovlcev+u42kMVE+YvS8ZtdZLH330yTGYFE2b5 +lRT13eQxm8etRfE2EyZ/6fubHJTH6BnBv0ulTPjS4DXvFCWP10vSVycXMKHT +soYvpVQeP5x4ELCURJxPAlzhy5w8OqYVrkndzwSD2+VFFy4ooGk83iudZUC/ +7O3CHQUKWNTIlZM5w4CICzevzBYqoEWNM184cZ6qiSu7ZH9TAYW+CfQajzJA +e39RHl+jAvJ5nftb188AlTXnM5M/K+A70Yfyes0MEHWLjA1TU8Tsw2PzsWcY +MCNk4e7QrIirg9lVK6QZMJTu7hDCqYxPV2LMWYLVYD513HxYdyPmJNhuXVy+ +A+NeXEdZMZuwXeT04ZjkCuJ/Qoz9VLMKlu9qrQpdexuEnitnVE2pYqTrckBr ++Q0gpdyx1dVVwz4DPSeFTWWQt1lfQNhXHZX5JCXiP12DTkmjbb+yNHD63nDp +lvqrQCU1Z255twX9N/qM6vMXAh9HcahHvCZGn34QKkQvAHKcjIGjshaePTKS +zxuUC9xKzvfsn2ihu2HWWM6686BBl7hz3EUbbfSVnTy1syDko1CLBdtWjFjO +rZz8lg5Tv9L3mudtxak04+pkrxTYueVxvrm6DjLawzVm4hLhwS/a399dOpg4 +L7KGMRALQWra7195b8NtW7JGzIYjgT753xtHbl1MdatSGEwJgx2K4rt4i3Xx +86X8oIt7QoA10Sb3X4kucqsMjCfvCAHFmqPz9WW66MMX+ilaNwRWW7wo9Lut +iyyGFk+GeAg0Byf/bGHp4pjEyMSmD0fAsGE2N+KJLjoVFShZ+R0BXftXX0bG +dbH+xS+KQvJh2BSbeqKZQkFaSR8M3D8EjbTSNVZUCpanPn0cWXwIbH8/PPfW +gIK8PSPdmqcOwYmgufJRIwq2/ntt2m97CNqd3T/zWVFwZEPtVs3hQPDT17U4 +4E5BzYODn7oEA+Hmz89SsykUZE+5S0uO8AdVb/2HSu8p+Ls68q3MKV84K2/9 +J2GAglrb1O9TQ3xh9pPnti8fKUiusanwdvGFB07pt698peDUQdHYsa2+YG/7 +KVdsgoJ8F28P3v3sA+G0pMPcbHroJzMnS0cfaBd8JTehpIcr5dSRbi5v8H7g +l8g6oocZnPUSgo89YfLQj+M7QvXwxjP5M6FMTzghHRjwLkwPBYuqJEaLPCH1 +ZLD9QqQeDrAZ261EekIVNUzWIFkPOz9Hs01oe8LSvYTGlnw9vPy59WrDNQ84 +d+fKbHeLHv5S8eTqy3SHh0Vv/psR0cfFJ2AVqe4Cg1ZybmHi+ug9ljarIeAC +bIuHHP9K6uNY5/rkpZ/OYGzHab1GVh+jt/NKDNc6w+NVVIqEqj6Wzs1Ofd/h +DM88C7mNDPXRjVefk/HfAXiv6F+Z6aOPK52XFutZjjB7Y+X3lhp9fPzixv0n ++Q7wzcG06HSdPir4JoouJDpA7+ozZl8b9JF/X5cMLdgBGtwlL15o0kfhzFHe +xe0OEC++jbrcoY8h6PrZfnIvCKT4n+wc0MePvkltIaZ7Qc33LZs3OxWlDG/+ +5Fy9B7yUbnPn76LirMt94eZqO4hoc/VXtqWizYC2/cMrdpDpLfSUYU9Fpw1N +b7rS7KCxNDz96T4qCqa4+Cv62MEGZTP+ZQ8qrpPcRbkhZQePlYc3uIdRUSEg +9uiaVFtQ3SQjq1xIxRu1bV6eI9aA7d2xjKtU3C6SduBumzU4+CV/NiyhYs49 +JWOVEmtIuDFRvO8mFZvZAg8d9bCGgU2NSqeZVHTwI9EyPuyCDBXHzeNPqFgn +6zTU1m8FM6rZuoxpKu5TC7oQP2UBvc9wh/AvYnyHO4xrX1tAU9Dk7tA5Kj4Z +1mvirLWADIb5Ed0/VGycz+z/FWsBqlS28noOGlYmle7+J2wBnuaH5FpEaah7 +tye409Ac3vju5HljQMO+1X/UmWU7obbk7+e5FBpe7AnszmgwAd3tob8t0mi4 ++98oD0+ZCdz9PM5TdIaGZWZdUZczTYBB/kixOEfDW5zZTUveJlCe13TmSgEN +pQ8XLd0SNIGi9CT9nZU05Cux56wN3A6nQ/mz8l7T8MHDKHdFLWPgEk4pm3hL +w1iOPhI32RiSq9kajXtpyHVDUohtvTEkTs58Gx+gIb3S219x2Aii/d4YGH2j +4bWAKZUd+UYQ4nxx9PsCDc/9s2jr4zQCJxMFpJENcE79msCrTwDLb7j4WmQN +8PET+zn+BoAi78l+CwUDHO7rCz52AeBbct1xp00GaKnQmcvcBRDSYXMnXNsA +j2wr6V64bwip1ifJtaYGaLNWyyyllA71+98u6QQbYGqZyc6nZ2ng8r2+s/GI +Adbguo6LwTRgiyjKMwk1wMoZkyupNjQwLQjQ2RNugIqiVx5189Og+8OqwKMJ +BohkHt/FLCr88NTor841wI0xM/sTL+mD1KFTdRpNBkhzs91d00GBjBWfbWnN +BjjwRUwz9A4F2M+ZVo+0GuAzT98cyxwK/Li35mZRhwFy0VzyzT0oUM+WmCf0 +2gC3fW+fj/mjC07nY4/PDxtg0F29qEdaupDXEL7twXo63tokdeI3Qwd4rB2r +JfnoOGKUmtlboAOxg3rqxwXoKEJb2f8qUQf81iwoaorQ8cXHg9e49+kAxSZs +QzGZjseEZ1vOLW2Fd19CfiVp0XGd1ljurOVWEFkXWL1rHx15Ygo4vf9qQcn2 +qIhpR+L9OVbvaoa0QDsqY3u2Mx3FkgsnFbu0wHq66m2vBx25bYTO7rqqBcnv +5ha9AumYVdCW99ZMCxaKY4wj4ug4NFXuf/OSJrynZb8uu03HaomfAbsrNMDv +WMkl80o6mnL0GCkla8B85V3v8So69oVQtiq5aYCQfO9vrXt0fNsRUFopqAGW +XNKk+010lPffd/LLCXVofFP23+u3dJx++16lxEYNLPhq1cN66Wh1PV/PaLMa +9O7smBfvpyM5lOHPzakGs/VjKa6DdLTLeRIr+XAzqF/VrPj+g44df/tCqVqb +ofG9UVj6BB0VX8Ve3sy3GSw27IYt03T8jzMxynRMFXxOHXsVOkfH7vT7VQul +qjDblJwvtkDHiegft84mqEL8n1yv+j90PNrvfsvGQxUEdG6quSzTcVaYI0EP +VOHKofq5lRU6ipcMcFlIq8L/APejiA8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.08024612417694452}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7343,19 +6928,19 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.08024612417694452}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7369,330 +6954,142 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwV13k8VN8bB3BRoeyyj7ErQkiGGeN5SLJlqxTZfS0hSlLIviQkkoiKhDbE +zJS1kqVQqbQgKhVR9kIU+d3fX/f1ft37uq9zz3k+zzlXzjPY3pudjY1t9yo2 +tv9f5z92tCqmlRimBnHY3eTYafjmini4UW88qM5obz5OUgIUeeEp3nsO+i/n +CZiStkGY7a0ejt5iSHsz9VCetAMEJ8XOLfYwwK0gf903qb3wqdE6eLanGXb8 +y46VkvIGU8UfH2Z6umGoQrV1jfgxWOyh5Ez3fAHJw3xu99cnQcv26yWvin9B +jpMpvexuDpA+1X3zVFuG+xmtg+UPCmFDoNstzu0cePxU1eVn8SVwTsu0wXov +F9LyfnyuUbgJfXmaTTMCvGgYdd52P3sF5L++zR+mxIsGI1XBQkIV4MS30e2P +Pi++PnbSskWuAgYSpP+xe/HigHaaCrdRBQwGrTPYcJcXr3+IE1aKqYBRk6Ea +XUc+/DbbZ52/WAEL07l3Iq/yI5uI+Kj7SCWklcS8YJcQxO5MyrVX9lVgoXNQ +SERBEIUCPGMcHauAq9V+70Z1QSwODo0ZcKuCxK9K/ZZGgpjcZPftdWAVnJR/ +9u38QUFcpXxOLSW5CoKKxP8p1wticA1v5pq6KrC7VK1meUAIi6y0ey0lq0FA +rSDYxVsIB6iHZ7fJVkNXQyIjOFgIfXp2CkopV4NF/z698wlC+OPBX7N3WtVg +LPlv+4fbQvj1efwFAfNq0MmzOBC8JISP+Z2/ZIdVg9j5r6ezLwuj05xJ9Ivn +1SC++W7iQpkwGiWD2f3uapBsTo5xqRLGK8fqi8t6qoE8rXJsY4sw/hwW5wz8 +XA1KVofdG0aF8aaydsyj2WrYunpZ9+vWDahVcLnpgiQDbEJFh7Q7NyBbwPOk +EU8G2K4f/Zj7egPmJhpEm/oywL64rm9pYAMOPBpYLApggMNL5xePpzZgSGtM +uFkoA1zUrtU7iYhgjbnrOY8kBgQMbcmKdxfBArfu6YYyBpzaY27YPS+CikZr +Z/i/MUCS1SXJvkoU/YxMRzR/MKBSeM9vrfWiOOEVf9ZqkgHvul2rsmREsUUs +Y+7oPAMU7ULl7cxEcTr+jUjCWiY07ypc+/KiKFpUSV4pVmLCsulc13MDMVzw +GeYYcWNCZlnE7WVTMZT9z1bP1YsJimvZUtTtxPCRwE7Zlz5MsGpbZ3TGWwxv +rdxYX3KICfnbZZlWGWKYfSzKgSeSCXpomfv0kxim2HPNfzzPhKP6V9064sXx +fmD0tYxWJlgU8c1apovjLKPMUv0JE+Q5T6Z05YhjQbiK25MOJrx841D9+oY4 +Lgv1dkx0MUHjMA/Hxy5xpL8PqOPoY8Jo2fGyn5ISeJnjvNeecSY85B2mHlOU +QLrA6OzNSSZcCLV/8VtdAl+XP1r4M82EHcbqC0sogdam653OzjGh+MMXc05f +CSwUjMqK+8cE5w3WE1JMCYw4cnRXOj8LtkY2xF1plMBd+6k7LwqyYN2XTaJy +jyXQLs2l8aowC+rucIBynwSGj2+UKhVjgahlXabmigTGLGk2HpNhwcs4RZ0d +lpL482csCTRYcH00q/3JHklUPuknvlqTBdE2K84WrpLo7q6Q36rFAnXp90k2 +RySxs3VUS28bC1Jrz/Y45krircHBx99pLDCZ+hMR9FUS4+PJ6sfNWBBudl71 +0bgkRnBo+k6Ys6Dyqvp74XlJXE+2dHOzZIH4Hnf9Oi4p3CJwPV3XmgXjtW2/ +OTSkMJ2WMFO9mwXZ8ZmhF09IoVnFs/MfXFjQ3q+iOB4nhY8jD/IKuLFgSafl +tWGaFHaFvbU1dGeBz8ic9tBlKSQVnKRleLKAanVgRqNFCv+ardT89WHBFxHl +oFZeEp6kswnxBbNALPihtJgYCSPDnxcuE7Zq3//8oCwJHzDS134/zIJ7EWlq +/FtJOOyU58kMIb730/QPx/0kHAnRDBYNY8FDvdT8cg8S1tm+/DhEeDZLwWLF +n4RCWT817hxngauJw82SKBKOcxeGUsJZoH2zwXeqmIS8LmuqRU+ywJd9r5hx +OQkrWknYSvjSgcnH5++SsCbwYs2hKBas5ZNTpraT8Nf6Z16saBa8D0keSpwg +4UR94XOBOBbwP5M53zNPwuwoj8bLhE2U6rarskkjRaWxQDmemO+eseIXQtLo +W3FIUy2BBXEGdh6SetIo4Oj+Ym0SC8xcr/ykGEujUWpCwEnCfLFjCXutpLGo +c6PFBOFLLUllme7SuNY57k1TMgu8hrsplf7SWN6xKkHhFAtUOWU7noZKo1TU +xfA4wrUW9WNrT0ujskqNyZYUFsQEckYpZktjRLgIKYawacYePuPL0ujSSDPq +JMxbdbXQ7bo0Rm/LvytwmgVvXk1qRlUT4+kojrAnXPCL1pzfII1Bf9uzzhL2 +FDm9u7ZNGl9NxC09IaxCeTf09oU0jruaNP4lPL1fIexXnzRm3EjpVk1lQU3E +YU7BIcIP2nEv4ehL9/M0JqXxgHosVyThHQ/WqVotSGOFuNrmS4R5Bvc1HGQn +ozLV8lYt4derSq1O8ZBx+ZPLqZeE8xV+figRJeOZseGWr4Tdd0BwsywZBV76 +ePwkvNE3nW1QlYyqWd4eS4QnU/qylnXIWPjIr21VGgtYt5QVpICMH+MWMtgJ +Rz47ytIzJ2Nt9JWH/4jnjSebdjjsJuPY1PD+ecLcAnw9R13I+OzCAefvhF9q +HfDL8iXjl8YzT3sI5+6+sVh5hIxJ2jw3HhF2PTaX+iySjGG7/H6VEVbKNSb9 +SCJj4ojOnVOp/8/X2QrOTDLKuqz94EWY+X7AUCmfjP/SQqJphCOWVF4al5Cx +/JVADh9hI/JxD/dKMm5ZFyH/gZhfLmz9GVVLxksZZpuuE85JcBWpe0ZGX7Pk +a+qEnUtvl717R9w/r0X6Qayv/JMFyuwgGfP31QsXE65al+20ZY6M/WnjSasJ +H1cbHLNaISOl9QPHHaJ+DK3Vo/y5ZfDBPxrnXsLPsp4UlkrLYNa3jyXZRP1l +MzdotWyUwT8fwozVCDu99Wge1JLBGT/5wCaiXkfFl4akTGVw/yF///5EFtyh +mofp28qgT7K3sSfhMOcLnPucZDAwWKtiiMgDR5Gm6rkgGXS14zIeIPLS+Siq +4c4JGbwvGBVsRzjza6fV83gZ5NW4oNtM5Iu80TuYK1cG/6nm5V2IJfpL5UVW +9EMZNKQ7Dawj8mnS07U82S6D3EszT/2I/Fqzrd7p1i2Di0e//Gwm8u1lH9QH +wzJYxZEyHhBJ5CFSLiZ2jSyK3dWtyTzBgqf8jdf01sniWfrH0y+J/mFb4tA+ +zSeL/2iHCnkIH3ieJughLovmJVIXw4+x4LDM/DWjzbIoFPltSpnoT3PMzPbF +LbKosnWK3fwIsZ5mmyeqdWQx5Ej5f75EP0s64q4rbyiLEaJ0yYtBRD23dLaz +28niQbea4y/9WdDqWzjREiaLqe/EbDKJ/mm+pC90MlIW/w4dZT/hwYKuzDe6 +OrGyeMzkFcmZ6Ld9ddyxJadlsSyhOV3Claj39aFCSZdkcd8JwaSDjkR/rzKj +mDbL4tO2Zl03GxYELszEtvPK4bWda9rK9Yj5O+Ij+k1IDn3J+TYcFKK+fry/ +zSEuh+cu2wzsJfaX0v6Wd4bycqh3IGn1FLH/fHyQo3ZXVw4F2bWfzqiywCZJ +v/eqmxyeJify0khEfxWK2xJZLYc8bS+Oj/1lAlvaXGvePTk863054PEiE7o4 +/J3uNchhXVFJ2eXfTAiYs0+aaZPD1BLDv/iLCSW9iv2+7+XQp2zY+cAPJogW +tifv4ZDHnLqm+cEeJixuFviovlcev+u42kMVE+YvS8ZtdZLH330yTGYFE2b5 +lRT13eQxm8etRfE2EyZ/6fubHJTH6BnBv0ulTPjS4DXvFCWP10vSVycXMKHT +soYvpVQeP5x4ELCURJxPAlzhy5w8OqYVrkndzwSD2+VFFy4ooGk83iudZUC/ +7O3CHQUKWNTIlZM5w4CICzevzBYqoEWNM184cZ6qiSu7ZH9TAYW+CfQajzJA +e39RHl+jAvJ5nftb188AlTXnM5M/K+A70Yfyes0MEHWLjA1TU8Tsw2PzsWcY +MCNk4e7QrIirg9lVK6QZMJTu7hDCqYxPV2LMWYLVYD513HxYdyPmJNhuXVy+ +A+NeXEdZMZuwXeT04ZjkCuJ/Qoz9VLMKlu9qrQpdexuEnitnVE2pYqTrckBr ++Q0gpdyx1dVVwz4DPSeFTWWQt1lfQNhXHZX5JCXiP12DTkmjbb+yNHD63nDp +lvqrQCU1Z255twX9N/qM6vMXAh9HcahHvCZGn34QKkQvAHKcjIGjshaePTKS +zxuUC9xKzvfsn2ihu2HWWM6686BBl7hz3EUbbfSVnTy1syDko1CLBdtWjFjO +rZz8lg5Tv9L3mudtxak04+pkrxTYueVxvrm6DjLawzVm4hLhwS/a399dOpg4 +L7KGMRALQWra7195b8NtW7JGzIYjgT753xtHbl1MdatSGEwJgx2K4rt4i3Xx +86X8oIt7QoA10Sb3X4kucqsMjCfvCAHFmqPz9WW66MMX+ilaNwRWW7wo9Lut +iyyGFk+GeAg0Byf/bGHp4pjEyMSmD0fAsGE2N+KJLjoVFShZ+R0BXftXX0bG +dbH+xS+KQvJh2BSbeqKZQkFaSR8M3D8EjbTSNVZUCpanPn0cWXwIbH8/PPfW +gIK8PSPdmqcOwYmgufJRIwq2/ntt2m97CNqd3T/zWVFwZEPtVs3hQPDT17U4 +4E5BzYODn7oEA+Hmz89SsykUZE+5S0uO8AdVb/2HSu8p+Ls68q3MKV84K2/9 +J2GAglrb1O9TQ3xh9pPnti8fKUiusanwdvGFB07pt698peDUQdHYsa2+YG/7 +KVdsgoJ8F28P3v3sA+G0pMPcbHroJzMnS0cfaBd8JTehpIcr5dSRbi5v8H7g +l8g6oocZnPUSgo89YfLQj+M7QvXwxjP5M6FMTzghHRjwLkwPBYuqJEaLPCH1 +ZLD9QqQeDrAZ261EekIVNUzWIFkPOz9Hs01oe8LSvYTGlnw9vPy59WrDNQ84 +d+fKbHeLHv5S8eTqy3SHh0Vv/psR0cfFJ2AVqe4Cg1ZybmHi+ug9ljarIeAC +bIuHHP9K6uNY5/rkpZ/OYGzHab1GVh+jt/NKDNc6w+NVVIqEqj6Wzs1Ofd/h +DM88C7mNDPXRjVefk/HfAXiv6F+Z6aOPK52XFutZjjB7Y+X3lhp9fPzixv0n ++Q7wzcG06HSdPir4JoouJDpA7+ozZl8b9JF/X5cMLdgBGtwlL15o0kfhzFHe +xe0OEC++jbrcoY8h6PrZfnIvCKT4n+wc0MePvkltIaZ7Qc33LZs3OxWlDG/+ +5Fy9B7yUbnPn76LirMt94eZqO4hoc/VXtqWizYC2/cMrdpDpLfSUYU9Fpw1N +b7rS7KCxNDz96T4qCqa4+Cv62MEGZTP+ZQ8qrpPcRbkhZQePlYc3uIdRUSEg +9uiaVFtQ3SQjq1xIxRu1bV6eI9aA7d2xjKtU3C6SduBumzU4+CV/NiyhYs49 +JWOVEmtIuDFRvO8mFZvZAg8d9bCGgU2NSqeZVHTwI9EyPuyCDBXHzeNPqFgn +6zTU1m8FM6rZuoxpKu5TC7oQP2UBvc9wh/AvYnyHO4xrX1tAU9Dk7tA5Kj4Z +1mvirLWADIb5Ed0/VGycz+z/FWsBqlS28noOGlYmle7+J2wBnuaH5FpEaah7 +tye409Ac3vju5HljQMO+1X/UmWU7obbk7+e5FBpe7AnszmgwAd3tob8t0mi4 ++98oD0+ZCdz9PM5TdIaGZWZdUZczTYBB/kixOEfDW5zZTUveJlCe13TmSgEN +pQ8XLd0SNIGi9CT9nZU05Cux56wN3A6nQ/mz8l7T8MHDKHdFLWPgEk4pm3hL +w1iOPhI32RiSq9kajXtpyHVDUohtvTEkTs58Gx+gIb3S219x2Aii/d4YGH2j +4bWAKZUd+UYQ4nxx9PsCDc/9s2jr4zQCJxMFpJENcE79msCrTwDLb7j4WmQN +8PET+zn+BoAi78l+CwUDHO7rCz52AeBbct1xp00GaKnQmcvcBRDSYXMnXNsA +j2wr6V64bwip1ifJtaYGaLNWyyyllA71+98u6QQbYGqZyc6nZ2ng8r2+s/GI +Adbguo6LwTRgiyjKMwk1wMoZkyupNjQwLQjQ2RNugIqiVx5189Og+8OqwKMJ +BohkHt/FLCr88NTor841wI0xM/sTL+mD1KFTdRpNBkhzs91d00GBjBWfbWnN +BjjwRUwz9A4F2M+ZVo+0GuAzT98cyxwK/Li35mZRhwFy0VzyzT0oUM+WmCf0 +2gC3fW+fj/mjC07nY4/PDxtg0F29qEdaupDXEL7twXo63tokdeI3Qwd4rB2r +JfnoOGKUmtlboAOxg3rqxwXoKEJb2f8qUQf81iwoaorQ8cXHg9e49+kAxSZs +QzGZjseEZ1vOLW2Fd19CfiVp0XGd1ljurOVWEFkXWL1rHx15Ygo4vf9qQcn2 +qIhpR+L9OVbvaoa0QDsqY3u2Mx3FkgsnFbu0wHq66m2vBx25bYTO7rqqBcnv +5ha9AumYVdCW99ZMCxaKY4wj4ug4NFXuf/OSJrynZb8uu03HaomfAbsrNMDv +WMkl80o6mnL0GCkla8B85V3v8So69oVQtiq5aYCQfO9vrXt0fNsRUFopqAGW +XNKk+010lPffd/LLCXVofFP23+u3dJx++16lxEYNLPhq1cN66Wh1PV/PaLMa +9O7smBfvpyM5lOHPzakGs/VjKa6DdLTLeRIr+XAzqF/VrPj+g44df/tCqVqb +ofG9UVj6BB0VX8Ve3sy3GSw27IYt03T8jzMxynRMFXxOHXsVOkfH7vT7VQul +qjDblJwvtkDHiegft84mqEL8n1yv+j90PNrvfsvGQxUEdG6quSzTcVaYI0EP +VOHKofq5lRU6ipcMcFlIq8L/APejiA8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.08024612417694452}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7703,6 +7100,7 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7730,7 +7128,8 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.17588335145564066`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08024612417694452}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7738,11 +7137,13 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991334471589432*^9}, - CellLabel-> - "Out[252]=",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] + CellChangeTimes->{3.991334471589432*^9, 3.994350957861129*^9, + 3.994354082863656*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"b94e4951-403c-415b-b12f-6978559ba8d6"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7813,15 +7214,870 @@ Cell[BoxData[ CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, 3.994084956256139*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[94]:=",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061275}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350958284556*^9, 3.9943540832079277`*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"67da212f-415b-42e0-bc0c-9fabc782c4bd"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6d3700e1-f504-214a-a332-\ -f16397f0b922"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[95]:=",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VN8bB3BRoeyyj7ErQkiGGeN5SLJlqxTZfS0hSlLIviQkkoiKhDbE +zJS1kqVQqbQgKhVR9kIU+d3fX/f1ft37uq9zz3k+zzlXzjPY3pudjY1t9yo2 +tv9f5z92tCqmlRimBnHY3eTYafjmini4UW88qM5obz5OUgIUeeEp3nsO+i/n +CZiStkGY7a0ejt5iSHsz9VCetAMEJ8XOLfYwwK0gf903qb3wqdE6eLanGXb8 +y46VkvIGU8UfH2Z6umGoQrV1jfgxWOyh5Ez3fAHJw3xu99cnQcv26yWvin9B +jpMpvexuDpA+1X3zVFuG+xmtg+UPCmFDoNstzu0cePxU1eVn8SVwTsu0wXov +F9LyfnyuUbgJfXmaTTMCvGgYdd52P3sF5L++zR+mxIsGI1XBQkIV4MS30e2P +Pi++PnbSskWuAgYSpP+xe/HigHaaCrdRBQwGrTPYcJcXr3+IE1aKqYBRk6Ea +XUc+/DbbZ52/WAEL07l3Iq/yI5uI+Kj7SCWklcS8YJcQxO5MyrVX9lVgoXNQ +SERBEIUCPGMcHauAq9V+70Z1QSwODo0ZcKuCxK9K/ZZGgpjcZPftdWAVnJR/ +9u38QUFcpXxOLSW5CoKKxP8p1wticA1v5pq6KrC7VK1meUAIi6y0ey0lq0FA +rSDYxVsIB6iHZ7fJVkNXQyIjOFgIfXp2CkopV4NF/z698wlC+OPBX7N3WtVg +LPlv+4fbQvj1efwFAfNq0MmzOBC8JISP+Z2/ZIdVg9j5r6ezLwuj05xJ9Ivn +1SC++W7iQpkwGiWD2f3uapBsTo5xqRLGK8fqi8t6qoE8rXJsY4sw/hwW5wz8 +XA1KVofdG0aF8aaydsyj2WrYunpZ9+vWDahVcLnpgiQDbEJFh7Q7NyBbwPOk +EU8G2K4f/Zj7egPmJhpEm/oywL64rm9pYAMOPBpYLApggMNL5xePpzZgSGtM +uFkoA1zUrtU7iYhgjbnrOY8kBgQMbcmKdxfBArfu6YYyBpzaY27YPS+CikZr +Z/i/MUCS1SXJvkoU/YxMRzR/MKBSeM9vrfWiOOEVf9ZqkgHvul2rsmREsUUs +Y+7oPAMU7ULl7cxEcTr+jUjCWiY07ypc+/KiKFpUSV4pVmLCsulc13MDMVzw +GeYYcWNCZlnE7WVTMZT9z1bP1YsJimvZUtTtxPCRwE7Zlz5MsGpbZ3TGWwxv +rdxYX3KICfnbZZlWGWKYfSzKgSeSCXpomfv0kxim2HPNfzzPhKP6V9064sXx +fmD0tYxWJlgU8c1apovjLKPMUv0JE+Q5T6Z05YhjQbiK25MOJrx841D9+oY4 +Lgv1dkx0MUHjMA/Hxy5xpL8PqOPoY8Jo2fGyn5ISeJnjvNeecSY85B2mHlOU +QLrA6OzNSSZcCLV/8VtdAl+XP1r4M82EHcbqC0sogdam653OzjGh+MMXc05f +CSwUjMqK+8cE5w3WE1JMCYw4cnRXOj8LtkY2xF1plMBd+6k7LwqyYN2XTaJy +jyXQLs2l8aowC+rucIBynwSGj2+UKhVjgahlXabmigTGLGk2HpNhwcs4RZ0d +lpL482csCTRYcH00q/3JHklUPuknvlqTBdE2K84WrpLo7q6Q36rFAnXp90k2 +RySxs3VUS28bC1Jrz/Y45krircHBx99pLDCZ+hMR9FUS4+PJ6sfNWBBudl71 +0bgkRnBo+k6Ys6Dyqvp74XlJXE+2dHOzZIH4Hnf9Oi4p3CJwPV3XmgXjtW2/ +OTSkMJ2WMFO9mwXZ8ZmhF09IoVnFs/MfXFjQ3q+iOB4nhY8jD/IKuLFgSafl +tWGaFHaFvbU1dGeBz8ic9tBlKSQVnKRleLKAanVgRqNFCv+ardT89WHBFxHl +oFZeEp6kswnxBbNALPihtJgYCSPDnxcuE7Zq3//8oCwJHzDS134/zIJ7EWlq +/FtJOOyU58kMIb730/QPx/0kHAnRDBYNY8FDvdT8cg8S1tm+/DhEeDZLwWLF +n4RCWT817hxngauJw82SKBKOcxeGUsJZoH2zwXeqmIS8LmuqRU+ywJd9r5hx +OQkrWknYSvjSgcnH5++SsCbwYs2hKBas5ZNTpraT8Nf6Z16saBa8D0keSpwg +4UR94XOBOBbwP5M53zNPwuwoj8bLhE2U6rarskkjRaWxQDmemO+eseIXQtLo +W3FIUy2BBXEGdh6SetIo4Oj+Ym0SC8xcr/ykGEujUWpCwEnCfLFjCXutpLGo +c6PFBOFLLUllme7SuNY57k1TMgu8hrsplf7SWN6xKkHhFAtUOWU7noZKo1TU +xfA4wrUW9WNrT0ujskqNyZYUFsQEckYpZktjRLgIKYawacYePuPL0ujSSDPq +JMxbdbXQ7bo0Rm/LvytwmgVvXk1qRlUT4+kojrAnXPCL1pzfII1Bf9uzzhL2 +FDm9u7ZNGl9NxC09IaxCeTf09oU0jruaNP4lPL1fIexXnzRm3EjpVk1lQU3E +YU7BIcIP2nEv4ehL9/M0JqXxgHosVyThHQ/WqVotSGOFuNrmS4R5Bvc1HGQn +ozLV8lYt4derSq1O8ZBx+ZPLqZeE8xV+figRJeOZseGWr4Tdd0BwsywZBV76 +ePwkvNE3nW1QlYyqWd4eS4QnU/qylnXIWPjIr21VGgtYt5QVpICMH+MWMtgJ +Rz47ytIzJ2Nt9JWH/4jnjSebdjjsJuPY1PD+ecLcAnw9R13I+OzCAefvhF9q +HfDL8iXjl8YzT3sI5+6+sVh5hIxJ2jw3HhF2PTaX+iySjGG7/H6VEVbKNSb9 +SCJj4ojOnVOp/8/X2QrOTDLKuqz94EWY+X7AUCmfjP/SQqJphCOWVF4al5Cx +/JVADh9hI/JxD/dKMm5ZFyH/gZhfLmz9GVVLxksZZpuuE85JcBWpe0ZGX7Pk +a+qEnUtvl717R9w/r0X6Qayv/JMFyuwgGfP31QsXE65al+20ZY6M/WnjSasJ +H1cbHLNaISOl9QPHHaJ+DK3Vo/y5ZfDBPxrnXsLPsp4UlkrLYNa3jyXZRP1l +MzdotWyUwT8fwozVCDu99Wge1JLBGT/5wCaiXkfFl4akTGVw/yF///5EFtyh +mofp28qgT7K3sSfhMOcLnPucZDAwWKtiiMgDR5Gm6rkgGXS14zIeIPLS+Siq +4c4JGbwvGBVsRzjza6fV83gZ5NW4oNtM5Iu80TuYK1cG/6nm5V2IJfpL5UVW +9EMZNKQ7Dawj8mnS07U82S6D3EszT/2I/Fqzrd7p1i2Di0e//Gwm8u1lH9QH +wzJYxZEyHhBJ5CFSLiZ2jSyK3dWtyTzBgqf8jdf01sniWfrH0y+J/mFb4tA+ +zSeL/2iHCnkIH3ieJughLovmJVIXw4+x4LDM/DWjzbIoFPltSpnoT3PMzPbF +LbKosnWK3fwIsZ5mmyeqdWQx5Ej5f75EP0s64q4rbyiLEaJ0yYtBRD23dLaz +28niQbea4y/9WdDqWzjREiaLqe/EbDKJ/mm+pC90MlIW/w4dZT/hwYKuzDe6 +OrGyeMzkFcmZ6Ld9ddyxJadlsSyhOV3Claj39aFCSZdkcd8JwaSDjkR/rzKj +mDbL4tO2Zl03GxYELszEtvPK4bWda9rK9Yj5O+Ij+k1IDn3J+TYcFKK+fry/ +zSEuh+cu2wzsJfaX0v6Wd4bycqh3IGn1FLH/fHyQo3ZXVw4F2bWfzqiywCZJ +v/eqmxyeJify0khEfxWK2xJZLYc8bS+Oj/1lAlvaXGvePTk863054PEiE7o4 +/J3uNchhXVFJ2eXfTAiYs0+aaZPD1BLDv/iLCSW9iv2+7+XQp2zY+cAPJogW +tifv4ZDHnLqm+cEeJixuFviovlcev+u42kMVE+YvS8ZtdZLH330yTGYFE2b5 +lRT13eQxm8etRfE2EyZ/6fubHJTH6BnBv0ulTPjS4DXvFCWP10vSVycXMKHT +soYvpVQeP5x4ELCURJxPAlzhy5w8OqYVrkndzwSD2+VFFy4ooGk83iudZUC/ +7O3CHQUKWNTIlZM5w4CICzevzBYqoEWNM184cZ6qiSu7ZH9TAYW+CfQajzJA +e39RHl+jAvJ5nftb188AlTXnM5M/K+A70Yfyes0MEHWLjA1TU8Tsw2PzsWcY +MCNk4e7QrIirg9lVK6QZMJTu7hDCqYxPV2LMWYLVYD513HxYdyPmJNhuXVy+ +A+NeXEdZMZuwXeT04ZjkCuJ/Qoz9VLMKlu9qrQpdexuEnitnVE2pYqTrckBr ++Q0gpdyx1dVVwz4DPSeFTWWQt1lfQNhXHZX5JCXiP12DTkmjbb+yNHD63nDp +lvqrQCU1Z255twX9N/qM6vMXAh9HcahHvCZGn34QKkQvAHKcjIGjshaePTKS +zxuUC9xKzvfsn2ihu2HWWM6686BBl7hz3EUbbfSVnTy1syDko1CLBdtWjFjO +rZz8lg5Tv9L3mudtxak04+pkrxTYueVxvrm6DjLawzVm4hLhwS/a399dOpg4 +L7KGMRALQWra7195b8NtW7JGzIYjgT753xtHbl1MdatSGEwJgx2K4rt4i3Xx +86X8oIt7QoA10Sb3X4kucqsMjCfvCAHFmqPz9WW66MMX+ilaNwRWW7wo9Lut +iyyGFk+GeAg0Byf/bGHp4pjEyMSmD0fAsGE2N+KJLjoVFShZ+R0BXftXX0bG +dbH+xS+KQvJh2BSbeqKZQkFaSR8M3D8EjbTSNVZUCpanPn0cWXwIbH8/PPfW +gIK8PSPdmqcOwYmgufJRIwq2/ntt2m97CNqd3T/zWVFwZEPtVs3hQPDT17U4 +4E5BzYODn7oEA+Hmz89SsykUZE+5S0uO8AdVb/2HSu8p+Ls68q3MKV84K2/9 +J2GAglrb1O9TQ3xh9pPnti8fKUiusanwdvGFB07pt698peDUQdHYsa2+YG/7 +KVdsgoJ8F28P3v3sA+G0pMPcbHroJzMnS0cfaBd8JTehpIcr5dSRbi5v8H7g +l8g6oocZnPUSgo89YfLQj+M7QvXwxjP5M6FMTzghHRjwLkwPBYuqJEaLPCH1 +ZLD9QqQeDrAZ261EekIVNUzWIFkPOz9Hs01oe8LSvYTGlnw9vPy59WrDNQ84 +d+fKbHeLHv5S8eTqy3SHh0Vv/psR0cfFJ2AVqe4Cg1ZybmHi+ug9ljarIeAC +bIuHHP9K6uNY5/rkpZ/OYGzHab1GVh+jt/NKDNc6w+NVVIqEqj6Wzs1Ofd/h +DM88C7mNDPXRjVefk/HfAXiv6F+Z6aOPK52XFutZjjB7Y+X3lhp9fPzixv0n ++Q7wzcG06HSdPir4JoouJDpA7+ozZl8b9JF/X5cMLdgBGtwlL15o0kfhzFHe +xe0OEC++jbrcoY8h6PrZfnIvCKT4n+wc0MePvkltIaZ7Qc33LZs3OxWlDG/+ +5Fy9B7yUbnPn76LirMt94eZqO4hoc/VXtqWizYC2/cMrdpDpLfSUYU9Fpw1N +b7rS7KCxNDz96T4qCqa4+Cv62MEGZTP+ZQ8qrpPcRbkhZQePlYc3uIdRUSEg +9uiaVFtQ3SQjq1xIxRu1bV6eI9aA7d2xjKtU3C6SduBumzU4+CV/NiyhYs49 +JWOVEmtIuDFRvO8mFZvZAg8d9bCGgU2NSqeZVHTwI9EyPuyCDBXHzeNPqFgn +6zTU1m8FM6rZuoxpKu5TC7oQP2UBvc9wh/AvYnyHO4xrX1tAU9Dk7tA5Kj4Z +1mvirLWADIb5Ed0/VGycz+z/FWsBqlS28noOGlYmle7+J2wBnuaH5FpEaah7 +tye409Ac3vju5HljQMO+1X/UmWU7obbk7+e5FBpe7AnszmgwAd3tob8t0mi4 ++98oD0+ZCdz9PM5TdIaGZWZdUZczTYBB/kixOEfDW5zZTUveJlCe13TmSgEN +pQ8XLd0SNIGi9CT9nZU05Cux56wN3A6nQ/mz8l7T8MHDKHdFLWPgEk4pm3hL +w1iOPhI32RiSq9kajXtpyHVDUohtvTEkTs58Gx+gIb3S219x2Aii/d4YGH2j +4bWAKZUd+UYQ4nxx9PsCDc/9s2jr4zQCJxMFpJENcE79msCrTwDLb7j4WmQN +8PET+zn+BoAi78l+CwUDHO7rCz52AeBbct1xp00GaKnQmcvcBRDSYXMnXNsA +j2wr6V64bwip1ifJtaYGaLNWyyyllA71+98u6QQbYGqZyc6nZ2ng8r2+s/GI +Adbguo6LwTRgiyjKMwk1wMoZkyupNjQwLQjQ2RNugIqiVx5189Og+8OqwKMJ +BohkHt/FLCr88NTor841wI0xM/sTL+mD1KFTdRpNBkhzs91d00GBjBWfbWnN +BjjwRUwz9A4F2M+ZVo+0GuAzT98cyxwK/Li35mZRhwFy0VzyzT0oUM+WmCf0 +2gC3fW+fj/mjC07nY4/PDxtg0F29qEdaupDXEL7twXo63tokdeI3Qwd4rB2r +JfnoOGKUmtlboAOxg3rqxwXoKEJb2f8qUQf81iwoaorQ8cXHg9e49+kAxSZs +QzGZjseEZ1vOLW2Fd19CfiVp0XGd1ljurOVWEFkXWL1rHx15Ygo4vf9qQcn2 +qIhpR+L9OVbvaoa0QDsqY3u2Mx3FkgsnFbu0wHq66m2vBx25bYTO7rqqBcnv +5ha9AumYVdCW99ZMCxaKY4wj4ug4NFXuf/OSJrynZb8uu03HaomfAbsrNMDv +WMkl80o6mnL0GCkla8B85V3v8So69oVQtiq5aYCQfO9vrXt0fNsRUFopqAGW +XNKk+010lPffd/LLCXVofFP23+u3dJx++16lxEYNLPhq1cN66Wh1PV/PaLMa +9O7smBfvpyM5lOHPzakGs/VjKa6DdLTLeRIr+XAzqF/VrPj+g44df/tCqVqb +ofG9UVj6BB0VX8Ve3sy3GSw27IYt03T8jzMxynRMFXxOHXsVOkfH7vT7VQul +qjDblJwvtkDHiegft84mqEL8n1yv+j90PNrvfsvGQxUEdG6quSzTcVaYI0EP +VOHKofq5lRU6ipcMcFlIq8L/APejiA8= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VN8bB3BRoeyyj7ErQkiGGeN5SLJlqxTZfS0hSlLIviQkkoiKhDbE +zJS1kqVQqbQgKhVR9kIU+d3fX/f1ft37uq9zz3k+zzlXzjPY3pudjY1t9yo2 +tv9f5z92tCqmlRimBnHY3eTYafjmini4UW88qM5obz5OUgIUeeEp3nsO+i/n +CZiStkGY7a0ejt5iSHsz9VCetAMEJ8XOLfYwwK0gf903qb3wqdE6eLanGXb8 +y46VkvIGU8UfH2Z6umGoQrV1jfgxWOyh5Ez3fAHJw3xu99cnQcv26yWvin9B +jpMpvexuDpA+1X3zVFuG+xmtg+UPCmFDoNstzu0cePxU1eVn8SVwTsu0wXov +F9LyfnyuUbgJfXmaTTMCvGgYdd52P3sF5L++zR+mxIsGI1XBQkIV4MS30e2P +Pi++PnbSskWuAgYSpP+xe/HigHaaCrdRBQwGrTPYcJcXr3+IE1aKqYBRk6Ea +XUc+/DbbZ52/WAEL07l3Iq/yI5uI+Kj7SCWklcS8YJcQxO5MyrVX9lVgoXNQ +SERBEIUCPGMcHauAq9V+70Z1QSwODo0ZcKuCxK9K/ZZGgpjcZPftdWAVnJR/ +9u38QUFcpXxOLSW5CoKKxP8p1wticA1v5pq6KrC7VK1meUAIi6y0ey0lq0FA +rSDYxVsIB6iHZ7fJVkNXQyIjOFgIfXp2CkopV4NF/z698wlC+OPBX7N3WtVg +LPlv+4fbQvj1efwFAfNq0MmzOBC8JISP+Z2/ZIdVg9j5r6ezLwuj05xJ9Ivn +1SC++W7iQpkwGiWD2f3uapBsTo5xqRLGK8fqi8t6qoE8rXJsY4sw/hwW5wz8 +XA1KVofdG0aF8aaydsyj2WrYunpZ9+vWDahVcLnpgiQDbEJFh7Q7NyBbwPOk +EU8G2K4f/Zj7egPmJhpEm/oywL64rm9pYAMOPBpYLApggMNL5xePpzZgSGtM +uFkoA1zUrtU7iYhgjbnrOY8kBgQMbcmKdxfBArfu6YYyBpzaY27YPS+CikZr +Z/i/MUCS1SXJvkoU/YxMRzR/MKBSeM9vrfWiOOEVf9ZqkgHvul2rsmREsUUs +Y+7oPAMU7ULl7cxEcTr+jUjCWiY07ypc+/KiKFpUSV4pVmLCsulc13MDMVzw +GeYYcWNCZlnE7WVTMZT9z1bP1YsJimvZUtTtxPCRwE7Zlz5MsGpbZ3TGWwxv +rdxYX3KICfnbZZlWGWKYfSzKgSeSCXpomfv0kxim2HPNfzzPhKP6V9064sXx +fmD0tYxWJlgU8c1apovjLKPMUv0JE+Q5T6Z05YhjQbiK25MOJrx841D9+oY4 +Lgv1dkx0MUHjMA/Hxy5xpL8PqOPoY8Jo2fGyn5ISeJnjvNeecSY85B2mHlOU +QLrA6OzNSSZcCLV/8VtdAl+XP1r4M82EHcbqC0sogdam653OzjGh+MMXc05f +CSwUjMqK+8cE5w3WE1JMCYw4cnRXOj8LtkY2xF1plMBd+6k7LwqyYN2XTaJy +jyXQLs2l8aowC+rucIBynwSGj2+UKhVjgahlXabmigTGLGk2HpNhwcs4RZ0d +lpL482csCTRYcH00q/3JHklUPuknvlqTBdE2K84WrpLo7q6Q36rFAnXp90k2 +RySxs3VUS28bC1Jrz/Y45krircHBx99pLDCZ+hMR9FUS4+PJ6sfNWBBudl71 +0bgkRnBo+k6Ys6Dyqvp74XlJXE+2dHOzZIH4Hnf9Oi4p3CJwPV3XmgXjtW2/ +OTSkMJ2WMFO9mwXZ8ZmhF09IoVnFs/MfXFjQ3q+iOB4nhY8jD/IKuLFgSafl +tWGaFHaFvbU1dGeBz8ic9tBlKSQVnKRleLKAanVgRqNFCv+ardT89WHBFxHl +oFZeEp6kswnxBbNALPihtJgYCSPDnxcuE7Zq3//8oCwJHzDS134/zIJ7EWlq +/FtJOOyU58kMIb730/QPx/0kHAnRDBYNY8FDvdT8cg8S1tm+/DhEeDZLwWLF +n4RCWT817hxngauJw82SKBKOcxeGUsJZoH2zwXeqmIS8LmuqRU+ywJd9r5hx +OQkrWknYSvjSgcnH5++SsCbwYs2hKBas5ZNTpraT8Nf6Z16saBa8D0keSpwg +4UR94XOBOBbwP5M53zNPwuwoj8bLhE2U6rarskkjRaWxQDmemO+eseIXQtLo +W3FIUy2BBXEGdh6SetIo4Oj+Ym0SC8xcr/ykGEujUWpCwEnCfLFjCXutpLGo +c6PFBOFLLUllme7SuNY57k1TMgu8hrsplf7SWN6xKkHhFAtUOWU7noZKo1TU +xfA4wrUW9WNrT0ujskqNyZYUFsQEckYpZktjRLgIKYawacYePuPL0ujSSDPq +JMxbdbXQ7bo0Rm/LvytwmgVvXk1qRlUT4+kojrAnXPCL1pzfII1Bf9uzzhL2 +FDm9u7ZNGl9NxC09IaxCeTf09oU0jruaNP4lPL1fIexXnzRm3EjpVk1lQU3E +YU7BIcIP2nEv4ehL9/M0JqXxgHosVyThHQ/WqVotSGOFuNrmS4R5Bvc1HGQn +ozLV8lYt4derSq1O8ZBx+ZPLqZeE8xV+figRJeOZseGWr4Tdd0BwsywZBV76 +ePwkvNE3nW1QlYyqWd4eS4QnU/qylnXIWPjIr21VGgtYt5QVpICMH+MWMtgJ +Rz47ytIzJ2Nt9JWH/4jnjSebdjjsJuPY1PD+ecLcAnw9R13I+OzCAefvhF9q +HfDL8iXjl8YzT3sI5+6+sVh5hIxJ2jw3HhF2PTaX+iySjGG7/H6VEVbKNSb9 +SCJj4ojOnVOp/8/X2QrOTDLKuqz94EWY+X7AUCmfjP/SQqJphCOWVF4al5Cx +/JVADh9hI/JxD/dKMm5ZFyH/gZhfLmz9GVVLxksZZpuuE85JcBWpe0ZGX7Pk +a+qEnUtvl717R9w/r0X6Qayv/JMFyuwgGfP31QsXE65al+20ZY6M/WnjSasJ +H1cbHLNaISOl9QPHHaJ+DK3Vo/y5ZfDBPxrnXsLPsp4UlkrLYNa3jyXZRP1l +MzdotWyUwT8fwozVCDu99Wge1JLBGT/5wCaiXkfFl4akTGVw/yF///5EFtyh +mofp28qgT7K3sSfhMOcLnPucZDAwWKtiiMgDR5Gm6rkgGXS14zIeIPLS+Siq +4c4JGbwvGBVsRzjza6fV83gZ5NW4oNtM5Iu80TuYK1cG/6nm5V2IJfpL5UVW +9EMZNKQ7Dawj8mnS07U82S6D3EszT/2I/Fqzrd7p1i2Di0e//Gwm8u1lH9QH +wzJYxZEyHhBJ5CFSLiZ2jSyK3dWtyTzBgqf8jdf01sniWfrH0y+J/mFb4tA+ +zSeL/2iHCnkIH3ieJughLovmJVIXw4+x4LDM/DWjzbIoFPltSpnoT3PMzPbF +LbKosnWK3fwIsZ5mmyeqdWQx5Ej5f75EP0s64q4rbyiLEaJ0yYtBRD23dLaz +28niQbea4y/9WdDqWzjREiaLqe/EbDKJ/mm+pC90MlIW/w4dZT/hwYKuzDe6 +OrGyeMzkFcmZ6Ld9ddyxJadlsSyhOV3Claj39aFCSZdkcd8JwaSDjkR/rzKj +mDbL4tO2Zl03GxYELszEtvPK4bWda9rK9Yj5O+Ij+k1IDn3J+TYcFKK+fry/ +zSEuh+cu2wzsJfaX0v6Wd4bycqh3IGn1FLH/fHyQo3ZXVw4F2bWfzqiywCZJ +v/eqmxyeJify0khEfxWK2xJZLYc8bS+Oj/1lAlvaXGvePTk863054PEiE7o4 +/J3uNchhXVFJ2eXfTAiYs0+aaZPD1BLDv/iLCSW9iv2+7+XQp2zY+cAPJogW +tifv4ZDHnLqm+cEeJixuFviovlcev+u42kMVE+YvS8ZtdZLH330yTGYFE2b5 +lRT13eQxm8etRfE2EyZ/6fubHJTH6BnBv0ulTPjS4DXvFCWP10vSVycXMKHT +soYvpVQeP5x4ELCURJxPAlzhy5w8OqYVrkndzwSD2+VFFy4ooGk83iudZUC/ +7O3CHQUKWNTIlZM5w4CICzevzBYqoEWNM184cZ6qiSu7ZH9TAYW+CfQajzJA +e39RHl+jAvJ5nftb188AlTXnM5M/K+A70Yfyes0MEHWLjA1TU8Tsw2PzsWcY +MCNk4e7QrIirg9lVK6QZMJTu7hDCqYxPV2LMWYLVYD513HxYdyPmJNhuXVy+ +A+NeXEdZMZuwXeT04ZjkCuJ/Qoz9VLMKlu9qrQpdexuEnitnVE2pYqTrckBr ++Q0gpdyx1dVVwz4DPSeFTWWQt1lfQNhXHZX5JCXiP12DTkmjbb+yNHD63nDp +lvqrQCU1Z255twX9N/qM6vMXAh9HcahHvCZGn34QKkQvAHKcjIGjshaePTKS +zxuUC9xKzvfsn2ihu2HWWM6686BBl7hz3EUbbfSVnTy1syDko1CLBdtWjFjO +rZz8lg5Tv9L3mudtxak04+pkrxTYueVxvrm6DjLawzVm4hLhwS/a399dOpg4 +L7KGMRALQWra7195b8NtW7JGzIYjgT753xtHbl1MdatSGEwJgx2K4rt4i3Xx +86X8oIt7QoA10Sb3X4kucqsMjCfvCAHFmqPz9WW66MMX+ilaNwRWW7wo9Lut +iyyGFk+GeAg0Byf/bGHp4pjEyMSmD0fAsGE2N+KJLjoVFShZ+R0BXftXX0bG +dbH+xS+KQvJh2BSbeqKZQkFaSR8M3D8EjbTSNVZUCpanPn0cWXwIbH8/PPfW +gIK8PSPdmqcOwYmgufJRIwq2/ntt2m97CNqd3T/zWVFwZEPtVs3hQPDT17U4 +4E5BzYODn7oEA+Hmz89SsykUZE+5S0uO8AdVb/2HSu8p+Ls68q3MKV84K2/9 +J2GAglrb1O9TQ3xh9pPnti8fKUiusanwdvGFB07pt698peDUQdHYsa2+YG/7 +KVdsgoJ8F28P3v3sA+G0pMPcbHroJzMnS0cfaBd8JTehpIcr5dSRbi5v8H7g +l8g6oocZnPUSgo89YfLQj+M7QvXwxjP5M6FMTzghHRjwLkwPBYuqJEaLPCH1 +ZLD9QqQeDrAZ261EekIVNUzWIFkPOz9Hs01oe8LSvYTGlnw9vPy59WrDNQ84 +d+fKbHeLHv5S8eTqy3SHh0Vv/psR0cfFJ2AVqe4Cg1ZybmHi+ug9ljarIeAC +bIuHHP9K6uNY5/rkpZ/OYGzHab1GVh+jt/NKDNc6w+NVVIqEqj6Wzs1Ofd/h +DM88C7mNDPXRjVefk/HfAXiv6F+Z6aOPK52XFutZjjB7Y+X3lhp9fPzixv0n ++Q7wzcG06HSdPir4JoouJDpA7+ozZl8b9JF/X5cMLdgBGtwlL15o0kfhzFHe +xe0OEC++jbrcoY8h6PrZfnIvCKT4n+wc0MePvkltIaZ7Qc33LZs3OxWlDG/+ +5Fy9B7yUbnPn76LirMt94eZqO4hoc/VXtqWizYC2/cMrdpDpLfSUYU9Fpw1N +b7rS7KCxNDz96T4qCqa4+Cv62MEGZTP+ZQ8qrpPcRbkhZQePlYc3uIdRUSEg +9uiaVFtQ3SQjq1xIxRu1bV6eI9aA7d2xjKtU3C6SduBumzU4+CV/NiyhYs49 +JWOVEmtIuDFRvO8mFZvZAg8d9bCGgU2NSqeZVHTwI9EyPuyCDBXHzeNPqFgn +6zTU1m8FM6rZuoxpKu5TC7oQP2UBvc9wh/AvYnyHO4xrX1tAU9Dk7tA5Kj4Z +1mvirLWADIb5Ed0/VGycz+z/FWsBqlS28noOGlYmle7+J2wBnuaH5FpEaah7 +tye409Ac3vju5HljQMO+1X/UmWU7obbk7+e5FBpe7AnszmgwAd3tob8t0mi4 ++98oD0+ZCdz9PM5TdIaGZWZdUZczTYBB/kixOEfDW5zZTUveJlCe13TmSgEN +pQ8XLd0SNIGi9CT9nZU05Cux56wN3A6nQ/mz8l7T8MHDKHdFLWPgEk4pm3hL +w1iOPhI32RiSq9kajXtpyHVDUohtvTEkTs58Gx+gIb3S219x2Aii/d4YGH2j +4bWAKZUd+UYQ4nxx9PsCDc/9s2jr4zQCJxMFpJENcE79msCrTwDLb7j4WmQN +8PET+zn+BoAi78l+CwUDHO7rCz52AeBbct1xp00GaKnQmcvcBRDSYXMnXNsA +j2wr6V64bwip1ifJtaYGaLNWyyyllA71+98u6QQbYGqZyc6nZ2ng8r2+s/GI +Adbguo6LwTRgiyjKMwk1wMoZkyupNjQwLQjQ2RNugIqiVx5189Og+8OqwKMJ +BohkHt/FLCr88NTor841wI0xM/sTL+mD1KFTdRpNBkhzs91d00GBjBWfbWnN +BjjwRUwz9A4F2M+ZVo+0GuAzT98cyxwK/Li35mZRhwFy0VzyzT0oUM+WmCf0 +2gC3fW+fj/mjC07nY4/PDxtg0F29qEdaupDXEL7twXo63tokdeI3Qwd4rB2r +JfnoOGKUmtlboAOxg3rqxwXoKEJb2f8qUQf81iwoaorQ8cXHg9e49+kAxSZs +QzGZjseEZ1vOLW2Fd19CfiVp0XGd1ljurOVWEFkXWL1rHx15Ygo4vf9qQcn2 +qIhpR+L9OVbvaoa0QDsqY3u2Mx3FkgsnFbu0wHq66m2vBx25bYTO7rqqBcnv +5ha9AumYVdCW99ZMCxaKY4wj4ug4NFXuf/OSJrynZb8uu03HaomfAbsrNMDv +WMkl80o6mnL0GCkla8B85V3v8So69oVQtiq5aYCQfO9vrXt0fNsRUFopqAGW +XNKk+010lPffd/LLCXVofFP23+u3dJx++16lxEYNLPhq1cN66Wh1PV/PaLMa +9O7smBfvpyM5lOHPzakGs/VjKa6DdLTLeRIr+XAzqF/VrPj+g44df/tCqVqb +ofG9UVj6BB0VX8Ve3sy3GSw27IYt03T8jzMxynRMFXxOHXsVOkfH7vT7VQul +qjDblJwvtkDHiegft84mqEL8n1yv+j90PNrvfsvGQxUEdG6quSzTcVaYI0EP +VOHKofq5lRU6ipcMcFlIq8L/APejiA8= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08024612417694452}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08024612417694452}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VN8bB3BRoeyyj7ErQkiGGeN5SLJlqxTZfS0hSlLIviQkkoiKhDbE +zJS1kqVQqbQgKhVR9kIU+d3fX/f1ft37uq9zz3k+zzlXzjPY3pudjY1t9yo2 +tv9f5z92tCqmlRimBnHY3eTYafjmini4UW88qM5obz5OUgIUeeEp3nsO+i/n +CZiStkGY7a0ejt5iSHsz9VCetAMEJ8XOLfYwwK0gf903qb3wqdE6eLanGXb8 +y46VkvIGU8UfH2Z6umGoQrV1jfgxWOyh5Ez3fAHJw3xu99cnQcv26yWvin9B +jpMpvexuDpA+1X3zVFuG+xmtg+UPCmFDoNstzu0cePxU1eVn8SVwTsu0wXov +F9LyfnyuUbgJfXmaTTMCvGgYdd52P3sF5L++zR+mxIsGI1XBQkIV4MS30e2P +Pi++PnbSskWuAgYSpP+xe/HigHaaCrdRBQwGrTPYcJcXr3+IE1aKqYBRk6Ea +XUc+/DbbZ52/WAEL07l3Iq/yI5uI+Kj7SCWklcS8YJcQxO5MyrVX9lVgoXNQ +SERBEIUCPGMcHauAq9V+70Z1QSwODo0ZcKuCxK9K/ZZGgpjcZPftdWAVnJR/ +9u38QUFcpXxOLSW5CoKKxP8p1wticA1v5pq6KrC7VK1meUAIi6y0ey0lq0FA +rSDYxVsIB6iHZ7fJVkNXQyIjOFgIfXp2CkopV4NF/z698wlC+OPBX7N3WtVg +LPlv+4fbQvj1efwFAfNq0MmzOBC8JISP+Z2/ZIdVg9j5r6ezLwuj05xJ9Ivn +1SC++W7iQpkwGiWD2f3uapBsTo5xqRLGK8fqi8t6qoE8rXJsY4sw/hwW5wz8 +XA1KVofdG0aF8aaydsyj2WrYunpZ9+vWDahVcLnpgiQDbEJFh7Q7NyBbwPOk +EU8G2K4f/Zj7egPmJhpEm/oywL64rm9pYAMOPBpYLApggMNL5xePpzZgSGtM +uFkoA1zUrtU7iYhgjbnrOY8kBgQMbcmKdxfBArfu6YYyBpzaY27YPS+CikZr +Z/i/MUCS1SXJvkoU/YxMRzR/MKBSeM9vrfWiOOEVf9ZqkgHvul2rsmREsUUs +Y+7oPAMU7ULl7cxEcTr+jUjCWiY07ypc+/KiKFpUSV4pVmLCsulc13MDMVzw +GeYYcWNCZlnE7WVTMZT9z1bP1YsJimvZUtTtxPCRwE7Zlz5MsGpbZ3TGWwxv +rdxYX3KICfnbZZlWGWKYfSzKgSeSCXpomfv0kxim2HPNfzzPhKP6V9064sXx +fmD0tYxWJlgU8c1apovjLKPMUv0JE+Q5T6Z05YhjQbiK25MOJrx841D9+oY4 +Lgv1dkx0MUHjMA/Hxy5xpL8PqOPoY8Jo2fGyn5ISeJnjvNeecSY85B2mHlOU +QLrA6OzNSSZcCLV/8VtdAl+XP1r4M82EHcbqC0sogdam653OzjGh+MMXc05f +CSwUjMqK+8cE5w3WE1JMCYw4cnRXOj8LtkY2xF1plMBd+6k7LwqyYN2XTaJy +jyXQLs2l8aowC+rucIBynwSGj2+UKhVjgahlXabmigTGLGk2HpNhwcs4RZ0d +lpL482csCTRYcH00q/3JHklUPuknvlqTBdE2K84WrpLo7q6Q36rFAnXp90k2 +RySxs3VUS28bC1Jrz/Y45krircHBx99pLDCZ+hMR9FUS4+PJ6sfNWBBudl71 +0bgkRnBo+k6Ys6Dyqvp74XlJXE+2dHOzZIH4Hnf9Oi4p3CJwPV3XmgXjtW2/ +OTSkMJ2WMFO9mwXZ8ZmhF09IoVnFs/MfXFjQ3q+iOB4nhY8jD/IKuLFgSafl +tWGaFHaFvbU1dGeBz8ic9tBlKSQVnKRleLKAanVgRqNFCv+ardT89WHBFxHl +oFZeEp6kswnxBbNALPihtJgYCSPDnxcuE7Zq3//8oCwJHzDS134/zIJ7EWlq +/FtJOOyU58kMIb730/QPx/0kHAnRDBYNY8FDvdT8cg8S1tm+/DhEeDZLwWLF +n4RCWT817hxngauJw82SKBKOcxeGUsJZoH2zwXeqmIS8LmuqRU+ywJd9r5hx +OQkrWknYSvjSgcnH5++SsCbwYs2hKBas5ZNTpraT8Nf6Z16saBa8D0keSpwg +4UR94XOBOBbwP5M53zNPwuwoj8bLhE2U6rarskkjRaWxQDmemO+eseIXQtLo +W3FIUy2BBXEGdh6SetIo4Oj+Ym0SC8xcr/ykGEujUWpCwEnCfLFjCXutpLGo +c6PFBOFLLUllme7SuNY57k1TMgu8hrsplf7SWN6xKkHhFAtUOWU7noZKo1TU +xfA4wrUW9WNrT0ujskqNyZYUFsQEckYpZktjRLgIKYawacYePuPL0ujSSDPq +JMxbdbXQ7bo0Rm/LvytwmgVvXk1qRlUT4+kojrAnXPCL1pzfII1Bf9uzzhL2 +FDm9u7ZNGl9NxC09IaxCeTf09oU0jruaNP4lPL1fIexXnzRm3EjpVk1lQU3E +YU7BIcIP2nEv4ehL9/M0JqXxgHosVyThHQ/WqVotSGOFuNrmS4R5Bvc1HGQn +ozLV8lYt4derSq1O8ZBx+ZPLqZeE8xV+figRJeOZseGWr4Tdd0BwsywZBV76 +ePwkvNE3nW1QlYyqWd4eS4QnU/qylnXIWPjIr21VGgtYt5QVpICMH+MWMtgJ +Rz47ytIzJ2Nt9JWH/4jnjSebdjjsJuPY1PD+ecLcAnw9R13I+OzCAefvhF9q +HfDL8iXjl8YzT3sI5+6+sVh5hIxJ2jw3HhF2PTaX+iySjGG7/H6VEVbKNSb9 +SCJj4ojOnVOp/8/X2QrOTDLKuqz94EWY+X7AUCmfjP/SQqJphCOWVF4al5Cx +/JVADh9hI/JxD/dKMm5ZFyH/gZhfLmz9GVVLxksZZpuuE85JcBWpe0ZGX7Pk +a+qEnUtvl717R9w/r0X6Qayv/JMFyuwgGfP31QsXE65al+20ZY6M/WnjSasJ +H1cbHLNaISOl9QPHHaJ+DK3Vo/y5ZfDBPxrnXsLPsp4UlkrLYNa3jyXZRP1l +MzdotWyUwT8fwozVCDu99Wge1JLBGT/5wCaiXkfFl4akTGVw/yF///5EFtyh +mofp28qgT7K3sSfhMOcLnPucZDAwWKtiiMgDR5Gm6rkgGXS14zIeIPLS+Siq +4c4JGbwvGBVsRzjza6fV83gZ5NW4oNtM5Iu80TuYK1cG/6nm5V2IJfpL5UVW +9EMZNKQ7Dawj8mnS07U82S6D3EszT/2I/Fqzrd7p1i2Di0e//Gwm8u1lH9QH +wzJYxZEyHhBJ5CFSLiZ2jSyK3dWtyTzBgqf8jdf01sniWfrH0y+J/mFb4tA+ +zSeL/2iHCnkIH3ieJughLovmJVIXw4+x4LDM/DWjzbIoFPltSpnoT3PMzPbF +LbKosnWK3fwIsZ5mmyeqdWQx5Ej5f75EP0s64q4rbyiLEaJ0yYtBRD23dLaz +28niQbea4y/9WdDqWzjREiaLqe/EbDKJ/mm+pC90MlIW/w4dZT/hwYKuzDe6 +OrGyeMzkFcmZ6Ld9ddyxJadlsSyhOV3Claj39aFCSZdkcd8JwaSDjkR/rzKj +mDbL4tO2Zl03GxYELszEtvPK4bWda9rK9Yj5O+Ij+k1IDn3J+TYcFKK+fry/ +zSEuh+cu2wzsJfaX0v6Wd4bycqh3IGn1FLH/fHyQo3ZXVw4F2bWfzqiywCZJ +v/eqmxyeJify0khEfxWK2xJZLYc8bS+Oj/1lAlvaXGvePTk863054PEiE7o4 +/J3uNchhXVFJ2eXfTAiYs0+aaZPD1BLDv/iLCSW9iv2+7+XQp2zY+cAPJogW +tifv4ZDHnLqm+cEeJixuFviovlcev+u42kMVE+YvS8ZtdZLH330yTGYFE2b5 +lRT13eQxm8etRfE2EyZ/6fubHJTH6BnBv0ulTPjS4DXvFCWP10vSVycXMKHT +soYvpVQeP5x4ELCURJxPAlzhy5w8OqYVrkndzwSD2+VFFy4ooGk83iudZUC/ +7O3CHQUKWNTIlZM5w4CICzevzBYqoEWNM184cZ6qiSu7ZH9TAYW+CfQajzJA +e39RHl+jAvJ5nftb188AlTXnM5M/K+A70Yfyes0MEHWLjA1TU8Tsw2PzsWcY +MCNk4e7QrIirg9lVK6QZMJTu7hDCqYxPV2LMWYLVYD513HxYdyPmJNhuXVy+ +A+NeXEdZMZuwXeT04ZjkCuJ/Qoz9VLMKlu9qrQpdexuEnitnVE2pYqTrckBr ++Q0gpdyx1dVVwz4DPSeFTWWQt1lfQNhXHZX5JCXiP12DTkmjbb+yNHD63nDp +lvqrQCU1Z255twX9N/qM6vMXAh9HcahHvCZGn34QKkQvAHKcjIGjshaePTKS +zxuUC9xKzvfsn2ihu2HWWM6686BBl7hz3EUbbfSVnTy1syDko1CLBdtWjFjO +rZz8lg5Tv9L3mudtxak04+pkrxTYueVxvrm6DjLawzVm4hLhwS/a399dOpg4 +L7KGMRALQWra7195b8NtW7JGzIYjgT753xtHbl1MdatSGEwJgx2K4rt4i3Xx +86X8oIt7QoA10Sb3X4kucqsMjCfvCAHFmqPz9WW66MMX+ilaNwRWW7wo9Lut +iyyGFk+GeAg0Byf/bGHp4pjEyMSmD0fAsGE2N+KJLjoVFShZ+R0BXftXX0bG +dbH+xS+KQvJh2BSbeqKZQkFaSR8M3D8EjbTSNVZUCpanPn0cWXwIbH8/PPfW +gIK8PSPdmqcOwYmgufJRIwq2/ntt2m97CNqd3T/zWVFwZEPtVs3hQPDT17U4 +4E5BzYODn7oEA+Hmz89SsykUZE+5S0uO8AdVb/2HSu8p+Ls68q3MKV84K2/9 +J2GAglrb1O9TQ3xh9pPnti8fKUiusanwdvGFB07pt698peDUQdHYsa2+YG/7 +KVdsgoJ8F28P3v3sA+G0pMPcbHroJzMnS0cfaBd8JTehpIcr5dSRbi5v8H7g +l8g6oocZnPUSgo89YfLQj+M7QvXwxjP5M6FMTzghHRjwLkwPBYuqJEaLPCH1 +ZLD9QqQeDrAZ261EekIVNUzWIFkPOz9Hs01oe8LSvYTGlnw9vPy59WrDNQ84 +d+fKbHeLHv5S8eTqy3SHh0Vv/psR0cfFJ2AVqe4Cg1ZybmHi+ug9ljarIeAC +bIuHHP9K6uNY5/rkpZ/OYGzHab1GVh+jt/NKDNc6w+NVVIqEqj6Wzs1Ofd/h +DM88C7mNDPXRjVefk/HfAXiv6F+Z6aOPK52XFutZjjB7Y+X3lhp9fPzixv0n ++Q7wzcG06HSdPir4JoouJDpA7+ozZl8b9JF/X5cMLdgBGtwlL15o0kfhzFHe +xe0OEC++jbrcoY8h6PrZfnIvCKT4n+wc0MePvkltIaZ7Qc33LZs3OxWlDG/+ +5Fy9B7yUbnPn76LirMt94eZqO4hoc/VXtqWizYC2/cMrdpDpLfSUYU9Fpw1N +b7rS7KCxNDz96T4qCqa4+Cv62MEGZTP+ZQ8qrpPcRbkhZQePlYc3uIdRUSEg +9uiaVFtQ3SQjq1xIxRu1bV6eI9aA7d2xjKtU3C6SduBumzU4+CV/NiyhYs49 +JWOVEmtIuDFRvO8mFZvZAg8d9bCGgU2NSqeZVHTwI9EyPuyCDBXHzeNPqFgn +6zTU1m8FM6rZuoxpKu5TC7oQP2UBvc9wh/AvYnyHO4xrX1tAU9Dk7tA5Kj4Z +1mvirLWADIb5Ed0/VGycz+z/FWsBqlS28noOGlYmle7+J2wBnuaH5FpEaah7 +tye409Ac3vju5HljQMO+1X/UmWU7obbk7+e5FBpe7AnszmgwAd3tob8t0mi4 ++98oD0+ZCdz9PM5TdIaGZWZdUZczTYBB/kixOEfDW5zZTUveJlCe13TmSgEN +pQ8XLd0SNIGi9CT9nZU05Cux56wN3A6nQ/mz8l7T8MHDKHdFLWPgEk4pm3hL +w1iOPhI32RiSq9kajXtpyHVDUohtvTEkTs58Gx+gIb3S219x2Aii/d4YGH2j +4bWAKZUd+UYQ4nxx9PsCDc/9s2jr4zQCJxMFpJENcE79msCrTwDLb7j4WmQN +8PET+zn+BoAi78l+CwUDHO7rCz52AeBbct1xp00GaKnQmcvcBRDSYXMnXNsA +j2wr6V64bwip1ifJtaYGaLNWyyyllA71+98u6QQbYGqZyc6nZ2ng8r2+s/GI +Adbguo6LwTRgiyjKMwk1wMoZkyupNjQwLQjQ2RNugIqiVx5189Og+8OqwKMJ +BohkHt/FLCr88NTor841wI0xM/sTL+mD1KFTdRpNBkhzs91d00GBjBWfbWnN +BjjwRUwz9A4F2M+ZVo+0GuAzT98cyxwK/Li35mZRhwFy0VzyzT0oUM+WmCf0 +2gC3fW+fj/mjC07nY4/PDxtg0F29qEdaupDXEL7twXo63tokdeI3Qwd4rB2r +JfnoOGKUmtlboAOxg3rqxwXoKEJb2f8qUQf81iwoaorQ8cXHg9e49+kAxSZs +QzGZjseEZ1vOLW2Fd19CfiVp0XGd1ljurOVWEFkXWL1rHx15Ygo4vf9qQcn2 +qIhpR+L9OVbvaoa0QDsqY3u2Mx3FkgsnFbu0wHq66m2vBx25bYTO7rqqBcnv +5ha9AumYVdCW99ZMCxaKY4wj4ug4NFXuf/OSJrynZb8uu03HaomfAbsrNMDv +WMkl80o6mnL0GCkla8B85V3v8So69oVQtiq5aYCQfO9vrXt0fNsRUFopqAGW +XNKk+010lPffd/LLCXVofFP23+u3dJx++16lxEYNLPhq1cN66Wh1PV/PaLMa +9O7smBfvpyM5lOHPzakGs/VjKa6DdLTLeRIr+XAzqF/VrPj+g44df/tCqVqb +ofG9UVj6BB0VX8Ve3sy3GSw27IYt03T8jzMxynRMFXxOHXsVOkfH7vT7VQul +qjDblJwvtkDHiegft84mqEL8n1yv+j90PNrvfsvGQxUEdG6quSzTcVaYI0EP +VOHKofq5lRU6ipcMcFlIq8L/APejiA8= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08024612417694452}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08024612417694452}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350958336833*^9, 3.99435408325546*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"5ef6094e-250b-4de3-86b6-7f1be88e7985"] +}, Open ]], Cell[CellGroupData[{ @@ -7830,14 +8086,13 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918492800964603`*^9},ExpressionUUID->"9051a5e3-bb9f-d941-bcca-\ -598d0b6835be"], + CellChangeTimes->{3.9918492800964603`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[BoxData["9.33220071900516`"], "Output", - CellChangeTimes->{3.991334803166374*^9}, - CellLabel-> - "Out[254]=",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[BoxData["9.138493613614148`"], "Output", + CellChangeTimes->{3.991334803166374*^9, 3.994350958385792*^9, + 3.9943540833048363`*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"aa90d105-8436-4599-ab02-d7ddbc571148"] }, Open ]], Cell[CellGroupData[{ @@ -7893,191 +8148,202 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492818821335`*^9},ExpressionUUID->"65a995ff-ff3d-634e-9bad-\ -4a8a16073236"], + CellChangeTimes->{3.9918492818821335`*^9}, + CellLabel->"In[97]:=",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.015132160320536`*^-259\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 255, 233, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133480336051*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.255104290278683`*^-252\\\", \ +\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 97, 13, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.9943509585249777`*^9, + 3.994354083433835*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], +In[97]:=",ExpressionUUID->"2e8dd755-3359-4d17-9d28-0811694fc060"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.802481548114291`*^-269\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 234, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803369583*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.480962276391479`*^-261\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 97, 14, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.9943509585249777`*^9, + 3.994354083443713*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], +In[97]:=",ExpressionUUID->"f8342a66-9c9b-4c45-8033-1ed76f624a47"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.803946040382125`*^-279\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 235, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803378134*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.7188086478436116`*^-270\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 97, 15, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.9943509585249777`*^9, + 3.994354083452455*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], +In[97]:=",ExpressionUUID->"b78a7020-afca-460d-a34d-96cad48be6ca"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 255, 236, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803386196*^9}, +during this calculation.\"", 2, 97, 16, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.9943509585249777`*^9, + 3.994354083462525*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], +In[97]:=",ExpressionUUID->"e91ebaf5-f6bb-4c6a-8d1c-f46d1b03d47c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c4Vf8fAHDR0KAi67qXe61sWfe6q/ebZH/tkVVGVLZCRgmZDV9JkVTI +aBLuJSN8SalEhai0tFRIZTXU7/z+Os/rOef5nPN5r+dzaH7hjgGCAgICexYJ +CPz/Ovvizk2lw2UbR2MmVD80WWwcOCsdZzycApH7ZFP8qlUAJfr8pIdzof+1 +8QGtajrE2F8aEhouBT7ZMWdptRmsnZTK/TFUC/QZR///qlzhZYtt+PRQB1xK +jP49dDUQzJQ+Pf869Ag8QnZstbgUAz+GGCemhkZhKq3RjFSUDp2bKsseln4H +7zzuIXnbfCC/bHzvp7kAgSUrD/ctLoF1IdsuLdskhI0HdIdnpsshV9es2dZF +GMuSF29//+QSPCnY0P51jQh+2kn7/O+HKijsv7w6RlkE985NZU/NVYGH6Ppt +P5ki+H2/+UUz4WoYOUj5I+gvgkqbmzf0q1bDq7AVnHV8Efxydadk6K5qGDN9 +20B3F8WUscdXi8eqYX4qvzqhZDV6rooZiw6/BofLDvQJyqzFrS72v5VdasDK +YJeYhOJa1M4yrX/sWQPCNx1d1mutxZVeSV+T/Wog9Y3yM2vjtbhre+v72+E1 +sE+h533errXo+CP54tpDNRBWLP1HpWktNniuOnj6Rg04FNVoWnuK4c53Pbwk +ai2s0Twd7h0ghhl1eh4HVGqhtzm1NjxcDMOGn3nHataC1TM3o7yDhH9s2edu +VAsmpD+bnl8WQ8rbzQtDdrVgUGDlGf6bWC+60LFrfy1I5b3JOn5GHN00h/56 +DtaCtAY/db5CHHkabxWtntYCqSP9gPc1cTRPlvhH/2UtyE2pRa/vFMclqnJX +Z8dqQdkmwqd5TBw32vblG/+uBf3FC/Q3+uvQhr607QOtDuyiJN/q3V2HSbBb +YM+uOrBfOfYiv38dPszwlPgvtA4cSxuf/B5Zhwku1sordteB6wOvvltf1qGH +zCHDo/F14K15vslDQgL1TVaJux2ug+C3OsdSfCRQiOpS/uNyHWQ4W258NCuB +PJZsddzHOiDxekmCiyRRq0pZIWaiDqrEned0V0pi0vjWKyFf6+Dxo63XjslL +4oVtfUstftSBkkOUgoOFJHIe+w01CPOg459zSx+ckkSnRQmi+1R4sGA203uf +I4WlmmdKCrx5kFMRf3nBTAo3q3wPHPbhgdJSgUwtBykUWrvdRmw7D2y6Vhgf +DZBCm/iwuKggHhRuotbZZEuh1OuyXd9ieGCE1vn3XkphwNpEqcFsHuxhlmy7 +kyKNmvpBz5lNPLAqFp22PiKN5vcdxPJaeKCwbF9m7wlpDDN6xPzYyoMHA641 +/Rek8YCWnn9qJw+0I1YJveiVRlWfCd3EHh6MVeyt+EaSwZbcGvek5zxoE3nH +ilaSwaypc8sPveTBySjHvjktGXR38mrIfs2DzSZa879RBksV7FdnveNB6fNR +y2U7ZFC9Yslt4wkeeK2znZCtk8HPiV9W3PzFA/2E5uSzLTJIc780t3+BBytG +VSVpt2Sw4rXjF72/PGisFgKVJzL4K3FWMFuQD5LWjTkb/spg7qeaAeHlfHiQ +rGSw2ZqEerdtv66V4EPl2LHu284kVG3v+7lPkg+Jdn+9rLaScOu8kdwbKT5o +UZ6m2UWSUFujo76YxIdD1/8dcs8nYeOxJdav5flg+uVnfNgbEpYn9I7FqvEh +ziJP/b9xEg7LGO7LUedDVYnWU/FZEiZe3ht0XoMP0s4+zEZhWZwg3fBs1uLD ++PWuOSFtWcxYGK6q0+UDTWxbpStDFkNfnKdX6PHBNXje9SLKot6FHlqePh/a +KRr1tk6yWNB+UsXPkA/HU3KiTsXK4mz8L+HbRnzofqamNJ4siw3Kp+7mMfnw +26Czf+NhWUw+HD/vzeJD4IcZvbdnZLGjrODMKJsPLBvPr9qdstgznaHF38iH +8PLp4uQewmWJkVuBD2V/jtoPDMritSoBDSHkg2hNe3XcmCwuM9ghBMZ8GJVQ +CbspQsZXS52DkzbxQSq8jSIlRcYDwrr7l5jywaZ7y/1dVDIe46NoOuH6+MOa +q/XJGHP1Q23cZj587lca8eWQcWLXz+5xwlSt1sO8zWQcraX7e5oR8X459cl9 +Cxm1mvTUNMz50GZ0qPCKLxlj4+LcjhCePqZo9TeIjL9uzol+JLzV1PVi2X4y +mrRdlzthQcTnzJctc+lkDHt2NO4t4e7ZTGGrHDK6eLX56VjyQe9i844vpWQ8 +/T34XQPhHYIuUiZXyJjTnpo8Q7jIc/JWHp+Mxt6GNdpWfHjIy4j50EpGEcUH +0f6El4rSVFjdZBzuvfDgOGH2jqbBIw/JSEpa19lGOKLdKe3lUzJWNuyy/UC4 +XGbCQO8tEQ9XgagV1nx4ujv9beoEGSXO6BqqEV7dI583NEvGILUtxzcRNlVu +3KQuQMEbs33/uhOOS3T8vm85BT97zmoEE64a+lzaJ0bBjBXqu2IJv9mQ5qhA +puA5kXsWyYSlD8kJRitTsLyb1ZNG2OZNQ81tbQri7LPp/zuZ4+BLMqIgq1Ls +5v+ft9h69hvDhILDVDvb/68nmvT5oIsNBZ9HM2/sIjxYYiSxx5WCPf+dEXMl +XNSZVpHjQ8GL3y3tuYT93z1iVAVRcFuPSKw8YfVl1Dv3oij4dKTp8G9i/19V +Qz0+JlIwNlXp6ADh61ZNn5dmUVDri3xiJeEDIcv2Kx2n4JB4qk80YbNsZ1GT +MxT8t1aNvpGwyLWSc9sqKXjf8bOAIOGBh5Mb9tdQsMW4vKOdyNfp7+yOwmYK +JuYY7o8n7CeR5XS9i3if2D69/+d7aotizPcnFBy9UZeXRdRDQ3zEsrVvKehu +GbpZh3Bi0Y0C7UkKJneHzvcR9bTqlVvzLkE5XBH0IUSQcP+icpuMVXL4o5Gu +l0fUZ6Hit+dlknKo7hK3iEZ4/Y4jAq/U5VD5QH6XBlHPk5lPji0YyOHpXtfW +i0T98y6pKMqCHKp9eNCtQNhksn2zq5Mclnj3kZYS/bM1euZQT4IcxseafzpG +9Jtyvgn5U5oc+oUqXhiD/8+Lf68uy5FDn/6CDBbh+N9qD0zK5NCJsbWuj8uH +Ewe3SjT2yCG/b81cG9HvXuWXKx4/lkPtwKCfX4h5oHB7njH9Sg7Jrud1ZAlf +W3HcQ2dGDtdJTjP8GXzoOXb7XDlFHm+aaf1sJObN8bp1up3r5THzfe6tTmIe +eQz6drzSlUeJsOTBbmJejUn/fitrJo//3Q7qvKnDB6HiDeq5YfIo/maElErM +O1bVKV5imzyO1e8vUFAg6nmod2GyWx51V2hqz1H5YCuw2HzbI3kcuGPw321i +nvo7hj2Bd8T9hwnvvShE/hNoB5KWUFGYpOLjJk30k/zseWMNKlpdjS3PFuHD +TF1O9w8dKs4mBX1UXEXEw0JjosaAii9Zt8z5K/iQFulDV9hIRcpSBc+eZUS+ +Ou92CzpQ0Ug9fE3PIj7c3HFuojOGimlxBVvEZ3hg+Zspti+BiqP+yorB33nQ +mzNAN0ii4vpqRZW2rzx40rg8qSyLimRNyeeekzyYXBklllZExT7VCNOdH3gg +fc2CYdZBxagI/oXeYR6EzH9N6hahoRzpVcTL6zxgRQZKvhej4WBubGhePQ+E +Pz29LCRNwx2iAps283hQ/qzz8UYFGoZ5SB0srObBi9YTmnw6DXX0uOfEK3hg +l8YcLtlGwwvT9CyTXB7oiSXrJNTQMClSyK98Bw8EDs/cLKinoZXkzZSnxHmg +VyjIo76ZhqfDlz9Y6ceD4BnHtK9dNLzi0PPTz4sHZcNKz3Y8paGll+DIG3se +SJ7rTncWUsDs2T/Kekwe/NBY80LLRQFlMsL+E1/Gg9kzpGR9DwV0vbP546gQ +D6ZXKysxtylg4qtUXpUAEY/vzCDTXQpY2FQEnJ91MNrsP+uxXwHlJ39F6BDn +obvWDaKZ5Qqox9DMjH1UB4XBW2F0RgEbNQueVhbWAefyleKTJxWxuqWyQlSh +Dr6KWfm4dihhoN3XIkXlWnh7xMd19zIVdFa4mkP+dg0sv+y1fEdfj8L74flU +QjWM+wvv4R1QxXMZ7bJJN68Q530pwYwONfRdO7gse/UlELuvkn3tizqKyCf8 +WpVdCeTMans6XRPtFcRYY2NlUKDBXCO+QwuL26rPth4uhbskY8Pvx7TRpVdM +VcizGFjkjhydxzqoHDdrNGdZBKJCpVG+KRvQU+Vys1JSAcgly3PcVXRxUcml +7V2382C5sle9421dvN+UY1+Zdgy0uTLVe731sFClSIpz4SjsfiHWaSWgj2HR +C139WZnw5fsRF8sCfRT9k6ukF5gK5jq3Ci21DNCkeb+Zw7skaP3O/jXXa4Bu +NUusWh0SoKSnwc/poQHqbRT/dJGdAKnl+ner+g2QcVJSv0w5ASzdNE4FDBug +xfb08ps/4mGgicTof22AL0T+c+SVxsOn5B+7q6YNcKE1abHlXBxIrmn4tJ1k +iItSfsTLXI6FME29pw8DDLHrQa7TO3YMRM+Rfm7baYjFmS3qDetjYF+HEGky +yBBFzjvbFIjHwOEtg+4rIgwxcH3+P5mfo+FCauwTk3hDDPMT95EriobRkdbh +umxDzEwSSpcViAbXo9ZDJxoM0WNIX47avwe4k9sH3JfT8c7oPYes85Eg2Wxe +2rKSjnLl2V5L8yJhMkM9Ql6Uji8PVM5mp0bCWdrUyndidMxnL2vrCIiEP84J +myLIdCzPExyvU42EtuZjtek6dBxReivVcC0CjLNac+pc6NjLeiOnmhsOm5Wk +/xEppSNHe7nMMf0Q4E100baX0fGQv9PRcFIIKDXsmW2qoONPNycj30UhsNiq +79zOy3TcbT2+OLEvGDrC07918ugI5w6xikKCYWPzdH78bToWR2jp+14KArrj +w9EP43QUnKj/2qq/C1STDsV2MBiYT7ru6pcQCC3s8iU2LAbyrghemdseCPZz +bbmDHAaW7yrzL7YNhNiwmStjxgy81pB9U0MhELq9fF6L2jBwtVXBsOrdANjJ +pFt5+jAw5B79+jVKAFz89lp2OpOBn9K9x08/8gf1AGab8lMGlol36UhF+sK/ +CrY/D44wUF7o1k0HH1+YfulnOPqCgc32wgmFdr7Q6nHk8tk3DLwUvV/JVdsX +HO1f5ktNMLDiuotX9LgPxLHTIpYLGOHOV3FzVsE+0L32IW1C2Qgre0L+Ut9v +hYDWnam8SCO0r6rtFXD0hMnQT3s3RxkhqfzJq2sGnhBLCQl+HGOEqj+Pt+6T +8oRD+8Id5xOM8Im/atqO5x5wjRVD5aQbIVtr40h6kAf8rj/Y0llohMdENnc9 +yXKH3Oqz0486jfDKgNZJ9ogbkLdRx/xvGeHcT/8cdocblIuWPpvuNsITSr7X +nC+4wfXQ8g7JXuKvp4+85lGUGzzXuJLjMWyE9aZaknOibqB6oVFzdNwIKxTj +i4fNXaGteGD7VwkmUiTVOOH3nOGVDW1bjDQTR9f+ihzmOYPAj1D3XyQmJv7V +Tnc76wwmDstsl1CZaOKgKJgf6Qy3FrEYMupM/Jgf4iIj4ww9fueWG29kovLi +tFnZECd4qhRUlRPIxKPM8vZzNEf49aD+gsQuJtpnJ78qFXEE8n6h84XBTDRY +nVTf+MMBvAeL8ssimLj0UIWJwiMHeJXWl3Q9nonsvRzR5wcd4MN7A6dX2Uw0 +aqWof/5kD9MX/s7pNDBR35d06dtRO3jvalac1Uh8jzDl8JJQOxhefNTiTTMT +W2v8TRk2dtDsQzp1sp2J1W0nR2ZX2EGKtCFr4Q4Tt4e/m3qTZQtrMoP23R1h +Yl3pr80+R/8BzR2DAgGCLHRox0rmJWuQkyBfbF3Mwu21Jy7NH7GGNZ1+DtLL +WHg16HdWf7g1fJebKrm3koUvEgKTRwytoenxik16EixcGdA8YNRpBRZmmPZ3 +PQsj35Bsl72xBH/ly8sL/2GhTmxZtg/dAuK7tgap2LMwntFHMSZZQE6A2L1a +RxaOrzbXgT/m0FIed+SeGwudthWFHr9lDutULFYv+LJwQOhE8Kkt5nBL5d06 +nxgWnp+RsFqcYgbqqvJUlXMs9GKoBhd/NAXsfpRUW8LCK8MuZ/48MAXXnemv +N5axcG+KG2nvdVM4eGGi1O0iC3ljg7n1GaYwotqinFXHwjt/2/pD1ptCtpq7 +xvhtFp5pi0guCd4EX9WP02unWOhSGFiWvtQEhntws/h3FnZlRmwK/WYM7WGT +TlEzLBT4RTbe+cIYsmstI+k/Wbi7fnT16XpjUGcJXGkSYuMT7wuC33YYg59l +KK1Tko1nqTZlLr0IAzvMVw1w2Bj1Zz7yuyNA8/IZkiGwkaJ9UiRPB6D0cqna +SWM2zidprHFfBRDxZcFsixkbE/ulb9nd2ggie3nJI3ZszF/k6z3O3ghm6bS5 +t35sfJyWeL9LiwvXy369nslk47HeVFtZDTbQN0XNWR1mo9ZVu6KKVWzgvx5f +VXyUjWHnvGQdJllQK/eCYZXLxtAlKzlCtSy4UtB+9OxpNq75tmp6mMWC4iNp +TPMqNv6VX/FB15EJWVGrjxX0szH3iUnQs5MMEBbPrJgYZGPXb8fTUvsYkF4j +0GIyzMb3D2lF4b4MSJ38+n58hI0RheoVuzUZkLhzgGP8no3y5sfWdHTSYbfX +qbGP82wsFpdWjpgzBA9TRWTLcTB2+chBr90GsDAgLNpJ5eBnoTXjb7cYQHHA +5DMrRQ4uHN+++xAYwPv0xr0eqhyMOJPppyliALvv2FXH6XFw5qXIye6L+nDI +dp/cdTMOWj/Z1m0xpgdNWwZ/G4Rz8IXbuqiSOF3w/th0tyWSg4r3P7w/4a8L +AvHFBaZRHDT/kDd1/h9dMDsdbOAcx8EnKj+9VynowqPni0L2HOSgAi23ZWXP +Bvjkp/2sJp+DqSrr6q4qbQDZ0IxG7XYOHni5VuVUnxZk/w00PNzBwdLZzBzR +K1ogmGtW8+EmB7XNakQvZ2rBp/olF4vvcFDfefflLSZa0CSQWiDWz8ECepR+ +SoMmeOQl7Z19x8EJ5wLbiQsaUNAcZ9i6kosOJaMPqZVqsMrWvYYkykVBIT+d +DZlqkPTKSGvvGi6mDHYL++1Sg51L5pU2SHAxKTelTFNTDRh2MetK5bh4evuN +Jvc6VXg8uvt7mi4XNffuPTNzez1IrAip+ceNi07tj2g2y1WgbNP++Cl3Lt65 +uzXD+rMy6O3P3nTci4upD063RdxXBtupa4PDvlykboz4pZGrDOmPZ374h3Bx +UfLzKR+KMsyXHjCJT+ai6Bfu63MsJXjKPt5fcZmLca7WTx3/VYCd0WVFllVc +1A8zFm6JVoDZKn7A+DUuBri1fdvspQBiCsNzuvVcpHdRAprVFMBamEK+0c5F +27bws6q3aNAyULG9f5DYn+H1J58X08BK9LpWzDAXM0YvWtpNUGHY/M6s9DMu +/lt8ReXhIBWmmz5nbn3FxT43rVM6lVTQKtlw9eMnLraL05KdrKnQ8tQ45sgE +cX9PUVyFARWs1jmBzhQXVTft7pKUo0JgRvTDqBkuThYJF54ZlYfp9vRCqXku +Lr+xMlOzXh5Sfub7N/3kov3x4eUzWfKwxuCipvcCFys/BT6b9ZaHs6FNM3// +clE2Zea6rp48/A9wGD1s "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8091,150 +8357,154 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJwV13c4Vf8fAHDR0KAi67qXe61sWfe6q/ebZH/tkVVGVLZCRgmZDV9JkVTI +aBLuJSN8SalEhai0tFRIZTXU7/z+Os/rOef5nPN5r+dzaH7hjgGCAgICexYJ +CPz/Ovvizk2lw2UbR2MmVD80WWwcOCsdZzycApH7ZFP8qlUAJfr8pIdzof+1 +8QGtajrE2F8aEhouBT7ZMWdptRmsnZTK/TFUC/QZR///qlzhZYtt+PRQB1xK +jP49dDUQzJQ+Pf869Ag8QnZstbgUAz+GGCemhkZhKq3RjFSUDp2bKsseln4H +7zzuIXnbfCC/bHzvp7kAgSUrD/ctLoF1IdsuLdskhI0HdIdnpsshV9es2dZF +GMuSF29//+QSPCnY0P51jQh+2kn7/O+HKijsv7w6RlkE985NZU/NVYGH6Ppt +P5ki+H2/+UUz4WoYOUj5I+gvgkqbmzf0q1bDq7AVnHV8Efxydadk6K5qGDN9 +20B3F8WUscdXi8eqYX4qvzqhZDV6rooZiw6/BofLDvQJyqzFrS72v5VdasDK +YJeYhOJa1M4yrX/sWQPCNx1d1mutxZVeSV+T/Wog9Y3yM2vjtbhre+v72+E1 +sE+h533errXo+CP54tpDNRBWLP1HpWktNniuOnj6Rg04FNVoWnuK4c53Pbwk +ai2s0Twd7h0ghhl1eh4HVGqhtzm1NjxcDMOGn3nHataC1TM3o7yDhH9s2edu +VAsmpD+bnl8WQ8rbzQtDdrVgUGDlGf6bWC+60LFrfy1I5b3JOn5GHN00h/56 +DtaCtAY/db5CHHkabxWtntYCqSP9gPc1cTRPlvhH/2UtyE2pRa/vFMclqnJX +Z8dqQdkmwqd5TBw32vblG/+uBf3FC/Q3+uvQhr607QOtDuyiJN/q3V2HSbBb +YM+uOrBfOfYiv38dPszwlPgvtA4cSxuf/B5Zhwku1sordteB6wOvvltf1qGH +zCHDo/F14K15vslDQgL1TVaJux2ug+C3OsdSfCRQiOpS/uNyHWQ4W258NCuB +PJZsddzHOiDxekmCiyRRq0pZIWaiDqrEned0V0pi0vjWKyFf6+Dxo63XjslL +4oVtfUstftSBkkOUgoOFJHIe+w01CPOg459zSx+ckkSnRQmi+1R4sGA203uf +I4WlmmdKCrx5kFMRf3nBTAo3q3wPHPbhgdJSgUwtBykUWrvdRmw7D2y6Vhgf +DZBCm/iwuKggHhRuotbZZEuh1OuyXd9ieGCE1vn3XkphwNpEqcFsHuxhlmy7 +kyKNmvpBz5lNPLAqFp22PiKN5vcdxPJaeKCwbF9m7wlpDDN6xPzYyoMHA641 +/Rek8YCWnn9qJw+0I1YJveiVRlWfCd3EHh6MVeyt+EaSwZbcGvek5zxoE3nH +ilaSwaypc8sPveTBySjHvjktGXR38mrIfs2DzSZa879RBksV7FdnveNB6fNR +y2U7ZFC9Yslt4wkeeK2znZCtk8HPiV9W3PzFA/2E5uSzLTJIc780t3+BBytG +VSVpt2Sw4rXjF72/PGisFgKVJzL4K3FWMFuQD5LWjTkb/spg7qeaAeHlfHiQ +rGSw2ZqEerdtv66V4EPl2LHu284kVG3v+7lPkg+Jdn+9rLaScOu8kdwbKT5o +UZ6m2UWSUFujo76YxIdD1/8dcs8nYeOxJdav5flg+uVnfNgbEpYn9I7FqvEh +ziJP/b9xEg7LGO7LUedDVYnWU/FZEiZe3ht0XoMP0s4+zEZhWZwg3fBs1uLD ++PWuOSFtWcxYGK6q0+UDTWxbpStDFkNfnKdX6PHBNXje9SLKot6FHlqePh/a +KRr1tk6yWNB+UsXPkA/HU3KiTsXK4mz8L+HbRnzofqamNJ4siw3Kp+7mMfnw +26Czf+NhWUw+HD/vzeJD4IcZvbdnZLGjrODMKJsPLBvPr9qdstgznaHF38iH +8PLp4uQewmWJkVuBD2V/jtoPDMritSoBDSHkg2hNe3XcmCwuM9ghBMZ8GJVQ +CbspQsZXS52DkzbxQSq8jSIlRcYDwrr7l5jywaZ7y/1dVDIe46NoOuH6+MOa +q/XJGHP1Q23cZj587lca8eWQcWLXz+5xwlSt1sO8zWQcraX7e5oR8X459cl9 +Cxm1mvTUNMz50GZ0qPCKLxlj4+LcjhCePqZo9TeIjL9uzol+JLzV1PVi2X4y +mrRdlzthQcTnzJctc+lkDHt2NO4t4e7ZTGGrHDK6eLX56VjyQe9i844vpWQ8 +/T34XQPhHYIuUiZXyJjTnpo8Q7jIc/JWHp+Mxt6GNdpWfHjIy4j50EpGEcUH +0f6El4rSVFjdZBzuvfDgOGH2jqbBIw/JSEpa19lGOKLdKe3lUzJWNuyy/UC4 +XGbCQO8tEQ9XgagV1nx4ujv9beoEGSXO6BqqEV7dI583NEvGILUtxzcRNlVu +3KQuQMEbs33/uhOOS3T8vm85BT97zmoEE64a+lzaJ0bBjBXqu2IJv9mQ5qhA +puA5kXsWyYSlD8kJRitTsLyb1ZNG2OZNQ81tbQri7LPp/zuZ4+BLMqIgq1Ls +5v+ft9h69hvDhILDVDvb/68nmvT5oIsNBZ9HM2/sIjxYYiSxx5WCPf+dEXMl +XNSZVpHjQ8GL3y3tuYT93z1iVAVRcFuPSKw8YfVl1Dv3oij4dKTp8G9i/19V +Qz0+JlIwNlXp6ADh61ZNn5dmUVDri3xiJeEDIcv2Kx2n4JB4qk80YbNsZ1GT +MxT8t1aNvpGwyLWSc9sqKXjf8bOAIOGBh5Mb9tdQsMW4vKOdyNfp7+yOwmYK +JuYY7o8n7CeR5XS9i3if2D69/+d7aotizPcnFBy9UZeXRdRDQ3zEsrVvKehu +GbpZh3Bi0Y0C7UkKJneHzvcR9bTqlVvzLkE5XBH0IUSQcP+icpuMVXL4o5Gu +l0fUZ6Hit+dlknKo7hK3iEZ4/Y4jAq/U5VD5QH6XBlHPk5lPji0YyOHpXtfW +i0T98y6pKMqCHKp9eNCtQNhksn2zq5Mclnj3kZYS/bM1euZQT4IcxseafzpG +9Jtyvgn5U5oc+oUqXhiD/8+Lf68uy5FDn/6CDBbh+N9qD0zK5NCJsbWuj8uH +Ewe3SjT2yCG/b81cG9HvXuWXKx4/lkPtwKCfX4h5oHB7njH9Sg7Jrud1ZAlf +W3HcQ2dGDtdJTjP8GXzoOXb7XDlFHm+aaf1sJObN8bp1up3r5THzfe6tTmIe +eQz6drzSlUeJsOTBbmJejUn/fitrJo//3Q7qvKnDB6HiDeq5YfIo/maElErM +O1bVKV5imzyO1e8vUFAg6nmod2GyWx51V2hqz1H5YCuw2HzbI3kcuGPw321i +nvo7hj2Bd8T9hwnvvShE/hNoB5KWUFGYpOLjJk30k/zseWMNKlpdjS3PFuHD +TF1O9w8dKs4mBX1UXEXEw0JjosaAii9Zt8z5K/iQFulDV9hIRcpSBc+eZUS+ +Ou92CzpQ0Ug9fE3PIj7c3HFuojOGimlxBVvEZ3hg+Zspti+BiqP+yorB33nQ +mzNAN0ii4vpqRZW2rzx40rg8qSyLimRNyeeekzyYXBklllZExT7VCNOdH3gg +fc2CYdZBxagI/oXeYR6EzH9N6hahoRzpVcTL6zxgRQZKvhej4WBubGhePQ+E +Pz29LCRNwx2iAps283hQ/qzz8UYFGoZ5SB0srObBi9YTmnw6DXX0uOfEK3hg +l8YcLtlGwwvT9CyTXB7oiSXrJNTQMClSyK98Bw8EDs/cLKinoZXkzZSnxHmg +VyjIo76ZhqfDlz9Y6ceD4BnHtK9dNLzi0PPTz4sHZcNKz3Y8paGll+DIG3se +SJ7rTncWUsDs2T/Kekwe/NBY80LLRQFlMsL+E1/Gg9kzpGR9DwV0vbP546gQ +D6ZXKysxtylg4qtUXpUAEY/vzCDTXQpY2FQEnJ91MNrsP+uxXwHlJ39F6BDn +obvWDaKZ5Qqox9DMjH1UB4XBW2F0RgEbNQueVhbWAefyleKTJxWxuqWyQlSh +Dr6KWfm4dihhoN3XIkXlWnh7xMd19zIVdFa4mkP+dg0sv+y1fEdfj8L74flU +QjWM+wvv4R1QxXMZ7bJJN68Q530pwYwONfRdO7gse/UlELuvkn3tizqKyCf8 +WpVdCeTMans6XRPtFcRYY2NlUKDBXCO+QwuL26rPth4uhbskY8Pvx7TRpVdM +VcizGFjkjhydxzqoHDdrNGdZBKJCpVG+KRvQU+Vys1JSAcgly3PcVXRxUcml +7V2382C5sle9421dvN+UY1+Zdgy0uTLVe731sFClSIpz4SjsfiHWaSWgj2HR +C139WZnw5fsRF8sCfRT9k6ukF5gK5jq3Ci21DNCkeb+Zw7skaP3O/jXXa4Bu +NUusWh0SoKSnwc/poQHqbRT/dJGdAKnl+ner+g2QcVJSv0w5ASzdNE4FDBug +xfb08ps/4mGgicTof22AL0T+c+SVxsOn5B+7q6YNcKE1abHlXBxIrmn4tJ1k +iItSfsTLXI6FME29pw8DDLHrQa7TO3YMRM+Rfm7baYjFmS3qDetjYF+HEGky +yBBFzjvbFIjHwOEtg+4rIgwxcH3+P5mfo+FCauwTk3hDDPMT95EriobRkdbh +umxDzEwSSpcViAbXo9ZDJxoM0WNIX47avwe4k9sH3JfT8c7oPYes85Eg2Wxe +2rKSjnLl2V5L8yJhMkM9Ql6Uji8PVM5mp0bCWdrUyndidMxnL2vrCIiEP84J +myLIdCzPExyvU42EtuZjtek6dBxReivVcC0CjLNac+pc6NjLeiOnmhsOm5Wk +/xEppSNHe7nMMf0Q4E100baX0fGQv9PRcFIIKDXsmW2qoONPNycj30UhsNiq +79zOy3TcbT2+OLEvGDrC07918ugI5w6xikKCYWPzdH78bToWR2jp+14KArrj +w9EP43QUnKj/2qq/C1STDsV2MBiYT7ru6pcQCC3s8iU2LAbyrghemdseCPZz +bbmDHAaW7yrzL7YNhNiwmStjxgy81pB9U0MhELq9fF6L2jBwtVXBsOrdANjJ +pFt5+jAw5B79+jVKAFz89lp2OpOBn9K9x08/8gf1AGab8lMGlol36UhF+sK/ +CrY/D44wUF7o1k0HH1+YfulnOPqCgc32wgmFdr7Q6nHk8tk3DLwUvV/JVdsX +HO1f5ktNMLDiuotX9LgPxLHTIpYLGOHOV3FzVsE+0L32IW1C2Qgre0L+Ut9v +hYDWnam8SCO0r6rtFXD0hMnQT3s3RxkhqfzJq2sGnhBLCQl+HGOEqj+Pt+6T +8oRD+8Id5xOM8Im/atqO5x5wjRVD5aQbIVtr40h6kAf8rj/Y0llohMdENnc9 +yXKH3Oqz0486jfDKgNZJ9ogbkLdRx/xvGeHcT/8cdocblIuWPpvuNsITSr7X +nC+4wfXQ8g7JXuKvp4+85lGUGzzXuJLjMWyE9aZaknOibqB6oVFzdNwIKxTj +i4fNXaGteGD7VwkmUiTVOOH3nOGVDW1bjDQTR9f+ihzmOYPAj1D3XyQmJv7V +Tnc76wwmDstsl1CZaOKgKJgf6Qy3FrEYMupM/Jgf4iIj4ww9fueWG29kovLi +tFnZECd4qhRUlRPIxKPM8vZzNEf49aD+gsQuJtpnJ78qFXEE8n6h84XBTDRY +nVTf+MMBvAeL8ssimLj0UIWJwiMHeJXWl3Q9nonsvRzR5wcd4MN7A6dX2Uw0 +aqWof/5kD9MX/s7pNDBR35d06dtRO3jvalac1Uh8jzDl8JJQOxhefNTiTTMT +W2v8TRk2dtDsQzp1sp2J1W0nR2ZX2EGKtCFr4Q4Tt4e/m3qTZQtrMoP23R1h +Yl3pr80+R/8BzR2DAgGCLHRox0rmJWuQkyBfbF3Mwu21Jy7NH7GGNZ1+DtLL +WHg16HdWf7g1fJebKrm3koUvEgKTRwytoenxik16EixcGdA8YNRpBRZmmPZ3 +PQsj35Bsl72xBH/ly8sL/2GhTmxZtg/dAuK7tgap2LMwntFHMSZZQE6A2L1a +RxaOrzbXgT/m0FIed+SeGwudthWFHr9lDutULFYv+LJwQOhE8Kkt5nBL5d06 +nxgWnp+RsFqcYgbqqvJUlXMs9GKoBhd/NAXsfpRUW8LCK8MuZ/48MAXXnemv +N5axcG+KG2nvdVM4eGGi1O0iC3ljg7n1GaYwotqinFXHwjt/2/pD1ptCtpq7 +xvhtFp5pi0guCd4EX9WP02unWOhSGFiWvtQEhntws/h3FnZlRmwK/WYM7WGT +TlEzLBT4RTbe+cIYsmstI+k/Wbi7fnT16XpjUGcJXGkSYuMT7wuC33YYg59l +KK1Tko1nqTZlLr0IAzvMVw1w2Bj1Zz7yuyNA8/IZkiGwkaJ9UiRPB6D0cqna +SWM2zidprHFfBRDxZcFsixkbE/ulb9nd2ggie3nJI3ZszF/k6z3O3ghm6bS5 +t35sfJyWeL9LiwvXy369nslk47HeVFtZDTbQN0XNWR1mo9ZVu6KKVWzgvx5f +VXyUjWHnvGQdJllQK/eCYZXLxtAlKzlCtSy4UtB+9OxpNq75tmp6mMWC4iNp +TPMqNv6VX/FB15EJWVGrjxX0szH3iUnQs5MMEBbPrJgYZGPXb8fTUvsYkF4j +0GIyzMb3D2lF4b4MSJ38+n58hI0RheoVuzUZkLhzgGP8no3y5sfWdHTSYbfX +qbGP82wsFpdWjpgzBA9TRWTLcTB2+chBr90GsDAgLNpJ5eBnoTXjb7cYQHHA +5DMrRQ4uHN+++xAYwPv0xr0eqhyMOJPppyliALvv2FXH6XFw5qXIye6L+nDI +dp/cdTMOWj/Z1m0xpgdNWwZ/G4Rz8IXbuqiSOF3w/th0tyWSg4r3P7w/4a8L +AvHFBaZRHDT/kDd1/h9dMDsdbOAcx8EnKj+9VynowqPni0L2HOSgAi23ZWXP +Bvjkp/2sJp+DqSrr6q4qbQDZ0IxG7XYOHni5VuVUnxZk/w00PNzBwdLZzBzR +K1ogmGtW8+EmB7XNakQvZ2rBp/olF4vvcFDfefflLSZa0CSQWiDWz8ECepR+ +SoMmeOQl7Z19x8EJ5wLbiQsaUNAcZ9i6kosOJaMPqZVqsMrWvYYkykVBIT+d +DZlqkPTKSGvvGi6mDHYL++1Sg51L5pU2SHAxKTelTFNTDRh2MetK5bh4evuN +Jvc6VXg8uvt7mi4XNffuPTNzez1IrAip+ceNi07tj2g2y1WgbNP++Cl3Lt65 +uzXD+rMy6O3P3nTci4upD063RdxXBtupa4PDvlykboz4pZGrDOmPZ374h3Bx +UfLzKR+KMsyXHjCJT+ai6Bfu63MsJXjKPt5fcZmLca7WTx3/VYCd0WVFllVc +1A8zFm6JVoDZKn7A+DUuBri1fdvspQBiCsNzuvVcpHdRAprVFMBamEK+0c5F +27bws6q3aNAyULG9f5DYn+H1J58X08BK9LpWzDAXM0YvWtpNUGHY/M6s9DMu +/lt8ReXhIBWmmz5nbn3FxT43rVM6lVTQKtlw9eMnLraL05KdrKnQ8tQ45sgE +cX9PUVyFARWs1jmBzhQXVTft7pKUo0JgRvTDqBkuThYJF54ZlYfp9vRCqXku +Lr+xMlOzXh5Sfub7N/3kov3x4eUzWfKwxuCipvcCFys/BT6b9ZaHs6FNM3// +clE2Zea6rp48/A9wGD1s "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08318364360817387}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8246,19 +8516,19 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08318364360817387}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8272,149 +8542,153 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJwV13c4Vf8fAHDR0KAi67qXe61sWfe6q/ebZH/tkVVGVLZCRgmZDV9JkVTI +aBLuJSN8SalEhai0tFRIZTXU7/z+Os/rOef5nPN5r+dzaH7hjgGCAgICexYJ +CPz/Ovvizk2lw2UbR2MmVD80WWwcOCsdZzycApH7ZFP8qlUAJfr8pIdzof+1 +8QGtajrE2F8aEhouBT7ZMWdptRmsnZTK/TFUC/QZR///qlzhZYtt+PRQB1xK +jP49dDUQzJQ+Pf869Ag8QnZstbgUAz+GGCemhkZhKq3RjFSUDp2bKsseln4H +7zzuIXnbfCC/bHzvp7kAgSUrD/ctLoF1IdsuLdskhI0HdIdnpsshV9es2dZF +GMuSF29//+QSPCnY0P51jQh+2kn7/O+HKijsv7w6RlkE985NZU/NVYGH6Ppt +P5ki+H2/+UUz4WoYOUj5I+gvgkqbmzf0q1bDq7AVnHV8Efxydadk6K5qGDN9 +20B3F8WUscdXi8eqYX4qvzqhZDV6rooZiw6/BofLDvQJyqzFrS72v5VdasDK +YJeYhOJa1M4yrX/sWQPCNx1d1mutxZVeSV+T/Wog9Y3yM2vjtbhre+v72+E1 +sE+h533errXo+CP54tpDNRBWLP1HpWktNniuOnj6Rg04FNVoWnuK4c53Pbwk +ai2s0Twd7h0ghhl1eh4HVGqhtzm1NjxcDMOGn3nHataC1TM3o7yDhH9s2edu +VAsmpD+bnl8WQ8rbzQtDdrVgUGDlGf6bWC+60LFrfy1I5b3JOn5GHN00h/56 +DtaCtAY/db5CHHkabxWtntYCqSP9gPc1cTRPlvhH/2UtyE2pRa/vFMclqnJX +Z8dqQdkmwqd5TBw32vblG/+uBf3FC/Q3+uvQhr607QOtDuyiJN/q3V2HSbBb +YM+uOrBfOfYiv38dPszwlPgvtA4cSxuf/B5Zhwku1sordteB6wOvvltf1qGH +zCHDo/F14K15vslDQgL1TVaJux2ug+C3OsdSfCRQiOpS/uNyHWQ4W258NCuB +PJZsddzHOiDxekmCiyRRq0pZIWaiDqrEned0V0pi0vjWKyFf6+Dxo63XjslL +4oVtfUstftSBkkOUgoOFJHIe+w01CPOg459zSx+ckkSnRQmi+1R4sGA203uf +I4WlmmdKCrx5kFMRf3nBTAo3q3wPHPbhgdJSgUwtBykUWrvdRmw7D2y6Vhgf +DZBCm/iwuKggHhRuotbZZEuh1OuyXd9ieGCE1vn3XkphwNpEqcFsHuxhlmy7 +kyKNmvpBz5lNPLAqFp22PiKN5vcdxPJaeKCwbF9m7wlpDDN6xPzYyoMHA641 +/Rek8YCWnn9qJw+0I1YJveiVRlWfCd3EHh6MVeyt+EaSwZbcGvek5zxoE3nH +ilaSwaypc8sPveTBySjHvjktGXR38mrIfs2DzSZa879RBksV7FdnveNB6fNR +y2U7ZFC9Yslt4wkeeK2znZCtk8HPiV9W3PzFA/2E5uSzLTJIc780t3+BBytG +VSVpt2Sw4rXjF72/PGisFgKVJzL4K3FWMFuQD5LWjTkb/spg7qeaAeHlfHiQ +rGSw2ZqEerdtv66V4EPl2LHu284kVG3v+7lPkg+Jdn+9rLaScOu8kdwbKT5o +UZ6m2UWSUFujo76YxIdD1/8dcs8nYeOxJdav5flg+uVnfNgbEpYn9I7FqvEh +ziJP/b9xEg7LGO7LUedDVYnWU/FZEiZe3ht0XoMP0s4+zEZhWZwg3fBs1uLD ++PWuOSFtWcxYGK6q0+UDTWxbpStDFkNfnKdX6PHBNXje9SLKot6FHlqePh/a +KRr1tk6yWNB+UsXPkA/HU3KiTsXK4mz8L+HbRnzofqamNJ4siw3Kp+7mMfnw +26Czf+NhWUw+HD/vzeJD4IcZvbdnZLGjrODMKJsPLBvPr9qdstgznaHF38iH +8PLp4uQewmWJkVuBD2V/jtoPDMritSoBDSHkg2hNe3XcmCwuM9ghBMZ8GJVQ +CbspQsZXS52DkzbxQSq8jSIlRcYDwrr7l5jywaZ7y/1dVDIe46NoOuH6+MOa +q/XJGHP1Q23cZj587lca8eWQcWLXz+5xwlSt1sO8zWQcraX7e5oR8X459cl9 +Cxm1mvTUNMz50GZ0qPCKLxlj4+LcjhCePqZo9TeIjL9uzol+JLzV1PVi2X4y +mrRdlzthQcTnzJctc+lkDHt2NO4t4e7ZTGGrHDK6eLX56VjyQe9i844vpWQ8 +/T34XQPhHYIuUiZXyJjTnpo8Q7jIc/JWHp+Mxt6GNdpWfHjIy4j50EpGEcUH +0f6El4rSVFjdZBzuvfDgOGH2jqbBIw/JSEpa19lGOKLdKe3lUzJWNuyy/UC4 +XGbCQO8tEQ9XgagV1nx4ujv9beoEGSXO6BqqEV7dI583NEvGILUtxzcRNlVu +3KQuQMEbs33/uhOOS3T8vm85BT97zmoEE64a+lzaJ0bBjBXqu2IJv9mQ5qhA +puA5kXsWyYSlD8kJRitTsLyb1ZNG2OZNQ81tbQri7LPp/zuZ4+BLMqIgq1Ls +5v+ft9h69hvDhILDVDvb/68nmvT5oIsNBZ9HM2/sIjxYYiSxx5WCPf+dEXMl +XNSZVpHjQ8GL3y3tuYT93z1iVAVRcFuPSKw8YfVl1Dv3oij4dKTp8G9i/19V +Qz0+JlIwNlXp6ADh61ZNn5dmUVDri3xiJeEDIcv2Kx2n4JB4qk80YbNsZ1GT +MxT8t1aNvpGwyLWSc9sqKXjf8bOAIOGBh5Mb9tdQsMW4vKOdyNfp7+yOwmYK +JuYY7o8n7CeR5XS9i3if2D69/+d7aotizPcnFBy9UZeXRdRDQ3zEsrVvKehu +GbpZh3Bi0Y0C7UkKJneHzvcR9bTqlVvzLkE5XBH0IUSQcP+icpuMVXL4o5Gu +l0fUZ6Hit+dlknKo7hK3iEZ4/Y4jAq/U5VD5QH6XBlHPk5lPji0YyOHpXtfW +i0T98y6pKMqCHKp9eNCtQNhksn2zq5Mclnj3kZYS/bM1euZQT4IcxseafzpG +9Jtyvgn5U5oc+oUqXhiD/8+Lf68uy5FDn/6CDBbh+N9qD0zK5NCJsbWuj8uH +Ewe3SjT2yCG/b81cG9HvXuWXKx4/lkPtwKCfX4h5oHB7njH9Sg7Jrud1ZAlf +W3HcQ2dGDtdJTjP8GXzoOXb7XDlFHm+aaf1sJObN8bp1up3r5THzfe6tTmIe +eQz6drzSlUeJsOTBbmJejUn/fitrJo//3Q7qvKnDB6HiDeq5YfIo/maElErM +O1bVKV5imzyO1e8vUFAg6nmod2GyWx51V2hqz1H5YCuw2HzbI3kcuGPw321i +nvo7hj2Bd8T9hwnvvShE/hNoB5KWUFGYpOLjJk30k/zseWMNKlpdjS3PFuHD +TF1O9w8dKs4mBX1UXEXEw0JjosaAii9Zt8z5K/iQFulDV9hIRcpSBc+eZUS+ +Ou92CzpQ0Ug9fE3PIj7c3HFuojOGimlxBVvEZ3hg+Zspti+BiqP+yorB33nQ +mzNAN0ii4vpqRZW2rzx40rg8qSyLimRNyeeekzyYXBklllZExT7VCNOdH3gg +fc2CYdZBxagI/oXeYR6EzH9N6hahoRzpVcTL6zxgRQZKvhej4WBubGhePQ+E +Pz29LCRNwx2iAps283hQ/qzz8UYFGoZ5SB0srObBi9YTmnw6DXX0uOfEK3hg +l8YcLtlGwwvT9CyTXB7oiSXrJNTQMClSyK98Bw8EDs/cLKinoZXkzZSnxHmg +VyjIo76ZhqfDlz9Y6ceD4BnHtK9dNLzi0PPTz4sHZcNKz3Y8paGll+DIG3se +SJ7rTncWUsDs2T/Kekwe/NBY80LLRQFlMsL+E1/Gg9kzpGR9DwV0vbP546gQ +D6ZXKysxtylg4qtUXpUAEY/vzCDTXQpY2FQEnJ91MNrsP+uxXwHlJ39F6BDn +obvWDaKZ5Qqox9DMjH1UB4XBW2F0RgEbNQueVhbWAefyleKTJxWxuqWyQlSh +Dr6KWfm4dihhoN3XIkXlWnh7xMd19zIVdFa4mkP+dg0sv+y1fEdfj8L74flU +QjWM+wvv4R1QxXMZ7bJJN68Q530pwYwONfRdO7gse/UlELuvkn3tizqKyCf8 +WpVdCeTMans6XRPtFcRYY2NlUKDBXCO+QwuL26rPth4uhbskY8Pvx7TRpVdM +VcizGFjkjhydxzqoHDdrNGdZBKJCpVG+KRvQU+Vys1JSAcgly3PcVXRxUcml +7V2382C5sle9421dvN+UY1+Zdgy0uTLVe731sFClSIpz4SjsfiHWaSWgj2HR +C139WZnw5fsRF8sCfRT9k6ukF5gK5jq3Ci21DNCkeb+Zw7skaP3O/jXXa4Bu +NUusWh0SoKSnwc/poQHqbRT/dJGdAKnl+ner+g2QcVJSv0w5ASzdNE4FDBug +xfb08ps/4mGgicTof22AL0T+c+SVxsOn5B+7q6YNcKE1abHlXBxIrmn4tJ1k +iItSfsTLXI6FME29pw8DDLHrQa7TO3YMRM+Rfm7baYjFmS3qDetjYF+HEGky +yBBFzjvbFIjHwOEtg+4rIgwxcH3+P5mfo+FCauwTk3hDDPMT95EriobRkdbh +umxDzEwSSpcViAbXo9ZDJxoM0WNIX47avwe4k9sH3JfT8c7oPYes85Eg2Wxe +2rKSjnLl2V5L8yJhMkM9Ql6Uji8PVM5mp0bCWdrUyndidMxnL2vrCIiEP84J +myLIdCzPExyvU42EtuZjtek6dBxReivVcC0CjLNac+pc6NjLeiOnmhsOm5Wk +/xEppSNHe7nMMf0Q4E100baX0fGQv9PRcFIIKDXsmW2qoONPNycj30UhsNiq +79zOy3TcbT2+OLEvGDrC07918ugI5w6xikKCYWPzdH78bToWR2jp+14KArrj +w9EP43QUnKj/2qq/C1STDsV2MBiYT7ru6pcQCC3s8iU2LAbyrghemdseCPZz +bbmDHAaW7yrzL7YNhNiwmStjxgy81pB9U0MhELq9fF6L2jBwtVXBsOrdANjJ +pFt5+jAw5B79+jVKAFz89lp2OpOBn9K9x08/8gf1AGab8lMGlol36UhF+sK/ +CrY/D44wUF7o1k0HH1+YfulnOPqCgc32wgmFdr7Q6nHk8tk3DLwUvV/JVdsX +HO1f5ktNMLDiuotX9LgPxLHTIpYLGOHOV3FzVsE+0L32IW1C2Qgre0L+Ut9v +hYDWnam8SCO0r6rtFXD0hMnQT3s3RxkhqfzJq2sGnhBLCQl+HGOEqj+Pt+6T +8oRD+8Id5xOM8Im/atqO5x5wjRVD5aQbIVtr40h6kAf8rj/Y0llohMdENnc9 +yXKH3Oqz0486jfDKgNZJ9ogbkLdRx/xvGeHcT/8cdocblIuWPpvuNsITSr7X +nC+4wfXQ8g7JXuKvp4+85lGUGzzXuJLjMWyE9aZaknOibqB6oVFzdNwIKxTj +i4fNXaGteGD7VwkmUiTVOOH3nOGVDW1bjDQTR9f+ihzmOYPAj1D3XyQmJv7V +Tnc76wwmDstsl1CZaOKgKJgf6Qy3FrEYMupM/Jgf4iIj4ww9fueWG29kovLi +tFnZECd4qhRUlRPIxKPM8vZzNEf49aD+gsQuJtpnJ78qFXEE8n6h84XBTDRY +nVTf+MMBvAeL8ssimLj0UIWJwiMHeJXWl3Q9nonsvRzR5wcd4MN7A6dX2Uw0 +aqWof/5kD9MX/s7pNDBR35d06dtRO3jvalac1Uh8jzDl8JJQOxhefNTiTTMT +W2v8TRk2dtDsQzp1sp2J1W0nR2ZX2EGKtCFr4Q4Tt4e/m3qTZQtrMoP23R1h +Yl3pr80+R/8BzR2DAgGCLHRox0rmJWuQkyBfbF3Mwu21Jy7NH7GGNZ1+DtLL +WHg16HdWf7g1fJebKrm3koUvEgKTRwytoenxik16EixcGdA8YNRpBRZmmPZ3 +PQsj35Bsl72xBH/ly8sL/2GhTmxZtg/dAuK7tgap2LMwntFHMSZZQE6A2L1a +RxaOrzbXgT/m0FIed+SeGwudthWFHr9lDutULFYv+LJwQOhE8Kkt5nBL5d06 +nxgWnp+RsFqcYgbqqvJUlXMs9GKoBhd/NAXsfpRUW8LCK8MuZ/48MAXXnemv +N5axcG+KG2nvdVM4eGGi1O0iC3ljg7n1GaYwotqinFXHwjt/2/pD1ptCtpq7 +xvhtFp5pi0guCd4EX9WP02unWOhSGFiWvtQEhntws/h3FnZlRmwK/WYM7WGT +TlEzLBT4RTbe+cIYsmstI+k/Wbi7fnT16XpjUGcJXGkSYuMT7wuC33YYg59l +KK1Tko1nqTZlLr0IAzvMVw1w2Bj1Zz7yuyNA8/IZkiGwkaJ9UiRPB6D0cqna +SWM2zidprHFfBRDxZcFsixkbE/ulb9nd2ggie3nJI3ZszF/k6z3O3ghm6bS5 +t35sfJyWeL9LiwvXy369nslk47HeVFtZDTbQN0XNWR1mo9ZVu6KKVWzgvx5f +VXyUjWHnvGQdJllQK/eCYZXLxtAlKzlCtSy4UtB+9OxpNq75tmp6mMWC4iNp +TPMqNv6VX/FB15EJWVGrjxX0szH3iUnQs5MMEBbPrJgYZGPXb8fTUvsYkF4j +0GIyzMb3D2lF4b4MSJ38+n58hI0RheoVuzUZkLhzgGP8no3y5sfWdHTSYbfX +qbGP82wsFpdWjpgzBA9TRWTLcTB2+chBr90GsDAgLNpJ5eBnoTXjb7cYQHHA +5DMrRQ4uHN+++xAYwPv0xr0eqhyMOJPppyliALvv2FXH6XFw5qXIye6L+nDI +dp/cdTMOWj/Z1m0xpgdNWwZ/G4Rz8IXbuqiSOF3w/th0tyWSg4r3P7w/4a8L +AvHFBaZRHDT/kDd1/h9dMDsdbOAcx8EnKj+9VynowqPni0L2HOSgAi23ZWXP +Bvjkp/2sJp+DqSrr6q4qbQDZ0IxG7XYOHni5VuVUnxZk/w00PNzBwdLZzBzR +K1ogmGtW8+EmB7XNakQvZ2rBp/olF4vvcFDfefflLSZa0CSQWiDWz8ECepR+ +SoMmeOQl7Z19x8EJ5wLbiQsaUNAcZ9i6kosOJaMPqZVqsMrWvYYkykVBIT+d +DZlqkPTKSGvvGi6mDHYL++1Sg51L5pU2SHAxKTelTFNTDRh2MetK5bh4evuN +Jvc6VXg8uvt7mi4XNffuPTNzez1IrAip+ceNi07tj2g2y1WgbNP++Cl3Lt65 +uzXD+rMy6O3P3nTci4upD063RdxXBtupa4PDvlykboz4pZGrDOmPZ374h3Bx +UfLzKR+KMsyXHjCJT+ai6Bfu63MsJXjKPt5fcZmLca7WTx3/VYCd0WVFllVc +1A8zFm6JVoDZKn7A+DUuBri1fdvspQBiCsNzuvVcpHdRAprVFMBamEK+0c5F +27bws6q3aNAyULG9f5DYn+H1J58X08BK9LpWzDAXM0YvWtpNUGHY/M6s9DMu +/lt8ReXhIBWmmz5nbn3FxT43rVM6lVTQKtlw9eMnLraL05KdrKnQ8tQ45sgE +cX9PUVyFARWs1jmBzhQXVTft7pKUo0JgRvTDqBkuThYJF54ZlYfp9vRCqXku +Lr+xMlOzXh5Sfub7N/3kov3x4eUzWfKwxuCipvcCFys/BT6b9ZaHs6FNM3// +clE2Zea6rp48/A9wGD1s "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08318364360817387}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8425,6 +8699,7 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8452,7 +8727,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.08145702771151381}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08318364360817387}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8460,9 +8736,9 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991335257344549*^9}, - CellLabel-> - "Out[255]=",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] + CellChangeTimes->{3.991335257344549*^9, 3.994352285640993*^9, + 3.994355357125815*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"3d4ca44f-f9b7-43ea-b872-78f006c6a828"] }, Open ]], Cell[CellGroupData[{ @@ -8514,67 +8790,77 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel-> - "In[256]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], + CellLabel->"In[98]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.39639867535232`*^-188\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 237, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257395241*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6110302195572928`*^-151\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 98, + 17, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994352285814229*^9, + 3.994355357292592*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], +In[98]:=",ExpressionUUID->"da1f4a73-d1fc-451d-9fd1-daa095778d6e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.342395211692676`*^-192\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 238, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574052296`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.320731401661125`*^-154\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 98, + 18, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994352285814229*^9, + 3.994355357304555*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], +In[98]:=",ExpressionUUID->"d67c090f-4994-4242-b038-843d4518f5ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1800384500947783`*^-195\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 256, 239, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257413231*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.0525656062438877`*^-156\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 98, + 19, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994352285814229*^9, + 3.99435535731427*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], +In[98]:=",ExpressionUUID->"3dcd7650-12e7-467e-a77d-4469cac6f87d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 256, 240, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574212303`*^9}, +during this calculation.\"", 2, 98, 20, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994352285814229*^9, + 3.9943553573232727`*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], +In[98]:=",ExpressionUUID->"f9cf3e6b-e109-4add-a913-08a9438e2129"], -Cell[BoxData["9.332200719005158`"], "Output", - CellChangeTimes->{3.991335263670042*^9}, - CellLabel-> - "Out[256]=",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[BoxData["9.137513870694397`"], "Output", + CellChangeTimes->{3.991335263670042*^9, 3.9943523771107388`*^9, + 3.994355452969489*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"02375aea-9ff2-4be6-b10c-c36997a0ecf2"] }, Open ]], Cell[CellGroupData[{ @@ -8641,65 +8927,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849285445259*^9, - 3.991849289419262*^9}},ExpressionUUID->"6f0ad284-4db3-da47-b8dc-\ -45830eedfe9c"], + CellChangeTimes->{{3.991849285445259*^9, 3.991849289419262*^9}}, + CellLabel->"In[99]:=",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 241, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263710146*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.840203496665924`*^-200\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 21, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943523771805162`*^9, + 3.994355453049019*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], +In[99]:=",ExpressionUUID->"17468b9a-8022-4d02-8d71-f419f8aea37d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 242, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637201557`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.201817762902973`*^-204\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 22, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943523771805162`*^9, + 3.994355453065041*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], +In[99]:=",ExpressionUUID->"d1c12e64-6207-4a62-81de-2694b04162aa"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 257, 243, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263728153*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4987327484976006`*^-208\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 23, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943523771805162`*^9, + 3.994355453074617*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], +In[99]:=",ExpressionUUID->"208a8324-2a0c-43c6-826b-df56c2ec48e7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 257, 244, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637361546`*^9}, +during this calculation.\"", 2, 99, 24, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943523771805162`*^9, + 3.9943554530830603`*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], +In[99]:=",ExpressionUUID->"6be0e505-3cf8-408d-8668-0a43853d6a6b"], -Cell[BoxData["0.00046079539931050297`"], "Output", - CellChangeTimes->{3.991335268779545*^9}, - CellLabel-> - "Out[257]=",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[BoxData["0.7394122440217015`"], "Output", + CellChangeTimes->{3.991335268779545*^9, 3.994352389208672*^9, + 3.994355465132056*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"db9c01f7-b06f-4c52-9a36-e80f79d5c5e2"] }, Open ]], Cell[CellGroupData[{ @@ -8720,8 +9019,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8766,65 +9064,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849293744112*^9, - 3.9918492959939384`*^9}},ExpressionUUID->"b2dda819-6f34-5c49-bc62-\ -303d815946e5"], + CellChangeTimes->{{3.991849293744112*^9, 3.9918492959939384`*^9}}, + CellLabel-> + "In[100]:=",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 245, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268812542*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.840203496665924`*^-200\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 25, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994352389355776*^9, + 3.994355465193578*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], +In[100]:=",ExpressionUUID->"2cd42c45-03aa-4ac9-b0c1-f32bd6672e9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 246, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268822542*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.201817762902973`*^-204\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 26, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994352389355776*^9, + 3.99435546520568*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], +In[100]:=",ExpressionUUID->"5bce8b46-9e92-414d-add5-6d1040001da8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 258, 247, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268831545*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4987327484976006`*^-208\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 27, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994352389355776*^9, + 3.994355465220166*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], +In[100]:=",ExpressionUUID->"f6e78372-ef3d-432c-b1df-86ec9062b98a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 258, 248, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352688395576`*^9}, +during this calculation.\"", 2, 100, 28, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994352389355776*^9, + 3.994355465229862*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], +In[100]:=",ExpressionUUID->"a6fe13e1-c976-4388-b0fa-e1037bc81284"], -Cell[BoxData["5.104103620353258`"], "Output", - CellChangeTimes->{3.991335272704685*^9}, +Cell[BoxData["24.520010775648654`"], "Output", + CellChangeTimes->{3.991335272704685*^9, 3.994352400100181*^9, + 3.994355476479607*^9}, CellLabel-> - "Out[258]=",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] + "Out[100]=",ExpressionUUID->"19c64c7a-4e28-4ff0-8e66-ec50d97cffd4"] }, Open ]], Cell[CellGroupData[{ @@ -8845,8 +9158,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8891,65 +9203,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918492993108063`*^9, - 3.991849303274454*^9}},ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-\ -1a175f609f7d"], + CellChangeTimes->{{3.9918492993108063`*^9, 3.991849303274454*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 249, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727386665`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.840203496665924`*^-200\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 29, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994352400187704*^9, + 3.9943554765552607`*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], +In[101]:=",ExpressionUUID->"ef67cc31-99fb-4bdd-b3fe-ea35d168012e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 250, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727476673`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.201817762902973`*^-204\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 30, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994352400187704*^9, + 3.994355476568324*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], +In[101]:=",ExpressionUUID->"aeda4b30-4368-44af-aa02-7dcc28ea2810"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 259, 251, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727556705`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4987327484976006`*^-208\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 31, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994352400187704*^9, + 3.9943554765805902`*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], +In[101]:=",ExpressionUUID->"7a25d22a-95fb-4aec-abac-7d31b1e8afeb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 259, 252, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727636833`*^9}, +during this calculation.\"", 2, 101, 32, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994352400187704*^9, + 3.99435547659105*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], +In[101]:=",ExpressionUUID->"a8bde9e4-a39f-4e01-8e9c-9b028bf58c8f"], -Cell[BoxData["18.832858301324727`"], "Output", - CellChangeTimes->{3.991335275154251*^9}, +Cell[BoxData["3.9101573629346964`"], "Output", + CellChangeTimes->{3.991335275154251*^9, 3.994352409317009*^9, + 3.994355486044051*^9}, CellLabel-> - "Out[259]=",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] + "Out[101]=",ExpressionUUID->"863a8875-2a83-42a2-b9b4-4b6146a7fb2f"] }, Open ]], Cell[CellGroupData[{ @@ -8958,22 +9285,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918493065908413`*^9, - 3.9918493103344364`*^9}},ExpressionUUID->"69dd09d9-152e-3e4d-9517-\ -4de4791db2f4"], - -Cell[BoxData["0.00004699917922538678`"], "Output", - CellChangeTimes->{3.991335275186266*^9}, + CellChangeTimes->{{3.9918493065908413`*^9, 3.9918493103344364`*^9}}, CellLabel-> - "Out[260]=",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] + "In[102]:=",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], + +Cell[BoxData["0.07551429837466811`"], "Output", + CellChangeTimes->{3.991335275186266*^9, 3.994352409387682*^9, + 3.994355486101322*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"d4ca0909-94fe-48d5-96ee-d69f0726345e"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849314761318*^9, 3.9918493173333225`*^9}, - 3.991924798063732*^9},ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-\ -749729cd7104"], + 3.991924798063732*^9}, + CellLabel-> + "In[103]:=",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ @@ -8997,12 +9326,13 @@ Cell[BoxData[ RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellChangeTimes->{{3.99312673568116*^9, 3.993126746164192*^9}}, CellLabel-> - "In[262]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], + "In[104]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[BoxData["5.744985073726737`"], "Output", - CellChangeTimes->{3.9913352752142563`*^9}, +Cell[BoxData["4.62164128149918`"], "Output", + CellChangeTimes->{3.9913352752142563`*^9, 3.994352409416727*^9, + 3.994355486129532*^9}, CellLabel-> - "Out[262]=",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] + "Out[104]=",ExpressionUUID->"5fdbbf3c-5fd6-4709-90b9-1df7c620d467"] }, Open ]], Cell[CellGroupData[{ @@ -9012,12 +9342,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[264]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], + "In[105]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[BoxData["1.564995573098557`"], "Output", - CellChangeTimes->{3.9913352752482567`*^9}, +Cell[BoxData["2.9089950122919923`"], "Output", + CellChangeTimes->{3.9913352752482567`*^9, 3.994352409433073*^9, + 3.994355486145954*^9}, CellLabel-> - "Out[264]=",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] + "Out[105]=",ExpressionUUID->"92dc1416-b1b1-416a-b4b9-63c4093eb08d"] }, Open ]], Cell[CellGroupData[{ @@ -9027,12 +9358,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[267]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], + "In[106]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[BoxData["8.990876207899632`"], "Output", - CellChangeTimes->{3.9913352753089123`*^9}, +Cell[BoxData["13.444331436483886`"], "Output", + CellChangeTimes->{3.9913352753089123`*^9, 3.994352409447476*^9, + 3.9943554861621017`*^9}, CellLabel-> - "Out[267]=",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] + "Out[106]=",ExpressionUUID->"c60ec586-631e-4280-9cf1-f6cef6d24666"] }, Open ]], Cell[CellGroupData[{ @@ -9222,12 +9554,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[268]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], + "In[107]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[BoxData["0.07167004636648908`"], "Output", - CellChangeTimes->{3.9913352753341656`*^9}, +Cell[BoxData["0.009113188784310835`"], "Output", + CellChangeTimes->{3.9913352753341656`*^9, 3.9943524094649878`*^9, + 3.994355486180954*^9}, CellLabel-> - "Out[268]=",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] + "Out[107]=",ExpressionUUID->"89057fa4-bf45-49f7-a9a3-033fe131ea9e"] }, Open ]], Cell[CellGroupData[{ @@ -9241,12 +9574,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[269]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], + "In[108]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[BoxData["3.3103666491187544`"], "Output", - CellChangeTimes->{3.9913352754296722`*^9}, +Cell[BoxData["9.283457577969225`"], "Output", + CellChangeTimes->{3.9913352754296722`*^9, 3.994352409648096*^9, + 3.9943554863858213`*^9}, CellLabel-> - "Out[269]=",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] + "Out[108]=",ExpressionUUID->"53e1d9f5-9cfd-48e3-8e10-a216bc6031e4"] }, Open ]], Cell[CellGroupData[{ @@ -9438,12 +9772,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[270]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], + "In[109]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[BoxData["0.012832691268660865`"], "Output", - CellChangeTimes->{3.9913352754426765`*^9}, +Cell[BoxData["0.07302768376742132`"], "Output", + CellChangeTimes->{3.9913352754426765`*^9, 3.994352409664391*^9, + 3.99435548640448*^9}, CellLabel-> - "Out[270]=",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] + "Out[109]=",ExpressionUUID->"4a743ba8-a71b-43e1-96ec-3ec06049c1a0"] }, Open ]], Cell[CellGroupData[{ @@ -9457,12 +9792,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[271]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], + "In[110]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[BoxData["7.823229443917166`"], "Output", - CellChangeTimes->{3.991335275540678*^9}, +Cell[BoxData["3.279451236261415`"], "Output", + CellChangeTimes->{3.991335275540678*^9, 3.994352409859251*^9, + 3.994355486608638*^9}, CellLabel-> - "Out[271]=",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] + "Out[110]=",ExpressionUUID->"10458185-ced5-4971-a340-1bcf300771ac"] }, Open ]], Cell[CellGroupData[{ @@ -9555,12 +9891,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[272]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], + "In[111]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913352755566807`*^9}, +Cell[BoxData["0.04840187632890963`"], "Output", + CellChangeTimes->{3.9913352755566807`*^9, 3.9943524098743067`*^9, + 3.9943554866253138`*^9}, CellLabel-> - "Out[272]=",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] + "Out[111]=",ExpressionUUID->"abda5f28-aeaf-4727-b31e-05be98f84991"] }, Open ]], Cell[CellGroupData[{ @@ -9650,12 +9987,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[273]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], + "In[112]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991335275581682*^9}, +Cell[BoxData["0.9515981236710904`"], "Output", + CellChangeTimes->{3.991335275581682*^9, 3.994352409891102*^9, + 3.994355486643012*^9}, CellLabel-> - "Out[273]=",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] + "Out[112]=",ExpressionUUID->"212cdd5d-0476-4843-9681-8c91622aafad"] }, Open ]], Cell[CellGroupData[{ @@ -9778,12 +10116,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[274]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], + "In[113]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913352756087036`*^9}, +Cell[BoxData["0.046059134696750575`"], "Output", + CellChangeTimes->{3.9913352756087036`*^9, 3.994352409910376*^9, + 3.994355486663726*^9}, CellLabel-> - "Out[274]=",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] + "Out[113]=",ExpressionUUID->"2a621f04-df5e-4626-b8e0-4ff64c870bed"] }, Open ]], Cell[CellGroupData[{ @@ -9845,68 +10184,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849332835844*^9},ExpressionUUID->"d6aa822f-4140-174a-8e29-\ -c889dba5c0d8"], + CellChangeTimes->{3.991849332835844*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 253, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275636673*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.844365757162284`*^-201\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 33, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994352409933217*^9, + 3.99435548668922*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], +In[114]:=",ExpressionUUID->"6c950235-209e-4907-bb61-5ea7ca9eb8e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 254, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756456738`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.803949783772331`*^-205\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 34, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994352409933217*^9, + 3.994355486698224*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], +In[114]:=",ExpressionUUID->"824397c1-ae91-4591-946e-d4344e179330"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 255, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756546745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.002265145877267`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 35, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994352409933217*^9, + 3.9943554867074623`*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], +In[114]:=",ExpressionUUID->"b8ec4384-b7cf-4db1-b40c-767174c49281"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 275, 256, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275662676*^9}, +during this calculation.\"", 2, 114, 36, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994352409933217*^9, + 3.9943554867171288`*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], +In[114]:=",ExpressionUUID->"94130faf-ff6d-412e-aa8b-d426ea8083bc"], -Cell[BoxData["3.3103666491187513`"], "Output", - CellChangeTimes->{3.991335279487499*^9}, +Cell[BoxData["9.283457577969218`"], "Output", + CellChangeTimes->{3.991335279487499*^9, 3.994352417769014*^9, + 3.994355494878484*^9}, CellLabel-> - "Out[275]=",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] + "Out[114]=",ExpressionUUID->"e750c412-bb21-44f1-b3b3-2b82bae29a7e"] }, Open ]], Cell[CellGroupData[{ @@ -9968,68 +10319,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918493361354027`*^9},ExpressionUUID->"46f3f057-22eb-c143-af7a-\ -23ddab00799c"], + CellChangeTimes->{3.9918493361354027`*^9}, + CellLabel-> + "In[115]:=",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 257, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279522499*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.844365757162284`*^-201\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 37, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994352417830426*^9, + 3.994355494934044*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], +In[115]:=",ExpressionUUID->"7e7499e9-19c6-4bcf-8e49-47ab6468734a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 258, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279532501*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.803949783772331`*^-205\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 38, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994352417830426*^9, + 3.9943554949447813`*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], +In[115]:=",ExpressionUUID->"142e57b1-f903-46c5-84e0-296a4791e9f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 259, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795405006`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.002265145877267`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 39, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994352417830426*^9, + 3.994355494955657*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], +In[115]:=",ExpressionUUID->"127afde1-1d73-400a-86ed-d49a3734f9be"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 276, 260, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795487957`*^9}, +during this calculation.\"", 2, 115, 40, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994352417830426*^9, + 3.9943554949659843`*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], +In[115]:=",ExpressionUUID->"e312b68f-e8e6-4700-85f1-a8edbd5239eb"], -Cell[BoxData["7.82322944391716`"], "Output", - CellChangeTimes->{3.991335283631424*^9}, +Cell[BoxData["3.279451236261415`"], "Output", + CellChangeTimes->{3.991335283631424*^9, 3.9943524255801563`*^9, + 3.994355503059833*^9}, CellLabel-> - "Out[276]=",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] + "Out[115]=",ExpressionUUID->"3dde8d27-133f-486f-8da0-4e11577e62f5"] }, Open ]], Cell[CellGroupData[{ @@ -10087,94 +10450,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918494105860615`*^9},ExpressionUUID->"0137ed47-cd78-284a-910a-\ -31d165f1571c"], + CellChangeTimes->{3.9918494105860615`*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk8Fd8bB3DJVlEhJFFcFFFyrSXnCVHWkrImrnvHkhRKN2t9Jd+yhFT8 +Skr2rC3a8E1JJVtRJHuMJTt3kOJ3/DGveb1fM+c5n3nOnCPLOGXN4ubi4hrA +19Ldt277lmcNdfpl5QrnOvVJpD+arskwykM5D65lL7krVStR3qgU1XM+6nVh +H2TW8gnS36Gw5030buxidthbXqMalDZRGNODfaVq/euw3M9IP8fRtBf7RYPv +3T/qX9GzwWZPEnuotTr4/KsWlPuf/PAA9oY+miNl2Ia0dhl8/oVtNhas61/T +iS57qUmOYZf/GVrFzu1Gusyxt5PY3y5KBJX4/ETWe8I+U9ijfEZD0+p9aFSo +a+88Nl/0aXv6DIlSx4XFuBCJZIRTPvi+GkB7uMXMeLEtpajMUcNh9EPtWuda +bOKenLiqwChSvs6nL4EdpmAVcaJmDOUVWC1KY7dINO08kzuBFJ/a5qpgMx28 +PK9HT6J3M+KJGtjjd7juP/KZQj/Ssrv0sAXkVNdOqHMQ/7xhmiV2IvOtyVox +CmmIWErYYW/Osg/bMUMhbmLbmCu2jsrl0ZOvZlF7kcv7AGwPrc6aIcM/KPpL +qWQG9jT7LM9Kxb8ousw9oxj7wqtVekoCC6h3vv96OXYS6Dx0r1lEX3I8k78v +5cv4YOSXuwzu1QYarwMS5VZd77ooxQ36xt8HaNjj/c7B8dHc4FG6ZpSOHazM +eVzksxxqZflkj2AnFsrSxtR54e83mtId7NaG4fKFB7ygvtOipwB78+Qzh9Vi +fLCi6tBCBXaehmWC6gwfaHuNOg9iV74IXOb9SgD2p//zRm8viThvGzsHDAWh +JueyKIUtYi64NqhcEKadj0kIG5BIrckIhHSFYJR98poKtlfv03s7t68Goy69 +Nib2ae4atT2Ca+G+ecFAK3afXMFEBCUMBqGJtW2GuD9E9Yp6ugikX2eILWJz +PyRl1/uKAD323GdZI5yXvsk695cIWC0LzPTAdjCMe1TXJQp0jT9v57Hr3fz8 +JT6JQdp/rbXaxiTqyIqNchEQB6+Waw6u2MO/ch/k7BOH1cF3HKOwV5752bj7 +tTgYzr9+2YVtdMlGw+WpBKjm2o7EmZDoZboWJztVEopja+T5D5Aove93wK4z +0mDPu9Bnak6i/UciO/zzpeGRdplRGPZwpahxPomf+65d8QRbI11FbLO9DNTN +nXsjY4H7yXB+zKu/CahWn9lZ7MmxrnMD4ZvBktjk99qKRKInjZ48tpCDunVy +mbcPk4hMX+lx0EsOnMrmXrRhP29rkBq5LAeTTfF0GRsSOZkfC1d8LQcz7BV2 +adjp2wKsk9VpEKNiQBQewfMPZY2HSshDWsSe5DZbEtm4r1I17VYAni8cZrgT +iVDAEXXbvwpw9pBZXj22ckSqNlNSESw+3zuy8RiJuB7QDUIPKUJWkXVdCXZ+ +h6PtowpFsGFz24074/15NO/ihrQtQNsnXXfWFeczsvg2xFACk/M81tUEiR4c +vvVjJlQJBl83tcm5kyiW0d3Fc1sJLg10fgzCZl44+0umUQm4Swuqt3uQSLg0 +heuwoTJsoRHuyZ74/6GPKr+ibYMnC4urL3qTSEruWlhUrwpkzXko/M+PRKVX +p5XmuFUh6BJvNL8/7seUfRMhqwqTRyOJs9h3K+WVDJxVoV3Z+Jz1GRLJub/8 +MtusCsqxXAIiAfh78/oUiE/bQUhwYiDzPImkpWSIzfZqkNKYULblIolUMs4I +ziN1+FH9x+VyPIkYzHCOqqU6uNhn3eJPwPuVltDh4qQOTsJT9CvYy9MKi6rY +6tBhcT4l5jreb3eHbBKK1aEvPk7j9g18nia5pCjR6NArefLsx2S8vlHm2+34 +NOB3hM1RvzQS3feTP/i0RhN4Fjz0qSckaghA2pcydEE5cuLprR4SyTp/tTzm +vQfMOTMtleL9iLVYUiB9HmBBPc9PwrIfSfx6zi/BMAClW53RnvH96Axdry1B +2Qjme4K5tJv7EWPkzwfRoX3wb31z4y65AZRv4M+fWm8CPGXtN4SDBlD6tFdF +XuIBqDxUqsDzdQDN7l1fWxlmBsKUT6uR/iBq51o+0e1qARrzgjMh+YPIZ+Op +uIs0KxjmK5U33ziECjw/vL4RcRAIt/LjmneGUOCU5Mw2z0OgRV94+W3DL8Qx +NT76/rg1FITbfvj58BfSdYzf23foMBSVJpXLGgyjL5IpXpV0G7BBRtJbvw6j +DZnhpdlbj8DzHfaOLUEj6HmXsrml0FEwWIzLF5YZRTJN4+4BI0fhv+aQyIU3 +o4h+Iz7vQZctiOc3r5QMHkMpPFPbE97aAXF/hhSXGEcle3e0RrywB3WxnD87 +A8dRkvZV4T+5DmD4QiChon0c1f/IuEyPdgSy1T/VQG8CPbW4I3/6ghPwMTw6 +1qRPoImTh7l8mMfgiG/W4mPeScQxVvIYNXSGk2Yy+26zJlH2yPdZf63jMGoc +PIVqJ5Hd/Qy3Y4IuoLK+KXxIZQo9fmR2fHmkC9hLKVx6kTCFdKW+zF2ZcwGu +zFrVvWNTiNbl3vrZ0xUE2Nfe/DCeRr2rTljd+ekKSUHbB2LuT6OGWEs3kyMM +iDIriT86MY0S2amrzjYw4CNvNZm8l4NKyxfn3A64gWL6FSZc4aA1ThBJf+kG +jzu2F05XctDmde/rN5a6Qa94m3//Ow5Sq7FYz1fuBuFJIbnfqzjIWs8xp6XC +DXzNWrxLP3BQ4saATyEf3SBNOgaCajhoQ/vDNR9a3CBCwWiuvZGD5J0lkpxm +cL1Z+eNaPRyk6zKaHaHBhPzYiXdb/3JQZvK4v6UWE6YDUocHsNc1TupL6DCB +b46IyV7goNF9M03Zu5ngFVeip8hF4fOLa1mNARPKBCItpZZTaPWMsL3IISYw +dHM3DwtQqDdGc0XqSSZYHTeJ37KOQrGvgj2fZzIhy6sidGErhU6q39JlZzNh +7xdboWQlCpnnFK/QyWVC0c1zonRlCq28ReY8y8d5rHojWNsoFOF3cKjkCROi +pU9xVapSKFhJ/sTTN0wQKGNruKtTyOvWJ+9HHUyINQnq2LebQgdWk3p+XUwQ +2b9TuR57awSXkHoPEzTq5Ids9ShE+mnmF/cxIWyZa5X7Hgq5WqaOFA0zwc0i +aOQCopAdr79P4W+8NN/GupIMKWTiv+F0njgLwjSvPHM2o9Cb1MumCetZ8MS2 +IawLW69mUp69gQUnmjbdczWnkJrCp++GMiyo8vMYcLWgkGRzkOEPBRZs7rmd +6GBFoV+72sVXauLx61sNVQ5T6Br3vTL3wyy4L25tctABf/8OwSSLIyxw6tzT +Xop9yZHtR7dlwcHdc++3OlKI/eTglkUHFnC3Xri9gO1KLIu/yWDBzjpTnbRj +FKJXM5jvfFnQzzOn8dGFQs3xCqtocSzIOlv84AZBoQIk5DEQz4Ke4OA2EvvS +yHRl/nUWHHAeCNF2p5D6gcpQnVssEDNm/f6GHcvlNmlxlwWFlFnLak8KGZ+6 +952dxwJD4+ENjBMUkpb+V0u/gAXHd9V+y8Gerj51fXkRCxr1iN/j2GmKyCL2 +MQv+yFxlh3hT6G97++sHL1ngGUyzunaSQk/MpbLrPrCg+reZw81TFIr6zc2b +WI3zyUdHNWEzsodc7WtYEL7tOU3kNIXW8ryU6q1nwdPH6f9GYXu/srs29w33 +1zyads6XQjTlmwHyfSxQbfx+fac/hX43hzQOkiyIr4jdTmA3RLDUCgdY0GJ+ +Ycf/sEO7NYZ0h1lQQUy4cZ2hUGtS4zGrKRbc2T9/4x12Ar/wvsBlBITyR4nT +AyhUOtnueGY5AXnvZPncsPvbc/18eAlgZrI0E7D1nhjdY6wgoOPNe+tRbNKF +PW8qTMCUeGVkyjmc33yfyD5RApTs4v3fY+/WFlFCYgSwzErujmPHCeUdpUsS +EDLb+QjY+PnLzmIpWQJ4rHM+N2MTGXkfxGgEpFUpPZvHjos737lGgYB/5p/9 +kDmP5yNEhXiU8PuSbd0M7DhRE49hNQIyXBnd3dgvF0TDSHUC1jX5lC9i9w12 +3ejSIKAsxbR1YyCFdr0OfNukQ0DDaZs6G+xe7wKZMiDgv5rZzFfYq+2CNJ8Z +ELDFu+p8I7au4X7zYiMC+KPUooawYyV7zmfsJ2DWrNJTPIhCz3kK41JNCfBk +/tTahv1zLCgr2ZyATYNXDBC2TpXY15iDBBTIOYixsBnFPb8irQmwqghsC8CO +uVPI/Y8NARWpa3sisXv8DqgF2BFQMhqVnYUt5CxuctqBgPxST8+SpXoHfh7z +ciLAPyLfo3Jp/KaQKGcXvF4V9nIdS3lWmqbZMQiI5SttG1yqxxF/Yc0kQHLw +3NfppXrdP+vNCQIOV10VXFyqV1NEGnsQ8EJp8qJAMM73LOQveBHAqH2oKYwd +k2a6brc3AUPJT7dIYj+Pkdim6UOAb6aQ3WbsHnbv3h2nCXio86hKEVuQWWyn +5If7W3nfXwVb2yr0FO0MAUUjrc47l+rvMrssHUDA/UtO/2piRyusT5FgExB+ +RWFcB7tkbd9j4UACvitr3tyN3T1fXL0qmICUd1cD9yzV7w/t5g0l4ESfQoo+ +ttYXs9nFMGwjvoUl/x8Uxfgd "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10188,106 +10551,106 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwV1Hk8Fd8bB3DJVlEhJFFcFFFyrSXnCVHWkrImrnvHkhRKN2t9Jd+yhFT8 +Skr2rC3a8E1JJVtRJHuMJTt3kOJ3/DGveb1fM+c5n3nOnCPLOGXN4ubi4hrA +19Ldt277lmcNdfpl5QrnOvVJpD+arskwykM5D65lL7krVStR3qgU1XM+6nVh +H2TW8gnS36Gw5030buxidthbXqMalDZRGNODfaVq/euw3M9IP8fRtBf7RYPv +3T/qX9GzwWZPEnuotTr4/KsWlPuf/PAA9oY+miNl2Ia0dhl8/oVtNhas61/T +iS57qUmOYZf/GVrFzu1Gusyxt5PY3y5KBJX4/ETWe8I+U9ijfEZD0+p9aFSo +a+88Nl/0aXv6DIlSx4XFuBCJZIRTPvi+GkB7uMXMeLEtpajMUcNh9EPtWuda +bOKenLiqwChSvs6nL4EdpmAVcaJmDOUVWC1KY7dINO08kzuBFJ/a5qpgMx28 +PK9HT6J3M+KJGtjjd7juP/KZQj/Ssrv0sAXkVNdOqHMQ/7xhmiV2IvOtyVox +CmmIWErYYW/Osg/bMUMhbmLbmCu2jsrl0ZOvZlF7kcv7AGwPrc6aIcM/KPpL +qWQG9jT7LM9Kxb8ousw9oxj7wqtVekoCC6h3vv96OXYS6Dx0r1lEX3I8k78v +5cv4YOSXuwzu1QYarwMS5VZd77ooxQ36xt8HaNjj/c7B8dHc4FG6ZpSOHazM +eVzksxxqZflkj2AnFsrSxtR54e83mtId7NaG4fKFB7ygvtOipwB78+Qzh9Vi +fLCi6tBCBXaehmWC6gwfaHuNOg9iV74IXOb9SgD2p//zRm8viThvGzsHDAWh +JueyKIUtYi64NqhcEKadj0kIG5BIrckIhHSFYJR98poKtlfv03s7t68Goy69 +Nib2ae4atT2Ca+G+ecFAK3afXMFEBCUMBqGJtW2GuD9E9Yp6ugikX2eILWJz +PyRl1/uKAD323GdZI5yXvsk695cIWC0LzPTAdjCMe1TXJQp0jT9v57Hr3fz8 +JT6JQdp/rbXaxiTqyIqNchEQB6+Waw6u2MO/ch/k7BOH1cF3HKOwV5752bj7 +tTgYzr9+2YVtdMlGw+WpBKjm2o7EmZDoZboWJztVEopja+T5D5Aove93wK4z +0mDPu9Bnak6i/UciO/zzpeGRdplRGPZwpahxPomf+65d8QRbI11FbLO9DNTN +nXsjY4H7yXB+zKu/CahWn9lZ7MmxrnMD4ZvBktjk99qKRKInjZ48tpCDunVy +mbcPk4hMX+lx0EsOnMrmXrRhP29rkBq5LAeTTfF0GRsSOZkfC1d8LQcz7BV2 +adjp2wKsk9VpEKNiQBQewfMPZY2HSshDWsSe5DZbEtm4r1I17VYAni8cZrgT +iVDAEXXbvwpw9pBZXj22ckSqNlNSESw+3zuy8RiJuB7QDUIPKUJWkXVdCXZ+ +h6PtowpFsGFz24074/15NO/ihrQtQNsnXXfWFeczsvg2xFACk/M81tUEiR4c +vvVjJlQJBl83tcm5kyiW0d3Fc1sJLg10fgzCZl44+0umUQm4Swuqt3uQSLg0 +heuwoTJsoRHuyZ74/6GPKr+ibYMnC4urL3qTSEruWlhUrwpkzXko/M+PRKVX +p5XmuFUh6BJvNL8/7seUfRMhqwqTRyOJs9h3K+WVDJxVoV3Z+Jz1GRLJub/8 +MtusCsqxXAIiAfh78/oUiE/bQUhwYiDzPImkpWSIzfZqkNKYULblIolUMs4I +ziN1+FH9x+VyPIkYzHCOqqU6uNhn3eJPwPuVltDh4qQOTsJT9CvYy9MKi6rY +6tBhcT4l5jreb3eHbBKK1aEvPk7j9g18nia5pCjR6NArefLsx2S8vlHm2+34 +NOB3hM1RvzQS3feTP/i0RhN4Fjz0qSckaghA2pcydEE5cuLprR4SyTp/tTzm +vQfMOTMtleL9iLVYUiB9HmBBPc9PwrIfSfx6zi/BMAClW53RnvH96Axdry1B +2Qjme4K5tJv7EWPkzwfRoX3wb31z4y65AZRv4M+fWm8CPGXtN4SDBlD6tFdF +XuIBqDxUqsDzdQDN7l1fWxlmBsKUT6uR/iBq51o+0e1qARrzgjMh+YPIZ+Op +uIs0KxjmK5U33ziECjw/vL4RcRAIt/LjmneGUOCU5Mw2z0OgRV94+W3DL8Qx +NT76/rg1FITbfvj58BfSdYzf23foMBSVJpXLGgyjL5IpXpV0G7BBRtJbvw6j +DZnhpdlbj8DzHfaOLUEj6HmXsrml0FEwWIzLF5YZRTJN4+4BI0fhv+aQyIU3 +o4h+Iz7vQZctiOc3r5QMHkMpPFPbE97aAXF/hhSXGEcle3e0RrywB3WxnD87 +A8dRkvZV4T+5DmD4QiChon0c1f/IuEyPdgSy1T/VQG8CPbW4I3/6ghPwMTw6 +1qRPoImTh7l8mMfgiG/W4mPeScQxVvIYNXSGk2Yy+26zJlH2yPdZf63jMGoc +PIVqJ5Hd/Qy3Y4IuoLK+KXxIZQo9fmR2fHmkC9hLKVx6kTCFdKW+zF2ZcwGu +zFrVvWNTiNbl3vrZ0xUE2Nfe/DCeRr2rTljd+ekKSUHbB2LuT6OGWEs3kyMM +iDIriT86MY0S2amrzjYw4CNvNZm8l4NKyxfn3A64gWL6FSZc4aA1ThBJf+kG +jzu2F05XctDmde/rN5a6Qa94m3//Ow5Sq7FYz1fuBuFJIbnfqzjIWs8xp6XC +DXzNWrxLP3BQ4saATyEf3SBNOgaCajhoQ/vDNR9a3CBCwWiuvZGD5J0lkpxm +cL1Z+eNaPRyk6zKaHaHBhPzYiXdb/3JQZvK4v6UWE6YDUocHsNc1TupL6DCB +b46IyV7goNF9M03Zu5ngFVeip8hF4fOLa1mNARPKBCItpZZTaPWMsL3IISYw +dHM3DwtQqDdGc0XqSSZYHTeJ37KOQrGvgj2fZzIhy6sidGErhU6q39JlZzNh +7xdboWQlCpnnFK/QyWVC0c1zonRlCq28ReY8y8d5rHojWNsoFOF3cKjkCROi +pU9xVapSKFhJ/sTTN0wQKGNruKtTyOvWJ+9HHUyINQnq2LebQgdWk3p+XUwQ +2b9TuR57awSXkHoPEzTq5Ids9ShE+mnmF/cxIWyZa5X7Hgq5WqaOFA0zwc0i +aOQCopAdr79P4W+8NN/GupIMKWTiv+F0njgLwjSvPHM2o9Cb1MumCetZ8MS2 +IawLW69mUp69gQUnmjbdczWnkJrCp++GMiyo8vMYcLWgkGRzkOEPBRZs7rmd +6GBFoV+72sVXauLx61sNVQ5T6Br3vTL3wyy4L25tctABf/8OwSSLIyxw6tzT +Xop9yZHtR7dlwcHdc++3OlKI/eTglkUHFnC3Xri9gO1KLIu/yWDBzjpTnbRj +FKJXM5jvfFnQzzOn8dGFQs3xCqtocSzIOlv84AZBoQIk5DEQz4Ke4OA2EvvS +yHRl/nUWHHAeCNF2p5D6gcpQnVssEDNm/f6GHcvlNmlxlwWFlFnLak8KGZ+6 +952dxwJD4+ENjBMUkpb+V0u/gAXHd9V+y8Gerj51fXkRCxr1iN/j2GmKyCL2 +MQv+yFxlh3hT6G97++sHL1ngGUyzunaSQk/MpbLrPrCg+reZw81TFIr6zc2b +WI3zyUdHNWEzsodc7WtYEL7tOU3kNIXW8ryU6q1nwdPH6f9GYXu/srs29w33 +1zyads6XQjTlmwHyfSxQbfx+fac/hX43hzQOkiyIr4jdTmA3RLDUCgdY0GJ+ +Ycf/sEO7NYZ0h1lQQUy4cZ2hUGtS4zGrKRbc2T9/4x12Ar/wvsBlBITyR4nT +AyhUOtnueGY5AXnvZPncsPvbc/18eAlgZrI0E7D1nhjdY6wgoOPNe+tRbNKF +PW8qTMCUeGVkyjmc33yfyD5RApTs4v3fY+/WFlFCYgSwzErujmPHCeUdpUsS +EDLb+QjY+PnLzmIpWQJ4rHM+N2MTGXkfxGgEpFUpPZvHjos737lGgYB/5p/9 +kDmP5yNEhXiU8PuSbd0M7DhRE49hNQIyXBnd3dgvF0TDSHUC1jX5lC9i9w12 +3ejSIKAsxbR1YyCFdr0OfNukQ0DDaZs6G+xe7wKZMiDgv5rZzFfYq+2CNJ8Z +ELDFu+p8I7au4X7zYiMC+KPUooawYyV7zmfsJ2DWrNJTPIhCz3kK41JNCfBk +/tTahv1zLCgr2ZyATYNXDBC2TpXY15iDBBTIOYixsBnFPb8irQmwqghsC8CO +uVPI/Y8NARWpa3sisXv8DqgF2BFQMhqVnYUt5CxuctqBgPxST8+SpXoHfh7z +ciLAPyLfo3Jp/KaQKGcXvF4V9nIdS3lWmqbZMQiI5SttG1yqxxF/Yc0kQHLw +3NfppXrdP+vNCQIOV10VXFyqV1NEGnsQ8EJp8qJAMM73LOQveBHAqH2oKYwd +k2a6brc3AUPJT7dIYj+Pkdim6UOAb6aQ3WbsHnbv3h2nCXio86hKEVuQWWyn +5If7W3nfXwVb2yr0FO0MAUUjrc47l+rvMrssHUDA/UtO/2piRyusT5FgExB+ +RWFcB7tkbd9j4UACvitr3tyN3T1fXL0qmICUd1cD9yzV7w/t5g0l4ESfQoo+ +ttYXs9nFMGwjvoUl/x8Uxfgd "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6951749159906836, + 1.4053335116225536`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6951749159906851}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10299,21 +10662,21 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6951749159906836, + 1.4053335116225536`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6951749159906851}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10327,104 +10690,104 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwV1Hk8Fd8bB3DJVlEhJFFcFFFyrSXnCVHWkrImrnvHkhRKN2t9Jd+yhFT8 +Skr2rC3a8E1JJVtRJHuMJTt3kOJ3/DGveb1fM+c5n3nOnCPLOGXN4ubi4hrA +19Ldt277lmcNdfpl5QrnOvVJpD+arskwykM5D65lL7krVStR3qgU1XM+6nVh +H2TW8gnS36Gw5030buxidthbXqMalDZRGNODfaVq/euw3M9IP8fRtBf7RYPv +3T/qX9GzwWZPEnuotTr4/KsWlPuf/PAA9oY+miNl2Ia0dhl8/oVtNhas61/T +iS57qUmOYZf/GVrFzu1Gusyxt5PY3y5KBJX4/ETWe8I+U9ijfEZD0+p9aFSo +a+88Nl/0aXv6DIlSx4XFuBCJZIRTPvi+GkB7uMXMeLEtpajMUcNh9EPtWuda +bOKenLiqwChSvs6nL4EdpmAVcaJmDOUVWC1KY7dINO08kzuBFJ/a5qpgMx28 +PK9HT6J3M+KJGtjjd7juP/KZQj/Ssrv0sAXkVNdOqHMQ/7xhmiV2IvOtyVox +CmmIWErYYW/Osg/bMUMhbmLbmCu2jsrl0ZOvZlF7kcv7AGwPrc6aIcM/KPpL +qWQG9jT7LM9Kxb8ousw9oxj7wqtVekoCC6h3vv96OXYS6Dx0r1lEX3I8k78v +5cv4YOSXuwzu1QYarwMS5VZd77ooxQ36xt8HaNjj/c7B8dHc4FG6ZpSOHazM +eVzksxxqZflkj2AnFsrSxtR54e83mtId7NaG4fKFB7ygvtOipwB78+Qzh9Vi +fLCi6tBCBXaehmWC6gwfaHuNOg9iV74IXOb9SgD2p//zRm8viThvGzsHDAWh +JueyKIUtYi64NqhcEKadj0kIG5BIrckIhHSFYJR98poKtlfv03s7t68Goy69 +Nib2ae4atT2Ca+G+ecFAK3afXMFEBCUMBqGJtW2GuD9E9Yp6ugikX2eILWJz +PyRl1/uKAD323GdZI5yXvsk695cIWC0LzPTAdjCMe1TXJQp0jT9v57Hr3fz8 +JT6JQdp/rbXaxiTqyIqNchEQB6+Waw6u2MO/ch/k7BOH1cF3HKOwV5752bj7 +tTgYzr9+2YVtdMlGw+WpBKjm2o7EmZDoZboWJztVEopja+T5D5Aove93wK4z +0mDPu9Bnak6i/UciO/zzpeGRdplRGPZwpahxPomf+65d8QRbI11FbLO9DNTN +nXsjY4H7yXB+zKu/CahWn9lZ7MmxrnMD4ZvBktjk99qKRKInjZ48tpCDunVy +mbcPk4hMX+lx0EsOnMrmXrRhP29rkBq5LAeTTfF0GRsSOZkfC1d8LQcz7BV2 +adjp2wKsk9VpEKNiQBQewfMPZY2HSshDWsSe5DZbEtm4r1I17VYAni8cZrgT +iVDAEXXbvwpw9pBZXj22ckSqNlNSESw+3zuy8RiJuB7QDUIPKUJWkXVdCXZ+ +h6PtowpFsGFz24074/15NO/ihrQtQNsnXXfWFeczsvg2xFACk/M81tUEiR4c +vvVjJlQJBl83tcm5kyiW0d3Fc1sJLg10fgzCZl44+0umUQm4Swuqt3uQSLg0 +heuwoTJsoRHuyZ74/6GPKr+ibYMnC4urL3qTSEruWlhUrwpkzXko/M+PRKVX +p5XmuFUh6BJvNL8/7seUfRMhqwqTRyOJs9h3K+WVDJxVoV3Z+Jz1GRLJub/8 +MtusCsqxXAIiAfh78/oUiE/bQUhwYiDzPImkpWSIzfZqkNKYULblIolUMs4I +ziN1+FH9x+VyPIkYzHCOqqU6uNhn3eJPwPuVltDh4qQOTsJT9CvYy9MKi6rY +6tBhcT4l5jreb3eHbBKK1aEvPk7j9g18nia5pCjR6NArefLsx2S8vlHm2+34 +NOB3hM1RvzQS3feTP/i0RhN4Fjz0qSckaghA2pcydEE5cuLprR4SyTp/tTzm +vQfMOTMtleL9iLVYUiB9HmBBPc9PwrIfSfx6zi/BMAClW53RnvH96Axdry1B +2Qjme4K5tJv7EWPkzwfRoX3wb31z4y65AZRv4M+fWm8CPGXtN4SDBlD6tFdF +XuIBqDxUqsDzdQDN7l1fWxlmBsKUT6uR/iBq51o+0e1qARrzgjMh+YPIZ+Op +uIs0KxjmK5U33ziECjw/vL4RcRAIt/LjmneGUOCU5Mw2z0OgRV94+W3DL8Qx +NT76/rg1FITbfvj58BfSdYzf23foMBSVJpXLGgyjL5IpXpV0G7BBRtJbvw6j +DZnhpdlbj8DzHfaOLUEj6HmXsrml0FEwWIzLF5YZRTJN4+4BI0fhv+aQyIU3 +o4h+Iz7vQZctiOc3r5QMHkMpPFPbE97aAXF/hhSXGEcle3e0RrywB3WxnD87 +A8dRkvZV4T+5DmD4QiChon0c1f/IuEyPdgSy1T/VQG8CPbW4I3/6ghPwMTw6 +1qRPoImTh7l8mMfgiG/W4mPeScQxVvIYNXSGk2Yy+26zJlH2yPdZf63jMGoc +PIVqJ5Hd/Qy3Y4IuoLK+KXxIZQo9fmR2fHmkC9hLKVx6kTCFdKW+zF2ZcwGu +zFrVvWNTiNbl3vrZ0xUE2Nfe/DCeRr2rTljd+ekKSUHbB2LuT6OGWEs3kyMM +iDIriT86MY0S2amrzjYw4CNvNZm8l4NKyxfn3A64gWL6FSZc4aA1ThBJf+kG +jzu2F05XctDmde/rN5a6Qa94m3//Ow5Sq7FYz1fuBuFJIbnfqzjIWs8xp6XC +DXzNWrxLP3BQ4saATyEf3SBNOgaCajhoQ/vDNR9a3CBCwWiuvZGD5J0lkpxm +cL1Z+eNaPRyk6zKaHaHBhPzYiXdb/3JQZvK4v6UWE6YDUocHsNc1TupL6DCB +b46IyV7goNF9M03Zu5ngFVeip8hF4fOLa1mNARPKBCItpZZTaPWMsL3IISYw +dHM3DwtQqDdGc0XqSSZYHTeJ37KOQrGvgj2fZzIhy6sidGErhU6q39JlZzNh +7xdboWQlCpnnFK/QyWVC0c1zonRlCq28ReY8y8d5rHojWNsoFOF3cKjkCROi +pU9xVapSKFhJ/sTTN0wQKGNruKtTyOvWJ+9HHUyINQnq2LebQgdWk3p+XUwQ +2b9TuR57awSXkHoPEzTq5Ids9ShE+mnmF/cxIWyZa5X7Hgq5WqaOFA0zwc0i +aOQCopAdr79P4W+8NN/GupIMKWTiv+F0njgLwjSvPHM2o9Cb1MumCetZ8MS2 +IawLW69mUp69gQUnmjbdczWnkJrCp++GMiyo8vMYcLWgkGRzkOEPBRZs7rmd +6GBFoV+72sVXauLx61sNVQ5T6Br3vTL3wyy4L25tctABf/8OwSSLIyxw6tzT +Xop9yZHtR7dlwcHdc++3OlKI/eTglkUHFnC3Xri9gO1KLIu/yWDBzjpTnbRj +FKJXM5jvfFnQzzOn8dGFQs3xCqtocSzIOlv84AZBoQIk5DEQz4Ke4OA2EvvS +yHRl/nUWHHAeCNF2p5D6gcpQnVssEDNm/f6GHcvlNmlxlwWFlFnLak8KGZ+6 +952dxwJD4+ENjBMUkpb+V0u/gAXHd9V+y8Gerj51fXkRCxr1iN/j2GmKyCL2 +MQv+yFxlh3hT6G97++sHL1ngGUyzunaSQk/MpbLrPrCg+reZw81TFIr6zc2b +WI3zyUdHNWEzsodc7WtYEL7tOU3kNIXW8ryU6q1nwdPH6f9GYXu/srs29w33 +1zyads6XQjTlmwHyfSxQbfx+fac/hX43hzQOkiyIr4jdTmA3RLDUCgdY0GJ+ +Ycf/sEO7NYZ0h1lQQUy4cZ2hUGtS4zGrKRbc2T9/4x12Ar/wvsBlBITyR4nT +AyhUOtnueGY5AXnvZPncsPvbc/18eAlgZrI0E7D1nhjdY6wgoOPNe+tRbNKF +PW8qTMCUeGVkyjmc33yfyD5RApTs4v3fY+/WFlFCYgSwzErujmPHCeUdpUsS +EDLb+QjY+PnLzmIpWQJ4rHM+N2MTGXkfxGgEpFUpPZvHjos737lGgYB/5p/9 +kDmP5yNEhXiU8PuSbd0M7DhRE49hNQIyXBnd3dgvF0TDSHUC1jX5lC9i9w12 +3ejSIKAsxbR1YyCFdr0OfNukQ0DDaZs6G+xe7wKZMiDgv5rZzFfYq+2CNJ8Z +ELDFu+p8I7au4X7zYiMC+KPUooawYyV7zmfsJ2DWrNJTPIhCz3kK41JNCfBk +/tTahv1zLCgr2ZyATYNXDBC2TpXY15iDBBTIOYixsBnFPb8irQmwqghsC8CO +uVPI/Y8NARWpa3sisXv8DqgF2BFQMhqVnYUt5CxuctqBgPxST8+SpXoHfh7z +ciLAPyLfo3Jp/KaQKGcXvF4V9nIdS3lWmqbZMQiI5SttG1yqxxF/Yc0kQHLw +3NfppXrdP+vNCQIOV10VXFyqV1NEGnsQ8EJp8qJAMM73LOQveBHAqH2oKYwd +k2a6brc3AUPJT7dIYj+Pkdim6UOAb6aQ3WbsHnbv3h2nCXio86hKEVuQWWyn +5If7W3nfXwVb2yr0FO0MAUUjrc47l+rvMrssHUDA/UtO/2piRyusT5FgExB+ +RWFcB7tkbd9j4UACvitr3tyN3T1fXL0qmICUd1cD9yzV7w/t5g0l4ESfQoo+ +ttYXs9nFMGwjvoUl/x8Uxfgd "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6951749159906836, 1.4053335116225536`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6951749159906851}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10434,7 +10797,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6152015704378887}, + AxesOrigin->{0, 0.6951749159906851}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10462,7 +10826,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6951749159906836, 1.4053335116225536`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10470,11 +10835,13 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913355426284504`*^9}, + CellChangeTimes->{3.9913355426284504`*^9, 3.994356092922654*^9}, CellLabel-> - "Out[277]=",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] + "Out[116]=",ExpressionUUID->"5b60894a-8ed1-4373-bcba-1ad8fe3ebe3e"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"x", "=", RowBox[{"Plot", "[", @@ -10534,14 +10901,1248 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918494141657047`*^9, {3.991849451432905*^9, - 3.991849451715925*^9}},ExpressionUUID->"00a32bc3-df79-9e43-8f20-\ -d4884962c12d"], + 3.9918494141657047`*^9, {3.991849451432905*^9, 3.991849451715925*^9}}, + CellLabel-> + "In[117]:=",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1758220936074223`*^-261\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 41, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356093125676*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"12330c7a-b763-4afd-9130-29258ced0441"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5786015211874726`*^-272\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 117, 42, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356093136855*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"b7a0fd45-3bd8-4aa3-86bd-b4e9973c177e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1193535792902127`*^-283\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 43, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943560931471577`*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"6bc265ee-ba3b-466f-b60b-890a64005d5d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 44, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356093156465*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"2041624c-b2a8-4753-a829-82375bb7f2fd"], + +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4lF8bB3BpsRTJvsyMXWXfl1nct10IKYpkTUpFIbJUJEISWpTKFpWU +bR675IdEKZVdKrQXIktS6n3ev+b6XDPnzDlz7vt7npH1CXLy4+Tg4Ni/jIPj +/6/zbzpaFc4UGHtpBWTUzVsZ92SLR5gMnITAFueXgb8VAUW6fMQHMoB/rd05 +xm89CHO80798IB92e3ubiv62gHWTYhm/+itAsPHZZM+iM7xtsA+a7W+GkdSn +F3/98gNLha+vp/tfAnAejcqbPwK/+g0uTvWPQYrhf9ccv8RDi9mtghf5M7DQ +H+z6OPMSUN7WfvRRXQI543nzj7G5IHzA8w6X2XI0wIGsvw6FkKFlWW/vzI0d +O8uWRkXvwOBlzaZpAT6cdJQWmVtbAlndxWvDFPmwfaHOn0+mBNz413suGvHh +tWORrVKaJTAcR/3L6cuH/gG0FEnHEhgJ5GUKV/Kh0i/Wu5xzJfDZ/H21vis/ +vj7Ly2pbUwoLU5mlUXlrscbzrZz/v1I4U3Cii1NiHWZmxYpfGysDG919giLy +63BrjFgn40sZcLc6Oa9XW4f5ea42fd/L4NQ7xVe2JuvwZEZ/3u8/ZRAt1/nx +wr51mPtlWRaXWDkE5or/Vapbh+kCPPnyNuWw5Vq5qu1OQfzPNEZ3991yEFC9 +GrTLTxCtvqX9dasoh2f1pyqCggTR2InnkF1NOdi82m54IU4QbSKjLKRby8FU +8q/Z62JBDAhZlnfqVTnoXrbZGfRHEFfc1t+xmacCxC68Szp/XQjHxa3whVcF +iKtUnlq4KYSU+7TTTX4VINmccGJXmRCuKWhbVxxQAbSpjUfWtwjhUkfm1OHQ +ClC0O+RV/1kIk6vlH7WdrgCdFUv673SEcef0pSMp9yrAIVT0vfZjYWSvDVeP +n6sAx9Wf32R2C6PJoJLi8K8KcMqvHfwzLIzy3otb1f9WgMtz966278LYbkZx +bV3Fhl2qN+rcREQwdNn631VibNj/XiP9pJcIlqy9G1JlyIbT2zYZv5wXwVTW +MmtqOBskiWeSnMtE8eD34HiVKDaUCG37qbVaFI3b/KR1T7Ch76VHWbq0KI7v +Hd6re5oNCltC5bZYi2IEZdnW6UtsaN6cs+r5FVHcdSb8gnslG5Ys5549ZYqh +0N9HA78m2JB2M7J4yVIMbWS63mydJsev4khU2yKG+rvbLW/PssHuIa/JWT8x +fJc9wcLfbMgyk2HbpYphiJN4tyo3AYZom/nkrRjKJc9PL8gQEGKU59lxUhyj +LxTYe9kTYJPLP2ubIo6/NV+HDzkSIMcVnfjsojjmxAZ2OGwl4HmPS3n3bXHc +HF73SWUHAeqH1ix/80wc7/cYydzxJuDzzfCbPyQlUEZmmuNBCAEP+D7QjyhI +4EpR9ZlvRwi4FOrU9VNNAm+8EhETPkqAhanawh+UwBRa5LxzNAH5r8c2cflL +4DYbbqXcUwS4C9tPSLElcF122aj9BQJ0oupjsxsk8GBnGWhcIoB3bIOobJsE +yplGD/FeJqC2dDkoDUog17qoDvZVAkRta9M0/0kg7C3I78wn1x+roGthK4kp +3LUzkmUE3Pqc3v5omyQW+jREl5YTcNzhn7uNhyTKmR9wADYBatSheIfDkvh5 +3KLXsYqA5Jpz/a6ZkliRfzCK0UCA+ffFyMB3khieEvZb4xEBEdYXlP8bl0Tj +CyqSIe0ElOSpDQnNS2LllaQH5R0EiG/zMqrllsK28Q95sp0EjNc8/LlcXQpv +qP968+Q5AbKCnrdcDKRQiPOh3bcXBLjsX3ApQin0jy62XtVNQBNVpcp+qxQ2 +XLg+qd5LwPmTaaFXjkrhFncWv+0gAe2vNiqMx0qh5orfXFZDBPzRbek2PiOF +jzgKMo1fEbDn05z2++tS+FC6IVrmNQF0u53T6i1S6KMRElk6QkBQ4WxubKcU +HjzxHRJHCSj4e9axp1cKLVfE33AfI4C/vKk04rMUpo+obVp4R8CYiFJgKx8F +c7oVVX9/JEAs6AFVTIyCC5UCHOWfCLBr3/F0nwwFk5ZnR/p8JqAq8ozqWh0K +emv+86/5QsC3boVhbyYFn2qveu3+lQAZtcYzhAUFO9+LLP0hnfx26qvrDgr2 +Dbaaao6T9WSYnHXXm4IpDvkBLaRn0+Vt/gVQUHVghanTBAEe5i5FBccoyHXl +/XLfSQK0i+r9v+dTcDOozDpOEeDP6SxmepeCxhLmNf+RvrZzsu1CJQXdtCh6 +6tMErOKXVaK3U9C+qWnXImmGf11vygsKbnn9bbXbDwIONW2NfztEwXcnz4dX +kh4KTnh/aoKCTWYKKZ4zBKztlL7QP09BZmaYQQlpc8VaM2UOKuaOihUukI44 +7jQTzUPFWyuwz3iWrI/+b/ldglS01tjQGUP6nWa8kxyFig3DvImNpMWTaZxH +FKkY0i2/eoG03bvq8kfqVJRUKHNRmyMglrnFW9KQiuc3TO73IG3tkf3DwJSK +ax+v/pZKmj/mW5yzHRX/NnaF15HuzTMUCXGholhrr9Ao6Wst8TfTvKgYtKO+ +iXOeAN8PLw1KAqj4s146Rpq0MpdMx5NQKn6ZuLHVgPT0hoNuX45TcVPxV6YN +6Rqbum+rkqjodPAyawfpEwe4jimcp+JX/63bvUlbpm7jN71ORUpiyxk/0nxl +eTmet6gYF5wxvJt0z4tJzWPlVGyO3W/rSfrqDKM5q56Ki62/B7eR9hFJ2lrz +kIob/04nWZDeaND3vreLipW5f921SE/tkA+bGaTi/a7ubeKkqyMPca17T8VC +d8WQRXJ/x6/dv6w+Se7v4e3aftIWjbzKdgtUNNIRUS4jvWZke/0+ThpmHZVv +iyPdvazQ7vQaGlIEUs85kc6S//G6QJSG+ZLrEimk1/uncIwo0/CkqStfPnke +k4mD6Uu6NFTszr6+izRxR0leCmioWrfkK0zadLLJwmUrDZttJbNCyPPnEeDv +D9lFwzl3Pz4K6edaO/em+9OwMPX9/QdkPXkcmUvujKLhfqL49QJZf4qZppSv +8TQM7TrrmDr9/7w4d48rjYZ3nQe4pElH/tn43LSAhteNx220yXo2oYV7e5XQ +0MTZfYj4TgA3tv44VkN+nnGyUpv0xTgPkdpOGnZ92OwiQ/aHe2Hxzb4+Gj6t +uimdRvaP3KMFg9kRGg4GSjF/k/1VxnveTWOOhskHu460fCOgM/1RTiFVGj98 +mpOhkP17ni2s1bJeGhNPV1fvIfvbrde7eURLGo9XFpXdJfv/s/if91KW0qig +2/ZcmcyH5bmayhmB0vjlSOO/72Se0EuuEMcfSCNlh0tnDplP5v3PlibbpfGK +2kRmBZlf9hwrrDxfSqN15p2I/8h883UKHIQP0riZWyKhu5+sryjZEzErZVBw +OnqqnczHQ9LzN0xUZNBZMix68TEBc+y09l8aMlg8eyaoi8zfSGuViXJdGZx8 +yDyfS+Zz/GEvfTljGUx/oh5i0Eaed8vjds4tMugi1dZq8B8Brf45Ey1hMpj6 +y1vtFJn/m/4YCUZHySB9Q/I8pZKAZ2k9+roxMrg9uXp1BXlfDNbyxBQkkfOb +UmRfkPfL5OpQwfhrMlgoILbx3R2yn8usDSybZXBM+IfhjmwCDixMx7TzyaKj +7dRwxkny9zi8R/SjoCzO5YpfT4shz+/rUPFycVkUfcBjlXycgMJXLX3GcrJo +lnfP+3AkAW8aL6pW6pPjpblm+YMJcIg3GsjzlMXexnO5SV5k/gnGakSVy6Lc +4WMfz9IJ4Dgz13q5ShYFDXtO8BmS618e4FZVL4sxPD8dkvQI2D/nFD/9UBaD +PkZmH9Ek839A4ZX/kCxmENeNZJXI+zSnPWHbcjm8NDx4vk2AgF8qAm/UnOVw +fUWb6853bJi/Lhmr4yaHlISg46EjbJhdq6hg5CmHYhFMm+TXbJicMQow3yeH +o4c+jhT3s2Gs3nfe7ZgcGuxfZ//oCRse21bzJxbKoaaKhKU3m3x+2e8BY3Ny +KFSeWq0dwwZm8d3cS5fksezeH51eATa8kinOsbgqj5X3vhUF8LEh8lJR9myO +PNYMmTxY4mFDdezNa05F8pjPbfScspwN2jtyL/M3yGMsfaLFmHwe3LjyQlrC +qDxqx52uFhqsAFHPqJgwVQWsddj/e21OBUwL2ni5NCvgk8cd7i0KFfA+xcsl +mEsJbzb9zfjJWQ6bvodv+qC/HtmUyueTdaUw7ssdQpzYgE/r+7+YS98j/2+I +cZ5u3ohZYcM03tg7IPhUKbXsuzLK8vlo+wjcBkpiqaO+virGjNbtYh8thMsq +RgJC/mrY2rb8YJX8DXgsaaI3k66OoYIeHrI/c4FOaU7T6NNA1zMb2zzjrgP/ +8vxQ75Oa6BTrRqMTV4AWK810VdLC8/+Sb8LUReBRdK9yeqSFQ2kqe/iyM0Cd +JVEavksbHzS/2/2cOAfBbwRbbDh0cJlyqU5yQDJ8n0lx3nRZB82Lq/SOSSWA +lUZb1iY1XWztXF/ADDoJjTOM3z+f6eKL8mORYdzHIVBVe+iFnx5ysRcln2cf +hSM/JRc99+rhCM/aW5B0FKKbl0tOBuih7WeznsaQo3BmR68r7yE9NF4f/eOb +9VG4ferooGmkHu5UYHhzzIbD2HDjADtVD2PsNsmt3hwOLmdt+y9W66HX1UrF +w7xhwJrc3ePKo4+cPgFBHWUhIFpvld+wWh/DdBxTBXNDYPK08iFpfn28qCZ7 +1f9cCGTLTq3+IKiPwllpfnqBIfB3W5TZIYo+NovorvVUDYEH9ekVCRr6ONea +YvHhTjCYJDWmsZ31kb/k8a/0ssNgoSC+mS9fHytybFpV64KAmHgou7tAH2sk +6tgj2UGgUB0yX3dTHz/PPiy4HRcEK2y6cvYW6+Nsv4Rn6OYgaA5K+NFC6GP1 +atmlX6OBYFw/mxn5iByfF6lC8AeCvtOLsU/j+jiZXO6YGXYANsQkH202MMDd +L7Pv1R3bBw2MwpV2dAMUrtXcoOG3Dxx/PsjoZRqgwZ7Of9V2++Bo4Nzdzybk +++5a6aso+6Dd3WuU384AL59TfnKxfi/sNdK32ellgHta5KUP//WHoh+jUrOJ +Bvi9c8y9KWMPKPsZPVAcMsBvC6pTv374wjk5+8W4YXI+jdVDwSO+MPvWR2/s +jQGqzL5vWnzqC41uKcXZ7wyw4ESih0GRLzg5vs0UmzBAm82uHT5evhDBiD/E +w2GIbsE+nyNe+ED7uheyE4qGuOmxc9ieRm/wa9x7ijhsiMEf4097nPSEyYNf +wy1CDZH7XMKzSm9POEo9sL8vzBBzJIf7lE08ITk6yGkhyhBfvYt4eZDDE8ro +YTLMBENcTeRyO8d4wJ+quIaWLEOsrgxWvxi/CzJKs2dfthiizO4D18wLd8KD +3J7d0yJG+NfhQk2b7g4YsZP1DBM3wt7KvkseUjuA49dB19+SRtjV8lKSn3MH +mG7hsl8pY4Sta2wfs7u2Q9syuoGEshEKLbY8FDuwHTp9cnhMjI0wbnLAXLvI +BYYUAkrS9hgh5ZOQuq6uM8ze/vdTo9oIt4/f9ruR5AQfXSxzk2qNsKJQYHE6 +zAkGVpy1fldvhII09p4tu52g3kvyyqUmIyS28F40BSc4Ka5HX+owQtd5xzfj +c1tAIDEg+vGwET76IPLXec8WUPXv5fDjpOOMa22n3FZHoIlQihpX0PHAqvaZ +EFNHEGjx2SLORccopu7uHi1HmKFN5T1ZTccUDp3pZgFHqOvjNdMWoWNzbdSr +O9kOYG2J8f/W03GlYYTmmWx78FUs5snaTMdbiyptnIQdRD70CFBypOO1f5lv +Os7bQZqf4JMKJ/L7OLtjykPsoKEwIuXJdjrabDozPapjB8JK1muXvOno57Lm +UGulLbQpfRD2CqNjiTs9JvyBDShvkJZRyqFjYNyttr4v1oDtL2Mq8uj4uSCk +NOKpNbjsTRg1LqBjdH53g1G5NcTdnsjfXkTHu7xJrwUirGF4Q4NiEpuO2wI9 +d4vzWkPqRleV8Ud03DCzUTNMywqmlc/rV0zR8fBbRtX9CxYw0IkWQjPk/u5m +TUces4CmwMmtoXN09PjP4639HgtIrdh0WH+RXO+y96fohhagTOe4W7ecgUeE +fN7QXpuDz6aDsi2iDDw/rqO8WsUcevyt1vQwGSidr/Poe58p1PPMSeoB6aOq +ox7NppBfnL/xkgkDL0jXuI/dM4VD35csd1gysMyzVUsp3hT4wonYYQcGtp8S +8s/RNQXLBNmf730Y+K/It9k60wRqCn6PziUyUCfO5u2/AAR9s9CfNmcYWGDp +9lPXFaFydHxN7lkGfq3NuhZlhVBBe2Ngk8HA4L66LSwFhLuXm85mX2Wgl1xA +tOx9gNyUeCOrEgZqVn/h7L1rDEmha9MvdzNwXjJwaGUhE7iFEm9O9DJwWCZ0 +9Eo8ExLKORpMBxgoGhrkvnkPE05NTn8cH2bg3uYZY8ENTDi+t4dp8pGB+60O +lArcY0Cw+5XPXxYYaPkkzaa9gQ5u5vLIoDGRy+7i1z0/DGGph5u/RYaJaSnd +PO49hpDrN/nKRp6JR9IdTIKrDOFjQm242wYmSu1KC18WZQjBHQ6lEdpMXGqY +iL610hCS7aNpNZZMJFBfel7GAOp29P7RDWKiVXcV0RqoB7u+1D1uOMzEuIVz +ornb9IAjMveyeSgTd9VcrbpM1wPLq/t1t0UwsYdVxBxdpQcvXy87EBLHxCqh +NL3OXF346qP+qjyTiZ671V5ODeqA1MHTtepNTMy3j/Iq99KG1H979M40M1Gt +dN+tWFtt4MywLP/UysS8703ee/W14WvVyqLcDiYOdx1/dXSNNtRxnLos2M3E +EwudGTdqtcDtQkz4/Acmdsv5PuQT14LL9RF6jatZWBgfctOuQwPW2LuWS/Kz +8GDowBp6gQbEjBiqhQuwMMspycrhhAbsXbmgoCnCwsFJodwpPQ0wcAgTzqex +0N/zZhlvoTr0jQXPxGux0JBbyT4qWQ1EeA+Ub97OwsSpi0/tDqtAgdmxyClX +Fq4viJpT3qwC2sdSzc67s9ArJINLb6MK2E+V9Q54s/A0Tm3sHFWGhL65X74H +WGhRfEd9mbMyLOSfMI2MZaH2jbmVu8w2whDjfPfNYhamh7cFXjVeD3uPFFzb +VEKuN8Jn4Zr0epgvqfQbL2MhvEy638qxHgTlBn5qVbGwNG3UIaFFCWy5qZT7 +TSx8vPn8TKeNEjT03Nzd3cvCfWxPwsxLEWz4a9TCBlg4V9ux+aKZIgxYdcyL +v2Kh3chYMu96RZit+5boMULu52yxg+ekAqjlad778pWFnyxmbt87rgANQyZh +KRMsbH1DWSHuqwA2wltBY4qFp0RXtBVYKcCe00dehM6x8LZq2JjCOgWYbUrI +Eltg4dXiS9/F5uXh5GKmb90iC4We5rSrvpIHAd0i1V1LLCwSZFr5NslD9sG6 +uX//yPn4mBb1hfLwP8XVUTQ= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4lF8bB3BpsRTJvsyMXWXfl1nct10IKYpkTUpFIbJUJEISWpTKFpWU +bR675IdEKZVdKrQXIktS6n3ev+b6XDPnzDlz7vt7npH1CXLy4+Tg4Ni/jIPj +/6/zbzpaFc4UGHtpBWTUzVsZ92SLR5gMnITAFueXgb8VAUW6fMQHMoB/rd05 +xm89CHO80798IB92e3ubiv62gHWTYhm/+itAsPHZZM+iM7xtsA+a7W+GkdSn +F3/98gNLha+vp/tfAnAejcqbPwK/+g0uTvWPQYrhf9ccv8RDi9mtghf5M7DQ +H+z6OPMSUN7WfvRRXQI543nzj7G5IHzA8w6X2XI0wIGsvw6FkKFlWW/vzI0d +O8uWRkXvwOBlzaZpAT6cdJQWmVtbAlndxWvDFPmwfaHOn0+mBNz413suGvHh +tWORrVKaJTAcR/3L6cuH/gG0FEnHEhgJ5GUKV/Kh0i/Wu5xzJfDZ/H21vis/ +vj7Ly2pbUwoLU5mlUXlrscbzrZz/v1I4U3Cii1NiHWZmxYpfGysDG919giLy +63BrjFgn40sZcLc6Oa9XW4f5ea42fd/L4NQ7xVe2JuvwZEZ/3u8/ZRAt1/nx +wr51mPtlWRaXWDkE5or/Vapbh+kCPPnyNuWw5Vq5qu1OQfzPNEZ3991yEFC9 +GrTLTxCtvqX9dasoh2f1pyqCggTR2InnkF1NOdi82m54IU4QbSKjLKRby8FU +8q/Z62JBDAhZlnfqVTnoXrbZGfRHEFfc1t+xmacCxC68Szp/XQjHxa3whVcF +iKtUnlq4KYSU+7TTTX4VINmccGJXmRCuKWhbVxxQAbSpjUfWtwjhUkfm1OHQ +ClC0O+RV/1kIk6vlH7WdrgCdFUv673SEcef0pSMp9yrAIVT0vfZjYWSvDVeP +n6sAx9Wf32R2C6PJoJLi8K8KcMqvHfwzLIzy3otb1f9WgMtz966278LYbkZx +bV3Fhl2qN+rcREQwdNn631VibNj/XiP9pJcIlqy9G1JlyIbT2zYZv5wXwVTW +MmtqOBskiWeSnMtE8eD34HiVKDaUCG37qbVaFI3b/KR1T7Ch76VHWbq0KI7v +Hd6re5oNCltC5bZYi2IEZdnW6UtsaN6cs+r5FVHcdSb8gnslG5Ys5549ZYqh +0N9HA78m2JB2M7J4yVIMbWS63mydJsev4khU2yKG+rvbLW/PssHuIa/JWT8x +fJc9wcLfbMgyk2HbpYphiJN4tyo3AYZom/nkrRjKJc9PL8gQEGKU59lxUhyj +LxTYe9kTYJPLP2ubIo6/NV+HDzkSIMcVnfjsojjmxAZ2OGwl4HmPS3n3bXHc +HF73SWUHAeqH1ix/80wc7/cYydzxJuDzzfCbPyQlUEZmmuNBCAEP+D7QjyhI +4EpR9ZlvRwi4FOrU9VNNAm+8EhETPkqAhanawh+UwBRa5LxzNAH5r8c2cflL +4DYbbqXcUwS4C9tPSLElcF122aj9BQJ0oupjsxsk8GBnGWhcIoB3bIOobJsE +yplGD/FeJqC2dDkoDUog17qoDvZVAkRta9M0/0kg7C3I78wn1x+roGthK4kp +3LUzkmUE3Pqc3v5omyQW+jREl5YTcNzhn7uNhyTKmR9wADYBatSheIfDkvh5 +3KLXsYqA5Jpz/a6ZkliRfzCK0UCA+ffFyMB3khieEvZb4xEBEdYXlP8bl0Tj +CyqSIe0ElOSpDQnNS2LllaQH5R0EiG/zMqrllsK28Q95sp0EjNc8/LlcXQpv +qP968+Q5AbKCnrdcDKRQiPOh3bcXBLjsX3ApQin0jy62XtVNQBNVpcp+qxQ2 +XLg+qd5LwPmTaaFXjkrhFncWv+0gAe2vNiqMx0qh5orfXFZDBPzRbek2PiOF +jzgKMo1fEbDn05z2++tS+FC6IVrmNQF0u53T6i1S6KMRElk6QkBQ4WxubKcU +HjzxHRJHCSj4e9axp1cKLVfE33AfI4C/vKk04rMUpo+obVp4R8CYiFJgKx8F +c7oVVX9/JEAs6AFVTIyCC5UCHOWfCLBr3/F0nwwFk5ZnR/p8JqAq8ozqWh0K +emv+86/5QsC3boVhbyYFn2qveu3+lQAZtcYzhAUFO9+LLP0hnfx26qvrDgr2 +Dbaaao6T9WSYnHXXm4IpDvkBLaRn0+Vt/gVQUHVghanTBAEe5i5FBccoyHXl +/XLfSQK0i+r9v+dTcDOozDpOEeDP6SxmepeCxhLmNf+RvrZzsu1CJQXdtCh6 +6tMErOKXVaK3U9C+qWnXImmGf11vygsKbnn9bbXbDwIONW2NfztEwXcnz4dX +kh4KTnh/aoKCTWYKKZ4zBKztlL7QP09BZmaYQQlpc8VaM2UOKuaOihUukI44 +7jQTzUPFWyuwz3iWrI/+b/ldglS01tjQGUP6nWa8kxyFig3DvImNpMWTaZxH +FKkY0i2/eoG03bvq8kfqVJRUKHNRmyMglrnFW9KQiuc3TO73IG3tkf3DwJSK +ax+v/pZKmj/mW5yzHRX/NnaF15HuzTMUCXGholhrr9Ao6Wst8TfTvKgYtKO+ +iXOeAN8PLw1KAqj4s146Rpq0MpdMx5NQKn6ZuLHVgPT0hoNuX45TcVPxV6YN +6Rqbum+rkqjodPAyawfpEwe4jimcp+JX/63bvUlbpm7jN71ORUpiyxk/0nxl +eTmet6gYF5wxvJt0z4tJzWPlVGyO3W/rSfrqDKM5q56Ki62/B7eR9hFJ2lrz +kIob/04nWZDeaND3vreLipW5f921SE/tkA+bGaTi/a7ubeKkqyMPca17T8VC +d8WQRXJ/x6/dv6w+Se7v4e3aftIWjbzKdgtUNNIRUS4jvWZke/0+ThpmHZVv +iyPdvazQ7vQaGlIEUs85kc6S//G6QJSG+ZLrEimk1/uncIwo0/CkqStfPnke +k4mD6Uu6NFTszr6+izRxR0leCmioWrfkK0zadLLJwmUrDZttJbNCyPPnEeDv +D9lFwzl3Pz4K6edaO/em+9OwMPX9/QdkPXkcmUvujKLhfqL49QJZf4qZppSv +8TQM7TrrmDr9/7w4d48rjYZ3nQe4pElH/tn43LSAhteNx220yXo2oYV7e5XQ +0MTZfYj4TgA3tv44VkN+nnGyUpv0xTgPkdpOGnZ92OwiQ/aHe2Hxzb4+Gj6t +uimdRvaP3KMFg9kRGg4GSjF/k/1VxnveTWOOhskHu460fCOgM/1RTiFVGj98 +mpOhkP17ni2s1bJeGhNPV1fvIfvbrde7eURLGo9XFpXdJfv/s/if91KW0qig +2/ZcmcyH5bmayhmB0vjlSOO/72Se0EuuEMcfSCNlh0tnDplP5v3PlibbpfGK +2kRmBZlf9hwrrDxfSqN15p2I/8h883UKHIQP0riZWyKhu5+sryjZEzErZVBw +OnqqnczHQ9LzN0xUZNBZMix68TEBc+y09l8aMlg8eyaoi8zfSGuViXJdGZx8 +yDyfS+Zz/GEvfTljGUx/oh5i0Eaed8vjds4tMugi1dZq8B8Brf45Ey1hMpj6 +y1vtFJn/m/4YCUZHySB9Q/I8pZKAZ2k9+roxMrg9uXp1BXlfDNbyxBQkkfOb +UmRfkPfL5OpQwfhrMlgoILbx3R2yn8usDSybZXBM+IfhjmwCDixMx7TzyaKj +7dRwxkny9zi8R/SjoCzO5YpfT4shz+/rUPFycVkUfcBjlXycgMJXLX3GcrJo +lnfP+3AkAW8aL6pW6pPjpblm+YMJcIg3GsjzlMXexnO5SV5k/gnGakSVy6Lc +4WMfz9IJ4Dgz13q5ShYFDXtO8BmS618e4FZVL4sxPD8dkvQI2D/nFD/9UBaD +PkZmH9Ek839A4ZX/kCxmENeNZJXI+zSnPWHbcjm8NDx4vk2AgF8qAm/UnOVw +fUWb6853bJi/Lhmr4yaHlISg46EjbJhdq6hg5CmHYhFMm+TXbJicMQow3yeH +o4c+jhT3s2Gs3nfe7ZgcGuxfZ//oCRse21bzJxbKoaaKhKU3m3x+2e8BY3Ny +KFSeWq0dwwZm8d3cS5fksezeH51eATa8kinOsbgqj5X3vhUF8LEh8lJR9myO +PNYMmTxY4mFDdezNa05F8pjPbfScspwN2jtyL/M3yGMsfaLFmHwe3LjyQlrC +qDxqx52uFhqsAFHPqJgwVQWsddj/e21OBUwL2ni5NCvgk8cd7i0KFfA+xcsl +mEsJbzb9zfjJWQ6bvodv+qC/HtmUyueTdaUw7ssdQpzYgE/r+7+YS98j/2+I +cZ5u3ohZYcM03tg7IPhUKbXsuzLK8vlo+wjcBkpiqaO+virGjNbtYh8thMsq +RgJC/mrY2rb8YJX8DXgsaaI3k66OoYIeHrI/c4FOaU7T6NNA1zMb2zzjrgP/ +8vxQ75Oa6BTrRqMTV4AWK810VdLC8/+Sb8LUReBRdK9yeqSFQ2kqe/iyM0Cd +JVEavksbHzS/2/2cOAfBbwRbbDh0cJlyqU5yQDJ8n0lx3nRZB82Lq/SOSSWA +lUZb1iY1XWztXF/ADDoJjTOM3z+f6eKL8mORYdzHIVBVe+iFnx5ysRcln2cf +hSM/JRc99+rhCM/aW5B0FKKbl0tOBuih7WeznsaQo3BmR68r7yE9NF4f/eOb +9VG4ferooGmkHu5UYHhzzIbD2HDjADtVD2PsNsmt3hwOLmdt+y9W66HX1UrF +w7xhwJrc3ePKo4+cPgFBHWUhIFpvld+wWh/DdBxTBXNDYPK08iFpfn28qCZ7 +1f9cCGTLTq3+IKiPwllpfnqBIfB3W5TZIYo+NovorvVUDYEH9ekVCRr6ONea +YvHhTjCYJDWmsZ31kb/k8a/0ssNgoSC+mS9fHytybFpV64KAmHgou7tAH2sk +6tgj2UGgUB0yX3dTHz/PPiy4HRcEK2y6cvYW6+Nsv4Rn6OYgaA5K+NFC6GP1 +atmlX6OBYFw/mxn5iByfF6lC8AeCvtOLsU/j+jiZXO6YGXYANsQkH202MMDd +L7Pv1R3bBw2MwpV2dAMUrtXcoOG3Dxx/PsjoZRqgwZ7Of9V2++Bo4Nzdzybk +++5a6aso+6Dd3WuU384AL59TfnKxfi/sNdK32ellgHta5KUP//WHoh+jUrOJ +Bvi9c8y9KWMPKPsZPVAcMsBvC6pTv374wjk5+8W4YXI+jdVDwSO+MPvWR2/s +jQGqzL5vWnzqC41uKcXZ7wyw4ESih0GRLzg5vs0UmzBAm82uHT5evhDBiD/E +w2GIbsE+nyNe+ED7uheyE4qGuOmxc9ieRm/wa9x7ijhsiMEf4097nPSEyYNf +wy1CDZH7XMKzSm9POEo9sL8vzBBzJIf7lE08ITk6yGkhyhBfvYt4eZDDE8ro +YTLMBENcTeRyO8d4wJ+quIaWLEOsrgxWvxi/CzJKs2dfthiizO4D18wLd8KD +3J7d0yJG+NfhQk2b7g4YsZP1DBM3wt7KvkseUjuA49dB19+SRtjV8lKSn3MH +mG7hsl8pY4Sta2wfs7u2Q9syuoGEshEKLbY8FDuwHTp9cnhMjI0wbnLAXLvI +BYYUAkrS9hgh5ZOQuq6uM8ze/vdTo9oIt4/f9ruR5AQfXSxzk2qNsKJQYHE6 +zAkGVpy1fldvhII09p4tu52g3kvyyqUmIyS28F40BSc4Ka5HX+owQtd5xzfj +c1tAIDEg+vGwET76IPLXec8WUPXv5fDjpOOMa22n3FZHoIlQihpX0PHAqvaZ +EFNHEGjx2SLORccopu7uHi1HmKFN5T1ZTccUDp3pZgFHqOvjNdMWoWNzbdSr +O9kOYG2J8f/W03GlYYTmmWx78FUs5snaTMdbiyptnIQdRD70CFBypOO1f5lv +Os7bQZqf4JMKJ/L7OLtjykPsoKEwIuXJdjrabDozPapjB8JK1muXvOno57Lm +UGulLbQpfRD2CqNjiTs9JvyBDShvkJZRyqFjYNyttr4v1oDtL2Mq8uj4uSCk +NOKpNbjsTRg1LqBjdH53g1G5NcTdnsjfXkTHu7xJrwUirGF4Q4NiEpuO2wI9 +d4vzWkPqRleV8Ud03DCzUTNMywqmlc/rV0zR8fBbRtX9CxYw0IkWQjPk/u5m +TUces4CmwMmtoXN09PjP4639HgtIrdh0WH+RXO+y96fohhagTOe4W7ecgUeE +fN7QXpuDz6aDsi2iDDw/rqO8WsUcevyt1vQwGSidr/Poe58p1PPMSeoB6aOq +ox7NppBfnL/xkgkDL0jXuI/dM4VD35csd1gysMyzVUsp3hT4wonYYQcGtp8S +8s/RNQXLBNmf730Y+K/It9k60wRqCn6PziUyUCfO5u2/AAR9s9CfNmcYWGDp +9lPXFaFydHxN7lkGfq3NuhZlhVBBe2Ngk8HA4L66LSwFhLuXm85mX2Wgl1xA +tOx9gNyUeCOrEgZqVn/h7L1rDEmha9MvdzNwXjJwaGUhE7iFEm9O9DJwWCZ0 +9Eo8ExLKORpMBxgoGhrkvnkPE05NTn8cH2bg3uYZY8ENTDi+t4dp8pGB+60O +lArcY0Cw+5XPXxYYaPkkzaa9gQ5u5vLIoDGRy+7i1z0/DGGph5u/RYaJaSnd +PO49hpDrN/nKRp6JR9IdTIKrDOFjQm242wYmSu1KC18WZQjBHQ6lEdpMXGqY +iL610hCS7aNpNZZMJFBfel7GAOp29P7RDWKiVXcV0RqoB7u+1D1uOMzEuIVz +ornb9IAjMveyeSgTd9VcrbpM1wPLq/t1t0UwsYdVxBxdpQcvXy87EBLHxCqh +NL3OXF346qP+qjyTiZ671V5ODeqA1MHTtepNTMy3j/Iq99KG1H979M40M1Gt +dN+tWFtt4MywLP/UysS8703ee/W14WvVyqLcDiYOdx1/dXSNNtRxnLos2M3E +EwudGTdqtcDtQkz4/Acmdsv5PuQT14LL9RF6jatZWBgfctOuQwPW2LuWS/Kz +8GDowBp6gQbEjBiqhQuwMMspycrhhAbsXbmgoCnCwsFJodwpPQ0wcAgTzqex +0N/zZhlvoTr0jQXPxGux0JBbyT4qWQ1EeA+Ub97OwsSpi0/tDqtAgdmxyClX +Fq4viJpT3qwC2sdSzc67s9ArJINLb6MK2E+V9Q54s/A0Tm3sHFWGhL65X74H +WGhRfEd9mbMyLOSfMI2MZaH2jbmVu8w2whDjfPfNYhamh7cFXjVeD3uPFFzb +VEKuN8Jn4Zr0epgvqfQbL2MhvEy638qxHgTlBn5qVbGwNG3UIaFFCWy5qZT7 +TSx8vPn8TKeNEjT03Nzd3cvCfWxPwsxLEWz4a9TCBlg4V9ux+aKZIgxYdcyL +v2Kh3chYMu96RZit+5boMULu52yxg+ekAqjlad778pWFnyxmbt87rgANQyZh +KRMsbH1DWSHuqwA2wltBY4qFp0RXtBVYKcCe00dehM6x8LZq2JjCOgWYbUrI +Eltg4dXiS9/F5uXh5GKmb90iC4We5rSrvpIHAd0i1V1LLCwSZFr5NslD9sG6 +uX//yPn4mBb1hfLwP8XVUTQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0818847147197918}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0818847147197918}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4lF8bB3BpsRTJvsyMXWXfl1nct10IKYpkTUpFIbJUJEISWpTKFpWU +bR675IdEKZVdKrQXIktS6n3ev+b6XDPnzDlz7vt7npH1CXLy4+Tg4Ni/jIPj +/6/zbzpaFc4UGHtpBWTUzVsZ92SLR5gMnITAFueXgb8VAUW6fMQHMoB/rd05 +xm89CHO80798IB92e3ubiv62gHWTYhm/+itAsPHZZM+iM7xtsA+a7W+GkdSn +F3/98gNLha+vp/tfAnAejcqbPwK/+g0uTvWPQYrhf9ccv8RDi9mtghf5M7DQ +H+z6OPMSUN7WfvRRXQI543nzj7G5IHzA8w6X2XI0wIGsvw6FkKFlWW/vzI0d +O8uWRkXvwOBlzaZpAT6cdJQWmVtbAlndxWvDFPmwfaHOn0+mBNz413suGvHh +tWORrVKaJTAcR/3L6cuH/gG0FEnHEhgJ5GUKV/Kh0i/Wu5xzJfDZ/H21vis/ +vj7Ly2pbUwoLU5mlUXlrscbzrZz/v1I4U3Cii1NiHWZmxYpfGysDG919giLy +63BrjFgn40sZcLc6Oa9XW4f5ea42fd/L4NQ7xVe2JuvwZEZ/3u8/ZRAt1/nx +wr51mPtlWRaXWDkE5or/Vapbh+kCPPnyNuWw5Vq5qu1OQfzPNEZ3991yEFC9 +GrTLTxCtvqX9dasoh2f1pyqCggTR2InnkF1NOdi82m54IU4QbSKjLKRby8FU +8q/Z62JBDAhZlnfqVTnoXrbZGfRHEFfc1t+xmacCxC68Szp/XQjHxa3whVcF +iKtUnlq4KYSU+7TTTX4VINmccGJXmRCuKWhbVxxQAbSpjUfWtwjhUkfm1OHQ +ClC0O+RV/1kIk6vlH7WdrgCdFUv673SEcef0pSMp9yrAIVT0vfZjYWSvDVeP +n6sAx9Wf32R2C6PJoJLi8K8KcMqvHfwzLIzy3otb1f9WgMtz966278LYbkZx +bV3Fhl2qN+rcREQwdNn631VibNj/XiP9pJcIlqy9G1JlyIbT2zYZv5wXwVTW +MmtqOBskiWeSnMtE8eD34HiVKDaUCG37qbVaFI3b/KR1T7Ch76VHWbq0KI7v +Hd6re5oNCltC5bZYi2IEZdnW6UtsaN6cs+r5FVHcdSb8gnslG5Ys5549ZYqh +0N9HA78m2JB2M7J4yVIMbWS63mydJsev4khU2yKG+rvbLW/PssHuIa/JWT8x +fJc9wcLfbMgyk2HbpYphiJN4tyo3AYZom/nkrRjKJc9PL8gQEGKU59lxUhyj +LxTYe9kTYJPLP2ubIo6/NV+HDzkSIMcVnfjsojjmxAZ2OGwl4HmPS3n3bXHc +HF73SWUHAeqH1ix/80wc7/cYydzxJuDzzfCbPyQlUEZmmuNBCAEP+D7QjyhI +4EpR9ZlvRwi4FOrU9VNNAm+8EhETPkqAhanawh+UwBRa5LxzNAH5r8c2cflL +4DYbbqXcUwS4C9tPSLElcF122aj9BQJ0oupjsxsk8GBnGWhcIoB3bIOobJsE +yplGD/FeJqC2dDkoDUog17qoDvZVAkRta9M0/0kg7C3I78wn1x+roGthK4kp +3LUzkmUE3Pqc3v5omyQW+jREl5YTcNzhn7uNhyTKmR9wADYBatSheIfDkvh5 +3KLXsYqA5Jpz/a6ZkliRfzCK0UCA+ffFyMB3khieEvZb4xEBEdYXlP8bl0Tj +CyqSIe0ElOSpDQnNS2LllaQH5R0EiG/zMqrllsK28Q95sp0EjNc8/LlcXQpv +qP968+Q5AbKCnrdcDKRQiPOh3bcXBLjsX3ApQin0jy62XtVNQBNVpcp+qxQ2 +XLg+qd5LwPmTaaFXjkrhFncWv+0gAe2vNiqMx0qh5orfXFZDBPzRbek2PiOF +jzgKMo1fEbDn05z2++tS+FC6IVrmNQF0u53T6i1S6KMRElk6QkBQ4WxubKcU +HjzxHRJHCSj4e9axp1cKLVfE33AfI4C/vKk04rMUpo+obVp4R8CYiFJgKx8F +c7oVVX9/JEAs6AFVTIyCC5UCHOWfCLBr3/F0nwwFk5ZnR/p8JqAq8ozqWh0K +emv+86/5QsC3boVhbyYFn2qveu3+lQAZtcYzhAUFO9+LLP0hnfx26qvrDgr2 +Dbaaao6T9WSYnHXXm4IpDvkBLaRn0+Vt/gVQUHVghanTBAEe5i5FBccoyHXl +/XLfSQK0i+r9v+dTcDOozDpOEeDP6SxmepeCxhLmNf+RvrZzsu1CJQXdtCh6 +6tMErOKXVaK3U9C+qWnXImmGf11vygsKbnn9bbXbDwIONW2NfztEwXcnz4dX +kh4KTnh/aoKCTWYKKZ4zBKztlL7QP09BZmaYQQlpc8VaM2UOKuaOihUukI44 +7jQTzUPFWyuwz3iWrI/+b/ldglS01tjQGUP6nWa8kxyFig3DvImNpMWTaZxH +FKkY0i2/eoG03bvq8kfqVJRUKHNRmyMglrnFW9KQiuc3TO73IG3tkf3DwJSK +ax+v/pZKmj/mW5yzHRX/NnaF15HuzTMUCXGholhrr9Ao6Wst8TfTvKgYtKO+ +iXOeAN8PLw1KAqj4s146Rpq0MpdMx5NQKn6ZuLHVgPT0hoNuX45TcVPxV6YN +6Rqbum+rkqjodPAyawfpEwe4jimcp+JX/63bvUlbpm7jN71ORUpiyxk/0nxl +eTmet6gYF5wxvJt0z4tJzWPlVGyO3W/rSfrqDKM5q56Ki62/B7eR9hFJ2lrz +kIob/04nWZDeaND3vreLipW5f921SE/tkA+bGaTi/a7ubeKkqyMPca17T8VC +d8WQRXJ/x6/dv6w+Se7v4e3aftIWjbzKdgtUNNIRUS4jvWZke/0+ThpmHZVv +iyPdvazQ7vQaGlIEUs85kc6S//G6QJSG+ZLrEimk1/uncIwo0/CkqStfPnke +k4mD6Uu6NFTszr6+izRxR0leCmioWrfkK0zadLLJwmUrDZttJbNCyPPnEeDv +D9lFwzl3Pz4K6edaO/em+9OwMPX9/QdkPXkcmUvujKLhfqL49QJZf4qZppSv +8TQM7TrrmDr9/7w4d48rjYZ3nQe4pElH/tn43LSAhteNx220yXo2oYV7e5XQ +0MTZfYj4TgA3tv44VkN+nnGyUpv0xTgPkdpOGnZ92OwiQ/aHe2Hxzb4+Gj6t +uimdRvaP3KMFg9kRGg4GSjF/k/1VxnveTWOOhskHu460fCOgM/1RTiFVGj98 +mpOhkP17ni2s1bJeGhNPV1fvIfvbrde7eURLGo9XFpXdJfv/s/if91KW0qig +2/ZcmcyH5bmayhmB0vjlSOO/72Se0EuuEMcfSCNlh0tnDplP5v3PlibbpfGK +2kRmBZlf9hwrrDxfSqN15p2I/8h883UKHIQP0riZWyKhu5+sryjZEzErZVBw +OnqqnczHQ9LzN0xUZNBZMix68TEBc+y09l8aMlg8eyaoi8zfSGuViXJdGZx8 +yDyfS+Zz/GEvfTljGUx/oh5i0Eaed8vjds4tMugi1dZq8B8Brf45Ey1hMpj6 +y1vtFJn/m/4YCUZHySB9Q/I8pZKAZ2k9+roxMrg9uXp1BXlfDNbyxBQkkfOb +UmRfkPfL5OpQwfhrMlgoILbx3R2yn8usDSybZXBM+IfhjmwCDixMx7TzyaKj +7dRwxkny9zi8R/SjoCzO5YpfT4shz+/rUPFycVkUfcBjlXycgMJXLX3GcrJo +lnfP+3AkAW8aL6pW6pPjpblm+YMJcIg3GsjzlMXexnO5SV5k/gnGakSVy6Lc +4WMfz9IJ4Dgz13q5ShYFDXtO8BmS618e4FZVL4sxPD8dkvQI2D/nFD/9UBaD +PkZmH9Ek839A4ZX/kCxmENeNZJXI+zSnPWHbcjm8NDx4vk2AgF8qAm/UnOVw +fUWb6853bJi/Lhmr4yaHlISg46EjbJhdq6hg5CmHYhFMm+TXbJicMQow3yeH +o4c+jhT3s2Gs3nfe7ZgcGuxfZ//oCRse21bzJxbKoaaKhKU3m3x+2e8BY3Ny +KFSeWq0dwwZm8d3cS5fksezeH51eATa8kinOsbgqj5X3vhUF8LEh8lJR9myO +PNYMmTxY4mFDdezNa05F8pjPbfScspwN2jtyL/M3yGMsfaLFmHwe3LjyQlrC +qDxqx52uFhqsAFHPqJgwVQWsddj/e21OBUwL2ni5NCvgk8cd7i0KFfA+xcsl +mEsJbzb9zfjJWQ6bvodv+qC/HtmUyueTdaUw7ssdQpzYgE/r+7+YS98j/2+I +cZ5u3ohZYcM03tg7IPhUKbXsuzLK8vlo+wjcBkpiqaO+virGjNbtYh8thMsq +RgJC/mrY2rb8YJX8DXgsaaI3k66OoYIeHrI/c4FOaU7T6NNA1zMb2zzjrgP/ +8vxQ75Oa6BTrRqMTV4AWK810VdLC8/+Sb8LUReBRdK9yeqSFQ2kqe/iyM0Cd +JVEavksbHzS/2/2cOAfBbwRbbDh0cJlyqU5yQDJ8n0lx3nRZB82Lq/SOSSWA +lUZb1iY1XWztXF/ADDoJjTOM3z+f6eKL8mORYdzHIVBVe+iFnx5ysRcln2cf +hSM/JRc99+rhCM/aW5B0FKKbl0tOBuih7WeznsaQo3BmR68r7yE9NF4f/eOb +9VG4ferooGmkHu5UYHhzzIbD2HDjADtVD2PsNsmt3hwOLmdt+y9W66HX1UrF +w7xhwJrc3ePKo4+cPgFBHWUhIFpvld+wWh/DdBxTBXNDYPK08iFpfn28qCZ7 +1f9cCGTLTq3+IKiPwllpfnqBIfB3W5TZIYo+NovorvVUDYEH9ekVCRr6ONea +YvHhTjCYJDWmsZ31kb/k8a/0ssNgoSC+mS9fHytybFpV64KAmHgou7tAH2sk +6tgj2UGgUB0yX3dTHz/PPiy4HRcEK2y6cvYW6+Nsv4Rn6OYgaA5K+NFC6GP1 +atmlX6OBYFw/mxn5iByfF6lC8AeCvtOLsU/j+jiZXO6YGXYANsQkH202MMDd +L7Pv1R3bBw2MwpV2dAMUrtXcoOG3Dxx/PsjoZRqgwZ7Of9V2++Bo4Nzdzybk +++5a6aso+6Dd3WuU384AL59TfnKxfi/sNdK32ellgHta5KUP//WHoh+jUrOJ +Bvi9c8y9KWMPKPsZPVAcMsBvC6pTv374wjk5+8W4YXI+jdVDwSO+MPvWR2/s +jQGqzL5vWnzqC41uKcXZ7wyw4ESih0GRLzg5vs0UmzBAm82uHT5evhDBiD/E +w2GIbsE+nyNe+ED7uheyE4qGuOmxc9ieRm/wa9x7ijhsiMEf4097nPSEyYNf +wy1CDZH7XMKzSm9POEo9sL8vzBBzJIf7lE08ITk6yGkhyhBfvYt4eZDDE8ro +YTLMBENcTeRyO8d4wJ+quIaWLEOsrgxWvxi/CzJKs2dfthiizO4D18wLd8KD +3J7d0yJG+NfhQk2b7g4YsZP1DBM3wt7KvkseUjuA49dB19+SRtjV8lKSn3MH +mG7hsl8pY4Sta2wfs7u2Q9syuoGEshEKLbY8FDuwHTp9cnhMjI0wbnLAXLvI +BYYUAkrS9hgh5ZOQuq6uM8ze/vdTo9oIt4/f9ruR5AQfXSxzk2qNsKJQYHE6 +zAkGVpy1fldvhII09p4tu52g3kvyyqUmIyS28F40BSc4Ka5HX+owQtd5xzfj +c1tAIDEg+vGwET76IPLXec8WUPXv5fDjpOOMa22n3FZHoIlQihpX0PHAqvaZ +EFNHEGjx2SLORccopu7uHi1HmKFN5T1ZTccUDp3pZgFHqOvjNdMWoWNzbdSr +O9kOYG2J8f/W03GlYYTmmWx78FUs5snaTMdbiyptnIQdRD70CFBypOO1f5lv +Os7bQZqf4JMKJ/L7OLtjykPsoKEwIuXJdjrabDozPapjB8JK1muXvOno57Lm +UGulLbQpfRD2CqNjiTs9JvyBDShvkJZRyqFjYNyttr4v1oDtL2Mq8uj4uSCk +NOKpNbjsTRg1LqBjdH53g1G5NcTdnsjfXkTHu7xJrwUirGF4Q4NiEpuO2wI9 +d4vzWkPqRleV8Ud03DCzUTNMywqmlc/rV0zR8fBbRtX9CxYw0IkWQjPk/u5m +TUces4CmwMmtoXN09PjP4639HgtIrdh0WH+RXO+y96fohhagTOe4W7ecgUeE +fN7QXpuDz6aDsi2iDDw/rqO8WsUcevyt1vQwGSidr/Poe58p1PPMSeoB6aOq +ox7NppBfnL/xkgkDL0jXuI/dM4VD35csd1gysMyzVUsp3hT4wonYYQcGtp8S +8s/RNQXLBNmf730Y+K/It9k60wRqCn6PziUyUCfO5u2/AAR9s9CfNmcYWGDp +9lPXFaFydHxN7lkGfq3NuhZlhVBBe2Ngk8HA4L66LSwFhLuXm85mX2Wgl1xA +tOx9gNyUeCOrEgZqVn/h7L1rDEmha9MvdzNwXjJwaGUhE7iFEm9O9DJwWCZ0 +9Eo8ExLKORpMBxgoGhrkvnkPE05NTn8cH2bg3uYZY8ENTDi+t4dp8pGB+60O +lArcY0Cw+5XPXxYYaPkkzaa9gQ5u5vLIoDGRy+7i1z0/DGGph5u/RYaJaSnd +PO49hpDrN/nKRp6JR9IdTIKrDOFjQm242wYmSu1KC18WZQjBHQ6lEdpMXGqY +iL610hCS7aNpNZZMJFBfel7GAOp29P7RDWKiVXcV0RqoB7u+1D1uOMzEuIVz +ornb9IAjMveyeSgTd9VcrbpM1wPLq/t1t0UwsYdVxBxdpQcvXy87EBLHxCqh +NL3OXF346qP+qjyTiZ671V5ODeqA1MHTtepNTMy3j/Iq99KG1H979M40M1Gt +dN+tWFtt4MywLP/UysS8703ee/W14WvVyqLcDiYOdx1/dXSNNtRxnLos2M3E +EwudGTdqtcDtQkz4/Acmdsv5PuQT14LL9RF6jatZWBgfctOuQwPW2LuWS/Kz +8GDowBp6gQbEjBiqhQuwMMspycrhhAbsXbmgoCnCwsFJodwpPQ0wcAgTzqex +0N/zZhlvoTr0jQXPxGux0JBbyT4qWQ1EeA+Ub97OwsSpi0/tDqtAgdmxyClX +Fq4viJpT3qwC2sdSzc67s9ArJINLb6MK2E+V9Q54s/A0Tm3sHFWGhL65X74H +WGhRfEd9mbMyLOSfMI2MZaH2jbmVu8w2whDjfPfNYhamh7cFXjVeD3uPFFzb +VEKuN8Jn4Zr0epgvqfQbL2MhvEy638qxHgTlBn5qVbGwNG3UIaFFCWy5qZT7 +TSx8vPn8TKeNEjT03Nzd3cvCfWxPwsxLEWz4a9TCBlg4V9ux+aKZIgxYdcyL +v2Kh3chYMu96RZit+5boMULu52yxg+ekAqjlad778pWFnyxmbt87rgANQyZh +KRMsbH1DWSHuqwA2wltBY4qFp0RXtBVYKcCe00dehM6x8LZq2JjCOgWYbUrI +Eltg4dXiS9/F5uXh5GKmb90iC4We5rSrvpIHAd0i1V1LLCwSZFr5NslD9sG6 +uX//yPn4mBb1hfLwP8XVUTQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0818847147197918}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0818847147197918}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357008528657*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"639be5a1-2c2c-4d54-b51e-20c12215fafc"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"344da507-9044-\ -ef47-aa8c-99f282e3d6d3"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[118]:=",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4lF8bB3BpsRTJvsyMXWXfl1nct10IKYpkTUpFIbJUJEISWpTKFpWU +bR675IdEKZVdKrQXIktS6n3ev+b6XDPnzDlz7vt7npH1CXLy4+Tg4Ni/jIPj +/6/zbzpaFc4UGHtpBWTUzVsZ92SLR5gMnITAFueXgb8VAUW6fMQHMoB/rd05 +xm89CHO80798IB92e3ubiv62gHWTYhm/+itAsPHZZM+iM7xtsA+a7W+GkdSn +F3/98gNLha+vp/tfAnAejcqbPwK/+g0uTvWPQYrhf9ccv8RDi9mtghf5M7DQ +H+z6OPMSUN7WfvRRXQI543nzj7G5IHzA8w6X2XI0wIGsvw6FkKFlWW/vzI0d +O8uWRkXvwOBlzaZpAT6cdJQWmVtbAlndxWvDFPmwfaHOn0+mBNz413suGvHh +tWORrVKaJTAcR/3L6cuH/gG0FEnHEhgJ5GUKV/Kh0i/Wu5xzJfDZ/H21vis/ +vj7Ly2pbUwoLU5mlUXlrscbzrZz/v1I4U3Cii1NiHWZmxYpfGysDG919giLy +63BrjFgn40sZcLc6Oa9XW4f5ea42fd/L4NQ7xVe2JuvwZEZ/3u8/ZRAt1/nx +wr51mPtlWRaXWDkE5or/Vapbh+kCPPnyNuWw5Vq5qu1OQfzPNEZ3991yEFC9 +GrTLTxCtvqX9dasoh2f1pyqCggTR2InnkF1NOdi82m54IU4QbSKjLKRby8FU +8q/Z62JBDAhZlnfqVTnoXrbZGfRHEFfc1t+xmacCxC68Szp/XQjHxa3whVcF +iKtUnlq4KYSU+7TTTX4VINmccGJXmRCuKWhbVxxQAbSpjUfWtwjhUkfm1OHQ +ClC0O+RV/1kIk6vlH7WdrgCdFUv673SEcef0pSMp9yrAIVT0vfZjYWSvDVeP +n6sAx9Wf32R2C6PJoJLi8K8KcMqvHfwzLIzy3otb1f9WgMtz966278LYbkZx +bV3Fhl2qN+rcREQwdNn631VibNj/XiP9pJcIlqy9G1JlyIbT2zYZv5wXwVTW +MmtqOBskiWeSnMtE8eD34HiVKDaUCG37qbVaFI3b/KR1T7Ch76VHWbq0KI7v +Hd6re5oNCltC5bZYi2IEZdnW6UtsaN6cs+r5FVHcdSb8gnslG5Ys5549ZYqh +0N9HA78m2JB2M7J4yVIMbWS63mydJsev4khU2yKG+rvbLW/PssHuIa/JWT8x +fJc9wcLfbMgyk2HbpYphiJN4tyo3AYZom/nkrRjKJc9PL8gQEGKU59lxUhyj +LxTYe9kTYJPLP2ubIo6/NV+HDzkSIMcVnfjsojjmxAZ2OGwl4HmPS3n3bXHc +HF73SWUHAeqH1ix/80wc7/cYydzxJuDzzfCbPyQlUEZmmuNBCAEP+D7QjyhI +4EpR9ZlvRwi4FOrU9VNNAm+8EhETPkqAhanawh+UwBRa5LxzNAH5r8c2cflL +4DYbbqXcUwS4C9tPSLElcF122aj9BQJ0oupjsxsk8GBnGWhcIoB3bIOobJsE +yplGD/FeJqC2dDkoDUog17qoDvZVAkRta9M0/0kg7C3I78wn1x+roGthK4kp +3LUzkmUE3Pqc3v5omyQW+jREl5YTcNzhn7uNhyTKmR9wADYBatSheIfDkvh5 +3KLXsYqA5Jpz/a6ZkliRfzCK0UCA+ffFyMB3khieEvZb4xEBEdYXlP8bl0Tj +CyqSIe0ElOSpDQnNS2LllaQH5R0EiG/zMqrllsK28Q95sp0EjNc8/LlcXQpv +qP968+Q5AbKCnrdcDKRQiPOh3bcXBLjsX3ApQin0jy62XtVNQBNVpcp+qxQ2 +XLg+qd5LwPmTaaFXjkrhFncWv+0gAe2vNiqMx0qh5orfXFZDBPzRbek2PiOF +jzgKMo1fEbDn05z2++tS+FC6IVrmNQF0u53T6i1S6KMRElk6QkBQ4WxubKcU +HjzxHRJHCSj4e9axp1cKLVfE33AfI4C/vKk04rMUpo+obVp4R8CYiFJgKx8F +c7oVVX9/JEAs6AFVTIyCC5UCHOWfCLBr3/F0nwwFk5ZnR/p8JqAq8ozqWh0K +emv+86/5QsC3boVhbyYFn2qveu3+lQAZtcYzhAUFO9+LLP0hnfx26qvrDgr2 +Dbaaao6T9WSYnHXXm4IpDvkBLaRn0+Vt/gVQUHVghanTBAEe5i5FBccoyHXl +/XLfSQK0i+r9v+dTcDOozDpOEeDP6SxmepeCxhLmNf+RvrZzsu1CJQXdtCh6 +6tMErOKXVaK3U9C+qWnXImmGf11vygsKbnn9bbXbDwIONW2NfztEwXcnz4dX +kh4KTnh/aoKCTWYKKZ4zBKztlL7QP09BZmaYQQlpc8VaM2UOKuaOihUukI44 +7jQTzUPFWyuwz3iWrI/+b/ldglS01tjQGUP6nWa8kxyFig3DvImNpMWTaZxH +FKkY0i2/eoG03bvq8kfqVJRUKHNRmyMglrnFW9KQiuc3TO73IG3tkf3DwJSK +ax+v/pZKmj/mW5yzHRX/NnaF15HuzTMUCXGholhrr9Ao6Wst8TfTvKgYtKO+ +iXOeAN8PLw1KAqj4s146Rpq0MpdMx5NQKn6ZuLHVgPT0hoNuX45TcVPxV6YN +6Rqbum+rkqjodPAyawfpEwe4jimcp+JX/63bvUlbpm7jN71ORUpiyxk/0nxl +eTmet6gYF5wxvJt0z4tJzWPlVGyO3W/rSfrqDKM5q56Ki62/B7eR9hFJ2lrz +kIob/04nWZDeaND3vreLipW5f921SE/tkA+bGaTi/a7ubeKkqyMPca17T8VC +d8WQRXJ/x6/dv6w+Se7v4e3aftIWjbzKdgtUNNIRUS4jvWZke/0+ThpmHZVv +iyPdvazQ7vQaGlIEUs85kc6S//G6QJSG+ZLrEimk1/uncIwo0/CkqStfPnke +k4mD6Uu6NFTszr6+izRxR0leCmioWrfkK0zadLLJwmUrDZttJbNCyPPnEeDv +D9lFwzl3Pz4K6edaO/em+9OwMPX9/QdkPXkcmUvujKLhfqL49QJZf4qZppSv +8TQM7TrrmDr9/7w4d48rjYZ3nQe4pElH/tn43LSAhteNx220yXo2oYV7e5XQ +0MTZfYj4TgA3tv44VkN+nnGyUpv0xTgPkdpOGnZ92OwiQ/aHe2Hxzb4+Gj6t +uimdRvaP3KMFg9kRGg4GSjF/k/1VxnveTWOOhskHu460fCOgM/1RTiFVGj98 +mpOhkP17ni2s1bJeGhNPV1fvIfvbrde7eURLGo9XFpXdJfv/s/if91KW0qig +2/ZcmcyH5bmayhmB0vjlSOO/72Se0EuuEMcfSCNlh0tnDplP5v3PlibbpfGK +2kRmBZlf9hwrrDxfSqN15p2I/8h883UKHIQP0riZWyKhu5+sryjZEzErZVBw +OnqqnczHQ9LzN0xUZNBZMix68TEBc+y09l8aMlg8eyaoi8zfSGuViXJdGZx8 +yDyfS+Zz/GEvfTljGUx/oh5i0Eaed8vjds4tMugi1dZq8B8Brf45Ey1hMpj6 +y1vtFJn/m/4YCUZHySB9Q/I8pZKAZ2k9+roxMrg9uXp1BXlfDNbyxBQkkfOb +UmRfkPfL5OpQwfhrMlgoILbx3R2yn8usDSybZXBM+IfhjmwCDixMx7TzyaKj +7dRwxkny9zi8R/SjoCzO5YpfT4shz+/rUPFycVkUfcBjlXycgMJXLX3GcrJo +lnfP+3AkAW8aL6pW6pPjpblm+YMJcIg3GsjzlMXexnO5SV5k/gnGakSVy6Lc +4WMfz9IJ4Dgz13q5ShYFDXtO8BmS618e4FZVL4sxPD8dkvQI2D/nFD/9UBaD +PkZmH9Ek839A4ZX/kCxmENeNZJXI+zSnPWHbcjm8NDx4vk2AgF8qAm/UnOVw +fUWb6853bJi/Lhmr4yaHlISg46EjbJhdq6hg5CmHYhFMm+TXbJicMQow3yeH +o4c+jhT3s2Gs3nfe7ZgcGuxfZ//oCRse21bzJxbKoaaKhKU3m3x+2e8BY3Ny +KFSeWq0dwwZm8d3cS5fksezeH51eATa8kinOsbgqj5X3vhUF8LEh8lJR9myO +PNYMmTxY4mFDdezNa05F8pjPbfScspwN2jtyL/M3yGMsfaLFmHwe3LjyQlrC +qDxqx52uFhqsAFHPqJgwVQWsddj/e21OBUwL2ni5NCvgk8cd7i0KFfA+xcsl +mEsJbzb9zfjJWQ6bvodv+qC/HtmUyueTdaUw7ssdQpzYgE/r+7+YS98j/2+I +cZ5u3ohZYcM03tg7IPhUKbXsuzLK8vlo+wjcBkpiqaO+virGjNbtYh8thMsq +RgJC/mrY2rb8YJX8DXgsaaI3k66OoYIeHrI/c4FOaU7T6NNA1zMb2zzjrgP/ +8vxQ75Oa6BTrRqMTV4AWK810VdLC8/+Sb8LUReBRdK9yeqSFQ2kqe/iyM0Cd +JVEavksbHzS/2/2cOAfBbwRbbDh0cJlyqU5yQDJ8n0lx3nRZB82Lq/SOSSWA +lUZb1iY1XWztXF/ADDoJjTOM3z+f6eKL8mORYdzHIVBVe+iFnx5ysRcln2cf +hSM/JRc99+rhCM/aW5B0FKKbl0tOBuih7WeznsaQo3BmR68r7yE9NF4f/eOb +9VG4ferooGmkHu5UYHhzzIbD2HDjADtVD2PsNsmt3hwOLmdt+y9W66HX1UrF +w7xhwJrc3ePKo4+cPgFBHWUhIFpvld+wWh/DdBxTBXNDYPK08iFpfn28qCZ7 +1f9cCGTLTq3+IKiPwllpfnqBIfB3W5TZIYo+NovorvVUDYEH9ekVCRr6ONea +YvHhTjCYJDWmsZ31kb/k8a/0ssNgoSC+mS9fHytybFpV64KAmHgou7tAH2sk +6tgj2UGgUB0yX3dTHz/PPiy4HRcEK2y6cvYW6+Nsv4Rn6OYgaA5K+NFC6GP1 +atmlX6OBYFw/mxn5iByfF6lC8AeCvtOLsU/j+jiZXO6YGXYANsQkH202MMDd +L7Pv1R3bBw2MwpV2dAMUrtXcoOG3Dxx/PsjoZRqgwZ7Of9V2++Bo4Nzdzybk +++5a6aso+6Dd3WuU384AL59TfnKxfi/sNdK32ellgHta5KUP//WHoh+jUrOJ +Bvi9c8y9KWMPKPsZPVAcMsBvC6pTv374wjk5+8W4YXI+jdVDwSO+MPvWR2/s +jQGqzL5vWnzqC41uKcXZ7wyw4ESih0GRLzg5vs0UmzBAm82uHT5evhDBiD/E +w2GIbsE+nyNe+ED7uheyE4qGuOmxc9ieRm/wa9x7ijhsiMEf4097nPSEyYNf +wy1CDZH7XMKzSm9POEo9sL8vzBBzJIf7lE08ITk6yGkhyhBfvYt4eZDDE8ro +YTLMBENcTeRyO8d4wJ+quIaWLEOsrgxWvxi/CzJKs2dfthiizO4D18wLd8KD +3J7d0yJG+NfhQk2b7g4YsZP1DBM3wt7KvkseUjuA49dB19+SRtjV8lKSn3MH +mG7hsl8pY4Sta2wfs7u2Q9syuoGEshEKLbY8FDuwHTp9cnhMjI0wbnLAXLvI +BYYUAkrS9hgh5ZOQuq6uM8ze/vdTo9oIt4/f9ruR5AQfXSxzk2qNsKJQYHE6 +zAkGVpy1fldvhII09p4tu52g3kvyyqUmIyS28F40BSc4Ka5HX+owQtd5xzfj +c1tAIDEg+vGwET76IPLXec8WUPXv5fDjpOOMa22n3FZHoIlQihpX0PHAqvaZ +EFNHEGjx2SLORccopu7uHi1HmKFN5T1ZTccUDp3pZgFHqOvjNdMWoWNzbdSr +O9kOYG2J8f/W03GlYYTmmWx78FUs5snaTMdbiyptnIQdRD70CFBypOO1f5lv +Os7bQZqf4JMKJ/L7OLtjykPsoKEwIuXJdjrabDozPapjB8JK1muXvOno57Lm +UGulLbQpfRD2CqNjiTs9JvyBDShvkJZRyqFjYNyttr4v1oDtL2Mq8uj4uSCk +NOKpNbjsTRg1LqBjdH53g1G5NcTdnsjfXkTHu7xJrwUirGF4Q4NiEpuO2wI9 +d4vzWkPqRleV8Ud03DCzUTNMywqmlc/rV0zR8fBbRtX9CxYw0IkWQjPk/u5m +TUces4CmwMmtoXN09PjP4639HgtIrdh0WH+RXO+y96fohhagTOe4W7ecgUeE +fN7QXpuDz6aDsi2iDDw/rqO8WsUcevyt1vQwGSidr/Poe58p1PPMSeoB6aOq +ox7NppBfnL/xkgkDL0jXuI/dM4VD35csd1gysMyzVUsp3hT4wonYYQcGtp8S +8s/RNQXLBNmf730Y+K/It9k60wRqCn6PziUyUCfO5u2/AAR9s9CfNmcYWGDp +9lPXFaFydHxN7lkGfq3NuhZlhVBBe2Ngk8HA4L66LSwFhLuXm85mX2Wgl1xA +tOx9gNyUeCOrEgZqVn/h7L1rDEmha9MvdzNwXjJwaGUhE7iFEm9O9DJwWCZ0 +9Eo8ExLKORpMBxgoGhrkvnkPE05NTn8cH2bg3uYZY8ENTDi+t4dp8pGB+60O +lArcY0Cw+5XPXxYYaPkkzaa9gQ5u5vLIoDGRy+7i1z0/DGGph5u/RYaJaSnd +PO49hpDrN/nKRp6JR9IdTIKrDOFjQm242wYmSu1KC18WZQjBHQ6lEdpMXGqY +iL610hCS7aNpNZZMJFBfel7GAOp29P7RDWKiVXcV0RqoB7u+1D1uOMzEuIVz +ornb9IAjMveyeSgTd9VcrbpM1wPLq/t1t0UwsYdVxBxdpQcvXy87EBLHxCqh +NL3OXF346qP+qjyTiZ671V5ODeqA1MHTtepNTMy3j/Iq99KG1H979M40M1Gt +dN+tWFtt4MywLP/UysS8703ee/W14WvVyqLcDiYOdx1/dXSNNtRxnLos2M3E +EwudGTdqtcDtQkz4/Acmdsv5PuQT14LL9RF6jatZWBgfctOuQwPW2LuWS/Kz +8GDowBp6gQbEjBiqhQuwMMspycrhhAbsXbmgoCnCwsFJodwpPQ0wcAgTzqex +0N/zZhlvoTr0jQXPxGux0JBbyT4qWQ1EeA+Ub97OwsSpi0/tDqtAgdmxyClX +Fq4viJpT3qwC2sdSzc67s9ArJINLb6MK2E+V9Q54s/A0Tm3sHFWGhL65X74H +WGhRfEd9mbMyLOSfMI2MZaH2jbmVu8w2whDjfPfNYhamh7cFXjVeD3uPFFzb +VEKuN8Jn4Zr0epgvqfQbL2MhvEy638qxHgTlBn5qVbGwNG3UIaFFCWy5qZT7 +TSx8vPn8TKeNEjT03Nzd3cvCfWxPwsxLEWz4a9TCBlg4V9ux+aKZIgxYdcyL +v2Kh3chYMu96RZit+5boMULu52yxg+ekAqjlad778pWFnyxmbt87rgANQyZh +KRMsbH1DWSHuqwA2wltBY4qFp0RXtBVYKcCe00dehM6x8LZq2JjCOgWYbUrI +Eltg4dXiS9/F5uXh5GKmb90iC4We5rSrvpIHAd0i1V1LLCwSZFr5NslD9sG6 +uX//yPn4mBb1hfLwP8XVUTQ= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4lF8bB3BpsRTJvsyMXWXfl1nct10IKYpkTUpFIbJUJEISWpTKFpWU +bR675IdEKZVdKrQXIktS6n3ev+b6XDPnzDlz7vt7npH1CXLy4+Tg4Ni/jIPj +/6/zbzpaFc4UGHtpBWTUzVsZ92SLR5gMnITAFueXgb8VAUW6fMQHMoB/rd05 +xm89CHO80798IB92e3ubiv62gHWTYhm/+itAsPHZZM+iM7xtsA+a7W+GkdSn +F3/98gNLha+vp/tfAnAejcqbPwK/+g0uTvWPQYrhf9ccv8RDi9mtghf5M7DQ +H+z6OPMSUN7WfvRRXQI543nzj7G5IHzA8w6X2XI0wIGsvw6FkKFlWW/vzI0d +O8uWRkXvwOBlzaZpAT6cdJQWmVtbAlndxWvDFPmwfaHOn0+mBNz413suGvHh +tWORrVKaJTAcR/3L6cuH/gG0FEnHEhgJ5GUKV/Kh0i/Wu5xzJfDZ/H21vis/ +vj7Ly2pbUwoLU5mlUXlrscbzrZz/v1I4U3Cii1NiHWZmxYpfGysDG919giLy +63BrjFgn40sZcLc6Oa9XW4f5ea42fd/L4NQ7xVe2JuvwZEZ/3u8/ZRAt1/nx +wr51mPtlWRaXWDkE5or/Vapbh+kCPPnyNuWw5Vq5qu1OQfzPNEZ3991yEFC9 +GrTLTxCtvqX9dasoh2f1pyqCggTR2InnkF1NOdi82m54IU4QbSKjLKRby8FU +8q/Z62JBDAhZlnfqVTnoXrbZGfRHEFfc1t+xmacCxC68Szp/XQjHxa3whVcF +iKtUnlq4KYSU+7TTTX4VINmccGJXmRCuKWhbVxxQAbSpjUfWtwjhUkfm1OHQ +ClC0O+RV/1kIk6vlH7WdrgCdFUv673SEcef0pSMp9yrAIVT0vfZjYWSvDVeP +n6sAx9Wf32R2C6PJoJLi8K8KcMqvHfwzLIzy3otb1f9WgMtz966278LYbkZx +bV3Fhl2qN+rcREQwdNn631VibNj/XiP9pJcIlqy9G1JlyIbT2zYZv5wXwVTW +MmtqOBskiWeSnMtE8eD34HiVKDaUCG37qbVaFI3b/KR1T7Ch76VHWbq0KI7v +Hd6re5oNCltC5bZYi2IEZdnW6UtsaN6cs+r5FVHcdSb8gnslG5Ys5549ZYqh +0N9HA78m2JB2M7J4yVIMbWS63mydJsev4khU2yKG+rvbLW/PssHuIa/JWT8x +fJc9wcLfbMgyk2HbpYphiJN4tyo3AYZom/nkrRjKJc9PL8gQEGKU59lxUhyj +LxTYe9kTYJPLP2ubIo6/NV+HDzkSIMcVnfjsojjmxAZ2OGwl4HmPS3n3bXHc +HF73SWUHAeqH1ix/80wc7/cYydzxJuDzzfCbPyQlUEZmmuNBCAEP+D7QjyhI +4EpR9ZlvRwi4FOrU9VNNAm+8EhETPkqAhanawh+UwBRa5LxzNAH5r8c2cflL +4DYbbqXcUwS4C9tPSLElcF122aj9BQJ0oupjsxsk8GBnGWhcIoB3bIOobJsE +yplGD/FeJqC2dDkoDUog17qoDvZVAkRta9M0/0kg7C3I78wn1x+roGthK4kp +3LUzkmUE3Pqc3v5omyQW+jREl5YTcNzhn7uNhyTKmR9wADYBatSheIfDkvh5 +3KLXsYqA5Jpz/a6ZkliRfzCK0UCA+ffFyMB3khieEvZb4xEBEdYXlP8bl0Tj +CyqSIe0ElOSpDQnNS2LllaQH5R0EiG/zMqrllsK28Q95sp0EjNc8/LlcXQpv +qP968+Q5AbKCnrdcDKRQiPOh3bcXBLjsX3ApQin0jy62XtVNQBNVpcp+qxQ2 +XLg+qd5LwPmTaaFXjkrhFncWv+0gAe2vNiqMx0qh5orfXFZDBPzRbek2PiOF +jzgKMo1fEbDn05z2++tS+FC6IVrmNQF0u53T6i1S6KMRElk6QkBQ4WxubKcU +HjzxHRJHCSj4e9axp1cKLVfE33AfI4C/vKk04rMUpo+obVp4R8CYiFJgKx8F +c7oVVX9/JEAs6AFVTIyCC5UCHOWfCLBr3/F0nwwFk5ZnR/p8JqAq8ozqWh0K +emv+86/5QsC3boVhbyYFn2qveu3+lQAZtcYzhAUFO9+LLP0hnfx26qvrDgr2 +Dbaaao6T9WSYnHXXm4IpDvkBLaRn0+Vt/gVQUHVghanTBAEe5i5FBccoyHXl +/XLfSQK0i+r9v+dTcDOozDpOEeDP6SxmepeCxhLmNf+RvrZzsu1CJQXdtCh6 +6tMErOKXVaK3U9C+qWnXImmGf11vygsKbnn9bbXbDwIONW2NfztEwXcnz4dX +kh4KTnh/aoKCTWYKKZ4zBKztlL7QP09BZmaYQQlpc8VaM2UOKuaOihUukI44 +7jQTzUPFWyuwz3iWrI/+b/ldglS01tjQGUP6nWa8kxyFig3DvImNpMWTaZxH +FKkY0i2/eoG03bvq8kfqVJRUKHNRmyMglrnFW9KQiuc3TO73IG3tkf3DwJSK +ax+v/pZKmj/mW5yzHRX/NnaF15HuzTMUCXGholhrr9Ao6Wst8TfTvKgYtKO+ +iXOeAN8PLw1KAqj4s146Rpq0MpdMx5NQKn6ZuLHVgPT0hoNuX45TcVPxV6YN +6Rqbum+rkqjodPAyawfpEwe4jimcp+JX/63bvUlbpm7jN71ORUpiyxk/0nxl +eTmet6gYF5wxvJt0z4tJzWPlVGyO3W/rSfrqDKM5q56Ki62/B7eR9hFJ2lrz +kIob/04nWZDeaND3vreLipW5f921SE/tkA+bGaTi/a7ubeKkqyMPca17T8VC +d8WQRXJ/x6/dv6w+Se7v4e3aftIWjbzKdgtUNNIRUS4jvWZke/0+ThpmHZVv +iyPdvazQ7vQaGlIEUs85kc6S//G6QJSG+ZLrEimk1/uncIwo0/CkqStfPnke +k4mD6Uu6NFTszr6+izRxR0leCmioWrfkK0zadLLJwmUrDZttJbNCyPPnEeDv +D9lFwzl3Pz4K6edaO/em+9OwMPX9/QdkPXkcmUvujKLhfqL49QJZf4qZppSv +8TQM7TrrmDr9/7w4d48rjYZ3nQe4pElH/tn43LSAhteNx220yXo2oYV7e5XQ +0MTZfYj4TgA3tv44VkN+nnGyUpv0xTgPkdpOGnZ92OwiQ/aHe2Hxzb4+Gj6t +uimdRvaP3KMFg9kRGg4GSjF/k/1VxnveTWOOhskHu460fCOgM/1RTiFVGj98 +mpOhkP17ni2s1bJeGhNPV1fvIfvbrde7eURLGo9XFpXdJfv/s/if91KW0qig +2/ZcmcyH5bmayhmB0vjlSOO/72Se0EuuEMcfSCNlh0tnDplP5v3PlibbpfGK +2kRmBZlf9hwrrDxfSqN15p2I/8h883UKHIQP0riZWyKhu5+sryjZEzErZVBw +OnqqnczHQ9LzN0xUZNBZMix68TEBc+y09l8aMlg8eyaoi8zfSGuViXJdGZx8 +yDyfS+Zz/GEvfTljGUx/oh5i0Eaed8vjds4tMugi1dZq8B8Brf45Ey1hMpj6 +y1vtFJn/m/4YCUZHySB9Q/I8pZKAZ2k9+roxMrg9uXp1BXlfDNbyxBQkkfOb +UmRfkPfL5OpQwfhrMlgoILbx3R2yn8usDSybZXBM+IfhjmwCDixMx7TzyaKj +7dRwxkny9zi8R/SjoCzO5YpfT4shz+/rUPFycVkUfcBjlXycgMJXLX3GcrJo +lnfP+3AkAW8aL6pW6pPjpblm+YMJcIg3GsjzlMXexnO5SV5k/gnGakSVy6Lc +4WMfz9IJ4Dgz13q5ShYFDXtO8BmS618e4FZVL4sxPD8dkvQI2D/nFD/9UBaD +PkZmH9Ek839A4ZX/kCxmENeNZJXI+zSnPWHbcjm8NDx4vk2AgF8qAm/UnOVw +fUWb6853bJi/Lhmr4yaHlISg46EjbJhdq6hg5CmHYhFMm+TXbJicMQow3yeH +o4c+jhT3s2Gs3nfe7ZgcGuxfZ//oCRse21bzJxbKoaaKhKU3m3x+2e8BY3Ny +KFSeWq0dwwZm8d3cS5fksezeH51eATa8kinOsbgqj5X3vhUF8LEh8lJR9myO +PNYMmTxY4mFDdezNa05F8pjPbfScspwN2jtyL/M3yGMsfaLFmHwe3LjyQlrC +qDxqx52uFhqsAFHPqJgwVQWsddj/e21OBUwL2ni5NCvgk8cd7i0KFfA+xcsl +mEsJbzb9zfjJWQ6bvodv+qC/HtmUyueTdaUw7ssdQpzYgE/r+7+YS98j/2+I +cZ5u3ohZYcM03tg7IPhUKbXsuzLK8vlo+wjcBkpiqaO+virGjNbtYh8thMsq +RgJC/mrY2rb8YJX8DXgsaaI3k66OoYIeHrI/c4FOaU7T6NNA1zMb2zzjrgP/ +8vxQ75Oa6BTrRqMTV4AWK810VdLC8/+Sb8LUReBRdK9yeqSFQ2kqe/iyM0Cd +JVEavksbHzS/2/2cOAfBbwRbbDh0cJlyqU5yQDJ8n0lx3nRZB82Lq/SOSSWA +lUZb1iY1XWztXF/ADDoJjTOM3z+f6eKL8mORYdzHIVBVe+iFnx5ysRcln2cf +hSM/JRc99+rhCM/aW5B0FKKbl0tOBuih7WeznsaQo3BmR68r7yE9NF4f/eOb +9VG4ferooGmkHu5UYHhzzIbD2HDjADtVD2PsNsmt3hwOLmdt+y9W66HX1UrF +w7xhwJrc3ePKo4+cPgFBHWUhIFpvld+wWh/DdBxTBXNDYPK08iFpfn28qCZ7 +1f9cCGTLTq3+IKiPwllpfnqBIfB3W5TZIYo+NovorvVUDYEH9ekVCRr6ONea +YvHhTjCYJDWmsZ31kb/k8a/0ssNgoSC+mS9fHytybFpV64KAmHgou7tAH2sk +6tgj2UGgUB0yX3dTHz/PPiy4HRcEK2y6cvYW6+Nsv4Rn6OYgaA5K+NFC6GP1 +atmlX6OBYFw/mxn5iByfF6lC8AeCvtOLsU/j+jiZXO6YGXYANsQkH202MMDd +L7Pv1R3bBw2MwpV2dAMUrtXcoOG3Dxx/PsjoZRqgwZ7Of9V2++Bo4Nzdzybk +++5a6aso+6Dd3WuU384AL59TfnKxfi/sNdK32ellgHta5KUP//WHoh+jUrOJ +Bvi9c8y9KWMPKPsZPVAcMsBvC6pTv374wjk5+8W4YXI+jdVDwSO+MPvWR2/s +jQGqzL5vWnzqC41uKcXZ7wyw4ESih0GRLzg5vs0UmzBAm82uHT5evhDBiD/E +w2GIbsE+nyNe+ED7uheyE4qGuOmxc9ieRm/wa9x7ijhsiMEf4097nPSEyYNf +wy1CDZH7XMKzSm9POEo9sL8vzBBzJIf7lE08ITk6yGkhyhBfvYt4eZDDE8ro +YTLMBENcTeRyO8d4wJ+quIaWLEOsrgxWvxi/CzJKs2dfthiizO4D18wLd8KD +3J7d0yJG+NfhQk2b7g4YsZP1DBM3wt7KvkseUjuA49dB19+SRtjV8lKSn3MH +mG7hsl8pY4Sta2wfs7u2Q9syuoGEshEKLbY8FDuwHTp9cnhMjI0wbnLAXLvI +BYYUAkrS9hgh5ZOQuq6uM8ze/vdTo9oIt4/f9ruR5AQfXSxzk2qNsKJQYHE6 +zAkGVpy1fldvhII09p4tu52g3kvyyqUmIyS28F40BSc4Ka5HX+owQtd5xzfj +c1tAIDEg+vGwET76IPLXec8WUPXv5fDjpOOMa22n3FZHoIlQihpX0PHAqvaZ +EFNHEGjx2SLORccopu7uHi1HmKFN5T1ZTccUDp3pZgFHqOvjNdMWoWNzbdSr +O9kOYG2J8f/W03GlYYTmmWx78FUs5snaTMdbiyptnIQdRD70CFBypOO1f5lv +Os7bQZqf4JMKJ/L7OLtjykPsoKEwIuXJdjrabDozPapjB8JK1muXvOno57Lm +UGulLbQpfRD2CqNjiTs9JvyBDShvkJZRyqFjYNyttr4v1oDtL2Mq8uj4uSCk +NOKpNbjsTRg1LqBjdH53g1G5NcTdnsjfXkTHu7xJrwUirGF4Q4NiEpuO2wI9 +d4vzWkPqRleV8Ud03DCzUTNMywqmlc/rV0zR8fBbRtX9CxYw0IkWQjPk/u5m +TUces4CmwMmtoXN09PjP4639HgtIrdh0WH+RXO+y96fohhagTOe4W7ecgUeE +fN7QXpuDz6aDsi2iDDw/rqO8WsUcevyt1vQwGSidr/Poe58p1PPMSeoB6aOq +ox7NppBfnL/xkgkDL0jXuI/dM4VD35csd1gysMyzVUsp3hT4wonYYQcGtp8S +8s/RNQXLBNmf730Y+K/It9k60wRqCn6PziUyUCfO5u2/AAR9s9CfNmcYWGDp +9lPXFaFydHxN7lkGfq3NuhZlhVBBe2Ngk8HA4L66LSwFhLuXm85mX2Wgl1xA +tOx9gNyUeCOrEgZqVn/h7L1rDEmha9MvdzNwXjJwaGUhE7iFEm9O9DJwWCZ0 +9Eo8ExLKORpMBxgoGhrkvnkPE05NTn8cH2bg3uYZY8ENTDi+t4dp8pGB+60O +lArcY0Cw+5XPXxYYaPkkzaa9gQ5u5vLIoDGRy+7i1z0/DGGph5u/RYaJaSnd +PO49hpDrN/nKRp6JR9IdTIKrDOFjQm242wYmSu1KC18WZQjBHQ6lEdpMXGqY +iL610hCS7aNpNZZMJFBfel7GAOp29P7RDWKiVXcV0RqoB7u+1D1uOMzEuIVz +ornb9IAjMveyeSgTd9VcrbpM1wPLq/t1t0UwsYdVxBxdpQcvXy87EBLHxCqh +NL3OXF346qP+qjyTiZ671V5ODeqA1MHTtepNTMy3j/Iq99KG1H979M40M1Gt +dN+tWFtt4MywLP/UysS8703ee/W14WvVyqLcDiYOdx1/dXSNNtRxnLos2M3E +EwudGTdqtcDtQkz4/Acmdsv5PuQT14LL9RF6jatZWBgfctOuQwPW2LuWS/Kz +8GDowBp6gQbEjBiqhQuwMMspycrhhAbsXbmgoCnCwsFJodwpPQ0wcAgTzqex +0N/zZhlvoTr0jQXPxGux0JBbyT4qWQ1EeA+Ub97OwsSpi0/tDqtAgdmxyClX +Fq4viJpT3qwC2sdSzc67s9ArJINLb6MK2E+V9Q54s/A0Tm3sHFWGhL65X74H +WGhRfEd9mbMyLOSfMI2MZaH2jbmVu8w2whDjfPfNYhamh7cFXjVeD3uPFFzb +VEKuN8Jn4Zr0epgvqfQbL2MhvEy638qxHgTlBn5qVbGwNG3UIaFFCWy5qZT7 +TSx8vPn8TKeNEjT03Nzd3cvCfWxPwsxLEWz4a9TCBlg4V9ux+aKZIgxYdcyL +v2Kh3chYMu96RZit+5boMULu52yxg+ekAqjlad778pWFnyxmbt87rgANQyZh +KRMsbH1DWSHuqwA2wltBY4qFp0RXtBVYKcCe00dehM6x8LZq2JjCOgWYbUrI +Eltg4dXiS9/F5uXh5GKmb90iC4We5rSrvpIHAd0i1V1LLCwSZFr5NslD9sG6 +uX//yPn4mBb1hfLwP8XVUTQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0818847147197918}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0818847147197918}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4lF8bB3BpsRTJvsyMXWXfl1nct10IKYpkTUpFIbJUJEISWpTKFpWU +bR675IdEKZVdKrQXIktS6n3ev+b6XDPnzDlz7vt7npH1CXLy4+Tg4Ni/jIPj +/6/zbzpaFc4UGHtpBWTUzVsZ92SLR5gMnITAFueXgb8VAUW6fMQHMoB/rd05 +xm89CHO80798IB92e3ubiv62gHWTYhm/+itAsPHZZM+iM7xtsA+a7W+GkdSn +F3/98gNLha+vp/tfAnAejcqbPwK/+g0uTvWPQYrhf9ccv8RDi9mtghf5M7DQ +H+z6OPMSUN7WfvRRXQI543nzj7G5IHzA8w6X2XI0wIGsvw6FkKFlWW/vzI0d +O8uWRkXvwOBlzaZpAT6cdJQWmVtbAlndxWvDFPmwfaHOn0+mBNz413suGvHh +tWORrVKaJTAcR/3L6cuH/gG0FEnHEhgJ5GUKV/Kh0i/Wu5xzJfDZ/H21vis/ +vj7Ly2pbUwoLU5mlUXlrscbzrZz/v1I4U3Cii1NiHWZmxYpfGysDG919giLy +63BrjFgn40sZcLc6Oa9XW4f5ea42fd/L4NQ7xVe2JuvwZEZ/3u8/ZRAt1/nx +wr51mPtlWRaXWDkE5or/Vapbh+kCPPnyNuWw5Vq5qu1OQfzPNEZ3991yEFC9 +GrTLTxCtvqX9dasoh2f1pyqCggTR2InnkF1NOdi82m54IU4QbSKjLKRby8FU +8q/Z62JBDAhZlnfqVTnoXrbZGfRHEFfc1t+xmacCxC68Szp/XQjHxa3whVcF +iKtUnlq4KYSU+7TTTX4VINmccGJXmRCuKWhbVxxQAbSpjUfWtwjhUkfm1OHQ +ClC0O+RV/1kIk6vlH7WdrgCdFUv673SEcef0pSMp9yrAIVT0vfZjYWSvDVeP +n6sAx9Wf32R2C6PJoJLi8K8KcMqvHfwzLIzy3otb1f9WgMtz966278LYbkZx +bV3Fhl2qN+rcREQwdNn631VibNj/XiP9pJcIlqy9G1JlyIbT2zYZv5wXwVTW +MmtqOBskiWeSnMtE8eD34HiVKDaUCG37qbVaFI3b/KR1T7Ch76VHWbq0KI7v +Hd6re5oNCltC5bZYi2IEZdnW6UtsaN6cs+r5FVHcdSb8gnslG5Ys5549ZYqh +0N9HA78m2JB2M7J4yVIMbWS63mydJsev4khU2yKG+rvbLW/PssHuIa/JWT8x +fJc9wcLfbMgyk2HbpYphiJN4tyo3AYZom/nkrRjKJc9PL8gQEGKU59lxUhyj +LxTYe9kTYJPLP2ubIo6/NV+HDzkSIMcVnfjsojjmxAZ2OGwl4HmPS3n3bXHc +HF73SWUHAeqH1ix/80wc7/cYydzxJuDzzfCbPyQlUEZmmuNBCAEP+D7QjyhI +4EpR9ZlvRwi4FOrU9VNNAm+8EhETPkqAhanawh+UwBRa5LxzNAH5r8c2cflL +4DYbbqXcUwS4C9tPSLElcF122aj9BQJ0oupjsxsk8GBnGWhcIoB3bIOobJsE +yplGD/FeJqC2dDkoDUog17qoDvZVAkRta9M0/0kg7C3I78wn1x+roGthK4kp +3LUzkmUE3Pqc3v5omyQW+jREl5YTcNzhn7uNhyTKmR9wADYBatSheIfDkvh5 +3KLXsYqA5Jpz/a6ZkliRfzCK0UCA+ffFyMB3khieEvZb4xEBEdYXlP8bl0Tj +CyqSIe0ElOSpDQnNS2LllaQH5R0EiG/zMqrllsK28Q95sp0EjNc8/LlcXQpv +qP968+Q5AbKCnrdcDKRQiPOh3bcXBLjsX3ApQin0jy62XtVNQBNVpcp+qxQ2 +XLg+qd5LwPmTaaFXjkrhFncWv+0gAe2vNiqMx0qh5orfXFZDBPzRbek2PiOF +jzgKMo1fEbDn05z2++tS+FC6IVrmNQF0u53T6i1S6KMRElk6QkBQ4WxubKcU +HjzxHRJHCSj4e9axp1cKLVfE33AfI4C/vKk04rMUpo+obVp4R8CYiFJgKx8F +c7oVVX9/JEAs6AFVTIyCC5UCHOWfCLBr3/F0nwwFk5ZnR/p8JqAq8ozqWh0K +emv+86/5QsC3boVhbyYFn2qveu3+lQAZtcYzhAUFO9+LLP0hnfx26qvrDgr2 +Dbaaao6T9WSYnHXXm4IpDvkBLaRn0+Vt/gVQUHVghanTBAEe5i5FBccoyHXl +/XLfSQK0i+r9v+dTcDOozDpOEeDP6SxmepeCxhLmNf+RvrZzsu1CJQXdtCh6 +6tMErOKXVaK3U9C+qWnXImmGf11vygsKbnn9bbXbDwIONW2NfztEwXcnz4dX +kh4KTnh/aoKCTWYKKZ4zBKztlL7QP09BZmaYQQlpc8VaM2UOKuaOihUukI44 +7jQTzUPFWyuwz3iWrI/+b/ldglS01tjQGUP6nWa8kxyFig3DvImNpMWTaZxH +FKkY0i2/eoG03bvq8kfqVJRUKHNRmyMglrnFW9KQiuc3TO73IG3tkf3DwJSK +ax+v/pZKmj/mW5yzHRX/NnaF15HuzTMUCXGholhrr9Ao6Wst8TfTvKgYtKO+ +iXOeAN8PLw1KAqj4s146Rpq0MpdMx5NQKn6ZuLHVgPT0hoNuX45TcVPxV6YN +6Rqbum+rkqjodPAyawfpEwe4jimcp+JX/63bvUlbpm7jN71ORUpiyxk/0nxl +eTmet6gYF5wxvJt0z4tJzWPlVGyO3W/rSfrqDKM5q56Ki62/B7eR9hFJ2lrz +kIob/04nWZDeaND3vreLipW5f921SE/tkA+bGaTi/a7ubeKkqyMPca17T8VC +d8WQRXJ/x6/dv6w+Se7v4e3aftIWjbzKdgtUNNIRUS4jvWZke/0+ThpmHZVv +iyPdvazQ7vQaGlIEUs85kc6S//G6QJSG+ZLrEimk1/uncIwo0/CkqStfPnke +k4mD6Uu6NFTszr6+izRxR0leCmioWrfkK0zadLLJwmUrDZttJbNCyPPnEeDv +D9lFwzl3Pz4K6edaO/em+9OwMPX9/QdkPXkcmUvujKLhfqL49QJZf4qZppSv +8TQM7TrrmDr9/7w4d48rjYZ3nQe4pElH/tn43LSAhteNx220yXo2oYV7e5XQ +0MTZfYj4TgA3tv44VkN+nnGyUpv0xTgPkdpOGnZ92OwiQ/aHe2Hxzb4+Gj6t +uimdRvaP3KMFg9kRGg4GSjF/k/1VxnveTWOOhskHu460fCOgM/1RTiFVGj98 +mpOhkP17ni2s1bJeGhNPV1fvIfvbrde7eURLGo9XFpXdJfv/s/if91KW0qig +2/ZcmcyH5bmayhmB0vjlSOO/72Se0EuuEMcfSCNlh0tnDplP5v3PlibbpfGK +2kRmBZlf9hwrrDxfSqN15p2I/8h883UKHIQP0riZWyKhu5+sryjZEzErZVBw +OnqqnczHQ9LzN0xUZNBZMix68TEBc+y09l8aMlg8eyaoi8zfSGuViXJdGZx8 +yDyfS+Zz/GEvfTljGUx/oh5i0Eaed8vjds4tMugi1dZq8B8Brf45Ey1hMpj6 +y1vtFJn/m/4YCUZHySB9Q/I8pZKAZ2k9+roxMrg9uXp1BXlfDNbyxBQkkfOb +UmRfkPfL5OpQwfhrMlgoILbx3R2yn8usDSybZXBM+IfhjmwCDixMx7TzyaKj +7dRwxkny9zi8R/SjoCzO5YpfT4shz+/rUPFycVkUfcBjlXycgMJXLX3GcrJo +lnfP+3AkAW8aL6pW6pPjpblm+YMJcIg3GsjzlMXexnO5SV5k/gnGakSVy6Lc +4WMfz9IJ4Dgz13q5ShYFDXtO8BmS618e4FZVL4sxPD8dkvQI2D/nFD/9UBaD +PkZmH9Ek839A4ZX/kCxmENeNZJXI+zSnPWHbcjm8NDx4vk2AgF8qAm/UnOVw +fUWb6853bJi/Lhmr4yaHlISg46EjbJhdq6hg5CmHYhFMm+TXbJicMQow3yeH +o4c+jhT3s2Gs3nfe7ZgcGuxfZ//oCRse21bzJxbKoaaKhKU3m3x+2e8BY3Ny +KFSeWq0dwwZm8d3cS5fksezeH51eATa8kinOsbgqj5X3vhUF8LEh8lJR9myO +PNYMmTxY4mFDdezNa05F8pjPbfScspwN2jtyL/M3yGMsfaLFmHwe3LjyQlrC +qDxqx52uFhqsAFHPqJgwVQWsddj/e21OBUwL2ni5NCvgk8cd7i0KFfA+xcsl +mEsJbzb9zfjJWQ6bvodv+qC/HtmUyueTdaUw7ssdQpzYgE/r+7+YS98j/2+I +cZ5u3ohZYcM03tg7IPhUKbXsuzLK8vlo+wjcBkpiqaO+virGjNbtYh8thMsq +RgJC/mrY2rb8YJX8DXgsaaI3k66OoYIeHrI/c4FOaU7T6NNA1zMb2zzjrgP/ +8vxQ75Oa6BTrRqMTV4AWK810VdLC8/+Sb8LUReBRdK9yeqSFQ2kqe/iyM0Cd +JVEavksbHzS/2/2cOAfBbwRbbDh0cJlyqU5yQDJ8n0lx3nRZB82Lq/SOSSWA +lUZb1iY1XWztXF/ADDoJjTOM3z+f6eKL8mORYdzHIVBVe+iFnx5ysRcln2cf +hSM/JRc99+rhCM/aW5B0FKKbl0tOBuih7WeznsaQo3BmR68r7yE9NF4f/eOb +9VG4ferooGmkHu5UYHhzzIbD2HDjADtVD2PsNsmt3hwOLmdt+y9W66HX1UrF +w7xhwJrc3ePKo4+cPgFBHWUhIFpvld+wWh/DdBxTBXNDYPK08iFpfn28qCZ7 +1f9cCGTLTq3+IKiPwllpfnqBIfB3W5TZIYo+NovorvVUDYEH9ekVCRr6ONea +YvHhTjCYJDWmsZ31kb/k8a/0ssNgoSC+mS9fHytybFpV64KAmHgou7tAH2sk +6tgj2UGgUB0yX3dTHz/PPiy4HRcEK2y6cvYW6+Nsv4Rn6OYgaA5K+NFC6GP1 +atmlX6OBYFw/mxn5iByfF6lC8AeCvtOLsU/j+jiZXO6YGXYANsQkH202MMDd +L7Pv1R3bBw2MwpV2dAMUrtXcoOG3Dxx/PsjoZRqgwZ7Of9V2++Bo4Nzdzybk +++5a6aso+6Dd3WuU384AL59TfnKxfi/sNdK32ellgHta5KUP//WHoh+jUrOJ +Bvi9c8y9KWMPKPsZPVAcMsBvC6pTv374wjk5+8W4YXI+jdVDwSO+MPvWR2/s +jQGqzL5vWnzqC41uKcXZ7wyw4ESih0GRLzg5vs0UmzBAm82uHT5evhDBiD/E +w2GIbsE+nyNe+ED7uheyE4qGuOmxc9ieRm/wa9x7ijhsiMEf4097nPSEyYNf +wy1CDZH7XMKzSm9POEo9sL8vzBBzJIf7lE08ITk6yGkhyhBfvYt4eZDDE8ro +YTLMBENcTeRyO8d4wJ+quIaWLEOsrgxWvxi/CzJKs2dfthiizO4D18wLd8KD +3J7d0yJG+NfhQk2b7g4YsZP1DBM3wt7KvkseUjuA49dB19+SRtjV8lKSn3MH +mG7hsl8pY4Sta2wfs7u2Q9syuoGEshEKLbY8FDuwHTp9cnhMjI0wbnLAXLvI +BYYUAkrS9hgh5ZOQuq6uM8ze/vdTo9oIt4/f9ruR5AQfXSxzk2qNsKJQYHE6 +zAkGVpy1fldvhII09p4tu52g3kvyyqUmIyS28F40BSc4Ka5HX+owQtd5xzfj +c1tAIDEg+vGwET76IPLXec8WUPXv5fDjpOOMa22n3FZHoIlQihpX0PHAqvaZ +EFNHEGjx2SLORccopu7uHi1HmKFN5T1ZTccUDp3pZgFHqOvjNdMWoWNzbdSr +O9kOYG2J8f/W03GlYYTmmWx78FUs5snaTMdbiyptnIQdRD70CFBypOO1f5lv +Os7bQZqf4JMKJ/L7OLtjykPsoKEwIuXJdjrabDozPapjB8JK1muXvOno57Lm +UGulLbQpfRD2CqNjiTs9JvyBDShvkJZRyqFjYNyttr4v1oDtL2Mq8uj4uSCk +NOKpNbjsTRg1LqBjdH53g1G5NcTdnsjfXkTHu7xJrwUirGF4Q4NiEpuO2wI9 +d4vzWkPqRleV8Ud03DCzUTNMywqmlc/rV0zR8fBbRtX9CxYw0IkWQjPk/u5m +TUces4CmwMmtoXN09PjP4639HgtIrdh0WH+RXO+y96fohhagTOe4W7ecgUeE +fN7QXpuDz6aDsi2iDDw/rqO8WsUcevyt1vQwGSidr/Poe58p1PPMSeoB6aOq +ox7NppBfnL/xkgkDL0jXuI/dM4VD35csd1gysMyzVUsp3hT4wonYYQcGtp8S +8s/RNQXLBNmf730Y+K/It9k60wRqCn6PziUyUCfO5u2/AAR9s9CfNmcYWGDp +9lPXFaFydHxN7lkGfq3NuhZlhVBBe2Ngk8HA4L66LSwFhLuXm85mX2Wgl1xA +tOx9gNyUeCOrEgZqVn/h7L1rDEmha9MvdzNwXjJwaGUhE7iFEm9O9DJwWCZ0 +9Eo8ExLKORpMBxgoGhrkvnkPE05NTn8cH2bg3uYZY8ENTDi+t4dp8pGB+60O +lArcY0Cw+5XPXxYYaPkkzaa9gQ5u5vLIoDGRy+7i1z0/DGGph5u/RYaJaSnd +PO49hpDrN/nKRp6JR9IdTIKrDOFjQm242wYmSu1KC18WZQjBHQ6lEdpMXGqY +iL610hCS7aNpNZZMJFBfel7GAOp29P7RDWKiVXcV0RqoB7u+1D1uOMzEuIVz +ornb9IAjMveyeSgTd9VcrbpM1wPLq/t1t0UwsYdVxBxdpQcvXy87EBLHxCqh +NL3OXF346qP+qjyTiZ671V5ODeqA1MHTtepNTMy3j/Iq99KG1H979M40M1Gt +dN+tWFtt4MywLP/UysS8703ee/W14WvVyqLcDiYOdx1/dXSNNtRxnLos2M3E +EwudGTdqtcDtQkz4/Acmdsv5PuQT14LL9RF6jatZWBgfctOuQwPW2LuWS/Kz +8GDowBp6gQbEjBiqhQuwMMspycrhhAbsXbmgoCnCwsFJodwpPQ0wcAgTzqex +0N/zZhlvoTr0jQXPxGux0JBbyT4qWQ1EeA+Ub97OwsSpi0/tDqtAgdmxyClX +Fq4viJpT3qwC2sdSzc67s9ArJINLb6MK2E+V9Q54s/A0Tm3sHFWGhL65X74H +WGhRfEd9mbMyLOSfMI2MZaH2jbmVu8w2whDjfPfNYhamh7cFXjVeD3uPFFzb +VEKuN8Jn4Zr0epgvqfQbL2MhvEy638qxHgTlBn5qVbGwNG3UIaFFCWy5qZT7 +TSx8vPn8TKeNEjT03Nzd3cvCfWxPwsxLEWz4a9TCBlg4V9ux+aKZIgxYdcyL +v2Kh3chYMu96RZit+5boMULu52yxg+ekAqjlad778pWFnyxmbt87rgANQyZh +KRMsbH1DWSHuqwA2wltBY4qFp0RXtBVYKcCe00dehM6x8LZq2JjCOgWYbUrI +Eltg4dXiS9/F5uXh5GKmb90iC4We5rSrvpIHAd0i1V1LLCwSZFr5NslD9sG6 +uX//yPn4mBb1hfLwP8XVUTQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0818847147197918}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0818847147197918}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357008619701*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"dfb6947f-1258-4dd7-b0cc-dcb49d38800f"] +}, Open ]], Cell[CellGroupData[{ @@ -10593,66 +12194,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[282]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], + "In[119]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.443621462424051`*^-173\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 282, 273, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269930374*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8927467000720286`*^-141\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 45, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994357008681026*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], +In[119]:=",ExpressionUUID->"06989008-9bc0-498a-9e58-51c63e3cdb8c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.352709009016139`*^-176\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 282, 274, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699413757`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4512153411045304`*^-143\\\", \ +RowBox[{\\\"990359217009531794717859144615427415897\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0373833891840000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 46, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994357008692675*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], +In[119]:=",ExpressionUUID->"334dc72c-f093-4e89-a591-d09a29ebf49f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.488155146821548`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 282, 275, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269949375*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.228033457848481`*^-145\\\", \ +RowBox[{\\\"393073573231083169323518294497863141369\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"96\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3746716712960000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 47, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994357008703443*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], +In[119]:=",ExpressionUUID->"563d8a5e-18b0-4b35-92d1-2f63570a7461"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 282, 276, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699573765`*^9}, +during this calculation.\"", 2, 119, 48, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994357008714573*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], +In[119]:=",ExpressionUUID->"79e4ec56-d6c4-4b36-9db2-4e7fa1cb9245"], -Cell[BoxData["9.332200719005147`"], "Output", - CellChangeTimes->{3.9913372766841774`*^9}, +Cell[BoxData["9.131390631799734`"], "Output", + CellChangeTimes->{3.9913372766841774`*^9, 3.994357107974008*^9}, CellLabel-> - "Out[282]=",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] + "Out[119]=",ExpressionUUID->"4a795250-5f85-498d-b526-502a3f1a69bd"] }, Open ]], Cell[CellGroupData[{ @@ -10719,68 +12327,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494640512295`*^9, - 3.991849468375696*^9}},ExpressionUUID->"53e25fab-b431-cc42-a467-\ -e4dea0353ed0"], + CellChangeTimes->{{3.9918494640512295`*^9, 3.991849468375696*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 277, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767181473`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.844365757162284`*^-201\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 49, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357108027917*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], +In[120]:=",ExpressionUUID->"8129d402-bdfc-49a5-9d32-3d9b3d02abf8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 278, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767281475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.803949783772331`*^-205\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 50, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357108036339*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], +In[120]:=",ExpressionUUID->"8d138cbe-7d58-49a7-8f77-ad6d327e2140"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 279, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767351475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.002265145877267`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 51, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357108044775*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], +In[120]:=",ExpressionUUID->"075cae93-d52e-448b-89ad-d67687b25303"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 283, 280, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337276743145*^9}, +during this calculation.\"", 2, 120, 52, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357108053925*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], +In[120]:=",ExpressionUUID->"0ab8af09-5a17-4d67-9419-fd2ab14c442c"], -Cell[BoxData["0.5406905105605413`"], "Output", - CellChangeTimes->{3.991337284091696*^9}, +Cell[BoxData["0.37115234486640886`"], "Output", + CellChangeTimes->{3.991337284091696*^9, 3.994357118540248*^9}, CellLabel-> - "Out[283]=",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] + "Out[120]=",ExpressionUUID->"2dbb0ce5-000a-4359-8f44-1dbfbe8ab165"] }, Open ]], Cell[CellGroupData[{ @@ -10801,8 +12416,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10847,68 +12461,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494737320137`*^9, - 3.9918494774550457`*^9}},ExpressionUUID->"b18c819e-620a-d449-97d6-\ -547e3a6fa152"], + CellChangeTimes->{{3.9918494737320137`*^9, 3.9918494774550457`*^9}}, + CellLabel-> + "In[121]:=",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 281, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284131695*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.844365757162284`*^-201\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 53, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.994357118596575*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], +In[121]:=",ExpressionUUID->"ec4a991f-a86a-47b4-a03b-6256b4f2d180"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 282, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284142767*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.803949783772331`*^-205\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 54, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.9943571186062*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], +In[121]:=",ExpressionUUID->"00f875cb-cce7-4866-a713-831bb8ab46fd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 283, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284150778*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.002265145877267`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 55, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.9943571186145487`*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], +In[121]:=",ExpressionUUID->"c13c8bd3-ab03-4baa-83cd-6be03418b315"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 284, 284, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372841597614`*^9}, +during this calculation.\"", 2, 121, 56, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.9943571186231833`*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], +In[121]:=",ExpressionUUID->"e3f5fbd6-bd03-40dc-aa89-6c49e46a3faf"], -Cell[BoxData["2.9943030245183917`"], "Output", - CellChangeTimes->{3.9913372907074146`*^9}, +Cell[BoxData["23.548490180737566`"], "Output", + CellChangeTimes->{3.9913372907074146`*^9, 3.994357128590599*^9}, CellLabel-> - "Out[284]=",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] + "Out[121]=",ExpressionUUID->"b1c47100-3015-4ca7-b383-1df28dca77f2"] }, Open ]], Cell[CellGroupData[{ @@ -10929,8 +12550,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10975,68 +12595,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849482271084*^9, - 3.9918494852683945`*^9}},ExpressionUUID->"22ab74c7-5916-9440-9d7d-\ -c3e0f6ab8836"], + CellChangeTimes->{{3.991849482271084*^9, 3.9918494852683945`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 285, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290744484*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.844365757162284`*^-201\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 57, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994357128636681*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], +In[122]:=",ExpressionUUID->"d74d1567-ffe8-4526-b2d4-af7a976c2847"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 286, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290753483*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.803949783772331`*^-205\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 58, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994357128647176*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], +In[122]:=",ExpressionUUID->"11c461c6-56f5-4230-83de-97777b9eb657"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 287, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372907615204`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.002265145877267`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 59, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994357128655878*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], +In[122]:=",ExpressionUUID->"86bfb06d-b71a-4581-97b9-5d8068cd63d4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 285, 288, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133729076952*^9}, +during this calculation.\"", 2, 122, 60, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.9943571286631947`*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], +In[122]:=",ExpressionUUID->"bbf37f9e-d057-4ee0-a408-49e4a48af28e"], -Cell[BoxData["16.72305770548981`"], "Output", - CellChangeTimes->{3.991337294569908*^9}, +Cell[BoxData["2.938636768023697`"], "Output", + CellChangeTimes->{3.991337294569908*^9, 3.994357136734317*^9}, CellLabel-> - "Out[285]=",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] + "Out[122]=",ExpressionUUID->"62e6d775-100a-483a-9ea3-3b7970a5b54f"] }, Open ]], Cell[CellGroupData[{ @@ -11045,22 +12672,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918494889040737`*^9, - 3.9918494971484394`*^9}},ExpressionUUID->"f9c66987-c237-7a40-a006-\ -e20e260dbdcb"], - -Cell[BoxData["0.07640873836855284`"], "Output", - CellChangeTimes->{3.9913372946009064`*^9}, + CellChangeTimes->{{3.9918494889040737`*^9, 3.9918494971484394`*^9}}, CellLabel-> - "Out[286]=",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] + "In[123]:=",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], + +Cell[BoxData["0.04461672831612827`"], "Output", + CellChangeTimes->{3.9913372946009064`*^9, 3.994357136786487*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"8e6441e0-85bc-4924-a4f2-3bab72c85493"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918495000311985`*^9, 3.9918495029810333`*^9}, - 3.9919248636163254`*^9},ExpressionUUID->"770a9ed7-7938-9e48-be64-\ -c31719ef3a6b"], + 3.9919248636163254`*^9}, + CellLabel-> + "In[124]:=",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ @@ -11083,12 +12711,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[288]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], + "In[125]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[BoxData["7.13574266196526`"], "Output", - CellChangeTimes->{3.991337294629921*^9}, +Cell[BoxData["9.575352120748407`"], "Output", + CellChangeTimes->{3.991337294629921*^9, 3.994357136810257*^9}, CellLabel-> - "Out[288]=",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] + "Out[125]=",ExpressionUUID->"c6f10550-fcac-4a33-b799-ace1f520daea"] }, Open ]], Cell[CellGroupData[{ @@ -11098,12 +12726,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[290]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], + "In[126]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[BoxData["1.4042291233212119`"], "Output", - CellChangeTimes->{3.9913372946629753`*^9}, +Cell[BoxData["2.0209879158318365`"], "Output", + CellChangeTimes->{3.9913372946629753`*^9, 3.994357136823771*^9}, CellLabel-> - "Out[290]=",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] + "Out[126]=",ExpressionUUID->"d77de619-afd9-4255-b8e7-57e54a2878e6"] }, Open ]], Cell[CellGroupData[{ @@ -11113,12 +12741,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[293]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], + "In[127]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[BoxData["10.020217662457247`"], "Output", - CellChangeTimes->{3.9913372947367725`*^9}, +Cell[BoxData["19.35167092586728`"], "Output", + CellChangeTimes->{3.9913372947367725`*^9, 3.994357136838678*^9}, CellLabel-> - "Out[293]=",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] + "Out[127]=",ExpressionUUID->"9554a268-e990-4350-9a0b-506184abf67d"] }, Open ]], Cell[CellGroupData[{ @@ -11308,12 +12936,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[294]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], + "In[128]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[BoxData["0.06674599726273667`"], "Output", - CellChangeTimes->{3.9913372947513313`*^9}, +Cell[BoxData["0.008647645389249203`"], "Output", + CellChangeTimes->{3.9913372947513313`*^9, 3.994357136857356*^9}, CellLabel-> - "Out[294]=",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] + "Out[128]=",ExpressionUUID->"9b5e85e3-9763-4cc2-819d-52727369eb81"] }, Open ]], Cell[CellGroupData[{ @@ -11327,12 +12955,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[295]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], + "In[129]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[BoxData["3.430301770911147`"], "Output", - CellChangeTimes->{3.9913372948636913`*^9}, +Cell[BoxData["9.530068110327491`"], "Output", + CellChangeTimes->{3.9913372948636913`*^9, 3.994357137014887*^9}, CellLabel-> - "Out[295]=",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] + "Out[129]=",ExpressionUUID->"b298fe38-13c9-4d8c-a47b-75986708667e"] }, Open ]], Cell[CellGroupData[{ @@ -11524,12 +13152,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[296]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], + "In[130]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[BoxData["0.01266539131451536`"], "Output", - CellChangeTimes->{3.991337294877693*^9}, +Cell[BoxData["0.051018386511743466`"], "Output", + CellChangeTimes->{3.991337294877693*^9, 3.994357137033164*^9}, CellLabel-> - "Out[296]=",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] + "Out[130]=",ExpressionUUID->"6d656ac0-d563-4297-9589-9cba4fc22efe"] }, Open ]], Cell[CellGroupData[{ @@ -11543,12 +13171,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[297]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], + "In[131]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[BoxData["7.874729317258519`"], "Output", - CellChangeTimes->{3.991337294976324*^9}, +Cell[BoxData["3.923571586774411`"], "Output", + CellChangeTimes->{3.991337294976324*^9, 3.9943571371981707`*^9}, CellLabel-> - "Out[297]=",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] + "Out[131]=",ExpressionUUID->"7264b8c3-b6dd-419a-a121-1017519c3185"] }, Open ]], Cell[CellGroupData[{ @@ -11641,12 +13269,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[298]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], + "In[132]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913372950022793`*^9}, +Cell[BoxData["0.04840187632890963`"], "Output", + CellChangeTimes->{3.9913372950022793`*^9, 3.994357137213416*^9}, CellLabel-> - "Out[298]=",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] + "Out[132]=",ExpressionUUID->"7f625baa-b385-487c-b510-5be13be5abd9"] }, Open ]], Cell[CellGroupData[{ @@ -11736,12 +13364,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[299]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], + "In[133]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991337295013279*^9}, +Cell[BoxData["0.9515981236710904`"], "Output", + CellChangeTimes->{3.991337295013279*^9, 3.99435713722768*^9}, CellLabel-> - "Out[299]=",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] + "Out[133]=",ExpressionUUID->"de58b406-228f-4a4f-8471-610b5b1957c5"] }, Open ]], Cell[CellGroupData[{ @@ -11864,12 +13492,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[300]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], + "In[134]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.991337295041279*^9}, +Cell[BoxData["0.046059134696750575`"], "Output", + CellChangeTimes->{3.991337295041279*^9, 3.9943571372463703`*^9}, CellLabel-> - "Out[300]=",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] + "Out[134]=",ExpressionUUID->"bc47af46-2443-400e-b639-b85d8935aafc"] }, Open ]], Cell[CellGroupData[{ @@ -11931,68 +13559,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849517192892*^9},ExpressionUUID->"55d51961-97f2-ed4d-8bf8-\ -8a461d652ab4"], + CellChangeTimes->{3.991849517192892*^9}, + CellLabel-> + "In[135]:=",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 301, 289, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950662746`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.73736708262692`*^-199\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 61, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.9943571372707863`*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], +In[135]:=",ExpressionUUID->"ed7f0094-7c5a-4d93-a595-63f81da79619"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 290, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337295076277*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.817890677194954`*^-203\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 62, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.9943571372814713`*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], +In[135]:=",ExpressionUUID->"d8a3e497-7882-4104-9955-7eaaddbd6d28"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 291, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950842743`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.883882342320423`*^-207\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 63, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994357137290998*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], +In[135]:=",ExpressionUUID->"4c262d11-58e4-400c-964d-a1a2c02a9aaa"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 301, 292, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950922775`*^9}, +during this calculation.\"", 2, 135, 64, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.9943571372999773`*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], +In[135]:=",ExpressionUUID->"b6996cbc-ee3c-4fbd-b471-fcafa30c3d71"], -Cell[BoxData["3.430301770911144`"], "Output", - CellChangeTimes->{3.991337298790371*^9}, +Cell[BoxData["9.530068110327486`"], "Output", + CellChangeTimes->{3.991337298790371*^9, 3.994357144613524*^9}, CellLabel-> - "Out[301]=",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] + "Out[135]=",ExpressionUUID->"cb7475e5-17e6-467e-af50-3bddcb0e930f"] }, Open ]], Cell[CellGroupData[{ @@ -12054,68 +13689,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849520751028*^9},ExpressionUUID->"9704b9d3-b449-2144-9970-\ -6a7de047241d"], + CellChangeTimes->{3.991849520751028*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 302, 293, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988243732`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.73736708262692`*^-199\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 65, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994357144665703*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], +In[136]:=",ExpressionUUID->"29b2649b-b6fb-47a4-bc52-0f46bd56a9ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 294, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988343716`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.817890677194954`*^-203\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 66, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994357144675029*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], +In[136]:=",ExpressionUUID->"169c6bba-7630-474f-8943-179424b8a1e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 295, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988425922`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.883882342320423`*^-207\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 67, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994357144685166*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], +In[136]:=",ExpressionUUID->"ae891df2-ba04-41ff-b6b4-03dddb263978"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 302, 296, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988505898`*^9}, +during this calculation.\"", 2, 136, 68, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.99435714469516*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], +In[136]:=",ExpressionUUID->"41ccb71b-ce2c-4c95-86d5-d8f9fd6a784a"], -Cell[BoxData["7.87472931725852`"], "Output", - CellChangeTimes->{3.991337302457178*^9}, +Cell[BoxData["3.9235715867744076`"], "Output", + CellChangeTimes->{3.991337302457178*^9, 3.994357151916863*^9}, CellLabel-> - "Out[302]=",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] + "Out[136]=",ExpressionUUID->"155432f3-6196-4fa4-9414-07b863250f7f"] }, Open ]], Cell[CellGroupData[{ @@ -12173,94 +13815,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849523511486*^9},ExpressionUUID->"0fd90636-7592-fc40-bf9d-\ -ae1cb915c656"], + CellChangeTimes->{3.991849523511486*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk8VdsXAHCZM1TIXDL3CHHNlL1yDRGSKFPouvcoSUK6Zf4VKmNS6r1Q +JPJQ5rGeZygPITSrcJAo83R69fx2f5zP+Xw/+5y11zp7r30UGKecWJwcHBwT ++Pp1P92ttb2mt9tswH87zzd5EplN39NnWBQjPSPeXb88lGOQoWzRiNbGsod+ +2ZH5nFdItw3xRszNT2OXsaNbeCy6UCjff8Gz2JefSjVFF71AKb+3+sxj1/We +zv5Be4m47S0bF7En33VEnGt4gzJNY+JWsGXGlDyW6YOIcelM43fsfTMRxiFd +n1Clu8rR/7Cf/JgUZBcNI7VPqSGcCiR6FSsZXh1IorPWVQu82NO8FpOLtDHU +1HF9WBCbNynITXdlHFnk6+wWwZYTyWo/3TCBkqUu80piO8gu35+mf0VPvpwY +UcIm7ihKaPJPo/nRlUV17GiV/XEnumZQYAWcoWG/kRzQCS2aQ7+bCfxljs10 +9z9+LWkenW1OvLQPe/Y2x93ywAW0qbDzL2dsfkXNTXO0JXTO59LZY9gZzBbr +TeLLKFqZdzUYW77ALXrnyjIK17AYj8Q20oifPtmwisKVuYSuYx8z+NQ1Sf+B +orJuR7RjL7LPcAuo/kQcVhonXmHHNAjuUuP/Dz2aj3k2in0TjP7061pDalsi +/uFUxPnlt1sEF62DDq3ueTp20dNrQ7GynLDs9Pt+F+zZz14RV5M44e0VHRk/ +7Aj1pYpHgVwgdbd1NRE746GC0gyNB4wjbrx/h/2u9+uT//J4QFtr4P4Mtvx8 +jfsGcV5odBr9xK1EomI9h3TNFV5I4Y35Qxu7te78uoAGfghuaTZKxl5q6f80 +QReCGtFQIQ9lEonaCW0KfyIEkawfwuewtQcsQNhYGBgDJWmZ2P6jVXd0tDaA +83i69CvsIM4u7d1Cm4BKyTR2UyHRmGLpXNyyCCTbaVeeVcXfh+hY36MrCvzX +t/+Thc3557iC1GlRaPmL8G7Fltfd5lQ0JQqG/m0bxbaTyJ2eVt49JAaMk+Yx +1dg9vsEhkp3iMF1qmSuuRqKPBSmJPvwSYBDb3UXH/jpVlPfAUgK89NvYwdgC +oWS/aZMESDfxurzAtrjorOdTJQl2HirbrquTqP6ewVJhjjSwjeCHngaJ7o19 +DzMJ3Qrut8jplztJtNcl4WNIyVb4yFGnukkbx28VsyoZ3wobLRt6bLH17mmI +y7vJwf63B878jd3K8KrgMdsGS39IbazUIdH8zNDZiQvy0N7zILpUl0RiJy0q +K+wVIX2N9F81JNH4PYFjjv6KsLbXphuMSFQ72Cv7LV4RuhP25F3G9rQ7ckG1 +SRE0JKi7W4xxfjvCnG7RlODKj4l5axM8/2TBbJSkMmhycY5X7CKRs5+gpu2w +CjQf/rxjeA+JUJgL7fBP7IzxzQbmJFKPyzFkSqsC2MefSMTmyNM1jzqgCtbb +ao4a0klU8tHjcPnfqqA15hCcYYH781BxrEzuduA7/HW7rzXOz8L+1SRDDY7E +pXEetCdR3sHM9ytRamCyt6qgCjuFMTzE/YcaRF3kapBywPs75syUXL8a5L/W +0hjCFmnM4jhIV4cObrpxqCPeP7rT6g1KO+BM1f84yw6SSFYxNTpxVAM2xwWG +RLqTqPHKohrFqQm3K7eErmB7LrgNEAqa0FyjvHLag0TZrcpq5l6asH/G8+Ix +TxIp+tX3rb7WhN9y1Rs9vHC9xWMqRKcWOF/UL3BnkGirrBwh76YN7d302/X+ +JNLIDxX6F9HgvGNYLnckiRjMC0uaDjRIirogfR37plL6Rx9PGpgHNnCpRpGI +K/fho6dsGgw+f6pjE437LXvSOb2MBn/bCC5lxOLz9KZPlpqSLigNuMmZx+P1 +TbTTcuXVg9fMZM2FVBLdDVZ2rOrSB6vB2Xdl90hU/rEpUWpQHyq2zQ6dzCdR +s+2RZ+FT+tCU6BOkfp9Eo4o3zMwFDGB15fGO/AISqfbzafZYG0DToSTxu0W4 +n3Wn1n9pNoBxZuaT8kd4fRbLWrbUGYJBds+j3Y9J1BuGDC/mG8NbXs/oxdck +UvB66XAkYDcY3217+Vx0FLHWqku3ngMorhWXPH9gFElO1fJJMswB/bzAI589 +ikJ1dw2mq1uAeElFgOD0KGJ8+9EuNmkJzTP56UEWY6jEPIQvp8caZmZ+sIL+ +HEP3Fv3/Ls6wAT3LeafwzeNodY/U89boffA574ySd9o4+sDBNTd81B4qW/sK +Tm3+jAK3nEqLVdoPFzNTxXbe+oxKj7c3XY9zhDuU7qsx3Ql0fkF6ZcfxA6DJ +GPh4p3sCLdlaHXrm7QQOi6JjnbFfkLHH1T1jBw6CrKH2XNruSdQnneXfqusM +O68JVEeuTCKZ+xcaC39zgf4XZ0cmuqZQ7ZC6nYPwIVj/mq/uQM5XJDcw6xf2 +7RCcM4jzWTv7Delev1qcN3QYqgsWOq8ETqMs7gWt9BZX6DnB8UXOewZV79n5 +Lq7ODTor7ycEGM6im4ZXRH4UuYPr2OOn/M2zqOd9frxukgckSCqp3rKeQ1X2 +t5WDYjwhbkfk1NXBOTR38iBHIPMI+Pmp7x3zn0dLVmrHpulecJclU/PP6jwq +/PZ2NcTAG9p1TDpiMhaQ69183yNCPvBmTUY2RHURVZTv8+ZK8AGLZ9wLiq2L +yFi2j7pM+YDXFYW2Wy5LSGnI792L40fh5VyJmenwEhoVPLH/NnkUxmv7dj4N +WUa9KQ6+1i4MkBnrWPVeXkYZ7BzBM70MKNxxYdk7fAU1PlmjfG18weLzXGnE +wgra6AkJuvW+UO6rXJDhuoqMfaYL4/SYQHvu5plZu4ru35oNcTBgwp2hK/zD +datoc/+8maQRE2r7s9+o4f/ktOXKQKEpE0Itd5K1j1fx+cWxrsucCWnfTW51 +Na+iDSsibqIHmCC+uZve0bWKRpP11+ecZAKn2YHgLUOrKKUh4njtfSY08ma2 +CXJT6CQt05hdyATI3lIrwUMhuwdl642KmOATq9Mmz0shgczxBzUlTEj6h0+L +xk+huGDHyepKJmhY+unaClEoQk35RFUzExQib7502Ewh/8zOgPKPTHDJlH1W +qEQhmw3ju4KHmPBqPjL9hjKFfovjEKaNMKGrvjnoggqFxoP1S8rGmBCLBFnu +2yl01CHn26OvTOD1tFH9qU4hV56QwIffmaD289FbcRqFrENkgoolWHDFfygm +HVGoOSfeNl2KBZtubH0VAhTa1TWvzJZhgUa8ipDzHgppq3S+pcuxgNacKi1C +p5D063D6exUWbBCvKo+0otCUyQcJAX0WSHZG35e3p1Aq553HfgdZsHjVYjzR +Dde/U+imvQsLZPZ1vd/rTqGLHuxg3cPYl+OLuD0oxK503L7mzgLblso+tifO +n1h39QaDBQF3KeuD3hTS7WAw206zIFDBPLOXSaHXV1UEldJYEN73kzEVSKFS +JHxs4ioLIhsafrJP4fjfFltLrrGgLcs+nSeIQjSb1iijTBYUn/EolD1NoRQO +33n7bBZs+1f7omkIhaxO3XnLLmbBF6Q2aHOWQlu3XjIwK2WBVspNrmfYix2n +rnE9YoFvQrkinU2hXFVkn1LBAlkblrXROQr9/PChKa+eBTr+dtslwilUaSdb +2N3Ogpn3Oqp3oiiU+J2TJ6MDj/dV1AlFU4hROHnUrYsF0Y7fzdnYm7jrZUd7 +WKBeyDSwi6FQQINrKvWKBc9EirM+x1JISf1GmPIYC0wuvTj09SKFvr+O7P8y +zgKnEU6TvXEU6o1jaT+cYMHa7CGRPOyoYb1J468sGFHlv+0ST6F3N/uP7F9g +wQcOnm2lCRRK5xOxPL+OgDcqP59pXKFQ4/wHj1AuAr7EHE2Owf78oSg4kIcA +ssmSqx97V6XFHcZ6AlRdFDlCE/F+82H/aytCgHOwk+n9JJy/naWopRgB67Pf +xs5gmxqKqiFxAjjSNrMNkymUJlx8SFeaAPmX1iEt2Kb1n8pkFQhYZ6We25lC +ISK/uF1ciQAbvn5fgVT8fNq5TxtVCPizN2rAGnucEBPmViOg1SK1+cmvcTHr +Y1+1CXC0Pd9zO41C9f+JRY/TCAgbkeN7gT32Zej6kB4BUVY637iuUsik6XzL +gBEB/DxHWlnYowGlco+BANE0ySzpdAptcA3XrzEngF4daEXHNqbvtSuzIMBL +oD7rBHaK9Mi5/L0EBOavutRi13I/TMuxJcCouq96EJucCS+4ZUfAg0uBbWvY +Rk/FXyY7EvC44/HUnmt4vctGphKccP0RHlxHsZNvP+T8nzMBD4NT26OwR4Jt +tMNcCZhiX/Ooxhb2krAOcifAmn5ArRfbyIY84u+J52uPuTfx6/1tkYlePgTE +m4nniWfgfARsc10ZBHgwT6iqY48sSdQ5MQnoKBE/vBtbeJjssSMIcOgU1t+P +bdT1aNzqGAGVg/ZN3tiMmsif4E+A+une1UDs5FzbzaYBBBgnpH2M+BU/WXKH +fiAB7UmXT1/+FZ89umdnEAE7vGvKMrCFmGWuasEE7m+JnGxsw/1Rp5RCCagW +yjMu+BXfZF/81jACknrcY0uxk1SksiTZBORqmYZVYldvGqsQOU9AgJ65VB32 +8L9lHYIRBDx1D/Rr/BX/c9QwTxQBGxKf+D7BNujbt7oWTcBGOZrwX9j/B5KY +1gk= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12274,106 +13917,107 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwV1Xk8VdsXAHCZM1TIXDL3CHHNlL1yDRGSKFPouvcoSUK6Zf4VKmNS6r1Q +JPJQ5rGeZygPITSrcJAo83R69fx2f5zP+Xw/+5y11zp7r30UGKecWJwcHBwT ++Pp1P92ttb2mt9tswH87zzd5EplN39NnWBQjPSPeXb88lGOQoWzRiNbGsod+ +2ZH5nFdItw3xRszNT2OXsaNbeCy6UCjff8Gz2JefSjVFF71AKb+3+sxj1/We +zv5Be4m47S0bF7En33VEnGt4gzJNY+JWsGXGlDyW6YOIcelM43fsfTMRxiFd +n1Clu8rR/7Cf/JgUZBcNI7VPqSGcCiR6FSsZXh1IorPWVQu82NO8FpOLtDHU +1HF9WBCbNynITXdlHFnk6+wWwZYTyWo/3TCBkqUu80piO8gu35+mf0VPvpwY +UcIm7ihKaPJPo/nRlUV17GiV/XEnumZQYAWcoWG/kRzQCS2aQ7+bCfxljs10 +9z9+LWkenW1OvLQPe/Y2x93ywAW0qbDzL2dsfkXNTXO0JXTO59LZY9gZzBbr +TeLLKFqZdzUYW77ALXrnyjIK17AYj8Q20oifPtmwisKVuYSuYx8z+NQ1Sf+B +orJuR7RjL7LPcAuo/kQcVhonXmHHNAjuUuP/Dz2aj3k2in0TjP7061pDalsi +/uFUxPnlt1sEF62DDq3ueTp20dNrQ7GynLDs9Pt+F+zZz14RV5M44e0VHRk/ +7Aj1pYpHgVwgdbd1NRE746GC0gyNB4wjbrx/h/2u9+uT//J4QFtr4P4Mtvx8 +jfsGcV5odBr9xK1EomI9h3TNFV5I4Y35Qxu7te78uoAGfghuaTZKxl5q6f80 +QReCGtFQIQ9lEonaCW0KfyIEkawfwuewtQcsQNhYGBgDJWmZ2P6jVXd0tDaA +83i69CvsIM4u7d1Cm4BKyTR2UyHRmGLpXNyyCCTbaVeeVcXfh+hY36MrCvzX +t/+Thc3557iC1GlRaPmL8G7Fltfd5lQ0JQqG/m0bxbaTyJ2eVt49JAaMk+Yx +1dg9vsEhkp3iMF1qmSuuRqKPBSmJPvwSYBDb3UXH/jpVlPfAUgK89NvYwdgC +oWS/aZMESDfxurzAtrjorOdTJQl2HirbrquTqP6ewVJhjjSwjeCHngaJ7o19 +DzMJ3Qrut8jplztJtNcl4WNIyVb4yFGnukkbx28VsyoZ3wobLRt6bLH17mmI +y7vJwf63B878jd3K8KrgMdsGS39IbazUIdH8zNDZiQvy0N7zILpUl0RiJy0q +K+wVIX2N9F81JNH4PYFjjv6KsLbXphuMSFQ72Cv7LV4RuhP25F3G9rQ7ckG1 +SRE0JKi7W4xxfjvCnG7RlODKj4l5axM8/2TBbJSkMmhycY5X7CKRs5+gpu2w +CjQf/rxjeA+JUJgL7fBP7IzxzQbmJFKPyzFkSqsC2MefSMTmyNM1jzqgCtbb +ao4a0klU8tHjcPnfqqA15hCcYYH781BxrEzuduA7/HW7rzXOz8L+1SRDDY7E +pXEetCdR3sHM9ytRamCyt6qgCjuFMTzE/YcaRF3kapBywPs75syUXL8a5L/W +0hjCFmnM4jhIV4cObrpxqCPeP7rT6g1KO+BM1f84yw6SSFYxNTpxVAM2xwWG +RLqTqPHKohrFqQm3K7eErmB7LrgNEAqa0FyjvHLag0TZrcpq5l6asH/G8+Ix +TxIp+tX3rb7WhN9y1Rs9vHC9xWMqRKcWOF/UL3BnkGirrBwh76YN7d302/X+ +JNLIDxX6F9HgvGNYLnckiRjMC0uaDjRIirogfR37plL6Rx9PGpgHNnCpRpGI +K/fho6dsGgw+f6pjE437LXvSOb2MBn/bCC5lxOLz9KZPlpqSLigNuMmZx+P1 +TbTTcuXVg9fMZM2FVBLdDVZ2rOrSB6vB2Xdl90hU/rEpUWpQHyq2zQ6dzCdR +s+2RZ+FT+tCU6BOkfp9Eo4o3zMwFDGB15fGO/AISqfbzafZYG0DToSTxu0W4 +n3Wn1n9pNoBxZuaT8kd4fRbLWrbUGYJBds+j3Y9J1BuGDC/mG8NbXs/oxdck +UvB66XAkYDcY3217+Vx0FLHWqku3ngMorhWXPH9gFElO1fJJMswB/bzAI589 +ikJ1dw2mq1uAeElFgOD0KGJ8+9EuNmkJzTP56UEWY6jEPIQvp8caZmZ+sIL+ +HEP3Fv3/Ls6wAT3LeafwzeNodY/U89boffA574ySd9o4+sDBNTd81B4qW/sK +Tm3+jAK3nEqLVdoPFzNTxXbe+oxKj7c3XY9zhDuU7qsx3Ql0fkF6ZcfxA6DJ +GPh4p3sCLdlaHXrm7QQOi6JjnbFfkLHH1T1jBw6CrKH2XNruSdQnneXfqusM +O68JVEeuTCKZ+xcaC39zgf4XZ0cmuqZQ7ZC6nYPwIVj/mq/uQM5XJDcw6xf2 +7RCcM4jzWTv7Delev1qcN3QYqgsWOq8ETqMs7gWt9BZX6DnB8UXOewZV79n5 +Lq7ODTor7ycEGM6im4ZXRH4UuYPr2OOn/M2zqOd9frxukgckSCqp3rKeQ1X2 +t5WDYjwhbkfk1NXBOTR38iBHIPMI+Pmp7x3zn0dLVmrHpulecJclU/PP6jwq +/PZ2NcTAG9p1TDpiMhaQ69183yNCPvBmTUY2RHURVZTv8+ZK8AGLZ9wLiq2L +yFi2j7pM+YDXFYW2Wy5LSGnI792L40fh5VyJmenwEhoVPLH/NnkUxmv7dj4N +WUa9KQ6+1i4MkBnrWPVeXkYZ7BzBM70MKNxxYdk7fAU1PlmjfG18weLzXGnE +wgra6AkJuvW+UO6rXJDhuoqMfaYL4/SYQHvu5plZu4ru35oNcTBgwp2hK/zD +datoc/+8maQRE2r7s9+o4f/ktOXKQKEpE0Itd5K1j1fx+cWxrsucCWnfTW51 +Na+iDSsibqIHmCC+uZve0bWKRpP11+ecZAKn2YHgLUOrKKUh4njtfSY08ma2 +CXJT6CQt05hdyATI3lIrwUMhuwdl642KmOATq9Mmz0shgczxBzUlTEj6h0+L +xk+huGDHyepKJmhY+unaClEoQk35RFUzExQib7502Ewh/8zOgPKPTHDJlH1W +qEQhmw3ju4KHmPBqPjL9hjKFfovjEKaNMKGrvjnoggqFxoP1S8rGmBCLBFnu +2yl01CHn26OvTOD1tFH9qU4hV56QwIffmaD289FbcRqFrENkgoolWHDFfygm +HVGoOSfeNl2KBZtubH0VAhTa1TWvzJZhgUa8ipDzHgppq3S+pcuxgNacKi1C +p5D063D6exUWbBCvKo+0otCUyQcJAX0WSHZG35e3p1Aq553HfgdZsHjVYjzR +Dde/U+imvQsLZPZ1vd/rTqGLHuxg3cPYl+OLuD0oxK503L7mzgLblso+tifO +n1h39QaDBQF3KeuD3hTS7WAw206zIFDBPLOXSaHXV1UEldJYEN73kzEVSKFS +JHxs4ioLIhsafrJP4fjfFltLrrGgLcs+nSeIQjSb1iijTBYUn/EolD1NoRQO +33n7bBZs+1f7omkIhaxO3XnLLmbBF6Q2aHOWQlu3XjIwK2WBVspNrmfYix2n +rnE9YoFvQrkinU2hXFVkn1LBAlkblrXROQr9/PChKa+eBTr+dtslwilUaSdb +2N3Ogpn3Oqp3oiiU+J2TJ6MDj/dV1AlFU4hROHnUrYsF0Y7fzdnYm7jrZUd7 +WKBeyDSwi6FQQINrKvWKBc9EirM+x1JISf1GmPIYC0wuvTj09SKFvr+O7P8y +zgKnEU6TvXEU6o1jaT+cYMHa7CGRPOyoYb1J468sGFHlv+0ST6F3N/uP7F9g +wQcOnm2lCRRK5xOxPL+OgDcqP59pXKFQ4/wHj1AuAr7EHE2Owf78oSg4kIcA +ssmSqx97V6XFHcZ6AlRdFDlCE/F+82H/aytCgHOwk+n9JJy/naWopRgB67Pf +xs5gmxqKqiFxAjjSNrMNkymUJlx8SFeaAPmX1iEt2Kb1n8pkFQhYZ6We25lC +ISK/uF1ciQAbvn5fgVT8fNq5TxtVCPizN2rAGnucEBPmViOg1SK1+cmvcTHr +Y1+1CXC0Pd9zO41C9f+JRY/TCAgbkeN7gT32Zej6kB4BUVY637iuUsik6XzL +gBEB/DxHWlnYowGlco+BANE0ySzpdAptcA3XrzEngF4daEXHNqbvtSuzIMBL +oD7rBHaK9Mi5/L0EBOavutRi13I/TMuxJcCouq96EJucCS+4ZUfAg0uBbWvY +Rk/FXyY7EvC44/HUnmt4vctGphKccP0RHlxHsZNvP+T8nzMBD4NT26OwR4Jt +tMNcCZhiX/Ooxhb2krAOcifAmn5ArRfbyIY84u+J52uPuTfx6/1tkYlePgTE +m4nniWfgfARsc10ZBHgwT6iqY48sSdQ5MQnoKBE/vBtbeJjssSMIcOgU1t+P +bdT1aNzqGAGVg/ZN3tiMmsif4E+A+une1UDs5FzbzaYBBBgnpH2M+BU/WXKH +fiAB7UmXT1/+FZ89umdnEAE7vGvKMrCFmGWuasEE7m+JnGxsw/1Rp5RCCagW +yjMu+BXfZF/81jACknrcY0uxk1SksiTZBORqmYZVYldvGqsQOU9AgJ65VB32 +8L9lHYIRBDx1D/Rr/BX/c9QwTxQBGxKf+D7BNujbt7oWTcBGOZrwX9j/B5KY +1gk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5977692700065185, + 1.5988150134525119`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.5977692700065198}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12385,21 +14029,21 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5977692700065185, + 1.5988150134525119`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.5977692700065198}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12413,104 +14057,105 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwV1Xk8VdsXAHCZM1TIXDL3CHHNlL1yDRGSKFPouvcoSUK6Zf4VKmNS6r1Q +JPJQ5rGeZygPITSrcJAo83R69fx2f5zP+Xw/+5y11zp7r30UGKecWJwcHBwT ++Pp1P92ttb2mt9tswH87zzd5EplN39NnWBQjPSPeXb88lGOQoWzRiNbGsod+ +2ZH5nFdItw3xRszNT2OXsaNbeCy6UCjff8Gz2JefSjVFF71AKb+3+sxj1/We +zv5Be4m47S0bF7En33VEnGt4gzJNY+JWsGXGlDyW6YOIcelM43fsfTMRxiFd +n1Clu8rR/7Cf/JgUZBcNI7VPqSGcCiR6FSsZXh1IorPWVQu82NO8FpOLtDHU +1HF9WBCbNynITXdlHFnk6+wWwZYTyWo/3TCBkqUu80piO8gu35+mf0VPvpwY +UcIm7ihKaPJPo/nRlUV17GiV/XEnumZQYAWcoWG/kRzQCS2aQ7+bCfxljs10 +9z9+LWkenW1OvLQPe/Y2x93ywAW0qbDzL2dsfkXNTXO0JXTO59LZY9gZzBbr +TeLLKFqZdzUYW77ALXrnyjIK17AYj8Q20oifPtmwisKVuYSuYx8z+NQ1Sf+B +orJuR7RjL7LPcAuo/kQcVhonXmHHNAjuUuP/Dz2aj3k2in0TjP7061pDalsi +/uFUxPnlt1sEF62DDq3ueTp20dNrQ7GynLDs9Pt+F+zZz14RV5M44e0VHRk/ +7Aj1pYpHgVwgdbd1NRE746GC0gyNB4wjbrx/h/2u9+uT//J4QFtr4P4Mtvx8 +jfsGcV5odBr9xK1EomI9h3TNFV5I4Y35Qxu7te78uoAGfghuaTZKxl5q6f80 +QReCGtFQIQ9lEonaCW0KfyIEkawfwuewtQcsQNhYGBgDJWmZ2P6jVXd0tDaA +83i69CvsIM4u7d1Cm4BKyTR2UyHRmGLpXNyyCCTbaVeeVcXfh+hY36MrCvzX +t/+Thc3557iC1GlRaPmL8G7Fltfd5lQ0JQqG/m0bxbaTyJ2eVt49JAaMk+Yx +1dg9vsEhkp3iMF1qmSuuRqKPBSmJPvwSYBDb3UXH/jpVlPfAUgK89NvYwdgC +oWS/aZMESDfxurzAtrjorOdTJQl2HirbrquTqP6ewVJhjjSwjeCHngaJ7o19 +DzMJ3Qrut8jplztJtNcl4WNIyVb4yFGnukkbx28VsyoZ3wobLRt6bLH17mmI +y7vJwf63B878jd3K8KrgMdsGS39IbazUIdH8zNDZiQvy0N7zILpUl0RiJy0q +K+wVIX2N9F81JNH4PYFjjv6KsLbXphuMSFQ72Cv7LV4RuhP25F3G9rQ7ckG1 +SRE0JKi7W4xxfjvCnG7RlODKj4l5axM8/2TBbJSkMmhycY5X7CKRs5+gpu2w +CjQf/rxjeA+JUJgL7fBP7IzxzQbmJFKPyzFkSqsC2MefSMTmyNM1jzqgCtbb +ao4a0klU8tHjcPnfqqA15hCcYYH781BxrEzuduA7/HW7rzXOz8L+1SRDDY7E +pXEetCdR3sHM9ytRamCyt6qgCjuFMTzE/YcaRF3kapBywPs75syUXL8a5L/W +0hjCFmnM4jhIV4cObrpxqCPeP7rT6g1KO+BM1f84yw6SSFYxNTpxVAM2xwWG +RLqTqPHKohrFqQm3K7eErmB7LrgNEAqa0FyjvHLag0TZrcpq5l6asH/G8+Ix +TxIp+tX3rb7WhN9y1Rs9vHC9xWMqRKcWOF/UL3BnkGirrBwh76YN7d302/X+ +JNLIDxX6F9HgvGNYLnckiRjMC0uaDjRIirogfR37plL6Rx9PGpgHNnCpRpGI +K/fho6dsGgw+f6pjE437LXvSOb2MBn/bCC5lxOLz9KZPlpqSLigNuMmZx+P1 +TbTTcuXVg9fMZM2FVBLdDVZ2rOrSB6vB2Xdl90hU/rEpUWpQHyq2zQ6dzCdR +s+2RZ+FT+tCU6BOkfp9Eo4o3zMwFDGB15fGO/AISqfbzafZYG0DToSTxu0W4 +n3Wn1n9pNoBxZuaT8kd4fRbLWrbUGYJBds+j3Y9J1BuGDC/mG8NbXs/oxdck +UvB66XAkYDcY3217+Vx0FLHWqku3ngMorhWXPH9gFElO1fJJMswB/bzAI589 +ikJ1dw2mq1uAeElFgOD0KGJ8+9EuNmkJzTP56UEWY6jEPIQvp8caZmZ+sIL+ +HEP3Fv3/Ls6wAT3LeafwzeNodY/U89boffA574ySd9o4+sDBNTd81B4qW/sK +Tm3+jAK3nEqLVdoPFzNTxXbe+oxKj7c3XY9zhDuU7qsx3Ql0fkF6ZcfxA6DJ +GPh4p3sCLdlaHXrm7QQOi6JjnbFfkLHH1T1jBw6CrKH2XNruSdQnneXfqusM +O68JVEeuTCKZ+xcaC39zgf4XZ0cmuqZQ7ZC6nYPwIVj/mq/uQM5XJDcw6xf2 +7RCcM4jzWTv7Delev1qcN3QYqgsWOq8ETqMs7gWt9BZX6DnB8UXOewZV79n5 +Lq7ODTor7ycEGM6im4ZXRH4UuYPr2OOn/M2zqOd9frxukgckSCqp3rKeQ1X2 +t5WDYjwhbkfk1NXBOTR38iBHIPMI+Pmp7x3zn0dLVmrHpulecJclU/PP6jwq +/PZ2NcTAG9p1TDpiMhaQ69183yNCPvBmTUY2RHURVZTv8+ZK8AGLZ9wLiq2L +yFi2j7pM+YDXFYW2Wy5LSGnI792L40fh5VyJmenwEhoVPLH/NnkUxmv7dj4N +WUa9KQ6+1i4MkBnrWPVeXkYZ7BzBM70MKNxxYdk7fAU1PlmjfG18weLzXGnE +wgra6AkJuvW+UO6rXJDhuoqMfaYL4/SYQHvu5plZu4ru35oNcTBgwp2hK/zD +datoc/+8maQRE2r7s9+o4f/ktOXKQKEpE0Itd5K1j1fx+cWxrsucCWnfTW51 +Na+iDSsibqIHmCC+uZve0bWKRpP11+ecZAKn2YHgLUOrKKUh4njtfSY08ma2 +CXJT6CQt05hdyATI3lIrwUMhuwdl642KmOATq9Mmz0shgczxBzUlTEj6h0+L +xk+huGDHyepKJmhY+unaClEoQk35RFUzExQib7502Ewh/8zOgPKPTHDJlH1W +qEQhmw3ju4KHmPBqPjL9hjKFfovjEKaNMKGrvjnoggqFxoP1S8rGmBCLBFnu +2yl01CHn26OvTOD1tFH9qU4hV56QwIffmaD289FbcRqFrENkgoolWHDFfygm +HVGoOSfeNl2KBZtubH0VAhTa1TWvzJZhgUa8ipDzHgppq3S+pcuxgNacKi1C +p5D063D6exUWbBCvKo+0otCUyQcJAX0WSHZG35e3p1Aq553HfgdZsHjVYjzR +Dde/U+imvQsLZPZ1vd/rTqGLHuxg3cPYl+OLuD0oxK503L7mzgLblso+tifO +n1h39QaDBQF3KeuD3hTS7WAw206zIFDBPLOXSaHXV1UEldJYEN73kzEVSKFS +JHxs4ioLIhsafrJP4fjfFltLrrGgLcs+nSeIQjSb1iijTBYUn/EolD1NoRQO +33n7bBZs+1f7omkIhaxO3XnLLmbBF6Q2aHOWQlu3XjIwK2WBVspNrmfYix2n +rnE9YoFvQrkinU2hXFVkn1LBAlkblrXROQr9/PChKa+eBTr+dtslwilUaSdb +2N3Ogpn3Oqp3oiiU+J2TJ6MDj/dV1AlFU4hROHnUrYsF0Y7fzdnYm7jrZUd7 +WKBeyDSwi6FQQINrKvWKBc9EirM+x1JISf1GmPIYC0wuvTj09SKFvr+O7P8y +zgKnEU6TvXEU6o1jaT+cYMHa7CGRPOyoYb1J468sGFHlv+0ST6F3N/uP7F9g +wQcOnm2lCRRK5xOxPL+OgDcqP59pXKFQ4/wHj1AuAr7EHE2Owf78oSg4kIcA +ssmSqx97V6XFHcZ6AlRdFDlCE/F+82H/aytCgHOwk+n9JJy/naWopRgB67Pf +xs5gmxqKqiFxAjjSNrMNkymUJlx8SFeaAPmX1iEt2Kb1n8pkFQhYZ6We25lC +ISK/uF1ciQAbvn5fgVT8fNq5TxtVCPizN2rAGnucEBPmViOg1SK1+cmvcTHr +Y1+1CXC0Pd9zO41C9f+JRY/TCAgbkeN7gT32Zej6kB4BUVY637iuUsik6XzL +gBEB/DxHWlnYowGlco+BANE0ySzpdAptcA3XrzEngF4daEXHNqbvtSuzIMBL +oD7rBHaK9Mi5/L0EBOavutRi13I/TMuxJcCouq96EJucCS+4ZUfAg0uBbWvY +Rk/FXyY7EvC44/HUnmt4vctGphKccP0RHlxHsZNvP+T8nzMBD4NT26OwR4Jt +tMNcCZhiX/Ooxhb2krAOcifAmn5ArRfbyIY84u+J52uPuTfx6/1tkYlePgTE +m4nniWfgfARsc10ZBHgwT6iqY48sSdQ5MQnoKBE/vBtbeJjssSMIcOgU1t+P +bdT1aNzqGAGVg/ZN3tiMmsif4E+A+une1UDs5FzbzaYBBBgnpH2M+BU/WXKH +fiAB7UmXT1/+FZ89umdnEAE7vGvKMrCFmGWuasEE7m+JnGxsw/1Rp5RCCagW +yjMu+BXfZF/81jACknrcY0uxk1SksiTZBORqmYZVYldvGqsQOU9AgJ65VB32 +8L9lHYIRBDx1D/Rr/BX/c9QwTxQBGxKf+D7BNujbt7oWTcBGOZrwX9j/B5KY +1gk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5977692700065185, 1.5988150134525119`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.5977692700065198}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12520,7 +14165,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.663943982390173}, + AxesOrigin->{0, 0.5977692700065198}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12548,7 +14194,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5977692700065185, 1.5988150134525119`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12556,9 +14203,9 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991337564416748*^9}, + CellChangeTimes->{3.991337564416748*^9, 3.994357549627948*^9}, CellLabel-> - "Out[303]=",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] + "Out[137]=",ExpressionUUID->"e4ca2ff7-d7b9-4db5-9edb-8e5d979f1343"] }, Open ]], Cell[CellGroupData[{ @@ -12622,252 +14269,184 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918495265156612`*^9, {3.991849580574194*^9, - 3.9918495807911797`*^9}},ExpressionUUID->"90696e8b-5a2d-314c-8d58-\ -ac84cb8f4d66"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.976253354341118`*^-271\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 304, - 297, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337564646551*^9}, + 3.9918495265156612`*^9, {3.991849580574194*^9, 3.9918495807911797`*^9}}, CellLabel-> - "During evaluation of \ -In[304]:=",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], + "In[138]:=",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.718150004511881`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.9971200530816524`*^-269\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 304, 298, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646565304`*^9}, + 138, 69, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.994357549801547*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], +In[138]:=",ExpressionUUID->"becc8ac4-f9c0-4d07-8ec1-65d63ff1b1e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4847193100774497`*^-293\\\", \ + "\"\\!\\(\\*FractionBox[\\\"9.261227967131406`*^-280\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 304, 299, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646656475`*^9}, + 2, 138, 70, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.9943575498094673`*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], +In[138]:=",ExpressionUUID->"7fc2ee02-0fcd-4e83-a1f9-e5ed5f990254"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7163954947667013`*^-290\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 138, 71, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.99435754981848*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"16340ba8-cc6d-48d5-bcac-404bb7a47e5b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 304, 300, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646736584`*^9}, +during this calculation.\"", 2, 138, 72, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.994357549830027*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], +In[138]:=",ExpressionUUID->"b5c1d6ec-d11f-4fef-8bbe-1f5a9c71a8b7"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lPsXB3BRpERkX8ZYKwwSw4wZ51izb4XImixtFKJIkUhSISHZk1tX +WWYmsrRcS5e0WiKEJKmsWdLi9nt+fz2v9+t5Pdt5zud8vwp7Q50DuLm4uKxW +cXH9/7g01N6ifKHUaDj/Vp3rAwuj7gLJE8Z9Z+BzwFWzxQFlQLGXeyX7MuB0 +q317y4AuRDr+3cvTVwItfdX8JQNmIDwtkfGjlwVy24JKAgd2wXCjfehCbxPs +2O7QU9S/DyyUv7yb6+2EXRIpz/J7I+BHr/7V2d5RMLGsnC7sOAvNpn+Vvi6Z +h0tRjGOUiKsgO1w3vldjBbL4gv5E+haC6CGfv/lMefDB5spOsx2lkLHNosHe +ZS0Kti1NCby7BW9ztB/PbdyAbtZeid3sO5DbVS4UqbIBnX38Q8Ka74CH4Gaf +n7QNKFXdbcHXdQcGE+T+4/bfgNwqOTVi3+7ASMg6hui9DTh2jndzq9ZdmDAb +q6W6C6KJkgPvwdt3YXk2uzKmWAiLHILS665WwIXS0y+5pYRxv/t3ne4tVWCt +u19ETEkYTVrMsnZpVcHaFmeXzRRhXLN1kvpKrwrOflAZsDEWxpJkZ/U6kyo4 +qfhsPHO/MCZamj508qyCkCLJ/1TrhbFHN+FM3qUqcMqr1rDZI4L3rI3vps1U +gUTmh/NX8jchTWLrycaSapBUv3d2uWwTXh7VZNz+qxqkm5JOe1VtQqf6uyXp +d6qBNLv12ObmTcg7M+/rUlMNKrZHfBsmNuHWXyKZt9qrYfvqFeqH7aK4dvBL +QOxMNThEiI/pPBXF83ErBe/0WeC4fmIou0sUL0ZUWhgxWOBcUvf296Aoqpsp +nMtFFri+8nz5ZEYUBb5wvza3YoGXxo16DzExpJm6xAV5sODgmFb6GV8xvMhT +JtQbw4Jzu6yMOpfEcEvQLZ+ABhZIc15Ic68Sx+TN/wpceMSCik27vm9bL45p +efFny5tZ8KbTuypdXhzzw2y6BjtYoOwUoehkKY4rA6ZfuQZZ0GRXyPvqmjjW +Dwgs2v9iwYrF4ovnDAnMO2l8mJvKhrSy6PIVCwm0Z8l7xdPYoMzLlUxxkkBl +B7LkLwYbbFvXGV8MkMC+1XqzQ6ZsyDUls20vSSAnYZQS7MQGA7TJ7hiWwOi/ +ojfGH2RDOK3Yp/2MJDJHusNeXGeDdZHggk2qJArK8K6KKmCDIt/J5BdXJTHp +w2pBmWI2vOp2re66JYl1B0ZuupSxQfOIAM/QC0lMbSzuzaxiw0RZVNk3aSnk +DDnlG7aw4dGGj/RjylJIWUrZkfeEDVkRzi+/U6Rwy+rNUcttbDA3oSz/Ril8 +Mh4YfOM5G0rejVrxBUnhPvETRc1v2OApaj8lw5ZCcfXXvZQJNmyPaYgvaJTC +XGX2ph1f2LBudIu4whMp/Kmp9W7PJBvqKnlA9a0UFrgYyhyfZYO4TV2a9h8p +dHz0cWfMMvH+8cq65jbS2C/3wOguHwfMZn5Gh3yQxpILIknNihw4YZmp9s+k +NNYe8pzcocyBimJK/6YlabSv+EJuU+GA5C5fWt1aGQx0Zn1v2MKByfut33k0 +ZdDJ0O7IUU0OXDmTFnHtuAxeHdysJ0rjQNvAVuXJeBnMEMjoc6Fz4Lduc5fR +BRlsILm5XjHkQOCnRZ2xfBmM7FEdW2XEAbrtnjnNZhlcTrvmc9eEA6NiqiEt +G2TRcWldmpENByRCH8lJSMhiUq8ow8iWA7Ztu5/vJ8viROj4S5odB2qiL2gI +bZfFf4r3s5QdOJAyPPvFfbcs+k4txrQ7c+CRQUruHT9ZvOdNP31rJwcW0pWs +/xyQxWdJJ44m7OKAt5nr7dJYWXS4eU2V4soBndsNQTMlsqhnkjDl4M6BIG4X +CZM7shhUWXNG0IMDeXumn2Tek0XejmDBdsK8ggqq9DZZ9KxX3KDjyYH+sKSx +s1OyKGGj2tzlzQGhZ/KZvUuySLM6vTnMh6i/Sp2pGpccqtqopQj4EvXu/Vry +UkQO79Gj7PX8OBDPcPKTNpBD0SvUGVd/Dlh6F3zTN5HDD9bq88OEBeO+JrjY +ymFD3i6rffuI92lOLEvzlUNbocw57wAO+H/s1K84IIcCT10segir8ZHbOyLk +0N/xxjeLQA7ct67/ynteDmkfrN1kgzhw+hBfrPIVOQy45CUSR9ji0i5Bk3w5 +/A2H1YYJd7+e1o6tlsON5bxRl4M5cH3esCm3QQ7lhl0qRgjvFTu/836rHJIF +KJaU/RyY3a0UOf9WDle1Ct2+T7g2+gif8Jgc6p2aCvtO+FTegxzNaTmMSP5e +uu0AB8wfrlOzXZbDuU+5GERYYMStYT83CRu0LXbkEO5addP2nAAJjyXur28h +nKv07V2pOAn5syKvTxL2NYfQJjIJ7QpGvgod5MDmoFSuETUStu6TvatJeDr5 +bfqKLgmtaUUjloQ5f6sqyQAJa+c/nPMmHPMsnGNgRcLr33xLQwmbTD82d91J +ws9SGfonCfNvFOwN9yJh+et5k7OEX23bE5weRMLi1avbzhHO3nnrR8VREi6S +TNqSCHsfW0x5FkPCGQEt83jCKtkmsl8SSZhBs8Oog//Pz+W7fGkkdL5Ibggm +zO4fNFLJJeGDQ5q1LoSjf299ZVJKQqnaFT0jwsakKD/fChIqtorTFAmvxZZv +sfdJ+FcQT9Mqwi/8hM9ebyLh1nH7zkGiHlcTvMXqnpEweyXxIJuw583ysjdv +iO8Zol5OJKz477L+wggJn1HmjHYS/jxh3i78lYRGf8xPyhKuWnfFQ2uRhCZ9 +/1q+J/5XlMbIV9s/JIy5s66smLCRPSX2AL889gzeuOpF+Fn6v4U35eRxekZP +p43ohyts0W3Nm+Wx8m/f0UjCHj1+TSPb5PFriLm6AuEJyd9jMhbyWKJbdTGY +6K9KulUkzZE4bxz+9xrCkZ5ZfG4e8nj58IHAAqJfeYq01TJC5HHdoVNNTUQ/ +P/0ntqHyuDwWOn8IsCec9uGp7fMz8mh3UqCyh8gDaXNA6NpsefS9b03rJfJC +r7jGOfVIHhUkZT3LiHyZ9b5YmW6TR4ss22tShO25Vu/w6ZTHfPqMxHkij/7O +IW/hozyGUwSHPYm8WsQonI5bQ8b3+XENvUS+O4QabxisI6OVFr86hbBjqWvb +rCAZH04qfTq1hwN7nl8Q9pMko0Yoy1qCmA9H5JduGKuTcU1H/7iMGwcW2Wlt +P7TIWKhxdXQnMW+iLdWnqnXJGHQeqMkuHEg86ktVNCLjwTUqXz8S8yq3+Wkb +txPhwjvsY44caAkqnGqOJCPv62jeCUsOWP2miZyMIWOtO1trfAfRD2ndVN04 +Mo4NWLaNWHDgbR1/XOl5MlZTE+06zIg8rI8QScwjY+o5285jSMz3Kkt9iyYy ++riqSSrqcyDf7MOe/54QPuIw+UmP6Je3sXE1HWR0ypSz/FuXAxRudrtqDxmF +58bylHWIvOyS8+SbIKNEat74jAYHDi3PxbVtUMCzM1vcRxWI+h8NFB8XUcDK +9ULGzmSif7/0l/NIKuC3LT06D0kcuDnQ/MZIUQHbPBQZKTIcGHp4VeMeVQGf +So2Q5kU54JBI6yv2UcBG8a1z/MT6pSMSrxVTrYB3m428PIj1kevCYktOjQKm +96ckOIyz4QXPAY+aBgWc6sxYwjE2HFx0TpxrVcAbI4c7JEfYUNqnPBDUr4Bf +WksO5fUS62VhW9IuHkUkv2CELbay4Yf6xiGKiyK+3yEwuFLIhqV86fjtHoo4 +oPXrdGo+GxaEVJRpPorI55n1RoLYP0zP0w6Y7VdEeXObUuUsNow2+C95xCqi +VKLyingqG57a1Aom31TExWSZM75RxP7koDeMLipiSXzg+6s2bGCU3ynKylLC +OG/Rf3i+smCAXF5ofl0JZ6c3BPBNsCA663bBQqESWmwdLln7kQW18WV5zreV +8PgkzPMMs0Bnd1GOYKMSSronSw11smDrmsy0pPdKaO6jJ6xYzwJxn5i4SA1l +DL273msxiQVzIta+rk3KeCLuoImWNAvGUn1dw/hUMfVC+fF80Wqwmomy+kjd +jDNaqXrH+Kpg0n9tOOf0FlRO+We9WcldYv8vwX2uaSsuhkaI+6qXg8hz1UtV +M2qoIOXH39J3C2STKx2pVA2Mt4e1qh5lkKNO27gpiIJ8KeN56WKl8FTaWG8+ +XRNvXbNpf/6tGOiyTWlab7RwribZTiihEAR5SiL8zmijQ+d7056q60CKl2e4 +q27D9B6ebb7D2cCv4lnj/O82vCVe1pUUlQmaTKnKKC8d/Ph8Mbz7WjqEDYk0 +W3Ntx/hOJ7v8vy7CzHyqi1XOdtwu6ydzQuw87NB6kmtF0cW6KYvBUuVEeDhv ++Ov7C13807MuJSkkHkI0dPpfB+jh999b9R5+PgnM6X3d7vxUFF/YFF1yKArM +lSXtNpRQMfGr+8FImXDgTLUq7Culot1PhtvS+nBQrg1fqi+jIifR4k3c7zBY +bf2yMLicirxppcfvvQuDptCkb80cKqZNF9XnFYWBUcNCdvS/VNS1V8j23hIG +VOfXo58mqfir9P5/KXAUtsSlHG/S18e7fOG+beKh0Gh4c40tXR/9G/T5U3+G +gOP3Rxk9DH18NlmXHDAUAsdDFu9MGOvjbE5xn3tZCLR5+r4XtNVHu1dBLhb6 +IRBMo1rv8dXHq18Dril5HYbb397LLCTrI6uy637W/YOgFkB7pNKvjwdOCfSW +lQfDZUX7nwmD+rhSa260NisYFob36o0OEdc/OfnjRFwwPPRILS/4oI9OJTTz +Sy7B4Ow4nC0xpY99Gd+UTnAFwwnDxCP8XAYYXDOY4+AeBG3CrxWmVAxQaXl2 +oFE8EAIeBp/lHDVA1vBl58sP/WH68Jco8wgDLE3QCDEq94fjcocOvok0QM+C +3t8r2f6QcjLUeTnGAFdKd1tUHPWHKnokmZFkgAuR6x07Vfzhd01CY3OuAV5v +/RVLSt8LGZUFC53NBij8OJAZHe4Hj4q6982J0fAprBl43u4NI7YKPpGSNKSw +Ryg25d7A9eOw+y9pGtYandr0IdUbTJz47NeQafjQ9Y/1XkdveLKKri+lRsOq +KAn3vD4veLa3kN/YiIYet9NOT095Qr/ygYq0QBoyhzPMz6vvgYVbf75r1dKw +8ZUg/fa0G4y7WhSdr6Oh9bOH94Z63aBv9UXLDw00fGfPH7L5Hzdo8JW+lvWY +hucsFb2/XXGDM5J69JV2GibUd/5ziO4GG5MPnHw6SEMhPdm3n1JcQSOohyuA +m45FkS4Pcmku4K9Szp9rR0cK14yDSoczRLd6H1B1pKOOzQ83/VpnSAsQ6WA5 +0zFwso7pecMZGm+eSO1woyPPpZaAoRhnEFW1FFrxo6PlTHt8E8UZnqh+FPWN +pONN39qe35lOoLZFnqxaSEcuHf0tXUccYU7tCpU1S0dOYZTywD1b6HuG5pvm +6SiaR5IqyLGFxyHTOyMW6bjvxsDrmBhbuMSyOkr9Sced0faG54xtQY3Odaee +xxDX8E+UDLywgb1WhxWaxQ2x7mnW1eBpa+gO2iHQzTDESwcOqJ9FK7hf+uv9 +YrIhJutf3BmhYQFU04jv1hcMsVd0seKhmAXcez8pUHTREFOmdomQ/pgDizSk +b51hiB31jLsyneZwJ+fxxYLrhriT9WrPxhPmUJSaSNtRYYizYf9yvX5qBucj +hNJzugzxVrBHCyPWFNZuSi6b6jHE99PDUmv3m0JSNVejSZ8hknOHD4/vMoWz +03Pjk4OG+J/faOeAhimcCu5mGI8T96u1G/rrnQmEeV6b+LxsiAEdbudqTUzA +w0wJDUkMlJ/YWWgjbQwr3WsFm8kM3LdR9UUXrzEUBUwPWCsx8NHP3YpH5hHG +k+qiPLYwsHrPrbmxZwhh7Q6VJ3QY6EX30HwQh5Bif5J034KBP27eeKTdB1C/ +u+e3bigDW/Hag9/FTPD6XP+08SgD7T/S416fZgJXdFGOWQQDSdn8lKdeTLC4 +flB31wkGnolafKQqzYTOd6sOhScw8PO9jRrnMxnwZa/mQHU2A91T3h9/c9kQ +ZA6fq9N8zEDljwZjrEIaXPoTqHehiXi+jMGF1gQacGdYVH9qYSDXBW2ehSAa +fKlZc7uonYElF3t4SrVpUM91Nkeki4Fz/H55ds0G4JEZF7X0kYGyO1bzs6b0 +IafhhN7D9UyUyigIlnalgoC9e7W0IBMpPy2mjjOpEDdiQInayMTlAL6ds8pU +CF6zrKwtxkS1Rp/grQt6oO8QKVpCYqK9gqBt0xU9eDMaNp+4jYnxAQkNMb26 +ILbuULWdGxPPfMOmyCPbodQ0NnrWnYmXlmUUTXdvB53YS6ZXPJlYxxWrro7b +wX62qqfPj4lD5kPtdhu3Q9KbxR/+h5hoU9ql1F+tA8slp02i45lokt0j/P3H +Nug3vNJVVs7EZGe78bP52hB8rDTPqoKJxfKD59KTtWGp4l7AZBUTlzI+Ha8J +1wYRxb7v22qYmJlnOWZprQ02a+VkHzxmoteqfmPpOS1o7C7b19XDxKvnL636 +xdIEa8H7lMg+Jp7OzeznTdWEvh3tS5IDTAxxCWRigCYs1H9N9h5h4h224nu6 +pCZQirXvfv7CxNyVwFDrOAo09htHpk4x0Ymbe98DDwpYi+4ErVkmAq9OsKce +BQLPHXsdscjERk/fj3JfNWDhcVKuxDITuZdfrsInGnDmZ7Z//U8mek/URFws +1oCNurc1vFaYGD5J3cgbqwEFh+sX//xh4vvs62W3d2vA/wA/biti "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12881,211 +14460,139 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwV1nk8lPsXB3BRpERkX8ZYKwwSw4wZ51izb4XImixtFKJIkUhSISHZk1tX +WWYmsrRcS5e0WiKEJKmsWdLi9nt+fz2v9+t5Pdt5zud8vwp7Q50DuLm4uKxW +cXH9/7g01N6ifKHUaDj/Vp3rAwuj7gLJE8Z9Z+BzwFWzxQFlQLGXeyX7MuB0 +q317y4AuRDr+3cvTVwItfdX8JQNmIDwtkfGjlwVy24JKAgd2wXCjfehCbxPs +2O7QU9S/DyyUv7yb6+2EXRIpz/J7I+BHr/7V2d5RMLGsnC7sOAvNpn+Vvi6Z +h0tRjGOUiKsgO1w3vldjBbL4gv5E+haC6CGfv/lMefDB5spOsx2lkLHNosHe +ZS0Kti1NCby7BW9ztB/PbdyAbtZeid3sO5DbVS4UqbIBnX38Q8Ka74CH4Gaf +n7QNKFXdbcHXdQcGE+T+4/bfgNwqOTVi3+7ASMg6hui9DTh2jndzq9ZdmDAb +q6W6C6KJkgPvwdt3YXk2uzKmWAiLHILS665WwIXS0y+5pYRxv/t3ne4tVWCt +u19ETEkYTVrMsnZpVcHaFmeXzRRhXLN1kvpKrwrOflAZsDEWxpJkZ/U6kyo4 +qfhsPHO/MCZamj508qyCkCLJ/1TrhbFHN+FM3qUqcMqr1rDZI4L3rI3vps1U +gUTmh/NX8jchTWLrycaSapBUv3d2uWwTXh7VZNz+qxqkm5JOe1VtQqf6uyXp +d6qBNLv12ObmTcg7M+/rUlMNKrZHfBsmNuHWXyKZt9qrYfvqFeqH7aK4dvBL +QOxMNThEiI/pPBXF83ErBe/0WeC4fmIou0sUL0ZUWhgxWOBcUvf296Aoqpsp +nMtFFri+8nz5ZEYUBb5wvza3YoGXxo16DzExpJm6xAV5sODgmFb6GV8xvMhT +JtQbw4Jzu6yMOpfEcEvQLZ+ABhZIc15Ic68Sx+TN/wpceMSCik27vm9bL45p +efFny5tZ8KbTuypdXhzzw2y6BjtYoOwUoehkKY4rA6ZfuQZZ0GRXyPvqmjjW +Dwgs2v9iwYrF4ovnDAnMO2l8mJvKhrSy6PIVCwm0Z8l7xdPYoMzLlUxxkkBl +B7LkLwYbbFvXGV8MkMC+1XqzQ6ZsyDUls20vSSAnYZQS7MQGA7TJ7hiWwOi/ +ojfGH2RDOK3Yp/2MJDJHusNeXGeDdZHggk2qJArK8K6KKmCDIt/J5BdXJTHp +w2pBmWI2vOp2re66JYl1B0ZuupSxQfOIAM/QC0lMbSzuzaxiw0RZVNk3aSnk +DDnlG7aw4dGGj/RjylJIWUrZkfeEDVkRzi+/U6Rwy+rNUcttbDA3oSz/Ril8 +Mh4YfOM5G0rejVrxBUnhPvETRc1v2OApaj8lw5ZCcfXXvZQJNmyPaYgvaJTC +XGX2ph1f2LBudIu4whMp/Kmp9W7PJBvqKnlA9a0UFrgYyhyfZYO4TV2a9h8p +dHz0cWfMMvH+8cq65jbS2C/3wOguHwfMZn5Gh3yQxpILIknNihw4YZmp9s+k +NNYe8pzcocyBimJK/6YlabSv+EJuU+GA5C5fWt1aGQx0Zn1v2MKByfut33k0 +ZdDJ0O7IUU0OXDmTFnHtuAxeHdysJ0rjQNvAVuXJeBnMEMjoc6Fz4Lduc5fR +BRlsILm5XjHkQOCnRZ2xfBmM7FEdW2XEAbrtnjnNZhlcTrvmc9eEA6NiqiEt +G2TRcWldmpENByRCH8lJSMhiUq8ow8iWA7Ztu5/vJ8viROj4S5odB2qiL2gI +bZfFf4r3s5QdOJAyPPvFfbcs+k4txrQ7c+CRQUruHT9ZvOdNP31rJwcW0pWs +/xyQxWdJJ44m7OKAt5nr7dJYWXS4eU2V4soBndsNQTMlsqhnkjDl4M6BIG4X +CZM7shhUWXNG0IMDeXumn2Tek0XejmDBdsK8ggqq9DZZ9KxX3KDjyYH+sKSx +s1OyKGGj2tzlzQGhZ/KZvUuySLM6vTnMh6i/Sp2pGpccqtqopQj4EvXu/Vry +UkQO79Gj7PX8OBDPcPKTNpBD0SvUGVd/Dlh6F3zTN5HDD9bq88OEBeO+JrjY +ymFD3i6rffuI92lOLEvzlUNbocw57wAO+H/s1K84IIcCT10segir8ZHbOyLk +0N/xxjeLQA7ct67/ynteDmkfrN1kgzhw+hBfrPIVOQy45CUSR9ji0i5Bk3w5 +/A2H1YYJd7+e1o6tlsON5bxRl4M5cH3esCm3QQ7lhl0qRgjvFTu/836rHJIF +KJaU/RyY3a0UOf9WDle1Ct2+T7g2+gif8Jgc6p2aCvtO+FTegxzNaTmMSP5e +uu0AB8wfrlOzXZbDuU+5GERYYMStYT83CRu0LXbkEO5addP2nAAJjyXur28h +nKv07V2pOAn5syKvTxL2NYfQJjIJ7QpGvgod5MDmoFSuETUStu6TvatJeDr5 +bfqKLgmtaUUjloQ5f6sqyQAJa+c/nPMmHPMsnGNgRcLr33xLQwmbTD82d91J +ws9SGfonCfNvFOwN9yJh+et5k7OEX23bE5weRMLi1avbzhHO3nnrR8VREi6S +TNqSCHsfW0x5FkPCGQEt83jCKtkmsl8SSZhBs8Oog//Pz+W7fGkkdL5Ibggm +zO4fNFLJJeGDQ5q1LoSjf299ZVJKQqnaFT0jwsakKD/fChIqtorTFAmvxZZv +sfdJ+FcQT9Mqwi/8hM9ebyLh1nH7zkGiHlcTvMXqnpEweyXxIJuw583ysjdv +iO8Zol5OJKz477L+wggJn1HmjHYS/jxh3i78lYRGf8xPyhKuWnfFQ2uRhCZ9 +/1q+J/5XlMbIV9s/JIy5s66smLCRPSX2AL889gzeuOpF+Fn6v4U35eRxekZP +p43ohyts0W3Nm+Wx8m/f0UjCHj1+TSPb5PFriLm6AuEJyd9jMhbyWKJbdTGY +6K9KulUkzZE4bxz+9xrCkZ5ZfG4e8nj58IHAAqJfeYq01TJC5HHdoVNNTUQ/ +P/0ntqHyuDwWOn8IsCec9uGp7fMz8mh3UqCyh8gDaXNA6NpsefS9b03rJfJC +r7jGOfVIHhUkZT3LiHyZ9b5YmW6TR4ss22tShO25Vu/w6ZTHfPqMxHkij/7O +IW/hozyGUwSHPYm8WsQonI5bQ8b3+XENvUS+O4QabxisI6OVFr86hbBjqWvb +rCAZH04qfTq1hwN7nl8Q9pMko0Yoy1qCmA9H5JduGKuTcU1H/7iMGwcW2Wlt +P7TIWKhxdXQnMW+iLdWnqnXJGHQeqMkuHEg86ktVNCLjwTUqXz8S8yq3+Wkb +txPhwjvsY44caAkqnGqOJCPv62jeCUsOWP2miZyMIWOtO1trfAfRD2ndVN04 +Mo4NWLaNWHDgbR1/XOl5MlZTE+06zIg8rI8QScwjY+o5285jSMz3Kkt9iyYy ++riqSSrqcyDf7MOe/54QPuIw+UmP6Je3sXE1HWR0ypSz/FuXAxRudrtqDxmF +58bylHWIvOyS8+SbIKNEat74jAYHDi3PxbVtUMCzM1vcRxWI+h8NFB8XUcDK +9ULGzmSif7/0l/NIKuC3LT06D0kcuDnQ/MZIUQHbPBQZKTIcGHp4VeMeVQGf +So2Q5kU54JBI6yv2UcBG8a1z/MT6pSMSrxVTrYB3m428PIj1kevCYktOjQKm +96ckOIyz4QXPAY+aBgWc6sxYwjE2HFx0TpxrVcAbI4c7JEfYUNqnPBDUr4Bf +WksO5fUS62VhW9IuHkUkv2CELbay4Yf6xiGKiyK+3yEwuFLIhqV86fjtHoo4 +oPXrdGo+GxaEVJRpPorI55n1RoLYP0zP0w6Y7VdEeXObUuUsNow2+C95xCqi +VKLyingqG57a1Aom31TExWSZM75RxP7koDeMLipiSXzg+6s2bGCU3ynKylLC +OG/Rf3i+smCAXF5ofl0JZ6c3BPBNsCA663bBQqESWmwdLln7kQW18WV5zreV +8PgkzPMMs0Bnd1GOYKMSSronSw11smDrmsy0pPdKaO6jJ6xYzwJxn5i4SA1l +DL273msxiQVzIta+rk3KeCLuoImWNAvGUn1dw/hUMfVC+fF80Wqwmomy+kjd +jDNaqXrH+Kpg0n9tOOf0FlRO+We9WcldYv8vwX2uaSsuhkaI+6qXg8hz1UtV +M2qoIOXH39J3C2STKx2pVA2Mt4e1qh5lkKNO27gpiIJ8KeN56WKl8FTaWG8+ +XRNvXbNpf/6tGOiyTWlab7RwribZTiihEAR5SiL8zmijQ+d7056q60CKl2e4 +q27D9B6ebb7D2cCv4lnj/O82vCVe1pUUlQmaTKnKKC8d/Ph8Mbz7WjqEDYk0 +W3Ntx/hOJ7v8vy7CzHyqi1XOdtwu6ydzQuw87NB6kmtF0cW6KYvBUuVEeDhv ++Ov7C13807MuJSkkHkI0dPpfB+jh999b9R5+PgnM6X3d7vxUFF/YFF1yKArM +lSXtNpRQMfGr+8FImXDgTLUq7Culot1PhtvS+nBQrg1fqi+jIifR4k3c7zBY +bf2yMLicirxppcfvvQuDptCkb80cKqZNF9XnFYWBUcNCdvS/VNS1V8j23hIG +VOfXo58mqfir9P5/KXAUtsSlHG/S18e7fOG+beKh0Gh4c40tXR/9G/T5U3+G +gOP3Rxk9DH18NlmXHDAUAsdDFu9MGOvjbE5xn3tZCLR5+r4XtNVHu1dBLhb6 +IRBMo1rv8dXHq18Dril5HYbb397LLCTrI6uy637W/YOgFkB7pNKvjwdOCfSW +lQfDZUX7nwmD+rhSa260NisYFob36o0OEdc/OfnjRFwwPPRILS/4oI9OJTTz +Sy7B4Ow4nC0xpY99Gd+UTnAFwwnDxCP8XAYYXDOY4+AeBG3CrxWmVAxQaXl2 +oFE8EAIeBp/lHDVA1vBl58sP/WH68Jco8wgDLE3QCDEq94fjcocOvok0QM+C +3t8r2f6QcjLUeTnGAFdKd1tUHPWHKnokmZFkgAuR6x07Vfzhd01CY3OuAV5v +/RVLSt8LGZUFC53NBij8OJAZHe4Hj4q6982J0fAprBl43u4NI7YKPpGSNKSw +Ryg25d7A9eOw+y9pGtYandr0IdUbTJz47NeQafjQ9Y/1XkdveLKKri+lRsOq +KAn3vD4veLa3kN/YiIYet9NOT095Qr/ygYq0QBoyhzPMz6vvgYVbf75r1dKw +8ZUg/fa0G4y7WhSdr6Oh9bOH94Z63aBv9UXLDw00fGfPH7L5Hzdo8JW+lvWY +hucsFb2/XXGDM5J69JV2GibUd/5ziO4GG5MPnHw6SEMhPdm3n1JcQSOohyuA +m45FkS4Pcmku4K9Szp9rR0cK14yDSoczRLd6H1B1pKOOzQ83/VpnSAsQ6WA5 +0zFwso7pecMZGm+eSO1woyPPpZaAoRhnEFW1FFrxo6PlTHt8E8UZnqh+FPWN +pONN39qe35lOoLZFnqxaSEcuHf0tXUccYU7tCpU1S0dOYZTywD1b6HuG5pvm +6SiaR5IqyLGFxyHTOyMW6bjvxsDrmBhbuMSyOkr9Sced0faG54xtQY3Odaee +xxDX8E+UDLywgb1WhxWaxQ2x7mnW1eBpa+gO2iHQzTDESwcOqJ9FK7hf+uv9 +YrIhJutf3BmhYQFU04jv1hcMsVd0seKhmAXcez8pUHTREFOmdomQ/pgDizSk +b51hiB31jLsyneZwJ+fxxYLrhriT9WrPxhPmUJSaSNtRYYizYf9yvX5qBucj +hNJzugzxVrBHCyPWFNZuSi6b6jHE99PDUmv3m0JSNVejSZ8hknOHD4/vMoWz +03Pjk4OG+J/faOeAhimcCu5mGI8T96u1G/rrnQmEeV6b+LxsiAEdbudqTUzA +w0wJDUkMlJ/YWWgjbQwr3WsFm8kM3LdR9UUXrzEUBUwPWCsx8NHP3YpH5hHG +k+qiPLYwsHrPrbmxZwhh7Q6VJ3QY6EX30HwQh5Bif5J034KBP27eeKTdB1C/ +u+e3bigDW/Hag9/FTPD6XP+08SgD7T/S416fZgJXdFGOWQQDSdn8lKdeTLC4 +flB31wkGnolafKQqzYTOd6sOhScw8PO9jRrnMxnwZa/mQHU2A91T3h9/c9kQ +ZA6fq9N8zEDljwZjrEIaXPoTqHehiXi+jMGF1gQacGdYVH9qYSDXBW2ehSAa +fKlZc7uonYElF3t4SrVpUM91Nkeki4Fz/H55ds0G4JEZF7X0kYGyO1bzs6b0 +IafhhN7D9UyUyigIlnalgoC9e7W0IBMpPy2mjjOpEDdiQInayMTlAL6ds8pU +CF6zrKwtxkS1Rp/grQt6oO8QKVpCYqK9gqBt0xU9eDMaNp+4jYnxAQkNMb26 +ILbuULWdGxPPfMOmyCPbodQ0NnrWnYmXlmUUTXdvB53YS6ZXPJlYxxWrro7b +wX62qqfPj4lD5kPtdhu3Q9KbxR/+h5hoU9ql1F+tA8slp02i45lokt0j/P3H +Nug3vNJVVs7EZGe78bP52hB8rDTPqoKJxfKD59KTtWGp4l7AZBUTlzI+Ha8J +1wYRxb7v22qYmJlnOWZprQ02a+VkHzxmoteqfmPpOS1o7C7b19XDxKvnL636 +xdIEa8H7lMg+Jp7OzeznTdWEvh3tS5IDTAxxCWRigCYs1H9N9h5h4h224nu6 +pCZQirXvfv7CxNyVwFDrOAo09htHpk4x0Ymbe98DDwpYi+4ErVkmAq9OsKce +BQLPHXsdscjERk/fj3JfNWDhcVKuxDITuZdfrsInGnDmZ7Z//U8mek/URFws +1oCNurc1vFaYGD5J3cgbqwEFh+sX//xh4vvs62W3d2vA/wA/biti "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.07976578362651533}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13097,19 +14604,19 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.07976578362651533}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13123,210 +14630,138 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwV1nk8lPsXB3BRpERkX8ZYKwwSw4wZ51izb4XImixtFKJIkUhSISHZk1tX +WWYmsrRcS5e0WiKEJKmsWdLi9nt+fz2v9+t5Pdt5zud8vwp7Q50DuLm4uKxW +cXH9/7g01N6ifKHUaDj/Vp3rAwuj7gLJE8Z9Z+BzwFWzxQFlQLGXeyX7MuB0 +q317y4AuRDr+3cvTVwItfdX8JQNmIDwtkfGjlwVy24JKAgd2wXCjfehCbxPs +2O7QU9S/DyyUv7yb6+2EXRIpz/J7I+BHr/7V2d5RMLGsnC7sOAvNpn+Vvi6Z +h0tRjGOUiKsgO1w3vldjBbL4gv5E+haC6CGfv/lMefDB5spOsx2lkLHNosHe +ZS0Kti1NCby7BW9ztB/PbdyAbtZeid3sO5DbVS4UqbIBnX38Q8Ka74CH4Gaf +n7QNKFXdbcHXdQcGE+T+4/bfgNwqOTVi3+7ASMg6hui9DTh2jndzq9ZdmDAb +q6W6C6KJkgPvwdt3YXk2uzKmWAiLHILS665WwIXS0y+5pYRxv/t3ne4tVWCt +u19ETEkYTVrMsnZpVcHaFmeXzRRhXLN1kvpKrwrOflAZsDEWxpJkZ/U6kyo4 +qfhsPHO/MCZamj508qyCkCLJ/1TrhbFHN+FM3qUqcMqr1rDZI4L3rI3vps1U +gUTmh/NX8jchTWLrycaSapBUv3d2uWwTXh7VZNz+qxqkm5JOe1VtQqf6uyXp +d6qBNLv12ObmTcg7M+/rUlMNKrZHfBsmNuHWXyKZt9qrYfvqFeqH7aK4dvBL +QOxMNThEiI/pPBXF83ErBe/0WeC4fmIou0sUL0ZUWhgxWOBcUvf296Aoqpsp +nMtFFri+8nz5ZEYUBb5wvza3YoGXxo16DzExpJm6xAV5sODgmFb6GV8xvMhT +JtQbw4Jzu6yMOpfEcEvQLZ+ABhZIc15Ic68Sx+TN/wpceMSCik27vm9bL45p +efFny5tZ8KbTuypdXhzzw2y6BjtYoOwUoehkKY4rA6ZfuQZZ0GRXyPvqmjjW +Dwgs2v9iwYrF4ovnDAnMO2l8mJvKhrSy6PIVCwm0Z8l7xdPYoMzLlUxxkkBl +B7LkLwYbbFvXGV8MkMC+1XqzQ6ZsyDUls20vSSAnYZQS7MQGA7TJ7hiWwOi/ +ojfGH2RDOK3Yp/2MJDJHusNeXGeDdZHggk2qJArK8K6KKmCDIt/J5BdXJTHp +w2pBmWI2vOp2re66JYl1B0ZuupSxQfOIAM/QC0lMbSzuzaxiw0RZVNk3aSnk +DDnlG7aw4dGGj/RjylJIWUrZkfeEDVkRzi+/U6Rwy+rNUcttbDA3oSz/Ril8 +Mh4YfOM5G0rejVrxBUnhPvETRc1v2OApaj8lw5ZCcfXXvZQJNmyPaYgvaJTC +XGX2ph1f2LBudIu4whMp/Kmp9W7PJBvqKnlA9a0UFrgYyhyfZYO4TV2a9h8p +dHz0cWfMMvH+8cq65jbS2C/3wOguHwfMZn5Gh3yQxpILIknNihw4YZmp9s+k +NNYe8pzcocyBimJK/6YlabSv+EJuU+GA5C5fWt1aGQx0Zn1v2MKByfut33k0 +ZdDJ0O7IUU0OXDmTFnHtuAxeHdysJ0rjQNvAVuXJeBnMEMjoc6Fz4Lduc5fR +BRlsILm5XjHkQOCnRZ2xfBmM7FEdW2XEAbrtnjnNZhlcTrvmc9eEA6NiqiEt +G2TRcWldmpENByRCH8lJSMhiUq8ow8iWA7Ztu5/vJ8viROj4S5odB2qiL2gI +bZfFf4r3s5QdOJAyPPvFfbcs+k4txrQ7c+CRQUruHT9ZvOdNP31rJwcW0pWs +/xyQxWdJJ44m7OKAt5nr7dJYWXS4eU2V4soBndsNQTMlsqhnkjDl4M6BIG4X +CZM7shhUWXNG0IMDeXumn2Tek0XejmDBdsK8ggqq9DZZ9KxX3KDjyYH+sKSx +s1OyKGGj2tzlzQGhZ/KZvUuySLM6vTnMh6i/Sp2pGpccqtqopQj4EvXu/Vry +UkQO79Gj7PX8OBDPcPKTNpBD0SvUGVd/Dlh6F3zTN5HDD9bq88OEBeO+JrjY +ymFD3i6rffuI92lOLEvzlUNbocw57wAO+H/s1K84IIcCT10segir8ZHbOyLk +0N/xxjeLQA7ct67/ynteDmkfrN1kgzhw+hBfrPIVOQy45CUSR9ji0i5Bk3w5 +/A2H1YYJd7+e1o6tlsON5bxRl4M5cH3esCm3QQ7lhl0qRgjvFTu/836rHJIF +KJaU/RyY3a0UOf9WDle1Ct2+T7g2+gif8Jgc6p2aCvtO+FTegxzNaTmMSP5e +uu0AB8wfrlOzXZbDuU+5GERYYMStYT83CRu0LXbkEO5addP2nAAJjyXur28h +nKv07V2pOAn5syKvTxL2NYfQJjIJ7QpGvgod5MDmoFSuETUStu6TvatJeDr5 +bfqKLgmtaUUjloQ5f6sqyQAJa+c/nPMmHPMsnGNgRcLr33xLQwmbTD82d91J +ws9SGfonCfNvFOwN9yJh+et5k7OEX23bE5weRMLi1avbzhHO3nnrR8VREi6S +TNqSCHsfW0x5FkPCGQEt83jCKtkmsl8SSZhBs8Oog//Pz+W7fGkkdL5Ibggm +zO4fNFLJJeGDQ5q1LoSjf299ZVJKQqnaFT0jwsakKD/fChIqtorTFAmvxZZv +sfdJ+FcQT9Mqwi/8hM9ebyLh1nH7zkGiHlcTvMXqnpEweyXxIJuw583ysjdv +iO8Zol5OJKz477L+wggJn1HmjHYS/jxh3i78lYRGf8xPyhKuWnfFQ2uRhCZ9 +/1q+J/5XlMbIV9s/JIy5s66smLCRPSX2AL889gzeuOpF+Fn6v4U35eRxekZP +p43ohyts0W3Nm+Wx8m/f0UjCHj1+TSPb5PFriLm6AuEJyd9jMhbyWKJbdTGY +6K9KulUkzZE4bxz+9xrCkZ5ZfG4e8nj58IHAAqJfeYq01TJC5HHdoVNNTUQ/ +P/0ntqHyuDwWOn8IsCec9uGp7fMz8mh3UqCyh8gDaXNA6NpsefS9b03rJfJC +r7jGOfVIHhUkZT3LiHyZ9b5YmW6TR4ss22tShO25Vu/w6ZTHfPqMxHkij/7O +IW/hozyGUwSHPYm8WsQonI5bQ8b3+XENvUS+O4QabxisI6OVFr86hbBjqWvb +rCAZH04qfTq1hwN7nl8Q9pMko0Yoy1qCmA9H5JduGKuTcU1H/7iMGwcW2Wlt +P7TIWKhxdXQnMW+iLdWnqnXJGHQeqMkuHEg86ktVNCLjwTUqXz8S8yq3+Wkb +txPhwjvsY44caAkqnGqOJCPv62jeCUsOWP2miZyMIWOtO1trfAfRD2ndVN04 +Mo4NWLaNWHDgbR1/XOl5MlZTE+06zIg8rI8QScwjY+o5285jSMz3Kkt9iyYy ++riqSSrqcyDf7MOe/54QPuIw+UmP6Je3sXE1HWR0ypSz/FuXAxRudrtqDxmF +58bylHWIvOyS8+SbIKNEat74jAYHDi3PxbVtUMCzM1vcRxWI+h8NFB8XUcDK +9ULGzmSif7/0l/NIKuC3LT06D0kcuDnQ/MZIUQHbPBQZKTIcGHp4VeMeVQGf +So2Q5kU54JBI6yv2UcBG8a1z/MT6pSMSrxVTrYB3m428PIj1kevCYktOjQKm +96ckOIyz4QXPAY+aBgWc6sxYwjE2HFx0TpxrVcAbI4c7JEfYUNqnPBDUr4Bf +WksO5fUS62VhW9IuHkUkv2CELbay4Yf6xiGKiyK+3yEwuFLIhqV86fjtHoo4 +oPXrdGo+GxaEVJRpPorI55n1RoLYP0zP0w6Y7VdEeXObUuUsNow2+C95xCqi +VKLyingqG57a1Aom31TExWSZM75RxP7koDeMLipiSXzg+6s2bGCU3ynKylLC +OG/Rf3i+smCAXF5ofl0JZ6c3BPBNsCA663bBQqESWmwdLln7kQW18WV5zreV +8PgkzPMMs0Bnd1GOYKMSSronSw11smDrmsy0pPdKaO6jJ6xYzwJxn5i4SA1l +DL273msxiQVzIta+rk3KeCLuoImWNAvGUn1dw/hUMfVC+fF80Wqwmomy+kjd +jDNaqXrH+Kpg0n9tOOf0FlRO+We9WcldYv8vwX2uaSsuhkaI+6qXg8hz1UtV +M2qoIOXH39J3C2STKx2pVA2Mt4e1qh5lkKNO27gpiIJ8KeN56WKl8FTaWG8+ +XRNvXbNpf/6tGOiyTWlab7RwribZTiihEAR5SiL8zmijQ+d7056q60CKl2e4 +q27D9B6ebb7D2cCv4lnj/O82vCVe1pUUlQmaTKnKKC8d/Ph8Mbz7WjqEDYk0 +W3Ntx/hOJ7v8vy7CzHyqi1XOdtwu6ydzQuw87NB6kmtF0cW6KYvBUuVEeDhv ++Ov7C13807MuJSkkHkI0dPpfB+jh999b9R5+PgnM6X3d7vxUFF/YFF1yKArM +lSXtNpRQMfGr+8FImXDgTLUq7Culot1PhtvS+nBQrg1fqi+jIifR4k3c7zBY +bf2yMLicirxppcfvvQuDptCkb80cKqZNF9XnFYWBUcNCdvS/VNS1V8j23hIG +VOfXo58mqfir9P5/KXAUtsSlHG/S18e7fOG+beKh0Gh4c40tXR/9G/T5U3+G +gOP3Rxk9DH18NlmXHDAUAsdDFu9MGOvjbE5xn3tZCLR5+r4XtNVHu1dBLhb6 +IRBMo1rv8dXHq18Dril5HYbb397LLCTrI6uy637W/YOgFkB7pNKvjwdOCfSW +lQfDZUX7nwmD+rhSa260NisYFob36o0OEdc/OfnjRFwwPPRILS/4oI9OJTTz +Sy7B4Ow4nC0xpY99Gd+UTnAFwwnDxCP8XAYYXDOY4+AeBG3CrxWmVAxQaXl2 +oFE8EAIeBp/lHDVA1vBl58sP/WH68Jco8wgDLE3QCDEq94fjcocOvok0QM+C +3t8r2f6QcjLUeTnGAFdKd1tUHPWHKnokmZFkgAuR6x07Vfzhd01CY3OuAV5v +/RVLSt8LGZUFC53NBij8OJAZHe4Hj4q6982J0fAprBl43u4NI7YKPpGSNKSw +Ryg25d7A9eOw+y9pGtYandr0IdUbTJz47NeQafjQ9Y/1XkdveLKKri+lRsOq +KAn3vD4veLa3kN/YiIYet9NOT095Qr/ygYq0QBoyhzPMz6vvgYVbf75r1dKw +8ZUg/fa0G4y7WhSdr6Oh9bOH94Z63aBv9UXLDw00fGfPH7L5Hzdo8JW+lvWY +hucsFb2/XXGDM5J69JV2GibUd/5ziO4GG5MPnHw6SEMhPdm3n1JcQSOohyuA +m45FkS4Pcmku4K9Szp9rR0cK14yDSoczRLd6H1B1pKOOzQ83/VpnSAsQ6WA5 +0zFwso7pecMZGm+eSO1woyPPpZaAoRhnEFW1FFrxo6PlTHt8E8UZnqh+FPWN +pONN39qe35lOoLZFnqxaSEcuHf0tXUccYU7tCpU1S0dOYZTywD1b6HuG5pvm +6SiaR5IqyLGFxyHTOyMW6bjvxsDrmBhbuMSyOkr9Sced0faG54xtQY3Odaee +xxDX8E+UDLywgb1WhxWaxQ2x7mnW1eBpa+gO2iHQzTDESwcOqJ9FK7hf+uv9 +YrIhJutf3BmhYQFU04jv1hcMsVd0seKhmAXcez8pUHTREFOmdomQ/pgDizSk +b51hiB31jLsyneZwJ+fxxYLrhriT9WrPxhPmUJSaSNtRYYizYf9yvX5qBucj +hNJzugzxVrBHCyPWFNZuSi6b6jHE99PDUmv3m0JSNVejSZ8hknOHD4/vMoWz +03Pjk4OG+J/faOeAhimcCu5mGI8T96u1G/rrnQmEeV6b+LxsiAEdbudqTUzA +w0wJDUkMlJ/YWWgjbQwr3WsFm8kM3LdR9UUXrzEUBUwPWCsx8NHP3YpH5hHG +k+qiPLYwsHrPrbmxZwhh7Q6VJ3QY6EX30HwQh5Bif5J034KBP27eeKTdB1C/ +u+e3bigDW/Hag9/FTPD6XP+08SgD7T/S416fZgJXdFGOWQQDSdn8lKdeTLC4 +flB31wkGnolafKQqzYTOd6sOhScw8PO9jRrnMxnwZa/mQHU2A91T3h9/c9kQ +ZA6fq9N8zEDljwZjrEIaXPoTqHehiXi+jMGF1gQacGdYVH9qYSDXBW2ehSAa +fKlZc7uonYElF3t4SrVpUM91Nkeki4Fz/H55ds0G4JEZF7X0kYGyO1bzs6b0 +IafhhN7D9UyUyigIlnalgoC9e7W0IBMpPy2mjjOpEDdiQInayMTlAL6ds8pU +CF6zrKwtxkS1Rp/grQt6oO8QKVpCYqK9gqBt0xU9eDMaNp+4jYnxAQkNMb26 +ILbuULWdGxPPfMOmyCPbodQ0NnrWnYmXlmUUTXdvB53YS6ZXPJlYxxWrro7b +wX62qqfPj4lD5kPtdhu3Q9KbxR/+h5hoU9ql1F+tA8slp02i45lokt0j/P3H +Nug3vNJVVs7EZGe78bP52hB8rDTPqoKJxfKD59KTtWGp4l7AZBUTlzI+Ha8J +1wYRxb7v22qYmJlnOWZprQ02a+VkHzxmoteqfmPpOS1o7C7b19XDxKvnL636 +xdIEa8H7lMg+Jp7OzeznTdWEvh3tS5IDTAxxCWRigCYs1H9N9h5h4h224nu6 +pCZQirXvfv7CxNyVwFDrOAo09htHpk4x0Ymbe98DDwpYi+4ErVkmAq9OsKce +BQLPHXsdscjERk/fj3JfNWDhcVKuxDITuZdfrsInGnDmZ7Z//U8mek/URFws +1oCNurc1vFaYGD5J3cgbqwEFh+sX//xh4vvs62W3d2vA/wA/biti "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.07976578362651533}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13337,6 +14772,7 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13364,7 +14800,8 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.22160540372702894`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07976578362651533}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13372,17 +14809,637 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913381496467495`*^9}, + CellChangeTimes->{3.9913381496467495`*^9, 3.994358003557066*^9}, CellLabel-> - "Out[304]=",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] + "Out[138]=",ExpressionUUID->"717f74bd-0bf2-497c-b696-02dd75300242"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ea848967-083d-ea47-bce0-\ -5c3b93725916"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[139]:=",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8lPsXB3BRpERkX8ZYKwwSw4wZ51izb4XImixtFKJIkUhSISHZk1tX +WWYmsrRcS5e0WiKEJKmsWdLi9nt+fz2v9+t5Pdt5zud8vwp7Q50DuLm4uKxW +cXH9/7g01N6ifKHUaDj/Vp3rAwuj7gLJE8Z9Z+BzwFWzxQFlQLGXeyX7MuB0 +q317y4AuRDr+3cvTVwItfdX8JQNmIDwtkfGjlwVy24JKAgd2wXCjfehCbxPs +2O7QU9S/DyyUv7yb6+2EXRIpz/J7I+BHr/7V2d5RMLGsnC7sOAvNpn+Vvi6Z +h0tRjGOUiKsgO1w3vldjBbL4gv5E+haC6CGfv/lMefDB5spOsx2lkLHNosHe +ZS0Kti1NCby7BW9ztB/PbdyAbtZeid3sO5DbVS4UqbIBnX38Q8Ka74CH4Gaf +n7QNKFXdbcHXdQcGE+T+4/bfgNwqOTVi3+7ASMg6hui9DTh2jndzq9ZdmDAb +q6W6C6KJkgPvwdt3YXk2uzKmWAiLHILS665WwIXS0y+5pYRxv/t3ne4tVWCt +u19ETEkYTVrMsnZpVcHaFmeXzRRhXLN1kvpKrwrOflAZsDEWxpJkZ/U6kyo4 +qfhsPHO/MCZamj508qyCkCLJ/1TrhbFHN+FM3qUqcMqr1rDZI4L3rI3vps1U +gUTmh/NX8jchTWLrycaSapBUv3d2uWwTXh7VZNz+qxqkm5JOe1VtQqf6uyXp +d6qBNLv12ObmTcg7M+/rUlMNKrZHfBsmNuHWXyKZt9qrYfvqFeqH7aK4dvBL +QOxMNThEiI/pPBXF83ErBe/0WeC4fmIou0sUL0ZUWhgxWOBcUvf296Aoqpsp +nMtFFri+8nz5ZEYUBb5wvza3YoGXxo16DzExpJm6xAV5sODgmFb6GV8xvMhT +JtQbw4Jzu6yMOpfEcEvQLZ+ABhZIc15Ic68Sx+TN/wpceMSCik27vm9bL45p +efFny5tZ8KbTuypdXhzzw2y6BjtYoOwUoehkKY4rA6ZfuQZZ0GRXyPvqmjjW +Dwgs2v9iwYrF4ovnDAnMO2l8mJvKhrSy6PIVCwm0Z8l7xdPYoMzLlUxxkkBl +B7LkLwYbbFvXGV8MkMC+1XqzQ6ZsyDUls20vSSAnYZQS7MQGA7TJ7hiWwOi/ +ojfGH2RDOK3Yp/2MJDJHusNeXGeDdZHggk2qJArK8K6KKmCDIt/J5BdXJTHp +w2pBmWI2vOp2re66JYl1B0ZuupSxQfOIAM/QC0lMbSzuzaxiw0RZVNk3aSnk +DDnlG7aw4dGGj/RjylJIWUrZkfeEDVkRzi+/U6Rwy+rNUcttbDA3oSz/Ril8 +Mh4YfOM5G0rejVrxBUnhPvETRc1v2OApaj8lw5ZCcfXXvZQJNmyPaYgvaJTC +XGX2ph1f2LBudIu4whMp/Kmp9W7PJBvqKnlA9a0UFrgYyhyfZYO4TV2a9h8p +dHz0cWfMMvH+8cq65jbS2C/3wOguHwfMZn5Gh3yQxpILIknNihw4YZmp9s+k +NNYe8pzcocyBimJK/6YlabSv+EJuU+GA5C5fWt1aGQx0Zn1v2MKByfut33k0 +ZdDJ0O7IUU0OXDmTFnHtuAxeHdysJ0rjQNvAVuXJeBnMEMjoc6Fz4Lduc5fR +BRlsILm5XjHkQOCnRZ2xfBmM7FEdW2XEAbrtnjnNZhlcTrvmc9eEA6NiqiEt +G2TRcWldmpENByRCH8lJSMhiUq8ow8iWA7Ztu5/vJ8viROj4S5odB2qiL2gI +bZfFf4r3s5QdOJAyPPvFfbcs+k4txrQ7c+CRQUruHT9ZvOdNP31rJwcW0pWs +/xyQxWdJJ44m7OKAt5nr7dJYWXS4eU2V4soBndsNQTMlsqhnkjDl4M6BIG4X +CZM7shhUWXNG0IMDeXumn2Tek0XejmDBdsK8ggqq9DZZ9KxX3KDjyYH+sKSx +s1OyKGGj2tzlzQGhZ/KZvUuySLM6vTnMh6i/Sp2pGpccqtqopQj4EvXu/Vry +UkQO79Gj7PX8OBDPcPKTNpBD0SvUGVd/Dlh6F3zTN5HDD9bq88OEBeO+JrjY +ymFD3i6rffuI92lOLEvzlUNbocw57wAO+H/s1K84IIcCT10segir8ZHbOyLk +0N/xxjeLQA7ct67/ynteDmkfrN1kgzhw+hBfrPIVOQy45CUSR9ji0i5Bk3w5 +/A2H1YYJd7+e1o6tlsON5bxRl4M5cH3esCm3QQ7lhl0qRgjvFTu/836rHJIF +KJaU/RyY3a0UOf9WDle1Ct2+T7g2+gif8Jgc6p2aCvtO+FTegxzNaTmMSP5e +uu0AB8wfrlOzXZbDuU+5GERYYMStYT83CRu0LXbkEO5addP2nAAJjyXur28h +nKv07V2pOAn5syKvTxL2NYfQJjIJ7QpGvgod5MDmoFSuETUStu6TvatJeDr5 +bfqKLgmtaUUjloQ5f6sqyQAJa+c/nPMmHPMsnGNgRcLr33xLQwmbTD82d91J +ws9SGfonCfNvFOwN9yJh+et5k7OEX23bE5weRMLi1avbzhHO3nnrR8VREi6S +TNqSCHsfW0x5FkPCGQEt83jCKtkmsl8SSZhBs8Oog//Pz+W7fGkkdL5Ibggm +zO4fNFLJJeGDQ5q1LoSjf299ZVJKQqnaFT0jwsakKD/fChIqtorTFAmvxZZv +sfdJ+FcQT9Mqwi/8hM9ebyLh1nH7zkGiHlcTvMXqnpEweyXxIJuw583ysjdv +iO8Zol5OJKz477L+wggJn1HmjHYS/jxh3i78lYRGf8xPyhKuWnfFQ2uRhCZ9 +/1q+J/5XlMbIV9s/JIy5s66smLCRPSX2AL889gzeuOpF+Fn6v4U35eRxekZP +p43ohyts0W3Nm+Wx8m/f0UjCHj1+TSPb5PFriLm6AuEJyd9jMhbyWKJbdTGY +6K9KulUkzZE4bxz+9xrCkZ5ZfG4e8nj58IHAAqJfeYq01TJC5HHdoVNNTUQ/ +P/0ntqHyuDwWOn8IsCec9uGp7fMz8mh3UqCyh8gDaXNA6NpsefS9b03rJfJC +r7jGOfVIHhUkZT3LiHyZ9b5YmW6TR4ss22tShO25Vu/w6ZTHfPqMxHkij/7O +IW/hozyGUwSHPYm8WsQonI5bQ8b3+XENvUS+O4QabxisI6OVFr86hbBjqWvb +rCAZH04qfTq1hwN7nl8Q9pMko0Yoy1qCmA9H5JduGKuTcU1H/7iMGwcW2Wlt +P7TIWKhxdXQnMW+iLdWnqnXJGHQeqMkuHEg86ktVNCLjwTUqXz8S8yq3+Wkb +txPhwjvsY44caAkqnGqOJCPv62jeCUsOWP2miZyMIWOtO1trfAfRD2ndVN04 +Mo4NWLaNWHDgbR1/XOl5MlZTE+06zIg8rI8QScwjY+o5285jSMz3Kkt9iyYy ++riqSSrqcyDf7MOe/54QPuIw+UmP6Je3sXE1HWR0ypSz/FuXAxRudrtqDxmF +58bylHWIvOyS8+SbIKNEat74jAYHDi3PxbVtUMCzM1vcRxWI+h8NFB8XUcDK +9ULGzmSif7/0l/NIKuC3LT06D0kcuDnQ/MZIUQHbPBQZKTIcGHp4VeMeVQGf +So2Q5kU54JBI6yv2UcBG8a1z/MT6pSMSrxVTrYB3m428PIj1kevCYktOjQKm +96ckOIyz4QXPAY+aBgWc6sxYwjE2HFx0TpxrVcAbI4c7JEfYUNqnPBDUr4Bf +WksO5fUS62VhW9IuHkUkv2CELbay4Yf6xiGKiyK+3yEwuFLIhqV86fjtHoo4 +oPXrdGo+GxaEVJRpPorI55n1RoLYP0zP0w6Y7VdEeXObUuUsNow2+C95xCqi +VKLyingqG57a1Aom31TExWSZM75RxP7koDeMLipiSXzg+6s2bGCU3ynKylLC +OG/Rf3i+smCAXF5ofl0JZ6c3BPBNsCA663bBQqESWmwdLln7kQW18WV5zreV +8PgkzPMMs0Bnd1GOYKMSSronSw11smDrmsy0pPdKaO6jJ6xYzwJxn5i4SA1l +DL273msxiQVzIta+rk3KeCLuoImWNAvGUn1dw/hUMfVC+fF80Wqwmomy+kjd +jDNaqXrH+Kpg0n9tOOf0FlRO+We9WcldYv8vwX2uaSsuhkaI+6qXg8hz1UtV +M2qoIOXH39J3C2STKx2pVA2Mt4e1qh5lkKNO27gpiIJ8KeN56WKl8FTaWG8+ +XRNvXbNpf/6tGOiyTWlab7RwribZTiihEAR5SiL8zmijQ+d7056q60CKl2e4 +q27D9B6ebb7D2cCv4lnj/O82vCVe1pUUlQmaTKnKKC8d/Ph8Mbz7WjqEDYk0 +W3Ntx/hOJ7v8vy7CzHyqi1XOdtwu6ydzQuw87NB6kmtF0cW6KYvBUuVEeDhv ++Ov7C13807MuJSkkHkI0dPpfB+jh999b9R5+PgnM6X3d7vxUFF/YFF1yKArM +lSXtNpRQMfGr+8FImXDgTLUq7Culot1PhtvS+nBQrg1fqi+jIifR4k3c7zBY +bf2yMLicirxppcfvvQuDptCkb80cKqZNF9XnFYWBUcNCdvS/VNS1V8j23hIG +VOfXo58mqfir9P5/KXAUtsSlHG/S18e7fOG+beKh0Gh4c40tXR/9G/T5U3+G +gOP3Rxk9DH18NlmXHDAUAsdDFu9MGOvjbE5xn3tZCLR5+r4XtNVHu1dBLhb6 +IRBMo1rv8dXHq18Dril5HYbb397LLCTrI6uy637W/YOgFkB7pNKvjwdOCfSW +lQfDZUX7nwmD+rhSa260NisYFob36o0OEdc/OfnjRFwwPPRILS/4oI9OJTTz +Sy7B4Ow4nC0xpY99Gd+UTnAFwwnDxCP8XAYYXDOY4+AeBG3CrxWmVAxQaXl2 +oFE8EAIeBp/lHDVA1vBl58sP/WH68Jco8wgDLE3QCDEq94fjcocOvok0QM+C +3t8r2f6QcjLUeTnGAFdKd1tUHPWHKnokmZFkgAuR6x07Vfzhd01CY3OuAV5v +/RVLSt8LGZUFC53NBij8OJAZHe4Hj4q6982J0fAprBl43u4NI7YKPpGSNKSw +Ryg25d7A9eOw+y9pGtYandr0IdUbTJz47NeQafjQ9Y/1XkdveLKKri+lRsOq +KAn3vD4veLa3kN/YiIYet9NOT095Qr/ygYq0QBoyhzPMz6vvgYVbf75r1dKw +8ZUg/fa0G4y7WhSdr6Oh9bOH94Z63aBv9UXLDw00fGfPH7L5Hzdo8JW+lvWY +hucsFb2/XXGDM5J69JV2GibUd/5ziO4GG5MPnHw6SEMhPdm3n1JcQSOohyuA +m45FkS4Pcmku4K9Szp9rR0cK14yDSoczRLd6H1B1pKOOzQ83/VpnSAsQ6WA5 +0zFwso7pecMZGm+eSO1woyPPpZaAoRhnEFW1FFrxo6PlTHt8E8UZnqh+FPWN +pONN39qe35lOoLZFnqxaSEcuHf0tXUccYU7tCpU1S0dOYZTywD1b6HuG5pvm +6SiaR5IqyLGFxyHTOyMW6bjvxsDrmBhbuMSyOkr9Sced0faG54xtQY3Odaee +xxDX8E+UDLywgb1WhxWaxQ2x7mnW1eBpa+gO2iHQzTDESwcOqJ9FK7hf+uv9 +YrIhJutf3BmhYQFU04jv1hcMsVd0seKhmAXcez8pUHTREFOmdomQ/pgDizSk +b51hiB31jLsyneZwJ+fxxYLrhriT9WrPxhPmUJSaSNtRYYizYf9yvX5qBucj +hNJzugzxVrBHCyPWFNZuSi6b6jHE99PDUmv3m0JSNVejSZ8hknOHD4/vMoWz +03Pjk4OG+J/faOeAhimcCu5mGI8T96u1G/rrnQmEeV6b+LxsiAEdbudqTUzA +w0wJDUkMlJ/YWWgjbQwr3WsFm8kM3LdR9UUXrzEUBUwPWCsx8NHP3YpH5hHG +k+qiPLYwsHrPrbmxZwhh7Q6VJ3QY6EX30HwQh5Bif5J034KBP27eeKTdB1C/ +u+e3bigDW/Hag9/FTPD6XP+08SgD7T/S416fZgJXdFGOWQQDSdn8lKdeTLC4 +flB31wkGnolafKQqzYTOd6sOhScw8PO9jRrnMxnwZa/mQHU2A91T3h9/c9kQ +ZA6fq9N8zEDljwZjrEIaXPoTqHehiXi+jMGF1gQacGdYVH9qYSDXBW2ehSAa +fKlZc7uonYElF3t4SrVpUM91Nkeki4Fz/H55ds0G4JEZF7X0kYGyO1bzs6b0 +IafhhN7D9UyUyigIlnalgoC9e7W0IBMpPy2mjjOpEDdiQInayMTlAL6ds8pU +CF6zrKwtxkS1Rp/grQt6oO8QKVpCYqK9gqBt0xU9eDMaNp+4jYnxAQkNMb26 +ILbuULWdGxPPfMOmyCPbodQ0NnrWnYmXlmUUTXdvB53YS6ZXPJlYxxWrro7b +wX62qqfPj4lD5kPtdhu3Q9KbxR/+h5hoU9ql1F+tA8slp02i45lokt0j/P3H +Nug3vNJVVs7EZGe78bP52hB8rDTPqoKJxfKD59KTtWGp4l7AZBUTlzI+Ha8J +1wYRxb7v22qYmJlnOWZprQ02a+VkHzxmoteqfmPpOS1o7C7b19XDxKvnL636 +xdIEa8H7lMg+Jp7OzeznTdWEvh3tS5IDTAxxCWRigCYs1H9N9h5h4h224nu6 +pCZQirXvfv7CxNyVwFDrOAo09htHpk4x0Ymbe98DDwpYi+4ErVkmAq9OsKce +BQLPHXsdscjERk/fj3JfNWDhcVKuxDITuZdfrsInGnDmZ7Z//U8mek/URFws +1oCNurc1vFaYGD5J3cgbqwEFh+sX//xh4vvs62W3d2vA/wA/biti + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lPsXB3BRpERkX8ZYKwwSw4wZ51izb4XImixtFKJIkUhSISHZk1tX +WWYmsrRcS5e0WiKEJKmsWdLi9nt+fz2v9+t5Pdt5zud8vwp7Q50DuLm4uKxW +cXH9/7g01N6ifKHUaDj/Vp3rAwuj7gLJE8Z9Z+BzwFWzxQFlQLGXeyX7MuB0 +q317y4AuRDr+3cvTVwItfdX8JQNmIDwtkfGjlwVy24JKAgd2wXCjfehCbxPs +2O7QU9S/DyyUv7yb6+2EXRIpz/J7I+BHr/7V2d5RMLGsnC7sOAvNpn+Vvi6Z +h0tRjGOUiKsgO1w3vldjBbL4gv5E+haC6CGfv/lMefDB5spOsx2lkLHNosHe +ZS0Kti1NCby7BW9ztB/PbdyAbtZeid3sO5DbVS4UqbIBnX38Q8Ka74CH4Gaf +n7QNKFXdbcHXdQcGE+T+4/bfgNwqOTVi3+7ASMg6hui9DTh2jndzq9ZdmDAb +q6W6C6KJkgPvwdt3YXk2uzKmWAiLHILS665WwIXS0y+5pYRxv/t3ne4tVWCt +u19ETEkYTVrMsnZpVcHaFmeXzRRhXLN1kvpKrwrOflAZsDEWxpJkZ/U6kyo4 +qfhsPHO/MCZamj508qyCkCLJ/1TrhbFHN+FM3qUqcMqr1rDZI4L3rI3vps1U +gUTmh/NX8jchTWLrycaSapBUv3d2uWwTXh7VZNz+qxqkm5JOe1VtQqf6uyXp +d6qBNLv12ObmTcg7M+/rUlMNKrZHfBsmNuHWXyKZt9qrYfvqFeqH7aK4dvBL +QOxMNThEiI/pPBXF83ErBe/0WeC4fmIou0sUL0ZUWhgxWOBcUvf296Aoqpsp +nMtFFri+8nz5ZEYUBb5wvza3YoGXxo16DzExpJm6xAV5sODgmFb6GV8xvMhT +JtQbw4Jzu6yMOpfEcEvQLZ+ABhZIc15Ic68Sx+TN/wpceMSCik27vm9bL45p +efFny5tZ8KbTuypdXhzzw2y6BjtYoOwUoehkKY4rA6ZfuQZZ0GRXyPvqmjjW +Dwgs2v9iwYrF4ovnDAnMO2l8mJvKhrSy6PIVCwm0Z8l7xdPYoMzLlUxxkkBl +B7LkLwYbbFvXGV8MkMC+1XqzQ6ZsyDUls20vSSAnYZQS7MQGA7TJ7hiWwOi/ +ojfGH2RDOK3Yp/2MJDJHusNeXGeDdZHggk2qJArK8K6KKmCDIt/J5BdXJTHp +w2pBmWI2vOp2re66JYl1B0ZuupSxQfOIAM/QC0lMbSzuzaxiw0RZVNk3aSnk +DDnlG7aw4dGGj/RjylJIWUrZkfeEDVkRzi+/U6Rwy+rNUcttbDA3oSz/Ril8 +Mh4YfOM5G0rejVrxBUnhPvETRc1v2OApaj8lw5ZCcfXXvZQJNmyPaYgvaJTC +XGX2ph1f2LBudIu4whMp/Kmp9W7PJBvqKnlA9a0UFrgYyhyfZYO4TV2a9h8p +dHz0cWfMMvH+8cq65jbS2C/3wOguHwfMZn5Gh3yQxpILIknNihw4YZmp9s+k +NNYe8pzcocyBimJK/6YlabSv+EJuU+GA5C5fWt1aGQx0Zn1v2MKByfut33k0 +ZdDJ0O7IUU0OXDmTFnHtuAxeHdysJ0rjQNvAVuXJeBnMEMjoc6Fz4Lduc5fR +BRlsILm5XjHkQOCnRZ2xfBmM7FEdW2XEAbrtnjnNZhlcTrvmc9eEA6NiqiEt +G2TRcWldmpENByRCH8lJSMhiUq8ow8iWA7Ztu5/vJ8viROj4S5odB2qiL2gI +bZfFf4r3s5QdOJAyPPvFfbcs+k4txrQ7c+CRQUruHT9ZvOdNP31rJwcW0pWs +/xyQxWdJJ44m7OKAt5nr7dJYWXS4eU2V4soBndsNQTMlsqhnkjDl4M6BIG4X +CZM7shhUWXNG0IMDeXumn2Tek0XejmDBdsK8ggqq9DZZ9KxX3KDjyYH+sKSx +s1OyKGGj2tzlzQGhZ/KZvUuySLM6vTnMh6i/Sp2pGpccqtqopQj4EvXu/Vry +UkQO79Gj7PX8OBDPcPKTNpBD0SvUGVd/Dlh6F3zTN5HDD9bq88OEBeO+JrjY +ymFD3i6rffuI92lOLEvzlUNbocw57wAO+H/s1K84IIcCT10segir8ZHbOyLk +0N/xxjeLQA7ct67/ynteDmkfrN1kgzhw+hBfrPIVOQy45CUSR9ji0i5Bk3w5 +/A2H1YYJd7+e1o6tlsON5bxRl4M5cH3esCm3QQ7lhl0qRgjvFTu/836rHJIF +KJaU/RyY3a0UOf9WDle1Ct2+T7g2+gif8Jgc6p2aCvtO+FTegxzNaTmMSP5e +uu0AB8wfrlOzXZbDuU+5GERYYMStYT83CRu0LXbkEO5addP2nAAJjyXur28h +nKv07V2pOAn5syKvTxL2NYfQJjIJ7QpGvgod5MDmoFSuETUStu6TvatJeDr5 +bfqKLgmtaUUjloQ5f6sqyQAJa+c/nPMmHPMsnGNgRcLr33xLQwmbTD82d91J +ws9SGfonCfNvFOwN9yJh+et5k7OEX23bE5weRMLi1avbzhHO3nnrR8VREi6S +TNqSCHsfW0x5FkPCGQEt83jCKtkmsl8SSZhBs8Oog//Pz+W7fGkkdL5Ibggm +zO4fNFLJJeGDQ5q1LoSjf299ZVJKQqnaFT0jwsakKD/fChIqtorTFAmvxZZv +sfdJ+FcQT9Mqwi/8hM9ebyLh1nH7zkGiHlcTvMXqnpEweyXxIJuw583ysjdv +iO8Zol5OJKz477L+wggJn1HmjHYS/jxh3i78lYRGf8xPyhKuWnfFQ2uRhCZ9 +/1q+J/5XlMbIV9s/JIy5s66smLCRPSX2AL889gzeuOpF+Fn6v4U35eRxekZP +p43ohyts0W3Nm+Wx8m/f0UjCHj1+TSPb5PFriLm6AuEJyd9jMhbyWKJbdTGY +6K9KulUkzZE4bxz+9xrCkZ5ZfG4e8nj58IHAAqJfeYq01TJC5HHdoVNNTUQ/ +P/0ntqHyuDwWOn8IsCec9uGp7fMz8mh3UqCyh8gDaXNA6NpsefS9b03rJfJC +r7jGOfVIHhUkZT3LiHyZ9b5YmW6TR4ss22tShO25Vu/w6ZTHfPqMxHkij/7O +IW/hozyGUwSHPYm8WsQonI5bQ8b3+XENvUS+O4QabxisI6OVFr86hbBjqWvb +rCAZH04qfTq1hwN7nl8Q9pMko0Yoy1qCmA9H5JduGKuTcU1H/7iMGwcW2Wlt +P7TIWKhxdXQnMW+iLdWnqnXJGHQeqMkuHEg86ktVNCLjwTUqXz8S8yq3+Wkb +txPhwjvsY44caAkqnGqOJCPv62jeCUsOWP2miZyMIWOtO1trfAfRD2ndVN04 +Mo4NWLaNWHDgbR1/XOl5MlZTE+06zIg8rI8QScwjY+o5285jSMz3Kkt9iyYy ++riqSSrqcyDf7MOe/54QPuIw+UmP6Je3sXE1HWR0ypSz/FuXAxRudrtqDxmF +58bylHWIvOyS8+SbIKNEat74jAYHDi3PxbVtUMCzM1vcRxWI+h8NFB8XUcDK +9ULGzmSif7/0l/NIKuC3LT06D0kcuDnQ/MZIUQHbPBQZKTIcGHp4VeMeVQGf +So2Q5kU54JBI6yv2UcBG8a1z/MT6pSMSrxVTrYB3m428PIj1kevCYktOjQKm +96ckOIyz4QXPAY+aBgWc6sxYwjE2HFx0TpxrVcAbI4c7JEfYUNqnPBDUr4Bf +WksO5fUS62VhW9IuHkUkv2CELbay4Yf6xiGKiyK+3yEwuFLIhqV86fjtHoo4 +oPXrdGo+GxaEVJRpPorI55n1RoLYP0zP0w6Y7VdEeXObUuUsNow2+C95xCqi +VKLyingqG57a1Aom31TExWSZM75RxP7koDeMLipiSXzg+6s2bGCU3ynKylLC +OG/Rf3i+smCAXF5ofl0JZ6c3BPBNsCA663bBQqESWmwdLln7kQW18WV5zreV +8PgkzPMMs0Bnd1GOYKMSSronSw11smDrmsy0pPdKaO6jJ6xYzwJxn5i4SA1l +DL273msxiQVzIta+rk3KeCLuoImWNAvGUn1dw/hUMfVC+fF80Wqwmomy+kjd +jDNaqXrH+Kpg0n9tOOf0FlRO+We9WcldYv8vwX2uaSsuhkaI+6qXg8hz1UtV +M2qoIOXH39J3C2STKx2pVA2Mt4e1qh5lkKNO27gpiIJ8KeN56WKl8FTaWG8+ +XRNvXbNpf/6tGOiyTWlab7RwribZTiihEAR5SiL8zmijQ+d7056q60CKl2e4 +q27D9B6ebb7D2cCv4lnj/O82vCVe1pUUlQmaTKnKKC8d/Ph8Mbz7WjqEDYk0 +W3Ntx/hOJ7v8vy7CzHyqi1XOdtwu6ydzQuw87NB6kmtF0cW6KYvBUuVEeDhv ++Ov7C13807MuJSkkHkI0dPpfB+jh999b9R5+PgnM6X3d7vxUFF/YFF1yKArM +lSXtNpRQMfGr+8FImXDgTLUq7Culot1PhtvS+nBQrg1fqi+jIifR4k3c7zBY +bf2yMLicirxppcfvvQuDptCkb80cKqZNF9XnFYWBUcNCdvS/VNS1V8j23hIG +VOfXo58mqfir9P5/KXAUtsSlHG/S18e7fOG+beKh0Gh4c40tXR/9G/T5U3+G +gOP3Rxk9DH18NlmXHDAUAsdDFu9MGOvjbE5xn3tZCLR5+r4XtNVHu1dBLhb6 +IRBMo1rv8dXHq18Dril5HYbb397LLCTrI6uy637W/YOgFkB7pNKvjwdOCfSW +lQfDZUX7nwmD+rhSa260NisYFob36o0OEdc/OfnjRFwwPPRILS/4oI9OJTTz +Sy7B4Ow4nC0xpY99Gd+UTnAFwwnDxCP8XAYYXDOY4+AeBG3CrxWmVAxQaXl2 +oFE8EAIeBp/lHDVA1vBl58sP/WH68Jco8wgDLE3QCDEq94fjcocOvok0QM+C +3t8r2f6QcjLUeTnGAFdKd1tUHPWHKnokmZFkgAuR6x07Vfzhd01CY3OuAV5v +/RVLSt8LGZUFC53NBij8OJAZHe4Hj4q6982J0fAprBl43u4NI7YKPpGSNKSw +Ryg25d7A9eOw+y9pGtYandr0IdUbTJz47NeQafjQ9Y/1XkdveLKKri+lRsOq +KAn3vD4veLa3kN/YiIYet9NOT095Qr/ygYq0QBoyhzPMz6vvgYVbf75r1dKw +8ZUg/fa0G4y7WhSdr6Oh9bOH94Z63aBv9UXLDw00fGfPH7L5Hzdo8JW+lvWY +hucsFb2/XXGDM5J69JV2GibUd/5ziO4GG5MPnHw6SEMhPdm3n1JcQSOohyuA +m45FkS4Pcmku4K9Szp9rR0cK14yDSoczRLd6H1B1pKOOzQ83/VpnSAsQ6WA5 +0zFwso7pecMZGm+eSO1woyPPpZaAoRhnEFW1FFrxo6PlTHt8E8UZnqh+FPWN +pONN39qe35lOoLZFnqxaSEcuHf0tXUccYU7tCpU1S0dOYZTywD1b6HuG5pvm +6SiaR5IqyLGFxyHTOyMW6bjvxsDrmBhbuMSyOkr9Sced0faG54xtQY3Odaee +xxDX8E+UDLywgb1WhxWaxQ2x7mnW1eBpa+gO2iHQzTDESwcOqJ9FK7hf+uv9 +YrIhJutf3BmhYQFU04jv1hcMsVd0seKhmAXcez8pUHTREFOmdomQ/pgDizSk +b51hiB31jLsyneZwJ+fxxYLrhriT9WrPxhPmUJSaSNtRYYizYf9yvX5qBucj +hNJzugzxVrBHCyPWFNZuSi6b6jHE99PDUmv3m0JSNVejSZ8hknOHD4/vMoWz +03Pjk4OG+J/faOeAhimcCu5mGI8T96u1G/rrnQmEeV6b+LxsiAEdbudqTUzA +w0wJDUkMlJ/YWWgjbQwr3WsFm8kM3LdR9UUXrzEUBUwPWCsx8NHP3YpH5hHG +k+qiPLYwsHrPrbmxZwhh7Q6VJ3QY6EX30HwQh5Bif5J034KBP27eeKTdB1C/ +u+e3bigDW/Hag9/FTPD6XP+08SgD7T/S416fZgJXdFGOWQQDSdn8lKdeTLC4 +flB31wkGnolafKQqzYTOd6sOhScw8PO9jRrnMxnwZa/mQHU2A91T3h9/c9kQ +ZA6fq9N8zEDljwZjrEIaXPoTqHehiXi+jMGF1gQacGdYVH9qYSDXBW2ehSAa +fKlZc7uonYElF3t4SrVpUM91Nkeki4Fz/H55ds0G4JEZF7X0kYGyO1bzs6b0 +IafhhN7D9UyUyigIlnalgoC9e7W0IBMpPy2mjjOpEDdiQInayMTlAL6ds8pU +CF6zrKwtxkS1Rp/grQt6oO8QKVpCYqK9gqBt0xU9eDMaNp+4jYnxAQkNMb26 +ILbuULWdGxPPfMOmyCPbodQ0NnrWnYmXlmUUTXdvB53YS6ZXPJlYxxWrro7b +wX62qqfPj4lD5kPtdhu3Q9KbxR/+h5hoU9ql1F+tA8slp02i45lokt0j/P3H +Nug3vNJVVs7EZGe78bP52hB8rDTPqoKJxfKD59KTtWGp4l7AZBUTlzI+Ha8J +1wYRxb7v22qYmJlnOWZprQ02a+VkHzxmoteqfmPpOS1o7C7b19XDxKvnL636 +xdIEa8H7lMg+Jp7OzeznTdWEvh3tS5IDTAxxCWRigCYs1H9N9h5h4h224nu6 +pCZQirXvfv7CxNyVwFDrOAo09htHpk4x0Ymbe98DDwpYi+4ErVkmAq9OsKce +BQLPHXsdscjERk/fj3JfNWDhcVKuxDITuZdfrsInGnDmZ7Z//U8mek/URFws +1oCNurc1vFaYGD5J3cgbqwEFh+sX//xh4vvs62W3d2vA/wA/biti + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07976578362651533}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07976578362651533}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8lPsXB3BRpERkX8ZYKwwSw4wZ51izb4XImixtFKJIkUhSISHZk1tX +WWYmsrRcS5e0WiKEJKmsWdLi9nt+fz2v9+t5Pdt5zud8vwp7Q50DuLm4uKxW +cXH9/7g01N6ifKHUaDj/Vp3rAwuj7gLJE8Z9Z+BzwFWzxQFlQLGXeyX7MuB0 +q317y4AuRDr+3cvTVwItfdX8JQNmIDwtkfGjlwVy24JKAgd2wXCjfehCbxPs +2O7QU9S/DyyUv7yb6+2EXRIpz/J7I+BHr/7V2d5RMLGsnC7sOAvNpn+Vvi6Z +h0tRjGOUiKsgO1w3vldjBbL4gv5E+haC6CGfv/lMefDB5spOsx2lkLHNosHe +ZS0Kti1NCby7BW9ztB/PbdyAbtZeid3sO5DbVS4UqbIBnX38Q8Ka74CH4Gaf +n7QNKFXdbcHXdQcGE+T+4/bfgNwqOTVi3+7ASMg6hui9DTh2jndzq9ZdmDAb +q6W6C6KJkgPvwdt3YXk2uzKmWAiLHILS665WwIXS0y+5pYRxv/t3ne4tVWCt +u19ETEkYTVrMsnZpVcHaFmeXzRRhXLN1kvpKrwrOflAZsDEWxpJkZ/U6kyo4 +qfhsPHO/MCZamj508qyCkCLJ/1TrhbFHN+FM3qUqcMqr1rDZI4L3rI3vps1U +gUTmh/NX8jchTWLrycaSapBUv3d2uWwTXh7VZNz+qxqkm5JOe1VtQqf6uyXp +d6qBNLv12ObmTcg7M+/rUlMNKrZHfBsmNuHWXyKZt9qrYfvqFeqH7aK4dvBL +QOxMNThEiI/pPBXF83ErBe/0WeC4fmIou0sUL0ZUWhgxWOBcUvf296Aoqpsp +nMtFFri+8nz5ZEYUBb5wvza3YoGXxo16DzExpJm6xAV5sODgmFb6GV8xvMhT +JtQbw4Jzu6yMOpfEcEvQLZ+ABhZIc15Ic68Sx+TN/wpceMSCik27vm9bL45p +efFny5tZ8KbTuypdXhzzw2y6BjtYoOwUoehkKY4rA6ZfuQZZ0GRXyPvqmjjW +Dwgs2v9iwYrF4ovnDAnMO2l8mJvKhrSy6PIVCwm0Z8l7xdPYoMzLlUxxkkBl +B7LkLwYbbFvXGV8MkMC+1XqzQ6ZsyDUls20vSSAnYZQS7MQGA7TJ7hiWwOi/ +ojfGH2RDOK3Yp/2MJDJHusNeXGeDdZHggk2qJArK8K6KKmCDIt/J5BdXJTHp +w2pBmWI2vOp2re66JYl1B0ZuupSxQfOIAM/QC0lMbSzuzaxiw0RZVNk3aSnk +DDnlG7aw4dGGj/RjylJIWUrZkfeEDVkRzi+/U6Rwy+rNUcttbDA3oSz/Ril8 +Mh4YfOM5G0rejVrxBUnhPvETRc1v2OApaj8lw5ZCcfXXvZQJNmyPaYgvaJTC +XGX2ph1f2LBudIu4whMp/Kmp9W7PJBvqKnlA9a0UFrgYyhyfZYO4TV2a9h8p +dHz0cWfMMvH+8cq65jbS2C/3wOguHwfMZn5Gh3yQxpILIknNihw4YZmp9s+k +NNYe8pzcocyBimJK/6YlabSv+EJuU+GA5C5fWt1aGQx0Zn1v2MKByfut33k0 +ZdDJ0O7IUU0OXDmTFnHtuAxeHdysJ0rjQNvAVuXJeBnMEMjoc6Fz4Lduc5fR +BRlsILm5XjHkQOCnRZ2xfBmM7FEdW2XEAbrtnjnNZhlcTrvmc9eEA6NiqiEt +G2TRcWldmpENByRCH8lJSMhiUq8ow8iWA7Ztu5/vJ8viROj4S5odB2qiL2gI +bZfFf4r3s5QdOJAyPPvFfbcs+k4txrQ7c+CRQUruHT9ZvOdNP31rJwcW0pWs +/xyQxWdJJ44m7OKAt5nr7dJYWXS4eU2V4soBndsNQTMlsqhnkjDl4M6BIG4X +CZM7shhUWXNG0IMDeXumn2Tek0XejmDBdsK8ggqq9DZZ9KxX3KDjyYH+sKSx +s1OyKGGj2tzlzQGhZ/KZvUuySLM6vTnMh6i/Sp2pGpccqtqopQj4EvXu/Vry +UkQO79Gj7PX8OBDPcPKTNpBD0SvUGVd/Dlh6F3zTN5HDD9bq88OEBeO+JrjY +ymFD3i6rffuI92lOLEvzlUNbocw57wAO+H/s1K84IIcCT10segir8ZHbOyLk +0N/xxjeLQA7ct67/ynteDmkfrN1kgzhw+hBfrPIVOQy45CUSR9ji0i5Bk3w5 +/A2H1YYJd7+e1o6tlsON5bxRl4M5cH3esCm3QQ7lhl0qRgjvFTu/836rHJIF +KJaU/RyY3a0UOf9WDle1Ct2+T7g2+gif8Jgc6p2aCvtO+FTegxzNaTmMSP5e +uu0AB8wfrlOzXZbDuU+5GERYYMStYT83CRu0LXbkEO5addP2nAAJjyXur28h +nKv07V2pOAn5syKvTxL2NYfQJjIJ7QpGvgod5MDmoFSuETUStu6TvatJeDr5 +bfqKLgmtaUUjloQ5f6sqyQAJa+c/nPMmHPMsnGNgRcLr33xLQwmbTD82d91J +ws9SGfonCfNvFOwN9yJh+et5k7OEX23bE5weRMLi1avbzhHO3nnrR8VREi6S +TNqSCHsfW0x5FkPCGQEt83jCKtkmsl8SSZhBs8Oog//Pz+W7fGkkdL5Ibggm +zO4fNFLJJeGDQ5q1LoSjf299ZVJKQqnaFT0jwsakKD/fChIqtorTFAmvxZZv +sfdJ+FcQT9Mqwi/8hM9ebyLh1nH7zkGiHlcTvMXqnpEweyXxIJuw583ysjdv +iO8Zol5OJKz477L+wggJn1HmjHYS/jxh3i78lYRGf8xPyhKuWnfFQ2uRhCZ9 +/1q+J/5XlMbIV9s/JIy5s66smLCRPSX2AL889gzeuOpF+Fn6v4U35eRxekZP +p43ohyts0W3Nm+Wx8m/f0UjCHj1+TSPb5PFriLm6AuEJyd9jMhbyWKJbdTGY +6K9KulUkzZE4bxz+9xrCkZ5ZfG4e8nj58IHAAqJfeYq01TJC5HHdoVNNTUQ/ +P/0ntqHyuDwWOn8IsCec9uGp7fMz8mh3UqCyh8gDaXNA6NpsefS9b03rJfJC +r7jGOfVIHhUkZT3LiHyZ9b5YmW6TR4ss22tShO25Vu/w6ZTHfPqMxHkij/7O +IW/hozyGUwSHPYm8WsQonI5bQ8b3+XENvUS+O4QabxisI6OVFr86hbBjqWvb +rCAZH04qfTq1hwN7nl8Q9pMko0Yoy1qCmA9H5JduGKuTcU1H/7iMGwcW2Wlt +P7TIWKhxdXQnMW+iLdWnqnXJGHQeqMkuHEg86ktVNCLjwTUqXz8S8yq3+Wkb +txPhwjvsY44caAkqnGqOJCPv62jeCUsOWP2miZyMIWOtO1trfAfRD2ndVN04 +Mo4NWLaNWHDgbR1/XOl5MlZTE+06zIg8rI8QScwjY+o5285jSMz3Kkt9iyYy ++riqSSrqcyDf7MOe/54QPuIw+UmP6Je3sXE1HWR0ypSz/FuXAxRudrtqDxmF +58bylHWIvOyS8+SbIKNEat74jAYHDi3PxbVtUMCzM1vcRxWI+h8NFB8XUcDK +9ULGzmSif7/0l/NIKuC3LT06D0kcuDnQ/MZIUQHbPBQZKTIcGHp4VeMeVQGf +So2Q5kU54JBI6yv2UcBG8a1z/MT6pSMSrxVTrYB3m428PIj1kevCYktOjQKm +96ckOIyz4QXPAY+aBgWc6sxYwjE2HFx0TpxrVcAbI4c7JEfYUNqnPBDUr4Bf +WksO5fUS62VhW9IuHkUkv2CELbay4Yf6xiGKiyK+3yEwuFLIhqV86fjtHoo4 +oPXrdGo+GxaEVJRpPorI55n1RoLYP0zP0w6Y7VdEeXObUuUsNow2+C95xCqi +VKLyingqG57a1Aom31TExWSZM75RxP7koDeMLipiSXzg+6s2bGCU3ynKylLC +OG/Rf3i+smCAXF5ofl0JZ6c3BPBNsCA663bBQqESWmwdLln7kQW18WV5zreV +8PgkzPMMs0Bnd1GOYKMSSronSw11smDrmsy0pPdKaO6jJ6xYzwJxn5i4SA1l +DL273msxiQVzIta+rk3KeCLuoImWNAvGUn1dw/hUMfVC+fF80Wqwmomy+kjd +jDNaqXrH+Kpg0n9tOOf0FlRO+We9WcldYv8vwX2uaSsuhkaI+6qXg8hz1UtV +M2qoIOXH39J3C2STKx2pVA2Mt4e1qh5lkKNO27gpiIJ8KeN56WKl8FTaWG8+ +XRNvXbNpf/6tGOiyTWlab7RwribZTiihEAR5SiL8zmijQ+d7056q60CKl2e4 +q27D9B6ebb7D2cCv4lnj/O82vCVe1pUUlQmaTKnKKC8d/Ph8Mbz7WjqEDYk0 +W3Ntx/hOJ7v8vy7CzHyqi1XOdtwu6ydzQuw87NB6kmtF0cW6KYvBUuVEeDhv ++Ov7C13807MuJSkkHkI0dPpfB+jh999b9R5+PgnM6X3d7vxUFF/YFF1yKArM +lSXtNpRQMfGr+8FImXDgTLUq7Culot1PhtvS+nBQrg1fqi+jIifR4k3c7zBY +bf2yMLicirxppcfvvQuDptCkb80cKqZNF9XnFYWBUcNCdvS/VNS1V8j23hIG +VOfXo58mqfir9P5/KXAUtsSlHG/S18e7fOG+beKh0Gh4c40tXR/9G/T5U3+G +gOP3Rxk9DH18NlmXHDAUAsdDFu9MGOvjbE5xn3tZCLR5+r4XtNVHu1dBLhb6 +IRBMo1rv8dXHq18Dril5HYbb397LLCTrI6uy637W/YOgFkB7pNKvjwdOCfSW +lQfDZUX7nwmD+rhSa260NisYFob36o0OEdc/OfnjRFwwPPRILS/4oI9OJTTz +Sy7B4Ow4nC0xpY99Gd+UTnAFwwnDxCP8XAYYXDOY4+AeBG3CrxWmVAxQaXl2 +oFE8EAIeBp/lHDVA1vBl58sP/WH68Jco8wgDLE3QCDEq94fjcocOvok0QM+C +3t8r2f6QcjLUeTnGAFdKd1tUHPWHKnokmZFkgAuR6x07Vfzhd01CY3OuAV5v +/RVLSt8LGZUFC53NBij8OJAZHe4Hj4q6982J0fAprBl43u4NI7YKPpGSNKSw +Ryg25d7A9eOw+y9pGtYandr0IdUbTJz47NeQafjQ9Y/1XkdveLKKri+lRsOq +KAn3vD4veLa3kN/YiIYet9NOT095Qr/ygYq0QBoyhzPMz6vvgYVbf75r1dKw +8ZUg/fa0G4y7WhSdr6Oh9bOH94Z63aBv9UXLDw00fGfPH7L5Hzdo8JW+lvWY +hucsFb2/XXGDM5J69JV2GibUd/5ziO4GG5MPnHw6SEMhPdm3n1JcQSOohyuA +m45FkS4Pcmku4K9Szp9rR0cK14yDSoczRLd6H1B1pKOOzQ83/VpnSAsQ6WA5 +0zFwso7pecMZGm+eSO1woyPPpZaAoRhnEFW1FFrxo6PlTHt8E8UZnqh+FPWN +pONN39qe35lOoLZFnqxaSEcuHf0tXUccYU7tCpU1S0dOYZTywD1b6HuG5pvm +6SiaR5IqyLGFxyHTOyMW6bjvxsDrmBhbuMSyOkr9Sced0faG54xtQY3Odaee +xxDX8E+UDLywgb1WhxWaxQ2x7mnW1eBpa+gO2iHQzTDESwcOqJ9FK7hf+uv9 +YrIhJutf3BmhYQFU04jv1hcMsVd0seKhmAXcez8pUHTREFOmdomQ/pgDizSk +b51hiB31jLsyneZwJ+fxxYLrhriT9WrPxhPmUJSaSNtRYYizYf9yvX5qBucj +hNJzugzxVrBHCyPWFNZuSi6b6jHE99PDUmv3m0JSNVejSZ8hknOHD4/vMoWz +03Pjk4OG+J/faOeAhimcCu5mGI8T96u1G/rrnQmEeV6b+LxsiAEdbudqTUzA +w0wJDUkMlJ/YWWgjbQwr3WsFm8kM3LdR9UUXrzEUBUwPWCsx8NHP3YpH5hHG +k+qiPLYwsHrPrbmxZwhh7Q6VJ3QY6EX30HwQh5Bif5J034KBP27eeKTdB1C/ +u+e3bigDW/Hag9/FTPD6XP+08SgD7T/S416fZgJXdFGOWQQDSdn8lKdeTLC4 +flB31wkGnolafKQqzYTOd6sOhScw8PO9jRrnMxnwZa/mQHU2A91T3h9/c9kQ +ZA6fq9N8zEDljwZjrEIaXPoTqHehiXi+jMGF1gQacGdYVH9qYSDXBW2ehSAa +fKlZc7uonYElF3t4SrVpUM91Nkeki4Fz/H55ds0G4JEZF7X0kYGyO1bzs6b0 +IafhhN7D9UyUyigIlnalgoC9e7W0IBMpPy2mjjOpEDdiQInayMTlAL6ds8pU +CF6zrKwtxkS1Rp/grQt6oO8QKVpCYqK9gqBt0xU9eDMaNp+4jYnxAQkNMb26 +ILbuULWdGxPPfMOmyCPbodQ0NnrWnYmXlmUUTXdvB53YS6ZXPJlYxxWrro7b +wX62qqfPj4lD5kPtdhu3Q9KbxR/+h5hoU9ql1F+tA8slp02i45lokt0j/P3H +Nug3vNJVVs7EZGe78bP52hB8rDTPqoKJxfKD59KTtWGp4l7AZBUTlzI+Ha8J +1wYRxb7v22qYmJlnOWZprQ02a+VkHzxmoteqfmPpOS1o7C7b19XDxKvnL636 +xdIEa8H7lMg+Jp7OzeznTdWEvh3tS5IDTAxxCWRigCYs1H9N9h5h4h224nu6 +pCZQirXvfv7CxNyVwFDrOAo09htHpk4x0Ymbe98DDwpYi+4ErVkmAq9OsKce +BQLPHXsdscjERk/fj3JfNWDhcVKuxDITuZdfrsInGnDmZ7Z//U8mek/URFws +1oCNurc1vFaYGD5J3cgbqwEFh+sX//xh4vvs62W3d2vA/wA/biti + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07976578362651533}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07976578362651533}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994358003611555*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"dfeccee9-1fb3-44f1-921b-e8df2ac08e59"] +}, Open ]], Cell[CellGroupData[{ @@ -13434,66 +15491,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[308]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], + "In[140]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.611115182999938`*^-175\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 308, 309, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133920579224*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.7428996637454486`*^-152\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 73, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358003645256*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], +In[140]:=",ExpressionUUID->"f6346e0b-fbbb-42e3-ad77-8d1ad2ba7090"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5007447195984937`*^-178\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 308, 310, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058022385`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.214466437953849`*^-155\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 74, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358003651973*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], +In[140]:=",ExpressionUUID->"61fa2e27-fb75-4f58-9c34-05010a7ec55b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1145242877114216`*^-181\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 308, 311, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339205811241*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0190906410796989`*^-157\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 75, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358003659049*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], +In[140]:=",ExpressionUUID->"15e8b32e-c8ec-43f4-b91e-cf461b541e42"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 308, 312, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058197193`*^9}, +during this calculation.\"", 2, 140, 76, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358003665332*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], +In[140]:=",ExpressionUUID->"7163e6e3-0325-4459-9daf-c3b052789ea2"], -Cell[BoxData["9.33220071900515`"], "Output", - CellChangeTimes->{3.9913392124888554`*^9}, +Cell[BoxData["9.138076712846747`"], "Output", + CellChangeTimes->{3.9913392124888554`*^9, 3.9943580440158997`*^9}, CellLabel-> - "Out[308]=",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] + "Out[140]=",ExpressionUUID->"eb752526-828f-4209-9ea9-0f1d97549dc1"] }, Open ]], Cell[CellGroupData[{ @@ -13560,68 +15624,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849547748472*^9, - 3.9918495528702526`*^9}},ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-\ -0895c02ffd8f"], + CellChangeTimes->{{3.991849547748472*^9, 3.9918495528702526`*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 309, 313, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125258827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.73736708262692`*^-199\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 77, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358044054853*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], +In[141]:=",ExpressionUUID->"28defc18-4e15-4570-9d69-938ffed401b2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 314, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339212535879*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.817890677194954`*^-203\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 78, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358044062172*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], +In[141]:=",ExpressionUUID->"74bc4617-4099-4a8b-9066-5d66e4188fd8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 315, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125438805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.883882342320423`*^-207\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 79, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.9943580440696983`*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], +In[141]:=",ExpressionUUID->"5aa8c3cb-57f7-45bf-a894-105bce2552b3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 309, 316, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125518837`*^9}, +during this calculation.\"", 2, 141, 80, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358044076708*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], +In[141]:=",ExpressionUUID->"2f89e5aa-792a-446f-a857-9783d55e6f69"], -Cell[BoxData["0.41157157699018565`"], "Output", - CellChangeTimes->{3.9913392196090164`*^9}, +Cell[BoxData["0.8667270124223084`"], "Output", + CellChangeTimes->{3.9913392196090164`*^9, 3.994358049949593*^9}, CellLabel-> - "Out[309]=",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] + "Out[141]=",ExpressionUUID->"abfb314f-de9c-4453-8b6b-1f81a22d8e3a"] }, Open ]], Cell[CellGroupData[{ @@ -13642,8 +15713,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13688,68 +15758,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918495568340263`*^9, - 3.991849559359928*^9}},ExpressionUUID->"57976ffc-56f1-604b-8519-\ -bead95265db8"], + CellChangeTimes->{{3.9918495568340263`*^9, 3.991849559359928*^9}}, + CellLabel-> + "In[142]:=",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 310, 317, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196440163`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.73736708262692`*^-199\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 81, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994358049983679*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], +In[142]:=",ExpressionUUID->"7fa582c3-4dfe-4766-82c6-b0a747c8aa4a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 318, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196535416`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.817890677194954`*^-203\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 82, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.9943580499913607`*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], +In[142]:=",ExpressionUUID->"25a93c67-2b49-47a8-9cc0-0e0318f232ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 319, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219661541*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.883882342320423`*^-207\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 83, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994358049998303*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], +In[142]:=",ExpressionUUID->"ec57fe8d-053c-4724-92fd-f8a0300f1315"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 310, 320, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219670542*^9}, +during this calculation.\"", 2, 142, 84, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994358050004499*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], +In[142]:=",ExpressionUUID->"7e12fa42-5622-40b2-a3b7-53344e7a0d69"], -Cell[BoxData["3.215201591157595`"], "Output", - CellChangeTimes->{3.9913392268711624`*^9}, +Cell[BoxData["24.816216084594053`"], "Output", + CellChangeTimes->{3.9913392268711624`*^9, 3.99435805561133*^9}, CellLabel-> - "Out[310]=",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] + "Out[142]=",ExpressionUUID->"ca986c82-435b-41e0-817a-337f117c1988"] }, Open ]], Cell[CellGroupData[{ @@ -13770,8 +15847,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13816,68 +15892,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849563755764*^9, - 3.991849566543682*^9}},ExpressionUUID->"cfa37210-3ae7-3f49-b290-\ -f19508c6d2f1"], + CellChangeTimes->{{3.991849563755764*^9, 3.991849566543682*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 311, 321, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226907137*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.73736708262692`*^-199\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 85, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994358055645152*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], +In[143]:=",ExpressionUUID->"735b84d6-3c65-4880-ac9f-2ea54c561d6d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 322, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226917137*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.817890677194954`*^-203\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 86, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994358055652598*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], +In[143]:=",ExpressionUUID->"6bcb2082-4de6-4fe5-8790-c29ae27dabbc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 323, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269251385`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.883882342320423`*^-207\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 87, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.9943580556590643`*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], +In[143]:=",ExpressionUUID->"991b71ae-9c59-473b-9617-28638ad2fba8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 311, 324, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269341373`*^9}, +during this calculation.\"", 2, 143, 88, 31388289913970063578, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994358055666526*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], +In[143]:=",ExpressionUUID->"bbcba1f0-58ea-4ce2-958d-f95dbcd69e12"], -Cell[BoxData["16.94395627212904`"], "Output", - CellChangeTimes->{3.9913392304284153`*^9}, +Cell[BoxData["4.206362671880149`"], "Output", + CellChangeTimes->{3.9913392304284153`*^9, 3.99435805909831*^9}, CellLabel-> - "Out[311]=",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] + "Out[143]=",ExpressionUUID->"ab0a1ee2-1e8a-4b1e-8978-e7a81ad1af8d"] }, Open ]], Cell[CellGroupData[{ @@ -13886,21 +15969,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849569404436*^9, - 3.991849573855135*^9}},ExpressionUUID->"7457b456-6d32-5b44-9679-\ -346c5f5ac532"], - -Cell[BoxData["0.05576142449710889`"], "Output", - CellChangeTimes->{3.9913392304624157`*^9}, + CellChangeTimes->{{3.991849569404436*^9, 3.991849573855135*^9}}, CellLabel-> - "Out[312]=",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] + "In[144]:=",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], + +Cell[BoxData["0.08483229056543964`"], "Output", + CellChangeTimes->{3.9913392304624157`*^9, 3.994358059126536*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"973684fd-9fc8-4809-a4cd-d0b0f6bfec9c"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"f39be7b1-d665-440d-a910-3cb53865d46e"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[145]:=",ExpressionUUID->"f39be7b1-d665-440d-a910-3cb53865d46e"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +Evaluator->"Local", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {3, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -13918,613 +16004,640 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 357, 7, 36, "Input",ExpressionUUID->"654de044-0e50-46e4-a030-5c51782643e2"], -Cell[936, 31, 309, 6, 41, "Output",ExpressionUUID->"9b3880c8-5b7d-42a6-8a83-2fa12a7fc99c"] +Cell[576, 22, 352, 6, 36, "Input",ExpressionUUID->"654de044-0e50-46e4-a030-5c51782643e2"], +Cell[931, 30, 348, 5, 41, "Output",ExpressionUUID->"9dea8eeb-0e31-4ccb-87a7-5434d1ea4f44"] }, Open ]], Cell[CellGroupData[{ -Cell[1282, 42, 253, 5, 36, "Input",ExpressionUUID->"1bff45ef-3366-47ea-aac1-eb064d64cd81"], -Cell[1538, 49, 256, 5, 41, "Output",ExpressionUUID->"2005cc7b-c4fd-4227-a5bb-236b098bb58a"] +Cell[1316, 40, 248, 4, 36, "Input",ExpressionUUID->"1bff45ef-3366-47ea-aac1-eb064d64cd81"], +Cell[1567, 46, 298, 5, 41, "Output",ExpressionUUID->"ad35c4b5-daee-4144-b027-b9e2002f0a02"] }, Open ]], Cell[CellGroupData[{ -Cell[1831, 59, 226, 5, 36, "Input",ExpressionUUID->"6d89bceb-0dc2-4a2c-a79a-2d190d748f3b"], -Cell[2060, 66, 256, 5, 41, "Output",ExpressionUUID->"d47cb3a4-c75b-4103-98ac-3d9fdf97da0c"] +Cell[1902, 56, 221, 4, 36, "Input",ExpressionUUID->"6d89bceb-0dc2-4a2c-a79a-2d190d748f3b"], +Cell[2126, 62, 301, 5, 41, "Output",ExpressionUUID->"e3870ce1-843d-4a26-87b1-b923aec5eb01"] }, Open ]], Cell[CellGroupData[{ -Cell[2353, 76, 180, 4, 36, "Input",ExpressionUUID->"38d94942-1353-4515-8e2c-98eaa63b1e8f"], -Cell[2536, 82, 254, 5, 41, "Output",ExpressionUUID->"1b1cc60d-b3db-48fe-a607-04702dd6ee18"] +Cell[2464, 72, 175, 3, 36, "Input",ExpressionUUID->"38d94942-1353-4515-8e2c-98eaa63b1e8f"], +Cell[2642, 77, 301, 5, 41, "Output",ExpressionUUID->"999e2237-8e65-4f69-b2d8-1c84dc0fe282"] }, Open ]], Cell[CellGroupData[{ -Cell[2827, 92, 262, 8, 54, "Input",ExpressionUUID->"1b256968-e387-489a-8829-57f3de16e065"], -Cell[3092, 102, 257, 5, 75, "Output",ExpressionUUID->"e6bd806a-a758-4351-b20b-63f102cc0917"] +Cell[2980, 87, 257, 7, 54, "Input",ExpressionUUID->"1b256968-e387-489a-8829-57f3de16e065"], +Cell[3240, 96, 301, 5, 41, "Output",ExpressionUUID->"7927ecb3-9274-4cee-9a1c-bc77362250b9"] }, Open ]], Cell[CellGroupData[{ -Cell[3386, 112, 136, 3, 66, "Input",ExpressionUUID->"d3b9ea6b-d791-4b3d-90f3-8d5f2213b559"], -Cell[3525, 117, 260, 5, 75, "Output",ExpressionUUID->"26dcec8d-d627-4ff5-813b-4faf3b6f8638"] +Cell[3578, 106, 131, 2, 36, "Input",ExpressionUUID->"d3b9ea6b-d791-4b3d-90f3-8d5f2213b559"], +Cell[3712, 110, 305, 5, 41, "Output",ExpressionUUID->"44c638ef-e68b-4f76-ab88-294d7ddcd959"] }, Open ]], Cell[CellGroupData[{ -Cell[3822, 127, 281, 7, 66, "Input",ExpressionUUID->"be3f42c2-01c3-4d2c-89be-538333e1aa03"], -Cell[4106, 136, 274, 5, 75, "Output",ExpressionUUID->"80c159bd-d267-4f8b-8390-7a09001d97fc"] +Cell[4054, 120, 276, 6, 36, "Input",ExpressionUUID->"be3f42c2-01c3-4d2c-89be-538333e1aa03"], +Cell[4333, 128, 317, 5, 41, "Output",ExpressionUUID->"1bc884ca-4286-49ee-a578-4fea02231b7c"] }, Open ]], Cell[CellGroupData[{ -Cell[4417, 146, 262, 8, 66, "Input",ExpressionUUID->"47c6e29f-3d13-4327-943d-eaa5040dcc82"], -Cell[4682, 156, 273, 5, 75, "Output",ExpressionUUID->"c310b58a-cd33-499e-a1ef-93ca2913a8bc"] +Cell[4687, 138, 257, 7, 36, "Input",ExpressionUUID->"47c6e29f-3d13-4327-943d-eaa5040dcc82"], +Cell[4947, 147, 320, 5, 41, "Output",ExpressionUUID->"58cabf1b-669f-4a85-9c39-4f1d4e60672a"] }, Open ]], Cell[CellGroupData[{ -Cell[4992, 166, 208, 4, 66, "Input",ExpressionUUID->"df71849f-efb2-4261-b6d8-8ccc7f214f9f"], -Cell[5203, 172, 236, 4, 75, "Output",ExpressionUUID->"90e44468-f2ed-4c13-9652-b7c5aa423df8"] +Cell[5304, 157, 203, 3, 36, "Input",ExpressionUUID->"df71849f-efb2-4261-b6d8-8ccc7f214f9f"], +Cell[5510, 162, 281, 4, 41, "Output",ExpressionUUID->"36503367-ed42-4e97-9535-6396f54cbb1e"] }, Open ]], Cell[CellGroupData[{ -Cell[5476, 181, 208, 4, 66, "Input",ExpressionUUID->"2970230d-e92a-491c-8f9b-8b9995b13f72"], -Cell[5687, 187, 239, 4, 75, "Output",ExpressionUUID->"fc5bd5dc-e939-4366-9f60-44a94c646ee7"] +Cell[5828, 171, 204, 3, 36, "Input",ExpressionUUID->"2970230d-e92a-491c-8f9b-8b9995b13f72"], +Cell[6035, 176, 283, 4, 41, "Output",ExpressionUUID->"6a3d4922-58f3-4aad-8f86-b8389feb289a"] }, Open ]], Cell[CellGroupData[{ -Cell[5963, 196, 133, 3, 66, "Input",ExpressionUUID->"8fcec1cb-6367-48d5-84a8-488e55773556"], -Cell[6099, 201, 253, 5, 75, "Output",ExpressionUUID->"c29a2188-b064-46d8-a12b-0f83885966ca"] +Cell[6355, 185, 129, 2, 36, "Input",ExpressionUUID->"8fcec1cb-6367-48d5-84a8-488e55773556"], +Cell[6487, 189, 297, 5, 41, "Output",ExpressionUUID->"e16b8e3a-39f9-4935-9c7e-d1c5d535f5fb"] }, Open ]], Cell[CellGroupData[{ -Cell[6389, 211, 133, 3, 66, "Input",ExpressionUUID->"afa8b026-e9e2-4c2a-b598-7adf346042e7"], -Cell[6525, 216, 252, 5, 75, "Output",ExpressionUUID->"9c52aa91-d4d1-4e91-91f0-e3989f9dcf8a"] +Cell[6821, 199, 129, 2, 36, "Input",ExpressionUUID->"afa8b026-e9e2-4c2a-b598-7adf346042e7"], +Cell[6953, 203, 296, 5, 41, "Output",ExpressionUUID->"4c0b984d-06f8-4097-a408-95e33981b26c"] }, Open ]], Cell[CellGroupData[{ -Cell[6814, 226, 561, 20, 175, "Input",ExpressionUUID->"46f248de-e191-4429-960f-89c025ca6bee"], -Cell[7378, 248, 273, 5, 75, "Output",ExpressionUUID->"d8ea0a76-d1ee-404b-8a3e-cffb3f85794b"] +Cell[7286, 213, 557, 19, 100, "Input",ExpressionUUID->"46f248de-e191-4429-960f-89c025ca6bee"], +Cell[7846, 234, 317, 5, 41, "Output",ExpressionUUID->"9943d719-7088-4cd2-98ee-6839367746f2"] }, Open ]], Cell[CellGroupData[{ -Cell[7688, 258, 561, 20, 175, "Input",ExpressionUUID->"4732b5af-12aa-43ce-a050-406d6060aa53"], -Cell[8252, 280, 271, 5, 75, "Output",ExpressionUUID->"55c31971-9787-4118-8c22-ce7065e3695a"] +Cell[8200, 244, 557, 19, 100, "Input",ExpressionUUID->"4732b5af-12aa-43ce-a050-406d6060aa53"], +Cell[8760, 265, 317, 5, 41, "Output",ExpressionUUID->"45550dd8-fb4d-4036-8ca5-f5603fee6a51"] }, Open ]], Cell[CellGroupData[{ -Cell[8560, 290, 1592, 51, 362, "Input",ExpressionUUID->"f5c402e7-7872-40cd-a967-4fd1559482f6"], -Cell[10155, 343, 267, 5, 75, "Output",ExpressionUUID->"4f1853a1-b0e8-41bb-9e10-159f8abfc671"] +Cell[9114, 275, 1588, 50, 215, "Input",ExpressionUUID->"f5c402e7-7872-40cd-a967-4fd1559482f6"], +Cell[10705, 327, 313, 5, 41, "Output",ExpressionUUID->"a34a2b3a-55d8-45d1-911e-06cb82818b15"] }, Open ]], Cell[CellGroupData[{ -Cell[10459, 353, 1426, 47, 362, "Input",ExpressionUUID->"71043eea-bc06-49fa-a1f1-46b6dd6c128a"], -Cell[11888, 402, 286, 6, 75, "Output",ExpressionUUID->"3420a2b4-5230-4f67-8994-069d2d6ac33c"] +Cell[11055, 337, 1422, 46, 215, "Input",ExpressionUUID->"71043eea-bc06-49fa-a1f1-46b6dd6c128a"], +Cell[12480, 385, 330, 6, 41, "Output",ExpressionUUID->"0b1cf049-dc45-4825-8e46-d4e6b5fee3b7"] }, Open ]], Cell[CellGroupData[{ -Cell[12211, 413, 1426, 47, 362, "Input",ExpressionUUID->"c54f827c-9ced-4bd2-8efc-3e09d9172516"], -Cell[13640, 462, 289, 6, 75, "Output",ExpressionUUID->"3c0c71ee-8031-4092-855f-8c578539af0b"] +Cell[12847, 396, 1422, 46, 215, "Input",ExpressionUUID->"c54f827c-9ced-4bd2-8efc-3e09d9172516"], +Cell[14272, 444, 335, 6, 41, "Output",ExpressionUUID->"0505ffcf-1843-423f-b2ba-411a60edcd87"] }, Open ]], Cell[CellGroupData[{ -Cell[13966, 473, 1592, 51, 362, "Input",ExpressionUUID->"4252dd08-5614-43a1-af53-09613750d7ff"], -Cell[15561, 526, 268, 5, 75, "Output",ExpressionUUID->"316e0695-b38f-4832-b75c-0fca45037f05"] +Cell[14644, 455, 1588, 50, 215, "Input",ExpressionUUID->"4252dd08-5614-43a1-af53-09613750d7ff"], +Cell[16235, 507, 311, 5, 41, "Output",ExpressionUUID->"35ad3576-8917-4e59-9afd-ab508ec9273f"] }, Open ]], Cell[CellGroupData[{ -Cell[15866, 536, 135, 3, 66, "Input",ExpressionUUID->"11e60afc-d5e0-42be-839f-81e4e339a1a8"], -Cell[16004, 541, 256, 5, 75, "Output",ExpressionUUID->"7839a583-0c5e-45b7-b21e-8d630f368922"] +Cell[16583, 517, 131, 2, 36, "Input",ExpressionUUID->"11e60afc-d5e0-42be-839f-81e4e339a1a8"], +Cell[16717, 521, 299, 5, 41, "Output",ExpressionUUID->"a202c10c-145e-407f-bd51-d9aa70e88ecf"] }, Open ]], Cell[CellGroupData[{ -Cell[16297, 551, 137, 3, 66, "Input",ExpressionUUID->"b8419fae-7d4c-403d-91dd-7cbb6be5fa8a"], -Cell[16437, 556, 258, 5, 75, "Output",ExpressionUUID->"cdbd6e17-3be3-4c8d-a31c-814a789d7474"] +Cell[17053, 531, 133, 2, 36, "Input",ExpressionUUID->"b8419fae-7d4c-403d-91dd-7cbb6be5fa8a"], +Cell[17189, 535, 304, 5, 41, "Output",ExpressionUUID->"515cad28-d14b-4691-9aa6-22c3aff5922c"] }, Open ]], Cell[CellGroupData[{ -Cell[16732, 566, 138, 3, 66, "Input",ExpressionUUID->"6bdd48c9-606a-47e3-8d77-8a971e25ae45"], -Cell[16873, 571, 260, 5, 75, "Output",ExpressionUUID->"8d5e3cb0-0cf5-4466-8d6a-6ecf07d3dd2e"] +Cell[17530, 545, 134, 2, 36, "Input",ExpressionUUID->"6bdd48c9-606a-47e3-8d77-8a971e25ae45"], +Cell[17667, 549, 306, 5, 41, "Output",ExpressionUUID->"27581209-0e4b-404e-aced-bdda937990c0"] }, Open ]], Cell[CellGroupData[{ -Cell[17170, 581, 223, 5, 66, "Input",ExpressionUUID->"28e5ef3d-8836-4b8b-b9c3-a61da2dbfbcf"], -Cell[17396, 588, 269, 6, 75, "Output",ExpressionUUID->"83fdab78-1fc9-4885-aa2c-d5b9ab4cffab"] +Cell[18010, 559, 219, 4, 36, "Input",ExpressionUUID->"28e5ef3d-8836-4b8b-b9c3-a61da2dbfbcf"], +Cell[18232, 565, 315, 6, 41, "Output",ExpressionUUID->"844b1dc5-a3ce-42e6-ae62-a38fe609afb0"] }, Open ]], Cell[CellGroupData[{ -Cell[17702, 599, 138, 3, 66, "Input",ExpressionUUID->"5c28b10c-735d-4661-a1c2-55e9b6ea4a8a"], -Cell[17843, 604, 260, 5, 75, "Output",ExpressionUUID->"40d42391-3305-4ab1-86b2-ef08748814c2"] +Cell[18584, 576, 134, 2, 36, "Input",ExpressionUUID->"5c28b10c-735d-4661-a1c2-55e9b6ea4a8a"], +Cell[18721, 580, 304, 5, 41, "Output",ExpressionUUID->"93f5e2a2-e432-4960-bb95-ce7e5f8f76e2"] }, Open ]], Cell[CellGroupData[{ -Cell[18140, 614, 326, 6, 66, "Input",ExpressionUUID->"a2bae7c2-8b8a-4c64-948a-54151bd4a28a"], -Cell[18469, 622, 253, 5, 75, "Output",ExpressionUUID->"a75bb78f-119b-48fc-b0c8-fa8af117f5bf"] +Cell[19062, 590, 322, 5, 36, "Input",ExpressionUUID->"a2bae7c2-8b8a-4c64-948a-54151bd4a28a"], +Cell[19387, 597, 297, 5, 41, "Output",ExpressionUUID->"53e74b74-bc55-42be-96c1-5fbc5b5af7a0"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 632, 302, 6, 66, "Input",ExpressionUUID->"ef64e7ce-f7c5-409b-83f9-9929007e2a69"], -Cell[19064, 640, 259, 5, 75, "Output",ExpressionUUID->"60b2213c-6129-4f9b-882f-3626bb753259"] +Cell[19721, 607, 298, 5, 36, "Input",ExpressionUUID->"ef64e7ce-f7c5-409b-83f9-9929007e2a69"], +Cell[20022, 614, 305, 5, 41, "Output",ExpressionUUID->"a5aa6358-5fc2-4213-9747-08f55282f7dc"] }, Open ]], Cell[CellGroupData[{ -Cell[19360, 650, 223, 5, 66, "Input",ExpressionUUID->"02cfe06e-a2c5-47f2-bd0e-da365d14055b"], -Cell[19586, 657, 250, 5, 75, "Output",ExpressionUUID->"11168aca-c5f6-4e28-a7b9-10bf8d3da8de"] +Cell[20364, 624, 219, 4, 36, "Input",ExpressionUUID->"02cfe06e-a2c5-47f2-bd0e-da365d14055b"], +Cell[20586, 630, 294, 5, 41, "Output",ExpressionUUID->"301597eb-a1ff-49cb-930a-64c65675becb"] }, Open ]], Cell[CellGroupData[{ -Cell[19873, 667, 354, 11, 96, "Input",ExpressionUUID->"34054da0-34c4-4ed2-b5e7-ba513c08970f"], -Cell[20230, 680, 273, 5, 75, "Output",ExpressionUUID->"d706937e-4232-4d2e-9ade-32e4cb6ba51e"] +Cell[20917, 640, 350, 10, 54, "Input",ExpressionUUID->"34054da0-34c4-4ed2-b5e7-ba513c08970f"], +Cell[21270, 652, 319, 5, 41, "Output",ExpressionUUID->"85c0c9d3-4e12-48e2-ad96-ee5117948331"] }, Open ]], Cell[CellGroupData[{ -Cell[20540, 690, 354, 11, 96, "Input",ExpressionUUID->"6973c3cf-3f46-4d19-8fbc-9846d4d6f09a"], -Cell[20897, 703, 290, 6, 75, "Output",ExpressionUUID->"edc0225a-fcad-40b4-bbb6-ec17b380955b"] +Cell[21626, 662, 350, 10, 54, "Input",ExpressionUUID->"6973c3cf-3f46-4d19-8fbc-9846d4d6f09a"], +Cell[21979, 674, 334, 6, 41, "Output",ExpressionUUID->"f3933a52-c5a1-4802-9861-7c4499801ad8"] }, Open ]], Cell[CellGroupData[{ -Cell[21224, 714, 998, 27, 184, "Input",ExpressionUUID->"d7e713ef-32a0-45b6-811b-285e81ec9257"], -Cell[22225, 743, 274, 5, 75, "Output",ExpressionUUID->"a116a9c3-c3a5-46a1-aa13-2ee22a0829c7"] +Cell[22350, 685, 994, 26, 105, "Input",ExpressionUUID->"d7e713ef-32a0-45b6-811b-285e81ec9257"], +Cell[23347, 713, 320, 5, 41, "Output",ExpressionUUID->"f5155601-1075-43c5-ba92-42d0402128fa"] }, Open ]], Cell[CellGroupData[{ -Cell[22536, 753, 203, 4, 66, "Input",ExpressionUUID->"c78ba437-3544-44ae-a68a-2918bbc821f8"], -Cell[22742, 759, 251, 5, 75, "Output",ExpressionUUID->"7032efca-8a24-4818-b7d3-3e93ecbdf6c0"] +Cell[23704, 723, 199, 3, 36, "Input",ExpressionUUID->"c78ba437-3544-44ae-a68a-2918bbc821f8"], +Cell[23906, 728, 295, 5, 41, "Output",ExpressionUUID->"15d8b626-f04d-461a-9b1b-a28a8e6bcfdf"] }, Open ]], Cell[CellGroupData[{ -Cell[23030, 769, 331, 6, 66, "Input",ExpressionUUID->"ebfbd65d-60e9-4c6b-8cd5-97cf7e7b59e6"], -Cell[23364, 777, 230, 4, 75, "Output",ExpressionUUID->"3b160b7e-adb2-4621-8abc-6580c062fce6"] +Cell[24238, 738, 327, 5, 36, "Input",ExpressionUUID->"ebfbd65d-60e9-4c6b-8cd5-97cf7e7b59e6"], +Cell[24568, 745, 274, 4, 41, "Output",ExpressionUUID->"8e0a368f-2888-46b2-a879-b8eaf6b4f9b0"] }, Open ]], -Cell[23609, 784, 177, 3, 66, "Input",ExpressionUUID->"a7681eef-67d2-4f8d-a607-83e1b8eb15d3"], +Cell[24857, 752, 173, 2, 109, "Input",ExpressionUUID->"a7681eef-67d2-4f8d-a607-83e1b8eb15d3"], Cell[CellGroupData[{ -Cell[23811, 791, 331, 6, 66, "Input",ExpressionUUID->"ba79384a-2558-4f42-90b9-a9174c76935e"], -Cell[24145, 799, 234, 4, 75, "Output",ExpressionUUID->"e9aeeae4-8c37-408a-b6b6-6a96b59fb57c"] +Cell[25055, 758, 327, 5, 36, "Input",ExpressionUUID->"ba79384a-2558-4f42-90b9-a9174c76935e"], +Cell[25385, 765, 277, 4, 41, "Output",ExpressionUUID->"473587e3-3266-468f-ae19-f71f001d1d9e"] }, Open ]], -Cell[24394, 806, 177, 3, 66, "Input",ExpressionUUID->"90cd403c-b3c8-44af-89f3-c87b24208c4f"], +Cell[25677, 772, 173, 2, 109, "Input",ExpressionUUID->"90cd403c-b3c8-44af-89f3-c87b24208c4f"], Cell[CellGroupData[{ -Cell[24596, 813, 333, 6, 66, "Input",ExpressionUUID->"231f573a-63ae-4cab-a335-c22117bf3178"], -Cell[24932, 821, 231, 4, 75, "Output",ExpressionUUID->"0716c625-fc30-4fc8-9286-670a022ea3d4"] +Cell[25875, 778, 329, 5, 36, "Input",ExpressionUUID->"231f573a-63ae-4cab-a335-c22117bf3178"], +Cell[26207, 785, 277, 4, 41, "Output",ExpressionUUID->"bf494d8b-6380-4b18-aa91-5e65d15194ec"] }, Open ]], -Cell[25178, 828, 177, 3, 66, "Input",ExpressionUUID->"081a4ceb-c4d7-4ac4-af60-22b59f2c6c7d"], +Cell[26499, 792, 173, 2, 109, "Input",ExpressionUUID->"081a4ceb-c4d7-4ac4-af60-22b59f2c6c7d"], Cell[CellGroupData[{ -Cell[25380, 835, 357, 6, 66, "Input",ExpressionUUID->"a2a0a3bc-e8db-4bae-b7be-e050d9292d34"], -Cell[25740, 843, 230, 4, 75, "Output",ExpressionUUID->"1cf20bfd-75cc-40f7-9b75-d0d27e97664f"] +Cell[26697, 798, 353, 5, 36, "Input",ExpressionUUID->"a2a0a3bc-e8db-4bae-b7be-e050d9292d34"], +Cell[27053, 805, 274, 4, 41, "Output",ExpressionUUID->"1dc1fc81-70e0-4bb7-9f9b-52723f59f7c6"] }, Open ]], -Cell[25985, 850, 175, 3, 66, "Input",ExpressionUUID->"73f6a3e2-e8b4-4d89-8532-3cdb6911efa1"], +Cell[27342, 812, 171, 2, 109, "Input",ExpressionUUID->"73f6a3e2-e8b4-4d89-8532-3cdb6911efa1"], Cell[CellGroupData[{ -Cell[26185, 857, 303, 6, 66, "Input",ExpressionUUID->"b3215d13-b4cb-4fd6-8407-e0b6af7f32f0"], -Cell[26491, 865, 232, 4, 75, "Output",ExpressionUUID->"566ed76e-32cb-4804-8e41-5f1289ea131e"] +Cell[27538, 818, 299, 5, 36, "Input",ExpressionUUID->"b3215d13-b4cb-4fd6-8407-e0b6af7f32f0"], +Cell[27840, 825, 276, 4, 41, "Output",ExpressionUUID->"5abc47c4-e0cb-4efc-899d-aad3855cc987"] }, Open ]], -Cell[26738, 872, 175, 3, 66, "Input",ExpressionUUID->"f8468766-c01d-4218-9357-b27f88ed876c"], +Cell[28131, 832, 171, 2, 109, "Input",ExpressionUUID->"f8468766-c01d-4218-9357-b27f88ed876c"], Cell[CellGroupData[{ -Cell[26938, 879, 309, 6, 66, "Input",ExpressionUUID->"e697212f-4ac1-4f24-b113-4b8b823d4160"], -Cell[27250, 887, 233, 4, 75, "Output",ExpressionUUID->"b30e7d73-c3ee-4932-9a14-c35bb895f77b"] +Cell[28327, 838, 305, 5, 36, "Input",ExpressionUUID->"e697212f-4ac1-4f24-b113-4b8b823d4160"], +Cell[28635, 845, 277, 4, 41, "Output",ExpressionUUID->"09c088fc-768d-412a-84ed-413ded98e2be"] }, Open ]], -Cell[27498, 894, 177, 3, 66, "Input",ExpressionUUID->"e1140db4-a145-41f1-aa15-c22c84d26e51"], +Cell[28927, 852, 173, 2, 109, "Input",ExpressionUUID->"e1140db4-a145-41f1-aa15-c22c84d26e51"], Cell[CellGroupData[{ -Cell[27700, 901, 331, 6, 66, "Input",ExpressionUUID->"67830d0d-3b05-499f-9f43-f9e2a2e96c1f"], -Cell[28034, 909, 235, 4, 75, "Output",ExpressionUUID->"1b24339f-0d5e-4de8-8cda-513396a0a437"] +Cell[29125, 858, 327, 5, 36, "Input",ExpressionUUID->"67830d0d-3b05-499f-9f43-f9e2a2e96c1f"], +Cell[29455, 865, 278, 4, 41, "Output",ExpressionUUID->"7d927b97-9546-4dac-a364-90434ccd5315"] }, Open ]], -Cell[28284, 916, 176, 3, 66, "Input",ExpressionUUID->"95a2cd4c-f71b-407d-a8c8-42d33e1b5db5"], +Cell[29748, 872, 172, 2, 109, "Input",ExpressionUUID->"95a2cd4c-f71b-407d-a8c8-42d33e1b5db5"], Cell[CellGroupData[{ -Cell[28485, 923, 280, 5, 66, "Input",ExpressionUUID->"76b73b14-23cc-4e57-b98e-07a0e5c48928"], -Cell[28768, 930, 232, 4, 75, "Output",ExpressionUUID->"b32d8e2e-2248-4cbb-863d-6e4b1ca4a65d"] +Cell[29945, 878, 276, 4, 36, "Input",ExpressionUUID->"76b73b14-23cc-4e57-b98e-07a0e5c48928"], +Cell[30224, 884, 278, 4, 41, "Output",ExpressionUUID->"69248fcc-1372-46ed-8338-7d77002886a1"] }, Open ]], -Cell[29015, 937, 179, 3, 66, "Input",ExpressionUUID->"47dbed8a-06d7-4a89-bed1-7f0f0e09af87"], +Cell[30517, 891, 175, 2, 109, "Input",ExpressionUUID->"47dbed8a-06d7-4a89-bed1-7f0f0e09af87"], Cell[CellGroupData[{ -Cell[29219, 944, 19813, 486, 5405, "Input",ExpressionUUID->"977a22c1-7f05-4ef0-ab0f-3487f42964a3"], -Cell[49035, 1432, 271, 5, 75, "Output",ExpressionUUID->"87ac0de1-f633-4baa-aeb4-953445646a3a"] +Cell[30717, 897, 19809, 485, 3208, "Input",ExpressionUUID->"977a22c1-7f05-4ef0-ab0f-3487f42964a3"], +Cell[50529, 1384, 319, 5, 41, "Output",ExpressionUUID->"8bb72c1f-97a5-4e99-8bec-7a82e379154c"] }, Open ]], Cell[CellGroupData[{ -Cell[49343, 1442, 19752, 490, 5343, "Input",ExpressionUUID->"0154fad5-7f06-4a30-8cc3-5a2d45318328"], -Cell[69098, 1934, 266, 5, 75, "Output",ExpressionUUID->"f024000d-7527-4f5c-a875-84a8e4c887cc"] +Cell[50885, 1394, 19748, 489, 3138, "Input",ExpressionUUID->"0154fad5-7f06-4a30-8cc3-5a2d45318328"], +Cell[70636, 1885, 310, 5, 41, "Output",ExpressionUUID->"546eb412-6129-472b-b8fd-2873bb1533f9"] }, Open ]], Cell[CellGroupData[{ -Cell[69401, 1944, 19752, 484, 5342, "Input",ExpressionUUID->"8b62c611-b190-42db-9d66-9023afda65c0"], -Cell[89156, 2430, 287, 6, 75, "Output",ExpressionUUID->"ca1d9fd8-f604-4b10-8672-36682db5079e"] +Cell[70983, 1895, 19748, 483, 3198, "Input",ExpressionUUID->"8b62c611-b190-42db-9d66-9023afda65c0"], +Cell[90734, 2380, 331, 6, 41, "Output",ExpressionUUID->"61c204fe-5e2e-459a-8f1e-fc6ab790675b"] }, Open ]], Cell[CellGroupData[{ -Cell[89480, 2441, 22538, 554, 6074, "Input",ExpressionUUID->"41b0e6b5-d875-4a41-bddc-b96726f30b8e"], -Cell[112021, 2997, 288, 6, 75, "Output",ExpressionUUID->"2e9b67d2-1d0a-4210-ba7d-fc6651a8d8e9"] +Cell[91102, 2391, 22534, 553, 3677, "Input",ExpressionUUID->"41b0e6b5-d875-4a41-bddc-b96726f30b8e"], +Cell[113639, 2946, 332, 6, 41, "Output",ExpressionUUID->"24560498-6148-4367-ad99-73dbf2ef186e"] }, Open ]], Cell[CellGroupData[{ -Cell[112346, 3008, 22539, 554, 6074, "Input",ExpressionUUID->"f5dfe48c-c744-404c-a83e-906f1d590bad"], -Cell[134888, 3564, 291, 6, 75, "Output",ExpressionUUID->"189fe403-7aba-468e-b5ec-d167d4ae7c02"] +Cell[114008, 2957, 22535, 553, 3642, "Input",ExpressionUUID->"f5dfe48c-c744-404c-a83e-906f1d590bad"], +Cell[136546, 3512, 334, 6, 41, "Output",ExpressionUUID->"ee7a3b97-ccab-4de2-a9c6-2092be54896f"] }, Open ]], Cell[CellGroupData[{ -Cell[135216, 3575, 25495, 627, 6806, "Input",ExpressionUUID->"3dce4f21-8853-4356-9c51-0e01f426e7d3"], -Cell[160714, 4204, 290, 6, 75, "Output",ExpressionUUID->"7c6bc069-444a-46aa-bdbc-7dac8546bf9c"] +Cell[136917, 3523, 25491, 626, 4121, "Input",ExpressionUUID->"3dce4f21-8853-4356-9c51-0e01f426e7d3"], +Cell[162411, 4151, 333, 6, 41, "Output",ExpressionUUID->"d21af38a-31d8-4caa-97d4-36c0c012863e"] }, Open ]], Cell[CellGroupData[{ -Cell[161041, 4215, 134, 3, 66, "Input",ExpressionUUID->"0c7b3f73-53fe-46f6-b876-55160b5b6f32"], -Cell[161178, 4220, 253, 5, 75, "Output",ExpressionUUID->"b86d1cc9-90bc-4b34-9ba1-2a64d2c0c604"] +Cell[162781, 4162, 130, 2, 36, "Input",ExpressionUUID->"0c7b3f73-53fe-46f6-b876-55160b5b6f32"], +Cell[162914, 4166, 299, 5, 41, "Output",ExpressionUUID->"401fae93-d4c5-4628-8aa8-2902417e6f1a"] }, Open ]], Cell[CellGroupData[{ -Cell[161468, 4230, 134, 3, 66, "Input",ExpressionUUID->"3e524e61-6281-4bfd-8c3d-124dde1d850b"], -Cell[161605, 4235, 254, 5, 75, "Output",ExpressionUUID->"28b2ad46-611c-4eed-b39f-7fbe339cc12c"] +Cell[163250, 4176, 130, 2, 36, "Input",ExpressionUUID->"3e524e61-6281-4bfd-8c3d-124dde1d850b"], +Cell[163383, 4180, 299, 5, 41, "Output",ExpressionUUID->"7fcb8690-80b0-4646-b5b3-b9829a5d3203"] }, Open ]], Cell[CellGroupData[{ -Cell[161896, 4245, 1148, 40, 246, "Input",ExpressionUUID->"635f4e4a-0c8e-4483-a3a6-0e96e17e79ba"], -Cell[163047, 4287, 269, 5, 75, "Output",ExpressionUUID->"0fb17b6d-48ce-45c7-800b-a73a61d8374b"] +Cell[163719, 4190, 1144, 39, 144, "Input",ExpressionUUID->"635f4e4a-0c8e-4483-a3a6-0e96e17e79ba"], +Cell[164866, 4231, 313, 5, 41, "Output",ExpressionUUID->"da1af26d-2ea9-451a-bac3-94ce5245b9db"] }, Open ]], Cell[CellGroupData[{ -Cell[163353, 4297, 1045, 36, 246, "Input",ExpressionUUID->"16076403-4cf2-4dd2-adeb-8ec26990a906"], -Cell[164401, 4335, 288, 6, 75, "Output",ExpressionUUID->"99dea3a3-ac4f-4919-91ca-b0d5f01eac97"] +Cell[165216, 4241, 1041, 35, 144, "Input",ExpressionUUID->"16076403-4cf2-4dd2-adeb-8ec26990a906"], +Cell[166260, 4278, 334, 6, 41, "Output",ExpressionUUID->"e52d112d-6b58-4a06-8bb1-61c3a08d9494"] }, Open ]], Cell[CellGroupData[{ -Cell[164726, 4346, 1148, 40, 246, "Input",ExpressionUUID->"eace7e71-d77b-4244-9165-1769e36be22d"], -Cell[165877, 4388, 272, 5, 75, "Output",ExpressionUUID->"6bc418f6-0e0c-4cb4-9311-82e8028c408a"] +Cell[166631, 4289, 1144, 39, 144, "Input",ExpressionUUID->"eace7e71-d77b-4244-9165-1769e36be22d"], +Cell[167778, 4330, 317, 5, 41, "Output",ExpressionUUID->"b6f72177-ad4e-4f17-913f-ffa08deca22a"] }, Open ]], Cell[CellGroupData[{ -Cell[166186, 4398, 112, 2, 66, "Input",ExpressionUUID->"84d17c99-5bd0-4360-9f94-db9e257c08b8"], -Cell[166301, 4402, 269, 5, 75, "Output",ExpressionUUID->"0462b6f9-4c07-469b-9f46-ddc24cee93db"] +Cell[168132, 4340, 108, 1, 36, "Input",ExpressionUUID->"84d17c99-5bd0-4360-9f94-db9e257c08b8"], +Cell[168243, 4343, 315, 5, 41, "Output",ExpressionUUID->"0bdfd251-eaff-4c61-bef2-3af2384a4fee"] }, Open ]], Cell[CellGroupData[{ -Cell[166607, 4412, 112, 2, 66, "Input",ExpressionUUID->"f1c9aaa0-649f-41fd-b4b5-5cdf7d9e4994"], -Cell[166722, 4416, 290, 6, 75, "Output",ExpressionUUID->"1a591bd3-666f-466d-a23d-6d2b845c8fb5"] +Cell[168595, 4353, 108, 1, 36, "Input",ExpressionUUID->"f1c9aaa0-649f-41fd-b4b5-5cdf7d9e4994"], +Cell[168706, 4356, 336, 6, 41, "Output",ExpressionUUID->"cca68665-41a8-4ebd-bc41-1be0c58f6818"] }, Open ]], Cell[CellGroupData[{ -Cell[167049, 4427, 112, 2, 66, "Input",ExpressionUUID->"a0471ab2-6038-4a17-ab69-10536cd0ccac"], -Cell[167164, 4431, 287, 6, 75, "Output",ExpressionUUID->"77aa9a60-c9bf-4578-9ff1-4206379f9f14"] +Cell[169079, 4367, 108, 1, 36, "Input",ExpressionUUID->"a0471ab2-6038-4a17-ab69-10536cd0ccac"], +Cell[169190, 4370, 331, 6, 41, "Output",ExpressionUUID->"8deca9d4-d6f2-4506-a483-b71fe00917d2"] }, Open ]], Cell[CellGroupData[{ -Cell[167488, 4442, 112, 2, 66, "Input",ExpressionUUID->"3ca58a31-103c-45b8-a596-f20c7d5d0eb6"], -Cell[167603, 4446, 269, 5, 75, "Output",ExpressionUUID->"e694da90-2caf-44c5-afc6-e9e2810f4efe"] +Cell[169558, 4381, 108, 1, 36, "Input",ExpressionUUID->"3ca58a31-103c-45b8-a596-f20c7d5d0eb6"], +Cell[169669, 4384, 315, 5, 41, "Output",ExpressionUUID->"38aeb17f-b136-4ba5-850f-b7bd835e2f32"] }, Open ]], Cell[CellGroupData[{ -Cell[167909, 4456, 111, 2, 66, "Input",ExpressionUUID->"ea2830d3-1c19-45c3-9c69-02e548b27a25"], -Cell[168023, 4460, 272, 5, 75, "Output",ExpressionUUID->"2b8dfe4f-27e8-4e22-bb12-4b4482cf3b4e"] +Cell[170021, 4394, 107, 1, 36, "Input",ExpressionUUID->"ea2830d3-1c19-45c3-9c69-02e548b27a25"], +Cell[170131, 4397, 316, 5, 41, "Output",ExpressionUUID->"026405e3-df24-42ff-adf8-247067b3ae79"] }, Open ]], Cell[CellGroupData[{ -Cell[168332, 4470, 111, 2, 66, "Input",ExpressionUUID->"809f0a50-4913-458a-a1e7-cb270263a73f"], -Cell[168446, 4474, 272, 5, 75, "Output",ExpressionUUID->"9b8c15c5-99bd-403e-8850-0382767a19d2"] +Cell[170484, 4407, 107, 1, 36, "Input",ExpressionUUID->"809f0a50-4913-458a-a1e7-cb270263a73f"], +Cell[170594, 4410, 316, 5, 41, "Output",ExpressionUUID->"bdb238ad-5422-44ee-86a2-00dd58ac4401"] }, Open ]], Cell[CellGroupData[{ -Cell[168755, 4484, 501, 17, 125, "Input",ExpressionUUID->"e52951a6-435a-47e8-b932-62cc03f01a8e"], -Cell[169259, 4503, 287, 6, 75, "Output",ExpressionUUID->"487fe44e-81b3-4b9a-87ad-a2e075b0b7c6"] +Cell[170947, 4420, 497, 16, 71, "Input",ExpressionUUID->"e52951a6-435a-47e8-b932-62cc03f01a8e"], +Cell[171447, 4438, 330, 6, 41, "Output",ExpressionUUID->"bac0090a-5a5f-4cbd-94ab-5e97eb4a1a0e"] }, Open ]], Cell[CellGroupData[{ -Cell[169583, 4514, 501, 17, 125, "Input",ExpressionUUID->"f7f11b32-3aac-4fe6-899b-165a4303e96e"], -Cell[170087, 4533, 283, 6, 75, "Output",ExpressionUUID->"2b99fdb6-f533-4ed5-8c0d-c06a80cc56c1"] +Cell[171814, 4449, 497, 16, 71, "Input",ExpressionUUID->"f7f11b32-3aac-4fe6-899b-165a4303e96e"], +Cell[172314, 4467, 325, 6, 41, "Output",ExpressionUUID->"2470173c-05f8-4deb-83ad-0be62a1e5cb4"] }, Open ]], Cell[CellGroupData[{ -Cell[170407, 4544, 1792, 61, 420, "Input",ExpressionUUID->"81bc1609-b94f-4e55-9120-4324a33ca2f3"], -Cell[172202, 4607, 271, 5, 75, "Output",ExpressionUUID->"722935c4-2c7a-43e1-8248-3b27ad3bfa8e"] +Cell[172676, 4478, 1788, 60, 340, "Input",ExpressionUUID->"81bc1609-b94f-4e55-9120-4324a33ca2f3"], +Cell[174467, 4540, 315, 5, 41, "Output",ExpressionUUID->"db645164-6626-4ab3-8c3f-43c0f40599f3"] }, Open ]], Cell[CellGroupData[{ -Cell[172510, 4617, 1105, 37, 299, "Input",ExpressionUUID->"ae67d1a1-c662-498f-a276-9ee8d2caa351"], -Cell[173618, 4656, 284, 6, 75, "Output",ExpressionUUID->"907b9465-e011-4ead-815a-9da0021532cf"] +Cell[174819, 4550, 1101, 36, 174, "Input",ExpressionUUID->"ae67d1a1-c662-498f-a276-9ee8d2caa351"], +Cell[175923, 4588, 327, 6, 41, "Output",ExpressionUUID->"4212ba88-d23f-4f10-ba8b-326b84514f59"] }, Open ]], Cell[CellGroupData[{ -Cell[173939, 4667, 1822, 62, 420, "Input",ExpressionUUID->"ea3ceea0-934b-4be6-8221-5a3c3c00657d"], -Cell[175764, 4731, 268, 5, 75, "Output",ExpressionUUID->"c288ca2f-aae0-4da7-b3d2-8a15dfecf03e"] +Cell[176287, 4599, 1818, 61, 340, "Input",ExpressionUUID->"ea3ceea0-934b-4be6-8221-5a3c3c00657d"], +Cell[178108, 4662, 314, 5, 41, "Output",ExpressionUUID->"631e986d-d124-4be5-b7b6-b8d01da17ebe"] }, Open ]], Cell[CellGroupData[{ -Cell[176069, 4741, 1635, 54, 101, "Input",ExpressionUUID->"57ee0694-2a18-4150-9247-6165f96999ff"], -Cell[177707, 4797, 267, 5, 41, "Output",ExpressionUUID->"5d1a1f43-33c3-43da-974c-99fe009f9fec"] +Cell[178459, 4672, 1631, 53, 208, "Input",ExpressionUUID->"57ee0694-2a18-4150-9247-6165f96999ff"], +Cell[180093, 4727, 310, 5, 41, "Output",ExpressionUUID->"0bb6d199-8578-4dbb-a9f9-75815d21357d"] }, Open ]], Cell[CellGroupData[{ -Cell[178011, 4807, 1635, 54, 101, "Input",ExpressionUUID->"388b4d86-49b2-4271-a4a0-3c7028dff9d2"], -Cell[179649, 4863, 268, 5, 41, "Output",ExpressionUUID->"656d020b-75a2-4f99-a8e2-2431d894f988"] +Cell[180440, 4737, 1631, 53, 208, "Input",ExpressionUUID->"388b4d86-49b2-4271-a4a0-3c7028dff9d2"], +Cell[182074, 4792, 312, 5, 41, "Output",ExpressionUUID->"56d12455-3ab0-4c7d-bbcf-ea40e9e73dd3"] }, Open ]], -Cell[179932, 4871, 251, 5, 56, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], -Cell[180186, 4878, 253, 5, 56, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], Cell[CellGroupData[{ -Cell[180464, 4887, 1301, 43, 61, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[181768, 4932, 178, 3, 41, "Output",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[182423, 4802, 272, 5, 56, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], +Cell[182698, 4809, 183, 2, 41, "Output",ExpressionUUID->"043db049-1e79-4fa7-94fb-e6f1cd3b864a"] }, Open ]], Cell[CellGroupData[{ -Cell[181983, 4940, 910, 31, 73, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[182896, 4973, 175, 3, 41, "Output",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[182918, 4816, 274, 5, 56, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], +Cell[183195, 4823, 183, 2, 41, "Output",ExpressionUUID->"b199b882-4cfb-43fa-a996-cf2a6c844c99"] }, Open ]], Cell[CellGroupData[{ -Cell[183108, 4981, 885, 30, 73, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[183996, 5013, 177, 3, 41, "Output",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[183415, 4830, 1297, 42, 174, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], +Cell[184715, 4874, 223, 3, 41, "Output",ExpressionUUID->"da7791a4-8911-499e-8700-f1d023812f2e"] }, Open ]], Cell[CellGroupData[{ -Cell[184210, 5021, 558, 19, 66, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[184771, 5042, 173, 3, 41, "Output",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[184975, 4882, 929, 30, 128, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], +Cell[185907, 4914, 217, 3, 41, "Output",ExpressionUUID->"d115b238-de90-40b6-b576-7bd73798e216"] }, Open ]], Cell[CellGroupData[{ -Cell[184981, 5050, 623, 21, 66, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[185607, 5073, 170, 3, 41, "Output",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[186161, 4922, 904, 29, 128, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], +Cell[187068, 4953, 223, 3, 41, "Output",ExpressionUUID->"8b06f1ed-3a3c-46be-9c4a-5c34de9fe950"] }, Open ]], Cell[CellGroupData[{ -Cell[185814, 5081, 170, 5, 71, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[185987, 5088, 173, 3, 41, "Output",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[187328, 4961, 554, 18, 66, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], +Cell[187885, 4981, 217, 3, 41, "Output",ExpressionUUID->"6d5a6b56-20b7-4518-9526-10e48bc7a476"] }, Open ]], Cell[CellGroupData[{ -Cell[186197, 5096, 170, 5, 69, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[186370, 5103, 170, 3, 41, "Output",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[188139, 4989, 619, 20, 66, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], +Cell[188761, 5011, 216, 3, 41, "Output",ExpressionUUID->"1841cc25-3b23-4eb0-a46c-5846f15fa4aa"] }, Open ]], Cell[CellGroupData[{ -Cell[186577, 5111, 181, 5, 55, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[186761, 5118, 171, 3, 41, "Output",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[189014, 5019, 166, 4, 71, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], +Cell[189183, 5025, 215, 3, 41, "Output",ExpressionUUID->"2aa9ae65-b0f4-4393-9d6c-0f56e07c17ce"] }, Open ]], Cell[CellGroupData[{ -Cell[186969, 5126, 181, 5, 55, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[187153, 5133, 173, 3, 41, "Output",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[189435, 5033, 166, 4, 69, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], +Cell[189604, 5039, 214, 3, 41, "Output",ExpressionUUID->"65175395-f73c-4268-8bc8-436e38deae9b"] }, Open ]], Cell[CellGroupData[{ -Cell[187363, 5141, 6055, 185, 431, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[193421, 5328, 175, 3, 41, "Output",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[189855, 5047, 177, 4, 55, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], +Cell[190035, 5053, 216, 3, 41, "Output",ExpressionUUID->"1209a81e-58b2-48a2-902f-1e5f9617e226"] }, Open ]], Cell[CellGroupData[{ -Cell[193633, 5336, 368, 9, 53, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[194004, 5347, 170, 3, 41, "Output",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[190288, 5061, 177, 4, 55, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], +Cell[190468, 5067, 218, 3, 41, "Output",ExpressionUUID->"be7c9310-c72b-4aa1-99e0-2158f22fe86b"] }, Open ]], Cell[CellGroupData[{ -Cell[194211, 5355, 6122, 187, 431, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[200336, 5544, 175, 3, 41, "Output",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[190723, 5075, 6051, 184, 831, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], +Cell[196777, 5261, 220, 3, 41, "Output",ExpressionUUID->"bb23a7a1-bdd8-457f-9af5-599eb2ef4422"] }, Open ]], Cell[CellGroupData[{ -Cell[200548, 5552, 368, 9, 53, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[200919, 5563, 172, 3, 41, "Output",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[197034, 5269, 364, 8, 53, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], +Cell[197401, 5279, 215, 3, 41, "Output",ExpressionUUID->"e5d418ba-a0b8-4e2d-8f35-8c30dc3454d5"] }, Open ]], Cell[CellGroupData[{ -Cell[201128, 5571, 2663, 88, 215, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[203794, 5661, 173, 3, 41, "Output",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[197653, 5287, 6118, 186, 900, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], +Cell[203774, 5475, 219, 3, 41, "Output",ExpressionUUID->"f215954e-b97a-4c53-81a5-3188ae005c15"] }, Open ]], Cell[CellGroupData[{ -Cell[204004, 5669, 2603, 85, 215, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[206610, 5756, 172, 3, 41, "Output",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[204030, 5483, 364, 8, 53, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], +Cell[204397, 5493, 217, 3, 41, "Output",ExpressionUUID->"b1b504fe-204f-416c-a5cf-ff5133768e11"] }, Open ]], Cell[CellGroupData[{ -Cell[206819, 5764, 3712, 118, 316, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[210534, 5884, 174, 3, 41, "Output",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[204651, 5501, 2659, 87, 435, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], +Cell[207313, 5590, 217, 3, 41, "Output",ExpressionUUID->"4c57ba16-25d7-4ec0-bcfe-b3f242b38d23"] }, Open ]], -Cell[210723, 5890, 138, 3, 36, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ -Cell[210886, 5897, 2052, 59, 116, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], -Cell[212941, 5958, 524, 11, 29, "Message",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], -Cell[213468, 5971, 526, 11, 29, "Message",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], -Cell[213997, 5984, 530, 11, 29, "Message",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], -Cell[214530, 5997, 455, 10, 26, "Message",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], -Cell[214988, 6009, 172, 3, 41, "Output",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[207567, 5598, 2599, 84, 435, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], +Cell[210169, 5684, 218, 3, 41, "Output",ExpressionUUID->"a2a06b10-c2c2-41cf-8d03-c6d563e0279a"] }, Open ]], Cell[CellGroupData[{ -Cell[215197, 6017, 2054, 59, 116, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], -Cell[217254, 6078, 524, 11, 29, "Message",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], -Cell[217781, 6091, 526, 11, 29, "Message",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], -Cell[218310, 6104, 528, 11, 29, "Message",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], -Cell[218841, 6117, 456, 10, 26, "Message",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], -Cell[219300, 6129, 170, 3, 41, "Output",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[210424, 5692, 3708, 117, 575, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], +Cell[214135, 5811, 218, 3, 41, "Output",ExpressionUUID->"e98e58f9-d92d-492c-8010-dc8ee665b31f"] }, Open ]], +Cell[214368, 5817, 160, 3, 109, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ -Cell[219507, 6137, 1938, 53, 63, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], -Cell[221448, 6192, 19994, 375, 285, "Output",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] +Cell[214553, 5824, 2071, 58, 276, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], +Cell[216627, 5884, 688, 15, 73, "Message",ExpressionUUID->"71d4a8c3-313c-455c-b70e-0e42a4a67a08"], +Cell[217318, 5901, 690, 15, 73, "Message",ExpressionUUID->"997e08d4-fc02-48bd-b7c4-7378024ccf1f"], +Cell[218011, 5918, 689, 15, 73, "Message",ExpressionUUID->"f126b77f-d840-4609-b647-70289b55765e"], +Cell[218703, 5935, 516, 12, 32, "Message",ExpressionUUID->"d08a9658-d500-4124-9090-615d1abc397b"], +Cell[219222, 5949, 215, 3, 41, "Output",ExpressionUUID->"67d9d217-73a9-4fc0-a660-b91fe52fbb36"] }, Open ]], Cell[CellGroupData[{ -Cell[241479, 6572, 2092, 60, 116, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], -Cell[243574, 6634, 490, 11, 48, "Message",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], -Cell[244067, 6647, 493, 11, 48, "Message",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], -Cell[244563, 6660, 508, 11, 33, "Message",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], -Cell[245074, 6673, 456, 10, 26, "Message",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], -Cell[245533, 6685, 61603, 1057, 290, "Output",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] +Cell[219474, 5957, 2073, 58, 276, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], +Cell[221550, 6017, 688, 15, 73, "Message",ExpressionUUID->"e72d1317-8294-4126-aa72-ea9dc2d214bc"], +Cell[222241, 6034, 686, 15, 73, "Message",ExpressionUUID->"642e40e6-67ce-424d-a651-364637c10dfc"], +Cell[222930, 6051, 687, 15, 73, "Message",ExpressionUUID->"76c5fa06-9e5b-47e2-a315-c5d155274f67"], +Cell[223620, 6068, 514, 12, 32, "Message",ExpressionUUID->"8bad4a1a-1c7c-4a5d-b9ca-86ad387e1bd4"], +Cell[224137, 6082, 213, 3, 41, "Output",ExpressionUUID->"d310410b-8071-45e2-bba7-1c23f5f9bc09"] }, Open ]], -Cell[307151, 7745, 2523, 71, 160, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], -Cell[309677, 7818, 209, 5, 36, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], Cell[CellGroupData[{ -Cell[309911, 7827, 217, 7, 61, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[310131, 7836, 169, 3, 41, "Output",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[224387, 6090, 2049, 54, 232, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], +Cell[226439, 6146, 20027, 375, 300, "Output",ExpressionUUID->"ca01ad66-cc1c-47ed-9f77-a5d9f1e8c1f9"] }, Open ]], Cell[CellGroupData[{ -Cell[310337, 7844, 1816, 53, 116, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], -Cell[312156, 7899, 502, 11, 48, "Message",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], -Cell[312661, 7912, 506, 11, 48, "Message",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], -Cell[313170, 7925, 509, 11, 48, "Message",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], -Cell[313682, 7938, 456, 10, 26, "Message",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], -Cell[314141, 7950, 28560, 514, 290, "Output",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] +Cell[246503, 6526, 2111, 59, 311, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], +Cell[248617, 6587, 562, 13, 71, "Message",ExpressionUUID->"9f037cef-e7d9-47ba-b370-5cc4f11e6cc4"], +Cell[249182, 6602, 564, 13, 71, "Message",ExpressionUUID->"e5a5f4ab-72d1-4759-95ab-24efde85d72a"], +Cell[249749, 6617, 567, 13, 71, "Message",ExpressionUUID->"97942cf1-24b2-4a5a-a6b8-03214eb0f226"], +Cell[250319, 6632, 515, 12, 32, "Message",ExpressionUUID->"2da8e26c-cd98-4975-94ba-c0c9a57661f6"], +Cell[250837, 6646, 27309, 495, 290, "Output",ExpressionUUID->"b94e4951-403c-415b-b12f-6978559ba8d6"] }, Open ]], Cell[CellGroupData[{ -Cell[342738, 8469, 1616, 48, 86, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], -Cell[344357, 8519, 576, 12, 71, "Message",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], -Cell[344936, 8533, 582, 12, 71, "Message",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], -Cell[345521, 8547, 584, 12, 71, "Message",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], -Cell[346108, 8561, 458, 10, 26, "Message",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], -Cell[346569, 8573, 170, 3, 41, "Output",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[278183, 7146, 2544, 71, 316, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], +Cell[280730, 7219, 9516, 222, 298, "Output",ExpressionUUID->"67da212f-415b-42e0-bc0c-9fabc782c4bd"] }, Open ]], Cell[CellGroupData[{ -Cell[346776, 8581, 2247, 64, 81, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], -Cell[349026, 8647, 522, 11, 48, "Message",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], -Cell[349551, 8660, 526, 11, 48, "Message",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], -Cell[350080, 8673, 528, 11, 48, "Message",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], -Cell[350611, 8686, 458, 10, 26, "Message",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], -Cell[351072, 8698, 175, 3, 41, "Output",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[290283, 7446, 228, 4, 36, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], +Cell[290514, 7452, 33667, 626, 290, "Output",ExpressionUUID->"5ef6094e-250b-4de3-86b6-7f1be88e7985"] }, Open ]], Cell[CellGroupData[{ -Cell[351284, 8706, 2221, 64, 81, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], -Cell[353508, 8772, 522, 11, 48, "Message",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], -Cell[354033, 8785, 524, 11, 48, "Message",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], -Cell[354560, 8798, 528, 11, 48, "Message",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], -Cell[355091, 8811, 458, 10, 26, "Message",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], -Cell[355552, 8823, 170, 3, 41, "Output",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] +Cell[324218, 8083, 236, 6, 61, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], +Cell[324457, 8091, 215, 3, 41, "Output",ExpressionUUID->"aa90d105-8436-4599-ab02-d7ddbc571148"] }, Open ]], Cell[CellGroupData[{ -Cell[355759, 8831, 2221, 64, 81, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], -Cell[357983, 8897, 524, 11, 48, "Message",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], -Cell[358510, 8910, 526, 11, 48, "Message",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], -Cell[359039, 8923, 530, 11, 48, "Message",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], -Cell[359572, 8936, 458, 10, 26, "Message",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], -Cell[360033, 8948, 171, 3, 41, "Output",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] +Cell[324709, 8099, 1835, 52, 311, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], +Cell[326547, 8153, 567, 13, 71, "Message",ExpressionUUID->"2e8dd755-3359-4d17-9d28-0811694fc060"], +Cell[327117, 8168, 570, 13, 71, "Message",ExpressionUUID->"f8342a66-9c9b-4c45-8033-1ed76f624a47"], +Cell[327690, 8183, 574, 13, 71, "Message",ExpressionUUID->"b78a7020-afca-460d-a34d-96cad48be6ca"], +Cell[328267, 8198, 514, 12, 32, "Message",ExpressionUUID->"e91ebaf5-f6bb-4c6a-8d1c-f46d1b03d47c"], +Cell[328784, 8212, 29286, 528, 290, "Output",ExpressionUUID->"3d4ca44f-f9b7-43ea-b872-78f006c6a828"] }, Open ]], Cell[CellGroupData[{ -Cell[360241, 8956, 215, 6, 60, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], -Cell[360459, 8964, 175, 3, 41, "Output",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] +Cell[358107, 8745, 1612, 47, 132, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], +Cell[359722, 8794, 686, 15, 73, "Message",ExpressionUUID->"da1f4a73-d1fc-451d-9fd1-daa095778d6e"], +Cell[360411, 8811, 685, 15, 73, "Message",ExpressionUUID->"d67c090f-4994-4242-b038-843d4518f5ec"], +Cell[361099, 8828, 685, 15, 73, "Message",ExpressionUUID->"3dcd7650-12e7-467e-a77d-4469cac6f87d"], +Cell[361787, 8845, 515, 12, 32, "Message",ExpressionUUID->"f9cf3e6b-e109-4add-a913-08a9438e2129"], +Cell[362305, 8859, 215, 3, 41, "Output",ExpressionUUID->"02375aea-9ff2-4be6-b10c-c36997a0ecf2"] }, Open ]], -Cell[360649, 8970, 245, 5, 36, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ -Cell[360919, 8979, 623, 20, 66, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[361545, 9001, 172, 3, 41, "Output",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] +Cell[362557, 8867, 2266, 63, 348, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], +Cell[364826, 8932, 687, 15, 73, "Message",ExpressionUUID->"17468b9a-8022-4d02-8d71-f419f8aea37d"], +Cell[365516, 8949, 687, 15, 73, "Message",ExpressionUUID->"d1c12e64-6207-4a62-81de-2694b04162aa"], +Cell[366206, 8966, 688, 15, 73, "Message",ExpressionUUID->"208a8324-2a0c-43c6-826b-df56c2ec48e7"], +Cell[366897, 8983, 517, 12, 32, "Message",ExpressionUUID->"6be0e505-3cf8-408d-8668-0a43853d6a6b"], +Cell[367417, 8997, 214, 3, 41, "Output",ExpressionUUID->"db9c01f7-b06f-4c52-9a36-e80f79d5c5e2"] }, Open ]], Cell[CellGroupData[{ -Cell[361754, 9009, 170, 5, 71, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[361927, 9016, 172, 3, 41, "Output",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] +Cell[367668, 9005, 2233, 63, 348, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], +Cell[369904, 9070, 687, 15, 73, "Message",ExpressionUUID->"2cd42c45-03aa-4ac9-b0c1-f32bd6672e9c"], +Cell[370594, 9087, 686, 15, 73, "Message",ExpressionUUID->"5bce8b46-9e92-414d-add5-6d1040001da8"], +Cell[371283, 9104, 688, 15, 73, "Message",ExpressionUUID->"f6e78372-ef3d-432c-b1df-86ec9062b98a"], +Cell[371974, 9121, 515, 12, 32, "Message",ExpressionUUID->"a6fe13e1-c976-4388-b0fa-e1037bc81284"], +Cell[372492, 9135, 218, 4, 41, "Output",ExpressionUUID->"19c64c7a-4e28-4ff0-8e66-ec50d97cffd4"] }, Open ]], Cell[CellGroupData[{ -Cell[362136, 9024, 181, 5, 55, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[362320, 9031, 172, 3, 41, "Output",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] +Cell[372747, 9144, 2233, 63, 348, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], +Cell[374983, 9209, 691, 15, 73, "Message",ExpressionUUID->"ef67cc31-99fb-4bdd-b3fe-ea35d168012e"], +Cell[375677, 9226, 689, 15, 73, "Message",ExpressionUUID->"aeda4b30-4368-44af-aa02-7dcc28ea2810"], +Cell[376369, 9243, 692, 15, 73, "Message",ExpressionUUID->"7a25d22a-95fb-4aec-abac-7d31b1e8afeb"], +Cell[377064, 9260, 516, 12, 32, "Message",ExpressionUUID->"a8bde9e4-a39f-4e01-8e9c-9b028bf58c8f"], +Cell[377583, 9274, 218, 4, 41, "Output",ExpressionUUID->"863a8875-2a83-42a2-b9b4-4b6146a7fb2f"] }, Open ]], Cell[CellGroupData[{ -Cell[362529, 9039, 6055, 185, 431, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[368587, 9226, 174, 3, 41, "Output",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] +Cell[377838, 9283, 238, 6, 60, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], +Cell[378079, 9291, 219, 4, 41, "Output",ExpressionUUID->"d4ca0909-94fe-48d5-96ee-d69f0726345e"] }, Open ]], +Cell[378313, 9298, 271, 6, 109, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ -Cell[368798, 9234, 368, 9, 53, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[369169, 9245, 173, 3, 41, "Output",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] +Cell[378609, 9308, 623, 20, 66, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], +Cell[379235, 9330, 218, 4, 41, "Output",ExpressionUUID->"5fdbbf3c-5fd6-4709-90b9-1df7c620d467"] }, Open ]], Cell[CellGroupData[{ -Cell[369379, 9253, 6122, 187, 431, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[375504, 9442, 175, 3, 41, "Output",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] +Cell[379490, 9339, 170, 5, 71, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], +Cell[379663, 9346, 220, 4, 41, "Output",ExpressionUUID->"92dc1416-b1b1-416a-b4b9-63c4093eb08d"] }, Open ]], Cell[CellGroupData[{ -Cell[375716, 9450, 368, 9, 53, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[376087, 9461, 170, 3, 41, "Output",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] +Cell[379920, 9355, 181, 5, 55, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], +Cell[380104, 9362, 222, 4, 41, "Output",ExpressionUUID->"c60ec586-631e-4280-9cf1-f6cef6d24666"] }, Open ]], Cell[CellGroupData[{ -Cell[376294, 9469, 2663, 88, 215, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[378960, 9559, 173, 3, 41, "Output",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] +Cell[380363, 9371, 6055, 185, 831, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], +Cell[386421, 9558, 224, 4, 41, "Output",ExpressionUUID->"89057fa4-bf45-49f7-a9a3-033fe131ea9e"] }, Open ]], Cell[CellGroupData[{ -Cell[379170, 9567, 2603, 85, 215, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[381776, 9654, 172, 3, 41, "Output",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] +Cell[386682, 9567, 368, 9, 53, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], +Cell[387053, 9578, 221, 4, 41, "Output",ExpressionUUID->"53e1d9f5-9cfd-48e3-8e10-a216bc6031e4"] }, Open ]], Cell[CellGroupData[{ -Cell[381985, 9662, 3712, 118, 316, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[385700, 9782, 174, 3, 41, "Output",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] +Cell[387311, 9587, 6122, 187, 900, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], +Cell[393436, 9776, 220, 4, 41, "Output",ExpressionUUID->"4a743ba8-a71b-43e1-96ec-3ec06049c1a0"] }, Open ]], Cell[CellGroupData[{ -Cell[385911, 9790, 2052, 59, 116, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], -Cell[387966, 9851, 574, 12, 71, "Message",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], -Cell[388543, 9865, 580, 12, 71, "Message",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], -Cell[389126, 9879, 582, 12, 71, "Message",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], -Cell[389711, 9893, 456, 10, 26, "Message",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], -Cell[390170, 9905, 171, 3, 41, "Output",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] +Cell[393693, 9785, 368, 9, 53, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], +Cell[394064, 9796, 217, 4, 41, "Output",ExpressionUUID->"10458185-ced5-4971-a340-1bcf300771ac"] }, Open ]], Cell[CellGroupData[{ -Cell[390378, 9913, 2054, 59, 116, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], -Cell[392435, 9974, 574, 12, 71, "Message",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], -Cell[393012, 9988, 578, 12, 71, "Message",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], -Cell[393593, 10002, 582, 12, 71, "Message",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], -Cell[394178, 10016, 458, 10, 26, "Message",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], -Cell[394639, 10028, 169, 3, 41, "Output",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] +Cell[394318, 9805, 2663, 88, 435, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], +Cell[396984, 9895, 225, 4, 41, "Output",ExpressionUUID->"abda5f28-aeaf-4727-b31e-05be98f84991"] }, Open ]], Cell[CellGroupData[{ -Cell[394845, 10036, 2030, 55, 63, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], -Cell[396878, 10093, 20326, 381, 299, "Output",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] +Cell[397246, 9904, 2603, 85, 435, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], +Cell[399852, 9991, 218, 4, 41, "Output",ExpressionUUID->"212cdd5d-0476-4843-9681-8c91622aafad"] }, Open ]], -Cell[417219, 10477, 2144, 61, 116, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], -Cell[419366, 10540, 138, 3, 36, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], Cell[CellGroupData[{ -Cell[419529, 10547, 1616, 48, 86, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], -Cell[421148, 10597, 592, 12, 71, "Message",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], -Cell[421743, 10611, 597, 12, 71, "Message",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], -Cell[422343, 10625, 599, 12, 71, "Message",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], -Cell[422945, 10639, 458, 10, 26, "Message",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], -Cell[423406, 10651, 172, 3, 41, "Output",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] +Cell[400107, 10000, 3712, 118, 575, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], +Cell[403822, 10120, 222, 4, 41, "Output",ExpressionUUID->"2a621f04-df5e-4626-b8e0-4ff64c870bed"] }, Open ]], Cell[CellGroupData[{ -Cell[423615, 10659, 2249, 64, 81, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], -Cell[425867, 10725, 576, 12, 71, "Message",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], -Cell[426446, 10739, 580, 12, 71, "Message",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], -Cell[427029, 10753, 582, 12, 71, "Message",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], -Cell[427614, 10767, 456, 10, 26, "Message",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], -Cell[428073, 10779, 171, 3, 41, "Output",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] +Cell[404081, 10129, 2075, 59, 276, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], +Cell[406159, 10190, 686, 15, 73, "Message",ExpressionUUID->"6c950235-209e-4907-bb61-5ea7ca9eb8e1"], +Cell[406848, 10207, 687, 15, 73, "Message",ExpressionUUID->"824397c1-ae91-4591-946e-d4344e179330"], +Cell[407538, 10224, 689, 15, 73, "Message",ExpressionUUID->"b8ec4384-b7cf-4db1-b40c-767174c49281"], +Cell[408230, 10241, 517, 12, 32, "Message",ExpressionUUID->"94130faf-ff6d-412e-aa8b-d426ea8083bc"], +Cell[408750, 10255, 217, 4, 41, "Output",ExpressionUUID->"e750c412-bb21-44f1-b3b3-2b82bae29a7e"] }, Open ]], Cell[CellGroupData[{ -Cell[428281, 10787, 2223, 64, 81, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], -Cell[430507, 10853, 574, 12, 71, "Message",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], -Cell[431084, 10867, 578, 12, 71, "Message",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], -Cell[431665, 10881, 580, 12, 71, "Message",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], -Cell[432248, 10895, 458, 10, 26, "Message",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], -Cell[432709, 10907, 173, 3, 41, "Output",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] +Cell[409004, 10264, 2077, 59, 276, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], +Cell[411084, 10325, 687, 15, 73, "Message",ExpressionUUID->"7e7499e9-19c6-4bcf-8e49-47ab6468734a"], +Cell[411774, 10342, 689, 15, 73, "Message",ExpressionUUID->"142e57b1-f903-46c5-84e0-296a4791e9f0"], +Cell[412466, 10359, 687, 15, 73, "Message",ExpressionUUID->"127afde1-1d73-400a-86ed-d49a3734f9be"], +Cell[413156, 10376, 517, 12, 32, "Message",ExpressionUUID->"e312b68f-e8e6-4700-85f1-a8edbd5239eb"], +Cell[413676, 10390, 219, 4, 41, "Output",ExpressionUUID->"3dde8d27-133f-486f-8da0-4e11577e62f5"] }, Open ]], Cell[CellGroupData[{ -Cell[432919, 10915, 2221, 64, 81, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], -Cell[435143, 10981, 574, 12, 71, "Message",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], -Cell[435720, 10995, 578, 12, 71, "Message",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], -Cell[436301, 11009, 582, 12, 71, "Message",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], -Cell[436886, 11023, 455, 10, 26, "Message",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], -Cell[437344, 11035, 170, 3, 41, "Output",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] +Cell[413932, 10399, 2053, 55, 232, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], +Cell[415988, 10456, 20323, 383, 295, "Output",ExpressionUUID->"5b60894a-8ed1-4373-bcba-1ad8fe3ebe3e"] }, Open ]], Cell[CellGroupData[{ -Cell[437551, 11043, 215, 6, 60, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], -Cell[437769, 11051, 174, 3, 41, "Output",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] +Cell[436348, 10844, 2166, 61, 311, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], +Cell[438517, 10907, 513, 12, 71, "Message",ExpressionUUID->"12330c7a-b763-4afd-9130-29258ced0441"], +Cell[439033, 10921, 516, 12, 71, "Message",ExpressionUUID->"b7a0fd45-3bd8-4aa3-86bd-b4e9973c177e"], +Cell[439552, 10935, 521, 12, 71, "Message",ExpressionUUID->"6bc265ee-ba3b-466f-b60b-890a64005d5d"], +Cell[440076, 10949, 468, 11, 32, "Message",ExpressionUUID->"2041624c-b2a8-4753-a829-82375bb7f2fd"], +Cell[440547, 10962, 28702, 519, 290, "Output",ExpressionUUID->"639be5a1-2c2c-4d54-b51e-20c12215fafc"] }, Open ]], -Cell[437958, 11057, 249, 5, 36, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ -Cell[438232, 11066, 558, 19, 66, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[438793, 11087, 169, 3, 41, "Output",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] +Cell[469286, 11486, 164, 4, 36, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], +Cell[469453, 11492, 35086, 651, 290, "Output",ExpressionUUID->"dfb6947f-1258-4dd7-b0cc-dcb49d38800f"] }, Open ]], Cell[CellGroupData[{ -Cell[438999, 11095, 170, 5, 71, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[439172, 11102, 173, 3, 41, "Output",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] +Cell[504576, 12148, 1616, 48, 132, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], +Cell[506195, 12198, 663, 14, 73, "Message",ExpressionUUID->"06989008-9bc0-498a-9e58-51c63e3cdb8c"], +Cell[506861, 12214, 663, 14, 73, "Message",ExpressionUUID->"334dc72c-f093-4e89-a591-d09a29ebf49f"], +Cell[507527, 12230, 662, 14, 73, "Message",ExpressionUUID->"563d8a5e-18b0-4b35-92d1-2f63570a7461"], +Cell[508192, 12246, 490, 11, 32, "Message",ExpressionUUID->"79e4ec56-d6c4-4b36-9db2-4e7fa1cb9245"], +Cell[508685, 12259, 194, 3, 41, "Output",ExpressionUUID->"4a795250-5f85-498d-b526-502a3f1a69bd"] }, Open ]], Cell[CellGroupData[{ -Cell[439382, 11110, 181, 5, 55, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[439566, 11117, 173, 3, 41, "Output",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] +Cell[508916, 12267, 2272, 64, 348, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], +Cell[511191, 12333, 664, 14, 73, "Message",ExpressionUUID->"8129d402-bdfc-49a5-9d32-3d9b3d02abf8"], +Cell[511858, 12349, 664, 14, 73, "Message",ExpressionUUID->"8d138cbe-7d58-49a7-8f77-ad6d327e2140"], +Cell[512525, 12365, 664, 14, 73, "Message",ExpressionUUID->"075cae93-d52e-448b-89ad-d67687b25303"], +Cell[513192, 12381, 492, 11, 32, "Message",ExpressionUUID->"0ab8af09-5a17-4d67-9419-fd2ab14c442c"], +Cell[513687, 12394, 194, 3, 41, "Output",ExpressionUUID->"2dbb0ce5-000a-4359-8f44-1dbfbe8ab165"] }, Open ]], Cell[CellGroupData[{ -Cell[439776, 11125, 6055, 185, 431, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[445834, 11312, 174, 3, 41, "Output",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] +Cell[513918, 12402, 2235, 63, 348, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], +Cell[516156, 12467, 662, 14, 73, "Message",ExpressionUUID->"ec4a991f-a86a-47b4-a03b-6256b4f2d180"], +Cell[516821, 12483, 660, 14, 73, "Message",ExpressionUUID->"00f875cb-cce7-4866-a713-831bb8ab46fd"], +Cell[517484, 12499, 664, 14, 73, "Message",ExpressionUUID->"c13c8bd3-ab03-4baa-83cd-6be03418b315"], +Cell[518151, 12515, 492, 11, 32, "Message",ExpressionUUID->"e3f5fbd6-bd03-40dc-aa89-6c49e46a3faf"], +Cell[518646, 12528, 195, 3, 41, "Output",ExpressionUUID->"b1c47100-3015-4ca7-b383-1df28dca77f2"] }, Open ]], Cell[CellGroupData[{ -Cell[446045, 11320, 368, 9, 53, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[446416, 11331, 172, 3, 41, "Output",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] +Cell[518878, 12536, 2233, 63, 348, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], +Cell[521114, 12601, 662, 14, 73, "Message",ExpressionUUID->"d74d1567-ffe8-4526-b2d4-af7a976c2847"], +Cell[521779, 12617, 662, 14, 73, "Message",ExpressionUUID->"11c461c6-56f5-4230-83de-97777b9eb657"], +Cell[522444, 12633, 662, 14, 73, "Message",ExpressionUUID->"86bfb06d-b71a-4581-97b9-5d8068cd63d4"], +Cell[523109, 12649, 492, 11, 32, "Message",ExpressionUUID->"bbf37f9e-d057-4ee0-a408-49e4a48af28e"], +Cell[523604, 12662, 192, 3, 41, "Output",ExpressionUUID->"62e6d775-100a-483a-9ea3-3b7970a5b54f"] }, Open ]], Cell[CellGroupData[{ -Cell[446625, 11339, 6122, 187, 431, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[452750, 11528, 172, 3, 41, "Output",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] +Cell[523833, 12670, 238, 6, 60, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], +Cell[524074, 12678, 196, 3, 41, "Output",ExpressionUUID->"8e6441e0-85bc-4924-a4f2-3bab72c85493"] }, Open ]], +Cell[524285, 12684, 275, 6, 109, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ -Cell[452959, 11536, 368, 9, 53, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[453330, 11547, 170, 3, 41, "Output",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] +Cell[524585, 12694, 558, 19, 66, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], +Cell[525146, 12715, 192, 3, 41, "Output",ExpressionUUID->"c6f10550-fcac-4a33-b799-ace1f520daea"] }, Open ]], Cell[CellGroupData[{ -Cell[453537, 11555, 2663, 88, 215, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[456203, 11645, 173, 3, 41, "Output",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] +Cell[525375, 12723, 170, 5, 71, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], +Cell[525548, 12730, 195, 3, 41, "Output",ExpressionUUID->"d77de619-afd9-4255-b8e7-57e54a2878e6"] }, Open ]], Cell[CellGroupData[{ -Cell[456413, 11653, 2603, 85, 215, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[459019, 11740, 172, 3, 41, "Output",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] +Cell[525780, 12738, 181, 5, 55, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], +Cell[525964, 12745, 194, 3, 41, "Output",ExpressionUUID->"9554a268-e990-4350-9a0b-506184abf67d"] }, Open ]], Cell[CellGroupData[{ -Cell[459228, 11748, 3712, 118, 316, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[462943, 11868, 172, 3, 41, "Output",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] +Cell[526195, 12753, 6055, 185, 831, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], +Cell[532253, 12940, 197, 3, 41, "Output",ExpressionUUID->"9b5e85e3-9763-4cc2-819d-52727369eb81"] }, Open ]], Cell[CellGroupData[{ -Cell[463152, 11876, 2052, 59, 116, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], -Cell[465207, 11937, 573, 12, 71, "Message",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], -Cell[465783, 11951, 573, 12, 71, "Message",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], -Cell[466359, 11965, 579, 12, 71, "Message",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], -Cell[466941, 11979, 458, 10, 26, "Message",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], -Cell[467402, 11991, 170, 3, 41, "Output",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] +Cell[532487, 12948, 368, 9, 53, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], +Cell[532858, 12959, 194, 3, 41, "Output",ExpressionUUID->"b298fe38-13c9-4d8c-a47b-75986708667e"] }, Open ]], Cell[CellGroupData[{ -Cell[467609, 11999, 2052, 59, 116, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], -Cell[469664, 12060, 573, 12, 71, "Message",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], -Cell[470240, 12074, 575, 12, 71, "Message",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], -Cell[470818, 12088, 579, 12, 71, "Message",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], -Cell[471400, 12102, 458, 10, 26, "Message",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], -Cell[471861, 12114, 169, 3, 41, "Output",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] +Cell[533089, 12967, 6122, 187, 900, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], +Cell[539214, 13156, 195, 3, 41, "Output",ExpressionUUID->"6d656ac0-d563-4297-9589-9cba4fc22efe"] }, Open ]], Cell[CellGroupData[{ -Cell[472067, 12122, 2028, 55, 63, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], -Cell[474098, 12179, 20296, 381, 295, "Output",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] +Cell[539446, 13164, 368, 9, 53, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], +Cell[539817, 13175, 194, 3, 41, "Output",ExpressionUUID->"7264b8c3-b6dd-419a-a121-1017519c3185"] }, Open ]], Cell[CellGroupData[{ -Cell[494431, 12565, 2146, 61, 116, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], -Cell[496580, 12628, 500, 11, 48, "Message",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], -Cell[497083, 12641, 505, 11, 48, "Message",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], -Cell[497591, 12654, 509, 11, 48, "Message",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], -Cell[498103, 12667, 458, 10, 26, "Message",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], -Cell[498564, 12679, 39609, 697, 290, "Output",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] +Cell[540048, 13183, 2663, 88, 435, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], +Cell[542714, 13273, 196, 3, 41, "Output",ExpressionUUID->"7f625baa-b385-487c-b510-5be13be5abd9"] }, Open ]], -Cell[538188, 13379, 209, 5, 36, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], Cell[CellGroupData[{ -Cell[538422, 13388, 1616, 48, 86, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], -Cell[540041, 13438, 589, 12, 71, "Message",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], -Cell[540633, 13452, 595, 12, 71, "Message",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], -Cell[541231, 13466, 596, 12, 71, "Message",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], -Cell[541830, 13480, 458, 10, 26, "Message",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], -Cell[542291, 13492, 171, 3, 41, "Output",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] +Cell[542947, 13281, 2603, 85, 435, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], +Cell[545553, 13368, 192, 3, 41, "Output",ExpressionUUID->"de58b406-228f-4a4f-8471-610b5b1957c5"] }, Open ]], Cell[CellGroupData[{ -Cell[542499, 13500, 2249, 64, 81, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], -Cell[544751, 13566, 573, 12, 71, "Message",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], -Cell[545327, 13580, 573, 12, 71, "Message",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], -Cell[545903, 13594, 579, 12, 71, "Message",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], -Cell[546485, 13608, 458, 10, 26, "Message",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], -Cell[546946, 13620, 174, 3, 41, "Output",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] +Cell[545782, 13376, 3712, 118, 575, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], +Cell[549497, 13496, 197, 3, 41, "Output",ExpressionUUID->"bc47af46-2443-400e-b639-b85d8935aafc"] }, Open ]], Cell[CellGroupData[{ -Cell[547157, 13628, 2221, 64, 81, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], -Cell[549381, 13694, 573, 12, 71, "Message",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], -Cell[549957, 13708, 575, 12, 71, "Message",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], -Cell[550535, 13722, 577, 12, 71, "Message",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], -Cell[551115, 13736, 456, 10, 26, "Message",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], -Cell[551574, 13748, 172, 3, 41, "Output",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] +Cell[549731, 13504, 2075, 59, 276, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], +Cell[551809, 13565, 665, 14, 73, "Message",ExpressionUUID->"ed7f0094-7c5a-4d93-a595-63f81da79619"], +Cell[552477, 13581, 666, 14, 73, "Message",ExpressionUUID->"d8a3e497-7882-4104-9955-7eaaddbd6d28"], +Cell[553146, 13597, 664, 14, 73, "Message",ExpressionUUID->"4c262d11-58e4-400c-964d-a1a2c02a9aaa"], +Cell[553813, 13613, 494, 11, 32, "Message",ExpressionUUID->"b6996cbc-ee3c-4fbd-b471-fcafa30c3d71"], +Cell[554310, 13626, 192, 3, 41, "Output",ExpressionUUID->"cb7475e5-17e6-467e-af50-3bddcb0e930f"] }, Open ]], Cell[CellGroupData[{ -Cell[551783, 13756, 2219, 64, 81, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], -Cell[554005, 13822, 571, 12, 71, "Message",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], -Cell[554579, 13836, 573, 12, 71, "Message",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], -Cell[555155, 13850, 579, 12, 71, "Message",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], -Cell[555737, 13864, 458, 10, 26, "Message",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], -Cell[556198, 13876, 172, 3, 41, "Output",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] +Cell[554539, 13634, 2075, 59, 276, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], +Cell[556617, 13695, 663, 14, 73, "Message",ExpressionUUID->"29b2649b-b6fb-47a4-bc52-0f46bd56a9ec"], +Cell[557283, 13711, 664, 14, 73, "Message",ExpressionUUID->"169c6bba-7630-474f-8943-179424b8a1e1"], +Cell[557950, 13727, 664, 14, 73, "Message",ExpressionUUID->"ae891df2-ba04-41ff-b6b4-03dddb263978"], +Cell[558617, 13743, 491, 11, 32, "Message",ExpressionUUID->"41ccb71b-ce2c-4c95-86d5-d8f9fd6a784a"], +Cell[559111, 13756, 193, 3, 41, "Output",ExpressionUUID->"155432f3-6196-4fa4-9414-07b863250f7f"] }, Open ]], Cell[CellGroupData[{ -Cell[556407, 13884, 211, 6, 60, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], -Cell[556621, 13892, 174, 3, 41, "Output",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] +Cell[559341, 13764, 2051, 55, 232, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], +Cell[561395, 13821, 20444, 386, 295, "Output",ExpressionUUID->"e4ca2ff7-d7b9-4db5-9edb-8e5d979f1343"] }, Open ]], -Cell[556810, 13898, 115, 1, 36, "Input",ExpressionUUID->"f39be7b1-d665-440d-a910-3cb53865d46e"] +Cell[CellGroupData[{ +Cell[581876, 14212, 2168, 61, 311, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], +Cell[584047, 14275, 538, 12, 71, "Message",ExpressionUUID->"becc8ac4-f9c0-4d07-8ec1-65d63ff1b1e1"], +Cell[584588, 14289, 542, 12, 71, "Message",ExpressionUUID->"7fc2ee02-0fcd-4e83-a1f9-e5ed5f990254"], +Cell[585133, 14303, 543, 12, 71, "Message",ExpressionUUID->"16340ba8-cc6d-48d5-bcac-404bb7a47e5b"], +Cell[585679, 14317, 490, 11, 32, "Message",ExpressionUUID->"b5c1d6ec-d11f-4fef-8bbe-1f5a9c71a8b7"], +Cell[586172, 14330, 26618, 483, 290, "Output",ExpressionUUID->"717f74bd-0bf2-497c-b696-02dd75300242"] +}, Open ]], +Cell[CellGroupData[{ +Cell[612827, 14818, 232, 5, 36, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], +Cell[613062, 14825, 32978, 615, 290, "Output",ExpressionUUID->"dfeccee9-1fb3-44f1-921b-e8df2ac08e59"] +}, Open ]], +Cell[CellGroupData[{ +Cell[646077, 15445, 1616, 48, 132, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], +Cell[647696, 15495, 662, 14, 73, "Message",ExpressionUUID->"f6346e0b-fbbb-42e3-ad77-8d1ad2ba7090"], +Cell[648361, 15511, 661, 14, 73, "Message",ExpressionUUID->"61fa2e27-fb75-4f58-9c34-05010a7ec55b"], +Cell[649025, 15527, 662, 14, 73, "Message",ExpressionUUID->"15e8b32e-c8ec-43f4-b91e-cf461b541e42"], +Cell[649690, 15543, 489, 11, 32, "Message",ExpressionUUID->"7163e6e3-0325-4459-9daf-c3b052789ea2"], +Cell[650182, 15556, 196, 3, 41, "Output",ExpressionUUID->"eb752526-828f-4209-9ea9-0f1d97549dc1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[650415, 15564, 2272, 64, 348, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], +Cell[652690, 15630, 663, 14, 73, "Message",ExpressionUUID->"28defc18-4e15-4570-9d69-938ffed401b2"], +Cell[653356, 15646, 664, 14, 73, "Message",ExpressionUUID->"74bc4617-4099-4a8b-9066-5d66e4188fd8"], +Cell[654023, 15662, 666, 14, 73, "Message",ExpressionUUID->"5aa8c3cb-57f7-45bf-a894-105bce2552b3"], +Cell[654692, 15678, 492, 11, 32, "Message",ExpressionUUID->"2f89e5aa-792a-446f-a857-9783d55e6f69"], +Cell[655187, 15691, 195, 3, 41, "Output",ExpressionUUID->"abfb314f-de9c-4453-8b6b-1f81a22d8e3a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[655419, 15699, 2233, 63, 348, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], +Cell[657655, 15764, 663, 14, 73, "Message",ExpressionUUID->"7fa582c3-4dfe-4766-82c6-b0a747c8aa4a"], +Cell[658321, 15780, 666, 14, 73, "Message",ExpressionUUID->"25a93c67-2b49-47a8-9cc0-0e0318f232ec"], +Cell[658990, 15796, 664, 14, 73, "Message",ExpressionUUID->"ec57fe8d-053c-4724-92fd-f8a0300f1315"], +Cell[659657, 15812, 492, 11, 32, "Message",ExpressionUUID->"7e12fa42-5622-40b2-a3b7-53344e7a0d69"], +Cell[660152, 15825, 194, 3, 41, "Output",ExpressionUUID->"ca986c82-435b-41e0-817a-337f117c1988"] +}, Open ]], +Cell[CellGroupData[{ +Cell[660383, 15833, 2231, 63, 348, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], +Cell[662617, 15898, 661, 14, 73, "Message",ExpressionUUID->"735b84d6-3c65-4880-ac9f-2ea54c561d6d"], +Cell[663281, 15914, 662, 14, 73, "Message",ExpressionUUID->"6bcb2082-4de6-4fe5-8790-c29ae27dabbc"], +Cell[663946, 15930, 664, 14, 73, "Message",ExpressionUUID->"991b71ae-9c59-473b-9617-28638ad2fba8"], +Cell[664613, 15946, 490, 11, 32, "Message",ExpressionUUID->"bbcba1f0-58ea-4ce2-958d-f95dbcd69e12"], +Cell[665106, 15959, 193, 3, 41, "Output",ExpressionUUID->"ab0a1ee2-1e8a-4b1e-8978-e7a81ad1af8d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[665336, 15967, 234, 6, 60, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], +Cell[665573, 15975, 196, 3, 41, "Output",ExpressionUUID->"973684fd-9fc8-4809-a4cd-d0b0f6bfec9c"] +}, Open ]], +Cell[665784, 15981, 143, 3, 109, "Input",ExpressionUUID->"f39be7b1-d665-440d-a910-3cb53865d46e"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw2.nb b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw2.nb index 6484366..77248c3 100644 --- a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw2.nb +++ b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_gid_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 446097, 13184] -NotebookOptionsPosition[ 407722, 12568] -NotebookOutlinePosition[ 408133, 12585] -CellTagsIndexPosition[ 408090, 12582] +NotebookDataLength[ 691340, 16378] +NotebookOptionsPosition[ 650742, 15729] +NotebookOutlinePosition[ 651170, 15747] +CellTagsIndexPosition[ 651127, 15744] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,16 +26,14 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.9940735873936653`*^9, 3.9940735896443777`*^9}, { 3.994075218023417*^9, 3.994075221411705*^9}}, - CellLabel-> - "In[106]:=",ExpressionUUID->"5210b4c5-145f-4e1a-aa29-511430e5ecc6"], + CellLabel->"In[1]:=",ExpressionUUID->"5210b4c5-145f-4e1a-aa29-511430e5ecc6"], Cell[BoxData["1.9`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.9940735644974327`*^9, 3.994073590895896*^9}, { 3.994075171996416*^9, 3.994075180507247*^9}, {3.994075219377726*^9, - 3.9940752234153214`*^9}}, - CellLabel-> - "Out[106]=",ExpressionUUID->"ad46ab81-2d31-44d3-953b-97b13ecd0a1e"] + 3.9940752234153214`*^9}, 3.994349737982438*^9, 3.994352664605444*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"d8936058-718b-40de-a0f6-cfc9a2cfe07d"] }, Open ]], Cell[CellGroupData[{ @@ -44,15 +42,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940732811688833`*^9, 3.994073289502289*^9}}, - CellLabel-> - "In[107]:=",ExpressionUUID->"69758569-6559-4f9f-9f7f-b65c67e67ecc"], + CellLabel->"In[2]:=",ExpressionUUID->"69758569-6559-4f9f-9f7f-b65c67e67ecc"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.994073564560362*^9, 3.994073590977919*^9}, - 3.994075180702458*^9, 3.9940752234546824`*^9}, - CellLabel-> - "Out[107]=",ExpressionUUID->"29c5a549-af78-42c3-b788-cc9039fc82f3"] + 3.994075180702458*^9, 3.9940752234546824`*^9, 3.994349738442699*^9, + 3.994352665121295*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"0525c13b-6a66-457d-b3bb-28661c3e0fa8"] }, Open ]], Cell[CellGroupData[{ @@ -61,15 +58,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "168"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073284506165*^9, 3.994073287626708*^9}}, - CellLabel-> - "In[108]:=",ExpressionUUID->"96c70c96-9f28-40c4-b3b5-214b23241895"], + CellLabel->"In[3]:=",ExpressionUUID->"96c70c96-9f28-40c4-b3b5-214b23241895"], Cell[BoxData["168"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994073564571506*^9, 3.994073590992278*^9}, - 3.994075180712758*^9, 3.9940752234670067`*^9}, - CellLabel-> - "Out[108]=",ExpressionUUID->"afec2811-2dc8-4754-9efe-cdaf9df3f1f5"] + 3.994075180712758*^9, 3.9940752234670067`*^9, 3.9943497384589167`*^9, + 3.994352665136249*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"8b74d5ed-5d86-46b6-a0ad-24fadd9d9bd0"] }, Open ]], Cell[CellGroupData[{ @@ -77,15 +73,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[109]:=",ExpressionUUID->"bd360ff8-9801-462d-bf9e-a94db99e6d16"], + CellLabel->"In[4]:=",ExpressionUUID->"bd360ff8-9801-462d-bf9e-a94db99e6d16"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.994073564582589*^9, 3.994073590996417*^9}, - 3.994075180723978*^9, 3.994075223478387*^9}, - CellLabel-> - "Out[109]=",ExpressionUUID->"f605b3be-026c-423a-81ba-dd6f47768b47"] + 3.994075180723978*^9, 3.994075223478387*^9, 3.994349738473216*^9, + 3.994352665148871*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"6b7ee6bf-017c-4278-a5a2-8f060bd1e623"] }, Open ]], Cell[CellGroupData[{ @@ -97,30 +92,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[110]:=",ExpressionUUID->"32cd3f49-2a3e-415d-8a20-a03a5e28f4be"], + CellLabel->"In[5]:=",ExpressionUUID->"32cd3f49-2a3e-415d-8a20-a03a5e28f4be"], Cell[BoxData["0.544`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.994073564593708*^9, 3.994073591015129*^9}, - 3.994075180735317*^9, 3.994075223489546*^9}, - CellLabel-> - "Out[110]=",ExpressionUUID->"352cb8d0-fce8-4296-9609-a75efd02eeab"] + 3.994075180735317*^9, 3.994075223489546*^9, 3.994349738483917*^9, + 3.994352665163982*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"04feb092-1f02-4974-a3ab-183e4f53e5e0"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[111]:=",ExpressionUUID->"14c77262-0f08-4a0c-8b7b-06f9b837b5b9"], + CellLabel->"In[6]:=",ExpressionUUID->"14c77262-0f08-4a0c-8b7b-06f9b837b5b9"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.994073564604851*^9, 3.9940735910271397`*^9}, - 3.9940751807454844`*^9, 3.994075223493987*^9}, - CellLabel-> - "Out[111]=",ExpressionUUID->"45c0c1e8-1471-4571-a48f-0dfd03cfa534"] + 3.9940751807454844`*^9, 3.994075223493987*^9, 3.994349738502577*^9, + 3.9943526651807337`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"01b8763c-10bc-4b81-95b1-b48f87fd2637"] }, Open ]], Cell[CellGroupData[{ @@ -131,15 +124,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[112]:=",ExpressionUUID->"38248510-4494-40d5-8d8c-7c0a0239824b"], + CellLabel->"In[7]:=",ExpressionUUID->"38248510-4494-40d5-8d8c-7c0a0239824b"], Cell[BoxData["6.400704089204199`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.9940735646161203`*^9, 3.9940735910381737`*^9}, - 3.99407518075636*^9, 3.9940752235073977`*^9}, - CellLabel-> - "Out[112]=",ExpressionUUID->"d71185f7-dc36-49a2-a838-3a97af68854c"] + 3.99407518075636*^9, 3.9940752235073977`*^9, 3.9943497385204887`*^9, + 3.9943526651950417`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"cff6f187-23d0-48ca-8da2-d954c8868e00"] }, Open ]], Cell[CellGroupData[{ @@ -151,15 +143,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[113]:=",ExpressionUUID->"d9399ba0-28d3-4c6e-aa7b-5360ab82d8e0"], + CellLabel->"In[8]:=",ExpressionUUID->"d9399ba0-28d3-4c6e-aa7b-5360ab82d8e0"], Cell[BoxData["4.825794469480417`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.994073564627458*^9, 3.9940735910486517`*^9}, - 3.994075180767749*^9, 3.9940752235185337`*^9}, - CellLabel-> - "Out[113]=",ExpressionUUID->"49350be2-43ef-4491-be3b-9d06634e361d"] + 3.994075180767749*^9, 3.9940752235185337`*^9, 3.994349738531569*^9, + 3.994352665214407*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"73273deb-8cc3-442f-ad5d-5fefeaac3622"] }, Open ]], Cell[CellGroupData[{ @@ -167,14 +158,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8877902834"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073298855084*^9}, - CellLabel-> - "In[114]:=",ExpressionUUID->"0e21b474-16e9-43d4-8cfa-749627016079"], + CellLabel->"In[9]:=",ExpressionUUID->"0e21b474-16e9-43d4-8cfa-749627016079"], Cell[BoxData["0.8877902834`"], "Output", CellChangeTimes->{{3.99407356463848*^9, 3.994073591058733*^9}, - 3.994075180779163*^9, 3.994075223529882*^9}, - CellLabel-> - "Out[114]=",ExpressionUUID->"5c612506-0b0f-4e8e-b103-abc2a73b398b"] + 3.994075180779163*^9, 3.994075223529882*^9, 3.9943497385438013`*^9, + 3.994352665229084*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"b4235fd4-8d99-4bb0-ab80-c082afbf7d70"] }, Open ]], Cell[CellGroupData[{ @@ -182,44 +172,41 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3862529089"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.994073304321521*^9}, - CellLabel-> - "In[115]:=",ExpressionUUID->"e35541b8-50be-4e11-9c7e-d38cfef2b2d6"], + CellLabel->"In[10]:=",ExpressionUUID->"e35541b8-50be-4e11-9c7e-d38cfef2b2d6"], Cell[BoxData["0.3862529089`"], "Output", CellChangeTimes->{{3.9940735646497602`*^9, 3.994073591068905*^9}, - 3.994075180790642*^9, 3.994075223541339*^9}, - CellLabel-> - "Out[115]=",ExpressionUUID->"c7bbd978-e40b-44a5-9b2f-3717d41e2556"] + 3.994075180790642*^9, 3.994075223541339*^9, 3.9943497385591784`*^9, + 3.994352665242559*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"841dc2e7-1162-4739-9cfb-6e4612cffda1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[116]:=",ExpressionUUID->"78b1b396-ec07-435d-b63f-bae87a994155"], + CellLabel->"In[11]:=",ExpressionUUID->"78b1b396-ec07-435d-b63f-bae87a994155"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.994073564660372*^9, 3.994073591079844*^9}, - 3.9940751808023157`*^9, 3.99407522355291*^9}, - CellLabel-> - "Out[116]=",ExpressionUUID->"9c13ebf4-ac03-4d33-a018-5534cc931b9a"] + 3.9940751808023157`*^9, 3.99407522355291*^9, 3.994349738571226*^9, + 3.9943526652585583`*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"2578836b-2088-4afd-beb6-1bc55c7e7288"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[117]:=",ExpressionUUID->"abfdab78-d2c0-4a27-a323-ec74c98d8f5a"], + CellLabel->"In[12]:=",ExpressionUUID->"abfdab78-d2c0-4a27-a323-ec74c98d8f5a"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.994073564670796*^9, 3.994073591090024*^9}, - 3.994075180813775*^9, 3.994075223564582*^9}, - CellLabel-> - "Out[117]=",ExpressionUUID->"b2fef7c4-cb7f-49e4-be94-2892db0c9dd2"] + 3.994075180813775*^9, 3.994075223564582*^9, 3.994349738590824*^9, + 3.994352665271715*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"f58ab9fa-29f0-45d6-af5f-4e7ad8c05673"] }, Open ]], Cell[CellGroupData[{ @@ -243,15 +230,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[118]:=",ExpressionUUID->"b03b18f2-5dda-4e35-823c-0a9766dcc51d"], + CellLabel->"In[13]:=",ExpressionUUID->"b03b18f2-5dda-4e35-823c-0a9766dcc51d"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.9940735646817017`*^9, 3.994073591101307*^9}, - 3.9940751808204927`*^9, 3.99407522357547*^9}, - CellLabel-> - "Out[118]=",ExpressionUUID->"01354a3a-c9b7-4cb3-8461-a3c2ac201038"] + 3.9940751808204927`*^9, 3.99407522357547*^9, 3.994349738615282*^9, + 3.9943526652855797`*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"38492eda-dedf-41d5-a64a-4ed29f01f4ec"] }, Open ]], Cell[CellGroupData[{ @@ -275,15 +261,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[119]:=",ExpressionUUID->"5f3deac1-6a9f-4c8d-8d15-5bb8e0bc7096"], + CellLabel->"In[14]:=",ExpressionUUID->"5f3deac1-6a9f-4c8d-8d15-5bb8e0bc7096"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.9940735646923637`*^9, 3.994073591111409*^9}, - 3.994075180833333*^9, 3.99407522358539*^9}, - CellLabel-> - "Out[119]=",ExpressionUUID->"5948e55d-9456-4fd6-a8ea-40324232efe8"] + 3.994075180833333*^9, 3.99407522358539*^9, 3.9943497386434793`*^9, + 3.9943526652979517`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"2ca96f63-1798-4352-a304-d4157e7d4acc"] }, Open ]], Cell[CellGroupData[{ @@ -338,15 +323,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[120]:=",ExpressionUUID->"6b04567a-b064-4157-98ae-6782b8a8a457"], + CellLabel->"In[15]:=",ExpressionUUID->"6b04567a-b064-4157-98ae-6782b8a8a457"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994073564703178*^9, 3.99407359112132*^9}, - 3.994075180844792*^9, 3.994075223596579*^9}, - CellLabel-> - "Out[120]=",ExpressionUUID->"dc34d31e-b4ce-4175-bc12-7e6e07d83e53"] + 3.994075180844792*^9, 3.994075223596579*^9, 3.9943497386935*^9, + 3.99435266531316*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"ca7aabc9-23bc-4bfc-aa7f-2bb5becd80ca"] }, Open ]], Cell[CellGroupData[{ @@ -397,16 +381,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[121]:=",ExpressionUUID->"92e21de7-0fb3-4574-b0c3-e7e966a594b6"], + CellLabel->"In[16]:=",ExpressionUUID->"92e21de7-0fb3-4574-b0c3-e7e966a594b6"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.994073564714039*^9, 3.994073591132222*^9}, - 3.994075180888361*^9, 3.994075223608573*^9}, - CellLabel-> - "Out[121]=",ExpressionUUID->"1853c4d2-964b-4e8a-b338-2927ac203594"] + 3.994075180888361*^9, 3.994075223608573*^9, 3.994349738717772*^9, + 3.994352665329578*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"09657c9c-ef52-416f-9179-3eab3144fa73"] }, Open ]], Cell[CellGroupData[{ @@ -457,16 +440,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[122]:=",ExpressionUUID->"7792e963-ea18-4cd7-b377-5907b6a6686e"], + CellLabel->"In[17]:=",ExpressionUUID->"7792e963-ea18-4cd7-b377-5907b6a6686e"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.9940735647250757`*^9, 3.994073591143152*^9}, - 3.994075180901285*^9, 3.994075223621201*^9}, - CellLabel-> - "Out[122]=",ExpressionUUID->"d7bd1f8c-24b3-4da3-92c2-58e7609339cf"] + 3.994075180901285*^9, 3.994075223621201*^9, 3.9943497387490473`*^9, + 3.994352665345159*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"36671712-3a23-4473-a982-995cbe0bc2a6"] }, Open ]], Cell[CellGroupData[{ @@ -521,60 +503,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[123]:=",ExpressionUUID->"5c040776-6591-4224-bb83-a4801cb23196"], + CellLabel->"In[18]:=",ExpressionUUID->"5c040776-6591-4224-bb83-a4801cb23196"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994073564736117*^9, 3.994073591154641*^9}, - 3.9940751809127274`*^9, 3.994075223631315*^9}, - CellLabel-> - "Out[123]=",ExpressionUUID->"6b92ed77-596c-4b2c-a35c-1da372b08b72"] + 3.9940751809127274`*^9, 3.994075223631315*^9, 3.994349738770417*^9, + 3.994352665359605*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"b8980cd1-84fa-4e08-ac9d-5a0d91be7d73"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[124]:=",ExpressionUUID->"500d9880-2d6a-40d6-9da5-06118272064f"], + CellLabel->"In[19]:=",ExpressionUUID->"500d9880-2d6a-40d6-9da5-06118272064f"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.994073564745685*^9, 3.9940735911671133`*^9}, - 3.9940751809237967`*^9, 3.994075223641436*^9}, - CellLabel-> - "Out[124]=",ExpressionUUID->"2ee25cb4-af7c-4364-96ac-5b5bb44693fc"] + 3.9940751809237967`*^9, 3.994075223641436*^9, 3.994349738846916*^9, + 3.994352665372293*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"058c25f0-7633-4d68-a4fe-732a46a471fd"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[125]:=",ExpressionUUID->"8a60e21d-5640-4eec-a6ff-1af78e25481c"], + CellLabel->"In[20]:=",ExpressionUUID->"8a60e21d-5640-4eec-a6ff-1af78e25481c"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994073564755136*^9, 3.994073591178863*^9}, - 3.9940751809343033`*^9, 3.9940752236530647`*^9}, - CellLabel-> - "Out[125]=",ExpressionUUID->"9f1acd20-54f9-4c6a-94a9-6104ad9a50a9"] + 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.9943497388707037`*^9, + 3.994352665385594*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"761db3e9-aea5-4ef1-bb6a-1e5667cb7d03"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[126]:=",ExpressionUUID->"246f7103-b2bb-46cd-a57e-a2494f3ddd1c"], + CellLabel->"In[21]:=",ExpressionUUID->"246f7103-b2bb-46cd-a57e-a2494f3ddd1c"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940735647648563`*^9, 3.994073591190179*^9}, - 3.9940751809451323`*^9, 3.994075223664682*^9}, - CellLabel-> - "Out[126]=",ExpressionUUID->"2eb701c5-f0cc-4d5a-91cb-82dbf2b8d16b"] + 3.9940751809451323`*^9, 3.994075223664682*^9, 3.994349738899954*^9, + 3.9943526653989563`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"bf6d6d7b-15cd-4339-963d-744ee9c3c069"] }, Open ]], Cell[CellGroupData[{ @@ -583,31 +561,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[127]:=",ExpressionUUID->"f56ca74e-3b0a-4d83-af0c-d97c9e86a21b"], + CellLabel->"In[22]:=",ExpressionUUID->"f56ca74e-3b0a-4d83-af0c-d97c9e86a21b"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.994073564774688*^9, 3.994073591201717*^9}, - 3.994075180956657*^9, 3.994075223675436*^9}, - CellLabel-> - "Out[127]=",ExpressionUUID->"f967ea04-c983-4fde-9681-971ea031b1ac"] + 3.994075180956657*^9, 3.994075223675436*^9, 3.994349738921585*^9, + 3.994352665412938*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"ad21fb5a-03ea-4d2d-ae7f-61737469c835"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[128]:=",ExpressionUUID->"c2aea24b-853c-4042-9d19-332d1fe3fd11"], + CellLabel->"In[23]:=",ExpressionUUID->"c2aea24b-853c-4042-9d19-332d1fe3fd11"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994073564784115*^9, 3.994073591213622*^9}, - 3.9940751809686193`*^9, 3.9940752236862583`*^9}, - CellLabel-> - "Out[128]=",ExpressionUUID->"9ab3568e-9dc9-4ec4-9ad7-125607efc6e8"] + 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.994349738949491*^9, + 3.9943526654282227`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"74d262fd-135a-4473-a1f8-986ed1a57ba4"] }, Open ]], Cell[CellGroupData[{ @@ -617,15 +593,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073317560268*^9, 3.994073317727027*^9}}, - CellLabel-> - "In[129]:=",ExpressionUUID->"e3de6edb-f435-4cc3-a9d8-e91c9d075165"], + CellLabel->"In[24]:=",ExpressionUUID->"e3de6edb-f435-4cc3-a9d8-e91c9d075165"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.994073564793541*^9, 3.994073591224018*^9}, - 3.994075180980678*^9, 3.994075223697234*^9}, - CellLabel-> - "Out[129]=",ExpressionUUID->"5bcaf05b-c24b-454e-8767-eca48d75722a"] + 3.994075180980678*^9, 3.994075223697234*^9, 3.9943497389777412`*^9, + 3.994352665443318*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"2b9fe61b-2abf-439f-af8c-1d5c75458509"] }, Open ]], Cell[CellGroupData[{ @@ -635,15 +610,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.9940733207460938`*^9, 3.994073320804184*^9}}, - CellLabel-> - "In[130]:=",ExpressionUUID->"0c0d7845-898d-4907-ba48-90e67215fccc"], + CellLabel->"In[25]:=",ExpressionUUID->"0c0d7845-898d-4907-ba48-90e67215fccc"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.9940735648031883`*^9, 3.9940735912353287`*^9}, - 3.9940751809920683`*^9, 3.994075223707429*^9}, - CellLabel-> - "Out[130]=",ExpressionUUID->"f07d616a-9ba9-4576-8201-37ce68feafa3"] + 3.9940751809920683`*^9, 3.994075223707429*^9, 3.994349738995722*^9, + 3.994352665459467*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"710a58a5-2d8e-49d5-b6ee-876ad47c89ab"] }, Open ]], Cell[CellGroupData[{ @@ -652,15 +626,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[131]:=",ExpressionUUID->"9bbe9c96-37e3-47aa-856d-3dc1aaab8cd0"], + CellLabel->"In[26]:=",ExpressionUUID->"9bbe9c96-37e3-47aa-856d-3dc1aaab8cd0"], Cell[BoxData["72"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.99407356481284*^9, 3.994073591246372*^9}, - 3.994075181003516*^9, 3.994075223717374*^9}, - CellLabel-> - "Out[131]=",ExpressionUUID->"3f39b572-abbd-47f2-a52d-e6d8b469b0c9"] + 3.994075181003516*^9, 3.994075223717374*^9, 3.994349739120781*^9, + 3.994352665473811*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"62a04eec-8cd7-433e-949f-9ae77756bd18"] }, Open ]], Cell[CellGroupData[{ @@ -675,15 +648,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[132]:=",ExpressionUUID->"392e48ba-7a8a-4f76-846f-de90c2cdaf68"], + CellLabel->"In[27]:=",ExpressionUUID->"392e48ba-7a8a-4f76-846f-de90c2cdaf68"], Cell[BoxData["0.10999999999999999`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994073564822513*^9, 3.9940735912565413`*^9}, - 3.994075181014969*^9, 3.994075223727599*^9}, - CellLabel-> - "Out[132]=",ExpressionUUID->"7777ca2a-de5c-4d45-b74e-faeb81f5a0d9"] + 3.994075181014969*^9, 3.994075223727599*^9, 3.994349739138537*^9, + 3.9943526654889803`*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"c61cb7d5-e9f1-42e1-955d-b2e9f5f53bb1"] }, Open ]], Cell[CellGroupData[{ @@ -698,16 +670,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[133]:=",ExpressionUUID->"4f381a6b-ee93-4295-9e03-c57107db6657"], + CellLabel->"In[28]:=",ExpressionUUID->"4f381a6b-ee93-4295-9e03-c57107db6657"], Cell[BoxData[ RowBox[{"-", "2.564285714285714`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994073564832857*^9, 3.994073591267404*^9}, - 3.9940751810260887`*^9, 3.9940752237376823`*^9}, - CellLabel-> - "Out[133]=",ExpressionUUID->"c6c7e799-2b6a-4e29-abe9-8ec7a5ac31af"] + 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.994349739155463*^9, + 3.994352665504627*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"228e20fc-961c-4865-ae59-2caa6f744020"] }, Open ]], Cell[CellGroupData[{ @@ -738,15 +709,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[134]:=",ExpressionUUID->"5e5777eb-c78c-40cf-89d7-98bdf45c2cc5"], + CellLabel->"In[29]:=",ExpressionUUID->"5e5777eb-c78c-40cf-89d7-98bdf45c2cc5"], Cell[BoxData["17.427928477019236`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994073564842832*^9, 3.9940735912778807`*^9}, - 3.9940751810379477`*^9, 3.994075223748026*^9}, - CellLabel-> - "Out[134]=",ExpressionUUID->"6099da28-3108-4785-a699-ff43f7a69c94"] + 3.9940751810379477`*^9, 3.994075223748026*^9, 3.994349739170944*^9, + 3.994352665518392*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"fd8551e6-7687-4e69-86ab-67bb4fe2eede"] }, Open ]], Cell[CellGroupData[{ @@ -754,15 +724,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[135]:=",ExpressionUUID->"3d7b4fcd-5d11-4b24-a739-1055052c8d2a"], + CellLabel->"In[30]:=",ExpressionUUID->"3d7b4fcd-5d11-4b24-a739-1055052c8d2a"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.994073564851839*^9, 3.994073591288074*^9}, - 3.99407518104945*^9, 3.994075223758711*^9}, - CellLabel-> - "Out[135]=",ExpressionUUID->"3c49b192-f416-43fe-8314-2f6552b30171"] + 3.99407518104945*^9, 3.994075223758711*^9, 3.994349739182275*^9, + 3.994352665532515*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"bb1dc083-277f-41c8-be9b-d054c7bd895a"] }, Open ]], Cell[CellGroupData[{ @@ -772,20 +741,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994073341190873*^9, 3.994073342038845*^9}}, - CellLabel-> - "In[136]:=",ExpressionUUID->"3a510322-dc13-4a29-9657-3a3b4dbac4a4"], + CellLabel->"In[31]:=",ExpressionUUID->"3a510322-dc13-4a29-9657-3a3b4dbac4a4"], Cell[BoxData["2.155`"], "Output", CellChangeTimes->{{3.994073564860754*^9, 3.994073591298296*^9}, - 3.994075181060684*^9, 3.994075223775366*^9}, - CellLabel-> - "Out[136]=",ExpressionUUID->"7b9aa398-7ff3-4c6a-be2d-ba1e4155d7f6"] + 3.994075181060684*^9, 3.994075223775366*^9, 3.994349739195503*^9, + 3.994352665546199*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"2e0b7a10-f4e8-4b17-8502-14c639b13f6b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[137]:=",ExpressionUUID->"842095ec-445b-4e68-bdd7-6634e4c20f80"], + CellLabel->"In[32]:=",ExpressionUUID->"842095ec-445b-4e68-bdd7-6634e4c20f80"], Cell[CellGroupData[{ @@ -794,20 +761,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073344618413*^9, 3.994073345759185*^9}}, - CellLabel-> - "In[138]:=",ExpressionUUID->"de7435d2-2f54-4b08-bb3e-08111c71fef7"], + CellLabel->"In[33]:=",ExpressionUUID->"de7435d2-2f54-4b08-bb3e-08111c71fef7"], Cell[BoxData["0.755`"], "Output", CellChangeTimes->{{3.994073564877489*^9, 3.994073591311125*^9}, - 3.9940751810754833`*^9, 3.9940752237900457`*^9}, - CellLabel-> - "Out[138]=",ExpressionUUID->"55035af7-cf2c-46dc-918f-457c1e33b299"] + 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.994349739219112*^9, + 3.994352665573126*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"d6d80463-7c44-4bcb-a0dd-ab6ffb021132"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[139]:=",ExpressionUUID->"dc0c6988-8768-4f31-a837-83f0cb6628ef"], + CellLabel->"In[34]:=",ExpressionUUID->"dc0c6988-8768-4f31-a837-83f0cb6628ef"], Cell[CellGroupData[{ @@ -816,20 +781,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940733478949413`*^9, 3.994073348567162*^9}}, - CellLabel-> - "In[140]:=",ExpressionUUID->"fc569750-6604-4df8-aa55-1321664a65c4"], + CellLabel->"In[35]:=",ExpressionUUID->"fc569750-6604-4df8-aa55-1321664a65c4"], Cell[BoxData["2.62`"], "Output", CellChangeTimes->{{3.994073564894133*^9, 3.9940735913232403`*^9}, - 3.994075181088438*^9, 3.994075223803163*^9}, - CellLabel-> - "Out[140]=",ExpressionUUID->"ef94bd72-3bad-46aa-9eee-fed1f077a037"] + 3.994075181088438*^9, 3.994075223803163*^9, 3.9943497392436028`*^9, + 3.994352665594824*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"aea8fc7e-1684-436c-8fcd-bf0428bf1f15"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[141]:=",ExpressionUUID->"6cf2d16e-e71f-49e8-a67a-08cb0010e5e1"], + CellLabel->"In[36]:=",ExpressionUUID->"6cf2d16e-e71f-49e8-a67a-08cb0010e5e1"], Cell[CellGroupData[{ @@ -838,20 +801,18 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.99407335112987*^9, 3.9940733523562517`*^9}}, - CellLabel-> - "In[142]:=",ExpressionUUID->"35a48b33-ff80-44f9-8fbc-a222d26dcb6a"], + CellLabel->"In[37]:=",ExpressionUUID->"35a48b33-ff80-44f9-8fbc-a222d26dcb6a"], Cell[BoxData["1.135`"], "Output", CellChangeTimes->{{3.994073564911627*^9, 3.994073591335389*^9}, - 3.994075181101487*^9, 3.994075223815889*^9}, - CellLabel-> - "Out[142]=",ExpressionUUID->"5225ec4e-4aef-4320-b254-1847f41b4605"] + 3.994075181101487*^9, 3.994075223815889*^9, 3.9943497392684383`*^9, + 3.994352665618141*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"0158fd87-8f0d-499d-aae1-1afdbb9bd7e0"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[143]:=",ExpressionUUID->"1675c165-e69d-4b9c-bf18-187694398458"], + CellLabel->"In[38]:=",ExpressionUUID->"1675c165-e69d-4b9c-bf18-187694398458"], Cell[CellGroupData[{ @@ -860,20 +821,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994073355091783*^9, 3.994073355935183*^9}}, - CellLabel-> - "In[144]:=",ExpressionUUID->"c9ae2d79-9ac6-4d19-a1d1-15447d866c59"], + CellLabel->"In[39]:=",ExpressionUUID->"c9ae2d79-9ac6-4d19-a1d1-15447d866c59"], Cell[BoxData["1.025`"], "Output", CellChangeTimes->{{3.994073564928769*^9, 3.9940735913488693`*^9}, - 3.994075181114448*^9, 3.994075223832756*^9}, - CellLabel-> - "Out[144]=",ExpressionUUID->"357937b8-17fc-4482-834a-0186a915e41a"] + 3.994075181114448*^9, 3.994075223832756*^9, 3.994349739292832*^9, + 3.994352665665327*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"3f146ad2-18c6-4459-989f-aba838d744db"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[145]:=",ExpressionUUID->"34f9c528-5b71-4ece-b354-1826feed8c16"], + CellLabel->"In[40]:=",ExpressionUUID->"34f9c528-5b71-4ece-b354-1826feed8c16"], Cell[CellGroupData[{ @@ -882,20 +841,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994073359153013*^9, 3.9940733600822906`*^9}}, - CellLabel-> - "In[146]:=",ExpressionUUID->"965fae0c-ed4c-44fd-9e6d-188bb1d3098a"], + CellLabel->"In[41]:=",ExpressionUUID->"965fae0c-ed4c-44fd-9e6d-188bb1d3098a"], Cell[BoxData["0.575`"], "Output", CellChangeTimes->{{3.994073564946273*^9, 3.99407359136164*^9}, - 3.9940751811274652`*^9, 3.9940752238459263`*^9}, - CellLabel-> - "Out[146]=",ExpressionUUID->"4fe16542-584e-4eb2-a493-e8fa85773d6b"] + 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994349739313478*^9, + 3.994352665690864*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"3aec05f7-59ed-4d13-8dd7-4bb112ef2091"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[147]:=",ExpressionUUID->"e6ac4dd4-3f69-4758-b2b5-dedab2cd1552"], + CellLabel->"In[42]:=",ExpressionUUID->"e6ac4dd4-3f69-4758-b2b5-dedab2cd1552"], Cell[CellGroupData[{ @@ -904,20 +861,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, 3.994073366138835*^9, { 3.994073396938322*^9, 3.994073398601803*^9}}, - CellLabel-> - "In[148]:=",ExpressionUUID->"99ee2901-d88a-4220-94bd-eaaac967b501"], + CellLabel->"In[43]:=",ExpressionUUID->"99ee2901-d88a-4220-94bd-eaaac967b501"], Cell[BoxData["1.44`"], "Output", CellChangeTimes->{{3.994073564964167*^9, 3.9940735913757553`*^9}, - 3.9940751811406727`*^9, 3.9940752238589993`*^9}, - CellLabel-> - "Out[148]=",ExpressionUUID->"2588ad09-2a23-4964-b783-881f51cbe8d3"] + 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.9943497393339863`*^9, + 3.99435266571141*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"8b7ef54d-814c-485b-9aed-20f76b6b8996"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[149]:=",ExpressionUUID->"2e90c8b9-c357-45d1-af1e-69e619f0f8c4"], + CellLabel->"In[44]:=",ExpressionUUID->"2e90c8b9-c357-45d1-af1e-69e619f0f8c4"], Cell[CellGroupData[{ @@ -925,20 +880,18 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.645"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.9940734006045856`*^9, 3.99407340214142*^9}}, - CellLabel-> - "In[150]:=",ExpressionUUID->"616094f6-07e9-4426-abab-f9e340c819f7"], + CellLabel->"In[45]:=",ExpressionUUID->"616094f6-07e9-4426-abab-f9e340c819f7"], Cell[BoxData["0.645`"], "Output", CellChangeTimes->{{3.9940735649821672`*^9, 3.994073591389337*^9}, - 3.994075181153781*^9, 3.994075223871763*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"9d86f16a-5372-4c74-95d1-3cac60461657"] + 3.994075181153781*^9, 3.994075223871763*^9, 3.9943497393526897`*^9, + 3.994352665734296*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"7efe40ef-f1df-4fa4-8d2a-7baf8365c8cf"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[151]:=",ExpressionUUID->"21d9ca36-ed36-49d0-8e70-66354b7c2f9b"], + CellLabel->"In[46]:=",ExpressionUUID->"21d9ca36-ed36-49d0-8e70-66354b7c2f9b"], Cell[CellGroupData[{ @@ -1427,15 +1380,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[152]:=",ExpressionUUID->"6a92d4ba-7990-4137-88f1-cebc950ec2b4"], + CellLabel->"In[47]:=",ExpressionUUID->"6a92d4ba-7990-4137-88f1-cebc950ec2b4"], Cell[BoxData["0.1377756020325425`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.9940735650538073`*^9, 3.99407359143029*^9}, - 3.994075181231205*^9, 3.9940752239087954`*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"6556bb48-da8c-4ec6-b3ae-3a5c8dd280e7"] + 3.994075181231205*^9, 3.9940752239087954`*^9, 3.9943497395024548`*^9, + 3.994352665933938*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"14244c32-c1b6-425f-80d5-d226df3b9a16"] }, Open ]], Cell[CellGroupData[{ @@ -1929,15 +1881,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[153]:=",ExpressionUUID->"ded44718-5e9f-4136-ad97-4f21f5eb326b"], + CellLabel->"In[48]:=",ExpressionUUID->"ded44718-5e9f-4136-ad97-4f21f5eb326b"], Cell[BoxData["7.524926889811008`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.99407356508613*^9, 3.994073591458125*^9}, - 3.994075181264968*^9, 3.994075223937818*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"aaf40761-363b-473b-b56f-509a7dc80c7c"] + 3.994075181264968*^9, 3.994075223937818*^9, 3.994349739593343*^9, + 3.99435266602757*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"dcd8fb97-b203-4e9b-b1be-e0ae61bd0f4b"] }, Open ]], Cell[CellGroupData[{ @@ -2425,16 +2376,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[154]:=",ExpressionUUID->"234e4766-ae73-4366-888d-721c90c34342"], + CellLabel->"In[49]:=",ExpressionUUID->"234e4766-ae73-4366-888d-721c90c34342"], Cell[BoxData[ RowBox[{"-", "14.084113046357718`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994073565118821*^9, 3.994073591484323*^9}, - 3.994075181298151*^9, 3.9940752239647293`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"c4e24a77-f356-474c-a6db-3c31c03b3b98"] + 3.994075181298151*^9, 3.9940752239647293`*^9, 3.994349739690868*^9, + 3.994352666122959*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"753ddf8f-1233-4e22-9396-a1b9aeb017cf"] }, Open ]], Cell[CellGroupData[{ @@ -2992,16 +2942,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"3447aa47-926e-4105-b529-53182b1f9892"], + CellLabel->"In[50]:=",ExpressionUUID->"3447aa47-926e-4105-b529-53182b1f9892"], Cell[BoxData[ RowBox[{"-", "18.31263149263108`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.9940735651553993`*^9, 3.994073591515855*^9}, - 3.9940751813370543`*^9, 3.994075223996374*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"4150c03c-74de-45dd-94c1-164928601e9b"] + 3.9940751813370543`*^9, 3.994075223996374*^9, 3.994349739780963*^9, + 3.994352666225947*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"91a39334-dfbb-42c4-b644-a833b6273cbb"] }, Open ]], Cell[CellGroupData[{ @@ -3559,16 +3508,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"84e45612-fe14-4a86-b37b-29b1fd952f1a"], + CellLabel->"In[51]:=",ExpressionUUID->"84e45612-fe14-4a86-b37b-29b1fd952f1a"], Cell[BoxData[ RowBox[{"-", "53.236632839784775`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.994073565191607*^9, 3.9940735915482073`*^9}, - 3.9940751813752813`*^9, 3.994075224029221*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"184adab8-24f7-40cf-8257-2553c683f0fc"] + 3.9940751813752813`*^9, 3.994075224029221*^9, 3.994349739976283*^9, + 3.994352666351492*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"3e513baf-b417-4a64-9af5-a585b53f3f0d"] }, Open ]], Cell[CellGroupData[{ @@ -4199,46 +4147,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"7a70f639-b9ef-43cc-85ac-2a3c009b0422"], + CellLabel->"In[52]:=",ExpressionUUID->"7a70f639-b9ef-43cc-85ac-2a3c009b0422"], Cell[BoxData[ RowBox[{"-", "137.72173412227852`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.9940735652337313`*^9, 3.9940735915861683`*^9}, - 3.9940751814204807`*^9, 3.99407522406466*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"308ec60b-8c5c-47c1-8d12-6d12c5ece297"] + 3.9940751814204807`*^9, 3.99407522406466*^9, 3.994349740081862*^9, + 3.9943526664885406`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"bed52300-02de-4d86-8100-5ba54c2d535b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"7bc16394-d589-462d-b330-8397fb3f2047"], + CellLabel->"In[53]:=",ExpressionUUID->"7bc16394-d589-462d-b330-8397fb3f2047"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994073565247233*^9, 3.99407359159737*^9}, - 3.994075181435895*^9, 3.9940752240755796`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"e53699da-0c38-4832-89e0-2f096d488e23"] + 3.994075181435895*^9, 3.9940752240755796`*^9, 3.9943497401617813`*^9, + 3.994352666514325*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"1854e4df-b6d0-471d-a709-5794e2f34743"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"a6b40e3a-cf2c-4f9a-b129-de395f756d4e"], + CellLabel->"In[54]:=",ExpressionUUID->"a6b40e3a-cf2c-4f9a-b129-de395f756d4e"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994073565259305*^9, 3.994073591607201*^9}, - 3.9940751814462433`*^9, 3.994075224085256*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"e5682ebd-a4a7-4282-8c38-0d669f9a424e"] + 3.9940751814462433`*^9, 3.994075224085256*^9, 3.994349740186549*^9, + 3.99435266653095*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"8367f5ba-1a15-41ee-bfd2-8d4a6443939e"] }, Open ]], Cell[CellGroupData[{ @@ -4282,15 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"73a21032-e77c-4504-89ed-159786f65d30"], + CellLabel->"In[55]:=",ExpressionUUID->"73a21032-e77c-4504-89ed-159786f65d30"], Cell[BoxData["109.03965674383026`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940735652689238`*^9, 3.99407359161714*^9}, - 3.994075181457575*^9, 3.994075224089169*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"f912ad7b-c882-41f5-815f-ecea19b45029"] + 3.994075181457575*^9, 3.994075224089169*^9, 3.9943497402216*^9, + 3.9943526665526247`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"873592ab-ac62-49d5-b358-b4470b700934"] }, Open ]], Cell[CellGroupData[{ @@ -4330,16 +4274,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"21217782-7ddf-452d-9a66-8c8a3ae8aedd"], + CellLabel->"In[56]:=",ExpressionUUID->"21217782-7ddf-452d-9a66-8c8a3ae8aedd"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.9940735652791967`*^9, 3.994073591627187*^9}, - 3.994075181468134*^9, 3.9940752240986977`*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"bcae0679-338e-45a0-9243-e04cd91709dd"] + 3.994075181468134*^9, 3.9940752240986977`*^9, 3.9943497402482967`*^9, + 3.994352666566676*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"53d5a163-635e-4912-b6ee-b11442d5d28d"] }, Open ]], Cell[CellGroupData[{ @@ -4383,101 +4326,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"af407c9e-e948-4537-b0e9-9976724fad70"], + CellLabel->"In[57]:=",ExpressionUUID->"af407c9e-e948-4537-b0e9-9976724fad70"], Cell[BoxData["112.13680293055965`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994073565289288*^9, 3.994073591637117*^9}, - 3.994075181479414*^9, 3.9940752241080437`*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"92750e76-ea54-463d-8cfc-8fa52e037e25"] + 3.994075181479414*^9, 3.9940752241080437`*^9, 3.994349740272402*^9, + 3.994352666581252*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"42bb3a74-4976-46fb-9f1b-d22ffb1ac7de"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"c6f40a8e-7108-4280-abdf-d61c7ef7c069"], + CellLabel->"In[58]:=",ExpressionUUID->"c6f40a8e-7108-4280-abdf-d61c7ef7c069"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.99407356529922*^9, 3.994073591647008*^9}, - 3.994075181491456*^9, 3.994075224117897*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"c0d8fa98-deff-4a1e-a762-248eb4961b2f"] + 3.994075181491456*^9, 3.994075224117897*^9, 3.9943497402934017`*^9, + 3.994352666603634*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"d9ac024f-85b3-4c1b-8cfc-3c2af6a6b4d3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"9f49d01a-e956-46f1-bc32-3c0a0c5676fd"], + CellLabel->"In[59]:=",ExpressionUUID->"9f49d01a-e956-46f1-bc32-3c0a0c5676fd"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.994073565311245*^9, 3.994073591656905*^9}, - 3.994075181502122*^9, 3.9940752241273518`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"d7e3941f-a328-4ba2-8498-96acacba8db3"] + 3.994075181502122*^9, 3.9940752241273518`*^9, 3.9943497403208447`*^9, + 3.994352666659012*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"2c07a7b0-75b0-4e51-a749-d781cc1a28f4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"757ac39d-4b2a-4228-9138-a03f58a1ff11"], + CellLabel->"In[60]:=",ExpressionUUID->"757ac39d-4b2a-4228-9138-a03f58a1ff11"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.9940735653224297`*^9, 3.994073591666703*^9}, - 3.994075181512973*^9, 3.994075224138131*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"b03be3c2-99e5-48da-b4fc-d971a27c41ae"] + 3.994075181512973*^9, 3.994075224138131*^9, 3.994349740340726*^9, + 3.994352666738714*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"b5ab8849-4527-4426-b64e-406d2b312229"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[166]:=",ExpressionUUID->"62adb8fa-10b5-480f-894b-f0238c0d1b4a"], + CellLabel->"In[61]:=",ExpressionUUID->"62adb8fa-10b5-480f-894b-f0238c0d1b4a"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.994073565332736*^9, 3.994073591676529*^9}, - 3.9940751815232983`*^9, 3.99407522414828*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"a9ff62cb-6229-420d-a06d-9f4405fec512"] + 3.9940751815232983`*^9, 3.99407522414828*^9, 3.994349740367269*^9, + 3.994352666751457*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"894869d5-0755-45ae-8ad6-d6e52c89c97a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[167]:=",ExpressionUUID->"d43e6f92-d809-44e0-9120-b196ea8daae1"], + CellLabel->"In[62]:=",ExpressionUUID->"d43e6f92-d809-44e0-9120-b196ea8daae1"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994073565343382*^9, 3.994073591686304*^9}, - 3.9940751815621433`*^9, 3.994075224158536*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"ae06fbeb-d6c8-473e-9c5f-4a3b3e64c434"] + 3.9940751815621433`*^9, 3.994075224158536*^9, 3.994349740393721*^9, + 3.994352666765633*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"509d040e-a0bf-431a-9aa2-aa4f351ca01a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[168]:=",ExpressionUUID->"02a8a8e6-24da-4cb4-a9aa-601cc47acfc0"], + CellLabel->"In[63]:=",ExpressionUUID->"02a8a8e6-24da-4cb4-a9aa-601cc47acfc0"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.9940735677968397`*^9, 3.994073591696135*^9}, - 3.994075181571867*^9, 3.994075224168653*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"4005a743-b7f7-4e32-b1cb-890516619b5f"] + 3.994075181571867*^9, 3.994075224168653*^9, 3.994349740412887*^9, + 3.99435266678121*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"99d1356f-7e3b-48d8-8af1-ed1dc69e9717"] }, Open ]], Cell[CellGroupData[{ @@ -4498,16 +4434,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[169]:=",ExpressionUUID->"93541c5e-8b46-4315-b49c-dba3509c9f70"], + CellLabel->"In[64]:=",ExpressionUUID->"93541c5e-8b46-4315-b49c-dba3509c9f70"], Cell[BoxData[ RowBox[{"-", "34.047906297441784`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994073567991251*^9, 3.994073591706287*^9}, - 3.994075181582259*^9, 3.994075224178802*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"6c00d70e-51ac-49a5-aad3-6b5aab4905d8"] + 3.994075181582259*^9, 3.994075224178802*^9, 3.994349740450638*^9, + 3.994352666794606*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"da2208bf-5b1c-4228-b583-0c160f35c6e2"] }, Open ]], Cell[CellGroupData[{ @@ -4528,16 +4463,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[170]:=",ExpressionUUID->"2d38d866-1931-4002-9617-99a4e47bd22d"], + CellLabel->"In[65]:=",ExpressionUUID->"2d38d866-1931-4002-9617-99a4e47bd22d"], Cell[BoxData[ RowBox[{"-", "6.56405378738986`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994073568001831*^9, 3.994073591716386*^9}, - 3.994075181592502*^9, 3.994075224188962*^9}, - CellLabel-> - "Out[170]=",ExpressionUUID->"6777495a-a6e6-4cf3-bf0e-4953d5b72a50"] + 3.994075181592502*^9, 3.994075224188962*^9, 3.994349740480795*^9, + 3.9943526668090343`*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"74f1029e-adf6-45ca-ba87-dbbc28ee3088"] }, Open ]], Cell[CellGroupData[{ @@ -4602,15 +4536,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[171]:=",ExpressionUUID->"9d6a4f6e-da0a-4388-909c-a8e2830ba813"], + CellLabel->"In[66]:=",ExpressionUUID->"9d6a4f6e-da0a-4388-909c-a8e2830ba813"], Cell[BoxData["74.99175044638848`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.994073568012953*^9, 3.994073591726822*^9}, - 3.9940751816039963`*^9, 3.994075224199308*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"e12b71a0-a2cf-48ff-8242-904c1a152792"] + 3.9940751816039963`*^9, 3.994075224199308*^9, 3.994349740501142*^9, + 3.9943526668212767`*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"58f737f0-8ec7-48b9-9143-8afbdc58880f"] }, Open ]], Cell[CellGroupData[{ @@ -4651,16 +4584,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[172]:=",ExpressionUUID->"02ec0ba8-fa05-4c6d-aac2-4590440599d3"], + CellLabel->"In[67]:=",ExpressionUUID->"02ec0ba8-fa05-4c6d-aac2-4590440599d3"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994073568023205*^9, 3.9940735917368*^9}, - 3.994075181615046*^9, 3.994075224209613*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"3b885b3e-049d-40a6-bf91-9a94cae83015"] + 3.994075181615046*^9, 3.994075224209613*^9, 3.994349740519508*^9, + 3.994352666835711*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"6a1c8e20-3b98-4aa3-b124-f528cc83f785"] }, Open ]], Cell[CellGroupData[{ @@ -4726,15 +4658,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[173]:=",ExpressionUUID->"cf4b5661-671b-4ab6-b1c1-32c95855ae45"], + CellLabel->"In[68]:=",ExpressionUUID->"cf4b5661-671b-4ab6-b1c1-32c95855ae45"], Cell[BoxData["105.57274914316979`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994073568033989*^9, 3.994073591747006*^9}, - 3.994075181626021*^9, 3.994075224219851*^9}, - CellLabel-> - "Out[173]=",ExpressionUUID->"189fdaf0-6685-4ba2-a19e-8da43287dc1e"] + 3.994075181626021*^9, 3.994075224219851*^9, 3.994349740547658*^9, + 3.994352666852234*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"52120433-39e6-4447-9226-50229e8764bb"] }, Open ]], Cell[CellGroupData[{ @@ -4792,15 +4723,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[174]:=",ExpressionUUID->"56d119f4-b5a5-4dc4-b3d1-1f19739c2200"], + CellLabel->"In[69]:=",ExpressionUUID->"56d119f4-b5a5-4dc4-b3d1-1f19739c2200"], Cell[BoxData["39.10949309233206`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994073568045323*^9, 3.99407359175727*^9}, - 3.994075181636903*^9, 3.99407522423002*^9}, - CellLabel-> - "Out[174]=",ExpressionUUID->"734e72f0-aea2-43f6-a811-0fbb63b31412"] + 3.994075181636903*^9, 3.99407522423002*^9, 3.9943497405719748`*^9, + 3.994352666864852*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"8bfffd19-a782-428c-89aa-eadebf9ed41d"] }, Open ]], Cell[CellGroupData[{ @@ -4858,38 +4788,47 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[175]:=",ExpressionUUID->"946d2eb7-09c8-43aa-b66f-39edc741593f"], + CellLabel->"In[70]:=",ExpressionUUID->"946d2eb7-09c8-43aa-b66f-39edc741593f"], Cell[BoxData["659.7171122788135`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994073568055649*^9, 3.994073591768012*^9}, - 3.9940751816477003`*^9, 3.99407522424048*^9}, - CellLabel-> - "Out[175]=",ExpressionUUID->"60691fd1-8a80-414f-8058-b32593c168eb"] + 3.9940751816477003`*^9, 3.99407522424048*^9, 3.9943497405930157`*^9, + 3.994352666877638*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"7c601141-351b-4206-b6a9-0ab0a42c2328"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4209192664"}]], "Input", - CellChangeTimes->{3.9918505481678543`*^9, - 3.994084895859604*^9},ExpressionUUID->"83cccf0d-dccb-fb42-a058-\ -5e950c758893"], + CellChangeTimes->{3.9918505481678543`*^9, 3.994084895859604*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], + +Cell[BoxData["0.4209192664`"], "Output", + CellChangeTimes->{3.994349740612727*^9, 3.994352666891835*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"e6f110cb-2d74-4034-b0a7-c0a982d50bf2"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991850549355442*^9, - 3.991850549360302*^9}},ExpressionUUID->"7730e455-e5f4-194b-b761-\ -e7a6896afd10"], + CellChangeTimes->{{3.991850549355442*^9, 3.991850549360302*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1119271435"}]], "Input", - CellChangeTimes->{3.991850550777445*^9, - 3.9940849040018682`*^9},ExpressionUUID->"b70cfd2b-21a1-8344-9518-\ -5e27a96171a9"], + CellChangeTimes->{3.991850550777445*^9, 3.9940849040018682`*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], + +Cell[BoxData["0.1119271435`"], "Output", + CellChangeTimes->{3.994349740644066*^9, 3.994352666917046*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"d90ed925-4848-4694-a2c5-4e58634ac701"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918505524437046`*^9, - 3.991850552447544*^9}},ExpressionUUID->"86df0a71-aa65-aa41-b8f1-\ -8c5c5be10fe8"], + CellChangeTimes->{{3.9918505524437046`*^9, 3.991850552447544*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ @@ -4934,9 +4873,12 @@ Cell[BoxData[ RowBox[{"1.16", "*", SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], - ")"}]}]], "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], + ")"}]}]], "Input", + CellLabel->"In[75]:=",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[BoxData["2.3793916761039806`*^-53"], "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[BoxData["1.5054805119396558`*^-53"], "Output", + CellChangeTimes->{3.994349740674168*^9, 3.994352666940987*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"7ce967ea-c6f8-4b7b-b8f8-19718a4498cd"] }, Open ]], Cell[CellGroupData[{ @@ -4970,11 +4912,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915577064670105`*^9},ExpressionUUID->"c16f367e-d189-2745-b3b8-\ -a9b137c5e3b6"], + CellChangeTimes->{3.9915577064670105`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[BoxData["5.0207251137958644`*^-55"], "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[BoxData["6.90043917210766`*^-55"], "Output", + CellChangeTimes->{3.994349740692623*^9, 3.994352666956501*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"d63b8fde-f797-41ab-b916-88e7bfbcf032"] }, Open ]], Cell[CellGroupData[{ @@ -5007,11 +4950,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557709328657*^9, - 3.991557711123291*^9}},ExpressionUUID->"b7d001ae-480c-4b41-8df9-\ -8010347227f7"], + CellChangeTimes->{{3.991557709328657*^9, 3.991557711123291*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[BoxData["1.8713726427856714`*^-54"], "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[BoxData["5.9139089901686424`*^-55"], "Output", + CellChangeTimes->{3.994349740735268*^9, 3.994352666972625*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"dd14d061-ebbf-40c3-b150-3408f74571a1"] }, Open ]], Cell[CellGroupData[{ @@ -5033,10 +4977,12 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ih", "*", "Ir"}], - RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"d15e5e59-9ad8-\ -e247-a132-b43b2736212a"], + RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", + CellLabel->"In[78]:=",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[BoxData["25.178011816139865`"], "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[BoxData["8.258142878047346`"], "Output", + CellChangeTimes->{3.994349740759007*^9, 3.994352666988043*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"391d8f01-2f6f-47be-8421-812db236bea8"] }, Open ]], Cell[CellGroupData[{ @@ -5061,10 +5007,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", - RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input",Expre\ -ssionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], + RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", + CellLabel->"In[79]:=",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[BoxData["37.88040277230648`"], "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[BoxData["20.17970761145056`"], "Output", + CellChangeTimes->{3.9943497407978354`*^9, 3.9943526670021887`*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"45b3f71d-89c8-47ad-8b24-d7a1f7b5a2c2"] }, Open ]], Cell[CellGroupData[{ @@ -5072,10 +5020,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb3"]]}]], "Input",ExpressionUUID->"906db7f6-73f3-8a4e-\ -88a4-7c75445a4f32"], + FractionBox["Kb", "Qb3"]]}]], "Input", + CellLabel->"In[80]:=",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[BoxData["0.7475613664924765`"], "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[BoxData["2.176205468199348`"], "Output", + CellChangeTimes->{3.994349740820716*^9, 3.994352667016748*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"995d6560-eacc-4b9d-a87c-89c7ab1a2816"] }, Open ]], Cell[CellGroupData[{ @@ -5083,10 +5033,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ - FractionBox["Kw", "Qw3"]]}]], "Input",ExpressionUUID->"731b68b1-c44a-6c4a-\ -a9f8-bc957ede9a68"], + FractionBox["Kw", "Qw3"]]}]], "Input", + CellLabel->"In[81]:=",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[BoxData["3.219272026986442`"], "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[BoxData["5.717700990108036`"], "Output", + CellChangeTimes->{3.994349740843267*^9, 3.994352667031624*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"944673e4-9837-404e-9400-b41773ac29a2"] }, Open ]], Cell[CellGroupData[{ @@ -5094,10 +5046,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ - RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input",ExpressionUUID->"71af6813-\ -eb8f-4944-8d03-7bcd77a7b4b4"], + RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", + CellLabel->"In[82]:=",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[BoxData["121.94732101586592`"], "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[BoxData["115.38153419008154`"], "Output", + CellChangeTimes->{3.994349740867866*^9, 3.9943526670452003`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"8ebc95f1-5296-440c-8130-176a99427713"] }, Open ]], Cell[CellGroupData[{ @@ -5105,10 +5059,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"28815b73-\ -08dc-e64f-8823-2a55ad6b8ca8"], + RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", + CellLabel->"In[83]:=",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[BoxData["18.822108918837237`"], "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[BoxData["17.971415688378137`"], "Output", + CellChangeTimes->{3.994349740892414*^9, 3.994352667056119*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"72d983ce-8f09-459d-aa90-136bbd48f290"] }, Open ]], Cell[CellGroupData[{ @@ -5296,10 +5252,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"137e8d46-8eff-3c47-\ -bf8f-1350d0b8a0bb"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[84]:=",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[BoxData["0.04118782656518991`"], "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[BoxData["0.00816633894909807`"], "Output", + CellChangeTimes->{3.994349740916572*^9, 3.9943526670718937`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"c783c7bf-afea-4076-bc84-5cd2ef58f681"] }, Open ]], Cell[CellGroupData[{ @@ -5311,18 +5269,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"65edd566-\ -4493-2440-9c51-9fca28ce324b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[85]:=",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], - -Cell[BoxData["4.366771860185336`"], "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[BoxData["9.806888551412698`"], "Output", + CellChangeTimes->{3.99434974116735*^9, 3.994352667373513*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"40b6f312-f459-468a-9907-67c568de2d3f"] }, Open ]], Cell[CellGroupData[{ @@ -5512,10 +5464,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"d808e80b-1928-8046-\ -afec-31463f4946cd"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[86]:=",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[BoxData["0.010567083454288358`"], "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[BoxData["0.054819377569837444`"], "Output", + CellChangeTimes->{3.994349741354238*^9, 3.994352667394487*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"c8f6836f-fa9a-4621-918b-7b391489c1f4"] }, Open ]], Cell[CellGroupData[{ @@ -5527,18 +5481,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"56b1717f-\ -bc75-4047-98f0-7a0dede3f8a9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[87]:=",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], - -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[BoxData["3.7851046438151497`"], "Output", + CellChangeTimes->{3.994349741473782*^9, 3.994352667503356*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"4c4ad1d9-cf5e-4b97-8f89-6e245f06be92"] }, Open ]], Cell[CellGroupData[{ @@ -5629,10 +5577,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-\ -f74418e31aeb"], + ")"}]}]}]], "Input", + CellLabel->"In[88]:=",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[BoxData["0.04840187632890963`"], "Output", + CellChangeTimes->{3.9943497415146646`*^9, 3.994352667517311*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"9f505878-3358-4ef0-a353-35716b75f688"] }, Open ]], Cell[CellGroupData[{ @@ -5720,10 +5670,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-\ -91d5391478d5"], + ")"}]}]}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[BoxData["0.9515981236710904`"], "Output", + CellChangeTimes->{3.994349741557527*^9, 3.994352667531931*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"34a5370c-eb96-4a92-8a95-c3fbe4d38154"] }, Open ]], Cell[CellGroupData[{ @@ -5844,16 +5796,18 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"bea639c9-f172-\ -ef4e-9454-9d4e027f5fa2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel->"In[90]:=",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[BoxData["0.046059134696750575`"], "Output", + CellChangeTimes->{3.994349741576078*^9, 3.994352667549713*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"e7260bc2-fd82-41a4-a342-db3fbf90dee3"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"752e2dd5-bee6-\ -2048-8697-fe84d79611fa"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ @@ -5914,27 +5868,73 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918505674491863`*^9},ExpressionUUID->"f8b12d93-5bd9-8641-aa98-\ -3d78ebb0f21b"], + CellChangeTimes->{3.9918505674491863`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.0725482683950067`*^-200\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 1, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349741637642*^9, 3.994352667596285*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"b3fb4b57-0283-4f2e-9481-6bc262d00b4f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"42c1a263-2456-664a-bb33-c5fe841cb412"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.8899635870688992`*^-204\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 2, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349741637642*^9, 3.994352667629635*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"d5c30a75-ccc6-490c-85f9-ea18920ea07f"], -Cell[BoxData["4.366771860185332`"], "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.041751347546146`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349741637642*^9, 3.994352667639299*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"5d6af105-45f2-4d91-8638-6184f3a6f45a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 92, 4, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349741637642*^9, 3.994352667648849*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"223d2bab-7205-4008-9ff9-5d3349b45106"], + +Cell[BoxData["9.806888551412696`"], "Output", + CellChangeTimes->{3.994349744530807*^9, 3.994352672052989*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"b3996936-3c06-41a3-9b8f-e026a3fdeecc"] }, Open ]], Cell[CellGroupData[{ @@ -5996,26 +5996,73 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185057022003*^9},ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], + CellChangeTimes->{3.99185057022003*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"be4d7bfb-c18e-564a-93ce-3f42607886e7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.0725482683950067`*^-200\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 5, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943497445874023`*^9, 3.9943526721888943`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"9ed2ddc8-3756-4ac3-98e1-10afec694b7a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.8899635870688992`*^-204\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 6, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943497445874023`*^9, 3.994352672199852*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"0be43e16-b500-46a5-bd48-c15251d9c461"], -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.041751347546146`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943497445874023`*^9, 3.9943526722104883`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"e9ed3153-c43e-420b-8ba8-75c50b3f759a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 93, 8, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943497445874023`*^9, 3.99435267221926*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"60ce45b8-236f-4051-8362-7f21df10df14"], + +Cell[BoxData["3.7851046438151466`"], "Output", + CellChangeTimes->{3.994349747526682*^9, 3.9943526758948193`*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"8821a078-cb3a-45bf-ac4a-122f4dbd21b9"] }, Open ]], Cell[CellGroupData[{ @@ -6025,491 +6072,438 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505747312756`*^9},ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-\ -12d8b19f0936"], + CellChangeTimes->{3.9918505747312756`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d3cb6fbc-3803-0541-80d1-8cab47341c44"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d8687e0f-2f42-0543-a749-78a1ff3c9572"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -2.67879 2.97603 [ -[.15608 .28474 -6 -9 ] -[.15608 .28474 6 0 ] -[.28836 .28474 -6 -9 ] -[.28836 .28474 6 0 ] -[.42063 .28474 -6 -9 ] -[.42063 .28474 6 0 ] -[.55291 .28474 -9 -9 ] -[.55291 .28474 9 0 ] -[.68519 .28474 -9 -9 ] -[.68519 .28474 9 0 ] -[.81746 .28474 -9 -9 ] -[.81746 .28474 9 0 ] -[.94974 .28474 -9 -9 ] -[.94974 .28474 9 0 ] -[.01131 .14844 -24 -4.5 ] -[.01131 .14844 0 4.5 ] -[.01131 .44604 -24 -4.5 ] -[.01131 .44604 0 4.5 ] -[.01131 .59484 -18 -4.5 ] -[.01131 .59484 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 -.15608 .29724 m -.15608 .30349 L -s -[(25)] .15608 .28474 0 1 Mshowa -.28836 .29724 m -.28836 .30349 L -s -[(50)] .28836 .28474 0 1 Mshowa -.42063 .29724 m -.42063 .30349 L -s -[(75)] .42063 .28474 0 1 Mshowa -.55291 .29724 m -.55291 .30349 L -s -[(100)] .55291 .28474 0 1 Mshowa -.68519 .29724 m -.68519 .30349 L -s -[(125)] .68519 .28474 0 1 Mshowa -.81746 .29724 m -.81746 .30349 L -s -[(150)] .81746 .28474 0 1 Mshowa -.94974 .29724 m -.94974 .30349 L -s -[(175)] .94974 .28474 0 1 Mshowa -.125 Mabswid -.05026 .29724 m -.05026 .30099 L -s -.07672 .29724 m -.07672 .30099 L -s -.10317 .29724 m -.10317 .30099 L -s -.12963 .29724 m -.12963 .30099 L -s -.18254 .29724 m -.18254 .30099 L -s -.20899 .29724 m -.20899 .30099 L -s -.23545 .29724 m -.23545 .30099 L -s -.2619 .29724 m -.2619 .30099 L -s -.31481 .29724 m -.31481 .30099 L -s -.34127 .29724 m -.34127 .30099 L -s -.36772 .29724 m -.36772 .30099 L -s -.39418 .29724 m -.39418 .30099 L -s -.44709 .29724 m -.44709 .30099 L -s -.47354 .29724 m -.47354 .30099 L -s -.5 .29724 m -.5 .30099 L -s -.52646 .29724 m -.52646 .30099 L -s -.57937 .29724 m -.57937 .30099 L -s -.60582 .29724 m -.60582 .30099 L -s -.63228 .29724 m -.63228 .30099 L -s -.65873 .29724 m -.65873 .30099 L -s -.71164 .29724 m -.71164 .30099 L -s -.7381 .29724 m -.7381 .30099 L -s -.76455 .29724 m -.76455 .30099 L -s -.79101 .29724 m -.79101 .30099 L -s -.84392 .29724 m -.84392 .30099 L -s -.87037 .29724 m -.87037 .30099 L -s -.89683 .29724 m -.89683 .30099 L -s -.92328 .29724 m -.92328 .30099 L -s -.97619 .29724 m -.97619 .30099 L -s -.25 Mabswid -0 .29724 m -1 .29724 L -s -.02381 .14844 m -.03006 .14844 L -s -[(0.95)] .01131 .14844 1 0 Mshowa -.02381 .44604 m -.03006 .44604 L -s -[(1.05)] .01131 .44604 1 0 Mshowa -.02381 .59484 m -.03006 .59484 L -s -[(1.1)] .01131 .59484 1 0 Mshowa -.125 Mabswid -.02381 .02939 m -.02756 .02939 L -s -.02381 .05915 m -.02756 .05915 L -s -.02381 .08892 m -.02756 .08892 L -s -.02381 .11868 m -.02756 .11868 L -s -.02381 .1782 m -.02756 .1782 L -s -.02381 .20796 m -.02756 .20796 L -s -.02381 .23772 m -.02756 .23772 L -s -.02381 .26748 m -.02756 .26748 L -s -.02381 .327 m -.02756 .327 L -s -.02381 .35676 m -.02756 .35676 L -s -.02381 .38652 m -.02756 .38652 L -s -.02381 .41628 m -.02756 .41628 L -s -.02381 .4758 m -.02756 .4758 L -s -.02381 .50556 m -.02756 .50556 L -s -.02381 .53532 m -.02756 .53532 L -s -.02381 .56508 m -.02756 .56508 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 -.5 Mabswid -.02381 .01472 m -.02499 .01472 L -.02605 .01472 L -.02729 .01473 L -.02846 .01474 L -.03053 .01478 L -.03279 .01482 L -.03527 .01489 L -.0379 .01499 L -.04262 .0152 L -.04749 .01548 L -.05205 .0158 L -.06244 .01675 L -.07305 .01801 L -.08274 .01944 L -.10458 .02358 L -.12357 .02821 L -.14429 .03435 L -.18493 .04963 L -.22406 .06826 L -.26565 .09204 L -.30571 .11858 L -.34426 .14717 L -.38527 .1805 L -.42475 .215 L -.46273 .24996 L -.50315 .28853 L -.54206 .3264 L -.58342 .36674 L -.62326 .40497 L -.66159 .44044 L -.70238 .47601 L -.74164 .50741 L -.77939 .53432 L -.8196 .55879 L -.85828 .57771 L -.87793 .58543 L -.89942 .59234 L -.91995 .59741 L -.92911 .59917 L -.93905 .60073 L -.94426 .60141 L -.94906 .60194 L -.95356 .60236 L -.95851 .60273 L -.96295 .60299 L -.9671 .60316 L -.96939 .60323 L -.97148 .60328 L -.97264 .6033 L -Mistroke -.9739 .60331 L -.97509 .60332 L -.97619 .60332 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzVnGdgVUUWgENekkeIRCAEpWhiqAkEkIBUQekGYaUsZRdBmgYQRMSyCkhR -6VKWjgIKSFmpsiIIuLqr0lEUld5xBZQm0pl957yZc++83DPzsuLK/sjk3Zlv -zjn3zNyp907TTv2yuvXq1K97l07Jjfp26pPVvcszyQ2f6huI8uWKiMh1MPCX -mhwRFfgtIiK0YKy4Lg5BEPgtxA1xCILf73c6/vOBbfALrzBc/n+UHhNMDvxa -4opNoNi3eFl5IYwjchpPJkKYm8iJPFkUQj+RY3kyWbd+FE+WhDCayGEuEsFU -PX0oL6mcTg7iyYoQRhE5gCczdPJFnryPLMbrF3iymi7zWZ6sqZN9ebK2rr0P -Tz6gy+zFk/V0mT15soEuM4snG+syH+fJTJ3sGlovHtbTO/OSmunkYzz5iE52 -4MkWOtmeJ1vp5J94srVOtuXJtjrZmidRXSSRf+TJP+syW/LkozrZnCc76uQf -eLKTbmcznuysy3w4tF501dMzQ9Mf19Mb85qydJsa8WR3XWYDnuypy6zPk0/q -MuvyZG9d5oM8+ZQusw5PPq3LrM2TfXWZtXiyny6zJk8+q8uszpPP6zKr8eQL -usz7QuvFi7qkKrykl3RJGTw5QJdZiScH6uS9PPmyrr0CTw7WZZbnySE6mc6T -Q3XtZYNkoiSvXrlKZKJH7ld1PWnB3JH4L1qMGztOlC5dWpQpU0b06NFD3Lh+ -IxALaVHiyuUrombNmqJEiRLiyOEjUTLL0iVLMUvx4sVFlSpVxJLFSyJiMC1G -zJg+Q9StW1eULFlSpKaminr16onPPv0st4ddr+l2pQbtivAjsPqD1eKhhx4S -F36+gDfYs2dPMWL4CDLtx1M/iri44Ehrw+cb/FL+nt17xBNPPCG6dOkiUb9Y -tHCR2L9vv9Irdn69U5QtW1bs+HJHhN/DrmG6t0tLu3wINGrUSHyx/QvpPp84 -d/acSElJkZ4Jxh0/dlzs+m4XXsXKuObNm4sVy1fglXJGwG9gqPRcdkNG6A4q -RYZcu3pNFC1aFMvKJzPWqlVLfPftd3iVT8Zt3LBR1KlTR1MKhtWuXZtVOlJX -WpKUnjxxUlSsWFFmCYYdOnQQaz9ci1e3SXef/um0aNu2LdaQChUqoPsLFiwo -Ll+6TEYsfnex6Nixo2MEDmNG6o4vTqoP7D8gqlevrqnOysoSy5Yu01Q3adJE -TJo4Ce/lzOkzomnTpiI2NlYcPXJU5vND4Ynp06aL69euI7d71240dfOmzZ61 -YYzujxQy6tTJU57+WLd2HV7FybjDhw5jdYMrVWvAl/Hx8VBTZN4YMXfOXLxJ -8Fm5cuVE1apV4SnwenJe1226x1oxVG1UNn3y8SeiRYsWmu2FChXCB95tJ9g0 -dcpULa/bkLG6Icnao9K4cWOxfdt27VGBlsQpMZ84dPCQKF++vKZ0y+YtokGD -BppxNkPG6YYkaW3JmtVrRMOGDcX5c+fxDqGZGzN6TES89DxUk8mTJiMbqCoi -IyMDHp2oMHVP0HXfpbev48eNx8YQ6livXr2waOJlGtTR9u3bYzoU+8r3VlIj -AlqLFCkCVSFwFQxl1dIaG7clf9UtKRa0xKtHmaiTRXlykk4W4ckpOnknT07V -yTt4cppOFuLJ6TqZ6CIRnKE3Lgm8pDd1SQV4cqZO5ufJWTqZjydn6+TtPPmW -Tsbz5Ns6mZcn5+pkHE/O08k8PPmOTsby5HydzM2TC3TSz5MLdTImtF4s0tOj -eUnv6qSPJxfrZCRPLtHJXDy5VCe9oWUE3eCh5QRd56EVBF3jofcIuspDKwm6 -wkPvE3SJh1YRdJGHPiDol9CiXk1JF0KT1lDSz7zoDwk6z0NrCTrHQ+sIOstD -6wk6w0MfEXSahyrIuG7duuFQrHLlyoErCONwEA3DBsniCBo6yLS0NBrC9evX -D4dvwSG638gEHyDveYWyDYZDMO6Cq6gwZMbRTd4ppQdmI2A//kGO/PnzB3rc -4H2NHDGS7tw+y4nGXjU9PR3HITBMOPHDiYgkq55otx7l2cDdeHsVxj6DXh6E -Q4tSpUqhrNatW+MAMNmqK4+my+Ap0y3Z1eiu8xkKy3Q7hj5D1UMYEsPQOTAh -kmriRLVq1TSP7d2zF8ZD4uIv+LDjJHDgwIGiXbt2VA9NTNDUGG4iqcwbPGiw -GD5suHZ3JrG3UVUsIiXAhKJVq1bSu0alyiaYIMIQ/9jRY6hg/jvzRWZmZoqH -xCjWZf5sLgNNs2bOgrkxDaZhzgnz8EsXL0Xw8sNzJWN2cQ+xfta9PquZhqGE -mm0F6jOuPATEkIixr49VkzpSDx4Dz8FVukdcpLwzOavXHtfArF5l+fabb1Ed -XOXxEOO0T4UNlYJRotwy7LVh2Ew5dumT+mRWdPj+6N27t5jz9hy8usdDntfN -RYZpn5c8v8GBblsMY8J7ZRwsK0CFHz1qNM3CApVTrF+33lW8fncc/tnWSsrJ -OGgqYTbqmKPLz+thWyHDA2vTq1wItSIwS9bi+vfvTzNOr2KPMfhk2tRp+ODa -ith9b+Ha4iUvt8F/blsMRVxJxsEDASsgE8ZPIDOhF4PlH6eIY9xx+CdXppTn -3YtSqnRfGfoKPhBu69yi4+kJNpWpbQlM+Qy6TJjbu+NmvjkTfcmVqd/gBFg3 -gBbTVqbuOwrXFlOZennNbYuhTDNk3NkzZ9GswIiE+pFRI0eJfXv3IQstFHQS -zZo1SzMnK4fbFgNVkcOYBR44pwBZ0fmp9BM9vBEVpmLl3aSkJBiLaXEL5i8Q -ffr0YUs/N+suv1i4YKHWoq16fxUuOZ8/d96zS48232xUmGaaKkZ235rNNHTp -lWXcpo2bcMnT8W4Mjmxh+Ar/YXQA3g48H2nmZFU2tgVaZQ0MYr8//n04mgtQ -RSloqCg2xcrbMJbyejQHDBjAVpRYg7u6du2KTTg0xTAih+XwwGTBa3wWbb7P -qDAt9KojsQa3Mha6pwxYO6rIXAUKFIAOVNMv651WhO441Tna1sJVXhjXTJk8 -RSstt7xCVOYJhjK3aVPWy0VxLQ6aYugquTLPY/AGeFQNKUqxBa3fkT9MW0yl -6+U1ty2G1Ug1C9y6ZasYOmSoph629WBbkSsMrwL3y2J33Q7+yf2GNJkFkmBD -zK0Omsf69euz6u6gss8nS1ven/JJjFm3qh0wBVIdqbseq3n13d7So3PoKXcB -lDAZ7F0fbFYmma0M18E5qiZ+8c3Ob3AjBHZxoBuDQS/spga6N3r6wq0izE6Q -qiJvzHiDpjjKWhhfQ4PONUF3UhVRuzpA16hRQ7Rs2VLMnjUbXETb44wBanwC -7SUM2ORAWsybOw92p5IMkqNz4Ca354tbrfV2IWNistXE8N0bZgWpKC3atnUb -diqFCxfGTgWqcKCZVDcNS37Qj8EWWqTcSAPrlJgyYXI+eYdeG3ruCgS9QKD3 -j/DJMCEhAdeD3Hdo01WQKtXtMgfs2GZmZqI//QZL1AogjMRAAxQVNE6BqQu1 -525ZMeE5EYoEVLl3I6GNUwYnsaLDd6yXySkecqNz6Gyb7YZtpi1UDod5aCtB -hpegtxF0kIe2E3SAh74gaD8PfUnQPh7aQdBeHvqKoD089DVBwZ4iWG4CItZD -YNjXivWIy03i8oSZ41aSEpLj1+QNSfVRatRvZv2tJOXmeNKwIXEr3eyt5DKv -HFGU6vvNrL+VpPzmla+aR1xVyljdI7UMpcbnOK+XtkTeuF0kbCcP7Sboax7a -Q9BXPLSXoB08tN8jbjuPH/CI28bjBz3itvL4IbLYAB0maIsLQuYIJW3m8x8l -aBMPHSNoIw8dJ2gDD31P0Oc89G+CPuOhHwj6lIdOEPQvHjpJ0D956BRBn/DQ -jwR9zEM/EfQPHjpN0EehxXqGktaHJp2lpHW86HMEreWh8wR9yEM/E7SGhy4Q -tJqHfiHoAx66SNAqHrpE0Ps8dJmgv/PQFYJW8tBVgt7joWsErQgtseuUtDw0 -6QYlLeNFY5jLI2GxJU+kR8K7ljzO4NBGOj353yxkNJGLLGQMkQstpJ/IBRbS -6UXnW8hYIt+xkE5fPs9COpv6cy2k807InNBqgul5Kf1tiyRnG9LwjSmGtxM5 -20LmI3KWhXR2N960kAlEvmEhnZWMGRYykcjpFtJZkZff1+b4hbBsn7YE1yq8 -X5xSi3M5+LQFQ2fxOLh7TuPm7Fv52b5nUfszzCs3as8tp5+2YOisWE7h7VK5 -3d+yqIUX25sgKq/t+xYMC5M1k3lr1CqY7QUFpdn2kQuGRUjzJLtm2za60uz9 -ZUuIvol2fbbd2UipNaefs2B4F1kywW6JbQ9QvUOVg+9XMLybjBhvN8K2VRXu -BysYJpHmcdR+ABCyr0GfUdn2RXKkPJmUjyXlXovm+aRbmfX2cD9OwfAe0vl6 -UKey2L2sml8+417LsG5tOf0oBcMUsmBM0AK2cS9O5GgLWZLIkRayFJEjLGRp -IodbSGcuPsxCphL5mot0hgdplP6qRVJZymg4kAHDdJI5xEKWJ3KwhaxA5CAL -WZHsHGghK5FMw3EQGGYQ2d9CVibyJQtZhez8i4V01lYMR0xgWI3I5y1kdSKf -86wXNeiyn2d6Lcr/jEXT/UQaDrPAsDapMBxmgeEDJPMpC/kgyexlIeuRzCct -ZH0iDQdkYNiAtHe3kI1IpuEoDQyd8zQMR2lgmEkyu1nIJkRmO3QD052TNzp7 -pjej/J0smh4hsqOFbE4qHrWQLUmm4VAODJ2TOQyHcmDonMxhOJQDw7akvY2F -bEcyDYdyYOiczGE4lAPDR0l7CwvZgWQ+YiEfI9JwKAeGzskc2Q7lwHTnZI5M -iyTnjA7D8RwYZhHZ0EL2INJw6AaGzskbhkM3MMSTN3BYXcdCPk0y77eQz5DM -GhbyOZIpj70I7gn86hmoOtgAhmNKjN/vVxLatGlDEthR1gt0F/IgjbySDGPG -qcbp8gttvGLH7i+Rokq8Iq8pZI604OABj5Yqz2spkBOJg0li2f9CojOVe4Xk -lL5JluHAFI/uSrlJEnGgjQeMFbtJEvHz8niIl98vx8mqFDJxUu/KwVcfUgAo -8No8wxBXhrAixumPFD8vihKdO3fGl4eWL1sO78GxwuXKrTpwIPuMx4ffPsGL -r8WKFfPc4XPLYduF/1E6/v4dDvaLyPUfxyNRZA==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-19.402618477936908, \ -0.8923747627909967, 0.7099700316630947, \ -0.001262238128389079}},ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-\ -c578eb57eb6a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk0lN8fB3CNpWxlyRIpe8aWBkXU/WRJdhGRNWaetEmIsUQq7ZaQ+GYv +a8oSZSlfRX6KJJVUhDwmkZ1mlL79rj+e85zXuee87+fuCr4nHBkULi6uUfwt +/092am961NW50z66sy0rkEQ7J+/o+5qVoZfms3+WPZizNVXZ7DHy/+uWlY3t +QH/FJ6T7HGlX8hblYFcyY5p5zTqQFGNBJg/7cqt0U0zpGyRDpS7mY9d1ncxe +or1HDmvydhVgj316GRXe0IsKtTzni7BlRpTcf5r2IalsT9G72NZTUYbBHQOo +IDo//T5249KYILN0CBEzGleqsHtipSIfBgwj4/W/Rh5iT/KZjc3TRpA2Vbis +AZvvWqCbLpuF0G5GXxP2BtGstpMNoyiogBLWim0n+7Nw0vQHEuFbPd6NTeQq +SmqtmkRnYqJaPmLHqNjHHe2YQhSNLauGsHul3m0JKZ1BoBfQOY1NP3DkcMq1 +WTRMZTssYk9ncuVVBcyhG7H/20E5SaJViloiM7QFRFYhFwnsVHqzhYjETxRl +Nhq7EVu+yC1mM/sn4i3+KKWObaB5YfJ4Awe1nUk/C9j+Wwc6xkyXkGJmslMQ +9jzzFI+A6h9k2hL/Jgb7TIOgMXXVf0jO631dPHY6GNw91PEXHaXYvCjFphe0 +mQWVrgDDCtbwd+zS1pTBWFkKdIzvq/6FPf3NK+r6NQrEG6ydEgwiUZT6woOK +AG4Yzb10ezN2armC0hSNFwo73VdFYX/q+tH4321esExnaCRhy88+OrBagg9k +xVpr72CX6dkla7H5oG1Lgthr7Ja6iBXHGlZBU9PeZ2rBJFpofjswaioEx3T8 +xaexxWyERCIbhYDHcEBBOIREOu/MQNhQGNbw+95Txz5C1uRu0V4NiTuSjA5h +B1I6dHYIiQCzr1qPhT2ieH8m7qcosFR9bv0+heeHeMn/WlcMWJbGkfKhJKLc +ZSlInxSDkRKjXnNsed2NjqXjYhDdWMqfjH3ANKmqc1AcLjaGW+mEkei1X1Cw +VLsEKJocNj/PJNGXooSrPqskIVDUmlOB/WO89HaJuSS8Ez2u9gVbIGT4rVGT +JMjeDufaHk4is/P79HxqpCBdZTKRjV1/Z+tCcc46eJO6UftKJInujPwK3R4i +B9MZ/4QJx5Boj/PFL8H35MB7oabbHPtHi/jueyw5+GtlfisaW++OpoS82waQ +yGoLmcFu8fV6wLtzIyi+yrHsO0Oi2anBsNFz8uBxMj6q9SyJxI+bVT+wVQSX +LZukJy6QiHVHwN/hiCJECluq6l4kUW1fl+zEBUVIOqeZH47tYeN5TrVJEWR5 +TYdXXsL1aYQ6ZtCU4HH9ryvUy7j/saLpaCllkLbkDY69SqJ9hwS1rIZU4PeN +wbpzSSRCoc60/X9UIOr7wMB7bPW4nG30daqwsfjRCbXrJOK6rWsSvVcVCiOX +Ojqx731x31/1VBUyB3Si5VPw+XQpi5XJ3wSTK5eefLiB6zOz7RnzpUJ49q0X +N26R6LbTzc/saCr0qr3QWcBO8B0a5LlFBX/WVopzJt7fZ06Nb3hLhWcTg8MS +WSQSfZzF5WSqDvScN/mZ2Xj/6E6qNyhpQKa5uVhjHolkFRNjrpKakG2k/8ah +mESPr8xTFylaECGt3tyK7THn9o5Q0IJZ70rajhISZbcoU028tMDK7eoVjVIS +KR6q7+Z80AJvw99yq8vweMtGVIh2bajws+0dKyeRnOwGQt5NB4KdPv5LqSWR +ZkGI0G9Eg1OdIyn3XpDIl35uQcuOBp7nNKUMX+LzqpT8xceDBqu/C/E/x+bO +L69oZdKA0C03+NKOz1v22L7kShooXuFvk+jE92m6TxZVSRdizufczejG63vV +RtuVTw/UNfzuzn8mUV6QskNNhz5U+Lc+5UyRqCsUbTtfYAg7jG+E+yiMIAWv +93aex3ZA8upsT64DI4jx9+F9uXAA4ytqrC1pI0hqvHallK8JhKkPGRYPjKAQ +XeO+ZHUzkM9RixLXZCHfiaU28TFzsEtIfh8ZzUL3TIJX5ry2gBB36ZqQQRa6 +M3/kaVmqJVhbtN0UNfuGOLukX7XEWMPFXGqEet031M/FPTN00BbWb5fecUl/ +FAWsP5EUq2QPRP1/18SqRtH9w21NN+IcIJuelpdv8h1FzK1jaxzeC5oueiU3 +u7+jBavdLv/zdoQL5hui4phjyND9+q6RvU7QMh3FHa8yjrrXZR1p0d0HthVW +Rbxd40im8NzjYjVncChXny5N/oFqB9Vt7IRd4OZBMjl27wTa8G76UOiECzAD +7NNm104i3RvXy24P7gdD8PbimZ1EWTxz2snNrkAbo30+0jaFHu7a/Cmuzg3u +d5WZxHlMo/RtV0SXSg+Acp2s6cmeafT6c8EF3WvukHswemKT9Qyqsc1UDjzj +ARSB6hWhHTNo5rgTVwDdE35u63m+yWIWLeym+k+aekFt7filsqZZVDzxkRO8 +1Rvm8vgz5M3nkGtegZ+nkA9s281NDWiaQw+qrL25L/qA/YDf6adm88hQtnvx +8qIPJFZWt3E3ziOlwUOf3hw+CNva1TMqt+B3R/CofebwQWjmmO93L11AXQl2 +fhbOvrCnTyDAFL9DqcwcwVNdvtDtpFRyKfYnetz4d9HP0g+0HUt6O77+RGs8 +4KJuvR/wEe7y1npsJL/2f6/XP/YDr3+XnG7qs5FOh600X6MfGOuOtX/dykaO +xu4lvU/9IPy/YxfDDNkodX1o++kXfmCmEqScvpONZPrvrmnr9QPBWbKyZg8b +KXtJpXuw/aCyOnXJ24ONDH0mi+P06JAWu6nHJ5aNCjOmg+220uFpkCzX4bNs +tPbt7E4pAzqMNKiHBp5jo0lz9rtiIzpM5j4yPx3HxvcX14oOEzqcqtx/LOEy +G61mi7qJ7aWDzFhsYcJ1NiLj9flzjtPBnay35s1jo4SGqMO1hXRo/yT+4N8n +bHScdtOQWUwHw+rEudRGNrIpqeQ3KKWDSCEz4vC/bCRwk1Xy6B4d1q/rOyDy +lI3ighzGHlbToeUTx8e5hY2iqMpHa57RoX5DpPvjl2x05Gb7saovOM87oXep +h40sV7OMgwbpULbX6nr9BzZSi+MSpn2lg5eMwNWwXjZiBenfqxyhQ0XJDEx9 +ZKODdjkTFT/ocJk+Xfm+j41ceYMDyn/R4ZVJYVz0VzayCJYJLJNkgKhXyfDO +CTZ6lnPBKlmaASyv9LBZbOOOWWWmDAO0+/lUCibxeqm0fzTdwIDvwaXtK6fZ +aN2HSNPPKgwQURY1fTbLRuPb+yUF9BnwTnzHA0EOGyVScp8ccmJARUT50akV +HCSwWSjd1pkBL+wKP8VROOi8OzNIdz8DLl154SnLzUHMaodNfw8woHdsMceU +h4MOEiuup/ni/nm71lzm4yDdl7705ycZ4CwQG/VNgIM+XFcRVEpiwNvq4sQZ +MQ66j4T9R68z4IHNIM1XHOdPzLfcS2EAd+I4Tzc2zbIl2uAmA2Q1pPTL13JQ +ApffrG02A1TTuJu9JTlo94ncj8wyPB+crpiMdRwkJ3dp6877DFhIrOL5gz3/ +8kQKdwUDWg+MPPSW4aB8VWSb8IAB6S5kvqIsB/3p72+6XY/H//lTWvZ6Dqq2 +kS3ubGPAWbf+zwEbOejqLwpv6ksG1FrmazzH9i0eO+jWwYBqBUaRjDwHifDU +y5Kvcfv2NMVm7GMNromLPXh8R66pCChykJJ6WqjyCAMsnTNsA5U56NeH02+/ +sxgwJxK8rw67K46hUz7KADuLTRdWqHBQ9JDemOEPBhDDfYcTsT+lv/W0n2OA +UdUjnTxVDkpeKWoesYKAXvH8+5lqHPR4tt89hJsArwv/7BzA/tZfGhTAS8Cq +htZmeSoHGVeb5fryE1B9/MS9XGyWD/O3lSgBm2t4l1LUcf025mLm4gRcG8rS +7cQ22iZGRRIEaKZ89l6pwUFJwmUuuusIIEX50kKxjeoHKmUVCKgS9Arbo8lB +REFZm4QSAa8+Eo4R2ElJ4QNrVAiYF/hH4S42ixAX5qES8KTGIpNfC7eLW/j/ +0MH991iuqMeu/088hkUjINlGK2oYe+T74I1BPQI6aG/HBLU5aHtTRPM7AwLm +BAxuu2GTx+5veAIE7BqnxYxir3aN1H9kQkBK63wa/2YOMjTdY1NpRsB9L+V8 +KnbCuq/hBXsImFApTiawa3nKk3KsCEhoHQs7hz08FVmUYUMAz0qmQw62QavE ++3gHAgoyHT+/xfat/Dp+0ZGAnldJ8T+w4zPLKWf3EfDN5TeNR4eDvgZZ6oS6 +EjAauX2/Drawl6RF4AECuLwpPWbYBpbDnkc8CHBU67dwxY7fePqqlw+ux76G +Jwq7VsAq39UXr9fBYvtry3kLknWOdAIkGzPiby3nDQ2/tiEIMKLENZYs53VU +sHb7E6AlSXx9iO376PQfOEKAuo7h4rPl/HyrtUbHCFh4+4vSuZwfL6WhH4Dr +6y76+2E5n0nu2hxIwHfrHVOD2EL0SldqEAH+d2vfjGJvs48+oRRCAPOuVNHU +cv526wtyoXi9nVxPLGBfU5HOkmISYL/IVP+F/VBk5IFoBAGyiNn7B3vod+VL +wSgCIiWcw7m24Pxv0UO80QQE1a8WpmBv7bbm/I0h4EbdnZRl/x8NCuKh + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk0lN8fB3CNpWxlyRIpe8aWBkXU/WRJdhGRNWaetEmIsUQq7ZaQ+GYv +a8oSZSlfRX6KJJVUhDwmkZ1mlL79rj+e85zXuee87+fuCr4nHBkULi6uUfwt +/092am961NW50z66sy0rkEQ7J+/o+5qVoZfms3+WPZizNVXZ7DHy/+uWlY3t +QH/FJ6T7HGlX8hblYFcyY5p5zTqQFGNBJg/7cqt0U0zpGyRDpS7mY9d1ncxe +or1HDmvydhVgj316GRXe0IsKtTzni7BlRpTcf5r2IalsT9G72NZTUYbBHQOo +IDo//T5249KYILN0CBEzGleqsHtipSIfBgwj4/W/Rh5iT/KZjc3TRpA2Vbis +AZvvWqCbLpuF0G5GXxP2BtGstpMNoyiogBLWim0n+7Nw0vQHEuFbPd6NTeQq +SmqtmkRnYqJaPmLHqNjHHe2YQhSNLauGsHul3m0JKZ1BoBfQOY1NP3DkcMq1 +WTRMZTssYk9ncuVVBcyhG7H/20E5SaJViloiM7QFRFYhFwnsVHqzhYjETxRl +Nhq7EVu+yC1mM/sn4i3+KKWObaB5YfJ4Awe1nUk/C9j+Wwc6xkyXkGJmslMQ +9jzzFI+A6h9k2hL/Jgb7TIOgMXXVf0jO631dPHY6GNw91PEXHaXYvCjFphe0 +mQWVrgDDCtbwd+zS1pTBWFkKdIzvq/6FPf3NK+r6NQrEG6ydEgwiUZT6woOK +AG4Yzb10ezN2armC0hSNFwo73VdFYX/q+tH4321esExnaCRhy88+OrBagg9k +xVpr72CX6dkla7H5oG1Lgthr7Ja6iBXHGlZBU9PeZ2rBJFpofjswaioEx3T8 +xaexxWyERCIbhYDHcEBBOIREOu/MQNhQGNbw+95Txz5C1uRu0V4NiTuSjA5h +B1I6dHYIiQCzr1qPhT2ieH8m7qcosFR9bv0+heeHeMn/WlcMWJbGkfKhJKLc +ZSlInxSDkRKjXnNsed2NjqXjYhDdWMqfjH3ANKmqc1AcLjaGW+mEkei1X1Cw +VLsEKJocNj/PJNGXooSrPqskIVDUmlOB/WO89HaJuSS8Ez2u9gVbIGT4rVGT +JMjeDufaHk4is/P79HxqpCBdZTKRjV1/Z+tCcc46eJO6UftKJInujPwK3R4i +B9MZ/4QJx5Boj/PFL8H35MB7oabbHPtHi/jueyw5+GtlfisaW++OpoS82waQ +yGoLmcFu8fV6wLtzIyi+yrHsO0Oi2anBsNFz8uBxMj6q9SyJxI+bVT+wVQSX +LZukJy6QiHVHwN/hiCJECluq6l4kUW1fl+zEBUVIOqeZH47tYeN5TrVJEWR5 +TYdXXsL1aYQ6ZtCU4HH9ryvUy7j/saLpaCllkLbkDY69SqJ9hwS1rIZU4PeN +wbpzSSRCoc60/X9UIOr7wMB7bPW4nG30daqwsfjRCbXrJOK6rWsSvVcVCiOX +Ojqx731x31/1VBUyB3Si5VPw+XQpi5XJ3wSTK5eefLiB6zOz7RnzpUJ49q0X +N26R6LbTzc/saCr0qr3QWcBO8B0a5LlFBX/WVopzJt7fZ06Nb3hLhWcTg8MS +WSQSfZzF5WSqDvScN/mZ2Xj/6E6qNyhpQKa5uVhjHolkFRNjrpKakG2k/8ah +mESPr8xTFylaECGt3tyK7THn9o5Q0IJZ70rajhISZbcoU028tMDK7eoVjVIS +KR6q7+Z80AJvw99yq8vweMtGVIh2bajws+0dKyeRnOwGQt5NB4KdPv5LqSWR +ZkGI0G9Eg1OdIyn3XpDIl35uQcuOBp7nNKUMX+LzqpT8xceDBqu/C/E/x+bO +L69oZdKA0C03+NKOz1v22L7kShooXuFvk+jE92m6TxZVSRdizufczejG63vV +RtuVTw/UNfzuzn8mUV6QskNNhz5U+Lc+5UyRqCsUbTtfYAg7jG+E+yiMIAWv +93aex3ZA8upsT64DI4jx9+F9uXAA4ytqrC1pI0hqvHallK8JhKkPGRYPjKAQ +XeO+ZHUzkM9RixLXZCHfiaU28TFzsEtIfh8ZzUL3TIJX5ry2gBB36ZqQQRa6 +M3/kaVmqJVhbtN0UNfuGOLukX7XEWMPFXGqEet031M/FPTN00BbWb5fecUl/ +FAWsP5EUq2QPRP1/18SqRtH9w21NN+IcIJuelpdv8h1FzK1jaxzeC5oueiU3 +u7+jBavdLv/zdoQL5hui4phjyND9+q6RvU7QMh3FHa8yjrrXZR1p0d0HthVW +Rbxd40im8NzjYjVncChXny5N/oFqB9Vt7IRd4OZBMjl27wTa8G76UOiECzAD +7NNm104i3RvXy24P7gdD8PbimZ1EWTxz2snNrkAbo30+0jaFHu7a/Cmuzg3u +d5WZxHlMo/RtV0SXSg+Acp2s6cmeafT6c8EF3WvukHswemKT9Qyqsc1UDjzj +ARSB6hWhHTNo5rgTVwDdE35u63m+yWIWLeym+k+aekFt7filsqZZVDzxkRO8 +1Rvm8vgz5M3nkGtegZ+nkA9s281NDWiaQw+qrL25L/qA/YDf6adm88hQtnvx +8qIPJFZWt3E3ziOlwUOf3hw+CNva1TMqt+B3R/CofebwQWjmmO93L11AXQl2 +fhbOvrCnTyDAFL9DqcwcwVNdvtDtpFRyKfYnetz4d9HP0g+0HUt6O77+RGs8 +4KJuvR/wEe7y1npsJL/2f6/XP/YDr3+XnG7qs5FOh600X6MfGOuOtX/dykaO +xu4lvU/9IPy/YxfDDNkodX1o++kXfmCmEqScvpONZPrvrmnr9QPBWbKyZg8b +KXtJpXuw/aCyOnXJ24ONDH0mi+P06JAWu6nHJ5aNCjOmg+220uFpkCzX4bNs +tPbt7E4pAzqMNKiHBp5jo0lz9rtiIzpM5j4yPx3HxvcX14oOEzqcqtx/LOEy +G61mi7qJ7aWDzFhsYcJ1NiLj9flzjtPBnay35s1jo4SGqMO1hXRo/yT+4N8n +bHScdtOQWUwHw+rEudRGNrIpqeQ3KKWDSCEz4vC/bCRwk1Xy6B4d1q/rOyDy +lI3ighzGHlbToeUTx8e5hY2iqMpHa57RoX5DpPvjl2x05Gb7saovOM87oXep +h40sV7OMgwbpULbX6nr9BzZSi+MSpn2lg5eMwNWwXjZiBenfqxyhQ0XJDEx9 +ZKODdjkTFT/ocJk+Xfm+j41ceYMDyn/R4ZVJYVz0VzayCJYJLJNkgKhXyfDO +CTZ6lnPBKlmaASyv9LBZbOOOWWWmDAO0+/lUCibxeqm0fzTdwIDvwaXtK6fZ +aN2HSNPPKgwQURY1fTbLRuPb+yUF9BnwTnzHA0EOGyVScp8ccmJARUT50akV +HCSwWSjd1pkBL+wKP8VROOi8OzNIdz8DLl154SnLzUHMaodNfw8woHdsMceU +h4MOEiuup/ni/nm71lzm4yDdl7705ycZ4CwQG/VNgIM+XFcRVEpiwNvq4sQZ +MQ66j4T9R68z4IHNIM1XHOdPzLfcS2EAd+I4Tzc2zbIl2uAmA2Q1pPTL13JQ +ApffrG02A1TTuJu9JTlo94ncj8wyPB+crpiMdRwkJ3dp6877DFhIrOL5gz3/ +8kQKdwUDWg+MPPSW4aB8VWSb8IAB6S5kvqIsB/3p72+6XY/H//lTWvZ6Dqq2 +kS3ubGPAWbf+zwEbOejqLwpv6ksG1FrmazzH9i0eO+jWwYBqBUaRjDwHifDU +y5Kvcfv2NMVm7GMNromLPXh8R66pCChykJJ6WqjyCAMsnTNsA5U56NeH02+/ +sxgwJxK8rw67K46hUz7KADuLTRdWqHBQ9JDemOEPBhDDfYcTsT+lv/W0n2OA +UdUjnTxVDkpeKWoesYKAXvH8+5lqHPR4tt89hJsArwv/7BzA/tZfGhTAS8Cq +htZmeSoHGVeb5fryE1B9/MS9XGyWD/O3lSgBm2t4l1LUcf025mLm4gRcG8rS +7cQ22iZGRRIEaKZ89l6pwUFJwmUuuusIIEX50kKxjeoHKmUVCKgS9Arbo8lB +REFZm4QSAa8+Eo4R2ElJ4QNrVAiYF/hH4S42ixAX5qES8KTGIpNfC7eLW/j/ +0MH991iuqMeu/088hkUjINlGK2oYe+T74I1BPQI6aG/HBLU5aHtTRPM7AwLm +BAxuu2GTx+5veAIE7BqnxYxir3aN1H9kQkBK63wa/2YOMjTdY1NpRsB9L+V8 +KnbCuq/hBXsImFApTiawa3nKk3KsCEhoHQs7hz08FVmUYUMAz0qmQw62QavE ++3gHAgoyHT+/xfat/Dp+0ZGAnldJ8T+w4zPLKWf3EfDN5TeNR4eDvgZZ6oS6 +EjAauX2/Drawl6RF4AECuLwpPWbYBpbDnkc8CHBU67dwxY7fePqqlw+ux76G +Jwq7VsAq39UXr9fBYvtry3kLknWOdAIkGzPiby3nDQ2/tiEIMKLENZYs53VU +sHb7E6AlSXx9iO376PQfOEKAuo7h4rPl/HyrtUbHCFh4+4vSuZwfL6WhH4Dr +6y76+2E5n0nu2hxIwHfrHVOD2EL0SldqEAH+d2vfjGJvs48+oRRCAPOuVNHU +cv526wtyoXi9nVxPLGBfU5HOkmISYL/IVP+F/VBk5IFoBAGyiNn7B3vod+VL +wSgCIiWcw7m24Pxv0UO80QQE1a8WpmBv7bbm/I0h4EbdnZRl/x8NCuKh + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6387471124653049, 1.51196534798837}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6387471124653064}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6387471124653049, 1.51196534798837}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6387471124653064}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk0lN8fB3CNpWxlyRIpe8aWBkXU/WRJdhGRNWaetEmIsUQq7ZaQ+GYv +a8oSZSlfRX6KJJVUhDwmkZ1mlL79rj+e85zXuee87+fuCr4nHBkULi6uUfwt +/092am961NW50z66sy0rkEQ7J+/o+5qVoZfms3+WPZizNVXZ7DHy/+uWlY3t +QH/FJ6T7HGlX8hblYFcyY5p5zTqQFGNBJg/7cqt0U0zpGyRDpS7mY9d1ncxe +or1HDmvydhVgj316GRXe0IsKtTzni7BlRpTcf5r2IalsT9G72NZTUYbBHQOo +IDo//T5249KYILN0CBEzGleqsHtipSIfBgwj4/W/Rh5iT/KZjc3TRpA2Vbis +AZvvWqCbLpuF0G5GXxP2BtGstpMNoyiogBLWim0n+7Nw0vQHEuFbPd6NTeQq +SmqtmkRnYqJaPmLHqNjHHe2YQhSNLauGsHul3m0JKZ1BoBfQOY1NP3DkcMq1 +WTRMZTssYk9ncuVVBcyhG7H/20E5SaJViloiM7QFRFYhFwnsVHqzhYjETxRl +Nhq7EVu+yC1mM/sn4i3+KKWObaB5YfJ4Awe1nUk/C9j+Wwc6xkyXkGJmslMQ +9jzzFI+A6h9k2hL/Jgb7TIOgMXXVf0jO631dPHY6GNw91PEXHaXYvCjFphe0 +mQWVrgDDCtbwd+zS1pTBWFkKdIzvq/6FPf3NK+r6NQrEG6ydEgwiUZT6woOK +AG4Yzb10ezN2armC0hSNFwo73VdFYX/q+tH4321esExnaCRhy88+OrBagg9k +xVpr72CX6dkla7H5oG1Lgthr7Ja6iBXHGlZBU9PeZ2rBJFpofjswaioEx3T8 +xaexxWyERCIbhYDHcEBBOIREOu/MQNhQGNbw+95Txz5C1uRu0V4NiTuSjA5h +B1I6dHYIiQCzr1qPhT2ieH8m7qcosFR9bv0+heeHeMn/WlcMWJbGkfKhJKLc +ZSlInxSDkRKjXnNsed2NjqXjYhDdWMqfjH3ANKmqc1AcLjaGW+mEkei1X1Cw +VLsEKJocNj/PJNGXooSrPqskIVDUmlOB/WO89HaJuSS8Ez2u9gVbIGT4rVGT +JMjeDufaHk4is/P79HxqpCBdZTKRjV1/Z+tCcc46eJO6UftKJInujPwK3R4i +B9MZ/4QJx5Boj/PFL8H35MB7oabbHPtHi/jueyw5+GtlfisaW++OpoS82waQ +yGoLmcFu8fV6wLtzIyi+yrHsO0Oi2anBsNFz8uBxMj6q9SyJxI+bVT+wVQSX +LZukJy6QiHVHwN/hiCJECluq6l4kUW1fl+zEBUVIOqeZH47tYeN5TrVJEWR5 +TYdXXsL1aYQ6ZtCU4HH9ryvUy7j/saLpaCllkLbkDY69SqJ9hwS1rIZU4PeN +wbpzSSRCoc60/X9UIOr7wMB7bPW4nG30daqwsfjRCbXrJOK6rWsSvVcVCiOX +Ojqx731x31/1VBUyB3Si5VPw+XQpi5XJ3wSTK5eefLiB6zOz7RnzpUJ49q0X +N26R6LbTzc/saCr0qr3QWcBO8B0a5LlFBX/WVopzJt7fZ06Nb3hLhWcTg8MS +WSQSfZzF5WSqDvScN/mZ2Xj/6E6qNyhpQKa5uVhjHolkFRNjrpKakG2k/8ah +mESPr8xTFylaECGt3tyK7THn9o5Q0IJZ70rajhISZbcoU028tMDK7eoVjVIS +KR6q7+Z80AJvw99yq8vweMtGVIh2bajws+0dKyeRnOwGQt5NB4KdPv5LqSWR +ZkGI0G9Eg1OdIyn3XpDIl35uQcuOBp7nNKUMX+LzqpT8xceDBqu/C/E/x+bO +L69oZdKA0C03+NKOz1v22L7kShooXuFvk+jE92m6TxZVSRdizufczejG63vV +RtuVTw/UNfzuzn8mUV6QskNNhz5U+Lc+5UyRqCsUbTtfYAg7jG+E+yiMIAWv +93aex3ZA8upsT64DI4jx9+F9uXAA4ytqrC1pI0hqvHallK8JhKkPGRYPjKAQ +XeO+ZHUzkM9RixLXZCHfiaU28TFzsEtIfh8ZzUL3TIJX5ry2gBB36ZqQQRa6 +M3/kaVmqJVhbtN0UNfuGOLukX7XEWMPFXGqEet031M/FPTN00BbWb5fecUl/ +FAWsP5EUq2QPRP1/18SqRtH9w21NN+IcIJuelpdv8h1FzK1jaxzeC5oueiU3 +u7+jBavdLv/zdoQL5hui4phjyND9+q6RvU7QMh3FHa8yjrrXZR1p0d0HthVW +Rbxd40im8NzjYjVncChXny5N/oFqB9Vt7IRd4OZBMjl27wTa8G76UOiECzAD +7NNm104i3RvXy24P7gdD8PbimZ1EWTxz2snNrkAbo30+0jaFHu7a/Cmuzg3u +d5WZxHlMo/RtV0SXSg+Acp2s6cmeafT6c8EF3WvukHswemKT9Qyqsc1UDjzj +ARSB6hWhHTNo5rgTVwDdE35u63m+yWIWLeym+k+aekFt7filsqZZVDzxkRO8 +1Rvm8vgz5M3nkGtegZ+nkA9s281NDWiaQw+qrL25L/qA/YDf6adm88hQtnvx +8qIPJFZWt3E3ziOlwUOf3hw+CNva1TMqt+B3R/CofebwQWjmmO93L11AXQl2 +fhbOvrCnTyDAFL9DqcwcwVNdvtDtpFRyKfYnetz4d9HP0g+0HUt6O77+RGs8 +4KJuvR/wEe7y1npsJL/2f6/XP/YDr3+XnG7qs5FOh600X6MfGOuOtX/dykaO +xu4lvU/9IPy/YxfDDNkodX1o++kXfmCmEqScvpONZPrvrmnr9QPBWbKyZg8b +KXtJpXuw/aCyOnXJ24ONDH0mi+P06JAWu6nHJ5aNCjOmg+220uFpkCzX4bNs +tPbt7E4pAzqMNKiHBp5jo0lz9rtiIzpM5j4yPx3HxvcX14oOEzqcqtx/LOEy +G61mi7qJ7aWDzFhsYcJ1NiLj9flzjtPBnay35s1jo4SGqMO1hXRo/yT+4N8n +bHScdtOQWUwHw+rEudRGNrIpqeQ3KKWDSCEz4vC/bCRwk1Xy6B4d1q/rOyDy +lI3ighzGHlbToeUTx8e5hY2iqMpHa57RoX5DpPvjl2x05Gb7saovOM87oXep +h40sV7OMgwbpULbX6nr9BzZSi+MSpn2lg5eMwNWwXjZiBenfqxyhQ0XJDEx9 +ZKODdjkTFT/ocJk+Xfm+j41ceYMDyn/R4ZVJYVz0VzayCJYJLJNkgKhXyfDO +CTZ6lnPBKlmaASyv9LBZbOOOWWWmDAO0+/lUCibxeqm0fzTdwIDvwaXtK6fZ +aN2HSNPPKgwQURY1fTbLRuPb+yUF9BnwTnzHA0EOGyVScp8ccmJARUT50akV +HCSwWSjd1pkBL+wKP8VROOi8OzNIdz8DLl154SnLzUHMaodNfw8woHdsMceU +h4MOEiuup/ni/nm71lzm4yDdl7705ycZ4CwQG/VNgIM+XFcRVEpiwNvq4sQZ +MQ66j4T9R68z4IHNIM1XHOdPzLfcS2EAd+I4Tzc2zbIl2uAmA2Q1pPTL13JQ +ApffrG02A1TTuJu9JTlo94ncj8wyPB+crpiMdRwkJ3dp6877DFhIrOL5gz3/ +8kQKdwUDWg+MPPSW4aB8VWSb8IAB6S5kvqIsB/3p72+6XY/H//lTWvZ6Dqq2 +kS3ubGPAWbf+zwEbOejqLwpv6ksG1FrmazzH9i0eO+jWwYBqBUaRjDwHifDU +y5Kvcfv2NMVm7GMNromLPXh8R66pCChykJJ6WqjyCAMsnTNsA5U56NeH02+/ +sxgwJxK8rw67K46hUz7KADuLTRdWqHBQ9JDemOEPBhDDfYcTsT+lv/W0n2OA +UdUjnTxVDkpeKWoesYKAXvH8+5lqHPR4tt89hJsArwv/7BzA/tZfGhTAS8Cq +htZmeSoHGVeb5fryE1B9/MS9XGyWD/O3lSgBm2t4l1LUcf025mLm4gRcG8rS +7cQ22iZGRRIEaKZ89l6pwUFJwmUuuusIIEX50kKxjeoHKmUVCKgS9Arbo8lB +REFZm4QSAa8+Eo4R2ElJ4QNrVAiYF/hH4S42ixAX5qES8KTGIpNfC7eLW/j/ +0MH991iuqMeu/088hkUjINlGK2oYe+T74I1BPQI6aG/HBLU5aHtTRPM7AwLm +BAxuu2GTx+5veAIE7BqnxYxir3aN1H9kQkBK63wa/2YOMjTdY1NpRsB9L+V8 +KnbCuq/hBXsImFApTiawa3nKk3KsCEhoHQs7hz08FVmUYUMAz0qmQw62QavE ++3gHAgoyHT+/xfat/Dp+0ZGAnldJ8T+w4zPLKWf3EfDN5TeNR4eDvgZZ6oS6 +EjAauX2/Drawl6RF4AECuLwpPWbYBpbDnkc8CHBU67dwxY7fePqqlw+ux76G +Jwq7VsAq39UXr9fBYvtry3kLknWOdAIkGzPiby3nDQ2/tiEIMKLENZYs53VU +sHb7E6AlSXx9iO376PQfOEKAuo7h4rPl/HyrtUbHCFh4+4vSuZwfL6WhH4Dr +6y76+2E5n0nu2hxIwHfrHVOD2EL0SldqEAH+d2vfjGJvs48+oRRCAPOuVNHU +cv526wtyoXi9nVxPLGBfU5HOkmISYL/IVP+F/VBk5IFoBAGyiNn7B3vod+VL +wSgCIiWcw7m24Pxv0UO80QQE1a8WpmBv7bbm/I0h4EbdnZRl/x8NCuKh + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6387471124653049, 1.51196534798837}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6387471124653064}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6387471124653064}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6387471124653049, 1.51196534798837}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435014137154*^9, 3.9943532446747637`*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"bfc01f05-704f-4c67-9f82-fddd17b885ee"] }, Open ]], Cell[CellGroupData[{ @@ -6572,444 +6566,536 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505781608486`*^9},ExpressionUUID->"4b73592e-b155-8f42-b33d-\ -562f8b3faecd"], + CellChangeTimes->{3.9918505781608486`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.1819845841499935`*^-261\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943501419135103`*^9, 3.994353245241673*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"a0b89995-7932-454b-b827-282d5f669203"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"a2ecd22c-b766-5347-9e03-9d459620be75"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.4529090441020205`*^-272\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943501419135103`*^9, 3.994353245251169*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"b33a119a-490d-4901-863f-38646b9f530f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.231456636783911`*^-283\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 11, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943501419135103`*^9, 3.9943532452591953`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"7f81a65f-012e-437e-a40a-cfaf7e6acd20"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 6.72103 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .14914 -24 -4.5 ] -[.01131 .14914 0 4.5 ] -[.01131 .28356 -24 -4.5 ] -[.01131 .28356 0 4.5 ] -[.01131 .41798 -24 -4.5 ] -[.01131 .41798 0 4.5 ] -[.01131 .5524 -24 -4.5 ] -[.01131 .5524 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .14914 m -.03006 .14914 L -s -[(0.02)] .01131 .14914 1 0 Mshowa -.02381 .28356 m -.03006 .28356 L -s -[(0.04)] .01131 .28356 1 0 Mshowa -.02381 .41798 m -.03006 .41798 L -s -[(0.06)] .01131 .41798 1 0 Mshowa -.02381 .5524 m -.03006 .5524 L -s -[(0.08)] .01131 .5524 1 0 Mshowa -.125 Mabswid -.02381 .04832 m -.02756 .04832 L -s -.02381 .08193 m -.02756 .08193 L -s -.02381 .11553 m -.02756 .11553 L -s -.02381 .18274 m -.02756 .18274 L -s -.02381 .21635 m -.02756 .21635 L -s -.02381 .24995 m -.02756 .24995 L -s -.02381 .31716 m -.02756 .31716 L -s -.02381 .35077 m -.02756 .35077 L -s -.02381 .38437 m -.02756 .38437 L -s -.02381 .45158 m -.02756 .45158 L -s -.02381 .48519 m -.02756 .48519 L -s -.02381 .51879 m -.02756 .51879 L -s -.02381 .586 m -.02756 .586 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 -.5 Mabswid -.02381 .01472 m -.06244 .18263 L -.10458 .34796 L -.12507 .41668 L -.14415 .47199 L -.16371 .51906 L -.18221 .55405 L -.192 .56876 L -.20263 .58172 L -.21228 .59082 L -.2212 .59698 L -.22586 .59936 L -.22843 .60043 L -.23087 .60129 L -.23313 .60195 L -.2356 .60252 L -.23669 .60272 L -.23784 .6029 L -.23886 .60304 L -.23993 .60315 L -.24059 .6032 L -.24132 .60325 L -.2426 .60331 L -.24332 .60332 L -.2441 .60332 L -.24483 .6033 L -.2455 .60328 L -.24679 .6032 L -.24752 .60314 L -.24819 .60307 L -.25074 .60272 L -.253 .60228 L -.2555 .60165 L -.26055 .59995 L -.26547 .59774 L -.27064 .59486 L -.2799 .58832 L -.30075 .56765 L -.3205 .54159 L -.33886 .51282 L -.37791 .44198 L -.41941 .36071 L -.45939 .28487 L -.49785 .21945 L -.53877 .16105 L -.57818 .1166 L -.61606 .08416 L -.63714 .07001 L -.6564 .05921 L -.69523 .04269 L -Mistroke -.71425 .03672 L -.73499 .0315 L -.7547 .02757 L -.77569 .0243 L -.79714 .02174 L -.81732 .01991 L -.83744 .01853 L -.85592 .01756 L -.87479 .01681 L -.89546 .0162 L -.91501 .01578 L -.93594 .01545 L -.95662 .01522 L -.97619 .01507 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzVXGmUFEUSbug5kEFuQRiRWxgYDmFmGJiBEVRuWFhwXcHHcx6HKCCzAquy -gLq8VZBBDmVRkFMRlCcCgoAil7sIrByK3Mdws3LfN+R2RFdFVZaRmd1t43N/ -TE9VVHzxfRmZlVUZVd3tsgf27tkve+Bz3bMrtHgxO6f3c90HVGje/8WAyZ/P -58t3IPCXVMEXE9gWPp/0MUbcFgfhI7AtxB1xED7C3+6P/+LFnt17xPPPPy9q -1KghqlWrJurUqSMGDhworl+77stAn1hx+NBhkZKSgn/gV6xYMV9+2PP5xVsj -3wIv9Mxv+Y8dMxZjVa9eHWPfuX3Hl2qMVdAdS6crDUP5Rc+ePUXJkiUtIcHP -hIQEcevmLcvDJIeLkeCOYZJixYkX27dtR58GDRqIevXqoe/wvw8XN2/cDChQ -64iVe2Pvnr1i0ReLxNUrV5E6ABfDhg0TTz31lK+JJXnL5i2ic+fOVlD4jBPL -li4TrVq1EpcvXUZMnz59xMgRI9MZSEwIVHaGDx08JOrWrSsWLlhoZdMv0tPT -KcP59fSpyjAJ7jD4p5NjJzlvf57YtXMXYS6cv4BJzsnJsZqllGLleZClCNSA -KtjL1OS1RYsWaHczVqpUictrQSa0nYATP58QqampYtrUaVbO/GLM24GT+NZt -KY8KurQQw8QzEmypN67fEJUrV3adGEo6T64CPSBWfLNCmasYywa9mZiYiMPa -HiyZmZli546duJemSZqbw/Y7e+YsjpLcUblWf5g5UhlsAsNhZ2XCuxNE69at -XZ1g5vDL6alVqxYOTFN6Tp44iR3jhPCLbt26ieVfLzemx83RwLJBZzVs2FCM -Hzc+bA43luNIs5TDbFWiRAnRrFkzGFD+EGmsDOVYw2zUW6PEvr37cIjBUH39 -tddF+/btufnMbggIAYFuht69e4v5n89XJitWT9fIgpw/dx7b+s3ybyi0ia4B -g43R09kj7NLFS2LEmyNgwg+5dZ78wfWmefPm+D8pKQldAz2oy9+pk6fYHgoI -N+ZPQZdhQTas34BXOfcpY6JLZ7B+PZ3dXVlZWXTmhUon5S948lpTnK9pBBOY -dcnRJE3myLIm4+LFi0Msml5N8e0B4cJRk93xG1u2AQMGiI9nfRzS5GVzaFKT -ZSXDyrbdzDirn1q2bCk2b9pMrYE5pEqVKmk6lExgt2/j9xvxsu3WffrU6V9c -nhSMqWGF4VP37LPPisWLFodCF6vOWBNrCMB4bNSokejUqZOYPm06tN9np+2r -ZV/h8L544SJeg+HGb3Tu6FQjlMtd8D6zbNmyGBZmG7jQdezYEWYhmpG0lKGE -kKnTLdwPW37AO6uDB3AJIbb9tE1UrVoV8CZqTw7hBjg5ORn+Aj0Hn35MgM1o -TzVrVq/BqzMkJd5K2Lix45AVLk39+vXDgd6A8Y8LkSvVUr5p4ya8HypTpgze -vMN9VSB2rIY2TQ+NCVFBikUx99O5onHjxniBgfwHJkurFTy9lVTVAq+WRQ9r -RpsKPxf8fxyvFLQGDq+Aj3w6K8bKD4ZCTNSEcGxOFOXWvb+W47ew/U7Vx7ht -8FcODPdoFSd4O/kx2nqcIXqUsT3G2HCWKQamxnebqj58FgJTjCoKT48OLeGj -IOw+wx5vBh8FYLe367ifjuNUHg+7L/Cnns/2xKk+DvYHGDxx0oqF/ZcNnnXJ -c4jbM8btSVKT4QMPvWZ2rk6Rh/PONgA2HqLIb5idK5PzSJdzLB2vQAnOZY8/ -SMffdpPFege/k6VEYhwbIqIMcbwTIqI0ISaoUyCNrBKkaiLfy7CXn7HhZ1EK -NikCdGFSOzkCdCFCTzGgndYmEGZayJiCtDtDjfGrVMYR48wI0LHE/ZEB7eiN -IcZZIWOc3dkujF81nd2ho3NCcb9N0T9VK+KAtwg41wBEp5u09ZnaPZaxXSPg -vPCAVwn4eXjAKwScbwCik+OuubVy3C/T1kK1exxjO0/AReEBzxFwsQGITo77 -l6G4n6WtJWr3eMZ2ioBLwwOeJOAy7wjn3H8m968NPOjkuC9XuxdgbMcZm4aR -C3GMsYWp4ijJX2EAopPjvjIU9yO0tUrtfg9jO0jA1eEBDxBwjQGITo77t6G4 -59HWv4LuumdowbkiBlfWGRkZUJ2A52n2IhHKX7B4rF27Ni7CT/x8gi4eR48c -RQWBYz77WRksKIcMGaI8bQsytn2MzWpocAirHsCQeCjRwBM2iLDuu3V21fHY -0WO4SgahEGb2x7NhLW9P/IEIuMa+dPESXfSXLlkatv69jM3KfDBX9kMRYrEe -ilg5DtpArF1Rs21vvvEmdhrsuat28mODOPH+e+9j8RcqP8C3Y/sOKEVxEwfX -gD00YNaSbNMTC3tRDE2zKlwkERL43sT3rM4J2j6c+SH2xZHDR9hTwrnpcdR8 -R2pMTwdsNTVr1hTnzp6T1EydMpW61E7snNlz0BeGM04EeEPK5WYnqVlHavL2 -62vttpry5cvDA11JDTDn5Nhl+KDtg8kfiKZNm2KuuT7jlr47SNd60mWqYdu6 -oB+4LA0dOhT3bA1Q91ry5RLlycDp2k66NhjHkj3cbV2uaqk0lmB4u3WNzh1N -VVqlLtTgqPmPdEJaTNIJCTMf7NnFDHjCAmU378m3e9duyQYlc+thDdn69+8v -ZkyfEYLCbbT1vTTlKaqevsJWzOPHjuMItiunsz6aJdq1a2c/ic/OzhZdu3bF -EwcOQzfC3Hzm9Bl2iHE1rq2MzUqjfUXhaohFrGPwXBRGGqiEfAekUE0XRgT0 -IJwhFStWFG3atIHRwF37OWU/UtI2BvVwF0Sn2OO4bwrF/Qfa2qx250pemxmb -hpELsYm4t4QH3CjL1wBdiZCPahgLq4aCk9/QgRsIuNUFRB+lOzcANIzOBIRb -P4Xivl4+J3n3IoxtLQG3RwD02EzczmUat3ao3Ysytm8JuDMCIHcJCj3EGuLe -ZQA6d8a4tVvtXoyxrWJsGkYuxErGFqaKFSR/rwHorGtwa5/avThjW87Y3Ix4 -hAN+TYz7w2P8ioB5BqBrfSof1TCWYGxLKdiBCIAem0Y0F2IJcWuegZUgJ8f9 -kNq9JGNbzNg0jFyIRcR9OAKgx2aS79RsnDU0734fY1tAwKMRAD22MLnnE/cx -A9BV/2LqEe4TrBTjNI9CHFfzKIEem0ZqKeLhgCZup3rpFIp499KMbS5j+294 -IT4l7hMGoKsuKx81iXYqwbh1Uu1+P2ObTcBTEQA9NhO3UxLHrdNB9ygXcOxj -8NoUvDNdtGhR9Bk8eDC7OPAo8xy1snJXSjX2gqBDhw7iQF5w9ucUlmFsH5Hq -M5bCaBdj4twVEfxbtXIVvGqFr8sGIEWKFMG3N1566aWQZX9Iss+S7MiLMfHu -Ygz+wcIfOvvqlauUgpDS63oqJB910hutMo2dXqjQWUtw/LN0OhUbZ2Q6aTtH -cvKiVKex5Vy5fAWbB+9feuV4clKWsc1gbE4fR6t4Y39DYeI/J2IJwyWUra1z -SqdTMs8bx2C4RRxbH0wOaWlp+P6rUZ/raah81OlssESjrBNjfUJBBd67NXUy -SnMSdkGaDSOs4sRZGuCNzSZNmuCfQkMiY5vK2KyOjLRwY88KXyz8AsOqeouT -M4WSczEogrv6JZITp/5CKECH55La/QHGNpmxaaRyISYR92UDEJ04RpNo11sP -8lENYznGNpGCXY0A6LFdcYXAI+UousNzTc3zIGObwNg0UrkQ7xL39QiAHptJ -PvI4jDfU7uUZ23jGphHNhRhH3DcjAHpsJvnI4zDeUrtXYGxjGJtGNBfibeK+ -HQHQYzPJRx6H8Y7avSJjy2VsGtFciFHELbynWkU65HHKZ6BwMJ6jQg2sxNhG -yLT5I0BzAjTyKxGjh9uvxlRmbG+ouDVt4OL8Q1YRY0Cjp5Jb04YqjG24zB0b -AZpToWlDFWL0cMeFjOEYNcqrMrbXZO74CNCcCncb8HBV4vEwFvB6PsTEHKbi -0ejl4gyVue8xoNFTyV1Aja7G2P4mcxeMAM2p0LSBizNYVpFgQKOnklvThuqM -7WWZu1AEaE6Fpg3VidHDfa8ak8TY/qrittoQ5ZKS/Z0W+Ipw27ZtMRys7lat -XMWuEzjJg+QGB9dId/MVoHiMBM2AdRocztufh9kI/GcLIUkkUZlfq598d/fN -H9s25YMpYtCgQZJt/Ljx4tVXX7Uy8EuZNRjbADn3RagR0XoPyLbBGIOXrNy2 -BfMXiO7duzuCsbbDDZEBqqwXJsHRrUH5cYTDCyduG9RackflcoIxh55sFiVx -ML6iV5GKx7eGYLzC1/ygKgXfP4TvKsL357jxW0OWyGXS6fpoVaTs8hl08eRJ -k/HlGCg7d+nSBV6c4aaHmowtR05qMeMQDbcyZdtmzphJw5F7xakmCfmLKolO -j4M5mm8bXbt6DSffQOJYccmM7QU5c8Utcb+qRGXPuzAYoDPhdzYC2rhX+5SS -uMxZ3Rppncq+RsF8D+8/wVwLf4Gxxp4QyZQaT5KCz4Lp1tn1nWt2TuUuy31V -bbQ6gMNwtj6yspIGNHoquUuo0bUZ23OqOBoVXJzechtKGdDoqeS+T42uw9h6 -ydylXWh0VGI47lIsGqN7eO5Xq6zL2HqoGEuHF6e7rKKMAY2eSm5NGx5mbNky -d9nw0M/I6EQDGj2zVco13PUYWzeZ+4EI0JwKTRvqEaOHu5waU5+xPa3i1rSh -PjE+LXM/qMakMLYuKm5NG1KIsYvMXd57ZqUy6D+rGDXKuThPquKUN8RBvU/K -yiuqMWmM7QkVdwVDHGR8QuaupMY0YGydVNyaNnBx/iirqGxAo6eSW9OGdMbW -QeauYkCjZ0cVt0Z5Q8bWXuauakCjpwfzUMgYTq+GsRFjayNzVzOg0bOtitut -HA9nMJ6tZMbqasYM8vRgktSYTMbWQqVXw51JjC1k7hpqTGPG9piMrmlAoyf3 -rX8TdxPG1kzmTjag0ZP7dQGT8izG9ogqjkZFFql4RFZeW43heLhc4GcwwN0q -bUHVAlZksNqBN6cmvT+JLW05jWsiNzN4n3l3C1rr163Hw9ZP9eHbFfA1nsB6 -nF3/NCWJmbLYupbY36aM1atXL/HJnE8kG/jA7+0F260Y/soJFPcfpkZEu4z1 -yiuvYOrdNvgRJMBrBaM4bqb2ZD26Zax4sfXHrViQtZfxgIERHljOBwcGlrC4 -nDoXcNyvRxLz9kenmGW/EQSVCL/fjwMrPj4eapjsCeb8tolHWn2SFt3SVTwW -R8AXuhy2V69ajfPA/n372dOK+8GWFFlsinFsRlq/ggb07dtXskGd2G4UNzad -6xh3t+zJLpijWdN6Z/w7+KqV2zbvs3miR48eSsGPk2BuUSRlOCpfqIPXI+Gn -BOE3ZeEwjDC4gATOR3YENGdszoIb94Nrg4hLXfZ1ae2/1+ILYvBjh3CGB+ZR -9rRpTuweHcH7e/by69wc1ZYx6WpMS/JMljEN1ZhWjC1JRjcyoNHTg8lQY1qT -ZzUZk6nGODfTVWVMYzWmLXlWljFN1Jh25FlRxmS5MAhxlhblZc9H1NH/QJ7l -ZExTNcZZciXKmGZqTEfyvJ/04pFH1ZhOhLlP5nlcjelM0YvJPM3VmD+RJ06u -MYRpqcZg6QF/CimGtvBIGzWmK3wWIM/2ak/8/J38TJ7pOG4bfgvel+9/Sn8S -OQ==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-3.233775858153751, \ --0.007969775184554129, 0.11832856225129938, \ -0.0005589111396958131}},ExpressionUUID->"06204099-db57-8e4e-bcc4-\ -fa1ae37c0063"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 95, 12, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943501419135103`*^9, 3.9943532452691603`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"425f4765-b7d1-4722-8cbb-4f6c310b541c"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-\ -04dec8739bf5"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4Vd0XB3BRb6SUWYY7GCOEcN3JWobMeUsqlDnRQEKElFJSlLGSkkso +LxnukQqlDKWRChmigSQhlakiv/P76zyf55y9n3P2Xt+1D91nn5OfoICAAHOB +gMD/r1N9jxtVE/NN3444BmyJXGfadkUu0qzzGIRdf9tXx1cBlG7xketMA/VL +DaZp/LUQvuG/N0KdebCD+2Z5CN8CxMdk03694cMGGjeGw98E72od9028qYf9 +LdpPEyt8wUp1uPf7m1fw8NE/wm9LQ+HXG8a58TcfQUx+10Kt/DhosLiW/zLv +J+Q9G5w1s8oAxXd3Bn2058CVvi458UY2SO31/G+xhRDOKWxOFDa8Cmn6VjWO +m4VxNPFZ++Vz16ArU+/+9xXL0KQzeJucdTEk5h9pEVwpjv5XLJ11npSCneEu +CWkVcVyY6xj9saMUhBudNmvoiGNKsaRQcn8pHO9X67E3E0dGlebqF7OlcEj5 +2WDGLnHMa/mQNaBbBkE8ub/q1eIYn3J6fF9qGWy8XKFtv00C3eKFjs9olINs +Rv+p9GxJLKsw8ZLtKge51TePzxRK4s644Jo/veUgXx9/xL1cEttj52hvP5YD +ZVzzgEaDJBr+bhFOHSkHNYdgr5ohSfx7u4b9dL4c1i6cM+5fK4UKt3urYtUq +4N8wmQGDJ1IY4meaMRJYARtEh/ouvJbC4NYSzsaQCnDKu9M1+1YKyzRV31eE +V8CW1u0tD79J4Yq0/2T8j1SAu/bVajdpaRycbWfkplTAnoE1qce8pLGy7urc +Jn4FnHS2NX01JY1zxysOV/yoAPnKF/KCC2Sw4/5n/tBUBZRKOk/ri8pgfoyP +ssKfCuh45VGeSpVBAw09/n4hPqhuDFPeaCODD+W/nv0kyYf69Tn/tF6UwZC3 +PPGhtXyYs5p88Zwji2Z5HMetwXxIKYwqnrOSxRw13UuToeT4fwQSdDbKIru3 +kJocwQeHpiVmZ/xk0VsaWojDfMiyoBEOZ2Xx7vzPxw1JfDBB+wtP38mi6txm +9t9rfAhl5no+PiaHXTrGg73dfLDjiU3YJ8lhKqEgVd7LB+XFhxJenJNDNSOe +/OH3fGht21Lx+rocWsb48JcN8kE3eKlQ3ws5FAU1yT/jfBgqjCj8Ib8SF/0w +fyn2DwHbpRxHFYiVaPKp0FZRh4C10TVHr9SuxIRf78R3ryFgycdVMvSHK7E9 +bUctoU/AnTIhUO9aibxTg3dYxgTI2N9J0ZtfiaNeJj6yQEDrUVXDdfby+JMn +2iy6gQDLb7+jgvrlUSIxUX8giIBImwytByPyqK7AUCsMJqA0V6dbckoeDzT+ +NtgRQoCcsxfzjrAC2nz/dqXtAAEjt5umhXQV0E2n71H8IQLSj6WEXTyogJF1 +7Ld6pwho7tFUHTmqgO/Rs7LyNAGzhg2vTRMVMJV1v8wwiYCdnycNBrIVUKiy +VEIzmQCWw7bvug0KOKFQmtWfQcBHafWgxmWKuLr7ujkvhwDZfXVKsrKKqFNb +kzXII8Ch2eX5Lpoivj/gT9PMI6AqKlF7+VpFdHhgeysvn4DT78aHXV0Uccrz +rnpAEQEGRTX+3/IU8fCS9SUcPgH+gptlzUsU8arcOwMrgoDL28YeZtxUxJzq +1B/2lQT8I0ZXZzUrYlSTD82hioDukPiB46OKmHSYaU+tJuAoZ6O3vIkS2uul +nxF/QICNx5UfDHMltJt65jhOWiz2a9xmByV8EPGo5Ek9OX/DicIULyWU0OVY +hDQScNuu+us/p5Rwn53GTNIjAo7sXRyjmq6EZ3U879o0E2B11lnMPFsJR7p+ +aQg8JqDt5ZheTIUSPv3S+N37CQHjLirhP7uUcN3Ugojvzwi4FRW8WHxACZuf +nos//ZyAw5fvZuqOKeGFrWcsqS8IWPp+a80uQQqq3bdoZbcQ8HpBgcPJpRRk +b3DmNZDOUvnRmy9DQe0/e1SsWwnQ8E8SeK9Fwaw2X2uzlwSMJXSlzhlScLNu +7vAt0pX/qasoAAXXT+es03pFgPnY/XVbNlFQ5mmxhuBrAkRWiL0JdacgdSu9 +wp90q/62gFR/CpY5aU43k/Y4MHn6WTQFo0Ve3j3cRoDaBXPF4RMUrIgcwNdt +/6+v5BuLUyio92D/CZV2Aojut6ZqWRQUNqhK2kc6alaz1Tyfgs5HxrfeIm1G +ifD2KiWfr/Ua+k1aGBt/xNymYI6bDbA6CDgX5yF95xkFzV1Oryshvb2guLCj +g4IGe4Om+0grP5phTLyn4B+b3rBlbwj4MrTusfhXCj7UotYxSJcvSXdbM0l+ +X2HMG3fSEdrvvzrMU/BqoUXdEdKmjjoxu0Wo6BB0NyKb9KLgKLEESSrOpZsI +3iL9LPVRToESFeMFF3o9I51OSOk3aFAxeXpfWi9pt3bv+vf6VAwRfJE1TJo+ +XbrpL5uKdKH9UT9JD8nNDihYUVFE84bBDOkylm04cwMVp7+/afy/w7efX7zV +jYpTq2wMJklzDvdnhu2gos6nzYdGSQvx9LTSgqjYkuCW/4H0kwcxNWUHqThU +V178knRK/xOH58fI9z9SmX6X9NZFcn3DSVQMFGpwLyBN0fDbJ3yBijYtLNFT +pD/Z8AXUc8n5i6OzA0iX7J5PtSimIv/qoLQl6dAkBxXvm1RMEu47oECaVXqx +8nAdFf32NN0bI9fb8s2LubFmKoa6Zmx5QNpRYKG15ysqnk9V8k4h7aLJTGnp +oaLuh+PvtpH2dQrqgk9UdP3n2ysV0kHRV5XLx6ioUHaUM0Tu98H8zj20GXL8 +QV+lItJW0fQjsYto+DeBsKWRfrq89qrJEhpGlYZe6CDra0P+luZxMRpqlat7 +nyK97XmiuLccDdNVJQMHyPoMpk5dNVtNw9HPv04Gk/U9SaQ0/1pDw91pph1L +SEfZrB6tMKSha9CXolwyDyf2exkrm9Iw/hBnsJHMT1bDk2bBjTRMeZfR9oHM +H9XFb7R6Mw0n7z7Y50U6f2RePNSNhuYWC7J6yLyWSRtt6/elYYhsDu8RmedG +/5zRhnAaJn1qzwwn8247y5Q4FE3D0/3iLV1kP3iR0mZsGEvDwxGWV5iku+6I +xOafouG1sOSl38h+MiYaJnHiMg3FF/62128i94MnxuDm0lBGRDkwkuw/M4ZF +2yYLaHjDx03/XgNZHx59+X5lNLyYLHedS/YruXIbhlU9DVPD6kKk6gjItuzf +9vchDa8Lu7aa3SPz0hUTW/WUhj6vNvTsuUuAjiDxWL2dhnOSqX9v1pD9wFlp +++IhGi4I+X1F+TYBe2e+xzYvo+OuzZr7PMrJeti/U2ZQgo6mbxoWmJWReR3u +LhaSo+OR26NN1FICCnoaOkyV6XiS9vLLy2IC+u6d075pTEfLSGar8DUC/j3B +7Mz1pGOg5mB2/WWyPv/eCKzbQcf13j9W7rpE9o9wZaHeXXTU8IrvF80iICFA +VFcujI5OLn47rS4QcN++N+5sAh3fHlzhnpxKng8SR9dEV9Cx0JWXG3KCAIHE +ycbMKjrmXX/wvC+OXG+h3W5VNXSstXHaYX2MgD2TTie+N9GRJyvfuewIuZ+d +qj3+3XT8L+DdsuCD5Pmb0xzvLKSMw/++3pi4m4Bfq1f06WxWxud/bntrORAw +lS1/dK2bMg4tlxjRsyNgYrmaKtNTGQ1MtDmGNuT+/WTuttyljEUSE4b6luR5 +WOM75RajjDcOadQu5JD5tb8lllCgjHqPWu9KribrbY8HfJxUxtLsu2l95P8D +p7iEd/68CubFfdqZepMPPbTinHWXVDAogG28mOBD1PmiKxM5KnjEwJoXVc6H +W0cLLzsVqSBTv93OrZgPBi68TLFaFfQM1VKf4/FBc1FGSvwHFbR8fdL1VSIf +ZDyjY8O1VfFXfXxvkycfvkvYeW2pV8WlQrccVy/gw0CS15aQxeo43fNq5+mV +FWD7LcL2k7EGij4X/lqiXg4jvsKhlUdW4T3ZutkzUqXk/7qs4Ml6TWxq5b0w +fFIMEs/Vz5Z/08KCb71CNVlFoJhQtsHYWBuVo2ed61nXIHM1c4Wkvw7WZjSW +lIkWwBN5M6OfqbroV+33IXo6D1iK9SlrOtbgDXal0coWHogJ5YV5H9NDVZ2A +68Wt2UA5SuW4qutj6Q5ipGfmIoioba9yeqSPoVt+0r7Engdd7sqyCHcDlJWr +TxA8kw4hfRINdgJrMbJ0IrT9egp8+5m02TZzLX4aNz87cTgJrNc8zLLVMcTA +zz1ZT2wT4N5P9p/pF4aYXLvK9pLVcQjSNuh+6WeELu92CsQvPArcsR1triLG +KP+yTWToezSsU5VbvyzPGB0exhGNMhGwKvb0wXoGAyNmZHzkFodCLbtgkQOL +gVsPssv7p0Jgw3RdWjuHgU/B+lz1YAgcDJosGTJj4MXd/aKJD0OgebvXBzEH +Bjo3igpWxYdAANPYbpsXAzmW65/pioRA0Y8PChMJDHyxR+HDUZn9oOXHrFPr +JuevytFozAuCZGXH33FvGTj9ucUv41QQTLzzMfrYx8DtwrvMw4OD4J5bUvGV +fgYiPaIiyDQInDa8uyA7ykCjqgFv/Z5AiGSfCBYRMEGKlfvwpGwgNIu/pI+q +maCaca0Q+8oe8LsXcLxyvwlS3w4E3u4JgLHA4Yh1YSbIoZ4nPjUGwEGlvXs6 +wk1wD/OEgFppAJw+tM9pJtoEl/Zci+uKDYByVjiNE2+CPc6ZM3IaATBbFVfb +kGWCrGCxqc/h/pBWdmXiVQM5H/PXk0iVnVDHa9vxXZqJnRcuPJcu9YX3DnTP +cDkmMgvmsx5e8gWBX4Guf+SZeLaPYRJ/yhfMNy52XERj4n+niRp9P194uIDF +WKnFRMnZwW4TJV945pMjYmbKxA1LDDTmk32gW3V3acpOJupQWjS0Yr1h4vr8 +9JpbTBw6KDn9TdwTBrdY8U7dYaJbStkB9SkP6Fx4xqa/honSTeUNId0eUOMl +f/H8fSbOK3Wec7jqAcfkjFhzj5nY3XY/UcjYA1Yk7D705C0Txba/vhji6Q7a +/u0CfoIsfFmW7DL5YBv4qhWLZK1nofXy6+9y610gqsljt/oGFj5n1B2bLnKB +FD+Jp3wnFrYd/P7BJ9UFagsik55uZeEH1fcZUV4uIKVus3zOm4Wac+YrSua3 +wkP1T1Je4SzUVlFIFzHfClqrqDT1HBZOiXpqmndshu9a6cb8cRbu8tGK9mRu +gs5nuE7yJwtr9A4o/FbfBPeDxjaFTbLw8svsvflSm+As33a/8W8WOtXihMa4 +E2ixBEqqhdj4S1DL/cs1J/CxDaQ3yLAxjGfzzF7eCdr8rZe2cdh4dXGuuPmS +jXA7/8+HyQQ2ShrbXjPVdARji7Bpu0Q2rr3ev814qSPc/DCylHeGjQdy25Wt +v60HPqWPYZfGxh+1SdnEzfVQknn/zJVLbBzQXWNWZbEeeEknmNalbDQdXsp2 +2uEAp8KWp2a+ZmPOIY+RnbfswM1SBdkUDtY62/INc61hrk1YrIHGQcO1HjFf +T1oDz2+sx06Fg9KeYUR1kDUMxt+JcFvFwTH7MbE8jjWEPP63LNKAg0v3SNil +dVnBacdDlNtWHMzOUjb6LGsF1S7ts4b7ONiQGVXTWWAJ7l+qn9Tu56B5TPW/ +4cmWIBDFy7QM42D19N1uzUhLsLq0x9A5koMcyZlTrxws4VXvgr2hcRyMo/mZ +r5q0gGEf3Z6KCxxcr5M21mZrAQqBJ+/o3udg+XDxrkpBczg7v9MosZ6D1MPN +7jBuBoJpVhWfG8nxT5sO9fSawXDVoiLeYw56rQwXsr5jBtUCxzMlXnOQvpFT ++iXYDNwyYiOmPnFwal5478Z+hMyaSKN7olwUH7CauXAdYKmja4W8GBe99+xv +ajgJEPveRCdiBRf5v5ySxPwBAhbNqOpJczHrQQBPQB2A8W+4VB6Fi44Lfko7 +F5hCx8eQnyf0ufhD3WZFXhEXpJfsrVi/lYutx1wytZvZkG8REzXuykXZ9Sxq +wTU2GMSctUjfzsWIVYI78CQbHMfL2zu9ubisY3V+nxUb4jsmf/nu5SKlpDOo +6hELZvKOmEcd5eL2shKBWy1M6Ganvy4s5qJoE9FOnWFAwIH8y7alXPzSpRPB +72HAVOlNv5FyLkbq3hz1rWOAhHLntH4VFxVuc/uVTzLAXlhJ8e590gllVcvk +GFDbVrjjdTsXp1dVx8aAMdiJ3dYJ7+Tiltm3Nd9UjaHT+vGUXA8Xj4+Lzx5e +YgwT1V8TPN5zcb5wUH6i3Qh0cvVufBnm4khE5QOjICOo7TYLTxrl4rgMSJ1x +NgI7MkNrxrkYp5iVJMA2gp0nD7wMm+TiG9dXsWxhI5i4H58lO0PevzHeJPjN +EI79vuBb/ZuLB457N3xqN4QVhkXa7nNcpD+bcx+oNYQrgdWT8/NcFB6sjPp7 +1RD+B5ga60c= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4Vd0XB3BRb6SUWYY7GCOEcN3JWobMeUsqlDnRQEKElFJSlLGSkkso +LxnukQqlDKWRChmigSQhlakiv/P76zyf55y9n3P2Xt+1D91nn5OfoICAAHOB +gMD/r1N9jxtVE/NN3444BmyJXGfadkUu0qzzGIRdf9tXx1cBlG7xketMA/VL +DaZp/LUQvuG/N0KdebCD+2Z5CN8CxMdk03694cMGGjeGw98E72od9028qYf9 +LdpPEyt8wUp1uPf7m1fw8NE/wm9LQ+HXG8a58TcfQUx+10Kt/DhosLiW/zLv +J+Q9G5w1s8oAxXd3Bn2058CVvi458UY2SO31/G+xhRDOKWxOFDa8Cmn6VjWO +m4VxNPFZ++Vz16ArU+/+9xXL0KQzeJucdTEk5h9pEVwpjv5XLJ11npSCneEu +CWkVcVyY6xj9saMUhBudNmvoiGNKsaRQcn8pHO9X67E3E0dGlebqF7OlcEj5 +2WDGLnHMa/mQNaBbBkE8ub/q1eIYn3J6fF9qGWy8XKFtv00C3eKFjs9olINs +Rv+p9GxJLKsw8ZLtKge51TePzxRK4s644Jo/veUgXx9/xL1cEttj52hvP5YD +ZVzzgEaDJBr+bhFOHSkHNYdgr5ohSfx7u4b9dL4c1i6cM+5fK4UKt3urYtUq +4N8wmQGDJ1IY4meaMRJYARtEh/ouvJbC4NYSzsaQCnDKu9M1+1YKyzRV31eE +V8CW1u0tD79J4Yq0/2T8j1SAu/bVajdpaRycbWfkplTAnoE1qce8pLGy7urc +Jn4FnHS2NX01JY1zxysOV/yoAPnKF/KCC2Sw4/5n/tBUBZRKOk/ri8pgfoyP +ssKfCuh45VGeSpVBAw09/n4hPqhuDFPeaCODD+W/nv0kyYf69Tn/tF6UwZC3 +PPGhtXyYs5p88Zwji2Z5HMetwXxIKYwqnrOSxRw13UuToeT4fwQSdDbKIru3 +kJocwQeHpiVmZ/xk0VsaWojDfMiyoBEOZ2Xx7vzPxw1JfDBB+wtP38mi6txm +9t9rfAhl5no+PiaHXTrGg73dfLDjiU3YJ8lhKqEgVd7LB+XFhxJenJNDNSOe +/OH3fGht21Lx+rocWsb48JcN8kE3eKlQ3ws5FAU1yT/jfBgqjCj8Ib8SF/0w +fyn2DwHbpRxHFYiVaPKp0FZRh4C10TVHr9SuxIRf78R3ryFgycdVMvSHK7E9 +bUctoU/AnTIhUO9aibxTg3dYxgTI2N9J0ZtfiaNeJj6yQEDrUVXDdfby+JMn +2iy6gQDLb7+jgvrlUSIxUX8giIBImwytByPyqK7AUCsMJqA0V6dbckoeDzT+ +NtgRQoCcsxfzjrAC2nz/dqXtAAEjt5umhXQV0E2n71H8IQLSj6WEXTyogJF1 +7Ld6pwho7tFUHTmqgO/Rs7LyNAGzhg2vTRMVMJV1v8wwiYCdnycNBrIVUKiy +VEIzmQCWw7bvug0KOKFQmtWfQcBHafWgxmWKuLr7ujkvhwDZfXVKsrKKqFNb +kzXII8Ch2eX5Lpoivj/gT9PMI6AqKlF7+VpFdHhgeysvn4DT78aHXV0Uccrz +rnpAEQEGRTX+3/IU8fCS9SUcPgH+gptlzUsU8arcOwMrgoDL28YeZtxUxJzq +1B/2lQT8I0ZXZzUrYlSTD82hioDukPiB46OKmHSYaU+tJuAoZ6O3vIkS2uul +nxF/QICNx5UfDHMltJt65jhOWiz2a9xmByV8EPGo5Ek9OX/DicIULyWU0OVY +hDQScNuu+us/p5Rwn53GTNIjAo7sXRyjmq6EZ3U879o0E2B11lnMPFsJR7p+ +aQg8JqDt5ZheTIUSPv3S+N37CQHjLirhP7uUcN3Ugojvzwi4FRW8WHxACZuf +nos//ZyAw5fvZuqOKeGFrWcsqS8IWPp+a80uQQqq3bdoZbcQ8HpBgcPJpRRk +b3DmNZDOUvnRmy9DQe0/e1SsWwnQ8E8SeK9Fwaw2X2uzlwSMJXSlzhlScLNu +7vAt0pX/qasoAAXXT+es03pFgPnY/XVbNlFQ5mmxhuBrAkRWiL0JdacgdSu9 +wp90q/62gFR/CpY5aU43k/Y4MHn6WTQFo0Ve3j3cRoDaBXPF4RMUrIgcwNdt +/6+v5BuLUyio92D/CZV2Aojut6ZqWRQUNqhK2kc6alaz1Tyfgs5HxrfeIm1G +ifD2KiWfr/Ua+k1aGBt/xNymYI6bDbA6CDgX5yF95xkFzV1Oryshvb2guLCj +g4IGe4Om+0grP5phTLyn4B+b3rBlbwj4MrTusfhXCj7UotYxSJcvSXdbM0l+ +X2HMG3fSEdrvvzrMU/BqoUXdEdKmjjoxu0Wo6BB0NyKb9KLgKLEESSrOpZsI +3iL9LPVRToESFeMFF3o9I51OSOk3aFAxeXpfWi9pt3bv+vf6VAwRfJE1TJo+ +XbrpL5uKdKH9UT9JD8nNDihYUVFE84bBDOkylm04cwMVp7+/afy/w7efX7zV +jYpTq2wMJklzDvdnhu2gos6nzYdGSQvx9LTSgqjYkuCW/4H0kwcxNWUHqThU +V178knRK/xOH58fI9z9SmX6X9NZFcn3DSVQMFGpwLyBN0fDbJ3yBijYtLNFT +pD/Z8AXUc8n5i6OzA0iX7J5PtSimIv/qoLQl6dAkBxXvm1RMEu47oECaVXqx +8nAdFf32NN0bI9fb8s2LubFmKoa6Zmx5QNpRYKG15ysqnk9V8k4h7aLJTGnp +oaLuh+PvtpH2dQrqgk9UdP3n2ysV0kHRV5XLx6ioUHaUM0Tu98H8zj20GXL8 +QV+lItJW0fQjsYto+DeBsKWRfrq89qrJEhpGlYZe6CDra0P+luZxMRpqlat7 +nyK97XmiuLccDdNVJQMHyPoMpk5dNVtNw9HPv04Gk/U9SaQ0/1pDw91pph1L +SEfZrB6tMKSha9CXolwyDyf2exkrm9Iw/hBnsJHMT1bDk2bBjTRMeZfR9oHM +H9XFb7R6Mw0n7z7Y50U6f2RePNSNhuYWC7J6yLyWSRtt6/elYYhsDu8RmedG +/5zRhnAaJn1qzwwn8247y5Q4FE3D0/3iLV1kP3iR0mZsGEvDwxGWV5iku+6I +xOafouG1sOSl38h+MiYaJnHiMg3FF/62128i94MnxuDm0lBGRDkwkuw/M4ZF +2yYLaHjDx03/XgNZHx59+X5lNLyYLHedS/YruXIbhlU9DVPD6kKk6gjItuzf +9vchDa8Lu7aa3SPz0hUTW/WUhj6vNvTsuUuAjiDxWL2dhnOSqX9v1pD9wFlp +++IhGi4I+X1F+TYBe2e+xzYvo+OuzZr7PMrJeti/U2ZQgo6mbxoWmJWReR3u +LhaSo+OR26NN1FICCnoaOkyV6XiS9vLLy2IC+u6d075pTEfLSGar8DUC/j3B +7Mz1pGOg5mB2/WWyPv/eCKzbQcf13j9W7rpE9o9wZaHeXXTU8IrvF80iICFA +VFcujI5OLn47rS4QcN++N+5sAh3fHlzhnpxKng8SR9dEV9Cx0JWXG3KCAIHE +ycbMKjrmXX/wvC+OXG+h3W5VNXSstXHaYX2MgD2TTie+N9GRJyvfuewIuZ+d +qj3+3XT8L+DdsuCD5Pmb0xzvLKSMw/++3pi4m4Bfq1f06WxWxud/bntrORAw +lS1/dK2bMg4tlxjRsyNgYrmaKtNTGQ1MtDmGNuT+/WTuttyljEUSE4b6luR5 +WOM75RajjDcOadQu5JD5tb8lllCgjHqPWu9KribrbY8HfJxUxtLsu2l95P8D +p7iEd/68CubFfdqZepMPPbTinHWXVDAogG28mOBD1PmiKxM5KnjEwJoXVc6H +W0cLLzsVqSBTv93OrZgPBi68TLFaFfQM1VKf4/FBc1FGSvwHFbR8fdL1VSIf +ZDyjY8O1VfFXfXxvkycfvkvYeW2pV8WlQrccVy/gw0CS15aQxeo43fNq5+mV +FWD7LcL2k7EGij4X/lqiXg4jvsKhlUdW4T3ZutkzUqXk/7qs4Ml6TWxq5b0w +fFIMEs/Vz5Z/08KCb71CNVlFoJhQtsHYWBuVo2ed61nXIHM1c4Wkvw7WZjSW +lIkWwBN5M6OfqbroV+33IXo6D1iK9SlrOtbgDXal0coWHogJ5YV5H9NDVZ2A +68Wt2UA5SuW4qutj6Q5ipGfmIoioba9yeqSPoVt+0r7Engdd7sqyCHcDlJWr +TxA8kw4hfRINdgJrMbJ0IrT9egp8+5m02TZzLX4aNz87cTgJrNc8zLLVMcTA +zz1ZT2wT4N5P9p/pF4aYXLvK9pLVcQjSNuh+6WeELu92CsQvPArcsR1triLG +KP+yTWToezSsU5VbvyzPGB0exhGNMhGwKvb0wXoGAyNmZHzkFodCLbtgkQOL +gVsPssv7p0Jgw3RdWjuHgU/B+lz1YAgcDJosGTJj4MXd/aKJD0OgebvXBzEH +Bjo3igpWxYdAANPYbpsXAzmW65/pioRA0Y8PChMJDHyxR+HDUZn9oOXHrFPr +JuevytFozAuCZGXH33FvGTj9ucUv41QQTLzzMfrYx8DtwrvMw4OD4J5bUvGV +fgYiPaIiyDQInDa8uyA7ykCjqgFv/Z5AiGSfCBYRMEGKlfvwpGwgNIu/pI+q +maCaca0Q+8oe8LsXcLxyvwlS3w4E3u4JgLHA4Yh1YSbIoZ4nPjUGwEGlvXs6 +wk1wD/OEgFppAJw+tM9pJtoEl/Zci+uKDYByVjiNE2+CPc6ZM3IaATBbFVfb +kGWCrGCxqc/h/pBWdmXiVQM5H/PXk0iVnVDHa9vxXZqJnRcuPJcu9YX3DnTP +cDkmMgvmsx5e8gWBX4Guf+SZeLaPYRJ/yhfMNy52XERj4n+niRp9P194uIDF +WKnFRMnZwW4TJV945pMjYmbKxA1LDDTmk32gW3V3acpOJupQWjS0Yr1h4vr8 +9JpbTBw6KDn9TdwTBrdY8U7dYaJbStkB9SkP6Fx4xqa/honSTeUNId0eUOMl +f/H8fSbOK3Wec7jqAcfkjFhzj5nY3XY/UcjYA1Yk7D705C0Txba/vhji6Q7a +/u0CfoIsfFmW7DL5YBv4qhWLZK1nofXy6+9y610gqsljt/oGFj5n1B2bLnKB +FD+Jp3wnFrYd/P7BJ9UFagsik55uZeEH1fcZUV4uIKVus3zOm4Wac+YrSua3 +wkP1T1Je4SzUVlFIFzHfClqrqDT1HBZOiXpqmndshu9a6cb8cRbu8tGK9mRu +gs5nuE7yJwtr9A4o/FbfBPeDxjaFTbLw8svsvflSm+As33a/8W8WOtXihMa4 +E2ixBEqqhdj4S1DL/cs1J/CxDaQ3yLAxjGfzzF7eCdr8rZe2cdh4dXGuuPmS +jXA7/8+HyQQ2ShrbXjPVdARji7Bpu0Q2rr3ev814qSPc/DCylHeGjQdy25Wt +v60HPqWPYZfGxh+1SdnEzfVQknn/zJVLbBzQXWNWZbEeeEknmNalbDQdXsp2 +2uEAp8KWp2a+ZmPOIY+RnbfswM1SBdkUDtY62/INc61hrk1YrIHGQcO1HjFf +T1oDz2+sx06Fg9KeYUR1kDUMxt+JcFvFwTH7MbE8jjWEPP63LNKAg0v3SNil +dVnBacdDlNtWHMzOUjb6LGsF1S7ts4b7ONiQGVXTWWAJ7l+qn9Tu56B5TPW/ +4cmWIBDFy7QM42D19N1uzUhLsLq0x9A5koMcyZlTrxws4VXvgr2hcRyMo/mZ +r5q0gGEf3Z6KCxxcr5M21mZrAQqBJ+/o3udg+XDxrkpBczg7v9MosZ6D1MPN +7jBuBoJpVhWfG8nxT5sO9fSawXDVoiLeYw56rQwXsr5jBtUCxzMlXnOQvpFT ++iXYDNwyYiOmPnFwal5478Z+hMyaSKN7olwUH7CauXAdYKmja4W8GBe99+xv +ajgJEPveRCdiBRf5v5ySxPwBAhbNqOpJczHrQQBPQB2A8W+4VB6Fi44Lfko7 +F5hCx8eQnyf0ufhD3WZFXhEXpJfsrVi/lYutx1wytZvZkG8REzXuykXZ9Sxq +wTU2GMSctUjfzsWIVYI78CQbHMfL2zu9ubisY3V+nxUb4jsmf/nu5SKlpDOo +6hELZvKOmEcd5eL2shKBWy1M6Ganvy4s5qJoE9FOnWFAwIH8y7alXPzSpRPB +72HAVOlNv5FyLkbq3hz1rWOAhHLntH4VFxVuc/uVTzLAXlhJ8e590gllVcvk +GFDbVrjjdTsXp1dVx8aAMdiJ3dYJ7+Tiltm3Nd9UjaHT+vGUXA8Xj4+Lzx5e +YgwT1V8TPN5zcb5wUH6i3Qh0cvVufBnm4khE5QOjICOo7TYLTxrl4rgMSJ1x +NgI7MkNrxrkYp5iVJMA2gp0nD7wMm+TiG9dXsWxhI5i4H58lO0PevzHeJPjN +EI79vuBb/ZuLB457N3xqN4QVhkXa7nNcpD+bcx+oNYQrgdWT8/NcFB6sjPp7 +1RD+B5ga60c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07751421743154895}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07751421743154895}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4Vd0XB3BRb6SUWYY7GCOEcN3JWobMeUsqlDnRQEKElFJSlLGSkkso +LxnukQqlDKWRChmigSQhlakiv/P76zyf55y9n3P2Xt+1D91nn5OfoICAAHOB +gMD/r1N9jxtVE/NN3444BmyJXGfadkUu0qzzGIRdf9tXx1cBlG7xketMA/VL +DaZp/LUQvuG/N0KdebCD+2Z5CN8CxMdk03694cMGGjeGw98E72od9028qYf9 +LdpPEyt8wUp1uPf7m1fw8NE/wm9LQ+HXG8a58TcfQUx+10Kt/DhosLiW/zLv +J+Q9G5w1s8oAxXd3Bn2058CVvi458UY2SO31/G+xhRDOKWxOFDa8Cmn6VjWO +m4VxNPFZ++Vz16ArU+/+9xXL0KQzeJucdTEk5h9pEVwpjv5XLJ11npSCneEu +CWkVcVyY6xj9saMUhBudNmvoiGNKsaRQcn8pHO9X67E3E0dGlebqF7OlcEj5 +2WDGLnHMa/mQNaBbBkE8ub/q1eIYn3J6fF9qGWy8XKFtv00C3eKFjs9olINs +Rv+p9GxJLKsw8ZLtKge51TePzxRK4s644Jo/veUgXx9/xL1cEttj52hvP5YD +ZVzzgEaDJBr+bhFOHSkHNYdgr5ohSfx7u4b9dL4c1i6cM+5fK4UKt3urYtUq +4N8wmQGDJ1IY4meaMRJYARtEh/ouvJbC4NYSzsaQCnDKu9M1+1YKyzRV31eE +V8CW1u0tD79J4Yq0/2T8j1SAu/bVajdpaRycbWfkplTAnoE1qce8pLGy7urc +Jn4FnHS2NX01JY1zxysOV/yoAPnKF/KCC2Sw4/5n/tBUBZRKOk/ri8pgfoyP +ssKfCuh45VGeSpVBAw09/n4hPqhuDFPeaCODD+W/nv0kyYf69Tn/tF6UwZC3 +PPGhtXyYs5p88Zwji2Z5HMetwXxIKYwqnrOSxRw13UuToeT4fwQSdDbKIru3 +kJocwQeHpiVmZ/xk0VsaWojDfMiyoBEOZ2Xx7vzPxw1JfDBB+wtP38mi6txm +9t9rfAhl5no+PiaHXTrGg73dfLDjiU3YJ8lhKqEgVd7LB+XFhxJenJNDNSOe +/OH3fGht21Lx+rocWsb48JcN8kE3eKlQ3ws5FAU1yT/jfBgqjCj8Ib8SF/0w +fyn2DwHbpRxHFYiVaPKp0FZRh4C10TVHr9SuxIRf78R3ryFgycdVMvSHK7E9 +bUctoU/AnTIhUO9aibxTg3dYxgTI2N9J0ZtfiaNeJj6yQEDrUVXDdfby+JMn +2iy6gQDLb7+jgvrlUSIxUX8giIBImwytByPyqK7AUCsMJqA0V6dbckoeDzT+ +NtgRQoCcsxfzjrAC2nz/dqXtAAEjt5umhXQV0E2n71H8IQLSj6WEXTyogJF1 +7Ld6pwho7tFUHTmqgO/Rs7LyNAGzhg2vTRMVMJV1v8wwiYCdnycNBrIVUKiy +VEIzmQCWw7bvug0KOKFQmtWfQcBHafWgxmWKuLr7ujkvhwDZfXVKsrKKqFNb +kzXII8Ch2eX5Lpoivj/gT9PMI6AqKlF7+VpFdHhgeysvn4DT78aHXV0Uccrz +rnpAEQEGRTX+3/IU8fCS9SUcPgH+gptlzUsU8arcOwMrgoDL28YeZtxUxJzq +1B/2lQT8I0ZXZzUrYlSTD82hioDukPiB46OKmHSYaU+tJuAoZ6O3vIkS2uul +nxF/QICNx5UfDHMltJt65jhOWiz2a9xmByV8EPGo5Ek9OX/DicIULyWU0OVY +hDQScNuu+us/p5Rwn53GTNIjAo7sXRyjmq6EZ3U879o0E2B11lnMPFsJR7p+ +aQg8JqDt5ZheTIUSPv3S+N37CQHjLirhP7uUcN3Ugojvzwi4FRW8WHxACZuf +nos//ZyAw5fvZuqOKeGFrWcsqS8IWPp+a80uQQqq3bdoZbcQ8HpBgcPJpRRk +b3DmNZDOUvnRmy9DQe0/e1SsWwnQ8E8SeK9Fwaw2X2uzlwSMJXSlzhlScLNu +7vAt0pX/qasoAAXXT+es03pFgPnY/XVbNlFQ5mmxhuBrAkRWiL0JdacgdSu9 +wp90q/62gFR/CpY5aU43k/Y4MHn6WTQFo0Ve3j3cRoDaBXPF4RMUrIgcwNdt +/6+v5BuLUyio92D/CZV2Aojut6ZqWRQUNqhK2kc6alaz1Tyfgs5HxrfeIm1G +ifD2KiWfr/Ua+k1aGBt/xNymYI6bDbA6CDgX5yF95xkFzV1Oryshvb2guLCj +g4IGe4Om+0grP5phTLyn4B+b3rBlbwj4MrTusfhXCj7UotYxSJcvSXdbM0l+ +X2HMG3fSEdrvvzrMU/BqoUXdEdKmjjoxu0Wo6BB0NyKb9KLgKLEESSrOpZsI +3iL9LPVRToESFeMFF3o9I51OSOk3aFAxeXpfWi9pt3bv+vf6VAwRfJE1TJo+ +XbrpL5uKdKH9UT9JD8nNDihYUVFE84bBDOkylm04cwMVp7+/afy/w7efX7zV +jYpTq2wMJklzDvdnhu2gos6nzYdGSQvx9LTSgqjYkuCW/4H0kwcxNWUHqThU +V178knRK/xOH58fI9z9SmX6X9NZFcn3DSVQMFGpwLyBN0fDbJ3yBijYtLNFT +pD/Z8AXUc8n5i6OzA0iX7J5PtSimIv/qoLQl6dAkBxXvm1RMEu47oECaVXqx +8nAdFf32NN0bI9fb8s2LubFmKoa6Zmx5QNpRYKG15ysqnk9V8k4h7aLJTGnp +oaLuh+PvtpH2dQrqgk9UdP3n2ysV0kHRV5XLx6ioUHaUM0Tu98H8zj20GXL8 +QV+lItJW0fQjsYto+DeBsKWRfrq89qrJEhpGlYZe6CDra0P+luZxMRpqlat7 +nyK97XmiuLccDdNVJQMHyPoMpk5dNVtNw9HPv04Gk/U9SaQ0/1pDw91pph1L +SEfZrB6tMKSha9CXolwyDyf2exkrm9Iw/hBnsJHMT1bDk2bBjTRMeZfR9oHM +H9XFb7R6Mw0n7z7Y50U6f2RePNSNhuYWC7J6yLyWSRtt6/elYYhsDu8RmedG +/5zRhnAaJn1qzwwn8247y5Q4FE3D0/3iLV1kP3iR0mZsGEvDwxGWV5iku+6I +xOafouG1sOSl38h+MiYaJnHiMg3FF/62128i94MnxuDm0lBGRDkwkuw/M4ZF +2yYLaHjDx03/XgNZHx59+X5lNLyYLHedS/YruXIbhlU9DVPD6kKk6gjItuzf +9vchDa8Lu7aa3SPz0hUTW/WUhj6vNvTsuUuAjiDxWL2dhnOSqX9v1pD9wFlp +++IhGi4I+X1F+TYBe2e+xzYvo+OuzZr7PMrJeti/U2ZQgo6mbxoWmJWReR3u +LhaSo+OR26NN1FICCnoaOkyV6XiS9vLLy2IC+u6d075pTEfLSGar8DUC/j3B +7Mz1pGOg5mB2/WWyPv/eCKzbQcf13j9W7rpE9o9wZaHeXXTU8IrvF80iICFA +VFcujI5OLn47rS4QcN++N+5sAh3fHlzhnpxKng8SR9dEV9Cx0JWXG3KCAIHE +ycbMKjrmXX/wvC+OXG+h3W5VNXSstXHaYX2MgD2TTie+N9GRJyvfuewIuZ+d +qj3+3XT8L+DdsuCD5Pmb0xzvLKSMw/++3pi4m4Bfq1f06WxWxud/bntrORAw +lS1/dK2bMg4tlxjRsyNgYrmaKtNTGQ1MtDmGNuT+/WTuttyljEUSE4b6luR5 +WOM75RajjDcOadQu5JD5tb8lllCgjHqPWu9KribrbY8HfJxUxtLsu2l95P8D +p7iEd/68CubFfdqZepMPPbTinHWXVDAogG28mOBD1PmiKxM5KnjEwJoXVc6H +W0cLLzsVqSBTv93OrZgPBi68TLFaFfQM1VKf4/FBc1FGSvwHFbR8fdL1VSIf +ZDyjY8O1VfFXfXxvkycfvkvYeW2pV8WlQrccVy/gw0CS15aQxeo43fNq5+mV +FWD7LcL2k7EGij4X/lqiXg4jvsKhlUdW4T3ZutkzUqXk/7qs4Ml6TWxq5b0w +fFIMEs/Vz5Z/08KCb71CNVlFoJhQtsHYWBuVo2ed61nXIHM1c4Wkvw7WZjSW +lIkWwBN5M6OfqbroV+33IXo6D1iK9SlrOtbgDXal0coWHogJ5YV5H9NDVZ2A +68Wt2UA5SuW4qutj6Q5ipGfmIoioba9yeqSPoVt+0r7Engdd7sqyCHcDlJWr +TxA8kw4hfRINdgJrMbJ0IrT9egp8+5m02TZzLX4aNz87cTgJrNc8zLLVMcTA +zz1ZT2wT4N5P9p/pF4aYXLvK9pLVcQjSNuh+6WeELu92CsQvPArcsR1triLG +KP+yTWToezSsU5VbvyzPGB0exhGNMhGwKvb0wXoGAyNmZHzkFodCLbtgkQOL +gVsPssv7p0Jgw3RdWjuHgU/B+lz1YAgcDJosGTJj4MXd/aKJD0OgebvXBzEH +Bjo3igpWxYdAANPYbpsXAzmW65/pioRA0Y8PChMJDHyxR+HDUZn9oOXHrFPr +JuevytFozAuCZGXH33FvGTj9ucUv41QQTLzzMfrYx8DtwrvMw4OD4J5bUvGV +fgYiPaIiyDQInDa8uyA7ykCjqgFv/Z5AiGSfCBYRMEGKlfvwpGwgNIu/pI+q +maCaca0Q+8oe8LsXcLxyvwlS3w4E3u4JgLHA4Yh1YSbIoZ4nPjUGwEGlvXs6 +wk1wD/OEgFppAJw+tM9pJtoEl/Zci+uKDYByVjiNE2+CPc6ZM3IaATBbFVfb +kGWCrGCxqc/h/pBWdmXiVQM5H/PXk0iVnVDHa9vxXZqJnRcuPJcu9YX3DnTP +cDkmMgvmsx5e8gWBX4Guf+SZeLaPYRJ/yhfMNy52XERj4n+niRp9P194uIDF +WKnFRMnZwW4TJV945pMjYmbKxA1LDDTmk32gW3V3acpOJupQWjS0Yr1h4vr8 +9JpbTBw6KDn9TdwTBrdY8U7dYaJbStkB9SkP6Fx4xqa/honSTeUNId0eUOMl +f/H8fSbOK3Wec7jqAcfkjFhzj5nY3XY/UcjYA1Yk7D705C0Txba/vhji6Q7a +/u0CfoIsfFmW7DL5YBv4qhWLZK1nofXy6+9y610gqsljt/oGFj5n1B2bLnKB +FD+Jp3wnFrYd/P7BJ9UFagsik55uZeEH1fcZUV4uIKVus3zOm4Wac+YrSua3 +wkP1T1Je4SzUVlFIFzHfClqrqDT1HBZOiXpqmndshu9a6cb8cRbu8tGK9mRu +gs5nuE7yJwtr9A4o/FbfBPeDxjaFTbLw8svsvflSm+As33a/8W8WOtXihMa4 +E2ixBEqqhdj4S1DL/cs1J/CxDaQ3yLAxjGfzzF7eCdr8rZe2cdh4dXGuuPmS +jXA7/8+HyQQ2ShrbXjPVdARji7Bpu0Q2rr3ev814qSPc/DCylHeGjQdy25Wt +v60HPqWPYZfGxh+1SdnEzfVQknn/zJVLbBzQXWNWZbEeeEknmNalbDQdXsp2 +2uEAp8KWp2a+ZmPOIY+RnbfswM1SBdkUDtY62/INc61hrk1YrIHGQcO1HjFf +T1oDz2+sx06Fg9KeYUR1kDUMxt+JcFvFwTH7MbE8jjWEPP63LNKAg0v3SNil +dVnBacdDlNtWHMzOUjb6LGsF1S7ts4b7ONiQGVXTWWAJ7l+qn9Tu56B5TPW/ +4cmWIBDFy7QM42D19N1uzUhLsLq0x9A5koMcyZlTrxws4VXvgr2hcRyMo/mZ +r5q0gGEf3Z6KCxxcr5M21mZrAQqBJ+/o3udg+XDxrkpBczg7v9MosZ6D1MPN +7jBuBoJpVhWfG8nxT5sO9fSawXDVoiLeYw56rQwXsr5jBtUCxzMlXnOQvpFT ++iXYDNwyYiOmPnFwal5478Z+hMyaSKN7olwUH7CauXAdYKmja4W8GBe99+xv +ajgJEPveRCdiBRf5v5ySxPwBAhbNqOpJczHrQQBPQB2A8W+4VB6Fi44Lfko7 +F5hCx8eQnyf0ufhD3WZFXhEXpJfsrVi/lYutx1wytZvZkG8REzXuykXZ9Sxq +wTU2GMSctUjfzsWIVYI78CQbHMfL2zu9ubisY3V+nxUb4jsmf/nu5SKlpDOo +6hELZvKOmEcd5eL2shKBWy1M6Ganvy4s5qJoE9FOnWFAwIH8y7alXPzSpRPB +72HAVOlNv5FyLkbq3hz1rWOAhHLntH4VFxVuc/uVTzLAXlhJ8e590gllVcvk +GFDbVrjjdTsXp1dVx8aAMdiJ3dYJ7+Tiltm3Nd9UjaHT+vGUXA8Xj4+Lzx5e +YgwT1V8TPN5zcb5wUH6i3Qh0cvVufBnm4khE5QOjICOo7TYLTxrl4rgMSJ1x +NgI7MkNrxrkYp5iVJMA2gp0nD7wMm+TiG9dXsWxhI5i4H58lO0PevzHeJPjN +EI79vuBb/ZuLB457N3xqN4QVhkXa7nNcpD+bcx+oNYQrgdWT8/NcFB6sjPp7 +1RD+B5ga60c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07751421743154895}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07751421743154895}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350918506679*^9, 3.994354018036458*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"2dd28a04-a7d5-4d87-bf34-942440f84752"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7078,15 +7164,843 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003297"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994084942821766*^9},ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-\ -5e6c7b4b5678"], + 3.994084942821766*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061275}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435091874876*^9, 3.994354018268429*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"6874d945-9957-4f3f-b35c-396e0a93b435"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"cd9a8165-891b-9245-aca1-\ -3f60fcfd9a79"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4Vd0XB3BRb6SUWYY7GCOEcN3JWobMeUsqlDnRQEKElFJSlLGSkkso +LxnukQqlDKWRChmigSQhlakiv/P76zyf55y9n3P2Xt+1D91nn5OfoICAAHOB +gMD/r1N9jxtVE/NN3444BmyJXGfadkUu0qzzGIRdf9tXx1cBlG7xketMA/VL +DaZp/LUQvuG/N0KdebCD+2Z5CN8CxMdk03694cMGGjeGw98E72od9028qYf9 +LdpPEyt8wUp1uPf7m1fw8NE/wm9LQ+HXG8a58TcfQUx+10Kt/DhosLiW/zLv +J+Q9G5w1s8oAxXd3Bn2058CVvi458UY2SO31/G+xhRDOKWxOFDa8Cmn6VjWO +m4VxNPFZ++Vz16ArU+/+9xXL0KQzeJucdTEk5h9pEVwpjv5XLJ11npSCneEu +CWkVcVyY6xj9saMUhBudNmvoiGNKsaRQcn8pHO9X67E3E0dGlebqF7OlcEj5 +2WDGLnHMa/mQNaBbBkE8ub/q1eIYn3J6fF9qGWy8XKFtv00C3eKFjs9olINs +Rv+p9GxJLKsw8ZLtKge51TePzxRK4s644Jo/veUgXx9/xL1cEttj52hvP5YD +ZVzzgEaDJBr+bhFOHSkHNYdgr5ohSfx7u4b9dL4c1i6cM+5fK4UKt3urYtUq +4N8wmQGDJ1IY4meaMRJYARtEh/ouvJbC4NYSzsaQCnDKu9M1+1YKyzRV31eE +V8CW1u0tD79J4Yq0/2T8j1SAu/bVajdpaRycbWfkplTAnoE1qce8pLGy7urc +Jn4FnHS2NX01JY1zxysOV/yoAPnKF/KCC2Sw4/5n/tBUBZRKOk/ri8pgfoyP +ssKfCuh45VGeSpVBAw09/n4hPqhuDFPeaCODD+W/nv0kyYf69Tn/tF6UwZC3 +PPGhtXyYs5p88Zwji2Z5HMetwXxIKYwqnrOSxRw13UuToeT4fwQSdDbKIru3 +kJocwQeHpiVmZ/xk0VsaWojDfMiyoBEOZ2Xx7vzPxw1JfDBB+wtP38mi6txm +9t9rfAhl5no+PiaHXTrGg73dfLDjiU3YJ8lhKqEgVd7LB+XFhxJenJNDNSOe +/OH3fGht21Lx+rocWsb48JcN8kE3eKlQ3ws5FAU1yT/jfBgqjCj8Ib8SF/0w +fyn2DwHbpRxHFYiVaPKp0FZRh4C10TVHr9SuxIRf78R3ryFgycdVMvSHK7E9 +bUctoU/AnTIhUO9aibxTg3dYxgTI2N9J0ZtfiaNeJj6yQEDrUVXDdfby+JMn +2iy6gQDLb7+jgvrlUSIxUX8giIBImwytByPyqK7AUCsMJqA0V6dbckoeDzT+ +NtgRQoCcsxfzjrAC2nz/dqXtAAEjt5umhXQV0E2n71H8IQLSj6WEXTyogJF1 +7Ld6pwho7tFUHTmqgO/Rs7LyNAGzhg2vTRMVMJV1v8wwiYCdnycNBrIVUKiy +VEIzmQCWw7bvug0KOKFQmtWfQcBHafWgxmWKuLr7ujkvhwDZfXVKsrKKqFNb +kzXII8Ch2eX5Lpoivj/gT9PMI6AqKlF7+VpFdHhgeysvn4DT78aHXV0Uccrz +rnpAEQEGRTX+3/IU8fCS9SUcPgH+gptlzUsU8arcOwMrgoDL28YeZtxUxJzq +1B/2lQT8I0ZXZzUrYlSTD82hioDukPiB46OKmHSYaU+tJuAoZ6O3vIkS2uul +nxF/QICNx5UfDHMltJt65jhOWiz2a9xmByV8EPGo5Ek9OX/DicIULyWU0OVY +hDQScNuu+us/p5Rwn53GTNIjAo7sXRyjmq6EZ3U879o0E2B11lnMPFsJR7p+ +aQg8JqDt5ZheTIUSPv3S+N37CQHjLirhP7uUcN3Ugojvzwi4FRW8WHxACZuf +nos//ZyAw5fvZuqOKeGFrWcsqS8IWPp+a80uQQqq3bdoZbcQ8HpBgcPJpRRk +b3DmNZDOUvnRmy9DQe0/e1SsWwnQ8E8SeK9Fwaw2X2uzlwSMJXSlzhlScLNu +7vAt0pX/qasoAAXXT+es03pFgPnY/XVbNlFQ5mmxhuBrAkRWiL0JdacgdSu9 +wp90q/62gFR/CpY5aU43k/Y4MHn6WTQFo0Ve3j3cRoDaBXPF4RMUrIgcwNdt +/6+v5BuLUyio92D/CZV2Aojut6ZqWRQUNqhK2kc6alaz1Tyfgs5HxrfeIm1G +ifD2KiWfr/Ua+k1aGBt/xNymYI6bDbA6CDgX5yF95xkFzV1Oryshvb2guLCj +g4IGe4Om+0grP5phTLyn4B+b3rBlbwj4MrTusfhXCj7UotYxSJcvSXdbM0l+ +X2HMG3fSEdrvvzrMU/BqoUXdEdKmjjoxu0Wo6BB0NyKb9KLgKLEESSrOpZsI +3iL9LPVRToESFeMFF3o9I51OSOk3aFAxeXpfWi9pt3bv+vf6VAwRfJE1TJo+ +XbrpL5uKdKH9UT9JD8nNDihYUVFE84bBDOkylm04cwMVp7+/afy/w7efX7zV +jYpTq2wMJklzDvdnhu2gos6nzYdGSQvx9LTSgqjYkuCW/4H0kwcxNWUHqThU +V178knRK/xOH58fI9z9SmX6X9NZFcn3DSVQMFGpwLyBN0fDbJ3yBijYtLNFT +pD/Z8AXUc8n5i6OzA0iX7J5PtSimIv/qoLQl6dAkBxXvm1RMEu47oECaVXqx +8nAdFf32NN0bI9fb8s2LubFmKoa6Zmx5QNpRYKG15ysqnk9V8k4h7aLJTGnp +oaLuh+PvtpH2dQrqgk9UdP3n2ysV0kHRV5XLx6ioUHaUM0Tu98H8zj20GXL8 +QV+lItJW0fQjsYto+DeBsKWRfrq89qrJEhpGlYZe6CDra0P+luZxMRpqlat7 +nyK97XmiuLccDdNVJQMHyPoMpk5dNVtNw9HPv04Gk/U9SaQ0/1pDw91pph1L +SEfZrB6tMKSha9CXolwyDyf2exkrm9Iw/hBnsJHMT1bDk2bBjTRMeZfR9oHM +H9XFb7R6Mw0n7z7Y50U6f2RePNSNhuYWC7J6yLyWSRtt6/elYYhsDu8RmedG +/5zRhnAaJn1qzwwn8247y5Q4FE3D0/3iLV1kP3iR0mZsGEvDwxGWV5iku+6I +xOafouG1sOSl38h+MiYaJnHiMg3FF/62128i94MnxuDm0lBGRDkwkuw/M4ZF +2yYLaHjDx03/XgNZHx59+X5lNLyYLHedS/YruXIbhlU9DVPD6kKk6gjItuzf +9vchDa8Lu7aa3SPz0hUTW/WUhj6vNvTsuUuAjiDxWL2dhnOSqX9v1pD9wFlp +++IhGi4I+X1F+TYBe2e+xzYvo+OuzZr7PMrJeti/U2ZQgo6mbxoWmJWReR3u +LhaSo+OR26NN1FICCnoaOkyV6XiS9vLLy2IC+u6d075pTEfLSGar8DUC/j3B +7Mz1pGOg5mB2/WWyPv/eCKzbQcf13j9W7rpE9o9wZaHeXXTU8IrvF80iICFA +VFcujI5OLn47rS4QcN++N+5sAh3fHlzhnpxKng8SR9dEV9Cx0JWXG3KCAIHE +ycbMKjrmXX/wvC+OXG+h3W5VNXSstXHaYX2MgD2TTie+N9GRJyvfuewIuZ+d +qj3+3XT8L+DdsuCD5Pmb0xzvLKSMw/++3pi4m4Bfq1f06WxWxud/bntrORAw +lS1/dK2bMg4tlxjRsyNgYrmaKtNTGQ1MtDmGNuT+/WTuttyljEUSE4b6luR5 +WOM75RajjDcOadQu5JD5tb8lllCgjHqPWu9KribrbY8HfJxUxtLsu2l95P8D +p7iEd/68CubFfdqZepMPPbTinHWXVDAogG28mOBD1PmiKxM5KnjEwJoXVc6H +W0cLLzsVqSBTv93OrZgPBi68TLFaFfQM1VKf4/FBc1FGSvwHFbR8fdL1VSIf +ZDyjY8O1VfFXfXxvkycfvkvYeW2pV8WlQrccVy/gw0CS15aQxeo43fNq5+mV +FWD7LcL2k7EGij4X/lqiXg4jvsKhlUdW4T3ZutkzUqXk/7qs4Ml6TWxq5b0w +fFIMEs/Vz5Z/08KCb71CNVlFoJhQtsHYWBuVo2ed61nXIHM1c4Wkvw7WZjSW +lIkWwBN5M6OfqbroV+33IXo6D1iK9SlrOtbgDXal0coWHogJ5YV5H9NDVZ2A +68Wt2UA5SuW4qutj6Q5ipGfmIoioba9yeqSPoVt+0r7Engdd7sqyCHcDlJWr +TxA8kw4hfRINdgJrMbJ0IrT9egp8+5m02TZzLX4aNz87cTgJrNc8zLLVMcTA +zz1ZT2wT4N5P9p/pF4aYXLvK9pLVcQjSNuh+6WeELu92CsQvPArcsR1triLG +KP+yTWToezSsU5VbvyzPGB0exhGNMhGwKvb0wXoGAyNmZHzkFodCLbtgkQOL +gVsPssv7p0Jgw3RdWjuHgU/B+lz1YAgcDJosGTJj4MXd/aKJD0OgebvXBzEH +Bjo3igpWxYdAANPYbpsXAzmW65/pioRA0Y8PChMJDHyxR+HDUZn9oOXHrFPr +JuevytFozAuCZGXH33FvGTj9ucUv41QQTLzzMfrYx8DtwrvMw4OD4J5bUvGV +fgYiPaIiyDQInDa8uyA7ykCjqgFv/Z5AiGSfCBYRMEGKlfvwpGwgNIu/pI+q +maCaca0Q+8oe8LsXcLxyvwlS3w4E3u4JgLHA4Yh1YSbIoZ4nPjUGwEGlvXs6 +wk1wD/OEgFppAJw+tM9pJtoEl/Zci+uKDYByVjiNE2+CPc6ZM3IaATBbFVfb +kGWCrGCxqc/h/pBWdmXiVQM5H/PXk0iVnVDHa9vxXZqJnRcuPJcu9YX3DnTP +cDkmMgvmsx5e8gWBX4Guf+SZeLaPYRJ/yhfMNy52XERj4n+niRp9P194uIDF +WKnFRMnZwW4TJV945pMjYmbKxA1LDDTmk32gW3V3acpOJupQWjS0Yr1h4vr8 +9JpbTBw6KDn9TdwTBrdY8U7dYaJbStkB9SkP6Fx4xqa/honSTeUNId0eUOMl +f/H8fSbOK3Wec7jqAcfkjFhzj5nY3XY/UcjYA1Yk7D705C0Txba/vhji6Q7a +/u0CfoIsfFmW7DL5YBv4qhWLZK1nofXy6+9y610gqsljt/oGFj5n1B2bLnKB +FD+Jp3wnFrYd/P7BJ9UFagsik55uZeEH1fcZUV4uIKVus3zOm4Wac+YrSua3 +wkP1T1Je4SzUVlFIFzHfClqrqDT1HBZOiXpqmndshu9a6cb8cRbu8tGK9mRu +gs5nuE7yJwtr9A4o/FbfBPeDxjaFTbLw8svsvflSm+As33a/8W8WOtXihMa4 +E2ixBEqqhdj4S1DL/cs1J/CxDaQ3yLAxjGfzzF7eCdr8rZe2cdh4dXGuuPmS +jXA7/8+HyQQ2ShrbXjPVdARji7Bpu0Q2rr3ev814qSPc/DCylHeGjQdy25Wt +v60HPqWPYZfGxh+1SdnEzfVQknn/zJVLbBzQXWNWZbEeeEknmNalbDQdXsp2 +2uEAp8KWp2a+ZmPOIY+RnbfswM1SBdkUDtY62/INc61hrk1YrIHGQcO1HjFf +T1oDz2+sx06Fg9KeYUR1kDUMxt+JcFvFwTH7MbE8jjWEPP63LNKAg0v3SNil +dVnBacdDlNtWHMzOUjb6LGsF1S7ts4b7ONiQGVXTWWAJ7l+qn9Tu56B5TPW/ +4cmWIBDFy7QM42D19N1uzUhLsLq0x9A5koMcyZlTrxws4VXvgr2hcRyMo/mZ +r5q0gGEf3Z6KCxxcr5M21mZrAQqBJ+/o3udg+XDxrkpBczg7v9MosZ6D1MPN +7jBuBoJpVhWfG8nxT5sO9fSawXDVoiLeYw56rQwXsr5jBtUCxzMlXnOQvpFT ++iXYDNwyYiOmPnFwal5478Z+hMyaSKN7olwUH7CauXAdYKmja4W8GBe99+xv +ajgJEPveRCdiBRf5v5ySxPwBAhbNqOpJczHrQQBPQB2A8W+4VB6Fi44Lfko7 +F5hCx8eQnyf0ufhD3WZFXhEXpJfsrVi/lYutx1wytZvZkG8REzXuykXZ9Sxq +wTU2GMSctUjfzsWIVYI78CQbHMfL2zu9ubisY3V+nxUb4jsmf/nu5SKlpDOo +6hELZvKOmEcd5eL2shKBWy1M6Ganvy4s5qJoE9FOnWFAwIH8y7alXPzSpRPB +72HAVOlNv5FyLkbq3hz1rWOAhHLntH4VFxVuc/uVTzLAXlhJ8e590gllVcvk +GFDbVrjjdTsXp1dVx8aAMdiJ3dYJ7+Tiltm3Nd9UjaHT+vGUXA8Xj4+Lzx5e +YgwT1V8TPN5zcb5wUH6i3Qh0cvVufBnm4khE5QOjICOo7TYLTxrl4rgMSJ1x +NgI7MkNrxrkYp5iVJMA2gp0nD7wMm+TiG9dXsWxhI5i4H58lO0PevzHeJPjN +EI79vuBb/ZuLB457N3xqN4QVhkXa7nNcpD+bcx+oNYQrgdWT8/NcFB6sjPp7 +1RD+B5ga60c= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4Vd0XB3BRb6SUWYY7GCOEcN3JWobMeUsqlDnRQEKElFJSlLGSkkso +LxnukQqlDKWRChmigSQhlakiv/P76zyf55y9n3P2Xt+1D91nn5OfoICAAHOB +gMD/r1N9jxtVE/NN3444BmyJXGfadkUu0qzzGIRdf9tXx1cBlG7xketMA/VL +DaZp/LUQvuG/N0KdebCD+2Z5CN8CxMdk03694cMGGjeGw98E72od9028qYf9 +LdpPEyt8wUp1uPf7m1fw8NE/wm9LQ+HXG8a58TcfQUx+10Kt/DhosLiW/zLv +J+Q9G5w1s8oAxXd3Bn2058CVvi458UY2SO31/G+xhRDOKWxOFDa8Cmn6VjWO +m4VxNPFZ++Vz16ArU+/+9xXL0KQzeJucdTEk5h9pEVwpjv5XLJ11npSCneEu +CWkVcVyY6xj9saMUhBudNmvoiGNKsaRQcn8pHO9X67E3E0dGlebqF7OlcEj5 +2WDGLnHMa/mQNaBbBkE8ub/q1eIYn3J6fF9qGWy8XKFtv00C3eKFjs9olINs +Rv+p9GxJLKsw8ZLtKge51TePzxRK4s644Jo/veUgXx9/xL1cEttj52hvP5YD +ZVzzgEaDJBr+bhFOHSkHNYdgr5ohSfx7u4b9dL4c1i6cM+5fK4UKt3urYtUq +4N8wmQGDJ1IY4meaMRJYARtEh/ouvJbC4NYSzsaQCnDKu9M1+1YKyzRV31eE +V8CW1u0tD79J4Yq0/2T8j1SAu/bVajdpaRycbWfkplTAnoE1qce8pLGy7urc +Jn4FnHS2NX01JY1zxysOV/yoAPnKF/KCC2Sw4/5n/tBUBZRKOk/ri8pgfoyP +ssKfCuh45VGeSpVBAw09/n4hPqhuDFPeaCODD+W/nv0kyYf69Tn/tF6UwZC3 +PPGhtXyYs5p88Zwji2Z5HMetwXxIKYwqnrOSxRw13UuToeT4fwQSdDbKIru3 +kJocwQeHpiVmZ/xk0VsaWojDfMiyoBEOZ2Xx7vzPxw1JfDBB+wtP38mi6txm +9t9rfAhl5no+PiaHXTrGg73dfLDjiU3YJ8lhKqEgVd7LB+XFhxJenJNDNSOe +/OH3fGht21Lx+rocWsb48JcN8kE3eKlQ3ws5FAU1yT/jfBgqjCj8Ib8SF/0w +fyn2DwHbpRxHFYiVaPKp0FZRh4C10TVHr9SuxIRf78R3ryFgycdVMvSHK7E9 +bUctoU/AnTIhUO9aibxTg3dYxgTI2N9J0ZtfiaNeJj6yQEDrUVXDdfby+JMn +2iy6gQDLb7+jgvrlUSIxUX8giIBImwytByPyqK7AUCsMJqA0V6dbckoeDzT+ +NtgRQoCcsxfzjrAC2nz/dqXtAAEjt5umhXQV0E2n71H8IQLSj6WEXTyogJF1 +7Ld6pwho7tFUHTmqgO/Rs7LyNAGzhg2vTRMVMJV1v8wwiYCdnycNBrIVUKiy +VEIzmQCWw7bvug0KOKFQmtWfQcBHafWgxmWKuLr7ujkvhwDZfXVKsrKKqFNb +kzXII8Ch2eX5Lpoivj/gT9PMI6AqKlF7+VpFdHhgeysvn4DT78aHXV0Uccrz +rnpAEQEGRTX+3/IU8fCS9SUcPgH+gptlzUsU8arcOwMrgoDL28YeZtxUxJzq +1B/2lQT8I0ZXZzUrYlSTD82hioDukPiB46OKmHSYaU+tJuAoZ6O3vIkS2uul +nxF/QICNx5UfDHMltJt65jhOWiz2a9xmByV8EPGo5Ek9OX/DicIULyWU0OVY +hDQScNuu+us/p5Rwn53GTNIjAo7sXRyjmq6EZ3U879o0E2B11lnMPFsJR7p+ +aQg8JqDt5ZheTIUSPv3S+N37CQHjLirhP7uUcN3Ugojvzwi4FRW8WHxACZuf +nos//ZyAw5fvZuqOKeGFrWcsqS8IWPp+a80uQQqq3bdoZbcQ8HpBgcPJpRRk +b3DmNZDOUvnRmy9DQe0/e1SsWwnQ8E8SeK9Fwaw2X2uzlwSMJXSlzhlScLNu +7vAt0pX/qasoAAXXT+es03pFgPnY/XVbNlFQ5mmxhuBrAkRWiL0JdacgdSu9 +wp90q/62gFR/CpY5aU43k/Y4MHn6WTQFo0Ve3j3cRoDaBXPF4RMUrIgcwNdt +/6+v5BuLUyio92D/CZV2Aojut6ZqWRQUNqhK2kc6alaz1Tyfgs5HxrfeIm1G +ifD2KiWfr/Ua+k1aGBt/xNymYI6bDbA6CDgX5yF95xkFzV1Oryshvb2guLCj +g4IGe4Om+0grP5phTLyn4B+b3rBlbwj4MrTusfhXCj7UotYxSJcvSXdbM0l+ +X2HMG3fSEdrvvzrMU/BqoUXdEdKmjjoxu0Wo6BB0NyKb9KLgKLEESSrOpZsI +3iL9LPVRToESFeMFF3o9I51OSOk3aFAxeXpfWi9pt3bv+vf6VAwRfJE1TJo+ +XbrpL5uKdKH9UT9JD8nNDihYUVFE84bBDOkylm04cwMVp7+/afy/w7efX7zV +jYpTq2wMJklzDvdnhu2gos6nzYdGSQvx9LTSgqjYkuCW/4H0kwcxNWUHqThU +V178knRK/xOH58fI9z9SmX6X9NZFcn3DSVQMFGpwLyBN0fDbJ3yBijYtLNFT +pD/Z8AXUc8n5i6OzA0iX7J5PtSimIv/qoLQl6dAkBxXvm1RMEu47oECaVXqx +8nAdFf32NN0bI9fb8s2LubFmKoa6Zmx5QNpRYKG15ysqnk9V8k4h7aLJTGnp +oaLuh+PvtpH2dQrqgk9UdP3n2ysV0kHRV5XLx6ioUHaUM0Tu98H8zj20GXL8 +QV+lItJW0fQjsYto+DeBsKWRfrq89qrJEhpGlYZe6CDra0P+luZxMRpqlat7 +nyK97XmiuLccDdNVJQMHyPoMpk5dNVtNw9HPv04Gk/U9SaQ0/1pDw91pph1L +SEfZrB6tMKSha9CXolwyDyf2exkrm9Iw/hBnsJHMT1bDk2bBjTRMeZfR9oHM +H9XFb7R6Mw0n7z7Y50U6f2RePNSNhuYWC7J6yLyWSRtt6/elYYhsDu8RmedG +/5zRhnAaJn1qzwwn8247y5Q4FE3D0/3iLV1kP3iR0mZsGEvDwxGWV5iku+6I +xOafouG1sOSl38h+MiYaJnHiMg3FF/62128i94MnxuDm0lBGRDkwkuw/M4ZF +2yYLaHjDx03/XgNZHx59+X5lNLyYLHedS/YruXIbhlU9DVPD6kKk6gjItuzf +9vchDa8Lu7aa3SPz0hUTW/WUhj6vNvTsuUuAjiDxWL2dhnOSqX9v1pD9wFlp +++IhGi4I+X1F+TYBe2e+xzYvo+OuzZr7PMrJeti/U2ZQgo6mbxoWmJWReR3u +LhaSo+OR26NN1FICCnoaOkyV6XiS9vLLy2IC+u6d075pTEfLSGar8DUC/j3B +7Mz1pGOg5mB2/WWyPv/eCKzbQcf13j9W7rpE9o9wZaHeXXTU8IrvF80iICFA +VFcujI5OLn47rS4QcN++N+5sAh3fHlzhnpxKng8SR9dEV9Cx0JWXG3KCAIHE +ycbMKjrmXX/wvC+OXG+h3W5VNXSstXHaYX2MgD2TTie+N9GRJyvfuewIuZ+d +qj3+3XT8L+DdsuCD5Pmb0xzvLKSMw/++3pi4m4Bfq1f06WxWxud/bntrORAw +lS1/dK2bMg4tlxjRsyNgYrmaKtNTGQ1MtDmGNuT+/WTuttyljEUSE4b6luR5 +WOM75RajjDcOadQu5JD5tb8lllCgjHqPWu9KribrbY8HfJxUxtLsu2l95P8D +p7iEd/68CubFfdqZepMPPbTinHWXVDAogG28mOBD1PmiKxM5KnjEwJoXVc6H +W0cLLzsVqSBTv93OrZgPBi68TLFaFfQM1VKf4/FBc1FGSvwHFbR8fdL1VSIf +ZDyjY8O1VfFXfXxvkycfvkvYeW2pV8WlQrccVy/gw0CS15aQxeo43fNq5+mV +FWD7LcL2k7EGij4X/lqiXg4jvsKhlUdW4T3ZutkzUqXk/7qs4Ml6TWxq5b0w +fFIMEs/Vz5Z/08KCb71CNVlFoJhQtsHYWBuVo2ed61nXIHM1c4Wkvw7WZjSW +lIkWwBN5M6OfqbroV+33IXo6D1iK9SlrOtbgDXal0coWHogJ5YV5H9NDVZ2A +68Wt2UA5SuW4qutj6Q5ipGfmIoioba9yeqSPoVt+0r7Engdd7sqyCHcDlJWr +TxA8kw4hfRINdgJrMbJ0IrT9egp8+5m02TZzLX4aNz87cTgJrNc8zLLVMcTA +zz1ZT2wT4N5P9p/pF4aYXLvK9pLVcQjSNuh+6WeELu92CsQvPArcsR1triLG +KP+yTWToezSsU5VbvyzPGB0exhGNMhGwKvb0wXoGAyNmZHzkFodCLbtgkQOL +gVsPssv7p0Jgw3RdWjuHgU/B+lz1YAgcDJosGTJj4MXd/aKJD0OgebvXBzEH +Bjo3igpWxYdAANPYbpsXAzmW65/pioRA0Y8PChMJDHyxR+HDUZn9oOXHrFPr +JuevytFozAuCZGXH33FvGTj9ucUv41QQTLzzMfrYx8DtwrvMw4OD4J5bUvGV +fgYiPaIiyDQInDa8uyA7ykCjqgFv/Z5AiGSfCBYRMEGKlfvwpGwgNIu/pI+q +maCaca0Q+8oe8LsXcLxyvwlS3w4E3u4JgLHA4Yh1YSbIoZ4nPjUGwEGlvXs6 +wk1wD/OEgFppAJw+tM9pJtoEl/Zci+uKDYByVjiNE2+CPc6ZM3IaATBbFVfb +kGWCrGCxqc/h/pBWdmXiVQM5H/PXk0iVnVDHa9vxXZqJnRcuPJcu9YX3DnTP +cDkmMgvmsx5e8gWBX4Guf+SZeLaPYRJ/yhfMNy52XERj4n+niRp9P194uIDF +WKnFRMnZwW4TJV945pMjYmbKxA1LDDTmk32gW3V3acpOJupQWjS0Yr1h4vr8 +9JpbTBw6KDn9TdwTBrdY8U7dYaJbStkB9SkP6Fx4xqa/honSTeUNId0eUOMl +f/H8fSbOK3Wec7jqAcfkjFhzj5nY3XY/UcjYA1Yk7D705C0Txba/vhji6Q7a +/u0CfoIsfFmW7DL5YBv4qhWLZK1nofXy6+9y610gqsljt/oGFj5n1B2bLnKB +FD+Jp3wnFrYd/P7BJ9UFagsik55uZeEH1fcZUV4uIKVus3zOm4Wac+YrSua3 +wkP1T1Je4SzUVlFIFzHfClqrqDT1HBZOiXpqmndshu9a6cb8cRbu8tGK9mRu +gs5nuE7yJwtr9A4o/FbfBPeDxjaFTbLw8svsvflSm+As33a/8W8WOtXihMa4 +E2ixBEqqhdj4S1DL/cs1J/CxDaQ3yLAxjGfzzF7eCdr8rZe2cdh4dXGuuPmS +jXA7/8+HyQQ2ShrbXjPVdARji7Bpu0Q2rr3ev814qSPc/DCylHeGjQdy25Wt +v60HPqWPYZfGxh+1SdnEzfVQknn/zJVLbBzQXWNWZbEeeEknmNalbDQdXsp2 +2uEAp8KWp2a+ZmPOIY+RnbfswM1SBdkUDtY62/INc61hrk1YrIHGQcO1HjFf +T1oDz2+sx06Fg9KeYUR1kDUMxt+JcFvFwTH7MbE8jjWEPP63LNKAg0v3SNil +dVnBacdDlNtWHMzOUjb6LGsF1S7ts4b7ONiQGVXTWWAJ7l+qn9Tu56B5TPW/ +4cmWIBDFy7QM42D19N1uzUhLsLq0x9A5koMcyZlTrxws4VXvgr2hcRyMo/mZ +r5q0gGEf3Z6KCxxcr5M21mZrAQqBJ+/o3udg+XDxrkpBczg7v9MosZ6D1MPN +7jBuBoJpVhWfG8nxT5sO9fSawXDVoiLeYw56rQwXsr5jBtUCxzMlXnOQvpFT ++iXYDNwyYiOmPnFwal5478Z+hMyaSKN7olwUH7CauXAdYKmja4W8GBe99+xv +ajgJEPveRCdiBRf5v5ySxPwBAhbNqOpJczHrQQBPQB2A8W+4VB6Fi44Lfko7 +F5hCx8eQnyf0ufhD3WZFXhEXpJfsrVi/lYutx1wytZvZkG8REzXuykXZ9Sxq +wTU2GMSctUjfzsWIVYI78CQbHMfL2zu9ubisY3V+nxUb4jsmf/nu5SKlpDOo +6hELZvKOmEcd5eL2shKBWy1M6Ganvy4s5qJoE9FOnWFAwIH8y7alXPzSpRPB +72HAVOlNv5FyLkbq3hz1rWOAhHLntH4VFxVuc/uVTzLAXlhJ8e590gllVcvk +GFDbVrjjdTsXp1dVx8aAMdiJ3dYJ7+Tiltm3Nd9UjaHT+vGUXA8Xj4+Lzx5e +YgwT1V8TPN5zcb5wUH6i3Qh0cvVufBnm4khE5QOjICOo7TYLTxrl4rgMSJ1x +NgI7MkNrxrkYp5iVJMA2gp0nD7wMm+TiG9dXsWxhI5i4H58lO0PevzHeJPjN +EI79vuBb/ZuLB457N3xqN4QVhkXa7nNcpD+bcx+oNYQrgdWT8/NcFB6sjPp7 +1RD+B5ga60c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07751421743154895}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07751421743154895}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4Vd0XB3BRb6SUWYY7GCOEcN3JWobMeUsqlDnRQEKElFJSlLGSkkso +LxnukQqlDKWRChmigSQhlakiv/P76zyf55y9n3P2Xt+1D91nn5OfoICAAHOB +gMD/r1N9jxtVE/NN3444BmyJXGfadkUu0qzzGIRdf9tXx1cBlG7xketMA/VL +DaZp/LUQvuG/N0KdebCD+2Z5CN8CxMdk03694cMGGjeGw98E72od9028qYf9 +LdpPEyt8wUp1uPf7m1fw8NE/wm9LQ+HXG8a58TcfQUx+10Kt/DhosLiW/zLv +J+Q9G5w1s8oAxXd3Bn2058CVvi458UY2SO31/G+xhRDOKWxOFDa8Cmn6VjWO +m4VxNPFZ++Vz16ArU+/+9xXL0KQzeJucdTEk5h9pEVwpjv5XLJ11npSCneEu +CWkVcVyY6xj9saMUhBudNmvoiGNKsaRQcn8pHO9X67E3E0dGlebqF7OlcEj5 +2WDGLnHMa/mQNaBbBkE8ub/q1eIYn3J6fF9qGWy8XKFtv00C3eKFjs9olINs +Rv+p9GxJLKsw8ZLtKge51TePzxRK4s644Jo/veUgXx9/xL1cEttj52hvP5YD +ZVzzgEaDJBr+bhFOHSkHNYdgr5ohSfx7u4b9dL4c1i6cM+5fK4UKt3urYtUq +4N8wmQGDJ1IY4meaMRJYARtEh/ouvJbC4NYSzsaQCnDKu9M1+1YKyzRV31eE +V8CW1u0tD79J4Yq0/2T8j1SAu/bVajdpaRycbWfkplTAnoE1qce8pLGy7urc +Jn4FnHS2NX01JY1zxysOV/yoAPnKF/KCC2Sw4/5n/tBUBZRKOk/ri8pgfoyP +ssKfCuh45VGeSpVBAw09/n4hPqhuDFPeaCODD+W/nv0kyYf69Tn/tF6UwZC3 +PPGhtXyYs5p88Zwji2Z5HMetwXxIKYwqnrOSxRw13UuToeT4fwQSdDbKIru3 +kJocwQeHpiVmZ/xk0VsaWojDfMiyoBEOZ2Xx7vzPxw1JfDBB+wtP38mi6txm +9t9rfAhl5no+PiaHXTrGg73dfLDjiU3YJ8lhKqEgVd7LB+XFhxJenJNDNSOe +/OH3fGht21Lx+rocWsb48JcN8kE3eKlQ3ws5FAU1yT/jfBgqjCj8Ib8SF/0w +fyn2DwHbpRxHFYiVaPKp0FZRh4C10TVHr9SuxIRf78R3ryFgycdVMvSHK7E9 +bUctoU/AnTIhUO9aibxTg3dYxgTI2N9J0ZtfiaNeJj6yQEDrUVXDdfby+JMn +2iy6gQDLb7+jgvrlUSIxUX8giIBImwytByPyqK7AUCsMJqA0V6dbckoeDzT+ +NtgRQoCcsxfzjrAC2nz/dqXtAAEjt5umhXQV0E2n71H8IQLSj6WEXTyogJF1 +7Ld6pwho7tFUHTmqgO/Rs7LyNAGzhg2vTRMVMJV1v8wwiYCdnycNBrIVUKiy +VEIzmQCWw7bvug0KOKFQmtWfQcBHafWgxmWKuLr7ujkvhwDZfXVKsrKKqFNb +kzXII8Ch2eX5Lpoivj/gT9PMI6AqKlF7+VpFdHhgeysvn4DT78aHXV0Uccrz +rnpAEQEGRTX+3/IU8fCS9SUcPgH+gptlzUsU8arcOwMrgoDL28YeZtxUxJzq +1B/2lQT8I0ZXZzUrYlSTD82hioDukPiB46OKmHSYaU+tJuAoZ6O3vIkS2uul +nxF/QICNx5UfDHMltJt65jhOWiz2a9xmByV8EPGo5Ek9OX/DicIULyWU0OVY +hDQScNuu+us/p5Rwn53GTNIjAo7sXRyjmq6EZ3U879o0E2B11lnMPFsJR7p+ +aQg8JqDt5ZheTIUSPv3S+N37CQHjLirhP7uUcN3Ugojvzwi4FRW8WHxACZuf +nos//ZyAw5fvZuqOKeGFrWcsqS8IWPp+a80uQQqq3bdoZbcQ8HpBgcPJpRRk +b3DmNZDOUvnRmy9DQe0/e1SsWwnQ8E8SeK9Fwaw2X2uzlwSMJXSlzhlScLNu +7vAt0pX/qasoAAXXT+es03pFgPnY/XVbNlFQ5mmxhuBrAkRWiL0JdacgdSu9 +wp90q/62gFR/CpY5aU43k/Y4MHn6WTQFo0Ve3j3cRoDaBXPF4RMUrIgcwNdt +/6+v5BuLUyio92D/CZV2Aojut6ZqWRQUNqhK2kc6alaz1Tyfgs5HxrfeIm1G +ifD2KiWfr/Ua+k1aGBt/xNymYI6bDbA6CDgX5yF95xkFzV1Oryshvb2guLCj +g4IGe4Om+0grP5phTLyn4B+b3rBlbwj4MrTusfhXCj7UotYxSJcvSXdbM0l+ +X2HMG3fSEdrvvzrMU/BqoUXdEdKmjjoxu0Wo6BB0NyKb9KLgKLEESSrOpZsI +3iL9LPVRToESFeMFF3o9I51OSOk3aFAxeXpfWi9pt3bv+vf6VAwRfJE1TJo+ +XbrpL5uKdKH9UT9JD8nNDihYUVFE84bBDOkylm04cwMVp7+/afy/w7efX7zV +jYpTq2wMJklzDvdnhu2gos6nzYdGSQvx9LTSgqjYkuCW/4H0kwcxNWUHqThU +V178knRK/xOH58fI9z9SmX6X9NZFcn3DSVQMFGpwLyBN0fDbJ3yBijYtLNFT +pD/Z8AXUc8n5i6OzA0iX7J5PtSimIv/qoLQl6dAkBxXvm1RMEu47oECaVXqx +8nAdFf32NN0bI9fb8s2LubFmKoa6Zmx5QNpRYKG15ysqnk9V8k4h7aLJTGnp +oaLuh+PvtpH2dQrqgk9UdP3n2ysV0kHRV5XLx6ioUHaUM0Tu98H8zj20GXL8 +QV+lItJW0fQjsYto+DeBsKWRfrq89qrJEhpGlYZe6CDra0P+luZxMRpqlat7 +nyK97XmiuLccDdNVJQMHyPoMpk5dNVtNw9HPv04Gk/U9SaQ0/1pDw91pph1L +SEfZrB6tMKSha9CXolwyDyf2exkrm9Iw/hBnsJHMT1bDk2bBjTRMeZfR9oHM +H9XFb7R6Mw0n7z7Y50U6f2RePNSNhuYWC7J6yLyWSRtt6/elYYhsDu8RmedG +/5zRhnAaJn1qzwwn8247y5Q4FE3D0/3iLV1kP3iR0mZsGEvDwxGWV5iku+6I +xOafouG1sOSl38h+MiYaJnHiMg3FF/62128i94MnxuDm0lBGRDkwkuw/M4ZF +2yYLaHjDx03/XgNZHx59+X5lNLyYLHedS/YruXIbhlU9DVPD6kKk6gjItuzf +9vchDa8Lu7aa3SPz0hUTW/WUhj6vNvTsuUuAjiDxWL2dhnOSqX9v1pD9wFlp +++IhGi4I+X1F+TYBe2e+xzYvo+OuzZr7PMrJeti/U2ZQgo6mbxoWmJWReR3u +LhaSo+OR26NN1FICCnoaOkyV6XiS9vLLy2IC+u6d075pTEfLSGar8DUC/j3B +7Mz1pGOg5mB2/WWyPv/eCKzbQcf13j9W7rpE9o9wZaHeXXTU8IrvF80iICFA +VFcujI5OLn47rS4QcN++N+5sAh3fHlzhnpxKng8SR9dEV9Cx0JWXG3KCAIHE +ycbMKjrmXX/wvC+OXG+h3W5VNXSstXHaYX2MgD2TTie+N9GRJyvfuewIuZ+d +qj3+3XT8L+DdsuCD5Pmb0xzvLKSMw/++3pi4m4Bfq1f06WxWxud/bntrORAw +lS1/dK2bMg4tlxjRsyNgYrmaKtNTGQ1MtDmGNuT+/WTuttyljEUSE4b6luR5 +WOM75RajjDcOadQu5JD5tb8lllCgjHqPWu9KribrbY8HfJxUxtLsu2l95P8D +p7iEd/68CubFfdqZepMPPbTinHWXVDAogG28mOBD1PmiKxM5KnjEwJoXVc6H +W0cLLzsVqSBTv93OrZgPBi68TLFaFfQM1VKf4/FBc1FGSvwHFbR8fdL1VSIf +ZDyjY8O1VfFXfXxvkycfvkvYeW2pV8WlQrccVy/gw0CS15aQxeo43fNq5+mV +FWD7LcL2k7EGij4X/lqiXg4jvsKhlUdW4T3ZutkzUqXk/7qs4Ml6TWxq5b0w +fFIMEs/Vz5Z/08KCb71CNVlFoJhQtsHYWBuVo2ed61nXIHM1c4Wkvw7WZjSW +lIkWwBN5M6OfqbroV+33IXo6D1iK9SlrOtbgDXal0coWHogJ5YV5H9NDVZ2A +68Wt2UA5SuW4qutj6Q5ipGfmIoioba9yeqSPoVt+0r7Engdd7sqyCHcDlJWr +TxA8kw4hfRINdgJrMbJ0IrT9egp8+5m02TZzLX4aNz87cTgJrNc8zLLVMcTA +zz1ZT2wT4N5P9p/pF4aYXLvK9pLVcQjSNuh+6WeELu92CsQvPArcsR1triLG +KP+yTWToezSsU5VbvyzPGB0exhGNMhGwKvb0wXoGAyNmZHzkFodCLbtgkQOL +gVsPssv7p0Jgw3RdWjuHgU/B+lz1YAgcDJosGTJj4MXd/aKJD0OgebvXBzEH +Bjo3igpWxYdAANPYbpsXAzmW65/pioRA0Y8PChMJDHyxR+HDUZn9oOXHrFPr +JuevytFozAuCZGXH33FvGTj9ucUv41QQTLzzMfrYx8DtwrvMw4OD4J5bUvGV +fgYiPaIiyDQInDa8uyA7ykCjqgFv/Z5AiGSfCBYRMEGKlfvwpGwgNIu/pI+q +maCaca0Q+8oe8LsXcLxyvwlS3w4E3u4JgLHA4Yh1YSbIoZ4nPjUGwEGlvXs6 +wk1wD/OEgFppAJw+tM9pJtoEl/Zci+uKDYByVjiNE2+CPc6ZM3IaATBbFVfb +kGWCrGCxqc/h/pBWdmXiVQM5H/PXk0iVnVDHa9vxXZqJnRcuPJcu9YX3DnTP +cDkmMgvmsx5e8gWBX4Guf+SZeLaPYRJ/yhfMNy52XERj4n+niRp9P194uIDF +WKnFRMnZwW4TJV945pMjYmbKxA1LDDTmk32gW3V3acpOJupQWjS0Yr1h4vr8 +9JpbTBw6KDn9TdwTBrdY8U7dYaJbStkB9SkP6Fx4xqa/honSTeUNId0eUOMl +f/H8fSbOK3Wec7jqAcfkjFhzj5nY3XY/UcjYA1Yk7D705C0Txba/vhji6Q7a +/u0CfoIsfFmW7DL5YBv4qhWLZK1nofXy6+9y610gqsljt/oGFj5n1B2bLnKB +FD+Jp3wnFrYd/P7BJ9UFagsik55uZeEH1fcZUV4uIKVus3zOm4Wac+YrSua3 +wkP1T1Je4SzUVlFIFzHfClqrqDT1HBZOiXpqmndshu9a6cb8cRbu8tGK9mRu +gs5nuE7yJwtr9A4o/FbfBPeDxjaFTbLw8svsvflSm+As33a/8W8WOtXihMa4 +E2ixBEqqhdj4S1DL/cs1J/CxDaQ3yLAxjGfzzF7eCdr8rZe2cdh4dXGuuPmS +jXA7/8+HyQQ2ShrbXjPVdARji7Bpu0Q2rr3ev814qSPc/DCylHeGjQdy25Wt +v60HPqWPYZfGxh+1SdnEzfVQknn/zJVLbBzQXWNWZbEeeEknmNalbDQdXsp2 +2uEAp8KWp2a+ZmPOIY+RnbfswM1SBdkUDtY62/INc61hrk1YrIHGQcO1HjFf +T1oDz2+sx06Fg9KeYUR1kDUMxt+JcFvFwTH7MbE8jjWEPP63LNKAg0v3SNil +dVnBacdDlNtWHMzOUjb6LGsF1S7ts4b7ONiQGVXTWWAJ7l+qn9Tu56B5TPW/ +4cmWIBDFy7QM42D19N1uzUhLsLq0x9A5koMcyZlTrxws4VXvgr2hcRyMo/mZ +r5q0gGEf3Z6KCxxcr5M21mZrAQqBJ+/o3udg+XDxrkpBczg7v9MosZ6D1MPN +7jBuBoJpVhWfG8nxT5sO9fSawXDVoiLeYw56rQwXsr5jBtUCxzMlXnOQvpFT ++iXYDNwyYiOmPnFwal5478Z+hMyaSKN7olwUH7CauXAdYKmja4W8GBe99+xv +ajgJEPveRCdiBRf5v5ySxPwBAhbNqOpJczHrQQBPQB2A8W+4VB6Fi44Lfko7 +F5hCx8eQnyf0ufhD3WZFXhEXpJfsrVi/lYutx1wytZvZkG8REzXuykXZ9Sxq +wTU2GMSctUjfzsWIVYI78CQbHMfL2zu9ubisY3V+nxUb4jsmf/nu5SKlpDOo +6hELZvKOmEcd5eL2shKBWy1M6Ganvy4s5qJoE9FOnWFAwIH8y7alXPzSpRPB +72HAVOlNv5FyLkbq3hz1rWOAhHLntH4VFxVuc/uVTzLAXlhJ8e590gllVcvk +GFDbVrjjdTsXp1dVx8aAMdiJ3dYJ7+Tiltm3Nd9UjaHT+vGUXA8Xj4+Lzx5e +YgwT1V8TPN5zcb5wUH6i3Qh0cvVufBnm4khE5QOjICOo7TYLTxrl4rgMSJ1x +NgI7MkNrxrkYp5iVJMA2gp0nD7wMm+TiG9dXsWxhI5i4H58lO0PevzHeJPjN +EI79vuBb/ZuLB457N3xqN4QVhkXa7nNcpD+bcx+oNYQrgdWT8/NcFB6sjPp7 +1RD+B5ga60c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07751421743154895}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07751421743154895}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350918793379*^9, 3.994354018311233*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"f885b67c-da86-4a57-98b8-6c68f024ece1"] +}, Open ]], Cell[CellGroupData[{ @@ -7095,11 +8009,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.991850610344879*^9},ExpressionUUID->"c213919d-017d-a948-8e46-\ -fe19384187c3"], + CellChangeTimes->{3.991850610344879*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[BoxData["9.786582751762749`"], "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[BoxData["9.519477141254656`"], "Output", + CellChangeTimes->{3.994350918846921*^9, 3.994354018364538*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"bb08d232-de5f-4b26-b56e-89d6790641d4"] }, Open ]], Cell[CellGroupData[{ @@ -7155,447 +8070,550 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850612616415*^9},ExpressionUUID->"3764dfb4-9656-4349-b0a1-\ -77ebd1a3e048"], + CellChangeTimes->{3.991850612616415*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.255104290278683`*^-252\\\", \ +\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 13, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994350918976869*^9, 3.994354018493113*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"6ba9c51e-a405-4f09-9237-20a79a6c5235"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"05911c33-7605-8b49-a7ba-7fc8c8f30741"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.480962276391479`*^-261\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 14, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994350918976869*^9, 3.994354018506261*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"8adfeb87-125e-4ff0-82df-e12a81ac793c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.7188086478436116`*^-270\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 99, 15, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994350918976869*^9, 3.994354018523243*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"bdfdc8eb-a2c5-47ab-ad34-b7c0e88c0738"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 12.2218 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .13693 -24 -4.5 ] -[.01131 .13693 0 4.5 ] -[.01131 .25915 -24 -4.5 ] -[.01131 .25915 0 4.5 ] -[.01131 .38137 -24 -4.5 ] -[.01131 .38137 0 4.5 ] -[.01131 .50359 -24 -4.5 ] -[.01131 .50359 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .13693 m -.03006 .13693 L -s -[(0.01)] .01131 .13693 1 0 Mshowa -.02381 .25915 m -.03006 .25915 L -s -[(0.02)] .01131 .25915 1 0 Mshowa -.02381 .38137 m -.03006 .38137 L -s -[(0.03)] .01131 .38137 1 0 Mshowa -.02381 .50359 m -.03006 .50359 L -s -[(0.04)] .01131 .50359 1 0 Mshowa -.125 Mabswid -.02381 .03916 m -.02756 .03916 L -s -.02381 .0636 m -.02756 .0636 L -s -.02381 .08805 m -.02756 .08805 L -s -.02381 .11249 m -.02756 .11249 L -s -.02381 .16138 m -.02756 .16138 L -s -.02381 .18582 m -.02756 .18582 L -s -.02381 .21026 m -.02756 .21026 L -s -.02381 .23471 m -.02756 .23471 L -s -.02381 .2836 m -.02756 .2836 L -s -.02381 .30804 m -.02756 .30804 L -s -.02381 .33248 m -.02756 .33248 L -s -.02381 .35693 m -.02756 .35693 L -s -.02381 .40581 m -.02756 .40581 L -s -.02381 .43026 m -.02756 .43026 L -s -.02381 .4547 m -.02756 .4547 L -s -.02381 .47914 m -.02756 .47914 L -s -.02381 .52803 m -.02756 .52803 L -s -.02381 .55248 m -.02756 .55248 L -s -.02381 .57692 m -.02756 .57692 L -s -.02381 .60136 m -.02756 .60136 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 -.5 Mabswid -.02381 .01472 m -.06244 .10806 L -.10458 .20681 L -.14415 .29388 L -.18221 .37017 L -.22272 .44131 L -.26171 .49847 L -.30316 .54591 L -.32392 .56431 L -.34309 .5781 L -.36173 .58858 L -.37125 .59283 L -.3815 .59658 L -.3917 .59947 L -.40103 .60141 L -.40552 .6021 L -.40789 .6024 L -.41042 .60267 L -.41284 .60289 L -.41504 .60305 L -.41725 .60317 L -.41834 .60322 L -.41933 .60325 L -.4205 .60328 L -.42174 .60331 L -.4229 .60332 L -.42399 .60332 L -.42526 .60331 L -.42644 .60329 L -.42773 .60326 L -.4291 .60321 L -.43163 .60308 L -.434 .60293 L -.43941 .60241 L -.44405 .60181 L -.4483 .60112 L -.45788 .59913 L -.46769 .59645 L -.47681 .59341 L -.49751 .58461 L -.53655 .56157 L -.57805 .52937 L -.61803 .49268 L -.6565 .45377 L -.69742 .4102 L -.73682 .36757 L -.77471 .32713 L -.81505 .2857 L -.85387 .24819 L -.89515 .21147 L -Mistroke -.93491 .17954 L -.97316 .15219 L -.97619 .15016 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzdXHd8VUUWDqm7ZJWqCCgl9I5ACklIBJRqkKYroMGIgQhiIiAoP0AQpUtb -aYoEREBlVQQUUMD2c2VVQIoUEWnSi0hVUGbfmTdzzr2POXeS+OJvd//Iy7y5 -33fOd8/MnTtn7tyXljEoK7N/xqBHe2VUaj0gIyfr0V4DK7XKHuCrCisSElJk -v++vVqWQcF9ZhIS4PqaI38UB+PCVhbgmDsBH/svZ8l+U2PPdHtG3b19Ru3Zt -UaNGDdGgQQMxaNAg8esvv4YkSUyEOHTwkGjSpIn8A1yJEiVCQuFbSJiYMH4C -oCQyVOGnTpkqbdWsWVPavvb7tZBYq62iTlteuuKkqTCRmZkpSpcurYT4P6Oj -o8VvV39TCJsck41opw2bFGUnSuz4dofExMfHi0aNGkns6GdHi6tXrvoU8Doi -3K3x/Z7vxcoVK8XlS5elax9djBgxQnTr1i0kRUn+ZvM3omvXrsoofEaKNavX -iLZt24qLFy5KTr9+/cT4ceMTDJTwPLjSET544KBo2LChWP7uchXNMJGQkIAR -DvV2H8uaiXaakX9ecnSQ9/2wT+zetRs5534+J4Ock5OjTouVouL8pFIEakAV -fEv2iGvr1q1lvdNjTEyMKa5FDaZ1AE4cPyFiY2NF7rxcFbMwMWWy7yL+7XdX -HBl3cXk0E2WQoKVe+fWKqFKliuPCYN0FxMrXAmL9uvVsrMJVHbRm+fLlZbfW -nSU5OVns2rlLfovzCJrTh8b9dOYn2UsmTZyk2sPuI9bAjTb40FGZ8eIM0a5d -O0cj2H2EucNTr1492TFt4Tl54qRsGDIRJtLT08XaD9daw+P0Ea/qoLGaNm0q -pk+bnm8fTq7JR5xSDqNVqVKlRIsWLaBDheXRjYpQjupmEydMFHu/3yu7GHTV -USNHiQ4dOpjGM30iIAQEOj1kZWWJZe8sY4MV4e0uUVF+PvuzPNd1a9ehaZu7 -eAM33Nud7mEXzl8Q48aOgwE/z2cXED+437Rq1Ur+r1WrloT6WtArfqdOnjK2 -kE+4NX6MuyRF+fLfX8q7nPOSsblLMHDDvN3p5kpNTcUrL6/uXPHzX7xqiAtp -XoABTN1yPILm9pGqBuOSJUuCLRxebfZ1h3Dw8JSd9pupuoEDB4rFixbnafDS -PjxCk6qCoaKtTzNStVObNm3E5k2b8WxgDKlatWqcF8vtQJ/fxq83ytu2U/fp -U6evuz0xHmPzZcYcuj59+oj3Vr6XF3cRfMRSVBeA/piYmCi6dOki5ufOh/MP -0WH7YM0HsnufP3de3oNh4vfCpBdirVRT7PzzzHLlykmzMNrAja5Tp04wCuGI -5OkyLybcrhMUb8s3W+TM6sB+mUKIb7d/K6pVqwZ8m+uAGMIEuG7duvDnazn4 -DJMB0B71UPPpJ5/KuzMEJUoFbNrUadIr3Jr69+8vO3q8AR+ZR1+xSvmmjZvk -fKhs2bJy8g7zKp/tCA+3cd7U8DwqaKJcLH1zqWjWrJm8wUD8fYOlOguzexVU -LsGrp9xDzqhdyc93/zeOx/hrfYfXw0cRr1ppKxQq/mawGp2fOrLClm74oz7+ -jLr/U/VUig5s+juxdJfBbEtD3Z15xLU0OpWYln+yUwdIrgZdd0GFO48LDVlW -YIiGXQdxqw1F0DtOUITLjku1Eydt+W/EWpMf9HYgKNTgW37+00tbATl0Um/x -yDDO+lILh6x76AjnrL9ZCBxS5KE9grP+hoVD1p06JDCSs/k6bzPSbdPDexRn -fUkhcEiRh/a/cNYXWzhk3UPHXznriwqBQ4o8tBflrL8W2BOKum16eDfdO+Tn -wkLgkKLXeKRp7iE/X7VwyLqHDtN9W34usHDIuoeOGznr8wuBQ4qc2iWwGGcz -l7dZzG3Tw3txzvo8C4ese+gowVl/pRA4pEhp93r44h+zw2VKlpSUBGktPIjR -2QWsm0DWUb9+fZm9nTh+Qt1EIsTw4cPxeU3x4sVFnTp18NnP2Z/OoijTTack -d3Jz/ZL9Iya3ZI+qIamHZzJgZsMXG/Q61ZHDR2RedfjHw9LMksVLIPvTI3fH -jh3F9m3b5TfTeFvSHUUVbzUJUSvjOHVQK+MqJv468K+XVXTd2DFjZQPAN+fS -jV7BisijuFJc5F5GmbZlaj0awamoZQ2UNGzYMDF71uz8S6J4zUUhttVgLcTX -c3SPQSHzXpknxXgKkZNRNiIvoZB9P3gvq2ohFStWhGd3LiGvL3kdHiPlKyKl -7ZJsK5VaEvRjU2zg6su3JGoke2/RHVgLcSyCuXrLnNlz8iXkJi42c1zXmXLn -us5gcIJv+oYHq+ewpBJ4TX23+ztHXYRchFfNquUZpzU3uWOkG8s/FjELWOpe -FymOHjkqO7JeBFv02iKRlpamR8tZM2fJRWxYr4ELj9NwMxce/zWJ52Ra9ymm -jsGzLOg3IAfi6LsOcciENb0xz48RZcqUAQ2sBArDRPiQCCbdNHAm4NcbeE4Z -7lTHIvtGC5s8jkGVxRwcWXEL52c0mihh5JD1Z/FASV5RWc7PM2istIVNHolz -U545w1HlzTynHKdyKBq7xcImj0+jx7I8pzzncTAaK29hk0fi3MpzbuU8DkC9 -txWA/QT6rhjYX251qyRkpUDkbZz1x5FTmdd2m9tPfzQbw3MqcB77orGqFjZ5 -JE41nlOR89gH2dULwM7Es61hYZPeTPxai+dU4jw+jOzaFjZ5JE4dnlOZ85iO -51g3sOdUdvtJx6/1A5ExnPUeyGnAa4tx+yFOQ55ThfN4P7JvLwD778huZGGT -XuI05jlVOY9dkB1rYZNH4sTxnGqcx47IjrewySNxEnhOdc5jGrKbBvac6m4/ -hEzk/dTg/LRDdpKFTR6Jk8xzanIeWyE7pQDsu5CdamGTXuLcwXNqcR5bINu/ -/SDYubqe0EMmDM59x0L0hkiYPeoMy7TMWst9oiS1hV9qoeToerHAZ0FOky+c -v4BT+9WrVnsKrs1FORWlt1TSCzeX1/sGIDWCtBNyPfC3c8dO2FtgWkGu7Q42 -Kb4TFQcrrdchXvjqQtkCPx760ZiJ1OHCmYzi7kJxwU71IesGLHRiSvUDokRC -WqGQYKX6uoPNfXmuaN68uYy6qeHqclFqiuJao7hgJf1aCGxpWPX+KvaKqOuO -F0lqY+1V+U3/tSRfSox7b0yS2If7cSiuresiDd5CgH9flNqRh3XZ2dliwfwF -+Rcci4LbKcFBWCiIEhkZGaJHjx7yioLD0L4wVJ85fcbYAekxd4Cq9n5VBV0w -0Bt3oINAg8IFU7lyZdG+fXvoHKalnfpcqBqhqLv9okxBre8+EeKk8ZwGnMcG -yO5gYZNHkzEPdkPOt2lIuMdhJwzn0uS7Dn7tzHu8nfNoml90stgh3ya2h4pG -nArTfLNLAeyYZspdLXbobEzse3l2Y06FKYe6z2KHVFAOdT/PacL5phy2m4VN -HonTnefEch5p/aJHYE+Ndfsh5AO8nzjOD61YPWhhk0fipPOceM4jrUz2tLDJ -I3Ee4jkJnEd6HpJhYZNH4jzMc5pyHulJZC8LmzwS5xGek8h5pOfHmYH9JdHt -h5C9A5FJnHV61t+H15bk9kOcLJ6TzHmkHRqPWtjkkTh9eU4zziPtq+lnYZNH -4jzGc1I4j6bdTh6+U9y+TWwPFamGumto8XELUYIInh3Yc+4wEK8iPMcIl4cI -9AQvobmh7hckDrAQJYjgA3l4C0PdRSQOshAliOBP8nDTJsJzSBzsJxbKykOU -fF0BcgSohzfU4BkYpC0bv95ofDxImxtJ4RC/wkJccIiSO8TBotIhtm7ZKho3 -bgyzdOO0m/aUnsXSU0pn4a4uaDWQDObOy1Wnd71C07bT06j1adQarHUFreHY -0WOyN8AudVPkaMXsjOEoxTBYSwrh6hPe6KtQoYJ8bW3WzFm0qmAK1ElDHYUs -WIsMWhq8bLFt6za5yd8XdtN1QSubJmlDUVqwlhh0awKve/furp7n9NzaUHcM -tQ6z9rL8rjNoXZBdV69e3VuX1EBqhruuz2AsLGg1kNPD6MapaYMajmBphGtU -+0OrBpGiZ8+e8i0hGBChN/Xu3Rse85t6UltD3SFU9Yxf1R9dNTh+7Lh8lQpu -CYAZPHgwaGP1SN+kYqRfhelm1s5Qtx+JoyxECSL4szy8vaFuLxJHW4gSRPDn -HHCJvhsP7cHS87zNNEPdLiSOsRAlaLfhqIfHDoa6HYY6D98d0PcOLI3j4fcY -6rYhcbyFKEEEn8DD6dnZFixN5OGdDHWbkDjJQpQggr/Awzsb6r5C4uTADtQZ -DxFoCm+9i6FuAxKnWogSRPBpPLyroe5zJE7nifca6j5D4j8sRAki+Is8/D5D -3cdInGEhStAnhqMeHul59EeGox4e7zfUrTXUzbSYkL7XYml2YFfqhoc+wNIc -3mZ3Q90qJL7EE3sY6t5D4ssWogQRfC4PfwBBK7DksWn6QUPdMiTOsxAliOC5 -PDwdQW9jaT4P72moW4pEj639PRFEcOf+fol+CA+9gaWFgaAMg/XFCPd43yED -QQT3eGHjYbdNIprhvQx1C5Do8fpLL3f4ZMnjXZxH3K1K0TLDMw11c5Go3mwK -cpatj8FPJ+h9+IAZOnSocR5Ku6FImXqjq1Cyaz3fg123+/fJeZdRV2/3+CFL -6t23oGfTkc7sVv59/NHH8NMK8udxfJRixYrJt7WHDBliFEub2GZj6S0UW/B0 -OsqZTss/SNCgOS9fuownfl0oZQ5LmmZg6R3UFKxUWgcQdmeotEj+KU2UUmcZ -wjYdhS1DYcFKpLWwSxcvyROF31YJFBYgp6+hbipKfBclBiuh1r85BhvBIa10 -yDMuhNFGS1K13NrL8ptOa1VwqcfFxcnfsfFS1Q+1TMbSCteFGoy0Wq+LQJIL -v5rj0YyPoYxJWFrpGtEKmFlHKg2wgJmSkiL/GA390TPte/f/gkiB82g97qxY -vkK64tqDNg2Pw9L7fteme1Q2gsZgaRUPzzHU0ab51RYiJcqytMYBl2jaJD0S -Sx8GggbgoRFYWss7HoigYVhax8MHIYh2v6/n4U8iaAgK/IiH0151In7Cw4cY -6uj0P7UQQ93R+oyHP4Ug6g6f8/CnEUT9/F88nAJJY8UXga1KjdMH6zbwNocj -nCYwX/Jw6ik04/uKhz+DIJq3fs3DqbPSjH4TDx+FoB54qpt5OL1pQrnbFh7+ -HILuReJWHv48wjsjfDsPp5dqaI1lBw+nIehuJO4MbPrxWGqDpd28zYlok1bA -9/DwSWiTnpHt5eGTEZ6CpR94+FQEJWJpPw+fjiC5MixnRgd5+IsIvx1Lh3n4 -TATVRetHefhsBNXA0nEeLtNx+SMdFbF0iofLNDkSqm7G0tnAppdZaFEoRWLp -Am9TpmY3QtUVHiQ//0t+mMh2XJYtv74bUuQ/PkeLDQ==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-3.233775858153751, \ --0.0043827503402644324, 0.11832856225129938, \ -0.0003073572253865838}},ExpressionUUID->"899e43aa-c372-6647-a3e4-\ -4952f308ab17"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 99, 16, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994350918976869*^9, 3.9943540185328417`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"925af749-bcc8-4ae8-bdb3-466734b339ce"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-\ -baecb9a57d9b"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VO0bB3BRRCH7OmMIRfZlxjDjvq1lSUhCtkioKBIlypKlLCmFNkuh +eu0zU7L8JLRYXiVZUim0SBIhWuR33r/O9bnOuZ7znPPc9/c8R9HvoHMANxcX +l+0KLq7/jj+G29uU04pNpcbLs+07rE1f5EsfMxtMAJpexoPBT8qAEk/9pAfP +w9WHXzfe+mQAkY7/DPAMXof01lKHpE+WIDIldf7nAAvezq77x+aTC7xtdDg4 +N9ACoeEJfxM+7gFr5Yk3MwPPYb6lJiVmLAJ+DtAuTg+Mgnhg/d9DA6eg1eJm +cc/1WVAetBs0jbsI8m/rPvppLIGD4nn1vrACED/g8w+fBQ9ar3H7YupcDOd1 +rRscdqzG7/k+TyUmbsHLPJ3mmXWCyM+MdnZqKYfLvWXCkSqCePZ7X+RcTzl4 +CG3w+UUXxM2WdvGZI+XwOpH0l9tfEKf4pOk3uSrgXagAQ/yOILaa7WrfZ1oB +45bva6nuQnjNy1WFdq8CFqdzq44XCaNTWfTZzuJKSCs++ZRbRgTdvlysvKBT +DbYGwaIS60Vw8MuBKElaNaxuc96xQVMEDx6bPprNrIZTYyqv7MxEsP7BKsWT +ttUQo9T18UKwCLJiN4zJ76mG0ELpv6r1xPn7n5TDcqrB6WqNht0uUZTp830U +sVANUhfGTmdfE8Ol6c7Imn9qQHrTnVOLpWJoJ6MSkl9VA7ItySe9qsVQpGhy +VQqnBsjTakc2tIph8u8SebumGlCxP+TbMC6G42nwLL+nBvRXLlHH9MVx66Hu +kcMLNbAtQvK9Xoc46tv4XOoBFjiuGR/O7RXHSGX5BV1LFjhfr3v557U4xhoU +fc7YwgLXZ55PH30Tx7eBD9OMnFjgpXGj3kNCAgsvKTW6+bFg/3vtcwm+EtjG +7ZLVlsiCFBcb0+c/JJA66Xl8SysLZDndstwrJFF5g6FjyGMWVIq5LOiukcSd +eyhf0jtZ0P/cu/qcgiR+/3s3vLGXBcpOEUpOWyRR7YTco9djLGjZWsD77JIk +1leYHlTiYcOS9Xz3vwwpNFJLe/6AyYas0uiyJWspPL/YtwvM2KDMy5Wq6SSF ++9Imymot2WD/UMAsI0AKV/IpF+XZseGyBYVtnymFb6JMP8i5s8EI7XI730qh +sMFj3o2H2XCYXuTTniCNEV8MG91usMG2UGjOLl0alf11Y5dL2KDEF5PafVEa +G1z31BXdYsOzF641vbek8WHuZPFgBRu0Dq3lGe6WxqWkzdvX3WPDeGlU6XdZ +GazKKw262cmG+4IfjI8oy2BejaggbzcbciKcny5oyiDr215932dssDLXXPyD +Mqj3rIKPr48N19+M2vAFyuCks8dr8jAbPMUdvsqxZXDGs+JW1Dc26B9viM9v +lEFj4a83M2fYIDC6UVLxkQz2SAXrFs2yoa6KB1RfymBOpv+HewtskLSry9JZ +lsHu4cER1jIx/3hlAys7WdQPKb/TI8QBy2+/okPHZDGtyMXvvhoHjm25oP5g +UhYnNvjomm3iQGWR5pDYD1ksLansbNLggLSLL71utRxmeHIHVGhzYPLewwUe +LTkM+iMKboYcyE7Iirh0VA4LF9cafwAOPHmlpjwZL4fqCtpSymYc+GPQ2mua +JodS7K5Ob3MO7P00r/f+mhzO0mubHltywNh+14xWqxxeN8HRQBsOjEqohrYJ +ymPmEZ3XI04ckDp4nyQlJY/cBd8vDDtzwP6J27/BFHl0s27SG9jOgbvRaRrC ++vKo7s+j2LiDA2feTk+4u8mj4ZbkERd3Dtw3OnO5fLc8hjR1vdLx4MDcufW2 +y/vksf2Bb8vqXRzwtnS9XRwrjxa1m9zKPTmgd7sh8Nt1eVQUKm9u8eFAIPcO +KfNyeey5w6Gd8OXA1V1Tjy7ckUcDeuF1w90c4BVSVDV+Io8c4HbL8+PAUHjy ++1NfifFygjw1Azgg3KVwYeCHPN74Zz7jCWFLlToLdS4SFp6xbfDZS7zvgS/X +n4qSkB66QzAhkAPxDKfdskYkPPU5qiwnmANbvPO/08xJ2MenqCi/jwNCcV8S +d9iT8E+K5MerhK+2JpVm+ZLwqKaZf9Z+Dvh/eE6r3EfC7KoNZJ4DHFDno7R3 +RpDwmO3/NMMI37Ot/8J7moSJ8fscIYQDJw/wxSpnk1D9NO4tIGyd6SJkfo2E +SifM+38RFqwuKvC5ScKkwt4ip1AOvOiZ0omtIeGrTreOG4SvzJq0XG4g4aMj +Rk4zhP0kTm+/95CEXeVDNOODHJh2Wx85+5KEW6aF1JsI10Yf4hN5T8JNAseM +fhI+cfV/eVpTJNzZvqNc+xAHrJoE1O0XSTigLJGym/DadzsbgrnJ2Fa8sSOT +cO+KEvuUtWQc8+WJqiV8ef33N8WSZNyxLHP2FWFfKzjYQiGjPXtU7DfhDYHp +XO/Uycg26eOVDOPAVOrLc0sGZBwd2ResQZjzj+p6OSAj7SiZaUr4eNdhjpEN +Mb7bgUQ7wuZTzVau28kYuec504Uw/zqhgcNeZCzjehbiRviZ7q6gc4FkHJH8 +KP6fc7ff+lkZRkY+sVyD7YS9j8yf6TpOxtWje7ttCKvkmstPJJHx2vTQmEnY +f/10toIvi4xDatGRaoTZQ69NVS6T8f18V4oo4eg/as/Mi8lYaOQls0A8jxk5 +ardvJRnR8a7GAOHV2PY99h4ZBcQDWlmEu3eLnLrSQsbXzxeGTxO+mOgtUddF +xm9Of+M8CXuWlJX295Nxbyd/mTphpceLtLl3ZPw+We49R6zH53GrdpEvZMzq +P36tjnC1QLaH9jwZhWTWBkcTjtJ498V+mYx1nLkWKmFTB83YffwKyCPdXT5F +rH/XuccFJSQFvC7YSP2vXrLZ4rqtGxRwQ+7qod9EPXn07W55p6uA33rviF0n +PC79572ctQKqP61xHCHqs8rYJpLuqIDTTRY7owlHeubw7fRQwL4Hjb+ECPMU +6qifD1XA/YU/yZuIeu94ENtQdVQB3RrW3GAR/ZA11mH/b4ICSgQUdRgSJm8I +OLg6VwG3jnGv0Sb6ybjyEufEfQVkZ1w++ZXoP8uB7qWpJwp48MzNXk/CDlwr +N/s8V8CTS1aB//Wrv3PoS/iggLeutDlf2EP0x3HFk3GrKBiT8Gb3MtH/ncKN +N4wEKGi/mPjSkbBjseuTaSEKfteZvpJP5MWuf9NEdktT8PKlR7zaRJ4cUvhx +w2wTBRMfu19dT+TNPDvryU9tCgKf5PmdRB5Fb9n0tcaAgjN0geEUIq+Swnyp +SqYUPBEXcOKNG1HvrR1PuJ0omPDgFr8XkXdtgQVfWyMpaLb5QHblVg7Y/KGL +xhyn4F5n96u37Il6yHpBNYijEPUiLlZgx4GXdfxxxacpODCwuC2eyNupNRGi +SVcpGB30r66cFZH31Vto1i0U/HP410SJCQeuWY7t+vuIgk010imBxkS9vIyN +u9tJwWTt6NsqdA5ocrPbVfsoeIlqlpJLJfrFheTJN07BgB3Fz510OXBgcSbu +iaAirvQ7zq+kSrz/sL2SH0UV0X+5anOGMlG/E0NlPNKKeHudU+acEgdKXrX2 +myopIqmKl1mrwIHhposad6iK6JHR4C4ow4FtSfTBIh9FPOEQ4vNXgMhr0Xjt +4zWK+PuUxWbuSTZwpc235d1VRJDvuvL9Mxu6efZ53G1QRAEtXsbbT2zYP++c +NPNQEccd9IMqxthQPKj8KnCIuN5ToZz0ivh+FjxJduFRwoNRDh3b2tnwc9O6 +Yc0dSlhoX/SEn9gv/LgmG6/voYQFR97kZBeyYU5YRZnuo4SuFDUp2Xw2TM3S +91kGK+HcaASVdIkNow3+PzxilXAH5damP5ls6LCrFUotUcKFz7eekaOJ/cp+ +bxidV0J2l7cSrwMbGGXlhTk56zEgJn/HwCQLXlHKCqyurEfLvitB/Z9ZEJ1z +O3+uYD1mT6dJ9H5kQW186VXn2+uxf+yU5cN3LNBzK8wTalyPG2g31TJesEBt +1YWs5JH12N18+2Z5AwskfY7HRWooY3qLjx4tlQUzora+ri3KmKFRMPhOlgXv +031dw/lU0V7F3JwiXgM236JsPlA3YB0XXp1eVQ2T/qsPc05uxJxteiL0axXE +/4AUd0qLGh4YedtcpFwGov+qZlZ/U8f4HN159rNbIJ9a5UilamAVu2l23rEU +8jbR14kFamJq8G3r/DXF0CFrZjh7TgvpugdbvcaLwFi+JUu7XxsdQsKdykMK +QIjnesTuBB0cjv2TEnrlCpDjFRjuqrp4M+RBYUBHLvCreN51fqyLs+kvHHf4 +XwAtpkxVlJcenjY68rMo+RyED4u22nLpo9exhomniRnwbTZ9h02ePsYV3G72 +nkuFzdqPLttoGuDpe+cKd/ImQdOsye+FbgNcwyO85LI9HkI19IZ6AgyxVOTw +BKkuBphTe16481OxOCX3rZB5FFgpS28VvE7Fe7JBc8wf4cD5+lBxTzEVr/Az +DJ5/DAfl2sM/6kupyFouWhE2EA4rbZ8WBJVRMfLtpHb3vXBoOZj8vZVDRc5T +TWvemHAwbZjLjX5Mxed5/9YFrQwHqnPP6KdJKoYpJn3vkQ+DjXFnjrbQaJj8 +K9NJpT8UGk1KVtkb09B3cKhPpD4UHBfun+9j0LDl60ol8fxQOBo6Xz5uRsPY +tJRh972h8MTTd0TInobvvUTjxxdCIIhOtd3lS0OuH2KmfAohcPv7iNxcKg3n +eh1GZ2L2g3oA/b7KEA2HYu8EtUQEwVklh1+Jr2kY2DGy09onCObe+hmODtMw +blw/Y8gmCJo80svyx2h44H3ODX2FIHB2fJsr9ZWGW9xUw252BMIxk6RD/FxG +aCDrujFDORCeiPQoflUxQrWLN6KE3gdAQFPQKU6YEb6OLPgyfNYfpkImoqwi +jDC79ltpVYw/HCUd2N8faYQXtj9sywr2hzMxB50XjxshLZjrd6KFP1QbR1IY +yUbE/rlZSnPRD/7cTWxsvWyEXMaRznF7/OB8Vf7c81YjPJPt1PFmy264X/hi +z4wEHQ+/795Kj/GGd/aKPpHSdOzz77w47eUNXD9D3H/L0lFBxsypBbzB3InP +YRWFjsd33e7n8HjDoxXGNBl1OlbXjvO/SPeCLr8CfjNTOlIfahZP3PCEIeV9 +lVl76ehRslVu4b0HzN1aXtCupePDtSuH8yt3wkdX68LTdXQM6rHZzJO3EwZX +ZmwZa6DjnsfGvdHxO6HBV/ZSTjMdH1yekL/hshMSpA2Nl9rpeHbs0lL/b1dY +l7ovpuM1HSuCU02at7qCRmAfVwC3Mb5NM7BnLLuAv0oZ/+Wtxvhq2FpLKMcZ +oh9671N1NMbRxYLN9gnOkBUg2slyNsZHsnpK10KdobHkWHrnTmMsccwcjtzs +DOKqW4SXdhvj1xVcT1f/coJHqh/EfSON8YFWVOIlPydQ36hAUS0wxjD56AY+ +M0eYUc+msqaNcY3dg8QVvvYw2IVWYrPE/fvcBQQs7KE5dGp7xLwxGum93qCp +ag+ZLJsw6i9jzP11pbdl0g7UjbnK63lMMH57R7HacTvwswlRbJU0QbqJplDv +VVt4Ebh57QuGCcawTl7jnd0C94p/j8ynmqD0FOVD6UcroFpELNimmeBY8vop +9WdWcGdkcm1hhgmuXBAfbK2zAhZ5mGZ73gSHM2zXGGRYQXlec0b+FRNMXiks +s9bQCgrTk+ibK00w7JCodXqqJZyOED6X12uCsUe9GzxMLWC1WGrp1z5ifsvu +yx7qFpBcw9VoPmiClVmL8qGSFnBqaubj5GsTFDD4Vdo1ZQ4ngl4wzD4S86W4 +WAUXmkO456Xxz4smeNbWf7MYnzl4WK5HEzIDbx2WcH8wgrD0YrVQK4WBnHVt +Mie6EQoDpl7ZrmfgvVOCAw4NCB+T66I8NjJwf8W5v5suIoS3b6s6psdA4zYm +b68NwhmHGPI9awYWqX/OSQ0BqHfr+2NwkIH2F5v5w5lM8Ppc39EYxkA345/i +pXJM4IouzLOMYGA2a3fT0k8GWF/Zb+ByjIGqHfRAqVoGPH+z4sDhRAaa/X0X +Oa3HgAk/rVc1uQw85823jqRrAnIhKXVazQxc2DPuEW9Nh8zlvYZpLQx88bnE +5706HbjPW9d8amNgh9O3BT9hOkzcXXW7sJ2Beyyj41mDRlDPdSpPtJeBm8bY +jnkHjMDjQlzUjw8MbMq9+zr4Eg3yGo4ZNq1h4pXXboZxvFRY6+BeIyvExE4Z +l4oNU4YQ985IM2odE8/Q7P791GcIQasWlXUkmLgr1bK8psQQaNsixa+Tieu3 +1h0PtjaE/tHw2SRdJhbo+Jq7phuAhMCBmq07mbjmfue7TDV9KLaIjZ52Z+Kz +DsOlYhF90IvNtMj2ZGL1Wmp8/089cJiu7hvczcTZ343b0jr0ILl//qf/ASZa +OV/8ZRSiB4vXT5pHxxP30/KOSK/VhSGT7N7SMiZKSqqbu/noQNCR4qs2lUxM +aDtfV2qrAz8q7wRMVjOR7UK2FKTqgKjS4ILuXSauLaNoKQnqgN1qkvz/mpk4 +c/MSteeoNjS+KN3T28fEs4u6+cWmWmArdE8zcpCJE69smjWktWBwc/sP6VdM +TBJ9szgyowlz9V9Svd8xcbXHyW/PSzRBs0in4vMEE3llfDrahTWhccgsMv0r +E++s6468M6EBtuLbQXuaifxzKi1dDzVgb8qRnoh54vnMvsXExmjAXHPyZalF +Jr51PJYl6aYBCb9y/et/MVHTi5Q2pK8B6wxua3gtMTHyqCO0C2tAfkj9/PIy +cT6g5uTol03wf/rEQIg= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VO0bB3BRRCH7OmMIRfZlxjDjvq1lSUhCtkioKBIlypKlLCmFNkuh +eu0zU7L8JLRYXiVZUim0SBIhWuR33r/O9bnOuZ7znPPc9/c8R9HvoHMANxcX +l+0KLq7/jj+G29uU04pNpcbLs+07rE1f5EsfMxtMAJpexoPBT8qAEk/9pAfP +w9WHXzfe+mQAkY7/DPAMXof01lKHpE+WIDIldf7nAAvezq77x+aTC7xtdDg4 +N9ACoeEJfxM+7gFr5Yk3MwPPYb6lJiVmLAJ+DtAuTg+Mgnhg/d9DA6eg1eJm +cc/1WVAetBs0jbsI8m/rPvppLIGD4nn1vrACED/g8w+fBQ9ar3H7YupcDOd1 +rRscdqzG7/k+TyUmbsHLPJ3mmXWCyM+MdnZqKYfLvWXCkSqCePZ7X+RcTzl4 +CG3w+UUXxM2WdvGZI+XwOpH0l9tfEKf4pOk3uSrgXagAQ/yOILaa7WrfZ1oB +45bva6nuQnjNy1WFdq8CFqdzq44XCaNTWfTZzuJKSCs++ZRbRgTdvlysvKBT +DbYGwaIS60Vw8MuBKElaNaxuc96xQVMEDx6bPprNrIZTYyqv7MxEsP7BKsWT +ttUQo9T18UKwCLJiN4zJ76mG0ELpv6r1xPn7n5TDcqrB6WqNht0uUZTp830U +sVANUhfGTmdfE8Ol6c7Imn9qQHrTnVOLpWJoJ6MSkl9VA7ItySe9qsVQpGhy +VQqnBsjTakc2tIph8u8SebumGlCxP+TbMC6G42nwLL+nBvRXLlHH9MVx66Hu +kcMLNbAtQvK9Xoc46tv4XOoBFjiuGR/O7RXHSGX5BV1LFjhfr3v557U4xhoU +fc7YwgLXZ55PH30Tx7eBD9OMnFjgpXGj3kNCAgsvKTW6+bFg/3vtcwm+EtjG +7ZLVlsiCFBcb0+c/JJA66Xl8SysLZDndstwrJFF5g6FjyGMWVIq5LOiukcSd +eyhf0jtZ0P/cu/qcgiR+/3s3vLGXBcpOEUpOWyRR7YTco9djLGjZWsD77JIk +1leYHlTiYcOS9Xz3vwwpNFJLe/6AyYas0uiyJWspPL/YtwvM2KDMy5Wq6SSF ++9Imymot2WD/UMAsI0AKV/IpF+XZseGyBYVtnymFb6JMP8i5s8EI7XI730qh +sMFj3o2H2XCYXuTTniCNEV8MG91usMG2UGjOLl0alf11Y5dL2KDEF5PafVEa +G1z31BXdYsOzF641vbek8WHuZPFgBRu0Dq3lGe6WxqWkzdvX3WPDeGlU6XdZ +GazKKw262cmG+4IfjI8oy2BejaggbzcbciKcny5oyiDr215932dssDLXXPyD +Mqj3rIKPr48N19+M2vAFyuCks8dr8jAbPMUdvsqxZXDGs+JW1Dc26B9viM9v +lEFj4a83M2fYIDC6UVLxkQz2SAXrFs2yoa6KB1RfymBOpv+HewtskLSry9JZ +lsHu4cER1jIx/3hlAys7WdQPKb/TI8QBy2+/okPHZDGtyMXvvhoHjm25oP5g +UhYnNvjomm3iQGWR5pDYD1ksLansbNLggLSLL71utRxmeHIHVGhzYPLewwUe +LTkM+iMKboYcyE7Iirh0VA4LF9cafwAOPHmlpjwZL4fqCtpSymYc+GPQ2mua +JodS7K5Ob3MO7P00r/f+mhzO0mubHltywNh+14xWqxxeN8HRQBsOjEqohrYJ +ymPmEZ3XI04ckDp4nyQlJY/cBd8vDDtzwP6J27/BFHl0s27SG9jOgbvRaRrC ++vKo7s+j2LiDA2feTk+4u8mj4ZbkERd3Dtw3OnO5fLc8hjR1vdLx4MDcufW2 +y/vksf2Bb8vqXRzwtnS9XRwrjxa1m9zKPTmgd7sh8Nt1eVQUKm9u8eFAIPcO +KfNyeey5w6Gd8OXA1V1Tjy7ckUcDeuF1w90c4BVSVDV+Io8c4HbL8+PAUHjy ++1NfifFygjw1Azgg3KVwYeCHPN74Zz7jCWFLlToLdS4SFp6xbfDZS7zvgS/X +n4qSkB66QzAhkAPxDKfdskYkPPU5qiwnmANbvPO/08xJ2MenqCi/jwNCcV8S +d9iT8E+K5MerhK+2JpVm+ZLwqKaZf9Z+Dvh/eE6r3EfC7KoNZJ4DHFDno7R3 +RpDwmO3/NMMI37Ot/8J7moSJ8fscIYQDJw/wxSpnk1D9NO4tIGyd6SJkfo2E +SifM+38RFqwuKvC5ScKkwt4ip1AOvOiZ0omtIeGrTreOG4SvzJq0XG4g4aMj +Rk4zhP0kTm+/95CEXeVDNOODHJh2Wx85+5KEW6aF1JsI10Yf4hN5T8JNAseM +fhI+cfV/eVpTJNzZvqNc+xAHrJoE1O0XSTigLJGym/DadzsbgrnJ2Fa8sSOT +cO+KEvuUtWQc8+WJqiV8ef33N8WSZNyxLHP2FWFfKzjYQiGjPXtU7DfhDYHp +XO/Uycg26eOVDOPAVOrLc0sGZBwd2ResQZjzj+p6OSAj7SiZaUr4eNdhjpEN +Mb7bgUQ7wuZTzVau28kYuec504Uw/zqhgcNeZCzjehbiRviZ7q6gc4FkHJH8 +KP6fc7ff+lkZRkY+sVyD7YS9j8yf6TpOxtWje7ttCKvkmstPJJHx2vTQmEnY +f/10toIvi4xDatGRaoTZQ69NVS6T8f18V4oo4eg/as/Mi8lYaOQls0A8jxk5 +ardvJRnR8a7GAOHV2PY99h4ZBcQDWlmEu3eLnLrSQsbXzxeGTxO+mOgtUddF +xm9Of+M8CXuWlJX295Nxbyd/mTphpceLtLl3ZPw+We49R6zH53GrdpEvZMzq +P36tjnC1QLaH9jwZhWTWBkcTjtJ498V+mYx1nLkWKmFTB83YffwKyCPdXT5F +rH/XuccFJSQFvC7YSP2vXrLZ4rqtGxRwQ+7qod9EPXn07W55p6uA33rviF0n +PC79572ctQKqP61xHCHqs8rYJpLuqIDTTRY7owlHeubw7fRQwL4Hjb+ECPMU +6qifD1XA/YU/yZuIeu94ENtQdVQB3RrW3GAR/ZA11mH/b4ICSgQUdRgSJm8I +OLg6VwG3jnGv0Sb6ybjyEufEfQVkZ1w++ZXoP8uB7qWpJwp48MzNXk/CDlwr +N/s8V8CTS1aB//Wrv3PoS/iggLeutDlf2EP0x3HFk3GrKBiT8Gb3MtH/ncKN +N4wEKGi/mPjSkbBjseuTaSEKfteZvpJP5MWuf9NEdktT8PKlR7zaRJ4cUvhx +w2wTBRMfu19dT+TNPDvryU9tCgKf5PmdRB5Fb9n0tcaAgjN0geEUIq+Swnyp +SqYUPBEXcOKNG1HvrR1PuJ0omPDgFr8XkXdtgQVfWyMpaLb5QHblVg7Y/KGL +xhyn4F5n96u37Il6yHpBNYijEPUiLlZgx4GXdfxxxacpODCwuC2eyNupNRGi +SVcpGB30r66cFZH31Vto1i0U/HP410SJCQeuWY7t+vuIgk010imBxkS9vIyN +u9tJwWTt6NsqdA5ocrPbVfsoeIlqlpJLJfrFheTJN07BgB3Fz510OXBgcSbu +iaAirvQ7zq+kSrz/sL2SH0UV0X+5anOGMlG/E0NlPNKKeHudU+acEgdKXrX2 +myopIqmKl1mrwIHhposad6iK6JHR4C4ow4FtSfTBIh9FPOEQ4vNXgMhr0Xjt +4zWK+PuUxWbuSTZwpc235d1VRJDvuvL9Mxu6efZ53G1QRAEtXsbbT2zYP++c +NPNQEccd9IMqxthQPKj8KnCIuN5ToZz0ivh+FjxJduFRwoNRDh3b2tnwc9O6 +Yc0dSlhoX/SEn9gv/LgmG6/voYQFR97kZBeyYU5YRZnuo4SuFDUp2Xw2TM3S +91kGK+HcaASVdIkNow3+PzxilXAH5damP5ls6LCrFUotUcKFz7eekaOJ/cp+ +bxidV0J2l7cSrwMbGGXlhTk56zEgJn/HwCQLXlHKCqyurEfLvitB/Z9ZEJ1z +O3+uYD1mT6dJ9H5kQW186VXn2+uxf+yU5cN3LNBzK8wTalyPG2g31TJesEBt +1YWs5JH12N18+2Z5AwskfY7HRWooY3qLjx4tlQUzora+ri3KmKFRMPhOlgXv +031dw/lU0V7F3JwiXgM236JsPlA3YB0XXp1eVQ2T/qsPc05uxJxteiL0axXE +/4AUd0qLGh4YedtcpFwGov+qZlZ/U8f4HN159rNbIJ9a5UilamAVu2l23rEU +8jbR14kFamJq8G3r/DXF0CFrZjh7TgvpugdbvcaLwFi+JUu7XxsdQsKdykMK +QIjnesTuBB0cjv2TEnrlCpDjFRjuqrp4M+RBYUBHLvCreN51fqyLs+kvHHf4 +XwAtpkxVlJcenjY68rMo+RyED4u22nLpo9exhomniRnwbTZ9h02ePsYV3G72 +nkuFzdqPLttoGuDpe+cKd/ImQdOsye+FbgNcwyO85LI9HkI19IZ6AgyxVOTw +BKkuBphTe16481OxOCX3rZB5FFgpS28VvE7Fe7JBc8wf4cD5+lBxTzEVr/Az +DJ5/DAfl2sM/6kupyFouWhE2EA4rbZ8WBJVRMfLtpHb3vXBoOZj8vZVDRc5T +TWvemHAwbZjLjX5Mxed5/9YFrQwHqnPP6KdJKoYpJn3vkQ+DjXFnjrbQaJj8 +K9NJpT8UGk1KVtkb09B3cKhPpD4UHBfun+9j0LDl60ol8fxQOBo6Xz5uRsPY +tJRh972h8MTTd0TInobvvUTjxxdCIIhOtd3lS0OuH2KmfAohcPv7iNxcKg3n +eh1GZ2L2g3oA/b7KEA2HYu8EtUQEwVklh1+Jr2kY2DGy09onCObe+hmODtMw +blw/Y8gmCJo80svyx2h44H3ODX2FIHB2fJsr9ZWGW9xUw252BMIxk6RD/FxG +aCDrujFDORCeiPQoflUxQrWLN6KE3gdAQFPQKU6YEb6OLPgyfNYfpkImoqwi +jDC79ltpVYw/HCUd2N8faYQXtj9sywr2hzMxB50XjxshLZjrd6KFP1QbR1IY +yUbE/rlZSnPRD/7cTWxsvWyEXMaRznF7/OB8Vf7c81YjPJPt1PFmy264X/hi +z4wEHQ+/795Kj/GGd/aKPpHSdOzz77w47eUNXD9D3H/L0lFBxsypBbzB3InP +YRWFjsd33e7n8HjDoxXGNBl1OlbXjvO/SPeCLr8CfjNTOlIfahZP3PCEIeV9 +lVl76ehRslVu4b0HzN1aXtCupePDtSuH8yt3wkdX68LTdXQM6rHZzJO3EwZX +ZmwZa6DjnsfGvdHxO6HBV/ZSTjMdH1yekL/hshMSpA2Nl9rpeHbs0lL/b1dY +l7ovpuM1HSuCU02at7qCRmAfVwC3Mb5NM7BnLLuAv0oZ/+Wtxvhq2FpLKMcZ +oh9671N1NMbRxYLN9gnOkBUg2slyNsZHsnpK10KdobHkWHrnTmMsccwcjtzs +DOKqW4SXdhvj1xVcT1f/coJHqh/EfSON8YFWVOIlPydQ36hAUS0wxjD56AY+ +M0eYUc+msqaNcY3dg8QVvvYw2IVWYrPE/fvcBQQs7KE5dGp7xLwxGum93qCp +ag+ZLJsw6i9jzP11pbdl0g7UjbnK63lMMH57R7HacTvwswlRbJU0QbqJplDv +VVt4Ebh57QuGCcawTl7jnd0C94p/j8ynmqD0FOVD6UcroFpELNimmeBY8vop +9WdWcGdkcm1hhgmuXBAfbK2zAhZ5mGZ73gSHM2zXGGRYQXlec0b+FRNMXiks +s9bQCgrTk+ibK00w7JCodXqqJZyOED6X12uCsUe9GzxMLWC1WGrp1z5ifsvu +yx7qFpBcw9VoPmiClVmL8qGSFnBqaubj5GsTFDD4Vdo1ZQ4ngl4wzD4S86W4 +WAUXmkO456Xxz4smeNbWf7MYnzl4WK5HEzIDbx2WcH8wgrD0YrVQK4WBnHVt +Mie6EQoDpl7ZrmfgvVOCAw4NCB+T66I8NjJwf8W5v5suIoS3b6s6psdA4zYm +b68NwhmHGPI9awYWqX/OSQ0BqHfr+2NwkIH2F5v5w5lM8Ppc39EYxkA345/i +pXJM4IouzLOMYGA2a3fT0k8GWF/Zb+ByjIGqHfRAqVoGPH+z4sDhRAaa/X0X +Oa3HgAk/rVc1uQw85823jqRrAnIhKXVazQxc2DPuEW9Nh8zlvYZpLQx88bnE +5706HbjPW9d8amNgh9O3BT9hOkzcXXW7sJ2Beyyj41mDRlDPdSpPtJeBm8bY +jnkHjMDjQlzUjw8MbMq9+zr4Eg3yGo4ZNq1h4pXXboZxvFRY6+BeIyvExE4Z +l4oNU4YQ985IM2odE8/Q7P791GcIQasWlXUkmLgr1bK8psQQaNsixa+Tieu3 +1h0PtjaE/tHw2SRdJhbo+Jq7phuAhMCBmq07mbjmfue7TDV9KLaIjZ52Z+Kz +DsOlYhF90IvNtMj2ZGL1Wmp8/089cJiu7hvczcTZ343b0jr0ILl//qf/ASZa +OV/8ZRSiB4vXT5pHxxP30/KOSK/VhSGT7N7SMiZKSqqbu/noQNCR4qs2lUxM +aDtfV2qrAz8q7wRMVjOR7UK2FKTqgKjS4ILuXSauLaNoKQnqgN1qkvz/mpk4 +c/MSteeoNjS+KN3T28fEs4u6+cWmWmArdE8zcpCJE69smjWktWBwc/sP6VdM +TBJ9szgyowlz9V9Svd8xcbXHyW/PSzRBs0in4vMEE3llfDrahTWhccgsMv0r +E++s6468M6EBtuLbQXuaifxzKi1dDzVgb8qRnoh54vnMvsXExmjAXHPyZalF +Jr51PJYl6aYBCb9y/et/MVHTi5Q2pK8B6wxua3gtMTHyqCO0C2tAfkj9/PIy +cT6g5uTol03wf/rEQIg= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07985451394052016}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07985451394052016}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VO0bB3BRRCH7OmMIRfZlxjDjvq1lSUhCtkioKBIlypKlLCmFNkuh +eu0zU7L8JLRYXiVZUim0SBIhWuR33r/O9bnOuZ7znPPc9/c8R9HvoHMANxcX +l+0KLq7/jj+G29uU04pNpcbLs+07rE1f5EsfMxtMAJpexoPBT8qAEk/9pAfP +w9WHXzfe+mQAkY7/DPAMXof01lKHpE+WIDIldf7nAAvezq77x+aTC7xtdDg4 +N9ACoeEJfxM+7gFr5Yk3MwPPYb6lJiVmLAJ+DtAuTg+Mgnhg/d9DA6eg1eJm +cc/1WVAetBs0jbsI8m/rPvppLIGD4nn1vrACED/g8w+fBQ9ar3H7YupcDOd1 +rRscdqzG7/k+TyUmbsHLPJ3mmXWCyM+MdnZqKYfLvWXCkSqCePZ7X+RcTzl4 +CG3w+UUXxM2WdvGZI+XwOpH0l9tfEKf4pOk3uSrgXagAQ/yOILaa7WrfZ1oB +45bva6nuQnjNy1WFdq8CFqdzq44XCaNTWfTZzuJKSCs++ZRbRgTdvlysvKBT +DbYGwaIS60Vw8MuBKElaNaxuc96xQVMEDx6bPprNrIZTYyqv7MxEsP7BKsWT +ttUQo9T18UKwCLJiN4zJ76mG0ELpv6r1xPn7n5TDcqrB6WqNht0uUZTp830U +sVANUhfGTmdfE8Ol6c7Imn9qQHrTnVOLpWJoJ6MSkl9VA7ItySe9qsVQpGhy +VQqnBsjTakc2tIph8u8SebumGlCxP+TbMC6G42nwLL+nBvRXLlHH9MVx66Hu +kcMLNbAtQvK9Xoc46tv4XOoBFjiuGR/O7RXHSGX5BV1LFjhfr3v557U4xhoU +fc7YwgLXZ55PH30Tx7eBD9OMnFjgpXGj3kNCAgsvKTW6+bFg/3vtcwm+EtjG +7ZLVlsiCFBcb0+c/JJA66Xl8SysLZDndstwrJFF5g6FjyGMWVIq5LOiukcSd +eyhf0jtZ0P/cu/qcgiR+/3s3vLGXBcpOEUpOWyRR7YTco9djLGjZWsD77JIk +1leYHlTiYcOS9Xz3vwwpNFJLe/6AyYas0uiyJWspPL/YtwvM2KDMy5Wq6SSF ++9Imymot2WD/UMAsI0AKV/IpF+XZseGyBYVtnymFb6JMP8i5s8EI7XI730qh +sMFj3o2H2XCYXuTTniCNEV8MG91usMG2UGjOLl0alf11Y5dL2KDEF5PafVEa +G1z31BXdYsOzF641vbek8WHuZPFgBRu0Dq3lGe6WxqWkzdvX3WPDeGlU6XdZ +GazKKw262cmG+4IfjI8oy2BejaggbzcbciKcny5oyiDr215932dssDLXXPyD +Mqj3rIKPr48N19+M2vAFyuCks8dr8jAbPMUdvsqxZXDGs+JW1Dc26B9viM9v +lEFj4a83M2fYIDC6UVLxkQz2SAXrFs2yoa6KB1RfymBOpv+HewtskLSry9JZ +lsHu4cER1jIx/3hlAys7WdQPKb/TI8QBy2+/okPHZDGtyMXvvhoHjm25oP5g +UhYnNvjomm3iQGWR5pDYD1ksLansbNLggLSLL71utRxmeHIHVGhzYPLewwUe +LTkM+iMKboYcyE7Iirh0VA4LF9cafwAOPHmlpjwZL4fqCtpSymYc+GPQ2mua +JodS7K5Ob3MO7P00r/f+mhzO0mubHltywNh+14xWqxxeN8HRQBsOjEqohrYJ +ymPmEZ3XI04ckDp4nyQlJY/cBd8vDDtzwP6J27/BFHl0s27SG9jOgbvRaRrC ++vKo7s+j2LiDA2feTk+4u8mj4ZbkERd3Dtw3OnO5fLc8hjR1vdLx4MDcufW2 +y/vksf2Bb8vqXRzwtnS9XRwrjxa1m9zKPTmgd7sh8Nt1eVQUKm9u8eFAIPcO +KfNyeey5w6Gd8OXA1V1Tjy7ckUcDeuF1w90c4BVSVDV+Io8c4HbL8+PAUHjy ++1NfifFygjw1Azgg3KVwYeCHPN74Zz7jCWFLlToLdS4SFp6xbfDZS7zvgS/X +n4qSkB66QzAhkAPxDKfdskYkPPU5qiwnmANbvPO/08xJ2MenqCi/jwNCcV8S +d9iT8E+K5MerhK+2JpVm+ZLwqKaZf9Z+Dvh/eE6r3EfC7KoNZJ4DHFDno7R3 +RpDwmO3/NMMI37Ot/8J7moSJ8fscIYQDJw/wxSpnk1D9NO4tIGyd6SJkfo2E +SifM+38RFqwuKvC5ScKkwt4ip1AOvOiZ0omtIeGrTreOG4SvzJq0XG4g4aMj +Rk4zhP0kTm+/95CEXeVDNOODHJh2Wx85+5KEW6aF1JsI10Yf4hN5T8JNAseM +fhI+cfV/eVpTJNzZvqNc+xAHrJoE1O0XSTigLJGym/DadzsbgrnJ2Fa8sSOT +cO+KEvuUtWQc8+WJqiV8ef33N8WSZNyxLHP2FWFfKzjYQiGjPXtU7DfhDYHp +XO/Uycg26eOVDOPAVOrLc0sGZBwd2ResQZjzj+p6OSAj7SiZaUr4eNdhjpEN +Mb7bgUQ7wuZTzVau28kYuec504Uw/zqhgcNeZCzjehbiRviZ7q6gc4FkHJH8 +KP6fc7ff+lkZRkY+sVyD7YS9j8yf6TpOxtWje7ttCKvkmstPJJHx2vTQmEnY +f/10toIvi4xDatGRaoTZQ69NVS6T8f18V4oo4eg/as/Mi8lYaOQls0A8jxk5 +ardvJRnR8a7GAOHV2PY99h4ZBcQDWlmEu3eLnLrSQsbXzxeGTxO+mOgtUddF +xm9Of+M8CXuWlJX295Nxbyd/mTphpceLtLl3ZPw+We49R6zH53GrdpEvZMzq +P36tjnC1QLaH9jwZhWTWBkcTjtJ498V+mYx1nLkWKmFTB83YffwKyCPdXT5F +rH/XuccFJSQFvC7YSP2vXrLZ4rqtGxRwQ+7qod9EPXn07W55p6uA33rviF0n +PC79572ctQKqP61xHCHqs8rYJpLuqIDTTRY7owlHeubw7fRQwL4Hjb+ECPMU +6qifD1XA/YU/yZuIeu94ENtQdVQB3RrW3GAR/ZA11mH/b4ICSgQUdRgSJm8I +OLg6VwG3jnGv0Sb6ybjyEufEfQVkZ1w++ZXoP8uB7qWpJwp48MzNXk/CDlwr +N/s8V8CTS1aB//Wrv3PoS/iggLeutDlf2EP0x3HFk3GrKBiT8Gb3MtH/ncKN +N4wEKGi/mPjSkbBjseuTaSEKfteZvpJP5MWuf9NEdktT8PKlR7zaRJ4cUvhx +w2wTBRMfu19dT+TNPDvryU9tCgKf5PmdRB5Fb9n0tcaAgjN0geEUIq+Swnyp +SqYUPBEXcOKNG1HvrR1PuJ0omPDgFr8XkXdtgQVfWyMpaLb5QHblVg7Y/KGL +xhyn4F5n96u37Il6yHpBNYijEPUiLlZgx4GXdfxxxacpODCwuC2eyNupNRGi +SVcpGB30r66cFZH31Vto1i0U/HP410SJCQeuWY7t+vuIgk010imBxkS9vIyN +u9tJwWTt6NsqdA5ocrPbVfsoeIlqlpJLJfrFheTJN07BgB3Fz510OXBgcSbu +iaAirvQ7zq+kSrz/sL2SH0UV0X+5anOGMlG/E0NlPNKKeHudU+acEgdKXrX2 +myopIqmKl1mrwIHhposad6iK6JHR4C4ow4FtSfTBIh9FPOEQ4vNXgMhr0Xjt +4zWK+PuUxWbuSTZwpc235d1VRJDvuvL9Mxu6efZ53G1QRAEtXsbbT2zYP++c +NPNQEccd9IMqxthQPKj8KnCIuN5ToZz0ivh+FjxJduFRwoNRDh3b2tnwc9O6 +Yc0dSlhoX/SEn9gv/LgmG6/voYQFR97kZBeyYU5YRZnuo4SuFDUp2Xw2TM3S +91kGK+HcaASVdIkNow3+PzxilXAH5damP5ls6LCrFUotUcKFz7eekaOJ/cp+ +bxidV0J2l7cSrwMbGGXlhTk56zEgJn/HwCQLXlHKCqyurEfLvitB/Z9ZEJ1z +O3+uYD1mT6dJ9H5kQW186VXn2+uxf+yU5cN3LNBzK8wTalyPG2g31TJesEBt +1YWs5JH12N18+2Z5AwskfY7HRWooY3qLjx4tlQUzora+ri3KmKFRMPhOlgXv +031dw/lU0V7F3JwiXgM236JsPlA3YB0XXp1eVQ2T/qsPc05uxJxteiL0axXE +/4AUd0qLGh4YedtcpFwGov+qZlZ/U8f4HN159rNbIJ9a5UilamAVu2l23rEU +8jbR14kFamJq8G3r/DXF0CFrZjh7TgvpugdbvcaLwFi+JUu7XxsdQsKdykMK +QIjnesTuBB0cjv2TEnrlCpDjFRjuqrp4M+RBYUBHLvCreN51fqyLs+kvHHf4 +XwAtpkxVlJcenjY68rMo+RyED4u22nLpo9exhomniRnwbTZ9h02ePsYV3G72 +nkuFzdqPLttoGuDpe+cKd/ImQdOsye+FbgNcwyO85LI9HkI19IZ6AgyxVOTw +BKkuBphTe16481OxOCX3rZB5FFgpS28VvE7Fe7JBc8wf4cD5+lBxTzEVr/Az +DJ5/DAfl2sM/6kupyFouWhE2EA4rbZ8WBJVRMfLtpHb3vXBoOZj8vZVDRc5T +TWvemHAwbZjLjX5Mxed5/9YFrQwHqnPP6KdJKoYpJn3vkQ+DjXFnjrbQaJj8 +K9NJpT8UGk1KVtkb09B3cKhPpD4UHBfun+9j0LDl60ol8fxQOBo6Xz5uRsPY +tJRh972h8MTTd0TInobvvUTjxxdCIIhOtd3lS0OuH2KmfAohcPv7iNxcKg3n +eh1GZ2L2g3oA/b7KEA2HYu8EtUQEwVklh1+Jr2kY2DGy09onCObe+hmODtMw +blw/Y8gmCJo80svyx2h44H3ODX2FIHB2fJsr9ZWGW9xUw252BMIxk6RD/FxG +aCDrujFDORCeiPQoflUxQrWLN6KE3gdAQFPQKU6YEb6OLPgyfNYfpkImoqwi +jDC79ltpVYw/HCUd2N8faYQXtj9sywr2hzMxB50XjxshLZjrd6KFP1QbR1IY +yUbE/rlZSnPRD/7cTWxsvWyEXMaRznF7/OB8Vf7c81YjPJPt1PFmy264X/hi +z4wEHQ+/795Kj/GGd/aKPpHSdOzz77w47eUNXD9D3H/L0lFBxsypBbzB3InP +YRWFjsd33e7n8HjDoxXGNBl1OlbXjvO/SPeCLr8CfjNTOlIfahZP3PCEIeV9 +lVl76ehRslVu4b0HzN1aXtCupePDtSuH8yt3wkdX68LTdXQM6rHZzJO3EwZX +ZmwZa6DjnsfGvdHxO6HBV/ZSTjMdH1yekL/hshMSpA2Nl9rpeHbs0lL/b1dY +l7ovpuM1HSuCU02at7qCRmAfVwC3Mb5NM7BnLLuAv0oZ/+Wtxvhq2FpLKMcZ +oh9671N1NMbRxYLN9gnOkBUg2slyNsZHsnpK10KdobHkWHrnTmMsccwcjtzs +DOKqW4SXdhvj1xVcT1f/coJHqh/EfSON8YFWVOIlPydQ36hAUS0wxjD56AY+ +M0eYUc+msqaNcY3dg8QVvvYw2IVWYrPE/fvcBQQs7KE5dGp7xLwxGum93qCp +ag+ZLJsw6i9jzP11pbdl0g7UjbnK63lMMH57R7HacTvwswlRbJU0QbqJplDv +VVt4Ebh57QuGCcawTl7jnd0C94p/j8ynmqD0FOVD6UcroFpELNimmeBY8vop +9WdWcGdkcm1hhgmuXBAfbK2zAhZ5mGZ73gSHM2zXGGRYQXlec0b+FRNMXiks +s9bQCgrTk+ibK00w7JCodXqqJZyOED6X12uCsUe9GzxMLWC1WGrp1z5ifsvu +yx7qFpBcw9VoPmiClVmL8qGSFnBqaubj5GsTFDD4Vdo1ZQ4ngl4wzD4S86W4 +WAUXmkO456Xxz4smeNbWf7MYnzl4WK5HEzIDbx2WcH8wgrD0YrVQK4WBnHVt +Mie6EQoDpl7ZrmfgvVOCAw4NCB+T66I8NjJwf8W5v5suIoS3b6s6psdA4zYm +b68NwhmHGPI9awYWqX/OSQ0BqHfr+2NwkIH2F5v5w5lM8Ppc39EYxkA345/i +pXJM4IouzLOMYGA2a3fT0k8GWF/Zb+ByjIGqHfRAqVoGPH+z4sDhRAaa/X0X +Oa3HgAk/rVc1uQw85823jqRrAnIhKXVazQxc2DPuEW9Nh8zlvYZpLQx88bnE +5706HbjPW9d8amNgh9O3BT9hOkzcXXW7sJ2Beyyj41mDRlDPdSpPtJeBm8bY +jnkHjMDjQlzUjw8MbMq9+zr4Eg3yGo4ZNq1h4pXXboZxvFRY6+BeIyvExE4Z +l4oNU4YQ985IM2odE8/Q7P791GcIQasWlXUkmLgr1bK8psQQaNsixa+Tieu3 +1h0PtjaE/tHw2SRdJhbo+Jq7phuAhMCBmq07mbjmfue7TDV9KLaIjZ52Z+Kz +DsOlYhF90IvNtMj2ZGL1Wmp8/089cJiu7hvczcTZ343b0jr0ILl//qf/ASZa +OV/8ZRSiB4vXT5pHxxP30/KOSK/VhSGT7N7SMiZKSqqbu/noQNCR4qs2lUxM +aDtfV2qrAz8q7wRMVjOR7UK2FKTqgKjS4ILuXSauLaNoKQnqgN1qkvz/mpk4 +c/MSteeoNjS+KN3T28fEs4u6+cWmWmArdE8zcpCJE69smjWktWBwc/sP6VdM +TBJ9szgyowlz9V9Svd8xcbXHyW/PSzRBs0in4vMEE3llfDrahTWhccgsMv0r +E++s6468M6EBtuLbQXuaifxzKi1dDzVgb8qRnoh54vnMvsXExmjAXHPyZalF +Jr51PJYl6aYBCb9y/et/MVHTi5Q2pK8B6wxua3gtMTHyqCO0C2tAfkj9/PIy +cT6g5uTol03wf/rEQIg= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07985451394052016}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07985451394052016}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994352147654714*^9, 3.994355160218775*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"c71cd7d5-3d7f-4c55-b615-2d4298a4c240"] }, Open ]], Cell[CellGroupData[{ @@ -7646,18 +8664,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[100]:=",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6110302195572928`*^-151\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 17, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943521478398314`*^9, 3.994355160399129*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"f983c0e8-c0af-46cc-9618-c35a9eb955d3"], -Cell[BoxData["15.784298544249623`"], "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.320731401661125`*^-154\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 18, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943521478398314`*^9, 3.994355160409212*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"ca594224-71d0-4a37-b108-a6526082f2f9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0525656062438877`*^-156\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 19, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943521478398314`*^9, 3.994355160418808*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"a00420b6-0ba5-4d92-9355-c1637a089f7a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 100, 20, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943521478398314`*^9, 3.99435516042982*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"250201e5-cc90-40ea-b8a8-539a6b1a57a5"], + +Cell[BoxData["9.517367922007605`"], "Output", + CellChangeTimes->{3.994352236378215*^9, 3.9943552562693*^9}, + CellLabel-> + "Out[100]=",ExpressionUUID->"454336c4-08bf-4879-93ec-5c3e313d0eac"] }, Open ]], Cell[CellGroupData[{ @@ -7724,27 +8799,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850595832054*^9, - 3.991850600247154*^9}},ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-\ -8e83e9537fdc"], + CellChangeTimes->{{3.991850595832054*^9, 3.991850600247154*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56921c73-2b67-0e4a-9808-5f61de992c7e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.0725482683950067`*^-200\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 21, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943522364501143`*^9, 3.994355256352729*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"6e7caf53-2ea3-4d6a-8f9c-9b36478afeb5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.8899635870688992`*^-204\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 22, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943522364501143`*^9, 3.994355256362365*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"f6582a37-fdbc-402b-89c9-5262453f66c9"], -Cell[BoxData["0.009432406283458074`"], "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.041751347546146`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 23, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943522364501143`*^9, 3.994355256372655*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"82b06813-496c-4b95-ba78-273c74065f05"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 101, 24, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943522364501143`*^9, 3.9943552563811607`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"6f7915ae-896b-44ef-9db4-5de6e50c55e4"], + +Cell[BoxData["0.668579649214743`"], "Output", + CellChangeTimes->{3.994352247649457*^9, 3.9943552682656527`*^9}, + CellLabel-> + "Out[101]=",ExpressionUUID->"59270142-d16a-4bc8-bab9-cd67742257b2"] }, Open ]], Cell[CellGroupData[{ @@ -7765,8 +8888,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7811,27 +8933,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850617546938*^9, - 3.991850621692934*^9}},ExpressionUUID->"ccaee6a3-c390-0444-bf16-\ -3471356a3614"], + CellChangeTimes->{{3.991850617546938*^9, 3.991850621692934*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"1795c3b9-0182-224c-b986-6414d6712c04"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.0725482683950067`*^-200\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 25, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435224770564*^9, 3.9943552683204823`*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"863ede35-8302-4056-ac20-ece0d8eca872"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c3b31753-a67f-9b45-b822-068e1df11f68"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.8899635870688992`*^-204\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 26, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435224770564*^9, 3.994355268331024*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"520cd53d-b916-4a10-a590-8703521a7b71"], -Cell[BoxData["5.210321944589433`"], "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.041751347546146`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 27, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435224770564*^9, 3.994355268341002*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"9fddddb2-3c56-4d4f-909b-644249618d44"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 102, 28, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435224770564*^9, 3.9943552683492813`*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"3831f1a7-f6b9-49a6-9929-6f8f51701471"], + +Cell[BoxData["26.278830445343434`"], "Output", + CellChangeTimes->{3.994352258231371*^9, 3.994355279399671*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"c8892929-d005-43e5-94e7-5977a8b44af9"] }, Open ]], Cell[CellGroupData[{ @@ -7852,8 +9022,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7898,27 +9067,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918506254460773`*^9, - 3.991850628958872*^9}},ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-\ -286954db37c5"], + CellChangeTimes->{{3.9918506254460773`*^9, 3.991850628958872*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.0725482683950067`*^-200\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 29, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352258304163*^9, 3.994355279473733*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"ae3d33d8-15d6-4574-9edf-cf2b3722fbdd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4e2b22f2-1724-7649-93fc-33cd27bb415e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.8899635870688992`*^-204\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 30, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352258304163*^9, 3.994355279485722*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"acc22f74-1e9b-4c36-b10b-5494c75332a2"], -Cell[BoxData["20.308521034293705`"], "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.041751347546146`*^-209\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 31, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352258304163*^9, 3.994355279494903*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"27bd2c55-e014-4ba9-adf6-aee8626209b9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 103, 32, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352258304163*^9, 3.994355279504971*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"0f7cebf8-bf24-4eee-9c4e-4418b5952ce6"], + +Cell[BoxData["3.9147076474766402`"], "Output", + CellChangeTimes->{3.9943522670941143`*^9, 3.994355289008251*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"c012e8fe-3092-4e90-9715-beffc0eda013"] }, Open ]], Cell[CellGroupData[{ @@ -7927,19 +9144,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918506775260105`*^9, - 3.9918506840946693`*^9}},ExpressionUUID->"7ec678fd-8398-414a-aeba-\ -20e078d734cd"], + CellChangeTimes->{{3.9918506775260105`*^9, 3.9918506840946693`*^9}}, + CellLabel-> + "In[104]:=",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[BoxData["0.0009169614351270098`"], "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[BoxData["0.06591746078817601`"], "Output", + CellChangeTimes->{3.994352267138062*^9, 3.994355289058782*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"af328f6d-0b04-441c-a64a-9ab41ec8e29a"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918506873951664`*^9, 3.991850690050791*^9}, - 3.9919245116307106`*^9},ExpressionUUID->"ca329276-48d7-8943-8408-\ -dd2997d3499c"], + 3.9919245116307106`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ @@ -7960,10 +9181,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Il", "*", "Ih"}], - RowBox[{"Il", "+", "Ih"}]]}]}]], "Input",ExpressionUUID->"681c316f-cd82-\ -ae4b-824f-5eb2b3081f6d"], + RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", + CellLabel-> + "In[106]:=",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[BoxData["5.744985073726742`"], "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[BoxData["4.62164128149918`"], "Output", + CellChangeTimes->{3.9943522671609383`*^9, 3.994355289084025*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"344f5297-dfe6-4de5-a974-66635873116b"] }, Open ]], Cell[CellGroupData[{ @@ -7971,10 +9196,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb2"]]}]], "Input",ExpressionUUID->"11e77a67-96b2-a645-\ -89cd-559587f30b91"], + FractionBox["Kb", "Qb2"]]}]], "Input", + CellLabel-> + "In[107]:=",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[BoxData["1.564995573098341`"], "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[BoxData["2.9089950122919923`"], "Output", + CellChangeTimes->{3.994352267175561*^9, 3.9943552890999727`*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"6c6f0097-e12a-43e8-92bc-a1a62562cce7"] }, Open ]], Cell[CellGroupData[{ @@ -7982,10 +9211,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"3c5f43e9-\ -afc4-be40-8f37-0116656ecd38"], + RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[108]:=",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[BoxData["8.990876207898397`"], "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[BoxData["13.444331436483886`"], "Output", + CellChangeTimes->{3.994352267189384*^9, 3.994355289118088*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"105e672c-81ef-478e-b000-d824670daf3c"] }, Open ]], Cell[CellGroupData[{ @@ -8173,10 +9406,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"f07a8476-d7bc-1049-\ -82a6-7cf06f61e28f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[109]:=",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[BoxData["0.06921475857237179`"], "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[BoxData["0.008479835979045608`"], "Output", + CellChangeTimes->{3.994352267206559*^9, 3.9943552891376133`*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"f69e7bde-e942-4135-9769-19d2481456f5"] }, Open ]], Cell[CellGroupData[{ @@ -8188,18 +9425,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"b88b1a94-\ -22d7-2843-88e3-f607b95c8af9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[110]:=",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"def6b331-c871-b04d-a16e-4fc00b03d009"], - -Cell[BoxData["3.36857007702114`"], "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[BoxData["9.623902503810296`"], "Output", + CellChangeTimes->{3.994352267379712*^9, 3.994355289332966*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"f1f31d17-315b-4c10-9735-cf76e23cd693"] }, Open ]], Cell[CellGroupData[{ @@ -8389,10 +9622,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"9d771aab-c0b4-f24c-\ -9b53-9472e00c4d82"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[111]:=",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[BoxData["0.01179213875658184`"], "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[BoxData["0.07291478005636058`"], "Output", + CellChangeTimes->{3.994352267399415*^9, 3.994355289354327*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"5a9c3718-3231-4a8f-9c06-8cf0908e7fac"] }, Open ]], Cell[CellGroupData[{ @@ -8404,18 +9641,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"47e2a8e8-\ -6af3-374f-9eea-9c2b6faaaf4a"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[112]:=",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c6c8676e-4601-144e-b83c-769e22949175"], - -Cell[BoxData["8.161099076568318`"], "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[BoxData["3.2819892607453394`"], "Output", + CellChangeTimes->{3.994352267582649*^9, 3.994355289542914*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"72e90a74-6d0b-48fb-8a74-b1a17e752dea"] }, Open ]], Cell[CellGroupData[{ @@ -8506,10 +9739,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-\ -6b0985b9b3bc"], + ")"}]}]}]], "Input", + CellLabel-> + "In[113]:=",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[BoxData["0.04840187632890963`"], "Output", + CellChangeTimes->{3.99435226760039*^9, 3.9943552895609617`*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"5515bd2d-f046-4dde-b117-4aaa7e4aee5e"] }, Open ]], Cell[CellGroupData[{ @@ -8597,10 +9834,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-\ -4868d83e9702"], + ")"}]}]}]], "Input", + CellLabel-> + "In[114]:=",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[BoxData["0.9515981236710904`"], "Output", + CellChangeTimes->{3.994352267618372*^9, 3.994355289577283*^9}, + CellLabel-> + "Out[114]=",ExpressionUUID->"6be742ae-3069-40b8-afb5-83b2c85b947a"] }, Open ]], Cell[CellGroupData[{ @@ -8721,10 +9962,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"5caf1614-7e5c-\ -9940-98cd-9460e2c074b2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[115]:=",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[BoxData["0.046059134696750575`"], "Output", + CellChangeTimes->{3.9943522676362267`*^9, 3.994355289598518*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"7090061f-47e6-4a01-88ec-72c0634a3adf"] }, Open ]], Cell[CellGroupData[{ @@ -8786,27 +10031,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991850710120125*^9},ExpressionUUID->"db0784f6-51d0-fd44-b0e8-\ -05d6af1a6e52"], + CellChangeTimes->{3.991850710120125*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7fd60dea-f794-4744-8801-bfb1a50a0e07"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0338735880605976`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 33, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352267656672*^9, 3.99435528962432*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"16902a68-0980-4826-b3a3-34526b8408f1"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0b8c0718-41d2-4542-8afe-212a15805650"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.586624750046517`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 34, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352267656672*^9, 3.9943552896343727`*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"9af80ce5-b5b7-442c-880b-cab0fc42f2d8"], -Cell[BoxData["3.3685700770211437`"], "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.534528806561327`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 35, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352267656672*^9, 3.994355289647149*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"d4fc2278-2389-412b-869d-f5aada2934fc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 116, 36, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352267656672*^9, 3.994355289657967*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"e433a1f9-aa75-4405-b426-cfb5e83a1188"], + +Cell[BoxData["9.623902503810301`"], "Output", + CellChangeTimes->{3.9943522751642523`*^9, 3.994355297675815*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"11cc68bf-9d50-4f7a-83d6-3f9fb9f49f64"] }, Open ]], Cell[CellGroupData[{ @@ -8868,27 +10161,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507152152424`*^9},ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-\ -f69c33a31448"], + CellChangeTimes->{3.9918507152152424`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b6f0ccc2-ff83-124b-a341-e143319c7670"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0338735880605976`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 37, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352275217037*^9, 3.994355297734476*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"12d081bb-97a4-487b-99ca-6e2cc7ddda6d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.586624750046517`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 38, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352275217037*^9, 3.99435529774541*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"9f00829b-8906-416e-b66d-52837b904e72"], -Cell[BoxData["8.161099076568323`"], "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.534528806561327`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 39, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352275217037*^9, 3.994355297756528*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"1506b0ee-423e-47b0-aaa9-0d8dbbc35dce"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 40, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994352275217037*^9, 3.9943552977668333`*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"689a0354-c1e8-4cb7-9649-27b5b3923c36"], + +Cell[BoxData["3.2819892607453394`"], "Output", + CellChangeTimes->{3.994352282681569*^9, 3.994355305816267*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"1c755f9e-51f9-4501-b4e1-69135427789e"] }, Open ]], Cell[CellGroupData[{ @@ -8946,489 +10287,394 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507183992805`*^9},ExpressionUUID->"611f92ea-b199-2643-9788-\ -194fae57c34e"], + CellChangeTimes->{3.9918507183992805`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7797a546-4085-124a-83da-5f3c472cdc4c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"ca7472ca-7b27-a54a-84a1-e603fa592207"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-\ -49e8ffb5e8c8"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk4Fe0bB3BrG4psoZStX0eIQyHquW3Jmki2QmcZSyVRQiIVvS0kS7xv +StnplD1bKZG8CMVbUqJwjn3LhGy/xx9zzfW5npl7vvf9zDUjRztjy+Th4uIa +wMfK+Wyz2v9KW5v356g2WvDPstH+sfTdNGMW+sYwvrjinpQ98YrGL5BxC2vt +KmwbxvtVgppvke8ZvpkVFwSG1fAbNyEvMwujNdg36ja9Dsv9gOTp4WNrsctb +zz5coP6H5moyZwWwhzobQoIqO9D285Un1mNL9yu4/Db6hmjhrygi2BbjIbr+ +Td3IiCy0EcOuWhgSCMz9gcq+J3ySxP4ULnnxuU8vKrHyrJTBHltlPDRN7Ufx +dsrLW7FX3fZ10pxho2u83x4rYsuKPKg/WzmAtP0upVGwrWV+Z44ZjSA6506N +FjbxSF5Cdc0Yyt7K/XMvdpjSoYiTTePIPZjmZoDdIdmucS53Eu0U+h1wCJvh +7O0Vd3sK2V/bIeKAPZHM9bjQ5xfSSbZY54a9Rl5VeJJKoof7GVK+2PGMGlNh +8d8oRNx5VxD2tiynsF0zv1G/kkH6FWwdlcix05WzSOdhb+49bM893U1DRguI +OhO6swZ7OvA837rtiyg7iVe3BftypYA+Zc0SejcdnPEVOwl0nng0LaN9Lw3v +kyv5MuqN/XK5wUFw3x/VOTbKrYvrCZfhAVXy+LI+9gTHNeTubR4YuupPt8QO +USaL8n14wT770sFT2PF5cgrjVH7IXBCPzMfubB2pWkrjB/+53itvsLdNlTqv +F18FVpPZ39uxWVrWsaozq0Bos1TRH+za8mDuU5VrYOnV/RbzP2xE1rR1DxgJ +QldF8OcF7I2WgsIXqwThi5hro8Q8G6m3G4OQrhAoaPeraWB795U80lBbD7e5 +fhh7YPvyNKnvExSGHKeHrA7sfvlnkxG/RSCEUnKydQHPh2hY26K5EYR7pJ0n +sXmesOU2nd0IPuJqZRsXcV7Nrba5wxvhQrlbzVFsZ6OYwuYeUYiM4pXow26h ++/lLNopD4/IkS3SZjb5nRd9yXyMBV7wi7+lhjwznpuWYSMBLs/ZxOva6c71t +eq8l4Gt5ymQJtvG1I1ruJZKwflSQ6sbFQRXpe8jsFCkQus2XVcfNQen9fwL2 +ntsCGukLHoN8HHTQ/vp3/6db4LXJYLEMPweN1IoeeMreArLfHOnW2FrpKuLb +nGSBGVLbV4xdS3Mt4t+/FZr/sIMiV3HQ1HjPhYGr2yC/izKmt4aDRE8bFxdZ +yUO9SgT/hAAHsdPXedp4y0NL3ZNraoIcVPatVWY0Uh7eyZ1nnsY+Znn86vbX +8iAWPm0xgp2+M8D2b6oC0ITfssaE8POHsiZCJRWheT2ril+Yg454CKia/1CC +Bc/OnZfEOAgF2FMdFpVAvCLEqw5bOSJFmyG1HaJjZfiFxTmIK03TMPTwdiCr +7I6mYz/97uJQWL0dLJJb3T9IcNCqo6xw6dT/QeFHccl9UjifsdWnIRoFlvX6 +RFxkOSjNLvHrTCgFIu/dFcnHjqb96OG7T4EsZ+YZ/q0cxLh8fli2jQKL5REm +BdgiLx5w2RkpA8Plg4uQHAd5a44pVyrsBOvOdo3PChwkI38n7FafCpAfvkQV +UDjoxc1pyhyPKgTIukVJK+N5/HJqJ+RU4WFm//xV7Ie1ihRDV1U45bOk5LiT +g+Q9Kj7OflaFVPfEZ/yquF9WvxLRqAb/9ajHnVfnoC0yssQ2J3Xw880vy9bm +IJWMc4LziAqkJv/EMVMOojGukqrWVHD7ptPTgZ2kEPvd/RgV+vruadgf5CDe +1Lz8ukAqPJ7/MmNtxkGdD4eOxBZQQaW+aKOpBQfdSHJ/QFHQBPbc+atmh/D+ +3rJUc1ylBRQbP7dEBw567KdoU9K0G+qmvwc4eHFQawDSvpahC/7Bag4bEjhI +zvU/6+On9sH2W3whXO84iLn8/NmWIIBHS+XB7HkOkhwuWy1JMwQf/9gfGvoD +6Jym/rdYZWOo3nwi8W3oAKKNLtSLDpkAx34hS6duAD019F+d0mIKMbU7Coul +B1H6tHc1K94MZqUckqV8B9Gswab3tWEWUGul7/m5bRB1cfFO/jhhBZ0yUhtW +7xtCPpvPxIQrHIKrrwTc/skYQs+86l8nRNhAcfaVjPWywyj4l9TMTq/DkPC5 +kro6YRiR5geOvnOzhe42aefZzSNI1+WuQf9hOyg8Ju/okTOCPko98K7VPALT +41uPX6COIunMqy+yd9hD96GexdPvR1FZj7KltdBR0OJ3mWumjyHZ9gmPgNGj +cKW08pfBwhjSTLjLSutxgK9EhVhH5jh6wPdLLbbGEeDVnVpdpQn03GBXZ0S5 +EzwTD2hZCJtASdo3RRZynUFbu0G8q3MCtXzNiNS87QKDuoc7OtQn8X8pWdH3 +8jGI2l39cD56Ek2etuPyYRyH3FvJC/s4k4g8QPEcM3KFSVVd2Zx9Uyh79Mus +/x43mIjJ+Kf6nynk+DiDflzQHYTMzl7wnphCRYUWbrzX3YHn372CFha/kK7M +x7kbc+5gZrXHN+3BL6TQ49H5wesEDMTZitGGf6E+gZOHkntPQFQSZzRTbxq1 +RlvTTe1pwOgvvSt2ZRrFB6YInG+lwcmXkPKmfhq9qFqeo5vRYY62Sef5ahJt +OAbXNSvocLlQ86awPom2ib1r2fyCDsl8u3T7sdWbrDatqqKDcaO6d/k+Etnq +u+R0VNNBaiDjsDsiUfzmgMZL/9KBMTyqkW1IIumuJxvqO+gQ/XFCbJsZiRRd +JZOOzdBhJC3XJs+eRLruY9kRWgyQij1tYHSaRJl/T/hb72EAX9tZm2Fssbap +/ZI6DHCLZA7G+pBozGSmPVuPAeF52WU9Z0j8/eLibjJkgP77sH8D/Ei0fkbE +aeNhBjxVKr9/+wKJ+qJ2r005zYBhSSNwDSdRdGWIV1kmAyQNTpTExZHoNDVR +NzAb39+q9Vw6nkSWOQVrdXIZsBSggx5jr0tk55Q+ZUB5+flBVgKJIvxshp4X +M2DNT7vkqkQShVAUT5a8YcAvqb2ejfdJ5J3YeKrwO75emsZ9M41EZuvZ+n49 +DLhT/KWLO51EOyK4hKg/sZM+oiBstt/upwX9DFBizMQRGSQ6YZ0ymj/CgFnr +r8F6WSRy5Pf3yfvDgDfVVRrNuSQy9Zf2ZUkwoVsz9uW9AhK9SYk0j93EhBia +1OLqQhLpN00pBkozwWrxUU4gtrpS4xcjWSbETh81cywikdTni0ZflZjw+trQ +I+ESEg3v7ZJYt5sJReNnHzDLSHSH59FLDzsmCLoMaz+qwv3vEkyysmeCkd6b +0SXsay6BfpoOTODrnhc6/opEgcU2/1t2ZkKttUWU5Gucn+C+e4/GhD5zy4iI +ahJpNtAYb88yIcywxtyklkSf7yoJKMTg/JylfLt/SfQMCXkO3GWCRubhK/9g +Xxudrn0ax4RIo9CWHmyqWW2oTiITbA9rdp1swPvHRZ+yesgED72S2ouNJDpw +5tGXQBbO9yer/Mp7Em3Z8tee/c+YEJo3ZViNPd1wJo43nwlL0c6my9ip25FV +dBETFBvsq4OaSbTY1fU6rYIJvrsbAz1bSFRsKZPdXM+EBzGRIyofSHTrDw9/ +fAOez/cn8nRsWvbQCacmJkR1H2xLwhbmq5Dpa2HCjZaaNJ6PJDpV6Xhn7hMT +uD1LuVqxFZTvBSj2MyH7Q2Hq4XYS/fl8qW2QzQThHQIhYditEUz1vAEm1OtY +tbCwQ39oDemOMEHW1KeX/z8SdSa1HT/0iwmqwabVBdixq0VMgrkJ2HvsleXE +JxK9mOpyOcdLQEh9uKj0ZxJxunL9fPgJ+Ln6b6oRtn6x8SPaWgLeXnscFIfN +dg+cNxch4ImOgrJKB85vabLRRJSA+fm4QhtsPe2NFCROwFmaWNw57Bgh1lFN +KQIkjBWPVaysV3QXyMgRIFWQI7T/C4mIDFa9uAIBHd2v7I9jx8QEdW9QIoD6 +MYe8iM0mRIX4KARc/tylX7qyLmrqOaJOwNWTwgNKnSSqWBINY1MJ+KtMaAxh +9w/2JPRoEXDDgGXhhL33dXBNuw7u99ZzoZvYfaeeyb4EnKfRm9WLvd7x4u5S +QwKuv/rqM4uta3TQssCYgNi62r8Ev+L3RepnUMZBAn7D6BsqdhlfXkyKOQF+ +Koq9xti94xez/rYk4Jv0G+ej2Dp14v9F2RBAiVawuYBNK/g5fN2WAHZp9/tI +7KjkPJ4rRwgwVptOTcD+6WemHuBIgNPAJrsCbCFXCVNfZwI+LcqrVa3UM+s9 +7n0M98cb5N6wcv/WS7dc3QnYJrfU0LOSZ515qiONgHHtHbzDK/VIiXJbBt4v +/fjY6ZV6P3pbLAkC9IUgaHGlXlM++4AnAfdYlFL+bzhf6aVF8CbgjdEhSyHs +qFRzMb1TBLjI5emIYZdFSe7c7UNAerlpiDT2z8A+g12+BCRkSkpuwxZkFDhS +/AhoztqyVglb+1DoGYVzBGSmOtpSVurvtYjcEkDA5tR3UyrYt5U2PZAMxPP6 +5DW0C/u5cH+RSDABton7danYP+YLGgRCCIhyM+nWXKnPCf3BH0qAzYdL37Sw +93y0mF0OI0C4mKO+G/v/kNogqA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk4Fe0bB3BrG4psoZStX0eIQyHquW3Jmki2QmcZSyVRQiIVvS0kS7xv +StnplD1bKZG8CMVbUqJwjn3LhGy/xx9zzfW5npl7vvf9zDUjRztjy+Th4uIa +wMfK+Wyz2v9KW5v356g2WvDPstH+sfTdNGMW+sYwvrjinpQ98YrGL5BxC2vt +KmwbxvtVgppvke8ZvpkVFwSG1fAbNyEvMwujNdg36ja9Dsv9gOTp4WNrsctb +zz5coP6H5moyZwWwhzobQoIqO9D285Un1mNL9yu4/Db6hmjhrygi2BbjIbr+ +Td3IiCy0EcOuWhgSCMz9gcq+J3ySxP4ULnnxuU8vKrHyrJTBHltlPDRN7Ufx +dsrLW7FX3fZ10pxho2u83x4rYsuKPKg/WzmAtP0upVGwrWV+Z44ZjSA6506N +FjbxSF5Cdc0Yyt7K/XMvdpjSoYiTTePIPZjmZoDdIdmucS53Eu0U+h1wCJvh +7O0Vd3sK2V/bIeKAPZHM9bjQ5xfSSbZY54a9Rl5VeJJKoof7GVK+2PGMGlNh +8d8oRNx5VxD2tiynsF0zv1G/kkH6FWwdlcix05WzSOdhb+49bM893U1DRguI +OhO6swZ7OvA837rtiyg7iVe3BftypYA+Zc0SejcdnPEVOwl0nng0LaN9Lw3v +kyv5MuqN/XK5wUFw3x/VOTbKrYvrCZfhAVXy+LI+9gTHNeTubR4YuupPt8QO +USaL8n14wT770sFT2PF5cgrjVH7IXBCPzMfubB2pWkrjB/+53itvsLdNlTqv +F18FVpPZ39uxWVrWsaozq0Bos1TRH+za8mDuU5VrYOnV/RbzP2xE1rR1DxgJ +QldF8OcF7I2WgsIXqwThi5hro8Q8G6m3G4OQrhAoaPeraWB795U80lBbD7e5 +fhh7YPvyNKnvExSGHKeHrA7sfvlnkxG/RSCEUnKydQHPh2hY26K5EYR7pJ0n +sXmesOU2nd0IPuJqZRsXcV7Nrba5wxvhQrlbzVFsZ6OYwuYeUYiM4pXow26h ++/lLNopD4/IkS3SZjb5nRd9yXyMBV7wi7+lhjwznpuWYSMBLs/ZxOva6c71t +eq8l4Gt5ymQJtvG1I1ruJZKwflSQ6sbFQRXpe8jsFCkQus2XVcfNQen9fwL2 +ntsCGukLHoN8HHTQ/vp3/6db4LXJYLEMPweN1IoeeMreArLfHOnW2FrpKuLb +nGSBGVLbV4xdS3Mt4t+/FZr/sIMiV3HQ1HjPhYGr2yC/izKmt4aDRE8bFxdZ +yUO9SgT/hAAHsdPXedp4y0NL3ZNraoIcVPatVWY0Uh7eyZ1nnsY+Znn86vbX +8iAWPm0xgp2+M8D2b6oC0ITfssaE8POHsiZCJRWheT2ril+Yg454CKia/1CC +Bc/OnZfEOAgF2FMdFpVAvCLEqw5bOSJFmyG1HaJjZfiFxTmIK03TMPTwdiCr +7I6mYz/97uJQWL0dLJJb3T9IcNCqo6xw6dT/QeFHccl9UjifsdWnIRoFlvX6 +RFxkOSjNLvHrTCgFIu/dFcnHjqb96OG7T4EsZ+YZ/q0cxLh8fli2jQKL5REm +BdgiLx5w2RkpA8Plg4uQHAd5a44pVyrsBOvOdo3PChwkI38n7FafCpAfvkQV +UDjoxc1pyhyPKgTIukVJK+N5/HJqJ+RU4WFm//xV7Ie1ihRDV1U45bOk5LiT +g+Q9Kj7OflaFVPfEZ/yquF9WvxLRqAb/9ajHnVfnoC0yssQ2J3Xw880vy9bm +IJWMc4LziAqkJv/EMVMOojGukqrWVHD7ptPTgZ2kEPvd/RgV+vruadgf5CDe +1Lz8ukAqPJ7/MmNtxkGdD4eOxBZQQaW+aKOpBQfdSHJ/QFHQBPbc+atmh/D+ +3rJUc1ylBRQbP7dEBw567KdoU9K0G+qmvwc4eHFQawDSvpahC/7Bag4bEjhI +zvU/6+On9sH2W3whXO84iLn8/NmWIIBHS+XB7HkOkhwuWy1JMwQf/9gfGvoD +6Jym/rdYZWOo3nwi8W3oAKKNLtSLDpkAx34hS6duAD019F+d0mIKMbU7Coul +B1H6tHc1K94MZqUckqV8B9Gswab3tWEWUGul7/m5bRB1cfFO/jhhBZ0yUhtW +7xtCPpvPxIQrHIKrrwTc/skYQs+86l8nRNhAcfaVjPWywyj4l9TMTq/DkPC5 +kro6YRiR5geOvnOzhe42aefZzSNI1+WuQf9hOyg8Ju/okTOCPko98K7VPALT +41uPX6COIunMqy+yd9hD96GexdPvR1FZj7KltdBR0OJ3mWumjyHZ9gmPgNGj +cKW08pfBwhjSTLjLSutxgK9EhVhH5jh6wPdLLbbGEeDVnVpdpQn03GBXZ0S5 +EzwTD2hZCJtASdo3RRZynUFbu0G8q3MCtXzNiNS87QKDuoc7OtQn8X8pWdH3 +8jGI2l39cD56Ek2etuPyYRyH3FvJC/s4k4g8QPEcM3KFSVVd2Zx9Uyh79Mus +/x43mIjJ+Kf6nynk+DiDflzQHYTMzl7wnphCRYUWbrzX3YHn372CFha/kK7M +x7kbc+5gZrXHN+3BL6TQ49H5wesEDMTZitGGf6E+gZOHkntPQFQSZzRTbxq1 +RlvTTe1pwOgvvSt2ZRrFB6YInG+lwcmXkPKmfhq9qFqeo5vRYY62Sef5ahJt +OAbXNSvocLlQ86awPom2ib1r2fyCDsl8u3T7sdWbrDatqqKDcaO6d/k+Etnq +u+R0VNNBaiDjsDsiUfzmgMZL/9KBMTyqkW1IIumuJxvqO+gQ/XFCbJsZiRRd +JZOOzdBhJC3XJs+eRLruY9kRWgyQij1tYHSaRJl/T/hb72EAX9tZm2Fssbap +/ZI6DHCLZA7G+pBozGSmPVuPAeF52WU9Z0j8/eLibjJkgP77sH8D/Ei0fkbE +aeNhBjxVKr9/+wKJ+qJ2r005zYBhSSNwDSdRdGWIV1kmAyQNTpTExZHoNDVR +NzAb39+q9Vw6nkSWOQVrdXIZsBSggx5jr0tk55Q+ZUB5+flBVgKJIvxshp4X +M2DNT7vkqkQShVAUT5a8YcAvqb2ejfdJ5J3YeKrwO75emsZ9M41EZuvZ+n49 +DLhT/KWLO51EOyK4hKg/sZM+oiBstt/upwX9DFBizMQRGSQ6YZ0ymj/CgFnr +r8F6WSRy5Pf3yfvDgDfVVRrNuSQy9Zf2ZUkwoVsz9uW9AhK9SYk0j93EhBia +1OLqQhLpN00pBkozwWrxUU4gtrpS4xcjWSbETh81cywikdTni0ZflZjw+trQ +I+ESEg3v7ZJYt5sJReNnHzDLSHSH59FLDzsmCLoMaz+qwv3vEkyysmeCkd6b +0SXsay6BfpoOTODrnhc6/opEgcU2/1t2ZkKttUWU5Gucn+C+e4/GhD5zy4iI +ahJpNtAYb88yIcywxtyklkSf7yoJKMTg/JylfLt/SfQMCXkO3GWCRubhK/9g +Xxudrn0ax4RIo9CWHmyqWW2oTiITbA9rdp1swPvHRZ+yesgED72S2ouNJDpw +5tGXQBbO9yer/Mp7Em3Z8tee/c+YEJo3ZViNPd1wJo43nwlL0c6my9ip25FV +dBETFBvsq4OaSbTY1fU6rYIJvrsbAz1bSFRsKZPdXM+EBzGRIyofSHTrDw9/ +fAOez/cn8nRsWvbQCacmJkR1H2xLwhbmq5Dpa2HCjZaaNJ6PJDpV6Xhn7hMT +uD1LuVqxFZTvBSj2MyH7Q2Hq4XYS/fl8qW2QzQThHQIhYditEUz1vAEm1OtY +tbCwQ39oDemOMEHW1KeX/z8SdSa1HT/0iwmqwabVBdixq0VMgrkJ2HvsleXE +JxK9mOpyOcdLQEh9uKj0ZxJxunL9fPgJ+Ln6b6oRtn6x8SPaWgLeXnscFIfN +dg+cNxch4ImOgrJKB85vabLRRJSA+fm4QhtsPe2NFCROwFmaWNw57Bgh1lFN +KQIkjBWPVaysV3QXyMgRIFWQI7T/C4mIDFa9uAIBHd2v7I9jx8QEdW9QIoD6 +MYe8iM0mRIX4KARc/tylX7qyLmrqOaJOwNWTwgNKnSSqWBINY1MJ+KtMaAxh +9w/2JPRoEXDDgGXhhL33dXBNuw7u99ZzoZvYfaeeyb4EnKfRm9WLvd7x4u5S +QwKuv/rqM4uta3TQssCYgNi62r8Ev+L3RepnUMZBAn7D6BsqdhlfXkyKOQF+ +Koq9xti94xez/rYk4Jv0G+ej2Dp14v9F2RBAiVawuYBNK/g5fN2WAHZp9/tI +7KjkPJ4rRwgwVptOTcD+6WemHuBIgNPAJrsCbCFXCVNfZwI+LcqrVa3UM+s9 +7n0M98cb5N6wcv/WS7dc3QnYJrfU0LOSZ515qiONgHHtHbzDK/VIiXJbBt4v +/fjY6ZV6P3pbLAkC9IUgaHGlXlM++4AnAfdYlFL+bzhf6aVF8CbgjdEhSyHs +qFRzMb1TBLjI5emIYZdFSe7c7UNAerlpiDT2z8A+g12+BCRkSkpuwxZkFDhS +/AhoztqyVglb+1DoGYVzBGSmOtpSVurvtYjcEkDA5tR3UyrYt5U2PZAMxPP6 +5DW0C/u5cH+RSDABton7danYP+YLGgRCCIhyM+nWXKnPCf3BH0qAzYdL37Sw +93y0mF0OI0C4mKO+G/v/kNogqA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.7177759628624943, + 1.3662616644244316`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7177759628624959}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.7177759628624943, + 1.3662616644244316`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7177759628624959}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk4Fe0bB3BrG4psoZStX0eIQyHquW3Jmki2QmcZSyVRQiIVvS0kS7xv +StnplD1bKZG8CMVbUqJwjn3LhGy/xx9zzfW5npl7vvf9zDUjRztjy+Th4uIa +wMfK+Wyz2v9KW5v356g2WvDPstH+sfTdNGMW+sYwvrjinpQ98YrGL5BxC2vt +KmwbxvtVgppvke8ZvpkVFwSG1fAbNyEvMwujNdg36ja9Dsv9gOTp4WNrsctb +zz5coP6H5moyZwWwhzobQoIqO9D285Un1mNL9yu4/Db6hmjhrygi2BbjIbr+ +Td3IiCy0EcOuWhgSCMz9gcq+J3ySxP4ULnnxuU8vKrHyrJTBHltlPDRN7Ufx +dsrLW7FX3fZ10pxho2u83x4rYsuKPKg/WzmAtP0upVGwrWV+Z44ZjSA6506N +FjbxSF5Cdc0Yyt7K/XMvdpjSoYiTTePIPZjmZoDdIdmucS53Eu0U+h1wCJvh +7O0Vd3sK2V/bIeKAPZHM9bjQ5xfSSbZY54a9Rl5VeJJKoof7GVK+2PGMGlNh +8d8oRNx5VxD2tiynsF0zv1G/kkH6FWwdlcix05WzSOdhb+49bM893U1DRguI +OhO6swZ7OvA837rtiyg7iVe3BftypYA+Zc0SejcdnPEVOwl0nng0LaN9Lw3v +kyv5MuqN/XK5wUFw3x/VOTbKrYvrCZfhAVXy+LI+9gTHNeTubR4YuupPt8QO +USaL8n14wT770sFT2PF5cgrjVH7IXBCPzMfubB2pWkrjB/+53itvsLdNlTqv +F18FVpPZ39uxWVrWsaozq0Bos1TRH+za8mDuU5VrYOnV/RbzP2xE1rR1DxgJ +QldF8OcF7I2WgsIXqwThi5hro8Q8G6m3G4OQrhAoaPeraWB795U80lBbD7e5 +fhh7YPvyNKnvExSGHKeHrA7sfvlnkxG/RSCEUnKydQHPh2hY26K5EYR7pJ0n +sXmesOU2nd0IPuJqZRsXcV7Nrba5wxvhQrlbzVFsZ6OYwuYeUYiM4pXow26h ++/lLNopD4/IkS3SZjb5nRd9yXyMBV7wi7+lhjwznpuWYSMBLs/ZxOva6c71t +eq8l4Gt5ymQJtvG1I1ruJZKwflSQ6sbFQRXpe8jsFCkQus2XVcfNQen9fwL2 +ntsCGukLHoN8HHTQ/vp3/6db4LXJYLEMPweN1IoeeMreArLfHOnW2FrpKuLb +nGSBGVLbV4xdS3Mt4t+/FZr/sIMiV3HQ1HjPhYGr2yC/izKmt4aDRE8bFxdZ +yUO9SgT/hAAHsdPXedp4y0NL3ZNraoIcVPatVWY0Uh7eyZ1nnsY+Znn86vbX +8iAWPm0xgp2+M8D2b6oC0ITfssaE8POHsiZCJRWheT2ril+Yg454CKia/1CC +Bc/OnZfEOAgF2FMdFpVAvCLEqw5bOSJFmyG1HaJjZfiFxTmIK03TMPTwdiCr +7I6mYz/97uJQWL0dLJJb3T9IcNCqo6xw6dT/QeFHccl9UjifsdWnIRoFlvX6 +RFxkOSjNLvHrTCgFIu/dFcnHjqb96OG7T4EsZ+YZ/q0cxLh8fli2jQKL5REm +BdgiLx5w2RkpA8Plg4uQHAd5a44pVyrsBOvOdo3PChwkI38n7FafCpAfvkQV +UDjoxc1pyhyPKgTIukVJK+N5/HJqJ+RU4WFm//xV7Ie1ihRDV1U45bOk5LiT +g+Q9Kj7OflaFVPfEZ/yquF9WvxLRqAb/9ajHnVfnoC0yssQ2J3Xw880vy9bm +IJWMc4LziAqkJv/EMVMOojGukqrWVHD7ptPTgZ2kEPvd/RgV+vruadgf5CDe +1Lz8ukAqPJ7/MmNtxkGdD4eOxBZQQaW+aKOpBQfdSHJ/QFHQBPbc+atmh/D+ +3rJUc1ylBRQbP7dEBw567KdoU9K0G+qmvwc4eHFQawDSvpahC/7Bag4bEjhI +zvU/6+On9sH2W3whXO84iLn8/NmWIIBHS+XB7HkOkhwuWy1JMwQf/9gfGvoD +6Jym/rdYZWOo3nwi8W3oAKKNLtSLDpkAx34hS6duAD019F+d0mIKMbU7Coul +B1H6tHc1K94MZqUckqV8B9Gswab3tWEWUGul7/m5bRB1cfFO/jhhBZ0yUhtW +7xtCPpvPxIQrHIKrrwTc/skYQs+86l8nRNhAcfaVjPWywyj4l9TMTq/DkPC5 +kro6YRiR5geOvnOzhe42aefZzSNI1+WuQf9hOyg8Ju/okTOCPko98K7VPALT +41uPX6COIunMqy+yd9hD96GexdPvR1FZj7KltdBR0OJ3mWumjyHZ9gmPgNGj +cKW08pfBwhjSTLjLSutxgK9EhVhH5jh6wPdLLbbGEeDVnVpdpQn03GBXZ0S5 +EzwTD2hZCJtASdo3RRZynUFbu0G8q3MCtXzNiNS87QKDuoc7OtQn8X8pWdH3 +8jGI2l39cD56Ek2etuPyYRyH3FvJC/s4k4g8QPEcM3KFSVVd2Zx9Uyh79Mus +/x43mIjJ+Kf6nynk+DiDflzQHYTMzl7wnphCRYUWbrzX3YHn372CFha/kK7M +x7kbc+5gZrXHN+3BL6TQ49H5wesEDMTZitGGf6E+gZOHkntPQFQSZzRTbxq1 +RlvTTe1pwOgvvSt2ZRrFB6YInG+lwcmXkPKmfhq9qFqeo5vRYY62Sef5ahJt +OAbXNSvocLlQ86awPom2ib1r2fyCDsl8u3T7sdWbrDatqqKDcaO6d/k+Etnq +u+R0VNNBaiDjsDsiUfzmgMZL/9KBMTyqkW1IIumuJxvqO+gQ/XFCbJsZiRRd +JZOOzdBhJC3XJs+eRLruY9kRWgyQij1tYHSaRJl/T/hb72EAX9tZm2Fssbap +/ZI6DHCLZA7G+pBozGSmPVuPAeF52WU9Z0j8/eLibjJkgP77sH8D/Ei0fkbE +aeNhBjxVKr9/+wKJ+qJ2r005zYBhSSNwDSdRdGWIV1kmAyQNTpTExZHoNDVR +NzAb39+q9Vw6nkSWOQVrdXIZsBSggx5jr0tk55Q+ZUB5+flBVgKJIvxshp4X +M2DNT7vkqkQShVAUT5a8YcAvqb2ejfdJ5J3YeKrwO75emsZ9M41EZuvZ+n49 +DLhT/KWLO51EOyK4hKg/sZM+oiBstt/upwX9DFBizMQRGSQ6YZ0ymj/CgFnr +r8F6WSRy5Pf3yfvDgDfVVRrNuSQy9Zf2ZUkwoVsz9uW9AhK9SYk0j93EhBia +1OLqQhLpN00pBkozwWrxUU4gtrpS4xcjWSbETh81cywikdTni0ZflZjw+trQ +I+ESEg3v7ZJYt5sJReNnHzDLSHSH59FLDzsmCLoMaz+qwv3vEkyysmeCkd6b +0SXsay6BfpoOTODrnhc6/opEgcU2/1t2ZkKttUWU5Gucn+C+e4/GhD5zy4iI +ahJpNtAYb88yIcywxtyklkSf7yoJKMTg/JylfLt/SfQMCXkO3GWCRubhK/9g +Xxudrn0ax4RIo9CWHmyqWW2oTiITbA9rdp1swPvHRZ+yesgED72S2ouNJDpw +5tGXQBbO9yer/Mp7Em3Z8tee/c+YEJo3ZViNPd1wJo43nwlL0c6my9ip25FV +dBETFBvsq4OaSbTY1fU6rYIJvrsbAz1bSFRsKZPdXM+EBzGRIyofSHTrDw9/ +fAOez/cn8nRsWvbQCacmJkR1H2xLwhbmq5Dpa2HCjZaaNJ6PJDpV6Xhn7hMT +uD1LuVqxFZTvBSj2MyH7Q2Hq4XYS/fl8qW2QzQThHQIhYditEUz1vAEm1OtY +tbCwQ39oDemOMEHW1KeX/z8SdSa1HT/0iwmqwabVBdixq0VMgrkJ2HvsleXE +JxK9mOpyOcdLQEh9uKj0ZxJxunL9fPgJ+Ln6b6oRtn6x8SPaWgLeXnscFIfN +dg+cNxch4ImOgrJKB85vabLRRJSA+fm4QhtsPe2NFCROwFmaWNw57Bgh1lFN +KQIkjBWPVaysV3QXyMgRIFWQI7T/C4mIDFa9uAIBHd2v7I9jx8QEdW9QIoD6 +MYe8iM0mRIX4KARc/tylX7qyLmrqOaJOwNWTwgNKnSSqWBINY1MJ+KtMaAxh +9w/2JPRoEXDDgGXhhL33dXBNuw7u99ZzoZvYfaeeyb4EnKfRm9WLvd7x4u5S +QwKuv/rqM4uta3TQssCYgNi62r8Ev+L3RepnUMZBAn7D6BsqdhlfXkyKOQF+ +Koq9xti94xez/rYk4Jv0G+ej2Dp14v9F2RBAiVawuYBNK/g5fN2WAHZp9/tI +7KjkPJ4rRwgwVptOTcD+6WemHuBIgNPAJrsCbCFXCVNfZwI+LcqrVa3UM+s9 +7n0M98cb5N6wcv/WS7dc3QnYJrfU0LOSZ515qiONgHHtHbzDK/VIiXJbBt4v +/fjY6ZV6P3pbLAkC9IUgaHGlXlM++4AnAfdYlFL+bzhf6aVF8CbgjdEhSyHs +qFRzMb1TBLjI5emIYZdFSe7c7UNAerlpiDT2z8A+g12+BCRkSkpuwxZkFDhS +/AhoztqyVglb+1DoGYVzBGSmOtpSVurvtYjcEkDA5tR3UyrYt5U2PZAMxPP6 +5DW0C/u5cH+RSDABton7danYP+YLGgRCCIhyM+nWXKnPCf3BH0qAzYdL37Sw +93y0mF0OI0C4mKO+G/v/kNogqA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.7177759628624943, 1.3662616644244316`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7177759628624959}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.7177759628624959}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7177759628624943, 1.3662616644244316`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943558922459908`*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"8eaaded0-ec81-4a1e-a679-5faab93eaa40"] }, Open ]], Cell[CellGroupData[{ @@ -9491,427 +10737,1195 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918507211663303`*^9, - 3.991850725479061*^9}},ExpressionUUID->"f4c3d53a-1214-a145-beb0-\ -494cdae35e56"], + CellChangeTimes->{{3.9918507211663303`*^9, 3.991850725479061*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b9265795-17b8-4e47-bd29-fee31586537e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1137672821776987`*^-264\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435589245236*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"6d1c91a2-f318-447c-aeb0-f19b4a473a9e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"072fb53f-7116-0f41-a298-6891351a3192"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.180726595939255`*^-275\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 119, 42, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355892462524*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"210bca43-d11a-470d-a838-52fad2e02e77"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.249807027639017`*^-286\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 119, 43, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355892473565*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"9d29e806-006c-4494-8c37-273abf682c3c"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 119, 44, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943558924821157`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"e1ccb057-397b-4cd1-a4da-355819458eef"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-\ -87bc9c72594a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VV0XAHCRqAyZ53uvWUWGTJfLWpmTKCmZChGJKJIhhSKVhBKvEiGV +mXvzmioRryRTpiiKiAyRudB3vr/O83v2c9az9z5rrb2PpKuvtTszExOT1QYm +pv8/FwfevpG5ma2fxP64/7iFiX7nQ+HgPb2R8Pf53abDATKAAq2uwr2J8F60 +wVIuQB0CD+T2sPRmgvCMaeDGACPgmRZKXOkphaqDvJR3/jYwWG3pO99TC2Gm +Du0c/m5gIvPj82xPB7T2mDrI+wXASo9W0kzPEEwG59mmu12FOsMn2e2Zc1Ae +nWK2uCUJxAcrRl0V12Dj6LrQWuND4Pc+nstmyII/vj46evF7FiSqmlRZHmZH +k3qDTN3TT+FjikrN7DZOfCCqvYGqkQ+pH/K4A2U5cZG7tfipUT7Yc8kf/03l +RHt13wxum3z4dEVinfkEJ77LqlGpO5cPX85sofE/58TXmxwLaoryYczo27+a +dlzYPDMzxKNQAMszyUWhj7jx68aBxHmeQriZfbmVWYQHmSZW32xsKgJz9VO8 +AtI8eNS15NxkdxGwv7E+LK/Eg/5FspNNw0VwdVi2f98eHnzTH6jtvVYEF6Wa +R++e4sEsgVMrZOFiOJMhvC5XyYN+Ze3T/ObFcPBBieI+B17MpG1YCs0tBqG7 +w9fvpPGhy9LSATanEhDe+fzqcg4fxr7Vap91KQHR2ujLTsV8eKhzo1jvyRIg +zWw/L1/HhzweAptT/EpA1sLPuWqMD7XvCeLIlRLYvXFNc3g3P/aesnrCeFYC +VgGC39Sa+HFrUBRF5lcJHNg6NpD8gR/rvI4NRS+WgHVmxcfVT/zYLu17fOR3 +CRxpc2xt+MmPY76fryexlIKTYlalvYAApoW236vlL4XT35QTIp0FMGu2YL+V +Zilcs9mr37EogJvm2U+rBpaCKKNFlHmDIF4xS1p3CimFQj6bJdWtgmj7XvFq +1KVS6O44VpxAFsSzzR1u9dGlIHMwQOqgmSBGsbZeYE8uhdr96Zva/hHEk56J +TffLSmHNZKHlPU0IYwRc3y7OlkJ8TkjemokQVqopB0YsEO9vYopROiiE0/kr +fGwrpWBRv2XPLXch9Py4IsXCRIdUQwrdIk4IpfpNE19y0kEb9yW/GxTCcbv9 +fQYKdPCnPjr+NlIYmUavZUXa0cE8g2t+X6wwOgwanddxpIMU28WYliRhvBgs +PDJ1jA5tnUdKPjwVxqBJzDB1o8MuPw6WgRZhjF9Ou9Vwhg5jORdyfomKYPeb +1YRfkXR4xTmic15GBAdVM33couhwL8C6dUlJBPM8OKbar9HB2EBpeRVFcC97 +R296LB0yPw/tZfMQwceVU75s9+jgyG85JUYXweKfg39Zn9Jhd2hVxMNqEVQf +kLRQy6XDliEFQckGESwM8jS0z6dDRRELyH0UwfzczRppxXQQ3FcRr/JXBM+b +ie3+WU7MP0JG3XifKAoV+fG9aaSD0c/fIWeGRfFBkUeoxggdgs3u7ng9KYpu +DA3OtlE6FD5S6uNbFEWDrTHXTo7RQdjGmVrBLoZugzba1yboMFlev8SySwz/ +mxNKS56lw53I+IB/gsTQYsPXrQurdGjs3y4zGSGGwilfAy3X6bCqXvdB/6YY +2vp6d2X9pcPJ7wtq39LEMJ9/m58BMwN0LBxmd9WJ4UCXi4oVGwOGBOTOvOEU +R56BxWtPtjFAyPeVhJCQOD7ZuC+6hocBFo1H35+iiGNkaMjVLl4GlIXcVOTe +LY5SH/KuzPEz4MbgzA+7o+KoKOOS/VeYAa+0b6Tmu4hjMHN8+bIIA+YTpM3/ +eoljjrvuhylRBhwzOvIsO0wcX9T6kpvFGaD2rMrjZ6Y4Np47vdOOwgAP5sNC +BvniaHEh8aaaJAMeOEw33H1OzKdSdoVNigGbuCTldBrF0aOXzPREmgF956K/ +XZ0SR61Lt7qfyzGAu5l8t2dRHDUEqFW+8gwwkq0w3MEkgT6FtxiyCgwo7JnI +bOWVQIvO0bGo7QyIoB10EdWWQHmFW+eEFBlgduzhLy0DCaxzn+N8RZgrfOLK +YQsJPMkjK+CqRMynLion3lkCHSx6TqfuYsCJkQ6tQi8JDJfteKGszIAdbJS3 +7wIkcG0tNryGcLl55cSm6xI4Tzdz6lRhwGVvtjCZOxKoGt0WbKvKAJM4Gy6D +NAn8qS/H0U24s31aJaxEAutj7ZPr1Rhwf063NrVKAun3mxM1dzPAVeD6ofJ6 +CfSN3L05i/DMUenAuY8S2Nkl5H1GnQH/hvix8XyTQH0xDYf3hC89eJGya1oC +r36PbpLXYADHF9uqU8wklHkgrNxK+MOGxxbXOEiYmbRRXlyTAanSvz5nC5Lw +k0ZYththeY9Ypi87SHhRKUxjjPB0zMeENXUSZj2p3ietxQBGrpy0GJDwztaV +STvCoc3+DO29JDwtlygaS9hgusb4yCESOuwZ76ogvHkbV4+/EwkvUFwow4Tb +VB08EzxIeGbDsT9s2gxIPvR0pfAsCe1SjT0VCB87v3CjOZSE54UvexoRlk02 +EP8RRcJZkv+aA+HJ8tsFbPEkzKi/qeBLmN73SV82lYStyeoTYYRDVre3GWST +cCGxzySG8B7SBRfnQhJGyk7S4giz45tfYeUkvKv0seU24RYXnqv3a0n4Yol3 +PZZw0pVjAhXNJKzR42iOIuz4OC+nu5uE1rJUnRDCUv8ta81/IWG3Pre5F+Hx +MeO3PBMkFLvKunaYcPGWO/bKCySUtL1ro0f4guKXCYu/RLxwDWsKYX1LpTCv +zWS8pOy2tE7sB6tfCFcMHxlx8YHxR8LNCf+lP5YgI9M7J/0iwnfo/Kp18mRM +ZJUbDids3+VS+0WVjIeOBWpYEpZcKjy0rkvG2ck2TSHCY8Kr38RMyMgvXzHW +T3y/Ip29gdQDZJQdpFs8IBzoeI/N1p6MrIambkcJs2So7Eg8Q0aZa7aMOiI/ +ml6HVRUFkbEn/PvPc4Tjh5ss3keS8dkRzREJwiR5d1/2ZDIOBBuzeBD5NmJW +yiT3iIwTMdLKrITzvf4mGOaRsW/+j2g6ka86hf8wLr0i456BEe0GIr+NelrW +phuJ9RYd1ncgbMm00fR4BxlPFn1LmiTq4YT1mY8wQsbQ2Fjc+P96CZW8HM5K +QZ4jfk/ZiPp6x12dpb2FglwOcOIyUY8Hso80znBRcOhoesgcUa8O72/yuAhT +cKud05s2op79yItZe3ZSkGmOb/z4DgYs0OMbV5Qp+CAlp6CS6AchZjunStQp +yN8V9JGHcNRZZ00pfQpabzb2fk70k9S6pkbmgxTM3R+X3S7DgDce6VN1gRRk +f3LqznESA/auUnkvhlIww1bKL0KCyKf4Tk31cArGDMo1pRP97mPF5vDs6xRs +tXn+p53oh9NbA3ijHlBw+sPVixxCDBAuNtMyqaVgjUOqej8XA9KMhh3WGyho +IfA2vp6TyLePYeFl7yhoXqAYkc/BACVm+lu5Lgq+PX9Kxm8LUW82Eo5sY8T+ +fGlIa2FlgPfybHgjpyRqD3M9Gf9DB52zJwVHeSWxd4V1KeI3Hdh/9OWxCEui +LNuik+AKHR7313XrS0miq5df0O5FOgy8TFJ8rimJXb0dAjBDB6soau+j45LI +P1z2OG2YDqT1Ap9XbpJ4WeXz/uWvxHkVKMXy+ZQkXpRQUrT6QocYz627hAOI ++Hlad2Y/0aFm3+crcTGSeE4s32BzNx3UeCOUQ0sk8U5j4feo/+jAdHPhTUqZ +JI6zqAxl19OhhcXLvqxKEn0afqvV1NHh9IJ11Gy9JE4cvTM48YoO2b0y/R59 +kqj0D8dDIeL8FUxvjLZhkUL30tyLtU/osLJz24DSYSm89K1rf8BVOiymiUbs +tpfC6dKKZUXi/jDPLStDPS6F4zYkx6HLdJieo3oZnZLCyPoQG8NQOgxVnVi0 +D5NCFBMyGjhLh6Z9/3LFPJbCvp2RI8HEfSX19DEYWpBClptXrhzRoAMtLz/j +3j1p5A1ccRLpK4V+Sl668X1p/O+Bf4cRcc8Puffs4Xy6NO5Ssvzi01kK/0bk +PLB+Jo0i7hyt5S2loHY0I4WrWhp/yG/brlZXCttZ78ZHf5XGIO8la0ZeKQge +Dw0PVJTB5d8jj5lDS2GW19z5SK0Mmg3X/FbgK4Vvsc5HzrHJ4YRlatycUAns +/Xlh74imPP6w5Mzp5iuGyRPs/ozLCjjV+pr8srmA+L8QYr5Wux1dBtvnZ9zy +gPe9XFzxzx3IPSeULE56BuIxRQc0NRUxaup+XMazHEjZSd3G56GEOYERCcze +2dAkukdjLmEXWl77MP5ufyboiNfGK3cr4yOXhnEecgZwsWQGuESqYAt5l1Sy +9wMgRZBpdnKq2KaS3fM7OQU2yzqWWf+nii1W098qtifBLj2RogtOamg3S+0p +MEyEcwO8deZMuzE517HYcCQOfs7FHt6bshvVyiRFZnRvgKlyQ+peJXWcez5/ +9KtaNLyc0/2z1KKOitGtZeUukXBGUa2v3V0DD+VETNemXQK9abdOu82aGGF6 +c+bKRBAYywjv58zUxKklkqrI6QBgTNVLumVrIn+17dkR+wCQ+dd/sTJHEx8/ +PORfbR4AG81b0z3zNFHfbOHJjR0BUOsb/auOoYmucU8Nn/zwB/2q+eSQ/zTR +j9+8/pO3P2hatw99n9TEpnYOMYHgc6AQfiOoVksLP0slrT4s8oNq3cesFjpa +eMeuMeldhh8cWHqV2EXTQqfXQXYsiX4QdGYhf2yPFuYfFjS9G+AHjY7OX7ks +tLBpbWWLro4feFI1zR2ctVD2TYOv0m1fePbrq9h8jBba7pviK+v0gR3u1Fey +fVo4x2UwdDnNC25LWf6+8kkLWybP1xZEe8H8oKvG0IAW7lW57TPp6wUv7WPz +Hg5rYZarxPp9Ay+wPjCYLDSlha/jF1drx05BsG6U32YmbSwPPSahoH0KGnna +JadktXF0h9cAx7AHuL/0vMo4q42Hvt+so3q4w7TPjwvGAdr4+sltx2prdwiS +8D7dHaiNLWF9S1b67nDjoq/1cqg2fjK0Yc8VcIdinUAKLVobByo1bBXq3WC1 +7Ep1Xao2zgRtmzaUd4PEoofzHXXa+GfvnvlnS67wKqPTbVaAijXmXG97Gpzh +i4Xk8UBhKvL1XQpKLHMGphUfuz+iVOwpbV2xz3EGg4NslqwUKsKZzn0C0c7Q +sEFHS2QHFdVJeVK7TJyh2TV98x59Ktrbxz5pSzgOfTJehfEnqVinytwRUuwE +80//Lin/S8Rbdb/fr20Po0dMMq5XUFH8ESXGi2IPvRtvmQ1XUfHsuloSJ7s9 +VDmL/nOvhorNzIc/3u6xg0hhDZ21t1T0qa24fuWCHWyL8brY9ImKY40rj8Sq +joKiRxeTO7MOrjr21RQfsIUTsnmbU/frIPm1J+NuqQ2E1B/zkjuggwn27xOE +02wg3p33Xam1DnaIe5oVX7OB6sfBse9sddC3zZNFzMkG+OXMuNdcdNCiLmvD +J3YbaJAb4XcO1EFX2xNv1k8cgh0KZIpcug6+0HjncEzBGmZ33NEsndFBxoyH +JaPZCnqb0ZhvTgfXVuUPMRVYQc2Z6UMBCzrIpDGc73nLCuJK957V/K2DG9pz +2eMsrWCHDlN+JYsusmQMsW7vsATXvT6SdYK6OD5668Stgf3Q6WHK0UnTxYXX +L7MubrWA8uw/XxdidJHTqOBOVIkZaBoGLJnf1EXdFC+WuhQzeP51kiPjli76 +5Cr1CIabQSlpQMs8UReTigvcNliZQX5Kza2H93VROO6A8pcpU8iIjaKaFuqi +9pKz23NlU7gewJ2Q8kEX60SlrpvWGQM7X0zOVJcuvi2XOahSYAzRJUzVBr26 +WPm121kp2RiuTs+OTn7SRU2OCEG308ZwybOTtmdUF/FPqVAtvzGcc/xnbHxZ +F73vxgarnTYCeyNp1CXR8IRPN+8FOUNY62TnqqPQkDZ6fyeZxxAy3Kf7zaVp +uP59rPvTHwMYja64YK9Aw0vLfSkp7QZw7q1VUbAaDY003P/lvmQANywvkspN +iHjSrxcm+vZA5dGuVXVfGoLZ9qn+LASn8cqm6rPEeJupB28CAlNIRopRAA1H +RmN3Ol5CMLl/Wt0mmIY75WYsttshdHze4O1/hYa1g8VcT7kRfrju6i9JpqE3 +2/ntB5kAxHyuVeyqoSF3eNVU+GcaxP09qXGzloZlKqEDpS9pwJxoUvL9DQ21 +pL42MmfQ4EcZ67OMt4QDM6VXXWlQyXQ1hfcDDb+McslY/9AF+7vhFxZHaBie +Pyxzfl0HUqqCNV5u1UOxSdbgcV0qcFjalYhy6aFD01meXAoVwr9oK13Ypodb ++YZvRbFSwZN1WUZFQA8fjrzojG3VBi2rQP5MEjGu5Lu1z00buofOzUWp6qFd +W9pn+7taILDFu2S/rR4maVkm2G7ShGzDsJAZOz2sfC9/L2xCA9TC4gzvOOqh +hP/+lNdtGmA5U9zV66KH3jVGEln3NSC6e2HlhLcebnNqnWxU04DlzMsGIRF6 +eP3q7Jbok+rQp3vnQ06eHn4Ub49ZH1IDz/PZD/YW6qGqFYdZ/js1WCx87j5Z +rIeey7bBAQw14JXqXVIt08MtSr8aDkWrwT52CfEXNXpYQaxr3041qO7McfvQ +pYdMuTFTrCGqYM5VrhTYq4fRK+98LN1Uodf07aJwvx62yL56UWSpCvOVEzHH +vhD7dUXVo1paFZQeqRSM/9DDTbxRpD8tKlDdtycwdkoPz34at2OrVAFz/kOg +PKOHfqDxYOdjFTh57Xx7wAIxnl7VURWqAvM10alCy3p4t6UpSd5DBSJ/J5+o +/K2HIZ8913KtVWCb+jNFpzU9fD6lMWusrwIPfSoX/v7VwzdZ348ub1eB/wEo +sV/b + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VV0XAHCRqAyZ53uvWUWGTJfLWpmTKCmZChGJKJIhhSKVhBKvEiGV +mXvzmioRryRTpiiKiAyRudB3vr/O83v2c9az9z5rrb2PpKuvtTszExOT1QYm +pv8/FwfevpG5ma2fxP64/7iFiX7nQ+HgPb2R8Pf53abDATKAAq2uwr2J8F60 +wVIuQB0CD+T2sPRmgvCMaeDGACPgmRZKXOkphaqDvJR3/jYwWG3pO99TC2Gm +Du0c/m5gIvPj82xPB7T2mDrI+wXASo9W0kzPEEwG59mmu12FOsMn2e2Zc1Ae +nWK2uCUJxAcrRl0V12Dj6LrQWuND4Pc+nstmyII/vj46evF7FiSqmlRZHmZH +k3qDTN3TT+FjikrN7DZOfCCqvYGqkQ+pH/K4A2U5cZG7tfipUT7Yc8kf/03l +RHt13wxum3z4dEVinfkEJ77LqlGpO5cPX85sofE/58TXmxwLaoryYczo27+a +dlzYPDMzxKNQAMszyUWhj7jx68aBxHmeQriZfbmVWYQHmSZW32xsKgJz9VO8 +AtI8eNS15NxkdxGwv7E+LK/Eg/5FspNNw0VwdVi2f98eHnzTH6jtvVYEF6Wa +R++e4sEsgVMrZOFiOJMhvC5XyYN+Ze3T/ObFcPBBieI+B17MpG1YCs0tBqG7 +w9fvpPGhy9LSATanEhDe+fzqcg4fxr7Vap91KQHR2ujLTsV8eKhzo1jvyRIg +zWw/L1/HhzweAptT/EpA1sLPuWqMD7XvCeLIlRLYvXFNc3g3P/aesnrCeFYC +VgGC39Sa+HFrUBRF5lcJHNg6NpD8gR/rvI4NRS+WgHVmxcfVT/zYLu17fOR3 +CRxpc2xt+MmPY76fryexlIKTYlalvYAApoW236vlL4XT35QTIp0FMGu2YL+V +Zilcs9mr37EogJvm2U+rBpaCKKNFlHmDIF4xS1p3CimFQj6bJdWtgmj7XvFq +1KVS6O44VpxAFsSzzR1u9dGlIHMwQOqgmSBGsbZeYE8uhdr96Zva/hHEk56J +TffLSmHNZKHlPU0IYwRc3y7OlkJ8TkjemokQVqopB0YsEO9vYopROiiE0/kr +fGwrpWBRv2XPLXch9Py4IsXCRIdUQwrdIk4IpfpNE19y0kEb9yW/GxTCcbv9 +fQYKdPCnPjr+NlIYmUavZUXa0cE8g2t+X6wwOgwanddxpIMU28WYliRhvBgs +PDJ1jA5tnUdKPjwVxqBJzDB1o8MuPw6WgRZhjF9Ou9Vwhg5jORdyfomKYPeb +1YRfkXR4xTmic15GBAdVM33couhwL8C6dUlJBPM8OKbar9HB2EBpeRVFcC97 +R296LB0yPw/tZfMQwceVU75s9+jgyG85JUYXweKfg39Zn9Jhd2hVxMNqEVQf +kLRQy6XDliEFQckGESwM8jS0z6dDRRELyH0UwfzczRppxXQQ3FcRr/JXBM+b +ie3+WU7MP0JG3XifKAoV+fG9aaSD0c/fIWeGRfFBkUeoxggdgs3u7ng9KYpu +DA3OtlE6FD5S6uNbFEWDrTHXTo7RQdjGmVrBLoZugzba1yboMFlev8SySwz/ +mxNKS56lw53I+IB/gsTQYsPXrQurdGjs3y4zGSGGwilfAy3X6bCqXvdB/6YY +2vp6d2X9pcPJ7wtq39LEMJ9/m58BMwN0LBxmd9WJ4UCXi4oVGwOGBOTOvOEU +R56BxWtPtjFAyPeVhJCQOD7ZuC+6hocBFo1H35+iiGNkaMjVLl4GlIXcVOTe +LY5SH/KuzPEz4MbgzA+7o+KoKOOS/VeYAa+0b6Tmu4hjMHN8+bIIA+YTpM3/ +eoljjrvuhylRBhwzOvIsO0wcX9T6kpvFGaD2rMrjZ6Y4Np47vdOOwgAP5sNC +BvniaHEh8aaaJAMeOEw33H1OzKdSdoVNigGbuCTldBrF0aOXzPREmgF956K/ +XZ0SR61Lt7qfyzGAu5l8t2dRHDUEqFW+8gwwkq0w3MEkgT6FtxiyCgwo7JnI +bOWVQIvO0bGo7QyIoB10EdWWQHmFW+eEFBlgduzhLy0DCaxzn+N8RZgrfOLK +YQsJPMkjK+CqRMynLion3lkCHSx6TqfuYsCJkQ6tQi8JDJfteKGszIAdbJS3 +7wIkcG0tNryGcLl55cSm6xI4Tzdz6lRhwGVvtjCZOxKoGt0WbKvKAJM4Gy6D +NAn8qS/H0U24s31aJaxEAutj7ZPr1Rhwf063NrVKAun3mxM1dzPAVeD6ofJ6 +CfSN3L05i/DMUenAuY8S2Nkl5H1GnQH/hvix8XyTQH0xDYf3hC89eJGya1oC +r36PbpLXYADHF9uqU8wklHkgrNxK+MOGxxbXOEiYmbRRXlyTAanSvz5nC5Lw +k0ZYththeY9Ypi87SHhRKUxjjPB0zMeENXUSZj2p3ietxQBGrpy0GJDwztaV +STvCoc3+DO29JDwtlygaS9hgusb4yCESOuwZ76ogvHkbV4+/EwkvUFwow4Tb +VB08EzxIeGbDsT9s2gxIPvR0pfAsCe1SjT0VCB87v3CjOZSE54UvexoRlk02 +EP8RRcJZkv+aA+HJ8tsFbPEkzKi/qeBLmN73SV82lYStyeoTYYRDVre3GWST +cCGxzySG8B7SBRfnQhJGyk7S4giz45tfYeUkvKv0seU24RYXnqv3a0n4Yol3 +PZZw0pVjAhXNJKzR42iOIuz4OC+nu5uE1rJUnRDCUv8ta81/IWG3Pre5F+Hx +MeO3PBMkFLvKunaYcPGWO/bKCySUtL1ro0f4guKXCYu/RLxwDWsKYX1LpTCv +zWS8pOy2tE7sB6tfCFcMHxlx8YHxR8LNCf+lP5YgI9M7J/0iwnfo/Kp18mRM +ZJUbDids3+VS+0WVjIeOBWpYEpZcKjy0rkvG2ck2TSHCY8Kr38RMyMgvXzHW +T3y/Ip29gdQDZJQdpFs8IBzoeI/N1p6MrIambkcJs2So7Eg8Q0aZa7aMOiI/ +ml6HVRUFkbEn/PvPc4Tjh5ss3keS8dkRzREJwiR5d1/2ZDIOBBuzeBD5NmJW +yiT3iIwTMdLKrITzvf4mGOaRsW/+j2g6ka86hf8wLr0i456BEe0GIr+NelrW +phuJ9RYd1ncgbMm00fR4BxlPFn1LmiTq4YT1mY8wQsbQ2Fjc+P96CZW8HM5K +QZ4jfk/ZiPp6x12dpb2FglwOcOIyUY8Hso80znBRcOhoesgcUa8O72/yuAhT +cKud05s2op79yItZe3ZSkGmOb/z4DgYs0OMbV5Qp+CAlp6CS6AchZjunStQp +yN8V9JGHcNRZZ00pfQpabzb2fk70k9S6pkbmgxTM3R+X3S7DgDce6VN1gRRk +f3LqznESA/auUnkvhlIww1bKL0KCyKf4Tk31cArGDMo1pRP97mPF5vDs6xRs +tXn+p53oh9NbA3ijHlBw+sPVixxCDBAuNtMyqaVgjUOqej8XA9KMhh3WGyho +IfA2vp6TyLePYeFl7yhoXqAYkc/BACVm+lu5Lgq+PX9Kxm8LUW82Eo5sY8T+ +fGlIa2FlgPfybHgjpyRqD3M9Gf9DB52zJwVHeSWxd4V1KeI3Hdh/9OWxCEui +LNuik+AKHR7313XrS0miq5df0O5FOgy8TFJ8rimJXb0dAjBDB6soau+j45LI +P1z2OG2YDqT1Ap9XbpJ4WeXz/uWvxHkVKMXy+ZQkXpRQUrT6QocYz627hAOI ++Hlad2Y/0aFm3+crcTGSeE4s32BzNx3UeCOUQ0sk8U5j4feo/+jAdHPhTUqZ +JI6zqAxl19OhhcXLvqxKEn0afqvV1NHh9IJ11Gy9JE4cvTM48YoO2b0y/R59 +kqj0D8dDIeL8FUxvjLZhkUL30tyLtU/osLJz24DSYSm89K1rf8BVOiymiUbs +tpfC6dKKZUXi/jDPLStDPS6F4zYkx6HLdJieo3oZnZLCyPoQG8NQOgxVnVi0 +D5NCFBMyGjhLh6Z9/3LFPJbCvp2RI8HEfSX19DEYWpBClptXrhzRoAMtLz/j +3j1p5A1ccRLpK4V+Sl668X1p/O+Bf4cRcc8Puffs4Xy6NO5Ssvzi01kK/0bk +PLB+Jo0i7hyt5S2loHY0I4WrWhp/yG/brlZXCttZ78ZHf5XGIO8la0ZeKQge +Dw0PVJTB5d8jj5lDS2GW19z5SK0Mmg3X/FbgK4Vvsc5HzrHJ4YRlatycUAns +/Xlh74imPP6w5Mzp5iuGyRPs/ozLCjjV+pr8srmA+L8QYr5Wux1dBtvnZ9zy +gPe9XFzxzx3IPSeULE56BuIxRQc0NRUxaup+XMazHEjZSd3G56GEOYERCcze +2dAkukdjLmEXWl77MP5ufyboiNfGK3cr4yOXhnEecgZwsWQGuESqYAt5l1Sy +9wMgRZBpdnKq2KaS3fM7OQU2yzqWWf+nii1W098qtifBLj2RogtOamg3S+0p +MEyEcwO8deZMuzE517HYcCQOfs7FHt6bshvVyiRFZnRvgKlyQ+peJXWcez5/ +9KtaNLyc0/2z1KKOitGtZeUukXBGUa2v3V0DD+VETNemXQK9abdOu82aGGF6 +c+bKRBAYywjv58zUxKklkqrI6QBgTNVLumVrIn+17dkR+wCQ+dd/sTJHEx8/ +PORfbR4AG81b0z3zNFHfbOHJjR0BUOsb/auOoYmucU8Nn/zwB/2q+eSQ/zTR +j9+8/pO3P2hatw99n9TEpnYOMYHgc6AQfiOoVksLP0slrT4s8oNq3cesFjpa +eMeuMeldhh8cWHqV2EXTQqfXQXYsiX4QdGYhf2yPFuYfFjS9G+AHjY7OX7ks +tLBpbWWLro4feFI1zR2ctVD2TYOv0m1fePbrq9h8jBba7pviK+v0gR3u1Fey +fVo4x2UwdDnNC25LWf6+8kkLWybP1xZEe8H8oKvG0IAW7lW57TPp6wUv7WPz +Hg5rYZarxPp9Ay+wPjCYLDSlha/jF1drx05BsG6U32YmbSwPPSahoH0KGnna +JadktXF0h9cAx7AHuL/0vMo4q42Hvt+so3q4w7TPjwvGAdr4+sltx2prdwiS +8D7dHaiNLWF9S1b67nDjoq/1cqg2fjK0Yc8VcIdinUAKLVobByo1bBXq3WC1 +7Ep1Xao2zgRtmzaUd4PEoofzHXXa+GfvnvlnS67wKqPTbVaAijXmXG97Gpzh +i4Xk8UBhKvL1XQpKLHMGphUfuz+iVOwpbV2xz3EGg4NslqwUKsKZzn0C0c7Q +sEFHS2QHFdVJeVK7TJyh2TV98x59Ktrbxz5pSzgOfTJehfEnqVinytwRUuwE +80//Lin/S8Rbdb/fr20Po0dMMq5XUFH8ESXGi2IPvRtvmQ1XUfHsuloSJ7s9 +VDmL/nOvhorNzIc/3u6xg0hhDZ21t1T0qa24fuWCHWyL8brY9ImKY40rj8Sq +joKiRxeTO7MOrjr21RQfsIUTsnmbU/frIPm1J+NuqQ2E1B/zkjuggwn27xOE +02wg3p33Xam1DnaIe5oVX7OB6sfBse9sddC3zZNFzMkG+OXMuNdcdNCiLmvD +J3YbaJAb4XcO1EFX2xNv1k8cgh0KZIpcug6+0HjncEzBGmZ33NEsndFBxoyH +JaPZCnqb0ZhvTgfXVuUPMRVYQc2Z6UMBCzrIpDGc73nLCuJK957V/K2DG9pz +2eMsrWCHDlN+JYsusmQMsW7vsATXvT6SdYK6OD5668Stgf3Q6WHK0UnTxYXX +L7MubrWA8uw/XxdidJHTqOBOVIkZaBoGLJnf1EXdFC+WuhQzeP51kiPjli76 +5Cr1CIabQSlpQMs8UReTigvcNliZQX5Kza2H93VROO6A8pcpU8iIjaKaFuqi +9pKz23NlU7gewJ2Q8kEX60SlrpvWGQM7X0zOVJcuvi2XOahSYAzRJUzVBr26 +WPm121kp2RiuTs+OTn7SRU2OCEG308ZwybOTtmdUF/FPqVAtvzGcc/xnbHxZ +F73vxgarnTYCeyNp1CXR8IRPN+8FOUNY62TnqqPQkDZ6fyeZxxAy3Kf7zaVp +uP59rPvTHwMYja64YK9Aw0vLfSkp7QZw7q1VUbAaDY003P/lvmQANywvkspN +iHjSrxcm+vZA5dGuVXVfGoLZ9qn+LASn8cqm6rPEeJupB28CAlNIRopRAA1H +RmN3Ol5CMLl/Wt0mmIY75WYsttshdHze4O1/hYa1g8VcT7kRfrju6i9JpqE3 +2/ntB5kAxHyuVeyqoSF3eNVU+GcaxP09qXGzloZlKqEDpS9pwJxoUvL9DQ21 +pL42MmfQ4EcZ67OMt4QDM6VXXWlQyXQ1hfcDDb+McslY/9AF+7vhFxZHaBie +Pyxzfl0HUqqCNV5u1UOxSdbgcV0qcFjalYhy6aFD01meXAoVwr9oK13Ypodb ++YZvRbFSwZN1WUZFQA8fjrzojG3VBi2rQP5MEjGu5Lu1z00buofOzUWp6qFd +W9pn+7taILDFu2S/rR4maVkm2G7ShGzDsJAZOz2sfC9/L2xCA9TC4gzvOOqh +hP/+lNdtGmA5U9zV66KH3jVGEln3NSC6e2HlhLcebnNqnWxU04DlzMsGIRF6 +eP3q7Jbok+rQp3vnQ06eHn4Ub49ZH1IDz/PZD/YW6qGqFYdZ/js1WCx87j5Z +rIeey7bBAQw14JXqXVIt08MtSr8aDkWrwT52CfEXNXpYQaxr3041qO7McfvQ +pYdMuTFTrCGqYM5VrhTYq4fRK+98LN1Uodf07aJwvx62yL56UWSpCvOVEzHH +vhD7dUXVo1paFZQeqRSM/9DDTbxRpD8tKlDdtycwdkoPz34at2OrVAFz/kOg +PKOHfqDxYOdjFTh57Xx7wAIxnl7VURWqAvM10alCy3p4t6UpSd5DBSJ/J5+o +/K2HIZ8913KtVWCb+jNFpzU9fD6lMWusrwIPfSoX/v7VwzdZ348ub1eB/wEo +sV/b + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07898806381233775}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07898806381233775}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VV0XAHCRqAyZ53uvWUWGTJfLWpmTKCmZChGJKJIhhSKVhBKvEiGV +mXvzmioRryRTpiiKiAyRudB3vr/O83v2c9az9z5rrb2PpKuvtTszExOT1QYm +pv8/FwfevpG5ma2fxP64/7iFiX7nQ+HgPb2R8Pf53abDATKAAq2uwr2J8F60 +wVIuQB0CD+T2sPRmgvCMaeDGACPgmRZKXOkphaqDvJR3/jYwWG3pO99TC2Gm +Du0c/m5gIvPj82xPB7T2mDrI+wXASo9W0kzPEEwG59mmu12FOsMn2e2Zc1Ae +nWK2uCUJxAcrRl0V12Dj6LrQWuND4Pc+nstmyII/vj46evF7FiSqmlRZHmZH +k3qDTN3TT+FjikrN7DZOfCCqvYGqkQ+pH/K4A2U5cZG7tfipUT7Yc8kf/03l +RHt13wxum3z4dEVinfkEJ77LqlGpO5cPX85sofE/58TXmxwLaoryYczo27+a +dlzYPDMzxKNQAMszyUWhj7jx68aBxHmeQriZfbmVWYQHmSZW32xsKgJz9VO8 +AtI8eNS15NxkdxGwv7E+LK/Eg/5FspNNw0VwdVi2f98eHnzTH6jtvVYEF6Wa +R++e4sEsgVMrZOFiOJMhvC5XyYN+Ze3T/ObFcPBBieI+B17MpG1YCs0tBqG7 +w9fvpPGhy9LSATanEhDe+fzqcg4fxr7Vap91KQHR2ujLTsV8eKhzo1jvyRIg +zWw/L1/HhzweAptT/EpA1sLPuWqMD7XvCeLIlRLYvXFNc3g3P/aesnrCeFYC +VgGC39Sa+HFrUBRF5lcJHNg6NpD8gR/rvI4NRS+WgHVmxcfVT/zYLu17fOR3 +CRxpc2xt+MmPY76fryexlIKTYlalvYAApoW236vlL4XT35QTIp0FMGu2YL+V +Zilcs9mr37EogJvm2U+rBpaCKKNFlHmDIF4xS1p3CimFQj6bJdWtgmj7XvFq +1KVS6O44VpxAFsSzzR1u9dGlIHMwQOqgmSBGsbZeYE8uhdr96Zva/hHEk56J +TffLSmHNZKHlPU0IYwRc3y7OlkJ8TkjemokQVqopB0YsEO9vYopROiiE0/kr +fGwrpWBRv2XPLXch9Py4IsXCRIdUQwrdIk4IpfpNE19y0kEb9yW/GxTCcbv9 +fQYKdPCnPjr+NlIYmUavZUXa0cE8g2t+X6wwOgwanddxpIMU28WYliRhvBgs +PDJ1jA5tnUdKPjwVxqBJzDB1o8MuPw6WgRZhjF9Ou9Vwhg5jORdyfomKYPeb +1YRfkXR4xTmic15GBAdVM33couhwL8C6dUlJBPM8OKbar9HB2EBpeRVFcC97 +R296LB0yPw/tZfMQwceVU75s9+jgyG85JUYXweKfg39Zn9Jhd2hVxMNqEVQf +kLRQy6XDliEFQckGESwM8jS0z6dDRRELyH0UwfzczRppxXQQ3FcRr/JXBM+b +ie3+WU7MP0JG3XifKAoV+fG9aaSD0c/fIWeGRfFBkUeoxggdgs3u7ng9KYpu +DA3OtlE6FD5S6uNbFEWDrTHXTo7RQdjGmVrBLoZugzba1yboMFlev8SySwz/ +mxNKS56lw53I+IB/gsTQYsPXrQurdGjs3y4zGSGGwilfAy3X6bCqXvdB/6YY +2vp6d2X9pcPJ7wtq39LEMJ9/m58BMwN0LBxmd9WJ4UCXi4oVGwOGBOTOvOEU +R56BxWtPtjFAyPeVhJCQOD7ZuC+6hocBFo1H35+iiGNkaMjVLl4GlIXcVOTe +LY5SH/KuzPEz4MbgzA+7o+KoKOOS/VeYAa+0b6Tmu4hjMHN8+bIIA+YTpM3/ +eoljjrvuhylRBhwzOvIsO0wcX9T6kpvFGaD2rMrjZ6Y4Np47vdOOwgAP5sNC +BvniaHEh8aaaJAMeOEw33H1OzKdSdoVNigGbuCTldBrF0aOXzPREmgF956K/ +XZ0SR61Lt7qfyzGAu5l8t2dRHDUEqFW+8gwwkq0w3MEkgT6FtxiyCgwo7JnI +bOWVQIvO0bGo7QyIoB10EdWWQHmFW+eEFBlgduzhLy0DCaxzn+N8RZgrfOLK +YQsJPMkjK+CqRMynLion3lkCHSx6TqfuYsCJkQ6tQi8JDJfteKGszIAdbJS3 +7wIkcG0tNryGcLl55cSm6xI4Tzdz6lRhwGVvtjCZOxKoGt0WbKvKAJM4Gy6D +NAn8qS/H0U24s31aJaxEAutj7ZPr1Rhwf063NrVKAun3mxM1dzPAVeD6ofJ6 +CfSN3L05i/DMUenAuY8S2Nkl5H1GnQH/hvix8XyTQH0xDYf3hC89eJGya1oC +r36PbpLXYADHF9uqU8wklHkgrNxK+MOGxxbXOEiYmbRRXlyTAanSvz5nC5Lw +k0ZYththeY9Ypi87SHhRKUxjjPB0zMeENXUSZj2p3ietxQBGrpy0GJDwztaV +STvCoc3+DO29JDwtlygaS9hgusb4yCESOuwZ76ogvHkbV4+/EwkvUFwow4Tb +VB08EzxIeGbDsT9s2gxIPvR0pfAsCe1SjT0VCB87v3CjOZSE54UvexoRlk02 +EP8RRcJZkv+aA+HJ8tsFbPEkzKi/qeBLmN73SV82lYStyeoTYYRDVre3GWST +cCGxzySG8B7SBRfnQhJGyk7S4giz45tfYeUkvKv0seU24RYXnqv3a0n4Yol3 +PZZw0pVjAhXNJKzR42iOIuz4OC+nu5uE1rJUnRDCUv8ta81/IWG3Pre5F+Hx +MeO3PBMkFLvKunaYcPGWO/bKCySUtL1ro0f4guKXCYu/RLxwDWsKYX1LpTCv +zWS8pOy2tE7sB6tfCFcMHxlx8YHxR8LNCf+lP5YgI9M7J/0iwnfo/Kp18mRM +ZJUbDids3+VS+0WVjIeOBWpYEpZcKjy0rkvG2ck2TSHCY8Kr38RMyMgvXzHW +T3y/Ip29gdQDZJQdpFs8IBzoeI/N1p6MrIambkcJs2So7Eg8Q0aZa7aMOiI/ +ml6HVRUFkbEn/PvPc4Tjh5ss3keS8dkRzREJwiR5d1/2ZDIOBBuzeBD5NmJW +yiT3iIwTMdLKrITzvf4mGOaRsW/+j2g6ka86hf8wLr0i456BEe0GIr+NelrW +phuJ9RYd1ncgbMm00fR4BxlPFn1LmiTq4YT1mY8wQsbQ2Fjc+P96CZW8HM5K +QZ4jfk/ZiPp6x12dpb2FglwOcOIyUY8Hso80znBRcOhoesgcUa8O72/yuAhT +cKud05s2op79yItZe3ZSkGmOb/z4DgYs0OMbV5Qp+CAlp6CS6AchZjunStQp +yN8V9JGHcNRZZ00pfQpabzb2fk70k9S6pkbmgxTM3R+X3S7DgDce6VN1gRRk +f3LqznESA/auUnkvhlIww1bKL0KCyKf4Tk31cArGDMo1pRP97mPF5vDs6xRs +tXn+p53oh9NbA3ijHlBw+sPVixxCDBAuNtMyqaVgjUOqej8XA9KMhh3WGyho +IfA2vp6TyLePYeFl7yhoXqAYkc/BACVm+lu5Lgq+PX9Kxm8LUW82Eo5sY8T+ +fGlIa2FlgPfybHgjpyRqD3M9Gf9DB52zJwVHeSWxd4V1KeI3Hdh/9OWxCEui +LNuik+AKHR7313XrS0miq5df0O5FOgy8TFJ8rimJXb0dAjBDB6soau+j45LI +P1z2OG2YDqT1Ap9XbpJ4WeXz/uWvxHkVKMXy+ZQkXpRQUrT6QocYz627hAOI ++Hlad2Y/0aFm3+crcTGSeE4s32BzNx3UeCOUQ0sk8U5j4feo/+jAdHPhTUqZ +JI6zqAxl19OhhcXLvqxKEn0afqvV1NHh9IJ11Gy9JE4cvTM48YoO2b0y/R59 +kqj0D8dDIeL8FUxvjLZhkUL30tyLtU/osLJz24DSYSm89K1rf8BVOiymiUbs +tpfC6dKKZUXi/jDPLStDPS6F4zYkx6HLdJieo3oZnZLCyPoQG8NQOgxVnVi0 +D5NCFBMyGjhLh6Z9/3LFPJbCvp2RI8HEfSX19DEYWpBClptXrhzRoAMtLz/j +3j1p5A1ccRLpK4V+Sl668X1p/O+Bf4cRcc8Puffs4Xy6NO5Ssvzi01kK/0bk +PLB+Jo0i7hyt5S2loHY0I4WrWhp/yG/brlZXCttZ78ZHf5XGIO8la0ZeKQge +Dw0PVJTB5d8jj5lDS2GW19z5SK0Mmg3X/FbgK4Vvsc5HzrHJ4YRlatycUAns +/Xlh74imPP6w5Mzp5iuGyRPs/ozLCjjV+pr8srmA+L8QYr5Wux1dBtvnZ9zy +gPe9XFzxzx3IPSeULE56BuIxRQc0NRUxaup+XMazHEjZSd3G56GEOYERCcze +2dAkukdjLmEXWl77MP5ufyboiNfGK3cr4yOXhnEecgZwsWQGuESqYAt5l1Sy +9wMgRZBpdnKq2KaS3fM7OQU2yzqWWf+nii1W098qtifBLj2RogtOamg3S+0p +MEyEcwO8deZMuzE517HYcCQOfs7FHt6bshvVyiRFZnRvgKlyQ+peJXWcez5/ +9KtaNLyc0/2z1KKOitGtZeUukXBGUa2v3V0DD+VETNemXQK9abdOu82aGGF6 +c+bKRBAYywjv58zUxKklkqrI6QBgTNVLumVrIn+17dkR+wCQ+dd/sTJHEx8/ +PORfbR4AG81b0z3zNFHfbOHJjR0BUOsb/auOoYmucU8Nn/zwB/2q+eSQ/zTR +j9+8/pO3P2hatw99n9TEpnYOMYHgc6AQfiOoVksLP0slrT4s8oNq3cesFjpa +eMeuMeldhh8cWHqV2EXTQqfXQXYsiX4QdGYhf2yPFuYfFjS9G+AHjY7OX7ks +tLBpbWWLro4feFI1zR2ctVD2TYOv0m1fePbrq9h8jBba7pviK+v0gR3u1Fey +fVo4x2UwdDnNC25LWf6+8kkLWybP1xZEe8H8oKvG0IAW7lW57TPp6wUv7WPz +Hg5rYZarxPp9Ay+wPjCYLDSlha/jF1drx05BsG6U32YmbSwPPSahoH0KGnna +JadktXF0h9cAx7AHuL/0vMo4q42Hvt+so3q4w7TPjwvGAdr4+sltx2prdwiS +8D7dHaiNLWF9S1b67nDjoq/1cqg2fjK0Yc8VcIdinUAKLVobByo1bBXq3WC1 +7Ep1Xao2zgRtmzaUd4PEoofzHXXa+GfvnvlnS67wKqPTbVaAijXmXG97Gpzh +i4Xk8UBhKvL1XQpKLHMGphUfuz+iVOwpbV2xz3EGg4NslqwUKsKZzn0C0c7Q +sEFHS2QHFdVJeVK7TJyh2TV98x59Ktrbxz5pSzgOfTJehfEnqVinytwRUuwE +80//Lin/S8Rbdb/fr20Po0dMMq5XUFH8ESXGi2IPvRtvmQ1XUfHsuloSJ7s9 +VDmL/nOvhorNzIc/3u6xg0hhDZ21t1T0qa24fuWCHWyL8brY9ImKY40rj8Sq +joKiRxeTO7MOrjr21RQfsIUTsnmbU/frIPm1J+NuqQ2E1B/zkjuggwn27xOE +02wg3p33Xam1DnaIe5oVX7OB6sfBse9sddC3zZNFzMkG+OXMuNdcdNCiLmvD +J3YbaJAb4XcO1EFX2xNv1k8cgh0KZIpcug6+0HjncEzBGmZ33NEsndFBxoyH +JaPZCnqb0ZhvTgfXVuUPMRVYQc2Z6UMBCzrIpDGc73nLCuJK957V/K2DG9pz +2eMsrWCHDlN+JYsusmQMsW7vsATXvT6SdYK6OD5668Stgf3Q6WHK0UnTxYXX +L7MubrWA8uw/XxdidJHTqOBOVIkZaBoGLJnf1EXdFC+WuhQzeP51kiPjli76 +5Cr1CIabQSlpQMs8UReTigvcNliZQX5Kza2H93VROO6A8pcpU8iIjaKaFuqi +9pKz23NlU7gewJ2Q8kEX60SlrpvWGQM7X0zOVJcuvi2XOahSYAzRJUzVBr26 +WPm121kp2RiuTs+OTn7SRU2OCEG308ZwybOTtmdUF/FPqVAtvzGcc/xnbHxZ +F73vxgarnTYCeyNp1CXR8IRPN+8FOUNY62TnqqPQkDZ6fyeZxxAy3Kf7zaVp +uP59rPvTHwMYja64YK9Aw0vLfSkp7QZw7q1VUbAaDY003P/lvmQANywvkspN +iHjSrxcm+vZA5dGuVXVfGoLZ9qn+LASn8cqm6rPEeJupB28CAlNIRopRAA1H +RmN3Ol5CMLl/Wt0mmIY75WYsttshdHze4O1/hYa1g8VcT7kRfrju6i9JpqE3 +2/ntB5kAxHyuVeyqoSF3eNVU+GcaxP09qXGzloZlKqEDpS9pwJxoUvL9DQ21 +pL42MmfQ4EcZ67OMt4QDM6VXXWlQyXQ1hfcDDb+McslY/9AF+7vhFxZHaBie +Pyxzfl0HUqqCNV5u1UOxSdbgcV0qcFjalYhy6aFD01meXAoVwr9oK13Ypodb ++YZvRbFSwZN1WUZFQA8fjrzojG3VBi2rQP5MEjGu5Lu1z00buofOzUWp6qFd +W9pn+7taILDFu2S/rR4maVkm2G7ShGzDsJAZOz2sfC9/L2xCA9TC4gzvOOqh +hP/+lNdtGmA5U9zV66KH3jVGEln3NSC6e2HlhLcebnNqnWxU04DlzMsGIRF6 +eP3q7Jbok+rQp3vnQ06eHn4Ub49ZH1IDz/PZD/YW6qGqFYdZ/js1WCx87j5Z +rIeey7bBAQw14JXqXVIt08MtSr8aDkWrwT52CfEXNXpYQaxr3041qO7McfvQ +pYdMuTFTrCGqYM5VrhTYq4fRK+98LN1Uodf07aJwvx62yL56UWSpCvOVEzHH +vhD7dUXVo1paFZQeqRSM/9DDTbxRpD8tKlDdtycwdkoPz34at2OrVAFz/kOg +PKOHfqDxYOdjFTh57Xx7wAIxnl7VURWqAvM10alCy3p4t6UpSd5DBSJ/J5+o +/K2HIZ8913KtVWCb+jNFpzU9fD6lMWusrwIPfSoX/v7VwzdZ348ub1eB/wEo +sV/b + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07898806381233775}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07898806381233775}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356689036703*^9}, + CellLabel-> + "Out[119]=",ExpressionUUID->"040ee5c7-cd64-4ec7-b85a-f31d6a698bf3"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"2335a158-7588-4c40-bdb5-\ -53b7ef04b97c"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VV0XAHCRqAyZ53uvWUWGTJfLWpmTKCmZChGJKJIhhSKVhBKvEiGV +mXvzmioRryRTpiiKiAyRudB3vr/O83v2c9az9z5rrb2PpKuvtTszExOT1QYm +pv8/FwfevpG5ma2fxP64/7iFiX7nQ+HgPb2R8Pf53abDATKAAq2uwr2J8F60 +wVIuQB0CD+T2sPRmgvCMaeDGACPgmRZKXOkphaqDvJR3/jYwWG3pO99TC2Gm +Du0c/m5gIvPj82xPB7T2mDrI+wXASo9W0kzPEEwG59mmu12FOsMn2e2Zc1Ae +nWK2uCUJxAcrRl0V12Dj6LrQWuND4Pc+nstmyII/vj46evF7FiSqmlRZHmZH +k3qDTN3TT+FjikrN7DZOfCCqvYGqkQ+pH/K4A2U5cZG7tfipUT7Yc8kf/03l +RHt13wxum3z4dEVinfkEJ77LqlGpO5cPX85sofE/58TXmxwLaoryYczo27+a +dlzYPDMzxKNQAMszyUWhj7jx68aBxHmeQriZfbmVWYQHmSZW32xsKgJz9VO8 +AtI8eNS15NxkdxGwv7E+LK/Eg/5FspNNw0VwdVi2f98eHnzTH6jtvVYEF6Wa +R++e4sEsgVMrZOFiOJMhvC5XyYN+Ze3T/ObFcPBBieI+B17MpG1YCs0tBqG7 +w9fvpPGhy9LSATanEhDe+fzqcg4fxr7Vap91KQHR2ujLTsV8eKhzo1jvyRIg +zWw/L1/HhzweAptT/EpA1sLPuWqMD7XvCeLIlRLYvXFNc3g3P/aesnrCeFYC +VgGC39Sa+HFrUBRF5lcJHNg6NpD8gR/rvI4NRS+WgHVmxcfVT/zYLu17fOR3 +CRxpc2xt+MmPY76fryexlIKTYlalvYAApoW236vlL4XT35QTIp0FMGu2YL+V +Zilcs9mr37EogJvm2U+rBpaCKKNFlHmDIF4xS1p3CimFQj6bJdWtgmj7XvFq +1KVS6O44VpxAFsSzzR1u9dGlIHMwQOqgmSBGsbZeYE8uhdr96Zva/hHEk56J +TffLSmHNZKHlPU0IYwRc3y7OlkJ8TkjemokQVqopB0YsEO9vYopROiiE0/kr +fGwrpWBRv2XPLXch9Py4IsXCRIdUQwrdIk4IpfpNE19y0kEb9yW/GxTCcbv9 +fQYKdPCnPjr+NlIYmUavZUXa0cE8g2t+X6wwOgwanddxpIMU28WYliRhvBgs +PDJ1jA5tnUdKPjwVxqBJzDB1o8MuPw6WgRZhjF9Ou9Vwhg5jORdyfomKYPeb +1YRfkXR4xTmic15GBAdVM33couhwL8C6dUlJBPM8OKbar9HB2EBpeRVFcC97 +R296LB0yPw/tZfMQwceVU75s9+jgyG85JUYXweKfg39Zn9Jhd2hVxMNqEVQf +kLRQy6XDliEFQckGESwM8jS0z6dDRRELyH0UwfzczRppxXQQ3FcRr/JXBM+b +ie3+WU7MP0JG3XifKAoV+fG9aaSD0c/fIWeGRfFBkUeoxggdgs3u7ng9KYpu +DA3OtlE6FD5S6uNbFEWDrTHXTo7RQdjGmVrBLoZugzba1yboMFlev8SySwz/ +mxNKS56lw53I+IB/gsTQYsPXrQurdGjs3y4zGSGGwilfAy3X6bCqXvdB/6YY +2vp6d2X9pcPJ7wtq39LEMJ9/m58BMwN0LBxmd9WJ4UCXi4oVGwOGBOTOvOEU +R56BxWtPtjFAyPeVhJCQOD7ZuC+6hocBFo1H35+iiGNkaMjVLl4GlIXcVOTe +LY5SH/KuzPEz4MbgzA+7o+KoKOOS/VeYAa+0b6Tmu4hjMHN8+bIIA+YTpM3/ +eoljjrvuhylRBhwzOvIsO0wcX9T6kpvFGaD2rMrjZ6Y4Np47vdOOwgAP5sNC +BvniaHEh8aaaJAMeOEw33H1OzKdSdoVNigGbuCTldBrF0aOXzPREmgF956K/ +XZ0SR61Lt7qfyzGAu5l8t2dRHDUEqFW+8gwwkq0w3MEkgT6FtxiyCgwo7JnI +bOWVQIvO0bGo7QyIoB10EdWWQHmFW+eEFBlgduzhLy0DCaxzn+N8RZgrfOLK +YQsJPMkjK+CqRMynLion3lkCHSx6TqfuYsCJkQ6tQi8JDJfteKGszIAdbJS3 +7wIkcG0tNryGcLl55cSm6xI4Tzdz6lRhwGVvtjCZOxKoGt0WbKvKAJM4Gy6D +NAn8qS/H0U24s31aJaxEAutj7ZPr1Rhwf063NrVKAun3mxM1dzPAVeD6ofJ6 +CfSN3L05i/DMUenAuY8S2Nkl5H1GnQH/hvix8XyTQH0xDYf3hC89eJGya1oC +r36PbpLXYADHF9uqU8wklHkgrNxK+MOGxxbXOEiYmbRRXlyTAanSvz5nC5Lw +k0ZYththeY9Ypi87SHhRKUxjjPB0zMeENXUSZj2p3ietxQBGrpy0GJDwztaV +STvCoc3+DO29JDwtlygaS9hgusb4yCESOuwZ76ogvHkbV4+/EwkvUFwow4Tb +VB08EzxIeGbDsT9s2gxIPvR0pfAsCe1SjT0VCB87v3CjOZSE54UvexoRlk02 +EP8RRcJZkv+aA+HJ8tsFbPEkzKi/qeBLmN73SV82lYStyeoTYYRDVre3GWST +cCGxzySG8B7SBRfnQhJGyk7S4giz45tfYeUkvKv0seU24RYXnqv3a0n4Yol3 +PZZw0pVjAhXNJKzR42iOIuz4OC+nu5uE1rJUnRDCUv8ta81/IWG3Pre5F+Hx +MeO3PBMkFLvKunaYcPGWO/bKCySUtL1ro0f4guKXCYu/RLxwDWsKYX1LpTCv +zWS8pOy2tE7sB6tfCFcMHxlx8YHxR8LNCf+lP5YgI9M7J/0iwnfo/Kp18mRM +ZJUbDids3+VS+0WVjIeOBWpYEpZcKjy0rkvG2ck2TSHCY8Kr38RMyMgvXzHW +T3y/Ip29gdQDZJQdpFs8IBzoeI/N1p6MrIambkcJs2So7Eg8Q0aZa7aMOiI/ +ml6HVRUFkbEn/PvPc4Tjh5ss3keS8dkRzREJwiR5d1/2ZDIOBBuzeBD5NmJW +yiT3iIwTMdLKrITzvf4mGOaRsW/+j2g6ka86hf8wLr0i456BEe0GIr+NelrW +phuJ9RYd1ncgbMm00fR4BxlPFn1LmiTq4YT1mY8wQsbQ2Fjc+P96CZW8HM5K +QZ4jfk/ZiPp6x12dpb2FglwOcOIyUY8Hso80znBRcOhoesgcUa8O72/yuAhT +cKud05s2op79yItZe3ZSkGmOb/z4DgYs0OMbV5Qp+CAlp6CS6AchZjunStQp +yN8V9JGHcNRZZ00pfQpabzb2fk70k9S6pkbmgxTM3R+X3S7DgDce6VN1gRRk +f3LqznESA/auUnkvhlIww1bKL0KCyKf4Tk31cArGDMo1pRP97mPF5vDs6xRs +tXn+p53oh9NbA3ijHlBw+sPVixxCDBAuNtMyqaVgjUOqej8XA9KMhh3WGyho +IfA2vp6TyLePYeFl7yhoXqAYkc/BACVm+lu5Lgq+PX9Kxm8LUW82Eo5sY8T+ +fGlIa2FlgPfybHgjpyRqD3M9Gf9DB52zJwVHeSWxd4V1KeI3Hdh/9OWxCEui +LNuik+AKHR7313XrS0miq5df0O5FOgy8TFJ8rimJXb0dAjBDB6soau+j45LI +P1z2OG2YDqT1Ap9XbpJ4WeXz/uWvxHkVKMXy+ZQkXpRQUrT6QocYz627hAOI ++Hlad2Y/0aFm3+crcTGSeE4s32BzNx3UeCOUQ0sk8U5j4feo/+jAdHPhTUqZ +JI6zqAxl19OhhcXLvqxKEn0afqvV1NHh9IJ11Gy9JE4cvTM48YoO2b0y/R59 +kqj0D8dDIeL8FUxvjLZhkUL30tyLtU/osLJz24DSYSm89K1rf8BVOiymiUbs +tpfC6dKKZUXi/jDPLStDPS6F4zYkx6HLdJieo3oZnZLCyPoQG8NQOgxVnVi0 +D5NCFBMyGjhLh6Z9/3LFPJbCvp2RI8HEfSX19DEYWpBClptXrhzRoAMtLz/j +3j1p5A1ccRLpK4V+Sl668X1p/O+Bf4cRcc8Puffs4Xy6NO5Ssvzi01kK/0bk +PLB+Jo0i7hyt5S2loHY0I4WrWhp/yG/brlZXCttZ78ZHf5XGIO8la0ZeKQge +Dw0PVJTB5d8jj5lDS2GW19z5SK0Mmg3X/FbgK4Vvsc5HzrHJ4YRlatycUAns +/Xlh74imPP6w5Mzp5iuGyRPs/ozLCjjV+pr8srmA+L8QYr5Wux1dBtvnZ9zy +gPe9XFzxzx3IPSeULE56BuIxRQc0NRUxaup+XMazHEjZSd3G56GEOYERCcze +2dAkukdjLmEXWl77MP5ufyboiNfGK3cr4yOXhnEecgZwsWQGuESqYAt5l1Sy +9wMgRZBpdnKq2KaS3fM7OQU2yzqWWf+nii1W098qtifBLj2RogtOamg3S+0p +MEyEcwO8deZMuzE517HYcCQOfs7FHt6bshvVyiRFZnRvgKlyQ+peJXWcez5/ +9KtaNLyc0/2z1KKOitGtZeUukXBGUa2v3V0DD+VETNemXQK9abdOu82aGGF6 +c+bKRBAYywjv58zUxKklkqrI6QBgTNVLumVrIn+17dkR+wCQ+dd/sTJHEx8/ +PORfbR4AG81b0z3zNFHfbOHJjR0BUOsb/auOoYmucU8Nn/zwB/2q+eSQ/zTR +j9+8/pO3P2hatw99n9TEpnYOMYHgc6AQfiOoVksLP0slrT4s8oNq3cesFjpa +eMeuMeldhh8cWHqV2EXTQqfXQXYsiX4QdGYhf2yPFuYfFjS9G+AHjY7OX7ks +tLBpbWWLro4feFI1zR2ctVD2TYOv0m1fePbrq9h8jBba7pviK+v0gR3u1Fey +fVo4x2UwdDnNC25LWf6+8kkLWybP1xZEe8H8oKvG0IAW7lW57TPp6wUv7WPz +Hg5rYZarxPp9Ay+wPjCYLDSlha/jF1drx05BsG6U32YmbSwPPSahoH0KGnna +JadktXF0h9cAx7AHuL/0vMo4q42Hvt+so3q4w7TPjwvGAdr4+sltx2prdwiS +8D7dHaiNLWF9S1b67nDjoq/1cqg2fjK0Yc8VcIdinUAKLVobByo1bBXq3WC1 +7Ep1Xao2zgRtmzaUd4PEoofzHXXa+GfvnvlnS67wKqPTbVaAijXmXG97Gpzh +i4Xk8UBhKvL1XQpKLHMGphUfuz+iVOwpbV2xz3EGg4NslqwUKsKZzn0C0c7Q +sEFHS2QHFdVJeVK7TJyh2TV98x59Ktrbxz5pSzgOfTJehfEnqVinytwRUuwE +80//Lin/S8Rbdb/fr20Po0dMMq5XUFH8ESXGi2IPvRtvmQ1XUfHsuloSJ7s9 +VDmL/nOvhorNzIc/3u6xg0hhDZ21t1T0qa24fuWCHWyL8brY9ImKY40rj8Sq +joKiRxeTO7MOrjr21RQfsIUTsnmbU/frIPm1J+NuqQ2E1B/zkjuggwn27xOE +02wg3p33Xam1DnaIe5oVX7OB6sfBse9sddC3zZNFzMkG+OXMuNdcdNCiLmvD +J3YbaJAb4XcO1EFX2xNv1k8cgh0KZIpcug6+0HjncEzBGmZ33NEsndFBxoyH +JaPZCnqb0ZhvTgfXVuUPMRVYQc2Z6UMBCzrIpDGc73nLCuJK957V/K2DG9pz +2eMsrWCHDlN+JYsusmQMsW7vsATXvT6SdYK6OD5668Stgf3Q6WHK0UnTxYXX +L7MubrWA8uw/XxdidJHTqOBOVIkZaBoGLJnf1EXdFC+WuhQzeP51kiPjli76 +5Cr1CIabQSlpQMs8UReTigvcNliZQX5Kza2H93VROO6A8pcpU8iIjaKaFuqi +9pKz23NlU7gewJ2Q8kEX60SlrpvWGQM7X0zOVJcuvi2XOahSYAzRJUzVBr26 +WPm121kp2RiuTs+OTn7SRU2OCEG308ZwybOTtmdUF/FPqVAtvzGcc/xnbHxZ +F73vxgarnTYCeyNp1CXR8IRPN+8FOUNY62TnqqPQkDZ6fyeZxxAy3Kf7zaVp +uP59rPvTHwMYja64YK9Aw0vLfSkp7QZw7q1VUbAaDY003P/lvmQANywvkspN +iHjSrxcm+vZA5dGuVXVfGoLZ9qn+LASn8cqm6rPEeJupB28CAlNIRopRAA1H +RmN3Ol5CMLl/Wt0mmIY75WYsttshdHze4O1/hYa1g8VcT7kRfrju6i9JpqE3 +2/ntB5kAxHyuVeyqoSF3eNVU+GcaxP09qXGzloZlKqEDpS9pwJxoUvL9DQ21 +pL42MmfQ4EcZ67OMt4QDM6VXXWlQyXQ1hfcDDb+McslY/9AF+7vhFxZHaBie +Pyxzfl0HUqqCNV5u1UOxSdbgcV0qcFjalYhy6aFD01meXAoVwr9oK13Ypodb ++YZvRbFSwZN1WUZFQA8fjrzojG3VBi2rQP5MEjGu5Lu1z00buofOzUWp6qFd +W9pn+7taILDFu2S/rR4maVkm2G7ShGzDsJAZOz2sfC9/L2xCA9TC4gzvOOqh +hP/+lNdtGmA5U9zV66KH3jVGEln3NSC6e2HlhLcebnNqnWxU04DlzMsGIRF6 +eP3q7Jbok+rQp3vnQ06eHn4Ub49ZH1IDz/PZD/YW6qGqFYdZ/js1WCx87j5Z +rIeey7bBAQw14JXqXVIt08MtSr8aDkWrwT52CfEXNXpYQaxr3041qO7McfvQ +pYdMuTFTrCGqYM5VrhTYq4fRK+98LN1Uodf07aJwvx62yL56UWSpCvOVEzHH +vhD7dUXVo1paFZQeqRSM/9DDTbxRpD8tKlDdtycwdkoPz34at2OrVAFz/kOg +PKOHfqDxYOdjFTh57Xx7wAIxnl7VURWqAvM10alCy3p4t6UpSd5DBSJ/J5+o +/K2HIZ8913KtVWCb+jNFpzU9fD6lMWusrwIPfSoX/v7VwzdZ348ub1eB/wEo +sV/b + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VV0XAHCRqAyZ53uvWUWGTJfLWpmTKCmZChGJKJIhhSKVhBKvEiGV +mXvzmioRryRTpiiKiAyRudB3vr/O83v2c9az9z5rrb2PpKuvtTszExOT1QYm +pv8/FwfevpG5ma2fxP64/7iFiX7nQ+HgPb2R8Pf53abDATKAAq2uwr2J8F60 +wVIuQB0CD+T2sPRmgvCMaeDGACPgmRZKXOkphaqDvJR3/jYwWG3pO99TC2Gm +Du0c/m5gIvPj82xPB7T2mDrI+wXASo9W0kzPEEwG59mmu12FOsMn2e2Zc1Ae +nWK2uCUJxAcrRl0V12Dj6LrQWuND4Pc+nstmyII/vj46evF7FiSqmlRZHmZH +k3qDTN3TT+FjikrN7DZOfCCqvYGqkQ+pH/K4A2U5cZG7tfipUT7Yc8kf/03l +RHt13wxum3z4dEVinfkEJ77LqlGpO5cPX85sofE/58TXmxwLaoryYczo27+a +dlzYPDMzxKNQAMszyUWhj7jx68aBxHmeQriZfbmVWYQHmSZW32xsKgJz9VO8 +AtI8eNS15NxkdxGwv7E+LK/Eg/5FspNNw0VwdVi2f98eHnzTH6jtvVYEF6Wa +R++e4sEsgVMrZOFiOJMhvC5XyYN+Ze3T/ObFcPBBieI+B17MpG1YCs0tBqG7 +w9fvpPGhy9LSATanEhDe+fzqcg4fxr7Vap91KQHR2ujLTsV8eKhzo1jvyRIg +zWw/L1/HhzweAptT/EpA1sLPuWqMD7XvCeLIlRLYvXFNc3g3P/aesnrCeFYC +VgGC39Sa+HFrUBRF5lcJHNg6NpD8gR/rvI4NRS+WgHVmxcfVT/zYLu17fOR3 +CRxpc2xt+MmPY76fryexlIKTYlalvYAApoW236vlL4XT35QTIp0FMGu2YL+V +Zilcs9mr37EogJvm2U+rBpaCKKNFlHmDIF4xS1p3CimFQj6bJdWtgmj7XvFq +1KVS6O44VpxAFsSzzR1u9dGlIHMwQOqgmSBGsbZeYE8uhdr96Zva/hHEk56J +TffLSmHNZKHlPU0IYwRc3y7OlkJ8TkjemokQVqopB0YsEO9vYopROiiE0/kr +fGwrpWBRv2XPLXch9Py4IsXCRIdUQwrdIk4IpfpNE19y0kEb9yW/GxTCcbv9 +fQYKdPCnPjr+NlIYmUavZUXa0cE8g2t+X6wwOgwanddxpIMU28WYliRhvBgs +PDJ1jA5tnUdKPjwVxqBJzDB1o8MuPw6WgRZhjF9Ou9Vwhg5jORdyfomKYPeb +1YRfkXR4xTmic15GBAdVM33couhwL8C6dUlJBPM8OKbar9HB2EBpeRVFcC97 +R296LB0yPw/tZfMQwceVU75s9+jgyG85JUYXweKfg39Zn9Jhd2hVxMNqEVQf +kLRQy6XDliEFQckGESwM8jS0z6dDRRELyH0UwfzczRppxXQQ3FcRr/JXBM+b +ie3+WU7MP0JG3XifKAoV+fG9aaSD0c/fIWeGRfFBkUeoxggdgs3u7ng9KYpu +DA3OtlE6FD5S6uNbFEWDrTHXTo7RQdjGmVrBLoZugzba1yboMFlev8SySwz/ +mxNKS56lw53I+IB/gsTQYsPXrQurdGjs3y4zGSGGwilfAy3X6bCqXvdB/6YY +2vp6d2X9pcPJ7wtq39LEMJ9/m58BMwN0LBxmd9WJ4UCXi4oVGwOGBOTOvOEU +R56BxWtPtjFAyPeVhJCQOD7ZuC+6hocBFo1H35+iiGNkaMjVLl4GlIXcVOTe +LY5SH/KuzPEz4MbgzA+7o+KoKOOS/VeYAa+0b6Tmu4hjMHN8+bIIA+YTpM3/ +eoljjrvuhylRBhwzOvIsO0wcX9T6kpvFGaD2rMrjZ6Y4Np47vdOOwgAP5sNC +BvniaHEh8aaaJAMeOEw33H1OzKdSdoVNigGbuCTldBrF0aOXzPREmgF956K/ +XZ0SR61Lt7qfyzGAu5l8t2dRHDUEqFW+8gwwkq0w3MEkgT6FtxiyCgwo7JnI +bOWVQIvO0bGo7QyIoB10EdWWQHmFW+eEFBlgduzhLy0DCaxzn+N8RZgrfOLK +YQsJPMkjK+CqRMynLion3lkCHSx6TqfuYsCJkQ6tQi8JDJfteKGszIAdbJS3 +7wIkcG0tNryGcLl55cSm6xI4Tzdz6lRhwGVvtjCZOxKoGt0WbKvKAJM4Gy6D +NAn8qS/H0U24s31aJaxEAutj7ZPr1Rhwf063NrVKAun3mxM1dzPAVeD6ofJ6 +CfSN3L05i/DMUenAuY8S2Nkl5H1GnQH/hvix8XyTQH0xDYf3hC89eJGya1oC +r36PbpLXYADHF9uqU8wklHkgrNxK+MOGxxbXOEiYmbRRXlyTAanSvz5nC5Lw +k0ZYththeY9Ypi87SHhRKUxjjPB0zMeENXUSZj2p3ietxQBGrpy0GJDwztaV +STvCoc3+DO29JDwtlygaS9hgusb4yCESOuwZ76ogvHkbV4+/EwkvUFwow4Tb +VB08EzxIeGbDsT9s2gxIPvR0pfAsCe1SjT0VCB87v3CjOZSE54UvexoRlk02 +EP8RRcJZkv+aA+HJ8tsFbPEkzKi/qeBLmN73SV82lYStyeoTYYRDVre3GWST +cCGxzySG8B7SBRfnQhJGyk7S4giz45tfYeUkvKv0seU24RYXnqv3a0n4Yol3 +PZZw0pVjAhXNJKzR42iOIuz4OC+nu5uE1rJUnRDCUv8ta81/IWG3Pre5F+Hx +MeO3PBMkFLvKunaYcPGWO/bKCySUtL1ro0f4guKXCYu/RLxwDWsKYX1LpTCv +zWS8pOy2tE7sB6tfCFcMHxlx8YHxR8LNCf+lP5YgI9M7J/0iwnfo/Kp18mRM +ZJUbDids3+VS+0WVjIeOBWpYEpZcKjy0rkvG2ck2TSHCY8Kr38RMyMgvXzHW +T3y/Ip29gdQDZJQdpFs8IBzoeI/N1p6MrIambkcJs2So7Eg8Q0aZa7aMOiI/ +ml6HVRUFkbEn/PvPc4Tjh5ss3keS8dkRzREJwiR5d1/2ZDIOBBuzeBD5NmJW +yiT3iIwTMdLKrITzvf4mGOaRsW/+j2g6ka86hf8wLr0i456BEe0GIr+NelrW +phuJ9RYd1ncgbMm00fR4BxlPFn1LmiTq4YT1mY8wQsbQ2Fjc+P96CZW8HM5K +QZ4jfk/ZiPp6x12dpb2FglwOcOIyUY8Hso80znBRcOhoesgcUa8O72/yuAhT +cKud05s2op79yItZe3ZSkGmOb/z4DgYs0OMbV5Qp+CAlp6CS6AchZjunStQp +yN8V9JGHcNRZZ00pfQpabzb2fk70k9S6pkbmgxTM3R+X3S7DgDce6VN1gRRk +f3LqznESA/auUnkvhlIww1bKL0KCyKf4Tk31cArGDMo1pRP97mPF5vDs6xRs +tXn+p53oh9NbA3ijHlBw+sPVixxCDBAuNtMyqaVgjUOqej8XA9KMhh3WGyho +IfA2vp6TyLePYeFl7yhoXqAYkc/BACVm+lu5Lgq+PX9Kxm8LUW82Eo5sY8T+ +fGlIa2FlgPfybHgjpyRqD3M9Gf9DB52zJwVHeSWxd4V1KeI3Hdh/9OWxCEui +LNuik+AKHR7313XrS0miq5df0O5FOgy8TFJ8rimJXb0dAjBDB6soau+j45LI +P1z2OG2YDqT1Ap9XbpJ4WeXz/uWvxHkVKMXy+ZQkXpRQUrT6QocYz627hAOI ++Hlad2Y/0aFm3+crcTGSeE4s32BzNx3UeCOUQ0sk8U5j4feo/+jAdHPhTUqZ +JI6zqAxl19OhhcXLvqxKEn0afqvV1NHh9IJ11Gy9JE4cvTM48YoO2b0y/R59 +kqj0D8dDIeL8FUxvjLZhkUL30tyLtU/osLJz24DSYSm89K1rf8BVOiymiUbs +tpfC6dKKZUXi/jDPLStDPS6F4zYkx6HLdJieo3oZnZLCyPoQG8NQOgxVnVi0 +D5NCFBMyGjhLh6Z9/3LFPJbCvp2RI8HEfSX19DEYWpBClptXrhzRoAMtLz/j +3j1p5A1ccRLpK4V+Sl668X1p/O+Bf4cRcc8Puffs4Xy6NO5Ssvzi01kK/0bk +PLB+Jo0i7hyt5S2loHY0I4WrWhp/yG/brlZXCttZ78ZHf5XGIO8la0ZeKQge +Dw0PVJTB5d8jj5lDS2GW19z5SK0Mmg3X/FbgK4Vvsc5HzrHJ4YRlatycUAns +/Xlh74imPP6w5Mzp5iuGyRPs/ozLCjjV+pr8srmA+L8QYr5Wux1dBtvnZ9zy +gPe9XFzxzx3IPSeULE56BuIxRQc0NRUxaup+XMazHEjZSd3G56GEOYERCcze +2dAkukdjLmEXWl77MP5ufyboiNfGK3cr4yOXhnEecgZwsWQGuESqYAt5l1Sy +9wMgRZBpdnKq2KaS3fM7OQU2yzqWWf+nii1W098qtifBLj2RogtOamg3S+0p +MEyEcwO8deZMuzE517HYcCQOfs7FHt6bshvVyiRFZnRvgKlyQ+peJXWcez5/ +9KtaNLyc0/2z1KKOitGtZeUukXBGUa2v3V0DD+VETNemXQK9abdOu82aGGF6 +c+bKRBAYywjv58zUxKklkqrI6QBgTNVLumVrIn+17dkR+wCQ+dd/sTJHEx8/ +PORfbR4AG81b0z3zNFHfbOHJjR0BUOsb/auOoYmucU8Nn/zwB/2q+eSQ/zTR +j9+8/pO3P2hatw99n9TEpnYOMYHgc6AQfiOoVksLP0slrT4s8oNq3cesFjpa +eMeuMeldhh8cWHqV2EXTQqfXQXYsiX4QdGYhf2yPFuYfFjS9G+AHjY7OX7ks +tLBpbWWLro4feFI1zR2ctVD2TYOv0m1fePbrq9h8jBba7pviK+v0gR3u1Fey +fVo4x2UwdDnNC25LWf6+8kkLWybP1xZEe8H8oKvG0IAW7lW57TPp6wUv7WPz +Hg5rYZarxPp9Ay+wPjCYLDSlha/jF1drx05BsG6U32YmbSwPPSahoH0KGnna +JadktXF0h9cAx7AHuL/0vMo4q42Hvt+so3q4w7TPjwvGAdr4+sltx2prdwiS +8D7dHaiNLWF9S1b67nDjoq/1cqg2fjK0Yc8VcIdinUAKLVobByo1bBXq3WC1 +7Ep1Xao2zgRtmzaUd4PEoofzHXXa+GfvnvlnS67wKqPTbVaAijXmXG97Gpzh +i4Xk8UBhKvL1XQpKLHMGphUfuz+iVOwpbV2xz3EGg4NslqwUKsKZzn0C0c7Q +sEFHS2QHFdVJeVK7TJyh2TV98x59Ktrbxz5pSzgOfTJehfEnqVinytwRUuwE +80//Lin/S8Rbdb/fr20Po0dMMq5XUFH8ESXGi2IPvRtvmQ1XUfHsuloSJ7s9 +VDmL/nOvhorNzIc/3u6xg0hhDZ21t1T0qa24fuWCHWyL8brY9ImKY40rj8Sq +joKiRxeTO7MOrjr21RQfsIUTsnmbU/frIPm1J+NuqQ2E1B/zkjuggwn27xOE +02wg3p33Xam1DnaIe5oVX7OB6sfBse9sddC3zZNFzMkG+OXMuNdcdNCiLmvD +J3YbaJAb4XcO1EFX2xNv1k8cgh0KZIpcug6+0HjncEzBGmZ33NEsndFBxoyH +JaPZCnqb0ZhvTgfXVuUPMRVYQc2Z6UMBCzrIpDGc73nLCuJK957V/K2DG9pz +2eMsrWCHDlN+JYsusmQMsW7vsATXvT6SdYK6OD5668Stgf3Q6WHK0UnTxYXX +L7MubrWA8uw/XxdidJHTqOBOVIkZaBoGLJnf1EXdFC+WuhQzeP51kiPjli76 +5Cr1CIabQSlpQMs8UReTigvcNliZQX5Kza2H93VROO6A8pcpU8iIjaKaFuqi +9pKz23NlU7gewJ2Q8kEX60SlrpvWGQM7X0zOVJcuvi2XOahSYAzRJUzVBr26 +WPm121kp2RiuTs+OTn7SRU2OCEG308ZwybOTtmdUF/FPqVAtvzGcc/xnbHxZ +F73vxgarnTYCeyNp1CXR8IRPN+8FOUNY62TnqqPQkDZ6fyeZxxAy3Kf7zaVp +uP59rPvTHwMYja64YK9Aw0vLfSkp7QZw7q1VUbAaDY003P/lvmQANywvkspN +iHjSrxcm+vZA5dGuVXVfGoLZ9qn+LASn8cqm6rPEeJupB28CAlNIRopRAA1H +RmN3Ol5CMLl/Wt0mmIY75WYsttshdHze4O1/hYa1g8VcT7kRfrju6i9JpqE3 +2/ntB5kAxHyuVeyqoSF3eNVU+GcaxP09qXGzloZlKqEDpS9pwJxoUvL9DQ21 +pL42MmfQ4EcZ67OMt4QDM6VXXWlQyXQ1hfcDDb+McslY/9AF+7vhFxZHaBie +Pyxzfl0HUqqCNV5u1UOxSdbgcV0qcFjalYhy6aFD01meXAoVwr9oK13Ypodb ++YZvRbFSwZN1WUZFQA8fjrzojG3VBi2rQP5MEjGu5Lu1z00buofOzUWp6qFd +W9pn+7taILDFu2S/rR4maVkm2G7ShGzDsJAZOz2sfC9/L2xCA9TC4gzvOOqh +hP/+lNdtGmA5U9zV66KH3jVGEln3NSC6e2HlhLcebnNqnWxU04DlzMsGIRF6 +eP3q7Jbok+rQp3vnQ06eHn4Ub49ZH1IDz/PZD/YW6qGqFYdZ/js1WCx87j5Z +rIeey7bBAQw14JXqXVIt08MtSr8aDkWrwT52CfEXNXpYQaxr3041qO7McfvQ +pYdMuTFTrCGqYM5VrhTYq4fRK+98LN1Uodf07aJwvx62yL56UWSpCvOVEzHH +vhD7dUXVo1paFZQeqRSM/9DDTbxRpD8tKlDdtycwdkoPz34at2OrVAFz/kOg +PKOHfqDxYOdjFTh57Xx7wAIxnl7VURWqAvM10alCy3p4t6UpSd5DBSJ/J5+o +/K2HIZ8913KtVWCb+jNFpzU9fD6lMWusrwIPfSoX/v7VwzdZ348ub1eB/wEo +sV/b + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07898806381233775}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07898806381233775}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VV0XAHCRqAyZ53uvWUWGTJfLWpmTKCmZChGJKJIhhSKVhBKvEiGV +mXvzmioRryRTpiiKiAyRudB3vr/O83v2c9az9z5rrb2PpKuvtTszExOT1QYm +pv8/FwfevpG5ma2fxP64/7iFiX7nQ+HgPb2R8Pf53abDATKAAq2uwr2J8F60 +wVIuQB0CD+T2sPRmgvCMaeDGACPgmRZKXOkphaqDvJR3/jYwWG3pO99TC2Gm +Du0c/m5gIvPj82xPB7T2mDrI+wXASo9W0kzPEEwG59mmu12FOsMn2e2Zc1Ae +nWK2uCUJxAcrRl0V12Dj6LrQWuND4Pc+nstmyII/vj46evF7FiSqmlRZHmZH +k3qDTN3TT+FjikrN7DZOfCCqvYGqkQ+pH/K4A2U5cZG7tfipUT7Yc8kf/03l +RHt13wxum3z4dEVinfkEJ77LqlGpO5cPX85sofE/58TXmxwLaoryYczo27+a +dlzYPDMzxKNQAMszyUWhj7jx68aBxHmeQriZfbmVWYQHmSZW32xsKgJz9VO8 +AtI8eNS15NxkdxGwv7E+LK/Eg/5FspNNw0VwdVi2f98eHnzTH6jtvVYEF6Wa +R++e4sEsgVMrZOFiOJMhvC5XyYN+Ze3T/ObFcPBBieI+B17MpG1YCs0tBqG7 +w9fvpPGhy9LSATanEhDe+fzqcg4fxr7Vap91KQHR2ujLTsV8eKhzo1jvyRIg +zWw/L1/HhzweAptT/EpA1sLPuWqMD7XvCeLIlRLYvXFNc3g3P/aesnrCeFYC +VgGC39Sa+HFrUBRF5lcJHNg6NpD8gR/rvI4NRS+WgHVmxcfVT/zYLu17fOR3 +CRxpc2xt+MmPY76fryexlIKTYlalvYAApoW236vlL4XT35QTIp0FMGu2YL+V +Zilcs9mr37EogJvm2U+rBpaCKKNFlHmDIF4xS1p3CimFQj6bJdWtgmj7XvFq +1KVS6O44VpxAFsSzzR1u9dGlIHMwQOqgmSBGsbZeYE8uhdr96Zva/hHEk56J +TffLSmHNZKHlPU0IYwRc3y7OlkJ8TkjemokQVqopB0YsEO9vYopROiiE0/kr +fGwrpWBRv2XPLXch9Py4IsXCRIdUQwrdIk4IpfpNE19y0kEb9yW/GxTCcbv9 +fQYKdPCnPjr+NlIYmUavZUXa0cE8g2t+X6wwOgwanddxpIMU28WYliRhvBgs +PDJ1jA5tnUdKPjwVxqBJzDB1o8MuPw6WgRZhjF9Ou9Vwhg5jORdyfomKYPeb +1YRfkXR4xTmic15GBAdVM33couhwL8C6dUlJBPM8OKbar9HB2EBpeRVFcC97 +R296LB0yPw/tZfMQwceVU75s9+jgyG85JUYXweKfg39Zn9Jhd2hVxMNqEVQf +kLRQy6XDliEFQckGESwM8jS0z6dDRRELyH0UwfzczRppxXQQ3FcRr/JXBM+b +ie3+WU7MP0JG3XifKAoV+fG9aaSD0c/fIWeGRfFBkUeoxggdgs3u7ng9KYpu +DA3OtlE6FD5S6uNbFEWDrTHXTo7RQdjGmVrBLoZugzba1yboMFlev8SySwz/ +mxNKS56lw53I+IB/gsTQYsPXrQurdGjs3y4zGSGGwilfAy3X6bCqXvdB/6YY +2vp6d2X9pcPJ7wtq39LEMJ9/m58BMwN0LBxmd9WJ4UCXi4oVGwOGBOTOvOEU +R56BxWtPtjFAyPeVhJCQOD7ZuC+6hocBFo1H35+iiGNkaMjVLl4GlIXcVOTe +LY5SH/KuzPEz4MbgzA+7o+KoKOOS/VeYAa+0b6Tmu4hjMHN8+bIIA+YTpM3/ +eoljjrvuhylRBhwzOvIsO0wcX9T6kpvFGaD2rMrjZ6Y4Np47vdOOwgAP5sNC +BvniaHEh8aaaJAMeOEw33H1OzKdSdoVNigGbuCTldBrF0aOXzPREmgF956K/ +XZ0SR61Lt7qfyzGAu5l8t2dRHDUEqFW+8gwwkq0w3MEkgT6FtxiyCgwo7JnI +bOWVQIvO0bGo7QyIoB10EdWWQHmFW+eEFBlgduzhLy0DCaxzn+N8RZgrfOLK +YQsJPMkjK+CqRMynLion3lkCHSx6TqfuYsCJkQ6tQi8JDJfteKGszIAdbJS3 +7wIkcG0tNryGcLl55cSm6xI4Tzdz6lRhwGVvtjCZOxKoGt0WbKvKAJM4Gy6D +NAn8qS/H0U24s31aJaxEAutj7ZPr1Rhwf063NrVKAun3mxM1dzPAVeD6ofJ6 +CfSN3L05i/DMUenAuY8S2Nkl5H1GnQH/hvix8XyTQH0xDYf3hC89eJGya1oC +r36PbpLXYADHF9uqU8wklHkgrNxK+MOGxxbXOEiYmbRRXlyTAanSvz5nC5Lw +k0ZYththeY9Ypi87SHhRKUxjjPB0zMeENXUSZj2p3ietxQBGrpy0GJDwztaV +STvCoc3+DO29JDwtlygaS9hgusb4yCESOuwZ76ogvHkbV4+/EwkvUFwow4Tb +VB08EzxIeGbDsT9s2gxIPvR0pfAsCe1SjT0VCB87v3CjOZSE54UvexoRlk02 +EP8RRcJZkv+aA+HJ8tsFbPEkzKi/qeBLmN73SV82lYStyeoTYYRDVre3GWST +cCGxzySG8B7SBRfnQhJGyk7S4giz45tfYeUkvKv0seU24RYXnqv3a0n4Yol3 +PZZw0pVjAhXNJKzR42iOIuz4OC+nu5uE1rJUnRDCUv8ta81/IWG3Pre5F+Hx +MeO3PBMkFLvKunaYcPGWO/bKCySUtL1ro0f4guKXCYu/RLxwDWsKYX1LpTCv +zWS8pOy2tE7sB6tfCFcMHxlx8YHxR8LNCf+lP5YgI9M7J/0iwnfo/Kp18mRM +ZJUbDids3+VS+0WVjIeOBWpYEpZcKjy0rkvG2ck2TSHCY8Kr38RMyMgvXzHW +T3y/Ip29gdQDZJQdpFs8IBzoeI/N1p6MrIambkcJs2So7Eg8Q0aZa7aMOiI/ +ml6HVRUFkbEn/PvPc4Tjh5ss3keS8dkRzREJwiR5d1/2ZDIOBBuzeBD5NmJW +yiT3iIwTMdLKrITzvf4mGOaRsW/+j2g6ka86hf8wLr0i456BEe0GIr+NelrW +phuJ9RYd1ncgbMm00fR4BxlPFn1LmiTq4YT1mY8wQsbQ2Fjc+P96CZW8HM5K +QZ4jfk/ZiPp6x12dpb2FglwOcOIyUY8Hso80znBRcOhoesgcUa8O72/yuAhT +cKud05s2op79yItZe3ZSkGmOb/z4DgYs0OMbV5Qp+CAlp6CS6AchZjunStQp +yN8V9JGHcNRZZ00pfQpabzb2fk70k9S6pkbmgxTM3R+X3S7DgDce6VN1gRRk +f3LqznESA/auUnkvhlIww1bKL0KCyKf4Tk31cArGDMo1pRP97mPF5vDs6xRs +tXn+p53oh9NbA3ijHlBw+sPVixxCDBAuNtMyqaVgjUOqej8XA9KMhh3WGyho +IfA2vp6TyLePYeFl7yhoXqAYkc/BACVm+lu5Lgq+PX9Kxm8LUW82Eo5sY8T+ +fGlIa2FlgPfybHgjpyRqD3M9Gf9DB52zJwVHeSWxd4V1KeI3Hdh/9OWxCEui +LNuik+AKHR7313XrS0miq5df0O5FOgy8TFJ8rimJXb0dAjBDB6soau+j45LI +P1z2OG2YDqT1Ap9XbpJ4WeXz/uWvxHkVKMXy+ZQkXpRQUrT6QocYz627hAOI ++Hlad2Y/0aFm3+crcTGSeE4s32BzNx3UeCOUQ0sk8U5j4feo/+jAdHPhTUqZ +JI6zqAxl19OhhcXLvqxKEn0afqvV1NHh9IJ11Gy9JE4cvTM48YoO2b0y/R59 +kqj0D8dDIeL8FUxvjLZhkUL30tyLtU/osLJz24DSYSm89K1rf8BVOiymiUbs +tpfC6dKKZUXi/jDPLStDPS6F4zYkx6HLdJieo3oZnZLCyPoQG8NQOgxVnVi0 +D5NCFBMyGjhLh6Z9/3LFPJbCvp2RI8HEfSX19DEYWpBClptXrhzRoAMtLz/j +3j1p5A1ccRLpK4V+Sl668X1p/O+Bf4cRcc8Puffs4Xy6NO5Ssvzi01kK/0bk +PLB+Jo0i7hyt5S2loHY0I4WrWhp/yG/brlZXCttZ78ZHf5XGIO8la0ZeKQge +Dw0PVJTB5d8jj5lDS2GW19z5SK0Mmg3X/FbgK4Vvsc5HzrHJ4YRlatycUAns +/Xlh74imPP6w5Mzp5iuGyRPs/ozLCjjV+pr8srmA+L8QYr5Wux1dBtvnZ9zy +gPe9XFzxzx3IPSeULE56BuIxRQc0NRUxaup+XMazHEjZSd3G56GEOYERCcze +2dAkukdjLmEXWl77MP5ufyboiNfGK3cr4yOXhnEecgZwsWQGuESqYAt5l1Sy +9wMgRZBpdnKq2KaS3fM7OQU2yzqWWf+nii1W098qtifBLj2RogtOamg3S+0p +MEyEcwO8deZMuzE517HYcCQOfs7FHt6bshvVyiRFZnRvgKlyQ+peJXWcez5/ +9KtaNLyc0/2z1KKOitGtZeUukXBGUa2v3V0DD+VETNemXQK9abdOu82aGGF6 +c+bKRBAYywjv58zUxKklkqrI6QBgTNVLumVrIn+17dkR+wCQ+dd/sTJHEx8/ +PORfbR4AG81b0z3zNFHfbOHJjR0BUOsb/auOoYmucU8Nn/zwB/2q+eSQ/zTR +j9+8/pO3P2hatw99n9TEpnYOMYHgc6AQfiOoVksLP0slrT4s8oNq3cesFjpa +eMeuMeldhh8cWHqV2EXTQqfXQXYsiX4QdGYhf2yPFuYfFjS9G+AHjY7OX7ks +tLBpbWWLro4feFI1zR2ctVD2TYOv0m1fePbrq9h8jBba7pviK+v0gR3u1Fey +fVo4x2UwdDnNC25LWf6+8kkLWybP1xZEe8H8oKvG0IAW7lW57TPp6wUv7WPz +Hg5rYZarxPp9Ay+wPjCYLDSlha/jF1drx05BsG6U32YmbSwPPSahoH0KGnna +JadktXF0h9cAx7AHuL/0vMo4q42Hvt+so3q4w7TPjwvGAdr4+sltx2prdwiS +8D7dHaiNLWF9S1b67nDjoq/1cqg2fjK0Yc8VcIdinUAKLVobByo1bBXq3WC1 +7Ep1Xao2zgRtmzaUd4PEoofzHXXa+GfvnvlnS67wKqPTbVaAijXmXG97Gpzh +i4Xk8UBhKvL1XQpKLHMGphUfuz+iVOwpbV2xz3EGg4NslqwUKsKZzn0C0c7Q +sEFHS2QHFdVJeVK7TJyh2TV98x59Ktrbxz5pSzgOfTJehfEnqVinytwRUuwE +80//Lin/S8Rbdb/fr20Po0dMMq5XUFH8ESXGi2IPvRtvmQ1XUfHsuloSJ7s9 +VDmL/nOvhorNzIc/3u6xg0hhDZ21t1T0qa24fuWCHWyL8brY9ImKY40rj8Sq +joKiRxeTO7MOrjr21RQfsIUTsnmbU/frIPm1J+NuqQ2E1B/zkjuggwn27xOE +02wg3p33Xam1DnaIe5oVX7OB6sfBse9sddC3zZNFzMkG+OXMuNdcdNCiLmvD +J3YbaJAb4XcO1EFX2xNv1k8cgh0KZIpcug6+0HjncEzBGmZ33NEsndFBxoyH +JaPZCnqb0ZhvTgfXVuUPMRVYQc2Z6UMBCzrIpDGc73nLCuJK957V/K2DG9pz +2eMsrWCHDlN+JYsusmQMsW7vsATXvT6SdYK6OD5668Stgf3Q6WHK0UnTxYXX +L7MubrWA8uw/XxdidJHTqOBOVIkZaBoGLJnf1EXdFC+WuhQzeP51kiPjli76 +5Cr1CIabQSlpQMs8UReTigvcNliZQX5Kza2H93VROO6A8pcpU8iIjaKaFuqi +9pKz23NlU7gewJ2Q8kEX60SlrpvWGQM7X0zOVJcuvi2XOahSYAzRJUzVBr26 +WPm121kp2RiuTs+OTn7SRU2OCEG308ZwybOTtmdUF/FPqVAtvzGcc/xnbHxZ +F73vxgarnTYCeyNp1CXR8IRPN+8FOUNY62TnqqPQkDZ6fyeZxxAy3Kf7zaVp +uP59rPvTHwMYja64YK9Aw0vLfSkp7QZw7q1VUbAaDY003P/lvmQANywvkspN +iHjSrxcm+vZA5dGuVXVfGoLZ9qn+LASn8cqm6rPEeJupB28CAlNIRopRAA1H +RmN3Ol5CMLl/Wt0mmIY75WYsttshdHze4O1/hYa1g8VcT7kRfrju6i9JpqE3 +2/ntB5kAxHyuVeyqoSF3eNVU+GcaxP09qXGzloZlKqEDpS9pwJxoUvL9DQ21 +pL42MmfQ4EcZ67OMt4QDM6VXXWlQyXQ1hfcDDb+McslY/9AF+7vhFxZHaBie +Pyxzfl0HUqqCNV5u1UOxSdbgcV0qcFjalYhy6aFD01meXAoVwr9oK13Ypodb ++YZvRbFSwZN1WUZFQA8fjrzojG3VBi2rQP5MEjGu5Lu1z00buofOzUWp6qFd +W9pn+7taILDFu2S/rR4maVkm2G7ShGzDsJAZOz2sfC9/L2xCA9TC4gzvOOqh +hP/+lNdtGmA5U9zV66KH3jVGEln3NSC6e2HlhLcebnNqnWxU04DlzMsGIRF6 +eP3q7Jbok+rQp3vnQ06eHn4Ub49ZH1IDz/PZD/YW6qGqFYdZ/js1WCx87j5Z +rIeey7bBAQw14JXqXVIt08MtSr8aDkWrwT52CfEXNXpYQaxr3041qO7McfvQ +pYdMuTFTrCGqYM5VrhTYq4fRK+98LN1Uodf07aJwvx62yL56UWSpCvOVEzHH +vhD7dUXVo1paFZQeqRSM/9DDTbxRpD8tKlDdtycwdkoPz34at2OrVAFz/kOg +PKOHfqDxYOdjFTh57Xx7wAIxnl7VURWqAvM10alCy3p4t6UpSd5DBSJ/J5+o +/K2HIZ8913KtVWCb+jNFpzU9fD6lMWusrwIPfSoX/v7VwzdZ348ub1eB/wEo +sV/b + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07898806381233775}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07898806381233775}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943566891341267`*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"ee677e56-9a83-4c76-8f8f-38087b4b9d3b"] +}, Open ]], Cell[CellGroupData[{ @@ -9961,18 +11975,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"01995149-3665-fe4e-b326-b20429031afd"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[121]:=",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"52cff8eb-0c77-c944-a54f-e282b00ce766"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.8927467000720286`*^-141\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 45, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943566891983557`*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"268055db-f8d9-4f70-9949-6cf0f66b42c7"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.4512153411045304`*^-143\\\", \ +RowBox[{\\\"990359217009531794717859144615427415897\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0373833891840000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 46, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943566892084703`*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"8d8bf8ff-632c-483b-b59a-162338ade2fb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.228033457848481`*^-145\\\", \ +RowBox[{\\\"393073573231083169323518294497863141369\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"96\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3746716712960000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 47, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943566892210217`*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"ab283d05-642c-4575-936a-498ce254f87a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 121, 48, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356689230404*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"a827b9d3-4e36-4a3e-85ff-319c87490268"], + +Cell[BoxData["9.50612090065868`"], "Output", + CellChangeTimes->{3.9943567975768414`*^9}, + CellLabel-> + "Out[121]=",ExpressionUUID->"ee92eb61-9820-40f9-b5bc-8cbe8ccbb0cb"] }, Open ]], Cell[CellGroupData[{ @@ -10039,27 +12110,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507468132763`*^9, - 3.9918507511809216`*^9}},ExpressionUUID->"11b1e372-f457-5a4d-bcee-\ -062a3c04ed96"], + CellChangeTimes->{{3.9918507468132763`*^9, 3.9918507511809216`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cb5a1193-7562-6446-a279-d9f6295d156e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0338735880605976`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 49, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943567976278887`*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"84c2ec10-597a-4a35-90b8-5584309d78c8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566b0ad4-7f4e-b04f-8294-646ce1913fac"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.586624750046517`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 50, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356797641036*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"7bb81f1c-78cc-434d-a5ff-4d2de3a109a0"], -Cell[BoxData["0.7273353591556563`"], "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.534528806561327`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 51, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943567976512337`*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"5b68dabd-f40d-4da3-a98b-a28e14400880"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 122, 52, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356797660253*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"fa73c0fc-e35a-42d2-82c1-6e23a1fdd90e"], + +Cell[BoxData["0.3235395270874454`"], "Output", + CellChangeTimes->{3.994356809728841*^9}, + CellLabel-> + "Out[122]=",ExpressionUUID->"cc754de4-d9a3-4e6c-a2e5-a097c9861ce0"] }, Open ]], Cell[CellGroupData[{ @@ -10080,8 +12199,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10126,27 +12244,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185075434021*^9, - 3.9918507570104733`*^9}},ExpressionUUID->"8cb4e371-90a5-d347-adec-\ -3382e7679ba8"], + CellChangeTimes->{{3.99185075434021*^9, 3.9918507570104733`*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4cd45900-7eb0-6b4b-830a-a339e8117392"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0338735880605976`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 53, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356809780808*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"388db72a-b8c4-46c1-bc06-80d55f55ca67"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.586624750046517`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 54, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356809792836*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"ec614ee1-be0d-45d1-95fc-c7fd574e9011"], -Cell[BoxData["3.1005213487548544`"], "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.534528806561327`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 55, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356809801412*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"069d2f7b-494f-418b-916b-eb8cacefe7a4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 123, 56, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356809809493*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"9d05a896-a382-4646-b62f-fc45f2700248"], + +Cell[BoxData["25.307309850432485`"], "Output", + CellChangeTimes->{3.9943568210653*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"5cf3b68c-48cc-4f4f-957b-82e2001b6dad"] }, Open ]], Cell[CellGroupData[{ @@ -10167,8 +12333,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10213,27 +12378,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507598219967`*^9, - 3.9918507622107697`*^9}},ExpressionUUID->"732b358a-c98a-0347-8b16-\ -2462b23d6249"], + CellChangeTimes->{{3.9918507598219967`*^9, 3.9918507622107697`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0338735880605976`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 57, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356821118556*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"9a1b14d1-8d4f-4c3a-aeff-b6a5c7723328"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"61220452-df6a-154e-8b5c-fecd0ab287a1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.586624750046517`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 58, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356821127324*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"18e75de5-7df5-46ef-be36-234b065b5bbc"], -Cell[BoxData["18.198720438459198`"], "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.534528806561327`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 59, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568211362677`*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"7bd5e6ec-bf4e-4aea-a9a4-5ef8c0362c2c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 124, 60, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356821145563*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"6c1b0b5c-4617-417d-97ab-a267b0d5aa76"], + +Cell[BoxData["2.9431870525656376`"], "Output", + CellChangeTimes->{3.994356830443692*^9}, + CellLabel-> + "Out[124]=",ExpressionUUID->"eb60e5dc-0542-4d18-9d86-53f6b3f3b89d"] }, Open ]], Cell[CellGroupData[{ @@ -10242,19 +12455,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918507652122154`*^9, - 3.9918507685850487`*^9}},ExpressionUUID->"3d20548b-905d-0343-8df1-\ -168ec8f367e1"], + CellChangeTimes->{{3.9918507652122154`*^9, 3.9918507685850487`*^9}}, + CellLabel-> + "In[125]:=",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[BoxData["0.09682709699983048`"], "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[BoxData["0.0374882720572508`"], "Output", + CellChangeTimes->{3.994356830494883*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"83b280b2-1342-40ac-8881-fafc1d001257"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918507716362114`*^9, 3.991850773604473*^9}, - 3.9919245563167305`*^9},ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-\ -e661a25a7ba1"], + 3.9919245563167305`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ @@ -10275,10 +12492,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ir", "*", "Il"}], - RowBox[{"Il", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"601c24ee-3f7b-\ -c74d-891b-10a6d009e34b"], + RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", + CellLabel-> + "In[127]:=",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[BoxData["7.1357426619652635`"], "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[BoxData["9.575352120748407`"], "Output", + CellChangeTimes->{3.994356830519622*^9}, + CellLabel-> + "Out[127]=",ExpressionUUID->"30e5fbd3-639a-4712-b7c8-e210489cb921"] }, Open ]], Cell[CellGroupData[{ @@ -10286,10 +12507,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb1"]]}]], "Input",ExpressionUUID->"05949206-8ee0-5646-\ -bb01-e9142212274d"], + FractionBox["Kb", "Qb1"]]}]], "Input", + CellLabel-> + "In[128]:=",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[BoxData["1.4042291233210182`"], "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[BoxData["2.0209879158318365`"], "Output", + CellChangeTimes->{3.9943568305345592`*^9}, + CellLabel-> + "Out[128]=",ExpressionUUID->"17445e1f-5d43-4246-b190-2d03922de098"] }, Open ]], Cell[CellGroupData[{ @@ -10297,10 +12522,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"25a02cc2-\ -cb9a-bc4b-93f0-a7873f982a23"], + RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[129]:=",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[BoxData["10.02021766245587`"], "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[BoxData["19.35167092586728`"], "Output", + CellChangeTimes->{3.994356830548938*^9}, + CellLabel-> + "Out[129]=",ExpressionUUID->"e8dedaec-8670-4218-9610-7cd767fce141"] }, Open ]], Cell[CellGroupData[{ @@ -10488,10 +12717,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"df51ca6a-83a1-6340-\ -b13c-0185de64c37f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[130]:=",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[BoxData["0.06461147402889976`"], "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[BoxData["0.008075316947331598`"], "Output", + CellChangeTimes->{3.994356830571148*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"9b7ca18a-c8cf-4d5d-9dd4-b40aeda356b2"] }, Open ]], Cell[CellGroupData[{ @@ -10503,18 +12736,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"731f0e35-\ -7798-8b45-a769-075ac4b3983f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[131]:=",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], - -Cell[BoxData["3.486503585502317`"], "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[BoxData["9.862003497686112`"], "Output", + CellChangeTimes->{3.9943568307743893`*^9}, + CellLabel-> + "Out[131]=",ExpressionUUID->"427b7c47-e309-4c82-8456-5ee7df0d79fd"] }, Open ]], Cell[CellGroupData[{ @@ -10704,10 +12933,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"413c8e7d-149c-5d4a-\ -9ccb-23aebae2e6d5"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[132]:=",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[BoxData["0.01165072070943232`"], "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[BoxData["0.0509632563825051`"], "Output", + CellChangeTimes->{3.994356830794488*^9}, + CellLabel-> + "Out[132]=",ExpressionUUID->"550fa015-8560-45cb-a24a-6104a7e03a9b"] }, Open ]], Cell[CellGroupData[{ @@ -10719,18 +12952,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"e11d7eb8-\ -00a8-f540-98a0-89164ac4bae9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[133]:=",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], - -Cell[BoxData["8.21047995098231`"], "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[BoxData["3.9256931990636588`"], "Output", + CellChangeTimes->{3.9943568309840508`*^9}, + CellLabel-> + "Out[133]=",ExpressionUUID->"4f870008-f2c3-4c2f-86da-f2401110a023"] }, Open ]], Cell[CellGroupData[{ @@ -10821,10 +13050,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-\ -1ee89e798d8f"], + ")"}]}]}]], "Input", + CellLabel-> + "In[134]:=",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[BoxData["0.04840187632890963`"], "Output", + CellChangeTimes->{3.994356831002244*^9}, + CellLabel-> + "Out[134]=",ExpressionUUID->"61291e3a-719e-448d-9c34-a179ca931363"] }, Open ]], Cell[CellGroupData[{ @@ -10912,10 +13145,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-\ -f30d036fcdd2"], + ")"}]}]}]], "Input", + CellLabel-> + "In[135]:=",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[BoxData["0.9515981236710904`"], "Output", + CellChangeTimes->{3.994356831018065*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"35fa45a9-5987-4af8-916e-fe056de8827c"] }, Open ]], Cell[CellGroupData[{ @@ -11036,10 +13273,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"46af1283-32d6-\ -7240-acd2-307af56b44db"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[136]:=",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[BoxData["0.046059134696750575`"], "Output", + CellChangeTimes->{3.9943568310359287`*^9}, + CellLabel-> + "Out[136]=",ExpressionUUID->"69679ae9-a930-4f04-a547-f04f7ba67b11"] }, Open ]], Cell[CellGroupData[{ @@ -11101,27 +13342,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507910247746`*^9},ExpressionUUID->"cd516020-ac7f-224d-b1ff-\ -af0307420662"], + CellChangeTimes->{3.9918507910247746`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b82c1933-5313-1d4c-a858-68be8f118333"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.220789172281985`*^-199\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 61, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568310574703`*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"9ca7db6f-da70-4346-87ea-f93bfe4b5528"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.853922017224774`*^-203\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 62, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568310702763`*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"3e59487e-ac58-44fc-8f73-22d371e744d9"], -Cell[BoxData["3.486503585502321`"], "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1279751680973528`*^-207\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 63, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356831080494*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"cf226219-b41a-40ca-99b7-1b28bf9cad2f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 137, 64, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356831091646*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"f6958ec7-3ce2-4f35-83d3-e78cc71b4328"], + +Cell[BoxData["9.862003497686105`"], "Output", + CellChangeTimes->{3.9943568392919207`*^9}, + CellLabel-> + "Out[137]=",ExpressionUUID->"a6c9f531-302e-45f6-8708-3b7a57c0b31f"] }, Open ]], Cell[CellGroupData[{ @@ -11183,27 +13472,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507936164455`*^9},ExpressionUUID->"a9d0e817-a1c8-6546-a901-\ -34313c6ec04d"], + CellChangeTimes->{3.9918507936164455`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.220789172281985`*^-199\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 65, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435683934487*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"9b61f8fa-e2e6-4316-be56-816ca6822207"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56712e4d-1aa7-524a-8254-bcfd8978eea0"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.853922017224774`*^-203\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 66, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568393549347`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"9d9f6130-7286-4cc6-b302-518317fbbb57"], -Cell[BoxData["8.210479950982325`"], "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1279751680973528`*^-207\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 67, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568393662157`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"88b14862-3bab-4628-9ee0-3c35c93eb836"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 138, 68, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568393758497`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"c6e49a69-9634-4cba-a738-8895fb77c43a"], + +Cell[BoxData["3.925693199063658`"], "Output", + CellChangeTimes->{3.994356847642153*^9}, + CellLabel-> + "Out[138]=",ExpressionUUID->"58a73424-f115-4ba8-aafd-fda4258d9198"] }, Open ]], Cell[CellGroupData[{ @@ -11261,489 +13598,388 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507961174965`*^9},ExpressionUUID->"f68960b0-cff6-3245-b906-\ -ad38cf07d634"], + CellChangeTimes->{3.9918507961174965`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9c6ce535-b42f-3c43-a89e-eda48c04121e"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-\ -8b4ad9ffca61"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk0VVscB3BzxjJkLtM1vKuEe42l9i9uikyphEri3GMqQqGIelKKhCRe +pJAkKpUGVIp6Fek+U7PpDkmSMYdUb/vjrL0+66z9O9/9O3ufoxsQ4ckWERIS +6sfX3BjZuszoLqd1FW31aj1FDhetGi61DGBVouU3Pb3n3FtklaPPqkfT3skz +c/YgXknIMp8iNbt2yYXY1XFJjeKsFmQTZJ+sjH38mVpDUsV/yHeQE6KKfZ8T +eX6W0YmWvk+sV8cefP8yYX/dWzTfwyV+EbYGn7b1h8NH1BBiW6aNvf57gm10 +Sw/qd3JcScN+ODsoE1fRh3xUo8EIu+uwavydcC6ifj26vgR7WII1OMHgo3ET +kzQzbIn0PT7MKQFS/1jbZomtpVD4PLJuAI2vDjm6AttN80fZsMMQijOnM9Zh +kxf0VEwkh5HkmhXG7thJBu4pYS3fkZR+RIYX9lvVDvO9FaOo6cTKcyQ24Rsa +cjp9DBk/fusQgT1SIHTxZvg4ctI56x2HLalnIj/KmEScgcRnadg5RONaeeUf +KNfginYuts5lnyTTqR9IiEHxLmDbLD06vLuOQnKnJW7fxQ626mkZdJhF7iFj +gYPYE3H7xKQNf6GZSQ8tCvtQnYwdXfI3Skh4y5L4j4vywOZqUMsfdIJLdNGw +iUvPWVEVwtClkCJDYFc8O917WFMEwtasNNqHPfLZLyErXQRUG2nXj2InGE/e +uhEuCiYFiaJXsXOu69K+M8SB/uTwQwr7PWfo4e8ScdhJe7JCrg3nH7vrO19Z +Aj6yrA30sCst3LJNpiRg2rfRzhW76f4B4V11ktDfkZBYjj3Z2N4z4CALy9Q2 +uUa3c5Gii6x8/ENZeCJL687ENutggZytHHxYwhi+hh3Kq7lgvmw+SI6opA9h +7xFpMVspKw8yuoaPdndwEV/v2mjKDwVwiWwRTe3E/SFfSr1mKkLB8I7jVdgi +VwW6apGKMP+UW0Y7tg5T27PiqyKwOlkqul1c5OuQebO1Vwn2arRoPcF+HRgV +rdqsDGXsBQsXveWi7ssZaf6SKqAU5pjphD30taLkyhoVaO6ZTovFlt7LbV/R +oAJtjj3CndisI5ss/GtUwfEh//OZd1xUW2o1WV6kDvr/iBaZfuCiUv5MzPK9 +i8F4bW/zk24uWrf5WHd01WIY1lpvOIs91KTkWCVYDCfOGI5Y9nCRRelSZR0f +LfALtm2rwG4K8LslvkobWr8pc/J7uWjse2/sQLIOSOyZuJ3ez0VKu1m3b7nq +QWpIltUzARcJSqWDPUL14Fu64xG5z1x07yNH89tRPdhf9XT1ZuxtLtuTDRv0 +oMljmawAu3RJjGc+gwbFC4V7ZL/g5w9eHklU1YcXz+OTIr5y0aYgGRPnPgPI +CbZpTB3hIhSzmbHllwGkVqkHfsQ2TimyJtQNwXx9Z7jZKBcJlTDtEzcYgmHi +lxfvsKu6t265+dgQEi0HMszH8fn0qjysUWwEGv/6b5mcxPlYrl2DAXSgx5vP +vvrJRSUbz36YSqSDjnSEluksF2UE9PWKnaNDatnvykxs4tC+r1rtdMjW0V+w ++RcXKdQXCm10MIaQ+9Of+3/j/cMcNq6jLYELl0K/K4rwkKbeqaQ03lJ4VqEV +3STJQ/UnJujTIiaw0ImTYSfFQ9vGfTpIXRPQiM03rsE+36RPt/czAf7r4/2X +pXlIL6i2jXpjAjrdRzedluUh40q+Adm8DJg6dMe/5XlosaYWqeNjBoMbp080 +qPHQ0kt7ZX8iBki37BBvMOahACJ50sSNAYkMfWO3JTyUR8vu9t/GgPFH/Ecf +sUWLr994FseA5b9jV/1cykPvzw9uyq5mgEdDUupKUx46nudfSKcxIY3w3/yG +yUOCNJdl3hIWwN0R+mvHSh66GKXvUdNiCXn5A0PPNvAQJwZZH7lkC6ncgRD6 +ER7S9et0275rJYhNpGZPPOAh9p871xbvB/B/KqEc9ZOHVL/em6caYA8cVvKb +TEc+2su0+5htzIJ1tQzJlhw+Cvg2+1xpcA2s5IyY23/hoyr76HlFr9fCzMWr +x1pdBah0IvRxZY4TbJw0EzG7LUDUarVXTUnroeHtjobapZ/RJyHR0b6drpDe +KXZ7pvIzCl8UkXmY5g7xUd6PS0wG0LWQ5w1nUjxgTCRW1LFxAB0YV59aErIB +Mgs3rMz1/oImnR29/t3hCYo5/jQF8UFkuzVrNX/DRrB1ei+/9f4galMvDG1i +boJ/3iwKDAr7ijTKkuvL/9oMXY/ullpZD6F7vcYubnJe8NLLJSTzzxDS6hgJ +ivnmBdk2U4pOr74h5pmsypLeLRC34EVZ8Z1hVCg2viy70RsOS8Yc+if/O7qz +2vR9yn0fYCywrkp3GUF51icUZit8IU87RTysdQS9/nDpKDN9K1zolO/QXj+K +alwL9Pcc2gaaPlb99zpH0ejujULhxHYwcrT3LfcZQ5OO9OBhBz/4m250tu7j +GCr/9o6KttoBvI3lw/N3jSPvi5cCt8v6g/M6Ec+B0XF06+b6HaLH/EHv4Fqm +8N8TyFazbfr4tD+0hmUaxEhMIlpv0Pv/QnaCge8jEbOUScSTCXMv4O4EpZ2q +2xqkfiBOhlvg2s0B4K57aygl6QfKiSuS2ccJgJ3yxlka+D9U//DPdKBTINAu +Dgg1B0yhBdvgGLM2EEZk1AstH0whW//h8hQLAs5VcQd4ihQqyx+JdrMiIK3d +iyO9kEIL28dWqdoQYDMQPWqqTKHhNVMd5SsImCwr6olVpfD3RUi4xZ6Ah18j +iN+aFJo/peCjuIGA5ZV/Ovn6FOKdtJQq2k1A7l8jmYusKJRRlxByr4wAQYPR +ZU0vCu1mnLWNKyeAfBuEpLZQyOVKtZRNBQGyVkrSP7Clzwqu3K0igPGjw/KV +D4VSojwG79wmwKnXpC9yO4US6PphNU8IoKXP88khKBR6tnnXzW4CdMtTCLso +CjnNF9hF9RIQ4WXJXxBNob9ShOQY/QQoNn7J6scWRFlWVfMJuLe2KDxlH4V2 +uhV9uzFEAOvhT9PHcRTyFo8Ovz5DQGuSyBX5JAqtjdbYU6nChomDL8znp1Ho +SdFR52w1NpDJ6old2HYtY/pxGmyQZRq8LEynkJlB8zsHLTZ8LDnjT8+gkPqb +eIcPBmwwKBo/ZJFFoa/LP6lIW7LB9KL9To2zFDolcuFB0EY2dAmal9OK8fpN +ZfNcN7NhspGv3ox9ZGtcFHMLG9o4oWORJRSKu+1h9McX2/R3Rn0pzk8KZ+UG +sKHVyD1yzWUKMV8GEE8j2SDScfmWQSWF3mQZyNAy2XCiSl5Cu4ZC15Bc8EAW +GzxSDjYVYB/5NtFUdZoNb87W5qvfoRDDqSnR5iwbXAKXpsrfxe9PKHDM9Twb +PntfjRy/RyHHiAvv4irZEGZyc/vJegotXpxqteoaG/Ja2fGz2BMvI06L3mDD +u1Na10IfUKjYELlm3GJDgqOFJ+shhX59+tRQUsuGa5nzs4ceUei2i2Z563M2 +yIQYvZdvpFDajIh4zks2EAaKdpHYAeWDO31a2CD/Kryagy0vVqvJe4371azT +ld5EoV113qemu9ggETsgNvOUQjTj3Bh9PhucLV7wLj+n0Mybg+1fBGzYfcg/ +ehqbk8I2uz7AhnznBQudX1Aosc9i0HaIDawcIm0A+31e+3b3cTY0W7W7azRT +KHuewpoDwiTsUynX3vCKQvVjn7buFSUBeQtiz2F//lQRFS5OglWOQxkP2+42 +60KAFAm5r4RTolvxfvOP++msQEJwl9m65Nc4v8saxTVKJAQJS7o3Ya+wVqQj +ZRJ4vzctEeNQKFOu0oupTsKDPBHiEPaK2p5qTV0SSqGoPfQ/CpGXKp8r00g4 +lqB8pBg7M3N/zwIDEgpVI6TeYQtIJTkxOgl/Jo5n27fh+0prg4fMSNCTvlgw +r51Ctb+VkgQMEqoTo8Yssflfes/0WpDgWXV1USD28oYDjR02JESYaQ3fx+bt +uqb1AEiYPp+b7NOBz7t3vOVde9wPC6v4RGxbh3Uu1SwSxp+8dSzGzlDv339p +HQnKy3/6CLDviV3PLHImQRbIixKdFOJ+j7+c70LC9f0V9QbYNs+UO096kPCz +Ji/cHzuguv/rMU8SCmrMxBOwTxZcF/l7EwnD/QcjcrH7o5zMYrxJWFqj+uhf +bDk/lbV7fEnIsN5c2j1Xz4m7PXQbCfnF9O0Tc/O1D6b5+ZOgw01wWtSF80g7 +F3sHkGAR+z1hGXb/pMp9T4IE68jeZIQt18d97UKSQOU6+7lj27TcEDgGk5Ak +TZf1ww64e/AXhJIg7xx7Mgz7ZLHzwhW7SDA3M++Pnat/UnWJZTju77indPJc +/TjeatM9JJwxeid+EluWqPamR5Gwqq6h4wy2tXtiBG0vCc4zErGFc/WXrz+6 +OIaEivQrQyXY6QZqhapxJOTFlFlewb4jz7+lcICEcrXZDVXYfT+rX8okkHDT +9MrqG3P1Pyf2iSeSMNhRKXYT26ptPfUniQTOQYlzc/4fO+zZvA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk0VVscB3BzxjJkLtM1vKuEe42l9i9uikyphEri3GMqQqGIelKKhCRe +pJAkKpUGVIp6Fek+U7PpDkmSMYdUb/vjrL0+66z9O9/9O3ufoxsQ4ckWERIS +6sfX3BjZuszoLqd1FW31aj1FDhetGi61DGBVouU3Pb3n3FtklaPPqkfT3skz +c/YgXknIMp8iNbt2yYXY1XFJjeKsFmQTZJ+sjH38mVpDUsV/yHeQE6KKfZ8T +eX6W0YmWvk+sV8cefP8yYX/dWzTfwyV+EbYGn7b1h8NH1BBiW6aNvf57gm10 +Sw/qd3JcScN+ODsoE1fRh3xUo8EIu+uwavydcC6ifj26vgR7WII1OMHgo3ET +kzQzbIn0PT7MKQFS/1jbZomtpVD4PLJuAI2vDjm6AttN80fZsMMQijOnM9Zh +kxf0VEwkh5HkmhXG7thJBu4pYS3fkZR+RIYX9lvVDvO9FaOo6cTKcyQ24Rsa +cjp9DBk/fusQgT1SIHTxZvg4ctI56x2HLalnIj/KmEScgcRnadg5RONaeeUf +KNfginYuts5lnyTTqR9IiEHxLmDbLD06vLuOQnKnJW7fxQ626mkZdJhF7iFj +gYPYE3H7xKQNf6GZSQ8tCvtQnYwdXfI3Skh4y5L4j4vywOZqUMsfdIJLdNGw +iUvPWVEVwtClkCJDYFc8O917WFMEwtasNNqHPfLZLyErXQRUG2nXj2InGE/e +uhEuCiYFiaJXsXOu69K+M8SB/uTwQwr7PWfo4e8ScdhJe7JCrg3nH7vrO19Z +Aj6yrA30sCst3LJNpiRg2rfRzhW76f4B4V11ktDfkZBYjj3Z2N4z4CALy9Q2 +uUa3c5Gii6x8/ENZeCJL687ENutggZytHHxYwhi+hh3Kq7lgvmw+SI6opA9h +7xFpMVspKw8yuoaPdndwEV/v2mjKDwVwiWwRTe3E/SFfSr1mKkLB8I7jVdgi +VwW6apGKMP+UW0Y7tg5T27PiqyKwOlkqul1c5OuQebO1Vwn2arRoPcF+HRgV +rdqsDGXsBQsXveWi7ssZaf6SKqAU5pjphD30taLkyhoVaO6ZTovFlt7LbV/R +oAJtjj3CndisI5ss/GtUwfEh//OZd1xUW2o1WV6kDvr/iBaZfuCiUv5MzPK9 +i8F4bW/zk24uWrf5WHd01WIY1lpvOIs91KTkWCVYDCfOGI5Y9nCRRelSZR0f +LfALtm2rwG4K8LslvkobWr8pc/J7uWjse2/sQLIOSOyZuJ3ez0VKu1m3b7nq +QWpIltUzARcJSqWDPUL14Fu64xG5z1x07yNH89tRPdhf9XT1ZuxtLtuTDRv0 +oMljmawAu3RJjGc+gwbFC4V7ZL/g5w9eHklU1YcXz+OTIr5y0aYgGRPnPgPI +CbZpTB3hIhSzmbHllwGkVqkHfsQ2TimyJtQNwXx9Z7jZKBcJlTDtEzcYgmHi +lxfvsKu6t265+dgQEi0HMszH8fn0qjysUWwEGv/6b5mcxPlYrl2DAXSgx5vP +vvrJRSUbz36YSqSDjnSEluksF2UE9PWKnaNDatnvykxs4tC+r1rtdMjW0V+w ++RcXKdQXCm10MIaQ+9Of+3/j/cMcNq6jLYELl0K/K4rwkKbeqaQ03lJ4VqEV +3STJQ/UnJujTIiaw0ImTYSfFQ9vGfTpIXRPQiM03rsE+36RPt/czAf7r4/2X +pXlIL6i2jXpjAjrdRzedluUh40q+Adm8DJg6dMe/5XlosaYWqeNjBoMbp080 +qPHQ0kt7ZX8iBki37BBvMOahACJ50sSNAYkMfWO3JTyUR8vu9t/GgPFH/Ecf +sUWLr994FseA5b9jV/1cykPvzw9uyq5mgEdDUupKUx46nudfSKcxIY3w3/yG +yUOCNJdl3hIWwN0R+mvHSh66GKXvUdNiCXn5A0PPNvAQJwZZH7lkC6ncgRD6 +ER7S9et0275rJYhNpGZPPOAh9p871xbvB/B/KqEc9ZOHVL/em6caYA8cVvKb +TEc+2su0+5htzIJ1tQzJlhw+Cvg2+1xpcA2s5IyY23/hoyr76HlFr9fCzMWr +x1pdBah0IvRxZY4TbJw0EzG7LUDUarVXTUnroeHtjobapZ/RJyHR0b6drpDe +KXZ7pvIzCl8UkXmY5g7xUd6PS0wG0LWQ5w1nUjxgTCRW1LFxAB0YV59aErIB +Mgs3rMz1/oImnR29/t3hCYo5/jQF8UFkuzVrNX/DRrB1ei+/9f4galMvDG1i +boJ/3iwKDAr7ijTKkuvL/9oMXY/ullpZD6F7vcYubnJe8NLLJSTzzxDS6hgJ +ivnmBdk2U4pOr74h5pmsypLeLRC34EVZ8Z1hVCg2viy70RsOS8Yc+if/O7qz +2vR9yn0fYCywrkp3GUF51icUZit8IU87RTysdQS9/nDpKDN9K1zolO/QXj+K +alwL9Pcc2gaaPlb99zpH0ejujULhxHYwcrT3LfcZQ5OO9OBhBz/4m250tu7j +GCr/9o6KttoBvI3lw/N3jSPvi5cCt8v6g/M6Ec+B0XF06+b6HaLH/EHv4Fqm +8N8TyFazbfr4tD+0hmUaxEhMIlpv0Pv/QnaCge8jEbOUScSTCXMv4O4EpZ2q +2xqkfiBOhlvg2s0B4K57aygl6QfKiSuS2ccJgJ3yxlka+D9U//DPdKBTINAu +Dgg1B0yhBdvgGLM2EEZk1AstH0whW//h8hQLAs5VcQd4ihQqyx+JdrMiIK3d +iyO9kEIL28dWqdoQYDMQPWqqTKHhNVMd5SsImCwr6olVpfD3RUi4xZ6Ah18j +iN+aFJo/peCjuIGA5ZV/Ovn6FOKdtJQq2k1A7l8jmYusKJRRlxByr4wAQYPR +ZU0vCu1mnLWNKyeAfBuEpLZQyOVKtZRNBQGyVkrSP7Clzwqu3K0igPGjw/KV +D4VSojwG79wmwKnXpC9yO4US6PphNU8IoKXP88khKBR6tnnXzW4CdMtTCLso +CjnNF9hF9RIQ4WXJXxBNob9ShOQY/QQoNn7J6scWRFlWVfMJuLe2KDxlH4V2 +uhV9uzFEAOvhT9PHcRTyFo8Ovz5DQGuSyBX5JAqtjdbYU6nChomDL8znp1Ho +SdFR52w1NpDJ6old2HYtY/pxGmyQZRq8LEynkJlB8zsHLTZ8LDnjT8+gkPqb +eIcPBmwwKBo/ZJFFoa/LP6lIW7LB9KL9To2zFDolcuFB0EY2dAmal9OK8fpN +ZfNcN7NhspGv3ox9ZGtcFHMLG9o4oWORJRSKu+1h9McX2/R3Rn0pzk8KZ+UG +sKHVyD1yzWUKMV8GEE8j2SDScfmWQSWF3mQZyNAy2XCiSl5Cu4ZC15Bc8EAW +GzxSDjYVYB/5NtFUdZoNb87W5qvfoRDDqSnR5iwbXAKXpsrfxe9PKHDM9Twb +PntfjRy/RyHHiAvv4irZEGZyc/vJegotXpxqteoaG/Ja2fGz2BMvI06L3mDD +u1Na10IfUKjYELlm3GJDgqOFJ+shhX59+tRQUsuGa5nzs4ceUei2i2Z563M2 +yIQYvZdvpFDajIh4zks2EAaKdpHYAeWDO31a2CD/Kryagy0vVqvJe4371azT +ld5EoV113qemu9ggETsgNvOUQjTj3Bh9PhucLV7wLj+n0Mybg+1fBGzYfcg/ +ehqbk8I2uz7AhnznBQudX1Aosc9i0HaIDawcIm0A+31e+3b3cTY0W7W7azRT +KHuewpoDwiTsUynX3vCKQvVjn7buFSUBeQtiz2F//lQRFS5OglWOQxkP2+42 +60KAFAm5r4RTolvxfvOP++msQEJwl9m65Nc4v8saxTVKJAQJS7o3Ya+wVqQj +ZRJ4vzctEeNQKFOu0oupTsKDPBHiEPaK2p5qTV0SSqGoPfQ/CpGXKp8r00g4 +lqB8pBg7M3N/zwIDEgpVI6TeYQtIJTkxOgl/Jo5n27fh+0prg4fMSNCTvlgw +r51Ctb+VkgQMEqoTo8Yssflfes/0WpDgWXV1USD28oYDjR02JESYaQ3fx+bt +uqb1AEiYPp+b7NOBz7t3vOVde9wPC6v4RGxbh3Uu1SwSxp+8dSzGzlDv339p +HQnKy3/6CLDviV3PLHImQRbIixKdFOJ+j7+c70LC9f0V9QbYNs+UO096kPCz +Ji/cHzuguv/rMU8SCmrMxBOwTxZcF/l7EwnD/QcjcrH7o5zMYrxJWFqj+uhf +bDk/lbV7fEnIsN5c2j1Xz4m7PXQbCfnF9O0Tc/O1D6b5+ZOgw01wWtSF80g7 +F3sHkGAR+z1hGXb/pMp9T4IE68jeZIQt18d97UKSQOU6+7lj27TcEDgGk5Ak +TZf1ww64e/AXhJIg7xx7Mgz7ZLHzwhW7SDA3M++Pnat/UnWJZTju77indPJc +/TjeatM9JJwxeid+EluWqPamR5Gwqq6h4wy2tXtiBG0vCc4zErGFc/WXrz+6 +OIaEivQrQyXY6QZqhapxJOTFlFlewb4jz7+lcICEcrXZDVXYfT+rX8okkHDT +9MrqG3P1Pyf2iSeSMNhRKXYT26ptPfUniQTOQYlzc/4fO+zZvA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6191492718735713, + 1.5524164252927797`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6191492718735726}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6191492718735713, + 1.5524164252927797`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6191492718735726}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk0VVscB3BzxjJkLtM1vKuEe42l9i9uikyphEri3GMqQqGIelKKhCRe +pJAkKpUGVIp6Fek+U7PpDkmSMYdUb/vjrL0+66z9O9/9O3ufoxsQ4ckWERIS +6sfX3BjZuszoLqd1FW31aj1FDhetGi61DGBVouU3Pb3n3FtklaPPqkfT3skz +c/YgXknIMp8iNbt2yYXY1XFJjeKsFmQTZJ+sjH38mVpDUsV/yHeQE6KKfZ8T +eX6W0YmWvk+sV8cefP8yYX/dWzTfwyV+EbYGn7b1h8NH1BBiW6aNvf57gm10 +Sw/qd3JcScN+ODsoE1fRh3xUo8EIu+uwavydcC6ifj26vgR7WII1OMHgo3ET +kzQzbIn0PT7MKQFS/1jbZomtpVD4PLJuAI2vDjm6AttN80fZsMMQijOnM9Zh +kxf0VEwkh5HkmhXG7thJBu4pYS3fkZR+RIYX9lvVDvO9FaOo6cTKcyQ24Rsa +cjp9DBk/fusQgT1SIHTxZvg4ctI56x2HLalnIj/KmEScgcRnadg5RONaeeUf +KNfginYuts5lnyTTqR9IiEHxLmDbLD06vLuOQnKnJW7fxQ626mkZdJhF7iFj +gYPYE3H7xKQNf6GZSQ8tCvtQnYwdXfI3Skh4y5L4j4vywOZqUMsfdIJLdNGw +iUvPWVEVwtClkCJDYFc8O917WFMEwtasNNqHPfLZLyErXQRUG2nXj2InGE/e +uhEuCiYFiaJXsXOu69K+M8SB/uTwQwr7PWfo4e8ScdhJe7JCrg3nH7vrO19Z +Aj6yrA30sCst3LJNpiRg2rfRzhW76f4B4V11ktDfkZBYjj3Z2N4z4CALy9Q2 +uUa3c5Gii6x8/ENZeCJL687ENutggZytHHxYwhi+hh3Kq7lgvmw+SI6opA9h +7xFpMVspKw8yuoaPdndwEV/v2mjKDwVwiWwRTe3E/SFfSr1mKkLB8I7jVdgi +VwW6apGKMP+UW0Y7tg5T27PiqyKwOlkqul1c5OuQebO1Vwn2arRoPcF+HRgV +rdqsDGXsBQsXveWi7ssZaf6SKqAU5pjphD30taLkyhoVaO6ZTovFlt7LbV/R +oAJtjj3CndisI5ss/GtUwfEh//OZd1xUW2o1WV6kDvr/iBaZfuCiUv5MzPK9 +i8F4bW/zk24uWrf5WHd01WIY1lpvOIs91KTkWCVYDCfOGI5Y9nCRRelSZR0f +LfALtm2rwG4K8LslvkobWr8pc/J7uWjse2/sQLIOSOyZuJ3ez0VKu1m3b7nq +QWpIltUzARcJSqWDPUL14Fu64xG5z1x07yNH89tRPdhf9XT1ZuxtLtuTDRv0 +oMljmawAu3RJjGc+gwbFC4V7ZL/g5w9eHklU1YcXz+OTIr5y0aYgGRPnPgPI +CbZpTB3hIhSzmbHllwGkVqkHfsQ2TimyJtQNwXx9Z7jZKBcJlTDtEzcYgmHi +lxfvsKu6t265+dgQEi0HMszH8fn0qjysUWwEGv/6b5mcxPlYrl2DAXSgx5vP +vvrJRSUbz36YSqSDjnSEluksF2UE9PWKnaNDatnvykxs4tC+r1rtdMjW0V+w ++RcXKdQXCm10MIaQ+9Of+3/j/cMcNq6jLYELl0K/K4rwkKbeqaQ03lJ4VqEV +3STJQ/UnJujTIiaw0ImTYSfFQ9vGfTpIXRPQiM03rsE+36RPt/czAf7r4/2X +pXlIL6i2jXpjAjrdRzedluUh40q+Adm8DJg6dMe/5XlosaYWqeNjBoMbp080 +qPHQ0kt7ZX8iBki37BBvMOahACJ50sSNAYkMfWO3JTyUR8vu9t/GgPFH/Ecf +sUWLr994FseA5b9jV/1cykPvzw9uyq5mgEdDUupKUx46nudfSKcxIY3w3/yG +yUOCNJdl3hIWwN0R+mvHSh66GKXvUdNiCXn5A0PPNvAQJwZZH7lkC6ncgRD6 +ER7S9et0275rJYhNpGZPPOAh9p871xbvB/B/KqEc9ZOHVL/em6caYA8cVvKb +TEc+2su0+5htzIJ1tQzJlhw+Cvg2+1xpcA2s5IyY23/hoyr76HlFr9fCzMWr +x1pdBah0IvRxZY4TbJw0EzG7LUDUarVXTUnroeHtjobapZ/RJyHR0b6drpDe +KXZ7pvIzCl8UkXmY5g7xUd6PS0wG0LWQ5w1nUjxgTCRW1LFxAB0YV59aErIB +Mgs3rMz1/oImnR29/t3hCYo5/jQF8UFkuzVrNX/DRrB1ei+/9f4galMvDG1i +boJ/3iwKDAr7ijTKkuvL/9oMXY/ullpZD6F7vcYubnJe8NLLJSTzzxDS6hgJ +ivnmBdk2U4pOr74h5pmsypLeLRC34EVZ8Z1hVCg2viy70RsOS8Yc+if/O7qz +2vR9yn0fYCywrkp3GUF51icUZit8IU87RTysdQS9/nDpKDN9K1zolO/QXj+K +alwL9Pcc2gaaPlb99zpH0ejujULhxHYwcrT3LfcZQ5OO9OBhBz/4m250tu7j +GCr/9o6KttoBvI3lw/N3jSPvi5cCt8v6g/M6Ec+B0XF06+b6HaLH/EHv4Fqm +8N8TyFazbfr4tD+0hmUaxEhMIlpv0Pv/QnaCge8jEbOUScSTCXMv4O4EpZ2q +2xqkfiBOhlvg2s0B4K57aygl6QfKiSuS2ccJgJ3yxlka+D9U//DPdKBTINAu +Dgg1B0yhBdvgGLM2EEZk1AstH0whW//h8hQLAs5VcQd4ihQqyx+JdrMiIK3d +iyO9kEIL28dWqdoQYDMQPWqqTKHhNVMd5SsImCwr6olVpfD3RUi4xZ6Ah18j +iN+aFJo/peCjuIGA5ZV/Ovn6FOKdtJQq2k1A7l8jmYusKJRRlxByr4wAQYPR +ZU0vCu1mnLWNKyeAfBuEpLZQyOVKtZRNBQGyVkrSP7Clzwqu3K0igPGjw/KV +D4VSojwG79wmwKnXpC9yO4US6PphNU8IoKXP88khKBR6tnnXzW4CdMtTCLso +CjnNF9hF9RIQ4WXJXxBNob9ShOQY/QQoNn7J6scWRFlWVfMJuLe2KDxlH4V2 +uhV9uzFEAOvhT9PHcRTyFo8Ovz5DQGuSyBX5JAqtjdbYU6nChomDL8znp1Ho +SdFR52w1NpDJ6old2HYtY/pxGmyQZRq8LEynkJlB8zsHLTZ8LDnjT8+gkPqb +eIcPBmwwKBo/ZJFFoa/LP6lIW7LB9KL9To2zFDolcuFB0EY2dAmal9OK8fpN +ZfNcN7NhspGv3ox9ZGtcFHMLG9o4oWORJRSKu+1h9McX2/R3Rn0pzk8KZ+UG +sKHVyD1yzWUKMV8GEE8j2SDScfmWQSWF3mQZyNAy2XCiSl5Cu4ZC15Bc8EAW +GzxSDjYVYB/5NtFUdZoNb87W5qvfoRDDqSnR5iwbXAKXpsrfxe9PKHDM9Twb +PntfjRy/RyHHiAvv4irZEGZyc/vJegotXpxqteoaG/Ja2fGz2BMvI06L3mDD +u1Na10IfUKjYELlm3GJDgqOFJ+shhX59+tRQUsuGa5nzs4ceUei2i2Z563M2 +yIQYvZdvpFDajIh4zks2EAaKdpHYAeWDO31a2CD/Kryagy0vVqvJe4371azT +ld5EoV113qemu9ggETsgNvOUQjTj3Bh9PhucLV7wLj+n0Mybg+1fBGzYfcg/ +ehqbk8I2uz7AhnznBQudX1Aosc9i0HaIDawcIm0A+31e+3b3cTY0W7W7azRT +KHuewpoDwiTsUynX3vCKQvVjn7buFSUBeQtiz2F//lQRFS5OglWOQxkP2+42 +60KAFAm5r4RTolvxfvOP++msQEJwl9m65Nc4v8saxTVKJAQJS7o3Ya+wVqQj +ZRJ4vzctEeNQKFOu0oupTsKDPBHiEPaK2p5qTV0SSqGoPfQ/CpGXKp8r00g4 +lqB8pBg7M3N/zwIDEgpVI6TeYQtIJTkxOgl/Jo5n27fh+0prg4fMSNCTvlgw +r51Ctb+VkgQMEqoTo8Yssflfes/0WpDgWXV1USD28oYDjR02JESYaQ3fx+bt +uqb1AEiYPp+b7NOBz7t3vOVde9wPC6v4RGxbh3Uu1SwSxp+8dSzGzlDv339p +HQnKy3/6CLDviV3PLHImQRbIixKdFOJ+j7+c70LC9f0V9QbYNs+UO096kPCz +Ji/cHzuguv/rMU8SCmrMxBOwTxZcF/l7EwnD/QcjcrH7o5zMYrxJWFqj+uhf +bDk/lbV7fEnIsN5c2j1Xz4m7PXQbCfnF9O0Tc/O1D6b5+ZOgw01wWtSF80g7 +F3sHkGAR+z1hGXb/pMp9T4IE68jeZIQt18d97UKSQOU6+7lj27TcEDgGk5Ak +TZf1ww64e/AXhJIg7xx7Mgz7ZLHzwhW7SDA3M++Pnat/UnWJZTju77indPJc +/TjeatM9JJwxeid+EluWqPamR5Gwqq6h4wy2tXtiBG0vCc4zErGFc/WXrz+6 +OIaEivQrQyXY6QZqhapxJOTFlFlewb4jz7+lcICEcrXZDVXYfT+rX8okkHDT +9MrqG3P1Pyf2iSeSMNhRKXYT26ptPfUniQTOQYlzc/4fO+zZvA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6191492718735713, 1.5524164252927797`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6191492718735726}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6191492718735726}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6191492718735713, 1.5524164252927797`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357335451405*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"b56347af-f895-499d-85ec-4c70fed62b1d"] }, Open ]], Cell[CellGroupData[{ @@ -11807,425 +14043,1146 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.99185079904813*^9, {3.9918508647235966`*^9, - 3.991850864992861*^9}},ExpressionUUID->"d43bf17b-b492-0e4a-af4a-\ -6a3bc399953c"], + 3.99185079904813*^9, {3.9918508647235966`*^9, 3.991850864992861*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.9471460747982586`*^-271\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 140, 69, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435733562744*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"fc2ee7aa-3d25-43ef-8ce1-d4dd00196a66"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"71d4e039-c2b8-d74d-819a-80d2051e4273"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.8905099909075657`*^-282\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 140, 70, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357335634695*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"e2140ce5-b567-4a87-9a16-a3c0aa40e321"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"63625e13-15ef-1f45-89dc-998a1b63a626"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.2909199857551097`*^-293\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 140, 71, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943573356421003`*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"c303cbea-4fa3-437a-8c34-ea1a83a56b63"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 140, 72, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357335650064*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"89b3a977-b52d-4329-b728-013a18b440a8"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-\ -1872f77ea023"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vu0bAHAjSYPs/QyzshJ5PA+P60LJCpXsRHaJjCgqI0qorCRvRRnv +K2U8JyINIa+ioYQohLwaVmZKfuf31/l8P+fc97nPfV/jc+gHgnf78HBxcbG4 +ubj+f53re9aklFJoJPfS7Mh6w+1GHdeljht3x4PakWt8KVGKgOKvDkh1Z4C8 +kMnEvigdiLC71cXbfRM65zxZRlGmIDwumfGziwPF4nG1AlF7oP+BTfBMVwOs +8FocdDvuBWZKXz9Odb2BgNZAhwcRYfCzi3FpsmsQ9s/nTJsFnoZG078L229O +g9mXVne5dVkg1187ckB9CSQPsrkUXa+BWOD+W/ymvMh5kS/9cvkmZGib1dns +XYVlt9r6nRz/hvc5m+un1q9DXa6mHWncpZBSGPOKR1oYjYoKrlrFlIGlboCI +uKIw3q46v2UqpQxWNe3eq6ohjBvUuvdcyCmDhCHlXitjYfz2+KdmeWUZnFBo +G8kKEMYfF5h8KUNlEJQv9UflvjCa1jxRL9leDruuVqpbuYrg7cgXK2u4K0Ay +a+hc5jVRfOD7Zf0+TgVIqVUlLBSL4vsqnw1wrwJkGs7E7KsQxZm6Djf5BxVA +mdx4VLVRFI06jWRePq0AZesjHnWjoviUFd/F9b4CdFYs6Q3piGGWYMHgrT8V +YBsuMbzluRjKf4ypX7ejEuzWjPZdfiuGn/yKjoZaVcLum7Xvf38Qw33ndPXf +2laCw2u3V80TYrgkzzOc5FQJ+9QL7ruIi2PIiVetTQGVcGhYKz3eQxy7JO6l +nkqphLP2FkZv5sRR5HRY0XxrJcjcfSnDwy2BFiLEfu3XlVAmaj+vvUYCJxgu +B307KqHzjXtFOlUC77E7gxs+VILSrnCFXeYSeJl6T9dkrBIaduatfH1FAnPO +WER4rOPAktnsyxeGkmjif7pRwpIDacVRpUtmkjjU4LD5/k4OKK3kStLYJYn6 +LPkvTrs4YP10tfF5H0kcc44ySnLiQK4pjbC+IIk2dwuOlflyQB+tLrf2SyLv +w8tbpOM5EMa8sf9ZvBS2Vd864F/FAct8wRmrVCkc4lu8Y1zDAQX+E0kvL0mh +7/fRQYk6DrzucKh8+48Ujof6ra6q54DmkbW8fS+lsIL7zN76Vg6MFkcW/5CR +RvrD+XWinzjgJmYzJktIY4+K2sCtVQToRNfFXX8gjXYjkd3cawhYPbhBgt4s +jVOHNBrt1xFQW84LKu+lMdvHMmRcmAAJq9q0zcvS6PazjzUlQ8DrOCXd7VYy +eGhl+gdddQK2TSxGBQ3J4DGj9oP3rAg4bp616cl3GVyRkmaZsJOAshsaPaJz +Msir8233TlsCpOw9mLWrZLHoYWT/290EfK95Os+rKYsSS3vnOM4EZManhV85 +Jos1dzwzan0JaOndqPQ9ThYP/zPNsvAn4Ldu41ujFFlc6n4i9i6AAN//ZrcM +X5NFqV/e7p8CCWBZu05pNsqirPMOl7ZQAgbFVYKa1snhyCWPE99PEiAZ/Fhe +UlIOA848jYUYAqxbnF4E0OSw2pVRfyGWgOqoFHUhHTmE1L4f9NMEJPdPfnV2 +ksMi+adM2SQCtpTU+U3clMPs01wjzukE+PHslTS5LYe216e+Hckg4KrreHNW +lRyOjo8wEjIJWClIV2G1yGGLd2Nh3iUCekLPDCeMyWGdXPNIyRUC4gx3ecro +y2PchgJi7Q0CzN2v/2CYyKMzXJhdJC0Y++30Xmt5pDpWDQ7fJOdvTCxO85DH +AdemhtJCAmos739beU4eRXwzqvn+ISAmkP+kUqY84qPloHbSZhfsBU2uyeMm +ypeenBICOtrHN5+slEfNt4faZUoJmHRSjJh+L4+9DsqO3+4QcC/qCL/wsDze +mXN7llVGwKmrD3M0x+Xx2sSdeWY5AWsHHOsCeCjIec93PrKCgLfcRdZn11Kw +x2b7nFAlAbmKPz4WSlBQUlGIVkha1S+Va2ATBdecbKh9zCFgPOl9+pIuBa1e +T6jtIAi4e0tFURYoWCmr5fWctMl4/XaHPRQ8dylKuekuAe5HZ5PboimYc5WQ +TqwmQPmyidzXRApOBr7r+Fr9//i5eIc/jYI8cq7u1vcIiPq98bVJIQW5pfd+ +4qkhwJgS6elRRsFBa82PjqRXYdOPkzUUtNy49fY/pC+ddhevbaPg6KnCFnYt +AW5FpcWdnRQcKjghFU9a4d8FxswABd81e2ID6S+j258Jf6PgetGLxn9IV6zO +dNGapeB+fmN5vfsERKoPfLNepuDv8KqOANJGNhonDwpQMeqUWsAV0nxHogST +RKlYmz3U20S6Lf3fvCJ5Kn6IoWp+J51JiGk3qlJR21LBU6iOAJd3ng0D2lSk +7tkcoUmaPl+2548BFenbLgZZkB6V+j0sa0bFQuEzVh6ky1kWEUw7KnItugmG +kY5wy+Z3dKGiZ8K+mjjShqeGcsK9qVgV88YylTRv/uZNGUFUzOVe9W8G6edP +TtaVH6OipY+V5iXSaUPPrV/EUzHG8ltcJmlHPqm+r6lU9MtiNJ4nTVH1CV51 +mYrn/eOmT5P+bM7hUrlBxSYNWbEI0rcPLqebllJRIMVJxZt0WKq1omcVFY/5 +XlCzIc0qu3L31GMqag2LKOuS3tb1cmm8hYpGaskMKdI2XCt27H9DxWR2SvMC +uT9OG5lpr3qpWDKn+fYdaa/dQe/hMxVFaRfdy0kHRRcoVIxT0fZIc0Ai6WOF +3YdoC+T8yZOzjqTNoukxsXw0/GOUdukHeX6tQg8K9FfTUKzauPQ+abtCh5ZJ +QRqm3NlnFkPa9UWKsKcUDR93OQj/IeNlwFNFT1qehm82RprWkPadq3dpp9PQ +nZm0HET6CHWuwFiNhv1la2XekPE4S6S1/NSiIbo/jzr1//g0Vxur1KWhndu6 +g6qkE0M89BSMaMib9WQhiIzn1St/ufSY0HBINSF3Hem03EsxGTto6Pww6NU/ +VWR+NT5v4dlFQxcD//kOMj+oTj5j9/fS8PrRV999SBd+XxYOc6Gh/R6hqGky +n8rFt7oOeZHrE33rsYJ0k1/eWGMEDSckKmOXyPy1+M0UORFNw+Z38g5hpF+m +dejpxpLfe2Ks7TOZ7+9rBWILz9Hw21/JBfVkPRhfEy6SeJWGiZRHEja3yfPM +F2Swb9Aw18RIuoSsJwu6Ja6zReT9LwPNXKR53fsKfcrJ9Quc3FBM1h+pCnOG +WQMNw6JaVJ8VE3Bt25Drn2Yatk8KFguQVnh/Mra6lYa32IfemxURoMFDPFN5 +R8NzfEHe9wrI+mAv78Y/SsNtYSu0QvIJCFyYim1ZR8eoVOZdc7KeskJ8JUZE +6FgcJXAac8h8/9pTyitFxya+ghTdywQU9TZ2GinQ8aZtj50wWY/7Hl1Sr9Kj +43oD5Z5raQTYJjK7b+ynoyjR6LniLBnff+4cfuxNxw+Cndn1iWS9iVDg/RhA +R177J7TjCQQk+a/RlAqnY2g/P6s/joB6q4+nLyTR8X3iC07MCbJfiMRpRVfS +MXDjT1PREAK4UmabcqrpaNPmcvlSMLnfvAddquvouNc001UsiIBDs7sTp56S +7xsoZvMfIs+zW6nXr4eOEkmuuQ3eZD/Oazljz6uAFZIt5umOBPxUW9+nsVcB +D6WvYP3FImDumkycjosCBpXba9foEzAjpKzE3K+AQ+rtP9r1yPObZh7cFqCA +PfX+vb+2kP2xzmvO5aQCcoJHwzeqkflvdU8wqUgB7W//5zxG9vvcQ+4wOKuA +xv2b0pUWOHD5o//gf4sKWIafLfpmOZBlG5Y4tqyAjmV1Ky9Nc+CCTlLrgoAi +up6hZv0c50D8r0pHIYoiSvdnaOd95sChFL4jhmaK+GS9gaT7Gw4Ylt7Oz85W +xKKRNcX3SjjQSyvN2/6XIj4Of8xr+jcHorJLrs/kKaLBFoml1kIO3Isrvrq7 +RBG/Fne1dOZxYItTfo7gA0WkJw1OvLrEgY18WWlnPilirDvRuSuOAxL7o2Mj +1JXwp17L6HUHDkyJWHo4NCih8WOPzqrFShhO9XAI5VfBtZOmha+lKsFiItLi +s54qjr1yahRQq4DvXqvC7sZswJvbiLlg1TLyf0CS52zDRix/c/7q1OdSEHmh +cqFiYhNasfUPZz4sAbmkcjs9PXV0nxLjmfb6G3LUmOtF/TQwsth6RTSzCJ7L +GG+dTtfEY6Fxa9M2FABLriFNq1MLm9e1aB3iuQGCvDfDPeM348XeFAst5nWg +xFENnVW08dReoxVKnrkgoOxWvftfbXQrTk76OZINmmzp8sh9WzD0xqhQ4kQm +hPaJNFpy6eBquz4/7ZXpMDGdutciRwfrkq2Gt2qehx1azbkWGrpomhCGV74n +waNpg1/zL3XxntcgTbw3AYLUt/S0+2zF7f5JA1YpccAe9+5wFtDDc8KdJn2f +TsB2Jamd627q4XB+wO2P3yJhQ2zysQYGA+XXLbesbgyDBwZFfNYsBqJgpkwg +Jwzs5h9nvDNk4I2Cdur7G2FwLGj29qgxAzP+OqbRGRsGLW4enwStGRgf1FDm +CmHgz9SzdPVg4Le4GomLj0Kh5Mcn2ZkkBobtD5UMehoCm3yYj5V7GJhgUyOY +/F8wXFSwWTz9gYHc5p9XFrwIhpn+A1sH+xhYZVjS9YIIhkcuqaXXhxg4Njv9 +0Sk2GHbb9V+WHGMgvWs2ylQmGI4bJB4R4NJHiUX30QO7gqBFuJ0+pqyPw/Mj +KcltgeDzyD/hbog+ik+8XDo9EwDjh79Gbg/Xx7xgRbFfHwLgmHzgoc4IffTN +1Y5OeBoAySeCdy9E66NLponQy+wAqGBF0AzP6CNYHZYxYAXA7+rTDxpzSc8v +0sMS/CGj/PrMm0Z9nHGr7BJU8YPH+R3eU+JM9Nzo/TrvL28YsKbvj5BiYl7i +gFxFkjdw/Tzs/EuGiX6qkvGvjnqDyS5+Gz4aE1szHI4Y2HlDMzeLIb2Jicp2 +Hq+b+byh7UCegLER+fy2G9YFYV7Qo3SwLM2XiR/nLHy1XQ7AzD/L81r3mNjs +Zfkqz84DRhzM8s/VMnFZ3M9az8QDulecNx+qY+IPmthkl44H1HnIXMmuZ2I0 +8lw0lPSAeKmtrKVnTPwQuual2MP9sD7p4InnH8jxSs9eefe5g7rfOy4fHhZu +lrkhyK+9D7yUSwVyd7KQpdZq4CPqAlFP3Q+q2LFQXCf6/IOfzpDmI9LK2c1C +gZCpjZsGnOFB0fHUVkcWqrbO8JjfcQYxFXOhJU8WmgsdO5pq7gzNKp/FPCJY ++OPAl8hNp51g0wYqTSWPha998sJ3rnKEqU2ZepxJFh5os7v10cYeuttwu+g0 +C69wX9hSamAP9UHje8JnWTi0PWQgaYM9XOBYhOgtsvCbhUdMOI89bGJx3b7P +a4C7aLeS19zbAwcsDtMbJQxwclX9pKbiHujw27G2w9AA2W9iuJZW7oaawl+f +ZpMMMK3lFJOYsQU90/B5yxQD1NjDt2DbaQtVn76vzT9vgF07DuesrLEFDqWP +YZlhgC7/pus8ibaF2zn156//ZYA+T8ybA1bYQn5qInNHmQHeqoqSOiZjA+fC +hdJz3hrgKvVOPwFna3DZRtZGiiHezq5doMpZwFLHKsFGmiFSDFoZWdwWkO8z +3mupaIh7NrvX0/8zh5EztZEuGwwx8EmrSxLHHEKf2ZYf32KIo2XCIXGW5pBs +c4JSY2aIUQUl2sIxO+C+07vfusGGGNnzUUtmcTvIHj5bq1lviM2a9i7ZOqZw +Ydl3a0qDIdK5Tnoq00yBJ8Os8r8mQzyf9hia15rC12q+kvxnhriywNOcPWIC +97kSckTeGmLe8xe//lwxAZes2Mi5z4b43ZF6uWmFCeTUHd/6aA0bs+3lPs6P +IKy1ca6UEWRjIrfqk+J3CLED+hqR69m4sKzW5NOE4M+3oLRZnI3mScd/iN5E +YNhGiN2ksDGZ4x6n5Y7QORg6najNRu1+jnwFB0B8dWDlTkc27vGdalKrZkOh +6cmoSWc2tvsvx7VlsmHLyQummW5stE+bjkwPYYPNZMW7bk82BvhwJ53VYMOZ +ztmfXoFsVIqOTqP9bQgLN2NMouLYSPNX3fsl3wB6DDLfFpeS49tmD0/fYYL/ +0cKrFmVsVKt686v3IhPmyqp8vlewcZ2Qx6PhECaIKHTPa1ezUa75pJ+DHhOs +VsnLPaxnI+Vt0UJ1vT486Cj2fvuOje/uq37Y3csAS8EajYhuNjoPzedsfsyA +7h3P5qR62firX/iOegEDZu5/S3IfYKPMAK9fzCEGaNzYfOfLVzZeeyi9mLKk +Bw96jCNSx9joFfLS3HlQDyzF9oDWJBt9FkdXbftXD3zPHm0Pn2VjwQnRwJB0 +PZipP5MrucBG/8uPOokIPYhfvOx1f5GNXeV8JqJuerBet0R93xIbN2+bSL9o +rAfXD9+fXV5mI39szq0NqnrwP+sD2JY= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vu0bAHAjSYPs/QyzshJ5PA+P60LJCpXsRHaJjCgqI0qorCRvRRnv +K2U8JyINIa+ioYQohLwaVmZKfuf31/l8P+fc97nPfV/jc+gHgnf78HBxcbG4 +ubj+f53re9aklFJoJPfS7Mh6w+1GHdeljht3x4PakWt8KVGKgOKvDkh1Z4C8 +kMnEvigdiLC71cXbfRM65zxZRlGmIDwumfGziwPF4nG1AlF7oP+BTfBMVwOs +8FocdDvuBWZKXz9Odb2BgNZAhwcRYfCzi3FpsmsQ9s/nTJsFnoZG078L229O +g9mXVne5dVkg1187ckB9CSQPsrkUXa+BWOD+W/ymvMh5kS/9cvkmZGib1dns +XYVlt9r6nRz/hvc5m+un1q9DXa6mHWncpZBSGPOKR1oYjYoKrlrFlIGlboCI +uKIw3q46v2UqpQxWNe3eq6ohjBvUuvdcyCmDhCHlXitjYfz2+KdmeWUZnFBo +G8kKEMYfF5h8KUNlEJQv9UflvjCa1jxRL9leDruuVqpbuYrg7cgXK2u4K0Ay +a+hc5jVRfOD7Zf0+TgVIqVUlLBSL4vsqnw1wrwJkGs7E7KsQxZm6Djf5BxVA +mdx4VLVRFI06jWRePq0AZesjHnWjoviUFd/F9b4CdFYs6Q3piGGWYMHgrT8V +YBsuMbzluRjKf4ypX7ejEuzWjPZdfiuGn/yKjoZaVcLum7Xvf38Qw33ndPXf +2laCw2u3V80TYrgkzzOc5FQJ+9QL7ruIi2PIiVetTQGVcGhYKz3eQxy7JO6l +nkqphLP2FkZv5sRR5HRY0XxrJcjcfSnDwy2BFiLEfu3XlVAmaj+vvUYCJxgu +B307KqHzjXtFOlUC77E7gxs+VILSrnCFXeYSeJl6T9dkrBIaduatfH1FAnPO +WER4rOPAktnsyxeGkmjif7pRwpIDacVRpUtmkjjU4LD5/k4OKK3kStLYJYn6 +LPkvTrs4YP10tfF5H0kcc44ySnLiQK4pjbC+IIk2dwuOlflyQB+tLrf2SyLv +w8tbpOM5EMa8sf9ZvBS2Vd864F/FAct8wRmrVCkc4lu8Y1zDAQX+E0kvL0mh +7/fRQYk6DrzucKh8+48Ujof6ra6q54DmkbW8fS+lsIL7zN76Vg6MFkcW/5CR +RvrD+XWinzjgJmYzJktIY4+K2sCtVQToRNfFXX8gjXYjkd3cawhYPbhBgt4s +jVOHNBrt1xFQW84LKu+lMdvHMmRcmAAJq9q0zcvS6PazjzUlQ8DrOCXd7VYy +eGhl+gdddQK2TSxGBQ3J4DGj9oP3rAg4bp616cl3GVyRkmaZsJOAshsaPaJz +Msir8233TlsCpOw9mLWrZLHoYWT/290EfK95Os+rKYsSS3vnOM4EZManhV85 +Jos1dzwzan0JaOndqPQ9ThYP/zPNsvAn4Ldu41ujFFlc6n4i9i6AAN//ZrcM +X5NFqV/e7p8CCWBZu05pNsqirPMOl7ZQAgbFVYKa1snhyCWPE99PEiAZ/Fhe +UlIOA848jYUYAqxbnF4E0OSw2pVRfyGWgOqoFHUhHTmE1L4f9NMEJPdPfnV2 +ksMi+adM2SQCtpTU+U3clMPs01wjzukE+PHslTS5LYe216e+Hckg4KrreHNW +lRyOjo8wEjIJWClIV2G1yGGLd2Nh3iUCekLPDCeMyWGdXPNIyRUC4gx3ecro +y2PchgJi7Q0CzN2v/2CYyKMzXJhdJC0Y++30Xmt5pDpWDQ7fJOdvTCxO85DH +AdemhtJCAmos739beU4eRXwzqvn+ISAmkP+kUqY84qPloHbSZhfsBU2uyeMm +ypeenBICOtrHN5+slEfNt4faZUoJmHRSjJh+L4+9DsqO3+4QcC/qCL/wsDze +mXN7llVGwKmrD3M0x+Xx2sSdeWY5AWsHHOsCeCjIec93PrKCgLfcRdZn11Kw +x2b7nFAlAbmKPz4WSlBQUlGIVkha1S+Va2ATBdecbKh9zCFgPOl9+pIuBa1e +T6jtIAi4e0tFURYoWCmr5fWctMl4/XaHPRQ8dylKuekuAe5HZ5PboimYc5WQ +TqwmQPmyidzXRApOBr7r+Fr9//i5eIc/jYI8cq7u1vcIiPq98bVJIQW5pfd+ +4qkhwJgS6elRRsFBa82PjqRXYdOPkzUUtNy49fY/pC+ddhevbaPg6KnCFnYt +AW5FpcWdnRQcKjghFU9a4d8FxswABd81e2ID6S+j258Jf6PgetGLxn9IV6zO +dNGapeB+fmN5vfsERKoPfLNepuDv8KqOANJGNhonDwpQMeqUWsAV0nxHogST +RKlYmz3U20S6Lf3fvCJ5Kn6IoWp+J51JiGk3qlJR21LBU6iOAJd3ng0D2lSk +7tkcoUmaPl+2548BFenbLgZZkB6V+j0sa0bFQuEzVh6ky1kWEUw7KnItugmG +kY5wy+Z3dKGiZ8K+mjjShqeGcsK9qVgV88YylTRv/uZNGUFUzOVe9W8G6edP +TtaVH6OipY+V5iXSaUPPrV/EUzHG8ltcJmlHPqm+r6lU9MtiNJ4nTVH1CV51 +mYrn/eOmT5P+bM7hUrlBxSYNWbEI0rcPLqebllJRIMVJxZt0WKq1omcVFY/5 +XlCzIc0qu3L31GMqag2LKOuS3tb1cmm8hYpGaskMKdI2XCt27H9DxWR2SvMC +uT9OG5lpr3qpWDKn+fYdaa/dQe/hMxVFaRfdy0kHRRcoVIxT0fZIc0Ai6WOF +3YdoC+T8yZOzjqTNoukxsXw0/GOUdukHeX6tQg8K9FfTUKzauPQ+abtCh5ZJ +QRqm3NlnFkPa9UWKsKcUDR93OQj/IeNlwFNFT1qehm82RprWkPadq3dpp9PQ +nZm0HET6CHWuwFiNhv1la2XekPE4S6S1/NSiIbo/jzr1//g0Vxur1KWhndu6 +g6qkE0M89BSMaMib9WQhiIzn1St/ufSY0HBINSF3Hem03EsxGTto6Pww6NU/ +VWR+NT5v4dlFQxcD//kOMj+oTj5j9/fS8PrRV999SBd+XxYOc6Gh/R6hqGky +n8rFt7oOeZHrE33rsYJ0k1/eWGMEDSckKmOXyPy1+M0UORFNw+Z38g5hpF+m +dejpxpLfe2Ks7TOZ7+9rBWILz9Hw21/JBfVkPRhfEy6SeJWGiZRHEja3yfPM +F2Swb9Aw18RIuoSsJwu6Ja6zReT9LwPNXKR53fsKfcrJ9Quc3FBM1h+pCnOG +WQMNw6JaVJ8VE3Bt25Drn2Yatk8KFguQVnh/Mra6lYa32IfemxURoMFDPFN5 +R8NzfEHe9wrI+mAv78Y/SsNtYSu0QvIJCFyYim1ZR8eoVOZdc7KeskJ8JUZE +6FgcJXAac8h8/9pTyitFxya+ghTdywQU9TZ2GinQ8aZtj50wWY/7Hl1Sr9Kj +43oD5Z5raQTYJjK7b+ynoyjR6LniLBnff+4cfuxNxw+Cndn1iWS9iVDg/RhA +R177J7TjCQQk+a/RlAqnY2g/P6s/joB6q4+nLyTR8X3iC07MCbJfiMRpRVfS +MXDjT1PREAK4UmabcqrpaNPmcvlSMLnfvAddquvouNc001UsiIBDs7sTp56S +7xsoZvMfIs+zW6nXr4eOEkmuuQ3eZD/Oazljz6uAFZIt5umOBPxUW9+nsVcB +D6WvYP3FImDumkycjosCBpXba9foEzAjpKzE3K+AQ+rtP9r1yPObZh7cFqCA +PfX+vb+2kP2xzmvO5aQCcoJHwzeqkflvdU8wqUgB7W//5zxG9vvcQ+4wOKuA +xv2b0pUWOHD5o//gf4sKWIafLfpmOZBlG5Y4tqyAjmV1Ky9Nc+CCTlLrgoAi +up6hZv0c50D8r0pHIYoiSvdnaOd95sChFL4jhmaK+GS9gaT7Gw4Ylt7Oz85W +xKKRNcX3SjjQSyvN2/6XIj4Of8xr+jcHorJLrs/kKaLBFoml1kIO3Isrvrq7 +RBG/Fne1dOZxYItTfo7gA0WkJw1OvLrEgY18WWlnPilirDvRuSuOAxL7o2Mj +1JXwp17L6HUHDkyJWHo4NCih8WOPzqrFShhO9XAI5VfBtZOmha+lKsFiItLi +s54qjr1yahRQq4DvXqvC7sZswJvbiLlg1TLyf0CS52zDRix/c/7q1OdSEHmh +cqFiYhNasfUPZz4sAbmkcjs9PXV0nxLjmfb6G3LUmOtF/TQwsth6RTSzCJ7L +GG+dTtfEY6Fxa9M2FABLriFNq1MLm9e1aB3iuQGCvDfDPeM348XeFAst5nWg +xFENnVW08dReoxVKnrkgoOxWvftfbXQrTk76OZINmmzp8sh9WzD0xqhQ4kQm +hPaJNFpy6eBquz4/7ZXpMDGdutciRwfrkq2Gt2qehx1azbkWGrpomhCGV74n +waNpg1/zL3XxntcgTbw3AYLUt/S0+2zF7f5JA1YpccAe9+5wFtDDc8KdJn2f +TsB2Jamd627q4XB+wO2P3yJhQ2zysQYGA+XXLbesbgyDBwZFfNYsBqJgpkwg +Jwzs5h9nvDNk4I2Cdur7G2FwLGj29qgxAzP+OqbRGRsGLW4enwStGRgf1FDm +CmHgz9SzdPVg4Le4GomLj0Kh5Mcn2ZkkBobtD5UMehoCm3yYj5V7GJhgUyOY +/F8wXFSwWTz9gYHc5p9XFrwIhpn+A1sH+xhYZVjS9YIIhkcuqaXXhxg4Njv9 +0Sk2GHbb9V+WHGMgvWs2ylQmGI4bJB4R4NJHiUX30QO7gqBFuJ0+pqyPw/Mj +KcltgeDzyD/hbog+ik+8XDo9EwDjh79Gbg/Xx7xgRbFfHwLgmHzgoc4IffTN +1Y5OeBoAySeCdy9E66NLponQy+wAqGBF0AzP6CNYHZYxYAXA7+rTDxpzSc8v +0sMS/CGj/PrMm0Z9nHGr7BJU8YPH+R3eU+JM9Nzo/TrvL28YsKbvj5BiYl7i +gFxFkjdw/Tzs/EuGiX6qkvGvjnqDyS5+Gz4aE1szHI4Y2HlDMzeLIb2Jicp2 +Hq+b+byh7UCegLER+fy2G9YFYV7Qo3SwLM2XiR/nLHy1XQ7AzD/L81r3mNjs +Zfkqz84DRhzM8s/VMnFZ3M9az8QDulecNx+qY+IPmthkl44H1HnIXMmuZ2I0 +8lw0lPSAeKmtrKVnTPwQuual2MP9sD7p4InnH8jxSs9eefe5g7rfOy4fHhZu +lrkhyK+9D7yUSwVyd7KQpdZq4CPqAlFP3Q+q2LFQXCf6/IOfzpDmI9LK2c1C +gZCpjZsGnOFB0fHUVkcWqrbO8JjfcQYxFXOhJU8WmgsdO5pq7gzNKp/FPCJY ++OPAl8hNp51g0wYqTSWPha998sJ3rnKEqU2ZepxJFh5os7v10cYeuttwu+g0 +C69wX9hSamAP9UHje8JnWTi0PWQgaYM9XOBYhOgtsvCbhUdMOI89bGJx3b7P +a4C7aLeS19zbAwcsDtMbJQxwclX9pKbiHujw27G2w9AA2W9iuJZW7oaawl+f +ZpMMMK3lFJOYsQU90/B5yxQD1NjDt2DbaQtVn76vzT9vgF07DuesrLEFDqWP +YZlhgC7/pus8ibaF2zn156//ZYA+T8ybA1bYQn5qInNHmQHeqoqSOiZjA+fC +hdJz3hrgKvVOPwFna3DZRtZGiiHezq5doMpZwFLHKsFGmiFSDFoZWdwWkO8z +3mupaIh7NrvX0/8zh5EztZEuGwwx8EmrSxLHHEKf2ZYf32KIo2XCIXGW5pBs +c4JSY2aIUQUl2sIxO+C+07vfusGGGNnzUUtmcTvIHj5bq1lviM2a9i7ZOqZw +Ydl3a0qDIdK5Tnoq00yBJ8Os8r8mQzyf9hia15rC12q+kvxnhriywNOcPWIC +97kSckTeGmLe8xe//lwxAZes2Mi5z4b43ZF6uWmFCeTUHd/6aA0bs+3lPs6P +IKy1ca6UEWRjIrfqk+J3CLED+hqR69m4sKzW5NOE4M+3oLRZnI3mScd/iN5E +YNhGiN2ksDGZ4x6n5Y7QORg6najNRu1+jnwFB0B8dWDlTkc27vGdalKrZkOh +6cmoSWc2tvsvx7VlsmHLyQummW5stE+bjkwPYYPNZMW7bk82BvhwJ53VYMOZ +ztmfXoFsVIqOTqP9bQgLN2NMouLYSPNX3fsl3wB6DDLfFpeS49tmD0/fYYL/ +0cKrFmVsVKt686v3IhPmyqp8vlewcZ2Qx6PhECaIKHTPa1ezUa75pJ+DHhOs +VsnLPaxnI+Vt0UJ1vT486Cj2fvuOje/uq37Y3csAS8EajYhuNjoPzedsfsyA +7h3P5qR62firX/iOegEDZu5/S3IfYKPMAK9fzCEGaNzYfOfLVzZeeyi9mLKk +Bw96jCNSx9joFfLS3HlQDyzF9oDWJBt9FkdXbftXD3zPHm0Pn2VjwQnRwJB0 +PZipP5MrucBG/8uPOokIPYhfvOx1f5GNXeV8JqJuerBet0R93xIbN2+bSL9o +rAfXD9+fXV5mI39szq0NqnrwP+sD2JY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0770810354255406}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0770810354255406}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vu0bAHAjSYPs/QyzshJ5PA+P60LJCpXsRHaJjCgqI0qorCRvRRnv +K2U8JyINIa+ioYQohLwaVmZKfuf31/l8P+fc97nPfV/jc+gHgnf78HBxcbG4 +ubj+f53re9aklFJoJPfS7Mh6w+1GHdeljht3x4PakWt8KVGKgOKvDkh1Z4C8 +kMnEvigdiLC71cXbfRM65zxZRlGmIDwumfGziwPF4nG1AlF7oP+BTfBMVwOs +8FocdDvuBWZKXz9Odb2BgNZAhwcRYfCzi3FpsmsQ9s/nTJsFnoZG078L229O +g9mXVne5dVkg1187ckB9CSQPsrkUXa+BWOD+W/ymvMh5kS/9cvkmZGib1dns +XYVlt9r6nRz/hvc5m+un1q9DXa6mHWncpZBSGPOKR1oYjYoKrlrFlIGlboCI +uKIw3q46v2UqpQxWNe3eq6ohjBvUuvdcyCmDhCHlXitjYfz2+KdmeWUZnFBo +G8kKEMYfF5h8KUNlEJQv9UflvjCa1jxRL9leDruuVqpbuYrg7cgXK2u4K0Ay +a+hc5jVRfOD7Zf0+TgVIqVUlLBSL4vsqnw1wrwJkGs7E7KsQxZm6Djf5BxVA +mdx4VLVRFI06jWRePq0AZesjHnWjoviUFd/F9b4CdFYs6Q3piGGWYMHgrT8V +YBsuMbzluRjKf4ypX7ejEuzWjPZdfiuGn/yKjoZaVcLum7Xvf38Qw33ndPXf +2laCw2u3V80TYrgkzzOc5FQJ+9QL7ruIi2PIiVetTQGVcGhYKz3eQxy7JO6l +nkqphLP2FkZv5sRR5HRY0XxrJcjcfSnDwy2BFiLEfu3XlVAmaj+vvUYCJxgu +B307KqHzjXtFOlUC77E7gxs+VILSrnCFXeYSeJl6T9dkrBIaduatfH1FAnPO +WER4rOPAktnsyxeGkmjif7pRwpIDacVRpUtmkjjU4LD5/k4OKK3kStLYJYn6 +LPkvTrs4YP10tfF5H0kcc44ySnLiQK4pjbC+IIk2dwuOlflyQB+tLrf2SyLv +w8tbpOM5EMa8sf9ZvBS2Vd864F/FAct8wRmrVCkc4lu8Y1zDAQX+E0kvL0mh +7/fRQYk6DrzucKh8+48Ujof6ra6q54DmkbW8fS+lsIL7zN76Vg6MFkcW/5CR +RvrD+XWinzjgJmYzJktIY4+K2sCtVQToRNfFXX8gjXYjkd3cawhYPbhBgt4s +jVOHNBrt1xFQW84LKu+lMdvHMmRcmAAJq9q0zcvS6PazjzUlQ8DrOCXd7VYy +eGhl+gdddQK2TSxGBQ3J4DGj9oP3rAg4bp616cl3GVyRkmaZsJOAshsaPaJz +Msir8233TlsCpOw9mLWrZLHoYWT/290EfK95Os+rKYsSS3vnOM4EZManhV85 +Jos1dzwzan0JaOndqPQ9ThYP/zPNsvAn4Ldu41ujFFlc6n4i9i6AAN//ZrcM +X5NFqV/e7p8CCWBZu05pNsqirPMOl7ZQAgbFVYKa1snhyCWPE99PEiAZ/Fhe +UlIOA848jYUYAqxbnF4E0OSw2pVRfyGWgOqoFHUhHTmE1L4f9NMEJPdPfnV2 +ksMi+adM2SQCtpTU+U3clMPs01wjzukE+PHslTS5LYe216e+Hckg4KrreHNW +lRyOjo8wEjIJWClIV2G1yGGLd2Nh3iUCekLPDCeMyWGdXPNIyRUC4gx3ecro +y2PchgJi7Q0CzN2v/2CYyKMzXJhdJC0Y++30Xmt5pDpWDQ7fJOdvTCxO85DH +AdemhtJCAmos739beU4eRXwzqvn+ISAmkP+kUqY84qPloHbSZhfsBU2uyeMm +ypeenBICOtrHN5+slEfNt4faZUoJmHRSjJh+L4+9DsqO3+4QcC/qCL/wsDze +mXN7llVGwKmrD3M0x+Xx2sSdeWY5AWsHHOsCeCjIec93PrKCgLfcRdZn11Kw +x2b7nFAlAbmKPz4WSlBQUlGIVkha1S+Va2ATBdecbKh9zCFgPOl9+pIuBa1e +T6jtIAi4e0tFURYoWCmr5fWctMl4/XaHPRQ8dylKuekuAe5HZ5PboimYc5WQ +TqwmQPmyidzXRApOBr7r+Fr9//i5eIc/jYI8cq7u1vcIiPq98bVJIQW5pfd+ +4qkhwJgS6elRRsFBa82PjqRXYdOPkzUUtNy49fY/pC+ddhevbaPg6KnCFnYt +AW5FpcWdnRQcKjghFU9a4d8FxswABd81e2ID6S+j258Jf6PgetGLxn9IV6zO +dNGapeB+fmN5vfsERKoPfLNepuDv8KqOANJGNhonDwpQMeqUWsAV0nxHogST +RKlYmz3U20S6Lf3fvCJ5Kn6IoWp+J51JiGk3qlJR21LBU6iOAJd3ng0D2lSk +7tkcoUmaPl+2548BFenbLgZZkB6V+j0sa0bFQuEzVh6ky1kWEUw7KnItugmG +kY5wy+Z3dKGiZ8K+mjjShqeGcsK9qVgV88YylTRv/uZNGUFUzOVe9W8G6edP +TtaVH6OipY+V5iXSaUPPrV/EUzHG8ltcJmlHPqm+r6lU9MtiNJ4nTVH1CV51 +mYrn/eOmT5P+bM7hUrlBxSYNWbEI0rcPLqebllJRIMVJxZt0WKq1omcVFY/5 +XlCzIc0qu3L31GMqag2LKOuS3tb1cmm8hYpGaskMKdI2XCt27H9DxWR2SvMC +uT9OG5lpr3qpWDKn+fYdaa/dQe/hMxVFaRfdy0kHRRcoVIxT0fZIc0Ai6WOF +3YdoC+T8yZOzjqTNoukxsXw0/GOUdukHeX6tQg8K9FfTUKzauPQ+abtCh5ZJ +QRqm3NlnFkPa9UWKsKcUDR93OQj/IeNlwFNFT1qehm82RprWkPadq3dpp9PQ +nZm0HET6CHWuwFiNhv1la2XekPE4S6S1/NSiIbo/jzr1//g0Vxur1KWhndu6 +g6qkE0M89BSMaMib9WQhiIzn1St/ufSY0HBINSF3Hem03EsxGTto6Pww6NU/ +VWR+NT5v4dlFQxcD//kOMj+oTj5j9/fS8PrRV999SBd+XxYOc6Gh/R6hqGky +n8rFt7oOeZHrE33rsYJ0k1/eWGMEDSckKmOXyPy1+M0UORFNw+Z38g5hpF+m +dejpxpLfe2Ks7TOZ7+9rBWILz9Hw21/JBfVkPRhfEy6SeJWGiZRHEja3yfPM +F2Swb9Aw18RIuoSsJwu6Ja6zReT9LwPNXKR53fsKfcrJ9Quc3FBM1h+pCnOG +WQMNw6JaVJ8VE3Bt25Drn2Yatk8KFguQVnh/Mra6lYa32IfemxURoMFDPFN5 +R8NzfEHe9wrI+mAv78Y/SsNtYSu0QvIJCFyYim1ZR8eoVOZdc7KeskJ8JUZE +6FgcJXAac8h8/9pTyitFxya+ghTdywQU9TZ2GinQ8aZtj50wWY/7Hl1Sr9Kj +43oD5Z5raQTYJjK7b+ynoyjR6LniLBnff+4cfuxNxw+Cndn1iWS9iVDg/RhA +R177J7TjCQQk+a/RlAqnY2g/P6s/joB6q4+nLyTR8X3iC07MCbJfiMRpRVfS +MXDjT1PREAK4UmabcqrpaNPmcvlSMLnfvAddquvouNc001UsiIBDs7sTp56S +7xsoZvMfIs+zW6nXr4eOEkmuuQ3eZD/Oazljz6uAFZIt5umOBPxUW9+nsVcB +D6WvYP3FImDumkycjosCBpXba9foEzAjpKzE3K+AQ+rtP9r1yPObZh7cFqCA +PfX+vb+2kP2xzmvO5aQCcoJHwzeqkflvdU8wqUgB7W//5zxG9vvcQ+4wOKuA +xv2b0pUWOHD5o//gf4sKWIafLfpmOZBlG5Y4tqyAjmV1Ky9Nc+CCTlLrgoAi +up6hZv0c50D8r0pHIYoiSvdnaOd95sChFL4jhmaK+GS9gaT7Gw4Ylt7Oz85W +xKKRNcX3SjjQSyvN2/6XIj4Of8xr+jcHorJLrs/kKaLBFoml1kIO3Isrvrq7 +RBG/Fne1dOZxYItTfo7gA0WkJw1OvLrEgY18WWlnPilirDvRuSuOAxL7o2Mj +1JXwp17L6HUHDkyJWHo4NCih8WOPzqrFShhO9XAI5VfBtZOmha+lKsFiItLi +s54qjr1yahRQq4DvXqvC7sZswJvbiLlg1TLyf0CS52zDRix/c/7q1OdSEHmh +cqFiYhNasfUPZz4sAbmkcjs9PXV0nxLjmfb6G3LUmOtF/TQwsth6RTSzCJ7L +GG+dTtfEY6Fxa9M2FABLriFNq1MLm9e1aB3iuQGCvDfDPeM348XeFAst5nWg +xFENnVW08dReoxVKnrkgoOxWvftfbXQrTk76OZINmmzp8sh9WzD0xqhQ4kQm +hPaJNFpy6eBquz4/7ZXpMDGdutciRwfrkq2Gt2qehx1azbkWGrpomhCGV74n +waNpg1/zL3XxntcgTbw3AYLUt/S0+2zF7f5JA1YpccAe9+5wFtDDc8KdJn2f +TsB2Jamd627q4XB+wO2P3yJhQ2zysQYGA+XXLbesbgyDBwZFfNYsBqJgpkwg +Jwzs5h9nvDNk4I2Cdur7G2FwLGj29qgxAzP+OqbRGRsGLW4enwStGRgf1FDm +CmHgz9SzdPVg4Le4GomLj0Kh5Mcn2ZkkBobtD5UMehoCm3yYj5V7GJhgUyOY +/F8wXFSwWTz9gYHc5p9XFrwIhpn+A1sH+xhYZVjS9YIIhkcuqaXXhxg4Njv9 +0Sk2GHbb9V+WHGMgvWs2ylQmGI4bJB4R4NJHiUX30QO7gqBFuJ0+pqyPw/Mj +KcltgeDzyD/hbog+ik+8XDo9EwDjh79Gbg/Xx7xgRbFfHwLgmHzgoc4IffTN +1Y5OeBoAySeCdy9E66NLponQy+wAqGBF0AzP6CNYHZYxYAXA7+rTDxpzSc8v +0sMS/CGj/PrMm0Z9nHGr7BJU8YPH+R3eU+JM9Nzo/TrvL28YsKbvj5BiYl7i +gFxFkjdw/Tzs/EuGiX6qkvGvjnqDyS5+Gz4aE1szHI4Y2HlDMzeLIb2Jicp2 +Hq+b+byh7UCegLER+fy2G9YFYV7Qo3SwLM2XiR/nLHy1XQ7AzD/L81r3mNjs +Zfkqz84DRhzM8s/VMnFZ3M9az8QDulecNx+qY+IPmthkl44H1HnIXMmuZ2I0 +8lw0lPSAeKmtrKVnTPwQuual2MP9sD7p4InnH8jxSs9eefe5g7rfOy4fHhZu +lrkhyK+9D7yUSwVyd7KQpdZq4CPqAlFP3Q+q2LFQXCf6/IOfzpDmI9LK2c1C +gZCpjZsGnOFB0fHUVkcWqrbO8JjfcQYxFXOhJU8WmgsdO5pq7gzNKp/FPCJY ++OPAl8hNp51g0wYqTSWPha998sJ3rnKEqU2ZepxJFh5os7v10cYeuttwu+g0 +C69wX9hSamAP9UHje8JnWTi0PWQgaYM9XOBYhOgtsvCbhUdMOI89bGJx3b7P +a4C7aLeS19zbAwcsDtMbJQxwclX9pKbiHujw27G2w9AA2W9iuJZW7oaawl+f +ZpMMMK3lFJOYsQU90/B5yxQD1NjDt2DbaQtVn76vzT9vgF07DuesrLEFDqWP +YZlhgC7/pus8ibaF2zn156//ZYA+T8ybA1bYQn5qInNHmQHeqoqSOiZjA+fC +hdJz3hrgKvVOPwFna3DZRtZGiiHezq5doMpZwFLHKsFGmiFSDFoZWdwWkO8z +3mupaIh7NrvX0/8zh5EztZEuGwwx8EmrSxLHHEKf2ZYf32KIo2XCIXGW5pBs +c4JSY2aIUQUl2sIxO+C+07vfusGGGNnzUUtmcTvIHj5bq1lviM2a9i7ZOqZw +Ydl3a0qDIdK5Tnoq00yBJ8Os8r8mQzyf9hia15rC12q+kvxnhriywNOcPWIC +97kSckTeGmLe8xe//lwxAZes2Mi5z4b43ZF6uWmFCeTUHd/6aA0bs+3lPs6P +IKy1ca6UEWRjIrfqk+J3CLED+hqR69m4sKzW5NOE4M+3oLRZnI3mScd/iN5E +YNhGiN2ksDGZ4x6n5Y7QORg6najNRu1+jnwFB0B8dWDlTkc27vGdalKrZkOh +6cmoSWc2tvsvx7VlsmHLyQummW5stE+bjkwPYYPNZMW7bk82BvhwJ53VYMOZ +ztmfXoFsVIqOTqP9bQgLN2NMouLYSPNX3fsl3wB6DDLfFpeS49tmD0/fYYL/ +0cKrFmVsVKt686v3IhPmyqp8vlewcZ2Qx6PhECaIKHTPa1ezUa75pJ+DHhOs +VsnLPaxnI+Vt0UJ1vT486Cj2fvuOje/uq37Y3csAS8EajYhuNjoPzedsfsyA +7h3P5qR62firX/iOegEDZu5/S3IfYKPMAK9fzCEGaNzYfOfLVzZeeyi9mLKk +Bw96jCNSx9joFfLS3HlQDyzF9oDWJBt9FkdXbftXD3zPHm0Pn2VjwQnRwJB0 +PZipP5MrucBG/8uPOokIPYhfvOx1f5GNXeV8JqJuerBet0R93xIbN2+bSL9o +rAfXD9+fXV5mI39szq0NqnrwP+sD2JY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0770810354255406}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0770810354255406}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357851411036*^9}, + CellLabel-> + "Out[140]=",ExpressionUUID->"ac1a3e86-da91-4fbd-879f-6d5340634faa"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"4ad58a38-0776-\ -5240-aa41-ba7c8ff64fb9"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[141]:=",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vu0bAHAjSYPs/QyzshJ5PA+P60LJCpXsRHaJjCgqI0qorCRvRRnv +K2U8JyINIa+ioYQohLwaVmZKfuf31/l8P+fc97nPfV/jc+gHgnf78HBxcbG4 +ubj+f53re9aklFJoJPfS7Mh6w+1GHdeljht3x4PakWt8KVGKgOKvDkh1Z4C8 +kMnEvigdiLC71cXbfRM65zxZRlGmIDwumfGziwPF4nG1AlF7oP+BTfBMVwOs +8FocdDvuBWZKXz9Odb2BgNZAhwcRYfCzi3FpsmsQ9s/nTJsFnoZG078L229O +g9mXVne5dVkg1187ckB9CSQPsrkUXa+BWOD+W/ymvMh5kS/9cvkmZGib1dns +XYVlt9r6nRz/hvc5m+un1q9DXa6mHWncpZBSGPOKR1oYjYoKrlrFlIGlboCI +uKIw3q46v2UqpQxWNe3eq6ohjBvUuvdcyCmDhCHlXitjYfz2+KdmeWUZnFBo +G8kKEMYfF5h8KUNlEJQv9UflvjCa1jxRL9leDruuVqpbuYrg7cgXK2u4K0Ay +a+hc5jVRfOD7Zf0+TgVIqVUlLBSL4vsqnw1wrwJkGs7E7KsQxZm6Djf5BxVA +mdx4VLVRFI06jWRePq0AZesjHnWjoviUFd/F9b4CdFYs6Q3piGGWYMHgrT8V +YBsuMbzluRjKf4ypX7ejEuzWjPZdfiuGn/yKjoZaVcLum7Xvf38Qw33ndPXf +2laCw2u3V80TYrgkzzOc5FQJ+9QL7ruIi2PIiVetTQGVcGhYKz3eQxy7JO6l +nkqphLP2FkZv5sRR5HRY0XxrJcjcfSnDwy2BFiLEfu3XlVAmaj+vvUYCJxgu +B307KqHzjXtFOlUC77E7gxs+VILSrnCFXeYSeJl6T9dkrBIaduatfH1FAnPO +WER4rOPAktnsyxeGkmjif7pRwpIDacVRpUtmkjjU4LD5/k4OKK3kStLYJYn6 +LPkvTrs4YP10tfF5H0kcc44ySnLiQK4pjbC+IIk2dwuOlflyQB+tLrf2SyLv +w8tbpOM5EMa8sf9ZvBS2Vd864F/FAct8wRmrVCkc4lu8Y1zDAQX+E0kvL0mh +7/fRQYk6DrzucKh8+48Ujof6ra6q54DmkbW8fS+lsIL7zN76Vg6MFkcW/5CR +RvrD+XWinzjgJmYzJktIY4+K2sCtVQToRNfFXX8gjXYjkd3cawhYPbhBgt4s +jVOHNBrt1xFQW84LKu+lMdvHMmRcmAAJq9q0zcvS6PazjzUlQ8DrOCXd7VYy +eGhl+gdddQK2TSxGBQ3J4DGj9oP3rAg4bp616cl3GVyRkmaZsJOAshsaPaJz +Msir8233TlsCpOw9mLWrZLHoYWT/290EfK95Os+rKYsSS3vnOM4EZManhV85 +Jos1dzwzan0JaOndqPQ9ThYP/zPNsvAn4Ldu41ujFFlc6n4i9i6AAN//ZrcM +X5NFqV/e7p8CCWBZu05pNsqirPMOl7ZQAgbFVYKa1snhyCWPE99PEiAZ/Fhe +UlIOA848jYUYAqxbnF4E0OSw2pVRfyGWgOqoFHUhHTmE1L4f9NMEJPdPfnV2 +ksMi+adM2SQCtpTU+U3clMPs01wjzukE+PHslTS5LYe216e+Hckg4KrreHNW +lRyOjo8wEjIJWClIV2G1yGGLd2Nh3iUCekLPDCeMyWGdXPNIyRUC4gx3ecro +y2PchgJi7Q0CzN2v/2CYyKMzXJhdJC0Y++30Xmt5pDpWDQ7fJOdvTCxO85DH +AdemhtJCAmos739beU4eRXwzqvn+ISAmkP+kUqY84qPloHbSZhfsBU2uyeMm +ypeenBICOtrHN5+slEfNt4faZUoJmHRSjJh+L4+9DsqO3+4QcC/qCL/wsDze +mXN7llVGwKmrD3M0x+Xx2sSdeWY5AWsHHOsCeCjIec93PrKCgLfcRdZn11Kw +x2b7nFAlAbmKPz4WSlBQUlGIVkha1S+Va2ATBdecbKh9zCFgPOl9+pIuBa1e +T6jtIAi4e0tFURYoWCmr5fWctMl4/XaHPRQ8dylKuekuAe5HZ5PboimYc5WQ +TqwmQPmyidzXRApOBr7r+Fr9//i5eIc/jYI8cq7u1vcIiPq98bVJIQW5pfd+ +4qkhwJgS6elRRsFBa82PjqRXYdOPkzUUtNy49fY/pC+ddhevbaPg6KnCFnYt +AW5FpcWdnRQcKjghFU9a4d8FxswABd81e2ID6S+j258Jf6PgetGLxn9IV6zO +dNGapeB+fmN5vfsERKoPfLNepuDv8KqOANJGNhonDwpQMeqUWsAV0nxHogST +RKlYmz3U20S6Lf3fvCJ5Kn6IoWp+J51JiGk3qlJR21LBU6iOAJd3ng0D2lSk +7tkcoUmaPl+2548BFenbLgZZkB6V+j0sa0bFQuEzVh6ky1kWEUw7KnItugmG +kY5wy+Z3dKGiZ8K+mjjShqeGcsK9qVgV88YylTRv/uZNGUFUzOVe9W8G6edP +TtaVH6OipY+V5iXSaUPPrV/EUzHG8ltcJmlHPqm+r6lU9MtiNJ4nTVH1CV51 +mYrn/eOmT5P+bM7hUrlBxSYNWbEI0rcPLqebllJRIMVJxZt0WKq1omcVFY/5 +XlCzIc0qu3L31GMqag2LKOuS3tb1cmm8hYpGaskMKdI2XCt27H9DxWR2SvMC +uT9OG5lpr3qpWDKn+fYdaa/dQe/hMxVFaRfdy0kHRRcoVIxT0fZIc0Ai6WOF +3YdoC+T8yZOzjqTNoukxsXw0/GOUdukHeX6tQg8K9FfTUKzauPQ+abtCh5ZJ +QRqm3NlnFkPa9UWKsKcUDR93OQj/IeNlwFNFT1qehm82RprWkPadq3dpp9PQ +nZm0HET6CHWuwFiNhv1la2XekPE4S6S1/NSiIbo/jzr1//g0Vxur1KWhndu6 +g6qkE0M89BSMaMib9WQhiIzn1St/ufSY0HBINSF3Hem03EsxGTto6Pww6NU/ +VWR+NT5v4dlFQxcD//kOMj+oTj5j9/fS8PrRV999SBd+XxYOc6Gh/R6hqGky +n8rFt7oOeZHrE33rsYJ0k1/eWGMEDSckKmOXyPy1+M0UORFNw+Z38g5hpF+m +dejpxpLfe2Ks7TOZ7+9rBWILz9Hw21/JBfVkPRhfEy6SeJWGiZRHEja3yfPM +F2Swb9Aw18RIuoSsJwu6Ja6zReT9LwPNXKR53fsKfcrJ9Quc3FBM1h+pCnOG +WQMNw6JaVJ8VE3Bt25Drn2Yatk8KFguQVnh/Mra6lYa32IfemxURoMFDPFN5 +R8NzfEHe9wrI+mAv78Y/SsNtYSu0QvIJCFyYim1ZR8eoVOZdc7KeskJ8JUZE +6FgcJXAac8h8/9pTyitFxya+ghTdywQU9TZ2GinQ8aZtj50wWY/7Hl1Sr9Kj +43oD5Z5raQTYJjK7b+ynoyjR6LniLBnff+4cfuxNxw+Cndn1iWS9iVDg/RhA +R177J7TjCQQk+a/RlAqnY2g/P6s/joB6q4+nLyTR8X3iC07MCbJfiMRpRVfS +MXDjT1PREAK4UmabcqrpaNPmcvlSMLnfvAddquvouNc001UsiIBDs7sTp56S +7xsoZvMfIs+zW6nXr4eOEkmuuQ3eZD/Oazljz6uAFZIt5umOBPxUW9+nsVcB +D6WvYP3FImDumkycjosCBpXba9foEzAjpKzE3K+AQ+rtP9r1yPObZh7cFqCA +PfX+vb+2kP2xzmvO5aQCcoJHwzeqkflvdU8wqUgB7W//5zxG9vvcQ+4wOKuA +xv2b0pUWOHD5o//gf4sKWIafLfpmOZBlG5Y4tqyAjmV1Ky9Nc+CCTlLrgoAi +up6hZv0c50D8r0pHIYoiSvdnaOd95sChFL4jhmaK+GS9gaT7Gw4Ylt7Oz85W +xKKRNcX3SjjQSyvN2/6XIj4Of8xr+jcHorJLrs/kKaLBFoml1kIO3Isrvrq7 +RBG/Fne1dOZxYItTfo7gA0WkJw1OvLrEgY18WWlnPilirDvRuSuOAxL7o2Mj +1JXwp17L6HUHDkyJWHo4NCih8WOPzqrFShhO9XAI5VfBtZOmha+lKsFiItLi +s54qjr1yahRQq4DvXqvC7sZswJvbiLlg1TLyf0CS52zDRix/c/7q1OdSEHmh +cqFiYhNasfUPZz4sAbmkcjs9PXV0nxLjmfb6G3LUmOtF/TQwsth6RTSzCJ7L +GG+dTtfEY6Fxa9M2FABLriFNq1MLm9e1aB3iuQGCvDfDPeM348XeFAst5nWg +xFENnVW08dReoxVKnrkgoOxWvftfbXQrTk76OZINmmzp8sh9WzD0xqhQ4kQm +hPaJNFpy6eBquz4/7ZXpMDGdutciRwfrkq2Gt2qehx1azbkWGrpomhCGV74n +waNpg1/zL3XxntcgTbw3AYLUt/S0+2zF7f5JA1YpccAe9+5wFtDDc8KdJn2f +TsB2Jamd627q4XB+wO2P3yJhQ2zysQYGA+XXLbesbgyDBwZFfNYsBqJgpkwg +Jwzs5h9nvDNk4I2Cdur7G2FwLGj29qgxAzP+OqbRGRsGLW4enwStGRgf1FDm +CmHgz9SzdPVg4Le4GomLj0Kh5Mcn2ZkkBobtD5UMehoCm3yYj5V7GJhgUyOY +/F8wXFSwWTz9gYHc5p9XFrwIhpn+A1sH+xhYZVjS9YIIhkcuqaXXhxg4Njv9 +0Sk2GHbb9V+WHGMgvWs2ylQmGI4bJB4R4NJHiUX30QO7gqBFuJ0+pqyPw/Mj +KcltgeDzyD/hbog+ik+8XDo9EwDjh79Gbg/Xx7xgRbFfHwLgmHzgoc4IffTN +1Y5OeBoAySeCdy9E66NLponQy+wAqGBF0AzP6CNYHZYxYAXA7+rTDxpzSc8v +0sMS/CGj/PrMm0Z9nHGr7BJU8YPH+R3eU+JM9Nzo/TrvL28YsKbvj5BiYl7i +gFxFkjdw/Tzs/EuGiX6qkvGvjnqDyS5+Gz4aE1szHI4Y2HlDMzeLIb2Jicp2 +Hq+b+byh7UCegLER+fy2G9YFYV7Qo3SwLM2XiR/nLHy1XQ7AzD/L81r3mNjs +Zfkqz84DRhzM8s/VMnFZ3M9az8QDulecNx+qY+IPmthkl44H1HnIXMmuZ2I0 +8lw0lPSAeKmtrKVnTPwQuual2MP9sD7p4InnH8jxSs9eefe5g7rfOy4fHhZu +lrkhyK+9D7yUSwVyd7KQpdZq4CPqAlFP3Q+q2LFQXCf6/IOfzpDmI9LK2c1C +gZCpjZsGnOFB0fHUVkcWqrbO8JjfcQYxFXOhJU8WmgsdO5pq7gzNKp/FPCJY ++OPAl8hNp51g0wYqTSWPha998sJ3rnKEqU2ZepxJFh5os7v10cYeuttwu+g0 +C69wX9hSamAP9UHje8JnWTi0PWQgaYM9XOBYhOgtsvCbhUdMOI89bGJx3b7P +a4C7aLeS19zbAwcsDtMbJQxwclX9pKbiHujw27G2w9AA2W9iuJZW7oaawl+f +ZpMMMK3lFJOYsQU90/B5yxQD1NjDt2DbaQtVn76vzT9vgF07DuesrLEFDqWP +YZlhgC7/pus8ibaF2zn156//ZYA+T8ybA1bYQn5qInNHmQHeqoqSOiZjA+fC +hdJz3hrgKvVOPwFna3DZRtZGiiHezq5doMpZwFLHKsFGmiFSDFoZWdwWkO8z +3mupaIh7NrvX0/8zh5EztZEuGwwx8EmrSxLHHEKf2ZYf32KIo2XCIXGW5pBs +c4JSY2aIUQUl2sIxO+C+07vfusGGGNnzUUtmcTvIHj5bq1lviM2a9i7ZOqZw +Ydl3a0qDIdK5Tnoq00yBJ8Os8r8mQzyf9hia15rC12q+kvxnhriywNOcPWIC +97kSckTeGmLe8xe//lwxAZes2Mi5z4b43ZF6uWmFCeTUHd/6aA0bs+3lPs6P +IKy1ca6UEWRjIrfqk+J3CLED+hqR69m4sKzW5NOE4M+3oLRZnI3mScd/iN5E +YNhGiN2ksDGZ4x6n5Y7QORg6najNRu1+jnwFB0B8dWDlTkc27vGdalKrZkOh +6cmoSWc2tvsvx7VlsmHLyQummW5stE+bjkwPYYPNZMW7bk82BvhwJ53VYMOZ +ztmfXoFsVIqOTqP9bQgLN2NMouLYSPNX3fsl3wB6DDLfFpeS49tmD0/fYYL/ +0cKrFmVsVKt686v3IhPmyqp8vlewcZ2Qx6PhECaIKHTPa1ezUa75pJ+DHhOs +VsnLPaxnI+Vt0UJ1vT486Cj2fvuOje/uq37Y3csAS8EajYhuNjoPzedsfsyA +7h3P5qR62firX/iOegEDZu5/S3IfYKPMAK9fzCEGaNzYfOfLVzZeeyi9mLKk +Bw96jCNSx9joFfLS3HlQDyzF9oDWJBt9FkdXbftXD3zPHm0Pn2VjwQnRwJB0 +PZipP5MrucBG/8uPOokIPYhfvOx1f5GNXeV8JqJuerBet0R93xIbN2+bSL9o +rAfXD9+fXV5mI39szq0NqnrwP+sD2JY= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vu0bAHAjSYPs/QyzshJ5PA+P60LJCpXsRHaJjCgqI0qorCRvRRnv +K2U8JyINIa+ioYQohLwaVmZKfuf31/l8P+fc97nPfV/jc+gHgnf78HBxcbG4 +ubj+f53re9aklFJoJPfS7Mh6w+1GHdeljht3x4PakWt8KVGKgOKvDkh1Z4C8 +kMnEvigdiLC71cXbfRM65zxZRlGmIDwumfGziwPF4nG1AlF7oP+BTfBMVwOs +8FocdDvuBWZKXz9Odb2BgNZAhwcRYfCzi3FpsmsQ9s/nTJsFnoZG078L229O +g9mXVne5dVkg1187ckB9CSQPsrkUXa+BWOD+W/ymvMh5kS/9cvkmZGib1dns +XYVlt9r6nRz/hvc5m+un1q9DXa6mHWncpZBSGPOKR1oYjYoKrlrFlIGlboCI +uKIw3q46v2UqpQxWNe3eq6ohjBvUuvdcyCmDhCHlXitjYfz2+KdmeWUZnFBo +G8kKEMYfF5h8KUNlEJQv9UflvjCa1jxRL9leDruuVqpbuYrg7cgXK2u4K0Ay +a+hc5jVRfOD7Zf0+TgVIqVUlLBSL4vsqnw1wrwJkGs7E7KsQxZm6Djf5BxVA +mdx4VLVRFI06jWRePq0AZesjHnWjoviUFd/F9b4CdFYs6Q3piGGWYMHgrT8V +YBsuMbzluRjKf4ypX7ejEuzWjPZdfiuGn/yKjoZaVcLum7Xvf38Qw33ndPXf +2laCw2u3V80TYrgkzzOc5FQJ+9QL7ruIi2PIiVetTQGVcGhYKz3eQxy7JO6l +nkqphLP2FkZv5sRR5HRY0XxrJcjcfSnDwy2BFiLEfu3XlVAmaj+vvUYCJxgu +B307KqHzjXtFOlUC77E7gxs+VILSrnCFXeYSeJl6T9dkrBIaduatfH1FAnPO +WER4rOPAktnsyxeGkmjif7pRwpIDacVRpUtmkjjU4LD5/k4OKK3kStLYJYn6 +LPkvTrs4YP10tfF5H0kcc44ySnLiQK4pjbC+IIk2dwuOlflyQB+tLrf2SyLv +w8tbpOM5EMa8sf9ZvBS2Vd864F/FAct8wRmrVCkc4lu8Y1zDAQX+E0kvL0mh +7/fRQYk6DrzucKh8+48Ujof6ra6q54DmkbW8fS+lsIL7zN76Vg6MFkcW/5CR +RvrD+XWinzjgJmYzJktIY4+K2sCtVQToRNfFXX8gjXYjkd3cawhYPbhBgt4s +jVOHNBrt1xFQW84LKu+lMdvHMmRcmAAJq9q0zcvS6PazjzUlQ8DrOCXd7VYy +eGhl+gdddQK2TSxGBQ3J4DGj9oP3rAg4bp616cl3GVyRkmaZsJOAshsaPaJz +Msir8233TlsCpOw9mLWrZLHoYWT/290EfK95Os+rKYsSS3vnOM4EZManhV85 +Jos1dzwzan0JaOndqPQ9ThYP/zPNsvAn4Ldu41ujFFlc6n4i9i6AAN//ZrcM +X5NFqV/e7p8CCWBZu05pNsqirPMOl7ZQAgbFVYKa1snhyCWPE99PEiAZ/Fhe +UlIOA848jYUYAqxbnF4E0OSw2pVRfyGWgOqoFHUhHTmE1L4f9NMEJPdPfnV2 +ksMi+adM2SQCtpTU+U3clMPs01wjzukE+PHslTS5LYe216e+Hckg4KrreHNW +lRyOjo8wEjIJWClIV2G1yGGLd2Nh3iUCekLPDCeMyWGdXPNIyRUC4gx3ecro +y2PchgJi7Q0CzN2v/2CYyKMzXJhdJC0Y++30Xmt5pDpWDQ7fJOdvTCxO85DH +AdemhtJCAmos739beU4eRXwzqvn+ISAmkP+kUqY84qPloHbSZhfsBU2uyeMm +ypeenBICOtrHN5+slEfNt4faZUoJmHRSjJh+L4+9DsqO3+4QcC/qCL/wsDze +mXN7llVGwKmrD3M0x+Xx2sSdeWY5AWsHHOsCeCjIec93PrKCgLfcRdZn11Kw +x2b7nFAlAbmKPz4WSlBQUlGIVkha1S+Va2ATBdecbKh9zCFgPOl9+pIuBa1e +T6jtIAi4e0tFURYoWCmr5fWctMl4/XaHPRQ8dylKuekuAe5HZ5PboimYc5WQ +TqwmQPmyidzXRApOBr7r+Fr9//i5eIc/jYI8cq7u1vcIiPq98bVJIQW5pfd+ +4qkhwJgS6elRRsFBa82PjqRXYdOPkzUUtNy49fY/pC+ddhevbaPg6KnCFnYt +AW5FpcWdnRQcKjghFU9a4d8FxswABd81e2ID6S+j258Jf6PgetGLxn9IV6zO +dNGapeB+fmN5vfsERKoPfLNepuDv8KqOANJGNhonDwpQMeqUWsAV0nxHogST +RKlYmz3U20S6Lf3fvCJ5Kn6IoWp+J51JiGk3qlJR21LBU6iOAJd3ng0D2lSk +7tkcoUmaPl+2548BFenbLgZZkB6V+j0sa0bFQuEzVh6ky1kWEUw7KnItugmG +kY5wy+Z3dKGiZ8K+mjjShqeGcsK9qVgV88YylTRv/uZNGUFUzOVe9W8G6edP +TtaVH6OipY+V5iXSaUPPrV/EUzHG8ltcJmlHPqm+r6lU9MtiNJ4nTVH1CV51 +mYrn/eOmT5P+bM7hUrlBxSYNWbEI0rcPLqebllJRIMVJxZt0WKq1omcVFY/5 +XlCzIc0qu3L31GMqag2LKOuS3tb1cmm8hYpGaskMKdI2XCt27H9DxWR2SvMC +uT9OG5lpr3qpWDKn+fYdaa/dQe/hMxVFaRfdy0kHRRcoVIxT0fZIc0Ai6WOF +3YdoC+T8yZOzjqTNoukxsXw0/GOUdukHeX6tQg8K9FfTUKzauPQ+abtCh5ZJ +QRqm3NlnFkPa9UWKsKcUDR93OQj/IeNlwFNFT1qehm82RprWkPadq3dpp9PQ +nZm0HET6CHWuwFiNhv1la2XekPE4S6S1/NSiIbo/jzr1//g0Vxur1KWhndu6 +g6qkE0M89BSMaMib9WQhiIzn1St/ufSY0HBINSF3Hem03EsxGTto6Pww6NU/ +VWR+NT5v4dlFQxcD//kOMj+oTj5j9/fS8PrRV999SBd+XxYOc6Gh/R6hqGky +n8rFt7oOeZHrE33rsYJ0k1/eWGMEDSckKmOXyPy1+M0UORFNw+Z38g5hpF+m +dejpxpLfe2Ks7TOZ7+9rBWILz9Hw21/JBfVkPRhfEy6SeJWGiZRHEja3yfPM +F2Swb9Aw18RIuoSsJwu6Ja6zReT9LwPNXKR53fsKfcrJ9Quc3FBM1h+pCnOG +WQMNw6JaVJ8VE3Bt25Drn2Yatk8KFguQVnh/Mra6lYa32IfemxURoMFDPFN5 +R8NzfEHe9wrI+mAv78Y/SsNtYSu0QvIJCFyYim1ZR8eoVOZdc7KeskJ8JUZE +6FgcJXAac8h8/9pTyitFxya+ghTdywQU9TZ2GinQ8aZtj50wWY/7Hl1Sr9Kj +43oD5Z5raQTYJjK7b+ynoyjR6LniLBnff+4cfuxNxw+Cndn1iWS9iVDg/RhA +R177J7TjCQQk+a/RlAqnY2g/P6s/joB6q4+nLyTR8X3iC07MCbJfiMRpRVfS +MXDjT1PREAK4UmabcqrpaNPmcvlSMLnfvAddquvouNc001UsiIBDs7sTp56S +7xsoZvMfIs+zW6nXr4eOEkmuuQ3eZD/Oazljz6uAFZIt5umOBPxUW9+nsVcB +D6WvYP3FImDumkycjosCBpXba9foEzAjpKzE3K+AQ+rtP9r1yPObZh7cFqCA +PfX+vb+2kP2xzmvO5aQCcoJHwzeqkflvdU8wqUgB7W//5zxG9vvcQ+4wOKuA +xv2b0pUWOHD5o//gf4sKWIafLfpmOZBlG5Y4tqyAjmV1Ky9Nc+CCTlLrgoAi +up6hZv0c50D8r0pHIYoiSvdnaOd95sChFL4jhmaK+GS9gaT7Gw4Ylt7Oz85W +xKKRNcX3SjjQSyvN2/6XIj4Of8xr+jcHorJLrs/kKaLBFoml1kIO3Isrvrq7 +RBG/Fne1dOZxYItTfo7gA0WkJw1OvLrEgY18WWlnPilirDvRuSuOAxL7o2Mj +1JXwp17L6HUHDkyJWHo4NCih8WOPzqrFShhO9XAI5VfBtZOmha+lKsFiItLi +s54qjr1yahRQq4DvXqvC7sZswJvbiLlg1TLyf0CS52zDRix/c/7q1OdSEHmh +cqFiYhNasfUPZz4sAbmkcjs9PXV0nxLjmfb6G3LUmOtF/TQwsth6RTSzCJ7L +GG+dTtfEY6Fxa9M2FABLriFNq1MLm9e1aB3iuQGCvDfDPeM348XeFAst5nWg +xFENnVW08dReoxVKnrkgoOxWvftfbXQrTk76OZINmmzp8sh9WzD0xqhQ4kQm +hPaJNFpy6eBquz4/7ZXpMDGdutciRwfrkq2Gt2qehx1azbkWGrpomhCGV74n +waNpg1/zL3XxntcgTbw3AYLUt/S0+2zF7f5JA1YpccAe9+5wFtDDc8KdJn2f +TsB2Jamd627q4XB+wO2P3yJhQ2zysQYGA+XXLbesbgyDBwZFfNYsBqJgpkwg +Jwzs5h9nvDNk4I2Cdur7G2FwLGj29qgxAzP+OqbRGRsGLW4enwStGRgf1FDm +CmHgz9SzdPVg4Le4GomLj0Kh5Mcn2ZkkBobtD5UMehoCm3yYj5V7GJhgUyOY +/F8wXFSwWTz9gYHc5p9XFrwIhpn+A1sH+xhYZVjS9YIIhkcuqaXXhxg4Njv9 +0Sk2GHbb9V+WHGMgvWs2ylQmGI4bJB4R4NJHiUX30QO7gqBFuJ0+pqyPw/Mj +KcltgeDzyD/hbog+ik+8XDo9EwDjh79Gbg/Xx7xgRbFfHwLgmHzgoc4IffTN +1Y5OeBoAySeCdy9E66NLponQy+wAqGBF0AzP6CNYHZYxYAXA7+rTDxpzSc8v +0sMS/CGj/PrMm0Z9nHGr7BJU8YPH+R3eU+JM9Nzo/TrvL28YsKbvj5BiYl7i +gFxFkjdw/Tzs/EuGiX6qkvGvjnqDyS5+Gz4aE1szHI4Y2HlDMzeLIb2Jicp2 +Hq+b+byh7UCegLER+fy2G9YFYV7Qo3SwLM2XiR/nLHy1XQ7AzD/L81r3mNjs +Zfkqz84DRhzM8s/VMnFZ3M9az8QDulecNx+qY+IPmthkl44H1HnIXMmuZ2I0 +8lw0lPSAeKmtrKVnTPwQuual2MP9sD7p4InnH8jxSs9eefe5g7rfOy4fHhZu +lrkhyK+9D7yUSwVyd7KQpdZq4CPqAlFP3Q+q2LFQXCf6/IOfzpDmI9LK2c1C +gZCpjZsGnOFB0fHUVkcWqrbO8JjfcQYxFXOhJU8WmgsdO5pq7gzNKp/FPCJY ++OPAl8hNp51g0wYqTSWPha998sJ3rnKEqU2ZepxJFh5os7v10cYeuttwu+g0 +C69wX9hSamAP9UHje8JnWTi0PWQgaYM9XOBYhOgtsvCbhUdMOI89bGJx3b7P +a4C7aLeS19zbAwcsDtMbJQxwclX9pKbiHujw27G2w9AA2W9iuJZW7oaawl+f +ZpMMMK3lFJOYsQU90/B5yxQD1NjDt2DbaQtVn76vzT9vgF07DuesrLEFDqWP +YZlhgC7/pus8ibaF2zn156//ZYA+T8ybA1bYQn5qInNHmQHeqoqSOiZjA+fC +hdJz3hrgKvVOPwFna3DZRtZGiiHezq5doMpZwFLHKsFGmiFSDFoZWdwWkO8z +3mupaIh7NrvX0/8zh5EztZEuGwwx8EmrSxLHHEKf2ZYf32KIo2XCIXGW5pBs +c4JSY2aIUQUl2sIxO+C+07vfusGGGNnzUUtmcTvIHj5bq1lviM2a9i7ZOqZw +Ydl3a0qDIdK5Tnoq00yBJ8Os8r8mQzyf9hia15rC12q+kvxnhriywNOcPWIC +97kSckTeGmLe8xe//lwxAZes2Mi5z4b43ZF6uWmFCeTUHd/6aA0bs+3lPs6P +IKy1ca6UEWRjIrfqk+J3CLED+hqR69m4sKzW5NOE4M+3oLRZnI3mScd/iN5E +YNhGiN2ksDGZ4x6n5Y7QORg6najNRu1+jnwFB0B8dWDlTkc27vGdalKrZkOh +6cmoSWc2tvsvx7VlsmHLyQummW5stE+bjkwPYYPNZMW7bk82BvhwJ53VYMOZ +ztmfXoFsVIqOTqP9bQgLN2NMouLYSPNX3fsl3wB6DDLfFpeS49tmD0/fYYL/ +0cKrFmVsVKt686v3IhPmyqp8vlewcZ2Qx6PhECaIKHTPa1ezUa75pJ+DHhOs +VsnLPaxnI+Vt0UJ1vT486Cj2fvuOje/uq37Y3csAS8EajYhuNjoPzedsfsyA +7h3P5qR62firX/iOegEDZu5/S3IfYKPMAK9fzCEGaNzYfOfLVzZeeyi9mLKk +Bw96jCNSx9joFfLS3HlQDyzF9oDWJBt9FkdXbftXD3zPHm0Pn2VjwQnRwJB0 +PZipP5MrucBG/8uPOokIPYhfvOx1f5GNXeV8JqJuerBet0R93xIbN2+bSL9o +rAfXD9+fXV5mI39szq0NqnrwP+sD2JY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0770810354255406}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0770810354255406}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vu0bAHAjSYPs/QyzshJ5PA+P60LJCpXsRHaJjCgqI0qorCRvRRnv +K2U8JyINIa+ioYQohLwaVmZKfuf31/l8P+fc97nPfV/jc+gHgnf78HBxcbG4 +ubj+f53re9aklFJoJPfS7Mh6w+1GHdeljht3x4PakWt8KVGKgOKvDkh1Z4C8 +kMnEvigdiLC71cXbfRM65zxZRlGmIDwumfGziwPF4nG1AlF7oP+BTfBMVwOs +8FocdDvuBWZKXz9Odb2BgNZAhwcRYfCzi3FpsmsQ9s/nTJsFnoZG078L229O +g9mXVne5dVkg1187ckB9CSQPsrkUXa+BWOD+W/ymvMh5kS/9cvkmZGib1dns +XYVlt9r6nRz/hvc5m+un1q9DXa6mHWncpZBSGPOKR1oYjYoKrlrFlIGlboCI +uKIw3q46v2UqpQxWNe3eq6ohjBvUuvdcyCmDhCHlXitjYfz2+KdmeWUZnFBo +G8kKEMYfF5h8KUNlEJQv9UflvjCa1jxRL9leDruuVqpbuYrg7cgXK2u4K0Ay +a+hc5jVRfOD7Zf0+TgVIqVUlLBSL4vsqnw1wrwJkGs7E7KsQxZm6Djf5BxVA +mdx4VLVRFI06jWRePq0AZesjHnWjoviUFd/F9b4CdFYs6Q3piGGWYMHgrT8V +YBsuMbzluRjKf4ypX7ejEuzWjPZdfiuGn/yKjoZaVcLum7Xvf38Qw33ndPXf +2laCw2u3V80TYrgkzzOc5FQJ+9QL7ruIi2PIiVetTQGVcGhYKz3eQxy7JO6l +nkqphLP2FkZv5sRR5HRY0XxrJcjcfSnDwy2BFiLEfu3XlVAmaj+vvUYCJxgu +B307KqHzjXtFOlUC77E7gxs+VILSrnCFXeYSeJl6T9dkrBIaduatfH1FAnPO +WER4rOPAktnsyxeGkmjif7pRwpIDacVRpUtmkjjU4LD5/k4OKK3kStLYJYn6 +LPkvTrs4YP10tfF5H0kcc44ySnLiQK4pjbC+IIk2dwuOlflyQB+tLrf2SyLv +w8tbpOM5EMa8sf9ZvBS2Vd864F/FAct8wRmrVCkc4lu8Y1zDAQX+E0kvL0mh +7/fRQYk6DrzucKh8+48Ujof6ra6q54DmkbW8fS+lsIL7zN76Vg6MFkcW/5CR +RvrD+XWinzjgJmYzJktIY4+K2sCtVQToRNfFXX8gjXYjkd3cawhYPbhBgt4s +jVOHNBrt1xFQW84LKu+lMdvHMmRcmAAJq9q0zcvS6PazjzUlQ8DrOCXd7VYy +eGhl+gdddQK2TSxGBQ3J4DGj9oP3rAg4bp616cl3GVyRkmaZsJOAshsaPaJz +Msir8233TlsCpOw9mLWrZLHoYWT/290EfK95Os+rKYsSS3vnOM4EZManhV85 +Jos1dzwzan0JaOndqPQ9ThYP/zPNsvAn4Ldu41ujFFlc6n4i9i6AAN//ZrcM +X5NFqV/e7p8CCWBZu05pNsqirPMOl7ZQAgbFVYKa1snhyCWPE99PEiAZ/Fhe +UlIOA848jYUYAqxbnF4E0OSw2pVRfyGWgOqoFHUhHTmE1L4f9NMEJPdPfnV2 +ksMi+adM2SQCtpTU+U3clMPs01wjzukE+PHslTS5LYe216e+Hckg4KrreHNW +lRyOjo8wEjIJWClIV2G1yGGLd2Nh3iUCekLPDCeMyWGdXPNIyRUC4gx3ecro +y2PchgJi7Q0CzN2v/2CYyKMzXJhdJC0Y++30Xmt5pDpWDQ7fJOdvTCxO85DH +AdemhtJCAmos739beU4eRXwzqvn+ISAmkP+kUqY84qPloHbSZhfsBU2uyeMm +ypeenBICOtrHN5+slEfNt4faZUoJmHRSjJh+L4+9DsqO3+4QcC/qCL/wsDze +mXN7llVGwKmrD3M0x+Xx2sSdeWY5AWsHHOsCeCjIec93PrKCgLfcRdZn11Kw +x2b7nFAlAbmKPz4WSlBQUlGIVkha1S+Va2ATBdecbKh9zCFgPOl9+pIuBa1e +T6jtIAi4e0tFURYoWCmr5fWctMl4/XaHPRQ8dylKuekuAe5HZ5PboimYc5WQ +TqwmQPmyidzXRApOBr7r+Fr9//i5eIc/jYI8cq7u1vcIiPq98bVJIQW5pfd+ +4qkhwJgS6elRRsFBa82PjqRXYdOPkzUUtNy49fY/pC+ddhevbaPg6KnCFnYt +AW5FpcWdnRQcKjghFU9a4d8FxswABd81e2ID6S+j258Jf6PgetGLxn9IV6zO +dNGapeB+fmN5vfsERKoPfLNepuDv8KqOANJGNhonDwpQMeqUWsAV0nxHogST +RKlYmz3U20S6Lf3fvCJ5Kn6IoWp+J51JiGk3qlJR21LBU6iOAJd3ng0D2lSk +7tkcoUmaPl+2548BFenbLgZZkB6V+j0sa0bFQuEzVh6ky1kWEUw7KnItugmG +kY5wy+Z3dKGiZ8K+mjjShqeGcsK9qVgV88YylTRv/uZNGUFUzOVe9W8G6edP +TtaVH6OipY+V5iXSaUPPrV/EUzHG8ltcJmlHPqm+r6lU9MtiNJ4nTVH1CV51 +mYrn/eOmT5P+bM7hUrlBxSYNWbEI0rcPLqebllJRIMVJxZt0WKq1omcVFY/5 +XlCzIc0qu3L31GMqag2LKOuS3tb1cmm8hYpGaskMKdI2XCt27H9DxWR2SvMC +uT9OG5lpr3qpWDKn+fYdaa/dQe/hMxVFaRfdy0kHRRcoVIxT0fZIc0Ai6WOF +3YdoC+T8yZOzjqTNoukxsXw0/GOUdukHeX6tQg8K9FfTUKzauPQ+abtCh5ZJ +QRqm3NlnFkPa9UWKsKcUDR93OQj/IeNlwFNFT1qehm82RprWkPadq3dpp9PQ +nZm0HET6CHWuwFiNhv1la2XekPE4S6S1/NSiIbo/jzr1//g0Vxur1KWhndu6 +g6qkE0M89BSMaMib9WQhiIzn1St/ufSY0HBINSF3Hem03EsxGTto6Pww6NU/ +VWR+NT5v4dlFQxcD//kOMj+oTj5j9/fS8PrRV999SBd+XxYOc6Gh/R6hqGky +n8rFt7oOeZHrE33rsYJ0k1/eWGMEDSckKmOXyPy1+M0UORFNw+Z38g5hpF+m +dejpxpLfe2Ks7TOZ7+9rBWILz9Hw21/JBfVkPRhfEy6SeJWGiZRHEja3yfPM +F2Swb9Aw18RIuoSsJwu6Ja6zReT9LwPNXKR53fsKfcrJ9Quc3FBM1h+pCnOG +WQMNw6JaVJ8VE3Bt25Drn2Yatk8KFguQVnh/Mra6lYa32IfemxURoMFDPFN5 +R8NzfEHe9wrI+mAv78Y/SsNtYSu0QvIJCFyYim1ZR8eoVOZdc7KeskJ8JUZE +6FgcJXAac8h8/9pTyitFxya+ghTdywQU9TZ2GinQ8aZtj50wWY/7Hl1Sr9Kj +43oD5Z5raQTYJjK7b+ynoyjR6LniLBnff+4cfuxNxw+Cndn1iWS9iVDg/RhA +R177J7TjCQQk+a/RlAqnY2g/P6s/joB6q4+nLyTR8X3iC07MCbJfiMRpRVfS +MXDjT1PREAK4UmabcqrpaNPmcvlSMLnfvAddquvouNc001UsiIBDs7sTp56S +7xsoZvMfIs+zW6nXr4eOEkmuuQ3eZD/Oazljz6uAFZIt5umOBPxUW9+nsVcB +D6WvYP3FImDumkycjosCBpXba9foEzAjpKzE3K+AQ+rtP9r1yPObZh7cFqCA +PfX+vb+2kP2xzmvO5aQCcoJHwzeqkflvdU8wqUgB7W//5zxG9vvcQ+4wOKuA +xv2b0pUWOHD5o//gf4sKWIafLfpmOZBlG5Y4tqyAjmV1Ky9Nc+CCTlLrgoAi +up6hZv0c50D8r0pHIYoiSvdnaOd95sChFL4jhmaK+GS9gaT7Gw4Ylt7Oz85W +xKKRNcX3SjjQSyvN2/6XIj4Of8xr+jcHorJLrs/kKaLBFoml1kIO3Isrvrq7 +RBG/Fne1dOZxYItTfo7gA0WkJw1OvLrEgY18WWlnPilirDvRuSuOAxL7o2Mj +1JXwp17L6HUHDkyJWHo4NCih8WOPzqrFShhO9XAI5VfBtZOmha+lKsFiItLi +s54qjr1yahRQq4DvXqvC7sZswJvbiLlg1TLyf0CS52zDRix/c/7q1OdSEHmh +cqFiYhNasfUPZz4sAbmkcjs9PXV0nxLjmfb6G3LUmOtF/TQwsth6RTSzCJ7L +GG+dTtfEY6Fxa9M2FABLriFNq1MLm9e1aB3iuQGCvDfDPeM348XeFAst5nWg +xFENnVW08dReoxVKnrkgoOxWvftfbXQrTk76OZINmmzp8sh9WzD0xqhQ4kQm +hPaJNFpy6eBquz4/7ZXpMDGdutciRwfrkq2Gt2qehx1azbkWGrpomhCGV74n +waNpg1/zL3XxntcgTbw3AYLUt/S0+2zF7f5JA1YpccAe9+5wFtDDc8KdJn2f +TsB2Jamd627q4XB+wO2P3yJhQ2zysQYGA+XXLbesbgyDBwZFfNYsBqJgpkwg +Jwzs5h9nvDNk4I2Cdur7G2FwLGj29qgxAzP+OqbRGRsGLW4enwStGRgf1FDm +CmHgz9SzdPVg4Le4GomLj0Kh5Mcn2ZkkBobtD5UMehoCm3yYj5V7GJhgUyOY +/F8wXFSwWTz9gYHc5p9XFrwIhpn+A1sH+xhYZVjS9YIIhkcuqaXXhxg4Njv9 +0Sk2GHbb9V+WHGMgvWs2ylQmGI4bJB4R4NJHiUX30QO7gqBFuJ0+pqyPw/Mj +KcltgeDzyD/hbog+ik+8XDo9EwDjh79Gbg/Xx7xgRbFfHwLgmHzgoc4IffTN +1Y5OeBoAySeCdy9E66NLponQy+wAqGBF0AzP6CNYHZYxYAXA7+rTDxpzSc8v +0sMS/CGj/PrMm0Z9nHGr7BJU8YPH+R3eU+JM9Nzo/TrvL28YsKbvj5BiYl7i +gFxFkjdw/Tzs/EuGiX6qkvGvjnqDyS5+Gz4aE1szHI4Y2HlDMzeLIb2Jicp2 +Hq+b+byh7UCegLER+fy2G9YFYV7Qo3SwLM2XiR/nLHy1XQ7AzD/L81r3mNjs +Zfkqz84DRhzM8s/VMnFZ3M9az8QDulecNx+qY+IPmthkl44H1HnIXMmuZ2I0 +8lw0lPSAeKmtrKVnTPwQuual2MP9sD7p4InnH8jxSs9eefe5g7rfOy4fHhZu +lrkhyK+9D7yUSwVyd7KQpdZq4CPqAlFP3Q+q2LFQXCf6/IOfzpDmI9LK2c1C +gZCpjZsGnOFB0fHUVkcWqrbO8JjfcQYxFXOhJU8WmgsdO5pq7gzNKp/FPCJY ++OPAl8hNp51g0wYqTSWPha998sJ3rnKEqU2ZepxJFh5os7v10cYeuttwu+g0 +C69wX9hSamAP9UHje8JnWTi0PWQgaYM9XOBYhOgtsvCbhUdMOI89bGJx3b7P +a4C7aLeS19zbAwcsDtMbJQxwclX9pKbiHujw27G2w9AA2W9iuJZW7oaawl+f +ZpMMMK3lFJOYsQU90/B5yxQD1NjDt2DbaQtVn76vzT9vgF07DuesrLEFDqWP +YZlhgC7/pus8ibaF2zn156//ZYA+T8ybA1bYQn5qInNHmQHeqoqSOiZjA+fC +hdJz3hrgKvVOPwFna3DZRtZGiiHezq5doMpZwFLHKsFGmiFSDFoZWdwWkO8z +3mupaIh7NrvX0/8zh5EztZEuGwwx8EmrSxLHHEKf2ZYf32KIo2XCIXGW5pBs +c4JSY2aIUQUl2sIxO+C+07vfusGGGNnzUUtmcTvIHj5bq1lviM2a9i7ZOqZw +Ydl3a0qDIdK5Tnoq00yBJ8Os8r8mQzyf9hia15rC12q+kvxnhriywNOcPWIC +97kSckTeGmLe8xe//lwxAZes2Mi5z4b43ZF6uWmFCeTUHd/6aA0bs+3lPs6P +IKy1ca6UEWRjIrfqk+J3CLED+hqR69m4sKzW5NOE4M+3oLRZnI3mScd/iN5E +YNhGiN2ksDGZ4x6n5Y7QORg6najNRu1+jnwFB0B8dWDlTkc27vGdalKrZkOh +6cmoSWc2tvsvx7VlsmHLyQummW5stE+bjkwPYYPNZMW7bk82BvhwJ53VYMOZ +ztmfXoFsVIqOTqP9bQgLN2NMouLYSPNX3fsl3wB6DDLfFpeS49tmD0/fYYL/ +0cKrFmVsVKt686v3IhPmyqp8vlewcZ2Qx6PhECaIKHTPa1ezUa75pJ+DHhOs +VsnLPaxnI+Vt0UJ1vT486Cj2fvuOje/uq37Y3csAS8EajYhuNjoPzedsfsyA +7h3P5qR62firX/iOegEDZu5/S3IfYKPMAK9fzCEGaNzYfOfLVzZeeyi9mLKk +Bw96jCNSx9joFfLS3HlQDyzF9oDWJBt9FkdXbftXD3zPHm0Pn2VjwQnRwJB0 +PZipP5MrucBG/8uPOokIPYhfvOx1f5GNXeV8JqJuerBet0R93xIbN2+bSL9o +rAfXD9+fXV5mI39szq0NqnrwP+sD2JY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0770810354255406}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0770810354255406}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943578514777517`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"3793c438-290c-4536-bfdb-cdd930730727"] +}, Open ]], Cell[CellGroupData[{ @@ -12275,18 +15232,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7428996637454486`*^-152\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 73, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357851518531*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"2df2050e-c0cc-4793-9463-ca3d67f1d933"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.214466437953849`*^-155\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 74, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357851525527*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"7970c227-69b8-490b-9c13-dd4bfc390b92"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0190906410796989`*^-157\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 75, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357851533596*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"ae343555-ce16-41c6-8f8f-bb1a7a5afe0c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 142, 76, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435785154032*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"b321b17f-fb0f-4c58-a817-4fd9eebd5771"], + +Cell[BoxData["9.518550603014361`"], "Output", + CellChangeTimes->{3.994357904272914*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"bfee5baf-b3b4-49a3-af7e-fc6e66616291"] }, Open ]], Cell[CellGroupData[{ @@ -12353,27 +15367,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850818889292*^9, - 3.9918508230677433`*^9}},ExpressionUUID->"d2148290-3e90-8347-bddd-\ -5dd8190b0268"], + CellChangeTimes->{{3.991850818889292*^9, 3.9918508230677433`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"905b237c-0e51-ab4b-895d-05994c6f1d5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.220789172281985`*^-199\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 77, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357904313362*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"0d356622-cf14-47ce-a96d-37d4d9d34ba7"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ad8c79e-9570-a44d-b593-07aa87056e21"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.853922017224774`*^-203\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 78, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357904322133*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"7001374d-7912-4682-83c9-e5deb6107d09"], -Cell[BoxData["0.576602516746911`"], "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1279751680973528`*^-207\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 79, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357904330062*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"c0f5647f-d969-4b81-b41d-3d823bebc8b1"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 80, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357904335918*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"8fa7bee0-3724-45b1-a13e-cf204340b9ef"], + +Cell[BoxData["0.7889449569847247`"], "Output", + CellChangeTimes->{3.9943579122358847`*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"f0b3089f-33b6-421f-9bc4-82aba3277d9b"] }, Open ]], Cell[CellGroupData[{ @@ -12394,8 +15456,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -12440,27 +15501,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850826380268*^9, - 3.991850829169306*^9}},ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-\ -98d71f8a8458"], + CellChangeTimes->{{3.991850826380268*^9, 3.991850829169306*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c516c31a-74b4-f24d-a16a-678221cde87e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.220789172281985`*^-199\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 81, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357912275323*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"64f6dd3e-fdc3-4876-a897-9ecff7e92957"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"5c50b555-9ebe-f94d-801f-34634555f622"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.853922017224774`*^-203\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 82, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357912283628*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"62b9bf2d-ee02-46fc-aa04-79cb5a6f082b"], -Cell[BoxData["3.32141991539404`"], "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1279751680973528`*^-207\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 83, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357912291719*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"2b99b11d-a175-4087-9ddf-12daac9b64e6"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 84, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943579123002*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"2092cca1-b941-4b0c-a5d9-280e095651f1"], + +Cell[BoxData["26.57503575428889`"], "Output", + CellChangeTimes->{3.994357920220336*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"0487e5ce-5e64-4bc3-a934-bd6244969d94"] }, Open ]], Cell[CellGroupData[{ @@ -12481,8 +15590,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -12527,27 +15635,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918508329145336`*^9, - 3.991850837197098*^9}},ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-\ -57c1fe1d0585"], + CellChangeTimes->{{3.9918508329145336`*^9, 3.991850837197098*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ca591cf-a5ce-ce41-8101-8edfca50e890"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.220789172281985`*^-199\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 85, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435792027192*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"32441a8b-f8e1-4e32-9327-bdb9598da830"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cbafd11a-4be0-b541-81e4-e62191ae7695"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.853922017224774`*^-203\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 86, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357920278976*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"c9fc7494-ec23-4f57-ab8f-12edd194ceb5"], -Cell[BoxData["18.419619005098298`"], "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1279751680973528`*^-207\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 87, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943579202853928`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"a7dafba5-b685-4676-b3df-1bbb25dad182"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 88, 31388290477655179485, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357920291821*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"244d8a58-eed2-4519-9cde-44852c19502d"], + +Cell[BoxData["4.2109129564220975`"], "Output", + CellChangeTimes->{3.9943579250034523`*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"c6e2743b-e20d-4f6c-9148-989b1eb54a6e"] }, Open ]], Cell[CellGroupData[{ @@ -12556,18 +15712,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918508397421246`*^9, - 3.9918508449867363`*^9}},ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-\ -1ca469b254bd"], + CellChangeTimes->{{3.9918508397421246`*^9, 3.9918508449867363`*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[BoxData["0.07371813161570438`"], "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[BoxData["0.07457987370718121`"], "Output", + CellChangeTimes->{3.994357925038302*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"cf1163fe-f159-4341-bcd2-b178ea86a66f"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"ce1d07fb-39ef-4a2d-a4ac-c7999ed96f34"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"ce1d07fb-39ef-4a2d-a4ac-c7999ed96f34"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +Evaluator->"6", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {150, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -12585,608 +15747,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 357, 7, 36, "Input",ExpressionUUID->"5210b4c5-145f-4e1a-aa29-511430e5ecc6"], -Cell[936, 31, 309, 6, 41, "Output",ExpressionUUID->"ad46ab81-2d31-44d3-953b-97b13ecd0a1e"] +Cell[576, 22, 352, 6, 36, "Input",ExpressionUUID->"5210b4c5-145f-4e1a-aa29-511430e5ecc6"], +Cell[931, 30, 348, 5, 41, "Output",ExpressionUUID->"d8936058-718b-40de-a0f6-cfc9a2cfe07d"] }, Open ]], Cell[CellGroupData[{ -Cell[1282, 42, 253, 5, 36, "Input",ExpressionUUID->"69758569-6559-4f9f-9f7f-b65c67e67ecc"], -Cell[1538, 49, 256, 5, 41, "Output",ExpressionUUID->"29c5a549-af78-42c3-b788-cc9039fc82f3"] +Cell[1316, 40, 248, 4, 36, "Input",ExpressionUUID->"69758569-6559-4f9f-9f7f-b65c67e67ecc"], +Cell[1567, 46, 299, 5, 41, "Output",ExpressionUUID->"0525c13b-6a66-457d-b3bb-28661c3e0fa8"] }, Open ]], Cell[CellGroupData[{ -Cell[1831, 59, 226, 5, 36, "Input",ExpressionUUID->"96c70c96-9f28-40c4-b3b5-214b23241895"], -Cell[2060, 66, 256, 5, 41, "Output",ExpressionUUID->"afec2811-2dc8-4754-9efe-cdaf9df3f1f5"] +Cell[1903, 56, 221, 4, 36, "Input",ExpressionUUID->"96c70c96-9f28-40c4-b3b5-214b23241895"], +Cell[2127, 62, 301, 5, 41, "Output",ExpressionUUID->"8b74d5ed-5d86-46b6-a0ad-24fadd9d9bd0"] }, Open ]], Cell[CellGroupData[{ -Cell[2353, 76, 180, 4, 66, "Input",ExpressionUUID->"bd360ff8-9801-462d-bf9e-a94db99e6d16"], -Cell[2536, 82, 254, 5, 75, "Output",ExpressionUUID->"f605b3be-026c-423a-81ba-dd6f47768b47"] +Cell[2465, 72, 175, 3, 36, "Input",ExpressionUUID->"bd360ff8-9801-462d-bf9e-a94db99e6d16"], +Cell[2643, 77, 297, 5, 41, "Output",ExpressionUUID->"6b7ee6bf-017c-4278-a5a2-8f060bd1e623"] }, Open ]], Cell[CellGroupData[{ -Cell[2827, 92, 262, 8, 96, "Input",ExpressionUUID->"32cd3f49-2a3e-415d-8a20-a03a5e28f4be"], -Cell[3092, 102, 257, 5, 75, "Output",ExpressionUUID->"352cb8d0-fce8-4296-9609-a75efd02eeab"] +Cell[2977, 87, 257, 7, 54, "Input",ExpressionUUID->"32cd3f49-2a3e-415d-8a20-a03a5e28f4be"], +Cell[3237, 96, 300, 5, 41, "Output",ExpressionUUID->"04feb092-1f02-4974-a3ab-183e4f53e5e0"] }, Open ]], Cell[CellGroupData[{ -Cell[3386, 112, 136, 3, 66, "Input",ExpressionUUID->"14c77262-0f08-4a0c-8b7b-06f9b837b5b9"], -Cell[3525, 117, 260, 5, 75, "Output",ExpressionUUID->"45c0c1e8-1471-4571-a48f-0dfd03cfa534"] +Cell[3574, 106, 131, 2, 36, "Input",ExpressionUUID->"14c77262-0f08-4a0c-8b7b-06f9b837b5b9"], +Cell[3708, 110, 305, 5, 41, "Output",ExpressionUUID->"01b8763c-10bc-4b81-95b1-b48f87fd2637"] }, Open ]], Cell[CellGroupData[{ -Cell[3822, 127, 281, 7, 66, "Input",ExpressionUUID->"38248510-4494-40d5-8d8c-7c0a0239824b"], -Cell[4106, 136, 274, 5, 75, "Output",ExpressionUUID->"d71185f7-dc36-49a2-a838-3a97af68854c"] +Cell[4050, 120, 276, 6, 36, "Input",ExpressionUUID->"38248510-4494-40d5-8d8c-7c0a0239824b"], +Cell[4329, 128, 321, 5, 41, "Output",ExpressionUUID->"cff6f187-23d0-48ca-8da2-d954c8868e00"] }, Open ]], Cell[CellGroupData[{ -Cell[4417, 146, 262, 8, 66, "Input",ExpressionUUID->"d9399ba0-28d3-4c6e-aa7b-5360ab82d8e0"], -Cell[4682, 156, 273, 5, 75, "Output",ExpressionUUID->"49350be2-43ef-4491-be3b-9d06634e361d"] +Cell[4687, 138, 257, 7, 36, "Input",ExpressionUUID->"d9399ba0-28d3-4c6e-aa7b-5360ab82d8e0"], +Cell[4947, 147, 316, 5, 41, "Output",ExpressionUUID->"73273deb-8cc3-442f-ad5d-5fefeaac3622"] }, Open ]], Cell[CellGroupData[{ -Cell[4992, 166, 208, 4, 66, "Input",ExpressionUUID->"0e21b474-16e9-43d4-8cfa-749627016079"], -Cell[5203, 172, 236, 4, 75, "Output",ExpressionUUID->"5c612506-0b0f-4e8e-b103-abc2a73b398b"] +Cell[5300, 157, 203, 3, 36, "Input",ExpressionUUID->"0e21b474-16e9-43d4-8cfa-749627016079"], +Cell[5506, 162, 281, 4, 41, "Output",ExpressionUUID->"b4235fd4-8d99-4bb0-ab80-c082afbf7d70"] }, Open ]], Cell[CellGroupData[{ -Cell[5476, 181, 208, 4, 66, "Input",ExpressionUUID->"e35541b8-50be-4e11-9c7e-d38cfef2b2d6"], -Cell[5687, 187, 239, 4, 75, "Output",ExpressionUUID->"c7bbd978-e40b-44a5-9b2f-3717d41e2556"] +Cell[5824, 171, 204, 3, 36, "Input",ExpressionUUID->"e35541b8-50be-4e11-9c7e-d38cfef2b2d6"], +Cell[6031, 176, 285, 4, 41, "Output",ExpressionUUID->"841dc2e7-1162-4739-9cfb-6e4612cffda1"] }, Open ]], Cell[CellGroupData[{ -Cell[5963, 196, 133, 3, 66, "Input",ExpressionUUID->"78b1b396-ec07-435d-b63f-bae87a994155"], -Cell[6099, 201, 253, 5, 75, "Output",ExpressionUUID->"9c13ebf4-ac03-4d33-a018-5534cc931b9a"] +Cell[6353, 185, 129, 2, 36, "Input",ExpressionUUID->"78b1b396-ec07-435d-b63f-bae87a994155"], +Cell[6485, 189, 299, 5, 41, "Output",ExpressionUUID->"2578836b-2088-4afd-beb6-1bc55c7e7288"] }, Open ]], Cell[CellGroupData[{ -Cell[6389, 211, 133, 3, 66, "Input",ExpressionUUID->"abfdab78-d2c0-4a27-a323-ec74c98d8f5a"], -Cell[6525, 216, 252, 5, 75, "Output",ExpressionUUID->"b2fef7c4-cb7f-49e4-be94-2892db0c9dd2"] +Cell[6821, 199, 129, 2, 36, "Input",ExpressionUUID->"abfdab78-d2c0-4a27-a323-ec74c98d8f5a"], +Cell[6953, 203, 296, 5, 41, "Output",ExpressionUUID->"f58ab9fa-29f0-45d6-af5f-4e7ad8c05673"] }, Open ]], Cell[CellGroupData[{ -Cell[6814, 226, 561, 20, 175, "Input",ExpressionUUID->"b03b18f2-5dda-4e35-823c-0a9766dcc51d"], -Cell[7378, 248, 273, 5, 75, "Output",ExpressionUUID->"01354a3a-c9b7-4cb3-8461-a3c2ac201038"] +Cell[7286, 213, 557, 19, 100, "Input",ExpressionUUID->"b03b18f2-5dda-4e35-823c-0a9766dcc51d"], +Cell[7846, 234, 319, 5, 41, "Output",ExpressionUUID->"38492eda-dedf-41d5-a64a-4ed29f01f4ec"] }, Open ]], Cell[CellGroupData[{ -Cell[7688, 258, 561, 20, 175, "Input",ExpressionUUID->"5f3deac1-6a9f-4c8d-8d15-5bb8e0bc7096"], -Cell[8252, 280, 271, 5, 75, "Output",ExpressionUUID->"5948e55d-9456-4fd6-a8ea-40324232efe8"] +Cell[8202, 244, 557, 19, 100, "Input",ExpressionUUID->"5f3deac1-6a9f-4c8d-8d15-5bb8e0bc7096"], +Cell[8762, 265, 319, 5, 41, "Output",ExpressionUUID->"2ca96f63-1798-4352-a304-d4157e7d4acc"] }, Open ]], Cell[CellGroupData[{ -Cell[8560, 290, 1592, 51, 362, "Input",ExpressionUUID->"6b04567a-b064-4157-98ae-6782b8a8a457"], -Cell[10155, 343, 267, 5, 75, "Output",ExpressionUUID->"dc34d31e-b4ce-4175-bc12-7e6e07d83e53"] +Cell[9118, 275, 1588, 50, 215, "Input",ExpressionUUID->"6b04567a-b064-4157-98ae-6782b8a8a457"], +Cell[10709, 327, 308, 5, 41, "Output",ExpressionUUID->"ca7aabc9-23bc-4bfc-aa7f-2bb5becd80ca"] }, Open ]], Cell[CellGroupData[{ -Cell[10459, 353, 1426, 47, 362, "Input",ExpressionUUID->"92e21de7-0fb3-4574-b0c3-e7e966a594b6"], -Cell[11888, 402, 286, 6, 75, "Output",ExpressionUUID->"1853c4d2-964b-4e8a-b338-2927ac203594"] +Cell[11054, 337, 1422, 46, 215, "Input",ExpressionUUID->"92e21de7-0fb3-4574-b0c3-e7e966a594b6"], +Cell[12479, 385, 330, 6, 41, "Output",ExpressionUUID->"09657c9c-ef52-416f-9179-3eab3144fa73"] }, Open ]], Cell[CellGroupData[{ -Cell[12211, 413, 1426, 47, 362, "Input",ExpressionUUID->"7792e963-ea18-4cd7-b377-5907b6a6686e"], -Cell[13640, 462, 289, 6, 75, "Output",ExpressionUUID->"d7bd1f8c-24b3-4da3-92c2-58e7609339cf"] +Cell[12846, 396, 1422, 46, 215, "Input",ExpressionUUID->"7792e963-ea18-4cd7-b377-5907b6a6686e"], +Cell[14271, 444, 335, 6, 41, "Output",ExpressionUUID->"36671712-3a23-4473-a982-995cbe0bc2a6"] }, Open ]], Cell[CellGroupData[{ -Cell[13966, 473, 1592, 51, 362, "Input",ExpressionUUID->"5c040776-6591-4224-bb83-a4801cb23196"], -Cell[15561, 526, 268, 5, 75, "Output",ExpressionUUID->"6b92ed77-596c-4b2c-a35c-1da372b08b72"] +Cell[14643, 455, 1588, 50, 215, "Input",ExpressionUUID->"5c040776-6591-4224-bb83-a4801cb23196"], +Cell[16234, 507, 312, 5, 41, "Output",ExpressionUUID->"b8980cd1-84fa-4e08-ac9d-5a0d91be7d73"] }, Open ]], Cell[CellGroupData[{ -Cell[15866, 536, 135, 3, 66, "Input",ExpressionUUID->"500d9880-2d6a-40d6-9da5-06118272064f"], -Cell[16004, 541, 256, 5, 75, "Output",ExpressionUUID->"2ee25cb4-af7c-4364-96ac-5b5bb44693fc"] +Cell[16583, 517, 131, 2, 36, "Input",ExpressionUUID->"500d9880-2d6a-40d6-9da5-06118272064f"], +Cell[16717, 521, 300, 5, 41, "Output",ExpressionUUID->"058c25f0-7633-4d68-a4fe-732a46a471fd"] }, Open ]], Cell[CellGroupData[{ -Cell[16297, 551, 137, 3, 66, "Input",ExpressionUUID->"8a60e21d-5640-4eec-a6ff-1af78e25481c"], -Cell[16437, 556, 258, 5, 75, "Output",ExpressionUUID->"9f1acd20-54f9-4c6a-94a9-6104ad9a50a9"] +Cell[17054, 531, 133, 2, 36, "Input",ExpressionUUID->"8a60e21d-5640-4eec-a6ff-1af78e25481c"], +Cell[17190, 535, 304, 5, 41, "Output",ExpressionUUID->"761db3e9-aea5-4ef1-bb6a-1e5667cb7d03"] }, Open ]], Cell[CellGroupData[{ -Cell[16732, 566, 138, 3, 66, "Input",ExpressionUUID->"246f7103-b2bb-46cd-a57e-a2494f3ddd1c"], -Cell[16873, 571, 260, 5, 75, "Output",ExpressionUUID->"2eb701c5-f0cc-4d5a-91cb-82dbf2b8d16b"] +Cell[17531, 545, 134, 2, 36, "Input",ExpressionUUID->"246f7103-b2bb-46cd-a57e-a2494f3ddd1c"], +Cell[17668, 549, 306, 5, 41, "Output",ExpressionUUID->"bf6d6d7b-15cd-4339-963d-744ee9c3c069"] }, Open ]], Cell[CellGroupData[{ -Cell[17170, 581, 223, 5, 66, "Input",ExpressionUUID->"f56ca74e-3b0a-4d83-af0c-d97c9e86a21b"], -Cell[17396, 588, 269, 6, 75, "Output",ExpressionUUID->"f967ea04-c983-4fde-9681-971ea031b1ac"] +Cell[18011, 559, 219, 4, 36, "Input",ExpressionUUID->"f56ca74e-3b0a-4d83-af0c-d97c9e86a21b"], +Cell[18233, 565, 313, 6, 41, "Output",ExpressionUUID->"ad21fb5a-03ea-4d2d-ae7f-61737469c835"] }, Open ]], Cell[CellGroupData[{ -Cell[17702, 599, 138, 3, 66, "Input",ExpressionUUID->"c2aea24b-853c-4042-9d19-332d1fe3fd11"], -Cell[17843, 604, 260, 5, 75, "Output",ExpressionUUID->"9ab3568e-9dc9-4ec4-9ad7-125607efc6e8"] +Cell[18583, 576, 134, 2, 36, "Input",ExpressionUUID->"c2aea24b-853c-4042-9d19-332d1fe3fd11"], +Cell[18720, 580, 306, 5, 41, "Output",ExpressionUUID->"74d262fd-135a-4473-a1f8-986ed1a57ba4"] }, Open ]], Cell[CellGroupData[{ -Cell[18140, 614, 326, 6, 66, "Input",ExpressionUUID->"e3de6edb-f435-4cc3-a9d8-e91c9d075165"], -Cell[18469, 622, 253, 5, 75, "Output",ExpressionUUID->"5bcaf05b-c24b-454e-8767-eca48d75722a"] +Cell[19063, 590, 322, 5, 36, "Input",ExpressionUUID->"e3de6edb-f435-4cc3-a9d8-e91c9d075165"], +Cell[19388, 597, 299, 5, 41, "Output",ExpressionUUID->"2b9fe61b-2abf-439f-af8c-1d5c75458509"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 632, 302, 6, 66, "Input",ExpressionUUID->"0c0d7845-898d-4907-ba48-90e67215fccc"], -Cell[19064, 640, 259, 5, 75, "Output",ExpressionUUID->"f07d616a-9ba9-4576-8201-37ce68feafa3"] +Cell[19724, 607, 298, 5, 36, "Input",ExpressionUUID->"0c0d7845-898d-4907-ba48-90e67215fccc"], +Cell[20025, 614, 303, 5, 41, "Output",ExpressionUUID->"710a58a5-2d8e-49d5-b6ee-876ad47c89ab"] }, Open ]], Cell[CellGroupData[{ -Cell[19360, 650, 223, 5, 66, "Input",ExpressionUUID->"9bbe9c96-37e3-47aa-856d-3dc1aaab8cd0"], -Cell[19586, 657, 250, 5, 75, "Output",ExpressionUUID->"3f39b572-abbd-47f2-a52d-e6d8b469b0c9"] +Cell[20365, 624, 219, 4, 36, "Input",ExpressionUUID->"9bbe9c96-37e3-47aa-856d-3dc1aaab8cd0"], +Cell[20587, 630, 294, 5, 41, "Output",ExpressionUUID->"62a04eec-8cd7-433e-949f-9ae77756bd18"] }, Open ]], Cell[CellGroupData[{ -Cell[19873, 667, 354, 11, 96, "Input",ExpressionUUID->"392e48ba-7a8a-4f76-846f-de90c2cdaf68"], -Cell[20230, 680, 273, 5, 75, "Output",ExpressionUUID->"7777ca2a-de5c-4d45-b74e-faeb81f5a0d9"] +Cell[20918, 640, 350, 10, 54, "Input",ExpressionUUID->"392e48ba-7a8a-4f76-846f-de90c2cdaf68"], +Cell[21271, 652, 319, 5, 41, "Output",ExpressionUUID->"c61cb7d5-e9f1-42e1-955d-b2e9f5f53bb1"] }, Open ]], Cell[CellGroupData[{ -Cell[20540, 690, 354, 11, 96, "Input",ExpressionUUID->"4f381a6b-ee93-4295-9e03-c57107db6657"], -Cell[20897, 703, 290, 6, 75, "Output",ExpressionUUID->"c6c7e799-2b6a-4e29-abe9-8ec7a5ac31af"] +Cell[21627, 662, 350, 10, 54, "Input",ExpressionUUID->"4f381a6b-ee93-4295-9e03-c57107db6657"], +Cell[21980, 674, 334, 6, 41, "Output",ExpressionUUID->"228e20fc-961c-4865-ae59-2caa6f744020"] }, Open ]], Cell[CellGroupData[{ -Cell[21224, 714, 998, 27, 184, "Input",ExpressionUUID->"5e5777eb-c78c-40cf-89d7-98bdf45c2cc5"], -Cell[22225, 743, 274, 5, 75, "Output",ExpressionUUID->"6099da28-3108-4785-a699-ff43f7a69c94"] +Cell[22351, 685, 994, 26, 105, "Input",ExpressionUUID->"5e5777eb-c78c-40cf-89d7-98bdf45c2cc5"], +Cell[23348, 713, 318, 5, 41, "Output",ExpressionUUID->"fd8551e6-7687-4e69-86ab-67bb4fe2eede"] }, Open ]], Cell[CellGroupData[{ -Cell[22536, 753, 203, 4, 66, "Input",ExpressionUUID->"3d7b4fcd-5d11-4b24-a739-1055052c8d2a"], -Cell[22742, 759, 251, 5, 75, "Output",ExpressionUUID->"3c49b192-f416-43fe-8314-2f6552b30171"] +Cell[23703, 723, 199, 3, 36, "Input",ExpressionUUID->"3d7b4fcd-5d11-4b24-a739-1055052c8d2a"], +Cell[23905, 728, 295, 5, 41, "Output",ExpressionUUID->"bb1dc083-277f-41c8-be9b-d054c7bd895a"] }, Open ]], Cell[CellGroupData[{ -Cell[23030, 769, 331, 6, 66, "Input",ExpressionUUID->"3a510322-dc13-4a29-9657-3a3b4dbac4a4"], -Cell[23364, 777, 230, 4, 75, "Output",ExpressionUUID->"7b9aa398-7ff3-4c6a-be2d-ba1e4155d7f6"] +Cell[24237, 738, 327, 5, 36, "Input",ExpressionUUID->"3a510322-dc13-4a29-9657-3a3b4dbac4a4"], +Cell[24567, 745, 274, 4, 41, "Output",ExpressionUUID->"2e0b7a10-f4e8-4b17-8502-14c639b13f6b"] }, Open ]], -Cell[23609, 784, 177, 3, 66, "Input",ExpressionUUID->"842095ec-445b-4e68-bdd7-6634e4c20f80"], +Cell[24856, 752, 173, 2, 109, "Input",ExpressionUUID->"842095ec-445b-4e68-bdd7-6634e4c20f80"], Cell[CellGroupData[{ -Cell[23811, 791, 331, 6, 66, "Input",ExpressionUUID->"de7435d2-2f54-4b08-bb3e-08111c71fef7"], -Cell[24145, 799, 234, 4, 75, "Output",ExpressionUUID->"55035af7-cf2c-46dc-918f-457c1e33b299"] +Cell[25054, 758, 327, 5, 36, "Input",ExpressionUUID->"de7435d2-2f54-4b08-bb3e-08111c71fef7"], +Cell[25384, 765, 278, 4, 41, "Output",ExpressionUUID->"d6d80463-7c44-4bcb-a0dd-ab6ffb021132"] }, Open ]], -Cell[24394, 806, 177, 3, 66, "Input",ExpressionUUID->"dc0c6988-8768-4f31-a837-83f0cb6628ef"], +Cell[25677, 772, 173, 2, 109, "Input",ExpressionUUID->"dc0c6988-8768-4f31-a837-83f0cb6628ef"], Cell[CellGroupData[{ -Cell[24596, 813, 333, 6, 66, "Input",ExpressionUUID->"fc569750-6604-4df8-aa55-1321664a65c4"], -Cell[24932, 821, 231, 4, 75, "Output",ExpressionUUID->"ef94bd72-3bad-46aa-9eee-fed1f077a037"] +Cell[25875, 778, 329, 5, 36, "Input",ExpressionUUID->"fc569750-6604-4df8-aa55-1321664a65c4"], +Cell[26207, 785, 277, 4, 41, "Output",ExpressionUUID->"aea8fc7e-1684-436c-8fcd-bf0428bf1f15"] }, Open ]], -Cell[25178, 828, 177, 3, 66, "Input",ExpressionUUID->"6cf2d16e-e71f-49e8-a67a-08cb0010e5e1"], +Cell[26499, 792, 173, 2, 109, "Input",ExpressionUUID->"6cf2d16e-e71f-49e8-a67a-08cb0010e5e1"], Cell[CellGroupData[{ -Cell[25380, 835, 357, 6, 66, "Input",ExpressionUUID->"35a48b33-ff80-44f9-8fbc-a222d26dcb6a"], -Cell[25740, 843, 230, 4, 75, "Output",ExpressionUUID->"5225ec4e-4aef-4320-b254-1847f41b4605"] +Cell[26697, 798, 353, 5, 36, "Input",ExpressionUUID->"35a48b33-ff80-44f9-8fbc-a222d26dcb6a"], +Cell[27053, 805, 276, 4, 41, "Output",ExpressionUUID->"0158fd87-8f0d-499d-aae1-1afdbb9bd7e0"] }, Open ]], -Cell[25985, 850, 175, 3, 66, "Input",ExpressionUUID->"1675c165-e69d-4b9c-bf18-187694398458"], +Cell[27344, 812, 171, 2, 109, "Input",ExpressionUUID->"1675c165-e69d-4b9c-bf18-187694398458"], Cell[CellGroupData[{ -Cell[26185, 857, 303, 6, 66, "Input",ExpressionUUID->"c9ae2d79-9ac6-4d19-a1d1-15447d866c59"], -Cell[26491, 865, 232, 4, 75, "Output",ExpressionUUID->"357937b8-17fc-4482-834a-0186a915e41a"] +Cell[27540, 818, 299, 5, 36, "Input",ExpressionUUID->"c9ae2d79-9ac6-4d19-a1d1-15447d866c59"], +Cell[27842, 825, 276, 4, 41, "Output",ExpressionUUID->"3f146ad2-18c6-4459-989f-aba838d744db"] }, Open ]], -Cell[26738, 872, 175, 3, 66, "Input",ExpressionUUID->"34f9c528-5b71-4ece-b354-1826feed8c16"], +Cell[28133, 832, 171, 2, 109, "Input",ExpressionUUID->"34f9c528-5b71-4ece-b354-1826feed8c16"], Cell[CellGroupData[{ -Cell[26938, 879, 309, 6, 66, "Input",ExpressionUUID->"965fae0c-ed4c-44fd-9e6d-188bb1d3098a"], -Cell[27250, 887, 233, 4, 75, "Output",ExpressionUUID->"4fe16542-584e-4eb2-a493-e8fa85773d6b"] +Cell[28329, 838, 305, 5, 36, "Input",ExpressionUUID->"965fae0c-ed4c-44fd-9e6d-188bb1d3098a"], +Cell[28637, 845, 277, 4, 41, "Output",ExpressionUUID->"3aec05f7-59ed-4d13-8dd7-4bb112ef2091"] }, Open ]], -Cell[27498, 894, 177, 3, 66, "Input",ExpressionUUID->"e6ac4dd4-3f69-4758-b2b5-dedab2cd1552"], +Cell[28929, 852, 173, 2, 109, "Input",ExpressionUUID->"e6ac4dd4-3f69-4758-b2b5-dedab2cd1552"], Cell[CellGroupData[{ -Cell[27700, 901, 331, 6, 66, "Input",ExpressionUUID->"99ee2901-d88a-4220-94bd-eaaac967b501"], -Cell[28034, 909, 235, 4, 75, "Output",ExpressionUUID->"2588ad09-2a23-4964-b783-881f51cbe8d3"] +Cell[29127, 858, 327, 5, 36, "Input",ExpressionUUID->"99ee2901-d88a-4220-94bd-eaaac967b501"], +Cell[29457, 865, 280, 4, 41, "Output",ExpressionUUID->"8b7ef54d-814c-485b-9aed-20f76b6b8996"] }, Open ]], -Cell[28284, 916, 176, 3, 66, "Input",ExpressionUUID->"2e90c8b9-c357-45d1-af1e-69e619f0f8c4"], +Cell[29752, 872, 172, 2, 109, "Input",ExpressionUUID->"2e90c8b9-c357-45d1-af1e-69e619f0f8c4"], Cell[CellGroupData[{ -Cell[28485, 923, 280, 5, 66, "Input",ExpressionUUID->"616094f6-07e9-4426-abab-f9e340c819f7"], -Cell[28768, 930, 232, 4, 75, "Output",ExpressionUUID->"9d86f16a-5372-4c74-95d1-3cac60461657"] +Cell[29949, 878, 276, 4, 36, "Input",ExpressionUUID->"616094f6-07e9-4426-abab-f9e340c819f7"], +Cell[30228, 884, 278, 4, 41, "Output",ExpressionUUID->"7efe40ef-f1df-4fa4-8d2a-7baf8365c8cf"] }, Open ]], -Cell[29015, 937, 179, 3, 66, "Input",ExpressionUUID->"21d9ca36-ed36-49d0-8e70-66354b7c2f9b"], +Cell[30521, 891, 175, 2, 109, "Input",ExpressionUUID->"21d9ca36-ed36-49d0-8e70-66354b7c2f9b"], Cell[CellGroupData[{ -Cell[29219, 944, 19813, 486, 5405, "Input",ExpressionUUID->"6a92d4ba-7990-4137-88f1-cebc950ec2b4"], -Cell[49035, 1432, 271, 5, 75, "Output",ExpressionUUID->"6556bb48-da8c-4ec6-b3ae-3a5c8dd280e7"] +Cell[30721, 897, 19809, 485, 3208, "Input",ExpressionUUID->"6a92d4ba-7990-4137-88f1-cebc950ec2b4"], +Cell[50533, 1384, 317, 5, 41, "Output",ExpressionUUID->"14244c32-c1b6-425f-80d5-d226df3b9a16"] }, Open ]], Cell[CellGroupData[{ -Cell[49343, 1442, 19752, 490, 5343, "Input",ExpressionUUID->"ded44718-5e9f-4136-ad97-4f21f5eb326b"], -Cell[69098, 1934, 266, 5, 75, "Output",ExpressionUUID->"aaf40761-363b-473b-b56f-509a7dc80c7c"] +Cell[50887, 1394, 19748, 489, 3138, "Input",ExpressionUUID->"ded44718-5e9f-4136-ad97-4f21f5eb326b"], +Cell[70638, 1885, 309, 5, 41, "Output",ExpressionUUID->"dcd8fb97-b203-4e9b-b1be-e0ae61bd0f4b"] }, Open ]], Cell[CellGroupData[{ -Cell[69401, 1944, 19752, 484, 5342, "Input",ExpressionUUID->"234e4766-ae73-4366-888d-721c90c34342"], -Cell[89156, 2430, 287, 6, 75, "Output",ExpressionUUID->"c4e24a77-f356-474c-a6db-3c31c03b3b98"] +Cell[70984, 1895, 19748, 483, 3198, "Input",ExpressionUUID->"234e4766-ae73-4366-888d-721c90c34342"], +Cell[90735, 2380, 331, 6, 41, "Output",ExpressionUUID->"753ddf8f-1233-4e22-9396-a1b9aeb017cf"] }, Open ]], Cell[CellGroupData[{ -Cell[89480, 2441, 22538, 554, 6074, "Input",ExpressionUUID->"3447aa47-926e-4105-b529-53182b1f9892"], -Cell[112021, 2997, 288, 6, 75, "Output",ExpressionUUID->"4150c03c-74de-45dd-94c1-164928601e9b"] +Cell[91103, 2391, 22534, 553, 3677, "Input",ExpressionUUID->"3447aa47-926e-4105-b529-53182b1f9892"], +Cell[113640, 2946, 332, 6, 41, "Output",ExpressionUUID->"91a39334-dfbb-42c4-b644-a833b6273cbb"] }, Open ]], Cell[CellGroupData[{ -Cell[112346, 3008, 22539, 554, 6074, "Input",ExpressionUUID->"84e45612-fe14-4a86-b37b-29b1fd952f1a"], -Cell[134888, 3564, 291, 6, 75, "Output",ExpressionUUID->"184adab8-24f7-40cf-8257-2553c683f0fc"] +Cell[114009, 2957, 22535, 553, 3642, "Input",ExpressionUUID->"84e45612-fe14-4a86-b37b-29b1fd952f1a"], +Cell[136547, 3512, 335, 6, 41, "Output",ExpressionUUID->"3e513baf-b417-4a64-9af5-a585b53f3f0d"] }, Open ]], Cell[CellGroupData[{ -Cell[135216, 3575, 25495, 627, 6806, "Input",ExpressionUUID->"7a70f639-b9ef-43cc-85ac-2a3c009b0422"], -Cell[160714, 4204, 290, 6, 75, "Output",ExpressionUUID->"308ec60b-8c5c-47c1-8d12-6d12c5ece297"] +Cell[136919, 3523, 25491, 626, 4121, "Input",ExpressionUUID->"7a70f639-b9ef-43cc-85ac-2a3c009b0422"], +Cell[162413, 4151, 336, 6, 41, "Output",ExpressionUUID->"bed52300-02de-4d86-8100-5ba54c2d535b"] }, Open ]], Cell[CellGroupData[{ -Cell[161041, 4215, 134, 3, 66, "Input",ExpressionUUID->"7bc16394-d589-462d-b330-8397fb3f2047"], -Cell[161178, 4220, 253, 5, 75, "Output",ExpressionUUID->"e53699da-0c38-4832-89e0-2f096d488e23"] +Cell[162786, 4162, 130, 2, 36, "Input",ExpressionUUID->"7bc16394-d589-462d-b330-8397fb3f2047"], +Cell[162919, 4166, 299, 5, 41, "Output",ExpressionUUID->"1854e4df-b6d0-471d-a709-5794e2f34743"] }, Open ]], Cell[CellGroupData[{ -Cell[161468, 4230, 134, 3, 66, "Input",ExpressionUUID->"a6b40e3a-cf2c-4f9a-b129-de395f756d4e"], -Cell[161605, 4235, 254, 5, 75, "Output",ExpressionUUID->"e5682ebd-a4a7-4282-8c38-0d669f9a424e"] +Cell[163255, 4176, 130, 2, 36, "Input",ExpressionUUID->"a6b40e3a-cf2c-4f9a-b129-de395f756d4e"], +Cell[163388, 4180, 297, 5, 41, "Output",ExpressionUUID->"8367f5ba-1a15-41ee-bfd2-8d4a6443939e"] }, Open ]], Cell[CellGroupData[{ -Cell[161896, 4245, 1148, 40, 246, "Input",ExpressionUUID->"73a21032-e77c-4504-89ed-159786f65d30"], -Cell[163047, 4287, 269, 5, 75, "Output",ExpressionUUID->"f912ad7b-c882-41f5-815f-ecea19b45029"] +Cell[163722, 4190, 1144, 39, 144, "Input",ExpressionUUID->"73a21032-e77c-4504-89ed-159786f65d30"], +Cell[164869, 4231, 313, 5, 41, "Output",ExpressionUUID->"873592ab-ac62-49d5-b358-b4470b700934"] }, Open ]], Cell[CellGroupData[{ -Cell[163353, 4297, 1045, 36, 246, "Input",ExpressionUUID->"21217782-7ddf-452d-9a66-8c8a3ae8aedd"], -Cell[164401, 4335, 288, 6, 75, "Output",ExpressionUUID->"bcae0679-338e-45a0-9243-e04cd91709dd"] +Cell[165219, 4241, 1041, 35, 144, "Input",ExpressionUUID->"21217782-7ddf-452d-9a66-8c8a3ae8aedd"], +Cell[166263, 4278, 334, 6, 41, "Output",ExpressionUUID->"53d5a163-635e-4912-b6ee-b11442d5d28d"] }, Open ]], Cell[CellGroupData[{ -Cell[164726, 4346, 1148, 40, 246, "Input",ExpressionUUID->"af407c9e-e948-4537-b0e9-9976724fad70"], -Cell[165877, 4388, 272, 5, 75, "Output",ExpressionUUID->"92750e76-ea54-463d-8cfc-8fa52e037e25"] +Cell[166634, 4289, 1144, 39, 144, "Input",ExpressionUUID->"af407c9e-e948-4537-b0e9-9976724fad70"], +Cell[167781, 4330, 316, 5, 41, "Output",ExpressionUUID->"42bb3a74-4976-46fb-9f1b-d22ffb1ac7de"] }, Open ]], Cell[CellGroupData[{ -Cell[166186, 4398, 112, 2, 66, "Input",ExpressionUUID->"c6f40a8e-7108-4280-abdf-d61c7ef7c069"], -Cell[166301, 4402, 269, 5, 75, "Output",ExpressionUUID->"c0d8fa98-deff-4a1e-a762-248eb4961b2f"] +Cell[168134, 4340, 108, 1, 36, "Input",ExpressionUUID->"c6f40a8e-7108-4280-abdf-d61c7ef7c069"], +Cell[168245, 4343, 315, 5, 41, "Output",ExpressionUUID->"d9ac024f-85b3-4c1b-8cfc-3c2af6a6b4d3"] }, Open ]], Cell[CellGroupData[{ -Cell[166607, 4412, 112, 2, 66, "Input",ExpressionUUID->"9f49d01a-e956-46f1-bc32-3c0a0c5676fd"], -Cell[166722, 4416, 290, 6, 75, "Output",ExpressionUUID->"d7e3941f-a328-4ba2-8498-96acacba8db3"] +Cell[168597, 4353, 108, 1, 36, "Input",ExpressionUUID->"9f49d01a-e956-46f1-bc32-3c0a0c5676fd"], +Cell[168708, 4356, 336, 6, 41, "Output",ExpressionUUID->"2c07a7b0-75b0-4e51-a749-d781cc1a28f4"] }, Open ]], Cell[CellGroupData[{ -Cell[167049, 4427, 112, 2, 66, "Input",ExpressionUUID->"757ac39d-4b2a-4228-9138-a03f58a1ff11"], -Cell[167164, 4431, 287, 6, 75, "Output",ExpressionUUID->"b03be3c2-99e5-48da-b4fc-d971a27c41ae"] +Cell[169081, 4367, 108, 1, 36, "Input",ExpressionUUID->"757ac39d-4b2a-4228-9138-a03f58a1ff11"], +Cell[169192, 4370, 331, 6, 41, "Output",ExpressionUUID->"b5ab8849-4527-4426-b64e-406d2b312229"] }, Open ]], Cell[CellGroupData[{ -Cell[167488, 4442, 112, 2, 66, "Input",ExpressionUUID->"62adb8fa-10b5-480f-894b-f0238c0d1b4a"], -Cell[167603, 4446, 269, 5, 75, "Output",ExpressionUUID->"a9ff62cb-6229-420d-a06d-9f4405fec512"] +Cell[169560, 4381, 108, 1, 36, "Input",ExpressionUUID->"62adb8fa-10b5-480f-894b-f0238c0d1b4a"], +Cell[169671, 4384, 313, 5, 41, "Output",ExpressionUUID->"894869d5-0755-45ae-8ad6-d6e52c89c97a"] }, Open ]], Cell[CellGroupData[{ -Cell[167909, 4456, 111, 2, 66, "Input",ExpressionUUID->"d43e6f92-d809-44e0-9120-b196ea8daae1"], -Cell[168023, 4460, 272, 5, 75, "Output",ExpressionUUID->"ae06fbeb-d6c8-473e-9c5f-4a3b3e64c434"] +Cell[170021, 4394, 107, 1, 36, "Input",ExpressionUUID->"d43e6f92-d809-44e0-9120-b196ea8daae1"], +Cell[170131, 4397, 316, 5, 41, "Output",ExpressionUUID->"509d040e-a0bf-431a-9aa2-aa4f351ca01a"] }, Open ]], Cell[CellGroupData[{ -Cell[168332, 4470, 111, 2, 66, "Input",ExpressionUUID->"02a8a8e6-24da-4cb4-a9aa-601cc47acfc0"], -Cell[168446, 4474, 272, 5, 75, "Output",ExpressionUUID->"4005a743-b7f7-4e32-b1cb-890516619b5f"] +Cell[170484, 4407, 107, 1, 36, "Input",ExpressionUUID->"02a8a8e6-24da-4cb4-a9aa-601cc47acfc0"], +Cell[170594, 4410, 315, 5, 41, "Output",ExpressionUUID->"99d1356f-7e3b-48d8-8af1-ed1dc69e9717"] }, Open ]], Cell[CellGroupData[{ -Cell[168755, 4484, 501, 17, 125, "Input",ExpressionUUID->"93541c5e-8b46-4315-b49c-dba3509c9f70"], -Cell[169259, 4503, 287, 6, 75, "Output",ExpressionUUID->"6c00d70e-51ac-49a5-aad3-6b5aab4905d8"] +Cell[170946, 4420, 497, 16, 71, "Input",ExpressionUUID->"93541c5e-8b46-4315-b49c-dba3509c9f70"], +Cell[171446, 4438, 331, 6, 41, "Output",ExpressionUUID->"da2208bf-5b1c-4228-b583-0c160f35c6e2"] }, Open ]], Cell[CellGroupData[{ -Cell[169583, 4514, 501, 17, 125, "Input",ExpressionUUID->"2d38d866-1931-4002-9617-99a4e47bd22d"], -Cell[170087, 4533, 283, 6, 75, "Output",ExpressionUUID->"6777495a-a6e6-4cf3-bf0e-4953d5b72a50"] +Cell[171814, 4449, 497, 16, 71, "Input",ExpressionUUID->"2d38d866-1931-4002-9617-99a4e47bd22d"], +Cell[172314, 4467, 329, 6, 41, "Output",ExpressionUUID->"74f1029e-adf6-45ca-ba87-dbbc28ee3088"] }, Open ]], Cell[CellGroupData[{ -Cell[170407, 4544, 1792, 61, 420, "Input",ExpressionUUID->"9d6a4f6e-da0a-4388-909c-a8e2830ba813"], -Cell[172202, 4607, 271, 5, 75, "Output",ExpressionUUID->"e12b71a0-a2cf-48ff-8242-904c1a152792"] +Cell[172680, 4478, 1788, 60, 340, "Input",ExpressionUUID->"9d6a4f6e-da0a-4388-909c-a8e2830ba813"], +Cell[174471, 4540, 317, 5, 41, "Output",ExpressionUUID->"58f737f0-8ec7-48b9-9143-8afbdc58880f"] }, Open ]], Cell[CellGroupData[{ -Cell[172510, 4617, 1105, 37, 299, "Input",ExpressionUUID->"02ec0ba8-fa05-4c6d-aac2-4590440599d3"], -Cell[173618, 4656, 284, 6, 75, "Output",ExpressionUUID->"3b885b3e-049d-40a6-bf91-9a94cae83015"] +Cell[174825, 4550, 1101, 36, 174, "Input",ExpressionUUID->"02ec0ba8-fa05-4c6d-aac2-4590440599d3"], +Cell[175929, 4588, 328, 6, 41, "Output",ExpressionUUID->"6a1c8e20-3b98-4aa3-b124-f528cc83f785"] }, Open ]], Cell[CellGroupData[{ -Cell[173939, 4667, 1822, 62, 420, "Input",ExpressionUUID->"cf4b5661-671b-4ab6-b1c1-32c95855ae45"], -Cell[175764, 4731, 268, 5, 75, "Output",ExpressionUUID->"189fdaf0-6685-4ba2-a19e-8da43287dc1e"] +Cell[176294, 4599, 1818, 61, 340, "Input",ExpressionUUID->"cf4b5661-671b-4ab6-b1c1-32c95855ae45"], +Cell[178115, 4662, 312, 5, 41, "Output",ExpressionUUID->"52120433-39e6-4447-9226-50229e8764bb"] }, Open ]], Cell[CellGroupData[{ -Cell[176069, 4741, 1635, 54, 368, "Input",ExpressionUUID->"56d119f4-b5a5-4dc4-b3d1-1f19739c2200"], -Cell[177707, 4797, 267, 5, 75, "Output",ExpressionUUID->"734e72f0-aea2-43f6-a811-0fbb63b31412"] +Cell[178464, 4672, 1631, 53, 208, "Input",ExpressionUUID->"56d119f4-b5a5-4dc4-b3d1-1f19739c2200"], +Cell[180098, 4727, 313, 5, 41, "Output",ExpressionUUID->"8bfffd19-a782-428c-89aa-eadebf9ed41d"] }, Open ]], Cell[CellGroupData[{ -Cell[178011, 4807, 1635, 54, 101, "Input",ExpressionUUID->"946d2eb7-09c8-43aa-b66f-39edc741593f"], -Cell[179649, 4863, 268, 5, 41, "Output",ExpressionUUID->"60691fd1-8a80-414f-8058-b32593c168eb"] +Cell[180448, 4737, 1631, 53, 208, "Input",ExpressionUUID->"946d2eb7-09c8-43aa-b66f-39edc741593f"], +Cell[182082, 4792, 314, 5, 41, "Output",ExpressionUUID->"7c601141-351b-4206-b6a9-0ab0a42c2328"] }, Open ]], -Cell[179932, 4871, 187, 4, 36, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], -Cell[180122, 4877, 152, 3, 36, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], -Cell[180277, 4882, 187, 4, 36, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], -Cell[180467, 4888, 154, 3, 36, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[180646, 4895, 1273, 41, 61, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[181922, 4938, 106, 0, 41, "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[182433, 4802, 206, 3, 36, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], +Cell[182642, 4807, 183, 2, 41, "Output",ExpressionUUID->"e6f110cb-2d74-4034-b0a7-c0a982d50bf2"] }, Open ]], +Cell[182840, 4812, 171, 2, 109, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], Cell[CellGroupData[{ -Cell[182065, 4943, 910, 31, 73, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[182978, 4976, 106, 0, 41, "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[183036, 4818, 206, 3, 36, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], +Cell[183245, 4823, 183, 2, 41, "Output",ExpressionUUID->"d90ed925-4848-4694-a2c5-4e58634ac701"] }, Open ]], +Cell[183443, 4828, 173, 2, 109, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[183121, 4981, 885, 30, 73, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[184009, 5013, 106, 0, 41, "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[183641, 4834, 1297, 42, 174, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], +Cell[184941, 4878, 194, 2, 41, "Output",ExpressionUUID->"7ce967ea-c6f8-4b7b-b8f8-19718a4498cd"] }, Open ]], Cell[CellGroupData[{ -Cell[184152, 5018, 532, 18, 66, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[184687, 5038, 101, 0, 41, "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[185172, 4885, 929, 30, 128, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], +Cell[186104, 4917, 192, 2, 41, "Output",ExpressionUUID->"d63b8fde-f797-41ab-b916-88e7bfbcf032"] }, Open ]], Cell[CellGroupData[{ -Cell[184825, 5043, 625, 21, 66, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[185453, 5066, 100, 0, 41, "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[186333, 4924, 904, 29, 128, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], +Cell[187240, 4955, 194, 2, 41, "Output",ExpressionUUID->"dd14d061-ebbf-40c3-b150-3408f74571a1"] }, Open ]], Cell[CellGroupData[{ -Cell[185590, 5071, 144, 4, 71, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[185737, 5077, 101, 0, 41, "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[187471, 4962, 554, 18, 66, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], +Cell[188028, 4982, 188, 2, 41, "Output",ExpressionUUID->"391d8f01-2f6f-47be-8421-812db236bea8"] }, Open ]], Cell[CellGroupData[{ -Cell[185875, 5082, 144, 4, 69, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[186022, 5088, 100, 0, 41, "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[188253, 4989, 647, 21, 66, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], +Cell[188903, 5012, 192, 2, 41, "Output",ExpressionUUID->"45b3f71d-89c8-47ad-8b24-d7a1f7b5a2c2"] }, Open ]], Cell[CellGroupData[{ -Cell[186159, 5093, 155, 4, 55, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[186317, 5099, 101, 0, 41, "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[189132, 5019, 166, 4, 71, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], +Cell[189301, 5025, 188, 2, 41, "Output",ExpressionUUID->"995d6560-eacc-4b9d-a87c-89c7ab1a2816"] }, Open ]], Cell[CellGroupData[{ -Cell[186455, 5104, 155, 4, 55, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[186613, 5110, 101, 0, 41, "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[189526, 5032, 166, 4, 69, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], +Cell[189695, 5038, 188, 2, 41, "Output",ExpressionUUID->"944673e4-9837-404e-9400-b41773ac29a2"] }, Open ]], Cell[CellGroupData[{ -Cell[186751, 5115, 6029, 184, 431, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[192783, 5301, 102, 0, 41, "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[189920, 5045, 177, 4, 55, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], +Cell[190100, 5051, 191, 2, 41, "Output",ExpressionUUID->"8ebc95f1-5296-440c-8130-176a99427713"] }, Open ]], Cell[CellGroupData[{ -Cell[192922, 5306, 342, 8, 53, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[193267, 5316, 342, 6, 26, "Message",ExpressionUUID->"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], -Cell[193612, 5324, 100, 0, 41, "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[190328, 5058, 177, 4, 55, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], +Cell[190508, 5064, 189, 2, 41, "Output",ExpressionUUID->"72d983ce-8f09-459d-aa90-136bbd48f290"] }, Open ]], Cell[CellGroupData[{ -Cell[193749, 5329, 6096, 186, 431, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[199848, 5517, 103, 0, 41, "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[190734, 5071, 6051, 184, 831, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], +Cell[196788, 5257, 192, 2, 41, "Output",ExpressionUUID->"c783c7bf-afea-4076-bc84-5cd2ef58f681"] }, Open ]], Cell[CellGroupData[{ -Cell[199988, 5522, 342, 8, 53, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[200333, 5532, 342, 6, 26, "Message",ExpressionUUID->"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], -Cell[200678, 5540, 100, 0, 41, "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[197017, 5264, 364, 8, 53, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], +Cell[197384, 5274, 187, 2, 41, "Output",ExpressionUUID->"40b6f312-f459-468a-9907-67c568de2d3f"] }, Open ]], Cell[CellGroupData[{ -Cell[200815, 5545, 2637, 87, 215, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[203455, 5634, 101, 0, 41, "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[197608, 5281, 6118, 186, 900, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], +Cell[203729, 5469, 191, 2, 41, "Output",ExpressionUUID->"c8f6836f-fa9a-4621-918b-7b391489c1f4"] }, Open ]], Cell[CellGroupData[{ -Cell[203593, 5639, 2577, 84, 215, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[206173, 5725, 102, 0, 41, "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[203957, 5476, 364, 8, 53, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], +Cell[204324, 5486, 189, 2, 41, "Output",ExpressionUUID->"4c4ad1d9-cf5e-4b97-8f89-6e245f06be92"] }, Open ]], Cell[CellGroupData[{ -Cell[206312, 5730, 3686, 117, 316, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[210001, 5849, 102, 0, 41, "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[204550, 5493, 2659, 87, 435, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], +Cell[207212, 5582, 192, 2, 41, "Output",ExpressionUUID->"9f505878-3358-4ef0-a353-35716b75f688"] }, Open ]], -Cell[210118, 5852, 138, 3, 36, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ -Cell[210281, 5859, 2054, 59, 116, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], -Cell[212338, 5920, 342, 6, 26, "Message",ExpressionUUID->"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], -Cell[212683, 5928, 342, 6, 26, "Message",ExpressionUUID->"42c1a263-2456-664a-bb33-c5fe841cb412"], -Cell[213028, 5936, 100, 0, 41, "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[207441, 5589, 2599, 84, 435, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], +Cell[210043, 5675, 189, 2, 41, "Output",ExpressionUUID->"34a5370c-eb96-4a92-8a95-c3fbe4d38154"] }, Open ]], Cell[CellGroupData[{ -Cell[213165, 5941, 2049, 58, 116, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], -Cell[215217, 6001, 342, 6, 26, "Message",ExpressionUUID->"be4d7bfb-c18e-564a-93ce-3f42607886e7"], -Cell[215562, 6009, 342, 6, 26, "Message",ExpressionUUID->"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], -Cell[215907, 6017, 100, 0, 41, "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[210269, 5682, 3708, 117, 575, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], +Cell[213980, 5801, 191, 2, 41, "Output",ExpressionUUID->"e7260bc2-fd82-41a4-a342-db3fbf90dee3"] }, Open ]], +Cell[214186, 5806, 160, 3, 109, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ -Cell[216044, 6022, 1938, 53, 63, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], -Cell[217985, 6077, 342, 6, 26, "Message",ExpressionUUID->"d3cb6fbc-3803-0541-80d1-8cab47341c44"], -Cell[218330, 6085, 342, 6, 26, "Message",ExpressionUUID->"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], -Cell[218675, 6093, 342, 6, 26, "Message",ExpressionUUID->"d8687e0f-2f42-0543-a749-78a1ff3c9572"], -Cell[219020, 6101, 407, 7, 26, "Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], -Cell[219430, 6110, 9852, 394, 232, 4231, 300, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], -Cell[229285, 6506, 191, 5, 41, "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-c578eb57eb6a"] +Cell[214371, 5813, 2073, 58, 276, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], +Cell[216447, 5873, 656, 14, 73, "Message",ExpressionUUID->"b3fb4b57-0283-4f2e-9481-6bc262d00b4f"], +Cell[217106, 5889, 656, 14, 73, "Message",ExpressionUUID->"d5c30a75-ccc6-490c-85f9-ea18920ea07f"], +Cell[217765, 5905, 655, 14, 73, "Message",ExpressionUUID->"5d6af105-45f2-4d91-8638-6184f3a6f45a"], +Cell[218423, 5921, 483, 11, 32, "Message",ExpressionUUID->"223d2bab-7205-4008-9ff9-5d3349b45106"], +Cell[218909, 5934, 188, 2, 41, "Output",ExpressionUUID->"b3996936-3c06-41a3-9b8f-e026a3fdeecc"] }, Open ]], Cell[CellGroupData[{ -Cell[229513, 6516, 2094, 60, 116, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], -Cell[231610, 6578, 342, 6, 26, "Message",ExpressionUUID->"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], -Cell[231955, 6586, 342, 6, 26, "Message",ExpressionUUID->"a2ecd22c-b766-5347-9e03-9d459620be75"], -Cell[232300, 6594, 342, 6, 26, "Message",ExpressionUUID->"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], -Cell[232645, 6602, 407, 7, 26, "Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], -Cell[233055, 6611, 10253, 391, 232, 4113, 287, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"06204099-db57-8e4e-bcc4-fa1ae37c0063"], -Cell[243311, 7004, 191, 5, 41, "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-04dec8739bf5"] +Cell[219134, 5941, 2070, 58, 276, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], +Cell[221207, 6001, 660, 14, 73, "Message",ExpressionUUID->"9ed2ddc8-3756-4ac3-98e1-10afec694b7a"], +Cell[221870, 6017, 658, 14, 73, "Message",ExpressionUUID->"0be43e16-b500-46a5-bd48-c15251d9c461"], +Cell[222531, 6033, 659, 14, 73, "Message",ExpressionUUID->"e9ed3153-c43e-420b-8ba8-75c50b3f759a"], +Cell[223193, 6049, 484, 11, 32, "Message",ExpressionUUID->"60ce45b8-236f-4051-8362-7f21df10df14"], +Cell[223680, 6062, 191, 2, 41, "Output",ExpressionUUID->"8821a078-cb3a-45bf-ac4a-122f4dbd21b9"] }, Open ]], -Cell[243517, 7012, 2454, 69, 140, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], -Cell[245974, 7083, 209, 5, 36, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], Cell[CellGroupData[{ -Cell[246208, 7092, 215, 7, 61, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[246426, 7101, 100, 0, 41, "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[223908, 6069, 2049, 54, 232, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], +Cell[225960, 6125, 20375, 380, 295, "Output",ExpressionUUID->"bfc01f05-704f-4c67-9f82-fddd17b885ee"] }, Open ]], Cell[CellGroupData[{ -Cell[246563, 7106, 1814, 53, 116, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], -Cell[248380, 7161, 342, 6, 26, "Message",ExpressionUUID->"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], -Cell[248725, 7169, 342, 6, 26, "Message",ExpressionUUID->"05911c33-7605-8b49-a7ba-7fc8c8f30741"], -Cell[249070, 7177, 342, 6, 26, "Message",ExpressionUUID->"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], -Cell[249415, 7185, 407, 7, 26, "Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], -Cell[249825, 7194, 10062, 396, 232, 4186, 297, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"899e43aa-c372-6647-a3e4-4952f308ab17"], -Cell[259890, 7592, 191, 5, 41, "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-baecb9a57d9b"] +Cell[246372, 6510, 2113, 59, 311, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], +Cell[248488, 6571, 530, 12, 71, "Message",ExpressionUUID->"a0b89995-7932-454b-b827-282d5f669203"], +Cell[249021, 6585, 534, 12, 71, "Message",ExpressionUUID->"b33a119a-490d-4901-863f-38646b9f530f"], +Cell[249558, 6599, 538, 12, 71, "Message",ExpressionUUID->"7f81a65f-012e-437e-a40a-cfaf7e6acd20"], +Cell[250099, 6613, 488, 11, 32, "Message",ExpressionUUID->"425f4765-b7d1-4722-8cbb-4f6c310b541c"], +Cell[250590, 6626, 25577, 467, 292, "Output",ExpressionUUID->"2dd28a04-a7d5-4d87-bf34-942440f84752"] }, Open ]], Cell[CellGroupData[{ -Cell[260118, 7602, 1590, 47, 86, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], -Cell[261711, 7651, 342, 6, 26, "Message",ExpressionUUID->"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], -Cell[262056, 7659, 101, 0, 41, "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[276204, 7098, 2476, 69, 296, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], +Cell[278683, 7169, 9513, 222, 298, "Output",ExpressionUUID->"6874d945-9957-4f3f-b35c-396e0a93b435"] }, Open ]], Cell[CellGroupData[{ -Cell[262194, 7664, 2247, 64, 81, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], -Cell[264444, 7730, 342, 6, 26, "Message",ExpressionUUID->"56921c73-2b67-0e4a-9808-5f61de992c7e"], -Cell[264789, 7738, 342, 6, 26, "Message",ExpressionUUID->"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], -Cell[265134, 7746, 103, 0, 41, "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[288233, 7396, 228, 4, 36, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], +Cell[288464, 7402, 31961, 599, 292, "Output",ExpressionUUID->"f885b67c-da86-4a57-98b8-6c68f024ece1"] }, Open ]], Cell[CellGroupData[{ -Cell[265274, 7751, 2219, 64, 81, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], -Cell[267496, 7817, 342, 6, 26, "Message",ExpressionUUID->"1795c3b9-0182-224c-b986-6414d6712c04"], -Cell[267841, 7825, 342, 6, 26, "Message",ExpressionUUID->"c3b31753-a67f-9b45-b822-068e1df11f68"], -Cell[268186, 7833, 100, 0, 41, "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[320462, 8006, 234, 6, 61, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], +Cell[320699, 8014, 188, 2, 41, "Output",ExpressionUUID->"bb08d232-de5f-4b26-b56e-89d6790641d4"] }, Open ]], Cell[CellGroupData[{ -Cell[268323, 7838, 2221, 64, 81, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], -Cell[270547, 7904, 342, 6, 26, "Message",ExpressionUUID->"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], -Cell[270892, 7912, 342, 6, 26, "Message",ExpressionUUID->"4e2b22f2-1724-7649-93fc-33cd27bb415e"], -Cell[271237, 7920, 101, 0, 41, "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[320924, 8021, 1833, 52, 311, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], +Cell[322760, 8075, 537, 12, 71, "Message",ExpressionUUID->"6ba9c51e-a405-4f09-9237-20a79a6c5235"], +Cell[323300, 8089, 540, 12, 71, "Message",ExpressionUUID->"8adfeb87-125e-4ff0-82df-e12a81ac793c"], +Cell[323843, 8103, 544, 12, 71, "Message",ExpressionUUID->"bdfdc8eb-a2c5-47ab-ad34-b7c0e88c0738"], +Cell[324390, 8117, 486, 11, 32, "Message",ExpressionUUID->"925af749-bcc8-4ae8-bdb3-466734b339ce"], +Cell[324879, 8130, 26699, 485, 290, "Output",ExpressionUUID->"c71cd7d5-3d7f-4c55-b615-2d4298a4c240"] }, Open ]], Cell[CellGroupData[{ -Cell[271375, 7925, 215, 6, 60, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[271593, 7933, 104, 0, 41, "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[351615, 8620, 1616, 48, 132, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], +Cell[353234, 8670, 661, 14, 73, "Message",ExpressionUUID->"f983c0e8-c0af-46cc-9618-c35a9eb955d3"], +Cell[353898, 8686, 660, 14, 73, "Message",ExpressionUUID->"ca594224-71d0-4a37-b108-a6526082f2f9"], +Cell[354561, 8702, 661, 14, 73, "Message",ExpressionUUID->"a00420b6-0ba5-4d92-9355-c1637a089f7a"], +Cell[355225, 8718, 487, 11, 32, "Message",ExpressionUUID->"250201e5-cc90-40ea-b8a8-539a6b1a57a5"], +Cell[355715, 8731, 190, 3, 41, "Output",ExpressionUUID->"454336c4-08bf-4879-93ec-5c3e313d0eac"] }, Open ]], -Cell[271712, 7936, 247, 5, 36, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ -Cell[271984, 7945, 532, 18, 66, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[272519, 7965, 100, 0, 41, "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[355942, 8739, 2270, 64, 348, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], +Cell[358215, 8805, 661, 14, 73, "Message",ExpressionUUID->"6e7caf53-2ea3-4d6a-8f9c-9b36478afeb5"], +Cell[358879, 8821, 661, 14, 73, "Message",ExpressionUUID->"f6582a37-fdbc-402b-89c9-5262453f66c9"], +Cell[359543, 8837, 660, 14, 73, "Message",ExpressionUUID->"82b06813-496c-4b95-ba78-273c74065f05"], +Cell[360206, 8853, 490, 11, 32, "Message",ExpressionUUID->"6f7915ae-896b-44ef-9db4-5de6e50c55e4"], +Cell[360699, 8866, 194, 3, 41, "Output",ExpressionUUID->"59270142-d16a-4bc8-bab9-cd67742257b2"] }, Open ]], Cell[CellGroupData[{ -Cell[272656, 7970, 144, 4, 71, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[272803, 7976, 100, 0, 41, "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[360930, 8874, 2231, 63, 348, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], +Cell[363164, 8939, 660, 14, 73, "Message",ExpressionUUID->"863ede35-8302-4056-ac20-ece0d8eca872"], +Cell[363827, 8955, 658, 14, 73, "Message",ExpressionUUID->"520cd53d-b916-4a10-a590-8703521a7b71"], +Cell[364488, 8971, 657, 14, 73, "Message",ExpressionUUID->"9fddddb2-3c56-4d4f-909b-644249618d44"], +Cell[365148, 8987, 487, 11, 32, "Message",ExpressionUUID->"3831f1a7-f6b9-49a6-9929-6f8f51701471"], +Cell[365638, 9000, 193, 3, 41, "Output",ExpressionUUID->"c8892929-d005-43e5-94e7-5977a8b44af9"] }, Open ]], Cell[CellGroupData[{ -Cell[272940, 7981, 155, 4, 55, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[273098, 7987, 100, 0, 41, "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[365868, 9008, 2233, 63, 348, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], +Cell[368104, 9073, 659, 14, 73, "Message",ExpressionUUID->"ae3d33d8-15d6-4574-9edf-cf2b3722fbdd"], +Cell[368766, 9089, 659, 14, 73, "Message",ExpressionUUID->"acc22f74-1e9b-4c36-b10b-5494c75332a2"], +Cell[369428, 9105, 658, 14, 73, "Message",ExpressionUUID->"27bd2c55-e014-4ba9-adf6-aee8626209b9"], +Cell[370089, 9121, 486, 11, 32, "Message",ExpressionUUID->"0f7cebf8-bf24-4eee-9c4e-4418b5952ce6"], +Cell[370578, 9134, 195, 3, 41, "Output",ExpressionUUID->"c012e8fe-3092-4e90-9715-beffc0eda013"] }, Open ]], Cell[CellGroupData[{ -Cell[273235, 7992, 6029, 184, 431, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[279267, 8178, 102, 0, 41, "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[370810, 9142, 238, 6, 60, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], +Cell[371051, 9150, 194, 3, 41, "Output",ExpressionUUID->"af328f6d-0b04-441c-a64a-9ab41ec8e29a"] }, Open ]], +Cell[371260, 9156, 273, 6, 109, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ -Cell[279406, 8183, 342, 8, 53, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[279751, 8193, 342, 6, 26, "Message",ExpressionUUID->"def6b331-c871-b04d-a16e-4fc00b03d009"], -Cell[280096, 8201, 99, 0, 41, "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[371558, 9166, 558, 19, 66, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], +Cell[372119, 9187, 193, 3, 41, "Output",ExpressionUUID->"344f5297-dfe6-4de5-a974-66635873116b"] }, Open ]], Cell[CellGroupData[{ -Cell[280232, 8206, 6096, 186, 431, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[286331, 8394, 102, 0, 41, "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[372349, 9195, 170, 5, 71, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], +Cell[372522, 9202, 195, 3, 41, "Output",ExpressionUUID->"6c6f0097-e12a-43e8-92bc-a1a62562cce7"] }, Open ]], Cell[CellGroupData[{ -Cell[286470, 8399, 342, 8, 53, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[286815, 8409, 342, 6, 26, "Message",ExpressionUUID->"c6c8676e-4601-144e-b83c-769e22949175"], -Cell[287160, 8417, 100, 0, 41, "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[372754, 9210, 181, 5, 55, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], +Cell[372938, 9217, 193, 3, 41, "Output",ExpressionUUID->"105e672c-81ef-478e-b000-d824670daf3c"] }, Open ]], Cell[CellGroupData[{ -Cell[287297, 8422, 2637, 87, 215, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[289937, 8511, 101, 0, 41, "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[373168, 9225, 6055, 185, 831, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], +Cell[379226, 9412, 197, 3, 41, "Output",ExpressionUUID->"f69e7bde-e942-4135-9769-19d2481456f5"] }, Open ]], Cell[CellGroupData[{ -Cell[290075, 8516, 2577, 84, 215, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[292655, 8602, 102, 0, 41, "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[379460, 9420, 368, 9, 53, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], +Cell[379831, 9431, 192, 3, 41, "Output",ExpressionUUID->"f1f31d17-315b-4c10-9735-cf76e23cd693"] }, Open ]], Cell[CellGroupData[{ -Cell[292794, 8607, 3686, 117, 316, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[296483, 8726, 102, 0, 41, "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[380060, 9439, 6122, 187, 900, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], +Cell[386185, 9628, 194, 3, 41, "Output",ExpressionUUID->"5a9c3718-3231-4a8f-9c06-8cf0908e7fac"] }, Open ]], Cell[CellGroupData[{ -Cell[296622, 8731, 2052, 59, 116, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], -Cell[298677, 8792, 342, 6, 26, "Message",ExpressionUUID->"7fd60dea-f794-4744-8801-bfb1a50a0e07"], -Cell[299022, 8800, 342, 6, 26, "Message",ExpressionUUID->"0b8c0718-41d2-4542-8afe-212a15805650"], -Cell[299367, 8808, 101, 0, 41, "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[386416, 9636, 368, 9, 53, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], +Cell[386787, 9647, 193, 3, 41, "Output",ExpressionUUID->"72e90a74-6d0b-48fb-8a74-b1a17e752dea"] }, Open ]], Cell[CellGroupData[{ -Cell[299505, 8813, 2054, 59, 116, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], -Cell[301562, 8874, 342, 6, 26, "Message",ExpressionUUID->"b6f0ccc2-ff83-124b-a341-e143319c7670"], -Cell[301907, 8882, 342, 6, 26, "Message",ExpressionUUID->"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], -Cell[302252, 8890, 100, 0, 41, "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[387017, 9655, 2663, 88, 435, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], +Cell[389683, 9745, 195, 3, 41, "Output",ExpressionUUID->"5515bd2d-f046-4dde-b117-4aaa7e4aee5e"] }, Open ]], Cell[CellGroupData[{ -Cell[302389, 8895, 2030, 55, 63, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], -Cell[304422, 8952, 342, 6, 26, "Message",ExpressionUUID->"7797a546-4085-124a-83da-5f3c472cdc4c"], -Cell[304767, 8960, 342, 6, 26, "Message",ExpressionUUID->"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], -Cell[305112, 8968, 342, 6, 26, "Message",ExpressionUUID->"ca7472ca-7b27-a54a-84a1-e603fa592207"], -Cell[305457, 8976, 407, 7, 26, "Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], -Cell[305867, 8985, 9432, 438, 232, "Graphics",ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], -Cell[315302, 9425, 191, 5, 41, "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-49e8ffb5e8c8"] +Cell[389915, 9753, 2603, 85, 435, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], +Cell[392521, 9840, 193, 3, 41, "Output",ExpressionUUID->"6be742ae-3069-40b8-afb5-83b2c85b947a"] }, Open ]], Cell[CellGroupData[{ -Cell[315530, 9435, 2118, 60, 116, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], -Cell[317651, 9497, 342, 6, 26, "Message",ExpressionUUID->"b9265795-17b8-4e47-bd29-fee31586537e"], -Cell[317996, 9505, 342, 6, 26, "Message",ExpressionUUID->"072fb53f-7116-0f41-a298-6891351a3192"], -Cell[318341, 9513, 342, 6, 26, "Message",ExpressionUUID->"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], -Cell[318686, 9521, 407, 7, 26, "Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], -Cell[319096, 9530, 8546, 368, 232, "Graphics",ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], -Cell[327645, 9900, 191, 5, 41, "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-87bc9c72594a"] +Cell[392751, 9848, 3712, 118, 575, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], +Cell[396466, 9968, 197, 3, 41, "Output",ExpressionUUID->"7090061f-47e6-4a01-88ec-72c0634a3adf"] }, Open ]], -Cell[327851, 9908, 209, 5, 36, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], Cell[CellGroupData[{ -Cell[328085, 9917, 1590, 47, 86, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], -Cell[329678, 9966, 342, 6, 26, "Message",ExpressionUUID->"52cff8eb-0c77-c944-a54f-e282b00ce766"], -Cell[330023, 9974, 101, 0, 41, "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[396700, 9976, 2075, 59, 276, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], +Cell[398778, 10037, 658, 14, 73, "Message",ExpressionUUID->"16902a68-0980-4826-b3a3-34526b8408f1"], +Cell[399439, 10053, 660, 14, 73, "Message",ExpressionUUID->"9af80ce5-b5b7-442c-880b-cab0fc42f2d8"], +Cell[400102, 10069, 658, 14, 73, "Message",ExpressionUUID->"d4fc2278-2389-412b-869d-f5aada2934fc"], +Cell[400763, 10085, 486, 11, 32, "Message",ExpressionUUID->"e433a1f9-aa75-4405-b426-cfb5e83a1188"], +Cell[401252, 10098, 194, 3, 41, "Output",ExpressionUUID->"11cc68bf-9d50-4f7a-83d6-3f9fb9f49f64"] }, Open ]], Cell[CellGroupData[{ -Cell[330161, 9979, 2251, 64, 81, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], -Cell[332415, 10045, 342, 6, 26, "Message",ExpressionUUID->"cb5a1193-7562-6446-a279-d9f6295d156e"], -Cell[332760, 10053, 342, 6, 26, "Message",ExpressionUUID->"566b0ad4-7f4e-b04f-8294-646ce1913fac"], -Cell[333105, 10061, 101, 0, 41, "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[401483, 10106, 2077, 59, 276, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], +Cell[403563, 10167, 659, 14, 73, "Message",ExpressionUUID->"12d081bb-97a4-487b-99ca-6e2cc7ddda6d"], +Cell[404225, 10183, 657, 14, 73, "Message",ExpressionUUID->"9f00829b-8906-416e-b66d-52837b904e72"], +Cell[404885, 10199, 658, 14, 73, "Message",ExpressionUUID->"1506b0ee-423e-47b0-aaa9-0d8dbbc35dce"], +Cell[405546, 10215, 488, 11, 32, "Message",ExpressionUUID->"689a0354-c1e8-4cb7-9649-27b5b3923c36"], +Cell[406037, 10228, 193, 3, 41, "Output",ExpressionUUID->"1c755f9e-51f9-4501-b4e1-69135427789e"] }, Open ]], Cell[CellGroupData[{ -Cell[333243, 10066, 2220, 64, 81, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], -Cell[335466, 10132, 342, 6, 26, "Message",ExpressionUUID->"4cd45900-7eb0-6b4b-830a-a339e8117392"], -Cell[335811, 10140, 342, 6, 26, "Message",ExpressionUUID->"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], -Cell[336156, 10148, 101, 0, 41, "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[406267, 10236, 2053, 55, 232, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], +Cell[408323, 10293, 20313, 383, 301, "Output",ExpressionUUID->"8eaaded0-ec81-4a1e-a679-5faab93eaa40"] }, Open ]], Cell[CellGroupData[{ -Cell[336294, 10153, 2223, 64, 81, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], -Cell[338520, 10219, 342, 6, 26, "Message",ExpressionUUID->"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], -Cell[338865, 10227, 342, 6, 26, "Message",ExpressionUUID->"61220452-df6a-154e-8b5c-fecd0ab287a1"], -Cell[339210, 10235, 101, 0, 41, "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[428673, 10681, 2141, 60, 311, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], +Cell[430817, 10743, 508, 12, 71, "Message",ExpressionUUID->"6d1c91a2-f318-447c-aeb0-f19b4a473a9e"], +Cell[431328, 10757, 511, 12, 71, "Message",ExpressionUUID->"210bca43-d11a-470d-a838-52fad2e02e77"], +Cell[431842, 10771, 514, 12, 71, "Message",ExpressionUUID->"9d29e806-006c-4494-8c37-273abf682c3c"], +Cell[432359, 10785, 466, 11, 32, "Message",ExpressionUUID->"e1ccb057-397b-4cd1-a4da-355819458eef"], +Cell[432828, 10798, 26999, 492, 290, "Output",ExpressionUUID->"040ee5c7-cd64-4ec7-b85a-f31d6a698bf3"] }, Open ]], Cell[CellGroupData[{ -Cell[339348, 10240, 215, 6, 60, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[339566, 10248, 102, 0, 41, "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[459864, 11295, 232, 5, 36, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], +Cell[460099, 11302, 33385, 624, 290, "Output",ExpressionUUID->"ee677e56-9a83-4c76-8f8f-38087b4b9d3b"] }, Open ]], -Cell[339683, 10251, 247, 5, 36, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ -Cell[339955, 10260, 532, 18, 66, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[340490, 10280, 101, 0, 41, "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[493521, 11931, 1616, 48, 132, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], +Cell[495140, 11981, 639, 14, 73, "Message",ExpressionUUID->"268055db-f8d9-4f70-9949-6cf0f66b42c7"], +Cell[495782, 11997, 639, 14, 73, "Message",ExpressionUUID->"8d8bf8ff-632c-483b-b59a-162338ade2fb"], +Cell[496424, 12013, 638, 14, 73, "Message",ExpressionUUID->"ab283d05-642c-4575-936a-498ce254f87a"], +Cell[497065, 12029, 464, 11, 32, "Message",ExpressionUUID->"a827b9d3-4e36-4a3e-85ff-319c87490268"], +Cell[497532, 12042, 171, 3, 41, "Output",ExpressionUUID->"ee92eb61-9820-40f9-b5bc-8cbe8ccbb0cb"] }, Open ]], Cell[CellGroupData[{ -Cell[340628, 10285, 144, 4, 71, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[340775, 10291, 101, 0, 41, "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[497740, 12050, 2274, 64, 348, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], +Cell[500017, 12116, 639, 14, 73, "Message",ExpressionUUID->"84c2ec10-597a-4a35-90b8-5584309d78c8"], +Cell[500659, 12132, 636, 14, 73, "Message",ExpressionUUID->"7bb81f1c-78cc-434d-a5ff-4d2de3a109a0"], +Cell[501298, 12148, 638, 14, 73, "Message",ExpressionUUID->"5b68dabd-f40d-4da3-a98b-a28e14400880"], +Cell[501939, 12164, 464, 11, 32, "Message",ExpressionUUID->"fa73c0fc-e35a-42d2-82c1-6e23a1fdd90e"], +Cell[502406, 12177, 171, 3, 41, "Output",ExpressionUUID->"cc754de4-d9a3-4e6c-a2e5-a097c9861ce0"] }, Open ]], Cell[CellGroupData[{ -Cell[340913, 10296, 155, 4, 55, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[341071, 10302, 100, 0, 41, "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[502614, 12185, 2232, 63, 348, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], +Cell[504849, 12250, 637, 14, 73, "Message",ExpressionUUID->"388db72a-b8c4-46c1-bc06-80d55f55ca67"], +Cell[505489, 12266, 636, 14, 73, "Message",ExpressionUUID->"ec614ee1-be0d-45d1-95fc-c7fd574e9011"], +Cell[506128, 12282, 636, 14, 73, "Message",ExpressionUUID->"069d2f7b-494f-418b-916b-eb8cacefe7a4"], +Cell[506767, 12298, 464, 11, 32, "Message",ExpressionUUID->"9d05a896-a382-4646-b62f-fc45f2700248"], +Cell[507234, 12311, 169, 3, 41, "Output",ExpressionUUID->"5cf3b68c-48cc-4f4f-957b-82e2001b6dad"] }, Open ]], Cell[CellGroupData[{ -Cell[341208, 10307, 6029, 184, 431, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[347240, 10493, 102, 0, 41, "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[507440, 12319, 2235, 63, 348, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], +Cell[509678, 12384, 637, 14, 73, "Message",ExpressionUUID->"9a1b14d1-8d4f-4c3a-aeff-b6a5c7723328"], +Cell[510318, 12400, 636, 14, 73, "Message",ExpressionUUID->"18e75de5-7df5-46ef-be36-234b065b5bbc"], +Cell[510957, 12416, 638, 14, 73, "Message",ExpressionUUID->"7bd5e6ec-bf4e-4aea-a9a4-5ef8c0362c2c"], +Cell[511598, 12432, 464, 11, 32, "Message",ExpressionUUID->"6c1b0b5c-4617-417d-97ab-a267b0d5aa76"], +Cell[512065, 12445, 171, 3, 41, "Output",ExpressionUUID->"eb60e5dc-0542-4d18-9d86-53f6b3f3b89d"] }, Open ]], Cell[CellGroupData[{ -Cell[347379, 10498, 342, 8, 53, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[347724, 10508, 342, 6, 26, "Message",ExpressionUUID->"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], -Cell[348069, 10516, 100, 0, 41, "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[512273, 12453, 238, 6, 60, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], +Cell[512514, 12461, 171, 3, 41, "Output",ExpressionUUID->"83b280b2-1342-40ac-8881-fafc1d001257"] }, Open ]], +Cell[512700, 12467, 273, 6, 109, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ -Cell[348206, 10521, 6096, 186, 431, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[354305, 10709, 102, 0, 41, "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[512998, 12477, 558, 19, 66, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], +Cell[513559, 12498, 170, 3, 41, "Output",ExpressionUUID->"30e5fbd3-639a-4712-b7c8-e210489cb921"] }, Open ]], Cell[CellGroupData[{ -Cell[354444, 10714, 342, 8, 53, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[354789, 10724, 342, 6, 26, "Message",ExpressionUUID->"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], -Cell[355134, 10732, 99, 0, 41, "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[513766, 12506, 170, 5, 71, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], +Cell[513939, 12513, 173, 3, 41, "Output",ExpressionUUID->"17445e1f-5d43-4246-b190-2d03922de098"] }, Open ]], Cell[CellGroupData[{ -Cell[355270, 10737, 2637, 87, 215, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[357910, 10826, 101, 0, 41, "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[514149, 12521, 181, 5, 55, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], +Cell[514333, 12528, 170, 3, 41, "Output",ExpressionUUID->"e8dedaec-8670-4218-9610-7cd767fce141"] }, Open ]], Cell[CellGroupData[{ -Cell[358048, 10831, 2577, 84, 215, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[360628, 10917, 102, 0, 41, "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[514540, 12536, 6055, 185, 831, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], +Cell[520598, 12723, 173, 3, 41, "Output",ExpressionUUID->"9b7ca18a-c8cf-4d5d-9dd4-b40aeda356b2"] }, Open ]], Cell[CellGroupData[{ -Cell[360767, 10922, 3686, 117, 316, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[364456, 11041, 102, 0, 41, "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[520808, 12731, 368, 9, 53, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], +Cell[521179, 12742, 172, 3, 41, "Output",ExpressionUUID->"427b7c47-e309-4c82-8456-5ee7df0d79fd"] }, Open ]], Cell[CellGroupData[{ -Cell[364595, 11046, 2054, 59, 116, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], -Cell[366652, 11107, 342, 6, 26, "Message",ExpressionUUID->"b82c1933-5313-1d4c-a858-68be8f118333"], -Cell[366997, 11115, 342, 6, 26, "Message",ExpressionUUID->"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], -Cell[367342, 11123, 100, 0, 41, "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[521388, 12750, 6122, 187, 900, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], +Cell[527513, 12939, 171, 3, 41, "Output",ExpressionUUID->"550fa015-8560-45cb-a24a-6104a7e03a9b"] }, Open ]], Cell[CellGroupData[{ -Cell[367479, 11128, 2054, 59, 116, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], -Cell[369536, 11189, 342, 6, 26, "Message",ExpressionUUID->"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], -Cell[369881, 11197, 342, 6, 26, "Message",ExpressionUUID->"56712e4d-1aa7-524a-8254-bcfd8978eea0"], -Cell[370226, 11205, 100, 0, 41, "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[527721, 12947, 368, 9, 53, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], +Cell[528092, 12958, 173, 3, 41, "Output",ExpressionUUID->"4f870008-f2c3-4c2f-86da-f2401110a023"] }, Open ]], Cell[CellGroupData[{ -Cell[370363, 11210, 2030, 55, 63, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], -Cell[372396, 11267, 342, 6, 26, "Message",ExpressionUUID->"9c6ce535-b42f-3c43-a89e-eda48c04121e"], -Cell[372741, 11275, 342, 6, 26, "Message",ExpressionUUID->"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], -Cell[373086, 11283, 342, 6, 26, "Message",ExpressionUUID->"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], -Cell[373431, 11291, 407, 7, 26, "Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], -Cell[373841, 11300, 9432, 438, 232, "Graphics",ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], -Cell[383276, 11740, 191, 5, 41, "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-8b4ad9ffca61"] +Cell[528302, 12966, 2663, 88, 435, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], +Cell[530968, 13056, 172, 3, 41, "Output",ExpressionUUID->"61291e3a-719e-448d-9c34-a179ca931363"] }, Open ]], Cell[CellGroupData[{ -Cell[383504, 11750, 2143, 61, 116, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], -Cell[385650, 11813, 342, 6, 26, "Message",ExpressionUUID->"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], -Cell[385995, 11821, 342, 6, 26, "Message",ExpressionUUID->"71d4e039-c2b8-d74d-819a-80d2051e4273"], -Cell[386340, 11829, 342, 6, 26, "Message",ExpressionUUID->"63625e13-15ef-1f45-89dc-998a1b63a626"], -Cell[386685, 11837, 407, 7, 26, "Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], -Cell[387095, 11846, 8546, 368, 232, "Graphics",ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], -Cell[395644, 12216, 191, 5, 41, "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-1872f77ea023"] +Cell[531177, 13064, 2603, 85, 435, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], +Cell[533783, 13151, 171, 3, 41, "Output",ExpressionUUID->"35fa45a9-5987-4af8-916e-fe056de8827c"] }, Open ]], -Cell[395850, 12224, 138, 3, 36, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], Cell[CellGroupData[{ -Cell[396013, 12231, 1590, 47, 86, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], -Cell[397606, 12280, 342, 6, 26, "Message",ExpressionUUID->"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], -Cell[397951, 12288, 101, 0, 41, "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[533991, 13159, 3712, 118, 575, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], +Cell[537706, 13279, 175, 3, 41, "Output",ExpressionUUID->"69679ae9-a930-4f04-a547-f04f7ba67b11"] }, Open ]], Cell[CellGroupData[{ -Cell[398089, 12293, 2249, 64, 81, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], -Cell[400341, 12359, 342, 6, 26, "Message",ExpressionUUID->"905b237c-0e51-ab4b-895d-05994c6f1d5f"], -Cell[400686, 12367, 342, 6, 26, "Message",ExpressionUUID->"7ad8c79e-9570-a44d-b593-07aa87056e21"], -Cell[401031, 12375, 100, 0, 41, "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[537918, 13287, 2077, 59, 276, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], +Cell[539998, 13348, 638, 14, 73, "Message",ExpressionUUID->"9ca7db6f-da70-4346-87ea-f93bfe4b5528"], +Cell[540639, 13364, 638, 14, 73, "Message",ExpressionUUID->"3e59487e-ac58-44fc-8f73-22d371e744d9"], +Cell[541280, 13380, 637, 14, 73, "Message",ExpressionUUID->"cf226219-b41a-40ca-99b7-1b28bf9cad2f"], +Cell[541920, 13396, 464, 11, 32, "Message",ExpressionUUID->"f6958ec7-3ce2-4f35-83d3-e78cc71b4328"], +Cell[542387, 13409, 172, 3, 41, "Output",ExpressionUUID->"a6c9f531-302e-45f6-8708-3b7a57c0b31f"] }, Open ]], Cell[CellGroupData[{ -Cell[401168, 12380, 2219, 64, 81, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], -Cell[403390, 12446, 342, 6, 26, "Message",ExpressionUUID->"c516c31a-74b4-f24d-a16a-678221cde87e"], -Cell[403735, 12454, 342, 6, 26, "Message",ExpressionUUID->"5c50b555-9ebe-f94d-801f-34634555f622"], -Cell[404080, 12462, 99, 0, 41, "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[542596, 13417, 2077, 59, 276, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], +Cell[544676, 13478, 635, 14, 73, "Message",ExpressionUUID->"9b61f8fa-e2e6-4316-be56-816ca6822207"], +Cell[545314, 13494, 638, 14, 73, "Message",ExpressionUUID->"9d9f6130-7286-4cc6-b302-518317fbbb57"], +Cell[545955, 13510, 639, 14, 73, "Message",ExpressionUUID->"88b14862-3bab-4628-9ee0-3c35c93eb836"], +Cell[546597, 13526, 466, 11, 32, "Message",ExpressionUUID->"c6e49a69-9634-4cba-a738-8895fb77c43a"], +Cell[547066, 13539, 170, 3, 41, "Output",ExpressionUUID->"58a73424-f115-4ba8-aafd-fda4258d9198"] }, Open ]], Cell[CellGroupData[{ -Cell[404216, 12467, 2221, 64, 81, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], -Cell[406440, 12533, 342, 6, 26, "Message",ExpressionUUID->"7ca591cf-a5ce-ce41-8101-8edfca50e890"], -Cell[406785, 12541, 342, 6, 26, "Message",ExpressionUUID->"cbafd11a-4be0-b541-81e4-e62191ae7695"], -Cell[407130, 12549, 101, 0, 41, "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[547273, 13547, 2053, 55, 232, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], +Cell[549329, 13604, 20017, 377, 301, "Output",ExpressionUUID->"b56347af-f895-499d-85ec-4c70fed62b1d"] }, Open ]], Cell[CellGroupData[{ -Cell[407268, 12554, 215, 6, 60, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[407486, 12562, 102, 0, 41, "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[569383, 13986, 2165, 61, 311, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], +Cell[571551, 14049, 511, 12, 71, "Message",ExpressionUUID->"fc2ee7aa-3d25-43ef-8ce1-d4dd00196a66"], +Cell[572065, 14063, 515, 12, 71, "Message",ExpressionUUID->"e2140ce5-b567-4a87-9a16-a3c0aa40e321"], +Cell[572583, 14077, 520, 12, 71, "Message",ExpressionUUID->"c303cbea-4fa3-437a-8c34-ea1a83a56b63"], +Cell[573106, 14091, 464, 11, 32, "Message",ExpressionUUID->"89b3a977-b52d-4329-b728-013a18b440a8"], +Cell[573573, 14104, 25615, 468, 293, "Output",ExpressionUUID->"ac1a3e86-da91-4fbd-879f-6d5340634faa"] }, Open ]], -Cell[407603, 12565, 115, 1, 36, "Input",ExpressionUUID->"ce1d07fb-39ef-4a2d-a4ac-c7999ed96f34"] +Cell[CellGroupData[{ +Cell[599225, 14577, 164, 4, 36, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], +Cell[599392, 14583, 32001, 600, 293, "Output",ExpressionUUID->"3793c438-290c-4536-bfdb-cdd930730727"] +}, Open ]], +Cell[CellGroupData[{ +Cell[631430, 15188, 1616, 48, 132, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], +Cell[633049, 15238, 637, 14, 73, "Message",ExpressionUUID->"2df2050e-c0cc-4793-9463-ca3d67f1d933"], +Cell[633689, 15254, 636, 14, 73, "Message",ExpressionUUID->"7970c227-69b8-490b-9c13-dd4bfc390b92"], +Cell[634328, 15270, 637, 14, 73, "Message",ExpressionUUID->"ae343555-ce16-41c6-8f8f-bb1a7a5afe0c"], +Cell[634968, 15286, 463, 11, 32, "Message",ExpressionUUID->"b321b17f-fb0f-4c58-a817-4fd9eebd5771"], +Cell[635434, 15299, 170, 3, 41, "Output",ExpressionUUID->"bfee5baf-b3b4-49a3-af7e-fc6e66616291"] +}, Open ]], +Cell[CellGroupData[{ +Cell[635641, 15307, 2272, 64, 348, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], +Cell[637916, 15373, 636, 14, 73, "Message",ExpressionUUID->"0d356622-cf14-47ce-a96d-37d4d9d34ba7"], +Cell[638555, 15389, 636, 14, 73, "Message",ExpressionUUID->"7001374d-7912-4682-83c9-e5deb6107d09"], +Cell[639194, 15405, 637, 14, 73, "Message",ExpressionUUID->"c0f5647f-d969-4b81-b41d-3d823bebc8b1"], +Cell[639834, 15421, 464, 11, 32, "Message",ExpressionUUID->"8fa7bee0-3724-45b1-a13e-cf204340b9ef"], +Cell[640301, 15434, 173, 3, 41, "Output",ExpressionUUID->"f0b3089f-33b6-421f-9bc4-82aba3277d9b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[640511, 15442, 2231, 63, 348, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], +Cell[642745, 15507, 636, 14, 73, "Message",ExpressionUUID->"64f6dd3e-fdc3-4876-a897-9ecff7e92957"], +Cell[643384, 15523, 636, 14, 73, "Message",ExpressionUUID->"62b9bf2d-ee02-46fc-aa04-79cb5a6f082b"], +Cell[644023, 15539, 637, 14, 73, "Message",ExpressionUUID->"2b99b11d-a175-4087-9ddf-12daac9b64e6"], +Cell[644663, 15555, 462, 11, 32, "Message",ExpressionUUID->"2092cca1-b941-4b0c-a5d9-280e095651f1"], +Cell[645128, 15568, 170, 3, 41, "Output",ExpressionUUID->"0487e5ce-5e64-4bc3-a934-bd6244969d94"] +}, Open ]], +Cell[CellGroupData[{ +Cell[645335, 15576, 2233, 63, 348, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], +Cell[647571, 15641, 635, 14, 73, "Message",ExpressionUUID->"32441a8b-f8e1-4e32-9327-bdb9598da830"], +Cell[648209, 15657, 636, 14, 73, "Message",ExpressionUUID->"c9fc7494-ec23-4f57-ab8f-12edd194ceb5"], +Cell[648848, 15673, 639, 14, 73, "Message",ExpressionUUID->"a7dafba5-b685-4676-b3df-1bbb25dad182"], +Cell[649490, 15689, 464, 11, 32, "Message",ExpressionUUID->"244d8a58-eed2-4519-9cde-44852c19502d"], +Cell[649957, 15702, 173, 3, 41, "Output",ExpressionUUID->"c6e2743b-e20d-4f6c-9148-989b1eb54a6e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[650167, 15710, 238, 6, 60, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], +Cell[650408, 15718, 172, 3, 41, "Output",ExpressionUUID->"cf1163fe-f159-4341-bcd2-b178ea86a66f"] +}, Open ]], +Cell[650595, 15724, 143, 3, 109, "Input",ExpressionUUID->"ce1d07fb-39ef-4a2d-a4ac-c7999ed96f34"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw1.nb b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw1.nb index a29d924..c2f303f 100644 --- a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw1.nb +++ b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 584506, 14573] -NotebookOptionsPosition[ 542162, 13900] -NotebookOutlinePosition[ 542596, 13918] -CellTagsIndexPosition[ 542553, 13915] +NotebookDataLength[ 693978, 16675] +NotebookOptionsPosition[ 651033, 15986] +NotebookOutlinePosition[ 651496, 16005] +CellTagsIndexPosition[ 651453, 16002] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,16 +26,14 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.9940735873936653`*^9, 3.9940735896443777`*^9}, { 3.994075218023417*^9, 3.994075221411705*^9}}, - CellLabel-> - "In[106]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], + CellLabel->"In[1]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], Cell[BoxData["1.9`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.9940735644974327`*^9, 3.994073590895896*^9}, { 3.994075171996416*^9, 3.994075180507247*^9}, {3.994075219377726*^9, - 3.9940752234153214`*^9}}, - CellLabel-> - "Out[106]=",ExpressionUUID->"3fc602ac-3528-4c94-84c5-2cbef5e80e13"] + 3.9940752234153214`*^9}, 3.994349735823183*^9, 3.9943526558032303`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"0211607a-6fe5-4115-a2d3-585fd7c353aa"] }, Open ]], Cell[CellGroupData[{ @@ -44,15 +42,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940732811688833`*^9, 3.994073289502289*^9}}, - CellLabel-> - "In[107]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], + CellLabel->"In[2]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.994073564560362*^9, 3.994073590977919*^9}, - 3.994075180702458*^9, 3.9940752234546824`*^9}, - CellLabel-> - "Out[107]=",ExpressionUUID->"4f849138-67dc-4f8f-a590-302d10dd42f8"] + 3.994075180702458*^9, 3.9940752234546824`*^9, 3.99434973624305*^9, + 3.9943526559241*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"f5dc4be6-7844-4e18-ad5e-9f27bc0b00cb"] }, Open ]], Cell[CellGroupData[{ @@ -61,15 +58,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "168"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073284506165*^9, 3.994073287626708*^9}}, - CellLabel-> - "In[108]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], + CellLabel->"In[3]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], Cell[BoxData["168"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994073564571506*^9, 3.994073590992278*^9}, - 3.994075180712758*^9, 3.9940752234670067`*^9}, - CellLabel-> - "Out[108]=",ExpressionUUID->"3cd98634-bc13-4797-bd1e-44036ef78eae"] + 3.994075180712758*^9, 3.9940752234670067`*^9, 3.994349736257813*^9, + 3.99435265594011*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"d93f69d2-7ead-4b0d-9f89-46ed8b16470c"] }, Open ]], Cell[CellGroupData[{ @@ -77,15 +73,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[109]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], + CellLabel->"In[4]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.994073564582589*^9, 3.994073590996417*^9}, - 3.994075180723978*^9, 3.994075223478387*^9}, - CellLabel-> - "Out[109]=",ExpressionUUID->"2ed4a14c-942a-49b9-97cf-650a63a78bd7"] + 3.994075180723978*^9, 3.994075223478387*^9, 3.994349736269946*^9, + 3.99435266118834*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"ec066b6a-8b6f-4bac-ab08-f551cfb1ef9b"] }, Open ]], Cell[CellGroupData[{ @@ -97,30 +92,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[110]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], + CellLabel->"In[5]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], Cell[BoxData["0.544`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.994073564593708*^9, 3.994073591015129*^9}, - 3.994075180735317*^9, 3.994075223489546*^9}, - CellLabel-> - "Out[110]=",ExpressionUUID->"7339c118-72c2-44a2-9f22-c2b2b05f227c"] + 3.994075180735317*^9, 3.994075223489546*^9, 3.99434973628402*^9, + 3.99435266163925*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"a8ee3c45-707c-4dfc-9daf-8aa504e3ab26"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[111]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], + CellLabel->"In[6]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.994073564604851*^9, 3.9940735910271397`*^9}, - 3.9940751807454844`*^9, 3.994075223493987*^9}, - CellLabel-> - "Out[111]=",ExpressionUUID->"28f1d5a1-0e10-4e5e-b143-6cff63710154"] + 3.9940751807454844`*^9, 3.994075223493987*^9, 3.994349736296898*^9, + 3.9943526616602993`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"be481da4-1f19-472f-9412-b87e1674ef1d"] }, Open ]], Cell[CellGroupData[{ @@ -131,15 +124,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[112]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], + CellLabel->"In[7]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], Cell[BoxData["6.400704089204199`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.9940735646161203`*^9, 3.9940735910381737`*^9}, - 3.99407518075636*^9, 3.9940752235073977`*^9}, - CellLabel-> - "Out[112]=",ExpressionUUID->"5761785b-e83b-4033-87d8-d639fb22d04e"] + 3.99407518075636*^9, 3.9940752235073977`*^9, 3.9943497363077183`*^9, + 3.9943526616821337`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"4d135054-57b0-4c87-86e0-b0e4e8e0403a"] }, Open ]], Cell[CellGroupData[{ @@ -151,15 +143,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[113]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], + CellLabel->"In[8]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], Cell[BoxData["4.825794469480417`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.994073564627458*^9, 3.9940735910486517`*^9}, - 3.994075180767749*^9, 3.9940752235185337`*^9}, - CellLabel-> - "Out[113]=",ExpressionUUID->"d081c0b4-e157-44f9-995c-e4b29a26d538"] + 3.994075180767749*^9, 3.9940752235185337`*^9, 3.9943497363189487`*^9, + 3.994352661704134*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"ed073459-ed50-471d-a390-8cc08bd0d7c5"] }, Open ]], Cell[CellGroupData[{ @@ -167,14 +158,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8877902834"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073298855084*^9}, - CellLabel-> - "In[114]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], + CellLabel->"In[9]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], Cell[BoxData["0.8877902834`"], "Output", CellChangeTimes->{{3.99407356463848*^9, 3.994073591058733*^9}, - 3.994075180779163*^9, 3.994075223529882*^9}, - CellLabel-> - "Out[114]=",ExpressionUUID->"9a9d3de4-8d49-4ce6-b09a-f943956af81a"] + 3.994075180779163*^9, 3.994075223529882*^9, 3.994349736330119*^9, + 3.994352661724884*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"87a85976-6a8d-46f0-97e8-e2b026e8a39b"] }, Open ]], Cell[CellGroupData[{ @@ -182,44 +172,41 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3862529089"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.994073304321521*^9}, - CellLabel-> - "In[115]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], + CellLabel->"In[10]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], Cell[BoxData["0.3862529089`"], "Output", CellChangeTimes->{{3.9940735646497602`*^9, 3.994073591068905*^9}, - 3.994075180790642*^9, 3.994075223541339*^9}, - CellLabel-> - "Out[115]=",ExpressionUUID->"4298dfcb-9ee1-4f34-b816-bac4ec6dc561"] + 3.994075180790642*^9, 3.994075223541339*^9, 3.994349736339905*^9, + 3.9943526617482557`*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"2d9d12b9-3a76-4737-b38e-22b298cd2982"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[116]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], + CellLabel->"In[11]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.994073564660372*^9, 3.994073591079844*^9}, - 3.9940751808023157`*^9, 3.99407522355291*^9}, - CellLabel-> - "Out[116]=",ExpressionUUID->"d9184f92-9bb2-4c4b-9db1-4e3bb144d8f8"] + 3.9940751808023157`*^9, 3.99407522355291*^9, 3.994349736349914*^9, + 3.994352661772635*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"6e41356c-3a4c-42ba-be95-634a1b8e3fe8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[117]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], + CellLabel->"In[12]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.994073564670796*^9, 3.994073591090024*^9}, - 3.994075180813775*^9, 3.994075223564582*^9}, - CellLabel-> - "Out[117]=",ExpressionUUID->"5ac4bc3d-c931-4057-ac88-d6789946171a"] + 3.994075180813775*^9, 3.994075223564582*^9, 3.9943497363592253`*^9, + 3.9943526617975597`*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"2b7ee59a-035c-4879-a2b3-48468d018211"] }, Open ]], Cell[CellGroupData[{ @@ -243,15 +230,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[118]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], + CellLabel->"In[13]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.9940735646817017`*^9, 3.994073591101307*^9}, - 3.9940751808204927`*^9, 3.99407522357547*^9}, - CellLabel-> - "Out[118]=",ExpressionUUID->"9b91c36a-db9d-42da-b92b-c7b40571889f"] + 3.9940751808204927`*^9, 3.99407522357547*^9, 3.9943497363755302`*^9, + 3.994352661820589*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"647e1c27-db39-48b6-acfa-40fc717fef8d"] }, Open ]], Cell[CellGroupData[{ @@ -275,15 +261,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[119]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], + CellLabel->"In[14]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.9940735646923637`*^9, 3.994073591111409*^9}, - 3.994075180833333*^9, 3.99407522358539*^9}, - CellLabel-> - "Out[119]=",ExpressionUUID->"507e61f7-abca-4b67-8dc5-3d5ec9783365"] + 3.994075180833333*^9, 3.99407522358539*^9, 3.994349736386941*^9, + 3.9943526618421593`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"eb3dc632-c1de-4c8d-9924-01f47e101b50"] }, Open ]], Cell[CellGroupData[{ @@ -338,15 +323,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[120]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], + CellLabel->"In[15]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994073564703178*^9, 3.99407359112132*^9}, - 3.994075180844792*^9, 3.994075223596579*^9}, - CellLabel-> - "Out[120]=",ExpressionUUID->"291a5445-9c07-4345-8353-f120ed249482"] + 3.994075180844792*^9, 3.994075223596579*^9, 3.994349736399988*^9, + 3.9943526618712397`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"82ba81ad-e0d2-48ac-84c3-de5d833b0dac"] }, Open ]], Cell[CellGroupData[{ @@ -397,16 +381,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[121]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], + CellLabel->"In[16]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.994073564714039*^9, 3.994073591132222*^9}, - 3.994075180888361*^9, 3.994075223608573*^9}, - CellLabel-> - "Out[121]=",ExpressionUUID->"5b05c19a-5a42-434f-b92a-b1f47e2f4e8f"] + 3.994075180888361*^9, 3.994075223608573*^9, 3.99434973641114*^9, + 3.994352661897851*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"ca616573-cf24-4f57-9fa3-09aa97025541"] }, Open ]], Cell[CellGroupData[{ @@ -457,16 +440,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[122]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], + CellLabel->"In[17]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.9940735647250757`*^9, 3.994073591143152*^9}, - 3.994075180901285*^9, 3.994075223621201*^9}, - CellLabel-> - "Out[122]=",ExpressionUUID->"60602193-828e-4b81-87ed-b00b2b05b82f"] + 3.994075180901285*^9, 3.994075223621201*^9, 3.994349736424012*^9, + 3.994352661923766*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"0e80cb92-e21e-4027-813f-1bd67441e5c7"] }, Open ]], Cell[CellGroupData[{ @@ -521,60 +503,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[123]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], + CellLabel->"In[18]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994073564736117*^9, 3.994073591154641*^9}, - 3.9940751809127274`*^9, 3.994075223631315*^9}, - CellLabel-> - "Out[123]=",ExpressionUUID->"e6bca617-3902-4eca-8236-6d0027a75f4e"] + 3.9940751809127274`*^9, 3.994075223631315*^9, 3.994349736432309*^9, + 3.994352661937969*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"caa863d1-2656-4d6a-8606-adec8c9b58fb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[124]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], + CellLabel->"In[19]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.994073564745685*^9, 3.9940735911671133`*^9}, - 3.9940751809237967`*^9, 3.994075223641436*^9}, - CellLabel-> - "Out[124]=",ExpressionUUID->"3e8c5d25-0de1-4e74-b9dd-68362990eebb"] + 3.9940751809237967`*^9, 3.994075223641436*^9, 3.994349736444549*^9, + 3.9943526619508743`*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"789f7836-f634-40da-ab4a-7f302eb4eb78"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[125]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], + CellLabel->"In[20]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994073564755136*^9, 3.994073591178863*^9}, - 3.9940751809343033`*^9, 3.9940752236530647`*^9}, - CellLabel-> - "Out[125]=",ExpressionUUID->"cd3a6b77-4e62-43ff-b252-05f31a46f5cb"] + 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.99434973645578*^9, + 3.994352661965773*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"debdb4eb-0834-4a56-a883-363921fd08ff"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[126]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], + CellLabel->"In[21]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940735647648563`*^9, 3.994073591190179*^9}, - 3.9940751809451323`*^9, 3.994075223664682*^9}, - CellLabel-> - "Out[126]=",ExpressionUUID->"dcaf9709-20b7-4905-9536-0b209c2add16"] + 3.9940751809451323`*^9, 3.994075223664682*^9, 3.9943497364667673`*^9, + 3.994352661981456*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"808f1f6d-fed3-4d81-bc9c-ae84f042b28a"] }, Open ]], Cell[CellGroupData[{ @@ -583,31 +561,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[127]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], + CellLabel->"In[22]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.994073564774688*^9, 3.994073591201717*^9}, - 3.994075180956657*^9, 3.994075223675436*^9}, - CellLabel-> - "Out[127]=",ExpressionUUID->"a2f17eea-ff78-41e5-a0f8-94c185156e70"] + 3.994075180956657*^9, 3.994075223675436*^9, 3.994349736478504*^9, + 3.9943526619994383`*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"121a8111-f810-4833-8d04-7f9069b659e2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[128]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], + CellLabel->"In[23]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994073564784115*^9, 3.994073591213622*^9}, - 3.9940751809686193`*^9, 3.9940752236862583`*^9}, - CellLabel-> - "Out[128]=",ExpressionUUID->"20afb8c7-cabc-4a1d-bac4-8a4c5fc59dc3"] + 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.994349736490322*^9, + 3.994352662015126*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"a1b3f4ba-24ff-4707-bef3-54693baa8c8b"] }, Open ]], Cell[CellGroupData[{ @@ -617,15 +593,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073317560268*^9, 3.994073317727027*^9}}, - CellLabel-> - "In[129]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], + CellLabel->"In[24]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.994073564793541*^9, 3.994073591224018*^9}, - 3.994075180980678*^9, 3.994075223697234*^9}, - CellLabel-> - "Out[129]=",ExpressionUUID->"124c5170-d79c-46db-8f5c-077b8f0967e5"] + 3.994075180980678*^9, 3.994075223697234*^9, 3.994349736501033*^9, + 3.994352662031003*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"706e89c6-677d-46a4-9fc5-2e46791600f8"] }, Open ]], Cell[CellGroupData[{ @@ -635,15 +610,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.9940733207460938`*^9, 3.994073320804184*^9}}, - CellLabel-> - "In[130]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], + CellLabel->"In[25]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.9940735648031883`*^9, 3.9940735912353287`*^9}, - 3.9940751809920683`*^9, 3.994075223707429*^9}, - CellLabel-> - "Out[130]=",ExpressionUUID->"fca7c3f2-dd09-401a-af5a-7f0e5b5e9132"] + 3.9940751809920683`*^9, 3.994075223707429*^9, 3.994349736513172*^9, + 3.994352662047166*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"46e0c0e5-cd3e-4ebd-9210-a395ddbcdd0f"] }, Open ]], Cell[CellGroupData[{ @@ -652,15 +626,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[131]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], + CellLabel->"In[26]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], Cell[BoxData["72"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.99407356481284*^9, 3.994073591246372*^9}, - 3.994075181003516*^9, 3.994075223717374*^9}, - CellLabel-> - "Out[131]=",ExpressionUUID->"d9b69473-2971-460e-a714-eae49ac84666"] + 3.994075181003516*^9, 3.994075223717374*^9, 3.994349736525394*^9, + 3.994352662060972*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"6f3ab082-c2cf-4e53-a1aa-558fb050e63d"] }, Open ]], Cell[CellGroupData[{ @@ -675,15 +648,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[132]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], + CellLabel->"In[27]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], Cell[BoxData["0.10999999999999999`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994073564822513*^9, 3.9940735912565413`*^9}, - 3.994075181014969*^9, 3.994075223727599*^9}, - CellLabel-> - "Out[132]=",ExpressionUUID->"00c63b3f-dab3-49c9-922a-1e7d3688cfb1"] + 3.994075181014969*^9, 3.994075223727599*^9, 3.994349736539453*^9, + 3.99435266207574*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"04659478-ee3a-4379-b318-999c8cb10e71"] }, Open ]], Cell[CellGroupData[{ @@ -698,16 +670,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[133]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], + CellLabel->"In[28]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], Cell[BoxData[ RowBox[{"-", "2.564285714285714`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994073564832857*^9, 3.994073591267404*^9}, - 3.9940751810260887`*^9, 3.9940752237376823`*^9}, - CellLabel-> - "Out[133]=",ExpressionUUID->"f2128c71-5723-4e55-89de-f77cd15b4fe5"] + 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.9943497365528803`*^9, + 3.994352662089963*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"33826626-ec6a-4d7e-a374-912494ee9c8a"] }, Open ]], Cell[CellGroupData[{ @@ -738,15 +709,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[134]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], + CellLabel->"In[29]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], Cell[BoxData["17.427928477019236`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994073564842832*^9, 3.9940735912778807`*^9}, - 3.9940751810379477`*^9, 3.994075223748026*^9}, - CellLabel-> - "Out[134]=",ExpressionUUID->"f4e19122-13ac-414b-a7a7-f55a8e585c1c"] + 3.9940751810379477`*^9, 3.994075223748026*^9, 3.994349736565199*^9, + 3.994352662109048*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"d4613267-dc7a-43a7-b268-6484d95e2a01"] }, Open ]], Cell[CellGroupData[{ @@ -754,15 +724,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[135]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], + CellLabel->"In[30]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.994073564851839*^9, 3.994073591288074*^9}, - 3.99407518104945*^9, 3.994075223758711*^9}, - CellLabel-> - "Out[135]=",ExpressionUUID->"786707a3-5ae1-4f3f-9e44-ba1a667edd9a"] + 3.99407518104945*^9, 3.994075223758711*^9, 3.994349736575837*^9, + 3.994352662122096*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"dfbc06e8-d6fe-4518-b2df-81c71de6c032"] }, Open ]], Cell[CellGroupData[{ @@ -772,20 +741,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994073341190873*^9, 3.994073342038845*^9}}, - CellLabel-> - "In[136]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], + CellLabel->"In[31]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], Cell[BoxData["2.155`"], "Output", CellChangeTimes->{{3.994073564860754*^9, 3.994073591298296*^9}, - 3.994075181060684*^9, 3.994075223775366*^9}, - CellLabel-> - "Out[136]=",ExpressionUUID->"24e5bd3c-736c-4608-8299-b5f235e43e65"] + 3.994075181060684*^9, 3.994075223775366*^9, 3.994349736586206*^9, + 3.994352662135592*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"02e8d446-028e-4e34-9c8e-f31e8a29957a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[137]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], + CellLabel->"In[32]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ @@ -794,20 +761,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073344618413*^9, 3.994073345759185*^9}}, - CellLabel-> - "In[138]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], + CellLabel->"In[33]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], Cell[BoxData["0.755`"], "Output", CellChangeTimes->{{3.994073564877489*^9, 3.994073591311125*^9}, - 3.9940751810754833`*^9, 3.9940752237900457`*^9}, - CellLabel-> - "Out[138]=",ExpressionUUID->"58b53ca7-159f-4d71-8f37-af3258d4d69e"] + 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.99434973660198*^9, + 3.994352662157655*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"ece8b04c-0dde-4ed5-9804-b15344f7911d"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[139]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], + CellLabel->"In[34]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ @@ -816,20 +781,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940733478949413`*^9, 3.994073348567162*^9}}, - CellLabel-> - "In[140]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], + CellLabel->"In[35]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], Cell[BoxData["2.62`"], "Output", CellChangeTimes->{{3.994073564894133*^9, 3.9940735913232403`*^9}, - 3.994075181088438*^9, 3.994075223803163*^9}, - CellLabel-> - "Out[140]=",ExpressionUUID->"f73fb9ad-0086-4816-a9b4-52f06c0e52cf"] + 3.994075181088438*^9, 3.994075223803163*^9, 3.994349736617989*^9, + 3.9943526621795187`*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"31a1aad9-690f-4656-b58b-c58448f335d7"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[141]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], + CellLabel->"In[36]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ @@ -838,20 +801,18 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.99407335112987*^9, 3.9940733523562517`*^9}}, - CellLabel-> - "In[142]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], + CellLabel->"In[37]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], Cell[BoxData["1.135`"], "Output", CellChangeTimes->{{3.994073564911627*^9, 3.994073591335389*^9}, - 3.994075181101487*^9, 3.994075223815889*^9}, - CellLabel-> - "Out[142]=",ExpressionUUID->"3541afd6-40de-41d5-bbb1-c1fb477483ed"] + 3.994075181101487*^9, 3.994075223815889*^9, 3.994349736636135*^9, + 3.994352662204208*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"da59bbac-ce3d-47f0-acb5-85c7d441ccce"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[143]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], + CellLabel->"In[38]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ @@ -860,20 +821,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994073355091783*^9, 3.994073355935183*^9}}, - CellLabel-> - "In[144]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], + CellLabel->"In[39]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], Cell[BoxData["1.025`"], "Output", CellChangeTimes->{{3.994073564928769*^9, 3.9940735913488693`*^9}, - 3.994075181114448*^9, 3.994075223832756*^9}, - CellLabel-> - "Out[144]=",ExpressionUUID->"ffccf229-8842-4c96-ab81-eea6ca750c9c"] + 3.994075181114448*^9, 3.994075223832756*^9, 3.99434973665236*^9, + 3.994352662251603*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"4958b489-978a-48a4-bc64-651475583339"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[145]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], + CellLabel->"In[40]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ @@ -882,20 +841,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994073359153013*^9, 3.9940733600822906`*^9}}, - CellLabel-> - "In[146]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], + CellLabel->"In[41]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], Cell[BoxData["0.575`"], "Output", CellChangeTimes->{{3.994073564946273*^9, 3.99407359136164*^9}, - 3.9940751811274652`*^9, 3.9940752238459263`*^9}, - CellLabel-> - "Out[146]=",ExpressionUUID->"84bc00a8-b4db-4f18-869f-1dc6f274f90a"] + 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994349736668646*^9, + 3.9943526622940073`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"2344b4ad-9c8e-49df-9531-87fade6278c5"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[147]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], + CellLabel->"In[42]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ @@ -904,20 +861,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, 3.994073366138835*^9, { 3.994073396938322*^9, 3.994073398601803*^9}}, - CellLabel-> - "In[148]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], + CellLabel->"In[43]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], Cell[BoxData["1.44`"], "Output", CellChangeTimes->{{3.994073564964167*^9, 3.9940735913757553`*^9}, - 3.9940751811406727`*^9, 3.9940752238589993`*^9}, - CellLabel-> - "Out[148]=",ExpressionUUID->"afae8fea-407d-479f-bc74-13b51d067251"] + 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.9943497366863613`*^9, + 3.994352662315884*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"fb28d662-9bce-4a7c-95d2-647993ba634e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[149]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], + CellLabel->"In[44]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ @@ -925,20 +880,18 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.645"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.9940734006045856`*^9, 3.99407340214142*^9}}, - CellLabel-> - "In[150]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], + CellLabel->"In[45]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], Cell[BoxData["0.645`"], "Output", CellChangeTimes->{{3.9940735649821672`*^9, 3.994073591389337*^9}, - 3.994075181153781*^9, 3.994075223871763*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"4561d0db-e274-4df4-af17-d05cbed75663"] + 3.994075181153781*^9, 3.994075223871763*^9, 3.9943497367039557`*^9, + 3.9943526623371487`*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"cccc3751-1187-406d-a282-e6ac65bc3eaa"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[151]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], + CellLabel->"In[46]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ @@ -1113,14 +1066,18 @@ Cell[BoxData[ RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", RowBox[{"Cos", "[", RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -1427,15 +1384,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[152]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], + CellLabel->"In[47]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], Cell[BoxData["0.1377756020325425`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.9940735650538073`*^9, 3.99407359143029*^9}, - 3.994075181231205*^9, 3.9940752239087954`*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"a0b6eb77-7a40-4149-8996-69298baaa115"] + 3.994075181231205*^9, 3.9940752239087954`*^9, 3.994349736839682*^9, + 3.994352662563881*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"c370d58d-da13-4477-93ad-80a86d846a04"] }, Open ]], Cell[CellGroupData[{ @@ -1463,14 +1419,18 @@ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "4"}], "\[Pi]", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -1929,15 +1889,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[153]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], + CellLabel->"In[48]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], Cell[BoxData["7.524926889811008`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.99407356508613*^9, 3.994073591458125*^9}, - 3.994075181264968*^9, 3.994075223937818*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"a3d1a840-0b00-4050-9772-7b0edc7352af"] + 3.994075181264968*^9, 3.994075223937818*^9, 3.994349736943919*^9, + 3.99435266275591*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"e2308fe8-701e-42b6-b0be-3a0db3243b1e"] }, Open ]], Cell[CellGroupData[{ @@ -1965,14 +1924,18 @@ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "4"}], "\[Pi]", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -2189,14 +2152,18 @@ Cell[BoxData[ RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", RowBox[{"Cos", "[", RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -2425,16 +2392,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[154]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], + CellLabel->"In[49]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], Cell[BoxData[ RowBox[{"-", "14.084113046357718`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994073565118821*^9, 3.994073591484323*^9}, - 3.994075181298151*^9, 3.9940752239647293`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"12933a3f-52b7-4098-aa18-656cd2cc71ec"] + 3.994075181298151*^9, 3.9940752239647293`*^9, 3.994349737009143*^9, + 3.994352662845162*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"3d5ade7e-df55-4551-a2ec-9f6213a06306"] }, Open ]], Cell[CellGroupData[{ @@ -2462,14 +2428,18 @@ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "4"}], "\[Pi]", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -2686,14 +2656,18 @@ Cell[BoxData[ RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", RowBox[{"Cos", "[", RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -2992,16 +2966,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], + CellLabel->"In[50]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], Cell[BoxData[ RowBox[{"-", "18.31263149263108`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.9940735651553993`*^9, 3.994073591515855*^9}, - 3.9940751813370543`*^9, 3.994075223996374*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"0c25fe6b-f86a-4093-b345-52a763c8e9c0"] + 3.9940751813370543`*^9, 3.994075223996374*^9, 3.994349737088749*^9, + 3.994352662956462*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"20a7f23e-60ad-44ad-b851-23315a688a93"] }, Open ]], Cell[CellGroupData[{ @@ -3029,14 +3002,18 @@ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "4"}], "\[Pi]", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -3326,14 +3303,18 @@ Cell[BoxData[ RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", RowBox[{"Cos", "[", RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -3559,16 +3540,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], + CellLabel->"In[51]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], Cell[BoxData[ RowBox[{"-", "53.236632839784775`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.994073565191607*^9, 3.9940735915482073`*^9}, - 3.9940751813752813`*^9, 3.994075224029221*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"8a2bdd3e-5197-4470-852a-259650b2ba2b"] + 3.9940751813752813`*^9, 3.994075224029221*^9, 3.994349737170388*^9, + 3.9943526630682573`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"d4cf8660-80e6-42be-945f-a676f35c3c6f"] }, Open ]], Cell[CellGroupData[{ @@ -3596,14 +3576,18 @@ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"-", "4"}], "\[Pi]", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -3893,14 +3877,18 @@ Cell[BoxData[ RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", RowBox[{"Cos", "[", RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", - FractionBox[ + RowBox[{"(", RowBox[{ - SqrtBox[ - RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", - "p0"}], - RowBox[{"r", "*", - RowBox[{"Sinh", "[", - RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], ")"}], "/", + RowBox[{"(", + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], ")"}]}], + ")"}], "*", RowBox[{"(", RowBox[{ RowBox[{ @@ -4199,46 +4187,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], + CellLabel->"In[52]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], Cell[BoxData[ RowBox[{"-", "137.72173412227852`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.9940735652337313`*^9, 3.9940735915861683`*^9}, - 3.9940751814204807`*^9, 3.99407522406466*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"667240dd-2ffb-4aab-953f-74203839a2e1"] + 3.9940751814204807`*^9, 3.99407522406466*^9, 3.9943497372692842`*^9, + 3.99435266320109*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"abeeb80f-1d80-465c-9c75-54345b619d3e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], + CellLabel->"In[53]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994073565247233*^9, 3.99407359159737*^9}, - 3.994075181435895*^9, 3.9940752240755796`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"0febcc1d-bcb8-46cb-8034-9f3685156a5a"] + 3.994075181435895*^9, 3.9940752240755796`*^9, 3.99434973729241*^9, + 3.9943526632230387`*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"98a39736-d1cb-4d05-a72b-3a56acb462dd"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], + CellLabel->"In[54]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994073565259305*^9, 3.994073591607201*^9}, - 3.9940751814462433`*^9, 3.994075224085256*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"1ef2b21c-2c62-42da-bdf7-e8a8ac672482"] + 3.9940751814462433`*^9, 3.994075224085256*^9, 3.994349737309042*^9, + 3.9943526632916327`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"7ba87a4b-7067-4f2d-8a2b-b444649b0cf2"] }, Open ]], Cell[CellGroupData[{ @@ -4282,15 +4267,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], + CellLabel->"In[55]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], Cell[BoxData["109.03965674383026`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940735652689238`*^9, 3.99407359161714*^9}, - 3.994075181457575*^9, 3.994075224089169*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"959de20e-e319-4821-856a-2db061248dc4"] + 3.994075181457575*^9, 3.994075224089169*^9, 3.994349737322762*^9, + 3.9943526633046427`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"51cc03bd-3ae7-4f25-a359-24646e9018d7"] }, Open ]], Cell[CellGroupData[{ @@ -4330,16 +4314,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], + CellLabel->"In[56]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.9940735652791967`*^9, 3.994073591627187*^9}, - 3.994075181468134*^9, 3.9940752240986977`*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"b1db9611-48bc-4896-beb1-8a7875512d81"] + 3.994075181468134*^9, 3.9940752240986977`*^9, 3.994349737340754*^9, + 3.994352663317931*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"b7438d1a-3921-41c3-8a31-696609d6eeb7"] }, Open ]], Cell[CellGroupData[{ @@ -4383,101 +4366,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], + CellLabel->"In[57]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], Cell[BoxData["112.13680293055965`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994073565289288*^9, 3.994073591637117*^9}, - 3.994075181479414*^9, 3.9940752241080437`*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"19482b06-bfbf-42e1-966f-1ca5e68041c0"] + 3.994075181479414*^9, 3.9940752241080437`*^9, 3.994349737357088*^9, + 3.994352663331585*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"79a4d956-2830-4f57-828a-229a937547d4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], + CellLabel->"In[58]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.99407356529922*^9, 3.994073591647008*^9}, - 3.994075181491456*^9, 3.994075224117897*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"267767d6-895f-4ba6-9f0e-daa9a1fe3161"] + 3.994075181491456*^9, 3.994075224117897*^9, 3.994349737379826*^9, + 3.9943526633454638`*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"a909946d-abb5-472f-bd27-7a0ba10fb004"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], + CellLabel->"In[59]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.994073565311245*^9, 3.994073591656905*^9}, - 3.994075181502122*^9, 3.9940752241273518`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"5400b027-5158-4fa7-b234-3e43d63912b9"] + 3.994075181502122*^9, 3.9940752241273518`*^9, 3.99434973739911*^9, + 3.994352663357728*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"02d3827e-ac23-48f8-8d9c-bd00ba3e30bc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], + CellLabel->"In[60]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.9940735653224297`*^9, 3.994073591666703*^9}, - 3.994075181512973*^9, 3.994075224138131*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"f4a32333-db17-466f-aba5-bb9d6b4f6399"] + 3.994075181512973*^9, 3.994075224138131*^9, 3.994349737414597*^9, + 3.99435266337285*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"2f4cc4ff-ff11-411f-b3ab-5a75d88747e1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[166]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], + CellLabel->"In[61]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.994073565332736*^9, 3.994073591676529*^9}, - 3.9940751815232983`*^9, 3.99407522414828*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"797ae031-4fc8-4710-8404-04a4b2f96865"] + 3.9940751815232983`*^9, 3.99407522414828*^9, 3.9943497374297*^9, + 3.99435266338575*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"4afe8b63-f647-4a13-bc04-01116abd427f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[167]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], + CellLabel->"In[62]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994073565343382*^9, 3.994073591686304*^9}, - 3.9940751815621433`*^9, 3.994075224158536*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"eedb8b45-7ad3-46ef-8609-79a186c2fdce"] + 3.9940751815621433`*^9, 3.994075224158536*^9, 3.9943497375102*^9, + 3.994352663398939*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"899de076-b908-4393-ac79-acd5b0fbf419"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[168]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], + CellLabel->"In[63]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.9940735677968397`*^9, 3.994073591696135*^9}, - 3.994075181571867*^9, 3.994075224168653*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"9fa255bb-5bc5-4f09-a647-1262633ab9fe"] + 3.994075181571867*^9, 3.994075224168653*^9, 3.994349737574338*^9, + 3.994352663411302*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"81ce74e9-7497-4cea-a2a1-c193cceca629"] }, Open ]], Cell[CellGroupData[{ @@ -4498,16 +4474,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[169]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], + CellLabel->"In[64]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], Cell[BoxData[ RowBox[{"-", "34.047906297441784`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994073567991251*^9, 3.994073591706287*^9}, - 3.994075181582259*^9, 3.994075224178802*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"3bf14ac4-0082-4302-a700-78211a962477"] + 3.994075181582259*^9, 3.994075224178802*^9, 3.9943497375914288`*^9, + 3.994352663426252*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"7b9e663d-f844-4eb6-a221-9e05e7d08aa9"] }, Open ]], Cell[CellGroupData[{ @@ -4528,16 +4503,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[170]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], + CellLabel->"In[65]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], Cell[BoxData[ RowBox[{"-", "6.56405378738986`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994073568001831*^9, 3.994073591716386*^9}, - 3.994075181592502*^9, 3.994075224188962*^9}, - CellLabel-> - "Out[170]=",ExpressionUUID->"113930a9-872c-495e-bde6-8f11ffae2542"] + 3.994075181592502*^9, 3.994075224188962*^9, 3.994349737606882*^9, + 3.99435266344013*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"db7f1667-21d4-4315-b8da-b9fb5850e0a5"] }, Open ]], Cell[CellGroupData[{ @@ -4602,15 +4576,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[171]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], + CellLabel->"In[66]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], Cell[BoxData["74.99175044638848`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.994073568012953*^9, 3.994073591726822*^9}, - 3.9940751816039963`*^9, 3.994075224199308*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"70fb2170-70df-4335-9ac8-39307964fc8d"] + 3.9940751816039963`*^9, 3.994075224199308*^9, 3.994349737618041*^9, + 3.994352663453374*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"d89b424a-90e1-49f2-a201-002c7af4b9a9"] }, Open ]], Cell[CellGroupData[{ @@ -4651,16 +4624,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[172]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], + CellLabel->"In[67]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994073568023205*^9, 3.9940735917368*^9}, - 3.994075181615046*^9, 3.994075224209613*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"05b5d827-ff10-4026-8f0c-2872ed10ebff"] + 3.994075181615046*^9, 3.994075224209613*^9, 3.994349737631872*^9, + 3.994352663466517*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"f442cdd3-e2b9-4f3a-8acd-03467056db65"] }, Open ]], Cell[CellGroupData[{ @@ -4726,15 +4698,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[173]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], + CellLabel->"In[68]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], Cell[BoxData["105.57274914316979`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994073568033989*^9, 3.994073591747006*^9}, - 3.994075181626021*^9, 3.994075224219851*^9}, - CellLabel-> - "Out[173]=",ExpressionUUID->"7434ab66-9dcb-4d49-8c6a-0df4b4475a0d"] + 3.994075181626021*^9, 3.994075224219851*^9, 3.99434973764441*^9, + 3.994352663483141*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"7fc5ad71-9fe9-4f2e-97c4-765ed1ba6a48"] }, Open ]], Cell[CellGroupData[{ @@ -4744,32 +4715,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", "BBB11", ")"}], "+", RowBox[{"2", - FractionBox[ - RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{"1", "+", - RowBox[{ - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", - RowBox[{ - FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], - RowBox[{"R02", "*", - RowBox[{"(", - RowBox[{"1", "+", - RowBox[{ - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", - RowBox[{ - FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", - RowBox[{"(", "BBB12", ")"}]}], "+", - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ RowBox[{"R01", "*", RowBox[{"(", RowBox[{"1", "+", @@ -4779,7 +4727,8 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", RowBox[{ FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/", + RowBox[{"(", RowBox[{"R02", "*", RowBox[{"(", RowBox[{"1", "+", @@ -4789,18 +4738,45 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", RowBox[{ FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], - "2"], "*", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}], ")"}]}], + ")"}], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}], ")"}]}], + ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[174]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], + CellLabel->"In[69]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], Cell[BoxData["39.10949309233206`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994073568045323*^9, 3.99407359175727*^9}, - 3.994075181636903*^9, 3.99407522423002*^9}, - CellLabel-> - "Out[174]=",ExpressionUUID->"4b878535-e718-450b-a3c7-d6c0db830348"] + 3.994075181636903*^9, 3.99407522423002*^9, 3.994349737661721*^9, + 3.994352663496776*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"b42afbfd-beae-4ae6-8c4b-e53eff755c5a"] }, Open ]], Cell[CellGroupData[{ @@ -4810,32 +4786,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", "BBB11", ")"}], "-", RowBox[{"2", - FractionBox[ - RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{"1", "+", - RowBox[{ - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", - RowBox[{ - FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], - RowBox[{"R02", "*", - RowBox[{"(", - RowBox[{"1", "+", - RowBox[{ - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", - RowBox[{ - FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", - RowBox[{"(", "BBB12", ")"}]}], "+", - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ RowBox[{"R01", "*", RowBox[{"(", RowBox[{"1", "+", @@ -4845,7 +4798,8 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", RowBox[{ FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/", + RowBox[{"(", RowBox[{"R02", "*", RowBox[{"(", RowBox[{"1", "+", @@ -4855,18 +4809,45 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", RowBox[{ FractionBox["1", - RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], - "2"], "*", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}], ")"}]}], + ")"}], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}], ")"}]}], + ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[175]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], + CellLabel->"In[70]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], Cell[BoxData["659.7171122788135`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994073568055649*^9, 3.994073591768012*^9}, - 3.9940751816477003`*^9, 3.99407522424048*^9}, - CellLabel-> - "Out[175]=",ExpressionUUID->"9f930ce4-b2ee-4b45-a127-641eb26351ff"] + 3.9940751816477003`*^9, 3.99407522424048*^9, 3.994349737672949*^9, + 3.9943526635107927`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"08f9c4d2-722d-496f-9fc3-4bdec11fc44d"] }, Open ]], Cell[CellGroupData[{ @@ -4875,40 +4856,36 @@ Cell[BoxData[ RowBox[{"f1", "=", "0.8725040536"}]], "Input", CellChangeTimes->{ 3.991799412462593*^9, {3.9940734291138678`*^9, 3.9940734381551647`*^9}}, - CellLabel-> - "In[176]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], + CellLabel->"In[71]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], Cell[BoxData["0.8725040536`"], "Output", CellChangeTimes->{{3.99407356806634*^9, 3.9940735917783203`*^9}, - 3.994075181658287*^9, 3.994075224250654*^9}, - CellLabel-> - "Out[176]=",ExpressionUUID->"391f95c9-de39-4fb1-a3ca-696e27495551"] + 3.994075181658287*^9, 3.994075224250654*^9, 3.994349737685533*^9, + 3.994352663521978*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"ee803447-dcdc-45cc-a609-13d62eb66c84"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184866880085*^9, 3.9918486688048573`*^9}}, - CellLabel-> - "In[177]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], + CellLabel->"In[72]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.5470324096"}]], "Input", CellChangeTimes->{3.991799414288656*^9, 3.994073443186633*^9}, - CellLabel-> - "In[178]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], + CellLabel->"In[73]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], Cell[BoxData["0.5470324096`"], "Output", CellChangeTimes->{{3.994073568079108*^9, 3.9940735917917*^9}, - 3.994075181671835*^9, 3.99407522429589*^9}, - CellLabel-> - "Out[178]=",ExpressionUUID->"8b262717-73bc-4c33-a610-384f7df79d4f"] + 3.994075181671835*^9, 3.99407522429589*^9, 3.994349737703314*^9, + 3.994352663541795*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"7afd1b64-8302-4434-8904-7016c21b175b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848669922333*^9, 3.9918486699293537`*^9}}, - CellLabel-> - "In[179]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], + CellLabel->"In[74]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ @@ -4954,15 +4931,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[180]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], + CellLabel->"In[75]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], Cell[BoxData["1.5054805119396558`*^-53"], "Output", CellChangeTimes->{ 3.99132042156752*^9, {3.9940735680914793`*^9, 3.9940735918055973`*^9}, - 3.99407518168524*^9, 3.994075224325406*^9}, - CellLabel-> - "Out[180]=",ExpressionUUID->"def1fdc3-5344-4f30-9489-17424043f7f2"] + 3.99407518168524*^9, 3.994075224325406*^9, 3.994349737723714*^9, + 3.994352663562517*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"d07b45b1-218c-4b5e-928b-fb7ef10176ee"] }, Open ]], Cell[CellGroupData[{ @@ -4997,15 +4973,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", CellChangeTimes->{3.991557471461853*^9}, - CellLabel-> - "In[181]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], + CellLabel->"In[76]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], Cell[BoxData["1.430360078496079`*^-54"], "Output", CellChangeTimes->{ 3.99132042159643*^9, {3.994073568101479*^9, 3.994073591817135*^9}, - 3.994075181696602*^9, 3.99407522433638*^9}, - CellLabel-> - "Out[181]=",ExpressionUUID->"63676d78-49e5-47b8-a6dd-5a44c183f616"] + 3.994075181696602*^9, 3.99407522433638*^9, 3.994349737737341*^9, + 3.994352663580557*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"4b8176ab-7954-4639-9945-f585207b26c5"] }, Open ]], Cell[CellGroupData[{ @@ -5039,15 +5014,14 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", CellChangeTimes->{{3.991557474366678*^9, 3.99155747655138*^9}}, - CellLabel-> - "In[182]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], + CellLabel->"In[77]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], Cell[BoxData["2.8903622337570463`*^-54"], "Output", CellChangeTimes->{ 3.9913204216085243`*^9, {3.99407356811165*^9, 3.9940735918288307`*^9}, - 3.994075181707142*^9, 3.994075224348711*^9}, - CellLabel-> - "Out[182]=",ExpressionUUID->"63823632-182e-4c64-b161-34283d2cde3b"] + 3.994075181707142*^9, 3.994075224348711*^9, 3.994349737750228*^9, + 3.994352663594048*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"ca645373-57ce-42c7-9979-332ca1e6ddb7"] }, Open ]], Cell[CellGroupData[{ @@ -5070,8 +5044,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel-> - "In[183]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], + CellLabel->"In[78]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], Cell[BoxData["13.886176572292896`"], "Output", CellChangeTimes->{ @@ -5081,9 +5054,9 @@ Cell[BoxData["13.886176572292896`"], "Output", 3.99208680410137*^9}, 3.992091247458048*^9, {3.992091392660454*^9, 3.992091446805294*^9}, {3.9920915031404457`*^9, 3.992091522601553*^9}, { 3.9920915619364376`*^9, 3.9920915885645847`*^9}, {3.994073568121551*^9, - 3.9940735918400784`*^9}, 3.994075181717709*^9, 3.994075224362709*^9}, - CellLabel-> - "Out[183]=",ExpressionUUID->"0415d3ae-f93e-4008-a13c-8fbbe0d44767"] + 3.9940735918400784`*^9}, 3.994075181717709*^9, 3.994075224362709*^9, + 3.994349737764398*^9, 3.994352663609433*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"842b0afd-1c8c-474d-a467-74975a191504"] }, Open ]], Cell[CellGroupData[{ @@ -5109,8 +5082,7 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", CellChangeTimes->{3.992086162437586*^9}, - CellLabel-> - "In[184]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], + CellLabel->"In[79]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], Cell[BoxData["48.721353500088284`"], "Output", CellChangeTimes->{ @@ -5120,9 +5092,9 @@ Cell[BoxData["48.721353500088284`"], "Output", 3.992091247484524*^9, {3.9920913926676064`*^9, 3.9920914468313007`*^9}, { 3.9920915031479607`*^9, 3.9920915226223583`*^9}, {3.9920915619450817`*^9, 3.992091588571615*^9}, {3.994073568131518*^9, 3.99407359185163*^9}, - 3.9940751817283688`*^9, 3.99407522437365*^9}, - CellLabel-> - "Out[184]=",ExpressionUUID->"0e1c76cb-1795-408e-ad42-c1004833256f"] + 3.9940751817283688`*^9, 3.99407522437365*^9, 3.994349737778903*^9, + 3.99435266362368*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"f5def6a7-901a-40f1-bebc-93ffd19c040f"] }, Open ]], Cell[CellGroupData[{ @@ -5131,8 +5103,7 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel-> - "In[185]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], + CellLabel->"In[80]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], Cell[BoxData["1.678223320932622`"], "Output", CellChangeTimes->{ @@ -5142,9 +5113,9 @@ Cell[BoxData["1.678223320932622`"], "Output", 3.9920868041580334`*^9}, 3.9920912474925404`*^9, {3.9920913926935654`*^9, 3.992091446837303*^9}, {3.9920915031795254`*^9, 3.992091522629343*^9}, { 3.9920915619686337`*^9, 3.992091588596325*^9}, {3.994073568141081*^9, - 3.99407359186281*^9}, 3.994075181739097*^9, 3.994075224384358*^9}, - CellLabel-> - "Out[185]=",ExpressionUUID->"f46856f5-b2fd-4da9-8170-a8a6196179fb"] + 3.99407359186281*^9}, 3.994075181739097*^9, 3.994075224384358*^9, + 3.994349737790494*^9, 3.994352663635447*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"d9fe5784-16bf-4d67-acc6-2877e8b3ac83"] }, Open ]], Cell[CellGroupData[{ @@ -5154,8 +5125,7 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kw", "Qw2"]]}]], "Input", CellChangeTimes->{{3.992086303949501*^9, 3.992086304210249*^9}}, - CellLabel-> - "In[186]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], + CellLabel->"In[81]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], Cell[BoxData["3.679757526901149`"], "Output", CellChangeTimes->{ @@ -5165,9 +5135,8 @@ Cell[BoxData["3.679757526901149`"], "Output", 3.992091392715067*^9, 3.9920914468593006`*^9}, {3.992091503202347*^9, 3.992091522636343*^9}, {3.992091561975609*^9, 3.99209158860334*^9}, { 3.994073568151667*^9, 3.99407359187431*^9}, 3.994075181749591*^9, - 3.9940752243950768`*^9}, - CellLabel-> - "Out[186]=",ExpressionUUID->"a7d5ab5d-d1f0-43ef-8e4e-de717cfc04c9"] + 3.9940752243950768`*^9, 3.9943497378027267`*^9, 3.994352663648924*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"4e738042-b39c-45c0-9e46-44b6e25c2932"] }, Open ]], Cell[CellGroupData[{ @@ -5177,8 +5146,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qw2", "*", "hw"}], "1"]}]], "Input", CellChangeTimes->{3.992086167409481*^9}, - CellLabel-> - "In[187]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], + CellLabel->"In[82]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], Cell[BoxData["179.2827672627615`"], "Output", CellChangeTimes->{ @@ -5188,9 +5156,9 @@ Cell[BoxData["179.2827672627615`"], "Output", 3.992091247547844*^9, {3.9920913927375374`*^9, 3.992091446867302*^9}, { 3.992091503209553*^9, 3.992091522657341*^9}, {3.992091561999613*^9, 3.9920915886284447`*^9}, {3.994073568161523*^9, 3.994073591885874*^9}, - 3.99407518175989*^9, 3.994075224405814*^9}, - CellLabel-> - "Out[187]=",ExpressionUUID->"bbf0f360-d4e0-4196-bece-8505377ce7cc"] + 3.99407518175989*^9, 3.994075224405814*^9, 3.99434973781672*^9, + 3.9943526636620502`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"3cbe3d5c-85a8-4dbb-92e3-4dd9c84ccbb1"] }, Open ]], Cell[CellGroupData[{ @@ -5199,8 +5167,7 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[188]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], + CellLabel->"In[83]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], Cell[BoxData["23.30410536221016`"], "Output", CellChangeTimes->{ @@ -5210,9 +5177,9 @@ Cell[BoxData["23.30410536221016`"], "Output", 3.992086804192051*^9}, 3.9920912475547256`*^9, {3.9920913927436028`*^9, 3.992091446891386*^9}, {3.9920915032325726`*^9, 3.992091522664852*^9}, { 3.992091562006651*^9, 3.992091588636162*^9}, {3.994073568172328*^9, - 3.994073591896564*^9}, 3.994075181770046*^9, 3.994075224416945*^9}, - CellLabel-> - "Out[188]=",ExpressionUUID->"6d655ba4-795f-4384-b27a-a1797175c6f4"] + 3.994073591896564*^9}, 3.994075181770046*^9, 3.994075224416945*^9, + 3.994349737831891*^9, 3.994352663674553*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"cca8dfed-96d2-478f-910e-057ae4f05c14"] }, Open ]], Cell[CellGroupData[{ @@ -5401,8 +5368,7 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[189]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], + CellLabel->"In[84]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], Cell[BoxData["0.0060151889208131335`"], "Output", CellChangeTimes->{ @@ -5412,9 +5378,9 @@ Cell[BoxData["0.0060151889208131335`"], "Output", 3.992091247578861*^9, {3.9920913927664986`*^9, 3.992091446900387*^9}, { 3.992091503241564*^9, 3.9920915226853714`*^9}, {3.9920915620301514`*^9, 3.992091588657053*^9}, {3.994073568184826*^9, 3.994073591909194*^9}, - 3.9940751817815437`*^9, 3.9940752244283447`*^9}, - CellLabel-> - "Out[189]=",ExpressionUUID->"9dadf9c6-f8e2-4617-9081-918009d02169"] + 3.9940751817815437`*^9, 3.9940752244283447`*^9, 3.994349737848126*^9, + 3.9943526636894617`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"1645b462-39f3-4aca-ad2c-3e64ac05c705"] }, Open ]], Cell[CellGroupData[{ @@ -5428,8 +5394,7 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", Background->None, - CellLabel-> - "In[190]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], + CellLabel->"In[85]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], Cell[BoxData["11.426686299832566`"], "Output", CellChangeTimes->{ @@ -5439,10 +5404,10 @@ Cell[BoxData["11.426686299832566`"], "Output", 3.9920913928462048`*^9, 3.9920914469749584`*^9}, {3.992091503316616*^9, 3.9920915227624416`*^9}, {3.9920915621031647`*^9, 3.9920915887305927`*^9}, {3.9940735694908037`*^9, 3.9940735919766693`*^9}, - 3.99407518189362*^9, 3.994075224493855*^9}, + 3.99407518189362*^9, 3.994075224493855*^9, 3.994349738104298*^9, + 3.994352663993306*^9}, Background->None, - CellLabel-> - "Out[190]=",ExpressionUUID->"5dab7f55-a32f-4f72-bcf3-e3aca25987b6"] + CellLabel->"Out[85]=",ExpressionUUID->"fb92bb1d-d5ba-47ce-9b2c-438727365ad1"] }, Open ]], Cell[BoxData[ @@ -5454,8 +5419,7 @@ Cell[BoxData[ 3.992086184000986*^9, 3.9920862197077847`*^9}, {3.99208635879986*^9, 3.9920863634349823`*^9}, {3.9920864985362244`*^9, 3.992086501430176*^9}, { 3.9920869541635437`*^9, 3.992086954848522*^9}}, - CellLabel-> - "In[191]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], + CellLabel->"In[86]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ @@ -5477,15 +5441,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[192]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], + CellLabel->"In[87]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], Cell[BoxData["35.19016342490424`"], "Output", CellChangeTimes->{ 3.991320421637537*^9, {3.9940735695774927`*^9, 3.9940735919950237`*^9}, - 3.994075181909905*^9, 3.994075224508122*^9}, - CellLabel-> - "Out[192]=",ExpressionUUID->"83d94100-49ff-4018-9255-21615cdd3c63"] + 3.994075181909905*^9, 3.994075224508122*^9, 3.9943497381226807`*^9, + 3.9943526640203257`*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"c160013b-2e47-44d7-a6d8-61fc6d2c5128"] }, Open ]], Cell[CellGroupData[{ @@ -5510,15 +5473,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[193]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], + CellLabel->"In[88]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], Cell[BoxData["48.721353500088284`"], "Output", CellChangeTimes->{ 3.9913204216685333`*^9, {3.994073569586437*^9, 3.9940735920051193`*^9}, - 3.9940751819200087`*^9, 3.994075224518662*^9}, - CellLabel-> - "Out[193]=",ExpressionUUID->"f8a823cc-70a2-4079-a54e-45e6573131e1"] + 3.9940751819200087`*^9, 3.994075224518662*^9, 3.9943497381376057`*^9, + 3.994352664036495*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"7f0a9c6f-0c62-4ba7-91ab-5cef48ccf0f0"] }, Open ]], Cell[CellGroupData[{ @@ -5527,15 +5489,14 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[194]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], + CellLabel->"In[89]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], Cell[BoxData["1.0542180593042814`"], "Output", CellChangeTimes->{ 3.991320421698473*^9, {3.994073569597731*^9, 3.9940735920143948`*^9}, - 3.9940751819300413`*^9, 3.994075224529359*^9}, - CellLabel-> - "Out[194]=",ExpressionUUID->"6e210646-ff3d-433f-9f7c-eb08e5103a5a"] + 3.9940751819300413`*^9, 3.994075224529359*^9, 3.9943497381518307`*^9, + 3.994352664053731*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"9d10b3b0-b14c-4869-a024-f764dad30738"] }, Open ]], Cell[CellGroupData[{ @@ -5544,15 +5505,14 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[195]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], + CellLabel->"In[90]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], Cell[BoxData["3.679757526901149`"], "Output", CellChangeTimes->{ 3.991320421726494*^9, {3.994073569607998*^9, 3.994073592023653*^9}, - 3.994075181941288*^9, 3.994075224540246*^9}, - CellLabel-> - "Out[195]=",ExpressionUUID->"a80c5baf-122f-40e1-a188-5f47b5defd9e"] + 3.994075181941288*^9, 3.994075224540246*^9, 3.994349738168372*^9, + 3.9943526640646687`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"7b25f5a1-8f9b-4bf6-8b97-aa9e767c9499"] }, Open ]], Cell[CellGroupData[{ @@ -5561,15 +5521,14 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[196]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], + CellLabel->"In[91]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], Cell[BoxData["179.2827672627615`"], "Output", CellChangeTimes->{ 3.9913204217554817`*^9, {3.994073569616849*^9, 3.994073592032955*^9}, - 3.994075181951705*^9, 3.994075224551179*^9}, - CellLabel-> - "Out[196]=",ExpressionUUID->"0fcac2cc-227f-47b7-8c25-9217ae55eedf"] + 3.994075181951705*^9, 3.994075224551179*^9, 3.9943497381840076`*^9, + 3.994352664077141*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"ff875b53-7e22-435a-bf3f-72b0f1b371fa"] }, Open ]], Cell[CellGroupData[{ @@ -5578,15 +5537,14 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[197]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], + CellLabel->"In[92]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], Cell[BoxData["37.098105792403054`"], "Output", CellChangeTimes->{ 3.9913204217855225`*^9, {3.994073569625689*^9, 3.9940735920422983`*^9}, - 3.9940751819622803`*^9, 3.9940752245635967`*^9}, - CellLabel-> - "Out[197]=",ExpressionUUID->"11bb211a-1c67-48f5-81ef-dd7ced5b9302"] + 3.9940751819622803`*^9, 3.9940752245635967`*^9, 3.994349738198374*^9, + 3.994352664089657*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"e290c36f-8155-4af7-a400-34c100b8550f"] }, Open ]], Cell[CellGroupData[{ @@ -5775,15 +5733,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[198]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], + CellLabel->"In[93]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], Cell[BoxData["0.005554326876619897`"], "Output", CellChangeTimes->{ 3.9913204218154297`*^9, {3.994073569635306*^9, 3.9940735920524483`*^9}, - 3.9940751819737473`*^9, 3.994075224576437*^9}, - CellLabel-> - "Out[198]=",ExpressionUUID->"d33d9a25-fd34-4c8a-95bc-605e67bd6e39"] + 3.9940751819737473`*^9, 3.994075224576437*^9, 3.9943497382163477`*^9, + 3.994352664109467*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"34557d34-70ce-46fd-802a-a85ebc01b7fc"] }, Open ]], Cell[CellGroupData[{ @@ -5797,16 +5754,15 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", Background->RGBColor[0.4, 0.6, 1, 0.33], - CellLabel-> - "In[199]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], + CellLabel->"In[94]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], Cell[BoxData["11.891296918274248`"], "Output", CellChangeTimes->{ 3.991320422776104*^9, {3.99407357075261*^9, 3.9940735920907784`*^9}, - 3.9940751820134287`*^9, 3.994075224633216*^9}, + 3.9940751820134287`*^9, 3.994075224633216*^9, 3.9943497384886417`*^9, + 3.994352664218438*^9}, Background->RGBColor[0.14, 0.8, 0.14, 0.33], - CellLabel-> - "Out[199]=",ExpressionUUID->"fbc45696-2ee6-4ea2-907a-fbeeb97788ce"] + CellLabel->"Out[94]=",ExpressionUUID->"2099507b-e3d3-41e8-868d-57df95626b67"] }, Open ]], Cell[CellGroupData[{ @@ -5997,15 +5953,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[200]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], + CellLabel->"In[95]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], Cell[BoxData["0.025540194965123556`"], "Output", CellChangeTimes->{ 3.9913204229248886`*^9, {3.99407357078102*^9, 3.994073592102573*^9}, - 3.9940751820283957`*^9, 3.9940752246455517`*^9}, - CellLabel-> - "Out[200]=",ExpressionUUID->"d7430364-d0a0-462b-9337-8679c65e00f9"] + 3.9940751820283957`*^9, 3.9940752246455517`*^9, 3.9943497385073957`*^9, + 3.994352664233289*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"5d89a418-fb14-4da5-8e93-dad0858ffd94"] }, Open ]], Cell[CellGroupData[{ @@ -6018,15 +5973,14 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[201]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], + CellLabel->"In[96]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], Cell[BoxData["5.545399470130799`"], "Output", CellChangeTimes->{ 3.9913204230053368`*^9, {3.994073571798023*^9, 3.994073592142036*^9}, - 3.994075182116054*^9, 3.9940752247024727`*^9}, - CellLabel-> - "Out[201]=",ExpressionUUID->"d0ddf07d-61bc-416d-8ea7-6f9ad44673a1"] + 3.994075182116054*^9, 3.9940752247024727`*^9, 3.9943497385854073`*^9, + 3.994352664461334*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"26435ed9-60d6-4e0c-9719-517c2d145d23"] }, Open ]], Cell[CellGroupData[{ @@ -6118,15 +6072,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[202]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], + CellLabel->"In[97]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], Cell[BoxData["0.10708479897462729`"], "Output", CellChangeTimes->{ 3.9913204230393543`*^9, {3.994073571816867*^9, 3.994073592156478*^9}, - 3.994075182257403*^9, 3.994075224714756*^9}, - CellLabel-> - "Out[202]=",ExpressionUUID->"fb65cba0-d58a-4938-b9c1-d9606ddafbb1"] + 3.994075182257403*^9, 3.994075224714756*^9, 3.9943497386081038`*^9, + 3.994352664475588*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"39a5e33e-a8da-4d29-aad1-206b378a2272"] }, Open ]], Cell[CellGroupData[{ @@ -6215,15 +6168,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[203]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], + CellLabel->"In[98]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], Cell[BoxData["0.8929152010253727`"], "Output", CellChangeTimes->{ 3.9913204230728855`*^9, {3.994073571827396*^9, 3.994073592166896*^9}, - 3.994075182274292*^9, 3.994075224727522*^9}, - CellLabel-> - "Out[203]=",ExpressionUUID->"957ef34c-e797-48a7-a7c9-80d9833a59e9"] + 3.994075182274292*^9, 3.994075224727522*^9, 3.9943497386361837`*^9, + 3.994352664492137*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"3691eace-048c-4951-aee4-24856dd93c6f"] }, Open ]], Cell[CellGroupData[{ @@ -6345,22 +6297,21 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[204]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], + CellLabel->"In[99]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], Cell[BoxData["0.09561764480319095`"], "Output", CellChangeTimes->{ 3.9913204231038837`*^9, {3.99407357183808*^9, 3.994073592178246*^9}, - 3.994075182286728*^9, 3.994075224743524*^9}, - CellLabel-> - "Out[204]=",ExpressionUUID->"08b1b256-2cf1-417f-8b4f-b7280ea4ec91"] + 3.994075182286728*^9, 3.994075224743524*^9, 3.994349738684491*^9, + 3.994352664509678*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"8aa0e643-8ead-4966-9998-c9e33a36eb08"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellLabel-> - "In[205]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], + "In[100]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ @@ -6374,30 +6325,34 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox["1", "2"], + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}]}], + ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6423,80 +6378,88 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.991799443370365*^9}, CellLabel-> - "In[206]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], + "In[101]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.209187975172153`*^-212\\\", \ -RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ -\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 206, 9, 31386471951417599936, "kernel 2"}, +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 1, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994073571859603*^9, 3.9940735922015753`*^9}, - 3.994075182310584*^9, 3.994075224758751*^9}, + 3.994075182310584*^9, 3.994075224758751*^9, 3.994349738780773*^9, + 3.994352664552217*^9}, CellLabel-> "During evaluation of \ -In[206]:=",ExpressionUUID->"00468604-1b8d-4d45-b381-4ffac8adbce7"], +In[101]:=",ExpressionUUID->"71a2a665-941a-4296-b3d2-9664025fea2c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.0885262600731083`*^-217\\\", \ -RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ -\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 206, 10, 31386471951417599936, "kernel 2"}, +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 2, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994073571859603*^9, 3.9940735922015753`*^9}, - 3.994075182310584*^9, 3.994075224761992*^9}, + 3.994075182310584*^9, 3.994075224758751*^9, 3.994349738780773*^9, + 3.994352664574568*^9}, CellLabel-> "During evaluation of \ -In[206]:=",ExpressionUUID->"6ee4886b-82ba-4317-96bd-cb63f5c63680"], +In[101]:=",ExpressionUUID->"8f89f7bd-877e-487b-a1ad-fa3b5a133376"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"9.799050628997984`*^-223\\\", \ -RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ -\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 206, 11, 31386471951417599936, "kernel 2"}, +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 3, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994073571859603*^9, 3.9940735922015753`*^9}, - 3.994075182310584*^9, 3.994075224765277*^9}, + 3.994075182310584*^9, 3.994075224758751*^9, 3.994349738780773*^9, + 3.9943526645869703`*^9}, CellLabel-> "During evaluation of \ -In[206]:=",ExpressionUUID->"319b1807-8cb5-4fc1-9985-bc2e0a059e8a"], +In[101]:=",ExpressionUUID->"91f3df15-ef60-4c24-8618-79d7b4778426"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 206, 12, 31386471951417599936, "kernel 2"}, +during this calculation.\"", 2, 101, 4, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994073571859603*^9, 3.9940735922015753`*^9}, - 3.994075182310584*^9, 3.994075224768016*^9}, + 3.994075182310584*^9, 3.994075224758751*^9, 3.994349738780773*^9, + 3.994352664596204*^9}, CellLabel-> "During evaluation of \ -In[206]:=",ExpressionUUID->"7e95a6cd-0269-49b0-9a40-d11ed65485ae"], +In[101]:=",ExpressionUUID->"b8e75be5-a9b7-47d1-89d3-809859288334"], Cell[BoxData["11.891296918274236`"], "Output", CellChangeTimes->{ 3.9913204260017204`*^9, {3.994073572695344*^9, 3.9940735934204082`*^9}, - 3.994075183493922*^9, 3.99407522654254*^9}, + 3.994075183493922*^9, 3.99407522654254*^9, 3.994349741173882*^9, + 3.994352668331565*^9}, CellLabel-> - "Out[206]=",ExpressionUUID->"ddc17924-7e0a-4f6c-a3a2-9b2a834fd61d"] + "Out[101]=",ExpressionUUID->"ea7c1f9f-a189-45a6-8eac-89787766d400"] }, Open ]], Cell[CellGroupData[{ @@ -6511,30 +6474,34 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox["1", "2"], + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}]}], + ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6560,75 +6527,83 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.9917994459475594`*^9}, CellLabel-> - "In[207]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], + "In[102]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.209187975172153`*^-212\\\", \ -RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ -\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 207, 13, 31386471951417599936, "kernel 2"}, +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 5, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.994073593436479*^9, - 3.994075183566085*^9, 3.9940752265735064`*^9}, + 3.994075183566085*^9, 3.9940752265735064`*^9, 3.994349741366303*^9, + 3.994352668399077*^9}, CellLabel-> "During evaluation of \ -In[207]:=",ExpressionUUID->"4c68f761-ea3f-4c87-876c-62086f5bcc44"], +In[102]:=",ExpressionUUID->"3d48e147-9cb7-4aa6-8211-739651b96ed3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.0885262600731083`*^-217\\\", \ -RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ -\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 207, 14, 31386471951417599936, "kernel 2"}, +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 6, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.994073593436479*^9, - 3.994075183566085*^9, 3.994075226576586*^9}, + 3.994075183566085*^9, 3.9940752265735064`*^9, 3.994349741366303*^9, + 3.99435266840893*^9}, CellLabel-> "During evaluation of \ -In[207]:=",ExpressionUUID->"a89778a4-dcbd-43da-9dd2-fcdc8860506a"], +In[102]:=",ExpressionUUID->"6e655486-3d5b-4197-8c8c-aeb960979642"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"9.799050628997984`*^-223\\\", \ -RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ -\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 207, 15, 31386471951417599936, "kernel 2"}, +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 7, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.994073593436479*^9, - 3.994075183566085*^9, 3.994075226579262*^9}, + 3.994075183566085*^9, 3.9940752265735064`*^9, 3.994349741366303*^9, + 3.994352668418782*^9}, CellLabel-> "During evaluation of \ -In[207]:=",ExpressionUUID->"c60293b6-0417-4ab5-8f7b-df0ce979bf76"], +In[102]:=",ExpressionUUID->"54540c32-3b36-4a79-ad63-bb0e5ef2de52"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 207, 16, 31386471951417599936, "kernel 2"}, +during this calculation.\"", 2, 102, 8, 31388290457991345798, "kernel 5"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.994073593436479*^9, - 3.994075183566085*^9, 3.9940752265813837`*^9}, + 3.994075183566085*^9, 3.9940752265735064`*^9, 3.994349741366303*^9, + 3.99435266842807*^9}, CellLabel-> "During evaluation of \ -In[207]:=",ExpressionUUID->"e9513b1d-a7ee-41e2-a2f2-0646bf0bb0c6"], +In[102]:=",ExpressionUUID->"d3481921-98d5-494c-80ab-cfb418d54776"], -Cell[BoxData["$Aborted"], "Output", +Cell[BoxData["5.545399470130797`"], "Output", CellChangeTimes->{3.991320428882721*^9, 3.9940735940958548`*^9, - 3.994075184727406*^9, 3.994075226603857*^9}, + 3.994075184727406*^9, 3.994075226603857*^9, 3.994349743799315*^9, + 3.994352671936957*^9}, CellLabel-> - "Out[207]=",ExpressionUUID->"1a927ee9-82c8-44e4-a73a-d779472d297e"] + "Out[102]=",ExpressionUUID->"c76ea527-c2a4-40e5-b3cb-220964abd4dd"] }, Open ]], Cell[CellGroupData[{ @@ -6638,60 +6613,441 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{3.9917994505623856`*^9}, CellLabel-> - "In[104]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], + "In[103]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[BoxData["$Aborted"], "Output", - CellChangeTimes->{3.9913206956809444`*^9, 3.9940751880749063`*^9}, +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0VVscB3CzMpV5SpmLQhlCqv2L24gMUaaEe+8JT8KVyNSkOaUU9Uwp +GTKkkKHkRRJCIRIi7jWPcW4Z8rY/zjrrs/Ze3/3b01lHyeOkLZ2Lg4NjED/L +b/8G7fWvmhp26ht+03eJZaKd408MPCjZaIfcl+PL7kneGqtKeY1qzEs4jmJb +0z7xCem9R9pN0UvLzg+OrOSl1KOOXFvaMeyr1TIVkVmfUe8Uj447dkmTf9KC +bisKeZp2jIo93FEbFlLWjso79Uk6thxTxZk060Tx6S+mPbHNJ8KMGfU/kJDC +Onsf7PKFYcHgrF5UYX9GwQ/76znp0CLfPpR2oso8EHucjzI8o8tE9hcWfwRj +893wc9Rjs5BtsVpHOPZa0cQa/7JBRNmyY9sF7IPy5NNxs1Hkf2vbplvYRIqy +lNaKcWRVr1h+DztSzSrqn/oJ5LxAFiZgt0u3bAnMmkI7eQPbnmHTnLy97t6Y +RvKW8pwF2JMJHI9e+P5C0sTL26+xVyhrrZ7SnUURK1/1NmDH0ir3rpYkkZWc +yuN2bMV0x0gdNol+rThX+xPbaNOl8RNlv9GNbHHz39ieW3/UD5stoLqhBPEN +95hoJvgUj4D6ImrJT+ExwD5bJrhdY8VftGEx3tkUOx6Mnh2vX0Kd6Z4mrti0 +tBpKQBYnGBbfevcQO6v6bs85eS54P2nal4U9OeAaFnODC2qFxr3KsMM0Z18+ +9+WGwq9amV3YsXlKKhO6vHA2031C/T4TdTSNlv99zAsDPb1oG7bi9CsnEUk+ +CJZyJS2xs/UP3tFi88GHCot7QdhVJWc4fcpWgMh98X/rsWcrm38MmgnB7fGW +6utxTCRmIbQ6tFwIMuv109KxN7dQQNhYGCh14fOV2N79hSlbtEVAabFh1V9s +P676zTuEVkNjx9W20/FMxFTOnYoiRcGk27z/3AO8PkTtykY9Mbj3uXhXGjbX +M5aSjL8YaHMrSn/EVtRbZ5s1IgatM70aYg+ZyMns9ouGHnEwLz08kYndSA1g +SNdJQo6W+vzEv0zUnR593W2FFNRKNLXLJTDR6EjW48zdUpB45Kr2HmyBwL5m +kwop6HmnY5qETblop+9WKA1uzacE7BKZqPTJ1tmMZFkw+guKX5OY6AlzLmhb +oAJQvwT66Kcy0T77y92MHAUQMvI55Y09WiW+J4elANNhaCAFW//JJklFx7Xg +uhjJu+oxXk8P15e8O9dB1+i9TZPY0xM9pwcvKMLrP5fVq9OYSPwEpeClpTLU +VBe0VmQyEeuJgKe1tzKMeDEWubOYqLizSX7skjKou+2J3ovtYnH0gnqFMmyR +3zLSiP1kY5DtA10VeECxucN8hscfTp+MkFYFp/Zzcaq5TGR3XFDrQK8aeD/3 +ujH1golQkL3ukUU12HrOZw+8ZCLNqGRDmqw63NV7Tr+FzfFYzzTCRh12LHG1 +aBcwUU6385EX/6nDjKSEX0Ahvp+Hs8/Jpa6HarXOdKFiXB/F8uuwhwZkFBxU +v/mGiR4fivvOjtCAcbHuG4PY0R69PTz/aoBY0B8HSjk+32dPjaxt1gDCrVtp +EVv0dSLHITNNEJlID2JU4POjN65ZprIR1NpCtRmVTCSvfCvyev8mcEkrHyr/ +yESvr81o/OHSAvWEpG6dWrwevxxbCCUtEFrjbv4IO6lKVcPUVQtMIeFGVB0T +KR8v/fK7TQtOJdnkHvqE55vNVCPqtMHE+7c/32cmUpBfSyg6bgabQ6MS1e1M +tCktUGge6cJMUERW7hATedAuzGod1AWpEu31+sP4vqrc6XZz0QWd9o3Cpdjc +qXnPq4N1oWmPvOSHEXzfkobt7uTrgkWagSRrDH9P490SNVT0oDP2/jfDaby/ +1y20Hfj04fyHsJua80z0KEDVurDeAKy0TodbirBQUxAyvJhmDN3qLR/Dd7CQ +kmvrwaM+O2A4zng+gsFC9KWiXIUQAKs4dmtjNgtJjxTzS3uYwv0teQap0ywU +qLe9844mBS4Y+I0qmAwgj7GFGvHh3RDY+fDBmqsDKMeUwZ/cuBf427alJzAH +0JMZ7/+yY/fD4VDR815mg+j3LplPVZHm4Jzm2uqcP4i6OLinet0toeg0W++d +2hDyXXPy9jkVKxB+yKc+9WAI5XrVVNyLsoaP9UJX7RWH0ZlfsuyNXjbwZmKy +PyttGM0e2HP4wzFbuDC7i//tzhFk7Byzi2lzCHbGtI7kd42gL7KJ3lV6dvDa +VpCVHDKK5J5eeJ2xwR4oa3b1dmmOoeIeTYuDwodhlZhgSXPbGFrbMnk8aOww +mHfzf1O+Mo707sVkP+45At2S73LvHpxAiTy/tO9UOoAWSZvi5Z9ERbt0OqJK +HKGDvOPO8p9E8YbXRBeynMBzKGbhYdckavyedknvhjOUfE8SX0+ZQoWWCap+ +Z10gNUZzn0rhFJo6cYjDl3YUdJz1WG/XTaPZPRqe42ausLSQXFV9ZRpljH37 +zdh6DPJkNjulzE0jh0dp1KNCbuC7yunQCtov9PKF+THuy26wd033w2stv5Cx +/Jc/V/+4QUOZKVXGZAap9Bzv+OzlDgZhAv8wEmZQv+A/Vgl97pBjpxV9nnMW +NUUfpO619wCui+O+qU6zKDY4WfBUkwdQZ/8wzhXMotflS3+o+6lg+myYMcRD +olUucFmvlAqCPGn+AvtIpCjxoXHNayp01aU+kd9Pos31ljJ85VSAgRfGmw6Q +yHa7c2b7f1Sgpa69am5Botg1QXXhH6lQfq2k6Lw1ieS6nq2qaaeCrf+ibLMD +iVRdpeNd2FTo3G7oO+dJImO38YwofRrwK81LHLlMoqcPJhkHt9Igae/8M50r +JJJont4pbUQDAaldOfxXSTS+m92SYUKD1vOzY4XXSPz94uCsN6WBVN8JqmA0 +iUTYoo5iNjR4KGo99yCWRP03DVYmn6DBoGhiKeURiaLLwryKn9LAwKVk8kMx +iU7oxhkHZ9Bgmr3RLaiERBaZ+SuNsmjw4oL7VtVSEgnEsTJf5dCAl+u2VEQZ +iaICrIeLCmigf9kpVbOcRGEaqv8UvqMBWbRQS1SSyDuuzudFNw2ElEvOen8i +0X4R1vaAHhpwnGJd5W0g0YYoDmHdnzQ4M9k9m4zNCjDIyWfSgJFSMvulkUTu +B5PHno/SIORTa8yWLyRy4GX45s3RwLeSV/nzVxLtZcj5ZUvRwfLEyu/xP0j0 +LvnSgTsydJi7nB+ysYdE2+unVYPl6DAipOL8BnuzWt03s7V0KGJ/Z3b3kki2 +LdTsuxodFqo4pWX7STSyrUtKwIAOdX1X6rwGSXSLK+XN8UN0mF48/Sh0Es9f +Ryje0p4OElMHnEnsi87BAXpH6HBWkcfOb4pEwQXW65ec6FA8/orTYxrXT3DG +3Pegw+N2SfPtMyTSq/Wgvfenw+feN+H1+L+nLUZNUOU2HSzeWmc7/SVRLhL2 +HIyhwzNf8XNF2BfHZqpy7uL+FQNZoksk0t1fFWEUR4dOmdDF99jRHNRpyyQ6 +VDy0SFDnZKM9J1O+BWfTQVREMP8DNxspKFzZujOXDjpeYQ0yPGw0U3vyLvdz +OrBXs5AXdqo6sox+SYfJVLe1K3jZaLGrq+JxKR3SWNo1O/jYqMBCPqOhhg63 +9p//78oKNro+x8UbW4vHnxKRbsT2yBh2d6yng6Fw4luJlWy0mqdUvr+RDr8z +Lq5MwvYpc7j15ysdGCfnIjIE2EhF836QKpMO95XK+hOE2GiuLbx5iIXrn5yj +tmM3RdE35w3SwX+fp4G4MBtF9OoPG4/SYcvxfxsuYXfENx+1+kWHS2zZb3QR +NrrDL7r7DCcB3naPKNyr2ej1dJdzIDcB6yhHw42xB7qyAnx5CTjL/ajTF3t7 +ASXFYyUBFQFXRdqwWW7B8wdEcf83PjsTRXH9FrvFdosT8MZ6JrMe28RQTANJ +EvDOIcFkHvu2cPZhPVkCQg3XfrYXw+2lP/LllQj4cSqjkkOcjYi07BpJFQJW ++065amDfvh3yY5UaAXJ0TkUbbBYhLsyjQYBSsaV40nK7+F7P0c0E0LmvvNGS +YKPSv+KRLF0CYsLZUVbYzKGeez36BHxh/GT4YW+rOFPZYoTrM15ZkYfd75O7 +9g0QUKRTJqMqyUYiDqEGr0wJcOFXF0LYxmb7LPIpePyvDaqO2NGyP0PS9hHQ ++Pbt+2vYxTx5t5MPEHBebt4yFbtvIjT9gQUBQyNO88XYRtWSrTetCVj47ve+ +D9sj/+fIZVsCquflf7KxbybkcZ23w+sR26oiKMVGPwP2bw5yIEAm0U1KB1vY +VWqvnxMBnY0bPiBso/19R71dCDDmHEuwwr65Lvy6qxsBJtaOr3ywiwUOpDp4 +4PzpP/Mhy3mzUiW2NALeJ16mX1rO6+1rtCAIOKq49CtmOa/+OWuPJwGrzh9N +T8D2eBW+CN4EJHOlRD5dzk89IGHiQ4CqXFVY3nL+TemNBr4EiIR8SHq1nB/c +v0vHD9e7IoNZji1Ey3fQCCDAdpBq8x7b0CripEogARqMP721y/nbzC8pBBFg +t+14XCP2DTWZROlgAib5s/2bsYtWM1+KnsH72V3t9xW7dz6/VjCMgLDfRbHt +y/kDEb28EQTYfAzt+oa99Yv576VIAmgLEuYd2P8DYikDMg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0VVscB3CzMpV5SpmLQhlCqv2L24gMUaaEe+8JT8KVyNSkOaUU9Uwp +GTKkkKHkRRJCIRIi7jWPcW4Z8rY/zjrrs/Ze3/3b01lHyeOkLZ2Lg4NjED/L +b/8G7fWvmhp26ht+03eJZaKd408MPCjZaIfcl+PL7kneGqtKeY1qzEs4jmJb +0z7xCem9R9pN0UvLzg+OrOSl1KOOXFvaMeyr1TIVkVmfUe8Uj447dkmTf9KC +bisKeZp2jIo93FEbFlLWjso79Uk6thxTxZk060Tx6S+mPbHNJ8KMGfU/kJDC +Onsf7PKFYcHgrF5UYX9GwQ/76znp0CLfPpR2oso8EHucjzI8o8tE9hcWfwRj +893wc9Rjs5BtsVpHOPZa0cQa/7JBRNmyY9sF7IPy5NNxs1Hkf2vbplvYRIqy +lNaKcWRVr1h+DztSzSrqn/oJ5LxAFiZgt0u3bAnMmkI7eQPbnmHTnLy97t6Y +RvKW8pwF2JMJHI9e+P5C0sTL26+xVyhrrZ7SnUURK1/1NmDH0ir3rpYkkZWc +yuN2bMV0x0gdNol+rThX+xPbaNOl8RNlv9GNbHHz39ieW3/UD5stoLqhBPEN +95hoJvgUj4D6ImrJT+ExwD5bJrhdY8VftGEx3tkUOx6Mnh2vX0Kd6Z4mrti0 +tBpKQBYnGBbfevcQO6v6bs85eS54P2nal4U9OeAaFnODC2qFxr3KsMM0Z18+ +9+WGwq9amV3YsXlKKhO6vHA2031C/T4TdTSNlv99zAsDPb1oG7bi9CsnEUk+ +CJZyJS2xs/UP3tFi88GHCot7QdhVJWc4fcpWgMh98X/rsWcrm38MmgnB7fGW +6utxTCRmIbQ6tFwIMuv109KxN7dQQNhYGCh14fOV2N79hSlbtEVAabFh1V9s +P676zTuEVkNjx9W20/FMxFTOnYoiRcGk27z/3AO8PkTtykY9Mbj3uXhXGjbX +M5aSjL8YaHMrSn/EVtRbZ5s1IgatM70aYg+ZyMns9ouGHnEwLz08kYndSA1g +SNdJQo6W+vzEv0zUnR593W2FFNRKNLXLJTDR6EjW48zdUpB45Kr2HmyBwL5m +kwop6HmnY5qETblop+9WKA1uzacE7BKZqPTJ1tmMZFkw+guKX5OY6AlzLmhb +oAJQvwT66Kcy0T77y92MHAUQMvI55Y09WiW+J4elANNhaCAFW//JJklFx7Xg +uhjJu+oxXk8P15e8O9dB1+i9TZPY0xM9pwcvKMLrP5fVq9OYSPwEpeClpTLU +VBe0VmQyEeuJgKe1tzKMeDEWubOYqLizSX7skjKou+2J3ovtYnH0gnqFMmyR +3zLSiP1kY5DtA10VeECxucN8hscfTp+MkFYFp/Zzcaq5TGR3XFDrQK8aeD/3 +ujH1golQkL3ukUU12HrOZw+8ZCLNqGRDmqw63NV7Tr+FzfFYzzTCRh12LHG1 +aBcwUU6385EX/6nDjKSEX0Ahvp+Hs8/Jpa6HarXOdKFiXB/F8uuwhwZkFBxU +v/mGiR4fivvOjtCAcbHuG4PY0R69PTz/aoBY0B8HSjk+32dPjaxt1gDCrVtp +EVv0dSLHITNNEJlID2JU4POjN65ZprIR1NpCtRmVTCSvfCvyev8mcEkrHyr/ +yESvr81o/OHSAvWEpG6dWrwevxxbCCUtEFrjbv4IO6lKVcPUVQtMIeFGVB0T +KR8v/fK7TQtOJdnkHvqE55vNVCPqtMHE+7c/32cmUpBfSyg6bgabQ6MS1e1M +tCktUGge6cJMUERW7hATedAuzGod1AWpEu31+sP4vqrc6XZz0QWd9o3Cpdjc +qXnPq4N1oWmPvOSHEXzfkobt7uTrgkWagSRrDH9P490SNVT0oDP2/jfDaby/ +1y20Hfj04fyHsJua80z0KEDVurDeAKy0TodbirBQUxAyvJhmDN3qLR/Dd7CQ +kmvrwaM+O2A4zng+gsFC9KWiXIUQAKs4dmtjNgtJjxTzS3uYwv0teQap0ywU +qLe9844mBS4Y+I0qmAwgj7GFGvHh3RDY+fDBmqsDKMeUwZ/cuBf427alJzAH +0JMZ7/+yY/fD4VDR815mg+j3LplPVZHm4Jzm2uqcP4i6OLinet0toeg0W++d +2hDyXXPy9jkVKxB+yKc+9WAI5XrVVNyLsoaP9UJX7RWH0ZlfsuyNXjbwZmKy +PyttGM0e2HP4wzFbuDC7i//tzhFk7Byzi2lzCHbGtI7kd42gL7KJ3lV6dvDa +VpCVHDKK5J5eeJ2xwR4oa3b1dmmOoeIeTYuDwodhlZhgSXPbGFrbMnk8aOww +mHfzf1O+Mo707sVkP+45At2S73LvHpxAiTy/tO9UOoAWSZvi5Z9ERbt0OqJK +HKGDvOPO8p9E8YbXRBeynMBzKGbhYdckavyedknvhjOUfE8SX0+ZQoWWCap+ +Z10gNUZzn0rhFJo6cYjDl3YUdJz1WG/XTaPZPRqe42ausLSQXFV9ZRpljH37 +zdh6DPJkNjulzE0jh0dp1KNCbuC7yunQCtov9PKF+THuy26wd033w2stv5Cx +/Jc/V/+4QUOZKVXGZAap9Bzv+OzlDgZhAv8wEmZQv+A/Vgl97pBjpxV9nnMW +NUUfpO619wCui+O+qU6zKDY4WfBUkwdQZ/8wzhXMotflS3+o+6lg+myYMcRD +olUucFmvlAqCPGn+AvtIpCjxoXHNayp01aU+kd9Pos31ljJ85VSAgRfGmw6Q +yHa7c2b7f1Sgpa69am5Botg1QXXhH6lQfq2k6Lw1ieS6nq2qaaeCrf+ibLMD +iVRdpeNd2FTo3G7oO+dJImO38YwofRrwK81LHLlMoqcPJhkHt9Igae/8M50r +JJJont4pbUQDAaldOfxXSTS+m92SYUKD1vOzY4XXSPz94uCsN6WBVN8JqmA0 +iUTYoo5iNjR4KGo99yCWRP03DVYmn6DBoGhiKeURiaLLwryKn9LAwKVk8kMx +iU7oxhkHZ9Bgmr3RLaiERBaZ+SuNsmjw4oL7VtVSEgnEsTJf5dCAl+u2VEQZ +iaICrIeLCmigf9kpVbOcRGEaqv8UvqMBWbRQS1SSyDuuzudFNw2ElEvOen8i +0X4R1vaAHhpwnGJd5W0g0YYoDmHdnzQ4M9k9m4zNCjDIyWfSgJFSMvulkUTu +B5PHno/SIORTa8yWLyRy4GX45s3RwLeSV/nzVxLtZcj5ZUvRwfLEyu/xP0j0 +LvnSgTsydJi7nB+ysYdE2+unVYPl6DAipOL8BnuzWt03s7V0KGJ/Z3b3kki2 +LdTsuxodFqo4pWX7STSyrUtKwIAOdX1X6rwGSXSLK+XN8UN0mF48/Sh0Es9f +Ryje0p4OElMHnEnsi87BAXpH6HBWkcfOb4pEwQXW65ec6FA8/orTYxrXT3DG +3Pegw+N2SfPtMyTSq/Wgvfenw+feN+H1+L+nLUZNUOU2HSzeWmc7/SVRLhL2 +HIyhwzNf8XNF2BfHZqpy7uL+FQNZoksk0t1fFWEUR4dOmdDF99jRHNRpyyQ6 +VDy0SFDnZKM9J1O+BWfTQVREMP8DNxspKFzZujOXDjpeYQ0yPGw0U3vyLvdz +OrBXs5AXdqo6sox+SYfJVLe1K3jZaLGrq+JxKR3SWNo1O/jYqMBCPqOhhg63 +9p//78oKNro+x8UbW4vHnxKRbsT2yBh2d6yng6Fw4luJlWy0mqdUvr+RDr8z +Lq5MwvYpc7j15ysdGCfnIjIE2EhF836QKpMO95XK+hOE2GiuLbx5iIXrn5yj +tmM3RdE35w3SwX+fp4G4MBtF9OoPG4/SYcvxfxsuYXfENx+1+kWHS2zZb3QR +NrrDL7r7DCcB3naPKNyr2ej1dJdzIDcB6yhHw42xB7qyAnx5CTjL/ajTF3t7 +ASXFYyUBFQFXRdqwWW7B8wdEcf83PjsTRXH9FrvFdosT8MZ6JrMe28RQTANJ +EvDOIcFkHvu2cPZhPVkCQg3XfrYXw+2lP/LllQj4cSqjkkOcjYi07BpJFQJW ++065amDfvh3yY5UaAXJ0TkUbbBYhLsyjQYBSsaV40nK7+F7P0c0E0LmvvNGS +YKPSv+KRLF0CYsLZUVbYzKGeez36BHxh/GT4YW+rOFPZYoTrM15ZkYfd75O7 +9g0QUKRTJqMqyUYiDqEGr0wJcOFXF0LYxmb7LPIpePyvDaqO2NGyP0PS9hHQ ++Pbt+2vYxTx5t5MPEHBebt4yFbtvIjT9gQUBQyNO88XYRtWSrTetCVj47ve+ +D9sj/+fIZVsCquflf7KxbybkcZ23w+sR26oiKMVGPwP2bw5yIEAm0U1KB1vY +VWqvnxMBnY0bPiBso/19R71dCDDmHEuwwr65Lvy6qxsBJtaOr3ywiwUOpDp4 +4PzpP/Mhy3mzUiW2NALeJ16mX1rO6+1rtCAIOKq49CtmOa/+OWuPJwGrzh9N +T8D2eBW+CN4EJHOlRD5dzk89IGHiQ4CqXFVY3nL+TemNBr4EiIR8SHq1nB/c +v0vHD9e7IoNZji1Ey3fQCCDAdpBq8x7b0CripEogARqMP721y/nbzC8pBBFg +t+14XCP2DTWZROlgAib5s/2bsYtWM1+KnsH72V3t9xW7dz6/VjCMgLDfRbHt +y/kDEb28EQTYfAzt+oa99Yv576VIAmgLEuYd2P8DYikDMg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6743603737065542, 1.443079274453134}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6743603737065557}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6743603737065542, 1.443079274453134}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6743603737065557}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0VVscB3CzMpV5SpmLQhlCqv2L24gMUaaEe+8JT8KVyNSkOaUU9Uwp +GTKkkKHkRRJCIRIi7jWPcW4Z8rY/zjrrs/Ze3/3b01lHyeOkLZ2Lg4NjED/L +b/8G7fWvmhp26ht+03eJZaKd408MPCjZaIfcl+PL7kneGqtKeY1qzEs4jmJb +0z7xCem9R9pN0UvLzg+OrOSl1KOOXFvaMeyr1TIVkVmfUe8Uj447dkmTf9KC +bisKeZp2jIo93FEbFlLWjso79Uk6thxTxZk060Tx6S+mPbHNJ8KMGfU/kJDC +Onsf7PKFYcHgrF5UYX9GwQ/76znp0CLfPpR2oso8EHucjzI8o8tE9hcWfwRj +893wc9Rjs5BtsVpHOPZa0cQa/7JBRNmyY9sF7IPy5NNxs1Hkf2vbplvYRIqy +lNaKcWRVr1h+DztSzSrqn/oJ5LxAFiZgt0u3bAnMmkI7eQPbnmHTnLy97t6Y +RvKW8pwF2JMJHI9e+P5C0sTL26+xVyhrrZ7SnUURK1/1NmDH0ir3rpYkkZWc +yuN2bMV0x0gdNol+rThX+xPbaNOl8RNlv9GNbHHz39ieW3/UD5stoLqhBPEN +95hoJvgUj4D6ImrJT+ExwD5bJrhdY8VftGEx3tkUOx6Mnh2vX0Kd6Z4mrti0 +tBpKQBYnGBbfevcQO6v6bs85eS54P2nal4U9OeAaFnODC2qFxr3KsMM0Z18+ +9+WGwq9amV3YsXlKKhO6vHA2031C/T4TdTSNlv99zAsDPb1oG7bi9CsnEUk+ +CJZyJS2xs/UP3tFi88GHCot7QdhVJWc4fcpWgMh98X/rsWcrm38MmgnB7fGW +6utxTCRmIbQ6tFwIMuv109KxN7dQQNhYGCh14fOV2N79hSlbtEVAabFh1V9s +P676zTuEVkNjx9W20/FMxFTOnYoiRcGk27z/3AO8PkTtykY9Mbj3uXhXGjbX +M5aSjL8YaHMrSn/EVtRbZ5s1IgatM70aYg+ZyMns9ouGHnEwLz08kYndSA1g +SNdJQo6W+vzEv0zUnR593W2FFNRKNLXLJTDR6EjW48zdUpB45Kr2HmyBwL5m +kwop6HmnY5qETblop+9WKA1uzacE7BKZqPTJ1tmMZFkw+guKX5OY6AlzLmhb +oAJQvwT66Kcy0T77y92MHAUQMvI55Y09WiW+J4elANNhaCAFW//JJklFx7Xg +uhjJu+oxXk8P15e8O9dB1+i9TZPY0xM9pwcvKMLrP5fVq9OYSPwEpeClpTLU +VBe0VmQyEeuJgKe1tzKMeDEWubOYqLizSX7skjKou+2J3ovtYnH0gnqFMmyR +3zLSiP1kY5DtA10VeECxucN8hscfTp+MkFYFp/Zzcaq5TGR3XFDrQK8aeD/3 +ujH1golQkL3ukUU12HrOZw+8ZCLNqGRDmqw63NV7Tr+FzfFYzzTCRh12LHG1 +aBcwUU6385EX/6nDjKSEX0Ahvp+Hs8/Jpa6HarXOdKFiXB/F8uuwhwZkFBxU +v/mGiR4fivvOjtCAcbHuG4PY0R69PTz/aoBY0B8HSjk+32dPjaxt1gDCrVtp +EVv0dSLHITNNEJlID2JU4POjN65ZprIR1NpCtRmVTCSvfCvyev8mcEkrHyr/ +yESvr81o/OHSAvWEpG6dWrwevxxbCCUtEFrjbv4IO6lKVcPUVQtMIeFGVB0T +KR8v/fK7TQtOJdnkHvqE55vNVCPqtMHE+7c/32cmUpBfSyg6bgabQ6MS1e1M +tCktUGge6cJMUERW7hATedAuzGod1AWpEu31+sP4vqrc6XZz0QWd9o3Cpdjc +qXnPq4N1oWmPvOSHEXzfkobt7uTrgkWagSRrDH9P490SNVT0oDP2/jfDaby/ +1y20Hfj04fyHsJua80z0KEDVurDeAKy0TodbirBQUxAyvJhmDN3qLR/Dd7CQ +kmvrwaM+O2A4zng+gsFC9KWiXIUQAKs4dmtjNgtJjxTzS3uYwv0teQap0ywU +qLe9844mBS4Y+I0qmAwgj7GFGvHh3RDY+fDBmqsDKMeUwZ/cuBf427alJzAH +0JMZ7/+yY/fD4VDR815mg+j3LplPVZHm4Jzm2uqcP4i6OLinet0toeg0W++d +2hDyXXPy9jkVKxB+yKc+9WAI5XrVVNyLsoaP9UJX7RWH0ZlfsuyNXjbwZmKy +PyttGM0e2HP4wzFbuDC7i//tzhFk7Byzi2lzCHbGtI7kd42gL7KJ3lV6dvDa +VpCVHDKK5J5eeJ2xwR4oa3b1dmmOoeIeTYuDwodhlZhgSXPbGFrbMnk8aOww +mHfzf1O+Mo707sVkP+45At2S73LvHpxAiTy/tO9UOoAWSZvi5Z9ERbt0OqJK +HKGDvOPO8p9E8YbXRBeynMBzKGbhYdckavyedknvhjOUfE8SX0+ZQoWWCap+ +Z10gNUZzn0rhFJo6cYjDl3YUdJz1WG/XTaPZPRqe42ausLSQXFV9ZRpljH37 +zdh6DPJkNjulzE0jh0dp1KNCbuC7yunQCtov9PKF+THuy26wd033w2stv5Cx +/Jc/V/+4QUOZKVXGZAap9Bzv+OzlDgZhAv8wEmZQv+A/Vgl97pBjpxV9nnMW +NUUfpO619wCui+O+qU6zKDY4WfBUkwdQZ/8wzhXMotflS3+o+6lg+myYMcRD +olUucFmvlAqCPGn+AvtIpCjxoXHNayp01aU+kd9Pos31ljJ85VSAgRfGmw6Q +yHa7c2b7f1Sgpa69am5Botg1QXXhH6lQfq2k6Lw1ieS6nq2qaaeCrf+ibLMD +iVRdpeNd2FTo3G7oO+dJImO38YwofRrwK81LHLlMoqcPJhkHt9Igae/8M50r +JJJont4pbUQDAaldOfxXSTS+m92SYUKD1vOzY4XXSPz94uCsN6WBVN8JqmA0 +iUTYoo5iNjR4KGo99yCWRP03DVYmn6DBoGhiKeURiaLLwryKn9LAwKVk8kMx +iU7oxhkHZ9Bgmr3RLaiERBaZ+SuNsmjw4oL7VtVSEgnEsTJf5dCAl+u2VEQZ +iaICrIeLCmigf9kpVbOcRGEaqv8UvqMBWbRQS1SSyDuuzudFNw2ElEvOen8i +0X4R1vaAHhpwnGJd5W0g0YYoDmHdnzQ4M9k9m4zNCjDIyWfSgJFSMvulkUTu +B5PHno/SIORTa8yWLyRy4GX45s3RwLeSV/nzVxLtZcj5ZUvRwfLEyu/xP0j0 +LvnSgTsydJi7nB+ysYdE2+unVYPl6DAipOL8BnuzWt03s7V0KGJ/Z3b3kki2 +LdTsuxodFqo4pWX7STSyrUtKwIAOdX1X6rwGSXSLK+XN8UN0mF48/Sh0Es9f +Ryje0p4OElMHnEnsi87BAXpH6HBWkcfOb4pEwQXW65ec6FA8/orTYxrXT3DG +3Pegw+N2SfPtMyTSq/Wgvfenw+feN+H1+L+nLUZNUOU2HSzeWmc7/SVRLhL2 +HIyhwzNf8XNF2BfHZqpy7uL+FQNZoksk0t1fFWEUR4dOmdDF99jRHNRpyyQ6 +VDy0SFDnZKM9J1O+BWfTQVREMP8DNxspKFzZujOXDjpeYQ0yPGw0U3vyLvdz +OrBXs5AXdqo6sox+SYfJVLe1K3jZaLGrq+JxKR3SWNo1O/jYqMBCPqOhhg63 +9p//78oKNro+x8UbW4vHnxKRbsT2yBh2d6yng6Fw4luJlWy0mqdUvr+RDr8z +Lq5MwvYpc7j15ysdGCfnIjIE2EhF836QKpMO95XK+hOE2GiuLbx5iIXrn5yj +tmM3RdE35w3SwX+fp4G4MBtF9OoPG4/SYcvxfxsuYXfENx+1+kWHS2zZb3QR +NrrDL7r7DCcB3naPKNyr2ej1dJdzIDcB6yhHw42xB7qyAnx5CTjL/ajTF3t7 +ASXFYyUBFQFXRdqwWW7B8wdEcf83PjsTRXH9FrvFdosT8MZ6JrMe28RQTANJ +EvDOIcFkHvu2cPZhPVkCQg3XfrYXw+2lP/LllQj4cSqjkkOcjYi07BpJFQJW ++065amDfvh3yY5UaAXJ0TkUbbBYhLsyjQYBSsaV40nK7+F7P0c0E0LmvvNGS +YKPSv+KRLF0CYsLZUVbYzKGeez36BHxh/GT4YW+rOFPZYoTrM15ZkYfd75O7 +9g0QUKRTJqMqyUYiDqEGr0wJcOFXF0LYxmb7LPIpePyvDaqO2NGyP0PS9hHQ ++Pbt+2vYxTx5t5MPEHBebt4yFbtvIjT9gQUBQyNO88XYRtWSrTetCVj47ve+ +D9sj/+fIZVsCquflf7KxbybkcZ23w+sR26oiKMVGPwP2bw5yIEAm0U1KB1vY +VWqvnxMBnY0bPiBso/19R71dCDDmHEuwwr65Lvy6qxsBJtaOr3ywiwUOpDp4 +4PzpP/Mhy3mzUiW2NALeJ16mX1rO6+1rtCAIOKq49CtmOa/+OWuPJwGrzh9N +T8D2eBW+CN4EJHOlRD5dzk89IGHiQ4CqXFVY3nL+TemNBr4EiIR8SHq1nB/c +v0vHD9e7IoNZji1Ey3fQCCDAdpBq8x7b0CripEogARqMP721y/nbzC8pBBFg +t+14XCP2DTWZROlgAib5s/2bsYtWM1+KnsH72V3t9xW7dz6/VjCMgLDfRbHt +y/kDEb28EQTYfAzt+oa99Yv576VIAmgLEuYd2P8DYikDMg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6743603737065542, 1.443079274453134}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6743603737065557}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6743603737065557}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6743603737065542, 1.443079274453134}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9913206956809444`*^9, 3.9940751880749063`*^9, + 3.994350133318821*^9, 3.9943532422842493`*^9}, CellLabel-> - "Out[104]=",ExpressionUUID->"8cb384bc-2548-4cf8-9143-ddaa04a8d819"] + "Out[103]=",ExpressionUUID->"d59f79a7-9dc4-4e85-aa98-9868d247d05d"] }, Open ]], Cell[CellGroupData[{ @@ -6754,274 +7110,160 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917994543716736`*^9},ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-\ -9aed2c391662"], + CellChangeTimes->{3.9917994543716736`*^9}, + CellLabel-> + "In[104]:=",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3559275616020787`*^-274\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.4738819204539318`*^-264\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 104, + 9, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350133860818*^9, + 3.994353242845593*^9}, + CellLabel-> + "During evaluation of \ +In[104]:=",ExpressionUUID->"303d185f-8596-4161-b120-54414fdb1979"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.983406184714352`*^-276\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 86, 9, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696298666*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 104, + 10, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350133860818*^9, + 3.994353242857492*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], +In[104]:=",ExpressionUUID->"eab43a39-eec6-496b-aad3-9df1cdebd5e0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7743624682465165`*^-285\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.684961112366497`*^-287\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 86, - 10, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696309664*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, + 104, 11, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350133860818*^9, + 3.9943532428668957`*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.227765210043865`*^-297\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 86, 11, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696318653*^9}, - CellLabel-> - "During evaluation of \ -In[86]:=",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], +In[104]:=",ExpressionUUID->"0659e774-10c1-4021-9a85-8eea2d006965"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 86, 12, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913206963286114`*^9}, +during this calculation.\"", 2, 104, 12, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350133860818*^9, + 3.9943532428756037`*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], +In[104]:=",ExpressionUUID->"d434fc56-f7cb-4999-82ce-d0bb99c57ece"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8le8bB/BKi5DsjJzznIMysyPHddEwKqVkVfYsJEpoCBkVJQ3lS5FR +1jmPviUjZVWSRAlRlObPFpJKfvf3j+f1vN5/3K/XdY/rc99M9/3bvebNmTPn +J/n++//oeVrPPpNjYtF+xny+Psek7Zp0uGlnNLSWSWblPJMBlHjhLt2ZAuPf +P1f4PFOB0G0FHXydN0DxrkM6PjOCZcNSKdMdt8HsfLSLwDMr6L1vvX+ioxa6 +5LYneTY6wUZ2/7uxjpdQmEhNf3myF6Y7DC6NdvRB4gHZytmqCKhbdzOn9cY4 +vDxZkMigz4Bcb/kXd7UZ2BL17mv87osg7u9SsGgdH7bY/5ndHJsGKVobK613 +LsY4zxz3gcBMeHNldfWYiBB+Nrh9W0U3G87kRL6Yt3wZivh0v5OZygWpix9P +XcgQQ0oCKg743IJ4W0uTlz8k8IKDQJLV3gKQudMsM2+uJCoYZr0LCC4Arpjt +lNYSSZzY2CCTGFEA7S+d6fMKkliRM2RXfroA2DYHKRsLSbT59LeyvaAAardc +X9hyVRLnCrT5yfUXwMzGyebnxlLYsWVU/blnIYQYZrk8jZbGQ6YCh65YFYFV +pvDEpkRp7Cptkv2zrQioRUcTmi9J42OtENVd9kXQ0mZX8uqWNDby/ROzxLMI +NIIE+XqapdFpV5+A3rEi+JZ3OO+7zHL8fe+eRCG3CHaLWw/J/rscdWGuK0O4 +GNaP/IoI/CiD9vntH+UfFkO4xUWVmkEZvJQgesukvhi4WepdYj9kUOm49qjT +02KQtnU1LF8sizn2SUviXhXDYNmjKT4NWeQFjO/N+1oMF6KTD14Nk8XEwI23 +ly7lQp+EUmC9kBxWl/1pjHHigtT+h/JSUnK4qVWlS9yFC5sbHJ77MeSwJOXZ +3iwPLpRGnFFbqiOHYitdRYr9uXC6d7Tf0UEOpReM+p89zgXt/EqfkRtyGNEn +EBSexYUoYxs3mTXyGDFYNT36kQsWzte+G5jJ48z8eGPLb1wQPjEQs3OzPJqL +SxmkD3IhvS42L9lVHqVn9Gy1J7lQZlUxsPCUPOZbeesoLOTBqAMrdPyNPJay +JW//VuKB86HJ001HVqCEtZBbjScPFFPN5PpjVyAjNlLggC+PzP9c8aLkFZip +0hQi68+DiD+rWsxyVqCfrX28awgPLsU4S5Q3rcDyAP37hVE8aDr/5HquvAI6 +etWWbMzggRH36p3jDxVQuaG74nwLD9Z3NM8MNyjgOy32Lu9XPLCeM9/c5aUC +zlWUPKTfzgOP7YFv4LMChhTlST3t5sHGI8zIEwsYOJf/JKvsCw+CFH5km6oy +0NKtu7zqNw8m/01umNZk4JW2o6us/pL6LFSHSnQZWOo0K+g3h4bYA676lAkD +O+MboX8eDWl1jQ3zbBgY1Rt4t3URDfU+14fqQhmoN7d7ud4yGiz/GIoePcJA +29dvQ+1FaWhObtPXPcHAmqv7rhwWo+FNOf+JnFMMTIuzUCmRoGF4yUHR2HQG +zkY9SeaXoUGatjDYWMvAV/dKbm2laPD/OXaiQYiJO+t95HS0aDA64C35RZSJ +Gaz8UYY2DYv7uwr5pJlYFvJ5taAODbndde0mFBPbR+ZNdenS0PPgktpdfSYm +FH/IdVxDw9ZYw84sFyaufdw42m1Cw4q/xQEPPZlYsnJleSbQMBhK8b3zYyLd +kjbhjjQk+C7RkD7IxNmi9Me9pjRUb3oXczaBifw8k08V62nQFo3SPFLCxEOX +vA5MWdIw58xk/ZVSJj45Y5JzwYrMn2+vU2klE92Sv9qob6Jh3+T22LFHTKz/ +UqzguJmGnE52t08XEzfEWV1IsaYh2OZqUGwvE4X9ewpkttKAjUILsz8xMWCz +k2km8bvKH6t7hpl4cDtzKHsbDZLXG+Js+SjsmKWtk7bT8EmKIxe8mMKb0hv8 +5+6g4XZySck5IQr/GswKhhBvjU572yhF4YXKpV3WtmR+Xv7apmoUGj37X8m3 +nTTY9bx/4qxF4abvY1MWdjSw7XfuOapPYfE/MY/yiKstTBLuIYUTq05MO9nT +MK0q0qO+k0I+1s22XAcafmTIROk4Uajn8n3BGPHEUkW2oQuF7QNCXYaOZL/H +Dfeu96Mwd+STfz3xgNd6IatACoW0ytUWOtHwrcOa3hpCYaHdufMbiPsqPX44 +HaPwVmrY5iriXvXAq67RFA5k3cqeJH57PczYO57CIwHiN1R30dAekxR94DyF +aU09l5OJX02mKh6+TKG+n/PZh8QtPjcajv5D4eXOXZqDxI2b7gkn5FIY80Yq +yGQ3DU+qakqSCiisifkt4klcr9lke4FH4SGtm3viiWuy2qeu3KFwdQnX7hbx +A7EPadfKKXxhk/fnMXFl7AAn5wGFq/qobR+Jy6Ym3+fXUcijy21miO/6zTnJ +a6CQOjNnnsQesj/dAsp3n1Oo+yDJTYWYt0WiseIlhYYSP4M4xEUPFQKqOyhs +ftO+2po4X0tF5PFbUu+rmqzdxHnZuv8++0BhrLlNvS9xtgTYtX6h0Pyn/NVg +4sx4y+n2AQrVFWsYEcQZ0zvS345SaHC6bVckcdo+Z+ibpDDb5btVNHHqO9++ +r78ovOF4d/g/X9waEjs0S+H4zTLzKOLzNcdWjs9nYfpkqt0x4rM6Cc9+8rPw +uO+I7GHiM7kpgX+FWbg8a9eVQOIEqYxl88VZqFAR3uRBHHvq5h3+5SyUt/ha +Zkcc/bvEfukKFuo6mjmbE0cG3P8lzmLhnYOrqvSIj/Y+zpBZycLqtLXtTOJw +m1ZkqLNwyXrpgiXEoXXdHxW1WbjPzcVwnKxviN6XOFUDFkbvKjnZSRx0c3SV +ljELw0R5iZXE+84sCDLeyMKe0zqvI4h9Z5aKmW1iYbfzX0l7Yu/9MqXm21jI +FJ+R0iJ23aH5Z7sTCzc7spx6yHnZ88jwuoMLC6vyU9JLiJ0M1ps5e5Lxux5l +RhPbyjom+AWy8LIv/5g8sU2Sh+r+ELJeSt4m38h5tZ4NaD4YxsJgQfltNLHF +x2jxE9EsdOPXqzMkNi4syrx8mYWMt76/tEh/dDMKr2/4h9Sbttx1hPRTxOX8 +axPXWaj4mvmmgPheVF769nwWlhS7LZIj1nbIvCJ8n4Whf154fCX92vr8WmpV +NQtjbPaFXCIOWpdx2f8RCx+cLUszJeZqpF1sbCbrvTJd+yLp/1ULLibHfWBh +Pm9uKkXyoSEi5ZzeFxbufp0dUkPyw3s0+eynfhYKL/LxdybO6U5KNJtg4WuV +s3dSSP4wbscn/F3IxihrBu/Tf/nkcuREqBobt3W4NGlsIee/LTxSUYuNAuxR +Lo/kn61V2PE2PTZGfqks1SBO0Tt0VBvY2L3Mfo0yyUshwf1hwzZsNEr9LDaP +5Ov8cvcg78Ns9Mq+yXMh+Zut4bZf4igbfwqLqtWto8EsxyWw/gQbW9kKHWzi +yHO7/anTbNRcE1vZR/L7l5edb086G0WUNjdbkLwfE7Vytatl47qYxdkPDGno +9Kda9j5h43ojzrlJcl9UP/4FkU1sdNgQ6qFCnBxRqHCrnY3+D6SfJOnTsLpP +sHe6n437rqmeX0vun8CSF3syxBRx+J5cn44aDf1bd+765KmI11R2SGbI0fAy +X/3ZTz9FNEufPpsiS0MF38K1QvsVUU/cnz+O3H+n7pXK6IcrYnn2/EU+0jSs +VJDuik9SxLsjZsbLxGnwGe5yUC1VRBGRMctFS0jeJ7raBS9SQuOO3n9nh3kQ +2K9GrRZUQl+Ze2ZpgzyYMp8eGhJRwtwXufFa/TwQ4EuJ9ZNRwhYrP0O7zzxY +HV53x1VdCYviZjzCyHvhmJeS2NYdSij93VaU+YQHkiaDL1SvK6G72+QLoXQe +WI4ctvysr4wqyQHvc415IKe1Im6xsTLW3Hm+Rs+QB8PB9bWqpspYVPOSWaPH +g4s/RIyDNymj1KR7cbMGD3pm8jVmXZQxcW1bbzWDB8GCb8WWn1LG0+NDu/nm +8yBtFfZs7lZG/+5zTOEGLgx6LA65E7kS4667K9zcyCXvf6l58bWr8OAjvzxB +5WIQfa50lh5RwdDhxHrdn4Ugl8Dbpq+vhrXKWz77nS+AK6qGImI+6lhVeGOu +o1o+NMqY6o2f18DHOqY+YQ9vgpFcbbJmuyYad14xM1qVB8J8Nw66Ra9Gv5d3 +8qryc2BFlIKxo5IWfnj7D7NTIBv4FXeXbn+ihZjspKYfngUanOW8w3u0sdY0 +KzFuSSYE94jWWc3RQXenpfnh0hkwMp640/KKDhZ2CbTr7UsDc83HaZbquljj +UTv2biAVHoyv/T3VrIt8974INu25BIFq2l2tXnrofOuc/W/qAnCGPdsc+fVR +7XpWbeGnZNjAlt4idEMfZ3c83bRvKAlWnjgdVmtggH2qa3b0hJwGFS/Dh4pd +BsjNUIp6sCAevB74nrxzYA3W8JakSTFPwsPMNs8xCUO8KqL76N9tUTBxa3ZK +854htpX+yTYoOwYeioX8aVuMUC/1eencm+EwpnJB//aoEc6o15oL1R2Cspzf +HyYT1uKNX6tEjC8Gg9N6Fq5dYYyp6rNmj3n7QTYgvlyj2hi9C8wyf8bvBQkB +/5It9hxcvm67wxY3b8hZdyxi1JGDdlnhIbLbvEH72Nl1F3ZzsEdfs3fCxBus +R+nXnW4crPbfdP6pnDfEtU9Oe/hzkDJ8/HC60wt+3og0i4jioGVV3MagHV7Q +tfbCq7xCDvJavLae3eYJvody0i25HHQssz9ciZ7wg3vXa5DmYHDHe6Px1Z4g +SnVOaZVy8OJU5PHoZZ6wabG8XFU1B78NVu5WeOUB99vyPF+95qCQV27mFgcP +sBIuUw/t5CBq5fQzLT2g0/zpD+luDrq+EAqbY+QBExUDCc7vObh4mbX5W1kP +UM9aXfy/fg7OlIsrCL93h/tdpqGJQxyMHhkd0Gl1ByvxHaA5ysHXfJUtHrXu +4B1/qPXgJKlfIrzpQ447TFTHpUn95KDm5qxOzcvuEP0r1aPiFwfvtyl8jY93 +BxHdfLU9Mxz0+pDy/X9h7nAtoGJydpaDYeZpkzv3usP/ARhB/3o= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7035,233 +7277,111 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV1nc8le8bB/BKi5DsjJzznIMysyPHddEwKqVkVfYsJEpoCBkVJQ3lS5FR +1jmPviUjZVWSRAlRlObPFpJKfvf3j+f1vN5/3K/XdY/rc99M9/3bvebNmTPn +J/n++//oeVrPPpNjYtF+xny+Psek7Zp0uGlnNLSWSWblPJMBlHjhLt2ZAuPf +P1f4PFOB0G0FHXydN0DxrkM6PjOCZcNSKdMdt8HsfLSLwDMr6L1vvX+ioxa6 +5LYneTY6wUZ2/7uxjpdQmEhNf3myF6Y7DC6NdvRB4gHZytmqCKhbdzOn9cY4 +vDxZkMigz4Bcb/kXd7UZ2BL17mv87osg7u9SsGgdH7bY/5ndHJsGKVobK613 +LsY4zxz3gcBMeHNldfWYiBB+Nrh9W0U3G87kRL6Yt3wZivh0v5OZygWpix9P +XcgQQ0oCKg743IJ4W0uTlz8k8IKDQJLV3gKQudMsM2+uJCoYZr0LCC4Arpjt +lNYSSZzY2CCTGFEA7S+d6fMKkliRM2RXfroA2DYHKRsLSbT59LeyvaAAardc +X9hyVRLnCrT5yfUXwMzGyebnxlLYsWVU/blnIYQYZrk8jZbGQ6YCh65YFYFV +pvDEpkRp7Cptkv2zrQioRUcTmi9J42OtENVd9kXQ0mZX8uqWNDby/ROzxLMI +NIIE+XqapdFpV5+A3rEi+JZ3OO+7zHL8fe+eRCG3CHaLWw/J/rscdWGuK0O4 +GNaP/IoI/CiD9vntH+UfFkO4xUWVmkEZvJQgesukvhi4WepdYj9kUOm49qjT +02KQtnU1LF8sizn2SUviXhXDYNmjKT4NWeQFjO/N+1oMF6KTD14Nk8XEwI23 +ly7lQp+EUmC9kBxWl/1pjHHigtT+h/JSUnK4qVWlS9yFC5sbHJ77MeSwJOXZ +3iwPLpRGnFFbqiOHYitdRYr9uXC6d7Tf0UEOpReM+p89zgXt/EqfkRtyGNEn +EBSexYUoYxs3mTXyGDFYNT36kQsWzte+G5jJ48z8eGPLb1wQPjEQs3OzPJqL +SxmkD3IhvS42L9lVHqVn9Gy1J7lQZlUxsPCUPOZbeesoLOTBqAMrdPyNPJay +JW//VuKB86HJ001HVqCEtZBbjScPFFPN5PpjVyAjNlLggC+PzP9c8aLkFZip +0hQi68+DiD+rWsxyVqCfrX28awgPLsU4S5Q3rcDyAP37hVE8aDr/5HquvAI6 +etWWbMzggRH36p3jDxVQuaG74nwLD9Z3NM8MNyjgOy32Lu9XPLCeM9/c5aUC +zlWUPKTfzgOP7YFv4LMChhTlST3t5sHGI8zIEwsYOJf/JKvsCw+CFH5km6oy +0NKtu7zqNw8m/01umNZk4JW2o6us/pL6LFSHSnQZWOo0K+g3h4bYA676lAkD +O+MboX8eDWl1jQ3zbBgY1Rt4t3URDfU+14fqQhmoN7d7ud4yGiz/GIoePcJA +29dvQ+1FaWhObtPXPcHAmqv7rhwWo+FNOf+JnFMMTIuzUCmRoGF4yUHR2HQG +zkY9SeaXoUGatjDYWMvAV/dKbm2laPD/OXaiQYiJO+t95HS0aDA64C35RZSJ +Gaz8UYY2DYv7uwr5pJlYFvJ5taAODbndde0mFBPbR+ZNdenS0PPgktpdfSYm +FH/IdVxDw9ZYw84sFyaufdw42m1Cw4q/xQEPPZlYsnJleSbQMBhK8b3zYyLd +kjbhjjQk+C7RkD7IxNmi9Me9pjRUb3oXczaBifw8k08V62nQFo3SPFLCxEOX +vA5MWdIw58xk/ZVSJj45Y5JzwYrMn2+vU2klE92Sv9qob6Jh3+T22LFHTKz/ +UqzguJmGnE52t08XEzfEWV1IsaYh2OZqUGwvE4X9ewpkttKAjUILsz8xMWCz +k2km8bvKH6t7hpl4cDtzKHsbDZLXG+Js+SjsmKWtk7bT8EmKIxe8mMKb0hv8 +5+6g4XZySck5IQr/GswKhhBvjU572yhF4YXKpV3WtmR+Xv7apmoUGj37X8m3 +nTTY9bx/4qxF4abvY1MWdjSw7XfuOapPYfE/MY/yiKstTBLuIYUTq05MO9nT +MK0q0qO+k0I+1s22XAcafmTIROk4Uajn8n3BGPHEUkW2oQuF7QNCXYaOZL/H +Dfeu96Mwd+STfz3xgNd6IatACoW0ytUWOtHwrcOa3hpCYaHdufMbiPsqPX44 +HaPwVmrY5iriXvXAq67RFA5k3cqeJH57PczYO57CIwHiN1R30dAekxR94DyF +aU09l5OJX02mKh6+TKG+n/PZh8QtPjcajv5D4eXOXZqDxI2b7gkn5FIY80Yq +yGQ3DU+qakqSCiisifkt4klcr9lke4FH4SGtm3viiWuy2qeu3KFwdQnX7hbx +A7EPadfKKXxhk/fnMXFl7AAn5wGFq/qobR+Jy6Ym3+fXUcijy21miO/6zTnJ +a6CQOjNnnsQesj/dAsp3n1Oo+yDJTYWYt0WiseIlhYYSP4M4xEUPFQKqOyhs +ftO+2po4X0tF5PFbUu+rmqzdxHnZuv8++0BhrLlNvS9xtgTYtX6h0Pyn/NVg +4sx4y+n2AQrVFWsYEcQZ0zvS345SaHC6bVckcdo+Z+ibpDDb5btVNHHqO9++ +r78ovOF4d/g/X9waEjs0S+H4zTLzKOLzNcdWjs9nYfpkqt0x4rM6Cc9+8rPw +uO+I7GHiM7kpgX+FWbg8a9eVQOIEqYxl88VZqFAR3uRBHHvq5h3+5SyUt/ha +Zkcc/bvEfukKFuo6mjmbE0cG3P8lzmLhnYOrqvSIj/Y+zpBZycLqtLXtTOJw +m1ZkqLNwyXrpgiXEoXXdHxW1WbjPzcVwnKxviN6XOFUDFkbvKjnZSRx0c3SV +ljELw0R5iZXE+84sCDLeyMKe0zqvI4h9Z5aKmW1iYbfzX0l7Yu/9MqXm21jI +FJ+R0iJ23aH5Z7sTCzc7spx6yHnZ88jwuoMLC6vyU9JLiJ0M1ps5e5Lxux5l +RhPbyjom+AWy8LIv/5g8sU2Sh+r+ELJeSt4m38h5tZ4NaD4YxsJgQfltNLHF +x2jxE9EsdOPXqzMkNi4syrx8mYWMt76/tEh/dDMKr2/4h9Sbttx1hPRTxOX8 +axPXWaj4mvmmgPheVF769nwWlhS7LZIj1nbIvCJ8n4Whf154fCX92vr8WmpV +NQtjbPaFXCIOWpdx2f8RCx+cLUszJeZqpF1sbCbrvTJd+yLp/1ULLibHfWBh +Pm9uKkXyoSEi5ZzeFxbufp0dUkPyw3s0+eynfhYKL/LxdybO6U5KNJtg4WuV +s3dSSP4wbscn/F3IxihrBu/Tf/nkcuREqBobt3W4NGlsIee/LTxSUYuNAuxR +Lo/kn61V2PE2PTZGfqks1SBO0Tt0VBvY2L3Mfo0yyUshwf1hwzZsNEr9LDaP +5Ov8cvcg78Ns9Mq+yXMh+Zut4bZf4igbfwqLqtWto8EsxyWw/gQbW9kKHWzi +yHO7/anTbNRcE1vZR/L7l5edb086G0WUNjdbkLwfE7Vytatl47qYxdkPDGno +9Kda9j5h43ojzrlJcl9UP/4FkU1sdNgQ6qFCnBxRqHCrnY3+D6SfJOnTsLpP +sHe6n437rqmeX0vun8CSF3syxBRx+J5cn44aDf1bd+765KmI11R2SGbI0fAy +X/3ZTz9FNEufPpsiS0MF38K1QvsVUU/cnz+O3H+n7pXK6IcrYnn2/EU+0jSs +VJDuik9SxLsjZsbLxGnwGe5yUC1VRBGRMctFS0jeJ7raBS9SQuOO3n9nh3kQ +2K9GrRZUQl+Ze2ZpgzyYMp8eGhJRwtwXufFa/TwQ4EuJ9ZNRwhYrP0O7zzxY +HV53x1VdCYviZjzCyHvhmJeS2NYdSij93VaU+YQHkiaDL1SvK6G72+QLoXQe +WI4ctvysr4wqyQHvc415IKe1Im6xsTLW3Hm+Rs+QB8PB9bWqpspYVPOSWaPH +g4s/RIyDNymj1KR7cbMGD3pm8jVmXZQxcW1bbzWDB8GCb8WWn1LG0+NDu/nm +8yBtFfZs7lZG/+5zTOEGLgx6LA65E7kS4667K9zcyCXvf6l58bWr8OAjvzxB +5WIQfa50lh5RwdDhxHrdn4Ugl8Dbpq+vhrXKWz77nS+AK6qGImI+6lhVeGOu +o1o+NMqY6o2f18DHOqY+YQ9vgpFcbbJmuyYad14xM1qVB8J8Nw66Ra9Gv5d3 +8qryc2BFlIKxo5IWfnj7D7NTIBv4FXeXbn+ihZjspKYfngUanOW8w3u0sdY0 +KzFuSSYE94jWWc3RQXenpfnh0hkwMp640/KKDhZ2CbTr7UsDc83HaZbquljj +UTv2biAVHoyv/T3VrIt8974INu25BIFq2l2tXnrofOuc/W/qAnCGPdsc+fVR +7XpWbeGnZNjAlt4idEMfZ3c83bRvKAlWnjgdVmtggH2qa3b0hJwGFS/Dh4pd +BsjNUIp6sCAevB74nrxzYA3W8JakSTFPwsPMNs8xCUO8KqL76N9tUTBxa3ZK +854htpX+yTYoOwYeioX8aVuMUC/1eencm+EwpnJB//aoEc6o15oL1R2Cspzf +HyYT1uKNX6tEjC8Gg9N6Fq5dYYyp6rNmj3n7QTYgvlyj2hi9C8wyf8bvBQkB +/5It9hxcvm67wxY3b8hZdyxi1JGDdlnhIbLbvEH72Nl1F3ZzsEdfs3fCxBus +R+nXnW4crPbfdP6pnDfEtU9Oe/hzkDJ8/HC60wt+3og0i4jioGVV3MagHV7Q +tfbCq7xCDvJavLae3eYJvody0i25HHQssz9ciZ7wg3vXa5DmYHDHe6Px1Z4g +SnVOaZVy8OJU5PHoZZ6wabG8XFU1B78NVu5WeOUB99vyPF+95qCQV27mFgcP +sBIuUw/t5CBq5fQzLT2g0/zpD+luDrq+EAqbY+QBExUDCc7vObh4mbX5W1kP +UM9aXfy/fg7OlIsrCL93h/tdpqGJQxyMHhkd0Gl1ByvxHaA5ysHXfJUtHrXu +4B1/qPXgJKlfIrzpQ447TFTHpUn95KDm5qxOzcvuEP0r1aPiFwfvtyl8jY93 +BxHdfLU9Mxz0+pDy/X9h7nAtoGJydpaDYeZpkzv3usP/ARhB/3o= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06392687156526347}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7273,19 +7393,19 @@ HbLGog== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06392687156526347}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7299,232 +7419,110 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV1nc8le8bB/BKi5DsjJzznIMysyPHddEwKqVkVfYsJEpoCBkVJQ3lS5FR +1jmPviUjZVWSRAlRlObPFpJKfvf3j+f1vN5/3K/XdY/rc99M9/3bvebNmTPn +J/n++//oeVrPPpNjYtF+xny+Psek7Zp0uGlnNLSWSWblPJMBlHjhLt2ZAuPf +P1f4PFOB0G0FHXydN0DxrkM6PjOCZcNSKdMdt8HsfLSLwDMr6L1vvX+ioxa6 +5LYneTY6wUZ2/7uxjpdQmEhNf3myF6Y7DC6NdvRB4gHZytmqCKhbdzOn9cY4 +vDxZkMigz4Bcb/kXd7UZ2BL17mv87osg7u9SsGgdH7bY/5ndHJsGKVobK613 +LsY4zxz3gcBMeHNldfWYiBB+Nrh9W0U3G87kRL6Yt3wZivh0v5OZygWpix9P +XcgQQ0oCKg743IJ4W0uTlz8k8IKDQJLV3gKQudMsM2+uJCoYZr0LCC4Arpjt +lNYSSZzY2CCTGFEA7S+d6fMKkliRM2RXfroA2DYHKRsLSbT59LeyvaAAardc +X9hyVRLnCrT5yfUXwMzGyebnxlLYsWVU/blnIYQYZrk8jZbGQ6YCh65YFYFV +pvDEpkRp7Cptkv2zrQioRUcTmi9J42OtENVd9kXQ0mZX8uqWNDby/ROzxLMI +NIIE+XqapdFpV5+A3rEi+JZ3OO+7zHL8fe+eRCG3CHaLWw/J/rscdWGuK0O4 +GNaP/IoI/CiD9vntH+UfFkO4xUWVmkEZvJQgesukvhi4WepdYj9kUOm49qjT +02KQtnU1LF8sizn2SUviXhXDYNmjKT4NWeQFjO/N+1oMF6KTD14Nk8XEwI23 +ly7lQp+EUmC9kBxWl/1pjHHigtT+h/JSUnK4qVWlS9yFC5sbHJ77MeSwJOXZ +3iwPLpRGnFFbqiOHYitdRYr9uXC6d7Tf0UEOpReM+p89zgXt/EqfkRtyGNEn +EBSexYUoYxs3mTXyGDFYNT36kQsWzte+G5jJ48z8eGPLb1wQPjEQs3OzPJqL +SxmkD3IhvS42L9lVHqVn9Gy1J7lQZlUxsPCUPOZbeesoLOTBqAMrdPyNPJay +JW//VuKB86HJ001HVqCEtZBbjScPFFPN5PpjVyAjNlLggC+PzP9c8aLkFZip +0hQi68+DiD+rWsxyVqCfrX28awgPLsU4S5Q3rcDyAP37hVE8aDr/5HquvAI6 +etWWbMzggRH36p3jDxVQuaG74nwLD9Z3NM8MNyjgOy32Lu9XPLCeM9/c5aUC +zlWUPKTfzgOP7YFv4LMChhTlST3t5sHGI8zIEwsYOJf/JKvsCw+CFH5km6oy +0NKtu7zqNw8m/01umNZk4JW2o6us/pL6LFSHSnQZWOo0K+g3h4bYA676lAkD +O+MboX8eDWl1jQ3zbBgY1Rt4t3URDfU+14fqQhmoN7d7ud4yGiz/GIoePcJA +29dvQ+1FaWhObtPXPcHAmqv7rhwWo+FNOf+JnFMMTIuzUCmRoGF4yUHR2HQG +zkY9SeaXoUGatjDYWMvAV/dKbm2laPD/OXaiQYiJO+t95HS0aDA64C35RZSJ +Gaz8UYY2DYv7uwr5pJlYFvJ5taAODbndde0mFBPbR+ZNdenS0PPgktpdfSYm +FH/IdVxDw9ZYw84sFyaufdw42m1Cw4q/xQEPPZlYsnJleSbQMBhK8b3zYyLd +kjbhjjQk+C7RkD7IxNmi9Me9pjRUb3oXczaBifw8k08V62nQFo3SPFLCxEOX +vA5MWdIw58xk/ZVSJj45Y5JzwYrMn2+vU2klE92Sv9qob6Jh3+T22LFHTKz/ +UqzguJmGnE52t08XEzfEWV1IsaYh2OZqUGwvE4X9ewpkttKAjUILsz8xMWCz +k2km8bvKH6t7hpl4cDtzKHsbDZLXG+Js+SjsmKWtk7bT8EmKIxe8mMKb0hv8 +5+6g4XZySck5IQr/GswKhhBvjU572yhF4YXKpV3WtmR+Xv7apmoUGj37X8m3 +nTTY9bx/4qxF4abvY1MWdjSw7XfuOapPYfE/MY/yiKstTBLuIYUTq05MO9nT +MK0q0qO+k0I+1s22XAcafmTIROk4Uajn8n3BGPHEUkW2oQuF7QNCXYaOZL/H +Dfeu96Mwd+STfz3xgNd6IatACoW0ytUWOtHwrcOa3hpCYaHdufMbiPsqPX44 +HaPwVmrY5iriXvXAq67RFA5k3cqeJH57PczYO57CIwHiN1R30dAekxR94DyF +aU09l5OJX02mKh6+TKG+n/PZh8QtPjcajv5D4eXOXZqDxI2b7gkn5FIY80Yq +yGQ3DU+qakqSCiisifkt4klcr9lke4FH4SGtm3viiWuy2qeu3KFwdQnX7hbx +A7EPadfKKXxhk/fnMXFl7AAn5wGFq/qobR+Jy6Ym3+fXUcijy21miO/6zTnJ +a6CQOjNnnsQesj/dAsp3n1Oo+yDJTYWYt0WiseIlhYYSP4M4xEUPFQKqOyhs +ftO+2po4X0tF5PFbUu+rmqzdxHnZuv8++0BhrLlNvS9xtgTYtX6h0Pyn/NVg +4sx4y+n2AQrVFWsYEcQZ0zvS345SaHC6bVckcdo+Z+ibpDDb5btVNHHqO9++ +r78ovOF4d/g/X9waEjs0S+H4zTLzKOLzNcdWjs9nYfpkqt0x4rM6Cc9+8rPw +uO+I7GHiM7kpgX+FWbg8a9eVQOIEqYxl88VZqFAR3uRBHHvq5h3+5SyUt/ha +Zkcc/bvEfukKFuo6mjmbE0cG3P8lzmLhnYOrqvSIj/Y+zpBZycLqtLXtTOJw +m1ZkqLNwyXrpgiXEoXXdHxW1WbjPzcVwnKxviN6XOFUDFkbvKjnZSRx0c3SV +ljELw0R5iZXE+84sCDLeyMKe0zqvI4h9Z5aKmW1iYbfzX0l7Yu/9MqXm21jI +FJ+R0iJ23aH5Z7sTCzc7spx6yHnZ88jwuoMLC6vyU9JLiJ0M1ps5e5Lxux5l +RhPbyjom+AWy8LIv/5g8sU2Sh+r+ELJeSt4m38h5tZ4NaD4YxsJgQfltNLHF +x2jxE9EsdOPXqzMkNi4syrx8mYWMt76/tEh/dDMKr2/4h9Sbttx1hPRTxOX8 +axPXWaj4mvmmgPheVF769nwWlhS7LZIj1nbIvCJ8n4Whf154fCX92vr8WmpV +NQtjbPaFXCIOWpdx2f8RCx+cLUszJeZqpF1sbCbrvTJd+yLp/1ULLibHfWBh +Pm9uKkXyoSEi5ZzeFxbufp0dUkPyw3s0+eynfhYKL/LxdybO6U5KNJtg4WuV +s3dSSP4wbscn/F3IxihrBu/Tf/nkcuREqBobt3W4NGlsIee/LTxSUYuNAuxR +Lo/kn61V2PE2PTZGfqks1SBO0Tt0VBvY2L3Mfo0yyUshwf1hwzZsNEr9LDaP +5Ov8cvcg78Ns9Mq+yXMh+Zut4bZf4igbfwqLqtWto8EsxyWw/gQbW9kKHWzi +yHO7/anTbNRcE1vZR/L7l5edb086G0WUNjdbkLwfE7Vytatl47qYxdkPDGno +9Kda9j5h43ojzrlJcl9UP/4FkU1sdNgQ6qFCnBxRqHCrnY3+D6SfJOnTsLpP +sHe6n437rqmeX0vun8CSF3syxBRx+J5cn44aDf1bd+765KmI11R2SGbI0fAy +X/3ZTz9FNEufPpsiS0MF38K1QvsVUU/cnz+O3H+n7pXK6IcrYnn2/EU+0jSs +VJDuik9SxLsjZsbLxGnwGe5yUC1VRBGRMctFS0jeJ7raBS9SQuOO3n9nh3kQ +2K9GrRZUQl+Ze2ZpgzyYMp8eGhJRwtwXufFa/TwQ4EuJ9ZNRwhYrP0O7zzxY +HV53x1VdCYviZjzCyHvhmJeS2NYdSij93VaU+YQHkiaDL1SvK6G72+QLoXQe +WI4ctvysr4wqyQHvc415IKe1Im6xsTLW3Hm+Rs+QB8PB9bWqpspYVPOSWaPH +g4s/RIyDNymj1KR7cbMGD3pm8jVmXZQxcW1bbzWDB8GCb8WWn1LG0+NDu/nm +8yBtFfZs7lZG/+5zTOEGLgx6LA65E7kS4667K9zcyCXvf6l58bWr8OAjvzxB +5WIQfa50lh5RwdDhxHrdn4Ugl8Dbpq+vhrXKWz77nS+AK6qGImI+6lhVeGOu +o1o+NMqY6o2f18DHOqY+YQ9vgpFcbbJmuyYad14xM1qVB8J8Nw66Ra9Gv5d3 +8qryc2BFlIKxo5IWfnj7D7NTIBv4FXeXbn+ihZjspKYfngUanOW8w3u0sdY0 +KzFuSSYE94jWWc3RQXenpfnh0hkwMp640/KKDhZ2CbTr7UsDc83HaZbquljj +UTv2biAVHoyv/T3VrIt8974INu25BIFq2l2tXnrofOuc/W/qAnCGPdsc+fVR +7XpWbeGnZNjAlt4idEMfZ3c83bRvKAlWnjgdVmtggH2qa3b0hJwGFS/Dh4pd +BsjNUIp6sCAevB74nrxzYA3W8JakSTFPwsPMNs8xCUO8KqL76N9tUTBxa3ZK +854htpX+yTYoOwYeioX8aVuMUC/1eencm+EwpnJB//aoEc6o15oL1R2Cspzf +HyYT1uKNX6tEjC8Gg9N6Fq5dYYyp6rNmj3n7QTYgvlyj2hi9C8wyf8bvBQkB +/5It9hxcvm67wxY3b8hZdyxi1JGDdlnhIbLbvEH72Nl1F3ZzsEdfs3fCxBus +R+nXnW4crPbfdP6pnDfEtU9Oe/hzkDJ8/HC60wt+3og0i4jioGVV3MagHV7Q +tfbCq7xCDvJavLae3eYJvody0i25HHQssz9ciZ7wg3vXa5DmYHDHe6Px1Z4g +SnVOaZVy8OJU5PHoZZ6wabG8XFU1B78NVu5WeOUB99vyPF+95qCQV27mFgcP +sBIuUw/t5CBq5fQzLT2g0/zpD+luDrq+EAqbY+QBExUDCc7vObh4mbX5W1kP +UM9aXfy/fg7OlIsrCL93h/tdpqGJQxyMHhkd0Gl1ByvxHaA5ysHXfJUtHrXu +4B1/qPXgJKlfIrzpQ447TFTHpUn95KDm5qxOzcvuEP0r1aPiFwfvtyl8jY93 +BxHdfLU9Mxz0+pDy/X9h7nAtoGJydpaDYeZpkzv3usP/ARhB/3o= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06392687156526347}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7535,6 +7533,7 @@ HbLGog== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7562,7 +7561,8 @@ HbLGog== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.12263499218727081`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06392687156526347}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7570,10 +7570,14 @@ HbLGog== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913218813523655`*^9}, - CellLabel->"Out[86]=",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] + CellChangeTimes->{3.9913218813523655`*^9, 3.9943506829805183`*^9, + 3.994353776523286*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"5171a4bb-d165-4eaf-b75c-add569183a98"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7642,15 +7646,778 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003297"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994084961380664*^9},ExpressionUUID->"d9d63445-4981-8f49-b88b-\ -9e93d345c648"], + 3.994084961380664*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061275}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350683265004*^9, 3.994353776762539*^9}, + CellLabel-> + "Out[105]=",ExpressionUUID->"a6058d29-9292-482f-aaa0-2f8a6877f6a6"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"39000a9e-1f94-0640-8925-\ -ec28b28907cc"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8le8bB/BKi5DsjJzznIMysyPHddEwKqVkVfYsJEpoCBkVJQ3lS5FR +1jmPviUjZVWSRAlRlObPFpJKfvf3j+f1vN5/3K/XdY/rc99M9/3bvebNmTPn +J/n++//oeVrPPpNjYtF+xny+Psek7Zp0uGlnNLSWSWblPJMBlHjhLt2ZAuPf +P1f4PFOB0G0FHXydN0DxrkM6PjOCZcNSKdMdt8HsfLSLwDMr6L1vvX+ioxa6 +5LYneTY6wUZ2/7uxjpdQmEhNf3myF6Y7DC6NdvRB4gHZytmqCKhbdzOn9cY4 +vDxZkMigz4Bcb/kXd7UZ2BL17mv87osg7u9SsGgdH7bY/5ndHJsGKVobK613 +LsY4zxz3gcBMeHNldfWYiBB+Nrh9W0U3G87kRL6Yt3wZivh0v5OZygWpix9P +XcgQQ0oCKg743IJ4W0uTlz8k8IKDQJLV3gKQudMsM2+uJCoYZr0LCC4Arpjt +lNYSSZzY2CCTGFEA7S+d6fMKkliRM2RXfroA2DYHKRsLSbT59LeyvaAAardc +X9hyVRLnCrT5yfUXwMzGyebnxlLYsWVU/blnIYQYZrk8jZbGQ6YCh65YFYFV +pvDEpkRp7Cptkv2zrQioRUcTmi9J42OtENVd9kXQ0mZX8uqWNDby/ROzxLMI +NIIE+XqapdFpV5+A3rEi+JZ3OO+7zHL8fe+eRCG3CHaLWw/J/rscdWGuK0O4 +GNaP/IoI/CiD9vntH+UfFkO4xUWVmkEZvJQgesukvhi4WepdYj9kUOm49qjT +02KQtnU1LF8sizn2SUviXhXDYNmjKT4NWeQFjO/N+1oMF6KTD14Nk8XEwI23 +ly7lQp+EUmC9kBxWl/1pjHHigtT+h/JSUnK4qVWlS9yFC5sbHJ77MeSwJOXZ +3iwPLpRGnFFbqiOHYitdRYr9uXC6d7Tf0UEOpReM+p89zgXt/EqfkRtyGNEn +EBSexYUoYxs3mTXyGDFYNT36kQsWzte+G5jJ48z8eGPLb1wQPjEQs3OzPJqL +SxmkD3IhvS42L9lVHqVn9Gy1J7lQZlUxsPCUPOZbeesoLOTBqAMrdPyNPJay +JW//VuKB86HJ001HVqCEtZBbjScPFFPN5PpjVyAjNlLggC+PzP9c8aLkFZip +0hQi68+DiD+rWsxyVqCfrX28awgPLsU4S5Q3rcDyAP37hVE8aDr/5HquvAI6 +etWWbMzggRH36p3jDxVQuaG74nwLD9Z3NM8MNyjgOy32Lu9XPLCeM9/c5aUC +zlWUPKTfzgOP7YFv4LMChhTlST3t5sHGI8zIEwsYOJf/JKvsCw+CFH5km6oy +0NKtu7zqNw8m/01umNZk4JW2o6us/pL6LFSHSnQZWOo0K+g3h4bYA676lAkD +O+MboX8eDWl1jQ3zbBgY1Rt4t3URDfU+14fqQhmoN7d7ud4yGiz/GIoePcJA +29dvQ+1FaWhObtPXPcHAmqv7rhwWo+FNOf+JnFMMTIuzUCmRoGF4yUHR2HQG +zkY9SeaXoUGatjDYWMvAV/dKbm2laPD/OXaiQYiJO+t95HS0aDA64C35RZSJ +Gaz8UYY2DYv7uwr5pJlYFvJ5taAODbndde0mFBPbR+ZNdenS0PPgktpdfSYm +FH/IdVxDw9ZYw84sFyaufdw42m1Cw4q/xQEPPZlYsnJleSbQMBhK8b3zYyLd +kjbhjjQk+C7RkD7IxNmi9Me9pjRUb3oXczaBifw8k08V62nQFo3SPFLCxEOX +vA5MWdIw58xk/ZVSJj45Y5JzwYrMn2+vU2klE92Sv9qob6Jh3+T22LFHTKz/ +UqzguJmGnE52t08XEzfEWV1IsaYh2OZqUGwvE4X9ewpkttKAjUILsz8xMWCz +k2km8bvKH6t7hpl4cDtzKHsbDZLXG+Js+SjsmKWtk7bT8EmKIxe8mMKb0hv8 +5+6g4XZySck5IQr/GswKhhBvjU572yhF4YXKpV3WtmR+Xv7apmoUGj37X8m3 +nTTY9bx/4qxF4abvY1MWdjSw7XfuOapPYfE/MY/yiKstTBLuIYUTq05MO9nT +MK0q0qO+k0I+1s22XAcafmTIROk4Uajn8n3BGPHEUkW2oQuF7QNCXYaOZL/H +Dfeu96Mwd+STfz3xgNd6IatACoW0ytUWOtHwrcOa3hpCYaHdufMbiPsqPX44 +HaPwVmrY5iriXvXAq67RFA5k3cqeJH57PczYO57CIwHiN1R30dAekxR94DyF +aU09l5OJX02mKh6+TKG+n/PZh8QtPjcajv5D4eXOXZqDxI2b7gkn5FIY80Yq +yGQ3DU+qakqSCiisifkt4klcr9lke4FH4SGtm3viiWuy2qeu3KFwdQnX7hbx +A7EPadfKKXxhk/fnMXFl7AAn5wGFq/qobR+Jy6Ym3+fXUcijy21miO/6zTnJ +a6CQOjNnnsQesj/dAsp3n1Oo+yDJTYWYt0WiseIlhYYSP4M4xEUPFQKqOyhs +ftO+2po4X0tF5PFbUu+rmqzdxHnZuv8++0BhrLlNvS9xtgTYtX6h0Pyn/NVg +4sx4y+n2AQrVFWsYEcQZ0zvS345SaHC6bVckcdo+Z+ibpDDb5btVNHHqO9++ +r78ovOF4d/g/X9waEjs0S+H4zTLzKOLzNcdWjs9nYfpkqt0x4rM6Cc9+8rPw +uO+I7GHiM7kpgX+FWbg8a9eVQOIEqYxl88VZqFAR3uRBHHvq5h3+5SyUt/ha +Zkcc/bvEfukKFuo6mjmbE0cG3P8lzmLhnYOrqvSIj/Y+zpBZycLqtLXtTOJw +m1ZkqLNwyXrpgiXEoXXdHxW1WbjPzcVwnKxviN6XOFUDFkbvKjnZSRx0c3SV +ljELw0R5iZXE+84sCDLeyMKe0zqvI4h9Z5aKmW1iYbfzX0l7Yu/9MqXm21jI +FJ+R0iJ23aH5Z7sTCzc7spx6yHnZ88jwuoMLC6vyU9JLiJ0M1ps5e5Lxux5l +RhPbyjom+AWy8LIv/5g8sU2Sh+r+ELJeSt4m38h5tZ4NaD4YxsJgQfltNLHF +x2jxE9EsdOPXqzMkNi4syrx8mYWMt76/tEh/dDMKr2/4h9Sbttx1hPRTxOX8 +axPXWaj4mvmmgPheVF769nwWlhS7LZIj1nbIvCJ8n4Whf154fCX92vr8WmpV +NQtjbPaFXCIOWpdx2f8RCx+cLUszJeZqpF1sbCbrvTJd+yLp/1ULLibHfWBh +Pm9uKkXyoSEi5ZzeFxbufp0dUkPyw3s0+eynfhYKL/LxdybO6U5KNJtg4WuV +s3dSSP4wbscn/F3IxihrBu/Tf/nkcuREqBobt3W4NGlsIee/LTxSUYuNAuxR +Lo/kn61V2PE2PTZGfqks1SBO0Tt0VBvY2L3Mfo0yyUshwf1hwzZsNEr9LDaP +5Ov8cvcg78Ns9Mq+yXMh+Zut4bZf4igbfwqLqtWto8EsxyWw/gQbW9kKHWzi +yHO7/anTbNRcE1vZR/L7l5edb086G0WUNjdbkLwfE7Vytatl47qYxdkPDGno +9Kda9j5h43ojzrlJcl9UP/4FkU1sdNgQ6qFCnBxRqHCrnY3+D6SfJOnTsLpP +sHe6n437rqmeX0vun8CSF3syxBRx+J5cn44aDf1bd+765KmI11R2SGbI0fAy +X/3ZTz9FNEufPpsiS0MF38K1QvsVUU/cnz+O3H+n7pXK6IcrYnn2/EU+0jSs +VJDuik9SxLsjZsbLxGnwGe5yUC1VRBGRMctFS0jeJ7raBS9SQuOO3n9nh3kQ +2K9GrRZUQl+Ze2ZpgzyYMp8eGhJRwtwXufFa/TwQ4EuJ9ZNRwhYrP0O7zzxY +HV53x1VdCYviZjzCyHvhmJeS2NYdSij93VaU+YQHkiaDL1SvK6G72+QLoXQe +WI4ctvysr4wqyQHvc415IKe1Im6xsTLW3Hm+Rs+QB8PB9bWqpspYVPOSWaPH +g4s/RIyDNymj1KR7cbMGD3pm8jVmXZQxcW1bbzWDB8GCb8WWn1LG0+NDu/nm +8yBtFfZs7lZG/+5zTOEGLgx6LA65E7kS4667K9zcyCXvf6l58bWr8OAjvzxB +5WIQfa50lh5RwdDhxHrdn4Ugl8Dbpq+vhrXKWz77nS+AK6qGImI+6lhVeGOu +o1o+NMqY6o2f18DHOqY+YQ9vgpFcbbJmuyYad14xM1qVB8J8Nw66Ra9Gv5d3 +8qryc2BFlIKxo5IWfnj7D7NTIBv4FXeXbn+ihZjspKYfngUanOW8w3u0sdY0 +KzFuSSYE94jWWc3RQXenpfnh0hkwMp640/KKDhZ2CbTr7UsDc83HaZbquljj +UTv2biAVHoyv/T3VrIt8974INu25BIFq2l2tXnrofOuc/W/qAnCGPdsc+fVR +7XpWbeGnZNjAlt4idEMfZ3c83bRvKAlWnjgdVmtggH2qa3b0hJwGFS/Dh4pd +BsjNUIp6sCAevB74nrxzYA3W8JakSTFPwsPMNs8xCUO8KqL76N9tUTBxa3ZK +854htpX+yTYoOwYeioX8aVuMUC/1eencm+EwpnJB//aoEc6o15oL1R2Cspzf +HyYT1uKNX6tEjC8Gg9N6Fq5dYYyp6rNmj3n7QTYgvlyj2hi9C8wyf8bvBQkB +/5It9hxcvm67wxY3b8hZdyxi1JGDdlnhIbLbvEH72Nl1F3ZzsEdfs3fCxBus +R+nXnW4crPbfdP6pnDfEtU9Oe/hzkDJ8/HC60wt+3og0i4jioGVV3MagHV7Q +tfbCq7xCDvJavLae3eYJvody0i25HHQssz9ciZ7wg3vXa5DmYHDHe6Px1Z4g +SnVOaZVy8OJU5PHoZZ6wabG8XFU1B78NVu5WeOUB99vyPF+95qCQV27mFgcP +sBIuUw/t5CBq5fQzLT2g0/zpD+luDrq+EAqbY+QBExUDCc7vObh4mbX5W1kP +UM9aXfy/fg7OlIsrCL93h/tdpqGJQxyMHhkd0Gl1ByvxHaA5ysHXfJUtHrXu +4B1/qPXgJKlfIrzpQ447TFTHpUn95KDm5qxOzcvuEP0r1aPiFwfvtyl8jY93 +BxHdfLU9Mxz0+pDy/X9h7nAtoGJydpaDYeZpkzv3usP/ARhB/3o= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc8le8bB/BKi5DsjJzznIMysyPHddEwKqVkVfYsJEpoCBkVJQ3lS5FR +1jmPviUjZVWSRAlRlObPFpJKfvf3j+f1vN5/3K/XdY/rc99M9/3bvebNmTPn +J/n++//oeVrPPpNjYtF+xny+Psek7Zp0uGlnNLSWSWblPJMBlHjhLt2ZAuPf +P1f4PFOB0G0FHXydN0DxrkM6PjOCZcNSKdMdt8HsfLSLwDMr6L1vvX+ioxa6 +5LYneTY6wUZ2/7uxjpdQmEhNf3myF6Y7DC6NdvRB4gHZytmqCKhbdzOn9cY4 +vDxZkMigz4Bcb/kXd7UZ2BL17mv87osg7u9SsGgdH7bY/5ndHJsGKVobK613 +LsY4zxz3gcBMeHNldfWYiBB+Nrh9W0U3G87kRL6Yt3wZivh0v5OZygWpix9P +XcgQQ0oCKg743IJ4W0uTlz8k8IKDQJLV3gKQudMsM2+uJCoYZr0LCC4Arpjt +lNYSSZzY2CCTGFEA7S+d6fMKkliRM2RXfroA2DYHKRsLSbT59LeyvaAAardc +X9hyVRLnCrT5yfUXwMzGyebnxlLYsWVU/blnIYQYZrk8jZbGQ6YCh65YFYFV +pvDEpkRp7Cptkv2zrQioRUcTmi9J42OtENVd9kXQ0mZX8uqWNDby/ROzxLMI +NIIE+XqapdFpV5+A3rEi+JZ3OO+7zHL8fe+eRCG3CHaLWw/J/rscdWGuK0O4 +GNaP/IoI/CiD9vntH+UfFkO4xUWVmkEZvJQgesukvhi4WepdYj9kUOm49qjT +02KQtnU1LF8sizn2SUviXhXDYNmjKT4NWeQFjO/N+1oMF6KTD14Nk8XEwI23 +ly7lQp+EUmC9kBxWl/1pjHHigtT+h/JSUnK4qVWlS9yFC5sbHJ77MeSwJOXZ +3iwPLpRGnFFbqiOHYitdRYr9uXC6d7Tf0UEOpReM+p89zgXt/EqfkRtyGNEn +EBSexYUoYxs3mTXyGDFYNT36kQsWzte+G5jJ48z8eGPLb1wQPjEQs3OzPJqL +SxmkD3IhvS42L9lVHqVn9Gy1J7lQZlUxsPCUPOZbeesoLOTBqAMrdPyNPJay +JW//VuKB86HJ001HVqCEtZBbjScPFFPN5PpjVyAjNlLggC+PzP9c8aLkFZip +0hQi68+DiD+rWsxyVqCfrX28awgPLsU4S5Q3rcDyAP37hVE8aDr/5HquvAI6 +etWWbMzggRH36p3jDxVQuaG74nwLD9Z3NM8MNyjgOy32Lu9XPLCeM9/c5aUC +zlWUPKTfzgOP7YFv4LMChhTlST3t5sHGI8zIEwsYOJf/JKvsCw+CFH5km6oy +0NKtu7zqNw8m/01umNZk4JW2o6us/pL6LFSHSnQZWOo0K+g3h4bYA676lAkD +O+MboX8eDWl1jQ3zbBgY1Rt4t3URDfU+14fqQhmoN7d7ud4yGiz/GIoePcJA +29dvQ+1FaWhObtPXPcHAmqv7rhwWo+FNOf+JnFMMTIuzUCmRoGF4yUHR2HQG +zkY9SeaXoUGatjDYWMvAV/dKbm2laPD/OXaiQYiJO+t95HS0aDA64C35RZSJ +Gaz8UYY2DYv7uwr5pJlYFvJ5taAODbndde0mFBPbR+ZNdenS0PPgktpdfSYm +FH/IdVxDw9ZYw84sFyaufdw42m1Cw4q/xQEPPZlYsnJleSbQMBhK8b3zYyLd +kjbhjjQk+C7RkD7IxNmi9Me9pjRUb3oXczaBifw8k08V62nQFo3SPFLCxEOX +vA5MWdIw58xk/ZVSJj45Y5JzwYrMn2+vU2klE92Sv9qob6Jh3+T22LFHTKz/ +UqzguJmGnE52t08XEzfEWV1IsaYh2OZqUGwvE4X9ewpkttKAjUILsz8xMWCz +k2km8bvKH6t7hpl4cDtzKHsbDZLXG+Js+SjsmKWtk7bT8EmKIxe8mMKb0hv8 +5+6g4XZySck5IQr/GswKhhBvjU572yhF4YXKpV3WtmR+Xv7apmoUGj37X8m3 +nTTY9bx/4qxF4abvY1MWdjSw7XfuOapPYfE/MY/yiKstTBLuIYUTq05MO9nT +MK0q0qO+k0I+1s22XAcafmTIROk4Uajn8n3BGPHEUkW2oQuF7QNCXYaOZL/H +Dfeu96Mwd+STfz3xgNd6IatACoW0ytUWOtHwrcOa3hpCYaHdufMbiPsqPX44 +HaPwVmrY5iriXvXAq67RFA5k3cqeJH57PczYO57CIwHiN1R30dAekxR94DyF +aU09l5OJX02mKh6+TKG+n/PZh8QtPjcajv5D4eXOXZqDxI2b7gkn5FIY80Yq +yGQ3DU+qakqSCiisifkt4klcr9lke4FH4SGtm3viiWuy2qeu3KFwdQnX7hbx +A7EPadfKKXxhk/fnMXFl7AAn5wGFq/qobR+Jy6Ym3+fXUcijy21miO/6zTnJ +a6CQOjNnnsQesj/dAsp3n1Oo+yDJTYWYt0WiseIlhYYSP4M4xEUPFQKqOyhs +ftO+2po4X0tF5PFbUu+rmqzdxHnZuv8++0BhrLlNvS9xtgTYtX6h0Pyn/NVg +4sx4y+n2AQrVFWsYEcQZ0zvS345SaHC6bVckcdo+Z+ibpDDb5btVNHHqO9++ +r78ovOF4d/g/X9waEjs0S+H4zTLzKOLzNcdWjs9nYfpkqt0x4rM6Cc9+8rPw +uO+I7GHiM7kpgX+FWbg8a9eVQOIEqYxl88VZqFAR3uRBHHvq5h3+5SyUt/ha +Zkcc/bvEfukKFuo6mjmbE0cG3P8lzmLhnYOrqvSIj/Y+zpBZycLqtLXtTOJw +m1ZkqLNwyXrpgiXEoXXdHxW1WbjPzcVwnKxviN6XOFUDFkbvKjnZSRx0c3SV +ljELw0R5iZXE+84sCDLeyMKe0zqvI4h9Z5aKmW1iYbfzX0l7Yu/9MqXm21jI +FJ+R0iJ23aH5Z7sTCzc7spx6yHnZ88jwuoMLC6vyU9JLiJ0M1ps5e5Lxux5l +RhPbyjom+AWy8LIv/5g8sU2Sh+r+ELJeSt4m38h5tZ4NaD4YxsJgQfltNLHF +x2jxE9EsdOPXqzMkNi4syrx8mYWMt76/tEh/dDMKr2/4h9Sbttx1hPRTxOX8 +axPXWaj4mvmmgPheVF769nwWlhS7LZIj1nbIvCJ8n4Whf154fCX92vr8WmpV +NQtjbPaFXCIOWpdx2f8RCx+cLUszJeZqpF1sbCbrvTJd+yLp/1ULLibHfWBh +Pm9uKkXyoSEi5ZzeFxbufp0dUkPyw3s0+eynfhYKL/LxdybO6U5KNJtg4WuV +s3dSSP4wbscn/F3IxihrBu/Tf/nkcuREqBobt3W4NGlsIee/LTxSUYuNAuxR +Lo/kn61V2PE2PTZGfqks1SBO0Tt0VBvY2L3Mfo0yyUshwf1hwzZsNEr9LDaP +5Ov8cvcg78Ns9Mq+yXMh+Zut4bZf4igbfwqLqtWto8EsxyWw/gQbW9kKHWzi +yHO7/anTbNRcE1vZR/L7l5edb086G0WUNjdbkLwfE7Vytatl47qYxdkPDGno +9Kda9j5h43ojzrlJcl9UP/4FkU1sdNgQ6qFCnBxRqHCrnY3+D6SfJOnTsLpP +sHe6n437rqmeX0vun8CSF3syxBRx+J5cn44aDf1bd+765KmI11R2SGbI0fAy +X/3ZTz9FNEufPpsiS0MF38K1QvsVUU/cnz+O3H+n7pXK6IcrYnn2/EU+0jSs +VJDuik9SxLsjZsbLxGnwGe5yUC1VRBGRMctFS0jeJ7raBS9SQuOO3n9nh3kQ +2K9GrRZUQl+Ze2ZpgzyYMp8eGhJRwtwXufFa/TwQ4EuJ9ZNRwhYrP0O7zzxY +HV53x1VdCYviZjzCyHvhmJeS2NYdSij93VaU+YQHkiaDL1SvK6G72+QLoXQe +WI4ctvysr4wqyQHvc415IKe1Im6xsTLW3Hm+Rs+QB8PB9bWqpspYVPOSWaPH +g4s/RIyDNymj1KR7cbMGD3pm8jVmXZQxcW1bbzWDB8GCb8WWn1LG0+NDu/nm +8yBtFfZs7lZG/+5zTOEGLgx6LA65E7kS4667K9zcyCXvf6l58bWr8OAjvzxB +5WIQfa50lh5RwdDhxHrdn4Ugl8Dbpq+vhrXKWz77nS+AK6qGImI+6lhVeGOu +o1o+NMqY6o2f18DHOqY+YQ9vgpFcbbJmuyYad14xM1qVB8J8Nw66Ra9Gv5d3 +8qryc2BFlIKxo5IWfnj7D7NTIBv4FXeXbn+ihZjspKYfngUanOW8w3u0sdY0 +KzFuSSYE94jWWc3RQXenpfnh0hkwMp640/KKDhZ2CbTr7UsDc83HaZbquljj +UTv2biAVHoyv/T3VrIt8974INu25BIFq2l2tXnrofOuc/W/qAnCGPdsc+fVR +7XpWbeGnZNjAlt4idEMfZ3c83bRvKAlWnjgdVmtggH2qa3b0hJwGFS/Dh4pd +BsjNUIp6sCAevB74nrxzYA3W8JakSTFPwsPMNs8xCUO8KqL76N9tUTBxa3ZK +854htpX+yTYoOwYeioX8aVuMUC/1eencm+EwpnJB//aoEc6o15oL1R2Cspzf +HyYT1uKNX6tEjC8Gg9N6Fq5dYYyp6rNmj3n7QTYgvlyj2hi9C8wyf8bvBQkB +/5It9hxcvm67wxY3b8hZdyxi1JGDdlnhIbLbvEH72Nl1F3ZzsEdfs3fCxBus +R+nXnW4crPbfdP6pnDfEtU9Oe/hzkDJ8/HC60wt+3og0i4jioGVV3MagHV7Q +tfbCq7xCDvJavLae3eYJvody0i25HHQssz9ciZ7wg3vXa5DmYHDHe6Px1Z4g +SnVOaZVy8OJU5PHoZZ6wabG8XFU1B78NVu5WeOUB99vyPF+95qCQV27mFgcP +sBIuUw/t5CBq5fQzLT2g0/zpD+luDrq+EAqbY+QBExUDCc7vObh4mbX5W1kP +UM9aXfy/fg7OlIsrCL93h/tdpqGJQxyMHhkd0Gl1ByvxHaA5ysHXfJUtHrXu +4B1/qPXgJKlfIrzpQ447TFTHpUn95KDm5qxOzcvuEP0r1aPiFwfvtyl8jY93 +BxHdfLU9Mxz0+pDy/X9h7nAtoGJydpaDYeZpkzv3usP/ARhB/3o= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06392687156526347}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06392687156526347}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc8le8bB/BKi5DsjJzznIMysyPHddEwKqVkVfYsJEpoCBkVJQ3lS5FR +1jmPviUjZVWSRAlRlObPFpJKfvf3j+f1vN5/3K/XdY/rc99M9/3bvebNmTPn +J/n++//oeVrPPpNjYtF+xny+Psek7Zp0uGlnNLSWSWblPJMBlHjhLt2ZAuPf +P1f4PFOB0G0FHXydN0DxrkM6PjOCZcNSKdMdt8HsfLSLwDMr6L1vvX+ioxa6 +5LYneTY6wUZ2/7uxjpdQmEhNf3myF6Y7DC6NdvRB4gHZytmqCKhbdzOn9cY4 +vDxZkMigz4Bcb/kXd7UZ2BL17mv87osg7u9SsGgdH7bY/5ndHJsGKVobK613 +LsY4zxz3gcBMeHNldfWYiBB+Nrh9W0U3G87kRL6Yt3wZivh0v5OZygWpix9P +XcgQQ0oCKg743IJ4W0uTlz8k8IKDQJLV3gKQudMsM2+uJCoYZr0LCC4Arpjt +lNYSSZzY2CCTGFEA7S+d6fMKkliRM2RXfroA2DYHKRsLSbT59LeyvaAAardc +X9hyVRLnCrT5yfUXwMzGyebnxlLYsWVU/blnIYQYZrk8jZbGQ6YCh65YFYFV +pvDEpkRp7Cptkv2zrQioRUcTmi9J42OtENVd9kXQ0mZX8uqWNDby/ROzxLMI +NIIE+XqapdFpV5+A3rEi+JZ3OO+7zHL8fe+eRCG3CHaLWw/J/rscdWGuK0O4 +GNaP/IoI/CiD9vntH+UfFkO4xUWVmkEZvJQgesukvhi4WepdYj9kUOm49qjT +02KQtnU1LF8sizn2SUviXhXDYNmjKT4NWeQFjO/N+1oMF6KTD14Nk8XEwI23 +ly7lQp+EUmC9kBxWl/1pjHHigtT+h/JSUnK4qVWlS9yFC5sbHJ77MeSwJOXZ +3iwPLpRGnFFbqiOHYitdRYr9uXC6d7Tf0UEOpReM+p89zgXt/EqfkRtyGNEn +EBSexYUoYxs3mTXyGDFYNT36kQsWzte+G5jJ48z8eGPLb1wQPjEQs3OzPJqL +SxmkD3IhvS42L9lVHqVn9Gy1J7lQZlUxsPCUPOZbeesoLOTBqAMrdPyNPJay +JW//VuKB86HJ001HVqCEtZBbjScPFFPN5PpjVyAjNlLggC+PzP9c8aLkFZip +0hQi68+DiD+rWsxyVqCfrX28awgPLsU4S5Q3rcDyAP37hVE8aDr/5HquvAI6 +etWWbMzggRH36p3jDxVQuaG74nwLD9Z3NM8MNyjgOy32Lu9XPLCeM9/c5aUC +zlWUPKTfzgOP7YFv4LMChhTlST3t5sHGI8zIEwsYOJf/JKvsCw+CFH5km6oy +0NKtu7zqNw8m/01umNZk4JW2o6us/pL6LFSHSnQZWOo0K+g3h4bYA676lAkD +O+MboX8eDWl1jQ3zbBgY1Rt4t3URDfU+14fqQhmoN7d7ud4yGiz/GIoePcJA +29dvQ+1FaWhObtPXPcHAmqv7rhwWo+FNOf+JnFMMTIuzUCmRoGF4yUHR2HQG +zkY9SeaXoUGatjDYWMvAV/dKbm2laPD/OXaiQYiJO+t95HS0aDA64C35RZSJ +Gaz8UYY2DYv7uwr5pJlYFvJ5taAODbndde0mFBPbR+ZNdenS0PPgktpdfSYm +FH/IdVxDw9ZYw84sFyaufdw42m1Cw4q/xQEPPZlYsnJleSbQMBhK8b3zYyLd +kjbhjjQk+C7RkD7IxNmi9Me9pjRUb3oXczaBifw8k08V62nQFo3SPFLCxEOX +vA5MWdIw58xk/ZVSJj45Y5JzwYrMn2+vU2klE92Sv9qob6Jh3+T22LFHTKz/ +UqzguJmGnE52t08XEzfEWV1IsaYh2OZqUGwvE4X9ewpkttKAjUILsz8xMWCz +k2km8bvKH6t7hpl4cDtzKHsbDZLXG+Js+SjsmKWtk7bT8EmKIxe8mMKb0hv8 +5+6g4XZySck5IQr/GswKhhBvjU572yhF4YXKpV3WtmR+Xv7apmoUGj37X8m3 +nTTY9bx/4qxF4abvY1MWdjSw7XfuOapPYfE/MY/yiKstTBLuIYUTq05MO9nT +MK0q0qO+k0I+1s22XAcafmTIROk4Uajn8n3BGPHEUkW2oQuF7QNCXYaOZL/H +Dfeu96Mwd+STfz3xgNd6IatACoW0ytUWOtHwrcOa3hpCYaHdufMbiPsqPX44 +HaPwVmrY5iriXvXAq67RFA5k3cqeJH57PczYO57CIwHiN1R30dAekxR94DyF +aU09l5OJX02mKh6+TKG+n/PZh8QtPjcajv5D4eXOXZqDxI2b7gkn5FIY80Yq +yGQ3DU+qakqSCiisifkt4klcr9lke4FH4SGtm3viiWuy2qeu3KFwdQnX7hbx +A7EPadfKKXxhk/fnMXFl7AAn5wGFq/qobR+Jy6Ym3+fXUcijy21miO/6zTnJ +a6CQOjNnnsQesj/dAsp3n1Oo+yDJTYWYt0WiseIlhYYSP4M4xEUPFQKqOyhs +ftO+2po4X0tF5PFbUu+rmqzdxHnZuv8++0BhrLlNvS9xtgTYtX6h0Pyn/NVg +4sx4y+n2AQrVFWsYEcQZ0zvS345SaHC6bVckcdo+Z+ibpDDb5btVNHHqO9++ +r78ovOF4d/g/X9waEjs0S+H4zTLzKOLzNcdWjs9nYfpkqt0x4rM6Cc9+8rPw +uO+I7GHiM7kpgX+FWbg8a9eVQOIEqYxl88VZqFAR3uRBHHvq5h3+5SyUt/ha +Zkcc/bvEfukKFuo6mjmbE0cG3P8lzmLhnYOrqvSIj/Y+zpBZycLqtLXtTOJw +m1ZkqLNwyXrpgiXEoXXdHxW1WbjPzcVwnKxviN6XOFUDFkbvKjnZSRx0c3SV +ljELw0R5iZXE+84sCDLeyMKe0zqvI4h9Z5aKmW1iYbfzX0l7Yu/9MqXm21jI +FJ+R0iJ23aH5Z7sTCzc7spx6yHnZ88jwuoMLC6vyU9JLiJ0M1ps5e5Lxux5l +RhPbyjom+AWy8LIv/5g8sU2Sh+r+ELJeSt4m38h5tZ4NaD4YxsJgQfltNLHF +x2jxE9EsdOPXqzMkNi4syrx8mYWMt76/tEh/dDMKr2/4h9Sbttx1hPRTxOX8 +axPXWaj4mvmmgPheVF769nwWlhS7LZIj1nbIvCJ8n4Whf154fCX92vr8WmpV +NQtjbPaFXCIOWpdx2f8RCx+cLUszJeZqpF1sbCbrvTJd+yLp/1ULLibHfWBh +Pm9uKkXyoSEi5ZzeFxbufp0dUkPyw3s0+eynfhYKL/LxdybO6U5KNJtg4WuV +s3dSSP4wbscn/F3IxihrBu/Tf/nkcuREqBobt3W4NGlsIee/LTxSUYuNAuxR +Lo/kn61V2PE2PTZGfqks1SBO0Tt0VBvY2L3Mfo0yyUshwf1hwzZsNEr9LDaP +5Ov8cvcg78Ns9Mq+yXMh+Zut4bZf4igbfwqLqtWto8EsxyWw/gQbW9kKHWzi +yHO7/anTbNRcE1vZR/L7l5edb086G0WUNjdbkLwfE7Vytatl47qYxdkPDGno +9Kda9j5h43ojzrlJcl9UP/4FkU1sdNgQ6qFCnBxRqHCrnY3+D6SfJOnTsLpP +sHe6n437rqmeX0vun8CSF3syxBRx+J5cn44aDf1bd+765KmI11R2SGbI0fAy +X/3ZTz9FNEufPpsiS0MF38K1QvsVUU/cnz+O3H+n7pXK6IcrYnn2/EU+0jSs +VJDuik9SxLsjZsbLxGnwGe5yUC1VRBGRMctFS0jeJ7raBS9SQuOO3n9nh3kQ +2K9GrRZUQl+Ze2ZpgzyYMp8eGhJRwtwXufFa/TwQ4EuJ9ZNRwhYrP0O7zzxY +HV53x1VdCYviZjzCyHvhmJeS2NYdSij93VaU+YQHkiaDL1SvK6G72+QLoXQe +WI4ctvysr4wqyQHvc415IKe1Im6xsTLW3Hm+Rs+QB8PB9bWqpspYVPOSWaPH +g4s/RIyDNymj1KR7cbMGD3pm8jVmXZQxcW1bbzWDB8GCb8WWn1LG0+NDu/nm +8yBtFfZs7lZG/+5zTOEGLgx6LA65E7kS4667K9zcyCXvf6l58bWr8OAjvzxB +5WIQfa50lh5RwdDhxHrdn4Ugl8Dbpq+vhrXKWz77nS+AK6qGImI+6lhVeGOu +o1o+NMqY6o2f18DHOqY+YQ9vgpFcbbJmuyYad14xM1qVB8J8Nw66Ra9Gv5d3 +8qryc2BFlIKxo5IWfnj7D7NTIBv4FXeXbn+ihZjspKYfngUanOW8w3u0sdY0 +KzFuSSYE94jWWc3RQXenpfnh0hkwMp640/KKDhZ2CbTr7UsDc83HaZbquljj +UTv2biAVHoyv/T3VrIt8974INu25BIFq2l2tXnrofOuc/W/qAnCGPdsc+fVR +7XpWbeGnZNjAlt4idEMfZ3c83bRvKAlWnjgdVmtggH2qa3b0hJwGFS/Dh4pd +BsjNUIp6sCAevB74nrxzYA3W8JakSTFPwsPMNs8xCUO8KqL76N9tUTBxa3ZK +854htpX+yTYoOwYeioX8aVuMUC/1eencm+EwpnJB//aoEc6o15oL1R2Cspzf +HyYT1uKNX6tEjC8Gg9N6Fq5dYYyp6rNmj3n7QTYgvlyj2hi9C8wyf8bvBQkB +/5It9hxcvm67wxY3b8hZdyxi1JGDdlnhIbLbvEH72Nl1F3ZzsEdfs3fCxBus +R+nXnW4crPbfdP6pnDfEtU9Oe/hzkDJ8/HC60wt+3og0i4jioGVV3MagHV7Q +tfbCq7xCDvJavLae3eYJvody0i25HHQssz9ciZ7wg3vXa5DmYHDHe6Px1Z4g +SnVOaZVy8OJU5PHoZZ6wabG8XFU1B78NVu5WeOUB99vyPF+95qCQV27mFgcP +sBIuUw/t5CBq5fQzLT2g0/zpD+luDrq+EAqbY+QBExUDCc7vObh4mbX5W1kP +UM9aXfy/fg7OlIsrCL93h/tdpqGJQxyMHhkd0Gl1ByvxHaA5ysHXfJUtHrXu +4B1/qPXgJKlfIrzpQ447TFTHpUn95KDm5qxOzcvuEP0r1aPiFwfvtyl8jY93 +BxHdfLU9Mxz0+pDy/X9h7nAtoGJydpaDYeZpkzv3usP/ARhB/3o= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06392687156526347}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06392687156526347}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350683314781*^9, 3.994353776808467*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"9ca4c94e-f87e-484f-8572-2ffb6807756d"] +}, Open ]], Cell[CellGroupData[{ @@ -7659,12 +8426,15 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.99179966106703*^9},ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], + CellChangeTimes->{3.99179966106703*^9}, + CellLabel-> + "In[107]:=",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[BoxData["11.27534350842078`"], "Output", - CellChangeTimes->{3.9913229040054893`*^9}, - CellLabel->"Out[88]=",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[BoxData["11.866269680779427`"], "Output", + CellChangeTimes->{3.9913229040054893`*^9, 3.994350683363544*^9, + 3.994353776868936*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"7cabb513-17f6-4838-8e79-7f527afa4c99"] }, Open ]], Cell[CellGroupData[{ @@ -7720,158 +8490,160 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991799666995865*^9},ExpressionUUID->"7116d4f3-8ab8-b741-8264-\ -0a5eeac170a0"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 17, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042538757`*^9}, + CellChangeTimes->{3.991799666995865*^9}, CellLabel-> - "During evaluation of \ -In[89]:=",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], + "In[108]:=",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.3066449595171447`*^-261\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 18, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042728806`*^9}, + 2, 108, 13, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.9943506834906807`*^9, + 3.994353776995459*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], +In[108]:=",ExpressionUUID->"56e2b532-7a89-4ec4-800d-0d86c787bf16"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.8431060797400435`*^-271\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 89, 19, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042938766`*^9}, +\"", 2, 108, 14, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.9943506834906807`*^9, + 3.9943537770036917`*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], +In[108]:=",ExpressionUUID->"4261b359-2176-47b2-8392-1dacd047f07c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.186265153191943`*^-281\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 108, 15, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.9943506834906807`*^9, + 3.994353777012645*^9}, + CellLabel-> + "During evaluation of \ +In[108]:=",ExpressionUUID->"88b7fb47-a3a0-42ce-a935-9edef6d30d36"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 89, 20, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229043127804`*^9}, +during this calculation.\"", 2, 108, 16, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.9943506834906807`*^9, + 3.99435377702077*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], +In[108]:=",ExpressionUUID->"823ce98e-2120-4234-b89e-8cdc680d9e2d"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nlUTe0XB/DeIiFKs+Z77u1Gk0pKw23vDGkgmqhocJsMadJAgxQphVJJ +ktKIpnuSoSgSkpAijYR46W0SGpTp9/z+OOuszzrrOWvtZz3Pd28GN8DOm5+P +j+8Hef7/nup//ICVXGSaLrBzXpYjx7QjV+agWXccsA/H/Hd+UBZQ8jlXpjsN +/lo8vuM2qAZhW0q7BLoLQOu29l6DQSNYMiadNtN1FdKsq5v5Bq3gbZ1NwERX +I5jt0j7r/NkFzFlDb752vQARlfb8zo97YKbL4Mx41wBkvbKd6OmNgPtrLxW1 +F3wH4W+2oa3PkkH+be0nrsZv+JglqkkFZ4CEn3vpvLUCyGxY8m1Bfjak6Zjf +tnEUwqNYuvdBzEXoydJu+Cq6CPukHnV5byiE5KKY5/xLl2DdoQkFf+ESkM74 +cDz9gjhyJYSyLQ9dhgQHS9MXU5L4ZV1w0cK4UpC91irL/48UnvgZ26aTVAqV +4g7TOgul8NXK+2/t0kqh84UbfVpJCu1V+YriC0qBZRtC2VpI4cDux5crGkuh +cVOeYNs5Kdy7XqlDkL8MfptPtj4zkcZvfh3JXVFlsN8w3/1xnAwubLpc0cQt +B6uLiyesT8jgpfp/2tV2lwM1Lyqx9YwMhi5Z5pgUUA5tHVurXl6Wwd+piw8Z +R5WDVqCwQH+rDE5Uflzvc6YcBkvCS77JLkXBey9t3jSVww4Jm1G56qXILr+Q +YsOugHVfZiP8P8ji4NQwW6OrAg5aZKjdG5HFZ0oZQdavK6AyX7NXfEoW6ea8 +1T7vK0DGwcOwVkgO9QW2Gp8aroCRmofTAlpyeO5kmcjlvxWQHpcacu6AHM7G +i/Txq1bCgCTb/8EieYTWmgCH4EqQDrirIC0tjxO3jGU+hFXCxmanZ7uV5VG4 +44PRvshKuBGRrCGyUh4TaovH9h+thKS340POTvLo/clE1DqzEnSv3Pb9UiCP +0qLVZsq1lRBrYrtTdrUC8mcUN/n8rAQLt9xvBmsUMDTwdMjtv5Ww+PDwEceN +CviLNdG+YA4Pcu7Hl6R6KODO0hfnzwnzoMbq1rDgcQWcntUPClfgwbgTM+x7 +jwJqyx231TPlgVvoZNLTSEUMa8govxbJA5Wza+SH4hXxodfpOvcYHqk/pWJe +qiLOUww5OvcIDyJ+LW9bU6SIj6tdOGZJPDhzxE2y9qkifsmZ43YwiwdPTz/K +K1ZQwgl/g6sj1Twwqjx37dBdJeyYOVk28IkH67paf481K2FnY9nSq//xwIZv +zgb3F0qo/ejdbNQIDzzt/HvgXyWMvmMtM/cbD8wjGTGH5yrjL81DT/p/8SBQ +aarQTF0Zw6rumrwWomGyOrV5ZoUydjDSLyktoCHCQn20Sk8ZPU4UPfdYSEN8 +kIc+ZaqMSl0xTq8X0ZB9v6WZ31YZ+7lqDjViNDzwzRu9H6aMrNuJmnPkabD8 +ZSgWFamMS+vkkpkKNLSmdujrHVZGFy6jFBVp6Kmdf7jouDK2bSnUDFGmYWxh +iFh8jjLmbw2xa2DRIENbGJg3KqOnyyGHUQ0a/H58Pdy8iIHfGgNdc4xpMAry +kfokxsBI1o7jx0xoEBrqLROQYWDYbLeCP4eG4r77naYUAwv918atAhr675zR +uK7PQKda9vriNTRsjjfszndnYMrxXOn5ljQo/qnYd9eLgftnF/K3EI+EUQJv +djNQADfsSLSiIXHXQi2ZEAayeMLc39Y0NFi/OXIqkYHLZU0amm1o0BWLXRFZ +xcCGY7F6/9rTwJc8+SDrBgPZpTOO0Q6kfoE9LjduMzA7ReGLmCMNeyft4r8+ +ZKArHZqkv5WGom5Wn28vA83rP+53d6Ih2PZcYPxbBo7L6+38QIwtiwQLPzLw +tJJzi5czDW9uT2n3jzFQLnCdmIcLDVJ5zcccBCiccC5KWL2Dho/SHPlgIQo3 +11zkXia+mlpVlbKIwsHpxnpJV1J/XPbrFmkKF4eXTw0SJ3r76ZppUDjQfD4u +yJ2Grf3vHrnpUFjrae3/jJi1zdE1Sp/CR82Z/WwPUr+FaeJNpDB+1HzzC+IZ +ddF+TUcK3a5JxS7k0jB1QTZ2pQuFP8xpRzviCREVlqE7hSFJzi2ZxGPfDfes +203hrj9imTKeNAx7r1tk5U9h3F4ccyQe7LKhN++nkMlfM5hKPHDbc8olmkLV +gYdNf4nfavqf84ijsDstumylFw2v8w6Y+CRQOGPUqOdN3HnkZFzQaQqDxowM +7hG/nDyrEp5JoUxsRtUwcZtvQXPUeeKlTS/EvWlosb65OLGYQtd5/MKuxI/q +71WdLKVQb3aVyiHiByueOqTzKPygduZzDvG9/M7prGsUlpZdt68lviP+Pju3 +lsI7Ilp7XhLfjh/mFN2hkH/vGfVh4prpyXdX7lN4zvZIFp8PDdd38x3lNVNY +0pVSJU58tW+B6vVnFL5NtQ9nEfM2SbbcekGhearvkC5x+V2lfQ1dFHb5ei8E +4is6aqJNrykUW/a514K4pFCv+sl7Ch+7JzhvIS6UhK3tnyislnuf4Eh8McFy +pnOYQvFPKT5OxBdm7HNej1Po27Ri6v/O3usGA5Pku5mrwTbis292DXyepXDu +tutq9sQZm/fHj/6l0C7+VdtG4tP3opd9n8PE7w+2q60jPrUy8cmP+UzcnvTJ +wJA4uTjN/89iJmo8lJhVJ06UvrBkjgQTH7+ND5Injj9+6dr8pUxUvNuTu4A4 +7mfVNhFFJrIb6bgpsl8x++pmJZhMvHSvTOEdcdTbpguyy5jYKuIX+Ij4oG07 +Kmsy8X14emQ5cdj9vg8qukzs4zyAFOL9qz4dUzdgophifn0AceCl8eU6Jkz8 +vPHZ5CbivclzA03MmThZX3BWgHjXbxHxNdZM/Fifwd9HzodPgOyNDVuYuCzB +V40m9rBf8cvOhYkpQubV9sSuDw3znNyZeFI7V5IidjFYt8bNi6znCzQYI+fT +Qc45cbc/E1fHKdbFENue9FQP2M/EYUtr5fXENn/3tYYcYGL1p9PmQsQWH+Ik +DscxUfPhktcJ5H6YlJVfzMxk4lKDgxy/nTT0KZflrT/PROVo/T8s4ojMK7kT +eUz8ud6nrY/cv5uxJTl2V5h46B+bsrXEuk4XsxbXMdFXpNjqlxsN7c9yz9Y3 +MDFz7vaSYuLAtRcy/R4yMdx+VHoTcaVWdkZLKxONpQdMM0keLJ+bkXrsPRPR +qK5sCcmP5oi0lFWfmOiez99Utp3sz3jqqY9DZP3fwtm1xEV9J0+smWCiJB/n +uj/JI+WrCYl/BFmYYns3poLkl5R75OEwDRZSPx8MtZE8vN5xMEZFh4XZ52O/ +bCR2sDpwqGMVCycfvpB+RPIzbVVolC6w8Ofz5FfX7WhYJBxwYMyWhVKyPZLR +W2iYU8sN9Aln4VBbn1Y1yeNCrZ0BklEs/GdgrHoJ8Zoid/8Hh1lotETBx5/k +d0zKDj8qiYUjqfoOFMn3We+tu/pzWFi4zWNXiDkNX8WsPLY2shBKk2fuIQ3d +flTbnkcs/L7adPd30j8ammYh5ikLw1o23aWIUyPKlC53snBrYBUjkvQb7QHh +tzNDLJS+/eaVmBEN/lXPXS+Iq6BDRxqvX5eGoc2O2z96qWDiHLOeUYqGF1c0 +n/zYrYKv97kVv2HQcEtA0HhRgApGbP4a9IT0w+M3b8jqH1TBD4x2kXzSL5cp +yfQmnFTBGs8/oXqyNPiO9Tqp31DBM0lmV36Jkrw/4bE1eB4b4+73WOrM8sB/ +SIPSFmajvY7fbMM0D6Y3zIyOirJJfmxy3zTJgwUCafG7ZdmoYFpuvWOcB9oH +71/z0GSjRHtjpx2ZL6K92eKb7dmYtbF/qrCdB1KmI8/V89homR8e/q6YB5Zf +wi3/1VfFZOO6fRLreSCvo3hMyEQV6Tqq5KwZD8aCHzSqm6ni+kXr/aXJfJQx +JWoSbK2Ktdm7rgsb8KD/9xWtv+6qOLV/3KF1GQ+ChV+LLz2uitJ8Tom8hTzI +Xo79G/tUcfXk543TrZUw4im0/1rMMhxx2lk6f2Mlmf+l+RMal+P6km1Vocsr +QOwZ+xT9RQ2dpjd6Dk2XgXwib4u+vgYGfd5j7XiqFLLUDUXFfTVxzlHrpE72 +FWiRNVv1/bQWihz6N/7RzUtgJN+YuqJzBcZapPX4KZXAYoGCkJ1x2iiossXH +KLcIFGOVTJzZOpjfNpbS9LsA5qvsuGH3SAfnrf1XYmRPPmhxlvLCXXUxrPwV +X/2PPAjuF7tvxbcS1YaFBPt+5MCX7yccLbNW4uTniVPvrbJhw4qmbEtNPbyR +56tt+eQs3Plu/HO6VQ/lI2dbvThnwF9Dt7fdexVuuNjQqCiQDpwxrw7n+fr4 +JN2i5+7DVFjPktm0qEAf+1wPGH2oOgnLDicdaDQwwDDHBgdB4yRQ8za8q9Jr +gE/2zWdrtR0D7zu7jl4LWo2BvhYKnWNH4O7FDq+vkoZYo9bDW0nFwsTlv9Mr +bhrikZ16nfe40eCpUjY/e5MRXhZtfJLpdBC+qqXrXx03Qvd1wRbsqFCoKfr5 +fjLRGJPleMWUQzC4rCPZoWiC38L227uaBIDcvoRarQYTHNadJ1LF2AOSC/yq +Nm3joLDqTYFoQR8oWhsdMe7MQWaGSEzUpDfoRp9am76Dg+obLhklfPQGm3H6 +VfdODq48dWL7nUZvONY5OePpx8GGPKvCqzHe8KMgZk1ELAe1F3pZVP70gl7j +9JclZRwMMs1VbfnpCbtCi3IsKzlYOVCcxx7xhKnK694jNAe/6JwpOPnaE8So +7mmdGxy08R7Ujaz3BGshBfn6Bg6uyPvv/csYT6jrKPF6+YqDcS/fF4QJeoLV +4hrNsG4ONquNaR+c5kL3hsdTMn0cfKOS/jV+kAsTt4YT3d5xkFJ6OlHfwgXN +fO2K/4Y42PLUec+lFC7U9ZqFnRjl4JPImInZw1ywkrCHFeMc/N1yNd4pmAs+ +CaHtIZMcvKyVc0nHkfyv4Vi29A8OZroe0aww50Lc7FnPW7MctOT2Fumu5oKo +3hUN198cdJngCDUu50LuvluTf/9y8FPYRrvtclz4H7wyBWc= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7885,117 +8657,111 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwV1nlUTe0XB/DeIiFKs+Z77u1Gk0pKw23vDGkgmqhocJsMadJAgxQphVJJ +ktKIpnuSoSgSkpAijYR46W0SGpTp9/z+OOuszzrrOWvtZz3Pd28GN8DOm5+P +j+8Hef7/nup//ICVXGSaLrBzXpYjx7QjV+agWXccsA/H/Hd+UBZQ8jlXpjsN +/lo8vuM2qAZhW0q7BLoLQOu29l6DQSNYMiadNtN1FdKsq5v5Bq3gbZ1NwERX +I5jt0j7r/NkFzFlDb752vQARlfb8zo97YKbL4Mx41wBkvbKd6OmNgPtrLxW1 +F3wH4W+2oa3PkkH+be0nrsZv+JglqkkFZ4CEn3vpvLUCyGxY8m1Bfjak6Zjf +tnEUwqNYuvdBzEXoydJu+Cq6CPukHnV5byiE5KKY5/xLl2DdoQkFf+ESkM74 +cDz9gjhyJYSyLQ9dhgQHS9MXU5L4ZV1w0cK4UpC91irL/48UnvgZ26aTVAqV +4g7TOgul8NXK+2/t0kqh84UbfVpJCu1V+YriC0qBZRtC2VpI4cDux5crGkuh +cVOeYNs5Kdy7XqlDkL8MfptPtj4zkcZvfh3JXVFlsN8w3/1xnAwubLpc0cQt +B6uLiyesT8jgpfp/2tV2lwM1Lyqx9YwMhi5Z5pgUUA5tHVurXl6Wwd+piw8Z +R5WDVqCwQH+rDE5Uflzvc6YcBkvCS77JLkXBey9t3jSVww4Jm1G56qXILr+Q +YsOugHVfZiP8P8ji4NQwW6OrAg5aZKjdG5HFZ0oZQdavK6AyX7NXfEoW6ea8 +1T7vK0DGwcOwVkgO9QW2Gp8aroCRmofTAlpyeO5kmcjlvxWQHpcacu6AHM7G +i/Txq1bCgCTb/8EieYTWmgCH4EqQDrirIC0tjxO3jGU+hFXCxmanZ7uV5VG4 +44PRvshKuBGRrCGyUh4TaovH9h+thKS340POTvLo/clE1DqzEnSv3Pb9UiCP +0qLVZsq1lRBrYrtTdrUC8mcUN/n8rAQLt9xvBmsUMDTwdMjtv5Ww+PDwEceN +CviLNdG+YA4Pcu7Hl6R6KODO0hfnzwnzoMbq1rDgcQWcntUPClfgwbgTM+x7 +jwJqyx231TPlgVvoZNLTSEUMa8govxbJA5Wza+SH4hXxodfpOvcYHqk/pWJe +qiLOUww5OvcIDyJ+LW9bU6SIj6tdOGZJPDhzxE2y9qkifsmZ43YwiwdPTz/K +K1ZQwgl/g6sj1Twwqjx37dBdJeyYOVk28IkH67paf481K2FnY9nSq//xwIZv +zgb3F0qo/ejdbNQIDzzt/HvgXyWMvmMtM/cbD8wjGTGH5yrjL81DT/p/8SBQ +aarQTF0Zw6rumrwWomGyOrV5ZoUydjDSLyktoCHCQn20Sk8ZPU4UPfdYSEN8 +kIc+ZaqMSl0xTq8X0ZB9v6WZ31YZ+7lqDjViNDzwzRu9H6aMrNuJmnPkabD8 +ZSgWFamMS+vkkpkKNLSmdujrHVZGFy6jFBVp6Kmdf7jouDK2bSnUDFGmYWxh +iFh8jjLmbw2xa2DRIENbGJg3KqOnyyGHUQ0a/H58Pdy8iIHfGgNdc4xpMAry +kfokxsBI1o7jx0xoEBrqLROQYWDYbLeCP4eG4r77naYUAwv918atAhr675zR +uK7PQKda9vriNTRsjjfszndnYMrxXOn5ljQo/qnYd9eLgftnF/K3EI+EUQJv +djNQADfsSLSiIXHXQi2ZEAayeMLc39Y0NFi/OXIqkYHLZU0amm1o0BWLXRFZ +xcCGY7F6/9rTwJc8+SDrBgPZpTOO0Q6kfoE9LjduMzA7ReGLmCMNeyft4r8+ +ZKArHZqkv5WGom5Wn28vA83rP+53d6Ih2PZcYPxbBo7L6+38QIwtiwQLPzLw +tJJzi5czDW9uT2n3jzFQLnCdmIcLDVJ5zcccBCiccC5KWL2Dho/SHPlgIQo3 +11zkXia+mlpVlbKIwsHpxnpJV1J/XPbrFmkKF4eXTw0SJ3r76ZppUDjQfD4u +yJ2Grf3vHrnpUFjrae3/jJi1zdE1Sp/CR82Z/WwPUr+FaeJNpDB+1HzzC+IZ +ddF+TUcK3a5JxS7k0jB1QTZ2pQuFP8xpRzviCREVlqE7hSFJzi2ZxGPfDfes +203hrj9imTKeNAx7r1tk5U9h3F4ccyQe7LKhN++nkMlfM5hKPHDbc8olmkLV +gYdNf4nfavqf84ijsDstumylFw2v8w6Y+CRQOGPUqOdN3HnkZFzQaQqDxowM +7hG/nDyrEp5JoUxsRtUwcZtvQXPUeeKlTS/EvWlosb65OLGYQtd5/MKuxI/q +71WdLKVQb3aVyiHiByueOqTzKPygduZzDvG9/M7prGsUlpZdt68lviP+Pju3 +lsI7Ilp7XhLfjh/mFN2hkH/vGfVh4prpyXdX7lN4zvZIFp8PDdd38x3lNVNY +0pVSJU58tW+B6vVnFL5NtQ9nEfM2SbbcekGhearvkC5x+V2lfQ1dFHb5ei8E +4is6aqJNrykUW/a514K4pFCv+sl7Ch+7JzhvIS6UhK3tnyislnuf4Eh8McFy +pnOYQvFPKT5OxBdm7HNej1Po27Ri6v/O3usGA5Pku5mrwTbis292DXyepXDu +tutq9sQZm/fHj/6l0C7+VdtG4tP3opd9n8PE7w+2q60jPrUy8cmP+UzcnvTJ +wJA4uTjN/89iJmo8lJhVJ06UvrBkjgQTH7+ND5Injj9+6dr8pUxUvNuTu4A4 +7mfVNhFFJrIb6bgpsl8x++pmJZhMvHSvTOEdcdTbpguyy5jYKuIX+Ij4oG07 +Kmsy8X14emQ5cdj9vg8qukzs4zyAFOL9qz4dUzdgophifn0AceCl8eU6Jkz8 +vPHZ5CbivclzA03MmThZX3BWgHjXbxHxNdZM/Fifwd9HzodPgOyNDVuYuCzB +V40m9rBf8cvOhYkpQubV9sSuDw3znNyZeFI7V5IidjFYt8bNi6znCzQYI+fT +Qc45cbc/E1fHKdbFENue9FQP2M/EYUtr5fXENn/3tYYcYGL1p9PmQsQWH+Ik +DscxUfPhktcJ5H6YlJVfzMxk4lKDgxy/nTT0KZflrT/PROVo/T8s4ojMK7kT +eUz8ud6nrY/cv5uxJTl2V5h46B+bsrXEuk4XsxbXMdFXpNjqlxsN7c9yz9Y3 +MDFz7vaSYuLAtRcy/R4yMdx+VHoTcaVWdkZLKxONpQdMM0keLJ+bkXrsPRPR +qK5sCcmP5oi0lFWfmOiez99Utp3sz3jqqY9DZP3fwtm1xEV9J0+smWCiJB/n +uj/JI+WrCYl/BFmYYns3poLkl5R75OEwDRZSPx8MtZE8vN5xMEZFh4XZ52O/ +bCR2sDpwqGMVCycfvpB+RPIzbVVolC6w8Ofz5FfX7WhYJBxwYMyWhVKyPZLR +W2iYU8sN9Aln4VBbn1Y1yeNCrZ0BklEs/GdgrHoJ8Zoid/8Hh1lotETBx5/k +d0zKDj8qiYUjqfoOFMn3We+tu/pzWFi4zWNXiDkNX8WsPLY2shBKk2fuIQ3d +flTbnkcs/L7adPd30j8ammYh5ikLw1o23aWIUyPKlC53snBrYBUjkvQb7QHh +tzNDLJS+/eaVmBEN/lXPXS+Iq6BDRxqvX5eGoc2O2z96qWDiHLOeUYqGF1c0 +n/zYrYKv97kVv2HQcEtA0HhRgApGbP4a9IT0w+M3b8jqH1TBD4x2kXzSL5cp +yfQmnFTBGs8/oXqyNPiO9Tqp31DBM0lmV36Jkrw/4bE1eB4b4+73WOrM8sB/ +SIPSFmajvY7fbMM0D6Y3zIyOirJJfmxy3zTJgwUCafG7ZdmoYFpuvWOcB9oH +71/z0GSjRHtjpx2ZL6K92eKb7dmYtbF/qrCdB1KmI8/V89homR8e/q6YB5Zf +wi3/1VfFZOO6fRLreSCvo3hMyEQV6Tqq5KwZD8aCHzSqm6ni+kXr/aXJfJQx +JWoSbK2Ktdm7rgsb8KD/9xWtv+6qOLV/3KF1GQ+ChV+LLz2uitJ8Tom8hTzI +Xo79G/tUcfXk543TrZUw4im0/1rMMhxx2lk6f2Mlmf+l+RMal+P6km1Vocsr +QOwZ+xT9RQ2dpjd6Dk2XgXwib4u+vgYGfd5j7XiqFLLUDUXFfTVxzlHrpE72 +FWiRNVv1/bQWihz6N/7RzUtgJN+YuqJzBcZapPX4KZXAYoGCkJ1x2iiossXH +KLcIFGOVTJzZOpjfNpbS9LsA5qvsuGH3SAfnrf1XYmRPPmhxlvLCXXUxrPwV +X/2PPAjuF7tvxbcS1YaFBPt+5MCX7yccLbNW4uTniVPvrbJhw4qmbEtNPbyR +56tt+eQs3Plu/HO6VQ/lI2dbvThnwF9Dt7fdexVuuNjQqCiQDpwxrw7n+fr4 +JN2i5+7DVFjPktm0qEAf+1wPGH2oOgnLDicdaDQwwDDHBgdB4yRQ8za8q9Jr +gE/2zWdrtR0D7zu7jl4LWo2BvhYKnWNH4O7FDq+vkoZYo9bDW0nFwsTlv9Mr +bhrikZ16nfe40eCpUjY/e5MRXhZtfJLpdBC+qqXrXx03Qvd1wRbsqFCoKfr5 +fjLRGJPleMWUQzC4rCPZoWiC38L227uaBIDcvoRarQYTHNadJ1LF2AOSC/yq +Nm3joLDqTYFoQR8oWhsdMe7MQWaGSEzUpDfoRp9am76Dg+obLhklfPQGm3H6 +VfdODq48dWL7nUZvONY5OePpx8GGPKvCqzHe8KMgZk1ELAe1F3pZVP70gl7j +9JclZRwMMs1VbfnpCbtCi3IsKzlYOVCcxx7xhKnK694jNAe/6JwpOPnaE8So +7mmdGxy08R7Ujaz3BGshBfn6Bg6uyPvv/csYT6jrKPF6+YqDcS/fF4QJeoLV +4hrNsG4ONquNaR+c5kL3hsdTMn0cfKOS/jV+kAsTt4YT3d5xkFJ6OlHfwgXN +fO2K/4Y42PLUec+lFC7U9ZqFnRjl4JPImInZw1ywkrCHFeMc/N1yNd4pmAs+ +CaHtIZMcvKyVc0nHkfyv4Vi29A8OZroe0aww50Lc7FnPW7MctOT2Fumu5oKo +3hUN198cdJngCDUu50LuvluTf/9y8FPYRrvtclz4H7wyBWc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06406169901290469}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8007,19 +8773,19 @@ U0FU/w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06406169901290469}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8033,116 +8799,110 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwV1nlUTe0XB/DeIiFKs+Z77u1Gk0pKw23vDGkgmqhocJsMadJAgxQphVJJ +ktKIpnuSoSgSkpAijYR46W0SGpTp9/z+OOuszzrrOWvtZz3Pd28GN8DOm5+P +j+8Hef7/nup//ICVXGSaLrBzXpYjx7QjV+agWXccsA/H/Hd+UBZQ8jlXpjsN +/lo8vuM2qAZhW0q7BLoLQOu29l6DQSNYMiadNtN1FdKsq5v5Bq3gbZ1NwERX +I5jt0j7r/NkFzFlDb752vQARlfb8zo97YKbL4Mx41wBkvbKd6OmNgPtrLxW1 +F3wH4W+2oa3PkkH+be0nrsZv+JglqkkFZ4CEn3vpvLUCyGxY8m1Bfjak6Zjf +tnEUwqNYuvdBzEXoydJu+Cq6CPukHnV5byiE5KKY5/xLl2DdoQkFf+ESkM74 +cDz9gjhyJYSyLQ9dhgQHS9MXU5L4ZV1w0cK4UpC91irL/48UnvgZ26aTVAqV +4g7TOgul8NXK+2/t0kqh84UbfVpJCu1V+YriC0qBZRtC2VpI4cDux5crGkuh +cVOeYNs5Kdy7XqlDkL8MfptPtj4zkcZvfh3JXVFlsN8w3/1xnAwubLpc0cQt +B6uLiyesT8jgpfp/2tV2lwM1Lyqx9YwMhi5Z5pgUUA5tHVurXl6Wwd+piw8Z +R5WDVqCwQH+rDE5Uflzvc6YcBkvCS77JLkXBey9t3jSVww4Jm1G56qXILr+Q +YsOugHVfZiP8P8ji4NQwW6OrAg5aZKjdG5HFZ0oZQdavK6AyX7NXfEoW6ea8 +1T7vK0DGwcOwVkgO9QW2Gp8aroCRmofTAlpyeO5kmcjlvxWQHpcacu6AHM7G +i/Txq1bCgCTb/8EieYTWmgCH4EqQDrirIC0tjxO3jGU+hFXCxmanZ7uV5VG4 +44PRvshKuBGRrCGyUh4TaovH9h+thKS340POTvLo/clE1DqzEnSv3Pb9UiCP +0qLVZsq1lRBrYrtTdrUC8mcUN/n8rAQLt9xvBmsUMDTwdMjtv5Ww+PDwEceN +CviLNdG+YA4Pcu7Hl6R6KODO0hfnzwnzoMbq1rDgcQWcntUPClfgwbgTM+x7 +jwJqyx231TPlgVvoZNLTSEUMa8govxbJA5Wza+SH4hXxodfpOvcYHqk/pWJe +qiLOUww5OvcIDyJ+LW9bU6SIj6tdOGZJPDhzxE2y9qkifsmZ43YwiwdPTz/K +K1ZQwgl/g6sj1Twwqjx37dBdJeyYOVk28IkH67paf481K2FnY9nSq//xwIZv +zgb3F0qo/ejdbNQIDzzt/HvgXyWMvmMtM/cbD8wjGTGH5yrjL81DT/p/8SBQ +aarQTF0Zw6rumrwWomGyOrV5ZoUydjDSLyktoCHCQn20Sk8ZPU4UPfdYSEN8 +kIc+ZaqMSl0xTq8X0ZB9v6WZ31YZ+7lqDjViNDzwzRu9H6aMrNuJmnPkabD8 +ZSgWFamMS+vkkpkKNLSmdujrHVZGFy6jFBVp6Kmdf7jouDK2bSnUDFGmYWxh +iFh8jjLmbw2xa2DRIENbGJg3KqOnyyGHUQ0a/H58Pdy8iIHfGgNdc4xpMAry +kfokxsBI1o7jx0xoEBrqLROQYWDYbLeCP4eG4r77naYUAwv918atAhr675zR +uK7PQKda9vriNTRsjjfszndnYMrxXOn5ljQo/qnYd9eLgftnF/K3EI+EUQJv +djNQADfsSLSiIXHXQi2ZEAayeMLc39Y0NFi/OXIqkYHLZU0amm1o0BWLXRFZ +xcCGY7F6/9rTwJc8+SDrBgPZpTOO0Q6kfoE9LjduMzA7ReGLmCMNeyft4r8+ +ZKArHZqkv5WGom5Wn28vA83rP+53d6Ih2PZcYPxbBo7L6+38QIwtiwQLPzLw +tJJzi5czDW9uT2n3jzFQLnCdmIcLDVJ5zcccBCiccC5KWL2Dho/SHPlgIQo3 +11zkXia+mlpVlbKIwsHpxnpJV1J/XPbrFmkKF4eXTw0SJ3r76ZppUDjQfD4u +yJ2Grf3vHrnpUFjrae3/jJi1zdE1Sp/CR82Z/WwPUr+FaeJNpDB+1HzzC+IZ +ddF+TUcK3a5JxS7k0jB1QTZ2pQuFP8xpRzviCREVlqE7hSFJzi2ZxGPfDfes +203hrj9imTKeNAx7r1tk5U9h3F4ccyQe7LKhN++nkMlfM5hKPHDbc8olmkLV +gYdNf4nfavqf84ijsDstumylFw2v8w6Y+CRQOGPUqOdN3HnkZFzQaQqDxowM +7hG/nDyrEp5JoUxsRtUwcZtvQXPUeeKlTS/EvWlosb65OLGYQtd5/MKuxI/q +71WdLKVQb3aVyiHiByueOqTzKPygduZzDvG9/M7prGsUlpZdt68lviP+Pju3 +lsI7Ilp7XhLfjh/mFN2hkH/vGfVh4prpyXdX7lN4zvZIFp8PDdd38x3lNVNY +0pVSJU58tW+B6vVnFL5NtQ9nEfM2SbbcekGhearvkC5x+V2lfQ1dFHb5ei8E +4is6aqJNrykUW/a514K4pFCv+sl7Ch+7JzhvIS6UhK3tnyislnuf4Eh8McFy +pnOYQvFPKT5OxBdm7HNej1Po27Ri6v/O3usGA5Pku5mrwTbis292DXyepXDu +tutq9sQZm/fHj/6l0C7+VdtG4tP3opd9n8PE7w+2q60jPrUy8cmP+UzcnvTJ +wJA4uTjN/89iJmo8lJhVJ06UvrBkjgQTH7+ND5Injj9+6dr8pUxUvNuTu4A4 +7mfVNhFFJrIb6bgpsl8x++pmJZhMvHSvTOEdcdTbpguyy5jYKuIX+Ij4oG07 +Kmsy8X14emQ5cdj9vg8qukzs4zyAFOL9qz4dUzdgophifn0AceCl8eU6Jkz8 +vPHZ5CbivclzA03MmThZX3BWgHjXbxHxNdZM/Fifwd9HzodPgOyNDVuYuCzB +V40m9rBf8cvOhYkpQubV9sSuDw3znNyZeFI7V5IidjFYt8bNi6znCzQYI+fT +Qc45cbc/E1fHKdbFENue9FQP2M/EYUtr5fXENn/3tYYcYGL1p9PmQsQWH+Ik +DscxUfPhktcJ5H6YlJVfzMxk4lKDgxy/nTT0KZflrT/PROVo/T8s4ojMK7kT +eUz8ud6nrY/cv5uxJTl2V5h46B+bsrXEuk4XsxbXMdFXpNjqlxsN7c9yz9Y3 +MDFz7vaSYuLAtRcy/R4yMdx+VHoTcaVWdkZLKxONpQdMM0keLJ+bkXrsPRPR +qK5sCcmP5oi0lFWfmOiez99Utp3sz3jqqY9DZP3fwtm1xEV9J0+smWCiJB/n +uj/JI+WrCYl/BFmYYns3poLkl5R75OEwDRZSPx8MtZE8vN5xMEZFh4XZ52O/ +bCR2sDpwqGMVCycfvpB+RPIzbVVolC6w8Ofz5FfX7WhYJBxwYMyWhVKyPZLR +W2iYU8sN9Aln4VBbn1Y1yeNCrZ0BklEs/GdgrHoJ8Zoid/8Hh1lotETBx5/k +d0zKDj8qiYUjqfoOFMn3We+tu/pzWFi4zWNXiDkNX8WsPLY2shBKk2fuIQ3d +flTbnkcs/L7adPd30j8ammYh5ikLw1o23aWIUyPKlC53snBrYBUjkvQb7QHh +tzNDLJS+/eaVmBEN/lXPXS+Iq6BDRxqvX5eGoc2O2z96qWDiHLOeUYqGF1c0 +n/zYrYKv97kVv2HQcEtA0HhRgApGbP4a9IT0w+M3b8jqH1TBD4x2kXzSL5cp +yfQmnFTBGs8/oXqyNPiO9Tqp31DBM0lmV36Jkrw/4bE1eB4b4+73WOrM8sB/ +SIPSFmajvY7fbMM0D6Y3zIyOirJJfmxy3zTJgwUCafG7ZdmoYFpuvWOcB9oH +71/z0GSjRHtjpx2ZL6K92eKb7dmYtbF/qrCdB1KmI8/V89homR8e/q6YB5Zf +wi3/1VfFZOO6fRLreSCvo3hMyEQV6Tqq5KwZD8aCHzSqm6ni+kXr/aXJfJQx +JWoSbK2Ktdm7rgsb8KD/9xWtv+6qOLV/3KF1GQ+ChV+LLz2uitJ8Tom8hTzI +Xo79G/tUcfXk543TrZUw4im0/1rMMhxx2lk6f2Mlmf+l+RMal+P6km1Vocsr +QOwZ+xT9RQ2dpjd6Dk2XgXwib4u+vgYGfd5j7XiqFLLUDUXFfTVxzlHrpE72 +FWiRNVv1/bQWihz6N/7RzUtgJN+YuqJzBcZapPX4KZXAYoGCkJ1x2iiossXH +KLcIFGOVTJzZOpjfNpbS9LsA5qvsuGH3SAfnrf1XYmRPPmhxlvLCXXUxrPwV +X/2PPAjuF7tvxbcS1YaFBPt+5MCX7yccLbNW4uTniVPvrbJhw4qmbEtNPbyR +56tt+eQs3Plu/HO6VQ/lI2dbvThnwF9Dt7fdexVuuNjQqCiQDpwxrw7n+fr4 +JN2i5+7DVFjPktm0qEAf+1wPGH2oOgnLDicdaDQwwDDHBgdB4yRQ8za8q9Jr +gE/2zWdrtR0D7zu7jl4LWo2BvhYKnWNH4O7FDq+vkoZYo9bDW0nFwsTlv9Mr +bhrikZ16nfe40eCpUjY/e5MRXhZtfJLpdBC+qqXrXx03Qvd1wRbsqFCoKfr5 +fjLRGJPleMWUQzC4rCPZoWiC38L227uaBIDcvoRarQYTHNadJ1LF2AOSC/yq +Nm3joLDqTYFoQR8oWhsdMe7MQWaGSEzUpDfoRp9am76Dg+obLhklfPQGm3H6 +VfdODq48dWL7nUZvONY5OePpx8GGPKvCqzHe8KMgZk1ELAe1F3pZVP70gl7j +9JclZRwMMs1VbfnpCbtCi3IsKzlYOVCcxx7xhKnK694jNAe/6JwpOPnaE8So +7mmdGxy08R7Ujaz3BGshBfn6Bg6uyPvv/csYT6jrKPF6+YqDcS/fF4QJeoLV +4hrNsG4ONquNaR+c5kL3hsdTMn0cfKOS/jV+kAsTt4YT3d5xkFJ6OlHfwgXN +fO2K/4Y42PLUec+lFC7U9ZqFnRjl4JPImInZw1ywkrCHFeMc/N1yNd4pmAs+ +CaHtIZMcvKyVc0nHkfyv4Vi29A8OZroe0aww50Lc7FnPW7MctOT2Fumu5oKo +3hUN198cdJngCDUu50LuvluTf/9y8FPYRrvtclz4H7wyBWc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06406169901290469}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8153,6 +8913,7 @@ U0FU/w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8180,7 +8941,8 @@ U0FU/w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.06741909458355917}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06406169901290469}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8188,8 +8950,10 @@ U0FU/w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913236646248627`*^9}, - CellLabel->"Out[89]=",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] + CellChangeTimes->{3.9913236646248627`*^9, 3.994351446411394*^9, + 3.9943545146475763`*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"37073721-2df7-4e47-a6d3-94f923cca011"] }, Open ]], Cell[CellGroupData[{ @@ -8241,65 +9005,79 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel->"In[90]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], + CellLabel-> + "In[109]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 90, - 21, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323664732767*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.720188487898366`*^-172\\\", \ +RowBox[{\\\"182746270923358292188640954459021807938\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"61\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3679745821507584000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 109, + 17, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.9943514465852537`*^9, + 3.9943545148162746`*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], +In[109]:=",ExpressionUUID->"ec2635b2-3cb6-45b7-bf7a-ec8e06f7a740"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 22, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132366476486*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5758539350937932`*^-175\\\", \ +RowBox[{\\\"532888126012512780022077023202507591948\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"64\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0138815516114944000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 109, + 18, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.9943514465852537`*^9, + 3.994354514828269*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], +In[109]:=",ExpressionUUID->"701ff601-5a2f-4374-8f77-b8443fd38d3a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 23, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236647877655`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.129204229039356`*^-179\\\", \ +RowBox[{\\\"161198658118785115956678299518758546564\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"68\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9916936247705600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 109, + 19, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.9943514465852537`*^9, + 3.994354514838295*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], +In[109]:=",ExpressionUUID->"38eb9de4-e7aa-4fc8-afb6-3f8e45473f64"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 90, 24, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236648078594`*^9}, +during this calculation.\"", 2, 109, 20, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.9943514465852537`*^9, + 3.994354514848401*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], +In[109]:=",ExpressionUUID->"63003666-5c27-4dc6-bee3-139c2994acab"], -Cell[BoxData["11.275343508420768`"], "Output", - CellChangeTimes->{3.9913236764669056`*^9}, - CellLabel->"Out[90]=",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[BoxData["11.866125272474383`"], "Output", + CellChangeTimes->{3.9913236764669056`*^9, 3.994351534298253*^9, + 3.9943545980760317`*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"cdad9cec-12a3-4f2f-a1e2-b631c1838d1a"] }, Open ]], Cell[CellGroupData[{ @@ -8366,67 +9144,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917996753598194`*^9, - 3.991799698091812*^9}},ExpressionUUID->"18d0289f-01fd-a740-8fac-\ -540622282b2c"], + CellChangeTimes->{{3.9917996753598194`*^9, 3.991799698091812*^9}}, + CellLabel-> + "In[110]:=",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 25, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765399036`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.209187975172153`*^-212\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 110, + 21, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994351534381812*^9, + 3.9943545981480513`*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], +In[110]:=",ExpressionUUID->"8ded439d-dbab-4804-80a7-265defb8db10"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 26, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765679016`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0885262600731083`*^-217\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 110, + 22, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994351534381812*^9, + 3.994354598159581*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], +In[110]:=",ExpressionUUID->"69467484-1f29-49c4-88ee-aabe315e1b78"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 27, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323676587904*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.799050628997984`*^-223\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 110, + 23, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994351534381812*^9, + 3.9943545981776037`*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], +In[110]:=",ExpressionUUID->"aeb9b88c-5177-4676-92e9-91b18826c954"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 91, 28, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236766039066`*^9}, +during this calculation.\"", 2, 110, 24, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994351534381812*^9, + 3.994354598190461*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], +In[110]:=",ExpressionUUID->"2dc6c051-bf7a-4c06-857f-24bd7480c117"], -Cell[BoxData["0.5376063675902706`"], "Output", - CellChangeTimes->{3.9913236883162384`*^9}, - CellLabel->"Out[91]=",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[BoxData["0.9346222167659892`"], "Output", + CellChangeTimes->{3.9913236883162384`*^9, 3.99435154658041*^9, + 3.994354609747019*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"db4863d2-655c-4ea4-8310-d38e66bb8fbb"] }, Open ]], Cell[CellGroupData[{ @@ -8447,8 +9238,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8493,67 +9283,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997261183853`*^9, - 3.991799730012718*^9}},ExpressionUUID->"33f25e29-8e2f-5249-9603-\ -4bb381db84df"], + CellChangeTimes->{{3.9917997261183853`*^9, 3.991799730012718*^9}}, + CellLabel-> + "In[111]:=",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 29, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132368839011*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.209187975172153`*^-212\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 111, + 25, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994351546642206*^9, + 3.994354609805768*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], +In[111]:=",ExpressionUUID->"b5a555f2-ced6-417a-b828-c899a6c43477"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 30, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884141064`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0885262600731083`*^-217\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 111, + 26, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994351546642206*^9, + 3.994354609815597*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], +In[111]:=",ExpressionUUID->"2905a86b-df97-4ae6-a27e-bbcf6180b60c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 31, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323688443001*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.799050628997984`*^-223\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 111, + 27, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994351546642206*^9, + 3.994354609826025*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], +In[111]:=",ExpressionUUID->"e7aa7f1d-a48a-44b0-b611-3f3ad6e5f4a4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 92, 32, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884570007`*^9}, +during this calculation.\"", 2, 111, 28, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994351546642206*^9, + 3.994354609837185*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], +In[111]:=",ExpressionUUID->"6c70c13f-79aa-4bb3-a0aa-4b58efc170dd"], -Cell[BoxData["10.498798062085507`"], "Output", - CellChangeTimes->{3.9913236988049507`*^9}, - CellLabel->"Out[92]=",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[BoxData["38.636875605194675`"], "Output", + CellChangeTimes->{3.9913236988049507`*^9, 3.994351557972908*^9, + 3.994354620789811*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"900a2ce4-ddbf-4fde-b388-9f42c8bca3f4"] }, Open ]], Cell[CellGroupData[{ @@ -8574,8 +9377,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8620,67 +9422,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997336698074`*^9, - 3.9917997367747993`*^9}},ExpressionUUID->"88e14da9-8532-e842-b722-\ -1b0781de8eeb"], + CellChangeTimes->{{3.9917997336698074`*^9, 3.9917997367747993`*^9}}, + CellLabel-> + "In[112]:=",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 33, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698915848*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.209187975172153`*^-212\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 112, + 29, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994351558067194*^9, + 3.994354620874185*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], +In[112]:=",ExpressionUUID->"19a8428f-a6d7-4cb4-a42e-55b068909ea5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 34, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698943981*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0885262600731083`*^-217\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 112, + 30, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994351558067194*^9, + 3.9943546208967667`*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], +In[112]:=",ExpressionUUID->"58cbbb08-6ee2-4b07-9779-cbf52217310c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 35, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698971981*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.799050628997984`*^-223\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 112, + 31, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994351558067194*^9, + 3.994354620908957*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], +In[112]:=",ExpressionUUID->"59c5731e-2672-4084-86f2-38a039e32858"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 93, 36, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698986994*^9}, +during this calculation.\"", 2, 112, 32, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994351558067194*^9, + 3.9943546209185266`*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], +In[112]:=",ExpressionUUID->"a635d286-5b0c-4cab-9933-d5a1641ffb2a"], -Cell[BoxData["18.521732102530788`"], "Output", - CellChangeTimes->{3.991323706795576*^9}, - CellLabel->"Out[93]=",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[BoxData["8.40251364155999`"], "Output", + CellChangeTimes->{3.991323706795576*^9, 3.9943515674301987`*^9, + 3.994354630043515*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"306bb27f-dae2-4cf0-ba55-b3f69a59237b"] }, Open ]], Cell[CellGroupData[{ @@ -8689,21 +9504,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991799742384985*^9, - 3.9917997459840527`*^9}},ExpressionUUID->"fcd1131c-ba92-0b46-817b-\ -e5f89f4ec38f"], + CellChangeTimes->{{3.991799742384985*^9, 3.9917997459840527`*^9}}, + CellLabel-> + "In[113]:=",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[BoxData["0.038552612544494616`"], "Output", - CellChangeTimes->{3.991323706858589*^9}, - CellLabel->"Out[94]=",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[BoxData["0.05187170071421305`"], "Output", + CellChangeTimes->{3.991323706858589*^9, 3.9943515674894*^9, + 3.99435463010306*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"2a31c640-0c24-4126-a97f-8ebc0f4279bc"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9917997487290344`*^9, 3.991799750684988*^9}, - 3.9919243164025135`*^9},ExpressionUUID->"c771f2bd-f081-e54a-b4e5-\ -bf0dbc996ac3"], + 3.9919243164025135`*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ @@ -8725,11 +9543,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel->"In[96]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], + CellLabel-> + "In[115]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.991323706886154*^9}, - CellLabel->"Out[96]=",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[BoxData["13.886176572292896`"], "Output", + CellChangeTimes->{3.991323706886154*^9, 3.9943515675198727`*^9, + 3.9943546301377363`*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"cfcfe64b-fc11-4515-a5f8-7fde0811d68a"] }, Open ]], Cell[CellGroupData[{ @@ -8738,11 +9559,14 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel->"In[98]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], + CellLabel-> + "In[116]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.9913237069236546`*^9}, - CellLabel->"Out[98]=",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[BoxData["1.678223320932622`"], "Output", + CellChangeTimes->{3.9913237069236546`*^9, 3.9943515675342093`*^9, + 3.994354630155307*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"937baf8c-310c-4636-8b2d-79ecb73e159f"] }, Open ]], Cell[CellGroupData[{ @@ -8752,12 +9576,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[101]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], + "In[117]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913237069753113`*^9}, +Cell[BoxData["23.30410536221016`"], "Output", + CellChangeTimes->{3.9913237069753113`*^9, 3.9943515675501423`*^9, + 3.9943546301714697`*^9}, CellLabel-> - "Out[101]=",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] + "Out[117]=",ExpressionUUID->"2f68ea81-7fca-4355-a008-15d1fb35f537"] }, Open ]], Cell[CellGroupData[{ @@ -8947,12 +9772,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[102]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], + "In[118]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[BoxData["0.02467166981689615`"], "Output", - CellChangeTimes->{3.991323707000412*^9}, +Cell[BoxData["0.0060151889208131335`"], "Output", + CellChangeTimes->{3.991323707000412*^9, 3.994351567573827*^9, + 3.994354630190699*^9}, CellLabel-> - "Out[102]=",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] + "Out[118]=",ExpressionUUID->"fa47c268-5837-4dec-9fb2-b6005c4a2b73"] }, Open ]], Cell[CellGroupData[{ @@ -8966,12 +9792,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[103]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], + "In[119]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[BoxData["5.642163519289108`"], "Output", - CellChangeTimes->{3.991323707203314*^9}, +Cell[BoxData["11.426686299832566`"], "Output", + CellChangeTimes->{3.991323707203314*^9, 3.994351567768249*^9, + 3.994354630406624*^9}, CellLabel-> - "Out[103]=",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] + "Out[119]=",ExpressionUUID->"22f519e7-660a-4fd6-957e-ec29d5eb40e0"] }, Open ]], Cell[CellGroupData[{ @@ -9163,12 +9990,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[104]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], + "In[120]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[BoxData["0.012834083028601704`"], "Output", - CellChangeTimes->{3.9913237072224197`*^9}, +Cell[BoxData["0.03943222564370409`"], "Output", + CellChangeTimes->{3.9913237072224197`*^9, 3.9943515677912683`*^9, + 3.994354630423571*^9}, CellLabel-> - "Out[104]=",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] + "Out[120]=",ExpressionUUID->"4303e60d-cb2d-424d-b2f2-1b065469bd2c"] }, Open ]], Cell[CellGroupData[{ @@ -9182,12 +10010,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[105]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], + "In[121]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[BoxData["7.82280524717004`"], "Output", - CellChangeTimes->{3.991323707432623*^9}, +Cell[BoxData["4.462921988960797`"], "Output", + CellChangeTimes->{3.991323707432623*^9, 3.9943515680003977`*^9, + 3.9943546306405163`*^9}, CellLabel-> - "Out[105]=",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] + "Out[121]=",ExpressionUUID->"ccec9295-d1b0-4ba3-8f78-46b0ff264f8a"] }, Open ]], Cell[CellGroupData[{ @@ -9280,12 +10109,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[106]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], + "In[122]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913237074497375`*^9}, +Cell[BoxData["0.10708479897462729`"], "Output", + CellChangeTimes->{3.9913237074497375`*^9, 3.994351568019305*^9, + 3.994354630660398*^9}, CellLabel-> - "Out[106]=",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] + "Out[122]=",ExpressionUUID->"f59e122f-e0f2-487b-83d5-42955921834a"] }, Open ]], Cell[CellGroupData[{ @@ -9375,12 +10205,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[107]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], + "In[123]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991323707467621*^9}, +Cell[BoxData["0.8929152010253727`"], "Output", + CellChangeTimes->{3.991323707467621*^9, 3.994351568036399*^9, + 3.9943546306805277`*^9}, CellLabel-> - "Out[107]=",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] + "Out[123]=",ExpressionUUID->"a051586a-3a26-4a89-b4c8-5b9bc44e6d42"] }, Open ]], Cell[CellGroupData[{ @@ -9503,12 +10334,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[108]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], + "In[124]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991323707488617*^9}, +Cell[BoxData["0.09561764480319095`"], "Output", + CellChangeTimes->{3.991323707488617*^9, 3.994351568058745*^9, + 3.9943546306988077`*^9}, CellLabel-> - "Out[108]=",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] + "Out[124]=",ExpressionUUID->"9a21231e-4c68-4494-a4b7-beb207e9f17c"] }, Open ]], Cell[CellGroupData[{ @@ -9570,68 +10402,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799766323864*^9},ExpressionUUID->"ee2d2671-1677-5943-bf7a-\ -6ffa36275fe8"], + CellChangeTimes->{3.991799766323864*^9}, + CellLabel-> + "In[125]:=",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 109, 37, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075117207`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4449685916555238`*^-221\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 125, + 33, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943515680826893`*^9, + 3.994354630718041*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], +In[125]:=",ExpressionUUID->"652a3af7-db2f-4e68-9d8e-488ad411ae0e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 38, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323707545618*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.142611345509634`*^-227\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 125, + 34, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943515680826893`*^9, + 3.994354630728717*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], +In[125]:=",ExpressionUUID->"e85d606f-1666-4e8b-9880-ca3e18127e9d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 39, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075757256`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.834754835474156`*^-233\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 125, + 35, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943515680826893`*^9, + 3.994354630739087*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], +In[125]:=",ExpressionUUID->"aa0f9197-dd9f-4ae6-b489-d0db0f8e98d1"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 109, 40, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075926247`*^9}, +during this calculation.\"", 2, 125, 36, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943515680826893`*^9, + 3.994354630751409*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], +In[125]:=",ExpressionUUID->"bc8319f6-5697-4b15-8b83-409f9b384f37"], -Cell[BoxData["5.642163519289105`"], "Output", - CellChangeTimes->{3.9913237161181736`*^9}, +Cell[BoxData["11.426686299832559`"], "Output", + CellChangeTimes->{3.9913237161181736`*^9, 3.9943515759547997`*^9, + 3.9943546383823433`*^9}, CellLabel-> - "Out[109]=",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] + "Out[125]=",ExpressionUUID->"eec2b8b2-eb83-4a28-990d-594b317be421"] }, Open ]], Cell[CellGroupData[{ @@ -9693,68 +10537,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917997699328365`*^9},ExpressionUUID->"b0b1035a-0fdf-b146-a71f-\ -1ab9142a9a90"], + CellChangeTimes->{3.9917997699328365`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 110, 41, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237161871567`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4449685916555238`*^-221\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 126, + 37, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994351576010055*^9, + 3.9943546384444227`*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], +In[126]:=",ExpressionUUID->"592c2048-7ac5-424e-946e-b89fcf1053bc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 42, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162070637`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.142611345509634`*^-227\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 126, + 38, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994351576010055*^9, + 3.9943546384559717`*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], +In[126]:=",ExpressionUUID->"24ea7df6-4332-499b-988f-b154b5677b82"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 43, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323716227171*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.834754835474156`*^-233\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 126, + 39, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994351576010055*^9, + 3.9943546384689827`*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], +In[126]:=",ExpressionUUID->"a031e4c0-5b5c-4a78-aeaf-270a22190386"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 110, 44, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162481613`*^9}, +during this calculation.\"", 2, 126, 40, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994351576010055*^9, + 3.994354638479398*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], +In[126]:=",ExpressionUUID->"e8010145-7fcd-4661-95c7-b23db9476f63"], -Cell[BoxData["7.822805247170038`"], "Output", - CellChangeTimes->{3.991323724852854*^9}, +Cell[BoxData["4.462921988960798`"], "Output", + CellChangeTimes->{3.991323724852854*^9, 3.994351583772848*^9, + 3.994354646079793*^9}, CellLabel-> - "Out[110]=",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] + "Out[126]=",ExpressionUUID->"4162ad2f-6182-46b4-8541-7514eefded0f"] }, Open ]], Cell[CellGroupData[{ @@ -9812,95 +10668,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917997843341885`*^9},ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-\ -ff25938e6592"], + CellChangeTimes->{3.9917997843341885`*^9}, + CellLabel-> + "In[127]:=",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xc4V+0fB3BEw8ooM5IZUjIznu6P/ZhllT2+zveIJCspQoWGkkSojIyS +ECJC8iANfvFEkQfZla95MhLld/vjXOd6Xfc57/v+3OOcXbSTNnQWJiamKXyt +3wPf75Wr6nh/cNfnXsbtKAY6OJ2nTjMsQmlbtm1JxR7M0kiWNqxDq/deeKz7 +MPG/jZyqr5DuzW5q3WVhUU1shm0obcTzZRr2lRahhqjCf1HeDZeWdOznHYGZ +qyofkVDi6013sSd630Wcqe1BxwZyLt7DFhmTcl406ENlQdNamdjmMxFawW1f +EL9hoUI2dv3qBEdY4RBS/PuTfQ72p/OC4c/8R1BrcFBtHvb0RsOJeZUxZFoT +6fwQe+O1AEfVpXHUwrWiXogtzpvxJrD2GyLcv5oVY1uJLj6YNphECzVbpSuw +yWxJAaXN02g42/xbFXaUzKHY420zaEV3abwWu0ewa39I4Ry6oJ9xqxmbcPL1 +uXWNQrTIVL232LP3mO6X+/9AWtuZFd5jb5ZU4plTWUCNjF2FPdjJRJMJz/ZF +pDvfozeALfHQMWrf0iIK/v6HfxT7wJ646RO1P1GYeKr3LPYxjS9tEwaraIp7 +oZUjmoHmw06xssv+RllDOzX5saNrOXTlN/9BDVer+0Sw0+DAY++2NXS8XqVb +AZvIf2MYVMgMlb+MrlhiF7bcGjwvygIpPb2vj2DPfnWLuHmNBd7L94EHdoTC +wtNS/w3wn6vUcDB28pNdUjMqbKBtVT+Ugd3bMVn/J5cNxHjLfhRgS1BVTtzb +N4J2KjdUYBepWSUpLW0E1z+bL7diNz8/y+xXuxlC/ea7VrEXmjq/fDPghMFT +x2m+5xmIz4KTJ7yeExZZk5zOYit3GQKXFhfwMpxTr2L7jlZm79/LDXd29ww8 +xg5gaVP+i5MH9rF4589hj0mWzMUu8kJB+Dmeqxfw/JDvtrSr8oFU9QObTGyW +x+O7hAL5YJ+O3+dybAnVnTaFDD7wFXhX0YftZJBY/n6QH+LaGnNULzJQu1dQ +sGDrdhjZquw8jT3wMCHeY7MAtHoNjG+MYaBJRmHuIyMB+AoSVTux2UNGOnUa +BGBZ0UXGBtswxk7No1IQOKJzD9Rg1+RpLBRkCUMBbVArNZaB8sZ+hWqHiMFx +M92cmEsM9Lf9pYHgYjH4JKcan4s92cxvXDwuBi9NB580Yqvl7dku4SgO1U+d +ipgv4/mkuT1lO7gTtui/CLyATc0Mnv52UQIqBDKVblxhIP4ThhVPLSUh/HQp +8TGegcbz2I8d9pWEZRHuphXs6r4O0ak4SdA0ZXeVvMZALhauF2UbJOHtYq9B +AHaeYqhNuooU6O1q6eO+jvufeDgbKSgN+RUbdI4mMJCdN4eS2ZAM3N34KWfb +TQZCofYqR3/LQIdQyTU9bIXYLE1CWBbOz1Q98cdmylXVj7SWhX8UXe+/xS4e +cD5a/o8s7HbvVLmQhM/nkaLzIjlyEJR+m+vPLTw+Q8tPEzR5GK49dVcilYFy +bVP/W4qUBynpzEd22Am0oUHWu/KQ96N79jI2EX2KId4pD+zHwhUobN66DCZb +AwW4X0cze52G94/qtEKtlCJ0JFfpRNxhIFHJG1Hxo3tAIMWpjyeTgequzssv +syjB7ld7eK2xXX44dpG7lEA6a/nyTezMZml5fTclMP0aocefxUCS3jUffnYr +AT1y9aNwNq63aEyGbN0LTnEn41VzGEhMVJyUcFQGTS6DHekPGGhPfgjnClIB +4mh0wJ5SBqIRFxeUrFQg0p9v+jR2mlTSgIeLChTvSclvwt6Q86S0JUwFCkbp +jc5l+LxlTtgllakA1cf6NKEcf0/TPDLkpVTBcLLaf60Cr2+8xV6HjWrQ9fux +AWcNA90Pkj5c2aYO+6/7rn5oZqCOUKQZk68Fz8xi5fS/MNAut49Wrn5/wbfQ +Ug+j3wxEX3tWInYGIGI4mvPzjkkkyKjeJEjThzuJb8Zm9CdRiKpuX5KCIRjx +NKpx+k4i2tTqG/4JI2ByFp16cGsSFesHb8pqNwEWu85Bl+ZJlDfv+09RsimM +rhC6/AuT6Kee0P+ao8whU2ekx1ppCvUzbZgb8rSEklCX/hHvKeS/42TiealD +kPHsq7Xn/SlU4vOmISX2MEQsn1msGJ5CZ38ILyn6WEOp+pXIw5LTaMHM+Mhr +dxvI+V6e8t1nGmk539Qbs7YFj8ZJ+/LyafRBOMO3WdUOlg19yHs/p5HIg4t1 +Bbvtwcn9lIiL8QyqHlSwsOI6AlzV+/ZeTpxB4l2z3qFTR0BGPII7vHcGqabc +LModPArV5oKto9tnUQbrj71JTQ6wjfmH4H7dWfRMb19v7HNH0G73yZ2gz6I0 +zau8q4VOUPMhy+17wixq/y8/TvWaM6jnNNxjqpxFlZb3pAOiXaD22sehH/2z +aO6ELZM/4QoabA3VDzfMoQVj+WPTBm4Q1fHy7JzcHCqY+vwzWMMdBr8NnHGx +mkMO9/O9XDk9YL/3wWs7AufQ03Jz9w2XPKCg3THXLWUOaYl+WL6y7AHpIZoP +yivnkNSgd++/Pp6gazvP3NI5h0Y5jh+6N+IJY0vJo57UHOpIsPIysafBIItU +xCAnhZLDsjhOddBAaP5/hpJyFKqrX1v2MvUCu82y/QcPUmirC1xSrfGC65Kh +X42sKSSx7XX7jjovXN/tniRs5TZLoY31XsC+41D6F2wbXedHPf94Qbsr7UqY +Dc7fEdp67q0X1I9wSBXYUkik//HWNz1e8C+rudofewpJuwmmuSx5QVd0WkKs +E4W0PKYLYtUIsIt5qL5Go9CD9NlgKw0CDL/IR+p4UWhbJ3VQ8AABl94n3zmN +PW201FWgQ4CyO/uhGew8RSbmNn0CFpfq8/sICnEv8TryWRPQBOWsT0gKjV5X +35J1ggDFdx0uKr4Usn6t2eV9koCuCjEBH+x6Ju0s5UACvkbG52RhpwcfVG8M +IaBqqkyN8ziFrBxNPMfCCbg9FPPXCPZzacfnilcJoN7K9V0+QaGE2gif6gcE ++O46J1MeQKETKqlaYQUEaMyp6w1jWzwq23KgkID0DxL7+QIpxJ46/qiqmICr +mWHXA7Fjgw5PPKsggE8yT3NvEIUi5KWPVzYSoJ6bapkVTCHf1Fa/8gECmkP1 +3DxCKWTKPa4bNEhA/6XWxavYu2OZuFSGCTjx7zStEns8SL24bIyAbomZyi2n +KeRplTVVOkkAh5qTcSm2A1uw/5NfBMgBG9dCGIVMgkUCigToIOT1k981nEKN +WXFmSUJ0+NIrox2LrdtGSYeJ0EH/dIBiMbayTOtnA3E6BCiZnlzFFu4ON/hP +hg6eZGR4WgSFGNr9AuzqdDDfUHe/5RyFbrBkv/C2pYM4WmZdicL17+NMs7Sn +Q97ZjNgd0RSKcQ4LUj1Kh/svWjv+wg6rOCy35kQH9+LKlihsT5L55m0aHdin +zJWZz1NI9R2NeBVIBw2/34vL2N03ZTikEulg/7tIs+kihUoQ17FvN+ngcWSz +Vh92zNR8c/EtOviz+HMsYKuYNkceSKWD8xlLKdkYvH5MXpRlJh2qN/HtjMM2 +Ppn9OayIDuUJxw3/iqWQmNhljYMldKji229viz3/7uStDaV0SOvo1vDBzpFF +lglP6XCHfOmXjP27v78ht4YOg/yVOd+wKyxEC96/oUMct6765TgKxf9iYUt+ +RwfbBCbbu9i0gglPxzY65Ftd0CvB5mGtER1tx3nGlYmd2H61DjeWP9HBTCl7 +SfQShaQUbodKj9Hhyq3OsVzsX93nOr+P06FVOJK7Arsjlq785BsdJrlfb2rG +jhxSm9CapEOMsZLfCHZvWqfroR90UOcTXd15mUJJm3iNzjKTIOnCrZmIXUf1 +O4dsIGH2T/p0JvbX/sIgfzYSNC788i3G1q0wzKZtIaFKX6X8Lfa4R9iKGS8J +DFGTs2vYPBZGfEb8JNB+GThwXqGQjiafPNpO4v/zxhUh7ESuoiOqwiRMb+pO +2L/eXvOlTHQXCfooZMYdm8wverNdCvd/OfCH7/rziWe+bJUhYeqlXN0p7HGS +n4tVnoSkbc/vXl1v5zc5NqlMQviiya0y7Jo//FHjKiSUbB2rq8Ee+z6YMqhG +QrOs8uMmbO2Gs01dB3C9ga0fu7BH/UrEXwAJBfsWafPY3A7h6lX6JKxVDZet +YGsZ/G1RZkjCwyMhr1iu4v0iPHwm/28Son9f0ObBrmZ9kphlRoKb0p+7Atgj +M+EP0y1IGGoUadyBfaBl+8frh0nIfq3mshubVjbMuGRDwr0s5Q4l7Ov3nrBc +sCOhseTdZlXs4SBT5VAHEi5lfHqti83lJmAS4ETCJjkTK731PNMRV18XEvx0 +bNON1t/feS7ezYOEfeU65yzXx8NuluNAIyFxTUDAej1vQeC5DUFCf3F8sN16 +3tBIuwVJwoxxesrR9by20nHjYyS8dUERTuvjqzr3G3xJSLlyTs51PT/HbJuO +HwmZJ21T3dfzrwsqqvuT4Pi8odVzPT9sVG9fAK5f+FWzFzYnUeYgH0SCj5nH +BTq25qHIk1IhJHhsTWL1Xs/XNo8TCyXBWNXJ/Bj2NRmhDMEwEmyuVB/xwX7G +M/aU9ywJ3ZNFsr7YQytl7zgiSLDS06xdN+fXyCG2SBIcgo5uO46t8cH851oU +CS+CuVTW/X8YNSiV "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -9914,107 +10770,107 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1Xc4V+0fB3BEw8ooM5IZUjIznu6P/ZhllT2+zveIJCspQoWGkkSojIyS +ECJC8iANfvFEkQfZla95MhLld/vjXOd6Xfc57/v+3OOcXbSTNnQWJiamKXyt +3wPf75Wr6nh/cNfnXsbtKAY6OJ2nTjMsQmlbtm1JxR7M0kiWNqxDq/deeKz7 +MPG/jZyqr5DuzW5q3WVhUU1shm0obcTzZRr2lRahhqjCf1HeDZeWdOznHYGZ +qyofkVDi6013sSd630Wcqe1BxwZyLt7DFhmTcl406ENlQdNamdjmMxFawW1f +EL9hoUI2dv3qBEdY4RBS/PuTfQ72p/OC4c/8R1BrcFBtHvb0RsOJeZUxZFoT +6fwQe+O1AEfVpXHUwrWiXogtzpvxJrD2GyLcv5oVY1uJLj6YNphECzVbpSuw +yWxJAaXN02g42/xbFXaUzKHY420zaEV3abwWu0ewa39I4Ry6oJ9xqxmbcPL1 +uXWNQrTIVL232LP3mO6X+/9AWtuZFd5jb5ZU4plTWUCNjF2FPdjJRJMJz/ZF +pDvfozeALfHQMWrf0iIK/v6HfxT7wJ646RO1P1GYeKr3LPYxjS9tEwaraIp7 +oZUjmoHmw06xssv+RllDOzX5saNrOXTlN/9BDVer+0Sw0+DAY++2NXS8XqVb +AZvIf2MYVMgMlb+MrlhiF7bcGjwvygIpPb2vj2DPfnWLuHmNBd7L94EHdoTC +wtNS/w3wn6vUcDB28pNdUjMqbKBtVT+Ugd3bMVn/J5cNxHjLfhRgS1BVTtzb +N4J2KjdUYBepWSUpLW0E1z+bL7diNz8/y+xXuxlC/ea7VrEXmjq/fDPghMFT +x2m+5xmIz4KTJ7yeExZZk5zOYit3GQKXFhfwMpxTr2L7jlZm79/LDXd29ww8 +xg5gaVP+i5MH9rF4589hj0mWzMUu8kJB+Dmeqxfw/JDvtrSr8oFU9QObTGyW +x+O7hAL5YJ+O3+dybAnVnTaFDD7wFXhX0YftZJBY/n6QH+LaGnNULzJQu1dQ +sGDrdhjZquw8jT3wMCHeY7MAtHoNjG+MYaBJRmHuIyMB+AoSVTux2UNGOnUa +BGBZ0UXGBtswxk7No1IQOKJzD9Rg1+RpLBRkCUMBbVArNZaB8sZ+hWqHiMFx +M92cmEsM9Lf9pYHgYjH4JKcan4s92cxvXDwuBi9NB580Yqvl7dku4SgO1U+d +ipgv4/mkuT1lO7gTtui/CLyATc0Mnv52UQIqBDKVblxhIP4ThhVPLSUh/HQp +8TGegcbz2I8d9pWEZRHuphXs6r4O0ak4SdA0ZXeVvMZALhauF2UbJOHtYq9B +AHaeYqhNuooU6O1q6eO+jvufeDgbKSgN+RUbdI4mMJCdN4eS2ZAM3N34KWfb +TQZCofYqR3/LQIdQyTU9bIXYLE1CWBbOz1Q98cdmylXVj7SWhX8UXe+/xS4e +cD5a/o8s7HbvVLmQhM/nkaLzIjlyEJR+m+vPLTw+Q8tPEzR5GK49dVcilYFy +bVP/W4qUBynpzEd22Am0oUHWu/KQ96N79jI2EX2KId4pD+zHwhUobN66DCZb +AwW4X0cze52G94/qtEKtlCJ0JFfpRNxhIFHJG1Hxo3tAIMWpjyeTgequzssv +syjB7ld7eK2xXX44dpG7lEA6a/nyTezMZml5fTclMP0aocefxUCS3jUffnYr +AT1y9aNwNq63aEyGbN0LTnEn41VzGEhMVJyUcFQGTS6DHekPGGhPfgjnClIB +4mh0wJ5SBqIRFxeUrFQg0p9v+jR2mlTSgIeLChTvSclvwt6Q86S0JUwFCkbp +jc5l+LxlTtgllakA1cf6NKEcf0/TPDLkpVTBcLLaf60Cr2+8xV6HjWrQ9fux +AWcNA90Pkj5c2aYO+6/7rn5oZqCOUKQZk68Fz8xi5fS/MNAut49Wrn5/wbfQ +Ug+j3wxEX3tWInYGIGI4mvPzjkkkyKjeJEjThzuJb8Zm9CdRiKpuX5KCIRjx +NKpx+k4i2tTqG/4JI2ByFp16cGsSFesHb8pqNwEWu85Bl+ZJlDfv+09RsimM +rhC6/AuT6Kee0P+ao8whU2ekx1ppCvUzbZgb8rSEklCX/hHvKeS/42TiealD +kPHsq7Xn/SlU4vOmISX2MEQsn1msGJ5CZ38ILyn6WEOp+pXIw5LTaMHM+Mhr +dxvI+V6e8t1nGmk539Qbs7YFj8ZJ+/LyafRBOMO3WdUOlg19yHs/p5HIg4t1 +Bbvtwcn9lIiL8QyqHlSwsOI6AlzV+/ZeTpxB4l2z3qFTR0BGPII7vHcGqabc +LModPArV5oKto9tnUQbrj71JTQ6wjfmH4H7dWfRMb19v7HNH0G73yZ2gz6I0 +zau8q4VOUPMhy+17wixq/y8/TvWaM6jnNNxjqpxFlZb3pAOiXaD22sehH/2z +aO6ELZM/4QoabA3VDzfMoQVj+WPTBm4Q1fHy7JzcHCqY+vwzWMMdBr8NnHGx +mkMO9/O9XDk9YL/3wWs7AufQ03Jz9w2XPKCg3THXLWUOaYl+WL6y7AHpIZoP +yivnkNSgd++/Pp6gazvP3NI5h0Y5jh+6N+IJY0vJo57UHOpIsPIysafBIItU +xCAnhZLDsjhOddBAaP5/hpJyFKqrX1v2MvUCu82y/QcPUmirC1xSrfGC65Kh +X42sKSSx7XX7jjovXN/tniRs5TZLoY31XsC+41D6F2wbXedHPf94Qbsr7UqY +Dc7fEdp67q0X1I9wSBXYUkik//HWNz1e8C+rudofewpJuwmmuSx5QVd0WkKs +E4W0PKYLYtUIsIt5qL5Go9CD9NlgKw0CDL/IR+p4UWhbJ3VQ8AABl94n3zmN +PW201FWgQ4CyO/uhGew8RSbmNn0CFpfq8/sICnEv8TryWRPQBOWsT0gKjV5X +35J1ggDFdx0uKr4Usn6t2eV9koCuCjEBH+x6Ju0s5UACvkbG52RhpwcfVG8M +IaBqqkyN8ziFrBxNPMfCCbg9FPPXCPZzacfnilcJoN7K9V0+QaGE2gif6gcE ++O46J1MeQKETKqlaYQUEaMyp6w1jWzwq23KgkID0DxL7+QIpxJ46/qiqmICr +mWHXA7Fjgw5PPKsggE8yT3NvEIUi5KWPVzYSoJ6bapkVTCHf1Fa/8gECmkP1 +3DxCKWTKPa4bNEhA/6XWxavYu2OZuFSGCTjx7zStEns8SL24bIyAbomZyi2n +KeRplTVVOkkAh5qTcSm2A1uw/5NfBMgBG9dCGIVMgkUCigToIOT1k981nEKN +WXFmSUJ0+NIrox2LrdtGSYeJ0EH/dIBiMbayTOtnA3E6BCiZnlzFFu4ON/hP +hg6eZGR4WgSFGNr9AuzqdDDfUHe/5RyFbrBkv/C2pYM4WmZdicL17+NMs7Sn +Q97ZjNgd0RSKcQ4LUj1Kh/svWjv+wg6rOCy35kQH9+LKlihsT5L55m0aHdin +zJWZz1NI9R2NeBVIBw2/34vL2N03ZTikEulg/7tIs+kihUoQ17FvN+ngcWSz +Vh92zNR8c/EtOviz+HMsYKuYNkceSKWD8xlLKdkYvH5MXpRlJh2qN/HtjMM2 +Ppn9OayIDuUJxw3/iqWQmNhljYMldKji229viz3/7uStDaV0SOvo1vDBzpFF +lglP6XCHfOmXjP27v78ht4YOg/yVOd+wKyxEC96/oUMct6765TgKxf9iYUt+ +RwfbBCbbu9i0gglPxzY65Ftd0CvB5mGtER1tx3nGlYmd2H61DjeWP9HBTCl7 +SfQShaQUbodKj9Hhyq3OsVzsX93nOr+P06FVOJK7Arsjlq785BsdJrlfb2rG +jhxSm9CapEOMsZLfCHZvWqfroR90UOcTXd15mUJJm3iNzjKTIOnCrZmIXUf1 +O4dsIGH2T/p0JvbX/sIgfzYSNC788i3G1q0wzKZtIaFKX6X8Lfa4R9iKGS8J +DFGTs2vYPBZGfEb8JNB+GThwXqGQjiafPNpO4v/zxhUh7ESuoiOqwiRMb+pO +2L/eXvOlTHQXCfooZMYdm8wverNdCvd/OfCH7/rziWe+bJUhYeqlXN0p7HGS +n4tVnoSkbc/vXl1v5zc5NqlMQviiya0y7Jo//FHjKiSUbB2rq8Ee+z6YMqhG +QrOs8uMmbO2Gs01dB3C9ga0fu7BH/UrEXwAJBfsWafPY3A7h6lX6JKxVDZet +YGsZ/G1RZkjCwyMhr1iu4v0iPHwm/28Son9f0ObBrmZ9kphlRoKb0p+7Atgj +M+EP0y1IGGoUadyBfaBl+8frh0nIfq3mshubVjbMuGRDwr0s5Q4l7Ov3nrBc +sCOhseTdZlXs4SBT5VAHEi5lfHqti83lJmAS4ETCJjkTK731PNMRV18XEvx0 +bNON1t/feS7ezYOEfeU65yzXx8NuluNAIyFxTUDAej1vQeC5DUFCf3F8sN16 +3tBIuwVJwoxxesrR9by20nHjYyS8dUERTuvjqzr3G3xJSLlyTs51PT/HbJuO +HwmZJ21T3dfzrwsqqvuT4Pi8odVzPT9sVG9fAK5f+FWzFzYnUeYgH0SCj5nH +BTq25qHIk1IhJHhsTWL1Xs/XNo8TCyXBWNXJ/Bj2NRmhDMEwEmyuVB/xwX7G +M/aU9ywJ3ZNFsr7YQytl7zgiSLDS06xdN+fXyCG2SBIcgo5uO46t8cH851oU +CS+CuVTW/X8YNSiV "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.8593248945751705, + 1.1587936358621242`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.8593248945751724}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10026,21 +10882,21 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.8593248945751705, + 1.1587936358621242`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.8593248945751724}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10054,105 +10910,105 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1Xc4V+0fB3BEw8ooM5IZUjIznu6P/ZhllT2+zveIJCspQoWGkkSojIyS +ECJC8iANfvFEkQfZla95MhLld/vjXOd6Xfc57/v+3OOcXbSTNnQWJiamKXyt +3wPf75Wr6nh/cNfnXsbtKAY6OJ2nTjMsQmlbtm1JxR7M0kiWNqxDq/deeKz7 +MPG/jZyqr5DuzW5q3WVhUU1shm0obcTzZRr2lRahhqjCf1HeDZeWdOznHYGZ +qyofkVDi6013sSd630Wcqe1BxwZyLt7DFhmTcl406ENlQdNamdjmMxFawW1f +EL9hoUI2dv3qBEdY4RBS/PuTfQ72p/OC4c/8R1BrcFBtHvb0RsOJeZUxZFoT +6fwQe+O1AEfVpXHUwrWiXogtzpvxJrD2GyLcv5oVY1uJLj6YNphECzVbpSuw +yWxJAaXN02g42/xbFXaUzKHY420zaEV3abwWu0ewa39I4Ry6oJ9xqxmbcPL1 +uXWNQrTIVL232LP3mO6X+/9AWtuZFd5jb5ZU4plTWUCNjF2FPdjJRJMJz/ZF +pDvfozeALfHQMWrf0iIK/v6HfxT7wJ646RO1P1GYeKr3LPYxjS9tEwaraIp7 +oZUjmoHmw06xssv+RllDOzX5saNrOXTlN/9BDVer+0Sw0+DAY++2NXS8XqVb +AZvIf2MYVMgMlb+MrlhiF7bcGjwvygIpPb2vj2DPfnWLuHmNBd7L94EHdoTC +wtNS/w3wn6vUcDB28pNdUjMqbKBtVT+Ugd3bMVn/J5cNxHjLfhRgS1BVTtzb +N4J2KjdUYBepWSUpLW0E1z+bL7diNz8/y+xXuxlC/ea7VrEXmjq/fDPghMFT +x2m+5xmIz4KTJ7yeExZZk5zOYit3GQKXFhfwMpxTr2L7jlZm79/LDXd29ww8 +xg5gaVP+i5MH9rF4589hj0mWzMUu8kJB+Dmeqxfw/JDvtrSr8oFU9QObTGyW +x+O7hAL5YJ+O3+dybAnVnTaFDD7wFXhX0YftZJBY/n6QH+LaGnNULzJQu1dQ +sGDrdhjZquw8jT3wMCHeY7MAtHoNjG+MYaBJRmHuIyMB+AoSVTux2UNGOnUa +BGBZ0UXGBtswxk7No1IQOKJzD9Rg1+RpLBRkCUMBbVArNZaB8sZ+hWqHiMFx +M92cmEsM9Lf9pYHgYjH4JKcan4s92cxvXDwuBi9NB580Yqvl7dku4SgO1U+d +ipgv4/mkuT1lO7gTtui/CLyATc0Mnv52UQIqBDKVblxhIP4ThhVPLSUh/HQp +8TGegcbz2I8d9pWEZRHuphXs6r4O0ak4SdA0ZXeVvMZALhauF2UbJOHtYq9B +AHaeYqhNuooU6O1q6eO+jvufeDgbKSgN+RUbdI4mMJCdN4eS2ZAM3N34KWfb +TQZCofYqR3/LQIdQyTU9bIXYLE1CWBbOz1Q98cdmylXVj7SWhX8UXe+/xS4e +cD5a/o8s7HbvVLmQhM/nkaLzIjlyEJR+m+vPLTw+Q8tPEzR5GK49dVcilYFy +bVP/W4qUBynpzEd22Am0oUHWu/KQ96N79jI2EX2KId4pD+zHwhUobN66DCZb +AwW4X0cze52G94/qtEKtlCJ0JFfpRNxhIFHJG1Hxo3tAIMWpjyeTgequzssv +syjB7ld7eK2xXX44dpG7lEA6a/nyTezMZml5fTclMP0aocefxUCS3jUffnYr +AT1y9aNwNq63aEyGbN0LTnEn41VzGEhMVJyUcFQGTS6DHekPGGhPfgjnClIB +4mh0wJ5SBqIRFxeUrFQg0p9v+jR2mlTSgIeLChTvSclvwt6Q86S0JUwFCkbp +jc5l+LxlTtgllakA1cf6NKEcf0/TPDLkpVTBcLLaf60Cr2+8xV6HjWrQ9fux +AWcNA90Pkj5c2aYO+6/7rn5oZqCOUKQZk68Fz8xi5fS/MNAut49Wrn5/wbfQ +Ug+j3wxEX3tWInYGIGI4mvPzjkkkyKjeJEjThzuJb8Zm9CdRiKpuX5KCIRjx +NKpx+k4i2tTqG/4JI2ByFp16cGsSFesHb8pqNwEWu85Bl+ZJlDfv+09RsimM +rhC6/AuT6Kee0P+ao8whU2ekx1ppCvUzbZgb8rSEklCX/hHvKeS/42TiealD +kPHsq7Xn/SlU4vOmISX2MEQsn1msGJ5CZ38ILyn6WEOp+pXIw5LTaMHM+Mhr +dxvI+V6e8t1nGmk539Qbs7YFj8ZJ+/LyafRBOMO3WdUOlg19yHs/p5HIg4t1 +Bbvtwcn9lIiL8QyqHlSwsOI6AlzV+/ZeTpxB4l2z3qFTR0BGPII7vHcGqabc +LModPArV5oKto9tnUQbrj71JTQ6wjfmH4H7dWfRMb19v7HNH0G73yZ2gz6I0 +zau8q4VOUPMhy+17wixq/y8/TvWaM6jnNNxjqpxFlZb3pAOiXaD22sehH/2z +aO6ELZM/4QoabA3VDzfMoQVj+WPTBm4Q1fHy7JzcHCqY+vwzWMMdBr8NnHGx +mkMO9/O9XDk9YL/3wWs7AufQ03Jz9w2XPKCg3THXLWUOaYl+WL6y7AHpIZoP +yivnkNSgd++/Pp6gazvP3NI5h0Y5jh+6N+IJY0vJo57UHOpIsPIysafBIItU +xCAnhZLDsjhOddBAaP5/hpJyFKqrX1v2MvUCu82y/QcPUmirC1xSrfGC65Kh +X42sKSSx7XX7jjovXN/tniRs5TZLoY31XsC+41D6F2wbXedHPf94Qbsr7UqY +Dc7fEdp67q0X1I9wSBXYUkik//HWNz1e8C+rudofewpJuwmmuSx5QVd0WkKs +E4W0PKYLYtUIsIt5qL5Go9CD9NlgKw0CDL/IR+p4UWhbJ3VQ8AABl94n3zmN +PW201FWgQ4CyO/uhGew8RSbmNn0CFpfq8/sICnEv8TryWRPQBOWsT0gKjV5X +35J1ggDFdx0uKr4Usn6t2eV9koCuCjEBH+x6Ju0s5UACvkbG52RhpwcfVG8M +IaBqqkyN8ziFrBxNPMfCCbg9FPPXCPZzacfnilcJoN7K9V0+QaGE2gif6gcE ++O46J1MeQKETKqlaYQUEaMyp6w1jWzwq23KgkID0DxL7+QIpxJ46/qiqmICr +mWHXA7Fjgw5PPKsggE8yT3NvEIUi5KWPVzYSoJ6bapkVTCHf1Fa/8gECmkP1 +3DxCKWTKPa4bNEhA/6XWxavYu2OZuFSGCTjx7zStEns8SL24bIyAbomZyi2n +KeRplTVVOkkAh5qTcSm2A1uw/5NfBMgBG9dCGIVMgkUCigToIOT1k981nEKN +WXFmSUJ0+NIrox2LrdtGSYeJ0EH/dIBiMbayTOtnA3E6BCiZnlzFFu4ON/hP +hg6eZGR4WgSFGNr9AuzqdDDfUHe/5RyFbrBkv/C2pYM4WmZdicL17+NMs7Sn +Q97ZjNgd0RSKcQ4LUj1Kh/svWjv+wg6rOCy35kQH9+LKlihsT5L55m0aHdin +zJWZz1NI9R2NeBVIBw2/34vL2N03ZTikEulg/7tIs+kihUoQ17FvN+ngcWSz +Vh92zNR8c/EtOviz+HMsYKuYNkceSKWD8xlLKdkYvH5MXpRlJh2qN/HtjMM2 +Ppn9OayIDuUJxw3/iqWQmNhljYMldKji229viz3/7uStDaV0SOvo1vDBzpFF +lglP6XCHfOmXjP27v78ht4YOg/yVOd+wKyxEC96/oUMct6765TgKxf9iYUt+ +RwfbBCbbu9i0gglPxzY65Ftd0CvB5mGtER1tx3nGlYmd2H61DjeWP9HBTCl7 +SfQShaQUbodKj9Hhyq3OsVzsX93nOr+P06FVOJK7Arsjlq785BsdJrlfb2rG +jhxSm9CapEOMsZLfCHZvWqfroR90UOcTXd15mUJJm3iNzjKTIOnCrZmIXUf1 +O4dsIGH2T/p0JvbX/sIgfzYSNC788i3G1q0wzKZtIaFKX6X8Lfa4R9iKGS8J +DFGTs2vYPBZGfEb8JNB+GThwXqGQjiafPNpO4v/zxhUh7ESuoiOqwiRMb+pO +2L/eXvOlTHQXCfooZMYdm8wverNdCvd/OfCH7/rziWe+bJUhYeqlXN0p7HGS +n4tVnoSkbc/vXl1v5zc5NqlMQviiya0y7Jo//FHjKiSUbB2rq8Ee+z6YMqhG +QrOs8uMmbO2Gs01dB3C9ga0fu7BH/UrEXwAJBfsWafPY3A7h6lX6JKxVDZet +YGsZ/G1RZkjCwyMhr1iu4v0iPHwm/28Son9f0ObBrmZ9kphlRoKb0p+7Atgj +M+EP0y1IGGoUadyBfaBl+8frh0nIfq3mshubVjbMuGRDwr0s5Q4l7Ov3nrBc +sCOhseTdZlXs4SBT5VAHEi5lfHqti83lJmAS4ETCJjkTK731PNMRV18XEvx0 +bNON1t/feS7ezYOEfeU65yzXx8NuluNAIyFxTUDAej1vQeC5DUFCf3F8sN16 +3tBIuwVJwoxxesrR9by20nHjYyS8dUERTuvjqzr3G3xJSLlyTs51PT/HbJuO +HwmZJ21T3dfzrwsqqvuT4Pi8odVzPT9sVG9fAK5f+FWzFzYnUeYgH0SCj5nH +BTq25qHIk1IhJHhsTWL1Xs/XNo8TCyXBWNXJ/Bj2NRmhDMEwEmyuVB/xwX7G +M/aU9ywJ3ZNFsr7YQytl7zgiSLDS06xdN+fXyCG2SBIcgo5uO46t8cH851oU +CS+CuVTW/X8YNSiV "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.8593248945751705, 1.1587936358621242`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.8593248945751724}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10162,7 +11018,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5082122808512888}, + AxesOrigin->{0, 0.8593248945751724}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10190,7 +11047,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.8593248945751705, 1.1587936358621242`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10198,9 +11056,10 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913242457281837`*^9}, + CellChangeTimes->{3.9913242457281837`*^9, 3.994352240348239*^9, + 3.9943552512386103`*^9}, CellLabel-> - "Out[111]=",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] + "Out[127]=",ExpressionUUID->"67d705c4-d9a2-4146-8e5e-7629b625fe51"] }, Open ]], Cell[CellGroupData[{ @@ -10263,158 +11122,163 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9917997871187477`*^9, - 3.991799792469698*^9}},ExpressionUUID->"8faa67fd-f295-ea48-b116-\ -d12d9d52c36b"], + CellChangeTimes->{{3.9917997871187477`*^9, 3.991799792469698*^9}}, + CellLabel-> + "In[128]:=",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.955409411483839`*^-270\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1676615142553612`*^-266\\\", \ +\\\"1263377636044591724886240423994982400000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 41, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994352240558948*^9, + 3.994355251442181*^9}, + CellLabel-> + "During evaluation of \ +In[128]:=",ExpressionUUID->"6d06150f-a38d-4a28-8a36-0953fe736fdc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.538228832741127`*^-279\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 42, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994352240558948*^9, + 3.994355251452733*^9}, + CellLabel-> + "During evaluation of \ +In[128]:=",ExpressionUUID->"3b1b1ddc-7397-472d-80e6-e2bbc74e0b99"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.791453957763812`*^-291\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 112, - 45, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246104725*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 43, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994352240558948*^9, + 3.994355251462061*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.877419838456823`*^-281\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 112, 46, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461217346`*^9}, - CellLabel-> - "During evaluation of \ -In[112]:=",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.990320554242227`*^-292\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 112, 47, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461427383`*^9}, - CellLabel-> - "During evaluation of \ -In[112]:=",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], +In[128]:=",ExpressionUUID->"8740c978-057a-4865-a8b7-399ec4d7c10b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 112, 48, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246159645*^9}, +during this calculation.\"", 2, 128, 44, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994352240558948*^9, + 3.994355251471106*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], +In[128]:=",ExpressionUUID->"fbb29d32-e370-45bb-816d-938eb0b058be"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VdsbB/CKDJWIK/Nw9jmojAld5XjfJhmSIg1HpCQNpoQyFOmKFIlS +hMqVkuFsQzJUhDIPSZmKiH5lLo6hyW/d/c9+Ps9+9rP2Gt7vWptxyMPaecE8 +cs2fN++/+1R3TSXrcqqxkdXTgHMpYNyaLO23oT0Erq4ILm3iVwCUbDok3R4D +56rKYiL5NcF3x6M2vvYUONu/a+chfjYsG5WKmW3LhWX4gp/Fbwk9T7d7TLaV +w40xBd1DfPZgwhr88K2tBeQ/iL30necGs21rb4y39UG35anXHZOBULHpQerr +lAn4MbDAZ2QqEuR7ij4f0vgNNc1qE078cfCX64FHgpv4cEd7RD/f/USIWW1S +st1WCJP+nmHFF96Djls6Zd/ERHAlL/dITUYqXE4NalogswwzjoeWJsY9AKnr +ny7FJkngeKiWADAfQdguM+OWKUl8sUPprrVBJsjmN8oumL8cNxUvOJhmnAnZ +ErumVy9ejgtzC60nTTLhXYsDfU1pOTr+U1F5bk8msHZ6UztNiYffVlueyYRy +yzsCzfHLMVXe+8Kbwkz4bcJrbDCSQjn+G89P62fBKcN7B2pCpLGEx/9wVj4b +zO8unbS4Io1bA+K+OzCzgRIMDG+8IY30vl7+0pXZ0Ny6O+fNQ2mU65UL8jDI +Bi3PJXzdjdJ473Zl6TWrbPiSdjrtu6wMvperZnYFZ8P+v7aPyOXJ4Ap5X5ug +nmxYE1ByPvmpDDZuypswGsiGRX0rljNeyWBT4kZr3mA2FHH5QLVDBndWRprt +nsqG5RZF0TpzMviGuifXsYQLzedZelssZPHT7b4VfX9zYfPYD3/3T7IYYhYm +Mj+SC36m11e9GJZFVVnBtF/XuJB9T7NTYkoWF7v1aE7EcUF6l6NhkZAcJitG +LH59lwvDhS+n+bTkcN+1+3+s8rkQGxLtHX9GDlVz11VxOrnQJ6nqXikij+IS +15Wtl9Eg5VGqICUlj1aG4kPnJGjYVr234ZiyPKp+Bq10SRoK/C9riK6RxzUT +PMUpGRoiesYH9+2Vx9DuhZknKRp000tcxlLk8WBJfPiYLg3njXYelP1bAS3m +LJcIWtNg6pD8fe1GYub06cW7aFgaPHTBdpsCKra8HVmym4bEitC0aEcFPHv5 +94wAh4ZC8+IhgUsKWM+fEdN2kIbxvUzfiQ4FdBKa5hvypMHBhxdRH6CINdZ8 +V99foUHl5kb5wVBFNHu4LS8kiib9v5olGK2IY/3FX1WiafD/tbJ5Y6oiRoUY +RTnF0nDjgoNkUb0i+r0Kel4ST0P9tao79xWUcNhZiv/jfRrWZcfnnytVwpPi +f6J+lNCwua3x92i1EvbNzHA1n9GwfR7/1gMtSphytMfS4TkNTtbuHTCghC+W +lc4vLKPBJIARFLxQGYVR3sbyJQ2eSlP/blBXxkn+ti9zDTTw8qKrZ7WV0WWr ++vzFTeT7TNVHcvSUsfbR+G2JZhpCTzoaUMbKmPxmM0ehhYaEitrqBTuV0dnI +jV/iHQ2VLndGKnyVUaH9jFPYBxrMfhmKBwYo43bZz03Hu2lojG410AtWRvUL +PZUWPTR0FAkHp15Sxg2xy8wFemkYXewtHpqojEUfGurt+2mQpk3XmpQrIyd/ +r9jNQRqSNn+y+/NKGU3s3xnYDNFAdZwNLqhTxnqvK8NLhmnQXJBXo/pWGeNc +HAX9RmjYuEthv+AXZVSq/imgN06D68y34GoRBgaGu8bo88h4njyy/LM4AwN2 +rbZqIxYa7Mzgk2agr9dhA98pGu53VbwzphjY+Mb/YsY0Dd3Pb2g8NmBgzxlb +48lZGjLXLipvWc/AozPeB4J+kPGiz+0ZRwY6qHzkCv6kYXmKS4i6BQNV5iR7 +RX/RYBVq2H7vAAM/6F+N+/ObBsU/WW6lh0n7sXGbTv0h68OX4vtwjIFD2jzW +AHH40cVa0t4MPOhjEVY2R8Pu3qAKfT8GmkZECa+alwMszuRem3MM7M4vLY8m +LrP4cCEqnIFqHyLe287PgajKnTKZkQz8+5OPcT7xfvar7JoYBrYv/dYhuiAH +ZrW4HfxJDFSK2lD2nFhX/Lx2QA4DS3ol7X/y5cC8y7zKWwUM9Py6NXkTfw40 +8h3nFJQw8Im7h+Il4hM869BvLxmYnOTQvXhhDqxzr5IVrWNgV2OYkhmx0P/W +0xrNDJy7fCzlAnFqO6vLpZOBi1kMz3Fir53xnqE9DGR/tX9KCeQA1ooI/NvP +wGkRhqU18dJNIbfLvjLwfK4SM4j4Q8mUTvcoA3XviUI6cabeiVc/Jxg4bvng +XjOxf1aPncwsA5+9TbLgEZuq7vpm8IeBxn8esaUEc2D5neqLu/goNNcPO2NA +3C/FlvcSotAteuiXNXFudE7OVREKPeuv1bkSBwurbs0Sp3Bom97ABWKrkIT3 +tVIUVshFmd8iVvy51OuLPIWPv3B+pRMPn7ogKEBR2CO052chcfHwdCJTjcJt +vmD6kjjc2VV3gwaFPk2vPzUS7+7+WOWwmsKa3fWNb4lZe2ztAw0oZH8fEe4k +/t5U8z1+PYUvV03d6CIuMzUOf4IUDqvfP/Xf86gXuQpvt1BoUVHy7zvi/evU +8r6bUyjp+FO1mXhV3m1TsR0UPhBX/fOKeFZdrFvTliLz8WdlCfFUkuz5NRwK +J/o38DKJJ0VVWIYHKDydfkI7kfjbee0q48MUmjTpd4QTj04YHt98jMJLPZwJ +L+Ih580i5u4Unpu6cY5D/KVtO211isLJ8pQAIB4w22dje4bCL6HsIQZxX4nT +FOcshSLizMb5xD2a7vGOIRQerBNT6SHz9f7OGaMjYRQWpVWOFxG/uxAZcvIa +hfZH/b66EL/h3VQ5HUdhktCs1HriZpeU6sDbZLzZRs8XE9daPFkafp/CwDkx +n/tkfVU9e5ET+YjCkWKVMHfiSu36XbFcCrOO8v+lT/xcojchuYjCBYs07hWT +9VwSOsROfU5heuyvFD/iwmnex/QKCgfWpVEGxLldi9QeN1B4fHFC8gNSH1xL +ydriFgojmJ6J+4kzS5XcytooXGSwVk6UOO1fvby6Xgr3LytIdiX1lXDCAfp4 +FI4NHn4jTOrx5oejff/7QaGTXdboI1K/161OhY7Mkfll6FwzI45aE143I8xE +AwcJjyBS/yE/c/aIKjLxiV1+agPJjyC3pz/+YjKxIV5bzI44sOdVkuwKJp6Y +thL+TPLGt6Lrk4ouE110Sh9Mkjw6cXmhp5EJE18+1sz8L7+O/haV2GjBRK5/ +6m134iMesgVbdzAxPttC6fMMDY422r+sOUx0D/b/3EDyb5fcvvBj7kxkiNy5 +HEzy0igj825cHBP5hyuHvUi+diln3Nlym4lL6pbpt4yRPIxLT568w8S2kjE3 +beIn59MSrdOZOJCgmv+J5LPu3ru3lj4l73MWpa0heb5y4fXoi71MTLSRf3Zy +gIZq/5ir+p+ZGG17+xBN9oMj49FR/YNMdA75zjfyiYbUrsgrGyeZuIgnwHbs +o0E5Nyz8jwAL01u/JmqR/WX5gYBgXw0W5ok+fnyinYbHrX5BKqtZ2GBu5xHR +RvpjfuZcqz4LCx766Dwg+1eMvk+gLrDwZv9MXWcrDSJLPM6M7mRhz5avgate +08BfdMjzyGkW+geMu7rW0PBN3NxxdzkLM3TlaoIKaWh3pZqPV7Hw0FO7cNMn +NJS9+gFB9SyMehAhLlpAQ7R/htLDdyxM0bt/+UYeDTp9S3pmB1lY3hSoEZ5N +g3tOk32ShApOPHQSXJhKw6CVrV3/YRX83Ppx5eFIGlrSNetmjqlgecgjgy+X +aSjmE1gv4qGCG3ckaB2PoOHSkwJZAz8VVNwv3O8SRsMKJenOsEgVXNYxP8T8 +PA0uo5171QtUkNrD9srypqH/iuNuL0FVrPec7/VtH2l/UIPSWaKK+s6V1633 +0jC9dXZkREwV5WKO8OeS89AivpjQY7KqOD/9WcMJG/L9fhX5jpqqyCmYVK7b +RsNZZ1UJKxtVNM0RuWIIZPyNh5vU76ii3he9mC5yHjMbO202YKCGg9ASV1fL +BfnViheFjNTQZKNE0olXXBj1qixX36CGvcb/rBIq58L1KTEjLws1VJxV6jco +4kL373StuQNqqOntJX7iARe8lryXkLmkhq4Dv+11LnAhYSV2b+tSw4o3H5uN +yXl12EnoVH7QCgwtEns5fCub/H9ILQgrX4nijs6KzpAF4g2qUfTYKvweqK3g ++T4D5MO5OwwMNPBWTr4iBx/BLXVDMQkXTWSGBJx1yXoItbIb9CeuaeFs/Ku4 +VqkHsE6+PFr7nTZGnEyVqeLch6V8Kd4HQ3Tw4paGFW5P/wXF80pG+1RX49u5 +dg/5BSkgrLK/wLpqNY5OWhZx7e6CFluGe9peF2291X0GS5PAq1u8wnzeGmQ/ +1eUTzE6AsYkrtma31mC1SYh3yMxN2Kr9KsFMUw8PXBWI8vK7Ac8n1v+cbtTD +z6fpKZHJGHDX0O187ayPz/o0RbSqo4E9erh1n7ABTqz4uToPI2ELS9pSJMUA +Nw2NHna6dQlWBEecKV+7Fl3lBZb4770Iq5wNS1U616JP6kNOmtYFcH5+9J/8 +k3/jBF9wg21kMJTebT38TdIQb/06yZsQDYTJh3PT2k8Mkff68fyp4tPgpJIh +nGC5DscHVjmwdb3h26pYg9zxdTinU9gg2e0Jhak/e3nh6zGk1vn5ywOuwNnM +xPWKRvjM2M0e3rmAnFtYkVaZEd7vrf108J4TSC5yzbHcw8bpl0bjqdscIXXT +Wf/xfWwMHp/ymzJ2BN2zUZti97OxVCSHz3q1I2wfp9+2H2RjQE7qnOpyR7j4 +jjfr5MpGIeNfg1fLDsBMStBG//NszKo2CXox7ACd62PfpGWwMTb23f8ibOzh +qE9qolk2G0/qDobdXGcPU9mPnYdpNro1rSgsYNiDONU+vbqAjYuubU/UGN8P +FkIK8s/K2Phlz5Z1vMj98LQ17fCbt2zcKxkkMV5vB+ZLCzV929l4qWXsrPJj +O2jfWjMl3cXGxFxW1aEkO5gsHgp3+MjGKR/ZWnl3O9C8p5P1dZCNCcZfHZ3F +7OBp5wbfKyNsTIkWjWbOcsD8LxvQHmdjk/+QyUQvB46E+bz25rHxw6Fo5ao8 +DkyWXUyQmmGjZXitZl0iB0J+3HQq/sHGRzcSb34M5YCYXrqG/W82alLmNoIe +HEh2K+bNzbFxo6bcbtjLgf8DPXdMUw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10428,117 +11292,114 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwV13k4VdsbB/CKDJWIK/Nw9jmojAld5XjfJhmSIg1HpCQNpoQyFOmKFIlS +hMqVkuFsQzJUhDIPSZmKiH5lLo6hyW/d/c9+Ps9+9rP2Gt7vWptxyMPaecE8 +cs2fN++/+1R3TSXrcqqxkdXTgHMpYNyaLO23oT0Erq4ILm3iVwCUbDok3R4D +56rKYiL5NcF3x6M2vvYUONu/a+chfjYsG5WKmW3LhWX4gp/Fbwk9T7d7TLaV +w40xBd1DfPZgwhr88K2tBeQ/iL30necGs21rb4y39UG35anXHZOBULHpQerr +lAn4MbDAZ2QqEuR7ij4f0vgNNc1qE078cfCX64FHgpv4cEd7RD/f/USIWW1S +st1WCJP+nmHFF96Djls6Zd/ERHAlL/dITUYqXE4NalogswwzjoeWJsY9AKnr +ny7FJkngeKiWADAfQdguM+OWKUl8sUPprrVBJsjmN8oumL8cNxUvOJhmnAnZ +ErumVy9ejgtzC60nTTLhXYsDfU1pOTr+U1F5bk8msHZ6UztNiYffVlueyYRy +yzsCzfHLMVXe+8Kbwkz4bcJrbDCSQjn+G89P62fBKcN7B2pCpLGEx/9wVj4b +zO8unbS4Io1bA+K+OzCzgRIMDG+8IY30vl7+0pXZ0Ny6O+fNQ2mU65UL8jDI +Bi3PJXzdjdJ473Zl6TWrbPiSdjrtu6wMvperZnYFZ8P+v7aPyOXJ4Ap5X5ug +nmxYE1ByPvmpDDZuypswGsiGRX0rljNeyWBT4kZr3mA2FHH5QLVDBndWRprt +nsqG5RZF0TpzMviGuifXsYQLzedZelssZPHT7b4VfX9zYfPYD3/3T7IYYhYm +Mj+SC36m11e9GJZFVVnBtF/XuJB9T7NTYkoWF7v1aE7EcUF6l6NhkZAcJitG +LH59lwvDhS+n+bTkcN+1+3+s8rkQGxLtHX9GDlVz11VxOrnQJ6nqXikij+IS +15Wtl9Eg5VGqICUlj1aG4kPnJGjYVr234ZiyPKp+Bq10SRoK/C9riK6RxzUT +PMUpGRoiesYH9+2Vx9DuhZknKRp000tcxlLk8WBJfPiYLg3njXYelP1bAS3m +LJcIWtNg6pD8fe1GYub06cW7aFgaPHTBdpsCKra8HVmym4bEitC0aEcFPHv5 +94wAh4ZC8+IhgUsKWM+fEdN2kIbxvUzfiQ4FdBKa5hvypMHBhxdRH6CINdZ8 +V99foUHl5kb5wVBFNHu4LS8kiib9v5olGK2IY/3FX1WiafD/tbJ5Y6oiRoUY +RTnF0nDjgoNkUb0i+r0Kel4ST0P9tao79xWUcNhZiv/jfRrWZcfnnytVwpPi +f6J+lNCwua3x92i1EvbNzHA1n9GwfR7/1gMtSphytMfS4TkNTtbuHTCghC+W +lc4vLKPBJIARFLxQGYVR3sbyJQ2eSlP/blBXxkn+ti9zDTTw8qKrZ7WV0WWr ++vzFTeT7TNVHcvSUsfbR+G2JZhpCTzoaUMbKmPxmM0ehhYaEitrqBTuV0dnI +jV/iHQ2VLndGKnyVUaH9jFPYBxrMfhmKBwYo43bZz03Hu2lojG410AtWRvUL +PZUWPTR0FAkHp15Sxg2xy8wFemkYXewtHpqojEUfGurt+2mQpk3XmpQrIyd/ +r9jNQRqSNn+y+/NKGU3s3xnYDNFAdZwNLqhTxnqvK8NLhmnQXJBXo/pWGeNc +HAX9RmjYuEthv+AXZVSq/imgN06D68y34GoRBgaGu8bo88h4njyy/LM4AwN2 +rbZqIxYa7Mzgk2agr9dhA98pGu53VbwzphjY+Mb/YsY0Dd3Pb2g8NmBgzxlb +48lZGjLXLipvWc/AozPeB4J+kPGiz+0ZRwY6qHzkCv6kYXmKS4i6BQNV5iR7 +RX/RYBVq2H7vAAM/6F+N+/ObBsU/WW6lh0n7sXGbTv0h68OX4vtwjIFD2jzW +AHH40cVa0t4MPOhjEVY2R8Pu3qAKfT8GmkZECa+alwMszuRem3MM7M4vLY8m +LrP4cCEqnIFqHyLe287PgajKnTKZkQz8+5OPcT7xfvar7JoYBrYv/dYhuiAH +ZrW4HfxJDFSK2lD2nFhX/Lx2QA4DS3ol7X/y5cC8y7zKWwUM9Py6NXkTfw40 +8h3nFJQw8Im7h+Il4hM869BvLxmYnOTQvXhhDqxzr5IVrWNgV2OYkhmx0P/W +0xrNDJy7fCzlAnFqO6vLpZOBi1kMz3Fir53xnqE9DGR/tX9KCeQA1ooI/NvP +wGkRhqU18dJNIbfLvjLwfK4SM4j4Q8mUTvcoA3XviUI6cabeiVc/Jxg4bvng +XjOxf1aPncwsA5+9TbLgEZuq7vpm8IeBxn8esaUEc2D5neqLu/goNNcPO2NA +3C/FlvcSotAteuiXNXFudE7OVREKPeuv1bkSBwurbs0Sp3Bom97ABWKrkIT3 +tVIUVshFmd8iVvy51OuLPIWPv3B+pRMPn7ogKEBR2CO052chcfHwdCJTjcJt +vmD6kjjc2VV3gwaFPk2vPzUS7+7+WOWwmsKa3fWNb4lZe2ztAw0oZH8fEe4k +/t5U8z1+PYUvV03d6CIuMzUOf4IUDqvfP/Xf86gXuQpvt1BoUVHy7zvi/evU +8r6bUyjp+FO1mXhV3m1TsR0UPhBX/fOKeFZdrFvTliLz8WdlCfFUkuz5NRwK +J/o38DKJJ0VVWIYHKDydfkI7kfjbee0q48MUmjTpd4QTj04YHt98jMJLPZwJ +L+Ih580i5u4Unpu6cY5D/KVtO211isLJ8pQAIB4w22dje4bCL6HsIQZxX4nT +FOcshSLizMb5xD2a7vGOIRQerBNT6SHz9f7OGaMjYRQWpVWOFxG/uxAZcvIa +hfZH/b66EL/h3VQ5HUdhktCs1HriZpeU6sDbZLzZRs8XE9daPFkafp/CwDkx +n/tkfVU9e5ET+YjCkWKVMHfiSu36XbFcCrOO8v+lT/xcojchuYjCBYs07hWT +9VwSOsROfU5heuyvFD/iwmnex/QKCgfWpVEGxLldi9QeN1B4fHFC8gNSH1xL +ydriFgojmJ6J+4kzS5XcytooXGSwVk6UOO1fvby6Xgr3LytIdiX1lXDCAfp4 +FI4NHn4jTOrx5oejff/7QaGTXdboI1K/161OhY7Mkfll6FwzI45aE143I8xE +AwcJjyBS/yE/c/aIKjLxiV1+agPJjyC3pz/+YjKxIV5bzI44sOdVkuwKJp6Y +thL+TPLGt6Lrk4ouE110Sh9Mkjw6cXmhp5EJE18+1sz8L7+O/haV2GjBRK5/ +6m134iMesgVbdzAxPttC6fMMDY422r+sOUx0D/b/3EDyb5fcvvBj7kxkiNy5 +HEzy0igj825cHBP5hyuHvUi+diln3Nlym4lL6pbpt4yRPIxLT568w8S2kjE3 +beIn59MSrdOZOJCgmv+J5LPu3ru3lj4l73MWpa0heb5y4fXoi71MTLSRf3Zy +gIZq/5ir+p+ZGG17+xBN9oMj49FR/YNMdA75zjfyiYbUrsgrGyeZuIgnwHbs +o0E5Nyz8jwAL01u/JmqR/WX5gYBgXw0W5ok+fnyinYbHrX5BKqtZ2GBu5xHR +RvpjfuZcqz4LCx766Dwg+1eMvk+gLrDwZv9MXWcrDSJLPM6M7mRhz5avgate +08BfdMjzyGkW+geMu7rW0PBN3NxxdzkLM3TlaoIKaWh3pZqPV7Hw0FO7cNMn +NJS9+gFB9SyMehAhLlpAQ7R/htLDdyxM0bt/+UYeDTp9S3pmB1lY3hSoEZ5N +g3tOk32ShApOPHQSXJhKw6CVrV3/YRX83Ppx5eFIGlrSNetmjqlgecgjgy+X +aSjmE1gv4qGCG3ckaB2PoOHSkwJZAz8VVNwv3O8SRsMKJenOsEgVXNYxP8T8 +PA0uo5171QtUkNrD9srypqH/iuNuL0FVrPec7/VtH2l/UIPSWaKK+s6V1633 +0jC9dXZkREwV5WKO8OeS89AivpjQY7KqOD/9WcMJG/L9fhX5jpqqyCmYVK7b +RsNZZ1UJKxtVNM0RuWIIZPyNh5vU76ii3he9mC5yHjMbO202YKCGg9ASV1fL +BfnViheFjNTQZKNE0olXXBj1qixX36CGvcb/rBIq58L1KTEjLws1VJxV6jco +4kL373StuQNqqOntJX7iARe8lryXkLmkhq4Dv+11LnAhYSV2b+tSw4o3H5uN +yXl12EnoVH7QCgwtEns5fCub/H9ILQgrX4nijs6KzpAF4g2qUfTYKvweqK3g ++T4D5MO5OwwMNPBWTr4iBx/BLXVDMQkXTWSGBJx1yXoItbIb9CeuaeFs/Ku4 +VqkHsE6+PFr7nTZGnEyVqeLch6V8Kd4HQ3Tw4paGFW5P/wXF80pG+1RX49u5 +dg/5BSkgrLK/wLpqNY5OWhZx7e6CFluGe9peF2291X0GS5PAq1u8wnzeGmQ/ +1eUTzE6AsYkrtma31mC1SYh3yMxN2Kr9KsFMUw8PXBWI8vK7Ac8n1v+cbtTD +z6fpKZHJGHDX0O187ayPz/o0RbSqo4E9erh1n7ABTqz4uToPI2ELS9pSJMUA +Nw2NHna6dQlWBEecKV+7Fl3lBZb4770Iq5wNS1U616JP6kNOmtYFcH5+9J/8 +k3/jBF9wg21kMJTebT38TdIQb/06yZsQDYTJh3PT2k8Mkff68fyp4tPgpJIh +nGC5DscHVjmwdb3h26pYg9zxdTinU9gg2e0Jhak/e3nh6zGk1vn5ywOuwNnM +xPWKRvjM2M0e3rmAnFtYkVaZEd7vrf108J4TSC5yzbHcw8bpl0bjqdscIXXT +Wf/xfWwMHp/ymzJ2BN2zUZti97OxVCSHz3q1I2wfp9+2H2RjQE7qnOpyR7j4 +jjfr5MpGIeNfg1fLDsBMStBG//NszKo2CXox7ACd62PfpGWwMTb23f8ibOzh +qE9qolk2G0/qDobdXGcPU9mPnYdpNro1rSgsYNiDONU+vbqAjYuubU/UGN8P +FkIK8s/K2Phlz5Z1vMj98LQ17fCbt2zcKxkkMV5vB+ZLCzV929l4qWXsrPJj +O2jfWjMl3cXGxFxW1aEkO5gsHgp3+MjGKR/ZWnl3O9C8p5P1dZCNCcZfHZ3F +7OBp5wbfKyNsTIkWjWbOcsD8LxvQHmdjk/+QyUQvB46E+bz25rHxw6Fo5ao8 +DkyWXUyQmmGjZXitZl0iB0J+3HQq/sHGRzcSb34M5YCYXrqG/W82alLmNoIe +HEh2K+bNzbFxo6bcbtjLgf8DPXdMUw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06652614985629686}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10550,19 +11411,19 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06652614985629686}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10576,116 +11437,113 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwV13k4VdsbB/CKDJWIK/Nw9jmojAld5XjfJhmSIg1HpCQNpoQyFOmKFIlS +hMqVkuFsQzJUhDIPSZmKiH5lLo6hyW/d/c9+Ps9+9rP2Gt7vWptxyMPaecE8 +cs2fN++/+1R3TSXrcqqxkdXTgHMpYNyaLO23oT0Erq4ILm3iVwCUbDok3R4D +56rKYiL5NcF3x6M2vvYUONu/a+chfjYsG5WKmW3LhWX4gp/Fbwk9T7d7TLaV +w40xBd1DfPZgwhr88K2tBeQ/iL30necGs21rb4y39UG35anXHZOBULHpQerr +lAn4MbDAZ2QqEuR7ij4f0vgNNc1qE078cfCX64FHgpv4cEd7RD/f/USIWW1S +st1WCJP+nmHFF96Djls6Zd/ERHAlL/dITUYqXE4NalogswwzjoeWJsY9AKnr +ny7FJkngeKiWADAfQdguM+OWKUl8sUPprrVBJsjmN8oumL8cNxUvOJhmnAnZ +ErumVy9ejgtzC60nTTLhXYsDfU1pOTr+U1F5bk8msHZ6UztNiYffVlueyYRy +yzsCzfHLMVXe+8Kbwkz4bcJrbDCSQjn+G89P62fBKcN7B2pCpLGEx/9wVj4b +zO8unbS4Io1bA+K+OzCzgRIMDG+8IY30vl7+0pXZ0Ny6O+fNQ2mU65UL8jDI +Bi3PJXzdjdJ473Zl6TWrbPiSdjrtu6wMvperZnYFZ8P+v7aPyOXJ4Ap5X5ug +nmxYE1ByPvmpDDZuypswGsiGRX0rljNeyWBT4kZr3mA2FHH5QLVDBndWRprt +nsqG5RZF0TpzMviGuifXsYQLzedZelssZPHT7b4VfX9zYfPYD3/3T7IYYhYm +Mj+SC36m11e9GJZFVVnBtF/XuJB9T7NTYkoWF7v1aE7EcUF6l6NhkZAcJitG +LH59lwvDhS+n+bTkcN+1+3+s8rkQGxLtHX9GDlVz11VxOrnQJ6nqXikij+IS +15Wtl9Eg5VGqICUlj1aG4kPnJGjYVr234ZiyPKp+Bq10SRoK/C9riK6RxzUT +PMUpGRoiesYH9+2Vx9DuhZknKRp000tcxlLk8WBJfPiYLg3njXYelP1bAS3m +LJcIWtNg6pD8fe1GYub06cW7aFgaPHTBdpsCKra8HVmym4bEitC0aEcFPHv5 +94wAh4ZC8+IhgUsKWM+fEdN2kIbxvUzfiQ4FdBKa5hvypMHBhxdRH6CINdZ8 +V99foUHl5kb5wVBFNHu4LS8kiib9v5olGK2IY/3FX1WiafD/tbJ5Y6oiRoUY +RTnF0nDjgoNkUb0i+r0Kel4ST0P9tao79xWUcNhZiv/jfRrWZcfnnytVwpPi +f6J+lNCwua3x92i1EvbNzHA1n9GwfR7/1gMtSphytMfS4TkNTtbuHTCghC+W +lc4vLKPBJIARFLxQGYVR3sbyJQ2eSlP/blBXxkn+ti9zDTTw8qKrZ7WV0WWr ++vzFTeT7TNVHcvSUsfbR+G2JZhpCTzoaUMbKmPxmM0ehhYaEitrqBTuV0dnI +jV/iHQ2VLndGKnyVUaH9jFPYBxrMfhmKBwYo43bZz03Hu2lojG410AtWRvUL +PZUWPTR0FAkHp15Sxg2xy8wFemkYXewtHpqojEUfGurt+2mQpk3XmpQrIyd/ +r9jNQRqSNn+y+/NKGU3s3xnYDNFAdZwNLqhTxnqvK8NLhmnQXJBXo/pWGeNc +HAX9RmjYuEthv+AXZVSq/imgN06D68y34GoRBgaGu8bo88h4njyy/LM4AwN2 +rbZqIxYa7Mzgk2agr9dhA98pGu53VbwzphjY+Mb/YsY0Dd3Pb2g8NmBgzxlb +48lZGjLXLipvWc/AozPeB4J+kPGiz+0ZRwY6qHzkCv6kYXmKS4i6BQNV5iR7 +RX/RYBVq2H7vAAM/6F+N+/ObBsU/WW6lh0n7sXGbTv0h68OX4vtwjIFD2jzW +AHH40cVa0t4MPOhjEVY2R8Pu3qAKfT8GmkZECa+alwMszuRem3MM7M4vLY8m +LrP4cCEqnIFqHyLe287PgajKnTKZkQz8+5OPcT7xfvar7JoYBrYv/dYhuiAH +ZrW4HfxJDFSK2lD2nFhX/Lx2QA4DS3ol7X/y5cC8y7zKWwUM9Py6NXkTfw40 +8h3nFJQw8Im7h+Il4hM869BvLxmYnOTQvXhhDqxzr5IVrWNgV2OYkhmx0P/W +0xrNDJy7fCzlAnFqO6vLpZOBi1kMz3Fir53xnqE9DGR/tX9KCeQA1ooI/NvP +wGkRhqU18dJNIbfLvjLwfK4SM4j4Q8mUTvcoA3XviUI6cabeiVc/Jxg4bvng +XjOxf1aPncwsA5+9TbLgEZuq7vpm8IeBxn8esaUEc2D5neqLu/goNNcPO2NA +3C/FlvcSotAteuiXNXFudE7OVREKPeuv1bkSBwurbs0Sp3Bom97ABWKrkIT3 +tVIUVshFmd8iVvy51OuLPIWPv3B+pRMPn7ogKEBR2CO052chcfHwdCJTjcJt +vmD6kjjc2VV3gwaFPk2vPzUS7+7+WOWwmsKa3fWNb4lZe2ztAw0oZH8fEe4k +/t5U8z1+PYUvV03d6CIuMzUOf4IUDqvfP/Xf86gXuQpvt1BoUVHy7zvi/evU +8r6bUyjp+FO1mXhV3m1TsR0UPhBX/fOKeFZdrFvTliLz8WdlCfFUkuz5NRwK +J/o38DKJJ0VVWIYHKDydfkI7kfjbee0q48MUmjTpd4QTj04YHt98jMJLPZwJ +L+Ih580i5u4Unpu6cY5D/KVtO211isLJ8pQAIB4w22dje4bCL6HsIQZxX4nT +FOcshSLizMb5xD2a7vGOIRQerBNT6SHz9f7OGaMjYRQWpVWOFxG/uxAZcvIa +hfZH/b66EL/h3VQ5HUdhktCs1HriZpeU6sDbZLzZRs8XE9daPFkafp/CwDkx +n/tkfVU9e5ET+YjCkWKVMHfiSu36XbFcCrOO8v+lT/xcojchuYjCBYs07hWT +9VwSOsROfU5heuyvFD/iwmnex/QKCgfWpVEGxLldi9QeN1B4fHFC8gNSH1xL +ydriFgojmJ6J+4kzS5XcytooXGSwVk6UOO1fvby6Xgr3LytIdiX1lXDCAfp4 +FI4NHn4jTOrx5oejff/7QaGTXdboI1K/161OhY7Mkfll6FwzI45aE143I8xE +AwcJjyBS/yE/c/aIKjLxiV1+agPJjyC3pz/+YjKxIV5bzI44sOdVkuwKJp6Y +thL+TPLGt6Lrk4ouE110Sh9Mkjw6cXmhp5EJE18+1sz8L7+O/haV2GjBRK5/ +6m134iMesgVbdzAxPttC6fMMDY422r+sOUx0D/b/3EDyb5fcvvBj7kxkiNy5 +HEzy0igj825cHBP5hyuHvUi+diln3Nlym4lL6pbpt4yRPIxLT568w8S2kjE3 +beIn59MSrdOZOJCgmv+J5LPu3ru3lj4l73MWpa0heb5y4fXoi71MTLSRf3Zy +gIZq/5ir+p+ZGG17+xBN9oMj49FR/YNMdA75zjfyiYbUrsgrGyeZuIgnwHbs +o0E5Nyz8jwAL01u/JmqR/WX5gYBgXw0W5ok+fnyinYbHrX5BKqtZ2GBu5xHR +RvpjfuZcqz4LCx766Dwg+1eMvk+gLrDwZv9MXWcrDSJLPM6M7mRhz5avgate +08BfdMjzyGkW+geMu7rW0PBN3NxxdzkLM3TlaoIKaWh3pZqPV7Hw0FO7cNMn +NJS9+gFB9SyMehAhLlpAQ7R/htLDdyxM0bt/+UYeDTp9S3pmB1lY3hSoEZ5N +g3tOk32ShApOPHQSXJhKw6CVrV3/YRX83Ppx5eFIGlrSNetmjqlgecgjgy+X +aSjmE1gv4qGCG3ckaB2PoOHSkwJZAz8VVNwv3O8SRsMKJenOsEgVXNYxP8T8 +PA0uo5171QtUkNrD9srypqH/iuNuL0FVrPec7/VtH2l/UIPSWaKK+s6V1633 +0jC9dXZkREwV5WKO8OeS89AivpjQY7KqOD/9WcMJG/L9fhX5jpqqyCmYVK7b +RsNZZ1UJKxtVNM0RuWIIZPyNh5vU76ii3he9mC5yHjMbO202YKCGg9ASV1fL +BfnViheFjNTQZKNE0olXXBj1qixX36CGvcb/rBIq58L1KTEjLws1VJxV6jco +4kL373StuQNqqOntJX7iARe8lryXkLmkhq4Dv+11LnAhYSV2b+tSw4o3H5uN +yXl12EnoVH7QCgwtEns5fCub/H9ILQgrX4nijs6KzpAF4g2qUfTYKvweqK3g ++T4D5MO5OwwMNPBWTr4iBx/BLXVDMQkXTWSGBJx1yXoItbIb9CeuaeFs/Ku4 +VqkHsE6+PFr7nTZGnEyVqeLch6V8Kd4HQ3Tw4paGFW5P/wXF80pG+1RX49u5 +dg/5BSkgrLK/wLpqNY5OWhZx7e6CFluGe9peF2291X0GS5PAq1u8wnzeGmQ/ +1eUTzE6AsYkrtma31mC1SYh3yMxN2Kr9KsFMUw8PXBWI8vK7Ac8n1v+cbtTD +z6fpKZHJGHDX0O187ayPz/o0RbSqo4E9erh1n7ABTqz4uToPI2ELS9pSJMUA +Nw2NHna6dQlWBEecKV+7Fl3lBZb4770Iq5wNS1U616JP6kNOmtYFcH5+9J/8 +k3/jBF9wg21kMJTebT38TdIQb/06yZsQDYTJh3PT2k8Mkff68fyp4tPgpJIh +nGC5DscHVjmwdb3h26pYg9zxdTinU9gg2e0Jhak/e3nh6zGk1vn5ywOuwNnM +xPWKRvjM2M0e3rmAnFtYkVaZEd7vrf108J4TSC5yzbHcw8bpl0bjqdscIXXT +Wf/xfWwMHp/ymzJ2BN2zUZti97OxVCSHz3q1I2wfp9+2H2RjQE7qnOpyR7j4 +jjfr5MpGIeNfg1fLDsBMStBG//NszKo2CXox7ACd62PfpGWwMTb23f8ibOzh +qE9qolk2G0/qDobdXGcPU9mPnYdpNro1rSgsYNiDONU+vbqAjYuubU/UGN8P +FkIK8s/K2Phlz5Z1vMj98LQ17fCbt2zcKxkkMV5vB+ZLCzV929l4qWXsrPJj +O2jfWjMl3cXGxFxW1aEkO5gsHgp3+MjGKR/ZWnl3O9C8p5P1dZCNCcZfHZ3F +7OBp5wbfKyNsTIkWjWbOcsD8LxvQHmdjk/+QyUQvB46E+bz25rHxw6Fo5ao8 +DkyWXUyQmmGjZXitZl0iB0J+3HQq/sHGRzcSb34M5YCYXrqG/W82alLmNoIe +HEh2K+bNzbFxo6bcbtjLgf8DPXdMUw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06652614985629686}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10696,6 +11554,7 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10723,7 +11582,8 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.13473082946272152`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06652614985629686}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10731,22 +11591,568 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991324915847246*^9}, + CellChangeTimes->{3.994355774912343*^9}, CellLabel-> - "Out[112]=",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] + "Out[128]=",ExpressionUUID->"14b4cd6a-59e7-44ea-94f4-3233133add92"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{3.991799816909994*^9, 3.9918001103050213`*^9, - 3.991924419552084*^9},ExpressionUUID->"c5eb8b00-da53-e74c-9781-\ -4f98a6653ef7"], + 3.991924419552084*^9}, + CellLabel-> + "In[129]:=",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799819852022*^9, - 3.9917998213158054`*^9}},ExpressionUUID->"05df483d-64d7-9449-845e-\ -6e6b94590d4b"], + CellChangeTimes->{{3.991799819852022*^9, 3.9917998213158054`*^9}}, + CellLabel-> + "In[130]:=",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VdsbB/CKDJWIK/Nw9jmojAld5XjfJhmSIg1HpCQNpoQyFOmKFIlS +hMqVkuFsQzJUhDIPSZmKiH5lLo6hyW/d/c9+Ps9+9rP2Gt7vWptxyMPaecE8 +cs2fN++/+1R3TSXrcqqxkdXTgHMpYNyaLO23oT0Erq4ILm3iVwCUbDok3R4D +56rKYiL5NcF3x6M2vvYUONu/a+chfjYsG5WKmW3LhWX4gp/Fbwk9T7d7TLaV +w40xBd1DfPZgwhr88K2tBeQ/iL30necGs21rb4y39UG35anXHZOBULHpQerr +lAn4MbDAZ2QqEuR7ij4f0vgNNc1qE078cfCX64FHgpv4cEd7RD/f/USIWW1S +st1WCJP+nmHFF96Djls6Zd/ERHAlL/dITUYqXE4NalogswwzjoeWJsY9AKnr +ny7FJkngeKiWADAfQdguM+OWKUl8sUPprrVBJsjmN8oumL8cNxUvOJhmnAnZ +ErumVy9ejgtzC60nTTLhXYsDfU1pOTr+U1F5bk8msHZ6UztNiYffVlueyYRy +yzsCzfHLMVXe+8Kbwkz4bcJrbDCSQjn+G89P62fBKcN7B2pCpLGEx/9wVj4b +zO8unbS4Io1bA+K+OzCzgRIMDG+8IY30vl7+0pXZ0Ny6O+fNQ2mU65UL8jDI +Bi3PJXzdjdJ473Zl6TWrbPiSdjrtu6wMvperZnYFZ8P+v7aPyOXJ4Ap5X5ug +nmxYE1ByPvmpDDZuypswGsiGRX0rljNeyWBT4kZr3mA2FHH5QLVDBndWRprt +nsqG5RZF0TpzMviGuifXsYQLzedZelssZPHT7b4VfX9zYfPYD3/3T7IYYhYm +Mj+SC36m11e9GJZFVVnBtF/XuJB9T7NTYkoWF7v1aE7EcUF6l6NhkZAcJitG +LH59lwvDhS+n+bTkcN+1+3+s8rkQGxLtHX9GDlVz11VxOrnQJ6nqXikij+IS +15Wtl9Eg5VGqICUlj1aG4kPnJGjYVr234ZiyPKp+Bq10SRoK/C9riK6RxzUT +PMUpGRoiesYH9+2Vx9DuhZknKRp000tcxlLk8WBJfPiYLg3njXYelP1bAS3m +LJcIWtNg6pD8fe1GYub06cW7aFgaPHTBdpsCKra8HVmym4bEitC0aEcFPHv5 +94wAh4ZC8+IhgUsKWM+fEdN2kIbxvUzfiQ4FdBKa5hvypMHBhxdRH6CINdZ8 +V99foUHl5kb5wVBFNHu4LS8kiib9v5olGK2IY/3FX1WiafD/tbJ5Y6oiRoUY +RTnF0nDjgoNkUb0i+r0Kel4ST0P9tao79xWUcNhZiv/jfRrWZcfnnytVwpPi +f6J+lNCwua3x92i1EvbNzHA1n9GwfR7/1gMtSphytMfS4TkNTtbuHTCghC+W +lc4vLKPBJIARFLxQGYVR3sbyJQ2eSlP/blBXxkn+ti9zDTTw8qKrZ7WV0WWr ++vzFTeT7TNVHcvSUsfbR+G2JZhpCTzoaUMbKmPxmM0ehhYaEitrqBTuV0dnI +jV/iHQ2VLndGKnyVUaH9jFPYBxrMfhmKBwYo43bZz03Hu2lojG410AtWRvUL +PZUWPTR0FAkHp15Sxg2xy8wFemkYXewtHpqojEUfGurt+2mQpk3XmpQrIyd/ +r9jNQRqSNn+y+/NKGU3s3xnYDNFAdZwNLqhTxnqvK8NLhmnQXJBXo/pWGeNc +HAX9RmjYuEthv+AXZVSq/imgN06D68y34GoRBgaGu8bo88h4njyy/LM4AwN2 +rbZqIxYa7Mzgk2agr9dhA98pGu53VbwzphjY+Mb/YsY0Dd3Pb2g8NmBgzxlb +48lZGjLXLipvWc/AozPeB4J+kPGiz+0ZRwY6qHzkCv6kYXmKS4i6BQNV5iR7 +RX/RYBVq2H7vAAM/6F+N+/ObBsU/WW6lh0n7sXGbTv0h68OX4vtwjIFD2jzW +AHH40cVa0t4MPOhjEVY2R8Pu3qAKfT8GmkZECa+alwMszuRem3MM7M4vLY8m +LrP4cCEqnIFqHyLe287PgajKnTKZkQz8+5OPcT7xfvar7JoYBrYv/dYhuiAH +ZrW4HfxJDFSK2lD2nFhX/Lx2QA4DS3ol7X/y5cC8y7zKWwUM9Py6NXkTfw40 +8h3nFJQw8Im7h+Il4hM869BvLxmYnOTQvXhhDqxzr5IVrWNgV2OYkhmx0P/W +0xrNDJy7fCzlAnFqO6vLpZOBi1kMz3Fir53xnqE9DGR/tX9KCeQA1ooI/NvP +wGkRhqU18dJNIbfLvjLwfK4SM4j4Q8mUTvcoA3XviUI6cabeiVc/Jxg4bvng +XjOxf1aPncwsA5+9TbLgEZuq7vpm8IeBxn8esaUEc2D5neqLu/goNNcPO2NA +3C/FlvcSotAteuiXNXFudE7OVREKPeuv1bkSBwurbs0Sp3Bom97ABWKrkIT3 +tVIUVshFmd8iVvy51OuLPIWPv3B+pRMPn7ogKEBR2CO052chcfHwdCJTjcJt +vmD6kjjc2VV3gwaFPk2vPzUS7+7+WOWwmsKa3fWNb4lZe2ztAw0oZH8fEe4k +/t5U8z1+PYUvV03d6CIuMzUOf4IUDqvfP/Xf86gXuQpvt1BoUVHy7zvi/evU +8r6bUyjp+FO1mXhV3m1TsR0UPhBX/fOKeFZdrFvTliLz8WdlCfFUkuz5NRwK +J/o38DKJJ0VVWIYHKDydfkI7kfjbee0q48MUmjTpd4QTj04YHt98jMJLPZwJ +L+Ih580i5u4Unpu6cY5D/KVtO211isLJ8pQAIB4w22dje4bCL6HsIQZxX4nT +FOcshSLizMb5xD2a7vGOIRQerBNT6SHz9f7OGaMjYRQWpVWOFxG/uxAZcvIa +hfZH/b66EL/h3VQ5HUdhktCs1HriZpeU6sDbZLzZRs8XE9daPFkafp/CwDkx +n/tkfVU9e5ET+YjCkWKVMHfiSu36XbFcCrOO8v+lT/xcojchuYjCBYs07hWT +9VwSOsROfU5heuyvFD/iwmnex/QKCgfWpVEGxLldi9QeN1B4fHFC8gNSH1xL +ydriFgojmJ6J+4kzS5XcytooXGSwVk6UOO1fvby6Xgr3LytIdiX1lXDCAfp4 +FI4NHn4jTOrx5oejff/7QaGTXdboI1K/161OhY7Mkfll6FwzI45aE143I8xE +AwcJjyBS/yE/c/aIKjLxiV1+agPJjyC3pz/+YjKxIV5bzI44sOdVkuwKJp6Y +thL+TPLGt6Lrk4ouE110Sh9Mkjw6cXmhp5EJE18+1sz8L7+O/haV2GjBRK5/ +6m134iMesgVbdzAxPttC6fMMDY422r+sOUx0D/b/3EDyb5fcvvBj7kxkiNy5 +HEzy0igj825cHBP5hyuHvUi+diln3Nlym4lL6pbpt4yRPIxLT568w8S2kjE3 +beIn59MSrdOZOJCgmv+J5LPu3ru3lj4l73MWpa0heb5y4fXoi71MTLSRf3Zy +gIZq/5ir+p+ZGG17+xBN9oMj49FR/YNMdA75zjfyiYbUrsgrGyeZuIgnwHbs +o0E5Nyz8jwAL01u/JmqR/WX5gYBgXw0W5ok+fnyinYbHrX5BKqtZ2GBu5xHR +RvpjfuZcqz4LCx766Dwg+1eMvk+gLrDwZv9MXWcrDSJLPM6M7mRhz5avgate +08BfdMjzyGkW+geMu7rW0PBN3NxxdzkLM3TlaoIKaWh3pZqPV7Hw0FO7cNMn +NJS9+gFB9SyMehAhLlpAQ7R/htLDdyxM0bt/+UYeDTp9S3pmB1lY3hSoEZ5N +g3tOk32ShApOPHQSXJhKw6CVrV3/YRX83Ppx5eFIGlrSNetmjqlgecgjgy+X +aSjmE1gv4qGCG3ckaB2PoOHSkwJZAz8VVNwv3O8SRsMKJenOsEgVXNYxP8T8 +PA0uo5171QtUkNrD9srypqH/iuNuL0FVrPec7/VtH2l/UIPSWaKK+s6V1633 +0jC9dXZkREwV5WKO8OeS89AivpjQY7KqOD/9WcMJG/L9fhX5jpqqyCmYVK7b +RsNZZ1UJKxtVNM0RuWIIZPyNh5vU76ii3he9mC5yHjMbO202YKCGg9ASV1fL +BfnViheFjNTQZKNE0olXXBj1qixX36CGvcb/rBIq58L1KTEjLws1VJxV6jco +4kL373StuQNqqOntJX7iARe8lryXkLmkhq4Dv+11LnAhYSV2b+tSw4o3H5uN +yXl12EnoVH7QCgwtEns5fCub/H9ILQgrX4nijs6KzpAF4g2qUfTYKvweqK3g ++T4D5MO5OwwMNPBWTr4iBx/BLXVDMQkXTWSGBJx1yXoItbIb9CeuaeFs/Ku4 +VqkHsE6+PFr7nTZGnEyVqeLch6V8Kd4HQ3Tw4paGFW5P/wXF80pG+1RX49u5 +dg/5BSkgrLK/wLpqNY5OWhZx7e6CFluGe9peF2291X0GS5PAq1u8wnzeGmQ/ +1eUTzE6AsYkrtma31mC1SYh3yMxN2Kr9KsFMUw8PXBWI8vK7Ac8n1v+cbtTD +z6fpKZHJGHDX0O187ayPz/o0RbSqo4E9erh1n7ABTqz4uToPI2ELS9pSJMUA +Nw2NHna6dQlWBEecKV+7Fl3lBZb4770Iq5wNS1U616JP6kNOmtYFcH5+9J/8 +k3/jBF9wg21kMJTebT38TdIQb/06yZsQDYTJh3PT2k8Mkff68fyp4tPgpJIh +nGC5DscHVjmwdb3h26pYg9zxdTinU9gg2e0Jhak/e3nh6zGk1vn5ywOuwNnM +xPWKRvjM2M0e3rmAnFtYkVaZEd7vrf108J4TSC5yzbHcw8bpl0bjqdscIXXT +Wf/xfWwMHp/ymzJ2BN2zUZti97OxVCSHz3q1I2wfp9+2H2RjQE7qnOpyR7j4 +jjfr5MpGIeNfg1fLDsBMStBG//NszKo2CXox7ACd62PfpGWwMTb23f8ibOzh +qE9qolk2G0/qDobdXGcPU9mPnYdpNro1rSgsYNiDONU+vbqAjYuubU/UGN8P +FkIK8s/K2Phlz5Z1vMj98LQ17fCbt2zcKxkkMV5vB+ZLCzV929l4qWXsrPJj +O2jfWjMl3cXGxFxW1aEkO5gsHgp3+MjGKR/ZWnl3O9C8p5P1dZCNCcZfHZ3F +7OBp5wbfKyNsTIkWjWbOcsD8LxvQHmdjk/+QyUQvB46E+bz25rHxw6Fo5ao8 +DkyWXUyQmmGjZXitZl0iB0J+3HQq/sHGRzcSb34M5YCYXrqG/W82alLmNoIe +HEh2K+bNzbFxo6bcbtjLgf8DPXdMUw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VdsbB/CKDJWIK/Nw9jmojAld5XjfJhmSIg1HpCQNpoQyFOmKFIlS +hMqVkuFsQzJUhDIPSZmKiH5lLo6hyW/d/c9+Ps9+9rP2Gt7vWptxyMPaecE8 +cs2fN++/+1R3TSXrcqqxkdXTgHMpYNyaLO23oT0Erq4ILm3iVwCUbDok3R4D +56rKYiL5NcF3x6M2vvYUONu/a+chfjYsG5WKmW3LhWX4gp/Fbwk9T7d7TLaV +w40xBd1DfPZgwhr88K2tBeQ/iL30necGs21rb4y39UG35anXHZOBULHpQerr +lAn4MbDAZ2QqEuR7ij4f0vgNNc1qE078cfCX64FHgpv4cEd7RD/f/USIWW1S +st1WCJP+nmHFF96Djls6Zd/ERHAlL/dITUYqXE4NalogswwzjoeWJsY9AKnr +ny7FJkngeKiWADAfQdguM+OWKUl8sUPprrVBJsjmN8oumL8cNxUvOJhmnAnZ +ErumVy9ejgtzC60nTTLhXYsDfU1pOTr+U1F5bk8msHZ6UztNiYffVlueyYRy +yzsCzfHLMVXe+8Kbwkz4bcJrbDCSQjn+G89P62fBKcN7B2pCpLGEx/9wVj4b +zO8unbS4Io1bA+K+OzCzgRIMDG+8IY30vl7+0pXZ0Ny6O+fNQ2mU65UL8jDI +Bi3PJXzdjdJ473Zl6TWrbPiSdjrtu6wMvperZnYFZ8P+v7aPyOXJ4Ap5X5ug +nmxYE1ByPvmpDDZuypswGsiGRX0rljNeyWBT4kZr3mA2FHH5QLVDBndWRprt +nsqG5RZF0TpzMviGuifXsYQLzedZelssZPHT7b4VfX9zYfPYD3/3T7IYYhYm +Mj+SC36m11e9GJZFVVnBtF/XuJB9T7NTYkoWF7v1aE7EcUF6l6NhkZAcJitG +LH59lwvDhS+n+bTkcN+1+3+s8rkQGxLtHX9GDlVz11VxOrnQJ6nqXikij+IS +15Wtl9Eg5VGqICUlj1aG4kPnJGjYVr234ZiyPKp+Bq10SRoK/C9riK6RxzUT +PMUpGRoiesYH9+2Vx9DuhZknKRp000tcxlLk8WBJfPiYLg3njXYelP1bAS3m +LJcIWtNg6pD8fe1GYub06cW7aFgaPHTBdpsCKra8HVmym4bEitC0aEcFPHv5 +94wAh4ZC8+IhgUsKWM+fEdN2kIbxvUzfiQ4FdBKa5hvypMHBhxdRH6CINdZ8 +V99foUHl5kb5wVBFNHu4LS8kiib9v5olGK2IY/3FX1WiafD/tbJ5Y6oiRoUY +RTnF0nDjgoNkUb0i+r0Kel4ST0P9tao79xWUcNhZiv/jfRrWZcfnnytVwpPi +f6J+lNCwua3x92i1EvbNzHA1n9GwfR7/1gMtSphytMfS4TkNTtbuHTCghC+W +lc4vLKPBJIARFLxQGYVR3sbyJQ2eSlP/blBXxkn+ti9zDTTw8qKrZ7WV0WWr ++vzFTeT7TNVHcvSUsfbR+G2JZhpCTzoaUMbKmPxmM0ehhYaEitrqBTuV0dnI +jV/iHQ2VLndGKnyVUaH9jFPYBxrMfhmKBwYo43bZz03Hu2lojG410AtWRvUL +PZUWPTR0FAkHp15Sxg2xy8wFemkYXewtHpqojEUfGurt+2mQpk3XmpQrIyd/ +r9jNQRqSNn+y+/NKGU3s3xnYDNFAdZwNLqhTxnqvK8NLhmnQXJBXo/pWGeNc +HAX9RmjYuEthv+AXZVSq/imgN06D68y34GoRBgaGu8bo88h4njyy/LM4AwN2 +rbZqIxYa7Mzgk2agr9dhA98pGu53VbwzphjY+Mb/YsY0Dd3Pb2g8NmBgzxlb +48lZGjLXLipvWc/AozPeB4J+kPGiz+0ZRwY6qHzkCv6kYXmKS4i6BQNV5iR7 +RX/RYBVq2H7vAAM/6F+N+/ObBsU/WW6lh0n7sXGbTv0h68OX4vtwjIFD2jzW +AHH40cVa0t4MPOhjEVY2R8Pu3qAKfT8GmkZECa+alwMszuRem3MM7M4vLY8m +LrP4cCEqnIFqHyLe287PgajKnTKZkQz8+5OPcT7xfvar7JoYBrYv/dYhuiAH +ZrW4HfxJDFSK2lD2nFhX/Lx2QA4DS3ol7X/y5cC8y7zKWwUM9Py6NXkTfw40 +8h3nFJQw8Im7h+Il4hM869BvLxmYnOTQvXhhDqxzr5IVrWNgV2OYkhmx0P/W +0xrNDJy7fCzlAnFqO6vLpZOBi1kMz3Fir53xnqE9DGR/tX9KCeQA1ooI/NvP +wGkRhqU18dJNIbfLvjLwfK4SM4j4Q8mUTvcoA3XviUI6cabeiVc/Jxg4bvng +XjOxf1aPncwsA5+9TbLgEZuq7vpm8IeBxn8esaUEc2D5neqLu/goNNcPO2NA +3C/FlvcSotAteuiXNXFudE7OVREKPeuv1bkSBwurbs0Sp3Bom97ABWKrkIT3 +tVIUVshFmd8iVvy51OuLPIWPv3B+pRMPn7ogKEBR2CO052chcfHwdCJTjcJt +vmD6kjjc2VV3gwaFPk2vPzUS7+7+WOWwmsKa3fWNb4lZe2ztAw0oZH8fEe4k +/t5U8z1+PYUvV03d6CIuMzUOf4IUDqvfP/Xf86gXuQpvt1BoUVHy7zvi/evU +8r6bUyjp+FO1mXhV3m1TsR0UPhBX/fOKeFZdrFvTliLz8WdlCfFUkuz5NRwK +J/o38DKJJ0VVWIYHKDydfkI7kfjbee0q48MUmjTpd4QTj04YHt98jMJLPZwJ +L+Ih580i5u4Unpu6cY5D/KVtO211isLJ8pQAIB4w22dje4bCL6HsIQZxX4nT +FOcshSLizMb5xD2a7vGOIRQerBNT6SHz9f7OGaMjYRQWpVWOFxG/uxAZcvIa +hfZH/b66EL/h3VQ5HUdhktCs1HriZpeU6sDbZLzZRs8XE9daPFkafp/CwDkx +n/tkfVU9e5ET+YjCkWKVMHfiSu36XbFcCrOO8v+lT/xcojchuYjCBYs07hWT +9VwSOsROfU5heuyvFD/iwmnex/QKCgfWpVEGxLldi9QeN1B4fHFC8gNSH1xL +ydriFgojmJ6J+4kzS5XcytooXGSwVk6UOO1fvby6Xgr3LytIdiX1lXDCAfp4 +FI4NHn4jTOrx5oejff/7QaGTXdboI1K/161OhY7Mkfll6FwzI45aE143I8xE +AwcJjyBS/yE/c/aIKjLxiV1+agPJjyC3pz/+YjKxIV5bzI44sOdVkuwKJp6Y +thL+TPLGt6Lrk4ouE110Sh9Mkjw6cXmhp5EJE18+1sz8L7+O/haV2GjBRK5/ +6m134iMesgVbdzAxPttC6fMMDY422r+sOUx0D/b/3EDyb5fcvvBj7kxkiNy5 +HEzy0igj825cHBP5hyuHvUi+diln3Nlym4lL6pbpt4yRPIxLT568w8S2kjE3 +beIn59MSrdOZOJCgmv+J5LPu3ru3lj4l73MWpa0heb5y4fXoi71MTLSRf3Zy +gIZq/5ir+p+ZGG17+xBN9oMj49FR/YNMdA75zjfyiYbUrsgrGyeZuIgnwHbs +o0E5Nyz8jwAL01u/JmqR/WX5gYBgXw0W5ok+fnyinYbHrX5BKqtZ2GBu5xHR +RvpjfuZcqz4LCx766Dwg+1eMvk+gLrDwZv9MXWcrDSJLPM6M7mRhz5avgate +08BfdMjzyGkW+geMu7rW0PBN3NxxdzkLM3TlaoIKaWh3pZqPV7Hw0FO7cNMn +NJS9+gFB9SyMehAhLlpAQ7R/htLDdyxM0bt/+UYeDTp9S3pmB1lY3hSoEZ5N +g3tOk32ShApOPHQSXJhKw6CVrV3/YRX83Ppx5eFIGlrSNetmjqlgecgjgy+X +aSjmE1gv4qGCG3ckaB2PoOHSkwJZAz8VVNwv3O8SRsMKJenOsEgVXNYxP8T8 +PA0uo5171QtUkNrD9srypqH/iuNuL0FVrPec7/VtH2l/UIPSWaKK+s6V1633 +0jC9dXZkREwV5WKO8OeS89AivpjQY7KqOD/9WcMJG/L9fhX5jpqqyCmYVK7b +RsNZZ1UJKxtVNM0RuWIIZPyNh5vU76ii3he9mC5yHjMbO202YKCGg9ASV1fL +BfnViheFjNTQZKNE0olXXBj1qixX36CGvcb/rBIq58L1KTEjLws1VJxV6jco +4kL373StuQNqqOntJX7iARe8lryXkLmkhq4Dv+11LnAhYSV2b+tSw4o3H5uN +yXl12EnoVH7QCgwtEns5fCub/H9ILQgrX4nijs6KzpAF4g2qUfTYKvweqK3g ++T4D5MO5OwwMNPBWTr4iBx/BLXVDMQkXTWSGBJx1yXoItbIb9CeuaeFs/Ku4 +VqkHsE6+PFr7nTZGnEyVqeLch6V8Kd4HQ3Tw4paGFW5P/wXF80pG+1RX49u5 +dg/5BSkgrLK/wLpqNY5OWhZx7e6CFluGe9peF2291X0GS5PAq1u8wnzeGmQ/ +1eUTzE6AsYkrtma31mC1SYh3yMxN2Kr9KsFMUw8PXBWI8vK7Ac8n1v+cbtTD +z6fpKZHJGHDX0O187ayPz/o0RbSqo4E9erh1n7ABTqz4uToPI2ELS9pSJMUA +Nw2NHna6dQlWBEecKV+7Fl3lBZb4770Iq5wNS1U616JP6kNOmtYFcH5+9J/8 +k3/jBF9wg21kMJTebT38TdIQb/06yZsQDYTJh3PT2k8Mkff68fyp4tPgpJIh +nGC5DscHVjmwdb3h26pYg9zxdTinU9gg2e0Jhak/e3nh6zGk1vn5ywOuwNnM +xPWKRvjM2M0e3rmAnFtYkVaZEd7vrf108J4TSC5yzbHcw8bpl0bjqdscIXXT +Wf/xfWwMHp/ymzJ2BN2zUZti97OxVCSHz3q1I2wfp9+2H2RjQE7qnOpyR7j4 +jjfr5MpGIeNfg1fLDsBMStBG//NszKo2CXox7ACd62PfpGWwMTb23f8ibOzh +qE9qolk2G0/qDobdXGcPU9mPnYdpNro1rSgsYNiDONU+vbqAjYuubU/UGN8P +FkIK8s/K2Phlz5Z1vMj98LQ17fCbt2zcKxkkMV5vB+ZLCzV929l4qWXsrPJj +O2jfWjMl3cXGxFxW1aEkO5gsHgp3+MjGKR/ZWnl3O9C8p5P1dZCNCcZfHZ3F +7OBp5wbfKyNsTIkWjWbOcsD8LxvQHmdjk/+QyUQvB46E+bz25rHxw6Fo5ao8 +DkyWXUyQmmGjZXitZl0iB0J+3HQq/sHGRzcSb34M5YCYXrqG/W82alLmNoIe +HEh2K+bNzbFxo6bcbtjLgf8DPXdMUw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06652614985629686}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06652614985629686}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VdsbB/CKDJWIK/Nw9jmojAld5XjfJhmSIg1HpCQNpoQyFOmKFIlS +hMqVkuFsQzJUhDIPSZmKiH5lLo6hyW/d/c9+Ps9+9rP2Gt7vWptxyMPaecE8 +cs2fN++/+1R3TSXrcqqxkdXTgHMpYNyaLO23oT0Erq4ILm3iVwCUbDok3R4D +56rKYiL5NcF3x6M2vvYUONu/a+chfjYsG5WKmW3LhWX4gp/Fbwk9T7d7TLaV +w40xBd1DfPZgwhr88K2tBeQ/iL30necGs21rb4y39UG35anXHZOBULHpQerr +lAn4MbDAZ2QqEuR7ij4f0vgNNc1qE078cfCX64FHgpv4cEd7RD/f/USIWW1S +st1WCJP+nmHFF96Djls6Zd/ERHAlL/dITUYqXE4NalogswwzjoeWJsY9AKnr +ny7FJkngeKiWADAfQdguM+OWKUl8sUPprrVBJsjmN8oumL8cNxUvOJhmnAnZ +ErumVy9ejgtzC60nTTLhXYsDfU1pOTr+U1F5bk8msHZ6UztNiYffVlueyYRy +yzsCzfHLMVXe+8Kbwkz4bcJrbDCSQjn+G89P62fBKcN7B2pCpLGEx/9wVj4b +zO8unbS4Io1bA+K+OzCzgRIMDG+8IY30vl7+0pXZ0Ny6O+fNQ2mU65UL8jDI +Bi3PJXzdjdJ473Zl6TWrbPiSdjrtu6wMvperZnYFZ8P+v7aPyOXJ4Ap5X5ug +nmxYE1ByPvmpDDZuypswGsiGRX0rljNeyWBT4kZr3mA2FHH5QLVDBndWRprt +nsqG5RZF0TpzMviGuifXsYQLzedZelssZPHT7b4VfX9zYfPYD3/3T7IYYhYm +Mj+SC36m11e9GJZFVVnBtF/XuJB9T7NTYkoWF7v1aE7EcUF6l6NhkZAcJitG +LH59lwvDhS+n+bTkcN+1+3+s8rkQGxLtHX9GDlVz11VxOrnQJ6nqXikij+IS +15Wtl9Eg5VGqICUlj1aG4kPnJGjYVr234ZiyPKp+Bq10SRoK/C9riK6RxzUT +PMUpGRoiesYH9+2Vx9DuhZknKRp000tcxlLk8WBJfPiYLg3njXYelP1bAS3m +LJcIWtNg6pD8fe1GYub06cW7aFgaPHTBdpsCKra8HVmym4bEitC0aEcFPHv5 +94wAh4ZC8+IhgUsKWM+fEdN2kIbxvUzfiQ4FdBKa5hvypMHBhxdRH6CINdZ8 +V99foUHl5kb5wVBFNHu4LS8kiib9v5olGK2IY/3FX1WiafD/tbJ5Y6oiRoUY +RTnF0nDjgoNkUb0i+r0Kel4ST0P9tao79xWUcNhZiv/jfRrWZcfnnytVwpPi +f6J+lNCwua3x92i1EvbNzHA1n9GwfR7/1gMtSphytMfS4TkNTtbuHTCghC+W +lc4vLKPBJIARFLxQGYVR3sbyJQ2eSlP/blBXxkn+ti9zDTTw8qKrZ7WV0WWr ++vzFTeT7TNVHcvSUsfbR+G2JZhpCTzoaUMbKmPxmM0ehhYaEitrqBTuV0dnI +jV/iHQ2VLndGKnyVUaH9jFPYBxrMfhmKBwYo43bZz03Hu2lojG410AtWRvUL +PZUWPTR0FAkHp15Sxg2xy8wFemkYXewtHpqojEUfGurt+2mQpk3XmpQrIyd/ +r9jNQRqSNn+y+/NKGU3s3xnYDNFAdZwNLqhTxnqvK8NLhmnQXJBXo/pWGeNc +HAX9RmjYuEthv+AXZVSq/imgN06D68y34GoRBgaGu8bo88h4njyy/LM4AwN2 +rbZqIxYa7Mzgk2agr9dhA98pGu53VbwzphjY+Mb/YsY0Dd3Pb2g8NmBgzxlb +48lZGjLXLipvWc/AozPeB4J+kPGiz+0ZRwY6qHzkCv6kYXmKS4i6BQNV5iR7 +RX/RYBVq2H7vAAM/6F+N+/ObBsU/WW6lh0n7sXGbTv0h68OX4vtwjIFD2jzW +AHH40cVa0t4MPOhjEVY2R8Pu3qAKfT8GmkZECa+alwMszuRem3MM7M4vLY8m +LrP4cCEqnIFqHyLe287PgajKnTKZkQz8+5OPcT7xfvar7JoYBrYv/dYhuiAH +ZrW4HfxJDFSK2lD2nFhX/Lx2QA4DS3ol7X/y5cC8y7zKWwUM9Py6NXkTfw40 +8h3nFJQw8Im7h+Il4hM869BvLxmYnOTQvXhhDqxzr5IVrWNgV2OYkhmx0P/W +0xrNDJy7fCzlAnFqO6vLpZOBi1kMz3Fir53xnqE9DGR/tX9KCeQA1ooI/NvP +wGkRhqU18dJNIbfLvjLwfK4SM4j4Q8mUTvcoA3XviUI6cabeiVc/Jxg4bvng +XjOxf1aPncwsA5+9TbLgEZuq7vpm8IeBxn8esaUEc2D5neqLu/goNNcPO2NA +3C/FlvcSotAteuiXNXFudE7OVREKPeuv1bkSBwurbs0Sp3Bom97ABWKrkIT3 +tVIUVshFmd8iVvy51OuLPIWPv3B+pRMPn7ogKEBR2CO052chcfHwdCJTjcJt +vmD6kjjc2VV3gwaFPk2vPzUS7+7+WOWwmsKa3fWNb4lZe2ztAw0oZH8fEe4k +/t5U8z1+PYUvV03d6CIuMzUOf4IUDqvfP/Xf86gXuQpvt1BoUVHy7zvi/evU +8r6bUyjp+FO1mXhV3m1TsR0UPhBX/fOKeFZdrFvTliLz8WdlCfFUkuz5NRwK +J/o38DKJJ0VVWIYHKDydfkI7kfjbee0q48MUmjTpd4QTj04YHt98jMJLPZwJ +L+Ih580i5u4Unpu6cY5D/KVtO211isLJ8pQAIB4w22dje4bCL6HsIQZxX4nT +FOcshSLizMb5xD2a7vGOIRQerBNT6SHz9f7OGaMjYRQWpVWOFxG/uxAZcvIa +hfZH/b66EL/h3VQ5HUdhktCs1HriZpeU6sDbZLzZRs8XE9daPFkafp/CwDkx +n/tkfVU9e5ET+YjCkWKVMHfiSu36XbFcCrOO8v+lT/xcojchuYjCBYs07hWT +9VwSOsROfU5heuyvFD/iwmnex/QKCgfWpVEGxLldi9QeN1B4fHFC8gNSH1xL +ydriFgojmJ6J+4kzS5XcytooXGSwVk6UOO1fvby6Xgr3LytIdiX1lXDCAfp4 +FI4NHn4jTOrx5oejff/7QaGTXdboI1K/161OhY7Mkfll6FwzI45aE143I8xE +AwcJjyBS/yE/c/aIKjLxiV1+agPJjyC3pz/+YjKxIV5bzI44sOdVkuwKJp6Y +thL+TPLGt6Lrk4ouE110Sh9Mkjw6cXmhp5EJE18+1sz8L7+O/haV2GjBRK5/ +6m134iMesgVbdzAxPttC6fMMDY422r+sOUx0D/b/3EDyb5fcvvBj7kxkiNy5 +HEzy0igj825cHBP5hyuHvUi+diln3Nlym4lL6pbpt4yRPIxLT568w8S2kjE3 +beIn59MSrdOZOJCgmv+J5LPu3ru3lj4l73MWpa0heb5y4fXoi71MTLSRf3Zy +gIZq/5ir+p+ZGG17+xBN9oMj49FR/YNMdA75zjfyiYbUrsgrGyeZuIgnwHbs +o0E5Nyz8jwAL01u/JmqR/WX5gYBgXw0W5ok+fnyinYbHrX5BKqtZ2GBu5xHR +RvpjfuZcqz4LCx766Dwg+1eMvk+gLrDwZv9MXWcrDSJLPM6M7mRhz5avgate +08BfdMjzyGkW+geMu7rW0PBN3NxxdzkLM3TlaoIKaWh3pZqPV7Hw0FO7cNMn +NJS9+gFB9SyMehAhLlpAQ7R/htLDdyxM0bt/+UYeDTp9S3pmB1lY3hSoEZ5N +g3tOk32ShApOPHQSXJhKw6CVrV3/YRX83Ppx5eFIGlrSNetmjqlgecgjgy+X +aSjmE1gv4qGCG3ckaB2PoOHSkwJZAz8VVNwv3O8SRsMKJenOsEgVXNYxP8T8 +PA0uo5171QtUkNrD9srypqH/iuNuL0FVrPec7/VtH2l/UIPSWaKK+s6V1633 +0jC9dXZkREwV5WKO8OeS89AivpjQY7KqOD/9WcMJG/L9fhX5jpqqyCmYVK7b +RsNZZ1UJKxtVNM0RuWIIZPyNh5vU76ii3he9mC5yHjMbO202YKCGg9ASV1fL +BfnViheFjNTQZKNE0olXXBj1qixX36CGvcb/rBIq58L1KTEjLws1VJxV6jco +4kL373StuQNqqOntJX7iARe8lryXkLmkhq4Dv+11LnAhYSV2b+tSw4o3H5uN +yXl12EnoVH7QCgwtEns5fCub/H9ILQgrX4nijs6KzpAF4g2qUfTYKvweqK3g ++T4D5MO5OwwMNPBWTr4iBx/BLXVDMQkXTWSGBJx1yXoItbIb9CeuaeFs/Ku4 +VqkHsE6+PFr7nTZGnEyVqeLch6V8Kd4HQ3Tw4paGFW5P/wXF80pG+1RX49u5 +dg/5BSkgrLK/wLpqNY5OWhZx7e6CFluGe9peF2291X0GS5PAq1u8wnzeGmQ/ +1eUTzE6AsYkrtma31mC1SYh3yMxN2Kr9KsFMUw8PXBWI8vK7Ac8n1v+cbtTD +z6fpKZHJGHDX0O187ayPz/o0RbSqo4E9erh1n7ABTqz4uToPI2ELS9pSJMUA +Nw2NHna6dQlWBEecKV+7Fl3lBZb4770Iq5wNS1U616JP6kNOmtYFcH5+9J/8 +k3/jBF9wg21kMJTebT38TdIQb/06yZsQDYTJh3PT2k8Mkff68fyp4tPgpJIh +nGC5DscHVjmwdb3h26pYg9zxdTinU9gg2e0Jhak/e3nh6zGk1vn5ywOuwNnM +xPWKRvjM2M0e3rmAnFtYkVaZEd7vrf108J4TSC5yzbHcw8bpl0bjqdscIXXT +Wf/xfWwMHp/ymzJ2BN2zUZti97OxVCSHz3q1I2wfp9+2H2RjQE7qnOpyR7j4 +jjfr5MpGIeNfg1fLDsBMStBG//NszKo2CXox7ACd62PfpGWwMTb23f8ibOzh +qE9qolk2G0/qDobdXGcPU9mPnYdpNro1rSgsYNiDONU+vbqAjYuubU/UGN8P +FkIK8s/K2Phlz5Z1vMj98LQ17fCbt2zcKxkkMV5vB+ZLCzV929l4qWXsrPJj +O2jfWjMl3cXGxFxW1aEkO5gsHgp3+MjGKR/ZWnl3O9C8p5P1dZCNCcZfHZ3F +7OBp5wbfKyNsTIkWjWbOcsD8LxvQHmdjk/+QyUQvB46E+bz25rHxw6Fo5ao8 +DkyWXUyQmmGjZXitZl0iB0J+3HQq/sHGRzcSb34M5YCYXrqG/W82alLmNoIe +HEh2K+bNzbFxo6bcbtjLgf8DPXdMUw== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06652614985629686}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06652614985629686}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994355775011477*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"a6d53aa7-ad82-4346-916c-ad0a3191039d"] +}, Open ]], Cell[CellGroupData[{ @@ -10798,66 +12204,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[116]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], + "In[131]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 116, 57, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068365192`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.179272348236828`*^-159\\\", \ +RowBox[{\\\"505518991860510123640143147290826802026\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"71\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9512072804761600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 131, + 45, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.9943557750692577`*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], +In[131]:=",ExpressionUUID->"166c32cf-e5e3-43eb-bc05-51ac656caca4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 116, 58, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506846985*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.199389174443223`*^-162\\\", \ +RowBox[{\\\"164243120455479739170682508554789627978\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4724542670438400000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 131, + 46, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.994355775080703*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], +In[131]:=",ExpressionUUID->"b9462d51-3cd5-4d07-89ad-5e180d9c2c1c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 116, 59, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506856045*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.697022424859447`*^-165\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 131, + 47, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.9943557750913754`*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], +In[131]:=",ExpressionUUID->"597a6c65-4afb-477b-a96c-6ea17a79ffba"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 116, 60, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068640423`*^9}, +during this calculation.\"", 2, 131, 48, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.994355775101063*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], +In[131]:=",ExpressionUUID->"bc2b3301-5d41-426d-b8c4-0ed21ecd9b78"], -Cell[BoxData["11.275343508404701`"], "Output", - CellChangeTimes->{3.991326513010317*^9}, +Cell[BoxData["11.85994062502854`"], "Output", + CellChangeTimes->{3.991326513010317*^9, 3.9943558629789133`*^9}, CellLabel-> - "Out[116]=",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] + "Out[131]=",ExpressionUUID->"3311c8e8-0030-495d-bdc2-bfa7a99e525a"] }, Open ]], Cell[CellGroupData[{ @@ -10924,68 +12337,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998502248*^9, - 3.9917998584727135`*^9}},ExpressionUUID->"df92a918-12ed-ff47-a8a8-\ -122296a3d634"], + CellChangeTimes->{{3.9917998502248*^9, 3.9917998584727135`*^9}}, + CellLabel-> + "In[132]:=",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 117, 61, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130447063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4449685916555238`*^-221\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 132, + 49, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994355863036728*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], +In[132]:=",ExpressionUUID->"983cf18b-827a-470f-8a37-97042695734c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 62, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513053705*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.142611345509634`*^-227\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 132, + 50, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994355863048539*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], +In[132]:=",ExpressionUUID->"f9f586a1-42eb-4173-a0d3-e029d18439cb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 63, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130617065`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.834754835474156`*^-233\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 132, + 51, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994355863058961*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], +In[132]:=",ExpressionUUID->"9820a36e-4697-419d-a241-940136d54d46"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 117, 64, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513069849*^9}, +during this calculation.\"", 2, 132, 52, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994355863068717*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], +In[132]:=",ExpressionUUID->"4f9c2050-a297-478d-99f9-b4dfc20ca65f"], -Cell[BoxData["1.662840304462236`"], "Output", - CellChangeTimes->{3.9913265201819115`*^9}, +Cell[BoxData["0.11486806539606398`"], "Output", + CellChangeTimes->{3.9913265201819115`*^9, 3.994355874217362*^9}, CellLabel-> - "Out[117]=",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] + "Out[132]=",ExpressionUUID->"ee4f03fb-4e2c-4646-b5cd-ab2bc6e90dce"] }, Open ]], Cell[CellGroupData[{ @@ -11006,8 +12426,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11052,68 +12471,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998626681576`*^9, - 3.991799866004116*^9}},ExpressionUUID->"1990573a-00f1-b54c-9d39-\ -9c68738afe07"], + CellChangeTimes->{{3.9917998626681576`*^9, 3.991799866004116*^9}}, + CellLabel-> + "In[133]:=",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 118, 65, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520216116*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4449685916555238`*^-221\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 133, + 53, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.994355874278532*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], +In[133]:=",ExpressionUUID->"6c88ec89-6cec-4183-bb9b-0c8fd42cc3e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 66, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520226103*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.142611345509634`*^-227\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 133, + 54, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.994355874288903*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], +In[133]:=",ExpressionUUID->"dd179fb5-d728-4a3d-b7d4-9cb90a618c70"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 67, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265202341022`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.834754835474156`*^-233\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 133, + 55, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.9943558742998867`*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], +In[133]:=",ExpressionUUID->"ac5238f7-947d-4407-8eca-799347c2d6ce"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 118, 68, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520242243*^9}, +during this calculation.\"", 2, 133, 56, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.9943558743097067`*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], +In[133]:=",ExpressionUUID->"632471d2-8885-4206-9d60-5218c6095763"], -Cell[BoxData["8.698310175000124`"], "Output", - CellChangeTimes->{3.9913265264075394`*^9}, +Cell[BoxData["35.67665777877888`"], "Output", + CellChangeTimes->{3.9913265264075394`*^9, 3.994355884826516*^9}, CellLabel-> - "Out[118]=",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] + "Out[133]=",ExpressionUUID->"6f7b837d-4a11-4661-9dcd-1297f7d5ce81"] }, Open ]], Cell[CellGroupData[{ @@ -11134,8 +12560,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11180,68 +12605,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799871682028*^9, - 3.9917998792226925`*^9}},ExpressionUUID->"586f2005-dac7-8547-be11-\ -766f96e6af5d"], + CellChangeTimes->{{3.991799871682028*^9, 3.9917998792226925`*^9}}, + CellLabel-> + "In[134]:=",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 119, 69, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264435444`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4449685916555238`*^-221\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 134, + 57, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.994355884884267*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], +In[134]:=",ExpressionUUID->"31d96564-3b90-40b7-a7d1-d5372a3c4fa1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 70, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264535427`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.142611345509634`*^-227\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 134, + 58, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.9943558848939867`*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], +In[134]:=",ExpressionUUID->"202abb44-9b99-4890-aae5-e154e492d331"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 71, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264615555`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.834754835474156`*^-233\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 134, + 59, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.994355884902247*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], +In[134]:=",ExpressionUUID->"f79f4697-532f-4a0f-82d7-71e31d8a3f74"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 119, 72, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326526468542*^9}, +during this calculation.\"", 2, 134, 60, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.994355884912512*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], +In[134]:=",ExpressionUUID->"48cc4c36-77ab-434e-a0fb-be54d116b460"], -Cell[BoxData["16.721244215445346`"], "Output", - CellChangeTimes->{3.9913265299431496`*^9}, +Cell[BoxData["5.4422958151441785`"], "Output", + CellChangeTimes->{3.9913265299431496`*^9, 3.994355893815853*^9}, CellLabel-> - "Out[119]=",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] + "Out[134]=",ExpressionUUID->"81a5cd1e-1d9a-49da-b44c-ac64ce707f37"] }, Open ]], Cell[CellGroupData[{ @@ -11250,22 +12682,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9917998836260815`*^9, - 3.991799887334032*^9}},ExpressionUUID->"363f609f-6fd9-cc4c-924f-\ -14ef82ef0962"], - -Cell[BoxData["0.13787921511838797`"], "Output", - CellChangeTimes->{3.991326529975149*^9}, + CellChangeTimes->{{3.9917998836260815`*^9, 3.991799887334032*^9}}, CellLabel-> - "Out[120]=",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] + "In[135]:=",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], + +Cell[BoxData["0.0082435856287381`"], "Output", + CellChangeTimes->{3.991326529975149*^9, 3.994355893863947*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"e6628aca-7feb-4656-821b-d037af81ccb2"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991799895862177*^9, 3.9917998977747803`*^9}, - 3.991924340381132*^9},ExpressionUUID->"32c57f0b-017d-d340-92c6-\ -0f56a212e9c3"], + 3.991924340381132*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ @@ -11288,12 +12721,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[122]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], + "In[137]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913265300040226`*^9}, +Cell[BoxData["18.95695588438989`"], "Output", + CellChangeTimes->{3.9913265300040226`*^9, 3.994355893892453*^9}, CellLabel-> - "Out[122]=",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] + "Out[137]=",ExpressionUUID->"1aa2da8f-d15f-4dd2-a1c5-a7f194bb2350"] }, Open ]], Cell[CellGroupData[{ @@ -11303,12 +12736,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[124]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], + "In[138]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.991326530052025*^9}, +Cell[BoxData["1.4363384742386458`"], "Output", + CellChangeTimes->{3.991326530052025*^9, 3.994355893907057*^9}, CellLabel-> - "Out[124]=",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] + "Out[138]=",ExpressionUUID->"a322486d-5466-4427-8740-a1b73a8cd7dd"] }, Open ]], Cell[CellGroupData[{ @@ -11318,12 +12751,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[127]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], + "In[139]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913265300922585`*^9}, +Cell[BoxData["27.228605091193895`"], "Output", + CellChangeTimes->{3.9913265300922585`*^9, 3.994355893921774*^9}, CellLabel-> - "Out[127]=",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] + "Out[139]=",ExpressionUUID->"8b8334ec-7fb5-4400-9481-b78e8bbdb67d"] }, Open ]], Cell[CellGroupData[{ @@ -11513,12 +12946,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[128]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], + "In[140]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[BoxData["0.022635100966331548`"], "Output", - CellChangeTimes->{3.9913265301172295`*^9}, +Cell[BoxData["0.0058764655073311745`"], "Output", + CellChangeTimes->{3.9913265301172295`*^9, 3.994355893942885*^9}, CellLabel-> - "Out[128]=",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] + "Out[140]=",ExpressionUUID->"72abf856-f253-44ec-86ad-102887c70dcc"] }, Open ]], Cell[CellGroupData[{ @@ -11532,12 +12965,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[129]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], + "In[141]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[BoxData["5.890521190513567`"], "Output", - CellChangeTimes->{3.991326530210228*^9}, +Cell[BoxData["11.560772235200334`"], "Output", + CellChangeTimes->{3.991326530210228*^9, 3.994355894149603*^9}, CellLabel-> - "Out[129]=",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] + "Out[141]=",ExpressionUUID->"764aa348-7a5f-4263-80d1-4d84830da71e"] }, Open ]], Cell[CellGroupData[{ @@ -11729,12 +13162,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[130]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], + "In[142]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[BoxData["0.012260254107801566`"], "Output", - CellChangeTimes->{3.9913265302252293`*^9}, +Cell[BoxData["0.03414779439947139`"], "Output", + CellChangeTimes->{3.9913265302252293`*^9, 3.9943558941740017`*^9}, CellLabel-> - "Out[130]=",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] + "Out[142]=",ExpressionUUID->"ed2528bf-088d-4065-b270-d687bab0b475"] }, Open ]], Cell[CellGroupData[{ @@ -11748,12 +13181,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[131]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], + "In[143]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[BoxData["8.003781147223087`"], "Output", - CellChangeTimes->{3.9913265303172264`*^9}, +Cell[BoxData["4.795828141097991`"], "Output", + CellChangeTimes->{3.9913265303172264`*^9, 3.9943558943674297`*^9}, CellLabel-> - "Out[131]=",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] + "Out[143]=",ExpressionUUID->"ba2ec5c3-0d40-4b97-8635-439f6982c192"] }, Open ]], Cell[CellGroupData[{ @@ -11846,12 +13279,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[132]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], + "In[144]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913265303292294`*^9}, +Cell[BoxData["0.10708479897462729`"], "Output", + CellChangeTimes->{3.9913265303292294`*^9, 3.994355894385254*^9}, CellLabel-> - "Out[132]=",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] + "Out[144]=",ExpressionUUID->"88a97a2f-2bfc-4bd1-b82a-7f69530f1642"] }, Open ]], Cell[CellGroupData[{ @@ -11941,12 +13374,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[133]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], + "In[145]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991326530340416*^9}, +Cell[BoxData["0.8929152010253727`"], "Output", + CellChangeTimes->{3.991326530340416*^9, 3.994355894404152*^9}, CellLabel-> - "Out[133]=",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] + "Out[145]=",ExpressionUUID->"4f103bf6-6177-4986-9629-70b31ba0b78c"] }, Open ]], Cell[CellGroupData[{ @@ -12069,12 +13502,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[134]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], + "In[146]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991326530367384*^9}, +Cell[BoxData["0.09561764480319095`"], "Output", + CellChangeTimes->{3.991326530367384*^9, 3.994355894427003*^9}, CellLabel-> - "Out[134]=",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] + "Out[146]=",ExpressionUUID->"8fe4b504-4855-49d3-a640-bfe69f2f4e94"] }, Open ]], Cell[CellGroupData[{ @@ -12136,68 +13569,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799912745739*^9},ExpressionUUID->"c3883d3a-8a99-644a-9175-\ -a97b5c6c44f4"], + CellChangeTimes->{3.991799912745739*^9}, + CellLabel-> + "In[147]:=",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 135, 73, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265303923836`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.63092258254143`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 147, + 61, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994355894447592*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], +In[147]:=",ExpressionUUID->"78a3667e-1309-42c6-91e7-51f10075baaf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 135, 74, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304013824`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.962162887627517`*^-221\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 147, + 62, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.9943558944598827`*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], +In[147]:=",ExpressionUUID->"d9482761-f93c-450c-9d04-afb6b3460db5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 135, - 75, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304095325`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.972042486426643`*^-226\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 147, + 63, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994355894470909*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], +In[147]:=",ExpressionUUID->"a99c01c9-f009-4e0f-98f8-f60fce51386e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 135, 76, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304175396`*^9}, +during this calculation.\"", 2, 147, 64, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.9943558944835463`*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], +In[147]:=",ExpressionUUID->"1eeee96b-10dc-47d0-95f2-fb8bd112a196"], -Cell[BoxData["5.890521190513565`"], "Output", - CellChangeTimes->{3.9913265339749985`*^9}, +Cell[BoxData["11.560772235200332`"], "Output", + CellChangeTimes->{3.9913265339749985`*^9, 3.9943559030531178`*^9}, CellLabel-> - "Out[135]=",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] + "Out[147]=",ExpressionUUID->"34a6330c-7718-4e0a-ad24-4ae25b86c98b"] }, Open ]], Cell[CellGroupData[{ @@ -12259,68 +13699,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917999175346184`*^9},ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-\ -bed1f30b804b"], + CellChangeTimes->{3.9917999175346184`*^9}, + CellLabel-> + "In[148]:=",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 136, 77, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340092525`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.63092258254143`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 148, + 65, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994355903106207*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], +In[148]:=",ExpressionUUID->"0f4bcdd4-8402-499b-82c8-c5f63cba30b8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 136, 78, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340202503`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.962162887627517`*^-221\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 148, + 66, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994355903116613*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], +In[148]:=",ExpressionUUID->"732bc9db-cb06-4236-9063-6569a333f246"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 136, - 79, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340282536`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.972042486426643`*^-226\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 148, + 67, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994355903126317*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], +In[148]:=",ExpressionUUID->"1abab593-796a-4ec9-976d-419abae1c04b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 136, 80, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340354958`*^9}, +during this calculation.\"", 2, 148, 68, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.99435590313734*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], +In[148]:=",ExpressionUUID->"fcf13d14-0afd-4496-9b71-71249a0b4c44"], -Cell[BoxData["8.00378114722308`"], "Output", - CellChangeTimes->{3.9913265375649567`*^9}, +Cell[BoxData["4.795828141097992`"], "Output", + CellChangeTimes->{3.9913265375649567`*^9, 3.994355911638302*^9}, CellLabel-> - "Out[136]=",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] + "Out[148]=",ExpressionUUID->"e72c2140-f94a-4ffd-88d3-9dbbe69babd9"] }, Open ]], Cell[CellGroupData[{ @@ -12378,92 +13825,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917999220519733`*^9},ExpressionUUID->"d5c5d0e8-862b-f245-8b21-\ -eac61b5b75d3"], + CellChangeTimes->{3.9917999220519733`*^9}, + CellLabel-> + "In[149]:=",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VdsbB3CZkqFEKJKZKKVjyJT1mnIJGUOGOPbe5GYIScYmadARqdxS +uqVChowJ1y+Xug1u3KhISqacc8ybTJXf8sd+9vN51t7f533X3u9SYoa7kLw8 +PDzD+Fq+H36zTeNx2xuzc1oL/t+D2MhsLE+faVWENLnfU5fdm2uQpWpVj+ZO +c34s24n4V1BU9xlKn+343yx2WWxyk4BVC0qwqG6bwz73fP3T5ML/kCzJ2r6A +/aTt8K0fjHfIzc/30yI25+OrhGN1nWiztsqHn9iygyre3y0/IY22Lwo8wWy0 +ZzzBKKrlC+q3vlzNi93wgyMSW/gVxaXtuiGA/f6ETHx1WD+SvvP5XyHsMUEr +zjRjECWejnEUxRZMi/DSnR1CnjsE5MWxN629+eJw3TASv3/eaB22o9z3+2OW +I+jv7mM+8tjUbWVpbaExdONqP1MZO1ltb8rvLeNoWtTqsQZ2p0zHjujCSZQq +z7bVxSb2hxy8nDaF2KXaZ42wJ3J4/iwPo9GWseB1gC2krC0+yZhBLj5N0o7Y +WUSTjbjUd5R/si/NHVvxgVfy9tnvaNx8zskX23DrmbHQujnUeGRlUyh2sMGX +Fo7lD7ReotIxE3s69gi/sPpP5OqfqpeDfbxOxFRT6BcKk3EOvo+dDYYPg1qW +EJH3z5O65fruvbCKLFwBfCHAz8EufH6594QcL6TseO71fbneb34JGWm8wFK1 ++Ml7kI0StGYqHoXxQVzIxm3y2FmlSirjDAGYj/Ha6Y79sW2k4dddAQi4mf4j +EFtx6vH+1VKCsDuvbk0UdpGeY6b2rCAc05pRyMRufhK34lCdEPQNj3xrx55p +av8ybCkKjryDUlQIG0nYi4rHN4iCYPQiEY+t02EFYkZikJRdtiYDO2Sg6vaO +batBqOLH0b+wI3hbdHaJioO1tmiW7O9sNKhcMpnyfS3YbV6aH8Sepl6tatWV +gPB3K/lWHGIj3odDSusPS8DwTEnQRmxFXQWXQq4EWBl0Wrph77e8VP6mVxJS +1LNsXmC3BkZGybyWAnfrnITGUDb6/IB1wV9IGiQ7j6M+7BFu4d0Ca2kwduD1 +4wtjI+Ho/naTp9JQGdZdvBvb6rSbnn+VDNwO7c/+D7s2z2AmP3cD7N6hkzMX +zkZ5gwsxxtHycNesa9+FSDb6zT31c1SxPNxW25VTiT3SLLm7eEgexicTdnzG +1svbKqXotQkmatP3MKLwfjL9KgTMFGAq6deuz9hT471Hh08pwrkD/XLWR9hI +MtSqssJBGTz8W2sdY9loKE842ClEGYrDDy2ewK751CY3ekYZPrX3XqjC9rH3 +PaX+VBlKaccc+WO4vi0xLn8wVODNmEn8JLYe58FEkowqKBcwduTHs5FbkIi2 +3Vc1kBV3SnBOZiMU487w+KkGv9jo1EVsrZTcncQGdXCL/vb+JTbPXV2LJGd1 +WNvuQ1geZ6Piz94e5Y3qYKrXLWN8As/nvqITsnc04JPxfK/+KVyflcN7DlMT +ug12LVCpbHTX9Vr3bJImSPDVXyvCZjG/9vLf0ISMbO6JKWzi+BHupnZNCNL0 +MU0+y0Zr62/yuFpqQYlEgm3OOfz/6I5p1alsgSX95OaBC2wkp5yefGFgK5i1 +NZiUXmKj+vPTmvO82mBr/26zQAbeD9qrg1LSBolChQhv7FvNqpoWftrATHMU +W5XJRspBtW/nPmjDkJPwyeDLuN+iQTXq9TZgjd9xM7zKRvJymyhFLx0onEu6 +IZfDRlvvRYsuIgbUaL+9OpHPRkzi1Iy2IwMYHWX/uhfgeVXJ/OzvwwDTB0Ku +ddh8d0ofPY9lAFNQ1ja1EM/bLY5bZhkDuCMNfcpF+DzN9r+pqaILZQEFr4NL +8fe9YL/NU1APphtvRWyvZqM/I1Wdqlr0QXzyMftBMxu1xaCdp+8ZgdNGIQvD +YTZS8nvn6HtoF1wyan9ZLc5B5FJ1ifwxAPOqrJ4oEw6S4daslGFaQDphZK8T +zkHRuqafMrWs4E6Znl9KHgcxR3+8kORYg5y/d3VCDwcVW0StzG21gUfqwqxE +RS7Kmw5pLMqyBT4LHuGOQC6aM1//b3PyHjiydRvxq4yLenj4Jr8GOEBYs/5k +D98ICtsYfumEyl4Y9Ix3rXQbQSUHXzy9kuIEJjU9McplIyiO3jC75aAzWCnM +dtaIjKIZu937/jngAtEmzLrAyFFk5J1hPujsCpNRb6ZSukfR2w03Q5p13eBj +rM9WM/MxJHv/VH3+ZneQ8TxG6FeMoZpeLXtHsX1w1qT6W7PiONrUMREUM7oP +NL34ev5jjSPdKxlFd3s9oMuuapDJP4Fu8tPbMps8gV39t4yd2QSqNt/+MeWJ +F/wQlEnuS5xA2TvPr/1RuB/W87HUBuonUGv3vTO6ad6gwa1f8212AlU55KhG +HPeByKryqa6dk2gy1JUnjPCFDCLDjxE1iWZ2awaPWfrBq5X7oaFoEuWPds1F +GRyAlYKJVxQ5k8jzz3uBvqL+MCmz8+0a5SlUUb7nAF+qPzg8r8354DOFjOTe +zp+b94eGxUmvmxlTSKU36ON/BwPgRk/jPH/TFBoQ+X1vTn8A8AapNd6YmUJt +LMdAG3cm5Fxqd72vRKOs2FyRI21MKIObzqkONKpvWJoPtA0Egw6DJY9oGq3x +gVTd2kB4svgxITyLRorr/mndWB8InunlJyexdVoc1gs2BAJrqMEw6gqNXEy9 +CzobA+GZqUbVkas4f2PM68SXgZDsJTEak00j2Z6Ha150BsJlQ9ffQnJopOon +k+0zGwjlSpXq6/JoZOQ/lp+iR8DE+YDYiHIa3f9jIsrRgICCrdcq32Ova58y +kzEk4EmRxQPTChqNWc925JsQYOTUXLqyksbnF8+KFgsCDnjQe65X0Wj17Fov +CWcCmgo17pXV0Gjgov6q3FACir35kvIbaMSqSzhYc5+A3FkOT+VLGoUyrhnF +5hPgO8xtE3hFI/uCslWGhQRs9zP08MAWvjZU8LiYADv67Jl57JRIJ051JQGD +cZ/DjFtolKCp+nvV3wRs61T3LXlDo5Brrw+VfyZARORwsF87jWxXD5lG9hLw +4MDL0fvYm1N4xBh9BDgWamwexx6K1C8uGyRAq7+1LqmDRgGOuaOPRgi4DM98 +r7+jkadAVFjpAgH+nVKnmz7QyCZKNqJImoRHxAfZnm4a/Z17xi5zPQkNg16p +Sp9oZNoypRorS4LIYZvrJLaO2usuy00keP8yrBjB3vAh3rJbjYQD7o6PvvfQ +iGvcIy2sT0Lp0x1v5r/QKJ339l9BriQsmGi51vfj/reLZju4kwAyQcdmsE97 +x0bqepCQ3NdutW2ARrGVThpL+0n4lLLh9S3sAGpFxlUmCVStb1b8II10XzGJ +Z4dJkP3fLgnVbzT6kKEmonKJBAOx3hM6HBqVILHg4QxcX1bDDm/s06PTzcWX +Sbi8qSAjBZth25xkeI0EW/b5gC5sFk/glMMtEiKjeyGRS6Pd4be7YotI8OWb +mKsaoZG8/FkDsxISeljs+93Y06/CL/M9IqG58Sr/ilEa3VFHDqwKEhJTZt/Y +Yf/s6Xl6t5YEvadWuR+xK+3l8t+8IOHIRJMmd4xGFxZ4BbJekVD4Lq9NZJxG +zHxOgFcLCUuLXPWt2OL8tXIDrSQ46N34+jv2oTrP9Pn3JCR08qZ/w1bRuhqj +OkiCcJjN89YJGi18SGxnD5HgJZQWwMVuSyF1SodJeH1u+qHgJI2SvupxjEZI +cNZRdjTF/pjd7ruXJsH419l/7mJnrlxrHbeCAvXnERcCp/D8TvV4R/NREBxl +U5aA/a2nMDJMgIJXY1KRV7BNK61uM1dR8MzmXPMz7CH/2EW7tRSIr99XpETj ++u2tJawlKRhyPlqwE9tkp4QmkqJg5eoIcwfsS2JF+3Q3ULCC0WV+dHm99kuZ +nBIFBYtqp59jU/eKXkipUHDy9i2PruXnLx37skaNgpH3b59xsYcoSTF+TQoe +7gmIXDON1yVtgkd0KNgX1ijigl37SzJ5iEHBW7PGygDsQXbvlV49CrrEyLkI +bOOncU0dhhTYa7H2srAHDpVs+gso6GhW3NWMvdozXv+xBQVyRxdq27CNLH+z +L7Oi4OU00f4Jm7Wh79i93yioFBhop7Fr+Esv5dpREHRruu4Xdv94/IM/7CmI +E2OZrZqhkeFzqXcXnSi4Y+wmKY/NLOvjprrg/s4nkurYF3NKeU+6UeDWsdll +O3ZfpK1OjCcFocZLCwhbzE/aJmI/BV+iNR7bLOfZ9vuG+FCQO/habO/y+wqJ +F/z8KUgKOn3eB7tG2O6OJ5MCM5Wrj5jLeTPST1wICs6HKBwOXs772t9qT1Fw +20yhJXQ5r+XR0O5gCszLsxojl+t7nPgTQnC/7CTno8v5d+zWmRyiQEOuJz5+ +Of+izBb9MApaL5ZA8nJ+7ID59ggK3l+fyj2JLUqUeWpGUvChKP+PFOyde5PC +VaIpEII27bPL+cZ7zsjHULClL9jnPHaa2vqbMrEUXGdEqqVhV4sPVqyNo8C0 +j3v2IvbXxbJXIgkUZFS8O8Nazv+W9FUgiYIHcdsV0rEN3u6ZW0qmQFl+3nnZ +/we6JyEx "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12477,104 +13926,106 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV1Hk4VdsbB3CZkqFEKJKZKKVjyJT1mnIJGUOGOPbe5GYIScYmadARqdxS +uqVChowJ1y+Xug1u3KhISqacc8ybTJXf8sd+9vN51t7f533X3u9SYoa7kLw8 +PDzD+Fq+H36zTeNx2xuzc1oL/t+D2MhsLE+faVWENLnfU5fdm2uQpWpVj+ZO +c34s24n4V1BU9xlKn+343yx2WWxyk4BVC0qwqG6bwz73fP3T5ML/kCzJ2r6A +/aTt8K0fjHfIzc/30yI25+OrhGN1nWiztsqHn9iygyre3y0/IY22Lwo8wWy0 +ZzzBKKrlC+q3vlzNi93wgyMSW/gVxaXtuiGA/f6ETHx1WD+SvvP5XyHsMUEr +zjRjECWejnEUxRZMi/DSnR1CnjsE5MWxN629+eJw3TASv3/eaB22o9z3+2OW +I+jv7mM+8tjUbWVpbaExdONqP1MZO1ltb8rvLeNoWtTqsQZ2p0zHjujCSZQq +z7bVxSb2hxy8nDaF2KXaZ42wJ3J4/iwPo9GWseB1gC2krC0+yZhBLj5N0o7Y +WUSTjbjUd5R/si/NHVvxgVfy9tnvaNx8zskX23DrmbHQujnUeGRlUyh2sMGX +Fo7lD7ReotIxE3s69gi/sPpP5OqfqpeDfbxOxFRT6BcKk3EOvo+dDYYPg1qW +EJH3z5O65fruvbCKLFwBfCHAz8EufH6594QcL6TseO71fbneb34JGWm8wFK1 ++Ml7kI0StGYqHoXxQVzIxm3y2FmlSirjDAGYj/Ha6Y79sW2k4dddAQi4mf4j +EFtx6vH+1VKCsDuvbk0UdpGeY6b2rCAc05pRyMRufhK34lCdEPQNj3xrx55p +av8ybCkKjryDUlQIG0nYi4rHN4iCYPQiEY+t02EFYkZikJRdtiYDO2Sg6vaO +batBqOLH0b+wI3hbdHaJioO1tmiW7O9sNKhcMpnyfS3YbV6aH8Sepl6tatWV +gPB3K/lWHGIj3odDSusPS8DwTEnQRmxFXQWXQq4EWBl0Wrph77e8VP6mVxJS +1LNsXmC3BkZGybyWAnfrnITGUDb6/IB1wV9IGiQ7j6M+7BFu4d0Ca2kwduD1 +4wtjI+Ho/naTp9JQGdZdvBvb6rSbnn+VDNwO7c/+D7s2z2AmP3cD7N6hkzMX +zkZ5gwsxxtHycNesa9+FSDb6zT31c1SxPNxW25VTiT3SLLm7eEgexicTdnzG +1svbKqXotQkmatP3MKLwfjL9KgTMFGAq6deuz9hT471Hh08pwrkD/XLWR9hI +MtSqssJBGTz8W2sdY9loKE842ClEGYrDDy2ewK751CY3ekYZPrX3XqjC9rH3 +PaX+VBlKaccc+WO4vi0xLn8wVODNmEn8JLYe58FEkowqKBcwduTHs5FbkIi2 +3Vc1kBV3SnBOZiMU487w+KkGv9jo1EVsrZTcncQGdXCL/vb+JTbPXV2LJGd1 +WNvuQ1geZ6Piz94e5Y3qYKrXLWN8As/nvqITsnc04JPxfK/+KVyflcN7DlMT +ug12LVCpbHTX9Vr3bJImSPDVXyvCZjG/9vLf0ISMbO6JKWzi+BHupnZNCNL0 +MU0+y0Zr62/yuFpqQYlEgm3OOfz/6I5p1alsgSX95OaBC2wkp5yefGFgK5i1 +NZiUXmKj+vPTmvO82mBr/26zQAbeD9qrg1LSBolChQhv7FvNqpoWftrATHMU +W5XJRspBtW/nPmjDkJPwyeDLuN+iQTXq9TZgjd9xM7zKRvJymyhFLx0onEu6 +IZfDRlvvRYsuIgbUaL+9OpHPRkzi1Iy2IwMYHWX/uhfgeVXJ/OzvwwDTB0Ku +ddh8d0ofPY9lAFNQ1ja1EM/bLY5bZhkDuCMNfcpF+DzN9r+pqaILZQEFr4NL +8fe9YL/NU1APphtvRWyvZqM/I1Wdqlr0QXzyMftBMxu1xaCdp+8ZgdNGIQvD +YTZS8nvn6HtoF1wyan9ZLc5B5FJ1ifwxAPOqrJ4oEw6S4daslGFaQDphZK8T +zkHRuqafMrWs4E6Znl9KHgcxR3+8kORYg5y/d3VCDwcVW0StzG21gUfqwqxE +RS7Kmw5pLMqyBT4LHuGOQC6aM1//b3PyHjiydRvxq4yLenj4Jr8GOEBYs/5k +D98ICtsYfumEyl4Y9Ix3rXQbQSUHXzy9kuIEJjU9McplIyiO3jC75aAzWCnM +dtaIjKIZu937/jngAtEmzLrAyFFk5J1hPujsCpNRb6ZSukfR2w03Q5p13eBj +rM9WM/MxJHv/VH3+ZneQ8TxG6FeMoZpeLXtHsX1w1qT6W7PiONrUMREUM7oP +NL34ev5jjSPdKxlFd3s9oMuuapDJP4Fu8tPbMps8gV39t4yd2QSqNt/+MeWJ +F/wQlEnuS5xA2TvPr/1RuB/W87HUBuonUGv3vTO6ad6gwa1f8212AlU55KhG +HPeByKryqa6dk2gy1JUnjPCFDCLDjxE1iWZ2awaPWfrBq5X7oaFoEuWPds1F +GRyAlYKJVxQ5k8jzz3uBvqL+MCmz8+0a5SlUUb7nAF+qPzg8r8354DOFjOTe +zp+b94eGxUmvmxlTSKU36ON/BwPgRk/jPH/TFBoQ+X1vTn8A8AapNd6YmUJt +LMdAG3cm5Fxqd72vRKOs2FyRI21MKIObzqkONKpvWJoPtA0Egw6DJY9oGq3x +gVTd2kB4svgxITyLRorr/mndWB8InunlJyexdVoc1gs2BAJrqMEw6gqNXEy9 +CzobA+GZqUbVkas4f2PM68SXgZDsJTEak00j2Z6Ha150BsJlQ9ffQnJopOon +k+0zGwjlSpXq6/JoZOQ/lp+iR8DE+YDYiHIa3f9jIsrRgICCrdcq32Ova58y +kzEk4EmRxQPTChqNWc925JsQYOTUXLqyksbnF8+KFgsCDnjQe65X0Wj17Fov +CWcCmgo17pXV0Gjgov6q3FACir35kvIbaMSqSzhYc5+A3FkOT+VLGoUyrhnF +5hPgO8xtE3hFI/uCslWGhQRs9zP08MAWvjZU8LiYADv67Jl57JRIJ051JQGD +cZ/DjFtolKCp+nvV3wRs61T3LXlDo5Brrw+VfyZARORwsF87jWxXD5lG9hLw +4MDL0fvYm1N4xBh9BDgWamwexx6K1C8uGyRAq7+1LqmDRgGOuaOPRgi4DM98 +r7+jkadAVFjpAgH+nVKnmz7QyCZKNqJImoRHxAfZnm4a/Z17xi5zPQkNg16p +Sp9oZNoypRorS4LIYZvrJLaO2usuy00keP8yrBjB3vAh3rJbjYQD7o6PvvfQ +iGvcIy2sT0Lp0x1v5r/QKJ339l9BriQsmGi51vfj/reLZju4kwAyQcdmsE97 +x0bqepCQ3NdutW2ARrGVThpL+0n4lLLh9S3sAGpFxlUmCVStb1b8II10XzGJ +Z4dJkP3fLgnVbzT6kKEmonKJBAOx3hM6HBqVILHg4QxcX1bDDm/s06PTzcWX +Sbi8qSAjBZth25xkeI0EW/b5gC5sFk/glMMtEiKjeyGRS6Pd4be7YotI8OWb +mKsaoZG8/FkDsxISeljs+93Y06/CL/M9IqG58Sr/ilEa3VFHDqwKEhJTZt/Y +Yf/s6Xl6t5YEvadWuR+xK+3l8t+8IOHIRJMmd4xGFxZ4BbJekVD4Lq9NZJxG +zHxOgFcLCUuLXPWt2OL8tXIDrSQ46N34+jv2oTrP9Pn3JCR08qZ/w1bRuhqj +OkiCcJjN89YJGi18SGxnD5HgJZQWwMVuSyF1SodJeH1u+qHgJI2SvupxjEZI +cNZRdjTF/pjd7ruXJsH419l/7mJnrlxrHbeCAvXnERcCp/D8TvV4R/NREBxl +U5aA/a2nMDJMgIJXY1KRV7BNK61uM1dR8MzmXPMz7CH/2EW7tRSIr99XpETj ++u2tJawlKRhyPlqwE9tkp4QmkqJg5eoIcwfsS2JF+3Q3ULCC0WV+dHm99kuZ +nBIFBYtqp59jU/eKXkipUHDy9i2PruXnLx37skaNgpH3b59xsYcoSTF+TQoe +7gmIXDON1yVtgkd0KNgX1ijigl37SzJ5iEHBW7PGygDsQXbvlV49CrrEyLkI +bOOncU0dhhTYa7H2srAHDpVs+gso6GhW3NWMvdozXv+xBQVyRxdq27CNLH+z +L7Oi4OU00f4Jm7Wh79i93yioFBhop7Fr+Esv5dpREHRruu4Xdv94/IM/7CmI +E2OZrZqhkeFzqXcXnSi4Y+wmKY/NLOvjprrg/s4nkurYF3NKeU+6UeDWsdll +O3ZfpK1OjCcFocZLCwhbzE/aJmI/BV+iNR7bLOfZ9vuG+FCQO/habO/y+wqJ +F/z8KUgKOn3eB7tG2O6OJ5MCM5Wrj5jLeTPST1wICs6HKBwOXs772t9qT1Fw +20yhJXQ5r+XR0O5gCszLsxojl+t7nPgTQnC/7CTno8v5d+zWmRyiQEOuJz5+ +Of+izBb9MApaL5ZA8nJ+7ID59ggK3l+fyj2JLUqUeWpGUvChKP+PFOyde5PC +VaIpEII27bPL+cZ7zsjHULClL9jnPHaa2vqbMrEUXGdEqqVhV4sPVqyNo8C0 +j3v2IvbXxbJXIgkUZFS8O8Nazv+W9FUgiYIHcdsV0rEN3u6ZW0qmQFl+3nnZ +/we6JyEx "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7939407247625506, + 1.2474511339258432`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7939407247625524}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12586,21 +14037,21 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7939407247625506, + 1.2474511339258432`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7939407247625524}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12614,102 +14065,104 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV1Hk4VdsbB3CZkqFEKJKZKKVjyJT1mnIJGUOGOPbe5GYIScYmadARqdxS +uqVChowJ1y+Xug1u3KhISqacc8ybTJXf8sd+9vN51t7f533X3u9SYoa7kLw8 +PDzD+Fq+H36zTeNx2xuzc1oL/t+D2MhsLE+faVWENLnfU5fdm2uQpWpVj+ZO +c34s24n4V1BU9xlKn+343yx2WWxyk4BVC0qwqG6bwz73fP3T5ML/kCzJ2r6A +/aTt8K0fjHfIzc/30yI25+OrhGN1nWiztsqHn9iygyre3y0/IY22Lwo8wWy0 +ZzzBKKrlC+q3vlzNi93wgyMSW/gVxaXtuiGA/f6ETHx1WD+SvvP5XyHsMUEr +zjRjECWejnEUxRZMi/DSnR1CnjsE5MWxN629+eJw3TASv3/eaB22o9z3+2OW +I+jv7mM+8tjUbWVpbaExdONqP1MZO1ltb8rvLeNoWtTqsQZ2p0zHjujCSZQq +z7bVxSb2hxy8nDaF2KXaZ42wJ3J4/iwPo9GWseB1gC2krC0+yZhBLj5N0o7Y +WUSTjbjUd5R/si/NHVvxgVfy9tnvaNx8zskX23DrmbHQujnUeGRlUyh2sMGX +Fo7lD7ReotIxE3s69gi/sPpP5OqfqpeDfbxOxFRT6BcKk3EOvo+dDYYPg1qW +EJH3z5O65fruvbCKLFwBfCHAz8EufH6594QcL6TseO71fbneb34JGWm8wFK1 ++Ml7kI0StGYqHoXxQVzIxm3y2FmlSirjDAGYj/Ha6Y79sW2k4dddAQi4mf4j +EFtx6vH+1VKCsDuvbk0UdpGeY6b2rCAc05pRyMRufhK34lCdEPQNj3xrx55p +av8ybCkKjryDUlQIG0nYi4rHN4iCYPQiEY+t02EFYkZikJRdtiYDO2Sg6vaO +batBqOLH0b+wI3hbdHaJioO1tmiW7O9sNKhcMpnyfS3YbV6aH8Sepl6tatWV +gPB3K/lWHGIj3odDSusPS8DwTEnQRmxFXQWXQq4EWBl0Wrph77e8VP6mVxJS +1LNsXmC3BkZGybyWAnfrnITGUDb6/IB1wV9IGiQ7j6M+7BFu4d0Ca2kwduD1 +4wtjI+Ho/naTp9JQGdZdvBvb6rSbnn+VDNwO7c/+D7s2z2AmP3cD7N6hkzMX +zkZ5gwsxxtHycNesa9+FSDb6zT31c1SxPNxW25VTiT3SLLm7eEgexicTdnzG +1svbKqXotQkmatP3MKLwfjL9KgTMFGAq6deuz9hT471Hh08pwrkD/XLWR9hI +MtSqssJBGTz8W2sdY9loKE842ClEGYrDDy2ewK751CY3ekYZPrX3XqjC9rH3 +PaX+VBlKaccc+WO4vi0xLn8wVODNmEn8JLYe58FEkowqKBcwduTHs5FbkIi2 +3Vc1kBV3SnBOZiMU487w+KkGv9jo1EVsrZTcncQGdXCL/vb+JTbPXV2LJGd1 +WNvuQ1geZ6Piz94e5Y3qYKrXLWN8As/nvqITsnc04JPxfK/+KVyflcN7DlMT +ug12LVCpbHTX9Vr3bJImSPDVXyvCZjG/9vLf0ISMbO6JKWzi+BHupnZNCNL0 +MU0+y0Zr62/yuFpqQYlEgm3OOfz/6I5p1alsgSX95OaBC2wkp5yefGFgK5i1 +NZiUXmKj+vPTmvO82mBr/26zQAbeD9qrg1LSBolChQhv7FvNqpoWftrATHMU +W5XJRspBtW/nPmjDkJPwyeDLuN+iQTXq9TZgjd9xM7zKRvJymyhFLx0onEu6 +IZfDRlvvRYsuIgbUaL+9OpHPRkzi1Iy2IwMYHWX/uhfgeVXJ/OzvwwDTB0Ku +ddh8d0ofPY9lAFNQ1ja1EM/bLY5bZhkDuCMNfcpF+DzN9r+pqaILZQEFr4NL +8fe9YL/NU1APphtvRWyvZqM/I1Wdqlr0QXzyMftBMxu1xaCdp+8ZgdNGIQvD +YTZS8nvn6HtoF1wyan9ZLc5B5FJ1ifwxAPOqrJ4oEw6S4daslGFaQDphZK8T +zkHRuqafMrWs4E6Znl9KHgcxR3+8kORYg5y/d3VCDwcVW0StzG21gUfqwqxE +RS7Kmw5pLMqyBT4LHuGOQC6aM1//b3PyHjiydRvxq4yLenj4Jr8GOEBYs/5k +D98ICtsYfumEyl4Y9Ix3rXQbQSUHXzy9kuIEJjU9McplIyiO3jC75aAzWCnM +dtaIjKIZu937/jngAtEmzLrAyFFk5J1hPujsCpNRb6ZSukfR2w03Q5p13eBj +rM9WM/MxJHv/VH3+ZneQ8TxG6FeMoZpeLXtHsX1w1qT6W7PiONrUMREUM7oP +NL34ev5jjSPdKxlFd3s9oMuuapDJP4Fu8tPbMps8gV39t4yd2QSqNt/+MeWJ +F/wQlEnuS5xA2TvPr/1RuB/W87HUBuonUGv3vTO6ad6gwa1f8212AlU55KhG +HPeByKryqa6dk2gy1JUnjPCFDCLDjxE1iWZ2awaPWfrBq5X7oaFoEuWPds1F +GRyAlYKJVxQ5k8jzz3uBvqL+MCmz8+0a5SlUUb7nAF+qPzg8r8354DOFjOTe +zp+b94eGxUmvmxlTSKU36ON/BwPgRk/jPH/TFBoQ+X1vTn8A8AapNd6YmUJt +LMdAG3cm5Fxqd72vRKOs2FyRI21MKIObzqkONKpvWJoPtA0Egw6DJY9oGq3x +gVTd2kB4svgxITyLRorr/mndWB8InunlJyexdVoc1gs2BAJrqMEw6gqNXEy9 +CzobA+GZqUbVkas4f2PM68SXgZDsJTEak00j2Z6Ha150BsJlQ9ffQnJopOon +k+0zGwjlSpXq6/JoZOQ/lp+iR8DE+YDYiHIa3f9jIsrRgICCrdcq32Ova58y +kzEk4EmRxQPTChqNWc925JsQYOTUXLqyksbnF8+KFgsCDnjQe65X0Wj17Fov +CWcCmgo17pXV0Gjgov6q3FACir35kvIbaMSqSzhYc5+A3FkOT+VLGoUyrhnF +5hPgO8xtE3hFI/uCslWGhQRs9zP08MAWvjZU8LiYADv67Jl57JRIJ051JQGD +cZ/DjFtolKCp+nvV3wRs61T3LXlDo5Brrw+VfyZARORwsF87jWxXD5lG9hLw +4MDL0fvYm1N4xBh9BDgWamwexx6K1C8uGyRAq7+1LqmDRgGOuaOPRgi4DM98 +r7+jkadAVFjpAgH+nVKnmz7QyCZKNqJImoRHxAfZnm4a/Z17xi5zPQkNg16p +Sp9oZNoypRorS4LIYZvrJLaO2usuy00keP8yrBjB3vAh3rJbjYQD7o6PvvfQ +iGvcIy2sT0Lp0x1v5r/QKJ339l9BriQsmGi51vfj/reLZju4kwAyQcdmsE97 +x0bqepCQ3NdutW2ARrGVThpL+0n4lLLh9S3sAGpFxlUmCVStb1b8II10XzGJ +Z4dJkP3fLgnVbzT6kKEmonKJBAOx3hM6HBqVILHg4QxcX1bDDm/s06PTzcWX +Sbi8qSAjBZth25xkeI0EW/b5gC5sFk/glMMtEiKjeyGRS6Pd4be7YotI8OWb +mKsaoZG8/FkDsxISeljs+93Y06/CL/M9IqG58Sr/ilEa3VFHDqwKEhJTZt/Y +Yf/s6Xl6t5YEvadWuR+xK+3l8t+8IOHIRJMmd4xGFxZ4BbJekVD4Lq9NZJxG +zHxOgFcLCUuLXPWt2OL8tXIDrSQ46N34+jv2oTrP9Pn3JCR08qZ/w1bRuhqj +OkiCcJjN89YJGi18SGxnD5HgJZQWwMVuSyF1SodJeH1u+qHgJI2SvupxjEZI +cNZRdjTF/pjd7ruXJsH419l/7mJnrlxrHbeCAvXnERcCp/D8TvV4R/NREBxl +U5aA/a2nMDJMgIJXY1KRV7BNK61uM1dR8MzmXPMz7CH/2EW7tRSIr99XpETj ++u2tJawlKRhyPlqwE9tkp4QmkqJg5eoIcwfsS2JF+3Q3ULCC0WV+dHm99kuZ +nBIFBYtqp59jU/eKXkipUHDy9i2PruXnLx37skaNgpH3b59xsYcoSTF+TQoe +7gmIXDON1yVtgkd0KNgX1ijigl37SzJ5iEHBW7PGygDsQXbvlV49CrrEyLkI +bOOncU0dhhTYa7H2srAHDpVs+gso6GhW3NWMvdozXv+xBQVyRxdq27CNLH+z +L7Oi4OU00f4Jm7Wh79i93yioFBhop7Fr+Esv5dpREHRruu4Xdv94/IM/7CmI +E2OZrZqhkeFzqXcXnSi4Y+wmKY/NLOvjprrg/s4nkurYF3NKeU+6UeDWsdll +O3ZfpK1OjCcFocZLCwhbzE/aJmI/BV+iNR7bLOfZ9vuG+FCQO/habO/y+wqJ +F/z8KUgKOn3eB7tG2O6OJ5MCM5Wrj5jLeTPST1wICs6HKBwOXs772t9qT1Fw +20yhJXQ5r+XR0O5gCszLsxojl+t7nPgTQnC/7CTno8v5d+zWmRyiQEOuJz5+ +Of+izBb9MApaL5ZA8nJ+7ID59ggK3l+fyj2JLUqUeWpGUvChKP+PFOyde5PC +VaIpEII27bPL+cZ7zsjHULClL9jnPHaa2vqbMrEUXGdEqqVhV4sPVqyNo8C0 +j3v2IvbXxbJXIgkUZFS8O8Nazv+W9FUgiYIHcdsV0rEN3u6ZW0qmQFl+3nnZ +/we6JyEx "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7939407247625506, 1.2474511339258432`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7939407247625524}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12719,7 +14172,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6007907022525477}, + AxesOrigin->{0, 0.7939407247625524}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12747,7 +14201,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7939407247625506, 1.2474511339258432`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12755,9 +14210,9 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913267728125134`*^9}, + CellChangeTimes->{3.9913267728125134`*^9, 3.9943565168908253`*^9}, CellLabel-> - "Out[137]=",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] + "Out[149]=",ExpressionUUID->"5b4373b7-6460-4441-b8fb-e70f54d91d7b"] }, Open ]], Cell[CellGroupData[{ @@ -12820,154 +14275,159 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799933259697*^9, - 3.9917999365172615`*^9}},ExpressionUUID->"201ddeed-58e9-7047-8ad4-\ -c179c9adcae7"], + CellChangeTimes->{{3.991799933259697*^9, 3.9917999365172615`*^9}}, + CellLabel-> + "In[150]:=",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.962223088138177`*^-266\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.196067377208741`*^-272\\\", \ \\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 81, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773051552*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 150, + 69, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994356517091558*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], +In[150]:=",ExpressionUUID->"643ac1c2-d878-4faa-8b7f-6c74f33b07d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.450949205829742`*^-278\\\", \ + "\"\\!\\(\\*FractionBox[\\\"8.331133848243658`*^-284\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 82, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730605392`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 150, + 70, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.9943565171000977`*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], +In[150]:=",ExpressionUUID->"2a61f5fb-7b04-4931-9e25-23a8bb232872"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4109778485455803`*^-289\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.3357754270429834`*^-295\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 138, 83, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730685368`*^9}, + 150, 71, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994356517108*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], +In[150]:=",ExpressionUUID->"975fe3ae-7bd4-4b10-95d2-c222231bd761"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 138, 84, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773076536*^9}, +during this calculation.\"", 2, 150, 72, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994356517117422*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], +In[150]:=",ExpressionUUID->"2e2b1826-6b54-4d71-8a17-909993668e95"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vl8YAHDRIKHs7X3v+6Jh7/V6Hn4NKylUyiySUkoRIaOf0VBGwygk +lIz3SpGUChkpJFmR9lBERrT8zu+P+7mf7+eOc85zznmee5nbAjb48PLw8MyS +4//z1MvmevaJPPOLr72zqz6am3dmSYda9MSAYZRDYbiLPKBE2zbpnhSYreUT +N3NRg2CHa918PbnwRnhWXNTFDJaMSKXMdF+H6ZL1K7s228HgHfuAie5aSJk0 +lFXY7Aqr2UMDY90doJlVcdXR2R9mug3Pjna/Ad6LRkrmNuFQ98+VvKe549AW +9aPl7JpEkB+s+rBN7Q+UJarvHvv3LIj7e1xb8A8fJjr97iiccwFStFdX2zvz +48DxK/9ec74EvWla98cWC2GVQ9RHI9M8OJEX2cYrswSHko2/rJe9AlJn3h5L +vSiGbnVZQQ1ZhRDvZG3eMSWBc3ipZOeSIpC90SrLO0cSC4f4Ay7cLIJSMacf +2oKS+DVcqHLgbhF0dbjTyUqSOGmbGr2utQjY6w9S660k0a5k/P23kSKoXZs9 +vz1dEk/zGSiwNIvhz+rJ1idmUuilI6e9tqgYDhhf8miOkcaIgEDf2JQSsMkR +nrA9KY2i4Dj6Ja0EqAXhCa1npVFt+ef9a7NLoL1zY9mzq9K40SbVbU5xCWjs +W8T3slUaU3WaWtQelsCngkMF32VlMDHoJDd5qgRcxe2H5cplcHLqqVmycyno +hlVHZ92RwX/Pd6lt3FoKC98slWQ2yGD/X11BSa9SqOLygUqvDArLCqbE+ZeC +pG1VktasDD7ln3qw/GgptEez9VbZyuLBZVciIrmlsPLbz8N738oiHWK+0mUu +F0Ktzix/8FUWP9p6dHsJcKH0knqf2JQs/ihrivMR5oK0k6dxFb8c1naYmLhL +c+HrrYc/+DTksIpp811cjQupMUkH00PksMH7Us75DVx4I6Gyt15IHnMn9OZ+ +z+SCVMA9BSkpeYyZ0yznnsMFu6bNT/wY8jgnVs/hYR4XKg6fUBPRlUf+V1Mi +sSVcOD44OuSyWR71jbVGmmu4oFNY7fstVx6D425Y+L3iQrTZei9ZIwU0bzxQ +PitCg5V71ndDSwUMOLVWZIkoDcJRX4462yngHtlviUriNFyoiy1I8lTAQ/vU +J3Slabhlc/vL/GMKWNeJfiYMGkY3s4LHexUw5XWtQo0mDe5Bk8cfhyni43uC +crl2NCift5QfilXEIu+7GpvtaTL+0yULkhRxJvzdbkEHGg7/XtZumaeI+dys +7X6ONJw96i5R9VgRo0QtHPi20PA4uTE7X0EJF4jUu3J30GBSmn7jyD0lVAzj +8RyKoGFld+ufkSYl3NX3kVczkgZ7nrlrPDqUcEd7q/7+KBq2b9jbC++V0N/u +od1IDA2rw5iRUfMYeHlZ+pqWeBr2KU1dtljBQGF4dWNxMg2T5UlNM5oMLLJ+ +HqaRQvpntWK4TI+Bz6nybutUGmL3expQ5gzMcDi0LvQsDRl1j5p41zMwyW67 +VXU6DfW+2cN1wQwc+1BY1HKJBuvfxqLhYQycDgj5XJtLQ2tSp4FeFANPb7v6 +oPIyDb1VAlF5xxj48/NFy4x8GkYED4rGXmCgSqVUsmUhDdK0leHqWgYKvH1S +zqBpuLjy7da/DQzUuylXP0ZM9UZEVbQwkM1uO3i/jAZ13vJmlecMNMn8eWtj +OQ2WTgquCz4x8FPHie4dFTT4T49FNQkxMWfz6SaJOySe+3dIfhBl4qqjPc5t +xPxDfUV80kwc7B1jxN2lIf9FXZc5xcRI1drALzU0vKw5q3bTgIm16WbiZx/Q +UGy4sLbDlImukT7ZRrUkXvSRTaPIRAu5Fv9eYslc35gVtkzMFkhqF62nYV2s +cc8lDyYmF/A89m6gQfFvyZ573kw8ggtDvxN/Dab4BvyY2Frx2T+ikYaEnYIa +0geZGDtwdMWJJhru2w4cPZXAxOq7NeJxj2g4Vb9epjiRvE9qkcBfYldOQ2lz +ChNDLCesDrTQMKPB7Z17kYlSW+aWOj+mQUc0WjOsjIk2qk6KP5/QwHNisj6t +gokFny9HubaS+eHbtaWimoldAUd07xDvntwQO/aQiVc3bk480EbitbdRVqSF +ifyXM/VbiPk/mtJq7UxsOzamxWinIa+H/cK3j4kD6t6sWuLA9en7YgeZ+Fj4 +kZzIUxrwkdD8y++YmN7e6edCPFA9pfVyhIkHtgYKfCAu1tvd8GuciZmBjq5L +O0g8Swa3yswwkWd+8IKdxJLZTXFOfBTutmL5DRK/k+LIB/JTGLhtDlPqGQ3X +k8rKTgtROPCkUdeOeF1MRv8jKQof7aj2LyVW/CUc+EmewgRhizMviL8eOLpg +PkXhql8eMvM7Sbx9/HUs1CjECCY4Em98+arRXZtCo1PM10HE7E3ObuEGFD7o +C3p7lvh7W/P3dFMKq0taV5cT37cyT6hECgVH+wVbiU89uK7wfBWFmks36H4g +djVRLf9uQ2FT6Ku7v4iXl2daLXYg1/NNioWfk/lasfilujN5foH4rCLx1EXZ +aN0tFKYrvA1XI54QUWYbe1Co/rcqxJB4LFqz0dybwj1LVo4D8ci48a6VfhTG +rFMfXkX8xWelkM1e0l+gfK2JP3Xb0+sOUGg23eZlQ/ze2sXROYRCD4V3A1bE +b6q3T22JIM+/XtS/knhQfW+6ZwyFiXNnXM2J+7NDzHbEUxj/bJOXPnHvkqOD +u09SqLu09/My4q6jiTH7kym8tlP9hxzxs8nzyofOUTgUN++4IHG7b25TeCaF +kTxil6fJ+J/0Fu+OySHjfbngn7fEj2wrhRPyKXx1/dyuFuLGuw/KEq+R910I +lC0jrtd87JTKpfCj5TrHM8QPLnX9SLtBYVbXK4n/56dG7HVGVhWFb5b0b/t/ +/qpjv3DyaijcZzhlokl868fkq8I6CteIvs/iJ77+YqHqzScUXrwtK3SDrAfu +WolHtzsoLKlrk44jLr6ntOd+N4WO0/rlzsQFl/XKW15TeJmaPjdM1t9lCdj4 +9AOFe2MbXt8kzom3nun6QqH98PKaMOKM3e7wZpKMd2uOBg/x+YGdbz7+pNBp +XLW+hqz3M+sOxA7PkvV7XWfkMPEp3YSWaQEWWvrX834l+yfmV9kmEUUWKham +WZaR/Ra5585PcRYLpe5NJrkShw82XJRdysJCuil0HnFw3Yu3yjosXC3wTMHh +//17Yt4+s9UsXBhWWN9E9v/OPyJilrYsPN3z+pcn8Y4A2Yo1Dix8fTX32RTJ +F56Omr83bCHtG7T7yhE7ybkk+O0lFgoxsmqmwayoOOfcORZqGBxYpv2QhheM +ouxVmSxsWmvvWULy2+FzhVkT2Sws8MlLViWujC64sKGQhSKDmz5I1JH8szkn +TfgOC3MtBXf13adh2bwzSXGvWXjL22wPH8m/TYdTTut/YOE8FZkMj2rSv9Gk +U++GWBgfMdZSdZvklxeJJy0nWPi+Fi12VtHAuB6f8Hc+G7uLFWNLSH6X9AiL +ClZj454wYYE+Uh9udoZGKmuzkRUS2CVJ7GQTcqRTn41J5wvK13NpSNEPCtcB +Nv7yhpwHJTQILQoIGVnPxvP7Yp2PX6NhbtW2fTsOkft1x1vukXo1JmrjubGW +jXSmY+e9MzT0+FPtuxrZyC36ZnKN1Mf7DT8h8jEbmysPHUwh9TPpcJHS1S42 +Dh/7s901iQatN4sGZ4bYGGf01L7rBA17y9rcLoopo8iQI3s7qc9D65y3vvNW +xhunl/l+3ENDR6F6y7SfMubHqvxO9KfhNt98U6EAZdRaZhOjs5uGY5UVsgah +ykhpv/UJ2knDUiXpvvhEZdSvj8h/s40G35G+zSsqlJFHYNurrZtIvjzpuTFw +gQqyFjSz281J+0NqlNYiFbzr4yOzgUPDjzUzw8OLVfDJuI97hykNC/lSYv1k +VTBo5nn/EyPS/9C6G57qKtg9YVdL69AQ4aMits5RBb+EiXxUUSHxN//atiJb +BTWTlrv1CZL6/+2Q9XsDVZyKrPOUyeeCvLZiHL+ZKp7VfZ4+5xIXRgLra1dY +qOJXvSVbP1zgwpmpxWaBtqrY71t5JP8MF17+KdSY9VBFmYq0+J9HuRC4qF9M +5pgqjjgkxM/ZxoWMZfjS7oUqrlmmn5giR74vt/MfuBG5FPco+HebxpaS/w0p +3vjaZSg2uPvSHE4JiD5ROUV/W45UHqUT87kI5BO4DgYGaqjip5Us73YN0lYY +LxbzVUc3Hou2xO6r8EjWQn88WQO/1+ho1Ky9AibytUmaXZp4s7HKpiEzH4T5 +cg96xWhh85EWXbn5eaAYrWTmoqKNM8zDmS6OuSCg7FqxoVEbRb976oVfzwEN +jgz3kJsOsjYZRF07mAWBL0XrbHh08dhH3l2Gvpnwbfyks3WaLmqUyR2dup4G +azQbMqzV9dBYcuO7cp1zUDNu+utHqx6u/ikem1GYCnvVdPqe+ujjVKeCk3NI +MnBGvDtdBAzQWkvA+mnyKVjFll4rlGuAkyXJOyp6jsPSqOMhtYaGeH//p86I +uHhY7mN8T7nPEOtqTcXd1/wLPjU7/72x3wiNriWXuSVHw72cTu8xCWMsaWxk +HBmKgImrsz80K40xM3U4VNgvFLYrFwlkrDXB4v5Al9bKIBhbnmpwfdQEaxom +t242DoRbeb9eTyaYYqxRmtmalr2wZSULTRXNcDJYTS7ltx/I7Ymv0rhvhk4u +zct5YnxAYqF/2dpNHPzMa6kWM+YFef9EHB514aDz6okbnW+8QCfi1D+prhx8 +NlGVr93pBfaj9PMeLw4mZfJfXVjpBXFdkzPb/Tl4xXDwhFGEF0znRloejubg +C1HTW0cEvaDPNPVZQREHA9wMrU9qesLOoLwL1qUcPBJ8J5NBecJU6U2frzQH +EyJcs2rEPUGU6vmhXcHBstEPJpoTHmDLryB/9z4HWTu0H4ce94A7nQXez55z +cIt9UHT2bXewEb6lHtzDwerg/OHpHHfoWdM8Jf2Cg4GZi/l94t1h4vaXBPdX +HDQcK5ALcnIH9UtaJZ+HyPVDzBMHvrnBnT6L4JPDHOyq2mLg1eUGNuKOoDnK +wYOym4y87rrBjvigpwcnOdjStVwi7YQbTNyPy5Ca5qABx7mvNdANYn6e3377 +JweDez49ktriBov1CtXc/nDQaLdMf6CFG2TtuT05O8vBc08V+V4tdYP/AKMS +VsQ= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12981,113 +14441,114 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV13c8Vl8YAHDRIKHs7X3v+6Jh7/V6Hn4NKylUyiySUkoRIaOf0VBGwygk +lIz3SpGUChkpJFmR9lBERrT8zu+P+7mf7+eOc85zznmee5nbAjb48PLw8MyS +4//z1MvmevaJPPOLr72zqz6am3dmSYda9MSAYZRDYbiLPKBE2zbpnhSYreUT +N3NRg2CHa918PbnwRnhWXNTFDJaMSKXMdF+H6ZL1K7s228HgHfuAie5aSJk0 +lFXY7Aqr2UMDY90doJlVcdXR2R9mug3Pjna/Ad6LRkrmNuFQ98+VvKe549AW +9aPl7JpEkB+s+rBN7Q+UJarvHvv3LIj7e1xb8A8fJjr97iiccwFStFdX2zvz +48DxK/9ec74EvWla98cWC2GVQ9RHI9M8OJEX2cYrswSHko2/rJe9AlJn3h5L +vSiGbnVZQQ1ZhRDvZG3eMSWBc3ipZOeSIpC90SrLO0cSC4f4Ay7cLIJSMacf +2oKS+DVcqHLgbhF0dbjTyUqSOGmbGr2utQjY6w9S660k0a5k/P23kSKoXZs9 +vz1dEk/zGSiwNIvhz+rJ1idmUuilI6e9tqgYDhhf8miOkcaIgEDf2JQSsMkR +nrA9KY2i4Dj6Ja0EqAXhCa1npVFt+ef9a7NLoL1zY9mzq9K40SbVbU5xCWjs +W8T3slUaU3WaWtQelsCngkMF32VlMDHoJDd5qgRcxe2H5cplcHLqqVmycyno +hlVHZ92RwX/Pd6lt3FoKC98slWQ2yGD/X11BSa9SqOLygUqvDArLCqbE+ZeC +pG1VktasDD7ln3qw/GgptEez9VbZyuLBZVciIrmlsPLbz8N738oiHWK+0mUu +F0Ktzix/8FUWP9p6dHsJcKH0knqf2JQs/ihrivMR5oK0k6dxFb8c1naYmLhL +c+HrrYc/+DTksIpp811cjQupMUkH00PksMH7Us75DVx4I6Gyt15IHnMn9OZ+ +z+SCVMA9BSkpeYyZ0yznnsMFu6bNT/wY8jgnVs/hYR4XKg6fUBPRlUf+V1Mi +sSVcOD44OuSyWR71jbVGmmu4oFNY7fstVx6D425Y+L3iQrTZei9ZIwU0bzxQ +PitCg5V71ndDSwUMOLVWZIkoDcJRX4462yngHtlviUriNFyoiy1I8lTAQ/vU +J3Slabhlc/vL/GMKWNeJfiYMGkY3s4LHexUw5XWtQo0mDe5Bk8cfhyni43uC +crl2NCift5QfilXEIu+7GpvtaTL+0yULkhRxJvzdbkEHGg7/XtZumaeI+dys +7X6ONJw96i5R9VgRo0QtHPi20PA4uTE7X0EJF4jUu3J30GBSmn7jyD0lVAzj +8RyKoGFld+ufkSYl3NX3kVczkgZ7nrlrPDqUcEd7q/7+KBq2b9jbC++V0N/u +od1IDA2rw5iRUfMYeHlZ+pqWeBr2KU1dtljBQGF4dWNxMg2T5UlNM5oMLLJ+ +HqaRQvpntWK4TI+Bz6nybutUGmL3expQ5gzMcDi0LvQsDRl1j5p41zMwyW67 +VXU6DfW+2cN1wQwc+1BY1HKJBuvfxqLhYQycDgj5XJtLQ2tSp4FeFANPb7v6 +oPIyDb1VAlF5xxj48/NFy4x8GkYED4rGXmCgSqVUsmUhDdK0leHqWgYKvH1S +zqBpuLjy7da/DQzUuylXP0ZM9UZEVbQwkM1uO3i/jAZ13vJmlecMNMn8eWtj +OQ2WTgquCz4x8FPHie4dFTT4T49FNQkxMWfz6SaJOySe+3dIfhBl4qqjPc5t +xPxDfUV80kwc7B1jxN2lIf9FXZc5xcRI1drALzU0vKw5q3bTgIm16WbiZx/Q +UGy4sLbDlImukT7ZRrUkXvSRTaPIRAu5Fv9eYslc35gVtkzMFkhqF62nYV2s +cc8lDyYmF/A89m6gQfFvyZ573kw8ggtDvxN/Dab4BvyY2Frx2T+ikYaEnYIa +0geZGDtwdMWJJhru2w4cPZXAxOq7NeJxj2g4Vb9epjiRvE9qkcBfYldOQ2lz +ChNDLCesDrTQMKPB7Z17kYlSW+aWOj+mQUc0WjOsjIk2qk6KP5/QwHNisj6t +gokFny9HubaS+eHbtaWimoldAUd07xDvntwQO/aQiVc3bk480EbitbdRVqSF +ifyXM/VbiPk/mtJq7UxsOzamxWinIa+H/cK3j4kD6t6sWuLA9en7YgeZ+Fj4 +kZzIUxrwkdD8y++YmN7e6edCPFA9pfVyhIkHtgYKfCAu1tvd8GuciZmBjq5L +O0g8Swa3yswwkWd+8IKdxJLZTXFOfBTutmL5DRK/k+LIB/JTGLhtDlPqGQ3X +k8rKTgtROPCkUdeOeF1MRv8jKQof7aj2LyVW/CUc+EmewgRhizMviL8eOLpg +PkXhql8eMvM7Sbx9/HUs1CjECCY4Em98+arRXZtCo1PM10HE7E3ObuEGFD7o +C3p7lvh7W/P3dFMKq0taV5cT37cyT6hECgVH+wVbiU89uK7wfBWFmks36H4g +djVRLf9uQ2FT6Ku7v4iXl2daLXYg1/NNioWfk/lasfilujN5foH4rCLx1EXZ +aN0tFKYrvA1XI54QUWYbe1Co/rcqxJB4LFqz0dybwj1LVo4D8ci48a6VfhTG +rFMfXkX8xWelkM1e0l+gfK2JP3Xb0+sOUGg23eZlQ/ze2sXROYRCD4V3A1bE +b6q3T22JIM+/XtS/knhQfW+6ZwyFiXNnXM2J+7NDzHbEUxj/bJOXPnHvkqOD +u09SqLu09/My4q6jiTH7kym8tlP9hxzxs8nzyofOUTgUN++4IHG7b25TeCaF +kTxil6fJ+J/0Fu+OySHjfbngn7fEj2wrhRPyKXx1/dyuFuLGuw/KEq+R910I +lC0jrtd87JTKpfCj5TrHM8QPLnX9SLtBYVbXK4n/56dG7HVGVhWFb5b0b/t/ +/qpjv3DyaijcZzhlokl868fkq8I6CteIvs/iJ77+YqHqzScUXrwtK3SDrAfu +WolHtzsoLKlrk44jLr6ntOd+N4WO0/rlzsQFl/XKW15TeJmaPjdM1t9lCdj4 +9AOFe2MbXt8kzom3nun6QqH98PKaMOKM3e7wZpKMd2uOBg/x+YGdbz7+pNBp +XLW+hqz3M+sOxA7PkvV7XWfkMPEp3YSWaQEWWvrX834l+yfmV9kmEUUWKham +WZaR/Ra5585PcRYLpe5NJrkShw82XJRdysJCuil0HnFw3Yu3yjosXC3wTMHh +//17Yt4+s9UsXBhWWN9E9v/OPyJilrYsPN3z+pcn8Y4A2Yo1Dix8fTX32RTJ +F56Omr83bCHtG7T7yhE7ybkk+O0lFgoxsmqmwayoOOfcORZqGBxYpv2QhheM +ouxVmSxsWmvvWULy2+FzhVkT2Sws8MlLViWujC64sKGQhSKDmz5I1JH8szkn +TfgOC3MtBXf13adh2bwzSXGvWXjL22wPH8m/TYdTTut/YOE8FZkMj2rSv9Gk +U++GWBgfMdZSdZvklxeJJy0nWPi+Fi12VtHAuB6f8Hc+G7uLFWNLSH6X9AiL +ClZj454wYYE+Uh9udoZGKmuzkRUS2CVJ7GQTcqRTn41J5wvK13NpSNEPCtcB +Nv7yhpwHJTQILQoIGVnPxvP7Yp2PX6NhbtW2fTsOkft1x1vukXo1JmrjubGW +jXSmY+e9MzT0+FPtuxrZyC36ZnKN1Mf7DT8h8jEbmysPHUwh9TPpcJHS1S42 +Dh/7s901iQatN4sGZ4bYGGf01L7rBA17y9rcLoopo8iQI3s7qc9D65y3vvNW +xhunl/l+3ENDR6F6y7SfMubHqvxO9KfhNt98U6EAZdRaZhOjs5uGY5UVsgah +ykhpv/UJ2knDUiXpvvhEZdSvj8h/s40G35G+zSsqlJFHYNurrZtIvjzpuTFw +gQqyFjSz281J+0NqlNYiFbzr4yOzgUPDjzUzw8OLVfDJuI97hykNC/lSYv1k +VTBo5nn/EyPS/9C6G57qKtg9YVdL69AQ4aMits5RBb+EiXxUUSHxN//atiJb +BTWTlrv1CZL6/+2Q9XsDVZyKrPOUyeeCvLZiHL+ZKp7VfZ4+5xIXRgLra1dY +qOJXvSVbP1zgwpmpxWaBtqrY71t5JP8MF17+KdSY9VBFmYq0+J9HuRC4qF9M +5pgqjjgkxM/ZxoWMZfjS7oUqrlmmn5giR74vt/MfuBG5FPco+HebxpaS/w0p +3vjaZSg2uPvSHE4JiD5ROUV/W45UHqUT87kI5BO4DgYGaqjip5Us73YN0lYY +LxbzVUc3Hou2xO6r8EjWQn88WQO/1+ho1Ky9AibytUmaXZp4s7HKpiEzH4T5 +cg96xWhh85EWXbn5eaAYrWTmoqKNM8zDmS6OuSCg7FqxoVEbRb976oVfzwEN +jgz3kJsOsjYZRF07mAWBL0XrbHh08dhH3l2Gvpnwbfyks3WaLmqUyR2dup4G +azQbMqzV9dBYcuO7cp1zUDNu+utHqx6u/ikem1GYCnvVdPqe+ujjVKeCk3NI +MnBGvDtdBAzQWkvA+mnyKVjFll4rlGuAkyXJOyp6jsPSqOMhtYaGeH//p86I +uHhY7mN8T7nPEOtqTcXd1/wLPjU7/72x3wiNriWXuSVHw72cTu8xCWMsaWxk +HBmKgImrsz80K40xM3U4VNgvFLYrFwlkrDXB4v5Al9bKIBhbnmpwfdQEaxom +t242DoRbeb9eTyaYYqxRmtmalr2wZSULTRXNcDJYTS7ltx/I7Ymv0rhvhk4u +zct5YnxAYqF/2dpNHPzMa6kWM+YFef9EHB514aDz6okbnW+8QCfi1D+prhx8 +NlGVr93pBfaj9PMeLw4mZfJfXVjpBXFdkzPb/Tl4xXDwhFGEF0znRloejubg +C1HTW0cEvaDPNPVZQREHA9wMrU9qesLOoLwL1qUcPBJ8J5NBecJU6U2frzQH +EyJcs2rEPUGU6vmhXcHBstEPJpoTHmDLryB/9z4HWTu0H4ce94A7nQXez55z +cIt9UHT2bXewEb6lHtzDwerg/OHpHHfoWdM8Jf2Cg4GZi/l94t1h4vaXBPdX +HDQcK5ALcnIH9UtaJZ+HyPVDzBMHvrnBnT6L4JPDHOyq2mLg1eUGNuKOoDnK +wYOym4y87rrBjvigpwcnOdjStVwi7YQbTNyPy5Ca5qABx7mvNdANYn6e3377 +JweDez49ktriBov1CtXc/nDQaLdMf6CFG2TtuT05O8vBc08V+V4tdYP/AKMS +VsQ= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.06575455558774562}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13099,19 +14560,19 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.06575455558774562}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13125,112 +14586,113 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV13c8Vl8YAHDRIKHs7X3v+6Jh7/V6Hn4NKylUyiySUkoRIaOf0VBGwygk +lIz3SpGUChkpJFmR9lBERrT8zu+P+7mf7+eOc85zznmee5nbAjb48PLw8MyS +4//z1MvmevaJPPOLr72zqz6am3dmSYda9MSAYZRDYbiLPKBE2zbpnhSYreUT +N3NRg2CHa918PbnwRnhWXNTFDJaMSKXMdF+H6ZL1K7s228HgHfuAie5aSJk0 +lFXY7Aqr2UMDY90doJlVcdXR2R9mug3Pjna/Ad6LRkrmNuFQ98+VvKe549AW +9aPl7JpEkB+s+rBN7Q+UJarvHvv3LIj7e1xb8A8fJjr97iiccwFStFdX2zvz +48DxK/9ec74EvWla98cWC2GVQ9RHI9M8OJEX2cYrswSHko2/rJe9AlJn3h5L +vSiGbnVZQQ1ZhRDvZG3eMSWBc3ipZOeSIpC90SrLO0cSC4f4Ay7cLIJSMacf +2oKS+DVcqHLgbhF0dbjTyUqSOGmbGr2utQjY6w9S660k0a5k/P23kSKoXZs9 +vz1dEk/zGSiwNIvhz+rJ1idmUuilI6e9tqgYDhhf8miOkcaIgEDf2JQSsMkR +nrA9KY2i4Dj6Ja0EqAXhCa1npVFt+ef9a7NLoL1zY9mzq9K40SbVbU5xCWjs +W8T3slUaU3WaWtQelsCngkMF32VlMDHoJDd5qgRcxe2H5cplcHLqqVmycyno +hlVHZ92RwX/Pd6lt3FoKC98slWQ2yGD/X11BSa9SqOLygUqvDArLCqbE+ZeC +pG1VktasDD7ln3qw/GgptEez9VbZyuLBZVciIrmlsPLbz8N738oiHWK+0mUu +F0Ktzix/8FUWP9p6dHsJcKH0knqf2JQs/ihrivMR5oK0k6dxFb8c1naYmLhL +c+HrrYc/+DTksIpp811cjQupMUkH00PksMH7Us75DVx4I6Gyt15IHnMn9OZ+ +z+SCVMA9BSkpeYyZ0yznnsMFu6bNT/wY8jgnVs/hYR4XKg6fUBPRlUf+V1Mi +sSVcOD44OuSyWR71jbVGmmu4oFNY7fstVx6D425Y+L3iQrTZei9ZIwU0bzxQ +PitCg5V71ndDSwUMOLVWZIkoDcJRX4462yngHtlviUriNFyoiy1I8lTAQ/vU +J3Slabhlc/vL/GMKWNeJfiYMGkY3s4LHexUw5XWtQo0mDe5Bk8cfhyni43uC +crl2NCift5QfilXEIu+7GpvtaTL+0yULkhRxJvzdbkEHGg7/XtZumaeI+dys +7X6ONJw96i5R9VgRo0QtHPi20PA4uTE7X0EJF4jUu3J30GBSmn7jyD0lVAzj +8RyKoGFld+ufkSYl3NX3kVczkgZ7nrlrPDqUcEd7q/7+KBq2b9jbC++V0N/u +od1IDA2rw5iRUfMYeHlZ+pqWeBr2KU1dtljBQGF4dWNxMg2T5UlNM5oMLLJ+ +HqaRQvpntWK4TI+Bz6nybutUGmL3expQ5gzMcDi0LvQsDRl1j5p41zMwyW67 +VXU6DfW+2cN1wQwc+1BY1HKJBuvfxqLhYQycDgj5XJtLQ2tSp4FeFANPb7v6 +oPIyDb1VAlF5xxj48/NFy4x8GkYED4rGXmCgSqVUsmUhDdK0leHqWgYKvH1S +zqBpuLjy7da/DQzUuylXP0ZM9UZEVbQwkM1uO3i/jAZ13vJmlecMNMn8eWtj +OQ2WTgquCz4x8FPHie4dFTT4T49FNQkxMWfz6SaJOySe+3dIfhBl4qqjPc5t +xPxDfUV80kwc7B1jxN2lIf9FXZc5xcRI1drALzU0vKw5q3bTgIm16WbiZx/Q +UGy4sLbDlImukT7ZRrUkXvSRTaPIRAu5Fv9eYslc35gVtkzMFkhqF62nYV2s +cc8lDyYmF/A89m6gQfFvyZ573kw8ggtDvxN/Dab4BvyY2Frx2T+ikYaEnYIa +0geZGDtwdMWJJhru2w4cPZXAxOq7NeJxj2g4Vb9epjiRvE9qkcBfYldOQ2lz +ChNDLCesDrTQMKPB7Z17kYlSW+aWOj+mQUc0WjOsjIk2qk6KP5/QwHNisj6t +gokFny9HubaS+eHbtaWimoldAUd07xDvntwQO/aQiVc3bk480EbitbdRVqSF +ifyXM/VbiPk/mtJq7UxsOzamxWinIa+H/cK3j4kD6t6sWuLA9en7YgeZ+Fj4 +kZzIUxrwkdD8y++YmN7e6edCPFA9pfVyhIkHtgYKfCAu1tvd8GuciZmBjq5L +O0g8Swa3yswwkWd+8IKdxJLZTXFOfBTutmL5DRK/k+LIB/JTGLhtDlPqGQ3X +k8rKTgtROPCkUdeOeF1MRv8jKQof7aj2LyVW/CUc+EmewgRhizMviL8eOLpg +PkXhql8eMvM7Sbx9/HUs1CjECCY4Em98+arRXZtCo1PM10HE7E3ObuEGFD7o +C3p7lvh7W/P3dFMKq0taV5cT37cyT6hECgVH+wVbiU89uK7wfBWFmks36H4g +djVRLf9uQ2FT6Ku7v4iXl2daLXYg1/NNioWfk/lasfilujN5foH4rCLx1EXZ +aN0tFKYrvA1XI54QUWYbe1Co/rcqxJB4LFqz0dybwj1LVo4D8ci48a6VfhTG +rFMfXkX8xWelkM1e0l+gfK2JP3Xb0+sOUGg23eZlQ/ze2sXROYRCD4V3A1bE +b6q3T22JIM+/XtS/knhQfW+6ZwyFiXNnXM2J+7NDzHbEUxj/bJOXPnHvkqOD +u09SqLu09/My4q6jiTH7kym8tlP9hxzxs8nzyofOUTgUN++4IHG7b25TeCaF +kTxil6fJ+J/0Fu+OySHjfbngn7fEj2wrhRPyKXx1/dyuFuLGuw/KEq+R910I +lC0jrtd87JTKpfCj5TrHM8QPLnX9SLtBYVbXK4n/56dG7HVGVhWFb5b0b/t/ +/qpjv3DyaijcZzhlokl868fkq8I6CteIvs/iJ77+YqHqzScUXrwtK3SDrAfu +WolHtzsoLKlrk44jLr6ntOd+N4WO0/rlzsQFl/XKW15TeJmaPjdM1t9lCdj4 +9AOFe2MbXt8kzom3nun6QqH98PKaMOKM3e7wZpKMd2uOBg/x+YGdbz7+pNBp +XLW+hqz3M+sOxA7PkvV7XWfkMPEp3YSWaQEWWvrX834l+yfmV9kmEUUWKham +WZaR/Ra5585PcRYLpe5NJrkShw82XJRdysJCuil0HnFw3Yu3yjosXC3wTMHh +//17Yt4+s9UsXBhWWN9E9v/OPyJilrYsPN3z+pcn8Y4A2Yo1Dix8fTX32RTJ +F56Omr83bCHtG7T7yhE7ybkk+O0lFgoxsmqmwayoOOfcORZqGBxYpv2QhheM +ouxVmSxsWmvvWULy2+FzhVkT2Sws8MlLViWujC64sKGQhSKDmz5I1JH8szkn +TfgOC3MtBXf13adh2bwzSXGvWXjL22wPH8m/TYdTTut/YOE8FZkMj2rSv9Gk +U++GWBgfMdZSdZvklxeJJy0nWPi+Fi12VtHAuB6f8Hc+G7uLFWNLSH6X9AiL +ClZj454wYYE+Uh9udoZGKmuzkRUS2CVJ7GQTcqRTn41J5wvK13NpSNEPCtcB +Nv7yhpwHJTQILQoIGVnPxvP7Yp2PX6NhbtW2fTsOkft1x1vukXo1JmrjubGW +jXSmY+e9MzT0+FPtuxrZyC36ZnKN1Mf7DT8h8jEbmysPHUwh9TPpcJHS1S42 +Dh/7s901iQatN4sGZ4bYGGf01L7rBA17y9rcLoopo8iQI3s7qc9D65y3vvNW +xhunl/l+3ENDR6F6y7SfMubHqvxO9KfhNt98U6EAZdRaZhOjs5uGY5UVsgah +ykhpv/UJ2knDUiXpvvhEZdSvj8h/s40G35G+zSsqlJFHYNurrZtIvjzpuTFw +gQqyFjSz281J+0NqlNYiFbzr4yOzgUPDjzUzw8OLVfDJuI97hykNC/lSYv1k +VTBo5nn/EyPS/9C6G57qKtg9YVdL69AQ4aMits5RBb+EiXxUUSHxN//atiJb +BTWTlrv1CZL6/+2Q9XsDVZyKrPOUyeeCvLZiHL+ZKp7VfZ4+5xIXRgLra1dY +qOJXvSVbP1zgwpmpxWaBtqrY71t5JP8MF17+KdSY9VBFmYq0+J9HuRC4qF9M +5pgqjjgkxM/ZxoWMZfjS7oUqrlmmn5giR74vt/MfuBG5FPco+HebxpaS/w0p +3vjaZSg2uPvSHE4JiD5ROUV/W45UHqUT87kI5BO4DgYGaqjip5Us73YN0lYY +LxbzVUc3Hou2xO6r8EjWQn88WQO/1+ho1Ky9AibytUmaXZp4s7HKpiEzH4T5 +cg96xWhh85EWXbn5eaAYrWTmoqKNM8zDmS6OuSCg7FqxoVEbRb976oVfzwEN +jgz3kJsOsjYZRF07mAWBL0XrbHh08dhH3l2Gvpnwbfyks3WaLmqUyR2dup4G +azQbMqzV9dBYcuO7cp1zUDNu+utHqx6u/ikem1GYCnvVdPqe+ujjVKeCk3NI +MnBGvDtdBAzQWkvA+mnyKVjFll4rlGuAkyXJOyp6jsPSqOMhtYaGeH//p86I +uHhY7mN8T7nPEOtqTcXd1/wLPjU7/72x3wiNriWXuSVHw72cTu8xCWMsaWxk +HBmKgImrsz80K40xM3U4VNgvFLYrFwlkrDXB4v5Al9bKIBhbnmpwfdQEaxom +t242DoRbeb9eTyaYYqxRmtmalr2wZSULTRXNcDJYTS7ltx/I7Ymv0rhvhk4u +zct5YnxAYqF/2dpNHPzMa6kWM+YFef9EHB514aDz6okbnW+8QCfi1D+prhx8 +NlGVr93pBfaj9PMeLw4mZfJfXVjpBXFdkzPb/Tl4xXDwhFGEF0znRloejubg +C1HTW0cEvaDPNPVZQREHA9wMrU9qesLOoLwL1qUcPBJ8J5NBecJU6U2frzQH +EyJcs2rEPUGU6vmhXcHBstEPJpoTHmDLryB/9z4HWTu0H4ce94A7nQXez55z +cIt9UHT2bXewEb6lHtzDwerg/OHpHHfoWdM8Jf2Cg4GZi/l94t1h4vaXBPdX +HDQcK5ALcnIH9UtaJZ+HyPVDzBMHvrnBnT6L4JPDHOyq2mLg1eUGNuKOoDnK +wYOym4y87rrBjvigpwcnOdjStVwi7YQbTNyPy5Ca5qABx7mvNdANYn6e3377 +JweDez49ktriBov1CtXc/nDQaLdMf6CFG2TtuT05O8vBc08V+V4tdYP/AKMS +VsQ= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.06575455558774562}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13241,6 +14703,7 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13268,7 +14731,8 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12905028199662316`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06575455558774562}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13276,22 +14740,568 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991327033758711*^9}, + CellChangeTimes->{3.991327033758711*^9, 3.99435705955831*^9}, CellLabel-> - "Out[138]=",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] + "Out[150]=",ExpressionUUID->"3c29449d-0ead-4ccf-9cbd-873051eac82a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9917999433700733`*^9, 3.9917999479698143`*^9}, - 3.9919244033659534`*^9},ExpressionUUID->"d48877eb-e0f2-d842-b248-\ -ea3fc2b4c4a8"], + 3.9919244033659534`*^9}, + CellLabel-> + "In[151]:=",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799951845436*^9, - 3.991799954096182*^9}},ExpressionUUID->"eae5aeae-3f12-2d4a-842b-\ -85a3484011b6"], + CellChangeTimes->{{3.991799951845436*^9, 3.991799954096182*^9}}, + CellLabel-> + "In[152]:=",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vl8YAHDRIKHs7X3v+6Jh7/V6Hn4NKylUyiySUkoRIaOf0VBGwygk +lIz3SpGUChkpJFmR9lBERrT8zu+P+7mf7+eOc85zznmee5nbAjb48PLw8MyS +4//z1MvmevaJPPOLr72zqz6am3dmSYda9MSAYZRDYbiLPKBE2zbpnhSYreUT +N3NRg2CHa918PbnwRnhWXNTFDJaMSKXMdF+H6ZL1K7s228HgHfuAie5aSJk0 +lFXY7Aqr2UMDY90doJlVcdXR2R9mug3Pjna/Ad6LRkrmNuFQ98+VvKe549AW +9aPl7JpEkB+s+rBN7Q+UJarvHvv3LIj7e1xb8A8fJjr97iiccwFStFdX2zvz +48DxK/9ec74EvWla98cWC2GVQ9RHI9M8OJEX2cYrswSHko2/rJe9AlJn3h5L +vSiGbnVZQQ1ZhRDvZG3eMSWBc3ipZOeSIpC90SrLO0cSC4f4Ay7cLIJSMacf +2oKS+DVcqHLgbhF0dbjTyUqSOGmbGr2utQjY6w9S660k0a5k/P23kSKoXZs9 +vz1dEk/zGSiwNIvhz+rJ1idmUuilI6e9tqgYDhhf8miOkcaIgEDf2JQSsMkR +nrA9KY2i4Dj6Ja0EqAXhCa1npVFt+ef9a7NLoL1zY9mzq9K40SbVbU5xCWjs +W8T3slUaU3WaWtQelsCngkMF32VlMDHoJDd5qgRcxe2H5cplcHLqqVmycyno +hlVHZ92RwX/Pd6lt3FoKC98slWQ2yGD/X11BSa9SqOLygUqvDArLCqbE+ZeC +pG1VktasDD7ln3qw/GgptEez9VbZyuLBZVciIrmlsPLbz8N738oiHWK+0mUu +F0Ktzix/8FUWP9p6dHsJcKH0knqf2JQs/ihrivMR5oK0k6dxFb8c1naYmLhL +c+HrrYc/+DTksIpp811cjQupMUkH00PksMH7Us75DVx4I6Gyt15IHnMn9OZ+ +z+SCVMA9BSkpeYyZ0yznnsMFu6bNT/wY8jgnVs/hYR4XKg6fUBPRlUf+V1Mi +sSVcOD44OuSyWR71jbVGmmu4oFNY7fstVx6D425Y+L3iQrTZei9ZIwU0bzxQ +PitCg5V71ndDSwUMOLVWZIkoDcJRX4462yngHtlviUriNFyoiy1I8lTAQ/vU +J3Slabhlc/vL/GMKWNeJfiYMGkY3s4LHexUw5XWtQo0mDe5Bk8cfhyni43uC +crl2NCift5QfilXEIu+7GpvtaTL+0yULkhRxJvzdbkEHGg7/XtZumaeI+dys +7X6ONJw96i5R9VgRo0QtHPi20PA4uTE7X0EJF4jUu3J30GBSmn7jyD0lVAzj +8RyKoGFld+ufkSYl3NX3kVczkgZ7nrlrPDqUcEd7q/7+KBq2b9jbC++V0N/u +od1IDA2rw5iRUfMYeHlZ+pqWeBr2KU1dtljBQGF4dWNxMg2T5UlNM5oMLLJ+ +HqaRQvpntWK4TI+Bz6nybutUGmL3expQ5gzMcDi0LvQsDRl1j5p41zMwyW67 +VXU6DfW+2cN1wQwc+1BY1HKJBuvfxqLhYQycDgj5XJtLQ2tSp4FeFANPb7v6 +oPIyDb1VAlF5xxj48/NFy4x8GkYED4rGXmCgSqVUsmUhDdK0leHqWgYKvH1S +zqBpuLjy7da/DQzUuylXP0ZM9UZEVbQwkM1uO3i/jAZ13vJmlecMNMn8eWtj +OQ2WTgquCz4x8FPHie4dFTT4T49FNQkxMWfz6SaJOySe+3dIfhBl4qqjPc5t +xPxDfUV80kwc7B1jxN2lIf9FXZc5xcRI1drALzU0vKw5q3bTgIm16WbiZx/Q +UGy4sLbDlImukT7ZRrUkXvSRTaPIRAu5Fv9eYslc35gVtkzMFkhqF62nYV2s +cc8lDyYmF/A89m6gQfFvyZ573kw8ggtDvxN/Dab4BvyY2Frx2T+ikYaEnYIa +0geZGDtwdMWJJhru2w4cPZXAxOq7NeJxj2g4Vb9epjiRvE9qkcBfYldOQ2lz +ChNDLCesDrTQMKPB7Z17kYlSW+aWOj+mQUc0WjOsjIk2qk6KP5/QwHNisj6t +gokFny9HubaS+eHbtaWimoldAUd07xDvntwQO/aQiVc3bk480EbitbdRVqSF +ifyXM/VbiPk/mtJq7UxsOzamxWinIa+H/cK3j4kD6t6sWuLA9en7YgeZ+Fj4 +kZzIUxrwkdD8y++YmN7e6edCPFA9pfVyhIkHtgYKfCAu1tvd8GuciZmBjq5L +O0g8Swa3yswwkWd+8IKdxJLZTXFOfBTutmL5DRK/k+LIB/JTGLhtDlPqGQ3X +k8rKTgtROPCkUdeOeF1MRv8jKQof7aj2LyVW/CUc+EmewgRhizMviL8eOLpg +PkXhql8eMvM7Sbx9/HUs1CjECCY4Em98+arRXZtCo1PM10HE7E3ObuEGFD7o +C3p7lvh7W/P3dFMKq0taV5cT37cyT6hECgVH+wVbiU89uK7wfBWFmks36H4g +djVRLf9uQ2FT6Ku7v4iXl2daLXYg1/NNioWfk/lasfilujN5foH4rCLx1EXZ +aN0tFKYrvA1XI54QUWYbe1Co/rcqxJB4LFqz0dybwj1LVo4D8ci48a6VfhTG +rFMfXkX8xWelkM1e0l+gfK2JP3Xb0+sOUGg23eZlQ/ze2sXROYRCD4V3A1bE +b6q3T22JIM+/XtS/knhQfW+6ZwyFiXNnXM2J+7NDzHbEUxj/bJOXPnHvkqOD +u09SqLu09/My4q6jiTH7kym8tlP9hxzxs8nzyofOUTgUN++4IHG7b25TeCaF +kTxil6fJ+J/0Fu+OySHjfbngn7fEj2wrhRPyKXx1/dyuFuLGuw/KEq+R910I +lC0jrtd87JTKpfCj5TrHM8QPLnX9SLtBYVbXK4n/56dG7HVGVhWFb5b0b/t/ +/qpjv3DyaijcZzhlokl868fkq8I6CteIvs/iJ77+YqHqzScUXrwtK3SDrAfu +WolHtzsoLKlrk44jLr6ntOd+N4WO0/rlzsQFl/XKW15TeJmaPjdM1t9lCdj4 +9AOFe2MbXt8kzom3nun6QqH98PKaMOKM3e7wZpKMd2uOBg/x+YGdbz7+pNBp +XLW+hqz3M+sOxA7PkvV7XWfkMPEp3YSWaQEWWvrX834l+yfmV9kmEUUWKham +WZaR/Ra5585PcRYLpe5NJrkShw82XJRdysJCuil0HnFw3Yu3yjosXC3wTMHh +//17Yt4+s9UsXBhWWN9E9v/OPyJilrYsPN3z+pcn8Y4A2Yo1Dix8fTX32RTJ +F56Omr83bCHtG7T7yhE7ybkk+O0lFgoxsmqmwayoOOfcORZqGBxYpv2QhheM +ouxVmSxsWmvvWULy2+FzhVkT2Sws8MlLViWujC64sKGQhSKDmz5I1JH8szkn +TfgOC3MtBXf13adh2bwzSXGvWXjL22wPH8m/TYdTTut/YOE8FZkMj2rSv9Gk +U++GWBgfMdZSdZvklxeJJy0nWPi+Fi12VtHAuB6f8Hc+G7uLFWNLSH6X9AiL +ClZj454wYYE+Uh9udoZGKmuzkRUS2CVJ7GQTcqRTn41J5wvK13NpSNEPCtcB +Nv7yhpwHJTQILQoIGVnPxvP7Yp2PX6NhbtW2fTsOkft1x1vukXo1JmrjubGW +jXSmY+e9MzT0+FPtuxrZyC36ZnKN1Mf7DT8h8jEbmysPHUwh9TPpcJHS1S42 +Dh/7s901iQatN4sGZ4bYGGf01L7rBA17y9rcLoopo8iQI3s7qc9D65y3vvNW +xhunl/l+3ENDR6F6y7SfMubHqvxO9KfhNt98U6EAZdRaZhOjs5uGY5UVsgah +ykhpv/UJ2knDUiXpvvhEZdSvj8h/s40G35G+zSsqlJFHYNurrZtIvjzpuTFw +gQqyFjSz281J+0NqlNYiFbzr4yOzgUPDjzUzw8OLVfDJuI97hykNC/lSYv1k +VTBo5nn/EyPS/9C6G57qKtg9YVdL69AQ4aMits5RBb+EiXxUUSHxN//atiJb +BTWTlrv1CZL6/+2Q9XsDVZyKrPOUyeeCvLZiHL+ZKp7VfZ4+5xIXRgLra1dY +qOJXvSVbP1zgwpmpxWaBtqrY71t5JP8MF17+KdSY9VBFmYq0+J9HuRC4qF9M +5pgqjjgkxM/ZxoWMZfjS7oUqrlmmn5giR74vt/MfuBG5FPco+HebxpaS/w0p +3vjaZSg2uPvSHE4JiD5ROUV/W45UHqUT87kI5BO4DgYGaqjip5Us73YN0lYY +LxbzVUc3Hou2xO6r8EjWQn88WQO/1+ho1Ky9AibytUmaXZp4s7HKpiEzH4T5 +cg96xWhh85EWXbn5eaAYrWTmoqKNM8zDmS6OuSCg7FqxoVEbRb976oVfzwEN +jgz3kJsOsjYZRF07mAWBL0XrbHh08dhH3l2Gvpnwbfyks3WaLmqUyR2dup4G +azQbMqzV9dBYcuO7cp1zUDNu+utHqx6u/ikem1GYCnvVdPqe+ujjVKeCk3NI +MnBGvDtdBAzQWkvA+mnyKVjFll4rlGuAkyXJOyp6jsPSqOMhtYaGeH//p86I +uHhY7mN8T7nPEOtqTcXd1/wLPjU7/72x3wiNriWXuSVHw72cTu8xCWMsaWxk +HBmKgImrsz80K40xM3U4VNgvFLYrFwlkrDXB4v5Al9bKIBhbnmpwfdQEaxom +t242DoRbeb9eTyaYYqxRmtmalr2wZSULTRXNcDJYTS7ltx/I7Ymv0rhvhk4u +zct5YnxAYqF/2dpNHPzMa6kWM+YFef9EHB514aDz6okbnW+8QCfi1D+prhx8 +NlGVr93pBfaj9PMeLw4mZfJfXVjpBXFdkzPb/Tl4xXDwhFGEF0znRloejubg +C1HTW0cEvaDPNPVZQREHA9wMrU9qesLOoLwL1qUcPBJ8J5NBecJU6U2frzQH +EyJcs2rEPUGU6vmhXcHBstEPJpoTHmDLryB/9z4HWTu0H4ce94A7nQXez55z +cIt9UHT2bXewEb6lHtzDwerg/OHpHHfoWdM8Jf2Cg4GZi/l94t1h4vaXBPdX +HDQcK5ALcnIH9UtaJZ+HyPVDzBMHvrnBnT6L4JPDHOyq2mLg1eUGNuKOoDnK +wYOym4y87rrBjvigpwcnOdjStVwi7YQbTNyPy5Ca5qABx7mvNdANYn6e3377 +JweDez49ktriBov1CtXc/nDQaLdMf6CFG2TtuT05O8vBc08V+V4tdYP/AKMS +VsQ= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vl8YAHDRIKHs7X3v+6Jh7/V6Hn4NKylUyiySUkoRIaOf0VBGwygk +lIz3SpGUChkpJFmR9lBERrT8zu+P+7mf7+eOc85zznmee5nbAjb48PLw8MyS +4//z1MvmevaJPPOLr72zqz6am3dmSYda9MSAYZRDYbiLPKBE2zbpnhSYreUT +N3NRg2CHa918PbnwRnhWXNTFDJaMSKXMdF+H6ZL1K7s228HgHfuAie5aSJk0 +lFXY7Aqr2UMDY90doJlVcdXR2R9mug3Pjna/Ad6LRkrmNuFQ98+VvKe549AW +9aPl7JpEkB+s+rBN7Q+UJarvHvv3LIj7e1xb8A8fJjr97iiccwFStFdX2zvz +48DxK/9ec74EvWla98cWC2GVQ9RHI9M8OJEX2cYrswSHko2/rJe9AlJn3h5L +vSiGbnVZQQ1ZhRDvZG3eMSWBc3ipZOeSIpC90SrLO0cSC4f4Ay7cLIJSMacf +2oKS+DVcqHLgbhF0dbjTyUqSOGmbGr2utQjY6w9S660k0a5k/P23kSKoXZs9 +vz1dEk/zGSiwNIvhz+rJ1idmUuilI6e9tqgYDhhf8miOkcaIgEDf2JQSsMkR +nrA9KY2i4Dj6Ja0EqAXhCa1npVFt+ef9a7NLoL1zY9mzq9K40SbVbU5xCWjs +W8T3slUaU3WaWtQelsCngkMF32VlMDHoJDd5qgRcxe2H5cplcHLqqVmycyno +hlVHZ92RwX/Pd6lt3FoKC98slWQ2yGD/X11BSa9SqOLygUqvDArLCqbE+ZeC +pG1VktasDD7ln3qw/GgptEez9VbZyuLBZVciIrmlsPLbz8N738oiHWK+0mUu +F0Ktzix/8FUWP9p6dHsJcKH0knqf2JQs/ihrivMR5oK0k6dxFb8c1naYmLhL +c+HrrYc/+DTksIpp811cjQupMUkH00PksMH7Us75DVx4I6Gyt15IHnMn9OZ+ +z+SCVMA9BSkpeYyZ0yznnsMFu6bNT/wY8jgnVs/hYR4XKg6fUBPRlUf+V1Mi +sSVcOD44OuSyWR71jbVGmmu4oFNY7fstVx6D425Y+L3iQrTZei9ZIwU0bzxQ +PitCg5V71ndDSwUMOLVWZIkoDcJRX4462yngHtlviUriNFyoiy1I8lTAQ/vU +J3Slabhlc/vL/GMKWNeJfiYMGkY3s4LHexUw5XWtQo0mDe5Bk8cfhyni43uC +crl2NCift5QfilXEIu+7GpvtaTL+0yULkhRxJvzdbkEHGg7/XtZumaeI+dys +7X6ONJw96i5R9VgRo0QtHPi20PA4uTE7X0EJF4jUu3J30GBSmn7jyD0lVAzj +8RyKoGFld+ufkSYl3NX3kVczkgZ7nrlrPDqUcEd7q/7+KBq2b9jbC++V0N/u +od1IDA2rw5iRUfMYeHlZ+pqWeBr2KU1dtljBQGF4dWNxMg2T5UlNM5oMLLJ+ +HqaRQvpntWK4TI+Bz6nybutUGmL3expQ5gzMcDi0LvQsDRl1j5p41zMwyW67 +VXU6DfW+2cN1wQwc+1BY1HKJBuvfxqLhYQycDgj5XJtLQ2tSp4FeFANPb7v6 +oPIyDb1VAlF5xxj48/NFy4x8GkYED4rGXmCgSqVUsmUhDdK0leHqWgYKvH1S +zqBpuLjy7da/DQzUuylXP0ZM9UZEVbQwkM1uO3i/jAZ13vJmlecMNMn8eWtj +OQ2WTgquCz4x8FPHie4dFTT4T49FNQkxMWfz6SaJOySe+3dIfhBl4qqjPc5t +xPxDfUV80kwc7B1jxN2lIf9FXZc5xcRI1drALzU0vKw5q3bTgIm16WbiZx/Q +UGy4sLbDlImukT7ZRrUkXvSRTaPIRAu5Fv9eYslc35gVtkzMFkhqF62nYV2s +cc8lDyYmF/A89m6gQfFvyZ573kw8ggtDvxN/Dab4BvyY2Frx2T+ikYaEnYIa +0geZGDtwdMWJJhru2w4cPZXAxOq7NeJxj2g4Vb9epjiRvE9qkcBfYldOQ2lz +ChNDLCesDrTQMKPB7Z17kYlSW+aWOj+mQUc0WjOsjIk2qk6KP5/QwHNisj6t +gokFny9HubaS+eHbtaWimoldAUd07xDvntwQO/aQiVc3bk480EbitbdRVqSF +ifyXM/VbiPk/mtJq7UxsOzamxWinIa+H/cK3j4kD6t6sWuLA9en7YgeZ+Fj4 +kZzIUxrwkdD8y++YmN7e6edCPFA9pfVyhIkHtgYKfCAu1tvd8GuciZmBjq5L +O0g8Swa3yswwkWd+8IKdxJLZTXFOfBTutmL5DRK/k+LIB/JTGLhtDlPqGQ3X +k8rKTgtROPCkUdeOeF1MRv8jKQof7aj2LyVW/CUc+EmewgRhizMviL8eOLpg +PkXhql8eMvM7Sbx9/HUs1CjECCY4Em98+arRXZtCo1PM10HE7E3ObuEGFD7o +C3p7lvh7W/P3dFMKq0taV5cT37cyT6hECgVH+wVbiU89uK7wfBWFmks36H4g +djVRLf9uQ2FT6Ku7v4iXl2daLXYg1/NNioWfk/lasfilujN5foH4rCLx1EXZ +aN0tFKYrvA1XI54QUWYbe1Co/rcqxJB4LFqz0dybwj1LVo4D8ci48a6VfhTG +rFMfXkX8xWelkM1e0l+gfK2JP3Xb0+sOUGg23eZlQ/ze2sXROYRCD4V3A1bE +b6q3T22JIM+/XtS/knhQfW+6ZwyFiXNnXM2J+7NDzHbEUxj/bJOXPnHvkqOD +u09SqLu09/My4q6jiTH7kym8tlP9hxzxs8nzyofOUTgUN++4IHG7b25TeCaF +kTxil6fJ+J/0Fu+OySHjfbngn7fEj2wrhRPyKXx1/dyuFuLGuw/KEq+R910I +lC0jrtd87JTKpfCj5TrHM8QPLnX9SLtBYVbXK4n/56dG7HVGVhWFb5b0b/t/ +/qpjv3DyaijcZzhlokl868fkq8I6CteIvs/iJ77+YqHqzScUXrwtK3SDrAfu +WolHtzsoLKlrk44jLr6ntOd+N4WO0/rlzsQFl/XKW15TeJmaPjdM1t9lCdj4 +9AOFe2MbXt8kzom3nun6QqH98PKaMOKM3e7wZpKMd2uOBg/x+YGdbz7+pNBp +XLW+hqz3M+sOxA7PkvV7XWfkMPEp3YSWaQEWWvrX834l+yfmV9kmEUUWKham +WZaR/Ra5585PcRYLpe5NJrkShw82XJRdysJCuil0HnFw3Yu3yjosXC3wTMHh +//17Yt4+s9UsXBhWWN9E9v/OPyJilrYsPN3z+pcn8Y4A2Yo1Dix8fTX32RTJ +F56Omr83bCHtG7T7yhE7ybkk+O0lFgoxsmqmwayoOOfcORZqGBxYpv2QhheM +ouxVmSxsWmvvWULy2+FzhVkT2Sws8MlLViWujC64sKGQhSKDmz5I1JH8szkn +TfgOC3MtBXf13adh2bwzSXGvWXjL22wPH8m/TYdTTut/YOE8FZkMj2rSv9Gk +U++GWBgfMdZSdZvklxeJJy0nWPi+Fi12VtHAuB6f8Hc+G7uLFWNLSH6X9AiL +ClZj454wYYE+Uh9udoZGKmuzkRUS2CVJ7GQTcqRTn41J5wvK13NpSNEPCtcB +Nv7yhpwHJTQILQoIGVnPxvP7Yp2PX6NhbtW2fTsOkft1x1vukXo1JmrjubGW +jXSmY+e9MzT0+FPtuxrZyC36ZnKN1Mf7DT8h8jEbmysPHUwh9TPpcJHS1S42 +Dh/7s901iQatN4sGZ4bYGGf01L7rBA17y9rcLoopo8iQI3s7qc9D65y3vvNW +xhunl/l+3ENDR6F6y7SfMubHqvxO9KfhNt98U6EAZdRaZhOjs5uGY5UVsgah +ykhpv/UJ2knDUiXpvvhEZdSvj8h/s40G35G+zSsqlJFHYNurrZtIvjzpuTFw +gQqyFjSz281J+0NqlNYiFbzr4yOzgUPDjzUzw8OLVfDJuI97hykNC/lSYv1k +VTBo5nn/EyPS/9C6G57qKtg9YVdL69AQ4aMits5RBb+EiXxUUSHxN//atiJb +BTWTlrv1CZL6/+2Q9XsDVZyKrPOUyeeCvLZiHL+ZKp7VfZ4+5xIXRgLra1dY +qOJXvSVbP1zgwpmpxWaBtqrY71t5JP8MF17+KdSY9VBFmYq0+J9HuRC4qF9M +5pgqjjgkxM/ZxoWMZfjS7oUqrlmmn5giR74vt/MfuBG5FPco+HebxpaS/w0p +3vjaZSg2uPvSHE4JiD5ROUV/W45UHqUT87kI5BO4DgYGaqjip5Us73YN0lYY +LxbzVUc3Hou2xO6r8EjWQn88WQO/1+ho1Ky9AibytUmaXZp4s7HKpiEzH4T5 +cg96xWhh85EWXbn5eaAYrWTmoqKNM8zDmS6OuSCg7FqxoVEbRb976oVfzwEN +jgz3kJsOsjYZRF07mAWBL0XrbHh08dhH3l2Gvpnwbfyks3WaLmqUyR2dup4G +azQbMqzV9dBYcuO7cp1zUDNu+utHqx6u/ikem1GYCnvVdPqe+ujjVKeCk3NI +MnBGvDtdBAzQWkvA+mnyKVjFll4rlGuAkyXJOyp6jsPSqOMhtYaGeH//p86I +uHhY7mN8T7nPEOtqTcXd1/wLPjU7/72x3wiNriWXuSVHw72cTu8xCWMsaWxk +HBmKgImrsz80K40xM3U4VNgvFLYrFwlkrDXB4v5Al9bKIBhbnmpwfdQEaxom +t242DoRbeb9eTyaYYqxRmtmalr2wZSULTRXNcDJYTS7ltx/I7Ymv0rhvhk4u +zct5YnxAYqF/2dpNHPzMa6kWM+YFef9EHB514aDz6okbnW+8QCfi1D+prhx8 +NlGVr93pBfaj9PMeLw4mZfJfXVjpBXFdkzPb/Tl4xXDwhFGEF0znRloejubg +C1HTW0cEvaDPNPVZQREHA9wMrU9qesLOoLwL1qUcPBJ8J5NBecJU6U2frzQH +EyJcs2rEPUGU6vmhXcHBstEPJpoTHmDLryB/9z4HWTu0H4ce94A7nQXez55z +cIt9UHT2bXewEb6lHtzDwerg/OHpHHfoWdM8Jf2Cg4GZi/l94t1h4vaXBPdX +HDQcK5ALcnIH9UtaJZ+HyPVDzBMHvrnBnT6L4JPDHOyq2mLg1eUGNuKOoDnK +wYOym4y87rrBjvigpwcnOdjStVwi7YQbTNyPy5Ca5qABx7mvNdANYn6e3377 +JweDez49ktriBov1CtXc/nDQaLdMf6CFG2TtuT05O8vBc08V+V4tdYP/AKMS +VsQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06575455558774562}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06575455558774562}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vl8YAHDRIKHs7X3v+6Jh7/V6Hn4NKylUyiySUkoRIaOf0VBGwygk +lIz3SpGUChkpJFmR9lBERrT8zu+P+7mf7+eOc85zznmee5nbAjb48PLw8MyS +4//z1MvmevaJPPOLr72zqz6am3dmSYda9MSAYZRDYbiLPKBE2zbpnhSYreUT +N3NRg2CHa918PbnwRnhWXNTFDJaMSKXMdF+H6ZL1K7s228HgHfuAie5aSJk0 +lFXY7Aqr2UMDY90doJlVcdXR2R9mug3Pjna/Ad6LRkrmNuFQ98+VvKe549AW +9aPl7JpEkB+s+rBN7Q+UJarvHvv3LIj7e1xb8A8fJjr97iiccwFStFdX2zvz +48DxK/9ec74EvWla98cWC2GVQ9RHI9M8OJEX2cYrswSHko2/rJe9AlJn3h5L +vSiGbnVZQQ1ZhRDvZG3eMSWBc3ipZOeSIpC90SrLO0cSC4f4Ay7cLIJSMacf +2oKS+DVcqHLgbhF0dbjTyUqSOGmbGr2utQjY6w9S660k0a5k/P23kSKoXZs9 +vz1dEk/zGSiwNIvhz+rJ1idmUuilI6e9tqgYDhhf8miOkcaIgEDf2JQSsMkR +nrA9KY2i4Dj6Ja0EqAXhCa1npVFt+ef9a7NLoL1zY9mzq9K40SbVbU5xCWjs +W8T3slUaU3WaWtQelsCngkMF32VlMDHoJDd5qgRcxe2H5cplcHLqqVmycyno +hlVHZ92RwX/Pd6lt3FoKC98slWQ2yGD/X11BSa9SqOLygUqvDArLCqbE+ZeC +pG1VktasDD7ln3qw/GgptEez9VbZyuLBZVciIrmlsPLbz8N738oiHWK+0mUu +F0Ktzix/8FUWP9p6dHsJcKH0knqf2JQs/ihrivMR5oK0k6dxFb8c1naYmLhL +c+HrrYc/+DTksIpp811cjQupMUkH00PksMH7Us75DVx4I6Gyt15IHnMn9OZ+ +z+SCVMA9BSkpeYyZ0yznnsMFu6bNT/wY8jgnVs/hYR4XKg6fUBPRlUf+V1Mi +sSVcOD44OuSyWR71jbVGmmu4oFNY7fstVx6D425Y+L3iQrTZei9ZIwU0bzxQ +PitCg5V71ndDSwUMOLVWZIkoDcJRX4462yngHtlviUriNFyoiy1I8lTAQ/vU +J3Slabhlc/vL/GMKWNeJfiYMGkY3s4LHexUw5XWtQo0mDe5Bk8cfhyni43uC +crl2NCift5QfilXEIu+7GpvtaTL+0yULkhRxJvzdbkEHGg7/XtZumaeI+dys +7X6ONJw96i5R9VgRo0QtHPi20PA4uTE7X0EJF4jUu3J30GBSmn7jyD0lVAzj +8RyKoGFld+ufkSYl3NX3kVczkgZ7nrlrPDqUcEd7q/7+KBq2b9jbC++V0N/u +od1IDA2rw5iRUfMYeHlZ+pqWeBr2KU1dtljBQGF4dWNxMg2T5UlNM5oMLLJ+ +HqaRQvpntWK4TI+Bz6nybutUGmL3expQ5gzMcDi0LvQsDRl1j5p41zMwyW67 +VXU6DfW+2cN1wQwc+1BY1HKJBuvfxqLhYQycDgj5XJtLQ2tSp4FeFANPb7v6 +oPIyDb1VAlF5xxj48/NFy4x8GkYED4rGXmCgSqVUsmUhDdK0leHqWgYKvH1S +zqBpuLjy7da/DQzUuylXP0ZM9UZEVbQwkM1uO3i/jAZ13vJmlecMNMn8eWtj +OQ2WTgquCz4x8FPHie4dFTT4T49FNQkxMWfz6SaJOySe+3dIfhBl4qqjPc5t +xPxDfUV80kwc7B1jxN2lIf9FXZc5xcRI1drALzU0vKw5q3bTgIm16WbiZx/Q +UGy4sLbDlImukT7ZRrUkXvSRTaPIRAu5Fv9eYslc35gVtkzMFkhqF62nYV2s +cc8lDyYmF/A89m6gQfFvyZ573kw8ggtDvxN/Dab4BvyY2Frx2T+ikYaEnYIa +0geZGDtwdMWJJhru2w4cPZXAxOq7NeJxj2g4Vb9epjiRvE9qkcBfYldOQ2lz +ChNDLCesDrTQMKPB7Z17kYlSW+aWOj+mQUc0WjOsjIk2qk6KP5/QwHNisj6t +gokFny9HubaS+eHbtaWimoldAUd07xDvntwQO/aQiVc3bk480EbitbdRVqSF +ifyXM/VbiPk/mtJq7UxsOzamxWinIa+H/cK3j4kD6t6sWuLA9en7YgeZ+Fj4 +kZzIUxrwkdD8y++YmN7e6edCPFA9pfVyhIkHtgYKfCAu1tvd8GuciZmBjq5L +O0g8Swa3yswwkWd+8IKdxJLZTXFOfBTutmL5DRK/k+LIB/JTGLhtDlPqGQ3X +k8rKTgtROPCkUdeOeF1MRv8jKQof7aj2LyVW/CUc+EmewgRhizMviL8eOLpg +PkXhql8eMvM7Sbx9/HUs1CjECCY4Em98+arRXZtCo1PM10HE7E3ObuEGFD7o +C3p7lvh7W/P3dFMKq0taV5cT37cyT6hECgVH+wVbiU89uK7wfBWFmks36H4g +djVRLf9uQ2FT6Ku7v4iXl2daLXYg1/NNioWfk/lasfilujN5foH4rCLx1EXZ +aN0tFKYrvA1XI54QUWYbe1Co/rcqxJB4LFqz0dybwj1LVo4D8ci48a6VfhTG +rFMfXkX8xWelkM1e0l+gfK2JP3Xb0+sOUGg23eZlQ/ze2sXROYRCD4V3A1bE +b6q3T22JIM+/XtS/knhQfW+6ZwyFiXNnXM2J+7NDzHbEUxj/bJOXPnHvkqOD +u09SqLu09/My4q6jiTH7kym8tlP9hxzxs8nzyofOUTgUN++4IHG7b25TeCaF +kTxil6fJ+J/0Fu+OySHjfbngn7fEj2wrhRPyKXx1/dyuFuLGuw/KEq+R910I +lC0jrtd87JTKpfCj5TrHM8QPLnX9SLtBYVbXK4n/56dG7HVGVhWFb5b0b/t/ +/qpjv3DyaijcZzhlokl868fkq8I6CteIvs/iJ77+YqHqzScUXrwtK3SDrAfu +WolHtzsoLKlrk44jLr6ntOd+N4WO0/rlzsQFl/XKW15TeJmaPjdM1t9lCdj4 +9AOFe2MbXt8kzom3nun6QqH98PKaMOKM3e7wZpKMd2uOBg/x+YGdbz7+pNBp +XLW+hqz3M+sOxA7PkvV7XWfkMPEp3YSWaQEWWvrX834l+yfmV9kmEUUWKham +WZaR/Ra5585PcRYLpe5NJrkShw82XJRdysJCuil0HnFw3Yu3yjosXC3wTMHh +//17Yt4+s9UsXBhWWN9E9v/OPyJilrYsPN3z+pcn8Y4A2Yo1Dix8fTX32RTJ +F56Omr83bCHtG7T7yhE7ybkk+O0lFgoxsmqmwayoOOfcORZqGBxYpv2QhheM +ouxVmSxsWmvvWULy2+FzhVkT2Sws8MlLViWujC64sKGQhSKDmz5I1JH8szkn +TfgOC3MtBXf13adh2bwzSXGvWXjL22wPH8m/TYdTTut/YOE8FZkMj2rSv9Gk +U++GWBgfMdZSdZvklxeJJy0nWPi+Fi12VtHAuB6f8Hc+G7uLFWNLSH6X9AiL +ClZj454wYYE+Uh9udoZGKmuzkRUS2CVJ7GQTcqRTn41J5wvK13NpSNEPCtcB +Nv7yhpwHJTQILQoIGVnPxvP7Yp2PX6NhbtW2fTsOkft1x1vukXo1JmrjubGW +jXSmY+e9MzT0+FPtuxrZyC36ZnKN1Mf7DT8h8jEbmysPHUwh9TPpcJHS1S42 +Dh/7s901iQatN4sGZ4bYGGf01L7rBA17y9rcLoopo8iQI3s7qc9D65y3vvNW +xhunl/l+3ENDR6F6y7SfMubHqvxO9KfhNt98U6EAZdRaZhOjs5uGY5UVsgah +ykhpv/UJ2knDUiXpvvhEZdSvj8h/s40G35G+zSsqlJFHYNurrZtIvjzpuTFw +gQqyFjSz281J+0NqlNYiFbzr4yOzgUPDjzUzw8OLVfDJuI97hykNC/lSYv1k +VTBo5nn/EyPS/9C6G57qKtg9YVdL69AQ4aMits5RBb+EiXxUUSHxN//atiJb +BTWTlrv1CZL6/+2Q9XsDVZyKrPOUyeeCvLZiHL+ZKp7VfZ4+5xIXRgLra1dY +qOJXvSVbP1zgwpmpxWaBtqrY71t5JP8MF17+KdSY9VBFmYq0+J9HuRC4qF9M +5pgqjjgkxM/ZxoWMZfjS7oUqrlmmn5giR74vt/MfuBG5FPco+HebxpaS/w0p +3vjaZSg2uPvSHE4JiD5ROUV/W45UHqUT87kI5BO4DgYGaqjip5Us73YN0lYY +LxbzVUc3Hou2xO6r8EjWQn88WQO/1+ho1Ky9AibytUmaXZp4s7HKpiEzH4T5 +cg96xWhh85EWXbn5eaAYrWTmoqKNM8zDmS6OuSCg7FqxoVEbRb976oVfzwEN +jgz3kJsOsjYZRF07mAWBL0XrbHh08dhH3l2Gvpnwbfyks3WaLmqUyR2dup4G +azQbMqzV9dBYcuO7cp1zUDNu+utHqx6u/ikem1GYCnvVdPqe+ujjVKeCk3NI +MnBGvDtdBAzQWkvA+mnyKVjFll4rlGuAkyXJOyp6jsPSqOMhtYaGeH//p86I +uHhY7mN8T7nPEOtqTcXd1/wLPjU7/72x3wiNriWXuSVHw72cTu8xCWMsaWxk +HBmKgImrsz80K40xM3U4VNgvFLYrFwlkrDXB4v5Al9bKIBhbnmpwfdQEaxom +t242DoRbeb9eTyaYYqxRmtmalr2wZSULTRXNcDJYTS7ltx/I7Ymv0rhvhk4u +zct5YnxAYqF/2dpNHPzMa6kWM+YFef9EHB514aDz6okbnW+8QCfi1D+prhx8 +NlGVr93pBfaj9PMeLw4mZfJfXVjpBXFdkzPb/Tl4xXDwhFGEF0znRloejubg +C1HTW0cEvaDPNPVZQREHA9wMrU9qesLOoLwL1qUcPBJ8J5NBecJU6U2frzQH +EyJcs2rEPUGU6vmhXcHBstEPJpoTHmDLryB/9z4HWTu0H4ce94A7nQXez55z +cIt9UHT2bXewEb6lHtzDwerg/OHpHHfoWdM8Jf2Cg4GZi/l94t1h4vaXBPdX +HDQcK5ALcnIH9UtaJZ+HyPVDzBMHvrnBnT6L4JPDHOyq2mLg1eUGNuKOoDnK +wYOym4y87rrBjvigpwcnOdjStVwi7YQbTNyPy5Ca5qABx7mvNdANYn6e3377 +JweDez49ktriBov1CtXc/nDQaLdMf6CFG2TtuT05O8vBc08V+V4tdYP/AKMS +VsQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06575455558774562}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06575455558774562}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357059644907*^9}, + CellLabel-> + "Out[152]=",ExpressionUUID->"fb4892eb-08de-4e6a-a1ef-31e1a04fb8d6"] +}, Open ]], Cell[CellGroupData[{ @@ -13343,66 +15353,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[142]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], + "In[153]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 93, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097599506`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.4491725433258356`*^-164\\\", \ +RowBox[{\\\"161198658118785115956678299518758546564\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"68\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9916936247705600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 153, + 73, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994357059701839*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], +In[153]:=",ExpressionUUID->"e9e039b7-83db-47a1-aad8-dc76fc7eb3df"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 94, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909769953*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.86003495008144`*^-167\\\", \ +RowBox[{\\\"505518991860510123640143147290826802026\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"71\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9512072804761600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 153, + 74, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.99435705970986*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], +In[153]:=",ExpressionUUID->"d98052ae-31df-4f54-a9b1-e8c0d7f37772"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 142, 95, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097784023`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.301875990004343`*^-170\\\", \ +RowBox[{\\\"164243120455479739170682508554789627978\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4724542670438400000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 153, + 75, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994357059718532*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], +In[153]:=",ExpressionUUID->"58bbfb9c-03c7-4f41-8b1a-78c4af3a00fb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 142, 96, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909786396*^9}, +during this calculation.\"", 2, 153, 76, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.9943570597268257`*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], +In[153]:=",ExpressionUUID->"01984af7-b826-46e3-a094-6f626977857d"], -Cell[BoxData["11.275343508420296`"], "Output", - CellChangeTimes->{3.9913279159698696`*^9}, +Cell[BoxData["11.864219552395992`"], "Output", + CellChangeTimes->{3.9913279159698696`*^9, 3.994357136618598*^9}, CellLabel-> - "Out[142]=",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] + "Out[153]=",ExpressionUUID->"33bb618d-dfc6-4344-adb6-8ec62f3cf504"] }, Open ]], Cell[CellGroupData[{ @@ -13469,68 +15486,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99179998339209*^9, - 3.991799988637089*^9}},ExpressionUUID->"a5e0631c-6c6c-a045-8418-\ -22c641e38d86"], + CellChangeTimes->{{3.99179998339209*^9, 3.991799988637089*^9}}, + CellLabel-> + "In[154]:=",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 143, 97, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916008396*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.63092258254143`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 154, + 77, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.994357136668079*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], +In[154]:=",ExpressionUUID->"843c1870-2d9e-4863-bc9d-dd49b02530f8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 143, 98, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916018362*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.962162887627517`*^-221\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 154, + 78, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.9943571366768723`*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], +In[154]:=",ExpressionUUID->"999c225c-1a3b-4c69-a63b-6b4a7babcb50"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 143, - 99, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279160263577`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.972042486426643`*^-226\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 154, + 79, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.9943571366870613`*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], +In[154]:=",ExpressionUUID->"7238dddb-0b00-4ec1-8746-3c47b8749681"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 143, 100, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916034359*^9}, +during this calculation.\"", 2, 154, 80, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.994357136695022*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], +In[154]:=",ExpressionUUID->"c29a164d-f163-42d3-b3e5-46f1f8aa3fc4"], -Cell[BoxData["1.0734937398087425`"], "Output", - CellChangeTimes->{3.991327922931429*^9}, +Cell[BoxData["0.28331176809188235`"], "Output", + CellChangeTimes->{3.991327922931429*^9, 3.9943571466259127`*^9}, CellLabel-> - "Out[143]=",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] + "Out[154]=",ExpressionUUID->"419e7d53-8622-4995-8d3e-dad9ec533f49"] }, Open ]], Cell[CellGroupData[{ @@ -13551,8 +15575,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13597,68 +15620,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799991275097*^9, - 3.9917999948700333`*^9}},ExpressionUUID->"4b6c44e4-d946-0c4d-9992-\ -4f0fc7048689"], + CellChangeTimes->{{3.991799991275097*^9, 3.9917999948700333`*^9}}, + CellLabel-> + "In[155]:=",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 144, 101, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229664307`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.63092258254143`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 155, + 81, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.9943571466795187`*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], +In[155]:=",ExpressionUUID->"6d87f0be-640b-463e-8359-0b21a3a87c8f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 144, 102, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327922975607*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.962162887627517`*^-221\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 155, + 82, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994357146689477*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], +In[155]:=",ExpressionUUID->"bdcedad8-9042-4fde-ac80-c3f381f8758a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 144, - 103, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229836063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.972042486426643`*^-226\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 155, + 83, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994357146699201*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], +In[155]:=",ExpressionUUID->"9a15d40f-bbac-4286-ba20-380df3ff2384"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 144, 104, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229916077`*^9}, +during this calculation.\"", 2, 155, 84, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994357146709058*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], +In[155]:=",ExpressionUUID->"1aaaae80-5cbd-4c31-a100-e8864b0c4e81"], -Cell[BoxData["9.48093127226425`"], "Output", - CellChangeTimes->{3.9913279288200035`*^9}, +Cell[BoxData["36.51886262836491`"], "Output", + CellChangeTimes->{3.9913279288200035`*^9, 3.994357156258422*^9}, CellLabel-> - "Out[144]=",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] + "Out[155]=",ExpressionUUID->"96e4cac2-9e93-41d6-853c-d9cee5bb00b6"] }, Open ]], Cell[CellGroupData[{ @@ -13679,8 +15709,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13725,68 +15754,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918000011431293`*^9, - 3.9918000068677616`*^9}},ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-\ -32244819d42b"], + CellChangeTimes->{{3.9918000011431293`*^9, 3.9918000068677616`*^9}}, + CellLabel-> + "In[156]:=",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 145, 105, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928854006*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.63092258254143`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 156, + 85, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.99435715631074*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], +In[156]:=",ExpressionUUID->"e6466b35-7af9-42ba-82a3-bebc24b7144e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 145, 106, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928864023*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.962162887627517`*^-221\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 156, + 86, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.9943571563192577`*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], +In[156]:=",ExpressionUUID->"f9e37ee4-e821-4f31-9bd8-1ee2f164ecd5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 145, - 107, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928871004*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.972042486426643`*^-226\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 156, + 87, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994357156329414*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], +In[156]:=",ExpressionUUID->"28e38e03-7268-4f56-bd1a-900d8e515f44"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 145, 108, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928878006*^9}, +during this calculation.\"", 2, 156, 88, 31388290457991345798, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994357156339361*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], +In[156]:=",ExpressionUUID->"7c2489b5-22fe-4b31-a405-eb07aa0c8895"], -Cell[BoxData["17.503865312709518`"], "Output", - CellChangeTimes->{3.9913279320131683`*^9}, +Cell[BoxData["6.28450066473031`"], "Output", + CellChangeTimes->{3.9913279320131683`*^9, 3.9943571641543827`*^9}, CellLabel-> - "Out[145]=",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] + "Out[156]=",ExpressionUUID->"bda2cada-76e5-4153-8a6e-f7821173e7df"] }, Open ]], Cell[CellGroupData[{ @@ -13795,18 +15831,22 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991800029528055*^9, - 3.991800041720209*^9}},ExpressionUUID->"99da2760-e71e-1246-8cc9-\ -f0a7464dc747"], - -Cell[BoxData["0.08333108480569339`"], "Output", - CellChangeTimes->{3.9913279320452003`*^9}, + CellChangeTimes->{{3.991800029528055*^9, 3.991800041720209*^9}}, CellLabel-> - "Out[146]=",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] + "In[157]:=",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], + +Cell[BoxData["0.01870124865273203`"], "Output", + CellChangeTimes->{3.9913279320452003`*^9, 3.994357164204753*^9}, + CellLabel-> + "Out[157]=",ExpressionUUID->"3b82b5e2-06a1-4a1a-b90d-28f3cae9b3bd"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"527555fe-54f3-44c3-a217-b0e3a0006c5f"], + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[158]:=",ExpressionUUID->"527555fe-54f3-44c3-a217-b0e3a0006c5f"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ @@ -13896,12 +15936,59 @@ Cell[BoxData[ RowBox[{"FrameMargins", "->", "10"}]}], "]"}], ",", "\"\\""}], "]"}], "]"}], "\n"}]], "Input", CellChangeTimes->{{3.9943043996512623`*^9, 3.994304399651291*^9}}, - CellLabel->"In[1]:=",ExpressionUUID->"a128aec6-d32e-4b4c-ac3d-b3e8d65a0e32"] + CellLabel-> + "In[159]:=",ExpressionUUID->"a128aec6-d32e-4b4c-ac3d-b3e8d65a0e32"], + +Cell[BoxData[ + PanelBox[ + TemplateBox[{ + StyleBox[ + "\"\:0423\:043f\:0440\:0430\:0432\:043b\:0435\:043d\:0438\:0435 \:043a\ +\:044d\:0448\:0435\:043c \:0433\:0440\:0430\:0444\:0438\:043a\:0430: \"", + Bold, StripOnInput -> False], + ButtonBox[ + "\"\:0421\:0434\:0435\:043b\:0430\:0442\:044c \:0442\:0430\:0431\:043b\ +\:0438\:0446\:0443 (\:041b\:0438\:043d\:0438\:044f 1)\"", ButtonFunction :> + Module[{$CellContext`cell, $CellContext`pts}, $CellContext`cell = + NotebookRead[ + EvaluationNotebook[]]; $CellContext`pts = + Cases[$CellContext`cell, Line[ + Pattern[$CellContext`p, + Blank[]]] :> $CellContext`p, Infinity]; + If[Length[$CellContext`pts] > + 0, $CellContext`plotX = + Part[$CellContext`pts, 1]; $CellContext`fInterp = + Interpolation[$CellContext`plotX]; $CellContext`dataX = + Table[{$CellContext`x, + $CellContext`fInterp[$CellContext`x]}, {$CellContext`x, 0, 30, + 1}]; SelectionMove[ + EvaluationNotebook[], After, Cell]; CellPrint[ + Cell[ + BoxData[ + ToBoxes[ + TableForm[$CellContext`dataX]]], "Output"]], + MessageDialog[ + "\:041e\:0448\:0438\:0431\:043a\:0430: \ +\:0421\:043d\:0430\:0447\:0430\:043b\:0430 \:0432\:044b\:0434\:0435\:043b\ +\:0438\:0442\:0435 \:043d\:0443\:0436\:043d\:044b\:0439 \:0433\:0440\:0430\ +\:0444\:0438\:043a (\:043a\:043b\:0438\:043a\:043d\:0438\:0442\:0435 \:043f\ +\:043e \:0435\:0433\:043e \:044f\:0447\:0435\:0439\:043a\:0435 \:0441\:043f\ +\:0440\:0430\:0432\:0430)!", WindowFloating -> True]]], Background -> + RGBColor[0.9, 0.95, 1], ImageSize -> {180, 25}, Appearance -> Automatic, + Evaluator -> Automatic, Method -> "Preemptive"]}, + "RowDefault"], + Background->GrayLevel[0.95], + FrameMargins->10]], "Output", + CellChangeTimes->{ + 3.994357164399106*^9},ExpressionUUID->"fa6c6c39-9d69-431c-95d2-\ +51cc4d50378a"] +}, Open ]] }, +Evaluator->"kernel 5", WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, 18}}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, -Magnification:>1.8 Inherited, +Magnification:>1. Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"8af74bcb-cc50-f64a-8d83-c4bf7188d038" @@ -13918,666 +16005,679 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 357, 7, 66, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], -Cell[936, 31, 309, 6, 75, "Output",ExpressionUUID->"3fc602ac-3528-4c94-84c5-2cbef5e80e13"] +Cell[576, 22, 352, 6, 36, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], +Cell[931, 30, 350, 5, 41, "Output",ExpressionUUID->"0211607a-6fe5-4115-a2d3-585fd7c353aa"] }, Open ]], Cell[CellGroupData[{ -Cell[1282, 42, 253, 5, 66, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], -Cell[1538, 49, 256, 5, 75, "Output",ExpressionUUID->"4f849138-67dc-4f8f-a590-302d10dd42f8"] +Cell[1318, 40, 248, 4, 36, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], +Cell[1569, 46, 296, 5, 41, "Output",ExpressionUUID->"f5dc4be6-7844-4e18-ad5e-9f27bc0b00cb"] }, Open ]], Cell[CellGroupData[{ -Cell[1831, 59, 226, 5, 66, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], -Cell[2060, 66, 256, 5, 75, "Output",ExpressionUUID->"3cd98634-bc13-4797-bd1e-44036ef78eae"] +Cell[1902, 56, 221, 4, 36, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], +Cell[2126, 62, 298, 5, 41, "Output",ExpressionUUID->"d93f69d2-7ead-4b0d-9f89-46ed8b16470c"] }, Open ]], Cell[CellGroupData[{ -Cell[2353, 76, 180, 4, 66, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], -Cell[2536, 82, 254, 5, 75, "Output",ExpressionUUID->"2ed4a14c-942a-49b9-97cf-650a63a78bd7"] +Cell[2461, 72, 175, 3, 36, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], +Cell[2639, 77, 296, 5, 41, "Output",ExpressionUUID->"ec066b6a-8b6f-4bac-ab08-f551cfb1ef9b"] }, Open ]], Cell[CellGroupData[{ -Cell[2827, 92, 262, 8, 96, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], -Cell[3092, 102, 257, 5, 75, "Output",ExpressionUUID->"7339c118-72c2-44a2-9f22-c2b2b05f227c"] +Cell[2972, 87, 257, 7, 54, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], +Cell[3232, 96, 298, 5, 41, "Output",ExpressionUUID->"a8ee3c45-707c-4dfc-9daf-8aa504e3ab26"] }, Open ]], Cell[CellGroupData[{ -Cell[3386, 112, 136, 3, 66, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], -Cell[3525, 117, 260, 5, 75, "Output",ExpressionUUID->"28f1d5a1-0e10-4e5e-b143-6cff63710154"] +Cell[3567, 106, 131, 2, 36, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], +Cell[3701, 110, 305, 5, 41, "Output",ExpressionUUID->"be481da4-1f19-472f-9412-b87e1674ef1d"] }, Open ]], Cell[CellGroupData[{ -Cell[3822, 127, 281, 7, 66, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], -Cell[4106, 136, 274, 5, 75, "Output",ExpressionUUID->"5761785b-e83b-4033-87d8-d639fb22d04e"] +Cell[4043, 120, 276, 6, 36, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], +Cell[4322, 128, 321, 5, 41, "Output",ExpressionUUID->"4d135054-57b0-4c87-86e0-b0e4e8e0403a"] }, Open ]], Cell[CellGroupData[{ -Cell[4417, 146, 262, 8, 66, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], -Cell[4682, 156, 273, 5, 75, "Output",ExpressionUUID->"d081c0b4-e157-44f9-995c-e4b29a26d538"] +Cell[4680, 138, 257, 7, 36, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], +Cell[4940, 147, 318, 5, 41, "Output",ExpressionUUID->"ed073459-ed50-471d-a390-8cc08bd0d7c5"] }, Open ]], Cell[CellGroupData[{ -Cell[4992, 166, 208, 4, 66, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], -Cell[5203, 172, 236, 4, 75, "Output",ExpressionUUID->"9a9d3de4-8d49-4ce6-b09a-f943956af81a"] +Cell[5295, 157, 203, 3, 36, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], +Cell[5501, 162, 279, 4, 41, "Output",ExpressionUUID->"87a85976-6a8d-46f0-97e8-e2b026e8a39b"] }, Open ]], Cell[CellGroupData[{ -Cell[5476, 181, 208, 4, 66, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], -Cell[5687, 187, 239, 4, 75, "Output",ExpressionUUID->"4298dfcb-9ee1-4f34-b816-bac4ec6dc561"] +Cell[5817, 171, 204, 3, 36, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], +Cell[6024, 176, 285, 4, 41, "Output",ExpressionUUID->"2d9d12b9-3a76-4737-b38e-22b298cd2982"] }, Open ]], Cell[CellGroupData[{ -Cell[5963, 196, 133, 3, 66, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], -Cell[6099, 201, 253, 5, 75, "Output",ExpressionUUID->"d9184f92-9bb2-4c4b-9db1-4e3bb144d8f8"] +Cell[6346, 185, 129, 2, 36, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], +Cell[6478, 189, 297, 5, 41, "Output",ExpressionUUID->"6e41356c-3a4c-42ba-be95-634a1b8e3fe8"] }, Open ]], Cell[CellGroupData[{ -Cell[6389, 211, 133, 3, 66, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], -Cell[6525, 216, 252, 5, 75, "Output",ExpressionUUID->"5ac4bc3d-c931-4057-ac88-d6789946171a"] +Cell[6812, 199, 129, 2, 36, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], +Cell[6944, 203, 300, 5, 41, "Output",ExpressionUUID->"2b7ee59a-035c-4879-a2b3-48468d018211"] }, Open ]], Cell[CellGroupData[{ -Cell[6814, 226, 561, 20, 175, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], -Cell[7378, 248, 273, 5, 75, "Output",ExpressionUUID->"9b91c36a-db9d-42da-b92b-c7b40571889f"] +Cell[7281, 213, 557, 19, 100, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], +Cell[7841, 234, 319, 5, 41, "Output",ExpressionUUID->"647e1c27-db39-48b6-acfa-40fc717fef8d"] }, Open ]], Cell[CellGroupData[{ -Cell[7688, 258, 561, 20, 175, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], -Cell[8252, 280, 271, 5, 75, "Output",ExpressionUUID->"507e61f7-abca-4b67-8dc5-3d5ec9783365"] +Cell[8197, 244, 557, 19, 100, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], +Cell[8757, 265, 317, 5, 41, "Output",ExpressionUUID->"eb3dc632-c1de-4c8d-9924-01f47e101b50"] }, Open ]], Cell[CellGroupData[{ -Cell[8560, 290, 1592, 51, 362, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], -Cell[10155, 343, 267, 5, 75, "Output",ExpressionUUID->"291a5445-9c07-4345-8353-f120ed249482"] +Cell[9111, 275, 1588, 50, 103, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], +Cell[10702, 327, 313, 5, 41, "Output",ExpressionUUID->"82ba81ad-e0d2-48ac-84c3-de5d833b0dac"] }, Open ]], Cell[CellGroupData[{ -Cell[10459, 353, 1426, 47, 362, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], -Cell[11888, 402, 286, 6, 75, "Output",ExpressionUUID->"5b05c19a-5a42-434f-b92a-b1f47e2f4e8f"] +Cell[11052, 337, 1422, 46, 73, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], +Cell[12477, 385, 329, 6, 41, "Output",ExpressionUUID->"ca616573-cf24-4f57-9fa3-09aa97025541"] }, Open ]], Cell[CellGroupData[{ -Cell[12211, 413, 1426, 47, 362, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], -Cell[13640, 462, 289, 6, 75, "Output",ExpressionUUID->"60602193-828e-4b81-87ed-b00b2b05b82f"] +Cell[12843, 396, 1422, 46, 73, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], +Cell[14268, 444, 333, 6, 41, "Output",ExpressionUUID->"0e80cb92-e21e-4027-813f-1bd67441e5c7"] }, Open ]], Cell[CellGroupData[{ -Cell[13966, 473, 1592, 51, 362, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], -Cell[15561, 526, 268, 5, 75, "Output",ExpressionUUID->"e6bca617-3902-4eca-8236-6d0027a75f4e"] +Cell[14638, 455, 1588, 50, 103, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], +Cell[16229, 507, 312, 5, 41, "Output",ExpressionUUID->"caa863d1-2656-4d6a-8606-adec8c9b58fb"] }, Open ]], Cell[CellGroupData[{ -Cell[15866, 536, 135, 3, 66, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], -Cell[16004, 541, 256, 5, 75, "Output",ExpressionUUID->"3e8c5d25-0de1-4e74-b9dd-68362990eebb"] +Cell[16578, 517, 131, 2, 36, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], +Cell[16712, 521, 302, 5, 41, "Output",ExpressionUUID->"789f7836-f634-40da-ab4a-7f302eb4eb78"] }, Open ]], Cell[CellGroupData[{ -Cell[16297, 551, 137, 3, 66, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], -Cell[16437, 556, 258, 5, 75, "Output",ExpressionUUID->"cd3a6b77-4e62-43ff-b252-05f31a46f5cb"] +Cell[17051, 531, 133, 2, 36, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], +Cell[17187, 535, 301, 5, 41, "Output",ExpressionUUID->"debdb4eb-0834-4a56-a883-363921fd08ff"] }, Open ]], Cell[CellGroupData[{ -Cell[16732, 566, 138, 3, 66, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], -Cell[16873, 571, 260, 5, 75, "Output",ExpressionUUID->"dcaf9709-20b7-4905-9536-0b209c2add16"] +Cell[17525, 545, 134, 2, 36, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], +Cell[17662, 549, 306, 5, 41, "Output",ExpressionUUID->"808f1f6d-fed3-4d81-bc9c-ae84f042b28a"] }, Open ]], Cell[CellGroupData[{ -Cell[17170, 581, 223, 5, 66, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], -Cell[17396, 588, 269, 6, 75, "Output",ExpressionUUID->"a2f17eea-ff78-41e5-a0f8-94c185156e70"] +Cell[18005, 559, 219, 4, 36, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], +Cell[18227, 565, 315, 6, 41, "Output",ExpressionUUID->"121a8111-f810-4833-8d04-7f9069b659e2"] }, Open ]], Cell[CellGroupData[{ -Cell[17702, 599, 138, 3, 66, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], -Cell[17843, 604, 260, 5, 75, "Output",ExpressionUUID->"20afb8c7-cabc-4a1d-bac4-8a4c5fc59dc3"] +Cell[18579, 576, 134, 2, 36, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], +Cell[18716, 580, 304, 5, 41, "Output",ExpressionUUID->"a1b3f4ba-24ff-4707-bef3-54693baa8c8b"] }, Open ]], Cell[CellGroupData[{ -Cell[18140, 614, 326, 6, 66, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], -Cell[18469, 622, 253, 5, 75, "Output",ExpressionUUID->"124c5170-d79c-46db-8f5c-077b8f0967e5"] +Cell[19057, 590, 322, 5, 36, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], +Cell[19382, 597, 297, 5, 41, "Output",ExpressionUUID->"706e89c6-677d-46a4-9fc5-2e46791600f8"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 632, 302, 6, 66, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], -Cell[19064, 640, 259, 5, 75, "Output",ExpressionUUID->"fca7c3f2-dd09-401a-af5a-7f0e5b5e9132"] +Cell[19716, 607, 298, 5, 36, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], +Cell[20017, 614, 303, 5, 41, "Output",ExpressionUUID->"46e0c0e5-cd3e-4ebd-9210-a395ddbcdd0f"] }, Open ]], Cell[CellGroupData[{ -Cell[19360, 650, 223, 5, 66, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], -Cell[19586, 657, 250, 5, 75, "Output",ExpressionUUID->"d9b69473-2971-460e-a714-eae49ac84666"] +Cell[20357, 624, 219, 4, 36, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], +Cell[20579, 630, 294, 5, 41, "Output",ExpressionUUID->"6f3ab082-c2cf-4e53-a1aa-558fb050e63d"] }, Open ]], Cell[CellGroupData[{ -Cell[19873, 667, 354, 11, 96, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], -Cell[20230, 680, 273, 5, 75, "Output",ExpressionUUID->"00c63b3f-dab3-49c9-922a-1e7d3688cfb1"] +Cell[20910, 640, 350, 10, 54, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], +Cell[21263, 652, 316, 5, 41, "Output",ExpressionUUID->"04659478-ee3a-4379-b318-999c8cb10e71"] }, Open ]], Cell[CellGroupData[{ -Cell[20540, 690, 354, 11, 96, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], -Cell[20897, 703, 290, 6, 75, "Output",ExpressionUUID->"f2128c71-5723-4e55-89de-f77cd15b4fe5"] +Cell[21616, 662, 350, 10, 54, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], +Cell[21969, 674, 336, 6, 41, "Output",ExpressionUUID->"33826626-ec6a-4d7e-a374-912494ee9c8a"] }, Open ]], Cell[CellGroupData[{ -Cell[21224, 714, 998, 27, 184, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], -Cell[22225, 743, 274, 5, 75, "Output",ExpressionUUID->"f4e19122-13ac-414b-a7a7-f55a8e585c1c"] +Cell[22342, 685, 994, 26, 55, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], +Cell[23339, 713, 318, 5, 41, "Output",ExpressionUUID->"d4613267-dc7a-43a7-b268-6484d95e2a01"] }, Open ]], Cell[CellGroupData[{ -Cell[22536, 753, 203, 4, 66, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], -Cell[22742, 759, 251, 5, 75, "Output",ExpressionUUID->"786707a3-5ae1-4f3f-9e44-ba1a667edd9a"] +Cell[23694, 723, 199, 3, 36, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], +Cell[23896, 728, 295, 5, 41, "Output",ExpressionUUID->"dfbc06e8-d6fe-4518-b2df-81c71de6c032"] }, Open ]], Cell[CellGroupData[{ -Cell[23030, 769, 331, 6, 66, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], -Cell[23364, 777, 230, 4, 75, "Output",ExpressionUUID->"24e5bd3c-736c-4608-8299-b5f235e43e65"] +Cell[24228, 738, 327, 5, 36, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], +Cell[24558, 745, 274, 4, 41, "Output",ExpressionUUID->"02e8d446-028e-4e34-9c8e-f31e8a29957a"] }, Open ]], -Cell[23609, 784, 177, 3, 66, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], +Cell[24847, 752, 173, 2, 36, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ -Cell[23811, 791, 331, 6, 66, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], -Cell[24145, 799, 234, 4, 75, "Output",ExpressionUUID->"58b53ca7-159f-4d71-8f37-af3258d4d69e"] +Cell[25045, 758, 327, 5, 36, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], +Cell[25375, 765, 277, 4, 41, "Output",ExpressionUUID->"ece8b04c-0dde-4ed5-9804-b15344f7911d"] }, Open ]], -Cell[24394, 806, 177, 3, 66, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], +Cell[25667, 772, 173, 2, 36, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ -Cell[24596, 813, 333, 6, 66, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], -Cell[24932, 821, 231, 4, 75, "Output",ExpressionUUID->"f73fb9ad-0086-4816-a9b4-52f06c0e52cf"] +Cell[25865, 778, 329, 5, 36, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], +Cell[26197, 785, 277, 4, 41, "Output",ExpressionUUID->"31a1aad9-690f-4656-b58b-c58448f335d7"] }, Open ]], -Cell[25178, 828, 177, 3, 66, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], +Cell[26489, 792, 173, 2, 36, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ -Cell[25380, 835, 357, 6, 66, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], -Cell[25740, 843, 230, 4, 75, "Output",ExpressionUUID->"3541afd6-40de-41d5-bbb1-c1fb477483ed"] +Cell[26687, 798, 353, 5, 36, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], +Cell[27043, 805, 274, 4, 41, "Output",ExpressionUUID->"da59bbac-ce3d-47f0-acb5-85c7d441ccce"] }, Open ]], -Cell[25985, 850, 175, 3, 66, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], +Cell[27332, 812, 171, 2, 36, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ -Cell[26185, 857, 303, 6, 66, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], -Cell[26491, 865, 232, 4, 75, "Output",ExpressionUUID->"ffccf229-8842-4c96-ab81-eea6ca750c9c"] +Cell[27528, 818, 299, 5, 36, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], +Cell[27830, 825, 275, 4, 41, "Output",ExpressionUUID->"4958b489-978a-48a4-bc64-651475583339"] }, Open ]], -Cell[26738, 872, 175, 3, 66, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], +Cell[28120, 832, 171, 2, 36, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ -Cell[26938, 879, 309, 6, 66, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], -Cell[27250, 887, 233, 4, 75, "Output",ExpressionUUID->"84bc00a8-b4db-4f18-869f-1dc6f274f90a"] +Cell[28316, 838, 305, 5, 36, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], +Cell[28624, 845, 279, 4, 41, "Output",ExpressionUUID->"2344b4ad-9c8e-49df-9531-87fade6278c5"] }, Open ]], -Cell[27498, 894, 177, 3, 66, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], +Cell[28918, 852, 173, 2, 36, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ -Cell[27700, 901, 331, 6, 66, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], -Cell[28034, 909, 235, 4, 75, "Output",ExpressionUUID->"afae8fea-407d-479f-bc74-13b51d067251"] +Cell[29116, 858, 327, 5, 36, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], +Cell[29446, 865, 281, 4, 41, "Output",ExpressionUUID->"fb28d662-9bce-4a7c-95d2-647993ba634e"] }, Open ]], -Cell[28284, 916, 176, 3, 66, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], +Cell[29742, 872, 172, 2, 36, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ -Cell[28485, 923, 280, 5, 66, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], -Cell[28768, 930, 232, 4, 75, "Output",ExpressionUUID->"4561d0db-e274-4df4-af17-d05cbed75663"] +Cell[29939, 878, 276, 4, 36, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], +Cell[30218, 884, 280, 4, 41, "Output",ExpressionUUID->"cccc3751-1187-406d-a282-e6ac65bc3eaa"] }, Open ]], -Cell[29015, 937, 179, 3, 66, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], +Cell[30513, 891, 175, 2, 36, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ -Cell[29219, 944, 19813, 486, 5405, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], -Cell[49035, 1432, 271, 5, 75, "Output",ExpressionUUID->"a0b6eb77-7a40-4149-8996-69298baaa115"] +Cell[30713, 897, 19957, 489, 1708, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], +Cell[50673, 1388, 315, 5, 41, "Output",ExpressionUUID->"c370d58d-da13-4477-93ad-80a86d846a04"] }, Open ]], Cell[CellGroupData[{ -Cell[49343, 1442, 19752, 490, 5343, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], -Cell[69098, 1934, 266, 5, 75, "Output",ExpressionUUID->"a3d1a840-0b00-4050-9772-7b0edc7352af"] +Cell[51025, 1398, 19896, 493, 1718, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], +Cell[70924, 1893, 309, 5, 41, "Output",ExpressionUUID->"e2308fe8-701e-42b6-b0be-3a0db3243b1e"] }, Open ]], Cell[CellGroupData[{ -Cell[69401, 1944, 19752, 484, 5342, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], -Cell[89156, 2430, 287, 6, 75, "Output",ExpressionUUID->"12933a3f-52b7-4098-aa18-656cd2cc71ec"] +Cell[71270, 1903, 20044, 491, 1717, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], +Cell[91317, 2396, 331, 6, 41, "Output",ExpressionUUID->"3d5ade7e-df55-4551-a2ec-9f6213a06306"] }, Open ]], Cell[CellGroupData[{ -Cell[89480, 2441, 22538, 554, 6074, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], -Cell[112021, 2997, 288, 6, 75, "Output",ExpressionUUID->"0c25fe6b-f86a-4093-b345-52a763c8e9c0"] +Cell[91685, 2407, 22830, 561, 1882, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], +Cell[114518, 2970, 332, 6, 41, "Output",ExpressionUUID->"20a7f23e-60ad-44ad-b851-23315a688a93"] }, Open ]], Cell[CellGroupData[{ -Cell[112346, 3008, 22539, 554, 6074, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], -Cell[134888, 3564, 291, 6, 75, "Output",ExpressionUUID->"8a2bdd3e-5197-4470-852a-259650b2ba2b"] +Cell[114887, 2981, 22831, 561, 1882, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], +Cell[137721, 3544, 337, 6, 41, "Output",ExpressionUUID->"d4cf8660-80e6-42be-945f-a676f35c3c6f"] }, Open ]], Cell[CellGroupData[{ -Cell[135216, 3575, 25495, 627, 6806, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], -Cell[160714, 4204, 290, 6, 75, "Output",ExpressionUUID->"667240dd-2ffb-4aab-953f-74203839a2e1"] +Cell[138095, 3555, 25787, 634, 2075, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], +Cell[163885, 4191, 335, 6, 41, "Output",ExpressionUUID->"abeeb80f-1d80-465c-9c75-54345b619d3e"] }, Open ]], Cell[CellGroupData[{ -Cell[161041, 4215, 134, 3, 66, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], -Cell[161178, 4220, 253, 5, 75, "Output",ExpressionUUID->"0febcc1d-bcb8-46cb-8034-9f3685156a5a"] +Cell[164257, 4202, 130, 2, 36, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], +Cell[164390, 4206, 298, 5, 41, "Output",ExpressionUUID->"98a39736-d1cb-4d05-a72b-3a56acb462dd"] }, Open ]], Cell[CellGroupData[{ -Cell[161468, 4230, 134, 3, 66, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], -Cell[161605, 4235, 254, 5, 75, "Output",ExpressionUUID->"1ef2b21c-2c62-42da-bdf7-e8a8ac672482"] +Cell[164725, 4216, 130, 2, 36, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], +Cell[164858, 4220, 300, 5, 41, "Output",ExpressionUUID->"7ba87a4b-7067-4f2d-8a2b-b444649b0cf2"] }, Open ]], Cell[CellGroupData[{ -Cell[161896, 4245, 1148, 40, 246, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], -Cell[163047, 4287, 269, 5, 75, "Output",ExpressionUUID->"959de20e-e319-4821-856a-2db061248dc4"] +Cell[165195, 4230, 1144, 39, 73, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], +Cell[166342, 4271, 315, 5, 41, "Output",ExpressionUUID->"51cc03bd-3ae7-4f25-a359-24646e9018d7"] }, Open ]], Cell[CellGroupData[{ -Cell[163353, 4297, 1045, 36, 246, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], -Cell[164401, 4335, 288, 6, 75, "Output",ExpressionUUID->"b1db9611-48bc-4896-beb1-8a7875512d81"] +Cell[166694, 4281, 1041, 35, 73, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], +Cell[167738, 4318, 332, 6, 41, "Output",ExpressionUUID->"b7438d1a-3921-41c3-8a31-696609d6eeb7"] }, Open ]], Cell[CellGroupData[{ -Cell[164726, 4346, 1148, 40, 246, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], -Cell[165877, 4388, 272, 5, 75, "Output",ExpressionUUID->"19482b06-bfbf-42e1-966f-1ca5e68041c0"] +Cell[168107, 4329, 1144, 39, 73, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], +Cell[169254, 4370, 316, 5, 41, "Output",ExpressionUUID->"79a4d956-2830-4f57-828a-229a937547d4"] }, Open ]], Cell[CellGroupData[{ -Cell[166186, 4398, 112, 2, 66, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], -Cell[166301, 4402, 269, 5, 75, "Output",ExpressionUUID->"267767d6-895f-4ba6-9f0e-daa9a1fe3161"] +Cell[169607, 4380, 108, 1, 36, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], +Cell[169718, 4383, 315, 5, 41, "Output",ExpressionUUID->"a909946d-abb5-472f-bd27-7a0ba10fb004"] }, Open ]], Cell[CellGroupData[{ -Cell[166607, 4412, 112, 2, 66, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], -Cell[166722, 4416, 290, 6, 75, "Output",ExpressionUUID->"5400b027-5158-4fa7-b234-3e43d63912b9"] +Cell[170070, 4393, 108, 1, 36, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], +Cell[170181, 4396, 333, 6, 41, "Output",ExpressionUUID->"02d3827e-ac23-48f8-8d9c-bd00ba3e30bc"] }, Open ]], Cell[CellGroupData[{ -Cell[167049, 4427, 112, 2, 66, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], -Cell[167164, 4431, 287, 6, 75, "Output",ExpressionUUID->"f4a32333-db17-466f-aba5-bb9d6b4f6399"] +Cell[170551, 4407, 108, 1, 36, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], +Cell[170662, 4410, 330, 6, 41, "Output",ExpressionUUID->"2f4cc4ff-ff11-411f-b3ab-5a75d88747e1"] }, Open ]], Cell[CellGroupData[{ -Cell[167488, 4442, 112, 2, 66, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], -Cell[167603, 4446, 269, 5, 75, "Output",ExpressionUUID->"797ae031-4fc8-4710-8404-04a4b2f96865"] +Cell[171029, 4421, 108, 1, 36, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], +Cell[171140, 4424, 310, 5, 41, "Output",ExpressionUUID->"4afe8b63-f647-4a13-bc04-01116abd427f"] }, Open ]], Cell[CellGroupData[{ -Cell[167909, 4456, 111, 2, 66, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], -Cell[168023, 4460, 272, 5, 75, "Output",ExpressionUUID->"eedb8b45-7ad3-46ef-8609-79a186c2fdce"] +Cell[171487, 4434, 107, 1, 36, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], +Cell[171597, 4437, 314, 5, 41, "Output",ExpressionUUID->"899de076-b908-4393-ac79-acd5b0fbf419"] }, Open ]], Cell[CellGroupData[{ -Cell[168332, 4470, 111, 2, 66, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], -Cell[168446, 4474, 272, 5, 75, "Output",ExpressionUUID->"9fa255bb-5bc5-4f09-a647-1262633ab9fe"] +Cell[171948, 4447, 107, 1, 36, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], +Cell[172058, 4450, 316, 5, 41, "Output",ExpressionUUID->"81ce74e9-7497-4cea-a2a1-c193cceca629"] }, Open ]], Cell[CellGroupData[{ -Cell[168755, 4484, 501, 17, 125, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], -Cell[169259, 4503, 287, 6, 75, "Output",ExpressionUUID->"3bf14ac4-0082-4302-a700-78211a962477"] +Cell[172411, 4460, 497, 16, 71, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], +Cell[172911, 4478, 333, 6, 41, "Output",ExpressionUUID->"7b9e663d-f844-4eb6-a221-9e05e7d08aa9"] }, Open ]], Cell[CellGroupData[{ -Cell[169583, 4514, 501, 17, 125, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], -Cell[170087, 4533, 283, 6, 75, "Output",ExpressionUUID->"113930a9-872c-495e-bde6-8f11ffae2542"] +Cell[173281, 4489, 497, 16, 71, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], +Cell[173781, 4507, 326, 6, 41, "Output",ExpressionUUID->"db7f1667-21d4-4315-b8da-b9fb5850e0a5"] }, Open ]], Cell[CellGroupData[{ -Cell[170407, 4544, 1792, 61, 420, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], -Cell[172202, 4607, 271, 5, 75, "Output",ExpressionUUID->"70fb2170-70df-4335-9ac8-39307964fc8d"] +Cell[174144, 4518, 1788, 60, 142, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], +Cell[175935, 4580, 315, 5, 41, "Output",ExpressionUUID->"d89b424a-90e1-49f2-a201-002c7af4b9a9"] }, Open ]], Cell[CellGroupData[{ -Cell[172510, 4617, 1105, 37, 299, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], -Cell[173618, 4656, 284, 6, 75, "Output",ExpressionUUID->"05b5d827-ff10-4026-8f0c-2872ed10ebff"] +Cell[176287, 4590, 1101, 36, 73, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], +Cell[177391, 4628, 328, 6, 41, "Output",ExpressionUUID->"f442cdd3-e2b9-4f3a-8acd-03467056db65"] }, Open ]], Cell[CellGroupData[{ -Cell[173939, 4667, 1822, 62, 420, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], -Cell[175764, 4731, 268, 5, 75, "Output",ExpressionUUID->"7434ab66-9dcb-4d49-8c6a-0df4b4475a0d"] +Cell[177756, 4639, 1818, 61, 144, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], +Cell[179577, 4702, 311, 5, 41, "Output",ExpressionUUID->"7fc5ad71-9fe9-4f2e-97c4-765ed1ba6a48"] }, Open ]], Cell[CellGroupData[{ -Cell[176069, 4741, 1635, 54, 368, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], -Cell[177707, 4797, 267, 5, 75, "Output",ExpressionUUID->"4b878535-e718-450b-a3c7-d6c0db830348"] +Cell[179925, 4712, 1838, 59, 144, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], +Cell[181766, 4773, 311, 5, 41, "Output",ExpressionUUID->"b42afbfd-beae-4ae6-8c4b-e53eff755c5a"] }, Open ]], Cell[CellGroupData[{ -Cell[178011, 4807, 1635, 54, 368, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], -Cell[179649, 4863, 268, 5, 75, "Output",ExpressionUUID->"9f930ce4-b2ee-4b45-a127-641eb26351ff"] +Cell[182114, 4783, 1838, 59, 144, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], +Cell[183955, 4844, 314, 5, 41, "Output",ExpressionUUID->"08f9c4d2-722d-496f-9fc3-4bdec11fc44d"] }, Open ]], Cell[CellGroupData[{ -Cell[179954, 4873, 239, 5, 66, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], -Cell[180196, 4880, 238, 4, 75, "Output",ExpressionUUID->"391f95c9-de39-4fb1-a3ca-696e27495551"] +Cell[184306, 4854, 235, 4, 36, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], +Cell[184544, 4860, 282, 4, 41, "Output",ExpressionUUID->"ee803447-dcdc-45cc-a609-13d62eb66c84"] }, Open ]], -Cell[180449, 4887, 176, 3, 66, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], +Cell[184841, 4867, 172, 2, 36, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ -Cell[180650, 4894, 208, 4, 66, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], -Cell[180861, 4900, 234, 4, 75, "Output",ExpressionUUID->"8b262717-73bc-4c33-a610-384f7df79d4f"] +Cell[185038, 4873, 204, 3, 36, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], +Cell[185245, 4878, 278, 4, 41, "Output",ExpressionUUID->"7afd1b64-8302-4434-8904-7016c21b175b"] }, Open ]], -Cell[181110, 4907, 177, 3, 66, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], +Cell[185538, 4885, 173, 2, 36, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ -Cell[181312, 4914, 1301, 43, 257, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], -Cell[182616, 4959, 275, 5, 75, "Output",ExpressionUUID->"def1fdc3-5344-4f30-9489-17424043f7f2"] +Cell[185736, 4891, 1297, 42, 61, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], +Cell[187036, 4935, 319, 5, 41, "Output",ExpressionUUID->"d07b45b1-218c-4b5e-928b-fb7ef10176ee"] }, Open ]], Cell[CellGroupData[{ -Cell[182928, 4969, 931, 31, 221, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], -Cell[183862, 5002, 270, 5, 75, "Output",ExpressionUUID->"63676d78-49e5-47b8-a6dd-5a44c183f616"] +Cell[187392, 4945, 927, 30, 73, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], +Cell[188322, 4977, 314, 5, 41, "Output",ExpressionUUID->"4b8176ab-7954-4639-9945-f585207b26c5"] }, Open ]], Cell[CellGroupData[{ -Cell[184169, 5012, 907, 30, 221, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], -Cell[185079, 5044, 276, 5, 75, "Output",ExpressionUUID->"63823632-182e-4c64-b161-34283d2cde3b"] +Cell[188673, 4987, 903, 29, 73, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], +Cell[189579, 5018, 320, 5, 41, "Output",ExpressionUUID->"ca645373-57ce-42c7-9979-332ca1e6ddb7"] }, Open ]], Cell[CellGroupData[{ -Cell[185392, 5054, 558, 19, 118, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], -Cell[185953, 5075, 663, 10, 75, "Output",ExpressionUUID->"0415d3ae-f93e-4008-a13c-8fbbe0d44767"] +Cell[189936, 5028, 554, 18, 66, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], +Cell[190493, 5048, 707, 10, 41, "Output",ExpressionUUID->"842b0afd-1c8c-474d-a467-74975a191504"] }, Open ]], Cell[CellGroupData[{ -Cell[186653, 5090, 665, 22, 118, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], -Cell[187321, 5114, 648, 10, 75, "Output",ExpressionUUID->"0e1c76cb-1795-408e-ad42-c1004833256f"] +Cell[191237, 5063, 661, 21, 66, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], +Cell[191901, 5086, 691, 10, 41, "Output",ExpressionUUID->"f5def6a7-901a-40f1-bebc-93ffd19c040f"] }, Open ]], Cell[CellGroupData[{ -Cell[188006, 5129, 170, 5, 125, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], -Cell[188179, 5136, 670, 10, 75, "Output",ExpressionUUID->"f46856f5-b2fd-4da9-8170-a8a6196179fb"] +Cell[192629, 5101, 166, 4, 71, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], +Cell[192798, 5107, 714, 10, 41, "Output",ExpressionUUID->"d9fe5784-16bf-4d67-acc6-2877e8b3ac83"] }, Open ]], Cell[CellGroupData[{ -Cell[188886, 5151, 236, 6, 123, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], -Cell[189125, 5159, 614, 10, 75, "Output",ExpressionUUID->"a7d5ab5d-d1f0-43ef-8e4e-de717cfc04c9"] +Cell[193549, 5122, 232, 5, 69, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], +Cell[193784, 5129, 656, 9, 41, "Output",ExpressionUUID->"4e738042-b39c-45c0-9e46-44b6e25c2932"] }, Open ]], Cell[CellGroupData[{ -Cell[189776, 5174, 223, 6, 97, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], -Cell[190002, 5182, 642, 10, 75, "Output",ExpressionUUID->"bbf0f360-d4e0-4196-bece-8505377ce7cc"] +Cell[194477, 5143, 219, 5, 55, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], +Cell[194699, 5150, 687, 10, 41, "Output",ExpressionUUID->"3cbe3d5c-85a8-4dbb-92e3-4dd9c84ccbb1"] }, Open ]], Cell[CellGroupData[{ -Cell[190681, 5197, 181, 5, 97, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], -Cell[190865, 5204, 661, 10, 75, "Output",ExpressionUUID->"6d655ba4-795f-4384-b27a-a1797175c6f4"] +Cell[195423, 5165, 177, 4, 55, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], +Cell[195603, 5171, 705, 10, 41, "Output",ExpressionUUID->"cca8dfed-96d2-478f-910e-057ae4f05c14"] }, Open ]], Cell[CellGroupData[{ -Cell[191563, 5219, 6055, 185, 1319, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], -Cell[197621, 5406, 647, 10, 75, "Output",ExpressionUUID->"9dadf9c6-f8e2-4617-9081-918009d02169"] +Cell[196345, 5186, 6051, 184, 431, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], +Cell[202399, 5372, 693, 10, 41, "Output",ExpressionUUID->"1645b462-39f3-4aca-ad2c-3e64ac05c705"] }, Open ]], Cell[CellGroupData[{ -Cell[198305, 5421, 387, 10, 94, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], -Cell[198695, 5433, 641, 11, 75, "Output",ExpressionUUID->"5dab7f55-a32f-4f72-bcf3-e3aca25987b6"] +Cell[203129, 5387, 383, 9, 53, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], +Cell[203515, 5398, 685, 11, 41, "Output",ExpressionUUID->"fb92bb1d-d5ba-47ce-9b2c-438727365ad1"] }, Open ]], -Cell[199351, 5447, 492, 10, 66, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], +Cell[204215, 5412, 488, 9, 36, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ -Cell[199868, 5461, 558, 19, 118, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], -Cell[200429, 5482, 271, 5, 75, "Output",ExpressionUUID->"83d94100-49ff-4018-9255-21615cdd3c63"] +Cell[204728, 5425, 554, 18, 66, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], +Cell[205285, 5445, 319, 5, 41, "Output",ExpressionUUID->"c160013b-2e47-44d7-a6d8-61fc6d2c5128"] }, Open ]], Cell[CellGroupData[{ -Cell[200737, 5492, 623, 21, 118, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], -Cell[201363, 5515, 274, 5, 75, "Output",ExpressionUUID->"f8a823cc-70a2-4079-a54e-45e6573131e1"] +Cell[205641, 5455, 619, 20, 66, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], +Cell[206263, 5477, 320, 5, 41, "Output",ExpressionUUID->"7f0a9c6f-0c62-4ba7-91ab-5cef48ccf0f0"] }, Open ]], Cell[CellGroupData[{ -Cell[201674, 5525, 170, 5, 125, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], -Cell[201847, 5532, 272, 5, 75, "Output",ExpressionUUID->"6e210646-ff3d-433f-9f7c-eb08e5103a5a"] +Cell[206620, 5487, 166, 4, 71, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], +Cell[206789, 5493, 318, 5, 41, "Output",ExpressionUUID->"9d10b3b0-b14c-4869-a024-f764dad30738"] }, Open ]], Cell[CellGroupData[{ -Cell[202156, 5542, 170, 5, 123, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], -Cell[202329, 5549, 267, 5, 75, "Output",ExpressionUUID->"a80c5baf-122f-40e1-a188-5f47b5defd9e"] +Cell[207144, 5503, 166, 4, 69, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], +Cell[207313, 5509, 313, 5, 41, "Output",ExpressionUUID->"7b25f5a1-8f9b-4bf6-8b97-aa9e767c9499"] }, Open ]], Cell[CellGroupData[{ -Cell[202633, 5559, 181, 5, 97, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], -Cell[202817, 5566, 269, 5, 75, "Output",ExpressionUUID->"0fcac2cc-227f-47b7-8c25-9217ae55eedf"] +Cell[207663, 5519, 177, 4, 55, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], +Cell[207843, 5525, 315, 5, 41, "Output",ExpressionUUID->"ff875b53-7e22-435a-bf3f-72b0f1b371fa"] }, Open ]], Cell[CellGroupData[{ -Cell[203123, 5576, 181, 5, 97, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], -Cell[203307, 5583, 276, 5, 75, "Output",ExpressionUUID->"11bb211a-1c67-48f5-81ef-dd7ced5b9302"] +Cell[208195, 5535, 177, 4, 55, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], +Cell[208375, 5541, 320, 5, 41, "Output",ExpressionUUID->"e290c36f-8155-4af7-a400-34c100b8550f"] }, Open ]], Cell[CellGroupData[{ -Cell[203620, 5593, 6055, 185, 1319, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], -Cell[209678, 5780, 276, 5, 75, "Output",ExpressionUUID->"d33d9a25-fd34-4c8a-95bc-605e67bd6e39"] +Cell[208732, 5551, 6051, 184, 431, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], +Cell[214786, 5737, 322, 5, 41, "Output",ExpressionUUID->"34557d34-70ce-46fd-802a-a85ebc01b7fc"] }, Open ]], Cell[CellGroupData[{ -Cell[209991, 5790, 410, 10, 130, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], -Cell[210404, 5802, 317, 6, 111, "Output",ExpressionUUID->"fbc45696-2ee6-4ea2-907a-fbeeb97788ce"] +Cell[215145, 5747, 406, 9, 73, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], +Cell[215554, 5758, 363, 6, 61, "Output",ExpressionUUID->"2099507b-e3d3-41e8-868d-57df95626b67"] }, Open ]], Cell[CellGroupData[{ -Cell[210758, 5813, 6122, 187, 1319, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], -Cell[216883, 6002, 275, 5, 75, "Output",ExpressionUUID->"d7430364-d0a0-462b-9337-8679c65e00f9"] +Cell[215954, 5769, 6118, 186, 431, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], +Cell[222075, 5957, 321, 5, 41, "Output",ExpressionUUID->"5d89a418-fb14-4da5-8e93-dad0858ffd94"] }, Open ]], Cell[CellGroupData[{ -Cell[217195, 6012, 368, 9, 94, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], -Cell[217566, 6023, 271, 5, 75, "Output",ExpressionUUID->"d0ddf07d-61bc-416d-8ea7-6f9ad44673a1"] +Cell[222433, 5967, 364, 8, 53, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], +Cell[222800, 5977, 317, 5, 41, "Output",ExpressionUUID->"26435ed9-60d6-4e0c-9719-517c2d145d23"] }, Open ]], Cell[CellGroupData[{ -Cell[217874, 6033, 2663, 88, 746, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], -Cell[220540, 6123, 271, 5, 75, "Output",ExpressionUUID->"fb65cba0-d58a-4938-b9c1-d9606ddafbb1"] +Cell[223154, 5987, 2659, 87, 215, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], +Cell[225816, 6076, 317, 5, 41, "Output",ExpressionUUID->"39a5e33e-a8da-4d29-aad1-206b378a2272"] }, Open ]], Cell[CellGroupData[{ -Cell[220848, 6133, 2603, 85, 746, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], -Cell[223454, 6220, 270, 5, 75, "Output",ExpressionUUID->"957ef34c-e797-48a7-a7c9-80d9833a59e9"] +Cell[226170, 6086, 2599, 84, 215, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], +Cell[228772, 6172, 316, 5, 41, "Output",ExpressionUUID->"3691eace-048c-4951-aee4-24856dd93c6f"] }, Open ]], Cell[CellGroupData[{ -Cell[223761, 6230, 3712, 118, 982, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], -Cell[227476, 6350, 270, 5, 75, "Output",ExpressionUUID->"08b1b256-2cf1-417f-8b4f-b7280ea4ec91"] +Cell[229125, 6182, 3708, 117, 316, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], +Cell[232836, 6301, 314, 5, 41, "Output",ExpressionUUID->"8aa0e643-8ead-4966-9998-c9e33a36eb08"] }, Open ]], -Cell[227761, 6358, 164, 4, 66, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], +Cell[233165, 6309, 164, 4, 36, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ -Cell[227950, 6366, 2075, 59, 484, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], -Cell[230028, 6427, 709, 15, 129, "Message",ExpressionUUID->"00468604-1b8d-4d45-b381-4ffac8adbce7"], -Cell[230740, 6444, 711, 15, 129, "Message",ExpressionUUID->"6ee4886b-82ba-4317-96bd-cb63f5c63680"], -Cell[231454, 6461, 710, 15, 129, "Message",ExpressionUUID->"319b1807-8cb5-4fc1-9985-bc2e0a059e8a"], -Cell[232167, 6478, 572, 13, 58, "Message",ExpressionUUID->"7e95a6cd-0269-49b0-9a40-d11ed65485ae"], -Cell[232742, 6493, 271, 5, 75, "Output",ExpressionUUID->"ddc17924-7e0a-4f6c-a3a2-9b2a834fd61d"] +Cell[233354, 6317, 2244, 63, 66, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], +Cell[235601, 6382, 791, 17, 53, "Message",ExpressionUUID->"71a2a665-941a-4296-b3d2-9664025fea2c"], +Cell[236395, 6401, 792, 17, 53, "Message",ExpressionUUID->"8f89f7bd-877e-487b-a1ad-fa3b5a133376"], +Cell[237190, 6420, 793, 17, 53, "Message",ExpressionUUID->"91f3df15-ef60-4c24-8618-79d7b4778426"], +Cell[237986, 6439, 619, 14, 32, "Message",ExpressionUUID->"b8e75be5-a9b7-47d1-89d3-809859288334"], +Cell[238608, 6455, 319, 6, 41, "Output",ExpressionUUID->"ea7c1f9f-a189-45a6-8eac-89787766d400"] }, Open ]], Cell[CellGroupData[{ -Cell[233050, 6503, 2077, 59, 484, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], -Cell[235130, 6564, 682, 14, 129, "Message",ExpressionUUID->"4c68f761-ea3f-4c87-876c-62086f5bcc44"], -Cell[235815, 6580, 681, 14, 129, "Message",ExpressionUUID->"a89778a4-dcbd-43da-9dd2-fcdc8860506a"], -Cell[236499, 6596, 680, 14, 129, "Message",ExpressionUUID->"c60293b6-0417-4ab5-8f7b-df0ce979bf76"], -Cell[237182, 6612, 544, 12, 58, "Message",ExpressionUUID->"e9513b1d-a7ee-41e2-a2f2-0646bf0bb0c6"], -Cell[237729, 6626, 231, 4, 75, "Output",ExpressionUUID->"1a927ee9-82c8-44e4-a73a-d779472d297e"] +Cell[238964, 6466, 2246, 63, 66, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], +Cell[241213, 6531, 762, 16, 53, "Message",ExpressionUUID->"3d48e147-9cb7-4aa6-8211-739651b96ed3"], +Cell[241978, 6549, 762, 16, 53, "Message",ExpressionUUID->"6e655486-3d5b-4197-8c8c-aeb960979642"], +Cell[242743, 6567, 762, 16, 53, "Message",ExpressionUUID->"54540c32-3b36-4a79-ad63-bb0e5ef2de52"], +Cell[243508, 6585, 589, 13, 32, "Message",ExpressionUUID->"d3481921-98d5-494c-80ab-cfb418d54776"], +Cell[244100, 6600, 288, 5, 41, "Output",ExpressionUUID->"c76ea527-c2a4-40e5-b3cb-220964abd4dd"] }, Open ]], Cell[CellGroupData[{ -Cell[237997, 6635, 1961, 53, 340, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[239961, 6690, 186, 3, 75, "Output",ExpressionUUID->"8cb384bc-2548-4cf8-9143-ddaa04a8d819"] +Cell[244425, 6610, 2053, 55, 63, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], +Cell[246481, 6667, 20411, 382, 295, "Output",ExpressionUUID->"d59f79a7-9dc4-4e85-aa98-9868d247d05d"] }, Open ]], Cell[CellGroupData[{ -Cell[240184, 6698, 2094, 60, 546, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], -Cell[242281, 6760, 497, 11, 129, "Message",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], -Cell[242781, 6773, 501, 11, 129, "Message",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], -Cell[243285, 6786, 503, 11, 129, "Message",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], -Cell[243791, 6799, 455, 10, 58, "Message",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], -Cell[244249, 6811, 43631, 762, 523, "Output",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] +Cell[266929, 7054, 2117, 60, 116, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], +Cell[269049, 7116, 559, 13, 48, "Message",ExpressionUUID->"303d185f-8596-4161-b120-54414fdb1979"], +Cell[269611, 7131, 562, 13, 48, "Message",ExpressionUUID->"eab43a39-eec6-496b-aad3-9df1cdebd5e0"], +Cell[270176, 7146, 567, 13, 48, "Message",ExpressionUUID->"0659e774-10c1-4021-9a85-8eea2d006965"], +Cell[270746, 7161, 520, 12, 32, "Message",ExpressionUUID->"d434fc56-f7cb-4999-82ce-d0bb99c57ece"], +Cell[271269, 7175, 21521, 400, 290, "Output",ExpressionUUID->"5171a4bb-d165-4eaf-b75c-add569183a98"] }, Open ]], -Cell[287895, 7576, 2454, 69, 109, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], -Cell[290352, 7647, 209, 5, 109, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], Cell[CellGroupData[{ -Cell[290586, 7656, 212, 6, 109, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[290801, 7664, 168, 2, 75, "Output",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[292827, 7580, 2480, 70, 140, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], +Cell[295310, 7652, 9518, 223, 298, "Output",ExpressionUUID->"a6058d29-9292-482f-aaa0-2f8a6877f6a6"] }, Open ]], Cell[CellGroupData[{ -Cell[291006, 7671, 1814, 53, 546, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], -Cell[292823, 7726, 505, 11, 129, "Message",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], -Cell[293331, 7739, 509, 11, 129, "Message",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], -Cell[293843, 7752, 508, 11, 129, "Message",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], -Cell[294354, 7765, 455, 10, 58, "Message",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], -Cell[294812, 7777, 22399, 414, 527, "Output",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] +Cell[304865, 7880, 232, 5, 36, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], +Cell[305100, 7887, 27876, 531, 290, "Output",ExpressionUUID->"9ca4c94e-f87e-484f-8572-2ffb6807756d"] }, Open ]], Cell[CellGroupData[{ -Cell[317248, 8196, 1612, 47, 221, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], -Cell[318863, 8245, 581, 12, 178, "Message",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], -Cell[319447, 8259, 584, 12, 178, "Message",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], -Cell[320034, 8273, 590, 12, 178, "Message",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], -Cell[320627, 8287, 455, 10, 58, "Message",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], -Cell[321085, 8299, 169, 2, 75, "Output",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[333013, 8423, 237, 7, 61, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], +Cell[333253, 8432, 220, 4, 41, "Output",ExpressionUUID->"7cabb513-17f6-4838-8e79-7f527afa4c99"] }, Open ]], Cell[CellGroupData[{ -Cell[321291, 8306, 2249, 64, 472, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], -Cell[323543, 8372, 557, 12, 178, "Message",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], -Cell[324103, 8386, 560, 12, 109, "Message",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], -Cell[324666, 8400, 560, 12, 109, "Message",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], -Cell[325229, 8414, 455, 10, 109, "Message",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], -Cell[325687, 8426, 169, 2, 75, "Output",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[333510, 8441, 1837, 53, 116, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], +Cell[335350, 8496, 576, 13, 48, "Message",ExpressionUUID->"56e2b532-7a89-4ec4-800d-0d86c787bf16"], +Cell[335929, 8511, 578, 13, 48, "Message",ExpressionUUID->"4261b359-2176-47b2-8392-1dacd047f07c"], +Cell[336510, 8526, 578, 13, 48, "Message",ExpressionUUID->"88b7fb47-a3a0-42ce-a935-9edef6d30d36"], +Cell[337091, 8541, 521, 12, 32, "Message",ExpressionUUID->"823ce98e-2120-4234-b89e-8cdc680d9e2d"], +Cell[337615, 8555, 21509, 400, 290, "Output",ExpressionUUID->"37073721-2df7-4e47-a6d3-94f923cca011"] }, Open ]], Cell[CellGroupData[{ -Cell[325893, 8433, 2221, 64, 610, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], -Cell[328117, 8499, 554, 12, 178, "Message",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], -Cell[328674, 8513, 560, 12, 178, "Message",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], -Cell[329237, 8527, 560, 12, 178, "Message",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], -Cell[329800, 8541, 455, 10, 58, "Message",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], -Cell[330258, 8553, 169, 2, 75, "Output",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[359161, 8960, 1616, 48, 86, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], +Cell[360780, 9010, 694, 15, 53, "Message",ExpressionUUID->"ec2635b2-3cb6-45b7-bf7a-ec8e06f7a740"], +Cell[361477, 9027, 693, 15, 53, "Message",ExpressionUUID->"701ff601-5a2f-4374-8f77-b8443fd38d3a"], +Cell[362173, 9044, 692, 15, 53, "Message",ExpressionUUID->"38eb9de4-e7aa-4fc8-afb6-3f8e45473f64"], +Cell[362868, 9061, 520, 12, 32, "Message",ExpressionUUID->"63003666-5c27-4dc6-bee3-139c2994acab"], +Cell[363391, 9075, 222, 4, 41, "Output",ExpressionUUID->"cdad9cec-12a3-4f2f-a1e2-b631c1838d1a"] }, Open ]], Cell[CellGroupData[{ -Cell[330464, 8560, 2223, 64, 610, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], -Cell[332690, 8626, 555, 12, 178, "Message",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], -Cell[333248, 8640, 558, 12, 178, "Message",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], -Cell[333809, 8654, 560, 12, 178, "Message",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], -Cell[334372, 8668, 453, 10, 58, "Message",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], -Cell[334828, 8680, 167, 2, 75, "Output",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[363650, 9084, 2272, 64, 81, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], +Cell[365925, 9150, 694, 15, 53, "Message",ExpressionUUID->"8ded439d-dbab-4804-80a7-265defb8db10"], +Cell[366622, 9167, 693, 15, 53, "Message",ExpressionUUID->"69467484-1f29-49c4-88ee-aabe315e1b78"], +Cell[367318, 9184, 694, 15, 53, "Message",ExpressionUUID->"aeb9b88c-5177-4676-92e9-91b18826c954"], +Cell[368015, 9201, 520, 12, 32, "Message",ExpressionUUID->"2dc6c051-bf7a-4c06-857f-24bd7480c117"], +Cell[368538, 9215, 219, 4, 41, "Output",ExpressionUUID->"db4863d2-655c-4ea4-8310-d38e66bb8fbb"] }, Open ]], Cell[CellGroupData[{ -Cell[335032, 8687, 213, 6, 106, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[335248, 8695, 169, 2, 75, "Output",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[368794, 9224, 2233, 63, 81, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], +Cell[371030, 9289, 689, 15, 53, "Message",ExpressionUUID->"b5a555f2-ced6-417a-b828-c899a6c43477"], +Cell[371722, 9306, 690, 15, 53, "Message",ExpressionUUID->"2905a86b-df97-4ae6-a27e-bbcf6180b60c"], +Cell[372415, 9323, 689, 15, 53, "Message",ExpressionUUID->"e7aa7f1d-a48a-44b0-b611-3f3ad6e5f4a4"], +Cell[373107, 9340, 517, 12, 32, "Message",ExpressionUUID->"6c70c13f-79aa-4bb3-a0aa-4b58efc170dd"], +Cell[373627, 9354, 220, 4, 41, "Output",ExpressionUUID->"900a2ce4-ddbf-4fde-b388-9f42c8bca3f4"] }, Open ]], -Cell[335432, 8700, 247, 5, 66, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[335704, 8709, 554, 18, 118, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[336261, 8729, 167, 2, 75, "Output",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[373884, 9363, 2235, 63, 81, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], +Cell[376122, 9428, 690, 15, 53, "Message",ExpressionUUID->"19a8428f-a6d7-4cb4-a42e-55b068909ea5"], +Cell[376815, 9445, 693, 15, 53, "Message",ExpressionUUID->"58cbbb08-6ee2-4b07-9779-cbf52217310c"], +Cell[377511, 9462, 690, 15, 53, "Message",ExpressionUUID->"59c5731e-2672-4084-86f2-38a039e32858"], +Cell[378204, 9479, 520, 12, 32, "Message",ExpressionUUID->"a635d286-5b0c-4cab-9933-d5a1641ffb2a"], +Cell[378727, 9493, 218, 4, 41, "Output",ExpressionUUID->"306bb27f-dae2-4cf0-ba55-b3f69a59237b"] }, Open ]], Cell[CellGroupData[{ -Cell[336465, 8736, 166, 4, 125, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[336634, 8742, 169, 2, 75, "Output",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[378982, 9502, 236, 6, 60, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], +Cell[379221, 9510, 216, 4, 41, "Output",ExpressionUUID->"2a31c640-0c24-4126-a97f-8ebc0f4279bc"] }, Open ]], +Cell[379452, 9517, 273, 6, 36, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[336840, 8749, 181, 5, 97, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[337024, 8756, 173, 3, 75, "Output",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] +Cell[379750, 9527, 558, 19, 66, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], +Cell[380311, 9548, 222, 4, 41, "Output",ExpressionUUID->"cfcfe64b-fc11-4515-a5f8-7fde0811d68a"] }, Open ]], Cell[CellGroupData[{ -Cell[337234, 8764, 6055, 185, 1319, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[343292, 8951, 172, 3, 75, "Output",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] +Cell[380570, 9557, 170, 5, 71, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], +Cell[380743, 9564, 221, 4, 41, "Output",ExpressionUUID->"937baf8c-310c-4636-8b2d-79ecb73e159f"] }, Open ]], Cell[CellGroupData[{ -Cell[343501, 8959, 368, 9, 94, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[343872, 8970, 170, 3, 75, "Output",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] +Cell[381001, 9573, 181, 5, 55, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], +Cell[381185, 9580, 223, 4, 41, "Output",ExpressionUUID->"2f68ea81-7fca-4355-a008-15d1fb35f537"] }, Open ]], Cell[CellGroupData[{ -Cell[344079, 8978, 6122, 187, 1319, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[350204, 9167, 175, 3, 75, "Output",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] +Cell[381445, 9589, 6055, 185, 431, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], +Cell[387503, 9776, 221, 4, 41, "Output",ExpressionUUID->"fa47c268-5837-4dec-9fb2-b6005c4a2b73"] }, Open ]], Cell[CellGroupData[{ -Cell[350416, 9175, 368, 9, 94, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[350787, 9186, 169, 3, 75, "Output",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] +Cell[387761, 9785, 368, 9, 53, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], +Cell[388132, 9796, 218, 4, 41, "Output",ExpressionUUID->"22f519e7-660a-4fd6-957e-ec29d5eb40e0"] }, Open ]], Cell[CellGroupData[{ -Cell[350993, 9194, 2663, 88, 746, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[353659, 9284, 173, 3, 75, "Output",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] +Cell[388387, 9805, 6122, 187, 431, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], +Cell[394512, 9994, 223, 4, 41, "Output",ExpressionUUID->"4303e60d-cb2d-424d-b2f2-1b065469bd2c"] }, Open ]], Cell[CellGroupData[{ -Cell[353869, 9292, 2603, 85, 746, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[356475, 9379, 171, 3, 75, "Output",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] +Cell[394772, 10003, 368, 9, 53, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], +Cell[395143, 10014, 221, 4, 41, "Output",ExpressionUUID->"ccec9295-d1b0-4ba3-8f78-46b0ff264f8a"] }, Open ]], Cell[CellGroupData[{ -Cell[356683, 9387, 3712, 118, 982, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[360398, 9507, 171, 3, 75, "Output",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] +Cell[395401, 10023, 2663, 88, 215, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], +Cell[398067, 10113, 221, 4, 41, "Output",ExpressionUUID->"f59e122f-e0f2-487b-83d5-42955921834a"] }, Open ]], Cell[CellGroupData[{ -Cell[360606, 9515, 2052, 59, 484, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], -Cell[362661, 9576, 572, 12, 178, "Message",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], -Cell[363236, 9590, 573, 12, 178, "Message",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], -Cell[363812, 9604, 578, 12, 178, "Message",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], -Cell[364393, 9618, 457, 10, 58, "Message",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], -Cell[364853, 9630, 172, 3, 75, "Output",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] +Cell[398325, 10122, 2603, 85, 215, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], +Cell[400931, 10209, 220, 4, 41, "Output",ExpressionUUID->"a051586a-3a26-4a89-b4c8-5b9bc44e6d42"] }, Open ]], Cell[CellGroupData[{ -Cell[365062, 9638, 2054, 59, 484, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], -Cell[367119, 9699, 572, 12, 178, "Message",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], -Cell[367694, 9713, 575, 12, 178, "Message",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], -Cell[368272, 9727, 576, 12, 178, "Message",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], -Cell[368851, 9741, 457, 10, 58, "Message",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], -Cell[369311, 9753, 170, 3, 75, "Output",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] +Cell[401188, 10218, 3712, 118, 316, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], +Cell[404903, 10338, 221, 4, 41, "Output",ExpressionUUID->"9a21231e-4c68-4494-a4b7-beb207e9f17c"] }, Open ]], Cell[CellGroupData[{ -Cell[369518, 9761, 2030, 55, 404, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], -Cell[371551, 9818, 20377, 384, 531, "Output",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] +Cell[405161, 10347, 2075, 59, 116, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], +Cell[407239, 10408, 696, 15, 53, "Message",ExpressionUUID->"652a3af7-db2f-4e68-9d8e-488ad411ae0e"], +Cell[407938, 10425, 695, 15, 53, "Message",ExpressionUUID->"e85d606f-1666-4e8b-9880-ca3e18127e9d"], +Cell[408636, 10442, 694, 15, 53, "Message",ExpressionUUID->"aa0f9197-dd9f-4ae6-b489-d0db0f8e98d1"], +Cell[409333, 10459, 522, 12, 32, "Message",ExpressionUUID->"bc8319f6-5697-4b15-8b83-409f9b384f37"], +Cell[409858, 10473, 224, 4, 41, "Output",ExpressionUUID->"eec2b8b2-eb83-4a28-990d-594b317be421"] }, Open ]], Cell[CellGroupData[{ -Cell[391965, 10207, 2118, 60, 546, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], -Cell[394086, 10269, 499, 11, 129, "Message",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], -Cell[394588, 10282, 504, 11, 129, "Message",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], -Cell[395095, 10295, 507, 11, 129, "Message",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], -Cell[395605, 10308, 455, 10, 58, "Message",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], -Cell[396063, 10320, 22381, 415, 528, "Output",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] +Cell[410119, 10482, 2077, 59, 116, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], +Cell[412199, 10543, 696, 15, 53, "Message",ExpressionUUID->"592c2048-7ac5-424e-946e-b89fcf1053bc"], +Cell[412898, 10560, 695, 15, 53, "Message",ExpressionUUID->"24ea7df6-4332-499b-988f-b154b5677b82"], +Cell[413596, 10577, 694, 15, 53, "Message",ExpressionUUID->"a031e4c0-5b5c-4a78-aeaf-270a22190386"], +Cell[414293, 10594, 520, 12, 32, "Message",ExpressionUUID->"e8010145-7fcd-4661-95c7-b23db9476f63"], +Cell[414816, 10608, 217, 4, 41, "Output",ExpressionUUID->"4162ad2f-6182-46b4-8541-7514eefded0f"] }, Open ]], -Cell[418459, 10738, 174, 3, 66, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], -Cell[418636, 10743, 209, 5, 66, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], Cell[CellGroupData[{ -Cell[418870, 10752, 1616, 48, 221, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], -Cell[420489, 10802, 594, 12, 178, "Message",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], -Cell[421086, 10816, 594, 12, 178, "Message",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], -Cell[421683, 10830, 598, 12, 178, "Message",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], -Cell[422284, 10844, 457, 10, 109, "Message",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], -Cell[422744, 10856, 171, 3, 109, "Output",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] +Cell[415070, 10617, 2053, 55, 63, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], +Cell[417126, 10674, 20509, 387, 290, "Output",ExpressionUUID->"67d705c4-d9a2-4146-8e5e-7629b625fe51"] }, Open ]], Cell[CellGroupData[{ -Cell[422952, 10864, 2247, 64, 109, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], -Cell[425202, 10930, 572, 12, 178, "Message",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], -Cell[425777, 10944, 573, 12, 178, "Message",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], -Cell[426353, 10958, 578, 12, 178, "Message",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], -Cell[426934, 10972, 455, 10, 58, "Message",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], -Cell[427392, 10984, 172, 3, 75, "Output",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] +Cell[437672, 11066, 2141, 60, 116, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], +Cell[439816, 11128, 558, 13, 48, "Message",ExpressionUUID->"6d06150f-a38d-4a28-8a36-0953fe736fdc"], +Cell[440377, 11143, 559, 13, 48, "Message",ExpressionUUID->"3b1b1ddc-7397-472d-80e6-e2bbc74e0b99"], +Cell[440939, 11158, 562, 13, 48, "Message",ExpressionUUID->"8740c978-057a-4865-a8b7-399ec4d7c10b"], +Cell[441504, 11173, 518, 12, 32, "Message",ExpressionUUID->"fbb29d32-e370-45bb-816d-938eb0b058be"], +Cell[442025, 11187, 21959, 408, 296, "Output",ExpressionUUID->"14b4cd6a-59e7-44ea-94f4-3233133add92"] }, Open ]], +Cell[463999, 11598, 200, 4, 36, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], Cell[CellGroupData[{ -Cell[427601, 10992, 2221, 64, 610, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], -Cell[429825, 11058, 570, 12, 178, "Message",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], -Cell[430398, 11072, 573, 12, 178, "Message",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], -Cell[430974, 11086, 578, 12, 178, "Message",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], -Cell[431555, 11100, 455, 10, 58, "Message",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], -Cell[432013, 11112, 172, 3, 75, "Output",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] +Cell[464224, 11606, 232, 5, 36, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], +Cell[464459, 11613, 28343, 540, 296, "Output",ExpressionUUID->"a6d53aa7-ad82-4346-916c-ad0a3191039d"] }, Open ]], Cell[CellGroupData[{ -Cell[432222, 11120, 2221, 64, 610, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], -Cell[434446, 11186, 572, 12, 178, "Message",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], -Cell[435021, 11200, 575, 12, 178, "Message",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], -Cell[435599, 11214, 578, 12, 178, "Message",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], -Cell[436180, 11228, 455, 10, 58, "Message",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], -Cell[436638, 11240, 173, 3, 75, "Output",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] +Cell[492839, 12158, 1616, 48, 86, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], +Cell[494458, 12208, 669, 14, 53, "Message",ExpressionUUID->"166c32cf-e5e3-43eb-bc05-51ac656caca4"], +Cell[495130, 12224, 667, 14, 53, "Message",ExpressionUUID->"b9462d51-3cd5-4d07-89ad-5e180d9c2c1c"], +Cell[495800, 12240, 669, 14, 53, "Message",ExpressionUUID->"597a6c65-4afb-477b-a96c-6ea17a79ffba"], +Cell[496472, 12256, 495, 11, 32, "Message",ExpressionUUID->"bc2b3301-5d41-426d-b8c4-0ed21ecd9b78"], +Cell[496970, 12269, 194, 3, 41, "Output",ExpressionUUID->"3311c8e8-0030-495d-bdc2-bfa7a99e525a"] }, Open ]], Cell[CellGroupData[{ -Cell[436848, 11248, 213, 6, 106, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], -Cell[437064, 11256, 172, 3, 75, "Output",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] +Cell[497201, 12277, 2270, 64, 81, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], +Cell[499474, 12343, 669, 14, 53, "Message",ExpressionUUID->"983cf18b-827a-470f-8a37-97042695734c"], +Cell[500146, 12359, 668, 14, 53, "Message",ExpressionUUID->"f9f586a1-42eb-4173-a0d3-e029d18439cb"], +Cell[500817, 12375, 667, 14, 53, "Message",ExpressionUUID->"9820a36e-4697-419d-a241-940136d54d46"], +Cell[501487, 12391, 495, 11, 32, "Message",ExpressionUUID->"4f9c2050-a297-478d-99f9-b4dfc20ca65f"], +Cell[501985, 12404, 196, 3, 41, "Output",ExpressionUUID->"ee4f03fb-4e2c-4646-b5cd-ab2bc6e90dce"] }, Open ]], -Cell[437251, 11262, 245, 5, 66, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[437521, 11271, 558, 19, 118, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[438082, 11292, 173, 3, 75, "Output",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] +Cell[502218, 12412, 2233, 63, 81, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], +Cell[504454, 12477, 667, 14, 53, "Message",ExpressionUUID->"6c88ec89-6cec-4183-bb9b-0c8fd42cc3e1"], +Cell[505124, 12493, 666, 14, 53, "Message",ExpressionUUID->"dd179fb5-d728-4a3d-b7d4-9cb90a618c70"], +Cell[505793, 12509, 667, 14, 53, "Message",ExpressionUUID->"ac5238f7-947d-4407-8eca-799347c2d6ce"], +Cell[506463, 12525, 495, 11, 32, "Message",ExpressionUUID->"632471d2-8885-4206-9d60-5218c6095763"], +Cell[506961, 12538, 194, 3, 41, "Output",ExpressionUUID->"6f7b837d-4a11-4661-9dcd-1297f7d5ce81"] }, Open ]], Cell[CellGroupData[{ -Cell[438292, 11300, 170, 5, 125, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[438465, 11307, 171, 3, 75, "Output",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] +Cell[507192, 12546, 2233, 63, 81, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], +Cell[509428, 12611, 669, 14, 53, "Message",ExpressionUUID->"31d96564-3b90-40b7-a7d1-d5372a3c4fa1"], +Cell[510100, 12627, 670, 14, 53, "Message",ExpressionUUID->"202abb44-9b99-4890-aae5-e154e492d331"], +Cell[510773, 12643, 667, 14, 53, "Message",ExpressionUUID->"f79f4697-532f-4a0f-82d7-71e31d8a3f74"], +Cell[511443, 12659, 495, 11, 32, "Message",ExpressionUUID->"48cc4c36-77ab-434e-a0fb-be54d116b460"], +Cell[511941, 12672, 195, 3, 41, "Output",ExpressionUUID->"81a5cd1e-1d9a-49da-b44c-ac64ce707f37"] }, Open ]], Cell[CellGroupData[{ -Cell[438673, 11315, 181, 5, 97, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[438857, 11322, 173, 3, 75, "Output",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] +Cell[512173, 12680, 236, 6, 60, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], +Cell[512412, 12688, 193, 3, 41, "Output",ExpressionUUID->"e6628aca-7feb-4656-821b-d037af81ccb2"] }, Open ]], +Cell[512620, 12694, 271, 6, 36, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[439067, 11330, 6055, 185, 1319, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[445125, 11517, 175, 3, 75, "Output",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] +Cell[512916, 12704, 558, 19, 66, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], +Cell[513477, 12725, 194, 3, 41, "Output",ExpressionUUID->"1aa2da8f-d15f-4dd2-a1c5-a7f194bb2350"] }, Open ]], Cell[CellGroupData[{ -Cell[445337, 11525, 368, 9, 94, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[445708, 11536, 170, 3, 75, "Output",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] +Cell[513708, 12733, 170, 5, 71, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], +Cell[513881, 12740, 193, 3, 41, "Output",ExpressionUUID->"a322486d-5466-4427-8740-a1b73a8cd7dd"] }, Open ]], Cell[CellGroupData[{ -Cell[445915, 11544, 6122, 187, 1319, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[452040, 11733, 175, 3, 75, "Output",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] +Cell[514111, 12748, 181, 5, 55, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], +Cell[514295, 12755, 195, 3, 41, "Output",ExpressionUUID->"8b8334ec-7fb5-4400-9481-b78e8bbdb67d"] }, Open ]], Cell[CellGroupData[{ -Cell[452252, 11741, 368, 9, 94, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[452623, 11752, 172, 3, 75, "Output",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] +Cell[514527, 12763, 6055, 185, 431, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], +Cell[520585, 12950, 198, 3, 41, "Output",ExpressionUUID->"72abf856-f253-44ec-86ad-102887c70dcc"] }, Open ]], Cell[CellGroupData[{ -Cell[452832, 11760, 2663, 88, 746, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[455498, 11850, 173, 3, 75, "Output",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] +Cell[520820, 12958, 368, 9, 53, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], +Cell[521191, 12969, 193, 3, 41, "Output",ExpressionUUID->"764aa348-7a5f-4263-80d1-4d84830da71e"] }, Open ]], Cell[CellGroupData[{ -Cell[455708, 11858, 2603, 85, 746, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[458314, 11945, 171, 3, 75, "Output",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] +Cell[521421, 12977, 6122, 187, 431, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], +Cell[527546, 13166, 198, 3, 41, "Output",ExpressionUUID->"ed2528bf-088d-4065-b270-d687bab0b475"] }, Open ]], Cell[CellGroupData[{ -Cell[458522, 11953, 3712, 118, 982, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[462237, 12073, 171, 3, 75, "Output",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] +Cell[527781, 13174, 368, 9, 53, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], +Cell[528152, 13185, 196, 3, 41, "Output",ExpressionUUID->"ba2ec5c3-0d40-4b97-8635-439f6982c192"] }, Open ]], Cell[CellGroupData[{ -Cell[462445, 12081, 2052, 59, 484, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], -Cell[464500, 12142, 568, 12, 178, "Message",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], -Cell[465071, 12156, 572, 12, 178, "Message",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], -Cell[465646, 12170, 574, 12, 178, "Message",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], -Cell[466223, 12184, 457, 10, 58, "Message",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], -Cell[466683, 12196, 172, 3, 75, "Output",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] +Cell[528385, 13193, 2663, 88, 215, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], +Cell[531051, 13283, 196, 3, 41, "Output",ExpressionUUID->"88a97a2f-2bfc-4bd1-b82a-7f69530f1642"] }, Open ]], Cell[CellGroupData[{ -Cell[466892, 12204, 2054, 59, 484, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], -Cell[468949, 12265, 568, 12, 178, "Message",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], -Cell[469520, 12279, 572, 12, 178, "Message",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], -Cell[470095, 12293, 574, 12, 178, "Message",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], -Cell[470672, 12307, 457, 10, 58, "Message",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], -Cell[471132, 12319, 171, 3, 75, "Output",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] +Cell[531284, 13291, 2603, 85, 215, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], +Cell[533890, 13378, 193, 3, 41, "Output",ExpressionUUID->"4f103bf6-6177-4986-9629-70b31ba0b78c"] }, Open ]], Cell[CellGroupData[{ -Cell[471340, 12327, 2030, 55, 404, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], -Cell[473373, 12384, 19960, 375, 531, "Output",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] +Cell[534120, 13386, 3712, 118, 316, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], +Cell[537835, 13506, 194, 3, 41, "Output",ExpressionUUID->"8fe4b504-4855-49d3-a640-bfe69f2f4e94"] }, Open ]], Cell[CellGroupData[{ -Cell[493370, 12764, 2118, 60, 546, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], -Cell[495491, 12826, 496, 11, 129, "Message",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], -Cell[495990, 12839, 501, 11, 129, "Message",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], -Cell[496494, 12852, 505, 11, 129, "Message",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], -Cell[497002, 12865, 455, 10, 58, "Message",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], -Cell[497460, 12877, 21721, 403, 523, "Output",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] +Cell[538066, 13514, 2075, 59, 116, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], +Cell[540144, 13575, 667, 14, 53, "Message",ExpressionUUID->"78a3667e-1309-42c6-91e7-51f10075baaf"], +Cell[540814, 13591, 669, 14, 53, "Message",ExpressionUUID->"d9482761-f93c-450c-9d04-afb6b3460db5"], +Cell[541486, 13607, 667, 14, 53, "Message",ExpressionUUID->"a99c01c9-f009-4e0f-98f8-f60fce51386e"], +Cell[542156, 13623, 497, 11, 32, "Message",ExpressionUUID->"1eeee96b-10dc-47d0-95f2-fb8bd112a196"], +Cell[542656, 13636, 197, 3, 41, "Output",ExpressionUUID->"34a6330c-7718-4e0a-ad24-4ae25b86c98b"] }, Open ]], -Cell[519196, 13283, 181, 3, 66, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], -Cell[519380, 13288, 207, 5, 66, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], Cell[CellGroupData[{ -Cell[519612, 13297, 1616, 48, 221, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], -Cell[521231, 13347, 589, 12, 178, "Message",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], -Cell[521823, 13361, 588, 12, 178, "Message",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], -Cell[522414, 13375, 594, 12, 178, "Message",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], -Cell[523011, 13389, 455, 10, 58, "Message",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], -Cell[523469, 13401, 173, 3, 75, "Output",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] +Cell[542890, 13644, 2077, 59, 116, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], +Cell[544970, 13705, 667, 14, 53, "Message",ExpressionUUID->"0f4bcdd4-8402-499b-82c8-c5f63cba30b8"], +Cell[545640, 13721, 667, 14, 53, "Message",ExpressionUUID->"732bc9db-cb06-4236-9063-6569a333f246"], +Cell[546310, 13737, 667, 14, 53, "Message",ExpressionUUID->"1abab593-796a-4ec9-976d-419abae1c04b"], +Cell[546980, 13753, 494, 11, 32, "Message",ExpressionUUID->"fcf13d14-0afd-4496-9b71-71249a0b4c44"], +Cell[547477, 13766, 194, 3, 41, "Output",ExpressionUUID->"e72c2140-f94a-4ffd-88d3-9dbbe69babd9"] }, Open ]], Cell[CellGroupData[{ -Cell[523679, 13409, 2246, 64, 472, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], -Cell[525928, 13475, 566, 12, 178, "Message",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], -Cell[526497, 13489, 570, 12, 178, "Message",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], -Cell[527070, 13503, 574, 12, 178, "Message",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], -Cell[527647, 13517, 456, 10, 58, "Message",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], -Cell[528106, 13529, 171, 3, 75, "Output",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] +Cell[547708, 13774, 2053, 55, 63, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], +Cell[549764, 13831, 20277, 383, 295, "Output",ExpressionUUID->"5b4373b7-6460-4441-b8fb-e70f54d91d7b"] }, Open ]], Cell[CellGroupData[{ -Cell[528314, 13537, 2221, 64, 610, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], -Cell[530538, 13603, 569, 12, 178, "Message",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], -Cell[531110, 13617, 571, 12, 178, "Message",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], -Cell[531684, 13631, 575, 12, 178, "Message",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], -Cell[532262, 13645, 458, 10, 58, "Message",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], -Cell[532723, 13657, 171, 3, 75, "Output",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] +Cell[570078, 14219, 2141, 60, 116, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], +Cell[572222, 14281, 534, 12, 48, "Message",ExpressionUUID->"643ac1c2-d878-4faa-8b7f-6c74f33b07d7"], +Cell[572759, 14295, 539, 12, 48, "Message",ExpressionUUID->"2a61f5fb-7b04-4931-9e25-23a8bb232872"], +Cell[573301, 14309, 538, 12, 48, "Message",ExpressionUUID->"975fe3ae-7bd4-4b10-95d2-c222231bd761"], +Cell[573842, 14323, 493, 11, 32, "Message",ExpressionUUID->"2e2b1826-6b54-4d71-8a17-909993668e95"], +Cell[574338, 14336, 21896, 408, 290, "Output",ExpressionUUID->"3c29449d-0ead-4ccf-9cbd-873051eac82a"] }, Open ]], +Cell[596249, 14747, 207, 4, 36, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], Cell[CellGroupData[{ -Cell[532931, 13665, 2223, 64, 610, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], -Cell[535157, 13731, 567, 12, 178, "Message",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], -Cell[535727, 13745, 571, 12, 178, "Message",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], -Cell[536301, 13759, 573, 12, 178, "Message",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], -Cell[536877, 13773, 456, 10, 58, "Message",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], -Cell[537336, 13785, 173, 3, 75, "Output",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] +Cell[596481, 14755, 230, 5, 36, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], +Cell[596714, 14762, 28259, 540, 290, "Output",ExpressionUUID->"fb4892eb-08de-4e6a-a1ef-31e1a04fb8d6"] }, Open ]], Cell[CellGroupData[{ -Cell[537546, 13793, 211, 6, 106, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], -Cell[537760, 13801, 174, 3, 75, "Output",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] +Cell[625010, 15307, 1616, 48, 86, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], +Cell[626629, 15357, 668, 14, 53, "Message",ExpressionUUID->"e9e039b7-83db-47a1-aad8-dc76fc7eb3df"], +Cell[627300, 15373, 665, 14, 53, "Message",ExpressionUUID->"d98052ae-31df-4f54-a9b1-e8c0d7f37772"], +Cell[627968, 15389, 667, 14, 53, "Message",ExpressionUUID->"58bbfb9c-03c7-4f41-8b1a-78c4af3a00fb"], +Cell[628638, 15405, 497, 11, 32, "Message",ExpressionUUID->"01984af7-b826-46e3-a094-6f626977857d"], +Cell[629138, 15418, 195, 3, 41, "Output",ExpressionUUID->"33bb618d-dfc6-4344-adb6-8ec62f3cf504"] }, Open ]], -Cell[537949, 13807, 115, 1, 66, "Input",ExpressionUUID->"527555fe-54f3-44c3-a217-b0e3a0006c5f"], -Cell[538067, 13810, 4091, 88, 801, "Input",ExpressionUUID->"a128aec6-d32e-4b4c-ac3d-b3e8d65a0e32"] +Cell[CellGroupData[{ +Cell[629370, 15426, 2269, 64, 81, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], +Cell[631642, 15492, 665, 14, 53, "Message",ExpressionUUID->"843c1870-2d9e-4863-bc9d-dd49b02530f8"], +Cell[632310, 15508, 667, 14, 53, "Message",ExpressionUUID->"999c225c-1a3b-4c69-a63b-6b4a7babcb50"], +Cell[632980, 15524, 667, 14, 53, "Message",ExpressionUUID->"7238dddb-0b00-4ec1-8746-3c47b8749681"], +Cell[633650, 15540, 493, 11, 32, "Message",ExpressionUUID->"c29a164d-f163-42d3-b3e5-46f1f8aa3fc4"], +Cell[634146, 15553, 196, 3, 41, "Output",ExpressionUUID->"419e7d53-8622-4995-8d3e-dad9ec533f49"] +}, Open ]], +Cell[CellGroupData[{ +Cell[634379, 15561, 2233, 63, 81, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], +Cell[636615, 15626, 669, 14, 53, "Message",ExpressionUUID->"6d87f0be-640b-463e-8359-0b21a3a87c8f"], +Cell[637287, 15642, 667, 14, 53, "Message",ExpressionUUID->"bdcedad8-9042-4fde-ac80-c3f381f8758a"], +Cell[637957, 15658, 667, 14, 53, "Message",ExpressionUUID->"9a15d40f-bbac-4286-ba20-380df3ff2384"], +Cell[638627, 15674, 495, 11, 32, "Message",ExpressionUUID->"1aaaae80-5cbd-4c31-a100-e8864b0c4e81"], +Cell[639125, 15687, 194, 3, 41, "Output",ExpressionUUID->"96e4cac2-9e93-41d6-853c-d9cee5bb00b6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[639356, 15695, 2235, 63, 81, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], +Cell[641594, 15760, 664, 14, 53, "Message",ExpressionUUID->"e6466b35-7af9-42ba-82a3-bebc24b7144e"], +Cell[642261, 15776, 667, 14, 53, "Message",ExpressionUUID->"f9e37ee4-e821-4f31-9bd8-1ee2f164ecd5"], +Cell[642931, 15792, 665, 14, 53, "Message",ExpressionUUID->"28e38e03-7268-4f56-bd1a-900d8e515f44"], +Cell[643599, 15808, 493, 11, 32, "Message",ExpressionUUID->"7c2489b5-22fe-4b31-a405-eb07aa0c8895"], +Cell[644095, 15821, 195, 3, 41, "Output",ExpressionUUID->"bda2cada-76e5-4153-8a6e-f7821173e7df"] +}, Open ]], +Cell[CellGroupData[{ +Cell[644327, 15829, 234, 6, 60, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], +Cell[644564, 15837, 196, 3, 41, "Output",ExpressionUUID->"3b82b5e2-06a1-4a1a-b90d-28f3cae9b3bd"] +}, Open ]], +Cell[644775, 15843, 143, 3, 36, "Input",ExpressionUUID->"527555fe-54f3-44c3-a217-b0e3a0006c5f"], +Cell[CellGroupData[{ +Cell[644943, 15850, 4096, 89, 373, "Input",ExpressionUUID->"a128aec6-d32e-4b4c-ac3d-b3e8d65a0e32"], +Cell[649042, 15941, 1975, 42, 81, "Output",ExpressionUUID->"fa6c6c39-9d69-431c-95d2-51cc4d50378a"] +}, Open ]] } ] *) -(* End of internal cache information *) - diff --git a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw2.nb b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw2.nb index 1e16a66..345acf7 100644 --- a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw2.nb +++ b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_osc_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 578146, 14304] -NotebookOptionsPosition[ 538408, 13674] -NotebookOutlinePosition[ 538819, 13691] -CellTagsIndexPosition[ 538776, 13688] +NotebookDataLength[ 666217, 15966] +NotebookOptionsPosition[ 625618, 15317] +NotebookOutlinePosition[ 626053, 15335] +CellTagsIndexPosition[ 626010, 15332] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,16 +26,14 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.9940735873936653`*^9, 3.9940735896443777`*^9}, { 3.994075218023417*^9, 3.994075221411705*^9}}, - CellLabel-> - "In[106]:=",ExpressionUUID->"daebe3bc-0a65-4079-8cfc-6ea289f788d6"], + CellLabel->"In[1]:=",ExpressionUUID->"daebe3bc-0a65-4079-8cfc-6ea289f788d6"], Cell[BoxData["1.9`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.9940735644974327`*^9, 3.994073590895896*^9}, { 3.994075171996416*^9, 3.994075180507247*^9}, {3.994075219377726*^9, - 3.9940752234153214`*^9}}, - CellLabel-> - "Out[106]=",ExpressionUUID->"21c22a00-b37e-4bd9-ad8d-9393c631a332"] + 3.9940752234153214`*^9}, 3.9943497338628674`*^9, 3.9943527199369507`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"1809b717-813c-40a5-8770-0a82cd3df6ee"] }, Open ]], Cell[CellGroupData[{ @@ -44,15 +42,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940732811688833`*^9, 3.994073289502289*^9}}, - CellLabel-> - "In[107]:=",ExpressionUUID->"c9be71d2-85a6-40f2-8207-1b3ec49e9601"], + CellLabel->"In[2]:=",ExpressionUUID->"c9be71d2-85a6-40f2-8207-1b3ec49e9601"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.994073564560362*^9, 3.994073590977919*^9}, - 3.994075180702458*^9, 3.9940752234546824`*^9}, - CellLabel-> - "Out[107]=",ExpressionUUID->"98aea7bb-d7d5-49b8-83ca-afde5c6cbccd"] + 3.994075180702458*^9, 3.9940752234546824`*^9, 3.994349734143283*^9, + 3.994352720353753*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"5d0824f0-60d3-41b8-809a-5d20e4ba43df"] }, Open ]], Cell[CellGroupData[{ @@ -61,15 +58,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "168"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073284506165*^9, 3.994073287626708*^9}}, - CellLabel-> - "In[108]:=",ExpressionUUID->"64f35230-ab8b-405f-933d-6ee357ab7191"], + CellLabel->"In[3]:=",ExpressionUUID->"64f35230-ab8b-405f-933d-6ee357ab7191"], Cell[BoxData["168"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994073564571506*^9, 3.994073590992278*^9}, - 3.994075180712758*^9, 3.9940752234670067`*^9}, - CellLabel-> - "Out[108]=",ExpressionUUID->"3fa24ae8-66d7-47dc-8600-bc16115b0358"] + 3.994075180712758*^9, 3.9940752234670067`*^9, 3.994349734150045*^9, + 3.9943527203734426`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"81cf4245-8d4a-40b2-84c5-542571138966"] }, Open ]], Cell[CellGroupData[{ @@ -77,15 +73,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[109]:=",ExpressionUUID->"d60d011a-0037-4dcd-8724-36e75322ced0"], + CellLabel->"In[4]:=",ExpressionUUID->"d60d011a-0037-4dcd-8724-36e75322ced0"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.994073564582589*^9, 3.994073590996417*^9}, - 3.994075180723978*^9, 3.994075223478387*^9}, - CellLabel-> - "Out[109]=",ExpressionUUID->"a8c69135-ce71-48a6-8453-3f705b383930"] + 3.994075180723978*^9, 3.994075223478387*^9, 3.994349734156592*^9, + 3.994352720392671*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"d0c3e9b1-09ed-4d7e-b6b1-9e9b0b0a4f06"] }, Open ]], Cell[CellGroupData[{ @@ -97,30 +92,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[110]:=",ExpressionUUID->"51180a4e-12f3-4f9b-82d6-eadfd3fad407"], + CellLabel->"In[5]:=",ExpressionUUID->"51180a4e-12f3-4f9b-82d6-eadfd3fad407"], Cell[BoxData["0.544`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.994073564593708*^9, 3.994073591015129*^9}, - 3.994075180735317*^9, 3.994075223489546*^9}, - CellLabel-> - "Out[110]=",ExpressionUUID->"8200c5eb-2591-43b0-802c-c83506e77139"] + 3.994075180735317*^9, 3.994075223489546*^9, 3.994349734163083*^9, + 3.994352720412261*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"e6a5db4d-f619-4945-a734-5b7ef6f8e32e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[111]:=",ExpressionUUID->"544454f5-81b1-4f9e-b85a-03bb8132b0cd"], + CellLabel->"In[6]:=",ExpressionUUID->"544454f5-81b1-4f9e-b85a-03bb8132b0cd"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.994073564604851*^9, 3.9940735910271397`*^9}, - 3.9940751807454844`*^9, 3.994075223493987*^9}, - CellLabel-> - "Out[111]=",ExpressionUUID->"6f7a0d88-18fe-44fb-b0cf-88c0fb3b0a47"] + 3.9940751807454844`*^9, 3.994075223493987*^9, 3.994349734170039*^9, + 3.994352720431616*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"085d2615-086d-4fe2-a746-425cac200c9f"] }, Open ]], Cell[CellGroupData[{ @@ -131,15 +124,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[112]:=",ExpressionUUID->"62e3cdda-a591-4586-af71-0f1e36fe7c76"], + CellLabel->"In[7]:=",ExpressionUUID->"62e3cdda-a591-4586-af71-0f1e36fe7c76"], Cell[BoxData["6.400704089204199`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.9940735646161203`*^9, 3.9940735910381737`*^9}, - 3.99407518075636*^9, 3.9940752235073977`*^9}, - CellLabel-> - "Out[112]=",ExpressionUUID->"91474f3b-e14f-403c-b49e-fb1f621bf0b3"] + 3.99407518075636*^9, 3.9940752235073977`*^9, 3.994349734176507*^9, + 3.994352720450604*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"8c9e9cb2-edd5-4a8b-a54f-a607335330f6"] }, Open ]], Cell[CellGroupData[{ @@ -151,15 +143,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[113]:=",ExpressionUUID->"af66d9f4-ed34-47a1-a8a0-6b2570d105f7"], + CellLabel->"In[8]:=",ExpressionUUID->"af66d9f4-ed34-47a1-a8a0-6b2570d105f7"], Cell[BoxData["4.825794469480417`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.994073564627458*^9, 3.9940735910486517`*^9}, - 3.994075180767749*^9, 3.9940752235185337`*^9}, - CellLabel-> - "Out[113]=",ExpressionUUID->"38b55147-596e-4fbe-a2c1-a98bb6b5a60e"] + 3.994075180767749*^9, 3.9940752235185337`*^9, 3.994349734182892*^9, + 3.994352720471814*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"803e2d41-4afe-4cdd-981e-6eaa3e2f2541"] }, Open ]], Cell[CellGroupData[{ @@ -167,14 +158,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8877902834"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073298855084*^9}, - CellLabel-> - "In[114]:=",ExpressionUUID->"34c1f49a-253a-4945-9de7-d0c20a1110c6"], + CellLabel->"In[9]:=",ExpressionUUID->"34c1f49a-253a-4945-9de7-d0c20a1110c6"], Cell[BoxData["0.8877902834`"], "Output", CellChangeTimes->{{3.99407356463848*^9, 3.994073591058733*^9}, - 3.994075180779163*^9, 3.994075223529882*^9}, - CellLabel-> - "Out[114]=",ExpressionUUID->"3cbb7bac-b29e-4bb0-bad9-97b26af72440"] + 3.994075180779163*^9, 3.994075223529882*^9, 3.994349734188958*^9, + 3.9943527257958183`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"5b6af182-f008-40d9-8d7f-eb61fcaf8281"] }, Open ]], Cell[CellGroupData[{ @@ -182,44 +172,41 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3862529089"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.994073304321521*^9}, - CellLabel-> - "In[115]:=",ExpressionUUID->"0b83963d-c65a-46e4-b3a6-9fc479afce6e"], + CellLabel->"In[10]:=",ExpressionUUID->"0b83963d-c65a-46e4-b3a6-9fc479afce6e"], Cell[BoxData["0.3862529089`"], "Output", CellChangeTimes->{{3.9940735646497602`*^9, 3.994073591068905*^9}, - 3.994075180790642*^9, 3.994075223541339*^9}, - CellLabel-> - "Out[115]=",ExpressionUUID->"2cd0660a-11e7-46ad-b903-3a40b4418caf"] + 3.994075180790642*^9, 3.994075223541339*^9, 3.9943497341954527`*^9, + 3.994352726198217*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"67481178-bd54-4f95-b8bf-37d25be3ea51"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[116]:=",ExpressionUUID->"4993e251-725c-46e3-b066-ac229fbe2493"], + CellLabel->"In[11]:=",ExpressionUUID->"4993e251-725c-46e3-b066-ac229fbe2493"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.994073564660372*^9, 3.994073591079844*^9}, - 3.9940751808023157`*^9, 3.99407522355291*^9}, - CellLabel-> - "Out[116]=",ExpressionUUID->"72b31e26-d112-4a08-b996-fafcf5a48b98"] + 3.9940751808023157`*^9, 3.99407522355291*^9, 3.9943497342049017`*^9, + 3.994352726216991*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"dc155801-5fe5-4341-bf99-2f4dec25a3b3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[117]:=",ExpressionUUID->"826bfb63-0b0a-453a-921e-e6b2d4370dd4"], + CellLabel->"In[12]:=",ExpressionUUID->"826bfb63-0b0a-453a-921e-e6b2d4370dd4"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.994073564670796*^9, 3.994073591090024*^9}, - 3.994075180813775*^9, 3.994075223564582*^9}, - CellLabel-> - "Out[117]=",ExpressionUUID->"53d30ef0-ae30-4eb8-940f-fbd57036bf1a"] + 3.994075180813775*^9, 3.994075223564582*^9, 3.994349734212825*^9, + 3.994352726235484*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"cfb663cb-3d69-4f29-8d5b-9d35b197a6c1"] }, Open ]], Cell[CellGroupData[{ @@ -243,15 +230,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[118]:=",ExpressionUUID->"3f161619-f839-43fe-b0e6-8c0ad1e1e9d9"], + CellLabel->"In[13]:=",ExpressionUUID->"3f161619-f839-43fe-b0e6-8c0ad1e1e9d9"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.9940735646817017`*^9, 3.994073591101307*^9}, - 3.9940751808204927`*^9, 3.99407522357547*^9}, - CellLabel-> - "Out[118]=",ExpressionUUID->"2456a0fa-4cd5-4675-ae55-0f86483efb68"] + 3.9940751808204927`*^9, 3.99407522357547*^9, 3.9943497342200203`*^9, + 3.994352726255213*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"e478f2e8-4e1b-40c7-bbd1-67649ef8a71c"] }, Open ]], Cell[CellGroupData[{ @@ -275,15 +261,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[119]:=",ExpressionUUID->"bdfe5776-e403-47c4-9cd7-2317d7cca590"], + CellLabel->"In[14]:=",ExpressionUUID->"bdfe5776-e403-47c4-9cd7-2317d7cca590"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.9940735646923637`*^9, 3.994073591111409*^9}, - 3.994075180833333*^9, 3.99407522358539*^9}, - CellLabel-> - "Out[119]=",ExpressionUUID->"d2f261b2-2b12-4682-b78f-2659b83e699e"] + 3.994075180833333*^9, 3.99407522358539*^9, 3.994349734232607*^9, + 3.9943527262745123`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"d1f7389d-86d2-446f-9d1f-a8af57a98cc7"] }, Open ]], Cell[CellGroupData[{ @@ -338,15 +323,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[120]:=",ExpressionUUID->"d9bbdd6f-f5f1-4a71-aaa1-5c0906195453"], + CellLabel->"In[15]:=",ExpressionUUID->"d9bbdd6f-f5f1-4a71-aaa1-5c0906195453"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994073564703178*^9, 3.99407359112132*^9}, - 3.994075180844792*^9, 3.994075223596579*^9}, - CellLabel-> - "Out[120]=",ExpressionUUID->"59d933d9-f38d-44ab-9f2d-53a07374f3be"] + 3.994075180844792*^9, 3.994075223596579*^9, 3.994349734239127*^9, + 3.9943527262943363`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"c1daf204-ff2e-474d-97dd-408fa5199498"] }, Open ]], Cell[CellGroupData[{ @@ -397,16 +381,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[121]:=",ExpressionUUID->"3f419dba-9cf0-495f-bebf-693523759bd6"], + CellLabel->"In[16]:=",ExpressionUUID->"3f419dba-9cf0-495f-bebf-693523759bd6"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.994073564714039*^9, 3.994073591132222*^9}, - 3.994075180888361*^9, 3.994075223608573*^9}, - CellLabel-> - "Out[121]=",ExpressionUUID->"cf46ac6b-c191-4e68-98ac-cbade79d676c"] + 3.994075180888361*^9, 3.994075223608573*^9, 3.99434973425207*^9, + 3.994352726316812*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"9894869b-0a70-4de2-b982-fc78c17fe926"] }, Open ]], Cell[CellGroupData[{ @@ -457,16 +440,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[122]:=",ExpressionUUID->"7a84bee4-1cad-4121-a752-3a07a3b2fef3"], + CellLabel->"In[17]:=",ExpressionUUID->"7a84bee4-1cad-4121-a752-3a07a3b2fef3"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.9940735647250757`*^9, 3.994073591143152*^9}, - 3.994075180901285*^9, 3.994075223621201*^9}, - CellLabel-> - "Out[122]=",ExpressionUUID->"51c7302a-4041-4d4b-929a-a87cf67ab587"] + 3.994075180901285*^9, 3.994075223621201*^9, 3.994349734264448*^9, + 3.9943527263367567`*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"576f0b1e-4255-4f09-91b3-4f8f846dfa4f"] }, Open ]], Cell[CellGroupData[{ @@ -521,60 +503,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[123]:=",ExpressionUUID->"caa8e0cf-7fae-429f-8405-426d2e61f16e"], + CellLabel->"In[18]:=",ExpressionUUID->"caa8e0cf-7fae-429f-8405-426d2e61f16e"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994073564736117*^9, 3.994073591154641*^9}, - 3.9940751809127274`*^9, 3.994075223631315*^9}, - CellLabel-> - "Out[123]=",ExpressionUUID->"7b6ea78d-22c6-4832-85a3-fe0ae7bd5165"] + 3.9940751809127274`*^9, 3.994075223631315*^9, 3.994349734271681*^9, + 3.994352726353224*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"3e020120-6dae-49cd-afa9-31636c44a0f3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[124]:=",ExpressionUUID->"1a647d6d-7f17-4053-95f8-e005d48fec17"], + CellLabel->"In[19]:=",ExpressionUUID->"1a647d6d-7f17-4053-95f8-e005d48fec17"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.994073564745685*^9, 3.9940735911671133`*^9}, - 3.9940751809237967`*^9, 3.994075223641436*^9}, - CellLabel-> - "Out[124]=",ExpressionUUID->"35aea4e1-80d4-4f8b-b917-1ea1f9907ee0"] + 3.9940751809237967`*^9, 3.994075223641436*^9, 3.99434973427744*^9, + 3.9943527263717003`*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"683d74ea-db67-499c-9135-ba8f699fc6aa"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[125]:=",ExpressionUUID->"b9eac5f9-d5af-4af2-bf13-f2a8ddf2daff"], + CellLabel->"In[20]:=",ExpressionUUID->"b9eac5f9-d5af-4af2-bf13-f2a8ddf2daff"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994073564755136*^9, 3.994073591178863*^9}, - 3.9940751809343033`*^9, 3.9940752236530647`*^9}, - CellLabel-> - "Out[125]=",ExpressionUUID->"70594058-ca3c-4c9e-b4d6-69d2a70d0293"] + 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.994349734289613*^9, + 3.9943527263886414`*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"7e91557a-3033-4267-953c-333c49ca13c9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[126]:=",ExpressionUUID->"d43b5a83-7f8f-4754-a7af-5d7bb52dcd98"], + CellLabel->"In[21]:=",ExpressionUUID->"d43b5a83-7f8f-4754-a7af-5d7bb52dcd98"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940735647648563`*^9, 3.994073591190179*^9}, - 3.9940751809451323`*^9, 3.994075223664682*^9}, - CellLabel-> - "Out[126]=",ExpressionUUID->"7e37a310-378f-498a-b9ad-337120337443"] + 3.9940751809451323`*^9, 3.994075223664682*^9, 3.994349734296527*^9, + 3.994352726407242*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"10e82089-d286-4d7d-808e-dd60543e988d"] }, Open ]], Cell[CellGroupData[{ @@ -583,31 +561,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[127]:=",ExpressionUUID->"ea564721-4283-464e-ba73-b321bd36f74a"], + CellLabel->"In[22]:=",ExpressionUUID->"ea564721-4283-464e-ba73-b321bd36f74a"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.994073564774688*^9, 3.994073591201717*^9}, - 3.994075180956657*^9, 3.994075223675436*^9}, - CellLabel-> - "Out[127]=",ExpressionUUID->"5d1507b1-aa96-43a3-a5f6-7212eadf6ba8"] + 3.994075180956657*^9, 3.994075223675436*^9, 3.9943497343015547`*^9, + 3.994352726423271*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"95b3940b-443b-47d4-a88b-19b878cee748"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[128]:=",ExpressionUUID->"59273c13-f1c9-40aa-9c3d-d6180fe2d761"], + CellLabel->"In[23]:=",ExpressionUUID->"59273c13-f1c9-40aa-9c3d-d6180fe2d761"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994073564784115*^9, 3.994073591213622*^9}, - 3.9940751809686193`*^9, 3.9940752236862583`*^9}, - CellLabel-> - "Out[128]=",ExpressionUUID->"66e7d2a3-520a-43c3-b438-2bf7e9cc416c"] + 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.994349734308695*^9, + 3.994352726444627*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"3f8f9aae-45af-4ca6-a8e6-9de234094cc8"] }, Open ]], Cell[CellGroupData[{ @@ -617,15 +593,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073317560268*^9, 3.994073317727027*^9}}, - CellLabel-> - "In[129]:=",ExpressionUUID->"523a5e67-ce58-496f-992a-d482c0c67570"], + CellLabel->"In[24]:=",ExpressionUUID->"523a5e67-ce58-496f-992a-d482c0c67570"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.994073564793541*^9, 3.994073591224018*^9}, - 3.994075180980678*^9, 3.994075223697234*^9}, - CellLabel-> - "Out[129]=",ExpressionUUID->"3a7b1ce7-00b4-4a20-a6fb-6c673d2361e1"] + 3.994075180980678*^9, 3.994075223697234*^9, 3.994349734320134*^9, + 3.99435272646471*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"bb06187f-ef4c-44c3-980a-eb288d0c06f5"] }, Open ]], Cell[CellGroupData[{ @@ -635,15 +610,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.9940733207460938`*^9, 3.994073320804184*^9}}, - CellLabel-> - "In[130]:=",ExpressionUUID->"c3373745-d99e-4638-a690-443d6521c14e"], + CellLabel->"In[25]:=",ExpressionUUID->"c3373745-d99e-4638-a690-443d6521c14e"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.9940735648031883`*^9, 3.9940735912353287`*^9}, - 3.9940751809920683`*^9, 3.994075223707429*^9}, - CellLabel-> - "Out[130]=",ExpressionUUID->"30526edf-d4fc-4278-9fba-f51af3da31ac"] + 3.9940751809920683`*^9, 3.994075223707429*^9, 3.994349734328108*^9, + 3.99435272648275*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"715ae381-6aea-4501-b83c-e7a2a239d63d"] }, Open ]], Cell[CellGroupData[{ @@ -652,15 +626,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[131]:=",ExpressionUUID->"fa431e54-ba79-4694-a497-8d6afa2bca3a"], + CellLabel->"In[26]:=",ExpressionUUID->"fa431e54-ba79-4694-a497-8d6afa2bca3a"], Cell[BoxData["72"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.99407356481284*^9, 3.994073591246372*^9}, - 3.994075181003516*^9, 3.994075223717374*^9}, - CellLabel-> - "Out[131]=",ExpressionUUID->"94e1cded-8e44-464f-ab86-e616f51307cf"] + 3.994075181003516*^9, 3.994075223717374*^9, 3.994349734335245*^9, + 3.994352726502285*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"f68ca84b-0f15-4f7b-b137-000821540002"] }, Open ]], Cell[CellGroupData[{ @@ -675,15 +648,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[132]:=",ExpressionUUID->"9565be1c-f08f-4108-988e-7de99bc60af0"], + CellLabel->"In[27]:=",ExpressionUUID->"9565be1c-f08f-4108-988e-7de99bc60af0"], Cell[BoxData["0.10999999999999999`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994073564822513*^9, 3.9940735912565413`*^9}, - 3.994075181014969*^9, 3.994075223727599*^9}, - CellLabel-> - "Out[132]=",ExpressionUUID->"5bff3cb7-a3ef-4a74-9004-7ad5fa20c11c"] + 3.994075181014969*^9, 3.994075223727599*^9, 3.994349734342448*^9, + 3.994352726518641*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"16d43aa1-17f8-436e-af18-4abd2fa143a4"] }, Open ]], Cell[CellGroupData[{ @@ -698,16 +670,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[133]:=",ExpressionUUID->"66041539-2752-4550-9be0-7d916925ff81"], + CellLabel->"In[28]:=",ExpressionUUID->"66041539-2752-4550-9be0-7d916925ff81"], Cell[BoxData[ RowBox[{"-", "2.564285714285714`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994073564832857*^9, 3.994073591267404*^9}, - 3.9940751810260887`*^9, 3.9940752237376823`*^9}, - CellLabel-> - "Out[133]=",ExpressionUUID->"455c40ca-551f-4b8b-b6bc-2e3833f63585"] + 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.994349734349655*^9, + 3.994352726536853*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"906c6616-d195-415b-bc30-ffdbe70961bb"] }, Open ]], Cell[CellGroupData[{ @@ -738,15 +709,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[134]:=",ExpressionUUID->"cd0f5fe2-800f-432d-9e83-1e697ee9a749"], + CellLabel->"In[29]:=",ExpressionUUID->"cd0f5fe2-800f-432d-9e83-1e697ee9a749"], Cell[BoxData["17.427928477019236`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994073564842832*^9, 3.9940735912778807`*^9}, - 3.9940751810379477`*^9, 3.994075223748026*^9}, - CellLabel-> - "Out[134]=",ExpressionUUID->"43c1c84b-06e2-4271-aea5-e03c3388b9ed"] + 3.9940751810379477`*^9, 3.994075223748026*^9, 3.994349734357099*^9, + 3.994352726558076*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"cd44eca9-4205-4b98-86b2-4b8c686042ca"] }, Open ]], Cell[CellGroupData[{ @@ -754,15 +724,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[135]:=",ExpressionUUID->"abe18745-5483-42f0-8f72-2be9a2918b6c"], + CellLabel->"In[30]:=",ExpressionUUID->"abe18745-5483-42f0-8f72-2be9a2918b6c"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.994073564851839*^9, 3.994073591288074*^9}, - 3.99407518104945*^9, 3.994075223758711*^9}, - CellLabel-> - "Out[135]=",ExpressionUUID->"71ca72f2-e79a-4c1c-aa3c-f413fa79053e"] + 3.99407518104945*^9, 3.994075223758711*^9, 3.994349734364534*^9, + 3.994352726577602*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"df4d9817-daf7-4729-8188-3eba9df25f56"] }, Open ]], Cell[CellGroupData[{ @@ -772,20 +741,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994073341190873*^9, 3.994073342038845*^9}}, - CellLabel-> - "In[136]:=",ExpressionUUID->"c2fce426-14da-4dd7-aa62-bd47a0c8e81e"], + CellLabel->"In[31]:=",ExpressionUUID->"c2fce426-14da-4dd7-aa62-bd47a0c8e81e"], Cell[BoxData["2.155`"], "Output", CellChangeTimes->{{3.994073564860754*^9, 3.994073591298296*^9}, - 3.994075181060684*^9, 3.994075223775366*^9}, - CellLabel-> - "Out[136]=",ExpressionUUID->"bcd0e4cc-666f-4021-addc-a6660ebf4ae1"] + 3.994075181060684*^9, 3.994075223775366*^9, 3.994349734371838*^9, + 3.994352726594555*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"10e0f2f6-66cd-4b00-992d-47e43066f2ac"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[137]:=",ExpressionUUID->"be9b286b-d328-4901-b030-8baca6fe0c91"], + CellLabel->"In[32]:=",ExpressionUUID->"be9b286b-d328-4901-b030-8baca6fe0c91"], Cell[CellGroupData[{ @@ -794,20 +761,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073344618413*^9, 3.994073345759185*^9}}, - CellLabel-> - "In[138]:=",ExpressionUUID->"6f67c5bc-fc5e-4a19-9ba6-661e1984cc6f"], + CellLabel->"In[33]:=",ExpressionUUID->"6f67c5bc-fc5e-4a19-9ba6-661e1984cc6f"], Cell[BoxData["0.755`"], "Output", CellChangeTimes->{{3.994073564877489*^9, 3.994073591311125*^9}, - 3.9940751810754833`*^9, 3.9940752237900457`*^9}, - CellLabel-> - "Out[138]=",ExpressionUUID->"af56ada0-bdb5-4a1f-b234-614556f04c0d"] + 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.9943497343828173`*^9, + 3.994352726620573*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"35e060ec-1e5b-4224-b9a7-5b1680932550"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[139]:=",ExpressionUUID->"51491074-964c-4747-ac4a-2c86a9af3ca0"], + CellLabel->"In[34]:=",ExpressionUUID->"51491074-964c-4747-ac4a-2c86a9af3ca0"], Cell[CellGroupData[{ @@ -816,20 +781,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940733478949413`*^9, 3.994073348567162*^9}}, - CellLabel-> - "In[140]:=",ExpressionUUID->"abacad17-87f9-4c57-97a5-4671695a11a6"], + CellLabel->"In[35]:=",ExpressionUUID->"abacad17-87f9-4c57-97a5-4671695a11a6"], Cell[BoxData["2.62`"], "Output", CellChangeTimes->{{3.994073564894133*^9, 3.9940735913232403`*^9}, - 3.994075181088438*^9, 3.994075223803163*^9}, - CellLabel-> - "Out[140]=",ExpressionUUID->"f7c23d1e-5183-445d-92b9-64ec67ff307e"] + 3.994075181088438*^9, 3.994075223803163*^9, 3.994349734394351*^9, + 3.994352726645746*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"e652f24b-59fa-4f16-a532-731b451b2850"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[141]:=",ExpressionUUID->"875bf697-22dc-4f5d-a27c-14c908876b04"], + CellLabel->"In[36]:=",ExpressionUUID->"875bf697-22dc-4f5d-a27c-14c908876b04"], Cell[CellGroupData[{ @@ -838,20 +801,18 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.99407335112987*^9, 3.9940733523562517`*^9}}, - CellLabel-> - "In[142]:=",ExpressionUUID->"da6f0fd0-5812-4b4b-9916-6b989c03e0cf"], + CellLabel->"In[37]:=",ExpressionUUID->"da6f0fd0-5812-4b4b-9916-6b989c03e0cf"], Cell[BoxData["1.135`"], "Output", CellChangeTimes->{{3.994073564911627*^9, 3.994073591335389*^9}, - 3.994075181101487*^9, 3.994075223815889*^9}, - CellLabel-> - "Out[142]=",ExpressionUUID->"2794b3d5-20d7-4f7c-ab4a-e4f8eed926e0"] + 3.994075181101487*^9, 3.994075223815889*^9, 3.994349734404928*^9, + 3.99435272667246*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"1e46f93d-9246-4130-8219-ee7355f4cc2c"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[143]:=",ExpressionUUID->"53b7c85f-c056-49a9-96fc-42d558804987"], + CellLabel->"In[38]:=",ExpressionUUID->"53b7c85f-c056-49a9-96fc-42d558804987"], Cell[CellGroupData[{ @@ -860,20 +821,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994073355091783*^9, 3.994073355935183*^9}}, - CellLabel-> - "In[144]:=",ExpressionUUID->"1db2f001-9463-4e12-96c5-ae91a21cb3fe"], + CellLabel->"In[39]:=",ExpressionUUID->"1db2f001-9463-4e12-96c5-ae91a21cb3fe"], Cell[BoxData["1.025`"], "Output", CellChangeTimes->{{3.994073564928769*^9, 3.9940735913488693`*^9}, - 3.994075181114448*^9, 3.994075223832756*^9}, - CellLabel-> - "Out[144]=",ExpressionUUID->"b1259f44-b67a-4079-bb7d-25648b5a9ead"] + 3.994075181114448*^9, 3.994075223832756*^9, 3.994349734417692*^9, + 3.994352726699995*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"2a084f5b-e3ff-4fe5-b74d-a34695f3dbae"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[145]:=",ExpressionUUID->"a0a4dc97-3f94-4533-ada5-8c75a92b85ef"], + CellLabel->"In[40]:=",ExpressionUUID->"a0a4dc97-3f94-4533-ada5-8c75a92b85ef"], Cell[CellGroupData[{ @@ -882,20 +841,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994073359153013*^9, 3.9940733600822906`*^9}}, - CellLabel-> - "In[146]:=",ExpressionUUID->"1e3960fc-6ad5-4f8e-9613-63b254df9637"], + CellLabel->"In[41]:=",ExpressionUUID->"1e3960fc-6ad5-4f8e-9613-63b254df9637"], Cell[BoxData["0.575`"], "Output", CellChangeTimes->{{3.994073564946273*^9, 3.99407359136164*^9}, - 3.9940751811274652`*^9, 3.9940752238459263`*^9}, - CellLabel-> - "Out[146]=",ExpressionUUID->"10457894-2111-4a4d-a835-ef62811a5da7"] + 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994349734431491*^9, + 3.994352726731884*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"4feaf019-54f8-42ad-ba21-4dac0c91cf1e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[147]:=",ExpressionUUID->"019295da-a9f5-45ef-8427-662c09336965"], + CellLabel->"In[42]:=",ExpressionUUID->"019295da-a9f5-45ef-8427-662c09336965"], Cell[CellGroupData[{ @@ -904,20 +861,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, 3.994073366138835*^9, { 3.994073396938322*^9, 3.994073398601803*^9}}, - CellLabel-> - "In[148]:=",ExpressionUUID->"3f6dcc07-9579-4cdd-9e77-eeaba01a3ec6"], + CellLabel->"In[43]:=",ExpressionUUID->"3f6dcc07-9579-4cdd-9e77-eeaba01a3ec6"], Cell[BoxData["1.44`"], "Output", CellChangeTimes->{{3.994073564964167*^9, 3.9940735913757553`*^9}, - 3.9940751811406727`*^9, 3.9940752238589993`*^9}, - CellLabel-> - "Out[148]=",ExpressionUUID->"2f560d87-8748-4d99-b2dd-3827572ef0cf"] + 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.9943497344438963`*^9, + 3.994352726760544*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"b2e81f9d-4a76-45b0-b7b5-2dea01adaf14"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[149]:=",ExpressionUUID->"f1ba4815-7e52-4e52-90bd-c3de3a670c60"], + CellLabel->"In[44]:=",ExpressionUUID->"f1ba4815-7e52-4e52-90bd-c3de3a670c60"], Cell[CellGroupData[{ @@ -925,20 +880,18 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.645"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.9940734006045856`*^9, 3.99407340214142*^9}}, - CellLabel-> - "In[150]:=",ExpressionUUID->"527dc628-63bd-4d40-8438-c83309fb5fb2"], + CellLabel->"In[45]:=",ExpressionUUID->"527dc628-63bd-4d40-8438-c83309fb5fb2"], Cell[BoxData["0.645`"], "Output", CellChangeTimes->{{3.9940735649821672`*^9, 3.994073591389337*^9}, - 3.994075181153781*^9, 3.994075223871763*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"e24cdd66-f49e-47be-ae56-dc72e1470b24"] + 3.994075181153781*^9, 3.994075223871763*^9, 3.994349734453692*^9, + 3.994352726791739*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"00d172e6-e6fa-4a21-9f4a-9314d915ac68"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[151]:=",ExpressionUUID->"6a017435-6ff3-46b2-ad75-25eed0695c2d"], + CellLabel->"In[46]:=",ExpressionUUID->"6a017435-6ff3-46b2-ad75-25eed0695c2d"], Cell[CellGroupData[{ @@ -1427,15 +1380,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[152]:=",ExpressionUUID->"ffcd4fa8-0c62-4893-829a-b2d47c77774b"], + CellLabel->"In[47]:=",ExpressionUUID->"ffcd4fa8-0c62-4893-829a-b2d47c77774b"], Cell[BoxData["0.1377756020325425`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.9940735650538073`*^9, 3.99407359143029*^9}, - 3.994075181231205*^9, 3.9940752239087954`*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"0b9d49e6-a30d-4b8c-8e00-3961184d1bb5"] + 3.994075181231205*^9, 3.9940752239087954`*^9, 3.99434973453782*^9, + 3.994352727037266*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"c1373259-3a8b-46a9-8427-c2bf20f325fa"] }, Open ]], Cell[CellGroupData[{ @@ -1929,15 +1881,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[153]:=",ExpressionUUID->"f36bbb79-6a45-4206-8baf-12792cb72c87"], + CellLabel->"In[48]:=",ExpressionUUID->"f36bbb79-6a45-4206-8baf-12792cb72c87"], Cell[BoxData["7.524926889811008`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.99407356508613*^9, 3.994073591458125*^9}, - 3.994075181264968*^9, 3.994075223937818*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"6d4a23c5-3ce4-402b-8bd0-1959ed046e5c"] + 3.994075181264968*^9, 3.994075223937818*^9, 3.9943497345740643`*^9, + 3.994352727137694*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"88e38a21-1eb8-4055-8523-76ffbbc7791a"] }, Open ]], Cell[CellGroupData[{ @@ -2425,16 +2376,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[154]:=",ExpressionUUID->"95aff88c-658e-4f5b-80f5-3db601ed2749"], + CellLabel->"In[49]:=",ExpressionUUID->"95aff88c-658e-4f5b-80f5-3db601ed2749"], Cell[BoxData[ RowBox[{"-", "14.084113046357718`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994073565118821*^9, 3.994073591484323*^9}, - 3.994075181298151*^9, 3.9940752239647293`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"eca866a4-1c10-4d29-b834-74713bda26c4"] + 3.994075181298151*^9, 3.9940752239647293`*^9, 3.9943497346092863`*^9, + 3.994352727228664*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"56191b71-fa22-4843-8e72-e09e2487b2db"] }, Open ]], Cell[CellGroupData[{ @@ -2992,16 +2942,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"37bf501b-ffa0-415b-8b3a-99d38cbb6d3d"], + CellLabel->"In[50]:=",ExpressionUUID->"37bf501b-ffa0-415b-8b3a-99d38cbb6d3d"], Cell[BoxData[ RowBox[{"-", "18.31263149263108`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.9940735651553993`*^9, 3.994073591515855*^9}, - 3.9940751813370543`*^9, 3.994075223996374*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"351fb5fa-1528-401f-a82c-f7e30459236c"] + 3.9940751813370543`*^9, 3.994075223996374*^9, 3.994349734656404*^9, + 3.994352727341588*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"b9ccfad8-32b5-477b-b8a5-bd1f4d82cd09"] }, Open ]], Cell[CellGroupData[{ @@ -3559,16 +3508,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"1270cfbd-3842-4e0d-a9a0-36b7cce44817"], + CellLabel->"In[51]:=",ExpressionUUID->"1270cfbd-3842-4e0d-a9a0-36b7cce44817"], Cell[BoxData[ RowBox[{"-", "53.236632839784775`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.994073565191607*^9, 3.9940735915482073`*^9}, - 3.9940751813752813`*^9, 3.994075224029221*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"9c3ed634-3c5e-4f4a-b34f-ae46791dfaae"] + 3.9940751813752813`*^9, 3.994075224029221*^9, 3.994349734718644*^9, + 3.9943527274498873`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"8e060b89-f707-4563-b149-a8f3e0bc254d"] }, Open ]], Cell[CellGroupData[{ @@ -4199,46 +4147,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"a8bcd563-1baa-4b7b-8e44-e38af43df0ae"], + CellLabel->"In[52]:=",ExpressionUUID->"a8bcd563-1baa-4b7b-8e44-e38af43df0ae"], Cell[BoxData[ RowBox[{"-", "137.72173412227852`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.9940735652337313`*^9, 3.9940735915861683`*^9}, - 3.9940751814204807`*^9, 3.99407522406466*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"7c97beb6-4498-45de-bf83-743cb76c1d12"] + 3.9940751814204807`*^9, 3.99407522406466*^9, 3.994349734780197*^9, + 3.994352727580393*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"48a9f3f5-09bd-486d-9f30-1dcaefb93887"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"a140ba0e-db9d-4a5f-87cd-7a41850ccd6a"], + CellLabel->"In[53]:=",ExpressionUUID->"a140ba0e-db9d-4a5f-87cd-7a41850ccd6a"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994073565247233*^9, 3.99407359159737*^9}, - 3.994075181435895*^9, 3.9940752240755796`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"3e98bbc9-69aa-49b2-b7c9-b656d17c71bf"] + 3.994075181435895*^9, 3.9940752240755796`*^9, 3.9943497347895947`*^9, + 3.99435272760702*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"8589286d-fb0b-48a0-b878-7382e3e76e48"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"25fa88a4-0889-4700-8d33-5086b86b7c7d"], + CellLabel->"In[54]:=",ExpressionUUID->"25fa88a4-0889-4700-8d33-5086b86b7c7d"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994073565259305*^9, 3.994073591607201*^9}, - 3.9940751814462433`*^9, 3.994075224085256*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"0bd414ed-9e05-4add-88dc-c25d03473898"] + 3.9940751814462433`*^9, 3.994075224085256*^9, 3.994349734797586*^9, + 3.9943527276249332`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"e243d56e-bfe6-4df2-ae45-c3ec8d8a1583"] }, Open ]], Cell[CellGroupData[{ @@ -4282,15 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"f0e388d1-d839-4f03-8681-1ade3a9d54e1"], + CellLabel->"In[55]:=",ExpressionUUID->"f0e388d1-d839-4f03-8681-1ade3a9d54e1"], Cell[BoxData["109.03965674383026`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940735652689238`*^9, 3.99407359161714*^9}, - 3.994075181457575*^9, 3.994075224089169*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"5a762686-ecc7-44d2-b8b1-6cbc6cbf9309"] + 3.994075181457575*^9, 3.994075224089169*^9, 3.994349734805222*^9, + 3.994352727645666*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"6fcbef7e-4921-402d-8d9b-998d0aee5770"] }, Open ]], Cell[CellGroupData[{ @@ -4330,16 +4274,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"0c30ee0a-e809-4998-9dba-cb42efcd0b63"], + CellLabel->"In[56]:=",ExpressionUUID->"0c30ee0a-e809-4998-9dba-cb42efcd0b63"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.9940735652791967`*^9, 3.994073591627187*^9}, - 3.994075181468134*^9, 3.9940752240986977`*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"814d79a2-0895-4f5a-9499-c741488755d5"] + 3.994075181468134*^9, 3.9940752240986977`*^9, 3.994349734814496*^9, + 3.994352727665863*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"9343056d-4106-43cf-b6e8-9c08b7c40bd8"] }, Open ]], Cell[CellGroupData[{ @@ -4383,101 +4326,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"d7a80348-a29c-4d60-88b0-40bf2212e92f"], + CellLabel->"In[57]:=",ExpressionUUID->"d7a80348-a29c-4d60-88b0-40bf2212e92f"], Cell[BoxData["112.13680293055965`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994073565289288*^9, 3.994073591637117*^9}, - 3.994075181479414*^9, 3.9940752241080437`*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"7a406b04-1760-4033-b3d9-9163e8d4713c"] + 3.994075181479414*^9, 3.9940752241080437`*^9, 3.994349734822686*^9, + 3.994352727683454*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"c7d17bac-b8c4-4297-8ea6-5461ad6deecd"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"4ff62e70-b611-4e38-a55b-c933f61f867a"], + CellLabel->"In[58]:=",ExpressionUUID->"4ff62e70-b611-4e38-a55b-c933f61f867a"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.99407356529922*^9, 3.994073591647008*^9}, - 3.994075181491456*^9, 3.994075224117897*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"a23038df-5b27-4c8d-81c2-fbc28260c3eb"] + 3.994075181491456*^9, 3.994075224117897*^9, 3.994349734829377*^9, + 3.994352727703273*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"6cb0691b-3a76-44b9-a145-dff5ff48ade7"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"0eac4dd1-3812-43a1-a598-1782238a9214"], + CellLabel->"In[59]:=",ExpressionUUID->"0eac4dd1-3812-43a1-a598-1782238a9214"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.994073565311245*^9, 3.994073591656905*^9}, - 3.994075181502122*^9, 3.9940752241273518`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"ab43283e-88f7-40e1-8408-97d92629f73a"] + 3.994075181502122*^9, 3.9940752241273518`*^9, 3.994349734835639*^9, + 3.994352727723358*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"74e39416-2a6d-44d7-bf86-f786626f44eb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"58605f9a-a33d-4aa5-b2a7-78ee444368f5"], + CellLabel->"In[60]:=",ExpressionUUID->"58605f9a-a33d-4aa5-b2a7-78ee444368f5"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.9940735653224297`*^9, 3.994073591666703*^9}, - 3.994075181512973*^9, 3.994075224138131*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"0bd79e48-4432-4db4-810d-1793a72f11c5"] + 3.994075181512973*^9, 3.994075224138131*^9, 3.994349734841979*^9, + 3.994352727739553*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"5414923b-0a1e-4fd1-a37b-8ea81e440c82"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[166]:=",ExpressionUUID->"c73c629f-ac4e-4874-8182-725c670a953b"], + CellLabel->"In[61]:=",ExpressionUUID->"c73c629f-ac4e-4874-8182-725c670a953b"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.994073565332736*^9, 3.994073591676529*^9}, - 3.9940751815232983`*^9, 3.99407522414828*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"18b5c01d-aa06-4aed-8cd8-a7406da0f607"] + 3.9940751815232983`*^9, 3.99407522414828*^9, 3.9943497348493156`*^9, + 3.99435272775885*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"7ea58d4b-1c20-4e52-9563-abc2dfccaf97"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[167]:=",ExpressionUUID->"084048df-817a-45ca-8c42-fd6082535615"], + CellLabel->"In[62]:=",ExpressionUUID->"084048df-817a-45ca-8c42-fd6082535615"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994073565343382*^9, 3.994073591686304*^9}, - 3.9940751815621433`*^9, 3.994075224158536*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"aa12e1fe-fe5f-454a-86b3-352641c7c50c"] + 3.9940751815621433`*^9, 3.994075224158536*^9, 3.994349734855935*^9, + 3.9943527277766848`*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"acea5e9b-8e73-4411-a3f4-f3691d1ca514"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[168]:=",ExpressionUUID->"0695b6c8-80f6-44c4-a86e-d1a687f82a25"], + CellLabel->"In[63]:=",ExpressionUUID->"0695b6c8-80f6-44c4-a86e-d1a687f82a25"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.9940735677968397`*^9, 3.994073591696135*^9}, - 3.994075181571867*^9, 3.994075224168653*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"e9cf1dc0-c205-4392-9a64-3fb4a97f0c2a"] + 3.994075181571867*^9, 3.994075224168653*^9, 3.9943497348622313`*^9, + 3.9943527277936773`*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"3ed3defb-b354-4c1b-8771-b4214df41299"] }, Open ]], Cell[CellGroupData[{ @@ -4498,16 +4434,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[169]:=",ExpressionUUID->"bf8c47a5-ea81-4d55-ab36-61267382f6e5"], + CellLabel->"In[64]:=",ExpressionUUID->"bf8c47a5-ea81-4d55-ab36-61267382f6e5"], Cell[BoxData[ RowBox[{"-", "34.047906297441784`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994073567991251*^9, 3.994073591706287*^9}, - 3.994075181582259*^9, 3.994075224178802*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"358925d0-630c-4d01-81d3-49733beb6aab"] + 3.994075181582259*^9, 3.994075224178802*^9, 3.994349734869915*^9, + 3.994352727811681*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"0326bac7-d94f-4123-b604-5b48d85bdd17"] }, Open ]], Cell[CellGroupData[{ @@ -4528,16 +4463,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[170]:=",ExpressionUUID->"2f540fd8-14e5-400d-b548-a28e8fe79797"], + CellLabel->"In[65]:=",ExpressionUUID->"2f540fd8-14e5-400d-b548-a28e8fe79797"], Cell[BoxData[ RowBox[{"-", "6.56405378738986`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994073568001831*^9, 3.994073591716386*^9}, - 3.994075181592502*^9, 3.994075224188962*^9}, - CellLabel-> - "Out[170]=",ExpressionUUID->"df0999c8-fe67-4f7e-929c-360e6e566f56"] + 3.994075181592502*^9, 3.994075224188962*^9, 3.9943497349054403`*^9, + 3.99435272782572*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"87964239-89f7-498f-9a39-6b386d8edcfc"] }, Open ]], Cell[CellGroupData[{ @@ -4602,15 +4536,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[171]:=",ExpressionUUID->"6e3a0cff-a89f-408a-a0b6-770c92f9f376"], + CellLabel->"In[66]:=",ExpressionUUID->"6e3a0cff-a89f-408a-a0b6-770c92f9f376"], Cell[BoxData["74.99175044638848`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.994073568012953*^9, 3.994073591726822*^9}, - 3.9940751816039963`*^9, 3.994075224199308*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"f9ef4f82-9985-4ff8-81c7-5293c98b8002"] + 3.9940751816039963`*^9, 3.994075224199308*^9, 3.99434973491238*^9, + 3.994352727907556*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"c2da365e-3ec4-4d05-a165-1a79db98a74c"] }, Open ]], Cell[CellGroupData[{ @@ -4651,16 +4584,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[172]:=",ExpressionUUID->"f7d73717-d2f8-40b1-af46-bb63f4e2bf56"], + CellLabel->"In[67]:=",ExpressionUUID->"f7d73717-d2f8-40b1-af46-bb63f4e2bf56"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994073568023205*^9, 3.9940735917368*^9}, - 3.994075181615046*^9, 3.994075224209613*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"52c0305b-bbdb-436d-a304-ce40e0098d84"] + 3.994075181615046*^9, 3.994075224209613*^9, 3.994349734918964*^9, + 3.994352727927423*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"9be8612b-320f-4fbc-848a-89213839747e"] }, Open ]], Cell[CellGroupData[{ @@ -4726,15 +4658,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[173]:=",ExpressionUUID->"9534853d-6c51-4f3d-af80-da47e4e1a1d0"], + CellLabel->"In[68]:=",ExpressionUUID->"9534853d-6c51-4f3d-af80-da47e4e1a1d0"], Cell[BoxData["105.57274914316979`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994073568033989*^9, 3.994073591747006*^9}, - 3.994075181626021*^9, 3.994075224219851*^9}, - CellLabel-> - "Out[173]=",ExpressionUUID->"2458ea57-2898-40a1-a363-97d883edab00"] + 3.994075181626021*^9, 3.994075224219851*^9, 3.9943497349260197`*^9, + 3.99435272794734*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"faafcdfd-2009-423a-8a97-b51516f54390"] }, Open ]], Cell[CellGroupData[{ @@ -4792,15 +4723,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[174]:=",ExpressionUUID->"ce707e72-b936-4662-b118-54cdf9042b08"], + CellLabel->"In[69]:=",ExpressionUUID->"ce707e72-b936-4662-b118-54cdf9042b08"], Cell[BoxData["39.10949309233206`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994073568045323*^9, 3.99407359175727*^9}, - 3.994075181636903*^9, 3.99407522423002*^9}, - CellLabel-> - "Out[174]=",ExpressionUUID->"e4025daa-dd1d-45c7-bd75-1723b3406a52"] + 3.994075181636903*^9, 3.99407522423002*^9, 3.994349734932818*^9, + 3.99435272796896*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"2e9d34ad-e625-40ce-9583-26516702b089"] }, Open ]], Cell[CellGroupData[{ @@ -4858,38 +4788,47 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[175]:=",ExpressionUUID->"7fe7f35f-3585-4bbe-8596-a442c6791b15"], + CellLabel->"In[70]:=",ExpressionUUID->"7fe7f35f-3585-4bbe-8596-a442c6791b15"], Cell[BoxData["659.7171122788135`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994073568055649*^9, 3.994073591768012*^9}, - 3.9940751816477003`*^9, 3.99407522424048*^9}, - CellLabel-> - "Out[175]=",ExpressionUUID->"b430a4be-769f-4732-9f10-d70befc67177"] + 3.9940751816477003`*^9, 3.99407522424048*^9, 3.994349734939651*^9, + 3.994352727987561*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"ca72b4c3-6b2c-4b5a-8c85-521cce9337b2"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.8725040536"}]], "Input", - CellChangeTimes->{3.9918496921150837`*^9, - 3.9940848778309383`*^9},ExpressionUUID->"ede64bc2-06f7-8743-a0a6-\ -6f058773310c"], + CellChangeTimes->{3.9918496921150837`*^9, 3.9940848778309383`*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], + +Cell[BoxData["0.8725040536`"], "Output", + CellChangeTimes->{3.994349734946354*^9, 3.994352728007793*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"dd5042ea-aaf7-474e-9588-36a2f008b41b"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918496892276516`*^9, - 3.9918496892324924`*^9}},ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-\ -c82e80965ca9"], + CellChangeTimes->{{3.9918496892276516`*^9, 3.9918496892324924`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.5470324096"}]], "Input", - CellChangeTimes->{3.991849690724144*^9, - 3.994084885669587*^9},ExpressionUUID->"328429c4-9130-334e-ba7f-\ -7dc8ec78e5b4"], + CellChangeTimes->{3.991849690724144*^9, 3.994084885669587*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], + +Cell[BoxData["0.5470324096`"], "Output", + CellChangeTimes->{3.9943497349563103`*^9, 3.994352728032032*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"69d648d3-83f0-4f17-971a-b2f0f4d08e32"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991849693382303*^9, - 3.991849693386299*^9}},ExpressionUUID->"b3364ab6-86a4-7a46-ae33-\ -623392314869"], + CellChangeTimes->{{3.991849693382303*^9, 3.991849693386299*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ @@ -4935,13 +4874,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], + CellLabel->"In[75]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.991339230528511*^9}, - CellLabel-> - "Out[316]=",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[BoxData["1.5054805119396558`*^-53"], "Output", + CellChangeTimes->{3.991339230528511*^9, 3.9943497349662647`*^9, + 3.994352728056674*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"3164320e-cb1a-4312-94e6-765dc767af2a"] }, Open ]], Cell[CellGroupData[{ @@ -4975,14 +4913,13 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557615205345*^9},ExpressionUUID->"35e76fc7-2f05-694a-b379-\ -67189aa511ad"], + CellChangeTimes->{3.991557615205345*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[BoxData["2.192147584896785`*^-54"], "Output", - CellChangeTimes->{3.991339230554512*^9}, - CellLabel-> - "Out[317]=",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[BoxData["1.430360078496079`*^-54"], "Output", + CellChangeTimes->{3.991339230554512*^9, 3.99434973497307*^9, + 3.994352728075016*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"50111f9f-f867-46c1-af24-3786b73cc0ca"] }, Open ]], Cell[CellGroupData[{ @@ -5015,14 +4952,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557618917984*^9, - 3.9915576208320503`*^9}},ExpressionUUID->"a10e19cd-f567-6b4d-a841-\ -5f01117db38b"], + CellChangeTimes->{{3.991557618917984*^9, 3.9915576208320503`*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[BoxData["3.508823705223133`*^-54"], "Output", - CellChangeTimes->{3.9913392305796223`*^9}, - CellLabel-> - "Out[318]=",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[BoxData["2.8903622337570463`*^-54"], "Output", + CellChangeTimes->{3.9913392305796223`*^9, 3.994349734979931*^9, + 3.994352728093026*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"bce40c0a-bd54-4626-bb3c-969cd873ec73"] }, Open ]], Cell[CellGroupData[{ @@ -5045,13 +4981,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], + CellLabel->"In[78]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[BoxData["44.37747929594205`"], "Output", - CellChangeTimes->{3.9913392305906105`*^9}, - CellLabel-> - "Out[319]=",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[BoxData["35.19016342490424`"], "Output", + CellChangeTimes->{3.9913392305906105`*^9, 3.9943497349891253`*^9, + 3.994352728110978*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"03eb080e-b4a4-45ad-863c-6b15ff87a5d4"] }, Open ]], Cell[CellGroupData[{ @@ -5077,13 +5012,12 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], + CellLabel->"In[79]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[BoxData["102.55835649176893`"], "Output", - CellChangeTimes->{3.99133923061561*^9}, - CellLabel-> - "Out[320]=",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[BoxData["80.70048328866939`"], "Output", + CellChangeTimes->{3.99133923061561*^9, 3.994349734998089*^9, + 3.994352728129881*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"6947630a-abd9-4712-b511-471fcea204b3"] }, Open ]], Cell[CellGroupData[{ @@ -5092,13 +5026,12 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], + CellLabel->"In[80]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[BoxData["0.5630879721742558`"], "Output", - CellChangeTimes->{3.9913392306426105`*^9}, - CellLabel-> - "Out[321]=",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[BoxData["1.0542180593042814`"], "Output", + CellChangeTimes->{3.9913392306426105`*^9, 3.99434973500492*^9, + 3.994352728148151*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"8f0693e8-c1a5-4db8-abcf-9d2c27769250"] }, Open ]], Cell[CellGroupData[{ @@ -5107,13 +5040,12 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], + CellLabel->"In[81]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[BoxData["1.956498159343112`"], "Output", - CellChangeTimes->{3.99133923065361*^9}, - CellLabel-> - "Out[322]=",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[BoxData["2.859175454684007`"], "Output", + CellChangeTimes->{3.99133923065361*^9, 3.9943497350133667`*^9, + 3.9943527281669807`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"d8a7d9ea-b20d-4a9b-b3b2-871f49ea6cf5"] }, Open ]], Cell[CellGroupData[{ @@ -5122,13 +5054,12 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], + CellLabel->"In[82]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[BoxData["200.65523570140064`"], "Output", - CellChangeTimes->{3.9913392306776104`*^9}, - CellLabel-> - "Out[323]=",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[BoxData["230.7368410001004`"], "Output", + CellChangeTimes->{3.9913392306776104`*^9, 3.994349735020396*^9, + 3.994352728187231*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"e4c62550-8a27-4afe-b50d-76e5af95a39d"] }, Open ]], Cell[CellGroupData[{ @@ -5137,13 +5068,12 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], + CellLabel->"In[83]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[BoxData["24.98842482695703`"], "Output", - CellChangeTimes->{3.991339230703802*^9}, - CellLabel-> - "Out[324]=",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[BoxData["37.098105792403054`"], "Output", + CellChangeTimes->{3.991339230703802*^9, 3.9943497350272427`*^9, + 3.9943527282044563`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"401684bc-8fe1-4d60-a724-ea2d59dac5b2"] }, Open ]], Cell[CellGroupData[{ @@ -5332,13 +5262,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[325]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], + CellLabel->"In[84]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[BoxData["0.01829601703069907`"], "Output", - CellChangeTimes->{3.9913392307297993`*^9}, - CellLabel-> - "Out[325]=",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[BoxData["0.004523576365983168`"], "Output", + CellChangeTimes->{3.9913392307297993`*^9, 3.994349735034881*^9, + 3.994352728224532*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"062d4872-b4f8-476e-a8b7-e8c433fa8406"] }, Open ]], Cell[CellGroupData[{ @@ -5351,13 +5280,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], + CellLabel->"In[85]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.991339230837267*^9}, - CellLabel-> - "Out[326]=",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[BoxData["13.176618664374113`"], "Output", + CellChangeTimes->{3.991339230837267*^9, 3.994349735171315*^9, + 3.9943527285246277`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"66d6edd8-6e53-4076-b647-4cf540bbdd74"] }, Open ]], Cell[CellGroupData[{ @@ -5548,13 +5476,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[327]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], + CellLabel->"In[86]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[BoxData["0.00990105610750653`"], "Output", - CellChangeTimes->{3.9913392308522797`*^9}, - CellLabel-> - "Out[327]=",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[BoxData["0.02516103013924952`"], "Output", + CellChangeTimes->{3.9913392308522797`*^9, 3.994349735183168*^9, + 3.9943527285477943`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"4473f893-f413-4821-8d27-8f24ec64306a"] }, Open ]], Cell[CellGroupData[{ @@ -5567,13 +5494,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[328]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], + CellLabel->"In[87]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[BoxData["8.906440683949702`"], "Output", - CellChangeTimes->{3.991339230966341*^9}, - CellLabel-> - "Out[328]=",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[BoxData["5.587026505439429`"], "Output", + CellChangeTimes->{3.991339230966341*^9, 3.99434973523449*^9, + 3.994352728657793*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"19e3011b-b42d-4a9b-b59a-2e6551ce5c75"] }, Open ]], Cell[CellGroupData[{ @@ -5665,13 +5591,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[329]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], + CellLabel->"In[88]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991339230988348*^9}, - CellLabel-> - "Out[329]=",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[BoxData["0.10708479897462729`"], "Output", + CellChangeTimes->{3.991339230988348*^9, 3.9943497352476254`*^9, + 3.994352728679392*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"4bb77eb7-e4db-4744-b4b8-6b1e9a2a723f"] }, Open ]], Cell[CellGroupData[{ @@ -5760,13 +5685,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], + CellLabel->"In[89]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991339231030445*^9}, - CellLabel-> - "Out[330]=",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[BoxData["0.8929152010253727`"], "Output", + CellChangeTimes->{3.991339231030445*^9, 3.9943497352608967`*^9, + 3.994352728697308*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"bb58e556-7686-4c20-9721-592d8726e45a"] }, Open ]], Cell[CellGroupData[{ @@ -5888,19 +5812,18 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], + CellLabel->"In[90]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991339231060343*^9}, - CellLabel-> - "Out[331]=",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[BoxData["0.09561764480319095`"], "Output", + CellChangeTimes->{3.991339231060343*^9, 3.9943497352754374`*^9, + 3.9943527287202187`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"522d7b56-3255-4bae-93ff-4d22c7c110d1"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"0055f95b-c532-\ -e24d-bdc4-544ea2d2fbd9"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ @@ -5961,68 +5884,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918497046469917`*^9},ExpressionUUID->"574b810b-aa4a-d545-b080-\ -c44fbe83a713"], + CellChangeTimes->{3.9918497046469917`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 332, 325, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310873375`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.733786565474171`*^-221\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 1, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.9943497353084583`*^9, + 3.9943527287688026`*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], +In[92]:=",ExpressionUUID->"2fce1960-9e48-4492-88a8-08622e95236d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 332, 326, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310973415`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.152001981128782`*^-226\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 2, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.9943497353084583`*^9, + 3.994352728795698*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], +In[92]:=",ExpressionUUID->"166f9eb2-788a-4cc4-98c1-bc9c0deddf6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 332, 327, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339231105339*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5543235834534165`*^-232\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.9943497353084583`*^9, + 3.994352728805051*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], +In[92]:=",ExpressionUUID->"b36f6cca-4acf-4e63-865e-57cc62ab1d3b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 332, 328, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392311143417`*^9}, +during this calculation.\"", 2, 92, 4, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.9943497353084583`*^9, + 3.994352728813336*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], +In[92]:=",ExpressionUUID->"ed0314f5-d9dc-4cdf-8dc6-0383e9ccb41a"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.9913392346332226`*^9}, - CellLabel-> - "Out[332]=",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[BoxData["13.17661866437413`"], "Output", + CellChangeTimes->{3.9913392346332226`*^9, 3.99434973737285*^9, + 3.994352732268024*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"c1f9b2b5-ff67-4b13-908f-beeb86bd5074"] }, Open ]], Cell[CellGroupData[{ @@ -6084,68 +6017,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849710877041*^9},ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-\ -656c90598e75"], + CellChangeTimes->{3.991849710877041*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 333, 329, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234667631*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.733786565474171`*^-221\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 5, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.9943497375493507`*^9, + 3.99435273242008*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], +In[93]:=",ExpressionUUID->"41423007-6b56-4dcc-9c88-06f60db53942"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 333, 330, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234676628*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.152001981128782`*^-226\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 6, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.9943497375493507`*^9, + 3.994352732429159*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], +In[93]:=",ExpressionUUID->"9539454d-91e0-4fac-a6e3-0685937be6ed"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 333, 331, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234685627*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5543235834534165`*^-232\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.9943497375493507`*^9, + 3.994352732438938*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], +In[93]:=",ExpressionUUID->"36ab8d66-d2a9-4553-a01f-cb24d0f37c3e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 333, 332, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133923469363*^9}, +during this calculation.\"", 2, 93, 8, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.9943497375493507`*^9, + 3.9943527324469557`*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], +In[93]:=",ExpressionUUID->"5fa0c16e-0af6-44f2-8fc4-9cff66248abf"], -Cell[BoxData["8.906440683949707`"], "Output", - CellChangeTimes->{3.99133923819088*^9}, - CellLabel-> - "Out[333]=",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[BoxData["5.587026505439435`"], "Output", + CellChangeTimes->{3.99133923819088*^9, 3.9943497397046747`*^9, + 3.9943527357352047`*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"51d98da1-83f3-473f-bbf9-509f8e80f1f3"] }, Open ]], Cell[CellGroupData[{ @@ -6155,138 +6098,141 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849713921898*^9},ExpressionUUID->"9c540ba7-8bb4-ef46-919c-\ -62296271f174"], + CellChangeTimes->{3.991849713921898*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4Fe0bB3AJZc0SQmTtzVqdE0XlubMkS0jWLHGcGUuRLSn7K+0iqfQr +HUWRrEmIUpGEN6QSJSQ6do6xtMjv8cdcc32ue+Y797ONEuOIHcHNxcXFxtfS +Pfitzj/lrW8NSzI6T+1+wEaG49m6DJN8VFdTWbzkXpZemqpJNeq2dNIxw7Zl +/scnRH+FXI0eLi65JCK2ltekGa3IblQ1xz5bv+Z5bF4b6gzOzLDArmwNvvWH +9gHtLKD7W2EPdzVGHa/6hGqcTp6zxpYdUHGdNf6CPEJT/9piW05E6Yc29yBj +bo/6/djP/gwLRuT1oSm+H32O2B/jpSMfB/aj3Se19x3AHuczGaZoA2hn9ObV +Hth8F4Jc6HODyH2Go8HAVhDLaAiuwrmTwVdIbGu52XvjxqOoNCaXCMImM5Wl +tFeOo9Vynk1HsWPVbBIPNU+g35YfTkZif5J+vzksbwrZxs1zTmMzD/j7Xb7A +QeyL93IuYk/e5Lr9MHAahe0RL76CvVJZW3SKNoNWfFSuzsZOY9aaiUrOoivl +r2vysRVzXGI3zs2iXQc1pMuwt2mdGg+omkcS69Rf1GP76vU0Dxv/QVWmwtzj +2FTEUR6B9QvoisHtrHnsuCrBHeor/6Iu/en05flslA7bHvg0L6I1sW0xstjM +uw0mIXnLYMwiYqsVdl795d54OW749Hgh3AV78odH1KUL3CBxcpeAD3aUxkxp +ceBysA7l0UrATitSUpmg8YKp0HG3Guyu1tFnf7N4IfoHR78FW5FTfkBEkg+c +kzQP9WDnb7FO1Z7jg8TQzgauAjaqqzyx7HDVShC2VQ82w56pbe9hGwsBOyjn +6HdscSsh0chnQsBfttPlN/am9yYgrC8MUdZGLPFCNvL/Xpa5WUcEZr5dtTPC +DuJu3rRTSBSu2gY53sMeUC6cSpwVg2shv9/FFeH5IRv5W+jioGOY0J2Bzf1g +UGlNsDgkiEZaVGEr0tfZ5Y2Iww2jKss57APGKQ/f9krAGeP4kdBiNmrxDgmV +bpIEShEyY0vY6GvOxfOeK6XghX1H2x3s0ZG8rPumUmDM6iXqsQXC+tu3P5eC +VfwWZSIP2cjkpP0WzzJpWLk1aioL+0m23kwuSwYSXGN7ekvZKHvgV7hBmDxQ +UfKXsx+z0R6H019DC+ShZ5Ex3Io9Wiexu2BQHk6lxF9bwN6SrSWp6KIAFqEW +007leD4ZHqW8hutgMWRViWgFG3Emeo+xExRhseaMaWolG0kEmDwq3asMocZO +7R+q2WgwW8DX1l8Z0u2FBoWeslHFl1a5sVPKkHmLZW2C7WblnrD+uTKwUryU +HmFna4bbXaepgGG303/XnuHvD+dMxkirQtp2PXTkORvZ+whqW/SpAcue54JH +HRuhcAea04IaPA1OXsXC1khkbWXKrIeO07kDPdhcWXSjmH3rQdQt8SzjFRsV +fHV1evhiPXR+GC86VI/Pp2N+vOydf8CY+8GxpAbcn8nej8MMdRColqdE/mOj +rP3XPs/FqINWyas3LtgXGX29PDfUIfnpMk42NjPu6IhCuzooDuoZ7HjLRmLV +GVz7jTUgYNmN+4EteP/QxzWqVDTBeSKcp7+NjeSUk2PPf9eCDt6BB/wdbFR9 +jlL/ya0Nbb7LRElst2mX96SSNnT12354iX2rTlXdyEMbzmqeS4j+xEbKPk/e +zXdoQ5NRQOBcJx5v/oAa2aQD+zI3xix8YSN5OQVS0WUTXL0fdtqun4207oYJ +/UY0cL5uYaM4xUYMZsKMtjUNtLSO6iZhp6ukfvV0o0FMimPQL+zld4qK6yNo +sCHV8PsHDj5vt4btU0tocLwlty6Fwv/TdM8MdRU6ZNqI+krN4/U9b6XjzLcF +eKxDDLwW2eh2iKptWbMuKLz4KTUjMoRaw9HWk3f1gV/6qrOJ7hBS8vhg7X54 +J8ynZRwc9xxCxOLjQvnjAOXHZupFk4eQ9EjFCmmGEWTOb6X9rh9CYfQdX1I1 +TEBf58KJUq5hxBj70yAxbAo3z1boBhsOowKj0BWsFjPotZ4o1z49jLIp/xf5 +aeag4CT8xKd1GM3vWvNfXawlrE2T+5yiNoK6uZZP9XnthdEoF+XpmBEUuPZI +SryKDchx3xT07hhBhX4Nz68k2sJYYxRv1Y5RdGJaZk7Tbx9U3Pj0d0/mKJqx +2O34+qAdFKyrJZliY0jf9dKugX37IbCdi5aYOIbeyWT419HtQUY6KkpzdgzJ +3kuozt3gAG9Oi3JVho2jil4NK2thR3h5wXBT5fg4Ung/6RM+5ghOfsk1//Ob +QPQrl/Kzep2AtEwu1eBMoAyeaZ3UWmdYMe3yd63BJHq8a2NXYqUL1L7b8aYm +fhKlbz0n9ifvADhPTwlPNUyils93T9EvuEJKRsSxNsEpVLb3pmpQnBtU1tGL +4+2n0FTAfq5ApjuIXMruVk+fQjO71X3HjT1gm5GJOdU5hXLHOudD9Q5CzFcF +HQdFDnK+fdfbXcgTGP87lJHtyUGlDy0PLj/tCYMMnQXfbA7Sl3v38+xPT3gp +Lx/g18dBKr0+XW1+XjAhK5SfKzuNvgsesrnZ7wUbdhM3/R2mUetFa28zBwbs +SUzqKjwzjdIiWIJHWxlgfcOmsLtqGlU/W/zpbe4NlFzeZ4OhabTKDU7Tn3hD +UeoBt2YRCimuft2yttobUsJ1i5mrKLSpee8avmfecMQ3LucPtt0O1/ufXnhD +7/nlcZpiFEpbG94U/cYbjDYKfzwpQSHZ7gerGj55g21dI9f6NRRS9ZBOd5vz +hprk2FwlJQrpe47nJm5hgrOwvvrPzRS6d30y1FqPCbOFEzLBNAqtbucYSm9j +gpLj1CM29rjp3Pvc7UxIs04Z+kin8P+La1mzEROqzrlYFulSSGROzEV8HxMO +i6h8s9Gn0PckXX5WABNeH93ywwYodLEqyq/iHhN2gU+j2V4KBdCu6UfkMqFt +QqA3B9vqfgn/tjwm5GVEslZYU0jg2uD98gImaGQlydVjJ4bYDj9+xITgW7/4 +kC2FotRVD5W9ZMKnfbYsxf0U8r/WdPjhVyYQ3QKRd5wpZC4yuCOklwn84p3F +c9gbErmEad+YUNPacdHKhUKDIboFJQNMGArSM57B9rJmjRWPMoFz7J8LRq4U +cuYNDSz6xQSHN8fTmt0pZBYqG5QvRUCaAEPnFoNCL1mnLFLXEEAWcG6MY+9o +5qhGyBLwZfZYpqE3Xi+1pk5jBQKk3TQCu7FlOiKNP6sR8NakXFaKoNCIQbeU +gC4BeTmT+aE+FErmznzqs5+AqMs+7j2H8Pg3CqXvdSCgp/N/KcqHKXTSNSKE +7kTAj0qaC4Ed8cj2n8UDBIx3MvKGsL3IZZeuMggIiDlnORZAIXojg/kqmACf +V56xvUco1HFJTVAlhYB7GxWY4aEUKkTCvuxLBJTT7l/PxT45RtUVXCbA5LpR +cBc2zbwuZts1Am4P/8u3MwyvH5c3Z+8tAk5JBTQsYO8+ktkZkY/rd4uzAsIp +JC9/Rs+wEI/vZ93sdWyq8cjl5cUEmLseG3mFfWc92nuxFNclb1auPUahhe7u +51lPCEhX3sx+hf3ISi73bQMBrpqSZ/mOU+j8L27etEY8f2ckp7WwGbnDXi7N +BPgl7Ptrhy3K80TuewsBI1nEfAb24Srn5J8fCeh6wTix8QSFVDSuhqsOEMAy +5SqBSAr96ohuHxokILRVR8sLuzWR2FTEJqA41WRPPHZM35Zh/VEC9l8S936O +3ZXe7m4zTUC8a5myQRSFUleImZ5YRoJurWa9XDSFqjndrmHLSUixd3DXx/7R +nRcSyEvCctl70Y7YOx6ZZDL4SdC6kuOSjD3oGfHbQoyEb4HXYn5ji1qZiptK +kJC1wcdDMoZC27eKqyNJEu4vbHmtg50inO9IlyGhUayC7rlUf9JTIqdEgiP5 +5dhTbPJufoOkCglC/WtZ7UvPpxzvWaVGwuHRrTZD2IOkhDCPOgk5CWPmErG4 +LmHmO7qJhLLHw7le2E/+SsQO0khomkiVCsMeGOq90ruFhLpHc0KnsA2en6h9 +v42E5jNDl3Oxvx8uVHgKJGS+khRgY4s4R+qWG5HA0DF/Ooutb7zHqsSEhE2l +ij954vB+kfl2/O4eEq7HlQgoYlfwFKWwLEh4V0H0amH3T0TmXLciYd9oqaE+ +9rZ6yQ9JtiS0yUhescVmlHwbOW1Hwt8ylSRX7KSbRdz/2uP5uFQrTGJ/CzHf +FO5Mgr5RUe5xbGEPKbOgAyQ8OjT38t+lPPN+d383EqJj3hDnl95fF33ew5OE +I4s8pjeW+hGwuOPMwOt59FD8naW8GalKOyYJif0Ou+8v5fX1t1iRJPDz1V4u +WsprLh7c7Yv7LyzxK1vqrzx6AfxJMK1XbHiylH/HYvX2wySoWq4qqlnKT5LW +1A0k4apdlELdUn7E910bg0iQXOkj1YAtxCxxVg/B/RW8vdqEvdUm5ohKGAmC +Nx6y3i7lG1iekg8nwRaJb27DvqC2JkM6ggSLdWMW7diPRQdKxU6QYPbRaOw9 +dt/vkkbBKBJ+S0qs+biU/yOmjzeGhKh77k1L1ntnOb8YS4IhqbyiA/v/g5gF +pA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6300,104 +6246,106 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwV1Hk4Fe0bB3AJZc0SQmTtzVqdE0XlubMkS0jWLHGcGUuRLSn7K+0iqfQr +HUWRrEmIUpGEN6QSJSQ6do6xtMjv8cdcc32ue+Y797ONEuOIHcHNxcXFxtfS +Pfitzj/lrW8NSzI6T+1+wEaG49m6DJN8VFdTWbzkXpZemqpJNeq2dNIxw7Zl +/scnRH+FXI0eLi65JCK2ltekGa3IblQ1xz5bv+Z5bF4b6gzOzLDArmwNvvWH +9gHtLKD7W2EPdzVGHa/6hGqcTp6zxpYdUHGdNf6CPEJT/9piW05E6Yc29yBj +bo/6/djP/gwLRuT1oSm+H32O2B/jpSMfB/aj3Se19x3AHuczGaZoA2hn9ObV +Hth8F4Jc6HODyH2Go8HAVhDLaAiuwrmTwVdIbGu52XvjxqOoNCaXCMImM5Wl +tFeOo9Vynk1HsWPVbBIPNU+g35YfTkZif5J+vzksbwrZxs1zTmMzD/j7Xb7A +QeyL93IuYk/e5Lr9MHAahe0RL76CvVJZW3SKNoNWfFSuzsZOY9aaiUrOoivl +r2vysRVzXGI3zs2iXQc1pMuwt2mdGg+omkcS69Rf1GP76vU0Dxv/QVWmwtzj +2FTEUR6B9QvoisHtrHnsuCrBHeor/6Iu/en05flslA7bHvg0L6I1sW0xstjM +uw0mIXnLYMwiYqsVdl795d54OW749Hgh3AV78odH1KUL3CBxcpeAD3aUxkxp +ceBysA7l0UrATitSUpmg8YKp0HG3Guyu1tFnf7N4IfoHR78FW5FTfkBEkg+c +kzQP9WDnb7FO1Z7jg8TQzgauAjaqqzyx7HDVShC2VQ82w56pbe9hGwsBOyjn +6HdscSsh0chnQsBfttPlN/am9yYgrC8MUdZGLPFCNvL/Xpa5WUcEZr5dtTPC +DuJu3rRTSBSu2gY53sMeUC6cSpwVg2shv9/FFeH5IRv5W+jioGOY0J2Bzf1g +UGlNsDgkiEZaVGEr0tfZ5Y2Iww2jKss57APGKQ/f9krAGeP4kdBiNmrxDgmV +bpIEShEyY0vY6GvOxfOeK6XghX1H2x3s0ZG8rPumUmDM6iXqsQXC+tu3P5eC +VfwWZSIP2cjkpP0WzzJpWLk1aioL+0m23kwuSwYSXGN7ekvZKHvgV7hBmDxQ +UfKXsx+z0R6H019DC+ShZ5Ex3Io9Wiexu2BQHk6lxF9bwN6SrSWp6KIAFqEW +007leD4ZHqW8hutgMWRViWgFG3Emeo+xExRhseaMaWolG0kEmDwq3asMocZO +7R+q2WgwW8DX1l8Z0u2FBoWeslHFl1a5sVPKkHmLZW2C7WblnrD+uTKwUryU +HmFna4bbXaepgGG303/XnuHvD+dMxkirQtp2PXTkORvZ+whqW/SpAcue54JH +HRuhcAea04IaPA1OXsXC1khkbWXKrIeO07kDPdhcWXSjmH3rQdQt8SzjFRsV +fHV1evhiPXR+GC86VI/Pp2N+vOydf8CY+8GxpAbcn8nej8MMdRColqdE/mOj +rP3XPs/FqINWyas3LtgXGX29PDfUIfnpMk42NjPu6IhCuzooDuoZ7HjLRmLV +GVz7jTUgYNmN+4EteP/QxzWqVDTBeSKcp7+NjeSUk2PPf9eCDt6BB/wdbFR9 +jlL/ya0Nbb7LRElst2mX96SSNnT12354iX2rTlXdyEMbzmqeS4j+xEbKPk/e +zXdoQ5NRQOBcJx5v/oAa2aQD+zI3xix8YSN5OQVS0WUTXL0fdtqun4207oYJ +/UY0cL5uYaM4xUYMZsKMtjUNtLSO6iZhp6ukfvV0o0FMimPQL+zld4qK6yNo +sCHV8PsHDj5vt4btU0tocLwlty6Fwv/TdM8MdRU6ZNqI+krN4/U9b6XjzLcF +eKxDDLwW2eh2iKptWbMuKLz4KTUjMoRaw9HWk3f1gV/6qrOJ7hBS8vhg7X54 +J8ynZRwc9xxCxOLjQvnjAOXHZupFk4eQ9EjFCmmGEWTOb6X9rh9CYfQdX1I1 +TEBf58KJUq5hxBj70yAxbAo3z1boBhsOowKj0BWsFjPotZ4o1z49jLIp/xf5 +aeag4CT8xKd1GM3vWvNfXawlrE2T+5yiNoK6uZZP9XnthdEoF+XpmBEUuPZI +SryKDchx3xT07hhBhX4Nz68k2sJYYxRv1Y5RdGJaZk7Tbx9U3Pj0d0/mKJqx +2O34+qAdFKyrJZliY0jf9dKugX37IbCdi5aYOIbeyWT419HtQUY6KkpzdgzJ +3kuozt3gAG9Oi3JVho2jil4NK2thR3h5wXBT5fg4Ung/6RM+5ghOfsk1//Ob +QPQrl/Kzep2AtEwu1eBMoAyeaZ3UWmdYMe3yd63BJHq8a2NXYqUL1L7b8aYm +fhKlbz0n9ifvADhPTwlPNUyils93T9EvuEJKRsSxNsEpVLb3pmpQnBtU1tGL +4+2n0FTAfq5ApjuIXMruVk+fQjO71X3HjT1gm5GJOdU5hXLHOudD9Q5CzFcF +HQdFDnK+fdfbXcgTGP87lJHtyUGlDy0PLj/tCYMMnQXfbA7Sl3v38+xPT3gp +Lx/g18dBKr0+XW1+XjAhK5SfKzuNvgsesrnZ7wUbdhM3/R2mUetFa28zBwbs +SUzqKjwzjdIiWIJHWxlgfcOmsLtqGlU/W/zpbe4NlFzeZ4OhabTKDU7Tn3hD +UeoBt2YRCimuft2yttobUsJ1i5mrKLSpee8avmfecMQ3LucPtt0O1/ufXnhD +7/nlcZpiFEpbG94U/cYbjDYKfzwpQSHZ7gerGj55g21dI9f6NRRS9ZBOd5vz +hprk2FwlJQrpe47nJm5hgrOwvvrPzRS6d30y1FqPCbOFEzLBNAqtbucYSm9j +gpLj1CM29rjp3Pvc7UxIs04Z+kin8P+La1mzEROqzrlYFulSSGROzEV8HxMO +i6h8s9Gn0PckXX5WABNeH93ywwYodLEqyq/iHhN2gU+j2V4KBdCu6UfkMqFt +QqA3B9vqfgn/tjwm5GVEslZYU0jg2uD98gImaGQlydVjJ4bYDj9+xITgW7/4 +kC2FotRVD5W9ZMKnfbYsxf0U8r/WdPjhVyYQ3QKRd5wpZC4yuCOklwn84p3F +c9gbErmEad+YUNPacdHKhUKDIboFJQNMGArSM57B9rJmjRWPMoFz7J8LRq4U +cuYNDSz6xQSHN8fTmt0pZBYqG5QvRUCaAEPnFoNCL1mnLFLXEEAWcG6MY+9o +5qhGyBLwZfZYpqE3Xi+1pk5jBQKk3TQCu7FlOiKNP6sR8NakXFaKoNCIQbeU +gC4BeTmT+aE+FErmznzqs5+AqMs+7j2H8Pg3CqXvdSCgp/N/KcqHKXTSNSKE +7kTAj0qaC4Ed8cj2n8UDBIx3MvKGsL3IZZeuMggIiDlnORZAIXojg/kqmACf +V56xvUco1HFJTVAlhYB7GxWY4aEUKkTCvuxLBJTT7l/PxT45RtUVXCbA5LpR +cBc2zbwuZts1Am4P/8u3MwyvH5c3Z+8tAk5JBTQsYO8+ktkZkY/rd4uzAsIp +JC9/Rs+wEI/vZ93sdWyq8cjl5cUEmLseG3mFfWc92nuxFNclb1auPUahhe7u +51lPCEhX3sx+hf3ISi73bQMBrpqSZ/mOU+j8L27etEY8f2ckp7WwGbnDXi7N +BPgl7Ptrhy3K80TuewsBI1nEfAb24Srn5J8fCeh6wTix8QSFVDSuhqsOEMAy +5SqBSAr96ohuHxokILRVR8sLuzWR2FTEJqA41WRPPHZM35Zh/VEC9l8S936O +3ZXe7m4zTUC8a5myQRSFUleImZ5YRoJurWa9XDSFqjndrmHLSUixd3DXx/7R +nRcSyEvCctl70Y7YOx6ZZDL4SdC6kuOSjD3oGfHbQoyEb4HXYn5ji1qZiptK +kJC1wcdDMoZC27eKqyNJEu4vbHmtg50inO9IlyGhUayC7rlUf9JTIqdEgiP5 +5dhTbPJufoOkCglC/WtZ7UvPpxzvWaVGwuHRrTZD2IOkhDCPOgk5CWPmErG4 +LmHmO7qJhLLHw7le2E/+SsQO0khomkiVCsMeGOq90ruFhLpHc0KnsA2en6h9 +v42E5jNDl3Oxvx8uVHgKJGS+khRgY4s4R+qWG5HA0DF/Ooutb7zHqsSEhE2l +ij954vB+kfl2/O4eEq7HlQgoYlfwFKWwLEh4V0H0amH3T0TmXLciYd9oqaE+ +9rZ6yQ9JtiS0yUhescVmlHwbOW1Hwt8ylSRX7KSbRdz/2uP5uFQrTGJ/CzHf +FO5Mgr5RUe5xbGEPKbOgAyQ8OjT38t+lPPN+d383EqJj3hDnl95fF33ew5OE +I4s8pjeW+hGwuOPMwOt59FD8naW8GalKOyYJif0Ou+8v5fX1t1iRJPDz1V4u +WsprLh7c7Yv7LyzxK1vqrzx6AfxJMK1XbHiylH/HYvX2wySoWq4qqlnKT5LW +1A0k4apdlELdUn7E910bg0iQXOkj1YAtxCxxVg/B/RW8vdqEvdUm5ohKGAmC +Nx6y3i7lG1iekg8nwRaJb27DvqC2JkM6ggSLdWMW7diPRQdKxU6QYPbRaOw9 +dt/vkkbBKBJ+S0qs+biU/yOmjzeGhKh77k1L1ntnOb8YS4IhqbyiA/v/g5gF +pA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.7709076532163889, + 1.2814550665556363`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.7709076532163905}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6409,130 +6357,132 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.7709076532163889, + 1.2814550665556363`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.7709076532163905}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{115.12306105754327`, - 253.30690491292427`}, {-15.402138689748952`, 5.769736310251048}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwV1Hk4Fe0bB3AJZc0SQmTtzVqdE0XlubMkS0jWLHGcGUuRLSn7K+0iqfQr +HUWRrEmIUpGEN6QSJSQ6do6xtMjv8cdcc32ue+Y797ONEuOIHcHNxcXFxtfS +Pfitzj/lrW8NSzI6T+1+wEaG49m6DJN8VFdTWbzkXpZemqpJNeq2dNIxw7Zl +/scnRH+FXI0eLi65JCK2ltekGa3IblQ1xz5bv+Z5bF4b6gzOzLDArmwNvvWH +9gHtLKD7W2EPdzVGHa/6hGqcTp6zxpYdUHGdNf6CPEJT/9piW05E6Yc29yBj +bo/6/djP/gwLRuT1oSm+H32O2B/jpSMfB/aj3Se19x3AHuczGaZoA2hn9ObV +Hth8F4Jc6HODyH2Go8HAVhDLaAiuwrmTwVdIbGu52XvjxqOoNCaXCMImM5Wl +tFeOo9Vynk1HsWPVbBIPNU+g35YfTkZif5J+vzksbwrZxs1zTmMzD/j7Xb7A +QeyL93IuYk/e5Lr9MHAahe0RL76CvVJZW3SKNoNWfFSuzsZOY9aaiUrOoivl +r2vysRVzXGI3zs2iXQc1pMuwt2mdGg+omkcS69Rf1GP76vU0Dxv/QVWmwtzj +2FTEUR6B9QvoisHtrHnsuCrBHeor/6Iu/en05flslA7bHvg0L6I1sW0xstjM +uw0mIXnLYMwiYqsVdl795d54OW749Hgh3AV78odH1KUL3CBxcpeAD3aUxkxp +ceBysA7l0UrATitSUpmg8YKp0HG3Guyu1tFnf7N4IfoHR78FW5FTfkBEkg+c +kzQP9WDnb7FO1Z7jg8TQzgauAjaqqzyx7HDVShC2VQ82w56pbe9hGwsBOyjn +6HdscSsh0chnQsBfttPlN/am9yYgrC8MUdZGLPFCNvL/Xpa5WUcEZr5dtTPC +DuJu3rRTSBSu2gY53sMeUC6cSpwVg2shv9/FFeH5IRv5W+jioGOY0J2Bzf1g +UGlNsDgkiEZaVGEr0tfZ5Y2Iww2jKss57APGKQ/f9krAGeP4kdBiNmrxDgmV +bpIEShEyY0vY6GvOxfOeK6XghX1H2x3s0ZG8rPumUmDM6iXqsQXC+tu3P5eC +VfwWZSIP2cjkpP0WzzJpWLk1aioL+0m23kwuSwYSXGN7ekvZKHvgV7hBmDxQ +UfKXsx+z0R6H019DC+ShZ5Ex3Io9Wiexu2BQHk6lxF9bwN6SrSWp6KIAFqEW +007leD4ZHqW8hutgMWRViWgFG3Emeo+xExRhseaMaWolG0kEmDwq3asMocZO +7R+q2WgwW8DX1l8Z0u2FBoWeslHFl1a5sVPKkHmLZW2C7WblnrD+uTKwUryU +HmFna4bbXaepgGG303/XnuHvD+dMxkirQtp2PXTkORvZ+whqW/SpAcue54JH +HRuhcAea04IaPA1OXsXC1khkbWXKrIeO07kDPdhcWXSjmH3rQdQt8SzjFRsV +fHV1evhiPXR+GC86VI/Pp2N+vOydf8CY+8GxpAbcn8nej8MMdRColqdE/mOj +rP3XPs/FqINWyas3LtgXGX29PDfUIfnpMk42NjPu6IhCuzooDuoZ7HjLRmLV +GVz7jTUgYNmN+4EteP/QxzWqVDTBeSKcp7+NjeSUk2PPf9eCDt6BB/wdbFR9 +jlL/ya0Nbb7LRElst2mX96SSNnT12354iX2rTlXdyEMbzmqeS4j+xEbKPk/e +zXdoQ5NRQOBcJx5v/oAa2aQD+zI3xix8YSN5OQVS0WUTXL0fdtqun4207oYJ +/UY0cL5uYaM4xUYMZsKMtjUNtLSO6iZhp6ukfvV0o0FMimPQL+zld4qK6yNo +sCHV8PsHDj5vt4btU0tocLwlty6Fwv/TdM8MdRU6ZNqI+krN4/U9b6XjzLcF +eKxDDLwW2eh2iKptWbMuKLz4KTUjMoRaw9HWk3f1gV/6qrOJ7hBS8vhg7X54 +J8ynZRwc9xxCxOLjQvnjAOXHZupFk4eQ9EjFCmmGEWTOb6X9rh9CYfQdX1I1 +TEBf58KJUq5hxBj70yAxbAo3z1boBhsOowKj0BWsFjPotZ4o1z49jLIp/xf5 +aeag4CT8xKd1GM3vWvNfXawlrE2T+5yiNoK6uZZP9XnthdEoF+XpmBEUuPZI +SryKDchx3xT07hhBhX4Nz68k2sJYYxRv1Y5RdGJaZk7Tbx9U3Pj0d0/mKJqx +2O34+qAdFKyrJZliY0jf9dKugX37IbCdi5aYOIbeyWT419HtQUY6KkpzdgzJ +3kuozt3gAG9Oi3JVho2jil4NK2thR3h5wXBT5fg4Ung/6RM+5ghOfsk1//Ob +QPQrl/Kzep2AtEwu1eBMoAyeaZ3UWmdYMe3yd63BJHq8a2NXYqUL1L7b8aYm +fhKlbz0n9ifvADhPTwlPNUyils93T9EvuEJKRsSxNsEpVLb3pmpQnBtU1tGL +4+2n0FTAfq5ApjuIXMruVk+fQjO71X3HjT1gm5GJOdU5hXLHOudD9Q5CzFcF +HQdFDnK+fdfbXcgTGP87lJHtyUGlDy0PLj/tCYMMnQXfbA7Sl3v38+xPT3gp +Lx/g18dBKr0+XW1+XjAhK5SfKzuNvgsesrnZ7wUbdhM3/R2mUetFa28zBwbs +SUzqKjwzjdIiWIJHWxlgfcOmsLtqGlU/W/zpbe4NlFzeZ4OhabTKDU7Tn3hD +UeoBt2YRCimuft2yttobUsJ1i5mrKLSpee8avmfecMQ3LucPtt0O1/ufXnhD +7/nlcZpiFEpbG94U/cYbjDYKfzwpQSHZ7gerGj55g21dI9f6NRRS9ZBOd5vz +hprk2FwlJQrpe47nJm5hgrOwvvrPzRS6d30y1FqPCbOFEzLBNAqtbucYSm9j +gpLj1CM29rjp3Pvc7UxIs04Z+kin8P+La1mzEROqzrlYFulSSGROzEV8HxMO +i6h8s9Gn0PckXX5WABNeH93ywwYodLEqyq/iHhN2gU+j2V4KBdCu6UfkMqFt +QqA3B9vqfgn/tjwm5GVEslZYU0jg2uD98gImaGQlydVjJ4bYDj9+xITgW7/4 +kC2FotRVD5W9ZMKnfbYsxf0U8r/WdPjhVyYQ3QKRd5wpZC4yuCOklwn84p3F +c9gbErmEad+YUNPacdHKhUKDIboFJQNMGArSM57B9rJmjRWPMoFz7J8LRq4U +cuYNDSz6xQSHN8fTmt0pZBYqG5QvRUCaAEPnFoNCL1mnLFLXEEAWcG6MY+9o +5qhGyBLwZfZYpqE3Xi+1pk5jBQKk3TQCu7FlOiKNP6sR8NakXFaKoNCIQbeU +gC4BeTmT+aE+FErmznzqs5+AqMs+7j2H8Pg3CqXvdSCgp/N/KcqHKXTSNSKE +7kTAj0qaC4Ed8cj2n8UDBIx3MvKGsL3IZZeuMggIiDlnORZAIXojg/kqmACf +V56xvUco1HFJTVAlhYB7GxWY4aEUKkTCvuxLBJTT7l/PxT45RtUVXCbA5LpR +cBc2zbwuZts1Am4P/8u3MwyvH5c3Z+8tAk5JBTQsYO8+ktkZkY/rd4uzAsIp +JC9/Rs+wEI/vZ93sdWyq8cjl5cUEmLseG3mFfWc92nuxFNclb1auPUahhe7u +51lPCEhX3sx+hf3ISi73bQMBrpqSZ/mOU+j8L27etEY8f2ckp7WwGbnDXi7N +BPgl7Ptrhy3K80TuewsBI1nEfAb24Srn5J8fCeh6wTix8QSFVDSuhqsOEMAy +5SqBSAr96ohuHxokILRVR8sLuzWR2FTEJqA41WRPPHZM35Zh/VEC9l8S936O +3ZXe7m4zTUC8a5myQRSFUleImZ5YRoJurWa9XDSFqjndrmHLSUixd3DXx/7R +nRcSyEvCctl70Y7YOx6ZZDL4SdC6kuOSjD3oGfHbQoyEb4HXYn5ji1qZiptK +kJC1wcdDMoZC27eKqyNJEu4vbHmtg50inO9IlyGhUayC7rlUf9JTIqdEgiP5 +5dhTbPJufoOkCglC/WtZ7UvPpxzvWaVGwuHRrTZD2IOkhDCPOgk5CWPmErG4 +LmHmO7qJhLLHw7le2E/+SsQO0khomkiVCsMeGOq90ruFhLpHc0KnsA2en6h9 +v42E5jNDl3Oxvx8uVHgKJGS+khRgY4s4R+qWG5HA0DF/Ooutb7zHqsSEhE2l +ij954vB+kfl2/O4eEq7HlQgoYlfwFKWwLEh4V0H0amH3T0TmXLciYd9oqaE+ +9rZ6yQ9JtiS0yUhescVmlHwbOW1Hwt8ylSRX7KSbRdz/2uP5uFQrTGJ/CzHf +FO5Mgr5RUe5xbGEPKbOgAyQ8OjT38t+lPPN+d383EqJj3hDnl95fF33ew5OE +I4s8pjeW+hGwuOPMwOt59FD8naW8GalKOyYJif0Ou+8v5fX1t1iRJPDz1V4u +WsprLh7c7Yv7LyzxK1vqrzx6AfxJMK1XbHiylH/HYvX2wySoWq4qqlnKT5LW +1A0k4apdlELdUn7E910bg0iQXOkj1YAtxCxxVg/B/RW8vdqEvdUm5ohKGAmC +Nx6y3i7lG1iekg8nwRaJb27DvqC2JkM6ggSLdWMW7diPRQdKxU6QYPbRaOw9 +dt/vkkbBKBJ+S0qs+biU/yOmjzeGhKh77k1L1ntnOb8YS4IhqbyiA/v/g5gF +pA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.7709076532163889, 1.2814550665556363`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.7709076532163905}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6542,7 +6492,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5986424829233548}, + AxesOrigin->{0, 0.7709076532163905}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6570,7 +6521,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7709076532163889, 1.2814550665556363`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6578,9 +6530,9 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991339493274267*^9}, - CellLabel-> - "Out[334]=",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] + CellChangeTimes->{3.991339493274267*^9, 3.994350125785406*^9, + 3.9943533160676727`*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"d7980c6a-b9dc-448e-9b9f-fe238ba03fca"] }, Open ]], Cell[CellGroupData[{ @@ -6643,262 +6595,161 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849724783457*^9},ExpressionUUID->"6e33cb28-ef1e-1547-b52d-\ -2171e7786920"], + CellChangeTimes->{3.991849724783457*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2261575897868585`*^-267\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.9683257247023854`*^-275\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994350126315343*^9, + 3.994353316647085*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"e3f17246-11ee-4d0d-b193-c9288408a042"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.439804793975602`*^-287\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 335, - 333, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493498577*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994350126315343*^9, + 3.99435331666055*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], +In[95]:=",ExpressionUUID->"2aea525f-3d28-43c7-974a-675bddefa370"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.273330099721687`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.9861720437853457`*^-299\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 335, 334, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493508564*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 11, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994350126315343*^9, + 3.994353316676313*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.013344112917215`*^-290\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 335, 335, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493517563*^9}, - CellLabel-> - "During evaluation of \ -In[335]:=",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], +In[95]:=",ExpressionUUID->"f73b3cf8-e53b-4235-800b-a7042da146f7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 335, 336, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493525564*^9}, +during this calculation.\"", 2, 95, 12, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994350126315343*^9, + 3.994353316691218*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], +In[95]:=",ExpressionUUID->"fe9e50a3-c11c-4a52-a981-4b1c35f3a7c6"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VdsXAHDRwCueR8rMvfeca8iUMXKtVRlCSSXRgMrQIJXhChkzJ2Ro +MkuJe0/TkyJlLkkDKaKX8pqejMkYP7/jj/O5n+/nc+4+a++99tqLsf/YNg9B +AQGBWfqZ/x3/8LSBOFNkNhPUc9Ky2cisPVc6aF1nFMxmRG2/3iYFKPVyv3Rn +GmQNOsgGtpHAtS/tEOosBFP9rIdObQbw1+DKtKmOOxDg0Z2s22YBPVV2x351 +1IFk8ObA+tYdYEn0/TPS0QZWUvb/k3vlAVMdRpnDHb2g4qlfk/A0AOo3FBe1 +Fo5CFvex/93MWJDvqfi6X2MW3jEWajZdSYXl3q6lSzYIYdDKzAVRlZmQttry +gd0OYXQQTv25YnEWvLuoUzMiLoo1fkGFB+7mwZmi8JeCMn9hostWq2KTQliZ +8W9Ceo4k/pJaWlXvWgRxDtZmbeNSKGH5NGDN6mvgZ1zg+jRKGj3TdpL2o8Vg +PjQd7POvLKqGzt3J31cCQRsz1Gv7ZbHb4snvNs8SuFGg2SU5LotrfjYKC3qX +gLSDm3GFsByW7dXxceSWQP/9xgkhLTnctWeXS2diCaRHpfpfOimHqaMb0vHv +EuiVYvs0iMqjeobo0fwFpRBpunWf7BoFlL4XtehcRilsdMn9abReASMs1FK2 +XioFsYgfp3dsUsDolAvGYrmlkF0fcy3VTQE3OcsOhxSXwn2byh+LExRwdb5U +j2plKQw7sbij7xRQw6e1sOlDKbgEjCW2hChiOpP8pEjygLywXr4vRhHvevjC +ATUeHW8KtSRVEU//XVN5RZMHwTNqr9YXKaLvACEsY8iDzNMuUhUtirjNMHem +3ZIHLeee5F1VUEJC8NOGNC8emNy4VBZWrYQP60KNmNd4YN7xYnawSQlnwhdG +l5TwwE5goZVrmxKeTWX4aFI8OLDN5x18oZ1pK7eqjAeWIYzwiEXKaLy1umu2 +lgfHlcavrFuljMnbd/8W+IcHDV55A/VcZTSd0rMPE+eD9YyxxKkQZWTsHTlx +SZIPL1LbDfUjlFFh6Kfe7RV8eFchElGUoIzCLeaX3srzYXCpv0RMtjK+4Hb0 +T6ryQfrWRiPLOmWsmQnryEI+eE+ORDSJMtDGb0337qN8MDnhueKrBAPDJK/2 +mh/ng3BfF09ImoHh1wKm1Pz4cLW7/q0Zk4Gl0dscv5/kw4dHmRp3DRn4NjCr +3SCaD1tijDsLXBloHrSJtfwyH3QlIrVDbjPQufajwcc6PgicGWu4WM7A2Orx +h7aNdPxCh3eVP2DgnMBF17+f8OHI2LaYkUYGXqiYHua28KGok+j26mLg0o1f +HF++4cOKvKZYByEmLhnTi2v8xoepVeIfNHcw8eW1m+7NwhSM58hG6u1iIis3 +8uOtPyj49SdJGLsyMWOtdHH6MgoGR40Pmx9i4sej+1bYiVPQ++DA+K5QJjp1 +aCeeX0lBs+09sfirTCxjnNPmkhQ8eVh7+2wpEzeCSwpDhYIG7RaH9JtM/JYT +tu6pKgWPJD9dzq1g4ouS8lxRDQrudP+hcvc5E+Wb5WwP61Jw+YgL9I4x0dH2 +/Qc/Mwou/HOw99s0E+PNVhR8BgoytvjFDMwxUUVo8OHWdRQk68U/mxRhoWBv +oQjDnIKo37d3/qnIwq6loZPp1hQcObPouKklC7mOSrefbafg4OyfkuttWRgi +/tpVcAcFnsdky63sWdhqzfY1cKTAbbv2zLZdLGQbLGxIdaLAQc45/pAPCx9n +6WnK76XAlMfPP3+ehXELtmbHelDQrczLs8hi4UvDmHe+nhQEny/J/ZXHwgoZ +4vduLwruRV7L3lbCQiWKP0AcokDXKf+iWBULjwza557zpqD1ee6FhzUsrO0x +E/U4SsHxDTnnvRtZaGFW6W7gQ8ENrcsZzS9YyDHzf9lyjAK1RRmpsZ9YaGrx +ovCtLwVNwWkpBl9Z2Cgx637Oj57PcGry5z4WNlnPSFr7U1DUfTZp/S8Wru87 +b3IzgALlO3Hx/1tMoIRrTIXjSQpWuIZEcDUI3GCkMi0RSsHd9qBwcjWBmlaH +n2XTdrA5GdZuQKBf/P40VhgFaQYBp3SBwMbWKiHVcApElx07ObiVwJUVJtHL +IingRx4NzHEkMEXTUjKMts3EEe6m3QSeLC7O7qcd33vQv9SdwAnFx/k1URQs +rNh/3DOQwHP82TDzaAquaO07JnWKQNPE9SM5tNcXufo0RBDomZK9/xft8JQ9 +3sxEAj9FT5pfjKFAcdHuI63JBJZ3at/7Qrsq2PlwRDqBybLf1HViKZj2cDz4 +IZvAIgsLmSral7odvM4WEGhgTmbO0l6zdbun6TUCp3dNLDeNo4Brau9++SaB +Pxb/x7xFW+qO3QHrMgJ1dlvc+UK7TGXz/sn7BDpYiG6UjqdgRMLGzbGOwAPO +Lgn+tDu9ma8OPyFwwHT0UgHtmsfTEN5CYKpCkeYz2teVX99MbyVw80czixHa +qcE8petvCWSLpH2STKDgZPvplKpuAu9Wegvp0XbT2jP36iOBb+/m8uxob4zX +P/blCx2P82SXJ22d3mU9U30E/ptvkxZCW9r0i53YMIFKbK+2JNoC5x8+Yo4R +WKOonH2Z9vehTC2jaQJ/7tk4XET7pbVPru0cgY/t/n7Jo11+xVLMbSGJLbP6 +a2/Szp1VDPMXIbFKrFBv3rE7JwbixUgUrX1ZMf++z+2Xe3MkSUweTH8xP57j +0uvPb0uTuGBpo+/898w8IjiPFUisZpkUz8fDrnaiupgk2vc0e8/HKyqzWmFI +hUSR0C0N8/P55StyVkiTxKz2/Bvz833f8mlmpS6JTTsuasyvRwO70lvDiMRv +S8RhOW1+RNp7NCUxMaH36/x6ZnQd3rRjHYmy4j+IFtqn9DdUHbIk0cdr0XQh +bfdkOY0wWxIPjYh6cWnbfh/NSrMn8eLVT96WtHXXtywt3kFio7jLMknastlF +IQ92kXjJYZ/le3r/+7bs2P3ZncTatsCz7rTbSjSfTR4ikTSwyWbRrhRavFb0 +GImnqxnWPXR+JdwrlzUMIvH2oHvEJtrH/0pJtAkjMWdbxrL/0fnqdMRr2uU0 +iV9325vwaasqSXfFnSUxX2Em9H90vosHDVtnp5EYoFSWWUh7sq2p4tYFErOd +ErZtoN0UG3TpXQGJU7rM6uDTFHgNdjmtKifxjPSm0Fr6vNlt/LsJHpDY7K/a +YUPbsPDMGocaen2FXP55FUHBYkdT6dBmer/0Q3+20ef52sOcjhcfSOxvtnC+ +SZ//5JVcq3//JfFkS4G2Im3uCbt7E99JHJIpr0g4RYEFOXdeeZRER4/afscQ +Cj4nuTn6LmHjW63M70/p+uLTp8HUWcbGoyYis2q0J6ymBgbE2Xik88SauEAK +/hBKizkky8ZFgwYqxlw6n4Pqy9w02eicojcdTNezUA+25JbtbNzzI4cIpOvj +4vqfH5Y5sfHPP64uKqXrZ6pydWnzHjYuPc+U7ToyX+92rrf0ZKNP742Pqw/T +99PWhBOcIDYK9uyfrqbr8wqz/per8uj/e7CX73SlID/rftZ/V9h4zrYqaa8L +XV+nor2Kr7PxcTTPYt98vS9TmGPeYePm4O4Qt90UHFDfoiXbyMaorafEzXZS +cGvFnSThH2z8nF+XzrWjwHoo0PqLoQo2DxS/7zWhQH61YqywqQoqZsq3cI3p ++9S3oW7VOhV0j/ydv2QNna/j4qa+tiq4J8l5TsmAgg+zJVpzripY98OJWqVN +ge+y95IyCSrIuf+t8SaTvh/V8MOmbhX8mFTxwHcJBd5Hvsoe/6iCLWJN4VcX +UQBU0s70LyqYLii/+Y0QvR867169G1JBiTF1YQ0BCrTW+NZ7LlTF+hwZ5fJJ +PtRbFl2P0FRFCFLs4vzHh/4Dwn5l4aros3V7AauJ7odyzR9WR6siES/UJ/SY +D0PvIpY8S1BFE3mPkE/1fPi5ZSrrU7oqTvKqT2VU82FibV+D2HVVzKsLlukq +54Pg8pYVh16p4tDbjRWfi/gg05BSqcBQw+eJ6elzYXy6318pGFenhkeOXShI +WsWH//ZbXV/7RA1L2k7VT9D9V1JBoN3wMzUcuvK5yY3Nh9eKnZed36jhBSG5 +KA0GH9xkLulpfFfDRclWT0vpfi5ITM6jVVQd+d8sojcs4AN/UrFJzlkdLykV +Rva380DiOTv51pA66sZY3NjO5YF8/E17Q0MNLB+98VUntRQurjIWl/TSxK+b +s9MUc0ugWXadweg5LfTIUz50POs6mMjXpWq/1cbisscmAceKQUyo0H9flA6u +VJC8e9r6GihGKpk6s1djfNCjCRWBqyBC7inf9mQ1PoI8Ec3yK6DFkbkZuFcX +D3IWXBeMKATfDxL1NgJ6aCYeaXROpwCGRpN2WF/Uw5GslL98xvPASvvxZWtN +fbwVPB7efiUHHo2u/T3xQh93i5JqJTpZ4KOh29XqYYD3jGptyZmLwBl0b3cW +McRth2ZsGHfOgwUhvVm00BBzNeyanpdkgGpE4sk6IyOUX5OeUPQ4DdQ9jKvJ +LiMUsnmiINuVCh6PDkaXnViDcyZivinOyVCd3+4+ImWMjh0Xe35MJcKv63MT +2veMUX/vgxM7BuLgAMkTubzZBJfXvd5oaR8DI+rphneGTdCqMq4hqCIK7hf9 +/jQWvxY7bz61c4mLgF3mLFyraIqNXsT75exQkDsaV6FVY4oLtCJrFzsEgdQf +3rc37+Tg63/yurYzuVC0ITR42JmDSk6LT3Us54JuaPKG9D0ctNfva9i3hAt2 +w7fedO7j4OWy2+aJ/QEQ+3Zs6oA3B7u/9dWo3wuAycLw9cGRHHwf/exV8eYA +6Fqb/voaj4PsQFPv0+H+cDCgKNv6BgfbhHt7Onz9YfzGXY/+Wxzsdxsr1/X0 +Bwlm58Tqcg7GiXXH/t7kD7bCCvIPazjoLfTmxDtZf6hqv+b++g0Hn0y0Zzbc +8wMbsfua3E4OflcegzCeH3RaPR2X7uagSpb9KrM8P/hV+SPe5SMHj/LVH76K +9QPNAh3qvz4OHv8acQ4d/aCqax03aYCDulnnRDRs6PGWbwftYTq+j49uK5j5 +gWdcQKv/GAcJmZ4ESTY9Xk3s5ZWTHPSbSri7UtYPoqYvHKic5qCtVa0wU8wP +xPVLNPbOclBgwC1SV9APco9Wjs3NcVC61VzBetwX/g9pwyjU "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6912,221 +6763,113 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwV1nk8VdsXAHDRwCueR8rMvfeca8iUMXKtVRlCSSXRgMrQIJXhChkzJ2Ro +MkuJe0/TkyJlLkkDKaKX8pqejMkYP7/jj/O5n+/nc+4+a++99tqLsf/YNg9B +AQGBWfqZ/x3/8LSBOFNkNhPUc9Ky2cisPVc6aF1nFMxmRG2/3iYFKPVyv3Rn +GmQNOsgGtpHAtS/tEOosBFP9rIdObQbw1+DKtKmOOxDg0Z2s22YBPVV2x351 +1IFk8ObA+tYdYEn0/TPS0QZWUvb/k3vlAVMdRpnDHb2g4qlfk/A0AOo3FBe1 +Fo5CFvex/93MWJDvqfi6X2MW3jEWajZdSYXl3q6lSzYIYdDKzAVRlZmQttry +gd0OYXQQTv25YnEWvLuoUzMiLoo1fkGFB+7mwZmi8JeCMn9hostWq2KTQliZ +8W9Ceo4k/pJaWlXvWgRxDtZmbeNSKGH5NGDN6mvgZ1zg+jRKGj3TdpL2o8Vg +PjQd7POvLKqGzt3J31cCQRsz1Gv7ZbHb4snvNs8SuFGg2SU5LotrfjYKC3qX +gLSDm3GFsByW7dXxceSWQP/9xgkhLTnctWeXS2diCaRHpfpfOimHqaMb0vHv +EuiVYvs0iMqjeobo0fwFpRBpunWf7BoFlL4XtehcRilsdMn9abReASMs1FK2 +XioFsYgfp3dsUsDolAvGYrmlkF0fcy3VTQE3OcsOhxSXwn2byh+LExRwdb5U +j2plKQw7sbij7xRQw6e1sOlDKbgEjCW2hChiOpP8pEjygLywXr4vRhHvevjC +ATUeHW8KtSRVEU//XVN5RZMHwTNqr9YXKaLvACEsY8iDzNMuUhUtirjNMHem +3ZIHLeee5F1VUEJC8NOGNC8emNy4VBZWrYQP60KNmNd4YN7xYnawSQlnwhdG +l5TwwE5goZVrmxKeTWX4aFI8OLDN5x18oZ1pK7eqjAeWIYzwiEXKaLy1umu2 +lgfHlcavrFuljMnbd/8W+IcHDV55A/VcZTSd0rMPE+eD9YyxxKkQZWTsHTlx +SZIPL1LbDfUjlFFh6Kfe7RV8eFchElGUoIzCLeaX3srzYXCpv0RMtjK+4Hb0 +T6ryQfrWRiPLOmWsmQnryEI+eE+ORDSJMtDGb0337qN8MDnhueKrBAPDJK/2 +mh/ng3BfF09ImoHh1wKm1Pz4cLW7/q0Zk4Gl0dscv5/kw4dHmRp3DRn4NjCr +3SCaD1tijDsLXBloHrSJtfwyH3QlIrVDbjPQufajwcc6PgicGWu4WM7A2Orx +h7aNdPxCh3eVP2DgnMBF17+f8OHI2LaYkUYGXqiYHua28KGok+j26mLg0o1f +HF++4cOKvKZYByEmLhnTi2v8xoepVeIfNHcw8eW1m+7NwhSM58hG6u1iIis3 +8uOtPyj49SdJGLsyMWOtdHH6MgoGR40Pmx9i4sej+1bYiVPQ++DA+K5QJjp1 +aCeeX0lBs+09sfirTCxjnNPmkhQ8eVh7+2wpEzeCSwpDhYIG7RaH9JtM/JYT +tu6pKgWPJD9dzq1g4ouS8lxRDQrudP+hcvc5E+Wb5WwP61Jw+YgL9I4x0dH2 +/Qc/Mwou/HOw99s0E+PNVhR8BgoytvjFDMwxUUVo8OHWdRQk68U/mxRhoWBv +oQjDnIKo37d3/qnIwq6loZPp1hQcObPouKklC7mOSrefbafg4OyfkuttWRgi +/tpVcAcFnsdky63sWdhqzfY1cKTAbbv2zLZdLGQbLGxIdaLAQc45/pAPCx9n +6WnK76XAlMfPP3+ehXELtmbHelDQrczLs8hi4UvDmHe+nhQEny/J/ZXHwgoZ +4vduLwruRV7L3lbCQiWKP0AcokDXKf+iWBULjwza557zpqD1ee6FhzUsrO0x +E/U4SsHxDTnnvRtZaGFW6W7gQ8ENrcsZzS9YyDHzf9lyjAK1RRmpsZ9YaGrx +ovCtLwVNwWkpBl9Z2Cgx637Oj57PcGry5z4WNlnPSFr7U1DUfTZp/S8Wru87 +b3IzgALlO3Hx/1tMoIRrTIXjSQpWuIZEcDUI3GCkMi0RSsHd9qBwcjWBmlaH +n2XTdrA5GdZuQKBf/P40VhgFaQYBp3SBwMbWKiHVcApElx07ObiVwJUVJtHL +IingRx4NzHEkMEXTUjKMts3EEe6m3QSeLC7O7qcd33vQv9SdwAnFx/k1URQs +rNh/3DOQwHP82TDzaAquaO07JnWKQNPE9SM5tNcXufo0RBDomZK9/xft8JQ9 +3sxEAj9FT5pfjKFAcdHuI63JBJZ3at/7Qrsq2PlwRDqBybLf1HViKZj2cDz4 +IZvAIgsLmSral7odvM4WEGhgTmbO0l6zdbun6TUCp3dNLDeNo4Brau9++SaB +Pxb/x7xFW+qO3QHrMgJ1dlvc+UK7TGXz/sn7BDpYiG6UjqdgRMLGzbGOwAPO +Lgn+tDu9ma8OPyFwwHT0UgHtmsfTEN5CYKpCkeYz2teVX99MbyVw80czixHa +qcE8petvCWSLpH2STKDgZPvplKpuAu9Wegvp0XbT2jP36iOBb+/m8uxob4zX +P/blCx2P82SXJ22d3mU9U30E/ptvkxZCW9r0i53YMIFKbK+2JNoC5x8+Yo4R +WKOonH2Z9vehTC2jaQJ/7tk4XET7pbVPru0cgY/t/n7Jo11+xVLMbSGJLbP6 +a2/Szp1VDPMXIbFKrFBv3rE7JwbixUgUrX1ZMf++z+2Xe3MkSUweTH8xP57j +0uvPb0uTuGBpo+/898w8IjiPFUisZpkUz8fDrnaiupgk2vc0e8/HKyqzWmFI +hUSR0C0N8/P55StyVkiTxKz2/Bvz833f8mlmpS6JTTsuasyvRwO70lvDiMRv +S8RhOW1+RNp7NCUxMaH36/x6ZnQd3rRjHYmy4j+IFtqn9DdUHbIk0cdr0XQh +bfdkOY0wWxIPjYh6cWnbfh/NSrMn8eLVT96WtHXXtywt3kFio7jLMknastlF +IQ92kXjJYZ/le3r/+7bs2P3ZncTatsCz7rTbSjSfTR4ikTSwyWbRrhRavFb0 +GImnqxnWPXR+JdwrlzUMIvH2oHvEJtrH/0pJtAkjMWdbxrL/0fnqdMRr2uU0 +iV9325vwaasqSXfFnSUxX2Em9H90vosHDVtnp5EYoFSWWUh7sq2p4tYFErOd +ErZtoN0UG3TpXQGJU7rM6uDTFHgNdjmtKifxjPSm0Fr6vNlt/LsJHpDY7K/a +YUPbsPDMGocaen2FXP55FUHBYkdT6dBmer/0Q3+20ef52sOcjhcfSOxvtnC+ +SZ//5JVcq3//JfFkS4G2Im3uCbt7E99JHJIpr0g4RYEFOXdeeZRER4/afscQ +Cj4nuTn6LmHjW63M70/p+uLTp8HUWcbGoyYis2q0J6ymBgbE2Xik88SauEAK +/hBKizkky8ZFgwYqxlw6n4Pqy9w02eicojcdTNezUA+25JbtbNzzI4cIpOvj +4vqfH5Y5sfHPP64uKqXrZ6pydWnzHjYuPc+U7ToyX+92rrf0ZKNP742Pqw/T +99PWhBOcIDYK9uyfrqbr8wqz/per8uj/e7CX73SlID/rftZ/V9h4zrYqaa8L +XV+nor2Kr7PxcTTPYt98vS9TmGPeYePm4O4Qt90UHFDfoiXbyMaorafEzXZS +cGvFnSThH2z8nF+XzrWjwHoo0PqLoQo2DxS/7zWhQH61YqywqQoqZsq3cI3p ++9S3oW7VOhV0j/ydv2QNna/j4qa+tiq4J8l5TsmAgg+zJVpzripY98OJWqVN +ge+y95IyCSrIuf+t8SaTvh/V8MOmbhX8mFTxwHcJBd5Hvsoe/6iCLWJN4VcX +UQBU0s70LyqYLii/+Y0QvR867169G1JBiTF1YQ0BCrTW+NZ7LlTF+hwZ5fJJ +PtRbFl2P0FRFCFLs4vzHh/4Dwn5l4aros3V7AauJ7odyzR9WR6siES/UJ/SY +D0PvIpY8S1BFE3mPkE/1fPi5ZSrrU7oqTvKqT2VU82FibV+D2HVVzKsLlukq +54Pg8pYVh16p4tDbjRWfi/gg05BSqcBQw+eJ6elzYXy6318pGFenhkeOXShI +WsWH//ZbXV/7RA1L2k7VT9D9V1JBoN3wMzUcuvK5yY3Nh9eKnZed36jhBSG5 +KA0GH9xkLulpfFfDRclWT0vpfi5ITM6jVVQd+d8sojcs4AN/UrFJzlkdLykV +Rva380DiOTv51pA66sZY3NjO5YF8/E17Q0MNLB+98VUntRQurjIWl/TSxK+b +s9MUc0ugWXadweg5LfTIUz50POs6mMjXpWq/1cbisscmAceKQUyo0H9flA6u +VJC8e9r6GihGKpk6s1djfNCjCRWBqyBC7inf9mQ1PoI8Ec3yK6DFkbkZuFcX +D3IWXBeMKATfDxL1NgJ6aCYeaXROpwCGRpN2WF/Uw5GslL98xvPASvvxZWtN +fbwVPB7efiUHHo2u/T3xQh93i5JqJTpZ4KOh29XqYYD3jGptyZmLwBl0b3cW +McRth2ZsGHfOgwUhvVm00BBzNeyanpdkgGpE4sk6IyOUX5OeUPQ4DdQ9jKvJ +LiMUsnmiINuVCh6PDkaXnViDcyZivinOyVCd3+4+ImWMjh0Xe35MJcKv63MT +2veMUX/vgxM7BuLgAMkTubzZBJfXvd5oaR8DI+rphneGTdCqMq4hqCIK7hf9 +/jQWvxY7bz61c4mLgF3mLFyraIqNXsT75exQkDsaV6FVY4oLtCJrFzsEgdQf +3rc37+Tg63/yurYzuVC0ITR42JmDSk6LT3Us54JuaPKG9D0ctNfva9i3hAt2 +w7fedO7j4OWy2+aJ/QEQ+3Zs6oA3B7u/9dWo3wuAycLw9cGRHHwf/exV8eYA +6Fqb/voaj4PsQFPv0+H+cDCgKNv6BgfbhHt7Onz9YfzGXY/+Wxzsdxsr1/X0 +Bwlm58Tqcg7GiXXH/t7kD7bCCvIPazjoLfTmxDtZf6hqv+b++g0Hn0y0Zzbc +8wMbsfua3E4OflcegzCeH3RaPR2X7uagSpb9KrM8P/hV+SPe5SMHj/LVH76K +9QPNAh3qvz4OHv8acQ4d/aCqax03aYCDulnnRDRs6PGWbwftYTq+j49uK5j5 +gWdcQKv/GAcJmZ4ESTY9Xk3s5ZWTHPSbSri7UtYPoqYvHKic5qCtVa0wU8wP +xPVLNPbOclBgwC1SV9APco9Wjs3NcVC61VzBetwX/g9pwyjU "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.05769107434980078}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7138,19 +6881,19 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.05769107434980078}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7164,220 +6907,112 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwV1nk8VdsXAHDRwCueR8rMvfeca8iUMXKtVRlCSSXRgMrQIJXhChkzJ2Ro +MkuJe0/TkyJlLkkDKaKX8pqejMkYP7/jj/O5n+/nc+4+a++99tqLsf/YNg9B +AQGBWfqZ/x3/8LSBOFNkNhPUc9Ky2cisPVc6aF1nFMxmRG2/3iYFKPVyv3Rn +GmQNOsgGtpHAtS/tEOosBFP9rIdObQbw1+DKtKmOOxDg0Z2s22YBPVV2x351 +1IFk8ObA+tYdYEn0/TPS0QZWUvb/k3vlAVMdRpnDHb2g4qlfk/A0AOo3FBe1 +Fo5CFvex/93MWJDvqfi6X2MW3jEWajZdSYXl3q6lSzYIYdDKzAVRlZmQttry +gd0OYXQQTv25YnEWvLuoUzMiLoo1fkGFB+7mwZmi8JeCMn9hostWq2KTQliZ +8W9Ceo4k/pJaWlXvWgRxDtZmbeNSKGH5NGDN6mvgZ1zg+jRKGj3TdpL2o8Vg +PjQd7POvLKqGzt3J31cCQRsz1Gv7ZbHb4snvNs8SuFGg2SU5LotrfjYKC3qX +gLSDm3GFsByW7dXxceSWQP/9xgkhLTnctWeXS2diCaRHpfpfOimHqaMb0vHv +EuiVYvs0iMqjeobo0fwFpRBpunWf7BoFlL4XtehcRilsdMn9abReASMs1FK2 +XioFsYgfp3dsUsDolAvGYrmlkF0fcy3VTQE3OcsOhxSXwn2byh+LExRwdb5U +j2plKQw7sbij7xRQw6e1sOlDKbgEjCW2hChiOpP8pEjygLywXr4vRhHvevjC +ATUeHW8KtSRVEU//XVN5RZMHwTNqr9YXKaLvACEsY8iDzNMuUhUtirjNMHem +3ZIHLeee5F1VUEJC8NOGNC8emNy4VBZWrYQP60KNmNd4YN7xYnawSQlnwhdG +l5TwwE5goZVrmxKeTWX4aFI8OLDN5x18oZ1pK7eqjAeWIYzwiEXKaLy1umu2 +lgfHlcavrFuljMnbd/8W+IcHDV55A/VcZTSd0rMPE+eD9YyxxKkQZWTsHTlx +SZIPL1LbDfUjlFFh6Kfe7RV8eFchElGUoIzCLeaX3srzYXCpv0RMtjK+4Hb0 +T6ryQfrWRiPLOmWsmQnryEI+eE+ORDSJMtDGb0337qN8MDnhueKrBAPDJK/2 +mh/ng3BfF09ImoHh1wKm1Pz4cLW7/q0Zk4Gl0dscv5/kw4dHmRp3DRn4NjCr +3SCaD1tijDsLXBloHrSJtfwyH3QlIrVDbjPQufajwcc6PgicGWu4WM7A2Orx +h7aNdPxCh3eVP2DgnMBF17+f8OHI2LaYkUYGXqiYHua28KGok+j26mLg0o1f +HF++4cOKvKZYByEmLhnTi2v8xoepVeIfNHcw8eW1m+7NwhSM58hG6u1iIis3 +8uOtPyj49SdJGLsyMWOtdHH6MgoGR40Pmx9i4sej+1bYiVPQ++DA+K5QJjp1 +aCeeX0lBs+09sfirTCxjnNPmkhQ8eVh7+2wpEzeCSwpDhYIG7RaH9JtM/JYT +tu6pKgWPJD9dzq1g4ouS8lxRDQrudP+hcvc5E+Wb5WwP61Jw+YgL9I4x0dH2 +/Qc/Mwou/HOw99s0E+PNVhR8BgoytvjFDMwxUUVo8OHWdRQk68U/mxRhoWBv +oQjDnIKo37d3/qnIwq6loZPp1hQcObPouKklC7mOSrefbafg4OyfkuttWRgi +/tpVcAcFnsdky63sWdhqzfY1cKTAbbv2zLZdLGQbLGxIdaLAQc45/pAPCx9n +6WnK76XAlMfPP3+ehXELtmbHelDQrczLs8hi4UvDmHe+nhQEny/J/ZXHwgoZ +4vduLwruRV7L3lbCQiWKP0AcokDXKf+iWBULjwza557zpqD1ee6FhzUsrO0x +E/U4SsHxDTnnvRtZaGFW6W7gQ8ENrcsZzS9YyDHzf9lyjAK1RRmpsZ9YaGrx +ovCtLwVNwWkpBl9Z2Cgx637Oj57PcGry5z4WNlnPSFr7U1DUfTZp/S8Wru87 +b3IzgALlO3Hx/1tMoIRrTIXjSQpWuIZEcDUI3GCkMi0RSsHd9qBwcjWBmlaH +n2XTdrA5GdZuQKBf/P40VhgFaQYBp3SBwMbWKiHVcApElx07ObiVwJUVJtHL +IingRx4NzHEkMEXTUjKMts3EEe6m3QSeLC7O7qcd33vQv9SdwAnFx/k1URQs +rNh/3DOQwHP82TDzaAquaO07JnWKQNPE9SM5tNcXufo0RBDomZK9/xft8JQ9 +3sxEAj9FT5pfjKFAcdHuI63JBJZ3at/7Qrsq2PlwRDqBybLf1HViKZj2cDz4 +IZvAIgsLmSral7odvM4WEGhgTmbO0l6zdbun6TUCp3dNLDeNo4Brau9++SaB +Pxb/x7xFW+qO3QHrMgJ1dlvc+UK7TGXz/sn7BDpYiG6UjqdgRMLGzbGOwAPO +Lgn+tDu9ma8OPyFwwHT0UgHtmsfTEN5CYKpCkeYz2teVX99MbyVw80czixHa +qcE8petvCWSLpH2STKDgZPvplKpuAu9Wegvp0XbT2jP36iOBb+/m8uxob4zX +P/blCx2P82SXJ22d3mU9U30E/ptvkxZCW9r0i53YMIFKbK+2JNoC5x8+Yo4R +WKOonH2Z9vehTC2jaQJ/7tk4XET7pbVPru0cgY/t/n7Jo11+xVLMbSGJLbP6 +a2/Szp1VDPMXIbFKrFBv3rE7JwbixUgUrX1ZMf++z+2Xe3MkSUweTH8xP57j +0uvPb0uTuGBpo+/898w8IjiPFUisZpkUz8fDrnaiupgk2vc0e8/HKyqzWmFI +hUSR0C0N8/P55StyVkiTxKz2/Bvz833f8mlmpS6JTTsuasyvRwO70lvDiMRv +S8RhOW1+RNp7NCUxMaH36/x6ZnQd3rRjHYmy4j+IFtqn9DdUHbIk0cdr0XQh +bfdkOY0wWxIPjYh6cWnbfh/NSrMn8eLVT96WtHXXtywt3kFio7jLMknastlF +IQ92kXjJYZ/le3r/+7bs2P3ZncTatsCz7rTbSjSfTR4ikTSwyWbRrhRavFb0 +GImnqxnWPXR+JdwrlzUMIvH2oHvEJtrH/0pJtAkjMWdbxrL/0fnqdMRr2uU0 +iV9325vwaasqSXfFnSUxX2Em9H90vosHDVtnp5EYoFSWWUh7sq2p4tYFErOd +ErZtoN0UG3TpXQGJU7rM6uDTFHgNdjmtKifxjPSm0Fr6vNlt/LsJHpDY7K/a +YUPbsPDMGocaen2FXP55FUHBYkdT6dBmer/0Q3+20ef52sOcjhcfSOxvtnC+ +SZ//5JVcq3//JfFkS4G2Im3uCbt7E99JHJIpr0g4RYEFOXdeeZRER4/afscQ +Cj4nuTn6LmHjW63M70/p+uLTp8HUWcbGoyYis2q0J6ymBgbE2Xik88SauEAK +/hBKizkky8ZFgwYqxlw6n4Pqy9w02eicojcdTNezUA+25JbtbNzzI4cIpOvj +4vqfH5Y5sfHPP64uKqXrZ6pydWnzHjYuPc+U7ToyX+92rrf0ZKNP742Pqw/T +99PWhBOcIDYK9uyfrqbr8wqz/per8uj/e7CX73SlID/rftZ/V9h4zrYqaa8L +XV+nor2Kr7PxcTTPYt98vS9TmGPeYePm4O4Qt90UHFDfoiXbyMaorafEzXZS +cGvFnSThH2z8nF+XzrWjwHoo0PqLoQo2DxS/7zWhQH61YqywqQoqZsq3cI3p ++9S3oW7VOhV0j/ydv2QNna/j4qa+tiq4J8l5TsmAgg+zJVpzripY98OJWqVN +ge+y95IyCSrIuf+t8SaTvh/V8MOmbhX8mFTxwHcJBd5Hvsoe/6iCLWJN4VcX +UQBU0s70LyqYLii/+Y0QvR867169G1JBiTF1YQ0BCrTW+NZ7LlTF+hwZ5fJJ +PtRbFl2P0FRFCFLs4vzHh/4Dwn5l4aros3V7AauJ7odyzR9WR6siES/UJ/SY +D0PvIpY8S1BFE3mPkE/1fPi5ZSrrU7oqTvKqT2VU82FibV+D2HVVzKsLlukq +54Pg8pYVh16p4tDbjRWfi/gg05BSqcBQw+eJ6elzYXy6318pGFenhkeOXShI +WsWH//ZbXV/7RA1L2k7VT9D9V1JBoN3wMzUcuvK5yY3Nh9eKnZed36jhBSG5 +KA0GH9xkLulpfFfDRclWT0vpfi5ITM6jVVQd+d8sojcs4AN/UrFJzlkdLykV +Rva380DiOTv51pA66sZY3NjO5YF8/E17Q0MNLB+98VUntRQurjIWl/TSxK+b +s9MUc0ugWXadweg5LfTIUz50POs6mMjXpWq/1cbisscmAceKQUyo0H9flA6u +VJC8e9r6GihGKpk6s1djfNCjCRWBqyBC7inf9mQ1PoI8Ec3yK6DFkbkZuFcX +D3IWXBeMKATfDxL1NgJ6aCYeaXROpwCGRpN2WF/Uw5GslL98xvPASvvxZWtN +fbwVPB7efiUHHo2u/T3xQh93i5JqJTpZ4KOh29XqYYD3jGptyZmLwBl0b3cW +McRth2ZsGHfOgwUhvVm00BBzNeyanpdkgGpE4sk6IyOUX5OeUPQ4DdQ9jKvJ +LiMUsnmiINuVCh6PDkaXnViDcyZivinOyVCd3+4+ImWMjh0Xe35MJcKv63MT +2veMUX/vgxM7BuLgAMkTubzZBJfXvd5oaR8DI+rphneGTdCqMq4hqCIK7hf9 +/jQWvxY7bz61c4mLgF3mLFyraIqNXsT75exQkDsaV6FVY4oLtCJrFzsEgdQf +3rc37+Tg63/yurYzuVC0ITR42JmDSk6LT3Us54JuaPKG9D0ctNfva9i3hAt2 +w7fedO7j4OWy2+aJ/QEQ+3Zs6oA3B7u/9dWo3wuAycLw9cGRHHwf/exV8eYA +6Fqb/voaj4PsQFPv0+H+cDCgKNv6BgfbhHt7Onz9YfzGXY/+Wxzsdxsr1/X0 +Bwlm58Tqcg7GiXXH/t7kD7bCCvIPazjoLfTmxDtZf6hqv+b++g0Hn0y0Zzbc +8wMbsfua3E4OflcegzCeH3RaPR2X7uagSpb9KrM8P/hV+SPe5SMHj/LVH76K +9QPNAh3qvz4OHv8acQ4d/aCqax03aYCDulnnRDRs6PGWbwftYTq+j49uK5j5 +gWdcQKv/GAcJmZ4ESTY9Xk3s5ZWTHPSbSri7UtYPoqYvHKic5qCtVa0wU8wP +xPVLNPbOclBgwC1SV9APco9Wjs3NcVC61VzBetwX/g9pwyjU "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.05769107434980078}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7388,6 +7023,7 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7415,7 +7051,8 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.11602348907445073`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.05769107434980078}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7423,11 +7060,13 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991340117671425*^9}, - CellLabel-> - "Out[335]=",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] + CellChangeTimes->{3.991340117671425*^9, 3.994350645559169*^9, + 3.994353856168807*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"bcf97f79-de8d-4d2b-a716-232337290993"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7496,15 +7135,780 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003297"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.9940849363210697`*^9},ExpressionUUID->"2d5a8299-5376-9747-8056-\ -2bd9764114a1"], + 3.9940849363210697`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061275}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943506458498917`*^9, 3.994353856410955*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"9c37038d-533b-4be6-9ef9-866794ea6352"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-\ -0ac982b58a3a"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VdsXAHDRwCueR8rMvfeca8iUMXKtVRlCSSXRgMrQIJXhChkzJ2Ro +MkuJe0/TkyJlLkkDKaKX8pqejMkYP7/jj/O5n+/nc+4+a++99tqLsf/YNg9B +AQGBWfqZ/x3/8LSBOFNkNhPUc9Ky2cisPVc6aF1nFMxmRG2/3iYFKPVyv3Rn +GmQNOsgGtpHAtS/tEOosBFP9rIdObQbw1+DKtKmOOxDg0Z2s22YBPVV2x351 +1IFk8ObA+tYdYEn0/TPS0QZWUvb/k3vlAVMdRpnDHb2g4qlfk/A0AOo3FBe1 +Fo5CFvex/93MWJDvqfi6X2MW3jEWajZdSYXl3q6lSzYIYdDKzAVRlZmQttry +gd0OYXQQTv25YnEWvLuoUzMiLoo1fkGFB+7mwZmi8JeCMn9hostWq2KTQliZ +8W9Ceo4k/pJaWlXvWgRxDtZmbeNSKGH5NGDN6mvgZ1zg+jRKGj3TdpL2o8Vg +PjQd7POvLKqGzt3J31cCQRsz1Gv7ZbHb4snvNs8SuFGg2SU5LotrfjYKC3qX +gLSDm3GFsByW7dXxceSWQP/9xgkhLTnctWeXS2diCaRHpfpfOimHqaMb0vHv +EuiVYvs0iMqjeobo0fwFpRBpunWf7BoFlL4XtehcRilsdMn9abReASMs1FK2 +XioFsYgfp3dsUsDolAvGYrmlkF0fcy3VTQE3OcsOhxSXwn2byh+LExRwdb5U +j2plKQw7sbij7xRQw6e1sOlDKbgEjCW2hChiOpP8pEjygLywXr4vRhHvevjC +ATUeHW8KtSRVEU//XVN5RZMHwTNqr9YXKaLvACEsY8iDzNMuUhUtirjNMHem +3ZIHLeee5F1VUEJC8NOGNC8emNy4VBZWrYQP60KNmNd4YN7xYnawSQlnwhdG +l5TwwE5goZVrmxKeTWX4aFI8OLDN5x18oZ1pK7eqjAeWIYzwiEXKaLy1umu2 +lgfHlcavrFuljMnbd/8W+IcHDV55A/VcZTSd0rMPE+eD9YyxxKkQZWTsHTlx +SZIPL1LbDfUjlFFh6Kfe7RV8eFchElGUoIzCLeaX3srzYXCpv0RMtjK+4Hb0 +T6ryQfrWRiPLOmWsmQnryEI+eE+ORDSJMtDGb0337qN8MDnhueKrBAPDJK/2 +mh/ng3BfF09ImoHh1wKm1Pz4cLW7/q0Zk4Gl0dscv5/kw4dHmRp3DRn4NjCr +3SCaD1tijDsLXBloHrSJtfwyH3QlIrVDbjPQufajwcc6PgicGWu4WM7A2Orx +h7aNdPxCh3eVP2DgnMBF17+f8OHI2LaYkUYGXqiYHua28KGok+j26mLg0o1f +HF++4cOKvKZYByEmLhnTi2v8xoepVeIfNHcw8eW1m+7NwhSM58hG6u1iIis3 +8uOtPyj49SdJGLsyMWOtdHH6MgoGR40Pmx9i4sej+1bYiVPQ++DA+K5QJjp1 +aCeeX0lBs+09sfirTCxjnNPmkhQ8eVh7+2wpEzeCSwpDhYIG7RaH9JtM/JYT +tu6pKgWPJD9dzq1g4ouS8lxRDQrudP+hcvc5E+Wb5WwP61Jw+YgL9I4x0dH2 +/Qc/Mwou/HOw99s0E+PNVhR8BgoytvjFDMwxUUVo8OHWdRQk68U/mxRhoWBv +oQjDnIKo37d3/qnIwq6loZPp1hQcObPouKklC7mOSrefbafg4OyfkuttWRgi +/tpVcAcFnsdky63sWdhqzfY1cKTAbbv2zLZdLGQbLGxIdaLAQc45/pAPCx9n +6WnK76XAlMfPP3+ehXELtmbHelDQrczLs8hi4UvDmHe+nhQEny/J/ZXHwgoZ +4vduLwruRV7L3lbCQiWKP0AcokDXKf+iWBULjwza557zpqD1ee6FhzUsrO0x +E/U4SsHxDTnnvRtZaGFW6W7gQ8ENrcsZzS9YyDHzf9lyjAK1RRmpsZ9YaGrx +ovCtLwVNwWkpBl9Z2Cgx637Oj57PcGry5z4WNlnPSFr7U1DUfTZp/S8Wru87 +b3IzgALlO3Hx/1tMoIRrTIXjSQpWuIZEcDUI3GCkMi0RSsHd9qBwcjWBmlaH +n2XTdrA5GdZuQKBf/P40VhgFaQYBp3SBwMbWKiHVcApElx07ObiVwJUVJtHL +IingRx4NzHEkMEXTUjKMts3EEe6m3QSeLC7O7qcd33vQv9SdwAnFx/k1URQs +rNh/3DOQwHP82TDzaAquaO07JnWKQNPE9SM5tNcXufo0RBDomZK9/xft8JQ9 +3sxEAj9FT5pfjKFAcdHuI63JBJZ3at/7Qrsq2PlwRDqBybLf1HViKZj2cDz4 +IZvAIgsLmSral7odvM4WEGhgTmbO0l6zdbun6TUCp3dNLDeNo4Brau9++SaB +Pxb/x7xFW+qO3QHrMgJ1dlvc+UK7TGXz/sn7BDpYiG6UjqdgRMLGzbGOwAPO +Lgn+tDu9ma8OPyFwwHT0UgHtmsfTEN5CYKpCkeYz2teVX99MbyVw80czixHa +qcE8petvCWSLpH2STKDgZPvplKpuAu9Wegvp0XbT2jP36iOBb+/m8uxob4zX +P/blCx2P82SXJ22d3mU9U30E/ptvkxZCW9r0i53YMIFKbK+2JNoC5x8+Yo4R +WKOonH2Z9vehTC2jaQJ/7tk4XET7pbVPru0cgY/t/n7Jo11+xVLMbSGJLbP6 +a2/Szp1VDPMXIbFKrFBv3rE7JwbixUgUrX1ZMf++z+2Xe3MkSUweTH8xP57j +0uvPb0uTuGBpo+/898w8IjiPFUisZpkUz8fDrnaiupgk2vc0e8/HKyqzWmFI +hUSR0C0N8/P55StyVkiTxKz2/Bvz833f8mlmpS6JTTsuasyvRwO70lvDiMRv +S8RhOW1+RNp7NCUxMaH36/x6ZnQd3rRjHYmy4j+IFtqn9DdUHbIk0cdr0XQh +bfdkOY0wWxIPjYh6cWnbfh/NSrMn8eLVT96WtHXXtywt3kFio7jLMknastlF +IQ92kXjJYZ/le3r/+7bs2P3ZncTatsCz7rTbSjSfTR4ikTSwyWbRrhRavFb0 +GImnqxnWPXR+JdwrlzUMIvH2oHvEJtrH/0pJtAkjMWdbxrL/0fnqdMRr2uU0 +iV9325vwaasqSXfFnSUxX2Em9H90vosHDVtnp5EYoFSWWUh7sq2p4tYFErOd +ErZtoN0UG3TpXQGJU7rM6uDTFHgNdjmtKifxjPSm0Fr6vNlt/LsJHpDY7K/a +YUPbsPDMGocaen2FXP55FUHBYkdT6dBmer/0Q3+20ef52sOcjhcfSOxvtnC+ +SZ//5JVcq3//JfFkS4G2Im3uCbt7E99JHJIpr0g4RYEFOXdeeZRER4/afscQ +Cj4nuTn6LmHjW63M70/p+uLTp8HUWcbGoyYis2q0J6ymBgbE2Xik88SauEAK +/hBKizkky8ZFgwYqxlw6n4Pqy9w02eicojcdTNezUA+25JbtbNzzI4cIpOvj +4vqfH5Y5sfHPP64uKqXrZ6pydWnzHjYuPc+U7ToyX+92rrf0ZKNP742Pqw/T +99PWhBOcIDYK9uyfrqbr8wqz/per8uj/e7CX73SlID/rftZ/V9h4zrYqaa8L +XV+nor2Kr7PxcTTPYt98vS9TmGPeYePm4O4Qt90UHFDfoiXbyMaorafEzXZS +cGvFnSThH2z8nF+XzrWjwHoo0PqLoQo2DxS/7zWhQH61YqywqQoqZsq3cI3p ++9S3oW7VOhV0j/ydv2QNna/j4qa+tiq4J8l5TsmAgg+zJVpzripY98OJWqVN +ge+y95IyCSrIuf+t8SaTvh/V8MOmbhX8mFTxwHcJBd5Hvsoe/6iCLWJN4VcX +UQBU0s70LyqYLii/+Y0QvR867169G1JBiTF1YQ0BCrTW+NZ7LlTF+hwZ5fJJ +PtRbFl2P0FRFCFLs4vzHh/4Dwn5l4aros3V7AauJ7odyzR9WR6siES/UJ/SY +D0PvIpY8S1BFE3mPkE/1fPi5ZSrrU7oqTvKqT2VU82FibV+D2HVVzKsLlukq +54Pg8pYVh16p4tDbjRWfi/gg05BSqcBQw+eJ6elzYXy6318pGFenhkeOXShI +WsWH//ZbXV/7RA1L2k7VT9D9V1JBoN3wMzUcuvK5yY3Nh9eKnZed36jhBSG5 +KA0GH9xkLulpfFfDRclWT0vpfi5ITM6jVVQd+d8sojcs4AN/UrFJzlkdLykV +Rva380DiOTv51pA66sZY3NjO5YF8/E17Q0MNLB+98VUntRQurjIWl/TSxK+b +s9MUc0ugWXadweg5LfTIUz50POs6mMjXpWq/1cbisscmAceKQUyo0H9flA6u +VJC8e9r6GihGKpk6s1djfNCjCRWBqyBC7inf9mQ1PoI8Ec3yK6DFkbkZuFcX +D3IWXBeMKATfDxL1NgJ6aCYeaXROpwCGRpN2WF/Uw5GslL98xvPASvvxZWtN +fbwVPB7efiUHHo2u/T3xQh93i5JqJTpZ4KOh29XqYYD3jGptyZmLwBl0b3cW +McRth2ZsGHfOgwUhvVm00BBzNeyanpdkgGpE4sk6IyOUX5OeUPQ4DdQ9jKvJ +LiMUsnmiINuVCh6PDkaXnViDcyZivinOyVCd3+4+ImWMjh0Xe35MJcKv63MT +2veMUX/vgxM7BuLgAMkTubzZBJfXvd5oaR8DI+rphneGTdCqMq4hqCIK7hf9 +/jQWvxY7bz61c4mLgF3mLFyraIqNXsT75exQkDsaV6FVY4oLtCJrFzsEgdQf +3rc37+Tg63/yurYzuVC0ITR42JmDSk6LT3Us54JuaPKG9D0ctNfva9i3hAt2 +w7fedO7j4OWy2+aJ/QEQ+3Zs6oA3B7u/9dWo3wuAycLw9cGRHHwf/exV8eYA +6Fqb/voaj4PsQFPv0+H+cDCgKNv6BgfbhHt7Onz9YfzGXY/+Wxzsdxsr1/X0 +Bwlm58Tqcg7GiXXH/t7kD7bCCvIPazjoLfTmxDtZf6hqv+b++g0Hn0y0Zzbc +8wMbsfua3E4OflcegzCeH3RaPR2X7uagSpb9KrM8P/hV+SPe5SMHj/LVH76K +9QPNAh3qvz4OHv8acQ4d/aCqax03aYCDulnnRDRs6PGWbwftYTq+j49uK5j5 +gWdcQKv/GAcJmZ4ESTY9Xk3s5ZWTHPSbSri7UtYPoqYvHKic5qCtVa0wU8wP +xPVLNPbOclBgwC1SV9APco9Wjs3NcVC61VzBetwX/g9pwyjU + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VdsXAHDRwCueR8rMvfeca8iUMXKtVRlCSSXRgMrQIJXhChkzJ2Ro +MkuJe0/TkyJlLkkDKaKX8pqejMkYP7/jj/O5n+/nc+4+a++99tqLsf/YNg9B +AQGBWfqZ/x3/8LSBOFNkNhPUc9Ky2cisPVc6aF1nFMxmRG2/3iYFKPVyv3Rn +GmQNOsgGtpHAtS/tEOosBFP9rIdObQbw1+DKtKmOOxDg0Z2s22YBPVV2x351 +1IFk8ObA+tYdYEn0/TPS0QZWUvb/k3vlAVMdRpnDHb2g4qlfk/A0AOo3FBe1 +Fo5CFvex/93MWJDvqfi6X2MW3jEWajZdSYXl3q6lSzYIYdDKzAVRlZmQttry +gd0OYXQQTv25YnEWvLuoUzMiLoo1fkGFB+7mwZmi8JeCMn9hostWq2KTQliZ +8W9Ceo4k/pJaWlXvWgRxDtZmbeNSKGH5NGDN6mvgZ1zg+jRKGj3TdpL2o8Vg +PjQd7POvLKqGzt3J31cCQRsz1Gv7ZbHb4snvNs8SuFGg2SU5LotrfjYKC3qX +gLSDm3GFsByW7dXxceSWQP/9xgkhLTnctWeXS2diCaRHpfpfOimHqaMb0vHv +EuiVYvs0iMqjeobo0fwFpRBpunWf7BoFlL4XtehcRilsdMn9abReASMs1FK2 +XioFsYgfp3dsUsDolAvGYrmlkF0fcy3VTQE3OcsOhxSXwn2byh+LExRwdb5U +j2plKQw7sbij7xRQw6e1sOlDKbgEjCW2hChiOpP8pEjygLywXr4vRhHvevjC +ATUeHW8KtSRVEU//XVN5RZMHwTNqr9YXKaLvACEsY8iDzNMuUhUtirjNMHem +3ZIHLeee5F1VUEJC8NOGNC8emNy4VBZWrYQP60KNmNd4YN7xYnawSQlnwhdG +l5TwwE5goZVrmxKeTWX4aFI8OLDN5x18oZ1pK7eqjAeWIYzwiEXKaLy1umu2 +lgfHlcavrFuljMnbd/8W+IcHDV55A/VcZTSd0rMPE+eD9YyxxKkQZWTsHTlx +SZIPL1LbDfUjlFFh6Kfe7RV8eFchElGUoIzCLeaX3srzYXCpv0RMtjK+4Hb0 +T6ryQfrWRiPLOmWsmQnryEI+eE+ORDSJMtDGb0337qN8MDnhueKrBAPDJK/2 +mh/ng3BfF09ImoHh1wKm1Pz4cLW7/q0Zk4Gl0dscv5/kw4dHmRp3DRn4NjCr +3SCaD1tijDsLXBloHrSJtfwyH3QlIrVDbjPQufajwcc6PgicGWu4WM7A2Orx +h7aNdPxCh3eVP2DgnMBF17+f8OHI2LaYkUYGXqiYHua28KGok+j26mLg0o1f +HF++4cOKvKZYByEmLhnTi2v8xoepVeIfNHcw8eW1m+7NwhSM58hG6u1iIis3 +8uOtPyj49SdJGLsyMWOtdHH6MgoGR40Pmx9i4sej+1bYiVPQ++DA+K5QJjp1 +aCeeX0lBs+09sfirTCxjnNPmkhQ8eVh7+2wpEzeCSwpDhYIG7RaH9JtM/JYT +tu6pKgWPJD9dzq1g4ouS8lxRDQrudP+hcvc5E+Wb5WwP61Jw+YgL9I4x0dH2 +/Qc/Mwou/HOw99s0E+PNVhR8BgoytvjFDMwxUUVo8OHWdRQk68U/mxRhoWBv +oQjDnIKo37d3/qnIwq6loZPp1hQcObPouKklC7mOSrefbafg4OyfkuttWRgi +/tpVcAcFnsdky63sWdhqzfY1cKTAbbv2zLZdLGQbLGxIdaLAQc45/pAPCx9n +6WnK76XAlMfPP3+ehXELtmbHelDQrczLs8hi4UvDmHe+nhQEny/J/ZXHwgoZ +4vduLwruRV7L3lbCQiWKP0AcokDXKf+iWBULjwza557zpqD1ee6FhzUsrO0x +E/U4SsHxDTnnvRtZaGFW6W7gQ8ENrcsZzS9YyDHzf9lyjAK1RRmpsZ9YaGrx +ovCtLwVNwWkpBl9Z2Cgx637Oj57PcGry5z4WNlnPSFr7U1DUfTZp/S8Wru87 +b3IzgALlO3Hx/1tMoIRrTIXjSQpWuIZEcDUI3GCkMi0RSsHd9qBwcjWBmlaH +n2XTdrA5GdZuQKBf/P40VhgFaQYBp3SBwMbWKiHVcApElx07ObiVwJUVJtHL +IingRx4NzHEkMEXTUjKMts3EEe6m3QSeLC7O7qcd33vQv9SdwAnFx/k1URQs +rNh/3DOQwHP82TDzaAquaO07JnWKQNPE9SM5tNcXufo0RBDomZK9/xft8JQ9 +3sxEAj9FT5pfjKFAcdHuI63JBJZ3at/7Qrsq2PlwRDqBybLf1HViKZj2cDz4 +IZvAIgsLmSral7odvM4WEGhgTmbO0l6zdbun6TUCp3dNLDeNo4Brau9++SaB +Pxb/x7xFW+qO3QHrMgJ1dlvc+UK7TGXz/sn7BDpYiG6UjqdgRMLGzbGOwAPO +Lgn+tDu9ma8OPyFwwHT0UgHtmsfTEN5CYKpCkeYz2teVX99MbyVw80czixHa +qcE8petvCWSLpH2STKDgZPvplKpuAu9Wegvp0XbT2jP36iOBb+/m8uxob4zX +P/blCx2P82SXJ22d3mU9U30E/ptvkxZCW9r0i53YMIFKbK+2JNoC5x8+Yo4R +WKOonH2Z9vehTC2jaQJ/7tk4XET7pbVPru0cgY/t/n7Jo11+xVLMbSGJLbP6 +a2/Szp1VDPMXIbFKrFBv3rE7JwbixUgUrX1ZMf++z+2Xe3MkSUweTH8xP57j +0uvPb0uTuGBpo+/898w8IjiPFUisZpkUz8fDrnaiupgk2vc0e8/HKyqzWmFI +hUSR0C0N8/P55StyVkiTxKz2/Bvz833f8mlmpS6JTTsuasyvRwO70lvDiMRv +S8RhOW1+RNp7NCUxMaH36/x6ZnQd3rRjHYmy4j+IFtqn9DdUHbIk0cdr0XQh +bfdkOY0wWxIPjYh6cWnbfh/NSrMn8eLVT96WtHXXtywt3kFio7jLMknastlF +IQ92kXjJYZ/le3r/+7bs2P3ZncTatsCz7rTbSjSfTR4ikTSwyWbRrhRavFb0 +GImnqxnWPXR+JdwrlzUMIvH2oHvEJtrH/0pJtAkjMWdbxrL/0fnqdMRr2uU0 +iV9325vwaasqSXfFnSUxX2Em9H90vosHDVtnp5EYoFSWWUh7sq2p4tYFErOd +ErZtoN0UG3TpXQGJU7rM6uDTFHgNdjmtKifxjPSm0Fr6vNlt/LsJHpDY7K/a +YUPbsPDMGocaen2FXP55FUHBYkdT6dBmer/0Q3+20ef52sOcjhcfSOxvtnC+ +SZ//5JVcq3//JfFkS4G2Im3uCbt7E99JHJIpr0g4RYEFOXdeeZRER4/afscQ +Cj4nuTn6LmHjW63M70/p+uLTp8HUWcbGoyYis2q0J6ymBgbE2Xik88SauEAK +/hBKizkky8ZFgwYqxlw6n4Pqy9w02eicojcdTNezUA+25JbtbNzzI4cIpOvj +4vqfH5Y5sfHPP64uKqXrZ6pydWnzHjYuPc+U7ToyX+92rrf0ZKNP742Pqw/T +99PWhBOcIDYK9uyfrqbr8wqz/per8uj/e7CX73SlID/rftZ/V9h4zrYqaa8L +XV+nor2Kr7PxcTTPYt98vS9TmGPeYePm4O4Qt90UHFDfoiXbyMaorafEzXZS +cGvFnSThH2z8nF+XzrWjwHoo0PqLoQo2DxS/7zWhQH61YqywqQoqZsq3cI3p ++9S3oW7VOhV0j/ydv2QNna/j4qa+tiq4J8l5TsmAgg+zJVpzripY98OJWqVN +ge+y95IyCSrIuf+t8SaTvh/V8MOmbhX8mFTxwHcJBd5Hvsoe/6iCLWJN4VcX +UQBU0s70LyqYLii/+Y0QvR867169G1JBiTF1YQ0BCrTW+NZ7LlTF+hwZ5fJJ +PtRbFl2P0FRFCFLs4vzHh/4Dwn5l4aros3V7AauJ7odyzR9WR6siES/UJ/SY +D0PvIpY8S1BFE3mPkE/1fPi5ZSrrU7oqTvKqT2VU82FibV+D2HVVzKsLlukq +54Pg8pYVh16p4tDbjRWfi/gg05BSqcBQw+eJ6elzYXy6318pGFenhkeOXShI +WsWH//ZbXV/7RA1L2k7VT9D9V1JBoN3wMzUcuvK5yY3Nh9eKnZed36jhBSG5 +KA0GH9xkLulpfFfDRclWT0vpfi5ITM6jVVQd+d8sojcs4AN/UrFJzlkdLykV +Rva380DiOTv51pA66sZY3NjO5YF8/E17Q0MNLB+98VUntRQurjIWl/TSxK+b +s9MUc0ugWXadweg5LfTIUz50POs6mMjXpWq/1cbisscmAceKQUyo0H9flA6u +VJC8e9r6GihGKpk6s1djfNCjCRWBqyBC7inf9mQ1PoI8Ec3yK6DFkbkZuFcX +D3IWXBeMKATfDxL1NgJ6aCYeaXROpwCGRpN2WF/Uw5GslL98xvPASvvxZWtN +fbwVPB7efiUHHo2u/T3xQh93i5JqJTpZ4KOh29XqYYD3jGptyZmLwBl0b3cW +McRth2ZsGHfOgwUhvVm00BBzNeyanpdkgGpE4sk6IyOUX5OeUPQ4DdQ9jKvJ +LiMUsnmiINuVCh6PDkaXnViDcyZivinOyVCd3+4+ImWMjh0Xe35MJcKv63MT +2veMUX/vgxM7BuLgAMkTubzZBJfXvd5oaR8DI+rphneGTdCqMq4hqCIK7hf9 +/jQWvxY7bz61c4mLgF3mLFyraIqNXsT75exQkDsaV6FVY4oLtCJrFzsEgdQf +3rc37+Tg63/yurYzuVC0ITR42JmDSk6LT3Us54JuaPKG9D0ctNfva9i3hAt2 +w7fedO7j4OWy2+aJ/QEQ+3Zs6oA3B7u/9dWo3wuAycLw9cGRHHwf/exV8eYA +6Fqb/voaj4PsQFPv0+H+cDCgKNv6BgfbhHt7Onz9YfzGXY/+Wxzsdxsr1/X0 +Bwlm58Tqcg7GiXXH/t7kD7bCCvIPazjoLfTmxDtZf6hqv+b++g0Hn0y0Zzbc +8wMbsfua3E4OflcegzCeH3RaPR2X7uagSpb9KrM8P/hV+SPe5SMHj/LVH76K +9QPNAh3qvz4OHv8acQ4d/aCqax03aYCDulnnRDRs6PGWbwftYTq+j49uK5j5 +gWdcQKv/GAcJmZ4ESTY9Xk3s5ZWTHPSbSri7UtYPoqYvHKic5qCtVa0wU8wP +xPVLNPbOclBgwC1SV9APco9Wjs3NcVC61VzBetwX/g9pwyjU + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05769107434980078}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05769107434980078}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VdsXAHDRwCueR8rMvfeca8iUMXKtVRlCSSXRgMrQIJXhChkzJ2Ro +MkuJe0/TkyJlLkkDKaKX8pqejMkYP7/jj/O5n+/nc+4+a++99tqLsf/YNg9B +AQGBWfqZ/x3/8LSBOFNkNhPUc9Ky2cisPVc6aF1nFMxmRG2/3iYFKPVyv3Rn +GmQNOsgGtpHAtS/tEOosBFP9rIdObQbw1+DKtKmOOxDg0Z2s22YBPVV2x351 +1IFk8ObA+tYdYEn0/TPS0QZWUvb/k3vlAVMdRpnDHb2g4qlfk/A0AOo3FBe1 +Fo5CFvex/93MWJDvqfi6X2MW3jEWajZdSYXl3q6lSzYIYdDKzAVRlZmQttry +gd0OYXQQTv25YnEWvLuoUzMiLoo1fkGFB+7mwZmi8JeCMn9hostWq2KTQliZ +8W9Ceo4k/pJaWlXvWgRxDtZmbeNSKGH5NGDN6mvgZ1zg+jRKGj3TdpL2o8Vg +PjQd7POvLKqGzt3J31cCQRsz1Gv7ZbHb4snvNs8SuFGg2SU5LotrfjYKC3qX +gLSDm3GFsByW7dXxceSWQP/9xgkhLTnctWeXS2diCaRHpfpfOimHqaMb0vHv +EuiVYvs0iMqjeobo0fwFpRBpunWf7BoFlL4XtehcRilsdMn9abReASMs1FK2 +XioFsYgfp3dsUsDolAvGYrmlkF0fcy3VTQE3OcsOhxSXwn2byh+LExRwdb5U +j2plKQw7sbij7xRQw6e1sOlDKbgEjCW2hChiOpP8pEjygLywXr4vRhHvevjC +ATUeHW8KtSRVEU//XVN5RZMHwTNqr9YXKaLvACEsY8iDzNMuUhUtirjNMHem +3ZIHLeee5F1VUEJC8NOGNC8emNy4VBZWrYQP60KNmNd4YN7xYnawSQlnwhdG +l5TwwE5goZVrmxKeTWX4aFI8OLDN5x18oZ1pK7eqjAeWIYzwiEXKaLy1umu2 +lgfHlcavrFuljMnbd/8W+IcHDV55A/VcZTSd0rMPE+eD9YyxxKkQZWTsHTlx +SZIPL1LbDfUjlFFh6Kfe7RV8eFchElGUoIzCLeaX3srzYXCpv0RMtjK+4Hb0 +T6ryQfrWRiPLOmWsmQnryEI+eE+ORDSJMtDGb0337qN8MDnhueKrBAPDJK/2 +mh/ng3BfF09ImoHh1wKm1Pz4cLW7/q0Zk4Gl0dscv5/kw4dHmRp3DRn4NjCr +3SCaD1tijDsLXBloHrSJtfwyH3QlIrVDbjPQufajwcc6PgicGWu4WM7A2Orx +h7aNdPxCh3eVP2DgnMBF17+f8OHI2LaYkUYGXqiYHua28KGok+j26mLg0o1f +HF++4cOKvKZYByEmLhnTi2v8xoepVeIfNHcw8eW1m+7NwhSM58hG6u1iIis3 +8uOtPyj49SdJGLsyMWOtdHH6MgoGR40Pmx9i4sej+1bYiVPQ++DA+K5QJjp1 +aCeeX0lBs+09sfirTCxjnNPmkhQ8eVh7+2wpEzeCSwpDhYIG7RaH9JtM/JYT +tu6pKgWPJD9dzq1g4ouS8lxRDQrudP+hcvc5E+Wb5WwP61Jw+YgL9I4x0dH2 +/Qc/Mwou/HOw99s0E+PNVhR8BgoytvjFDMwxUUVo8OHWdRQk68U/mxRhoWBv +oQjDnIKo37d3/qnIwq6loZPp1hQcObPouKklC7mOSrefbafg4OyfkuttWRgi +/tpVcAcFnsdky63sWdhqzfY1cKTAbbv2zLZdLGQbLGxIdaLAQc45/pAPCx9n +6WnK76XAlMfPP3+ehXELtmbHelDQrczLs8hi4UvDmHe+nhQEny/J/ZXHwgoZ +4vduLwruRV7L3lbCQiWKP0AcokDXKf+iWBULjwza557zpqD1ee6FhzUsrO0x +E/U4SsHxDTnnvRtZaGFW6W7gQ8ENrcsZzS9YyDHzf9lyjAK1RRmpsZ9YaGrx +ovCtLwVNwWkpBl9Z2Cgx637Oj57PcGry5z4WNlnPSFr7U1DUfTZp/S8Wru87 +b3IzgALlO3Hx/1tMoIRrTIXjSQpWuIZEcDUI3GCkMi0RSsHd9qBwcjWBmlaH +n2XTdrA5GdZuQKBf/P40VhgFaQYBp3SBwMbWKiHVcApElx07ObiVwJUVJtHL +IingRx4NzHEkMEXTUjKMts3EEe6m3QSeLC7O7qcd33vQv9SdwAnFx/k1URQs +rNh/3DOQwHP82TDzaAquaO07JnWKQNPE9SM5tNcXufo0RBDomZK9/xft8JQ9 +3sxEAj9FT5pfjKFAcdHuI63JBJZ3at/7Qrsq2PlwRDqBybLf1HViKZj2cDz4 +IZvAIgsLmSral7odvM4WEGhgTmbO0l6zdbun6TUCp3dNLDeNo4Brau9++SaB +Pxb/x7xFW+qO3QHrMgJ1dlvc+UK7TGXz/sn7BDpYiG6UjqdgRMLGzbGOwAPO +Lgn+tDu9ma8OPyFwwHT0UgHtmsfTEN5CYKpCkeYz2teVX99MbyVw80czixHa +qcE8petvCWSLpH2STKDgZPvplKpuAu9Wegvp0XbT2jP36iOBb+/m8uxob4zX +P/blCx2P82SXJ22d3mU9U30E/ptvkxZCW9r0i53YMIFKbK+2JNoC5x8+Yo4R +WKOonH2Z9vehTC2jaQJ/7tk4XET7pbVPru0cgY/t/n7Jo11+xVLMbSGJLbP6 +a2/Szp1VDPMXIbFKrFBv3rE7JwbixUgUrX1ZMf++z+2Xe3MkSUweTH8xP57j +0uvPb0uTuGBpo+/898w8IjiPFUisZpkUz8fDrnaiupgk2vc0e8/HKyqzWmFI +hUSR0C0N8/P55StyVkiTxKz2/Bvz833f8mlmpS6JTTsuasyvRwO70lvDiMRv +S8RhOW1+RNp7NCUxMaH36/x6ZnQd3rRjHYmy4j+IFtqn9DdUHbIk0cdr0XQh +bfdkOY0wWxIPjYh6cWnbfh/NSrMn8eLVT96WtHXXtywt3kFio7jLMknastlF +IQ92kXjJYZ/le3r/+7bs2P3ZncTatsCz7rTbSjSfTR4ikTSwyWbRrhRavFb0 +GImnqxnWPXR+JdwrlzUMIvH2oHvEJtrH/0pJtAkjMWdbxrL/0fnqdMRr2uU0 +iV9325vwaasqSXfFnSUxX2Em9H90vosHDVtnp5EYoFSWWUh7sq2p4tYFErOd +ErZtoN0UG3TpXQGJU7rM6uDTFHgNdjmtKifxjPSm0Fr6vNlt/LsJHpDY7K/a +YUPbsPDMGocaen2FXP55FUHBYkdT6dBmer/0Q3+20ef52sOcjhcfSOxvtnC+ +SZ//5JVcq3//JfFkS4G2Im3uCbt7E99JHJIpr0g4RYEFOXdeeZRER4/afscQ +Cj4nuTn6LmHjW63M70/p+uLTp8HUWcbGoyYis2q0J6ymBgbE2Xik88SauEAK +/hBKizkky8ZFgwYqxlw6n4Pqy9w02eicojcdTNezUA+25JbtbNzzI4cIpOvj +4vqfH5Y5sfHPP64uKqXrZ6pydWnzHjYuPc+U7ToyX+92rrf0ZKNP742Pqw/T +99PWhBOcIDYK9uyfrqbr8wqz/per8uj/e7CX73SlID/rftZ/V9h4zrYqaa8L +XV+nor2Kr7PxcTTPYt98vS9TmGPeYePm4O4Qt90UHFDfoiXbyMaorafEzXZS +cGvFnSThH2z8nF+XzrWjwHoo0PqLoQo2DxS/7zWhQH61YqywqQoqZsq3cI3p ++9S3oW7VOhV0j/ydv2QNna/j4qa+tiq4J8l5TsmAgg+zJVpzripY98OJWqVN +ge+y95IyCSrIuf+t8SaTvh/V8MOmbhX8mFTxwHcJBd5Hvsoe/6iCLWJN4VcX +UQBU0s70LyqYLii/+Y0QvR867169G1JBiTF1YQ0BCrTW+NZ7LlTF+hwZ5fJJ +PtRbFl2P0FRFCFLs4vzHh/4Dwn5l4aros3V7AauJ7odyzR9WR6siES/UJ/SY +D0PvIpY8S1BFE3mPkE/1fPi5ZSrrU7oqTvKqT2VU82FibV+D2HVVzKsLlukq +54Pg8pYVh16p4tDbjRWfi/gg05BSqcBQw+eJ6elzYXy6318pGFenhkeOXShI +WsWH//ZbXV/7RA1L2k7VT9D9V1JBoN3wMzUcuvK5yY3Nh9eKnZed36jhBSG5 +KA0GH9xkLulpfFfDRclWT0vpfi5ITM6jVVQd+d8sojcs4AN/UrFJzlkdLykV +Rva380DiOTv51pA66sZY3NjO5YF8/E17Q0MNLB+98VUntRQurjIWl/TSxK+b +s9MUc0ugWXadweg5LfTIUz50POs6mMjXpWq/1cbisscmAceKQUyo0H9flA6u +VJC8e9r6GihGKpk6s1djfNCjCRWBqyBC7inf9mQ1PoI8Ec3yK6DFkbkZuFcX +D3IWXBeMKATfDxL1NgJ6aCYeaXROpwCGRpN2WF/Uw5GslL98xvPASvvxZWtN +fbwVPB7efiUHHo2u/T3xQh93i5JqJTpZ4KOh29XqYYD3jGptyZmLwBl0b3cW +McRth2ZsGHfOgwUhvVm00BBzNeyanpdkgGpE4sk6IyOUX5OeUPQ4DdQ9jKvJ +LiMUsnmiINuVCh6PDkaXnViDcyZivinOyVCd3+4+ImWMjh0Xe35MJcKv63MT +2veMUX/vgxM7BuLgAMkTubzZBJfXvd5oaR8DI+rphneGTdCqMq4hqCIK7hf9 +/jQWvxY7bz61c4mLgF3mLFyraIqNXsT75exQkDsaV6FVY4oLtCJrFzsEgdQf +3rc37+Tg63/yurYzuVC0ITR42JmDSk6LT3Us54JuaPKG9D0ctNfva9i3hAt2 +w7fedO7j4OWy2+aJ/QEQ+3Zs6oA3B7u/9dWo3wuAycLw9cGRHHwf/exV8eYA +6Fqb/voaj4PsQFPv0+H+cDCgKNv6BgfbhHt7Onz9YfzGXY/+Wxzsdxsr1/X0 +Bwlm58Tqcg7GiXXH/t7kD7bCCvIPazjoLfTmxDtZf6hqv+b++g0Hn0y0Zzbc +8wMbsfua3E4OflcegzCeH3RaPR2X7uagSpb9KrM8P/hV+SPe5SMHj/LVH76K +9QPNAh3qvz4OHv8acQ4d/aCqax03aYCDulnnRDRs6PGWbwftYTq+j49uK5j5 +gWdcQKv/GAcJmZ4ESTY9Xk3s5ZWTHPSbSri7UtYPoqYvHKic5qCtVa0wU8wP +xPVLNPbOclBgwC1SV9APco9Wjs3NcVC61VzBetwX/g9pwyjU + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05769107434980078}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.05769107434980078}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350645890999*^9, 3.994353856455134*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"ebb008b8-13d6-48e7-b02d-661c7f40ba42"] +}, Open ]], Cell[CellGroupData[{ @@ -7513,14 +7917,13 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918497405884743`*^9},ExpressionUUID->"650e43f8-1352-de46-8137-\ -52adca93b0cf"], + CellChangeTimes->{3.9918497405884743`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[BoxData["12.55365498952246`"], "Output", - CellChangeTimes->{3.991340544411957*^9}, - CellLabel-> - "Out[337]=",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[BoxData["13.46180861361533`"], "Output", + CellChangeTimes->{3.991340544411957*^9, 3.994350645940289*^9, + 3.994353856497575*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"2bd86611-a705-41b3-8cbc-2f3913c4c673"] }, Open ]], Cell[CellGroupData[{ @@ -7576,157 +7979,163 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849742961588*^9},ExpressionUUID->"9ad75b45-8f6d-114b-80bd-\ -d2b12a49fd20"], + CellChangeTimes->{3.991849742961588*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 341, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544611845*^9}, - CellLabel-> - "During evaluation of \ -In[338]:=",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.3066449595171447`*^-261\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 342, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913405446218624`*^9}, + 2, 99, 13, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.99435064607743*^9, + 3.994353856631555*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], +In[99]:=",ExpressionUUID->"86621ac0-3386-4032-9e50-f79ab0b6f72a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.8431060797400435`*^-271\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 338, 343, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544630844*^9}, +\"", 2, 99, 14, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.99435064607743*^9, + 3.994353856642261*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], +In[99]:=",ExpressionUUID->"60713407-f8ba-4ef7-ad4f-a3155b522a64"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.186265153191943`*^-281\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 15, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.99435064607743*^9, + 3.994353856654957*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"f1825358-ee3f-42a6-8240-2ee1777660dc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 338, 344, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544639845*^9}, +during this calculation.\"", 2, 99, 16, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.99435064607743*^9, + 3.994353856666472*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], +In[99]:=",ExpressionUUID->"17f54f88-3f47-4ae8-bf2e-0c8dc72f9275"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1mc8ll0YAHDhLRUS2fvx3I9NJCOerkuDUKgIRZQ93obsBgqlrMyoSCE8 +dxkV0RKKhjRsGREhq6woee/30/37f7jP75xzrSN7+OgeV3Y2NjaOZWxs/39n +u1/V0i/lbO7icrCbfa29uSlTJNiw7SzsDJ1f9BtaByjYeFikLRFsxKcGtg/R +IcCysJWj7SY0bMrhVxzSgrXjwonzraUwevvnpX+GtkHPY/Oj063V8DIxzzrr +mxUY0Ue6frR+hD7D7lCxQReYb9VJmWztA9Ukli5/rx/UbL2d8+HmFGxdZjoy +nBMJEj0Vg4dVFuFk26Bq/Ld4WOfjWLhiKwfGr0g9pdaaDIkaRo/MrbmQkzPZ +umwiHdqvrK/6wceDy1ZZjaf6ZcKlnNBGdtG12JZyvTc6KhuEk/ujk64L4M+7 +Q9NTV2/BeSuTzR9nBVE06IvdtsO5cEIv2/HVWRGEtJheQ4nbsG1iIeRIvxh6 +8ChebYzKh+AdyUrPR8VQQm3Sb+FSPtzNVu0QmBVD3wkDM9rlfBCxctKr4BLH +l+q0UY+r+TD68MUch5o4hvbazX4oyoekswl+6UHiaD5wbIi/LR/6BBlHankk +MMr3yxZzRgGEG+w+JKYriaKMroZrFQWw42DmT50tkrjc5Jaby9MC4A37fs56 +pyQW2Xc5KdQUwLWayLwEJ0ncb98clPu2AB6aVn5fHi2JqZXiGn49BTBpKxcw +1S6J4c5zac6chXDQf+bi25NSeCJjD3+0WSFsupt+/8wzaVQtfc499K4QtrW+ +Wxyvl0YpMfaiiI+FYM7Gaez4URrjrU/QpVoKwXnPkXYYkMbNP/svGHcVgtFJ +2dCwf2RQqm6Zrt/3QjgmPXvLUFkGPRZ3a2xcwYJa96yxmgAZ9LTZ+9zagAUm +f/T4T52UwccVkp9igAXvEpq0tcJkcOyOdEXVFha0V6wMy4mWwehCAXZpExaM +r/bjj7wmgyGSPdEPrFkgUrxDx6haBisDBCJMj7DA59ePsHoeWUy4UNix7joL +Nh13Exrkl8XmihlhuRss4BrpYHGIyOLZpMAs1VssyO2sadlMk8Wmu12xOgUs +6H6aovJAWxZ7clLGpB6wwCJSry3bURYlyt0H9d+yQJM/XP1kiSwuSa22Lp5j +AdulmdorZbL4jRm5bccCtX8Or/1lj2RxseRu5Oc/LPCe2RP544UsdoRv+Du/ +jIScNnqne4cs6uQqv+fiJkEoqz7KioOGI41p+gHSJMwr83WrWtOQ9e51QOJW +Emavi4Vv2E9D/wluQ9Z2EqbXEHQ9RxqWZ+2LrjImYXxKz2ubJw1t4HhKrxkJ +fY+cZ/efpuHm7X9zZ/eS8NqsnPdCLg0fVF3+E+JMQt2T5yWxhTRsp41+OuBK +Qq36W6ukIhpOOzip67mT8FTgS0ZmBQ0dhzX9hr1IKO1cJf+ggYYyouMo40tC +hvdB6Juh4Qehw9u+hZKQ1uXR922Bhhv9ReITwklItjgRObZEww6BAhftcyTE +bbjw5tdKORxJkykNjCLh7O8SmzVScih8ir3/fQwJ3pf+OWZgJIf+h6I5uq+Q +YMAib6SmymH1rtx0t7skdMqwsrZflUOtyrGlmCISQlILMqez5DAgvu54cTEJ +5eF51/YUyOHR/v7g8VISNG1vXOF9LIf7eurljctJUPwnOSHqixw2M6TtvZ+R +UB+SGL9xUA5FdmYWHa4iwW0yIe7riBxmHykXtHlOxaczNmbLtBxe1rkorlND +gkzp+Qt/l9NROStWrOklFS/Hk2EBKnRU+O1jfraBhAdNwaGEBh2N+lQ4zN6R +YGUadKZpIx3n7ZZ/5GskIXGj/ylNoKND88yzpPck8HAfDRrfTcd3KkdHAj6R +QIb/G3h9Hx37r984rdBEgumcd8DOA3Ss5WhVa6V8oc/Dr9CFjo09lmPKLSRw +Vhw+5hZIR821kUOlbSTcUjt0VPAUHXUNvwXvaidhS47jkdowOo7v2qc6QDk0 +3t6HdpGOc5buf1Z3krDgus+j+xodXWtqTHS6SEjvtHKPzaZj/sVf85WUdXfv +dTPIo2OX6sH3+t0kBBhYumQU0ZHbuOWHVg8JP/hNnfZV09Ex3UTony8ktPnQ +3nvV0XF0bLnkScpVLxcg9C0dORzM3o1RTghhSee30DFCWGnDqz4SgprOxT/u +pOOQDGNIo58EJzX7pfe9dNxU5WOaRnl9H3fP/AgdrQpvidp+JUHEYMCcd5KO +FgcXzt+jzJb65ClthjpfsEfe6gESGk2OZJot0XFE9OBsCeWyW0a8TpwESudb +KrINkpC5KHXGbyWBQiXr15hRPlLS6HBdgMD6tJTZFsr7Vuc3lIgQ6CZ4cV74 +GwmbXcOYLyUJ5NxlVmpNmfHM9k4HjcCPIYmyCZR5RDUkJ+Sp9XxEd9RRnvZd +GcuhSmDvmQzGb8qf3375I6xJYFH2+yfKQ1R8wxI/owGBW7JNRc9RTu7w2mlt +SKCo0oqeAsqntLY+9jQi0E7My6mBskucuMoZMwIjVDUyxyibDU1dTbQkMOWO +WPqqYSq/t7xdfduawDjfgd10ymLXck4+2k+gWp/lq02U2WdPfW90JPD8hASb +OeURC+sDX10I7BJbNedA+WOB6ptfngSuON5+14tyJcdyfZ6jBJpe2qngR/mm +Q3ehrB+B3+IIlxDK0eVlYtrBBHaqyDufpnxsbfxF0zMEnshex/jftt7uCwfP +Ebh4r+ROMGV8AV4nLlD7L6te8KWsIC3ScT6WQMtIbl5PynzBkybXEgm8GWU1 +dIDyr4/1FcVpBHoXOl00o9yrkq344hqB7z3npnUo10cFp7dnE8hd16MgS7m4 +d/fK8TwC23Z+YaygfGWTUjA7SaA2b+3EMHVfYcnsw0IlBArnWUa8ouw+3mGr +XEbgd23LgVzK5jvu1cMjAoO8YgRCKWvfvKRrVUX9f7xxjTVlqT/O+R4vCPRk +/9ohT3n5PgOR06+p+zmQ4j9HxXe8aN2Fy40ETm0u6q2h3LJybC63icDVs4sS +sZTznlxvfddNxSPjX24hynHCAcb9/QQ2FCs+b6byLeC4efncEIEqY5amiZS3 +E0upMlMEPm+W6FpG+WuM0z7fFQxkrPAWf0Tl+5ERFdp6bga6q49muFOeM54f +G+NjoOBdToe1lFdxJEZ6ijHw9d8Clv3/9RNcc99JlYEjXlmRH6n6q2yJD5PS +ZOA6wVIVT8pbtex3ftZmIGditfhiL5X/E9P9NshAOa+0JgnKp10ZAhZ7GXh6 +0+ba/+t/ec3Pbm5bBuaFeT19TPWHBJlnha/tGZjNI7Bcv+v/fmmzxciNgQU6 +WWHqn6l5szv6ODOYgWVtctq/qP4jtHm0UTmLgX22vLiymYQbVx9eHb7FwD8c +C66OVH9TnI9wv51Pnbcq52sp1Q8N7ksu0UoZmBq/bmL3RxKclSzUxF4wMGnN +6Z3HqH5aLFQaw/WdgT+m4t+ovSJhk98Z25cTDFztx9u0v56Emg+m9IhpBqak +DWFEHRWfmP5HS4sMLG68adr4goQ/7ILfZ/nkUbdpUNOomgSTiUCTAW153H4o +bLG8kgQJDakoLgN5/O48vD+3goq3b221sqE8KnJGlcU/pOp3ls/A10werwdu +9DlQRkL3YoHakqM8Gq2KHH1XQoIv92cB0Wh5lPu2Rlw+n4Rt5mctDeLkcb/T +zvdf80gQTlCIdUySR7XqA0lZuSQ8FvBfnnddHn1bho24b1H3Lc47r1kqj2Xe +V0Krr1PzVhG7d3bKI6fQZuFbiST4eA+KHeuVx+WdbrKal0mAOzE2SQPyWDTh +bfI0nsqf9e3v2yfkkTAVn2ug5quarm+NG6cCCjNTB15T87fGKCc/TFUBzz0K +ntYPIWHUmevE/VAF9B/xEGV3pM6bue3JswgF3H30O4IDCRPtYSveRCvgS46x +quADJPy0mL/6JUkBXfqPvxu0ofJRf6SWN18Bc1/e08+2pPrPurdCnu8VMHp5 +nuEVQxJEa+MrJWUVUUwvSDpVlqTe+8Ls56sVsYGDU3N1BwuGDxvn69cpomar +77PGVhbEZAeaT75RxEZVK53EZhZ8kmrLsGtWRN7Y4WG+DyxwEk3foDKkiD8L +XvrO1LEgmFfc9QOPEmaW87ceoN5r5C+penE7Jfz29xpfThwL+BsYccUTSria +wTe/V58FfyfW576eVsIzTlYGjrosGOHXf/x1Xgk9VtlYeGxkQbWtxYgIpzKm +T2oNn1BnwYmvgUbhIsr4UCaf+7gcC5p+1//dbaiMvMUxgpyrWZCm5H10KlEZ ++RNtLVLaCkHiQpGltrYK1g/W1Ob+WwhXlPX4BNxVcW38p318iQXwWsxw49Rl +Nbwi3MxVm5MPmySqE9Rb1HFJOrR8IO428HLc9Dt0dj22Tya5mJ3KA6lwaQM7 +hgbek8hJ0zPKhZWEfdmeOg10PtaTasyTA2pM0aJAB01kimGy0sBN8O3mrzFl +24B77KdsPt/MhompGGuTKxsw8sRfjueBN8BY/WWGiaoWLrpd/qh1JxOeTun/ +nnunhfM/w/bHGl+DIyqaHR9cN+LVgHP0bvEMYI67NNmt1EaN0qd6ka1psJ0u +sovnpjYKFRUkrv2QAgphF4OqdXSQGTcs1TiaBEques+IDh188CrksdSfy+D6 +1CPi/nFdbLNPNw7ZkQDPbjS5/BDUw76ZL41c0rEwnb80p16uh0d3qE5l/YkG +Z4K1MmPXJsznkaz12nEefiglaZdObsI6q9sHlVMj4GHO7y8zF/Sx/Ux+XfOO +s7B/mxzqSxlgl9y6Oy26YSD+7/kKtSoDnHj4ab3/4VMguMqnZJcNE+V1FhkR +c0GQs/V0yKQdEyeehXOuHA4CzdNxW5PsmXiRdT8luSMIzCeLm9sOMdFdMOvN +sydBENUyM+/sw0T7+7WWbhFB8Otm6JaQcCZKvlQW/ckfBB36SZ/yWEysrQ+x +ndMKBA//nGsmd5mY/MKHzUI+EGbvPnAdLWbi+RYD6TuigcBPa5vTKGNi0q9X +Faf+BoAZl6TEkyomvohoUPGsD4DHTXkun5qZeDra7oC/QwCY8j5UDWhjYnT6 +wYsbLAOgzfjVrEgnE+c5j6/9tSUApiu/XzjYy0TdoWUyyQoBoJq9/s7wCBN5 +LHK4RKb94XGHYUDMGBP30wafc33zB9N1e0F9komHuB/WLLX7g9t5/w9+M0zk +azJJZ6vyh+mqqAzhX0z8IaDgueqeP5xdSHOuXGCi9/pPwWJ5/sCnVaDisMhE +8SG7V+vT/SHz38qZpSUm0hteW++K8Yf/AG/3jXA= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7740,116 +8149,115 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwV1mc8ll0YAHDhLRUS2fvx3I9NJCOerkuDUKgIRZQ93obsBgqlrMyoSCE8 +dxkV0RKKhjRsGREhq6woee/30/37f7jP75xzrSN7+OgeV3Y2NjaOZWxs/39n +u1/V0i/lbO7icrCbfa29uSlTJNiw7SzsDJ1f9BtaByjYeFikLRFsxKcGtg/R +IcCysJWj7SY0bMrhVxzSgrXjwonzraUwevvnpX+GtkHPY/Oj063V8DIxzzrr +mxUY0Ue6frR+hD7D7lCxQReYb9VJmWztA9Ukli5/rx/UbL2d8+HmFGxdZjoy +nBMJEj0Vg4dVFuFk26Bq/Ld4WOfjWLhiKwfGr0g9pdaaDIkaRo/MrbmQkzPZ +umwiHdqvrK/6wceDy1ZZjaf6ZcKlnNBGdtG12JZyvTc6KhuEk/ujk64L4M+7 +Q9NTV2/BeSuTzR9nBVE06IvdtsO5cEIv2/HVWRGEtJheQ4nbsG1iIeRIvxh6 +8ChebYzKh+AdyUrPR8VQQm3Sb+FSPtzNVu0QmBVD3wkDM9rlfBCxctKr4BLH +l+q0UY+r+TD68MUch5o4hvbazX4oyoekswl+6UHiaD5wbIi/LR/6BBlHankk +MMr3yxZzRgGEG+w+JKYriaKMroZrFQWw42DmT50tkrjc5Jaby9MC4A37fs56 +pyQW2Xc5KdQUwLWayLwEJ0ncb98clPu2AB6aVn5fHi2JqZXiGn49BTBpKxcw +1S6J4c5zac6chXDQf+bi25NSeCJjD3+0WSFsupt+/8wzaVQtfc499K4QtrW+ +Wxyvl0YpMfaiiI+FYM7Gaez4URrjrU/QpVoKwXnPkXYYkMbNP/svGHcVgtFJ +2dCwf2RQqm6Zrt/3QjgmPXvLUFkGPRZ3a2xcwYJa96yxmgAZ9LTZ+9zagAUm +f/T4T52UwccVkp9igAXvEpq0tcJkcOyOdEXVFha0V6wMy4mWwehCAXZpExaM +r/bjj7wmgyGSPdEPrFkgUrxDx6haBisDBCJMj7DA59ePsHoeWUy4UNix7joL +Nh13Exrkl8XmihlhuRss4BrpYHGIyOLZpMAs1VssyO2sadlMk8Wmu12xOgUs +6H6aovJAWxZ7clLGpB6wwCJSry3bURYlyt0H9d+yQJM/XP1kiSwuSa22Lp5j +AdulmdorZbL4jRm5bccCtX8Or/1lj2RxseRu5Oc/LPCe2RP544UsdoRv+Du/ +jIScNnqne4cs6uQqv+fiJkEoqz7KioOGI41p+gHSJMwr83WrWtOQ9e51QOJW +Emavi4Vv2E9D/wluQ9Z2EqbXEHQ9RxqWZ+2LrjImYXxKz2ubJw1t4HhKrxkJ +fY+cZ/efpuHm7X9zZ/eS8NqsnPdCLg0fVF3+E+JMQt2T5yWxhTRsp41+OuBK +Qq36W6ukIhpOOzip67mT8FTgS0ZmBQ0dhzX9hr1IKO1cJf+ggYYyouMo40tC +hvdB6Juh4Qehw9u+hZKQ1uXR922Bhhv9ReITwklItjgRObZEww6BAhftcyTE +bbjw5tdKORxJkykNjCLh7O8SmzVScih8ir3/fQwJ3pf+OWZgJIf+h6I5uq+Q +YMAib6SmymH1rtx0t7skdMqwsrZflUOtyrGlmCISQlILMqez5DAgvu54cTEJ +5eF51/YUyOHR/v7g8VISNG1vXOF9LIf7eurljctJUPwnOSHqixw2M6TtvZ+R +UB+SGL9xUA5FdmYWHa4iwW0yIe7riBxmHykXtHlOxaczNmbLtBxe1rkorlND +gkzp+Qt/l9NROStWrOklFS/Hk2EBKnRU+O1jfraBhAdNwaGEBh2N+lQ4zN6R +YGUadKZpIx3n7ZZ/5GskIXGj/ylNoKND88yzpPck8HAfDRrfTcd3KkdHAj6R +QIb/G3h9Hx37r984rdBEgumcd8DOA3Ss5WhVa6V8oc/Dr9CFjo09lmPKLSRw +Vhw+5hZIR821kUOlbSTcUjt0VPAUHXUNvwXvaidhS47jkdowOo7v2qc6QDk0 +3t6HdpGOc5buf1Z3krDgus+j+xodXWtqTHS6SEjvtHKPzaZj/sVf85WUdXfv +dTPIo2OX6sH3+t0kBBhYumQU0ZHbuOWHVg8JP/hNnfZV09Ex3UTony8ktPnQ +3nvV0XF0bLnkScpVLxcg9C0dORzM3o1RTghhSee30DFCWGnDqz4SgprOxT/u +pOOQDGNIo58EJzX7pfe9dNxU5WOaRnl9H3fP/AgdrQpvidp+JUHEYMCcd5KO +FgcXzt+jzJb65ClthjpfsEfe6gESGk2OZJot0XFE9OBsCeWyW0a8TpwESudb +KrINkpC5KHXGbyWBQiXr15hRPlLS6HBdgMD6tJTZFsr7Vuc3lIgQ6CZ4cV74 +GwmbXcOYLyUJ5NxlVmpNmfHM9k4HjcCPIYmyCZR5RDUkJ+Sp9XxEd9RRnvZd +GcuhSmDvmQzGb8qf3375I6xJYFH2+yfKQ1R8wxI/owGBW7JNRc9RTu7w2mlt +SKCo0oqeAsqntLY+9jQi0E7My6mBskucuMoZMwIjVDUyxyibDU1dTbQkMOWO +WPqqYSq/t7xdfduawDjfgd10ymLXck4+2k+gWp/lq02U2WdPfW90JPD8hASb +OeURC+sDX10I7BJbNedA+WOB6ptfngSuON5+14tyJcdyfZ6jBJpe2qngR/mm +Q3ehrB+B3+IIlxDK0eVlYtrBBHaqyDufpnxsbfxF0zMEnshex/jftt7uCwfP +Ebh4r+ROMGV8AV4nLlD7L6te8KWsIC3ScT6WQMtIbl5PynzBkybXEgm8GWU1 +dIDyr4/1FcVpBHoXOl00o9yrkq344hqB7z3npnUo10cFp7dnE8hd16MgS7m4 +d/fK8TwC23Z+YaygfGWTUjA7SaA2b+3EMHVfYcnsw0IlBArnWUa8ouw+3mGr +XEbgd23LgVzK5jvu1cMjAoO8YgRCKWvfvKRrVUX9f7xxjTVlqT/O+R4vCPRk +/9ohT3n5PgOR06+p+zmQ4j9HxXe8aN2Fy40ETm0u6q2h3LJybC63icDVs4sS +sZTznlxvfddNxSPjX24hynHCAcb9/QQ2FCs+b6byLeC4efncEIEqY5amiZS3 +E0upMlMEPm+W6FpG+WuM0z7fFQxkrPAWf0Tl+5ERFdp6bga6q49muFOeM54f +G+NjoOBdToe1lFdxJEZ6ijHw9d8Clv3/9RNcc99JlYEjXlmRH6n6q2yJD5PS +ZOA6wVIVT8pbtex3ftZmIGditfhiL5X/E9P9NshAOa+0JgnKp10ZAhZ7GXh6 +0+ba/+t/ec3Pbm5bBuaFeT19TPWHBJlnha/tGZjNI7Bcv+v/fmmzxciNgQU6 +WWHqn6l5szv6ODOYgWVtctq/qP4jtHm0UTmLgX22vLiymYQbVx9eHb7FwD8c +C66OVH9TnI9wv51Pnbcq52sp1Q8N7ksu0UoZmBq/bmL3RxKclSzUxF4wMGnN +6Z3HqH5aLFQaw/WdgT+m4t+ovSJhk98Z25cTDFztx9u0v56Emg+m9IhpBqak +DWFEHRWfmP5HS4sMLG68adr4goQ/7ILfZ/nkUbdpUNOomgSTiUCTAW153H4o +bLG8kgQJDakoLgN5/O48vD+3goq3b221sqE8KnJGlcU/pOp3ls/A10werwdu +9DlQRkL3YoHakqM8Gq2KHH1XQoIv92cB0Wh5lPu2Rlw+n4Rt5mctDeLkcb/T +zvdf80gQTlCIdUySR7XqA0lZuSQ8FvBfnnddHn1bho24b1H3Lc47r1kqj2Xe +V0Krr1PzVhG7d3bKI6fQZuFbiST4eA+KHeuVx+WdbrKal0mAOzE2SQPyWDTh +bfI0nsqf9e3v2yfkkTAVn2ug5quarm+NG6cCCjNTB15T87fGKCc/TFUBzz0K +ntYPIWHUmevE/VAF9B/xEGV3pM6bue3JswgF3H30O4IDCRPtYSveRCvgS46x +quADJPy0mL/6JUkBXfqPvxu0ofJRf6SWN18Bc1/e08+2pPrPurdCnu8VMHp5 +nuEVQxJEa+MrJWUVUUwvSDpVlqTe+8Ls56sVsYGDU3N1BwuGDxvn69cpomar +77PGVhbEZAeaT75RxEZVK53EZhZ8kmrLsGtWRN7Y4WG+DyxwEk3foDKkiD8L +XvrO1LEgmFfc9QOPEmaW87ceoN5r5C+penE7Jfz29xpfThwL+BsYccUTSria +wTe/V58FfyfW576eVsIzTlYGjrosGOHXf/x1Xgk9VtlYeGxkQbWtxYgIpzKm +T2oNn1BnwYmvgUbhIsr4UCaf+7gcC5p+1//dbaiMvMUxgpyrWZCm5H10KlEZ ++RNtLVLaCkHiQpGltrYK1g/W1Ob+WwhXlPX4BNxVcW38p318iQXwWsxw49Rl +Nbwi3MxVm5MPmySqE9Rb1HFJOrR8IO428HLc9Dt0dj22Tya5mJ3KA6lwaQM7 +hgbek8hJ0zPKhZWEfdmeOg10PtaTasyTA2pM0aJAB01kimGy0sBN8O3mrzFl +24B77KdsPt/MhompGGuTKxsw8sRfjueBN8BY/WWGiaoWLrpd/qh1JxOeTun/ +nnunhfM/w/bHGl+DIyqaHR9cN+LVgHP0bvEMYI67NNmt1EaN0qd6ka1psJ0u +sovnpjYKFRUkrv2QAgphF4OqdXSQGTcs1TiaBEques+IDh188CrksdSfy+D6 +1CPi/nFdbLNPNw7ZkQDPbjS5/BDUw76ZL41c0rEwnb80p16uh0d3qE5l/YkG +Z4K1MmPXJsznkaz12nEefiglaZdObsI6q9sHlVMj4GHO7y8zF/Sx/Ux+XfOO +s7B/mxzqSxlgl9y6Oy26YSD+7/kKtSoDnHj4ab3/4VMguMqnZJcNE+V1FhkR +c0GQs/V0yKQdEyeehXOuHA4CzdNxW5PsmXiRdT8luSMIzCeLm9sOMdFdMOvN +sydBENUyM+/sw0T7+7WWbhFB8Otm6JaQcCZKvlQW/ckfBB36SZ/yWEysrQ+x +ndMKBA//nGsmd5mY/MKHzUI+EGbvPnAdLWbi+RYD6TuigcBPa5vTKGNi0q9X +Faf+BoAZl6TEkyomvohoUPGsD4DHTXkun5qZeDra7oC/QwCY8j5UDWhjYnT6 +wYsbLAOgzfjVrEgnE+c5j6/9tSUApiu/XzjYy0TdoWUyyQoBoJq9/s7wCBN5 +LHK4RKb94XGHYUDMGBP30wafc33zB9N1e0F9komHuB/WLLX7g9t5/w9+M0zk +azJJZ6vyh+mqqAzhX0z8IaDgueqeP5xdSHOuXGCi9/pPwWJ5/sCnVaDisMhE +8SG7V+vT/SHz38qZpSUm0hteW++K8Yf/AG/3jXA= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.0564688857590114}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7861,19 +8269,19 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.0564688857590114}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7887,115 +8295,114 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwV1mc8ll0YAHDhLRUS2fvx3I9NJCOerkuDUKgIRZQ93obsBgqlrMyoSCE8 +dxkV0RKKhjRsGREhq6woee/30/37f7jP75xzrSN7+OgeV3Y2NjaOZWxs/39n +u1/V0i/lbO7icrCbfa29uSlTJNiw7SzsDJ1f9BtaByjYeFikLRFsxKcGtg/R +IcCysJWj7SY0bMrhVxzSgrXjwonzraUwevvnpX+GtkHPY/Oj063V8DIxzzrr +mxUY0Ue6frR+hD7D7lCxQReYb9VJmWztA9Ukli5/rx/UbL2d8+HmFGxdZjoy +nBMJEj0Vg4dVFuFk26Bq/Ld4WOfjWLhiKwfGr0g9pdaaDIkaRo/MrbmQkzPZ +umwiHdqvrK/6wceDy1ZZjaf6ZcKlnNBGdtG12JZyvTc6KhuEk/ujk64L4M+7 +Q9NTV2/BeSuTzR9nBVE06IvdtsO5cEIv2/HVWRGEtJheQ4nbsG1iIeRIvxh6 +8ChebYzKh+AdyUrPR8VQQm3Sb+FSPtzNVu0QmBVD3wkDM9rlfBCxctKr4BLH +l+q0UY+r+TD68MUch5o4hvbazX4oyoekswl+6UHiaD5wbIi/LR/6BBlHankk +MMr3yxZzRgGEG+w+JKYriaKMroZrFQWw42DmT50tkrjc5Jaby9MC4A37fs56 +pyQW2Xc5KdQUwLWayLwEJ0ncb98clPu2AB6aVn5fHi2JqZXiGn49BTBpKxcw +1S6J4c5zac6chXDQf+bi25NSeCJjD3+0WSFsupt+/8wzaVQtfc499K4QtrW+ +Wxyvl0YpMfaiiI+FYM7Gaez4URrjrU/QpVoKwXnPkXYYkMbNP/svGHcVgtFJ +2dCwf2RQqm6Zrt/3QjgmPXvLUFkGPRZ3a2xcwYJa96yxmgAZ9LTZ+9zagAUm +f/T4T52UwccVkp9igAXvEpq0tcJkcOyOdEXVFha0V6wMy4mWwehCAXZpExaM +r/bjj7wmgyGSPdEPrFkgUrxDx6haBisDBCJMj7DA59ePsHoeWUy4UNix7joL +Nh13Exrkl8XmihlhuRss4BrpYHGIyOLZpMAs1VssyO2sadlMk8Wmu12xOgUs +6H6aovJAWxZ7clLGpB6wwCJSry3bURYlyt0H9d+yQJM/XP1kiSwuSa22Lp5j +AdulmdorZbL4jRm5bccCtX8Or/1lj2RxseRu5Oc/LPCe2RP544UsdoRv+Du/ +jIScNnqne4cs6uQqv+fiJkEoqz7KioOGI41p+gHSJMwr83WrWtOQ9e51QOJW +Emavi4Vv2E9D/wluQ9Z2EqbXEHQ9RxqWZ+2LrjImYXxKz2ubJw1t4HhKrxkJ +fY+cZ/efpuHm7X9zZ/eS8NqsnPdCLg0fVF3+E+JMQt2T5yWxhTRsp41+OuBK +Qq36W6ukIhpOOzip67mT8FTgS0ZmBQ0dhzX9hr1IKO1cJf+ggYYyouMo40tC +hvdB6Juh4Qehw9u+hZKQ1uXR922Bhhv9ReITwklItjgRObZEww6BAhftcyTE +bbjw5tdKORxJkykNjCLh7O8SmzVScih8ir3/fQwJ3pf+OWZgJIf+h6I5uq+Q +YMAib6SmymH1rtx0t7skdMqwsrZflUOtyrGlmCISQlILMqez5DAgvu54cTEJ +5eF51/YUyOHR/v7g8VISNG1vXOF9LIf7eurljctJUPwnOSHqixw2M6TtvZ+R +UB+SGL9xUA5FdmYWHa4iwW0yIe7riBxmHykXtHlOxaczNmbLtBxe1rkorlND +gkzp+Qt/l9NROStWrOklFS/Hk2EBKnRU+O1jfraBhAdNwaGEBh2N+lQ4zN6R +YGUadKZpIx3n7ZZ/5GskIXGj/ylNoKND88yzpPck8HAfDRrfTcd3KkdHAj6R +QIb/G3h9Hx37r984rdBEgumcd8DOA3Ss5WhVa6V8oc/Dr9CFjo09lmPKLSRw +Vhw+5hZIR821kUOlbSTcUjt0VPAUHXUNvwXvaidhS47jkdowOo7v2qc6QDk0 +3t6HdpGOc5buf1Z3krDgus+j+xodXWtqTHS6SEjvtHKPzaZj/sVf85WUdXfv +dTPIo2OX6sH3+t0kBBhYumQU0ZHbuOWHVg8JP/hNnfZV09Ex3UTony8ktPnQ +3nvV0XF0bLnkScpVLxcg9C0dORzM3o1RTghhSee30DFCWGnDqz4SgprOxT/u +pOOQDGNIo58EJzX7pfe9dNxU5WOaRnl9H3fP/AgdrQpvidp+JUHEYMCcd5KO +FgcXzt+jzJb65ClthjpfsEfe6gESGk2OZJot0XFE9OBsCeWyW0a8TpwESudb +KrINkpC5KHXGbyWBQiXr15hRPlLS6HBdgMD6tJTZFsr7Vuc3lIgQ6CZ4cV74 +GwmbXcOYLyUJ5NxlVmpNmfHM9k4HjcCPIYmyCZR5RDUkJ+Sp9XxEd9RRnvZd +GcuhSmDvmQzGb8qf3375I6xJYFH2+yfKQ1R8wxI/owGBW7JNRc9RTu7w2mlt +SKCo0oqeAsqntLY+9jQi0E7My6mBskucuMoZMwIjVDUyxyibDU1dTbQkMOWO +WPqqYSq/t7xdfduawDjfgd10ymLXck4+2k+gWp/lq02U2WdPfW90JPD8hASb +OeURC+sDX10I7BJbNedA+WOB6ptfngSuON5+14tyJcdyfZ6jBJpe2qngR/mm +Q3ehrB+B3+IIlxDK0eVlYtrBBHaqyDufpnxsbfxF0zMEnshex/jftt7uCwfP +Ebh4r+ROMGV8AV4nLlD7L6te8KWsIC3ScT6WQMtIbl5PynzBkybXEgm8GWU1 +dIDyr4/1FcVpBHoXOl00o9yrkq344hqB7z3npnUo10cFp7dnE8hd16MgS7m4 +d/fK8TwC23Z+YaygfGWTUjA7SaA2b+3EMHVfYcnsw0IlBArnWUa8ouw+3mGr +XEbgd23LgVzK5jvu1cMjAoO8YgRCKWvfvKRrVUX9f7xxjTVlqT/O+R4vCPRk +/9ohT3n5PgOR06+p+zmQ4j9HxXe8aN2Fy40ETm0u6q2h3LJybC63icDVs4sS +sZTznlxvfddNxSPjX24hynHCAcb9/QQ2FCs+b6byLeC4efncEIEqY5amiZS3 +E0upMlMEPm+W6FpG+WuM0z7fFQxkrPAWf0Tl+5ERFdp6bga6q49muFOeM54f +G+NjoOBdToe1lFdxJEZ6ijHw9d8Clv3/9RNcc99JlYEjXlmRH6n6q2yJD5PS +ZOA6wVIVT8pbtex3ftZmIGditfhiL5X/E9P9NshAOa+0JgnKp10ZAhZ7GXh6 +0+ba/+t/ec3Pbm5bBuaFeT19TPWHBJlnha/tGZjNI7Bcv+v/fmmzxciNgQU6 +WWHqn6l5szv6ODOYgWVtctq/qP4jtHm0UTmLgX22vLiymYQbVx9eHb7FwD8c +C66OVH9TnI9wv51Pnbcq52sp1Q8N7ksu0UoZmBq/bmL3RxKclSzUxF4wMGnN +6Z3HqH5aLFQaw/WdgT+m4t+ovSJhk98Z25cTDFztx9u0v56Emg+m9IhpBqak +DWFEHRWfmP5HS4sMLG68adr4goQ/7ILfZ/nkUbdpUNOomgSTiUCTAW153H4o +bLG8kgQJDakoLgN5/O48vD+3goq3b221sqE8KnJGlcU/pOp3ls/A10werwdu +9DlQRkL3YoHakqM8Gq2KHH1XQoIv92cB0Wh5lPu2Rlw+n4Rt5mctDeLkcb/T +zvdf80gQTlCIdUySR7XqA0lZuSQ8FvBfnnddHn1bho24b1H3Lc47r1kqj2Xe +V0Krr1PzVhG7d3bKI6fQZuFbiST4eA+KHeuVx+WdbrKal0mAOzE2SQPyWDTh +bfI0nsqf9e3v2yfkkTAVn2ug5quarm+NG6cCCjNTB15T87fGKCc/TFUBzz0K +ntYPIWHUmevE/VAF9B/xEGV3pM6bue3JswgF3H30O4IDCRPtYSveRCvgS46x +quADJPy0mL/6JUkBXfqPvxu0ofJRf6SWN18Bc1/e08+2pPrPurdCnu8VMHp5 +nuEVQxJEa+MrJWUVUUwvSDpVlqTe+8Ls56sVsYGDU3N1BwuGDxvn69cpomar +77PGVhbEZAeaT75RxEZVK53EZhZ8kmrLsGtWRN7Y4WG+DyxwEk3foDKkiD8L +XvrO1LEgmFfc9QOPEmaW87ceoN5r5C+penE7Jfz29xpfThwL+BsYccUTSria +wTe/V58FfyfW576eVsIzTlYGjrosGOHXf/x1Xgk9VtlYeGxkQbWtxYgIpzKm +T2oNn1BnwYmvgUbhIsr4UCaf+7gcC5p+1//dbaiMvMUxgpyrWZCm5H10KlEZ ++RNtLVLaCkHiQpGltrYK1g/W1Ob+WwhXlPX4BNxVcW38p318iQXwWsxw49Rl +Nbwi3MxVm5MPmySqE9Rb1HFJOrR8IO428HLc9Dt0dj22Tya5mJ3KA6lwaQM7 +hgbek8hJ0zPKhZWEfdmeOg10PtaTasyTA2pM0aJAB01kimGy0sBN8O3mrzFl +24B77KdsPt/MhompGGuTKxsw8sRfjueBN8BY/WWGiaoWLrpd/qh1JxOeTun/ +nnunhfM/w/bHGl+DIyqaHR9cN+LVgHP0bvEMYI67NNmt1EaN0qd6ka1psJ0u +sovnpjYKFRUkrv2QAgphF4OqdXSQGTcs1TiaBEques+IDh188CrksdSfy+D6 +1CPi/nFdbLNPNw7ZkQDPbjS5/BDUw76ZL41c0rEwnb80p16uh0d3qE5l/YkG +Z4K1MmPXJsznkaz12nEefiglaZdObsI6q9sHlVMj4GHO7y8zF/Sx/Ux+XfOO +s7B/mxzqSxlgl9y6Oy26YSD+7/kKtSoDnHj4ab3/4VMguMqnZJcNE+V1FhkR +c0GQs/V0yKQdEyeehXOuHA4CzdNxW5PsmXiRdT8luSMIzCeLm9sOMdFdMOvN +sydBENUyM+/sw0T7+7WWbhFB8Otm6JaQcCZKvlQW/ckfBB36SZ/yWEysrQ+x +ndMKBA//nGsmd5mY/MKHzUI+EGbvPnAdLWbi+RYD6TuigcBPa5vTKGNi0q9X +Faf+BoAZl6TEkyomvohoUPGsD4DHTXkun5qZeDra7oC/QwCY8j5UDWhjYnT6 +wYsbLAOgzfjVrEgnE+c5j6/9tSUApiu/XzjYy0TdoWUyyQoBoJq9/s7wCBN5 +LHK4RKb94XGHYUDMGBP30wafc33zB9N1e0F9komHuB/WLLX7g9t5/w9+M0zk +azJJZ6vyh+mqqAzhX0z8IaDgueqeP5xdSHOuXGCi9/pPwWJ5/sCnVaDisMhE +8SG7V+vT/SHz38qZpSUm0hteW++K8Yf/AG/3jXA= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.0564688857590114}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8006,6 +8413,7 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8033,7 +8441,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.060553949877372025`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0564688857590114}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8041,9 +8450,9 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913408819317417`*^9}, - CellLabel-> - "Out[338]=",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] + CellChangeTimes->{3.9913408819317417`*^9, 3.99435143687045*^9, + 3.9943546189779243`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"d728a3a3-ee95-4353-95f6-6b75e973cb17"] }, Open ]], Cell[CellGroupData[{ @@ -8096,66 +8505,78 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[339]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], + "In[100]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 339, 345, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881982744*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.720188487898366`*^-172\\\", \ +RowBox[{\\\"182746270923358292188640954459021807938\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"61\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3679745821507584000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 17, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994351437042097*^9, + 3.994354619138389*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], +In[100]:=",ExpressionUUID->"00cd7581-620c-40ba-b645-129b4f731771"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 346, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881991743*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5758539350937932`*^-175\\\", \ +RowBox[{\\\"532888126012512780022077023202507591948\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"64\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0138815516114944000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 18, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994351437042097*^9, + 3.99435461914933*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], +In[100]:=",ExpressionUUID->"ec8e9411-c690-4c2d-9fbf-6896d8152598"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 347, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882000746*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.129204229039356`*^-179\\\", \ +RowBox[{\\\"161198658118785115956678299518758546564\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"68\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9916936247705600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 19, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994351437042097*^9, + 3.9943546191586523`*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], +In[100]:=",ExpressionUUID->"7d814c11-bd6e-4f98-97ad-1c70863c98f8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 339, 348, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882008745*^9}, +during this calculation.\"", 2, 100, 20, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994351437042097*^9, + 3.994354619168817*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], +In[100]:=",ExpressionUUID->"43c586d3-7e0e-4843-abe7-3f5ecf77402f"], -Cell[BoxData["12.553654989521348`"], "Output", - CellChangeTimes->{3.9913408882266617`*^9}, +Cell[BoxData["13.459826308211696`"], "Output", + CellChangeTimes->{3.9913408882266617`*^9, 3.994351525913123*^9, + 3.9943547045127153`*^9}, CellLabel-> - "Out[339]=",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] + "Out[100]=",ExpressionUUID->"fea1b8af-544f-497f-90ac-c969a4f8f447"] }, Open ]], Cell[CellGroupData[{ @@ -8223,68 +8644,80 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{ - 3.9918497473740044`*^9, {3.99184977815234*^9, - 3.991849780845421*^9}},ExpressionUUID->"1d118f77-7d68-dd41-b0af-\ -09454f88e7f1"], + 3.9918497473740044`*^9, {3.99184977815234*^9, 3.991849780845421*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 340, 349, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882626343`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.733786565474171`*^-221\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 21, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994351525987749*^9, + 3.99435470460048*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], +In[101]:=",ExpressionUUID->"40b749e8-f63e-4822-9825-80db5f24e011"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 340, 350, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882726326`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.152001981128782`*^-226\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 22, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994351525987749*^9, + 3.994354704610608*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], +In[101]:=",ExpressionUUID->"d4334045-22a4-46b0-a849-11e429909562"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 340, 351, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882816315`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5543235834534165`*^-232\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 23, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994351525987749*^9, + 3.9943547046206217`*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], +In[101]:=",ExpressionUUID->"44ece60a-cae6-4e7f-bd29-8cdce9de30b9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 340, 352, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882906322`*^9}, +during this calculation.\"", 2, 101, 24, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994351525987749*^9, + 3.994354704632381*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], +In[101]:=",ExpressionUUID->"3079e32b-f898-4e47-a0ad-058725e192d5"], -Cell[BoxData["1.3456729512531673`"], "Output", - CellChangeTimes->{3.991340895263792*^9}, +Cell[BoxData["0.47432776137903176`"], "Output", + CellChangeTimes->{3.991340895263792*^9, 3.994351537382173*^9, + 3.994354715746169*^9}, CellLabel-> - "Out[340]=",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] + "Out[101]=",ExpressionUUID->"fde4c31b-1fee-4c9c-afbf-a1093ed72d26"] }, Open ]], Cell[CellGroupData[{ @@ -8305,8 +8738,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8351,68 +8783,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497892022038`*^9, - 3.991849792285101*^9}},ExpressionUUID->"c8039063-5f4d-134a-b6ba-\ -e19335f7a9f6"], + CellChangeTimes->{{3.9918497892022038`*^9, 3.991849792285101*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 341, 353, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895297941*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.733786565474171`*^-221\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 25, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994351537435074*^9, + 3.9943547157990026`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], +In[102]:=",ExpressionUUID->"b9dc4573-816a-41b8-8986-4cb39c7244d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 341, 354, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895308939*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.152001981128782`*^-226\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 26, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994351537435074*^9, + 3.9943547158094797`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], +In[102]:=",ExpressionUUID->"f9160ae1-e81c-447a-916c-99e38f898295"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 341, 355, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895316965*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5543235834534165`*^-232\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 27, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994351537435074*^9, + 3.994354715818475*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], +In[102]:=",ExpressionUUID->"3655a4b1-974e-4480-99d0-992306bc38b2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 341, 356, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895324953*^9}, +during this calculation.\"", 2, 102, 28, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994351537435074*^9, + 3.994354715827836*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], +In[102]:=",ExpressionUUID->"adb2778d-15df-4762-8830-62f93a3ce78c"], -Cell[BoxData["11.729429210875175`"], "Output", - CellChangeTimes->{3.9913409010488796`*^9}, +Cell[BoxData["47.440745825876846`"], "Output", + CellChangeTimes->{3.9913409010488796`*^9, 3.994351548384255*^9, + 3.994354726205408*^9}, CellLabel-> - "Out[341]=",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] + "Out[102]=",ExpressionUUID->"13374341-1876-4ae5-ad40-304751ad7e46"] }, Open ]], Cell[CellGroupData[{ @@ -8433,8 +8877,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8479,68 +8922,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497964884186`*^9, - 3.9918497998504505`*^9}},ExpressionUUID->"a474307a-af78-3040-90ec-\ -fb8d284b16bb"], + CellChangeTimes->{{3.9918497964884186`*^9, 3.9918497998504505`*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 342, 357, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010848827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.733786565474171`*^-221\\\", \ +RowBox[{\\\"6657177494374971892087697643746956484264\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"16\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2185661739706282409984000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 29, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.9943515484706383`*^9, + 3.994354726285902*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], +In[103]:=",ExpressionUUID->"8600885b-de8d-4296-816b-722dd1dc1280"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 342, 358, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010938797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.152001981128782`*^-226\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 30, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.9943515484706383`*^9, + 3.994354726297453*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], +In[103]:=",ExpressionUUID->"621b34c9-e533-4e14-8127-d080502c62e8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 342, 359, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340901101883*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5543235834534165`*^-232\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 31, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.9943515484706383`*^9, + 3.994354726308318*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], +In[103]:=",ExpressionUUID->"37a98f4f-e1d2-41bb-85d4-de5d26bca49d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 342, 360, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409011098804`*^9}, +during this calculation.\"", 2, 103, 32, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.9943515484706383`*^9, + 3.994354726321376*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], +In[103]:=",ExpressionUUID->"bc66321d-d69f-41a0-848b-2502ca5d99d6"], -Cell[BoxData["21.67464099510054`"], "Output", - CellChangeTimes->{3.991340904517517*^9}, +Cell[BoxData["8.529135548698658`"], "Output", + CellChangeTimes->{3.991340904517517*^9, 3.9943515575026627`*^9, + 3.9943547350694923`*^9}, CellLabel-> - "Out[342]=",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] + "Out[103]=",ExpressionUUID->"9fc953aa-c54b-4488-b71b-434c3d75f947"] }, Open ]], Cell[CellGroupData[{ @@ -8549,22 +9004,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849803549658*^9, - 3.9918498086143265`*^9}},ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-\ -f67bfdbd9bc7"], - -Cell[BoxData["0.0843966342510027`"], "Output", - CellChangeTimes->{3.991340904549515*^9}, + CellChangeTimes->{{3.991849803549658*^9, 3.9918498086143265`*^9}}, CellLabel-> - "Out[343]=",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] + "In[104]:=",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], + +Cell[BoxData["0.023580351872071477`"], "Output", + CellChangeTimes->{3.991340904549515*^9, 3.9943515575590353`*^9, + 3.994354735118143*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"eeab924c-1a3a-4ea3-8a5a-4e01b37d04ed"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918501018852215`*^9, 3.991850105557743*^9}, - 3.99192470649716*^9},ExpressionUUID->"d104d373-080a-854b-92ff-\ -e87abbd4c41c"], + 3.99192470649716*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ @@ -8587,12 +9044,13 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[345]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], + "In[106]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.9913409045775146`*^9}, +Cell[BoxData["13.886176572292896`"], "Output", + CellChangeTimes->{3.9913409045775146`*^9, 3.9943515575871353`*^9, + 3.994354735140697*^9}, CellLabel-> - "Out[345]=",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] + "Out[106]=",ExpressionUUID->"84c322cd-c79d-4420-9f95-32852e386fdd"] }, Open ]], Cell[CellGroupData[{ @@ -8602,12 +9060,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[347]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], + "In[107]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.991340904625164*^9}, +Cell[BoxData["1.678223320932622`"], "Output", + CellChangeTimes->{3.991340904625164*^9, 3.994351557604892*^9, + 3.994354735154922*^9}, CellLabel-> - "Out[347]=",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] + "Out[107]=",ExpressionUUID->"ec903b4a-484b-4573-9493-43113a1d8cb3"] }, Open ]], Cell[CellGroupData[{ @@ -8617,12 +9076,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[350]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], + "In[108]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913409046880226`*^9}, +Cell[BoxData["23.30410536221016`"], "Output", + CellChangeTimes->{3.9913409046880226`*^9, 3.9943515576211643`*^9, + 3.994354735169848*^9}, CellLabel-> - "Out[350]=",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] + "Out[108]=",ExpressionUUID->"a2f5cced-3010-45de-9109-b1fd68cf6193"] }, Open ]], Cell[CellGroupData[{ @@ -8812,12 +9272,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[351]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], + "In[109]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[BoxData["0.021613768236132463`"], "Output", - CellChangeTimes->{3.9913409047132187`*^9}, +Cell[BoxData["0.004824624307633023`"], "Output", + CellChangeTimes->{3.9913409047132187`*^9, 3.994351557639629*^9, + 3.994354735191293*^9}, CellLabel-> - "Out[351]=",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] + "Out[109]=",ExpressionUUID->"4734b595-71b4-4bd9-abfc-a8c2768dca7a"] }, Open ]], Cell[CellGroupData[{ @@ -8831,12 +9292,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[352]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], + "In[110]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[BoxData["6.028089553291302`"], "Output", - CellChangeTimes->{3.9913409048112164`*^9}, +Cell[BoxData["12.758898730790024`"], "Output", + CellChangeTimes->{3.9913409048112164`*^9, 3.994351557841015*^9, + 3.994354735393405*^9}, CellLabel-> - "Out[352]=",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] + "Out[110]=",ExpressionUUID->"ce0c3955-7f70-4d96-87c9-676fca10b20f"] }, Open ]], Cell[CellGroupData[{ @@ -9028,12 +9490,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[353]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], + "In[111]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[BoxData["0.010798036798660033`"], "Output", - CellChangeTimes->{3.991340904825058*^9}, +Cell[BoxData["0.03853564503994491`"], "Output", + CellChangeTimes->{3.991340904825058*^9, 3.994351557860536*^9, + 3.994354735413658*^9}, CellLabel-> - "Out[353]=",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] + "Out[111]=",ExpressionUUID->"6bd45c06-da55-48f5-8668-84caf359272c"] }, Open ]], Cell[CellGroupData[{ @@ -9047,12 +9510,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[354]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], + "In[112]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[BoxData["8.5284977476633`"], "Output", - CellChangeTimes->{3.9913409049303207`*^9}, +Cell[BoxData["4.514541235685594`"], "Output", + CellChangeTimes->{3.9913409049303207`*^9, 3.99435155811229*^9, + 3.994354735608968*^9}, CellLabel-> - "Out[354]=",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] + "Out[112]=",ExpressionUUID->"426a57a5-b017-416b-9358-41d8fec2aeec"] }, Open ]], Cell[CellGroupData[{ @@ -9145,12 +9609,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[355]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], + "In[113]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991340904948307*^9}, +Cell[BoxData["0.10708479897462729`"], "Output", + CellChangeTimes->{3.991340904948307*^9, 3.994351558138418*^9, + 3.9943547356285667`*^9}, CellLabel-> - "Out[355]=",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] + "Out[113]=",ExpressionUUID->"7019cf97-7d18-4130-afbd-7de18c9281c1"] }, Open ]], Cell[CellGroupData[{ @@ -9240,12 +9705,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[356]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], + "In[114]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991340904981308*^9}, +Cell[BoxData["0.8929152010253727`"], "Output", + CellChangeTimes->{3.991340904981308*^9, 3.994351558161515*^9, + 3.994354735645174*^9}, CellLabel-> - "Out[356]=",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] + "Out[114]=",ExpressionUUID->"57b0d342-fb4b-4ad1-bdba-84e97cfe8606"] }, Open ]], Cell[CellGroupData[{ @@ -9368,12 +9834,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[357]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], + "In[115]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.99134090500931*^9}, +Cell[BoxData["0.09561764480319095`"], "Output", + CellChangeTimes->{3.99134090500931*^9, 3.994351558188087*^9, + 3.994354735663272*^9}, CellLabel-> - "Out[357]=",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] + "Out[115]=",ExpressionUUID->"519368d5-0acd-4adb-bd50-1d3edf673b33"] }, Open ]], Cell[CellGroupData[{ @@ -9435,68 +9902,74 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849824909197*^9},ExpressionUUID->"486d514f-ec65-1e4e-b780-\ -7e9487f745c3"], + CellChangeTimes->{3.991849824909197*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 361, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905038307*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.690588513035263`*^-241\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 116, 33, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994351558214299*^9, + 3.994354735683341*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], +In[116]:=",ExpressionUUID->"a299fcfa-dc7c-48a8-8cbd-e2b29875829a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 362, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905047306*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.1666524477973756`*^-248\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 116, 34, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994351558214299*^9, + 3.994354735693207*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], +In[116]:=",ExpressionUUID->"aaf24cf8-bcb3-41ba-80e6-3ad38e57f2c1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 363, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905056307*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.754662163234241`*^-255\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 116, 35, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994351558214299*^9, + 3.994354735702161*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], +In[116]:=",ExpressionUUID->"7a4b7d23-ae2e-48ac-b7cd-2ed25936cce2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 358, 364, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905064308*^9}, +during this calculation.\"", 2, 116, 36, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994351558214299*^9, + 3.994354735711224*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], +In[116]:=",ExpressionUUID->"0188c02f-97c6-4f1f-88a6-9bd26d44f554"], -Cell[BoxData["6.028089553291301`"], "Output", - CellChangeTimes->{3.991340908920454*^9}, +Cell[BoxData["12.758898730790012`"], "Output", + CellChangeTimes->{3.991340908920454*^9, 3.9943515654629087`*^9, + 3.9943547427829027`*^9}, CellLabel-> - "Out[358]=",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] + "Out[116]=",ExpressionUUID->"be69aa17-3d47-4b5e-b866-144ac4d1c99c"] }, Open ]], Cell[CellGroupData[{ @@ -9558,68 +10031,74 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918498299076843`*^9},ExpressionUUID->"c7144ce5-8356-d548-8854-\ -18c538c3321c"], + CellChangeTimes->{3.9918498299076843`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 365, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908954941*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.690588513035263`*^-241\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 117, 37, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994351565526873*^9, + 3.994354742842725*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], +In[117]:=",ExpressionUUID->"d7139375-fd22-47d8-8b98-dc98fe1a72a8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 366, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908964924*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.1666524477973756`*^-248\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 117, 38, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994351565526873*^9, + 3.994354742852844*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], +In[117]:=",ExpressionUUID->"db02d42f-f72e-482f-8e2f-55ad9cd7fc58"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 367, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409089739246`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.754662163234241`*^-255\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 117, 39, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994351565526873*^9, + 3.994354742864636*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], +In[117]:=",ExpressionUUID->"7869f60f-84c3-4e06-a8aa-462e185f5c9c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 359, 368, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908981924*^9}, +during this calculation.\"", 2, 117, 40, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994351565526873*^9, + 3.994354742876156*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], +In[117]:=",ExpressionUUID->"17dcb98f-9436-4bf8-ae2a-ac40805c64ed"], -Cell[BoxData["8.528497747663296`"], "Output", - CellChangeTimes->{3.991340912767397*^9}, +Cell[BoxData["4.514541235685597`"], "Output", + CellChangeTimes->{3.991340912767397*^9, 3.994351572687359*^9, + 3.9943547497728977`*^9}, CellLabel-> - "Out[359]=",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] + "Out[117]=",ExpressionUUID->"0765b4bf-5878-430e-baae-7b5c15dafd3e"] }, Open ]], Cell[CellGroupData[{ @@ -9677,95 +10156,93 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849833066021*^9},ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-\ -a45df2eabf0c"], + CellChangeTimes->{3.991849833066021*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk8VN//B3BRlMiaJZEYhIixp5y3JcqeVPY0Zq4lW8h3srZJErIk/fqU +kgpRkRTKp0Xpo6lU2lR2ss+oUFL93vPHfdzH83HOeZ/Xvefce1YyojxYggIC +AuN48e+7n+tr3Wp7bmUwb587exWXWE2UmjDsKonmxg/b+O4uNi2g2d0hvVX9 +oXy7M58Jixk9IpcNSzL4rmanPlxgxyG7X0rV8Z3xWOFeasVLQss04vJd37b7 +7Bz9DQn2FTHZix7paE3a2/ieTFllpfO9bEDdd9r2E5E0fDTItxM3ySKW00Ue +rr7mkYBumhtZzK7oIRtXOz3l++1++cS6yD4Spn3KPRE9IWw38p0+QCaXn+rl +W/hYtLfRzCBZ9ddxfxJaRerMk92NQySn5erqZLSr0vSlCdsx8nYgszwFTZ1T +k9NbOEHOaS1ITEWnaril7eJgHS0D733o9/LthnEVk6RyzWnLA2imT1ho/rGv +ZELlIzmI5v0jcL4m8ht5V8RxP4ReqKYnOUmfIjcmHxYdRhcwHzpILp0mB6r/ +e5GOVr3snbpmZpp03N0nk4E2X314IqLxB2mNF7yfiQ4x7eKM2M4RfX+P2lz0 +d/ae+aKav0nf3m73fPS+xsXrtBf+IaIOK2YL0EVgfiWY85e4FV6NKeLnu/jE +LqZiHvwXLDVXjK54nN+9X0kQqGC1P+f5eb8EJOUeE4SHbn1ipegknakb1yOF +4HBonHsZP++1lepc+gJwPdIWVY3uaBtr+nNhAZSd9H93g5//6y2fJUuFQeDM +Kac6dKWxa57ejDAIC6n4NKKb6xPmhTcuBLUIT4nH6KmHr7uGbMUgZG5bx2e0 +tLOYZGKTGHw4oufRgzZotwNxC3FQCR1+348O6795zlB/CRyzlZQZQ0cLcgzW +i0nC5lmZtb/QA2pXJ9OmpeDW+rsey7Xx/VCti14YSYNbIee2KlrwyuBKhd3S +0OZyV08DrWq0wqNiVBoyG6zt9NE+tsdrnnfLQHD6c3Vr9IugmFj5p0vhZV1t +ZSi683J2ZuBCOZg5VicQhR4brbhQvkEO7DoLguLQonF9ry3vyUHwqYGtqWi7 +Q57GgTflofvps7ET6IZS06myYkX4/SWk7xG6dGA2fm2cMszfJT9poMMlG7em +d8ZWKUOnVPFFM/RYs4x91aAycP6VDLZCG5euXqrqrQLyt69LOqObGQE3Flit +ANni93+C0V+53f8bOqgKu9Ri7EvQMhF2tTdc1CB6YCpVVZdLBktFQ9zD1EDO +ZrZtFfr2pzal8cNqcG3/R31DtJ+z/0HNe2pQ8oYuZYMu1Y33OEVXh+QurWgm +2njkMi9Fngbu5+8XXkF7Bi/Wc+zRAJoKHLRdzSUkfit9+28NaB3+u84FrZNW +bMZU1AQ3b3Gh7WiBC0Y2KZs1oVFOojYMXdXpu73mvia8Sy8uz0MLb6vcv6xE +CzbLpPT2o2/bubwdYWiDEwSk5+lxyYUtJz/OpGiDH6flvzPobEZP9/zT2tDo +GaFQjmbu2zOq8lobRH6FdvyLlrpzRmCLrQ5w3ypMjqPDjCZ0GtV14UVSc4iz +PpcoqeWkZvavhtEV3CTpNVxy5+h37Z+CerAj/qSvKtrvm3c7tVIPtntkbdRH +n22madsE6MHfVQEujmi14IZXP97pwavfiYIH0TqVAxrUU33Qa+lVnEErK6lQ +qt4GsEJdcGbYgEtWX4wT+0XokMFuMZ6lcwmDeXBKz5UOalWJe0SN8HtVz+sM +9KPDgbnIB8vQQiXXrj9m00GIkthvie44O+KZV02HvpMqucnojKLAM9rqRsD4 +WPVLyBjXN9NZ30vYGG6OaX1XNOGS8zE095scEzA4obg+zIxL2uKJ2aGLFkC7 +7KQpvZ5LVga8cfUPXw9ppuk5e2y5hPW37qryXgD9pa0ZNEcukR+9LSLPsIGS +8eAtWh5cEme07lOejh24ZUgGe/hg/vG5JzIjG6BBf+LyVwaup02sSPELBxD4 +19J4Jhz3z/ew+5UFm6Dp9drTA/Fc8sNa4VlzqhMkpvEGrA9wyWcBocmenS6w +QUptbCaLSyKXRx3fr+4GScPsT16nuORq6JN7J9Lc4fFwTZX6JS5J+KY4oxu6 +Gc6Xm83G1eD/w9F+W8sOD2D7nE3QvsclFr651gObt8CKoMCssWdc8krxTFiz +kSe4L7q1Zq4Dz5NLB++UrdoKgUfSXnoO4/7q1nF2Fd8Ghr56ue+n8Txo5wXH +j28D9XHdhbKCPGJ0IrfyQvd2oC9RuOGyiEfOzP+mn/fQC/REosWFJXmkznpN +R1q9N/D6GSyQ55Eis6NScxU+0NV2ocBGhUdefLx42OiYL9B2y05fp/HITZd/ +aNH7/MCp02tVmi6PTEZsEYhk+sMuCVvNRkMembLXDpmwDYAPUavUSs14pGz8 +w49Y0x0gGWNR93o9j3idvxjkLxYIJkJR9n62PHKjxmmHUHogbMlVOS69iUcs +lF79zPgZCIXif4SVXXlEvTu442XoTuBmft/7wINH+hfvcvunbycM6w/RY7bz +SFu2a5DDVgbUW43N/M+XRwrYxYv3tDGgX49TFr6DR+40/f0ZtCkITjQZlvUw +eETCD9KNGoIgO7Tn1U0Wj6jKtrxYficIXPYstLyPNuC4KAg3BcHG2vunOWiP +db7l7+8HgbLOF/s+dMHy+KfJ/wWBfHm/rSTFI8s+X5F48j4IQpJ73oWgaQHy +RX4zQTCRdXenbDA+T+BEWZoxEx7db3nmGcIjl07xYl1NmXB/SqzGHy37+quV +vDkTXKbKcyj0xIaZ9jJLJnz4PGTKRpfqCszj2KCVQ01Oo5fMSHlLb2ZCHm10 +sgvdn2WyqDiCCfc+PmUyQ3lkc4tZe3AUExyTumPC0U0Ca4sNdjMh/69FQhz6 +VKyVyYM4nC+6Pu4Q2tXbYedAIhM0GB0Kpeh6mne97lEmXHDWVu5FZzcmhd6+ +xIQTUxbS3mE8EkE/acEuY8K3gYvqgWjn8upF5hVMOBKZoR+MFj05WH6rigm8 +oJsGe9BpMe4jdbVM8KjPHzyOTtKm7br5gAkLHQUVWtBhJ5+G13QyIedtarb+ +Lh7ZtGRwXUw3E/wi5p4Zo1elCYjTe5lw1rVX2BI9GGNSVT3ABLrdENMBvdO1 +ePz6GBNoAS9f7kB7LYiNvDbLBIX2O5E5aIfYZdGVcizQNzWuGUY/KD7smKfA +AtHu8nwueh3nK429jAWqzm4RU2gDjacfbFVYUHdca9G8cB5RfJdo+1GDBZum +Bfrk0aNrP8uJmrDAMuerih06R/Dc3eAtLFi6hVNbiBZdI1bkspUFRuaBp0+j +D/myY4y2s8DaUi7hHJpd667114cFdMkvKyrQO6l5uYX46TGdpMTvoo1aGcxH +u1kQ+MA4ogf9LldjsfpxFvx2srKhRfDIVSIeMpTLAreDZ4a10IfGvzdX5WO+ +FMWjumj6puYU85Ms+NlE1dHR2QJBX13OsmDXIbc7gLaPOveBXckCOTYt2Ret +rHzE1OoqC3Z30esC0N9bo/KFrrPgAfgM7USXaBKX7BssyJH4ZhaC/v35870L +DSxQ5NgfikPXOiuVPX/CgoRmh5eZ6MxZwQUFrSww28I5nY1mlI3s9OawwPAY +tSMXLTm/Qan/BQsqLD6+LESHN3rl/HzLgmb7e0Hn0eo6hfG0ARa4fnK3vIme +fZf8eniQBQG6y07eQrelsQyuDbHAxG16tB6d0mM8YjHGgvzowX1N6I6i1/5u +31iQVnt+ews6T0RqQ8I8CtovMW6/Q9/5+tk3TogCg2TNzg/oL58rYiIXUPCu +ZcOvj+h1tXbnGIso0BcoVOpGDwayfzlKUSAjzf7+hZ/feYP0BhkKjv6f9Jth +tKWZtDZZSsF8M5GqUfRx8cptRooUKIj+seHy2xu6qpVWYv92ZZFpNHWx8slS +dQp6bxwqmeH3P763S0KDgmvxdiY/+fNRMuLztSlIX/4c5vjtMg4hYwYUiDsL +8+ZF8kjDH5nUQToFt0oN7IXQA8PdJ7qNKZjpqsmfj157L+FhuznmOdYkK4Lu +D7+qchcocGzmXl2MXuKVaHLLhsLz8u2/YmgL243O1XYUQIPME3F0tmLv3osb +KXh1Or9JAn17/rXjxY4UbH3+plIS3cdNvHzKmYKbjZF5Umjzx0vfZLlTcIJd +aiuDZlT3jqZ7UNCkZi0hi87655rgAU8KJNcbv+K7N2aTQbwXjk9VtpJDiwfI +OUT7UFB+ROYL3+ab+vzD/CgQebgjXZ4/fkVyZkAgBXtPzFYp8POIOpZ4MSjQ +lt1krMivNyVX78GkIDZ3vJpv8Z6+F84UBRmCQ5rL+PU41wftQyjw9DfP55tx +K/k3hGG9os5pvrNKHGUtwylgXenYrMSvnyWvaxJJgXX26lK+e9n91muiKRiz +aB/nW4xZ7aUdQ4Fc2Uv95Wgzt5Qo9TgK1F7TgvlmrHU6rBxPgWHds0K+j2ko +nJFnU6DnwrnLd53kwA2pBApqClQ/8d3zq7p1cRIFq462TvIt9iWlZ0EKtuu2 +/uHb9JXTj7+pFOiyVwgpo/8fmj/iRg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -9779,106 +10256,105 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1Xk8VN//B3BRlMiaJZEYhIixp5y3JcqeVPY0Zq4lW8h3srZJErIk/fqU +kgpRkRTKp0Xpo6lU2lR2ss+oUFL93vPHfdzH83HOeZ/Xvefce1YyojxYggIC +AuN48e+7n+tr3Wp7bmUwb587exWXWE2UmjDsKonmxg/b+O4uNi2g2d0hvVX9 +oXy7M58Jixk9IpcNSzL4rmanPlxgxyG7X0rV8Z3xWOFeasVLQss04vJd37b7 +7Bz9DQn2FTHZix7paE3a2/ieTFllpfO9bEDdd9r2E5E0fDTItxM3ySKW00Ue +rr7mkYBumhtZzK7oIRtXOz3l++1++cS6yD4Spn3KPRE9IWw38p0+QCaXn+rl +W/hYtLfRzCBZ9ddxfxJaRerMk92NQySn5erqZLSr0vSlCdsx8nYgszwFTZ1T +k9NbOEHOaS1ITEWnaril7eJgHS0D733o9/LthnEVk6RyzWnLA2imT1ho/rGv +ZELlIzmI5v0jcL4m8ht5V8RxP4ReqKYnOUmfIjcmHxYdRhcwHzpILp0mB6r/ +e5GOVr3snbpmZpp03N0nk4E2X314IqLxB2mNF7yfiQ4x7eKM2M4RfX+P2lz0 +d/ae+aKav0nf3m73fPS+xsXrtBf+IaIOK2YL0EVgfiWY85e4FV6NKeLnu/jE +LqZiHvwXLDVXjK54nN+9X0kQqGC1P+f5eb8EJOUeE4SHbn1ipegknakb1yOF +4HBonHsZP++1lepc+gJwPdIWVY3uaBtr+nNhAZSd9H93g5//6y2fJUuFQeDM +Kac6dKWxa57ejDAIC6n4NKKb6xPmhTcuBLUIT4nH6KmHr7uGbMUgZG5bx2e0 +tLOYZGKTGHw4oufRgzZotwNxC3FQCR1+348O6795zlB/CRyzlZQZQ0cLcgzW +i0nC5lmZtb/QA2pXJ9OmpeDW+rsey7Xx/VCti14YSYNbIee2KlrwyuBKhd3S +0OZyV08DrWq0wqNiVBoyG6zt9NE+tsdrnnfLQHD6c3Vr9IugmFj5p0vhZV1t +ZSi683J2ZuBCOZg5VicQhR4brbhQvkEO7DoLguLQonF9ry3vyUHwqYGtqWi7 +Q57GgTflofvps7ET6IZS06myYkX4/SWk7xG6dGA2fm2cMszfJT9poMMlG7em +d8ZWKUOnVPFFM/RYs4x91aAycP6VDLZCG5euXqrqrQLyt69LOqObGQE3Flit +ANni93+C0V+53f8bOqgKu9Ri7EvQMhF2tTdc1CB6YCpVVZdLBktFQ9zD1EDO +ZrZtFfr2pzal8cNqcG3/R31DtJ+z/0HNe2pQ8oYuZYMu1Y33OEVXh+QurWgm +2njkMi9Fngbu5+8XXkF7Bi/Wc+zRAJoKHLRdzSUkfit9+28NaB3+u84FrZNW +bMZU1AQ3b3Gh7WiBC0Y2KZs1oVFOojYMXdXpu73mvia8Sy8uz0MLb6vcv6xE +CzbLpPT2o2/bubwdYWiDEwSk5+lxyYUtJz/OpGiDH6flvzPobEZP9/zT2tDo +GaFQjmbu2zOq8lobRH6FdvyLlrpzRmCLrQ5w3ypMjqPDjCZ0GtV14UVSc4iz +PpcoqeWkZvavhtEV3CTpNVxy5+h37Z+CerAj/qSvKtrvm3c7tVIPtntkbdRH +n22madsE6MHfVQEujmi14IZXP97pwavfiYIH0TqVAxrUU33Qa+lVnEErK6lQ +qt4GsEJdcGbYgEtWX4wT+0XokMFuMZ6lcwmDeXBKz5UOalWJe0SN8HtVz+sM +9KPDgbnIB8vQQiXXrj9m00GIkthvie44O+KZV02HvpMqucnojKLAM9rqRsD4 +WPVLyBjXN9NZ30vYGG6OaX1XNOGS8zE095scEzA4obg+zIxL2uKJ2aGLFkC7 +7KQpvZ5LVga8cfUPXw9ppuk5e2y5hPW37qryXgD9pa0ZNEcukR+9LSLPsIGS +8eAtWh5cEme07lOejh24ZUgGe/hg/vG5JzIjG6BBf+LyVwaup02sSPELBxD4 +19J4Jhz3z/ew+5UFm6Dp9drTA/Fc8sNa4VlzqhMkpvEGrA9wyWcBocmenS6w +QUptbCaLSyKXRx3fr+4GScPsT16nuORq6JN7J9Lc4fFwTZX6JS5J+KY4oxu6 +Gc6Xm83G1eD/w9F+W8sOD2D7nE3QvsclFr651gObt8CKoMCssWdc8krxTFiz +kSe4L7q1Zq4Dz5NLB++UrdoKgUfSXnoO4/7q1nF2Fd8Ghr56ue+n8Txo5wXH +j28D9XHdhbKCPGJ0IrfyQvd2oC9RuOGyiEfOzP+mn/fQC/REosWFJXmkznpN +R1q9N/D6GSyQ55Eis6NScxU+0NV2ocBGhUdefLx42OiYL9B2y05fp/HITZd/ +aNH7/MCp02tVmi6PTEZsEYhk+sMuCVvNRkMembLXDpmwDYAPUavUSs14pGz8 +w49Y0x0gGWNR93o9j3idvxjkLxYIJkJR9n62PHKjxmmHUHogbMlVOS69iUcs +lF79zPgZCIXif4SVXXlEvTu442XoTuBmft/7wINH+hfvcvunbycM6w/RY7bz +SFu2a5DDVgbUW43N/M+XRwrYxYv3tDGgX49TFr6DR+40/f0ZtCkITjQZlvUw +eETCD9KNGoIgO7Tn1U0Wj6jKtrxYficIXPYstLyPNuC4KAg3BcHG2vunOWiP +db7l7+8HgbLOF/s+dMHy+KfJ/wWBfHm/rSTFI8s+X5F48j4IQpJ73oWgaQHy +RX4zQTCRdXenbDA+T+BEWZoxEx7db3nmGcIjl07xYl1NmXB/SqzGHy37+quV +vDkTXKbKcyj0xIaZ9jJLJnz4PGTKRpfqCszj2KCVQ01Oo5fMSHlLb2ZCHm10 +sgvdn2WyqDiCCfc+PmUyQ3lkc4tZe3AUExyTumPC0U0Ca4sNdjMh/69FQhz6 +VKyVyYM4nC+6Pu4Q2tXbYedAIhM0GB0Kpeh6mne97lEmXHDWVu5FZzcmhd6+ +xIQTUxbS3mE8EkE/acEuY8K3gYvqgWjn8upF5hVMOBKZoR+MFj05WH6rigm8 +oJsGe9BpMe4jdbVM8KjPHzyOTtKm7br5gAkLHQUVWtBhJ5+G13QyIedtarb+ +Lh7ZtGRwXUw3E/wi5p4Zo1elCYjTe5lw1rVX2BI9GGNSVT3ABLrdENMBvdO1 +ePz6GBNoAS9f7kB7LYiNvDbLBIX2O5E5aIfYZdGVcizQNzWuGUY/KD7smKfA +AtHu8nwueh3nK429jAWqzm4RU2gDjacfbFVYUHdca9G8cB5RfJdo+1GDBZum +Bfrk0aNrP8uJmrDAMuerih06R/Dc3eAtLFi6hVNbiBZdI1bkspUFRuaBp0+j +D/myY4y2s8DaUi7hHJpd667114cFdMkvKyrQO6l5uYX46TGdpMTvoo1aGcxH +u1kQ+MA4ogf9LldjsfpxFvx2srKhRfDIVSIeMpTLAreDZ4a10IfGvzdX5WO+ +FMWjumj6puYU85Ms+NlE1dHR2QJBX13OsmDXIbc7gLaPOveBXckCOTYt2Ret +rHzE1OoqC3Z30esC0N9bo/KFrrPgAfgM7USXaBKX7BssyJH4ZhaC/v35870L +DSxQ5NgfikPXOiuVPX/CgoRmh5eZ6MxZwQUFrSww28I5nY1mlI3s9OawwPAY +tSMXLTm/Qan/BQsqLD6+LESHN3rl/HzLgmb7e0Hn0eo6hfG0ARa4fnK3vIme +fZf8eniQBQG6y07eQrelsQyuDbHAxG16tB6d0mM8YjHGgvzowX1N6I6i1/5u +31iQVnt+ews6T0RqQ8I8CtovMW6/Q9/5+tk3TogCg2TNzg/oL58rYiIXUPCu +ZcOvj+h1tXbnGIso0BcoVOpGDwayfzlKUSAjzf7+hZ/feYP0BhkKjv6f9Jth +tKWZtDZZSsF8M5GqUfRx8cptRooUKIj+seHy2xu6qpVWYv92ZZFpNHWx8slS +dQp6bxwqmeH3P763S0KDgmvxdiY/+fNRMuLztSlIX/4c5vjtMg4hYwYUiDsL +8+ZF8kjDH5nUQToFt0oN7IXQA8PdJ7qNKZjpqsmfj157L+FhuznmOdYkK4Lu +D7+qchcocGzmXl2MXuKVaHLLhsLz8u2/YmgL243O1XYUQIPME3F0tmLv3osb +KXh1Or9JAn17/rXjxY4UbH3+plIS3cdNvHzKmYKbjZF5Umjzx0vfZLlTcIJd +aiuDZlT3jqZ7UNCkZi0hi87655rgAU8KJNcbv+K7N2aTQbwXjk9VtpJDiwfI +OUT7UFB+ROYL3+ab+vzD/CgQebgjXZ4/fkVyZkAgBXtPzFYp8POIOpZ4MSjQ +lt1krMivNyVX78GkIDZ3vJpv8Z6+F84UBRmCQ5rL+PU41wftQyjw9DfP55tx +K/k3hGG9os5pvrNKHGUtwylgXenYrMSvnyWvaxJJgXX26lK+e9n91muiKRiz +aB/nW4xZ7aUdQ4Fc2Uv95Wgzt5Qo9TgK1F7TgvlmrHU6rBxPgWHds0K+j2ko +nJFnU6DnwrnLd53kwA2pBApqClQ/8d3zq7p1cRIFq462TvIt9iWlZ0EKtuu2 +/uHb9JXTj7+pFOiyVwgpo/8fmj/iRg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "PlotRange" -> {{0, 180}, {0.9736901829019526, + 1.0268831369389868`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.9736901829019547}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -9890,20 +10366,21 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.9736901829019526, + 1.0268831369389868`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.9736901829019547}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -9917,105 +10394,103 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1Xk8VN//B3BRlMiaJZEYhIixp5y3JcqeVPY0Zq4lW8h3srZJErIk/fqU +kgpRkRTKp0Xpo6lU2lR2ss+oUFL93vPHfdzH83HOeZ/Xvefce1YyojxYggIC +AuN48e+7n+tr3Wp7bmUwb587exWXWE2UmjDsKonmxg/b+O4uNi2g2d0hvVX9 +oXy7M58Jixk9IpcNSzL4rmanPlxgxyG7X0rV8Z3xWOFeasVLQss04vJd37b7 +7Bz9DQn2FTHZix7paE3a2/ieTFllpfO9bEDdd9r2E5E0fDTItxM3ySKW00Ue +rr7mkYBumhtZzK7oIRtXOz3l++1++cS6yD4Spn3KPRE9IWw38p0+QCaXn+rl +W/hYtLfRzCBZ9ddxfxJaRerMk92NQySn5erqZLSr0vSlCdsx8nYgszwFTZ1T +k9NbOEHOaS1ITEWnaril7eJgHS0D733o9/LthnEVk6RyzWnLA2imT1ho/rGv +ZELlIzmI5v0jcL4m8ht5V8RxP4ReqKYnOUmfIjcmHxYdRhcwHzpILp0mB6r/ +e5GOVr3snbpmZpp03N0nk4E2X314IqLxB2mNF7yfiQ4x7eKM2M4RfX+P2lz0 +d/ae+aKav0nf3m73fPS+xsXrtBf+IaIOK2YL0EVgfiWY85e4FV6NKeLnu/jE +LqZiHvwXLDVXjK54nN+9X0kQqGC1P+f5eb8EJOUeE4SHbn1ipegknakb1yOF +4HBonHsZP++1lepc+gJwPdIWVY3uaBtr+nNhAZSd9H93g5//6y2fJUuFQeDM +Kac6dKWxa57ejDAIC6n4NKKb6xPmhTcuBLUIT4nH6KmHr7uGbMUgZG5bx2e0 +tLOYZGKTGHw4oufRgzZotwNxC3FQCR1+348O6795zlB/CRyzlZQZQ0cLcgzW +i0nC5lmZtb/QA2pXJ9OmpeDW+rsey7Xx/VCti14YSYNbIee2KlrwyuBKhd3S +0OZyV08DrWq0wqNiVBoyG6zt9NE+tsdrnnfLQHD6c3Vr9IugmFj5p0vhZV1t +ZSi683J2ZuBCOZg5VicQhR4brbhQvkEO7DoLguLQonF9ry3vyUHwqYGtqWi7 +Q57GgTflofvps7ET6IZS06myYkX4/SWk7xG6dGA2fm2cMszfJT9poMMlG7em +d8ZWKUOnVPFFM/RYs4x91aAycP6VDLZCG5euXqrqrQLyt69LOqObGQE3Flit +ANni93+C0V+53f8bOqgKu9Ri7EvQMhF2tTdc1CB6YCpVVZdLBktFQ9zD1EDO +ZrZtFfr2pzal8cNqcG3/R31DtJ+z/0HNe2pQ8oYuZYMu1Y33OEVXh+QurWgm +2njkMi9Fngbu5+8XXkF7Bi/Wc+zRAJoKHLRdzSUkfit9+28NaB3+u84FrZNW +bMZU1AQ3b3Gh7WiBC0Y2KZs1oVFOojYMXdXpu73mvia8Sy8uz0MLb6vcv6xE +CzbLpPT2o2/bubwdYWiDEwSk5+lxyYUtJz/OpGiDH6flvzPobEZP9/zT2tDo +GaFQjmbu2zOq8lobRH6FdvyLlrpzRmCLrQ5w3ypMjqPDjCZ0GtV14UVSc4iz +PpcoqeWkZvavhtEV3CTpNVxy5+h37Z+CerAj/qSvKtrvm3c7tVIPtntkbdRH +n22madsE6MHfVQEujmi14IZXP97pwavfiYIH0TqVAxrUU33Qa+lVnEErK6lQ +qt4GsEJdcGbYgEtWX4wT+0XokMFuMZ6lcwmDeXBKz5UOalWJe0SN8HtVz+sM +9KPDgbnIB8vQQiXXrj9m00GIkthvie44O+KZV02HvpMqucnojKLAM9rqRsD4 +WPVLyBjXN9NZ30vYGG6OaX1XNOGS8zE095scEzA4obg+zIxL2uKJ2aGLFkC7 +7KQpvZ5LVga8cfUPXw9ppuk5e2y5hPW37qryXgD9pa0ZNEcukR+9LSLPsIGS +8eAtWh5cEme07lOejh24ZUgGe/hg/vG5JzIjG6BBf+LyVwaup02sSPELBxD4 +19J4Jhz3z/ew+5UFm6Dp9drTA/Fc8sNa4VlzqhMkpvEGrA9wyWcBocmenS6w +QUptbCaLSyKXRx3fr+4GScPsT16nuORq6JN7J9Lc4fFwTZX6JS5J+KY4oxu6 +Gc6Xm83G1eD/w9F+W8sOD2D7nE3QvsclFr651gObt8CKoMCssWdc8krxTFiz +kSe4L7q1Zq4Dz5NLB++UrdoKgUfSXnoO4/7q1nF2Fd8Ghr56ue+n8Txo5wXH +j28D9XHdhbKCPGJ0IrfyQvd2oC9RuOGyiEfOzP+mn/fQC/REosWFJXmkznpN +R1q9N/D6GSyQ55Eis6NScxU+0NV2ocBGhUdefLx42OiYL9B2y05fp/HITZd/ +aNH7/MCp02tVmi6PTEZsEYhk+sMuCVvNRkMembLXDpmwDYAPUavUSs14pGz8 +w49Y0x0gGWNR93o9j3idvxjkLxYIJkJR9n62PHKjxmmHUHogbMlVOS69iUcs +lF79zPgZCIXif4SVXXlEvTu442XoTuBmft/7wINH+hfvcvunbycM6w/RY7bz +SFu2a5DDVgbUW43N/M+XRwrYxYv3tDGgX49TFr6DR+40/f0ZtCkITjQZlvUw +eETCD9KNGoIgO7Tn1U0Wj6jKtrxYficIXPYstLyPNuC4KAg3BcHG2vunOWiP +db7l7+8HgbLOF/s+dMHy+KfJ/wWBfHm/rSTFI8s+X5F48j4IQpJ73oWgaQHy +RX4zQTCRdXenbDA+T+BEWZoxEx7db3nmGcIjl07xYl1NmXB/SqzGHy37+quV +vDkTXKbKcyj0xIaZ9jJLJnz4PGTKRpfqCszj2KCVQ01Oo5fMSHlLb2ZCHm10 +sgvdn2WyqDiCCfc+PmUyQ3lkc4tZe3AUExyTumPC0U0Ca4sNdjMh/69FQhz6 +VKyVyYM4nC+6Pu4Q2tXbYedAIhM0GB0Kpeh6mne97lEmXHDWVu5FZzcmhd6+ +xIQTUxbS3mE8EkE/acEuY8K3gYvqgWjn8upF5hVMOBKZoR+MFj05WH6rigm8 +oJsGe9BpMe4jdbVM8KjPHzyOTtKm7br5gAkLHQUVWtBhJ5+G13QyIedtarb+ +Lh7ZtGRwXUw3E/wi5p4Zo1elCYjTe5lw1rVX2BI9GGNSVT3ABLrdENMBvdO1 +ePz6GBNoAS9f7kB7LYiNvDbLBIX2O5E5aIfYZdGVcizQNzWuGUY/KD7smKfA +AtHu8nwueh3nK429jAWqzm4RU2gDjacfbFVYUHdca9G8cB5RfJdo+1GDBZum +Bfrk0aNrP8uJmrDAMuerih06R/Dc3eAtLFi6hVNbiBZdI1bkspUFRuaBp0+j +D/myY4y2s8DaUi7hHJpd667114cFdMkvKyrQO6l5uYX46TGdpMTvoo1aGcxH +u1kQ+MA4ogf9LldjsfpxFvx2srKhRfDIVSIeMpTLAreDZ4a10IfGvzdX5WO+ +FMWjumj6puYU85Ms+NlE1dHR2QJBX13OsmDXIbc7gLaPOveBXckCOTYt2Ret +rHzE1OoqC3Z30esC0N9bo/KFrrPgAfgM7USXaBKX7BssyJH4ZhaC/v35870L +DSxQ5NgfikPXOiuVPX/CgoRmh5eZ6MxZwQUFrSww28I5nY1mlI3s9OawwPAY +tSMXLTm/Qan/BQsqLD6+LESHN3rl/HzLgmb7e0Hn0eo6hfG0ARa4fnK3vIme +fZf8eniQBQG6y07eQrelsQyuDbHAxG16tB6d0mM8YjHGgvzowX1N6I6i1/5u +31iQVnt+ews6T0RqQ8I8CtovMW6/Q9/5+tk3TogCg2TNzg/oL58rYiIXUPCu +ZcOvj+h1tXbnGIso0BcoVOpGDwayfzlKUSAjzf7+hZ/feYP0BhkKjv6f9Jth +tKWZtDZZSsF8M5GqUfRx8cptRooUKIj+seHy2xu6qpVWYv92ZZFpNHWx8slS +dQp6bxwqmeH3P763S0KDgmvxdiY/+fNRMuLztSlIX/4c5vjtMg4hYwYUiDsL +8+ZF8kjDH5nUQToFt0oN7IXQA8PdJ7qNKZjpqsmfj157L+FhuznmOdYkK4Lu +D7+qchcocGzmXl2MXuKVaHLLhsLz8u2/YmgL243O1XYUQIPME3F0tmLv3osb +KXh1Or9JAn17/rXjxY4UbH3+plIS3cdNvHzKmYKbjZF5Umjzx0vfZLlTcIJd +aiuDZlT3jqZ7UNCkZi0hi87655rgAU8KJNcbv+K7N2aTQbwXjk9VtpJDiwfI +OUT7UFB+ROYL3+ab+vzD/CgQebgjXZ4/fkVyZkAgBXtPzFYp8POIOpZ4MSjQ +lt1krMivNyVX78GkIDZ3vJpv8Z6+F84UBRmCQ5rL+PU41wftQyjw9DfP55tx +K/k3hGG9os5pvrNKHGUtwylgXenYrMSvnyWvaxJJgXX26lK+e9n91muiKRiz +aB/nW4xZ7aUdQ4Fc2Uv95Wgzt5Qo9TgK1F7TgvlmrHU6rBxPgWHds0K+j2ko +nJFnU6DnwrnLd53kwA2pBApqClQ/8d3zq7p1cRIFq462TvIt9iWlZ0EKtuu2 +/uHb9JXTj7+pFOiyVwgpo/8fmj/iRg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.9736901829019526, 1.0268831369389868`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.9736901829019547}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10025,7 +10500,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.42228371308737755`}, + AxesOrigin->{0, 0.9736901829019547}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10053,7 +10529,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.4222837130873766, 2.103798844286089}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.9736901829019526, 1.0268831369389868`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10061,9 +10538,9 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913411752988663`*^9}, + CellChangeTimes->{3.9913411752988663`*^9, 3.99435535004309*^9}, CellLabel-> - "Out[360]=",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] + "Out[118]=",ExpressionUUID->"6c07ae0a-c207-43ae-bf84-764c88e47d61"] }, Open ]], Cell[CellGroupData[{ @@ -10126,157 +10603,160 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918498397477245`*^9, - 3.9918498435341415`*^9}},ExpressionUUID->"92d458c4-bfde-c447-a06c-\ -70a15768b745"], + CellChangeTimes->{{3.9918498397477245`*^9, 3.9918498435341415`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.939746899581406`*^-267\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 361, - 369, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755393047`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0753553436876005`*^-274\\\", \ +\\\"5919012181389927685417441689600000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 119, 41, + 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994355350253913*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], +In[119]:=",ExpressionUUID->"d82c8068-38da-45bd-9ed0-e419376ee5d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7974258435449576`*^-278\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 361, 370, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755492897`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.15342424028594`*^-288\\\", \ +\\\"2610284371992958109269091785113600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 42, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994355350267336*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], +In[119]:=",ExpressionUUID->"25455b45-3537-415c-8732-8441ed006a54"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.87479384448772`*^-289\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 361, 371, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991341175557289*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.3122824337758937`*^-302\\\", \ +\\\"1263377636044591724886240423994982400000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 43, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994355350278009*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], +In[119]:=",ExpressionUUID->"a2d824ba-fd09-41e2-8835-44fc78ce65cc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 361, 372, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755664787`*^9}, +during this calculation.\"", 2, 119, 44, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.99435535028802*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], +In[119]:=",ExpressionUUID->"87ab7dc7-14f7-4595-b79d-5a7fa93e1d82"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8Ff0XB3APZal4PER27r1zLdmSInGdU7KlKEulBWUvW/YlZSlbSEhZ +o8h271hTRClKqbTJWirq6YmEskXlN78/5jWv9+u+7sz5znzPZw7tiK+1KzcX +Fxf3X9RBnWeHHrUTZ4sNHf+yLspy1DPsLpAI29IXA/4BdjsCTdYAij07ItGX +DgFiJAkmShC8q6KXp+8KdL3C13ImuvDPtzXpP3trYbrAxnDa2BTeNVv6Tvfe +A4HOUotg471gQoy+nep9CeyXCk8zjdzhZ6/uhcneYage6fCWNgiBNqPS4hdX +fkB3uPhUtWgCyLxr/PeI2m9Y2kSraWo6D6u9HCv4jHiwa/qWxX76RUjXMrll +acePdhdkF+db8qD/0rrWKWFB7E85Un+ltxDOFp96xi35DypMlXB/tbsKazJH +EjPyRfF52iaiNb0E4m3NDV/OiuG5skaJc4GlEKBX5PgoRgJTtrZuGNhSDtsm +FsJ9RqRQzKem+Wh9BYSZZa69+1UKU7p8nxQ1VgBZpD4gOiuFj3vFjV/frgAJ +Wye9Rn5pnFnL56f1qAK+3rw/x6MhjUJ6c8W331ZARkxaYHaoNPZlD+9W462E +YTFFn3ZBGUz8+N8aG9tKiDbYfVhqkyza/e0y1vapEswcCr7rbpVFZm2Q9vHR +ShCKGou12yGL424bN0hNVEJe25lraU6yGI8HHB3nK+Hm9qYx3kRZXDx0z75h +BRsm9zGCf/TL4uH51K4sDTY4BM0kPYmQw9JfxV60ADYwL26VGT0jh9fkbUnj +EDZV7zkOX5oc8hXmlrpGsCH8l8rzrcVyKD695u6lWDZciHUQa3wih2M7/qQ9 +zmDDk/Mdl0tk5VEZ6muc69iwmcyuP3lHHjtm+C46TLBhW2/X728P5fHzjiHz +5u9ssORaZur4Uh4/Qvc28Vk2OFv79MMneax4WSp65xcbTCJop6KWK6D39x6J +jwIc8JOfvbpFVQHzkpVGIhgcaHe/PN4WrIA+id7kiA0HzH/piZyIUMBb8gIN +nXs40JXWrbMhSgH/yYxeSdpzoL9RIKo4UQH3Ff0o9HTkwLeVgSJn8hQwVdLv +RP1RDkhUm+ma3FPAgs43atlRHPCan4p6KEhDVWsRm8JyDmw+7ib+rwgNf0pr +jxmzOcA/OlDJI0FDm5SpjZ9JDpQMtvUY0mnoPTv6UaaeA0O3L6hd16GhY11U +ve1tDlid0esrcqRhnPhfEbMvOCD3h+N9x4WG/C46fnu7OfA1mM7z1pOGC/dW +yNf3cCDBY6WGRCAN+VIDKp0GOdBq8TY2NYGGxyaqkuM+cmC9SLRmRA0Nzcv3 +vVs+ywGuszPtlxpouDi1ppw+T62f5+j+hls07DLx36C/wIFjM9Znpu7TcH+H +RLrjHw4U9xGD7gM07HU2DQ3iJUH88sM4Wx46ZiVKevWIkfBTVXhI3Y6O+z5b +cR/XImE2Xypaez8d78fVXV9aT8L030xCz5GOBf9quCRtIOHbD72j2zzpONb/ +vj5Dl4ThW86z+yPpuF4rWSeYRUKnxQ2hhBI6nuxJN4swI6Gj5W5NSgX1+1Db +/CNzEto1n9hmVNGRrcgiV1uQcFv0Q05BIx1Vo2tUC3aSUDu4Qun6UzombfaJ +jbYmIeeYAwzP0FG0xBSSDpBw8a3H8OcFqv6esAvZB0nItAo4M75E1W89u1h8 +iIRU7YTH8wIM1LpZ8avKkYSYxZq9f8sx8HXAxg9ZziSc8m5eWM1goFvef0/j +XEg48e5BvpQyA41r6577u5IQ3DY4wlzPwFtO8dLgTsKxs8v9DEwYeDOMf7Ds +KAkev/8W3WrBwKCt9ilhx0hw85VqMN3FwN/5dw+YeJHgZKP5y3o/A4vPfrbq +9ibBVto+wdOHgdbpEpV3/UjYneKs6hvAwMW31TYBx0mwXPLuCgxloGbGeTma +PwlmIzGro2IYGCtiI3c8gASDSnZhVhYDR/2E3wwHkTCoUHnZOJeBH3bQPh8L +JiE8q7xg+jIDTR5/yJmifCP6Wp51OXU/M9Gl7yEk7Jkrzv2LZCBXeE+1Tyj1 +Pr2u5lTXMvB83bjgZ8rr9xVeEmpmoH/HvSdPw0h48bTgYksrA9+Y92oahJPg +Z5Sf5XWfgXcZ41hKmdTIyezsYuC80XPfgAgSVJZnpsV9YGB7V7joxxMkPAxP +P7fxXwY63M/7qRtJPZ/JtNSPowycYGzMSKBcPJiSvHWaga1/UkbkT5JgtDv5 +7NQ8Ax3NanPdKA8/SEoq/M1A/szVKyooK9TGJ/zhJXBZk9MqpVMk3FGKi+es +JHCyqrbIibJD/um4g8IEnh0Smcyi/Esk9sxKMQIvl+vMP6KcmxB9ukmSQMPf +r5p+Ut7851SspxyBHjuLNilGkdAXcDJGgkHgzQt2/laUQ76ciO5QIpBmX+YR +RFncMSIqWI3ArKLdMpcoX+8OO8XUIrBlSSD1BmXb7aEnuzcSmJeUdPsV5R93 +giNjNxO4510y+ZVy+sagE+uBwCcKjx24o0nQqgyI+GBEoM3c0rPVlJ8r+Ien +mRHonvYvN0HZJ8svDHZS/y/YPK9JWXCVb+i33QTO7b1ZvYkyO9o7JH8Pgdah +MuqGlLfPHQvecYC6niHhg5S/eB0NWnQk8IRXSiBQThj2CKxwITDDTHyLPmWl +fe4B9p4Ebs+N7Nam/OCpqz+/D4E81TGaKpRdjVyO3/An0MX2k7U05WWNR/zc +QgiU6XOFFZSvahz2FTtBYNyq+zMz1Pq2Fjv6tEcR6LCtPXiI8ntJB++AMwT6 +2zDb2iifOnfQi55E4JbUisESynLLDxx7kUrgg0fid09Tbg63PxqVQSDvAfVA +J8oLrns8hvIITN/taSJEOXvQ1j2liMD8oTXu76n3t2m3jZvBNQIthGP3VVEO +NtjlklNF4At6abURZbFaS2fzegJPy49LCFCuV9p5ZP4mgQNzAnaPqf00JbLd +ac89Asd6PluYUO7zoj8/2kFd/+HFwXlqf7Y+WIBTTwj8h7ukrpRyWnilfFkP +gR873+ICtb9Du2PPNQ9S+2Gb0Hw+ZSeNg0vP3xN4p79kkUV53fCqdz9HCQwJ +kf7qT/WHhMEnS6FJAhsbeAb5KHNltdymz1D1RLpLZVP99Mzcp8BiiUAFs5bU +aqr/fGqeHcoXZWLz7fijdf/v35VlT2skmLg9S31hLWVD1yjWA1kmqshcHC6g ++l1QUkt2QomJNlGf7kZQ+cCOSn+DBkxc4fSpV4DKj8yBozvstjCxYFjSwoXK +lxMbjJo9TZi4WjFW/haVPxb//chN38XEXR6bJg9R+TRqZXfgowsTDYc1rUKp +/HpZrv543pOJwiL8o9epfGvi4dUX9GXiluXktwkq/xJvNEjphDFxz4FbevZU +PirLSwzEpzAxsdxthovKT/dvA/tUG5hIv7DzZwmVx5ZmdQ/hFhP/2GXWVziQ +oHPl7CbbViZeb7Acq6Tym3ePgURkJxPX7Mt7dpXK+2st+b1dQ0zk01PP8NxL +wsdkpz3+fIpocit9maUl9bxG1ejrVikis2EhVZP6fsyZ/hwfF1ZEq6oSCaEd +JKzgST/jKaWIXOwE9XvU92ddWFu9k7oifjeeDeE1JiHSVVHUykYRJc8fduHS +p/rd8Osz1cuKuNl7fG8rQUJh7s3cL1cVsbHJpMSIQeXdz9PupWWKKPrXA+F2 +GpXP9bJL9FpFfJagZtIsR4LzWisNqfuKmBXuYZIkQUK1eG0y/5gi9jsbnchf +SYL5RIj5Jx0lvGtq+rR0ggMyWnJx/AZKWK3fZls+Ts0r/u33VLcoYS8vT2Hp +GAcyZ4UN/C2U8GGLcHzOZ2re+F2useSohA5XrZrt33HAf9UbUclEJTzHr/DV +sIsDOSo4tGNQCflUd7VwqHnG69i/Un7vlVDPvWD39lIOACd5b8YnJRTUyuge +KebAx3X9z/snlBCiP1cKFnJAY5N/m9syZRSIOf/AIIsDbSbFZVHqyqhKf/lO +IIaaX5z5A+pPKePYeIeN516q3oJtLXdOK+PQ9KJlnS0HJvqj+B4nKuOV9qlT +C7s58N3qZ+6HDGXUYoQmRO3gwJz+aLtQmTLWRNrZH9vCAe7VT8Q9nyujYZWH +YstaDki2n2uSpamgUUnam/2L1HxIrOGOv6eCDitH5jsz2fDliGmZfocK6rnt +mL12ng3JRSGWk49VsCd9+kVUKhteyfXl2L9WQVruaWWNBDY4SWZrq/2ngtNv +0d+Xmm/DhKRdXwiuRb7TYUEph9nAnpd7KG2/Fl/u1FYFNTaIPFVMrZ5Yi9qJ +u5iNtypBJqFql46OGr5d9I4UqqqAS6p6wqLu6rhvfXHadHY5dEpt2fjjvAbm +xq8Q2x9cBptl7qVp9mjigeoeozblUhDiuRJ4OGYdnpRB9f5PJSAXLW9gr6iF +Pud27RGJKgYB5sEG6w4tXDA6HhkpexU0WJJVIYfWY16TiN3JV0XgPyTStp1L +G+Nr2fQV/oUw8SPZzvySNi6VrFu9z6EATDUf5Jirb8Co1hJZu7lcuP1Df3Gu +awNmqkffzw7MBh+19QMvXDeiqNOLOh/di8D65tJtL6CDrT9asn99yQRjQmKn +4BUd7J94y3t+JB2Uo5JC7+nqIsfAuO0873lY66p3hzmgixb0d3LvzVPB9bbH +6frjm9Di65Ep1xVn4U5ht8uUmB5meKaL23fFw3TZ0pzmDT30NOjxZH85Dc7M +SoGcnZvRVkdVTC8oBqbWZujUTm7GzoNVkYKCUXCzePHDTII+hqYzun//fQL2 +b2OgvpwBMpdrt0xHhYK0d3yjRqsB3pZS4F4pHARiK7xqdu5l4YFLI0lluv5Q +bBQZPmnPwprftz0aVP1hfWSqUcZBFk5mBt7plPcHy8nq132HWXiurv4pL78/ +xPXM/HT2YmHxjzCVJ33HYf7Kqa3h0Sxc0v3ekhhxHAb0M15dq2Rhf+suxzv3 +/cAjqDjPnGThgFFk8cUmP5glr7t+rWahq9346uAqPxCh981pNbBQ4+k3b+Ns +P7Dgl5VpaWVhXsi7ZnVvP2juvuby6jV1v1e2tXRxP9gudFM9uI+FGYJbkw6u +9IM+00ezEoMsrP5v2C2Pyw+mm8YSHN6z8Ob0NvODPb6gXrSO82WUhVWv696u +j/aF5oEtwcnjLPyiaWrN6+UL21fbgOYkC/UF+8s/7fEFt/igF4EzLFSNffKt +Q80XplvjctbMU+t3yn7ZucYXYhYuOjctsHDTTv24fm5fEN5QrnboNwtXyH5Z +Nj3uAwXeTTNLSyzUVhgwl+r3gf8Bl7piKg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10290,116 +10770,115 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV1nk8Ff0XB3APZal4PER27r1zLdmSInGdU7KlKEulBWUvW/YlZSlbSEhZ +o8h271hTRClKqbTJWirq6YmEskXlN78/5jWv9+u+7sz5znzPZw7tiK+1KzcX +Fxf3X9RBnWeHHrUTZ4sNHf+yLspy1DPsLpAI29IXA/4BdjsCTdYAij07ItGX +DgFiJAkmShC8q6KXp+8KdL3C13ImuvDPtzXpP3trYbrAxnDa2BTeNVv6Tvfe +A4HOUotg471gQoy+nep9CeyXCk8zjdzhZ6/uhcneYage6fCWNgiBNqPS4hdX +fkB3uPhUtWgCyLxr/PeI2m9Y2kSraWo6D6u9HCv4jHiwa/qWxX76RUjXMrll +acePdhdkF+db8qD/0rrWKWFB7E85Un+ltxDOFp96xi35DypMlXB/tbsKazJH +EjPyRfF52iaiNb0E4m3NDV/OiuG5skaJc4GlEKBX5PgoRgJTtrZuGNhSDtsm +FsJ9RqRQzKem+Wh9BYSZZa69+1UKU7p8nxQ1VgBZpD4gOiuFj3vFjV/frgAJ +Wye9Rn5pnFnL56f1qAK+3rw/x6MhjUJ6c8W331ZARkxaYHaoNPZlD+9W462E +YTFFn3ZBGUz8+N8aG9tKiDbYfVhqkyza/e0y1vapEswcCr7rbpVFZm2Q9vHR +ShCKGou12yGL424bN0hNVEJe25lraU6yGI8HHB3nK+Hm9qYx3kRZXDx0z75h +BRsm9zGCf/TL4uH51K4sDTY4BM0kPYmQw9JfxV60ADYwL26VGT0jh9fkbUnj +EDZV7zkOX5oc8hXmlrpGsCH8l8rzrcVyKD695u6lWDZciHUQa3wih2M7/qQ9 +zmDDk/Mdl0tk5VEZ6muc69iwmcyuP3lHHjtm+C46TLBhW2/X728P5fHzjiHz +5u9ssORaZur4Uh4/Qvc28Vk2OFv79MMneax4WSp65xcbTCJop6KWK6D39x6J +jwIc8JOfvbpFVQHzkpVGIhgcaHe/PN4WrIA+id7kiA0HzH/piZyIUMBb8gIN +nXs40JXWrbMhSgH/yYxeSdpzoL9RIKo4UQH3Ff0o9HTkwLeVgSJn8hQwVdLv +RP1RDkhUm+ma3FPAgs43atlRHPCan4p6KEhDVWsRm8JyDmw+7ib+rwgNf0pr +jxmzOcA/OlDJI0FDm5SpjZ9JDpQMtvUY0mnoPTv6UaaeA0O3L6hd16GhY11U +ve1tDlid0esrcqRhnPhfEbMvOCD3h+N9x4WG/C46fnu7OfA1mM7z1pOGC/dW +yNf3cCDBY6WGRCAN+VIDKp0GOdBq8TY2NYGGxyaqkuM+cmC9SLRmRA0Nzcv3 +vVs+ywGuszPtlxpouDi1ppw+T62f5+j+hls07DLx36C/wIFjM9Znpu7TcH+H +RLrjHw4U9xGD7gM07HU2DQ3iJUH88sM4Wx46ZiVKevWIkfBTVXhI3Y6O+z5b +cR/XImE2Xypaez8d78fVXV9aT8L030xCz5GOBf9quCRtIOHbD72j2zzpONb/ +vj5Dl4ThW86z+yPpuF4rWSeYRUKnxQ2hhBI6nuxJN4swI6Gj5W5NSgX1+1Db +/CNzEto1n9hmVNGRrcgiV1uQcFv0Q05BIx1Vo2tUC3aSUDu4Qun6UzombfaJ +jbYmIeeYAwzP0FG0xBSSDpBw8a3H8OcFqv6esAvZB0nItAo4M75E1W89u1h8 +iIRU7YTH8wIM1LpZ8avKkYSYxZq9f8sx8HXAxg9ZziSc8m5eWM1goFvef0/j +XEg48e5BvpQyA41r6577u5IQ3DY4wlzPwFtO8dLgTsKxs8v9DEwYeDOMf7Ds +KAkev/8W3WrBwKCt9ilhx0hw85VqMN3FwN/5dw+YeJHgZKP5y3o/A4vPfrbq +9ibBVto+wdOHgdbpEpV3/UjYneKs6hvAwMW31TYBx0mwXPLuCgxloGbGeTma +PwlmIzGro2IYGCtiI3c8gASDSnZhVhYDR/2E3wwHkTCoUHnZOJeBH3bQPh8L +JiE8q7xg+jIDTR5/yJmifCP6Wp51OXU/M9Gl7yEk7Jkrzv2LZCBXeE+1Tyj1 +Pr2u5lTXMvB83bjgZ8rr9xVeEmpmoH/HvSdPw0h48bTgYksrA9+Y92oahJPg +Z5Sf5XWfgXcZ41hKmdTIyezsYuC80XPfgAgSVJZnpsV9YGB7V7joxxMkPAxP +P7fxXwY63M/7qRtJPZ/JtNSPowycYGzMSKBcPJiSvHWaga1/UkbkT5JgtDv5 +7NQ8Ax3NanPdKA8/SEoq/M1A/szVKyooK9TGJ/zhJXBZk9MqpVMk3FGKi+es +JHCyqrbIibJD/um4g8IEnh0Smcyi/Esk9sxKMQIvl+vMP6KcmxB9ukmSQMPf +r5p+Ut7851SspxyBHjuLNilGkdAXcDJGgkHgzQt2/laUQ76ciO5QIpBmX+YR +RFncMSIqWI3ArKLdMpcoX+8OO8XUIrBlSSD1BmXb7aEnuzcSmJeUdPsV5R93 +giNjNxO4510y+ZVy+sagE+uBwCcKjx24o0nQqgyI+GBEoM3c0rPVlJ8r+Ien +mRHonvYvN0HZJ8svDHZS/y/YPK9JWXCVb+i33QTO7b1ZvYkyO9o7JH8Pgdah +MuqGlLfPHQvecYC6niHhg5S/eB0NWnQk8IRXSiBQThj2CKxwITDDTHyLPmWl +fe4B9p4Ebs+N7Nam/OCpqz+/D4E81TGaKpRdjVyO3/An0MX2k7U05WWNR/zc +QgiU6XOFFZSvahz2FTtBYNyq+zMz1Pq2Fjv6tEcR6LCtPXiI8ntJB++AMwT6 +2zDb2iifOnfQi55E4JbUisESynLLDxx7kUrgg0fid09Tbg63PxqVQSDvAfVA +J8oLrns8hvIITN/taSJEOXvQ1j2liMD8oTXu76n3t2m3jZvBNQIthGP3VVEO +NtjlklNF4At6abURZbFaS2fzegJPy49LCFCuV9p5ZP4mgQNzAnaPqf00JbLd +ac89Asd6PluYUO7zoj8/2kFd/+HFwXlqf7Y+WIBTTwj8h7ukrpRyWnilfFkP +gR873+ICtb9Du2PPNQ9S+2Gb0Hw+ZSeNg0vP3xN4p79kkUV53fCqdz9HCQwJ +kf7qT/WHhMEnS6FJAhsbeAb5KHNltdymz1D1RLpLZVP99Mzcp8BiiUAFs5bU +aqr/fGqeHcoXZWLz7fijdf/v35VlT2skmLg9S31hLWVD1yjWA1kmqshcHC6g ++l1QUkt2QomJNlGf7kZQ+cCOSn+DBkxc4fSpV4DKj8yBozvstjCxYFjSwoXK +lxMbjJo9TZi4WjFW/haVPxb//chN38XEXR6bJg9R+TRqZXfgowsTDYc1rUKp +/HpZrv543pOJwiL8o9epfGvi4dUX9GXiluXktwkq/xJvNEjphDFxz4FbevZU +PirLSwzEpzAxsdxthovKT/dvA/tUG5hIv7DzZwmVx5ZmdQ/hFhP/2GXWVziQ +oHPl7CbbViZeb7Acq6Tym3ePgURkJxPX7Mt7dpXK+2st+b1dQ0zk01PP8NxL +wsdkpz3+fIpocit9maUl9bxG1ejrVikis2EhVZP6fsyZ/hwfF1ZEq6oSCaEd +JKzgST/jKaWIXOwE9XvU92ddWFu9k7oifjeeDeE1JiHSVVHUykYRJc8fduHS +p/rd8Osz1cuKuNl7fG8rQUJh7s3cL1cVsbHJpMSIQeXdz9PupWWKKPrXA+F2 +GpXP9bJL9FpFfJagZtIsR4LzWisNqfuKmBXuYZIkQUK1eG0y/5gi9jsbnchf +SYL5RIj5Jx0lvGtq+rR0ggMyWnJx/AZKWK3fZls+Ts0r/u33VLcoYS8vT2Hp +GAcyZ4UN/C2U8GGLcHzOZ2re+F2useSohA5XrZrt33HAf9UbUclEJTzHr/DV +sIsDOSo4tGNQCflUd7VwqHnG69i/Un7vlVDPvWD39lIOACd5b8YnJRTUyuge +KebAx3X9z/snlBCiP1cKFnJAY5N/m9syZRSIOf/AIIsDbSbFZVHqyqhKf/lO +IIaaX5z5A+pPKePYeIeN516q3oJtLXdOK+PQ9KJlnS0HJvqj+B4nKuOV9qlT +C7s58N3qZ+6HDGXUYoQmRO3gwJz+aLtQmTLWRNrZH9vCAe7VT8Q9nyujYZWH +YstaDki2n2uSpamgUUnam/2L1HxIrOGOv6eCDitH5jsz2fDliGmZfocK6rnt +mL12ng3JRSGWk49VsCd9+kVUKhteyfXl2L9WQVruaWWNBDY4SWZrq/2ngtNv +0d+Xmm/DhKRdXwiuRb7TYUEph9nAnpd7KG2/Fl/u1FYFNTaIPFVMrZ5Yi9qJ +u5iNtypBJqFql46OGr5d9I4UqqqAS6p6wqLu6rhvfXHadHY5dEpt2fjjvAbm +xq8Q2x9cBptl7qVp9mjigeoeozblUhDiuRJ4OGYdnpRB9f5PJSAXLW9gr6iF +Pud27RGJKgYB5sEG6w4tXDA6HhkpexU0WJJVIYfWY16TiN3JV0XgPyTStp1L +G+Nr2fQV/oUw8SPZzvySNi6VrFu9z6EATDUf5Jirb8Co1hJZu7lcuP1Df3Gu +awNmqkffzw7MBh+19QMvXDeiqNOLOh/di8D65tJtL6CDrT9asn99yQRjQmKn +4BUd7J94y3t+JB2Uo5JC7+nqIsfAuO0873lY66p3hzmgixb0d3LvzVPB9bbH +6frjm9Di65Ep1xVn4U5ht8uUmB5meKaL23fFw3TZ0pzmDT30NOjxZH85Dc7M +SoGcnZvRVkdVTC8oBqbWZujUTm7GzoNVkYKCUXCzePHDTII+hqYzun//fQL2 +b2OgvpwBMpdrt0xHhYK0d3yjRqsB3pZS4F4pHARiK7xqdu5l4YFLI0lluv5Q +bBQZPmnPwprftz0aVP1hfWSqUcZBFk5mBt7plPcHy8nq132HWXiurv4pL78/ +xPXM/HT2YmHxjzCVJ33HYf7Kqa3h0Sxc0v3ekhhxHAb0M15dq2Rhf+suxzv3 +/cAjqDjPnGThgFFk8cUmP5glr7t+rWahq9346uAqPxCh981pNbBQ4+k3b+Ns +P7Dgl5VpaWVhXsi7ZnVvP2juvuby6jV1v1e2tXRxP9gudFM9uI+FGYJbkw6u +9IM+00ezEoMsrP5v2C2Pyw+mm8YSHN6z8Ob0NvODPb6gXrSO82WUhVWv696u +j/aF5oEtwcnjLPyiaWrN6+UL21fbgOYkC/UF+8s/7fEFt/igF4EzLFSNffKt +Q80XplvjctbMU+t3yn7ZucYXYhYuOjctsHDTTv24fm5fEN5QrnboNwtXyH5Z +Nj3uAwXeTTNLSyzUVhgwl+r3gf8Bl7piKg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.05957986206533108}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10411,19 +10890,19 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.05957986206533108}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10437,115 +10916,114 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV1nk8Ff0XB3APZal4PER27r1zLdmSInGdU7KlKEulBWUvW/YlZSlbSEhZ +o8h271hTRClKqbTJWirq6YmEskXlN78/5jWv9+u+7sz5znzPZw7tiK+1KzcX +Fxf3X9RBnWeHHrUTZ4sNHf+yLspy1DPsLpAI29IXA/4BdjsCTdYAij07ItGX +DgFiJAkmShC8q6KXp+8KdL3C13ImuvDPtzXpP3trYbrAxnDa2BTeNVv6Tvfe +A4HOUotg471gQoy+nep9CeyXCk8zjdzhZ6/uhcneYage6fCWNgiBNqPS4hdX +fkB3uPhUtWgCyLxr/PeI2m9Y2kSraWo6D6u9HCv4jHiwa/qWxX76RUjXMrll +acePdhdkF+db8qD/0rrWKWFB7E85Un+ltxDOFp96xi35DypMlXB/tbsKazJH +EjPyRfF52iaiNb0E4m3NDV/OiuG5skaJc4GlEKBX5PgoRgJTtrZuGNhSDtsm +FsJ9RqRQzKem+Wh9BYSZZa69+1UKU7p8nxQ1VgBZpD4gOiuFj3vFjV/frgAJ +Wye9Rn5pnFnL56f1qAK+3rw/x6MhjUJ6c8W331ZARkxaYHaoNPZlD+9W462E +YTFFn3ZBGUz8+N8aG9tKiDbYfVhqkyza/e0y1vapEswcCr7rbpVFZm2Q9vHR +ShCKGou12yGL424bN0hNVEJe25lraU6yGI8HHB3nK+Hm9qYx3kRZXDx0z75h +BRsm9zGCf/TL4uH51K4sDTY4BM0kPYmQw9JfxV60ADYwL26VGT0jh9fkbUnj +EDZV7zkOX5oc8hXmlrpGsCH8l8rzrcVyKD695u6lWDZciHUQa3wih2M7/qQ9 +zmDDk/Mdl0tk5VEZ6muc69iwmcyuP3lHHjtm+C46TLBhW2/X728P5fHzjiHz +5u9ssORaZur4Uh4/Qvc28Vk2OFv79MMneax4WSp65xcbTCJop6KWK6D39x6J +jwIc8JOfvbpFVQHzkpVGIhgcaHe/PN4WrIA+id7kiA0HzH/piZyIUMBb8gIN +nXs40JXWrbMhSgH/yYxeSdpzoL9RIKo4UQH3Ff0o9HTkwLeVgSJn8hQwVdLv +RP1RDkhUm+ma3FPAgs43atlRHPCan4p6KEhDVWsRm8JyDmw+7ib+rwgNf0pr +jxmzOcA/OlDJI0FDm5SpjZ9JDpQMtvUY0mnoPTv6UaaeA0O3L6hd16GhY11U +ve1tDlid0esrcqRhnPhfEbMvOCD3h+N9x4WG/C46fnu7OfA1mM7z1pOGC/dW +yNf3cCDBY6WGRCAN+VIDKp0GOdBq8TY2NYGGxyaqkuM+cmC9SLRmRA0Nzcv3 +vVs+ywGuszPtlxpouDi1ppw+T62f5+j+hls07DLx36C/wIFjM9Znpu7TcH+H +RLrjHw4U9xGD7gM07HU2DQ3iJUH88sM4Wx46ZiVKevWIkfBTVXhI3Y6O+z5b +cR/XImE2Xypaez8d78fVXV9aT8L030xCz5GOBf9quCRtIOHbD72j2zzpONb/ +vj5Dl4ThW86z+yPpuF4rWSeYRUKnxQ2hhBI6nuxJN4swI6Gj5W5NSgX1+1Db +/CNzEto1n9hmVNGRrcgiV1uQcFv0Q05BIx1Vo2tUC3aSUDu4Qun6UzombfaJ +jbYmIeeYAwzP0FG0xBSSDpBw8a3H8OcFqv6esAvZB0nItAo4M75E1W89u1h8 +iIRU7YTH8wIM1LpZ8avKkYSYxZq9f8sx8HXAxg9ZziSc8m5eWM1goFvef0/j +XEg48e5BvpQyA41r6577u5IQ3DY4wlzPwFtO8dLgTsKxs8v9DEwYeDOMf7Ds +KAkev/8W3WrBwKCt9ilhx0hw85VqMN3FwN/5dw+YeJHgZKP5y3o/A4vPfrbq +9ibBVto+wdOHgdbpEpV3/UjYneKs6hvAwMW31TYBx0mwXPLuCgxloGbGeTma +PwlmIzGro2IYGCtiI3c8gASDSnZhVhYDR/2E3wwHkTCoUHnZOJeBH3bQPh8L +JiE8q7xg+jIDTR5/yJmifCP6Wp51OXU/M9Gl7yEk7Jkrzv2LZCBXeE+1Tyj1 +Pr2u5lTXMvB83bjgZ8rr9xVeEmpmoH/HvSdPw0h48bTgYksrA9+Y92oahJPg +Z5Sf5XWfgXcZ41hKmdTIyezsYuC80XPfgAgSVJZnpsV9YGB7V7joxxMkPAxP +P7fxXwY63M/7qRtJPZ/JtNSPowycYGzMSKBcPJiSvHWaga1/UkbkT5JgtDv5 +7NQ8Ax3NanPdKA8/SEoq/M1A/szVKyooK9TGJ/zhJXBZk9MqpVMk3FGKi+es +JHCyqrbIibJD/um4g8IEnh0Smcyi/Esk9sxKMQIvl+vMP6KcmxB9ukmSQMPf +r5p+Ut7851SspxyBHjuLNilGkdAXcDJGgkHgzQt2/laUQ76ciO5QIpBmX+YR +RFncMSIqWI3ArKLdMpcoX+8OO8XUIrBlSSD1BmXb7aEnuzcSmJeUdPsV5R93 +giNjNxO4510y+ZVy+sagE+uBwCcKjx24o0nQqgyI+GBEoM3c0rPVlJ8r+Ien +mRHonvYvN0HZJ8svDHZS/y/YPK9JWXCVb+i33QTO7b1ZvYkyO9o7JH8Pgdah +MuqGlLfPHQvecYC6niHhg5S/eB0NWnQk8IRXSiBQThj2CKxwITDDTHyLPmWl +fe4B9p4Ebs+N7Nam/OCpqz+/D4E81TGaKpRdjVyO3/An0MX2k7U05WWNR/zc +QgiU6XOFFZSvahz2FTtBYNyq+zMz1Pq2Fjv6tEcR6LCtPXiI8ntJB++AMwT6 +2zDb2iifOnfQi55E4JbUisESynLLDxx7kUrgg0fid09Tbg63PxqVQSDvAfVA +J8oLrns8hvIITN/taSJEOXvQ1j2liMD8oTXu76n3t2m3jZvBNQIthGP3VVEO +NtjlklNF4At6abURZbFaS2fzegJPy49LCFCuV9p5ZP4mgQNzAnaPqf00JbLd +ac89Asd6PluYUO7zoj8/2kFd/+HFwXlqf7Y+WIBTTwj8h7ukrpRyWnilfFkP +gR873+ICtb9Du2PPNQ9S+2Gb0Hw+ZSeNg0vP3xN4p79kkUV53fCqdz9HCQwJ +kf7qT/WHhMEnS6FJAhsbeAb5KHNltdymz1D1RLpLZVP99Mzcp8BiiUAFs5bU +aqr/fGqeHcoXZWLz7fijdf/v35VlT2skmLg9S31hLWVD1yjWA1kmqshcHC6g ++l1QUkt2QomJNlGf7kZQ+cCOSn+DBkxc4fSpV4DKj8yBozvstjCxYFjSwoXK +lxMbjJo9TZi4WjFW/haVPxb//chN38XEXR6bJg9R+TRqZXfgowsTDYc1rUKp +/HpZrv543pOJwiL8o9epfGvi4dUX9GXiluXktwkq/xJvNEjphDFxz4FbevZU +PirLSwzEpzAxsdxthovKT/dvA/tUG5hIv7DzZwmVx5ZmdQ/hFhP/2GXWVziQ +oHPl7CbbViZeb7Acq6Tym3ePgURkJxPX7Mt7dpXK+2st+b1dQ0zk01PP8NxL +wsdkpz3+fIpocit9maUl9bxG1ejrVikis2EhVZP6fsyZ/hwfF1ZEq6oSCaEd +JKzgST/jKaWIXOwE9XvU92ddWFu9k7oifjeeDeE1JiHSVVHUykYRJc8fduHS +p/rd8Osz1cuKuNl7fG8rQUJh7s3cL1cVsbHJpMSIQeXdz9PupWWKKPrXA+F2 +GpXP9bJL9FpFfJagZtIsR4LzWisNqfuKmBXuYZIkQUK1eG0y/5gi9jsbnchf +SYL5RIj5Jx0lvGtq+rR0ggMyWnJx/AZKWK3fZls+Ts0r/u33VLcoYS8vT2Hp +GAcyZ4UN/C2U8GGLcHzOZ2re+F2useSohA5XrZrt33HAf9UbUclEJTzHr/DV +sIsDOSo4tGNQCflUd7VwqHnG69i/Un7vlVDPvWD39lIOACd5b8YnJRTUyuge +KebAx3X9z/snlBCiP1cKFnJAY5N/m9syZRSIOf/AIIsDbSbFZVHqyqhKf/lO +IIaaX5z5A+pPKePYeIeN516q3oJtLXdOK+PQ9KJlnS0HJvqj+B4nKuOV9qlT +C7s58N3qZ+6HDGXUYoQmRO3gwJz+aLtQmTLWRNrZH9vCAe7VT8Q9nyujYZWH +YstaDki2n2uSpamgUUnam/2L1HxIrOGOv6eCDitH5jsz2fDliGmZfocK6rnt +mL12ng3JRSGWk49VsCd9+kVUKhteyfXl2L9WQVruaWWNBDY4SWZrq/2ngtNv +0d+Xmm/DhKRdXwiuRb7TYUEph9nAnpd7KG2/Fl/u1FYFNTaIPFVMrZ5Yi9qJ +u5iNtypBJqFql46OGr5d9I4UqqqAS6p6wqLu6rhvfXHadHY5dEpt2fjjvAbm +xq8Q2x9cBptl7qVp9mjigeoeozblUhDiuRJ4OGYdnpRB9f5PJSAXLW9gr6iF +Pud27RGJKgYB5sEG6w4tXDA6HhkpexU0WJJVIYfWY16TiN3JV0XgPyTStp1L +G+Nr2fQV/oUw8SPZzvySNi6VrFu9z6EATDUf5Jirb8Co1hJZu7lcuP1Df3Gu +awNmqkffzw7MBh+19QMvXDeiqNOLOh/di8D65tJtL6CDrT9asn99yQRjQmKn +4BUd7J94y3t+JB2Uo5JC7+nqIsfAuO0873lY66p3hzmgixb0d3LvzVPB9bbH +6frjm9Di65Ep1xVn4U5ht8uUmB5meKaL23fFw3TZ0pzmDT30NOjxZH85Dc7M +SoGcnZvRVkdVTC8oBqbWZujUTm7GzoNVkYKCUXCzePHDTII+hqYzun//fQL2 +b2OgvpwBMpdrt0xHhYK0d3yjRqsB3pZS4F4pHARiK7xqdu5l4YFLI0lluv5Q +bBQZPmnPwprftz0aVP1hfWSqUcZBFk5mBt7plPcHy8nq132HWXiurv4pL78/ +xPXM/HT2YmHxjzCVJ33HYf7Kqa3h0Sxc0v3ekhhxHAb0M15dq2Rhf+suxzv3 +/cAjqDjPnGThgFFk8cUmP5glr7t+rWahq9346uAqPxCh981pNbBQ4+k3b+Ns +P7Dgl5VpaWVhXsi7ZnVvP2juvuby6jV1v1e2tXRxP9gudFM9uI+FGYJbkw6u +9IM+00ezEoMsrP5v2C2Pyw+mm8YSHN6z8Ob0NvODPb6gXrSO82WUhVWv696u +j/aF5oEtwcnjLPyiaWrN6+UL21fbgOYkC/UF+8s/7fEFt/igF4EzLFSNffKt +Q80XplvjctbMU+t3yn7ZucYXYhYuOjctsHDTTv24fm5fEN5QrnboNwtXyH5Z +Nj3uAwXeTTNLSyzUVhgwl+r3gf8Bl7piKg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.05957986206533108}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10556,6 +11034,7 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10583,7 +11062,8 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1261051971575712}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.05957986206533108}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10591,17 +11071,565 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913414579436264`*^9}, + CellChangeTimes->{3.9913414579436264`*^9, 3.994355760611054*^9}, CellLabel-> - "Out[361]=",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] + "Out[119]=",ExpressionUUID->"5731e5f1-38c5-4e74-96c5-70e841cbf049"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"e1c8585a-8b57-f841-82e1-\ -8e8787fb2589"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8Ff0XB3APZal4PER27r1zLdmSInGdU7KlKEulBWUvW/YlZSlbSEhZ +o8h271hTRClKqbTJWirq6YmEskXlN78/5jWv9+u+7sz5znzPZw7tiK+1KzcX +Fxf3X9RBnWeHHrUTZ4sNHf+yLspy1DPsLpAI29IXA/4BdjsCTdYAij07ItGX +DgFiJAkmShC8q6KXp+8KdL3C13ImuvDPtzXpP3trYbrAxnDa2BTeNVv6Tvfe +A4HOUotg471gQoy+nep9CeyXCk8zjdzhZ6/uhcneYage6fCWNgiBNqPS4hdX +fkB3uPhUtWgCyLxr/PeI2m9Y2kSraWo6D6u9HCv4jHiwa/qWxX76RUjXMrll +acePdhdkF+db8qD/0rrWKWFB7E85Un+ltxDOFp96xi35DypMlXB/tbsKazJH +EjPyRfF52iaiNb0E4m3NDV/OiuG5skaJc4GlEKBX5PgoRgJTtrZuGNhSDtsm +FsJ9RqRQzKem+Wh9BYSZZa69+1UKU7p8nxQ1VgBZpD4gOiuFj3vFjV/frgAJ +Wye9Rn5pnFnL56f1qAK+3rw/x6MhjUJ6c8W331ZARkxaYHaoNPZlD+9W462E +YTFFn3ZBGUz8+N8aG9tKiDbYfVhqkyza/e0y1vapEswcCr7rbpVFZm2Q9vHR +ShCKGou12yGL424bN0hNVEJe25lraU6yGI8HHB3nK+Hm9qYx3kRZXDx0z75h +BRsm9zGCf/TL4uH51K4sDTY4BM0kPYmQw9JfxV60ADYwL26VGT0jh9fkbUnj +EDZV7zkOX5oc8hXmlrpGsCH8l8rzrcVyKD695u6lWDZciHUQa3wih2M7/qQ9 +zmDDk/Mdl0tk5VEZ6muc69iwmcyuP3lHHjtm+C46TLBhW2/X728P5fHzjiHz +5u9ssORaZur4Uh4/Qvc28Vk2OFv79MMneax4WSp65xcbTCJop6KWK6D39x6J +jwIc8JOfvbpFVQHzkpVGIhgcaHe/PN4WrIA+id7kiA0HzH/piZyIUMBb8gIN +nXs40JXWrbMhSgH/yYxeSdpzoL9RIKo4UQH3Ff0o9HTkwLeVgSJn8hQwVdLv +RP1RDkhUm+ma3FPAgs43atlRHPCan4p6KEhDVWsRm8JyDmw+7ib+rwgNf0pr +jxmzOcA/OlDJI0FDm5SpjZ9JDpQMtvUY0mnoPTv6UaaeA0O3L6hd16GhY11U +ve1tDlid0esrcqRhnPhfEbMvOCD3h+N9x4WG/C46fnu7OfA1mM7z1pOGC/dW +yNf3cCDBY6WGRCAN+VIDKp0GOdBq8TY2NYGGxyaqkuM+cmC9SLRmRA0Nzcv3 +vVs+ywGuszPtlxpouDi1ppw+T62f5+j+hls07DLx36C/wIFjM9Znpu7TcH+H +RLrjHw4U9xGD7gM07HU2DQ3iJUH88sM4Wx46ZiVKevWIkfBTVXhI3Y6O+z5b +cR/XImE2Xypaez8d78fVXV9aT8L030xCz5GOBf9quCRtIOHbD72j2zzpONb/ +vj5Dl4ThW86z+yPpuF4rWSeYRUKnxQ2hhBI6nuxJN4swI6Gj5W5NSgX1+1Db +/CNzEto1n9hmVNGRrcgiV1uQcFv0Q05BIx1Vo2tUC3aSUDu4Qun6UzombfaJ +jbYmIeeYAwzP0FG0xBSSDpBw8a3H8OcFqv6esAvZB0nItAo4M75E1W89u1h8 +iIRU7YTH8wIM1LpZ8avKkYSYxZq9f8sx8HXAxg9ZziSc8m5eWM1goFvef0/j +XEg48e5BvpQyA41r6577u5IQ3DY4wlzPwFtO8dLgTsKxs8v9DEwYeDOMf7Ds +KAkev/8W3WrBwKCt9ilhx0hw85VqMN3FwN/5dw+YeJHgZKP5y3o/A4vPfrbq +9ibBVto+wdOHgdbpEpV3/UjYneKs6hvAwMW31TYBx0mwXPLuCgxloGbGeTma +PwlmIzGro2IYGCtiI3c8gASDSnZhVhYDR/2E3wwHkTCoUHnZOJeBH3bQPh8L +JiE8q7xg+jIDTR5/yJmifCP6Wp51OXU/M9Gl7yEk7Jkrzv2LZCBXeE+1Tyj1 +Pr2u5lTXMvB83bjgZ8rr9xVeEmpmoH/HvSdPw0h48bTgYksrA9+Y92oahJPg +Z5Sf5XWfgXcZ41hKmdTIyezsYuC80XPfgAgSVJZnpsV9YGB7V7joxxMkPAxP +P7fxXwY63M/7qRtJPZ/JtNSPowycYGzMSKBcPJiSvHWaga1/UkbkT5JgtDv5 +7NQ8Ax3NanPdKA8/SEoq/M1A/szVKyooK9TGJ/zhJXBZk9MqpVMk3FGKi+es +JHCyqrbIibJD/um4g8IEnh0Smcyi/Esk9sxKMQIvl+vMP6KcmxB9ukmSQMPf +r5p+Ut7851SspxyBHjuLNilGkdAXcDJGgkHgzQt2/laUQ76ciO5QIpBmX+YR +RFncMSIqWI3ArKLdMpcoX+8OO8XUIrBlSSD1BmXb7aEnuzcSmJeUdPsV5R93 +giNjNxO4510y+ZVy+sagE+uBwCcKjx24o0nQqgyI+GBEoM3c0rPVlJ8r+Ien +mRHonvYvN0HZJ8svDHZS/y/YPK9JWXCVb+i33QTO7b1ZvYkyO9o7JH8Pgdah +MuqGlLfPHQvecYC6niHhg5S/eB0NWnQk8IRXSiBQThj2CKxwITDDTHyLPmWl +fe4B9p4Ebs+N7Nam/OCpqz+/D4E81TGaKpRdjVyO3/An0MX2k7U05WWNR/zc +QgiU6XOFFZSvahz2FTtBYNyq+zMz1Pq2Fjv6tEcR6LCtPXiI8ntJB++AMwT6 +2zDb2iifOnfQi55E4JbUisESynLLDxx7kUrgg0fid09Tbg63PxqVQSDvAfVA +J8oLrns8hvIITN/taSJEOXvQ1j2liMD8oTXu76n3t2m3jZvBNQIthGP3VVEO +NtjlklNF4At6abURZbFaS2fzegJPy49LCFCuV9p5ZP4mgQNzAnaPqf00JbLd +ac89Asd6PluYUO7zoj8/2kFd/+HFwXlqf7Y+WIBTTwj8h7ukrpRyWnilfFkP +gR873+ICtb9Du2PPNQ9S+2Gb0Hw+ZSeNg0vP3xN4p79kkUV53fCqdz9HCQwJ +kf7qT/WHhMEnS6FJAhsbeAb5KHNltdymz1D1RLpLZVP99Mzcp8BiiUAFs5bU +aqr/fGqeHcoXZWLz7fijdf/v35VlT2skmLg9S31hLWVD1yjWA1kmqshcHC6g ++l1QUkt2QomJNlGf7kZQ+cCOSn+DBkxc4fSpV4DKj8yBozvstjCxYFjSwoXK +lxMbjJo9TZi4WjFW/haVPxb//chN38XEXR6bJg9R+TRqZXfgowsTDYc1rUKp +/HpZrv543pOJwiL8o9epfGvi4dUX9GXiluXktwkq/xJvNEjphDFxz4FbevZU +PirLSwzEpzAxsdxthovKT/dvA/tUG5hIv7DzZwmVx5ZmdQ/hFhP/2GXWVziQ +oHPl7CbbViZeb7Acq6Tym3ePgURkJxPX7Mt7dpXK+2st+b1dQ0zk01PP8NxL +wsdkpz3+fIpocit9maUl9bxG1ejrVikis2EhVZP6fsyZ/hwfF1ZEq6oSCaEd +JKzgST/jKaWIXOwE9XvU92ddWFu9k7oifjeeDeE1JiHSVVHUykYRJc8fduHS +p/rd8Osz1cuKuNl7fG8rQUJh7s3cL1cVsbHJpMSIQeXdz9PupWWKKPrXA+F2 +GpXP9bJL9FpFfJagZtIsR4LzWisNqfuKmBXuYZIkQUK1eG0y/5gi9jsbnchf +SYL5RIj5Jx0lvGtq+rR0ggMyWnJx/AZKWK3fZls+Ts0r/u33VLcoYS8vT2Hp +GAcyZ4UN/C2U8GGLcHzOZ2re+F2useSohA5XrZrt33HAf9UbUclEJTzHr/DV +sIsDOSo4tGNQCflUd7VwqHnG69i/Un7vlVDPvWD39lIOACd5b8YnJRTUyuge +KebAx3X9z/snlBCiP1cKFnJAY5N/m9syZRSIOf/AIIsDbSbFZVHqyqhKf/lO +IIaaX5z5A+pPKePYeIeN516q3oJtLXdOK+PQ9KJlnS0HJvqj+B4nKuOV9qlT +C7s58N3qZ+6HDGXUYoQmRO3gwJz+aLtQmTLWRNrZH9vCAe7VT8Q9nyujYZWH +YstaDki2n2uSpamgUUnam/2L1HxIrOGOv6eCDitH5jsz2fDliGmZfocK6rnt +mL12ng3JRSGWk49VsCd9+kVUKhteyfXl2L9WQVruaWWNBDY4SWZrq/2ngtNv +0d+Xmm/DhKRdXwiuRb7TYUEph9nAnpd7KG2/Fl/u1FYFNTaIPFVMrZ5Yi9qJ +u5iNtypBJqFql46OGr5d9I4UqqqAS6p6wqLu6rhvfXHadHY5dEpt2fjjvAbm +xq8Q2x9cBptl7qVp9mjigeoeozblUhDiuRJ4OGYdnpRB9f5PJSAXLW9gr6iF +Pud27RGJKgYB5sEG6w4tXDA6HhkpexU0WJJVIYfWY16TiN3JV0XgPyTStp1L +G+Nr2fQV/oUw8SPZzvySNi6VrFu9z6EATDUf5Jirb8Co1hJZu7lcuP1Df3Gu +awNmqkffzw7MBh+19QMvXDeiqNOLOh/di8D65tJtL6CDrT9asn99yQRjQmKn +4BUd7J94y3t+JB2Uo5JC7+nqIsfAuO0873lY66p3hzmgixb0d3LvzVPB9bbH +6frjm9Di65Ep1xVn4U5ht8uUmB5meKaL23fFw3TZ0pzmDT30NOjxZH85Dc7M +SoGcnZvRVkdVTC8oBqbWZujUTm7GzoNVkYKCUXCzePHDTII+hqYzun//fQL2 +b2OgvpwBMpdrt0xHhYK0d3yjRqsB3pZS4F4pHARiK7xqdu5l4YFLI0lluv5Q +bBQZPmnPwprftz0aVP1hfWSqUcZBFk5mBt7plPcHy8nq132HWXiurv4pL78/ +xPXM/HT2YmHxjzCVJ33HYf7Kqa3h0Sxc0v3ekhhxHAb0M15dq2Rhf+suxzv3 +/cAjqDjPnGThgFFk8cUmP5glr7t+rWahq9346uAqPxCh981pNbBQ4+k3b+Ns +P7Dgl5VpaWVhXsi7ZnVvP2juvuby6jV1v1e2tXRxP9gudFM9uI+FGYJbkw6u +9IM+00ezEoMsrP5v2C2Pyw+mm8YSHN6z8Ob0NvODPb6gXrSO82WUhVWv696u +j/aF5oEtwcnjLPyiaWrN6+UL21fbgOYkC/UF+8s/7fEFt/igF4EzLFSNffKt +Q80XplvjctbMU+t3yn7ZucYXYhYuOjctsHDTTv24fm5fEN5QrnboNwtXyH5Z +Nj3uAwXeTTNLSyzUVhgwl+r3gf8Bl7piKg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8Ff0XB3APZal4PER27r1zLdmSInGdU7KlKEulBWUvW/YlZSlbSEhZ +o8h271hTRClKqbTJWirq6YmEskXlN78/5jWv9+u+7sz5znzPZw7tiK+1KzcX +Fxf3X9RBnWeHHrUTZ4sNHf+yLspy1DPsLpAI29IXA/4BdjsCTdYAij07ItGX +DgFiJAkmShC8q6KXp+8KdL3C13ImuvDPtzXpP3trYbrAxnDa2BTeNVv6Tvfe +A4HOUotg471gQoy+nep9CeyXCk8zjdzhZ6/uhcneYage6fCWNgiBNqPS4hdX +fkB3uPhUtWgCyLxr/PeI2m9Y2kSraWo6D6u9HCv4jHiwa/qWxX76RUjXMrll +acePdhdkF+db8qD/0rrWKWFB7E85Un+ltxDOFp96xi35DypMlXB/tbsKazJH +EjPyRfF52iaiNb0E4m3NDV/OiuG5skaJc4GlEKBX5PgoRgJTtrZuGNhSDtsm +FsJ9RqRQzKem+Wh9BYSZZa69+1UKU7p8nxQ1VgBZpD4gOiuFj3vFjV/frgAJ +Wye9Rn5pnFnL56f1qAK+3rw/x6MhjUJ6c8W331ZARkxaYHaoNPZlD+9W462E +YTFFn3ZBGUz8+N8aG9tKiDbYfVhqkyza/e0y1vapEswcCr7rbpVFZm2Q9vHR +ShCKGou12yGL424bN0hNVEJe25lraU6yGI8HHB3nK+Hm9qYx3kRZXDx0z75h +BRsm9zGCf/TL4uH51K4sDTY4BM0kPYmQw9JfxV60ADYwL26VGT0jh9fkbUnj +EDZV7zkOX5oc8hXmlrpGsCH8l8rzrcVyKD695u6lWDZciHUQa3wih2M7/qQ9 +zmDDk/Mdl0tk5VEZ6muc69iwmcyuP3lHHjtm+C46TLBhW2/X728P5fHzjiHz +5u9ssORaZur4Uh4/Qvc28Vk2OFv79MMneax4WSp65xcbTCJop6KWK6D39x6J +jwIc8JOfvbpFVQHzkpVGIhgcaHe/PN4WrIA+id7kiA0HzH/piZyIUMBb8gIN +nXs40JXWrbMhSgH/yYxeSdpzoL9RIKo4UQH3Ff0o9HTkwLeVgSJn8hQwVdLv +RP1RDkhUm+ma3FPAgs43atlRHPCan4p6KEhDVWsRm8JyDmw+7ib+rwgNf0pr +jxmzOcA/OlDJI0FDm5SpjZ9JDpQMtvUY0mnoPTv6UaaeA0O3L6hd16GhY11U +ve1tDlid0esrcqRhnPhfEbMvOCD3h+N9x4WG/C46fnu7OfA1mM7z1pOGC/dW +yNf3cCDBY6WGRCAN+VIDKp0GOdBq8TY2NYGGxyaqkuM+cmC9SLRmRA0Nzcv3 +vVs+ywGuszPtlxpouDi1ppw+T62f5+j+hls07DLx36C/wIFjM9Znpu7TcH+H +RLrjHw4U9xGD7gM07HU2DQ3iJUH88sM4Wx46ZiVKevWIkfBTVXhI3Y6O+z5b +cR/XImE2Xypaez8d78fVXV9aT8L030xCz5GOBf9quCRtIOHbD72j2zzpONb/ +vj5Dl4ThW86z+yPpuF4rWSeYRUKnxQ2hhBI6nuxJN4swI6Gj5W5NSgX1+1Db +/CNzEto1n9hmVNGRrcgiV1uQcFv0Q05BIx1Vo2tUC3aSUDu4Qun6UzombfaJ +jbYmIeeYAwzP0FG0xBSSDpBw8a3H8OcFqv6esAvZB0nItAo4M75E1W89u1h8 +iIRU7YTH8wIM1LpZ8avKkYSYxZq9f8sx8HXAxg9ZziSc8m5eWM1goFvef0/j +XEg48e5BvpQyA41r6577u5IQ3DY4wlzPwFtO8dLgTsKxs8v9DEwYeDOMf7Ds +KAkev/8W3WrBwKCt9ilhx0hw85VqMN3FwN/5dw+YeJHgZKP5y3o/A4vPfrbq +9ibBVto+wdOHgdbpEpV3/UjYneKs6hvAwMW31TYBx0mwXPLuCgxloGbGeTma +PwlmIzGro2IYGCtiI3c8gASDSnZhVhYDR/2E3wwHkTCoUHnZOJeBH3bQPh8L +JiE8q7xg+jIDTR5/yJmifCP6Wp51OXU/M9Gl7yEk7Jkrzv2LZCBXeE+1Tyj1 +Pr2u5lTXMvB83bjgZ8rr9xVeEmpmoH/HvSdPw0h48bTgYksrA9+Y92oahJPg +Z5Sf5XWfgXcZ41hKmdTIyezsYuC80XPfgAgSVJZnpsV9YGB7V7joxxMkPAxP +P7fxXwY63M/7qRtJPZ/JtNSPowycYGzMSKBcPJiSvHWaga1/UkbkT5JgtDv5 +7NQ8Ax3NanPdKA8/SEoq/M1A/szVKyooK9TGJ/zhJXBZk9MqpVMk3FGKi+es +JHCyqrbIibJD/um4g8IEnh0Smcyi/Esk9sxKMQIvl+vMP6KcmxB9ukmSQMPf +r5p+Ut7851SspxyBHjuLNilGkdAXcDJGgkHgzQt2/laUQ76ciO5QIpBmX+YR +RFncMSIqWI3ArKLdMpcoX+8OO8XUIrBlSSD1BmXb7aEnuzcSmJeUdPsV5R93 +giNjNxO4510y+ZVy+sagE+uBwCcKjx24o0nQqgyI+GBEoM3c0rPVlJ8r+Ien +mRHonvYvN0HZJ8svDHZS/y/YPK9JWXCVb+i33QTO7b1ZvYkyO9o7JH8Pgdah +MuqGlLfPHQvecYC6niHhg5S/eB0NWnQk8IRXSiBQThj2CKxwITDDTHyLPmWl +fe4B9p4Ebs+N7Nam/OCpqz+/D4E81TGaKpRdjVyO3/An0MX2k7U05WWNR/zc +QgiU6XOFFZSvahz2FTtBYNyq+zMz1Pq2Fjv6tEcR6LCtPXiI8ntJB++AMwT6 +2zDb2iifOnfQi55E4JbUisESynLLDxx7kUrgg0fid09Tbg63PxqVQSDvAfVA +J8oLrns8hvIITN/taSJEOXvQ1j2liMD8oTXu76n3t2m3jZvBNQIthGP3VVEO +NtjlklNF4At6abURZbFaS2fzegJPy49LCFCuV9p5ZP4mgQNzAnaPqf00JbLd +ac89Asd6PluYUO7zoj8/2kFd/+HFwXlqf7Y+WIBTTwj8h7ukrpRyWnilfFkP +gR873+ICtb9Du2PPNQ9S+2Gb0Hw+ZSeNg0vP3xN4p79kkUV53fCqdz9HCQwJ +kf7qT/WHhMEnS6FJAhsbeAb5KHNltdymz1D1RLpLZVP99Mzcp8BiiUAFs5bU +aqr/fGqeHcoXZWLz7fijdf/v35VlT2skmLg9S31hLWVD1yjWA1kmqshcHC6g ++l1QUkt2QomJNlGf7kZQ+cCOSn+DBkxc4fSpV4DKj8yBozvstjCxYFjSwoXK +lxMbjJo9TZi4WjFW/haVPxb//chN38XEXR6bJg9R+TRqZXfgowsTDYc1rUKp +/HpZrv543pOJwiL8o9epfGvi4dUX9GXiluXktwkq/xJvNEjphDFxz4FbevZU +PirLSwzEpzAxsdxthovKT/dvA/tUG5hIv7DzZwmVx5ZmdQ/hFhP/2GXWVziQ +oHPl7CbbViZeb7Acq6Tym3ePgURkJxPX7Mt7dpXK+2st+b1dQ0zk01PP8NxL +wsdkpz3+fIpocit9maUl9bxG1ejrVikis2EhVZP6fsyZ/hwfF1ZEq6oSCaEd +JKzgST/jKaWIXOwE9XvU92ddWFu9k7oifjeeDeE1JiHSVVHUykYRJc8fduHS +p/rd8Osz1cuKuNl7fG8rQUJh7s3cL1cVsbHJpMSIQeXdz9PupWWKKPrXA+F2 +GpXP9bJL9FpFfJagZtIsR4LzWisNqfuKmBXuYZIkQUK1eG0y/5gi9jsbnchf +SYL5RIj5Jx0lvGtq+rR0ggMyWnJx/AZKWK3fZls+Ts0r/u33VLcoYS8vT2Hp +GAcyZ4UN/C2U8GGLcHzOZ2re+F2useSohA5XrZrt33HAf9UbUclEJTzHr/DV +sIsDOSo4tGNQCflUd7VwqHnG69i/Un7vlVDPvWD39lIOACd5b8YnJRTUyuge +KebAx3X9z/snlBCiP1cKFnJAY5N/m9syZRSIOf/AIIsDbSbFZVHqyqhKf/lO +IIaaX5z5A+pPKePYeIeN516q3oJtLXdOK+PQ9KJlnS0HJvqj+B4nKuOV9qlT +C7s58N3qZ+6HDGXUYoQmRO3gwJz+aLtQmTLWRNrZH9vCAe7VT8Q9nyujYZWH +YstaDki2n2uSpamgUUnam/2L1HxIrOGOv6eCDitH5jsz2fDliGmZfocK6rnt +mL12ng3JRSGWk49VsCd9+kVUKhteyfXl2L9WQVruaWWNBDY4SWZrq/2ngtNv +0d+Xmm/DhKRdXwiuRb7TYUEph9nAnpd7KG2/Fl/u1FYFNTaIPFVMrZ5Yi9qJ +u5iNtypBJqFql46OGr5d9I4UqqqAS6p6wqLu6rhvfXHadHY5dEpt2fjjvAbm +xq8Q2x9cBptl7qVp9mjigeoeozblUhDiuRJ4OGYdnpRB9f5PJSAXLW9gr6iF +Pud27RGJKgYB5sEG6w4tXDA6HhkpexU0WJJVIYfWY16TiN3JV0XgPyTStp1L +G+Nr2fQV/oUw8SPZzvySNi6VrFu9z6EATDUf5Jirb8Co1hJZu7lcuP1Df3Gu +awNmqkffzw7MBh+19QMvXDeiqNOLOh/di8D65tJtL6CDrT9asn99yQRjQmKn +4BUd7J94y3t+JB2Uo5JC7+nqIsfAuO0873lY66p3hzmgixb0d3LvzVPB9bbH +6frjm9Di65Ep1xVn4U5ht8uUmB5meKaL23fFw3TZ0pzmDT30NOjxZH85Dc7M +SoGcnZvRVkdVTC8oBqbWZujUTm7GzoNVkYKCUXCzePHDTII+hqYzun//fQL2 +b2OgvpwBMpdrt0xHhYK0d3yjRqsB3pZS4F4pHARiK7xqdu5l4YFLI0lluv5Q +bBQZPmnPwprftz0aVP1hfWSqUcZBFk5mBt7plPcHy8nq132HWXiurv4pL78/ +xPXM/HT2YmHxjzCVJ33HYf7Kqa3h0Sxc0v3ekhhxHAb0M15dq2Rhf+suxzv3 +/cAjqDjPnGThgFFk8cUmP5glr7t+rWahq9346uAqPxCh981pNbBQ4+k3b+Ns +P7Dgl5VpaWVhXsi7ZnVvP2juvuby6jV1v1e2tXRxP9gudFM9uI+FGYJbkw6u +9IM+00ezEoMsrP5v2C2Pyw+mm8YSHN6z8Ob0NvODPb6gXrSO82WUhVWv696u +j/aF5oEtwcnjLPyiaWrN6+UL21fbgOYkC/UF+8s/7fEFt/igF4EzLFSNffKt +Q80XplvjctbMU+t3yn7ZucYXYhYuOjctsHDTTv24fm5fEN5QrnboNwtXyH5Z +Nj3uAwXeTTNLSyzUVhgwl+r3gf8Bl7piKg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05957986206533108}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05957986206533108}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8Ff0XB3APZal4PER27r1zLdmSInGdU7KlKEulBWUvW/YlZSlbSEhZ +o8h271hTRClKqbTJWirq6YmEskXlN78/5jWv9+u+7sz5znzPZw7tiK+1KzcX +Fxf3X9RBnWeHHrUTZ4sNHf+yLspy1DPsLpAI29IXA/4BdjsCTdYAij07ItGX +DgFiJAkmShC8q6KXp+8KdL3C13ImuvDPtzXpP3trYbrAxnDa2BTeNVv6Tvfe +A4HOUotg471gQoy+nep9CeyXCk8zjdzhZ6/uhcneYage6fCWNgiBNqPS4hdX +fkB3uPhUtWgCyLxr/PeI2m9Y2kSraWo6D6u9HCv4jHiwa/qWxX76RUjXMrll +acePdhdkF+db8qD/0rrWKWFB7E85Un+ltxDOFp96xi35DypMlXB/tbsKazJH +EjPyRfF52iaiNb0E4m3NDV/OiuG5skaJc4GlEKBX5PgoRgJTtrZuGNhSDtsm +FsJ9RqRQzKem+Wh9BYSZZa69+1UKU7p8nxQ1VgBZpD4gOiuFj3vFjV/frgAJ +Wye9Rn5pnFnL56f1qAK+3rw/x6MhjUJ6c8W331ZARkxaYHaoNPZlD+9W462E +YTFFn3ZBGUz8+N8aG9tKiDbYfVhqkyza/e0y1vapEswcCr7rbpVFZm2Q9vHR +ShCKGou12yGL424bN0hNVEJe25lraU6yGI8HHB3nK+Hm9qYx3kRZXDx0z75h +BRsm9zGCf/TL4uH51K4sDTY4BM0kPYmQw9JfxV60ADYwL26VGT0jh9fkbUnj +EDZV7zkOX5oc8hXmlrpGsCH8l8rzrcVyKD695u6lWDZciHUQa3wih2M7/qQ9 +zmDDk/Mdl0tk5VEZ6muc69iwmcyuP3lHHjtm+C46TLBhW2/X728P5fHzjiHz +5u9ssORaZur4Uh4/Qvc28Vk2OFv79MMneax4WSp65xcbTCJop6KWK6D39x6J +jwIc8JOfvbpFVQHzkpVGIhgcaHe/PN4WrIA+id7kiA0HzH/piZyIUMBb8gIN +nXs40JXWrbMhSgH/yYxeSdpzoL9RIKo4UQH3Ff0o9HTkwLeVgSJn8hQwVdLv +RP1RDkhUm+ma3FPAgs43atlRHPCan4p6KEhDVWsRm8JyDmw+7ib+rwgNf0pr +jxmzOcA/OlDJI0FDm5SpjZ9JDpQMtvUY0mnoPTv6UaaeA0O3L6hd16GhY11U +ve1tDlid0esrcqRhnPhfEbMvOCD3h+N9x4WG/C46fnu7OfA1mM7z1pOGC/dW +yNf3cCDBY6WGRCAN+VIDKp0GOdBq8TY2NYGGxyaqkuM+cmC9SLRmRA0Nzcv3 +vVs+ywGuszPtlxpouDi1ppw+T62f5+j+hls07DLx36C/wIFjM9Znpu7TcH+H +RLrjHw4U9xGD7gM07HU2DQ3iJUH88sM4Wx46ZiVKevWIkfBTVXhI3Y6O+z5b +cR/XImE2Xypaez8d78fVXV9aT8L030xCz5GOBf9quCRtIOHbD72j2zzpONb/ +vj5Dl4ThW86z+yPpuF4rWSeYRUKnxQ2hhBI6nuxJN4swI6Gj5W5NSgX1+1Db +/CNzEto1n9hmVNGRrcgiV1uQcFv0Q05BIx1Vo2tUC3aSUDu4Qun6UzombfaJ +jbYmIeeYAwzP0FG0xBSSDpBw8a3H8OcFqv6esAvZB0nItAo4M75E1W89u1h8 +iIRU7YTH8wIM1LpZ8avKkYSYxZq9f8sx8HXAxg9ZziSc8m5eWM1goFvef0/j +XEg48e5BvpQyA41r6577u5IQ3DY4wlzPwFtO8dLgTsKxs8v9DEwYeDOMf7Ds +KAkev/8W3WrBwKCt9ilhx0hw85VqMN3FwN/5dw+YeJHgZKP5y3o/A4vPfrbq +9ibBVto+wdOHgdbpEpV3/UjYneKs6hvAwMW31TYBx0mwXPLuCgxloGbGeTma +PwlmIzGro2IYGCtiI3c8gASDSnZhVhYDR/2E3wwHkTCoUHnZOJeBH3bQPh8L +JiE8q7xg+jIDTR5/yJmifCP6Wp51OXU/M9Gl7yEk7Jkrzv2LZCBXeE+1Tyj1 +Pr2u5lTXMvB83bjgZ8rr9xVeEmpmoH/HvSdPw0h48bTgYksrA9+Y92oahJPg +Z5Sf5XWfgXcZ41hKmdTIyezsYuC80XPfgAgSVJZnpsV9YGB7V7joxxMkPAxP +P7fxXwY63M/7qRtJPZ/JtNSPowycYGzMSKBcPJiSvHWaga1/UkbkT5JgtDv5 +7NQ8Ax3NanPdKA8/SEoq/M1A/szVKyooK9TGJ/zhJXBZk9MqpVMk3FGKi+es +JHCyqrbIibJD/um4g8IEnh0Smcyi/Esk9sxKMQIvl+vMP6KcmxB9ukmSQMPf +r5p+Ut7851SspxyBHjuLNilGkdAXcDJGgkHgzQt2/laUQ76ciO5QIpBmX+YR +RFncMSIqWI3ArKLdMpcoX+8OO8XUIrBlSSD1BmXb7aEnuzcSmJeUdPsV5R93 +giNjNxO4510y+ZVy+sagE+uBwCcKjx24o0nQqgyI+GBEoM3c0rPVlJ8r+Ien +mRHonvYvN0HZJ8svDHZS/y/YPK9JWXCVb+i33QTO7b1ZvYkyO9o7JH8Pgdah +MuqGlLfPHQvecYC6niHhg5S/eB0NWnQk8IRXSiBQThj2CKxwITDDTHyLPmWl +fe4B9p4Ebs+N7Nam/OCpqz+/D4E81TGaKpRdjVyO3/An0MX2k7U05WWNR/zc +QgiU6XOFFZSvahz2FTtBYNyq+zMz1Pq2Fjv6tEcR6LCtPXiI8ntJB++AMwT6 +2zDb2iifOnfQi55E4JbUisESynLLDxx7kUrgg0fid09Tbg63PxqVQSDvAfVA +J8oLrns8hvIITN/taSJEOXvQ1j2liMD8oTXu76n3t2m3jZvBNQIthGP3VVEO +NtjlklNF4At6abURZbFaS2fzegJPy49LCFCuV9p5ZP4mgQNzAnaPqf00JbLd +ac89Asd6PluYUO7zoj8/2kFd/+HFwXlqf7Y+WIBTTwj8h7ukrpRyWnilfFkP +gR873+ICtb9Du2PPNQ9S+2Gb0Hw+ZSeNg0vP3xN4p79kkUV53fCqdz9HCQwJ +kf7qT/WHhMEnS6FJAhsbeAb5KHNltdymz1D1RLpLZVP99Mzcp8BiiUAFs5bU +aqr/fGqeHcoXZWLz7fijdf/v35VlT2skmLg9S31hLWVD1yjWA1kmqshcHC6g ++l1QUkt2QomJNlGf7kZQ+cCOSn+DBkxc4fSpV4DKj8yBozvstjCxYFjSwoXK +lxMbjJo9TZi4WjFW/haVPxb//chN38XEXR6bJg9R+TRqZXfgowsTDYc1rUKp +/HpZrv543pOJwiL8o9epfGvi4dUX9GXiluXktwkq/xJvNEjphDFxz4FbevZU +PirLSwzEpzAxsdxthovKT/dvA/tUG5hIv7DzZwmVx5ZmdQ/hFhP/2GXWVziQ +oHPl7CbbViZeb7Acq6Tym3ePgURkJxPX7Mt7dpXK+2st+b1dQ0zk01PP8NxL +wsdkpz3+fIpocit9maUl9bxG1ejrVikis2EhVZP6fsyZ/hwfF1ZEq6oSCaEd +JKzgST/jKaWIXOwE9XvU92ddWFu9k7oifjeeDeE1JiHSVVHUykYRJc8fduHS +p/rd8Osz1cuKuNl7fG8rQUJh7s3cL1cVsbHJpMSIQeXdz9PupWWKKPrXA+F2 +GpXP9bJL9FpFfJagZtIsR4LzWisNqfuKmBXuYZIkQUK1eG0y/5gi9jsbnchf +SYL5RIj5Jx0lvGtq+rR0ggMyWnJx/AZKWK3fZls+Ts0r/u33VLcoYS8vT2Hp +GAcyZ4UN/C2U8GGLcHzOZ2re+F2useSohA5XrZrt33HAf9UbUclEJTzHr/DV +sIsDOSo4tGNQCflUd7VwqHnG69i/Un7vlVDPvWD39lIOACd5b8YnJRTUyuge +KebAx3X9z/snlBCiP1cKFnJAY5N/m9syZRSIOf/AIIsDbSbFZVHqyqhKf/lO +IIaaX5z5A+pPKePYeIeN516q3oJtLXdOK+PQ9KJlnS0HJvqj+B4nKuOV9qlT +C7s58N3qZ+6HDGXUYoQmRO3gwJz+aLtQmTLWRNrZH9vCAe7VT8Q9nyujYZWH +YstaDki2n2uSpamgUUnam/2L1HxIrOGOv6eCDitH5jsz2fDliGmZfocK6rnt +mL12ng3JRSGWk49VsCd9+kVUKhteyfXl2L9WQVruaWWNBDY4SWZrq/2ngtNv +0d+Xmm/DhKRdXwiuRb7TYUEph9nAnpd7KG2/Fl/u1FYFNTaIPFVMrZ5Yi9qJ +u5iNtypBJqFql46OGr5d9I4UqqqAS6p6wqLu6rhvfXHadHY5dEpt2fjjvAbm +xq8Q2x9cBptl7qVp9mjigeoeozblUhDiuRJ4OGYdnpRB9f5PJSAXLW9gr6iF +Pud27RGJKgYB5sEG6w4tXDA6HhkpexU0WJJVIYfWY16TiN3JV0XgPyTStp1L +G+Nr2fQV/oUw8SPZzvySNi6VrFu9z6EATDUf5Jirb8Co1hJZu7lcuP1Df3Gu +awNmqkffzw7MBh+19QMvXDeiqNOLOh/di8D65tJtL6CDrT9asn99yQRjQmKn +4BUd7J94y3t+JB2Uo5JC7+nqIsfAuO0873lY66p3hzmgixb0d3LvzVPB9bbH +6frjm9Di65Ep1xVn4U5ht8uUmB5meKaL23fFw3TZ0pzmDT30NOjxZH85Dc7M +SoGcnZvRVkdVTC8oBqbWZujUTm7GzoNVkYKCUXCzePHDTII+hqYzun//fQL2 +b2OgvpwBMpdrt0xHhYK0d3yjRqsB3pZS4F4pHARiK7xqdu5l4YFLI0lluv5Q +bBQZPmnPwprftz0aVP1hfWSqUcZBFk5mBt7plPcHy8nq132HWXiurv4pL78/ +xPXM/HT2YmHxjzCVJ33HYf7Kqa3h0Sxc0v3ekhhxHAb0M15dq2Rhf+suxzv3 +/cAjqDjPnGThgFFk8cUmP5glr7t+rWahq9346uAqPxCh981pNbBQ4+k3b+Ns +P7Dgl5VpaWVhXsi7ZnVvP2juvuby6jV1v1e2tXRxP9gudFM9uI+FGYJbkw6u +9IM+00ezEoMsrP5v2C2Pyw+mm8YSHN6z8Ob0NvODPb6gXrSO82WUhVWv696u +j/aF5oEtwcnjLPyiaWrN6+UL21fbgOYkC/UF+8s/7fEFt/igF4EzLFSNffKt +Q80XplvjctbMU+t3yn7ZucYXYhYuOjctsHDTTv24fm5fEN5QrnboNwtXyH5Z +Nj3uAwXeTTNLSyzUVhgwl+r3gf8Bl7piKg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05957986206533108}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.05957986206533108}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994355760704337*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"81e78116-2699-4860-8c18-844aa2363984"] +}, Open ]], Cell[CellGroupData[{ @@ -10653,66 +11681,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[365]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], + "In[121]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 365, 381, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423358439445`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.179272348236828`*^-159\\\", \ +RowBox[{\\\"505518991860510123640143147290826802026\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"71\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9512072804761600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 45, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994355760760013*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], +In[121]:=",ExpressionUUID->"6ade720c-78ca-4720-ab45-582a9b7597b3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 365, 382, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335853943*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.199389174443223`*^-162\\\", \ +RowBox[{\\\"164243120455479739170682508554789627978\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4724542670438400000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 46, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994355760769628*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], +In[121]:=",ExpressionUUID->"c61b0ff8-8de0-417c-9fc7-34162b35f009"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 365, 383, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335861944*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.697022424859447`*^-165\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 47, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994355760781431*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], +In[121]:=",ExpressionUUID->"5c8181ca-1378-4419-8036-42127821b140"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 365, 384, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335870945*^9}, +during this calculation.\"", 2, 121, 48, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994355760793401*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], +In[121]:=",ExpressionUUID->"4258e40a-67c6-4c47-8cf2-4da99bba7a12"], -Cell[BoxData["12.5536549879565`"], "Output", - CellChangeTimes->{3.9913423425170345`*^9}, +Cell[BoxData["13.420716210881142`"], "Output", + CellChangeTimes->{3.9913423425170345`*^9, 3.994355848001169*^9}, CellLabel-> - "Out[365]=",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] + "Out[121]=",ExpressionUUID->"bab1e51b-2b0a-43ad-a218-c00a3f9c3b32"] }, Open ]], Cell[CellGroupData[{ @@ -10779,68 +11814,69 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99184987967128*^9, - 3.9918498857615337`*^9}},ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-\ -30286a178ca1"], + CellChangeTimes->{{3.99184987967128*^9, 3.9918498857615337`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 385, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425545177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.690588513035263`*^-241\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 122, 49, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.994355848054719*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], +In[122]:=",ExpressionUUID->"1c0a76ec-ce9d-4fd6-b62d-cb406fd2942e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 386, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342342564516*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.1666524477973756`*^-248\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 122, 50, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.9943558480648127`*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], +In[122]:=",ExpressionUUID->"4f608f7a-1984-4164-ab6d-d2cd3d42d3d0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 387, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425725136`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.754662163234241`*^-255\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 122, 51, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.994355848074298*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], +In[122]:=",ExpressionUUID->"44c690d7-6d59-47f4-aad4-bd8ea3cb12b4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 366, 388, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425815163`*^9}, +during this calculation.\"", 2, 122, 52, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.9943558480837708`*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], +In[122]:=",ExpressionUUID->"b8b1ce3f-98c9-49b7-9549-411481132721"], -Cell[BoxData["2.904399821349581`"], "Output", - CellChangeTimes->{3.9913423499055786`*^9}, +Cell[BoxData["0.004127229199639299`"], "Output", + CellChangeTimes->{3.9913423499055786`*^9, 3.9943558578220673`*^9}, CellLabel-> - "Out[366]=",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] + "Out[122]=",ExpressionUUID->"50363e47-5b6e-45e7-b406-c8ab4a308a9f"] }, Open ]], Cell[CellGroupData[{ @@ -10861,8 +11897,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10907,67 +11942,69 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849890499424*^9, - 3.9918498944226*^9}},ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], + CellChangeTimes->{{3.991849890499424*^9, 3.9918498944226*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 389, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499435787`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.690588513035263`*^-241\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 123, 53, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.9943558578742437`*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], +In[123]:=",ExpressionUUID->"7aa744ad-4f87-4884-993b-3d421e0b1b4c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 390, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342349953579*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.1666524477973756`*^-248\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 123, 54, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.99435585788466*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], +In[123]:=",ExpressionUUID->"700de0df-a32d-42c7-85e1-e687106dd024"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 391, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499625797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.754662163234241`*^-255\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 123, 55, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.994355857894943*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], +In[123]:=",ExpressionUUID->"fd528e92-91b1-4061-aba1-6337b73f8bdf"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 367, 392, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499715805`*^9}, +during this calculation.\"", 2, 123, 56, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.9943558579047737`*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], +In[123]:=",ExpressionUUID->"9bc43da0-2252-42a6-9cba-b01a026eeff4"], -Cell[BoxData["9.928941323789857`"], "Output", - CellChangeTimes->{3.991342356382967*^9}, +Cell[BoxData["44.48052799946141`"], "Output", + CellChangeTimes->{3.991342356382967*^9, 3.994355866961276*^9}, CellLabel-> - "Out[367]=",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] + "Out[123]=",ExpressionUUID->"5b11d26a-b32a-46fa-a1d5-e43a65d46b95"] }, Open ]], Cell[CellGroupData[{ @@ -10988,8 +12025,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11034,68 +12070,69 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499002266407`*^9, - 3.9918499040814323`*^9}},ExpressionUUID->"935796a8-6280-564a-b4d0-\ -fc6fb6cd41f8"], + CellChangeTimes->{{3.9918499002266407`*^9, 3.9918499040814323`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 393, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356420965*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.690588513035263`*^-241\\\", \ +\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ +\\\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 124, 57, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.99435586702564*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], +In[124]:=",ExpressionUUID->"60b5f427-d3e8-4d9b-b102-f1a5a0981a7a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 394, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356431965*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.1666524477973756`*^-248\\\", \ +\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ +000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 124, 58, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.9943558670352592`*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], +In[124]:=",ExpressionUUID->"d59d4da2-4178-47f2-b00e-4ba035ceb285"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 395, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356441965*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.754662163234241`*^-255\\\", \ +\\\"10677394689523012254528145055942533022385812620552707152831053824000000000\ +0000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 124, 59, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994355867044757*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], +In[124]:=",ExpressionUUID->"200b86d1-c38b-4c7d-8dcd-7fe87921a4f0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 368, 396, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356450968*^9}, +during this calculation.\"", 2, 124, 60, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994355867053925*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], +In[124]:=",ExpressionUUID->"eb0b90ae-ed14-4a4e-92d2-53ea22081fe7"], -Cell[BoxData["19.874153108015193`"], "Output", - CellChangeTimes->{3.9913423600715523`*^9}, +Cell[BoxData["5.56891772228288`"], "Output", + CellChangeTimes->{3.9913423600715523`*^9, 3.994355874781144*^9}, CellLabel-> - "Out[368]=",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] + "Out[124]=",ExpressionUUID->"fd4bd2a4-dc0b-437d-bacb-d6154b6cb767"] }, Open ]], Cell[CellGroupData[{ @@ -11104,22 +12141,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849908545643*^9, - 3.9918499133398113`*^9}},ExpressionUUID->"ee52036b-90c5-e14a-aed9-\ -684ff23ed035"], - -Cell[BoxData["0.2067571864462191`"], "Output", - CellChangeTimes->{3.9913423601046352`*^9}, + CellChangeTimes->{{3.991849908545643*^9, 3.9918499133398113`*^9}}, CellLabel-> - "Out[369]=",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] + "In[125]:=",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], + +Cell[BoxData["0.00026223352918297636`"], "Output", + CellChangeTimes->{3.9913423601046352`*^9, 3.9943558748208942`*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"df42213e-862d-44cf-a07c-bc521557bbb7"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849916273302*^9, 3.9918499185334816`*^9}, - 3.9919247506818066`*^9},ExpressionUUID->"c6d4a146-4cca-7e4e-b483-\ -85227a6e6b51"], + 3.9919247506818066`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ @@ -11142,12 +12180,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[371]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], + "In[127]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913423601345863`*^9}, +Cell[BoxData["18.95695588438989`"], "Output", + CellChangeTimes->{3.9913423601345863`*^9, 3.994355874848297*^9}, CellLabel-> - "Out[371]=",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] + "Out[127]=",ExpressionUUID->"a15ffc0b-427c-4afb-88a7-500ed8c79981"] }, Open ]], Cell[CellGroupData[{ @@ -11157,12 +12195,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[373]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], + "In[128]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.9913423601709976`*^9}, +Cell[BoxData["1.4363384742386458`"], "Output", + CellChangeTimes->{3.9913423601709976`*^9, 3.994355874865987*^9}, CellLabel-> - "Out[373]=",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] + "Out[128]=",ExpressionUUID->"2fe84a3e-6437-437d-bf63-c33e3a4080ae"] }, Open ]], Cell[CellGroupData[{ @@ -11172,12 +12210,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[376]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], + "In[129]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913423602320137`*^9}, +Cell[BoxData["27.228605091193895`"], "Output", + CellChangeTimes->{3.9913423602320137`*^9, 3.994355874882599*^9}, CellLabel-> - "Out[376]=",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] + "Out[129]=",ExpressionUUID->"eac3da73-2ec2-421c-9062-d7456b803479"] }, Open ]], Cell[CellGroupData[{ @@ -11367,12 +12405,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[377]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], + "In[130]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[BoxData["0.02003459702393596`"], "Output", - CellChangeTimes->{3.991342360260002*^9}, +Cell[BoxData["0.004734971240973229`"], "Output", + CellChangeTimes->{3.991342360260002*^9, 3.994355874901866*^9}, CellLabel-> - "Out[377]=",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] + "Out[130]=",ExpressionUUID->"df13b998-28a9-46d0-a4a3-c9079af3cdd0"] }, Open ]], Cell[CellGroupData[{ @@ -11386,12 +12424,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[378]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], + "In[131]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[BoxData["6.261157591052328`"], "Output", - CellChangeTimes->{3.9913423603598785`*^9}, +Cell[BoxData["12.879122318774392`"], "Output", + CellChangeTimes->{3.9913423603598785`*^9, 3.994355875098316*^9}, CellLabel-> - "Out[378]=",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] + "Out[131]=",ExpressionUUID->"8e09a639-7ae4-408e-a39b-2c671327ad57"] }, Open ]], Cell[CellGroupData[{ @@ -11583,12 +12621,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[379]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], + "In[132]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[BoxData["0.010388932679900494`"], "Output", - CellChangeTimes->{3.991342360375868*^9}, +Cell[BoxData["0.0334733635485602`"], "Output", + CellChangeTimes->{3.991342360375868*^9, 3.9943558751178713`*^9}, CellLabel-> - "Out[379]=",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] + "Out[132]=",ExpressionUUID->"94289f5d-bb29-4837-9061-b917b4be7536"] }, Open ]], Cell[CellGroupData[{ @@ -11602,12 +12640,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[380]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], + "In[133]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[BoxData["8.694797556550151`"], "Output", - CellChangeTimes->{3.991342360471882*^9}, +Cell[BoxData["4.843901056803618`"], "Output", + CellChangeTimes->{3.991342360471882*^9, 3.994355875306576*^9}, CellLabel-> - "Out[380]=",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] + "Out[133]=",ExpressionUUID->"3581afe4-57c0-49c9-8405-51efdc768b18"] }, Open ]], Cell[CellGroupData[{ @@ -11700,12 +12738,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[381]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], + "In[134]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991342360486868*^9}, +Cell[BoxData["0.10708479897462729`"], "Output", + CellChangeTimes->{3.991342360486868*^9, 3.994355875323958*^9}, CellLabel-> - "Out[381]=",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] + "Out[134]=",ExpressionUUID->"fbbf00e9-5e2c-428d-b753-e2919000730e"] }, Open ]], Cell[CellGroupData[{ @@ -11795,12 +12833,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[382]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], + "In[135]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.9913423605138645`*^9}, +Cell[BoxData["0.8929152010253727`"], "Output", + CellChangeTimes->{3.9913423605138645`*^9, 3.994355875339983*^9}, CellLabel-> - "Out[382]=",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] + "Out[135]=",ExpressionUUID->"0271b375-cb62-489f-af9c-a604d3a4d049"] }, Open ]], Cell[CellGroupData[{ @@ -11923,12 +12961,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[383]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], + "In[136]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.9913423605448647`*^9}, +Cell[BoxData["0.09561764480319095`"], "Output", + CellChangeTimes->{3.9913423605448647`*^9, 3.994355875359414*^9}, CellLabel-> - "Out[383]=",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] + "Out[136]=",ExpressionUUID->"9aafb708-f162-4677-ae29-bee589b3fa6f"] }, Open ]], Cell[CellGroupData[{ @@ -11990,68 +13028,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849936863495*^9},ExpressionUUID->"6b25ec99-ae49-ec4d-9652-\ -65328572e509"], + CellChangeTimes->{3.991849936863495*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 384, 397, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342360571863*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.145930210546687`*^-229\\\", \ +RowBox[{\\\"1894408991562427689427794363373458470910\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8875062955245236398325760000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 61, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994355875378351*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], +In[137]:=",ExpressionUUID->"b2ef8902-7511-4da8-9ba4-d079e7ded794"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 384, 398, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605818653`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.479392769521237`*^-235\\\", \ +RowBox[{\\\"2735526583816145583533735060711274031995\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5590907374121359182397440000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 62, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994355875386876*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], +In[137]:=",ExpressionUUID->"0766c60c-847c-4b26-9422-995bf44ce964"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 384, - 399, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605898647`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3525725280503836`*^-241\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 63, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994355875397237*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], +In[137]:=",ExpressionUUID->"f9a901b2-8d51-4cd0-b77c-a62fa1547923"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 384, 400, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605988636`*^9}, +during this calculation.\"", 2, 137, 64, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994355875407275*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], +In[137]:=",ExpressionUUID->"f90abf4a-8094-4dd8-8171-fc7ddfcae4e9"], -Cell[BoxData["6.261157591052324`"], "Output", - CellChangeTimes->{3.9913423642473736`*^9}, +Cell[BoxData["12.879122318774405`"], "Output", + CellChangeTimes->{3.9913423642473736`*^9, 3.9943558827858458`*^9}, CellLabel-> - "Out[384]=",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] + "Out[137]=",ExpressionUUID->"c8f8c58c-2d96-4557-8f51-80bb1223a169"] }, Open ]], Cell[CellGroupData[{ @@ -12113,68 +13158,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849940282545*^9},ExpressionUUID->"3e2baf62-fab9-eb41-8de7-\ -aa229443ac14"], + CellChangeTimes->{3.991849940282545*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 385, 401, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364284378*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.145930210546687`*^-229\\\", \ +RowBox[{\\\"1894408991562427689427794363373458470910\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8875062955245236398325760000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 65, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.9943558828426228`*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], +In[138]:=",ExpressionUUID->"33208b2d-7413-42bb-bd73-71d8d0f66198"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 385, 402, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423642935734`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.479392769521237`*^-235\\\", \ +RowBox[{\\\"2735526583816145583533735060711274031995\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5590907374121359182397440000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 66, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994355882852322*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], +In[138]:=",ExpressionUUID->"58c1214f-5303-4a4b-a101-7985e1710221"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 385, - 403, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364302574*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3525725280503836`*^-241\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 67, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994355882862804*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], +In[138]:=",ExpressionUUID->"322defbf-eae8-4f48-a7b1-c6bd44942aba"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 385, 404, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423643105717`*^9}, +during this calculation.\"", 2, 138, 68, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994355882872431*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], +In[138]:=",ExpressionUUID->"f95126bb-545c-4a3e-ba5e-c83d853e63be"], -Cell[BoxData["8.694797556550144`"], "Output", - CellChangeTimes->{3.9913423679416714`*^9}, +Cell[BoxData["4.843901056803623`"], "Output", + CellChangeTimes->{3.9913423679416714`*^9, 3.9943558901174*^9}, CellLabel-> - "Out[385]=",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] + "Out[138]=",ExpressionUUID->"9a5ca535-a1ed-4249-aab8-9009d4072f70"] }, Open ]], Cell[CellGroupData[{ @@ -12232,95 +13284,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849946138607*^9},ExpressionUUID->"725c3011-bda9-4c42-96ce-\ -9a77a5dc787c"], + CellChangeTimes->{3.991849946138607*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk0Ff8bB3BZkiyhbN3sVNeWLEWLzxMXJZSQJYlr7ljLmlSishUlVOSb +rUKSnVRIfaO+flIoWmQXFfderiwp5fe5f8yZ8zoz857385wzo0wPPMDg5eHh +YeGDew5+o7PhYccbk9byN82repnIhJ1vSKeVoF5B7x6uB3O3XFOjNaDSdB2K +OPZ+4vVyEf0XiOqqnsB1ZUR0kwCtDY3Z7lWQwL74UvZZdHEn6g3MG+T6cUdw +zqJeN3pTq/ZGEnu8pzXyZP1H9IfycWw19tpR1UNzZr3II71OQwp772SkcWjb +AHKntGVKYzcujgtHFA+hDbkiBrLY78/JnK49NoLc1kQuyGGzl9PGZ/RGkXnA +2nEK9vJLQS7682OoNf2rgAK2gkR2S3D9NxR9fsRaCduWMlfINmOiDfu93dSx +yTwVae0VbCS1YlJtI3a0+r44/7ZJpKJdIKuJ/VGma3NYMQf1uGad24xNuPr5 +Xr00jXx1+uYMsKeyeG5VHfuBEvmtM4ywV6hoi3P0ZlG+SbULYF8jmizFpeaQ +Hf3+aRq20l2X6E3zc+iWYGfLbmwjrXj20fqfSMUy/4sdts+WgbZxs0X005lU +IbFnIo7zr1z/B8XYv8z2xz5bL7yDuuIvepF4gBaMfQOM7nu3LaGt02zJM9x+ +BS20kOJlIK2hV5uOXfzy6uA5Ci9YZbITs7l9v7pHpl7ihaTC7sR87EiN2eqK +Y3xwr0JFpJrbt1xZdVJPAALaK9e8xe7pYDb+vSMAejENpj3c/tMPXcWklsP5 +3smbw9glBrZp2vPLwd6nvf0HdvPjU8sC6leA15zvTtk+JpptejfwzUwE9n5q +2eSLLWktIn66UQRaNvkshmHrdtFA1FgU4tTqf5/F9vvyIG+zjhi8lziVlokd +xNumu1NEHKTKbJVeY4+qlHHi5iSgTm24YWc/3g/ZKtSuLwmt1LM11ti898eU +ZYMlQTXlf/2HsJX0FQ8UT0iCrrbbq1PYrmYpVW8GV8PfmUD+eux2r5BQmVdS +EF7/YpY2wET9d5OTPFZIA79wh4wTNnOi+M49c2n4eel0gC/2yrCRd9ufSYOv +c3VpMjYt1sHA44EM9E6lXvmMXZe/ZbYoVw7mB706ogaZKH/0V/i2MHl4wlMH +E0NMtNsxoT+0VB7cD86t4R3G+c2rLUrH5KF3PUjJYRvka0kpuSiAqupCpiV2 +M929WsBEEeLujFcXYk9PDp74FqMEgWUy1KMjTLT6KK2m2kYFtIaLJSmjTDSW +v9Jnv58KbN+xSG7FftTbQWHFq8BECvpqj+1mfThm/TMV6He84X8ZO18z/ECm +nirMa56I4R3D7x+/OxUlowbtQiKTM9gO3sLaVkPqMH7TvuzXNyZC4Y56Tn/U +gc++qovynYk04nK3EnLrYfGNtvpObJ47+qZRduuB3hxOO4td2n/Iqerf9SCn +oBe5Yhx/nwdLzq29vQH4Gx3blSZwP5rN+3E6FSpyYTGIxUR37DM+z0dR4a3a +ciIDO5k+NMh/kwoso6bZJ9jE2eMTCu+ooCKkmCHMZiKJhmweezMNeP7BuLMI +20+frVGvqgmUv5+VJyaZiKJyJTrpixao5cZrXplmoobEGeoCrzZoNl2ObcR2 +++HSRSprwyVasxgbO6dZjWrqrg3vRR/V2vxgIhXvurc/P2hDvHSCw6oZPG/J +qDr5Sgcuuiq+vDnLRPIUBVLJRReSjleHfvrJRFoFYSK/kR6ce1cb93WJiehE +zKy2rR5UBZ5RVORhoRuqaf0ebnqgfunuyEFsvtvlFS8j9EC1RmHiJXZPzrhD +WqUeeB71mitaxkIXb3hkU1X1IW0ofTGMj4XGkqx1nJcbwJobHx5rCbLQrRC1 +/Q/aDGHoH8PYtatYqCMcbY0tMIbush6XBBUWUnbvtj0csBMSVtRmJhqxEGOp +tkz+JMBhWZrF3X0sJDPxSFCGbgrVVgfjT/izUJj+jt40DRow6BadPxJYiM5a +bFk9bg7WqMtAq5CFSk1DBXPbLSEqCz6F/I+F8mf8/i25tgeEQj0Ls5gs9HOX +7Ovm6L0Q/PkEISnFRn08fJwhTxtw8dv8Qhix0bF1gSnnVPeBT2f1uLQPG5X5 +tjy7HrcfTshFZiSms9GpH3Lzmr52MNW1YupaExvNWlkc/O/IAWi0Mt+4ao6N +jA+l7hq1s4dKYcNsFeokeiuX7des7wDpb/ZbL7hMorWFMQ1FGx3BZOROt2DK +JHo0qGFtK3oQHilX+rg2TSKFrinvcNZBIP6MBO6em0T611NL7gw6gZBEIGWZ +zBTK5v+hk9bkDDk/Ep4pbp5Ctbs29cQ9dgEnmmN+kM0UurE1UWKx2BWOeCvH +K/hOofbPBfH6lw5BxT+3rtSen0IPbLLUgs66QcAWx+uyOVOIc9Se5xhxGCq0 +JL9tejiFZi2oPmwzd2j2316zrX0KFbE+/QzdcgSyBqqTU79NIedbBV6HRTzA +8t66c15LU6i6au8RvgQPUEof2S4nw0HGlLcLFxc8wFrMSH6DFgepDnr3dPp6 +wsBNyrL7iIO+CPvvyxrxhHT5J0eO23NQR7Ktl6UjHVgxZ9ZcIDjoWkSu8PEO +OvzaqL2bPM5BDY1LC157vICIgH0GsRy0yg0S9Ou8oHud+axbCgcprfmvfV0D +dkOvRDK2bpuN7PJGLxDnUVz1FPvAjkP3Pv7rBWVPk+8rpeL8deGvzvzPCzIX +E/2Hsdf23V/V8tELqGQ0n8dVDlJzl7nhNu8FS3NmQWbpeB4PdlGcAQFaFwQ2 +Fd/koMLMqVDbLQT8AeJ6B/aad9MmMkYENHT6DMxhs83nu4q2E2CCHBXMsjj4 +/8WzrM2UgBRDZ8sebLF5CRdJOwJuGsyZ8uXgfVw2FMo9SkCI8vUWlMdBdv9t +7fIOJOBu50IWHbuRZ1uubjABUQ4ZDnHYmaEmhs/DCNjXF3i0FdvWxdJz9DQB +Dp93mNvf4qDHai6PNRMJmBaLSjxym4OS6yN9HxUScDF/2JGez0FH9TKMI4oI +cBuJYZ/Ftr5XKWRUTID7krx/LvbKjLF7D0sJmOjeLN6LHReyf7y2hgD/h0lC +DgUcFElV83/wnIDjumW1JoUc5JfxKqCqH+/ntfu3v3c5aI/Y2I6QQQKy8hd+ +yRVx0MY4HlG9YQIsLbZxDLDHQgxLK0cJyNC6c8EP29M2l1XBJODkZDu9C9tZ +IPRY+S8CnAbOPr99j4MsQ9cGlUgzIMxaWVHjPgc9z423SpNlAP3ESK4Z9o62 +abWItQyQr53864atq/7qk5kCA1TyPjtdwZb7cNrsszoDntNqw6axJ7b1Sa80 +ZMA7QtO5qoSDrvDmPfG2Z0AKI6xGtgzPv0nkho0jA2Q40Qva2LGHIkL0nRjg +ORS3zgw7omb/hiVXBix9P7EYgO1JLktNpzPAzLhW9Sm2fiudeBHMAKu0GtHD +5Rz0IVVdWDWFAWlL23dFV3BQGRL1+ZbKgLl90YpXsGNZM82lVxkQqzM+kIOt +t6c5yiiDAUcf6Qo2YifzeE3b5OB5Ep0nf2FbBOZ9iihhwImUj2qBlRwkL39h +i0kZAy6eH1c7gz3TGniVr4IBEq9FBZOwb69HNsnVDFBFMcGF2H/6+p7dqWNA +waLAwGfsGmtK0ZsWBuygOlF2VXFQ0i9egWutDBjT+77dBpteNO7p0saA+PUn +TVywxfnrKF/aGZBul/w9CDug3vnKwnsG/F489iEHW1UjPVxtFO+bX15iFvvX +hzPvvo8xYBNV1G4JuyOOoVv+jQG3ro6HCFVzUNSQwbgxkwFXQ33d5LF7brw7 +vO8HA24nHX5php0mKGF+ahkJ/RUus4nYDdN9h8L4SPjVPmp1DftrX3HIMQES +/v07diobe0cNLY8uRIKdJc2vHHvMI+K3lQQJgtk28Z3Y4tbmkuarSYjVZ5R/ +wt6+VZKKpEgwbfpeNYSdIlpyUF+OhEPSW/ZwuNfrBiopyiTMhD+vEqvhILKg +pEVKlYT2/I3lUtgpKScHVqmTQH89E7cOe4xcLcpPJSF9uP45lXt9taUPU5eE +D32TEabYdX9XR4/pkeAbE7R7N/bo98HrgwbYO+2mbbC3PTvV1GVEwltb3W5n +7C8BZQpPgISnZ+w/BGCLOZ82fGiK+5s0nQzGNjbbbV1JI+GPefLccexkueGT +BbtJSJIyiI7CfsRfnpJrRcKnftGk89gjk6fvZlqTsIcDwfHYRi+lui/vJ8FG +rbLtMja9cngi4QAJhr6sXanYl7PKec87kMBE51KvYQ+H7NENdyahnlL29B9s +UXdpyyBXEqx8LHKyuXl7Rg77uZFwvdvAKY/7vOKZJHcPEq51SjoXcPustLrt +TCdhtHVZ3l1u3qz04wMECUp15s/vcfOGRtqtSRKuHulvvM/Na6sYs/DB90e/ +ul7K7ffwzB/wI0Hni4hlOTf/ttWa7QEkDLrcflvBzb8so2l4jISeqiSjKm5+ +xJddm4JIcH7RElGNLUJUOlNDSOANcLlag711X1SgahgJQ3E7Lzzg5m/bGy8f +TgI5F+ZUi31JXTZbJoIEr4IlnofYteKj1RKnSJCI7ovleuh3ZatwJAliYWIj +XIt8jRoSiCLB82Qa5RH2lrd7fy5FkxB4wVeH6/8D6bNHxA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12334,107 +13385,105 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV1Hk0Ff8bB3BZkiyhbN3sVNeWLEWLzxMXJZSQJYlr7ljLmlSishUlVOSb +rUKSnVRIfaO+flIoWmQXFfderiwp5fe5f8yZ8zoz857385wzo0wPPMDg5eHh +YeGDew5+o7PhYccbk9byN82repnIhJ1vSKeVoF5B7x6uB3O3XFOjNaDSdB2K +OPZ+4vVyEf0XiOqqnsB1ZUR0kwCtDY3Z7lWQwL74UvZZdHEn6g3MG+T6cUdw +zqJeN3pTq/ZGEnu8pzXyZP1H9IfycWw19tpR1UNzZr3II71OQwp772SkcWjb +AHKntGVKYzcujgtHFA+hDbkiBrLY78/JnK49NoLc1kQuyGGzl9PGZ/RGkXnA +2nEK9vJLQS7682OoNf2rgAK2gkR2S3D9NxR9fsRaCduWMlfINmOiDfu93dSx +yTwVae0VbCS1YlJtI3a0+r44/7ZJpKJdIKuJ/VGma3NYMQf1uGad24xNuPr5 +Xr00jXx1+uYMsKeyeG5VHfuBEvmtM4ywV6hoi3P0ZlG+SbULYF8jmizFpeaQ +Hf3+aRq20l2X6E3zc+iWYGfLbmwjrXj20fqfSMUy/4sdts+WgbZxs0X005lU +IbFnIo7zr1z/B8XYv8z2xz5bL7yDuuIvepF4gBaMfQOM7nu3LaGt02zJM9x+ +BS20kOJlIK2hV5uOXfzy6uA5Ci9YZbITs7l9v7pHpl7ihaTC7sR87EiN2eqK +Y3xwr0JFpJrbt1xZdVJPAALaK9e8xe7pYDb+vSMAejENpj3c/tMPXcWklsP5 +3smbw9glBrZp2vPLwd6nvf0HdvPjU8sC6leA15zvTtk+JpptejfwzUwE9n5q +2eSLLWktIn66UQRaNvkshmHrdtFA1FgU4tTqf5/F9vvyIG+zjhi8lziVlokd +xNumu1NEHKTKbJVeY4+qlHHi5iSgTm24YWc/3g/ZKtSuLwmt1LM11ti898eU +ZYMlQTXlf/2HsJX0FQ8UT0iCrrbbq1PYrmYpVW8GV8PfmUD+eux2r5BQmVdS +EF7/YpY2wET9d5OTPFZIA79wh4wTNnOi+M49c2n4eel0gC/2yrCRd9ufSYOv +c3VpMjYt1sHA44EM9E6lXvmMXZe/ZbYoVw7mB706ogaZKH/0V/i2MHl4wlMH +E0NMtNsxoT+0VB7cD86t4R3G+c2rLUrH5KF3PUjJYRvka0kpuSiAqupCpiV2 +M929WsBEEeLujFcXYk9PDp74FqMEgWUy1KMjTLT6KK2m2kYFtIaLJSmjTDSW +v9Jnv58KbN+xSG7FftTbQWHFq8BECvpqj+1mfThm/TMV6He84X8ZO18z/ECm +nirMa56I4R3D7x+/OxUlowbtQiKTM9gO3sLaVkPqMH7TvuzXNyZC4Y56Tn/U +gc++qovynYk04nK3EnLrYfGNtvpObJ47+qZRduuB3hxOO4td2n/Iqerf9SCn +oBe5Yhx/nwdLzq29vQH4Gx3blSZwP5rN+3E6FSpyYTGIxUR37DM+z0dR4a3a +ciIDO5k+NMh/kwoso6bZJ9jE2eMTCu+ooCKkmCHMZiKJhmweezMNeP7BuLMI +20+frVGvqgmUv5+VJyaZiKJyJTrpixao5cZrXplmoobEGeoCrzZoNl2ObcR2 +++HSRSprwyVasxgbO6dZjWrqrg3vRR/V2vxgIhXvurc/P2hDvHSCw6oZPG/J +qDr5Sgcuuiq+vDnLRPIUBVLJRReSjleHfvrJRFoFYSK/kR6ce1cb93WJiehE +zKy2rR5UBZ5RVORhoRuqaf0ebnqgfunuyEFsvtvlFS8j9EC1RmHiJXZPzrhD +WqUeeB71mitaxkIXb3hkU1X1IW0ofTGMj4XGkqx1nJcbwJobHx5rCbLQrRC1 +/Q/aDGHoH8PYtatYqCMcbY0tMIbush6XBBUWUnbvtj0csBMSVtRmJhqxEGOp +tkz+JMBhWZrF3X0sJDPxSFCGbgrVVgfjT/izUJj+jt40DRow6BadPxJYiM5a +bFk9bg7WqMtAq5CFSk1DBXPbLSEqCz6F/I+F8mf8/i25tgeEQj0Ls5gs9HOX +7Ovm6L0Q/PkEISnFRn08fJwhTxtw8dv8Qhix0bF1gSnnVPeBT2f1uLQPG5X5 +tjy7HrcfTshFZiSms9GpH3Lzmr52MNW1YupaExvNWlkc/O/IAWi0Mt+4ao6N +jA+l7hq1s4dKYcNsFeokeiuX7des7wDpb/ZbL7hMorWFMQ1FGx3BZOROt2DK +JHo0qGFtK3oQHilX+rg2TSKFrinvcNZBIP6MBO6em0T611NL7gw6gZBEIGWZ +zBTK5v+hk9bkDDk/Ep4pbp5Ctbs29cQ9dgEnmmN+kM0UurE1UWKx2BWOeCvH +K/hOofbPBfH6lw5BxT+3rtSen0IPbLLUgs66QcAWx+uyOVOIc9Se5xhxGCq0 +JL9tejiFZi2oPmwzd2j2316zrX0KFbE+/QzdcgSyBqqTU79NIedbBV6HRTzA +8t66c15LU6i6au8RvgQPUEof2S4nw0HGlLcLFxc8wFrMSH6DFgepDnr3dPp6 +wsBNyrL7iIO+CPvvyxrxhHT5J0eO23NQR7Ktl6UjHVgxZ9ZcIDjoWkSu8PEO +OvzaqL2bPM5BDY1LC157vICIgH0GsRy0yg0S9Ou8oHud+axbCgcprfmvfV0D +dkOvRDK2bpuN7PJGLxDnUVz1FPvAjkP3Pv7rBWVPk+8rpeL8deGvzvzPCzIX +E/2Hsdf23V/V8tELqGQ0n8dVDlJzl7nhNu8FS3NmQWbpeB4PdlGcAQFaFwQ2 +Fd/koMLMqVDbLQT8AeJ6B/aad9MmMkYENHT6DMxhs83nu4q2E2CCHBXMsjj4 +/8WzrM2UgBRDZ8sebLF5CRdJOwJuGsyZ8uXgfVw2FMo9SkCI8vUWlMdBdv9t +7fIOJOBu50IWHbuRZ1uubjABUQ4ZDnHYmaEmhs/DCNjXF3i0FdvWxdJz9DQB +Dp93mNvf4qDHai6PNRMJmBaLSjxym4OS6yN9HxUScDF/2JGez0FH9TKMI4oI +cBuJYZ/Ftr5XKWRUTID7krx/LvbKjLF7D0sJmOjeLN6LHReyf7y2hgD/h0lC +DgUcFElV83/wnIDjumW1JoUc5JfxKqCqH+/ntfu3v3c5aI/Y2I6QQQKy8hd+ +yRVx0MY4HlG9YQIsLbZxDLDHQgxLK0cJyNC6c8EP29M2l1XBJODkZDu9C9tZ +IPRY+S8CnAbOPr99j4MsQ9cGlUgzIMxaWVHjPgc9z423SpNlAP3ESK4Z9o62 +abWItQyQr53864atq/7qk5kCA1TyPjtdwZb7cNrsszoDntNqw6axJ7b1Sa80 +ZMA7QtO5qoSDrvDmPfG2Z0AKI6xGtgzPv0nkho0jA2Q40Qva2LGHIkL0nRjg +ORS3zgw7omb/hiVXBix9P7EYgO1JLktNpzPAzLhW9Sm2fiudeBHMAKu0GtHD +5Rz0IVVdWDWFAWlL23dFV3BQGRL1+ZbKgLl90YpXsGNZM82lVxkQqzM+kIOt +t6c5yiiDAUcf6Qo2YifzeE3b5OB5Ep0nf2FbBOZ9iihhwImUj2qBlRwkL39h +i0kZAy6eH1c7gz3TGniVr4IBEq9FBZOwb69HNsnVDFBFMcGF2H/6+p7dqWNA +waLAwGfsGmtK0ZsWBuygOlF2VXFQ0i9egWutDBjT+77dBpteNO7p0saA+PUn +TVywxfnrKF/aGZBul/w9CDug3vnKwnsG/F489iEHW1UjPVxtFO+bX15iFvvX +hzPvvo8xYBNV1G4JuyOOoVv+jQG3ro6HCFVzUNSQwbgxkwFXQ33d5LF7brw7 +vO8HA24nHX5php0mKGF+ahkJ/RUus4nYDdN9h8L4SPjVPmp1DftrX3HIMQES +/v07diobe0cNLY8uRIKdJc2vHHvMI+K3lQQJgtk28Z3Y4tbmkuarSYjVZ5R/ +wt6+VZKKpEgwbfpeNYSdIlpyUF+OhEPSW/ZwuNfrBiopyiTMhD+vEqvhILKg +pEVKlYT2/I3lUtgpKScHVqmTQH89E7cOe4xcLcpPJSF9uP45lXt9taUPU5eE +D32TEabYdX9XR4/pkeAbE7R7N/bo98HrgwbYO+2mbbC3PTvV1GVEwltb3W5n +7C8BZQpPgISnZ+w/BGCLOZ82fGiK+5s0nQzGNjbbbV1JI+GPefLccexkueGT +BbtJSJIyiI7CfsRfnpJrRcKnftGk89gjk6fvZlqTsIcDwfHYRi+lui/vJ8FG +rbLtMja9cngi4QAJhr6sXanYl7PKec87kMBE51KvYQ+H7NENdyahnlL29B9s +UXdpyyBXEqx8LHKyuXl7Rg77uZFwvdvAKY/7vOKZJHcPEq51SjoXcPustLrt +TCdhtHVZ3l1u3qz04wMECUp15s/vcfOGRtqtSRKuHulvvM/Na6sYs/DB90e/ +ul7K7ffwzB/wI0Hni4hlOTf/ttWa7QEkDLrcflvBzb8so2l4jISeqiSjKm5+ +xJddm4JIcH7RElGNLUJUOlNDSOANcLlag711X1SgahgJQ3E7Lzzg5m/bGy8f +TgI5F+ZUi31JXTZbJoIEr4IlnofYteKj1RKnSJCI7ovleuh3ZatwJAliYWIj +XIt8jRoSiCLB82Qa5RH2lrd7fy5FkxB4wVeH6/8D6bNHxA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "PlotRange" -> {{0, 180}, {0.9018629878896658, 1.106620961473279}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.9018629878896678}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12446,21 +13495,20 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.9018629878896658, 1.106620961473279}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.9018629878896678}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12474,105 +13522,104 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV1Hk0Ff8bB3BZkiyhbN3sVNeWLEWLzxMXJZSQJYlr7ljLmlSishUlVOSb +rUKSnVRIfaO+flIoWmQXFfderiwp5fe5f8yZ8zoz857385wzo0wPPMDg5eHh +YeGDew5+o7PhYccbk9byN82repnIhJ1vSKeVoF5B7x6uB3O3XFOjNaDSdB2K +OPZ+4vVyEf0XiOqqnsB1ZUR0kwCtDY3Z7lWQwL74UvZZdHEn6g3MG+T6cUdw +zqJeN3pTq/ZGEnu8pzXyZP1H9IfycWw19tpR1UNzZr3II71OQwp772SkcWjb +AHKntGVKYzcujgtHFA+hDbkiBrLY78/JnK49NoLc1kQuyGGzl9PGZ/RGkXnA +2nEK9vJLQS7682OoNf2rgAK2gkR2S3D9NxR9fsRaCduWMlfINmOiDfu93dSx +yTwVae0VbCS1YlJtI3a0+r44/7ZJpKJdIKuJ/VGma3NYMQf1uGad24xNuPr5 +Xr00jXx1+uYMsKeyeG5VHfuBEvmtM4ywV6hoi3P0ZlG+SbULYF8jmizFpeaQ +Hf3+aRq20l2X6E3zc+iWYGfLbmwjrXj20fqfSMUy/4sdts+WgbZxs0X005lU +IbFnIo7zr1z/B8XYv8z2xz5bL7yDuuIvepF4gBaMfQOM7nu3LaGt02zJM9x+ +BS20kOJlIK2hV5uOXfzy6uA5Ci9YZbITs7l9v7pHpl7ihaTC7sR87EiN2eqK +Y3xwr0JFpJrbt1xZdVJPAALaK9e8xe7pYDb+vSMAejENpj3c/tMPXcWklsP5 +3smbw9glBrZp2vPLwd6nvf0HdvPjU8sC6leA15zvTtk+JpptejfwzUwE9n5q +2eSLLWktIn66UQRaNvkshmHrdtFA1FgU4tTqf5/F9vvyIG+zjhi8lziVlokd +xNumu1NEHKTKbJVeY4+qlHHi5iSgTm24YWc/3g/ZKtSuLwmt1LM11ti898eU +ZYMlQTXlf/2HsJX0FQ8UT0iCrrbbq1PYrmYpVW8GV8PfmUD+eux2r5BQmVdS +EF7/YpY2wET9d5OTPFZIA79wh4wTNnOi+M49c2n4eel0gC/2yrCRd9ufSYOv +c3VpMjYt1sHA44EM9E6lXvmMXZe/ZbYoVw7mB706ogaZKH/0V/i2MHl4wlMH +E0NMtNsxoT+0VB7cD86t4R3G+c2rLUrH5KF3PUjJYRvka0kpuSiAqupCpiV2 +M929WsBEEeLujFcXYk9PDp74FqMEgWUy1KMjTLT6KK2m2kYFtIaLJSmjTDSW +v9Jnv58KbN+xSG7FftTbQWHFq8BECvpqj+1mfThm/TMV6He84X8ZO18z/ECm +nirMa56I4R3D7x+/OxUlowbtQiKTM9gO3sLaVkPqMH7TvuzXNyZC4Y56Tn/U +gc++qovynYk04nK3EnLrYfGNtvpObJ47+qZRduuB3hxOO4td2n/Iqerf9SCn +oBe5Yhx/nwdLzq29vQH4Gx3blSZwP5rN+3E6FSpyYTGIxUR37DM+z0dR4a3a +ciIDO5k+NMh/kwoso6bZJ9jE2eMTCu+ooCKkmCHMZiKJhmweezMNeP7BuLMI +20+frVGvqgmUv5+VJyaZiKJyJTrpixao5cZrXplmoobEGeoCrzZoNl2ObcR2 +++HSRSprwyVasxgbO6dZjWrqrg3vRR/V2vxgIhXvurc/P2hDvHSCw6oZPG/J +qDr5Sgcuuiq+vDnLRPIUBVLJRReSjleHfvrJRFoFYSK/kR6ce1cb93WJiehE +zKy2rR5UBZ5RVORhoRuqaf0ebnqgfunuyEFsvtvlFS8j9EC1RmHiJXZPzrhD +WqUeeB71mitaxkIXb3hkU1X1IW0ofTGMj4XGkqx1nJcbwJobHx5rCbLQrRC1 +/Q/aDGHoH8PYtatYqCMcbY0tMIbush6XBBUWUnbvtj0csBMSVtRmJhqxEGOp +tkz+JMBhWZrF3X0sJDPxSFCGbgrVVgfjT/izUJj+jt40DRow6BadPxJYiM5a +bFk9bg7WqMtAq5CFSk1DBXPbLSEqCz6F/I+F8mf8/i25tgeEQj0Ls5gs9HOX +7Ovm6L0Q/PkEISnFRn08fJwhTxtw8dv8Qhix0bF1gSnnVPeBT2f1uLQPG5X5 +tjy7HrcfTshFZiSms9GpH3Lzmr52MNW1YupaExvNWlkc/O/IAWi0Mt+4ao6N +jA+l7hq1s4dKYcNsFeokeiuX7des7wDpb/ZbL7hMorWFMQ1FGx3BZOROt2DK +JHo0qGFtK3oQHilX+rg2TSKFrinvcNZBIP6MBO6em0T611NL7gw6gZBEIGWZ +zBTK5v+hk9bkDDk/Ep4pbp5Ctbs29cQ9dgEnmmN+kM0UurE1UWKx2BWOeCvH +K/hOofbPBfH6lw5BxT+3rtSen0IPbLLUgs66QcAWx+uyOVOIc9Se5xhxGCq0 +JL9tejiFZi2oPmwzd2j2316zrX0KFbE+/QzdcgSyBqqTU79NIedbBV6HRTzA +8t66c15LU6i6au8RvgQPUEof2S4nw0HGlLcLFxc8wFrMSH6DFgepDnr3dPp6 +wsBNyrL7iIO+CPvvyxrxhHT5J0eO23NQR7Ktl6UjHVgxZ9ZcIDjoWkSu8PEO +OvzaqL2bPM5BDY1LC157vICIgH0GsRy0yg0S9Ou8oHud+axbCgcprfmvfV0D +dkOvRDK2bpuN7PJGLxDnUVz1FPvAjkP3Pv7rBWVPk+8rpeL8deGvzvzPCzIX +E/2Hsdf23V/V8tELqGQ0n8dVDlJzl7nhNu8FS3NmQWbpeB4PdlGcAQFaFwQ2 +Fd/koMLMqVDbLQT8AeJ6B/aad9MmMkYENHT6DMxhs83nu4q2E2CCHBXMsjj4 +/8WzrM2UgBRDZ8sebLF5CRdJOwJuGsyZ8uXgfVw2FMo9SkCI8vUWlMdBdv9t +7fIOJOBu50IWHbuRZ1uubjABUQ4ZDnHYmaEmhs/DCNjXF3i0FdvWxdJz9DQB +Dp93mNvf4qDHai6PNRMJmBaLSjxym4OS6yN9HxUScDF/2JGez0FH9TKMI4oI +cBuJYZ/Ftr5XKWRUTID7krx/LvbKjLF7D0sJmOjeLN6LHReyf7y2hgD/h0lC +DgUcFElV83/wnIDjumW1JoUc5JfxKqCqH+/ntfu3v3c5aI/Y2I6QQQKy8hd+ +yRVx0MY4HlG9YQIsLbZxDLDHQgxLK0cJyNC6c8EP29M2l1XBJODkZDu9C9tZ +IPRY+S8CnAbOPr99j4MsQ9cGlUgzIMxaWVHjPgc9z423SpNlAP3ESK4Z9o62 +abWItQyQr53864atq/7qk5kCA1TyPjtdwZb7cNrsszoDntNqw6axJ7b1Sa80 +ZMA7QtO5qoSDrvDmPfG2Z0AKI6xGtgzPv0nkho0jA2Q40Qva2LGHIkL0nRjg +ORS3zgw7omb/hiVXBix9P7EYgO1JLktNpzPAzLhW9Sm2fiudeBHMAKu0GtHD +5Rz0IVVdWDWFAWlL23dFV3BQGRL1+ZbKgLl90YpXsGNZM82lVxkQqzM+kIOt +t6c5yiiDAUcf6Qo2YifzeE3b5OB5Ep0nf2FbBOZ9iihhwImUj2qBlRwkL39h +i0kZAy6eH1c7gz3TGniVr4IBEq9FBZOwb69HNsnVDFBFMcGF2H/6+p7dqWNA +waLAwGfsGmtK0ZsWBuygOlF2VXFQ0i9egWutDBjT+77dBpteNO7p0saA+PUn +TVywxfnrKF/aGZBul/w9CDug3vnKwnsG/F489iEHW1UjPVxtFO+bX15iFvvX +hzPvvo8xYBNV1G4JuyOOoVv+jQG3ro6HCFVzUNSQwbgxkwFXQ33d5LF7brw7 +vO8HA24nHX5php0mKGF+ahkJ/RUus4nYDdN9h8L4SPjVPmp1DftrX3HIMQES +/v07diobe0cNLY8uRIKdJc2vHHvMI+K3lQQJgtk28Z3Y4tbmkuarSYjVZ5R/ +wt6+VZKKpEgwbfpeNYSdIlpyUF+OhEPSW/ZwuNfrBiopyiTMhD+vEqvhILKg +pEVKlYT2/I3lUtgpKScHVqmTQH89E7cOe4xcLcpPJSF9uP45lXt9taUPU5eE +D32TEabYdX9XR4/pkeAbE7R7N/bo98HrgwbYO+2mbbC3PTvV1GVEwltb3W5n +7C8BZQpPgISnZ+w/BGCLOZ82fGiK+5s0nQzGNjbbbV1JI+GPefLccexkueGT +BbtJSJIyiI7CfsRfnpJrRcKnftGk89gjk6fvZlqTsIcDwfHYRi+lui/vJ8FG +rbLtMja9cngi4QAJhr6sXanYl7PKec87kMBE51KvYQ+H7NENdyahnlL29B9s +UXdpyyBXEqx8LHKyuXl7Rg77uZFwvdvAKY/7vOKZJHcPEq51SjoXcPustLrt +TCdhtHVZ3l1u3qz04wMECUp15s/vcfOGRtqtSRKuHulvvM/Na6sYs/DB90e/ +ul7K7ffwzB/wI0Hni4hlOTf/ttWa7QEkDLrcflvBzb8so2l4jISeqiSjKm5+ +xJddm4JIcH7RElGNLUJUOlNDSOANcLlag711X1SgahgJQ3E7Lzzg5m/bGy8f +TgI5F+ZUi31JXTZbJoIEr4IlnofYteKj1RKnSJCI7ovleuh3ZatwJAliYWIj +XIt8jRoSiCLB82Qa5RH2lrd7fy5FkxB4wVeH6/8D6bNHxA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.9018629878896658, 1.106620961473279}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.9018629878896678}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12582,7 +13629,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5012481131960849}, + AxesOrigin->{0, 0.9018629878896678}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12610,7 +13658,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.9018629878896658, 1.106620961473279}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12618,9 +13667,9 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991342629715925*^9}, + CellChangeTimes->{3.991342629715925*^9, 3.994356508969483*^9}, CellLabel-> - "Out[386]=",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] + "Out[139]=",ExpressionUUID->"0c5a45de-b55b-4f57-a7a5-6265eb30e58b"] }, Open ]], Cell[CellGroupData[{ @@ -12683,156 +13732,162 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991849950722357*^9, - 3.9918499540026855`*^9}},ExpressionUUID->"1ea503b1-33a1-2744-a92d-\ -2e1269faf5ed"], + CellChangeTimes->{{3.991849950722357*^9, 3.9918499540026855`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.03396961278019`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"8.029296911168339`*^-278\\\", \ +\\\"1263377636044591724886240423994982400000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994356509168147*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"e79d34e2-b70a-4ff0-9e42-acb2d184d8f4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.039086206052533`*^-290\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 70, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994356509177125*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"42888dba-1526-4db9-8757-12795146ea09"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.178376888679172`*^-303\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 387, - 405, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299467087`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 71, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994356509186417*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.366286872093514`*^-285\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 387, 406, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629956772*^9}, - CellLabel-> - "During evaluation of \ -In[387]:=",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.843812508005402`*^-296\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 387, 407, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629966284*^9}, - CellLabel-> - "During evaluation of \ -In[387]:=",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], +In[140]:=",ExpressionUUID->"a93eb404-dbec-4558-9cea-35c1a8a1f987"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 387, 408, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299753895`*^9}, +during this calculation.\"", 2, 140, 72, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.9943565091957283`*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], +In[140]:=",ExpressionUUID->"f981026e-6e90-4c44-928e-4671b207966f"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc81e8XAHCjpEEksse9n2tlRSnjOieKpK8t0VBGRsgosyK7qIQQoiTz +fm6L7PhGpWkks2jQQEiZfeX3+f31eb3/ec7zPJ/znHPknI9bu3FxcHCs4OTg ++P93ZuBZM5FYYOBzMj3605dtBp25oqHbe6Jg9ukHl9puEUDhVmfRnhQ4XwrP +4rvlIciytJu7Jx88xxbZ7t3aIDi+IWW++x4M9+70Neg2hsE68+O/ux+B4rgE +5+OuvWBMjLz/2d0B90dLVKc7j8J899Yrk92f4O+zFxqPXgVBk1FRQXv+LwgJ +a2yduxEPkoPVX5xVFqGJuz640v0yrPd2Kl1hxI1cwkJF1pXpkLLJuNbcjhev +aN931dfLgd5MjcafAnworb90My7pOiQWRLRyiQlixn2txK+cN2FD2udzqdeE +UOTrv2UdW29BvK2pQceMMC52M53H1xdBoM4Np2dRonj5wpy/2GAx7JhYCPP9 +LI6bEjIzrlmWQuiuNOV/x8SRO7xRqtOuFNg3VPuEZsTxU7C+4or9pSBqe1in +mlcCJRb4njm7lcJY1eNZbjUJzE+w0JwMLYXUqOQTV0Mk0FvsgrtLfil8Epb3 +beaTxPiYisKSyVI4q291RHybFL4/lwmlUWWw61Du1FZDKZQ0P2J8KL4M+CNH +o+32SKFPIieDP6kMcppiC5MPS+H9UjPPI1fKoGp3zSjPOSk8nd21qquoDCb3 +0YN+9UphIndh9uyLMjh0cvr8y3BptDd/HiIhyAJGhqHkSKw0Hkz1tNotzKL2 +e4lckSyNGZNjSyfEWBD2n1KbYYE0Kl28NVAvx4Ir0YeEq19KY9YU86aUJgte +Xn6ad0tKBp1EbS2ErVmgy75afqZBBiN8e64OX2TBju7Xi+MtMjjoallkmcIC +c45lJk4dMugxdESk6goLXKx9e2FYBsNV68VO5bDAOFwuInK5LA5a+1X1lLDA +T2bm5vaNsji8Q8h/qIkFze55P5qCZPGe4b4242kWmP6ns+5UuCw27qbZGMyx +4HVyp/bmSFmMtjbT1/zDgt7qlZEF52TxB2eM4VpOEsZXn1gXmyOLGuV6RO4a +EkTv7Npq/EgWY2IjvNfSSfCe+xnZwieHhoG197f/Q4Ku/1GRL+vkMNDmptd/ +FiTwjvSVcYvKodAL9sQ9axJu9Td1GdDk0LnilpvQPhIGHl5RqdCWQ70Xp1fn +O5NgEavTc8NJDh1Kza/MBJEg/Zf0aXCVQ8dcxQO+oSSMBdG433vKYamA1+zH +cBISPFariZ6Qw2t337LqIkloNHsffTFBDqX8XWXwPAma686qh9+VwxYV0fiI +HBI4EqebMx/I4WU7eFaeS8Jrbi/HB7VyKFLJ/XX4OgnHpq1jfz6Wwy2y1pV6 +t0go6CH63fvkUHOppqqCJEEkryXOlpuGn4953f5cT8L8RoEBVTsazlnZyW3s +J2HmmvhZLUcaWq+qnOp8R8LvtQxCx4mGN1exusIGqPv8peO1w5OGRSrJPTUf +SfhU6zLjeJqGbpEanau/kfDcrJI/4RYNBbmmVaZ+kfC0/t+7F0ppKLnY6H1w +moRm9Ze2qbdpWCce0dI8Q8JDoY9ZudU0tA/Z2RU/T8K9/lUKFa9oeJ5mdWDw +LwlZxw7Bp2kaCs2U5XXysiHjvcenrws09HB48Z1zFRvSLAJjfyzRMO0bj+PG +1Wy4qJXwYm4lHe8Yh9wO4GND1J+79mul6fhHaRbfCLIhwqduYT2djrysW68/ +rmPDqcEn18QV6ajT0Bo/JsSGoKb+zwxNOmq12EbMCLPhWOJyP31jOr7ljUx/ +J8YGj8W1QoZmdFR3c0l9Kc6Go8fFH5hY0jHdwvrfKgk2HLZR/8/akY7Ta5Xu +x0qxwVbCIcHTl46Pqhq4pmTZoF/Gup6eTkdmjfLv9Qps6Jcty9uZTUfVyZdO +dZTD0ktyf+fRccuO1NjDimyoPFuYY11CR0vtJc48JTZo7rueyV9HxbPLaP29 +kQ3tr3Iz6hvpWFV1VSpKhQ1+RtfSvR/T0U6/XHmNKhvYallpz1/TMXCsIkZE +jQ1Ky9OS4z7SMWa0yHSZBhtawlIubflCx29x9Pxgykcnky8OjVDxa149/Eq5 +oP9CkuFvOhaCkcnDTWwwskpK/DlHR5tLjuWEJhs+PTl//voiHff7b/sWT1n2 +XnzCXx4C9e8MF+7QYkODQlw8uZrANQbLtXIpH7oWE3dAgMCUhsSE35SzE87G +1IgR+G9tYErGZjbo/o2I9pQmsOCy0q4hyj2BZ6JE6QTKCU48U93CBhGn8Mgg +FQJbA+w3V1Ku6AyNYGwi0KzdWnqWsu3ukDOdWwg80M7fraXNhl8NQaejdQnU +nt/m5EM5ZcvJU5pA4A2riMqblDeVBYZ/NCLws1vyhy7KbbIBYcm7CLQzkujn +2coGvjXHQ8atCBzccNDkIGXWWZ/ga3sJjLt7oiaa8u7ZY0F79hM4tO8pZxHl +795eJ/84ERhwg0f6KeWETx4nSl0JXJ43tHaIssI+90AHTwIDh4V6Fik/eeUW +wOtLoFOCSfD6bWxwM3L1rwyg1hPXGlegvKza2e9oMIHbb59nbqN8U+3IceFT +BOZ2cR3dSdmwwMm3OZJA8rqlhwXlD2KHfAJjCTyRrbRzL+WISwe8aecJ/NZh +tOhAWXr5/mPtFwmsb7O77Ei5LszBKzKVQJ4cEa59lPdP2nuqZxI4VsW0tKa8 +4LbXYyCHQE/F6FOmlK/227pfuEHglHtePJPyNiubo/qFBOr4mwWoUe5+YuU2 +Wkrgm2pkSlIO0rd0zbpN4KimznceysL3zF1My6n7MJ0IGqfOX67wj/NcFYF5 +n6W+dlC2vmZ2pKieWt81Urec8s91uw/vfURgdkmHfwrlHm9am9dT6r722O/2 +otz4ZAEiXhL4tVfrlAHlYtk3t1PbCVT97sC7lnJyWJlMcReVL1W1E/3U/w3p +jL5U10/gdbU9WrcoH1Y7sNT2gUDN7r9vvChrfFozOD9C4PymHI1RKp9E9YfN ++ScJ5NLzH79FmSO9/iFtmsCLdCbfQcqtpr65ZksEGttd8W+k8vXBTWP+w8sY +KC0mWO1NOXdR+syJlQx8d8fZTZiy793Wg9eEGPjSymdyP5X/e1cXv7orysDu +EfH2eer9GLhFMp9IMTAvKF48jTKf2CapCQUG2gZcGK2n3h8rMuUd6jOQsYsj +/4s6Vf/6vPbYbWfg1H7bIXfKpzYb1XkaM7C3xD5jmHrvZt9+ZadYMlCw87hN +F1UPRizs9g+5MrCApOMFqn50lKi+mPNk4OOLysSUMhtquHn0+I4z0E1nLtKG +8rnKB+LaoQy8q7hUvJqqP4oyon3xF6j4oRGtVvJsEAidNM1JYWBD2Kn0LAYb +5jpaqu9kMHC/+pmBQYKqL3GhV3tvMHDH2+ppJzob3Mf79m18wECHdIdD2lQ9 +NN91vwVqGZiY0bDbRYYN2vmJ22wbqfPkXWhMkmYDz1590dPPGThqn7vnrSQb +Cuuvdb8eYOBZYcdlTKoeDyUd3huwQh7d/ph/cqfqu++ICk1jjTw6b1GsPi7A +hlmT+R8/BOQxdyIh68RaNqziTon1FJfH8WPHI09S/UEjtKn8sKo8dqx49dNm +JRtOu8kLWdjIoxHJuTmGg4rfNDWwZp88/uZ5L31wiYRk2YbS5wfk0ZVVTNOi ++lNBv72h8VF57PtcFdL1h+p/Vuf8maHyqPXNK2SB6m8iBmOtG/PkscL4cVrV +GAnXs6uyv9+Ux6/BcqddRklQmo9xLyqWx+9WuhdWj5CgXy61RLsnj3zqzoo2 +X0lwUbZQE38sj1w7P7g2Uv32jsi9JN5RedwQF/BcqIsE04lg02FtBWy4ajNf +UEeC5CbpOF59BVQtepDdUUP164DmRxu3K2DKKH31YhUJaTMC+gFmChhFl9i7 +q4KaXxZL1JacFPCJZ3xDFTUfBKx5JyR2TgHFVssscFLzRZYSDuzpV8Bjgq1T +BqeoeenYF3G/Dwpo+KiwhDeMBCCT7FOHFbBo5669rcEkDGn0tvVOKGBNrUS6 +TSAJatsCmo4uU8S/h850bvUiocm4oDhSVRE3z+v6+9lT85ALb2B5hCJOJ1W6 +lalT+83dUd8Qo4hsfm5/mioJE72RK16cU0SNwa8P0pVJmLKYz/6Yqoignzob +xCBhVm+kmb9YEWUnxPxEJEjgWv9SxLNNEXkGZQ50LCdBrPlSjZScEnIv2y5r +0kvNm8QGrvhHSqg+Yq/mE8KC784mxXpPlZDrQ9rnwJMsSLoRbD75Qgl/rRwO +DglgwRvpniyHt0r4ZkrAMNybBYfFrmqpfFPCu87vwtwPsyCUX8KtnU8Zn/H1 ++vWbsIA1J90i4aCMH5YnrdSh5ut1r+Qv3plQRufGMFne0jKQTLhtqa2tgowW +J4VnxaWQuVFHQMhdFXUkGsWX5ZbAc/HtW35dVsPshqzmdTHFoCv5KFm9Sx1X +3TeeMMUi4OfOP3EkSgOP2UTse7y8EKTPyug7yG/CCY2FBeXiAljJOPDA+ukm +XMGpdz1zz01QY4rdDj6oiWrfspZp8OZDwMC6pt0cWtj+vPZYXdl1mPiVZGea +qYUrMcdCtDcXTNSfZJmqbsYiKznV8OAcePhL78/s680oyFnxX9HcVfBV0exr +d9uCfp3zRR71GcAcd+10WKmNGgG6mRZ+V2AnIfoPX742+jga76r3SAXFyPMh +j7ZuRdGd7uHO5y6DsptOA6NvK64bUqjk2HUJ3B56xJT7b8M2t58DeUuJ0HC9 +0/WnsA7qCjppGlQlwO/ipVn1Sh1UjN32UvJpLLgwylZm/aOLfr4coRuNo+Gn +cqr2vUld7DC/x+xojYSqgj8fpxP08LxiVNnRsNPguIOOetL62Gb1ZDKrLRQk +fOKr1Rr10Wx64Mo3wyAQXuV99x97JvKLC6aCZSAUGJ0Om3RgoolHQW+vUSBo +nr5olHqAib8W1peGbQ0E88k7b3uOMHH69sbBVulAiOuannfxZmLGx4h9LT8C +YC4/wjDsLBNbuWzCJpICoE8v9U1hGRO5M18I8LT5g8fJghxTNhMdMz+s8Gn2 +hxl2hdvYHSYSXG3Mvip/WEfrmd30gIlLXR8PPL3hD2a8UpL1jUzsMLKSHwv0 +h7rOQtc3b5nY8LC876CYP+zmr1IN6mHiQHZ3oQK/P/SYPJsR7Wfi7Ha/pFku +f/hdM5pw6AMTU2fIrJIxP1C9oUF+H2HiS2mBqL2NflDXtz0o6QcTh4Ku9FhW ++MHu9TagPslEHaeRLValfnA0/mT7iWkmPkm798clzQ9+N8ZlbZhjYq3sGaeg +c34QtZDhUrPAxIraZ40Xz/iBwOYSlYOLTMwc2y5FBvpBrk/N9NISE/tdUwPa +Pfzgf/MGbAg= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12846,115 +13901,117 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nc81e8XAHCjpEEksse9n2tlRSnjOieKpK8t0VBGRsgosyK7qIQQoiTz +fm6L7PhGpWkks2jQQEiZfeX3+f31eb3/ec7zPJ/znHPknI9bu3FxcHCs4OTg ++P93ZuBZM5FYYOBzMj3605dtBp25oqHbe6Jg9ukHl9puEUDhVmfRnhQ4XwrP +4rvlIciytJu7Jx88xxbZ7t3aIDi+IWW++x4M9+70Neg2hsE68+O/ux+B4rgE +5+OuvWBMjLz/2d0B90dLVKc7j8J899Yrk92f4O+zFxqPXgVBk1FRQXv+LwgJ +a2yduxEPkoPVX5xVFqGJuz640v0yrPd2Kl1hxI1cwkJF1pXpkLLJuNbcjhev +aN931dfLgd5MjcafAnworb90My7pOiQWRLRyiQlixn2txK+cN2FD2udzqdeE +UOTrv2UdW29BvK2pQceMMC52M53H1xdBoM4Np2dRonj5wpy/2GAx7JhYCPP9 +LI6bEjIzrlmWQuiuNOV/x8SRO7xRqtOuFNg3VPuEZsTxU7C+4or9pSBqe1in +mlcCJRb4njm7lcJY1eNZbjUJzE+w0JwMLYXUqOQTV0Mk0FvsgrtLfil8Epb3 +beaTxPiYisKSyVI4q291RHybFL4/lwmlUWWw61Du1FZDKZQ0P2J8KL4M+CNH +o+32SKFPIieDP6kMcppiC5MPS+H9UjPPI1fKoGp3zSjPOSk8nd21qquoDCb3 +0YN+9UphIndh9uyLMjh0cvr8y3BptDd/HiIhyAJGhqHkSKw0Hkz1tNotzKL2 +e4lckSyNGZNjSyfEWBD2n1KbYYE0Kl28NVAvx4Ir0YeEq19KY9YU86aUJgte +Xn6ad0tKBp1EbS2ErVmgy75afqZBBiN8e64OX2TBju7Xi+MtMjjoallkmcIC +c45lJk4dMugxdESk6goLXKx9e2FYBsNV68VO5bDAOFwuInK5LA5a+1X1lLDA +T2bm5vaNsji8Q8h/qIkFze55P5qCZPGe4b4242kWmP6ns+5UuCw27qbZGMyx +4HVyp/bmSFmMtjbT1/zDgt7qlZEF52TxB2eM4VpOEsZXn1gXmyOLGuV6RO4a +EkTv7Npq/EgWY2IjvNfSSfCe+xnZwieHhoG197f/Q4Ku/1GRL+vkMNDmptd/ +FiTwjvSVcYvKodAL9sQ9axJu9Td1GdDk0LnilpvQPhIGHl5RqdCWQ70Xp1fn +O5NgEavTc8NJDh1Kza/MBJEg/Zf0aXCVQ8dcxQO+oSSMBdG433vKYamA1+zH +cBISPFariZ6Qw2t337LqIkloNHsffTFBDqX8XWXwPAma686qh9+VwxYV0fiI +HBI4EqebMx/I4WU7eFaeS8Jrbi/HB7VyKFLJ/XX4OgnHpq1jfz6Wwy2y1pV6 +t0go6CH63fvkUHOppqqCJEEkryXOlpuGn4953f5cT8L8RoEBVTsazlnZyW3s +J2HmmvhZLUcaWq+qnOp8R8LvtQxCx4mGN1exusIGqPv8peO1w5OGRSrJPTUf +SfhU6zLjeJqGbpEanau/kfDcrJI/4RYNBbmmVaZ+kfC0/t+7F0ppKLnY6H1w +moRm9Ze2qbdpWCce0dI8Q8JDoY9ZudU0tA/Z2RU/T8K9/lUKFa9oeJ5mdWDw +LwlZxw7Bp2kaCs2U5XXysiHjvcenrws09HB48Z1zFRvSLAJjfyzRMO0bj+PG +1Wy4qJXwYm4lHe8Yh9wO4GND1J+79mul6fhHaRbfCLIhwqduYT2djrysW68/ +rmPDqcEn18QV6ajT0Bo/JsSGoKb+zwxNOmq12EbMCLPhWOJyP31jOr7ljUx/ +J8YGj8W1QoZmdFR3c0l9Kc6Go8fFH5hY0jHdwvrfKgk2HLZR/8/akY7Ta5Xu +x0qxwVbCIcHTl46Pqhq4pmTZoF/Gup6eTkdmjfLv9Qps6Jcty9uZTUfVyZdO +dZTD0ktyf+fRccuO1NjDimyoPFuYY11CR0vtJc48JTZo7rueyV9HxbPLaP29 +kQ3tr3Iz6hvpWFV1VSpKhQ1+RtfSvR/T0U6/XHmNKhvYallpz1/TMXCsIkZE +jQ1Ky9OS4z7SMWa0yHSZBhtawlIubflCx29x9Pxgykcnky8OjVDxa149/Eq5 +oP9CkuFvOhaCkcnDTWwwskpK/DlHR5tLjuWEJhs+PTl//voiHff7b/sWT1n2 +XnzCXx4C9e8MF+7QYkODQlw8uZrANQbLtXIpH7oWE3dAgMCUhsSE35SzE87G +1IgR+G9tYErGZjbo/o2I9pQmsOCy0q4hyj2BZ6JE6QTKCU48U93CBhGn8Mgg +FQJbA+w3V1Ku6AyNYGwi0KzdWnqWsu3ukDOdWwg80M7fraXNhl8NQaejdQnU +nt/m5EM5ZcvJU5pA4A2riMqblDeVBYZ/NCLws1vyhy7KbbIBYcm7CLQzkujn +2coGvjXHQ8atCBzccNDkIGXWWZ/ga3sJjLt7oiaa8u7ZY0F79hM4tO8pZxHl +795eJ/84ERhwg0f6KeWETx4nSl0JXJ43tHaIssI+90AHTwIDh4V6Fik/eeUW +wOtLoFOCSfD6bWxwM3L1rwyg1hPXGlegvKza2e9oMIHbb59nbqN8U+3IceFT +BOZ2cR3dSdmwwMm3OZJA8rqlhwXlD2KHfAJjCTyRrbRzL+WISwe8aecJ/NZh +tOhAWXr5/mPtFwmsb7O77Ei5LszBKzKVQJ4cEa59lPdP2nuqZxI4VsW0tKa8 +4LbXYyCHQE/F6FOmlK/227pfuEHglHtePJPyNiubo/qFBOr4mwWoUe5+YuU2 +Wkrgm2pkSlIO0rd0zbpN4KimznceysL3zF1My6n7MJ0IGqfOX67wj/NcFYF5 +n6W+dlC2vmZ2pKieWt81Urec8s91uw/vfURgdkmHfwrlHm9am9dT6r722O/2 +otz4ZAEiXhL4tVfrlAHlYtk3t1PbCVT97sC7lnJyWJlMcReVL1W1E/3U/w3p +jL5U10/gdbU9WrcoH1Y7sNT2gUDN7r9vvChrfFozOD9C4PymHI1RKp9E9YfN ++ScJ5NLzH79FmSO9/iFtmsCLdCbfQcqtpr65ZksEGttd8W+k8vXBTWP+w8sY +KC0mWO1NOXdR+syJlQx8d8fZTZiy793Wg9eEGPjSymdyP5X/e1cXv7orysDu +EfH2eer9GLhFMp9IMTAvKF48jTKf2CapCQUG2gZcGK2n3h8rMuUd6jOQsYsj +/4s6Vf/6vPbYbWfg1H7bIXfKpzYb1XkaM7C3xD5jmHrvZt9+ZadYMlCw87hN +F1UPRizs9g+5MrCApOMFqn50lKi+mPNk4OOLysSUMhtquHn0+I4z0E1nLtKG +8rnKB+LaoQy8q7hUvJqqP4oyon3xF6j4oRGtVvJsEAidNM1JYWBD2Kn0LAYb +5jpaqu9kMHC/+pmBQYKqL3GhV3tvMHDH2+ppJzob3Mf79m18wECHdIdD2lQ9 +NN91vwVqGZiY0bDbRYYN2vmJ22wbqfPkXWhMkmYDz1590dPPGThqn7vnrSQb +Cuuvdb8eYOBZYcdlTKoeDyUd3huwQh7d/ph/cqfqu++ICk1jjTw6b1GsPi7A +hlmT+R8/BOQxdyIh68RaNqziTon1FJfH8WPHI09S/UEjtKn8sKo8dqx49dNm +JRtOu8kLWdjIoxHJuTmGg4rfNDWwZp88/uZ5L31wiYRk2YbS5wfk0ZVVTNOi ++lNBv72h8VF57PtcFdL1h+p/Vuf8maHyqPXNK2SB6m8iBmOtG/PkscL4cVrV +GAnXs6uyv9+Ux6/BcqddRklQmo9xLyqWx+9WuhdWj5CgXy61RLsnj3zqzoo2 +X0lwUbZQE38sj1w7P7g2Uv32jsi9JN5RedwQF/BcqIsE04lg02FtBWy4ajNf +UEeC5CbpOF59BVQtepDdUUP164DmRxu3K2DKKH31YhUJaTMC+gFmChhFl9i7 +q4KaXxZL1JacFPCJZ3xDFTUfBKx5JyR2TgHFVssscFLzRZYSDuzpV8Bjgq1T +BqeoeenYF3G/Dwpo+KiwhDeMBCCT7FOHFbBo5669rcEkDGn0tvVOKGBNrUS6 +TSAJatsCmo4uU8S/h850bvUiocm4oDhSVRE3z+v6+9lT85ALb2B5hCJOJ1W6 +lalT+83dUd8Qo4hsfm5/mioJE72RK16cU0SNwa8P0pVJmLKYz/6Yqoignzob +xCBhVm+kmb9YEWUnxPxEJEjgWv9SxLNNEXkGZQ50LCdBrPlSjZScEnIv2y5r +0kvNm8QGrvhHSqg+Yq/mE8KC784mxXpPlZDrQ9rnwJMsSLoRbD75Qgl/rRwO +DglgwRvpniyHt0r4ZkrAMNybBYfFrmqpfFPCu87vwtwPsyCUX8KtnU8Zn/H1 ++vWbsIA1J90i4aCMH5YnrdSh5ut1r+Qv3plQRufGMFne0jKQTLhtqa2tgowW +J4VnxaWQuVFHQMhdFXUkGsWX5ZbAc/HtW35dVsPshqzmdTHFoCv5KFm9Sx1X +3TeeMMUi4OfOP3EkSgOP2UTse7y8EKTPyug7yG/CCY2FBeXiAljJOPDA+ukm +XMGpdz1zz01QY4rdDj6oiWrfspZp8OZDwMC6pt0cWtj+vPZYXdl1mPiVZGea +qYUrMcdCtDcXTNSfZJmqbsYiKznV8OAcePhL78/s680oyFnxX9HcVfBV0exr +d9uCfp3zRR71GcAcd+10WKmNGgG6mRZ+V2AnIfoPX742+jga76r3SAXFyPMh +j7ZuRdGd7uHO5y6DsptOA6NvK64bUqjk2HUJ3B56xJT7b8M2t58DeUuJ0HC9 +0/WnsA7qCjppGlQlwO/ipVn1Sh1UjN32UvJpLLgwylZm/aOLfr4coRuNo+Gn +cqr2vUld7DC/x+xojYSqgj8fpxP08LxiVNnRsNPguIOOetL62Gb1ZDKrLRQk +fOKr1Rr10Wx64Mo3wyAQXuV99x97JvKLC6aCZSAUGJ0Om3RgoolHQW+vUSBo +nr5olHqAib8W1peGbQ0E88k7b3uOMHH69sbBVulAiOuannfxZmLGx4h9LT8C +YC4/wjDsLBNbuWzCJpICoE8v9U1hGRO5M18I8LT5g8fJghxTNhMdMz+s8Gn2 +hxl2hdvYHSYSXG3Mvip/WEfrmd30gIlLXR8PPL3hD2a8UpL1jUzsMLKSHwv0 +h7rOQtc3b5nY8LC876CYP+zmr1IN6mHiQHZ3oQK/P/SYPJsR7Wfi7Ha/pFku +f/hdM5pw6AMTU2fIrJIxP1C9oUF+H2HiS2mBqL2NflDXtz0o6QcTh4Ku9FhW ++MHu9TagPslEHaeRLValfnA0/mT7iWkmPkm798clzQ9+N8ZlbZhjYq3sGaeg +c34QtZDhUrPAxIraZ40Xz/iBwOYSlYOLTMwc2y5FBvpBrk/N9NISE/tdUwPa +Pfzgf/MGbAg= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.059023695222010876`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12966,19 +14023,19 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.059023695222010876`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12992,114 +14049,116 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nc81e8XAHCjpEEksse9n2tlRSnjOieKpK8t0VBGRsgosyK7qIQQoiTz +fm6L7PhGpWkks2jQQEiZfeX3+f31eb3/ec7zPJ/znHPknI9bu3FxcHCs4OTg ++P93ZuBZM5FYYOBzMj3605dtBp25oqHbe6Jg9ukHl9puEUDhVmfRnhQ4XwrP +4rvlIciytJu7Jx88xxbZ7t3aIDi+IWW++x4M9+70Neg2hsE68+O/ux+B4rgE +5+OuvWBMjLz/2d0B90dLVKc7j8J899Yrk92f4O+zFxqPXgVBk1FRQXv+LwgJ +a2yduxEPkoPVX5xVFqGJuz640v0yrPd2Kl1hxI1cwkJF1pXpkLLJuNbcjhev +aN931dfLgd5MjcafAnworb90My7pOiQWRLRyiQlixn2txK+cN2FD2udzqdeE +UOTrv2UdW29BvK2pQceMMC52M53H1xdBoM4Np2dRonj5wpy/2GAx7JhYCPP9 +LI6bEjIzrlmWQuiuNOV/x8SRO7xRqtOuFNg3VPuEZsTxU7C+4or9pSBqe1in +mlcCJRb4njm7lcJY1eNZbjUJzE+w0JwMLYXUqOQTV0Mk0FvsgrtLfil8Epb3 +beaTxPiYisKSyVI4q291RHybFL4/lwmlUWWw61Du1FZDKZQ0P2J8KL4M+CNH +o+32SKFPIieDP6kMcppiC5MPS+H9UjPPI1fKoGp3zSjPOSk8nd21qquoDCb3 +0YN+9UphIndh9uyLMjh0cvr8y3BptDd/HiIhyAJGhqHkSKw0Hkz1tNotzKL2 +e4lckSyNGZNjSyfEWBD2n1KbYYE0Kl28NVAvx4Ir0YeEq19KY9YU86aUJgte +Xn6ad0tKBp1EbS2ErVmgy75afqZBBiN8e64OX2TBju7Xi+MtMjjoallkmcIC +c45lJk4dMugxdESk6goLXKx9e2FYBsNV68VO5bDAOFwuInK5LA5a+1X1lLDA +T2bm5vaNsji8Q8h/qIkFze55P5qCZPGe4b4242kWmP6ns+5UuCw27qbZGMyx +4HVyp/bmSFmMtjbT1/zDgt7qlZEF52TxB2eM4VpOEsZXn1gXmyOLGuV6RO4a +EkTv7Npq/EgWY2IjvNfSSfCe+xnZwieHhoG197f/Q4Ku/1GRL+vkMNDmptd/ +FiTwjvSVcYvKodAL9sQ9axJu9Td1GdDk0LnilpvQPhIGHl5RqdCWQ70Xp1fn +O5NgEavTc8NJDh1Kza/MBJEg/Zf0aXCVQ8dcxQO+oSSMBdG433vKYamA1+zH +cBISPFariZ6Qw2t337LqIkloNHsffTFBDqX8XWXwPAma686qh9+VwxYV0fiI +HBI4EqebMx/I4WU7eFaeS8Jrbi/HB7VyKFLJ/XX4OgnHpq1jfz6Wwy2y1pV6 +t0go6CH63fvkUHOppqqCJEEkryXOlpuGn4953f5cT8L8RoEBVTsazlnZyW3s +J2HmmvhZLUcaWq+qnOp8R8LvtQxCx4mGN1exusIGqPv8peO1w5OGRSrJPTUf +SfhU6zLjeJqGbpEanau/kfDcrJI/4RYNBbmmVaZ+kfC0/t+7F0ppKLnY6H1w +moRm9Ze2qbdpWCce0dI8Q8JDoY9ZudU0tA/Z2RU/T8K9/lUKFa9oeJ5mdWDw +LwlZxw7Bp2kaCs2U5XXysiHjvcenrws09HB48Z1zFRvSLAJjfyzRMO0bj+PG +1Wy4qJXwYm4lHe8Yh9wO4GND1J+79mul6fhHaRbfCLIhwqduYT2djrysW68/ +rmPDqcEn18QV6ajT0Bo/JsSGoKb+zwxNOmq12EbMCLPhWOJyP31jOr7ljUx/ +J8YGj8W1QoZmdFR3c0l9Kc6Go8fFH5hY0jHdwvrfKgk2HLZR/8/akY7Ta5Xu +x0qxwVbCIcHTl46Pqhq4pmTZoF/Gup6eTkdmjfLv9Qps6Jcty9uZTUfVyZdO +dZTD0ktyf+fRccuO1NjDimyoPFuYY11CR0vtJc48JTZo7rueyV9HxbPLaP29 +kQ3tr3Iz6hvpWFV1VSpKhQ1+RtfSvR/T0U6/XHmNKhvYallpz1/TMXCsIkZE +jQ1Ky9OS4z7SMWa0yHSZBhtawlIubflCx29x9Pxgykcnky8OjVDxa149/Eq5 +oP9CkuFvOhaCkcnDTWwwskpK/DlHR5tLjuWEJhs+PTl//voiHff7b/sWT1n2 +XnzCXx4C9e8MF+7QYkODQlw8uZrANQbLtXIpH7oWE3dAgMCUhsSE35SzE87G +1IgR+G9tYErGZjbo/o2I9pQmsOCy0q4hyj2BZ6JE6QTKCU48U93CBhGn8Mgg +FQJbA+w3V1Ku6AyNYGwi0KzdWnqWsu3ukDOdWwg80M7fraXNhl8NQaejdQnU +nt/m5EM5ZcvJU5pA4A2riMqblDeVBYZ/NCLws1vyhy7KbbIBYcm7CLQzkujn +2coGvjXHQ8atCBzccNDkIGXWWZ/ga3sJjLt7oiaa8u7ZY0F79hM4tO8pZxHl +795eJ/84ERhwg0f6KeWETx4nSl0JXJ43tHaIssI+90AHTwIDh4V6Fik/eeUW +wOtLoFOCSfD6bWxwM3L1rwyg1hPXGlegvKza2e9oMIHbb59nbqN8U+3IceFT +BOZ2cR3dSdmwwMm3OZJA8rqlhwXlD2KHfAJjCTyRrbRzL+WISwe8aecJ/NZh +tOhAWXr5/mPtFwmsb7O77Ei5LszBKzKVQJ4cEa59lPdP2nuqZxI4VsW0tKa8 +4LbXYyCHQE/F6FOmlK/227pfuEHglHtePJPyNiubo/qFBOr4mwWoUe5+YuU2 +Wkrgm2pkSlIO0rd0zbpN4KimznceysL3zF1My6n7MJ0IGqfOX67wj/NcFYF5 +n6W+dlC2vmZ2pKieWt81Urec8s91uw/vfURgdkmHfwrlHm9am9dT6r722O/2 +otz4ZAEiXhL4tVfrlAHlYtk3t1PbCVT97sC7lnJyWJlMcReVL1W1E/3U/w3p +jL5U10/gdbU9WrcoH1Y7sNT2gUDN7r9vvChrfFozOD9C4PymHI1RKp9E9YfN ++ScJ5NLzH79FmSO9/iFtmsCLdCbfQcqtpr65ZksEGttd8W+k8vXBTWP+w8sY +KC0mWO1NOXdR+syJlQx8d8fZTZiy793Wg9eEGPjSymdyP5X/e1cXv7orysDu +EfH2eer9GLhFMp9IMTAvKF48jTKf2CapCQUG2gZcGK2n3h8rMuUd6jOQsYsj +/4s6Vf/6vPbYbWfg1H7bIXfKpzYb1XkaM7C3xD5jmHrvZt9+ZadYMlCw87hN +F1UPRizs9g+5MrCApOMFqn50lKi+mPNk4OOLysSUMhtquHn0+I4z0E1nLtKG +8rnKB+LaoQy8q7hUvJqqP4oyon3xF6j4oRGtVvJsEAidNM1JYWBD2Kn0LAYb +5jpaqu9kMHC/+pmBQYKqL3GhV3tvMHDH2+ppJzob3Mf79m18wECHdIdD2lQ9 +NN91vwVqGZiY0bDbRYYN2vmJ22wbqfPkXWhMkmYDz1590dPPGThqn7vnrSQb +Cuuvdb8eYOBZYcdlTKoeDyUd3huwQh7d/ph/cqfqu++ICk1jjTw6b1GsPi7A +hlmT+R8/BOQxdyIh68RaNqziTon1FJfH8WPHI09S/UEjtKn8sKo8dqx49dNm +JRtOu8kLWdjIoxHJuTmGg4rfNDWwZp88/uZ5L31wiYRk2YbS5wfk0ZVVTNOi ++lNBv72h8VF57PtcFdL1h+p/Vuf8maHyqPXNK2SB6m8iBmOtG/PkscL4cVrV +GAnXs6uyv9+Ux6/BcqddRklQmo9xLyqWx+9WuhdWj5CgXy61RLsnj3zqzoo2 +X0lwUbZQE38sj1w7P7g2Uv32jsi9JN5RedwQF/BcqIsE04lg02FtBWy4ajNf +UEeC5CbpOF59BVQtepDdUUP164DmRxu3K2DKKH31YhUJaTMC+gFmChhFl9i7 +q4KaXxZL1JacFPCJZ3xDFTUfBKx5JyR2TgHFVssscFLzRZYSDuzpV8Bjgq1T +BqeoeenYF3G/Dwpo+KiwhDeMBCCT7FOHFbBo5669rcEkDGn0tvVOKGBNrUS6 +TSAJatsCmo4uU8S/h850bvUiocm4oDhSVRE3z+v6+9lT85ALb2B5hCJOJ1W6 +lalT+83dUd8Qo4hsfm5/mioJE72RK16cU0SNwa8P0pVJmLKYz/6Yqoignzob +xCBhVm+kmb9YEWUnxPxEJEjgWv9SxLNNEXkGZQ50LCdBrPlSjZScEnIv2y5r +0kvNm8QGrvhHSqg+Yq/mE8KC784mxXpPlZDrQ9rnwJMsSLoRbD75Qgl/rRwO +DglgwRvpniyHt0r4ZkrAMNybBYfFrmqpfFPCu87vwtwPsyCUX8KtnU8Zn/H1 ++vWbsIA1J90i4aCMH5YnrdSh5ut1r+Qv3plQRufGMFne0jKQTLhtqa2tgowW +J4VnxaWQuVFHQMhdFXUkGsWX5ZbAc/HtW35dVsPshqzmdTHFoCv5KFm9Sx1X +3TeeMMUi4OfOP3EkSgOP2UTse7y8EKTPyug7yG/CCY2FBeXiAljJOPDA+ukm +XMGpdz1zz01QY4rdDj6oiWrfspZp8OZDwMC6pt0cWtj+vPZYXdl1mPiVZGea +qYUrMcdCtDcXTNSfZJmqbsYiKznV8OAcePhL78/s680oyFnxX9HcVfBV0exr +d9uCfp3zRR71GcAcd+10WKmNGgG6mRZ+V2AnIfoPX742+jga76r3SAXFyPMh +j7ZuRdGd7uHO5y6DsptOA6NvK64bUqjk2HUJ3B56xJT7b8M2t58DeUuJ0HC9 +0/WnsA7qCjppGlQlwO/ipVn1Sh1UjN32UvJpLLgwylZm/aOLfr4coRuNo+Gn +cqr2vUld7DC/x+xojYSqgj8fpxP08LxiVNnRsNPguIOOetL62Gb1ZDKrLRQk +fOKr1Rr10Wx64Mo3wyAQXuV99x97JvKLC6aCZSAUGJ0Om3RgoolHQW+vUSBo +nr5olHqAib8W1peGbQ0E88k7b3uOMHH69sbBVulAiOuannfxZmLGx4h9LT8C +YC4/wjDsLBNbuWzCJpICoE8v9U1hGRO5M18I8LT5g8fJghxTNhMdMz+s8Gn2 +hxl2hdvYHSYSXG3Mvip/WEfrmd30gIlLXR8PPL3hD2a8UpL1jUzsMLKSHwv0 +h7rOQtc3b5nY8LC876CYP+zmr1IN6mHiQHZ3oQK/P/SYPJsR7Wfi7Ha/pFku +f/hdM5pw6AMTU2fIrJIxP1C9oUF+H2HiS2mBqL2NflDXtz0o6QcTh4Ku9FhW ++MHu9TagPslEHaeRLValfnA0/mT7iWkmPkm798clzQ9+N8ZlbZhjYq3sGaeg +c34QtZDhUrPAxIraZ40Xz/iBwOYSlYOLTMwc2y5FBvpBrk/N9NISE/tdUwPa +Pfzgf/MGbAg= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.059023695222010876`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13110,6 +14169,7 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13137,7 +14197,8 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12141098789525176`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.059023695222010876`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13145,17 +14206,571 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913429049348164`*^9}, + CellChangeTimes->{3.9913429049348164`*^9, 3.994356997284697*^9}, CellLabel-> - "Out[387]=",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] + "Out[140]=",ExpressionUUID->"ef7de7be-0196-416c-945d-c63a9f224cdd"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"b530b35f-2a32-0145-82a7-\ -25a7a01bdd8f"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc81e8XAHCjpEEksse9n2tlRSnjOieKpK8t0VBGRsgosyK7qIQQoiTz +fm6L7PhGpWkks2jQQEiZfeX3+f31eb3/ec7zPJ/znHPknI9bu3FxcHCs4OTg ++P93ZuBZM5FYYOBzMj3605dtBp25oqHbe6Jg9ukHl9puEUDhVmfRnhQ4XwrP +4rvlIciytJu7Jx88xxbZ7t3aIDi+IWW++x4M9+70Neg2hsE68+O/ux+B4rgE +5+OuvWBMjLz/2d0B90dLVKc7j8J899Yrk92f4O+zFxqPXgVBk1FRQXv+LwgJ +a2yduxEPkoPVX5xVFqGJuz640v0yrPd2Kl1hxI1cwkJF1pXpkLLJuNbcjhev +aN931dfLgd5MjcafAnworb90My7pOiQWRLRyiQlixn2txK+cN2FD2udzqdeE +UOTrv2UdW29BvK2pQceMMC52M53H1xdBoM4Np2dRonj5wpy/2GAx7JhYCPP9 +LI6bEjIzrlmWQuiuNOV/x8SRO7xRqtOuFNg3VPuEZsTxU7C+4or9pSBqe1in +mlcCJRb4njm7lcJY1eNZbjUJzE+w0JwMLYXUqOQTV0Mk0FvsgrtLfil8Epb3 +beaTxPiYisKSyVI4q291RHybFL4/lwmlUWWw61Du1FZDKZQ0P2J8KL4M+CNH +o+32SKFPIieDP6kMcppiC5MPS+H9UjPPI1fKoGp3zSjPOSk8nd21qquoDCb3 +0YN+9UphIndh9uyLMjh0cvr8y3BptDd/HiIhyAJGhqHkSKw0Hkz1tNotzKL2 +e4lckSyNGZNjSyfEWBD2n1KbYYE0Kl28NVAvx4Ir0YeEq19KY9YU86aUJgte +Xn6ad0tKBp1EbS2ErVmgy75afqZBBiN8e64OX2TBju7Xi+MtMjjoallkmcIC +c45lJk4dMugxdESk6goLXKx9e2FYBsNV68VO5bDAOFwuInK5LA5a+1X1lLDA +T2bm5vaNsji8Q8h/qIkFze55P5qCZPGe4b4242kWmP6ns+5UuCw27qbZGMyx +4HVyp/bmSFmMtjbT1/zDgt7qlZEF52TxB2eM4VpOEsZXn1gXmyOLGuV6RO4a +EkTv7Npq/EgWY2IjvNfSSfCe+xnZwieHhoG197f/Q4Ku/1GRL+vkMNDmptd/ +FiTwjvSVcYvKodAL9sQ9axJu9Td1GdDk0LnilpvQPhIGHl5RqdCWQ70Xp1fn +O5NgEavTc8NJDh1Kza/MBJEg/Zf0aXCVQ8dcxQO+oSSMBdG433vKYamA1+zH +cBISPFariZ6Qw2t337LqIkloNHsffTFBDqX8XWXwPAma686qh9+VwxYV0fiI +HBI4EqebMx/I4WU7eFaeS8Jrbi/HB7VyKFLJ/XX4OgnHpq1jfz6Wwy2y1pV6 +t0go6CH63fvkUHOppqqCJEEkryXOlpuGn4953f5cT8L8RoEBVTsazlnZyW3s +J2HmmvhZLUcaWq+qnOp8R8LvtQxCx4mGN1exusIGqPv8peO1w5OGRSrJPTUf +SfhU6zLjeJqGbpEanau/kfDcrJI/4RYNBbmmVaZ+kfC0/t+7F0ppKLnY6H1w +moRm9Ze2qbdpWCce0dI8Q8JDoY9ZudU0tA/Z2RU/T8K9/lUKFa9oeJ5mdWDw +LwlZxw7Bp2kaCs2U5XXysiHjvcenrws09HB48Z1zFRvSLAJjfyzRMO0bj+PG +1Wy4qJXwYm4lHe8Yh9wO4GND1J+79mul6fhHaRbfCLIhwqduYT2djrysW68/ +rmPDqcEn18QV6ajT0Bo/JsSGoKb+zwxNOmq12EbMCLPhWOJyP31jOr7ljUx/ +J8YGj8W1QoZmdFR3c0l9Kc6Go8fFH5hY0jHdwvrfKgk2HLZR/8/akY7Ta5Xu +x0qxwVbCIcHTl46Pqhq4pmTZoF/Gup6eTkdmjfLv9Qps6Jcty9uZTUfVyZdO +dZTD0ktyf+fRccuO1NjDimyoPFuYY11CR0vtJc48JTZo7rueyV9HxbPLaP29 +kQ3tr3Iz6hvpWFV1VSpKhQ1+RtfSvR/T0U6/XHmNKhvYallpz1/TMXCsIkZE +jQ1Ky9OS4z7SMWa0yHSZBhtawlIubflCx29x9Pxgykcnky8OjVDxa149/Eq5 +oP9CkuFvOhaCkcnDTWwwskpK/DlHR5tLjuWEJhs+PTl//voiHff7b/sWT1n2 +XnzCXx4C9e8MF+7QYkODQlw8uZrANQbLtXIpH7oWE3dAgMCUhsSE35SzE87G +1IgR+G9tYErGZjbo/o2I9pQmsOCy0q4hyj2BZ6JE6QTKCU48U93CBhGn8Mgg +FQJbA+w3V1Ku6AyNYGwi0KzdWnqWsu3ukDOdWwg80M7fraXNhl8NQaejdQnU +nt/m5EM5ZcvJU5pA4A2riMqblDeVBYZ/NCLws1vyhy7KbbIBYcm7CLQzkujn +2coGvjXHQ8atCBzccNDkIGXWWZ/ga3sJjLt7oiaa8u7ZY0F79hM4tO8pZxHl +795eJ/84ERhwg0f6KeWETx4nSl0JXJ43tHaIssI+90AHTwIDh4V6Fik/eeUW +wOtLoFOCSfD6bWxwM3L1rwyg1hPXGlegvKza2e9oMIHbb59nbqN8U+3IceFT +BOZ2cR3dSdmwwMm3OZJA8rqlhwXlD2KHfAJjCTyRrbRzL+WISwe8aecJ/NZh +tOhAWXr5/mPtFwmsb7O77Ei5LszBKzKVQJ4cEa59lPdP2nuqZxI4VsW0tKa8 +4LbXYyCHQE/F6FOmlK/227pfuEHglHtePJPyNiubo/qFBOr4mwWoUe5+YuU2 +Wkrgm2pkSlIO0rd0zbpN4KimznceysL3zF1My6n7MJ0IGqfOX67wj/NcFYF5 +n6W+dlC2vmZ2pKieWt81Urec8s91uw/vfURgdkmHfwrlHm9am9dT6r722O/2 +otz4ZAEiXhL4tVfrlAHlYtk3t1PbCVT97sC7lnJyWJlMcReVL1W1E/3U/w3p +jL5U10/gdbU9WrcoH1Y7sNT2gUDN7r9vvChrfFozOD9C4PymHI1RKp9E9YfN ++ScJ5NLzH79FmSO9/iFtmsCLdCbfQcqtpr65ZksEGttd8W+k8vXBTWP+w8sY +KC0mWO1NOXdR+syJlQx8d8fZTZiy793Wg9eEGPjSymdyP5X/e1cXv7orysDu +EfH2eer9GLhFMp9IMTAvKF48jTKf2CapCQUG2gZcGK2n3h8rMuUd6jOQsYsj +/4s6Vf/6vPbYbWfg1H7bIXfKpzYb1XkaM7C3xD5jmHrvZt9+ZadYMlCw87hN +F1UPRizs9g+5MrCApOMFqn50lKi+mPNk4OOLysSUMhtquHn0+I4z0E1nLtKG +8rnKB+LaoQy8q7hUvJqqP4oyon3xF6j4oRGtVvJsEAidNM1JYWBD2Kn0LAYb +5jpaqu9kMHC/+pmBQYKqL3GhV3tvMHDH2+ppJzob3Mf79m18wECHdIdD2lQ9 +NN91vwVqGZiY0bDbRYYN2vmJ22wbqfPkXWhMkmYDz1590dPPGThqn7vnrSQb +Cuuvdb8eYOBZYcdlTKoeDyUd3huwQh7d/ph/cqfqu++ICk1jjTw6b1GsPi7A +hlmT+R8/BOQxdyIh68RaNqziTon1FJfH8WPHI09S/UEjtKn8sKo8dqx49dNm +JRtOu8kLWdjIoxHJuTmGg4rfNDWwZp88/uZ5L31wiYRk2YbS5wfk0ZVVTNOi ++lNBv72h8VF57PtcFdL1h+p/Vuf8maHyqPXNK2SB6m8iBmOtG/PkscL4cVrV +GAnXs6uyv9+Ux6/BcqddRklQmo9xLyqWx+9WuhdWj5CgXy61RLsnj3zqzoo2 +X0lwUbZQE38sj1w7P7g2Uv32jsi9JN5RedwQF/BcqIsE04lg02FtBWy4ajNf +UEeC5CbpOF59BVQtepDdUUP164DmRxu3K2DKKH31YhUJaTMC+gFmChhFl9i7 +q4KaXxZL1JacFPCJZ3xDFTUfBKx5JyR2TgHFVssscFLzRZYSDuzpV8Bjgq1T +BqeoeenYF3G/Dwpo+KiwhDeMBCCT7FOHFbBo5669rcEkDGn0tvVOKGBNrUS6 +TSAJatsCmo4uU8S/h850bvUiocm4oDhSVRE3z+v6+9lT85ALb2B5hCJOJ1W6 +lalT+83dUd8Qo4hsfm5/mioJE72RK16cU0SNwa8P0pVJmLKYz/6Yqoignzob +xCBhVm+kmb9YEWUnxPxEJEjgWv9SxLNNEXkGZQ50LCdBrPlSjZScEnIv2y5r +0kvNm8QGrvhHSqg+Yq/mE8KC784mxXpPlZDrQ9rnwJMsSLoRbD75Qgl/rRwO +DglgwRvpniyHt0r4ZkrAMNybBYfFrmqpfFPCu87vwtwPsyCUX8KtnU8Zn/H1 ++vWbsIA1J90i4aCMH5YnrdSh5ut1r+Qv3plQRufGMFne0jKQTLhtqa2tgowW +J4VnxaWQuVFHQMhdFXUkGsWX5ZbAc/HtW35dVsPshqzmdTHFoCv5KFm9Sx1X +3TeeMMUi4OfOP3EkSgOP2UTse7y8EKTPyug7yG/CCY2FBeXiAljJOPDA+ukm +XMGpdz1zz01QY4rdDj6oiWrfspZp8OZDwMC6pt0cWtj+vPZYXdl1mPiVZGea +qYUrMcdCtDcXTNSfZJmqbsYiKznV8OAcePhL78/s680oyFnxX9HcVfBV0exr +d9uCfp3zRR71GcAcd+10WKmNGgG6mRZ+V2AnIfoPX742+jga76r3SAXFyPMh +j7ZuRdGd7uHO5y6DsptOA6NvK64bUqjk2HUJ3B56xJT7b8M2t58DeUuJ0HC9 +0/WnsA7qCjppGlQlwO/ipVn1Sh1UjN32UvJpLLgwylZm/aOLfr4coRuNo+Gn +cqr2vUld7DC/x+xojYSqgj8fpxP08LxiVNnRsNPguIOOetL62Gb1ZDKrLRQk +fOKr1Rr10Wx64Mo3wyAQXuV99x97JvKLC6aCZSAUGJ0Om3RgoolHQW+vUSBo +nr5olHqAib8W1peGbQ0E88k7b3uOMHH69sbBVulAiOuannfxZmLGx4h9LT8C +YC4/wjDsLBNbuWzCJpICoE8v9U1hGRO5M18I8LT5g8fJghxTNhMdMz+s8Gn2 +hxl2hdvYHSYSXG3Mvip/WEfrmd30gIlLXR8PPL3hD2a8UpL1jUzsMLKSHwv0 +h7rOQtc3b5nY8LC876CYP+zmr1IN6mHiQHZ3oQK/P/SYPJsR7Wfi7Ha/pFku +f/hdM5pw6AMTU2fIrJIxP1C9oUF+H2HiS2mBqL2NflDXtz0o6QcTh4Ku9FhW ++MHu9TagPslEHaeRLValfnA0/mT7iWkmPkm798clzQ9+N8ZlbZhjYq3sGaeg +c34QtZDhUrPAxIraZ40Xz/iBwOYSlYOLTMwc2y5FBvpBrk/N9NISE/tdUwPa +Pfzgf/MGbAg= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc81e8XAHCjpEEksse9n2tlRSnjOieKpK8t0VBGRsgosyK7qIQQoiTz +fm6L7PhGpWkks2jQQEiZfeX3+f31eb3/ec7zPJ/znHPknI9bu3FxcHCs4OTg ++P93ZuBZM5FYYOBzMj3605dtBp25oqHbe6Jg9ukHl9puEUDhVmfRnhQ4XwrP +4rvlIciytJu7Jx88xxbZ7t3aIDi+IWW++x4M9+70Neg2hsE68+O/ux+B4rgE +5+OuvWBMjLz/2d0B90dLVKc7j8J899Yrk92f4O+zFxqPXgVBk1FRQXv+LwgJ +a2yduxEPkoPVX5xVFqGJuz640v0yrPd2Kl1hxI1cwkJF1pXpkLLJuNbcjhev +aN931dfLgd5MjcafAnworb90My7pOiQWRLRyiQlixn2txK+cN2FD2udzqdeE +UOTrv2UdW29BvK2pQceMMC52M53H1xdBoM4Np2dRonj5wpy/2GAx7JhYCPP9 +LI6bEjIzrlmWQuiuNOV/x8SRO7xRqtOuFNg3VPuEZsTxU7C+4or9pSBqe1in +mlcCJRb4njm7lcJY1eNZbjUJzE+w0JwMLYXUqOQTV0Mk0FvsgrtLfil8Epb3 +beaTxPiYisKSyVI4q291RHybFL4/lwmlUWWw61Du1FZDKZQ0P2J8KL4M+CNH +o+32SKFPIieDP6kMcppiC5MPS+H9UjPPI1fKoGp3zSjPOSk8nd21qquoDCb3 +0YN+9UphIndh9uyLMjh0cvr8y3BptDd/HiIhyAJGhqHkSKw0Hkz1tNotzKL2 +e4lckSyNGZNjSyfEWBD2n1KbYYE0Kl28NVAvx4Ir0YeEq19KY9YU86aUJgte +Xn6ad0tKBp1EbS2ErVmgy75afqZBBiN8e64OX2TBju7Xi+MtMjjoallkmcIC +c45lJk4dMugxdESk6goLXKx9e2FYBsNV68VO5bDAOFwuInK5LA5a+1X1lLDA +T2bm5vaNsji8Q8h/qIkFze55P5qCZPGe4b4242kWmP6ns+5UuCw27qbZGMyx +4HVyp/bmSFmMtjbT1/zDgt7qlZEF52TxB2eM4VpOEsZXn1gXmyOLGuV6RO4a +EkTv7Npq/EgWY2IjvNfSSfCe+xnZwieHhoG197f/Q4Ku/1GRL+vkMNDmptd/ +FiTwjvSVcYvKodAL9sQ9axJu9Td1GdDk0LnilpvQPhIGHl5RqdCWQ70Xp1fn +O5NgEavTc8NJDh1Kza/MBJEg/Zf0aXCVQ8dcxQO+oSSMBdG433vKYamA1+zH +cBISPFariZ6Qw2t337LqIkloNHsffTFBDqX8XWXwPAma686qh9+VwxYV0fiI +HBI4EqebMx/I4WU7eFaeS8Jrbi/HB7VyKFLJ/XX4OgnHpq1jfz6Wwy2y1pV6 +t0go6CH63fvkUHOppqqCJEEkryXOlpuGn4953f5cT8L8RoEBVTsazlnZyW3s +J2HmmvhZLUcaWq+qnOp8R8LvtQxCx4mGN1exusIGqPv8peO1w5OGRSrJPTUf +SfhU6zLjeJqGbpEanau/kfDcrJI/4RYNBbmmVaZ+kfC0/t+7F0ppKLnY6H1w +moRm9Ze2qbdpWCce0dI8Q8JDoY9ZudU0tA/Z2RU/T8K9/lUKFa9oeJ5mdWDw +LwlZxw7Bp2kaCs2U5XXysiHjvcenrws09HB48Z1zFRvSLAJjfyzRMO0bj+PG +1Wy4qJXwYm4lHe8Yh9wO4GND1J+79mul6fhHaRbfCLIhwqduYT2djrysW68/ +rmPDqcEn18QV6ajT0Bo/JsSGoKb+zwxNOmq12EbMCLPhWOJyP31jOr7ljUx/ +J8YGj8W1QoZmdFR3c0l9Kc6Go8fFH5hY0jHdwvrfKgk2HLZR/8/akY7Ta5Xu +x0qxwVbCIcHTl46Pqhq4pmTZoF/Gup6eTkdmjfLv9Qps6Jcty9uZTUfVyZdO +dZTD0ktyf+fRccuO1NjDimyoPFuYY11CR0vtJc48JTZo7rueyV9HxbPLaP29 +kQ3tr3Iz6hvpWFV1VSpKhQ1+RtfSvR/T0U6/XHmNKhvYallpz1/TMXCsIkZE +jQ1Ky9OS4z7SMWa0yHSZBhtawlIubflCx29x9Pxgykcnky8OjVDxa149/Eq5 +oP9CkuFvOhaCkcnDTWwwskpK/DlHR5tLjuWEJhs+PTl//voiHff7b/sWT1n2 +XnzCXx4C9e8MF+7QYkODQlw8uZrANQbLtXIpH7oWE3dAgMCUhsSE35SzE87G +1IgR+G9tYErGZjbo/o2I9pQmsOCy0q4hyj2BZ6JE6QTKCU48U93CBhGn8Mgg +FQJbA+w3V1Ku6AyNYGwi0KzdWnqWsu3ukDOdWwg80M7fraXNhl8NQaejdQnU +nt/m5EM5ZcvJU5pA4A2riMqblDeVBYZ/NCLws1vyhy7KbbIBYcm7CLQzkujn +2coGvjXHQ8atCBzccNDkIGXWWZ/ga3sJjLt7oiaa8u7ZY0F79hM4tO8pZxHl +795eJ/84ERhwg0f6KeWETx4nSl0JXJ43tHaIssI+90AHTwIDh4V6Fik/eeUW +wOtLoFOCSfD6bWxwM3L1rwyg1hPXGlegvKza2e9oMIHbb59nbqN8U+3IceFT +BOZ2cR3dSdmwwMm3OZJA8rqlhwXlD2KHfAJjCTyRrbRzL+WISwe8aecJ/NZh +tOhAWXr5/mPtFwmsb7O77Ei5LszBKzKVQJ4cEa59lPdP2nuqZxI4VsW0tKa8 +4LbXYyCHQE/F6FOmlK/227pfuEHglHtePJPyNiubo/qFBOr4mwWoUe5+YuU2 +Wkrgm2pkSlIO0rd0zbpN4KimznceysL3zF1My6n7MJ0IGqfOX67wj/NcFYF5 +n6W+dlC2vmZ2pKieWt81Urec8s91uw/vfURgdkmHfwrlHm9am9dT6r722O/2 +otz4ZAEiXhL4tVfrlAHlYtk3t1PbCVT97sC7lnJyWJlMcReVL1W1E/3U/w3p +jL5U10/gdbU9WrcoH1Y7sNT2gUDN7r9vvChrfFozOD9C4PymHI1RKp9E9YfN ++ScJ5NLzH79FmSO9/iFtmsCLdCbfQcqtpr65ZksEGttd8W+k8vXBTWP+w8sY +KC0mWO1NOXdR+syJlQx8d8fZTZiy793Wg9eEGPjSymdyP5X/e1cXv7orysDu +EfH2eer9GLhFMp9IMTAvKF48jTKf2CapCQUG2gZcGK2n3h8rMuUd6jOQsYsj +/4s6Vf/6vPbYbWfg1H7bIXfKpzYb1XkaM7C3xD5jmHrvZt9+ZadYMlCw87hN +F1UPRizs9g+5MrCApOMFqn50lKi+mPNk4OOLysSUMhtquHn0+I4z0E1nLtKG +8rnKB+LaoQy8q7hUvJqqP4oyon3xF6j4oRGtVvJsEAidNM1JYWBD2Kn0LAYb +5jpaqu9kMHC/+pmBQYKqL3GhV3tvMHDH2+ppJzob3Mf79m18wECHdIdD2lQ9 +NN91vwVqGZiY0bDbRYYN2vmJ22wbqfPkXWhMkmYDz1590dPPGThqn7vnrSQb +Cuuvdb8eYOBZYcdlTKoeDyUd3huwQh7d/ph/cqfqu++ICk1jjTw6b1GsPi7A +hlmT+R8/BOQxdyIh68RaNqziTon1FJfH8WPHI09S/UEjtKn8sKo8dqx49dNm +JRtOu8kLWdjIoxHJuTmGg4rfNDWwZp88/uZ5L31wiYRk2YbS5wfk0ZVVTNOi ++lNBv72h8VF57PtcFdL1h+p/Vuf8maHyqPXNK2SB6m8iBmOtG/PkscL4cVrV +GAnXs6uyv9+Ux6/BcqddRklQmo9xLyqWx+9WuhdWj5CgXy61RLsnj3zqzoo2 +X0lwUbZQE38sj1w7P7g2Uv32jsi9JN5RedwQF/BcqIsE04lg02FtBWy4ajNf +UEeC5CbpOF59BVQtepDdUUP164DmRxu3K2DKKH31YhUJaTMC+gFmChhFl9i7 +q4KaXxZL1JacFPCJZ3xDFTUfBKx5JyR2TgHFVssscFLzRZYSDuzpV8Bjgq1T +BqeoeenYF3G/Dwpo+KiwhDeMBCCT7FOHFbBo5669rcEkDGn0tvVOKGBNrUS6 +TSAJatsCmo4uU8S/h850bvUiocm4oDhSVRE3z+v6+9lT85ALb2B5hCJOJ1W6 +lalT+83dUd8Qo4hsfm5/mioJE72RK16cU0SNwa8P0pVJmLKYz/6Yqoignzob +xCBhVm+kmb9YEWUnxPxEJEjgWv9SxLNNEXkGZQ50LCdBrPlSjZScEnIv2y5r +0kvNm8QGrvhHSqg+Yq/mE8KC784mxXpPlZDrQ9rnwJMsSLoRbD75Qgl/rRwO +DglgwRvpniyHt0r4ZkrAMNybBYfFrmqpfFPCu87vwtwPsyCUX8KtnU8Zn/H1 ++vWbsIA1J90i4aCMH5YnrdSh5ut1r+Qv3plQRufGMFne0jKQTLhtqa2tgowW +J4VnxaWQuVFHQMhdFXUkGsWX5ZbAc/HtW35dVsPshqzmdTHFoCv5KFm9Sx1X +3TeeMMUi4OfOP3EkSgOP2UTse7y8EKTPyug7yG/CCY2FBeXiAljJOPDA+ukm +XMGpdz1zz01QY4rdDj6oiWrfspZp8OZDwMC6pt0cWtj+vPZYXdl1mPiVZGea +qYUrMcdCtDcXTNSfZJmqbsYiKznV8OAcePhL78/s680oyFnxX9HcVfBV0exr +d9uCfp3zRR71GcAcd+10WKmNGgG6mRZ+V2AnIfoPX742+jga76r3SAXFyPMh +j7ZuRdGd7uHO5y6DsptOA6NvK64bUqjk2HUJ3B56xJT7b8M2t58DeUuJ0HC9 +0/WnsA7qCjppGlQlwO/ipVn1Sh1UjN32UvJpLLgwylZm/aOLfr4coRuNo+Gn +cqr2vUld7DC/x+xojYSqgj8fpxP08LxiVNnRsNPguIOOetL62Gb1ZDKrLRQk +fOKr1Rr10Wx64Mo3wyAQXuV99x97JvKLC6aCZSAUGJ0Om3RgoolHQW+vUSBo +nr5olHqAib8W1peGbQ0E88k7b3uOMHH69sbBVulAiOuannfxZmLGx4h9LT8C +YC4/wjDsLBNbuWzCJpICoE8v9U1hGRO5M18I8LT5g8fJghxTNhMdMz+s8Gn2 +hxl2hdvYHSYSXG3Mvip/WEfrmd30gIlLXR8PPL3hD2a8UpL1jUzsMLKSHwv0 +h7rOQtc3b5nY8LC876CYP+zmr1IN6mHiQHZ3oQK/P/SYPJsR7Wfi7Ha/pFku +f/hdM5pw6AMTU2fIrJIxP1C9oUF+H2HiS2mBqL2NflDXtz0o6QcTh4Ku9FhW ++MHu9TagPslEHaeRLValfnA0/mT7iWkmPkm798clzQ9+N8ZlbZhjYq3sGaeg +c34QtZDhUrPAxIraZ40Xz/iBwOYSlYOLTMwc2y5FBvpBrk/N9NISE/tdUwPa +Pfzgf/MGbAg= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.059023695222010876`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.059023695222010876`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc81e8XAHCjpEEksse9n2tlRSnjOieKpK8t0VBGRsgosyK7qIQQoiTz +fm6L7PhGpWkks2jQQEiZfeX3+f31eb3/ec7zPJ/znHPknI9bu3FxcHCs4OTg ++P93ZuBZM5FYYOBzMj3605dtBp25oqHbe6Jg9ukHl9puEUDhVmfRnhQ4XwrP +4rvlIciytJu7Jx88xxbZ7t3aIDi+IWW++x4M9+70Neg2hsE68+O/ux+B4rgE +5+OuvWBMjLz/2d0B90dLVKc7j8J899Yrk92f4O+zFxqPXgVBk1FRQXv+LwgJ +a2yduxEPkoPVX5xVFqGJuz640v0yrPd2Kl1hxI1cwkJF1pXpkLLJuNbcjhev +aN931dfLgd5MjcafAnworb90My7pOiQWRLRyiQlixn2txK+cN2FD2udzqdeE +UOTrv2UdW29BvK2pQceMMC52M53H1xdBoM4Np2dRonj5wpy/2GAx7JhYCPP9 +LI6bEjIzrlmWQuiuNOV/x8SRO7xRqtOuFNg3VPuEZsTxU7C+4or9pSBqe1in +mlcCJRb4njm7lcJY1eNZbjUJzE+w0JwMLYXUqOQTV0Mk0FvsgrtLfil8Epb3 +beaTxPiYisKSyVI4q291RHybFL4/lwmlUWWw61Du1FZDKZQ0P2J8KL4M+CNH +o+32SKFPIieDP6kMcppiC5MPS+H9UjPPI1fKoGp3zSjPOSk8nd21qquoDCb3 +0YN+9UphIndh9uyLMjh0cvr8y3BptDd/HiIhyAJGhqHkSKw0Hkz1tNotzKL2 +e4lckSyNGZNjSyfEWBD2n1KbYYE0Kl28NVAvx4Ir0YeEq19KY9YU86aUJgte +Xn6ad0tKBp1EbS2ErVmgy75afqZBBiN8e64OX2TBju7Xi+MtMjjoallkmcIC +c45lJk4dMugxdESk6goLXKx9e2FYBsNV68VO5bDAOFwuInK5LA5a+1X1lLDA +T2bm5vaNsji8Q8h/qIkFze55P5qCZPGe4b4242kWmP6ns+5UuCw27qbZGMyx +4HVyp/bmSFmMtjbT1/zDgt7qlZEF52TxB2eM4VpOEsZXn1gXmyOLGuV6RO4a +EkTv7Npq/EgWY2IjvNfSSfCe+xnZwieHhoG197f/Q4Ku/1GRL+vkMNDmptd/ +FiTwjvSVcYvKodAL9sQ9axJu9Td1GdDk0LnilpvQPhIGHl5RqdCWQ70Xp1fn +O5NgEavTc8NJDh1Kza/MBJEg/Zf0aXCVQ8dcxQO+oSSMBdG433vKYamA1+zH +cBISPFariZ6Qw2t337LqIkloNHsffTFBDqX8XWXwPAma686qh9+VwxYV0fiI +HBI4EqebMx/I4WU7eFaeS8Jrbi/HB7VyKFLJ/XX4OgnHpq1jfz6Wwy2y1pV6 +t0go6CH63fvkUHOppqqCJEEkryXOlpuGn4953f5cT8L8RoEBVTsazlnZyW3s +J2HmmvhZLUcaWq+qnOp8R8LvtQxCx4mGN1exusIGqPv8peO1w5OGRSrJPTUf +SfhU6zLjeJqGbpEanau/kfDcrJI/4RYNBbmmVaZ+kfC0/t+7F0ppKLnY6H1w +moRm9Ze2qbdpWCce0dI8Q8JDoY9ZudU0tA/Z2RU/T8K9/lUKFa9oeJ5mdWDw +LwlZxw7Bp2kaCs2U5XXysiHjvcenrws09HB48Z1zFRvSLAJjfyzRMO0bj+PG +1Wy4qJXwYm4lHe8Yh9wO4GND1J+79mul6fhHaRbfCLIhwqduYT2djrysW68/ +rmPDqcEn18QV6ajT0Bo/JsSGoKb+zwxNOmq12EbMCLPhWOJyP31jOr7ljUx/ +J8YGj8W1QoZmdFR3c0l9Kc6Go8fFH5hY0jHdwvrfKgk2HLZR/8/akY7Ta5Xu +x0qxwVbCIcHTl46Pqhq4pmTZoF/Gup6eTkdmjfLv9Qps6Jcty9uZTUfVyZdO +dZTD0ktyf+fRccuO1NjDimyoPFuYY11CR0vtJc48JTZo7rueyV9HxbPLaP29 +kQ3tr3Iz6hvpWFV1VSpKhQ1+RtfSvR/T0U6/XHmNKhvYallpz1/TMXCsIkZE +jQ1Ky9OS4z7SMWa0yHSZBhtawlIubflCx29x9Pxgykcnky8OjVDxa149/Eq5 +oP9CkuFvOhaCkcnDTWwwskpK/DlHR5tLjuWEJhs+PTl//voiHff7b/sWT1n2 +XnzCXx4C9e8MF+7QYkODQlw8uZrANQbLtXIpH7oWE3dAgMCUhsSE35SzE87G +1IgR+G9tYErGZjbo/o2I9pQmsOCy0q4hyj2BZ6JE6QTKCU48U93CBhGn8Mgg +FQJbA+w3V1Ku6AyNYGwi0KzdWnqWsu3ukDOdWwg80M7fraXNhl8NQaejdQnU +nt/m5EM5ZcvJU5pA4A2riMqblDeVBYZ/NCLws1vyhy7KbbIBYcm7CLQzkujn +2coGvjXHQ8atCBzccNDkIGXWWZ/ga3sJjLt7oiaa8u7ZY0F79hM4tO8pZxHl +795eJ/84ERhwg0f6KeWETx4nSl0JXJ43tHaIssI+90AHTwIDh4V6Fik/eeUW +wOtLoFOCSfD6bWxwM3L1rwyg1hPXGlegvKza2e9oMIHbb59nbqN8U+3IceFT +BOZ2cR3dSdmwwMm3OZJA8rqlhwXlD2KHfAJjCTyRrbRzL+WISwe8aecJ/NZh +tOhAWXr5/mPtFwmsb7O77Ei5LszBKzKVQJ4cEa59lPdP2nuqZxI4VsW0tKa8 +4LbXYyCHQE/F6FOmlK/227pfuEHglHtePJPyNiubo/qFBOr4mwWoUe5+YuU2 +Wkrgm2pkSlIO0rd0zbpN4KimznceysL3zF1My6n7MJ0IGqfOX67wj/NcFYF5 +n6W+dlC2vmZ2pKieWt81Urec8s91uw/vfURgdkmHfwrlHm9am9dT6r722O/2 +otz4ZAEiXhL4tVfrlAHlYtk3t1PbCVT97sC7lnJyWJlMcReVL1W1E/3U/w3p +jL5U10/gdbU9WrcoH1Y7sNT2gUDN7r9vvChrfFozOD9C4PymHI1RKp9E9YfN ++ScJ5NLzH79FmSO9/iFtmsCLdCbfQcqtpr65ZksEGttd8W+k8vXBTWP+w8sY +KC0mWO1NOXdR+syJlQx8d8fZTZiy793Wg9eEGPjSymdyP5X/e1cXv7orysDu +EfH2eer9GLhFMp9IMTAvKF48jTKf2CapCQUG2gZcGK2n3h8rMuUd6jOQsYsj +/4s6Vf/6vPbYbWfg1H7bIXfKpzYb1XkaM7C3xD5jmHrvZt9+ZadYMlCw87hN +F1UPRizs9g+5MrCApOMFqn50lKi+mPNk4OOLysSUMhtquHn0+I4z0E1nLtKG +8rnKB+LaoQy8q7hUvJqqP4oyon3xF6j4oRGtVvJsEAidNM1JYWBD2Kn0LAYb +5jpaqu9kMHC/+pmBQYKqL3GhV3tvMHDH2+ppJzob3Mf79m18wECHdIdD2lQ9 +NN91vwVqGZiY0bDbRYYN2vmJ22wbqfPkXWhMkmYDz1590dPPGThqn7vnrSQb +Cuuvdb8eYOBZYcdlTKoeDyUd3huwQh7d/ph/cqfqu++ICk1jjTw6b1GsPi7A +hlmT+R8/BOQxdyIh68RaNqziTon1FJfH8WPHI09S/UEjtKn8sKo8dqx49dNm +JRtOu8kLWdjIoxHJuTmGg4rfNDWwZp88/uZ5L31wiYRk2YbS5wfk0ZVVTNOi ++lNBv72h8VF57PtcFdL1h+p/Vuf8maHyqPXNK2SB6m8iBmOtG/PkscL4cVrV +GAnXs6uyv9+Ux6/BcqddRklQmo9xLyqWx+9WuhdWj5CgXy61RLsnj3zqzoo2 +X0lwUbZQE38sj1w7P7g2Uv32jsi9JN5RedwQF/BcqIsE04lg02FtBWy4ajNf +UEeC5CbpOF59BVQtepDdUUP164DmRxu3K2DKKH31YhUJaTMC+gFmChhFl9i7 +q4KaXxZL1JacFPCJZ3xDFTUfBKx5JyR2TgHFVssscFLzRZYSDuzpV8Bjgq1T +BqeoeenYF3G/Dwpo+KiwhDeMBCCT7FOHFbBo5669rcEkDGn0tvVOKGBNrUS6 +TSAJatsCmo4uU8S/h850bvUiocm4oDhSVRE3z+v6+9lT85ALb2B5hCJOJ1W6 +lalT+83dUd8Qo4hsfm5/mioJE72RK16cU0SNwa8P0pVJmLKYz/6Yqoignzob +xCBhVm+kmb9YEWUnxPxEJEjgWv9SxLNNEXkGZQ50LCdBrPlSjZScEnIv2y5r +0kvNm8QGrvhHSqg+Yq/mE8KC784mxXpPlZDrQ9rnwJMsSLoRbD75Qgl/rRwO +DglgwRvpniyHt0r4ZkrAMNybBYfFrmqpfFPCu87vwtwPsyCUX8KtnU8Zn/H1 ++vWbsIA1J90i4aCMH5YnrdSh5ut1r+Qv3plQRufGMFne0jKQTLhtqa2tgowW +J4VnxaWQuVFHQMhdFXUkGsWX5ZbAc/HtW35dVsPshqzmdTHFoCv5KFm9Sx1X +3TeeMMUi4OfOP3EkSgOP2UTse7y8EKTPyug7yG/CCY2FBeXiAljJOPDA+ukm +XMGpdz1zz01QY4rdDj6oiWrfspZp8OZDwMC6pt0cWtj+vPZYXdl1mPiVZGea +qYUrMcdCtDcXTNSfZJmqbsYiKznV8OAcePhL78/s680oyFnxX9HcVfBV0exr +d9uCfp3zRR71GcAcd+10WKmNGgG6mRZ+V2AnIfoPX742+jga76r3SAXFyPMh +j7ZuRdGd7uHO5y6DsptOA6NvK64bUqjk2HUJ3B56xJT7b8M2t58DeUuJ0HC9 +0/WnsA7qCjppGlQlwO/ipVn1Sh1UjN32UvJpLLgwylZm/aOLfr4coRuNo+Gn +cqr2vUld7DC/x+xojYSqgj8fpxP08LxiVNnRsNPguIOOetL62Gb1ZDKrLRQk +fOKr1Rr10Wx64Mo3wyAQXuV99x97JvKLC6aCZSAUGJ0Om3RgoolHQW+vUSBo +nr5olHqAib8W1peGbQ0E88k7b3uOMHH69sbBVulAiOuannfxZmLGx4h9LT8C +YC4/wjDsLBNbuWzCJpICoE8v9U1hGRO5M18I8LT5g8fJghxTNhMdMz+s8Gn2 +hxl2hdvYHSYSXG3Mvip/WEfrmd30gIlLXR8PPL3hD2a8UpL1jUzsMLKSHwv0 +h7rOQtc3b5nY8LC876CYP+zmr1IN6mHiQHZ3oQK/P/SYPJsR7Wfi7Ha/pFku +f/hdM5pw6AMTU2fIrJIxP1C9oUF+H2HiS2mBqL2NflDXtz0o6QcTh4Ku9FhW ++MHu9TagPslEHaeRLValfnA0/mT7iWkmPkm798clzQ9+N8ZlbZhjYq3sGaeg +c34QtZDhUrPAxIraZ40Xz/iBwOYSlYOLTMwc2y5FBvpBrk/N9NISE/tdUwPa +Pfzgf/MGbAg= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.059023695222010876`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.059023695222010876`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943569973838387`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"6f279f40-daba-43b8-8053-08aaf834b80b"] +}, Open ]], Cell[CellGroupData[{ @@ -13207,66 +14822,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[391]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], + "In[142]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 417, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437636167164`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.4491725433258356`*^-164\\\", \ +RowBox[{\\\"161198658118785115956678299518758546564\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"68\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9916936247705600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 73, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.9943569974358797`*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], +In[142]:=",ExpressionUUID->"29a59932-1f0a-410c-abf1-308c3ba72f86"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 418, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763625717*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.86003495008144`*^-167\\\", \ +RowBox[{\\\"505518991860510123640143147290826802026\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"71\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9512072804761600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 74, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994356997446266*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], +In[142]:=",ExpressionUUID->"f46da9ba-ca65-4484-94b3-e6eb5f0513ff"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 391, 419, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763634718*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.301875990004343`*^-170\\\", \ +RowBox[{\\\"164243120455479739170682508554789627978\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4724542670438400000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 75, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.99435699745837*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], +In[142]:=",ExpressionUUID->"e34c6cd3-d9fc-4e44-8e7a-d7b0107075b3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 391, 420, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763643717*^9}, +during this calculation.\"", 2, 142, 76, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994356997466971*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], +In[142]:=",ExpressionUUID->"cc0bec24-d012-4369-9872-36535755375f"], -Cell[BoxData["12.55365498945131`"], "Output", - CellChangeTimes->{3.991343769962549*^9}, +Cell[BoxData["13.445058139151385`"], "Output", + CellChangeTimes->{3.991343769962549*^9, 3.99435707814933*^9}, CellLabel-> - "Out[391]=",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] + "Out[142]=",ExpressionUUID->"18223573-77d3-42bd-8965-00d4f80197ab"] }, Open ]], Cell[CellGroupData[{ @@ -13333,68 +14955,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499777649403`*^9, - 3.9918499820026073`*^9}},ExpressionUUID->"97b28b29-5d04-5c42-a0e8-\ -93b70f20e7f6"], + CellChangeTimes->{{3.9918499777649403`*^9, 3.9918499820026073`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 392, 421, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343769999645*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.145930210546687`*^-229\\\", \ +RowBox[{\\\"1894408991562427689427794363373458470910\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8875062955245236398325760000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 77, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.994357078201952*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], +In[143]:=",ExpressionUUID->"ba995b57-a4e3-479c-93b5-7abcdbecb066"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 392, 422, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700095463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.479392769521237`*^-235\\\", \ +RowBox[{\\\"2735526583816145583533735060711274031995\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5590907374121359182397440000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 78, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943570782110853`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], +In[143]:=",ExpressionUUID->"9f1c7afa-f531-4e38-8469-07d1a54e2fa4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 392, - 423, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343770018547*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3525725280503836`*^-241\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 79, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943570782194757`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], +In[143]:=",ExpressionUUID->"baf18ff7-a958-40e8-b11e-fd2ddb98efc7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 392, 424, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700265465`*^9}, +during this calculation.\"", 2, 143, 80, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.994357078229604*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], +In[143]:=",ExpressionUUID->"d41bfadc-3612-4917-9a9d-9fc8e9e5bf1b"], -Cell[BoxData["2.1234790234082306`"], "Output", - CellChangeTimes->{3.9913437771602173`*^9}, +Cell[BoxData["0.06598988918994622`"], "Output", + CellChangeTimes->{3.9913437771602173`*^9, 3.9943570883244667`*^9}, CellLabel-> - "Out[392]=",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] + "Out[143]=",ExpressionUUID->"3ba5c03f-f0d2-4bdf-8ab7-b118eb7ee0e4"] }, Open ]], Cell[CellGroupData[{ @@ -13415,8 +15044,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13461,68 +15089,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499862910366`*^9, - 3.991849989300226*^9}},ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-\ -cdce838d9efe"], + CellChangeTimes->{{3.9918499862910366`*^9, 3.991849989300226*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 393, 425, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437771982174`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.145930210546687`*^-229\\\", \ +RowBox[{\\\"1894408991562427689427794363373458470910\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8875062955245236398325760000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 81, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994357088383617*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], +In[144]:=",ExpressionUUID->"f0b0fb2d-1819-4995-9e8f-958190586334"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 393, 426, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772082157`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.479392769521237`*^-235\\\", \ +RowBox[{\\\"2735526583816145583533735060711274031995\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5590907374121359182397440000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 82, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994357088394046*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], +In[144]:=",ExpressionUUID->"08f5307f-50ca-4599-8dac-dbfabfb33f8b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 393, - 427, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134377721661*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3525725280503836`*^-241\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 83, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994357088404078*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], +In[144]:=",ExpressionUUID->"a556628a-5bff-4613-b5ae-1638a0a0b289"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 393, 428, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772256165`*^9}, +during this calculation.\"", 2, 144, 84, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.9943570884130697`*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], +In[144]:=",ExpressionUUID->"5130b356-5a28-474c-a959-0d7f4666b600"], -Cell[BoxData["10.711562421053975`"], "Output", - CellChangeTimes->{3.991343783589731*^9}, +Cell[BoxData["45.322732849047405`"], "Output", + CellChangeTimes->{3.991343783589731*^9, 3.994357097992063*^9}, CellLabel-> - "Out[393]=",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] + "Out[144]=",ExpressionUUID->"1d63edce-16a4-407d-8954-a84ad1bccca3"] }, Open ]], Cell[CellGroupData[{ @@ -13543,8 +15178,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13589,68 +15223,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849992549782*^9, - 3.9918499952553864`*^9}},ExpressionUUID->"0794d062-69d5-0a45-936e-\ -533b19d33de6"], + CellChangeTimes->{{3.991849992549782*^9, 3.9918499952553864`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 394, 429, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836316223`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.145930210546687`*^-229\\\", \ +RowBox[{\\\"1894408991562427689427794363373458470910\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"7\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8875062955245236398325760000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 85, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.99435709804137*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], +In[145]:=",ExpressionUUID->"422275de-1019-4bd3-be32-12b8057fcf56"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 394, 430, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836416245`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.479392769521237`*^-235\\\", \ +RowBox[{\\\"2735526583816145583533735060711274031995\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5590907374121359182397440000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 86, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994357098050609*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], +In[145]:=",ExpressionUUID->"f5054903-5efa-4ac9-b7be-f0e4335d2707"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 394, - 431, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343783649622*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3525725280503836`*^-241\\\", \ +RowBox[{\\\"4160735933984357432554811027341847802665\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"13\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3770116038587316426506240000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 87, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994357098058723*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], +In[145]:=",ExpressionUUID->"c70d5c23-f222-47bb-935d-20054d8651f2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 394, 432, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836576347`*^9}, +during this calculation.\"", 2, 145, 88, 31388290883994558935, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.9943570980679817`*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], +In[145]:=",ExpressionUUID->"5c66e27d-34e0-4ced-82f6-44fa82a8b71c"], -Cell[BoxData["20.656774205279326`"], "Output", - CellChangeTimes->{3.9913437870822353`*^9}, +Cell[BoxData["6.411122571869001`"], "Output", + CellChangeTimes->{3.9913437870822353`*^9, 3.994357105591978*^9}, CellLabel-> - "Out[394]=",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] + "Out[145]=",ExpressionUUID->"4043392d-12e0-44d2-9366-8c3873ab29cc"] }, Open ]], Cell[CellGroupData[{ @@ -13659,21 +15300,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918500011025047`*^9, - 3.9918500053803673`*^9}},ExpressionUUID->"95c56266-e4d3-624e-89c1-\ -cedeeeb0247a"], - -Cell[BoxData["0.14275466609450368`"], "Output", - CellChangeTimes->{3.991343787117275*^9}, + CellChangeTimes->{{3.9918500011025047`*^9, 3.9918500053803673`*^9}}, CellLabel-> - "Out[395]=",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] + "In[146]:=",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], + +Cell[BoxData["0.0038712597719370227`"], "Output", + CellChangeTimes->{3.991343787117275*^9, 3.994357105634782*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"5a225e62-99aa-4474-ab22-9bc311c8d5c2"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"003a3cee-6cc9-43f2-a36e-2e9c0a4a4908"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"003a3cee-6cc9-43f2-a36e-2e9c0a4a4908"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +Evaluator->"kernel 4", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {Automatic, 309}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -13691,622 +15335,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 357, 7, 36, "Input",ExpressionUUID->"daebe3bc-0a65-4079-8cfc-6ea289f788d6"], -Cell[936, 31, 309, 6, 41, "Output",ExpressionUUID->"21c22a00-b37e-4bd9-ad8d-9393c631a332"] +Cell[576, 22, 352, 6, 36, "Input",ExpressionUUID->"daebe3bc-0a65-4079-8cfc-6ea289f788d6"], +Cell[931, 30, 352, 5, 41, "Output",ExpressionUUID->"1809b717-813c-40a5-8770-0a82cd3df6ee"] }, Open ]], Cell[CellGroupData[{ -Cell[1282, 42, 253, 5, 36, "Input",ExpressionUUID->"c9be71d2-85a6-40f2-8207-1b3ec49e9601"], -Cell[1538, 49, 256, 5, 41, "Output",ExpressionUUID->"98aea7bb-d7d5-49b8-83ca-afde5c6cbccd"] +Cell[1320, 40, 248, 4, 36, "Input",ExpressionUUID->"c9be71d2-85a6-40f2-8207-1b3ec49e9601"], +Cell[1571, 46, 299, 5, 41, "Output",ExpressionUUID->"5d0824f0-60d3-41b8-809a-5d20e4ba43df"] }, Open ]], Cell[CellGroupData[{ -Cell[1831, 59, 226, 5, 36, "Input",ExpressionUUID->"64f35230-ab8b-405f-933d-6ee357ab7191"], -Cell[2060, 66, 256, 5, 41, "Output",ExpressionUUID->"3fa24ae8-66d7-47dc-8600-bc16115b0358"] +Cell[1907, 56, 221, 4, 36, "Input",ExpressionUUID->"64f35230-ab8b-405f-933d-6ee357ab7191"], +Cell[2131, 62, 301, 5, 41, "Output",ExpressionUUID->"81cf4245-8d4a-40b2-84c5-542571138966"] }, Open ]], Cell[CellGroupData[{ -Cell[2353, 76, 180, 4, 66, "Input",ExpressionUUID->"d60d011a-0037-4dcd-8724-36e75322ced0"], -Cell[2536, 82, 254, 5, 75, "Output",ExpressionUUID->"a8c69135-ce71-48a6-8453-3f705b383930"] +Cell[2469, 72, 175, 3, 36, "Input",ExpressionUUID->"d60d011a-0037-4dcd-8724-36e75322ced0"], +Cell[2647, 77, 297, 5, 41, "Output",ExpressionUUID->"d0c3e9b1-09ed-4d7e-b6b1-9e9b0b0a4f06"] }, Open ]], Cell[CellGroupData[{ -Cell[2827, 92, 262, 8, 96, "Input",ExpressionUUID->"51180a4e-12f3-4f9b-82d6-eadfd3fad407"], -Cell[3092, 102, 257, 5, 75, "Output",ExpressionUUID->"8200c5eb-2591-43b0-802c-c83506e77139"] +Cell[2981, 87, 257, 7, 54, "Input",ExpressionUUID->"51180a4e-12f3-4f9b-82d6-eadfd3fad407"], +Cell[3241, 96, 300, 5, 41, "Output",ExpressionUUID->"e6a5db4d-f619-4945-a734-5b7ef6f8e32e"] }, Open ]], Cell[CellGroupData[{ -Cell[3386, 112, 136, 3, 66, "Input",ExpressionUUID->"544454f5-81b1-4f9e-b85a-03bb8132b0cd"], -Cell[3525, 117, 260, 5, 75, "Output",ExpressionUUID->"6f7a0d88-18fe-44fb-b0cf-88c0fb3b0a47"] +Cell[3578, 106, 131, 2, 36, "Input",ExpressionUUID->"544454f5-81b1-4f9e-b85a-03bb8132b0cd"], +Cell[3712, 110, 303, 5, 41, "Output",ExpressionUUID->"085d2615-086d-4fe2-a746-425cac200c9f"] }, Open ]], Cell[CellGroupData[{ -Cell[3822, 127, 281, 7, 66, "Input",ExpressionUUID->"62e3cdda-a591-4586-af71-0f1e36fe7c76"], -Cell[4106, 136, 274, 5, 75, "Output",ExpressionUUID->"91474f3b-e14f-403c-b49e-fb1f621bf0b3"] +Cell[4052, 120, 276, 6, 36, "Input",ExpressionUUID->"62e3cdda-a591-4586-af71-0f1e36fe7c76"], +Cell[4331, 128, 317, 5, 41, "Output",ExpressionUUID->"8c9e9cb2-edd5-4a8b-a54f-a607335330f6"] }, Open ]], Cell[CellGroupData[{ -Cell[4417, 146, 262, 8, 66, "Input",ExpressionUUID->"af66d9f4-ed34-47a1-a8a0-6b2570d105f7"], -Cell[4682, 156, 273, 5, 75, "Output",ExpressionUUID->"38b55147-596e-4fbe-a2c1-a98bb6b5a60e"] +Cell[4685, 138, 257, 7, 36, "Input",ExpressionUUID->"af66d9f4-ed34-47a1-a8a0-6b2570d105f7"], +Cell[4945, 147, 316, 5, 41, "Output",ExpressionUUID->"803e2d41-4afe-4cdd-981e-6eaa3e2f2541"] }, Open ]], Cell[CellGroupData[{ -Cell[4992, 166, 208, 4, 66, "Input",ExpressionUUID->"34c1f49a-253a-4945-9de7-d0c20a1110c6"], -Cell[5203, 172, 236, 4, 75, "Output",ExpressionUUID->"3cbb7bac-b29e-4bb0-bad9-97b26af72440"] +Cell[5298, 157, 203, 3, 36, "Input",ExpressionUUID->"34c1f49a-253a-4945-9de7-d0c20a1110c6"], +Cell[5504, 162, 281, 4, 41, "Output",ExpressionUUID->"5b6af182-f008-40d9-8d7f-eb61fcaf8281"] }, Open ]], Cell[CellGroupData[{ -Cell[5476, 181, 208, 4, 66, "Input",ExpressionUUID->"0b83963d-c65a-46e4-b3a6-9fc479afce6e"], -Cell[5687, 187, 239, 4, 75, "Output",ExpressionUUID->"2cd0660a-11e7-46ad-b903-3a40b4418caf"] +Cell[5822, 171, 204, 3, 36, "Input",ExpressionUUID->"0b83963d-c65a-46e4-b3a6-9fc479afce6e"], +Cell[6029, 176, 285, 4, 41, "Output",ExpressionUUID->"67481178-bd54-4f95-b8bf-37d25be3ea51"] }, Open ]], Cell[CellGroupData[{ -Cell[5963, 196, 133, 3, 66, "Input",ExpressionUUID->"4993e251-725c-46e3-b066-ac229fbe2493"], -Cell[6099, 201, 253, 5, 75, "Output",ExpressionUUID->"72b31e26-d112-4a08-b996-fafcf5a48b98"] +Cell[6351, 185, 129, 2, 36, "Input",ExpressionUUID->"4993e251-725c-46e3-b066-ac229fbe2493"], +Cell[6483, 189, 299, 5, 41, "Output",ExpressionUUID->"dc155801-5fe5-4341-bf99-2f4dec25a3b3"] }, Open ]], Cell[CellGroupData[{ -Cell[6389, 211, 133, 3, 66, "Input",ExpressionUUID->"826bfb63-0b0a-453a-921e-e6b2d4370dd4"], -Cell[6525, 216, 252, 5, 75, "Output",ExpressionUUID->"53d30ef0-ae30-4eb8-940f-fbd57036bf1a"] +Cell[6819, 199, 129, 2, 36, "Input",ExpressionUUID->"826bfb63-0b0a-453a-921e-e6b2d4370dd4"], +Cell[6951, 203, 296, 5, 41, "Output",ExpressionUUID->"cfb663cb-3d69-4f29-8d5b-9d35b197a6c1"] }, Open ]], Cell[CellGroupData[{ -Cell[6814, 226, 561, 20, 175, "Input",ExpressionUUID->"3f161619-f839-43fe-b0e6-8c0ad1e1e9d9"], -Cell[7378, 248, 273, 5, 75, "Output",ExpressionUUID->"2456a0fa-4cd5-4675-ae55-0f86483efb68"] +Cell[7284, 213, 557, 19, 100, "Input",ExpressionUUID->"3f161619-f839-43fe-b0e6-8c0ad1e1e9d9"], +Cell[7844, 234, 319, 5, 41, "Output",ExpressionUUID->"e478f2e8-4e1b-40c7-bbd1-67649ef8a71c"] }, Open ]], Cell[CellGroupData[{ -Cell[7688, 258, 561, 20, 175, "Input",ExpressionUUID->"bdfe5776-e403-47c4-9cd7-2317d7cca590"], -Cell[8252, 280, 271, 5, 75, "Output",ExpressionUUID->"d2f261b2-2b12-4682-b78f-2659b83e699e"] +Cell[8200, 244, 557, 19, 100, "Input",ExpressionUUID->"bdfe5776-e403-47c4-9cd7-2317d7cca590"], +Cell[8760, 265, 317, 5, 41, "Output",ExpressionUUID->"d1f7389d-86d2-446f-9d1f-a8af57a98cc7"] }, Open ]], Cell[CellGroupData[{ -Cell[8560, 290, 1592, 51, 362, "Input",ExpressionUUID->"d9bbdd6f-f5f1-4a71-aaa1-5c0906195453"], -Cell[10155, 343, 267, 5, 75, "Output",ExpressionUUID->"59d933d9-f38d-44ab-9f2d-53a07374f3be"] +Cell[9114, 275, 1588, 50, 215, "Input",ExpressionUUID->"d9bbdd6f-f5f1-4a71-aaa1-5c0906195453"], +Cell[10705, 327, 313, 5, 41, "Output",ExpressionUUID->"c1daf204-ff2e-474d-97dd-408fa5199498"] }, Open ]], Cell[CellGroupData[{ -Cell[10459, 353, 1426, 47, 362, "Input",ExpressionUUID->"3f419dba-9cf0-495f-bebf-693523759bd6"], -Cell[11888, 402, 286, 6, 75, "Output",ExpressionUUID->"cf46ac6b-c191-4e68-98ac-cbade79d676c"] +Cell[11055, 337, 1422, 46, 215, "Input",ExpressionUUID->"3f419dba-9cf0-495f-bebf-693523759bd6"], +Cell[12480, 385, 329, 6, 41, "Output",ExpressionUUID->"9894869b-0a70-4de2-b982-fc78c17fe926"] }, Open ]], Cell[CellGroupData[{ -Cell[12211, 413, 1426, 47, 362, "Input",ExpressionUUID->"7a84bee4-1cad-4121-a752-3a07a3b2fef3"], -Cell[13640, 462, 289, 6, 75, "Output",ExpressionUUID->"51c7302a-4041-4d4b-929a-a87cf67ab587"] +Cell[12846, 396, 1422, 46, 215, "Input",ExpressionUUID->"7a84bee4-1cad-4121-a752-3a07a3b2fef3"], +Cell[14271, 444, 335, 6, 41, "Output",ExpressionUUID->"576f0b1e-4255-4f09-91b3-4f8f846dfa4f"] }, Open ]], Cell[CellGroupData[{ -Cell[13966, 473, 1592, 51, 362, "Input",ExpressionUUID->"caa8e0cf-7fae-429f-8405-426d2e61f16e"], -Cell[15561, 526, 268, 5, 75, "Output",ExpressionUUID->"7b6ea78d-22c6-4832-85a3-fe0ae7bd5165"] +Cell[14643, 455, 1588, 50, 215, "Input",ExpressionUUID->"caa8e0cf-7fae-429f-8405-426d2e61f16e"], +Cell[16234, 507, 312, 5, 41, "Output",ExpressionUUID->"3e020120-6dae-49cd-afa9-31636c44a0f3"] }, Open ]], Cell[CellGroupData[{ -Cell[15866, 536, 135, 3, 66, "Input",ExpressionUUID->"1a647d6d-7f17-4053-95f8-e005d48fec17"], -Cell[16004, 541, 256, 5, 75, "Output",ExpressionUUID->"35aea4e1-80d4-4f8b-b917-1ea1f9907ee0"] +Cell[16583, 517, 131, 2, 36, "Input",ExpressionUUID->"1a647d6d-7f17-4053-95f8-e005d48fec17"], +Cell[16717, 521, 301, 5, 41, "Output",ExpressionUUID->"683d74ea-db67-499c-9135-ba8f699fc6aa"] }, Open ]], Cell[CellGroupData[{ -Cell[16297, 551, 137, 3, 66, "Input",ExpressionUUID->"b9eac5f9-d5af-4af2-bf13-f2a8ddf2daff"], -Cell[16437, 556, 258, 5, 75, "Output",ExpressionUUID->"70594058-ca3c-4c9e-b4d6-69d2a70d0293"] +Cell[17055, 531, 133, 2, 36, "Input",ExpressionUUID->"b9eac5f9-d5af-4af2-bf13-f2a8ddf2daff"], +Cell[17191, 535, 304, 5, 41, "Output",ExpressionUUID->"7e91557a-3033-4267-953c-333c49ca13c9"] }, Open ]], Cell[CellGroupData[{ -Cell[16732, 566, 138, 3, 66, "Input",ExpressionUUID->"d43b5a83-7f8f-4754-a7af-5d7bb52dcd98"], -Cell[16873, 571, 260, 5, 75, "Output",ExpressionUUID->"7e37a310-378f-498a-b9ad-337120337443"] +Cell[17532, 545, 134, 2, 36, "Input",ExpressionUUID->"d43b5a83-7f8f-4754-a7af-5d7bb52dcd98"], +Cell[17669, 549, 304, 5, 41, "Output",ExpressionUUID->"10e82089-d286-4d7d-808e-dd60543e988d"] }, Open ]], Cell[CellGroupData[{ -Cell[17170, 581, 223, 5, 66, "Input",ExpressionUUID->"ea564721-4283-464e-ba73-b321bd36f74a"], -Cell[17396, 588, 269, 6, 75, "Output",ExpressionUUID->"5d1507b1-aa96-43a3-a5f6-7212eadf6ba8"] +Cell[18010, 559, 219, 4, 36, "Input",ExpressionUUID->"ea564721-4283-464e-ba73-b321bd36f74a"], +Cell[18232, 565, 315, 6, 41, "Output",ExpressionUUID->"95b3940b-443b-47d4-a88b-19b878cee748"] }, Open ]], Cell[CellGroupData[{ -Cell[17702, 599, 138, 3, 66, "Input",ExpressionUUID->"59273c13-f1c9-40aa-9c3d-d6180fe2d761"], -Cell[17843, 604, 260, 5, 75, "Output",ExpressionUUID->"66e7d2a3-520a-43c3-b438-2bf7e9cc416c"] +Cell[18584, 576, 134, 2, 36, "Input",ExpressionUUID->"59273c13-f1c9-40aa-9c3d-d6180fe2d761"], +Cell[18721, 580, 304, 5, 41, "Output",ExpressionUUID->"3f8f9aae-45af-4ca6-a8e6-9de234094cc8"] }, Open ]], Cell[CellGroupData[{ -Cell[18140, 614, 326, 6, 66, "Input",ExpressionUUID->"523a5e67-ce58-496f-992a-d482c0c67570"], -Cell[18469, 622, 253, 5, 75, "Output",ExpressionUUID->"3a7b1ce7-00b4-4a20-a6fb-6c673d2361e1"] +Cell[19062, 590, 322, 5, 36, "Input",ExpressionUUID->"523a5e67-ce58-496f-992a-d482c0c67570"], +Cell[19387, 597, 296, 5, 41, "Output",ExpressionUUID->"bb06187f-ef4c-44c3-980a-eb288d0c06f5"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 632, 302, 6, 66, "Input",ExpressionUUID->"c3373745-d99e-4638-a690-443d6521c14e"], -Cell[19064, 640, 259, 5, 75, "Output",ExpressionUUID->"30526edf-d4fc-4278-9fba-f51af3da31ac"] +Cell[19720, 607, 298, 5, 36, "Input",ExpressionUUID->"c3373745-d99e-4638-a690-443d6521c14e"], +Cell[20021, 614, 302, 5, 41, "Output",ExpressionUUID->"715ae381-6aea-4501-b83c-e7a2a239d63d"] }, Open ]], Cell[CellGroupData[{ -Cell[19360, 650, 223, 5, 66, "Input",ExpressionUUID->"fa431e54-ba79-4694-a497-8d6afa2bca3a"], -Cell[19586, 657, 250, 5, 75, "Output",ExpressionUUID->"94e1cded-8e44-464f-ab86-e616f51307cf"] +Cell[20360, 624, 219, 4, 36, "Input",ExpressionUUID->"fa431e54-ba79-4694-a497-8d6afa2bca3a"], +Cell[20582, 630, 294, 5, 41, "Output",ExpressionUUID->"f68ca84b-0f15-4f7b-b137-000821540002"] }, Open ]], Cell[CellGroupData[{ -Cell[19873, 667, 354, 11, 96, "Input",ExpressionUUID->"9565be1c-f08f-4108-988e-7de99bc60af0"], -Cell[20230, 680, 273, 5, 75, "Output",ExpressionUUID->"5bff3cb7-a3ef-4a74-9004-7ad5fa20c11c"] +Cell[20913, 640, 350, 10, 54, "Input",ExpressionUUID->"9565be1c-f08f-4108-988e-7de99bc60af0"], +Cell[21266, 652, 317, 5, 41, "Output",ExpressionUUID->"16d43aa1-17f8-436e-af18-4abd2fa143a4"] }, Open ]], Cell[CellGroupData[{ -Cell[20540, 690, 354, 11, 96, "Input",ExpressionUUID->"66041539-2752-4550-9be0-7d916925ff81"], -Cell[20897, 703, 290, 6, 75, "Output",ExpressionUUID->"455c40ca-551f-4b8b-b6bc-2e3833f63585"] +Cell[21620, 662, 350, 10, 54, "Input",ExpressionUUID->"66041539-2752-4550-9be0-7d916925ff81"], +Cell[21973, 674, 334, 6, 41, "Output",ExpressionUUID->"906c6616-d195-415b-bc30-ffdbe70961bb"] }, Open ]], Cell[CellGroupData[{ -Cell[21224, 714, 998, 27, 184, "Input",ExpressionUUID->"cd0f5fe2-800f-432d-9e83-1e697ee9a749"], -Cell[22225, 743, 274, 5, 75, "Output",ExpressionUUID->"43c1c84b-06e2-4271-aea5-e03c3388b9ed"] +Cell[22344, 685, 994, 26, 105, "Input",ExpressionUUID->"cd0f5fe2-800f-432d-9e83-1e697ee9a749"], +Cell[23341, 713, 318, 5, 41, "Output",ExpressionUUID->"cd44eca9-4205-4b98-86b2-4b8c686042ca"] }, Open ]], Cell[CellGroupData[{ -Cell[22536, 753, 203, 4, 66, "Input",ExpressionUUID->"abe18745-5483-42f0-8f72-2be9a2918b6c"], -Cell[22742, 759, 251, 5, 75, "Output",ExpressionUUID->"71ca72f2-e79a-4c1c-aa3c-f413fa79053e"] +Cell[23696, 723, 199, 3, 36, "Input",ExpressionUUID->"abe18745-5483-42f0-8f72-2be9a2918b6c"], +Cell[23898, 728, 295, 5, 41, "Output",ExpressionUUID->"df4d9817-daf7-4729-8188-3eba9df25f56"] }, Open ]], Cell[CellGroupData[{ -Cell[23030, 769, 331, 6, 66, "Input",ExpressionUUID->"c2fce426-14da-4dd7-aa62-bd47a0c8e81e"], -Cell[23364, 777, 230, 4, 75, "Output",ExpressionUUID->"bcd0e4cc-666f-4021-addc-a6660ebf4ae1"] +Cell[24230, 738, 327, 5, 36, "Input",ExpressionUUID->"c2fce426-14da-4dd7-aa62-bd47a0c8e81e"], +Cell[24560, 745, 274, 4, 41, "Output",ExpressionUUID->"10e0f2f6-66cd-4b00-992d-47e43066f2ac"] }, Open ]], -Cell[23609, 784, 177, 3, 66, "Input",ExpressionUUID->"be9b286b-d328-4901-b030-8baca6fe0c91"], +Cell[24849, 752, 173, 2, 109, "Input",ExpressionUUID->"be9b286b-d328-4901-b030-8baca6fe0c91"], Cell[CellGroupData[{ -Cell[23811, 791, 331, 6, 66, "Input",ExpressionUUID->"6f67c5bc-fc5e-4a19-9ba6-661e1984cc6f"], -Cell[24145, 799, 234, 4, 75, "Output",ExpressionUUID->"af56ada0-bdb5-4a1f-b234-614556f04c0d"] +Cell[25047, 758, 327, 5, 36, "Input",ExpressionUUID->"6f67c5bc-fc5e-4a19-9ba6-661e1984cc6f"], +Cell[25377, 765, 280, 4, 41, "Output",ExpressionUUID->"35e060ec-1e5b-4224-b9a7-5b1680932550"] }, Open ]], -Cell[24394, 806, 177, 3, 66, "Input",ExpressionUUID->"51491074-964c-4747-ac4a-2c86a9af3ca0"], +Cell[25672, 772, 173, 2, 109, "Input",ExpressionUUID->"51491074-964c-4747-ac4a-2c86a9af3ca0"], Cell[CellGroupData[{ -Cell[24596, 813, 333, 6, 66, "Input",ExpressionUUID->"abacad17-87f9-4c57-97a5-4671695a11a6"], -Cell[24932, 821, 231, 4, 75, "Output",ExpressionUUID->"f7c23d1e-5183-445d-92b9-64ec67ff307e"] +Cell[25870, 778, 329, 5, 36, "Input",ExpressionUUID->"abacad17-87f9-4c57-97a5-4671695a11a6"], +Cell[26202, 785, 275, 4, 41, "Output",ExpressionUUID->"e652f24b-59fa-4f16-a532-731b451b2850"] }, Open ]], -Cell[25178, 828, 177, 3, 66, "Input",ExpressionUUID->"875bf697-22dc-4f5d-a27c-14c908876b04"], +Cell[26492, 792, 173, 2, 109, "Input",ExpressionUUID->"875bf697-22dc-4f5d-a27c-14c908876b04"], Cell[CellGroupData[{ -Cell[25380, 835, 357, 6, 66, "Input",ExpressionUUID->"da6f0fd0-5812-4b4b-9916-6b989c03e0cf"], -Cell[25740, 843, 230, 4, 75, "Output",ExpressionUUID->"2794b3d5-20d7-4f7c-ab4a-e4f8eed926e0"] +Cell[26690, 798, 353, 5, 36, "Input",ExpressionUUID->"da6f0fd0-5812-4b4b-9916-6b989c03e0cf"], +Cell[27046, 805, 273, 4, 41, "Output",ExpressionUUID->"1e46f93d-9246-4130-8219-ee7355f4cc2c"] }, Open ]], -Cell[25985, 850, 175, 3, 66, "Input",ExpressionUUID->"53b7c85f-c056-49a9-96fc-42d558804987"], +Cell[27334, 812, 171, 2, 109, "Input",ExpressionUUID->"53b7c85f-c056-49a9-96fc-42d558804987"], Cell[CellGroupData[{ -Cell[26185, 857, 303, 6, 66, "Input",ExpressionUUID->"1db2f001-9463-4e12-96c5-ae91a21cb3fe"], -Cell[26491, 865, 232, 4, 75, "Output",ExpressionUUID->"b1259f44-b67a-4079-bb7d-25648b5a9ead"] +Cell[27530, 818, 299, 5, 36, "Input",ExpressionUUID->"1db2f001-9463-4e12-96c5-ae91a21cb3fe"], +Cell[27832, 825, 276, 4, 41, "Output",ExpressionUUID->"2a084f5b-e3ff-4fe5-b74d-a34695f3dbae"] }, Open ]], -Cell[26738, 872, 175, 3, 66, "Input",ExpressionUUID->"a0a4dc97-3f94-4533-ada5-8c75a92b85ef"], +Cell[28123, 832, 171, 2, 109, "Input",ExpressionUUID->"a0a4dc97-3f94-4533-ada5-8c75a92b85ef"], Cell[CellGroupData[{ -Cell[26938, 879, 309, 6, 66, "Input",ExpressionUUID->"1e3960fc-6ad5-4f8e-9613-63b254df9637"], -Cell[27250, 887, 233, 4, 75, "Output",ExpressionUUID->"10457894-2111-4a4d-a835-ef62811a5da7"] +Cell[28319, 838, 305, 5, 36, "Input",ExpressionUUID->"1e3960fc-6ad5-4f8e-9613-63b254df9637"], +Cell[28627, 845, 277, 4, 41, "Output",ExpressionUUID->"4feaf019-54f8-42ad-ba21-4dac0c91cf1e"] }, Open ]], -Cell[27498, 894, 177, 3, 66, "Input",ExpressionUUID->"019295da-a9f5-45ef-8427-662c09336965"], +Cell[28919, 852, 173, 2, 109, "Input",ExpressionUUID->"019295da-a9f5-45ef-8427-662c09336965"], Cell[CellGroupData[{ -Cell[27700, 901, 331, 6, 66, "Input",ExpressionUUID->"3f6dcc07-9579-4cdd-9e77-eeaba01a3ec6"], -Cell[28034, 909, 235, 4, 75, "Output",ExpressionUUID->"2f560d87-8748-4d99-b2dd-3827572ef0cf"] +Cell[29117, 858, 327, 5, 36, "Input",ExpressionUUID->"3f6dcc07-9579-4cdd-9e77-eeaba01a3ec6"], +Cell[29447, 865, 281, 4, 41, "Output",ExpressionUUID->"b2e81f9d-4a76-45b0-b7b5-2dea01adaf14"] }, Open ]], -Cell[28284, 916, 176, 3, 66, "Input",ExpressionUUID->"f1ba4815-7e52-4e52-90bd-c3de3a670c60"], +Cell[29743, 872, 172, 2, 109, "Input",ExpressionUUID->"f1ba4815-7e52-4e52-90bd-c3de3a670c60"], Cell[CellGroupData[{ -Cell[28485, 923, 280, 5, 66, "Input",ExpressionUUID->"527dc628-63bd-4d40-8438-c83309fb5fb2"], -Cell[28768, 930, 232, 4, 75, "Output",ExpressionUUID->"e24cdd66-f49e-47be-ae56-dc72e1470b24"] +Cell[29940, 878, 276, 4, 36, "Input",ExpressionUUID->"527dc628-63bd-4d40-8438-c83309fb5fb2"], +Cell[30219, 884, 276, 4, 41, "Output",ExpressionUUID->"00d172e6-e6fa-4a21-9f4a-9314d915ac68"] }, Open ]], -Cell[29015, 937, 179, 3, 66, "Input",ExpressionUUID->"6a017435-6ff3-46b2-ad75-25eed0695c2d"], +Cell[30510, 891, 175, 2, 109, "Input",ExpressionUUID->"6a017435-6ff3-46b2-ad75-25eed0695c2d"], Cell[CellGroupData[{ -Cell[29219, 944, 19813, 486, 5405, "Input",ExpressionUUID->"ffcd4fa8-0c62-4893-829a-b2d47c77774b"], -Cell[49035, 1432, 271, 5, 75, "Output",ExpressionUUID->"0b9d49e6-a30d-4b8c-8e00-3961184d1bb5"] +Cell[30710, 897, 19809, 485, 3208, "Input",ExpressionUUID->"ffcd4fa8-0c62-4893-829a-b2d47c77774b"], +Cell[50522, 1384, 314, 5, 41, "Output",ExpressionUUID->"c1373259-3a8b-46a9-8427-c2bf20f325fa"] }, Open ]], Cell[CellGroupData[{ -Cell[49343, 1442, 19752, 490, 5343, "Input",ExpressionUUID->"f36bbb79-6a45-4206-8baf-12792cb72c87"], -Cell[69098, 1934, 266, 5, 75, "Output",ExpressionUUID->"6d4a23c5-3ce4-402b-8bd0-1959ed046e5c"] +Cell[50873, 1394, 19748, 489, 3138, "Input",ExpressionUUID->"f36bbb79-6a45-4206-8baf-12792cb72c87"], +Cell[70624, 1885, 312, 5, 41, "Output",ExpressionUUID->"88e38a21-1eb8-4055-8523-76ffbbc7791a"] }, Open ]], Cell[CellGroupData[{ -Cell[69401, 1944, 19752, 484, 5342, "Input",ExpressionUUID->"95aff88c-658e-4f5b-80f5-3db601ed2749"], -Cell[89156, 2430, 287, 6, 75, "Output",ExpressionUUID->"eca866a4-1c10-4d29-b834-74713bda26c4"] +Cell[70973, 1895, 19748, 483, 3198, "Input",ExpressionUUID->"95aff88c-658e-4f5b-80f5-3db601ed2749"], +Cell[90724, 2380, 333, 6, 41, "Output",ExpressionUUID->"56191b71-fa22-4843-8e72-e09e2487b2db"] }, Open ]], Cell[CellGroupData[{ -Cell[89480, 2441, 22538, 554, 6074, "Input",ExpressionUUID->"37bf501b-ffa0-415b-8b3a-99d38cbb6d3d"], -Cell[112021, 2997, 288, 6, 75, "Output",ExpressionUUID->"351fb5fa-1528-401f-a82c-f7e30459236c"] +Cell[91094, 2391, 22534, 553, 3677, "Input",ExpressionUUID->"37bf501b-ffa0-415b-8b3a-99d38cbb6d3d"], +Cell[113631, 2946, 332, 6, 41, "Output",ExpressionUUID->"b9ccfad8-32b5-477b-b8a5-bd1f4d82cd09"] }, Open ]], Cell[CellGroupData[{ -Cell[112346, 3008, 22539, 554, 6074, "Input",ExpressionUUID->"1270cfbd-3842-4e0d-a9a0-36b7cce44817"], -Cell[134888, 3564, 291, 6, 75, "Output",ExpressionUUID->"9c3ed634-3c5e-4f4a-b34f-ae46791dfaae"] +Cell[114000, 2957, 22535, 553, 3642, "Input",ExpressionUUID->"1270cfbd-3842-4e0d-a9a0-36b7cce44817"], +Cell[136538, 3512, 337, 6, 41, "Output",ExpressionUUID->"8e060b89-f707-4563-b149-a8f3e0bc254d"] }, Open ]], Cell[CellGroupData[{ -Cell[135216, 3575, 25495, 627, 6806, "Input",ExpressionUUID->"a8bcd563-1baa-4b7b-8e44-e38af43df0ae"], -Cell[160714, 4204, 290, 6, 75, "Output",ExpressionUUID->"7c97beb6-4498-45de-bf83-743cb76c1d12"] +Cell[136912, 3523, 25491, 626, 4121, "Input",ExpressionUUID->"a8bcd563-1baa-4b7b-8e44-e38af43df0ae"], +Cell[162406, 4151, 334, 6, 41, "Output",ExpressionUUID->"48a9f3f5-09bd-486d-9f30-1dcaefb93887"] }, Open ]], Cell[CellGroupData[{ -Cell[161041, 4215, 134, 3, 66, "Input",ExpressionUUID->"a140ba0e-db9d-4a5f-87cd-7a41850ccd6a"], -Cell[161178, 4220, 253, 5, 75, "Output",ExpressionUUID->"3e98bbc9-69aa-49b2-b7c9-b656d17c71bf"] +Cell[162777, 4162, 130, 2, 36, "Input",ExpressionUUID->"a140ba0e-db9d-4a5f-87cd-7a41850ccd6a"], +Cell[162910, 4166, 298, 5, 41, "Output",ExpressionUUID->"8589286d-fb0b-48a0-b878-7382e3e76e48"] }, Open ]], Cell[CellGroupData[{ -Cell[161468, 4230, 134, 3, 66, "Input",ExpressionUUID->"25fa88a4-0889-4700-8d33-5086b86b7c7d"], -Cell[161605, 4235, 254, 5, 75, "Output",ExpressionUUID->"0bd414ed-9e05-4add-88dc-c25d03473898"] +Cell[163245, 4176, 130, 2, 36, "Input",ExpressionUUID->"25fa88a4-0889-4700-8d33-5086b86b7c7d"], +Cell[163378, 4180, 300, 5, 41, "Output",ExpressionUUID->"e243d56e-bfe6-4df2-ae45-c3ec8d8a1583"] }, Open ]], Cell[CellGroupData[{ -Cell[161896, 4245, 1148, 40, 246, "Input",ExpressionUUID->"f0e388d1-d839-4f03-8681-1ade3a9d54e1"], -Cell[163047, 4287, 269, 5, 75, "Output",ExpressionUUID->"5a762686-ecc7-44d2-b8b1-6cbc6cbf9309"] +Cell[163715, 4190, 1144, 39, 144, "Input",ExpressionUUID->"f0e388d1-d839-4f03-8681-1ade3a9d54e1"], +Cell[164862, 4231, 313, 5, 41, "Output",ExpressionUUID->"6fcbef7e-4921-402d-8d9b-998d0aee5770"] }, Open ]], Cell[CellGroupData[{ -Cell[163353, 4297, 1045, 36, 246, "Input",ExpressionUUID->"0c30ee0a-e809-4998-9dba-cb42efcd0b63"], -Cell[164401, 4335, 288, 6, 75, "Output",ExpressionUUID->"814d79a2-0895-4f5a-9499-c741488755d5"] +Cell[165212, 4241, 1041, 35, 144, "Input",ExpressionUUID->"0c30ee0a-e809-4998-9dba-cb42efcd0b63"], +Cell[166256, 4278, 332, 6, 41, "Output",ExpressionUUID->"9343056d-4106-43cf-b6e8-9c08b7c40bd8"] }, Open ]], Cell[CellGroupData[{ -Cell[164726, 4346, 1148, 40, 246, "Input",ExpressionUUID->"d7a80348-a29c-4d60-88b0-40bf2212e92f"], -Cell[165877, 4388, 272, 5, 75, "Output",ExpressionUUID->"7a406b04-1760-4033-b3d9-9163e8d4713c"] +Cell[166625, 4289, 1144, 39, 144, "Input",ExpressionUUID->"d7a80348-a29c-4d60-88b0-40bf2212e92f"], +Cell[167772, 4330, 316, 5, 41, "Output",ExpressionUUID->"c7d17bac-b8c4-4297-8ea6-5461ad6deecd"] }, Open ]], Cell[CellGroupData[{ -Cell[166186, 4398, 112, 2, 66, "Input",ExpressionUUID->"4ff62e70-b611-4e38-a55b-c933f61f867a"], -Cell[166301, 4402, 269, 5, 75, "Output",ExpressionUUID->"a23038df-5b27-4c8d-81c2-fbc28260c3eb"] +Cell[168125, 4340, 108, 1, 36, "Input",ExpressionUUID->"4ff62e70-b611-4e38-a55b-c933f61f867a"], +Cell[168236, 4343, 313, 5, 41, "Output",ExpressionUUID->"6cb0691b-3a76-44b9-a145-dff5ff48ade7"] }, Open ]], Cell[CellGroupData[{ -Cell[166607, 4412, 112, 2, 66, "Input",ExpressionUUID->"0eac4dd1-3812-43a1-a598-1782238a9214"], -Cell[166722, 4416, 290, 6, 75, "Output",ExpressionUUID->"ab43283e-88f7-40e1-8408-97d92629f73a"] +Cell[168586, 4353, 108, 1, 36, "Input",ExpressionUUID->"0eac4dd1-3812-43a1-a598-1782238a9214"], +Cell[168697, 4356, 334, 6, 41, "Output",ExpressionUUID->"74e39416-2a6d-44d7-bf86-f786626f44eb"] }, Open ]], Cell[CellGroupData[{ -Cell[167049, 4427, 112, 2, 66, "Input",ExpressionUUID->"58605f9a-a33d-4aa5-b2a7-78ee444368f5"], -Cell[167164, 4431, 287, 6, 75, "Output",ExpressionUUID->"0bd79e48-4432-4db4-810d-1793a72f11c5"] +Cell[169068, 4367, 108, 1, 36, "Input",ExpressionUUID->"58605f9a-a33d-4aa5-b2a7-78ee444368f5"], +Cell[169179, 4370, 331, 6, 41, "Output",ExpressionUUID->"5414923b-0a1e-4fd1-a37b-8ea81e440c82"] }, Open ]], Cell[CellGroupData[{ -Cell[167488, 4442, 112, 2, 66, "Input",ExpressionUUID->"c73c629f-ac4e-4874-8182-725c670a953b"], -Cell[167603, 4446, 269, 5, 75, "Output",ExpressionUUID->"18b5c01d-aa06-4aed-8cd8-a7406da0f607"] +Cell[169547, 4381, 108, 1, 36, "Input",ExpressionUUID->"c73c629f-ac4e-4874-8182-725c670a953b"], +Cell[169658, 4384, 314, 5, 41, "Output",ExpressionUUID->"7ea58d4b-1c20-4e52-9563-abc2dfccaf97"] }, Open ]], Cell[CellGroupData[{ -Cell[167909, 4456, 111, 2, 66, "Input",ExpressionUUID->"084048df-817a-45ca-8c42-fd6082535615"], -Cell[168023, 4460, 272, 5, 75, "Output",ExpressionUUID->"aa12e1fe-fe5f-454a-86b3-352641c7c50c"] +Cell[170009, 4394, 107, 1, 36, "Input",ExpressionUUID->"084048df-817a-45ca-8c42-fd6082535615"], +Cell[170119, 4397, 318, 5, 41, "Output",ExpressionUUID->"acea5e9b-8e73-4411-a3f4-f3691d1ca514"] }, Open ]], Cell[CellGroupData[{ -Cell[168332, 4470, 111, 2, 66, "Input",ExpressionUUID->"0695b6c8-80f6-44c4-a86e-d1a687f82a25"], -Cell[168446, 4474, 272, 5, 75, "Output",ExpressionUUID->"e9cf1dc0-c205-4392-9a64-3fb4a97f0c2a"] +Cell[170474, 4407, 107, 1, 36, "Input",ExpressionUUID->"0695b6c8-80f6-44c4-a86e-d1a687f82a25"], +Cell[170584, 4410, 320, 5, 41, "Output",ExpressionUUID->"3ed3defb-b354-4c1b-8771-b4214df41299"] }, Open ]], Cell[CellGroupData[{ -Cell[168755, 4484, 501, 17, 125, "Input",ExpressionUUID->"bf8c47a5-ea81-4d55-ab36-61267382f6e5"], -Cell[169259, 4503, 287, 6, 75, "Output",ExpressionUUID->"358925d0-630c-4d01-81d3-49733beb6aab"] +Cell[170941, 4420, 497, 16, 71, "Input",ExpressionUUID->"bf8c47a5-ea81-4d55-ab36-61267382f6e5"], +Cell[171441, 4438, 331, 6, 41, "Output",ExpressionUUID->"0326bac7-d94f-4123-b604-5b48d85bdd17"] }, Open ]], Cell[CellGroupData[{ -Cell[169583, 4514, 501, 17, 125, "Input",ExpressionUUID->"2f540fd8-14e5-400d-b548-a28e8fe79797"], -Cell[170087, 4533, 283, 6, 75, "Output",ExpressionUUID->"df0999c8-fe67-4f7e-929c-360e6e566f56"] +Cell[171809, 4449, 497, 16, 71, "Input",ExpressionUUID->"2f540fd8-14e5-400d-b548-a28e8fe79797"], +Cell[172309, 4467, 328, 6, 41, "Output",ExpressionUUID->"87964239-89f7-498f-9a39-6b386d8edcfc"] }, Open ]], Cell[CellGroupData[{ -Cell[170407, 4544, 1792, 61, 420, "Input",ExpressionUUID->"6e3a0cff-a89f-408a-a0b6-770c92f9f376"], -Cell[172202, 4607, 271, 5, 75, "Output",ExpressionUUID->"f9ef4f82-9985-4ff8-81c7-5293c98b8002"] +Cell[172674, 4478, 1788, 60, 340, "Input",ExpressionUUID->"6e3a0cff-a89f-408a-a0b6-770c92f9f376"], +Cell[174465, 4540, 314, 5, 41, "Output",ExpressionUUID->"c2da365e-3ec4-4d05-a165-1a79db98a74c"] }, Open ]], Cell[CellGroupData[{ -Cell[172510, 4617, 1105, 37, 299, "Input",ExpressionUUID->"f7d73717-d2f8-40b1-af46-bb63f4e2bf56"], -Cell[173618, 4656, 284, 6, 75, "Output",ExpressionUUID->"52c0305b-bbdb-436d-a304-ce40e0098d84"] +Cell[174816, 4550, 1101, 36, 174, "Input",ExpressionUUID->"f7d73717-d2f8-40b1-af46-bb63f4e2bf56"], +Cell[175920, 4588, 328, 6, 41, "Output",ExpressionUUID->"9be8612b-320f-4fbc-848a-89213839747e"] }, Open ]], Cell[CellGroupData[{ -Cell[173939, 4667, 1822, 62, 420, "Input",ExpressionUUID->"9534853d-6c51-4f3d-af80-da47e4e1a1d0"], -Cell[175764, 4731, 268, 5, 75, "Output",ExpressionUUID->"2458ea57-2898-40a1-a363-97d883edab00"] +Cell[176285, 4599, 1818, 61, 340, "Input",ExpressionUUID->"9534853d-6c51-4f3d-af80-da47e4e1a1d0"], +Cell[178106, 4662, 313, 5, 41, "Output",ExpressionUUID->"faafcdfd-2009-423a-8a97-b51516f54390"] }, Open ]], Cell[CellGroupData[{ -Cell[176069, 4741, 1635, 54, 368, "Input",ExpressionUUID->"ce707e72-b936-4662-b118-54cdf9042b08"], -Cell[177707, 4797, 267, 5, 75, "Output",ExpressionUUID->"e4025daa-dd1d-45c7-bd75-1723b3406a52"] +Cell[178456, 4672, 1631, 53, 208, "Input",ExpressionUUID->"ce707e72-b936-4662-b118-54cdf9042b08"], +Cell[180090, 4727, 310, 5, 41, "Output",ExpressionUUID->"2e9d34ad-e625-40ce-9583-26516702b089"] }, Open ]], Cell[CellGroupData[{ -Cell[178011, 4807, 1635, 54, 101, "Input",ExpressionUUID->"7fe7f35f-3585-4bbe-8596-a442c6791b15"], -Cell[179649, 4863, 268, 5, 41, "Output",ExpressionUUID->"b430a4be-769f-4732-9f10-d70befc67177"] +Cell[180437, 4737, 1631, 53, 208, "Input",ExpressionUUID->"7fe7f35f-3585-4bbe-8596-a442c6791b15"], +Cell[182071, 4792, 312, 5, 41, "Output",ExpressionUUID->"ca72b4c3-6b2c-4b5a-8c85-521cce9337b2"] }, Open ]], -Cell[179932, 4871, 189, 4, 36, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], -Cell[180124, 4877, 156, 3, 36, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], -Cell[180283, 4882, 185, 4, 36, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], -Cell[180471, 4888, 152, 3, 36, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[180648, 4895, 1301, 43, 61, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[181952, 4940, 176, 3, 41, "Output",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[182420, 4802, 208, 3, 36, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], +Cell[182631, 4807, 183, 2, 41, "Output",ExpressionUUID->"dd5042ea-aaf7-474e-9588-36a2f008b41b"] }, Open ]], +Cell[182829, 4812, 175, 2, 109, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], Cell[CellGroupData[{ -Cell[182165, 4948, 908, 31, 73, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[183076, 4981, 175, 3, 41, "Output",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[183029, 4818, 204, 3, 36, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], +Cell[183236, 4823, 185, 2, 41, "Output",ExpressionUUID->"69d648d3-83f0-4f17-971a-b2f0f4d08e32"] }, Open ]], +Cell[183436, 4828, 171, 2, 109, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[183288, 4989, 887, 30, 73, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[184178, 5021, 177, 3, 41, "Output",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[183632, 4834, 1297, 42, 174, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], +Cell[184932, 4878, 221, 3, 41, "Output",ExpressionUUID->"3164320e-cb1a-4312-94e6-765dc767af2a"] }, Open ]], Cell[CellGroupData[{ -Cell[184392, 5029, 558, 19, 66, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[184953, 5050, 172, 3, 41, "Output",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[185190, 4886, 927, 30, 128, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], +Cell[186120, 4918, 217, 3, 41, "Output",ExpressionUUID->"50111f9f-f867-46c1-af24-3786b73cc0ca"] }, Open ]], Cell[CellGroupData[{ -Cell[185162, 5058, 651, 22, 66, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[185816, 5082, 170, 3, 41, "Output",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[186374, 4926, 906, 29, 128, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], +Cell[187283, 4957, 221, 3, 41, "Output",ExpressionUUID->"bce40c0a-bd54-4626-bb3c-969cd873ec73"] }, Open ]], Cell[CellGroupData[{ -Cell[186023, 5090, 170, 5, 71, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[186196, 5097, 173, 3, 41, "Output",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[187541, 4965, 554, 18, 66, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], +Cell[188098, 4985, 217, 3, 41, "Output",ExpressionUUID->"03eb080e-b4a4-45ad-863c-6b15ff87a5d4"] }, Open ]], Cell[CellGroupData[{ -Cell[186406, 5105, 170, 5, 69, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[186579, 5112, 169, 3, 41, "Output",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[188352, 4993, 647, 21, 66, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], +Cell[189002, 5016, 212, 3, 41, "Output",ExpressionUUID->"6947630a-abd9-4712-b511-471fcea204b3"] }, Open ]], Cell[CellGroupData[{ -Cell[186785, 5120, 181, 5, 55, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[186969, 5127, 173, 3, 41, "Output",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[189251, 5024, 166, 4, 71, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], +Cell[189420, 5030, 215, 3, 41, "Output",ExpressionUUID->"8f0693e8-c1a5-4db8-abcf-9d2c27769250"] }, Open ]], Cell[CellGroupData[{ -Cell[187179, 5135, 181, 5, 55, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[187363, 5142, 170, 3, 41, "Output",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[189672, 5038, 166, 4, 69, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], +Cell[189841, 5044, 216, 3, 41, "Output",ExpressionUUID->"d8a7d9ea-b20d-4a9b-b3b2-871f49ea6cf5"] }, Open ]], Cell[CellGroupData[{ -Cell[187570, 5150, 6055, 185, 431, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[193628, 5337, 174, 3, 41, "Output",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[190094, 5052, 177, 4, 55, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], +Cell[190274, 5058, 215, 3, 41, "Output",ExpressionUUID->"e4c62550-8a27-4afe-b50d-76e5af95a39d"] }, Open ]], Cell[CellGroupData[{ -Cell[193839, 5345, 368, 9, 53, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[194210, 5356, 170, 3, 41, "Output",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[190526, 5066, 177, 4, 55, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], +Cell[190706, 5072, 218, 3, 41, "Output",ExpressionUUID->"401684bc-8fe1-4d60-a724-ea2d59dac5b2"] }, Open ]], Cell[CellGroupData[{ -Cell[194417, 5364, 6122, 187, 431, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[200542, 5553, 174, 3, 41, "Output",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[190961, 5080, 6051, 184, 831, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], +Cell[197015, 5266, 218, 3, 41, "Output",ExpressionUUID->"062d4872-b4f8-476e-a8b7-e8c433fa8406"] }, Open ]], Cell[CellGroupData[{ -Cell[200753, 5561, 368, 9, 53, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[201124, 5572, 170, 3, 41, "Output",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[197270, 5274, 364, 8, 53, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], +Cell[197637, 5284, 216, 3, 41, "Output",ExpressionUUID->"66d6edd8-6e53-4076-b647-4cf540bbdd74"] }, Open ]], Cell[CellGroupData[{ -Cell[201331, 5580, 2663, 88, 215, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[203997, 5670, 171, 3, 41, "Output",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[197890, 5292, 6118, 186, 900, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], +Cell[204011, 5480, 219, 3, 41, "Output",ExpressionUUID->"4473f893-f413-4821-8d27-8f24ec64306a"] }, Open ]], Cell[CellGroupData[{ -Cell[204205, 5678, 2603, 85, 215, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[206811, 5765, 171, 3, 41, "Output",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[204267, 5488, 364, 8, 53, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], +Cell[204634, 5498, 212, 3, 41, "Output",ExpressionUUID->"19e3011b-b42d-4a9b-b59a-2e6551ce5c75"] }, Open ]], Cell[CellGroupData[{ -Cell[207019, 5773, 3712, 118, 316, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[210734, 5893, 171, 3, 41, "Output",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[204883, 5506, 2659, 87, 435, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], +Cell[207545, 5595, 217, 3, 41, "Output",ExpressionUUID->"4bb77eb7-e4db-4744-b4b8-6b1e9a2a723f"] }, Open ]], -Cell[210920, 5899, 138, 3, 36, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ -Cell[211083, 5906, 2054, 59, 116, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], -Cell[213140, 5967, 566, 12, 50, "Message",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], -Cell[213709, 5981, 569, 12, 50, "Message",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], -Cell[214281, 5995, 570, 12, 50, "Message",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], -Cell[214854, 6009, 458, 10, 26, "Message",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], -Cell[215315, 6021, 172, 3, 41, "Output",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[207799, 5603, 2599, 84, 435, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], +Cell[210401, 5689, 216, 3, 41, "Output",ExpressionUUID->"bb58e556-7686-4c20-9721-592d8726e45a"] }, Open ]], Cell[CellGroupData[{ -Cell[215524, 6029, 2052, 59, 116, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], -Cell[217579, 6090, 564, 12, 50, "Message",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], -Cell[218146, 6104, 567, 12, 50, "Message",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], -Cell[218716, 6118, 570, 12, 50, "Message",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], -Cell[219289, 6132, 455, 10, 26, "Message",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], -Cell[219747, 6144, 169, 3, 41, "Output",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[210654, 5697, 3708, 117, 575, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], +Cell[214365, 5816, 219, 3, 41, "Output",ExpressionUUID->"522d7b56-3255-4bae-93ff-4d22c7c110d1"] }, Open ]], +Cell[214599, 5822, 160, 3, 109, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ -Cell[219953, 6152, 1936, 53, 63, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], -Cell[221892, 6207, 19983, 375, 295, "Output",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] +Cell[214784, 5829, 2073, 58, 276, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], +Cell[216860, 5889, 694, 15, 73, "Message",ExpressionUUID->"2fce1960-9e48-4492-88a8-08622e95236d"], +Cell[217557, 5906, 691, 15, 73, "Message",ExpressionUUID->"166f9eb2-788a-4cc4-98c1-bc9c0deddf6a"], +Cell[218251, 5923, 692, 15, 73, "Message",ExpressionUUID->"b36f6cca-4acf-4e63-865e-57cc62ab1d3b"], +Cell[218946, 5940, 519, 12, 32, "Message",ExpressionUUID->"ed0314f5-d9dc-4cdf-8dc6-0383e9ccb41a"], +Cell[219468, 5954, 214, 3, 41, "Output",ExpressionUUID->"c1f9b2b5-ff67-4b13-908f-beeb86bd5074"] }, Open ]], Cell[CellGroupData[{ -Cell[241912, 6587, 2092, 60, 116, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], -Cell[244007, 6649, 501, 11, 48, "Message",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], -Cell[244511, 6662, 503, 11, 48, "Message",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], -Cell[245017, 6675, 506, 11, 48, "Message",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], -Cell[245526, 6688, 456, 10, 26, "Message",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], -Cell[245985, 6700, 41581, 727, 292, "Output",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] +Cell[219719, 5962, 2071, 58, 276, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], +Cell[221793, 6022, 689, 15, 73, "Message",ExpressionUUID->"41423007-6b56-4dcc-9c88-06f60db53942"], +Cell[222485, 6039, 689, 15, 73, "Message",ExpressionUUID->"9539454d-91e0-4fac-a6e3-0685937be6ed"], +Cell[223177, 6056, 690, 15, 73, "Message",ExpressionUUID->"36ab8d66-d2a9-4553-a01f-cb24d0f37c3e"], +Cell[223870, 6073, 519, 12, 32, "Message",ExpressionUUID->"5fa0c16e-0af6-44f2-8fc4-9cff66248abf"], +Cell[224392, 6087, 216, 3, 41, "Output",ExpressionUUID->"51d98da1-83f3-473f-bbf9-509f8e80f1f3"] }, Open ]], -Cell[287581, 7430, 2456, 69, 140, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], -Cell[290040, 7501, 209, 5, 36, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], Cell[CellGroupData[{ -Cell[290274, 7510, 217, 7, 61, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[290494, 7519, 170, 3, 41, "Output",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[224645, 6095, 2047, 54, 232, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], +Cell[226695, 6151, 20284, 383, 297, "Output",ExpressionUUID->"d7980c6a-b9dc-448e-9b9f-fe238ba03fca"] }, Open ]], Cell[CellGroupData[{ -Cell[290701, 7527, 1814, 53, 116, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], -Cell[292518, 7582, 506, 11, 48, "Message",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], -Cell[293027, 7595, 512, 11, 48, "Message",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], -Cell[293542, 7608, 509, 11, 48, "Message",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], -Cell[294054, 7621, 456, 10, 26, "Message",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], -Cell[294513, 7633, 22336, 412, 290, "Output",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] +Cell[247016, 6539, 2111, 59, 311, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], +Cell[249130, 6600, 557, 13, 71, "Message",ExpressionUUID->"e3f17246-11ee-4d0d-b193-c9288408a042"], +Cell[249690, 6615, 559, 13, 71, "Message",ExpressionUUID->"2aea525f-3d28-43c7-974a-675bddefa370"], +Cell[250252, 6630, 564, 13, 71, "Message",ExpressionUUID->"f73b3cf8-e53b-4235-800b-a7042da146f7"], +Cell[250819, 6645, 516, 12, 32, "Message",ExpressionUUID->"fe9e50a3-c11c-4a52-a981-4b1c35f3a7c6"], +Cell[251338, 6659, 21867, 405, 293, "Output",ExpressionUUID->"bcf97f79-de8d-4d2b-a716-232337290993"] }, Open ]], Cell[CellGroupData[{ -Cell[316886, 8050, 1616, 48, 86, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], -Cell[318505, 8100, 584, 12, 71, "Message",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], -Cell[319092, 8114, 588, 12, 71, "Message",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], -Cell[319683, 8128, 591, 12, 71, "Message",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], -Cell[320277, 8142, 456, 10, 26, "Message",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], -Cell[320736, 8154, 173, 3, 41, "Output",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] +Cell[273242, 7069, 2478, 69, 296, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], +Cell[275723, 7140, 9516, 222, 298, "Output",ExpressionUUID->"9c37038d-533b-4be6-9ef9-866794ea6352"] }, Open ]], Cell[CellGroupData[{ -Cell[320946, 8162, 2274, 65, 81, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], -Cell[323223, 8229, 566, 12, 71, "Message",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], -Cell[323792, 8243, 569, 12, 71, "Message",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], -Cell[324364, 8257, 572, 12, 71, "Message",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], -Cell[324939, 8271, 458, 10, 26, "Message",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], -Cell[325400, 8283, 171, 3, 41, "Output",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] +Cell[285276, 7367, 228, 4, 36, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], +Cell[285507, 7373, 28226, 536, 293, "Output",ExpressionUUID->"ebb008b8-13d6-48e7-b02d-661c7f40ba42"] }, Open ]], Cell[CellGroupData[{ -Cell[325608, 8291, 2221, 64, 81, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], -Cell[327832, 8357, 564, 12, 71, "Message",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], -Cell[328399, 8371, 567, 12, 71, "Message",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], -Cell[328969, 8385, 570, 12, 71, "Message",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], -Cell[329542, 8399, 456, 10, 26, "Message",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], -Cell[330001, 8411, 173, 3, 41, "Output",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] +Cell[313770, 7914, 236, 6, 61, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], +Cell[314009, 7922, 213, 3, 41, "Output",ExpressionUUID->"2bd86611-a705-41b3-8cbc-2f3913c4c673"] }, Open ]], Cell[CellGroupData[{ -Cell[330211, 8419, 2223, 64, 81, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], -Cell[332437, 8485, 566, 12, 71, "Message",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], -Cell[333006, 8499, 569, 12, 71, "Message",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], -Cell[333578, 8513, 570, 12, 71, "Message",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], -Cell[334151, 8527, 458, 10, 26, "Message",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], -Cell[334612, 8539, 170, 3, 41, "Output",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] +Cell[314259, 7930, 1833, 52, 311, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], +Cell[316095, 7984, 569, 13, 71, "Message",ExpressionUUID->"86621ac0-3386-4032-9e50-f79ab0b6f72a"], +Cell[316667, 7999, 569, 13, 71, "Message",ExpressionUUID->"60713407-f8ba-4ef7-ad4f-a3155b522a64"], +Cell[317239, 8014, 571, 13, 71, "Message",ExpressionUUID->"f1825358-ee3f-42a6-8240-2ee1777660dc"], +Cell[317813, 8029, 515, 12, 32, "Message",ExpressionUUID->"17f54f88-3f47-4ae8-bf2e-0c8dc72f9275"], +Cell[318331, 8043, 22208, 411, 290, "Output",ExpressionUUID->"d728a3a3-ee95-4353-95f6-6b75e973cb17"] }, Open ]], Cell[CellGroupData[{ -Cell[334819, 8547, 213, 6, 60, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], -Cell[335035, 8555, 171, 3, 41, "Output",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] +Cell[340576, 8459, 1616, 48, 132, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], +Cell[342195, 8509, 690, 15, 73, "Message",ExpressionUUID->"00cd7581-620c-40ba-b645-129b4f731771"], +Cell[342888, 8526, 690, 15, 73, "Message",ExpressionUUID->"ec8e9411-c690-4c2d-9fbf-6896d8152598"], +Cell[343581, 8543, 692, 15, 73, "Message",ExpressionUUID->"7d814c11-bd6e-4f98-97ad-1c70863c98f8"], +Cell[344276, 8560, 518, 12, 32, "Message",ExpressionUUID->"43c586d3-7e0e-4843-abe7-3f5ecf77402f"], +Cell[344797, 8574, 222, 4, 41, "Output",ExpressionUUID->"fea1b8af-544f-497f-90ac-c969a4f8f447"] }, Open ]], -Cell[335221, 8561, 244, 5, 36, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ -Cell[335490, 8570, 558, 19, 66, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[336051, 8591, 173, 3, 41, "Output",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] +Cell[345056, 8583, 2296, 65, 348, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], +Cell[347355, 8650, 692, 15, 73, "Message",ExpressionUUID->"40b749e8-f63e-4822-9825-80db5f24e011"], +Cell[348050, 8667, 692, 15, 73, "Message",ExpressionUUID->"d4334045-22a4-46b0-a849-11e429909562"], +Cell[348745, 8684, 695, 15, 73, "Message",ExpressionUUID->"44ece60a-cae6-4e7f-bd29-8cdce9de30b9"], +Cell[349443, 8701, 520, 12, 32, "Message",ExpressionUUID->"3079e32b-f898-4e47-a0ad-058725e192d5"], +Cell[349966, 8715, 219, 4, 41, "Output",ExpressionUUID->"fde4c31b-1fee-4c9c-afbf-a1093ed72d26"] }, Open ]], Cell[CellGroupData[{ -Cell[336261, 8599, 170, 5, 71, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[336434, 8606, 171, 3, 41, "Output",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] +Cell[350222, 8724, 2233, 63, 348, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], +Cell[352458, 8789, 693, 15, 73, "Message",ExpressionUUID->"b9dc4573-816a-41b8-8986-4cb39c7244d2"], +Cell[353154, 8806, 692, 15, 73, "Message",ExpressionUUID->"f9160ae1-e81c-447a-916c-99e38f898295"], +Cell[353849, 8823, 691, 15, 73, "Message",ExpressionUUID->"3655a4b1-974e-4480-99d0-992306bc38b2"], +Cell[354543, 8840, 518, 12, 32, "Message",ExpressionUUID->"adb2778d-15df-4762-8830-62f93a3ce78c"], +Cell[355064, 8854, 220, 4, 41, "Output",ExpressionUUID->"13374341-1876-4ae5-ad40-304751ad7e46"] }, Open ]], Cell[CellGroupData[{ -Cell[336642, 8614, 181, 5, 55, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[336826, 8621, 173, 3, 41, "Output",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] +Cell[355321, 8863, 2235, 63, 348, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], +Cell[357559, 8928, 695, 15, 73, "Message",ExpressionUUID->"8600885b-de8d-4296-816b-722dd1dc1280"], +Cell[358257, 8945, 694, 15, 73, "Message",ExpressionUUID->"621b34c9-e533-4e14-8127-d080502c62e8"], +Cell[358954, 8962, 695, 15, 73, "Message",ExpressionUUID->"37a98f4f-e1d2-41bb-85d4-de5d26bca49d"], +Cell[359652, 8979, 522, 12, 32, "Message",ExpressionUUID->"bc66321d-d69f-41a0-848b-2502ca5d99d6"], +Cell[360177, 8993, 221, 4, 41, "Output",ExpressionUUID->"9fc953aa-c54b-4488-b71b-434c3d75f947"] }, Open ]], Cell[CellGroupData[{ -Cell[337036, 8629, 6055, 185, 431, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[343094, 8816, 175, 3, 41, "Output",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] +Cell[360435, 9002, 236, 6, 60, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], +Cell[360674, 9010, 222, 4, 41, "Output",ExpressionUUID->"eeab924c-1a3a-4ea3-8a5a-4e01b37d04ed"] }, Open ]], +Cell[360911, 9017, 270, 6, 109, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ -Cell[343306, 8824, 368, 9, 53, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[343677, 8835, 172, 3, 41, "Output",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] +Cell[361206, 9027, 558, 19, 66, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], +Cell[361767, 9048, 222, 4, 41, "Output",ExpressionUUID->"84c322cd-c79d-4420-9f95-32852e386fdd"] }, Open ]], Cell[CellGroupData[{ -Cell[343886, 8843, 6122, 187, 431, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[350011, 9032, 173, 3, 41, "Output",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] +Cell[362026, 9057, 170, 5, 71, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], +Cell[362199, 9064, 217, 4, 41, "Output",ExpressionUUID->"ec903b4a-484b-4573-9493-43113a1d8cb3"] }, Open ]], Cell[CellGroupData[{ -Cell[350221, 9040, 368, 9, 53, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[350592, 9051, 170, 3, 41, "Output",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] +Cell[362453, 9073, 181, 5, 55, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], +Cell[362637, 9080, 221, 4, 41, "Output",ExpressionUUID->"a2f5cced-3010-45de-9109-b1fd68cf6193"] }, Open ]], Cell[CellGroupData[{ -Cell[350799, 9059, 2663, 88, 215, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[353465, 9149, 171, 3, 41, "Output",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] +Cell[362895, 9089, 6055, 185, 831, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], +Cell[368953, 9276, 222, 4, 41, "Output",ExpressionUUID->"4734b595-71b4-4bd9-abfc-a8c2768dca7a"] }, Open ]], Cell[CellGroupData[{ -Cell[353673, 9157, 2603, 85, 215, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[356279, 9244, 171, 3, 41, "Output",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] +Cell[369212, 9285, 368, 9, 53, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], +Cell[369583, 9296, 220, 4, 41, "Output",ExpressionUUID->"ce0c3955-7f70-4d96-87c9-676fca10b20f"] }, Open ]], Cell[CellGroupData[{ -Cell[356487, 9252, 3712, 118, 316, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[360202, 9372, 170, 3, 41, "Output",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] +Cell[369840, 9305, 6122, 187, 900, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], +Cell[375965, 9494, 219, 4, 41, "Output",ExpressionUUID->"6bd45c06-da55-48f5-8668-84caf359272c"] }, Open ]], Cell[CellGroupData[{ -Cell[360409, 9380, 2052, 59, 116, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], -Cell[362464, 9441, 573, 12, 71, "Message",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], -Cell[363040, 9455, 577, 12, 71, "Message",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], -Cell[363620, 9469, 580, 12, 71, "Message",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], -Cell[364203, 9483, 456, 10, 26, "Message",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], -Cell[364662, 9495, 170, 3, 41, "Output",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] +Cell[376221, 9503, 368, 9, 53, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], +Cell[376592, 9514, 218, 4, 41, "Output",ExpressionUUID->"426a57a5-b017-416b-9358-41d8fec2aeec"] }, Open ]], Cell[CellGroupData[{ -Cell[364869, 9503, 2054, 59, 116, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], -Cell[366926, 9564, 573, 12, 71, "Message",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], -Cell[367502, 9578, 577, 12, 71, "Message",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], -Cell[368082, 9592, 582, 12, 71, "Message",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], -Cell[368667, 9606, 456, 10, 26, "Message",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], -Cell[369126, 9618, 170, 3, 41, "Output",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] +Cell[376847, 9523, 2663, 88, 435, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], +Cell[379513, 9613, 221, 4, 41, "Output",ExpressionUUID->"7019cf97-7d18-4130-afbd-7de18c9281c1"] }, Open ]], Cell[CellGroupData[{ -Cell[369333, 9626, 2028, 55, 63, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], -Cell[371364, 9683, 20422, 382, 295, "Output",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] +Cell[379771, 9622, 2603, 85, 435, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], +Cell[382377, 9709, 218, 4, 41, "Output",ExpressionUUID->"57b0d342-fb4b-4ad1-bdba-84e97cfe8606"] }, Open ]], Cell[CellGroupData[{ -Cell[391823, 10070, 2120, 60, 116, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], -Cell[393946, 10132, 502, 11, 48, "Message",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], -Cell[394451, 10145, 506, 11, 48, "Message",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], -Cell[394960, 10158, 505, 11, 48, "Message",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], -Cell[395468, 10171, 458, 10, 26, "Message",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], -Cell[395929, 10183, 22288, 412, 290, "Output",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] +Cell[382632, 9718, 3712, 118, 575, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], +Cell[386347, 9838, 218, 4, 41, "Output",ExpressionUUID->"519368d5-0acd-4adb-bd50-1d3edf673b33"] }, Open ]], -Cell[418232, 10598, 209, 5, 36, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], Cell[CellGroupData[{ -Cell[418466, 10607, 1616, 48, 86, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], -Cell[420085, 10657, 595, 12, 71, "Message",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], -Cell[420683, 10671, 595, 12, 71, "Message",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], -Cell[421281, 10685, 599, 12, 71, "Message",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], -Cell[421883, 10699, 456, 10, 26, "Message",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], -Cell[422342, 10711, 171, 3, 41, "Output",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] +Cell[386602, 9847, 2075, 59, 276, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], +Cell[388680, 9908, 586, 13, 98, "Message",ExpressionUUID->"a299fcfa-dc7c-48a8-8cbd-e2b29875829a"], +Cell[389269, 9923, 590, 13, 98, "Message",ExpressionUUID->"aaf24cf8-bcb3-41ba-80e6-3ad38e57f2c1"], +Cell[389862, 9938, 593, 13, 98, "Message",ExpressionUUID->"7a4b7d23-ae2e-48ac-b7cd-2ed25936cce2"], +Cell[390458, 9953, 518, 12, 32, "Message",ExpressionUUID->"0188c02f-97c6-4f1f-88a6-9bd26d44f554"], +Cell[390979, 9967, 222, 4, 41, "Output",ExpressionUUID->"be69aa17-3d47-4b5e-b866-144ac4d1c99c"] }, Open ]], Cell[CellGroupData[{ -Cell[422550, 10719, 2248, 64, 81, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], -Cell[424801, 10785, 575, 12, 71, "Message",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], -Cell[425379, 10799, 577, 12, 71, "Message",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], -Cell[425959, 10813, 582, 12, 71, "Message",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], -Cell[426544, 10827, 458, 10, 26, "Message",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], -Cell[427005, 10839, 172, 3, 41, "Output",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] +Cell[391238, 9976, 2077, 59, 276, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], +Cell[393318, 10037, 586, 13, 98, "Message",ExpressionUUID->"d7139375-fd22-47d8-8b98-dc98fe1a72a8"], +Cell[393907, 10052, 590, 13, 98, "Message",ExpressionUUID->"db02d42f-f72e-482f-8e2f-55ad9cd7fc58"], +Cell[394500, 10067, 593, 13, 98, "Message",ExpressionUUID->"7869f60f-84c3-4e06-a8aa-462e185f5c9c"], +Cell[395096, 10082, 518, 12, 32, "Message",ExpressionUUID->"17dcb98f-9436-4bf8-ae2a-ac40805c64ed"], +Cell[395617, 10096, 219, 4, 41, "Output",ExpressionUUID->"0765b4bf-5878-430e-baae-7b5c15dafd3e"] }, Open ]], Cell[CellGroupData[{ -Cell[427214, 10847, 2215, 63, 81, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], -Cell[429432, 10912, 575, 12, 71, "Message",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], -Cell[430010, 10926, 577, 12, 71, "Message",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], -Cell[430590, 10940, 582, 12, 71, "Message",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], -Cell[431175, 10954, 458, 10, 26, "Message",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], -Cell[431636, 10966, 170, 3, 41, "Output",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] +Cell[395873, 10105, 2051, 55, 232, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], +Cell[397927, 10162, 20163, 380, 290, "Output",ExpressionUUID->"6c07ae0a-c207-43ae-bf84-764c88e47d61"] }, Open ]], Cell[CellGroupData[{ -Cell[431843, 10974, 2223, 64, 81, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], -Cell[434069, 11040, 573, 12, 71, "Message",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], -Cell[434645, 11054, 577, 12, 71, "Message",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], -Cell[435225, 11068, 580, 12, 71, "Message",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], -Cell[435808, 11082, 456, 10, 26, "Message",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], -Cell[436267, 11094, 173, 3, 41, "Output",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] +Cell[418127, 10547, 2143, 60, 311, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], +Cell[420273, 10609, 529, 12, 71, "Message",ExpressionUUID->"d82c8068-38da-45bd-9ed0-e419376ee5d7"], +Cell[420805, 10623, 530, 12, 71, "Message",ExpressionUUID->"25455b45-3537-415c-8732-8441ed006a54"], +Cell[421338, 10637, 535, 12, 71, "Message",ExpressionUUID->"a2d824ba-fd09-41e2-8835-44fc78ce65cc"], +Cell[421876, 10651, 494, 11, 32, "Message",ExpressionUUID->"87ab7dc7-14f7-4595-b79d-5a7fa93e1d82"], +Cell[422373, 10664, 22178, 411, 290, "Output",ExpressionUUID->"5731e5f1-38c5-4e74-96c5-70e841cbf049"] }, Open ]], Cell[CellGroupData[{ -Cell[436477, 11102, 213, 6, 60, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], -Cell[436693, 11110, 173, 3, 41, "Output",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] +Cell[444588, 11080, 232, 5, 36, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], +Cell[444823, 11087, 28538, 543, 290, "Output",ExpressionUUID->"81e78116-2699-4860-8c18-844aa2363984"] }, Open ]], -Cell[436881, 11116, 247, 5, 36, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ -Cell[437153, 11125, 558, 19, 66, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[437714, 11146, 173, 3, 41, "Output",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] +Cell[473398, 11635, 1616, 48, 132, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], +Cell[475017, 11685, 667, 14, 73, "Message",ExpressionUUID->"6ade720c-78ca-4720-ab45-582a9b7597b3"], +Cell[475687, 11701, 667, 14, 73, "Message",ExpressionUUID->"c61b0ff8-8de0-417c-9fc7-34162b35f009"], +Cell[476357, 11717, 667, 14, 73, "Message",ExpressionUUID->"5c8181ca-1378-4419-8036-42127821b140"], +Cell[477027, 11733, 495, 11, 32, "Message",ExpressionUUID->"4258e40a-67c6-4c47-8cf2-4da99bba7a12"], +Cell[477525, 11746, 195, 3, 41, "Output",ExpressionUUID->"bab1e51b-2b0a-43ad-a218-c00a3f9c3b32"] }, Open ]], Cell[CellGroupData[{ -Cell[437924, 11154, 170, 5, 71, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[438097, 11161, 173, 3, 41, "Output",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] +Cell[477757, 11754, 2271, 64, 348, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], +Cell[480031, 11820, 563, 12, 98, "Message",ExpressionUUID->"1c0a76ec-ce9d-4fd6-b62d-cb406fd2942e"], +Cell[480597, 11834, 569, 12, 98, "Message",ExpressionUUID->"4f608f7a-1984-4164-ab6d-d2cd3d42d3d0"], +Cell[481169, 11848, 570, 12, 98, "Message",ExpressionUUID->"44c690d7-6d59-47f4-aad4-bd8ea3cb12b4"], +Cell[481742, 11862, 497, 11, 32, "Message",ExpressionUUID->"b8b1ce3f-98c9-49b7-9549-411481132721"], +Cell[482242, 11875, 199, 3, 41, "Output",ExpressionUUID->"50363e47-5b6e-45e7-b406-c8ab4a308a9f"] }, Open ]], Cell[CellGroupData[{ -Cell[438307, 11169, 181, 5, 55, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[438491, 11176, 173, 3, 41, "Output",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] +Cell[482478, 11883, 2229, 63, 348, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], +Cell[484710, 11948, 565, 12, 98, "Message",ExpressionUUID->"7aa744ad-4f87-4884-993b-3d421e0b1b4c"], +Cell[485278, 11962, 566, 12, 98, "Message",ExpressionUUID->"700de0df-a32d-42c7-85e1-e687106dd024"], +Cell[485847, 11976, 570, 12, 98, "Message",ExpressionUUID->"fd528e92-91b1-4061-aba1-6337b73f8bdf"], +Cell[486420, 11990, 497, 11, 32, "Message",ExpressionUUID->"9bc43da0-2252-42a6-9cba-b01a026eeff4"], +Cell[486920, 12003, 192, 3, 41, "Output",ExpressionUUID->"5b11d26a-b32a-46fa-a1d5-e43a65d46b95"] }, Open ]], Cell[CellGroupData[{ -Cell[438701, 11184, 6055, 185, 431, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[444759, 11371, 172, 3, 41, "Output",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] +Cell[487149, 12011, 2235, 63, 348, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], +Cell[489387, 12076, 560, 12, 98, "Message",ExpressionUUID->"60b5f427-d3e8-4d9b-b102-f1a5a0981a7a"], +Cell[489950, 12090, 567, 12, 98, "Message",ExpressionUUID->"d59d4da2-4178-47f2-b00e-4ba035ceb285"], +Cell[490520, 12104, 568, 12, 98, "Message",ExpressionUUID->"200b86d1-c38b-4c7d-8dcd-7fe87921a4f0"], +Cell[491091, 12118, 493, 11, 32, "Message",ExpressionUUID->"eb0b90ae-ed14-4a4e-92d2-53ea22081fe7"], +Cell[491587, 12131, 193, 3, 41, "Output",ExpressionUUID->"fd4bd2a4-dc0b-437d-bacb-d6154b6cb767"] }, Open ]], Cell[CellGroupData[{ -Cell[444968, 11379, 368, 9, 53, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[445339, 11390, 172, 3, 41, "Output",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] +Cell[491817, 12139, 236, 6, 60, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], +Cell[492056, 12147, 201, 3, 41, "Output",ExpressionUUID->"df42213e-862d-44cf-a07c-bc521557bbb7"] }, Open ]], +Cell[492272, 12153, 273, 6, 109, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ -Cell[445548, 11398, 6122, 187, 431, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[451673, 11587, 173, 3, 41, "Output",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] +Cell[492570, 12163, 558, 19, 66, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], +Cell[493131, 12184, 194, 3, 41, "Output",ExpressionUUID->"a15ffc0b-427c-4afb-88a7-500ed8c79981"] }, Open ]], Cell[CellGroupData[{ -Cell[451883, 11595, 368, 9, 53, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[452254, 11606, 170, 3, 41, "Output",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] +Cell[493362, 12192, 170, 5, 71, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], +Cell[493535, 12199, 195, 3, 41, "Output",ExpressionUUID->"2fe84a3e-6437-437d-bf63-c33e3a4080ae"] }, Open ]], Cell[CellGroupData[{ -Cell[452461, 11614, 2663, 88, 215, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[455127, 11704, 171, 3, 41, "Output",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] +Cell[493767, 12207, 181, 5, 55, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], +Cell[493951, 12214, 195, 3, 41, "Output",ExpressionUUID->"eac3da73-2ec2-421c-9062-d7456b803479"] }, Open ]], Cell[CellGroupData[{ -Cell[455335, 11712, 2603, 85, 215, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[457941, 11799, 173, 3, 41, "Output",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] +Cell[494183, 12222, 6055, 185, 831, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], +Cell[500241, 12409, 195, 3, 41, "Output",ExpressionUUID->"df13b998-28a9-46d0-a4a3-c9079af3cdd0"] }, Open ]], Cell[CellGroupData[{ -Cell[458151, 11807, 3712, 118, 316, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[461866, 11927, 173, 3, 41, "Output",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] +Cell[500473, 12417, 368, 9, 53, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], +Cell[500844, 12428, 195, 3, 41, "Output",ExpressionUUID->"8e09a639-7ae4-408e-a39b-2c671327ad57"] }, Open ]], Cell[CellGroupData[{ -Cell[462076, 11935, 2052, 59, 116, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], -Cell[464131, 11996, 568, 12, 71, "Message",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], -Cell[464702, 12010, 573, 12, 71, "Message",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], -Cell[465278, 12024, 576, 12, 71, "Message",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], -Cell[465857, 12038, 458, 10, 26, "Message",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], -Cell[466318, 12050, 172, 3, 41, "Output",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] +Cell[501076, 12436, 6122, 187, 900, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], +Cell[507201, 12625, 195, 3, 41, "Output",ExpressionUUID->"94289f5d-bb29-4837-9061-b917b4be7536"] }, Open ]], Cell[CellGroupData[{ -Cell[466527, 12058, 2052, 59, 116, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], -Cell[468582, 12119, 568, 12, 71, "Message",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], -Cell[469153, 12133, 573, 12, 71, "Message",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], -Cell[469729, 12147, 574, 12, 71, "Message",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], -Cell[470306, 12161, 458, 10, 26, "Message",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], -Cell[470767, 12173, 172, 3, 41, "Output",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] +Cell[507433, 12633, 368, 9, 53, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], +Cell[507804, 12644, 192, 3, 41, "Output",ExpressionUUID->"3581afe4-57c0-49c9-8405-51efdc768b18"] }, Open ]], Cell[CellGroupData[{ -Cell[470976, 12181, 2028, 55, 63, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], -Cell[473007, 12238, 20375, 384, 295, "Output",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] +Cell[508033, 12652, 2663, 88, 435, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], +Cell[510699, 12742, 194, 3, 41, "Output",ExpressionUUID->"fbbf00e9-5e2c-428d-b753-e2919000730e"] }, Open ]], Cell[CellGroupData[{ -Cell[493419, 12627, 2118, 60, 116, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], -Cell[495540, 12689, 501, 11, 48, "Message",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], -Cell[496044, 12702, 503, 11, 48, "Message",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], -Cell[496550, 12715, 506, 11, 48, "Message",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], -Cell[497059, 12728, 458, 10, 26, "Message",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], -Cell[497520, 12740, 22161, 409, 290, "Output",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] +Cell[510930, 12750, 2603, 85, 435, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], +Cell[513536, 12837, 195, 3, 41, "Output",ExpressionUUID->"0271b375-cb62-489f-af9c-a604d3a4d049"] }, Open ]], -Cell[519696, 13152, 209, 5, 36, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], Cell[CellGroupData[{ -Cell[519930, 13161, 1616, 48, 86, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], -Cell[521549, 13211, 590, 12, 71, "Message",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], -Cell[522142, 13225, 589, 12, 71, "Message",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], -Cell[522734, 13239, 593, 12, 71, "Message",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], -Cell[523330, 13253, 456, 10, 26, "Message",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], -Cell[523789, 13265, 170, 3, 41, "Output",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] +Cell[513768, 12845, 3712, 118, 575, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], +Cell[517483, 12965, 196, 3, 41, "Output",ExpressionUUID->"9aafb708-f162-4677-ae29-bee589b3fa6f"] }, Open ]], Cell[CellGroupData[{ -Cell[523996, 13273, 2251, 64, 81, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], -Cell[526250, 13339, 568, 12, 71, "Message",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], -Cell[526821, 13353, 573, 12, 71, "Message",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], -Cell[527397, 13367, 574, 12, 71, "Message",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], -Cell[527974, 13381, 458, 10, 26, "Message",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], -Cell[528435, 13393, 173, 3, 41, "Output",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] +Cell[517716, 12973, 2075, 59, 276, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], +Cell[519794, 13034, 665, 14, 73, "Message",ExpressionUUID->"b2ef8902-7511-4da8-9ba4-d079e7ded794"], +Cell[520462, 13050, 666, 14, 73, "Message",ExpressionUUID->"0766c60c-847c-4b26-9422-995bf44ce964"], +Cell[521131, 13066, 667, 14, 73, "Message",ExpressionUUID->"f9a901b2-8d51-4cd0-b77c-a62fa1547923"], +Cell[521801, 13082, 493, 11, 32, "Message",ExpressionUUID->"f90abf4a-8094-4dd8-8171-fc7ddfcae4e9"], +Cell[522297, 13095, 197, 3, 41, "Output",ExpressionUUID->"c8f8c58c-2d96-4557-8f51-80bb1223a169"] }, Open ]], Cell[CellGroupData[{ -Cell[528645, 13401, 2221, 64, 81, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], -Cell[530869, 13467, 570, 12, 71, "Message",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], -Cell[531442, 13481, 573, 12, 71, "Message",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], -Cell[532018, 13495, 573, 12, 71, "Message",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], -Cell[532594, 13509, 458, 10, 26, "Message",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], -Cell[533055, 13521, 171, 3, 41, "Output",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] +Cell[522531, 13103, 2075, 59, 276, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], +Cell[524609, 13164, 667, 14, 73, "Message",ExpressionUUID->"33208b2d-7413-42bb-bd73-71d8d0f66198"], +Cell[525279, 13180, 666, 14, 73, "Message",ExpressionUUID->"58c1214f-5303-4a4b-a101-7985e1710221"], +Cell[525948, 13196, 667, 14, 73, "Message",ExpressionUUID->"322defbf-eae8-4f48-a7b1-c6bd44942aba"], +Cell[526618, 13212, 493, 11, 32, "Message",ExpressionUUID->"f95126bb-545c-4a3e-ba5e-c83d853e63be"], +Cell[527114, 13225, 192, 3, 41, "Output",ExpressionUUID->"9a5ca535-a1ed-4249-aab8-9009d4072f70"] }, Open ]], Cell[CellGroupData[{ -Cell[533263, 13529, 2221, 64, 81, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], -Cell[535487, 13595, 570, 12, 71, "Message",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], -Cell[536060, 13609, 573, 12, 71, "Message",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], -Cell[536636, 13623, 574, 12, 71, "Message",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], -Cell[537213, 13637, 458, 10, 26, "Message",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], -Cell[537674, 13649, 173, 3, 41, "Output",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] +Cell[527343, 13233, 2051, 55, 232, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], +Cell[529397, 13290, 20358, 381, 290, "Output",ExpressionUUID->"0c5a45de-b55b-4f57-a7a5-6265eb30e58b"] }, Open ]], Cell[CellGroupData[{ -Cell[537884, 13657, 215, 6, 60, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], -Cell[538102, 13665, 172, 3, 41, "Output",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] +Cell[549792, 13676, 2141, 60, 311, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], +Cell[551936, 13738, 534, 12, 71, "Message",ExpressionUUID->"e79d34e2-b70a-4ff0-9e42-acb2d184d8f4"], +Cell[552473, 13752, 536, 12, 71, "Message",ExpressionUUID->"42888dba-1526-4db9-8757-12795146ea09"], +Cell[553012, 13766, 539, 12, 71, "Message",ExpressionUUID->"a93eb404-dbec-4558-9cea-35c1a8a1f987"], +Cell[553554, 13780, 497, 11, 32, "Message",ExpressionUUID->"f981026e-6e90-4c44-928e-4671b207966f"], +Cell[554054, 13793, 22480, 417, 290, "Output",ExpressionUUID->"ef7de7be-0196-416c-945d-c63a9f224cdd"] }, Open ]], -Cell[538289, 13671, 115, 1, 36, "Input",ExpressionUUID->"003a3cee-6cc9-43f2-a36e-2e9c0a4a4908"] +Cell[CellGroupData[{ +Cell[576571, 14215, 232, 5, 36, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], +Cell[576806, 14222, 28842, 549, 290, "Output",ExpressionUUID->"6f279f40-daba-43b8-8053-08aaf834b80b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[605685, 14776, 1616, 48, 132, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], +Cell[607304, 14826, 670, 14, 73, "Message",ExpressionUUID->"29a59932-1f0a-410c-abf1-308c3ba72f86"], +Cell[607977, 14842, 666, 14, 73, "Message",ExpressionUUID->"f46da9ba-ca65-4484-94b3-e6eb5f0513ff"], +Cell[608646, 14858, 666, 14, 73, "Message",ExpressionUUID->"e34c6cd3-d9fc-4e44-8e7a-d7b0107075b3"], +Cell[609315, 14874, 495, 11, 32, "Message",ExpressionUUID->"cc0bec24-d012-4369-9872-36535755375f"], +Cell[609813, 14887, 192, 3, 41, "Output",ExpressionUUID->"18223573-77d3-42bd-8965-00d4f80197ab"] +}, Open ]], +Cell[CellGroupData[{ +Cell[610042, 14895, 2274, 64, 348, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], +Cell[612319, 14961, 665, 14, 73, "Message",ExpressionUUID->"ba995b57-a4e3-479c-93b5-7abcdbecb066"], +Cell[612987, 14977, 668, 14, 73, "Message",ExpressionUUID->"9f1c7afa-f531-4e38-8469-07d1a54e2fa4"], +Cell[613658, 14993, 669, 14, 73, "Message",ExpressionUUID->"baf18ff7-a958-40e8-b11e-fd2ddb98efc7"], +Cell[614330, 15009, 493, 11, 32, "Message",ExpressionUUID->"d41bfadc-3612-4917-9a9d-9fc8e9e5bf1b"], +Cell[614826, 15022, 198, 3, 41, "Output",ExpressionUUID->"3ba5c03f-f0d2-4bdf-8ab7-b118eb7ee0e4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[615061, 15030, 2233, 63, 348, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], +Cell[617297, 15095, 667, 14, 73, "Message",ExpressionUUID->"f0b0fb2d-1819-4995-9e8f-958190586334"], +Cell[617967, 15111, 668, 14, 73, "Message",ExpressionUUID->"08f5307f-50ca-4599-8dac-dbfabfb33f8b"], +Cell[618638, 15127, 669, 14, 73, "Message",ExpressionUUID->"a556628a-5bff-4613-b5ae-1638a0a0b289"], +Cell[619310, 15143, 497, 11, 32, "Message",ExpressionUUID->"5130b356-5a28-474c-a959-0d7f4666b600"], +Cell[619810, 15156, 193, 3, 41, "Output",ExpressionUUID->"1d63edce-16a4-407d-8954-a84ad1bccca3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[620040, 15164, 2233, 63, 348, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], +Cell[622276, 15229, 666, 14, 73, "Message",ExpressionUUID->"422275de-1019-4bd3-be32-12b8057fcf56"], +Cell[622945, 15245, 668, 14, 73, "Message",ExpressionUUID->"f5054903-5efa-4ac9-b7be-f0e4335d2707"], +Cell[623616, 15261, 669, 14, 73, "Message",ExpressionUUID->"c70d5c23-f222-47bb-935d-20054d8651f2"], +Cell[624288, 15277, 497, 11, 32, "Message",ExpressionUUID->"5c66e27d-34e0-4ced-82f6-44fa82a8b71c"], +Cell[624788, 15290, 194, 3, 41, "Output",ExpressionUUID->"4043392d-12e0-44d2-9366-8c3873ab29cc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[625019, 15298, 238, 6, 60, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], +Cell[625260, 15306, 196, 3, 41, "Output",ExpressionUUID->"5a225e62-99aa-4474-ab22-9bc311c8d5c2"] +}, Open ]], +Cell[625471, 15312, 143, 3, 109, "Input",ExpressionUUID->"003a3cee-6cc9-43f2-a36e-2e9c0a4a4908"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw1.nb b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw1.nb index 8032e62..42cf4e6 100644 --- a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw1.nb +++ b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 616425, 14936] -NotebookOptionsPosition[ 576639, 14305] -NotebookOutlinePosition[ 577080, 14323] -CellTagsIndexPosition[ 577037, 14320] +NotebookDataLength[ 690195, 16359] +NotebookOptionsPosition[ 649485, 15709] +NotebookOutlinePosition[ 649950, 15728] +CellTagsIndexPosition[ 649907, 15725] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,16 +26,14 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.9940735873936653`*^9, 3.9940735896443777`*^9}, { 3.994075218023417*^9, 3.994075221411705*^9}}, - CellLabel-> - "In[106]:=",ExpressionUUID->"c0335248-5247-4f13-926b-fa62a8f981f8"], + CellLabel->"In[1]:=",ExpressionUUID->"c0335248-5247-4f13-926b-fa62a8f981f8"], Cell[BoxData["1.9`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.9940735644974327`*^9, 3.994073590895896*^9}, { 3.994075171996416*^9, 3.994075180507247*^9}, {3.994075219377726*^9, - 3.9940752234153214`*^9}}, - CellLabel-> - "Out[106]=",ExpressionUUID->"ceb62d2e-5f81-4d00-baa6-06f3301db58f"] + 3.9940752234153214`*^9}, 3.9943497318762293`*^9, 3.994352650235078*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"27e84e36-24be-47e3-b981-a8f9bf4792d6"] }, Open ]], Cell[CellGroupData[{ @@ -44,15 +42,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940732811688833`*^9, 3.994073289502289*^9}}, - CellLabel-> - "In[107]:=",ExpressionUUID->"354befd8-b4be-4c61-8a98-493114337f1f"], + CellLabel->"In[2]:=",ExpressionUUID->"354befd8-b4be-4c61-8a98-493114337f1f"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.994073564560362*^9, 3.994073590977919*^9}, - 3.994075180702458*^9, 3.9940752234546824`*^9}, - CellLabel-> - "Out[107]=",ExpressionUUID->"aa9acc15-94a5-48ec-aa8a-a0e86efa3475"] + 3.994075180702458*^9, 3.9940752234546824`*^9, 3.994349732135051*^9, + 3.994352650347039*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"2ef8a2fc-215d-46e6-befd-b6e139909997"] }, Open ]], Cell[CellGroupData[{ @@ -61,15 +58,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "168"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073284506165*^9, 3.994073287626708*^9}}, - CellLabel-> - "In[108]:=",ExpressionUUID->"a9a84cdd-aa0a-4f21-aaa0-f584821f8cde"], + CellLabel->"In[3]:=",ExpressionUUID->"a9a84cdd-aa0a-4f21-aaa0-f584821f8cde"], Cell[BoxData["168"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994073564571506*^9, 3.994073590992278*^9}, - 3.994075180712758*^9, 3.9940752234670067`*^9}, - CellLabel-> - "Out[108]=",ExpressionUUID->"4db3209e-46c3-4b70-a558-d0e16d75924a"] + 3.994075180712758*^9, 3.9940752234670067`*^9, 3.9943497321413*^9, + 3.9943526503596497`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"06fbe52d-c817-4875-b348-2b9e11418cb4"] }, Open ]], Cell[CellGroupData[{ @@ -77,15 +73,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[109]:=",ExpressionUUID->"6166240b-c04a-47c3-91f8-2572d760f671"], + CellLabel->"In[4]:=",ExpressionUUID->"6166240b-c04a-47c3-91f8-2572d760f671"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.994073564582589*^9, 3.994073590996417*^9}, - 3.994075180723978*^9, 3.994075223478387*^9}, - CellLabel-> - "Out[109]=",ExpressionUUID->"1ba05c05-42ce-4682-95b3-ac200c44e934"] + 3.994075180723978*^9, 3.994075223478387*^9, 3.994349732149712*^9, + 3.994352650373941*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"fcf13a94-c689-4122-b199-ed9fa96a2a32"] }, Open ]], Cell[CellGroupData[{ @@ -97,30 +92,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[110]:=",ExpressionUUID->"1cc1773a-afa8-404c-ab7d-98dfc3caed55"], + CellLabel->"In[5]:=",ExpressionUUID->"1cc1773a-afa8-404c-ab7d-98dfc3caed55"], Cell[BoxData["0.544`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.994073564593708*^9, 3.994073591015129*^9}, - 3.994075180735317*^9, 3.994075223489546*^9}, - CellLabel-> - "Out[110]=",ExpressionUUID->"cac6c2a2-1e45-4220-8d78-0a494a8edd9e"] + 3.994075180735317*^9, 3.994075223489546*^9, 3.994349732162706*^9, + 3.994352650391225*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"8520b721-8a3c-4423-be4c-e5f3f4c62aa9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[111]:=",ExpressionUUID->"ac4e08ab-a3a2-4447-9ac6-7a59c3909ef7"], + CellLabel->"In[6]:=",ExpressionUUID->"ac4e08ab-a3a2-4447-9ac6-7a59c3909ef7"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.994073564604851*^9, 3.9940735910271397`*^9}, - 3.9940751807454844`*^9, 3.994075223493987*^9}, - CellLabel-> - "Out[111]=",ExpressionUUID->"a9587b20-8751-462b-9920-b9ae8d8c3a20"] + 3.9940751807454844`*^9, 3.994075223493987*^9, 3.9943497321700172`*^9, + 3.9943526504043827`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"ffa60785-3fb7-4800-9a5e-0246f10c0be8"] }, Open ]], Cell[CellGroupData[{ @@ -131,15 +124,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[112]:=",ExpressionUUID->"5603746c-7135-454a-be5d-59a4b3dabe03"], + CellLabel->"In[7]:=",ExpressionUUID->"5603746c-7135-454a-be5d-59a4b3dabe03"], Cell[BoxData["6.400704089204199`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.9940735646161203`*^9, 3.9940735910381737`*^9}, - 3.99407518075636*^9, 3.9940752235073977`*^9}, - CellLabel-> - "Out[112]=",ExpressionUUID->"ec44b850-7fde-4a49-bcd6-5d955f8fc74b"] + 3.99407518075636*^9, 3.9940752235073977`*^9, 3.994349732177187*^9, + 3.994352650418243*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"b33eca69-a33d-4f66-9cc5-8572831b94e4"] }, Open ]], Cell[CellGroupData[{ @@ -151,15 +143,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[113]:=",ExpressionUUID->"d24b86df-4e74-4c9c-8318-4e08eb58fd43"], + CellLabel->"In[8]:=",ExpressionUUID->"d24b86df-4e74-4c9c-8318-4e08eb58fd43"], Cell[BoxData["4.825794469480417`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.994073564627458*^9, 3.9940735910486517`*^9}, - 3.994075180767749*^9, 3.9940752235185337`*^9}, - CellLabel-> - "Out[113]=",ExpressionUUID->"32a5fad8-d2c9-40b4-95c9-775636ea5ca5"] + 3.994075180767749*^9, 3.9940752235185337`*^9, 3.994349732184352*^9, + 3.994352650433416*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"88617a84-546d-4a4b-92ea-b49894370aca"] }, Open ]], Cell[CellGroupData[{ @@ -167,14 +158,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8877902834"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073298855084*^9}, - CellLabel-> - "In[114]:=",ExpressionUUID->"5c5a5da4-d766-4793-86a8-8f6a53b73c5e"], + CellLabel->"In[9]:=",ExpressionUUID->"5c5a5da4-d766-4793-86a8-8f6a53b73c5e"], Cell[BoxData["0.8877902834`"], "Output", CellChangeTimes->{{3.99407356463848*^9, 3.994073591058733*^9}, - 3.994075180779163*^9, 3.994075223529882*^9}, - CellLabel-> - "Out[114]=",ExpressionUUID->"12d3b0e0-0941-46b2-906e-f7f53b008bf7"] + 3.994075180779163*^9, 3.994075223529882*^9, 3.994349732191063*^9, + 3.9943526504494057`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"54bc94ea-0d80-424c-b148-ede6f6f3281b"] }, Open ]], Cell[CellGroupData[{ @@ -182,44 +172,41 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3862529089"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.994073304321521*^9}, - CellLabel-> - "In[115]:=",ExpressionUUID->"9a082f09-f9d3-4bad-84cb-72b8e84d2756"], + CellLabel->"In[10]:=",ExpressionUUID->"9a082f09-f9d3-4bad-84cb-72b8e84d2756"], Cell[BoxData["0.3862529089`"], "Output", CellChangeTimes->{{3.9940735646497602`*^9, 3.994073591068905*^9}, - 3.994075180790642*^9, 3.994075223541339*^9}, - CellLabel-> - "Out[115]=",ExpressionUUID->"172aaa76-1da9-440f-8637-f3d2e59158ac"] + 3.994075180790642*^9, 3.994075223541339*^9, 3.994349732198148*^9, + 3.9943526507669983`*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"2f1678e7-61fa-45f5-9f21-a3f01e120b8a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[116]:=",ExpressionUUID->"bc93169a-7f39-4d7a-aba2-e0d1bde947e6"], + CellLabel->"In[11]:=",ExpressionUUID->"bc93169a-7f39-4d7a-aba2-e0d1bde947e6"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.994073564660372*^9, 3.994073591079844*^9}, - 3.9940751808023157`*^9, 3.99407522355291*^9}, - CellLabel-> - "Out[116]=",ExpressionUUID->"990f47b0-5d66-46b8-8540-aa25ef18bf6c"] + 3.9940751808023157`*^9, 3.99407522355291*^9, 3.994349732207156*^9, + 3.994352650784103*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"ce80c3a6-646f-40a7-991b-88b8c84c13ea"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[117]:=",ExpressionUUID->"3cddb14a-cfc5-4d7b-a60c-0bfb54d25f87"], + CellLabel->"In[12]:=",ExpressionUUID->"3cddb14a-cfc5-4d7b-a60c-0bfb54d25f87"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.994073564670796*^9, 3.994073591090024*^9}, - 3.994075180813775*^9, 3.994075223564582*^9}, - CellLabel-> - "Out[117]=",ExpressionUUID->"949240ff-8a96-425e-bbaf-31fe7022c59d"] + 3.994075180813775*^9, 3.994075223564582*^9, 3.994349732216056*^9, + 3.9943526508013687`*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"1da13317-de58-479e-bef1-0336460f8ea3"] }, Open ]], Cell[CellGroupData[{ @@ -243,15 +230,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[118]:=",ExpressionUUID->"99e72024-8dca-46c2-9f6e-4e49d00393d8"], + CellLabel->"In[13]:=",ExpressionUUID->"99e72024-8dca-46c2-9f6e-4e49d00393d8"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.9940735646817017`*^9, 3.994073591101307*^9}, - 3.9940751808204927`*^9, 3.99407522357547*^9}, - CellLabel-> - "Out[118]=",ExpressionUUID->"ab263a2f-6ec1-49da-851d-122c1a939904"] + 3.9940751808204927`*^9, 3.99407522357547*^9, 3.994349732225971*^9, + 3.99435265082038*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"4716d3e5-4cf0-4b8c-b222-6036040b5548"] }, Open ]], Cell[CellGroupData[{ @@ -275,15 +261,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[119]:=",ExpressionUUID->"7e56c9da-ba3b-414d-9c5c-323c366b0f61"], + CellLabel->"In[14]:=",ExpressionUUID->"7e56c9da-ba3b-414d-9c5c-323c366b0f61"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.9940735646923637`*^9, 3.994073591111409*^9}, - 3.994075180833333*^9, 3.99407522358539*^9}, - CellLabel-> - "Out[119]=",ExpressionUUID->"2e382193-856c-406a-ad00-52213b3d070c"] + 3.994075180833333*^9, 3.99407522358539*^9, 3.9943497322328053`*^9, + 3.994352657005587*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"f1fa629f-3a98-42f7-be33-34fff5fcc510"] }, Open ]], Cell[CellGroupData[{ @@ -338,15 +323,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[120]:=",ExpressionUUID->"54e0e6b9-1e0d-4ff8-ab6e-fec01274c687"], + CellLabel->"In[15]:=",ExpressionUUID->"54e0e6b9-1e0d-4ff8-ab6e-fec01274c687"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994073564703178*^9, 3.99407359112132*^9}, - 3.994075180844792*^9, 3.994075223596579*^9}, - CellLabel-> - "Out[120]=",ExpressionUUID->"df2709fe-1126-42da-8ae3-4c614ff552f4"] + 3.994075180844792*^9, 3.994075223596579*^9, 3.994349732240697*^9, + 3.994352657469182*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"a0962b7c-a06e-48b3-911f-cd281e69c899"] }, Open ]], Cell[CellGroupData[{ @@ -397,16 +381,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[121]:=",ExpressionUUID->"16ada101-d422-48cc-b9c6-0c548b80c938"], + CellLabel->"In[16]:=",ExpressionUUID->"16ada101-d422-48cc-b9c6-0c548b80c938"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.994073564714039*^9, 3.994073591132222*^9}, - 3.994075180888361*^9, 3.994075223608573*^9}, - CellLabel-> - "Out[121]=",ExpressionUUID->"098bfcb8-2ecf-4ebe-8697-c15b8864dec1"] + 3.994075180888361*^9, 3.994075223608573*^9, 3.994349732247897*^9, + 3.994352657484007*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"432efda7-da54-4599-b23a-ee074e75cd97"] }, Open ]], Cell[CellGroupData[{ @@ -457,16 +440,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[122]:=",ExpressionUUID->"67614b29-ea38-467b-ad1e-848611eed2d6"], + CellLabel->"In[17]:=",ExpressionUUID->"67614b29-ea38-467b-ad1e-848611eed2d6"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.9940735647250757`*^9, 3.994073591143152*^9}, - 3.994075180901285*^9, 3.994075223621201*^9}, - CellLabel-> - "Out[122]=",ExpressionUUID->"453f20c6-7f70-4443-a374-12bbc65f1132"] + 3.994075180901285*^9, 3.994075223621201*^9, 3.99434973225943*^9, + 3.994352657500045*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"6e4851d0-7b3c-44b9-a7ae-7ea6eb430cd0"] }, Open ]], Cell[CellGroupData[{ @@ -521,60 +503,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[123]:=",ExpressionUUID->"6e819a46-7aa0-4151-a6cd-6bdc76a25292"], + CellLabel->"In[18]:=",ExpressionUUID->"6e819a46-7aa0-4151-a6cd-6bdc76a25292"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994073564736117*^9, 3.994073591154641*^9}, - 3.9940751809127274`*^9, 3.994075223631315*^9}, - CellLabel-> - "Out[123]=",ExpressionUUID->"d36ce724-4946-4073-99e5-9782b84bbecb"] + 3.9940751809127274`*^9, 3.994075223631315*^9, 3.9943497322675457`*^9, + 3.994352657524932*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"3047ee80-953b-436f-a224-c69e3f54c514"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[124]:=",ExpressionUUID->"fb2f36b8-4cb6-4bdd-a4be-3b902e12f18d"], + CellLabel->"In[19]:=",ExpressionUUID->"fb2f36b8-4cb6-4bdd-a4be-3b902e12f18d"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.994073564745685*^9, 3.9940735911671133`*^9}, - 3.9940751809237967`*^9, 3.994075223641436*^9}, - CellLabel-> - "Out[124]=",ExpressionUUID->"2453793b-9be0-454f-bc05-3af7819d1790"] + 3.9940751809237967`*^9, 3.994075223641436*^9, 3.994349732274633*^9, + 3.994352657542301*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"dc593540-d89a-4a06-9df9-04958688dbda"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[125]:=",ExpressionUUID->"3639ec78-e245-4fbc-bceb-94be6eae0b95"], + CellLabel->"In[20]:=",ExpressionUUID->"3639ec78-e245-4fbc-bceb-94be6eae0b95"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994073564755136*^9, 3.994073591178863*^9}, - 3.9940751809343033`*^9, 3.9940752236530647`*^9}, - CellLabel-> - "Out[125]=",ExpressionUUID->"35eb5f76-ca26-4828-a1e3-c83a1b4f1adf"] + 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.99434973228126*^9, + 3.994352657562705*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"69e7c89a-aa57-4e3d-86ac-fa3a32acf9dc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[126]:=",ExpressionUUID->"3bd9ee5d-b974-4258-914b-375ae4e1df1d"], + CellLabel->"In[21]:=",ExpressionUUID->"3bd9ee5d-b974-4258-914b-375ae4e1df1d"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940735647648563`*^9, 3.994073591190179*^9}, - 3.9940751809451323`*^9, 3.994075223664682*^9}, - CellLabel-> - "Out[126]=",ExpressionUUID->"ea0777b9-9cb9-4ee7-ad98-16cb31cf4aa2"] + 3.9940751809451323`*^9, 3.994075223664682*^9, 3.994349732287322*^9, + 3.994352657582059*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"84a1eb46-9a86-49ec-b76c-d76b53ff8bb3"] }, Open ]], Cell[CellGroupData[{ @@ -583,31 +561,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[127]:=",ExpressionUUID->"8fa011cb-4a23-4e0b-8c62-1ddf5c0e3f36"], + CellLabel->"In[22]:=",ExpressionUUID->"8fa011cb-4a23-4e0b-8c62-1ddf5c0e3f36"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.994073564774688*^9, 3.994073591201717*^9}, - 3.994075180956657*^9, 3.994075223675436*^9}, - CellLabel-> - "Out[127]=",ExpressionUUID->"03338214-083a-401d-a6e6-b60b43caa38c"] + 3.994075180956657*^9, 3.994075223675436*^9, 3.99434973229335*^9, + 3.994352657600387*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"aa70d9c2-124f-4cc0-9e50-0d49394a4c38"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[128]:=",ExpressionUUID->"da1d7249-1f33-48d4-b51e-3dd7bb77315e"], + CellLabel->"In[23]:=",ExpressionUUID->"da1d7249-1f33-48d4-b51e-3dd7bb77315e"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994073564784115*^9, 3.994073591213622*^9}, - 3.9940751809686193`*^9, 3.9940752236862583`*^9}, - CellLabel-> - "Out[128]=",ExpressionUUID->"5c951bc6-3170-488b-a321-9ead508184d4"] + 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.994349732299402*^9, + 3.994352657621726*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"636cdc8a-e445-4459-a77c-12d7d07941b7"] }, Open ]], Cell[CellGroupData[{ @@ -617,15 +593,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073317560268*^9, 3.994073317727027*^9}}, - CellLabel-> - "In[129]:=",ExpressionUUID->"510028e4-882a-4df9-9b40-bfcd3c772953"], + CellLabel->"In[24]:=",ExpressionUUID->"510028e4-882a-4df9-9b40-bfcd3c772953"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.994073564793541*^9, 3.994073591224018*^9}, - 3.994075180980678*^9, 3.994075223697234*^9}, - CellLabel-> - "Out[129]=",ExpressionUUID->"dbce15ee-c59b-497f-9e37-1443941efb40"] + 3.994075180980678*^9, 3.994075223697234*^9, 3.9943497323040943`*^9, + 3.994352657643147*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"bb332c64-aff3-4c9c-9fe6-adaa741e83b8"] }, Open ]], Cell[CellGroupData[{ @@ -635,15 +610,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.9940733207460938`*^9, 3.994073320804184*^9}}, - CellLabel-> - "In[130]:=",ExpressionUUID->"f3fb1b87-340d-4e3a-a91e-5115ab7911c5"], + CellLabel->"In[25]:=",ExpressionUUID->"f3fb1b87-340d-4e3a-a91e-5115ab7911c5"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.9940735648031883`*^9, 3.9940735912353287`*^9}, - 3.9940751809920683`*^9, 3.994075223707429*^9}, - CellLabel-> - "Out[130]=",ExpressionUUID->"4c30a20a-3182-4a49-b31a-cded622b81a8"] + 3.9940751809920683`*^9, 3.994075223707429*^9, 3.994349732321067*^9, + 3.9943526576590157`*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"1823772d-1875-4201-9456-4b7e210593f1"] }, Open ]], Cell[CellGroupData[{ @@ -652,15 +626,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[131]:=",ExpressionUUID->"1de600e4-7465-4dc8-b56f-43516753f540"], + CellLabel->"In[26]:=",ExpressionUUID->"1de600e4-7465-4dc8-b56f-43516753f540"], Cell[BoxData["72"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.99407356481284*^9, 3.994073591246372*^9}, - 3.994075181003516*^9, 3.994075223717374*^9}, - CellLabel-> - "Out[131]=",ExpressionUUID->"dc1462f9-31c9-49ed-a16f-b52aea3e6112"] + 3.994075181003516*^9, 3.994075223717374*^9, 3.994349732326167*^9, + 3.994352657679525*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"3c5fd4d8-cde6-4274-a576-1b773cbf6274"] }, Open ]], Cell[CellGroupData[{ @@ -675,15 +648,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[132]:=",ExpressionUUID->"cb2d4f82-397e-4a51-8be2-42063086093d"], + CellLabel->"In[27]:=",ExpressionUUID->"cb2d4f82-397e-4a51-8be2-42063086093d"], Cell[BoxData["0.10999999999999999`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994073564822513*^9, 3.9940735912565413`*^9}, - 3.994075181014969*^9, 3.994075223727599*^9}, - CellLabel-> - "Out[132]=",ExpressionUUID->"46aba39d-d5e8-46bc-8816-495dedaf7a47"] + 3.994075181014969*^9, 3.994075223727599*^9, 3.994349732338663*^9, + 3.994352657698476*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"35b06c92-27e8-48e9-99ae-03fee89f8ba0"] }, Open ]], Cell[CellGroupData[{ @@ -698,16 +670,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[133]:=",ExpressionUUID->"8993c6b3-c3e7-44a7-85aa-b36f40e453a4"], + CellLabel->"In[28]:=",ExpressionUUID->"8993c6b3-c3e7-44a7-85aa-b36f40e453a4"], Cell[BoxData[ RowBox[{"-", "2.564285714285714`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994073564832857*^9, 3.994073591267404*^9}, - 3.9940751810260887`*^9, 3.9940752237376823`*^9}, - CellLabel-> - "Out[133]=",ExpressionUUID->"bdcbf2bf-54d6-42b2-9892-707c318f9cf6"] + 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.9943497323505917`*^9, + 3.994352657721994*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"44ab2dbf-8f4c-47d0-8ef8-70b62ec0a174"] }, Open ]], Cell[CellGroupData[{ @@ -738,15 +709,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[134]:=",ExpressionUUID->"40eace06-4fbe-46fc-bfc8-8e67d497e107"], + CellLabel->"In[29]:=",ExpressionUUID->"40eace06-4fbe-46fc-bfc8-8e67d497e107"], Cell[BoxData["17.427928477019236`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994073564842832*^9, 3.9940735912778807`*^9}, - 3.9940751810379477`*^9, 3.994075223748026*^9}, - CellLabel-> - "Out[134]=",ExpressionUUID->"b1597745-fe5e-4d01-af16-e4b928caa564"] + 3.9940751810379477`*^9, 3.994075223748026*^9, 3.9943497323641357`*^9, + 3.9943526577381067`*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"8336b4b0-a675-4a17-a486-f903819f979b"] }, Open ]], Cell[CellGroupData[{ @@ -754,15 +724,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[135]:=",ExpressionUUID->"915acc3b-0278-4ec9-81ec-34747a42d3c9"], + CellLabel->"In[30]:=",ExpressionUUID->"915acc3b-0278-4ec9-81ec-34747a42d3c9"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.994073564851839*^9, 3.994073591288074*^9}, - 3.99407518104945*^9, 3.994075223758711*^9}, - CellLabel-> - "Out[135]=",ExpressionUUID->"7e476c0a-8950-4107-b7b1-a6dd348403bf"] + 3.99407518104945*^9, 3.994075223758711*^9, 3.9943497323711557`*^9, + 3.99435265775559*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"22cb3425-4230-487a-bced-4ddd30b1886e"] }, Open ]], Cell[CellGroupData[{ @@ -772,20 +741,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994073341190873*^9, 3.994073342038845*^9}}, - CellLabel-> - "In[136]:=",ExpressionUUID->"5ef6a20c-5cd2-42f7-8da7-ebe72323b4ec"], + CellLabel->"In[31]:=",ExpressionUUID->"5ef6a20c-5cd2-42f7-8da7-ebe72323b4ec"], Cell[BoxData["2.155`"], "Output", CellChangeTimes->{{3.994073564860754*^9, 3.994073591298296*^9}, - 3.994075181060684*^9, 3.994075223775366*^9}, - CellLabel-> - "Out[136]=",ExpressionUUID->"a00be3b9-b0e0-4d08-a9c0-73fc996848f0"] + 3.994075181060684*^9, 3.994075223775366*^9, 3.994349732377326*^9, + 3.9943526577699633`*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"42b1bb82-503b-4f5d-a38b-053e3a5dcd35"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[137]:=",ExpressionUUID->"48c0c524-e26b-4d2e-95e3-1420b47e42d3"], + CellLabel->"In[32]:=",ExpressionUUID->"48c0c524-e26b-4d2e-95e3-1420b47e42d3"], Cell[CellGroupData[{ @@ -794,20 +761,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073344618413*^9, 3.994073345759185*^9}}, - CellLabel-> - "In[138]:=",ExpressionUUID->"69b389d6-e250-4a61-bec4-6681f862fc89"], + CellLabel->"In[33]:=",ExpressionUUID->"69b389d6-e250-4a61-bec4-6681f862fc89"], Cell[BoxData["0.755`"], "Output", CellChangeTimes->{{3.994073564877489*^9, 3.994073591311125*^9}, - 3.9940751810754833`*^9, 3.9940752237900457`*^9}, - CellLabel-> - "Out[138]=",ExpressionUUID->"962e4c63-d89d-487c-ac1c-b66bf6e0f611"] + 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.994349732393135*^9, + 3.9943526577959127`*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"0bd24e0d-49ee-4bf8-821e-6ec776ada35a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[139]:=",ExpressionUUID->"201d274f-b28e-4d36-94fa-28f8d9d0b9e2"], + CellLabel->"In[34]:=",ExpressionUUID->"201d274f-b28e-4d36-94fa-28f8d9d0b9e2"], Cell[CellGroupData[{ @@ -816,20 +781,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940733478949413`*^9, 3.994073348567162*^9}}, - CellLabel-> - "In[140]:=",ExpressionUUID->"0bb0ca5a-a152-4981-bdb2-9d32241b5481"], + CellLabel->"In[35]:=",ExpressionUUID->"0bb0ca5a-a152-4981-bdb2-9d32241b5481"], Cell[BoxData["2.62`"], "Output", CellChangeTimes->{{3.994073564894133*^9, 3.9940735913232403`*^9}, - 3.994075181088438*^9, 3.994075223803163*^9}, - CellLabel-> - "Out[140]=",ExpressionUUID->"e8247fbd-07ea-4853-9a05-4f6ce329caf3"] + 3.994075181088438*^9, 3.994075223803163*^9, 3.9943497324031687`*^9, + 3.9943526578550386`*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"37a6470a-db01-4ca3-b15d-d4c93883c11b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[141]:=",ExpressionUUID->"b2974d27-96c4-469c-b450-7f00b2efc66b"], + CellLabel->"In[36]:=",ExpressionUUID->"b2974d27-96c4-469c-b450-7f00b2efc66b"], Cell[CellGroupData[{ @@ -838,20 +801,18 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.99407335112987*^9, 3.9940733523562517`*^9}}, - CellLabel-> - "In[142]:=",ExpressionUUID->"6a3bcb7f-c703-4f0a-80b0-03f64c0faed8"], + CellLabel->"In[37]:=",ExpressionUUID->"6a3bcb7f-c703-4f0a-80b0-03f64c0faed8"], Cell[BoxData["1.135`"], "Output", CellChangeTimes->{{3.994073564911627*^9, 3.994073591335389*^9}, - 3.994075181101487*^9, 3.994075223815889*^9}, - CellLabel-> - "Out[142]=",ExpressionUUID->"3404e60d-3820-4084-a1e8-04b1d3bae090"] + 3.994075181101487*^9, 3.994075223815889*^9, 3.994349732412546*^9, + 3.99435265788334*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"9d27fa2f-a7ca-4756-963a-568b5fafc14c"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[143]:=",ExpressionUUID->"18c4df67-6890-4429-926e-cc22e3e979ea"], + CellLabel->"In[38]:=",ExpressionUUID->"18c4df67-6890-4429-926e-cc22e3e979ea"], Cell[CellGroupData[{ @@ -860,20 +821,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994073355091783*^9, 3.994073355935183*^9}}, - CellLabel-> - "In[144]:=",ExpressionUUID->"96d17d67-b209-4476-a91c-c9707ec30b3f"], + CellLabel->"In[39]:=",ExpressionUUID->"96d17d67-b209-4476-a91c-c9707ec30b3f"], Cell[BoxData["1.025`"], "Output", CellChangeTimes->{{3.994073564928769*^9, 3.9940735913488693`*^9}, - 3.994075181114448*^9, 3.994075223832756*^9}, - CellLabel-> - "Out[144]=",ExpressionUUID->"de11238c-e73e-41b0-a2c8-1c6fa46c3712"] + 3.994075181114448*^9, 3.994075223832756*^9, 3.9943497324225407`*^9, + 3.994352657976738*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"0ac63edf-fd99-4150-9930-f519d4f67868"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[145]:=",ExpressionUUID->"2651477c-a144-4f89-8ddb-9a0b58c38f62"], + CellLabel->"In[40]:=",ExpressionUUID->"2651477c-a144-4f89-8ddb-9a0b58c38f62"], Cell[CellGroupData[{ @@ -882,20 +841,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994073359153013*^9, 3.9940733600822906`*^9}}, - CellLabel-> - "In[146]:=",ExpressionUUID->"df16c93c-10f6-4301-8a6a-9b6d2f7293e4"], + CellLabel->"In[41]:=",ExpressionUUID->"df16c93c-10f6-4301-8a6a-9b6d2f7293e4"], Cell[BoxData["0.575`"], "Output", CellChangeTimes->{{3.994073564946273*^9, 3.99407359136164*^9}, - 3.9940751811274652`*^9, 3.9940752238459263`*^9}, - CellLabel-> - "Out[146]=",ExpressionUUID->"b162a30d-861a-49af-9f4c-38c95acdbba6"] + 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994349732432124*^9, + 3.994352658006254*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"440aa89c-0066-4fb5-bfa2-8afbd681b60b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[147]:=",ExpressionUUID->"37b5a9d6-6387-47b7-9e2f-fb9438400ee9"], + CellLabel->"In[42]:=",ExpressionUUID->"37b5a9d6-6387-47b7-9e2f-fb9438400ee9"], Cell[CellGroupData[{ @@ -904,20 +861,18 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, 3.994073366138835*^9, { 3.994073396938322*^9, 3.994073398601803*^9}}, - CellLabel-> - "In[148]:=",ExpressionUUID->"e9786605-1be3-45cd-af96-9a833fbd2027"], + CellLabel->"In[43]:=",ExpressionUUID->"e9786605-1be3-45cd-af96-9a833fbd2027"], Cell[BoxData["1.44`"], "Output", CellChangeTimes->{{3.994073564964167*^9, 3.9940735913757553`*^9}, - 3.9940751811406727`*^9, 3.9940752238589993`*^9}, - CellLabel-> - "Out[148]=",ExpressionUUID->"d20b5187-c0e7-4d30-b185-57f93df63f20"] + 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.994349732444756*^9, + 3.9943526581649857`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"9b50a056-dd4e-4d1c-9e2d-850259fdd3e2"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[149]:=",ExpressionUUID->"72743464-9145-44aa-b8c5-9ce8cb3a1661"], + CellLabel->"In[44]:=",ExpressionUUID->"72743464-9145-44aa-b8c5-9ce8cb3a1661"], Cell[CellGroupData[{ @@ -925,20 +880,18 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.645"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.9940734006045856`*^9, 3.99407340214142*^9}}, - CellLabel-> - "In[150]:=",ExpressionUUID->"5f7b1f55-72bb-425e-8a55-284fd8d2e435"], + CellLabel->"In[45]:=",ExpressionUUID->"5f7b1f55-72bb-425e-8a55-284fd8d2e435"], Cell[BoxData["0.645`"], "Output", CellChangeTimes->{{3.9940735649821672`*^9, 3.994073591389337*^9}, - 3.994075181153781*^9, 3.994075223871763*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"7fc1ac66-809a-4f55-844a-9da079c6447b"] + 3.994075181153781*^9, 3.994075223871763*^9, 3.9943497324553137`*^9, + 3.994352658216523*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"924bb2d1-64b8-4a0e-b323-6a0dd94d7a6a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[151]:=",ExpressionUUID->"453209c5-91c3-4edf-9ba2-5a059b785845"], + CellLabel->"In[46]:=",ExpressionUUID->"453209c5-91c3-4edf-9ba2-5a059b785845"], Cell[CellGroupData[{ @@ -1427,15 +1380,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[152]:=",ExpressionUUID->"d4a650aa-aa3b-4af2-8c25-cd6a8950511c"], + CellLabel->"In[47]:=",ExpressionUUID->"d4a650aa-aa3b-4af2-8c25-cd6a8950511c"], Cell[BoxData["0.1377756020325425`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.9940735650538073`*^9, 3.99407359143029*^9}, - 3.994075181231205*^9, 3.9940752239087954`*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"c4533770-e51c-4efe-ad9c-7934cde475ba"] + 3.994075181231205*^9, 3.9940752239087954`*^9, 3.9943497325349607`*^9, + 3.994352658436709*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"ffed3354-2a9d-45bc-8ddd-058e6d080a94"] }, Open ]], Cell[CellGroupData[{ @@ -1929,15 +1881,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[153]:=",ExpressionUUID->"3ac53e2c-e6a1-49a0-adef-a26078efff40"], + CellLabel->"In[48]:=",ExpressionUUID->"3ac53e2c-e6a1-49a0-adef-a26078efff40"], Cell[BoxData["7.524926889811008`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.99407356508613*^9, 3.994073591458125*^9}, - 3.994075181264968*^9, 3.994075223937818*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"4aeedbbe-7897-41fb-aba8-70853993e4f0"] + 3.994075181264968*^9, 3.994075223937818*^9, 3.9943497325700197`*^9, + 3.9943526587097816`*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"a11b1bde-da72-4b08-9047-8c59f5645699"] }, Open ]], Cell[CellGroupData[{ @@ -2425,16 +2376,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[154]:=",ExpressionUUID->"df9e6656-1de2-4cf4-ab98-4aaf4c5aafb9"], + CellLabel->"In[49]:=",ExpressionUUID->"df9e6656-1de2-4cf4-ab98-4aaf4c5aafb9"], Cell[BoxData[ RowBox[{"-", "14.084113046357718`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994073565118821*^9, 3.994073591484323*^9}, - 3.994075181298151*^9, 3.9940752239647293`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"047139e5-a4d7-4fa3-a584-e6dee055fc0f"] + 3.994075181298151*^9, 3.9940752239647293`*^9, 3.99434973260324*^9, + 3.994352658807922*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"a6b26536-d25b-440e-8600-1a83201a797b"] }, Open ]], Cell[CellGroupData[{ @@ -2992,16 +2942,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"102c1b36-6747-4403-9b99-7d44ce9a28bb"], + CellLabel->"In[50]:=",ExpressionUUID->"102c1b36-6747-4403-9b99-7d44ce9a28bb"], Cell[BoxData[ RowBox[{"-", "18.31263149263108`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.9940735651553993`*^9, 3.994073591515855*^9}, - 3.9940751813370543`*^9, 3.994075223996374*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"6946a29a-1641-428b-9db0-c60f5925bd08"] + 3.9940751813370543`*^9, 3.994075223996374*^9, 3.9943497326424093`*^9, + 3.994352658906229*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"d22f9025-919e-4254-93b6-903ca145d76c"] }, Open ]], Cell[CellGroupData[{ @@ -3559,16 +3508,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"95296522-0a2a-434c-8865-2c89ba3efa73"], + CellLabel->"In[51]:=",ExpressionUUID->"95296522-0a2a-434c-8865-2c89ba3efa73"], Cell[BoxData[ RowBox[{"-", "53.236632839784775`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.994073565191607*^9, 3.9940735915482073`*^9}, - 3.9940751813752813`*^9, 3.994075224029221*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"307adb1a-7bbe-4fb6-8094-5b6015f7be40"] + 3.9940751813752813`*^9, 3.994075224029221*^9, 3.994349732680416*^9, + 3.994352659023787*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"b6385547-cf69-44a6-b84c-a869004b367c"] }, Open ]], Cell[CellGroupData[{ @@ -4199,46 +4147,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"9010b95c-ac92-4603-9235-8445a1e62807"], + CellLabel->"In[52]:=",ExpressionUUID->"9010b95c-ac92-4603-9235-8445a1e62807"], Cell[BoxData[ RowBox[{"-", "137.72173412227852`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.9940735652337313`*^9, 3.9940735915861683`*^9}, - 3.9940751814204807`*^9, 3.99407522406466*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"f7beb120-f713-40d9-bf35-8eae0ef2a65c"] + 3.9940751814204807`*^9, 3.99407522406466*^9, 3.994349732726469*^9, + 3.994352659266657*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"74ba788e-b1a4-439b-a283-d5e72d44b549"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"86f01f3e-5f28-417e-8437-8e045dcea278"], + CellLabel->"In[53]:=",ExpressionUUID->"86f01f3e-5f28-417e-8437-8e045dcea278"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994073565247233*^9, 3.99407359159737*^9}, - 3.994075181435895*^9, 3.9940752240755796`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"4489ccb6-da05-44b2-83ed-c78506fbc0ed"] + 3.994075181435895*^9, 3.9940752240755796`*^9, 3.994349732738167*^9, + 3.994352659322382*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"74c7b509-b692-42ef-a0d7-973c21d6ea0a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"083a2ac6-7106-49ed-aeca-5f099f6ab7dc"], + CellLabel->"In[54]:=",ExpressionUUID->"083a2ac6-7106-49ed-aeca-5f099f6ab7dc"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994073565259305*^9, 3.994073591607201*^9}, - 3.9940751814462433`*^9, 3.994075224085256*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"e8e800b6-12bd-421a-a85b-6e8ef1f6b145"] + 3.9940751814462433`*^9, 3.994075224085256*^9, 3.994349732745229*^9, + 3.994352659361485*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"e5082461-09d0-4df7-aee4-ec2d6a5c3fc2"] }, Open ]], Cell[CellGroupData[{ @@ -4282,15 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"b91cd1e8-6fa7-4eaa-9663-290567205b38"], + CellLabel->"In[55]:=",ExpressionUUID->"b91cd1e8-6fa7-4eaa-9663-290567205b38"], Cell[BoxData["109.03965674383026`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940735652689238`*^9, 3.99407359161714*^9}, - 3.994075181457575*^9, 3.994075224089169*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"24e10728-5b97-47b9-857c-7f835ce7c8a2"] + 3.994075181457575*^9, 3.994075224089169*^9, 3.99434973275247*^9, + 3.994352659398241*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"32bfbd3f-df11-4e74-b386-362037f4ccea"] }, Open ]], Cell[CellGroupData[{ @@ -4330,16 +4274,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"dafb5daa-ccd4-43ad-b6dd-0344b2068787"], + CellLabel->"In[56]:=",ExpressionUUID->"dafb5daa-ccd4-43ad-b6dd-0344b2068787"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.9940735652791967`*^9, 3.994073591627187*^9}, - 3.994075181468134*^9, 3.9940752240986977`*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"ef048afa-181b-46d6-a204-a4f43dfd5462"] + 3.994075181468134*^9, 3.9940752240986977`*^9, 3.9943497327620583`*^9, + 3.994352659422533*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"64a97879-b0e2-4660-89bf-1bd386867d3c"] }, Open ]], Cell[CellGroupData[{ @@ -4383,101 +4326,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"a7ae48a9-4b3e-4ff0-a2eb-8bf797d30085"], + CellLabel->"In[57]:=",ExpressionUUID->"a7ae48a9-4b3e-4ff0-a2eb-8bf797d30085"], Cell[BoxData["112.13680293055965`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994073565289288*^9, 3.994073591637117*^9}, - 3.994075181479414*^9, 3.9940752241080437`*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"deaae744-91d3-42dc-92b5-0490afb71aab"] + 3.994075181479414*^9, 3.9940752241080437`*^9, 3.994349732768112*^9, + 3.994352659468549*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"c5e14956-6e8b-433c-a859-b388f78e3b1c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"9c297244-a5bc-496f-a923-9aaa5f24f6c1"], + CellLabel->"In[58]:=",ExpressionUUID->"9c297244-a5bc-496f-a923-9aaa5f24f6c1"], Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.99407356529922*^9, 3.994073591647008*^9}, - 3.994075181491456*^9, 3.994075224117897*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"7295b066-5026-4596-aa1d-9a4707b7f587"] + 3.994075181491456*^9, 3.994075224117897*^9, 3.994349732774044*^9, + 3.99435265949848*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"ed98c6c3-d83e-4efd-b989-f103cde502d0"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"877fcbde-276e-4a2c-836d-53d540a497ca"], + CellLabel->"In[59]:=",ExpressionUUID->"877fcbde-276e-4a2c-836d-53d540a497ca"], Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.994073565311245*^9, 3.994073591656905*^9}, - 3.994075181502122*^9, 3.9940752241273518`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"e849b770-6467-483e-8abb-57197cc517ef"] + 3.994075181502122*^9, 3.9940752241273518`*^9, 3.994349732780077*^9, + 3.99435265952439*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"e83690d9-ec67-4fbc-ac69-ebe06084be53"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"3b8a316a-a410-47e0-a13d-9efe5a77ce3e"], + CellLabel->"In[60]:=",ExpressionUUID->"3b8a316a-a410-47e0-a13d-9efe5a77ce3e"], Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.9940735653224297`*^9, 3.994073591666703*^9}, - 3.994075181512973*^9, 3.994075224138131*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"2dafd199-4af3-432e-a02e-b79c927ee72a"] + 3.994075181512973*^9, 3.994075224138131*^9, 3.994349732786131*^9, + 3.994352659552102*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"2117802b-7b65-478d-90c0-52dba0d6b9f6"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[166]:=",ExpressionUUID->"c740442c-d864-4b98-9a47-4e36289cbbf2"], + CellLabel->"In[61]:=",ExpressionUUID->"c740442c-d864-4b98-9a47-4e36289cbbf2"], Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.994073565332736*^9, 3.994073591676529*^9}, - 3.9940751815232983`*^9, 3.99407522414828*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"fa2eab3a-9ee0-4932-bd1d-3a7114885d17"] + 3.9940751815232983`*^9, 3.99407522414828*^9, 3.994349732792624*^9, + 3.99435265958182*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"c3d8ac51-a193-4a71-9e5c-6f34e3164d43"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[167]:=",ExpressionUUID->"b7724a61-bf3f-42ba-bf4b-234390c9872a"], + CellLabel->"In[62]:=",ExpressionUUID->"b7724a61-bf3f-42ba-bf4b-234390c9872a"], Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994073565343382*^9, 3.994073591686304*^9}, - 3.9940751815621433`*^9, 3.994075224158536*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"89c9ccf3-57cc-44b9-ad58-f14bfcbb7e9c"] + 3.9940751815621433`*^9, 3.994075224158536*^9, 3.994349732798595*^9, + 3.994352659613*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"0cd82f2e-4a8e-43d8-bf1a-3f051ba4b5c7"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[168]:=",ExpressionUUID->"fd13d997-9762-499b-a2f1-b85c8102c377"], + CellLabel->"In[63]:=",ExpressionUUID->"fd13d997-9762-499b-a2f1-b85c8102c377"], Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.9940735677968397`*^9, 3.994073591696135*^9}, - 3.994075181571867*^9, 3.994075224168653*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"5eb336fb-1474-48c7-8e70-b2d51035d2b0"] + 3.994075181571867*^9, 3.994075224168653*^9, 3.99434973280437*^9, + 3.9943526596406193`*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"d31070f2-6ae1-485a-a156-22cb599f69cb"] }, Open ]], Cell[CellGroupData[{ @@ -4498,16 +4434,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[169]:=",ExpressionUUID->"6b10c15a-f89b-4a9a-a8fe-3200c0eb53fa"], + CellLabel->"In[64]:=",ExpressionUUID->"6b10c15a-f89b-4a9a-a8fe-3200c0eb53fa"], Cell[BoxData[ RowBox[{"-", "34.047906297441784`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994073567991251*^9, 3.994073591706287*^9}, - 3.994075181582259*^9, 3.994075224178802*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"2be4e0b2-ff27-4032-bb6f-07d5eb554252"] + 3.994075181582259*^9, 3.994075224178802*^9, 3.994349732810087*^9, + 3.9943526596676807`*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"8f6a1511-168b-4b06-a175-2a5d2d925e88"] }, Open ]], Cell[CellGroupData[{ @@ -4528,16 +4463,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[170]:=",ExpressionUUID->"dea721d1-bdbd-4248-99c9-331ed0ad1233"], + CellLabel->"In[65]:=",ExpressionUUID->"dea721d1-bdbd-4248-99c9-331ed0ad1233"], Cell[BoxData[ RowBox[{"-", "6.56405378738986`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994073568001831*^9, 3.994073591716386*^9}, - 3.994075181592502*^9, 3.994075224188962*^9}, - CellLabel-> - "Out[170]=",ExpressionUUID->"e4a89a47-8b20-43f2-ae24-44f802be60e6"] + 3.994075181592502*^9, 3.994075224188962*^9, 3.994349732815927*^9, + 3.994352659693288*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"477122f8-a344-4754-ac78-dd2b4e607e91"] }, Open ]], Cell[CellGroupData[{ @@ -4602,15 +4536,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[171]:=",ExpressionUUID->"b012b84c-6e63-429d-bc53-eb09754291c1"], + CellLabel->"In[66]:=",ExpressionUUID->"b012b84c-6e63-429d-bc53-eb09754291c1"], Cell[BoxData["74.99175044638848`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.994073568012953*^9, 3.994073591726822*^9}, - 3.9940751816039963`*^9, 3.994075224199308*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"c3b55c8b-5a54-4004-9afc-4b91d92ad3fb"] + 3.9940751816039963`*^9, 3.994075224199308*^9, 3.994349732821443*^9, + 3.994352659725013*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"8404ac40-e82c-48e3-aa59-8de0c8fac2e7"] }, Open ]], Cell[CellGroupData[{ @@ -4651,16 +4584,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[172]:=",ExpressionUUID->"d39fa51b-8be7-410b-a294-c35f27d1b65b"], + CellLabel->"In[67]:=",ExpressionUUID->"d39fa51b-8be7-410b-a294-c35f27d1b65b"], Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994073568023205*^9, 3.9940735917368*^9}, - 3.994075181615046*^9, 3.994075224209613*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"e9dc6c44-5995-467b-bec7-657b972dd207"] + 3.994075181615046*^9, 3.994075224209613*^9, 3.99434973282757*^9, + 3.994352659749503*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"bfeb192f-3624-4969-adfb-11dc0c1e70f9"] }, Open ]], Cell[CellGroupData[{ @@ -4726,15 +4658,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[173]:=",ExpressionUUID->"1b4104e3-8445-4439-826d-6d10b9d6c287"], + CellLabel->"In[68]:=",ExpressionUUID->"1b4104e3-8445-4439-826d-6d10b9d6c287"], Cell[BoxData["105.57274914316979`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994073568033989*^9, 3.994073591747006*^9}, - 3.994075181626021*^9, 3.994075224219851*^9}, - CellLabel-> - "Out[173]=",ExpressionUUID->"963ea5ba-2331-426f-ae87-dbd63a93831b"] + 3.994075181626021*^9, 3.994075224219851*^9, 3.994349732833853*^9, + 3.994352659785634*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"7b4f9715-8797-4345-af6e-03771b7824f1"] }, Open ]], Cell[CellGroupData[{ @@ -4792,15 +4723,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[174]:=",ExpressionUUID->"8b288cdc-a966-4c35-a26b-ef5be912ee32"], + CellLabel->"In[69]:=",ExpressionUUID->"8b288cdc-a966-4c35-a26b-ef5be912ee32"], Cell[BoxData["39.10949309233206`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994073568045323*^9, 3.99407359175727*^9}, - 3.994075181636903*^9, 3.99407522423002*^9}, - CellLabel-> - "Out[174]=",ExpressionUUID->"212a0e4a-9d50-4333-b445-d6217fc229cd"] + 3.994075181636903*^9, 3.99407522423002*^9, 3.99434973283996*^9, + 3.994352659814807*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"145a8026-da2d-4f5a-a087-aa8e09a2edeb"] }, Open ]], Cell[CellGroupData[{ @@ -4858,38 +4788,47 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[175]:=",ExpressionUUID->"0afb1289-2b6f-4d81-8a63-5b10c39a0135"], + CellLabel->"In[70]:=",ExpressionUUID->"0afb1289-2b6f-4d81-8a63-5b10c39a0135"], Cell[BoxData["659.7171122788135`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994073568055649*^9, 3.994073591768012*^9}, - 3.9940751816477003`*^9, 3.99407522424048*^9}, - CellLabel-> - "Out[175]=",ExpressionUUID->"d21d33fa-6c1a-4767-b04a-479aa03b8a20"] + 3.9940751816477003`*^9, 3.99407522424048*^9, 3.994349732846374*^9, + 3.9943526598378983`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"e8197533-a729-4fb2-9182-dc118767408e"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4800798445"}]], "Input", - CellChangeTimes->{3.9918488488187084`*^9, - 3.994084789621996*^9},ExpressionUUID->"bdefbecf-0aaa-4a45-a861-\ -406cf54e52d1"], + CellChangeTimes->{3.9918488488187084`*^9, 3.994084789621996*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], + +Cell[BoxData["0.4800798445`"], "Output", + CellChangeTimes->{3.994349732852439*^9, 3.994352659861462*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"bdc088a3-abec-4c00-9d6f-d339f422063d"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848849725815*^9, - 3.9918488497328167`*^9}},ExpressionUUID->"a5161e25-7247-124f-8601-\ -7bcc4af89c62"], + CellChangeTimes->{{3.991848849725815*^9, 3.9918488497328167`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.2075336813"}]], "Input", - CellChangeTimes->{3.9918488509977226`*^9, - 3.994084794627777*^9},ExpressionUUID->"45ed831b-459a-9a41-990f-\ -c079ad464f5d"], + CellChangeTimes->{3.9918488509977226`*^9, 3.994084794627777*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], + +Cell[BoxData["0.2075336813`"], "Output", + CellChangeTimes->{3.9943497328615437`*^9, 3.9943526599097757`*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"afb6e4b5-bb19-447a-8e52-f31396b55be3"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848851636154*^9, - 3.9918488516427097`*^9}},ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-\ -11f4dcb03e07"], + CellChangeTimes->{{3.991848851636154*^9, 3.9918488516427097`*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ @@ -4935,13 +4874,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[150]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], + CellLabel->"In[75]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913279321052856`*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[BoxData["1.5054805119396558`*^-53"], "Output", + CellChangeTimes->{3.9913279321052856`*^9, 3.9943497328714237`*^9, + 3.994352659971005*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"f91c1781-fa89-43da-ae94-0c5847fa99eb"] }, Open ]], Cell[CellGroupData[{ @@ -4975,14 +4913,13 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575644922657`*^9},ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-\ -7221ff813b6d"], + CellChangeTimes->{3.9915575644922657`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.991327932129387*^9}, - CellLabel-> - "Out[151]=",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[BoxData["7.870302048799622`*^-55"], "Output", + CellChangeTimes->{3.991327932129387*^9, 3.994349732878965*^9, + 3.994352660008368*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"d1e295b4-5922-42af-b162-b28c56b0c9bd"] }, Open ]], Cell[CellGroupData[{ @@ -5015,14 +4952,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915575683388195`*^9, - 3.991557570173399*^9}},ExpressionUUID->"f22831a7-63b7-f444-8e3a-\ -fa370a62ac27"], + CellChangeTimes->{{3.9915575683388195`*^9, 3.991557570173399*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.991327932138338*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[BoxData["1.09654840213345`*^-54"], "Output", + CellChangeTimes->{3.991327932138338*^9, 3.9943497328851748`*^9, + 3.994352660043662*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"1d65de73-a1ab-4c59-a1f6-43aec62847f2"] }, Open ]], Cell[CellGroupData[{ @@ -5045,13 +4981,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[153]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], + CellLabel->"In[78]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913279321616154`*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[BoxData["14.833218900905916`"], "Output", + CellChangeTimes->{3.9913279321616154`*^9, 3.994349732891687*^9, + 3.994352660090035*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"3f8fc62a-8a20-4e18-b78c-8e701b6650d5"] }, Open ]], Cell[CellGroupData[{ @@ -5076,13 +5011,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[154]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], + CellLabel->"In[79]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[BoxData["37.77192070584817`"], "Output", - CellChangeTimes->{3.9913279321696014`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[BoxData["24.295637803903052`"], "Output", + CellChangeTimes->{3.9913279321696014`*^9, 3.994349732924157*^9, + 3.994352660140218*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"c5c551bc-e230-43c5-aeb1-cb3ed5685004"] }, Open ]], Cell[CellGroupData[{ @@ -5091,13 +5025,12 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], + CellLabel->"In[80]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913279321926613`*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[BoxData["1.6237658021470522`"], "Output", + CellChangeTimes->{3.9913279321926613`*^9, 3.994349732930098*^9, + 3.994352660161701*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"29fd867d-fc6c-4e82-9195-5736422f4bb2"] }, Open ]], Cell[CellGroupData[{ @@ -5106,13 +5039,12 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], + CellLabel->"In[81]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[BoxData["3.2238916343938024`"], "Output", - CellChangeTimes->{3.991327932200657*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[BoxData["5.210923798892271`"], "Output", + CellChangeTimes->{3.991327932200657*^9, 3.994349732935851*^9, + 3.9943526601816072`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"3a711fed-f6fd-4382-ad66-a53a97cc403d"] }, Open ]], Cell[CellGroupData[{ @@ -5121,13 +5053,12 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], + CellLabel->"In[82]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[BoxData["121.77257917856996`"], "Output", - CellChangeTimes->{3.99132793222501*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[BoxData["126.60271724162516`"], "Output", + CellChangeTimes->{3.99132793222501*^9, 3.994349732941761*^9, + 3.994352660199107*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"95c8df18-9016-4b0b-b692-cf7ae4f540f7"] }, Open ]], Cell[CellGroupData[{ @@ -5136,13 +5067,12 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], + CellLabel->"In[83]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913279322642612`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[BoxData["24.085673587052312`"], "Output", + CellChangeTimes->{3.9913279322642612`*^9, 3.994349732947605*^9, + 3.994352660219947*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"e9faef51-30e1-4df1-a4d5-975d37d71d68"] }, Open ]], Cell[CellGroupData[{ @@ -5331,13 +5261,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], + CellLabel->"In[84]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[BoxData["0.032550594324745`"], "Output", - CellChangeTimes->{3.9913279322906475`*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[BoxData["0.007570673917776564`"], "Output", + CellChangeTimes->{3.9913279322906475`*^9, 3.994349732954234*^9, + 3.994352660241817*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"c3efbbfa-4221-48a0-86b1-06a07b366cce"] }, Open ]], Cell[CellGroupData[{ @@ -5350,13 +5279,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], + CellLabel->"In[85]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[BoxData["4.91208054446651`"], "Output", - CellChangeTimes->{3.9913279323826447`*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[BoxData["10.185390174768402`"], "Output", + CellChangeTimes->{3.9913279323826447`*^9, 3.994349733079711*^9, + 3.9943526605991793`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"ea49373d-3420-4980-bd98-b5fa4328eb16"] }, Open ]], Cell[CellGroupData[{ @@ -5547,13 +5475,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], + CellLabel->"In[86]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[BoxData["0.012685641417856707`"], "Output", - CellChangeTimes->{3.991327932394655*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[BoxData["0.04028337162660041`"], "Output", + CellChangeTimes->{3.991327932394655*^9, 3.994349733087322*^9, + 3.9943526606202374`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"d96cdbca-31fe-408f-9e87-ce79690edc50"] }, Open ]], Cell[CellGroupData[{ @@ -5566,13 +5493,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], + CellLabel->"In[87]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.991327932491659*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[BoxData["4.415521809928206`"], "Output", + CellChangeTimes->{3.991327932491659*^9, 3.9943497331283617`*^9, + 3.994352660751157*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"fc35f1eb-e338-48e4-97ca-d75544d2ac20"] }, Open ]], Cell[CellGroupData[{ @@ -5664,13 +5590,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], + CellLabel->"In[88]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991327932509678*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[BoxData["0.07637363207411572`"], "Output", + CellChangeTimes->{3.991327932509678*^9, 3.994349733135351*^9, + 3.9943526608065767`*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"a4416f3b-093c-4b91-b500-fb9fe819cb7c"] }, Open ]], Cell[CellGroupData[{ @@ -5759,13 +5684,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], + CellLabel->"In[89]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913279325457134`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[BoxData["0.9236263679258842`"], "Output", + CellChangeTimes->{3.9913279325457134`*^9, 3.9943497331421843`*^9, + 3.994352660824682*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"728726ac-4170-4f4e-8248-cded33db81aa"] }, Open ]], Cell[CellGroupData[{ @@ -5887,19 +5811,18 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], + CellLabel->"In[90]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913279325697117`*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[BoxData["0.07054070039792333`"], "Output", + CellChangeTimes->{3.9913279325697117`*^9, 3.9943497331495657`*^9, + 3.994352660841734*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"bcb7a0e3-32aa-45fd-adba-a7e2fa5ea6fd"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"714abd93-e0d1-\ -eb45-a9e1-7a2f5d020eb1"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ @@ -5913,7 +5836,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -5935,8 +5860,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -5960,68 +5884,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918488620812244`*^9},ExpressionUUID->"137c38a2-741c-bd43-b6d9-\ -c0135e32eaf8"], + CellChangeTimes->{3.9918488620812244`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 166, 109, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279325947113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.902111910583623`*^-203\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 1, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.994349733175602*^9, + 3.994352660903281*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], +In[92]:=",ExpressionUUID->"61df7561-f34f-4042-8b2a-16d8d9a3ab0e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 110, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326047096`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.698356593961849`*^-208\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 2, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.994349733175602*^9, + 3.994352661008498*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], +In[92]:=",ExpressionUUID->"6a699953-9724-491a-adad-820a25548df3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 111, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327932612709*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1605287029221997`*^-212\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 3, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.994349733175602*^9, + 3.994352661021226*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], +In[92]:=",ExpressionUUID->"26d2ed1f-8a32-4920-aca4-85f716e900d2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 166, 112, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326207104`*^9}, +during this calculation.\"", 2, 92, 4, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.994349733175602*^9, + 3.9943526610300083`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], +In[92]:=",ExpressionUUID->"6a83912c-1841-4384-a1fa-3930920a74ae"], -Cell[BoxData["4.912080544466506`"], "Output", - CellChangeTimes->{3.9913279359974174`*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[BoxData["10.18539017476841`"], "Output", + CellChangeTimes->{3.9913279359974174`*^9, 3.9943497346522017`*^9, + 3.994352664716436*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"f309818c-f6b6-4f9c-8727-cbb317b4b7be"] }, Open ]], Cell[CellGroupData[{ @@ -6036,7 +5967,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -6058,8 +5991,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6083,68 +6015,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848865140564*^9},ExpressionUUID->"9b196534-2ca5-e54b-8014-\ -b0ab3cd09ac2"], + CellChangeTimes->{3.991848865140564*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 167, 113, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936033827*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.902111910583623`*^-203\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 5, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9943497347460213`*^9, + 3.994352664868462*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], +In[93]:=",ExpressionUUID->"eac846ff-7646-4a85-ab74-4ceae3ccd53b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 114, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360428295`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.698356593961849`*^-208\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 6, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9943497347460213`*^9, + 3.9943526648773623`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], +In[93]:=",ExpressionUUID->"accd1d0e-5ac1-4ac0-b9e9-c8659084c97f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 115, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936050829*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1605287029221997`*^-212\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 7, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9943497347460213`*^9, + 3.994352664886202*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], +In[93]:=",ExpressionUUID->"4fd217ec-550a-427f-8e3e-7eeb63da3b67"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 167, 116, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360588284`*^9}, +during this calculation.\"", 2, 93, 8, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9943497347460213`*^9, + 3.9943526648947363`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], +In[93]:=",ExpressionUUID->"08c735e0-31c7-4afe-a7f8-35a28e6048aa"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.9913279393385086`*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[BoxData["4.415521809928206`"], "Output", + CellChangeTimes->{3.9913279393385086`*^9, 3.994349736744741*^9, + 3.99435266860324*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"7d93974c-e5c4-48ce-8f1a-aa0c46902ce9"] }, Open ]], Cell[CellGroupData[{ @@ -6154,141 +6093,141 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848869193308*^9},ExpressionUUID->"124cd7db-c537-8943-bef2-\ -1a154ab4a709"], + CellChangeTimes->{3.991848869193308*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk0Vd0bB/BLpteUISSRuSglU0j2k6EiJCmzDPceMhYSpdRblJJMlX4N +ZChkFjLkRUIlhJJSpnvN83RuJX7bH2ed9Vn7rO959rMHGTd/KxorhUIZwc/a ++0zLzq1lbS366TUsHekxdKQ/la7pZpSDLJvmOTOw+5K1EuWNqtBP44Zna7ak +fuTgVX+LFFBo/jPswpDwN+xGzejza17ZTOyoho014dmfUGLr5ZUs7PK2M0+W +1T6jTxGfjXKwx769Dwut/IrWLXEv5mFvYsg5LBn2IDsdmfVF2Ienw3QCm3sR +l+/GhBLs6uUxnpDsfiRdNHO5HPvLFbELpX6DKFol++tr7CkOo7EFNQbazGX8 +vzpsjujTdurkEIr1q33biC0l+LjpTOUIConb4vAR20Ji6dmU4QRyGbjyphub +SJEVVeGaQgIRkff6sMMVjkR4N0+jix99O4axv4p17g7KnkU33Rk3SWyqvdep +hOg59MUomJ1yh45mHlGeFvnNI+v5sVEubC5ZFYFZtUXEwX1lRgI7kfrmoIDI +EuJWSBNSxJZ+bhe+i1xCPwOyn6hia++InPKtZKKje7wWDmB7avU2jxkuo1e7 +Ku6FYC+EnGXjVvyL9sULckViX67k0VPiWkGeuUcHE7CTQPuFR/MqUtwU01WA +Tc1oMgrIZgFWCmfZNHZ2Q0LfFQlWCNMvPkeJxfUOO4fFRbMC60uzVEHsMOXF +4gK/ddDbbKKpiZ2YLyM3rcYOgRbhVlewv7VNVK+ksUNL7XO3u9jSc2X2/CIc +sDJQ15OFnaNhEa9CcgCrRid/J3Z9+XkWn0ou0OUP9VKJo6PFNx29I4a8kHro +BmUBW8iMV+BCNS90c5TPC8TTkWqnEfDp8MGJqHD3ndhe9JKU3Tv5oXK+/ZUX +9mnWZtV9vAIQpvZKdxSbIZs3G7EkCNO3Xz76m4D7Q7z/p1VdCLrPM+xkE+mI +9cWQzMYzQnD0V13CQWxp9S1W2eNCIC9+82ICtr1hbFFLnzA8Fj6ntPsuHbW6 +BwSKfRAB0xkL+tV7dPTzecwtFy5RaJne4FuAPTGenZZlLAocGWkBP7C5gwY7 +9taIwuEF2QXt+3RkdM1aw6VEDByz+toWsSvStRYzk8UhdUVhPvIBHaUzfgfr +BklCQ5fDGMdjOjp0/PrPwFxJKCnfJICwJ+qFD+QOSYJc0mDqOWyN9B0i0nZS +0Prm4fox7Ho352J2/S1gyjnA3vmEjuam+86NXJUGtvmXHlUpdCTsa/Sy2FwW +bM5XCfSm09FQOrenpZcsLLvL9Mhn0NGrnjaJyUhZKCz7vsEb29HM6apijSx0 +iTq0MLHTtwdbPVCTg3BGi6v4c/z/seczl8TkwdFtlNc/i46sPXhUTPsVoNY8 +/7pPHh2h4ONqNn8VQNrzq3M1tnJE8h6quCLcOemfLJBPR5Q0dYNLRxVBL3XO +sRQ796eDTVGtIrw/9fQdRyE+nydyrmxK3Qps0YY+lcW4PiPzL2NuSsA9EDQR +WE5HacfufycvKcHeKHOyHTvGrb+P7aESsPUwvdUq8P6+fHZcqkMJTAU+x89h +C1Y9phwzVIbdluu6zlXh/aM+pVwptx3edSG9e//RkYTsnfBb9B2QYKybINtA +R1U3F5R+sarAv5bTgknYjvN2nYSMCth+LeTjb6SjJ/XySgbOKmA1HxD2B1vW +o6Kd2aUC1iH+e3re4fnmMBSIDzvBsKdoa8lHOpKUkCKk7VTBZMhb5O1nOtqR +EcT7B6lBTejH487DdORGvbqoYqEG+7LtzUexk+Tif7o4qkFsJFtx0AgdrUvN +L2gIUYMR4bqm6FF83p6MWccXqoEyy2mpunF8nya5PFaSUwe+lpXg/TN4fW+Z +7bTl0IBre3spCb/o6GmAvGVJsybQdQdT/+VjoLZgtOdahg7M1f19UqrPQDLO +ny2cfPbBQGUKj/g5BqKtluZJhgLUXhgt5ihmILHxV5xibgYwLNaQrbjMQEHq +ej3xykYQxf5rRf3QEHKbXG4SHjOGOJtQD7X/DaFcg0DO5NaDYFlZJvL8zxBK +X/CqzUk0gcLD3c9LnYcRc//Gj/Xhh+FsqXuCdMcw+kFZN9vvag4p0YtSFRYj +yG+zf+wVuSMwvz/R7Oz7EZR3qqnmboQllKhaFXHaj6Lz8+Lk9lNHgbMnasPc +yChaND1wovGkFZx9YGb/8PYY0nGI2884egzaN1JX9XTGUbv4Y696dWtgq7b4 +tH9gHG16drUqc9txmH5nGbg1bQK96lM2s+A7Ae/qpa7ucplEUp0zHsGTJ+Bg +b8vrPJkppH43LietzwY8NIP9Ti9Pocds8zvj39hCx9fimAtt06h0/65vEeV2 +EGleJqt8cgYl7bkpuJxtD9fX1/U+7JpBrd8zItWjHcDj5OjjLtNZVGL+SP70 +ZUcYTMug+72fRbO+xyh+VCdo4Gxk8zOcQ4sHlDynDJ0hMyplXq1yDmVOdjMD +tU5CsI6R94t988j2aYa7E68LSJ61c+Mvm0fFRYdPrrvuAja5ylygs4B0JNp/ +Rf1yARensywXCxaQXJ/Ht0+nXEH1mj7vTtlFROfxPvJo0BUerkg6liQtorYY +C/eDx91A8s/t1RcsSygxJJnnbBv2vojGCe8lVFW9+svdxB30PjjrnPiwhNY7 +wnX1Cnc4MPVwVl+CRNIbGls3V7kDZ7fV02ubSaTabL6Ro9odzCTuJL2TJJGV +nkPW11p3uHmX6nhUmkSJm4M/XHznDhtfy++2VSDRph8v1jd9dYfBpz7NBrtI +JO8sluRIukOslGtVlAGJdFymMiM0qKDZphHRQpDo2YOZQAstKkwV6nt/8iDR +ho45fTFtKrAqF6R0eJJoypjszNxLBROhSeZnLxLfXxSWZgP8PfODbbsfifhJ +QTuho1QgdPyeZQWTiH5b859kXyrYkmasnyJIFFMZdurVMypc6VE/Qz4lka/a +fZ2QTCqkNC64N6WSyCyr8B/tbCr8rC1MSUojEff9oayyXCps++BPamWQKCLA +cqz0Jc6jqIt4Z5IoTEneu6SOCrURf8cL8kjkdf+DT9FPKkxUcPcWVpDIhH9I +L6CPCpZX4qq9K0m0LYLCpzZABS3lLwPyVSQaCtDMLWRQwbXiNzPxNYlcLZIn +CyaosPLb3canhkS27IF++b+p0OX6roJ8S6KDgZtO54jSQNlWcsPlNhLVJUea +xm+kgfX2I6u7PpFIr3lOPmQTDXS3x3H1YqsqfOg2lKJBx8OEIN0OEol3XTD8 +rkADr9D/coc+k2hc94cotyYNJLe0XtrwnUR3WFNeexyjQczWmXP1dDz/XbxJ +5sdpENg90W7DINE1h5AAdRsahGZ8OjCGHfLScuuqPQ1ubHsdwjuM6ydY4u65 +0UAwiYflwCiJ1N+7Ud+eoYFB439Xb0+SqCtOgUculgZO+5VO+i6SKA/xeY7E +0cD4ycmi79jXJhfqcxNosKP7ubbJEonUTOovad+nwWnE81OGxOtHcZ8zf0KD +3+xno94xSXTAP6U7JIcGPVGyFnN/SCQpeUNLP48GjqeMGo8tk2jhvX/CugIa +GK6yBLzETlVE5jHFNJBfZjoE/iXR3x8/atIqaPBnJSx8eIVEL80kMluaaEBd +zZrLZGGiW79Z2RPf00D2WfaFv9humWOuds00yIxe0TjKykQCbBUS9Facf9ha +ewnbp9L2zq8veH3E8sO12JhITvlesDwD9382mCWWg4l+d13sGB2igcJHpetd +2G0RNNX8ERpcbxbRk+Jkokv9GmM6E7jfInbqWdjfkjqcjszTYFjpy/ESLiaK +5xQ0Ps9CQEP5Hadn3ExUNffDIWgdATXkzphh7OEf2QF+7ASMll0s38rDRHov +jVLc/iEgc1v/ajr2kEvIH1NBAva2d5gk8OL6zYyFjIUJyJJnsWjG3rtHSAmJ +EGB+2NqMjY+JYvlyTqiLE6BcsWPPGey9Fb2FEjIESHf+fqPPz0RERk6TiBwB +90Oy7vtjx8aG9q5XIOBrLQctGXuIEOZjUyJgcsf9iT9r48IHPSdUCYgUyMjN +XM9EFSvC4UNqBGRccjT/hM0Y7bvbp0EA/4LTEBNbt+b8m05tAsRVhNiMBZiI +7pMn9RpwPcWik23Y/LYXNMsMCHBWmT8+i61jeMis0IiA6uLGMgFBJooRHwjN +OETAtQBNwgz7FVt+bLIpAeU5r4s8sQenLzx/YIb7syTBvIqt3SDy+bYlARYL +e33LsN0KB8avWxEQRpl+1Ip9+1E+67/WBBz/aP92CHsgwEQ12JYARpwBRUiI +ificRQ+etifAXqdISBFb22TQycuRgF+UOkkd7NtbLt5ydiGg90aOpCP2K27T +VFs3AnIsLwr5YA8sipZbUXF9B7+tnl/L6x9sNSMIsFL5j3FjLa+5YOiAJwGd +PNvq72K7lV38C14E3NMWfPh0LT/VdMNeH9w/63NeOWv5t8W2a/oRUGZio1a6 +lh9C37/rNO6fZd5cNTYvtdBWKYCAdaOhLxqw9xy55C8XRABXf5njx7V83cOR +ksEELB8hODqwoxU2PhYLIaA76WpmF3apAKNY8DwBT0/xG37H7v9T+J4njAD/ +SvYvP9byhy/1s1/C/Wv3dO3F1mo/zFwNJ0BKfw9jzf8HZ4gE4Q== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6302,106 +6241,106 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwV1Hk0Vd0bB/BLpteUISSRuSglU0j2k6EiJCmzDPceMhYSpdRblJJMlX4N +ZChkFjLkRUIlhJJSpnvN83RuJX7bH2ed9Vn7rO959rMHGTd/KxorhUIZwc/a ++0zLzq1lbS366TUsHekxdKQ/la7pZpSDLJvmOTOw+5K1EuWNqtBP44Zna7ak +fuTgVX+LFFBo/jPswpDwN+xGzejza17ZTOyoho014dmfUGLr5ZUs7PK2M0+W +1T6jTxGfjXKwx769Dwut/IrWLXEv5mFvYsg5LBn2IDsdmfVF2Ienw3QCm3sR +l+/GhBLs6uUxnpDsfiRdNHO5HPvLFbELpX6DKFol++tr7CkOo7EFNQbazGX8 +vzpsjujTdurkEIr1q33biC0l+LjpTOUIConb4vAR20Ji6dmU4QRyGbjyphub +SJEVVeGaQgIRkff6sMMVjkR4N0+jix99O4axv4p17g7KnkU33Rk3SWyqvdep +hOg59MUomJ1yh45mHlGeFvnNI+v5sVEubC5ZFYFZtUXEwX1lRgI7kfrmoIDI +EuJWSBNSxJZ+bhe+i1xCPwOyn6hia++InPKtZKKje7wWDmB7avU2jxkuo1e7 +Ku6FYC+EnGXjVvyL9sULckViX67k0VPiWkGeuUcHE7CTQPuFR/MqUtwU01WA +Tc1oMgrIZgFWCmfZNHZ2Q0LfFQlWCNMvPkeJxfUOO4fFRbMC60uzVEHsMOXF +4gK/ddDbbKKpiZ2YLyM3rcYOgRbhVlewv7VNVK+ksUNL7XO3u9jSc2X2/CIc +sDJQ15OFnaNhEa9CcgCrRid/J3Z9+XkWn0ou0OUP9VKJo6PFNx29I4a8kHro +BmUBW8iMV+BCNS90c5TPC8TTkWqnEfDp8MGJqHD3ndhe9JKU3Tv5oXK+/ZUX +9mnWZtV9vAIQpvZKdxSbIZs3G7EkCNO3Xz76m4D7Q7z/p1VdCLrPM+xkE+mI +9cWQzMYzQnD0V13CQWxp9S1W2eNCIC9+82ICtr1hbFFLnzA8Fj6ntPsuHbW6 +BwSKfRAB0xkL+tV7dPTzecwtFy5RaJne4FuAPTGenZZlLAocGWkBP7C5gwY7 +9taIwuEF2QXt+3RkdM1aw6VEDByz+toWsSvStRYzk8UhdUVhPvIBHaUzfgfr +BklCQ5fDGMdjOjp0/PrPwFxJKCnfJICwJ+qFD+QOSYJc0mDqOWyN9B0i0nZS +0Prm4fox7Ho352J2/S1gyjnA3vmEjuam+86NXJUGtvmXHlUpdCTsa/Sy2FwW +bM5XCfSm09FQOrenpZcsLLvL9Mhn0NGrnjaJyUhZKCz7vsEb29HM6apijSx0 +iTq0MLHTtwdbPVCTg3BGi6v4c/z/seczl8TkwdFtlNc/i46sPXhUTPsVoNY8 +/7pPHh2h4ONqNn8VQNrzq3M1tnJE8h6quCLcOemfLJBPR5Q0dYNLRxVBL3XO +sRQ796eDTVGtIrw/9fQdRyE+nydyrmxK3Qps0YY+lcW4PiPzL2NuSsA9EDQR +WE5HacfufycvKcHeKHOyHTvGrb+P7aESsPUwvdUq8P6+fHZcqkMJTAU+x89h +C1Y9phwzVIbdluu6zlXh/aM+pVwptx3edSG9e//RkYTsnfBb9B2QYKybINtA +R1U3F5R+sarAv5bTgknYjvN2nYSMCth+LeTjb6SjJ/XySgbOKmA1HxD2B1vW +o6Kd2aUC1iH+e3re4fnmMBSIDzvBsKdoa8lHOpKUkCKk7VTBZMhb5O1nOtqR +EcT7B6lBTejH487DdORGvbqoYqEG+7LtzUexk+Tif7o4qkFsJFtx0AgdrUvN +L2gIUYMR4bqm6FF83p6MWccXqoEyy2mpunF8nya5PFaSUwe+lpXg/TN4fW+Z +7bTl0IBre3spCb/o6GmAvGVJsybQdQdT/+VjoLZgtOdahg7M1f19UqrPQDLO +ny2cfPbBQGUKj/g5BqKtluZJhgLUXhgt5ihmILHxV5xibgYwLNaQrbjMQEHq +ej3xykYQxf5rRf3QEHKbXG4SHjOGOJtQD7X/DaFcg0DO5NaDYFlZJvL8zxBK +X/CqzUk0gcLD3c9LnYcRc//Gj/Xhh+FsqXuCdMcw+kFZN9vvag4p0YtSFRYj +yG+zf+wVuSMwvz/R7Oz7EZR3qqnmboQllKhaFXHaj6Lz8+Lk9lNHgbMnasPc +yChaND1wovGkFZx9YGb/8PYY0nGI2884egzaN1JX9XTGUbv4Y696dWtgq7b4 +tH9gHG16drUqc9txmH5nGbg1bQK96lM2s+A7Ae/qpa7ucplEUp0zHsGTJ+Bg +b8vrPJkppH43LietzwY8NIP9Ti9Pocds8zvj39hCx9fimAtt06h0/65vEeV2 +EGleJqt8cgYl7bkpuJxtD9fX1/U+7JpBrd8zItWjHcDj5OjjLtNZVGL+SP70 +ZUcYTMug+72fRbO+xyh+VCdo4Gxk8zOcQ4sHlDynDJ0hMyplXq1yDmVOdjMD +tU5CsI6R94t988j2aYa7E68LSJ61c+Mvm0fFRYdPrrvuAja5ylygs4B0JNp/ +Rf1yARensywXCxaQXJ/Ht0+nXEH1mj7vTtlFROfxPvJo0BUerkg6liQtorYY +C/eDx91A8s/t1RcsSygxJJnnbBv2vojGCe8lVFW9+svdxB30PjjrnPiwhNY7 +wnX1Cnc4MPVwVl+CRNIbGls3V7kDZ7fV02ubSaTabL6Ro9odzCTuJL2TJJGV +nkPW11p3uHmX6nhUmkSJm4M/XHznDhtfy++2VSDRph8v1jd9dYfBpz7NBrtI +JO8sluRIukOslGtVlAGJdFymMiM0qKDZphHRQpDo2YOZQAstKkwV6nt/8iDR +ho45fTFtKrAqF6R0eJJoypjszNxLBROhSeZnLxLfXxSWZgP8PfODbbsfifhJ +QTuho1QgdPyeZQWTiH5b859kXyrYkmasnyJIFFMZdurVMypc6VE/Qz4lka/a +fZ2QTCqkNC64N6WSyCyr8B/tbCr8rC1MSUojEff9oayyXCps++BPamWQKCLA +cqz0Jc6jqIt4Z5IoTEneu6SOCrURf8cL8kjkdf+DT9FPKkxUcPcWVpDIhH9I +L6CPCpZX4qq9K0m0LYLCpzZABS3lLwPyVSQaCtDMLWRQwbXiNzPxNYlcLZIn +CyaosPLb3canhkS27IF++b+p0OX6roJ8S6KDgZtO54jSQNlWcsPlNhLVJUea +xm+kgfX2I6u7PpFIr3lOPmQTDXS3x3H1YqsqfOg2lKJBx8OEIN0OEol3XTD8 +rkADr9D/coc+k2hc94cotyYNJLe0XtrwnUR3WFNeexyjQczWmXP1dDz/XbxJ +5sdpENg90W7DINE1h5AAdRsahGZ8OjCGHfLScuuqPQ1ubHsdwjuM6ydY4u65 +0UAwiYflwCiJ1N+7Ud+eoYFB439Xb0+SqCtOgUculgZO+5VO+i6SKA/xeY7E +0cD4ycmi79jXJhfqcxNosKP7ubbJEonUTOovad+nwWnE81OGxOtHcZ8zf0KD +3+xno94xSXTAP6U7JIcGPVGyFnN/SCQpeUNLP48GjqeMGo8tk2jhvX/CugIa +GK6yBLzETlVE5jHFNJBfZjoE/iXR3x8/atIqaPBnJSx8eIVEL80kMluaaEBd +zZrLZGGiW79Z2RPf00D2WfaFv9humWOuds00yIxe0TjKykQCbBUS9Facf9ha +ewnbp9L2zq8veH3E8sO12JhITvlesDwD9382mCWWg4l+d13sGB2igcJHpetd +2G0RNNX8ERpcbxbRk+Jkokv9GmM6E7jfInbqWdjfkjqcjszTYFjpy/ESLiaK +5xQ0Ps9CQEP5Hadn3ExUNffDIWgdATXkzphh7OEf2QF+7ASMll0s38rDRHov +jVLc/iEgc1v/ajr2kEvIH1NBAva2d5gk8OL6zYyFjIUJyJJnsWjG3rtHSAmJ +EGB+2NqMjY+JYvlyTqiLE6BcsWPPGey9Fb2FEjIESHf+fqPPz0RERk6TiBwB +90Oy7vtjx8aG9q5XIOBrLQctGXuIEOZjUyJgcsf9iT9r48IHPSdUCYgUyMjN +XM9EFSvC4UNqBGRccjT/hM0Y7bvbp0EA/4LTEBNbt+b8m05tAsRVhNiMBZiI +7pMn9RpwPcWik23Y/LYXNMsMCHBWmT8+i61jeMis0IiA6uLGMgFBJooRHwjN +OETAtQBNwgz7FVt+bLIpAeU5r4s8sQenLzx/YIb7syTBvIqt3SDy+bYlARYL +e33LsN0KB8avWxEQRpl+1Ip9+1E+67/WBBz/aP92CHsgwEQ12JYARpwBRUiI +ificRQ+etifAXqdISBFb22TQycuRgF+UOkkd7NtbLt5ydiGg90aOpCP2K27T +VFs3AnIsLwr5YA8sipZbUXF9B7+tnl/L6x9sNSMIsFL5j3FjLa+5YOiAJwGd +PNvq72K7lV38C14E3NMWfPh0LT/VdMNeH9w/63NeOWv5t8W2a/oRUGZio1a6 +lh9C37/rNO6fZd5cNTYvtdBWKYCAdaOhLxqw9xy55C8XRABXf5njx7V83cOR +ksEELB8hODqwoxU2PhYLIaA76WpmF3apAKNY8DwBT0/xG37H7v9T+J4njAD/ +SvYvP9byhy/1s1/C/Wv3dO3F1mo/zFwNJ0BKfw9jzf8HZ4gE4Q== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "PlotRange" -> {{0, 180}, {0.6424125786998229, + 1.5046080545179232`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6424125786998244}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6413,132 +6352,132 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, + "PlotRange" -> {{0, 180}, {0.6424125786998229, + 1.5046080545179232`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "AxesOrigin" -> {0, 0.6424125786998244}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{91.80048673422971, - 202.7475686600987}, {-12.9358605040218, 4.401639495978198}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwV1Hk0Vd0bB/BLpteUISSRuSglU0j2k6EiJCmzDPceMhYSpdRblJJMlX4N +ZChkFjLkRUIlhJJSpnvN83RuJX7bH2ed9Vn7rO959rMHGTd/KxorhUIZwc/a ++0zLzq1lbS366TUsHekxdKQ/la7pZpSDLJvmOTOw+5K1EuWNqtBP44Zna7ak +fuTgVX+LFFBo/jPswpDwN+xGzejza17ZTOyoho014dmfUGLr5ZUs7PK2M0+W +1T6jTxGfjXKwx769Dwut/IrWLXEv5mFvYsg5LBn2IDsdmfVF2Ienw3QCm3sR +l+/GhBLs6uUxnpDsfiRdNHO5HPvLFbELpX6DKFol++tr7CkOo7EFNQbazGX8 +vzpsjujTdurkEIr1q33biC0l+LjpTOUIConb4vAR20Ji6dmU4QRyGbjyphub +SJEVVeGaQgIRkff6sMMVjkR4N0+jix99O4axv4p17g7KnkU33Rk3SWyqvdep +hOg59MUomJ1yh45mHlGeFvnNI+v5sVEubC5ZFYFZtUXEwX1lRgI7kfrmoIDI +EuJWSBNSxJZ+bhe+i1xCPwOyn6hia++InPKtZKKje7wWDmB7avU2jxkuo1e7 +Ku6FYC+EnGXjVvyL9sULckViX67k0VPiWkGeuUcHE7CTQPuFR/MqUtwU01WA +Tc1oMgrIZgFWCmfZNHZ2Q0LfFQlWCNMvPkeJxfUOO4fFRbMC60uzVEHsMOXF +4gK/ddDbbKKpiZ2YLyM3rcYOgRbhVlewv7VNVK+ksUNL7XO3u9jSc2X2/CIc +sDJQ15OFnaNhEa9CcgCrRid/J3Z9+XkWn0ou0OUP9VKJo6PFNx29I4a8kHro +BmUBW8iMV+BCNS90c5TPC8TTkWqnEfDp8MGJqHD3ndhe9JKU3Tv5oXK+/ZUX +9mnWZtV9vAIQpvZKdxSbIZs3G7EkCNO3Xz76m4D7Q7z/p1VdCLrPM+xkE+mI +9cWQzMYzQnD0V13CQWxp9S1W2eNCIC9+82ICtr1hbFFLnzA8Fj6ntPsuHbW6 +BwSKfRAB0xkL+tV7dPTzecwtFy5RaJne4FuAPTGenZZlLAocGWkBP7C5gwY7 +9taIwuEF2QXt+3RkdM1aw6VEDByz+toWsSvStRYzk8UhdUVhPvIBHaUzfgfr +BklCQ5fDGMdjOjp0/PrPwFxJKCnfJICwJ+qFD+QOSYJc0mDqOWyN9B0i0nZS +0Prm4fox7Ho352J2/S1gyjnA3vmEjuam+86NXJUGtvmXHlUpdCTsa/Sy2FwW +bM5XCfSm09FQOrenpZcsLLvL9Mhn0NGrnjaJyUhZKCz7vsEb29HM6apijSx0 +iTq0MLHTtwdbPVCTg3BGi6v4c/z/seczl8TkwdFtlNc/i46sPXhUTPsVoNY8 +/7pPHh2h4ONqNn8VQNrzq3M1tnJE8h6quCLcOemfLJBPR5Q0dYNLRxVBL3XO +sRQ796eDTVGtIrw/9fQdRyE+nydyrmxK3Qps0YY+lcW4PiPzL2NuSsA9EDQR +WE5HacfufycvKcHeKHOyHTvGrb+P7aESsPUwvdUq8P6+fHZcqkMJTAU+x89h +C1Y9phwzVIbdluu6zlXh/aM+pVwptx3edSG9e//RkYTsnfBb9B2QYKybINtA +R1U3F5R+sarAv5bTgknYjvN2nYSMCth+LeTjb6SjJ/XySgbOKmA1HxD2B1vW +o6Kd2aUC1iH+e3re4fnmMBSIDzvBsKdoa8lHOpKUkCKk7VTBZMhb5O1nOtqR +EcT7B6lBTejH487DdORGvbqoYqEG+7LtzUexk+Tif7o4qkFsJFtx0AgdrUvN +L2gIUYMR4bqm6FF83p6MWccXqoEyy2mpunF8nya5PFaSUwe+lpXg/TN4fW+Z +7bTl0IBre3spCb/o6GmAvGVJsybQdQdT/+VjoLZgtOdahg7M1f19UqrPQDLO +ny2cfPbBQGUKj/g5BqKtluZJhgLUXhgt5ihmILHxV5xibgYwLNaQrbjMQEHq +ej3xykYQxf5rRf3QEHKbXG4SHjOGOJtQD7X/DaFcg0DO5NaDYFlZJvL8zxBK +X/CqzUk0gcLD3c9LnYcRc//Gj/Xhh+FsqXuCdMcw+kFZN9vvag4p0YtSFRYj +yG+zf+wVuSMwvz/R7Oz7EZR3qqnmboQllKhaFXHaj6Lz8+Lk9lNHgbMnasPc +yChaND1wovGkFZx9YGb/8PYY0nGI2884egzaN1JX9XTGUbv4Y696dWtgq7b4 +tH9gHG16drUqc9txmH5nGbg1bQK96lM2s+A7Ae/qpa7ucplEUp0zHsGTJ+Bg +b8vrPJkppH43LietzwY8NIP9Ti9Pocds8zvj39hCx9fimAtt06h0/65vEeV2 +EGleJqt8cgYl7bkpuJxtD9fX1/U+7JpBrd8zItWjHcDj5OjjLtNZVGL+SP70 +ZUcYTMug+72fRbO+xyh+VCdo4Gxk8zOcQ4sHlDynDJ0hMyplXq1yDmVOdjMD +tU5CsI6R94t988j2aYa7E68LSJ61c+Mvm0fFRYdPrrvuAja5ylygs4B0JNp/ +Rf1yARensywXCxaQXJ/Ht0+nXEH1mj7vTtlFROfxPvJo0BUerkg6liQtorYY +C/eDx91A8s/t1RcsSygxJJnnbBv2vojGCe8lVFW9+svdxB30PjjrnPiwhNY7 +wnX1Cnc4MPVwVl+CRNIbGls3V7kDZ7fV02ubSaTabL6Ro9odzCTuJL2TJJGV +nkPW11p3uHmX6nhUmkSJm4M/XHznDhtfy++2VSDRph8v1jd9dYfBpz7NBrtI +JO8sluRIukOslGtVlAGJdFymMiM0qKDZphHRQpDo2YOZQAstKkwV6nt/8iDR +ho45fTFtKrAqF6R0eJJoypjszNxLBROhSeZnLxLfXxSWZgP8PfODbbsfifhJ +QTuho1QgdPyeZQWTiH5b859kXyrYkmasnyJIFFMZdurVMypc6VE/Qz4lka/a +fZ2QTCqkNC64N6WSyCyr8B/tbCr8rC1MSUojEff9oayyXCps++BPamWQKCLA +cqz0Jc6jqIt4Z5IoTEneu6SOCrURf8cL8kjkdf+DT9FPKkxUcPcWVpDIhH9I +L6CPCpZX4qq9K0m0LYLCpzZABS3lLwPyVSQaCtDMLWRQwbXiNzPxNYlcLZIn +CyaosPLb3canhkS27IF++b+p0OX6roJ8S6KDgZtO54jSQNlWcsPlNhLVJUea +xm+kgfX2I6u7PpFIr3lOPmQTDXS3x3H1YqsqfOg2lKJBx8OEIN0OEol3XTD8 +rkADr9D/coc+k2hc94cotyYNJLe0XtrwnUR3WFNeexyjQczWmXP1dDz/XbxJ +5sdpENg90W7DINE1h5AAdRsahGZ8OjCGHfLScuuqPQ1ubHsdwjuM6ydY4u65 +0UAwiYflwCiJ1N+7Ud+eoYFB439Xb0+SqCtOgUculgZO+5VO+i6SKA/xeY7E +0cD4ycmi79jXJhfqcxNosKP7ubbJEonUTOovad+nwWnE81OGxOtHcZ8zf0KD +3+xno94xSXTAP6U7JIcGPVGyFnN/SCQpeUNLP48GjqeMGo8tk2jhvX/CugIa +GK6yBLzETlVE5jHFNJBfZjoE/iXR3x8/atIqaPBnJSx8eIVEL80kMluaaEBd +zZrLZGGiW79Z2RPf00D2WfaFv9humWOuds00yIxe0TjKykQCbBUS9Facf9ha +ewnbp9L2zq8veH3E8sO12JhITvlesDwD9382mCWWg4l+d13sGB2igcJHpetd +2G0RNNX8ERpcbxbRk+Jkokv9GmM6E7jfInbqWdjfkjqcjszTYFjpy/ESLiaK +5xQ0Ps9CQEP5Hadn3ExUNffDIWgdATXkzphh7OEf2QF+7ASMll0s38rDRHov +jVLc/iEgc1v/ajr2kEvIH1NBAva2d5gk8OL6zYyFjIUJyJJnsWjG3rtHSAmJ +EGB+2NqMjY+JYvlyTqiLE6BcsWPPGey9Fb2FEjIESHf+fqPPz0RERk6TiBwB +90Oy7vtjx8aG9q5XIOBrLQctGXuIEOZjUyJgcsf9iT9r48IHPSdUCYgUyMjN +XM9EFSvC4UNqBGRccjT/hM0Y7bvbp0EA/4LTEBNbt+b8m05tAsRVhNiMBZiI +7pMn9RpwPcWik23Y/LYXNMsMCHBWmT8+i61jeMis0IiA6uLGMgFBJooRHwjN +OETAtQBNwgz7FVt+bLIpAeU5r4s8sQenLzx/YIb7syTBvIqt3SDy+bYlARYL +e33LsN0KB8avWxEQRpl+1Ip9+1E+67/WBBz/aP92CHsgwEQ12JYARpwBRUiI +ificRQ+etifAXqdISBFb22TQycuRgF+UOkkd7NtbLt5ydiGg90aOpCP2K27T +VFs3AnIsLwr5YA8sipZbUXF9B7+tnl/L6x9sNSMIsFL5j3FjLa+5YOiAJwGd +PNvq72K7lV38C14E3NMWfPh0LT/VdMNeH9w/63NeOWv5t8W2a/oRUGZio1a6 +lh9C37/rNO6fZd5cNTYvtdBWKYCAdaOhLxqw9xy55C8XRABXf5njx7V83cOR +ksEELB8hODqwoxU2PhYLIaA76WpmF3apAKNY8DwBT0/xG37H7v9T+J4njAD/ +SvYvP9byhy/1s1/C/Wv3dO3F1mo/zFwNJ0BKfw9jzf8HZ4gE4Q== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, + "PlotRange" -> {{0, 180}, {0.6424125786998229, 1.5046080545179232`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "AxesOrigin" -> {0, 0.6424125786998244}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6548,7 +6487,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.819001000320631}, + AxesOrigin->{0, 0.6424125786998244}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6576,7 +6516,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.8190010003206292, 1.212160280392001}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6424125786998229, 1.5046080545179232`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6584,9 +6525,9 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913281932019863`*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] + CellChangeTimes->{3.9913281932019863`*^9, 3.994350117828006*^9, + 3.994353239508266*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"1926143a-73e9-491b-99f9-5813825b95d0"] }, Open ]], Cell[CellGroupData[{ @@ -6601,7 +6542,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -6623,8 +6566,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6649,348 +6591,179 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488717861137`*^9},ExpressionUUID->"5a7f9400-1446-9746-a463-\ -bade8ae5c530"], + CellChangeTimes->{3.9918488717861137`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0472568361461936`*^-267\\\", \ -\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 117, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934227676`*^9}, - CellLabel-> - "During evaluation of \ -In[169]:=",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5836247142456827`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.6530346527673392`*^-265\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 118, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934317894`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994350118453467*^9, + 3.994353240075172*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], +In[95]:=",ExpressionUUID->"9a1d098e-19b8-4044-a9fe-9fae6199dc16"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.3739060311364366`*^-291\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.5335939011112544`*^-276\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 169, 119, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934409904`*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994350118453467*^9, + 3.99435324008594*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], +In[95]:=",ExpressionUUID->"a6526d2f-18f0-4c44-8e08-ff1b4ee671b5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4227833939163418`*^-287\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 11, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994350118453467*^9, + 3.9943532400956993`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"a851fa23-f98a-47d5-ba78-0de0f0dacdf1"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 169, 120, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132819344899*^9}, +during this calculation.\"", 2, 95, 12, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994350118453467*^9, + 3.9943532401044283`*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], +In[95]:=",ExpressionUUID->"a53543d4-c88b-485f-a374-ea4218c23cbb"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8Fd8bB3BLRSqyX+u91xay79f2PIRsKUrJrmhR2ZJKZMlWJKGSbJV8 +K+LeuW2WIspSUiHrL8lSEqJQiq/ffP+a1/t1Zs7MnHOez5mh7wl2CeDi4ODQ +5uTg+O84P9DyXCG12HzHnHC0+9gm884CykmLnngI1S9LnbCUAxR9s4fSkwm3 +TIeP1FvqQMS2u93cPTfgWc1W51uWliA4JZ650E3Aq4XstAhLF/hY4xQ8210P +CXWntw9Y7AEbhfEPM93tMCwQsfoChMFCt+Gl6e4hGEstjPYyiIeGTf8Uv7vx +Ewa1x5qW3mSC9MfKz3vUliDmsn3ZjovXQOSwz12eTdw4HhxEN/xwHTK1baqd +XHlxUfvADaXFW9Cbo1U3s34dtu8RYXZH3YHU4pg3XBKCeCV0VEW3vwzs9Q4K +icoLovRrgvPUlzLgfe7iukFdEIf6JB2rf5ZBwrBiv4OFIL4Sz9JUXHsPouRa +P2cfFERn3ucz+ab3IKiI8q9SlSBy1H4Po+fdA+c8lpqDhxB6hXZl+bmWg3j2 +8NmsfGHUxoh0d2YFUDY+SPhdIoyJKzPylyorQLI+KcaLKYxuO9JZVxsqQHZa +5diGBmEcWx01XNNVAYqOIb7VY8I4HhXvVLFYAborlgyGdUXwcsneG9flmbA1 +XGxE56UIcr9ZVMk4xIRta8YGrnSI4NMY1R/TwUxwuVHZu/g/Edzua6XmFM6E +nW893zR+F8GPXHGzS1FM8FK7WeUuKoon+Te16KQz4dCI5sV4X1HM6jZVmalg +QvIOO/P2eVHM91+r9XSaCZL32yS5OMWwN1RAi3OOCeXCO35prxFDxa2Rs7DA +hK52b+ZFqhjGjdFamJwsUHAOl3O2FcON/VY5PkIsqN9SuOrtVTGU8NNJmdFh +wZLNXNtrU3EMS3/QPxLCgoySyNIlG3E0qH3YXxhOXr+KI0XdWRz9rhnk7DzB +AscXfBbnA8Sx0ErZ5lEMC3I30diO6eLoY384zDqdBUbocOXVR3F0c26fz77L +gqOM6z4t8RS0213pzjHIAvsi/lmHNArKDvKnLA6xQI4nKqXtEgWLXFSXZkdZ +8LZzJ6vjNgVVtsw87fvGAo2QtdwDbRT87Fx14+QvFoyVHC/5ISmBVhpqyyv4 +CfAUcZqUYkugQ03BhIsRAbqnquMKaiTQaGusbY8xAXxDymL0Rgn0eRc5vduM +gMoKblDqlcDrV68oulgSIOZQmaG1LIGivLWqYo4EvI1T0LN2kERWv173hDcB +Vt//RAYNS6Kvh11pVxwBJ22zVZ9NSOLOHL0H/WcIKL+u3ic8L4m63/4YfUgk +gLLDl1HJK4VrS09UvD9LwMTjF7+4NaSw65HwnryLBGTFZ4RfPSGFti4KWnFF +BDT3qyhMxEmhAuhxO90gYFGvocM8VQoPMiV3ihcTsO/LnM5IvhS2SgtEF/5D +gLGjx4xGgxS+bHXsTywnYEhUKej5Omn0NTY3Lq0mQDy4VkZcXBovqVHM8QkB +js1urw/SpJGR86753VMCHkamqgnoSuNe+5bw8WcEnPs4Pb7bTRoTvV30fjQR +oHOnev/3G2S7w/ZnHh0E7OdyFbcsk8aHmyyCKjsJyPOYasx+II15RrJ3hbsI +WMVPVzJulsY4tda3T3oI6AtLGkmYJO8XaPF17AMBcabOfpJGMsixIP489wsB +tt4FPwwtZTA0Sj61b4wA/thvZ1wdZTDxUvlWsXGy/4bEkgxfGYx02dEZN0HA +Y/uqb6vOyuBttYJPyjMExBzmiVbIksGzal53bX8QYJO+g98yXwb9Jj5G+P8k +oPPdlFY0SwZ1Px2SzZgjYNpNPuJnrwy2hyQ+fbRAwKPIEB7BERmUWGVR8+gP +AafznuRoTMmg91O35+y/BKwd3FV9kEsWhY5x/ipcImDD/jSOQVVZ9Ftt+a8t +Jxu8j82daz0li4UiHLsHeNigeMVSejyRPN9hzr+Ql03O94V7PBmy2DR05Kzn +ajZELqq8tSyWxR6eQuorPjZcOuMtWtkqi9NScO3kOjZ43iot6eqSxYErCYlS +/GyQa/ptODsoizlyvRcqSTP5stw152RxLjKNd1yADa0XmwpvyVBR8NqhW9JC +bMhii2g3bKDi130hpYWk3d/71Q9qU5HvtVevrDAbxiiLI1I2VGz/PscUFGFD +hbFdBGMbFT323/JMJB3heZlnlzsVt03a6M2R5i7SUs0MoqJidsShFlE2vHwW +XV1xgopx/UKv1cXYkDH80vF1PBXTo554p5OW3RAQzHuFiuaT+8SsxNkwaktw +KF2n4lPdaPOrpMsCly9uKqUiV93b3HHSxuVX75+upeJJm0OzcRQ2WHW3LU01 +U7Fx19yeBtJOHCs2+7RTMXebSDKnBBvcVBgZb/qpyHn7Hz9T0ntdgnphlIpG +rAs/j5IOOnVTjjlFtl+7Z3ab9IninkO031RcHTyMvaRtTtFjYlfSMBnkI7Ql +2fBKoOamER8Nj2TM3XEjva14Z/M0Pw1NjobkRpHuMpqZuC1Mw0WNSNt80h6v +UwX9KDSc/7Rwv4r0oJ+SgYQMDbnjugc7Se+br3N/R6fh766/rd9IfzvnEXNW +iYYrE7ZFLpMOoc7ftNhIw3VLtV8FpNgwx85oXtCkoXCqvrQM6UjbjZMsPRpe +sM8X2kCa48MLwUAGDd+pjrxWJ50Y6msgZ05Dv8lfTtqk+Vb9de+zpKGvYtPl +/5yReykmczMNPxlYlGiQFtXUKrZ3pOGWnTtPK5PObXjZzOVMw5rkX1Qqaapb +wGSVKw13F4ilCZEunlgWPOpOw1qTkgYu0qpxuQYbfWjo8OZq03fy+StE9T2G +99Iw7dJoTi9pvbtvYq4doOHlK6eN6khXmQcWbz9C9nfX/Z+bpKFjRcuaMPL9 +gkI+nyH9fH/hZEMEDVO3PJr3JW23yBCKOkXD7OgNvcak2zI6DfRiaWizWJku +SHqHYrDHRAINQzMOUEbJ+eutXB1bfJaGs83qxx+Q9nYqLvZMp6HA4oqyeNIj +Q+YtIlk0fGkz/siR9NSacKHEPBoqHOtw6ybX09EifkOz6zRsD+r4foX0b707 +HnO3aDh1t9fPlTS390BxQAXZf9xCXyO5PilMW0Obehp2OT4wSyDXd77VsMe/ +jTR0KVjfspG0XG907MNXNOzlSTZ8S9aHOhe7Rek9Ob7NH54JkLbcIePJM0ZD +qWHeOwfJ+msaexRbO0FD3fx1gb/J+nSMdrl1fIaGV3tDxRJI7ypJnvryh4Zf +RlP0MwXZcPj3TGzzOjq+7zp49yxZ78ah+8Q+C9Exw2FIY5bMA97xvlJuCh2j +NZ/LepC+1d/QZS5HR01lQxtZMk8Gnl5Se2BAR49vun0nybwpM+Srbzehoz7F +YbDpvzxint41jXQM9nzpKURa7Mb++I0OdByMzHyaR+bZ1kRGz3UfOk7sjHBM +XkHW97/3jtT603FgclatkpvMtwg57g8H6Xh+i9iFL1xsSDmwRoMSTkdb+ekP +DDIf6xw+nElPoePy9YXX98n81BGK0zzFouNaKsV45TwBHKlzz3Me0vF2psin +5VkC2rgD3R9W09HQ4j3tF5nfh+ZcEmde0PFD/9mQfjLvi3sU+vf30dHutmnk +qUlyvy5sTtrBLYf3S3wTJUcIWNi4fkDdVQ43eVpLfGwjYD5fMk7XXQ7XtLPj +I14TMCugqMDwkcP29v0dfK0ETP1kBFodlEPZS1laqi3k/lm9d949Wg4HGp5z +WzUQ8NLhEX/KLTkUmuLwHn1IQO4hbxiak8O98YpJX68RcOXDgaEvf+Tw8fy/ +L2i5BGRvPZo4uSyHmuu/yLjmEJCum/Lq92p5TAmXl36QTUD8X9YuAVl5ZHOq +n3Y5T75f6soQUxt5fC9mzlhxmgDT0rKiy5flsdm3rNTJi4B+Wmmh9TV5HC32 +/7bNg4DIy3cKZgvl8Xaj49ttu8n9K64kz+WOPM78bzrdzpUcX7eiHP4aeTz2 +5vgK6hYCVFZmZyR9kkdzA64Fd1NyvHxOxUaoKWD3xyseNAkCZoTsfXfWKyBD +aCxWrZUFPYfl3gY2KaDSaEDCoRYW1DX+gZhWBbx567Ty7UbyezCylHq7SwFb +JFJ2Sz5jgdbQ2o8L4wpIVWNkDD1gQRDrjVe+sCI+/pfdx13IgvGtrh4j/op4 +YbjM8nIwC0bSfHeG8Sjh5kbOZi8+Fth9P243arABOXLZyX4MJkzs5T16P0YZ +3azmTLaeLif/R8S5kutV0FDvyUeHkDIQeq2Uzvyuirt7o8x/h94F6ZSKbQYG +aphhyHnigfltyNnIWC+8Xx1VhjrpP7RK4KWkhf7Pixp4QjLqWbB+MRhL12do +dmnieu/Y9arUG8DPfSPcL14LVwZ8/FVgUQSycVTT3Ura2HtmLZvGzIPVip4P +XZq08c35e7lUzaugYSZRcdxLB/PXhDV7KF+GsAGhBnsOXYzgU1Hfr5QF33+m +udrl6OL7wRfcfrkZsFmzMddOXQ/txRcOKBJp8PSnyd9fbXqY0K4U1LM9BYLU +dPreBeijFGXsiURlAphN+XfuXm2AKgx9cV/HOLBWoGxZd8MAM2Kd+Zr4okE5 +9tyJekNDDM3lsKxwPgGqAYxaxT5DFM73Gn49eRQCnh5IuB9qhG7BlRJNYSEw +dWT8uHW4ETJ+BD787B8CJ2QOH+qKMEIR+pDR+l0hcC4q2OX3KSP8LSHVF2sS +AkzjCJppkhFeEG/8070iBBYfnqlpyDXC0EsrLAmdYMisKJhtbzBCl43dhiuz +jkBtUaf/jCgDk+xURErOBcKgI90ngsLAJ+JpmT+OBgLHwpHdfyUZKKnQXb7V +KxAsnXmcVtIYmL+Cdc1EKxAaOY0NJVQZWPe+HXu7DkLrnsLVFuYMxMQ92fIb +DkKfQmB5xj4GHm+NbWF37IfZ28u/NB8xsHxk45NG9wD4vNOm6GwlAysl9Of0 +7QKgZ8V52+FqBoZhchnLMACqfSWvXq5jYDHvaFSbSADEU/SNl1oYaKcsPZj3 +xh/WpwRGvfwfA085XM9O2uwPavvfcwRwGeN3t9XbvHAv7FUsXZ27xRjP1N4/ +m7fDDyJfeAcqbTPG/B+npyut/CAjQOgV4WKMl77brh3R84OaWyfTXu0yxgBp +LktvUT8QUbIVWPIzxhNcbXVfu3yhUWlUxDfCGH9K/Z1w9fQFVWUqTanQGC01 +W8MvDXrDjGqWATFtjD7PaA4DxzygpxWthX8ao3XlPt1yLw+oC5raHj5njOr3 +hD5kWHtAOmEXavDHGNe8v2eVLuoBqsYcZVXcJph2Ml3swEN32GN3hN4gZoJJ +y9x7z//dDZ37N6/tNDXBLyB83THLDR4X//00l2KCGnUvB2TnXcFgU/gv+1QT +dJLQaPtnyBUefJpYW3TeBFcccuLDN65AyA4Y2mea4OjBeCy47QplOXXnC66Z +YOiZr6nrPV2hKC2RsbncBO8M9H1peLEDzoYLXMzpMMG6P77ztOLt4G4ljyay +pvjsRODP/HPOsNTJy99AM8WBxpjn2086Q1HAVL+9vCl2Tyu2Ug44w+ekyuPu +yqZoXf3I+a21M4S1bK04qWOKq764LfzkdIZzTlGyj21MsZbj8jh39Daocnu/ +qBdsiozDIfDjrxNIHUmu1KgzxYZPw+pNzg6QvrxPP7XeFE/745m/hg7AlWnD ++vLcFO/Gr6u2lnWA8Ycr7xS1mKJYrXKm1Dd7qOJIyBHqMEXz8hL6q0R7cM+O +PT4/aoqDGzyWNtbaQU71Sf2na8zQN43CSLGwBVG+w6wtu8yQK+euin+cNRRv +iv7vRxMfXLRS0Ay0Bp3o9E1ZnmZIHC6tXb/dGpymme97/MyQp8E0TVzRGpK6 +5hb2HjZDr6rWfdovreD3jRjLyDgzTD7eWpBIsYI+k6yOklIzHMrZXqTxwhIO +HCvOsys3Q0cf5+Q7TEuYL38QMME0Q+6aLfVGeZYgJNfzS/uhGQ4mfZ/MOmoJ +Drwy0k/qzPBP2yYdE3lLqOks8e94b4YzpYX25kkWYM//WD2ixwxVHslvmQ+z +gJ7NLfOUfjOU+PHpwjMfC5it+pbiPUg+P6s+8yLDAtSva937Om6GNd/uVIpO +IdT0WUSkTZrhZR78GtCPYC+yHTSnyf7jWR3NzQj7ko+9C58zw3VhblcabyLM +1iXliv82Q2Wb51v9LiLE/7myt+qPGSZpnojjj0FYr3dHzWvJDDUq1aTbDiMU +HKmaW142Q2u5EoEid4T/A+5nfb0= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7004,307 +6777,131 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV13k8Fd8bB3BLRSqyX+u91xay79f2PIRsKUrJrmhR2ZJKZMlWJKGSbJV8 +K+LeuW2WIspSUiHrL8lSEqJQiq/ffP+a1/t1Zs7MnHOez5mh7wl2CeDi4ODQ +5uTg+O84P9DyXCG12HzHnHC0+9gm884CykmLnngI1S9LnbCUAxR9s4fSkwm3 +TIeP1FvqQMS2u93cPTfgWc1W51uWliA4JZ650E3Aq4XstAhLF/hY4xQ8210P +CXWntw9Y7AEbhfEPM93tMCwQsfoChMFCt+Gl6e4hGEstjPYyiIeGTf8Uv7vx +Ewa1x5qW3mSC9MfKz3vUliDmsn3ZjovXQOSwz12eTdw4HhxEN/xwHTK1baqd +XHlxUfvADaXFW9Cbo1U3s34dtu8RYXZH3YHU4pg3XBKCeCV0VEW3vwzs9Q4K +icoLovRrgvPUlzLgfe7iukFdEIf6JB2rf5ZBwrBiv4OFIL4Sz9JUXHsPouRa +P2cfFERn3ucz+ab3IKiI8q9SlSBy1H4Po+fdA+c8lpqDhxB6hXZl+bmWg3j2 +8NmsfGHUxoh0d2YFUDY+SPhdIoyJKzPylyorQLI+KcaLKYxuO9JZVxsqQHZa +5diGBmEcWx01XNNVAYqOIb7VY8I4HhXvVLFYAborlgyGdUXwcsneG9flmbA1 +XGxE56UIcr9ZVMk4xIRta8YGrnSI4NMY1R/TwUxwuVHZu/g/Edzua6XmFM6E +nW893zR+F8GPXHGzS1FM8FK7WeUuKoon+Te16KQz4dCI5sV4X1HM6jZVmalg +QvIOO/P2eVHM91+r9XSaCZL32yS5OMWwN1RAi3OOCeXCO35prxFDxa2Rs7DA +hK52b+ZFqhjGjdFamJwsUHAOl3O2FcON/VY5PkIsqN9SuOrtVTGU8NNJmdFh +wZLNXNtrU3EMS3/QPxLCgoySyNIlG3E0qH3YXxhOXr+KI0XdWRz9rhnk7DzB +AscXfBbnA8Sx0ErZ5lEMC3I30diO6eLoY384zDqdBUbocOXVR3F0c26fz77L +gqOM6z4t8RS0213pzjHIAvsi/lmHNArKDvKnLA6xQI4nKqXtEgWLXFSXZkdZ +8LZzJ6vjNgVVtsw87fvGAo2QtdwDbRT87Fx14+QvFoyVHC/5ISmBVhpqyyv4 +CfAUcZqUYkugQ03BhIsRAbqnquMKaiTQaGusbY8xAXxDymL0Rgn0eRc5vduM +gMoKblDqlcDrV68oulgSIOZQmaG1LIGivLWqYo4EvI1T0LN2kERWv173hDcB +Vt//RAYNS6Kvh11pVxwBJ22zVZ9NSOLOHL0H/WcIKL+u3ic8L4m63/4YfUgk +gLLDl1HJK4VrS09UvD9LwMTjF7+4NaSw65HwnryLBGTFZ4RfPSGFti4KWnFF +BDT3qyhMxEmhAuhxO90gYFGvocM8VQoPMiV3ihcTsO/LnM5IvhS2SgtEF/5D +gLGjx4xGgxS+bHXsTywnYEhUKej5Omn0NTY3Lq0mQDy4VkZcXBovqVHM8QkB +js1urw/SpJGR86753VMCHkamqgnoSuNe+5bw8WcEnPs4Pb7bTRoTvV30fjQR +oHOnev/3G2S7w/ZnHh0E7OdyFbcsk8aHmyyCKjsJyPOYasx+II15RrJ3hbsI +WMVPVzJulsY4tda3T3oI6AtLGkmYJO8XaPF17AMBcabOfpJGMsixIP489wsB +tt4FPwwtZTA0Sj61b4wA/thvZ1wdZTDxUvlWsXGy/4bEkgxfGYx02dEZN0HA +Y/uqb6vOyuBttYJPyjMExBzmiVbIksGzal53bX8QYJO+g98yXwb9Jj5G+P8k +oPPdlFY0SwZ1Px2SzZgjYNpNPuJnrwy2hyQ+fbRAwKPIEB7BERmUWGVR8+gP +AafznuRoTMmg91O35+y/BKwd3FV9kEsWhY5x/ipcImDD/jSOQVVZ9Ftt+a8t +Jxu8j82daz0li4UiHLsHeNigeMVSejyRPN9hzr+Ql03O94V7PBmy2DR05Kzn +ajZELqq8tSyWxR6eQuorPjZcOuMtWtkqi9NScO3kOjZ43iot6eqSxYErCYlS +/GyQa/ptODsoizlyvRcqSTP5stw152RxLjKNd1yADa0XmwpvyVBR8NqhW9JC +bMhii2g3bKDi130hpYWk3d/71Q9qU5HvtVevrDAbxiiLI1I2VGz/PscUFGFD +hbFdBGMbFT323/JMJB3heZlnlzsVt03a6M2R5i7SUs0MoqJidsShFlE2vHwW +XV1xgopx/UKv1cXYkDH80vF1PBXTo554p5OW3RAQzHuFiuaT+8SsxNkwaktw +KF2n4lPdaPOrpMsCly9uKqUiV93b3HHSxuVX75+upeJJm0OzcRQ2WHW3LU01 +U7Fx19yeBtJOHCs2+7RTMXebSDKnBBvcVBgZb/qpyHn7Hz9T0ntdgnphlIpG +rAs/j5IOOnVTjjlFtl+7Z3ab9IninkO031RcHTyMvaRtTtFjYlfSMBnkI7Ql +2fBKoOamER8Nj2TM3XEjva14Z/M0Pw1NjobkRpHuMpqZuC1Mw0WNSNt80h6v +UwX9KDSc/7Rwv4r0oJ+SgYQMDbnjugc7Se+br3N/R6fh766/rd9IfzvnEXNW +iYYrE7ZFLpMOoc7ftNhIw3VLtV8FpNgwx85oXtCkoXCqvrQM6UjbjZMsPRpe +sM8X2kCa48MLwUAGDd+pjrxWJ50Y6msgZ05Dv8lfTtqk+Vb9de+zpKGvYtPl +/5yReykmczMNPxlYlGiQFtXUKrZ3pOGWnTtPK5PObXjZzOVMw5rkX1Qqaapb +wGSVKw13F4ilCZEunlgWPOpOw1qTkgYu0qpxuQYbfWjo8OZq03fy+StE9T2G +99Iw7dJoTi9pvbtvYq4doOHlK6eN6khXmQcWbz9C9nfX/Z+bpKFjRcuaMPL9 +gkI+nyH9fH/hZEMEDVO3PJr3JW23yBCKOkXD7OgNvcak2zI6DfRiaWizWJku +SHqHYrDHRAINQzMOUEbJ+eutXB1bfJaGs83qxx+Q9nYqLvZMp6HA4oqyeNIj +Q+YtIlk0fGkz/siR9NSacKHEPBoqHOtw6ybX09EifkOz6zRsD+r4foX0b707 +HnO3aDh1t9fPlTS390BxQAXZf9xCXyO5PilMW0Obehp2OT4wSyDXd77VsMe/ +jTR0KVjfspG0XG907MNXNOzlSTZ8S9aHOhe7Rek9Ob7NH54JkLbcIePJM0ZD +qWHeOwfJ+msaexRbO0FD3fx1gb/J+nSMdrl1fIaGV3tDxRJI7ypJnvryh4Zf +RlP0MwXZcPj3TGzzOjq+7zp49yxZ78ah+8Q+C9Exw2FIY5bMA97xvlJuCh2j +NZ/LepC+1d/QZS5HR01lQxtZMk8Gnl5Se2BAR49vun0nybwpM+Srbzehoz7F +YbDpvzxint41jXQM9nzpKURa7Mb++I0OdByMzHyaR+bZ1kRGz3UfOk7sjHBM +XkHW97/3jtT603FgclatkpvMtwg57g8H6Xh+i9iFL1xsSDmwRoMSTkdb+ekP +DDIf6xw+nElPoePy9YXX98n81BGK0zzFouNaKsV45TwBHKlzz3Me0vF2psin +5VkC2rgD3R9W09HQ4j3tF5nfh+ZcEmde0PFD/9mQfjLvi3sU+vf30dHutmnk +qUlyvy5sTtrBLYf3S3wTJUcIWNi4fkDdVQ43eVpLfGwjYD5fMk7XXQ7XtLPj +I14TMCugqMDwkcP29v0dfK0ETP1kBFodlEPZS1laqi3k/lm9d949Wg4HGp5z +WzUQ8NLhEX/KLTkUmuLwHn1IQO4hbxiak8O98YpJX68RcOXDgaEvf+Tw8fy/ +L2i5BGRvPZo4uSyHmuu/yLjmEJCum/Lq92p5TAmXl36QTUD8X9YuAVl5ZHOq +n3Y5T75f6soQUxt5fC9mzlhxmgDT0rKiy5flsdm3rNTJi4B+Wmmh9TV5HC32 +/7bNg4DIy3cKZgvl8Xaj49ttu8n9K64kz+WOPM78bzrdzpUcX7eiHP4aeTz2 +5vgK6hYCVFZmZyR9kkdzA64Fd1NyvHxOxUaoKWD3xyseNAkCZoTsfXfWKyBD +aCxWrZUFPYfl3gY2KaDSaEDCoRYW1DX+gZhWBbx567Ty7UbyezCylHq7SwFb +JFJ2Sz5jgdbQ2o8L4wpIVWNkDD1gQRDrjVe+sCI+/pfdx13IgvGtrh4j/op4 +YbjM8nIwC0bSfHeG8Sjh5kbOZi8+Fth9P243arABOXLZyX4MJkzs5T16P0YZ +3azmTLaeLif/R8S5kutV0FDvyUeHkDIQeq2Uzvyuirt7o8x/h94F6ZSKbQYG +aphhyHnigfltyNnIWC+8Xx1VhjrpP7RK4KWkhf7Pixp4QjLqWbB+MRhL12do +dmnieu/Y9arUG8DPfSPcL14LVwZ8/FVgUQSycVTT3Ura2HtmLZvGzIPVip4P +XZq08c35e7lUzaugYSZRcdxLB/PXhDV7KF+GsAGhBnsOXYzgU1Hfr5QF33+m +udrl6OL7wRfcfrkZsFmzMddOXQ/txRcOKBJp8PSnyd9fbXqY0K4U1LM9BYLU +dPreBeijFGXsiURlAphN+XfuXm2AKgx9cV/HOLBWoGxZd8MAM2Kd+Zr4okE5 +9tyJekNDDM3lsKxwPgGqAYxaxT5DFM73Gn49eRQCnh5IuB9qhG7BlRJNYSEw +dWT8uHW4ETJ+BD787B8CJ2QOH+qKMEIR+pDR+l0hcC4q2OX3KSP8LSHVF2sS +AkzjCJppkhFeEG/8070iBBYfnqlpyDXC0EsrLAmdYMisKJhtbzBCl43dhiuz +jkBtUaf/jCgDk+xURErOBcKgI90ngsLAJ+JpmT+OBgLHwpHdfyUZKKnQXb7V +KxAsnXmcVtIYmL+Cdc1EKxAaOY0NJVQZWPe+HXu7DkLrnsLVFuYMxMQ92fIb +DkKfQmB5xj4GHm+NbWF37IfZ28u/NB8xsHxk45NG9wD4vNOm6GwlAysl9Of0 +7QKgZ8V52+FqBoZhchnLMACqfSWvXq5jYDHvaFSbSADEU/SNl1oYaKcsPZj3 +xh/WpwRGvfwfA085XM9O2uwPavvfcwRwGeN3t9XbvHAv7FUsXZ27xRjP1N4/ +m7fDDyJfeAcqbTPG/B+npyut/CAjQOgV4WKMl77brh3R84OaWyfTXu0yxgBp +LktvUT8QUbIVWPIzxhNcbXVfu3yhUWlUxDfCGH9K/Z1w9fQFVWUqTanQGC01 +W8MvDXrDjGqWATFtjD7PaA4DxzygpxWthX8ao3XlPt1yLw+oC5raHj5njOr3 +hD5kWHtAOmEXavDHGNe8v2eVLuoBqsYcZVXcJph2Ml3swEN32GN3hN4gZoJJ +y9x7z//dDZ37N6/tNDXBLyB83THLDR4X//00l2KCGnUvB2TnXcFgU/gv+1QT +dJLQaPtnyBUefJpYW3TeBFcccuLDN65AyA4Y2mea4OjBeCy47QplOXXnC66Z +YOiZr6nrPV2hKC2RsbncBO8M9H1peLEDzoYLXMzpMMG6P77ztOLt4G4ljyay +pvjsRODP/HPOsNTJy99AM8WBxpjn2086Q1HAVL+9vCl2Tyu2Ug44w+ekyuPu +yqZoXf3I+a21M4S1bK04qWOKq764LfzkdIZzTlGyj21MsZbj8jh39Daocnu/ +qBdsiozDIfDjrxNIHUmu1KgzxYZPw+pNzg6QvrxPP7XeFE/745m/hg7AlWnD ++vLcFO/Gr6u2lnWA8Ycr7xS1mKJYrXKm1Dd7qOJIyBHqMEXz8hL6q0R7cM+O +PT4/aoqDGzyWNtbaQU71Sf2na8zQN43CSLGwBVG+w6wtu8yQK+euin+cNRRv +iv7vRxMfXLRS0Ay0Bp3o9E1ZnmZIHC6tXb/dGpymme97/MyQp8E0TVzRGpK6 +5hb2HjZDr6rWfdovreD3jRjLyDgzTD7eWpBIsYI+k6yOklIzHMrZXqTxwhIO +HCvOsys3Q0cf5+Q7TEuYL38QMME0Q+6aLfVGeZYgJNfzS/uhGQ4mfZ/MOmoJ +Drwy0k/qzPBP2yYdE3lLqOks8e94b4YzpYX25kkWYM//WD2ixwxVHslvmQ+z +gJ7NLfOUfjOU+PHpwjMfC5it+pbiPUg+P6s+8yLDAtSva937Om6GNd/uVIpO +IdT0WUSkTZrhZR78GtCPYC+yHTSnyf7jWR3NzQj7ko+9C58zw3VhblcabyLM +1iXliv82Q2Wb51v9LiLE/7myt+qPGSZpnojjj0FYr3dHzWvJDDUq1aTbDiMU +HKmaW142Q2u5EoEid4T/A+5nfb0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07463369303800027}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7316,19 +6913,19 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07463369303800027}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7342,306 +6939,130 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV13k8Fd8bB3BLRSqyX+u91xay79f2PIRsKUrJrmhR2ZJKZMlWJKGSbJV8 +K+LeuW2WIspSUiHrL8lSEqJQiq/ffP+a1/t1Zs7MnHOez5mh7wl2CeDi4ODQ +5uTg+O84P9DyXCG12HzHnHC0+9gm884CykmLnngI1S9LnbCUAxR9s4fSkwm3 +TIeP1FvqQMS2u93cPTfgWc1W51uWliA4JZ650E3Aq4XstAhLF/hY4xQ8210P +CXWntw9Y7AEbhfEPM93tMCwQsfoChMFCt+Gl6e4hGEstjPYyiIeGTf8Uv7vx +Ewa1x5qW3mSC9MfKz3vUliDmsn3ZjovXQOSwz12eTdw4HhxEN/xwHTK1baqd +XHlxUfvADaXFW9Cbo1U3s34dtu8RYXZH3YHU4pg3XBKCeCV0VEW3vwzs9Q4K +icoLovRrgvPUlzLgfe7iukFdEIf6JB2rf5ZBwrBiv4OFIL4Sz9JUXHsPouRa +P2cfFERn3ucz+ab3IKiI8q9SlSBy1H4Po+fdA+c8lpqDhxB6hXZl+bmWg3j2 +8NmsfGHUxoh0d2YFUDY+SPhdIoyJKzPylyorQLI+KcaLKYxuO9JZVxsqQHZa +5diGBmEcWx01XNNVAYqOIb7VY8I4HhXvVLFYAborlgyGdUXwcsneG9flmbA1 +XGxE56UIcr9ZVMk4xIRta8YGrnSI4NMY1R/TwUxwuVHZu/g/Edzua6XmFM6E +nW893zR+F8GPXHGzS1FM8FK7WeUuKoon+Te16KQz4dCI5sV4X1HM6jZVmalg +QvIOO/P2eVHM91+r9XSaCZL32yS5OMWwN1RAi3OOCeXCO35prxFDxa2Rs7DA +hK52b+ZFqhjGjdFamJwsUHAOl3O2FcON/VY5PkIsqN9SuOrtVTGU8NNJmdFh +wZLNXNtrU3EMS3/QPxLCgoySyNIlG3E0qH3YXxhOXr+KI0XdWRz9rhnk7DzB +AscXfBbnA8Sx0ErZ5lEMC3I30diO6eLoY384zDqdBUbocOXVR3F0c26fz77L +gqOM6z4t8RS0213pzjHIAvsi/lmHNArKDvKnLA6xQI4nKqXtEgWLXFSXZkdZ +8LZzJ6vjNgVVtsw87fvGAo2QtdwDbRT87Fx14+QvFoyVHC/5ISmBVhpqyyv4 +CfAUcZqUYkugQ03BhIsRAbqnquMKaiTQaGusbY8xAXxDymL0Rgn0eRc5vduM +gMoKblDqlcDrV68oulgSIOZQmaG1LIGivLWqYo4EvI1T0LN2kERWv173hDcB +Vt//RAYNS6Kvh11pVxwBJ22zVZ9NSOLOHL0H/WcIKL+u3ic8L4m63/4YfUgk +gLLDl1HJK4VrS09UvD9LwMTjF7+4NaSw65HwnryLBGTFZ4RfPSGFti4KWnFF +BDT3qyhMxEmhAuhxO90gYFGvocM8VQoPMiV3ihcTsO/LnM5IvhS2SgtEF/5D +gLGjx4xGgxS+bHXsTywnYEhUKej5Omn0NTY3Lq0mQDy4VkZcXBovqVHM8QkB +js1urw/SpJGR86753VMCHkamqgnoSuNe+5bw8WcEnPs4Pb7bTRoTvV30fjQR +oHOnev/3G2S7w/ZnHh0E7OdyFbcsk8aHmyyCKjsJyPOYasx+II15RrJ3hbsI +WMVPVzJulsY4tda3T3oI6AtLGkmYJO8XaPF17AMBcabOfpJGMsixIP489wsB +tt4FPwwtZTA0Sj61b4wA/thvZ1wdZTDxUvlWsXGy/4bEkgxfGYx02dEZN0HA +Y/uqb6vOyuBttYJPyjMExBzmiVbIksGzal53bX8QYJO+g98yXwb9Jj5G+P8k +oPPdlFY0SwZ1Px2SzZgjYNpNPuJnrwy2hyQ+fbRAwKPIEB7BERmUWGVR8+gP +AafznuRoTMmg91O35+y/BKwd3FV9kEsWhY5x/ipcImDD/jSOQVVZ9Ftt+a8t +Jxu8j82daz0li4UiHLsHeNigeMVSejyRPN9hzr+Ql03O94V7PBmy2DR05Kzn +ajZELqq8tSyWxR6eQuorPjZcOuMtWtkqi9NScO3kOjZ43iot6eqSxYErCYlS +/GyQa/ptODsoizlyvRcqSTP5stw152RxLjKNd1yADa0XmwpvyVBR8NqhW9JC +bMhii2g3bKDi130hpYWk3d/71Q9qU5HvtVevrDAbxiiLI1I2VGz/PscUFGFD +hbFdBGMbFT323/JMJB3heZlnlzsVt03a6M2R5i7SUs0MoqJidsShFlE2vHwW +XV1xgopx/UKv1cXYkDH80vF1PBXTo554p5OW3RAQzHuFiuaT+8SsxNkwaktw +KF2n4lPdaPOrpMsCly9uKqUiV93b3HHSxuVX75+upeJJm0OzcRQ2WHW3LU01 +U7Fx19yeBtJOHCs2+7RTMXebSDKnBBvcVBgZb/qpyHn7Hz9T0ntdgnphlIpG +rAs/j5IOOnVTjjlFtl+7Z3ab9IninkO031RcHTyMvaRtTtFjYlfSMBnkI7Ql +2fBKoOamER8Nj2TM3XEjva14Z/M0Pw1NjobkRpHuMpqZuC1Mw0WNSNt80h6v +UwX9KDSc/7Rwv4r0oJ+SgYQMDbnjugc7Se+br3N/R6fh766/rd9IfzvnEXNW +iYYrE7ZFLpMOoc7ftNhIw3VLtV8FpNgwx85oXtCkoXCqvrQM6UjbjZMsPRpe +sM8X2kCa48MLwUAGDd+pjrxWJ50Y6msgZ05Dv8lfTtqk+Vb9de+zpKGvYtPl +/5yReykmczMNPxlYlGiQFtXUKrZ3pOGWnTtPK5PObXjZzOVMw5rkX1Qqaapb +wGSVKw13F4ilCZEunlgWPOpOw1qTkgYu0qpxuQYbfWjo8OZq03fy+StE9T2G +99Iw7dJoTi9pvbtvYq4doOHlK6eN6khXmQcWbz9C9nfX/Z+bpKFjRcuaMPL9 +gkI+nyH9fH/hZEMEDVO3PJr3JW23yBCKOkXD7OgNvcak2zI6DfRiaWizWJku +SHqHYrDHRAINQzMOUEbJ+eutXB1bfJaGs83qxx+Q9nYqLvZMp6HA4oqyeNIj +Q+YtIlk0fGkz/siR9NSacKHEPBoqHOtw6ybX09EifkOz6zRsD+r4foX0b707 +HnO3aDh1t9fPlTS390BxQAXZf9xCXyO5PilMW0Obehp2OT4wSyDXd77VsMe/ +jTR0KVjfspG0XG907MNXNOzlSTZ8S9aHOhe7Rek9Ob7NH54JkLbcIePJM0ZD +qWHeOwfJ+msaexRbO0FD3fx1gb/J+nSMdrl1fIaGV3tDxRJI7ypJnvryh4Zf +RlP0MwXZcPj3TGzzOjq+7zp49yxZ78ah+8Q+C9Exw2FIY5bMA97xvlJuCh2j +NZ/LepC+1d/QZS5HR01lQxtZMk8Gnl5Se2BAR49vun0nybwpM+Srbzehoz7F +YbDpvzxint41jXQM9nzpKURa7Mb++I0OdByMzHyaR+bZ1kRGz3UfOk7sjHBM +XkHW97/3jtT603FgclatkpvMtwg57g8H6Xh+i9iFL1xsSDmwRoMSTkdb+ekP +DDIf6xw+nElPoePy9YXX98n81BGK0zzFouNaKsV45TwBHKlzz3Me0vF2psin +5VkC2rgD3R9W09HQ4j3tF5nfh+ZcEmde0PFD/9mQfjLvi3sU+vf30dHutmnk +qUlyvy5sTtrBLYf3S3wTJUcIWNi4fkDdVQ43eVpLfGwjYD5fMk7XXQ7XtLPj +I14TMCugqMDwkcP29v0dfK0ETP1kBFodlEPZS1laqi3k/lm9d949Wg4HGp5z +WzUQ8NLhEX/KLTkUmuLwHn1IQO4hbxiak8O98YpJX68RcOXDgaEvf+Tw8fy/ +L2i5BGRvPZo4uSyHmuu/yLjmEJCum/Lq92p5TAmXl36QTUD8X9YuAVl5ZHOq +n3Y5T75f6soQUxt5fC9mzlhxmgDT0rKiy5flsdm3rNTJi4B+Wmmh9TV5HC32 +/7bNg4DIy3cKZgvl8Xaj49ttu8n9K64kz+WOPM78bzrdzpUcX7eiHP4aeTz2 +5vgK6hYCVFZmZyR9kkdzA64Fd1NyvHxOxUaoKWD3xyseNAkCZoTsfXfWKyBD +aCxWrZUFPYfl3gY2KaDSaEDCoRYW1DX+gZhWBbx567Ty7UbyezCylHq7SwFb +JFJ2Sz5jgdbQ2o8L4wpIVWNkDD1gQRDrjVe+sCI+/pfdx13IgvGtrh4j/op4 +YbjM8nIwC0bSfHeG8Sjh5kbOZi8+Fth9P243arABOXLZyX4MJkzs5T16P0YZ +3azmTLaeLif/R8S5kutV0FDvyUeHkDIQeq2Uzvyuirt7o8x/h94F6ZSKbQYG +aphhyHnigfltyNnIWC+8Xx1VhjrpP7RK4KWkhf7Pixp4QjLqWbB+MRhL12do +dmnieu/Y9arUG8DPfSPcL14LVwZ8/FVgUQSycVTT3Ura2HtmLZvGzIPVip4P +XZq08c35e7lUzaugYSZRcdxLB/PXhDV7KF+GsAGhBnsOXYzgU1Hfr5QF33+m +udrl6OL7wRfcfrkZsFmzMddOXQ/txRcOKBJp8PSnyd9fbXqY0K4U1LM9BYLU +dPreBeijFGXsiURlAphN+XfuXm2AKgx9cV/HOLBWoGxZd8MAM2Kd+Zr4okE5 +9tyJekNDDM3lsKxwPgGqAYxaxT5DFM73Gn49eRQCnh5IuB9qhG7BlRJNYSEw +dWT8uHW4ETJ+BD787B8CJ2QOH+qKMEIR+pDR+l0hcC4q2OX3KSP8LSHVF2sS +AkzjCJppkhFeEG/8070iBBYfnqlpyDXC0EsrLAmdYMisKJhtbzBCl43dhiuz +jkBtUaf/jCgDk+xURErOBcKgI90ngsLAJ+JpmT+OBgLHwpHdfyUZKKnQXb7V +KxAsnXmcVtIYmL+Cdc1EKxAaOY0NJVQZWPe+HXu7DkLrnsLVFuYMxMQ92fIb +DkKfQmB5xj4GHm+NbWF37IfZ28u/NB8xsHxk45NG9wD4vNOm6GwlAysl9Of0 +7QKgZ8V52+FqBoZhchnLMACqfSWvXq5jYDHvaFSbSADEU/SNl1oYaKcsPZj3 +xh/WpwRGvfwfA085XM9O2uwPavvfcwRwGeN3t9XbvHAv7FUsXZ27xRjP1N4/ +m7fDDyJfeAcqbTPG/B+npyut/CAjQOgV4WKMl77brh3R84OaWyfTXu0yxgBp +LktvUT8QUbIVWPIzxhNcbXVfu3yhUWlUxDfCGH9K/Z1w9fQFVWUqTanQGC01 +W8MvDXrDjGqWATFtjD7PaA4DxzygpxWthX8ao3XlPt1yLw+oC5raHj5njOr3 +hD5kWHtAOmEXavDHGNe8v2eVLuoBqsYcZVXcJph2Ml3swEN32GN3hN4gZoJJ +y9x7z//dDZ37N6/tNDXBLyB83THLDR4X//00l2KCGnUvB2TnXcFgU/gv+1QT +dJLQaPtnyBUefJpYW3TeBFcccuLDN65AyA4Y2mea4OjBeCy47QplOXXnC66Z +YOiZr6nrPV2hKC2RsbncBO8M9H1peLEDzoYLXMzpMMG6P77ztOLt4G4ljyay +pvjsRODP/HPOsNTJy99AM8WBxpjn2086Q1HAVL+9vCl2Tyu2Ug44w+ekyuPu +yqZoXf3I+a21M4S1bK04qWOKq764LfzkdIZzTlGyj21MsZbj8jh39Daocnu/ +qBdsiozDIfDjrxNIHUmu1KgzxYZPw+pNzg6QvrxPP7XeFE/745m/hg7AlWnD ++vLcFO/Gr6u2lnWA8Ycr7xS1mKJYrXKm1Dd7qOJIyBHqMEXz8hL6q0R7cM+O +PT4/aoqDGzyWNtbaQU71Sf2na8zQN43CSLGwBVG+w6wtu8yQK+euin+cNRRv +iv7vRxMfXLRS0Ay0Bp3o9E1ZnmZIHC6tXb/dGpymme97/MyQp8E0TVzRGpK6 +5hb2HjZDr6rWfdovreD3jRjLyDgzTD7eWpBIsYI+k6yOklIzHMrZXqTxwhIO +HCvOsys3Q0cf5+Q7TEuYL38QMME0Q+6aLfVGeZYgJNfzS/uhGQ4mfZ/MOmoJ +Drwy0k/qzPBP2yYdE3lLqOks8e94b4YzpYX25kkWYM//WD2ixwxVHslvmQ+z +gJ7NLfOUfjOU+PHpwjMfC5it+pbiPUg+P6s+8yLDAtSva937Om6GNd/uVIpO +IdT0WUSkTZrhZR78GtCPYC+yHTSnyf7jWR3NzQj7ko+9C58zw3VhblcabyLM +1iXliv82Q2Wb51v9LiLE/7myt+qPGSZpnojjj0FYr3dHzWvJDDUq1aTbDiMU +HKmaW142Q2u5EoEid4T/A+5nfb0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07463369303800027}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7652,6 +7073,7 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7679,7 +7101,8 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15475569508294718`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07463369303800027}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7687,11 +7110,13 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913290128289948`*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] + CellChangeTimes->{3.9913290128289948`*^9, 3.994350870963441*^9, + 3.99435397050788*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"189d2b45-6583-43ee-b415-fb692c62b6bf"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7760,576 +7185,795 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003297"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994084950625277*^9},ExpressionUUID->"0f83f761-b16d-5343-987d-\ -511095eaf120"], + 3.994084950625277*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], Cell[BoxData[ - RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"8cdd4baa-f7c9-104e-b978-\ -89d3982ba28f"], - -Cell[CellGroupData[{ - -Cell[BoxData[ - RowBox[{"L", "=", - FractionBox[ - SqrtBox[ - RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918488983507824`*^9},ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-\ -3438788b15d6"], - -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913294794877434`*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] -}, Open ]], - -Cell[CellGroupData[{ - -Cell[BoxData[ - RowBox[{"L", "=", - RowBox[{"Plot", "[", - RowBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], - RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", - RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"], - ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", - FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - FractionBox["1", "Cb"], ")"}]}]], - RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", - RowBox[{"{", - RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488997875195`*^9},ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-\ -0e75880d5d98"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 125, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294796838703`*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 126, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479692892*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 172, 127, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294797011433`*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 172, 128, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479709572*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], - -Cell[BoxData[ - GraphicsBox[ - InterpretationBox[{ - TagBox[{{{}, {}, - TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK - "]]}, - Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, - {"WolframDynamicHighlight", <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], - StyleBox[ - DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, - Slot["HighlightElements"], - Slot["LayoutOptions"], - Slot["Meta"], - Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ Annotation[{ Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], - Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK - "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| "HighlightElements" -> <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, "LayoutOptions" -> <| - "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, - "Frame" -> {{False, False}, {False, False}}, + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> - Plot, "GroupHighlight" -> False|>|>]]& )[<| - "HighlightElements" -> <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, - "LayoutOptions" -> <| - "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, - "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { - Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], - AbsoluteThickness[2]]}, - "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ - Part[#, 1]], - Identity[ - Part[#, 2]]}& ), - "ScalingFunctions" -> {{Identity, Identity}, { - Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, - "Meta" -> <| - "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> - Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { - 4.503599627370496*^15, -4.503599627370496*^15}}], - Selectable->False]}, - Annotation[{{{{}, {}, + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ Annotation[{ Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], - Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK - "]]}, "Charting`Private`Tag#1"]}}, {}}, <| - "HighlightElements" -> <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, - "LayoutOptions" -> <| - "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, - "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { - Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], - AbsoluteThickness[2]]}, - "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ - Part[#, 1]], - Identity[ - Part[#, 2]]}& ), - "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, - "Primitives" -> {}, "GCFlag" -> False|>, - "Meta" -> <| - "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> - Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061275}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435087126889*^9, 3.994353970754397*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"c83d94d0-1179-40b1-8090-e38b74017f34"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8Fd8bB3BLRSqyX+u91xay79f2PIRsKUrJrmhR2ZJKZMlWJKGSbJV8 +K+LeuW2WIspSUiHrL8lSEqJQiq/ffP+a1/t1Zs7MnHOez5mh7wl2CeDi4ODQ +5uTg+O84P9DyXCG12HzHnHC0+9gm884CykmLnngI1S9LnbCUAxR9s4fSkwm3 +TIeP1FvqQMS2u93cPTfgWc1W51uWliA4JZ650E3Aq4XstAhLF/hY4xQ8210P +CXWntw9Y7AEbhfEPM93tMCwQsfoChMFCt+Gl6e4hGEstjPYyiIeGTf8Uv7vx +Ewa1x5qW3mSC9MfKz3vUliDmsn3ZjovXQOSwz12eTdw4HhxEN/xwHTK1baqd +XHlxUfvADaXFW9Cbo1U3s34dtu8RYXZH3YHU4pg3XBKCeCV0VEW3vwzs9Q4K +icoLovRrgvPUlzLgfe7iukFdEIf6JB2rf5ZBwrBiv4OFIL4Sz9JUXHsPouRa +P2cfFERn3ucz+ab3IKiI8q9SlSBy1H4Po+fdA+c8lpqDhxB6hXZl+bmWg3j2 +8NmsfGHUxoh0d2YFUDY+SPhdIoyJKzPylyorQLI+KcaLKYxuO9JZVxsqQHZa +5diGBmEcWx01XNNVAYqOIb7VY8I4HhXvVLFYAborlgyGdUXwcsneG9flmbA1 +XGxE56UIcr9ZVMk4xIRta8YGrnSI4NMY1R/TwUxwuVHZu/g/Edzua6XmFM6E +nW893zR+F8GPXHGzS1FM8FK7WeUuKoon+Te16KQz4dCI5sV4X1HM6jZVmalg +QvIOO/P2eVHM91+r9XSaCZL32yS5OMWwN1RAi3OOCeXCO35prxFDxa2Rs7DA +hK52b+ZFqhjGjdFamJwsUHAOl3O2FcON/VY5PkIsqN9SuOrtVTGU8NNJmdFh +wZLNXNtrU3EMS3/QPxLCgoySyNIlG3E0qH3YXxhOXr+KI0XdWRz9rhnk7DzB +AscXfBbnA8Sx0ErZ5lEMC3I30diO6eLoY384zDqdBUbocOXVR3F0c26fz77L +gqOM6z4t8RS0213pzjHIAvsi/lmHNArKDvKnLA6xQI4nKqXtEgWLXFSXZkdZ +8LZzJ6vjNgVVtsw87fvGAo2QtdwDbRT87Fx14+QvFoyVHC/5ISmBVhpqyyv4 +CfAUcZqUYkugQ03BhIsRAbqnquMKaiTQaGusbY8xAXxDymL0Rgn0eRc5vduM +gMoKblDqlcDrV68oulgSIOZQmaG1LIGivLWqYo4EvI1T0LN2kERWv173hDcB +Vt//RAYNS6Kvh11pVxwBJ22zVZ9NSOLOHL0H/WcIKL+u3ic8L4m63/4YfUgk +gLLDl1HJK4VrS09UvD9LwMTjF7+4NaSw65HwnryLBGTFZ4RfPSGFti4KWnFF +BDT3qyhMxEmhAuhxO90gYFGvocM8VQoPMiV3ihcTsO/LnM5IvhS2SgtEF/5D +gLGjx4xGgxS+bHXsTywnYEhUKej5Omn0NTY3Lq0mQDy4VkZcXBovqVHM8QkB +js1urw/SpJGR86753VMCHkamqgnoSuNe+5bw8WcEnPs4Pb7bTRoTvV30fjQR +oHOnev/3G2S7w/ZnHh0E7OdyFbcsk8aHmyyCKjsJyPOYasx+II15RrJ3hbsI +WMVPVzJulsY4tda3T3oI6AtLGkmYJO8XaPF17AMBcabOfpJGMsixIP489wsB +tt4FPwwtZTA0Sj61b4wA/thvZ1wdZTDxUvlWsXGy/4bEkgxfGYx02dEZN0HA +Y/uqb6vOyuBttYJPyjMExBzmiVbIksGzal53bX8QYJO+g98yXwb9Jj5G+P8k +oPPdlFY0SwZ1Px2SzZgjYNpNPuJnrwy2hyQ+fbRAwKPIEB7BERmUWGVR8+gP +AafznuRoTMmg91O35+y/BKwd3FV9kEsWhY5x/ipcImDD/jSOQVVZ9Ftt+a8t +Jxu8j82daz0li4UiHLsHeNigeMVSejyRPN9hzr+Ql03O94V7PBmy2DR05Kzn +ajZELqq8tSyWxR6eQuorPjZcOuMtWtkqi9NScO3kOjZ43iot6eqSxYErCYlS +/GyQa/ptODsoizlyvRcqSTP5stw152RxLjKNd1yADa0XmwpvyVBR8NqhW9JC +bMhii2g3bKDi130hpYWk3d/71Q9qU5HvtVevrDAbxiiLI1I2VGz/PscUFGFD +hbFdBGMbFT323/JMJB3heZlnlzsVt03a6M2R5i7SUs0MoqJidsShFlE2vHwW +XV1xgopx/UKv1cXYkDH80vF1PBXTo554p5OW3RAQzHuFiuaT+8SsxNkwaktw +KF2n4lPdaPOrpMsCly9uKqUiV93b3HHSxuVX75+upeJJm0OzcRQ2WHW3LU01 +U7Fx19yeBtJOHCs2+7RTMXebSDKnBBvcVBgZb/qpyHn7Hz9T0ntdgnphlIpG +rAs/j5IOOnVTjjlFtl+7Z3ab9IninkO031RcHTyMvaRtTtFjYlfSMBnkI7Ql +2fBKoOamER8Nj2TM3XEjva14Z/M0Pw1NjobkRpHuMpqZuC1Mw0WNSNt80h6v +UwX9KDSc/7Rwv4r0oJ+SgYQMDbnjugc7Se+br3N/R6fh766/rd9IfzvnEXNW +iYYrE7ZFLpMOoc7ftNhIw3VLtV8FpNgwx85oXtCkoXCqvrQM6UjbjZMsPRpe +sM8X2kCa48MLwUAGDd+pjrxWJ50Y6msgZ05Dv8lfTtqk+Vb9de+zpKGvYtPl +/5yReykmczMNPxlYlGiQFtXUKrZ3pOGWnTtPK5PObXjZzOVMw5rkX1Qqaapb +wGSVKw13F4ilCZEunlgWPOpOw1qTkgYu0qpxuQYbfWjo8OZq03fy+StE9T2G +99Iw7dJoTi9pvbtvYq4doOHlK6eN6khXmQcWbz9C9nfX/Z+bpKFjRcuaMPL9 +gkI+nyH9fH/hZEMEDVO3PJr3JW23yBCKOkXD7OgNvcak2zI6DfRiaWizWJku +SHqHYrDHRAINQzMOUEbJ+eutXB1bfJaGs83qxx+Q9nYqLvZMp6HA4oqyeNIj +Q+YtIlk0fGkz/siR9NSacKHEPBoqHOtw6ybX09EifkOz6zRsD+r4foX0b707 +HnO3aDh1t9fPlTS390BxQAXZf9xCXyO5PilMW0Obehp2OT4wSyDXd77VsMe/ +jTR0KVjfspG0XG907MNXNOzlSTZ8S9aHOhe7Rek9Ob7NH54JkLbcIePJM0ZD +qWHeOwfJ+msaexRbO0FD3fx1gb/J+nSMdrl1fIaGV3tDxRJI7ypJnvryh4Zf +RlP0MwXZcPj3TGzzOjq+7zp49yxZ78ah+8Q+C9Exw2FIY5bMA97xvlJuCh2j +NZ/LepC+1d/QZS5HR01lQxtZMk8Gnl5Se2BAR49vun0nybwpM+Srbzehoz7F +YbDpvzxint41jXQM9nzpKURa7Mb++I0OdByMzHyaR+bZ1kRGz3UfOk7sjHBM +XkHW97/3jtT603FgclatkpvMtwg57g8H6Xh+i9iFL1xsSDmwRoMSTkdb+ekP +DDIf6xw+nElPoePy9YXX98n81BGK0zzFouNaKsV45TwBHKlzz3Me0vF2psin +5VkC2rgD3R9W09HQ4j3tF5nfh+ZcEmde0PFD/9mQfjLvi3sU+vf30dHutmnk +qUlyvy5sTtrBLYf3S3wTJUcIWNi4fkDdVQ43eVpLfGwjYD5fMk7XXQ7XtLPj +I14TMCugqMDwkcP29v0dfK0ETP1kBFodlEPZS1laqi3k/lm9d949Wg4HGp5z +WzUQ8NLhEX/KLTkUmuLwHn1IQO4hbxiak8O98YpJX68RcOXDgaEvf+Tw8fy/ +L2i5BGRvPZo4uSyHmuu/yLjmEJCum/Lq92p5TAmXl36QTUD8X9YuAVl5ZHOq +n3Y5T75f6soQUxt5fC9mzlhxmgDT0rKiy5flsdm3rNTJi4B+Wmmh9TV5HC32 +/7bNg4DIy3cKZgvl8Xaj49ttu8n9K64kz+WOPM78bzrdzpUcX7eiHP4aeTz2 +5vgK6hYCVFZmZyR9kkdzA64Fd1NyvHxOxUaoKWD3xyseNAkCZoTsfXfWKyBD +aCxWrZUFPYfl3gY2KaDSaEDCoRYW1DX+gZhWBbx567Ty7UbyezCylHq7SwFb +JFJ2Sz5jgdbQ2o8L4wpIVWNkDD1gQRDrjVe+sCI+/pfdx13IgvGtrh4j/op4 +YbjM8nIwC0bSfHeG8Sjh5kbOZi8+Fth9P243arABOXLZyX4MJkzs5T16P0YZ +3azmTLaeLif/R8S5kutV0FDvyUeHkDIQeq2Uzvyuirt7o8x/h94F6ZSKbQYG +aphhyHnigfltyNnIWC+8Xx1VhjrpP7RK4KWkhf7Pixp4QjLqWbB+MRhL12do +dmnieu/Y9arUG8DPfSPcL14LVwZ8/FVgUQSycVTT3Ura2HtmLZvGzIPVip4P +XZq08c35e7lUzaugYSZRcdxLB/PXhDV7KF+GsAGhBnsOXYzgU1Hfr5QF33+m +udrl6OL7wRfcfrkZsFmzMddOXQ/txRcOKBJp8PSnyd9fbXqY0K4U1LM9BYLU +dPreBeijFGXsiURlAphN+XfuXm2AKgx9cV/HOLBWoGxZd8MAM2Kd+Zr4okE5 +9tyJekNDDM3lsKxwPgGqAYxaxT5DFM73Gn49eRQCnh5IuB9qhG7BlRJNYSEw +dWT8uHW4ETJ+BD787B8CJ2QOH+qKMEIR+pDR+l0hcC4q2OX3KSP8LSHVF2sS +AkzjCJppkhFeEG/8070iBBYfnqlpyDXC0EsrLAmdYMisKJhtbzBCl43dhiuz +jkBtUaf/jCgDk+xURErOBcKgI90ngsLAJ+JpmT+OBgLHwpHdfyUZKKnQXb7V +KxAsnXmcVtIYmL+Cdc1EKxAaOY0NJVQZWPe+HXu7DkLrnsLVFuYMxMQ92fIb +DkKfQmB5xj4GHm+NbWF37IfZ28u/NB8xsHxk45NG9wD4vNOm6GwlAysl9Of0 +7QKgZ8V52+FqBoZhchnLMACqfSWvXq5jYDHvaFSbSADEU/SNl1oYaKcsPZj3 +xh/WpwRGvfwfA085XM9O2uwPavvfcwRwGeN3t9XbvHAv7FUsXZ27xRjP1N4/ +m7fDDyJfeAcqbTPG/B+npyut/CAjQOgV4WKMl77brh3R84OaWyfTXu0yxgBp +LktvUT8QUbIVWPIzxhNcbXVfu3yhUWlUxDfCGH9K/Z1w9fQFVWUqTanQGC01 +W8MvDXrDjGqWATFtjD7PaA4DxzygpxWthX8ao3XlPt1yLw+oC5raHj5njOr3 +hD5kWHtAOmEXavDHGNe8v2eVLuoBqsYcZVXcJph2Ml3swEN32GN3hN4gZoJJ +y9x7z//dDZ37N6/tNDXBLyB83THLDR4X//00l2KCGnUvB2TnXcFgU/gv+1QT +dJLQaPtnyBUefJpYW3TeBFcccuLDN65AyA4Y2mea4OjBeCy47QplOXXnC66Z +YOiZr6nrPV2hKC2RsbncBO8M9H1peLEDzoYLXMzpMMG6P77ztOLt4G4ljyay +pvjsRODP/HPOsNTJy99AM8WBxpjn2086Q1HAVL+9vCl2Tyu2Ug44w+ekyuPu +yqZoXf3I+a21M4S1bK04qWOKq764LfzkdIZzTlGyj21MsZbj8jh39Daocnu/ +qBdsiozDIfDjrxNIHUmu1KgzxYZPw+pNzg6QvrxPP7XeFE/745m/hg7AlWnD ++vLcFO/Gr6u2lnWA8Ycr7xS1mKJYrXKm1Dd7qOJIyBHqMEXz8hL6q0R7cM+O +PT4/aoqDGzyWNtbaQU71Sf2na8zQN43CSLGwBVG+w6wtu8yQK+euin+cNRRv +iv7vRxMfXLRS0Ay0Bp3o9E1ZnmZIHC6tXb/dGpymme97/MyQp8E0TVzRGpK6 +5hb2HjZDr6rWfdovreD3jRjLyDgzTD7eWpBIsYI+k6yOklIzHMrZXqTxwhIO +HCvOsys3Q0cf5+Q7TEuYL38QMME0Q+6aLfVGeZYgJNfzS/uhGQ4mfZ/MOmoJ +Drwy0k/qzPBP2yYdE3lLqOks8e94b4YzpYX25kkWYM//WD2ixwxVHslvmQ+z +gJ7NLfOUfjOU+PHpwjMfC5it+pbiPUg+P6s+8yLDAtSva937Om6GNd/uVIpO +IdT0WUSkTZrhZR78GtCPYC+yHTSnyf7jWR3NzQj7ko+9C58zw3VhblcabyLM +1iXliv82Q2Wb51v9LiLE/7myt+qPGSZpnojjj0FYr3dHzWvJDDUq1aTbDiMU +HKmaW142Q2u5EoEid4T/A+5nfb0= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8Fd8bB3BLRSqyX+u91xay79f2PIRsKUrJrmhR2ZJKZMlWJKGSbJV8 +K+LeuW2WIspSUiHrL8lSEqJQiq/ffP+a1/t1Zs7MnHOez5mh7wl2CeDi4ODQ +5uTg+O84P9DyXCG12HzHnHC0+9gm884CykmLnngI1S9LnbCUAxR9s4fSkwm3 +TIeP1FvqQMS2u93cPTfgWc1W51uWliA4JZ650E3Aq4XstAhLF/hY4xQ8210P +CXWntw9Y7AEbhfEPM93tMCwQsfoChMFCt+Gl6e4hGEstjPYyiIeGTf8Uv7vx +Ewa1x5qW3mSC9MfKz3vUliDmsn3ZjovXQOSwz12eTdw4HhxEN/xwHTK1baqd +XHlxUfvADaXFW9Cbo1U3s34dtu8RYXZH3YHU4pg3XBKCeCV0VEW3vwzs9Q4K +icoLovRrgvPUlzLgfe7iukFdEIf6JB2rf5ZBwrBiv4OFIL4Sz9JUXHsPouRa +P2cfFERn3ucz+ab3IKiI8q9SlSBy1H4Po+fdA+c8lpqDhxB6hXZl+bmWg3j2 +8NmsfGHUxoh0d2YFUDY+SPhdIoyJKzPylyorQLI+KcaLKYxuO9JZVxsqQHZa +5diGBmEcWx01XNNVAYqOIb7VY8I4HhXvVLFYAborlgyGdUXwcsneG9flmbA1 +XGxE56UIcr9ZVMk4xIRta8YGrnSI4NMY1R/TwUxwuVHZu/g/Edzua6XmFM6E +nW893zR+F8GPXHGzS1FM8FK7WeUuKoon+Te16KQz4dCI5sV4X1HM6jZVmalg +QvIOO/P2eVHM91+r9XSaCZL32yS5OMWwN1RAi3OOCeXCO35prxFDxa2Rs7DA +hK52b+ZFqhjGjdFamJwsUHAOl3O2FcON/VY5PkIsqN9SuOrtVTGU8NNJmdFh +wZLNXNtrU3EMS3/QPxLCgoySyNIlG3E0qH3YXxhOXr+KI0XdWRz9rhnk7DzB +AscXfBbnA8Sx0ErZ5lEMC3I30diO6eLoY384zDqdBUbocOXVR3F0c26fz77L +gqOM6z4t8RS0213pzjHIAvsi/lmHNArKDvKnLA6xQI4nKqXtEgWLXFSXZkdZ +8LZzJ6vjNgVVtsw87fvGAo2QtdwDbRT87Fx14+QvFoyVHC/5ISmBVhpqyyv4 +CfAUcZqUYkugQ03BhIsRAbqnquMKaiTQaGusbY8xAXxDymL0Rgn0eRc5vduM +gMoKblDqlcDrV68oulgSIOZQmaG1LIGivLWqYo4EvI1T0LN2kERWv173hDcB +Vt//RAYNS6Kvh11pVxwBJ22zVZ9NSOLOHL0H/WcIKL+u3ic8L4m63/4YfUgk +gLLDl1HJK4VrS09UvD9LwMTjF7+4NaSw65HwnryLBGTFZ4RfPSGFti4KWnFF +BDT3qyhMxEmhAuhxO90gYFGvocM8VQoPMiV3ihcTsO/LnM5IvhS2SgtEF/5D +gLGjx4xGgxS+bHXsTywnYEhUKej5Omn0NTY3Lq0mQDy4VkZcXBovqVHM8QkB +js1urw/SpJGR86753VMCHkamqgnoSuNe+5bw8WcEnPs4Pb7bTRoTvV30fjQR +oHOnev/3G2S7w/ZnHh0E7OdyFbcsk8aHmyyCKjsJyPOYasx+II15RrJ3hbsI +WMVPVzJulsY4tda3T3oI6AtLGkmYJO8XaPF17AMBcabOfpJGMsixIP489wsB +tt4FPwwtZTA0Sj61b4wA/thvZ1wdZTDxUvlWsXGy/4bEkgxfGYx02dEZN0HA +Y/uqb6vOyuBttYJPyjMExBzmiVbIksGzal53bX8QYJO+g98yXwb9Jj5G+P8k +oPPdlFY0SwZ1Px2SzZgjYNpNPuJnrwy2hyQ+fbRAwKPIEB7BERmUWGVR8+gP +AafznuRoTMmg91O35+y/BKwd3FV9kEsWhY5x/ipcImDD/jSOQVVZ9Ftt+a8t +Jxu8j82daz0li4UiHLsHeNigeMVSejyRPN9hzr+Ql03O94V7PBmy2DR05Kzn +ajZELqq8tSyWxR6eQuorPjZcOuMtWtkqi9NScO3kOjZ43iot6eqSxYErCYlS +/GyQa/ptODsoizlyvRcqSTP5stw152RxLjKNd1yADa0XmwpvyVBR8NqhW9JC +bMhii2g3bKDi130hpYWk3d/71Q9qU5HvtVevrDAbxiiLI1I2VGz/PscUFGFD +hbFdBGMbFT323/JMJB3heZlnlzsVt03a6M2R5i7SUs0MoqJidsShFlE2vHwW +XV1xgopx/UKv1cXYkDH80vF1PBXTo554p5OW3RAQzHuFiuaT+8SsxNkwaktw +KF2n4lPdaPOrpMsCly9uKqUiV93b3HHSxuVX75+upeJJm0OzcRQ2WHW3LU01 +U7Fx19yeBtJOHCs2+7RTMXebSDKnBBvcVBgZb/qpyHn7Hz9T0ntdgnphlIpG +rAs/j5IOOnVTjjlFtl+7Z3ab9IninkO031RcHTyMvaRtTtFjYlfSMBnkI7Ql +2fBKoOamER8Nj2TM3XEjva14Z/M0Pw1NjobkRpHuMpqZuC1Mw0WNSNt80h6v +UwX9KDSc/7Rwv4r0oJ+SgYQMDbnjugc7Se+br3N/R6fh766/rd9IfzvnEXNW +iYYrE7ZFLpMOoc7ftNhIw3VLtV8FpNgwx85oXtCkoXCqvrQM6UjbjZMsPRpe +sM8X2kCa48MLwUAGDd+pjrxWJ50Y6msgZ05Dv8lfTtqk+Vb9de+zpKGvYtPl +/5yReykmczMNPxlYlGiQFtXUKrZ3pOGWnTtPK5PObXjZzOVMw5rkX1Qqaapb +wGSVKw13F4ilCZEunlgWPOpOw1qTkgYu0qpxuQYbfWjo8OZq03fy+StE9T2G +99Iw7dJoTi9pvbtvYq4doOHlK6eN6khXmQcWbz9C9nfX/Z+bpKFjRcuaMPL9 +gkI+nyH9fH/hZEMEDVO3PJr3JW23yBCKOkXD7OgNvcak2zI6DfRiaWizWJku +SHqHYrDHRAINQzMOUEbJ+eutXB1bfJaGs83qxx+Q9nYqLvZMp6HA4oqyeNIj +Q+YtIlk0fGkz/siR9NSacKHEPBoqHOtw6ybX09EifkOz6zRsD+r4foX0b707 +HnO3aDh1t9fPlTS390BxQAXZf9xCXyO5PilMW0Obehp2OT4wSyDXd77VsMe/ +jTR0KVjfspG0XG907MNXNOzlSTZ8S9aHOhe7Rek9Ob7NH54JkLbcIePJM0ZD +qWHeOwfJ+msaexRbO0FD3fx1gb/J+nSMdrl1fIaGV3tDxRJI7ypJnvryh4Zf +RlP0MwXZcPj3TGzzOjq+7zp49yxZ78ah+8Q+C9Exw2FIY5bMA97xvlJuCh2j +NZ/LepC+1d/QZS5HR01lQxtZMk8Gnl5Se2BAR49vun0nybwpM+Srbzehoz7F +YbDpvzxint41jXQM9nzpKURa7Mb++I0OdByMzHyaR+bZ1kRGz3UfOk7sjHBM +XkHW97/3jtT603FgclatkpvMtwg57g8H6Xh+i9iFL1xsSDmwRoMSTkdb+ekP +DDIf6xw+nElPoePy9YXX98n81BGK0zzFouNaKsV45TwBHKlzz3Me0vF2psin +5VkC2rgD3R9W09HQ4j3tF5nfh+ZcEmde0PFD/9mQfjLvi3sU+vf30dHutmnk +qUlyvy5sTtrBLYf3S3wTJUcIWNi4fkDdVQ43eVpLfGwjYD5fMk7XXQ7XtLPj +I14TMCugqMDwkcP29v0dfK0ETP1kBFodlEPZS1laqi3k/lm9d949Wg4HGp5z +WzUQ8NLhEX/KLTkUmuLwHn1IQO4hbxiak8O98YpJX68RcOXDgaEvf+Tw8fy/ +L2i5BGRvPZo4uSyHmuu/yLjmEJCum/Lq92p5TAmXl36QTUD8X9YuAVl5ZHOq +n3Y5T75f6soQUxt5fC9mzlhxmgDT0rKiy5flsdm3rNTJi4B+Wmmh9TV5HC32 +/7bNg4DIy3cKZgvl8Xaj49ttu8n9K64kz+WOPM78bzrdzpUcX7eiHP4aeTz2 +5vgK6hYCVFZmZyR9kkdzA64Fd1NyvHxOxUaoKWD3xyseNAkCZoTsfXfWKyBD +aCxWrZUFPYfl3gY2KaDSaEDCoRYW1DX+gZhWBbx567Ty7UbyezCylHq7SwFb +JFJ2Sz5jgdbQ2o8L4wpIVWNkDD1gQRDrjVe+sCI+/pfdx13IgvGtrh4j/op4 +YbjM8nIwC0bSfHeG8Sjh5kbOZi8+Fth9P243arABOXLZyX4MJkzs5T16P0YZ +3azmTLaeLif/R8S5kutV0FDvyUeHkDIQeq2Uzvyuirt7o8x/h94F6ZSKbQYG +aphhyHnigfltyNnIWC+8Xx1VhjrpP7RK4KWkhf7Pixp4QjLqWbB+MRhL12do +dmnieu/Y9arUG8DPfSPcL14LVwZ8/FVgUQSycVTT3Ura2HtmLZvGzIPVip4P +XZq08c35e7lUzaugYSZRcdxLB/PXhDV7KF+GsAGhBnsOXYzgU1Hfr5QF33+m +udrl6OL7wRfcfrkZsFmzMddOXQ/txRcOKBJp8PSnyd9fbXqY0K4U1LM9BYLU +dPreBeijFGXsiURlAphN+XfuXm2AKgx9cV/HOLBWoGxZd8MAM2Kd+Zr4okE5 +9tyJekNDDM3lsKxwPgGqAYxaxT5DFM73Gn49eRQCnh5IuB9qhG7BlRJNYSEw +dWT8uHW4ETJ+BD787B8CJ2QOH+qKMEIR+pDR+l0hcC4q2OX3KSP8LSHVF2sS +AkzjCJppkhFeEG/8070iBBYfnqlpyDXC0EsrLAmdYMisKJhtbzBCl43dhiuz +jkBtUaf/jCgDk+xURErOBcKgI90ngsLAJ+JpmT+OBgLHwpHdfyUZKKnQXb7V +KxAsnXmcVtIYmL+Cdc1EKxAaOY0NJVQZWPe+HXu7DkLrnsLVFuYMxMQ92fIb +DkKfQmB5xj4GHm+NbWF37IfZ28u/NB8xsHxk45NG9wD4vNOm6GwlAysl9Of0 +7QKgZ8V52+FqBoZhchnLMACqfSWvXq5jYDHvaFSbSADEU/SNl1oYaKcsPZj3 +xh/WpwRGvfwfA085XM9O2uwPavvfcwRwGeN3t9XbvHAv7FUsXZ27xRjP1N4/ +m7fDDyJfeAcqbTPG/B+npyut/CAjQOgV4WKMl77brh3R84OaWyfTXu0yxgBp +LktvUT8QUbIVWPIzxhNcbXVfu3yhUWlUxDfCGH9K/Z1w9fQFVWUqTanQGC01 +W8MvDXrDjGqWATFtjD7PaA4DxzygpxWthX8ao3XlPt1yLw+oC5raHj5njOr3 +hD5kWHtAOmEXavDHGNe8v2eVLuoBqsYcZVXcJph2Ml3swEN32GN3hN4gZoJJ +y9x7z//dDZ37N6/tNDXBLyB83THLDR4X//00l2KCGnUvB2TnXcFgU/gv+1QT +dJLQaPtnyBUefJpYW3TeBFcccuLDN65AyA4Y2mea4OjBeCy47QplOXXnC66Z +YOiZr6nrPV2hKC2RsbncBO8M9H1peLEDzoYLXMzpMMG6P77ztOLt4G4ljyay +pvjsRODP/HPOsNTJy99AM8WBxpjn2086Q1HAVL+9vCl2Tyu2Ug44w+ekyuPu +yqZoXf3I+a21M4S1bK04qWOKq764LfzkdIZzTlGyj21MsZbj8jh39Daocnu/ +qBdsiozDIfDjrxNIHUmu1KgzxYZPw+pNzg6QvrxPP7XeFE/745m/hg7AlWnD ++vLcFO/Gr6u2lnWA8Ycr7xS1mKJYrXKm1Dd7qOJIyBHqMEXz8hL6q0R7cM+O +PT4/aoqDGzyWNtbaQU71Sf2na8zQN43CSLGwBVG+w6wtu8yQK+euin+cNRRv +iv7vRxMfXLRS0Ay0Bp3o9E1ZnmZIHC6tXb/dGpymme97/MyQp8E0TVzRGpK6 +5hb2HjZDr6rWfdovreD3jRjLyDgzTD7eWpBIsYI+k6yOklIzHMrZXqTxwhIO +HCvOsys3Q0cf5+Q7TEuYL38QMME0Q+6aLfVGeZYgJNfzS/uhGQ4mfZ/MOmoJ +Drwy0k/qzPBP2yYdE3lLqOks8e94b4YzpYX25kkWYM//WD2ixwxVHslvmQ+z +gJ7NLfOUfjOU+PHpwjMfC5it+pbiPUg+P6s+8yLDAtSva937Om6GNd/uVIpO +IdT0WUSkTZrhZR78GtCPYC+yHTSnyf7jWR3NzQj7ko+9C58zw3VhblcabyLM +1iXliv82Q2Wb51v9LiLE/7myt+qPGSZpnojjj0FYr3dHzWvJDDUq1aTbDiMU +HKmaW142Q2u5EoEid4T/A+5nfb0= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07463369303800027}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07463369303800027}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8Fd8bB3BLRSqyX+u91xay79f2PIRsKUrJrmhR2ZJKZMlWJKGSbJV8 +K+LeuW2WIspSUiHrL8lSEqJQiq/ffP+a1/t1Zs7MnHOez5mh7wl2CeDi4ODQ +5uTg+O84P9DyXCG12HzHnHC0+9gm884CykmLnngI1S9LnbCUAxR9s4fSkwm3 +TIeP1FvqQMS2u93cPTfgWc1W51uWliA4JZ650E3Aq4XstAhLF/hY4xQ8210P +CXWntw9Y7AEbhfEPM93tMCwQsfoChMFCt+Gl6e4hGEstjPYyiIeGTf8Uv7vx +Ewa1x5qW3mSC9MfKz3vUliDmsn3ZjovXQOSwz12eTdw4HhxEN/xwHTK1baqd +XHlxUfvADaXFW9Cbo1U3s34dtu8RYXZH3YHU4pg3XBKCeCV0VEW3vwzs9Q4K +icoLovRrgvPUlzLgfe7iukFdEIf6JB2rf5ZBwrBiv4OFIL4Sz9JUXHsPouRa +P2cfFERn3ucz+ab3IKiI8q9SlSBy1H4Po+fdA+c8lpqDhxB6hXZl+bmWg3j2 +8NmsfGHUxoh0d2YFUDY+SPhdIoyJKzPylyorQLI+KcaLKYxuO9JZVxsqQHZa +5diGBmEcWx01XNNVAYqOIb7VY8I4HhXvVLFYAborlgyGdUXwcsneG9flmbA1 +XGxE56UIcr9ZVMk4xIRta8YGrnSI4NMY1R/TwUxwuVHZu/g/Edzua6XmFM6E +nW893zR+F8GPXHGzS1FM8FK7WeUuKoon+Te16KQz4dCI5sV4X1HM6jZVmalg +QvIOO/P2eVHM91+r9XSaCZL32yS5OMWwN1RAi3OOCeXCO35prxFDxa2Rs7DA +hK52b+ZFqhjGjdFamJwsUHAOl3O2FcON/VY5PkIsqN9SuOrtVTGU8NNJmdFh +wZLNXNtrU3EMS3/QPxLCgoySyNIlG3E0qH3YXxhOXr+KI0XdWRz9rhnk7DzB +AscXfBbnA8Sx0ErZ5lEMC3I30diO6eLoY384zDqdBUbocOXVR3F0c26fz77L +gqOM6z4t8RS0213pzjHIAvsi/lmHNArKDvKnLA6xQI4nKqXtEgWLXFSXZkdZ +8LZzJ6vjNgVVtsw87fvGAo2QtdwDbRT87Fx14+QvFoyVHC/5ISmBVhpqyyv4 +CfAUcZqUYkugQ03BhIsRAbqnquMKaiTQaGusbY8xAXxDymL0Rgn0eRc5vduM +gMoKblDqlcDrV68oulgSIOZQmaG1LIGivLWqYo4EvI1T0LN2kERWv173hDcB +Vt//RAYNS6Kvh11pVxwBJ22zVZ9NSOLOHL0H/WcIKL+u3ic8L4m63/4YfUgk +gLLDl1HJK4VrS09UvD9LwMTjF7+4NaSw65HwnryLBGTFZ4RfPSGFti4KWnFF +BDT3qyhMxEmhAuhxO90gYFGvocM8VQoPMiV3ihcTsO/LnM5IvhS2SgtEF/5D +gLGjx4xGgxS+bHXsTywnYEhUKej5Omn0NTY3Lq0mQDy4VkZcXBovqVHM8QkB +js1urw/SpJGR86753VMCHkamqgnoSuNe+5bw8WcEnPs4Pb7bTRoTvV30fjQR +oHOnev/3G2S7w/ZnHh0E7OdyFbcsk8aHmyyCKjsJyPOYasx+II15RrJ3hbsI +WMVPVzJulsY4tda3T3oI6AtLGkmYJO8XaPF17AMBcabOfpJGMsixIP489wsB +tt4FPwwtZTA0Sj61b4wA/thvZ1wdZTDxUvlWsXGy/4bEkgxfGYx02dEZN0HA +Y/uqb6vOyuBttYJPyjMExBzmiVbIksGzal53bX8QYJO+g98yXwb9Jj5G+P8k +oPPdlFY0SwZ1Px2SzZgjYNpNPuJnrwy2hyQ+fbRAwKPIEB7BERmUWGVR8+gP +AafznuRoTMmg91O35+y/BKwd3FV9kEsWhY5x/ipcImDD/jSOQVVZ9Ftt+a8t +Jxu8j82daz0li4UiHLsHeNigeMVSejyRPN9hzr+Ql03O94V7PBmy2DR05Kzn +ajZELqq8tSyWxR6eQuorPjZcOuMtWtkqi9NScO3kOjZ43iot6eqSxYErCYlS +/GyQa/ptODsoizlyvRcqSTP5stw152RxLjKNd1yADa0XmwpvyVBR8NqhW9JC +bMhii2g3bKDi130hpYWk3d/71Q9qU5HvtVevrDAbxiiLI1I2VGz/PscUFGFD +hbFdBGMbFT323/JMJB3heZlnlzsVt03a6M2R5i7SUs0MoqJidsShFlE2vHwW +XV1xgopx/UKv1cXYkDH80vF1PBXTo554p5OW3RAQzHuFiuaT+8SsxNkwaktw +KF2n4lPdaPOrpMsCly9uKqUiV93b3HHSxuVX75+upeJJm0OzcRQ2WHW3LU01 +U7Fx19yeBtJOHCs2+7RTMXebSDKnBBvcVBgZb/qpyHn7Hz9T0ntdgnphlIpG +rAs/j5IOOnVTjjlFtl+7Z3ab9IninkO031RcHTyMvaRtTtFjYlfSMBnkI7Ql +2fBKoOamER8Nj2TM3XEjva14Z/M0Pw1NjobkRpHuMpqZuC1Mw0WNSNt80h6v +UwX9KDSc/7Rwv4r0oJ+SgYQMDbnjugc7Se+br3N/R6fh766/rd9IfzvnEXNW +iYYrE7ZFLpMOoc7ftNhIw3VLtV8FpNgwx85oXtCkoXCqvrQM6UjbjZMsPRpe +sM8X2kCa48MLwUAGDd+pjrxWJ50Y6msgZ05Dv8lfTtqk+Vb9de+zpKGvYtPl +/5yReykmczMNPxlYlGiQFtXUKrZ3pOGWnTtPK5PObXjZzOVMw5rkX1Qqaapb +wGSVKw13F4ilCZEunlgWPOpOw1qTkgYu0qpxuQYbfWjo8OZq03fy+StE9T2G +99Iw7dJoTi9pvbtvYq4doOHlK6eN6khXmQcWbz9C9nfX/Z+bpKFjRcuaMPL9 +gkI+nyH9fH/hZEMEDVO3PJr3JW23yBCKOkXD7OgNvcak2zI6DfRiaWizWJku +SHqHYrDHRAINQzMOUEbJ+eutXB1bfJaGs83qxx+Q9nYqLvZMp6HA4oqyeNIj +Q+YtIlk0fGkz/siR9NSacKHEPBoqHOtw6ybX09EifkOz6zRsD+r4foX0b707 +HnO3aDh1t9fPlTS390BxQAXZf9xCXyO5PilMW0Obehp2OT4wSyDXd77VsMe/ +jTR0KVjfspG0XG907MNXNOzlSTZ8S9aHOhe7Rek9Ob7NH54JkLbcIePJM0ZD +qWHeOwfJ+msaexRbO0FD3fx1gb/J+nSMdrl1fIaGV3tDxRJI7ypJnvryh4Zf +RlP0MwXZcPj3TGzzOjq+7zp49yxZ78ah+8Q+C9Exw2FIY5bMA97xvlJuCh2j +NZ/LepC+1d/QZS5HR01lQxtZMk8Gnl5Se2BAR49vun0nybwpM+Srbzehoz7F +YbDpvzxint41jXQM9nzpKURa7Mb++I0OdByMzHyaR+bZ1kRGz3UfOk7sjHBM +XkHW97/3jtT603FgclatkpvMtwg57g8H6Xh+i9iFL1xsSDmwRoMSTkdb+ekP +DDIf6xw+nElPoePy9YXX98n81BGK0zzFouNaKsV45TwBHKlzz3Me0vF2psin +5VkC2rgD3R9W09HQ4j3tF5nfh+ZcEmde0PFD/9mQfjLvi3sU+vf30dHutmnk +qUlyvy5sTtrBLYf3S3wTJUcIWNi4fkDdVQ43eVpLfGwjYD5fMk7XXQ7XtLPj +I14TMCugqMDwkcP29v0dfK0ETP1kBFodlEPZS1laqi3k/lm9d949Wg4HGp5z +WzUQ8NLhEX/KLTkUmuLwHn1IQO4hbxiak8O98YpJX68RcOXDgaEvf+Tw8fy/ +L2i5BGRvPZo4uSyHmuu/yLjmEJCum/Lq92p5TAmXl36QTUD8X9YuAVl5ZHOq +n3Y5T75f6soQUxt5fC9mzlhxmgDT0rKiy5flsdm3rNTJi4B+Wmmh9TV5HC32 +/7bNg4DIy3cKZgvl8Xaj49ttu8n9K64kz+WOPM78bzrdzpUcX7eiHP4aeTz2 +5vgK6hYCVFZmZyR9kkdzA64Fd1NyvHxOxUaoKWD3xyseNAkCZoTsfXfWKyBD +aCxWrZUFPYfl3gY2KaDSaEDCoRYW1DX+gZhWBbx567Ty7UbyezCylHq7SwFb +JFJ2Sz5jgdbQ2o8L4wpIVWNkDD1gQRDrjVe+sCI+/pfdx13IgvGtrh4j/op4 +YbjM8nIwC0bSfHeG8Sjh5kbOZi8+Fth9P243arABOXLZyX4MJkzs5T16P0YZ +3azmTLaeLif/R8S5kutV0FDvyUeHkDIQeq2Uzvyuirt7o8x/h94F6ZSKbQYG +aphhyHnigfltyNnIWC+8Xx1VhjrpP7RK4KWkhf7Pixp4QjLqWbB+MRhL12do +dmnieu/Y9arUG8DPfSPcL14LVwZ8/FVgUQSycVTT3Ura2HtmLZvGzIPVip4P +XZq08c35e7lUzaugYSZRcdxLB/PXhDV7KF+GsAGhBnsOXYzgU1Hfr5QF33+m +udrl6OL7wRfcfrkZsFmzMddOXQ/txRcOKBJp8PSnyd9fbXqY0K4U1LM9BYLU +dPreBeijFGXsiURlAphN+XfuXm2AKgx9cV/HOLBWoGxZd8MAM2Kd+Zr4okE5 +9tyJekNDDM3lsKxwPgGqAYxaxT5DFM73Gn49eRQCnh5IuB9qhG7BlRJNYSEw +dWT8uHW4ETJ+BD787B8CJ2QOH+qKMEIR+pDR+l0hcC4q2OX3KSP8LSHVF2sS +AkzjCJppkhFeEG/8070iBBYfnqlpyDXC0EsrLAmdYMisKJhtbzBCl43dhiuz +jkBtUaf/jCgDk+xURErOBcKgI90ngsLAJ+JpmT+OBgLHwpHdfyUZKKnQXb7V +KxAsnXmcVtIYmL+Cdc1EKxAaOY0NJVQZWPe+HXu7DkLrnsLVFuYMxMQ92fIb +DkKfQmB5xj4GHm+NbWF37IfZ28u/NB8xsHxk45NG9wD4vNOm6GwlAysl9Of0 +7QKgZ8V52+FqBoZhchnLMACqfSWvXq5jYDHvaFSbSADEU/SNl1oYaKcsPZj3 +xh/WpwRGvfwfA085XM9O2uwPavvfcwRwGeN3t9XbvHAv7FUsXZ27xRjP1N4/ +m7fDDyJfeAcqbTPG/B+npyut/CAjQOgV4WKMl77brh3R84OaWyfTXu0yxgBp +LktvUT8QUbIVWPIzxhNcbXVfu3yhUWlUxDfCGH9K/Z1w9fQFVWUqTanQGC01 +W8MvDXrDjGqWATFtjD7PaA4DxzygpxWthX8ao3XlPt1yLw+oC5raHj5njOr3 +hD5kWHtAOmEXavDHGNe8v2eVLuoBqsYcZVXcJph2Ml3swEN32GN3hN4gZoJJ +y9x7z//dDZ37N6/tNDXBLyB83THLDR4X//00l2KCGnUvB2TnXcFgU/gv+1QT +dJLQaPtnyBUefJpYW3TeBFcccuLDN65AyA4Y2mea4OjBeCy47QplOXXnC66Z +YOiZr6nrPV2hKC2RsbncBO8M9H1peLEDzoYLXMzpMMG6P77ztOLt4G4ljyay +pvjsRODP/HPOsNTJy99AM8WBxpjn2086Q1HAVL+9vCl2Tyu2Ug44w+ekyuPu +yqZoXf3I+a21M4S1bK04qWOKq764LfzkdIZzTlGyj21MsZbj8jh39Daocnu/ +qBdsiozDIfDjrxNIHUmu1KgzxYZPw+pNzg6QvrxPP7XeFE/745m/hg7AlWnD ++vLcFO/Gr6u2lnWA8Ycr7xS1mKJYrXKm1Dd7qOJIyBHqMEXz8hL6q0R7cM+O +PT4/aoqDGzyWNtbaQU71Sf2na8zQN43CSLGwBVG+w6wtu8yQK+euin+cNRRv +iv7vRxMfXLRS0Ay0Bp3o9E1ZnmZIHC6tXb/dGpymme97/MyQp8E0TVzRGpK6 +5hb2HjZDr6rWfdovreD3jRjLyDgzTD7eWpBIsYI+k6yOklIzHMrZXqTxwhIO +HCvOsys3Q0cf5+Q7TEuYL38QMME0Q+6aLfVGeZYgJNfzS/uhGQ4mfZ/MOmoJ +Drwy0k/qzPBP2yYdE3lLqOks8e94b4YzpYX25kkWYM//WD2ixwxVHslvmQ+z +gJ7NLfOUfjOU+PHpwjMfC5it+pbiPUg+P6s+8yLDAtSva937Om6GNd/uVIpO +IdT0WUSkTZrhZR78GtCPYC+yHTSnyf7jWR3NzQj7ko+9C58zw3VhblcabyLM +1iXliv82Q2Wb51v9LiLE/7myt+qPGSZpnojjj0FYr3dHzWvJDDUq1aTbDiMU +HKmaW142Q2u5EoEid4T/A+5nfb0= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07463369303800027}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8357,7 +8001,8 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07773075306777268}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07463369303800027}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8365,9 +8010,617 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913298974454536`*^9}, + CellChangeTimes->{3.994350871311655*^9, 3.994353970800893*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"a0e0ed29-1344-4254-88a0-4a7b388aad11"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"L", "=", + FractionBox[ + SqrtBox[ + RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", + CellChangeTimes->{3.9918488983507824`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], + +Cell[BoxData["9.971636856740163`"], "Output", + CellChangeTimes->{3.9913294794877434`*^9, 3.9943508713578377`*^9, + 3.994353970851918*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"b73557f5-64b5-4010-84d3-d68672c247d8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"L", "=", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + RowBox[{"(", + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], + RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"], + ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + FractionBox["1", "Cb"], ")"}]}]], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", + RowBox[{"{", + RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", + CellChangeTimes->{3.9918488997875195`*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.045324209263863`*^-260\\\", \ +RowBox[{\\\"9295690268007118823449497\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5542386262016000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 99, 13, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9943508714926357`*^9, + 3.994353970992841*^9}, CellLabel-> - "Out[172]=",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] + "During evaluation of \ +In[99]:=",ExpressionUUID->"27c217b2-f19d-4a04-b144-554cd48e698f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.33897489697939`*^-269\\\", \ +RowBox[{\\\"7817675515393986930521027\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1146846355456000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 99, 14, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9943508714926357`*^9, + 3.994353971007042*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"4a872e93-d5aa-4985-b7ba-f3e3057029b8"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.844194451237894`*^-278\\\", \ +RowBox[{\\\"7035907963854588237468924\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2161719910400000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 99, 15, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9943508714926357`*^9, + 3.994353971018477*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"c18f036c-fb66-4dd2-915e-d969a985a36f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 99, 16, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9943508714926357`*^9, + 3.994353971028419*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"0802319c-1ce3-4a50-99ca-6aeaf587869f"], + +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VP8XB3BRlgrZ99kslRIhzJhxDiEhW7ZQUZasUaKkCEnZU5FkS0oK +M7dUpERJpUWypJIvpShbRVTyu7+/5nk99z6f+8c55/05Q9+x28mPn4+Pz2gB +H9//f6f7Hj9QSy0zeTLqNa/90NzkdaH8AdOeBLiXlUiPE1UFlHmxQ77nJMgw +P8tsFtWDKIcr3QI9pWAz22ejL7oeJMbkTs5280DD3bJrgehm+HDHbvfP7iaQ +ouR7eS3dCZZqI+8nu1+ByOFn3T0ie2G22/D0RPcA7A/T0+ieT4Dm9ZfK2kt/ +gGdA/Ju1hTmg/OH20I7Vc8Dy0E9Qri8A6ZDtV4TWC+C28wJNDvmlcHKtZb2d +izDGUbqHjPvK4U2eTuPkMlFct2W0bkXMFUgti3vBryCBsulPWCaj18BaP1BS +RlUCnV8c3vtg9hoIP3ByWa4lgVsXJhw3E6yCpEH1tzamEnjwgoC5BrUKYhlt +Q6cCJVCz6CI31aEKworl/2nUSWDNEv6INm4VOBZwV9t4SuKd0mN2smHVIHdq +8HjOeSlMT+wSr/avAflVN5JmyqXQIugEIy24BhSbkuO21kihwKslUX7hNUCZ +WLlvebMUFj5jvF8aUwPqtuHe9V+kMFev9Nya9BrQWzhnMKgnjRynzG0NvBqw +j5T9qPtEGqP9UoIX/qkBhyVf+nI7pFGm7172rvkacCq9/ebvO2nUlO340irA +BdeXXi9axqVRkG90+eGlXNi6+kKdh4wM1st/6KtT4ULwR+3sBG8ZXOX79m0s +cOGY80aTV9MyWDrVcocWzwXF688V+RfIotMn3+JtSVyoknL+tXaJLCYFwlxu +Che6Xm2ryabK4oHAQ/S5LC6oOUYyHK1kMdLNfml2CReaNhUJvjwriy5xanof +7nNhznLq+TO2HCr8Sd0lNc+FrPKYyjlLOWwqWCHYyM8DNUG+FC1HOVRsMJHb +JcgD24eLTdP95HDpr/M5V0R5kL+eRthmyKHSg38/ZpR4YIQ2uU8/yKHyDppD +vSEP9jJLtj9OkMfT0wZ3u4J5YF0s9tMmTR6jdixmNITxgCEUm/L8tDyyJ6Oz +iiJ48PK1K7fjsjzOZfLS3aN5sCZ8qUDfc3m0rB8RPZfAgy/l0eXfFRUwM3GZ +7Y48HnhJ240qEQq4KkyV/aeRB3oH648U3lHApijvzTubebB4YIUsvUUBdwV6 +xD56yIPb1QKg8UYBWy83L0x6wgNZm9tZOvMK2CwbMvOsg/z+ETV9CxtFbJsM +vXnxEw/Mx3/HhA0q4vdZwjhAkIADVqc0739TRHZXUqGVMAFVJVq9UtOKKBNg +bKmxmAB5Z2/mbWElrNdj+HeJEvDt1sNfAmuUsJXI+SkiQ0BOQlbk2f1K+OrE +vRt3GQS0vl2p9u2IEnbtfl3oq0bAX/3mDpNUJXRti34tqEGA/+cp3Y/nlfC6 +e+xyXEkAy9Zzck2zEpZv4RxM1iZgQEYj7IGoMrbVuW/eYUyA3O57KnJyynjJ +v9PiGZsA21b3Z4E0ZbxOv5aub0JAbUzqanE9Zdwq1EqdQQJOfJgY2eKujE/V +fLZttiRAt6I+YLxUGRdy/J97OBAQwO8iZ3ZVGe8nhm5PdSSgwHOs5dQNZdw3 +dNP+lhMBgmJ0DVarMtLGbzgIuRDQuyf5Y9KoMjrs/j50YAsBR9iOPopGKri+ +p/kv14cAq22F3w3NVPD6MZWyhh0EiMV/TXSxVUHWBorUw53k+c1Hy7O8VZDC +aLF55EfALeu6r4LHVXBXWrfp2UAC4kKEDqnlqGD4t2OYGESAZYazmNl5Fexu +8RcLDCbgdfuYziGuCk4cz1BaEUrAhLtq1I83Klik/lU2MpyAmzHhQhIfVTDO +MegKO4KAwwUNeWvGVPBb+qz0gj0ELO13qw/kp+DLnZv3HtpLwPKANL5+TQpa +52dGmEcRMJbyJntOn4JdNbTer6SvX9FQVQIKWj36Q8+MJsBsrNHCdTMFVe+1 +bH68n4Bt+6ZOtB2koER1zNalBwlQzzVTHjlKwRRllb6TB//fH5nXhLIoGDN9 +1lImloCYvytfmpVRsDEoqUP0EAGmlGgf7yoKaopq/E4kLYwPvh+6RUF7zcWi +06RPJ26Tud1GwUW2y/4+O0yA18XK8q4uCq58Ft6rF0cA49GM4c9+Cno1ZlWc +Jl2zOMdDe4qCp3XzKZviCYhe3f/Vdp6C7xPbWkpJm9hpHQoSoWLlsL3vT9Jt +2Y+KLqpQUaFiODH1CNm/hPTa5uVUDFiyWbidtEenT1P/WiqWZBPJkgkE0H9V +bf5nTMWtw4Z8DqS/yP/9qGRJxX8LxKKOk65mbYxiOlCxc4nf8F3SUV5nhNw8 +qKgVHeo5QZp9eDAv0peKuj/cn6kkEiBQrKN5MoyKi0M9cAPpJ/cP1Vfvp+Jj +sfIbIaSzBp/YPkugYohJxJoM0m6L5PtG0qjIf/57ZSVpynK/3cK5VAxftEP7 +IelPVjw+jRIqnkmdud1L+mrQfPb6SipuOThh+4303jRbVZ8b5PtuR4dnSbOq +zl4/fI+KFT0/sgSSCDDvfj431krFz2e9+UVI2/Et3LD9FRWtnrcJLCHtvpKZ +9eItFfXy2Gf+/3ynU9gb+ERFDf4bdQtJhx28wKgZo2L7nPGev+T5+8t6gmkz +VNy3s6dhgvT9oWSPVj4aMiazC/8jbXmQHhe/iIay1hEyL0g/Fb9zwWgxDbun +4lRvk3Yoc22dEKNhzfbWx0Wku4wmv12WouHjTheRRNKez1IlfORpmJmiP7iD +dL+PhoGCCg2/HI9wB9L+040e7XQaJrYpBsmTDqdOXzBdRcNKGPNvJOsxRWS1 +zmrT8CPPyDmTdIzVqlGuPg1XfdUe8CB9NMLbgGFCw/YbYR8/k/2wWPCPR68Z +DZv3vveoIJ2Vfzru5AYaXrHdEBVAOr/5SSu/Iw25S3yL35D9RXX3G61zoSH/ +uDk3nXTZt3mJvR40XDkUG2xCulpmnefgThoK27v1/79/HwQUjTZH0dDoeMWI +MtnvG/8yJWMP0rCzWMevlpyH51mvDfTjabh/ZCzblvSb2yLxZcdpmPEkS3A3 +OV9jSyIljxbQUElXJjYthqx3sZghp4SGfFl/Li0hPaNf4Tl1kYYaJ7Uyjx0g ++29bX5lfNQ1tv4ue2kfOs3yNlaFlEw09nSh5muT8nzcf9PzXQsPh0Lq7mfvI +eXtzKL72KQ1HIocrJiMJ0OInHmt00vDiVd6rSjJPzJxVvIS+0FAzaC5jlsyj +kJnJ+FZROqY8t2n4Q+YZK8JfdkiSjr5Pr1krkxYe6a0UkKdjlcleBpPMv4tv +m7tMGHT01/O5GRBAQN/d06tvGNBxqW96aR6Zn/ZHmT0l2+mYvzjmg7Un2f// +roXe86WjfVfDCx0PMm+iGALvA+lYe/iWqhSZzym7lqyRj6TjfJDVXJsrAY02 +7xMzUujIXoNlMmS+60oe0T7IpWOl6aT23w0E8KVOPcirpeP3NDdqBXlfPBcI +8qitp2Mg/UaakwUBwVNORycf0rF1YOGXfDOynj1qbwN66ThhMPpiAYcA2aLW +ZGcBBq7w3/Rh5VoCZlct69NyYeBL5YbZMVkCps8rHtHzYGBswuhqQ/K+/Cmu +rsbczkAdt1y9WCmyfj+YQeaBDJx7L9T0V5y8/+p3TnscYuCeQmfJHvI+fmJz +UyzlIgNVhSJ/z8yS+0nwNhiYYqAMf0z3+Bse5L7fNfD5NwPL/BSbO8m9+JT9 +3qOj8wx0cRq4dauTBxl6KU9nRFQxJfDj433tPEj4w3UTp6ji75fVvLZWHgSn +LgpnW6rir3O/V4zX8oBdebX4zBlV9JoTF5PK5sFbWmWRxTlVPBu5SrM1gwcx +ZyoKfxapor7Yro8xaTy4eaS8wKlCFcWLVJhvjvFA1704T+yOKk7qHEg7cJgH +Kxedykr+TxWTL3eqWpP7kuz2g/FRq9XweZho0Lr1PJiUtPZ2bVJD7/cDdce+ +caEnhPEy6JEafn73zmfPMBcaW35DXJsaKjs3V3oMkftcTCX1cpcaCr8T1VHr +54LOwNIPsyNq2LG8UudcBxfCuC+2npdSx6co0qxYx4URexfPj77q+KjduS70 +KBc+pnm77hHSwAdD0XkvZLiwcTx64yeD5RhT0rGfT7cGvu0U3ns9bgXmbIHL +2zdWkf8n5PiPNa3Ep7JDDeEKV0HymUZGzbgmapuZx22YrwDllGoHA4PVmC53 +vjSKdwnyVjGXSQVoYcv49oSQ7IvwRNF03Y/sNfihIXWh97ELwFJuytLu0kaX +9LlMZf8SEBMojfRJ0MG795fbLV9UBJQjVPYWjbUoOKKteE7rHIioe9U6PVqL +AsMJG6erc2ENR6E6eqsu7vZbO2LOOwV7+iSbrfn0UO7kYOGxe9kw/iPNZWOe +Ht650j8QnZoBG7Rb8jdq6aNIwapMC90TcPeH8Z9fz/XxVcBHDbtFyRC2Wre3 +3W8dVhXL1YicSwDOmO/rLSIGuJC/PrXh0WGwUJPfJFpqgAu891KXnT8AK+JP +7G8yNESP2pzBIrN9oOnHvKfea4jz/y7eL8EIyGTY/U58Z4hrj4u/+aUbAT8/ +7Fg30GeIf/iqJd3UI+CuR1pl4aAhdgtF9+osjgAnhw+5cqOG+I9xleP4OhwO +GB8NF+EzwiSFQB/ToHBolWinj6obYUdGUkIcczf43d2VdD3CCK8bic8eMAiB +sdCRaItII3T5MBeTpBIC+1VCgruijJAz6NhTsjAETsTudpo5aIR2C47PSncE +Qw0risZONkJTm8iLb8OD4W9t4p3mfCNsp6xb/l91EJysLvz5qpnc+pPcTh0x +DoR7xa99J2WY2CMDV1qT/aHflr49Sp6Jed+sJk7v8Qe+2dAtfxSZuPHe5d49 +2/zBzFHIbhGNiTRkRXka+EPLApahgiYTRb8suTs05AdtO4pETE2YuLV2v+V7 +az/oVQuqyvJn4qXLwvnCFF/4eXn+l/ZNJroJeoW6jvvAkKtl8fHbTDyfyG/W +/8EHehamWw3WM/Hw6Gztvpc+UO+tePZMIxO/7Lrg18z1gQT5day5x0zMHhxb +NhzpA8tSgmKfvCPPk+DGu815w+qATj4/fhYOu3ttzZL1hp3qlSL5m1jo1pqZ +MN7uBTEPtwVpOLDQSpyXblrrBVl+kk95TixMWLXn95V8L7hz8UDaUzcW9ud0 +3mze6QXSGlbicz4sJFLl5xb/8oQWjU/S3lEsPPRFvnSA7gmaK6g0jSIWXgl3 +Cd6QsgUmNXMMeBMslJocrkk55Qo9bWgh9YOFrbmcFl6cKzSGjW2OnGJhiHzs +59EgV8jgbYww+M1C6uWl1FxTV9Bk8V2tEzDGmOX8KtfHXWDHxlB6s6wx/tZh +GYvZu8DrgA1LX7ONUb0k0feHgjPcKvvz31SKMQpotajJ9TmCwfrIX9apxuh8 +a9NQ/DNHuPHft6XF6cbYKzzuP3PHEXiUPkPrk8a4wfn14WUFjnA1rzG98Jwx +vtQt+DPo4QjFaUeZG6qMUeeS9zPxtw5wPFI8O6/DGCPsRX5HPLEHD3NVNKaw +sT1C51w5xxbmXguLNdPYiNOcffE0Wyj2G3trrcpGDfVxl30CtjCUfDvaYwUb +gy1XdFY/toE9j+2rD+iyURzs9/q52cAJu1jKLUs2uusVFzRGW0Ode+df/d1s +9E2rfFj21AqUQo/dXtPIxl3Kzwfu1VtAxrz/utQmNn76ZZ65vtwC+E9acj8/ +YCN3U19ob5YFjNQuqih+zMYlgv1HTf0toI4vKU+yg40FMbNHfkhYgMep+Ojp +T2x8q7L3xZsQc8irP7Du7hIOHnx+6YG1znpYareFqyjGwReaJknyKushvt9I +K3oZB1tOp1/5JbIedi2aUdOR4aBHhdnP4UEzMLSPki6lcDD4wfa/BXlm0DWw +58fRtRxsdfj2T2eRGcgsDuFucuMgf3NkFjGCULb+UMzEFg7OrbnpltuNoHso +Y32OFwev72mqz3iAYDdR09njw0HB0lypW4UIyV1TsztDOCjg/UL2x2aEmdI4 +s5gjHDTPLo2cTgToNc7pKK/kIDJlJOvcOLBrX1nBxioOusUW2WsYcGC66obf +txoOSo1kpN+Q5oAko+fX2loObvk4f5z9ig02wirKDY0c1PuqIzhsx4Y7r8t9 +Ozo5mLMgYmexnTFYi93SiurhYKKb6CMtbWPo2fB4Wv4tBxvPpuu9EzeGn3Vf +U7b1c1AuufDquXYWaJXoXBse4eDPVyOPS1xZcKfXNCptlINU62GKvhELrKU3 +g/YEB/ccmTk+pMAC/2P72iOnOHh67pxm5Xsm/GxMzpeb4aAikaPWcI8JCb9z +d9b95uDLiR0NYyVMWKZfsXrrHAfnYV83JDGhMLRuan6eg9v1NrnU+DPhf+ey +utc= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VP8XB3BRlgrZ99kslRIhzJhxDiEhW7ZQUZasUaKkCEnZU5FkS0oK +M7dUpERJpUWypJIvpShbRVTyu7+/5nk99z6f+8c55/05Q9+x28mPn4+Pz2gB +H9//f6f7Hj9QSy0zeTLqNa/90NzkdaH8AdOeBLiXlUiPE1UFlHmxQ77nJMgw +P8tsFtWDKIcr3QI9pWAz22ejL7oeJMbkTs5280DD3bJrgehm+HDHbvfP7iaQ +ouR7eS3dCZZqI+8nu1+ByOFn3T0ie2G22/D0RPcA7A/T0+ieT4Dm9ZfK2kt/ +gGdA/Ju1hTmg/OH20I7Vc8Dy0E9Qri8A6ZDtV4TWC+C28wJNDvmlcHKtZb2d +izDGUbqHjPvK4U2eTuPkMlFct2W0bkXMFUgti3vBryCBsulPWCaj18BaP1BS +RlUCnV8c3vtg9hoIP3ByWa4lgVsXJhw3E6yCpEH1tzamEnjwgoC5BrUKYhlt +Q6cCJVCz6CI31aEKworl/2nUSWDNEv6INm4VOBZwV9t4SuKd0mN2smHVIHdq +8HjOeSlMT+wSr/avAflVN5JmyqXQIugEIy24BhSbkuO21kihwKslUX7hNUCZ +WLlvebMUFj5jvF8aUwPqtuHe9V+kMFev9Nya9BrQWzhnMKgnjRynzG0NvBqw +j5T9qPtEGqP9UoIX/qkBhyVf+nI7pFGm7172rvkacCq9/ebvO2nUlO340irA +BdeXXi9axqVRkG90+eGlXNi6+kKdh4wM1st/6KtT4ULwR+3sBG8ZXOX79m0s +cOGY80aTV9MyWDrVcocWzwXF688V+RfIotMn3+JtSVyoknL+tXaJLCYFwlxu +Che6Xm2ryabK4oHAQ/S5LC6oOUYyHK1kMdLNfml2CReaNhUJvjwriy5xanof +7nNhznLq+TO2HCr8Sd0lNc+FrPKYyjlLOWwqWCHYyM8DNUG+FC1HOVRsMJHb +JcgD24eLTdP95HDpr/M5V0R5kL+eRthmyKHSg38/ZpR4YIQ2uU8/yKHyDppD +vSEP9jJLtj9OkMfT0wZ3u4J5YF0s9tMmTR6jdixmNITxgCEUm/L8tDyyJ6Oz +iiJ48PK1K7fjsjzOZfLS3aN5sCZ8qUDfc3m0rB8RPZfAgy/l0eXfFRUwM3GZ +7Y48HnhJ240qEQq4KkyV/aeRB3oH648U3lHApijvzTubebB4YIUsvUUBdwV6 +xD56yIPb1QKg8UYBWy83L0x6wgNZm9tZOvMK2CwbMvOsg/z+ETV9CxtFbJsM +vXnxEw/Mx3/HhA0q4vdZwjhAkIADVqc0739TRHZXUqGVMAFVJVq9UtOKKBNg +bKmxmAB5Z2/mbWElrNdj+HeJEvDt1sNfAmuUsJXI+SkiQ0BOQlbk2f1K+OrE +vRt3GQS0vl2p9u2IEnbtfl3oq0bAX/3mDpNUJXRti34tqEGA/+cp3Y/nlfC6 +e+xyXEkAy9Zzck2zEpZv4RxM1iZgQEYj7IGoMrbVuW/eYUyA3O57KnJyynjJ +v9PiGZsA21b3Z4E0ZbxOv5aub0JAbUzqanE9Zdwq1EqdQQJOfJgY2eKujE/V +fLZttiRAt6I+YLxUGRdy/J97OBAQwO8iZ3ZVGe8nhm5PdSSgwHOs5dQNZdw3 +dNP+lhMBgmJ0DVarMtLGbzgIuRDQuyf5Y9KoMjrs/j50YAsBR9iOPopGKri+ +p/kv14cAq22F3w3NVPD6MZWyhh0EiMV/TXSxVUHWBorUw53k+c1Hy7O8VZDC +aLF55EfALeu6r4LHVXBXWrfp2UAC4kKEDqnlqGD4t2OYGESAZYazmNl5Fexu +8RcLDCbgdfuYziGuCk4cz1BaEUrAhLtq1I83Klik/lU2MpyAmzHhQhIfVTDO +MegKO4KAwwUNeWvGVPBb+qz0gj0ELO13qw/kp+DLnZv3HtpLwPKANL5+TQpa +52dGmEcRMJbyJntOn4JdNbTer6SvX9FQVQIKWj36Q8+MJsBsrNHCdTMFVe+1 +bH68n4Bt+6ZOtB2koER1zNalBwlQzzVTHjlKwRRllb6TB//fH5nXhLIoGDN9 +1lImloCYvytfmpVRsDEoqUP0EAGmlGgf7yoKaopq/E4kLYwPvh+6RUF7zcWi +06RPJ26Tud1GwUW2y/4+O0yA18XK8q4uCq58Ft6rF0cA49GM4c9+Cno1ZlWc +Jl2zOMdDe4qCp3XzKZviCYhe3f/Vdp6C7xPbWkpJm9hpHQoSoWLlsL3vT9Jt +2Y+KLqpQUaFiODH1CNm/hPTa5uVUDFiyWbidtEenT1P/WiqWZBPJkgkE0H9V +bf5nTMWtw4Z8DqS/yP/9qGRJxX8LxKKOk65mbYxiOlCxc4nf8F3SUV5nhNw8 +qKgVHeo5QZp9eDAv0peKuj/cn6kkEiBQrKN5MoyKi0M9cAPpJ/cP1Vfvp+Jj +sfIbIaSzBp/YPkugYohJxJoM0m6L5PtG0qjIf/57ZSVpynK/3cK5VAxftEP7 +IelPVjw+jRIqnkmdud1L+mrQfPb6SipuOThh+4303jRbVZ8b5PtuR4dnSbOq +zl4/fI+KFT0/sgSSCDDvfj431krFz2e9+UVI2/Et3LD9FRWtnrcJLCHtvpKZ +9eItFfXy2Gf+/3ynU9gb+ERFDf4bdQtJhx28wKgZo2L7nPGev+T5+8t6gmkz +VNy3s6dhgvT9oWSPVj4aMiazC/8jbXmQHhe/iIay1hEyL0g/Fb9zwWgxDbun +4lRvk3Yoc22dEKNhzfbWx0Wku4wmv12WouHjTheRRNKez1IlfORpmJmiP7iD +dL+PhoGCCg2/HI9wB9L+040e7XQaJrYpBsmTDqdOXzBdRcNKGPNvJOsxRWS1 +zmrT8CPPyDmTdIzVqlGuPg1XfdUe8CB9NMLbgGFCw/YbYR8/k/2wWPCPR68Z +DZv3vveoIJ2Vfzru5AYaXrHdEBVAOr/5SSu/Iw25S3yL35D9RXX3G61zoSH/ +uDk3nXTZt3mJvR40XDkUG2xCulpmnefgThoK27v1/79/HwQUjTZH0dDoeMWI +MtnvG/8yJWMP0rCzWMevlpyH51mvDfTjabh/ZCzblvSb2yLxZcdpmPEkS3A3 +OV9jSyIljxbQUElXJjYthqx3sZghp4SGfFl/Li0hPaNf4Tl1kYYaJ7Uyjx0g ++29bX5lfNQ1tv4ue2kfOs3yNlaFlEw09nSh5muT8nzcf9PzXQsPh0Lq7mfvI +eXtzKL72KQ1HIocrJiMJ0OInHmt00vDiVd6rSjJPzJxVvIS+0FAzaC5jlsyj +kJnJ+FZROqY8t2n4Q+YZK8JfdkiSjr5Pr1krkxYe6a0UkKdjlcleBpPMv4tv +m7tMGHT01/O5GRBAQN/d06tvGNBxqW96aR6Zn/ZHmT0l2+mYvzjmg7Un2f// +roXe86WjfVfDCx0PMm+iGALvA+lYe/iWqhSZzym7lqyRj6TjfJDVXJsrAY02 +7xMzUujIXoNlMmS+60oe0T7IpWOl6aT23w0E8KVOPcirpeP3NDdqBXlfPBcI +8qitp2Mg/UaakwUBwVNORycf0rF1YOGXfDOynj1qbwN66ThhMPpiAYcA2aLW +ZGcBBq7w3/Rh5VoCZlct69NyYeBL5YbZMVkCps8rHtHzYGBswuhqQ/K+/Cmu +rsbczkAdt1y9WCmyfj+YQeaBDJx7L9T0V5y8/+p3TnscYuCeQmfJHvI+fmJz +UyzlIgNVhSJ/z8yS+0nwNhiYYqAMf0z3+Bse5L7fNfD5NwPL/BSbO8m9+JT9 +3qOj8wx0cRq4dauTBxl6KU9nRFQxJfDj433tPEj4w3UTp6ji75fVvLZWHgSn +LgpnW6rir3O/V4zX8oBdebX4zBlV9JoTF5PK5sFbWmWRxTlVPBu5SrM1gwcx +ZyoKfxapor7Yro8xaTy4eaS8wKlCFcWLVJhvjvFA1704T+yOKk7qHEg7cJgH +Kxedykr+TxWTL3eqWpP7kuz2g/FRq9XweZho0Lr1PJiUtPZ2bVJD7/cDdce+ +caEnhPEy6JEafn73zmfPMBcaW35DXJsaKjs3V3oMkftcTCX1cpcaCr8T1VHr +54LOwNIPsyNq2LG8UudcBxfCuC+2npdSx6co0qxYx4URexfPj77q+KjduS70 +KBc+pnm77hHSwAdD0XkvZLiwcTx64yeD5RhT0rGfT7cGvu0U3ns9bgXmbIHL +2zdWkf8n5PiPNa3Ep7JDDeEKV0HymUZGzbgmapuZx22YrwDllGoHA4PVmC53 +vjSKdwnyVjGXSQVoYcv49oSQ7IvwRNF03Y/sNfihIXWh97ELwFJuytLu0kaX +9LlMZf8SEBMojfRJ0MG795fbLV9UBJQjVPYWjbUoOKKteE7rHIioe9U6PVqL +AsMJG6erc2ENR6E6eqsu7vZbO2LOOwV7+iSbrfn0UO7kYOGxe9kw/iPNZWOe +Ht650j8QnZoBG7Rb8jdq6aNIwapMC90TcPeH8Z9fz/XxVcBHDbtFyRC2Wre3 +3W8dVhXL1YicSwDOmO/rLSIGuJC/PrXh0WGwUJPfJFpqgAu891KXnT8AK+JP +7G8yNESP2pzBIrN9oOnHvKfea4jz/y7eL8EIyGTY/U58Z4hrj4u/+aUbAT8/ +7Fg30GeIf/iqJd3UI+CuR1pl4aAhdgtF9+osjgAnhw+5cqOG+I9xleP4OhwO +GB8NF+EzwiSFQB/ToHBolWinj6obYUdGUkIcczf43d2VdD3CCK8bic8eMAiB +sdCRaItII3T5MBeTpBIC+1VCgruijJAz6NhTsjAETsTudpo5aIR2C47PSncE +Qw0risZONkJTm8iLb8OD4W9t4p3mfCNsp6xb/l91EJysLvz5qpnc+pPcTh0x +DoR7xa99J2WY2CMDV1qT/aHflr49Sp6Jed+sJk7v8Qe+2dAtfxSZuPHe5d49 +2/zBzFHIbhGNiTRkRXka+EPLApahgiYTRb8suTs05AdtO4pETE2YuLV2v+V7 +az/oVQuqyvJn4qXLwvnCFF/4eXn+l/ZNJroJeoW6jvvAkKtl8fHbTDyfyG/W +/8EHehamWw3WM/Hw6Gztvpc+UO+tePZMIxO/7Lrg18z1gQT5day5x0zMHhxb +NhzpA8tSgmKfvCPPk+DGu815w+qATj4/fhYOu3ttzZL1hp3qlSL5m1jo1pqZ +MN7uBTEPtwVpOLDQSpyXblrrBVl+kk95TixMWLXn95V8L7hz8UDaUzcW9ud0 +3mze6QXSGlbicz4sJFLl5xb/8oQWjU/S3lEsPPRFvnSA7gmaK6g0jSIWXgl3 +Cd6QsgUmNXMMeBMslJocrkk55Qo9bWgh9YOFrbmcFl6cKzSGjW2OnGJhiHzs +59EgV8jgbYww+M1C6uWl1FxTV9Bk8V2tEzDGmOX8KtfHXWDHxlB6s6wx/tZh +GYvZu8DrgA1LX7ONUb0k0feHgjPcKvvz31SKMQpotajJ9TmCwfrIX9apxuh8 +a9NQ/DNHuPHft6XF6cbYKzzuP3PHEXiUPkPrk8a4wfn14WUFjnA1rzG98Jwx +vtQt+DPo4QjFaUeZG6qMUeeS9zPxtw5wPFI8O6/DGCPsRX5HPLEHD3NVNKaw +sT1C51w5xxbmXguLNdPYiNOcffE0Wyj2G3trrcpGDfVxl30CtjCUfDvaYwUb +gy1XdFY/toE9j+2rD+iyURzs9/q52cAJu1jKLUs2uusVFzRGW0Ode+df/d1s +9E2rfFj21AqUQo/dXtPIxl3Kzwfu1VtAxrz/utQmNn76ZZ65vtwC+E9acj8/ +YCN3U19ob5YFjNQuqih+zMYlgv1HTf0toI4vKU+yg40FMbNHfkhYgMep+Ojp +T2x8q7L3xZsQc8irP7Du7hIOHnx+6YG1znpYareFqyjGwReaJknyKushvt9I +K3oZB1tOp1/5JbIedi2aUdOR4aBHhdnP4UEzMLSPki6lcDD4wfa/BXlm0DWw +58fRtRxsdfj2T2eRGcgsDuFucuMgf3NkFjGCULb+UMzEFg7OrbnpltuNoHso +Y32OFwev72mqz3iAYDdR09njw0HB0lypW4UIyV1TsztDOCjg/UL2x2aEmdI4 +s5gjHDTPLo2cTgToNc7pKK/kIDJlJOvcOLBrX1nBxioOusUW2WsYcGC66obf +txoOSo1kpN+Q5oAko+fX2loObvk4f5z9ig02wirKDY0c1PuqIzhsx4Y7r8t9 +Ozo5mLMgYmexnTFYi93SiurhYKKb6CMtbWPo2fB4Wv4tBxvPpuu9EzeGn3Vf +U7b1c1AuufDquXYWaJXoXBse4eDPVyOPS1xZcKfXNCptlINU62GKvhELrKU3 +g/YEB/ccmTk+pMAC/2P72iOnOHh67pxm5Xsm/GxMzpeb4aAikaPWcI8JCb9z +d9b95uDLiR0NYyVMWKZfsXrrHAfnYV83JDGhMLRuan6eg9v1NrnU+DPhf+ey +utc= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07623356669210424}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07623356669210424}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VP8XB3BRlgrZ99kslRIhzJhxDiEhW7ZQUZasUaKkCEnZU5FkS0oK +M7dUpERJpUWypJIvpShbRVTyu7+/5nk99z6f+8c55/05Q9+x28mPn4+Pz2gB +H9//f6f7Hj9QSy0zeTLqNa/90NzkdaH8AdOeBLiXlUiPE1UFlHmxQ77nJMgw +P8tsFtWDKIcr3QI9pWAz22ejL7oeJMbkTs5280DD3bJrgehm+HDHbvfP7iaQ +ouR7eS3dCZZqI+8nu1+ByOFn3T0ie2G22/D0RPcA7A/T0+ieT4Dm9ZfK2kt/ +gGdA/Ju1hTmg/OH20I7Vc8Dy0E9Qri8A6ZDtV4TWC+C28wJNDvmlcHKtZb2d +izDGUbqHjPvK4U2eTuPkMlFct2W0bkXMFUgti3vBryCBsulPWCaj18BaP1BS +RlUCnV8c3vtg9hoIP3ByWa4lgVsXJhw3E6yCpEH1tzamEnjwgoC5BrUKYhlt +Q6cCJVCz6CI31aEKworl/2nUSWDNEv6INm4VOBZwV9t4SuKd0mN2smHVIHdq +8HjOeSlMT+wSr/avAflVN5JmyqXQIugEIy24BhSbkuO21kihwKslUX7hNUCZ +WLlvebMUFj5jvF8aUwPqtuHe9V+kMFev9Nya9BrQWzhnMKgnjRynzG0NvBqw +j5T9qPtEGqP9UoIX/qkBhyVf+nI7pFGm7172rvkacCq9/ebvO2nUlO340irA +BdeXXi9axqVRkG90+eGlXNi6+kKdh4wM1st/6KtT4ULwR+3sBG8ZXOX79m0s +cOGY80aTV9MyWDrVcocWzwXF688V+RfIotMn3+JtSVyoknL+tXaJLCYFwlxu +Che6Xm2ryabK4oHAQ/S5LC6oOUYyHK1kMdLNfml2CReaNhUJvjwriy5xanof +7nNhznLq+TO2HCr8Sd0lNc+FrPKYyjlLOWwqWCHYyM8DNUG+FC1HOVRsMJHb +JcgD24eLTdP95HDpr/M5V0R5kL+eRthmyKHSg38/ZpR4YIQ2uU8/yKHyDppD +vSEP9jJLtj9OkMfT0wZ3u4J5YF0s9tMmTR6jdixmNITxgCEUm/L8tDyyJ6Oz +iiJ48PK1K7fjsjzOZfLS3aN5sCZ8qUDfc3m0rB8RPZfAgy/l0eXfFRUwM3GZ +7Y48HnhJ240qEQq4KkyV/aeRB3oH648U3lHApijvzTubebB4YIUsvUUBdwV6 +xD56yIPb1QKg8UYBWy83L0x6wgNZm9tZOvMK2CwbMvOsg/z+ETV9CxtFbJsM +vXnxEw/Mx3/HhA0q4vdZwjhAkIADVqc0739TRHZXUqGVMAFVJVq9UtOKKBNg +bKmxmAB5Z2/mbWElrNdj+HeJEvDt1sNfAmuUsJXI+SkiQ0BOQlbk2f1K+OrE +vRt3GQS0vl2p9u2IEnbtfl3oq0bAX/3mDpNUJXRti34tqEGA/+cp3Y/nlfC6 +e+xyXEkAy9Zzck2zEpZv4RxM1iZgQEYj7IGoMrbVuW/eYUyA3O57KnJyynjJ +v9PiGZsA21b3Z4E0ZbxOv5aub0JAbUzqanE9Zdwq1EqdQQJOfJgY2eKujE/V +fLZttiRAt6I+YLxUGRdy/J97OBAQwO8iZ3ZVGe8nhm5PdSSgwHOs5dQNZdw3 +dNP+lhMBgmJ0DVarMtLGbzgIuRDQuyf5Y9KoMjrs/j50YAsBR9iOPopGKri+ +p/kv14cAq22F3w3NVPD6MZWyhh0EiMV/TXSxVUHWBorUw53k+c1Hy7O8VZDC +aLF55EfALeu6r4LHVXBXWrfp2UAC4kKEDqnlqGD4t2OYGESAZYazmNl5Fexu +8RcLDCbgdfuYziGuCk4cz1BaEUrAhLtq1I83Klik/lU2MpyAmzHhQhIfVTDO +MegKO4KAwwUNeWvGVPBb+qz0gj0ELO13qw/kp+DLnZv3HtpLwPKANL5+TQpa +52dGmEcRMJbyJntOn4JdNbTer6SvX9FQVQIKWj36Q8+MJsBsrNHCdTMFVe+1 +bH68n4Bt+6ZOtB2koER1zNalBwlQzzVTHjlKwRRllb6TB//fH5nXhLIoGDN9 +1lImloCYvytfmpVRsDEoqUP0EAGmlGgf7yoKaopq/E4kLYwPvh+6RUF7zcWi +06RPJ26Tud1GwUW2y/4+O0yA18XK8q4uCq58Ft6rF0cA49GM4c9+Cno1ZlWc +Jl2zOMdDe4qCp3XzKZviCYhe3f/Vdp6C7xPbWkpJm9hpHQoSoWLlsL3vT9Jt +2Y+KLqpQUaFiODH1CNm/hPTa5uVUDFiyWbidtEenT1P/WiqWZBPJkgkE0H9V +bf5nTMWtw4Z8DqS/yP/9qGRJxX8LxKKOk65mbYxiOlCxc4nf8F3SUV5nhNw8 +qKgVHeo5QZp9eDAv0peKuj/cn6kkEiBQrKN5MoyKi0M9cAPpJ/cP1Vfvp+Jj +sfIbIaSzBp/YPkugYohJxJoM0m6L5PtG0qjIf/57ZSVpynK/3cK5VAxftEP7 +IelPVjw+jRIqnkmdud1L+mrQfPb6SipuOThh+4303jRbVZ8b5PtuR4dnSbOq +zl4/fI+KFT0/sgSSCDDvfj431krFz2e9+UVI2/Et3LD9FRWtnrcJLCHtvpKZ +9eItFfXy2Gf+/3ynU9gb+ERFDf4bdQtJhx28wKgZo2L7nPGev+T5+8t6gmkz +VNy3s6dhgvT9oWSPVj4aMiazC/8jbXmQHhe/iIay1hEyL0g/Fb9zwWgxDbun +4lRvk3Yoc22dEKNhzfbWx0Wku4wmv12WouHjTheRRNKez1IlfORpmJmiP7iD +dL+PhoGCCg2/HI9wB9L+040e7XQaJrYpBsmTDqdOXzBdRcNKGPNvJOsxRWS1 +zmrT8CPPyDmTdIzVqlGuPg1XfdUe8CB9NMLbgGFCw/YbYR8/k/2wWPCPR68Z +DZv3vveoIJ2Vfzru5AYaXrHdEBVAOr/5SSu/Iw25S3yL35D9RXX3G61zoSH/ +uDk3nXTZt3mJvR40XDkUG2xCulpmnefgThoK27v1/79/HwQUjTZH0dDoeMWI +MtnvG/8yJWMP0rCzWMevlpyH51mvDfTjabh/ZCzblvSb2yLxZcdpmPEkS3A3 +OV9jSyIljxbQUElXJjYthqx3sZghp4SGfFl/Li0hPaNf4Tl1kYYaJ7Uyjx0g ++29bX5lfNQ1tv4ue2kfOs3yNlaFlEw09nSh5muT8nzcf9PzXQsPh0Lq7mfvI +eXtzKL72KQ1HIocrJiMJ0OInHmt00vDiVd6rSjJPzJxVvIS+0FAzaC5jlsyj +kJnJ+FZROqY8t2n4Q+YZK8JfdkiSjr5Pr1krkxYe6a0UkKdjlcleBpPMv4tv +m7tMGHT01/O5GRBAQN/d06tvGNBxqW96aR6Zn/ZHmT0l2+mYvzjmg7Un2f// +roXe86WjfVfDCx0PMm+iGALvA+lYe/iWqhSZzym7lqyRj6TjfJDVXJsrAY02 +7xMzUujIXoNlMmS+60oe0T7IpWOl6aT23w0E8KVOPcirpeP3NDdqBXlfPBcI +8qitp2Mg/UaakwUBwVNORycf0rF1YOGXfDOynj1qbwN66ThhMPpiAYcA2aLW +ZGcBBq7w3/Rh5VoCZlct69NyYeBL5YbZMVkCps8rHtHzYGBswuhqQ/K+/Cmu +rsbczkAdt1y9WCmyfj+YQeaBDJx7L9T0V5y8/+p3TnscYuCeQmfJHvI+fmJz +UyzlIgNVhSJ/z8yS+0nwNhiYYqAMf0z3+Bse5L7fNfD5NwPL/BSbO8m9+JT9 +3qOj8wx0cRq4dauTBxl6KU9nRFQxJfDj433tPEj4w3UTp6ji75fVvLZWHgSn +LgpnW6rir3O/V4zX8oBdebX4zBlV9JoTF5PK5sFbWmWRxTlVPBu5SrM1gwcx +ZyoKfxapor7Yro8xaTy4eaS8wKlCFcWLVJhvjvFA1704T+yOKk7qHEg7cJgH +Kxedykr+TxWTL3eqWpP7kuz2g/FRq9XweZho0Lr1PJiUtPZ2bVJD7/cDdce+ +caEnhPEy6JEafn73zmfPMBcaW35DXJsaKjs3V3oMkftcTCX1cpcaCr8T1VHr +54LOwNIPsyNq2LG8UudcBxfCuC+2npdSx6co0qxYx4URexfPj77q+KjduS70 +KBc+pnm77hHSwAdD0XkvZLiwcTx64yeD5RhT0rGfT7cGvu0U3ns9bgXmbIHL +2zdWkf8n5PiPNa3Ep7JDDeEKV0HymUZGzbgmapuZx22YrwDllGoHA4PVmC53 +vjSKdwnyVjGXSQVoYcv49oSQ7IvwRNF03Y/sNfihIXWh97ELwFJuytLu0kaX +9LlMZf8SEBMojfRJ0MG795fbLV9UBJQjVPYWjbUoOKKteE7rHIioe9U6PVqL +AsMJG6erc2ENR6E6eqsu7vZbO2LOOwV7+iSbrfn0UO7kYOGxe9kw/iPNZWOe +Ht650j8QnZoBG7Rb8jdq6aNIwapMC90TcPeH8Z9fz/XxVcBHDbtFyRC2Wre3 +3W8dVhXL1YicSwDOmO/rLSIGuJC/PrXh0WGwUJPfJFpqgAu891KXnT8AK+JP +7G8yNESP2pzBIrN9oOnHvKfea4jz/y7eL8EIyGTY/U58Z4hrj4u/+aUbAT8/ +7Fg30GeIf/iqJd3UI+CuR1pl4aAhdgtF9+osjgAnhw+5cqOG+I9xleP4OhwO +GB8NF+EzwiSFQB/ToHBolWinj6obYUdGUkIcczf43d2VdD3CCK8bic8eMAiB +sdCRaItII3T5MBeTpBIC+1VCgruijJAz6NhTsjAETsTudpo5aIR2C47PSncE +Qw0risZONkJTm8iLb8OD4W9t4p3mfCNsp6xb/l91EJysLvz5qpnc+pPcTh0x +DoR7xa99J2WY2CMDV1qT/aHflr49Sp6Jed+sJk7v8Qe+2dAtfxSZuPHe5d49 +2/zBzFHIbhGNiTRkRXka+EPLApahgiYTRb8suTs05AdtO4pETE2YuLV2v+V7 +az/oVQuqyvJn4qXLwvnCFF/4eXn+l/ZNJroJeoW6jvvAkKtl8fHbTDyfyG/W +/8EHehamWw3WM/Hw6Gztvpc+UO+tePZMIxO/7Lrg18z1gQT5day5x0zMHhxb +NhzpA8tSgmKfvCPPk+DGu815w+qATj4/fhYOu3ttzZL1hp3qlSL5m1jo1pqZ +MN7uBTEPtwVpOLDQSpyXblrrBVl+kk95TixMWLXn95V8L7hz8UDaUzcW9ud0 +3mze6QXSGlbicz4sJFLl5xb/8oQWjU/S3lEsPPRFvnSA7gmaK6g0jSIWXgl3 +Cd6QsgUmNXMMeBMslJocrkk55Qo9bWgh9YOFrbmcFl6cKzSGjW2OnGJhiHzs +59EgV8jgbYww+M1C6uWl1FxTV9Bk8V2tEzDGmOX8KtfHXWDHxlB6s6wx/tZh +GYvZu8DrgA1LX7ONUb0k0feHgjPcKvvz31SKMQpotajJ9TmCwfrIX9apxuh8 +a9NQ/DNHuPHft6XF6cbYKzzuP3PHEXiUPkPrk8a4wfn14WUFjnA1rzG98Jwx +vtQt+DPo4QjFaUeZG6qMUeeS9zPxtw5wPFI8O6/DGCPsRX5HPLEHD3NVNKaw +sT1C51w5xxbmXguLNdPYiNOcffE0Wyj2G3trrcpGDfVxl30CtjCUfDvaYwUb +gy1XdFY/toE9j+2rD+iyURzs9/q52cAJu1jKLUs2uusVFzRGW0Ode+df/d1s +9E2rfFj21AqUQo/dXtPIxl3Kzwfu1VtAxrz/utQmNn76ZZ65vtwC+E9acj8/ +YCN3U19ob5YFjNQuqih+zMYlgv1HTf0toI4vKU+yg40FMbNHfkhYgMep+Ojp +T2x8q7L3xZsQc8irP7Du7hIOHnx+6YG1znpYareFqyjGwReaJknyKushvt9I +K3oZB1tOp1/5JbIedi2aUdOR4aBHhdnP4UEzMLSPki6lcDD4wfa/BXlm0DWw +58fRtRxsdfj2T2eRGcgsDuFucuMgf3NkFjGCULb+UMzEFg7OrbnpltuNoHso +Y32OFwev72mqz3iAYDdR09njw0HB0lypW4UIyV1TsztDOCjg/UL2x2aEmdI4 +s5gjHDTPLo2cTgToNc7pKK/kIDJlJOvcOLBrX1nBxioOusUW2WsYcGC66obf +txoOSo1kpN+Q5oAko+fX2loObvk4f5z9ig02wirKDY0c1PuqIzhsx4Y7r8t9 +Ozo5mLMgYmexnTFYi93SiurhYKKb6CMtbWPo2fB4Wv4tBxvPpuu9EzeGn3Vf +U7b1c1AuufDquXYWaJXoXBse4eDPVyOPS1xZcKfXNCptlINU62GKvhELrKU3 +g/YEB/ccmTk+pMAC/2P72iOnOHh67pxm5Xsm/GxMzpeb4aAikaPWcI8JCb9z +d9b95uDLiR0NYyVMWKZfsXrrHAfnYV83JDGhMLRuan6eg9v1NrnU+DPhf+ey +utc= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07623356669210424}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07623356669210424}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9913298974454536`*^9, 3.994351916007122*^9, + 3.994354986542103*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"63ec497a-e770-42fc-9068-569ac932acc6"] }, Open ]], Cell[CellGroupData[{ @@ -8379,7 +8632,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -8397,8 +8652,8 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"(", FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -8420,66 +8675,78 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[173]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], + "In[100]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 173, 129, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298974999084`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3911286921482715`*^-159\\\", \ +RowBox[{\\\"505518991860510123640143\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"101\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 100, 17, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943519162148*^9, + 3.99435498670436*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], +In[100]:=",ExpressionUUID->"77be0bbd-9b58-4958-bfbe-dd43f0577e12"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 130, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897510906*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5162358982840327`*^-162\\\", \ +RowBox[{\\\"164243120455479739170682\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"105\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 100, 18, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943519162148*^9, + 3.994354986717001*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], +In[100]:=",ExpressionUUID->"c6248bc8-b470-4557-b47a-1689fe3a0ed8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 131, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298975189075`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.170744231785013`*^-165\\\", \ +RowBox[{\\\"552513857212233842570175\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"108\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 100, 19, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943519162148*^9, + 3.994354986733429*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], +In[100]:=",ExpressionUUID->"c0a31a57-9696-4b89-aa55-adaddfd8ad1b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 173, 132, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897526905*^9}, +during this calculation.\"", 2, 100, 20, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943519162148*^9, + 3.9943549867462883`*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], +In[100]:=",ExpressionUUID->"c4561d42-4ff2-4aba-a33a-3b5d9aa4475f"], -Cell[BoxData["9.77956849963325`"], "Output", - CellChangeTimes->{3.991329904262455*^9}, +Cell[BoxData["9.971312587492699`"], "Output", + CellChangeTimes->{3.991329904262455*^9, 3.9943520088557577`*^9, + 3.994355083799283*^9}, CellLabel-> - "Out[173]=",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] + "Out[100]=",ExpressionUUID->"6515c09b-d418-49a7-9a77-1c7b1c46f53e"] }, Open ]], Cell[CellGroupData[{ @@ -8546,68 +8813,77 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489049186344`*^9, - 3.991848908595253*^9}},ExpressionUUID->"eb852908-4d60-c84e-80d9-\ -a57fd4094f56"], + CellChangeTimes->{{3.9918489049186344`*^9, 3.991848908595253*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 174, 133, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904300501*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.902111910583623`*^-203\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 21, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994352009057267*^9, + 3.994355083878694*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], +In[101]:=",ExpressionUUID->"067340db-f9ae-4227-86fb-a54792085ef7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 134, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904310505*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.698356593961849`*^-208\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 22, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994352009057267*^9, + 3.994355083889209*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], +In[101]:=",ExpressionUUID->"a0549f43-26e5-4d24-8d31-e20c83598654"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 135, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043185062`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1605287029221997`*^-212\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 23, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994352009057267*^9, + 3.994355083897542*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], +In[101]:=",ExpressionUUID->"c0f291ca-a47d-497b-ab08-45e00b3552eb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 174, 136, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043256874`*^9}, +during this calculation.\"", 2, 101, 24, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994352009057267*^9, + 3.994355083908203*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], +In[101]:=",ExpressionUUID->"32c1fa4a-3c31-4e90-93fd-dc9f8b36c5f3"], -Cell[BoxData["0.1491428555515254`"], "Output", - CellChangeTimes->{3.9913299110465336`*^9}, +Cell[BoxData["0.7910515870285006`"], "Output", + CellChangeTimes->{3.9913299110465336`*^9, 3.994352022180588*^9, + 3.994355095622652*^9}, CellLabel-> - "Out[174]=",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] + "Out[101]=",ExpressionUUID->"dd506d0d-9c11-4cd2-a220-662623badff4"] }, Open ]], Cell[CellGroupData[{ @@ -8628,8 +8904,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8674,68 +8949,77 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489121661835`*^9, - 3.9918489145264854`*^9}},ExpressionUUID->"d11037f6-09e7-b44f-8a1d-\ -47c1a485c608"], + CellChangeTimes->{{3.9918489121661835`*^9, 3.9918489145264854`*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 175, 137, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911081766*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.902111910583623`*^-203\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 25, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994352023143108*^9, + 3.994355095678401*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], +In[102]:=",ExpressionUUID->"3048226b-b2bc-4d0e-ab11-a253d1afd2ba"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 138, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911090769*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.698356593961849`*^-208\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 26, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994352023143108*^9, + 3.994355095690954*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], +In[102]:=",ExpressionUUID->"353bd4d4-4467-4149-8683-6dc632210fb3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 139, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911098768*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1605287029221997`*^-212\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 27, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994352023143108*^9, + 3.994355095703395*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], +In[102]:=",ExpressionUUID->"2c4b1375-c963-47db-b34f-2a98cd41e870"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 175, 140, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299111067944`*^9}, +during this calculation.\"", 2, 102, 28, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994352023143108*^9, + 3.994355095713814*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], +In[102]:=",ExpressionUUID->"ec201e9d-901e-4cd2-a6fb-1c2c432a4d07"], -Cell[BoxData["6.5928699937564845`"], "Output", - CellChangeTimes->{3.9913299163114815`*^9}, +Cell[BoxData["28.3464641237088`"], "Output", + CellChangeTimes->{3.9913299163114815`*^9, 3.994352036578804*^9, + 3.994355106693788*^9}, CellLabel-> - "Out[175]=",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] + "Out[102]=",ExpressionUUID->"8b5de6ad-f2e3-40fb-ae7f-dfa7355749ba"] }, Open ]], Cell[CellGroupData[{ @@ -8756,8 +9040,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8802,68 +9085,77 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489192162857`*^9, - 3.991848922582632*^9}},ExpressionUUID->"431dd2fa-6331-2449-bc19-\ -0d79e6ed8953"], + CellChangeTimes->{{3.9918489192162857`*^9, 3.991848922582632*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 176, 141, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163444805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.902111910583623`*^-203\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 29, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994352037023897*^9, + 3.9943551067641573`*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], +In[103]:=",ExpressionUUID->"d9848180-f08c-413f-863b-af78c5f91f1e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 142, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916354479*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.698356593961849`*^-208\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 30, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994352037023897*^9, + 3.994355106776143*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], +In[103]:=",ExpressionUUID->"d266e307-6bbd-4f4e-8599-42259383e153"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 143, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163634796`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1605287029221997`*^-212\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 31, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994352037023897*^9, + 3.994355106784883*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], +In[103]:=",ExpressionUUID->"629f1cca-935d-46d8-93d4-77cdf19f5364"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 176, 144, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916371479*^9}, +during this calculation.\"", 2, 103, 32, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994352037023897*^9, + 3.9943551067954407`*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], +In[103]:=",ExpressionUUID->"0defc132-b5f3-4276-82bc-554e89a36feb"], -Cell[BoxData["16.916908616104454`"], "Output", - CellChangeTimes->{3.9913299193276234`*^9}, +Cell[BoxData["5.327305732791334`"], "Output", + CellChangeTimes->{3.9913299193276234`*^9, 3.994352048120508*^9, + 3.994355115890836*^9}, CellLabel-> - "Out[176]=",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] + "Out[103]=",ExpressionUUID->"d49d7e28-7f9e-487c-a651-e1709aebcafe"] }, Open ]], Cell[CellGroupData[{ @@ -8872,22 +9164,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991848926103155*^9, - 3.9918489295815735`*^9}},ExpressionUUID->"8c5df121-e0b9-a146-bc34-\ -b231aa8028b9"], - -Cell[BoxData["0.01412227604937243`"], "Output", - CellChangeTimes->{3.99132991935894*^9}, + CellChangeTimes->{{3.991848926103155*^9, 3.9918489295815735`*^9}}, CellLabel-> - "Out[177]=",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] + "In[104]:=",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], + +Cell[BoxData["0.06437267381312958`"], "Output", + CellChangeTimes->{3.99132991935894*^9, 3.9943520494628067`*^9, + 3.994355115937522*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"b6cf19f2-deef-4be6-9c7f-9d6e42f120d0"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918489327910748`*^9, 3.991848934830887*^9}, - 3.991924914130762*^9},ExpressionUUID->"831a27fc-89ff-e041-97f1-\ -0ec5d19a7879"], + 3.991924914130762*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ @@ -8910,12 +9204,13 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[179]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], + "In[106]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.9913299193849545`*^9}, +Cell[BoxData["6.649313995945192`"], "Output", + CellChangeTimes->{3.9913299193849545`*^9, 3.994352050449295*^9, + 3.994355115963484*^9}, CellLabel-> - "Out[179]=",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] + "Out[106]=",ExpressionUUID->"c9064303-8d2e-47db-bb55-23e68caf9001"] }, Open ]], Cell[CellGroupData[{ @@ -8925,12 +9220,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[181]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], + "In[107]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913299194207077`*^9}, +Cell[BoxData["2.4252285524537065`"], "Output", + CellChangeTimes->{3.9913299194207077`*^9, 3.994352050914278*^9, + 3.994355115979538*^9}, CellLabel-> - "Out[181]=",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] + "Out[107]=",ExpressionUUID->"805ca5fd-29cd-4e83-a43a-427be4a2cb1a"] }, Open ]], Cell[CellGroupData[{ @@ -8940,12 +9236,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[184]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], + "In[108]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.9913299194738407`*^9}, +Cell[BoxData["16.12610615719633`"], "Output", + CellChangeTimes->{3.9913299194738407`*^9, 3.9943520516556664`*^9, + 3.99435511599544*^9}, CellLabel-> - "Out[184]=",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] + "Out[108]=",ExpressionUUID->"6ef9402a-0fe9-4a76-a7f2-12034969d2f3"] }, Open ]], Cell[CellGroupData[{ @@ -9135,12 +9432,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[185]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], + "In[109]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[BoxData["0.04472011299838893`"], "Output", - CellChangeTimes->{3.991329919501911*^9}, +Cell[BoxData["0.008056130625706944`"], "Output", + CellChangeTimes->{3.991329919501911*^9, 3.994352056209944*^9, + 3.99435511601374*^9}, CellLabel-> - "Out[185]=",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] + "Out[109]=",ExpressionUUID->"96063af1-2a06-4ec2-80b5-80e29eb6a0d0"] }, Open ]], Cell[CellGroupData[{ @@ -9154,12 +9452,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[186]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], + "In[110]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329919596855*^9}, +Cell[BoxData["9.873740090331614`"], "Output", + CellChangeTimes->{3.991329919596855*^9, 3.9943520566648827`*^9, + 3.994355116226487*^9}, CellLabel-> - "Out[186]=",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] + "Out[110]=",ExpressionUUID->"ddc53373-c92f-4cdb-8a2d-cda8d4117a14"] }, Open ]], Cell[CellGroupData[{ @@ -9351,12 +9650,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[187]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], + "In[111]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[BoxData["0.014190600885170185`"], "Output", - CellChangeTimes->{3.9913299196126003`*^9}, +Cell[BoxData["0.059295904455395954`"], "Output", + CellChangeTimes->{3.9913299196126003`*^9, 3.994352057333246*^9, + 3.994355116247405*^9}, CellLabel-> - "Out[187]=",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] + "Out[111]=",ExpressionUUID->"aa91f4e6-d5c7-4ad2-9593-9303c217f787"] }, Open ]], Cell[CellGroupData[{ @@ -9370,12 +9670,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[188]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], + "In[112]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[BoxData["7.439513700547701`"], "Output", - CellChangeTimes->{3.9913299197036095`*^9}, +Cell[BoxData["3.6394234726264894`"], "Output", + CellChangeTimes->{3.9913299197036095`*^9, 3.994352058530079*^9, + 3.994355116435522*^9}, CellLabel-> - "Out[188]=",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] + "Out[112]=",ExpressionUUID->"ebf9d528-7d14-4375-8fa4-32d210eacbc7"] }, Open ]], Cell[CellGroupData[{ @@ -9468,12 +9769,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[189]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], + "In[113]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913299197165985`*^9}, +Cell[BoxData["0.07637363207411572`"], "Output", + CellChangeTimes->{3.9913299197165985`*^9, 3.9943520628303127`*^9, + 3.994355116456234*^9}, CellLabel-> - "Out[189]=",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] + "Out[113]=",ExpressionUUID->"f12dfc02-e436-49ae-ad34-4a45383fb1e5"] }, Open ]], Cell[CellGroupData[{ @@ -9563,12 +9865,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[190]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], + "In[114]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991329919739599*^9}, +Cell[BoxData["0.9236263679258842`"], "Output", + CellChangeTimes->{3.991329919739599*^9, 3.994352064030118*^9, + 3.9943551164726458`*^9}, CellLabel-> - "Out[190]=",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] + "Out[114]=",ExpressionUUID->"20ea6562-93dd-45fb-adb6-577bdde7c6db"] }, Open ]], Cell[CellGroupData[{ @@ -9691,12 +9994,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[191]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], + "In[115]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913299197646008`*^9}, +Cell[BoxData["0.07054070039792333`"], "Output", + CellChangeTimes->{3.9913299197646008`*^9, 3.994352065086116*^9, + 3.9943551164920588`*^9}, CellLabel-> - "Out[191]=",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] + "Out[115]=",ExpressionUUID->"de71cf29-2c39-4dc7-a483-6c7364a784b8"] }, Open ]], Cell[CellGroupData[{ @@ -9711,7 +10015,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -9733,8 +10039,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9758,68 +10063,77 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848964116934*^9},ExpressionUUID->"220bdeed-2e17-e94c-a7b0-\ -3e066daf15d7"], + CellChangeTimes->{3.991848964116934*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 145, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919788595*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.020591608501975`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 116, 33, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943520667021914`*^9, + 3.994355116518659*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], +In[116]:=",ExpressionUUID->"b05a660a-8058-48ef-af22-47d9cf93ec5c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 146, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299197985992`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1204881908909148`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 116, 34, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943520667021914`*^9, + 3.99435511652979*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], +In[116]:=",ExpressionUUID->"eca2be43-837d-4fca-a45c-0073460384eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 192, 147, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299198065968`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3918086977163263`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 116, 35, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943520667021914`*^9, + 3.994355116539564*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], +In[116]:=",ExpressionUUID->"ae1e1fb5-a769-4ee5-ba5e-adc4681c7fbb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 192, 148, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919814598*^9}, +during this calculation.\"", 2, 116, 36, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943520667021914`*^9, + 3.9943551165490427`*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], +In[116]:=",ExpressionUUID->"ebc8bdc2-2283-4c2c-91cb-b7fecf0863a5"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329923627493*^9}, +Cell[BoxData["9.873740090331632`"], "Output", + CellChangeTimes->{3.991329923627493*^9, 3.994352093355331*^9, + 3.994355124564002*^9}, CellLabel-> - "Out[192]=",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] + "Out[116]=",ExpressionUUID->"0a7b2d42-a80e-49c8-b980-b0f9b0305ee8"] }, Open ]], Cell[CellGroupData[{ @@ -9834,7 +10148,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -9856,8 +10172,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9881,68 +10196,77 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918489685110855`*^9},ExpressionUUID->"b8791a07-33fe-8c4f-9c59-\ -dd23af9a4471"], + CellChangeTimes->{3.9918489685110855`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 149, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236609*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.020591608501975`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 117, 37, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994352093532269*^9, + 3.994355124621739*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], +In[117]:=",ExpressionUUID->"1a390d05-423e-45dd-b39a-d87a9925a8f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 150, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329923669897*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1204881908909148`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 117, 38, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994352093532269*^9, + 3.994355124633224*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], +In[117]:=",ExpressionUUID->"517313ec-bffd-4d84-b727-862e1ba4f9d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 193, 151, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236779003`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3918086977163263`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 117, 39, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994352093532269*^9, + 3.9943551246452293`*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], +In[117]:=",ExpressionUUID->"96ffe6b3-c505-4dfe-9b7f-dd12eb3de5bb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 193, 152, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236858997`*^9}, +during this calculation.\"", 2, 117, 40, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994352093532269*^9, + 3.994355124654833*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], +In[117]:=",ExpressionUUID->"2bbf46ae-00a1-4582-b9dc-b75a8f5b5ce4"], -Cell[BoxData["7.439513700547696`"], "Output", - CellChangeTimes->{3.9913299274564743`*^9}, +Cell[BoxData["3.6394234726264925`"], "Output", + CellChangeTimes->{3.9913299274564743`*^9, 3.994352103735713*^9, + 3.994355132443494*^9}, CellLabel-> - "Out[193]=",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] + "Out[117]=",ExpressionUUID->"bcf495ac-3a0a-4b10-ac92-2cb78f3c9423"] }, Open ]], Cell[CellGroupData[{ @@ -10000,93 +10324,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848973885317*^9},ExpressionUUID->"3fe6e7f1-b44a-234f-af77-\ -3cf1fdaf28d9"], + CellChangeTimes->{3.991848973885317*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk8VN0fB3BLJFGW7PtWCGnGrsf5ypTKmlS2xJi5lpDtmShL/UILCZV4 +SiopeUjSItSjUlETQrIkJBqDsV2iUr/jj/u6r/frnvN5fc49514N+kE3pgAf +Hx8HX0v3yCajdY9ammwY+neftrE5yIZ3w5ROK0UDSlKcJfcXmJ3XptWiS6qm +jHZsV8Y7YTHqSzRKUaB+wK6ITXohRGMjpudT9w7sU6/k65JK3qOCbO3Gj9iP +WyKv/KJ8QOf6HDK7sLndb+LjajqRi61JSQ+24pCW95zdJ2T2uFf2M7bDRLxl +NLsPPdq2raMf++kv7srYkgGUNxXNGcTuOCZ35GH4IPrvgZ/TN2yeMI1LUoYQ +urhKaBRbOD3Ck/p9GEXkJqyewFaVzG+IrOGg4Zqy0BlsZ6W5mzy7MZQRs1Nt +EZu4qilrKMJDz1e/jBF4x0FJOi4pB9gTyKVrQVkEu1OufWNMyRTKEbrFXIPN +8AoJPpc+jQQj1ISVsCcv8127Fz6DhOU9FzSwRTQNJaYos4hGkeg0xj7PeGEv +ITOH+svOvLDAVr/lmbTh+xxKiWPz22JbGKTywmrm0WuZDJYbdpBZH5tr9wvp +/9awjcMmY/9eJrp2Ef05X/L8OPbRmpWb9ER+o/gSMicDOxcs/g1k/0GHQt+Z +Fy31K2qgRZXww8412V4d2CWvzvUfUxIA5cB1UYNLfb/5xmelC0BpdOKnSex4 +/dnKu+GCkNETeVusCfct19CaoAiBdXe49jbs7paxp78LhWAVT6p1L7b69COv +VTLCcEAwrjUQu9TEOdvwuzD0eaa9PYld//gwf2iNCDA+NF5pwp590dbHsROD +3IJHjcHNHCTlKCZx5KkY6K6zCzqKbdxOA3FLcbBKkQ66iB3y9cHVjUaroE74 +eNor7AgBtvFfYhLQu3DFX6+Fg4Y070ylzElCgUP3Dv73+P0Qb1Y0U6XA6FDN +ogq2wL/DGvKRUlCY/0XSGludquZWMioFTw0EfVnYXnaZ95r6peH35bMpU9jN +AVHRcm9lwKqDI/mjlYM+38pI8xORhdT/qF3KbRw0NlpSeHuLLFQKveIHbNGY +wTbrOlnwXvGMdQKbluxu4vdADhrzpScV2zmo+obZbHGBAvRTbdXdP3DQjaEf +LKsYFcjsOHxodScHbdt94nN0mQqkjmdvs8Yeq5feWjasAueVEsMDsU1uGMio +e6qCs3pTVR12Pd23UshGDRrS99of6uKg6Yn+Q5zj6tDrt9aR7OYg6TDa/Uon +TdjSHzZr+Bmf8xuiQa4hmuAQqeTPwK761KI0nqoJmZEFGpewfRz3HV9bpwlr +KOuvrejD/daz3PIoWlDQ6f4PF9uEe2syUU4bOMaif9cOcJB74ErDHQM6YPmR +zS4Y4iDE2k3Zu6gDjmd10vuw9VMKzBkKa8ExRyxfbZiD+AqpmxN3rgVlodTK +q9hln7333nu2FlIu6FXe/Ia/zz2lxxSvr4MwOafFZyO4H82pg0vXg5yzbU9M +eRxUuOtiz/dEPVg1ZVSehJ1BH+hfdkkPfJ2VpxuxGUf/HlVt04OIqLLQ/RMc +JFmbz7fLTh9e55WaZEzi80Pl6ddorQdTVQuJn9McpKR5NintqwFsl3Cdk5zn +oNrTpN6CgCEsNKejMGyfGc92QsMQ7t5o5DRgX6nX1tvsawgByjTvYwscpBlY +3Tr/0RAuGEDd3A+83tIhHeKtEUjciD49s8hBKkqqhLqnMXjsf6RuumwEGRTF +iP1EFJi3uOjdKTmC6Izjs4bOFNh8ynLKTmoE5Wplf/bzocD0h6TucmzB6+V3 +X8VSwKts/tZJ6RHUfYXrnl1BgSC7fCMbmRF0KtcvX0+LCg9L67hV8iNoOM3R +yEPYBBTedKiOq42ga1Harg/YphAUFhzrumEEtbCQeXKRJZTrtjqs2z2CNHw/ +OO8L/Qsyrpkqbz06gph/Ht5RiQO4/w9h0FY2guRGq5bL0TfDf3LBSUJDIyiG +uulTtj4Ntj3QNfmlwkX08V8N0twtECni+m3Yi4vKNkcvL2i2By/dxIyi61x0 +gwx5Vnp+OwSLqzl0c7lo3lb+XX2SA1CiowLZNqOol09wasDfCUbn7i/25Yyi +cOWDmce0XMDy0+Mjv8ZH0Z3ghroLKa5wzWxD5MudY+jwjML39cE7oaeMJ/Ks +cgzN7ti65/V+N5jklnYIa40jS+8s26Gdu2CNuTnb/MI4alXID6mnusOmVPeJ +CUEeUrx5vLZYdzecEezhbT7KQ1X9+o7O4ntguHC8VXyeh1TbJwNZ43vgP9Gt +ozcjJhD1QlZpYf9emGneVH5pbgLlL5sxyn7hAQdD2RtXW0+ih7YbulMee8Lz +rffG4NgkyjU/LfmrxAscJHTiF15NouaeolRqujf8r/CS5EGRKfTA6bJ2xFEf +eKNVtS7NZQpNhe3iC2fsg7d9nmvuZU2h2a16QTw7X/BYLZqy+H4KFY93zUeb +7Yc9dIGSGtlp5HGtKGCfmB9E83e5JO+eRpX3HPYLnvCDnUL7T9y4OI0slVoX +Ti34AUvDOkarbRpp9Qd2vw/2h4O/WMXTojPo68oDLpcH/UE7cTLbhDaDWjKc +A+x302Gs/UqONmsGnY8tWPl3Cx2ePPCd+3FrBtU+/bMQsD0ArgcNfNZsn0Gr +feAEtToATr97GF4xP4PU17xuVq4NgK4ConDLwgwyZjvJCz8NAN+fvQld2G6b +vG93PguAZLt6Lb6fOF+Z9TahMQAOxXcab1+cQYq9/65u6AwAObNz1m/4SaTt +K5fr8z0AhDceizwhSiJLP15xigkDNoQpHhlRJNHNvMloZzMGwO8gHV8lEq1p +m7aRs2BA/TiKb8XmbfneXmzNgN802oZqZRL/v/j42ZsZUP6oozhFlUSrvkt6 +Su1kgKfVyx4xTRJ9PWO6oiCMASviFFt6dEmUURMfXHWTATo3m7NiTUkURrlo +GVvMgFZ/ecEObMfbFSssShgQRcSrU81IJHpx+PajMgYI6NP3j2GnRLlyH95n +QJGq1ZiXBYni9bQPPHjOAFJ9zEzXmkQhF9+G3vvMgNfp2pbHgUTbVw1viurH +82lBMh3Yuil84pQvDLh32Pqyri2JhqNMyyqGGNAy4H+bje3vXDB+d4wBNbEH +6iTsSOQhFB1e/oMBXnmJH09uIZF9tGJEqSwTnhcd8LHYQaLnBak7suWZMLi9 +PjMVexN7WjtWkQnNyeO+7djGOm+77FSZkPM+oSHcgUQKH4/Y9egwwXXAsPmK +I4lGrXplRU2Z8PbL84JRZxKdFbj6JHAXExQqB+bNd+H1bxDLddrNhH1W+13i +sJO9Y6Ooe5kQesnQpho79r7ruj9eTFDyzPpq5Y77E/xZOXQmdCbY7zLfTSLq +GzrjZSQTlpttKlfeS6KPWTortTKZsDnaUinPi0R3kHgQJ4sJNC5ntBE7eZys +LzvHhFP8Nv4/sCnb6xMtLjLh1bVaSy9vvH98AdNOV5hglGx/TcaHRFsPXu2K +LWWCmfYV2pF9JFJROWlmc4cJfMvDfW5ik28OnhO8y4Tk5kPy77Gvr0VOGZVM +uEqqJej4kmixt7eusJoJO8tl5hux7zsqFTc1MIFo9i7n9yNR2g8BofNvmPDb +nVy+DptezPX3ZDPhuE/QMkdsiWXVSl+bmUAxesc5jx1a43F2oYMJjbGkr6Y/ +ibT0c1jaQ0y4/8Hq13o6iX58TGgbGWaC7CnFTAfslhSmcTmHCaebk1+HYCcO +mHAtx5hwpnJYvRi7O7dtn8sM3k91eoJqAImyl0tuOcxPQFk4q2sBu3a61ztG +kAC5P+/yZRkk+tZbEhUuRED9fB6Pgr3pPu0qfQUBbn6HTUOwh/1if+6QJCDE +qGVvG7aE4xapLdIEcK//lTSGbW0upYdkCBBWmKcIMUmUKV66h6pAQPmILTLF +tq7uq1DSwOP773DPYhNFpQ0yWgRUZK2IKVoanxnXt1qHgACDs6eqsYcJafFl +egQYF6/0HFx6Lm0fNGZMQKEa/dQGgkTVv6WThikEcCb/jbbFHhrpv9BvQsDb +b4JcN2yrusMv2i0IyI17fzgG+2voHdUnQIAtZBjcw17lccT00WYC6mpmWHXY +lnbbHCtoBLTwXJyasDMUvsQVbSPgudeXfA521bLyzIIdBNypkpafxR6cOHIr +z5EAkKeo8geSyOKVzIczrgS0Sho2yWHTK76MnnAjYHW8UKwm9pnL5QL/cyeA +dfJ5mQH2l6jtxiwPAp5ID9YibHFfWfsILwL0VtnlbFvK2z64L8SHgM/Xjv50 +XZqvlpDm60dAz6GMYD/sKtEd1z3oBCgOeEcFLuXNyj52YxBwciP/8vClvIHB +ZkeCADNKwrqYpTz23eGtQQRcfdbUFrfU71HCIoQQUN1Grkxayr++Y411KM6P +5DUfX8o/I7feNJyA7upqtZNL+bFfbTdEEDD7xeNnGrYYo8JDL4qAPmoD/Sy2 +uUviQa0YvB4xkT3ZS/lWDqkqLAK0vsh9OI+driOfLxdLgKrN974c7IcSQ5WS +hwnQrSti5WIP/Kx4szKeAAMVrby8pfxviQNCiQRkqB20/wfbrNVh/k8SAcq3 +Th1b8v8B+HIDmg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10100,105 +10425,106 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1Hk8VN0fB3BLJFGW7PtWCGnGrsf5ypTKmlS2xJi5lpDtmShL/UILCZV4 +SiopeUjSItSjUlETQrIkJBqDsV2iUr/jj/u6r/frnvN5fc49514N+kE3pgAf +Hx8HX0v3yCajdY9ammwY+neftrE5yIZ3w5ROK0UDSlKcJfcXmJ3XptWiS6qm +jHZsV8Y7YTHqSzRKUaB+wK6ITXohRGMjpudT9w7sU6/k65JK3qOCbO3Gj9iP +WyKv/KJ8QOf6HDK7sLndb+LjajqRi61JSQ+24pCW95zdJ2T2uFf2M7bDRLxl +NLsPPdq2raMf++kv7srYkgGUNxXNGcTuOCZ35GH4IPrvgZ/TN2yeMI1LUoYQ +urhKaBRbOD3Ck/p9GEXkJqyewFaVzG+IrOGg4Zqy0BlsZ6W5mzy7MZQRs1Nt +EZu4qilrKMJDz1e/jBF4x0FJOi4pB9gTyKVrQVkEu1OufWNMyRTKEbrFXIPN +8AoJPpc+jQQj1ISVsCcv8127Fz6DhOU9FzSwRTQNJaYos4hGkeg0xj7PeGEv +ITOH+svOvLDAVr/lmbTh+xxKiWPz22JbGKTywmrm0WuZDJYbdpBZH5tr9wvp +/9awjcMmY/9eJrp2Ef05X/L8OPbRmpWb9ER+o/gSMicDOxcs/g1k/0GHQt+Z +Fy31K2qgRZXww8412V4d2CWvzvUfUxIA5cB1UYNLfb/5xmelC0BpdOKnSex4 +/dnKu+GCkNETeVusCfct19CaoAiBdXe49jbs7paxp78LhWAVT6p1L7b69COv +VTLCcEAwrjUQu9TEOdvwuzD0eaa9PYld//gwf2iNCDA+NF5pwp590dbHsROD +3IJHjcHNHCTlKCZx5KkY6K6zCzqKbdxOA3FLcbBKkQ66iB3y9cHVjUaroE74 +eNor7AgBtvFfYhLQu3DFX6+Fg4Y070ylzElCgUP3Dv73+P0Qb1Y0U6XA6FDN +ogq2wL/DGvKRUlCY/0XSGludquZWMioFTw0EfVnYXnaZ95r6peH35bMpU9jN +AVHRcm9lwKqDI/mjlYM+38pI8xORhdT/qF3KbRw0NlpSeHuLLFQKveIHbNGY +wTbrOlnwXvGMdQKbluxu4vdADhrzpScV2zmo+obZbHGBAvRTbdXdP3DQjaEf +LKsYFcjsOHxodScHbdt94nN0mQqkjmdvs8Yeq5feWjasAueVEsMDsU1uGMio +e6qCs3pTVR12Pd23UshGDRrS99of6uKg6Yn+Q5zj6tDrt9aR7OYg6TDa/Uon +TdjSHzZr+Bmf8xuiQa4hmuAQqeTPwK761KI0nqoJmZEFGpewfRz3HV9bpwlr +KOuvrejD/daz3PIoWlDQ6f4PF9uEe2syUU4bOMaif9cOcJB74ErDHQM6YPmR +zS4Y4iDE2k3Zu6gDjmd10vuw9VMKzBkKa8ExRyxfbZiD+AqpmxN3rgVlodTK +q9hln7333nu2FlIu6FXe/Ia/zz2lxxSvr4MwOafFZyO4H82pg0vXg5yzbU9M +eRxUuOtiz/dEPVg1ZVSehJ1BH+hfdkkPfJ2VpxuxGUf/HlVt04OIqLLQ/RMc +JFmbz7fLTh9e55WaZEzi80Pl6ddorQdTVQuJn9McpKR5NintqwFsl3Cdk5zn +oNrTpN6CgCEsNKejMGyfGc92QsMQ7t5o5DRgX6nX1tvsawgByjTvYwscpBlY +3Tr/0RAuGEDd3A+83tIhHeKtEUjciD49s8hBKkqqhLqnMXjsf6RuumwEGRTF +iP1EFJi3uOjdKTmC6Izjs4bOFNh8ynLKTmoE5Wplf/bzocD0h6TucmzB6+V3 +X8VSwKts/tZJ6RHUfYXrnl1BgSC7fCMbmRF0KtcvX0+LCg9L67hV8iNoOM3R +yEPYBBTedKiOq42ga1Harg/YphAUFhzrumEEtbCQeXKRJZTrtjqs2z2CNHw/ +OO8L/Qsyrpkqbz06gph/Ht5RiQO4/w9h0FY2guRGq5bL0TfDf3LBSUJDIyiG +uulTtj4Ntj3QNfmlwkX08V8N0twtECni+m3Yi4vKNkcvL2i2By/dxIyi61x0 +gwx5Vnp+OwSLqzl0c7lo3lb+XX2SA1CiowLZNqOol09wasDfCUbn7i/25Yyi +cOWDmce0XMDy0+Mjv8ZH0Z3ghroLKa5wzWxD5MudY+jwjML39cE7oaeMJ/Ks +cgzN7ti65/V+N5jklnYIa40jS+8s26Gdu2CNuTnb/MI4alXID6mnusOmVPeJ +CUEeUrx5vLZYdzecEezhbT7KQ1X9+o7O4ntguHC8VXyeh1TbJwNZ43vgP9Gt +ozcjJhD1QlZpYf9emGneVH5pbgLlL5sxyn7hAQdD2RtXW0+ih7YbulMee8Lz +rffG4NgkyjU/LfmrxAscJHTiF15NouaeolRqujf8r/CS5EGRKfTA6bJ2xFEf +eKNVtS7NZQpNhe3iC2fsg7d9nmvuZU2h2a16QTw7X/BYLZqy+H4KFY93zUeb +7Yc9dIGSGtlp5HGtKGCfmB9E83e5JO+eRpX3HPYLnvCDnUL7T9y4OI0slVoX +Ti34AUvDOkarbRpp9Qd2vw/2h4O/WMXTojPo68oDLpcH/UE7cTLbhDaDWjKc +A+x302Gs/UqONmsGnY8tWPl3Cx2ePPCd+3FrBtU+/bMQsD0ArgcNfNZsn0Gr +feAEtToATr97GF4xP4PU17xuVq4NgK4ConDLwgwyZjvJCz8NAN+fvQld2G6b +vG93PguAZLt6Lb6fOF+Z9TahMQAOxXcab1+cQYq9/65u6AwAObNz1m/4SaTt +K5fr8z0AhDceizwhSiJLP15xigkDNoQpHhlRJNHNvMloZzMGwO8gHV8lEq1p +m7aRs2BA/TiKb8XmbfneXmzNgN802oZqZRL/v/j42ZsZUP6oozhFlUSrvkt6 +Su1kgKfVyx4xTRJ9PWO6oiCMASviFFt6dEmUURMfXHWTATo3m7NiTUkURrlo +GVvMgFZ/ecEObMfbFSssShgQRcSrU81IJHpx+PajMgYI6NP3j2GnRLlyH95n +QJGq1ZiXBYni9bQPPHjOAFJ9zEzXmkQhF9+G3vvMgNfp2pbHgUTbVw1viurH +82lBMh3Yuil84pQvDLh32Pqyri2JhqNMyyqGGNAy4H+bje3vXDB+d4wBNbEH +6iTsSOQhFB1e/oMBXnmJH09uIZF9tGJEqSwTnhcd8LHYQaLnBak7suWZMLi9 +PjMVexN7WjtWkQnNyeO+7djGOm+77FSZkPM+oSHcgUQKH4/Y9egwwXXAsPmK +I4lGrXplRU2Z8PbL84JRZxKdFbj6JHAXExQqB+bNd+H1bxDLddrNhH1W+13i +sJO9Y6Ooe5kQesnQpho79r7ruj9eTFDyzPpq5Y77E/xZOXQmdCbY7zLfTSLq +GzrjZSQTlpttKlfeS6KPWTortTKZsDnaUinPi0R3kHgQJ4sJNC5ntBE7eZys +LzvHhFP8Nv4/sCnb6xMtLjLh1bVaSy9vvH98AdNOV5hglGx/TcaHRFsPXu2K +LWWCmfYV2pF9JFJROWlmc4cJfMvDfW5ik28OnhO8y4Tk5kPy77Gvr0VOGZVM +uEqqJej4kmixt7eusJoJO8tl5hux7zsqFTc1MIFo9i7n9yNR2g8BofNvmPDb +nVy+DptezPX3ZDPhuE/QMkdsiWXVSl+bmUAxesc5jx1a43F2oYMJjbGkr6Y/ +ibT0c1jaQ0y4/8Hq13o6iX58TGgbGWaC7CnFTAfslhSmcTmHCaebk1+HYCcO +mHAtx5hwpnJYvRi7O7dtn8sM3k91eoJqAImyl0tuOcxPQFk4q2sBu3a61ztG +kAC5P+/yZRkk+tZbEhUuRED9fB6Pgr3pPu0qfQUBbn6HTUOwh/1if+6QJCDE +qGVvG7aE4xapLdIEcK//lTSGbW0upYdkCBBWmKcIMUmUKV66h6pAQPmILTLF +tq7uq1DSwOP773DPYhNFpQ0yWgRUZK2IKVoanxnXt1qHgACDs6eqsYcJafFl +egQYF6/0HFx6Lm0fNGZMQKEa/dQGgkTVv6WThikEcCb/jbbFHhrpv9BvQsDb +b4JcN2yrusMv2i0IyI17fzgG+2voHdUnQIAtZBjcw17lccT00WYC6mpmWHXY +lnbbHCtoBLTwXJyasDMUvsQVbSPgudeXfA521bLyzIIdBNypkpafxR6cOHIr +z5EAkKeo8geSyOKVzIczrgS0Sho2yWHTK76MnnAjYHW8UKwm9pnL5QL/cyeA +dfJ5mQH2l6jtxiwPAp5ID9YibHFfWfsILwL0VtnlbFvK2z64L8SHgM/Xjv50 +XZqvlpDm60dAz6GMYD/sKtEd1z3oBCgOeEcFLuXNyj52YxBwciP/8vClvIHB +ZkeCADNKwrqYpTz23eGtQQRcfdbUFrfU71HCIoQQUN1Grkxayr++Y411KM6P +5DUfX8o/I7feNJyA7upqtZNL+bFfbTdEEDD7xeNnGrYYo8JDL4qAPmoD/Sy2 +uUviQa0YvB4xkT3ZS/lWDqkqLAK0vsh9OI+driOfLxdLgKrN974c7IcSQ5WS +hwnQrSti5WIP/Kx4szKeAAMVrby8pfxviQNCiQRkqB20/wfbrNVh/k8SAcq3 +Th1b8v8B+HIDmg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.7750033115747326, + 1.2752938327852865`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.7750033115747343}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10210,21 +10536,21 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.7750033115747326, + 1.2752938327852865`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.7750033115747343}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10238,103 +10564,104 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1Hk8VN0fB3BLJFGW7PtWCGnGrsf5ypTKmlS2xJi5lpDtmShL/UILCZV4 +SiopeUjSItSjUlETQrIkJBqDsV2iUr/jj/u6r/frnvN5fc49514N+kE3pgAf +Hx8HX0v3yCajdY9ammwY+neftrE5yIZ3w5ROK0UDSlKcJfcXmJ3XptWiS6qm +jHZsV8Y7YTHqSzRKUaB+wK6ITXohRGMjpudT9w7sU6/k65JK3qOCbO3Gj9iP +WyKv/KJ8QOf6HDK7sLndb+LjajqRi61JSQ+24pCW95zdJ2T2uFf2M7bDRLxl +NLsPPdq2raMf++kv7srYkgGUNxXNGcTuOCZ35GH4IPrvgZ/TN2yeMI1LUoYQ +urhKaBRbOD3Ck/p9GEXkJqyewFaVzG+IrOGg4Zqy0BlsZ6W5mzy7MZQRs1Nt +EZu4qilrKMJDz1e/jBF4x0FJOi4pB9gTyKVrQVkEu1OufWNMyRTKEbrFXIPN +8AoJPpc+jQQj1ISVsCcv8127Fz6DhOU9FzSwRTQNJaYos4hGkeg0xj7PeGEv +ITOH+svOvLDAVr/lmbTh+xxKiWPz22JbGKTywmrm0WuZDJYbdpBZH5tr9wvp +/9awjcMmY/9eJrp2Ef05X/L8OPbRmpWb9ER+o/gSMicDOxcs/g1k/0GHQt+Z +Fy31K2qgRZXww8412V4d2CWvzvUfUxIA5cB1UYNLfb/5xmelC0BpdOKnSex4 +/dnKu+GCkNETeVusCfct19CaoAiBdXe49jbs7paxp78LhWAVT6p1L7b69COv +VTLCcEAwrjUQu9TEOdvwuzD0eaa9PYld//gwf2iNCDA+NF5pwp590dbHsROD +3IJHjcHNHCTlKCZx5KkY6K6zCzqKbdxOA3FLcbBKkQ66iB3y9cHVjUaroE74 +eNor7AgBtvFfYhLQu3DFX6+Fg4Y070ylzElCgUP3Dv73+P0Qb1Y0U6XA6FDN +ogq2wL/DGvKRUlCY/0XSGludquZWMioFTw0EfVnYXnaZ95r6peH35bMpU9jN +AVHRcm9lwKqDI/mjlYM+38pI8xORhdT/qF3KbRw0NlpSeHuLLFQKveIHbNGY +wTbrOlnwXvGMdQKbluxu4vdADhrzpScV2zmo+obZbHGBAvRTbdXdP3DQjaEf +LKsYFcjsOHxodScHbdt94nN0mQqkjmdvs8Yeq5feWjasAueVEsMDsU1uGMio +e6qCs3pTVR12Pd23UshGDRrS99of6uKg6Yn+Q5zj6tDrt9aR7OYg6TDa/Uon +TdjSHzZr+Bmf8xuiQa4hmuAQqeTPwK761KI0nqoJmZEFGpewfRz3HV9bpwlr +KOuvrejD/daz3PIoWlDQ6f4PF9uEe2syUU4bOMaif9cOcJB74ErDHQM6YPmR +zS4Y4iDE2k3Zu6gDjmd10vuw9VMKzBkKa8ExRyxfbZiD+AqpmxN3rgVlodTK +q9hln7333nu2FlIu6FXe/Ia/zz2lxxSvr4MwOafFZyO4H82pg0vXg5yzbU9M +eRxUuOtiz/dEPVg1ZVSehJ1BH+hfdkkPfJ2VpxuxGUf/HlVt04OIqLLQ/RMc +JFmbz7fLTh9e55WaZEzi80Pl6ddorQdTVQuJn9McpKR5NintqwFsl3Cdk5zn +oNrTpN6CgCEsNKejMGyfGc92QsMQ7t5o5DRgX6nX1tvsawgByjTvYwscpBlY +3Tr/0RAuGEDd3A+83tIhHeKtEUjciD49s8hBKkqqhLqnMXjsf6RuumwEGRTF +iP1EFJi3uOjdKTmC6Izjs4bOFNh8ynLKTmoE5Wplf/bzocD0h6TucmzB6+V3 +X8VSwKts/tZJ6RHUfYXrnl1BgSC7fCMbmRF0KtcvX0+LCg9L67hV8iNoOM3R +yEPYBBTedKiOq42ga1Harg/YphAUFhzrumEEtbCQeXKRJZTrtjqs2z2CNHw/ +OO8L/Qsyrpkqbz06gph/Ht5RiQO4/w9h0FY2guRGq5bL0TfDf3LBSUJDIyiG +uulTtj4Ntj3QNfmlwkX08V8N0twtECni+m3Yi4vKNkcvL2i2By/dxIyi61x0 +gwx5Vnp+OwSLqzl0c7lo3lb+XX2SA1CiowLZNqOol09wasDfCUbn7i/25Yyi +cOWDmce0XMDy0+Mjv8ZH0Z3ghroLKa5wzWxD5MudY+jwjML39cE7oaeMJ/Ks +cgzN7ti65/V+N5jklnYIa40jS+8s26Gdu2CNuTnb/MI4alXID6mnusOmVPeJ +CUEeUrx5vLZYdzecEezhbT7KQ1X9+o7O4ntguHC8VXyeh1TbJwNZ43vgP9Gt +ozcjJhD1QlZpYf9emGneVH5pbgLlL5sxyn7hAQdD2RtXW0+ih7YbulMee8Lz +rffG4NgkyjU/LfmrxAscJHTiF15NouaeolRqujf8r/CS5EGRKfTA6bJ2xFEf +eKNVtS7NZQpNhe3iC2fsg7d9nmvuZU2h2a16QTw7X/BYLZqy+H4KFY93zUeb +7Yc9dIGSGtlp5HGtKGCfmB9E83e5JO+eRpX3HPYLnvCDnUL7T9y4OI0slVoX +Ti34AUvDOkarbRpp9Qd2vw/2h4O/WMXTojPo68oDLpcH/UE7cTLbhDaDWjKc +A+x302Gs/UqONmsGnY8tWPl3Cx2ePPCd+3FrBtU+/bMQsD0ArgcNfNZsn0Gr +feAEtToATr97GF4xP4PU17xuVq4NgK4ConDLwgwyZjvJCz8NAN+fvQld2G6b +vG93PguAZLt6Lb6fOF+Z9TahMQAOxXcab1+cQYq9/65u6AwAObNz1m/4SaTt +K5fr8z0AhDceizwhSiJLP15xigkDNoQpHhlRJNHNvMloZzMGwO8gHV8lEq1p +m7aRs2BA/TiKb8XmbfneXmzNgN802oZqZRL/v/j42ZsZUP6oozhFlUSrvkt6 +Su1kgKfVyx4xTRJ9PWO6oiCMASviFFt6dEmUURMfXHWTATo3m7NiTUkURrlo +GVvMgFZ/ecEObMfbFSssShgQRcSrU81IJHpx+PajMgYI6NP3j2GnRLlyH95n +QJGq1ZiXBYni9bQPPHjOAFJ9zEzXmkQhF9+G3vvMgNfp2pbHgUTbVw1viurH +82lBMh3Yuil84pQvDLh32Pqyri2JhqNMyyqGGNAy4H+bje3vXDB+d4wBNbEH +6iTsSOQhFB1e/oMBXnmJH09uIZF9tGJEqSwTnhcd8LHYQaLnBak7suWZMLi9 +PjMVexN7WjtWkQnNyeO+7djGOm+77FSZkPM+oSHcgUQKH4/Y9egwwXXAsPmK +I4lGrXplRU2Z8PbL84JRZxKdFbj6JHAXExQqB+bNd+H1bxDLddrNhH1W+13i +sJO9Y6Ooe5kQesnQpho79r7ruj9eTFDyzPpq5Y77E/xZOXQmdCbY7zLfTSLq +GzrjZSQTlpttKlfeS6KPWTortTKZsDnaUinPi0R3kHgQJ4sJNC5ntBE7eZys +LzvHhFP8Nv4/sCnb6xMtLjLh1bVaSy9vvH98AdNOV5hglGx/TcaHRFsPXu2K +LWWCmfYV2pF9JFJROWlmc4cJfMvDfW5ik28OnhO8y4Tk5kPy77Gvr0VOGZVM +uEqqJej4kmixt7eusJoJO8tl5hux7zsqFTc1MIFo9i7n9yNR2g8BofNvmPDb +nVy+DptezPX3ZDPhuE/QMkdsiWXVSl+bmUAxesc5jx1a43F2oYMJjbGkr6Y/ +ibT0c1jaQ0y4/8Hq13o6iX58TGgbGWaC7CnFTAfslhSmcTmHCaebk1+HYCcO +mHAtx5hwpnJYvRi7O7dtn8sM3k91eoJqAImyl0tuOcxPQFk4q2sBu3a61ztG +kAC5P+/yZRkk+tZbEhUuRED9fB6Pgr3pPu0qfQUBbn6HTUOwh/1if+6QJCDE +qGVvG7aE4xapLdIEcK//lTSGbW0upYdkCBBWmKcIMUmUKV66h6pAQPmILTLF +tq7uq1DSwOP773DPYhNFpQ0yWgRUZK2IKVoanxnXt1qHgACDs6eqsYcJafFl +egQYF6/0HFx6Lm0fNGZMQKEa/dQGgkTVv6WThikEcCb/jbbFHhrpv9BvQsDb +b4JcN2yrusMv2i0IyI17fzgG+2voHdUnQIAtZBjcw17lccT00WYC6mpmWHXY +lnbbHCtoBLTwXJyasDMUvsQVbSPgudeXfA521bLyzIIdBNypkpafxR6cOHIr +z5EAkKeo8geSyOKVzIczrgS0Sho2yWHTK76MnnAjYHW8UKwm9pnL5QL/cyeA +dfJ5mQH2l6jtxiwPAp5ID9YibHFfWfsILwL0VtnlbFvK2z64L8SHgM/Xjv50 +XZqvlpDm60dAz6GMYD/sKtEd1z3oBCgOeEcFLuXNyj52YxBwciP/8vClvIHB +ZkeCADNKwrqYpTz23eGtQQRcfdbUFrfU71HCIoQQUN1Grkxayr++Y411KM6P +5DUfX8o/I7feNJyA7upqtZNL+bFfbTdEEDD7xeNnGrYYo8JDL4qAPmoD/Sy2 +uUviQa0YvB4xkT3ZS/lWDqkqLAK0vsh9OI+driOfLxdLgKrN974c7IcSQ5WS +hwnQrSti5WIP/Kx4szKeAAMVrby8pfxviQNCiQRkqB20/wfbrNVh/k8SAcq3 +Th1b8v8B+HIDmg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.7750033115747326, 1.2752938327852865`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.7750033115747343}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10344,7 +10671,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5311368545847414}, + AxesOrigin->{0, 0.7750033115747343}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10372,7 +10700,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7750033115747326, 1.2752938327852865`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10380,9 +10709,9 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913301734961166`*^9}, + CellChangeTimes->{3.9913301734961166`*^9, 3.99435571541222*^9}, CellLabel-> - "Out[194]=",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] + "Out[118]=",ExpressionUUID->"adf9b589-a188-434b-ab46-c6557086e35a"] }, Open ]], Cell[CellGroupData[{ @@ -10397,7 +10726,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -10419,8 +10750,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -10445,213 +10775,179 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991848978152012*^9, - 3.99184898469532*^9}},ExpressionUUID->"ab29778f-f183-804b-b871-\ -4070462057d7"], + CellChangeTimes->{{3.991848978152012*^9, 3.99184898469532*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.47138536392029`*^-264\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1307807382398505`*^-272\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 195, - 153, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913301737143345`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.9943557156238613`*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], +In[119]:=",ExpressionUUID->"f6e283bf-40cb-4521-86e5-bb6ebb3d8c97"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.656148098260251`*^-275\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.27556731430511`*^-284\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 195, 154, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173723337*^9}, + 119, 42, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.9943557156351557`*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], +In[119]:=",ExpressionUUID->"03a8a8ab-58f6-4431-9cbd-c0d8572cd396"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.85074473590452`*^-286\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.4612738390898427`*^-295\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 195, 155, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173731432*^9}, + 2, 119, 43, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994355715646237*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], +In[119]:=",ExpressionUUID->"a626864d-0f26-4973-9752-9f30e28c6515"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 195, 156, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173739336*^9}, +during this calculation.\"", 2, 119, 44, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994355715654768*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], +In[119]:=",ExpressionUUID->"91ab20b8-0831-48c4-b50d-daea52b9eca1"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c81f8XB3AZGZXs7Q6kEsl2r3udYyQryWhIRkZRVAiRjCiiQirJDiVl +3E/1zShCRbTJSkopZSS7Ib/P76/7eD7ufZ/HvZ/365zzuPQ9Bx18uLm4uJhL +uLj+/zr7vrVZJbnI2PiwC7+q5kbjjlyZoybdcSDqG8TPCVQGlHyxR6Y7HdZp +ygknBOpAqP2NLp7uQhh60B/kE2gGouPS6b+6OJB0aNs6rUBHGKizOzjd1QhL +/2QoJwR4gYXK9/6fXa8hfXTv46/+wfCry+DCRNcgWL8TkIz2OAFNZteKXhVO +QZfdMQWRJRmgMFD9ZY/6Avgtmw9utMoBiQPuN/jNeDDAq2OsdboQ0rUsau2c +BTDQke6qZ30NejI3NPwUWYHreZVDBidvQHJR9AtuWVE836jEF3GwHKx1/cQk +lUWRWdWwUeFYOQg0Oziv1hDFZHlC7m5iOcR/WtVnYyKKy6J4w18WlMMxpfYv +GX6iqBhk9CDvTTkE5sv8U60RxZ7e2pASvQrYml2lbrNLDNcNPtHZOFUB0hmf +ks7niOPQZzFBjRuVILPuTvx8iTiGHGHkCVdUglzjyejdleJIs2NtGyUqgTKx +9sjqJnHMeZikkn2/ElbZHvKoHRbHNM1I7WcvK0GHd0H/k44EvrN1yAqZrYQt +IVKftZ9KYIZPqEKncRXYLxt+f+mNBHYHvW5nmFWBQ2F1z993EigReORs1qYq +2PbS9cXjHxK4toDL3N6+CnarX61xkZTEASItIMWzCvZ/1kyL85BE094C/00n +quCUk5Xx61lJTG+63/OoqQrkbj+X414ihR+828S5WqqgXNxpTmuZFPayiUK9 +9ip4+9qtMo0qhYYneB+kd1SBytYQpa2WUujl2vhJYqgKGjfnLX15WQofDX+t +MeTjwILFzPNnLGm0y86IWDDhQGpJRNmChTSG1LlPFWzkgMpSrkSNrdK4MOpf +Z2LFAdtHQiZnfKSRb0wbgu05kGVGI2zPSqPb+jT+XDcOGKLNpbYBadyyd/0N +sQgOBDMK3FvjZPDqH8rr8FscsM4XnrZJkcHP7nYXHCs5oMR/LPH5BRmkPONs +VCM48LJjW9Wb6zLoZdIV2HaPA+sPLed5/1wGP11YOvyuiQPDJWElk3Ky+Ko5 +qITVwwFXCbsxeUIWXza30n9yEaATWRubWyeL9Ln+JdY8BAgNrpGiP5ZFc5uH +Xbl8BFRX8IBqjyy2Z/v6soQIkLKpTt2wKIuufOmym8QJeBmrorvRRg5Liiia +V1QIMP/xOyLwkxwqNEoomJgTcNQyQ+3hqBx6cceaiFgQUF6g0Ss+K4ee2y+n +920iQMbJg1EtII+bb7VX+9oQMHrv0RzPenk8/TFUbYsDAefjUkMuh8vjZfMM +IT93Alr61qqMxsqjk7TY2j8eBPzVbXpjnCyP+7c+jEzaQ4Dv1xntzznySAgt +1mf5EMC03fVzfZM8Do1YdJzbT8CgpGpg8woFjAx34TSHEiB9sF5RWloBvR+v +3iUXToBty45nfjQFjHHuNTlwlIC7EcnqK3UU0Ko8vo33GAGnBya+79yhgNKR +5oMCsQRol9bu/VGogEe/9hK7TxOwl9tZ2vSmArq4954OSyYge9f444w7ZD23 +zBtnUghYKkxXZbYoYFuExpPyswT0Bp38HD+mgEK1AknN6QTEsrZ6yhkq4sov +MZ3GWQRYuuVOGpgqoom2mdOGKwQIx4yccLZVxCeEQ6xiNlm/KaEk1UMRXZa6 +fv+eQ8A965qRpUmK+G9rlIRDAQHRB/ijVM4rYq4VrxK9kACLs07CpjmKuFOc +98sI6Y5X4xuiqhRR42behZAiAiZ2KIdO9Shi2qPJSodrBPwXcYhf9LMi5o1/ +PLdI+nj2/cz144qoGvla4/p1ApZ/2F7rx01BAR3pstFSAt4sKbY9tZyCC4W5 +KYk3CMhSnuwvkqJg0cIZLVoZAav3pnB9UKNga4TcU9ObBIwn9qQt6FIwgz5b +/4z07RuqyvJAwZzqu1FOtwgwHW/YuM2Rgttkgp2dywlwOzJzuj2Sgk5hfy+o +VBKw6pKpwvcECrq3y46cqfx/fs7d4k+l4P4rO0SnSEf8XfvStIisNzTZWVlF +gAklzNOjnIJ5H2+FCnIIEMDmyah7FLTebjW2m/SFE26S1e0ULD32w+M3adfi +spK3byno5u/tYUoQoPRk3mD6AwVLbM4yT5L+NryxVXSEgvbpxROPSFcKnXfR +nKHgBe7PJ5bcJiBM/cOI7SIFZTnxM4akje00ovwFqfhsabPFAdJ8hyKEE8Wp ++OvOQPgV0u1pT/KKFamo0CR15jHp84SEVtNqKn44Xho/Rtql07PxgxYVZU/2 +eIjcIYA+V+74z4iKNxq+KWmSHpb5+1negophHpR2K9IVTKtQhj0VnT7U7fYg +Hep6kX+7CxUXuZf3BJFmHf+UGeJNRb7XjhBLmid/g1p6IBVvZ/enJZN++jCq +tiKcigJzU6/SSKd+emr7LI6KmfcGuTJIb+eTef89hYrn/sxS00lTVvscFLhE +xXj56A0ppIcsOVyqBVSMvP1UJ470Tf/FNLMyKj4pUFsXQjo4xVbZ8w4VZ/5O +SO8hzSy/fPt4PRXrFA7/sSFt3vV8YbyF/D7FPP/pkLbj4t3k/pqKZ2z1f0qT +3rGWkfqij4pSRdSyefL5eDkE9sAQFfeodw11kg6MvKpUOU7W33qksIJ0eFH3 +fto8+XsDxAcTSFtE0qNj+GjoFFE9vpp028q6q4ZCNEyonL8/Rd6nfdG2lglh +GqbtKZGoI73rWbKopwwNM+8/cv1/Hj54qurLKtKQ+u2IPRdp39kGl1d0Ggpm +iL6sIfNziDp71WQdDT0s0sNWkZ4hUlt+adJwxWxdQSeZxwjLdWNVujTkDnFz +jSOdcNhDX8mYhtqDWadekfkVWvrHpdeUhltPxf0OJp2adSE6fRMNf++J4BYn +ndX0tIV7Kw2F69hvLSoIoO7wGatxpuHwR9eiPrJfikYXRYNdaJhxRmd5AOkK +Sb1dn7zI9w3v3Uog+6t5b95YUygNI14q7zxL9qfVX4bYsUgaWor+kxQg/Ty1 +Q183hoZenvyhx8l+7qkWjClKouGFwSAVT7Lfx5eFiCVk01A5KcD1Xwl5n/nC +BuwCGkanRDjtJj2vW7prppiGS729ft0rJvPl9r7Ip4KGE77ldr7kvJGptDSw +aKShT3Ce1WVyXuWYf9r17zENPyr/edqfT/ZbT1TM3Tbyea0U56GS1uAmWlU7 +abi9KTT7Ui45H5wUXfmHabhyi84lT3I+Hpj/GdOygo5C/za07Mwg83TYV+qL +GB1dGM+WbTtP9vv33jIeGTqO+syetiPnbXFf01tjJTo6PjptqptKwPsHF9Tv +6NOxf1zr0Wtyfm9JYHQXuNNxpsz33O44Mt//bgXUe9Oxnr7CiULO/9FQJZ5+ +Pzr+EKEe7IsmIHHfsvUyIXSk+blVWEcR0GDTf+JsIh09lwQmLoSR+0IsVjOy +io7XNg/S7h4ggCt5pjnzLh2HXdLl2eR+es7j73K3lo5bhyISG/wI2D/jkPDz +ER0b/Pgb6nzJ++xW6dvbS9bbWNt1mtx/UnktJ514lDDcqIIR7UjAr3Ui7zWc +lfB4W31Qpz4BszlysTouSljqpUaf0yVgeuUqFYa7Emap38uS1CHvb4rhb+6n +hBGbbWYtNcn9WOs16xKlhK+SO2OSVpP9b/OfcGKxElbV3TkcLE3mbb8bDM4o +4df8Mce5aQ5c6t83+PW3Eg6sEuu/M8mBjC3BCWOL5Hmbcf/DExw4q5PYNi+o +jK6Cq7IHRjgQ96dq+0qKMvpQViRmDnJgfzLfIZaFMuZt81E+/oIDrLKb+Rcv +KiNjSjVg1TUO9NHK8jZeUcb5RUvnO0UciLhYmjudp4y+2pY9poUc+C+2JNuh +VBnLzi3WbMvhgPaO/EzhOmXsoNqK7DnPgbV8GaknPypjW5/ALoFoDki5R8aE +qqvgVQ0Ts1wnDvwUs/bY1qiC4ZHvcix+VcHnFI9tQfyqONJ8MPCSTBVY/Qiz +GtJfjdOm9fB5XSWMegkE345eg+P+Umds15WT/wekuU81rkXdg+Z+lSNlIPZM +9WzlDzV8i1tT3zaXgkJihb2+vjpGV38xST9wDTLXMUTE92pgWmmXp4xZMTyV +M9GbSluPI89X233WvgpMhcZUzbeauO9LdqDxigIQ5ikM8YzbgDWqTjkbt+QC +JZbK2qmqhXU+npGGYVkguMr1rsMTLdwVvOFy3t+LsJ4tWxG2Wxs13h6rDOLN +gKD3Yk3WXDootM/t9Eq5NPgxleJslamDIqrupamOZ2CT5uMsKw1dPGEWddhl +ZRI8mDL6M/dcF6sj2is7fsdDoLp27ysfPWSevTW85nossMe9O3YK6uPSi10/ +dkhGwUYVmc0rCvVx+MaGqWuy4bAm5nR4o4EB9sr81T0+Egx1RsV8tkwDHP5y +dbGlNxjs5+rTO1kGGPO75wT1aTCEB87cHDYxwCAJzYIf14OhxdXjo7CtAa44 +55okvzcY9jH0rXd5GGDn85CP2UNBUDr5UX460QA/Hjc6oDByGNR8GPWreg1Q +QJObu0XqEJxTsvt94p0B0vTezjUIHoLpgT16g+8N0ENovj7h10F44JJSlvvJ +AEtrUr41PjoIDvYDl6THDHC8ONtNzP0gHDVKOCTIZYj1OT6PFzICoUX0FX1s +lSGW5idcf7wiAHwe7Iu/fdgQXVn04jVa/jAe8D1sY4ghAieuI1zWH8IVD+x/ +G2qIEwU/vfqW+MPpYwcd5iMN8XLfs9Cu135QyQylsU4a4lGQNrxxxA/+3j1R +15RliI/7h1IrH+yD9Irc6ddNhjj2+W3a9O69UJ/f4f1TkoFFv1+b8b3whg+2 +dPdQGQYa3TXUn6r1Bq5fATv/yDEwrqbIfuK6N5hu5bfjozHwv396XdInvOHx +EqaBrBoDe5acp8obekP7njxBE2MGdqy+Y/O9yAt6VfzLU30ZONkqZ+6XtAem +ry/Oaf7HQOOd9F1fIz3gyzaL/KRqBt6kC7t5BnhAN+8Zy0+1DAygtWV8cfOA +Wg+5yxcbGPgsNSNWzNQD4mT0mAutpN8oZvwQ8ACRRP9jT9+R518cFzis5Q7q +ezu5fLiZ2F6R23QjZjd4rSoTzNrMxF1pA1onXV0g4pGbv6o9Ex8c3dRTYuoC +qT5ibRwHJm4Ju/qtf40L1BUfTWnbzkQ5kSHeczM7QULVcuWCJxO1rFb4/Dm3 +Ex6rDkl4hDLRpkNrcLxlB6itodJU85ho6f931Rvr7fBT7bw+Z4KJ9SkrKtnJ +TtDdjhvFp5h43vKo4ECYEzQEjjuGzDDRtNy5INXbCc5yrA7r/yYdfMxNxdgJ +1JhcN2t4jNDFJP358klH2GMVQG+SMkJdpTeXu1wdoWPvpuUdLCMs86Jylho7 +wL2iPx9nEo0wsXvtkwPq9qBvFjJnnWyEXj9XEZKK9nDn4+jy/DNGuNN3XUnb +CnvgUN4bWKcb4VCx3Fzd+y1wM7PhTO4VI9xm1HeP7bsF8lMSGJvKjXC9kccV +3gg7SApZmZb5xgiLHzXuX33bFlzMldGIwsKI1oS1A4FWsNAhINxEY6F06+PC +FU5WkO8z3metzEI15vILzgwr+HKyOsxlDQtV6dJpWrxWENS6peKoNguVFU0K +pK9Ywmm7Y5R7FizMUwmnnH62CWp2dP7VPcjCCTUhtUhzC5APOFW9voGFN7Pp +rM2hZnB20VcvuZGFs7JaxcV7zIA73aLqazMLu8JYQiJbzOD7Xb7S/FYWfnj4 ++qzcGjOo4YrPFHvDwmHzrp+8fabgkhETNjvEQr148zolc1PIrD2q92AZGzdl +nFhLVzaB5XY7q+SE2ch68Ol7jqgJxHww1AgTYaMBco+rcZnAPr55lQ2SbEyE +5Pgj/QgGW0IlCilsrHipGdeWifB2MGgqQYuNej7x2w+KIUgKHajavJ2Ntyuy +3h1VMoYis6iIiZ1sFO0SlLu9yAbtqLNm513Jz19u+CjWzwa7icrObk82zj+/ +n8jOZMPJtzO/vA6wsX596SkzETbMF0abRsSysbV6SHtmKQt6jc6/KSljI3Ne +sW6ZMBP2HSnKtipno0JHV/alHwyYLb/jM1rJxnQYWDB7xQAxpe45rbtsHOUR +I+cPA2wEFBXuN7CxqXpUZlKRAXUdJd5vOsnz2izfJj1DsBa+pxHazcZbGCBn +JWsI3ZtaZ2X62OT+qggc+2sA0zUjiW4f2Lj29oW4tGYD0CjYcOvbdzael9Jb +Z+5sAHW9JqEpY2y8np3DqWUYgLWEI2hOsLGtoH3SnmIAvqeOvAqZYaOM/7l1 +HV/1YbrhZJb0PBt9xHxGHrbrQ9zvS141v9lY+i1+sr1KH0R0S9V3L7Dx1UiL +ysxFfcgNqJlZXGRjwDO6L/OYPvwPeOLTVQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10665,172 +10961,134 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwV13c81f8XB3AZGZXs7Q6kEsl2r3udYyQryWhIRkZRVAiRjCiiQirJDiVl +3E/1zShCRbTJSkopZSS7Ib/P76/7eD7ufZ/HvZ/365zzuPQ9Bx18uLm4uJhL +uLj+/zr7vrVZJbnI2PiwC7+q5kbjjlyZoybdcSDqG8TPCVQGlHyxR6Y7HdZp +ygknBOpAqP2NLp7uQhh60B/kE2gGouPS6b+6OJB0aNs6rUBHGKizOzjd1QhL +/2QoJwR4gYXK9/6fXa8hfXTv46/+wfCry+DCRNcgWL8TkIz2OAFNZteKXhVO +QZfdMQWRJRmgMFD9ZY/6Avgtmw9utMoBiQPuN/jNeDDAq2OsdboQ0rUsau2c +BTDQke6qZ30NejI3NPwUWYHreZVDBidvQHJR9AtuWVE836jEF3GwHKx1/cQk +lUWRWdWwUeFYOQg0Oziv1hDFZHlC7m5iOcR/WtVnYyKKy6J4w18WlMMxpfYv +GX6iqBhk9CDvTTkE5sv8U60RxZ7e2pASvQrYml2lbrNLDNcNPtHZOFUB0hmf +ks7niOPQZzFBjRuVILPuTvx8iTiGHGHkCVdUglzjyejdleJIs2NtGyUqgTKx +9sjqJnHMeZikkn2/ElbZHvKoHRbHNM1I7WcvK0GHd0H/k44EvrN1yAqZrYQt +IVKftZ9KYIZPqEKncRXYLxt+f+mNBHYHvW5nmFWBQ2F1z993EigReORs1qYq +2PbS9cXjHxK4toDL3N6+CnarX61xkZTEASItIMWzCvZ/1kyL85BE094C/00n +quCUk5Xx61lJTG+63/OoqQrkbj+X414ihR+828S5WqqgXNxpTmuZFPayiUK9 +9ip4+9qtMo0qhYYneB+kd1SBytYQpa2WUujl2vhJYqgKGjfnLX15WQofDX+t +MeTjwILFzPNnLGm0y86IWDDhQGpJRNmChTSG1LlPFWzkgMpSrkSNrdK4MOpf +Z2LFAdtHQiZnfKSRb0wbgu05kGVGI2zPSqPb+jT+XDcOGKLNpbYBadyyd/0N +sQgOBDMK3FvjZPDqH8rr8FscsM4XnrZJkcHP7nYXHCs5oMR/LPH5BRmkPONs +VCM48LJjW9Wb6zLoZdIV2HaPA+sPLed5/1wGP11YOvyuiQPDJWElk3Ky+Ko5 +qITVwwFXCbsxeUIWXza30n9yEaATWRubWyeL9Ln+JdY8BAgNrpGiP5ZFc5uH +Xbl8BFRX8IBqjyy2Z/v6soQIkLKpTt2wKIuufOmym8QJeBmrorvRRg5Liiia +V1QIMP/xOyLwkxwqNEoomJgTcNQyQ+3hqBx6cceaiFgQUF6g0Ss+K4ee2y+n +920iQMbJg1EtII+bb7VX+9oQMHrv0RzPenk8/TFUbYsDAefjUkMuh8vjZfMM +IT93Alr61qqMxsqjk7TY2j8eBPzVbXpjnCyP+7c+jEzaQ4Dv1xntzznySAgt +1mf5EMC03fVzfZM8Do1YdJzbT8CgpGpg8woFjAx34TSHEiB9sF5RWloBvR+v +3iUXToBty45nfjQFjHHuNTlwlIC7EcnqK3UU0Ko8vo33GAGnBya+79yhgNKR +5oMCsQRol9bu/VGogEe/9hK7TxOwl9tZ2vSmArq4954OSyYge9f444w7ZD23 +zBtnUghYKkxXZbYoYFuExpPyswT0Bp38HD+mgEK1AknN6QTEsrZ6yhkq4sov +MZ3GWQRYuuVOGpgqoom2mdOGKwQIx4yccLZVxCeEQ6xiNlm/KaEk1UMRXZa6 +fv+eQ8A965qRpUmK+G9rlIRDAQHRB/ijVM4rYq4VrxK9kACLs07CpjmKuFOc +98sI6Y5X4xuiqhRR42behZAiAiZ2KIdO9Shi2qPJSodrBPwXcYhf9LMi5o1/ +PLdI+nj2/cz144qoGvla4/p1ApZ/2F7rx01BAR3pstFSAt4sKbY9tZyCC4W5 +KYk3CMhSnuwvkqJg0cIZLVoZAav3pnB9UKNga4TcU9ObBIwn9qQt6FIwgz5b +/4z07RuqyvJAwZzqu1FOtwgwHW/YuM2Rgttkgp2dywlwOzJzuj2Sgk5hfy+o +VBKw6pKpwvcECrq3y46cqfx/fs7d4k+l4P4rO0SnSEf8XfvStIisNzTZWVlF +gAklzNOjnIJ5H2+FCnIIEMDmyah7FLTebjW2m/SFE26S1e0ULD32w+M3adfi +spK3byno5u/tYUoQoPRk3mD6AwVLbM4yT5L+NryxVXSEgvbpxROPSFcKnXfR +nKHgBe7PJ5bcJiBM/cOI7SIFZTnxM4akje00ovwFqfhsabPFAdJ8hyKEE8Wp ++OvOQPgV0u1pT/KKFamo0CR15jHp84SEVtNqKn44Xho/Rtql07PxgxYVZU/2 +eIjcIYA+V+74z4iKNxq+KWmSHpb5+1negophHpR2K9IVTKtQhj0VnT7U7fYg +Hep6kX+7CxUXuZf3BJFmHf+UGeJNRb7XjhBLmid/g1p6IBVvZ/enJZN++jCq +tiKcigJzU6/SSKd+emr7LI6KmfcGuTJIb+eTef89hYrn/sxS00lTVvscFLhE +xXj56A0ppIcsOVyqBVSMvP1UJ470Tf/FNLMyKj4pUFsXQjo4xVbZ8w4VZ/5O +SO8hzSy/fPt4PRXrFA7/sSFt3vV8YbyF/D7FPP/pkLbj4t3k/pqKZ2z1f0qT +3rGWkfqij4pSRdSyefL5eDkE9sAQFfeodw11kg6MvKpUOU7W33qksIJ0eFH3 +fto8+XsDxAcTSFtE0qNj+GjoFFE9vpp028q6q4ZCNEyonL8/Rd6nfdG2lglh +GqbtKZGoI73rWbKopwwNM+8/cv1/Hj54qurLKtKQ+u2IPRdp39kGl1d0Ggpm +iL6sIfNziDp71WQdDT0s0sNWkZ4hUlt+adJwxWxdQSeZxwjLdWNVujTkDnFz +jSOdcNhDX8mYhtqDWadekfkVWvrHpdeUhltPxf0OJp2adSE6fRMNf++J4BYn +ndX0tIV7Kw2F69hvLSoIoO7wGatxpuHwR9eiPrJfikYXRYNdaJhxRmd5AOkK +Sb1dn7zI9w3v3Uog+6t5b95YUygNI14q7zxL9qfVX4bYsUgaWor+kxQg/Ty1 +Q183hoZenvyhx8l+7qkWjClKouGFwSAVT7Lfx5eFiCVk01A5KcD1Xwl5n/nC +BuwCGkanRDjtJj2vW7prppiGS729ft0rJvPl9r7Ip4KGE77ldr7kvJGptDSw +aKShT3Ce1WVyXuWYf9r17zENPyr/edqfT/ZbT1TM3Tbyea0U56GS1uAmWlU7 +abi9KTT7Ui45H5wUXfmHabhyi84lT3I+Hpj/GdOygo5C/za07Mwg83TYV+qL +GB1dGM+WbTtP9vv33jIeGTqO+syetiPnbXFf01tjJTo6PjptqptKwPsHF9Tv +6NOxf1zr0Wtyfm9JYHQXuNNxpsz33O44Mt//bgXUe9Oxnr7CiULO/9FQJZ5+ +Pzr+EKEe7IsmIHHfsvUyIXSk+blVWEcR0GDTf+JsIh09lwQmLoSR+0IsVjOy +io7XNg/S7h4ggCt5pjnzLh2HXdLl2eR+es7j73K3lo5bhyISG/wI2D/jkPDz +ER0b/Pgb6nzJ++xW6dvbS9bbWNt1mtx/UnktJ514lDDcqIIR7UjAr3Ui7zWc +lfB4W31Qpz4BszlysTouSljqpUaf0yVgeuUqFYa7Emap38uS1CHvb4rhb+6n +hBGbbWYtNcn9WOs16xKlhK+SO2OSVpP9b/OfcGKxElbV3TkcLE3mbb8bDM4o +4df8Mce5aQ5c6t83+PW3Eg6sEuu/M8mBjC3BCWOL5Hmbcf/DExw4q5PYNi+o +jK6Cq7IHRjgQ96dq+0qKMvpQViRmDnJgfzLfIZaFMuZt81E+/oIDrLKb+Rcv +KiNjSjVg1TUO9NHK8jZeUcb5RUvnO0UciLhYmjudp4y+2pY9poUc+C+2JNuh +VBnLzi3WbMvhgPaO/EzhOmXsoNqK7DnPgbV8GaknPypjW5/ALoFoDki5R8aE +qqvgVQ0Ts1wnDvwUs/bY1qiC4ZHvcix+VcHnFI9tQfyqONJ8MPCSTBVY/Qiz +GtJfjdOm9fB5XSWMegkE345eg+P+Umds15WT/wekuU81rkXdg+Z+lSNlIPZM +9WzlDzV8i1tT3zaXgkJihb2+vjpGV38xST9wDTLXMUTE92pgWmmXp4xZMTyV +M9GbSluPI89X233WvgpMhcZUzbeauO9LdqDxigIQ5ikM8YzbgDWqTjkbt+QC +JZbK2qmqhXU+npGGYVkguMr1rsMTLdwVvOFy3t+LsJ4tWxG2Wxs13h6rDOLN +gKD3Yk3WXDootM/t9Eq5NPgxleJslamDIqrupamOZ2CT5uMsKw1dPGEWddhl +ZRI8mDL6M/dcF6sj2is7fsdDoLp27ysfPWSevTW85nossMe9O3YK6uPSi10/ +dkhGwUYVmc0rCvVx+MaGqWuy4bAm5nR4o4EB9sr81T0+Egx1RsV8tkwDHP5y +dbGlNxjs5+rTO1kGGPO75wT1aTCEB87cHDYxwCAJzYIf14OhxdXjo7CtAa44 +55okvzcY9jH0rXd5GGDn85CP2UNBUDr5UX460QA/Hjc6oDByGNR8GPWreg1Q +QJObu0XqEJxTsvt94p0B0vTezjUIHoLpgT16g+8N0ENovj7h10F44JJSlvvJ +AEtrUr41PjoIDvYDl6THDHC8ONtNzP0gHDVKOCTIZYj1OT6PFzICoUX0FX1s +lSGW5idcf7wiAHwe7Iu/fdgQXVn04jVa/jAe8D1sY4ghAieuI1zWH8IVD+x/ +G2qIEwU/vfqW+MPpYwcd5iMN8XLfs9Cu135QyQylsU4a4lGQNrxxxA/+3j1R +15RliI/7h1IrH+yD9Irc6ddNhjj2+W3a9O69UJ/f4f1TkoFFv1+b8b3whg+2 +dPdQGQYa3TXUn6r1Bq5fATv/yDEwrqbIfuK6N5hu5bfjozHwv396XdInvOHx +EqaBrBoDe5acp8obekP7njxBE2MGdqy+Y/O9yAt6VfzLU30ZONkqZ+6XtAem +ry/Oaf7HQOOd9F1fIz3gyzaL/KRqBt6kC7t5BnhAN+8Zy0+1DAygtWV8cfOA +Wg+5yxcbGPgsNSNWzNQD4mT0mAutpN8oZvwQ8ACRRP9jT9+R518cFzis5Q7q +ezu5fLiZ2F6R23QjZjd4rSoTzNrMxF1pA1onXV0g4pGbv6o9Ex8c3dRTYuoC +qT5ibRwHJm4Ju/qtf40L1BUfTWnbzkQ5kSHeczM7QULVcuWCJxO1rFb4/Dm3 +Ex6rDkl4hDLRpkNrcLxlB6itodJU85ho6f931Rvr7fBT7bw+Z4KJ9SkrKtnJ +TtDdjhvFp5h43vKo4ECYEzQEjjuGzDDRtNy5INXbCc5yrA7r/yYdfMxNxdgJ +1JhcN2t4jNDFJP358klH2GMVQG+SMkJdpTeXu1wdoWPvpuUdLCMs86Jylho7 +wL2iPx9nEo0wsXvtkwPq9qBvFjJnnWyEXj9XEZKK9nDn4+jy/DNGuNN3XUnb +CnvgUN4bWKcb4VCx3Fzd+y1wM7PhTO4VI9xm1HeP7bsF8lMSGJvKjXC9kccV +3gg7SApZmZb5xgiLHzXuX33bFlzMldGIwsKI1oS1A4FWsNAhINxEY6F06+PC +FU5WkO8z3metzEI15vILzgwr+HKyOsxlDQtV6dJpWrxWENS6peKoNguVFU0K +pK9Ywmm7Y5R7FizMUwmnnH62CWp2dP7VPcjCCTUhtUhzC5APOFW9voGFN7Pp +rM2hZnB20VcvuZGFs7JaxcV7zIA73aLqazMLu8JYQiJbzOD7Xb7S/FYWfnj4 ++qzcGjOo4YrPFHvDwmHzrp+8fabgkhETNjvEQr148zolc1PIrD2q92AZGzdl +nFhLVzaB5XY7q+SE2ch68Ol7jqgJxHww1AgTYaMBco+rcZnAPr55lQ2SbEyE +5Pgj/QgGW0IlCilsrHipGdeWifB2MGgqQYuNej7x2w+KIUgKHajavJ2Ntyuy +3h1VMoYis6iIiZ1sFO0SlLu9yAbtqLNm513Jz19u+CjWzwa7icrObk82zj+/ +n8jOZMPJtzO/vA6wsX596SkzETbMF0abRsSysbV6SHtmKQt6jc6/KSljI3Ne +sW6ZMBP2HSnKtipno0JHV/alHwyYLb/jM1rJxnQYWDB7xQAxpe45rbtsHOUR +I+cPA2wEFBXuN7CxqXpUZlKRAXUdJd5vOsnz2izfJj1DsBa+pxHazcZbGCBn +JWsI3ZtaZ2X62OT+qggc+2sA0zUjiW4f2Lj29oW4tGYD0CjYcOvbdzael9Jb +Z+5sAHW9JqEpY2y8np3DqWUYgLWEI2hOsLGtoH3SnmIAvqeOvAqZYaOM/7l1 +HV/1YbrhZJb0PBt9xHxGHrbrQ9zvS141v9lY+i1+sr1KH0R0S9V3L7Dx1UiL +ysxFfcgNqJlZXGRjwDO6L/OYPvwPeOLTVQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07698941251394087}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10842,19 +11100,19 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07698941251394087}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10868,171 +11126,133 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwV13c81f8XB3AZGZXs7Q6kEsl2r3udYyQryWhIRkZRVAiRjCiiQirJDiVl +3E/1zShCRbTJSkopZSS7Ib/P76/7eD7ufZ/HvZ/365zzuPQ9Bx18uLm4uJhL +uLj+/zr7vrVZJbnI2PiwC7+q5kbjjlyZoybdcSDqG8TPCVQGlHyxR6Y7HdZp +ygknBOpAqP2NLp7uQhh60B/kE2gGouPS6b+6OJB0aNs6rUBHGKizOzjd1QhL +/2QoJwR4gYXK9/6fXa8hfXTv46/+wfCry+DCRNcgWL8TkIz2OAFNZteKXhVO +QZfdMQWRJRmgMFD9ZY/6Avgtmw9utMoBiQPuN/jNeDDAq2OsdboQ0rUsau2c +BTDQke6qZ30NejI3NPwUWYHreZVDBidvQHJR9AtuWVE836jEF3GwHKx1/cQk +lUWRWdWwUeFYOQg0Oziv1hDFZHlC7m5iOcR/WtVnYyKKy6J4w18WlMMxpfYv +GX6iqBhk9CDvTTkE5sv8U60RxZ7e2pASvQrYml2lbrNLDNcNPtHZOFUB0hmf +ks7niOPQZzFBjRuVILPuTvx8iTiGHGHkCVdUglzjyejdleJIs2NtGyUqgTKx +9sjqJnHMeZikkn2/ElbZHvKoHRbHNM1I7WcvK0GHd0H/k44EvrN1yAqZrYQt +IVKftZ9KYIZPqEKncRXYLxt+f+mNBHYHvW5nmFWBQ2F1z993EigReORs1qYq +2PbS9cXjHxK4toDL3N6+CnarX61xkZTEASItIMWzCvZ/1kyL85BE094C/00n +quCUk5Xx61lJTG+63/OoqQrkbj+X414ihR+828S5WqqgXNxpTmuZFPayiUK9 +9ip4+9qtMo0qhYYneB+kd1SBytYQpa2WUujl2vhJYqgKGjfnLX15WQofDX+t +MeTjwILFzPNnLGm0y86IWDDhQGpJRNmChTSG1LlPFWzkgMpSrkSNrdK4MOpf +Z2LFAdtHQiZnfKSRb0wbgu05kGVGI2zPSqPb+jT+XDcOGKLNpbYBadyyd/0N +sQgOBDMK3FvjZPDqH8rr8FscsM4XnrZJkcHP7nYXHCs5oMR/LPH5BRmkPONs +VCM48LJjW9Wb6zLoZdIV2HaPA+sPLed5/1wGP11YOvyuiQPDJWElk3Ky+Ko5 +qITVwwFXCbsxeUIWXza30n9yEaATWRubWyeL9Ln+JdY8BAgNrpGiP5ZFc5uH +Xbl8BFRX8IBqjyy2Z/v6soQIkLKpTt2wKIuufOmym8QJeBmrorvRRg5Liiia +V1QIMP/xOyLwkxwqNEoomJgTcNQyQ+3hqBx6cceaiFgQUF6g0Ss+K4ee2y+n +920iQMbJg1EtII+bb7VX+9oQMHrv0RzPenk8/TFUbYsDAefjUkMuh8vjZfMM +IT93Alr61qqMxsqjk7TY2j8eBPzVbXpjnCyP+7c+jEzaQ4Dv1xntzznySAgt +1mf5EMC03fVzfZM8Do1YdJzbT8CgpGpg8woFjAx34TSHEiB9sF5RWloBvR+v +3iUXToBty45nfjQFjHHuNTlwlIC7EcnqK3UU0Ko8vo33GAGnBya+79yhgNKR +5oMCsQRol9bu/VGogEe/9hK7TxOwl9tZ2vSmArq4954OSyYge9f444w7ZD23 +zBtnUghYKkxXZbYoYFuExpPyswT0Bp38HD+mgEK1AknN6QTEsrZ6yhkq4sov +MZ3GWQRYuuVOGpgqoom2mdOGKwQIx4yccLZVxCeEQ6xiNlm/KaEk1UMRXZa6 +fv+eQ8A965qRpUmK+G9rlIRDAQHRB/ijVM4rYq4VrxK9kACLs07CpjmKuFOc +98sI6Y5X4xuiqhRR42behZAiAiZ2KIdO9Shi2qPJSodrBPwXcYhf9LMi5o1/ +PLdI+nj2/cz144qoGvla4/p1ApZ/2F7rx01BAR3pstFSAt4sKbY9tZyCC4W5 +KYk3CMhSnuwvkqJg0cIZLVoZAav3pnB9UKNga4TcU9ObBIwn9qQt6FIwgz5b +/4z07RuqyvJAwZzqu1FOtwgwHW/YuM2Rgttkgp2dywlwOzJzuj2Sgk5hfy+o +VBKw6pKpwvcECrq3y46cqfx/fs7d4k+l4P4rO0SnSEf8XfvStIisNzTZWVlF +gAklzNOjnIJ5H2+FCnIIEMDmyah7FLTebjW2m/SFE26S1e0ULD32w+M3adfi +spK3byno5u/tYUoQoPRk3mD6AwVLbM4yT5L+NryxVXSEgvbpxROPSFcKnXfR +nKHgBe7PJ5bcJiBM/cOI7SIFZTnxM4akje00ovwFqfhsabPFAdJ8hyKEE8Wp ++OvOQPgV0u1pT/KKFamo0CR15jHp84SEVtNqKn44Xho/Rtql07PxgxYVZU/2 +eIjcIYA+V+74z4iKNxq+KWmSHpb5+1negophHpR2K9IVTKtQhj0VnT7U7fYg +Hep6kX+7CxUXuZf3BJFmHf+UGeJNRb7XjhBLmid/g1p6IBVvZ/enJZN++jCq +tiKcigJzU6/SSKd+emr7LI6KmfcGuTJIb+eTef89hYrn/sxS00lTVvscFLhE +xXj56A0ppIcsOVyqBVSMvP1UJ470Tf/FNLMyKj4pUFsXQjo4xVbZ8w4VZ/5O +SO8hzSy/fPt4PRXrFA7/sSFt3vV8YbyF/D7FPP/pkLbj4t3k/pqKZ2z1f0qT +3rGWkfqij4pSRdSyefL5eDkE9sAQFfeodw11kg6MvKpUOU7W33qksIJ0eFH3 +fto8+XsDxAcTSFtE0qNj+GjoFFE9vpp028q6q4ZCNEyonL8/Rd6nfdG2lglh +GqbtKZGoI73rWbKopwwNM+8/cv1/Hj54qurLKtKQ+u2IPRdp39kGl1d0Ggpm +iL6sIfNziDp71WQdDT0s0sNWkZ4hUlt+adJwxWxdQSeZxwjLdWNVujTkDnFz +jSOdcNhDX8mYhtqDWadekfkVWvrHpdeUhltPxf0OJp2adSE6fRMNf++J4BYn +ndX0tIV7Kw2F69hvLSoIoO7wGatxpuHwR9eiPrJfikYXRYNdaJhxRmd5AOkK +Sb1dn7zI9w3v3Uog+6t5b95YUygNI14q7zxL9qfVX4bYsUgaWor+kxQg/Ty1 +Q183hoZenvyhx8l+7qkWjClKouGFwSAVT7Lfx5eFiCVk01A5KcD1Xwl5n/nC +BuwCGkanRDjtJj2vW7prppiGS729ft0rJvPl9r7Ip4KGE77ldr7kvJGptDSw +aKShT3Ce1WVyXuWYf9r17zENPyr/edqfT/ZbT1TM3Tbyea0U56GS1uAmWlU7 +abi9KTT7Ui45H5wUXfmHabhyi84lT3I+Hpj/GdOygo5C/za07Mwg83TYV+qL +GB1dGM+WbTtP9vv33jIeGTqO+syetiPnbXFf01tjJTo6PjptqptKwPsHF9Tv +6NOxf1zr0Wtyfm9JYHQXuNNxpsz33O44Mt//bgXUe9Oxnr7CiULO/9FQJZ5+ +Pzr+EKEe7IsmIHHfsvUyIXSk+blVWEcR0GDTf+JsIh09lwQmLoSR+0IsVjOy +io7XNg/S7h4ggCt5pjnzLh2HXdLl2eR+es7j73K3lo5bhyISG/wI2D/jkPDz +ER0b/Pgb6nzJ++xW6dvbS9bbWNt1mtx/UnktJ514lDDcqIIR7UjAr3Ui7zWc +lfB4W31Qpz4BszlysTouSljqpUaf0yVgeuUqFYa7Emap38uS1CHvb4rhb+6n +hBGbbWYtNcn9WOs16xKlhK+SO2OSVpP9b/OfcGKxElbV3TkcLE3mbb8bDM4o +4df8Mce5aQ5c6t83+PW3Eg6sEuu/M8mBjC3BCWOL5Hmbcf/DExw4q5PYNi+o +jK6Cq7IHRjgQ96dq+0qKMvpQViRmDnJgfzLfIZaFMuZt81E+/oIDrLKb+Rcv +KiNjSjVg1TUO9NHK8jZeUcb5RUvnO0UciLhYmjudp4y+2pY9poUc+C+2JNuh +VBnLzi3WbMvhgPaO/EzhOmXsoNqK7DnPgbV8GaknPypjW5/ALoFoDki5R8aE +qqvgVQ0Ts1wnDvwUs/bY1qiC4ZHvcix+VcHnFI9tQfyqONJ8MPCSTBVY/Qiz +GtJfjdOm9fB5XSWMegkE345eg+P+Umds15WT/wekuU81rkXdg+Z+lSNlIPZM +9WzlDzV8i1tT3zaXgkJihb2+vjpGV38xST9wDTLXMUTE92pgWmmXp4xZMTyV +M9GbSluPI89X233WvgpMhcZUzbeauO9LdqDxigIQ5ikM8YzbgDWqTjkbt+QC +JZbK2qmqhXU+npGGYVkguMr1rsMTLdwVvOFy3t+LsJ4tWxG2Wxs13h6rDOLN +gKD3Yk3WXDootM/t9Eq5NPgxleJslamDIqrupamOZ2CT5uMsKw1dPGEWddhl +ZRI8mDL6M/dcF6sj2is7fsdDoLp27ysfPWSevTW85nossMe9O3YK6uPSi10/ +dkhGwUYVmc0rCvVx+MaGqWuy4bAm5nR4o4EB9sr81T0+Egx1RsV8tkwDHP5y +dbGlNxjs5+rTO1kGGPO75wT1aTCEB87cHDYxwCAJzYIf14OhxdXjo7CtAa44 +55okvzcY9jH0rXd5GGDn85CP2UNBUDr5UX460QA/Hjc6oDByGNR8GPWreg1Q +QJObu0XqEJxTsvt94p0B0vTezjUIHoLpgT16g+8N0ENovj7h10F44JJSlvvJ +AEtrUr41PjoIDvYDl6THDHC8ONtNzP0gHDVKOCTIZYj1OT6PFzICoUX0FX1s +lSGW5idcf7wiAHwe7Iu/fdgQXVn04jVa/jAe8D1sY4ghAieuI1zWH8IVD+x/ +G2qIEwU/vfqW+MPpYwcd5iMN8XLfs9Cu135QyQylsU4a4lGQNrxxxA/+3j1R +15RliI/7h1IrH+yD9Irc6ddNhjj2+W3a9O69UJ/f4f1TkoFFv1+b8b3whg+2 +dPdQGQYa3TXUn6r1Bq5fATv/yDEwrqbIfuK6N5hu5bfjozHwv396XdInvOHx +EqaBrBoDe5acp8obekP7njxBE2MGdqy+Y/O9yAt6VfzLU30ZONkqZ+6XtAem +ry/Oaf7HQOOd9F1fIz3gyzaL/KRqBt6kC7t5BnhAN+8Zy0+1DAygtWV8cfOA +Wg+5yxcbGPgsNSNWzNQD4mT0mAutpN8oZvwQ8ACRRP9jT9+R518cFzis5Q7q +ezu5fLiZ2F6R23QjZjd4rSoTzNrMxF1pA1onXV0g4pGbv6o9Ex8c3dRTYuoC +qT5ibRwHJm4Ju/qtf40L1BUfTWnbzkQ5kSHeczM7QULVcuWCJxO1rFb4/Dm3 +Ex6rDkl4hDLRpkNrcLxlB6itodJU85ho6f931Rvr7fBT7bw+Z4KJ9SkrKtnJ +TtDdjhvFp5h43vKo4ECYEzQEjjuGzDDRtNy5INXbCc5yrA7r/yYdfMxNxdgJ +1JhcN2t4jNDFJP358klH2GMVQG+SMkJdpTeXu1wdoWPvpuUdLCMs86Jylho7 +wL2iPx9nEo0wsXvtkwPq9qBvFjJnnWyEXj9XEZKK9nDn4+jy/DNGuNN3XUnb +CnvgUN4bWKcb4VCx3Fzd+y1wM7PhTO4VI9xm1HeP7bsF8lMSGJvKjXC9kccV +3gg7SApZmZb5xgiLHzXuX33bFlzMldGIwsKI1oS1A4FWsNAhINxEY6F06+PC +FU5WkO8z3metzEI15vILzgwr+HKyOsxlDQtV6dJpWrxWENS6peKoNguVFU0K +pK9Ywmm7Y5R7FizMUwmnnH62CWp2dP7VPcjCCTUhtUhzC5APOFW9voGFN7Pp +rM2hZnB20VcvuZGFs7JaxcV7zIA73aLqazMLu8JYQiJbzOD7Xb7S/FYWfnj4 ++qzcGjOo4YrPFHvDwmHzrp+8fabgkhETNjvEQr148zolc1PIrD2q92AZGzdl +nFhLVzaB5XY7q+SE2ch68Ol7jqgJxHww1AgTYaMBco+rcZnAPr55lQ2SbEyE +5Pgj/QgGW0IlCilsrHipGdeWifB2MGgqQYuNej7x2w+KIUgKHajavJ2Ntyuy +3h1VMoYis6iIiZ1sFO0SlLu9yAbtqLNm513Jz19u+CjWzwa7icrObk82zj+/ +n8jOZMPJtzO/vA6wsX596SkzETbMF0abRsSysbV6SHtmKQt6jc6/KSljI3Ne +sW6ZMBP2HSnKtipno0JHV/alHwyYLb/jM1rJxnQYWDB7xQAxpe45rbtsHOUR +I+cPA2wEFBXuN7CxqXpUZlKRAXUdJd5vOsnz2izfJj1DsBa+pxHazcZbGCBn +JWsI3ZtaZ2X62OT+qggc+2sA0zUjiW4f2Lj29oW4tGYD0CjYcOvbdzael9Jb +Z+5sAHW9JqEpY2y8np3DqWUYgLWEI2hOsLGtoH3SnmIAvqeOvAqZYaOM/7l1 +HV/1YbrhZJb0PBt9xHxGHrbrQ9zvS141v9lY+i1+sr1KH0R0S9V3L7Dx1UiL +ysxFfcgNqJlZXGRjwDO6L/OYPvwPeOLTVQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07698941251394087}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11043,6 +11263,7 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11070,7 +11291,8 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1813924222088017}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07698941251394087}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11078,17 +11300,622 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913306567510605`*^9}, + CellChangeTimes->{3.9913306567510605`*^9, 3.994356409927142*^9}, CellLabel-> - "Out[195]=",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] + "Out[119]=",ExpressionUUID->"b9b9f85d-5a76-4912-a213-faec154fe04f"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-\ -6bd251746ea6"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c81f8XB3AZGZXs7Q6kEsl2r3udYyQryWhIRkZRVAiRjCiiQirJDiVl +3E/1zShCRbTJSkopZSS7Ib/P76/7eD7ufZ/HvZ/365zzuPQ9Bx18uLm4uJhL +uLj+/zr7vrVZJbnI2PiwC7+q5kbjjlyZoybdcSDqG8TPCVQGlHyxR6Y7HdZp +ygknBOpAqP2NLp7uQhh60B/kE2gGouPS6b+6OJB0aNs6rUBHGKizOzjd1QhL +/2QoJwR4gYXK9/6fXa8hfXTv46/+wfCry+DCRNcgWL8TkIz2OAFNZteKXhVO +QZfdMQWRJRmgMFD9ZY/6Avgtmw9utMoBiQPuN/jNeDDAq2OsdboQ0rUsau2c +BTDQke6qZ30NejI3NPwUWYHreZVDBidvQHJR9AtuWVE836jEF3GwHKx1/cQk +lUWRWdWwUeFYOQg0Oziv1hDFZHlC7m5iOcR/WtVnYyKKy6J4w18WlMMxpfYv +GX6iqBhk9CDvTTkE5sv8U60RxZ7e2pASvQrYml2lbrNLDNcNPtHZOFUB0hmf +ks7niOPQZzFBjRuVILPuTvx8iTiGHGHkCVdUglzjyejdleJIs2NtGyUqgTKx +9sjqJnHMeZikkn2/ElbZHvKoHRbHNM1I7WcvK0GHd0H/k44EvrN1yAqZrYQt +IVKftZ9KYIZPqEKncRXYLxt+f+mNBHYHvW5nmFWBQ2F1z993EigReORs1qYq +2PbS9cXjHxK4toDL3N6+CnarX61xkZTEASItIMWzCvZ/1kyL85BE094C/00n +quCUk5Xx61lJTG+63/OoqQrkbj+X414ihR+828S5WqqgXNxpTmuZFPayiUK9 +9ip4+9qtMo0qhYYneB+kd1SBytYQpa2WUujl2vhJYqgKGjfnLX15WQofDX+t +MeTjwILFzPNnLGm0y86IWDDhQGpJRNmChTSG1LlPFWzkgMpSrkSNrdK4MOpf +Z2LFAdtHQiZnfKSRb0wbgu05kGVGI2zPSqPb+jT+XDcOGKLNpbYBadyyd/0N +sQgOBDMK3FvjZPDqH8rr8FscsM4XnrZJkcHP7nYXHCs5oMR/LPH5BRmkPONs +VCM48LJjW9Wb6zLoZdIV2HaPA+sPLed5/1wGP11YOvyuiQPDJWElk3Ky+Ko5 +qITVwwFXCbsxeUIWXza30n9yEaATWRubWyeL9Ln+JdY8BAgNrpGiP5ZFc5uH +Xbl8BFRX8IBqjyy2Z/v6soQIkLKpTt2wKIuufOmym8QJeBmrorvRRg5Liiia +V1QIMP/xOyLwkxwqNEoomJgTcNQyQ+3hqBx6cceaiFgQUF6g0Ss+K4ee2y+n +920iQMbJg1EtII+bb7VX+9oQMHrv0RzPenk8/TFUbYsDAefjUkMuh8vjZfMM +IT93Alr61qqMxsqjk7TY2j8eBPzVbXpjnCyP+7c+jEzaQ4Dv1xntzznySAgt +1mf5EMC03fVzfZM8Do1YdJzbT8CgpGpg8woFjAx34TSHEiB9sF5RWloBvR+v +3iUXToBty45nfjQFjHHuNTlwlIC7EcnqK3UU0Ko8vo33GAGnBya+79yhgNKR +5oMCsQRol9bu/VGogEe/9hK7TxOwl9tZ2vSmArq4954OSyYge9f444w7ZD23 +zBtnUghYKkxXZbYoYFuExpPyswT0Bp38HD+mgEK1AknN6QTEsrZ6yhkq4sov +MZ3GWQRYuuVOGpgqoom2mdOGKwQIx4yccLZVxCeEQ6xiNlm/KaEk1UMRXZa6 +fv+eQ8A965qRpUmK+G9rlIRDAQHRB/ijVM4rYq4VrxK9kACLs07CpjmKuFOc +98sI6Y5X4xuiqhRR42behZAiAiZ2KIdO9Shi2qPJSodrBPwXcYhf9LMi5o1/ +PLdI+nj2/cz144qoGvla4/p1ApZ/2F7rx01BAR3pstFSAt4sKbY9tZyCC4W5 +KYk3CMhSnuwvkqJg0cIZLVoZAav3pnB9UKNga4TcU9ObBIwn9qQt6FIwgz5b +/4z07RuqyvJAwZzqu1FOtwgwHW/YuM2Rgttkgp2dywlwOzJzuj2Sgk5hfy+o +VBKw6pKpwvcECrq3y46cqfx/fs7d4k+l4P4rO0SnSEf8XfvStIisNzTZWVlF +gAklzNOjnIJ5H2+FCnIIEMDmyah7FLTebjW2m/SFE26S1e0ULD32w+M3adfi +spK3byno5u/tYUoQoPRk3mD6AwVLbM4yT5L+NryxVXSEgvbpxROPSFcKnXfR +nKHgBe7PJ5bcJiBM/cOI7SIFZTnxM4akje00ovwFqfhsabPFAdJ8hyKEE8Wp ++OvOQPgV0u1pT/KKFamo0CR15jHp84SEVtNqKn44Xho/Rtql07PxgxYVZU/2 +eIjcIYA+V+74z4iKNxq+KWmSHpb5+1negophHpR2K9IVTKtQhj0VnT7U7fYg +Hep6kX+7CxUXuZf3BJFmHf+UGeJNRb7XjhBLmid/g1p6IBVvZ/enJZN++jCq +tiKcigJzU6/SSKd+emr7LI6KmfcGuTJIb+eTef89hYrn/sxS00lTVvscFLhE +xXj56A0ppIcsOVyqBVSMvP1UJ470Tf/FNLMyKj4pUFsXQjo4xVbZ8w4VZ/5O +SO8hzSy/fPt4PRXrFA7/sSFt3vV8YbyF/D7FPP/pkLbj4t3k/pqKZ2z1f0qT +3rGWkfqij4pSRdSyefL5eDkE9sAQFfeodw11kg6MvKpUOU7W33qksIJ0eFH3 +fto8+XsDxAcTSFtE0qNj+GjoFFE9vpp028q6q4ZCNEyonL8/Rd6nfdG2lglh +GqbtKZGoI73rWbKopwwNM+8/cv1/Hj54qurLKtKQ+u2IPRdp39kGl1d0Ggpm +iL6sIfNziDp71WQdDT0s0sNWkZ4hUlt+adJwxWxdQSeZxwjLdWNVujTkDnFz +jSOdcNhDX8mYhtqDWadekfkVWvrHpdeUhltPxf0OJp2adSE6fRMNf++J4BYn +ndX0tIV7Kw2F69hvLSoIoO7wGatxpuHwR9eiPrJfikYXRYNdaJhxRmd5AOkK +Sb1dn7zI9w3v3Uog+6t5b95YUygNI14q7zxL9qfVX4bYsUgaWor+kxQg/Ty1 +Q183hoZenvyhx8l+7qkWjClKouGFwSAVT7Lfx5eFiCVk01A5KcD1Xwl5n/nC +BuwCGkanRDjtJj2vW7prppiGS729ft0rJvPl9r7Ip4KGE77ldr7kvJGptDSw +aKShT3Ce1WVyXuWYf9r17zENPyr/edqfT/ZbT1TM3Tbyea0U56GS1uAmWlU7 +abi9KTT7Ui45H5wUXfmHabhyi84lT3I+Hpj/GdOygo5C/za07Mwg83TYV+qL +GB1dGM+WbTtP9vv33jIeGTqO+syetiPnbXFf01tjJTo6PjptqptKwPsHF9Tv +6NOxf1zr0Wtyfm9JYHQXuNNxpsz33O44Mt//bgXUe9Oxnr7CiULO/9FQJZ5+ +Pzr+EKEe7IsmIHHfsvUyIXSk+blVWEcR0GDTf+JsIh09lwQmLoSR+0IsVjOy +io7XNg/S7h4ggCt5pjnzLh2HXdLl2eR+es7j73K3lo5bhyISG/wI2D/jkPDz +ER0b/Pgb6nzJ++xW6dvbS9bbWNt1mtx/UnktJ514lDDcqIIR7UjAr3Ui7zWc +lfB4W31Qpz4BszlysTouSljqpUaf0yVgeuUqFYa7Emap38uS1CHvb4rhb+6n +hBGbbWYtNcn9WOs16xKlhK+SO2OSVpP9b/OfcGKxElbV3TkcLE3mbb8bDM4o +4df8Mce5aQ5c6t83+PW3Eg6sEuu/M8mBjC3BCWOL5Hmbcf/DExw4q5PYNi+o +jK6Cq7IHRjgQ96dq+0qKMvpQViRmDnJgfzLfIZaFMuZt81E+/oIDrLKb+Rcv +KiNjSjVg1TUO9NHK8jZeUcb5RUvnO0UciLhYmjudp4y+2pY9poUc+C+2JNuh +VBnLzi3WbMvhgPaO/EzhOmXsoNqK7DnPgbV8GaknPypjW5/ALoFoDki5R8aE +qqvgVQ0Ts1wnDvwUs/bY1qiC4ZHvcix+VcHnFI9tQfyqONJ8MPCSTBVY/Qiz +GtJfjdOm9fB5XSWMegkE345eg+P+Umds15WT/wekuU81rkXdg+Z+lSNlIPZM +9WzlDzV8i1tT3zaXgkJihb2+vjpGV38xST9wDTLXMUTE92pgWmmXp4xZMTyV +M9GbSluPI89X233WvgpMhcZUzbeauO9LdqDxigIQ5ikM8YzbgDWqTjkbt+QC +JZbK2qmqhXU+npGGYVkguMr1rsMTLdwVvOFy3t+LsJ4tWxG2Wxs13h6rDOLN +gKD3Yk3WXDootM/t9Eq5NPgxleJslamDIqrupamOZ2CT5uMsKw1dPGEWddhl +ZRI8mDL6M/dcF6sj2is7fsdDoLp27ysfPWSevTW85nossMe9O3YK6uPSi10/ +dkhGwUYVmc0rCvVx+MaGqWuy4bAm5nR4o4EB9sr81T0+Egx1RsV8tkwDHP5y +dbGlNxjs5+rTO1kGGPO75wT1aTCEB87cHDYxwCAJzYIf14OhxdXjo7CtAa44 +55okvzcY9jH0rXd5GGDn85CP2UNBUDr5UX460QA/Hjc6oDByGNR8GPWreg1Q +QJObu0XqEJxTsvt94p0B0vTezjUIHoLpgT16g+8N0ENovj7h10F44JJSlvvJ +AEtrUr41PjoIDvYDl6THDHC8ONtNzP0gHDVKOCTIZYj1OT6PFzICoUX0FX1s +lSGW5idcf7wiAHwe7Iu/fdgQXVn04jVa/jAe8D1sY4ghAieuI1zWH8IVD+x/ +G2qIEwU/vfqW+MPpYwcd5iMN8XLfs9Cu135QyQylsU4a4lGQNrxxxA/+3j1R +15RliI/7h1IrH+yD9Irc6ddNhjj2+W3a9O69UJ/f4f1TkoFFv1+b8b3whg+2 +dPdQGQYa3TXUn6r1Bq5fATv/yDEwrqbIfuK6N5hu5bfjozHwv396XdInvOHx +EqaBrBoDe5acp8obekP7njxBE2MGdqy+Y/O9yAt6VfzLU30ZONkqZ+6XtAem +ry/Oaf7HQOOd9F1fIz3gyzaL/KRqBt6kC7t5BnhAN+8Zy0+1DAygtWV8cfOA +Wg+5yxcbGPgsNSNWzNQD4mT0mAutpN8oZvwQ8ACRRP9jT9+R518cFzis5Q7q +ezu5fLiZ2F6R23QjZjd4rSoTzNrMxF1pA1onXV0g4pGbv6o9Ex8c3dRTYuoC +qT5ibRwHJm4Ju/qtf40L1BUfTWnbzkQ5kSHeczM7QULVcuWCJxO1rFb4/Dm3 +Ex6rDkl4hDLRpkNrcLxlB6itodJU85ho6f931Rvr7fBT7bw+Z4KJ9SkrKtnJ +TtDdjhvFp5h43vKo4ECYEzQEjjuGzDDRtNy5INXbCc5yrA7r/yYdfMxNxdgJ +1JhcN2t4jNDFJP358klH2GMVQG+SMkJdpTeXu1wdoWPvpuUdLCMs86Jylho7 +wL2iPx9nEo0wsXvtkwPq9qBvFjJnnWyEXj9XEZKK9nDn4+jy/DNGuNN3XUnb +CnvgUN4bWKcb4VCx3Fzd+y1wM7PhTO4VI9xm1HeP7bsF8lMSGJvKjXC9kccV +3gg7SApZmZb5xgiLHzXuX33bFlzMldGIwsKI1oS1A4FWsNAhINxEY6F06+PC +FU5WkO8z3metzEI15vILzgwr+HKyOsxlDQtV6dJpWrxWENS6peKoNguVFU0K +pK9Ywmm7Y5R7FizMUwmnnH62CWp2dP7VPcjCCTUhtUhzC5APOFW9voGFN7Pp +rM2hZnB20VcvuZGFs7JaxcV7zIA73aLqazMLu8JYQiJbzOD7Xb7S/FYWfnj4 ++qzcGjOo4YrPFHvDwmHzrp+8fabgkhETNjvEQr148zolc1PIrD2q92AZGzdl +nFhLVzaB5XY7q+SE2ch68Ol7jqgJxHww1AgTYaMBco+rcZnAPr55lQ2SbEyE +5Pgj/QgGW0IlCilsrHipGdeWifB2MGgqQYuNej7x2w+KIUgKHajavJ2Ntyuy +3h1VMoYis6iIiZ1sFO0SlLu9yAbtqLNm513Jz19u+CjWzwa7icrObk82zj+/ +n8jOZMPJtzO/vA6wsX596SkzETbMF0abRsSysbV6SHtmKQt6jc6/KSljI3Ne +sW6ZMBP2HSnKtipno0JHV/alHwyYLb/jM1rJxnQYWDB7xQAxpe45rbtsHOUR +I+cPA2wEFBXuN7CxqXpUZlKRAXUdJd5vOsnz2izfJj1DsBa+pxHazcZbGCBn +JWsI3ZtaZ2X62OT+qggc+2sA0zUjiW4f2Lj29oW4tGYD0CjYcOvbdzael9Jb +Z+5sAHW9JqEpY2y8np3DqWUYgLWEI2hOsLGtoH3SnmIAvqeOvAqZYaOM/7l1 +HV/1YbrhZJb0PBt9xHxGHrbrQ9zvS141v9lY+i1+sr1KH0R0S9V3L7Dx1UiL +ysxFfcgNqJlZXGRjwDO6L/OYPvwPeOLTVQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c81f8XB3AZGZXs7Q6kEsl2r3udYyQryWhIRkZRVAiRjCiiQirJDiVl +3E/1zShCRbTJSkopZSS7Ib/P76/7eD7ufZ/HvZ/365zzuPQ9Bx18uLm4uJhL +uLj+/zr7vrVZJbnI2PiwC7+q5kbjjlyZoybdcSDqG8TPCVQGlHyxR6Y7HdZp +ygknBOpAqP2NLp7uQhh60B/kE2gGouPS6b+6OJB0aNs6rUBHGKizOzjd1QhL +/2QoJwR4gYXK9/6fXa8hfXTv46/+wfCry+DCRNcgWL8TkIz2OAFNZteKXhVO +QZfdMQWRJRmgMFD9ZY/6Avgtmw9utMoBiQPuN/jNeDDAq2OsdboQ0rUsau2c +BTDQke6qZ30NejI3NPwUWYHreZVDBidvQHJR9AtuWVE836jEF3GwHKx1/cQk +lUWRWdWwUeFYOQg0Oziv1hDFZHlC7m5iOcR/WtVnYyKKy6J4w18WlMMxpfYv +GX6iqBhk9CDvTTkE5sv8U60RxZ7e2pASvQrYml2lbrNLDNcNPtHZOFUB0hmf +ks7niOPQZzFBjRuVILPuTvx8iTiGHGHkCVdUglzjyejdleJIs2NtGyUqgTKx +9sjqJnHMeZikkn2/ElbZHvKoHRbHNM1I7WcvK0GHd0H/k44EvrN1yAqZrYQt +IVKftZ9KYIZPqEKncRXYLxt+f+mNBHYHvW5nmFWBQ2F1z993EigReORs1qYq +2PbS9cXjHxK4toDL3N6+CnarX61xkZTEASItIMWzCvZ/1kyL85BE094C/00n +quCUk5Xx61lJTG+63/OoqQrkbj+X414ihR+828S5WqqgXNxpTmuZFPayiUK9 +9ip4+9qtMo0qhYYneB+kd1SBytYQpa2WUujl2vhJYqgKGjfnLX15WQofDX+t +MeTjwILFzPNnLGm0y86IWDDhQGpJRNmChTSG1LlPFWzkgMpSrkSNrdK4MOpf +Z2LFAdtHQiZnfKSRb0wbgu05kGVGI2zPSqPb+jT+XDcOGKLNpbYBadyyd/0N +sQgOBDMK3FvjZPDqH8rr8FscsM4XnrZJkcHP7nYXHCs5oMR/LPH5BRmkPONs +VCM48LJjW9Wb6zLoZdIV2HaPA+sPLed5/1wGP11YOvyuiQPDJWElk3Ky+Ko5 +qITVwwFXCbsxeUIWXza30n9yEaATWRubWyeL9Ln+JdY8BAgNrpGiP5ZFc5uH +Xbl8BFRX8IBqjyy2Z/v6soQIkLKpTt2wKIuufOmym8QJeBmrorvRRg5Liiia +V1QIMP/xOyLwkxwqNEoomJgTcNQyQ+3hqBx6cceaiFgQUF6g0Ss+K4ee2y+n +920iQMbJg1EtII+bb7VX+9oQMHrv0RzPenk8/TFUbYsDAefjUkMuh8vjZfMM +IT93Alr61qqMxsqjk7TY2j8eBPzVbXpjnCyP+7c+jEzaQ4Dv1xntzznySAgt +1mf5EMC03fVzfZM8Do1YdJzbT8CgpGpg8woFjAx34TSHEiB9sF5RWloBvR+v +3iUXToBty45nfjQFjHHuNTlwlIC7EcnqK3UU0Ko8vo33GAGnBya+79yhgNKR +5oMCsQRol9bu/VGogEe/9hK7TxOwl9tZ2vSmArq4954OSyYge9f444w7ZD23 +zBtnUghYKkxXZbYoYFuExpPyswT0Bp38HD+mgEK1AknN6QTEsrZ6yhkq4sov +MZ3GWQRYuuVOGpgqoom2mdOGKwQIx4yccLZVxCeEQ6xiNlm/KaEk1UMRXZa6 +fv+eQ8A965qRpUmK+G9rlIRDAQHRB/ijVM4rYq4VrxK9kACLs07CpjmKuFOc +98sI6Y5X4xuiqhRR42behZAiAiZ2KIdO9Shi2qPJSodrBPwXcYhf9LMi5o1/ +PLdI+nj2/cz144qoGvla4/p1ApZ/2F7rx01BAR3pstFSAt4sKbY9tZyCC4W5 +KYk3CMhSnuwvkqJg0cIZLVoZAav3pnB9UKNga4TcU9ObBIwn9qQt6FIwgz5b +/4z07RuqyvJAwZzqu1FOtwgwHW/YuM2Rgttkgp2dywlwOzJzuj2Sgk5hfy+o +VBKw6pKpwvcECrq3y46cqfx/fs7d4k+l4P4rO0SnSEf8XfvStIisNzTZWVlF +gAklzNOjnIJ5H2+FCnIIEMDmyah7FLTebjW2m/SFE26S1e0ULD32w+M3adfi +spK3byno5u/tYUoQoPRk3mD6AwVLbM4yT5L+NryxVXSEgvbpxROPSFcKnXfR +nKHgBe7PJ5bcJiBM/cOI7SIFZTnxM4akje00ovwFqfhsabPFAdJ8hyKEE8Wp ++OvOQPgV0u1pT/KKFamo0CR15jHp84SEVtNqKn44Xho/Rtql07PxgxYVZU/2 +eIjcIYA+V+74z4iKNxq+KWmSHpb5+1negophHpR2K9IVTKtQhj0VnT7U7fYg +Hep6kX+7CxUXuZf3BJFmHf+UGeJNRb7XjhBLmid/g1p6IBVvZ/enJZN++jCq +tiKcigJzU6/SSKd+emr7LI6KmfcGuTJIb+eTef89hYrn/sxS00lTVvscFLhE +xXj56A0ppIcsOVyqBVSMvP1UJ470Tf/FNLMyKj4pUFsXQjo4xVbZ8w4VZ/5O +SO8hzSy/fPt4PRXrFA7/sSFt3vV8YbyF/D7FPP/pkLbj4t3k/pqKZ2z1f0qT +3rGWkfqij4pSRdSyefL5eDkE9sAQFfeodw11kg6MvKpUOU7W33qksIJ0eFH3 +fto8+XsDxAcTSFtE0qNj+GjoFFE9vpp028q6q4ZCNEyonL8/Rd6nfdG2lglh +GqbtKZGoI73rWbKopwwNM+8/cv1/Hj54qurLKtKQ+u2IPRdp39kGl1d0Ggpm +iL6sIfNziDp71WQdDT0s0sNWkZ4hUlt+adJwxWxdQSeZxwjLdWNVujTkDnFz +jSOdcNhDX8mYhtqDWadekfkVWvrHpdeUhltPxf0OJp2adSE6fRMNf++J4BYn +ndX0tIV7Kw2F69hvLSoIoO7wGatxpuHwR9eiPrJfikYXRYNdaJhxRmd5AOkK +Sb1dn7zI9w3v3Uog+6t5b95YUygNI14q7zxL9qfVX4bYsUgaWor+kxQg/Ty1 +Q183hoZenvyhx8l+7qkWjClKouGFwSAVT7Lfx5eFiCVk01A5KcD1Xwl5n/nC +BuwCGkanRDjtJj2vW7prppiGS729ft0rJvPl9r7Ip4KGE77ldr7kvJGptDSw +aKShT3Ce1WVyXuWYf9r17zENPyr/edqfT/ZbT1TM3Tbyea0U56GS1uAmWlU7 +abi9KTT7Ui45H5wUXfmHabhyi84lT3I+Hpj/GdOygo5C/za07Mwg83TYV+qL +GB1dGM+WbTtP9vv33jIeGTqO+syetiPnbXFf01tjJTo6PjptqptKwPsHF9Tv +6NOxf1zr0Wtyfm9JYHQXuNNxpsz33O44Mt//bgXUe9Oxnr7CiULO/9FQJZ5+ +Pzr+EKEe7IsmIHHfsvUyIXSk+blVWEcR0GDTf+JsIh09lwQmLoSR+0IsVjOy +io7XNg/S7h4ggCt5pjnzLh2HXdLl2eR+es7j73K3lo5bhyISG/wI2D/jkPDz +ER0b/Pgb6nzJ++xW6dvbS9bbWNt1mtx/UnktJ514lDDcqIIR7UjAr3Ui7zWc +lfB4W31Qpz4BszlysTouSljqpUaf0yVgeuUqFYa7Emap38uS1CHvb4rhb+6n +hBGbbWYtNcn9WOs16xKlhK+SO2OSVpP9b/OfcGKxElbV3TkcLE3mbb8bDM4o +4df8Mce5aQ5c6t83+PW3Eg6sEuu/M8mBjC3BCWOL5Hmbcf/DExw4q5PYNi+o +jK6Cq7IHRjgQ96dq+0qKMvpQViRmDnJgfzLfIZaFMuZt81E+/oIDrLKb+Rcv +KiNjSjVg1TUO9NHK8jZeUcb5RUvnO0UciLhYmjudp4y+2pY9poUc+C+2JNuh +VBnLzi3WbMvhgPaO/EzhOmXsoNqK7DnPgbV8GaknPypjW5/ALoFoDki5R8aE +qqvgVQ0Ts1wnDvwUs/bY1qiC4ZHvcix+VcHnFI9tQfyqONJ8MPCSTBVY/Qiz +GtJfjdOm9fB5XSWMegkE345eg+P+Umds15WT/wekuU81rkXdg+Z+lSNlIPZM +9WzlDzV8i1tT3zaXgkJihb2+vjpGV38xST9wDTLXMUTE92pgWmmXp4xZMTyV +M9GbSluPI89X233WvgpMhcZUzbeauO9LdqDxigIQ5ikM8YzbgDWqTjkbt+QC +JZbK2qmqhXU+npGGYVkguMr1rsMTLdwVvOFy3t+LsJ4tWxG2Wxs13h6rDOLN +gKD3Yk3WXDootM/t9Eq5NPgxleJslamDIqrupamOZ2CT5uMsKw1dPGEWddhl +ZRI8mDL6M/dcF6sj2is7fsdDoLp27ysfPWSevTW85nossMe9O3YK6uPSi10/ +dkhGwUYVmc0rCvVx+MaGqWuy4bAm5nR4o4EB9sr81T0+Egx1RsV8tkwDHP5y +dbGlNxjs5+rTO1kGGPO75wT1aTCEB87cHDYxwCAJzYIf14OhxdXjo7CtAa44 +55okvzcY9jH0rXd5GGDn85CP2UNBUDr5UX460QA/Hjc6oDByGNR8GPWreg1Q +QJObu0XqEJxTsvt94p0B0vTezjUIHoLpgT16g+8N0ENovj7h10F44JJSlvvJ +AEtrUr41PjoIDvYDl6THDHC8ONtNzP0gHDVKOCTIZYj1OT6PFzICoUX0FX1s +lSGW5idcf7wiAHwe7Iu/fdgQXVn04jVa/jAe8D1sY4ghAieuI1zWH8IVD+x/ +G2qIEwU/vfqW+MPpYwcd5iMN8XLfs9Cu135QyQylsU4a4lGQNrxxxA/+3j1R +15RliI/7h1IrH+yD9Irc6ddNhjj2+W3a9O69UJ/f4f1TkoFFv1+b8b3whg+2 +dPdQGQYa3TXUn6r1Bq5fATv/yDEwrqbIfuK6N5hu5bfjozHwv396XdInvOHx +EqaBrBoDe5acp8obekP7njxBE2MGdqy+Y/O9yAt6VfzLU30ZONkqZ+6XtAem +ry/Oaf7HQOOd9F1fIz3gyzaL/KRqBt6kC7t5BnhAN+8Zy0+1DAygtWV8cfOA +Wg+5yxcbGPgsNSNWzNQD4mT0mAutpN8oZvwQ8ACRRP9jT9+R518cFzis5Q7q +ezu5fLiZ2F6R23QjZjd4rSoTzNrMxF1pA1onXV0g4pGbv6o9Ex8c3dRTYuoC +qT5ibRwHJm4Ju/qtf40L1BUfTWnbzkQ5kSHeczM7QULVcuWCJxO1rFb4/Dm3 +Ex6rDkl4hDLRpkNrcLxlB6itodJU85ho6f931Rvr7fBT7bw+Z4KJ9SkrKtnJ +TtDdjhvFp5h43vKo4ECYEzQEjjuGzDDRtNy5INXbCc5yrA7r/yYdfMxNxdgJ +1JhcN2t4jNDFJP358klH2GMVQG+SMkJdpTeXu1wdoWPvpuUdLCMs86Jylho7 +wL2iPx9nEo0wsXvtkwPq9qBvFjJnnWyEXj9XEZKK9nDn4+jy/DNGuNN3XUnb +CnvgUN4bWKcb4VCx3Fzd+y1wM7PhTO4VI9xm1HeP7bsF8lMSGJvKjXC9kccV +3gg7SApZmZb5xgiLHzXuX33bFlzMldGIwsKI1oS1A4FWsNAhINxEY6F06+PC +FU5WkO8z3metzEI15vILzgwr+HKyOsxlDQtV6dJpWrxWENS6peKoNguVFU0K +pK9Ywmm7Y5R7FizMUwmnnH62CWp2dP7VPcjCCTUhtUhzC5APOFW9voGFN7Pp +rM2hZnB20VcvuZGFs7JaxcV7zIA73aLqazMLu8JYQiJbzOD7Xb7S/FYWfnj4 ++qzcGjOo4YrPFHvDwmHzrp+8fabgkhETNjvEQr148zolc1PIrD2q92AZGzdl +nFhLVzaB5XY7q+SE2ch68Ol7jqgJxHww1AgTYaMBco+rcZnAPr55lQ2SbEyE +5Pgj/QgGW0IlCilsrHipGdeWifB2MGgqQYuNej7x2w+KIUgKHajavJ2Ntyuy +3h1VMoYis6iIiZ1sFO0SlLu9yAbtqLNm513Jz19u+CjWzwa7icrObk82zj+/ +n8jOZMPJtzO/vA6wsX596SkzETbMF0abRsSysbV6SHtmKQt6jc6/KSljI3Ne +sW6ZMBP2HSnKtipno0JHV/alHwyYLb/jM1rJxnQYWDB7xQAxpe45rbtsHOUR +I+cPA2wEFBXuN7CxqXpUZlKRAXUdJd5vOsnz2izfJj1DsBa+pxHazcZbGCBn +JWsI3ZtaZ2X62OT+qggc+2sA0zUjiW4f2Lj29oW4tGYD0CjYcOvbdzael9Jb +Z+5sAHW9JqEpY2y8np3DqWUYgLWEI2hOsLGtoH3SnmIAvqeOvAqZYaOM/7l1 +HV/1YbrhZJb0PBt9xHxGHrbrQ9zvS141v9lY+i1+sr1KH0R0S9V3L7Dx1UiL +ysxFfcgNqJlZXGRjwDO6L/OYPvwPeOLTVQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698941251394087}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698941251394087}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c81f8XB3AZGZXs7Q6kEsl2r3udYyQryWhIRkZRVAiRjCiiQirJDiVl +3E/1zShCRbTJSkopZSS7Ib/P76/7eD7ufZ/HvZ/365zzuPQ9Bx18uLm4uJhL +uLj+/zr7vrVZJbnI2PiwC7+q5kbjjlyZoybdcSDqG8TPCVQGlHyxR6Y7HdZp +ygknBOpAqP2NLp7uQhh60B/kE2gGouPS6b+6OJB0aNs6rUBHGKizOzjd1QhL +/2QoJwR4gYXK9/6fXa8hfXTv46/+wfCry+DCRNcgWL8TkIz2OAFNZteKXhVO +QZfdMQWRJRmgMFD9ZY/6Avgtmw9utMoBiQPuN/jNeDDAq2OsdboQ0rUsau2c +BTDQke6qZ30NejI3NPwUWYHreZVDBidvQHJR9AtuWVE836jEF3GwHKx1/cQk +lUWRWdWwUeFYOQg0Oziv1hDFZHlC7m5iOcR/WtVnYyKKy6J4w18WlMMxpfYv +GX6iqBhk9CDvTTkE5sv8U60RxZ7e2pASvQrYml2lbrNLDNcNPtHZOFUB0hmf +ks7niOPQZzFBjRuVILPuTvx8iTiGHGHkCVdUglzjyejdleJIs2NtGyUqgTKx +9sjqJnHMeZikkn2/ElbZHvKoHRbHNM1I7WcvK0GHd0H/k44EvrN1yAqZrYQt +IVKftZ9KYIZPqEKncRXYLxt+f+mNBHYHvW5nmFWBQ2F1z993EigReORs1qYq +2PbS9cXjHxK4toDL3N6+CnarX61xkZTEASItIMWzCvZ/1kyL85BE094C/00n +quCUk5Xx61lJTG+63/OoqQrkbj+X414ihR+828S5WqqgXNxpTmuZFPayiUK9 +9ip4+9qtMo0qhYYneB+kd1SBytYQpa2WUujl2vhJYqgKGjfnLX15WQofDX+t +MeTjwILFzPNnLGm0y86IWDDhQGpJRNmChTSG1LlPFWzkgMpSrkSNrdK4MOpf +Z2LFAdtHQiZnfKSRb0wbgu05kGVGI2zPSqPb+jT+XDcOGKLNpbYBadyyd/0N +sQgOBDMK3FvjZPDqH8rr8FscsM4XnrZJkcHP7nYXHCs5oMR/LPH5BRmkPONs +VCM48LJjW9Wb6zLoZdIV2HaPA+sPLed5/1wGP11YOvyuiQPDJWElk3Ky+Ko5 +qITVwwFXCbsxeUIWXza30n9yEaATWRubWyeL9Ln+JdY8BAgNrpGiP5ZFc5uH +Xbl8BFRX8IBqjyy2Z/v6soQIkLKpTt2wKIuufOmym8QJeBmrorvRRg5Liiia +V1QIMP/xOyLwkxwqNEoomJgTcNQyQ+3hqBx6cceaiFgQUF6g0Ss+K4ee2y+n +920iQMbJg1EtII+bb7VX+9oQMHrv0RzPenk8/TFUbYsDAefjUkMuh8vjZfMM +IT93Alr61qqMxsqjk7TY2j8eBPzVbXpjnCyP+7c+jEzaQ4Dv1xntzznySAgt +1mf5EMC03fVzfZM8Do1YdJzbT8CgpGpg8woFjAx34TSHEiB9sF5RWloBvR+v +3iUXToBty45nfjQFjHHuNTlwlIC7EcnqK3UU0Ko8vo33GAGnBya+79yhgNKR +5oMCsQRol9bu/VGogEe/9hK7TxOwl9tZ2vSmArq4954OSyYge9f444w7ZD23 +zBtnUghYKkxXZbYoYFuExpPyswT0Bp38HD+mgEK1AknN6QTEsrZ6yhkq4sov +MZ3GWQRYuuVOGpgqoom2mdOGKwQIx4yccLZVxCeEQ6xiNlm/KaEk1UMRXZa6 +fv+eQ8A965qRpUmK+G9rlIRDAQHRB/ijVM4rYq4VrxK9kACLs07CpjmKuFOc +98sI6Y5X4xuiqhRR42behZAiAiZ2KIdO9Shi2qPJSodrBPwXcYhf9LMi5o1/ +PLdI+nj2/cz144qoGvla4/p1ApZ/2F7rx01BAR3pstFSAt4sKbY9tZyCC4W5 +KYk3CMhSnuwvkqJg0cIZLVoZAav3pnB9UKNga4TcU9ObBIwn9qQt6FIwgz5b +/4z07RuqyvJAwZzqu1FOtwgwHW/YuM2Rgttkgp2dywlwOzJzuj2Sgk5hfy+o +VBKw6pKpwvcECrq3y46cqfx/fs7d4k+l4P4rO0SnSEf8XfvStIisNzTZWVlF +gAklzNOjnIJ5H2+FCnIIEMDmyah7FLTebjW2m/SFE26S1e0ULD32w+M3adfi +spK3byno5u/tYUoQoPRk3mD6AwVLbM4yT5L+NryxVXSEgvbpxROPSFcKnXfR +nKHgBe7PJ5bcJiBM/cOI7SIFZTnxM4akje00ovwFqfhsabPFAdJ8hyKEE8Wp ++OvOQPgV0u1pT/KKFamo0CR15jHp84SEVtNqKn44Xho/Rtql07PxgxYVZU/2 +eIjcIYA+V+74z4iKNxq+KWmSHpb5+1negophHpR2K9IVTKtQhj0VnT7U7fYg +Hep6kX+7CxUXuZf3BJFmHf+UGeJNRb7XjhBLmid/g1p6IBVvZ/enJZN++jCq +tiKcigJzU6/SSKd+emr7LI6KmfcGuTJIb+eTef89hYrn/sxS00lTVvscFLhE +xXj56A0ppIcsOVyqBVSMvP1UJ470Tf/FNLMyKj4pUFsXQjo4xVbZ8w4VZ/5O +SO8hzSy/fPt4PRXrFA7/sSFt3vV8YbyF/D7FPP/pkLbj4t3k/pqKZ2z1f0qT +3rGWkfqij4pSRdSyefL5eDkE9sAQFfeodw11kg6MvKpUOU7W33qksIJ0eFH3 +fto8+XsDxAcTSFtE0qNj+GjoFFE9vpp028q6q4ZCNEyonL8/Rd6nfdG2lglh +GqbtKZGoI73rWbKopwwNM+8/cv1/Hj54qurLKtKQ+u2IPRdp39kGl1d0Ggpm +iL6sIfNziDp71WQdDT0s0sNWkZ4hUlt+adJwxWxdQSeZxwjLdWNVujTkDnFz +jSOdcNhDX8mYhtqDWadekfkVWvrHpdeUhltPxf0OJp2adSE6fRMNf++J4BYn +ndX0tIV7Kw2F69hvLSoIoO7wGatxpuHwR9eiPrJfikYXRYNdaJhxRmd5AOkK +Sb1dn7zI9w3v3Uog+6t5b95YUygNI14q7zxL9qfVX4bYsUgaWor+kxQg/Ty1 +Q183hoZenvyhx8l+7qkWjClKouGFwSAVT7Lfx5eFiCVk01A5KcD1Xwl5n/nC +BuwCGkanRDjtJj2vW7prppiGS729ft0rJvPl9r7Ip4KGE77ldr7kvJGptDSw +aKShT3Ce1WVyXuWYf9r17zENPyr/edqfT/ZbT1TM3Tbyea0U56GS1uAmWlU7 +abi9KTT7Ui45H5wUXfmHabhyi84lT3I+Hpj/GdOygo5C/za07Mwg83TYV+qL +GB1dGM+WbTtP9vv33jIeGTqO+syetiPnbXFf01tjJTo6PjptqptKwPsHF9Tv +6NOxf1zr0Wtyfm9JYHQXuNNxpsz33O44Mt//bgXUe9Oxnr7CiULO/9FQJZ5+ +Pzr+EKEe7IsmIHHfsvUyIXSk+blVWEcR0GDTf+JsIh09lwQmLoSR+0IsVjOy +io7XNg/S7h4ggCt5pjnzLh2HXdLl2eR+es7j73K3lo5bhyISG/wI2D/jkPDz +ER0b/Pgb6nzJ++xW6dvbS9bbWNt1mtx/UnktJ514lDDcqIIR7UjAr3Ui7zWc +lfB4W31Qpz4BszlysTouSljqpUaf0yVgeuUqFYa7Emap38uS1CHvb4rhb+6n +hBGbbWYtNcn9WOs16xKlhK+SO2OSVpP9b/OfcGKxElbV3TkcLE3mbb8bDM4o +4df8Mce5aQ5c6t83+PW3Eg6sEuu/M8mBjC3BCWOL5Hmbcf/DExw4q5PYNi+o +jK6Cq7IHRjgQ96dq+0qKMvpQViRmDnJgfzLfIZaFMuZt81E+/oIDrLKb+Rcv +KiNjSjVg1TUO9NHK8jZeUcb5RUvnO0UciLhYmjudp4y+2pY9poUc+C+2JNuh +VBnLzi3WbMvhgPaO/EzhOmXsoNqK7DnPgbV8GaknPypjW5/ALoFoDki5R8aE +qqvgVQ0Ts1wnDvwUs/bY1qiC4ZHvcix+VcHnFI9tQfyqONJ8MPCSTBVY/Qiz +GtJfjdOm9fB5XSWMegkE345eg+P+Umds15WT/wekuU81rkXdg+Z+lSNlIPZM +9WzlDzV8i1tT3zaXgkJihb2+vjpGV38xST9wDTLXMUTE92pgWmmXp4xZMTyV +M9GbSluPI89X233WvgpMhcZUzbeauO9LdqDxigIQ5ikM8YzbgDWqTjkbt+QC +JZbK2qmqhXU+npGGYVkguMr1rsMTLdwVvOFy3t+LsJ4tWxG2Wxs13h6rDOLN +gKD3Yk3WXDootM/t9Eq5NPgxleJslamDIqrupamOZ2CT5uMsKw1dPGEWddhl +ZRI8mDL6M/dcF6sj2is7fsdDoLp27ysfPWSevTW85nossMe9O3YK6uPSi10/ +dkhGwUYVmc0rCvVx+MaGqWuy4bAm5nR4o4EB9sr81T0+Egx1RsV8tkwDHP5y +dbGlNxjs5+rTO1kGGPO75wT1aTCEB87cHDYxwCAJzYIf14OhxdXjo7CtAa44 +55okvzcY9jH0rXd5GGDn85CP2UNBUDr5UX460QA/Hjc6oDByGNR8GPWreg1Q +QJObu0XqEJxTsvt94p0B0vTezjUIHoLpgT16g+8N0ENovj7h10F44JJSlvvJ +AEtrUr41PjoIDvYDl6THDHC8ONtNzP0gHDVKOCTIZYj1OT6PFzICoUX0FX1s +lSGW5idcf7wiAHwe7Iu/fdgQXVn04jVa/jAe8D1sY4ghAieuI1zWH8IVD+x/ +G2qIEwU/vfqW+MPpYwcd5iMN8XLfs9Cu135QyQylsU4a4lGQNrxxxA/+3j1R +15RliI/7h1IrH+yD9Irc6ddNhjj2+W3a9O69UJ/f4f1TkoFFv1+b8b3whg+2 +dPdQGQYa3TXUn6r1Bq5fATv/yDEwrqbIfuK6N5hu5bfjozHwv396XdInvOHx +EqaBrBoDe5acp8obekP7njxBE2MGdqy+Y/O9yAt6VfzLU30ZONkqZ+6XtAem +ry/Oaf7HQOOd9F1fIz3gyzaL/KRqBt6kC7t5BnhAN+8Zy0+1DAygtWV8cfOA +Wg+5yxcbGPgsNSNWzNQD4mT0mAutpN8oZvwQ8ACRRP9jT9+R518cFzis5Q7q +ezu5fLiZ2F6R23QjZjd4rSoTzNrMxF1pA1onXV0g4pGbv6o9Ex8c3dRTYuoC +qT5ibRwHJm4Ju/qtf40L1BUfTWnbzkQ5kSHeczM7QULVcuWCJxO1rFb4/Dm3 +Ex6rDkl4hDLRpkNrcLxlB6itodJU85ho6f931Rvr7fBT7bw+Z4KJ9SkrKtnJ +TtDdjhvFp5h43vKo4ECYEzQEjjuGzDDRtNy5INXbCc5yrA7r/yYdfMxNxdgJ +1JhcN2t4jNDFJP358klH2GMVQG+SMkJdpTeXu1wdoWPvpuUdLCMs86Jylho7 +wL2iPx9nEo0wsXvtkwPq9qBvFjJnnWyEXj9XEZKK9nDn4+jy/DNGuNN3XUnb +CnvgUN4bWKcb4VCx3Fzd+y1wM7PhTO4VI9xm1HeP7bsF8lMSGJvKjXC9kccV +3gg7SApZmZb5xgiLHzXuX33bFlzMldGIwsKI1oS1A4FWsNAhINxEY6F06+PC +FU5WkO8z3metzEI15vILzgwr+HKyOsxlDQtV6dJpWrxWENS6peKoNguVFU0K +pK9Ywmm7Y5R7FizMUwmnnH62CWp2dP7VPcjCCTUhtUhzC5APOFW9voGFN7Pp +rM2hZnB20VcvuZGFs7JaxcV7zIA73aLqazMLu8JYQiJbzOD7Xb7S/FYWfnj4 ++qzcGjOo4YrPFHvDwmHzrp+8fabgkhETNjvEQr148zolc1PIrD2q92AZGzdl +nFhLVzaB5XY7q+SE2ch68Ol7jqgJxHww1AgTYaMBco+rcZnAPr55lQ2SbEyE +5Pgj/QgGW0IlCilsrHipGdeWifB2MGgqQYuNej7x2w+KIUgKHajavJ2Ntyuy +3h1VMoYis6iIiZ1sFO0SlLu9yAbtqLNm513Jz19u+CjWzwa7icrObk82zj+/ +n8jOZMPJtzO/vA6wsX596SkzETbMF0abRsSysbV6SHtmKQt6jc6/KSljI3Ne +sW6ZMBP2HSnKtipno0JHV/alHwyYLb/jM1rJxnQYWDB7xQAxpe45rbtsHOUR +I+cPA2wEFBXuN7CxqXpUZlKRAXUdJd5vOsnz2izfJj1DsBa+pxHazcZbGCBn +JWsI3ZtaZ2X62OT+qggc+2sA0zUjiW4f2Lj29oW4tGYD0CjYcOvbdzael9Jb +Z+5sAHW9JqEpY2y8np3DqWUYgLWEI2hOsLGtoH3SnmIAvqeOvAqZYaOM/7l1 +HV/1YbrhZJb0PBt9xHxGHrbrQ9zvS141v9lY+i1+sr1KH0R0S9V3L7Dx1UiL +ysxFfcgNqJlZXGRjwDO6L/OYPvwPeOLTVQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698941251394087}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07698941251394087}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435641001355*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"0ad2cd91-71ce-4b6c-a8c0-cfd07ed402a7"] +}, Open ]], Cell[CellGroupData[{ @@ -11099,7 +11926,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -11117,8 +11946,8 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"(", FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -11140,66 +11969,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[199]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], + "In[121]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 199, 165, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752212366*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.036848551133912`*^-150\\\", \ +RowBox[{\\\"692388265304082962155241\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 121, 45, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.994356410074648*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], +In[121]:=",ExpressionUUID->"cd0578ef-3e6a-44ac-ac8d-3e0543c38c10"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 199, 166, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133175222237*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.964494307363493`*^-152\\\", \ +RowBox[{\\\"257637673519649270217965\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"119\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 121, 46, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943564100854*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], +In[121]:=",ExpressionUUID->"188d0c6e-8a0b-4928-a4ea-ab86795146af"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 199, 167, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317522303677`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.724879695242693`*^-155\\\", \ +RowBox[{\\\"990359217009531794717859\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"122\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 121, 47, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943564100954037`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], +In[121]:=",ExpressionUUID->"5bc14025-ca44-47dd-8219-39084507b405"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 199, 168, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752237467*^9}, +during this calculation.\"", 2, 121, 48, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.994356410103435*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], +In[121]:=",ExpressionUUID->"b46ced62-cbe2-4b8b-88fa-aae253810f7f"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.991331759108553*^9}, +Cell[BoxData["9.965601508394949`"], "Output", + CellChangeTimes->{3.991331759108553*^9, 3.994356511938649*^9}, CellLabel-> - "Out[199]=",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] + "Out[121]=",ExpressionUUID->"93df9199-d664-45aa-8645-7d5b76c7e912"] }, Open ]], Cell[CellGroupData[{ @@ -11266,68 +12102,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849016830597*^9, - 3.991849020984995*^9}},ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-\ -7a397847208f"], + CellChangeTimes->{{3.991849016830597*^9, 3.991849020984995*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 169, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591425533`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.020591608501975`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 122, 49, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.994356511998415*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], +In[122]:=",ExpressionUUID->"057bee9c-a133-4678-ad71-7fbe12753730"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 170, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591525517`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1204881908909148`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 122, 50, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.99435651200809*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], +In[122]:=",ExpressionUUID->"fdf553d1-9fc4-44cf-99cd-3ebaf5baa91e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 200, 171, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331759160553*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3918086977163263`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 122, 51, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.994356512016732*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], +In[122]:=",ExpressionUUID->"f1975fde-ef30-4523-9bc4-f6f9a4cd6a2b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 200, 172, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591685543`*^9}, +during this calculation.\"", 2, 122, 52, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.99435651202512*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], +In[122]:=",ExpressionUUID->"bf8de1a3-c82e-412a-abff-5a6ef36ea5b7"], -Cell[BoxData["1.044718879268698`"], "Output", - CellChangeTimes->{3.991331766558941*^9}, +Cell[BoxData["0.22253474359184552`"], "Output", + CellChangeTimes->{3.991331766558941*^9, 3.994356523753302*^9}, CellLabel-> - "Out[200]=",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] + "Out[122]=",ExpressionUUID->"340f132c-ef2a-4e01-8948-f0f200f75f6a"] }, Open ]], Cell[CellGroupData[{ @@ -11348,8 +12188,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11394,68 +12233,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849024657757*^9, - 3.991849027138817*^9}},ExpressionUUID->"22b50200-0b82-dc47-9932-\ -f1f0210d6caf"], + CellChangeTimes->{{3.991849024657757*^9, 3.991849027138817*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 173, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317665951805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.020591608501975`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 123, 53, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994356523809215*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], +In[123]:=",ExpressionUUID->"2452e00e-dc45-4100-b87c-95b82eef6255"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 174, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666041794`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1204881908909148`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 123, 54, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994356523821188*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], +In[123]:=",ExpressionUUID->"101d3eef-436f-49ff-bb32-26b82861823c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 201, 175, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666131783`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3918086977163263`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 123, 55, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994356523830701*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], +In[123]:=",ExpressionUUID->"87849aee-edd9-4b22-a38f-3b40b40baad5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 201, 176, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666211815`*^9}, +during this calculation.\"", 2, 123, 56, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.99435652384027*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], +In[123]:=",ExpressionUUID->"94d4c3f4-1e12-4b10-8150-cd97b1dcbeaa"], -Cell[BoxData["4.7987767072565894`"], "Output", - CellChangeTimes->{3.991331773590704*^9}, +Cell[BoxData["26.638326334699943`"], "Output", + CellChangeTimes->{3.991331773590704*^9, 3.994356535122319*^9}, CellLabel-> - "Out[201]=",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] + "Out[123]=",ExpressionUUID->"0eb970c6-b7f9-4bf8-8acf-d683dd2600c8"] }, Open ]], Cell[CellGroupData[{ @@ -11476,8 +12319,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11522,68 +12364,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849031047804*^9, - 3.9918490341764317`*^9}},ExpressionUUID->"8a5105db-666c-444e-9451-\ -d3e8d1574bcd"], + CellChangeTimes->{{3.991849031047804*^9, 3.9918490341764317`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 177, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736257057`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.020591608501975`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"54\\\", \\\"\[RightSkeleton]\\\"}], \\\"6995456000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 124, 57, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.994356535174243*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], +In[124]:=",ExpressionUUID->"48b72dd3-9e8f-4572-8ec9-6c308e4e16ff"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 178, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736361847`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1204881908909148`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 124, 58, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943565351836233`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], +In[124]:=",ExpressionUUID->"32fe2456-7488-4755-ac4f-c899b98e9a6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 202, 179, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773644182*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3918086977163263`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 124, 59, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943565351930017`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], +In[124]:=",ExpressionUUID->"c7a858b5-72fd-43df-a00b-decd9bbcd7ae"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 202, 180, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773653183*^9}, +during this calculation.\"", 2, 124, 60, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943565352011957`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], +In[124]:=",ExpressionUUID->"45a8380f-0b7f-4be6-8da6-24e7f28a125e"], -Cell[BoxData["15.12281532960454`"], "Output", - CellChangeTimes->{3.991331777337887*^9}, +Cell[BoxData["3.6191679437823865`"], "Output", + CellChangeTimes->{3.991331777337887*^9, 3.994356544652925*^9}, CellLabel-> - "Out[202]=",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] + "Out[124]=",ExpressionUUID->"617568b4-7132-4b97-b9c3-6a9ddab93437"] }, Open ]], Cell[CellGroupData[{ @@ -11592,22 +12438,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918490375675926`*^9, - 3.991849040901537*^9}},ExpressionUUID->"d0efa798-230b-fa46-b413-\ -76bfd8e40ccb"], - -Cell[BoxData["0.12263596348954131`"], "Output", - CellChangeTimes->{3.9913317773679104`*^9}, + CellChangeTimes->{{3.9918490375675926`*^9, 3.991849040901537*^9}}, CellLabel-> - "Out[203]=",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] + "In[125]:=",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], + +Cell[BoxData["0.022664178906535798`"], "Output", + CellChangeTimes->{3.9913317773679104`*^9, 3.99435654470971*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"59a08c76-b0f1-43c5-b76b-5593b629aea4"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918490438339844`*^9, 3.991849046673996*^9}, - 3.9919249287922287`*^9},ExpressionUUID->"f842f74e-f562-934a-9011-\ -6604b8708636"], + 3.9919249287922287`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ @@ -11630,12 +12477,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[205]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], + "In[127]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.9913317774008274`*^9}, +Cell[BoxData["10.854315181909834`"], "Output", + CellChangeTimes->{3.9913317774008274`*^9, 3.994356544736471*^9}, CellLabel-> - "Out[205]=",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] + "Out[127]=",ExpressionUUID->"ea4baf58-9255-464e-98b6-2003939ef946"] }, Open ]], Cell[CellGroupData[{ @@ -11645,12 +12492,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[207]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], + "In[128]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.9913317774358253`*^9}, +Cell[BoxData["1.898190866492042`"], "Output", + CellChangeTimes->{3.9913317774358253`*^9, 3.994356544750703*^9}, CellLabel-> - "Out[207]=",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] + "Out[128]=",ExpressionUUID->"49aad16a-9307-4d38-b515-7483a4c7e504"] }, Open ]], Cell[CellGroupData[{ @@ -11660,12 +12507,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[210]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], + "In[129]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.991331777510603*^9}, +Cell[BoxData["20.603561940327154`"], "Output", + CellChangeTimes->{3.991331777510603*^9, 3.99435654476602*^9}, CellLabel-> - "Out[210]=",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] + "Out[129]=",ExpressionUUID->"1813489d-c270-43b7-8848-04b9ab2b5a0e"] }, Open ]], Cell[CellGroupData[{ @@ -11855,12 +12702,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[211]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], + "In[130]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[BoxData["0.041096786108657246`"], "Output", - CellChangeTimes->{3.991331777537592*^9}, +Cell[BoxData["0.007775655210307098`"], "Output", + CellChangeTimes->{3.991331777537592*^9, 3.9943565447849207`*^9}, CellLabel-> - "Out[211]=",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] + "Out[130]=",ExpressionUUID->"c450a7cb-b363-411d-b242-8592206389fa"] }, Open ]], Cell[CellGroupData[{ @@ -11874,12 +12721,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[212]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], + "In[131]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[BoxData["4.371605972693579`"], "Output", - CellChangeTimes->{3.9913317776362495`*^9}, +Cell[BoxData["10.050240241913926`"], "Output", + CellChangeTimes->{3.9913317776362495`*^9, 3.994356544991253*^9}, CellLabel-> - "Out[212]=",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] + "Out[131]=",ExpressionUUID->"803b8b73-ed0a-4570-8955-ae9a64c71809"] }, Open ]], Cell[CellGroupData[{ @@ -12071,12 +12918,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[213]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], + "In[132]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[BoxData["0.013804398425195999`"], "Output", - CellChangeTimes->{3.9913317776511555`*^9}, +Cell[BoxData["0.046855905618080125`"], "Output", + CellChangeTimes->{3.9913317776511555`*^9, 3.9943565450136747`*^9}, CellLabel-> - "Out[213]=",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] + "Out[132]=",ExpressionUUID->"04a919cf-10ff-489c-9d68-da01f1905824"] }, Open ]], Cell[CellGroupData[{ @@ -12090,12 +12937,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[214]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], + "In[133]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[BoxData["7.5428626210616345`"], "Output", - CellChangeTimes->{3.991331777742655*^9}, +Cell[BoxData["4.094140784324457`"], "Output", + CellChangeTimes->{3.991331777742655*^9, 3.994356545236711*^9}, CellLabel-> - "Out[214]=",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] + "Out[133]=",ExpressionUUID->"1b442133-f9e3-42df-acff-8deb0258b576"] }, Open ]], Cell[CellGroupData[{ @@ -12188,12 +13035,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[215]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], + "In[134]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913317777546787`*^9}, +Cell[BoxData["0.07637363207411572`"], "Output", + CellChangeTimes->{3.9913317777546787`*^9, 3.994356545254138*^9}, CellLabel-> - "Out[215]=",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] + "Out[134]=",ExpressionUUID->"1e08ba51-2ffa-453e-8ac5-e4889145c990"] }, Open ]], Cell[CellGroupData[{ @@ -12283,12 +13130,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[216]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], + "In[135]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991331777779663*^9}, +Cell[BoxData["0.9236263679258842`"], "Output", + CellChangeTimes->{3.991331777779663*^9, 3.994356545270978*^9}, CellLabel-> - "Out[216]=",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] + "Out[135]=",ExpressionUUID->"1325d04a-c6aa-46bd-aa99-63eda158e037"] }, Open ]], Cell[CellGroupData[{ @@ -12411,12 +13258,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[217]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], + "In[136]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913317778036633`*^9}, +Cell[BoxData["0.07054070039792333`"], "Output", + CellChangeTimes->{3.9913317778036633`*^9, 3.9943565452865667`*^9}, CellLabel-> - "Out[217]=",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] + "Out[136]=",ExpressionUUID->"33f0c030-20f2-41b6-99ee-2a7bc2b43ec8"] }, Open ]], Cell[CellGroupData[{ @@ -12431,7 +13278,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -12453,8 +13302,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12478,68 +13326,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918490946810665`*^9},ExpressionUUID->"1dec41a6-6752-2041-9d38-\ -804123b5ccd0"], + CellChangeTimes->{3.9918490946810665`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 218, 181, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778296604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.861570479362556`*^-207\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 137, 61, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.9943565453117247`*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], +In[137]:=",ExpressionUUID->"8b84ad5d-6eb0-4ff2-83a4-df68b8b937ac"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 182, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777838663*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.727929179956643`*^-212\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 137, 62, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994356545321595*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], +In[137]:=",ExpressionUUID->"19f01eb4-e412-449e-894d-57aab7ee4b65"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 183, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778466587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.465447118355152`*^-217\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 137, 63, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994356545330882*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], +In[137]:=",ExpressionUUID->"99a8eb7c-ebdf-4457-999d-0267525a9c15"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 218, 184, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777854885*^9}, +during this calculation.\"", 2, 137, 64, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994356545338633*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], +In[137]:=",ExpressionUUID->"67625eb0-b66c-4c38-aead-632714f9f29f"], -Cell[BoxData["4.37160597269358`"], "Output", - CellChangeTimes->{3.991331781456501*^9}, +Cell[BoxData["10.050240241913928`"], "Output", + CellChangeTimes->{3.991331781456501*^9, 3.994356553461215*^9}, CellLabel-> - "Out[218]=",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] + "Out[137]=",ExpressionUUID->"b32afb3a-3e19-4cac-9441-07b807f398d9"] }, Open ]], Cell[CellGroupData[{ @@ -12554,7 +13406,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -12576,8 +13430,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12601,67 +13454,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99184909912471*^9},ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], + CellChangeTimes->{3.99184909912471*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 219, 185, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331781491499*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.861570479362556`*^-207\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 138, 65, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.994356553525146*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], +In[138]:=",ExpressionUUID->"79598bce-8654-4d57-bec4-2e2c3f734614"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 186, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815004997`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.727929179956643`*^-212\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 138, 66, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.994356553535616*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], +In[138]:=",ExpressionUUID->"84d50ccd-7edf-465b-b89a-33199761648a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 187, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815094967`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.465447118355152`*^-217\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 138, 67, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.99435655354712*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], +In[138]:=",ExpressionUUID->"e3a5961e-9dc9-4d37-9b19-c7ada9681f96"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 219, 188, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815164986`*^9}, +during this calculation.\"", 2, 138, 68, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.994356553557517*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], +In[138]:=",ExpressionUUID->"1687662e-7a11-471f-8a0f-5012e5a781cf"], -Cell[BoxData["7.54286262106163`"], "Output", - CellChangeTimes->{3.9913317851500416`*^9}, +Cell[BoxData["4.09414078432446`"], "Output", + CellChangeTimes->{3.9913317851500416`*^9, 3.994356561788912*^9}, CellLabel-> - "Out[219]=",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] + "Out[138]=",ExpressionUUID->"7c797729-17d3-4a23-a660-258b6ccc2768"] }, Open ]], Cell[CellGroupData[{ @@ -12719,93 +13577,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918491043389053`*^9},ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-\ -b799ae260294"], + CellChangeTimes->{3.9918491043389053`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4Vdv/B3ARlQiZiWsuJDqGyLA+ZYpMyZj5OGeTigxJkeGK3DQY8k03 +Q9dQyJgG0+0XydSpFCE3hdgkM2drUP2WP/azn9eznvXea15bnh7iyOTk4OCY +xM/aO/Tlru2Pul+a5PxiGlZtJ5HJbJEu3awcyR/fdGLNw/l615TMmpCa0/y6 +amwHxgsePu1nSLlB6vuaa6LinnKbsdDuohTne9h/tUk8iSt7jSqk9orcx67v +Ds1bpb1FJjs09R5iTw12xZxpHECigwGNddhS44oelOl71IrGChuxD87FGISz +PiLJY0Vzj7Efr05tjiobQXEnS/JasPsSxKMfBn9CBcR8dRv2LI/Z1DJtHMUT +MSrPsXkunXTXXiFRUarN71fYskK5HaGNk2h2ydfwLbadNHV71nQaWQm5Dg1j +E7cUxDQ2zqIf/AamE9hxyvZJx1hzSG7Ih28We0C8d3dE2QKyzonpWMVmHAk6 +mnlpESlNhDWu30Gi+RyOf+4FL6Gx+kohfuyNChqCCzQ24mlfmZDFvsZ4aiko +SiGrEO7AHdhyd9zjNFcoZBHtfpCGrb8zefZE41ckcf+toSV2oN5H1pTpKvox +qdx6Cns56tR6XpWfSGfohPef2PGNm41UN/5Cm31+eVzFzgb9uwGs32jW9nt8 +GTajuMMsrGwdFGgEhI1jl7VlDidIc0Jxz6oKe629E94x6Zc4obtzyIRblUQx +auza6mAuENNNzFbBvlYlrzhH44aFsIClE9iD3dOPfxVyQ9EyvSUeW27x0ZEt +ojyQIl+xnIldrmOXobHCA1GumomN2K31Z9cdb9wIC7VfLQXUSMR+2vNx0pQP +dvzcGtqJvdWGTzD6MR/Y3D12bQxbq9cM+A34oaA1aSeHOomCxh7c2r1rC3x1 +W9eoj32Sk6VlzCcI4gU7D1VhjytULiRRQlBoLOx/byceH6Jr0yvtrWClMfGm +F5vzLikvEboVqs9ffLSCLaf9h2PZl62g5mn60USDREdM0+69HBaGqF83St5g +v/IPCxd/Lgp3TDsUBTVJ9OHOlVTfjWLgWCcwYoA9/aWssNRcDHh69wgzsHkj +PvUYPhEDqZZdffXYZueddHwfiMPOM+/6grRI1FCkxy7Jl4T4BaPW0d14HY5/ +j9wbIQOlYQ1uarokOuB84UN4hQxwl48ve2NPtwpbVJAyUPRSZiUTW6dop6ic +uywI/KzX+I3dSveu5Tb5A7Ja2/wH9Ui0ODd8ejJRDmJlfZcL9UkkfMLsfq2t +Akh2JtQkGpGILOINdAhSgKsD34SeYde975aeSVYAsq98gMeYRJ42XokqTxRg +Zl1Xdip2kXqk4w2aIjjv2zJ2wwR/f+rOfKy4EszWapZ0AomcAjZrWI8ow7zG +0OIpcxKhSGea609lmFQNvdaCrZaUv4chqQLt7THZAhYk4ijU3h97SAX2b+Ts +KMOu+ODheq9ZBZoWqNZxS7w/XcoTpAq2g7SEkn6wNW6fmW3fFF0VYn06BTvt +SVR4+Pp/K7GqsMV8Zr2CA4mu0EeG199UhczBZx7R2Iz4U19ke1RhvXnubs1D +JBJqyuU4bKoGi+9kY2864vWjPavWqKgODfP7cpKdSSStcDUudWwnuO7Ytnrb +g0RNF5dVv3FqQMGv8nERTzweS+69hLwG6AU+ME3EzmtVUt3vrQH5Dfpefl4k +UghoePO1XwMU/Dx5FH1wf8vHlYnnu4DkrNduopNIRlqWkHPXgpxCf0GLIBLt +LI7g+4FoIPX90IW6sySiMxLZGnY0UOFX99gbjferYsYHX08aCISoZzVhcxVU +VbdF0eDocIVhSwzeb3lTThk1NHBU5zv8Jhafp9m+uaqK2vDNqquCOxHPb6rN +LjceHbDQT9tRn0qif8KUHB6wdKGuJeHT4TwSdUeiPeeLDYCaFU7axSKRvPdb +O6/jxsCp/zUnj2MCMX8/rJQ5A3Cx/+mWvfoTSPxL3QZx+n6IkMr2nIieQBHa +Ru8z1MxAycrTWaxlAtFnVjuEp8zh/sF022T+SVSxP3xD/itLuDiRfH2EmERF +y0HN5desIKQv3dineRJ93SfxojXuILwo/jpzQP0zGuLgWhjxs4Xw0vEPhjc/ +o+BtIWkJivYwoPTXlS7eKVR5tONJVpIDGGR93nYzdQqdXZJcUT96CJRVPHnU +N39BbGsLl3YfR+jPzp9xyv2CDDzS940fOgwt7jPjbTrT6I1kblCrthNoZdl4 +buicRlK3E5tKdjiDCWPiqVroDKobVrOx43eBrNNVae9FZpFs73xA5IwLOKx7 +e9a1cRZpZ6WXFw67Qr/XTS7TyDmUu35pV8ZTN9BM4coXEZ1HD/dpDibVuwMv +V6KE8Zl5lL3notBq2REof8iikUPz6NV/xcnalzyAL8M9NsZ4AT2wzVE6Ge8J +lzb0H0u6vYAWThzmCGZ4wY05lqjXpkXEtlANnDX1hh9z2i4xQYuoZObd13A9 +H3gdna1yrmcRuf1T7O/F5wsF8QuS4TpLqPbeQR+uC74wET1vVXFzCRlIv/n2 +1zdfEIk855/ybQkpDgcMvj7qB+kPB88dd1xGY5uP2ed88gOfu82SMZXLqPuK +nb+lMx0aFU7Lx/1eRtei8jef6qZDeqgAcB9io6bHv7/5W/kDr6Uf8foGGwl4 +wgXtBn+Ie2LmGtvHRnIi7a+2NfmDlwghdqqfjbRYthI8j/0hoZlufmyAjRyN +PEoHmv3hqYzSovMgG13bFvn8XKc/lGaZJyh9YCOpobsCHQP+MLpiZn17nI2U +vMWzPVf8wahHYpfhMhsZ+M6WJOkwYKhV4Vm+AIVu35gPt9NjwKh8wzZ/QQqJ +9CyaiOszwPsfl2llIQrNmq/0lhgyIMNUYKl0K4XPL451rP0MqGVk/X0X37Nb +VoTctx5igJPrLC1LmkJjl3U35Z9ggC+HdBbHdgpdaYw5WnebARdcG59rGVHo +BO26QVQJ/l6v6uILbJvSmk36ZQzwt5i7HGRMId7rZOmjCgYMWvArF5hQKCnM +YerhfQYwk2Nf8u6jUIyq0rEHLQwQf9vObjanUND158fvfWAAd8LB/jY7fO9v +IY3ChhkgWqYb7mhPoR1JHPy0UQas0EQThrDJMN2KmnEG0APtFhccKORnlz9T +Pc0A1Rdj20UOU8iNOzy46jsDWvtYncauFLIMlzpZLsYEHsaCibIPhVryk60z +JJig8VLCoBTbiLWoFCXFBPrGP1N2+lJIS/n5O1NZJrjm3FHZ7Uchyf5o0/+U +mdDaruJF86fQl71DYry6TJhsLf5bJIBCVzlv/RtwmAk9XIk5rsG4/5p82bbO +TOD8oMLbhn3eIypM25UJl4wfd2qHUCjqvsP230eYkGoeYMJ/ErefWJf+PzoT +Pt3Y+ONRKIW0u+iMZ6FMeEHRKqYjKNSfrrxZMY0JevWKR96cpVAl4g+cTGeC +S+/TZaVonD+z3FqRyYS3A6fZkdg0q9ZY/etMCLr+fodkDJ4/Dv9F2zwmjIqQ +zi7n8H9UyK13UeVM4GU1N9bGUUhGJkXPpJIJYaNnqlexl7tCMrmqmbBtxYXX +PJ5CBSrI9kotEyJ9Dsz0YP8cGnpS2MCE4KiU4KkECt23kS552cGE1x+GHb8n +Uij1Oyf3tS4m8PXkZhqcpxC9ZMrPncWEWlqlfhS24PoG6bFXTMj9L7tqCft4 +o9vVb31MMPlsZf8piUKKav+LVBpnwt4QGZviCxT63n+u5zPJBCeiiDWI3Z3E +1KqaZELF565qgRQKxY7oTBlMMyHn/ovC09iD2T1e9kt4vp9naMNfFMrYIGR+ +dh0BTwybF2ovUqhpccgjgouAdrPP98awJ4bKwoK5Cfj4/nS1SCpeD/fNbtE3 +EdAS87dvGDbpG/XDWoiATImmTKVLuP025lvNhQkwnx3Ss8c23LNVFYkSYHdr +i9gZ7DT+chdtSQLGUURK11p5w8caaXkCVOzBiHGZQkRxeYeoIgF5+e2PU7DT +0s58FFAmQJAUOleOTRLC/OtVCcgYY5UvrJULWwZOaxGQvMzuD7tCoYZfwnEk +jYBSdvmedOzxz8NZwzoEbBwi31Ri731y9mmvPgFO79saJ7DHjlfK/gsE0MPP +ujhcxfvdLVr30X4CbLUupgdiG5gesKkxI2B34eSGeOwrkqNnig8Q8K9U9O1y +7Lr1VWn51gR42xW9bMb+NBd954YNAQtZPLQ+bP020beXHQhY6aKXrWLTa0a/ +XHAkIIdx+P+2pFHock4V559OBFwPChKQwx4Ns9KKdCMgRu6HL2Dze4tZnjxC +gOL343R7bH2rT15BngSkZ7LzvNbq/3Eu1duXAB3CuPM0dh2vdYEbnYDPFtTD +xLU8tli9I4OABL36j1fW8kY+vbIhCBCKTzS9sZbHqiYtAnF5nuNoATb90bmf +EETAaSOlprtr+QXWIobHCWDqUN21a/mXxdV1g3F5Wptc41p+1Ng+zZMElFzM +vNuMzceocVMNI6DpkkdoO/Ye+9gQxQgCDLRkwlhr+XsPJstE4vom/RXd2JeU +JXLFo3B/qlOUerEfCo7XCp0lILJKq68Pe+RHTdfmGAL6M1+2DKzlT8SOcMcS +oEv6Tb3D1ntz8OvvOAKGvKdsBrH/H6Q47T0= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12819,105 +13678,106 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV1nk4Vdv/B3ARlQiZiWsuJDqGyLA+ZYpMyZj5OGeTigxJkeGK3DQY8k03 +Q9dQyJgG0+0XydSpFCE3hdgkM2drUP2WP/azn9eznvXea15bnh7iyOTk4OCY +xM/aO/Tlru2Pul+a5PxiGlZtJ5HJbJEu3awcyR/fdGLNw/l615TMmpCa0/y6 +amwHxgsePu1nSLlB6vuaa6LinnKbsdDuohTne9h/tUk8iSt7jSqk9orcx67v +Ds1bpb1FJjs09R5iTw12xZxpHECigwGNddhS44oelOl71IrGChuxD87FGISz +PiLJY0Vzj7Efr05tjiobQXEnS/JasPsSxKMfBn9CBcR8dRv2LI/Z1DJtHMUT +MSrPsXkunXTXXiFRUarN71fYskK5HaGNk2h2ydfwLbadNHV71nQaWQm5Dg1j +E7cUxDQ2zqIf/AamE9hxyvZJx1hzSG7Ih28We0C8d3dE2QKyzonpWMVmHAk6 +mnlpESlNhDWu30Gi+RyOf+4FL6Gx+kohfuyNChqCCzQ24mlfmZDFvsZ4aiko +SiGrEO7AHdhyd9zjNFcoZBHtfpCGrb8zefZE41ckcf+toSV2oN5H1pTpKvox +qdx6Cns56tR6XpWfSGfohPef2PGNm41UN/5Cm31+eVzFzgb9uwGs32jW9nt8 +GTajuMMsrGwdFGgEhI1jl7VlDidIc0Jxz6oKe629E94x6Zc4obtzyIRblUQx +auza6mAuENNNzFbBvlYlrzhH44aFsIClE9iD3dOPfxVyQ9EyvSUeW27x0ZEt +ojyQIl+xnIldrmOXobHCA1GumomN2K31Z9cdb9wIC7VfLQXUSMR+2vNx0pQP +dvzcGtqJvdWGTzD6MR/Y3D12bQxbq9cM+A34oaA1aSeHOomCxh7c2r1rC3x1 +W9eoj32Sk6VlzCcI4gU7D1VhjytULiRRQlBoLOx/byceH6Jr0yvtrWClMfGm +F5vzLikvEboVqs9ffLSCLaf9h2PZl62g5mn60USDREdM0+69HBaGqF83St5g +v/IPCxd/Lgp3TDsUBTVJ9OHOlVTfjWLgWCcwYoA9/aWssNRcDHh69wgzsHkj +PvUYPhEDqZZdffXYZueddHwfiMPOM+/6grRI1FCkxy7Jl4T4BaPW0d14HY5/ +j9wbIQOlYQ1uarokOuB84UN4hQxwl48ve2NPtwpbVJAyUPRSZiUTW6dop6ic +uywI/KzX+I3dSveu5Tb5A7Ja2/wH9Ui0ODd8ejJRDmJlfZcL9UkkfMLsfq2t +Akh2JtQkGpGILOINdAhSgKsD34SeYde975aeSVYAsq98gMeYRJ42XokqTxRg +Zl1Xdip2kXqk4w2aIjjv2zJ2wwR/f+rOfKy4EszWapZ0AomcAjZrWI8ow7zG +0OIpcxKhSGea609lmFQNvdaCrZaUv4chqQLt7THZAhYk4ijU3h97SAX2b+Ts +KMOu+ODheq9ZBZoWqNZxS7w/XcoTpAq2g7SEkn6wNW6fmW3fFF0VYn06BTvt +SVR4+Pp/K7GqsMV8Zr2CA4mu0EeG199UhczBZx7R2Iz4U19ke1RhvXnubs1D +JBJqyuU4bKoGi+9kY2864vWjPavWqKgODfP7cpKdSSStcDUudWwnuO7Ytnrb +g0RNF5dVv3FqQMGv8nERTzweS+69hLwG6AU+ME3EzmtVUt3vrQH5Dfpefl4k +UghoePO1XwMU/Dx5FH1wf8vHlYnnu4DkrNduopNIRlqWkHPXgpxCf0GLIBLt +LI7g+4FoIPX90IW6sySiMxLZGnY0UOFX99gbjferYsYHX08aCISoZzVhcxVU +VbdF0eDocIVhSwzeb3lTThk1NHBU5zv8Jhafp9m+uaqK2vDNqquCOxHPb6rN +LjceHbDQT9tRn0qif8KUHB6wdKGuJeHT4TwSdUeiPeeLDYCaFU7axSKRvPdb +O6/jxsCp/zUnj2MCMX8/rJQ5A3Cx/+mWvfoTSPxL3QZx+n6IkMr2nIieQBHa +Ru8z1MxAycrTWaxlAtFnVjuEp8zh/sF022T+SVSxP3xD/itLuDiRfH2EmERF +y0HN5desIKQv3dineRJ93SfxojXuILwo/jpzQP0zGuLgWhjxs4Xw0vEPhjc/ +o+BtIWkJivYwoPTXlS7eKVR5tONJVpIDGGR93nYzdQqdXZJcUT96CJRVPHnU +N39BbGsLl3YfR+jPzp9xyv2CDDzS940fOgwt7jPjbTrT6I1kblCrthNoZdl4 +buicRlK3E5tKdjiDCWPiqVroDKobVrOx43eBrNNVae9FZpFs73xA5IwLOKx7 +e9a1cRZpZ6WXFw67Qr/XTS7TyDmUu35pV8ZTN9BM4coXEZ1HD/dpDibVuwMv +V6KE8Zl5lL3notBq2REof8iikUPz6NV/xcnalzyAL8M9NsZ4AT2wzVE6Ge8J +lzb0H0u6vYAWThzmCGZ4wY05lqjXpkXEtlANnDX1hh9z2i4xQYuoZObd13A9 +H3gdna1yrmcRuf1T7O/F5wsF8QuS4TpLqPbeQR+uC74wET1vVXFzCRlIv/n2 +1zdfEIk855/ybQkpDgcMvj7qB+kPB88dd1xGY5uP2ed88gOfu82SMZXLqPuK +nb+lMx0aFU7Lx/1eRtei8jef6qZDeqgAcB9io6bHv7/5W/kDr6Uf8foGGwl4 +wgXtBn+Ie2LmGtvHRnIi7a+2NfmDlwghdqqfjbRYthI8j/0hoZlufmyAjRyN +PEoHmv3hqYzSovMgG13bFvn8XKc/lGaZJyh9YCOpobsCHQP+MLpiZn17nI2U +vMWzPVf8wahHYpfhMhsZ+M6WJOkwYKhV4Vm+AIVu35gPt9NjwKh8wzZ/QQqJ +9CyaiOszwPsfl2llIQrNmq/0lhgyIMNUYKl0K4XPL451rP0MqGVk/X0X37Nb +VoTctx5igJPrLC1LmkJjl3U35Z9ggC+HdBbHdgpdaYw5WnebARdcG59rGVHo +BO26QVQJ/l6v6uILbJvSmk36ZQzwt5i7HGRMId7rZOmjCgYMWvArF5hQKCnM +YerhfQYwk2Nf8u6jUIyq0rEHLQwQf9vObjanUND158fvfWAAd8LB/jY7fO9v +IY3ChhkgWqYb7mhPoR1JHPy0UQas0EQThrDJMN2KmnEG0APtFhccKORnlz9T +Pc0A1Rdj20UOU8iNOzy46jsDWvtYncauFLIMlzpZLsYEHsaCibIPhVryk60z +JJig8VLCoBTbiLWoFCXFBPrGP1N2+lJIS/n5O1NZJrjm3FHZ7Uchyf5o0/+U +mdDaruJF86fQl71DYry6TJhsLf5bJIBCVzlv/RtwmAk9XIk5rsG4/5p82bbO +TOD8oMLbhn3eIypM25UJl4wfd2qHUCjqvsP230eYkGoeYMJ/ErefWJf+PzoT +Pt3Y+ONRKIW0u+iMZ6FMeEHRKqYjKNSfrrxZMY0JevWKR96cpVAl4g+cTGeC +S+/TZaVonD+z3FqRyYS3A6fZkdg0q9ZY/etMCLr+fodkDJ4/Dv9F2zwmjIqQ +zi7n8H9UyK13UeVM4GU1N9bGUUhGJkXPpJIJYaNnqlexl7tCMrmqmbBtxYXX +PJ5CBSrI9kotEyJ9Dsz0YP8cGnpS2MCE4KiU4KkECt23kS552cGE1x+GHb8n +Uij1Oyf3tS4m8PXkZhqcpxC9ZMrPncWEWlqlfhS24PoG6bFXTMj9L7tqCft4 +o9vVb31MMPlsZf8piUKKav+LVBpnwt4QGZviCxT63n+u5zPJBCeiiDWI3Z3E +1KqaZELF565qgRQKxY7oTBlMMyHn/ovC09iD2T1e9kt4vp9naMNfFMrYIGR+ +dh0BTwybF2ovUqhpccgjgouAdrPP98awJ4bKwoK5Cfj4/nS1SCpeD/fNbtE3 +EdAS87dvGDbpG/XDWoiATImmTKVLuP025lvNhQkwnx3Ss8c23LNVFYkSYHdr +i9gZ7DT+chdtSQLGUURK11p5w8caaXkCVOzBiHGZQkRxeYeoIgF5+e2PU7DT +0s58FFAmQJAUOleOTRLC/OtVCcgYY5UvrJULWwZOaxGQvMzuD7tCoYZfwnEk +jYBSdvmedOzxz8NZwzoEbBwi31Ri731y9mmvPgFO79saJ7DHjlfK/gsE0MPP +ujhcxfvdLVr30X4CbLUupgdiG5gesKkxI2B34eSGeOwrkqNnig8Q8K9U9O1y +7Lr1VWn51gR42xW9bMb+NBd954YNAQtZPLQ+bP020beXHQhY6aKXrWLTa0a/ +XHAkIIdx+P+2pFHock4V559OBFwPChKQwx4Ns9KKdCMgRu6HL2Dze4tZnjxC +gOL343R7bH2rT15BngSkZ7LzvNbq/3Eu1duXAB3CuPM0dh2vdYEbnYDPFtTD +xLU8tli9I4OABL36j1fW8kY+vbIhCBCKTzS9sZbHqiYtAnF5nuNoATb90bmf +EETAaSOlprtr+QXWIobHCWDqUN21a/mXxdV1g3F5Wptc41p+1Ng+zZMElFzM +vNuMzceocVMNI6DpkkdoO/Ye+9gQxQgCDLRkwlhr+XsPJstE4vom/RXd2JeU +JXLFo3B/qlOUerEfCo7XCp0lILJKq68Pe+RHTdfmGAL6M1+2DKzlT8SOcMcS +oEv6Tb3D1ntz8OvvOAKGvKdsBrH/H6Q47T0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6923442993283575, + 1.4103644375335798`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.6923442993283591}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12929,21 +13789,21 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6923442993283575, + 1.4103644375335798`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.6923442993283591}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12957,103 +13817,104 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV1nk4Vdv/B3ARlQiZiWsuJDqGyLA+ZYpMyZj5OGeTigxJkeGK3DQY8k03 +Q9dQyJgG0+0XydSpFCE3hdgkM2drUP2WP/azn9eznvXea15bnh7iyOTk4OCY +xM/aO/Tlru2Pul+a5PxiGlZtJ5HJbJEu3awcyR/fdGLNw/l615TMmpCa0/y6 +amwHxgsePu1nSLlB6vuaa6LinnKbsdDuohTne9h/tUk8iSt7jSqk9orcx67v +Ds1bpb1FJjs09R5iTw12xZxpHECigwGNddhS44oelOl71IrGChuxD87FGISz +PiLJY0Vzj7Efr05tjiobQXEnS/JasPsSxKMfBn9CBcR8dRv2LI/Z1DJtHMUT +MSrPsXkunXTXXiFRUarN71fYskK5HaGNk2h2ydfwLbadNHV71nQaWQm5Dg1j +E7cUxDQ2zqIf/AamE9hxyvZJx1hzSG7Ih28We0C8d3dE2QKyzonpWMVmHAk6 +mnlpESlNhDWu30Gi+RyOf+4FL6Gx+kohfuyNChqCCzQ24mlfmZDFvsZ4aiko +SiGrEO7AHdhyd9zjNFcoZBHtfpCGrb8zefZE41ckcf+toSV2oN5H1pTpKvox +qdx6Cns56tR6XpWfSGfohPef2PGNm41UN/5Cm31+eVzFzgb9uwGs32jW9nt8 +GTajuMMsrGwdFGgEhI1jl7VlDidIc0Jxz6oKe629E94x6Zc4obtzyIRblUQx +auza6mAuENNNzFbBvlYlrzhH44aFsIClE9iD3dOPfxVyQ9EyvSUeW27x0ZEt +ojyQIl+xnIldrmOXobHCA1GumomN2K31Z9cdb9wIC7VfLQXUSMR+2vNx0pQP +dvzcGtqJvdWGTzD6MR/Y3D12bQxbq9cM+A34oaA1aSeHOomCxh7c2r1rC3x1 +W9eoj32Sk6VlzCcI4gU7D1VhjytULiRRQlBoLOx/byceH6Jr0yvtrWClMfGm +F5vzLikvEboVqs9ffLSCLaf9h2PZl62g5mn60USDREdM0+69HBaGqF83St5g +v/IPCxd/Lgp3TDsUBTVJ9OHOlVTfjWLgWCcwYoA9/aWssNRcDHh69wgzsHkj +PvUYPhEDqZZdffXYZueddHwfiMPOM+/6grRI1FCkxy7Jl4T4BaPW0d14HY5/ +j9wbIQOlYQ1uarokOuB84UN4hQxwl48ve2NPtwpbVJAyUPRSZiUTW6dop6ic +uywI/KzX+I3dSveu5Tb5A7Ja2/wH9Ui0ODd8ejJRDmJlfZcL9UkkfMLsfq2t +Akh2JtQkGpGILOINdAhSgKsD34SeYde975aeSVYAsq98gMeYRJ42XokqTxRg +Zl1Xdip2kXqk4w2aIjjv2zJ2wwR/f+rOfKy4EszWapZ0AomcAjZrWI8ow7zG +0OIpcxKhSGea609lmFQNvdaCrZaUv4chqQLt7THZAhYk4ijU3h97SAX2b+Ts +KMOu+ODheq9ZBZoWqNZxS7w/XcoTpAq2g7SEkn6wNW6fmW3fFF0VYn06BTvt +SVR4+Pp/K7GqsMV8Zr2CA4mu0EeG199UhczBZx7R2Iz4U19ke1RhvXnubs1D +JBJqyuU4bKoGi+9kY2864vWjPavWqKgODfP7cpKdSSStcDUudWwnuO7Ytnrb +g0RNF5dVv3FqQMGv8nERTzweS+69hLwG6AU+ME3EzmtVUt3vrQH5Dfpefl4k +UghoePO1XwMU/Dx5FH1wf8vHlYnnu4DkrNduopNIRlqWkHPXgpxCf0GLIBLt +LI7g+4FoIPX90IW6sySiMxLZGnY0UOFX99gbjferYsYHX08aCISoZzVhcxVU +VbdF0eDocIVhSwzeb3lTThk1NHBU5zv8Jhafp9m+uaqK2vDNqquCOxHPb6rN +LjceHbDQT9tRn0qif8KUHB6wdKGuJeHT4TwSdUeiPeeLDYCaFU7axSKRvPdb +O6/jxsCp/zUnj2MCMX8/rJQ5A3Cx/+mWvfoTSPxL3QZx+n6IkMr2nIieQBHa +Ru8z1MxAycrTWaxlAtFnVjuEp8zh/sF022T+SVSxP3xD/itLuDiRfH2EmERF +y0HN5desIKQv3dineRJ93SfxojXuILwo/jpzQP0zGuLgWhjxs4Xw0vEPhjc/ +o+BtIWkJivYwoPTXlS7eKVR5tONJVpIDGGR93nYzdQqdXZJcUT96CJRVPHnU +N39BbGsLl3YfR+jPzp9xyv2CDDzS940fOgwt7jPjbTrT6I1kblCrthNoZdl4 +buicRlK3E5tKdjiDCWPiqVroDKobVrOx43eBrNNVae9FZpFs73xA5IwLOKx7 +e9a1cRZpZ6WXFw67Qr/XTS7TyDmUu35pV8ZTN9BM4coXEZ1HD/dpDibVuwMv +V6KE8Zl5lL3notBq2REof8iikUPz6NV/xcnalzyAL8M9NsZ4AT2wzVE6Ge8J +lzb0H0u6vYAWThzmCGZ4wY05lqjXpkXEtlANnDX1hh9z2i4xQYuoZObd13A9 +H3gdna1yrmcRuf1T7O/F5wsF8QuS4TpLqPbeQR+uC74wET1vVXFzCRlIv/n2 +1zdfEIk855/ybQkpDgcMvj7qB+kPB88dd1xGY5uP2ed88gOfu82SMZXLqPuK +nb+lMx0aFU7Lx/1eRtei8jef6qZDeqgAcB9io6bHv7/5W/kDr6Uf8foGGwl4 +wgXtBn+Ie2LmGtvHRnIi7a+2NfmDlwghdqqfjbRYthI8j/0hoZlufmyAjRyN +PEoHmv3hqYzSovMgG13bFvn8XKc/lGaZJyh9YCOpobsCHQP+MLpiZn17nI2U +vMWzPVf8wahHYpfhMhsZ+M6WJOkwYKhV4Vm+AIVu35gPt9NjwKh8wzZ/QQqJ +9CyaiOszwPsfl2llIQrNmq/0lhgyIMNUYKl0K4XPL451rP0MqGVk/X0X37Nb +VoTctx5igJPrLC1LmkJjl3U35Z9ggC+HdBbHdgpdaYw5WnebARdcG59rGVHo +BO26QVQJ/l6v6uILbJvSmk36ZQzwt5i7HGRMId7rZOmjCgYMWvArF5hQKCnM +YerhfQYwk2Nf8u6jUIyq0rEHLQwQf9vObjanUND158fvfWAAd8LB/jY7fO9v +IY3ChhkgWqYb7mhPoR1JHPy0UQas0EQThrDJMN2KmnEG0APtFhccKORnlz9T +Pc0A1Rdj20UOU8iNOzy46jsDWvtYncauFLIMlzpZLsYEHsaCibIPhVryk60z +JJig8VLCoBTbiLWoFCXFBPrGP1N2+lJIS/n5O1NZJrjm3FHZ7Uchyf5o0/+U +mdDaruJF86fQl71DYry6TJhsLf5bJIBCVzlv/RtwmAk9XIk5rsG4/5p82bbO +TOD8oMLbhn3eIypM25UJl4wfd2qHUCjqvsP230eYkGoeYMJ/ErefWJf+PzoT +Pt3Y+ONRKIW0u+iMZ6FMeEHRKqYjKNSfrrxZMY0JevWKR96cpVAl4g+cTGeC +S+/TZaVonD+z3FqRyYS3A6fZkdg0q9ZY/etMCLr+fodkDJ4/Dv9F2zwmjIqQ +zi7n8H9UyK13UeVM4GU1N9bGUUhGJkXPpJIJYaNnqlexl7tCMrmqmbBtxYXX +PJ5CBSrI9kotEyJ9Dsz0YP8cGnpS2MCE4KiU4KkECt23kS552cGE1x+GHb8n +Uij1Oyf3tS4m8PXkZhqcpxC9ZMrPncWEWlqlfhS24PoG6bFXTMj9L7tqCft4 +o9vVb31MMPlsZf8piUKKav+LVBpnwt4QGZviCxT63n+u5zPJBCeiiDWI3Z3E +1KqaZELF565qgRQKxY7oTBlMMyHn/ovC09iD2T1e9kt4vp9naMNfFMrYIGR+ +dh0BTwybF2ovUqhpccgjgouAdrPP98awJ4bKwoK5Cfj4/nS1SCpeD/fNbtE3 +EdAS87dvGDbpG/XDWoiATImmTKVLuP025lvNhQkwnx3Ss8c23LNVFYkSYHdr +i9gZ7DT+chdtSQLGUURK11p5w8caaXkCVOzBiHGZQkRxeYeoIgF5+e2PU7DT +0s58FFAmQJAUOleOTRLC/OtVCcgYY5UvrJULWwZOaxGQvMzuD7tCoYZfwnEk +jYBSdvmedOzxz8NZwzoEbBwi31Ri731y9mmvPgFO79saJ7DHjlfK/gsE0MPP +ujhcxfvdLVr30X4CbLUupgdiG5gesKkxI2B34eSGeOwrkqNnig8Q8K9U9O1y +7Lr1VWn51gR42xW9bMb+NBd954YNAQtZPLQ+bP020beXHQhY6aKXrWLTa0a/ +XHAkIIdx+P+2pFHock4V559OBFwPChKQwx4Ns9KKdCMgRu6HL2Dze4tZnjxC +gOL343R7bH2rT15BngSkZ7LzvNbq/3Eu1duXAB3CuPM0dh2vdYEbnYDPFtTD +xLU8tli9I4OABL36j1fW8kY+vbIhCBCKTzS9sZbHqiYtAnF5nuNoATb90bmf +EETAaSOlprtr+QXWIobHCWDqUN21a/mXxdV1g3F5Wptc41p+1Ng+zZMElFzM +vNuMzceocVMNI6DpkkdoO/Ye+9gQxQgCDLRkwlhr+XsPJstE4vom/RXd2JeU +JXLFo3B/qlOUerEfCo7XCp0lILJKq68Pe+RHTdfmGAL6M1+2DKzlT8SOcMcS +oEv6Tb3D1ntz8OvvOAKGvKdsBrH/H6Q47T0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6923442993283575, 1.4103644375335798`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.6923442993283591}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13063,7 +13924,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6044061540843444}, + AxesOrigin->{0, 0.6923442993283591}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13091,7 +13953,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6923442993283575, 1.4103644375335798`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13099,9 +13962,9 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913320330871353`*^9}, + CellChangeTimes->{3.9913320330871353`*^9, 3.994357146931313*^9}, CellLabel-> - "Out[220]=",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] + "Out[139]=",ExpressionUUID->"725b9b35-0a3f-4997-9fe9-13466a8ffafb"] }, Open ]], Cell[CellGroupData[{ @@ -13116,7 +13979,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -13138,8 +14003,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -13164,205 +14028,179 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918491076725483`*^9, - 3.9918491120260525`*^9}},ExpressionUUID->"cbec275e-4d01-7747-9ece-\ -7fa9a2a651b1"], + CellChangeTimes->{{3.9918491076725483`*^9, 3.9918491120260525`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2976471457269651`*^-270\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.0748805044920343`*^-267\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 221, - 189, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033325203*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.9943571471502237`*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], +In[140]:=",ExpressionUUID->"6e64fa75-68ea-470f-b8a5-c79ab555d8d3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.376858869110442`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"8.084754940593482`*^-279\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 221, 190, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913320333342056`*^9}, + 140, 70, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994357147159853*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], +In[140]:=",ExpressionUUID->"c0487d70-e962-40b8-b70f-edfcc26c45ab"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.193593532260836`*^-293\\\", \ + "\"\\!\\(\\*FractionBox[\\\"6.080979436904011`*^-290\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 221, 191, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033342205*^9}, + 2, 140, 71, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.9943571471692133`*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], +In[140]:=",ExpressionUUID->"02798b95-ff38-480a-b78c-322a5cf3c45b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 221, 192, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033351204*^9}, +during this calculation.\"", 2, 140, 72, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994357147178586*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], +In[140]:=",ExpressionUUID->"d22d735b-aee8-4842-9a7c-5724d55eee0b"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VH8bAHARbVL2yTaLJSpZw4wZz2OJLCm7iEQoWUpSSdkiIpGUtFHq +VxQzc9sslaIiWkm2ZAtJqBAi733/uudz7rnPved8n+3SfcMc/QUFBARY8wQE +/n+d6KitVkktMBFOoYBbuIVJ42XKIdPmeAhd1a4T+5QBKP3Wl9J8Gny7q784 +P9WFyM2Fn4Sar0JMXfcDg6dmID4se3rqEx9SAgZuCj91hC8V9mFjn56B9qYM +I/9KX7BUGfz889MHGKlQSR9/FA5TnwyzRz91Q6bx4r9md+Ohyvy/gvdXf0NQ +gbpX++YsUPhS2ue7ZhY6tLNzD9leBKngbYULzIWwPupi3X6nq3Bax7Lc3mUh +nuk2e5WdcgNacrQrfy5fiscOyw/7yxdCakHMW8EV4li0uWS0JekO2OjvkpBW +FkfplG9+1ll3YGG1o8tKTXHMFxkY4l65A8d6VNtsTcWxNKbVYOfDOxDNqO87 +s0sct5r+2XXg2x0IzaP8UysTxzl3rpOMTTE4XOStsfWUwJs725SthEtA9kxP +StYlSSw/YjmUoMMFyup7xyZvSKLpdMY8LwMuyD1LivHiSmJ+Q9geXWMuKI1q +7F9ZJYkljzLdP1hwQdVuj0/5gCRyAi3M+ty4oDd/1qBHTwp7f9T+8zrChU0R +Mr26r6TQXbX2aMpzLmxeMtBxrkEKZdcbPxqq5YLj1dKWmXYpzA4TX2/3hguu +77a+fTEihWfLTbQEPnHBa821Mg9paXRqZ/kaD3Bhd69WZryPNNLLZYb+LeLB +cWdrkw8T0hjRok5/aMMDubtv5ATnyeDU4yrXSXseFEs6/9FZIoOXtw/S9Z14 +0PTBm5tJlcFqxXMHLnvyQMUhguGwQQYLqv7KmgTz4NnGKyLvzsugWsDukZtp +PJi1HH/zmi2L24otQ1a/4kHGjaiiWUtZfDnp1vr5Nfm8iECypoMshj51b0p9 +zwO754tNT/rLon/h26jWZh7kmtMIu3RZDLJM3mfWzwMjtD1X90UW5xVUrOAI +8WEfM39bbTwF5WYMLD4b8sEmT2zMNo2CR1c/N6pn8YGxIDr5TTYF2cZf7R9w ++PCu0ZXXcJOCSu9tO+PM+bB2j6hQxxsK4hbJCwP2fBi4ceDGL7kVqL1x6NTM +Dj5slbL/IU+swO5q6QeQzge9w+VxlytWYPmmVE0igw+Lu9Vl6C9W4Nurl+oY +WXwoLRECtZYVuM6TFzNxjg8ytqUZ2nMr0EH6xNuwfPL9cSr6623lcGBhm0Mh +wQeLkemo0B45jP+93cz0Ix8ObTiz6umQHA6WBgVok3VVnK/ZKjkhhxpt6j3y +LXygOPswSxfK4yH0H+hv58PQw+d/hNbK477Eo5rOvXzIis+IOH9QHs21vgoe +/cWHmjYNlaE4eRz45PlVd4wPM/pVDSap8tj45MTK3nE+BPSP6/ZekkcLylS9 +8RQfWHaeP9dWyeOIxe1bT+b40C2tFlq9VAEFvW7JyYkSIBv2RFFWVgEfmUjp +Zy8lwK7G/fUumgLOK3O5J7qMgPtRqWuW6Slgi+yJn6PiBJz4Mjq4xV0BD1Xq ++aTLEqB7qzxw5KoCetC+ZisyCAgUdJE1u62A2rVWe7YpE3DRc/jFmXsK6LaA +KL+kQoCIGF2NVaOA9oVSN5etJKA1PKn32A8FbLzkPlCzmoA4tsN2OSNFnK87 +cCZTn4AN3pd/GZop4mm2oiZvHQFisd8TXOwU8clS4fx6AzJ+VeKNDB9FLI3z +of4xIuChTdl3kRRFXKn3KF2OQ0BM8IIjKlmK+JA+rrDChADLdGcxs0uK+Gpy +8KQkEND4flj7CE8R9XS48jNIwKi7cuTvFkWkrrATuGhBwIOoPQvEexWxcEzq +8aH1BBy9+Chn7bAiZr775+9kSYBop1v5LkElLGwQODhtRcDKwDSBzlVKuF41 +54msLQHDyS2Zs/pK+OQ281sj6buFasryoIQFqffmp9sRYDZcud7VSQnd1ulK +j20kwHv/+In6w0rYL2r28NRmAlTPmSkMJiqhSGdJ2hoHgsyPU3cWZJDxu4Q9 +n5OOmtF4Z1aghG9FT3wbdCTAVOnAdp9iJUw0qSs64ETAQqz+deShEvoUyQUL +OBOQneAtXVqvhNc9Kd+FXQjYer3oRlOTEl7o7CmKJ814OWk41qmEwozJ0L+k +uYuzPLTGyfu25gJdrgTUZ768cl2RioceXg+Jdicgi5DSqVpJxfInI94tpD0+ +bn/WqUPFwCk9T90tBAxQZnrlLanY4CV/qJl0Ccs6krmZih01UxdVPQiI3Hp2 +gZsHFSW/bngXSlooT3vV6VAqjqs+2jVO+tXTI+UlB6m4dtPKD7qeBGT0vLJ7 +HU/F59pp9sGk3YQpHYNpVPzoKN6ZT1pppX/YwnNUtN37+XgD6a8b+AJq+WS8 +KIrVvK0E3A6ayzQvouL5jO9Kq0nvS7NT3n6PimNCccsdSLOKz989+oSKja7z +FfeRtvj0Zna4horuDRI+p0jbC8y32vaBiv0JQqY3SbtrMDPetlFRI66+8hFp +P8fQFvhKxdiXOzrfkg49fI3BHaainUF1XgfpgwXNu2mTVGSf6hEcJP20L8mj +RoCG/+2vWPCLtOVhekysMA1bQqy5E6TrllVcM1pMw13tibN/SG8ucK0ZFaNh +knDo6DjpJqOfQzclabhRdC5llLTn61Tx7RQaiv8yqOsn3bldzWCFIg1Ls6Xu +tZEOmKj0eE+noSBxbkM96e8nPGNS1Gj4uasyqZT0HurENdPVNORlZ+65Rnqc +yKiZ0qLhPQXRBSdIR21Y/YOnT0O4omcbQlrg83PxICYNF1JFTTaSTtzrY8Aw +oWFqZG6nBunFIn89Ws1oaOneqydEOiM3O+a0FQ0l7UeNWsjzya16VSPoQMPa +18FbD5Omuvv/KHOh4bvzw9FWpAuG5sT3edCwfsbZaTnpEul1nj1+NFy9+q9q +Dpkf+oVvYy7spGHWJ0cVN9JlJkEFTiE0TGh73C5Bujrwyo+qSBpeui0aG0vm +n/UMUyL6MA1NekRD/p+fbzIaDfRjaThu5k3pIvO3pXRRbEEKDfV0WcX6pL3t +Cwq2ptNwzaVvuS1uBPR2m9RKZdGwuE/P5jDp4SUREokXaViW/n3sLlkf+/LE +DDn5NFyicuyXHelJ/Vue49dpuHi+2IMusp6EvDsK/EtoOHHX+fw80hTuBkPL +ZzS83xXeJUfW6yWLHs9/L2gY4+iy7jxZz4yWI7H362gY4vzXXYq0piBRq/aR +hnXPFknNI+vfzFlx64IBGi67kHfwrj0BwZM/Y2uW0tF1sGgqwZrM570BMn0S +dHROykyr3ED2g8HWIiEKHYkFg/unyH51va2qyYRBR6vpTgcfsp91PM5ec8+A +jsGsXHdBcwI2JTKb87fRsTZV8FeOMVlf/+6EPNlBR/nSr1cusMh+FMkQ+ryL +jpw0n4pcJgHJO5espUTQMQSsrNINCai0/ZyQnkxHt3zddzZ65LyQiNM6zKPj +4RBTUflVZP6kjlfn3KejXfZu76/q5HkIBXncL6fj3VyO0W1yPuwed0z8+ZyO +i98Yp2ipkvnQrNIW2ErHkaG416I0AmSu1CQ5CzFQy2d8g7I0AVOrl3doujDw +oXFqQt0MHyYuycXpeTDQY/7iizp/+TC2TFWFuY2B1MGlp86Q83H4NzPIYhcD +fxQvXeIwQc7Hcr8JjyMM5MgOHy8Y4cMr2wdiydcZ6HLPae5+Fx9yd3tD9zgD +lbMXumZX8eHc553d/dMMzErjfT3/lA9nNu1L/DHHwKNbHI5deMKHdL3kuslF +yuhPWTWeXc6H+L88t2VKyqguYd8YSO4Lu1OF97AtlXHm3BHBuKt8YBfdzjt7 +VhmTbwktyj7KhzZa0ZX1F5RxeCldPTCaD1Fnb10eu6KMux/d6DeI4sODuBsX +HW8po3l56sa3+/mg656XI1ahjPftdNt7gvmgIXwmI6lLGVV+5Zhe8iD3l22H +YyPXqGDUiUSapz4ffkrY+Lg+U0GPaOUcpy4eNAcz3gW9VMEJ3lCHVwcPKl9M +Q0y9Cob9sn/p30bue1FF1JtNKpiq6Xws9CMPtLtFv0wNqqA0/2qPXy0PQnlv +vS5JqqJJdU/LFy4PBje5ePbuUMVp76lKjaM86E3zcQ1foIb3wyr/C5XggfXI +AeuvBivReWPK9LV1XBjyW7jvbow6etn1zX7wLib/N2QFjz/TwOX/zTbtNr4N +Eq/V0rkjq9B+j1f/4dWFoJBcstnAYA3W7m1onOn/D3JWM5dLBmpi9gfKzMDr +6/BKznTd78y1+O2PaMXi2mvAUniWodWkhS4Sp8/nFuWDmNDViO3x2jh9tnVW +9swVUIqjsreo6aCwyI6Gm48uwCLVrfcdX+rgcpXLNAuTHFjLWVFywEsX6+Xm +5J6zsyG8Q6LKRkAPl86Irx03Pw0jv9NcrHP00LC7WFQ+6RRYab3ItdbUR+6Y +htmUQio8/m38988bfcy51hht8DkJQtfotr73X4carACpKz4JwBne0bhlkQE+ +NLlx1E06FtarUDYuvWqARxrN+odbo0A99sTBZ4aGKHwkpd3ZKxJW+TOfqLYa +oqK1rraaYTicYthPJ7Qb4i/W85Ip9XAY++K7rrvDENcf+xbRJBcOjz3Sii73 +GOLFk/THRf/2guPmL+dkfxhiMk/6XfWLvXDIOHHPIgEj7F96QuKO+16oEX9P +/6FqhKxnL40NE/aA/+Odx+7uNUL9o1vFontDYDhk8MD6CCPMyd82FPMqBA4q +Bu9uijTCztNNgue4IXAiOsxx8rARKm8RKv4XHQJcViSNnWSEQdlq7/gyITBz +P6GiKtcIT7V/6y7YGAynSy6Pfagywtxf39741wbBk7zGHT+lmfhjXWPR8olA +6LSjb4ukMNGu+lPF785AEJgK2fJXjomcv6ff99UFgpnDAnthGhNdZQ06Z/ID +4cU8luGKVUws7BJI6bcPhHrfK4tMTZhodItTW1wUAK0qQcUZAUwcbvcrqtrj +D2M35/5oPWBi2+WiDJGVftDnapmXUsrESkarf72MHzTPP7mhp5yJj/JKtC6L ++EG5j9z5s5VMFHGVSvTv84V4yjrWbC0Tm8Lu7o2/4QvLk4OiX7UzMfqlhu6I +ui+sCfwo4C/IQruXrI9+BtvBT7VoUe5GFn6eWXQ2utcbop57B6ltZqHNzTey +Ti+9IcNfoo7vyMKmvPDHpoXeUHH9UFqdGwv33ZvHDNzjDVJqG5bNbmdhvHWk +/PtZL3ih9lXKJ5KFUkbJYRKKXrBKnUpTu8LC1LM+19qCPeHnqiwD/igLj5YW +vmDYu0NzPa6X/M3CQDlVfVkjd6gMHXaKGGdh0qaIzYoMd/IXyXqvwTQL1RU8 +A7wn3GAVS+B2mZAxdl4Xecy/4ga+1iH0KhljpBSM9J4fd4XGQCvRRrYxOvWX +R4gXu8DDgr9d48nGuOWBzgfdTU5gYB7xxybVGI/vJ+qyOE5wr2tINO+kMeqb +h8sKrXECvlKHoc1pY1RY4nZUdJET3M6pPHn5gjE6ryo4UFvlCHlpiUyrYmOM +PPfhXI+xI6RELMvMaTDGbxpx6S4GDuBhoYzGSmysu5D7aXOBPcw2LhSrorFx +qmihEjPRHvL8h9tslNloVLCliBNgD31JpQc81NnYv73E7IK6PYTXbio5pMvG +hU+d564Xb4QT9tFKDy3ZeEmh6G7fEzsoc/84ox/GRqnFHc0xEzYgH3K8dG0l +Gy8aJTAzS6wgfS5gXeozNjK2eJal5liB4GlLXn81G1v6lu3KjbOCwfvCt/Jq +2Rgh9VFizMkKygSO5Ug0sFHxJf44O2UJHmdiD0x8ZaPDboXjJzdYQk75oXWP +l3Cwus42smnMAkTtt/DkxDj4VKbiPrPTAmI7jTQPLOfgSFGCXUmdBewUnlTR +luZg8mpveH/VAgw3RUpdVeJgnIrEg2EHC2jqDv+dqMNBccHbvATCHKQXB/M2 +unFQZ/cj4l6CGRSYH4ka3cJBgc8J1qphZqB7JN08aysZ/9D3M7c8zMB+lPux +eTsHY3rvC43qmEFS0/iUXzAHr0o+Wx/eZQqTV2PMouI46OVELWRbmEKrcVbD +jSIONjhXCIdSEHbuL7hoXczBLnKfcBBBmCi+5z/E5WCE39JXGQMAEozmPzr3 +OSg8FsBsyQOwXaio8KiSg2tqQkXokgAVjTd2NHwkv8dZlwj7xwEbsYeakc0c +TJH9PX2wnQPNVrUTlDYOfmhLtrxexoGxsu/J3p0cHK+QDAo4wAHNfO073wY5 +6Ht+OuT4LzZUtJpGpv3g4OLJZduuv2eDjZQTaI1ykP6R4f6Vy4aA4/vfR4xz +0GRYqu9VGBvGKpNyZSc5KJ1D4ezZxIb46XN+ZdMcXH3Ml2aoxYbl+rfWeM1y +8LYW7KUuY8PlkLLxuTkORjlIiGuMGMP/ALdxymE= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13376,164 +14214,134 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwV13k0VH8bAHARbVL2yTaLJSpZw4wZz2OJLCm7iEQoWUpSSdkiIpGUtFHq +VxQzc9sslaIiWkm2ZAtJqBAi733/uudz7rnPved8n+3SfcMc/QUFBARY8wQE +/n+d6KitVkktMBFOoYBbuIVJ42XKIdPmeAhd1a4T+5QBKP3Wl9J8Gny7q784 +P9WFyM2Fn4Sar0JMXfcDg6dmID4se3rqEx9SAgZuCj91hC8V9mFjn56B9qYM +I/9KX7BUGfz889MHGKlQSR9/FA5TnwyzRz91Q6bx4r9md+Ohyvy/gvdXf0NQ +gbpX++YsUPhS2ue7ZhY6tLNzD9leBKngbYULzIWwPupi3X6nq3Bax7Lc3mUh +nuk2e5WdcgNacrQrfy5fiscOyw/7yxdCakHMW8EV4li0uWS0JekO2OjvkpBW +FkfplG9+1ll3YGG1o8tKTXHMFxkY4l65A8d6VNtsTcWxNKbVYOfDOxDNqO87 +s0sct5r+2XXg2x0IzaP8UysTxzl3rpOMTTE4XOStsfWUwJs725SthEtA9kxP +StYlSSw/YjmUoMMFyup7xyZvSKLpdMY8LwMuyD1LivHiSmJ+Q9geXWMuKI1q +7F9ZJYkljzLdP1hwQdVuj0/5gCRyAi3M+ty4oDd/1qBHTwp7f9T+8zrChU0R +Mr26r6TQXbX2aMpzLmxeMtBxrkEKZdcbPxqq5YLj1dKWmXYpzA4TX2/3hguu +77a+fTEihWfLTbQEPnHBa821Mg9paXRqZ/kaD3Bhd69WZryPNNLLZYb+LeLB +cWdrkw8T0hjRok5/aMMDubtv5ATnyeDU4yrXSXseFEs6/9FZIoOXtw/S9Z14 +0PTBm5tJlcFqxXMHLnvyQMUhguGwQQYLqv7KmgTz4NnGKyLvzsugWsDukZtp +PJi1HH/zmi2L24otQ1a/4kHGjaiiWUtZfDnp1vr5Nfm8iECypoMshj51b0p9 +zwO754tNT/rLon/h26jWZh7kmtMIu3RZDLJM3mfWzwMjtD1X90UW5xVUrOAI +8WEfM39bbTwF5WYMLD4b8sEmT2zMNo2CR1c/N6pn8YGxIDr5TTYF2cZf7R9w ++PCu0ZXXcJOCSu9tO+PM+bB2j6hQxxsK4hbJCwP2fBi4ceDGL7kVqL1x6NTM +Dj5slbL/IU+swO5q6QeQzge9w+VxlytWYPmmVE0igw+Lu9Vl6C9W4Nurl+oY +WXwoLRECtZYVuM6TFzNxjg8ytqUZ2nMr0EH6xNuwfPL9cSr6623lcGBhm0Mh +wQeLkemo0B45jP+93cz0Ix8ObTiz6umQHA6WBgVok3VVnK/ZKjkhhxpt6j3y +LXygOPswSxfK4yH0H+hv58PQw+d/hNbK477Eo5rOvXzIis+IOH9QHs21vgoe +/cWHmjYNlaE4eRz45PlVd4wPM/pVDSap8tj45MTK3nE+BPSP6/ZekkcLylS9 +8RQfWHaeP9dWyeOIxe1bT+b40C2tFlq9VAEFvW7JyYkSIBv2RFFWVgEfmUjp +Zy8lwK7G/fUumgLOK3O5J7qMgPtRqWuW6Slgi+yJn6PiBJz4Mjq4xV0BD1Xq ++aTLEqB7qzxw5KoCetC+ZisyCAgUdJE1u62A2rVWe7YpE3DRc/jFmXsK6LaA +KL+kQoCIGF2NVaOA9oVSN5etJKA1PKn32A8FbLzkPlCzmoA4tsN2OSNFnK87 +cCZTn4AN3pd/GZop4mm2oiZvHQFisd8TXOwU8clS4fx6AzJ+VeKNDB9FLI3z +of4xIuChTdl3kRRFXKn3KF2OQ0BM8IIjKlmK+JA+rrDChADLdGcxs0uK+Gpy +8KQkEND4flj7CE8R9XS48jNIwKi7cuTvFkWkrrATuGhBwIOoPQvEexWxcEzq +8aH1BBy9+Chn7bAiZr775+9kSYBop1v5LkElLGwQODhtRcDKwDSBzlVKuF41 +54msLQHDyS2Zs/pK+OQ281sj6buFasryoIQFqffmp9sRYDZcud7VSQnd1ulK +j20kwHv/+In6w0rYL2r28NRmAlTPmSkMJiqhSGdJ2hoHgsyPU3cWZJDxu4Q9 +n5OOmtF4Z1aghG9FT3wbdCTAVOnAdp9iJUw0qSs64ETAQqz+deShEvoUyQUL +OBOQneAtXVqvhNc9Kd+FXQjYer3oRlOTEl7o7CmKJ814OWk41qmEwozJ0L+k +uYuzPLTGyfu25gJdrgTUZ768cl2RioceXg+Jdicgi5DSqVpJxfInI94tpD0+ +bn/WqUPFwCk9T90tBAxQZnrlLanY4CV/qJl0Ccs6krmZih01UxdVPQiI3Hp2 +gZsHFSW/bngXSlooT3vV6VAqjqs+2jVO+tXTI+UlB6m4dtPKD7qeBGT0vLJ7 +HU/F59pp9sGk3YQpHYNpVPzoKN6ZT1pppX/YwnNUtN37+XgD6a8b+AJq+WS8 +KIrVvK0E3A6ayzQvouL5jO9Kq0nvS7NT3n6PimNCccsdSLOKz989+oSKja7z +FfeRtvj0Zna4horuDRI+p0jbC8y32vaBiv0JQqY3SbtrMDPetlFRI66+8hFp +P8fQFvhKxdiXOzrfkg49fI3BHaainUF1XgfpgwXNu2mTVGSf6hEcJP20L8mj +RoCG/+2vWPCLtOVhekysMA1bQqy5E6TrllVcM1pMw13tibN/SG8ucK0ZFaNh +knDo6DjpJqOfQzclabhRdC5llLTn61Tx7RQaiv8yqOsn3bldzWCFIg1Ls6Xu +tZEOmKj0eE+noSBxbkM96e8nPGNS1Gj4uasyqZT0HurENdPVNORlZ+65Rnqc +yKiZ0qLhPQXRBSdIR21Y/YOnT0O4omcbQlrg83PxICYNF1JFTTaSTtzrY8Aw +oWFqZG6nBunFIn89Ws1oaOneqydEOiM3O+a0FQ0l7UeNWsjzya16VSPoQMPa +18FbD5Omuvv/KHOh4bvzw9FWpAuG5sT3edCwfsbZaTnpEul1nj1+NFy9+q9q +Dpkf+oVvYy7spGHWJ0cVN9JlJkEFTiE0TGh73C5Bujrwyo+qSBpeui0aG0vm +n/UMUyL6MA1NekRD/p+fbzIaDfRjaThu5k3pIvO3pXRRbEEKDfV0WcX6pL3t +Cwq2ptNwzaVvuS1uBPR2m9RKZdGwuE/P5jDp4SUREokXaViW/n3sLlkf+/LE +DDn5NFyicuyXHelJ/Vue49dpuHi+2IMusp6EvDsK/EtoOHHX+fw80hTuBkPL +ZzS83xXeJUfW6yWLHs9/L2gY4+iy7jxZz4yWI7H362gY4vzXXYq0piBRq/aR +hnXPFknNI+vfzFlx64IBGi67kHfwrj0BwZM/Y2uW0tF1sGgqwZrM570BMn0S +dHROykyr3ED2g8HWIiEKHYkFg/unyH51va2qyYRBR6vpTgcfsp91PM5ec8+A +jsGsXHdBcwI2JTKb87fRsTZV8FeOMVlf/+6EPNlBR/nSr1cusMh+FMkQ+ryL +jpw0n4pcJgHJO5espUTQMQSsrNINCai0/ZyQnkxHt3zddzZ65LyQiNM6zKPj +4RBTUflVZP6kjlfn3KejXfZu76/q5HkIBXncL6fj3VyO0W1yPuwed0z8+ZyO +i98Yp2ipkvnQrNIW2ErHkaG416I0AmSu1CQ5CzFQy2d8g7I0AVOrl3doujDw +oXFqQt0MHyYuycXpeTDQY/7iizp/+TC2TFWFuY2B1MGlp86Q83H4NzPIYhcD +fxQvXeIwQc7Hcr8JjyMM5MgOHy8Y4cMr2wdiydcZ6HLPae5+Fx9yd3tD9zgD +lbMXumZX8eHc553d/dMMzErjfT3/lA9nNu1L/DHHwKNbHI5deMKHdL3kuslF +yuhPWTWeXc6H+L88t2VKyqguYd8YSO4Lu1OF97AtlXHm3BHBuKt8YBfdzjt7 +VhmTbwktyj7KhzZa0ZX1F5RxeCldPTCaD1Fnb10eu6KMux/d6DeI4sODuBsX +HW8po3l56sa3+/mg656XI1ahjPftdNt7gvmgIXwmI6lLGVV+5Zhe8iD3l22H +YyPXqGDUiUSapz4ffkrY+Lg+U0GPaOUcpy4eNAcz3gW9VMEJ3lCHVwcPKl9M +Q0y9Cob9sn/p30bue1FF1JtNKpiq6Xws9CMPtLtFv0wNqqA0/2qPXy0PQnlv +vS5JqqJJdU/LFy4PBje5ePbuUMVp76lKjaM86E3zcQ1foIb3wyr/C5XggfXI +AeuvBivReWPK9LV1XBjyW7jvbow6etn1zX7wLib/N2QFjz/TwOX/zTbtNr4N +Eq/V0rkjq9B+j1f/4dWFoJBcstnAYA3W7m1onOn/D3JWM5dLBmpi9gfKzMDr +6/BKznTd78y1+O2PaMXi2mvAUniWodWkhS4Sp8/nFuWDmNDViO3x2jh9tnVW +9swVUIqjsreo6aCwyI6Gm48uwCLVrfcdX+rgcpXLNAuTHFjLWVFywEsX6+Xm +5J6zsyG8Q6LKRkAPl86Irx03Pw0jv9NcrHP00LC7WFQ+6RRYab3ItdbUR+6Y +htmUQio8/m38988bfcy51hht8DkJQtfotr73X4carACpKz4JwBne0bhlkQE+ +NLlx1E06FtarUDYuvWqARxrN+odbo0A99sTBZ4aGKHwkpd3ZKxJW+TOfqLYa +oqK1rraaYTicYthPJ7Qb4i/W85Ip9XAY++K7rrvDENcf+xbRJBcOjz3Sii73 +GOLFk/THRf/2guPmL+dkfxhiMk/6XfWLvXDIOHHPIgEj7F96QuKO+16oEX9P +/6FqhKxnL40NE/aA/+Odx+7uNUL9o1vFontDYDhk8MD6CCPMyd82FPMqBA4q +Bu9uijTCztNNgue4IXAiOsxx8rARKm8RKv4XHQJcViSNnWSEQdlq7/gyITBz +P6GiKtcIT7V/6y7YGAynSy6Pfagywtxf39741wbBk7zGHT+lmfhjXWPR8olA +6LSjb4ukMNGu+lPF785AEJgK2fJXjomcv6ff99UFgpnDAnthGhNdZQ06Z/ID +4cU8luGKVUws7BJI6bcPhHrfK4tMTZhodItTW1wUAK0qQcUZAUwcbvcrqtrj +D2M35/5oPWBi2+WiDJGVftDnapmXUsrESkarf72MHzTPP7mhp5yJj/JKtC6L ++EG5j9z5s5VMFHGVSvTv84V4yjrWbC0Tm8Lu7o2/4QvLk4OiX7UzMfqlhu6I +ui+sCfwo4C/IQruXrI9+BtvBT7VoUe5GFn6eWXQ2utcbop57B6ltZqHNzTey +Ti+9IcNfoo7vyMKmvPDHpoXeUHH9UFqdGwv33ZvHDNzjDVJqG5bNbmdhvHWk +/PtZL3ih9lXKJ5KFUkbJYRKKXrBKnUpTu8LC1LM+19qCPeHnqiwD/igLj5YW +vmDYu0NzPa6X/M3CQDlVfVkjd6gMHXaKGGdh0qaIzYoMd/IXyXqvwTQL1RU8 +A7wn3GAVS+B2mZAxdl4Xecy/4ga+1iH0KhljpBSM9J4fd4XGQCvRRrYxOvWX +R4gXu8DDgr9d48nGuOWBzgfdTU5gYB7xxybVGI/vJ+qyOE5wr2tINO+kMeqb +h8sKrXECvlKHoc1pY1RY4nZUdJET3M6pPHn5gjE6ryo4UFvlCHlpiUyrYmOM +PPfhXI+xI6RELMvMaTDGbxpx6S4GDuBhoYzGSmysu5D7aXOBPcw2LhSrorFx +qmihEjPRHvL8h9tslNloVLCliBNgD31JpQc81NnYv73E7IK6PYTXbio5pMvG +hU+d564Xb4QT9tFKDy3ZeEmh6G7fEzsoc/84ox/GRqnFHc0xEzYgH3K8dG0l +Gy8aJTAzS6wgfS5gXeozNjK2eJal5liB4GlLXn81G1v6lu3KjbOCwfvCt/Jq +2Rgh9VFizMkKygSO5Ug0sFHxJf44O2UJHmdiD0x8ZaPDboXjJzdYQk75oXWP +l3Cwus42smnMAkTtt/DkxDj4VKbiPrPTAmI7jTQPLOfgSFGCXUmdBewUnlTR +luZg8mpveH/VAgw3RUpdVeJgnIrEg2EHC2jqDv+dqMNBccHbvATCHKQXB/M2 +unFQZ/cj4l6CGRSYH4ka3cJBgc8J1qphZqB7JN08aysZ/9D3M7c8zMB+lPux +eTsHY3rvC43qmEFS0/iUXzAHr0o+Wx/eZQqTV2PMouI46OVELWRbmEKrcVbD +jSIONjhXCIdSEHbuL7hoXczBLnKfcBBBmCi+5z/E5WCE39JXGQMAEozmPzr3 +OSg8FsBsyQOwXaio8KiSg2tqQkXokgAVjTd2NHwkv8dZlwj7xwEbsYeakc0c +TJH9PX2wnQPNVrUTlDYOfmhLtrxexoGxsu/J3p0cHK+QDAo4wAHNfO073wY5 +6Ht+OuT4LzZUtJpGpv3g4OLJZduuv2eDjZQTaI1ykP6R4f6Vy4aA4/vfR4xz +0GRYqu9VGBvGKpNyZSc5KJ1D4ezZxIb46XN+ZdMcXH3Ml2aoxYbl+rfWeM1y +8LYW7KUuY8PlkLLxuTkORjlIiGuMGMP/ALdxymE= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.07563733996890822}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13545,19 +14353,19 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.07563733996890822}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13571,163 +14379,133 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwV13k0VH8bAHARbVL2yTaLJSpZw4wZz2OJLCm7iEQoWUpSSdkiIpGUtFHq +VxQzc9sslaIiWkm2ZAtJqBAi733/uudz7rnPved8n+3SfcMc/QUFBARY8wQE +/n+d6KitVkktMBFOoYBbuIVJ42XKIdPmeAhd1a4T+5QBKP3Wl9J8Gny7q784 +P9WFyM2Fn4Sar0JMXfcDg6dmID4se3rqEx9SAgZuCj91hC8V9mFjn56B9qYM +I/9KX7BUGfz889MHGKlQSR9/FA5TnwyzRz91Q6bx4r9md+Ohyvy/gvdXf0NQ +gbpX++YsUPhS2ue7ZhY6tLNzD9leBKngbYULzIWwPupi3X6nq3Bax7Lc3mUh +nuk2e5WdcgNacrQrfy5fiscOyw/7yxdCakHMW8EV4li0uWS0JekO2OjvkpBW +FkfplG9+1ll3YGG1o8tKTXHMFxkY4l65A8d6VNtsTcWxNKbVYOfDOxDNqO87 +s0sct5r+2XXg2x0IzaP8UysTxzl3rpOMTTE4XOStsfWUwJs725SthEtA9kxP +StYlSSw/YjmUoMMFyup7xyZvSKLpdMY8LwMuyD1LivHiSmJ+Q9geXWMuKI1q +7F9ZJYkljzLdP1hwQdVuj0/5gCRyAi3M+ty4oDd/1qBHTwp7f9T+8zrChU0R +Mr26r6TQXbX2aMpzLmxeMtBxrkEKZdcbPxqq5YLj1dKWmXYpzA4TX2/3hguu +77a+fTEihWfLTbQEPnHBa821Mg9paXRqZ/kaD3Bhd69WZryPNNLLZYb+LeLB +cWdrkw8T0hjRok5/aMMDubtv5ATnyeDU4yrXSXseFEs6/9FZIoOXtw/S9Z14 +0PTBm5tJlcFqxXMHLnvyQMUhguGwQQYLqv7KmgTz4NnGKyLvzsugWsDukZtp +PJi1HH/zmi2L24otQ1a/4kHGjaiiWUtZfDnp1vr5Nfm8iECypoMshj51b0p9 +zwO754tNT/rLon/h26jWZh7kmtMIu3RZDLJM3mfWzwMjtD1X90UW5xVUrOAI +8WEfM39bbTwF5WYMLD4b8sEmT2zMNo2CR1c/N6pn8YGxIDr5TTYF2cZf7R9w ++PCu0ZXXcJOCSu9tO+PM+bB2j6hQxxsK4hbJCwP2fBi4ceDGL7kVqL1x6NTM +Dj5slbL/IU+swO5q6QeQzge9w+VxlytWYPmmVE0igw+Lu9Vl6C9W4Nurl+oY +WXwoLRECtZYVuM6TFzNxjg8ytqUZ2nMr0EH6xNuwfPL9cSr6623lcGBhm0Mh +wQeLkemo0B45jP+93cz0Ix8ObTiz6umQHA6WBgVok3VVnK/ZKjkhhxpt6j3y +LXygOPswSxfK4yH0H+hv58PQw+d/hNbK477Eo5rOvXzIis+IOH9QHs21vgoe +/cWHmjYNlaE4eRz45PlVd4wPM/pVDSap8tj45MTK3nE+BPSP6/ZekkcLylS9 +8RQfWHaeP9dWyeOIxe1bT+b40C2tFlq9VAEFvW7JyYkSIBv2RFFWVgEfmUjp +Zy8lwK7G/fUumgLOK3O5J7qMgPtRqWuW6Slgi+yJn6PiBJz4Mjq4xV0BD1Xq ++aTLEqB7qzxw5KoCetC+ZisyCAgUdJE1u62A2rVWe7YpE3DRc/jFmXsK6LaA +KL+kQoCIGF2NVaOA9oVSN5etJKA1PKn32A8FbLzkPlCzmoA4tsN2OSNFnK87 +cCZTn4AN3pd/GZop4mm2oiZvHQFisd8TXOwU8clS4fx6AzJ+VeKNDB9FLI3z +of4xIuChTdl3kRRFXKn3KF2OQ0BM8IIjKlmK+JA+rrDChADLdGcxs0uK+Gpy +8KQkEND4flj7CE8R9XS48jNIwKi7cuTvFkWkrrATuGhBwIOoPQvEexWxcEzq +8aH1BBy9+Chn7bAiZr775+9kSYBop1v5LkElLGwQODhtRcDKwDSBzlVKuF41 +54msLQHDyS2Zs/pK+OQ281sj6buFasryoIQFqffmp9sRYDZcud7VSQnd1ulK +j20kwHv/+In6w0rYL2r28NRmAlTPmSkMJiqhSGdJ2hoHgsyPU3cWZJDxu4Q9 +n5OOmtF4Z1aghG9FT3wbdCTAVOnAdp9iJUw0qSs64ETAQqz+deShEvoUyQUL +OBOQneAtXVqvhNc9Kd+FXQjYer3oRlOTEl7o7CmKJ814OWk41qmEwozJ0L+k +uYuzPLTGyfu25gJdrgTUZ768cl2RioceXg+Jdicgi5DSqVpJxfInI94tpD0+ +bn/WqUPFwCk9T90tBAxQZnrlLanY4CV/qJl0Ccs6krmZih01UxdVPQiI3Hp2 +gZsHFSW/bngXSlooT3vV6VAqjqs+2jVO+tXTI+UlB6m4dtPKD7qeBGT0vLJ7 +HU/F59pp9sGk3YQpHYNpVPzoKN6ZT1pppX/YwnNUtN37+XgD6a8b+AJq+WS8 +KIrVvK0E3A6ayzQvouL5jO9Kq0nvS7NT3n6PimNCccsdSLOKz989+oSKja7z +FfeRtvj0Zna4horuDRI+p0jbC8y32vaBiv0JQqY3SbtrMDPetlFRI66+8hFp +P8fQFvhKxdiXOzrfkg49fI3BHaainUF1XgfpgwXNu2mTVGSf6hEcJP20L8mj +RoCG/+2vWPCLtOVhekysMA1bQqy5E6TrllVcM1pMw13tibN/SG8ucK0ZFaNh +knDo6DjpJqOfQzclabhRdC5llLTn61Tx7RQaiv8yqOsn3bldzWCFIg1Ls6Xu +tZEOmKj0eE+noSBxbkM96e8nPGNS1Gj4uasyqZT0HurENdPVNORlZ+65Rnqc +yKiZ0qLhPQXRBSdIR21Y/YOnT0O4omcbQlrg83PxICYNF1JFTTaSTtzrY8Aw +oWFqZG6nBunFIn89Ws1oaOneqydEOiM3O+a0FQ0l7UeNWsjzya16VSPoQMPa +18FbD5Omuvv/KHOh4bvzw9FWpAuG5sT3edCwfsbZaTnpEul1nj1+NFy9+q9q +Dpkf+oVvYy7spGHWJ0cVN9JlJkEFTiE0TGh73C5Bujrwyo+qSBpeui0aG0vm +n/UMUyL6MA1NekRD/p+fbzIaDfRjaThu5k3pIvO3pXRRbEEKDfV0WcX6pL3t +Cwq2ptNwzaVvuS1uBPR2m9RKZdGwuE/P5jDp4SUREokXaViW/n3sLlkf+/LE +DDn5NFyicuyXHelJ/Vue49dpuHi+2IMusp6EvDsK/EtoOHHX+fw80hTuBkPL +ZzS83xXeJUfW6yWLHs9/L2gY4+iy7jxZz4yWI7H362gY4vzXXYq0piBRq/aR +hnXPFknNI+vfzFlx64IBGi67kHfwrj0BwZM/Y2uW0tF1sGgqwZrM570BMn0S +dHROykyr3ED2g8HWIiEKHYkFg/unyH51va2qyYRBR6vpTgcfsp91PM5ec8+A +jsGsXHdBcwI2JTKb87fRsTZV8FeOMVlf/+6EPNlBR/nSr1cusMh+FMkQ+ryL +jpw0n4pcJgHJO5espUTQMQSsrNINCai0/ZyQnkxHt3zddzZ65LyQiNM6zKPj +4RBTUflVZP6kjlfn3KejXfZu76/q5HkIBXncL6fj3VyO0W1yPuwed0z8+ZyO +i98Yp2ipkvnQrNIW2ErHkaG416I0AmSu1CQ5CzFQy2d8g7I0AVOrl3doujDw +oXFqQt0MHyYuycXpeTDQY/7iizp/+TC2TFWFuY2B1MGlp86Q83H4NzPIYhcD +fxQvXeIwQc7Hcr8JjyMM5MgOHy8Y4cMr2wdiydcZ6HLPae5+Fx9yd3tD9zgD +lbMXumZX8eHc553d/dMMzErjfT3/lA9nNu1L/DHHwKNbHI5deMKHdL3kuslF +yuhPWTWeXc6H+L88t2VKyqguYd8YSO4Lu1OF97AtlXHm3BHBuKt8YBfdzjt7 +VhmTbwktyj7KhzZa0ZX1F5RxeCldPTCaD1Fnb10eu6KMux/d6DeI4sODuBsX +HW8po3l56sa3+/mg656XI1ahjPftdNt7gvmgIXwmI6lLGVV+5Zhe8iD3l22H +YyPXqGDUiUSapz4ffkrY+Lg+U0GPaOUcpy4eNAcz3gW9VMEJ3lCHVwcPKl9M +Q0y9Cob9sn/p30bue1FF1JtNKpiq6Xws9CMPtLtFv0wNqqA0/2qPXy0PQnlv +vS5JqqJJdU/LFy4PBje5ePbuUMVp76lKjaM86E3zcQ1foIb3wyr/C5XggfXI +AeuvBivReWPK9LV1XBjyW7jvbow6etn1zX7wLib/N2QFjz/TwOX/zTbtNr4N +Eq/V0rkjq9B+j1f/4dWFoJBcstnAYA3W7m1onOn/D3JWM5dLBmpi9gfKzMDr +6/BKznTd78y1+O2PaMXi2mvAUniWodWkhS4Sp8/nFuWDmNDViO3x2jh9tnVW +9swVUIqjsreo6aCwyI6Gm48uwCLVrfcdX+rgcpXLNAuTHFjLWVFywEsX6+Xm +5J6zsyG8Q6LKRkAPl86Irx03Pw0jv9NcrHP00LC7WFQ+6RRYab3ItdbUR+6Y +htmUQio8/m38988bfcy51hht8DkJQtfotr73X4carACpKz4JwBne0bhlkQE+ +NLlx1E06FtarUDYuvWqARxrN+odbo0A99sTBZ4aGKHwkpd3ZKxJW+TOfqLYa +oqK1rraaYTicYthPJ7Qb4i/W85Ip9XAY++K7rrvDENcf+xbRJBcOjz3Sii73 +GOLFk/THRf/2guPmL+dkfxhiMk/6XfWLvXDIOHHPIgEj7F96QuKO+16oEX9P +/6FqhKxnL40NE/aA/+Odx+7uNUL9o1vFontDYDhk8MD6CCPMyd82FPMqBA4q +Bu9uijTCztNNgue4IXAiOsxx8rARKm8RKv4XHQJcViSNnWSEQdlq7/gyITBz +P6GiKtcIT7V/6y7YGAynSy6Pfagywtxf39741wbBk7zGHT+lmfhjXWPR8olA +6LSjb4ukMNGu+lPF785AEJgK2fJXjomcv6ff99UFgpnDAnthGhNdZQ06Z/ID +4cU8luGKVUws7BJI6bcPhHrfK4tMTZhodItTW1wUAK0qQcUZAUwcbvcrqtrj +D2M35/5oPWBi2+WiDJGVftDnapmXUsrESkarf72MHzTPP7mhp5yJj/JKtC6L ++EG5j9z5s5VMFHGVSvTv84V4yjrWbC0Tm8Lu7o2/4QvLk4OiX7UzMfqlhu6I +ui+sCfwo4C/IQruXrI9+BtvBT7VoUe5GFn6eWXQ2utcbop57B6ltZqHNzTey +Ti+9IcNfoo7vyMKmvPDHpoXeUHH9UFqdGwv33ZvHDNzjDVJqG5bNbmdhvHWk +/PtZL3ih9lXKJ5KFUkbJYRKKXrBKnUpTu8LC1LM+19qCPeHnqiwD/igLj5YW +vmDYu0NzPa6X/M3CQDlVfVkjd6gMHXaKGGdh0qaIzYoMd/IXyXqvwTQL1RU8 +A7wn3GAVS+B2mZAxdl4Xecy/4ga+1iH0KhljpBSM9J4fd4XGQCvRRrYxOvWX +R4gXu8DDgr9d48nGuOWBzgfdTU5gYB7xxybVGI/vJ+qyOE5wr2tINO+kMeqb +h8sKrXECvlKHoc1pY1RY4nZUdJET3M6pPHn5gjE6ryo4UFvlCHlpiUyrYmOM +PPfhXI+xI6RELMvMaTDGbxpx6S4GDuBhoYzGSmysu5D7aXOBPcw2LhSrorFx +qmihEjPRHvL8h9tslNloVLCliBNgD31JpQc81NnYv73E7IK6PYTXbio5pMvG +hU+d564Xb4QT9tFKDy3ZeEmh6G7fEzsoc/84ox/GRqnFHc0xEzYgH3K8dG0l +Gy8aJTAzS6wgfS5gXeozNjK2eJal5liB4GlLXn81G1v6lu3KjbOCwfvCt/Jq +2Rgh9VFizMkKygSO5Ug0sFHxJf44O2UJHmdiD0x8ZaPDboXjJzdYQk75oXWP +l3Cwus42smnMAkTtt/DkxDj4VKbiPrPTAmI7jTQPLOfgSFGCXUmdBewUnlTR +luZg8mpveH/VAgw3RUpdVeJgnIrEg2EHC2jqDv+dqMNBccHbvATCHKQXB/M2 +unFQZ/cj4l6CGRSYH4ka3cJBgc8J1qphZqB7JN08aysZ/9D3M7c8zMB+lPux +eTsHY3rvC43qmEFS0/iUXzAHr0o+Wx/eZQqTV2PMouI46OVELWRbmEKrcVbD +jSIONjhXCIdSEHbuL7hoXczBLnKfcBBBmCi+5z/E5WCE39JXGQMAEozmPzr3 +OSg8FsBsyQOwXaio8KiSg2tqQkXokgAVjTd2NHwkv8dZlwj7xwEbsYeakc0c +TJH9PX2wnQPNVrUTlDYOfmhLtrxexoGxsu/J3p0cHK+QDAo4wAHNfO073wY5 +6Ht+OuT4LzZUtJpGpv3g4OLJZduuv2eDjZQTaI1ykP6R4f6Vy4aA4/vfR4xz +0GRYqu9VGBvGKpNyZSc5KJ1D4ezZxIb46XN+ZdMcXH3Ml2aoxYbl+rfWeM1y +8LYW7KUuY8PlkLLxuTkORjlIiGuMGMP/ALdxymE= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.07563733996890822}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13738,6 +14516,7 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13765,7 +14544,8 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.17388882737814787`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07563733996890822}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13773,17 +14553,622 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913324679337597`*^9}, + CellChangeTimes->{3.9913324679337597`*^9, 3.9943576781699266`*^9}, CellLabel-> - "Out[221]=",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] + "Out[140]=",ExpressionUUID->"e44afbc3-66e8-483f-af9b-88e6c3ab4248"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"f380af60-a605-c546-a4c8-\ -b989835aa113"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VH8bAHARbVL2yTaLJSpZw4wZz2OJLCm7iEQoWUpSSdkiIpGUtFHq +VxQzc9sslaIiWkm2ZAtJqBAi733/uudz7rnPved8n+3SfcMc/QUFBARY8wQE +/n+d6KitVkktMBFOoYBbuIVJ42XKIdPmeAhd1a4T+5QBKP3Wl9J8Gny7q784 +P9WFyM2Fn4Sar0JMXfcDg6dmID4se3rqEx9SAgZuCj91hC8V9mFjn56B9qYM +I/9KX7BUGfz889MHGKlQSR9/FA5TnwyzRz91Q6bx4r9md+Ohyvy/gvdXf0NQ +gbpX++YsUPhS2ue7ZhY6tLNzD9leBKngbYULzIWwPupi3X6nq3Bax7Lc3mUh +nuk2e5WdcgNacrQrfy5fiscOyw/7yxdCakHMW8EV4li0uWS0JekO2OjvkpBW +FkfplG9+1ll3YGG1o8tKTXHMFxkY4l65A8d6VNtsTcWxNKbVYOfDOxDNqO87 +s0sct5r+2XXg2x0IzaP8UysTxzl3rpOMTTE4XOStsfWUwJs725SthEtA9kxP +StYlSSw/YjmUoMMFyup7xyZvSKLpdMY8LwMuyD1LivHiSmJ+Q9geXWMuKI1q +7F9ZJYkljzLdP1hwQdVuj0/5gCRyAi3M+ty4oDd/1qBHTwp7f9T+8zrChU0R +Mr26r6TQXbX2aMpzLmxeMtBxrkEKZdcbPxqq5YLj1dKWmXYpzA4TX2/3hguu +77a+fTEihWfLTbQEPnHBa821Mg9paXRqZ/kaD3Bhd69WZryPNNLLZYb+LeLB +cWdrkw8T0hjRok5/aMMDubtv5ATnyeDU4yrXSXseFEs6/9FZIoOXtw/S9Z14 +0PTBm5tJlcFqxXMHLnvyQMUhguGwQQYLqv7KmgTz4NnGKyLvzsugWsDukZtp +PJi1HH/zmi2L24otQ1a/4kHGjaiiWUtZfDnp1vr5Nfm8iECypoMshj51b0p9 +zwO754tNT/rLon/h26jWZh7kmtMIu3RZDLJM3mfWzwMjtD1X90UW5xVUrOAI +8WEfM39bbTwF5WYMLD4b8sEmT2zMNo2CR1c/N6pn8YGxIDr5TTYF2cZf7R9w ++PCu0ZXXcJOCSu9tO+PM+bB2j6hQxxsK4hbJCwP2fBi4ceDGL7kVqL1x6NTM +Dj5slbL/IU+swO5q6QeQzge9w+VxlytWYPmmVE0igw+Lu9Vl6C9W4Nurl+oY +WXwoLRECtZYVuM6TFzNxjg8ytqUZ2nMr0EH6xNuwfPL9cSr6623lcGBhm0Mh +wQeLkemo0B45jP+93cz0Ix8ObTiz6umQHA6WBgVok3VVnK/ZKjkhhxpt6j3y +LXygOPswSxfK4yH0H+hv58PQw+d/hNbK477Eo5rOvXzIis+IOH9QHs21vgoe +/cWHmjYNlaE4eRz45PlVd4wPM/pVDSap8tj45MTK3nE+BPSP6/ZekkcLylS9 +8RQfWHaeP9dWyeOIxe1bT+b40C2tFlq9VAEFvW7JyYkSIBv2RFFWVgEfmUjp +Zy8lwK7G/fUumgLOK3O5J7qMgPtRqWuW6Slgi+yJn6PiBJz4Mjq4xV0BD1Xq ++aTLEqB7qzxw5KoCetC+ZisyCAgUdJE1u62A2rVWe7YpE3DRc/jFmXsK6LaA +KL+kQoCIGF2NVaOA9oVSN5etJKA1PKn32A8FbLzkPlCzmoA4tsN2OSNFnK87 +cCZTn4AN3pd/GZop4mm2oiZvHQFisd8TXOwU8clS4fx6AzJ+VeKNDB9FLI3z +of4xIuChTdl3kRRFXKn3KF2OQ0BM8IIjKlmK+JA+rrDChADLdGcxs0uK+Gpy +8KQkEND4flj7CE8R9XS48jNIwKi7cuTvFkWkrrATuGhBwIOoPQvEexWxcEzq +8aH1BBy9+Chn7bAiZr775+9kSYBop1v5LkElLGwQODhtRcDKwDSBzlVKuF41 +54msLQHDyS2Zs/pK+OQ281sj6buFasryoIQFqffmp9sRYDZcud7VSQnd1ulK +j20kwHv/+In6w0rYL2r28NRmAlTPmSkMJiqhSGdJ2hoHgsyPU3cWZJDxu4Q9 +n5OOmtF4Z1aghG9FT3wbdCTAVOnAdp9iJUw0qSs64ETAQqz+deShEvoUyQUL +OBOQneAtXVqvhNc9Kd+FXQjYer3oRlOTEl7o7CmKJ814OWk41qmEwozJ0L+k +uYuzPLTGyfu25gJdrgTUZ768cl2RioceXg+Jdicgi5DSqVpJxfInI94tpD0+ +bn/WqUPFwCk9T90tBAxQZnrlLanY4CV/qJl0Ccs6krmZih01UxdVPQiI3Hp2 +gZsHFSW/bngXSlooT3vV6VAqjqs+2jVO+tXTI+UlB6m4dtPKD7qeBGT0vLJ7 +HU/F59pp9sGk3YQpHYNpVPzoKN6ZT1pppX/YwnNUtN37+XgD6a8b+AJq+WS8 +KIrVvK0E3A6ayzQvouL5jO9Kq0nvS7NT3n6PimNCccsdSLOKz989+oSKja7z +FfeRtvj0Zna4horuDRI+p0jbC8y32vaBiv0JQqY3SbtrMDPetlFRI66+8hFp +P8fQFvhKxdiXOzrfkg49fI3BHaainUF1XgfpgwXNu2mTVGSf6hEcJP20L8mj +RoCG/+2vWPCLtOVhekysMA1bQqy5E6TrllVcM1pMw13tibN/SG8ucK0ZFaNh +knDo6DjpJqOfQzclabhRdC5llLTn61Tx7RQaiv8yqOsn3bldzWCFIg1Ls6Xu +tZEOmKj0eE+noSBxbkM96e8nPGNS1Gj4uasyqZT0HurENdPVNORlZ+65Rnqc +yKiZ0qLhPQXRBSdIR21Y/YOnT0O4omcbQlrg83PxICYNF1JFTTaSTtzrY8Aw +oWFqZG6nBunFIn89Ws1oaOneqydEOiM3O+a0FQ0l7UeNWsjzya16VSPoQMPa +18FbD5Omuvv/KHOh4bvzw9FWpAuG5sT3edCwfsbZaTnpEul1nj1+NFy9+q9q +Dpkf+oVvYy7spGHWJ0cVN9JlJkEFTiE0TGh73C5Bujrwyo+qSBpeui0aG0vm +n/UMUyL6MA1NekRD/p+fbzIaDfRjaThu5k3pIvO3pXRRbEEKDfV0WcX6pL3t +Cwq2ptNwzaVvuS1uBPR2m9RKZdGwuE/P5jDp4SUREokXaViW/n3sLlkf+/LE +DDn5NFyicuyXHelJ/Vue49dpuHi+2IMusp6EvDsK/EtoOHHX+fw80hTuBkPL +ZzS83xXeJUfW6yWLHs9/L2gY4+iy7jxZz4yWI7H362gY4vzXXYq0piBRq/aR +hnXPFknNI+vfzFlx64IBGi67kHfwrj0BwZM/Y2uW0tF1sGgqwZrM570BMn0S +dHROykyr3ED2g8HWIiEKHYkFg/unyH51va2qyYRBR6vpTgcfsp91PM5ec8+A +jsGsXHdBcwI2JTKb87fRsTZV8FeOMVlf/+6EPNlBR/nSr1cusMh+FMkQ+ryL +jpw0n4pcJgHJO5espUTQMQSsrNINCai0/ZyQnkxHt3zddzZ65LyQiNM6zKPj +4RBTUflVZP6kjlfn3KejXfZu76/q5HkIBXncL6fj3VyO0W1yPuwed0z8+ZyO +i98Yp2ipkvnQrNIW2ErHkaG416I0AmSu1CQ5CzFQy2d8g7I0AVOrl3doujDw +oXFqQt0MHyYuycXpeTDQY/7iizp/+TC2TFWFuY2B1MGlp86Q83H4NzPIYhcD +fxQvXeIwQc7Hcr8JjyMM5MgOHy8Y4cMr2wdiydcZ6HLPae5+Fx9yd3tD9zgD +lbMXumZX8eHc553d/dMMzErjfT3/lA9nNu1L/DHHwKNbHI5deMKHdL3kuslF +yuhPWTWeXc6H+L88t2VKyqguYd8YSO4Lu1OF97AtlXHm3BHBuKt8YBfdzjt7 +VhmTbwktyj7KhzZa0ZX1F5RxeCldPTCaD1Fnb10eu6KMux/d6DeI4sODuBsX +HW8po3l56sa3+/mg656XI1ahjPftdNt7gvmgIXwmI6lLGVV+5Zhe8iD3l22H +YyPXqGDUiUSapz4ffkrY+Lg+U0GPaOUcpy4eNAcz3gW9VMEJ3lCHVwcPKl9M +Q0y9Cob9sn/p30bue1FF1JtNKpiq6Xws9CMPtLtFv0wNqqA0/2qPXy0PQnlv +vS5JqqJJdU/LFy4PBje5ePbuUMVp76lKjaM86E3zcQ1foIb3wyr/C5XggfXI +AeuvBivReWPK9LV1XBjyW7jvbow6etn1zX7wLib/N2QFjz/TwOX/zTbtNr4N +Eq/V0rkjq9B+j1f/4dWFoJBcstnAYA3W7m1onOn/D3JWM5dLBmpi9gfKzMDr +6/BKznTd78y1+O2PaMXi2mvAUniWodWkhS4Sp8/nFuWDmNDViO3x2jh9tnVW +9swVUIqjsreo6aCwyI6Gm48uwCLVrfcdX+rgcpXLNAuTHFjLWVFywEsX6+Xm +5J6zsyG8Q6LKRkAPl86Irx03Pw0jv9NcrHP00LC7WFQ+6RRYab3ItdbUR+6Y +htmUQio8/m38988bfcy51hht8DkJQtfotr73X4carACpKz4JwBne0bhlkQE+ +NLlx1E06FtarUDYuvWqARxrN+odbo0A99sTBZ4aGKHwkpd3ZKxJW+TOfqLYa +oqK1rraaYTicYthPJ7Qb4i/W85Ip9XAY++K7rrvDENcf+xbRJBcOjz3Sii73 +GOLFk/THRf/2guPmL+dkfxhiMk/6XfWLvXDIOHHPIgEj7F96QuKO+16oEX9P +/6FqhKxnL40NE/aA/+Odx+7uNUL9o1vFontDYDhk8MD6CCPMyd82FPMqBA4q +Bu9uijTCztNNgue4IXAiOsxx8rARKm8RKv4XHQJcViSNnWSEQdlq7/gyITBz +P6GiKtcIT7V/6y7YGAynSy6Pfagywtxf39741wbBk7zGHT+lmfhjXWPR8olA +6LSjb4ukMNGu+lPF785AEJgK2fJXjomcv6ff99UFgpnDAnthGhNdZQ06Z/ID +4cU8luGKVUws7BJI6bcPhHrfK4tMTZhodItTW1wUAK0qQcUZAUwcbvcrqtrj +D2M35/5oPWBi2+WiDJGVftDnapmXUsrESkarf72MHzTPP7mhp5yJj/JKtC6L ++EG5j9z5s5VMFHGVSvTv84V4yjrWbC0Tm8Lu7o2/4QvLk4OiX7UzMfqlhu6I +ui+sCfwo4C/IQruXrI9+BtvBT7VoUe5GFn6eWXQ2utcbop57B6ltZqHNzTey +Ti+9IcNfoo7vyMKmvPDHpoXeUHH9UFqdGwv33ZvHDNzjDVJqG5bNbmdhvHWk +/PtZL3ih9lXKJ5KFUkbJYRKKXrBKnUpTu8LC1LM+19qCPeHnqiwD/igLj5YW +vmDYu0NzPa6X/M3CQDlVfVkjd6gMHXaKGGdh0qaIzYoMd/IXyXqvwTQL1RU8 +A7wn3GAVS+B2mZAxdl4Xecy/4ga+1iH0KhljpBSM9J4fd4XGQCvRRrYxOvWX +R4gXu8DDgr9d48nGuOWBzgfdTU5gYB7xxybVGI/vJ+qyOE5wr2tINO+kMeqb +h8sKrXECvlKHoc1pY1RY4nZUdJET3M6pPHn5gjE6ryo4UFvlCHlpiUyrYmOM +PPfhXI+xI6RELMvMaTDGbxpx6S4GDuBhoYzGSmysu5D7aXOBPcw2LhSrorFx +qmihEjPRHvL8h9tslNloVLCliBNgD31JpQc81NnYv73E7IK6PYTXbio5pMvG +hU+d564Xb4QT9tFKDy3ZeEmh6G7fEzsoc/84ox/GRqnFHc0xEzYgH3K8dG0l +Gy8aJTAzS6wgfS5gXeozNjK2eJal5liB4GlLXn81G1v6lu3KjbOCwfvCt/Jq +2Rgh9VFizMkKygSO5Ug0sFHxJf44O2UJHmdiD0x8ZaPDboXjJzdYQk75oXWP +l3Cwus42smnMAkTtt/DkxDj4VKbiPrPTAmI7jTQPLOfgSFGCXUmdBewUnlTR +luZg8mpveH/VAgw3RUpdVeJgnIrEg2EHC2jqDv+dqMNBccHbvATCHKQXB/M2 +unFQZ/cj4l6CGRSYH4ka3cJBgc8J1qphZqB7JN08aysZ/9D3M7c8zMB+lPux +eTsHY3rvC43qmEFS0/iUXzAHr0o+Wx/eZQqTV2PMouI46OVELWRbmEKrcVbD +jSIONjhXCIdSEHbuL7hoXczBLnKfcBBBmCi+5z/E5WCE39JXGQMAEozmPzr3 +OSg8FsBsyQOwXaio8KiSg2tqQkXokgAVjTd2NHwkv8dZlwj7xwEbsYeakc0c +TJH9PX2wnQPNVrUTlDYOfmhLtrxexoGxsu/J3p0cHK+QDAo4wAHNfO073wY5 +6Ht+OuT4LzZUtJpGpv3g4OLJZduuv2eDjZQTaI1ykP6R4f6Vy4aA4/vfR4xz +0GRYqu9VGBvGKpNyZSc5KJ1D4ezZxIb46XN+ZdMcXH3Ml2aoxYbl+rfWeM1y +8LYW7KUuY8PlkLLxuTkORjlIiGuMGMP/ALdxymE= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VH8bAHARbVL2yTaLJSpZw4wZz2OJLCm7iEQoWUpSSdkiIpGUtFHq +VxQzc9sslaIiWkm2ZAtJqBAi733/uudz7rnPved8n+3SfcMc/QUFBARY8wQE +/n+d6KitVkktMBFOoYBbuIVJ42XKIdPmeAhd1a4T+5QBKP3Wl9J8Gny7q784 +P9WFyM2Fn4Sar0JMXfcDg6dmID4se3rqEx9SAgZuCj91hC8V9mFjn56B9qYM +I/9KX7BUGfz889MHGKlQSR9/FA5TnwyzRz91Q6bx4r9md+Ohyvy/gvdXf0NQ +gbpX++YsUPhS2ue7ZhY6tLNzD9leBKngbYULzIWwPupi3X6nq3Bax7Lc3mUh +nuk2e5WdcgNacrQrfy5fiscOyw/7yxdCakHMW8EV4li0uWS0JekO2OjvkpBW +FkfplG9+1ll3YGG1o8tKTXHMFxkY4l65A8d6VNtsTcWxNKbVYOfDOxDNqO87 +s0sct5r+2XXg2x0IzaP8UysTxzl3rpOMTTE4XOStsfWUwJs725SthEtA9kxP +StYlSSw/YjmUoMMFyup7xyZvSKLpdMY8LwMuyD1LivHiSmJ+Q9geXWMuKI1q +7F9ZJYkljzLdP1hwQdVuj0/5gCRyAi3M+ty4oDd/1qBHTwp7f9T+8zrChU0R +Mr26r6TQXbX2aMpzLmxeMtBxrkEKZdcbPxqq5YLj1dKWmXYpzA4TX2/3hguu +77a+fTEihWfLTbQEPnHBa821Mg9paXRqZ/kaD3Bhd69WZryPNNLLZYb+LeLB +cWdrkw8T0hjRok5/aMMDubtv5ATnyeDU4yrXSXseFEs6/9FZIoOXtw/S9Z14 +0PTBm5tJlcFqxXMHLnvyQMUhguGwQQYLqv7KmgTz4NnGKyLvzsugWsDukZtp +PJi1HH/zmi2L24otQ1a/4kHGjaiiWUtZfDnp1vr5Nfm8iECypoMshj51b0p9 +zwO754tNT/rLon/h26jWZh7kmtMIu3RZDLJM3mfWzwMjtD1X90UW5xVUrOAI +8WEfM39bbTwF5WYMLD4b8sEmT2zMNo2CR1c/N6pn8YGxIDr5TTYF2cZf7R9w ++PCu0ZXXcJOCSu9tO+PM+bB2j6hQxxsK4hbJCwP2fBi4ceDGL7kVqL1x6NTM +Dj5slbL/IU+swO5q6QeQzge9w+VxlytWYPmmVE0igw+Lu9Vl6C9W4Nurl+oY +WXwoLRECtZYVuM6TFzNxjg8ytqUZ2nMr0EH6xNuwfPL9cSr6623lcGBhm0Mh +wQeLkemo0B45jP+93cz0Ix8ObTiz6umQHA6WBgVok3VVnK/ZKjkhhxpt6j3y +LXygOPswSxfK4yH0H+hv58PQw+d/hNbK477Eo5rOvXzIis+IOH9QHs21vgoe +/cWHmjYNlaE4eRz45PlVd4wPM/pVDSap8tj45MTK3nE+BPSP6/ZekkcLylS9 +8RQfWHaeP9dWyeOIxe1bT+b40C2tFlq9VAEFvW7JyYkSIBv2RFFWVgEfmUjp +Zy8lwK7G/fUumgLOK3O5J7qMgPtRqWuW6Slgi+yJn6PiBJz4Mjq4xV0BD1Xq ++aTLEqB7qzxw5KoCetC+ZisyCAgUdJE1u62A2rVWe7YpE3DRc/jFmXsK6LaA +KL+kQoCIGF2NVaOA9oVSN5etJKA1PKn32A8FbLzkPlCzmoA4tsN2OSNFnK87 +cCZTn4AN3pd/GZop4mm2oiZvHQFisd8TXOwU8clS4fx6AzJ+VeKNDB9FLI3z +of4xIuChTdl3kRRFXKn3KF2OQ0BM8IIjKlmK+JA+rrDChADLdGcxs0uK+Gpy +8KQkEND4flj7CE8R9XS48jNIwKi7cuTvFkWkrrATuGhBwIOoPQvEexWxcEzq +8aH1BBy9+Chn7bAiZr775+9kSYBop1v5LkElLGwQODhtRcDKwDSBzlVKuF41 +54msLQHDyS2Zs/pK+OQ281sj6buFasryoIQFqffmp9sRYDZcud7VSQnd1ulK +j20kwHv/+In6w0rYL2r28NRmAlTPmSkMJiqhSGdJ2hoHgsyPU3cWZJDxu4Q9 +n5OOmtF4Z1aghG9FT3wbdCTAVOnAdp9iJUw0qSs64ETAQqz+deShEvoUyQUL +OBOQneAtXVqvhNc9Kd+FXQjYer3oRlOTEl7o7CmKJ814OWk41qmEwozJ0L+k +uYuzPLTGyfu25gJdrgTUZ768cl2RioceXg+Jdicgi5DSqVpJxfInI94tpD0+ +bn/WqUPFwCk9T90tBAxQZnrlLanY4CV/qJl0Ccs6krmZih01UxdVPQiI3Hp2 +gZsHFSW/bngXSlooT3vV6VAqjqs+2jVO+tXTI+UlB6m4dtPKD7qeBGT0vLJ7 +HU/F59pp9sGk3YQpHYNpVPzoKN6ZT1pppX/YwnNUtN37+XgD6a8b+AJq+WS8 +KIrVvK0E3A6ayzQvouL5jO9Kq0nvS7NT3n6PimNCccsdSLOKz989+oSKja7z +FfeRtvj0Zna4horuDRI+p0jbC8y32vaBiv0JQqY3SbtrMDPetlFRI66+8hFp +P8fQFvhKxdiXOzrfkg49fI3BHaainUF1XgfpgwXNu2mTVGSf6hEcJP20L8mj +RoCG/+2vWPCLtOVhekysMA1bQqy5E6TrllVcM1pMw13tibN/SG8ucK0ZFaNh +knDo6DjpJqOfQzclabhRdC5llLTn61Tx7RQaiv8yqOsn3bldzWCFIg1Ls6Xu +tZEOmKj0eE+noSBxbkM96e8nPGNS1Gj4uasyqZT0HurENdPVNORlZ+65Rnqc +yKiZ0qLhPQXRBSdIR21Y/YOnT0O4omcbQlrg83PxICYNF1JFTTaSTtzrY8Aw +oWFqZG6nBunFIn89Ws1oaOneqydEOiM3O+a0FQ0l7UeNWsjzya16VSPoQMPa +18FbD5Omuvv/KHOh4bvzw9FWpAuG5sT3edCwfsbZaTnpEul1nj1+NFy9+q9q +Dpkf+oVvYy7spGHWJ0cVN9JlJkEFTiE0TGh73C5Bujrwyo+qSBpeui0aG0vm +n/UMUyL6MA1NekRD/p+fbzIaDfRjaThu5k3pIvO3pXRRbEEKDfV0WcX6pL3t +Cwq2ptNwzaVvuS1uBPR2m9RKZdGwuE/P5jDp4SUREokXaViW/n3sLlkf+/LE +DDn5NFyicuyXHelJ/Vue49dpuHi+2IMusp6EvDsK/EtoOHHX+fw80hTuBkPL +ZzS83xXeJUfW6yWLHs9/L2gY4+iy7jxZz4yWI7H362gY4vzXXYq0piBRq/aR +hnXPFknNI+vfzFlx64IBGi67kHfwrj0BwZM/Y2uW0tF1sGgqwZrM570BMn0S +dHROykyr3ED2g8HWIiEKHYkFg/unyH51va2qyYRBR6vpTgcfsp91PM5ec8+A +jsGsXHdBcwI2JTKb87fRsTZV8FeOMVlf/+6EPNlBR/nSr1cusMh+FMkQ+ryL +jpw0n4pcJgHJO5espUTQMQSsrNINCai0/ZyQnkxHt3zddzZ65LyQiNM6zKPj +4RBTUflVZP6kjlfn3KejXfZu76/q5HkIBXncL6fj3VyO0W1yPuwed0z8+ZyO +i98Yp2ipkvnQrNIW2ErHkaG416I0AmSu1CQ5CzFQy2d8g7I0AVOrl3doujDw +oXFqQt0MHyYuycXpeTDQY/7iizp/+TC2TFWFuY2B1MGlp86Q83H4NzPIYhcD +fxQvXeIwQc7Hcr8JjyMM5MgOHy8Y4cMr2wdiydcZ6HLPae5+Fx9yd3tD9zgD +lbMXumZX8eHc553d/dMMzErjfT3/lA9nNu1L/DHHwKNbHI5deMKHdL3kuslF +yuhPWTWeXc6H+L88t2VKyqguYd8YSO4Lu1OF97AtlXHm3BHBuKt8YBfdzjt7 +VhmTbwktyj7KhzZa0ZX1F5RxeCldPTCaD1Fnb10eu6KMux/d6DeI4sODuBsX +HW8po3l56sa3+/mg656XI1ahjPftdNt7gvmgIXwmI6lLGVV+5Zhe8iD3l22H +YyPXqGDUiUSapz4ffkrY+Lg+U0GPaOUcpy4eNAcz3gW9VMEJ3lCHVwcPKl9M +Q0y9Cob9sn/p30bue1FF1JtNKpiq6Xws9CMPtLtFv0wNqqA0/2qPXy0PQnlv +vS5JqqJJdU/LFy4PBje5ePbuUMVp76lKjaM86E3zcQ1foIb3wyr/C5XggfXI +AeuvBivReWPK9LV1XBjyW7jvbow6etn1zX7wLib/N2QFjz/TwOX/zTbtNr4N +Eq/V0rkjq9B+j1f/4dWFoJBcstnAYA3W7m1onOn/D3JWM5dLBmpi9gfKzMDr +6/BKznTd78y1+O2PaMXi2mvAUniWodWkhS4Sp8/nFuWDmNDViO3x2jh9tnVW +9swVUIqjsreo6aCwyI6Gm48uwCLVrfcdX+rgcpXLNAuTHFjLWVFywEsX6+Xm +5J6zsyG8Q6LKRkAPl86Irx03Pw0jv9NcrHP00LC7WFQ+6RRYab3ItdbUR+6Y +htmUQio8/m38988bfcy51hht8DkJQtfotr73X4carACpKz4JwBne0bhlkQE+ +NLlx1E06FtarUDYuvWqARxrN+odbo0A99sTBZ4aGKHwkpd3ZKxJW+TOfqLYa +oqK1rraaYTicYthPJ7Qb4i/W85Ip9XAY++K7rrvDENcf+xbRJBcOjz3Sii73 +GOLFk/THRf/2guPmL+dkfxhiMk/6XfWLvXDIOHHPIgEj7F96QuKO+16oEX9P +/6FqhKxnL40NE/aA/+Odx+7uNUL9o1vFontDYDhk8MD6CCPMyd82FPMqBA4q +Bu9uijTCztNNgue4IXAiOsxx8rARKm8RKv4XHQJcViSNnWSEQdlq7/gyITBz +P6GiKtcIT7V/6y7YGAynSy6Pfagywtxf39741wbBk7zGHT+lmfhjXWPR8olA +6LSjb4ukMNGu+lPF785AEJgK2fJXjomcv6ff99UFgpnDAnthGhNdZQ06Z/ID +4cU8luGKVUws7BJI6bcPhHrfK4tMTZhodItTW1wUAK0qQcUZAUwcbvcrqtrj +D2M35/5oPWBi2+WiDJGVftDnapmXUsrESkarf72MHzTPP7mhp5yJj/JKtC6L ++EG5j9z5s5VMFHGVSvTv84V4yjrWbC0Tm8Lu7o2/4QvLk4OiX7UzMfqlhu6I +ui+sCfwo4C/IQruXrI9+BtvBT7VoUe5GFn6eWXQ2utcbop57B6ltZqHNzTey +Ti+9IcNfoo7vyMKmvPDHpoXeUHH9UFqdGwv33ZvHDNzjDVJqG5bNbmdhvHWk +/PtZL3ih9lXKJ5KFUkbJYRKKXrBKnUpTu8LC1LM+19qCPeHnqiwD/igLj5YW +vmDYu0NzPa6X/M3CQDlVfVkjd6gMHXaKGGdh0qaIzYoMd/IXyXqvwTQL1RU8 +A7wn3GAVS+B2mZAxdl4Xecy/4ga+1iH0KhljpBSM9J4fd4XGQCvRRrYxOvWX +R4gXu8DDgr9d48nGuOWBzgfdTU5gYB7xxybVGI/vJ+qyOE5wr2tINO+kMeqb +h8sKrXECvlKHoc1pY1RY4nZUdJET3M6pPHn5gjE6ryo4UFvlCHlpiUyrYmOM +PPfhXI+xI6RELMvMaTDGbxpx6S4GDuBhoYzGSmysu5D7aXOBPcw2LhSrorFx +qmihEjPRHvL8h9tslNloVLCliBNgD31JpQc81NnYv73E7IK6PYTXbio5pMvG +hU+d564Xb4QT9tFKDy3ZeEmh6G7fEzsoc/84ox/GRqnFHc0xEzYgH3K8dG0l +Gy8aJTAzS6wgfS5gXeozNjK2eJal5liB4GlLXn81G1v6lu3KjbOCwfvCt/Jq +2Rgh9VFizMkKygSO5Ug0sFHxJf44O2UJHmdiD0x8ZaPDboXjJzdYQk75oXWP +l3Cwus42smnMAkTtt/DkxDj4VKbiPrPTAmI7jTQPLOfgSFGCXUmdBewUnlTR +luZg8mpveH/VAgw3RUpdVeJgnIrEg2EHC2jqDv+dqMNBccHbvATCHKQXB/M2 +unFQZ/cj4l6CGRSYH4ka3cJBgc8J1qphZqB7JN08aysZ/9D3M7c8zMB+lPux +eTsHY3rvC43qmEFS0/iUXzAHr0o+Wx/eZQqTV2PMouI46OVELWRbmEKrcVbD +jSIONjhXCIdSEHbuL7hoXczBLnKfcBBBmCi+5z/E5WCE39JXGQMAEozmPzr3 +OSg8FsBsyQOwXaio8KiSg2tqQkXokgAVjTd2NHwkv8dZlwj7xwEbsYeakc0c +TJH9PX2wnQPNVrUTlDYOfmhLtrxexoGxsu/J3p0cHK+QDAo4wAHNfO073wY5 +6Ht+OuT4LzZUtJpGpv3g4OLJZduuv2eDjZQTaI1ykP6R4f6Vy4aA4/vfR4xz +0GRYqu9VGBvGKpNyZSc5KJ1D4ezZxIb46XN+ZdMcXH3Ml2aoxYbl+rfWeM1y +8LYW7KUuY8PlkLLxuTkORjlIiGuMGMP/ALdxymE= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07563733996890822}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07563733996890822}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VH8bAHARbVL2yTaLJSpZw4wZz2OJLCm7iEQoWUpSSdkiIpGUtFHq +VxQzc9sslaIiWkm2ZAtJqBAi733/uudz7rnPved8n+3SfcMc/QUFBARY8wQE +/n+d6KitVkktMBFOoYBbuIVJ42XKIdPmeAhd1a4T+5QBKP3Wl9J8Gny7q784 +P9WFyM2Fn4Sar0JMXfcDg6dmID4se3rqEx9SAgZuCj91hC8V9mFjn56B9qYM +I/9KX7BUGfz889MHGKlQSR9/FA5TnwyzRz91Q6bx4r9md+Ohyvy/gvdXf0NQ +gbpX++YsUPhS2ue7ZhY6tLNzD9leBKngbYULzIWwPupi3X6nq3Bax7Lc3mUh +nuk2e5WdcgNacrQrfy5fiscOyw/7yxdCakHMW8EV4li0uWS0JekO2OjvkpBW +FkfplG9+1ll3YGG1o8tKTXHMFxkY4l65A8d6VNtsTcWxNKbVYOfDOxDNqO87 +s0sct5r+2XXg2x0IzaP8UysTxzl3rpOMTTE4XOStsfWUwJs725SthEtA9kxP +StYlSSw/YjmUoMMFyup7xyZvSKLpdMY8LwMuyD1LivHiSmJ+Q9geXWMuKI1q +7F9ZJYkljzLdP1hwQdVuj0/5gCRyAi3M+ty4oDd/1qBHTwp7f9T+8zrChU0R +Mr26r6TQXbX2aMpzLmxeMtBxrkEKZdcbPxqq5YLj1dKWmXYpzA4TX2/3hguu +77a+fTEihWfLTbQEPnHBa821Mg9paXRqZ/kaD3Bhd69WZryPNNLLZYb+LeLB +cWdrkw8T0hjRok5/aMMDubtv5ATnyeDU4yrXSXseFEs6/9FZIoOXtw/S9Z14 +0PTBm5tJlcFqxXMHLnvyQMUhguGwQQYLqv7KmgTz4NnGKyLvzsugWsDukZtp +PJi1HH/zmi2L24otQ1a/4kHGjaiiWUtZfDnp1vr5Nfm8iECypoMshj51b0p9 +zwO754tNT/rLon/h26jWZh7kmtMIu3RZDLJM3mfWzwMjtD1X90UW5xVUrOAI +8WEfM39bbTwF5WYMLD4b8sEmT2zMNo2CR1c/N6pn8YGxIDr5TTYF2cZf7R9w ++PCu0ZXXcJOCSu9tO+PM+bB2j6hQxxsK4hbJCwP2fBi4ceDGL7kVqL1x6NTM +Dj5slbL/IU+swO5q6QeQzge9w+VxlytWYPmmVE0igw+Lu9Vl6C9W4Nurl+oY +WXwoLRECtZYVuM6TFzNxjg8ytqUZ2nMr0EH6xNuwfPL9cSr6623lcGBhm0Mh +wQeLkemo0B45jP+93cz0Ix8ObTiz6umQHA6WBgVok3VVnK/ZKjkhhxpt6j3y +LXygOPswSxfK4yH0H+hv58PQw+d/hNbK477Eo5rOvXzIis+IOH9QHs21vgoe +/cWHmjYNlaE4eRz45PlVd4wPM/pVDSap8tj45MTK3nE+BPSP6/ZekkcLylS9 +8RQfWHaeP9dWyeOIxe1bT+b40C2tFlq9VAEFvW7JyYkSIBv2RFFWVgEfmUjp +Zy8lwK7G/fUumgLOK3O5J7qMgPtRqWuW6Slgi+yJn6PiBJz4Mjq4xV0BD1Xq ++aTLEqB7qzxw5KoCetC+ZisyCAgUdJE1u62A2rVWe7YpE3DRc/jFmXsK6LaA +KL+kQoCIGF2NVaOA9oVSN5etJKA1PKn32A8FbLzkPlCzmoA4tsN2OSNFnK87 +cCZTn4AN3pd/GZop4mm2oiZvHQFisd8TXOwU8clS4fx6AzJ+VeKNDB9FLI3z +of4xIuChTdl3kRRFXKn3KF2OQ0BM8IIjKlmK+JA+rrDChADLdGcxs0uK+Gpy +8KQkEND4flj7CE8R9XS48jNIwKi7cuTvFkWkrrATuGhBwIOoPQvEexWxcEzq +8aH1BBy9+Chn7bAiZr775+9kSYBop1v5LkElLGwQODhtRcDKwDSBzlVKuF41 +54msLQHDyS2Zs/pK+OQ281sj6buFasryoIQFqffmp9sRYDZcud7VSQnd1ulK +j20kwHv/+In6w0rYL2r28NRmAlTPmSkMJiqhSGdJ2hoHgsyPU3cWZJDxu4Q9 +n5OOmtF4Z1aghG9FT3wbdCTAVOnAdp9iJUw0qSs64ETAQqz+deShEvoUyQUL +OBOQneAtXVqvhNc9Kd+FXQjYer3oRlOTEl7o7CmKJ814OWk41qmEwozJ0L+k +uYuzPLTGyfu25gJdrgTUZ768cl2RioceXg+Jdicgi5DSqVpJxfInI94tpD0+ +bn/WqUPFwCk9T90tBAxQZnrlLanY4CV/qJl0Ccs6krmZih01UxdVPQiI3Hp2 +gZsHFSW/bngXSlooT3vV6VAqjqs+2jVO+tXTI+UlB6m4dtPKD7qeBGT0vLJ7 +HU/F59pp9sGk3YQpHYNpVPzoKN6ZT1pppX/YwnNUtN37+XgD6a8b+AJq+WS8 +KIrVvK0E3A6ayzQvouL5jO9Kq0nvS7NT3n6PimNCccsdSLOKz989+oSKja7z +FfeRtvj0Zna4horuDRI+p0jbC8y32vaBiv0JQqY3SbtrMDPetlFRI66+8hFp +P8fQFvhKxdiXOzrfkg49fI3BHaainUF1XgfpgwXNu2mTVGSf6hEcJP20L8mj +RoCG/+2vWPCLtOVhekysMA1bQqy5E6TrllVcM1pMw13tibN/SG8ucK0ZFaNh +knDo6DjpJqOfQzclabhRdC5llLTn61Tx7RQaiv8yqOsn3bldzWCFIg1Ls6Xu +tZEOmKj0eE+noSBxbkM96e8nPGNS1Gj4uasyqZT0HurENdPVNORlZ+65Rnqc +yKiZ0qLhPQXRBSdIR21Y/YOnT0O4omcbQlrg83PxICYNF1JFTTaSTtzrY8Aw +oWFqZG6nBunFIn89Ws1oaOneqydEOiM3O+a0FQ0l7UeNWsjzya16VSPoQMPa +18FbD5Omuvv/KHOh4bvzw9FWpAuG5sT3edCwfsbZaTnpEul1nj1+NFy9+q9q +Dpkf+oVvYy7spGHWJ0cVN9JlJkEFTiE0TGh73C5Bujrwyo+qSBpeui0aG0vm +n/UMUyL6MA1NekRD/p+fbzIaDfRjaThu5k3pIvO3pXRRbEEKDfV0WcX6pL3t +Cwq2ptNwzaVvuS1uBPR2m9RKZdGwuE/P5jDp4SUREokXaViW/n3sLlkf+/LE +DDn5NFyicuyXHelJ/Vue49dpuHi+2IMusp6EvDsK/EtoOHHX+fw80hTuBkPL +ZzS83xXeJUfW6yWLHs9/L2gY4+iy7jxZz4yWI7H362gY4vzXXYq0piBRq/aR +hnXPFknNI+vfzFlx64IBGi67kHfwrj0BwZM/Y2uW0tF1sGgqwZrM570BMn0S +dHROykyr3ED2g8HWIiEKHYkFg/unyH51va2qyYRBR6vpTgcfsp91PM5ec8+A +jsGsXHdBcwI2JTKb87fRsTZV8FeOMVlf/+6EPNlBR/nSr1cusMh+FMkQ+ryL +jpw0n4pcJgHJO5espUTQMQSsrNINCai0/ZyQnkxHt3zddzZ65LyQiNM6zKPj +4RBTUflVZP6kjlfn3KejXfZu76/q5HkIBXncL6fj3VyO0W1yPuwed0z8+ZyO +i98Yp2ipkvnQrNIW2ErHkaG416I0AmSu1CQ5CzFQy2d8g7I0AVOrl3doujDw +oXFqQt0MHyYuycXpeTDQY/7iizp/+TC2TFWFuY2B1MGlp86Q83H4NzPIYhcD +fxQvXeIwQc7Hcr8JjyMM5MgOHy8Y4cMr2wdiydcZ6HLPae5+Fx9yd3tD9zgD +lbMXumZX8eHc553d/dMMzErjfT3/lA9nNu1L/DHHwKNbHI5deMKHdL3kuslF +yuhPWTWeXc6H+L88t2VKyqguYd8YSO4Lu1OF97AtlXHm3BHBuKt8YBfdzjt7 +VhmTbwktyj7KhzZa0ZX1F5RxeCldPTCaD1Fnb10eu6KMux/d6DeI4sODuBsX +HW8po3l56sa3+/mg656XI1ahjPftdNt7gvmgIXwmI6lLGVV+5Zhe8iD3l22H +YyPXqGDUiUSapz4ffkrY+Lg+U0GPaOUcpy4eNAcz3gW9VMEJ3lCHVwcPKl9M +Q0y9Cob9sn/p30bue1FF1JtNKpiq6Xws9CMPtLtFv0wNqqA0/2qPXy0PQnlv +vS5JqqJJdU/LFy4PBje5ePbuUMVp76lKjaM86E3zcQ1foIb3wyr/C5XggfXI +AeuvBivReWPK9LV1XBjyW7jvbow6etn1zX7wLib/N2QFjz/TwOX/zTbtNr4N +Eq/V0rkjq9B+j1f/4dWFoJBcstnAYA3W7m1onOn/D3JWM5dLBmpi9gfKzMDr +6/BKznTd78y1+O2PaMXi2mvAUniWodWkhS4Sp8/nFuWDmNDViO3x2jh9tnVW +9swVUIqjsreo6aCwyI6Gm48uwCLVrfcdX+rgcpXLNAuTHFjLWVFywEsX6+Xm +5J6zsyG8Q6LKRkAPl86Irx03Pw0jv9NcrHP00LC7WFQ+6RRYab3ItdbUR+6Y +htmUQio8/m38988bfcy51hht8DkJQtfotr73X4carACpKz4JwBne0bhlkQE+ +NLlx1E06FtarUDYuvWqARxrN+odbo0A99sTBZ4aGKHwkpd3ZKxJW+TOfqLYa +oqK1rraaYTicYthPJ7Qb4i/W85Ip9XAY++K7rrvDENcf+xbRJBcOjz3Sii73 +GOLFk/THRf/2guPmL+dkfxhiMk/6XfWLvXDIOHHPIgEj7F96QuKO+16oEX9P +/6FqhKxnL40NE/aA/+Odx+7uNUL9o1vFontDYDhk8MD6CCPMyd82FPMqBA4q +Bu9uijTCztNNgue4IXAiOsxx8rARKm8RKv4XHQJcViSNnWSEQdlq7/gyITBz +P6GiKtcIT7V/6y7YGAynSy6Pfagywtxf39741wbBk7zGHT+lmfhjXWPR8olA +6LSjb4ukMNGu+lPF785AEJgK2fJXjomcv6ff99UFgpnDAnthGhNdZQ06Z/ID +4cU8luGKVUws7BJI6bcPhHrfK4tMTZhodItTW1wUAK0qQcUZAUwcbvcrqtrj +D2M35/5oPWBi2+WiDJGVftDnapmXUsrESkarf72MHzTPP7mhp5yJj/JKtC6L ++EG5j9z5s5VMFHGVSvTv84V4yjrWbC0Tm8Lu7o2/4QvLk4OiX7UzMfqlhu6I +ui+sCfwo4C/IQruXrI9+BtvBT7VoUe5GFn6eWXQ2utcbop57B6ltZqHNzTey +Ti+9IcNfoo7vyMKmvPDHpoXeUHH9UFqdGwv33ZvHDNzjDVJqG5bNbmdhvHWk +/PtZL3ih9lXKJ5KFUkbJYRKKXrBKnUpTu8LC1LM+19qCPeHnqiwD/igLj5YW +vmDYu0NzPa6X/M3CQDlVfVkjd6gMHXaKGGdh0qaIzYoMd/IXyXqvwTQL1RU8 +A7wn3GAVS+B2mZAxdl4Xecy/4ga+1iH0KhljpBSM9J4fd4XGQCvRRrYxOvWX +R4gXu8DDgr9d48nGuOWBzgfdTU5gYB7xxybVGI/vJ+qyOE5wr2tINO+kMeqb +h8sKrXECvlKHoc1pY1RY4nZUdJET3M6pPHn5gjE6ryo4UFvlCHlpiUyrYmOM +PPfhXI+xI6RELMvMaTDGbxpx6S4GDuBhoYzGSmysu5D7aXOBPcw2LhSrorFx +qmihEjPRHvL8h9tslNloVLCliBNgD31JpQc81NnYv73E7IK6PYTXbio5pMvG +hU+d564Xb4QT9tFKDy3ZeEmh6G7fEzsoc/84ox/GRqnFHc0xEzYgH3K8dG0l +Gy8aJTAzS6wgfS5gXeozNjK2eJal5liB4GlLXn81G1v6lu3KjbOCwfvCt/Jq +2Rgh9VFizMkKygSO5Ug0sFHxJf44O2UJHmdiD0x8ZaPDboXjJzdYQk75oXWP +l3Cwus42smnMAkTtt/DkxDj4VKbiPrPTAmI7jTQPLOfgSFGCXUmdBewUnlTR +luZg8mpveH/VAgw3RUpdVeJgnIrEg2EHC2jqDv+dqMNBccHbvATCHKQXB/M2 +unFQZ/cj4l6CGRSYH4ka3cJBgc8J1qphZqB7JN08aysZ/9D3M7c8zMB+lPux +eTsHY3rvC43qmEFS0/iUXzAHr0o+Wx/eZQqTV2PMouI46OVELWRbmEKrcVbD +jSIONjhXCIdSEHbuL7hoXczBLnKfcBBBmCi+5z/E5WCE39JXGQMAEozmPzr3 +OSg8FsBsyQOwXaio8KiSg2tqQkXokgAVjTd2NHwkv8dZlwj7xwEbsYeakc0c +TJH9PX2wnQPNVrUTlDYOfmhLtrxexoGxsu/J3p0cHK+QDAo4wAHNfO073wY5 +6Ht+OuT4LzZUtJpGpv3g4OLJZduuv2eDjZQTaI1ykP6R4f6Vy4aA4/vfR4xz +0GRYqu9VGBvGKpNyZSc5KJ1D4ezZxIb46XN+ZdMcXH3Ml2aoxYbl+rfWeM1y +8LYW7KUuY8PlkLLxuTkORjlIiGuMGMP/ALdxymE= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07563733996890822}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07563733996890822}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943576782400913`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"7beeb090-902a-4bb9-9813-3f4e5b3b8797"] +}, Open ]], Cell[CellGroupData[{ @@ -13794,7 +15179,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -13812,8 +15199,8 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"(", FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -13835,66 +15222,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[225]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], + "In[142]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5794624625701512`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 225, 201, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512859148*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.804221171604008`*^-157\\\", \ +RowBox[{\\\"552513857212233842570175\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"108\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 142, 73, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.9943576782951927`*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], +In[142]:=",ExpressionUUID->"c7c9c1da-a0b6-498c-b277-8d85c6ba79e5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.303016475329449`*^-178\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 225, 202, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512868147*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.644934846771783`*^-160\\\", \ +RowBox[{\\\"192330073695578600598678\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"112\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 142, 74, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994357678304428*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], +In[142]:=",ExpressionUUID->"ebb540fc-92b6-4335-88e1-046955f70476"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3647813242367804`*^-181\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 225, 203, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335128761463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.536320475992273`*^-162\\\", \ +RowBox[{\\\"692388265304082962155241\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 142, 75, + 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.99435767831285*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], +In[142]:=",ExpressionUUID->"e5e48dee-fc89-49e0-9b70-7d2b5efbcb54"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 225, 204, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512885145*^9}, +during this calculation.\"", 2, 142, 76, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.99435767832137*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], +In[142]:=",ExpressionUUID->"8987ba46-c523-493c-aca6-6df65b2d0664"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913335200445786`*^9}, +Cell[BoxData["9.970600664844058`"], "Output", + CellChangeTimes->{3.9913335200445786`*^9, 3.994357739922058*^9}, CellLabel-> - "Out[225]=",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] + "Out[142]=",ExpressionUUID->"4b8ad428-3f62-475f-9f59-024df465e14d"] }, Open ]], Cell[CellGroupData[{ @@ -13961,68 +15355,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491385551624`*^9, - 3.991849142620474*^9}},ExpressionUUID->"f2835c98-560f-8e47-bdab-\ -0d2700971836"], + CellChangeTimes->{{3.9918491385551624`*^9, 3.991849142620474*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 226, 205, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200775414`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.861570479362556`*^-207\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 143, 77, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357739966899*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], +In[143]:=",ExpressionUUID->"c3aea160-54cb-4b95-8e95-8b99e2161037"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 206, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200875454`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.727929179956643`*^-212\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 143, 78, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357739974885*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], +In[143]:=",ExpressionUUID->"be72122e-1d9c-4158-9f81-d93ab4ef0367"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 207, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200945435`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.465447118355152`*^-217\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 143, 79, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357739982503*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], +In[143]:=",ExpressionUUID->"17c9cafa-217c-4b40-a293-dd873862bec1"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 226, 208, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335201035423`*^9}, +during this calculation.\"", 2, 143, 80, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357739990691*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], +In[143]:=",ExpressionUUID->"821c77bc-0b8e-447d-a58e-ab66d8a9a7c6"], -Cell[BoxData["0.7348275136088338`"], "Output", - CellChangeTimes->{3.9913335271231823`*^9}, +Cell[BoxData["0.5122733911698717`"], "Output", + CellChangeTimes->{3.9913335271231823`*^9, 3.9943577474665823`*^9}, CellLabel-> - "Out[226]=",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] + "Out[143]=",ExpressionUUID->"f453127e-b1ff-4fda-8de5-d1ada3a38c1e"] }, Open ]], Cell[CellGroupData[{ @@ -14043,8 +15441,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14089,68 +15486,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849146408966*^9, - 3.9918491485488663`*^9}},ExpressionUUID->"ca837916-250f-4d4e-8368-\ -5a08f479e656"], + CellChangeTimes->{{3.991849146408966*^9, 3.9918491485488663`*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 227, 209, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271591835`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.861570479362556`*^-207\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 144, 81, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994357747506352*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], +In[144]:=",ExpressionUUID->"6ab07d09-da18-45ff-b1c0-1770f479fe64"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 210, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271681843`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.727929179956643`*^-212\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 144, 82, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.9943577475148287`*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], +In[144]:=",ExpressionUUID->"893d17c2-31b3-49f6-bc00-60d93d5ca742"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 211, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527176182*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.465447118355152`*^-217\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 144, 83, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994357747523139*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], +In[144]:=",ExpressionUUID->"f104f69b-7837-4831-acb8-a67dca3f0c32"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 227, 212, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527184183*^9}, +during this calculation.\"", 2, 144, 84, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994357747531691*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], +In[144]:=",ExpressionUUID->"501b5dcc-1205-4cb2-8928-ff4913a5cd9a"], -Cell[BoxData["5.221864211842707`"], "Output", - CellChangeTimes->{3.9913335331581306`*^9}, +Cell[BoxData["27.599196569066535`"], "Output", + CellChangeTimes->{3.9913335331581306`*^9, 3.994357754703409*^9}, CellLabel-> - "Out[227]=",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] + "Out[144]=",ExpressionUUID->"cf9b2637-eb31-4f81-b832-273a24cf0f8d"] }, Open ]], Cell[CellGroupData[{ @@ -14171,8 +15572,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14217,68 +15617,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491518098984`*^9, - 3.9918491543107758`*^9}},ExpressionUUID->"b579991f-985b-234a-94aa-\ -ed18c097f8c0"], + CellChangeTimes->{{3.9918491518098984`*^9, 3.9918491543107758`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 228, 213, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335331923027`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.861570479362556`*^-207\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 145, 85, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994357754744791*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], +In[145]:=",ExpressionUUID->"8446eb17-d050-47a0-9e36-0b197cf87685"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 214, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533202278*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.727929179956643`*^-212\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 145, 86, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994357754753042*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], +In[145]:=",ExpressionUUID->"60cf4284-f898-41a5-a1fc-3b304d3b49ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 215, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335332102795`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.465447118355152`*^-217\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 145, 87, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994357754760314*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], +In[145]:=",ExpressionUUID->"5ba6f64c-6f1b-4a56-9295-caf1ef09be8a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 228, 216, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533218281*^9}, +during this calculation.\"", 2, 145, 88, 31388290425217551397, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.99435775476772*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], +In[145]:=",ExpressionUUID->"5c8844fe-18f3-4d26-aa85-eabe3181e89a"], -Cell[BoxData["15.545902834190647`"], "Output", - CellChangeTimes->{3.9913335366055527`*^9}, +Cell[BoxData["4.580038178148973`"], "Output", + CellChangeTimes->{3.9913335366055527`*^9, 3.9943577592421722`*^9}, CellLabel-> - "Out[228]=",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] + "Out[145]=",ExpressionUUID->"44f43ed4-266c-4484-83af-3ec70bc2b154"] }, Open ]], Cell[CellGroupData[{ @@ -14287,24 +15691,25 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918491594691143`*^9, - 3.9918491632611027`*^9}},ExpressionUUID->"afb7855c-8700-d444-926c-\ -6d96abe14e67"], - -Cell[BoxData["0.08155763943441016`"], "Output", - CellChangeTimes->{3.9913335366395893`*^9}, + CellChangeTimes->{{3.9918491594691143`*^9, 3.9918491632611027`*^9}}, CellLabel-> - "Out[229]=",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] + "In[146]:=",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], + +Cell[BoxData["0.04556370476507366`"], "Output", + CellChangeTimes->{3.9913335366395893`*^9, 3.994357759277218*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"5f99d770-5b4a-4db2-9cc6-02caa2c4a920"] }, Open ]], Cell[BoxData[ RowBox[{"NotebookSave", "[", "]"}]], "Input", - CellChangeTimes->{{3.9940850640897617`*^9, - 3.994085064857016*^9}},ExpressionUUID->"a3c9312c-d52b-429d-a073-\ -e8b0adec4a09"] + CellChangeTimes->{{3.9940850640897617`*^9, 3.994085064857016*^9}}, + CellLabel-> + "In[147]:=",ExpressionUUID->"a3c9312c-d52b-429d-a073-e8b0adec4a09"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +Evaluator->"kernel 2", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {Automatic, 162}}, CellContext->Notebook, Magnification:>1.3 Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", @@ -14323,622 +15728,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 357, 7, 47, "Input",ExpressionUUID->"c0335248-5247-4f13-926b-fa62a8f981f8"], -Cell[936, 31, 309, 6, 54, "Output",ExpressionUUID->"ceb62d2e-5f81-4d00-baa6-06f3301db58f"] +Cell[576, 22, 352, 6, 47, "Input",ExpressionUUID->"c0335248-5247-4f13-926b-fa62a8f981f8"], +Cell[931, 30, 350, 5, 54, "Output",ExpressionUUID->"27e84e36-24be-47e3-b981-a8f9bf4792d6"] }, Open ]], Cell[CellGroupData[{ -Cell[1282, 42, 253, 5, 47, "Input",ExpressionUUID->"354befd8-b4be-4c61-8a98-493114337f1f"], -Cell[1538, 49, 256, 5, 54, "Output",ExpressionUUID->"aa9acc15-94a5-48ec-aa8a-a0e86efa3475"] +Cell[1318, 40, 248, 4, 47, "Input",ExpressionUUID->"354befd8-b4be-4c61-8a98-493114337f1f"], +Cell[1569, 46, 299, 5, 54, "Output",ExpressionUUID->"2ef8a2fc-215d-46e6-befd-b6e139909997"] }, Open ]], Cell[CellGroupData[{ -Cell[1831, 59, 226, 5, 47, "Input",ExpressionUUID->"a9a84cdd-aa0a-4f21-aaa0-f584821f8cde"], -Cell[2060, 66, 256, 5, 54, "Output",ExpressionUUID->"4db3209e-46c3-4b70-a558-d0e16d75924a"] +Cell[1905, 56, 221, 4, 47, "Input",ExpressionUUID->"a9a84cdd-aa0a-4f21-aaa0-f584821f8cde"], +Cell[2129, 62, 299, 5, 54, "Output",ExpressionUUID->"06fbe52d-c817-4875-b348-2b9e11418cb4"] }, Open ]], Cell[CellGroupData[{ -Cell[2353, 76, 180, 4, 47, "Input",ExpressionUUID->"6166240b-c04a-47c3-91f8-2572d760f671"], -Cell[2536, 82, 254, 5, 54, "Output",ExpressionUUID->"1ba05c05-42ce-4682-95b3-ac200c44e934"] +Cell[2465, 72, 175, 3, 47, "Input",ExpressionUUID->"6166240b-c04a-47c3-91f8-2572d760f671"], +Cell[2643, 77, 297, 5, 54, "Output",ExpressionUUID->"fcf13a94-c689-4122-b199-ed9fa96a2a32"] }, Open ]], Cell[CellGroupData[{ -Cell[2827, 92, 262, 8, 69, "Input",ExpressionUUID->"1cc1773a-afa8-404c-ab7d-98dfc3caed55"], -Cell[3092, 102, 257, 5, 54, "Output",ExpressionUUID->"cac6c2a2-1e45-4220-8d78-0a494a8edd9e"] +Cell[2977, 87, 257, 7, 69, "Input",ExpressionUUID->"1cc1773a-afa8-404c-ab7d-98dfc3caed55"], +Cell[3237, 96, 300, 5, 54, "Output",ExpressionUUID->"8520b721-8a3c-4423-be4c-e5f3f4c62aa9"] }, Open ]], Cell[CellGroupData[{ -Cell[3386, 112, 136, 3, 47, "Input",ExpressionUUID->"ac4e08ab-a3a2-4447-9ac6-7a59c3909ef7"], -Cell[3525, 117, 260, 5, 54, "Output",ExpressionUUID->"a9587b20-8751-462b-9920-b9ae8d8c3a20"] +Cell[3574, 106, 131, 2, 47, "Input",ExpressionUUID->"ac4e08ab-a3a2-4447-9ac6-7a59c3909ef7"], +Cell[3708, 110, 307, 5, 54, "Output",ExpressionUUID->"ffa60785-3fb7-4800-9a5e-0246f10c0be8"] }, Open ]], Cell[CellGroupData[{ -Cell[3822, 127, 281, 7, 47, "Input",ExpressionUUID->"5603746c-7135-454a-be5d-59a4b3dabe03"], -Cell[4106, 136, 274, 5, 54, "Output",ExpressionUUID->"ec44b850-7fde-4a49-bcd6-5d955f8fc74b"] +Cell[4052, 120, 276, 6, 47, "Input",ExpressionUUID->"5603746c-7135-454a-be5d-59a4b3dabe03"], +Cell[4331, 128, 317, 5, 54, "Output",ExpressionUUID->"b33eca69-a33d-4f66-9cc5-8572831b94e4"] }, Open ]], Cell[CellGroupData[{ -Cell[4417, 146, 262, 8, 47, "Input",ExpressionUUID->"d24b86df-4e74-4c9c-8318-4e08eb58fd43"], -Cell[4682, 156, 273, 5, 54, "Output",ExpressionUUID->"32a5fad8-d2c9-40b4-95c9-775636ea5ca5"] +Cell[4685, 138, 257, 7, 47, "Input",ExpressionUUID->"d24b86df-4e74-4c9c-8318-4e08eb58fd43"], +Cell[4945, 147, 316, 5, 54, "Output",ExpressionUUID->"88617a84-546d-4a4b-92ea-b49894370aca"] }, Open ]], Cell[CellGroupData[{ -Cell[4992, 166, 208, 4, 66, "Input",ExpressionUUID->"5c5a5da4-d766-4793-86a8-8f6a53b73c5e"], -Cell[5203, 172, 236, 4, 75, "Output",ExpressionUUID->"12d3b0e0-0941-46b2-906e-f7f53b008bf7"] +Cell[5298, 157, 203, 3, 47, "Input",ExpressionUUID->"5c5a5da4-d766-4793-86a8-8f6a53b73c5e"], +Cell[5504, 162, 281, 4, 54, "Output",ExpressionUUID->"54bc94ea-0d80-424c-b148-ede6f6f3281b"] }, Open ]], Cell[CellGroupData[{ -Cell[5476, 181, 208, 4, 66, "Input",ExpressionUUID->"9a082f09-f9d3-4bad-84cb-72b8e84d2756"], -Cell[5687, 187, 239, 4, 75, "Output",ExpressionUUID->"172aaa76-1da9-440f-8637-f3d2e59158ac"] +Cell[5822, 171, 204, 3, 47, "Input",ExpressionUUID->"9a082f09-f9d3-4bad-84cb-72b8e84d2756"], +Cell[6029, 176, 285, 4, 54, "Output",ExpressionUUID->"2f1678e7-61fa-45f5-9f21-a3f01e120b8a"] }, Open ]], Cell[CellGroupData[{ -Cell[5963, 196, 133, 3, 66, "Input",ExpressionUUID->"bc93169a-7f39-4d7a-aba2-e0d1bde947e6"], -Cell[6099, 201, 253, 5, 75, "Output",ExpressionUUID->"990f47b0-5d66-46b8-8540-aa25ef18bf6c"] +Cell[6351, 185, 129, 2, 47, "Input",ExpressionUUID->"bc93169a-7f39-4d7a-aba2-e0d1bde947e6"], +Cell[6483, 189, 297, 5, 54, "Output",ExpressionUUID->"ce80c3a6-646f-40a7-991b-88b8c84c13ea"] }, Open ]], Cell[CellGroupData[{ -Cell[6389, 211, 133, 3, 66, "Input",ExpressionUUID->"3cddb14a-cfc5-4d7b-a60c-0bfb54d25f87"], -Cell[6525, 216, 252, 5, 75, "Output",ExpressionUUID->"949240ff-8a96-425e-bbaf-31fe7022c59d"] +Cell[6817, 199, 129, 2, 47, "Input",ExpressionUUID->"3cddb14a-cfc5-4d7b-a60c-0bfb54d25f87"], +Cell[6949, 203, 298, 5, 54, "Output",ExpressionUUID->"1da13317-de58-479e-bef1-0336460f8ea3"] }, Open ]], Cell[CellGroupData[{ -Cell[6814, 226, 561, 20, 175, "Input",ExpressionUUID->"99e72024-8dca-46c2-9f6e-4e49d00393d8"], -Cell[7378, 248, 273, 5, 75, "Output",ExpressionUUID->"ab263a2f-6ec1-49da-851d-122c1a939904"] +Cell[7284, 213, 557, 19, 128, "Input",ExpressionUUID->"99e72024-8dca-46c2-9f6e-4e49d00393d8"], +Cell[7844, 234, 316, 5, 54, "Output",ExpressionUUID->"4716d3e5-4cf0-4b8c-b222-6036040b5548"] }, Open ]], Cell[CellGroupData[{ -Cell[7688, 258, 561, 20, 175, "Input",ExpressionUUID->"7e56c9da-ba3b-414d-9c5c-323c366b0f61"], -Cell[8252, 280, 271, 5, 75, "Output",ExpressionUUID->"2e382193-856c-406a-ad00-52213b3d070c"] +Cell[8197, 244, 557, 19, 128, "Input",ExpressionUUID->"7e56c9da-ba3b-414d-9c5c-323c366b0f61"], +Cell[8757, 265, 317, 5, 54, "Output",ExpressionUUID->"f1fa629f-3a98-42f7-be33-34fff5fcc510"] }, Open ]], Cell[CellGroupData[{ -Cell[8560, 290, 1592, 51, 362, "Input",ExpressionUUID->"54e0e6b9-1e0d-4ff8-ab6e-fec01274c687"], -Cell[10155, 343, 267, 5, 75, "Output",ExpressionUUID->"df2709fe-1126-42da-8ae3-4c614ff552f4"] +Cell[9111, 275, 1588, 50, 507, "Input",ExpressionUUID->"54e0e6b9-1e0d-4ff8-ab6e-fec01274c687"], +Cell[10702, 327, 311, 5, 54, "Output",ExpressionUUID->"a0962b7c-a06e-48b3-911f-cd281e69c899"] }, Open ]], Cell[CellGroupData[{ -Cell[10459, 353, 1426, 47, 362, "Input",ExpressionUUID->"16ada101-d422-48cc-b9c6-0c548b80c938"], -Cell[11888, 402, 286, 6, 75, "Output",ExpressionUUID->"098bfcb8-2ecf-4ebe-8697-c15b8864dec1"] +Cell[11050, 337, 1422, 46, 390, "Input",ExpressionUUID->"16ada101-d422-48cc-b9c6-0c548b80c938"], +Cell[12475, 385, 330, 6, 54, "Output",ExpressionUUID->"432efda7-da54-4599-b23a-ee074e75cd97"] }, Open ]], Cell[CellGroupData[{ -Cell[12211, 413, 1426, 47, 362, "Input",ExpressionUUID->"67614b29-ea38-467b-ad1e-848611eed2d6"], -Cell[13640, 462, 289, 6, 75, "Output",ExpressionUUID->"453f20c6-7f70-4443-a374-12bbc65f1132"] +Cell[12842, 396, 1422, 46, 390, "Input",ExpressionUUID->"67614b29-ea38-467b-ad1e-848611eed2d6"], +Cell[14267, 444, 332, 6, 54, "Output",ExpressionUUID->"6e4851d0-7b3c-44b9-a7ae-7ea6eb430cd0"] }, Open ]], Cell[CellGroupData[{ -Cell[13966, 473, 1592, 51, 362, "Input",ExpressionUUID->"6e819a46-7aa0-4151-a6cd-6bdc76a25292"], -Cell[15561, 526, 268, 5, 75, "Output",ExpressionUUID->"d36ce724-4946-4073-99e5-9782b84bbecb"] +Cell[14636, 455, 1588, 50, 507, "Input",ExpressionUUID->"6e819a46-7aa0-4151-a6cd-6bdc76a25292"], +Cell[16227, 507, 314, 5, 54, "Output",ExpressionUUID->"3047ee80-953b-436f-a224-c69e3f54c514"] }, Open ]], Cell[CellGroupData[{ -Cell[15866, 536, 135, 3, 66, "Input",ExpressionUUID->"fb2f36b8-4cb6-4bdd-a4be-3b902e12f18d"], -Cell[16004, 541, 256, 5, 75, "Output",ExpressionUUID->"2453793b-9be0-454f-bc05-3af7819d1790"] +Cell[16578, 517, 131, 2, 47, "Input",ExpressionUUID->"fb2f36b8-4cb6-4bdd-a4be-3b902e12f18d"], +Cell[16712, 521, 300, 5, 54, "Output",ExpressionUUID->"dc593540-d89a-4a06-9df9-04958688dbda"] }, Open ]], Cell[CellGroupData[{ -Cell[16297, 551, 137, 3, 66, "Input",ExpressionUUID->"3639ec78-e245-4fbc-bceb-94be6eae0b95"], -Cell[16437, 556, 258, 5, 75, "Output",ExpressionUUID->"35eb5f76-ca26-4828-a1e3-c83a1b4f1adf"] +Cell[17049, 531, 133, 2, 47, "Input",ExpressionUUID->"3639ec78-e245-4fbc-bceb-94be6eae0b95"], +Cell[17185, 535, 301, 5, 54, "Output",ExpressionUUID->"69e7c89a-aa57-4e3d-86ac-fa3a32acf9dc"] }, Open ]], Cell[CellGroupData[{ -Cell[16732, 566, 138, 3, 66, "Input",ExpressionUUID->"3bd9ee5d-b974-4258-914b-375ae4e1df1d"], -Cell[16873, 571, 260, 5, 75, "Output",ExpressionUUID->"ea0777b9-9cb9-4ee7-ad98-16cb31cf4aa2"] +Cell[17523, 545, 134, 2, 47, "Input",ExpressionUUID->"3bd9ee5d-b974-4258-914b-375ae4e1df1d"], +Cell[17660, 549, 304, 5, 54, "Output",ExpressionUUID->"84a1eb46-9a86-49ec-b76c-d76b53ff8bb3"] }, Open ]], Cell[CellGroupData[{ -Cell[17170, 581, 223, 5, 66, "Input",ExpressionUUID->"8fa011cb-4a23-4e0b-8c62-1ddf5c0e3f36"], -Cell[17396, 588, 269, 6, 75, "Output",ExpressionUUID->"03338214-083a-401d-a6e6-b60b43caa38c"] +Cell[18001, 559, 219, 4, 47, "Input",ExpressionUUID->"8fa011cb-4a23-4e0b-8c62-1ddf5c0e3f36"], +Cell[18223, 565, 312, 6, 54, "Output",ExpressionUUID->"aa70d9c2-124f-4cc0-9e50-0d49394a4c38"] }, Open ]], Cell[CellGroupData[{ -Cell[17702, 599, 138, 3, 66, "Input",ExpressionUUID->"da1d7249-1f33-48d4-b51e-3dd7bb77315e"], -Cell[17843, 604, 260, 5, 75, "Output",ExpressionUUID->"5c951bc6-3170-488b-a321-9ead508184d4"] +Cell[18572, 576, 134, 2, 47, "Input",ExpressionUUID->"da1d7249-1f33-48d4-b51e-3dd7bb77315e"], +Cell[18709, 580, 304, 5, 54, "Output",ExpressionUUID->"636cdc8a-e445-4459-a77c-12d7d07941b7"] }, Open ]], Cell[CellGroupData[{ -Cell[18140, 614, 326, 6, 66, "Input",ExpressionUUID->"510028e4-882a-4df9-9b40-bfcd3c772953"], -Cell[18469, 622, 253, 5, 75, "Output",ExpressionUUID->"dbce15ee-c59b-497f-9e37-1443941efb40"] +Cell[19050, 590, 322, 5, 47, "Input",ExpressionUUID->"510028e4-882a-4df9-9b40-bfcd3c772953"], +Cell[19375, 597, 299, 5, 54, "Output",ExpressionUUID->"bb332c64-aff3-4c9c-9fe6-adaa741e83b8"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 632, 302, 6, 66, "Input",ExpressionUUID->"f3fb1b87-340d-4e3a-a91e-5115ab7911c5"], -Cell[19064, 640, 259, 5, 75, "Output",ExpressionUUID->"4c30a20a-3182-4a49-b31a-cded622b81a8"] +Cell[19711, 607, 298, 5, 47, "Input",ExpressionUUID->"f3fb1b87-340d-4e3a-a91e-5115ab7911c5"], +Cell[20012, 614, 305, 5, 54, "Output",ExpressionUUID->"1823772d-1875-4201-9456-4b7e210593f1"] }, Open ]], Cell[CellGroupData[{ -Cell[19360, 650, 223, 5, 66, "Input",ExpressionUUID->"1de600e4-7465-4dc8-b56f-43516753f540"], -Cell[19586, 657, 250, 5, 75, "Output",ExpressionUUID->"dc1462f9-31c9-49ed-a16f-b52aea3e6112"] +Cell[20354, 624, 219, 4, 47, "Input",ExpressionUUID->"1de600e4-7465-4dc8-b56f-43516753f540"], +Cell[20576, 630, 294, 5, 54, "Output",ExpressionUUID->"3c5fd4d8-cde6-4274-a576-1b773cbf6274"] }, Open ]], Cell[CellGroupData[{ -Cell[19873, 667, 354, 11, 96, "Input",ExpressionUUID->"cb2d4f82-397e-4a51-8be2-42063086093d"], -Cell[20230, 680, 273, 5, 75, "Output",ExpressionUUID->"46aba39d-d5e8-46bc-8816-495dedaf7a47"] +Cell[20907, 640, 350, 10, 69, "Input",ExpressionUUID->"cb2d4f82-397e-4a51-8be2-42063086093d"], +Cell[21260, 652, 317, 5, 54, "Output",ExpressionUUID->"35b06c92-27e8-48e9-99ae-03fee89f8ba0"] }, Open ]], Cell[CellGroupData[{ -Cell[20540, 690, 354, 11, 96, "Input",ExpressionUUID->"8993c6b3-c3e7-44a7-85aa-b36f40e453a4"], -Cell[20897, 703, 290, 6, 75, "Output",ExpressionUUID->"bdcbf2bf-54d6-42b2-9892-707c318f9cf6"] +Cell[21614, 662, 350, 10, 69, "Input",ExpressionUUID->"8993c6b3-c3e7-44a7-85aa-b36f40e453a4"], +Cell[21967, 674, 336, 6, 54, "Output",ExpressionUUID->"44ab2dbf-8f4c-47d0-8ef8-70b62ec0a174"] }, Open ]], Cell[CellGroupData[{ -Cell[21224, 714, 998, 27, 184, "Input",ExpressionUUID->"40eace06-4fbe-46fc-bfc8-8e67d497e107"], -Cell[22225, 743, 274, 5, 75, "Output",ExpressionUUID->"b1597745-fe5e-4d01-af16-e4b928caa564"] +Cell[22340, 685, 994, 26, 352, "Input",ExpressionUUID->"40eace06-4fbe-46fc-bfc8-8e67d497e107"], +Cell[23337, 713, 322, 5, 54, "Output",ExpressionUUID->"8336b4b0-a675-4a17-a486-f903819f979b"] }, Open ]], Cell[CellGroupData[{ -Cell[22536, 753, 203, 4, 66, "Input",ExpressionUUID->"915acc3b-0278-4ec9-81ec-34747a42d3c9"], -Cell[22742, 759, 251, 5, 75, "Output",ExpressionUUID->"7e476c0a-8950-4107-b7b1-a6dd348403bf"] +Cell[23696, 723, 199, 3, 47, "Input",ExpressionUUID->"915acc3b-0278-4ec9-81ec-34747a42d3c9"], +Cell[23898, 728, 296, 5, 54, "Output",ExpressionUUID->"22cb3425-4230-487a-bced-4ddd30b1886e"] }, Open ]], Cell[CellGroupData[{ -Cell[23030, 769, 331, 6, 66, "Input",ExpressionUUID->"5ef6a20c-5cd2-42f7-8da7-ebe72323b4ec"], -Cell[23364, 777, 230, 4, 75, "Output",ExpressionUUID->"a00be3b9-b0e0-4d08-a9c0-73fc996848f0"] +Cell[24231, 738, 327, 5, 47, "Input",ExpressionUUID->"5ef6a20c-5cd2-42f7-8da7-ebe72323b4ec"], +Cell[24561, 745, 276, 4, 54, "Output",ExpressionUUID->"42b1bb82-503b-4f5d-a38b-053e3a5dcd35"] }, Open ]], -Cell[23609, 784, 177, 3, 66, "Input",ExpressionUUID->"48c0c524-e26b-4d2e-95e3-1420b47e42d3"], +Cell[24852, 752, 173, 2, 109, "Input",ExpressionUUID->"48c0c524-e26b-4d2e-95e3-1420b47e42d3"], Cell[CellGroupData[{ -Cell[23811, 791, 331, 6, 66, "Input",ExpressionUUID->"69b389d6-e250-4a61-bec4-6681f862fc89"], -Cell[24145, 799, 234, 4, 75, "Output",ExpressionUUID->"962e4c63-d89d-487c-ac1c-b66bf6e0f611"] +Cell[25050, 758, 327, 5, 47, "Input",ExpressionUUID->"69b389d6-e250-4a61-bec4-6681f862fc89"], +Cell[25380, 765, 280, 4, 54, "Output",ExpressionUUID->"0bd24e0d-49ee-4bf8-821e-6ec776ada35a"] }, Open ]], -Cell[24394, 806, 177, 3, 66, "Input",ExpressionUUID->"201d274f-b28e-4d36-94fa-28f8d9d0b9e2"], +Cell[25675, 772, 173, 2, 109, "Input",ExpressionUUID->"201d274f-b28e-4d36-94fa-28f8d9d0b9e2"], Cell[CellGroupData[{ -Cell[24596, 813, 333, 6, 66, "Input",ExpressionUUID->"0bb0ca5a-a152-4981-bdb2-9d32241b5481"], -Cell[24932, 821, 231, 4, 75, "Output",ExpressionUUID->"e8247fbd-07ea-4853-9a05-4f6ce329caf3"] +Cell[25873, 778, 329, 5, 47, "Input",ExpressionUUID->"0bb0ca5a-a152-4981-bdb2-9d32241b5481"], +Cell[26205, 785, 279, 4, 54, "Output",ExpressionUUID->"37a6470a-db01-4ca3-b15d-d4c93883c11b"] }, Open ]], -Cell[25178, 828, 177, 3, 66, "Input",ExpressionUUID->"b2974d27-96c4-469c-b450-7f00b2efc66b"], +Cell[26499, 792, 173, 2, 109, "Input",ExpressionUUID->"b2974d27-96c4-469c-b450-7f00b2efc66b"], Cell[CellGroupData[{ -Cell[25380, 835, 357, 6, 66, "Input",ExpressionUUID->"6a3bcb7f-c703-4f0a-80b0-03f64c0faed8"], -Cell[25740, 843, 230, 4, 75, "Output",ExpressionUUID->"3404e60d-3820-4084-a1e8-04b1d3bae090"] +Cell[26697, 798, 353, 5, 47, "Input",ExpressionUUID->"6a3bcb7f-c703-4f0a-80b0-03f64c0faed8"], +Cell[27053, 805, 273, 4, 54, "Output",ExpressionUUID->"9d27fa2f-a7ca-4756-963a-568b5fafc14c"] }, Open ]], -Cell[25985, 850, 175, 3, 66, "Input",ExpressionUUID->"18c4df67-6890-4429-926e-cc22e3e979ea"], +Cell[27341, 812, 171, 2, 109, "Input",ExpressionUUID->"18c4df67-6890-4429-926e-cc22e3e979ea"], Cell[CellGroupData[{ -Cell[26185, 857, 303, 6, 66, "Input",ExpressionUUID->"96d17d67-b209-4476-a91c-c9707ec30b3f"], -Cell[26491, 865, 232, 4, 75, "Output",ExpressionUUID->"de11238c-e73e-41b0-a2c8-1c6fa46c3712"] +Cell[27537, 818, 299, 5, 47, "Input",ExpressionUUID->"96d17d67-b209-4476-a91c-c9707ec30b3f"], +Cell[27839, 825, 278, 4, 54, "Output",ExpressionUUID->"0ac63edf-fd99-4150-9930-f519d4f67868"] }, Open ]], -Cell[26738, 872, 175, 3, 66, "Input",ExpressionUUID->"2651477c-a144-4f89-8ddb-9a0b58c38f62"], +Cell[28132, 832, 171, 2, 109, "Input",ExpressionUUID->"2651477c-a144-4f89-8ddb-9a0b58c38f62"], Cell[CellGroupData[{ -Cell[26938, 879, 309, 6, 66, "Input",ExpressionUUID->"df16c93c-10f6-4301-8a6a-9b6d2f7293e4"], -Cell[27250, 887, 233, 4, 75, "Output",ExpressionUUID->"b162a30d-861a-49af-9f4c-38c95acdbba6"] +Cell[28328, 838, 305, 5, 47, "Input",ExpressionUUID->"df16c93c-10f6-4301-8a6a-9b6d2f7293e4"], +Cell[28636, 845, 277, 4, 54, "Output",ExpressionUUID->"440aa89c-0066-4fb5-bfa2-8afbd681b60b"] }, Open ]], -Cell[27498, 894, 177, 3, 66, "Input",ExpressionUUID->"37b5a9d6-6387-47b7-9e2f-fb9438400ee9"], +Cell[28928, 852, 173, 2, 109, "Input",ExpressionUUID->"37b5a9d6-6387-47b7-9e2f-fb9438400ee9"], Cell[CellGroupData[{ -Cell[27700, 901, 331, 6, 66, "Input",ExpressionUUID->"e9786605-1be3-45cd-af96-9a833fbd2027"], -Cell[28034, 909, 235, 4, 75, "Output",ExpressionUUID->"d20b5187-c0e7-4d30-b185-57f93df63f20"] +Cell[29126, 858, 327, 5, 47, "Input",ExpressionUUID->"e9786605-1be3-45cd-af96-9a833fbd2027"], +Cell[29456, 865, 281, 4, 54, "Output",ExpressionUUID->"9b50a056-dd4e-4d1c-9e2d-850259fdd3e2"] }, Open ]], -Cell[28284, 916, 176, 3, 66, "Input",ExpressionUUID->"72743464-9145-44aa-b8c5-9ce8cb3a1661"], +Cell[29752, 872, 172, 2, 109, "Input",ExpressionUUID->"72743464-9145-44aa-b8c5-9ce8cb3a1661"], Cell[CellGroupData[{ -Cell[28485, 923, 280, 5, 66, "Input",ExpressionUUID->"5f7b1f55-72bb-425e-8a55-284fd8d2e435"], -Cell[28768, 930, 232, 4, 75, "Output",ExpressionUUID->"7fc1ac66-809a-4f55-844a-9da079c6447b"] +Cell[29949, 878, 276, 4, 47, "Input",ExpressionUUID->"5f7b1f55-72bb-425e-8a55-284fd8d2e435"], +Cell[30228, 884, 278, 4, 54, "Output",ExpressionUUID->"924bb2d1-64b8-4a0e-b323-6a0dd94d7a6a"] }, Open ]], -Cell[29015, 937, 179, 3, 66, "Input",ExpressionUUID->"453209c5-91c3-4edf-9ba2-5a059b785845"], +Cell[30521, 891, 175, 2, 109, "Input",ExpressionUUID->"453209c5-91c3-4edf-9ba2-5a059b785845"], Cell[CellGroupData[{ -Cell[29219, 944, 19813, 486, 5405, "Input",ExpressionUUID->"d4a650aa-aa3b-4af2-8c25-cd6a8950511c"], -Cell[49035, 1432, 271, 5, 75, "Output",ExpressionUUID->"c4533770-e51c-4efe-ad9c-7934cde475ba"] +Cell[30721, 897, 19809, 485, 4731, "Input",ExpressionUUID->"d4a650aa-aa3b-4af2-8c25-cd6a8950511c"], +Cell[50533, 1384, 317, 5, 54, "Output",ExpressionUUID->"ffed3354-2a9d-45bc-8ddd-058e6d080a94"] }, Open ]], Cell[CellGroupData[{ -Cell[49343, 1442, 19752, 490, 5343, "Input",ExpressionUUID->"3ac53e2c-e6a1-49a0-adef-a26078efff40"], -Cell[69098, 1934, 266, 5, 75, "Output",ExpressionUUID->"4aeedbbe-7897-41fb-aba8-70853993e4f0"] +Cell[50887, 1394, 19748, 489, 4731, "Input",ExpressionUUID->"3ac53e2c-e6a1-49a0-adef-a26078efff40"], +Cell[70638, 1885, 314, 5, 54, "Output",ExpressionUUID->"a11b1bde-da72-4b08-9047-8c59f5645699"] }, Open ]], Cell[CellGroupData[{ -Cell[69401, 1944, 19752, 484, 5342, "Input",ExpressionUUID->"df9e6656-1de2-4cf4-ab98-4aaf4c5aafb9"], -Cell[89156, 2430, 287, 6, 75, "Output",ExpressionUUID->"047139e5-a4d7-4fa3-a584-e6dee055fc0f"] +Cell[70989, 1895, 19748, 483, 4730, "Input",ExpressionUUID->"df9e6656-1de2-4cf4-ab98-4aaf4c5aafb9"], +Cell[90740, 2380, 330, 6, 54, "Output",ExpressionUUID->"a6b26536-d25b-440e-8600-1a83201a797b"] }, Open ]], Cell[CellGroupData[{ -Cell[89480, 2441, 22538, 554, 6074, "Input",ExpressionUUID->"102c1b36-6747-4403-9b99-7d44ce9a28bb"], -Cell[112021, 2997, 288, 6, 75, "Output",ExpressionUUID->"6946a29a-1641-428b-9db0-c60f5925bd08"] +Cell[91107, 2391, 22534, 553, 5405, "Input",ExpressionUUID->"102c1b36-6747-4403-9b99-7d44ce9a28bb"], +Cell[113644, 2946, 334, 6, 54, "Output",ExpressionUUID->"d22f9025-919e-4254-93b6-903ca145d76c"] }, Open ]], Cell[CellGroupData[{ -Cell[112346, 3008, 22539, 554, 6074, "Input",ExpressionUUID->"95296522-0a2a-434c-8865-2c89ba3efa73"], -Cell[134888, 3564, 291, 6, 75, "Output",ExpressionUUID->"307adb1a-7bbe-4fb6-8094-5b6015f7be40"] +Cell[114015, 2957, 22535, 553, 5405, "Input",ExpressionUUID->"95296522-0a2a-434c-8865-2c89ba3efa73"], +Cell[136553, 3512, 335, 6, 54, "Output",ExpressionUUID->"b6385547-cf69-44a6-b84c-a869004b367c"] }, Open ]], Cell[CellGroupData[{ -Cell[135216, 3575, 25495, 627, 6806, "Input",ExpressionUUID->"9010b95c-ac92-4603-9235-8445a1e62807"], -Cell[160714, 4204, 290, 6, 75, "Output",ExpressionUUID->"f7beb120-f713-40d9-bf35-8eae0ef2a65c"] +Cell[136925, 3523, 25491, 626, 6080, "Input",ExpressionUUID->"9010b95c-ac92-4603-9235-8445a1e62807"], +Cell[162419, 4151, 334, 6, 54, "Output",ExpressionUUID->"74ba788e-b1a4-439b-a283-d5e72d44b549"] }, Open ]], Cell[CellGroupData[{ -Cell[161041, 4215, 134, 3, 66, "Input",ExpressionUUID->"86f01f3e-5f28-417e-8437-8e045dcea278"], -Cell[161178, 4220, 253, 5, 75, "Output",ExpressionUUID->"4489ccb6-da05-44b2-83ed-c78506fbc0ed"] +Cell[162790, 4162, 130, 2, 47, "Input",ExpressionUUID->"86f01f3e-5f28-417e-8437-8e045dcea278"], +Cell[162923, 4166, 297, 5, 54, "Output",ExpressionUUID->"74c7b509-b692-42ef-a0d7-973c21d6ea0a"] }, Open ]], Cell[CellGroupData[{ -Cell[161468, 4230, 134, 3, 66, "Input",ExpressionUUID->"083a2ac6-7106-49ed-aeca-5f099f6ab7dc"], -Cell[161605, 4235, 254, 5, 75, "Output",ExpressionUUID->"e8e800b6-12bd-421a-a85b-6e8ef1f6b145"] +Cell[163257, 4176, 130, 2, 47, "Input",ExpressionUUID->"083a2ac6-7106-49ed-aeca-5f099f6ab7dc"], +Cell[163390, 4180, 298, 5, 54, "Output",ExpressionUUID->"e5082461-09d0-4df7-aee4-ec2d6a5c3fc2"] }, Open ]], Cell[CellGroupData[{ -Cell[161896, 4245, 1148, 40, 246, "Input",ExpressionUUID->"b91cd1e8-6fa7-4eaa-9663-290567205b38"], -Cell[163047, 4287, 269, 5, 75, "Output",ExpressionUUID->"24e10728-5b97-47b9-857c-7f835ce7c8a2"] +Cell[163725, 4190, 1144, 39, 447, "Input",ExpressionUUID->"b91cd1e8-6fa7-4eaa-9663-290567205b38"], +Cell[164872, 4231, 312, 5, 54, "Output",ExpressionUUID->"32bfbd3f-df11-4e74-b386-362037f4ccea"] }, Open ]], Cell[CellGroupData[{ -Cell[163353, 4297, 1045, 36, 246, "Input",ExpressionUUID->"dafb5daa-ccd4-43ad-b6dd-0344b2068787"], -Cell[164401, 4335, 288, 6, 75, "Output",ExpressionUUID->"ef048afa-181b-46d6-a204-a4f43dfd5462"] +Cell[165221, 4241, 1041, 35, 444, "Input",ExpressionUUID->"dafb5daa-ccd4-43ad-b6dd-0344b2068787"], +Cell[166265, 4278, 334, 6, 54, "Output",ExpressionUUID->"64a97879-b0e2-4660-89bf-1bd386867d3c"] }, Open ]], Cell[CellGroupData[{ -Cell[164726, 4346, 1148, 40, 246, "Input",ExpressionUUID->"a7ae48a9-4b3e-4ff0-a2eb-8bf797d30085"], -Cell[165877, 4388, 272, 5, 75, "Output",ExpressionUUID->"deaae744-91d3-42dc-92b5-0490afb71aab"] +Cell[166636, 4289, 1144, 39, 447, "Input",ExpressionUUID->"a7ae48a9-4b3e-4ff0-a2eb-8bf797d30085"], +Cell[167783, 4330, 316, 5, 54, "Output",ExpressionUUID->"c5e14956-6e8b-433c-a859-b388f78e3b1c"] }, Open ]], Cell[CellGroupData[{ -Cell[166186, 4398, 112, 2, 66, "Input",ExpressionUUID->"9c297244-a5bc-496f-a923-9aaa5f24f6c1"], -Cell[166301, 4402, 269, 5, 75, "Output",ExpressionUUID->"7295b066-5026-4596-aa1d-9a4707b7f587"] +Cell[168136, 4340, 108, 1, 47, "Input",ExpressionUUID->"9c297244-a5bc-496f-a923-9aaa5f24f6c1"], +Cell[168247, 4343, 312, 5, 54, "Output",ExpressionUUID->"ed98c6c3-d83e-4efd-b989-f103cde502d0"] }, Open ]], Cell[CellGroupData[{ -Cell[166607, 4412, 112, 2, 66, "Input",ExpressionUUID->"877fcbde-276e-4a2c-836d-53d540a497ca"], -Cell[166722, 4416, 290, 6, 75, "Output",ExpressionUUID->"e849b770-6467-483e-8abb-57197cc517ef"] +Cell[168596, 4353, 108, 1, 47, "Input",ExpressionUUID->"877fcbde-276e-4a2c-836d-53d540a497ca"], +Cell[168707, 4356, 333, 6, 54, "Output",ExpressionUUID->"e83690d9-ec67-4fbc-ac69-ebe06084be53"] }, Open ]], Cell[CellGroupData[{ -Cell[167049, 4427, 112, 2, 66, "Input",ExpressionUUID->"3b8a316a-a410-47e0-a13d-9efe5a77ce3e"], -Cell[167164, 4431, 287, 6, 75, "Output",ExpressionUUID->"2dafd199-4af3-432e-a02e-b79c927ee72a"] +Cell[169077, 4367, 108, 1, 47, "Input",ExpressionUUID->"3b8a316a-a410-47e0-a13d-9efe5a77ce3e"], +Cell[169188, 4370, 331, 6, 54, "Output",ExpressionUUID->"2117802b-7b65-478d-90c0-52dba0d6b9f6"] }, Open ]], Cell[CellGroupData[{ -Cell[167488, 4442, 112, 2, 66, "Input",ExpressionUUID->"c740442c-d864-4b98-9a47-4e36289cbbf2"], -Cell[167603, 4446, 269, 5, 75, "Output",ExpressionUUID->"fa2eab3a-9ee0-4932-bd1d-3a7114885d17"] +Cell[169556, 4381, 108, 1, 47, "Input",ExpressionUUID->"c740442c-d864-4b98-9a47-4e36289cbbf2"], +Cell[169667, 4384, 312, 5, 54, "Output",ExpressionUUID->"c3d8ac51-a193-4a71-9e5c-6f34e3164d43"] }, Open ]], Cell[CellGroupData[{ -Cell[167909, 4456, 111, 2, 66, "Input",ExpressionUUID->"b7724a61-bf3f-42ba-bf4b-234390c9872a"], -Cell[168023, 4460, 272, 5, 75, "Output",ExpressionUUID->"89c9ccf3-57cc-44b9-ad58-f14bfcbb7e9c"] +Cell[170016, 4394, 107, 1, 47, "Input",ExpressionUUID->"b7724a61-bf3f-42ba-bf4b-234390c9872a"], +Cell[170126, 4397, 313, 5, 54, "Output",ExpressionUUID->"0cd82f2e-4a8e-43d8-bf1a-3f051ba4b5c7"] }, Open ]], Cell[CellGroupData[{ -Cell[168332, 4470, 111, 2, 66, "Input",ExpressionUUID->"fd13d997-9762-499b-a2f1-b85c8102c377"], -Cell[168446, 4474, 272, 5, 75, "Output",ExpressionUUID->"5eb336fb-1474-48c7-8e70-b2d51035d2b0"] +Cell[170476, 4407, 107, 1, 47, "Input",ExpressionUUID->"fd13d997-9762-499b-a2f1-b85c8102c377"], +Cell[170586, 4410, 317, 5, 54, "Output",ExpressionUUID->"d31070f2-6ae1-485a-a156-22cb599f69cb"] }, Open ]], Cell[CellGroupData[{ -Cell[168755, 4484, 501, 17, 125, "Input",ExpressionUUID->"6b10c15a-f89b-4a9a-a8fe-3200c0eb53fa"], -Cell[169259, 4503, 287, 6, 75, "Output",ExpressionUUID->"2be4e0b2-ff27-4032-bb6f-07d5eb554252"] +Cell[170940, 4420, 497, 16, 156, "Input",ExpressionUUID->"6b10c15a-f89b-4a9a-a8fe-3200c0eb53fa"], +Cell[171440, 4438, 333, 6, 54, "Output",ExpressionUUID->"8f6a1511-168b-4b06-a175-2a5d2d925e88"] }, Open ]], Cell[CellGroupData[{ -Cell[169583, 4514, 501, 17, 125, "Input",ExpressionUUID->"dea721d1-bdbd-4248-99c9-331ed0ad1233"], -Cell[170087, 4533, 283, 6, 75, "Output",ExpressionUUID->"e4a89a47-8b20-43f2-ae24-44f802be60e6"] +Cell[171810, 4449, 497, 16, 156, "Input",ExpressionUUID->"dea721d1-bdbd-4248-99c9-331ed0ad1233"], +Cell[172310, 4467, 327, 6, 54, "Output",ExpressionUUID->"477122f8-a344-4754-ac78-dd2b4e607e91"] }, Open ]], Cell[CellGroupData[{ -Cell[170407, 4544, 1792, 61, 420, "Input",ExpressionUUID->"b012b84c-6e63-429d-bc53-eb09754291c1"], -Cell[172202, 4607, 271, 5, 75, "Output",ExpressionUUID->"c3b55c8b-5a54-4004-9afc-4b91d92ad3fb"] +Cell[172674, 4478, 1788, 60, 778, "Input",ExpressionUUID->"b012b84c-6e63-429d-bc53-eb09754291c1"], +Cell[174465, 4540, 315, 5, 54, "Output",ExpressionUUID->"8404ac40-e82c-48e3-aa59-8de0c8fac2e7"] }, Open ]], Cell[CellGroupData[{ -Cell[172510, 4617, 1105, 37, 299, "Input",ExpressionUUID->"d39fa51b-8be7-410b-a294-c35f27d1b65b"], -Cell[173618, 4656, 284, 6, 75, "Output",ExpressionUUID->"e9dc6c44-5995-467b-bec7-657b972dd207"] +Cell[174817, 4550, 1101, 36, 564, "Input",ExpressionUUID->"d39fa51b-8be7-410b-a294-c35f27d1b65b"], +Cell[175921, 4588, 327, 6, 54, "Output",ExpressionUUID->"bfeb192f-3624-4969-adfb-11dc0c1e70f9"] }, Open ]], Cell[CellGroupData[{ -Cell[173939, 4667, 1822, 62, 420, "Input",ExpressionUUID->"1b4104e3-8445-4439-826d-6d10b9d6c287"], -Cell[175764, 4731, 268, 5, 75, "Output",ExpressionUUID->"963ea5ba-2331-426f-ae87-dbd63a93831b"] +Cell[176285, 4599, 1818, 61, 778, "Input",ExpressionUUID->"1b4104e3-8445-4439-826d-6d10b9d6c287"], +Cell[178106, 4662, 312, 5, 54, "Output",ExpressionUUID->"7b4f9715-8797-4345-af6e-03771b7824f1"] }, Open ]], Cell[CellGroupData[{ -Cell[176069, 4741, 1635, 54, 130, "Input",ExpressionUUID->"8b288cdc-a966-4c35-a26b-ef5be912ee32"], -Cell[177707, 4797, 267, 5, 54, "Output",ExpressionUUID->"212a0e4a-9d50-4333-b445-d6217fc229cd"] +Cell[178455, 4672, 1631, 53, 342, "Input",ExpressionUUID->"8b288cdc-a966-4c35-a26b-ef5be912ee32"], +Cell[180089, 4727, 310, 5, 54, "Output",ExpressionUUID->"145a8026-da2d-4f5a-a087-aa8e09a2edeb"] }, Open ]], Cell[CellGroupData[{ -Cell[178011, 4807, 1635, 54, 130, "Input",ExpressionUUID->"0afb1289-2b6f-4d81-8a63-5b10c39a0135"], -Cell[179649, 4863, 268, 5, 54, "Output",ExpressionUUID->"d21d33fa-6c1a-4767-b04a-479aa03b8a20"] +Cell[180436, 4737, 1631, 53, 342, "Input",ExpressionUUID->"0afb1289-2b6f-4d81-8a63-5b10c39a0135"], +Cell[182070, 4792, 314, 5, 54, "Output",ExpressionUUID->"e8197533-a729-4fb2-9182-dc118767408e"] }, Open ]], -Cell[179932, 4871, 187, 4, 47, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], -Cell[180122, 4877, 154, 3, 47, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], -Cell[180279, 4882, 187, 4, 47, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], -Cell[180469, 4888, 154, 3, 47, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[180648, 4895, 1301, 43, 79, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[181952, 4940, 178, 3, 54, "Output",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[182421, 4802, 206, 3, 47, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], +Cell[182630, 4807, 183, 2, 54, "Output",ExpressionUUID->"bdc088a3-abec-4c00-9d6f-d339f422063d"] }, Open ]], +Cell[182828, 4812, 173, 2, 109, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], Cell[CellGroupData[{ -Cell[182167, 4948, 910, 31, 91, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[183080, 4981, 175, 3, 54, "Output",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[183026, 4818, 206, 3, 47, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], +Cell[183235, 4823, 187, 2, 54, "Output",ExpressionUUID->"afb6e4b5-bb19-447a-8e52-f31396b55be3"] }, Open ]], +Cell[183437, 4828, 173, 2, 109, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[183292, 4989, 887, 30, 91, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[184182, 5021, 176, 3, 54, "Output",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[183635, 4834, 1297, 42, 222, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], +Cell[184935, 4878, 223, 3, 54, "Output",ExpressionUUID->"f91c1781-fa89-43da-ae94-0c5847fa99eb"] }, Open ]], Cell[CellGroupData[{ -Cell[184395, 5029, 558, 19, 85, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[184956, 5050, 172, 3, 54, "Output",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[185195, 4886, 929, 30, 222, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], +Cell[186127, 4918, 218, 3, 54, "Output",ExpressionUUID->"d1e295b4-5922-42af-b162-b28c56b0c9bd"] }, Open ]], Cell[CellGroupData[{ -Cell[185165, 5058, 623, 21, 85, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[185791, 5081, 172, 3, 54, "Output",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[186382, 4926, 906, 29, 222, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], +Cell[187291, 4957, 219, 3, 54, "Output",ExpressionUUID->"1d65de73-a1ab-4c59-a1f6-43aec62847f2"] }, Open ]], Cell[CellGroupData[{ -Cell[186000, 5089, 170, 5, 91, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[186173, 5096, 172, 3, 54, "Output",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[187547, 4965, 554, 18, 85, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], +Cell[188104, 4985, 216, 3, 54, "Output",ExpressionUUID->"3f8fc62a-8a20-4e18-b78c-8e701b6650d5"] }, Open ]], Cell[CellGroupData[{ -Cell[186382, 5104, 170, 5, 89, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[186555, 5111, 171, 3, 54, "Output",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[188357, 4993, 619, 20, 85, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], +Cell[188979, 5015, 216, 3, 54, "Output",ExpressionUUID->"c5c551bc-e230-43c5-aeb1-cb3ed5685004"] }, Open ]], Cell[CellGroupData[{ -Cell[186763, 5119, 181, 5, 70, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[186947, 5126, 170, 3, 54, "Output",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[189232, 5023, 166, 4, 91, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], +Cell[189401, 5029, 216, 3, 54, "Output",ExpressionUUID->"29fd867d-fc6c-4e82-9195-5736422f4bb2"] }, Open ]], Cell[CellGroupData[{ -Cell[187154, 5134, 181, 5, 70, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[187338, 5141, 172, 3, 54, "Output",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[189654, 5037, 166, 4, 89, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], +Cell[189823, 5043, 215, 3, 54, "Output",ExpressionUUID->"3a711fed-f6fd-4382-ad66-a53a97cc403d"] }, Open ]], Cell[CellGroupData[{ -Cell[187547, 5149, 6055, 185, 616, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[193605, 5336, 172, 3, 54, "Output",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[190075, 5051, 177, 4, 70, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], +Cell[190255, 5057, 213, 3, 54, "Output",ExpressionUUID->"95c8df18-9016-4b0b-b692-cf7ae4f540f7"] }, Open ]], Cell[CellGroupData[{ -Cell[193814, 5344, 368, 9, 68, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[194185, 5355, 171, 3, 54, "Output",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[190505, 5065, 177, 4, 70, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], +Cell[190685, 5071, 216, 3, 54, "Output",ExpressionUUID->"e9faef51-30e1-4df1-a4d5-975d37d71d68"] }, Open ]], Cell[CellGroupData[{ -Cell[194393, 5363, 6122, 187, 701, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[200518, 5552, 173, 3, 54, "Output",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[190938, 5079, 6051, 184, 1468, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], +Cell[196992, 5265, 218, 3, 54, "Output",ExpressionUUID->"c3efbbfa-4221-48a0-86b1-06a07b366cce"] }, Open ]], Cell[CellGroupData[{ -Cell[200728, 5560, 368, 9, 68, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[201099, 5571, 170, 3, 54, "Output",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[197247, 5273, 364, 8, 68, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], +Cell[197614, 5283, 218, 3, 54, "Output",ExpressionUUID->"ea49373d-3420-4980-bd98-b5fa4328eb16"] }, Open ]], Cell[CellGroupData[{ -Cell[201306, 5579, 2663, 88, 266, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[203972, 5669, 171, 3, 54, "Output",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[197869, 5291, 6118, 186, 1468, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], +Cell[203990, 5479, 217, 3, 54, "Output",ExpressionUUID->"d96cdbca-31fe-408f-9e87-ce79690edc50"] }, Open ]], Cell[CellGroupData[{ -Cell[204180, 5677, 2603, 85, 266, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[206786, 5764, 173, 3, 54, "Output",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[204244, 5487, 364, 8, 68, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], +Cell[204611, 5497, 215, 3, 54, "Output",ExpressionUUID->"fc35f1eb-e338-48e4-97ca-d75544d2ac20"] }, Open ]], Cell[CellGroupData[{ -Cell[206996, 5772, 3712, 118, 393, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[210711, 5892, 174, 3, 54, "Output",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[204863, 5505, 2659, 87, 670, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], +Cell[207525, 5594, 217, 3, 54, "Output",ExpressionUUID->"a4416f3b-093c-4b91-b500-fb9fe819cb7c"] }, Open ]], -Cell[210900, 5898, 138, 3, 47, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ -Cell[211063, 5905, 2054, 59, 242, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], -Cell[213120, 5966, 557, 12, 66, "Message",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], -Cell[213680, 5980, 559, 12, 94, "Message",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], -Cell[214242, 5994, 561, 12, 94, "Message",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], -Cell[214806, 6008, 458, 10, 34, "Message",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], -Cell[215267, 6020, 172, 3, 54, "Output",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[207779, 5602, 2599, 84, 602, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], +Cell[210381, 5688, 218, 3, 54, "Output",ExpressionUUID->"728726ac-4170-4f4e-8248-cded33db81aa"] }, Open ]], Cell[CellGroupData[{ -Cell[215476, 6028, 2052, 59, 242, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], -Cell[217531, 6089, 555, 12, 66, "Message",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], -Cell[218089, 6103, 559, 12, 94, "Message",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], -Cell[218651, 6117, 561, 12, 94, "Message",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], -Cell[219215, 6131, 458, 10, 34, "Message",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], -Cell[219676, 6143, 172, 3, 54, "Output",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[210636, 5696, 3708, 117, 842, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], +Cell[214347, 5815, 219, 3, 54, "Output",ExpressionUUID->"bcb7a0e3-32aa-45fd-adba-a7e2fa5ea6fd"] }, Open ]], +Cell[214581, 5821, 160, 3, 109, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ -Cell[219885, 6151, 1936, 53, 81, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], -Cell[221824, 6206, 20440, 382, 384, "Output",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] +Cell[214766, 5828, 2099, 59, 481, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], +Cell[216868, 5889, 655, 14, 156, "Message",ExpressionUUID->"61df7561-f34f-4042-8b2a-16d8d9a3ab0e"], +Cell[217526, 5905, 655, 14, 156, "Message",ExpressionUUID->"6a699953-9724-491a-adad-820a25548df3"], +Cell[218184, 5921, 656, 14, 156, "Message",ExpressionUUID->"26d2ed1f-8a32-4920-aca4-85f716e900d2"], +Cell[218843, 5937, 519, 12, 70, "Message",ExpressionUUID->"6a83912c-1841-4384-a1fa-3930920a74ae"], +Cell[219365, 5951, 217, 3, 54, "Output",ExpressionUUID->"f309818c-f6b6-4f9c-8727-cbb317b4b7be"] }, Open ]], Cell[CellGroupData[{ -Cell[242301, 6593, 2094, 60, 237, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], -Cell[244398, 6655, 500, 11, 64, "Message",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], -Cell[244901, 6668, 503, 11, 64, "Message",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], -Cell[245407, 6681, 506, 11, 66, "Message",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], -Cell[245916, 6694, 455, 10, 34, "Message",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], -Cell[246374, 6706, 57321, 985, 378, "Output",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] +Cell[219619, 5959, 2097, 59, 481, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], +Cell[221719, 6020, 655, 14, 156, "Message",ExpressionUUID->"eac846ff-7646-4a85-ab74-4ceae3ccd53b"], +Cell[222377, 6036, 657, 14, 156, "Message",ExpressionUUID->"accd1d0e-5ac1-4ac0-b9e9-c8659084c97f"], +Cell[223037, 6052, 656, 14, 156, "Message",ExpressionUUID->"4fd217ec-550a-427f-8e3e-7eeb63da3b67"], +Cell[223696, 6068, 519, 12, 70, "Message",ExpressionUUID->"08c735e0-31c7-4afe-a7f8-35a28e6048aa"], +Cell[224218, 6082, 214, 3, 54, "Output",ExpressionUUID->"7d93974c-e5c4-48ce-8f1a-aa0c46902ce9"] }, Open ]], -Cell[303710, 7694, 2454, 69, 212, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], -Cell[306167, 7765, 209, 5, 47, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], Cell[CellGroupData[{ -Cell[306401, 7774, 217, 7, 78, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], -Cell[306621, 7783, 172, 3, 54, "Output",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] +Cell[224469, 6090, 2047, 54, 369, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], +Cell[226519, 6146, 20428, 383, 332, "Output",ExpressionUUID->"1926143a-73e9-491b-99f9-5813825b95d0"] }, Open ]], Cell[CellGroupData[{ -Cell[306830, 7791, 1816, 53, 148, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], -Cell[308649, 7846, 508, 11, 94, "Message",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], -Cell[309160, 7859, 508, 11, 94, "Message",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], -Cell[309671, 7872, 511, 11, 94, "Message",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], -Cell[310185, 7885, 456, 10, 34, "Message",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], -Cell[310644, 7897, 26000, 472, 378, "Output",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] +Cell[246984, 6534, 2140, 60, 535, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], +Cell[249127, 6596, 562, 13, 161, "Message",ExpressionUUID->"9a1d098e-19b8-4044-a9fe-9fae6199dc16"], +Cell[249692, 6611, 565, 13, 129, "Message",ExpressionUUID->"a6526d2f-18f0-4c44-8e08-ff1b4ee671b5"], +Cell[250260, 6626, 571, 13, 129, "Message",ExpressionUUID->"a851fa23-f98a-47d5-ba78-0de0f0dacdf1"], +Cell[250834, 6641, 520, 12, 70, "Message",ExpressionUUID->"a53543d4-c88b-485f-a374-ea4218c23cbb"], +Cell[251357, 6655, 25102, 459, 325, "Output",ExpressionUUID->"189d2b45-6583-43ee-b415-fb692c62b6bf"] }, Open ]], Cell[CellGroupData[{ -Cell[336681, 8374, 1616, 48, 110, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], -Cell[338300, 8424, 584, 12, 94, "Message",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], -Cell[338887, 8438, 588, 12, 94, "Message",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], -Cell[339478, 8452, 592, 12, 94, "Message",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], -Cell[340073, 8466, 456, 10, 34, "Message",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], -Cell[340532, 8478, 169, 3, 54, "Output",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] +Cell[276496, 7119, 2476, 69, 542, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], +Cell[278975, 7190, 9513, 222, 334, "Output",ExpressionUUID->"c83d94d0-1179-40b1-8090-e38b74017f34"] }, Open ]], Cell[CellGroupData[{ -Cell[340738, 8486, 2249, 64, 242, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], -Cell[342990, 8552, 555, 12, 94, "Message",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], -Cell[343548, 8566, 557, 12, 94, "Message",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], -Cell[344108, 8580, 563, 12, 94, "Message",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], -Cell[344674, 8594, 458, 10, 34, "Message",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], -Cell[345135, 8606, 173, 3, 54, "Output",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] +Cell[288525, 7417, 228, 4, 47, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], +Cell[288756, 7423, 31460, 590, 325, "Output",ExpressionUUID->"a0e0ed29-1344-4254-88a0-4a7b388aad11"] }, Open ]], Cell[CellGroupData[{ -Cell[345345, 8614, 2223, 64, 242, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], -Cell[347571, 8680, 555, 12, 94, "Message",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], -Cell[348129, 8694, 557, 12, 94, "Message",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], -Cell[348689, 8708, 561, 12, 94, "Message",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], -Cell[349253, 8722, 458, 10, 34, "Message",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], -Cell[349714, 8734, 173, 3, 54, "Output",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] +Cell[320253, 8018, 236, 6, 78, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], +Cell[320492, 8026, 217, 3, 54, "Output",ExpressionUUID->"b73557f5-64b5-4010-84d3-d68672c247d8"] }, Open ]], Cell[CellGroupData[{ -Cell[349924, 8742, 2221, 64, 242, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], -Cell[352148, 8808, 557, 12, 94, "Message",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], -Cell[352708, 8822, 557, 12, 94, "Message",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], -Cell[353268, 8836, 563, 12, 94, "Message",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], -Cell[353834, 8850, 456, 10, 34, "Message",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], -Cell[354293, 8862, 173, 3, 54, "Output",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] +Cell[320746, 8034, 1861, 53, 568, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], +Cell[322610, 8089, 662, 15, 156, "Message",ExpressionUUID->"27c217b2-f19d-4a04-b144-554cd48e698f"], +Cell[323275, 8106, 662, 15, 156, "Message",ExpressionUUID->"4a872e93-d5aa-4985-b7ba-f3e3057029b8"], +Cell[323940, 8123, 663, 15, 156, "Message",ExpressionUUID->"c18f036c-fb66-4dd2-915e-d969a985a36f"], +Cell[324606, 8140, 520, 12, 70, "Message",ExpressionUUID->"0802319c-1ce3-4a50-99ca-6aeaf587869f"], +Cell[325129, 8154, 25580, 468, 332, "Output",ExpressionUUID->"63ec497a-e770-42fc-9068-569ac932acc6"] }, Open ]], Cell[CellGroupData[{ -Cell[354503, 8870, 213, 6, 76, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], -Cell[354719, 8878, 171, 3, 54, "Output",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] +Cell[350746, 8627, 1648, 50, 318, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], +Cell[352397, 8679, 661, 15, 156, "Message",ExpressionUUID->"77be0bbd-9b58-4958-bfbe-dd43f0577e12"], +Cell[353061, 8696, 662, 15, 156, "Message",ExpressionUUID->"c6248bc8-b470-4557-b47a-1689fe3a0ed8"], +Cell[353726, 8713, 661, 15, 156, "Message",ExpressionUUID->"c0a31a57-9696-4b89-aa55-adaddfd8ad1b"], +Cell[354390, 8730, 520, 12, 70, "Message",ExpressionUUID->"c4561d42-4ff2-4aba-a33a-3b5d9aa4475f"], +Cell[354913, 8744, 219, 4, 54, "Output",ExpressionUUID->"6515c09b-d418-49a7-9a77-1c7b1c46f53e"] }, Open ]], -Cell[354905, 8884, 245, 5, 47, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ -Cell[355175, 8893, 558, 19, 85, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[355736, 8914, 172, 3, 54, "Output",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] +Cell[355169, 8753, 2272, 64, 580, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], +Cell[357444, 8819, 656, 14, 156, "Message",ExpressionUUID->"067340db-f9ae-4227-86fb-a54792085ef7"], +Cell[358103, 8835, 656, 14, 156, "Message",ExpressionUUID->"a0549f43-26e5-4d24-8d31-e20c83598654"], +Cell[358762, 8851, 657, 14, 156, "Message",ExpressionUUID->"c0f291ca-a47d-497b-ab08-45e00b3552eb"], +Cell[359422, 8867, 518, 12, 70, "Message",ExpressionUUID->"32c1fa4a-3c31-4e90-93fd-dc9f8b36c5f3"], +Cell[359943, 8881, 220, 4, 54, "Output",ExpressionUUID->"dd506d0d-9c11-4cd2-a220-662623badff4"] }, Open ]], Cell[CellGroupData[{ -Cell[355945, 8922, 170, 5, 91, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[356118, 8929, 173, 3, 54, "Output",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] +Cell[360200, 8890, 2235, 63, 580, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], +Cell[362438, 8955, 656, 14, 156, "Message",ExpressionUUID->"3048226b-b2bc-4d0e-ab11-a253d1afd2ba"], +Cell[363097, 8971, 656, 14, 156, "Message",ExpressionUUID->"353bd4d4-4467-4149-8683-6dc632210fb3"], +Cell[363756, 8987, 657, 14, 156, "Message",ExpressionUUID->"2c4b1375-c963-47db-b34f-2a98cd41e870"], +Cell[364416, 9003, 518, 12, 70, "Message",ExpressionUUID->"ec201e9d-901e-4cd2-a6fb-1c2c432a4d07"], +Cell[364937, 9017, 218, 4, 54, "Output",ExpressionUUID->"8b5de6ad-f2e3-40fb-ae7f-dfa7355749ba"] }, Open ]], Cell[CellGroupData[{ -Cell[356328, 8937, 181, 5, 70, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[356512, 8944, 173, 3, 54, "Output",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] +Cell[365192, 9026, 2233, 63, 580, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], +Cell[367428, 9091, 660, 14, 156, "Message",ExpressionUUID->"d9848180-f08c-413f-863b-af78c5f91f1e"], +Cell[368091, 9107, 658, 14, 156, "Message",ExpressionUUID->"d266e307-6bbd-4f4e-8599-42259383e153"], +Cell[368752, 9123, 659, 14, 156, "Message",ExpressionUUID->"629f1cca-935d-46d8-93d4-77cdf19f5364"], +Cell[369414, 9139, 522, 12, 70, "Message",ExpressionUUID->"0defc132-b5f3-4276-82bc-554e89a36feb"], +Cell[369939, 9153, 219, 4, 54, "Output",ExpressionUUID->"d49d7e28-7f9e-487c-a651-e1709aebcafe"] }, Open ]], Cell[CellGroupData[{ -Cell[356722, 8952, 6055, 185, 616, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[362780, 9139, 172, 3, 54, "Output",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] +Cell[370195, 9162, 236, 6, 76, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], +Cell[370434, 9170, 220, 4, 54, "Output",ExpressionUUID->"b6cf19f2-deef-4be6-9c7f-9d6e42f120d0"] }, Open ]], +Cell[370669, 9177, 271, 6, 109, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ -Cell[362989, 9147, 368, 9, 68, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[363360, 9158, 170, 3, 54, "Output",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] +Cell[370965, 9187, 558, 19, 85, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], +Cell[371526, 9208, 219, 4, 54, "Output",ExpressionUUID->"c9064303-8d2e-47db-bb55-23e68caf9001"] }, Open ]], Cell[CellGroupData[{ -Cell[363567, 9166, 6122, 187, 701, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[369692, 9355, 175, 3, 54, "Output",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] +Cell[371782, 9217, 170, 5, 91, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], +Cell[371955, 9224, 220, 4, 54, "Output",ExpressionUUID->"805ca5fd-29cd-4e83-a43a-427be4a2cb1a"] }, Open ]], Cell[CellGroupData[{ -Cell[369904, 9363, 368, 9, 68, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[370275, 9374, 172, 3, 54, "Output",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] +Cell[372212, 9233, 181, 5, 70, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], +Cell[372396, 9240, 220, 4, 54, "Output",ExpressionUUID->"6ef9402a-0fe9-4a76-a7f2-12034969d2f3"] }, Open ]], Cell[CellGroupData[{ -Cell[370484, 9382, 2663, 88, 266, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[373150, 9472, 173, 3, 54, "Output",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] +Cell[372653, 9249, 6055, 185, 1468, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], +Cell[378711, 9436, 219, 4, 54, "Output",ExpressionUUID->"96063af1-2a06-4ec2-80b5-80e29eb6a0d0"] }, Open ]], Cell[CellGroupData[{ -Cell[373360, 9480, 2603, 85, 266, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[375966, 9567, 171, 3, 54, "Output",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] +Cell[378967, 9445, 368, 9, 68, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], +Cell[379338, 9456, 219, 4, 54, "Output",ExpressionUUID->"ddc53373-c92f-4cdb-8a2d-cda8d4117a14"] }, Open ]], Cell[CellGroupData[{ -Cell[376174, 9575, 3712, 118, 393, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[379889, 9695, 174, 3, 54, "Output",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] +Cell[379594, 9465, 6122, 187, 1468, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], +Cell[385719, 9654, 222, 4, 54, "Output",ExpressionUUID->"aa91f4e6-d5c7-4ad2-9593-9303c217f787"] }, Open ]], Cell[CellGroupData[{ -Cell[380100, 9703, 2052, 59, 148, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], -Cell[382155, 9764, 578, 12, 94, "Message",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], -Cell[382736, 9778, 583, 12, 94, "Message",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], -Cell[383322, 9792, 586, 12, 94, "Message",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], -Cell[383911, 9806, 456, 10, 34, "Message",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], -Cell[384370, 9818, 170, 3, 54, "Output",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] +Cell[385978, 9663, 368, 9, 68, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], +Cell[386349, 9674, 220, 4, 54, "Output",ExpressionUUID->"ebf9d528-7d14-4375-8fa4-32d210eacbc7"] }, Open ]], Cell[CellGroupData[{ -Cell[384577, 9826, 2054, 59, 148, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], -Cell[386634, 9887, 576, 12, 94, "Message",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], -Cell[387213, 9901, 581, 12, 94, "Message",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], -Cell[387797, 9915, 586, 12, 94, "Message",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], -Cell[388386, 9929, 458, 10, 34, "Message",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], -Cell[388847, 9941, 172, 3, 54, "Output",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] +Cell[386606, 9683, 2663, 88, 670, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], +Cell[389272, 9773, 223, 4, 54, "Output",ExpressionUUID->"f12dfc02-e436-49ae-ad34-4a45383fb1e5"] }, Open ]], Cell[CellGroupData[{ -Cell[389056, 9949, 2028, 55, 81, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], -Cell[391087, 10006, 20011, 378, 385, "Output",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] +Cell[389532, 9782, 2603, 85, 602, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], +Cell[392138, 9869, 220, 4, 54, "Output",ExpressionUUID->"20ea6562-93dd-45fb-adb6-577bdde7c6db"] }, Open ]], Cell[CellGroupData[{ -Cell[411135, 10389, 2115, 60, 204, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], -Cell[413253, 10451, 501, 11, 64, "Message",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], -Cell[413757, 10464, 503, 11, 64, "Message",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], -Cell[414263, 10477, 505, 11, 94, "Message",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], -Cell[414771, 10490, 456, 10, 34, "Message",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], -Cell[415230, 10502, 32548, 580, 378, "Output",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] +Cell[392395, 9878, 3712, 118, 842, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], +Cell[396110, 9998, 223, 4, 54, "Output",ExpressionUUID->"de71cf29-2c39-4dc7-a483-6c7364a784b8"] }, Open ]], -Cell[447793, 11085, 209, 5, 47, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], Cell[CellGroupData[{ -Cell[448027, 11094, 1616, 48, 110, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], -Cell[449646, 11144, 596, 12, 94, "Message",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], -Cell[450245, 11158, 599, 12, 94, "Message",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], -Cell[450847, 11172, 605, 12, 94, "Message",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], -Cell[451455, 11186, 456, 10, 34, "Message",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], -Cell[451914, 11198, 170, 3, 54, "Output",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] +Cell[396370, 10007, 2101, 60, 481, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], +Cell[398474, 10069, 658, 14, 156, "Message",ExpressionUUID->"b05a660a-8058-48ef-af22-47d9cf93ec5c"], +Cell[399135, 10085, 658, 14, 156, "Message",ExpressionUUID->"eca2be43-837d-4fca-a45c-0073460384eb"], +Cell[399796, 10101, 659, 14, 156, "Message",ExpressionUUID->"ae1e1fb5-a769-4ee5-ba5e-adc4681c7fbb"], +Cell[400458, 10117, 522, 12, 70, "Message",ExpressionUUID->"ebc8bdc2-2283-4c2c-91cb-b7fecf0863a5"], +Cell[400983, 10131, 217, 4, 54, "Output",ExpressionUUID->"0a7b2d42-a80e-49c8-b980-b0f9b0305ee8"] }, Open ]], Cell[CellGroupData[{ -Cell[452121, 11206, 2247, 64, 242, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], -Cell[454371, 11272, 580, 12, 94, "Message",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], -Cell[454954, 11286, 583, 12, 94, "Message",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], -Cell[455540, 11300, 584, 12, 94, "Message",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], -Cell[456127, 11314, 458, 10, 34, "Message",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], -Cell[456588, 11326, 170, 3, 54, "Output",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] +Cell[401237, 10140, 2103, 60, 481, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], +Cell[403343, 10202, 654, 14, 156, "Message",ExpressionUUID->"1a390d05-423e-45dd-b39a-d87a9925a8f4"], +Cell[404000, 10218, 655, 14, 156, "Message",ExpressionUUID->"517313ec-bffd-4d84-b727-862e1ba4f9d2"], +Cell[404658, 10234, 657, 14, 156, "Message",ExpressionUUID->"96ffe6b3-c505-4dfe-9b7f-dd12eb3de5bb"], +Cell[405318, 10250, 516, 12, 70, "Message",ExpressionUUID->"2bbf46ae-00a1-4582-b9dc-b75a8f5b5ce4"], +Cell[405837, 10264, 220, 4, 54, "Output",ExpressionUUID->"bcf495ac-3a0a-4b10-ac92-2cb78f3c9423"] }, Open ]], Cell[CellGroupData[{ -Cell[456795, 11334, 2219, 64, 242, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], -Cell[459017, 11400, 580, 12, 94, "Message",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], -Cell[459600, 11414, 583, 12, 94, "Message",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], -Cell[460186, 11428, 586, 12, 94, "Message",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], -Cell[460775, 11442, 458, 10, 34, "Message",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], -Cell[461236, 11454, 171, 3, 54, "Output",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] +Cell[406094, 10273, 2051, 55, 369, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], +Cell[408148, 10330, 20298, 383, 339, "Output",ExpressionUUID->"adf9b589-a188-434b-ab46-c6557086e35a"] }, Open ]], Cell[CellGroupData[{ -Cell[461444, 11462, 2221, 64, 242, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], -Cell[463668, 11528, 580, 12, 94, "Message",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], -Cell[464251, 11542, 583, 12, 94, "Message",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], -Cell[464837, 11556, 584, 12, 94, "Message",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], -Cell[465424, 11570, 456, 10, 34, "Message",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], -Cell[465883, 11582, 170, 3, 54, "Output",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] +Cell[428483, 10718, 2165, 61, 535, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], +Cell[430651, 10781, 542, 12, 161, "Message",ExpressionUUID->"f6e283bf-40cb-4521-86e5-bb6ebb3d8c97"], +Cell[431196, 10795, 543, 12, 129, "Message",ExpressionUUID->"03a8a8ab-58f6-4431-9cbd-c0d8572cd396"], +Cell[431742, 10809, 546, 12, 129, "Message",ExpressionUUID->"a626864d-0f26-4973-9752-9f30e28c6515"], +Cell[432291, 10823, 495, 11, 70, "Message",ExpressionUUID->"91ab20b8-0831-48c4-b50d-daea52b9eca1"], +Cell[432789, 10836, 25655, 468, 330, "Output",ExpressionUUID->"b9b9f85d-5a76-4912-a213-faec154fe04f"] }, Open ]], Cell[CellGroupData[{ -Cell[466090, 11590, 213, 6, 76, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], -Cell[466306, 11598, 174, 3, 54, "Output",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] +Cell[458481, 11309, 232, 5, 47, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], +Cell[458716, 11316, 32014, 600, 330, "Output",ExpressionUUID->"0ad2cd91-71ce-4b6c-a8c0-cfd07ed402a7"] }, Open ]], -Cell[466495, 11604, 247, 5, 47, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ -Cell[466767, 11613, 558, 19, 85, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[467328, 11634, 173, 3, 54, "Output",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] +Cell[490767, 11921, 1648, 50, 226, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], +Cell[492418, 11973, 636, 14, 156, "Message",ExpressionUUID->"cd0578ef-3e6a-44ac-ac8d-3e0543c38c10"], +Cell[493057, 11989, 634, 14, 156, "Message",ExpressionUUID->"188d0c6e-8a0b-4928-a4ea-ab86795146af"], +Cell[493694, 12005, 638, 14, 156, "Message",ExpressionUUID->"5bc14025-ca44-47dd-8219-39084507b405"], +Cell[494335, 12021, 493, 11, 70, "Message",ExpressionUUID->"b46ced62-cbe2-4b8b-88fa-aae253810f7f"], +Cell[494831, 12034, 192, 3, 54, "Output",ExpressionUUID->"93df9199-d664-45aa-8645-7d5b76c7e912"] }, Open ]], Cell[CellGroupData[{ -Cell[467538, 11642, 170, 5, 91, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[467711, 11649, 173, 3, 54, "Output",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] +Cell[495060, 12042, 2270, 64, 580, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], +Cell[497333, 12108, 633, 13, 156, "Message",ExpressionUUID->"057bee9c-a133-4678-ad71-7fbe12753730"], +Cell[497969, 12123, 633, 13, 156, "Message",ExpressionUUID->"fdf553d1-9fc4-44cf-99cd-3ebaf5baa91e"], +Cell[498605, 12138, 634, 13, 156, "Message",ExpressionUUID->"f1975fde-ef30-4523-9bc4-f6f9a4cd6a2b"], +Cell[499242, 12153, 494, 11, 70, "Message",ExpressionUUID->"bf8de1a3-c82e-412a-abff-5a6ef36ea5b7"], +Cell[499739, 12166, 194, 3, 54, "Output",ExpressionUUID->"340f132c-ef2a-4e01-8948-f0f200f75f6a"] }, Open ]], Cell[CellGroupData[{ -Cell[467921, 11657, 181, 5, 70, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[468105, 11664, 171, 3, 54, "Output",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] +Cell[499970, 12174, 2231, 63, 580, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], +Cell[502204, 12239, 633, 13, 156, "Message",ExpressionUUID->"2452e00e-dc45-4100-b87c-95b82eef6255"], +Cell[502840, 12254, 634, 13, 156, "Message",ExpressionUUID->"101d3eef-436f-49ff-bb32-26b82861823c"], +Cell[503477, 12269, 634, 13, 156, "Message",ExpressionUUID->"87849aee-edd9-4b22-a38f-3b40b40baad5"], +Cell[504114, 12284, 494, 11, 70, "Message",ExpressionUUID->"94d4c3f4-1e12-4b10-8150-cd97b1dcbeaa"], +Cell[504611, 12297, 193, 3, 54, "Output",ExpressionUUID->"0eb970c6-b7f9-4bf8-8acf-d683dd2600c8"] }, Open ]], Cell[CellGroupData[{ -Cell[468313, 11672, 6055, 185, 616, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[474371, 11859, 173, 3, 54, "Output",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] +Cell[504841, 12305, 2233, 63, 580, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], +Cell[507077, 12370, 633, 13, 156, "Message",ExpressionUUID->"48b72dd3-9e8f-4572-8ec9-6c308e4e16ff"], +Cell[507713, 12385, 636, 13, 156, "Message",ExpressionUUID->"32fe2456-7488-4755-ac4f-c899b98e9a6a"], +Cell[508352, 12400, 636, 13, 156, "Message",ExpressionUUID->"c7a858b5-72fd-43df-a00b-decd9bbcd7ae"], +Cell[508991, 12415, 497, 11, 70, "Message",ExpressionUUID->"45a8380f-0b7f-4be6-8da6-24e7f28a125e"], +Cell[509491, 12428, 193, 3, 54, "Output",ExpressionUUID->"617568b4-7132-4b97-b9c3-6a9ddab93437"] }, Open ]], Cell[CellGroupData[{ -Cell[474581, 11867, 368, 9, 68, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[474952, 11878, 172, 3, 54, "Output",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] +Cell[509721, 12436, 236, 6, 76, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], +Cell[509960, 12444, 196, 3, 54, "Output",ExpressionUUID->"59a08c76-b0f1-43c5-b76b-5593b629aea4"] }, Open ]], +Cell[510171, 12450, 273, 6, 109, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ -Cell[475161, 11886, 6122, 187, 701, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[481286, 12075, 175, 3, 54, "Output",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] +Cell[510469, 12460, 558, 19, 85, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], +Cell[511030, 12481, 195, 3, 54, "Output",ExpressionUUID->"ea4baf58-9255-464e-98b6-2003939ef946"] }, Open ]], Cell[CellGroupData[{ -Cell[481498, 12083, 368, 9, 68, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[481869, 12094, 171, 3, 54, "Output",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] +Cell[511262, 12489, 170, 5, 91, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], +Cell[511435, 12496, 194, 3, 54, "Output",ExpressionUUID->"49aad16a-9307-4d38-b515-7483a4c7e504"] }, Open ]], Cell[CellGroupData[{ -Cell[482077, 12102, 2663, 88, 266, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[484743, 12192, 173, 3, 54, "Output",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] +Cell[511666, 12504, 181, 5, 70, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], +Cell[511850, 12511, 192, 3, 54, "Output",ExpressionUUID->"1813489d-c270-43b7-8848-04b9ab2b5a0e"] }, Open ]], Cell[CellGroupData[{ -Cell[484953, 12200, 2603, 85, 266, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[487559, 12287, 171, 3, 54, "Output",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] +Cell[512079, 12519, 6055, 185, 1468, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], +Cell[518137, 12706, 197, 3, 54, "Output",ExpressionUUID->"c450a7cb-b363-411d-b242-8592206389fa"] }, Open ]], Cell[CellGroupData[{ -Cell[487767, 12295, 3712, 118, 393, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[491482, 12415, 174, 3, 54, "Output",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] +Cell[518371, 12714, 368, 9, 68, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], +Cell[518742, 12725, 195, 3, 54, "Output",ExpressionUUID->"803b8b73-ed0a-4570-8955-ae9a64c71809"] }, Open ]], Cell[CellGroupData[{ -Cell[491693, 12423, 2054, 59, 148, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], -Cell[493750, 12484, 572, 12, 94, "Message",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], -Cell[494325, 12498, 573, 12, 125, "Message",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], -Cell[494901, 12512, 579, 12, 94, "Message",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], -Cell[495483, 12526, 456, 10, 34, "Message",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], -Cell[495942, 12538, 169, 3, 54, "Output",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] +Cell[518974, 12733, 6122, 187, 1468, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], +Cell[525099, 12922, 199, 3, 54, "Output",ExpressionUUID->"04a919cf-10ff-489c-9d68-da01f1905824"] }, Open ]], Cell[CellGroupData[{ -Cell[496148, 12546, 2049, 58, 148, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], -Cell[498200, 12606, 570, 12, 94, "Message",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], -Cell[498773, 12620, 575, 12, 125, "Message",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], -Cell[499351, 12634, 579, 12, 94, "Message",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], -Cell[499933, 12648, 458, 10, 34, "Message",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], -Cell[500394, 12660, 171, 3, 54, "Output",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] +Cell[525335, 12930, 368, 9, 68, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], +Cell[525706, 12941, 192, 3, 54, "Output",ExpressionUUID->"1b442133-f9e3-42df-acff-8deb0258b576"] }, Open ]], Cell[CellGroupData[{ -Cell[500602, 12668, 2030, 55, 81, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], -Cell[502635, 12725, 20011, 378, 384, "Output",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] +Cell[525935, 12949, 2663, 88, 670, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], +Cell[528601, 13039, 196, 3, 54, "Output",ExpressionUUID->"1e08ba51-2ffa-453e-8ac5-e4889145c990"] }, Open ]], Cell[CellGroupData[{ -Cell[522683, 13108, 2120, 60, 204, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], -Cell[524806, 13170, 501, 11, 64, "Message",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], -Cell[525310, 13183, 505, 11, 64, "Message",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], -Cell[525818, 13196, 506, 11, 94, "Message",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], -Cell[526327, 13209, 456, 10, 34, "Message",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], -Cell[526786, 13221, 31008, 556, 378, "Output",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] +Cell[528834, 13047, 2603, 85, 602, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], +Cell[531440, 13134, 193, 3, 54, "Output",ExpressionUUID->"1325d04a-c6aa-46bd-aa99-63eda158e037"] }, Open ]], -Cell[557809, 13780, 209, 5, 47, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], Cell[CellGroupData[{ -Cell[558043, 13789, 1616, 48, 110, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], -Cell[559662, 13839, 593, 12, 94, "Message",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], -Cell[560258, 13853, 595, 12, 94, "Message",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], -Cell[560856, 13867, 602, 12, 94, "Message",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], -Cell[561461, 13881, 456, 10, 34, "Message",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], -Cell[561920, 13893, 172, 3, 54, "Output",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] +Cell[531670, 13142, 3712, 118, 842, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], +Cell[535385, 13262, 198, 3, 54, "Output",ExpressionUUID->"33f0c030-20f2-41b6-99ee-2a7bc2b43ec8"] }, Open ]], Cell[CellGroupData[{ -Cell[562129, 13901, 2249, 64, 242, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], -Cell[564381, 13967, 572, 12, 94, "Message",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], -Cell[564956, 13981, 575, 12, 125, "Message",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], -Cell[565534, 13995, 579, 12, 94, "Message",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], -Cell[566116, 14009, 458, 10, 34, "Message",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], -Cell[566577, 14021, 173, 3, 54, "Output",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] +Cell[535620, 13270, 2103, 60, 481, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], +Cell[537726, 13332, 635, 13, 156, "Message",ExpressionUUID->"8b84ad5d-6eb0-4ff2-83a4-df68b8b937ac"], +Cell[538364, 13347, 633, 13, 156, "Message",ExpressionUUID->"19f01eb4-e412-449e-894d-57aab7ee4b65"], +Cell[539000, 13362, 633, 13, 156, "Message",ExpressionUUID->"99a8eb7c-ebdf-4457-999d-0267525a9c15"], +Cell[539636, 13377, 495, 11, 70, "Message",ExpressionUUID->"67625eb0-b66c-4c38-aead-632714f9f29f"], +Cell[540134, 13390, 193, 3, 54, "Output",ExpressionUUID->"b32afb3a-3e19-4cac-9441-07b807f398d9"] }, Open ]], Cell[CellGroupData[{ -Cell[566787, 14029, 2221, 64, 242, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], -Cell[569011, 14095, 572, 12, 94, "Message",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], -Cell[569586, 14109, 575, 12, 125, "Message",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], -Cell[570164, 14123, 577, 12, 94, "Message",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], -Cell[570744, 14137, 456, 10, 34, "Message",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], -Cell[571203, 14149, 172, 3, 54, "Output",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] +Cell[540364, 13398, 2100, 60, 481, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], +Cell[542467, 13460, 631, 13, 156, "Message",ExpressionUUID->"79598bce-8654-4d57-bec4-2e2c3f734614"], +Cell[543101, 13475, 631, 13, 156, "Message",ExpressionUUID->"84d50ccd-7edf-465b-b89a-33199761648a"], +Cell[543735, 13490, 630, 13, 156, "Message",ExpressionUUID->"e3a5961e-9dc9-4d37-9b19-c7ada9681f96"], +Cell[544368, 13505, 493, 11, 70, "Message",ExpressionUUID->"1687662e-7a11-471f-8a0f-5012e5a781cf"], +Cell[544864, 13518, 193, 3, 54, "Output",ExpressionUUID->"7c797729-17d3-4a23-a660-258b6ccc2768"] }, Open ]], Cell[CellGroupData[{ -Cell[571412, 14157, 2223, 64, 242, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], -Cell[573638, 14223, 572, 12, 94, "Message",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], -Cell[574213, 14237, 573, 12, 125, "Message",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], -Cell[574789, 14251, 579, 12, 94, "Message",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], -Cell[575371, 14265, 456, 10, 34, "Message",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], -Cell[575830, 14277, 173, 3, 54, "Output",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] +Cell[545094, 13526, 2053, 55, 369, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], +Cell[547150, 13583, 20359, 383, 332, "Output",ExpressionUUID->"725b9b35-0a3f-4997-9fe9-13466a8ffafb"] }, Open ]], Cell[CellGroupData[{ -Cell[576040, 14285, 215, 6, 76, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], -Cell[576258, 14293, 174, 3, 54, "Output",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] +Cell[567546, 13971, 2170, 61, 535, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], +Cell[569719, 14034, 540, 12, 161, "Message",ExpressionUUID->"6e64fa75-68ea-470f-b8a5-c79ab555d8d3"], +Cell[570262, 14048, 540, 12, 129, "Message",ExpressionUUID->"c0487d70-e962-40b8-b70f-edfcc26c45ab"], +Cell[570805, 14062, 545, 12, 129, "Message",ExpressionUUID->"02798b95-ff38-480a-b78c-322a5cf3c45b"], +Cell[571353, 14076, 493, 11, 70, "Message",ExpressionUUID->"d22d735b-aee8-4842-9a7c-5724d55eee0b"], +Cell[571849, 14089, 25669, 468, 325, "Output",ExpressionUUID->"e44afbc3-66e8-483f-af9b-88e6c3ab4248"] }, Open ]], -Cell[576447, 14299, 188, 4, 47, "Input",ExpressionUUID->"a3c9312c-d52b-429d-a073-e8b0adec4a09"] +Cell[CellGroupData[{ +Cell[597555, 14562, 232, 5, 47, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], +Cell[597790, 14569, 32029, 600, 325, "Output",ExpressionUUID->"7beeb090-902a-4bb9-9813-3f4e5b3b8797"] +}, Open ]], +Cell[CellGroupData[{ +Cell[629856, 15174, 1648, 50, 226, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], +Cell[631507, 15226, 638, 14, 156, "Message",ExpressionUUID->"c7c9c1da-a0b6-498c-b277-8d85c6ba79e5"], +Cell[632148, 15242, 636, 14, 156, "Message",ExpressionUUID->"ebb540fc-92b6-4335-88e1-046955f70476"], +Cell[632787, 15258, 635, 14, 156, "Message",ExpressionUUID->"e5e48dee-fc89-49e0-9b70-7d2b5efbcb54"], +Cell[633425, 15274, 492, 11, 70, "Message",ExpressionUUID->"8987ba46-c523-493c-aca6-6df65b2d0664"], +Cell[633920, 15287, 194, 3, 54, "Output",ExpressionUUID->"4b8ad428-3f62-475f-9f59-024df465e14d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[634151, 15295, 2272, 64, 580, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], +Cell[636426, 15361, 633, 13, 156, "Message",ExpressionUUID->"c3aea160-54cb-4b95-8e95-8b99e2161037"], +Cell[637062, 15376, 633, 13, 156, "Message",ExpressionUUID->"be72122e-1d9c-4158-9f81-d93ab4ef0367"], +Cell[637698, 15391, 633, 13, 156, "Message",ExpressionUUID->"17c9cafa-217c-4b40-a293-dd873862bec1"], +Cell[638334, 15406, 495, 11, 70, "Message",ExpressionUUID->"821c77bc-0b8e-447d-a58e-ab66d8a9a7c6"], +Cell[638832, 15419, 197, 3, 54, "Output",ExpressionUUID->"f453127e-b1ff-4fda-8de5-d1ada3a38c1e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[639066, 15427, 2233, 63, 580, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], +Cell[641302, 15492, 633, 13, 156, "Message",ExpressionUUID->"6ab07d09-da18-45ff-b1c0-1770f479fe64"], +Cell[641938, 15507, 635, 13, 156, "Message",ExpressionUUID->"893d17c2-31b3-49f6-bc00-60d93d5ca742"], +Cell[642576, 15522, 633, 13, 156, "Message",ExpressionUUID->"f104f69b-7837-4831-acb8-a67dca3f0c32"], +Cell[643212, 15537, 495, 11, 70, "Message",ExpressionUUID->"501b5dcc-1205-4cb2-8928-ff4913a5cd9a"], +Cell[643710, 15550, 195, 3, 54, "Output",ExpressionUUID->"cf9b2637-eb31-4f81-b832-273a24cf0f8d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[643942, 15558, 2235, 63, 580, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], +Cell[646180, 15623, 633, 13, 156, "Message",ExpressionUUID->"8446eb17-d050-47a0-9e36-0b197cf87685"], +Cell[646816, 15638, 633, 13, 156, "Message",ExpressionUUID->"60cf4284-f898-41a5-a1fc-3b304d3b49ec"], +Cell[647452, 15653, 633, 13, 156, "Message",ExpressionUUID->"5ba6f64c-6f1b-4a56-9295-caf1ef09be8a"], +Cell[648088, 15668, 494, 11, 70, "Message",ExpressionUUID->"5c8844fe-18f3-4d26-aa85-eabe3181e89a"], +Cell[648585, 15681, 196, 3, 54, "Output",ExpressionUUID->"44f43ed4-266c-4484-83af-3ec70bc2b154"] +}, Open ]], +Cell[CellGroupData[{ +Cell[648818, 15689, 238, 6, 76, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], +Cell[649059, 15697, 196, 3, 54, "Output",ExpressionUUID->"5f99d770-5b4a-4db2-9cc6-02caa2c4a920"] +}, Open ]], +Cell[649270, 15703, 211, 4, 109, "Input",ExpressionUUID->"a3c9312c-d52b-429d-a073-e8b0adec4a09"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw2.nb b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw2.nb index 7f02c1a..87b9524 100644 --- a/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw2.nb +++ b/Pu240_798-811_TitovAA/168-72_h_Pu240_22-23/h_168-72_Pu240_22-23_pr_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 586596, 14155] -NotebookOptionsPosition[ 547385, 13528] -NotebookOutlinePosition[ 547796, 13545] -CellTagsIndexPosition[ 547753, 13542] +NotebookDataLength[ 681920, 16210] +NotebookOptionsPosition[ 641339, 15562] +NotebookOutlinePosition[ 641750, 15579] +CellTagsIndexPosition[ 641707, 15576] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -32,8 +32,9 @@ Cell[BoxData["1.9`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.9940735644974327`*^9, 3.994073590895896*^9}, { 3.994075171996416*^9, 3.994075180507247*^9}, {3.994075219377726*^9, - 3.9940752234153214`*^9}, 3.994085115195125*^9}, - CellLabel->"Out[1]=",ExpressionUUID->"02ee43ff-906a-40e5-b09b-17c16a41dd28"] + 3.9940752234153214`*^9}, 3.994085115195125*^9, 3.994349728465887*^9, + 3.994352629276026*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"79fdfdb4-e046-4ddc-a593-62b0a4927527"] }, Open ]], Cell[CellGroupData[{ @@ -47,8 +48,9 @@ Cell[BoxData[ Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.994073564560362*^9, 3.994073590977919*^9}, - 3.994075180702458*^9, 3.9940752234546824`*^9, 3.994085115261709*^9}, - CellLabel->"Out[2]=",ExpressionUUID->"f8dc1e5d-820c-4798-af54-a797019ab4be"] + 3.994075180702458*^9, 3.9940752234546824`*^9, 3.994085115261709*^9, + 3.994349728731349*^9, 3.994352629429144*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"f46ab142-ed61-4d11-a7ba-481ae80b2db7"] }, Open ]], Cell[CellGroupData[{ @@ -62,8 +64,9 @@ Cell[BoxData[ Cell[BoxData["168"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994073564571506*^9, 3.994073590992278*^9}, - 3.994075180712758*^9, 3.9940752234670067`*^9, 3.994085115272978*^9}, - CellLabel->"Out[3]=",ExpressionUUID->"31e9d910-d4c0-45d6-869d-a05446246a18"] + 3.994075180712758*^9, 3.9940752234670067`*^9, 3.994085115272978*^9, + 3.994349728745203*^9, 3.994352629652288*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"fd3a9126-0abb-46a0-8b06-dec7139ca5b1"] }, Open ]], Cell[CellGroupData[{ @@ -76,8 +79,9 @@ Cell[BoxData[ Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.994073564582589*^9, 3.994073590996417*^9}, - 3.994075180723978*^9, 3.994075223478387*^9, 3.994085115283976*^9}, - CellLabel->"Out[4]=",ExpressionUUID->"8249d52c-d43f-41c2-8d25-817510c289dc"] + 3.994075180723978*^9, 3.994075223478387*^9, 3.994085115283976*^9, + 3.994349728759097*^9, 3.994352629692094*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"25d6c81c-bf74-416a-8347-1cbc77c797bc"] }, Open ]], Cell[CellGroupData[{ @@ -94,8 +98,9 @@ Cell[BoxData[ Cell[BoxData["0.544`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.994073564593708*^9, 3.994073591015129*^9}, - 3.994075180735317*^9, 3.994075223489546*^9, 3.99408511528822*^9}, - CellLabel->"Out[5]=",ExpressionUUID->"5b5015f2-87a4-47d3-a645-6d0566e97e8b"] + 3.994075180735317*^9, 3.994075223489546*^9, 3.99408511528822*^9, + 3.994349728772984*^9, 3.9943526297321377`*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"c51270c6-c4a6-496f-ad2b-2ea871740907"] }, Open ]], Cell[CellGroupData[{ @@ -107,8 +112,9 @@ Cell[BoxData[ Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.994073564604851*^9, 3.9940735910271397`*^9}, - 3.9940751807454844`*^9, 3.994075223493987*^9, 3.994085115305625*^9}, - CellLabel->"Out[6]=",ExpressionUUID->"f6967b40-8618-4de8-a2f1-141001d765f4"] + 3.9940751807454844`*^9, 3.994075223493987*^9, 3.994085115305625*^9, + 3.9943497287867117`*^9, 3.99435262976678*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"b2c3bad1-5695-4fd9-8d21-50aae712456c"] }, Open ]], Cell[CellGroupData[{ @@ -124,8 +130,9 @@ Cell[BoxData[ Cell[BoxData["6.400704089204199`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.9940735646161203`*^9, 3.9940735910381737`*^9}, - 3.99407518075636*^9, 3.9940752235073977`*^9, 3.994085115316967*^9}, - CellLabel->"Out[7]=",ExpressionUUID->"74249ad1-680b-446c-a045-8f6317c9cbef"] + 3.99407518075636*^9, 3.9940752235073977`*^9, 3.994085115316967*^9, + 3.994349728800415*^9, 3.9943526298075953`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"9f9c5904-898a-4b28-8f5a-35518fa5a3aa"] }, Open ]], Cell[CellGroupData[{ @@ -142,8 +149,9 @@ Cell[BoxData[ Cell[BoxData["4.825794469480417`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.994073564627458*^9, 3.9940735910486517`*^9}, - 3.994075180767749*^9, 3.9940752235185337`*^9, 3.994085115328018*^9}, - CellLabel->"Out[8]=",ExpressionUUID->"df2ba0bd-028b-4353-8d9b-f8d9b00076c1"] + 3.994075180767749*^9, 3.9940752235185337`*^9, 3.994085115328018*^9, + 3.99434972881462*^9, 3.994352629820066*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"1a727c69-685f-4899-a6cd-2854aadbf295"] }, Open ]], Cell[CellGroupData[{ @@ -155,8 +163,9 @@ Cell[BoxData[ Cell[BoxData["0.8877902834`"], "Output", CellChangeTimes->{{3.99407356463848*^9, 3.994073591058733*^9}, - 3.994075180779163*^9, 3.994075223529882*^9, 3.99408511533893*^9}, - CellLabel->"Out[9]=",ExpressionUUID->"80d73021-3e2d-472b-ade3-42924739b17c"] + 3.994075180779163*^9, 3.994075223529882*^9, 3.99408511533893*^9, + 3.994349728828907*^9, 3.9943526298678293`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"62d5d4f0-6b89-41c9-821d-c4228e15a629"] }, Open ]], Cell[CellGroupData[{ @@ -168,8 +177,9 @@ Cell[BoxData[ Cell[BoxData["0.3862529089`"], "Output", CellChangeTimes->{{3.9940735646497602`*^9, 3.994073591068905*^9}, - 3.994075180790642*^9, 3.994075223541339*^9, 3.9940851153499804`*^9}, - CellLabel->"Out[10]=",ExpressionUUID->"6a0f2ec6-de08-4ff1-a7d1-eeb267379119"] + 3.994075180790642*^9, 3.994075223541339*^9, 3.9940851153499804`*^9, + 3.9943497288428497`*^9, 3.99435262990808*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"eda409b1-2c8d-4c49-ac6c-4539cdae7454"] }, Open ]], Cell[CellGroupData[{ @@ -181,8 +191,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.994073564660372*^9, 3.994073591079844*^9}, - 3.9940751808023157`*^9, 3.99407522355291*^9, 3.994085115360931*^9}, - CellLabel->"Out[11]=",ExpressionUUID->"329f1bda-e626-4e2a-b51b-0cb5fefbdcc5"] + 3.9940751808023157`*^9, 3.99407522355291*^9, 3.994085115360931*^9, + 3.9943497288557987`*^9, 3.994352639830308*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"73dcff8a-7b4c-43f9-b84d-8d2a7bddd7b3"] }, Open ]], Cell[CellGroupData[{ @@ -194,8 +205,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.994073564670796*^9, 3.994073591090024*^9}, - 3.994075180813775*^9, 3.994075223564582*^9, 3.994085115371682*^9}, - CellLabel->"Out[12]=",ExpressionUUID->"3c20db16-f7a6-4610-afcd-2b8101f2de4d"] + 3.994075180813775*^9, 3.994075223564582*^9, 3.994085115371682*^9, + 3.994349728870214*^9, 3.994352640451099*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"056cef0d-0241-4fed-82be-7b179fc523e2"] }, Open ]], Cell[CellGroupData[{ @@ -224,8 +236,9 @@ Cell[BoxData[ Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.9940735646817017`*^9, 3.994073591101307*^9}, - 3.9940751808204927`*^9, 3.99407522357547*^9, 3.994085115382881*^9}, - CellLabel->"Out[13]=",ExpressionUUID->"df66f67b-d1b7-4781-bf88-7bc69831d326"] + 3.9940751808204927`*^9, 3.99407522357547*^9, 3.994085115382881*^9, + 3.994349728886427*^9, 3.994352640469131*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"64f3fac6-5913-42ad-99e0-5ba58c50c350"] }, Open ]], Cell[CellGroupData[{ @@ -254,8 +267,9 @@ Cell[BoxData[ Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.9940735646923637`*^9, 3.994073591111409*^9}, - 3.994075180833333*^9, 3.99407522358539*^9, 3.994085115393899*^9}, - CellLabel->"Out[14]=",ExpressionUUID->"77195fc0-7fb3-41fc-bfbd-562ca4f420f4"] + 3.994075180833333*^9, 3.99407522358539*^9, 3.994085115393899*^9, + 3.994349728901204*^9, 3.994352640486174*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"4e097ab7-3536-42e8-8926-41f021a2da92"] }, Open ]], Cell[CellGroupData[{ @@ -315,8 +329,9 @@ Cell[BoxData[ Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994073564703178*^9, 3.99407359112132*^9}, - 3.994075180844792*^9, 3.994075223596579*^9, 3.994085115405024*^9}, - CellLabel->"Out[15]=",ExpressionUUID->"85fe8299-739b-4dcf-9994-022ec5b76feb"] + 3.994075180844792*^9, 3.994075223596579*^9, 3.994085115405024*^9, + 3.9943497289161243`*^9, 3.99435264050045*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"c029d69c-2640-4053-97c4-4004f29be4be"] }, Open ]], Cell[CellGroupData[{ @@ -373,8 +388,9 @@ Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.994073564714039*^9, 3.994073591132222*^9}, - 3.994075180888361*^9, 3.994075223608573*^9, 3.994085115416223*^9}, - CellLabel->"Out[16]=",ExpressionUUID->"51a73d11-1920-437d-94ce-fa1d3f9c5089"] + 3.994075180888361*^9, 3.994075223608573*^9, 3.994085115416223*^9, + 3.994349728931143*^9, 3.9943526405126657`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"fe85bf89-63a1-413a-8b93-314c0cb9919d"] }, Open ]], Cell[CellGroupData[{ @@ -431,8 +447,9 @@ Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.9940735647250757`*^9, 3.994073591143152*^9}, - 3.994075180901285*^9, 3.994075223621201*^9, 3.994085115427527*^9}, - CellLabel->"Out[17]=",ExpressionUUID->"a689cb8c-13f9-4656-8794-f93478636eaf"] + 3.994075180901285*^9, 3.994075223621201*^9, 3.994085115427527*^9, + 3.9943497289473124`*^9, 3.9943526405283527`*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"b8cfab9a-c092-42f4-9de1-1d16e2bee392"] }, Open ]], Cell[CellGroupData[{ @@ -492,8 +509,9 @@ Cell[BoxData[ Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994073564736117*^9, 3.994073591154641*^9}, - 3.9940751809127274`*^9, 3.994075223631315*^9, 3.994085115439013*^9}, - CellLabel->"Out[18]=",ExpressionUUID->"6151e0ed-c6f5-453a-ac85-9f7284f59620"] + 3.9940751809127274`*^9, 3.994075223631315*^9, 3.994085115439013*^9, + 3.994349728963702*^9, 3.994352640539544*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"1848c458-03ea-45c7-84bc-bdd95fa9fe7f"] }, Open ]], Cell[CellGroupData[{ @@ -505,8 +523,9 @@ Cell[BoxData[ Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.994073564745685*^9, 3.9940735911671133`*^9}, - 3.9940751809237967`*^9, 3.994075223641436*^9, 3.994085115449952*^9}, - CellLabel->"Out[19]=",ExpressionUUID->"fcb058a5-4fe2-4181-aeb0-447a3ce8f491"] + 3.9940751809237967`*^9, 3.994075223641436*^9, 3.994085115449952*^9, + 3.994349728980348*^9, 3.994352640550482*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"68f49ab8-a8fa-4a50-90b0-1cb0d7bb3a98"] }, Open ]], Cell[CellGroupData[{ @@ -518,8 +537,9 @@ Cell[BoxData[ Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994073564755136*^9, 3.994073591178863*^9}, - 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.994085115460924*^9}, - CellLabel->"Out[20]=",ExpressionUUID->"20167d98-09aa-4a17-a339-8590f6272351"] + 3.9940751809343033`*^9, 3.9940752236530647`*^9, 3.994085115460924*^9, + 3.994349728996805*^9, 3.994352640560369*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"760afc12-4898-487f-8952-3b347edd354d"] }, Open ]], Cell[CellGroupData[{ @@ -531,8 +551,9 @@ Cell[BoxData[ Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940735647648563`*^9, 3.994073591190179*^9}, - 3.9940751809451323`*^9, 3.994075223664682*^9, 3.994085115472015*^9}, - CellLabel->"Out[21]=",ExpressionUUID->"345b463d-d0ad-45e3-94c3-ae2a4b5cff6c"] + 3.9940751809451323`*^9, 3.994075223664682*^9, 3.994085115472015*^9, + 3.994349729018106*^9, 3.994352640571258*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"b0a1004a-686b-4e66-b0db-09cc3d1bd9fc"] }, Open ]], Cell[CellGroupData[{ @@ -547,8 +568,9 @@ Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.994073564774688*^9, 3.994073591201717*^9}, - 3.994075180956657*^9, 3.994075223675436*^9, 3.994085115483061*^9}, - CellLabel->"Out[22]=",ExpressionUUID->"1f8d8275-7763-44ea-9141-f9902f7f99bb"] + 3.994075180956657*^9, 3.994075223675436*^9, 3.994085115483061*^9, + 3.994349729035109*^9, 3.99435264058263*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"78d461df-e514-4593-88df-b241b3ddb26f"] }, Open ]], Cell[CellGroupData[{ @@ -560,8 +582,9 @@ Cell[BoxData[ Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994073564784115*^9, 3.994073591213622*^9}, - 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.9940851154940977`*^9}, - CellLabel->"Out[23]=",ExpressionUUID->"90eb103d-ca0a-4766-b1d8-c0ed78f1fef6"] + 3.9940751809686193`*^9, 3.9940752236862583`*^9, 3.9940851154940977`*^9, + 3.994349729052868*^9, 3.994352640592784*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"8462d08d-185f-40d2-94dd-ba2815d83ca5"] }, Open ]], Cell[CellGroupData[{ @@ -576,8 +599,9 @@ Cell[BoxData[ Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.994073564793541*^9, 3.994073591224018*^9}, - 3.994075180980678*^9, 3.994075223697234*^9, 3.9940851155052233`*^9}, - CellLabel->"Out[24]=",ExpressionUUID->"3bbb8ab1-9759-473d-9fdb-d39afee5cdfc"] + 3.994075180980678*^9, 3.994075223697234*^9, 3.9940851155052233`*^9, + 3.9943497290693502`*^9, 3.994352640602797*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"2d4ad2aa-8379-42d3-9624-869f205a84db"] }, Open ]], Cell[CellGroupData[{ @@ -592,8 +616,9 @@ Cell[BoxData[ Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.9940735648031883`*^9, 3.9940735912353287`*^9}, - 3.9940751809920683`*^9, 3.994075223707429*^9, 3.994085115516377*^9}, - CellLabel->"Out[25]=",ExpressionUUID->"afe9d3dd-708d-42a6-898d-31d2d959d117"] + 3.9940751809920683`*^9, 3.994075223707429*^9, 3.994085115516377*^9, + 3.994349729086094*^9, 3.9943526406126413`*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"6f5bb78e-cc01-4376-a4b1-4b824a5c8f22"] }, Open ]], Cell[CellGroupData[{ @@ -607,8 +632,9 @@ Cell[BoxData[ Cell[BoxData["72"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.99407356481284*^9, 3.994073591246372*^9}, - 3.994075181003516*^9, 3.994075223717374*^9, 3.994085115527375*^9}, - CellLabel->"Out[26]=",ExpressionUUID->"c43260a7-d9eb-4ff8-bfb4-75f2299d10c7"] + 3.994075181003516*^9, 3.994075223717374*^9, 3.994085115527375*^9, + 3.994349729102058*^9, 3.994352640624029*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"c58d4fb9-8a36-4e68-bf67-188b57e27515"] }, Open ]], Cell[CellGroupData[{ @@ -628,8 +654,9 @@ Cell[BoxData[ Cell[BoxData["0.10999999999999999`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994073564822513*^9, 3.9940735912565413`*^9}, - 3.994075181014969*^9, 3.994075223727599*^9, 3.9940851155385227`*^9}, - CellLabel->"Out[27]=",ExpressionUUID->"5fcf7dbf-1a69-4c01-ba36-f912484cd003"] + 3.994075181014969*^9, 3.994075223727599*^9, 3.9940851155385227`*^9, + 3.994349729117234*^9, 3.9943526406366796`*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"83ce3728-efb9-4b63-b7d5-711bf1e66684"] }, Open ]], Cell[CellGroupData[{ @@ -650,8 +677,9 @@ Cell[BoxData[ RowBox[{"-", "2.564285714285714`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994073564832857*^9, 3.994073591267404*^9}, - 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.9940851155496197`*^9}, - CellLabel->"Out[28]=",ExpressionUUID->"b4c86b70-e3ea-485d-85fb-9a1c5d7533e3"] + 3.9940751810260887`*^9, 3.9940752237376823`*^9, 3.9940851155496197`*^9, + 3.9943497291329937`*^9, 3.9943526406479673`*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"498a1635-6c66-4aff-9a92-ff7f5077e295"] }, Open ]], Cell[CellGroupData[{ @@ -687,8 +715,9 @@ Cell[BoxData[ Cell[BoxData["17.427928477019236`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994073564842832*^9, 3.9940735912778807`*^9}, - 3.9940751810379477`*^9, 3.994075223748026*^9, 3.994085115561041*^9}, - CellLabel->"Out[29]=",ExpressionUUID->"b5b23c58-7acd-492e-bb44-7c8a62c15555"] + 3.9940751810379477`*^9, 3.994075223748026*^9, 3.994085115561041*^9, + 3.9943497291484203`*^9, 3.9943526406614437`*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"fb7e0173-5261-4b5e-b468-9780f7fd7bf8"] }, Open ]], Cell[CellGroupData[{ @@ -701,8 +730,9 @@ Cell[BoxData[ Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.994073564851839*^9, 3.994073591288074*^9}, - 3.99407518104945*^9, 3.994075223758711*^9, 3.9940851155718*^9}, - CellLabel->"Out[30]=",ExpressionUUID->"8c8728b1-d8a6-4b1d-a01c-9ad8a31d0c6e"] + 3.99407518104945*^9, 3.994075223758711*^9, 3.9940851155718*^9, + 3.994349729163546*^9, 3.994352640673087*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"9b2b5153-4537-490b-b5f7-e9adadab50d0"] }, Open ]], Cell[CellGroupData[{ @@ -716,8 +746,9 @@ Cell[BoxData[ Cell[BoxData["2.155`"], "Output", CellChangeTimes->{{3.994073564860754*^9, 3.994073591298296*^9}, - 3.994075181060684*^9, 3.994075223775366*^9, 3.9940851155825577`*^9}, - CellLabel->"Out[31]=",ExpressionUUID->"729e92b0-5457-4aea-a142-2ee5c4e5f1dc"] + 3.994075181060684*^9, 3.994075223775366*^9, 3.9940851155825577`*^9, + 3.994349729178791*^9, 3.9943526406849823`*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"90b61f19-20fd-43e5-95fe-4d353c6340ff"] }, Open ]], Cell[BoxData[""], "Input", @@ -735,8 +766,9 @@ Cell[BoxData[ Cell[BoxData["0.755`"], "Output", CellChangeTimes->{{3.994073564877489*^9, 3.994073591311125*^9}, - 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.994085115602026*^9}, - CellLabel->"Out[33]=",ExpressionUUID->"b6046670-1f4a-4801-8d1d-93a4c11fbab5"] + 3.9940751810754833`*^9, 3.9940752237900457`*^9, 3.994085115602026*^9, + 3.994349729197571*^9, 3.994352640701487*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"d429d438-b4f2-441e-8b04-a1fb22e1f833"] }, Open ]], Cell[BoxData[""], "Input", @@ -754,8 +786,9 @@ Cell[BoxData[ Cell[BoxData["2.62`"], "Output", CellChangeTimes->{{3.994073564894133*^9, 3.9940735913232403`*^9}, - 3.994075181088438*^9, 3.994075223803163*^9, 3.994085115621591*^9}, - CellLabel->"Out[35]=",ExpressionUUID->"6e32449c-ecf6-42f5-9699-61612de9196c"] + 3.994075181088438*^9, 3.994075223803163*^9, 3.994085115621591*^9, + 3.99434972921413*^9, 3.99435264072129*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"44e42b14-dbd9-4d26-b900-51f56569cf13"] }, Open ]], Cell[BoxData[""], "Input", @@ -773,8 +806,9 @@ Cell[BoxData[ Cell[BoxData["1.135`"], "Output", CellChangeTimes->{{3.994073564911627*^9, 3.994073591335389*^9}, - 3.994075181101487*^9, 3.994075223815889*^9, 3.994085115641233*^9}, - CellLabel->"Out[37]=",ExpressionUUID->"538ab533-714b-4b2a-ba31-7d346a92e0f7"] + 3.994075181101487*^9, 3.994075223815889*^9, 3.994085115641233*^9, + 3.994349729231029*^9, 3.994352640741282*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"5b335103-c262-4647-986e-426605125fa8"] }, Open ]], Cell[BoxData[""], "Input", @@ -792,8 +826,9 @@ Cell[BoxData[ Cell[BoxData["1.025`"], "Output", CellChangeTimes->{{3.994073564928769*^9, 3.9940735913488693`*^9}, - 3.994075181114448*^9, 3.994075223832756*^9, 3.994085115661132*^9}, - CellLabel->"Out[39]=",ExpressionUUID->"2753ca29-1488-470d-886d-0b8d912d182c"] + 3.994075181114448*^9, 3.994075223832756*^9, 3.994085115661132*^9, + 3.994349729247901*^9, 3.994352640761331*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"a5567357-dec4-4560-a676-682e819dc422"] }, Open ]], Cell[BoxData[""], "Input", @@ -811,8 +846,9 @@ Cell[BoxData[ Cell[BoxData["0.575`"], "Output", CellChangeTimes->{{3.994073564946273*^9, 3.99407359136164*^9}, - 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994085115680732*^9}, - CellLabel->"Out[41]=",ExpressionUUID->"b172a7e2-085c-4d2f-8fbc-9121dbea35e1"] + 3.9940751811274652`*^9, 3.9940752238459263`*^9, 3.994085115680732*^9, + 3.9943497292643747`*^9, 3.994352640776885*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"bee0af28-db5a-42af-b9c8-73642faa880d"] }, Open ]], Cell[BoxData[""], "Input", @@ -830,8 +866,9 @@ Cell[BoxData[ Cell[BoxData["1.44`"], "Output", CellChangeTimes->{{3.994073564964167*^9, 3.9940735913757553`*^9}, - 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.994085115700485*^9}, - CellLabel->"Out[43]=",ExpressionUUID->"f5c139ef-c6ab-4715-ab1d-9fbffb024e67"] + 3.9940751811406727`*^9, 3.9940752238589993`*^9, 3.994085115700485*^9, + 3.994349729303788*^9, 3.994352640796975*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"4c0f19a6-2fd8-477e-b975-4d15274da80b"] }, Open ]], Cell[BoxData[""], "Input", @@ -848,8 +885,9 @@ Cell[BoxData[ Cell[BoxData["0.645`"], "Output", CellChangeTimes->{{3.9940735649821672`*^9, 3.994073591389337*^9}, - 3.994075181153781*^9, 3.994075223871763*^9, 3.99408511572055*^9}, - CellLabel->"Out[45]=",ExpressionUUID->"f3c3673f-42c4-4954-b5ab-ff46dbccbe13"] + 3.994075181153781*^9, 3.994075223871763*^9, 3.99408511572055*^9, + 3.994349729319886*^9, 3.994352640817737*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"8b55b59a-adf6-4a74-838d-37f3bc06e08b"] }, Open ]], Cell[BoxData[""], "Input", @@ -1348,8 +1386,9 @@ ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== Cell[BoxData["0.1377756020325425`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.9940735650538073`*^9, 3.99407359143029*^9}, - 3.994075181231205*^9, 3.9940752239087954`*^9, 3.994085115791532*^9}, - CellLabel->"Out[47]=",ExpressionUUID->"eeb00c32-8325-4870-90a0-00c9e5307945"] + 3.994075181231205*^9, 3.9940752239087954`*^9, 3.994085115791532*^9, + 3.994349729407632*^9, 3.994352640975119*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"9fa9259c-527e-4934-82a4-b755a15d48ba"] }, Open ]], Cell[CellGroupData[{ @@ -1848,8 +1887,9 @@ Cell[BoxData[ Cell[BoxData["7.524926889811008`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.99407356508613*^9, 3.994073591458125*^9}, - 3.994075181264968*^9, 3.994075223937818*^9, 3.9940851158187523`*^9}, - CellLabel->"Out[48]=",ExpressionUUID->"92f40e41-e91b-496e-b031-e6057d24b081"] + 3.994075181264968*^9, 3.994075223937818*^9, 3.9940851158187523`*^9, + 3.9943497294468727`*^9, 3.994352641095817*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"8b141746-ba0a-47d5-8d3f-33c257c67ac0"] }, Open ]], Cell[CellGroupData[{ @@ -2343,8 +2383,9 @@ Cell[BoxData[ RowBox[{"-", "14.084113046357718`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994073565118821*^9, 3.994073591484323*^9}, - 3.994075181298151*^9, 3.9940752239647293`*^9, 3.994085115845601*^9}, - CellLabel->"Out[49]=",ExpressionUUID->"3ca0012c-eb00-42b4-912b-c8cb99b6c9c3"] + 3.994075181298151*^9, 3.9940752239647293`*^9, 3.994085115845601*^9, + 3.994349729479924*^9, 3.99435264118992*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"94cede8b-44c3-449f-9f8f-854dcf4e3550"] }, Open ]], Cell[CellGroupData[{ @@ -2908,8 +2949,9 @@ Cell[BoxData[ RowBox[{"-", "18.31263149263108`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.9940735651553993`*^9, 3.994073591515855*^9}, - 3.9940751813370543`*^9, 3.994075223996374*^9, 3.994085115877906*^9}, - CellLabel->"Out[50]=",ExpressionUUID->"8c537c1b-8d44-404d-acb6-4d30b6dd6d70"] + 3.9940751813370543`*^9, 3.994075223996374*^9, 3.994085115877906*^9, + 3.994349729545306*^9, 3.994352641287108*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"af5417d9-b40f-46c9-b792-da9e6e683fd6"] }, Open ]], Cell[CellGroupData[{ @@ -3473,8 +3515,9 @@ Cell[BoxData[ RowBox[{"-", "53.236632839784775`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.994073565191607*^9, 3.9940735915482073`*^9}, - 3.9940751813752813`*^9, 3.994075224029221*^9, 3.994085115907621*^9}, - CellLabel->"Out[51]=",ExpressionUUID->"8c831df6-f7f9-4f7e-9e92-76675c9da378"] + 3.9940751813752813`*^9, 3.994075224029221*^9, 3.994085115907621*^9, + 3.994349729588477*^9, 3.9943526415576267`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"0d2fb825-c7f7-479a-b0ff-00bdd9cc0172"] }, Open ]], Cell[CellGroupData[{ @@ -4111,8 +4154,9 @@ Cell[BoxData[ RowBox[{"-", "137.72173412227852`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.9940735652337313`*^9, 3.9940735915861683`*^9}, - 3.9940751814204807`*^9, 3.99407522406466*^9, 3.994085115942054*^9}, - CellLabel->"Out[52]=",ExpressionUUID->"0b056661-7141-40be-8d5f-4f56f2db16ab"] + 3.9940751814204807`*^9, 3.99407522406466*^9, 3.994085115942054*^9, + 3.994349729634506*^9, 3.9943526416698723`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"516ae30f-a9bb-44c7-8ecd-ac7b7ea478ac"] }, Open ]], Cell[CellGroupData[{ @@ -4124,8 +4168,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994073565247233*^9, 3.99407359159737*^9}, - 3.994075181435895*^9, 3.9940752240755796`*^9, 3.994085115957597*^9}, - CellLabel->"Out[53]=",ExpressionUUID->"c5eea605-f807-4d87-b299-7762bbaf58e9"] + 3.994075181435895*^9, 3.9940752240755796`*^9, 3.994085115957597*^9, + 3.994349729644861*^9, 3.994352641692275*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"50f0471a-3f89-43ff-99e5-322c493383aa"] }, Open ]], Cell[CellGroupData[{ @@ -4137,8 +4182,9 @@ Cell[BoxData[ Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994073565259305*^9, 3.994073591607201*^9}, - 3.9940751814462433`*^9, 3.994075224085256*^9, 3.994085115970207*^9}, - CellLabel->"Out[54]=",ExpressionUUID->"d63b1889-fb52-4f17-8f77-c511eac20578"] + 3.9940751814462433`*^9, 3.994075224085256*^9, 3.994085115970207*^9, + 3.9943497296514072`*^9, 3.994352641706361*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"8e8e9e07-bcdb-4066-9765-c283636b4ae9"] }, Open ]], Cell[CellGroupData[{ @@ -4187,8 +4233,9 @@ Cell[BoxData[ Cell[BoxData["109.03965674383026`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940735652689238`*^9, 3.99407359161714*^9}, - 3.994075181457575*^9, 3.994075224089169*^9, 3.994085115981757*^9}, - CellLabel->"Out[55]=",ExpressionUUID->"e238f3f1-4fcb-4c9e-9da4-c8e5ffe63b86"] + 3.994075181457575*^9, 3.994075224089169*^9, 3.994085115981757*^9, + 3.994349729657975*^9, 3.994352641725794*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"87c62a67-96b0-4b0a-9af9-52fcfa200aea"] }, Open ]], Cell[CellGroupData[{ @@ -4234,8 +4281,9 @@ Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.9940735652791967`*^9, 3.994073591627187*^9}, - 3.994075181468134*^9, 3.9940752240986977`*^9, 3.9940851159941797`*^9}, - CellLabel->"Out[56]=",ExpressionUUID->"5c48db18-8f9f-4770-ba96-bc261082d1d5"] + 3.994075181468134*^9, 3.9940752240986977`*^9, 3.9940851159941797`*^9, + 3.9943497296687527`*^9, 3.994352641740065*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"d49c9e67-b942-48fd-8fdd-07028b487c18"] }, Open ]], Cell[CellGroupData[{ @@ -4284,8 +4332,9 @@ Cell[BoxData[ Cell[BoxData["112.13680293055965`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994073565289288*^9, 3.994073591637117*^9}, - 3.994075181479414*^9, 3.9940752241080437`*^9, 3.994085116007025*^9}, - CellLabel->"Out[57]=",ExpressionUUID->"285cf33b-d30e-439d-a6b4-dcdbd82099e7"] + 3.994075181479414*^9, 3.9940752241080437`*^9, 3.994085116007025*^9, + 3.994349729674919*^9, 3.9943526417569427`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"70e206ed-9abe-4c72-aac3-12e56372c5ec"] }, Open ]], Cell[CellGroupData[{ @@ -4296,8 +4345,9 @@ Cell[BoxData["c11"], "Input", Cell[BoxData["0.4156604021030056`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.99407356529922*^9, 3.994073591647008*^9}, - 3.994075181491456*^9, 3.994075224117897*^9, 3.9940851160206537`*^9}, - CellLabel->"Out[58]=",ExpressionUUID->"f12ac516-3215-4b94-8d0d-5f74db7d25d3"] + 3.994075181491456*^9, 3.994075224117897*^9, 3.9940851160206537`*^9, + 3.994349729680973*^9, 3.9943526417716503`*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"1dcbc32c-5af8-46ca-bc4f-22940ce249f6"] }, Open ]], Cell[CellGroupData[{ @@ -4309,8 +4359,9 @@ Cell[BoxData[ RowBox[{"-", "0.08656844775361539`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.994073565311245*^9, 3.994073591656905*^9}, - 3.994075181502122*^9, 3.9940752241273518`*^9, 3.9940851160340023`*^9}, - CellLabel->"Out[59]=",ExpressionUUID->"3b347523-0ce8-4a5b-a0ff-a2af83dc0265"] + 3.994075181502122*^9, 3.9940752241273518`*^9, 3.9940851160340023`*^9, + 3.994349729686942*^9, 3.9943526417864943`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"64f05390-3fed-473e-b652-2e11a9c4530e"] }, Open ]], Cell[CellGroupData[{ @@ -4322,8 +4373,9 @@ Cell[BoxData[ RowBox[{"-", "0.5722877017893374`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.9940735653224297`*^9, 3.994073591666703*^9}, - 3.994075181512973*^9, 3.994075224138131*^9, 3.994085118461482*^9}, - CellLabel->"Out[60]=",ExpressionUUID->"71c3e5ad-8f38-4bbd-a8ef-7371762fea68"] + 3.994075181512973*^9, 3.994075224138131*^9, 3.994085118461482*^9, + 3.994349729692724*^9, 3.994352641818327*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"968975c4-1a8c-4361-a215-95154f113a47"] }, Open ]], Cell[CellGroupData[{ @@ -4334,8 +4386,9 @@ Cell[BoxData["c22"], "Input", Cell[BoxData["0.7168396379251292`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.994073565332736*^9, 3.994073591676529*^9}, - 3.9940751815232983`*^9, 3.99407522414828*^9, 3.9940851186335783`*^9}, - CellLabel->"Out[61]=",ExpressionUUID->"f199e36e-103f-4687-99bb-1dbc7ed9c2d5"] + 3.9940751815232983`*^9, 3.99407522414828*^9, 3.9940851186335783`*^9, + 3.99434972969833*^9, 3.994352641831011*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"74880469-c318-48e9-8076-694907b07c00"] }, Open ]], Cell[CellGroupData[{ @@ -4346,8 +4399,9 @@ Cell[BoxData["w1"], "Input", Cell[BoxData["2.2780057225092705`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994073565343382*^9, 3.994073591686304*^9}, - 3.9940751815621433`*^9, 3.994075224158536*^9, 3.994085118647644*^9}, - CellLabel->"Out[62]=",ExpressionUUID->"d89dd81a-41a8-46b4-be87-81a6e83655ca"] + 3.9940751815621433`*^9, 3.994075224158536*^9, 3.994085118647644*^9, + 3.994349729703771*^9, 3.994352641863791*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"9972cd6e-9b08-42dd-aca9-da05e24fafad"] }, Open ]], Cell[CellGroupData[{ @@ -4358,8 +4412,9 @@ Cell[BoxData["w2"], "Input", Cell[BoxData["1.4218629228610074`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.9940735677968397`*^9, 3.994073591696135*^9}, - 3.994075181571867*^9, 3.994075224168653*^9, 3.994085118661684*^9}, - CellLabel->"Out[63]=",ExpressionUUID->"df4bcd23-e665-48b2-a180-bebf80334d3e"] + 3.994075181571867*^9, 3.994075224168653*^9, 3.994085118661684*^9, + 3.994349729709238*^9, 3.994352641888797*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"e98199a1-3c24-42f3-a56b-5c28daa0fec5"] }, Open ]], Cell[CellGroupData[{ @@ -4386,8 +4441,9 @@ Cell[BoxData[ RowBox[{"-", "34.047906297441784`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994073567991251*^9, 3.994073591706287*^9}, - 3.994075181582259*^9, 3.994075224178802*^9, 3.994085118675519*^9}, - CellLabel->"Out[64]=",ExpressionUUID->"4bf6662d-44d9-494c-95d2-758cc46bb0e1"] + 3.994075181582259*^9, 3.994075224178802*^9, 3.994085118675519*^9, + 3.994349729715124*^9, 3.994352641902814*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"1512e277-12fc-4a8b-b096-cab55a60189c"] }, Open ]], Cell[CellGroupData[{ @@ -4414,8 +4470,9 @@ Cell[BoxData[ RowBox[{"-", "6.56405378738986`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994073568001831*^9, 3.994073591716386*^9}, - 3.994075181592502*^9, 3.994075224188962*^9, 3.994085118690284*^9}, - CellLabel->"Out[65]=",ExpressionUUID->"525df73e-aafa-4b88-a85a-47d082ea5b39"] + 3.994075181592502*^9, 3.994075224188962*^9, 3.994085118690284*^9, + 3.9943497297209597`*^9, 3.994352641921235*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"5f77b089-f781-4991-9aa8-836f59f1153e"] }, Open ]], Cell[CellGroupData[{ @@ -4485,8 +4542,9 @@ Cell[BoxData[ Cell[BoxData["74.99175044638848`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.994073568012953*^9, 3.994073591726822*^9}, - 3.9940751816039963`*^9, 3.994075224199308*^9, 3.994085118707182*^9}, - CellLabel->"Out[66]=",ExpressionUUID->"9a1dd232-0eed-4cf4-ada5-96bceba4881b"] + 3.9940751816039963`*^9, 3.994075224199308*^9, 3.994085118707182*^9, + 3.994349729727256*^9, 3.994352641948278*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"06a94d47-7f4f-49e3-8a9c-fcd37428820d"] }, Open ]], Cell[CellGroupData[{ @@ -4533,8 +4591,9 @@ Cell[BoxData[ RowBox[{"-", "96.23297652944373`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994073568023205*^9, 3.9940735917368*^9}, - 3.994075181615046*^9, 3.994075224209613*^9, 3.994085118720606*^9}, - CellLabel->"Out[67]=",ExpressionUUID->"d37aa652-c3b1-4d33-8b31-d3ba4c11efc6"] + 3.994075181615046*^9, 3.994075224209613*^9, 3.994085118720606*^9, + 3.994349729733349*^9, 3.99435264196506*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"78db283f-bf6a-48f3-b441-00590b570144"] }, Open ]], Cell[CellGroupData[{ @@ -4605,8 +4664,9 @@ Cell[BoxData[ Cell[BoxData["105.57274914316979`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994073568033989*^9, 3.994073591747006*^9}, - 3.994075181626021*^9, 3.994075224219851*^9, 3.994085118737733*^9}, - CellLabel->"Out[68]=",ExpressionUUID->"8d41f0b8-5f29-4adb-aaad-e7ea83699fca"] + 3.994075181626021*^9, 3.994075224219851*^9, 3.994085118737733*^9, + 3.994349729739915*^9, 3.994352641981798*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"fd21b3cb-7d8a-4257-992d-97d3a209a26f"] }, Open ]], Cell[CellGroupData[{ @@ -4669,8 +4729,9 @@ Cell[BoxData[ Cell[BoxData["39.10949309233206`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994073568045323*^9, 3.99407359175727*^9}, - 3.994075181636903*^9, 3.99407522423002*^9, 3.994085118753406*^9}, - CellLabel->"Out[69]=",ExpressionUUID->"6a77c378-2c32-424c-9d32-95d98258afff"] + 3.994075181636903*^9, 3.99407522423002*^9, 3.994085118753406*^9, + 3.994349729746317*^9, 3.994352641995652*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"ea4e8a6e-0afe-422c-b7ad-bb3e9f37d949"] }, Open ]], Cell[CellGroupData[{ @@ -4733,8 +4794,9 @@ Cell[BoxData[ Cell[BoxData["659.7171122788135`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994073568055649*^9, 3.994073591768012*^9}, - 3.9940751816477003`*^9, 3.99407522424048*^9, 3.9940851187719316`*^9}, - CellLabel->"Out[70]=",ExpressionUUID->"c03b8c17-45bb-4061-aca2-70a7a7a9d4e3"] + 3.9940751816477003`*^9, 3.99407522424048*^9, 3.9940851187719316`*^9, + 3.994349729752719*^9, 3.994352642025981*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"a63e6b23-43c5-4729-a624-a5c90bfb31f4"] }, Open ]], Cell[CellGroupData[{ @@ -4745,8 +4807,9 @@ Cell[BoxData[ CellLabel->"In[71]:=",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], Cell[BoxData["0.4800798445`"], "Output", - CellChangeTimes->{3.99408511878881*^9}, - CellLabel->"Out[71]=",ExpressionUUID->"f1a65227-2122-4ffe-8a0b-7ffc85a16663"] + CellChangeTimes->{3.99408511878881*^9, 3.994349729758376*^9, + 3.99435264204114*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"8217f880-5ce9-4da2-ba8b-4f4682a0cbac"] }, Open ]], Cell[BoxData[""], "Input", @@ -4761,8 +4824,9 @@ Cell[BoxData[ CellLabel->"In[73]:=",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], Cell[BoxData["0.2075336813`"], "Output", - CellChangeTimes->{3.994085118811582*^9}, - CellLabel->"Out[73]=",ExpressionUUID->"4d4b67ae-3393-4a0a-9ac3-bb9351b58216"] + CellChangeTimes->{3.994085118811582*^9, 3.994349729767386*^9, + 3.994352642063775*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"ea3afb62-e515-4b56-9e4f-d551af2adb89"] }, Open ]], Cell[BoxData[""], "Input", @@ -4816,8 +4880,9 @@ Cell[BoxData[ CellLabel->"In[75]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], Cell[BoxData["1.5054805119396558`*^-53"], "Output", - CellChangeTimes->{3.9913437871842365`*^9, 3.994085118832778*^9}, - CellLabel->"Out[75]=",ExpressionUUID->"3ee7292d-1d94-4662-ab3a-06cccc934e1c"] + CellChangeTimes->{3.9913437871842365`*^9, 3.994085118832778*^9, + 3.994349729776773*^9, 3.994352642082305*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"c511fcb0-bbf0-4a9f-adf9-83311569c060"] }, Open ]], Cell[CellGroupData[{ @@ -4855,8 +4920,9 @@ Cell[BoxData[ CellLabel->"In[76]:=",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], Cell[BoxData["7.870302048799622`*^-55"], "Output", - CellChangeTimes->{3.9913437872132397`*^9, 3.9940851188494253`*^9}, - CellLabel->"Out[76]=",ExpressionUUID->"b62f44dd-2018-46a2-94f0-397f7a6f6a37"] + CellChangeTimes->{3.9913437872132397`*^9, 3.9940851188494253`*^9, + 3.994349729784445*^9, 3.9943526420987597`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"9af47cfb-16e8-4449-bef9-51da270e7406"] }, Open ]], Cell[CellGroupData[{ @@ -4893,8 +4959,9 @@ Cell[BoxData[ CellLabel->"In[77]:=",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], Cell[BoxData["1.09654840213345`*^-54"], "Output", - CellChangeTimes->{3.9913437872412376`*^9, 3.9940851188660507`*^9}, - CellLabel->"Out[77]=",ExpressionUUID->"51ce5759-9eb0-400a-b729-93d8f59ab7d9"] + CellChangeTimes->{3.9913437872412376`*^9, 3.9940851188660507`*^9, + 3.994349729790578*^9, 3.9943526421121817`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"041becaf-10ce-4b62-abd5-648decf0319e"] }, Open ]], Cell[CellGroupData[{ @@ -4920,8 +4987,9 @@ Cell[BoxData[ CellLabel->"In[78]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], Cell[BoxData["14.833218900905916`"], "Output", - CellChangeTimes->{3.9913437872672386`*^9, 3.994085118883193*^9}, - CellLabel->"Out[78]=",ExpressionUUID->"5f552c53-15f5-4356-aa20-b76db8aee47e"] + CellChangeTimes->{3.9913437872672386`*^9, 3.994085118883193*^9, + 3.99434972979681*^9, 3.994352642126504*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"3e5333da-491a-4563-8f4d-13183f785b14"] }, Open ]], Cell[CellGroupData[{ @@ -4950,8 +5018,9 @@ Cell[BoxData[ CellLabel->"In[79]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], Cell[BoxData["30.755441300456276`"], "Output", - CellChangeTimes->{3.991343787279253*^9, 3.994085118902314*^9}, - CellLabel->"Out[79]=",ExpressionUUID->"9e3bce48-88ba-4844-b96e-71ee461a6742"] + CellChangeTimes->{3.991343787279253*^9, 3.994085118902314*^9, + 3.994349729802978*^9, 3.994352642138955*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"f292d248-730a-4b07-8f73-e850f22281ba"] }, Open ]], Cell[CellGroupData[{ @@ -4963,8 +5032,9 @@ Cell[BoxData[ CellLabel->"In[80]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], Cell[BoxData["1.6237658021470522`"], "Output", - CellChangeTimes->{3.9913437873062572`*^9, 3.994085118917459*^9}, - CellLabel->"Out[80]=",ExpressionUUID->"eca8ec09-f8c0-416c-bb2b-4617927543ef"] + CellChangeTimes->{3.9913437873062572`*^9, 3.994085118917459*^9, + 3.994349729808538*^9, 3.994352642152994*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"05cc7dbf-0918-4b17-a851-64701dff8447"] }, Open ]], Cell[CellGroupData[{ @@ -4976,8 +5046,9 @@ Cell[BoxData[ CellLabel->"In[81]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], Cell[BoxData["4.6314597396935815`"], "Output", - CellChangeTimes->{3.9913437873353844`*^9, 3.9940851189329033`*^9}, - CellLabel->"Out[81]=",ExpressionUUID->"804ee7fe-04a6-474e-a2b4-4a97b244d859"] + CellChangeTimes->{3.9913437873353844`*^9, 3.9940851189329033`*^9, + 3.99434972981469*^9, 3.994352642167049*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"cbc8d8be-784a-44eb-a70e-87f6b5af0ddb"] }, Open ]], Cell[CellGroupData[{ @@ -4989,8 +5060,9 @@ Cell[BoxData[ CellLabel->"In[82]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], Cell[BoxData["142.44258815957244`"], "Output", - CellChangeTimes->{3.991343787361582*^9, 3.994085118948419*^9}, - CellLabel->"Out[82]=",ExpressionUUID->"a702af9e-64f0-4465-91fd-7c9750a659f0"] + CellChangeTimes->{3.991343787361582*^9, 3.994085118948419*^9, + 3.994349729821226*^9, 3.9943526421840477`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"b8604e91-46bc-4528-9b30-571ed3debe93"] }, Open ]], Cell[CellGroupData[{ @@ -5002,8 +5074,9 @@ Cell[BoxData[ CellLabel->"In[83]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], Cell[BoxData["24.085673587052312`"], "Output", - CellChangeTimes->{3.9913437873734856`*^9, 3.9940851189643497`*^9}, - CellLabel->"Out[83]=",ExpressionUUID->"7019d27b-cbb5-44c9-a237-0c077a767cac"] + CellChangeTimes->{3.9913437873734856`*^9, 3.9940851189643497`*^9, + 3.994349729827631*^9, 3.994352642200698*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"2bbd0596-84a6-4064-83dc-2c24f59f856a"] }, Open ]], Cell[CellGroupData[{ @@ -5195,8 +5268,9 @@ Cell[BoxData[ CellLabel->"In[84]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], Cell[BoxData["0.006868065640753621`"], "Output", - CellChangeTimes->{3.9913437874002857`*^9, 3.994085118980521*^9}, - CellLabel->"Out[84]=",ExpressionUUID->"16385cf6-5108-4529-bb97-60710b9620a3"] + CellChangeTimes->{3.9913437874002857`*^9, 3.994085118980521*^9, + 3.994349729835186*^9, 3.99435264221739*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"b9cbabe4-cf29-48bf-91de-00f23ab5daed"] }, Open ]], Cell[CellGroupData[{ @@ -5212,8 +5286,9 @@ Cell[BoxData[ CellLabel->"In[85]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], Cell[BoxData["10.693693248035043`"], "Output", - CellChangeTimes->{3.9913437875033875`*^9, 3.994085119095364*^9}, - CellLabel->"Out[85]=",ExpressionUUID->"09eb46cf-534f-414a-aa87-568af882a7a1"] + CellChangeTimes->{3.9913437875033875`*^9, 3.994085119095364*^9, + 3.9943497299925756`*^9, 3.994352642548203*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"833811a2-1121-4e0c-ac6f-87a4752578f0"] }, Open ]], Cell[CellGroupData[{ @@ -5407,8 +5482,9 @@ Cell[BoxData[ CellLabel->"In[86]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], Cell[BoxData["0.04013399702687854`"], "Output", - CellChangeTimes->{3.9913437875342865`*^9, 3.994085119112389*^9}, - CellLabel->"Out[86]=",ExpressionUUID->"5914698f-2309-43aa-af88-0432267b79df"] + CellChangeTimes->{3.9913437875342865`*^9, 3.994085119112389*^9, + 3.994349730000656*^9, 3.9943526425872498`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"c4db0ff7-4113-4634-a014-0ef99856c8ca"] }, Open ]], Cell[CellGroupData[{ @@ -5424,8 +5500,9 @@ Cell[BoxData[ CellLabel->"In[87]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], Cell[BoxData["4.423731236863689`"], "Output", - CellChangeTimes->{3.9913437876352882`*^9, 3.994085119153*^9}, - CellLabel->"Out[87]=",ExpressionUUID->"af484f27-d07d-4431-b8dd-ca87a86dcd81"] + CellChangeTimes->{3.9913437876352882`*^9, 3.994085119153*^9, + 3.994349730040719*^9, 3.994352642673571*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"d9ed0966-74d5-4f5e-88d5-b54381863482"] }, Open ]], Cell[CellGroupData[{ @@ -5520,8 +5597,9 @@ Cell[BoxData[ CellLabel->"In[88]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], Cell[BoxData["0.07637363207411572`"], "Output", - CellChangeTimes->{3.991343787650694*^9, 3.994085119168439*^9}, - CellLabel->"Out[88]=",ExpressionUUID->"21aac974-f852-4cd5-aa6b-c229a072fc92"] + CellChangeTimes->{3.991343787650694*^9, 3.994085119168439*^9, + 3.994349730047583*^9, 3.994352642709807*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"f4796c1f-34e6-4939-8169-19d592ff6a54"] }, Open ]], Cell[CellGroupData[{ @@ -5613,8 +5691,9 @@ Cell[BoxData[ CellLabel->"In[89]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], Cell[BoxData["0.9236263679258842`"], "Output", - CellChangeTimes->{3.9913437876776943`*^9, 3.99408511918509*^9}, - CellLabel->"Out[89]=",ExpressionUUID->"fadea4f8-13df-49fa-9f31-0aece10dad52"] + CellChangeTimes->{3.9913437876776943`*^9, 3.99408511918509*^9, + 3.994349730053596*^9, 3.994352642750667*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"b75716cf-d406-4577-b016-dad558a50e2d"] }, Open ]], Cell[CellGroupData[{ @@ -5739,8 +5818,9 @@ Cell[BoxData[ CellLabel->"In[90]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], Cell[BoxData["0.07054070039792333`"], "Output", - CellChangeTimes->{3.9913437877049465`*^9, 3.994085119202577*^9}, - CellLabel->"Out[90]=",ExpressionUUID->"9f04824f-8859-4c0f-8080-4e0bbcc98912"] + CellChangeTimes->{3.9913437877049465`*^9, 3.994085119202577*^9, + 3.994349730060152*^9, 3.9943526427640333`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"94a43e76-b54a-40cf-8790-974f4d8d7605"] }, Open ]], Cell[BoxData[ @@ -5814,63 +5894,71 @@ Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"4.1985377845763865`*^-206\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 1, - 31386537120616806061, "kernel 2"}, +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 1, + 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437877189426`*^9, 3.994085119234145*^9}, + CellChangeTimes->{3.9913437877189426`*^9, 3.994085119234145*^9, + 3.994349730081442*^9, 3.9943526428855267`*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"524fb3dd-14a1-4597-8b02-c4b19af119ef"], +In[92]:=",ExpressionUUID->"2d6eef74-55b8-4da8-99f2-77955dd4e2e0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"7.028959552781788`*^-211\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 2, - 31386537120616806061, "kernel 2"}, +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 2, + 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437877189426`*^9, 3.994085119278974*^9}, + CellChangeTimes->{3.9913437877189426`*^9, 3.994085119234145*^9, + 3.994349730081442*^9, 3.994352642982688*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"1dbfef4f-d99d-45e6-bd42-676be565c04f"], +In[92]:=",ExpressionUUID->"aae43846-c2d6-4852-81b8-a8099643eed0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.176749500174552`*^-215\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 92, 3, - 31386537120616806061, "kernel 2"}, +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437877189426`*^9, 3.994085119282937*^9}, + CellChangeTimes->{3.9913437877189426`*^9, 3.994085119234145*^9, + 3.994349730081442*^9, 3.994352642992157*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"aff0035c-fe76-4864-bb49-0a97d515f074"], +In[92]:=",ExpressionUUID->"6c10771e-5ea1-4c4d-be0c-87f3a8a24c18"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 92, 4, 31386537120616806061, "kernel 2"}, +during this calculation.\"", 2, 92, 4, 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437877189426`*^9, 3.994085119285736*^9}, + CellChangeTimes->{3.9913437877189426`*^9, 3.994085119234145*^9, + 3.994349730081442*^9, 3.994352642999744*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"cdf38bd5-b9d6-4ea9-86d0-078a87b2bbaf"], +In[92]:=",ExpressionUUID->"5607019c-3170-49c5-8704-5a604de16069"], Cell[BoxData["10.693693248035046`"], "Output", - CellChangeTimes->{3.991343791131052*^9, 3.9940851206663218`*^9}, - CellLabel->"Out[92]=",ExpressionUUID->"8a6705e7-cd3b-4654-b884-0d62b3eff3c9"] + CellChangeTimes->{3.991343791131052*^9, 3.9940851206663218`*^9, + 3.994349731366733*^9, 3.994352646066305*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"5f04e76d-1b30-4569-a27b-669f1e9751a4"] }, Open ]], Cell[CellGroupData[{ @@ -5939,63 +6027,71 @@ Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"4.1985377845763865`*^-206\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 5, - 31386537120616806061, "kernel 2"}, +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 5, + 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437911686516`*^9, 3.9940851207421217`*^9}, + CellChangeTimes->{3.9913437911686516`*^9, 3.9940851207421217`*^9, + 3.994349731432743*^9, 3.994352646227188*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"316bfd93-b19e-4dcb-8445-615084c354e9"], +In[93]:=",ExpressionUUID->"44052610-cad7-4967-841a-80f2cdf2974a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"7.028959552781788`*^-211\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 6, - 31386537120616806061, "kernel 2"}, +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 6, + 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437911686516`*^9, 3.994085120746357*^9}, + CellChangeTimes->{3.9913437911686516`*^9, 3.9940851207421217`*^9, + 3.994349731432743*^9, 3.99435264623461*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"bad63f1a-ce8a-45c1-bb35-d524c598c760"], +In[93]:=",ExpressionUUID->"b388f526-32b3-460a-b285-799a6edfb642"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.176749500174552`*^-215\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 93, 7, - 31386537120616806061, "kernel 2"}, +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437911686516`*^9, 3.9940851207491217`*^9}, + CellChangeTimes->{3.9913437911686516`*^9, 3.9940851207421217`*^9, + 3.994349731432743*^9, 3.994352646241653*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"af6c8db3-8a76-43db-9d99-56de53c49dc2"], +In[93]:=",ExpressionUUID->"5cf54a2d-d0ee-4fa6-bd42-c006b4c6604d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 93, 8, 31386537120616806061, "kernel 2"}, +during this calculation.\"", 2, 93, 8, 31388290287561508530, "kernel 1"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", - CellChangeTimes->{3.9913437911686516`*^9, 3.994085120751528*^9}, + CellChangeTimes->{3.9913437911686516`*^9, 3.9940851207421217`*^9, + 3.994349731432743*^9, 3.994352646249123*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"a63bc6ec-4195-4730-b157-eaf565e1c4bd"], +In[93]:=",ExpressionUUID->"bef0b9da-ae5d-42a9-84cf-5326016cfb52"], Cell[BoxData["4.423731236863689`"], "Output", - CellChangeTimes->{3.991343794599764*^9, 3.994085122259233*^9}, - CellLabel->"Out[93]=",ExpressionUUID->"c6755025-6688-4ee9-92e5-b5ac8f3c41e5"] + CellChangeTimes->{3.991343794599764*^9, 3.994085122259233*^9, + 3.99434973273543*^9, 3.994352649489502*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"f8545993-684e-4ead-90fd-5974a40ff2f6"] }, Open ]], Cell[CellGroupData[{ @@ -6005,58 +6101,439 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{3.9918501631488323`*^9}, CellLabel->"In[94]:=",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], -Cell[BoxData["$Aborted"], "Output", - CellChangeTimes->{3.9913440619685707`*^9, 3.994085128290843*^9}, - CellLabel->"Out[94]=",ExpressionUUID->"20fc6a4f-8ecf-46a1-a5d2-78999a9146bc"] +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd0bB3CZkqHMQspcl0iXkLz2Y6oImSMRdziGpDJ1M6bIr0KI6E1p +oCQRKYo0UAnhRSmVrrjXPGQ4NPptf5x11medtb/nefZw1lGhHXJm8vLw8Azh +a+l+pFV3fVV7q5kZi6POfs5BZhMFW2hWJcjK9tieJbPzDbPUrWrRqd2bJ5fs +yHgrKKr/EumliI31YZez4usFrFqQ8vKVDv3Yp1+tfhZf/B/6/YYqw8F+1H7k +ym/qO6TXF20+iD3S0xRzrOYD6vYa7hjGVuCoeZGWn9Horug3Y9i7JmO2hrV8 +RctfbdaYwq77PSLCKu5DRX2i3Bns9wly0Q9D+tFItajoAvaEoNXILJWD6gM2 +5/zGFkw57Kk/z0Vs8ejkZS84aK3E5cYjNUPoSefwZ0FsB0Xy5oTlGFI1N6qS +xCauqsrqCE0gNzNZU3nseI3dSQdaJtGFXwqaytgf5Lo2hxd/R7XHLlA2YTP2 +BgWeT5lGwTfELI2wp/J4rlWEzKAYnzvPEbaQqo74d+ocSmJ5TThhZzHqd4jL +kGi7e0ieF7byLc/4TfMk6nlRVMbENt54auJgzQLyZmQLRGMHGH5tGbH8jSbV +3Q8VY8+yIviFNf+g1Bd3t1dhH68RMaUI/UXSIZtONmDngvEd/5ZFdJlWoc1e +qq+w0Sq0eBnIn3pusqaeg4pfnWcnKPKCgVX4to3YU4M+MRkpvGCNXK+ZYsdo +zd2/F8IHWtWX83yws8pU1CapAhDRR3e6hd3TPlb394YA5F1NjX6MrTxdtXel +jCB0RQ8Jt2KXGDhk6swLwuRtfU8Su+FR1LLgGiEoZW2q3NXAQXP1nV+HLEVh +fZwFY8VLDpK0ExWPrhOFDy7WIhrYel1WILZVDCTULSjm2EEDD65u1l0Jlbt1 +mqKwD/O26P0jKg5PB/vzZ7A5qqXfk0gJkNYou/TrFZ4fomlFm74kSNx7WbH2 +NQfx3uGqrD4iCTx7uWCBray/zrl4VBKKc2xfnMHea5le0cqWAufAp54qjRzU +Rg8Nk2uWATXj4M+MNxzUeyvtrK+QLMDyB4xz2GOjxTduW8uCd68i4zG2cHh/ +57ZnskBTtWmUaOIgq0RXA98HctBmaaP5CvtxgeFcUb48aO/UNLFu4aACzs9I +k3AlsPOzbclr46Cdbsm9YXeVIC14W2AH9liD1Pa7XCUwNdMPEWrnIIOCjTLK +nmvBTu+fexHYDTSf+wJm66Dz7YC0238cND3JPjp0Uhn2KrD91ndykNRBq8r7 +9qogncgnq9DNQdwC4QDHIFVYYzz0cB929ed2xfFTqtDDFXqWj73Pzvuk5jNV +qMkWEFn/AdenHel8kaoGx+KUE00+4veP3JqKk1MH4lEyf8QnDnL1F9Gx7dOA +iDRBO2M2B6FIN+qePxpgg+T9T2FrJeUbMeQ1IVb6IrcLm+eGvkWckyaUHhiS +DOvjoLu9XnsqnmtClByPSuU3fD7dSxIUrq8H/qlxaRsOrs/K/v0IjQJByooH +6kY46IZLzqf5OArYRPCslh/loDRaH5v/EgXiSi9SwrEZxyNG13ZSgMfue5T2 +GAdJ1F7mcbHUgopNrPdXxvH+0Z/QqlHThtJk/rDcKQ5SVD0Xf3ZgI2TOXHDp +Jjmo9sws5QevDjz4yfDbMY/nY8azi1DRAbCW4FZhX2lQp1j46ECWo6Trvwsc +pOr/uGOhWweEymXrGT9xvyUcDaJZF/6OG06t+stBSoprCWVPPQgynM1/KsBF +GwvDRX8hKuwXm9+QJMtFNMbJOR0HKnSK5J5bIcdFuWqZvb77qJBwM9snDZvv +etm9VywqPCIqt1xczUU9V0ZcM8upYJvObryvwEWnc30vU9T0wVdqMen3Wi7i +nrXT9RA0gMl5Svjn9Vx0LVTd8UHLFiBv2U68N+Gi9khklFi4FVQzPly/FshF +Kj7vHLyD/4HNl97TtfO5iLn4sFTpGIBKx0LTj24ukhutXi5HswBlKa7aBqVB +FK5v+jlTywqEj3ffnmEMItr470apEWtIVFBYpVsxiO5ahC3Pb9sBEyqraLVi +Q6hgNuh5SZYNkIEWFmeChtCC+eq3DfG7oA5FaFl3D6EvPHzf+/zswZByVNfF +dhiFrDmUnqC2G0pW+cUqPhlGpYGNz7KTHGE8w+58q/kIipqRn9cOdAL/XwnX +aS9H0JztdvfX+53BqCnJ1mvfKNrqlWHOcXIB+4i+BL4fo6hD/nJQg74r5DyZ +n8rJHEMKN0/WFm1wA73jEloi5uOomq1l5yDmDnNOwfwbRsfR2q4p/8hxdxAP ++OF4OHcC6WdnlNxg74HiXKF1Ll6T6DL/jG5mvQdk83m/vCQyhR6ab+pJeuQJ +Oys2e/uHT6FcozMSv4v3wuvRQYWxL1Oo7VPhKf0UL/g3eXSZg8V39MA+T/3w +8X1AKc3+1XbvO/p+0IUnhOEN/G6VhYurp9HcdkrAhKUPCKYl3kiNn0ZF4x8X +wgz3Q9uCSdm1iWnkca2Q7i3qC6Wvd6+nu82g+xW79vMl+0Ju+tDJny9m0FbF +jh+nf/jCh9d3tjVrziI1tn/Pf4F+8HzFacHopFk0IHJgd16/H8h4C7yrGJxF +7WkO9B1uNFgz3CpjYTaHslj5IhHtNPB0TC2OyZ5DtXWLP+g2dBjfC97R/XNo +1T5I1n9MB6bizZ3p6iRSln7dtqaWDhbUY7IXNUik12K/WrCODiVjD22vaZLI +2dTr9ofndEgvyOCUbSBR1prI5tg3dEicK+h9uZFECl/urGr8QId1gnl3uwxI +pO4jl7tvng6mHd1mMVYk2uo7UZRkwIAiQ/3kQT8S3bw4FeZgyICNG2J8HtFI +JN05bSZnzADdt/SCM3QSTVjPdxVtY4DLVEi0NpPE3y+eZS0WDOiYk3MmAki0 +cl7CU9KJAf15SvHPQkg0kLplRf5BBuSJ6zYKRJMorSYmsPomAyRkmoebM0h0 +kJqzlVXEgOCZzp7wTBLZ3S5fYVzMgEf1ZkZK50kknMO9XXWXAQ8312wOziJR +UqjjyMNKBlw8/4nCl0OiGIr6gQcvGBBTfFhEJo9EQTnNwRW9DGCJj9S9LiSR +zUquaSibASEb0tjeN0m0IYlHjPqNATfV3wbOYHNDt9wt5zDA9+3tijVFJPJz +yB+/N8YApy8vFQKKSeQhEBZS9pMBdvUqG7+VkmhHmMLhElkmfFRtyaZVkehF +/inbzNVMOClwNGUK27RlWp2lwATfssbm2Gq8XhrNHy3XMmFPLFvtwiMSyXdH +W37SYEJC3gHDuhoSjZp8kRXewoR//evejD4l0Tneq0/8XZiQN7nQXfMa979J +NNfejQmitTFF1EYSJXqxQvX3MME2avZJETar0nH94l4mlIu4VmW+wfUTyzIu +0Jiw33yE7d1MIv0mGuPlESYUldxbaG8lUXeGhohaOhN+ZK1LpbwjUSkSCxjK +YILbm7DQE9iJ47MNd88zYfmoeUUPNtWmIc44hwmNdAHz0+/x+vHQp+2vMKHB +zOJibzf+rzp09SOrhAldnFcaQT0kUlL6n6FZKRP8FquKq7Fnmw6d57vHBBZL +7rTgJxJd10T2afeZUKvU73QV+8+XL89uPGbCt/BFiZbPJKq0UyxqbWRCfoIt +4v9KorM/eQWympggqyPjuhObVjTi59nChBPR9OdnscX5HysOtDEBProWirNJ +FFzjce7HeybYNMpmSPaRSE3rQqQ6hwndwdwx8huJfnbHdg5zmVCR331Sr59E +7UlMvbIhJkjPnQgNxI7rMxjZOsaElG097h+xe3I7vXfPMOEOj7NJ+QCJMpdL +WEctIyDMToRuziVR7fQXr3A+AnITw3ojsAe/FIeGCBAgUOGRfBvbtNLqKm0F +AcJKhN/KQbzffFm/bCUI8BDT3dKKLW5nLWktRcAfDyXF39jbjCQpSIaAS27r +dSlDJEoXK3HXlydgubbPp+PY2x5/LVdUIaDGU9NJc5hERGFJo4waAdWt1Vfs +sdPTj31dpUHAsUFx+XBsLiElxk8hoCN49Hzd0nOpHQFjegRYoh3XbEZI9Piv +VDyXSsD7bl7XIGzOMDubbUCAka2p/hlsk2dR9V3GBNx8I3T0NfZAcOnaJ0AA +1dBAyngUn3eP6C1VFrge7RUUZ+ytljvtyq0IyIlTOXAAO03+27HCnQSIzfCG +X8Ku5i9Lz7clgDn31KQCu38y+tZFO9yvbJFOI7bxK5l3qY4ExL7oz/mOTSv/ +NprsTIDMx42rBMZIlJpXxnvClYCjmikVctjfQm30Ij0IcHgTFWuCLeYju+Pw +XgJs3JcV2mIb2/R7B+3D40+nLHgujV8Xe9bHl4CgS9fUIrGrhW2ve9AIcPNR +/3ViKW9O9pEzg4C+1Mt/05by+vrb7AgCElSEdf9dymu5x90eQIDBdv/TBdi0 +qtg/EETACZ8K8dKl/Ou20tuCCYjgHa5/uJSfKqe9JYSA8kWhG3VL+awB802H +CXD3FC99iS3KKPeghBKgsPPPQDO20e64Q2rhBJiYtO74bynfZNcppUgCznYm +vH+HnaKx+rIci4CD47IZH7EfinPuS0QR0Hoh5ehn7L5f5U0iMQToSX873buU +PxjXJxBHQOFX2cav2IYduxYW4wnoLNKisrH/DzGnFkQ= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd0bB3CZkqHMQspcl0iXkLz2Y6oImSMRdziGpDJ1M6bIr0KI6E1p +oCQRKYo0UAnhRSmVrrjXPGQ4NPptf5x11medtb/nefZw1lGhHXJm8vLw8Azh +a+l+pFV3fVV7q5kZi6POfs5BZhMFW2hWJcjK9tieJbPzDbPUrWrRqd2bJ5fs +yHgrKKr/EumliI31YZez4usFrFqQ8vKVDv3Yp1+tfhZf/B/6/YYqw8F+1H7k +ym/qO6TXF20+iD3S0xRzrOYD6vYa7hjGVuCoeZGWn9Horug3Y9i7JmO2hrV8 +RctfbdaYwq77PSLCKu5DRX2i3Bns9wly0Q9D+tFItajoAvaEoNXILJWD6gM2 +5/zGFkw57Kk/z0Vs8ejkZS84aK3E5cYjNUPoSefwZ0FsB0Xy5oTlGFI1N6qS +xCauqsrqCE0gNzNZU3nseI3dSQdaJtGFXwqaytgf5Lo2hxd/R7XHLlA2YTP2 +BgWeT5lGwTfELI2wp/J4rlWEzKAYnzvPEbaQqo74d+ocSmJ5TThhZzHqd4jL +kGi7e0ieF7byLc/4TfMk6nlRVMbENt54auJgzQLyZmQLRGMHGH5tGbH8jSbV +3Q8VY8+yIviFNf+g1Bd3t1dhH68RMaUI/UXSIZtONmDngvEd/5ZFdJlWoc1e +qq+w0Sq0eBnIn3pusqaeg4pfnWcnKPKCgVX4to3YU4M+MRkpvGCNXK+ZYsdo +zd2/F8IHWtWX83yws8pU1CapAhDRR3e6hd3TPlb394YA5F1NjX6MrTxdtXel +jCB0RQ8Jt2KXGDhk6swLwuRtfU8Su+FR1LLgGiEoZW2q3NXAQXP1nV+HLEVh +fZwFY8VLDpK0ExWPrhOFDy7WIhrYel1WILZVDCTULSjm2EEDD65u1l0Jlbt1 +mqKwD/O26P0jKg5PB/vzZ7A5qqXfk0gJkNYou/TrFZ4fomlFm74kSNx7WbH2 +NQfx3uGqrD4iCTx7uWCBray/zrl4VBKKc2xfnMHea5le0cqWAufAp54qjRzU +Rg8Nk2uWATXj4M+MNxzUeyvtrK+QLMDyB4xz2GOjxTduW8uCd68i4zG2cHh/ +57ZnskBTtWmUaOIgq0RXA98HctBmaaP5CvtxgeFcUb48aO/UNLFu4aACzs9I +k3AlsPOzbclr46Cdbsm9YXeVIC14W2AH9liD1Pa7XCUwNdMPEWrnIIOCjTLK +nmvBTu+fexHYDTSf+wJm66Dz7YC0238cND3JPjp0Uhn2KrD91ndykNRBq8r7 +9qogncgnq9DNQdwC4QDHIFVYYzz0cB929ed2xfFTqtDDFXqWj73Pzvuk5jNV +qMkWEFn/AdenHel8kaoGx+KUE00+4veP3JqKk1MH4lEyf8QnDnL1F9Gx7dOA +iDRBO2M2B6FIN+qePxpgg+T9T2FrJeUbMeQ1IVb6IrcLm+eGvkWckyaUHhiS +DOvjoLu9XnsqnmtClByPSuU3fD7dSxIUrq8H/qlxaRsOrs/K/v0IjQJByooH +6kY46IZLzqf5OArYRPCslh/loDRaH5v/EgXiSi9SwrEZxyNG13ZSgMfue5T2 +GAdJ1F7mcbHUgopNrPdXxvH+0Z/QqlHThtJk/rDcKQ5SVD0Xf3ZgI2TOXHDp +Jjmo9sws5QevDjz4yfDbMY/nY8azi1DRAbCW4FZhX2lQp1j46ECWo6Trvwsc +pOr/uGOhWweEymXrGT9xvyUcDaJZF/6OG06t+stBSoprCWVPPQgynM1/KsBF +GwvDRX8hKuwXm9+QJMtFNMbJOR0HKnSK5J5bIcdFuWqZvb77qJBwM9snDZvv +etm9VywqPCIqt1xczUU9V0ZcM8upYJvObryvwEWnc30vU9T0wVdqMen3Wi7i +nrXT9RA0gMl5Svjn9Vx0LVTd8UHLFiBv2U68N+Gi9khklFi4FVQzPly/FshF +Kj7vHLyD/4HNl97TtfO5iLn4sFTpGIBKx0LTj24ukhutXi5HswBlKa7aBqVB +FK5v+jlTywqEj3ffnmEMItr470apEWtIVFBYpVsxiO5ahC3Pb9sBEyqraLVi +Q6hgNuh5SZYNkIEWFmeChtCC+eq3DfG7oA5FaFl3D6EvPHzf+/zswZByVNfF +dhiFrDmUnqC2G0pW+cUqPhlGpYGNz7KTHGE8w+58q/kIipqRn9cOdAL/XwnX +aS9H0JztdvfX+53BqCnJ1mvfKNrqlWHOcXIB+4i+BL4fo6hD/nJQg74r5DyZ +n8rJHEMKN0/WFm1wA73jEloi5uOomq1l5yDmDnNOwfwbRsfR2q4p/8hxdxAP ++OF4OHcC6WdnlNxg74HiXKF1Ll6T6DL/jG5mvQdk83m/vCQyhR6ab+pJeuQJ +Oys2e/uHT6FcozMSv4v3wuvRQYWxL1Oo7VPhKf0UL/g3eXSZg8V39MA+T/3w +8X1AKc3+1XbvO/p+0IUnhOEN/G6VhYurp9HcdkrAhKUPCKYl3kiNn0ZF4x8X +wgz3Q9uCSdm1iWnkca2Q7i3qC6Wvd6+nu82g+xW79vMl+0Ju+tDJny9m0FbF +jh+nf/jCh9d3tjVrziI1tn/Pf4F+8HzFacHopFk0IHJgd16/H8h4C7yrGJxF +7WkO9B1uNFgz3CpjYTaHslj5IhHtNPB0TC2OyZ5DtXWLP+g2dBjfC97R/XNo +1T5I1n9MB6bizZ3p6iRSln7dtqaWDhbUY7IXNUik12K/WrCODiVjD22vaZLI +2dTr9ofndEgvyOCUbSBR1prI5tg3dEicK+h9uZFECl/urGr8QId1gnl3uwxI +pO4jl7tvng6mHd1mMVYk2uo7UZRkwIAiQ/3kQT8S3bw4FeZgyICNG2J8HtFI +JN05bSZnzADdt/SCM3QSTVjPdxVtY4DLVEi0NpPE3y+eZS0WDOiYk3MmAki0 +cl7CU9KJAf15SvHPQkg0kLplRf5BBuSJ6zYKRJMorSYmsPomAyRkmoebM0h0 +kJqzlVXEgOCZzp7wTBLZ3S5fYVzMgEf1ZkZK50kknMO9XXWXAQ8312wOziJR +UqjjyMNKBlw8/4nCl0OiGIr6gQcvGBBTfFhEJo9EQTnNwRW9DGCJj9S9LiSR +zUquaSibASEb0tjeN0m0IYlHjPqNATfV3wbOYHNDt9wt5zDA9+3tijVFJPJz +yB+/N8YApy8vFQKKSeQhEBZS9pMBdvUqG7+VkmhHmMLhElkmfFRtyaZVkehF +/inbzNVMOClwNGUK27RlWp2lwATfssbm2Gq8XhrNHy3XMmFPLFvtwiMSyXdH +W37SYEJC3gHDuhoSjZp8kRXewoR//evejD4l0Tneq0/8XZiQN7nQXfMa979J +NNfejQmitTFF1EYSJXqxQvX3MME2avZJETar0nH94l4mlIu4VmW+wfUTyzIu +0Jiw33yE7d1MIv0mGuPlESYUldxbaG8lUXeGhohaOhN+ZK1LpbwjUSkSCxjK +YILbm7DQE9iJ47MNd88zYfmoeUUPNtWmIc44hwmNdAHz0+/x+vHQp+2vMKHB +zOJibzf+rzp09SOrhAldnFcaQT0kUlL6n6FZKRP8FquKq7Fnmw6d57vHBBZL +7rTgJxJd10T2afeZUKvU73QV+8+XL89uPGbCt/BFiZbPJKq0UyxqbWRCfoIt +4v9KorM/eQWympggqyPjuhObVjTi59nChBPR9OdnscX5HysOtDEBProWirNJ +FFzjce7HeybYNMpmSPaRSE3rQqQ6hwndwdwx8huJfnbHdg5zmVCR331Sr59E +7UlMvbIhJkjPnQgNxI7rMxjZOsaElG097h+xe3I7vXfPMOEOj7NJ+QCJMpdL +WEctIyDMToRuziVR7fQXr3A+AnITw3ojsAe/FIeGCBAgUOGRfBvbtNLqKm0F +AcJKhN/KQbzffFm/bCUI8BDT3dKKLW5nLWktRcAfDyXF39jbjCQpSIaAS27r +dSlDJEoXK3HXlydgubbPp+PY2x5/LVdUIaDGU9NJc5hERGFJo4waAdWt1Vfs +sdPTj31dpUHAsUFx+XBsLiElxk8hoCN49Hzd0nOpHQFjegRYoh3XbEZI9Piv +VDyXSsD7bl7XIGzOMDubbUCAka2p/hlsk2dR9V3GBNx8I3T0NfZAcOnaJ0AA +1dBAyngUn3eP6C1VFrge7RUUZ+ytljvtyq0IyIlTOXAAO03+27HCnQSIzfCG +X8Ku5i9Lz7clgDn31KQCu38y+tZFO9yvbJFOI7bxK5l3qY4ExL7oz/mOTSv/ +NprsTIDMx42rBMZIlJpXxnvClYCjmikVctjfQm30Ij0IcHgTFWuCLeYju+Pw +XgJs3JcV2mIb2/R7B+3D40+nLHgujV8Xe9bHl4CgS9fUIrGrhW2ve9AIcPNR +/3ViKW9O9pEzg4C+1Mt/05by+vrb7AgCElSEdf9dymu5x90eQIDBdv/TBdi0 +qtg/EETACZ8K8dKl/Ou20tuCCYjgHa5/uJSfKqe9JYSA8kWhG3VL+awB802H +CXD3FC99iS3KKPeghBKgsPPPQDO20e64Q2rhBJiYtO74bynfZNcppUgCznYm +vH+HnaKx+rIci4CD47IZH7EfinPuS0QR0Hoh5ehn7L5f5U0iMQToSX873buU +PxjXJxBHQOFX2cav2IYduxYW4wnoLNKisrH/DzGnFkQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6799164505607747, 1.432830997432167}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6799164505607762}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6799164505607747, 1.432830997432167}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6799164505607762}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd0bB3CZkqHMQspcl0iXkLz2Y6oImSMRdziGpDJ1M6bIr0KI6E1p +oCQRKYo0UAnhRSmVrrjXPGQ4NPptf5x11medtb/nefZw1lGhHXJm8vLw8Azh +a+l+pFV3fVV7q5kZi6POfs5BZhMFW2hWJcjK9tieJbPzDbPUrWrRqd2bJ5fs +yHgrKKr/EumliI31YZez4usFrFqQ8vKVDv3Yp1+tfhZf/B/6/YYqw8F+1H7k +ym/qO6TXF20+iD3S0xRzrOYD6vYa7hjGVuCoeZGWn9Horug3Y9i7JmO2hrV8 +RctfbdaYwq77PSLCKu5DRX2i3Bns9wly0Q9D+tFItajoAvaEoNXILJWD6gM2 +5/zGFkw57Kk/z0Vs8ejkZS84aK3E5cYjNUPoSefwZ0FsB0Xy5oTlGFI1N6qS +xCauqsrqCE0gNzNZU3nseI3dSQdaJtGFXwqaytgf5Lo2hxd/R7XHLlA2YTP2 +BgWeT5lGwTfELI2wp/J4rlWEzKAYnzvPEbaQqo74d+ocSmJ5TThhZzHqd4jL +kGi7e0ieF7byLc/4TfMk6nlRVMbENt54auJgzQLyZmQLRGMHGH5tGbH8jSbV +3Q8VY8+yIviFNf+g1Bd3t1dhH68RMaUI/UXSIZtONmDngvEd/5ZFdJlWoc1e +qq+w0Sq0eBnIn3pusqaeg4pfnWcnKPKCgVX4to3YU4M+MRkpvGCNXK+ZYsdo +zd2/F8IHWtWX83yws8pU1CapAhDRR3e6hd3TPlb394YA5F1NjX6MrTxdtXel +jCB0RQ8Jt2KXGDhk6swLwuRtfU8Su+FR1LLgGiEoZW2q3NXAQXP1nV+HLEVh +fZwFY8VLDpK0ExWPrhOFDy7WIhrYel1WILZVDCTULSjm2EEDD65u1l0Jlbt1 +mqKwD/O26P0jKg5PB/vzZ7A5qqXfk0gJkNYou/TrFZ4fomlFm74kSNx7WbH2 +NQfx3uGqrD4iCTx7uWCBray/zrl4VBKKc2xfnMHea5le0cqWAufAp54qjRzU +Rg8Nk2uWATXj4M+MNxzUeyvtrK+QLMDyB4xz2GOjxTduW8uCd68i4zG2cHh/ +57ZnskBTtWmUaOIgq0RXA98HctBmaaP5CvtxgeFcUb48aO/UNLFu4aACzs9I +k3AlsPOzbclr46Cdbsm9YXeVIC14W2AH9liD1Pa7XCUwNdMPEWrnIIOCjTLK +nmvBTu+fexHYDTSf+wJm66Dz7YC0238cND3JPjp0Uhn2KrD91ndykNRBq8r7 +9qogncgnq9DNQdwC4QDHIFVYYzz0cB929ed2xfFTqtDDFXqWj73Pzvuk5jNV +qMkWEFn/AdenHel8kaoGx+KUE00+4veP3JqKk1MH4lEyf8QnDnL1F9Gx7dOA +iDRBO2M2B6FIN+qePxpgg+T9T2FrJeUbMeQ1IVb6IrcLm+eGvkWckyaUHhiS +DOvjoLu9XnsqnmtClByPSuU3fD7dSxIUrq8H/qlxaRsOrs/K/v0IjQJByooH +6kY46IZLzqf5OArYRPCslh/loDRaH5v/EgXiSi9SwrEZxyNG13ZSgMfue5T2 +GAdJ1F7mcbHUgopNrPdXxvH+0Z/QqlHThtJk/rDcKQ5SVD0Xf3ZgI2TOXHDp +Jjmo9sws5QevDjz4yfDbMY/nY8azi1DRAbCW4FZhX2lQp1j46ECWo6Trvwsc +pOr/uGOhWweEymXrGT9xvyUcDaJZF/6OG06t+stBSoprCWVPPQgynM1/KsBF +GwvDRX8hKuwXm9+QJMtFNMbJOR0HKnSK5J5bIcdFuWqZvb77qJBwM9snDZvv +etm9VywqPCIqt1xczUU9V0ZcM8upYJvObryvwEWnc30vU9T0wVdqMen3Wi7i +nrXT9RA0gMl5Svjn9Vx0LVTd8UHLFiBv2U68N+Gi9khklFi4FVQzPly/FshF +Kj7vHLyD/4HNl97TtfO5iLn4sFTpGIBKx0LTj24ukhutXi5HswBlKa7aBqVB +FK5v+jlTywqEj3ffnmEMItr470apEWtIVFBYpVsxiO5ahC3Pb9sBEyqraLVi +Q6hgNuh5SZYNkIEWFmeChtCC+eq3DfG7oA5FaFl3D6EvPHzf+/zswZByVNfF +dhiFrDmUnqC2G0pW+cUqPhlGpYGNz7KTHGE8w+58q/kIipqRn9cOdAL/XwnX +aS9H0JztdvfX+53BqCnJ1mvfKNrqlWHOcXIB+4i+BL4fo6hD/nJQg74r5DyZ +n8rJHEMKN0/WFm1wA73jEloi5uOomq1l5yDmDnNOwfwbRsfR2q4p/8hxdxAP ++OF4OHcC6WdnlNxg74HiXKF1Ll6T6DL/jG5mvQdk83m/vCQyhR6ab+pJeuQJ +Oys2e/uHT6FcozMSv4v3wuvRQYWxL1Oo7VPhKf0UL/g3eXSZg8V39MA+T/3w +8X1AKc3+1XbvO/p+0IUnhOEN/G6VhYurp9HcdkrAhKUPCKYl3kiNn0ZF4x8X +wgz3Q9uCSdm1iWnkca2Q7i3qC6Wvd6+nu82g+xW79vMl+0Ju+tDJny9m0FbF +jh+nf/jCh9d3tjVrziI1tn/Pf4F+8HzFacHopFk0IHJgd16/H8h4C7yrGJxF +7WkO9B1uNFgz3CpjYTaHslj5IhHtNPB0TC2OyZ5DtXWLP+g2dBjfC97R/XNo +1T5I1n9MB6bizZ3p6iRSln7dtqaWDhbUY7IXNUik12K/WrCODiVjD22vaZLI +2dTr9ofndEgvyOCUbSBR1prI5tg3dEicK+h9uZFECl/urGr8QId1gnl3uwxI +pO4jl7tvng6mHd1mMVYk2uo7UZRkwIAiQ/3kQT8S3bw4FeZgyICNG2J8HtFI +JN05bSZnzADdt/SCM3QSTVjPdxVtY4DLVEi0NpPE3y+eZS0WDOiYk3MmAki0 +cl7CU9KJAf15SvHPQkg0kLplRf5BBuSJ6zYKRJMorSYmsPomAyRkmoebM0h0 +kJqzlVXEgOCZzp7wTBLZ3S5fYVzMgEf1ZkZK50kknMO9XXWXAQ8312wOziJR +UqjjyMNKBlw8/4nCl0OiGIr6gQcvGBBTfFhEJo9EQTnNwRW9DGCJj9S9LiSR +zUquaSibASEb0tjeN0m0IYlHjPqNATfV3wbOYHNDt9wt5zDA9+3tijVFJPJz +yB+/N8YApy8vFQKKSeQhEBZS9pMBdvUqG7+VkmhHmMLhElkmfFRtyaZVkehF +/inbzNVMOClwNGUK27RlWp2lwATfssbm2Gq8XhrNHy3XMmFPLFvtwiMSyXdH +W37SYEJC3gHDuhoSjZp8kRXewoR//evejD4l0Tneq0/8XZiQN7nQXfMa979J +NNfejQmitTFF1EYSJXqxQvX3MME2avZJETar0nH94l4mlIu4VmW+wfUTyzIu +0Jiw33yE7d1MIv0mGuPlESYUldxbaG8lUXeGhohaOhN+ZK1LpbwjUSkSCxjK +YILbm7DQE9iJ47MNd88zYfmoeUUPNtWmIc44hwmNdAHz0+/x+vHQp+2vMKHB +zOJibzf+rzp09SOrhAldnFcaQT0kUlL6n6FZKRP8FquKq7Fnmw6d57vHBBZL +7rTgJxJd10T2afeZUKvU73QV+8+XL89uPGbCt/BFiZbPJKq0UyxqbWRCfoIt +4v9KorM/eQWympggqyPjuhObVjTi59nChBPR9OdnscX5HysOtDEBProWirNJ +FFzjce7HeybYNMpmSPaRSE3rQqQ6hwndwdwx8huJfnbHdg5zmVCR331Sr59E +7UlMvbIhJkjPnQgNxI7rMxjZOsaElG097h+xe3I7vXfPMOEOj7NJ+QCJMpdL +WEctIyDMToRuziVR7fQXr3A+AnITw3ojsAe/FIeGCBAgUOGRfBvbtNLqKm0F +AcJKhN/KQbzffFm/bCUI8BDT3dKKLW5nLWktRcAfDyXF39jbjCQpSIaAS27r +dSlDJEoXK3HXlydgubbPp+PY2x5/LVdUIaDGU9NJc5hERGFJo4waAdWt1Vfs +sdPTj31dpUHAsUFx+XBsLiElxk8hoCN49Hzd0nOpHQFjegRYoh3XbEZI9Piv +VDyXSsD7bl7XIGzOMDubbUCAka2p/hlsk2dR9V3GBNx8I3T0NfZAcOnaJ0AA +1dBAyngUn3eP6C1VFrge7RUUZ+ytljvtyq0IyIlTOXAAO03+27HCnQSIzfCG +X8Ku5i9Lz7clgDn31KQCu38y+tZFO9yvbJFOI7bxK5l3qY4ExL7oz/mOTSv/ +NprsTIDMx42rBMZIlJpXxnvClYCjmikVctjfQm30Ij0IcHgTFWuCLeYju+Pw +XgJs3JcV2mIb2/R7B+3D40+nLHgujV8Xe9bHl4CgS9fUIrGrhW2ve9AIcPNR +/3ViKW9O9pEzg4C+1Mt/05by+vrb7AgCElSEdf9dymu5x90eQIDBdv/TBdi0 +qtg/EETACZ8K8dKl/Ou20tuCCYjgHa5/uJSfKqe9JYSA8kWhG3VL+awB802H +CXD3FC99iS3KKPeghBKgsPPPQDO20e64Q2rhBJiYtO74bynfZNcppUgCznYm +vH+HnaKx+rIci4CD47IZH7EfinPuS0QR0Hoh5ehn7L5f5U0iMQToSX873buU +PxjXJxBHQOFX2cav2IYduxYW4wnoLNKisrH/DzGnFkQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6799164505607747, 1.432830997432167}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6799164505607762}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6799164505607762}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6799164505607747, 1.432830997432167}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9913440619685707`*^9, 3.994085128290843*^9, + 3.994350104293462*^9, 3.994353215496612*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"058a400e-43db-4afe-88f4-020b4f2a4b6c"] }, Open ]], Cell[CellGroupData[{ @@ -6119,340 +6596,172 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501659425144`*^9},ExpressionUUID->"06bd0169-a5a6-404c-935d-\ -e1a61565f71e"], + CellChangeTimes->{3.9918501659425144`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7414575136308495`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.4597402489669437`*^-269\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 418, - 441, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621885586`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350104957159*^9, + 3.994353216027693*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], +In[95]:=",ExpressionUUID->"3410f8c8-21d0-4736-a8c9-c9e8e7fee6ca"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.133412609607657`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"9.178824484986001`*^-281\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 418, 442, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621975574`*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350104957159*^9, + 3.994353216037455*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], +In[95]:=",ExpressionUUID->"5d45c9ae-02f9-4965-a459-580ba5dc195c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.599262146182568`*^-296\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.771630876507155`*^-292\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 418, 443, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991344062205559*^9}, + 2, 95, 11, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350104957159*^9, + 3.99435321604797*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], +In[95]:=",ExpressionUUID->"5a09b138-5468-400e-9616-5f168dedb7fe"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 418, 444, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134406221356*^9}, +during this calculation.\"", 2, 95, 12, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350104957159*^9, + 3.994353216056685*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], +In[95]:=",ExpressionUUID->"f12cda2c-d830-4f68-a065-4961a3e79f8e"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c4VW8cAHDRkIyyru3e63YJ2SOu6/tFyR7ZW2ZTKg1UqIxUUhRKSIiQ +ey4NqRQKGalUpCj6NYSUUZT8Tn+d5/M87znPe97zXYcWtGNDKC8PD4/sAh6e +f9fp/tYmxvEi0+T+2beBIuam3XlS0WY9h6GPz/WIyGkqoMSTIKmeM8A61xD3 +JV0L9jpdfcXXUwjf8vXfPklHWDFGOTPzigs3Y6SOlaY7wcAdhx2Trxrgd97M +C9X0QLBkDL/9/uoZXDlOmbVIi4SZV4Znx18NQpDa8AVuUjw0Wlwpelo4AQPf +KvzKJE6D3EDtxyD1ORCpvafmviIHxLcFXF1iwYdXBprcatcVwBltyzoHN34M +lVi0R0GsCHqzte5/Xy6EKUqtHrvdr8DxorgnvNIrsMZhTEzv6FWgZA4dy7go +hmVLZv6+M6kEKbXrR3+ViGGi5K1LppaVINOQFOfHEcMKT3Ovc46VoDC+ao9y +oxj6Nc4t0AuqhJV2kYF1n8XQyjNEWiW5EnQXzhkM6YpjwFPxjT+eVIJjlOQH +ncfi6Hdr/8Mlftcg2dXa9Nm0BN7mtE7Nh1SBTE2nDO8CSXTY9Ejs6PYquCbm ++lN7mSQalvtM8eytgpfP/DmnFSVxUuz5/IekKmA4R9GdrSTRRIAp415aBQ32 ++Yu7ciQxf2bwWt+XKpiznOrsMKHgs90heTd1OZBeElM+Z0lB/+W5KomGHGAs +5klZ7UxBl2TrpY4sDtg9FDA7GUpBzarp9lfmHDhvQa22S6NgQUmM+11nDqxB +26y2AQoySgvZPREc2G10KaD1sBTyhhnP25ZwwKZAeNL2hBR2zS1R31rGAfqS +AymdZ6VQ590FenIFB7q63YnnpVK44PzDbde5HNCIFOTr75TCNjWl3V/vceBz +yb6SHzLSaNOxmXX3JQd8xR1GZaul8U/ystSffAToxtYl5N2RxjMQ21e1mACB +QRVJ2iNpxHbx6ZClBNRW8QGzVxpTKiaTHgoTIGlbm641L40NrV+kAqUJ6Epg +6K2zlUFG7LTg79UErP02GxMxJIPl2cFDLa4ERFtlqj4YkUHrru63wh4EXLu0 ++rXYtAx++1jd5OxFgJRroFEtvyxWHPTz7PQjYOTWw598GrL41P3PhcIwAjIO +p0fl7JdFoXbWnZv7CBiUYEY0Ccmhdr5ux9ksAig76uUpFDlk7rSvic4hwK7F +s2MzVQ5ZTSfTvC8QcCPmuLqIrhwaPTojL5ZPQOrA+LCXpxy2V7hUBpQQoFNW +F/6tUA6/HSl8HlZDQIKJ80aZNfK45sSfMM1OAqz8834Ymsuj5Rfvxc+fECAc +//WIm508ZizeIbP7KQG5jYkl6YHymHrsYmFpNwG3bG5/XXxMHptun8UvrwkY +91TaO9ErjzlWFfQHHwkyTyOXrPggj9yrJ63UPxNwKPdutsaYPI5pG3/N+EKA +4DuPus28CmhdTi3zHCFAOfwEzztVBWzWy5S89Z0A/z1Tqe2xCsgQUzN88puA +lVnmcsOJCqjssHI779y/8ztVuSRdAbPoUqt0/hIQ82dVl3mRAtpGeuon83Dh +7BF/idp2BayuzuQsWcSF9tPN+cXyihgoOl0fJMSFjGpx7UZlRUwKeFfgL8wF +7xcbG95pK2K5CY+ohwgXPkv9+SBrqYjxqplX2Cu4wFegpXomQhHVLmpUvxfn +gvG1nJpD9YqoOnDqc6IsF9a+6pwba1HEqKjr/KZyXHDgWbg+4JkiHn9xSW+C +dPCGiF74TxGvVepxXRW4YBlLi4tfREVmuJ7bJJULbSJ3Lq8RoKJf64EPmTQu +OBW5t4wLU9GsdstRHToXfDqOr9goRcVt1TW/QpS4EKk4fdlMjYpFrOymkpVc +mKpOb5nRpOIGgfxhTSYXYqzURgk98n57L+YN0ok7Aw3oplT0+HHgfa0yF843 +Pm7hdabirMft/XmruKDoGTp6242Kya6n/ZercqFoZH7Fbm8qRkx4BMSRrpLQ +9xkKpuLvuoAaVzUuNIXnjzbupaJPjE79G3UuWP8xEj0QS8Xc096nDFdzoTO9 +20AvnopL3vXFnSLdW7s0vugYFUf0K5oMNLjg71BU5JtGxXpef5kk0h8GTVvF +M6gYn66R8Yz02LIo0cRcKrqIzIwHaXJhd4GwIfsSFSvW+7wqIf1Lr8xnqpiK +eZ0VQ59I8/n3F4VWUfFhz1TkRi0upPzY3ypfQ8Wbkj4TOaSFk8XGXtyiYhvl +eN4T0lIcK0PLBipWW2rs0tHmwsW1Qz5/H1GRkimeG0Ca3nsw/kYbFXsHy78f +I126Xao4oouKFyOqdhOkV/NWtzJfUNFBvo/+kjT3nP1Yfy8V6w59nf9Jeo3a +Z9GsfiqZzxeXUXS4cLf+sKHjEBW9PlVZ6pI2d5X3XfKZijo+7wg70s2fb8bX +j1CR6j1mH0za7uCG4n3fqah/L0d2H+lnK0ZbNaepmMV/WTaFtEdJ8tinWSr+ +DWxzOEf6jTFdrGCeilZnu69fIh305I6h50Ia/pVKcL5K+lOwh+/ypTTsXphJ +55De9ut7fIsQDVmST1dVkzbeGSb5UZSGvdQWu3/mH35dzidFw7OMIdV/618G +OZrR5Gl4aFb+YRnp4r7Gl6Z0Gnr67pErIB3lumabrzINR4Y+amf8e7+OigUx +6jS0Edi5+Ajp5Za0rCxtGooqi13YQbr/3ln16wY0fLKjY9yTdIWhQMMzFg2V +fxbwA+kYziGPcaQhVJwaopG2WjUxImRJwwmv3MMLSEsWhh9Ws6XhypLHH9+S +5/1B5g3F2omGC1corrj573tkOFWGudHQbzKP9yRpx0SjnksB5POajUGTtMLf +yu31ITTsvxx64jcZDyN76XxvN9Ow9GlvUdO/+Nm0TEMqiobT2g9Z9qTd38c1 +6kfT8NiCDXcESTO8Jz1dDtFw0ttFsJWMv/u2b4+kpdDw8Z9PCmtIpzU5S1ec +pKFCbNbQMBnPvuxH11rP0LB2dCL2POkZjarehRdpOCU6pTZO5oeOaIJmLEHD +DnuRK3vIfOI5PtWUfYOGgqUUZRHSnXxbvG/U0TCuJORIMZl/W6c2JH5/SMOH +qcovWv7law+jL/w1uf7ezO8vKlzY5ZwTmThAw43Rjw9sIY2PhRZf/kDDnYpX +Bz+R+f+2blqrf4yGPLwCQb1kfZDMb0ly5aPj6cuXHLIY5HlS2HK7+Ok48syI +Mk/WG246QZwSoiPX6U1HMGnHw+ffPKbQsUKtfSmDrE8podt0zNTpOBrq+iZO +kXw/teX9q93oeD3BZaxYmgvTF2USdL3p+FTep/udFBcmRVYyjALoKG5d91KK +9NiE0Za1m+lo9HdOL16SC4N1wdPeB+moVDO3V12MC49tbwqnFNPxtnqC8J9l +ZL7cfUCcvEpHlX3JZktJN2m2u2ZU0RHCRC+LCXDhntj783m1dNzwwn1akZ/c +f5+A8vUOOi7+pfhXciFZ/7b6w+AUHUXMnmfHkf0l6+2mwU+zdDw6poWBswRk +Ou5OHJ2no4XEaxXTGQLSdFPafi1VwpsXuhu+TxNw+DfhIaKghLIWP4zX/CBg +6/FFkSaWSmj/tcfagux3JuUVBefOKWFe+JYI72cE9FHL89ddUELvDlbn3y6y +X50ry5vMV0LJmvcjBWS/vZlQkruhTAkl/Ou39LeT/dqzIFv4jhJqbAtJNG0m +YNWizPSk90pY9/u4XGYdOZ8ExMbvVWeghXmpRG4hAde7o+NWajPQ8ISX02wB +Aa42+w916zOw14651Z2cB87o7zmgAwwcNHRax59LgJDgjv1jzgzcYlRatuEs +AQtrgyLD9jEw32I77UgyAd9FbQLdGxi4orPLxXsLAT3b6F1bmhkYeeS/S/ab +CLj/aBbi2hno1dyZbUrOL+kx5YqlLxnoN1CdJB1EgNag4MDMMAObQ0aOVZPz +TwTxxO+i2ErsUGdtirYiYNjRzedDyEpUWfAgxJ1BwIcTge67ljBxq6DNmuIX +HIgYVqdrCTKRuHWOafycAz/Xz4yOLmeim2aYd0cXBwT4ziRulmFi7qH1WWNt +HNCKbqwJXM3E+hLNZLkGDhwMZYo5ujBR722rlfI1DkiajjxRy2fixciASzyJ +HLD+ts/6PwNlfGrxxnGRBgdGgvl318SpINEa4m5w9xr5P0HhTW5YhfZC63gU +5ipAtIOZxvmmiqdylmVHYznIpVQ5GRioo8rX2N0nbMsgW81ouVj4anRqtxB6 +F3EFHsuY6U+c1sD5zMiW9PPFYCzXkK75UhMpoeFr64sugzBfYdTGw1q46tbl +OHxzCRQSFE28mNoo2J8jOjafD0tX+t7Y0KyNHfPyo/rJuaDBlq7a56eDQycl +H/6JzoFd/aKNNjy6aKFX5pkXfA6+TZxws87WRf27LdPTtRmwXvPReevVeih8 +ZNL2ostpuDfB+v2zUw8fOPdKtA+fhAh1nddPQ/XxjHZUqMC3Y8AeC+n2WmqA +A+bKhtOiSbCOIWUvVGiAdrEyFNf3h0ElPnV/g6EhmpnEHVknFw+qoUb1K18b +4l2zKvfH0zEQem/T0ZqdazCvWCr8Rc1eqC/oDvkuYYQjXwaUHtXtgsnS+Z+a +N43QmXZUPLU7AoJXli89b2+M4RmVvnbpmyHmof8WppMx7hwPtV0buxnSQ0Xb +uBuM0XF74WLbsM1wpzj6RJuHMUbuudxw1GQziDOtROY2GqPuDfmdpV82wSPm +f+KBe43xkSGHKLPcBKoqilRmvjFymIsTfJeFw3fVDAPuuDGq9DZUdt0NgZ52 +XCc2YYx3PZdv3lQZAvcjxlyipoxR7k2iz7KLIZDGtd5pMGuMEVHXO3YdCAFV +Y56K23wsbGMxTZtZIRBkvZ3WKMnCjX1BQgl3gqE7fL1gtwkLb7ptuyX8KAhu +Ff1+P5XCwlHFVhnbX4FgYBH10+Y4C+0bWLuahwPh+vsRwYKTLAyXsVazfxsI +XIV+Q5szLFxqblAZ1RAIFdn3T+ZdYGFS/FM/3ZOBUHAi0Wj9NRbyHWof2sII +hGNRIqezn7PQ6ejhIZNqf/Beq4QsBRNk7NS0m63zgblufuFGqgl+iUjNDb/s +AwWhY302SibY+8FG6HOqD3xMqt3nrWKCIuUMRbq3D+xqdayK1jHB86GxVdEz +3pDqcEDhlqUJ3nncN1rO8obbni/+6O0wwTpTR/vWDk+Q3Z5cq3HfBM277JR8 +me6QNh+mf7zBBFOmRnROirkD7xlL4lOTCT64UB/azuMOwzcWlRW0mmBaeeqK +PX1ucJvnaLbocxO0jdifGnHaDbwz4/dN/2eCz1yKXGfnXSG7Llr/3jI22rC1 +OGs+uYCEwDbC3oONjTy1x/a/cYYii4Mx415szM56ZUVrcwadg2kWGb5sfLVa +j7+31hkcxjkvejaycZdJi8+eLGdIejk1E7yNjcdupDECXZzhV2GceUwCG0cm +cx9MdjjBa1bG85JyNh4S0RDJv+AIm/YU5VpfY2Mbn8SfpAOOMH3teugIh40L +vHjNU/0cQZTe81P7Bhv3ji5PHlR0BFt+ebm799lYp7W17lWxA9zpLgl5/oKN +juPeCo037MFG+NbqvT1ssn+GyXrk2EPP+tZpqT42WnH0NBcdsIfJ219T/N+x +MYMia1dlZg+rL2lVfhlm41q303pGnXZw57XZ3hOjbLSN/XT/AmEHNuIuoDnO +Rsp/q5opZ+0gLHnP06gpNm59OjDh42sHk/eTzlN+sfHR/eIJJbSDw7NZwbdn +yf02/1FcxLCD5Xpl6n5zbPRyvRo6v8QO8rbfnpqfZ+MOmThCdMQW/gd34ePD + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6466,299 +6775,124 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13c4VW8cAHDRkIyyru3e63YJ2SOu6/tFyR7ZW2ZTKg1UqIxUUhRKSIiQ +ey4NqRQKGalUpCj6NYSUUZT8Tn+d5/M87znPe97zXYcWtGNDKC8PD4/sAh6e +f9fp/tYmxvEi0+T+2beBIuam3XlS0WY9h6GPz/WIyGkqoMSTIKmeM8A61xD3 +JV0L9jpdfcXXUwjf8vXfPklHWDFGOTPzigs3Y6SOlaY7wcAdhx2Trxrgd97M +C9X0QLBkDL/9/uoZXDlOmbVIi4SZV4Znx18NQpDa8AVuUjw0Wlwpelo4AQPf +KvzKJE6D3EDtxyD1ORCpvafmviIHxLcFXF1iwYdXBprcatcVwBltyzoHN34M +lVi0R0GsCHqzte5/Xy6EKUqtHrvdr8DxorgnvNIrsMZhTEzv6FWgZA4dy7go +hmVLZv6+M6kEKbXrR3+ViGGi5K1LppaVINOQFOfHEcMKT3Ovc46VoDC+ao9y +oxj6Nc4t0AuqhJV2kYF1n8XQyjNEWiW5EnQXzhkM6YpjwFPxjT+eVIJjlOQH +ncfi6Hdr/8Mlftcg2dXa9Nm0BN7mtE7Nh1SBTE2nDO8CSXTY9Ejs6PYquCbm ++lN7mSQalvtM8eytgpfP/DmnFSVxUuz5/IekKmA4R9GdrSTRRIAp415aBQ32 ++Yu7ciQxf2bwWt+XKpiznOrsMKHgs90heTd1OZBeElM+Z0lB/+W5KomGHGAs +5klZ7UxBl2TrpY4sDtg9FDA7GUpBzarp9lfmHDhvQa22S6NgQUmM+11nDqxB +26y2AQoySgvZPREc2G10KaD1sBTyhhnP25ZwwKZAeNL2hBR2zS1R31rGAfqS +AymdZ6VQ590FenIFB7q63YnnpVK44PzDbde5HNCIFOTr75TCNjWl3V/vceBz +yb6SHzLSaNOxmXX3JQd8xR1GZaul8U/ystSffAToxtYl5N2RxjMQ21e1mACB +QRVJ2iNpxHbx6ZClBNRW8QGzVxpTKiaTHgoTIGlbm641L40NrV+kAqUJ6Epg +6K2zlUFG7LTg79UErP02GxMxJIPl2cFDLa4ERFtlqj4YkUHrru63wh4EXLu0 ++rXYtAx++1jd5OxFgJRroFEtvyxWHPTz7PQjYOTWw598GrL41P3PhcIwAjIO +p0fl7JdFoXbWnZv7CBiUYEY0Ccmhdr5ux9ksAig76uUpFDlk7rSvic4hwK7F +s2MzVQ5ZTSfTvC8QcCPmuLqIrhwaPTojL5ZPQOrA+LCXpxy2V7hUBpQQoFNW +F/6tUA6/HSl8HlZDQIKJ80aZNfK45sSfMM1OAqz8834Ymsuj5Rfvxc+fECAc +//WIm508ZizeIbP7KQG5jYkl6YHymHrsYmFpNwG3bG5/XXxMHptun8UvrwkY +91TaO9ErjzlWFfQHHwkyTyOXrPggj9yrJ63UPxNwKPdutsaYPI5pG3/N+EKA +4DuPus28CmhdTi3zHCFAOfwEzztVBWzWy5S89Z0A/z1Tqe2xCsgQUzN88puA +lVnmcsOJCqjssHI779y/8ztVuSRdAbPoUqt0/hIQ82dVl3mRAtpGeuon83Dh +7BF/idp2BayuzuQsWcSF9tPN+cXyihgoOl0fJMSFjGpx7UZlRUwKeFfgL8wF +7xcbG95pK2K5CY+ohwgXPkv9+SBrqYjxqplX2Cu4wFegpXomQhHVLmpUvxfn +gvG1nJpD9YqoOnDqc6IsF9a+6pwba1HEqKjr/KZyXHDgWbg+4JkiHn9xSW+C +dPCGiF74TxGvVepxXRW4YBlLi4tfREVmuJ7bJJULbSJ3Lq8RoKJf64EPmTQu +OBW5t4wLU9GsdstRHToXfDqOr9goRcVt1TW/QpS4EKk4fdlMjYpFrOymkpVc +mKpOb5nRpOIGgfxhTSYXYqzURgk98n57L+YN0ok7Aw3oplT0+HHgfa0yF843 +Pm7hdabirMft/XmruKDoGTp6242Kya6n/ZercqFoZH7Fbm8qRkx4BMSRrpLQ +9xkKpuLvuoAaVzUuNIXnjzbupaJPjE79G3UuWP8xEj0QS8Xc096nDFdzoTO9 +20AvnopL3vXFnSLdW7s0vugYFUf0K5oMNLjg71BU5JtGxXpef5kk0h8GTVvF +M6gYn66R8Yz02LIo0cRcKrqIzIwHaXJhd4GwIfsSFSvW+7wqIf1Lr8xnqpiK +eZ0VQ59I8/n3F4VWUfFhz1TkRi0upPzY3ypfQ8Wbkj4TOaSFk8XGXtyiYhvl +eN4T0lIcK0PLBipWW2rs0tHmwsW1Qz5/H1GRkimeG0Ca3nsw/kYbFXsHy78f +I126Xao4oouKFyOqdhOkV/NWtzJfUNFBvo/+kjT3nP1Yfy8V6w59nf9Jeo3a +Z9GsfiqZzxeXUXS4cLf+sKHjEBW9PlVZ6pI2d5X3XfKZijo+7wg70s2fb8bX +j1CR6j1mH0za7uCG4n3fqah/L0d2H+lnK0ZbNaepmMV/WTaFtEdJ8tinWSr+ +DWxzOEf6jTFdrGCeilZnu69fIh305I6h50Ia/pVKcL5K+lOwh+/ypTTsXphJ +55De9ut7fIsQDVmST1dVkzbeGSb5UZSGvdQWu3/mH35dzidFw7OMIdV/618G +OZrR5Gl4aFb+YRnp4r7Gl6Z0Gnr67pErIB3lumabrzINR4Y+amf8e7+OigUx +6jS0Edi5+Ajp5Za0rCxtGooqi13YQbr/3ln16wY0fLKjY9yTdIWhQMMzFg2V +fxbwA+kYziGPcaQhVJwaopG2WjUxImRJwwmv3MMLSEsWhh9Ws6XhypLHH9+S +5/1B5g3F2omGC1corrj573tkOFWGudHQbzKP9yRpx0SjnksB5POajUGTtMLf +yu31ITTsvxx64jcZDyN76XxvN9Ow9GlvUdO/+Nm0TEMqiobT2g9Z9qTd38c1 +6kfT8NiCDXcESTO8Jz1dDtFw0ttFsJWMv/u2b4+kpdDw8Z9PCmtIpzU5S1ec +pKFCbNbQMBnPvuxH11rP0LB2dCL2POkZjarehRdpOCU6pTZO5oeOaIJmLEHD +DnuRK3vIfOI5PtWUfYOGgqUUZRHSnXxbvG/U0TCuJORIMZl/W6c2JH5/SMOH +qcovWv7law+jL/w1uf7ezO8vKlzY5ZwTmThAw43Rjw9sIY2PhRZf/kDDnYpX +Bz+R+f+2blqrf4yGPLwCQb1kfZDMb0ly5aPj6cuXHLIY5HlS2HK7+Ok48syI +Mk/WG246QZwSoiPX6U1HMGnHw+ffPKbQsUKtfSmDrE8podt0zNTpOBrq+iZO +kXw/teX9q93oeD3BZaxYmgvTF2USdL3p+FTep/udFBcmRVYyjALoKG5d91KK +9NiE0Za1m+lo9HdOL16SC4N1wdPeB+moVDO3V12MC49tbwqnFNPxtnqC8J9l +ZL7cfUCcvEpHlX3JZktJN2m2u2ZU0RHCRC+LCXDhntj783m1dNzwwn1akZ/c +f5+A8vUOOi7+pfhXciFZ/7b6w+AUHUXMnmfHkf0l6+2mwU+zdDw6poWBswRk +Ou5OHJ2no4XEaxXTGQLSdFPafi1VwpsXuhu+TxNw+DfhIaKghLIWP4zX/CBg +6/FFkSaWSmj/tcfagux3JuUVBefOKWFe+JYI72cE9FHL89ddUELvDlbn3y6y +X50ry5vMV0LJmvcjBWS/vZlQkruhTAkl/Ou39LeT/dqzIFv4jhJqbAtJNG0m +YNWizPSk90pY9/u4XGYdOZ8ExMbvVWeghXmpRG4hAde7o+NWajPQ8ISX02wB +Aa42+w916zOw14651Z2cB87o7zmgAwwcNHRax59LgJDgjv1jzgzcYlRatuEs +AQtrgyLD9jEw32I77UgyAd9FbQLdGxi4orPLxXsLAT3b6F1bmhkYeeS/S/ab +CLj/aBbi2hno1dyZbUrOL+kx5YqlLxnoN1CdJB1EgNag4MDMMAObQ0aOVZPz +TwTxxO+i2ErsUGdtirYiYNjRzedDyEpUWfAgxJ1BwIcTge67ljBxq6DNmuIX +HIgYVqdrCTKRuHWOafycAz/Xz4yOLmeim2aYd0cXBwT4ziRulmFi7qH1WWNt +HNCKbqwJXM3E+hLNZLkGDhwMZYo5ujBR722rlfI1DkiajjxRy2fixciASzyJ +HLD+ts/6PwNlfGrxxnGRBgdGgvl318SpINEa4m5w9xr5P0HhTW5YhfZC63gU +5ipAtIOZxvmmiqdylmVHYznIpVQ5GRioo8rX2N0nbMsgW81ouVj4anRqtxB6 +F3EFHsuY6U+c1sD5zMiW9PPFYCzXkK75UhMpoeFr64sugzBfYdTGw1q46tbl +OHxzCRQSFE28mNoo2J8jOjafD0tX+t7Y0KyNHfPyo/rJuaDBlq7a56eDQycl +H/6JzoFd/aKNNjy6aKFX5pkXfA6+TZxws87WRf27LdPTtRmwXvPReevVeih8 +ZNL2ostpuDfB+v2zUw8fOPdKtA+fhAh1nddPQ/XxjHZUqMC3Y8AeC+n2WmqA +A+bKhtOiSbCOIWUvVGiAdrEyFNf3h0ElPnV/g6EhmpnEHVknFw+qoUb1K18b +4l2zKvfH0zEQem/T0ZqdazCvWCr8Rc1eqC/oDvkuYYQjXwaUHtXtgsnS+Z+a +N43QmXZUPLU7AoJXli89b2+M4RmVvnbpmyHmof8WppMx7hwPtV0buxnSQ0Xb +uBuM0XF74WLbsM1wpzj6RJuHMUbuudxw1GQziDOtROY2GqPuDfmdpV82wSPm +f+KBe43xkSGHKLPcBKoqilRmvjFymIsTfJeFw3fVDAPuuDGq9DZUdt0NgZ52 +XCc2YYx3PZdv3lQZAvcjxlyipoxR7k2iz7KLIZDGtd5pMGuMEVHXO3YdCAFV +Y56K23wsbGMxTZtZIRBkvZ3WKMnCjX1BQgl3gqE7fL1gtwkLb7ptuyX8KAhu +Ff1+P5XCwlHFVhnbX4FgYBH10+Y4C+0bWLuahwPh+vsRwYKTLAyXsVazfxsI +XIV+Q5szLFxqblAZ1RAIFdn3T+ZdYGFS/FM/3ZOBUHAi0Wj9NRbyHWof2sII +hGNRIqezn7PQ6ejhIZNqf/Beq4QsBRNk7NS0m63zgblufuFGqgl+iUjNDb/s +AwWhY302SibY+8FG6HOqD3xMqt3nrWKCIuUMRbq3D+xqdayK1jHB86GxVdEz +3pDqcEDhlqUJ3nncN1rO8obbni/+6O0wwTpTR/vWDk+Q3Z5cq3HfBM277JR8 +me6QNh+mf7zBBFOmRnROirkD7xlL4lOTCT64UB/azuMOwzcWlRW0mmBaeeqK +PX1ucJvnaLbocxO0jdifGnHaDbwz4/dN/2eCz1yKXGfnXSG7Llr/3jI22rC1 +OGs+uYCEwDbC3oONjTy1x/a/cYYii4Mx415szM56ZUVrcwadg2kWGb5sfLVa +j7+31hkcxjkvejaycZdJi8+eLGdIejk1E7yNjcdupDECXZzhV2GceUwCG0cm +cx9MdjjBa1bG85JyNh4S0RDJv+AIm/YU5VpfY2Mbn8SfpAOOMH3teugIh40L +vHjNU/0cQZTe81P7Bhv3ji5PHlR0BFt+ebm799lYp7W17lWxA9zpLgl5/oKN +juPeCo037MFG+NbqvT1ssn+GyXrk2EPP+tZpqT42WnH0NBcdsIfJ219T/N+x +MYMia1dlZg+rL2lVfhlm41q303pGnXZw57XZ3hOjbLSN/XT/AmEHNuIuoDnO +Rsp/q5opZ+0gLHnP06gpNm59OjDh42sHk/eTzlN+sfHR/eIJJbSDw7NZwbdn +yf02/1FcxLCD5Xpl6n5zbPRyvRo6v8QO8rbfnpqfZ+MOmThCdMQW/gd34ePD + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.07108612656168435}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6770,19 +6904,19 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.07108612656168435}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6796,298 +6930,123 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13c4VW8cAHDRkIyyru3e63YJ2SOu6/tFyR7ZW2ZTKg1UqIxUUhRKSIiQ +ey4NqRQKGalUpCj6NYSUUZT8Tn+d5/M87znPe97zXYcWtGNDKC8PD4/sAh6e +f9fp/tYmxvEi0+T+2beBIuam3XlS0WY9h6GPz/WIyGkqoMSTIKmeM8A61xD3 +JV0L9jpdfcXXUwjf8vXfPklHWDFGOTPzigs3Y6SOlaY7wcAdhx2Trxrgd97M +C9X0QLBkDL/9/uoZXDlOmbVIi4SZV4Znx18NQpDa8AVuUjw0Wlwpelo4AQPf +KvzKJE6D3EDtxyD1ORCpvafmviIHxLcFXF1iwYdXBprcatcVwBltyzoHN34M +lVi0R0GsCHqzte5/Xy6EKUqtHrvdr8DxorgnvNIrsMZhTEzv6FWgZA4dy7go +hmVLZv6+M6kEKbXrR3+ViGGi5K1LppaVINOQFOfHEcMKT3Ovc46VoDC+ao9y +oxj6Nc4t0AuqhJV2kYF1n8XQyjNEWiW5EnQXzhkM6YpjwFPxjT+eVIJjlOQH +ncfi6Hdr/8Mlftcg2dXa9Nm0BN7mtE7Nh1SBTE2nDO8CSXTY9Ejs6PYquCbm ++lN7mSQalvtM8eytgpfP/DmnFSVxUuz5/IekKmA4R9GdrSTRRIAp415aBQ32 ++Yu7ciQxf2bwWt+XKpiznOrsMKHgs90heTd1OZBeElM+Z0lB/+W5KomGHGAs +5klZ7UxBl2TrpY4sDtg9FDA7GUpBzarp9lfmHDhvQa22S6NgQUmM+11nDqxB +26y2AQoySgvZPREc2G10KaD1sBTyhhnP25ZwwKZAeNL2hBR2zS1R31rGAfqS +AymdZ6VQ590FenIFB7q63YnnpVK44PzDbde5HNCIFOTr75TCNjWl3V/vceBz +yb6SHzLSaNOxmXX3JQd8xR1GZaul8U/ystSffAToxtYl5N2RxjMQ21e1mACB +QRVJ2iNpxHbx6ZClBNRW8QGzVxpTKiaTHgoTIGlbm641L40NrV+kAqUJ6Epg +6K2zlUFG7LTg79UErP02GxMxJIPl2cFDLa4ERFtlqj4YkUHrru63wh4EXLu0 ++rXYtAx++1jd5OxFgJRroFEtvyxWHPTz7PQjYOTWw598GrL41P3PhcIwAjIO +p0fl7JdFoXbWnZv7CBiUYEY0Ccmhdr5ux9ksAig76uUpFDlk7rSvic4hwK7F +s2MzVQ5ZTSfTvC8QcCPmuLqIrhwaPTojL5ZPQOrA+LCXpxy2V7hUBpQQoFNW +F/6tUA6/HSl8HlZDQIKJ80aZNfK45sSfMM1OAqz8834Ymsuj5Rfvxc+fECAc +//WIm508ZizeIbP7KQG5jYkl6YHymHrsYmFpNwG3bG5/XXxMHptun8UvrwkY +91TaO9ErjzlWFfQHHwkyTyOXrPggj9yrJ63UPxNwKPdutsaYPI5pG3/N+EKA +4DuPus28CmhdTi3zHCFAOfwEzztVBWzWy5S89Z0A/z1Tqe2xCsgQUzN88puA +lVnmcsOJCqjssHI779y/8ztVuSRdAbPoUqt0/hIQ82dVl3mRAtpGeuon83Dh +7BF/idp2BayuzuQsWcSF9tPN+cXyihgoOl0fJMSFjGpx7UZlRUwKeFfgL8wF +7xcbG95pK2K5CY+ohwgXPkv9+SBrqYjxqplX2Cu4wFegpXomQhHVLmpUvxfn +gvG1nJpD9YqoOnDqc6IsF9a+6pwba1HEqKjr/KZyXHDgWbg+4JkiHn9xSW+C +dPCGiF74TxGvVepxXRW4YBlLi4tfREVmuJ7bJJULbSJ3Lq8RoKJf64EPmTQu +OBW5t4wLU9GsdstRHToXfDqOr9goRcVt1TW/QpS4EKk4fdlMjYpFrOymkpVc +mKpOb5nRpOIGgfxhTSYXYqzURgk98n57L+YN0ok7Aw3oplT0+HHgfa0yF843 +Pm7hdabirMft/XmruKDoGTp6242Kya6n/ZercqFoZH7Fbm8qRkx4BMSRrpLQ +9xkKpuLvuoAaVzUuNIXnjzbupaJPjE79G3UuWP8xEj0QS8Xc096nDFdzoTO9 +20AvnopL3vXFnSLdW7s0vugYFUf0K5oMNLjg71BU5JtGxXpef5kk0h8GTVvF +M6gYn66R8Yz02LIo0cRcKrqIzIwHaXJhd4GwIfsSFSvW+7wqIf1Lr8xnqpiK +eZ0VQ59I8/n3F4VWUfFhz1TkRi0upPzY3ypfQ8Wbkj4TOaSFk8XGXtyiYhvl +eN4T0lIcK0PLBipWW2rs0tHmwsW1Qz5/H1GRkimeG0Ca3nsw/kYbFXsHy78f +I126Xao4oouKFyOqdhOkV/NWtzJfUNFBvo/+kjT3nP1Yfy8V6w59nf9Jeo3a +Z9GsfiqZzxeXUXS4cLf+sKHjEBW9PlVZ6pI2d5X3XfKZijo+7wg70s2fb8bX +j1CR6j1mH0za7uCG4n3fqah/L0d2H+lnK0ZbNaepmMV/WTaFtEdJ8tinWSr+ +DWxzOEf6jTFdrGCeilZnu69fIh305I6h50Ia/pVKcL5K+lOwh+/ypTTsXphJ +55De9ut7fIsQDVmST1dVkzbeGSb5UZSGvdQWu3/mH35dzidFw7OMIdV/618G +OZrR5Gl4aFb+YRnp4r7Gl6Z0Gnr67pErIB3lumabrzINR4Y+amf8e7+OigUx +6jS0Edi5+Ajp5Za0rCxtGooqi13YQbr/3ln16wY0fLKjY9yTdIWhQMMzFg2V +fxbwA+kYziGPcaQhVJwaopG2WjUxImRJwwmv3MMLSEsWhh9Ws6XhypLHH9+S +5/1B5g3F2omGC1corrj573tkOFWGudHQbzKP9yRpx0SjnksB5POajUGTtMLf +yu31ITTsvxx64jcZDyN76XxvN9Ow9GlvUdO/+Nm0TEMqiobT2g9Z9qTd38c1 +6kfT8NiCDXcESTO8Jz1dDtFw0ttFsJWMv/u2b4+kpdDw8Z9PCmtIpzU5S1ec +pKFCbNbQMBnPvuxH11rP0LB2dCL2POkZjarehRdpOCU6pTZO5oeOaIJmLEHD +DnuRK3vIfOI5PtWUfYOGgqUUZRHSnXxbvG/U0TCuJORIMZl/W6c2JH5/SMOH +qcovWv7law+jL/w1uf7ezO8vKlzY5ZwTmThAw43Rjw9sIY2PhRZf/kDDnYpX +Bz+R+f+2blqrf4yGPLwCQb1kfZDMb0ly5aPj6cuXHLIY5HlS2HK7+Ok48syI +Mk/WG246QZwSoiPX6U1HMGnHw+ffPKbQsUKtfSmDrE8podt0zNTpOBrq+iZO +kXw/teX9q93oeD3BZaxYmgvTF2USdL3p+FTep/udFBcmRVYyjALoKG5d91KK +9NiE0Za1m+lo9HdOL16SC4N1wdPeB+moVDO3V12MC49tbwqnFNPxtnqC8J9l +ZL7cfUCcvEpHlX3JZktJN2m2u2ZU0RHCRC+LCXDhntj783m1dNzwwn1akZ/c +f5+A8vUOOi7+pfhXciFZ/7b6w+AUHUXMnmfHkf0l6+2mwU+zdDw6poWBswRk +Ou5OHJ2no4XEaxXTGQLSdFPafi1VwpsXuhu+TxNw+DfhIaKghLIWP4zX/CBg +6/FFkSaWSmj/tcfagux3JuUVBefOKWFe+JYI72cE9FHL89ddUELvDlbn3y6y +X50ry5vMV0LJmvcjBWS/vZlQkruhTAkl/Ou39LeT/dqzIFv4jhJqbAtJNG0m +YNWizPSk90pY9/u4XGYdOZ8ExMbvVWeghXmpRG4hAde7o+NWajPQ8ISX02wB +Aa42+w916zOw14651Z2cB87o7zmgAwwcNHRax59LgJDgjv1jzgzcYlRatuEs +AQtrgyLD9jEw32I77UgyAd9FbQLdGxi4orPLxXsLAT3b6F1bmhkYeeS/S/ab +CLj/aBbi2hno1dyZbUrOL+kx5YqlLxnoN1CdJB1EgNag4MDMMAObQ0aOVZPz +TwTxxO+i2ErsUGdtirYiYNjRzedDyEpUWfAgxJ1BwIcTge67ljBxq6DNmuIX +HIgYVqdrCTKRuHWOafycAz/Xz4yOLmeim2aYd0cXBwT4ziRulmFi7qH1WWNt +HNCKbqwJXM3E+hLNZLkGDhwMZYo5ujBR722rlfI1DkiajjxRy2fixciASzyJ +HLD+ts/6PwNlfGrxxnGRBgdGgvl318SpINEa4m5w9xr5P0HhTW5YhfZC63gU +5ipAtIOZxvmmiqdylmVHYznIpVQ5GRioo8rX2N0nbMsgW81ouVj4anRqtxB6 +F3EFHsuY6U+c1sD5zMiW9PPFYCzXkK75UhMpoeFr64sugzBfYdTGw1q46tbl +OHxzCRQSFE28mNoo2J8jOjafD0tX+t7Y0KyNHfPyo/rJuaDBlq7a56eDQycl +H/6JzoFd/aKNNjy6aKFX5pkXfA6+TZxws87WRf27LdPTtRmwXvPReevVeih8 +ZNL2ostpuDfB+v2zUw8fOPdKtA+fhAh1nddPQ/XxjHZUqMC3Y8AeC+n2WmqA +A+bKhtOiSbCOIWUvVGiAdrEyFNf3h0ElPnV/g6EhmpnEHVknFw+qoUb1K18b +4l2zKvfH0zEQem/T0ZqdazCvWCr8Rc1eqC/oDvkuYYQjXwaUHtXtgsnS+Z+a +N43QmXZUPLU7AoJXli89b2+M4RmVvnbpmyHmof8WppMx7hwPtV0buxnSQ0Xb +uBuM0XF74WLbsM1wpzj6RJuHMUbuudxw1GQziDOtROY2GqPuDfmdpV82wSPm +f+KBe43xkSGHKLPcBKoqilRmvjFymIsTfJeFw3fVDAPuuDGq9DZUdt0NgZ52 +XCc2YYx3PZdv3lQZAvcjxlyipoxR7k2iz7KLIZDGtd5pMGuMEVHXO3YdCAFV +Y56K23wsbGMxTZtZIRBkvZ3WKMnCjX1BQgl3gqE7fL1gtwkLb7ptuyX8KAhu +Ff1+P5XCwlHFVhnbX4FgYBH10+Y4C+0bWLuahwPh+vsRwYKTLAyXsVazfxsI +XIV+Q5szLFxqblAZ1RAIFdn3T+ZdYGFS/FM/3ZOBUHAi0Wj9NRbyHWof2sII +hGNRIqezn7PQ6ejhIZNqf/Beq4QsBRNk7NS0m63zgblufuFGqgl+iUjNDb/s +AwWhY302SibY+8FG6HOqD3xMqt3nrWKCIuUMRbq3D+xqdayK1jHB86GxVdEz +3pDqcEDhlqUJ3nncN1rO8obbni/+6O0wwTpTR/vWDk+Q3Z5cq3HfBM277JR8 +me6QNh+mf7zBBFOmRnROirkD7xlL4lOTCT64UB/azuMOwzcWlRW0mmBaeeqK +PX1ucJvnaLbocxO0jdifGnHaDbwz4/dN/2eCz1yKXGfnXSG7Llr/3jI22rC1 +OGs+uYCEwDbC3oONjTy1x/a/cYYii4Mx415szM56ZUVrcwadg2kWGb5sfLVa +j7+31hkcxjkvejaycZdJi8+eLGdIejk1E7yNjcdupDECXZzhV2GceUwCG0cm +cx9MdjjBa1bG85JyNh4S0RDJv+AIm/YU5VpfY2Mbn8SfpAOOMH3teugIh40L +vHjNU/0cQZTe81P7Bhv3ji5PHlR0BFt+ebm799lYp7W17lWxA9zpLgl5/oKN +juPeCo037MFG+NbqvT1ssn+GyXrk2EPP+tZpqT42WnH0NBcdsIfJ219T/N+x +MYMia1dlZg+rL2lVfhlm41q303pGnXZw57XZ3hOjbLSN/XT/AmEHNuIuoDnO +Rsp/q5opZ+0gLHnP06gpNm59OjDh42sHk/eTzlN+sfHR/eIJJbSDw7NZwbdn +yf02/1FcxLCD5Xpl6n5zbPRyvRo6v8QO8rbfnpqfZ+MOmThCdMQW/gd34ePD + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.07108612656168435}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7098,6 +7057,7 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7125,7 +7085,8 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15142054732361562`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07108612656168435}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7133,11 +7094,13 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.99134491550045*^9}, - CellLabel-> - "Out[418]=",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] + CellChangeTimes->{3.99134491550045*^9, 3.994350748111126*^9, + 3.994353882269116*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"582463ea-acc2-42c5-a51c-5bbcf8ea8aba"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7206,15 +7169,813 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003297"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994084929325358*^9},ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-\ -b938908ab9a4"], + 3.994084929325358*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061275}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350748382307*^9, 3.9943538825087643`*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"5eb96ecc-2aee-4ae2-8361-1e24a97878f3"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6b0777bb-40fd-b54e-aa03-\ -b6e82cb2e939"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c4VW8cAHDRkIyyru3e63YJ2SOu6/tFyR7ZW2ZTKg1UqIxUUhRKSIiQ +ey4NqRQKGalUpCj6NYSUUZT8Tn+d5/M87znPe97zXYcWtGNDKC8PD4/sAh6e +f9fp/tYmxvEi0+T+2beBIuam3XlS0WY9h6GPz/WIyGkqoMSTIKmeM8A61xD3 +JV0L9jpdfcXXUwjf8vXfPklHWDFGOTPzigs3Y6SOlaY7wcAdhx2Trxrgd97M +C9X0QLBkDL/9/uoZXDlOmbVIi4SZV4Znx18NQpDa8AVuUjw0Wlwpelo4AQPf +KvzKJE6D3EDtxyD1ORCpvafmviIHxLcFXF1iwYdXBprcatcVwBltyzoHN34M +lVi0R0GsCHqzte5/Xy6EKUqtHrvdr8DxorgnvNIrsMZhTEzv6FWgZA4dy7go +hmVLZv6+M6kEKbXrR3+ViGGi5K1LppaVINOQFOfHEcMKT3Ovc46VoDC+ao9y +oxj6Nc4t0AuqhJV2kYF1n8XQyjNEWiW5EnQXzhkM6YpjwFPxjT+eVIJjlOQH +ncfi6Hdr/8Mlftcg2dXa9Nm0BN7mtE7Nh1SBTE2nDO8CSXTY9Ejs6PYquCbm ++lN7mSQalvtM8eytgpfP/DmnFSVxUuz5/IekKmA4R9GdrSTRRIAp415aBQ32 ++Yu7ciQxf2bwWt+XKpiznOrsMKHgs90heTd1OZBeElM+Z0lB/+W5KomGHGAs +5klZ7UxBl2TrpY4sDtg9FDA7GUpBzarp9lfmHDhvQa22S6NgQUmM+11nDqxB +26y2AQoySgvZPREc2G10KaD1sBTyhhnP25ZwwKZAeNL2hBR2zS1R31rGAfqS +AymdZ6VQ590FenIFB7q63YnnpVK44PzDbde5HNCIFOTr75TCNjWl3V/vceBz +yb6SHzLSaNOxmXX3JQd8xR1GZaul8U/ystSffAToxtYl5N2RxjMQ21e1mACB +QRVJ2iNpxHbx6ZClBNRW8QGzVxpTKiaTHgoTIGlbm641L40NrV+kAqUJ6Epg +6K2zlUFG7LTg79UErP02GxMxJIPl2cFDLa4ERFtlqj4YkUHrru63wh4EXLu0 ++rXYtAx++1jd5OxFgJRroFEtvyxWHPTz7PQjYOTWw598GrL41P3PhcIwAjIO +p0fl7JdFoXbWnZv7CBiUYEY0Ccmhdr5ux9ksAig76uUpFDlk7rSvic4hwK7F +s2MzVQ5ZTSfTvC8QcCPmuLqIrhwaPTojL5ZPQOrA+LCXpxy2V7hUBpQQoFNW +F/6tUA6/HSl8HlZDQIKJ80aZNfK45sSfMM1OAqz8834Ymsuj5Rfvxc+fECAc +//WIm508ZizeIbP7KQG5jYkl6YHymHrsYmFpNwG3bG5/XXxMHptun8UvrwkY +91TaO9ErjzlWFfQHHwkyTyOXrPggj9yrJ63UPxNwKPdutsaYPI5pG3/N+EKA +4DuPus28CmhdTi3zHCFAOfwEzztVBWzWy5S89Z0A/z1Tqe2xCsgQUzN88puA +lVnmcsOJCqjssHI779y/8ztVuSRdAbPoUqt0/hIQ82dVl3mRAtpGeuon83Dh +7BF/idp2BayuzuQsWcSF9tPN+cXyihgoOl0fJMSFjGpx7UZlRUwKeFfgL8wF +7xcbG95pK2K5CY+ohwgXPkv9+SBrqYjxqplX2Cu4wFegpXomQhHVLmpUvxfn +gvG1nJpD9YqoOnDqc6IsF9a+6pwba1HEqKjr/KZyXHDgWbg+4JkiHn9xSW+C +dPCGiF74TxGvVepxXRW4YBlLi4tfREVmuJ7bJJULbSJ3Lq8RoKJf64EPmTQu +OBW5t4wLU9GsdstRHToXfDqOr9goRcVt1TW/QpS4EKk4fdlMjYpFrOymkpVc +mKpOb5nRpOIGgfxhTSYXYqzURgk98n57L+YN0ok7Aw3oplT0+HHgfa0yF843 +Pm7hdabirMft/XmruKDoGTp6242Kya6n/ZercqFoZH7Fbm8qRkx4BMSRrpLQ +9xkKpuLvuoAaVzUuNIXnjzbupaJPjE79G3UuWP8xEj0QS8Xc096nDFdzoTO9 +20AvnopL3vXFnSLdW7s0vugYFUf0K5oMNLjg71BU5JtGxXpef5kk0h8GTVvF +M6gYn66R8Yz02LIo0cRcKrqIzIwHaXJhd4GwIfsSFSvW+7wqIf1Lr8xnqpiK +eZ0VQ59I8/n3F4VWUfFhz1TkRi0upPzY3ypfQ8Wbkj4TOaSFk8XGXtyiYhvl +eN4T0lIcK0PLBipWW2rs0tHmwsW1Qz5/H1GRkimeG0Ca3nsw/kYbFXsHy78f +I126Xao4oouKFyOqdhOkV/NWtzJfUNFBvo/+kjT3nP1Yfy8V6w59nf9Jeo3a +Z9GsfiqZzxeXUXS4cLf+sKHjEBW9PlVZ6pI2d5X3XfKZijo+7wg70s2fb8bX +j1CR6j1mH0za7uCG4n3fqah/L0d2H+lnK0ZbNaepmMV/WTaFtEdJ8tinWSr+ +DWxzOEf6jTFdrGCeilZnu69fIh305I6h50Ia/pVKcL5K+lOwh+/ypTTsXphJ +55De9ut7fIsQDVmST1dVkzbeGSb5UZSGvdQWu3/mH35dzidFw7OMIdV/618G +OZrR5Gl4aFb+YRnp4r7Gl6Z0Gnr67pErIB3lumabrzINR4Y+amf8e7+OigUx +6jS0Edi5+Ajp5Za0rCxtGooqi13YQbr/3ln16wY0fLKjY9yTdIWhQMMzFg2V +fxbwA+kYziGPcaQhVJwaopG2WjUxImRJwwmv3MMLSEsWhh9Ws6XhypLHH9+S +5/1B5g3F2omGC1corrj573tkOFWGudHQbzKP9yRpx0SjnksB5POajUGTtMLf +yu31ITTsvxx64jcZDyN76XxvN9Ow9GlvUdO/+Nm0TEMqiobT2g9Z9qTd38c1 +6kfT8NiCDXcESTO8Jz1dDtFw0ttFsJWMv/u2b4+kpdDw8Z9PCmtIpzU5S1ec +pKFCbNbQMBnPvuxH11rP0LB2dCL2POkZjarehRdpOCU6pTZO5oeOaIJmLEHD +DnuRK3vIfOI5PtWUfYOGgqUUZRHSnXxbvG/U0TCuJORIMZl/W6c2JH5/SMOH +qcovWv7law+jL/w1uf7ezO8vKlzY5ZwTmThAw43Rjw9sIY2PhRZf/kDDnYpX +Bz+R+f+2blqrf4yGPLwCQb1kfZDMb0ly5aPj6cuXHLIY5HlS2HK7+Ok48syI +Mk/WG246QZwSoiPX6U1HMGnHw+ffPKbQsUKtfSmDrE8podt0zNTpOBrq+iZO +kXw/teX9q93oeD3BZaxYmgvTF2USdL3p+FTep/udFBcmRVYyjALoKG5d91KK +9NiE0Za1m+lo9HdOL16SC4N1wdPeB+moVDO3V12MC49tbwqnFNPxtnqC8J9l +ZL7cfUCcvEpHlX3JZktJN2m2u2ZU0RHCRC+LCXDhntj783m1dNzwwn1akZ/c +f5+A8vUOOi7+pfhXciFZ/7b6w+AUHUXMnmfHkf0l6+2mwU+zdDw6poWBswRk +Ou5OHJ2no4XEaxXTGQLSdFPafi1VwpsXuhu+TxNw+DfhIaKghLIWP4zX/CBg +6/FFkSaWSmj/tcfagux3JuUVBefOKWFe+JYI72cE9FHL89ddUELvDlbn3y6y +X50ry5vMV0LJmvcjBWS/vZlQkruhTAkl/Ou39LeT/dqzIFv4jhJqbAtJNG0m +YNWizPSk90pY9/u4XGYdOZ8ExMbvVWeghXmpRG4hAde7o+NWajPQ8ISX02wB +Aa42+w916zOw14651Z2cB87o7zmgAwwcNHRax59LgJDgjv1jzgzcYlRatuEs +AQtrgyLD9jEw32I77UgyAd9FbQLdGxi4orPLxXsLAT3b6F1bmhkYeeS/S/ab +CLj/aBbi2hno1dyZbUrOL+kx5YqlLxnoN1CdJB1EgNag4MDMMAObQ0aOVZPz +TwTxxO+i2ErsUGdtirYiYNjRzedDyEpUWfAgxJ1BwIcTge67ljBxq6DNmuIX +HIgYVqdrCTKRuHWOafycAz/Xz4yOLmeim2aYd0cXBwT4ziRulmFi7qH1WWNt +HNCKbqwJXM3E+hLNZLkGDhwMZYo5ujBR722rlfI1DkiajjxRy2fixciASzyJ +HLD+ts/6PwNlfGrxxnGRBgdGgvl318SpINEa4m5w9xr5P0HhTW5YhfZC63gU +5ipAtIOZxvmmiqdylmVHYznIpVQ5GRioo8rX2N0nbMsgW81ouVj4anRqtxB6 +F3EFHsuY6U+c1sD5zMiW9PPFYCzXkK75UhMpoeFr64sugzBfYdTGw1q46tbl +OHxzCRQSFE28mNoo2J8jOjafD0tX+t7Y0KyNHfPyo/rJuaDBlq7a56eDQycl +H/6JzoFd/aKNNjy6aKFX5pkXfA6+TZxws87WRf27LdPTtRmwXvPReevVeih8 +ZNL2ostpuDfB+v2zUw8fOPdKtA+fhAh1nddPQ/XxjHZUqMC3Y8AeC+n2WmqA +A+bKhtOiSbCOIWUvVGiAdrEyFNf3h0ElPnV/g6EhmpnEHVknFw+qoUb1K18b +4l2zKvfH0zEQem/T0ZqdazCvWCr8Rc1eqC/oDvkuYYQjXwaUHtXtgsnS+Z+a +N43QmXZUPLU7AoJXli89b2+M4RmVvnbpmyHmof8WppMx7hwPtV0buxnSQ0Xb +uBuM0XF74WLbsM1wpzj6RJuHMUbuudxw1GQziDOtROY2GqPuDfmdpV82wSPm +f+KBe43xkSGHKLPcBKoqilRmvjFymIsTfJeFw3fVDAPuuDGq9DZUdt0NgZ52 +XCc2YYx3PZdv3lQZAvcjxlyipoxR7k2iz7KLIZDGtd5pMGuMEVHXO3YdCAFV +Y56K23wsbGMxTZtZIRBkvZ3WKMnCjX1BQgl3gqE7fL1gtwkLb7ptuyX8KAhu +Ff1+P5XCwlHFVhnbX4FgYBH10+Y4C+0bWLuahwPh+vsRwYKTLAyXsVazfxsI +XIV+Q5szLFxqblAZ1RAIFdn3T+ZdYGFS/FM/3ZOBUHAi0Wj9NRbyHWof2sII +hGNRIqezn7PQ6ejhIZNqf/Beq4QsBRNk7NS0m63zgblufuFGqgl+iUjNDb/s +AwWhY302SibY+8FG6HOqD3xMqt3nrWKCIuUMRbq3D+xqdayK1jHB86GxVdEz +3pDqcEDhlqUJ3nncN1rO8obbni/+6O0wwTpTR/vWDk+Q3Z5cq3HfBM277JR8 +me6QNh+mf7zBBFOmRnROirkD7xlL4lOTCT64UB/azuMOwzcWlRW0mmBaeeqK +PX1ucJvnaLbocxO0jdifGnHaDbwz4/dN/2eCz1yKXGfnXSG7Llr/3jI22rC1 +OGs+uYCEwDbC3oONjTy1x/a/cYYii4Mx415szM56ZUVrcwadg2kWGb5sfLVa +j7+31hkcxjkvejaycZdJi8+eLGdIejk1E7yNjcdupDECXZzhV2GceUwCG0cm +cx9MdjjBa1bG85JyNh4S0RDJv+AIm/YU5VpfY2Mbn8SfpAOOMH3teugIh40L +vHjNU/0cQZTe81P7Bhv3ji5PHlR0BFt+ebm799lYp7W17lWxA9zpLgl5/oKN +juPeCo037MFG+NbqvT1ssn+GyXrk2EPP+tZpqT42WnH0NBcdsIfJ219T/N+x +MYMia1dlZg+rL2lVfhlm41q303pGnXZw57XZ3hOjbLSN/XT/AmEHNuIuoDnO +Rsp/q5opZ+0gLHnP06gpNm59OjDh42sHk/eTzlN+sfHR/eIJJbSDw7NZwbdn +yf02/1FcxLCD5Xpl6n5zbPRyvRo6v8QO8rbfnpqfZ+MOmThCdMQW/gd34ePD + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c4VW8cAHDRkIyyru3e63YJ2SOu6/tFyR7ZW2ZTKg1UqIxUUhRKSIiQ +ey4NqRQKGalUpCj6NYSUUZT8Tn+d5/M87znPe97zXYcWtGNDKC8PD4/sAh6e +f9fp/tYmxvEi0+T+2beBIuam3XlS0WY9h6GPz/WIyGkqoMSTIKmeM8A61xD3 +JV0L9jpdfcXXUwjf8vXfPklHWDFGOTPzigs3Y6SOlaY7wcAdhx2Trxrgd97M +C9X0QLBkDL/9/uoZXDlOmbVIi4SZV4Znx18NQpDa8AVuUjw0Wlwpelo4AQPf +KvzKJE6D3EDtxyD1ORCpvafmviIHxLcFXF1iwYdXBprcatcVwBltyzoHN34M +lVi0R0GsCHqzte5/Xy6EKUqtHrvdr8DxorgnvNIrsMZhTEzv6FWgZA4dy7go +hmVLZv6+M6kEKbXrR3+ViGGi5K1LppaVINOQFOfHEcMKT3Ovc46VoDC+ao9y +oxj6Nc4t0AuqhJV2kYF1n8XQyjNEWiW5EnQXzhkM6YpjwFPxjT+eVIJjlOQH +ncfi6Hdr/8Mlftcg2dXa9Nm0BN7mtE7Nh1SBTE2nDO8CSXTY9Ejs6PYquCbm ++lN7mSQalvtM8eytgpfP/DmnFSVxUuz5/IekKmA4R9GdrSTRRIAp415aBQ32 ++Yu7ciQxf2bwWt+XKpiznOrsMKHgs90heTd1OZBeElM+Z0lB/+W5KomGHGAs +5klZ7UxBl2TrpY4sDtg9FDA7GUpBzarp9lfmHDhvQa22S6NgQUmM+11nDqxB +26y2AQoySgvZPREc2G10KaD1sBTyhhnP25ZwwKZAeNL2hBR2zS1R31rGAfqS +AymdZ6VQ590FenIFB7q63YnnpVK44PzDbde5HNCIFOTr75TCNjWl3V/vceBz +yb6SHzLSaNOxmXX3JQd8xR1GZaul8U/ystSffAToxtYl5N2RxjMQ21e1mACB +QRVJ2iNpxHbx6ZClBNRW8QGzVxpTKiaTHgoTIGlbm641L40NrV+kAqUJ6Epg +6K2zlUFG7LTg79UErP02GxMxJIPl2cFDLa4ERFtlqj4YkUHrru63wh4EXLu0 ++rXYtAx++1jd5OxFgJRroFEtvyxWHPTz7PQjYOTWw598GrL41P3PhcIwAjIO +p0fl7JdFoXbWnZv7CBiUYEY0Ccmhdr5ux9ksAig76uUpFDlk7rSvic4hwK7F +s2MzVQ5ZTSfTvC8QcCPmuLqIrhwaPTojL5ZPQOrA+LCXpxy2V7hUBpQQoFNW +F/6tUA6/HSl8HlZDQIKJ80aZNfK45sSfMM1OAqz8834Ymsuj5Rfvxc+fECAc +//WIm508ZizeIbP7KQG5jYkl6YHymHrsYmFpNwG3bG5/XXxMHptun8UvrwkY +91TaO9ErjzlWFfQHHwkyTyOXrPggj9yrJ63UPxNwKPdutsaYPI5pG3/N+EKA +4DuPus28CmhdTi3zHCFAOfwEzztVBWzWy5S89Z0A/z1Tqe2xCsgQUzN88puA +lVnmcsOJCqjssHI779y/8ztVuSRdAbPoUqt0/hIQ82dVl3mRAtpGeuon83Dh +7BF/idp2BayuzuQsWcSF9tPN+cXyihgoOl0fJMSFjGpx7UZlRUwKeFfgL8wF +7xcbG95pK2K5CY+ohwgXPkv9+SBrqYjxqplX2Cu4wFegpXomQhHVLmpUvxfn +gvG1nJpD9YqoOnDqc6IsF9a+6pwba1HEqKjr/KZyXHDgWbg+4JkiHn9xSW+C +dPCGiF74TxGvVepxXRW4YBlLi4tfREVmuJ7bJJULbSJ3Lq8RoKJf64EPmTQu +OBW5t4wLU9GsdstRHToXfDqOr9goRcVt1TW/QpS4EKk4fdlMjYpFrOymkpVc +mKpOb5nRpOIGgfxhTSYXYqzURgk98n57L+YN0ok7Aw3oplT0+HHgfa0yF843 +Pm7hdabirMft/XmruKDoGTp6242Kya6n/ZercqFoZH7Fbm8qRkx4BMSRrpLQ +9xkKpuLvuoAaVzUuNIXnjzbupaJPjE79G3UuWP8xEj0QS8Xc096nDFdzoTO9 +20AvnopL3vXFnSLdW7s0vugYFUf0K5oMNLjg71BU5JtGxXpef5kk0h8GTVvF +M6gYn66R8Yz02LIo0cRcKrqIzIwHaXJhd4GwIfsSFSvW+7wqIf1Lr8xnqpiK +eZ0VQ59I8/n3F4VWUfFhz1TkRi0upPzY3ypfQ8Wbkj4TOaSFk8XGXtyiYhvl +eN4T0lIcK0PLBipWW2rs0tHmwsW1Qz5/H1GRkimeG0Ca3nsw/kYbFXsHy78f +I126Xao4oouKFyOqdhOkV/NWtzJfUNFBvo/+kjT3nP1Yfy8V6w59nf9Jeo3a +Z9GsfiqZzxeXUXS4cLf+sKHjEBW9PlVZ6pI2d5X3XfKZijo+7wg70s2fb8bX +j1CR6j1mH0za7uCG4n3fqah/L0d2H+lnK0ZbNaepmMV/WTaFtEdJ8tinWSr+ +DWxzOEf6jTFdrGCeilZnu69fIh305I6h50Ia/pVKcL5K+lOwh+/ypTTsXphJ +55De9ut7fIsQDVmST1dVkzbeGSb5UZSGvdQWu3/mH35dzidFw7OMIdV/618G +OZrR5Gl4aFb+YRnp4r7Gl6Z0Gnr67pErIB3lumabrzINR4Y+amf8e7+OigUx +6jS0Edi5+Ajp5Za0rCxtGooqi13YQbr/3ln16wY0fLKjY9yTdIWhQMMzFg2V +fxbwA+kYziGPcaQhVJwaopG2WjUxImRJwwmv3MMLSEsWhh9Ws6XhypLHH9+S +5/1B5g3F2omGC1corrj573tkOFWGudHQbzKP9yRpx0SjnksB5POajUGTtMLf +yu31ITTsvxx64jcZDyN76XxvN9Ow9GlvUdO/+Nm0TEMqiobT2g9Z9qTd38c1 +6kfT8NiCDXcESTO8Jz1dDtFw0ttFsJWMv/u2b4+kpdDw8Z9PCmtIpzU5S1ec +pKFCbNbQMBnPvuxH11rP0LB2dCL2POkZjarehRdpOCU6pTZO5oeOaIJmLEHD +DnuRK3vIfOI5PtWUfYOGgqUUZRHSnXxbvG/U0TCuJORIMZl/W6c2JH5/SMOH +qcovWv7law+jL/w1uf7ezO8vKlzY5ZwTmThAw43Rjw9sIY2PhRZf/kDDnYpX +Bz+R+f+2blqrf4yGPLwCQb1kfZDMb0ly5aPj6cuXHLIY5HlS2HK7+Ok48syI +Mk/WG246QZwSoiPX6U1HMGnHw+ffPKbQsUKtfSmDrE8podt0zNTpOBrq+iZO +kXw/teX9q93oeD3BZaxYmgvTF2USdL3p+FTep/udFBcmRVYyjALoKG5d91KK +9NiE0Za1m+lo9HdOL16SC4N1wdPeB+moVDO3V12MC49tbwqnFNPxtnqC8J9l +ZL7cfUCcvEpHlX3JZktJN2m2u2ZU0RHCRC+LCXDhntj783m1dNzwwn1akZ/c +f5+A8vUOOi7+pfhXciFZ/7b6w+AUHUXMnmfHkf0l6+2mwU+zdDw6poWBswRk +Ou5OHJ2no4XEaxXTGQLSdFPafi1VwpsXuhu+TxNw+DfhIaKghLIWP4zX/CBg +6/FFkSaWSmj/tcfagux3JuUVBefOKWFe+JYI72cE9FHL89ddUELvDlbn3y6y +X50ry5vMV0LJmvcjBWS/vZlQkruhTAkl/Ou39LeT/dqzIFv4jhJqbAtJNG0m +YNWizPSk90pY9/u4XGYdOZ8ExMbvVWeghXmpRG4hAde7o+NWajPQ8ISX02wB +Aa42+w916zOw14651Z2cB87o7zmgAwwcNHRax59LgJDgjv1jzgzcYlRatuEs +AQtrgyLD9jEw32I77UgyAd9FbQLdGxi4orPLxXsLAT3b6F1bmhkYeeS/S/ab +CLj/aBbi2hno1dyZbUrOL+kx5YqlLxnoN1CdJB1EgNag4MDMMAObQ0aOVZPz +TwTxxO+i2ErsUGdtirYiYNjRzedDyEpUWfAgxJ1BwIcTge67ljBxq6DNmuIX +HIgYVqdrCTKRuHWOafycAz/Xz4yOLmeim2aYd0cXBwT4ziRulmFi7qH1WWNt +HNCKbqwJXM3E+hLNZLkGDhwMZYo5ujBR722rlfI1DkiajjxRy2fixciASzyJ +HLD+ts/6PwNlfGrxxnGRBgdGgvl318SpINEa4m5w9xr5P0HhTW5YhfZC63gU +5ipAtIOZxvmmiqdylmVHYznIpVQ5GRioo8rX2N0nbMsgW81ouVj4anRqtxB6 +F3EFHsuY6U+c1sD5zMiW9PPFYCzXkK75UhMpoeFr64sugzBfYdTGw1q46tbl +OHxzCRQSFE28mNoo2J8jOjafD0tX+t7Y0KyNHfPyo/rJuaDBlq7a56eDQycl +H/6JzoFd/aKNNjy6aKFX5pkXfA6+TZxws87WRf27LdPTtRmwXvPReevVeih8 +ZNL2ostpuDfB+v2zUw8fOPdKtA+fhAh1nddPQ/XxjHZUqMC3Y8AeC+n2WmqA +A+bKhtOiSbCOIWUvVGiAdrEyFNf3h0ElPnV/g6EhmpnEHVknFw+qoUb1K18b +4l2zKvfH0zEQem/T0ZqdazCvWCr8Rc1eqC/oDvkuYYQjXwaUHtXtgsnS+Z+a +N43QmXZUPLU7AoJXli89b2+M4RmVvnbpmyHmof8WppMx7hwPtV0buxnSQ0Xb +uBuM0XF74WLbsM1wpzj6RJuHMUbuudxw1GQziDOtROY2GqPuDfmdpV82wSPm +f+KBe43xkSGHKLPcBKoqilRmvjFymIsTfJeFw3fVDAPuuDGq9DZUdt0NgZ52 +XCc2YYx3PZdv3lQZAvcjxlyipoxR7k2iz7KLIZDGtd5pMGuMEVHXO3YdCAFV +Y56K23wsbGMxTZtZIRBkvZ3WKMnCjX1BQgl3gqE7fL1gtwkLb7ptuyX8KAhu +Ff1+P5XCwlHFVhnbX4FgYBH10+Y4C+0bWLuahwPh+vsRwYKTLAyXsVazfxsI +XIV+Q5szLFxqblAZ1RAIFdn3T+ZdYGFS/FM/3ZOBUHAi0Wj9NRbyHWof2sII +hGNRIqezn7PQ6ejhIZNqf/Beq4QsBRNk7NS0m63zgblufuFGqgl+iUjNDb/s +AwWhY302SibY+8FG6HOqD3xMqt3nrWKCIuUMRbq3D+xqdayK1jHB86GxVdEz +3pDqcEDhlqUJ3nncN1rO8obbni/+6O0wwTpTR/vWDk+Q3Z5cq3HfBM277JR8 +me6QNh+mf7zBBFOmRnROirkD7xlL4lOTCT64UB/azuMOwzcWlRW0mmBaeeqK +PX1ucJvnaLbocxO0jdifGnHaDbwz4/dN/2eCz1yKXGfnXSG7Llr/3jI22rC1 +OGs+uYCEwDbC3oONjTy1x/a/cYYii4Mx415szM56ZUVrcwadg2kWGb5sfLVa +j7+31hkcxjkvejaycZdJi8+eLGdIejk1E7yNjcdupDECXZzhV2GceUwCG0cm +cx9MdjjBa1bG85JyNh4S0RDJv+AIm/YU5VpfY2Mbn8SfpAOOMH3teugIh40L +vHjNU/0cQZTe81P7Bhv3ji5PHlR0BFt+ebm799lYp7W17lWxA9zpLgl5/oKN +juPeCo037MFG+NbqvT1ssn+GyXrk2EPP+tZpqT42WnH0NBcdsIfJ219T/N+x +MYMia1dlZg+rL2lVfhlm41q303pGnXZw57XZ3hOjbLSN/XT/AmEHNuIuoDnO +Rsp/q5opZ+0gLHnP06gpNm59OjDh42sHk/eTzlN+sfHR/eIJJbSDw7NZwbdn +yf02/1FcxLCD5Xpl6n5zbPRyvRo6v8QO8rbfnpqfZ+MOmThCdMQW/gd34ePD + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07108612656168435}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07108612656168435}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c4VW8cAHDRkIyyru3e63YJ2SOu6/tFyR7ZW2ZTKg1UqIxUUhRKSIiQ +ey4NqRQKGalUpCj6NYSUUZT8Tn+d5/M87znPe97zXYcWtGNDKC8PD4/sAh6e +f9fp/tYmxvEi0+T+2beBIuam3XlS0WY9h6GPz/WIyGkqoMSTIKmeM8A61xD3 +JV0L9jpdfcXXUwjf8vXfPklHWDFGOTPzigs3Y6SOlaY7wcAdhx2Trxrgd97M +C9X0QLBkDL/9/uoZXDlOmbVIi4SZV4Znx18NQpDa8AVuUjw0Wlwpelo4AQPf +KvzKJE6D3EDtxyD1ORCpvafmviIHxLcFXF1iwYdXBprcatcVwBltyzoHN34M +lVi0R0GsCHqzte5/Xy6EKUqtHrvdr8DxorgnvNIrsMZhTEzv6FWgZA4dy7go +hmVLZv6+M6kEKbXrR3+ViGGi5K1LppaVINOQFOfHEcMKT3Ovc46VoDC+ao9y +oxj6Nc4t0AuqhJV2kYF1n8XQyjNEWiW5EnQXzhkM6YpjwFPxjT+eVIJjlOQH +ncfi6Hdr/8Mlftcg2dXa9Nm0BN7mtE7Nh1SBTE2nDO8CSXTY9Ejs6PYquCbm ++lN7mSQalvtM8eytgpfP/DmnFSVxUuz5/IekKmA4R9GdrSTRRIAp415aBQ32 ++Yu7ciQxf2bwWt+XKpiznOrsMKHgs90heTd1OZBeElM+Z0lB/+W5KomGHGAs +5klZ7UxBl2TrpY4sDtg9FDA7GUpBzarp9lfmHDhvQa22S6NgQUmM+11nDqxB +26y2AQoySgvZPREc2G10KaD1sBTyhhnP25ZwwKZAeNL2hBR2zS1R31rGAfqS +AymdZ6VQ590FenIFB7q63YnnpVK44PzDbde5HNCIFOTr75TCNjWl3V/vceBz +yb6SHzLSaNOxmXX3JQd8xR1GZaul8U/ystSffAToxtYl5N2RxjMQ21e1mACB +QRVJ2iNpxHbx6ZClBNRW8QGzVxpTKiaTHgoTIGlbm641L40NrV+kAqUJ6Epg +6K2zlUFG7LTg79UErP02GxMxJIPl2cFDLa4ERFtlqj4YkUHrru63wh4EXLu0 ++rXYtAx++1jd5OxFgJRroFEtvyxWHPTz7PQjYOTWw598GrL41P3PhcIwAjIO +p0fl7JdFoXbWnZv7CBiUYEY0Ccmhdr5ux9ksAig76uUpFDlk7rSvic4hwK7F +s2MzVQ5ZTSfTvC8QcCPmuLqIrhwaPTojL5ZPQOrA+LCXpxy2V7hUBpQQoFNW +F/6tUA6/HSl8HlZDQIKJ80aZNfK45sSfMM1OAqz8834Ymsuj5Rfvxc+fECAc +//WIm508ZizeIbP7KQG5jYkl6YHymHrsYmFpNwG3bG5/XXxMHptun8UvrwkY +91TaO9ErjzlWFfQHHwkyTyOXrPggj9yrJ63UPxNwKPdutsaYPI5pG3/N+EKA +4DuPus28CmhdTi3zHCFAOfwEzztVBWzWy5S89Z0A/z1Tqe2xCsgQUzN88puA +lVnmcsOJCqjssHI779y/8ztVuSRdAbPoUqt0/hIQ82dVl3mRAtpGeuon83Dh +7BF/idp2BayuzuQsWcSF9tPN+cXyihgoOl0fJMSFjGpx7UZlRUwKeFfgL8wF +7xcbG95pK2K5CY+ohwgXPkv9+SBrqYjxqplX2Cu4wFegpXomQhHVLmpUvxfn +gvG1nJpD9YqoOnDqc6IsF9a+6pwba1HEqKjr/KZyXHDgWbg+4JkiHn9xSW+C +dPCGiF74TxGvVepxXRW4YBlLi4tfREVmuJ7bJJULbSJ3Lq8RoKJf64EPmTQu +OBW5t4wLU9GsdstRHToXfDqOr9goRcVt1TW/QpS4EKk4fdlMjYpFrOymkpVc +mKpOb5nRpOIGgfxhTSYXYqzURgk98n57L+YN0ok7Aw3oplT0+HHgfa0yF843 +Pm7hdabirMft/XmruKDoGTp6242Kya6n/ZercqFoZH7Fbm8qRkx4BMSRrpLQ +9xkKpuLvuoAaVzUuNIXnjzbupaJPjE79G3UuWP8xEj0QS8Xc096nDFdzoTO9 +20AvnopL3vXFnSLdW7s0vugYFUf0K5oMNLjg71BU5JtGxXpef5kk0h8GTVvF +M6gYn66R8Yz02LIo0cRcKrqIzIwHaXJhd4GwIfsSFSvW+7wqIf1Lr8xnqpiK +eZ0VQ59I8/n3F4VWUfFhz1TkRi0upPzY3ypfQ8Wbkj4TOaSFk8XGXtyiYhvl +eN4T0lIcK0PLBipWW2rs0tHmwsW1Qz5/H1GRkimeG0Ca3nsw/kYbFXsHy78f +I126Xao4oouKFyOqdhOkV/NWtzJfUNFBvo/+kjT3nP1Yfy8V6w59nf9Jeo3a +Z9GsfiqZzxeXUXS4cLf+sKHjEBW9PlVZ6pI2d5X3XfKZijo+7wg70s2fb8bX +j1CR6j1mH0za7uCG4n3fqah/L0d2H+lnK0ZbNaepmMV/WTaFtEdJ8tinWSr+ +DWxzOEf6jTFdrGCeilZnu69fIh305I6h50Ia/pVKcL5K+lOwh+/ypTTsXphJ +55De9ut7fIsQDVmST1dVkzbeGSb5UZSGvdQWu3/mH35dzidFw7OMIdV/618G +OZrR5Gl4aFb+YRnp4r7Gl6Z0Gnr67pErIB3lumabrzINR4Y+amf8e7+OigUx +6jS0Edi5+Ajp5Za0rCxtGooqi13YQbr/3ln16wY0fLKjY9yTdIWhQMMzFg2V +fxbwA+kYziGPcaQhVJwaopG2WjUxImRJwwmv3MMLSEsWhh9Ws6XhypLHH9+S +5/1B5g3F2omGC1corrj573tkOFWGudHQbzKP9yRpx0SjnksB5POajUGTtMLf +yu31ITTsvxx64jcZDyN76XxvN9Ow9GlvUdO/+Nm0TEMqiobT2g9Z9qTd38c1 +6kfT8NiCDXcESTO8Jz1dDtFw0ttFsJWMv/u2b4+kpdDw8Z9PCmtIpzU5S1ec +pKFCbNbQMBnPvuxH11rP0LB2dCL2POkZjarehRdpOCU6pTZO5oeOaIJmLEHD +DnuRK3vIfOI5PtWUfYOGgqUUZRHSnXxbvG/U0TCuJORIMZl/W6c2JH5/SMOH +qcovWv7law+jL/w1uf7ezO8vKlzY5ZwTmThAw43Rjw9sIY2PhRZf/kDDnYpX +Bz+R+f+2blqrf4yGPLwCQb1kfZDMb0ly5aPj6cuXHLIY5HlS2HK7+Ok48syI +Mk/WG246QZwSoiPX6U1HMGnHw+ffPKbQsUKtfSmDrE8podt0zNTpOBrq+iZO +kXw/teX9q93oeD3BZaxYmgvTF2USdL3p+FTep/udFBcmRVYyjALoKG5d91KK +9NiE0Za1m+lo9HdOL16SC4N1wdPeB+moVDO3V12MC49tbwqnFNPxtnqC8J9l +ZL7cfUCcvEpHlX3JZktJN2m2u2ZU0RHCRC+LCXDhntj783m1dNzwwn1akZ/c +f5+A8vUOOi7+pfhXciFZ/7b6w+AUHUXMnmfHkf0l6+2mwU+zdDw6poWBswRk +Ou5OHJ2no4XEaxXTGQLSdFPafi1VwpsXuhu+TxNw+DfhIaKghLIWP4zX/CBg +6/FFkSaWSmj/tcfagux3JuUVBefOKWFe+JYI72cE9FHL89ddUELvDlbn3y6y +X50ry5vMV0LJmvcjBWS/vZlQkruhTAkl/Ou39LeT/dqzIFv4jhJqbAtJNG0m +YNWizPSk90pY9/u4XGYdOZ8ExMbvVWeghXmpRG4hAde7o+NWajPQ8ISX02wB +Aa42+w916zOw14651Z2cB87o7zmgAwwcNHRax59LgJDgjv1jzgzcYlRatuEs +AQtrgyLD9jEw32I77UgyAd9FbQLdGxi4orPLxXsLAT3b6F1bmhkYeeS/S/ab +CLj/aBbi2hno1dyZbUrOL+kx5YqlLxnoN1CdJB1EgNag4MDMMAObQ0aOVZPz +TwTxxO+i2ErsUGdtirYiYNjRzedDyEpUWfAgxJ1BwIcTge67ljBxq6DNmuIX +HIgYVqdrCTKRuHWOafycAz/Xz4yOLmeim2aYd0cXBwT4ziRulmFi7qH1WWNt +HNCKbqwJXM3E+hLNZLkGDhwMZYo5ujBR722rlfI1DkiajjxRy2fixciASzyJ +HLD+ts/6PwNlfGrxxnGRBgdGgvl318SpINEa4m5w9xr5P0HhTW5YhfZC63gU +5ipAtIOZxvmmiqdylmVHYznIpVQ5GRioo8rX2N0nbMsgW81ouVj4anRqtxB6 +F3EFHsuY6U+c1sD5zMiW9PPFYCzXkK75UhMpoeFr64sugzBfYdTGw1q46tbl +OHxzCRQSFE28mNoo2J8jOjafD0tX+t7Y0KyNHfPyo/rJuaDBlq7a56eDQycl +H/6JzoFd/aKNNjy6aKFX5pkXfA6+TZxws87WRf27LdPTtRmwXvPReevVeih8 +ZNL2ostpuDfB+v2zUw8fOPdKtA+fhAh1nddPQ/XxjHZUqMC3Y8AeC+n2WmqA +A+bKhtOiSbCOIWUvVGiAdrEyFNf3h0ElPnV/g6EhmpnEHVknFw+qoUb1K18b +4l2zKvfH0zEQem/T0ZqdazCvWCr8Rc1eqC/oDvkuYYQjXwaUHtXtgsnS+Z+a +N43QmXZUPLU7AoJXli89b2+M4RmVvnbpmyHmof8WppMx7hwPtV0buxnSQ0Xb +uBuM0XF74WLbsM1wpzj6RJuHMUbuudxw1GQziDOtROY2GqPuDfmdpV82wSPm +f+KBe43xkSGHKLPcBKoqilRmvjFymIsTfJeFw3fVDAPuuDGq9DZUdt0NgZ52 +XCc2YYx3PZdv3lQZAvcjxlyipoxR7k2iz7KLIZDGtd5pMGuMEVHXO3YdCAFV +Y56K23wsbGMxTZtZIRBkvZ3WKMnCjX1BQgl3gqE7fL1gtwkLb7ptuyX8KAhu +Ff1+P5XCwlHFVhnbX4FgYBH10+Y4C+0bWLuahwPh+vsRwYKTLAyXsVazfxsI +XIV+Q5szLFxqblAZ1RAIFdn3T+ZdYGFS/FM/3ZOBUHAi0Wj9NRbyHWof2sII +hGNRIqezn7PQ6ejhIZNqf/Beq4QsBRNk7NS0m63zgblufuFGqgl+iUjNDb/s +AwWhY302SibY+8FG6HOqD3xMqt3nrWKCIuUMRbq3D+xqdayK1jHB86GxVdEz +3pDqcEDhlqUJ3nncN1rO8obbni/+6O0wwTpTR/vWDk+Q3Z5cq3HfBM277JR8 +me6QNh+mf7zBBFOmRnROirkD7xlL4lOTCT64UB/azuMOwzcWlRW0mmBaeeqK +PX1ucJvnaLbocxO0jdifGnHaDbwz4/dN/2eCz1yKXGfnXSG7Llr/3jI22rC1 +OGs+uYCEwDbC3oONjTy1x/a/cYYii4Mx415szM56ZUVrcwadg2kWGb5sfLVa +j7+31hkcxjkvejaycZdJi8+eLGdIejk1E7yNjcdupDECXZzhV2GceUwCG0cm +cx9MdjjBa1bG85JyNh4S0RDJv+AIm/YU5VpfY2Mbn8SfpAOOMH3teugIh40L +vHjNU/0cQZTe81P7Bhv3ji5PHlR0BFt+ebm799lYp7W17lWxA9zpLgl5/oKN +juPeCo037MFG+NbqvT1ssn+GyXrk2EPP+tZpqT42WnH0NBcdsIfJ219T/N+x +MYMia1dlZg+rL2lVfhlm41q303pGnXZw57XZ3hOjbLSN/XT/AmEHNuIuoDnO +Rsp/q5opZ+0gLHnP06gpNm59OjDh42sHk/eTzlN+sfHR/eIJJbSDw7NZwbdn +yf02/1FcxLCD5Xpl6n5zbPRyvRo6v8QO8rbfnpqfZ+MOmThCdMQW/gd34ePD + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07108612656168435}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07108612656168435}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350748421327*^9, 3.994353882554309*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"d80e84d1-0df1-4806-b3f6-b0d8d627369f"] +}, Open ]], Cell[CellGroupData[{ @@ -7223,14 +7984,13 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918501819649506`*^9},ExpressionUUID->"1ec1e156-ca0f-9240-857c-\ -ac86e3a0e3fd"], + CellChangeTimes->{3.9918501819649506`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[BoxData["10.362747935330784`"], "Output", - CellChangeTimes->{3.9913453868532257`*^9}, - CellLabel-> - "Out[420]=",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[BoxData["10.577057583756803`"], "Output", + CellChangeTimes->{3.9913453868532257`*^9, 3.994350748470582*^9, + 3.9943538826139393`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"e7601467-4432-4552-b387-10bac14c9dac"] }, Open ]], Cell[CellGroupData[{ @@ -7286,171 +8046,173 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850184857586*^9},ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-\ -da901e49f6f1"], + CellChangeTimes->{3.991850184857586*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 449, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387062414*^9}, - CellLabel-> - "During evaluation of \ -In[421]:=",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 450, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387076412*^9}, - CellLabel-> - "During evaluation of \ -In[421]:=",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"6.045324209263863`*^-260\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 421, 451, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387088339*^9}, +\"", 2, 99, 13, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994350748608357*^9, + 3.9943538827490463`*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], +In[99]:=",ExpressionUUID->"21ea2f00-0772-4705-af09-2fc349bf5882"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.33897489697939`*^-269\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 14, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994350748608357*^9, + 3.994353882759205*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"3cd96de7-ac1e-47d9-af4a-7c1739363394"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.844194451237894`*^-278\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 99, 15, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994350748608357*^9, + 3.9943538827728357`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"7ad391c8-82b4-4a9d-bcdc-c2b8de66aea8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 421, 452, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913453870973415`*^9}, +during this calculation.\"", 2, 99, 16, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994350748608357*^9, + 3.994353882782505*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], +In[99]:=",ExpressionUUID->"e957fa5c-5910-4054-8014-ca11304e4f0a"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VVsbB3DSgGZzMuxzDN1rnoVzPA+VObNIkiFjJYmKMpZS5BoapIEK +ZT57FxlLKFHiRkJFocsriTI3eHd/nc/3c87eZ61nPeu39mZ4HbT3WcLFxUVw +c3H9+Zzpa26UTcwx9D/MkRoJMzbsvCEWbtQdB7sOmlpLfCUAhdu8xLrTgN37 +P7/pcTU4Ylvwhqf7FhiO9694O46wflw0bf4NBQsKRbLUuC3011gfnHpTD/yq +z0ZUxj3ARHb0/eSbV9BUPbJNYywY5t/oXpx4MwCz/rZSFkMx0LDlTs6/t75D +5L7SkOywVJDor/zPS+kXyK6NaHS4dgWE9u8pWLGFBxtap3xcbmRDmrpJtbUT +L/LJS/BwInOgJ0OtbnLdanQ9k3676OUdSMyJbluyYT3O1zYtC1tRCKIXBs+m +XxdE6nVB3NDTYhBTLDs1lyeIrss/nndoLwbx+tPRuzmCmF4uGlrTUwxSE3+H +bWoQRO3spy+OjxWDnFWwR/WIICa4eSRz1peA5tJfOoOaQsg/LOQw6VoCNqEi +QxotQljh4u70bKQEzjiaG76aEUa5x1rVlyZLQfz+S/El3CI44DQoJLVQCiWC +jrPqK0UwTPHgrDU3B7peuXNSpUWw6rBySgMfB2TtQpl2ZiL4pIFFRotzoH57 +1vL2K/T1NumuWww48Mtk+mUrSxR3C7u/nw7nQEpeROEvE1Ek17n11EXS1y/n +SlC2E8UjVk/5E2I5YPWE3+i8jyjeuTuyauVZDmRuIe5ZJYsiH+/0mcHLHNiM +lpef94uiW66bQt99DhzWu7mnOU4M73Vfn5r7zAGL7DVTlkliqPt8xeT6rxxg +rjiR8PKiGB6y17666RsH2jt3kB13xfCDT+6c2RwHVIJX8fS9FMOKv693eS8l +YSTvaN438Q0YpX9SbGEjCW5C1l823tuAUic9K+6akaB5vDr2Rs0G1Nup5+ds +SQL/wF8ijKcbMPqyQuMSaxIqS3lAvmcDxqsWJNg4kCBiWZmitrgBp7mTDR/v +JqE9VlZrm6U4Bq1qDV0WQsLWrwsRQYPiGHBGcW59BgnhZhcUHo+J45uw62iZ +SULJTeVewRlxjBRJd4u9RoKYo4deJe9GXIhuXzuUTcJYxZNZHpWN+ElRL+Bk +PgnpcSmhV45txNLGCVGFKhIGhOWDGldLYKySt8iGHhJEDz6SFBWVQKePvEZf +ekmweubSGkBIYEb2X6YP35FQHpGotFZTAkP81g/v+EDCuf6J0Z0uEmj62jnK +a5gEjfxqv6+3JFCJ2Og4OEVCLMvOU3yzJF76GSacvJoCM/cb33SNJbGgdiJW +ci0Fa2I+n3SyksQrm4bN8tdRcK0hPi/FQxJ/fPAbKROkoMKi6vPys5LYWvfh +xO0NFEy4yBz53iOJOvseHmuXpeBBRPCK9UOS2HxVt01OnoKoa7UZKuOSmFms +c/boJgpWfXCuDlgihZGa6grrFCjY5JfE9UFBCpNCjNVFVClwD5s+9+K4FPK3 +v/sQtpkCucvGEqPxUhi9MqkqVY+i6/dP8YoUKaRSx7kL9CmI+Pl3u3GOFH56 +Ev2ujUXBxZPuwpUvpFB400THBFLglluY19UlhW9cbFQmjChgNs3pTn2QQreO +gR+fjSng8Ke7qk5LYVvz8e/dWyl4kdqUlSspjXrM0/4JZhSk3xNSb9gkjd7+ +KcH7zClwfe1Z/0FdGp21L05aWFAwIvZzaKOJNG5tjfdctKSAJ1tNIS1IGgWE +l6wxtKFAv+TK/ahHtL//u1XQiYKtb17+Gn8mjTeubhikaFtzLTXd80oaQ13f +h9vsoMDbPqgHPknj56aj6dHOFJgcZ0THLCPQwDnibPVOCp6vrbm9mZ/AX9rS +v41dKbDN2fFsYg2BXxJSg5to72pNXO8pRuCT+ot2TbsoCJaeuW2kSKBKmLno +7d0UTN9LeTavSmBtUux5AXe6fmaKX0gtAmMU+FZE044/5KHDNCTQeEvXcps9 +FPAv/+Haa0xgCMQnU7RTMi9Gp5kSeKhhh4SgBwWZDS3PltjR9z/L2v6ctrSL +z5cqJwIPatdNMj0pyBlbXH/YlcBj7G1ZR2mXCmvvGvQmsHKrvpiYFwVaBW3R +V/0J9EmQ/uRNu8owMMfhAIHZpRO1RbQb/bK+NBwhMFjR/JK2NwXmP/UEThwn +8H/JlpfDaL9M6dTRiiGw5pvqHYp2TyVfTM5ZAqnaazMye+l+ss7JcUsmMGc8 +V9eF9tCAYbNQOoE3qbRzZ2mPrwwViL9GoNkOImCQ9uHsNbrsmwSuKjSdWelD +wZxW/q7pXAIZJ/ZkqNOOat4SU1xAYP4TJVtH2jzufTk+pXQ9dcKkQmknfDvW +LHmfwHm1RZ5U2mvOCI6/riCwpymVu5B2+sYSgeRaAv3rpkTraYtxzHRN6gm8 +njJh2kX7+tbBXb+f0vNzt04bps3siYwpf05gGXf37DTtuwfEcoPaCRz/7RzO +7UuB8pJ7zfKvCdyXeEWUnzZ1aft4Xw+BJ8/5d6ylvVlxROByH4Hp51OLBWjX +PorTtRkk0LXjY94fGztKuq0Yoedjuqnuz++bRh7EPBojkIxTW+CjbRVpn3t0 +ksCCZy+c/vzfq/VfmlVnCNThe9HxZzzOeWfGhxcI5Or/HfpnvO/0mYLZiwQu +/0dH/898vNpqdF2WMtCZd5vsn/kOezu7reNjoNvgT80/9dg/NxnzbDUDgzzV +A//US/+Qr8h/AgzMOikEIbR5R3sLecQYWDXwusaGdpeXjRFDkoELCvFDf9PO +fdvQZchk4NS4xgMu2qGOm/e7bWLgvbwJ7U56PY1bi7gjlBi4urTdM4d238OL +SmU6DFyZse2JPu0iXf76VwYMVLnNs8hFO4IT5TyB9HjsdUYb6H4SueUXp2jJ +wKs3nXqA9pD4O1FzW3o+h0P65+j+pNJti32dGKhjufdqCW2beL3um3sYuP23 +mt462lK/iw882svAkXljyRq6/8eOMHneBzCwTD+jei/tBP+VKmKhDPyle0qx +iN4/dZbvTyYnMHDW8c2sIL3fkhvtNhSdZ+BQcUhrLr0/3dhPS5rTGOibucNX +i/a8SmnP0usMXKw8958pvb81BGJVj5MM3MvbiWb0/udKnG7MKGfgR8k+2zo6 +H17yBLqWVzOQW2OfsjbtfdP28ZNPGDg+V2UrTOdLTrfsW79eBh7UFPEspfMo +xO5KcHw/A+82ic6spo0tq5ffHmLgNWt+zwA6v95Xz6j1jTPQXiahVsSRrlfW +s9OOPEzkbz5OWdrR9RJlS4TwMnGpywWxVFu6Xikk+c9qJk4+Yrt30PloE5f5 +rkWUiYMJjPPW1nQ9fPZrGCkxcX5m31VpOk/nFdf1KTsx8XNHcLIync8z18Vj +NV2ZWH5Kq2fbFgqm1srJ6u1h4jvTa5q76Dwf/64XuDWAiZXW0hKRdP4PVHvP +uEYy8V7luffX6fOhxfLBmoRcJj60fK7mqEX3e+1j8nwBE42WRC831KTzRvWF +Y3opE9W+sRdlNSh4KPgx80YlE+3Wt7qP0ucT9ZZ/U1krE4PX9c/ZK9L5t88d +BqaZWJygz7nGoODye/+B4QUmjhZNWO4kKLhgczj+yyITMyfvSwlK0+upmfB8 +jk8GzWpPBEVJUBD3g3ReKyWD13OrejVF6fVIXBbMMpHByJ9bl21cRQGrsCj7 +0iUZ7G2Yrxj8TsJbojBr21UZfL7X/YDPNxIiLuXfmMqSQZZAZ8/QBAkPYvOu +2efL4Op2k/53X+jz3yU7Y00NfX/JwiqSfh74e9mFlNMfZfBj/JU7X+nnCZE9 +x2OOKMmieVjVqsZHJJR1hkfLqctiyc+Agd+1JDhaHIvq1JbFZXMH0nVrSEjT +DjuhAbL4yX8i8VYFCatXHTw2bieLP0ZdZ9xJEpZWegX7HpVFYe7zxSG3SJgU +sPDYUS+LCwInrqw+SUL3fmZ7YJMs4s+53z0xJNQ9XYDoF7LYmznPlxNFQkpE +ofTdLlm8xQkQUY8gQW1gVf/8qCx+U7TVUD1EQhDZtvu6oBwea417XONOwqiN +066hvXLY2Kidt2kzCUNJHjtCVsjj7/JjF1KGOBA0qsRUWyWPV+quzXMNcGDW +dP7Ll3XyuHnX6dyD/Rzg50mLDxCXx6xnWV2mvRxQC2+476Esj3xf8uoG2zgQ +6SMvaOMgjxmUTEtLFQdEDMfaFLPkMbhf38/9Hw6Yfz1q/klnEzI6Ov75qMmB +MW/ew/ej/0Lxc1mZC2Ul9PuJ6JIz9X/jz7Gkjv1DRSDQKp/M+aqA1jGX9vaJ +FYJEQqmtjo4SNnyy3J8inA8ZinrrBP2UcXk033dn5TvQIm6k/T1VBdVOvRu9 +aJML+hL1KapdquijIdeXb3cb1vDcCvWMU8NAjeBXmSdvglSsNGunvDrqib7a +8sQkC/jk3Mrtm9Tx6W1y1KrlKqiwN5Qe3a2BPPIP1F7WZEBIn0CDBZcmPrzr +/wvzL8LX70lO5hmaePN4Ym/t0nQwVX2aaa6shXphcuLeuSnw8LvBj9mXWij3 +zeIBz80kCFLS6P3XRxsDW/d8kqtMAPb43s6dfDqoKp65PHzqFGyTFdu++hZt +g9CIsp5Y+Cvm3LF6XV004tj9fL8jChR89B7J9eriHbXh29om4eDz0P/U/UOb +8ZJgR8VHtTB4lN25d1JYD9W1i4pFfQ/B1N3FWdUHeqjGmo28FLUfvOUK+TK3 +6+P47ESW7yk/iHjiHihvq4+3NfcvTw/2gxQfgeeUvT5GSZ9taXXzg5rc8KTn +zvqYyA2WQdp+ICRvtvaXpz6+zzC2ch32hafyn4Q8juhjKqfX6M12X1D4S5qQ +z9LHJ4+75JTlfGBSIV2HmtBHvso9fmk/vKD7BW4T/K6Pl46kUqpjXlAXNO4Q +Oq2PLLV77W/eeUEyZX5IZ0Ef17SEHzB76AUK+lxFVTwGSL94RhfEeoGX+QFG +gwjte+4P9/N7Qaef6apOlgGefGv/4ZGMJ1Tk/Pg4nWCAKwWmz1Mj7qCzJXTW +ItEAD7nlv4hoc4eyj2Orss8boPO6c6udyt2BkurTtUgzQLeM2X1wyh2KMurO +37hqgDwRwUdHCXfITorXMy0xwBxHdlnK7t1wNnRtakaHAUbtCVx8PbgLXLfK +oIEUC9VMuQ8LMHfCr07eNQ0ECyUnBJuMV+6EbJ/xtxYyLBRRx93xUy7w3+nK +o65/sZCrOlHaqMkFQpptSsM1WFi9jVOQesAFzlmfkKowYWGH827vpFpnqHJ5 +/VPrIAv5f5U8vhi4AzYeOFOpUsdC46NpHmEzDpC86KudWM9C74B/zoh9coAl +aSbkcCMLc4yGxZo7HGC0fFl+djMLt6e/crYnHaCK61SGQAcLf3sXOCw94ACu +F2KOznxiocqFwMq+/+whozpc++FKNgY5GDaqD9mBMP9+crszG/VlXnrG8dhC +zpbIiImdbCwbfKWoNGwDGpHJW9Ld2OhboDt4sMkGrCc4r7s92Vh4/dP/LBNs +4HTX9Lz3fjY+tprmdlxpA3O3oo0jYtlYXj/7PlXEGnoN0jvyCtl4mhXdomFk +Bf5hOdfMS9h4mDc3tlrWCmZKynzGOGysWDE0uZvXCgSY3bPq5Ww8n7qm5Gub +JVjySkrU1rHRMcAhcKuHJdR05u3teM1G+zPQcDPeAizWVCgf6WZj9e+nbTWB +FtBt2jwj9paNI0u3uE3YWMBU1ecE9w9stK0KuJstbgHKN9WK/zfKxudVmrMy +pDnU9BodSfpCfz/eNsZ12RwshBxAdYKNrFNqLdMnzMH3TNi/odNs/J69ZFLe +3Bym6k5nis6xsaH3m5C3qjnELVz2rlpgY1RXzutyYXNYp5WvtPsXPb6iUIL5 +0wxuHKiaXlxkY8BY80DOgBn8H3QSJ8E= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7464,130 +8226,125 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k8VVsbB3DSgGZzMuxzDN1rnoVzPA+VObNIkiFjJYmKMpZS5BoapIEK +ZT57FxlLKFHiRkJFocsriTI3eHd/nc/3c87eZ61nPeu39mZ4HbT3WcLFxUVw +c3H9+Zzpa26UTcwx9D/MkRoJMzbsvCEWbtQdB7sOmlpLfCUAhdu8xLrTgN37 +P7/pcTU4Ylvwhqf7FhiO9694O46wflw0bf4NBQsKRbLUuC3011gfnHpTD/yq +z0ZUxj3ARHb0/eSbV9BUPbJNYywY5t/oXpx4MwCz/rZSFkMx0LDlTs6/t75D +5L7SkOywVJDor/zPS+kXyK6NaHS4dgWE9u8pWLGFBxtap3xcbmRDmrpJtbUT +L/LJS/BwInOgJ0OtbnLdanQ9k3676OUdSMyJbluyYT3O1zYtC1tRCKIXBs+m +XxdE6nVB3NDTYhBTLDs1lyeIrss/nndoLwbx+tPRuzmCmF4uGlrTUwxSE3+H +bWoQRO3spy+OjxWDnFWwR/WIICa4eSRz1peA5tJfOoOaQsg/LOQw6VoCNqEi +QxotQljh4u70bKQEzjiaG76aEUa5x1rVlyZLQfz+S/El3CI44DQoJLVQCiWC +jrPqK0UwTPHgrDU3B7peuXNSpUWw6rBySgMfB2TtQpl2ZiL4pIFFRotzoH57 +1vL2K/T1NumuWww48Mtk+mUrSxR3C7u/nw7nQEpeROEvE1Ek17n11EXS1y/n +SlC2E8UjVk/5E2I5YPWE3+i8jyjeuTuyauVZDmRuIe5ZJYsiH+/0mcHLHNiM +lpef94uiW66bQt99DhzWu7mnOU4M73Vfn5r7zAGL7DVTlkliqPt8xeT6rxxg +rjiR8PKiGB6y17666RsH2jt3kB13xfCDT+6c2RwHVIJX8fS9FMOKv693eS8l +YSTvaN438Q0YpX9SbGEjCW5C1l823tuAUic9K+6akaB5vDr2Rs0G1Nup5+ds +SQL/wF8ijKcbMPqyQuMSaxIqS3lAvmcDxqsWJNg4kCBiWZmitrgBp7mTDR/v +JqE9VlZrm6U4Bq1qDV0WQsLWrwsRQYPiGHBGcW59BgnhZhcUHo+J45uw62iZ +SULJTeVewRlxjBRJd4u9RoKYo4deJe9GXIhuXzuUTcJYxZNZHpWN+ElRL+Bk +PgnpcSmhV45txNLGCVGFKhIGhOWDGldLYKySt8iGHhJEDz6SFBWVQKePvEZf +ekmweubSGkBIYEb2X6YP35FQHpGotFZTAkP81g/v+EDCuf6J0Z0uEmj62jnK +a5gEjfxqv6+3JFCJ2Og4OEVCLMvOU3yzJF76GSacvJoCM/cb33SNJbGgdiJW +ci0Fa2I+n3SyksQrm4bN8tdRcK0hPi/FQxJ/fPAbKROkoMKi6vPys5LYWvfh +xO0NFEy4yBz53iOJOvseHmuXpeBBRPCK9UOS2HxVt01OnoKoa7UZKuOSmFms +c/boJgpWfXCuDlgihZGa6grrFCjY5JfE9UFBCpNCjNVFVClwD5s+9+K4FPK3 +v/sQtpkCucvGEqPxUhi9MqkqVY+i6/dP8YoUKaRSx7kL9CmI+Pl3u3GOFH56 +Ev2ujUXBxZPuwpUvpFB400THBFLglluY19UlhW9cbFQmjChgNs3pTn2QQreO +gR+fjSng8Ke7qk5LYVvz8e/dWyl4kdqUlSspjXrM0/4JZhSk3xNSb9gkjd7+ +KcH7zClwfe1Z/0FdGp21L05aWFAwIvZzaKOJNG5tjfdctKSAJ1tNIS1IGgWE +l6wxtKFAv+TK/ahHtL//u1XQiYKtb17+Gn8mjTeubhikaFtzLTXd80oaQ13f +h9vsoMDbPqgHPknj56aj6dHOFJgcZ0THLCPQwDnibPVOCp6vrbm9mZ/AX9rS +v41dKbDN2fFsYg2BXxJSg5to72pNXO8pRuCT+ot2TbsoCJaeuW2kSKBKmLno +7d0UTN9LeTavSmBtUux5AXe6fmaKX0gtAmMU+FZE044/5KHDNCTQeEvXcps9 +FPAv/+Haa0xgCMQnU7RTMi9Gp5kSeKhhh4SgBwWZDS3PltjR9z/L2v6ctrSL +z5cqJwIPatdNMj0pyBlbXH/YlcBj7G1ZR2mXCmvvGvQmsHKrvpiYFwVaBW3R +V/0J9EmQ/uRNu8owMMfhAIHZpRO1RbQb/bK+NBwhMFjR/JK2NwXmP/UEThwn +8H/JlpfDaL9M6dTRiiGw5pvqHYp2TyVfTM5ZAqnaazMye+l+ss7JcUsmMGc8 +V9eF9tCAYbNQOoE3qbRzZ2mPrwwViL9GoNkOImCQ9uHsNbrsmwSuKjSdWelD +wZxW/q7pXAIZJ/ZkqNOOat4SU1xAYP4TJVtH2jzufTk+pXQ9dcKkQmknfDvW +LHmfwHm1RZ5U2mvOCI6/riCwpymVu5B2+sYSgeRaAv3rpkTraYtxzHRN6gm8 +njJh2kX7+tbBXb+f0vNzt04bps3siYwpf05gGXf37DTtuwfEcoPaCRz/7RzO +7UuB8pJ7zfKvCdyXeEWUnzZ1aft4Xw+BJ8/5d6ylvVlxROByH4Hp51OLBWjX +PorTtRkk0LXjY94fGztKuq0Yoedjuqnuz++bRh7EPBojkIxTW+CjbRVpn3t0 +ksCCZy+c/vzfq/VfmlVnCNThe9HxZzzOeWfGhxcI5Or/HfpnvO/0mYLZiwQu +/0dH/898vNpqdF2WMtCZd5vsn/kOezu7reNjoNvgT80/9dg/NxnzbDUDgzzV +A//US/+Qr8h/AgzMOikEIbR5R3sLecQYWDXwusaGdpeXjRFDkoELCvFDf9PO +fdvQZchk4NS4xgMu2qGOm/e7bWLgvbwJ7U56PY1bi7gjlBi4urTdM4d238OL +SmU6DFyZse2JPu0iXf76VwYMVLnNs8hFO4IT5TyB9HjsdUYb6H4SueUXp2jJ +wKs3nXqA9pD4O1FzW3o+h0P65+j+pNJti32dGKhjufdqCW2beL3um3sYuP23 +mt462lK/iw882svAkXljyRq6/8eOMHneBzCwTD+jei/tBP+VKmKhDPyle0qx +iN4/dZbvTyYnMHDW8c2sIL3fkhvtNhSdZ+BQcUhrLr0/3dhPS5rTGOibucNX +i/a8SmnP0usMXKw8958pvb81BGJVj5MM3MvbiWb0/udKnG7MKGfgR8k+2zo6 +H17yBLqWVzOQW2OfsjbtfdP28ZNPGDg+V2UrTOdLTrfsW79eBh7UFPEspfMo +xO5KcHw/A+82ic6spo0tq5ffHmLgNWt+zwA6v95Xz6j1jTPQXiahVsSRrlfW +s9OOPEzkbz5OWdrR9RJlS4TwMnGpywWxVFu6Xikk+c9qJk4+Yrt30PloE5f5 +rkWUiYMJjPPW1nQ9fPZrGCkxcX5m31VpOk/nFdf1KTsx8XNHcLIync8z18Vj +NV2ZWH5Kq2fbFgqm1srJ6u1h4jvTa5q76Dwf/64XuDWAiZXW0hKRdP4PVHvP +uEYy8V7luffX6fOhxfLBmoRcJj60fK7mqEX3e+1j8nwBE42WRC831KTzRvWF +Y3opE9W+sRdlNSh4KPgx80YlE+3Wt7qP0ucT9ZZ/U1krE4PX9c/ZK9L5t88d +BqaZWJygz7nGoODye/+B4QUmjhZNWO4kKLhgczj+yyITMyfvSwlK0+upmfB8 +jk8GzWpPBEVJUBD3g3ReKyWD13OrejVF6fVIXBbMMpHByJ9bl21cRQGrsCj7 +0iUZ7G2Yrxj8TsJbojBr21UZfL7X/YDPNxIiLuXfmMqSQZZAZ8/QBAkPYvOu +2efL4Op2k/53X+jz3yU7Y00NfX/JwiqSfh74e9mFlNMfZfBj/JU7X+nnCZE9 +x2OOKMmieVjVqsZHJJR1hkfLqctiyc+Agd+1JDhaHIvq1JbFZXMH0nVrSEjT +DjuhAbL4yX8i8VYFCatXHTw2bieLP0ZdZ9xJEpZWegX7HpVFYe7zxSG3SJgU +sPDYUS+LCwInrqw+SUL3fmZ7YJMs4s+53z0xJNQ9XYDoF7LYmznPlxNFQkpE +ofTdLlm8xQkQUY8gQW1gVf/8qCx+U7TVUD1EQhDZtvu6oBwea417XONOwqiN +066hvXLY2Kidt2kzCUNJHjtCVsjj7/JjF1KGOBA0qsRUWyWPV+quzXMNcGDW +dP7Ll3XyuHnX6dyD/Rzg50mLDxCXx6xnWV2mvRxQC2+476Esj3xf8uoG2zgQ +6SMvaOMgjxmUTEtLFQdEDMfaFLPkMbhf38/9Hw6Yfz1q/klnEzI6Ov75qMmB +MW/ew/ej/0Lxc1mZC2Ul9PuJ6JIz9X/jz7Gkjv1DRSDQKp/M+aqA1jGX9vaJ +FYJEQqmtjo4SNnyy3J8inA8ZinrrBP2UcXk033dn5TvQIm6k/T1VBdVOvRu9 +aJML+hL1KapdquijIdeXb3cb1vDcCvWMU8NAjeBXmSdvglSsNGunvDrqib7a +8sQkC/jk3Mrtm9Tx6W1y1KrlKqiwN5Qe3a2BPPIP1F7WZEBIn0CDBZcmPrzr +/wvzL8LX70lO5hmaePN4Ym/t0nQwVX2aaa6shXphcuLeuSnw8LvBj9mXWij3 +zeIBz80kCFLS6P3XRxsDW/d8kqtMAPb43s6dfDqoKp65PHzqFGyTFdu++hZt +g9CIsp5Y+Cvm3LF6XV004tj9fL8jChR89B7J9eriHbXh29om4eDz0P/U/UOb +8ZJgR8VHtTB4lN25d1JYD9W1i4pFfQ/B1N3FWdUHeqjGmo28FLUfvOUK+TK3 +6+P47ESW7yk/iHjiHihvq4+3NfcvTw/2gxQfgeeUvT5GSZ9taXXzg5rc8KTn +zvqYyA2WQdp+ICRvtvaXpz6+zzC2ch32hafyn4Q8juhjKqfX6M12X1D4S5qQ +z9LHJ4+75JTlfGBSIV2HmtBHvso9fmk/vKD7BW4T/K6Pl46kUqpjXlAXNO4Q +Oq2PLLV77W/eeUEyZX5IZ0Ef17SEHzB76AUK+lxFVTwGSL94RhfEeoGX+QFG +gwjte+4P9/N7Qaef6apOlgGefGv/4ZGMJ1Tk/Pg4nWCAKwWmz1Mj7qCzJXTW +ItEAD7nlv4hoc4eyj2Orss8boPO6c6udyt2BkurTtUgzQLeM2X1wyh2KMurO +37hqgDwRwUdHCXfITorXMy0xwBxHdlnK7t1wNnRtakaHAUbtCVx8PbgLXLfK +oIEUC9VMuQ8LMHfCr07eNQ0ECyUnBJuMV+6EbJ/xtxYyLBRRx93xUy7w3+nK +o65/sZCrOlHaqMkFQpptSsM1WFi9jVOQesAFzlmfkKowYWGH827vpFpnqHJ5 +/VPrIAv5f5U8vhi4AzYeOFOpUsdC46NpHmEzDpC86KudWM9C74B/zoh9coAl +aSbkcCMLc4yGxZo7HGC0fFl+djMLt6e/crYnHaCK61SGQAcLf3sXOCw94ACu +F2KOznxiocqFwMq+/+whozpc++FKNgY5GDaqD9mBMP9+crszG/VlXnrG8dhC +zpbIiImdbCwbfKWoNGwDGpHJW9Ld2OhboDt4sMkGrCc4r7s92Vh4/dP/LBNs +4HTX9Lz3fjY+tprmdlxpA3O3oo0jYtlYXj/7PlXEGnoN0jvyCtl4mhXdomFk +Bf5hOdfMS9h4mDc3tlrWCmZKynzGOGysWDE0uZvXCgSY3bPq5Ww8n7qm5Gub +JVjySkrU1rHRMcAhcKuHJdR05u3teM1G+zPQcDPeAizWVCgf6WZj9e+nbTWB +FtBt2jwj9paNI0u3uE3YWMBU1ecE9w9stK0KuJstbgHKN9WK/zfKxudVmrMy +pDnU9BodSfpCfz/eNsZ12RwshBxAdYKNrFNqLdMnzMH3TNi/odNs/J69ZFLe +3Bym6k5nis6xsaH3m5C3qjnELVz2rlpgY1RXzutyYXNYp5WvtPsXPb6iUIL5 +0wxuHKiaXlxkY8BY80DOgBn8H3QSJ8E= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07187000978006201}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7599,19 +8356,19 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07187000978006201}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7625,129 +8382,124 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k8VVsbB3DSgGZzMuxzDN1rnoVzPA+VObNIkiFjJYmKMpZS5BoapIEK +ZT57FxlLKFHiRkJFocsriTI3eHd/nc/3c87eZ61nPeu39mZ4HbT3WcLFxUVw +c3H9+Zzpa26UTcwx9D/MkRoJMzbsvCEWbtQdB7sOmlpLfCUAhdu8xLrTgN37 +P7/pcTU4Ylvwhqf7FhiO9694O46wflw0bf4NBQsKRbLUuC3011gfnHpTD/yq +z0ZUxj3ARHb0/eSbV9BUPbJNYywY5t/oXpx4MwCz/rZSFkMx0LDlTs6/t75D +5L7SkOywVJDor/zPS+kXyK6NaHS4dgWE9u8pWLGFBxtap3xcbmRDmrpJtbUT +L/LJS/BwInOgJ0OtbnLdanQ9k3676OUdSMyJbluyYT3O1zYtC1tRCKIXBs+m +XxdE6nVB3NDTYhBTLDs1lyeIrss/nndoLwbx+tPRuzmCmF4uGlrTUwxSE3+H +bWoQRO3spy+OjxWDnFWwR/WIICa4eSRz1peA5tJfOoOaQsg/LOQw6VoCNqEi +QxotQljh4u70bKQEzjiaG76aEUa5x1rVlyZLQfz+S/El3CI44DQoJLVQCiWC +jrPqK0UwTPHgrDU3B7peuXNSpUWw6rBySgMfB2TtQpl2ZiL4pIFFRotzoH57 +1vL2K/T1NumuWww48Mtk+mUrSxR3C7u/nw7nQEpeROEvE1Ek17n11EXS1y/n +SlC2E8UjVk/5E2I5YPWE3+i8jyjeuTuyauVZDmRuIe5ZJYsiH+/0mcHLHNiM +lpef94uiW66bQt99DhzWu7mnOU4M73Vfn5r7zAGL7DVTlkliqPt8xeT6rxxg +rjiR8PKiGB6y17666RsH2jt3kB13xfCDT+6c2RwHVIJX8fS9FMOKv693eS8l +YSTvaN438Q0YpX9SbGEjCW5C1l823tuAUic9K+6akaB5vDr2Rs0G1Nup5+ds +SQL/wF8ijKcbMPqyQuMSaxIqS3lAvmcDxqsWJNg4kCBiWZmitrgBp7mTDR/v +JqE9VlZrm6U4Bq1qDV0WQsLWrwsRQYPiGHBGcW59BgnhZhcUHo+J45uw62iZ +SULJTeVewRlxjBRJd4u9RoKYo4deJe9GXIhuXzuUTcJYxZNZHpWN+ElRL+Bk +PgnpcSmhV45txNLGCVGFKhIGhOWDGldLYKySt8iGHhJEDz6SFBWVQKePvEZf +ekmweubSGkBIYEb2X6YP35FQHpGotFZTAkP81g/v+EDCuf6J0Z0uEmj62jnK +a5gEjfxqv6+3JFCJ2Og4OEVCLMvOU3yzJF76GSacvJoCM/cb33SNJbGgdiJW +ci0Fa2I+n3SyksQrm4bN8tdRcK0hPi/FQxJ/fPAbKROkoMKi6vPys5LYWvfh +xO0NFEy4yBz53iOJOvseHmuXpeBBRPCK9UOS2HxVt01OnoKoa7UZKuOSmFms +c/boJgpWfXCuDlgihZGa6grrFCjY5JfE9UFBCpNCjNVFVClwD5s+9+K4FPK3 +v/sQtpkCucvGEqPxUhi9MqkqVY+i6/dP8YoUKaRSx7kL9CmI+Pl3u3GOFH56 +Ev2ujUXBxZPuwpUvpFB400THBFLglluY19UlhW9cbFQmjChgNs3pTn2QQreO +gR+fjSng8Ke7qk5LYVvz8e/dWyl4kdqUlSspjXrM0/4JZhSk3xNSb9gkjd7+ +KcH7zClwfe1Z/0FdGp21L05aWFAwIvZzaKOJNG5tjfdctKSAJ1tNIS1IGgWE +l6wxtKFAv+TK/ahHtL//u1XQiYKtb17+Gn8mjTeubhikaFtzLTXd80oaQ13f +h9vsoMDbPqgHPknj56aj6dHOFJgcZ0THLCPQwDnibPVOCp6vrbm9mZ/AX9rS +v41dKbDN2fFsYg2BXxJSg5to72pNXO8pRuCT+ot2TbsoCJaeuW2kSKBKmLno +7d0UTN9LeTavSmBtUux5AXe6fmaKX0gtAmMU+FZE044/5KHDNCTQeEvXcps9 +FPAv/+Haa0xgCMQnU7RTMi9Gp5kSeKhhh4SgBwWZDS3PltjR9z/L2v6ctrSL +z5cqJwIPatdNMj0pyBlbXH/YlcBj7G1ZR2mXCmvvGvQmsHKrvpiYFwVaBW3R +V/0J9EmQ/uRNu8owMMfhAIHZpRO1RbQb/bK+NBwhMFjR/JK2NwXmP/UEThwn +8H/JlpfDaL9M6dTRiiGw5pvqHYp2TyVfTM5ZAqnaazMye+l+ss7JcUsmMGc8 +V9eF9tCAYbNQOoE3qbRzZ2mPrwwViL9GoNkOImCQ9uHsNbrsmwSuKjSdWelD +wZxW/q7pXAIZJ/ZkqNOOat4SU1xAYP4TJVtH2jzufTk+pXQ9dcKkQmknfDvW +LHmfwHm1RZ5U2mvOCI6/riCwpymVu5B2+sYSgeRaAv3rpkTraYtxzHRN6gm8 +njJh2kX7+tbBXb+f0vNzt04bps3siYwpf05gGXf37DTtuwfEcoPaCRz/7RzO +7UuB8pJ7zfKvCdyXeEWUnzZ1aft4Xw+BJ8/5d6ylvVlxROByH4Hp51OLBWjX +PorTtRkk0LXjY94fGztKuq0Yoedjuqnuz++bRh7EPBojkIxTW+CjbRVpn3t0 +ksCCZy+c/vzfq/VfmlVnCNThe9HxZzzOeWfGhxcI5Or/HfpnvO/0mYLZiwQu +/0dH/898vNpqdF2WMtCZd5vsn/kOezu7reNjoNvgT80/9dg/NxnzbDUDgzzV +A//US/+Qr8h/AgzMOikEIbR5R3sLecQYWDXwusaGdpeXjRFDkoELCvFDf9PO +fdvQZchk4NS4xgMu2qGOm/e7bWLgvbwJ7U56PY1bi7gjlBi4urTdM4d238OL +SmU6DFyZse2JPu0iXf76VwYMVLnNs8hFO4IT5TyB9HjsdUYb6H4SueUXp2jJ +wKs3nXqA9pD4O1FzW3o+h0P65+j+pNJti32dGKhjufdqCW2beL3um3sYuP23 +mt462lK/iw882svAkXljyRq6/8eOMHneBzCwTD+jei/tBP+VKmKhDPyle0qx +iN4/dZbvTyYnMHDW8c2sIL3fkhvtNhSdZ+BQcUhrLr0/3dhPS5rTGOibucNX +i/a8SmnP0usMXKw8958pvb81BGJVj5MM3MvbiWb0/udKnG7MKGfgR8k+2zo6 +H17yBLqWVzOQW2OfsjbtfdP28ZNPGDg+V2UrTOdLTrfsW79eBh7UFPEspfMo +xO5KcHw/A+82ic6spo0tq5ffHmLgNWt+zwA6v95Xz6j1jTPQXiahVsSRrlfW +s9OOPEzkbz5OWdrR9RJlS4TwMnGpywWxVFu6Xikk+c9qJk4+Yrt30PloE5f5 +rkWUiYMJjPPW1nQ9fPZrGCkxcX5m31VpOk/nFdf1KTsx8XNHcLIync8z18Vj +NV2ZWH5Kq2fbFgqm1srJ6u1h4jvTa5q76Dwf/64XuDWAiZXW0hKRdP4PVHvP +uEYy8V7luffX6fOhxfLBmoRcJj60fK7mqEX3e+1j8nwBE42WRC831KTzRvWF +Y3opE9W+sRdlNSh4KPgx80YlE+3Wt7qP0ucT9ZZ/U1krE4PX9c/ZK9L5t88d +BqaZWJygz7nGoODye/+B4QUmjhZNWO4kKLhgczj+yyITMyfvSwlK0+upmfB8 +jk8GzWpPBEVJUBD3g3ReKyWD13OrejVF6fVIXBbMMpHByJ9bl21cRQGrsCj7 +0iUZ7G2Yrxj8TsJbojBr21UZfL7X/YDPNxIiLuXfmMqSQZZAZ8/QBAkPYvOu +2efL4Op2k/53X+jz3yU7Y00NfX/JwiqSfh74e9mFlNMfZfBj/JU7X+nnCZE9 +x2OOKMmieVjVqsZHJJR1hkfLqctiyc+Agd+1JDhaHIvq1JbFZXMH0nVrSEjT +DjuhAbL4yX8i8VYFCatXHTw2bieLP0ZdZ9xJEpZWegX7HpVFYe7zxSG3SJgU +sPDYUS+LCwInrqw+SUL3fmZ7YJMs4s+53z0xJNQ9XYDoF7LYmznPlxNFQkpE +ofTdLlm8xQkQUY8gQW1gVf/8qCx+U7TVUD1EQhDZtvu6oBwea417XONOwqiN +066hvXLY2Kidt2kzCUNJHjtCVsjj7/JjF1KGOBA0qsRUWyWPV+quzXMNcGDW +dP7Ll3XyuHnX6dyD/Rzg50mLDxCXx6xnWV2mvRxQC2+476Esj3xf8uoG2zgQ +6SMvaOMgjxmUTEtLFQdEDMfaFLPkMbhf38/9Hw6Yfz1q/klnEzI6Ov75qMmB +MW/ew/ej/0Lxc1mZC2Ul9PuJ6JIz9X/jz7Gkjv1DRSDQKp/M+aqA1jGX9vaJ +FYJEQqmtjo4SNnyy3J8inA8ZinrrBP2UcXk033dn5TvQIm6k/T1VBdVOvRu9 +aJML+hL1KapdquijIdeXb3cb1vDcCvWMU8NAjeBXmSdvglSsNGunvDrqib7a +8sQkC/jk3Mrtm9Tx6W1y1KrlKqiwN5Qe3a2BPPIP1F7WZEBIn0CDBZcmPrzr +/wvzL8LX70lO5hmaePN4Ym/t0nQwVX2aaa6shXphcuLeuSnw8LvBj9mXWij3 +zeIBz80kCFLS6P3XRxsDW/d8kqtMAPb43s6dfDqoKp65PHzqFGyTFdu++hZt +g9CIsp5Y+Cvm3LF6XV004tj9fL8jChR89B7J9eriHbXh29om4eDz0P/U/UOb +8ZJgR8VHtTB4lN25d1JYD9W1i4pFfQ/B1N3FWdUHeqjGmo28FLUfvOUK+TK3 +6+P47ESW7yk/iHjiHihvq4+3NfcvTw/2gxQfgeeUvT5GSZ9taXXzg5rc8KTn +zvqYyA2WQdp+ICRvtvaXpz6+zzC2ch32hafyn4Q8juhjKqfX6M12X1D4S5qQ +z9LHJ4+75JTlfGBSIV2HmtBHvso9fmk/vKD7BW4T/K6Pl46kUqpjXlAXNO4Q +Oq2PLLV77W/eeUEyZX5IZ0Ef17SEHzB76AUK+lxFVTwGSL94RhfEeoGX+QFG +gwjte+4P9/N7Qaef6apOlgGefGv/4ZGMJ1Tk/Pg4nWCAKwWmz1Mj7qCzJXTW +ItEAD7nlv4hoc4eyj2Orss8boPO6c6udyt2BkurTtUgzQLeM2X1wyh2KMurO +37hqgDwRwUdHCXfITorXMy0xwBxHdlnK7t1wNnRtakaHAUbtCVx8PbgLXLfK +oIEUC9VMuQ8LMHfCr07eNQ0ECyUnBJuMV+6EbJ/xtxYyLBRRx93xUy7w3+nK +o65/sZCrOlHaqMkFQpptSsM1WFi9jVOQesAFzlmfkKowYWGH827vpFpnqHJ5 +/VPrIAv5f5U8vhi4AzYeOFOpUsdC46NpHmEzDpC86KudWM9C74B/zoh9coAl +aSbkcCMLc4yGxZo7HGC0fFl+djMLt6e/crYnHaCK61SGQAcLf3sXOCw94ACu +F2KOznxiocqFwMq+/+whozpc++FKNgY5GDaqD9mBMP9+crszG/VlXnrG8dhC +zpbIiImdbCwbfKWoNGwDGpHJW9Ld2OhboDt4sMkGrCc4r7s92Vh4/dP/LBNs +4HTX9Lz3fjY+tprmdlxpA3O3oo0jYtlYXj/7PlXEGnoN0jvyCtl4mhXdomFk +Bf5hOdfMS9h4mDc3tlrWCmZKynzGOGysWDE0uZvXCgSY3bPq5Ww8n7qm5Gub +JVjySkrU1rHRMcAhcKuHJdR05u3teM1G+zPQcDPeAizWVCgf6WZj9e+nbTWB +FtBt2jwj9paNI0u3uE3YWMBU1ecE9w9stK0KuJstbgHKN9WK/zfKxudVmrMy +pDnU9BodSfpCfz/eNsZ12RwshBxAdYKNrFNqLdMnzMH3TNi/odNs/J69ZFLe +3Bym6k5nis6xsaH3m5C3qjnELVz2rlpgY1RXzutyYXNYp5WvtPsXPb6iUIL5 +0wxuHKiaXlxkY8BY80DOgBn8H3QSJ8E= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07187000978006201}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7758,6 +8510,7 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7785,7 +8538,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07335635796919572}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07187000978006201}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7793,9 +8547,9 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913457856953163`*^9}, - CellLabel-> - "Out[421]=",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] + CellChangeTimes->{3.9913457856953163`*^9, 3.9943517167419786`*^9, + 3.994354822235814*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"c11e9bef-86db-4c63-bd21-9bfa58b616c7"] }, Open ]], Cell[CellGroupData[{ @@ -7848,66 +8602,78 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[422]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], + "In[100]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 422, 453, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785749161*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3911286921482715`*^-159\\\", \ +RowBox[{\\\"505518991860510123640143147290826802026\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"71\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"9512072804761600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 17, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.9943517169726543`*^9, + 3.994354822401939*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], +In[100]:=",ExpressionUUID->"4c377bfb-026c-49f9-970f-2c9785909e48"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 454, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785759161*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.5162358982840327`*^-162\\\", \ +RowBox[{\\\"164243120455479739170682508554789627978\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4724542670438400000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 18, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.9943517169726543`*^9, + 3.994354822412828*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], +In[100]:=",ExpressionUUID->"2a137beb-d8e6-49f5-bcb4-5695ec48b319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 455, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785767502*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.170744231785013`*^-165\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 19, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.9943517169726543`*^9, + 3.9943548224217443`*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], +In[100]:=",ExpressionUUID->"2f029217-a132-4360-a9b9-d9008a638567"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 422, 456, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457857765007`*^9}, +during this calculation.\"", 2, 100, 20, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.9943517169726543`*^9, + 3.994354822431823*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], +In[100]:=",ExpressionUUID->"f8ed97a4-0050-4594-8fc8-4884d77cf72b"], -Cell[BoxData["10.362747935330768`"], "Output", - CellChangeTimes->{3.991345792196575*^9}, +Cell[BoxData["10.575978099983018`"], "Output", + CellChangeTimes->{3.991345792196575*^9, 3.99435180621659*^9, + 3.994354913774333*^9}, CellLabel-> - "Out[422]=",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] + "Out[100]=",ExpressionUUID->"7964bcb8-0df7-4c4c-bd8c-45f3ee7ecd0c"] }, Open ]], Cell[CellGroupData[{ @@ -7974,68 +8740,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918501903071613`*^9, - 3.9918501951272774`*^9}},ExpressionUUID->"0b10f52e-4583-2a4b-993d-\ -96e59dd43e6a"], + CellChangeTimes->{{3.9918501903071613`*^9, 3.9918501951272774`*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 457, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792232563*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.1985377845763865`*^-206\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 21, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994351806301631*^9, + 3.994354913848631*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], +In[101]:=",ExpressionUUID->"be422642-eed4-4494-8c63-5286c79dc62d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 458, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792242544*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.028959552781788`*^-211\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 22, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994351806301631*^9, + 3.994354913860241*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], +In[101]:=",ExpressionUUID->"109ef0c5-36c3-48ab-b12c-31959c1be584"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 459, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922505417`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.176749500174552`*^-215\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 23, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994351806301631*^9, + 3.9943549138691*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], +In[101]:=",ExpressionUUID->"eb74ee84-44c1-40aa-a245-339b1d871dce"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 423, 460, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922595577`*^9}, +during this calculation.\"", 2, 101, 24, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994351806301631*^9, + 3.994354913877472*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], +In[101]:=",ExpressionUUID->"81a5bb08-ab89-4100-b48f-8c17dbf0ba66"], -Cell[BoxData["0.32136877427435395`"], "Output", - CellChangeTimes->{3.991345799137081*^9}, +Cell[BoxData["0.6445933823961225`"], "Output", + CellChangeTimes->{3.991345799137081*^9, 3.994351818323482*^9, + 3.9943549257568493`*^9}, CellLabel-> - "Out[423]=",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] + "Out[101]=",ExpressionUUID->"d5370260-e4a0-40fd-b540-28fcea540f73"] }, Open ]], Cell[CellGroupData[{ @@ -8056,8 +8834,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8102,68 +8879,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185020477277*^9, - 3.991850207864538*^9}},ExpressionUUID->"a58948c9-6d3d-e847-a269-\ -d2e0cc5d1484"], + CellChangeTimes->{{3.99185020477277*^9, 3.991850207864538*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 461, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991730843`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.1985377845763865`*^-206\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 25, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.99435181838068*^9, + 3.994354925820195*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], +In[102]:=",ExpressionUUID->"923ce840-495b-4b53-bd9c-004516b317de"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 462, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991830807`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.028959552781788`*^-211\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 26, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.99435181838068*^9, + 3.9943549258313923`*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], +In[102]:=",ExpressionUUID->"32f0c2bc-fc42-40a7-ba99-886a869ad7b9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 463, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345799191578*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.176749500174552`*^-215\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 27, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.99435181838068*^9, + 3.9943549258445587`*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], +In[102]:=",ExpressionUUID->"694e5046-7feb-46ac-84b7-e70467ee7b6d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 424, 464, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457992005787`*^9}, +during this calculation.\"", 2, 102, 28, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.99435181838068*^9, + 3.994354925854217*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], +In[102]:=",ExpressionUUID->"4a504352-d2d0-4839-93e1-5e12e138a35f"], -Cell[BoxData["6.886509882261309`"], "Output", - CellChangeTimes->{3.991345804559931*^9}, +Cell[BoxData["31.246328708501363`"], "Output", + CellChangeTimes->{3.991345804559931*^9, 3.9943518295631027`*^9, + 3.994354936861311*^9}, CellLabel-> - "Out[424]=",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] + "Out[102]=",ExpressionUUID->"b82518a7-1fc7-4bae-a324-375167ede266"] }, Open ]], Cell[CellGroupData[{ @@ -8184,8 +8973,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8230,68 +9018,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918502122939777`*^9, - 3.991850217343153*^9}},ExpressionUUID->"c817b2d1-7deb-5a45-9938-\ -ca10003188eb"], + CellChangeTimes->{{3.9918502122939777`*^9, 3.991850217343153*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 465, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046014442`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.1985377845763865`*^-206\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 29, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994351829644134*^9, + 3.9943549369406548`*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], +In[103]:=",ExpressionUUID->"1214f3da-0c5e-4a78-a17c-39b224c90d1f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 466, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046114445`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.028959552781788`*^-211\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 30, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994351829644134*^9, + 3.994354936951058*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], +In[103]:=",ExpressionUUID->"f04172d0-6909-4b66-a47e-09135e1960af"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 467, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345804619444*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.176749500174552`*^-215\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 31, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994351829644134*^9, + 3.994354936960904*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], +In[103]:=",ExpressionUUID->"c769fb59-8590-4c55-94d1-3a69a3f79b55"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 425, 468, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046274433`*^9}, +during this calculation.\"", 2, 103, 32, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994351829644134*^9, + 3.9943549369698267`*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], +In[103]:=",ExpressionUUID->"5f19ed17-f8f5-4912-a36d-6acc441c306a"], -Cell[BoxData["18.478556086442907`"], "Output", - CellChangeTimes->{3.991345807954506*^9}, +Cell[BoxData["5.347133415563602`"], "Output", + CellChangeTimes->{3.991345807954506*^9, 3.994351838841621*^9, + 3.994354946117659*^9}, CellLabel-> - "Out[425]=",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] + "Out[103]=",ExpressionUUID->"6b5ff289-fb27-47f1-a036-0bdbbe278026"] }, Open ]], Cell[CellGroupData[{ @@ -8300,22 +9100,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991850221900238*^9, - 3.9918502257325497`*^9}},ExpressionUUID->"350334c7-7c47-c24c-8adc-\ -781173809e57"], - -Cell[BoxData["0.028488532115740543`"], "Output", - CellChangeTimes->{3.991345807987507*^9}, + CellChangeTimes->{{3.991850221900238*^9, 3.9918502257325497`*^9}}, CellLabel-> - "Out[426]=",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] + "In[104]:=",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], + +Cell[BoxData["0.04986844587597723`"], "Output", + CellChangeTimes->{3.991345807987507*^9, 3.99435183892207*^9, + 3.994354946168642*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"bbd695d6-afee-4e5d-bebb-d84c0900bc40"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991850228782873*^9, 3.991850231287325*^9}, - 3.9919246253575134`*^9},ExpressionUUID->"597921e5-69d3-564d-a8fa-\ -092e912c15e0"], + 3.9919246253575134`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ @@ -8338,12 +9140,13 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[428]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], + "In[106]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.991345808020666*^9}, +Cell[BoxData["6.649313995945192`"], "Output", + CellChangeTimes->{3.991345808020666*^9, 3.9943518389522552`*^9, + 3.99435494619328*^9}, CellLabel-> - "Out[428]=",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] + "Out[106]=",ExpressionUUID->"e453e849-ae74-4baf-9635-c2256d8d425d"] }, Open ]], Cell[CellGroupData[{ @@ -8353,12 +9156,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[430]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], + "In[107]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913458080616665`*^9}, +Cell[BoxData["2.4252285524537065`"], "Output", + CellChangeTimes->{3.9913458080616665`*^9, 3.994351838969225*^9, + 3.994354946210112*^9}, CellLabel-> - "Out[430]=",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] + "Out[107]=",ExpressionUUID->"fefd3f7e-2730-4243-99d9-64b92cc284dd"] }, Open ]], Cell[CellGroupData[{ @@ -8368,12 +9172,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[433]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], + "In[108]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.991345808188246*^9}, +Cell[BoxData["16.12610615719633`"], "Output", + CellChangeTimes->{3.991345808188246*^9, 3.994351838990786*^9, + 3.994354946226243*^9}, CellLabel-> - "Out[433]=",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] + "Out[108]=",ExpressionUUID->"6981a040-2126-4dc4-9fd0-9b923fd672c8"] }, Open ]], Cell[CellGroupData[{ @@ -8563,12 +9368,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[434]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], + "In[109]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[BoxData["0.04214145338799881`"], "Output", - CellChangeTimes->{3.991345808220566*^9}, +Cell[BoxData["0.007265232904325726`"], "Output", + CellChangeTimes->{3.991345808220566*^9, 3.994351839011627*^9, + 3.994354946245872*^9}, CellLabel-> - "Out[434]=",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] + "Out[109]=",ExpressionUUID->"4c814f8a-f860-4c85-9bb7-7f1eac9e327b"] }, Open ]], Cell[CellGroupData[{ @@ -8582,12 +9388,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[435]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], + "In[110]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[BoxData["4.317080886816563`"], "Output", - CellChangeTimes->{3.9913458083195686`*^9}, +Cell[BoxData["10.397290302873296`"], "Output", + CellChangeTimes->{3.9913458083195686`*^9, 3.994351839224409*^9, + 3.9943549464356327`*^9}, CellLabel-> - "Out[435]=",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] + "Out[110]=",ExpressionUUID->"bc9c4a58-03ab-40ce-a669-b0b3fa59fc4f"] }, Open ]], Cell[CellGroupData[{ @@ -8779,12 +9586,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[436]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], + "In[111]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[BoxData["0.012862376162526763`"], "Output", - CellChangeTimes->{3.991345808334568*^9}, +Cell[BoxData["0.05897282069715882`"], "Output", + CellChangeTimes->{3.991345808334568*^9, 3.994351839243806*^9, + 3.994354946455739*^9}, CellLabel-> - "Out[436]=",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] + "Out[111]=",ExpressionUUID->"86bd98e7-1eb1-43f2-b283-0a8771425e22"] }, Open ]], Cell[CellGroupData[{ @@ -8798,12 +9606,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[437]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], + "In[112]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[BoxData["7.814196669618258`"], "Output", - CellChangeTimes->{3.991345808432392*^9}, +Cell[BoxData["3.6493791821563977`"], "Output", + CellChangeTimes->{3.991345808432392*^9, 3.99435183943125*^9, + 3.994354946665182*^9}, CellLabel-> - "Out[437]=",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] + "Out[112]=",ExpressionUUID->"7eb5b1aa-c4bc-4fc0-a32a-c2da00b14094"] }, Open ]], Cell[CellGroupData[{ @@ -8896,12 +9705,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[438]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], + "In[113]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991345808448488*^9}, +Cell[BoxData["0.07637363207411572`"], "Output", + CellChangeTimes->{3.991345808448488*^9, 3.994351839449369*^9, + 3.9943549466819687`*^9}, CellLabel-> - "Out[438]=",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] + "Out[113]=",ExpressionUUID->"a6326281-ae75-462e-9185-c4f1be0b73d8"] }, Open ]], Cell[CellGroupData[{ @@ -8991,12 +9801,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[439]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], + "In[114]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913458084773808`*^9}, +Cell[BoxData["0.9236263679258842`"], "Output", + CellChangeTimes->{3.9913458084773808`*^9, 3.994351839466249*^9, + 3.994354946700061*^9}, CellLabel-> - "Out[439]=",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] + "Out[114]=",ExpressionUUID->"646a8000-d9c0-4eca-96f9-7cf85838faa3"] }, Open ]], Cell[CellGroupData[{ @@ -9119,12 +9930,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[440]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], + "In[115]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913458085134735`*^9}, +Cell[BoxData["0.07054070039792333`"], "Output", + CellChangeTimes->{3.9913458085134735`*^9, 3.994351839485936*^9, + 3.99435494672088*^9}, CellLabel-> - "Out[440]=",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] + "Out[115]=",ExpressionUUID->"04472b70-0339-4b92-b867-4a6ea6121cef"] }, Open ]], Cell[CellGroupData[{ @@ -9186,67 +9998,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185025346871*^9},ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], + CellChangeTimes->{3.99185025346871*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 469, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085463753`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.498948639362034`*^-212\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 33, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994351839506357*^9, + 3.994354946742567*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], +In[116]:=",ExpressionUUID->"ba71c149-191e-479a-adc3-5fdfed38305e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 470, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085563755`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.149987753556857`*^-217\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 34, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994351839506357*^9, + 3.994354946752624*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], +In[116]:=",ExpressionUUID->"7338aa19-ef23-4cf0-9236-6b478cba2c87"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 441, 471, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345808564377*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.2054981381083754`*^-222\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 35, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994351839506357*^9, + 3.994354946762673*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], +In[116]:=",ExpressionUUID->"c3149824-0df7-4fce-9bf0-485569e2dbf4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 441, 472, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085733776`*^9}, +during this calculation.\"", 2, 116, 36, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994351839506357*^9, + 3.994354946772634*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], +In[116]:=",ExpressionUUID->"2d78489d-4431-4d8b-825d-8942ef3b3b1b"], -Cell[BoxData["4.317080886816564`"], "Output", - CellChangeTimes->{3.9913458125059433`*^9}, +Cell[BoxData["10.3972903028733`"], "Output", + CellChangeTimes->{3.9913458125059433`*^9, 3.9943518473661003`*^9, + 3.9943549547067957`*^9}, CellLabel-> - "Out[441]=",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] + "Out[116]=",ExpressionUUID->"50814d78-172b-418f-afed-c070d36fcdb3"] }, Open ]], Cell[CellGroupData[{ @@ -9308,68 +10133,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918502579298553`*^9},ExpressionUUID->"baacd3f7-96e4-2949-b9f9-\ -9afb90e551d9"], + CellChangeTimes->{3.9918502579298553`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 473, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812542961*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.498948639362034`*^-212\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 37, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994351847420464*^9, + 3.994354954763973*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], +In[117]:=",ExpressionUUID->"faa8b693-0c99-4dd4-9ca3-02f35525240e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 474, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812552984*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.149987753556857`*^-217\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 38, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994351847420464*^9, + 3.994354954779331*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], +In[117]:=",ExpressionUUID->"cd2a29c1-b640-4167-8643-b4aaebb7ef72"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 442, 475, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134581256196*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.2054981381083754`*^-222\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 39, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994351847420464*^9, + 3.994354954790039*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], +In[117]:=",ExpressionUUID->"835a796d-e126-4d4c-b739-06906ede3204"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 442, 476, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812570959*^9}, +during this calculation.\"", 2, 117, 40, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994351847420464*^9, + 3.994354954800337*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], +In[117]:=",ExpressionUUID->"fabeb5f7-7f63-4abe-b4b1-865dc65e8099"], -Cell[BoxData["7.8141966696182585`"], "Output", - CellChangeTimes->{3.991345816415531*^9}, +Cell[BoxData["3.649379182156397`"], "Output", + CellChangeTimes->{3.991345816415531*^9, 3.994351855371566*^9, + 3.994354962586525*^9}, CellLabel-> - "Out[442]=",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] + "Out[117]=",ExpressionUUID->"abe702cc-1d42-4a04-a9e7-0b1e70d14275"] }, Open ]], Cell[CellGroupData[{ @@ -9427,95 +10264,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918502605597496`*^9},ExpressionUUID->"ea08a5a9-d446-9147-ba82-\ -e3924f732df2"], + CellChangeTimes->{3.9918502605597496`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4FmsfB3CUJUtCWXLIXrboeeyV+5edEJJDZHnMMyLZ40kir9QpkjV6 +T2ihECFSoV6VyolwQkrZslRjCWNrf29/zDXX57pnvvO712sUWaEubB4uLq4p +fK3cw9u3br7b2W66PpuhuFmZQqbTRfosi3L04+kayxUPFRpkq1g0IksqtWrF +TsRLPmHmU7Seq9F/C3Y1J+EJr0UbKuHN9VbHPvNMuimh7F/0c1nuigb2/c7w +gh+MHiTY66SphU31vYg72vAGHb+k81Mbe+OYsuei+Xska1kvqYu9+0uccWTb +IGK2zcQwsB/+oIQ4ZcMoXKtLQR/7daLUsbqQEfSPj5+YEfY0nwU1zxhDiT5/ +227H5ksN82AujaPjKon/mGLLi+W3hDd8Qveui2eYYTvKLl6fNp9EKk1GS3bY +5GUlSW2BaRRt8TJnD3aC6p7kQ21fkJCvSJwr9hup7m1RZbPIRDd9kw82sT8o +MCt1Dj1pe/WewJ65xHXldgiNsjqbhoOwBZS0180yFlD764LHMdjZxBPrdRsW +kUxjWkE8tsINjwSdpUUU1K7+OBnbSOvU9OGGZdRu5DeUjX3QYLCNMv+BWo26 +OHXY85wjqwXVfqLcgo2Z/8M+0SC0Q13gFzpYIEy3YOeB0c2Att/oueRMyvuV ++opbLCLKuEEw7LYMvwqFyp5lDSXK8sB5XfswceyZj95xGak8wOk4v1YeO05j +oaYqZBV8Ml2vZICdXamo/IXBC0f71hYHYvd1Tj78dY0XeM/OG8VgK8zd3b92 +Ax/kMpPWJ2OX6zlmai/xQcTif69ewW6+H8sd3CAAlVerNg5gLzzpGvxkLgzn +6/bFEqoUErcXXnfsoTDMdrSv42DrdluAiLEI+GrEf0/BDhq9c3nb1rVwsC3+ +ZS12GE+b7k7hdfDgPjchqEahMaVbs8mLYhA62bf/KfY8+WJNB1McNmjk6w1g +89wcV5QOF4dfnzJYS9gKzE0uZRPikPJOrEFjM4X2m6ffbh+SAI95f+8c7A7/ +iEip1g1wZ7VYSOwWCg3cSEvxFZAEjZK3Z/OwJyfKrpVaSkKfauf3OmzBqJGu +7U2SYENa9s1jW5x01fO9IwVnn1ifiVKnUH2RwUJJoQyka/pUJmlQqGjsW7RJ +lBzwPN0lM6xFIZt9pwciK+SAL1qDn18b5zdLWFWMy4Htr2BTbWy9Iq0NCh7y +YL3511+x2M0s7xpe000we9sqTXorhea+DMV8SlKAWFE5D5YOhSQOW9TWOChB +p6bslBaDQuNFggedgpTA+X0Crxf2vfedslOnlKAkfVtACraX/YEktSYlkDGK +5ZvALtKMdrnIUIaCpqzaCib+PnVjJl5KBeI3J7SDPoVcA4S07YZVQdjuxUK+ +EYVQ9D7Gnz9VofFipWwPtkZyoSEhowam97+eFjamENc1plm8sxqIutcz47Ar +Bjz/vP1IDX4fH+j1NsH70608cePVzZBrtt1l2w5cn4XDa4qlDhVLbCEhoNC1 +vbnvluLV4WVq7w877DTW8NDqv9Whg/eSXgo2ceLIhHyXOogyZWOEd1FIrDGf +a6+5Bjw3GrYWN8Prhzmt0aCsCaPOv6U0LSgkq3Q+IWVUC4xn5w9n2FCo8ey8 ++lcebaid6tg3hO1Fe3STitrwWdQlXceWQgXNKupm3trwQdnmZzu2UkD9q+Ve +bXAeGK4T2437Wz6mSrZuBc/wbzeuO1BITlaeVPDQhdiZ5di1eymkVRwl/B0x +wLLtW2mPN4VYRNKCtiMD5GOupDJ88H5Vzhzw9WKAf5ng3fPYq65WVj3jMMCs +TmHEzhfvtwLKNbOaAXviUV6zHz5P83zz1ZWZ8NaZfeQpgec3xX6rO58e2HIL +zP8IotCVCBWnO236UJ4/2GzGoVBnNDI8WWwMwt3/Lr3Lo5Cid4/jgeCdkHQv +7drMAwqxf9fdkjsKIFz0/ZTAGIWkJu7xS7HMwCQml7RfP4GimDveZ2pYgLTx +rux5iwnEmvrRIkFZQlbjWFwfZwJVmEXyF3ZYQ5PqonPbnQlUNB/0qDzbFvj/ +NuCenZtAy7ukXzYn7IZ7Y93PWownUT/XqtlhPwfQebCk9jppEoX8EZqeqLwH +Ll62Un7ZNoluBbY05SQ7gbCKHggrTKFYWmZJM9AZVCxlLkaET6EFOyu35z4u +0O36ai725RQy9szYNea8F0R+l20+pjmNXsnkBzUzXYFfL/8q49Q02ng9qbFk +yz4Qe6DmnjExje4Nadg7irhBj/t67Uf2X5B890xA9JQbVHgZL8jd+oKYORnl +14b+BAmz5vo+4RmUv5remvnEHcRzraAVzaC6XTp9yfc9QKH0dkx2zAzKMzwr +9qNsPxjKaO2svDWDOt4Vn2KmeoLg8qdW1Q8z6I7DJZWwE17QtOzR8UhmFs0e +3ssVQhyAxKVxH0OHWbRgpX5w2twbRnXarb7Hz6KSqbfLkQY+kPqhtm+iZha5 +Xyn2PyDsCzNnZ10FRmdRze3dPqtO+0LD+NznI5JzyFj21dczX30hipKZLjCf +Q8pDAX3/BvrBqZrUyJeH59Co0KE9l0b8QP9zo+543hzqTHP0t97HAu+dR7rc +Hs6hbE6h0JFOFpzQt8jOGJlDjQ9/f/W39Qdm/UeF8NU0EvWC08x6fwgybd6S +vYlGCuufd/zR6A9OT3by8yjQSLfNQZrvoT9ETZddCcV22eFZ+uaRPwQEKAna +KdIo+4/o1uP/+IOhYO+N70o02th/U7TljT9cFPoh4KJGIxVvqTyvJX+4UCT/ +9YUWjYx9p0uS9QhIVRkiKCMaXb84E+loQMDDoJCbYEyj9V1zplJGBKz2Sqm5 +gD1tudRdsp2AVQwrATMTGp9fXNxtZgR49mc9ztlOo7VLYh7izgQcCbAJ32ZK +o9Fz+msKDxPwXyHvEGNzGjk/N+wOCCWg8HPoq9PYD7lMCnXDCTj94eliD/bF +SFP9x1EEfHgkeSLcgkaOHtZ+Y8cIUFA1yS62pNF9FY/7mmcJUKkSree2oVFa +Q1zgvesECKQ9u3/GnkaHGbnGnBICOGcCbrdj25dWrzEqI8BS8kawhAONBHPH +S+9WEDDsN6R6CTs5womqqyXgwDOXsjJHGsWpqxy685iAm7V88w1ONArKbQ2+ +PUBA67VSl0pXGtmuHd8RMUSA1x+HQiextyRziTA+EPDre5u9+j4ajUfoV1SP +ERAg42p7FdvPsXCqapKA3HOXbTLcaOTOGxlS+Y0Aj+VOD393GllHbgwrl2SD +L2ddTq8njR4XnrLLlGbDm7VnjMS8aLSjbU6Fs5ENznM+6XbYuqqtb83l2RDv +y3+gEVum95j5O1U2iIS5BV46QKMJk35JQX02vFMes3L0odF5nssPAvayQTIx +ZpDDwv3XEc5z2MeGrZ6Bv0uwT3pyIph/siGWq/nVG2xOrdPm3/vZsKorN8vQ +H9dPcmdcYLHBe83XuFls5gsW8TScDRq7H31yY9OoN0NVSDmdDZlBJUsfA2h0 +C4kc/JTBhvlJp49CB3H+1HxzRRYbtM5ezNLBZtg2xxvlsqF0elkxGjuNy3/O +oYANMdqRG7gCaWQVevktp5wNdp2n9/IH0UhO7i8D01tsWBJXFtqMPf8iNGtV +FRsiq2QSrLCvqiGHtBo2bFkUuHQS+2d/f9O1ejYc8k8s/Ylday9b0t7ChqTc +JNGRQzRK+cbDm/2CDZU5vCm/sFkllJ9HGxvK7l9/LBNMo3Wr62VHO9jglWlE +7sEObnA///U1G05abI+/i62scSFaZYwNFz4OTMceptG33uNdn8fZ0N/SrJGJ +3ZnM1q38xAZZgwtKpdjxw3qU8SQbcn58sXyN3ZfXdWAPzYYOKR1Pbfzfmskv +ZhnLTcL4bPSDduzGuX7PqFUkVM/v+jiC/bG/LCKEl4RHotyNy9g7ai0us9aQ +0O3kSCqG4vXmy/luJ0aChEXrgxDsdfaW4pYSJIR8eW+aiL3dUFwdbSCBlftP +UBZ2uki5G1OGhHinLU/qVtrrB6tlFUlIPF1x5Cs2WVzeskGZhFNvbBzWhOHn +048OiqqS8PJwaYc09jgpIbJanYT+s1XdBivtEtYHJ3VJME7PHgzBrv8lkTDO +IIFdLCUShz32eShnSI+EmpsOY39hmzTFPuk2IiGBeJFzBXs0+Jb8AyDhTUjn +Yjv2Wvdj+nfNcH9zao++xTY2t7GvtiDB59GOGyPYaTIfjhbbYNcweJaw762u +TC+0I0GGla/DFU6jkS/Hbly0J8FyvJh/DbbRsw0955xIKOg5e1cGm1X9YeK0 +CwmGF4jzitjnLlXy/MeVBNne12Lq2B8ibHWj3Uko23hC0hBbxFvSOmw/Ce8G +a/N2ruTZjhwI8iKBU3b8qfnK+5uOp3j7ksB76Ln8Hux7gnZX3Vkk3Em32u26 +krcged+FIGGbrJuSx0re8EiHPYnH32Lh2oGVvLaqcauDJJi4Knf6rdR39/hP +CMLjVTh4nb2Sf9Vu/fZgPN9n1LcEruSfk9LUD8HjncTlGrySzxndpRNGgrIg +oRGKLUxUu6tHkHCkbO/NcGzDPfGhylEkPP3Z/jpyJd9k9ym5aBKsb/aUH8FO +VZXOl+KQMBgQoB2DXbdurEYslgTJxSR3Dvbw9+oXQnF4fNU0tx5dyf8YP8wb +T0JLj9etFRu82r38O4GEohnptyv+P2oL8Bc= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -9529,107 +10366,107 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1nk4FmsfB3CUJUtCWXLIXrboeeyV+5edEJJDZHnMMyLZ40kir9QpkjV6 +T2ihECFSoV6VyolwQkrZslRjCWNrf29/zDXX57pnvvO712sUWaEubB4uLq4p +fK3cw9u3br7b2W66PpuhuFmZQqbTRfosi3L04+kayxUPFRpkq1g0IksqtWrF +TsRLPmHmU7Seq9F/C3Y1J+EJr0UbKuHN9VbHPvNMuimh7F/0c1nuigb2/c7w +gh+MHiTY66SphU31vYg72vAGHb+k81Mbe+OYsuei+Xska1kvqYu9+0uccWTb +IGK2zcQwsB/+oIQ4ZcMoXKtLQR/7daLUsbqQEfSPj5+YEfY0nwU1zxhDiT5/ +227H5ksN82AujaPjKon/mGLLi+W3hDd8Qveui2eYYTvKLl6fNp9EKk1GS3bY +5GUlSW2BaRRt8TJnD3aC6p7kQ21fkJCvSJwr9hup7m1RZbPIRDd9kw82sT8o +MCt1Dj1pe/WewJ65xHXldgiNsjqbhoOwBZS0180yFlD764LHMdjZxBPrdRsW +kUxjWkE8tsINjwSdpUUU1K7+OBnbSOvU9OGGZdRu5DeUjX3QYLCNMv+BWo26 +OHXY85wjqwXVfqLcgo2Z/8M+0SC0Q13gFzpYIEy3YOeB0c2Att/oueRMyvuV ++opbLCLKuEEw7LYMvwqFyp5lDSXK8sB5XfswceyZj95xGak8wOk4v1YeO05j +oaYqZBV8Ml2vZICdXamo/IXBC0f71hYHYvd1Tj78dY0XeM/OG8VgK8zd3b92 +Ax/kMpPWJ2OX6zlmai/xQcTif69ewW6+H8sd3CAAlVerNg5gLzzpGvxkLgzn +6/bFEqoUErcXXnfsoTDMdrSv42DrdluAiLEI+GrEf0/BDhq9c3nb1rVwsC3+ +ZS12GE+b7k7hdfDgPjchqEahMaVbs8mLYhA62bf/KfY8+WJNB1McNmjk6w1g +89wcV5QOF4dfnzJYS9gKzE0uZRPikPJOrEFjM4X2m6ffbh+SAI95f+8c7A7/ +iEip1g1wZ7VYSOwWCg3cSEvxFZAEjZK3Z/OwJyfKrpVaSkKfauf3OmzBqJGu +7U2SYENa9s1jW5x01fO9IwVnn1ifiVKnUH2RwUJJoQyka/pUJmlQqGjsW7RJ +lBzwPN0lM6xFIZt9pwciK+SAL1qDn18b5zdLWFWMy4Htr2BTbWy9Iq0NCh7y +YL3511+x2M0s7xpe000we9sqTXorhea+DMV8SlKAWFE5D5YOhSQOW9TWOChB +p6bslBaDQuNFggedgpTA+X0Crxf2vfedslOnlKAkfVtACraX/YEktSYlkDGK +5ZvALtKMdrnIUIaCpqzaCib+PnVjJl5KBeI3J7SDPoVcA4S07YZVQdjuxUK+ +EYVQ9D7Gnz9VofFipWwPtkZyoSEhowam97+eFjamENc1plm8sxqIutcz47Ar +Bjz/vP1IDX4fH+j1NsH70608cePVzZBrtt1l2w5cn4XDa4qlDhVLbCEhoNC1 +vbnvluLV4WVq7w877DTW8NDqv9Whg/eSXgo2ceLIhHyXOogyZWOEd1FIrDGf +a6+5Bjw3GrYWN8Prhzmt0aCsCaPOv6U0LSgkq3Q+IWVUC4xn5w9n2FCo8ey8 ++lcebaid6tg3hO1Fe3STitrwWdQlXceWQgXNKupm3trwQdnmZzu2UkD9q+Ve +bXAeGK4T2437Wz6mSrZuBc/wbzeuO1BITlaeVPDQhdiZ5di1eymkVRwl/B0x +wLLtW2mPN4VYRNKCtiMD5GOupDJ88H5Vzhzw9WKAf5ng3fPYq65WVj3jMMCs +TmHEzhfvtwLKNbOaAXviUV6zHz5P83zz1ZWZ8NaZfeQpgec3xX6rO58e2HIL +zP8IotCVCBWnO236UJ4/2GzGoVBnNDI8WWwMwt3/Lr3Lo5Cid4/jgeCdkHQv +7drMAwqxf9fdkjsKIFz0/ZTAGIWkJu7xS7HMwCQml7RfP4GimDveZ2pYgLTx +rux5iwnEmvrRIkFZQlbjWFwfZwJVmEXyF3ZYQ5PqonPbnQlUNB/0qDzbFvj/ +NuCenZtAy7ukXzYn7IZ7Y93PWownUT/XqtlhPwfQebCk9jppEoX8EZqeqLwH +Ll62Un7ZNoluBbY05SQ7gbCKHggrTKFYWmZJM9AZVCxlLkaET6EFOyu35z4u +0O36ai725RQy9szYNea8F0R+l20+pjmNXsnkBzUzXYFfL/8q49Q02ng9qbFk +yz4Qe6DmnjExje4Nadg7irhBj/t67Uf2X5B890xA9JQbVHgZL8jd+oKYORnl +14b+BAmz5vo+4RmUv5remvnEHcRzraAVzaC6XTp9yfc9QKH0dkx2zAzKMzwr +9qNsPxjKaO2svDWDOt4Vn2KmeoLg8qdW1Q8z6I7DJZWwE17QtOzR8UhmFs0e +3ssVQhyAxKVxH0OHWbRgpX5w2twbRnXarb7Hz6KSqbfLkQY+kPqhtm+iZha5 +Xyn2PyDsCzNnZ10FRmdRze3dPqtO+0LD+NznI5JzyFj21dczX30hipKZLjCf +Q8pDAX3/BvrBqZrUyJeH59Co0KE9l0b8QP9zo+543hzqTHP0t97HAu+dR7rc +Hs6hbE6h0JFOFpzQt8jOGJlDjQ9/f/W39Qdm/UeF8NU0EvWC08x6fwgybd6S +vYlGCuufd/zR6A9OT3by8yjQSLfNQZrvoT9ETZddCcV22eFZ+uaRPwQEKAna +KdIo+4/o1uP/+IOhYO+N70o02th/U7TljT9cFPoh4KJGIxVvqTyvJX+4UCT/ +9YUWjYx9p0uS9QhIVRkiKCMaXb84E+loQMDDoJCbYEyj9V1zplJGBKz2Sqm5 +gD1tudRdsp2AVQwrATMTGp9fXNxtZgR49mc9ztlOo7VLYh7izgQcCbAJ32ZK +o9Fz+msKDxPwXyHvEGNzGjk/N+wOCCWg8HPoq9PYD7lMCnXDCTj94eliD/bF +SFP9x1EEfHgkeSLcgkaOHtZ+Y8cIUFA1yS62pNF9FY/7mmcJUKkSree2oVFa +Q1zgvesECKQ9u3/GnkaHGbnGnBICOGcCbrdj25dWrzEqI8BS8kawhAONBHPH +S+9WEDDsN6R6CTs5womqqyXgwDOXsjJHGsWpqxy685iAm7V88w1ONArKbQ2+ +PUBA67VSl0pXGtmuHd8RMUSA1x+HQiextyRziTA+EPDre5u9+j4ajUfoV1SP +ERAg42p7FdvPsXCqapKA3HOXbTLcaOTOGxlS+Y0Aj+VOD393GllHbgwrl2SD +L2ddTq8njR4XnrLLlGbDm7VnjMS8aLSjbU6Fs5ENznM+6XbYuqqtb83l2RDv +y3+gEVum95j5O1U2iIS5BV46QKMJk35JQX02vFMes3L0odF5nssPAvayQTIx +ZpDDwv3XEc5z2MeGrZ6Bv0uwT3pyIph/siGWq/nVG2xOrdPm3/vZsKorN8vQ +H9dPcmdcYLHBe83XuFls5gsW8TScDRq7H31yY9OoN0NVSDmdDZlBJUsfA2h0 +C4kc/JTBhvlJp49CB3H+1HxzRRYbtM5ezNLBZtg2xxvlsqF0elkxGjuNy3/O +oYANMdqRG7gCaWQVevktp5wNdp2n9/IH0UhO7i8D01tsWBJXFtqMPf8iNGtV +FRsiq2QSrLCvqiGHtBo2bFkUuHQS+2d/f9O1ejYc8k8s/Ylday9b0t7ChqTc +JNGRQzRK+cbDm/2CDZU5vCm/sFkllJ9HGxvK7l9/LBNMo3Wr62VHO9jglWlE +7sEObnA///U1G05abI+/i62scSFaZYwNFz4OTMceptG33uNdn8fZ0N/SrJGJ +3ZnM1q38xAZZgwtKpdjxw3qU8SQbcn58sXyN3ZfXdWAPzYYOKR1Pbfzfmskv +ZhnLTcL4bPSDduzGuX7PqFUkVM/v+jiC/bG/LCKEl4RHotyNy9g7ai0us9aQ +0O3kSCqG4vXmy/luJ0aChEXrgxDsdfaW4pYSJIR8eW+aiL3dUFwdbSCBlftP +UBZ2uki5G1OGhHinLU/qVtrrB6tlFUlIPF1x5Cs2WVzeskGZhFNvbBzWhOHn +048OiqqS8PJwaYc09jgpIbJanYT+s1XdBivtEtYHJ3VJME7PHgzBrv8lkTDO +IIFdLCUShz32eShnSI+EmpsOY39hmzTFPuk2IiGBeJFzBXs0+Jb8AyDhTUjn +Yjv2Wvdj+nfNcH9zao++xTY2t7GvtiDB59GOGyPYaTIfjhbbYNcweJaw762u +TC+0I0GGla/DFU6jkS/Hbly0J8FyvJh/DbbRsw0955xIKOg5e1cGm1X9YeK0 +CwmGF4jzitjnLlXy/MeVBNne12Lq2B8ibHWj3Uko23hC0hBbxFvSOmw/Ce8G +a/N2ruTZjhwI8iKBU3b8qfnK+5uOp3j7ksB76Ln8Hux7gnZX3Vkk3Em32u26 +krcged+FIGGbrJuSx0re8EiHPYnH32Lh2oGVvLaqcauDJJi4Knf6rdR39/hP +CMLjVTh4nb2Sf9Vu/fZgPN9n1LcEruSfk9LUD8HjncTlGrySzxndpRNGgrIg +oRGKLUxUu6tHkHCkbO/NcGzDPfGhylEkPP3Z/jpyJd9k9ym5aBKsb/aUH8FO +VZXOl+KQMBgQoB2DXbdurEYslgTJxSR3Dvbw9+oXQnF4fNU0tx5dyf8YP8wb +T0JLj9etFRu82r38O4GEohnptyv+P2oL8Bc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, + "PlotRange" -> {{0, 180}, {0.8167911194219664, + 1.2152040939682047`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "AxesOrigin" -> {0, 0.8167911194219681}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -9641,21 +10478,21 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, + "PlotRange" -> {{0, 180}, {0.8167911194219664, + 1.2152040939682047`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "AxesOrigin" -> {0, 0.8167911194219681}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -9669,105 +10506,105 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1nk4FmsfB3CUJUtCWXLIXrboeeyV+5edEJJDZHnMMyLZ40kir9QpkjV6 +T2ihECFSoV6VyolwQkrZslRjCWNrf29/zDXX57pnvvO712sUWaEubB4uLq4p +fK3cw9u3br7b2W66PpuhuFmZQqbTRfosi3L04+kayxUPFRpkq1g0IksqtWrF +TsRLPmHmU7Seq9F/C3Y1J+EJr0UbKuHN9VbHPvNMuimh7F/0c1nuigb2/c7w +gh+MHiTY66SphU31vYg72vAGHb+k81Mbe+OYsuei+Xska1kvqYu9+0uccWTb +IGK2zcQwsB/+oIQ4ZcMoXKtLQR/7daLUsbqQEfSPj5+YEfY0nwU1zxhDiT5/ +227H5ksN82AujaPjKon/mGLLi+W3hDd8Qveui2eYYTvKLl6fNp9EKk1GS3bY +5GUlSW2BaRRt8TJnD3aC6p7kQ21fkJCvSJwr9hup7m1RZbPIRDd9kw82sT8o +MCt1Dj1pe/WewJ65xHXldgiNsjqbhoOwBZS0180yFlD764LHMdjZxBPrdRsW +kUxjWkE8tsINjwSdpUUU1K7+OBnbSOvU9OGGZdRu5DeUjX3QYLCNMv+BWo26 +OHXY85wjqwXVfqLcgo2Z/8M+0SC0Q13gFzpYIEy3YOeB0c2Att/oueRMyvuV ++opbLCLKuEEw7LYMvwqFyp5lDSXK8sB5XfswceyZj95xGak8wOk4v1YeO05j +oaYqZBV8Ml2vZICdXamo/IXBC0f71hYHYvd1Tj78dY0XeM/OG8VgK8zd3b92 +Ax/kMpPWJ2OX6zlmai/xQcTif69ewW6+H8sd3CAAlVerNg5gLzzpGvxkLgzn +6/bFEqoUErcXXnfsoTDMdrSv42DrdluAiLEI+GrEf0/BDhq9c3nb1rVwsC3+ +ZS12GE+b7k7hdfDgPjchqEahMaVbs8mLYhA62bf/KfY8+WJNB1McNmjk6w1g +89wcV5QOF4dfnzJYS9gKzE0uZRPikPJOrEFjM4X2m6ffbh+SAI95f+8c7A7/ +iEip1g1wZ7VYSOwWCg3cSEvxFZAEjZK3Z/OwJyfKrpVaSkKfauf3OmzBqJGu +7U2SYENa9s1jW5x01fO9IwVnn1ifiVKnUH2RwUJJoQyka/pUJmlQqGjsW7RJ +lBzwPN0lM6xFIZt9pwciK+SAL1qDn18b5zdLWFWMy4Htr2BTbWy9Iq0NCh7y +YL3511+x2M0s7xpe000we9sqTXorhea+DMV8SlKAWFE5D5YOhSQOW9TWOChB +p6bslBaDQuNFggedgpTA+X0Crxf2vfedslOnlKAkfVtACraX/YEktSYlkDGK +5ZvALtKMdrnIUIaCpqzaCib+PnVjJl5KBeI3J7SDPoVcA4S07YZVQdjuxUK+ +EYVQ9D7Gnz9VofFipWwPtkZyoSEhowam97+eFjamENc1plm8sxqIutcz47Ar +Bjz/vP1IDX4fH+j1NsH70608cePVzZBrtt1l2w5cn4XDa4qlDhVLbCEhoNC1 +vbnvluLV4WVq7w877DTW8NDqv9Whg/eSXgo2ceLIhHyXOogyZWOEd1FIrDGf +a6+5Bjw3GrYWN8Prhzmt0aCsCaPOv6U0LSgkq3Q+IWVUC4xn5w9n2FCo8ey8 ++lcebaid6tg3hO1Fe3STitrwWdQlXceWQgXNKupm3trwQdnmZzu2UkD9q+Ve +bXAeGK4T2437Wz6mSrZuBc/wbzeuO1BITlaeVPDQhdiZ5di1eymkVRwl/B0x +wLLtW2mPN4VYRNKCtiMD5GOupDJ88H5Vzhzw9WKAf5ng3fPYq65WVj3jMMCs +TmHEzhfvtwLKNbOaAXviUV6zHz5P83zz1ZWZ8NaZfeQpgec3xX6rO58e2HIL +zP8IotCVCBWnO236UJ4/2GzGoVBnNDI8WWwMwt3/Lr3Lo5Cid4/jgeCdkHQv +7drMAwqxf9fdkjsKIFz0/ZTAGIWkJu7xS7HMwCQml7RfP4GimDveZ2pYgLTx +rux5iwnEmvrRIkFZQlbjWFwfZwJVmEXyF3ZYQ5PqonPbnQlUNB/0qDzbFvj/ +NuCenZtAy7ukXzYn7IZ7Y93PWownUT/XqtlhPwfQebCk9jppEoX8EZqeqLwH +Ll62Un7ZNoluBbY05SQ7gbCKHggrTKFYWmZJM9AZVCxlLkaET6EFOyu35z4u +0O36ai725RQy9szYNea8F0R+l20+pjmNXsnkBzUzXYFfL/8q49Q02ng9qbFk +yz4Qe6DmnjExje4Nadg7irhBj/t67Uf2X5B890xA9JQbVHgZL8jd+oKYORnl +14b+BAmz5vo+4RmUv5remvnEHcRzraAVzaC6XTp9yfc9QKH0dkx2zAzKMzwr +9qNsPxjKaO2svDWDOt4Vn2KmeoLg8qdW1Q8z6I7DJZWwE17QtOzR8UhmFs0e +3ssVQhyAxKVxH0OHWbRgpX5w2twbRnXarb7Hz6KSqbfLkQY+kPqhtm+iZha5 +Xyn2PyDsCzNnZ10FRmdRze3dPqtO+0LD+NznI5JzyFj21dczX30hipKZLjCf +Q8pDAX3/BvrBqZrUyJeH59Co0KE9l0b8QP9zo+543hzqTHP0t97HAu+dR7rc +Hs6hbE6h0JFOFpzQt8jOGJlDjQ9/f/W39Qdm/UeF8NU0EvWC08x6fwgybd6S +vYlGCuufd/zR6A9OT3by8yjQSLfNQZrvoT9ETZddCcV22eFZ+uaRPwQEKAna +KdIo+4/o1uP/+IOhYO+N70o02th/U7TljT9cFPoh4KJGIxVvqTyvJX+4UCT/ +9YUWjYx9p0uS9QhIVRkiKCMaXb84E+loQMDDoJCbYEyj9V1zplJGBKz2Sqm5 +gD1tudRdsp2AVQwrATMTGp9fXNxtZgR49mc9ztlOo7VLYh7izgQcCbAJ32ZK +o9Fz+msKDxPwXyHvEGNzGjk/N+wOCCWg8HPoq9PYD7lMCnXDCTj94eliD/bF +SFP9x1EEfHgkeSLcgkaOHtZ+Y8cIUFA1yS62pNF9FY/7mmcJUKkSree2oVFa +Q1zgvesECKQ9u3/GnkaHGbnGnBICOGcCbrdj25dWrzEqI8BS8kawhAONBHPH +S+9WEDDsN6R6CTs5womqqyXgwDOXsjJHGsWpqxy685iAm7V88w1ONArKbQ2+ +PUBA67VSl0pXGtmuHd8RMUSA1x+HQiextyRziTA+EPDre5u9+j4ajUfoV1SP +ERAg42p7FdvPsXCqapKA3HOXbTLcaOTOGxlS+Y0Aj+VOD393GllHbgwrl2SD +L2ddTq8njR4XnrLLlGbDm7VnjMS8aLSjbU6Fs5ENznM+6XbYuqqtb83l2RDv +y3+gEVum95j5O1U2iIS5BV46QKMJk35JQX02vFMes3L0odF5nssPAvayQTIx +ZpDDwv3XEc5z2MeGrZ6Bv0uwT3pyIph/siGWq/nVG2xOrdPm3/vZsKorN8vQ +H9dPcmdcYLHBe83XuFls5gsW8TScDRq7H31yY9OoN0NVSDmdDZlBJUsfA2h0 +C4kc/JTBhvlJp49CB3H+1HxzRRYbtM5ezNLBZtg2xxvlsqF0elkxGjuNy3/O +oYANMdqRG7gCaWQVevktp5wNdp2n9/IH0UhO7i8D01tsWBJXFtqMPf8iNGtV +FRsiq2QSrLCvqiGHtBo2bFkUuHQS+2d/f9O1ejYc8k8s/Ylday9b0t7ChqTc +JNGRQzRK+cbDm/2CDZU5vCm/sFkllJ9HGxvK7l9/LBNMo3Wr62VHO9jglWlE +7sEObnA///U1G05abI+/i62scSFaZYwNFz4OTMceptG33uNdn8fZ0N/SrJGJ +3ZnM1q38xAZZgwtKpdjxw3qU8SQbcn58sXyN3ZfXdWAPzYYOKR1Pbfzfmskv +ZhnLTcL4bPSDduzGuX7PqFUkVM/v+jiC/bG/LCKEl4RHotyNy9g7ai0us9aQ +0O3kSCqG4vXmy/luJ0aChEXrgxDsdfaW4pYSJIR8eW+aiL3dUFwdbSCBlftP +UBZ2uki5G1OGhHinLU/qVtrrB6tlFUlIPF1x5Cs2WVzeskGZhFNvbBzWhOHn +048OiqqS8PJwaYc09jgpIbJanYT+s1XdBivtEtYHJ3VJME7PHgzBrv8lkTDO +IIFdLCUShz32eShnSI+EmpsOY39hmzTFPuk2IiGBeJFzBXs0+Jb8AyDhTUjn +Yjv2Wvdj+nfNcH9zao++xTY2t7GvtiDB59GOGyPYaTIfjhbbYNcweJaw762u +TC+0I0GGla/DFU6jkS/Hbly0J8FyvJh/DbbRsw0955xIKOg5e1cGm1X9YeK0 +CwmGF4jzitjnLlXy/MeVBNne12Lq2B8ibHWj3Uko23hC0hBbxFvSOmw/Ce8G +a/N2ruTZjhwI8iKBU3b8qfnK+5uOp3j7ksB76Ln8Hux7gnZX3Vkk3Em32u26 +krcged+FIGGbrJuSx0re8EiHPYnH32Lh2oGVvLaqcauDJJi4Knf6rdR39/hP +CMLjVTh4nb2Sf9Vu/fZgPN9n1LcEruSfk9LUD8HjncTlGrySzxndpRNGgrIg +oRGKLUxUu6tHkHCkbO/NcGzDPfGhylEkPP3Z/jpyJd9k9ym5aBKsb/aUH8FO +VZXOl+KQMBgQoB2DXbdurEYslgTJxSR3Dvbw9+oXQnF4fNU0tx5dyf8YP8wb +T0JLj9etFRu82r38O4GEohnptyv+P2oL8Bc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.8167911194219664, 1.2152040939682047`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.8167911194219681}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -9777,7 +10614,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.4834141591801878}, + AxesOrigin->{0, 0.8167911194219681}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -9805,7 +10643,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.8167911194219664, 1.2152040939682047`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -9813,9 +10652,10 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913460797739086`*^9}, + CellChangeTimes->{3.9913460797739086`*^9, 3.9943521004644213`*^9, + 3.994355561781682*^9}, CellLabel-> - "Out[443]=",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] + "Out[118]=",ExpressionUUID->"265263bf-4bd2-4701-811b-750a0b6a38c6"] }, Open ]], Cell[CellGroupData[{ @@ -9878,207 +10718,170 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918502644064465`*^9, - 3.9918502684162617`*^9}},ExpressionUUID->"42ddbf41-0bd8-b749-bead-\ -56c89a9b7467"], + CellChangeTimes->{{3.9918502644064465`*^9, 3.9918502684162617`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7282513679946418`*^-262\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 444, - 477, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080016945*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.550673664983881`*^-267\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994355561991714*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], +In[119]:=",ExpressionUUID->"f230019f-f165-4e40-9aee-3825eb537a9e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.1421038932835147`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1967185618008032`*^-278\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 42, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994355562000695*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"b97710b3-b6ca-426c-9c63-b431114489cb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.1470841936622515`*^-290\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 444, 478, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080026985*^9}, + 119, 43, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994355562009884*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.655058850000931`*^-284\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 444, 479, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913460800358925`*^9}, - CellLabel-> - "During evaluation of \ -In[444]:=",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], +In[119]:=",ExpressionUUID->"27219196-e415-4f3d-8524-af3c83d4a5bd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 444, 480, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080043894*^9}, +during this calculation.\"", 2, 119, 44, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.9943555620200787`*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], +In[119]:=",ExpressionUUID->"bd26b0cf-8655-464c-9cfa-784732695a34"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8V+8XAHDRkEoZIeOzrLKSmQ8f55C9szIyyla0NNBAkZUIkUoSKvtz +izJK0bCTkVHhi7QQCanU7/7+uq/363XvfZ7nPOc556HvPWDrw8nBwUFZxsHx +/+f8YNMzqYQ83ZWR8k6PRHfodmeLhOr1RYHEs16KTQwdcOOrvSJ9lyB6w7tm +2ZhtcMymsJerLxeuVG7VWBujB3xTwpcWewloWtz7dDh6JwzVWh340VsP13R7 +POyj94CR1Jf3M72dwHU7rVr17CFY7NVMn+4dAatDpXy1YZHQsON23uvcWeha +FlTXsf4SiA9Vje9VWILkG3X64eFZILjfo3DVDi6s2v/L+qTCTbi0zajGyoEb +/71dccNtcz70Zyo/mdmwDnuCJtvHku5AQt6ZV5yb+DDkYv/+nr4iMFML4N8o +yYc/JG1sBseKgPuZrYOsIh9mVg0oDk8XwblR6bfmenxI1bNtb+cuhpOM1vG0 +AD70exPut2t7MQTniPyVqebDJ4qTmwQvF8POa2wFc1d+dHDXF1S0KAHhtNG4 +1OsCyLqa2HYktxRE5CvO/SwQQH7RpwJ/ikpBtD7mjFu5ALr0lr05VVEKlOkt +R2UbBDBLYbEtqLEUpC0OetZ8EkALW789/yZLQXX5ksaoqiD6zaeLf9IsA+sQ +oTGVZkG841Lu1fiiDM7bm+p2zm/E6tdTA8b+5SB6v12Uc5kQNv+tCk3cXw6l +AvYL29YIoVf2MkbbwXJ40+lenkIVwtqMIxf0Q8tBamcIY6eJEIoab3++FFcO +9ZY3VnZcEcLXZWL+FYXlsGQ0196mI4z2Yg4Wsp/LIbkgrGjJSBiHv+48OjFB +fr+SI1ZxpzBS/FWzS6bLweI5j94FH2HMmO6fkvxZDlk7aPcskoTx01hUzPBK +NmxH84yWIWGMS3oWeEWSDUe0bno0RYng7aMjqqtd2GCWw/vDPFEEr/suuyLk +xgbGqpOx7ekiSIu/dZrmyYaObkd21x0RnOjd17LFlw1KB9dyDbaL4OtZ6X38 +h9nwqeB4wXfRTfh2bftL7Tg27Ba0mhS7twnnn6s6frvPBtXwmsjs2k24qH99 +MPEBG3hGNgvRX2xC53txn2Wq2VBVxgUy/ZswkvP4eZs6NgiZVyUr/9uEtj3E +x9AmcvxIKTVDc1GcYna4Sb9ng8G3X2HBo6J48+Kl8OFlBISapMk9nRDFqFcW +1VzLCSi9qTggMC+K4VJJeZIrCRCx99Sq4hbDtrSSk848BEw8fL7ApSSGCo9a +9K/zE5AalRxy5YQY6u6T9IlmEND4dovURKQYZhjpnDoiRcAftYYu3QQxtCrd +b+guQ4DvxzmVseti+DPS5eMWOQKYFq4zSg1iuIVyIezKNgJGNsoEP1snjqHD +F+UGgADhA3USwsLiuHTHc3+qHgEWjU5tATRxbLLu9DLdQUBlWILCelVx7F4p +frTIiID4oekvzk7i6N4gomBiSYDK3Rq/b7ni6D9qbjjmTECkzs49otslcGO8 +MqPwIAEm7tnfNfUl0O7quIfwYQJ4I76edbCQQL7bzu0RRwi41hBdkOwpgeot +S2ByjICHZtVfV8ZJIPct9di74QRMO0kem+2XwOvG8lgZTcCDsIOr+MYk8NOV +jX3jMQScvvYoU2lKAnOd/YsEYglYO7yrJoCTgscLxVftjSdA1i+RY1iOglnZ +AwWvkwhwPzoX3xpOwdcPfRWWLhMgnaEv/iWago1xuzpnMv4f/4slq5Ip+Ec+ +pW4kk4CwP1s69PMoqKTOcaQqi4D0s+4bq1opWHZmwY6ZTcDu/KKCN28oaN1l +Y8Z3gwDGy5+aP4YpmF9olzRGupwn1WXrHAU9+K9xRtwkoDXl5Y18CSqO1Oy9 +F59H7u89wW0NslQslJBXMsgnwKVnT/3wNiomvjdaWiT9SeTPmJgRFVXaR666 +3CaAK0dZ7lIwFTONur5/u0tA89NTNWUnqDiQ5LA5sZCA5NFmi7YoKjq3ildJ +FRFAkfU5wJ1BxRdTq6bNisl8KL1y/3QdFQ8dD27dV0qAQW/70lQjFT2Xvbo4 +QtqKY7mxRycVCR9HRccyArxsg/vhAxWFcvoWVcsJCA6/xSifouKBb/Zy2aRP +5PXto/2kYhHPb80VbAKMwulnIlbQsCO8Y7KJdMv62lvbeWg4WXc+Q5YgwCbP +sXGal4ZGRSfoUaRd2xL49ojQUItO61e8R8BB6vwtPXkaHihxn/S4T8DcveTG +xa00dL1XWZpHOsxEfpKtRsNXFkmO46SjD3lqMHRpeJkxtduzggCelb9dBvRp +WGDI9yiTdHJW+plLxjQsbPy8sp10VkNzI+dOGgbqL7psrSSA6uQzWe1AQ2Ob +176upPMm/vEdcaGh4dccj3Ok5SKzNOQ9aFgZxzQqJF22Ud111It83+eQWBtp +tcJXZ67609A7bNPwBOlq3cA8uyAaVpxflb76AQHQtbxpzWEaJq3j05Yk/czv +xmTDMXJ8y7VdWqRN/2jxnwynoa1ph5sl6fbkbg21CBo6Nqi9cyNtL33AdeIc +DZez+K33ke6vWh2RF0euf17vwVHS7lZ5ebuTaHjh2/WNp0iPjeg2CabScGiU +Y18k6YDj/ZOtGeT6LY0eRpGeWhPCH32NholeZn8jSB/J4dVk3STjL/KFdZL0 +T7W7rnP5NOQW5ToRQvp0046IkkIa2nQeKQkgzeU+mOdTRsP/vMWGXEnHfj/R +JHGfhofK+teZk+Y9LzDV85CG600vMjVJp4qV8ic9omF6pIQvjbRIuYmmUT0N +N+zxTVlJ+rrBqOvfFzRk3rZ49JmMH6P/VERlCzn/5ntfmkjfCRLJD+6gofvi +GdHbpBU57zXJ9NBwaeNly0jSxGXLqcF+cvyqt+ecSG+X/8SfMUhD/W2aTxVI +69tL7F71iYbdTq0WreT+v/z0IKJugoYlMm+uZ5C2OGWbf3yGzE+uywsepHcV +nJ/6+IuMV+dQ40cyv94xGQI5/2hIOQz6t0nvfVWr6bScji/CORq9SO//ORPR +uI6O1tXOf7rI/GUe8hUa56fjlrMmjEjS3F8GirhE6Gho39MtRzr/bcMbXQYd +x49eGDtC5n+I/fb9u2XpuMpSwkCAtH5b8bIwBTp+1hRULyPPz+DjdIUKDTo+ +P83T8Y48b8WaPPWd2nS0enL0ZDDpsPLTu6aRjguD1Lo/5HkVyvWLkjenIyuS +f+160tbRWn03PeioE9QxzlNC1oO/JUF13nS8YJbgF0nWg4ljDK73AXT8990j +9gdZL2L91yiJhNDx1y/7sg6ynjwxf382KZaOQ/KpFZ53yHrPH7k1nE3Hkl73 +uuFcAjgS5p5lVtLx0Rrrfjrpdq5Al8oaOqaoVN72IOvdvjnb6JnndFwjRvF7 +TdbDvD6pt34DdFx3ajbtwjVyvjcaY+y5GPiy3q47IJ3MX2GW+GFuBsbIX+w6 +lkbubzKbfXEdA0e/H7oWkUquJyrrXbMwA4V105PjU8j5+uxX0VNg4Phb280n +LhCwKL9hUNGBgWd66CY15wiYvy4aqerCwPKM91+zzhLwY720lJYHA993Kyce +jyLPw6xWoEEAAw1Pf3wpG0H2xxqveZdTDPQNe2zjTfafZvMHvLH5DFxRc6LL +6hBZP/a5w8gcA3m30TfNuhCQ8d5/5OMvBna6nf0aQva/NOsj0ZP/GLgj7s+H +2V0EJKnGtvxcLYkNwS1On+0JiPrN3rWeIomzHlQ3woqMT8KKgzpGksgrGyP+ +mOy/OkXFOZcvS2K0+X8HX0gT8JZWdMPwqiSasFvb15P9Puzy3ewfNyTRJtXy +rSN5H3gQWXDN9q4kBsq1LR+kkPvjlJPJWyuJelrLazqECdiyIi055j9JzPMM +qjNZTcbbIzzimIIUOg0+SEn4woYZfjNPx3opvB/edTWngA19+xkdgS+l8O6M +q4pSHhuevPgFZ1qlUHlyILDqJhuSw4qod95I4ewjWmPjNTYoj6wdWvwihTKv +Mj1bLrEhmP3K7bqANAbnhh/cc5oNX6wdXMe8pTHlZLztOzs2jCV6Oh5eJYO3 +4tYu+pH3QdNvx00/aMjipdW8Snpa5TDhxX3k/pnNyH8+ZLSMvC8bSQlznq/f +gn4tZcT9imLgb5NJKv8mh2PLGs/PdBaCeGyZjYaGAqYbW2lEV92BTHmtDQJ+ +imiY84vVVFcAzaJ66rMpSnhx9+/E7115wBSvT976Ziumqo4rY3Mu8HLlhuyJ +UsbPR+Fa0I8coERSdZxltuHvzEBdY0o2rJbeXWn7cht2CpmUiGdngRJrU9lx +NxVcFfgrSvlSBhwe5G8w41DFZQkJARLRafBtNtHBNFMVm+3+XDzwJQWMt77I +MlVUw3cVdqGaWy/C41nt3wvtavi62Jp6Jz8eghVUBl77qGM31f02aygGWFPe +3c6rNdDw1/cNKnpnwVBKxHJdrgbemp/edN08AjZHxJ+o19RE5vuaPf1nw0HO +R6tOekATLaMD3WSfHgOfx/7n7h/ajpa6gccWZg5DXU6398xGLVxnqhPkPRgM +P+78W9j6QAvnty9mhQkGwLijUU5clRYuFPOUPecIgL7lF0xGa7TQL+v5asqk +P9R4il65/EQLmXPxx+ef+0OUiDpzqUkLB0v/HTY84Q8bYgNPNr/TQjjzd8xh +yA8U/Ho4fDiZGN678H3DA1/wki5anWXJRIus7pnjCd4Q9tw9UMaGicviFBpC +Q70h2Ye/hbBloozy3e1xft5Qmx+a2LKLiTdpxt86dniDoIzJ+qU9TFQsVyng +XPKCFzIfBD2PMXHWSVTi0yEvkNtMpcncYCJbNr4/ymcvzMilahDTTPxw2ipS +97An9LWiocAsE0Mddzr4envCk+Apu5A5JvqOqTplOnpCEmF6SOMXEwstdnaK +anuCHJOjuJpLG0N/np7KXO4Je02D6A1C2nj/T9aKzyoe0O1nvLZbRxutHRcm +/qa5wcO83//NxWrj9KrT4ropLqCxI2TBLEEbj41t+FoT5gIV/02szbmgjSFb +uKPNvF2AoAxqml3Sxmqhtpkrmi5QnPnkQvZVbRxRNkjiGHKGnMRoLeNSbUzb +3fx+VNkZ4kLWp2R2aePqXen8tcO7wMVAErUpOri21msyPtgBlrq5eRtoOnjg +R3K1k4sD5PhMvTWT1MGXl1cEaBo5wHhM1XGXzTpYrxrNlKU4wOEm67JQFR38 +nrHP91W7PcRbnaQ8NNJB/ba6u5qq9lDt1PNH7YAOVuwqtxfmtgOxoPNVSk90 +UOb5U83cIRtI+uernlCvgxnEBV7fDhvgvGTE/vhMB2dq3ZQ0ntrAl8oVd3Oa +dFDTyUv2d64NVHOcy+Tv0kFRpp+gsJ8NuKRFHJ//oINFZRKy1FFryKwJVX+8 +hoX2Lna3UilWsJFnP9tyFwsF1BIVLfvMIG/HqbBpZxbmq/eezKw1A5VTSTtS +d7PwdYDQqaUcM7CaLu/p28NCwY8puoKBZhDzZm7Raz8LPTulEg4vmcLP3DP6 +YZEsXF5hcXN4sykMaKd2FRSxsFL/0MqfKcbgfzTvmmkpC52u/n1oG2oM86UV +PhPlLLxo6pz/zNMY+Bl9C9sqWfies3VocqsxmHNLiD96wsIP3bda7V4ZQW13 +gXdXDwvT9QvU3fiNwIz3oeKxPhYu0vifMH4bQp9x07zIWxbeyhFx/TtqCD+q +v8a6D7OwhdsibKHCEBRvKpd8/sJCLlN9r28uhlA7oHcscZKFtVelT3gZGIKZ +oB1snWbh5MFz6yYVDcH3/NHXIXMsbJCOPozLyP89ickS/snCqaxiCs9XA4j6 +leFV/YuFKfddln/uNoANancV3JZYCKe+8b1/bADZQdVz//6x0Kvwjfr4HQP4 +H6OhLME= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10092,166 +10895,125 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwV1nc8V+8XAHDRkEoZIeOzrLKSmQ8f55C9szIyyla0NNBAkZUIkUoSKvtz +izJK0bCTkVHhi7QQCanU7/7+uq/363XvfZ7nPOc556HvPWDrw8nBwUFZxsHx +/+f8YNMzqYQ83ZWR8k6PRHfodmeLhOr1RYHEs16KTQwdcOOrvSJ9lyB6w7tm +2ZhtcMymsJerLxeuVG7VWBujB3xTwpcWewloWtz7dDh6JwzVWh340VsP13R7 +POyj94CR1Jf3M72dwHU7rVr17CFY7NVMn+4dAatDpXy1YZHQsON23uvcWeha +FlTXsf4SiA9Vje9VWILkG3X64eFZILjfo3DVDi6s2v/L+qTCTbi0zajGyoEb +/71dccNtcz70Zyo/mdmwDnuCJtvHku5AQt6ZV5yb+DDkYv/+nr4iMFML4N8o +yYc/JG1sBseKgPuZrYOsIh9mVg0oDk8XwblR6bfmenxI1bNtb+cuhpOM1vG0 +AD70exPut2t7MQTniPyVqebDJ4qTmwQvF8POa2wFc1d+dHDXF1S0KAHhtNG4 +1OsCyLqa2HYktxRE5CvO/SwQQH7RpwJ/ikpBtD7mjFu5ALr0lr05VVEKlOkt +R2UbBDBLYbEtqLEUpC0OetZ8EkALW789/yZLQXX5ksaoqiD6zaeLf9IsA+sQ +oTGVZkG841Lu1fiiDM7bm+p2zm/E6tdTA8b+5SB6v12Uc5kQNv+tCk3cXw6l +AvYL29YIoVf2MkbbwXJ40+lenkIVwtqMIxf0Q8tBamcIY6eJEIoab3++FFcO +9ZY3VnZcEcLXZWL+FYXlsGQ0196mI4z2Yg4Wsp/LIbkgrGjJSBiHv+48OjFB +fr+SI1ZxpzBS/FWzS6bLweI5j94FH2HMmO6fkvxZDlk7aPcskoTx01hUzPBK +NmxH84yWIWGMS3oWeEWSDUe0bno0RYng7aMjqqtd2GCWw/vDPFEEr/suuyLk +xgbGqpOx7ekiSIu/dZrmyYaObkd21x0RnOjd17LFlw1KB9dyDbaL4OtZ6X38 +h9nwqeB4wXfRTfh2bftL7Tg27Ba0mhS7twnnn6s6frvPBtXwmsjs2k24qH99 +MPEBG3hGNgvRX2xC53txn2Wq2VBVxgUy/ZswkvP4eZs6NgiZVyUr/9uEtj3E +x9AmcvxIKTVDc1GcYna4Sb9ng8G3X2HBo6J48+Kl8OFlBISapMk9nRDFqFcW +1VzLCSi9qTggMC+K4VJJeZIrCRCx99Sq4hbDtrSSk848BEw8fL7ApSSGCo9a +9K/zE5AalRxy5YQY6u6T9IlmEND4dovURKQYZhjpnDoiRcAftYYu3QQxtCrd +b+guQ4DvxzmVseti+DPS5eMWOQKYFq4zSg1iuIVyIezKNgJGNsoEP1snjqHD +F+UGgADhA3USwsLiuHTHc3+qHgEWjU5tATRxbLLu9DLdQUBlWILCelVx7F4p +frTIiID4oekvzk7i6N4gomBiSYDK3Rq/b7ni6D9qbjjmTECkzs49otslcGO8 +MqPwIAEm7tnfNfUl0O7quIfwYQJ4I76edbCQQL7bzu0RRwi41hBdkOwpgeot +S2ByjICHZtVfV8ZJIPct9di74QRMO0kem+2XwOvG8lgZTcCDsIOr+MYk8NOV +jX3jMQScvvYoU2lKAnOd/YsEYglYO7yrJoCTgscLxVftjSdA1i+RY1iOglnZ +AwWvkwhwPzoX3xpOwdcPfRWWLhMgnaEv/iWago1xuzpnMv4f/4slq5Ip+Ec+ +pW4kk4CwP1s69PMoqKTOcaQqi4D0s+4bq1opWHZmwY6ZTcDu/KKCN28oaN1l +Y8Z3gwDGy5+aP4YpmF9olzRGupwn1WXrHAU9+K9xRtwkoDXl5Y18CSqO1Oy9 +F59H7u89wW0NslQslJBXMsgnwKVnT/3wNiomvjdaWiT9SeTPmJgRFVXaR666 +3CaAK0dZ7lIwFTONur5/u0tA89NTNWUnqDiQ5LA5sZCA5NFmi7YoKjq3ildJ +FRFAkfU5wJ1BxRdTq6bNisl8KL1y/3QdFQ8dD27dV0qAQW/70lQjFT2Xvbo4 +QtqKY7mxRycVCR9HRccyArxsg/vhAxWFcvoWVcsJCA6/xSifouKBb/Zy2aRP +5PXto/2kYhHPb80VbAKMwulnIlbQsCO8Y7KJdMv62lvbeWg4WXc+Q5YgwCbP +sXGal4ZGRSfoUaRd2xL49ojQUItO61e8R8BB6vwtPXkaHihxn/S4T8DcveTG +xa00dL1XWZpHOsxEfpKtRsNXFkmO46SjD3lqMHRpeJkxtduzggCelb9dBvRp +WGDI9yiTdHJW+plLxjQsbPy8sp10VkNzI+dOGgbqL7psrSSA6uQzWe1AQ2Ob +176upPMm/vEdcaGh4dccj3Ok5SKzNOQ9aFgZxzQqJF22Ud111It83+eQWBtp +tcJXZ67609A7bNPwBOlq3cA8uyAaVpxflb76AQHQtbxpzWEaJq3j05Yk/czv +xmTDMXJ8y7VdWqRN/2jxnwynoa1ph5sl6fbkbg21CBo6Nqi9cyNtL33AdeIc +DZez+K33ke6vWh2RF0euf17vwVHS7lZ5ebuTaHjh2/WNp0iPjeg2CabScGiU +Y18k6YDj/ZOtGeT6LY0eRpGeWhPCH32NholeZn8jSB/J4dVk3STjL/KFdZL0 +T7W7rnP5NOQW5ToRQvp0046IkkIa2nQeKQkgzeU+mOdTRsP/vMWGXEnHfj/R +JHGfhofK+teZk+Y9LzDV85CG600vMjVJp4qV8ic9omF6pIQvjbRIuYmmUT0N +N+zxTVlJ+rrBqOvfFzRk3rZ49JmMH6P/VERlCzn/5ntfmkjfCRLJD+6gofvi +GdHbpBU57zXJ9NBwaeNly0jSxGXLqcF+cvyqt+ecSG+X/8SfMUhD/W2aTxVI +69tL7F71iYbdTq0WreT+v/z0IKJugoYlMm+uZ5C2OGWbf3yGzE+uywsepHcV +nJ/6+IuMV+dQ40cyv94xGQI5/2hIOQz6t0nvfVWr6bScji/CORq9SO//ORPR +uI6O1tXOf7rI/GUe8hUa56fjlrMmjEjS3F8GirhE6Gho39MtRzr/bcMbXQYd +x49eGDtC5n+I/fb9u2XpuMpSwkCAtH5b8bIwBTp+1hRULyPPz+DjdIUKDTo+ +P83T8Y48b8WaPPWd2nS0enL0ZDDpsPLTu6aRjguD1Lo/5HkVyvWLkjenIyuS +f+160tbRWn03PeioE9QxzlNC1oO/JUF13nS8YJbgF0nWg4ljDK73AXT8990j +9gdZL2L91yiJhNDx1y/7sg6ynjwxf382KZaOQ/KpFZ53yHrPH7k1nE3Hkl73 +uuFcAjgS5p5lVtLx0Rrrfjrpdq5Al8oaOqaoVN72IOvdvjnb6JnndFwjRvF7 +TdbDvD6pt34DdFx3ajbtwjVyvjcaY+y5GPiy3q47IJ3MX2GW+GFuBsbIX+w6 +lkbubzKbfXEdA0e/H7oWkUquJyrrXbMwA4V105PjU8j5+uxX0VNg4Phb280n +LhCwKL9hUNGBgWd66CY15wiYvy4aqerCwPKM91+zzhLwY720lJYHA993Kyce +jyLPw6xWoEEAAw1Pf3wpG0H2xxqveZdTDPQNe2zjTfafZvMHvLH5DFxRc6LL +6hBZP/a5w8gcA3m30TfNuhCQ8d5/5OMvBna6nf0aQva/NOsj0ZP/GLgj7s+H +2V0EJKnGtvxcLYkNwS1On+0JiPrN3rWeIomzHlQ3woqMT8KKgzpGksgrGyP+ +mOy/OkXFOZcvS2K0+X8HX0gT8JZWdMPwqiSasFvb15P9Puzy3ewfNyTRJtXy +rSN5H3gQWXDN9q4kBsq1LR+kkPvjlJPJWyuJelrLazqECdiyIi055j9JzPMM +qjNZTcbbIzzimIIUOg0+SEn4woYZfjNPx3opvB/edTWngA19+xkdgS+l8O6M +q4pSHhuevPgFZ1qlUHlyILDqJhuSw4qod95I4ewjWmPjNTYoj6wdWvwihTKv +Mj1bLrEhmP3K7bqANAbnhh/cc5oNX6wdXMe8pTHlZLztOzs2jCV6Oh5eJYO3 +4tYu+pH3QdNvx00/aMjipdW8Snpa5TDhxX3k/pnNyH8+ZLSMvC8bSQlznq/f +gn4tZcT9imLgb5NJKv8mh2PLGs/PdBaCeGyZjYaGAqYbW2lEV92BTHmtDQJ+ +imiY84vVVFcAzaJ66rMpSnhx9+/E7115wBSvT976Ziumqo4rY3Mu8HLlhuyJ +UsbPR+Fa0I8coERSdZxltuHvzEBdY0o2rJbeXWn7cht2CpmUiGdngRJrU9lx +NxVcFfgrSvlSBhwe5G8w41DFZQkJARLRafBtNtHBNFMVm+3+XDzwJQWMt77I +MlVUw3cVdqGaWy/C41nt3wvtavi62Jp6Jz8eghVUBl77qGM31f02aygGWFPe +3c6rNdDw1/cNKnpnwVBKxHJdrgbemp/edN08AjZHxJ+o19RE5vuaPf1nw0HO +R6tOekATLaMD3WSfHgOfx/7n7h/ajpa6gccWZg5DXU6398xGLVxnqhPkPRgM +P+78W9j6QAvnty9mhQkGwLijUU5clRYuFPOUPecIgL7lF0xGa7TQL+v5asqk +P9R4il65/EQLmXPxx+ef+0OUiDpzqUkLB0v/HTY84Q8bYgNPNr/TQjjzd8xh +yA8U/Ho4fDiZGN678H3DA1/wki5anWXJRIus7pnjCd4Q9tw9UMaGicviFBpC +Q70h2Ye/hbBloozy3e1xft5Qmx+a2LKLiTdpxt86dniDoIzJ+qU9TFQsVyng +XPKCFzIfBD2PMXHWSVTi0yEvkNtMpcncYCJbNr4/ymcvzMilahDTTPxw2ipS +97An9LWiocAsE0Mddzr4envCk+Apu5A5JvqOqTplOnpCEmF6SOMXEwstdnaK +anuCHJOjuJpLG0N/np7KXO4Je02D6A1C2nj/T9aKzyoe0O1nvLZbRxutHRcm +/qa5wcO83//NxWrj9KrT4ropLqCxI2TBLEEbj41t+FoT5gIV/02szbmgjSFb +uKPNvF2AoAxqml3Sxmqhtpkrmi5QnPnkQvZVbRxRNkjiGHKGnMRoLeNSbUzb +3fx+VNkZ4kLWp2R2aePqXen8tcO7wMVAErUpOri21msyPtgBlrq5eRtoOnjg +R3K1k4sD5PhMvTWT1MGXl1cEaBo5wHhM1XGXzTpYrxrNlKU4wOEm67JQFR38 +nrHP91W7PcRbnaQ8NNJB/ba6u5qq9lDt1PNH7YAOVuwqtxfmtgOxoPNVSk90 +UOb5U83cIRtI+uernlCvgxnEBV7fDhvgvGTE/vhMB2dq3ZQ0ntrAl8oVd3Oa +dFDTyUv2d64NVHOcy+Tv0kFRpp+gsJ8NuKRFHJ//oINFZRKy1FFryKwJVX+8 +hoX2Lna3UilWsJFnP9tyFwsF1BIVLfvMIG/HqbBpZxbmq/eezKw1A5VTSTtS +d7PwdYDQqaUcM7CaLu/p28NCwY8puoKBZhDzZm7Raz8LPTulEg4vmcLP3DP6 +YZEsXF5hcXN4sykMaKd2FRSxsFL/0MqfKcbgfzTvmmkpC52u/n1oG2oM86UV +PhPlLLxo6pz/zNMY+Bl9C9sqWfies3VocqsxmHNLiD96wsIP3bda7V4ZQW13 +gXdXDwvT9QvU3fiNwIz3oeKxPhYu0vifMH4bQp9x07zIWxbeyhFx/TtqCD+q +v8a6D7OwhdsibKHCEBRvKpd8/sJCLlN9r28uhlA7oHcscZKFtVelT3gZGIKZ +oB1snWbh5MFz6yYVDcH3/NHXIXMsbJCOPozLyP89ickS/snCqaxiCs9XA4j6 +leFV/YuFKfddln/uNoANancV3JZYCKe+8b1/bADZQdVz//6x0Kvwjfr4HQP4 +H6OhLME= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.07311264990703728}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10263,19 +11025,19 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.07311264990703728}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10289,165 +11051,124 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwV1nc8V+8XAHDRkEoZIeOzrLKSmQ8f55C9szIyyla0NNBAkZUIkUoSKvtz +izJK0bCTkVHhi7QQCanU7/7+uq/363XvfZ7nPOc556HvPWDrw8nBwUFZxsHx +/+f8YNMzqYQ83ZWR8k6PRHfodmeLhOr1RYHEs16KTQwdcOOrvSJ9lyB6w7tm +2ZhtcMymsJerLxeuVG7VWBujB3xTwpcWewloWtz7dDh6JwzVWh340VsP13R7 +POyj94CR1Jf3M72dwHU7rVr17CFY7NVMn+4dAatDpXy1YZHQsON23uvcWeha +FlTXsf4SiA9Vje9VWILkG3X64eFZILjfo3DVDi6s2v/L+qTCTbi0zajGyoEb +/71dccNtcz70Zyo/mdmwDnuCJtvHku5AQt6ZV5yb+DDkYv/+nr4iMFML4N8o +yYc/JG1sBseKgPuZrYOsIh9mVg0oDk8XwblR6bfmenxI1bNtb+cuhpOM1vG0 +AD70exPut2t7MQTniPyVqebDJ4qTmwQvF8POa2wFc1d+dHDXF1S0KAHhtNG4 +1OsCyLqa2HYktxRE5CvO/SwQQH7RpwJ/ikpBtD7mjFu5ALr0lr05VVEKlOkt +R2UbBDBLYbEtqLEUpC0OetZ8EkALW789/yZLQXX5ksaoqiD6zaeLf9IsA+sQ +oTGVZkG841Lu1fiiDM7bm+p2zm/E6tdTA8b+5SB6v12Uc5kQNv+tCk3cXw6l +AvYL29YIoVf2MkbbwXJ40+lenkIVwtqMIxf0Q8tBamcIY6eJEIoab3++FFcO +9ZY3VnZcEcLXZWL+FYXlsGQ0196mI4z2Yg4Wsp/LIbkgrGjJSBiHv+48OjFB +fr+SI1ZxpzBS/FWzS6bLweI5j94FH2HMmO6fkvxZDlk7aPcskoTx01hUzPBK +NmxH84yWIWGMS3oWeEWSDUe0bno0RYng7aMjqqtd2GCWw/vDPFEEr/suuyLk +xgbGqpOx7ekiSIu/dZrmyYaObkd21x0RnOjd17LFlw1KB9dyDbaL4OtZ6X38 +h9nwqeB4wXfRTfh2bftL7Tg27Ba0mhS7twnnn6s6frvPBtXwmsjs2k24qH99 +MPEBG3hGNgvRX2xC53txn2Wq2VBVxgUy/ZswkvP4eZs6NgiZVyUr/9uEtj3E +x9AmcvxIKTVDc1GcYna4Sb9ng8G3X2HBo6J48+Kl8OFlBISapMk9nRDFqFcW +1VzLCSi9qTggMC+K4VJJeZIrCRCx99Sq4hbDtrSSk848BEw8fL7ApSSGCo9a +9K/zE5AalRxy5YQY6u6T9IlmEND4dovURKQYZhjpnDoiRcAftYYu3QQxtCrd +b+guQ4DvxzmVseti+DPS5eMWOQKYFq4zSg1iuIVyIezKNgJGNsoEP1snjqHD +F+UGgADhA3USwsLiuHTHc3+qHgEWjU5tATRxbLLu9DLdQUBlWILCelVx7F4p +frTIiID4oekvzk7i6N4gomBiSYDK3Rq/b7ni6D9qbjjmTECkzs49otslcGO8 +MqPwIAEm7tnfNfUl0O7quIfwYQJ4I76edbCQQL7bzu0RRwi41hBdkOwpgeot +S2ByjICHZtVfV8ZJIPct9di74QRMO0kem+2XwOvG8lgZTcCDsIOr+MYk8NOV +jX3jMQScvvYoU2lKAnOd/YsEYglYO7yrJoCTgscLxVftjSdA1i+RY1iOglnZ +AwWvkwhwPzoX3xpOwdcPfRWWLhMgnaEv/iWago1xuzpnMv4f/4slq5Ip+Ec+ +pW4kk4CwP1s69PMoqKTOcaQqi4D0s+4bq1opWHZmwY6ZTcDu/KKCN28oaN1l +Y8Z3gwDGy5+aP4YpmF9olzRGupwn1WXrHAU9+K9xRtwkoDXl5Y18CSqO1Oy9 +F59H7u89wW0NslQslJBXMsgnwKVnT/3wNiomvjdaWiT9SeTPmJgRFVXaR666 +3CaAK0dZ7lIwFTONur5/u0tA89NTNWUnqDiQ5LA5sZCA5NFmi7YoKjq3ildJ +FRFAkfU5wJ1BxRdTq6bNisl8KL1y/3QdFQ8dD27dV0qAQW/70lQjFT2Xvbo4 +QtqKY7mxRycVCR9HRccyArxsg/vhAxWFcvoWVcsJCA6/xSifouKBb/Zy2aRP +5PXto/2kYhHPb80VbAKMwulnIlbQsCO8Y7KJdMv62lvbeWg4WXc+Q5YgwCbP +sXGal4ZGRSfoUaRd2xL49ojQUItO61e8R8BB6vwtPXkaHihxn/S4T8DcveTG +xa00dL1XWZpHOsxEfpKtRsNXFkmO46SjD3lqMHRpeJkxtduzggCelb9dBvRp +WGDI9yiTdHJW+plLxjQsbPy8sp10VkNzI+dOGgbqL7psrSSA6uQzWe1AQ2Ob +176upPMm/vEdcaGh4dccj3Ok5SKzNOQ9aFgZxzQqJF22Ud111It83+eQWBtp +tcJXZ67609A7bNPwBOlq3cA8uyAaVpxflb76AQHQtbxpzWEaJq3j05Yk/czv +xmTDMXJ8y7VdWqRN/2jxnwynoa1ph5sl6fbkbg21CBo6Nqi9cyNtL33AdeIc +DZez+K33ke6vWh2RF0euf17vwVHS7lZ5ebuTaHjh2/WNp0iPjeg2CabScGiU +Y18k6YDj/ZOtGeT6LY0eRpGeWhPCH32NholeZn8jSB/J4dVk3STjL/KFdZL0 +T7W7rnP5NOQW5ToRQvp0046IkkIa2nQeKQkgzeU+mOdTRsP/vMWGXEnHfj/R +JHGfhofK+teZk+Y9LzDV85CG600vMjVJp4qV8ic9omF6pIQvjbRIuYmmUT0N +N+zxTVlJ+rrBqOvfFzRk3rZ49JmMH6P/VERlCzn/5ntfmkjfCRLJD+6gofvi +GdHbpBU57zXJ9NBwaeNly0jSxGXLqcF+cvyqt+ecSG+X/8SfMUhD/W2aTxVI +69tL7F71iYbdTq0WreT+v/z0IKJugoYlMm+uZ5C2OGWbf3yGzE+uywsepHcV +nJ/6+IuMV+dQ40cyv94xGQI5/2hIOQz6t0nvfVWr6bScji/CORq9SO//ORPR +uI6O1tXOf7rI/GUe8hUa56fjlrMmjEjS3F8GirhE6Gho39MtRzr/bcMbXQYd +x49eGDtC5n+I/fb9u2XpuMpSwkCAtH5b8bIwBTp+1hRULyPPz+DjdIUKDTo+ +P83T8Y48b8WaPPWd2nS0enL0ZDDpsPLTu6aRjguD1Lo/5HkVyvWLkjenIyuS +f+160tbRWn03PeioE9QxzlNC1oO/JUF13nS8YJbgF0nWg4ljDK73AXT8990j +9gdZL2L91yiJhNDx1y/7sg6ynjwxf382KZaOQ/KpFZ53yHrPH7k1nE3Hkl73 +uuFcAjgS5p5lVtLx0Rrrfjrpdq5Al8oaOqaoVN72IOvdvjnb6JnndFwjRvF7 +TdbDvD6pt34DdFx3ajbtwjVyvjcaY+y5GPiy3q47IJ3MX2GW+GFuBsbIX+w6 +lkbubzKbfXEdA0e/H7oWkUquJyrrXbMwA4V105PjU8j5+uxX0VNg4Phb280n +LhCwKL9hUNGBgWd66CY15wiYvy4aqerCwPKM91+zzhLwY720lJYHA993Kyce +jyLPw6xWoEEAAw1Pf3wpG0H2xxqveZdTDPQNe2zjTfafZvMHvLH5DFxRc6LL +6hBZP/a5w8gcA3m30TfNuhCQ8d5/5OMvBna6nf0aQva/NOsj0ZP/GLgj7s+H +2V0EJKnGtvxcLYkNwS1On+0JiPrN3rWeIomzHlQ3woqMT8KKgzpGksgrGyP+ +mOy/OkXFOZcvS2K0+X8HX0gT8JZWdMPwqiSasFvb15P9Puzy3ewfNyTRJtXy +rSN5H3gQWXDN9q4kBsq1LR+kkPvjlJPJWyuJelrLazqECdiyIi055j9JzPMM +qjNZTcbbIzzimIIUOg0+SEn4woYZfjNPx3opvB/edTWngA19+xkdgS+l8O6M +q4pSHhuevPgFZ1qlUHlyILDqJhuSw4qod95I4ewjWmPjNTYoj6wdWvwihTKv +Mj1bLrEhmP3K7bqANAbnhh/cc5oNX6wdXMe8pTHlZLztOzs2jCV6Oh5eJYO3 +4tYu+pH3QdNvx00/aMjipdW8Snpa5TDhxX3k/pnNyH8+ZLSMvC8bSQlznq/f +gn4tZcT9imLgb5NJKv8mh2PLGs/PdBaCeGyZjYaGAqYbW2lEV92BTHmtDQJ+ +imiY84vVVFcAzaJ66rMpSnhx9+/E7115wBSvT976Ziumqo4rY3Mu8HLlhuyJ +UsbPR+Fa0I8coERSdZxltuHvzEBdY0o2rJbeXWn7cht2CpmUiGdngRJrU9lx +NxVcFfgrSvlSBhwe5G8w41DFZQkJARLRafBtNtHBNFMVm+3+XDzwJQWMt77I +MlVUw3cVdqGaWy/C41nt3wvtavi62Jp6Jz8eghVUBl77qGM31f02aygGWFPe +3c6rNdDw1/cNKnpnwVBKxHJdrgbemp/edN08AjZHxJ+o19RE5vuaPf1nw0HO +R6tOekATLaMD3WSfHgOfx/7n7h/ajpa6gccWZg5DXU6398xGLVxnqhPkPRgM +P+78W9j6QAvnty9mhQkGwLijUU5clRYuFPOUPecIgL7lF0xGa7TQL+v5asqk +P9R4il65/EQLmXPxx+ef+0OUiDpzqUkLB0v/HTY84Q8bYgNPNr/TQjjzd8xh +yA8U/Ho4fDiZGN678H3DA1/wki5anWXJRIus7pnjCd4Q9tw9UMaGicviFBpC +Q70h2Ye/hbBloozy3e1xft5Qmx+a2LKLiTdpxt86dniDoIzJ+qU9TFQsVyng +XPKCFzIfBD2PMXHWSVTi0yEvkNtMpcncYCJbNr4/ymcvzMilahDTTPxw2ipS +97An9LWiocAsE0Mddzr4envCk+Apu5A5JvqOqTplOnpCEmF6SOMXEwstdnaK +anuCHJOjuJpLG0N/np7KXO4Je02D6A1C2nj/T9aKzyoe0O1nvLZbRxutHRcm +/qa5wcO83//NxWrj9KrT4ropLqCxI2TBLEEbj41t+FoT5gIV/02szbmgjSFb +uKPNvF2AoAxqml3Sxmqhtpkrmi5QnPnkQvZVbRxRNkjiGHKGnMRoLeNSbUzb +3fx+VNkZ4kLWp2R2aePqXen8tcO7wMVAErUpOri21msyPtgBlrq5eRtoOnjg +R3K1k4sD5PhMvTWT1MGXl1cEaBo5wHhM1XGXzTpYrxrNlKU4wOEm67JQFR38 +nrHP91W7PcRbnaQ8NNJB/ba6u5qq9lDt1PNH7YAOVuwqtxfmtgOxoPNVSk90 +UOb5U83cIRtI+uernlCvgxnEBV7fDhvgvGTE/vhMB2dq3ZQ0ntrAl8oVd3Oa +dFDTyUv2d64NVHOcy+Tv0kFRpp+gsJ8NuKRFHJ//oINFZRKy1FFryKwJVX+8 +hoX2Lna3UilWsJFnP9tyFwsF1BIVLfvMIG/HqbBpZxbmq/eezKw1A5VTSTtS +d7PwdYDQqaUcM7CaLu/p28NCwY8puoKBZhDzZm7Raz8LPTulEg4vmcLP3DP6 +YZEsXF5hcXN4sykMaKd2FRSxsFL/0MqfKcbgfzTvmmkpC52u/n1oG2oM86UV +PhPlLLxo6pz/zNMY+Bl9C9sqWfies3VocqsxmHNLiD96wsIP3bda7V4ZQW13 +gXdXDwvT9QvU3fiNwIz3oeKxPhYu0vifMH4bQp9x07zIWxbeyhFx/TtqCD+q +v8a6D7OwhdsibKHCEBRvKpd8/sJCLlN9r28uhlA7oHcscZKFtVelT3gZGIKZ +oB1snWbh5MFz6yYVDcH3/NHXIXMsbJCOPozLyP89ickS/snCqaxiCs9XA4j6 +leFV/YuFKfddln/uNoANancV3JZYCKe+8b1/bADZQdVz//6x0Kvwjfr4HQP4 +H6OhLME= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.07311264990703728}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10458,6 +11179,7 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10485,7 +11207,8 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1760850255633475}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07311264990703728}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10493,17 +11216,595 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913465524249306`*^9}, + CellChangeTimes->{3.9913465524249306`*^9, 3.9943561826098223`*^9}, CellLabel-> - "Out[444]=",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] + "Out[119]=",ExpressionUUID->"013b7b08-d77b-4463-bf42-a42bc1b08008"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6883477e-2a54-0a45-979a-\ -ae60c73e9e82"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8V+8XAHDRkEoZIeOzrLKSmQ8f55C9szIyyla0NNBAkZUIkUoSKvtz +izJK0bCTkVHhi7QQCanU7/7+uq/363XvfZ7nPOc556HvPWDrw8nBwUFZxsHx +/+f8YNMzqYQ83ZWR8k6PRHfodmeLhOr1RYHEs16KTQwdcOOrvSJ9lyB6w7tm +2ZhtcMymsJerLxeuVG7VWBujB3xTwpcWewloWtz7dDh6JwzVWh340VsP13R7 +POyj94CR1Jf3M72dwHU7rVr17CFY7NVMn+4dAatDpXy1YZHQsON23uvcWeha +FlTXsf4SiA9Vje9VWILkG3X64eFZILjfo3DVDi6s2v/L+qTCTbi0zajGyoEb +/71dccNtcz70Zyo/mdmwDnuCJtvHku5AQt6ZV5yb+DDkYv/+nr4iMFML4N8o +yYc/JG1sBseKgPuZrYOsIh9mVg0oDk8XwblR6bfmenxI1bNtb+cuhpOM1vG0 +AD70exPut2t7MQTniPyVqebDJ4qTmwQvF8POa2wFc1d+dHDXF1S0KAHhtNG4 +1OsCyLqa2HYktxRE5CvO/SwQQH7RpwJ/ikpBtD7mjFu5ALr0lr05VVEKlOkt +R2UbBDBLYbEtqLEUpC0OetZ8EkALW789/yZLQXX5ksaoqiD6zaeLf9IsA+sQ +oTGVZkG841Lu1fiiDM7bm+p2zm/E6tdTA8b+5SB6v12Uc5kQNv+tCk3cXw6l +AvYL29YIoVf2MkbbwXJ40+lenkIVwtqMIxf0Q8tBamcIY6eJEIoab3++FFcO +9ZY3VnZcEcLXZWL+FYXlsGQ0196mI4z2Yg4Wsp/LIbkgrGjJSBiHv+48OjFB +fr+SI1ZxpzBS/FWzS6bLweI5j94FH2HMmO6fkvxZDlk7aPcskoTx01hUzPBK +NmxH84yWIWGMS3oWeEWSDUe0bno0RYng7aMjqqtd2GCWw/vDPFEEr/suuyLk +xgbGqpOx7ekiSIu/dZrmyYaObkd21x0RnOjd17LFlw1KB9dyDbaL4OtZ6X38 +h9nwqeB4wXfRTfh2bftL7Tg27Ba0mhS7twnnn6s6frvPBtXwmsjs2k24qH99 +MPEBG3hGNgvRX2xC53txn2Wq2VBVxgUy/ZswkvP4eZs6NgiZVyUr/9uEtj3E +x9AmcvxIKTVDc1GcYna4Sb9ng8G3X2HBo6J48+Kl8OFlBISapMk9nRDFqFcW +1VzLCSi9qTggMC+K4VJJeZIrCRCx99Sq4hbDtrSSk848BEw8fL7ApSSGCo9a +9K/zE5AalRxy5YQY6u6T9IlmEND4dovURKQYZhjpnDoiRcAftYYu3QQxtCrd +b+guQ4DvxzmVseti+DPS5eMWOQKYFq4zSg1iuIVyIezKNgJGNsoEP1snjqHD +F+UGgADhA3USwsLiuHTHc3+qHgEWjU5tATRxbLLu9DLdQUBlWILCelVx7F4p +frTIiID4oekvzk7i6N4gomBiSYDK3Rq/b7ni6D9qbjjmTECkzs49otslcGO8 +MqPwIAEm7tnfNfUl0O7quIfwYQJ4I76edbCQQL7bzu0RRwi41hBdkOwpgeot +S2ByjICHZtVfV8ZJIPct9di74QRMO0kem+2XwOvG8lgZTcCDsIOr+MYk8NOV +jX3jMQScvvYoU2lKAnOd/YsEYglYO7yrJoCTgscLxVftjSdA1i+RY1iOglnZ +AwWvkwhwPzoX3xpOwdcPfRWWLhMgnaEv/iWago1xuzpnMv4f/4slq5Ip+Ec+ +pW4kk4CwP1s69PMoqKTOcaQqi4D0s+4bq1opWHZmwY6ZTcDu/KKCN28oaN1l +Y8Z3gwDGy5+aP4YpmF9olzRGupwn1WXrHAU9+K9xRtwkoDXl5Y18CSqO1Oy9 +F59H7u89wW0NslQslJBXMsgnwKVnT/3wNiomvjdaWiT9SeTPmJgRFVXaR666 +3CaAK0dZ7lIwFTONur5/u0tA89NTNWUnqDiQ5LA5sZCA5NFmi7YoKjq3ildJ +FRFAkfU5wJ1BxRdTq6bNisl8KL1y/3QdFQ8dD27dV0qAQW/70lQjFT2Xvbo4 +QtqKY7mxRycVCR9HRccyArxsg/vhAxWFcvoWVcsJCA6/xSifouKBb/Zy2aRP +5PXto/2kYhHPb80VbAKMwulnIlbQsCO8Y7KJdMv62lvbeWg4WXc+Q5YgwCbP +sXGal4ZGRSfoUaRd2xL49ojQUItO61e8R8BB6vwtPXkaHihxn/S4T8DcveTG +xa00dL1XWZpHOsxEfpKtRsNXFkmO46SjD3lqMHRpeJkxtduzggCelb9dBvRp +WGDI9yiTdHJW+plLxjQsbPy8sp10VkNzI+dOGgbqL7psrSSA6uQzWe1AQ2Ob +176upPMm/vEdcaGh4dccj3Ok5SKzNOQ9aFgZxzQqJF22Ud111It83+eQWBtp +tcJXZ67609A7bNPwBOlq3cA8uyAaVpxflb76AQHQtbxpzWEaJq3j05Yk/czv +xmTDMXJ8y7VdWqRN/2jxnwynoa1ph5sl6fbkbg21CBo6Nqi9cyNtL33AdeIc +DZez+K33ke6vWh2RF0euf17vwVHS7lZ5ebuTaHjh2/WNp0iPjeg2CabScGiU +Y18k6YDj/ZOtGeT6LY0eRpGeWhPCH32NholeZn8jSB/J4dVk3STjL/KFdZL0 +T7W7rnP5NOQW5ToRQvp0046IkkIa2nQeKQkgzeU+mOdTRsP/vMWGXEnHfj/R +JHGfhofK+teZk+Y9LzDV85CG600vMjVJp4qV8ic9omF6pIQvjbRIuYmmUT0N +N+zxTVlJ+rrBqOvfFzRk3rZ49JmMH6P/VERlCzn/5ntfmkjfCRLJD+6gofvi +GdHbpBU57zXJ9NBwaeNly0jSxGXLqcF+cvyqt+ecSG+X/8SfMUhD/W2aTxVI +69tL7F71iYbdTq0WreT+v/z0IKJugoYlMm+uZ5C2OGWbf3yGzE+uywsepHcV +nJ/6+IuMV+dQ40cyv94xGQI5/2hIOQz6t0nvfVWr6bScji/CORq9SO//ORPR +uI6O1tXOf7rI/GUe8hUa56fjlrMmjEjS3F8GirhE6Gho39MtRzr/bcMbXQYd +x49eGDtC5n+I/fb9u2XpuMpSwkCAtH5b8bIwBTp+1hRULyPPz+DjdIUKDTo+ +P83T8Y48b8WaPPWd2nS0enL0ZDDpsPLTu6aRjguD1Lo/5HkVyvWLkjenIyuS +f+160tbRWn03PeioE9QxzlNC1oO/JUF13nS8YJbgF0nWg4ljDK73AXT8990j +9gdZL2L91yiJhNDx1y/7sg6ynjwxf382KZaOQ/KpFZ53yHrPH7k1nE3Hkl73 +uuFcAjgS5p5lVtLx0Rrrfjrpdq5Al8oaOqaoVN72IOvdvjnb6JnndFwjRvF7 +TdbDvD6pt34DdFx3ajbtwjVyvjcaY+y5GPiy3q47IJ3MX2GW+GFuBsbIX+w6 +lkbubzKbfXEdA0e/H7oWkUquJyrrXbMwA4V105PjU8j5+uxX0VNg4Phb280n +LhCwKL9hUNGBgWd66CY15wiYvy4aqerCwPKM91+zzhLwY720lJYHA993Kyce +jyLPw6xWoEEAAw1Pf3wpG0H2xxqveZdTDPQNe2zjTfafZvMHvLH5DFxRc6LL +6hBZP/a5w8gcA3m30TfNuhCQ8d5/5OMvBna6nf0aQva/NOsj0ZP/GLgj7s+H +2V0EJKnGtvxcLYkNwS1On+0JiPrN3rWeIomzHlQ3woqMT8KKgzpGksgrGyP+ +mOy/OkXFOZcvS2K0+X8HX0gT8JZWdMPwqiSasFvb15P9Puzy3ewfNyTRJtXy +rSN5H3gQWXDN9q4kBsq1LR+kkPvjlJPJWyuJelrLazqECdiyIi055j9JzPMM +qjNZTcbbIzzimIIUOg0+SEn4woYZfjNPx3opvB/edTWngA19+xkdgS+l8O6M +q4pSHhuevPgFZ1qlUHlyILDqJhuSw4qod95I4ewjWmPjNTYoj6wdWvwihTKv +Mj1bLrEhmP3K7bqANAbnhh/cc5oNX6wdXMe8pTHlZLztOzs2jCV6Oh5eJYO3 +4tYu+pH3QdNvx00/aMjipdW8Snpa5TDhxX3k/pnNyH8+ZLSMvC8bSQlznq/f +gn4tZcT9imLgb5NJKv8mh2PLGs/PdBaCeGyZjYaGAqYbW2lEV92BTHmtDQJ+ +imiY84vVVFcAzaJ66rMpSnhx9+/E7115wBSvT976Ziumqo4rY3Mu8HLlhuyJ +UsbPR+Fa0I8coERSdZxltuHvzEBdY0o2rJbeXWn7cht2CpmUiGdngRJrU9lx +NxVcFfgrSvlSBhwe5G8w41DFZQkJARLRafBtNtHBNFMVm+3+XDzwJQWMt77I +MlVUw3cVdqGaWy/C41nt3wvtavi62Jp6Jz8eghVUBl77qGM31f02aygGWFPe +3c6rNdDw1/cNKnpnwVBKxHJdrgbemp/edN08AjZHxJ+o19RE5vuaPf1nw0HO +R6tOekATLaMD3WSfHgOfx/7n7h/ajpa6gccWZg5DXU6398xGLVxnqhPkPRgM +P+78W9j6QAvnty9mhQkGwLijUU5clRYuFPOUPecIgL7lF0xGa7TQL+v5asqk +P9R4il65/EQLmXPxx+ef+0OUiDpzqUkLB0v/HTY84Q8bYgNPNr/TQjjzd8xh +yA8U/Ho4fDiZGN678H3DA1/wki5anWXJRIus7pnjCd4Q9tw9UMaGicviFBpC +Q70h2Ye/hbBloozy3e1xft5Qmx+a2LKLiTdpxt86dniDoIzJ+qU9TFQsVyng +XPKCFzIfBD2PMXHWSVTi0yEvkNtMpcncYCJbNr4/ymcvzMilahDTTPxw2ipS +97An9LWiocAsE0Mddzr4envCk+Apu5A5JvqOqTplOnpCEmF6SOMXEwstdnaK +anuCHJOjuJpLG0N/np7KXO4Je02D6A1C2nj/T9aKzyoe0O1nvLZbRxutHRcm +/qa5wcO83//NxWrj9KrT4ropLqCxI2TBLEEbj41t+FoT5gIV/02szbmgjSFb +uKPNvF2AoAxqml3Sxmqhtpkrmi5QnPnkQvZVbRxRNkjiGHKGnMRoLeNSbUzb +3fx+VNkZ4kLWp2R2aePqXen8tcO7wMVAErUpOri21msyPtgBlrq5eRtoOnjg +R3K1k4sD5PhMvTWT1MGXl1cEaBo5wHhM1XGXzTpYrxrNlKU4wOEm67JQFR38 +nrHP91W7PcRbnaQ8NNJB/ba6u5qq9lDt1PNH7YAOVuwqtxfmtgOxoPNVSk90 +UOb5U83cIRtI+uernlCvgxnEBV7fDhvgvGTE/vhMB2dq3ZQ0ntrAl8oVd3Oa +dFDTyUv2d64NVHOcy+Tv0kFRpp+gsJ8NuKRFHJ//oINFZRKy1FFryKwJVX+8 +hoX2Lna3UilWsJFnP9tyFwsF1BIVLfvMIG/HqbBpZxbmq/eezKw1A5VTSTtS +d7PwdYDQqaUcM7CaLu/p28NCwY8puoKBZhDzZm7Raz8LPTulEg4vmcLP3DP6 +YZEsXF5hcXN4sykMaKd2FRSxsFL/0MqfKcbgfzTvmmkpC52u/n1oG2oM86UV +PhPlLLxo6pz/zNMY+Bl9C9sqWfies3VocqsxmHNLiD96wsIP3bda7V4ZQW13 +gXdXDwvT9QvU3fiNwIz3oeKxPhYu0vifMH4bQp9x07zIWxbeyhFx/TtqCD+q +v8a6D7OwhdsibKHCEBRvKpd8/sJCLlN9r28uhlA7oHcscZKFtVelT3gZGIKZ +oB1snWbh5MFz6yYVDcH3/NHXIXMsbJCOPozLyP89ickS/snCqaxiCs9XA4j6 +leFV/YuFKfddln/uNoANancV3JZYCKe+8b1/bADZQdVz//6x0Kvwjfr4HQP4 +H6OhLME= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc8V+8XAHDRkEoZIeOzrLKSmQ8f55C9szIyyla0NNBAkZUIkUoSKvtz +izJK0bCTkVHhi7QQCanU7/7+uq/363XvfZ7nPOc556HvPWDrw8nBwUFZxsHx +/+f8YNMzqYQ83ZWR8k6PRHfodmeLhOr1RYHEs16KTQwdcOOrvSJ9lyB6w7tm +2ZhtcMymsJerLxeuVG7VWBujB3xTwpcWewloWtz7dDh6JwzVWh340VsP13R7 +POyj94CR1Jf3M72dwHU7rVr17CFY7NVMn+4dAatDpXy1YZHQsON23uvcWeha +FlTXsf4SiA9Vje9VWILkG3X64eFZILjfo3DVDi6s2v/L+qTCTbi0zajGyoEb +/71dccNtcz70Zyo/mdmwDnuCJtvHku5AQt6ZV5yb+DDkYv/+nr4iMFML4N8o +yYc/JG1sBseKgPuZrYOsIh9mVg0oDk8XwblR6bfmenxI1bNtb+cuhpOM1vG0 +AD70exPut2t7MQTniPyVqebDJ4qTmwQvF8POa2wFc1d+dHDXF1S0KAHhtNG4 +1OsCyLqa2HYktxRE5CvO/SwQQH7RpwJ/ikpBtD7mjFu5ALr0lr05VVEKlOkt +R2UbBDBLYbEtqLEUpC0OetZ8EkALW789/yZLQXX5ksaoqiD6zaeLf9IsA+sQ +oTGVZkG841Lu1fiiDM7bm+p2zm/E6tdTA8b+5SB6v12Uc5kQNv+tCk3cXw6l +AvYL29YIoVf2MkbbwXJ40+lenkIVwtqMIxf0Q8tBamcIY6eJEIoab3++FFcO +9ZY3VnZcEcLXZWL+FYXlsGQ0196mI4z2Yg4Wsp/LIbkgrGjJSBiHv+48OjFB +fr+SI1ZxpzBS/FWzS6bLweI5j94FH2HMmO6fkvxZDlk7aPcskoTx01hUzPBK +NmxH84yWIWGMS3oWeEWSDUe0bno0RYng7aMjqqtd2GCWw/vDPFEEr/suuyLk +xgbGqpOx7ekiSIu/dZrmyYaObkd21x0RnOjd17LFlw1KB9dyDbaL4OtZ6X38 +h9nwqeB4wXfRTfh2bftL7Tg27Ba0mhS7twnnn6s6frvPBtXwmsjs2k24qH99 +MPEBG3hGNgvRX2xC53txn2Wq2VBVxgUy/ZswkvP4eZs6NgiZVyUr/9uEtj3E +x9AmcvxIKTVDc1GcYna4Sb9ng8G3X2HBo6J48+Kl8OFlBISapMk9nRDFqFcW +1VzLCSi9qTggMC+K4VJJeZIrCRCx99Sq4hbDtrSSk848BEw8fL7ApSSGCo9a +9K/zE5AalRxy5YQY6u6T9IlmEND4dovURKQYZhjpnDoiRcAftYYu3QQxtCrd +b+guQ4DvxzmVseti+DPS5eMWOQKYFq4zSg1iuIVyIezKNgJGNsoEP1snjqHD +F+UGgADhA3USwsLiuHTHc3+qHgEWjU5tATRxbLLu9DLdQUBlWILCelVx7F4p +frTIiID4oekvzk7i6N4gomBiSYDK3Rq/b7ni6D9qbjjmTECkzs49otslcGO8 +MqPwIAEm7tnfNfUl0O7quIfwYQJ4I76edbCQQL7bzu0RRwi41hBdkOwpgeot +S2ByjICHZtVfV8ZJIPct9di74QRMO0kem+2XwOvG8lgZTcCDsIOr+MYk8NOV +jX3jMQScvvYoU2lKAnOd/YsEYglYO7yrJoCTgscLxVftjSdA1i+RY1iOglnZ +AwWvkwhwPzoX3xpOwdcPfRWWLhMgnaEv/iWago1xuzpnMv4f/4slq5Ip+Ec+ +pW4kk4CwP1s69PMoqKTOcaQqi4D0s+4bq1opWHZmwY6ZTcDu/KKCN28oaN1l +Y8Z3gwDGy5+aP4YpmF9olzRGupwn1WXrHAU9+K9xRtwkoDXl5Y18CSqO1Oy9 +F59H7u89wW0NslQslJBXMsgnwKVnT/3wNiomvjdaWiT9SeTPmJgRFVXaR666 +3CaAK0dZ7lIwFTONur5/u0tA89NTNWUnqDiQ5LA5sZCA5NFmi7YoKjq3ildJ +FRFAkfU5wJ1BxRdTq6bNisl8KL1y/3QdFQ8dD27dV0qAQW/70lQjFT2Xvbo4 +QtqKY7mxRycVCR9HRccyArxsg/vhAxWFcvoWVcsJCA6/xSifouKBb/Zy2aRP +5PXto/2kYhHPb80VbAKMwulnIlbQsCO8Y7KJdMv62lvbeWg4WXc+Q5YgwCbP +sXGal4ZGRSfoUaRd2xL49ojQUItO61e8R8BB6vwtPXkaHihxn/S4T8DcveTG +xa00dL1XWZpHOsxEfpKtRsNXFkmO46SjD3lqMHRpeJkxtduzggCelb9dBvRp +WGDI9yiTdHJW+plLxjQsbPy8sp10VkNzI+dOGgbqL7psrSSA6uQzWe1AQ2Ob +176upPMm/vEdcaGh4dccj3Ok5SKzNOQ9aFgZxzQqJF22Ud111It83+eQWBtp +tcJXZ67609A7bNPwBOlq3cA8uyAaVpxflb76AQHQtbxpzWEaJq3j05Yk/czv +xmTDMXJ8y7VdWqRN/2jxnwynoa1ph5sl6fbkbg21CBo6Nqi9cyNtL33AdeIc +DZez+K33ke6vWh2RF0euf17vwVHS7lZ5ebuTaHjh2/WNp0iPjeg2CabScGiU +Y18k6YDj/ZOtGeT6LY0eRpGeWhPCH32NholeZn8jSB/J4dVk3STjL/KFdZL0 +T7W7rnP5NOQW5ToRQvp0046IkkIa2nQeKQkgzeU+mOdTRsP/vMWGXEnHfj/R +JHGfhofK+teZk+Y9LzDV85CG600vMjVJp4qV8ic9omF6pIQvjbRIuYmmUT0N +N+zxTVlJ+rrBqOvfFzRk3rZ49JmMH6P/VERlCzn/5ntfmkjfCRLJD+6gofvi +GdHbpBU57zXJ9NBwaeNly0jSxGXLqcF+cvyqt+ecSG+X/8SfMUhD/W2aTxVI +69tL7F71iYbdTq0WreT+v/z0IKJugoYlMm+uZ5C2OGWbf3yGzE+uywsepHcV +nJ/6+IuMV+dQ40cyv94xGQI5/2hIOQz6t0nvfVWr6bScji/CORq9SO//ORPR +uI6O1tXOf7rI/GUe8hUa56fjlrMmjEjS3F8GirhE6Gho39MtRzr/bcMbXQYd +x49eGDtC5n+I/fb9u2XpuMpSwkCAtH5b8bIwBTp+1hRULyPPz+DjdIUKDTo+ +P83T8Y48b8WaPPWd2nS0enL0ZDDpsPLTu6aRjguD1Lo/5HkVyvWLkjenIyuS +f+160tbRWn03PeioE9QxzlNC1oO/JUF13nS8YJbgF0nWg4ljDK73AXT8990j +9gdZL2L91yiJhNDx1y/7sg6ynjwxf382KZaOQ/KpFZ53yHrPH7k1nE3Hkl73 +uuFcAjgS5p5lVtLx0Rrrfjrpdq5Al8oaOqaoVN72IOvdvjnb6JnndFwjRvF7 +TdbDvD6pt34DdFx3ajbtwjVyvjcaY+y5GPiy3q47IJ3MX2GW+GFuBsbIX+w6 +lkbubzKbfXEdA0e/H7oWkUquJyrrXbMwA4V105PjU8j5+uxX0VNg4Phb280n +LhCwKL9hUNGBgWd66CY15wiYvy4aqerCwPKM91+zzhLwY720lJYHA993Kyce +jyLPw6xWoEEAAw1Pf3wpG0H2xxqveZdTDPQNe2zjTfafZvMHvLH5DFxRc6LL +6hBZP/a5w8gcA3m30TfNuhCQ8d5/5OMvBna6nf0aQva/NOsj0ZP/GLgj7s+H +2V0EJKnGtvxcLYkNwS1On+0JiPrN3rWeIomzHlQ3woqMT8KKgzpGksgrGyP+ +mOy/OkXFOZcvS2K0+X8HX0gT8JZWdMPwqiSasFvb15P9Puzy3ewfNyTRJtXy +rSN5H3gQWXDN9q4kBsq1LR+kkPvjlJPJWyuJelrLazqECdiyIi055j9JzPMM +qjNZTcbbIzzimIIUOg0+SEn4woYZfjNPx3opvB/edTWngA19+xkdgS+l8O6M +q4pSHhuevPgFZ1qlUHlyILDqJhuSw4qod95I4ewjWmPjNTYoj6wdWvwihTKv +Mj1bLrEhmP3K7bqANAbnhh/cc5oNX6wdXMe8pTHlZLztOzs2jCV6Oh5eJYO3 +4tYu+pH3QdNvx00/aMjipdW8Snpa5TDhxX3k/pnNyH8+ZLSMvC8bSQlznq/f +gn4tZcT9imLgb5NJKv8mh2PLGs/PdBaCeGyZjYaGAqYbW2lEV92BTHmtDQJ+ +imiY84vVVFcAzaJ66rMpSnhx9+/E7115wBSvT976Ziumqo4rY3Mu8HLlhuyJ +UsbPR+Fa0I8coERSdZxltuHvzEBdY0o2rJbeXWn7cht2CpmUiGdngRJrU9lx +NxVcFfgrSvlSBhwe5G8w41DFZQkJARLRafBtNtHBNFMVm+3+XDzwJQWMt77I +MlVUw3cVdqGaWy/C41nt3wvtavi62Jp6Jz8eghVUBl77qGM31f02aygGWFPe +3c6rNdDw1/cNKnpnwVBKxHJdrgbemp/edN08AjZHxJ+o19RE5vuaPf1nw0HO +R6tOekATLaMD3WSfHgOfx/7n7h/ajpa6gccWZg5DXU6398xGLVxnqhPkPRgM +P+78W9j6QAvnty9mhQkGwLijUU5clRYuFPOUPecIgL7lF0xGa7TQL+v5asqk +P9R4il65/EQLmXPxx+ef+0OUiDpzqUkLB0v/HTY84Q8bYgNPNr/TQjjzd8xh +yA8U/Ho4fDiZGN678H3DA1/wki5anWXJRIus7pnjCd4Q9tw9UMaGicviFBpC +Q70h2Ye/hbBloozy3e1xft5Qmx+a2LKLiTdpxt86dniDoIzJ+qU9TFQsVyng +XPKCFzIfBD2PMXHWSVTi0yEvkNtMpcncYCJbNr4/ymcvzMilahDTTPxw2ipS +97An9LWiocAsE0Mddzr4envCk+Apu5A5JvqOqTplOnpCEmF6SOMXEwstdnaK +anuCHJOjuJpLG0N/np7KXO4Je02D6A1C2nj/T9aKzyoe0O1nvLZbRxutHRcm +/qa5wcO83//NxWrj9KrT4ropLqCxI2TBLEEbj41t+FoT5gIV/02szbmgjSFb +uKPNvF2AoAxqml3Sxmqhtpkrmi5QnPnkQvZVbRxRNkjiGHKGnMRoLeNSbUzb +3fx+VNkZ4kLWp2R2aePqXen8tcO7wMVAErUpOri21msyPtgBlrq5eRtoOnjg +R3K1k4sD5PhMvTWT1MGXl1cEaBo5wHhM1XGXzTpYrxrNlKU4wOEm67JQFR38 +nrHP91W7PcRbnaQ8NNJB/ba6u5qq9lDt1PNH7YAOVuwqtxfmtgOxoPNVSk90 +UOb5U83cIRtI+uernlCvgxnEBV7fDhvgvGTE/vhMB2dq3ZQ0ntrAl8oVd3Oa +dFDTyUv2d64NVHOcy+Tv0kFRpp+gsJ8NuKRFHJ//oINFZRKy1FFryKwJVX+8 +hoX2Lna3UilWsJFnP9tyFwsF1BIVLfvMIG/HqbBpZxbmq/eezKw1A5VTSTtS +d7PwdYDQqaUcM7CaLu/p28NCwY8puoKBZhDzZm7Raz8LPTulEg4vmcLP3DP6 +YZEsXF5hcXN4sykMaKd2FRSxsFL/0MqfKcbgfzTvmmkpC52u/n1oG2oM86UV +PhPlLLxo6pz/zNMY+Bl9C9sqWfies3VocqsxmHNLiD96wsIP3bda7V4ZQW13 +gXdXDwvT9QvU3fiNwIz3oeKxPhYu0vifMH4bQp9x07zIWxbeyhFx/TtqCD+q +v8a6D7OwhdsibKHCEBRvKpd8/sJCLlN9r28uhlA7oHcscZKFtVelT3gZGIKZ +oB1snWbh5MFz6yYVDcH3/NHXIXMsbJCOPozLyP89ickS/snCqaxiCs9XA4j6 +leFV/YuFKfddln/uNoANancV3JZYCKe+8b1/bADZQdVz//6x0Kvwjfr4HQP4 +H6OhLME= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07311264990703728}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07311264990703728}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc8V+8XAHDRkEoZIeOzrLKSmQ8f55C9szIyyla0NNBAkZUIkUoSKvtz +izJK0bCTkVHhi7QQCanU7/7+uq/363XvfZ7nPOc556HvPWDrw8nBwUFZxsHx +/+f8YNMzqYQ83ZWR8k6PRHfodmeLhOr1RYHEs16KTQwdcOOrvSJ9lyB6w7tm +2ZhtcMymsJerLxeuVG7VWBujB3xTwpcWewloWtz7dDh6JwzVWh340VsP13R7 +POyj94CR1Jf3M72dwHU7rVr17CFY7NVMn+4dAatDpXy1YZHQsON23uvcWeha +FlTXsf4SiA9Vje9VWILkG3X64eFZILjfo3DVDi6s2v/L+qTCTbi0zajGyoEb +/71dccNtcz70Zyo/mdmwDnuCJtvHku5AQt6ZV5yb+DDkYv/+nr4iMFML4N8o +yYc/JG1sBseKgPuZrYOsIh9mVg0oDk8XwblR6bfmenxI1bNtb+cuhpOM1vG0 +AD70exPut2t7MQTniPyVqebDJ4qTmwQvF8POa2wFc1d+dHDXF1S0KAHhtNG4 +1OsCyLqa2HYktxRE5CvO/SwQQH7RpwJ/ikpBtD7mjFu5ALr0lr05VVEKlOkt +R2UbBDBLYbEtqLEUpC0OetZ8EkALW789/yZLQXX5ksaoqiD6zaeLf9IsA+sQ +oTGVZkG841Lu1fiiDM7bm+p2zm/E6tdTA8b+5SB6v12Uc5kQNv+tCk3cXw6l +AvYL29YIoVf2MkbbwXJ40+lenkIVwtqMIxf0Q8tBamcIY6eJEIoab3++FFcO +9ZY3VnZcEcLXZWL+FYXlsGQ0196mI4z2Yg4Wsp/LIbkgrGjJSBiHv+48OjFB +fr+SI1ZxpzBS/FWzS6bLweI5j94FH2HMmO6fkvxZDlk7aPcskoTx01hUzPBK +NmxH84yWIWGMS3oWeEWSDUe0bno0RYng7aMjqqtd2GCWw/vDPFEEr/suuyLk +xgbGqpOx7ekiSIu/dZrmyYaObkd21x0RnOjd17LFlw1KB9dyDbaL4OtZ6X38 +h9nwqeB4wXfRTfh2bftL7Tg27Ba0mhS7twnnn6s6frvPBtXwmsjs2k24qH99 +MPEBG3hGNgvRX2xC53txn2Wq2VBVxgUy/ZswkvP4eZs6NgiZVyUr/9uEtj3E +x9AmcvxIKTVDc1GcYna4Sb9ng8G3X2HBo6J48+Kl8OFlBISapMk9nRDFqFcW +1VzLCSi9qTggMC+K4VJJeZIrCRCx99Sq4hbDtrSSk848BEw8fL7ApSSGCo9a +9K/zE5AalRxy5YQY6u6T9IlmEND4dovURKQYZhjpnDoiRcAftYYu3QQxtCrd +b+guQ4DvxzmVseti+DPS5eMWOQKYFq4zSg1iuIVyIezKNgJGNsoEP1snjqHD +F+UGgADhA3USwsLiuHTHc3+qHgEWjU5tATRxbLLu9DLdQUBlWILCelVx7F4p +frTIiID4oekvzk7i6N4gomBiSYDK3Rq/b7ni6D9qbjjmTECkzs49otslcGO8 +MqPwIAEm7tnfNfUl0O7quIfwYQJ4I76edbCQQL7bzu0RRwi41hBdkOwpgeot +S2ByjICHZtVfV8ZJIPct9di74QRMO0kem+2XwOvG8lgZTcCDsIOr+MYk8NOV +jX3jMQScvvYoU2lKAnOd/YsEYglYO7yrJoCTgscLxVftjSdA1i+RY1iOglnZ +AwWvkwhwPzoX3xpOwdcPfRWWLhMgnaEv/iWago1xuzpnMv4f/4slq5Ip+Ec+ +pW4kk4CwP1s69PMoqKTOcaQqi4D0s+4bq1opWHZmwY6ZTcDu/KKCN28oaN1l +Y8Z3gwDGy5+aP4YpmF9olzRGupwn1WXrHAU9+K9xRtwkoDXl5Y18CSqO1Oy9 +F59H7u89wW0NslQslJBXMsgnwKVnT/3wNiomvjdaWiT9SeTPmJgRFVXaR666 +3CaAK0dZ7lIwFTONur5/u0tA89NTNWUnqDiQ5LA5sZCA5NFmi7YoKjq3ildJ +FRFAkfU5wJ1BxRdTq6bNisl8KL1y/3QdFQ8dD27dV0qAQW/70lQjFT2Xvbo4 +QtqKY7mxRycVCR9HRccyArxsg/vhAxWFcvoWVcsJCA6/xSifouKBb/Zy2aRP +5PXto/2kYhHPb80VbAKMwulnIlbQsCO8Y7KJdMv62lvbeWg4WXc+Q5YgwCbP +sXGal4ZGRSfoUaRd2xL49ojQUItO61e8R8BB6vwtPXkaHihxn/S4T8DcveTG +xa00dL1XWZpHOsxEfpKtRsNXFkmO46SjD3lqMHRpeJkxtduzggCelb9dBvRp +WGDI9yiTdHJW+plLxjQsbPy8sp10VkNzI+dOGgbqL7psrSSA6uQzWe1AQ2Ob +176upPMm/vEdcaGh4dccj3Ok5SKzNOQ9aFgZxzQqJF22Ud111It83+eQWBtp +tcJXZ67609A7bNPwBOlq3cA8uyAaVpxflb76AQHQtbxpzWEaJq3j05Yk/czv +xmTDMXJ8y7VdWqRN/2jxnwynoa1ph5sl6fbkbg21CBo6Nqi9cyNtL33AdeIc +DZez+K33ke6vWh2RF0euf17vwVHS7lZ5ebuTaHjh2/WNp0iPjeg2CabScGiU +Y18k6YDj/ZOtGeT6LY0eRpGeWhPCH32NholeZn8jSB/J4dVk3STjL/KFdZL0 +T7W7rnP5NOQW5ToRQvp0046IkkIa2nQeKQkgzeU+mOdTRsP/vMWGXEnHfj/R +JHGfhofK+teZk+Y9LzDV85CG600vMjVJp4qV8ic9omF6pIQvjbRIuYmmUT0N +N+zxTVlJ+rrBqOvfFzRk3rZ49JmMH6P/VERlCzn/5ntfmkjfCRLJD+6gofvi +GdHbpBU57zXJ9NBwaeNly0jSxGXLqcF+cvyqt+ecSG+X/8SfMUhD/W2aTxVI +69tL7F71iYbdTq0WreT+v/z0IKJugoYlMm+uZ5C2OGWbf3yGzE+uywsepHcV +nJ/6+IuMV+dQ40cyv94xGQI5/2hIOQz6t0nvfVWr6bScji/CORq9SO//ORPR +uI6O1tXOf7rI/GUe8hUa56fjlrMmjEjS3F8GirhE6Gho39MtRzr/bcMbXQYd +x49eGDtC5n+I/fb9u2XpuMpSwkCAtH5b8bIwBTp+1hRULyPPz+DjdIUKDTo+ +P83T8Y48b8WaPPWd2nS0enL0ZDDpsPLTu6aRjguD1Lo/5HkVyvWLkjenIyuS +f+160tbRWn03PeioE9QxzlNC1oO/JUF13nS8YJbgF0nWg4ljDK73AXT8990j +9gdZL2L91yiJhNDx1y/7sg6ynjwxf382KZaOQ/KpFZ53yHrPH7k1nE3Hkl73 +uuFcAjgS5p5lVtLx0Rrrfjrpdq5Al8oaOqaoVN72IOvdvjnb6JnndFwjRvF7 +TdbDvD6pt34DdFx3ajbtwjVyvjcaY+y5GPiy3q47IJ3MX2GW+GFuBsbIX+w6 +lkbubzKbfXEdA0e/H7oWkUquJyrrXbMwA4V105PjU8j5+uxX0VNg4Phb280n +LhCwKL9hUNGBgWd66CY15wiYvy4aqerCwPKM91+zzhLwY720lJYHA993Kyce +jyLPw6xWoEEAAw1Pf3wpG0H2xxqveZdTDPQNe2zjTfafZvMHvLH5DFxRc6LL +6hBZP/a5w8gcA3m30TfNuhCQ8d5/5OMvBna6nf0aQva/NOsj0ZP/GLgj7s+H +2V0EJKnGtvxcLYkNwS1On+0JiPrN3rWeIomzHlQ3woqMT8KKgzpGksgrGyP+ +mOy/OkXFOZcvS2K0+X8HX0gT8JZWdMPwqiSasFvb15P9Puzy3ewfNyTRJtXy +rSN5H3gQWXDN9q4kBsq1LR+kkPvjlJPJWyuJelrLazqECdiyIi055j9JzPMM +qjNZTcbbIzzimIIUOg0+SEn4woYZfjNPx3opvB/edTWngA19+xkdgS+l8O6M +q4pSHhuevPgFZ1qlUHlyILDqJhuSw4qod95I4ewjWmPjNTYoj6wdWvwihTKv +Mj1bLrEhmP3K7bqANAbnhh/cc5oNX6wdXMe8pTHlZLztOzs2jCV6Oh5eJYO3 +4tYu+pH3QdNvx00/aMjipdW8Snpa5TDhxX3k/pnNyH8+ZLSMvC8bSQlznq/f +gn4tZcT9imLgb5NJKv8mh2PLGs/PdBaCeGyZjYaGAqYbW2lEV92BTHmtDQJ+ +imiY84vVVFcAzaJ66rMpSnhx9+/E7115wBSvT976Ziumqo4rY3Mu8HLlhuyJ +UsbPR+Fa0I8coERSdZxltuHvzEBdY0o2rJbeXWn7cht2CpmUiGdngRJrU9lx +NxVcFfgrSvlSBhwe5G8w41DFZQkJARLRafBtNtHBNFMVm+3+XDzwJQWMt77I +MlVUw3cVdqGaWy/C41nt3wvtavi62Jp6Jz8eghVUBl77qGM31f02aygGWFPe +3c6rNdDw1/cNKnpnwVBKxHJdrgbemp/edN08AjZHxJ+o19RE5vuaPf1nw0HO +R6tOekATLaMD3WSfHgOfx/7n7h/ajpa6gccWZg5DXU6398xGLVxnqhPkPRgM +P+78W9j6QAvnty9mhQkGwLijUU5clRYuFPOUPecIgL7lF0xGa7TQL+v5asqk +P9R4il65/EQLmXPxx+ef+0OUiDpzqUkLB0v/HTY84Q8bYgNPNr/TQjjzd8xh +yA8U/Ho4fDiZGN678H3DA1/wki5anWXJRIus7pnjCd4Q9tw9UMaGicviFBpC +Q70h2Ye/hbBloozy3e1xft5Qmx+a2LKLiTdpxt86dniDoIzJ+qU9TFQsVyng +XPKCFzIfBD2PMXHWSVTi0yEvkNtMpcncYCJbNr4/ymcvzMilahDTTPxw2ipS +97An9LWiocAsE0Mddzr4envCk+Apu5A5JvqOqTplOnpCEmF6SOMXEwstdnaK +anuCHJOjuJpLG0N/np7KXO4Je02D6A1C2nj/T9aKzyoe0O1nvLZbRxutHRcm +/qa5wcO83//NxWrj9KrT4ropLqCxI2TBLEEbj41t+FoT5gIV/02szbmgjSFb +uKPNvF2AoAxqml3Sxmqhtpkrmi5QnPnkQvZVbRxRNkjiGHKGnMRoLeNSbUzb +3fx+VNkZ4kLWp2R2aePqXen8tcO7wMVAErUpOri21msyPtgBlrq5eRtoOnjg +R3K1k4sD5PhMvTWT1MGXl1cEaBo5wHhM1XGXzTpYrxrNlKU4wOEm67JQFR38 +nrHP91W7PcRbnaQ8NNJB/ba6u5qq9lDt1PNH7YAOVuwqtxfmtgOxoPNVSk90 +UOb5U83cIRtI+uernlCvgxnEBV7fDhvgvGTE/vhMB2dq3ZQ0ntrAl8oVd3Oa +dFDTyUv2d64NVHOcy+Tv0kFRpp+gsJ8NuKRFHJ//oINFZRKy1FFryKwJVX+8 +hoX2Lna3UilWsJFnP9tyFwsF1BIVLfvMIG/HqbBpZxbmq/eezKw1A5VTSTtS +d7PwdYDQqaUcM7CaLu/p28NCwY8puoKBZhDzZm7Raz8LPTulEg4vmcLP3DP6 +YZEsXF5hcXN4sykMaKd2FRSxsFL/0MqfKcbgfzTvmmkpC52u/n1oG2oM86UV +PhPlLLxo6pz/zNMY+Bl9C9sqWfies3VocqsxmHNLiD96wsIP3bda7V4ZQW13 +gXdXDwvT9QvU3fiNwIz3oeKxPhYu0vifMH4bQp9x07zIWxbeyhFx/TtqCD+q +v8a6D7OwhdsibKHCEBRvKpd8/sJCLlN9r28uhlA7oHcscZKFtVelT3gZGIKZ +oB1snWbh5MFz6yYVDcH3/NHXIXMsbJCOPozLyP89ickS/snCqaxiCs9XA4j6 +leFV/YuFKfddln/uNoANancV3JZYCKe+8b1/bADZQdVz//6x0Kvwjfr4HQP4 +H6OhLME= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07311264990703728}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07311264990703728}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356182696308*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"93cb79ea-bc46-4dba-9fd8-544ffa378e88"] +}, Open ]], Cell[CellGroupData[{ @@ -10555,66 +11856,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[448]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], + "In[121]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 448, 489, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347571140808*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.036848551133912`*^-150\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 45, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994356182754981*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], +In[121]:=",ExpressionUUID->"85627871-98b8-437a-8bb3-278f88c16dc4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 448, 490, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711508217`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.964494307363493`*^-152\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 46, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.9943561827651997`*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], +In[121]:=",ExpressionUUID->"c07e8873-fff0-48f7-823e-2a48f449459c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 448, 491, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711592274`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.724879695242693`*^-155\\\", \ +RowBox[{\\\"990359217009531794717859144615427415897\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0373833891840000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 47, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994356182773357*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], +In[121]:=",ExpressionUUID->"87d0b3cd-7ab6-425c-83d5-1abfbf80223e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 448, 492, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711683846`*^9}, +during this calculation.\"", 2, 121, 48, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994356182781242*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], +In[121]:=",ExpressionUUID->"6086666e-3a32-4c0a-9e07-a49923dd8d61"], -Cell[BoxData["10.362747935330763`"], "Output", - CellChangeTimes->{3.991347578228073*^9}, +Cell[BoxData["10.561988367968397`"], "Output", + CellChangeTimes->{3.991347578228073*^9, 3.9943562819335957`*^9}, CellLabel-> - "Out[448]=",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] + "Out[121]=",ExpressionUUID->"aa00ce2e-1290-4867-8deb-a36fb6dce322"] }, Open ]], Cell[CellGroupData[{ @@ -10681,68 +11989,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918503106317043`*^9, - 3.9918503148567924`*^9}},ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-\ -2a98ba29b602"], + CellChangeTimes->{{3.9918503106317043`*^9, 3.9918503148567924`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 493, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578265545*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.498948639362034`*^-212\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 49, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.99435628199196*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], +In[122]:=",ExpressionUUID->"6eef4a76-7cf9-4e28-ad32-d3e5c1eaa324"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 494, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578275551*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.149987753556857`*^-217\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 50, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356282003203*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], +In[122]:=",ExpressionUUID->"5d7fb4e2-f685-4332-8e8b-1ed915784b16"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 449, 495, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782835484`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.2054981381083754`*^-222\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 51, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356282013929*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], +In[122]:=",ExpressionUUID->"9ec7e372-07e5-4513-8740-2850c1a7cb8a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 449, 496, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782930756`*^9}, +during this calculation.\"", 2, 122, 52, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356282022031*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], +In[122]:=",ExpressionUUID->"cee95d48-76d5-471c-b14c-531026de05e6"], -Cell[BoxData["1.4359199941844076`"], "Output", - CellChangeTimes->{3.9913475858902473`*^9}, +Cell[BoxData["0.15029630945135886`"], "Output", + CellChangeTimes->{3.9913475858902473`*^9, 3.994356293532655*^9}, CellLabel-> - "Out[449]=",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] + "Out[122]=",ExpressionUUID->"34f1c336-2de5-4974-ad50-abcd5413dcd9"] }, Open ]], Cell[CellGroupData[{ @@ -10763,8 +12078,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10809,68 +12123,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850318596199*^9, - 3.991850321359722*^9}},ExpressionUUID->"edfdd675-c60b-304e-9e16-\ -68452b971319"], + CellChangeTimes->{{3.991850318596199*^9, 3.991850321359722*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 497, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859272156`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.498948639362034`*^-212\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 53, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356293583828*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], +In[123]:=",ExpressionUUID->"cdae4328-0c5b-4989-a321-ba17c370b1f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 498, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347585937319*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.149987753556857`*^-217\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 54, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356293593396*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], +In[123]:=",ExpressionUUID->"ce3eb0aa-93d0-43f8-9cbd-42e9bfe15d19"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 450, 499, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859463177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.2054981381083754`*^-222\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 55, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.9943562936039553`*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], +In[123]:=",ExpressionUUID->"9c93fb43-049a-4c0f-be1b-58eaff249fd7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 450, 500, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859543304`*^9}, +during this calculation.\"", 2, 123, 56, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356293614377*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], +In[123]:=",ExpressionUUID->"ce005a32-e697-4e97-ac66-5b0897062a55"], -Cell[BoxData["5.09241659576143`"], "Output", - CellChangeTimes->{3.9913475931276417`*^9}, +Cell[BoxData["29.538190919492514`"], "Output", + CellChangeTimes->{3.9913475931276417`*^9, 3.994356304524797*^9}, CellLabel-> - "Out[450]=",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] + "Out[123]=",ExpressionUUID->"84326ac8-0e91-4bfa-85dc-bf95c05400de"] }, Open ]], Cell[CellGroupData[{ @@ -10891,8 +12212,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10937,68 +12257,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850325611994*^9, - 3.991850328926569*^9}},ExpressionUUID->"d0469d46-2e74-494a-be85-\ -b41cb2f3fa92"], + CellChangeTimes->{{3.991850325611994*^9, 3.991850328926569*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 501, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134759316485*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.498948639362034`*^-212\\\", \ +RowBox[{\\\"111907153680443277505994197391386338500\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"21\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4097384446260731183104000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 57, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356304590487*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], +In[124]:=",ExpressionUUID->"cfcb48b8-d556-4b03-8c92-f7853f90dba5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 502, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593173849*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.149987753556857`*^-217\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 58, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356304606351*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], +In[124]:=",ExpressionUUID->"5e510271-2ad4-4ae9-8900-3e91bf7d3257"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 451, 503, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593182852*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.2054981381083754`*^-222\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 59, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356304619129*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], +In[124]:=",ExpressionUUID->"4592d25d-9e28-4091-8235-b5405e162679"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 451, 504, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475931908703`*^9}, +during this calculation.\"", 2, 124, 60, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356304631857*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], +In[124]:=",ExpressionUUID->"ab376bf0-ef51-4c21-b885-80233cb347f8"], -Cell[BoxData["16.684462799943017`"], "Output", - CellChangeTimes->{3.9913475973006153`*^9}, +Cell[BoxData["3.6389956265546406`"], "Output", + CellChangeTimes->{3.9913475973006153`*^9, 3.994356313610054*^9}, CellLabel-> - "Out[451]=",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] + "Out[124]=",ExpressionUUID->"f195ac8d-ad7d-435a-9840-10c52753f81d"] }, Open ]], Cell[CellGroupData[{ @@ -11007,22 +12334,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.99185033265069*^9, - 3.9918503366548977`*^9}},ExpressionUUID->"58b5e243-0972-1946-bd17-\ -aca0f3e8a35b"], - -Cell[BoxData["0.15578016747845222`"], "Output", - CellChangeTimes->{3.991347597341627*^9}, + CellChangeTimes->{{3.99185033265069*^9, 3.9918503366548977`*^9}}, CellLabel-> - "Out[452]=",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] + "In[125]:=",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], + +Cell[BoxData["0.01449658155428531`"], "Output", + CellChangeTimes->{3.991347597341627*^9, 3.994356313660866*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"adb5aedc-71f2-482b-af9f-d66e3ebc12ef"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918503408077297`*^9, 3.99185034363356*^9}, - 3.991924645514969*^9},ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-\ -a3711ba632a4"], + 3.991924645514969*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ @@ -11045,12 +12373,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[454]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], + "In[127]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.991347597372614*^9}, +Cell[BoxData["10.854315181909834`"], "Output", + CellChangeTimes->{3.991347597372614*^9, 3.994356313688669*^9}, CellLabel-> - "Out[454]=",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] + "Out[127]=",ExpressionUUID->"8d4baa6d-289b-4525-bf5e-8315f71adc41"] }, Open ]], Cell[CellGroupData[{ @@ -11060,12 +12388,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[456]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], + "In[128]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.991347597428034*^9}, +Cell[BoxData["1.898190866492042`"], "Output", + CellChangeTimes->{3.991347597428034*^9, 3.9943563137011147`*^9}, CellLabel-> - "Out[456]=",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] + "Out[128]=",ExpressionUUID->"07d65408-33a3-4fda-90b6-8ad05d8a0d2a"] }, Open ]], Cell[CellGroupData[{ @@ -11075,12 +12403,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[459]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], + "In[129]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.9913475974971066`*^9}, +Cell[BoxData["20.603561940327154`"], "Output", + CellChangeTimes->{3.9913475974971066`*^9, 3.994356313716515*^9}, CellLabel-> - "Out[459]=",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] + "Out[129]=",ExpressionUUID->"1e26b1e7-a35f-4f83-a4d8-eb8eba55e593"] }, Open ]], Cell[CellGroupData[{ @@ -11270,12 +12598,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[460]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], + "In[130]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[BoxData["0.038908834568544604`"], "Output", - CellChangeTimes->{3.991347597528105*^9}, +Cell[BoxData["0.007036342381817823`"], "Output", + CellChangeTimes->{3.991347597528105*^9, 3.994356313737629*^9}, CellLabel-> - "Out[460]=",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] + "Out[130]=",ExpressionUUID->"81e809fd-94f3-4125-bdc6-2c3e95c4d789"] }, Open ]], Cell[CellGroupData[{ @@ -11289,12 +12617,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[461]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], + "In[131]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[BoxData["4.492838724335521`"], "Output", - CellChangeTimes->{3.9913475976441536`*^9}, +Cell[BoxData["10.56504761896449`"], "Output", + CellChangeTimes->{3.9913475976441536`*^9, 3.9943563139406767`*^9}, CellLabel-> - "Out[461]=",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] + "Out[131]=",ExpressionUUID->"57269de4-0eb0-4ec4-967e-35580d78acd4"] }, Open ]], Cell[CellGroupData[{ @@ -11486,12 +12814,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[462]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], + "In[132]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[BoxData["0.012544276227890849`"], "Output", - CellChangeTimes->{3.991347597671173*^9}, +Cell[BoxData["0.04665393363439794`"], "Output", + CellChangeTimes->{3.991347597671173*^9, 3.994356313962399*^9}, CellLabel-> - "Out[462]=",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] + "Out[132]=",ExpressionUUID->"78669dd1-f9ab-4449-8953-31adb9cd2de5"] }, Open ]], Cell[CellGroupData[{ @@ -11505,12 +12833,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[463]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], + "In[133]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[BoxData["7.912653285153153`"], "Output", - CellChangeTimes->{3.9913475977705975`*^9}, +Cell[BoxData["4.102993293184956`"], "Output", + CellChangeTimes->{3.9913475977705975`*^9, 3.994356314164177*^9}, CellLabel-> - "Out[463]=",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] + "Out[133]=",ExpressionUUID->"16708326-3e75-41f1-8dd3-c726ce9953c9"] }, Open ]], Cell[CellGroupData[{ @@ -11603,12 +12931,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[464]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], + "In[134]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913475977856007`*^9}, +Cell[BoxData["0.07637363207411572`"], "Output", + CellChangeTimes->{3.9913475977856007`*^9, 3.994356314181587*^9}, CellLabel-> - "Out[464]=",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] + "Out[134]=",ExpressionUUID->"eddf6a1d-1161-4065-afc6-38689a83b81a"] }, Open ]], Cell[CellGroupData[{ @@ -11698,12 +13026,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[465]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], + "In[135]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991347597813669*^9}, +Cell[BoxData["0.9236263679258842`"], "Output", + CellChangeTimes->{3.991347597813669*^9, 3.994356314200246*^9}, CellLabel-> - "Out[465]=",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] + "Out[135]=",ExpressionUUID->"1ab3e72b-bd1b-40c4-9071-09c7b2f73ad9"] }, Open ]], Cell[CellGroupData[{ @@ -11826,12 +13154,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[466]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], + "In[136]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913475978426323`*^9}, +Cell[BoxData["0.07054070039792333`"], "Output", + CellChangeTimes->{3.9913475978426323`*^9, 3.994356314221404*^9}, CellLabel-> - "Out[466]=",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] + "Out[136]=",ExpressionUUID->"d3115658-6f2c-4a97-ae7f-6bb30abf1118"] }, Open ]], Cell[CellGroupData[{ @@ -11893,68 +13221,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503626529236`*^9},ExpressionUUID->"ba508068-6b78-254c-87d6-\ -cf1adc0753dd"], + CellChangeTimes->{3.9918503626529236`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 505, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597872814*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.416984361162205`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 61, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356314244132*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], +In[137]:=",ExpressionUUID->"9f10a8b3-533a-4adf-8df8-b1c39761b32d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 506, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475978828144`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.300980158345176`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 62, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356314254881*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], +In[137]:=",ExpressionUUID->"f813fb7c-1030-4fbc-b24e-78da68af15c2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 507, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597891815*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.073810807554476`*^-220\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 63, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356314263954*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], +In[137]:=",ExpressionUUID->"79af0e46-d857-4cf7-af40-73ef151ec5d7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 467, 508, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597900812*^9}, +during this calculation.\"", 2, 137, 64, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356314272608*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], +In[137]:=",ExpressionUUID->"f8ea11e4-7a66-4dec-b78e-595d9ce7c0e2"], -Cell[BoxData["4.492838724335523`"], "Output", - CellChangeTimes->{3.9913476018505497`*^9}, +Cell[BoxData["10.5650476189645`"], "Output", + CellChangeTimes->{3.9913476018505497`*^9, 3.994356322390367*^9}, CellLabel-> - "Out[467]=",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] + "Out[137]=",ExpressionUUID->"a08d4dd0-607d-4229-9c88-bf48d2472f1b"] }, Open ]], Cell[CellGroupData[{ @@ -12016,68 +13351,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503657638073`*^9},ExpressionUUID->"842e33e4-ae06-f746-ab8b-\ -97489285cc9c"], + CellChangeTimes->{3.9918503657638073`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 509, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476018885117`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.416984361162205`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 65, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994356322452249*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], +In[138]:=",ExpressionUUID->"1bef0180-10bc-4967-bb63-729e9df650ef"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 510, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134760189851*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.300980158345176`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 66, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994356322461761*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], +In[138]:=",ExpressionUUID->"16e1a512-1c70-4ac5-b1f2-a215d6390db0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 511, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019065113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.073810807554476`*^-220\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 67, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994356322472213*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], +In[138]:=",ExpressionUUID->"e63b2836-87e9-40ce-9a09-5cb32ced3ac3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 468, 512, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019158936`*^9}, +during this calculation.\"", 2, 138, 68, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994356322482258*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], +In[138]:=",ExpressionUUID->"77ea60b7-e2f2-42f0-8ecb-fa742f518ca1"], -Cell[BoxData["7.912653285153152`"], "Output", - CellChangeTimes->{3.9913476058912296`*^9}, +Cell[BoxData["4.102993293184958`"], "Output", + CellChangeTimes->{3.9913476058912296`*^9, 3.994356330484394*^9}, CellLabel-> - "Out[468]=",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] + "Out[138]=",ExpressionUUID->"8ba7320f-d2b3-45f0-945a-4420a4353a87"] }, Open ]], Cell[CellGroupData[{ @@ -12135,93 +13477,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850369070572*^9},ExpressionUUID->"b2e314f8-a6f0-6942-a94c-\ -5ac1cacd7190"], + CellChangeTimes->{3.991850369070572*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk8VN8bB/CxZi0Skq8lS4VkGUSp8xRStoTKUmLMXEt20pQtodUeRb9E +iyVZo8WSNpWv5hulRSo7MzF2F2nxO/64r/t6v869n/uc555z1tKCHBi8FAqF +g6+le8jbTesftr3dLho5wDPozUbbx24b0sxLkYqOpO6Se/KMMtXMG1Dhusy6 +JdvT/xMUo75EJV4BN4awq5ixLwTMWcjxx7UBNvb5V6ufxpa8Q/wNKgk/sGvb +Qq7/1v+IHvf+jR3BHu5siTpR34GCPPU6RrHXDKq6zZp9Q6lmdUkT2NbjUSZh +rG5Uk56TO43d+HtYlFnSizoPtIrMYX+Kk418ENiPDPPcPixgjwmaD8/oDyJb +5vaFv9iCScEu1LkhNDRxPIrPh40UJXObQ+o5aJOckJsQtp38bOGYGRf5P9mo +LYVN5KvIaAuNoUmvZ8py2LHqexOPssYRXaAsWAm7Q/aDXnjJJLK/el5dG5vu +6ud7KWkKFTaevGCAPXGNcuNe4DSq2fHC2hRbSEVbYlKfRO3trv022Jn0F5YS +0rNISbGkdj+2cpFLrM7cLPLdto/rjm288cxYQP086ogtIkKxfYy6WcNmv9GB +X8crcrFnmMf4Rdb9Qf+xzvvcwT5VL2qqIfQXvc+dib6PnQ3Gd71Zi2hy5OPj +t0v1FTSbh5bwQC9ipQv4slHJq0s9cfK8cE70rvYq7Am2e1R6Ei+A44C6KnaU +JlldGcgHPtreWjuxMyvWqo7rC0CHfs2FBOzONm7j31sCMPbLX/gytvLUQ9fl +0oJwYcXpgSLsUgO7DO05Qfgs/byChd1Ue5LHv14IlPvzr67xYyPyRXs3x0wM +/Npkn7/GXmkjJhHZKAYRk+RiD7buB3MQNxEHj4dEyQK238D9fL1Ny8Ggh8dC +5ygbBfOydLeJSYADSzM9F3tQpXwycVYSvBfLElP8cX+IFuFW6kpYGcVNKsfm +vTu0dnXISuhe+5LSiq1MVXIoGVkJ+YKWmyQD2MjVLO3e2x4p2OdzLf8qdqtX +aJjsG2k41yHW/yyQjbqKUi56CMnADI9eDQebO1Jy646FDJzImp9cEcRGIuH9 +7VufysCZs+HVR7DNE5wMPO7LQnarnh1/MBvV3TYii/Pk4JKjS79nCBvdHlyI +2BKuAG1lwemB4Wy0e//ZrrAyBegEgag8bG6T1K6yIQVI4zBetmEb3N4oreyi +CKEmKeEGx3A/ae7VAtuV4GBMijklgo2mxnuOc+KVobF47O6d42wkFWBeU22r +AsqLx3PNItlo6LaIj72fCrAS/tBOYT/61iY/ekYFynK9zz7GPmRzOH7dUxU4 +yOVyjaNwfVoRDjn6qrCabNc0iMbfHy6aiJFVgy7m51DTWDZy8hbVtupVh51P +JLdkxrMRitivf/CPOoj2UYO/Ymsm5m2my62DJ0pFPKoJbES5Rd0Zs28deJYl +GFVjl3W5Hbz3bB1YZRlxPifi/XmgNG7NzfWwsM3WX/8crs/c9tMwTQNsv2z5 +q5XMRrccr3ydi9GAF6JEfgx2Cq23h/9/GqDhw3v9HTb91LERxXYN8BzKuMtM +YSPJhlyKo5kmGK3Xk3iTitcPdUyzXlULfsUdpMRlsJG8SmrsxYGNIGOzLkEv +m40aLsxo/OTVhmidP5euYB+advlArNWG+h3ZK/5iX29S09jprg0ZomutWDls +pOJd937+szaYaRazAv6H51s6qE682QQ6FzhCL6+zkYK8IqHsogvbWE6+TQVs +tLEgXOwX0gf0iLJ+2X02otHjSW07fYi6eT4zFjtbNaPL45A+fKy08ZjH5rtZ +UfmKqQ/E+rMrRx7g/XZ92CmjSh+ebJjr/fAIn6fZHrkaqlSwjpHaVNeA/+9F +m03OggYgaD+U+KaJjW6EqtnfZxkCci+4KPyJjdoi0OaEAhOQt3s1GkXhoLXu +H+0O+2+D7b4Z1BldDmIsPihXOAFA3yd0cwedg2RHHi2Tpe2E1FL6z7SbHBRO +Nf2WoWkONe+9PIT7OYg2+rtZatgC+lxP/qu54Qcq2xm2LK/VEj7psNZ8PPED +3Z7xe1aauQcoop8GrFg/0PyO1f81xVrDXONyvlMbh9F3Ct9kr6ctVIpQBj6m +D6PAf4LS4lT3gib7j+Kx2WFU7tv8NCvRHnK+6R028BtBJ6fl5rR894Gad8mr +w99GEGm168DrIw4w9yDh9XV3LjJxS98xuM8RDEJUymcHuOi9XK5fE9UJIl7t +bun2HkVrCuMbijfsh+ECGYlbv0bRox5NGzvxA9AnMa/WfGEMKX6Y8I4YPQAV +POmcQvlxRM1KL73VcxB+FWg0HH88jnL5pzdlvHCGZ47BDN2NE+jBDp3OxFoX +iH/nNDsbN4GyN1+Q/F3iCv/Z71ks+zyBWr8WnKEmucFwe491/oZJdN/2mlrw +qUNAHbgxLBU3iSYDHCmB9MNQvqVD5Uv7JCJ3afiMmbnDaW2d041qU6h49Mt8 +mNERoE3VHq2LnELONwq8Dot5QGH+yfHcN1Oo+p71Eb6zHnBxrz7FWHkamci/ +/3n+pweo94pubPSfRqo93p3vfD1B+dfWn90102hA9Ojea/2ekBryRWnr4jRq +S7HzstxPg6qxnKQjMIMymXmix9po0MWJUyuOm0ENjYs/vfZ4gdu9VQ9r62fQ +ikNwllrnBVkSUSdmR2aQ8qrXrf80eMF+r20H6rgzSJdlu1qw0QtO9Wo1Ro/O +IAdTtzsdz7xAZzOPDt84zv8n4k30v15QPVmYJjQ1g9Z8v7uiucMLdGHQ4M/c +DFJzl80+NOcFkflC4sl8JDLxGCtONKDDwv2DV5AciQpzJsLsjOhQWllq2Im9 +qn1qu6wxHdKUeonwNSQas5j7ULyVDsdN4uOK5El8flF4WDvp4MQeyRRSJNHy +OUmXlfvocMEkVvGBCokGkg2F8wLocJd5TLJRi0Qp9VG+jwrpkNlxzyHKlEQB ++ldMmMV0EI8eCZrHtrlTJWxcQgdv6l3F8G0kErkydOdhGR0EdwXr+m0nUWKo +/fCDGjpMlbBV9gGJojTUjt5/TofvzRH6IuYk8rvyxv9eFx08FjsjNliTaM/y +IdPQHjp4mhbkXcbekEgR1++jw/OXOQf5bUg0FGpYVjVIB2ZGXXgXtqdd3mgl +lw5ZJVzPZDsSOQuEBVYs0MFxf8f8x30ksgxbE1wqw4AXv5NvSjqT6HneGauM +1QwIzteuPIFtyppSY65hQNCyeKNebF31N1/MFBkweXqxtNyFRHKfI82+qjPA +8pAsMnMj0ciW7zIihgwoWPFpyMGdRKm8+Y+9HRnA7TrwXJSO568jlm27Hz9f +9PMZDTvBjRlKPciAVFcB41psZo39+kVXBthlrTpLZ+D6CZ70yzQG9CSZVdQQ +JKK20OgvQxgQbvlcbqsviT6nq4uqpjHAelvWSHcAicqRuA8nnQFvS2xI5UCc +PzrTVHaJAW30tERPbP09TTHGVxggTEk36cVOoXhN2V5nQLvYnrHOIBLtCsr/ +wixlwNMvPnEPQ0ikoHDOaHs5A37Xj41NYM+0BF3iq2TAE1W3Po1QEt1ch2xT +qhlg9vWp61XsP9+/P71Vx4ANzffTjoWRqMZGvvhtMwPWfd8sLH2MRBcXeAUy +WxhQ+G9z2y5sWvGwpwuLAXpD5QpMbAn+OvmBVtwvTRfLL9j+9c6pPz8xALWg +L1kRJFLVvByhNsiAnVd9JuaOk2jhc3T7jyEGxA+cF1ZhkqgtkaFbwcH/syq+ +yBo7ptdg2ISL5xM3EJKL3ZndfnjvNAMIlIO2niBRxjJJi5M8BPjyCtYeOUmi +hqnvbuF8BHCoh1edwWZ/LwkNFCDg+mTdx7vYpjXm+TRhPC7sd4HEHvJg/rKS +JIBx9XFdXCSu38ZipYUUAcZGQRa3sLduXqmBpAlIzxs2bMJOEy89QJUjoJij +sps/Co/XdVfJryVAqfubbjQ2UVDaLK1KQF+S0o8c7LS0E90r1Am4c3xO8AH2 +ECElzq9BwHqtvWHcpXEpSx+uLgHWe/6KO0STqO6vVOyQPgE9xlZTvtiDP3qy +egwIiBJe3BqHveXpyRcfjAkIT0tdLMMe8C9XfAwEuJn+u4sSg/e7c6Thw50E +XHPq2C+FbWK226bKnICrWhtb1LFT5PpOFOwmoCUio2839iP+irQ8KwK4Abln +XLD7xyOLcmwIqNboSvXFNn4l/THZnoA/R6bfncWmVfWNnHXA32c8E7mMnXyt +gve0EwH+Fo+Kb2H3he7RjXAmgF9GetVjbHF3GctgVwIaco71Ni/l7ek/7HeI +ACPFGakPS+8rRV909yBAoX5HMWepHhGrm840An4FiolMLeWRMrUOdALOuXLb +FpbyevtbbQjc7+vdv3ljcR6rcmiXDwE6kQPJIti0h9F/wI+ALU4/4yWxk29a +rdrqTwCr9J9uWexHybJahoEEpGrY5ilg9zEHdugEE6Cfdr5JBVuMXuWsEUpA +wus2u/XYm/fGBKmGE+Dxee12raX8LdZnFCIIeMyJzNiEnaS+OleWiftt0WWt +h/1AYrBa8iQByi67/ajYvb+qWkSjCIisqB01WMpnx/QKxBAwTup9MsQ2em89 +vxiL18tCpaoR9v8B8+QAMQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12235,105 +13578,106 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Hk8VN8bB/CxZi0Skq8lS4VkGUSp8xRStoTKUmLMXEt20pQtodUeRb9E +iyVZo8WSNpWv5hulRSo7MzF2F2nxO/64r/t6v869n/uc555z1tKCHBi8FAqF +g6+le8jbTesftr3dLho5wDPozUbbx24b0sxLkYqOpO6Se/KMMtXMG1Dhusy6 +JdvT/xMUo75EJV4BN4awq5ixLwTMWcjxx7UBNvb5V6ufxpa8Q/wNKgk/sGvb +Qq7/1v+IHvf+jR3BHu5siTpR34GCPPU6RrHXDKq6zZp9Q6lmdUkT2NbjUSZh +rG5Uk56TO43d+HtYlFnSizoPtIrMYX+Kk418ENiPDPPcPixgjwmaD8/oDyJb +5vaFv9iCScEu1LkhNDRxPIrPh40UJXObQ+o5aJOckJsQtp38bOGYGRf5P9mo +LYVN5KvIaAuNoUmvZ8py2LHqexOPssYRXaAsWAm7Q/aDXnjJJLK/el5dG5vu +6ud7KWkKFTaevGCAPXGNcuNe4DSq2fHC2hRbSEVbYlKfRO3trv022Jn0F5YS +0rNISbGkdj+2cpFLrM7cLPLdto/rjm288cxYQP086ogtIkKxfYy6WcNmv9GB +X8crcrFnmMf4Rdb9Qf+xzvvcwT5VL2qqIfQXvc+dib6PnQ3Gd71Zi2hy5OPj +t0v1FTSbh5bwQC9ipQv4slHJq0s9cfK8cE70rvYq7Am2e1R6Ei+A44C6KnaU +JlldGcgHPtreWjuxMyvWqo7rC0CHfs2FBOzONm7j31sCMPbLX/gytvLUQ9fl +0oJwYcXpgSLsUgO7DO05Qfgs/byChd1Ue5LHv14IlPvzr67xYyPyRXs3x0wM +/Npkn7/GXmkjJhHZKAYRk+RiD7buB3MQNxEHj4dEyQK238D9fL1Ny8Ggh8dC +5ygbBfOydLeJSYADSzM9F3tQpXwycVYSvBfLElP8cX+IFuFW6kpYGcVNKsfm +vTu0dnXISuhe+5LSiq1MVXIoGVkJ+YKWmyQD2MjVLO3e2x4p2OdzLf8qdqtX +aJjsG2k41yHW/yyQjbqKUi56CMnADI9eDQebO1Jy646FDJzImp9cEcRGIuH9 +7VufysCZs+HVR7DNE5wMPO7LQnarnh1/MBvV3TYii/Pk4JKjS79nCBvdHlyI +2BKuAG1lwemB4Wy0e//ZrrAyBegEgag8bG6T1K6yIQVI4zBetmEb3N4oreyi +CKEmKeEGx3A/ae7VAtuV4GBMijklgo2mxnuOc+KVobF47O6d42wkFWBeU22r +AsqLx3PNItlo6LaIj72fCrAS/tBOYT/61iY/ekYFynK9zz7GPmRzOH7dUxU4 +yOVyjaNwfVoRDjn6qrCabNc0iMbfHy6aiJFVgy7m51DTWDZy8hbVtupVh51P +JLdkxrMRitivf/CPOoj2UYO/Ymsm5m2my62DJ0pFPKoJbES5Rd0Zs28deJYl +GFVjl3W5Hbz3bB1YZRlxPifi/XmgNG7NzfWwsM3WX/8crs/c9tMwTQNsv2z5 +q5XMRrccr3ydi9GAF6JEfgx2Cq23h/9/GqDhw3v9HTb91LERxXYN8BzKuMtM +YSPJhlyKo5kmGK3Xk3iTitcPdUyzXlULfsUdpMRlsJG8SmrsxYGNIGOzLkEv +m40aLsxo/OTVhmidP5euYB+advlArNWG+h3ZK/5iX29S09jprg0ZomutWDls +pOJd937+szaYaRazAv6H51s6qE682QQ6FzhCL6+zkYK8IqHsogvbWE6+TQVs +tLEgXOwX0gf0iLJ+2X02otHjSW07fYi6eT4zFjtbNaPL45A+fKy08ZjH5rtZ +UfmKqQ/E+rMrRx7g/XZ92CmjSh+ebJjr/fAIn6fZHrkaqlSwjpHaVNeA/+9F +m03OggYgaD+U+KaJjW6EqtnfZxkCci+4KPyJjdoi0OaEAhOQt3s1GkXhoLXu +H+0O+2+D7b4Z1BldDmIsPihXOAFA3yd0cwedg2RHHi2Tpe2E1FL6z7SbHBRO +Nf2WoWkONe+9PIT7OYg2+rtZatgC+lxP/qu54Qcq2xm2LK/VEj7psNZ8PPED +3Z7xe1aauQcoop8GrFg/0PyO1f81xVrDXONyvlMbh9F3Ct9kr6ctVIpQBj6m +D6PAf4LS4lT3gib7j+Kx2WFU7tv8NCvRHnK+6R028BtBJ6fl5rR894Gad8mr +w99GEGm168DrIw4w9yDh9XV3LjJxS98xuM8RDEJUymcHuOi9XK5fE9UJIl7t +bun2HkVrCuMbijfsh+ECGYlbv0bRox5NGzvxA9AnMa/WfGEMKX6Y8I4YPQAV +POmcQvlxRM1KL73VcxB+FWg0HH88jnL5pzdlvHCGZ47BDN2NE+jBDp3OxFoX +iH/nNDsbN4GyN1+Q/F3iCv/Z71ks+zyBWr8WnKEmucFwe491/oZJdN/2mlrw +qUNAHbgxLBU3iSYDHCmB9MNQvqVD5Uv7JCJ3afiMmbnDaW2d041qU6h49Mt8 +mNERoE3VHq2LnELONwq8Dot5QGH+yfHcN1Oo+p71Eb6zHnBxrz7FWHkamci/ +/3n+pweo94pubPSfRqo93p3vfD1B+dfWn90102hA9Ojea/2ekBryRWnr4jRq +S7HzstxPg6qxnKQjMIMymXmix9po0MWJUyuOm0ENjYs/vfZ4gdu9VQ9r62fQ +ikNwllrnBVkSUSdmR2aQ8qrXrf80eMF+r20H6rgzSJdlu1qw0QtO9Wo1Ro/O +IAdTtzsdz7xAZzOPDt84zv8n4k30v15QPVmYJjQ1g9Z8v7uiucMLdGHQ4M/c +DFJzl80+NOcFkflC4sl8JDLxGCtONKDDwv2DV5AciQpzJsLsjOhQWllq2Im9 +qn1qu6wxHdKUeonwNSQas5j7ULyVDsdN4uOK5El8flF4WDvp4MQeyRRSJNHy +OUmXlfvocMEkVvGBCokGkg2F8wLocJd5TLJRi0Qp9VG+jwrpkNlxzyHKlEQB ++ldMmMV0EI8eCZrHtrlTJWxcQgdv6l3F8G0kErkydOdhGR0EdwXr+m0nUWKo +/fCDGjpMlbBV9gGJojTUjt5/TofvzRH6IuYk8rvyxv9eFx08FjsjNliTaM/y +IdPQHjp4mhbkXcbekEgR1++jw/OXOQf5bUg0FGpYVjVIB2ZGXXgXtqdd3mgl +lw5ZJVzPZDsSOQuEBVYs0MFxf8f8x30ksgxbE1wqw4AXv5NvSjqT6HneGauM +1QwIzteuPIFtyppSY65hQNCyeKNebF31N1/MFBkweXqxtNyFRHKfI82+qjPA +8pAsMnMj0ciW7zIihgwoWPFpyMGdRKm8+Y+9HRnA7TrwXJSO568jlm27Hz9f +9PMZDTvBjRlKPciAVFcB41psZo39+kVXBthlrTpLZ+D6CZ70yzQG9CSZVdQQ +JKK20OgvQxgQbvlcbqsviT6nq4uqpjHAelvWSHcAicqRuA8nnQFvS2xI5UCc +PzrTVHaJAW30tERPbP09TTHGVxggTEk36cVOoXhN2V5nQLvYnrHOIBLtCsr/ +wixlwNMvPnEPQ0ikoHDOaHs5A37Xj41NYM+0BF3iq2TAE1W3Po1QEt1ch2xT +qhlg9vWp61XsP9+/P71Vx4ANzffTjoWRqMZGvvhtMwPWfd8sLH2MRBcXeAUy +WxhQ+G9z2y5sWvGwpwuLAXpD5QpMbAn+OvmBVtwvTRfLL9j+9c6pPz8xALWg +L1kRJFLVvByhNsiAnVd9JuaOk2jhc3T7jyEGxA+cF1ZhkqgtkaFbwcH/syq+ +yBo7ptdg2ISL5xM3EJKL3ZndfnjvNAMIlIO2niBRxjJJi5M8BPjyCtYeOUmi +hqnvbuF8BHCoh1edwWZ/LwkNFCDg+mTdx7vYpjXm+TRhPC7sd4HEHvJg/rKS +JIBx9XFdXCSu38ZipYUUAcZGQRa3sLduXqmBpAlIzxs2bMJOEy89QJUjoJij +sps/Co/XdVfJryVAqfubbjQ2UVDaLK1KQF+S0o8c7LS0E90r1Am4c3xO8AH2 +ECElzq9BwHqtvWHcpXEpSx+uLgHWe/6KO0STqO6vVOyQPgE9xlZTvtiDP3qy +egwIiBJe3BqHveXpyRcfjAkIT0tdLMMe8C9XfAwEuJn+u4sSg/e7c6Thw50E +XHPq2C+FbWK226bKnICrWhtb1LFT5PpOFOwmoCUio2839iP+irQ8KwK4Abln +XLD7xyOLcmwIqNboSvXFNn4l/THZnoA/R6bfncWmVfWNnHXA32c8E7mMnXyt +gve0EwH+Fo+Kb2H3he7RjXAmgF9GetVjbHF3GctgVwIaco71Ni/l7ek/7HeI +ACPFGakPS+8rRV909yBAoX5HMWepHhGrm840An4FiolMLeWRMrUOdALOuXLb +FpbyevtbbQjc7+vdv3ljcR6rcmiXDwE6kQPJIti0h9F/wI+ALU4/4yWxk29a +rdrqTwCr9J9uWexHybJahoEEpGrY5ilg9zEHdugEE6Cfdr5JBVuMXuWsEUpA +wus2u/XYm/fGBKmGE+Dxee12raX8LdZnFCIIeMyJzNiEnaS+OleWiftt0WWt +h/1AYrBa8iQByi67/ajYvb+qWkSjCIisqB01WMpnx/QKxBAwTup9MsQ2em89 +vxiL18tCpaoR9v8B8+QAMQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.7314324414217891, + 1.3435574907486445`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.7314324414217908}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12345,21 +13689,21 @@ wTw= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.7314324414217891, + 1.3435574907486445`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.7314324414217908}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12373,103 +13717,104 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Hk8VN8bB/CxZi0Skq8lS4VkGUSp8xRStoTKUmLMXEt20pQtodUeRb9E +iyVZo8WSNpWv5hulRSo7MzF2F2nxO/64r/t6v869n/uc555z1tKCHBi8FAqF +g6+le8jbTesftr3dLho5wDPozUbbx24b0sxLkYqOpO6Se/KMMtXMG1Dhusy6 +JdvT/xMUo75EJV4BN4awq5ixLwTMWcjxx7UBNvb5V6ufxpa8Q/wNKgk/sGvb +Qq7/1v+IHvf+jR3BHu5siTpR34GCPPU6RrHXDKq6zZp9Q6lmdUkT2NbjUSZh +rG5Uk56TO43d+HtYlFnSizoPtIrMYX+Kk418ENiPDPPcPixgjwmaD8/oDyJb +5vaFv9iCScEu1LkhNDRxPIrPh40UJXObQ+o5aJOckJsQtp38bOGYGRf5P9mo +LYVN5KvIaAuNoUmvZ8py2LHqexOPssYRXaAsWAm7Q/aDXnjJJLK/el5dG5vu +6ud7KWkKFTaevGCAPXGNcuNe4DSq2fHC2hRbSEVbYlKfRO3trv022Jn0F5YS +0rNISbGkdj+2cpFLrM7cLPLdto/rjm288cxYQP086ogtIkKxfYy6WcNmv9GB +X8crcrFnmMf4Rdb9Qf+xzvvcwT5VL2qqIfQXvc+dib6PnQ3Gd71Zi2hy5OPj +t0v1FTSbh5bwQC9ipQv4slHJq0s9cfK8cE70rvYq7Am2e1R6Ei+A44C6KnaU +JlldGcgHPtreWjuxMyvWqo7rC0CHfs2FBOzONm7j31sCMPbLX/gytvLUQ9fl +0oJwYcXpgSLsUgO7DO05Qfgs/byChd1Ue5LHv14IlPvzr67xYyPyRXs3x0wM +/Npkn7/GXmkjJhHZKAYRk+RiD7buB3MQNxEHj4dEyQK238D9fL1Ny8Ggh8dC +5ygbBfOydLeJSYADSzM9F3tQpXwycVYSvBfLElP8cX+IFuFW6kpYGcVNKsfm +vTu0dnXISuhe+5LSiq1MVXIoGVkJ+YKWmyQD2MjVLO3e2x4p2OdzLf8qdqtX +aJjsG2k41yHW/yyQjbqKUi56CMnADI9eDQebO1Jy646FDJzImp9cEcRGIuH9 +7VufysCZs+HVR7DNE5wMPO7LQnarnh1/MBvV3TYii/Pk4JKjS79nCBvdHlyI +2BKuAG1lwemB4Wy0e//ZrrAyBegEgag8bG6T1K6yIQVI4zBetmEb3N4oreyi +CKEmKeEGx3A/ae7VAtuV4GBMijklgo2mxnuOc+KVobF47O6d42wkFWBeU22r +AsqLx3PNItlo6LaIj72fCrAS/tBOYT/61iY/ekYFynK9zz7GPmRzOH7dUxU4 +yOVyjaNwfVoRDjn6qrCabNc0iMbfHy6aiJFVgy7m51DTWDZy8hbVtupVh51P +JLdkxrMRitivf/CPOoj2UYO/Ymsm5m2my62DJ0pFPKoJbES5Rd0Zs28deJYl +GFVjl3W5Hbz3bB1YZRlxPifi/XmgNG7NzfWwsM3WX/8crs/c9tMwTQNsv2z5 +q5XMRrccr3ydi9GAF6JEfgx2Cq23h/9/GqDhw3v9HTb91LERxXYN8BzKuMtM +YSPJhlyKo5kmGK3Xk3iTitcPdUyzXlULfsUdpMRlsJG8SmrsxYGNIGOzLkEv +m40aLsxo/OTVhmidP5euYB+advlArNWG+h3ZK/5iX29S09jprg0ZomutWDls +pOJd937+szaYaRazAv6H51s6qE682QQ6FzhCL6+zkYK8IqHsogvbWE6+TQVs +tLEgXOwX0gf0iLJ+2X02otHjSW07fYi6eT4zFjtbNaPL45A+fKy08ZjH5rtZ +UfmKqQ/E+rMrRx7g/XZ92CmjSh+ebJjr/fAIn6fZHrkaqlSwjpHaVNeA/+9F +m03OggYgaD+U+KaJjW6EqtnfZxkCci+4KPyJjdoi0OaEAhOQt3s1GkXhoLXu +H+0O+2+D7b4Z1BldDmIsPihXOAFA3yd0cwedg2RHHi2Tpe2E1FL6z7SbHBRO +Nf2WoWkONe+9PIT7OYg2+rtZatgC+lxP/qu54Qcq2xm2LK/VEj7psNZ8PPED +3Z7xe1aauQcoop8GrFg/0PyO1f81xVrDXONyvlMbh9F3Ct9kr6ctVIpQBj6m +D6PAf4LS4lT3gib7j+Kx2WFU7tv8NCvRHnK+6R028BtBJ6fl5rR894Gad8mr +w99GEGm168DrIw4w9yDh9XV3LjJxS98xuM8RDEJUymcHuOi9XK5fE9UJIl7t +bun2HkVrCuMbijfsh+ECGYlbv0bRox5NGzvxA9AnMa/WfGEMKX6Y8I4YPQAV +POmcQvlxRM1KL73VcxB+FWg0HH88jnL5pzdlvHCGZ47BDN2NE+jBDp3OxFoX +iH/nNDsbN4GyN1+Q/F3iCv/Z71ks+zyBWr8WnKEmucFwe491/oZJdN/2mlrw +qUNAHbgxLBU3iSYDHCmB9MNQvqVD5Uv7JCJ3afiMmbnDaW2d041qU6h49Mt8 +mNERoE3VHq2LnELONwq8Dot5QGH+yfHcN1Oo+p71Eb6zHnBxrz7FWHkamci/ +/3n+pweo94pubPSfRqo93p3vfD1B+dfWn90102hA9Ojea/2ekBryRWnr4jRq +S7HzstxPg6qxnKQjMIMymXmix9po0MWJUyuOm0ENjYs/vfZ4gdu9VQ9r62fQ +ikNwllrnBVkSUSdmR2aQ8qrXrf80eMF+r20H6rgzSJdlu1qw0QtO9Wo1Ro/O +IAdTtzsdz7xAZzOPDt84zv8n4k30v15QPVmYJjQ1g9Z8v7uiucMLdGHQ4M/c +DFJzl80+NOcFkflC4sl8JDLxGCtONKDDwv2DV5AciQpzJsLsjOhQWllq2Im9 +qn1qu6wxHdKUeonwNSQas5j7ULyVDsdN4uOK5El8flF4WDvp4MQeyRRSJNHy +OUmXlfvocMEkVvGBCokGkg2F8wLocJd5TLJRi0Qp9VG+jwrpkNlxzyHKlEQB ++ldMmMV0EI8eCZrHtrlTJWxcQgdv6l3F8G0kErkydOdhGR0EdwXr+m0nUWKo +/fCDGjpMlbBV9gGJojTUjt5/TofvzRH6IuYk8rvyxv9eFx08FjsjNliTaM/y +IdPQHjp4mhbkXcbekEgR1++jw/OXOQf5bUg0FGpYVjVIB2ZGXXgXtqdd3mgl +lw5ZJVzPZDsSOQuEBVYs0MFxf8f8x30ksgxbE1wqw4AXv5NvSjqT6HneGauM +1QwIzteuPIFtyppSY65hQNCyeKNebF31N1/MFBkweXqxtNyFRHKfI82+qjPA +8pAsMnMj0ciW7zIihgwoWPFpyMGdRKm8+Y+9HRnA7TrwXJSO568jlm27Hz9f +9PMZDTvBjRlKPciAVFcB41psZo39+kVXBthlrTpLZ+D6CZ70yzQG9CSZVdQQ +JKK20OgvQxgQbvlcbqsviT6nq4uqpjHAelvWSHcAicqRuA8nnQFvS2xI5UCc +PzrTVHaJAW30tERPbP09TTHGVxggTEk36cVOoXhN2V5nQLvYnrHOIBLtCsr/ +wixlwNMvPnEPQ0ikoHDOaHs5A37Xj41NYM+0BF3iq2TAE1W3Po1QEt1ch2xT +qhlg9vWp61XsP9+/P71Vx4ANzffTjoWRqMZGvvhtMwPWfd8sLH2MRBcXeAUy +WxhQ+G9z2y5sWvGwpwuLAXpD5QpMbAn+OvmBVtwvTRfLL9j+9c6pPz8xALWg +L1kRJFLVvByhNsiAnVd9JuaOk2jhc3T7jyEGxA+cF1ZhkqgtkaFbwcH/syq+ +yBo7ptdg2ISL5xM3EJKL3ZndfnjvNAMIlIO2niBRxjJJi5M8BPjyCtYeOUmi +hqnvbuF8BHCoh1edwWZ/LwkNFCDg+mTdx7vYpjXm+TRhPC7sd4HEHvJg/rKS +JIBx9XFdXCSu38ZipYUUAcZGQRa3sLduXqmBpAlIzxs2bMJOEy89QJUjoJij +sps/Co/XdVfJryVAqfubbjQ2UVDaLK1KQF+S0o8c7LS0E90r1Am4c3xO8AH2 +ECElzq9BwHqtvWHcpXEpSx+uLgHWe/6KO0STqO6vVOyQPgE9xlZTvtiDP3qy +egwIiBJe3BqHveXpyRcfjAkIT0tdLMMe8C9XfAwEuJn+u4sSg/e7c6Thw50E +XHPq2C+FbWK226bKnICrWhtb1LFT5PpOFOwmoCUio2839iP+irQ8KwK4Abln +XLD7xyOLcmwIqNboSvXFNn4l/THZnoA/R6bfncWmVfWNnHXA32c8E7mMnXyt +gve0EwH+Fo+Kb2H3he7RjXAmgF9GetVjbHF3GctgVwIaco71Ni/l7ek/7HeI +ACPFGakPS+8rRV909yBAoX5HMWepHhGrm840An4FiolMLeWRMrUOdALOuXLb +FpbyevtbbQjc7+vdv3ljcR6rcmiXDwE6kQPJIti0h9F/wI+ALU4/4yWxk29a +rdrqTwCr9J9uWexHybJahoEEpGrY5ilg9zEHdugEE6Cfdr5JBVuMXuWsEUpA +wus2u/XYm/fGBKmGE+Dxee12raX8LdZnFCIIeMyJzNiEnaS+OleWiftt0WWt +h/1AYrBa8iQByi67/ajYvb+qWkSjCIisqB01WMpnx/QKxBAwTup9MsQ2em89 +vxiL18tCpaoR9v8B8+QAMQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.7314324414217891, 1.3435574907486445`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.7314324414217908}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12479,7 +13824,8 @@ wTw= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5511670383120088}, + AxesOrigin->{0, 0.7314324414217908}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12507,7 +13853,8 @@ wTw= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7314324414217891, 1.3435574907486445`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12515,9 +13862,9 @@ wTw= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991347865018469*^9}, + CellChangeTimes->{3.991347865018469*^9, 3.9943569378323383`*^9}, CellLabel-> - "Out[469]=",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] + "Out[139]=",ExpressionUUID->"06880704-5fc2-4e55-9c11-35864e0c2bb6"] }, Open ]], Cell[CellGroupData[{ @@ -12581,199 +13928,170 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918503718899097`*^9, {3.991850469268881*^9, - 3.9918504694651966`*^9}},ExpressionUUID->"497f9779-a3e4-c84e-a207-\ -0aac70483e3c"], + 3.9918503718899097`*^9, {3.991850469268881*^9, 3.9918504694651966`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.458740908982352`*^-268\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.995060378270283`*^-272\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 470, - 513, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652482224`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994356938038443*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], +In[140]:=",ExpressionUUID->"4c9bde7f-7350-43aa-93c4-e824f1429aaf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7391049816418008`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.4551993133318863`*^-283\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 470, 514, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652572174`*^9}, + 140, 70, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994356938048401*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], +In[140]:=",ExpressionUUID->"9951734a-ee65-4340-9a41-efdf5487549c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.230095503809359`*^-290\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.070325048821083`*^-295\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 470, 515, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652662163`*^9}, + 2, 140, 71, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994356938061386*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], +In[140]:=",ExpressionUUID->"53b0e21d-d00b-441a-bce9-a8be570fa5ad"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 470, 516, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347865275215*^9}, +during this calculation.\"", 2, 140, 72, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.9943569380710363`*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], +In[140]:=",ExpressionUUID->"cbac6821-55a0-400f-959e-91c5446548db"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8V98fB3ClIYXszf18jIa9Mz693yizbJFkr3wrhIoGKuIrEolUSCiE +z72kjCRaiBaypbR8JQpJqd/9/XUfz8cdj3PPOe/XOYfhE+Lgv5SDg4OxhIPj +/9e54dYH8smFm3OlVbfeiDXZ3JUrFmXcewJMFqJG5ucJQOFnPmK96bAldPvo +i3l1OGhX+pqztwDceiz23Z5H4J8UTf/5mgIV63bP1Hk7GGmwCZl53Qy1z86n +cM97gZn8+ND065cAo0KXVs+Fws/XeplTr9/Ci4E6lsRkLLSYXi98UfAd5IML +HlTGnAOpkdoPPsqLUKWTlTpWehGE9nqWrjTlxPtnT77Jv54P6Rpm9TbOXNjt +H7W0N7EQ+rLVm6bX8uB/iUUmOHAdkgtjni0V58dISdUCZeEyED3/LinjiiCO +lRfWbOsuBzGlW6fmiwUxJi4p7u5wOUg0J8TsZgvix1pnxvpP5SAztSFyXYsg +8i6+6x9fKAeFbaFe9Z8EUeTAamFFogK0li3qvtMSwuTOtcUH9lSAbYTImGab +EE5JQoX7jwo47WS5+eWcMHKtZIXJcrBBorpTYukSEQwqI1m+y9hQIej0Q2O1 +CH5Uum92jYsNPS892OdkRdBGnJNHjJ8N8vYRTHsLEVQsKPToYrCheXveiucX +RVBosPpelgkbFs1mOzuMRHHJ9j985nFsSCuOLls0E0W9/HX1/PH0+ys4ElXs +RTHSzjS7N5EN2x5yG6f4i2J73u6PbmlsyDElqraliuLn4PsvNfLYsAmts9pH +RHGcJcpe38CGcP2rnq0nxJC/5KqH/nc2WOXzzlifEcODN7VK7OfYwFx5NLEz +UwzHarJyA36y4XnXDvLVDTH8RFxLSvjLBtXQNZzDnWLIO53nmbuahE/Fh4q/ +SYijgOSh5apyJLgL2XyRrBJHnZ7TJh22JGgdqY/LbRBHzxdv3kY7kMD9dr0I +45E4NvIeVVVwJqG2khMU+8RRvL/jcYgbCSLWtWnqf8XR5X7Q8iE/Ep7HyWtv +tZZAzwatB6JRJGz5uhC9/50Emt34bcqXR0KUxfmN9yckMDlyibL5VRIqrqr0 +C85JYHfil7Ej10gQc/LSr+WSxH8vmbUNXCdh4s7DH5yqktjLbAyKZJOQcSIt +4uJhSdy62Kuw9j4Jb4UV9z/gkcKQxUs734+QIBpyT1pUVAqpO7Yvb4+SsO2J +a8ceQgq3+nPKn35HQk10sjKflhQ+si51lPpIwr8jU+M7XaVwZNOHCWKSBM2S ++sCvBVJoJnfcPuMXCXFG9t4Sm6Qx4Husn6wQBRYeud/0TKSxwzC++KYwBbyx +/5103iaNQn/MUVeUgsst8cVpXtKYtU392GYJCu5Y1f23Ikkav5iPKskRFEy5 +yh383ieN9yeMB1hKFNyODl3JPyaNrUk6g2nKFBy/fDdbdVIaNymv2fxGhYI1 +b1zq9yyVQf0/rxQj1ClYF3iG481GGayaW5cbqkOBR+Tsv0+PyCBXVSDVsJkC +hSwTqfF4GSywUufpAYruv7PlK9NkULtT/tV/SEH07w3PTQplsPSD1bU1phRk +nvQQrn0qg8qS/YFy5hS4F5UV9/TI4Fc+SzXCggLm43m9mTcy+F44PFDckgI2 +d4ab2qwMchZ2KS+xpuDpucd5RdKy+PzIWqLYhoKMKiGNlnWy6MKbEZdgS4Fb +t3fzGw1ZtNhZtNPXjoJPYr/HJM1kMbP1UKiAAwWc+eob0/fLoqHnChszZwoM +Ki5WH78ni01tLyKX76Jgy+vOxcknsijV23yogLYNxzJzz5eyONijGmrkToGv +w/4+eC+L7SFS5oG7KTA7woiJXU6gy+hCXrYnBe18Ddc2cROo0BMcJO1FgV3h +jidTvAROe1Yp59He1ZHM7y1GoOfF5LKL3hSEys5dM1YicIqDzAz2pWC2Ku3J +TzUCg/I22b2mHW2h9IXUJnDecd0aYz8K4sO8dJmbCVRO4Ute7U8B94pfbv0m +BOrXRNrupZ2WkxmTbk6gAUtKrI12Tkvbk6X2BJ7qXV17NIACWVf/L3XO9P2Y +x+kvaBdO/OUPdyPw3vUb4XKBFFQK6+x650tg9J0n2xtpa5c+i7kURGAhf6zF +yiAK6jYHFzruI/BCx/bt22k/CMz70nKQwEZbhcPPaVv+1hc4eoTAj87leTx7 +KOhM69LVjiWwhWXRZU7bSSFk18QpAnlnakRiaPfVrootTCLwu1R9YBVtD5vC +QvdUApMERZ+M0R57u7lVKINA988pmwSDKZhcHSEQf5l+f8XgtkDa4fm8eqyr +BNb9Mvp2hva8dsmu2SICQeVpaSXt462mseWlBH7Qtjv0jDanx3ChfyWBB7zS +XCdoJ3473CpdTWAO28l2xT90fZ0WnOy+Q2BKr7+7NO0MyQqB1LsEhrBSYjVo +i7Et9MyaCRycPd9gQvvKlne7/jwi0LfVnN+eNrPvWGxNO90+9bAYd9o39okV +7X9OYK/90Ep/2ipLq1oVuwlUWbGzLJg2dWH75HAfgeGvyOB9tDcpfRLIGibw +0OQts//77r0TerbvCFxioI3/f97ESdp95ScCDc1+u/jRfvzpduy9CQIt7YZT +d9Hedsyh6NA0geXGZe9tab/k/9KqNkfg60rt3ca0XYpPT35coP93YNucGu1B +A6Zg/l8CSfYjUpK2z7MGPddlDNR4GJm2jPZHXxf3tasYyLdTNWOc7q+989Ox +T3gYeMX5YV0HbYOwAJEPAgxs6jrBKqPNNd5fxinGwG/jhoHxtHt8bI0Z0gxc +67NU35120UBLz2YmA3vGP1Wp0Y5w2rTXfR0DeaQ4+/7S423ScXNJtDIDu8P8 +S57SHm7MVL6ly8CgaVc7d9o39bibXxoy8HeC6AZZ2tHs4y5TyEAFOvyH6fkn +UhB4QsmagT+qkrodaY9JDIpa2jFwQG9f+CraVIZdeYAzA/WvuT+sp+e3bbx+ +71VPBraRL5JEaMv8Kd93z4+BtxvT/zTS9TFxkMk5tIeBy+J7lPxoJwatVhWL +YGB1XEB1IV1fTdZDJ1MTGahG7rzyh67X1Af24jdTGCj6a2D2DG131qOK1nQG +Hk38wSdG+6dqZd+yKwx8lJeZIu9DgaZAnNoRkoF/d/R3itD5wJE8+yC7hoEV +R1Kckuk86eQMdqupZ2BpkULRbw8K/pl1iJ9+yMBhj7qybjp/CnvlBwL76fE6 +mxXiTefVAfuLofEjDPy66+y+BjcKsI1nxbUxBp5N+w+EaA/Vz6kPTzKQPZQX +UOdK91fekwQnTiaabWgbekPn4ZgoS+oAFxP39pL5TNpUGkme5WHiY9dKY28n +ur9O5Ay2iTIxaukrZjedp4n+ezWNlZnICNM/lUXn70+ltcMqzkzkF+rqO03n ++dwViTgtNyYmHtM8epnO+xk+BXl9Tya2nf+sXGFG1/N3/eAte5joG6bR+GQL +BW/rfefcjjEx+uHP+/30+tFmfZs3sYiJ7zqEPcM30fP97n0ypZSJHFM3Du/U +o/NH7alTRiUTXXylq410KWgUHM3JrWWim1ZB5oIW3f4B7nW3Opgo9n2ZopMa +nYf/eMDbWSbame7LjFGgIGso6O3HBSau+e3pu0megvO24fFf/jLx41HXwEkm +PZ5aie3zq+QwReqwiAO9np74RbrwychhTd9unXl6vf0neXmokZkcxvlMXmji +o8Co7Gb+hQty2FugzWv9g4QBoixv6yU5/IcVIdk6S0L0hZLcmTw5nGKKv9ky +Q8LtuOLLDiVy+PX5lwydaXo/4Jqfzdsgh/ddHB/8Gidhw/LzaQmjcmg0WMWS +Gqb3P55HYg8qy2NqHdrfaibhVldUjIKGPF7Qydo30USCk9Xh41068vhW66kf +4x4J6TqRRzVBHuNOOX86VU8Cz5qQw5P28ljy6qyvZjUJy2p9QgMOyaMqz/D6 +9UUkTAtYee1olscFSJ5MiCehdy/zefBjeWxedoJle5KEpkcLEPNUHsME2BrC +cSSkRZfJ3uiRx6WCuXw5R0lQf7tm5Oe4PFrdNms/HU7CfvLZ7iuCCujg9CF1 +xouEcVvnXWN+Csg4HtEobUDC2BmvHQdWKuKx3nBDzg9s2D+uzFRfo4h+jz4/ +DXnHhh/mP798WauIzWkORf1v2MDNmR6/R0IRs2Pn1coG2KAe1VLtpaKIVr1H +n+m9YMMxf0VBW0dFzB0dseGg97MimyeeKeXR35NU5nWh97+WXw9Zvtddh5k6 +x294a7NhwpcrvDpmPfJaHfzOcauCPq+ILj3dvAG9amZnCkZvgkCHYir760Yc +6v2cliRUBlKJlXa6usq4NIi3uImvBLKV9NcKBqpgq5TgtZ2K16FNwljn+zlV +DJ7dPHDVvAgMpJrT1HrU8NPlad33FteAl7MgwvuEOsq3t5pZRl8FmThZo52K +Grilz3Ctt1YerFJwr3F4rIF/BrnGztdcAlWWeOWh3Zp4af/HCOmSbDgwLNBi +xaGFH6q5JcYzM+Hr9zPOltla2HhAPu73dDqYqz3KsVTRRt6ky1yBGWnQ+N3w +149ObbyWcHEDf8wZ2K+s2f/CXwctygUSnC4mAmvSr2vnKl2kdKN65F6fgq3y +Ytt5CnTxPFdmd2tjHKyP/fdws54etpSOhnQqHIeN/vr3FPr18FXueZaZRBT4 +Nwadqg7bhGy9wfuZqyLhXn6X37SwPiaPLV7PNA2DmRt/f6jd1sdE3ykFL5O9 +4KtQtipnuwEqrAj50GYbCNEPPYIV7Qzw5bkD4yJGgZDmL9BOORhgbiwLw9YH +QkNR1Jl2FwPU6rzdZLckEIQULfgWvQ3w3LlSzbqqAHik+F7I66ABzmX+7FCT +DICN62UJxTwDTM/YxrF/xg+mN2boUlMGyNtmnhvT6QO9T3Gr4HcD9KYkcvXu ++UDT/knHiFn6+T3GAQuVPpBKWYbpLhggS95IL/+cD2w04LhZx2mI6SJ6mnud +fcDHch+jRcQQfV79u5VjxBu6As3XdBkZovbYJ7GvP73gTuGv0dlEQ3zEoyyD +lzxA1zTih1WyIWak3E3QO+EBt0Yn1uSnGGLhes0h3OMBlMywnlU6befpDUl6 +HnAzuykl95Ih6jQOy3zt2g35Z+L1zSsMsaUf/FYK7oakCL5z2a8MMXFo5DLj +8i5w2yKHhjJG2Mot/b59xBUWu7h4WwgjFDkrOrOh1RXy/ScHrOSMcGPCjEoO +5QofEmoPua03wtCU1d/Y8a5woNW2MkrTCEuzh4JrlF3hX5ujMnfMjPBZUFup +yHEXqHPt/q0dYoTJUZzv+1R2gOS+07WqTUY4sBBz8HOjI6T+DdBJbjaiz+fh +HFS5IyxNNyM/PjBCZdn00dOXHWG8ZnlJfqsR+q1ISdgV7Qh1HKeyBV4Z4clJ +7j1XdR3B7Xzsobn3Rvi0QpM7n3SA7PooncbVLHRIXuOvQtqDMPdecrsLCx+N +mmsdLLGFQtNj0VM7WejHc6/yQ5ItaB5LNc1wZ+GZmiKb8GBbsJlid/d6s/DZ +wx25b5RsIaFn9qfvXha6Bq7WXMW2gfmCGJPoOBai7vydmLvbod8w41VxGQtj +o7O0wyasISiy8LJlBQtvXDoez3puDXMVt/wn2PT33pX4yVVbgwCz94dGDQvZ +o3uPGx61Bmsuaam7TSw0bbs8l8NjDQ1dxX6vuln4AdV7l+tYgRXvHZWDvSy0 +HM7q9Zawgl7z1jmxARYm9Eir9fy1hJm6/xI93rAww0YkfWW7JahcVS//PM7C +209BMtnHEhr6jQ+e+cJCyZHO29ctLMFKyBHUplhYkdMhMKhqCQGnI19EzLJw +8ZtMbfIvC5hpSsgRnac9uHZkxVsLOLGQ5Vu3QP8vJ3n44hMLWKtdorx7kYWs +nn/CTSstIHdf3ezfvyy8YFrbsOyCBfwPsDweKQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12787,158 +14105,125 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13c8V98fB3ClIYXszf18jIa9Mz693yizbJFkr3wrhIoGKuIrEolUSCiE +z72kjCRaiBaypbR8JQpJqd/9/XUfz8cdj3PPOe/XOYfhE+Lgv5SDg4OxhIPj +/9e54dYH8smFm3OlVbfeiDXZ3JUrFmXcewJMFqJG5ucJQOFnPmK96bAldPvo +i3l1OGhX+pqztwDceiz23Z5H4J8UTf/5mgIV63bP1Hk7GGmwCZl53Qy1z86n +cM97gZn8+ND065cAo0KXVs+Fws/XeplTr9/Ci4E6lsRkLLSYXi98UfAd5IML +HlTGnAOpkdoPPsqLUKWTlTpWehGE9nqWrjTlxPtnT77Jv54P6Rpm9TbOXNjt +H7W0N7EQ+rLVm6bX8uB/iUUmOHAdkgtjni0V58dISdUCZeEyED3/LinjiiCO +lRfWbOsuBzGlW6fmiwUxJi4p7u5wOUg0J8TsZgvix1pnxvpP5SAztSFyXYsg +8i6+6x9fKAeFbaFe9Z8EUeTAamFFogK0li3qvtMSwuTOtcUH9lSAbYTImGab +EE5JQoX7jwo47WS5+eWcMHKtZIXJcrBBorpTYukSEQwqI1m+y9hQIej0Q2O1 +CH5Uum92jYsNPS892OdkRdBGnJNHjJ8N8vYRTHsLEVQsKPToYrCheXveiucX +RVBosPpelgkbFs1mOzuMRHHJ9j985nFsSCuOLls0E0W9/HX1/PH0+ys4ElXs +RTHSzjS7N5EN2x5yG6f4i2J73u6PbmlsyDElqraliuLn4PsvNfLYsAmts9pH +RHGcJcpe38CGcP2rnq0nxJC/5KqH/nc2WOXzzlifEcODN7VK7OfYwFx5NLEz +UwzHarJyA36y4XnXDvLVDTH8RFxLSvjLBtXQNZzDnWLIO53nmbuahE/Fh4q/ +SYijgOSh5apyJLgL2XyRrBJHnZ7TJh22JGgdqY/LbRBHzxdv3kY7kMD9dr0I +45E4NvIeVVVwJqG2khMU+8RRvL/jcYgbCSLWtWnqf8XR5X7Q8iE/Ep7HyWtv +tZZAzwatB6JRJGz5uhC9/50Emt34bcqXR0KUxfmN9yckMDlyibL5VRIqrqr0 +C85JYHfil7Ej10gQc/LSr+WSxH8vmbUNXCdh4s7DH5yqktjLbAyKZJOQcSIt +4uJhSdy62Kuw9j4Jb4UV9z/gkcKQxUs734+QIBpyT1pUVAqpO7Yvb4+SsO2J +a8ceQgq3+nPKn35HQk10sjKflhQ+si51lPpIwr8jU+M7XaVwZNOHCWKSBM2S ++sCvBVJoJnfcPuMXCXFG9t4Sm6Qx4Husn6wQBRYeud/0TKSxwzC++KYwBbyx +/5103iaNQn/MUVeUgsst8cVpXtKYtU392GYJCu5Y1f23Ikkav5iPKskRFEy5 +yh383ieN9yeMB1hKFNyODl3JPyaNrUk6g2nKFBy/fDdbdVIaNymv2fxGhYI1 +b1zq9yyVQf0/rxQj1ClYF3iG481GGayaW5cbqkOBR+Tsv0+PyCBXVSDVsJkC +hSwTqfF4GSywUufpAYruv7PlK9NkULtT/tV/SEH07w3PTQplsPSD1bU1phRk +nvQQrn0qg8qS/YFy5hS4F5UV9/TI4Fc+SzXCggLm43m9mTcy+F44PFDckgI2 +d4ab2qwMchZ2KS+xpuDpucd5RdKy+PzIWqLYhoKMKiGNlnWy6MKbEZdgS4Fb +t3fzGw1ZtNhZtNPXjoJPYr/HJM1kMbP1UKiAAwWc+eob0/fLoqHnChszZwoM +Ki5WH78ni01tLyKX76Jgy+vOxcknsijV23yogLYNxzJzz5eyONijGmrkToGv +w/4+eC+L7SFS5oG7KTA7woiJXU6gy+hCXrYnBe18Ddc2cROo0BMcJO1FgV3h +jidTvAROe1Yp59He1ZHM7y1GoOfF5LKL3hSEys5dM1YicIqDzAz2pWC2Ku3J +TzUCg/I22b2mHW2h9IXUJnDecd0aYz8K4sO8dJmbCVRO4Ute7U8B94pfbv0m +BOrXRNrupZ2WkxmTbk6gAUtKrI12Tkvbk6X2BJ7qXV17NIACWVf/L3XO9P2Y +x+kvaBdO/OUPdyPw3vUb4XKBFFQK6+x650tg9J0n2xtpa5c+i7kURGAhf6zF +yiAK6jYHFzruI/BCx/bt22k/CMz70nKQwEZbhcPPaVv+1hc4eoTAj87leTx7 +KOhM69LVjiWwhWXRZU7bSSFk18QpAnlnakRiaPfVrootTCLwu1R9YBVtD5vC +QvdUApMERZ+M0R57u7lVKINA988pmwSDKZhcHSEQf5l+f8XgtkDa4fm8eqyr +BNb9Mvp2hva8dsmu2SICQeVpaSXt462mseWlBH7Qtjv0jDanx3ChfyWBB7zS +XCdoJ3473CpdTWAO28l2xT90fZ0WnOy+Q2BKr7+7NO0MyQqB1LsEhrBSYjVo +i7Et9MyaCRycPd9gQvvKlne7/jwi0LfVnN+eNrPvWGxNO90+9bAYd9o39okV +7X9OYK/90Ep/2ipLq1oVuwlUWbGzLJg2dWH75HAfgeGvyOB9tDcpfRLIGibw +0OQts//77r0TerbvCFxioI3/f97ESdp95ScCDc1+u/jRfvzpduy9CQIt7YZT +d9Hedsyh6NA0geXGZe9tab/k/9KqNkfg60rt3ca0XYpPT35coP93YNucGu1B +A6Zg/l8CSfYjUpK2z7MGPddlDNR4GJm2jPZHXxf3tasYyLdTNWOc7q+989Ox +T3gYeMX5YV0HbYOwAJEPAgxs6jrBKqPNNd5fxinGwG/jhoHxtHt8bI0Z0gxc +67NU35120UBLz2YmA3vGP1Wp0Y5w2rTXfR0DeaQ4+/7S423ScXNJtDIDu8P8 +S57SHm7MVL6ly8CgaVc7d9o39bibXxoy8HeC6AZZ2tHs4y5TyEAFOvyH6fkn +UhB4QsmagT+qkrodaY9JDIpa2jFwQG9f+CraVIZdeYAzA/WvuT+sp+e3bbx+ +71VPBraRL5JEaMv8Kd93z4+BtxvT/zTS9TFxkMk5tIeBy+J7lPxoJwatVhWL +YGB1XEB1IV1fTdZDJ1MTGahG7rzyh67X1Af24jdTGCj6a2D2DG131qOK1nQG +Hk38wSdG+6dqZd+yKwx8lJeZIu9DgaZAnNoRkoF/d/R3itD5wJE8+yC7hoEV +R1Kckuk86eQMdqupZ2BpkULRbw8K/pl1iJ9+yMBhj7qybjp/CnvlBwL76fE6 +mxXiTefVAfuLofEjDPy66+y+BjcKsI1nxbUxBp5N+w+EaA/Vz6kPTzKQPZQX +UOdK91fekwQnTiaabWgbekPn4ZgoS+oAFxP39pL5TNpUGkme5WHiY9dKY28n +ur9O5Ay2iTIxaukrZjedp4n+ezWNlZnICNM/lUXn70+ltcMqzkzkF+rqO03n ++dwViTgtNyYmHtM8epnO+xk+BXl9Tya2nf+sXGFG1/N3/eAte5joG6bR+GQL +BW/rfefcjjEx+uHP+/30+tFmfZs3sYiJ7zqEPcM30fP97n0ypZSJHFM3Du/U +o/NH7alTRiUTXXylq410KWgUHM3JrWWim1ZB5oIW3f4B7nW3Opgo9n2ZopMa +nYf/eMDbWSbame7LjFGgIGso6O3HBSau+e3pu0megvO24fFf/jLx41HXwEkm +PZ5aie3zq+QwReqwiAO9np74RbrwychhTd9unXl6vf0neXmokZkcxvlMXmji +o8Co7Gb+hQty2FugzWv9g4QBoixv6yU5/IcVIdk6S0L0hZLcmTw5nGKKv9ky +Q8LtuOLLDiVy+PX5lwydaXo/4Jqfzdsgh/ddHB/8Gidhw/LzaQmjcmg0WMWS +Gqb3P55HYg8qy2NqHdrfaibhVldUjIKGPF7Qydo30USCk9Xh41068vhW66kf +4x4J6TqRRzVBHuNOOX86VU8Cz5qQw5P28ljy6qyvZjUJy2p9QgMOyaMqz/D6 +9UUkTAtYee1olscFSJ5MiCehdy/zefBjeWxedoJle5KEpkcLEPNUHsME2BrC +cSSkRZfJ3uiRx6WCuXw5R0lQf7tm5Oe4PFrdNms/HU7CfvLZ7iuCCujg9CF1 +xouEcVvnXWN+Csg4HtEobUDC2BmvHQdWKuKx3nBDzg9s2D+uzFRfo4h+jz4/ +DXnHhh/mP798WauIzWkORf1v2MDNmR6/R0IRs2Pn1coG2KAe1VLtpaKIVr1H +n+m9YMMxf0VBW0dFzB0dseGg97MimyeeKeXR35NU5nWh97+WXw9Zvtddh5k6 +x294a7NhwpcrvDpmPfJaHfzOcauCPq+ILj3dvAG9amZnCkZvgkCHYir760Yc +6v2cliRUBlKJlXa6usq4NIi3uImvBLKV9NcKBqpgq5TgtZ2K16FNwljn+zlV +DJ7dPHDVvAgMpJrT1HrU8NPlad33FteAl7MgwvuEOsq3t5pZRl8FmThZo52K +Grilz3Ctt1YerFJwr3F4rIF/BrnGztdcAlWWeOWh3Zp4af/HCOmSbDgwLNBi +xaGFH6q5JcYzM+Hr9zPOltla2HhAPu73dDqYqz3KsVTRRt6ky1yBGWnQ+N3w +149ObbyWcHEDf8wZ2K+s2f/CXwctygUSnC4mAmvSr2vnKl2kdKN65F6fgq3y +Ytt5CnTxPFdmd2tjHKyP/fdws54etpSOhnQqHIeN/vr3FPr18FXueZaZRBT4 +Nwadqg7bhGy9wfuZqyLhXn6X37SwPiaPLV7PNA2DmRt/f6jd1sdE3ykFL5O9 +4KtQtipnuwEqrAj50GYbCNEPPYIV7Qzw5bkD4yJGgZDmL9BOORhgbiwLw9YH +QkNR1Jl2FwPU6rzdZLckEIQULfgWvQ3w3LlSzbqqAHik+F7I66ABzmX+7FCT +DICN62UJxTwDTM/YxrF/xg+mN2boUlMGyNtmnhvT6QO9T3Gr4HcD9KYkcvXu ++UDT/knHiFn6+T3GAQuVPpBKWYbpLhggS95IL/+cD2w04LhZx2mI6SJ6mnud +fcDHch+jRcQQfV79u5VjxBu6As3XdBkZovbYJ7GvP73gTuGv0dlEQ3zEoyyD +lzxA1zTih1WyIWak3E3QO+EBt0Yn1uSnGGLhes0h3OMBlMywnlU6befpDUl6 +HnAzuykl95Ih6jQOy3zt2g35Z+L1zSsMsaUf/FYK7oakCL5z2a8MMXFo5DLj +8i5w2yKHhjJG2Mot/b59xBUWu7h4WwgjFDkrOrOh1RXy/ScHrOSMcGPCjEoO +5QofEmoPua03wtCU1d/Y8a5woNW2MkrTCEuzh4JrlF3hX5ujMnfMjPBZUFup +yHEXqHPt/q0dYoTJUZzv+1R2gOS+07WqTUY4sBBz8HOjI6T+DdBJbjaiz+fh +HFS5IyxNNyM/PjBCZdn00dOXHWG8ZnlJfqsR+q1ISdgV7Qh1HKeyBV4Z4clJ +7j1XdR3B7Xzsobn3Rvi0QpM7n3SA7PooncbVLHRIXuOvQtqDMPdecrsLCx+N +mmsdLLGFQtNj0VM7WejHc6/yQ5ItaB5LNc1wZ+GZmiKb8GBbsJlid/d6s/DZ +wx25b5RsIaFn9qfvXha6Bq7WXMW2gfmCGJPoOBai7vydmLvbod8w41VxGQtj +o7O0wyasISiy8LJlBQtvXDoez3puDXMVt/wn2PT33pX4yVVbgwCz94dGDQvZ +o3uPGx61Bmsuaam7TSw0bbs8l8NjDQ1dxX6vuln4AdV7l+tYgRXvHZWDvSy0 +HM7q9Zawgl7z1jmxARYm9Eir9fy1hJm6/xI93rAww0YkfWW7JahcVS//PM7C +209BMtnHEhr6jQ+e+cJCyZHO29ctLMFKyBHUplhYkdMhMKhqCQGnI19EzLJw +8ZtMbfIvC5hpSsgRnac9uHZkxVsLOLGQ5Vu3QP8vJ3n44hMLWKtdorx7kYWs +nn/CTSstIHdf3ezfvyy8YFrbsOyCBfwPsDweKQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07195171217774803}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12950,183 +14235,150 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07195171217774803}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{117.9605728938093, - 256.1444167491903}, {-15.489822627663699`, 5.682052372336301}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13c8V98fB3ClIYXszf18jIa9Mz693yizbJFkr3wrhIoGKuIrEolUSCiE +z72kjCRaiBaypbR8JQpJqd/9/XUfz8cdj3PPOe/XOYfhE+Lgv5SDg4OxhIPj +/9e54dYH8smFm3OlVbfeiDXZ3JUrFmXcewJMFqJG5ucJQOFnPmK96bAldPvo +i3l1OGhX+pqztwDceiz23Z5H4J8UTf/5mgIV63bP1Hk7GGmwCZl53Qy1z86n +cM97gZn8+ND065cAo0KXVs+Fws/XeplTr9/Ci4E6lsRkLLSYXi98UfAd5IML +HlTGnAOpkdoPPsqLUKWTlTpWehGE9nqWrjTlxPtnT77Jv54P6Rpm9TbOXNjt +H7W0N7EQ+rLVm6bX8uB/iUUmOHAdkgtjni0V58dISdUCZeEyED3/LinjiiCO +lRfWbOsuBzGlW6fmiwUxJi4p7u5wOUg0J8TsZgvix1pnxvpP5SAztSFyXYsg +8i6+6x9fKAeFbaFe9Z8EUeTAamFFogK0li3qvtMSwuTOtcUH9lSAbYTImGab +EE5JQoX7jwo47WS5+eWcMHKtZIXJcrBBorpTYukSEQwqI1m+y9hQIej0Q2O1 +CH5Uum92jYsNPS892OdkRdBGnJNHjJ8N8vYRTHsLEVQsKPToYrCheXveiucX +RVBosPpelgkbFs1mOzuMRHHJ9j985nFsSCuOLls0E0W9/HX1/PH0+ys4ElXs +RTHSzjS7N5EN2x5yG6f4i2J73u6PbmlsyDElqraliuLn4PsvNfLYsAmts9pH +RHGcJcpe38CGcP2rnq0nxJC/5KqH/nc2WOXzzlifEcODN7VK7OfYwFx5NLEz +UwzHarJyA36y4XnXDvLVDTH8RFxLSvjLBtXQNZzDnWLIO53nmbuahE/Fh4q/ +SYijgOSh5apyJLgL2XyRrBJHnZ7TJh22JGgdqY/LbRBHzxdv3kY7kMD9dr0I +45E4NvIeVVVwJqG2khMU+8RRvL/jcYgbCSLWtWnqf8XR5X7Q8iE/Ep7HyWtv +tZZAzwatB6JRJGz5uhC9/50Emt34bcqXR0KUxfmN9yckMDlyibL5VRIqrqr0 +C85JYHfil7Ej10gQc/LSr+WSxH8vmbUNXCdh4s7DH5yqktjLbAyKZJOQcSIt +4uJhSdy62Kuw9j4Jb4UV9z/gkcKQxUs734+QIBpyT1pUVAqpO7Yvb4+SsO2J +a8ceQgq3+nPKn35HQk10sjKflhQ+si51lPpIwr8jU+M7XaVwZNOHCWKSBM2S ++sCvBVJoJnfcPuMXCXFG9t4Sm6Qx4Husn6wQBRYeud/0TKSxwzC++KYwBbyx +/5103iaNQn/MUVeUgsst8cVpXtKYtU392GYJCu5Y1f23Ikkav5iPKskRFEy5 +yh383ieN9yeMB1hKFNyODl3JPyaNrUk6g2nKFBy/fDdbdVIaNymv2fxGhYI1 +b1zq9yyVQf0/rxQj1ClYF3iG481GGayaW5cbqkOBR+Tsv0+PyCBXVSDVsJkC +hSwTqfF4GSywUufpAYruv7PlK9NkULtT/tV/SEH07w3PTQplsPSD1bU1phRk +nvQQrn0qg8qS/YFy5hS4F5UV9/TI4Fc+SzXCggLm43m9mTcy+F44PFDckgI2 +d4ab2qwMchZ2KS+xpuDpucd5RdKy+PzIWqLYhoKMKiGNlnWy6MKbEZdgS4Fb +t3fzGw1ZtNhZtNPXjoJPYr/HJM1kMbP1UKiAAwWc+eob0/fLoqHnChszZwoM +Ki5WH78ni01tLyKX76Jgy+vOxcknsijV23yogLYNxzJzz5eyONijGmrkToGv +w/4+eC+L7SFS5oG7KTA7woiJXU6gy+hCXrYnBe18Ddc2cROo0BMcJO1FgV3h +jidTvAROe1Yp59He1ZHM7y1GoOfF5LKL3hSEys5dM1YicIqDzAz2pWC2Ku3J +TzUCg/I22b2mHW2h9IXUJnDecd0aYz8K4sO8dJmbCVRO4Ute7U8B94pfbv0m +BOrXRNrupZ2WkxmTbk6gAUtKrI12Tkvbk6X2BJ7qXV17NIACWVf/L3XO9P2Y +x+kvaBdO/OUPdyPw3vUb4XKBFFQK6+x650tg9J0n2xtpa5c+i7kURGAhf6zF +yiAK6jYHFzruI/BCx/bt22k/CMz70nKQwEZbhcPPaVv+1hc4eoTAj87leTx7 +KOhM69LVjiWwhWXRZU7bSSFk18QpAnlnakRiaPfVrootTCLwu1R9YBVtD5vC +QvdUApMERZ+M0R57u7lVKINA988pmwSDKZhcHSEQf5l+f8XgtkDa4fm8eqyr +BNb9Mvp2hva8dsmu2SICQeVpaSXt462mseWlBH7Qtjv0jDanx3ChfyWBB7zS +XCdoJ3473CpdTWAO28l2xT90fZ0WnOy+Q2BKr7+7NO0MyQqB1LsEhrBSYjVo +i7Et9MyaCRycPd9gQvvKlne7/jwi0LfVnN+eNrPvWGxNO90+9bAYd9o39okV +7X9OYK/90Ep/2ipLq1oVuwlUWbGzLJg2dWH75HAfgeGvyOB9tDcpfRLIGibw +0OQts//77r0TerbvCFxioI3/f97ESdp95ScCDc1+u/jRfvzpduy9CQIt7YZT +d9Hedsyh6NA0geXGZe9tab/k/9KqNkfg60rt3ca0XYpPT35coP93YNucGu1B +A6Zg/l8CSfYjUpK2z7MGPddlDNR4GJm2jPZHXxf3tasYyLdTNWOc7q+989Ox +T3gYeMX5YV0HbYOwAJEPAgxs6jrBKqPNNd5fxinGwG/jhoHxtHt8bI0Z0gxc +67NU35120UBLz2YmA3vGP1Wp0Y5w2rTXfR0DeaQ4+/7S423ScXNJtDIDu8P8 +S57SHm7MVL6ly8CgaVc7d9o39bibXxoy8HeC6AZZ2tHs4y5TyEAFOvyH6fkn +UhB4QsmagT+qkrodaY9JDIpa2jFwQG9f+CraVIZdeYAzA/WvuT+sp+e3bbx+ +71VPBraRL5JEaMv8Kd93z4+BtxvT/zTS9TFxkMk5tIeBy+J7lPxoJwatVhWL +YGB1XEB1IV1fTdZDJ1MTGahG7rzyh67X1Af24jdTGCj6a2D2DG131qOK1nQG +Hk38wSdG+6dqZd+yKwx8lJeZIu9DgaZAnNoRkoF/d/R3itD5wJE8+yC7hoEV +R1Kckuk86eQMdqupZ2BpkULRbw8K/pl1iJ9+yMBhj7qybjp/CnvlBwL76fE6 +mxXiTefVAfuLofEjDPy66+y+BjcKsI1nxbUxBp5N+w+EaA/Vz6kPTzKQPZQX +UOdK91fekwQnTiaabWgbekPn4ZgoS+oAFxP39pL5TNpUGkme5WHiY9dKY28n +ur9O5Ay2iTIxaukrZjedp4n+ezWNlZnICNM/lUXn70+ltcMqzkzkF+rqO03n ++dwViTgtNyYmHtM8epnO+xk+BXl9Tya2nf+sXGFG1/N3/eAte5joG6bR+GQL +BW/rfefcjjEx+uHP+/30+tFmfZs3sYiJ7zqEPcM30fP97n0ypZSJHFM3Du/U +o/NH7alTRiUTXXylq410KWgUHM3JrWWim1ZB5oIW3f4B7nW3Opgo9n2ZopMa +nYf/eMDbWSbame7LjFGgIGso6O3HBSau+e3pu0megvO24fFf/jLx41HXwEkm +PZ5aie3zq+QwReqwiAO9np74RbrwychhTd9unXl6vf0neXmokZkcxvlMXmji +o8Co7Gb+hQty2FugzWv9g4QBoixv6yU5/IcVIdk6S0L0hZLcmTw5nGKKv9ky +Q8LtuOLLDiVy+PX5lwydaXo/4Jqfzdsgh/ddHB/8Gidhw/LzaQmjcmg0WMWS +Gqb3P55HYg8qy2NqHdrfaibhVldUjIKGPF7Qydo30USCk9Xh41068vhW66kf +4x4J6TqRRzVBHuNOOX86VU8Cz5qQw5P28ljy6qyvZjUJy2p9QgMOyaMqz/D6 +9UUkTAtYee1olscFSJ5MiCehdy/zefBjeWxedoJle5KEpkcLEPNUHsME2BrC +cSSkRZfJ3uiRx6WCuXw5R0lQf7tm5Oe4PFrdNms/HU7CfvLZ7iuCCujg9CF1 +xouEcVvnXWN+Csg4HtEobUDC2BmvHQdWKuKx3nBDzg9s2D+uzFRfo4h+jz4/ +DXnHhh/mP798WauIzWkORf1v2MDNmR6/R0IRs2Pn1coG2KAe1VLtpaKIVr1H +n+m9YMMxf0VBW0dFzB0dseGg97MimyeeKeXR35NU5nWh97+WXw9Zvtddh5k6 +x294a7NhwpcrvDpmPfJaHfzOcauCPq+ILj3dvAG9amZnCkZvgkCHYir760Yc +6v2cliRUBlKJlXa6usq4NIi3uImvBLKV9NcKBqpgq5TgtZ2K16FNwljn+zlV +DJ7dPHDVvAgMpJrT1HrU8NPlad33FteAl7MgwvuEOsq3t5pZRl8FmThZo52K +Grilz3Ctt1YerFJwr3F4rIF/BrnGztdcAlWWeOWh3Zp4af/HCOmSbDgwLNBi +xaGFH6q5JcYzM+Hr9zPOltla2HhAPu73dDqYqz3KsVTRRt6ky1yBGWnQ+N3w +149ObbyWcHEDf8wZ2K+s2f/CXwctygUSnC4mAmvSr2vnKl2kdKN65F6fgq3y +Ytt5CnTxPFdmd2tjHKyP/fdws54etpSOhnQqHIeN/vr3FPr18FXueZaZRBT4 +Nwadqg7bhGy9wfuZqyLhXn6X37SwPiaPLV7PNA2DmRt/f6jd1sdE3ykFL5O9 +4KtQtipnuwEqrAj50GYbCNEPPYIV7Qzw5bkD4yJGgZDmL9BOORhgbiwLw9YH +QkNR1Jl2FwPU6rzdZLckEIQULfgWvQ3w3LlSzbqqAHik+F7I66ABzmX+7FCT +DICN62UJxTwDTM/YxrF/xg+mN2boUlMGyNtmnhvT6QO9T3Gr4HcD9KYkcvXu ++UDT/knHiFn6+T3GAQuVPpBKWYbpLhggS95IL/+cD2w04LhZx2mI6SJ6mnud +fcDHch+jRcQQfV79u5VjxBu6As3XdBkZovbYJ7GvP73gTuGv0dlEQ3zEoyyD +lzxA1zTih1WyIWak3E3QO+EBt0Yn1uSnGGLhes0h3OMBlMywnlU6befpDUl6 +HnAzuykl95Ih6jQOy3zt2g35Z+L1zSsMsaUf/FYK7oakCL5z2a8MMXFo5DLj +8i5w2yKHhjJG2Mot/b59xBUWu7h4WwgjFDkrOrOh1RXy/ScHrOSMcGPCjEoO +5QofEmoPua03wtCU1d/Y8a5woNW2MkrTCEuzh4JrlF3hX5ujMnfMjPBZUFup +yHEXqHPt/q0dYoTJUZzv+1R2gOS+07WqTUY4sBBz8HOjI6T+DdBJbjaiz+fh +HFS5IyxNNyM/PjBCZdn00dOXHWG8ZnlJfqsR+q1ISdgV7Qh1HKeyBV4Z4clJ +7j1XdR3B7Xzsobn3Rvi0QpM7n3SA7PooncbVLHRIXuOvQtqDMPdecrsLCx+N +mmsdLLGFQtNj0VM7WejHc6/yQ5ItaB5LNc1wZ+GZmiKb8GBbsJlid/d6s/DZ +wx25b5RsIaFn9qfvXha6Bq7WXMW2gfmCGJPoOBai7vydmLvbod8w41VxGQtj +o7O0wyasISiy8LJlBQtvXDoez3puDXMVt/wn2PT33pX4yVVbgwCz94dGDQvZ +o3uPGx61Bmsuaam7TSw0bbs8l8NjDQ1dxX6vuln4AdV7l+tYgRXvHZWDvSy0 +HM7q9Zawgl7z1jmxARYm9Eir9fy1hJm6/xI93rAww0YkfWW7JahcVS//PM7C +209BMtnHEhr6jQ+e+cJCyZHO29ctLMFKyBHUplhYkdMhMKhqCQGnI19EzLJw +8ZtMbfIvC5hpSsgRnac9uHZkxVsLOLGQ5Vu3QP8vJ3n44hMLWKtdorx7kYWs +nn/CTSstIHdf3ezfvyy8YFrbsOyCBfwPsDweKQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07195171217774803}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13137,6 +14389,7 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13164,7 +14417,8 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.16919668648256683`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07195171217774803}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13172,17 +14426,595 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913483238131485`*^9}, + CellChangeTimes->{3.9913483238131485`*^9, 3.9943574764467983`*^9}, CellLabel-> - "Out[470]=",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] + "Out[140]=",ExpressionUUID->"63d88a7c-7617-4161-9197-b34348094f59"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"54d9c986-d109-3d4c-9ee8-\ -76427bb63659"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8V98fB3ClIYXszf18jIa9Mz693yizbJFkr3wrhIoGKuIrEolUSCiE +z72kjCRaiBaypbR8JQpJqd/9/XUfz8cdj3PPOe/XOYfhE+Lgv5SDg4OxhIPj +/9e54dYH8smFm3OlVbfeiDXZ3JUrFmXcewJMFqJG5ucJQOFnPmK96bAldPvo +i3l1OGhX+pqztwDceiz23Z5H4J8UTf/5mgIV63bP1Hk7GGmwCZl53Qy1z86n +cM97gZn8+ND065cAo0KXVs+Fws/XeplTr9/Ci4E6lsRkLLSYXi98UfAd5IML +HlTGnAOpkdoPPsqLUKWTlTpWehGE9nqWrjTlxPtnT77Jv54P6Rpm9TbOXNjt +H7W0N7EQ+rLVm6bX8uB/iUUmOHAdkgtjni0V58dISdUCZeEyED3/LinjiiCO +lRfWbOsuBzGlW6fmiwUxJi4p7u5wOUg0J8TsZgvix1pnxvpP5SAztSFyXYsg +8i6+6x9fKAeFbaFe9Z8EUeTAamFFogK0li3qvtMSwuTOtcUH9lSAbYTImGab +EE5JQoX7jwo47WS5+eWcMHKtZIXJcrBBorpTYukSEQwqI1m+y9hQIej0Q2O1 +CH5Uum92jYsNPS892OdkRdBGnJNHjJ8N8vYRTHsLEVQsKPToYrCheXveiucX +RVBosPpelgkbFs1mOzuMRHHJ9j985nFsSCuOLls0E0W9/HX1/PH0+ys4ElXs +RTHSzjS7N5EN2x5yG6f4i2J73u6PbmlsyDElqraliuLn4PsvNfLYsAmts9pH +RHGcJcpe38CGcP2rnq0nxJC/5KqH/nc2WOXzzlifEcODN7VK7OfYwFx5NLEz +UwzHarJyA36y4XnXDvLVDTH8RFxLSvjLBtXQNZzDnWLIO53nmbuahE/Fh4q/ +SYijgOSh5apyJLgL2XyRrBJHnZ7TJh22JGgdqY/LbRBHzxdv3kY7kMD9dr0I +45E4NvIeVVVwJqG2khMU+8RRvL/jcYgbCSLWtWnqf8XR5X7Q8iE/Ep7HyWtv +tZZAzwatB6JRJGz5uhC9/50Emt34bcqXR0KUxfmN9yckMDlyibL5VRIqrqr0 +C85JYHfil7Ej10gQc/LSr+WSxH8vmbUNXCdh4s7DH5yqktjLbAyKZJOQcSIt +4uJhSdy62Kuw9j4Jb4UV9z/gkcKQxUs734+QIBpyT1pUVAqpO7Yvb4+SsO2J +a8ceQgq3+nPKn35HQk10sjKflhQ+si51lPpIwr8jU+M7XaVwZNOHCWKSBM2S ++sCvBVJoJnfcPuMXCXFG9t4Sm6Qx4Husn6wQBRYeud/0TKSxwzC++KYwBbyx +/5103iaNQn/MUVeUgsst8cVpXtKYtU392GYJCu5Y1f23Ikkav5iPKskRFEy5 +yh383ieN9yeMB1hKFNyODl3JPyaNrUk6g2nKFBy/fDdbdVIaNymv2fxGhYI1 +b1zq9yyVQf0/rxQj1ClYF3iG481GGayaW5cbqkOBR+Tsv0+PyCBXVSDVsJkC +hSwTqfF4GSywUufpAYruv7PlK9NkULtT/tV/SEH07w3PTQplsPSD1bU1phRk +nvQQrn0qg8qS/YFy5hS4F5UV9/TI4Fc+SzXCggLm43m9mTcy+F44PFDckgI2 +d4ab2qwMchZ2KS+xpuDpucd5RdKy+PzIWqLYhoKMKiGNlnWy6MKbEZdgS4Fb +t3fzGw1ZtNhZtNPXjoJPYr/HJM1kMbP1UKiAAwWc+eob0/fLoqHnChszZwoM +Ki5WH78ni01tLyKX76Jgy+vOxcknsijV23yogLYNxzJzz5eyONijGmrkToGv +w/4+eC+L7SFS5oG7KTA7woiJXU6gy+hCXrYnBe18Ddc2cROo0BMcJO1FgV3h +jidTvAROe1Yp59He1ZHM7y1GoOfF5LKL3hSEys5dM1YicIqDzAz2pWC2Ku3J +TzUCg/I22b2mHW2h9IXUJnDecd0aYz8K4sO8dJmbCVRO4Ute7U8B94pfbv0m +BOrXRNrupZ2WkxmTbk6gAUtKrI12Tkvbk6X2BJ7qXV17NIACWVf/L3XO9P2Y +x+kvaBdO/OUPdyPw3vUb4XKBFFQK6+x650tg9J0n2xtpa5c+i7kURGAhf6zF +yiAK6jYHFzruI/BCx/bt22k/CMz70nKQwEZbhcPPaVv+1hc4eoTAj87leTx7 +KOhM69LVjiWwhWXRZU7bSSFk18QpAnlnakRiaPfVrootTCLwu1R9YBVtD5vC +QvdUApMERZ+M0R57u7lVKINA988pmwSDKZhcHSEQf5l+f8XgtkDa4fm8eqyr +BNb9Mvp2hva8dsmu2SICQeVpaSXt462mseWlBH7Qtjv0jDanx3ChfyWBB7zS +XCdoJ3473CpdTWAO28l2xT90fZ0WnOy+Q2BKr7+7NO0MyQqB1LsEhrBSYjVo +i7Et9MyaCRycPd9gQvvKlne7/jwi0LfVnN+eNrPvWGxNO90+9bAYd9o39okV +7X9OYK/90Ep/2ipLq1oVuwlUWbGzLJg2dWH75HAfgeGvyOB9tDcpfRLIGibw +0OQts//77r0TerbvCFxioI3/f97ESdp95ScCDc1+u/jRfvzpduy9CQIt7YZT +d9Hedsyh6NA0geXGZe9tab/k/9KqNkfg60rt3ca0XYpPT35coP93YNucGu1B +A6Zg/l8CSfYjUpK2z7MGPddlDNR4GJm2jPZHXxf3tasYyLdTNWOc7q+989Ox +T3gYeMX5YV0HbYOwAJEPAgxs6jrBKqPNNd5fxinGwG/jhoHxtHt8bI0Z0gxc +67NU35120UBLz2YmA3vGP1Wp0Y5w2rTXfR0DeaQ4+/7S423ScXNJtDIDu8P8 +S57SHm7MVL6ly8CgaVc7d9o39bibXxoy8HeC6AZZ2tHs4y5TyEAFOvyH6fkn +UhB4QsmagT+qkrodaY9JDIpa2jFwQG9f+CraVIZdeYAzA/WvuT+sp+e3bbx+ +71VPBraRL5JEaMv8Kd93z4+BtxvT/zTS9TFxkMk5tIeBy+J7lPxoJwatVhWL +YGB1XEB1IV1fTdZDJ1MTGahG7rzyh67X1Af24jdTGCj6a2D2DG131qOK1nQG +Hk38wSdG+6dqZd+yKwx8lJeZIu9DgaZAnNoRkoF/d/R3itD5wJE8+yC7hoEV +R1Kckuk86eQMdqupZ2BpkULRbw8K/pl1iJ9+yMBhj7qybjp/CnvlBwL76fE6 +mxXiTefVAfuLofEjDPy66+y+BjcKsI1nxbUxBp5N+w+EaA/Vz6kPTzKQPZQX +UOdK91fekwQnTiaabWgbekPn4ZgoS+oAFxP39pL5TNpUGkme5WHiY9dKY28n +ur9O5Ay2iTIxaukrZjedp4n+ezWNlZnICNM/lUXn70+ltcMqzkzkF+rqO03n ++dwViTgtNyYmHtM8epnO+xk+BXl9Tya2nf+sXGFG1/N3/eAte5joG6bR+GQL +BW/rfefcjjEx+uHP+/30+tFmfZs3sYiJ7zqEPcM30fP97n0ypZSJHFM3Du/U +o/NH7alTRiUTXXylq410KWgUHM3JrWWim1ZB5oIW3f4B7nW3Opgo9n2ZopMa +nYf/eMDbWSbame7LjFGgIGso6O3HBSau+e3pu0megvO24fFf/jLx41HXwEkm +PZ5aie3zq+QwReqwiAO9np74RbrwychhTd9unXl6vf0neXmokZkcxvlMXmji +o8Co7Gb+hQty2FugzWv9g4QBoixv6yU5/IcVIdk6S0L0hZLcmTw5nGKKv9ky +Q8LtuOLLDiVy+PX5lwydaXo/4Jqfzdsgh/ddHB/8Gidhw/LzaQmjcmg0WMWS +Gqb3P55HYg8qy2NqHdrfaibhVldUjIKGPF7Qydo30USCk9Xh41068vhW66kf +4x4J6TqRRzVBHuNOOX86VU8Cz5qQw5P28ljy6qyvZjUJy2p9QgMOyaMqz/D6 +9UUkTAtYee1olscFSJ5MiCehdy/zefBjeWxedoJle5KEpkcLEPNUHsME2BrC +cSSkRZfJ3uiRx6WCuXw5R0lQf7tm5Oe4PFrdNms/HU7CfvLZ7iuCCujg9CF1 +xouEcVvnXWN+Csg4HtEobUDC2BmvHQdWKuKx3nBDzg9s2D+uzFRfo4h+jz4/ +DXnHhh/mP798WauIzWkORf1v2MDNmR6/R0IRs2Pn1coG2KAe1VLtpaKIVr1H +n+m9YMMxf0VBW0dFzB0dseGg97MimyeeKeXR35NU5nWh97+WXw9Zvtddh5k6 +x294a7NhwpcrvDpmPfJaHfzOcauCPq+ILj3dvAG9amZnCkZvgkCHYir760Yc +6v2cliRUBlKJlXa6usq4NIi3uImvBLKV9NcKBqpgq5TgtZ2K16FNwljn+zlV +DJ7dPHDVvAgMpJrT1HrU8NPlad33FteAl7MgwvuEOsq3t5pZRl8FmThZo52K +Grilz3Ctt1YerFJwr3F4rIF/BrnGztdcAlWWeOWh3Zp4af/HCOmSbDgwLNBi +xaGFH6q5JcYzM+Hr9zPOltla2HhAPu73dDqYqz3KsVTRRt6ky1yBGWnQ+N3w +149ObbyWcHEDf8wZ2K+s2f/CXwctygUSnC4mAmvSr2vnKl2kdKN65F6fgq3y +Ytt5CnTxPFdmd2tjHKyP/fdws54etpSOhnQqHIeN/vr3FPr18FXueZaZRBT4 +Nwadqg7bhGy9wfuZqyLhXn6X37SwPiaPLV7PNA2DmRt/f6jd1sdE3ykFL5O9 +4KtQtipnuwEqrAj50GYbCNEPPYIV7Qzw5bkD4yJGgZDmL9BOORhgbiwLw9YH +QkNR1Jl2FwPU6rzdZLckEIQULfgWvQ3w3LlSzbqqAHik+F7I66ABzmX+7FCT +DICN62UJxTwDTM/YxrF/xg+mN2boUlMGyNtmnhvT6QO9T3Gr4HcD9KYkcvXu ++UDT/knHiFn6+T3GAQuVPpBKWYbpLhggS95IL/+cD2w04LhZx2mI6SJ6mnud +fcDHch+jRcQQfV79u5VjxBu6As3XdBkZovbYJ7GvP73gTuGv0dlEQ3zEoyyD +lzxA1zTih1WyIWak3E3QO+EBt0Yn1uSnGGLhes0h3OMBlMywnlU6befpDUl6 +HnAzuykl95Ih6jQOy3zt2g35Z+L1zSsMsaUf/FYK7oakCL5z2a8MMXFo5DLj +8i5w2yKHhjJG2Mot/b59xBUWu7h4WwgjFDkrOrOh1RXy/ScHrOSMcGPCjEoO +5QofEmoPua03wtCU1d/Y8a5woNW2MkrTCEuzh4JrlF3hX5ujMnfMjPBZUFup +yHEXqHPt/q0dYoTJUZzv+1R2gOS+07WqTUY4sBBz8HOjI6T+DdBJbjaiz+fh +HFS5IyxNNyM/PjBCZdn00dOXHWG8ZnlJfqsR+q1ISdgV7Qh1HKeyBV4Z4clJ +7j1XdR3B7Xzsobn3Rvi0QpM7n3SA7PooncbVLHRIXuOvQtqDMPdecrsLCx+N +mmsdLLGFQtNj0VM7WejHc6/yQ5ItaB5LNc1wZ+GZmiKb8GBbsJlid/d6s/DZ +wx25b5RsIaFn9qfvXha6Bq7WXMW2gfmCGJPoOBai7vydmLvbod8w41VxGQtj +o7O0wyasISiy8LJlBQtvXDoez3puDXMVt/wn2PT33pX4yVVbgwCz94dGDQvZ +o3uPGx61Bmsuaam7TSw0bbs8l8NjDQ1dxX6vuln4AdV7l+tYgRXvHZWDvSy0 +HM7q9Zawgl7z1jmxARYm9Eir9fy1hJm6/xI93rAww0YkfWW7JahcVS//PM7C +209BMtnHEhr6jQ+e+cJCyZHO29ctLMFKyBHUplhYkdMhMKhqCQGnI19EzLJw +8ZtMbfIvC5hpSsgRnac9uHZkxVsLOLGQ5Vu3QP8vJ3n44hMLWKtdorx7kYWs +nn/CTSstIHdf3ezfvyy8YFrbsOyCBfwPsDweKQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8V98fB3ClIYXszf18jIa9Mz693yizbJFkr3wrhIoGKuIrEolUSCiE +z72kjCRaiBaypbR8JQpJqd/9/XUfz8cdj3PPOe/XOYfhE+Lgv5SDg4OxhIPj +/9e54dYH8smFm3OlVbfeiDXZ3JUrFmXcewJMFqJG5ucJQOFnPmK96bAldPvo +i3l1OGhX+pqztwDceiz23Z5H4J8UTf/5mgIV63bP1Hk7GGmwCZl53Qy1z86n +cM97gZn8+ND065cAo0KXVs+Fws/XeplTr9/Ci4E6lsRkLLSYXi98UfAd5IML +HlTGnAOpkdoPPsqLUKWTlTpWehGE9nqWrjTlxPtnT77Jv54P6Rpm9TbOXNjt +H7W0N7EQ+rLVm6bX8uB/iUUmOHAdkgtjni0V58dISdUCZeEyED3/LinjiiCO +lRfWbOsuBzGlW6fmiwUxJi4p7u5wOUg0J8TsZgvix1pnxvpP5SAztSFyXYsg +8i6+6x9fKAeFbaFe9Z8EUeTAamFFogK0li3qvtMSwuTOtcUH9lSAbYTImGab +EE5JQoX7jwo47WS5+eWcMHKtZIXJcrBBorpTYukSEQwqI1m+y9hQIej0Q2O1 +CH5Uum92jYsNPS892OdkRdBGnJNHjJ8N8vYRTHsLEVQsKPToYrCheXveiucX +RVBosPpelgkbFs1mOzuMRHHJ9j985nFsSCuOLls0E0W9/HX1/PH0+ys4ElXs +RTHSzjS7N5EN2x5yG6f4i2J73u6PbmlsyDElqraliuLn4PsvNfLYsAmts9pH +RHGcJcpe38CGcP2rnq0nxJC/5KqH/nc2WOXzzlifEcODN7VK7OfYwFx5NLEz +UwzHarJyA36y4XnXDvLVDTH8RFxLSvjLBtXQNZzDnWLIO53nmbuahE/Fh4q/ +SYijgOSh5apyJLgL2XyRrBJHnZ7TJh22JGgdqY/LbRBHzxdv3kY7kMD9dr0I +45E4NvIeVVVwJqG2khMU+8RRvL/jcYgbCSLWtWnqf8XR5X7Q8iE/Ep7HyWtv +tZZAzwatB6JRJGz5uhC9/50Emt34bcqXR0KUxfmN9yckMDlyibL5VRIqrqr0 +C85JYHfil7Ej10gQc/LSr+WSxH8vmbUNXCdh4s7DH5yqktjLbAyKZJOQcSIt +4uJhSdy62Kuw9j4Jb4UV9z/gkcKQxUs734+QIBpyT1pUVAqpO7Yvb4+SsO2J +a8ceQgq3+nPKn35HQk10sjKflhQ+si51lPpIwr8jU+M7XaVwZNOHCWKSBM2S ++sCvBVJoJnfcPuMXCXFG9t4Sm6Qx4Husn6wQBRYeud/0TKSxwzC++KYwBbyx +/5103iaNQn/MUVeUgsst8cVpXtKYtU392GYJCu5Y1f23Ikkav5iPKskRFEy5 +yh383ieN9yeMB1hKFNyODl3JPyaNrUk6g2nKFBy/fDdbdVIaNymv2fxGhYI1 +b1zq9yyVQf0/rxQj1ClYF3iG481GGayaW5cbqkOBR+Tsv0+PyCBXVSDVsJkC +hSwTqfF4GSywUufpAYruv7PlK9NkULtT/tV/SEH07w3PTQplsPSD1bU1phRk +nvQQrn0qg8qS/YFy5hS4F5UV9/TI4Fc+SzXCggLm43m9mTcy+F44PFDckgI2 +d4ab2qwMchZ2KS+xpuDpucd5RdKy+PzIWqLYhoKMKiGNlnWy6MKbEZdgS4Fb +t3fzGw1ZtNhZtNPXjoJPYr/HJM1kMbP1UKiAAwWc+eob0/fLoqHnChszZwoM +Ki5WH78ni01tLyKX76Jgy+vOxcknsijV23yogLYNxzJzz5eyONijGmrkToGv +w/4+eC+L7SFS5oG7KTA7woiJXU6gy+hCXrYnBe18Ddc2cROo0BMcJO1FgV3h +jidTvAROe1Yp59He1ZHM7y1GoOfF5LKL3hSEys5dM1YicIqDzAz2pWC2Ku3J +TzUCg/I22b2mHW2h9IXUJnDecd0aYz8K4sO8dJmbCVRO4Ute7U8B94pfbv0m +BOrXRNrupZ2WkxmTbk6gAUtKrI12Tkvbk6X2BJ7qXV17NIACWVf/L3XO9P2Y +x+kvaBdO/OUPdyPw3vUb4XKBFFQK6+x650tg9J0n2xtpa5c+i7kURGAhf6zF +yiAK6jYHFzruI/BCx/bt22k/CMz70nKQwEZbhcPPaVv+1hc4eoTAj87leTx7 +KOhM69LVjiWwhWXRZU7bSSFk18QpAnlnakRiaPfVrootTCLwu1R9YBVtD5vC +QvdUApMERZ+M0R57u7lVKINA988pmwSDKZhcHSEQf5l+f8XgtkDa4fm8eqyr +BNb9Mvp2hva8dsmu2SICQeVpaSXt462mseWlBH7Qtjv0jDanx3ChfyWBB7zS +XCdoJ3473CpdTWAO28l2xT90fZ0WnOy+Q2BKr7+7NO0MyQqB1LsEhrBSYjVo +i7Et9MyaCRycPd9gQvvKlne7/jwi0LfVnN+eNrPvWGxNO90+9bAYd9o39okV +7X9OYK/90Ep/2ipLq1oVuwlUWbGzLJg2dWH75HAfgeGvyOB9tDcpfRLIGibw +0OQts//77r0TerbvCFxioI3/f97ESdp95ScCDc1+u/jRfvzpduy9CQIt7YZT +d9Hedsyh6NA0geXGZe9tab/k/9KqNkfg60rt3ca0XYpPT35coP93YNucGu1B +A6Zg/l8CSfYjUpK2z7MGPddlDNR4GJm2jPZHXxf3tasYyLdTNWOc7q+989Ox +T3gYeMX5YV0HbYOwAJEPAgxs6jrBKqPNNd5fxinGwG/jhoHxtHt8bI0Z0gxc +67NU35120UBLz2YmA3vGP1Wp0Y5w2rTXfR0DeaQ4+/7S423ScXNJtDIDu8P8 +S57SHm7MVL6ly8CgaVc7d9o39bibXxoy8HeC6AZZ2tHs4y5TyEAFOvyH6fkn +UhB4QsmagT+qkrodaY9JDIpa2jFwQG9f+CraVIZdeYAzA/WvuT+sp+e3bbx+ +71VPBraRL5JEaMv8Kd93z4+BtxvT/zTS9TFxkMk5tIeBy+J7lPxoJwatVhWL +YGB1XEB1IV1fTdZDJ1MTGahG7rzyh67X1Af24jdTGCj6a2D2DG131qOK1nQG +Hk38wSdG+6dqZd+yKwx8lJeZIu9DgaZAnNoRkoF/d/R3itD5wJE8+yC7hoEV +R1Kckuk86eQMdqupZ2BpkULRbw8K/pl1iJ9+yMBhj7qybjp/CnvlBwL76fE6 +mxXiTefVAfuLofEjDPy66+y+BjcKsI1nxbUxBp5N+w+EaA/Vz6kPTzKQPZQX +UOdK91fekwQnTiaabWgbekPn4ZgoS+oAFxP39pL5TNpUGkme5WHiY9dKY28n +ur9O5Ay2iTIxaukrZjedp4n+ezWNlZnICNM/lUXn70+ltcMqzkzkF+rqO03n ++dwViTgtNyYmHtM8epnO+xk+BXl9Tya2nf+sXGFG1/N3/eAte5joG6bR+GQL +BW/rfefcjjEx+uHP+/30+tFmfZs3sYiJ7zqEPcM30fP97n0ypZSJHFM3Du/U +o/NH7alTRiUTXXylq410KWgUHM3JrWWim1ZB5oIW3f4B7nW3Opgo9n2ZopMa +nYf/eMDbWSbame7LjFGgIGso6O3HBSau+e3pu0megvO24fFf/jLx41HXwEkm +PZ5aie3zq+QwReqwiAO9np74RbrwychhTd9unXl6vf0neXmokZkcxvlMXmji +o8Co7Gb+hQty2FugzWv9g4QBoixv6yU5/IcVIdk6S0L0hZLcmTw5nGKKv9ky +Q8LtuOLLDiVy+PX5lwydaXo/4Jqfzdsgh/ddHB/8Gidhw/LzaQmjcmg0WMWS +Gqb3P55HYg8qy2NqHdrfaibhVldUjIKGPF7Qydo30USCk9Xh41068vhW66kf +4x4J6TqRRzVBHuNOOX86VU8Cz5qQw5P28ljy6qyvZjUJy2p9QgMOyaMqz/D6 +9UUkTAtYee1olscFSJ5MiCehdy/zefBjeWxedoJle5KEpkcLEPNUHsME2BrC +cSSkRZfJ3uiRx6WCuXw5R0lQf7tm5Oe4PFrdNms/HU7CfvLZ7iuCCujg9CF1 +xouEcVvnXWN+Csg4HtEobUDC2BmvHQdWKuKx3nBDzg9s2D+uzFRfo4h+jz4/ +DXnHhh/mP798WauIzWkORf1v2MDNmR6/R0IRs2Pn1coG2KAe1VLtpaKIVr1H +n+m9YMMxf0VBW0dFzB0dseGg97MimyeeKeXR35NU5nWh97+WXw9Zvtddh5k6 +x294a7NhwpcrvDpmPfJaHfzOcauCPq+ILj3dvAG9amZnCkZvgkCHYir760Yc +6v2cliRUBlKJlXa6usq4NIi3uImvBLKV9NcKBqpgq5TgtZ2K16FNwljn+zlV +DJ7dPHDVvAgMpJrT1HrU8NPlad33FteAl7MgwvuEOsq3t5pZRl8FmThZo52K +Grilz3Ctt1YerFJwr3F4rIF/BrnGztdcAlWWeOWh3Zp4af/HCOmSbDgwLNBi +xaGFH6q5JcYzM+Hr9zPOltla2HhAPu73dDqYqz3KsVTRRt6ky1yBGWnQ+N3w +149ObbyWcHEDf8wZ2K+s2f/CXwctygUSnC4mAmvSr2vnKl2kdKN65F6fgq3y +Ytt5CnTxPFdmd2tjHKyP/fdws54etpSOhnQqHIeN/vr3FPr18FXueZaZRBT4 +Nwadqg7bhGy9wfuZqyLhXn6X37SwPiaPLV7PNA2DmRt/f6jd1sdE3ykFL5O9 +4KtQtipnuwEqrAj50GYbCNEPPYIV7Qzw5bkD4yJGgZDmL9BOORhgbiwLw9YH +QkNR1Jl2FwPU6rzdZLckEIQULfgWvQ3w3LlSzbqqAHik+F7I66ABzmX+7FCT +DICN62UJxTwDTM/YxrF/xg+mN2boUlMGyNtmnhvT6QO9T3Gr4HcD9KYkcvXu ++UDT/knHiFn6+T3GAQuVPpBKWYbpLhggS95IL/+cD2w04LhZx2mI6SJ6mnud +fcDHch+jRcQQfV79u5VjxBu6As3XdBkZovbYJ7GvP73gTuGv0dlEQ3zEoyyD +lzxA1zTih1WyIWak3E3QO+EBt0Yn1uSnGGLhes0h3OMBlMywnlU6befpDUl6 +HnAzuykl95Ih6jQOy3zt2g35Z+L1zSsMsaUf/FYK7oakCL5z2a8MMXFo5DLj +8i5w2yKHhjJG2Mot/b59xBUWu7h4WwgjFDkrOrOh1RXy/ScHrOSMcGPCjEoO +5QofEmoPua03wtCU1d/Y8a5woNW2MkrTCEuzh4JrlF3hX5ujMnfMjPBZUFup +yHEXqHPt/q0dYoTJUZzv+1R2gOS+07WqTUY4sBBz8HOjI6T+DdBJbjaiz+fh +HFS5IyxNNyM/PjBCZdn00dOXHWG8ZnlJfqsR+q1ISdgV7Qh1HKeyBV4Z4clJ +7j1XdR3B7Xzsobn3Rvi0QpM7n3SA7PooncbVLHRIXuOvQtqDMPdecrsLCx+N +mmsdLLGFQtNj0VM7WejHc6/yQ5ItaB5LNc1wZ+GZmiKb8GBbsJlid/d6s/DZ +wx25b5RsIaFn9qfvXha6Bq7WXMW2gfmCGJPoOBai7vydmLvbod8w41VxGQtj +o7O0wyasISiy8LJlBQtvXDoez3puDXMVt/wn2PT33pX4yVVbgwCz94dGDQvZ +o3uPGx61Bmsuaam7TSw0bbs8l8NjDQ1dxX6vuln4AdV7l+tYgRXvHZWDvSy0 +HM7q9Zawgl7z1jmxARYm9Eir9fy1hJm6/xI93rAww0YkfWW7JahcVS//PM7C +209BMtnHEhr6jQ+e+cJCyZHO29ctLMFKyBHUplhYkdMhMKhqCQGnI19EzLJw +8ZtMbfIvC5hpSsgRnac9uHZkxVsLOLGQ5Vu3QP8vJ3n44hMLWKtdorx7kYWs +nn/CTSstIHdf3ezfvyy8YFrbsOyCBfwPsDweKQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07195171217774803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07195171217774803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8V98fB3ClIYXszf18jIa9Mz693yizbJFkr3wrhIoGKuIrEolUSCiE +z72kjCRaiBaypbR8JQpJqd/9/XUfz8cdj3PPOe/XOYfhE+Lgv5SDg4OxhIPj +/9e54dYH8smFm3OlVbfeiDXZ3JUrFmXcewJMFqJG5ucJQOFnPmK96bAldPvo +i3l1OGhX+pqztwDceiz23Z5H4J8UTf/5mgIV63bP1Hk7GGmwCZl53Qy1z86n +cM97gZn8+ND065cAo0KXVs+Fws/XeplTr9/Ci4E6lsRkLLSYXi98UfAd5IML +HlTGnAOpkdoPPsqLUKWTlTpWehGE9nqWrjTlxPtnT77Jv54P6Rpm9TbOXNjt +H7W0N7EQ+rLVm6bX8uB/iUUmOHAdkgtjni0V58dISdUCZeEyED3/LinjiiCO +lRfWbOsuBzGlW6fmiwUxJi4p7u5wOUg0J8TsZgvix1pnxvpP5SAztSFyXYsg +8i6+6x9fKAeFbaFe9Z8EUeTAamFFogK0li3qvtMSwuTOtcUH9lSAbYTImGab +EE5JQoX7jwo47WS5+eWcMHKtZIXJcrBBorpTYukSEQwqI1m+y9hQIej0Q2O1 +CH5Uum92jYsNPS892OdkRdBGnJNHjJ8N8vYRTHsLEVQsKPToYrCheXveiucX +RVBosPpelgkbFs1mOzuMRHHJ9j985nFsSCuOLls0E0W9/HX1/PH0+ys4ElXs +RTHSzjS7N5EN2x5yG6f4i2J73u6PbmlsyDElqraliuLn4PsvNfLYsAmts9pH +RHGcJcpe38CGcP2rnq0nxJC/5KqH/nc2WOXzzlifEcODN7VK7OfYwFx5NLEz +UwzHarJyA36y4XnXDvLVDTH8RFxLSvjLBtXQNZzDnWLIO53nmbuahE/Fh4q/ +SYijgOSh5apyJLgL2XyRrBJHnZ7TJh22JGgdqY/LbRBHzxdv3kY7kMD9dr0I +45E4NvIeVVVwJqG2khMU+8RRvL/jcYgbCSLWtWnqf8XR5X7Q8iE/Ep7HyWtv +tZZAzwatB6JRJGz5uhC9/50Emt34bcqXR0KUxfmN9yckMDlyibL5VRIqrqr0 +C85JYHfil7Ej10gQc/LSr+WSxH8vmbUNXCdh4s7DH5yqktjLbAyKZJOQcSIt +4uJhSdy62Kuw9j4Jb4UV9z/gkcKQxUs734+QIBpyT1pUVAqpO7Yvb4+SsO2J +a8ceQgq3+nPKn35HQk10sjKflhQ+si51lPpIwr8jU+M7XaVwZNOHCWKSBM2S ++sCvBVJoJnfcPuMXCXFG9t4Sm6Qx4Husn6wQBRYeud/0TKSxwzC++KYwBbyx +/5103iaNQn/MUVeUgsst8cVpXtKYtU392GYJCu5Y1f23Ikkav5iPKskRFEy5 +yh383ieN9yeMB1hKFNyODl3JPyaNrUk6g2nKFBy/fDdbdVIaNymv2fxGhYI1 +b1zq9yyVQf0/rxQj1ClYF3iG481GGayaW5cbqkOBR+Tsv0+PyCBXVSDVsJkC +hSwTqfF4GSywUufpAYruv7PlK9NkULtT/tV/SEH07w3PTQplsPSD1bU1phRk +nvQQrn0qg8qS/YFy5hS4F5UV9/TI4Fc+SzXCggLm43m9mTcy+F44PFDckgI2 +d4ab2qwMchZ2KS+xpuDpucd5RdKy+PzIWqLYhoKMKiGNlnWy6MKbEZdgS4Fb +t3fzGw1ZtNhZtNPXjoJPYr/HJM1kMbP1UKiAAwWc+eob0/fLoqHnChszZwoM +Ki5WH78ni01tLyKX76Jgy+vOxcknsijV23yogLYNxzJzz5eyONijGmrkToGv +w/4+eC+L7SFS5oG7KTA7woiJXU6gy+hCXrYnBe18Ddc2cROo0BMcJO1FgV3h +jidTvAROe1Yp59He1ZHM7y1GoOfF5LKL3hSEys5dM1YicIqDzAz2pWC2Ku3J +TzUCg/I22b2mHW2h9IXUJnDecd0aYz8K4sO8dJmbCVRO4Ute7U8B94pfbv0m +BOrXRNrupZ2WkxmTbk6gAUtKrI12Tkvbk6X2BJ7qXV17NIACWVf/L3XO9P2Y +x+kvaBdO/OUPdyPw3vUb4XKBFFQK6+x650tg9J0n2xtpa5c+i7kURGAhf6zF +yiAK6jYHFzruI/BCx/bt22k/CMz70nKQwEZbhcPPaVv+1hc4eoTAj87leTx7 +KOhM69LVjiWwhWXRZU7bSSFk18QpAnlnakRiaPfVrootTCLwu1R9YBVtD5vC +QvdUApMERZ+M0R57u7lVKINA988pmwSDKZhcHSEQf5l+f8XgtkDa4fm8eqyr +BNb9Mvp2hva8dsmu2SICQeVpaSXt462mseWlBH7Qtjv0jDanx3ChfyWBB7zS +XCdoJ3473CpdTWAO28l2xT90fZ0WnOy+Q2BKr7+7NO0MyQqB1LsEhrBSYjVo +i7Et9MyaCRycPd9gQvvKlne7/jwi0LfVnN+eNrPvWGxNO90+9bAYd9o39okV +7X9OYK/90Ep/2ipLq1oVuwlUWbGzLJg2dWH75HAfgeGvyOB9tDcpfRLIGibw +0OQts//77r0TerbvCFxioI3/f97ESdp95ScCDc1+u/jRfvzpduy9CQIt7YZT +d9Hedsyh6NA0geXGZe9tab/k/9KqNkfg60rt3ca0XYpPT35coP93YNucGu1B +A6Zg/l8CSfYjUpK2z7MGPddlDNR4GJm2jPZHXxf3tasYyLdTNWOc7q+989Ox +T3gYeMX5YV0HbYOwAJEPAgxs6jrBKqPNNd5fxinGwG/jhoHxtHt8bI0Z0gxc +67NU35120UBLz2YmA3vGP1Wp0Y5w2rTXfR0DeaQ4+/7S423ScXNJtDIDu8P8 +S57SHm7MVL6ly8CgaVc7d9o39bibXxoy8HeC6AZZ2tHs4y5TyEAFOvyH6fkn +UhB4QsmagT+qkrodaY9JDIpa2jFwQG9f+CraVIZdeYAzA/WvuT+sp+e3bbx+ +71VPBraRL5JEaMv8Kd93z4+BtxvT/zTS9TFxkMk5tIeBy+J7lPxoJwatVhWL +YGB1XEB1IV1fTdZDJ1MTGahG7rzyh67X1Af24jdTGCj6a2D2DG131qOK1nQG +Hk38wSdG+6dqZd+yKwx8lJeZIu9DgaZAnNoRkoF/d/R3itD5wJE8+yC7hoEV +R1Kckuk86eQMdqupZ2BpkULRbw8K/pl1iJ9+yMBhj7qybjp/CnvlBwL76fE6 +mxXiTefVAfuLofEjDPy66+y+BjcKsI1nxbUxBp5N+w+EaA/Vz6kPTzKQPZQX +UOdK91fekwQnTiaabWgbekPn4ZgoS+oAFxP39pL5TNpUGkme5WHiY9dKY28n +ur9O5Ay2iTIxaukrZjedp4n+ezWNlZnICNM/lUXn70+ltcMqzkzkF+rqO03n ++dwViTgtNyYmHtM8epnO+xk+BXl9Tya2nf+sXGFG1/N3/eAte5joG6bR+GQL +BW/rfefcjjEx+uHP+/30+tFmfZs3sYiJ7zqEPcM30fP97n0ypZSJHFM3Du/U +o/NH7alTRiUTXXylq410KWgUHM3JrWWim1ZB5oIW3f4B7nW3Opgo9n2ZopMa +nYf/eMDbWSbame7LjFGgIGso6O3HBSau+e3pu0megvO24fFf/jLx41HXwEkm +PZ5aie3zq+QwReqwiAO9np74RbrwychhTd9unXl6vf0neXmokZkcxvlMXmji +o8Co7Gb+hQty2FugzWv9g4QBoixv6yU5/IcVIdk6S0L0hZLcmTw5nGKKv9ky +Q8LtuOLLDiVy+PX5lwydaXo/4Jqfzdsgh/ddHB/8Gidhw/LzaQmjcmg0WMWS +Gqb3P55HYg8qy2NqHdrfaibhVldUjIKGPF7Qydo30USCk9Xh41068vhW66kf +4x4J6TqRRzVBHuNOOX86VU8Cz5qQw5P28ljy6qyvZjUJy2p9QgMOyaMqz/D6 +9UUkTAtYee1olscFSJ5MiCehdy/zefBjeWxedoJle5KEpkcLEPNUHsME2BrC +cSSkRZfJ3uiRx6WCuXw5R0lQf7tm5Oe4PFrdNms/HU7CfvLZ7iuCCujg9CF1 +xouEcVvnXWN+Csg4HtEobUDC2BmvHQdWKuKx3nBDzg9s2D+uzFRfo4h+jz4/ +DXnHhh/mP798WauIzWkORf1v2MDNmR6/R0IRs2Pn1coG2KAe1VLtpaKIVr1H +n+m9YMMxf0VBW0dFzB0dseGg97MimyeeKeXR35NU5nWh97+WXw9Zvtddh5k6 +x294a7NhwpcrvDpmPfJaHfzOcauCPq+ILj3dvAG9amZnCkZvgkCHYir760Yc +6v2cliRUBlKJlXa6usq4NIi3uImvBLKV9NcKBqpgq5TgtZ2K16FNwljn+zlV +DJ7dPHDVvAgMpJrT1HrU8NPlad33FteAl7MgwvuEOsq3t5pZRl8FmThZo52K +Grilz3Ctt1YerFJwr3F4rIF/BrnGztdcAlWWeOWh3Zp4af/HCOmSbDgwLNBi +xaGFH6q5JcYzM+Hr9zPOltla2HhAPu73dDqYqz3KsVTRRt6ky1yBGWnQ+N3w +149ObbyWcHEDf8wZ2K+s2f/CXwctygUSnC4mAmvSr2vnKl2kdKN65F6fgq3y +Ytt5CnTxPFdmd2tjHKyP/fdws54etpSOhnQqHIeN/vr3FPr18FXueZaZRBT4 +Nwadqg7bhGy9wfuZqyLhXn6X37SwPiaPLV7PNA2DmRt/f6jd1sdE3ykFL5O9 +4KtQtipnuwEqrAj50GYbCNEPPYIV7Qzw5bkD4yJGgZDmL9BOORhgbiwLw9YH +QkNR1Jl2FwPU6rzdZLckEIQULfgWvQ3w3LlSzbqqAHik+F7I66ABzmX+7FCT +DICN62UJxTwDTM/YxrF/xg+mN2boUlMGyNtmnhvT6QO9T3Gr4HcD9KYkcvXu ++UDT/knHiFn6+T3GAQuVPpBKWYbpLhggS95IL/+cD2w04LhZx2mI6SJ6mnud +fcDHch+jRcQQfV79u5VjxBu6As3XdBkZovbYJ7GvP73gTuGv0dlEQ3zEoyyD +lzxA1zTih1WyIWak3E3QO+EBt0Yn1uSnGGLhes0h3OMBlMywnlU6befpDUl6 +HnAzuykl95Ih6jQOy3zt2g35Z+L1zSsMsaUf/FYK7oakCL5z2a8MMXFo5DLj +8i5w2yKHhjJG2Mot/b59xBUWu7h4WwgjFDkrOrOh1RXy/ScHrOSMcGPCjEoO +5QofEmoPua03wtCU1d/Y8a5woNW2MkrTCEuzh4JrlF3hX5ujMnfMjPBZUFup +yHEXqHPt/q0dYoTJUZzv+1R2gOS+07WqTUY4sBBz8HOjI6T+DdBJbjaiz+fh +HFS5IyxNNyM/PjBCZdn00dOXHWG8ZnlJfqsR+q1ISdgV7Qh1HKeyBV4Z4clJ +7j1XdR3B7Xzsobn3Rvi0QpM7n3SA7PooncbVLHRIXuOvQtqDMPdecrsLCx+N +mmsdLLGFQtNj0VM7WejHc6/yQ5ItaB5LNc1wZ+GZmiKb8GBbsJlid/d6s/DZ +wx25b5RsIaFn9qfvXha6Bq7WXMW2gfmCGJPoOBai7vydmLvbod8w41VxGQtj +o7O0wyasISiy8LJlBQtvXDoez3puDXMVt/wn2PT33pX4yVVbgwCz94dGDQvZ +o3uPGx61Bmsuaam7TSw0bbs8l8NjDQ1dxX6vuln4AdV7l+tYgRXvHZWDvSy0 +HM7q9Zawgl7z1jmxARYm9Eir9fy1hJm6/xI93rAww0YkfWW7JahcVS//PM7C +209BMtnHEhr6jQ+e+cJCyZHO29ctLMFKyBHUplhYkdMhMKhqCQGnI19EzLJw +8ZtMbfIvC5hpSsgRnac9uHZkxVsLOLGQ5Vu3QP8vJ3n44hMLWKtdorx7kYWs +nn/CTSstIHdf3ezfvyy8YFrbsOyCBfwPsDweKQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07195171217774803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQPbvDZYzPlZag/hfbD3U7/5qshrApTP4DDL6blp +WecsKJ/DISMqKdXk00IoX8BBu/NNsw73MihfxOHJl681Z4tWQvkSDrM2ZlhZ +S66B8mUctkzRUV/4ZS2Ur+AgzivZH8S5HspXcnj6Sf5SfjyMr+Lwd4FekAY3 +jK/mcN3A+XGnwjooX8OhX+YlT88emPlaDnOMF20x/7EKytdx4N/V4pz/cQWU +r+dQ+frP7dT9MPcaODDN9Zy9qnoJlG/o4NF1YkOX+SIo38jBrSpwdzzrAijf +2OG2ybbrTfdmQ/kmDlP2CRTd+z8dyjd1CHjIEaRZNgXKN3PY+ldb29drIpRv +7rDz/4mSF196oHwLB9uriuaHeTugfEuHY3e2ttRcaIbyrRzidm95uMGkAcq3 +dvhiKC/wwqcKyrdx4P/IH11lAos/W4cw/hntPj8LoHw7B96HM1L9mbLtAUP6 +haw= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061275}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07195171217774803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943574765199003`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"cb15f48b-8781-4b9f-beb1-0ddc94d865e0"] +}, Open ]], Cell[CellGroupData[{ @@ -13232,18 +15064,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.804221171604008`*^-157\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 73, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435747657695*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"cdf7277c-3f2a-407b-b003-ddf4053dd2fa"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.644934846771783`*^-160\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 74, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357476585246*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"cea51cbf-513f-43a2-b91f-d8d71caf5cfb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.536320475992273`*^-162\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 75, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357476593474*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"6793d600-7d6b-40ef-89c2-4b4ad354f6f1"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 142, 76, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357476602714*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"3ad75f5b-ee25-425b-8bc6-cfd64f31c259"], + +Cell[BoxData["10.57398540594292`"], "Output", + CellChangeTimes->{3.994357540108389*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"43cb15e5-f418-4899-b8bb-57bedf1eee64"] }, Open ]], Cell[CellGroupData[{ @@ -13310,27 +15199,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850391956293*^9, - 3.9918503966918755`*^9}},ExpressionUUID->"a3e3d205-e3b4-874a-a36c-\ -53cfa72184b4"], + CellChangeTimes->{{3.991850391956293*^9, 3.9918503966918755`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.416984361162205`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 77, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357540157462*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"a238e105-36ec-4e0b-9df7-50043cf6ce29"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.300980158345176`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 78, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357540165614*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"98d31a65-762f-4cf9-a44e-d869966334ce"], -Cell[BoxData["1.0713232818739324`"], "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.073810807554476`*^-220\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 79, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357540174397*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"93eb5c3d-f732-4fca-970e-e96d0b2e427a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 80, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357540183115*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"9118818c-73a5-45c9-81aa-d152003c08b4"], + +Cell[BoxData["0.39729315736859616`"], "Output", + CellChangeTimes->{3.994357548983574*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"99e4a745-7f07-46b8-9896-ac5e1fe6a372"] }, Open ]], Cell[CellGroupData[{ @@ -13351,8 +15288,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13397,27 +15333,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504007528324`*^9, - 3.991850403970867*^9}},ExpressionUUID->"6977f025-454e-0e4a-b118-\ -07bad9ba3e82"], + CellChangeTimes->{{3.9918504007528324`*^9, 3.991850403970867*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566a849f-fc85-4d42-a545-a46d44cf7346"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.416984361162205`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 81, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357549029207*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"901ca4b7-2e77-4ce1-9891-4f47500b9adc"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.300980158345176`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 82, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357549039103*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"7ce736a7-1f61-4ddc-9f4f-d23a49a8b6e4"], -Cell[BoxData["5.515504100347031`"], "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.073810807554476`*^-220\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 83, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357549049836*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"5ea39e41-a95a-416a-a8c6-6dd8f39b837e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 84, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357549057012*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"5156a8cc-3ccd-4dd0-a937-484c1188ab48"], + +Cell[BoxData["30.49906115385902`"], "Output", + CellChangeTimes->{3.994357557657702*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"bf2053ec-b885-4983-9333-3368d8943232"] }, Open ]], Cell[CellGroupData[{ @@ -13438,8 +15422,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13484,27 +15467,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504078476295`*^9, - 3.9918504110344543`*^9}},ExpressionUUID->"df8ecb01-788a-604d-b773-\ -f29bb610eb30"], + CellChangeTimes->{{3.9918504078476295`*^9, 3.9918504110344543`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.416984361162205`*^-211\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 85, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943575576996326`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"74ba1e6f-a22b-410f-9bd4-c9b7c1abe1d5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.300980158345176`*^-216\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 86, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357557708912*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"d9edfd6d-e887-4a95-b307-2f1935583b41"], -Cell[BoxData["17.107550304528036`"], "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.073810807554476`*^-220\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 87, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435755771625*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"204910a7-681b-468e-a0c9-c7aa99d9ff61"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 88, 31388290287561508530, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357557724091*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"24b451e2-43f4-4e17-b89f-a96306b00fdb"], + +Cell[BoxData["4.599865860921225`"], "Output", + CellChangeTimes->{3.994357563376562*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"6842076d-789f-4e8f-a8f9-186c6cb45f3c"] }, Open ]], Cell[CellGroupData[{ @@ -13513,21 +15544,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918504490520267`*^9, - 3.991850453720993*^9}},ExpressionUUID->"54a5e329-20bd-e742-afe8-\ -d2cfa007cfcf"], + CellChangeTimes->{{3.9918504490520267`*^9, 3.991850453720993*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[BoxData["0.11028946354837708`"], "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[BoxData["0.033542487472126147`"], "Output", + CellChangeTimes->{3.994357563425988*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"2115c273-19e3-490e-a61b-2dbb2f0e1526"] }, Open ]], Cell[BoxData[ RowBox[{"NotebookSave", "[", "]"}]], "Input", - CellChangeTimes->{{3.994085036527689*^9, - 3.9940850442982607`*^9}},ExpressionUUID->"2d6f49d4-1fcc-4bef-9913-\ -3930bef1b779"] + CellChangeTimes->{{3.994085036527689*^9, 3.9940850442982607`*^9}}, + CellLabel-> + "In[147]:=",ExpressionUUID->"2d6f49d4-1fcc-4bef-9913-3930bef1b779"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {Automatic, 15}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -13546,617 +15580,638 @@ CellTagsIndex->{} Notebook[{ Cell[CellGroupData[{ Cell[576, 22, 352, 6, 36, "Input",ExpressionUUID->"c62de598-43a4-4ade-b5eb-955d4b7d7879"], -Cell[931, 30, 326, 5, 41, "Output",ExpressionUUID->"02ee43ff-906a-40e5-b09b-17c16a41dd28"] +Cell[931, 30, 374, 6, 41, "Output",ExpressionUUID->"79fdfdb4-e046-4ddc-a593-62b0a4927527"] }, Open ]], Cell[CellGroupData[{ -Cell[1294, 40, 248, 4, 36, "Input",ExpressionUUID->"443c2931-8a20-441e-b187-045a02a9013b"], -Cell[1545, 46, 273, 4, 41, "Output",ExpressionUUID->"f8dc1e5d-820c-4798-af54-a797019ab4be"] +Cell[1342, 41, 248, 4, 36, "Input",ExpressionUUID->"443c2931-8a20-441e-b187-045a02a9013b"], +Cell[1593, 47, 321, 5, 41, "Output",ExpressionUUID->"f46ab142-ed61-4d11-a7ba-481ae80b2db7"] }, Open ]], Cell[CellGroupData[{ -Cell[1855, 55, 221, 4, 36, "Input",ExpressionUUID->"fb95b8d6-68e2-4212-85c8-47c4f59a1d74"], -Cell[2079, 61, 273, 4, 41, "Output",ExpressionUUID->"31e9d910-d4c0-45d6-869d-a05446246a18"] +Cell[1951, 57, 221, 4, 36, "Input",ExpressionUUID->"fb95b8d6-68e2-4212-85c8-47c4f59a1d74"], +Cell[2175, 63, 321, 5, 41, "Output",ExpressionUUID->"fd3a9126-0abb-46a0-8b06-dec7139ca5b1"] }, Open ]], Cell[CellGroupData[{ -Cell[2389, 70, 175, 3, 36, "Input",ExpressionUUID->"ec9e8c01-0ccd-45dc-b638-869becaeaaef"], -Cell[2567, 75, 271, 4, 41, "Output",ExpressionUUID->"8249d52c-d43f-41c2-8d25-817510c289dc"] +Cell[2533, 73, 175, 3, 36, "Input",ExpressionUUID->"ec9e8c01-0ccd-45dc-b638-869becaeaaef"], +Cell[2711, 78, 319, 5, 41, "Output",ExpressionUUID->"25d6c81c-bf74-416a-8347-1cbc77c797bc"] }, Open ]], Cell[CellGroupData[{ -Cell[2875, 84, 257, 7, 54, "Input",ExpressionUUID->"fd1283af-1f2c-45f0-ab3f-92f4112ffd00"], -Cell[3135, 93, 273, 4, 41, "Output",ExpressionUUID->"5b5015f2-87a4-47d3-a645-6d0566e97e8b"] +Cell[3067, 88, 257, 7, 54, "Input",ExpressionUUID->"fd1283af-1f2c-45f0-ab3f-92f4112ffd00"], +Cell[3327, 97, 323, 5, 41, "Output",ExpressionUUID->"c51270c6-c4a6-496f-ad2b-2ea871740907"] }, Open ]], Cell[CellGroupData[{ -Cell[3445, 102, 131, 2, 36, "Input",ExpressionUUID->"7a4077a9-3f50-428d-a6b3-85f1b7607ddc"], -Cell[3579, 106, 277, 4, 41, "Output",ExpressionUUID->"f6967b40-8618-4de8-a2f1-141001d765f4"] +Cell[3687, 107, 131, 2, 36, "Input",ExpressionUUID->"7a4077a9-3f50-428d-a6b3-85f1b7607ddc"], +Cell[3821, 111, 326, 5, 41, "Output",ExpressionUUID->"b2c3bad1-5695-4fd9-8d21-50aae712456c"] }, Open ]], Cell[CellGroupData[{ -Cell[3893, 115, 276, 6, 36, "Input",ExpressionUUID->"5590d9be-5fc0-4dd1-bfac-edcd428f0031"], -Cell[4172, 123, 291, 4, 41, "Output",ExpressionUUID->"74249ad1-680b-446c-a045-8f6317c9cbef"] +Cell[4184, 121, 276, 6, 36, "Input",ExpressionUUID->"5590d9be-5fc0-4dd1-bfac-edcd428f0031"], +Cell[4463, 129, 341, 5, 41, "Output",ExpressionUUID->"9f9c5904-898a-4b28-8f5a-35518fa5a3aa"] }, Open ]], Cell[CellGroupData[{ -Cell[4500, 132, 257, 7, 36, "Input",ExpressionUUID->"76002746-961d-4d23-b3fe-d4be05f7ca20"], -Cell[4760, 141, 290, 4, 41, "Output",ExpressionUUID->"df2ba0bd-028b-4353-8d9b-f8d9b00076c1"] +Cell[4841, 139, 257, 7, 36, "Input",ExpressionUUID->"76002746-961d-4d23-b3fe-d4be05f7ca20"], +Cell[5101, 148, 337, 5, 41, "Output",ExpressionUUID->"1a727c69-685f-4899-a6cd-2854aadbf295"] }, Open ]], Cell[CellGroupData[{ -Cell[5087, 150, 203, 3, 36, "Input",ExpressionUUID->"30539bc8-31d1-42a2-afd0-23e5ac7c7311"], -Cell[5293, 155, 252, 3, 41, "Output",ExpressionUUID->"80d73021-3e2d-472b-ade3-42924739b17c"] +Cell[5475, 158, 203, 3, 36, "Input",ExpressionUUID->"30539bc8-31d1-42a2-afd0-23e5ac7c7311"], +Cell[5681, 163, 302, 4, 41, "Output",ExpressionUUID->"62d5d4f0-6b89-41c9-821d-c4228e15a629"] }, Open ]], Cell[CellGroupData[{ -Cell[5582, 163, 204, 3, 36, "Input",ExpressionUUID->"3f8b5ee1-539d-4aa3-994a-ba60694a164f"], -Cell[5789, 168, 259, 3, 41, "Output",ExpressionUUID->"6a0f2ec6-de08-4ff1-a7d1-eeb267379119"] +Cell[6020, 172, 204, 3, 36, "Input",ExpressionUUID->"3f8b5ee1-539d-4aa3-994a-ba60694a164f"], +Cell[6227, 177, 308, 4, 41, "Output",ExpressionUUID->"eda409b1-2c8d-4c49-ac6c-4539cdae7454"] }, Open ]], Cell[CellGroupData[{ -Cell[6085, 176, 129, 2, 36, "Input",ExpressionUUID->"c3607326-7fbc-4bc0-850d-87bddc12f83e"], -Cell[6217, 180, 271, 4, 41, "Output",ExpressionUUID->"329f1bda-e626-4e2a-b51b-0cb5fefbdcc5"] +Cell[6572, 186, 129, 2, 36, "Input",ExpressionUUID->"c3607326-7fbc-4bc0-850d-87bddc12f83e"], +Cell[6704, 190, 321, 5, 41, "Output",ExpressionUUID->"73dcff8a-7b4c-43f9-b84d-8d2a7bddd7b3"] }, Open ]], Cell[CellGroupData[{ -Cell[6525, 189, 129, 2, 36, "Input",ExpressionUUID->"ec6db483-7fa2-4314-ae9e-2b03fa7b04cb"], -Cell[6657, 193, 270, 4, 41, "Output",ExpressionUUID->"3c20db16-f7a6-4610-afcd-2b8101f2de4d"] +Cell[7062, 200, 129, 2, 36, "Input",ExpressionUUID->"ec6db483-7fa2-4314-ae9e-2b03fa7b04cb"], +Cell[7194, 204, 318, 5, 41, "Output",ExpressionUUID->"056cef0d-0241-4fed-82be-7b179fc523e2"] }, Open ]], Cell[CellGroupData[{ -Cell[6964, 202, 557, 19, 100, "Input",ExpressionUUID->"752f5062-cf4b-4b1b-8eaf-33dc91418f79"], -Cell[7524, 223, 291, 4, 41, "Output",ExpressionUUID->"df66f67b-d1b7-4781-bf88-7bc69831d326"] +Cell[7549, 214, 557, 19, 100, "Input",ExpressionUUID->"752f5062-cf4b-4b1b-8eaf-33dc91418f79"], +Cell[8109, 235, 339, 5, 41, "Output",ExpressionUUID->"64f3fac6-5913-42ad-99e0-5ba58c50c350"] }, Open ]], Cell[CellGroupData[{ -Cell[7852, 232, 557, 19, 100, "Input",ExpressionUUID->"a7ec5164-166e-4e2d-9554-e60f38e99a30"], -Cell[8412, 253, 289, 4, 41, "Output",ExpressionUUID->"77195fc0-7fb3-41fc-bfbd-562ca4f420f4"] +Cell[8485, 245, 557, 19, 100, "Input",ExpressionUUID->"a7ec5164-166e-4e2d-9554-e60f38e99a30"], +Cell[9045, 266, 337, 5, 41, "Output",ExpressionUUID->"4e097ab7-3536-42e8-8926-41f021a2da92"] }, Open ]], Cell[CellGroupData[{ -Cell[8738, 262, 1588, 50, 103, "Input",ExpressionUUID->"31e17f5b-5ce4-493d-bf44-e05cab7dac5d"], -Cell[10329, 314, 285, 4, 41, "Output",ExpressionUUID->"85fe8299-739b-4dcf-9994-022ec5b76feb"] +Cell[9419, 276, 1588, 50, 215, "Input",ExpressionUUID->"31e17f5b-5ce4-493d-bf44-e05cab7dac5d"], +Cell[11010, 328, 334, 5, 41, "Output",ExpressionUUID->"c029d69c-2640-4053-97c4-4004f29be4be"] }, Open ]], Cell[CellGroupData[{ -Cell[10651, 323, 1422, 46, 73, "Input",ExpressionUUID->"a5a9c07c-c9cf-406d-832c-3a9f2a889fac"], -Cell[12076, 371, 304, 5, 41, "Output",ExpressionUUID->"51a73d11-1920-437d-94ce-fa1d3f9c5089"] +Cell[11381, 338, 1422, 46, 215, "Input",ExpressionUUID->"a5a9c07c-c9cf-406d-832c-3a9f2a889fac"], +Cell[12806, 386, 354, 6, 41, "Output",ExpressionUUID->"fe85bf89-63a1-413a-8b93-314c0cb9919d"] }, Open ]], Cell[CellGroupData[{ -Cell[12417, 381, 1422, 46, 73, "Input",ExpressionUUID->"e9e1fc08-4585-4930-aa73-398513033f86"], -Cell[13842, 429, 307, 5, 41, "Output",ExpressionUUID->"a689cb8c-13f9-4656-8794-f93478636eaf"] +Cell[13197, 397, 1422, 46, 215, "Input",ExpressionUUID->"e9e1fc08-4585-4930-aa73-398513033f86"], +Cell[14622, 445, 359, 6, 41, "Output",ExpressionUUID->"b8cfab9a-c092-42f4-9de1-1d16e2bee392"] }, Open ]], Cell[CellGroupData[{ -Cell[14186, 439, 1588, 50, 103, "Input",ExpressionUUID->"2077cb14-499d-4811-9147-bcfe43430501"], -Cell[15777, 491, 286, 4, 41, "Output",ExpressionUUID->"6151e0ed-c6f5-453a-ac85-9f7284f59620"] +Cell[15018, 456, 1588, 50, 215, "Input",ExpressionUUID->"2077cb14-499d-4811-9147-bcfe43430501"], +Cell[16609, 508, 334, 5, 41, "Output",ExpressionUUID->"1848c458-03ea-45c7-84bc-bdd95fa9fe7f"] }, Open ]], Cell[CellGroupData[{ -Cell[16100, 500, 131, 2, 36, "Input",ExpressionUUID->"3ee28a59-2332-4807-9490-8091cdbfe15f"], -Cell[16234, 504, 274, 4, 41, "Output",ExpressionUUID->"fcb058a5-4fe2-4181-aeb0-447a3ce8f491"] +Cell[16980, 518, 131, 2, 36, "Input",ExpressionUUID->"3ee28a59-2332-4807-9490-8091cdbfe15f"], +Cell[17114, 522, 322, 5, 41, "Output",ExpressionUUID->"68f49ab8-a8fa-4a50-90b0-1cb0d7bb3a98"] }, Open ]], Cell[CellGroupData[{ -Cell[16545, 513, 133, 2, 36, "Input",ExpressionUUID->"c0c9bdcf-6644-4b81-a69d-85367326eb68"], -Cell[16681, 517, 276, 4, 41, "Output",ExpressionUUID->"20167d98-09aa-4a17-a339-8590f6272351"] +Cell[17473, 532, 133, 2, 36, "Input",ExpressionUUID->"c0c9bdcf-6644-4b81-a69d-85367326eb68"], +Cell[17609, 536, 324, 5, 41, "Output",ExpressionUUID->"760afc12-4898-487f-8952-3b347edd354d"] }, Open ]], Cell[CellGroupData[{ -Cell[16994, 526, 134, 2, 36, "Input",ExpressionUUID->"258f4db0-cf27-4b8e-9a08-c286a8f7a1b7"], -Cell[17131, 530, 278, 4, 41, "Output",ExpressionUUID->"345b463d-d0ad-45e3-94c3-ae2a4b5cff6c"] +Cell[17970, 546, 134, 2, 36, "Input",ExpressionUUID->"258f4db0-cf27-4b8e-9a08-c286a8f7a1b7"], +Cell[18107, 550, 326, 5, 41, "Output",ExpressionUUID->"b0a1004a-686b-4e66-b0db-09cc3d1bd9fc"] }, Open ]], Cell[CellGroupData[{ -Cell[17446, 539, 219, 4, 36, "Input",ExpressionUUID->"d30cafe6-dfd9-4b35-a4cd-dd7fd3c95ffa"], -Cell[17668, 545, 287, 5, 41, "Output",ExpressionUUID->"1f8d8275-7763-44ea-9141-f9902f7f99bb"] +Cell[18470, 560, 219, 4, 36, "Input",ExpressionUUID->"d30cafe6-dfd9-4b35-a4cd-dd7fd3c95ffa"], +Cell[18692, 566, 334, 6, 41, "Output",ExpressionUUID->"78d461df-e514-4593-88df-b241b3ddb26f"] }, Open ]], Cell[CellGroupData[{ -Cell[17992, 555, 134, 2, 36, "Input",ExpressionUUID->"20eb6d99-d773-45a3-b106-30180dfff0f5"], -Cell[18129, 559, 280, 4, 41, "Output",ExpressionUUID->"90eb103d-ca0a-4766-b1d8-c0ed78f1fef6"] +Cell[19063, 577, 134, 2, 36, "Input",ExpressionUUID->"20eb6d99-d773-45a3-b106-30180dfff0f5"], +Cell[19200, 581, 328, 5, 41, "Output",ExpressionUUID->"8462d08d-185f-40d2-94dd-ba2815d83ca5"] }, Open ]], Cell[CellGroupData[{ -Cell[18446, 568, 322, 5, 36, "Input",ExpressionUUID->"87a9097a-1263-4cd4-8bdb-66b56f9d5581"], -Cell[18771, 575, 273, 4, 41, "Output",ExpressionUUID->"3bbb8ab1-9759-473d-9fdb-d39afee5cdfc"] +Cell[19565, 591, 322, 5, 36, "Input",ExpressionUUID->"87a9097a-1263-4cd4-8bdb-66b56f9d5581"], +Cell[19890, 598, 323, 5, 41, "Output",ExpressionUUID->"2d4ad2aa-8379-42d3-9624-869f205a84db"] }, Open ]], Cell[CellGroupData[{ -Cell[19081, 584, 298, 5, 36, "Input",ExpressionUUID->"3174395d-009d-49b8-a2c7-f935f6f2070a"], -Cell[19382, 591, 277, 4, 41, "Output",ExpressionUUID->"afe9d3dd-708d-42a6-898d-31d2d959d117"] +Cell[20250, 608, 298, 5, 36, "Input",ExpressionUUID->"3174395d-009d-49b8-a2c7-f935f6f2070a"], +Cell[20551, 615, 327, 5, 41, "Output",ExpressionUUID->"6f5bb78e-cc01-4376-a4b1-4b824a5c8f22"] }, Open ]], Cell[CellGroupData[{ -Cell[19696, 600, 219, 4, 36, "Input",ExpressionUUID->"128a1648-e438-4a47-a063-a9a9364bc192"], -Cell[19918, 606, 268, 4, 41, "Output",ExpressionUUID->"c43260a7-d9eb-4ff8-bfb4-75f2299d10c7"] +Cell[20915, 625, 219, 4, 36, "Input",ExpressionUUID->"128a1648-e438-4a47-a063-a9a9364bc192"], +Cell[21137, 631, 316, 5, 41, "Output",ExpressionUUID->"c58d4fb9-8a36-4e68-bf67-188b57e27515"] }, Open ]], Cell[CellGroupData[{ -Cell[20223, 615, 350, 10, 54, "Input",ExpressionUUID->"7a6feb61-193c-4f0b-9146-6e2d422dc542"], -Cell[20576, 627, 293, 4, 41, "Output",ExpressionUUID->"5fcf7dbf-1a69-4c01-ba36-f912484cd003"] +Cell[21490, 641, 350, 10, 54, "Input",ExpressionUUID->"7a6feb61-193c-4f0b-9146-6e2d422dc542"], +Cell[21843, 653, 343, 5, 41, "Output",ExpressionUUID->"83ce3728-efb9-4b63-b7d5-711bf1e66684"] }, Open ]], Cell[CellGroupData[{ -Cell[20906, 636, 350, 10, 54, "Input",ExpressionUUID->"8206f17f-d083-41bb-97fa-98870c95d0c5"], -Cell[21259, 648, 310, 5, 41, "Output",ExpressionUUID->"b4c86b70-e3ea-485d-85fb-9a1c5d7533e3"] +Cell[22223, 663, 350, 10, 54, "Input",ExpressionUUID->"8206f17f-d083-41bb-97fa-98870c95d0c5"], +Cell[22576, 675, 362, 6, 41, "Output",ExpressionUUID->"498a1635-6c66-4aff-9a92-ff7f5077e295"] }, Open ]], Cell[CellGroupData[{ -Cell[21606, 658, 994, 26, 55, "Input",ExpressionUUID->"cbe139b8-6eb6-4350-aa10-947664bb7960"], -Cell[22603, 686, 292, 4, 41, "Output",ExpressionUUID->"b5b23c58-7acd-492e-bb44-7c8a62c15555"] +Cell[22975, 686, 994, 26, 105, "Input",ExpressionUUID->"cbe139b8-6eb6-4350-aa10-947664bb7960"], +Cell[23972, 714, 344, 5, 41, "Output",ExpressionUUID->"fb7e0173-5261-4b5e-b468-9780f7fd7bf8"] }, Open ]], Cell[CellGroupData[{ -Cell[22932, 695, 199, 3, 36, "Input",ExpressionUUID->"c5d6b6d3-d0f1-4a6e-b6be-8b4237a8c8fc"], -Cell[23134, 700, 267, 4, 41, "Output",ExpressionUUID->"8c8728b1-d8a6-4b1d-a01c-9ad8a31d0c6e"] +Cell[24353, 724, 199, 3, 36, "Input",ExpressionUUID->"c5d6b6d3-d0f1-4a6e-b6be-8b4237a8c8fc"], +Cell[24555, 729, 315, 5, 41, "Output",ExpressionUUID->"9b2b5153-4537-490b-b5f7-e9adadab50d0"] }, Open ]], Cell[CellGroupData[{ -Cell[23438, 709, 327, 5, 36, "Input",ExpressionUUID->"1407b367-db95-44cd-8913-0b7027426f24"], -Cell[23768, 716, 250, 3, 41, "Output",ExpressionUUID->"729e92b0-5457-4aea-a142-2ee5c4e5f1dc"] +Cell[24907, 739, 327, 5, 36, "Input",ExpressionUUID->"1407b367-db95-44cd-8913-0b7027426f24"], +Cell[25237, 746, 300, 4, 41, "Output",ExpressionUUID->"90b61f19-20fd-43e5-95fe-4d353c6340ff"] }, Open ]], -Cell[24033, 722, 173, 2, 36, "Input",ExpressionUUID->"fe6b8aab-6ec1-461b-b840-bfc68e60fb43"], +Cell[25552, 753, 173, 2, 109, "Input",ExpressionUUID->"fe6b8aab-6ec1-461b-b840-bfc68e60fb43"], Cell[CellGroupData[{ -Cell[24231, 728, 327, 5, 36, "Input",ExpressionUUID->"1dc22824-3561-4243-a957-da5fec5ab8fb"], -Cell[24561, 735, 252, 3, 41, "Output",ExpressionUUID->"b6046670-1f4a-4801-8d1d-93a4c11fbab5"] +Cell[25750, 759, 327, 5, 36, "Input",ExpressionUUID->"1dc22824-3561-4243-a957-da5fec5ab8fb"], +Cell[26080, 766, 300, 4, 41, "Output",ExpressionUUID->"d429d438-b4f2-441e-8b04-a1fb22e1f833"] }, Open ]], -Cell[24828, 741, 173, 2, 36, "Input",ExpressionUUID->"c4dfccc7-db1d-478e-b432-5cdc48975c03"], +Cell[26395, 773, 173, 2, 109, "Input",ExpressionUUID->"c4dfccc7-db1d-478e-b432-5cdc48975c03"], Cell[CellGroupData[{ -Cell[25026, 747, 329, 5, 36, "Input",ExpressionUUID->"0f4fdc47-2f33-4c01-b732-1e0b219a28b3"], -Cell[25358, 754, 249, 3, 41, "Output",ExpressionUUID->"6e32449c-ecf6-42f5-9699-61612de9196c"] +Cell[26593, 779, 329, 5, 36, "Input",ExpressionUUID->"0f4fdc47-2f33-4c01-b732-1e0b219a28b3"], +Cell[26925, 786, 295, 4, 41, "Output",ExpressionUUID->"44e42b14-dbd9-4d26-b900-51f56569cf13"] }, Open ]], -Cell[25622, 760, 173, 2, 36, "Input",ExpressionUUID->"3b525bd4-a574-49a4-bb5c-363e78948163"], +Cell[27235, 793, 173, 2, 109, "Input",ExpressionUUID->"3b525bd4-a574-49a4-bb5c-363e78948163"], Cell[CellGroupData[{ -Cell[25820, 766, 353, 5, 36, "Input",ExpressionUUID->"efe0aefc-2665-45a2-a1ef-77fbc4d0f30c"], -Cell[26176, 773, 248, 3, 41, "Output",ExpressionUUID->"538ab533-714b-4b2a-ba31-7d346a92e0f7"] +Cell[27433, 799, 353, 5, 36, "Input",ExpressionUUID->"efe0aefc-2665-45a2-a1ef-77fbc4d0f30c"], +Cell[27789, 806, 296, 4, 41, "Output",ExpressionUUID->"5b335103-c262-4647-986e-426605125fa8"] }, Open ]], -Cell[26439, 779, 171, 2, 36, "Input",ExpressionUUID->"6f978b7e-dadb-4f17-bd6b-a7684e8b28dd"], +Cell[28100, 813, 171, 2, 109, "Input",ExpressionUUID->"6f978b7e-dadb-4f17-bd6b-a7684e8b28dd"], Cell[CellGroupData[{ -Cell[26635, 785, 299, 5, 36, "Input",ExpressionUUID->"39b77847-74a0-4092-ae6f-45182093468c"], -Cell[26937, 792, 250, 3, 41, "Output",ExpressionUUID->"2753ca29-1488-470d-886d-0b8d912d182c"] +Cell[28296, 819, 299, 5, 36, "Input",ExpressionUUID->"39b77847-74a0-4092-ae6f-45182093468c"], +Cell[28598, 826, 298, 4, 41, "Output",ExpressionUUID->"a5567357-dec4-4560-a676-682e819dc422"] }, Open ]], -Cell[27202, 798, 171, 2, 36, "Input",ExpressionUUID->"ca569417-d65c-4bb3-bbde-6d897e42c337"], +Cell[28911, 833, 171, 2, 109, "Input",ExpressionUUID->"ca569417-d65c-4bb3-bbde-6d897e42c337"], Cell[CellGroupData[{ -Cell[27398, 804, 305, 5, 36, "Input",ExpressionUUID->"9344dccb-5a4c-43ae-9a13-1b1ed8541e21"], -Cell[27706, 811, 251, 3, 41, "Output",ExpressionUUID->"b172a7e2-085c-4d2f-8fbc-9121dbea35e1"] +Cell[29107, 839, 305, 5, 36, "Input",ExpressionUUID->"9344dccb-5a4c-43ae-9a13-1b1ed8541e21"], +Cell[29415, 846, 301, 4, 41, "Output",ExpressionUUID->"bee0af28-db5a-42af-b9c8-73642faa880d"] }, Open ]], -Cell[27972, 817, 173, 2, 36, "Input",ExpressionUUID->"c5fa4fcb-240f-496d-965c-f878c23a8a3a"], +Cell[29731, 853, 173, 2, 109, "Input",ExpressionUUID->"c5fa4fcb-240f-496d-965c-f878c23a8a3a"], Cell[CellGroupData[{ -Cell[28170, 823, 327, 5, 36, "Input",ExpressionUUID->"8d0074db-3b7a-4e2c-9091-d8b953934f65"], -Cell[28500, 830, 253, 3, 41, "Output",ExpressionUUID->"f5c139ef-c6ab-4715-ab1d-9fbffb024e67"] +Cell[29929, 859, 327, 5, 36, "Input",ExpressionUUID->"8d0074db-3b7a-4e2c-9091-d8b953934f65"], +Cell[30259, 866, 301, 4, 41, "Output",ExpressionUUID->"4c0f19a6-2fd8-477e-b975-4d15274da80b"] }, Open ]], -Cell[28768, 836, 172, 2, 36, "Input",ExpressionUUID->"baaff160-3478-4e58-8bc9-a6b4e33df6f8"], +Cell[30575, 873, 172, 2, 109, "Input",ExpressionUUID->"baaff160-3478-4e58-8bc9-a6b4e33df6f8"], Cell[CellGroupData[{ -Cell[28965, 842, 276, 4, 36, "Input",ExpressionUUID->"beb8ed61-9457-46eb-864d-57c96c21c7ba"], -Cell[29244, 848, 249, 3, 41, "Output",ExpressionUUID->"f3c3673f-42c4-4954-b5ab-ff46dbccbe13"] +Cell[30772, 879, 276, 4, 36, "Input",ExpressionUUID->"beb8ed61-9457-46eb-864d-57c96c21c7ba"], +Cell[31051, 885, 297, 4, 41, "Output",ExpressionUUID->"8b55b59a-adf6-4a74-838d-37f3bc06e08b"] }, Open ]], -Cell[29508, 854, 175, 2, 36, "Input",ExpressionUUID->"8f1d7272-29c5-4918-813c-65be11559d09"], +Cell[31363, 892, 175, 2, 109, "Input",ExpressionUUID->"8f1d7272-29c5-4918-813c-65be11559d09"], Cell[CellGroupData[{ -Cell[29708, 860, 19809, 485, 1708, "Input",ExpressionUUID->"e2cd2ed8-3962-4a23-87cf-f018c3e03ed2"], -Cell[49520, 1347, 289, 4, 41, "Output",ExpressionUUID->"eeb00c32-8325-4870-90a0-00c9e5307945"] +Cell[31563, 898, 19809, 485, 3208, "Input",ExpressionUUID->"e2cd2ed8-3962-4a23-87cf-f018c3e03ed2"], +Cell[51375, 1385, 337, 5, 41, "Output",ExpressionUUID->"9fa9259c-527e-4934-82a4-b755a15d48ba"] }, Open ]], Cell[CellGroupData[{ -Cell[49846, 1356, 19748, 489, 1720, "Input",ExpressionUUID->"a2733d81-8360-49cf-9df4-7ef1197a6abc"], -Cell[69597, 1847, 286, 4, 41, "Output",ExpressionUUID->"92f40e41-e91b-496e-b031-e6057d24b081"] +Cell[51749, 1395, 19748, 489, 3138, "Input",ExpressionUUID->"a2733d81-8360-49cf-9df4-7ef1197a6abc"], +Cell[71500, 1886, 336, 5, 41, "Output",ExpressionUUID->"8b141746-ba0a-47d5-8d3f-33c257c67ac0"] }, Open ]], Cell[CellGroupData[{ -Cell[69920, 1856, 19748, 483, 1720, "Input",ExpressionUUID->"f3ceb801-caf5-424b-8955-5beccb99f812"], -Cell[89671, 2341, 305, 5, 41, "Output",ExpressionUUID->"3ca0012c-eb00-42b4-912b-c8cb99b6c9c3"] +Cell[71873, 1896, 19748, 483, 3198, "Input",ExpressionUUID->"f3ceb801-caf5-424b-8955-5beccb99f812"], +Cell[91624, 2381, 352, 6, 41, "Output",ExpressionUUID->"94cede8b-44c3-449f-9f8f-854dcf4e3550"] }, Open ]], Cell[CellGroupData[{ -Cell[90013, 2351, 22534, 553, 1885, "Input",ExpressionUUID->"ca186892-9129-4b79-9589-21361de4c53a"], -Cell[112550, 2906, 306, 5, 41, "Output",ExpressionUUID->"8c537c1b-8d44-404d-acb6-4d30b6dd6d70"] +Cell[92013, 2392, 22534, 553, 3677, "Input",ExpressionUUID->"ca186892-9129-4b79-9589-21361de4c53a"], +Cell[114550, 2947, 354, 6, 41, "Output",ExpressionUUID->"af5417d9-b40f-46c9-b792-da9e6e683fd6"] }, Open ]], Cell[CellGroupData[{ -Cell[112893, 2916, 22535, 553, 1885, "Input",ExpressionUUID->"3a9e5a20-998b-40dc-83dc-3923c73911dd"], -Cell[135431, 3471, 309, 5, 41, "Output",ExpressionUUID->"8c831df6-f7f9-4f7e-9e92-76675c9da378"] +Cell[114941, 2958, 22535, 553, 3642, "Input",ExpressionUUID->"3a9e5a20-998b-40dc-83dc-3923c73911dd"], +Cell[137479, 3513, 359, 6, 41, "Output",ExpressionUUID->"0d2fb825-c7f7-479a-b0ff-00bdd9cc0172"] }, Open ]], Cell[CellGroupData[{ -Cell[135777, 3481, 25491, 626, 2078, "Input",ExpressionUUID->"c90b5c84-6b38-49a8-b9a6-852d905b7595"], -Cell[161271, 4109, 308, 5, 41, "Output",ExpressionUUID->"0b056661-7141-40be-8d5f-4f56f2db16ab"] +Cell[137875, 3524, 25491, 626, 4121, "Input",ExpressionUUID->"c90b5c84-6b38-49a8-b9a6-852d905b7595"], +Cell[163369, 4152, 358, 6, 41, "Output",ExpressionUUID->"516ae30f-a9bb-44c7-8ecd-ac7b7ea478ac"] }, Open ]], Cell[CellGroupData[{ -Cell[161616, 4119, 130, 2, 36, "Input",ExpressionUUID->"c1072390-c91c-461f-9061-3953c9c41272"], -Cell[161749, 4123, 271, 4, 41, "Output",ExpressionUUID->"c5eea605-f807-4d87-b299-7762bbaf58e9"] +Cell[163764, 4163, 130, 2, 36, "Input",ExpressionUUID->"c1072390-c91c-461f-9061-3953c9c41272"], +Cell[163897, 4167, 319, 5, 41, "Output",ExpressionUUID->"50f0471a-3f89-43ff-99e5-322c493383aa"] }, Open ]], Cell[CellGroupData[{ -Cell[162057, 4132, 130, 2, 36, "Input",ExpressionUUID->"9bbe40a4-3290-4166-b620-315848b98a39"], -Cell[162190, 4136, 272, 4, 41, "Output",ExpressionUUID->"d63b1889-fb52-4f17-8f77-c511eac20578"] +Cell[164253, 4177, 130, 2, 36, "Input",ExpressionUUID->"9bbe40a4-3290-4166-b620-315848b98a39"], +Cell[164386, 4181, 322, 5, 41, "Output",ExpressionUUID->"8e8e9e07-bcdb-4066-9765-c283636b4ae9"] }, Open ]], Cell[CellGroupData[{ -Cell[162499, 4145, 1144, 39, 73, "Input",ExpressionUUID->"85082aa6-00bd-4cc0-8b0b-df31b91af18c"], -Cell[163646, 4186, 287, 4, 41, "Output",ExpressionUUID->"e238f3f1-4fcb-4c9e-9da4-c8e5ffe63b86"] +Cell[164745, 4191, 1144, 39, 144, "Input",ExpressionUUID->"85082aa6-00bd-4cc0-8b0b-df31b91af18c"], +Cell[165892, 4232, 335, 5, 41, "Output",ExpressionUUID->"87c62a67-96b0-4b0a-9af9-52fcfa200aea"] }, Open ]], Cell[CellGroupData[{ -Cell[163970, 4195, 1041, 35, 73, "Input",ExpressionUUID->"c96828d9-3f14-4d10-9102-dcdf583c2e94"], -Cell[165014, 4232, 308, 5, 41, "Output",ExpressionUUID->"5c48db18-8f9f-4770-ba96-bc261082d1d5"] +Cell[166264, 4242, 1041, 35, 144, "Input",ExpressionUUID->"c96828d9-3f14-4d10-9102-dcdf583c2e94"], +Cell[167308, 4279, 358, 6, 41, "Output",ExpressionUUID->"d49c9e67-b942-48fd-8fdd-07028b487c18"] }, Open ]], Cell[CellGroupData[{ -Cell[165359, 4242, 1144, 39, 73, "Input",ExpressionUUID->"f6d1ac3a-6fe8-4977-bd19-622801a955d0"], -Cell[166506, 4283, 290, 4, 41, "Output",ExpressionUUID->"285cf33b-d30e-439d-a6b4-dcdbd82099e7"] +Cell[167703, 4290, 1144, 39, 144, "Input",ExpressionUUID->"f6d1ac3a-6fe8-4977-bd19-622801a955d0"], +Cell[168850, 4331, 340, 5, 41, "Output",ExpressionUUID->"70e206ed-9abe-4c72-aac3-12e56372c5ec"] }, Open ]], Cell[CellGroupData[{ -Cell[166833, 4292, 108, 1, 36, "Input",ExpressionUUID->"04e66d09-3217-4776-8f58-e5766c1bc1d0"], -Cell[166944, 4295, 289, 4, 41, "Output",ExpressionUUID->"f12ac516-3215-4b94-8d0d-5f74db7d25d3"] +Cell[169227, 4341, 108, 1, 36, "Input",ExpressionUUID->"04e66d09-3217-4776-8f58-e5766c1bc1d0"], +Cell[169338, 4344, 339, 5, 41, "Output",ExpressionUUID->"1dcbc32c-5af8-46ca-bc4f-22940ce249f6"] }, Open ]], Cell[CellGroupData[{ -Cell[167270, 4304, 108, 1, 36, "Input",ExpressionUUID->"fab83b14-f761-42b7-8294-0ee4a3924d96"], -Cell[167381, 4307, 310, 5, 41, "Output",ExpressionUUID->"3b347523-0ce8-4a5b-a0ff-a2af83dc0265"] +Cell[169714, 4354, 108, 1, 36, "Input",ExpressionUUID->"fab83b14-f761-42b7-8294-0ee4a3924d96"], +Cell[169825, 4357, 360, 6, 41, "Output",ExpressionUUID->"64f05390-3fed-473e-b652-2e11a9c4530e"] }, Open ]], Cell[CellGroupData[{ -Cell[167728, 4317, 108, 1, 36, "Input",ExpressionUUID->"4d40c3db-b716-44e3-99e6-10d903da7cd8"], -Cell[167839, 4320, 305, 5, 41, "Output",ExpressionUUID->"71c3e5ad-8f38-4bbd-a8ef-7371762fea68"] +Cell[170222, 4368, 108, 1, 36, "Input",ExpressionUUID->"4d40c3db-b716-44e3-99e6-10d903da7cd8"], +Cell[170333, 4371, 353, 6, 41, "Output",ExpressionUUID->"968975c4-1a8c-4361-a215-95154f113a47"] }, Open ]], Cell[CellGroupData[{ -Cell[168181, 4330, 108, 1, 36, "Input",ExpressionUUID->"137ad634-1ade-4ac0-9137-c1f5404e58d3"], -Cell[168292, 4333, 289, 4, 41, "Output",ExpressionUUID->"f199e36e-103f-4687-99bb-1dbc7ed9c2d5"] +Cell[170723, 4382, 108, 1, 36, "Input",ExpressionUUID->"137ad634-1ade-4ac0-9137-c1f5404e58d3"], +Cell[170834, 4385, 336, 5, 41, "Output",ExpressionUUID->"74880469-c318-48e9-8076-694907b07c00"] }, Open ]], Cell[CellGroupData[{ -Cell[168618, 4342, 107, 1, 36, "Input",ExpressionUUID->"3426c5a0-26bb-44e7-bd68-37ad5d99528d"], -Cell[168728, 4345, 290, 4, 41, "Output",ExpressionUUID->"d89dd81a-41a8-46b4-be87-81a6e83655ca"] +Cell[171207, 4395, 107, 1, 36, "Input",ExpressionUUID->"3426c5a0-26bb-44e7-bd68-37ad5d99528d"], +Cell[171317, 4398, 338, 5, 41, "Output",ExpressionUUID->"9972cd6e-9b08-42dd-aca9-da05e24fafad"] }, Open ]], Cell[CellGroupData[{ -Cell[169055, 4354, 107, 1, 36, "Input",ExpressionUUID->"da187f4c-de74-4d4c-98f6-6be653f32b24"], -Cell[169165, 4357, 290, 4, 41, "Output",ExpressionUUID->"df4bcd23-e665-48b2-a180-bebf80334d3e"] +Cell[171692, 4408, 107, 1, 36, "Input",ExpressionUUID->"da187f4c-de74-4d4c-98f6-6be653f32b24"], +Cell[171802, 4411, 338, 5, 41, "Output",ExpressionUUID->"e98199a1-3c24-42f3-a56b-5c28daa0fec5"] }, Open ]], Cell[CellGroupData[{ -Cell[169492, 4366, 497, 16, 71, "Input",ExpressionUUID->"593e5379-38c4-4a00-8707-5fcab24d8713"], -Cell[169992, 4384, 305, 5, 41, "Output",ExpressionUUID->"4bf6662d-44d9-494c-95d2-758cc46bb0e1"] +Cell[172177, 4421, 497, 16, 71, "Input",ExpressionUUID->"593e5379-38c4-4a00-8707-5fcab24d8713"], +Cell[172677, 4439, 353, 6, 41, "Output",ExpressionUUID->"1512e277-12fc-4a8b-b096-cab55a60189c"] }, Open ]], Cell[CellGroupData[{ -Cell[170334, 4394, 497, 16, 71, "Input",ExpressionUUID->"4d18bb4f-280d-4386-aa56-c72e7043e5b6"], -Cell[170834, 4412, 301, 5, 41, "Output",ExpressionUUID->"525df73e-aafa-4b88-a85a-47d082ea5b39"] +Cell[173067, 4450, 497, 16, 71, "Input",ExpressionUUID->"4d18bb4f-280d-4386-aa56-c72e7043e5b6"], +Cell[173567, 4468, 351, 6, 41, "Output",ExpressionUUID->"5f77b089-f781-4991-9aa8-836f59f1153e"] }, Open ]], Cell[CellGroupData[{ -Cell[171172, 4422, 1788, 60, 142, "Input",ExpressionUUID->"928216fb-1623-4f12-b68f-772917d7bdf4"], -Cell[172963, 4484, 289, 4, 41, "Output",ExpressionUUID->"9a1dd232-0eed-4cf4-ada5-96bceba4881b"] +Cell[173955, 4479, 1788, 60, 340, "Input",ExpressionUUID->"928216fb-1623-4f12-b68f-772917d7bdf4"], +Cell[175746, 4541, 337, 5, 41, "Output",ExpressionUUID->"06a94d47-7f4f-49e3-8a9c-fcd37428820d"] }, Open ]], Cell[CellGroupData[{ -Cell[173289, 4493, 1101, 36, 73, "Input",ExpressionUUID->"d10640d1-31d7-4755-8005-7b2e4f82ff94"], -Cell[174393, 4531, 302, 5, 41, "Output",ExpressionUUID->"d37aa652-c3b1-4d33-8b31-d3ba4c11efc6"] +Cell[176120, 4551, 1101, 36, 174, "Input",ExpressionUUID->"d10640d1-31d7-4755-8005-7b2e4f82ff94"], +Cell[177224, 4589, 349, 6, 41, "Output",ExpressionUUID->"78db283f-bf6a-48f3-b441-00590b570144"] }, Open ]], Cell[CellGroupData[{ -Cell[174732, 4541, 1818, 61, 144, "Input",ExpressionUUID->"e266c0f8-b943-4b21-8b28-b379a06329e7"], -Cell[176553, 4604, 286, 4, 41, "Output",ExpressionUUID->"8d41f0b8-5f29-4adb-aaad-e7ea83699fca"] +Cell[177610, 4600, 1818, 61, 340, "Input",ExpressionUUID->"e266c0f8-b943-4b21-8b28-b379a06329e7"], +Cell[179431, 4663, 334, 5, 41, "Output",ExpressionUUID->"fd21b3cb-7d8a-4257-992d-97d3a209a26f"] }, Open ]], Cell[CellGroupData[{ -Cell[176876, 4613, 1631, 53, 101, "Input",ExpressionUUID->"e5df6cb6-eada-4d75-8f4f-ac18128c4ec0"], -Cell[178510, 4668, 285, 4, 41, "Output",ExpressionUUID->"6a77c378-2c32-424c-9d32-95d98258afff"] +Cell[179802, 4673, 1631, 53, 208, "Input",ExpressionUUID->"e5df6cb6-eada-4d75-8f4f-ac18128c4ec0"], +Cell[181436, 4728, 333, 5, 41, "Output",ExpressionUUID->"ea4e8a6e-0afe-422c-b7ad-bb3e9f37d949"] }, Open ]], Cell[CellGroupData[{ -Cell[178832, 4677, 1631, 53, 101, "Input",ExpressionUUID->"a09e27d6-8b77-4532-86c7-9d9656f540bb"], -Cell[180466, 4732, 288, 4, 41, "Output",ExpressionUUID->"c03b8c17-45bb-4061-aca2-70a7a7a9d4e3"] +Cell[181806, 4738, 1631, 53, 208, "Input",ExpressionUUID->"a09e27d6-8b77-4532-86c7-9d9656f540bb"], +Cell[183440, 4793, 336, 5, 41, "Output",ExpressionUUID->"a63e6b23-43c5-4729-a624-a5c90bfb31f4"] }, Open ]], Cell[CellGroupData[{ -Cell[180791, 4741, 208, 3, 36, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], -Cell[181002, 4746, 160, 2, 41, "Output",ExpressionUUID->"f1a65227-2122-4ffe-8a0b-7ffc85a16663"] +Cell[183813, 4803, 208, 3, 36, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], +Cell[184024, 4808, 206, 3, 41, "Output",ExpressionUUID->"8217f880-5ce9-4da2-ba8b-4f4682a0cbac"] }, Open ]], -Cell[181177, 4751, 173, 2, 36, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], +Cell[184245, 4814, 173, 2, 109, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], Cell[CellGroupData[{ -Cell[181375, 4757, 208, 3, 36, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], -Cell[181586, 4762, 161, 2, 41, "Output",ExpressionUUID->"4d4b67ae-3393-4a0a-9ac3-bb9351b58216"] +Cell[184443, 4820, 208, 3, 36, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], +Cell[184654, 4825, 208, 3, 41, "Output",ExpressionUUID->"ea3afb62-e515-4b56-9e4f-d551af2adb89"] }, Open ]], -Cell[181762, 4767, 173, 2, 36, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], +Cell[184877, 4831, 173, 2, 109, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[181960, 4773, 1297, 42, 61, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[183260, 4817, 196, 2, 41, "Output",ExpressionUUID->"3ee7292d-1d94-4662-ab3a-06cccc934e1c"] +Cell[185075, 4837, 1297, 42, 174, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], +Cell[186375, 4881, 243, 3, 41, "Output",ExpressionUUID->"c511fcb0-bbf0-4a9f-adf9-83311569c060"] }, Open ]], Cell[CellGroupData[{ -Cell[183493, 4824, 927, 30, 73, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[184423, 4856, 197, 2, 41, "Output",ExpressionUUID->"b62f44dd-2018-46a2-94f0-397f7a6f6a37"] +Cell[186655, 4889, 927, 30, 128, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], +Cell[187585, 4921, 246, 3, 41, "Output",ExpressionUUID->"9af47cfb-16e8-4449-bef9-51da270e7406"] }, Open ]], Cell[CellGroupData[{ -Cell[184657, 4863, 908, 29, 73, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[185568, 4894, 196, 2, 41, "Output",ExpressionUUID->"51ce5759-9eb0-400a-b729-93d8f59ab7d9"] +Cell[187868, 4929, 908, 29, 128, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], +Cell[188779, 4960, 245, 3, 41, "Output",ExpressionUUID->"041becaf-10ce-4b62-abd5-648decf0319e"] }, Open ]], Cell[CellGroupData[{ -Cell[185801, 4901, 554, 18, 66, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[186358, 4921, 191, 2, 41, "Output",ExpressionUUID->"5f552c53-15f5-4356-aa20-b76db8aee47e"] +Cell[189061, 4968, 554, 18, 66, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], +Cell[189618, 4988, 237, 3, 41, "Output",ExpressionUUID->"3e5333da-491a-4563-8f4d-13183f785b14"] }, Open ]], Cell[CellGroupData[{ -Cell[186586, 4928, 647, 21, 66, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[187236, 4951, 189, 2, 41, "Output",ExpressionUUID->"9e3bce48-88ba-4844-b96e-71ee461a6742"] +Cell[189892, 4996, 647, 21, 66, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], +Cell[190542, 5019, 236, 3, 41, "Output",ExpressionUUID->"f292d248-730a-4b07-8f73-e850f22281ba"] }, Open ]], Cell[CellGroupData[{ -Cell[187462, 4958, 166, 4, 71, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[187631, 4964, 191, 2, 41, "Output",ExpressionUUID->"eca8ec09-f8c0-416c-bb2b-4617927543ef"] +Cell[190815, 5027, 166, 4, 71, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], +Cell[190984, 5033, 238, 3, 41, "Output",ExpressionUUID->"05cc7dbf-0918-4b17-a851-64701dff8447"] }, Open ]], Cell[CellGroupData[{ -Cell[187859, 4971, 166, 4, 69, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[188028, 4977, 193, 2, 41, "Output",ExpressionUUID->"804ee7fe-04a6-474e-a2b4-4a97b244d859"] +Cell[191259, 5041, 166, 4, 69, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], +Cell[191428, 5047, 239, 3, 41, "Output",ExpressionUUID->"cbc8d8be-784a-44eb-a70e-87f6b5af0ddb"] }, Open ]], Cell[CellGroupData[{ -Cell[188258, 4984, 177, 4, 55, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[188438, 4990, 189, 2, 41, "Output",ExpressionUUID->"a702af9e-64f0-4465-91fd-7c9750a659f0"] +Cell[191704, 5055, 177, 4, 55, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], +Cell[191884, 5061, 238, 3, 41, "Output",ExpressionUUID->"b8604e91-46bc-4528-9b30-571ed3debe93"] }, Open ]], Cell[CellGroupData[{ -Cell[188664, 4997, 177, 4, 55, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[188844, 5003, 193, 2, 41, "Output",ExpressionUUID->"7019d27b-cbb5-44c9-a237-0c077a767cac"] +Cell[192159, 5069, 177, 4, 55, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], +Cell[192339, 5075, 240, 3, 41, "Output",ExpressionUUID->"2bbd0596-84a6-4064-83dc-2c24f59f856a"] }, Open ]], Cell[CellGroupData[{ -Cell[189074, 5010, 6051, 184, 431, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[195128, 5196, 193, 2, 41, "Output",ExpressionUUID->"16385cf6-5108-4529-bb97-60710b9620a3"] +Cell[192616, 5083, 6051, 184, 831, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], +Cell[198670, 5269, 239, 3, 41, "Output",ExpressionUUID->"b9cbabe4-cf29-48bf-91de-00f23ab5daed"] }, Open ]], Cell[CellGroupData[{ -Cell[195358, 5203, 364, 8, 53, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[195725, 5213, 191, 2, 41, "Output",ExpressionUUID->"09eb46cf-534f-414a-aa87-568af882a7a1"] +Cell[198946, 5277, 364, 8, 53, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], +Cell[199313, 5287, 240, 3, 41, "Output",ExpressionUUID->"833811a2-1121-4e0c-ac6f-87a4752578f0"] }, Open ]], Cell[CellGroupData[{ -Cell[195953, 5220, 6118, 186, 431, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[202074, 5408, 192, 2, 41, "Output",ExpressionUUID->"5914698f-2309-43aa-af88-0432267b79df"] +Cell[199590, 5295, 6118, 186, 431, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], +Cell[205711, 5483, 241, 3, 41, "Output",ExpressionUUID->"c4db0ff7-4113-4634-a014-0ef99856c8ca"] }, Open ]], Cell[CellGroupData[{ -Cell[202303, 5415, 364, 8, 53, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[202670, 5425, 187, 2, 41, "Output",ExpressionUUID->"af484f27-d07d-4431-b8dd-ca87a86dcd81"] +Cell[205989, 5491, 364, 8, 53, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], +Cell[206356, 5501, 234, 3, 41, "Output",ExpressionUUID->"d9ed0966-74d5-4f5e-88d5-b54381863482"] }, Open ]], Cell[CellGroupData[{ -Cell[202894, 5432, 2659, 87, 215, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[205556, 5521, 190, 2, 41, "Output",ExpressionUUID->"21aac974-f852-4cd5-aa6b-c229a072fc92"] +Cell[206627, 5509, 2659, 87, 215, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], +Cell[209289, 5598, 237, 3, 41, "Output",ExpressionUUID->"f4796c1f-34e6-4939-8169-19d592ff6a54"] }, Open ]], Cell[CellGroupData[{ -Cell[205783, 5528, 2599, 84, 215, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[208385, 5614, 190, 2, 41, "Output",ExpressionUUID->"fadea4f8-13df-49fa-9f31-0aece10dad52"] +Cell[209563, 5606, 2599, 84, 215, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], +Cell[212165, 5692, 237, 3, 41, "Output",ExpressionUUID->"b75716cf-d406-4577-b016-dad558a50e2d"] }, Open ]], Cell[CellGroupData[{ -Cell[208612, 5621, 3708, 117, 316, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[212323, 5740, 192, 2, 41, "Output",ExpressionUUID->"9f04824f-8859-4c0f-8080-4e0bbcc98912"] +Cell[212439, 5700, 3708, 117, 316, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], +Cell[216150, 5819, 241, 3, 41, "Output",ExpressionUUID->"94a43e76-b54a-40cf-8790-974f4d8d7605"] }, Open ]], -Cell[212530, 5745, 160, 3, 36, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], +Cell[216406, 5825, 160, 3, 109, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ -Cell[212715, 5752, 2073, 58, 116, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], -Cell[214791, 5812, 597, 13, 71, "Message",ExpressionUUID->"524fb3dd-14a1-4597-8b02-c4b19af119ef"], -Cell[215391, 5827, 599, 13, 71, "Message",ExpressionUUID->"1dbfef4f-d99d-45e6-bd42-676be565c04f"], -Cell[215993, 5842, 603, 13, 71, "Message",ExpressionUUID->"aff0035c-fe76-4864-bb49-0a97d515f074"], -Cell[216599, 5857, 492, 11, 32, "Message",ExpressionUUID->"cdf38bd5-b9d6-4ea9-86d0-078a87b2bbaf"], -Cell[217094, 5870, 191, 2, 41, "Output",ExpressionUUID->"8a6705e7-cd3b-4654-b884-0d62b3eff3c9"] +Cell[216591, 5832, 2073, 58, 276, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], +Cell[218667, 5892, 714, 15, 73, "Message",ExpressionUUID->"2d6eef74-55b8-4da8-99f2-77955dd4e2e0"], +Cell[219384, 5909, 711, 15, 73, "Message",ExpressionUUID->"aae43846-c2d6-4852-81b8-a8099643eed0"], +Cell[220098, 5926, 711, 15, 73, "Message",ExpressionUUID->"6c10771e-5ea1-4c4d-be0c-87f3a8a24c18"], +Cell[220812, 5943, 539, 12, 32, "Message",ExpressionUUID->"5607019c-3170-49c5-8704-5a604de16069"], +Cell[221354, 5957, 238, 3, 41, "Output",ExpressionUUID->"5f04e76d-1b30-4569-a27b-669f1e9751a4"] }, Open ]], Cell[CellGroupData[{ -Cell[217322, 5877, 2073, 58, 116, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], -Cell[219398, 5937, 599, 13, 71, "Message",ExpressionUUID->"316bfd93-b19e-4dcb-8445-615084c354e9"], -Cell[220000, 5952, 599, 13, 71, "Message",ExpressionUUID->"bad63f1a-ce8a-45c1-bb35-d524c598c760"], -Cell[220602, 5967, 605, 13, 71, "Message",ExpressionUUID->"af6c8db3-8a76-43db-9d99-56de53c49dc2"], -Cell[221210, 5982, 492, 11, 32, "Message",ExpressionUUID->"a63bc6ec-4195-4730-b157-eaf565e1c4bd"], -Cell[221705, 5995, 188, 2, 41, "Output",ExpressionUUID->"c6755025-6688-4ee9-92e5-b5ac8f3c41e5"] +Cell[221629, 5965, 2073, 58, 276, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], +Cell[223705, 6025, 714, 15, 73, "Message",ExpressionUUID->"44052610-cad7-4967-841a-80f2cdf2974a"], +Cell[224422, 6042, 712, 15, 73, "Message",ExpressionUUID->"b388f526-32b3-460a-b285-799a6edfb642"], +Cell[225137, 6059, 713, 15, 73, "Message",ExpressionUUID->"5cf54a2d-d0ee-4fa6-bd42-c006b4c6604d"], +Cell[225853, 6076, 541, 12, 32, "Message",ExpressionUUID->"bef0b9da-ae5d-42a9-84cf-5326016cfb52"], +Cell[226397, 6090, 234, 3, 41, "Output",ExpressionUUID->"f8545993-684e-4ead-90fd-5974a40ff2f6"] }, Open ]], Cell[CellGroupData[{ -Cell[221930, 6002, 1957, 52, 86, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], -Cell[223890, 6056, 180, 2, 41, "Output",ExpressionUUID->"20fc6a4f-8ecf-46a1-a5d2-78999a9146bc"] +Cell[226668, 6098, 2049, 54, 232, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], +Cell[228720, 6154, 20391, 381, 295, "Output",ExpressionUUID->"058a400e-43db-4afe-88f4-020b4f2a4b6c"] }, Open ]], Cell[CellGroupData[{ -Cell[224107, 6063, 2094, 60, 116, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], -Cell[226204, 6125, 503, 11, 48, "Message",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], -Cell[226710, 6138, 505, 11, 48, "Message",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], -Cell[227218, 6151, 506, 11, 48, "Message",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], -Cell[227727, 6164, 455, 10, 32, "Message",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], -Cell[228185, 6176, 55770, 961, 290, "Output",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] +Cell[249148, 6540, 2113, 59, 311, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], +Cell[251264, 6601, 562, 13, 71, "Message",ExpressionUUID->"3410f8c8-21d0-4736-a8c9-c9e8e7fee6ca"], +Cell[251829, 6616, 565, 13, 71, "Message",ExpressionUUID->"5d45c9ae-02f9-4965-a459-580ba5dc195c"], +Cell[252397, 6631, 567, 13, 71, "Message",ExpressionUUID->"5a09b138-5468-400e-9616-5f168dedb7fe"], +Cell[252967, 6646, 518, 12, 32, "Message",ExpressionUUID->"f12cda2c-d830-4f68-a065-4961a3e79f8e"], +Cell[253488, 6660, 23735, 438, 290, "Output",ExpressionUUID->"582463ea-acc2-42c5-a51c-5bbcf8ea8aba"] }, Open ]], -Cell[283970, 7140, 2454, 69, 109, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], -Cell[286427, 7211, 209, 5, 109, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], Cell[CellGroupData[{ -Cell[286661, 7220, 217, 7, 109, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[286881, 7229, 173, 3, 109, "Output",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[277260, 7103, 2476, 69, 296, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], +Cell[279739, 7174, 9516, 222, 298, "Output",ExpressionUUID->"5eb96ecc-2aee-4ae2-8361-1e24a97878f3"] }, Open ]], Cell[CellGroupData[{ -Cell[287091, 7237, 1814, 53, 109, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], -Cell[288908, 7292, 506, 11, 109, "Message",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], -Cell[289417, 7305, 508, 11, 109, "Message",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], -Cell[289928, 7318, 509, 11, 109, "Message",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], -Cell[290440, 7331, 458, 10, 109, "Message",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], -Cell[290901, 7343, 24818, 454, 109, "Output",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] +Cell[289292, 7401, 228, 4, 36, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], +Cell[289523, 7407, 30095, 569, 290, "Output",ExpressionUUID->"d80e84d1-0df1-4806-b3f6-b0d8d627369f"] }, Open ]], Cell[CellGroupData[{ -Cell[315756, 7802, 1616, 48, 109, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], -Cell[317375, 7852, 582, 12, 109, "Message",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], -Cell[317960, 7866, 588, 12, 109, "Message",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], -Cell[318551, 7880, 590, 12, 109, "Message",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], -Cell[319144, 7894, 458, 10, 109, "Message",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], -Cell[319605, 7906, 171, 3, 109, "Output",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] +Cell[319655, 7981, 236, 6, 61, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], +Cell[319894, 7989, 218, 3, 41, "Output",ExpressionUUID->"e7601467-4432-4552-b387-10bac14c9dac"] }, Open ]], Cell[CellGroupData[{ -Cell[319813, 7914, 2251, 64, 109, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], -Cell[322067, 7980, 557, 12, 109, "Message",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], -Cell[322627, 7994, 560, 12, 109, "Message",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], -Cell[323190, 8008, 565, 12, 109, "Message",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], -Cell[323758, 8022, 458, 10, 109, "Message",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], -Cell[324219, 8034, 172, 3, 109, "Output",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] +Cell[320149, 7997, 1833, 52, 311, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], +Cell[321985, 8051, 571, 13, 71, "Message",ExpressionUUID->"21ea2f00-0772-4705-af09-2fc349bf5882"], +Cell[322559, 8066, 571, 13, 71, "Message",ExpressionUUID->"3cd96de7-ac1e-47d9-af4a-7c1739363394"], +Cell[323133, 8081, 577, 13, 71, "Message",ExpressionUUID->"7ad391c8-82b4-4a9d-bcdc-c2b8de66aea8"], +Cell[323713, 8096, 516, 12, 32, "Message",ExpressionUUID->"e957fa5c-5910-4054-8014-ca11304e4f0a"], +Cell[324232, 8110, 24019, 441, 290, "Output",ExpressionUUID->"c11e9bef-86db-4c63-bd21-9bfa58b616c7"] }, Open ]], Cell[CellGroupData[{ -Cell[324428, 8042, 2218, 64, 109, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], -Cell[326649, 8108, 559, 12, 109, "Message",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], -Cell[327211, 8122, 562, 12, 109, "Message",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], -Cell[327776, 8136, 563, 12, 109, "Message",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], -Cell[328342, 8150, 458, 10, 109, "Message",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], -Cell[328803, 8162, 170, 3, 109, "Output",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] +Cell[348288, 8556, 1616, 48, 132, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], +Cell[349907, 8606, 693, 15, 73, "Message",ExpressionUUID->"4c377bfb-026c-49f9-970f-2c9785909e48"], +Cell[350603, 8623, 693, 15, 73, "Message",ExpressionUUID->"2a137beb-d8e6-49f5-bcb4-5695ec48b319"], +Cell[351299, 8640, 694, 15, 73, "Message",ExpressionUUID->"2f029217-a132-4360-a9b9-d9008a638567"], +Cell[351996, 8657, 520, 12, 32, "Message",ExpressionUUID->"f8ed97a4-0050-4594-8fc8-4884d77cf72b"], +Cell[352519, 8671, 217, 4, 41, "Output",ExpressionUUID->"7964bcb8-0df7-4c4c-bd8c-45f3ee7ecd0c"] }, Open ]], Cell[CellGroupData[{ -Cell[329010, 8170, 2221, 64, 109, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], -Cell[331234, 8236, 559, 12, 109, "Message",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], -Cell[331796, 8250, 562, 12, 109, "Message",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], -Cell[332361, 8264, 563, 12, 109, "Message",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], -Cell[332927, 8278, 458, 10, 109, "Message",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], -Cell[333388, 8290, 171, 3, 109, "Output",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] +Cell[352773, 8680, 2274, 64, 348, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], +Cell[355050, 8746, 691, 15, 73, "Message",ExpressionUUID->"be422642-eed4-4494-8c63-5286c79dc62d"], +Cell[355744, 8763, 690, 15, 73, "Message",ExpressionUUID->"109ef0c5-36c3-48ab-b12c-31959c1be584"], +Cell[356437, 8780, 688, 15, 73, "Message",ExpressionUUID->"eb74ee84-44c1-40aa-a245-339b1d871dce"], +Cell[357128, 8797, 518, 12, 32, "Message",ExpressionUUID->"81a5bb08-ab89-4100-b48f-8c17dbf0ba66"], +Cell[357649, 8811, 220, 4, 41, "Output",ExpressionUUID->"d5370260-e4a0-40fd-b540-28fcea540f73"] }, Open ]], Cell[CellGroupData[{ -Cell[333596, 8298, 213, 6, 109, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], -Cell[333812, 8306, 173, 3, 109, "Output",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] +Cell[357906, 8820, 2230, 63, 348, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], +Cell[360139, 8885, 692, 15, 73, "Message",ExpressionUUID->"923ce840-495b-4b53-bd9c-004516b317de"], +Cell[360834, 8902, 693, 15, 73, "Message",ExpressionUUID->"32f0c2bc-fc42-40a7-ba99-886a869ad7b9"], +Cell[361530, 8919, 693, 15, 73, "Message",ExpressionUUID->"694e5046-7feb-46ac-84b7-e70467ee7b6d"], +Cell[362226, 8936, 519, 12, 32, "Message",ExpressionUUID->"4a504352-d2d0-4839-93e1-5e12e138a35f"], +Cell[362748, 8950, 220, 4, 41, "Output",ExpressionUUID->"b82518a7-1fc7-4bae-a324-375167ede266"] }, Open ]], -Cell[334000, 8312, 245, 5, 109, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[334270, 8321, 558, 19, 109, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[334831, 8342, 170, 3, 109, "Output",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] +Cell[363005, 8959, 2233, 63, 348, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], +Cell[365241, 9024, 695, 15, 73, "Message",ExpressionUUID->"1214f3da-0c5e-4a78-a17c-39b224c90d1f"], +Cell[365939, 9041, 692, 15, 73, "Message",ExpressionUUID->"f04172d0-6909-4b66-a47e-09135e1960af"], +Cell[366634, 9058, 692, 15, 73, "Message",ExpressionUUID->"c769fb59-8590-4c55-94d1-3a69a3f79b55"], +Cell[367329, 9075, 522, 12, 32, "Message",ExpressionUUID->"5f19ed17-f8f5-4912-a36d-6acc441c306a"], +Cell[367854, 9089, 217, 4, 41, "Output",ExpressionUUID->"6b5ff289-fb27-47f1-a036-0bdbbe278026"] }, Open ]], Cell[CellGroupData[{ -Cell[335038, 8350, 170, 5, 109, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[335211, 8357, 173, 3, 109, "Output",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] +Cell[368108, 9098, 236, 6, 60, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], +Cell[368347, 9106, 218, 4, 41, "Output",ExpressionUUID->"bbd695d6-afee-4e5d-bebb-d84c0900bc40"] }, Open ]], +Cell[368580, 9113, 271, 6, 109, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[335421, 8365, 181, 5, 109, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[335605, 8372, 171, 3, 109, "Output",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] +Cell[368876, 9123, 558, 19, 66, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], +Cell[369437, 9144, 218, 4, 41, "Output",ExpressionUUID->"e453e849-ae74-4baf-9635-c2256d8d425d"] }, Open ]], Cell[CellGroupData[{ -Cell[335813, 8380, 6055, 185, 109, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[341871, 8567, 172, 3, 109, "Output",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] +Cell[369692, 9153, 170, 5, 71, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], +Cell[369865, 9160, 220, 4, 41, "Output",ExpressionUUID->"fefd3f7e-2730-4243-99d9-64b92cc284dd"] }, Open ]], Cell[CellGroupData[{ -Cell[342080, 8575, 368, 9, 109, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[342451, 8586, 172, 3, 109, "Output",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] +Cell[370122, 9169, 181, 5, 55, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], +Cell[370306, 9176, 217, 4, 41, "Output",ExpressionUUID->"6981a040-2126-4dc4-9fd0-9b923fd672c8"] }, Open ]], Cell[CellGroupData[{ -Cell[342660, 8594, 6122, 187, 109, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[348785, 8783, 173, 3, 109, "Output",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] +Cell[370560, 9185, 6055, 185, 831, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], +Cell[376618, 9372, 220, 4, 41, "Output",ExpressionUUID->"4c814f8a-f860-4c85-9bb7-7f1eac9e327b"] }, Open ]], Cell[CellGroupData[{ -Cell[348995, 8791, 368, 9, 109, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[349366, 8802, 170, 3, 109, "Output",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] +Cell[376875, 9381, 368, 9, 53, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], +Cell[377246, 9392, 222, 4, 41, "Output",ExpressionUUID->"bc9c4a58-03ab-40ce-a669-b0b3fa59fc4f"] }, Open ]], Cell[CellGroupData[{ -Cell[349573, 8810, 2663, 88, 109, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[352239, 8900, 171, 3, 109, "Output",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] +Cell[377505, 9401, 6122, 187, 900, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], +Cell[383630, 9590, 219, 4, 41, "Output",ExpressionUUID->"86bd98e7-1eb1-43f2-b283-0a8771425e22"] }, Open ]], Cell[CellGroupData[{ -Cell[352447, 8908, 2603, 85, 109, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[355053, 8995, 173, 3, 109, "Output",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] +Cell[383886, 9599, 368, 9, 53, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], +Cell[384257, 9610, 217, 4, 41, "Output",ExpressionUUID->"7eb5b1aa-c4bc-4fc0-a32a-c2da00b14094"] }, Open ]], Cell[CellGroupData[{ -Cell[355263, 9003, 3712, 118, 109, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[358978, 9123, 174, 3, 109, "Output",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] +Cell[384511, 9619, 2663, 88, 435, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], +Cell[387177, 9709, 221, 4, 41, "Output",ExpressionUUID->"a6326281-ae75-462e-9185-c4f1be0b73d8"] }, Open ]], Cell[CellGroupData[{ -Cell[359189, 9131, 2049, 58, 109, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], -Cell[361241, 9191, 579, 12, 109, "Message",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], -Cell[361823, 9205, 582, 12, 109, "Message",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], -Cell[362408, 9219, 584, 12, 109, "Message",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], -Cell[362995, 9233, 458, 10, 109, "Message",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], -Cell[363456, 9245, 172, 3, 109, "Output",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] +Cell[387435, 9718, 2603, 85, 435, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], +Cell[390041, 9805, 220, 4, 41, "Output",ExpressionUUID->"646a8000-d9c0-4eca-96f9-7cf85838faa3"] }, Open ]], Cell[CellGroupData[{ -Cell[363665, 9253, 2054, 59, 109, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], -Cell[365722, 9314, 577, 12, 109, "Message",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], -Cell[366302, 9328, 580, 12, 109, "Message",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], -Cell[366885, 9342, 583, 12, 109, "Message",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], -Cell[367471, 9356, 456, 10, 109, "Message",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], -Cell[367930, 9368, 171, 3, 109, "Output",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] +Cell[390298, 9814, 3712, 118, 575, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], +Cell[394013, 9934, 220, 4, 41, "Output",ExpressionUUID->"04472b70-0339-4b92-b867-4a6ea6121cef"] }, Open ]], Cell[CellGroupData[{ -Cell[368138, 9376, 2030, 55, 109, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], -Cell[370171, 9433, 20493, 384, 109, "Output",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] +Cell[394270, 9943, 2074, 59, 276, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], +Cell[396347, 10004, 692, 15, 73, "Message",ExpressionUUID->"ba71c149-191e-479a-adc3-5fdfed38305e"], +Cell[397042, 10021, 692, 15, 73, "Message",ExpressionUUID->"7338aa19-ef23-4cf0-9236-6b478cba2c87"], +Cell[397737, 10038, 693, 15, 73, "Message",ExpressionUUID->"c3149824-0df7-4fce-9bf0-485569e2dbf4"], +Cell[398433, 10055, 520, 12, 32, "Message",ExpressionUUID->"2d78489d-4431-4d8b-825d-8942ef3b3b1b"], +Cell[398956, 10069, 222, 4, 41, "Output",ExpressionUUID->"50814d78-172b-418f-afed-c070d36fcdb3"] }, Open ]], Cell[CellGroupData[{ -Cell[390701, 9822, 2120, 60, 109, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], -Cell[392824, 9884, 501, 11, 109, "Message",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], -Cell[393328, 9897, 504, 11, 109, "Message",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], -Cell[393835, 9910, 508, 11, 109, "Message",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], -Cell[394346, 9923, 456, 10, 109, "Message",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], -Cell[394805, 9935, 31462, 562, 109, "Output",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] +Cell[399215, 10078, 2077, 59, 276, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], +Cell[401295, 10139, 690, 15, 73, "Message",ExpressionUUID->"faa8b693-0c99-4dd4-9ca3-02f35525240e"], +Cell[401988, 10156, 690, 15, 73, "Message",ExpressionUUID->"cd2a29c1-b640-4167-8643-b4aaebb7ef72"], +Cell[402681, 10173, 691, 15, 73, "Message",ExpressionUUID->"835a796d-e126-4d4c-b739-06906ede3204"], +Cell[403375, 10190, 518, 12, 32, "Message",ExpressionUUID->"fabeb5f7-7f63-4abe-b4b1-865dc65e8099"], +Cell[403896, 10204, 217, 4, 41, "Output",ExpressionUUID->"abe702cc-1d42-4a04-a9e7-0b1e70d14275"] }, Open ]], -Cell[426282, 10500, 209, 5, 109, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], Cell[CellGroupData[{ -Cell[426516, 10509, 1616, 48, 109, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], -Cell[428135, 10559, 596, 12, 109, "Message",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], -Cell[428734, 10573, 602, 12, 109, "Message",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], -Cell[429339, 10587, 605, 12, 109, "Message",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], -Cell[429947, 10601, 458, 10, 109, "Message",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], -Cell[430408, 10613, 171, 3, 109, "Output",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] +Cell[404150, 10213, 2053, 55, 232, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], +Cell[406206, 10270, 20569, 387, 295, "Output",ExpressionUUID->"265263bf-4bd2-4701-811b-750a0b6a38c6"] }, Open ]], Cell[CellGroupData[{ -Cell[430616, 10621, 2251, 64, 109, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], -Cell[432870, 10687, 577, 12, 109, "Message",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], -Cell[433450, 10701, 580, 12, 109, "Message",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], -Cell[434033, 10715, 586, 12, 109, "Message",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], -Cell[434622, 10729, 458, 10, 109, "Message",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], -Cell[435083, 10741, 173, 3, 109, "Output",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] +Cell[426812, 10662, 2143, 60, 311, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], +Cell[428958, 10724, 534, 12, 71, "Message",ExpressionUUID->"f230019f-f165-4e40-9aee-3825eb537a9e"], +Cell[429495, 10738, 538, 12, 71, "Message",ExpressionUUID->"b97710b3-b6ca-426c-9c63-b431114489cb"], +Cell[430036, 10752, 541, 12, 71, "Message",ExpressionUUID->"27219196-e415-4f3d-8524-af3c83d4a5bd"], +Cell[430580, 10766, 495, 11, 32, "Message",ExpressionUUID->"bd26b0cf-8655-464c-9cfa-784732695a34"], +Cell[431078, 10779, 23926, 441, 290, "Output",ExpressionUUID->"013b7b08-d77b-4463-bf42-a42bc1b08008"] }, Open ]], Cell[CellGroupData[{ -Cell[435293, 10749, 2219, 64, 109, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], -Cell[437515, 10815, 579, 12, 109, "Message",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], -Cell[438097, 10829, 580, 12, 109, "Message",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], -Cell[438680, 10843, 586, 12, 109, "Message",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], -Cell[439269, 10857, 458, 10, 109, "Message",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], -Cell[439730, 10869, 171, 3, 109, "Output",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] +Cell[455041, 11225, 232, 5, 36, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], +Cell[455276, 11232, 30284, 573, 290, "Output",ExpressionUUID->"93cb79ea-bc46-4dba-9fd8-544ffa378e88"] }, Open ]], Cell[CellGroupData[{ -Cell[439938, 10877, 2219, 64, 109, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], -Cell[442160, 10943, 576, 12, 109, "Message",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], -Cell[442739, 10957, 580, 12, 109, "Message",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], -Cell[443322, 10971, 584, 12, 109, "Message",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], -Cell[443909, 10985, 458, 10, 109, "Message",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], -Cell[444370, 10997, 173, 3, 109, "Output",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] +Cell[485597, 11810, 1616, 48, 132, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], +Cell[487216, 11860, 665, 14, 73, "Message",ExpressionUUID->"85627871-98b8-437a-8bb3-278f88c16dc4"], +Cell[487884, 11876, 667, 14, 73, "Message",ExpressionUUID->"c07e8873-fff0-48f7-823e-2a48f449459c"], +Cell[488554, 11892, 665, 14, 73, "Message",ExpressionUUID->"87d0b3cd-7ab6-425c-83d5-1abfbf80223e"], +Cell[489222, 11908, 493, 11, 32, "Message",ExpressionUUID->"6086666e-3a32-4c0a-9e07-a49923dd8d61"], +Cell[489718, 11921, 195, 3, 41, "Output",ExpressionUUID->"aa00ce2e-1290-4867-8deb-a36fb6dce322"] }, Open ]], Cell[CellGroupData[{ -Cell[444580, 11005, 212, 6, 109, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], -Cell[444795, 11013, 172, 3, 109, "Output",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] +Cell[489950, 11929, 2274, 64, 348, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], +Cell[492227, 11995, 664, 14, 73, "Message",ExpressionUUID->"6eef4a76-7cf9-4e28-ad32-d3e5c1eaa324"], +Cell[492894, 12011, 665, 14, 73, "Message",ExpressionUUID->"5d7fb4e2-f685-4332-8e8b-1ed915784b16"], +Cell[493562, 12027, 666, 14, 73, "Message",ExpressionUUID->"9ec7e372-07e5-4513-8740-2850c1a7cb8a"], +Cell[494231, 12043, 493, 11, 32, "Message",ExpressionUUID->"cee95d48-76d5-471c-b14c-531026de05e6"], +Cell[494727, 12056, 196, 3, 41, "Output",ExpressionUUID->"34f1c336-2de5-4974-ad50-abcd5413dcd9"] }, Open ]], -Cell[444982, 11019, 244, 5, 109, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[445251, 11028, 558, 19, 109, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[445812, 11049, 171, 3, 109, "Output",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] +Cell[494960, 12064, 2231, 63, 348, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], +Cell[497194, 12129, 667, 14, 73, "Message",ExpressionUUID->"cdae4328-0c5b-4989-a321-ba17c370b1f0"], +Cell[497864, 12145, 667, 14, 73, "Message",ExpressionUUID->"ce3eb0aa-93d0-43f8-9cbd-42e9bfe15d19"], +Cell[498534, 12161, 670, 14, 73, "Message",ExpressionUUID->"9c93fb43-049a-4c0f-be1b-58eaff249fd7"], +Cell[499207, 12177, 495, 11, 32, "Message",ExpressionUUID->"ce005a32-e697-4e97-ac66-5b0897062a55"], +Cell[499705, 12190, 195, 3, 41, "Output",ExpressionUUID->"84326ac8-0e91-4bfa-85dc-bf95c05400de"] }, Open ]], Cell[CellGroupData[{ -Cell[446020, 11057, 170, 5, 109, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[446193, 11064, 171, 3, 109, "Output",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] +Cell[499937, 12198, 2231, 63, 348, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], +Cell[502171, 12263, 664, 14, 73, "Message",ExpressionUUID->"cfcb48b8-d556-4b03-8c92-f7853f90dba5"], +Cell[502838, 12279, 664, 14, 73, "Message",ExpressionUUID->"5e510271-2ad4-4ae9-8900-3e91bf7d3257"], +Cell[503505, 12295, 665, 14, 73, "Message",ExpressionUUID->"4592d25d-9e28-4091-8235-b5405e162679"], +Cell[504173, 12311, 492, 11, 32, "Message",ExpressionUUID->"ab376bf0-ef51-4c21-b885-80233cb347f8"], +Cell[504668, 12324, 195, 3, 41, "Output",ExpressionUUID->"f195ac8d-ad7d-435a-9840-10c52753f81d"] }, Open ]], Cell[CellGroupData[{ -Cell[446401, 11072, 181, 5, 109, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[446585, 11079, 173, 3, 109, "Output",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] +Cell[504900, 12332, 235, 6, 60, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], +Cell[505138, 12340, 194, 3, 41, "Output",ExpressionUUID->"adb5aedc-71f2-482b-af9f-d66e3ebc12ef"] }, Open ]], +Cell[505347, 12346, 270, 6, 109, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[446795, 11087, 6055, 185, 109, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[452853, 11274, 173, 3, 109, "Output",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] +Cell[505642, 12356, 558, 19, 66, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], +Cell[506203, 12377, 193, 3, 41, "Output",ExpressionUUID->"8d4baa6d-289b-4525-bf5e-8315f71adc41"] }, Open ]], Cell[CellGroupData[{ -Cell[453063, 11282, 368, 9, 109, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[453434, 11293, 172, 3, 109, "Output",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] +Cell[506433, 12385, 170, 5, 71, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], +Cell[506606, 12392, 194, 3, 41, "Output",ExpressionUUID->"07d65408-33a3-4fda-90b6-8ad05d8a0d2a"] }, Open ]], Cell[CellGroupData[{ -Cell[453643, 11301, 6122, 187, 109, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[459768, 11490, 173, 3, 109, "Output",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] +Cell[506837, 12400, 181, 5, 55, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], +Cell[507021, 12407, 195, 3, 41, "Output",ExpressionUUID->"1e26b1e7-a35f-4f83-a4d8-eb8eba55e593"] }, Open ]], Cell[CellGroupData[{ -Cell[459978, 11498, 368, 9, 109, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[460349, 11509, 172, 3, 109, "Output",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] +Cell[507253, 12415, 6055, 185, 831, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], +Cell[513311, 12602, 195, 3, 41, "Output",ExpressionUUID->"81e809fd-94f3-4125-bdc6-2c3e95c4d789"] }, Open ]], Cell[CellGroupData[{ -Cell[460558, 11517, 2663, 88, 109, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[463224, 11607, 173, 3, 109, "Output",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] +Cell[513543, 12610, 368, 9, 53, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], +Cell[513914, 12621, 196, 3, 41, "Output",ExpressionUUID->"57269de4-0eb0-4ec4-967e-35580d78acd4"] }, Open ]], Cell[CellGroupData[{ -Cell[463434, 11615, 2603, 85, 109, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[466040, 11702, 171, 3, 109, "Output",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] +Cell[514147, 12629, 6122, 187, 900, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], +Cell[520272, 12818, 194, 3, 41, "Output",ExpressionUUID->"78669dd1-f9ab-4449-8953-31adb9cd2de5"] }, Open ]], Cell[CellGroupData[{ -Cell[466248, 11710, 3712, 118, 109, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[469963, 11830, 174, 3, 109, "Output",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] +Cell[520503, 12826, 368, 9, 53, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], +Cell[520874, 12837, 194, 3, 41, "Output",ExpressionUUID->"16708326-3e75-41f1-8dd3-c726ce9953c9"] }, Open ]], Cell[CellGroupData[{ -Cell[470174, 11838, 2054, 59, 109, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], -Cell[472231, 11899, 574, 12, 109, "Message",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], -Cell[472808, 11913, 580, 12, 109, "Message",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], -Cell[473391, 11927, 580, 12, 109, "Message",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], -Cell[473974, 11941, 456, 10, 109, "Message",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], -Cell[474433, 11953, 172, 3, 109, "Output",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] +Cell[521105, 12845, 2663, 88, 435, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], +Cell[523771, 12935, 196, 3, 41, "Output",ExpressionUUID->"eddf6a1d-1161-4065-afc6-38689a83b81a"] }, Open ]], Cell[CellGroupData[{ -Cell[474642, 11961, 2054, 59, 109, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], -Cell[476699, 12022, 576, 12, 109, "Message",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], -Cell[477278, 12036, 577, 12, 109, "Message",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], -Cell[477858, 12050, 582, 12, 109, "Message",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], -Cell[478443, 12064, 458, 10, 109, "Message",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], -Cell[478904, 12076, 172, 3, 109, "Output",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] +Cell[524004, 12943, 2603, 85, 435, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], +Cell[526610, 13030, 193, 3, 41, "Output",ExpressionUUID->"1ab3e72b-bd1b-40c4-9071-09c7b2f73ad9"] }, Open ]], Cell[CellGroupData[{ -Cell[479113, 12084, 2028, 55, 109, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], -Cell[481144, 12141, 20021, 378, 109, "Output",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] +Cell[526840, 13038, 3712, 118, 575, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], +Cell[530555, 13158, 196, 3, 41, "Output",ExpressionUUID->"d3115658-6f2c-4a97-ae7f-6bb30abf1118"] }, Open ]], Cell[CellGroupData[{ -Cell[501202, 12524, 2146, 61, 109, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], -Cell[503351, 12587, 502, 11, 109, "Message",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], -Cell[503856, 12600, 506, 11, 109, "Message",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], -Cell[504365, 12613, 508, 11, 109, "Message",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], -Cell[504876, 12626, 456, 10, 109, "Message",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], -Cell[505335, 12638, 30015, 538, 109, "Output",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] +Cell[530788, 13166, 2077, 59, 276, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], +Cell[532868, 13227, 665, 14, 73, "Message",ExpressionUUID->"9f10a8b3-533a-4adf-8df8-b1c39761b32d"], +Cell[533536, 13243, 665, 14, 73, "Message",ExpressionUUID->"f813fb7c-1030-4fbc-b24e-78da68af15c2"], +Cell[534204, 13259, 665, 14, 73, "Message",ExpressionUUID->"79af0e46-d857-4cf7-af40-73ef151ec5d7"], +Cell[534872, 13275, 493, 11, 32, "Message",ExpressionUUID->"f8ea11e4-7a66-4dec-b78e-595d9ce7c0e2"], +Cell[535368, 13288, 193, 3, 41, "Output",ExpressionUUID->"a08d4dd0-607d-4229-9c88-bf48d2472f1b"] }, Open ]], -Cell[535365, 13179, 209, 5, 109, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], Cell[CellGroupData[{ -Cell[535599, 13188, 1590, 47, 109, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], -Cell[537192, 13237, 342, 6, 109, "Message",ExpressionUUID->"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], -Cell[537537, 13245, 101, 0, 109, "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[535598, 13296, 2077, 59, 276, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], +Cell[537678, 13357, 667, 14, 73, "Message",ExpressionUUID->"1bef0180-10bc-4967-bb63-729e9df650ef"], +Cell[538348, 13373, 667, 14, 73, "Message",ExpressionUUID->"16e1a512-1c70-4ac5-b1f2-a215d6390db0"], +Cell[539018, 13389, 667, 14, 73, "Message",ExpressionUUID->"e63b2836-87e9-40ce-9a09-5cb32ced3ac3"], +Cell[539688, 13405, 495, 11, 32, "Message",ExpressionUUID->"77ea60b7-e2f2-42f0-8ecb-fa742f518ca1"], +Cell[540186, 13418, 194, 3, 41, "Output",ExpressionUUID->"8ba7320f-d2b3-45f0-945a-4420a4353a87"] }, Open ]], Cell[CellGroupData[{ -Cell[537675, 13250, 2249, 64, 109, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], -Cell[539927, 13316, 342, 6, 109, "Message",ExpressionUUID->"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], -Cell[540272, 13324, 342, 6, 109, "Message",ExpressionUUID->"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], -Cell[540617, 13332, 101, 0, 109, "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[540417, 13426, 2051, 55, 232, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], +Cell[542471, 13483, 20323, 383, 296, "Output",ExpressionUUID->"06880704-5fc2-4e55-9c11-35864e0c2bb6"] }, Open ]], Cell[CellGroupData[{ -Cell[540755, 13337, 2221, 64, 109, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], -Cell[542979, 13403, 342, 6, 109, "Message",ExpressionUUID->"566a849f-fc85-4d42-a545-a46d44cf7346"], -Cell[543324, 13411, 342, 6, 109, "Message",ExpressionUUID->"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], -Cell[543669, 13419, 100, 0, 109, "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[562831, 13871, 2168, 61, 311, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], +Cell[565002, 13934, 539, 12, 71, "Message",ExpressionUUID->"4c9bde7f-7350-43aa-93c4-e824f1429aaf"], +Cell[565544, 13948, 543, 12, 71, "Message",ExpressionUUID->"9951734a-ee65-4340-9a41-efdf5487549c"], +Cell[566090, 13962, 545, 12, 71, "Message",ExpressionUUID->"53b0e21d-d00b-441a-bce9-a8be570fa5ad"], +Cell[566638, 13976, 497, 11, 32, "Message",ExpressionUUID->"cbac6821-55a0-400f-959e-91c5446548db"], +Cell[567138, 13989, 24022, 441, 290, "Output",ExpressionUUID->"63d88a7c-7617-4161-9197-b34348094f59"] }, Open ]], Cell[CellGroupData[{ -Cell[543806, 13424, 2223, 64, 109, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], -Cell[546032, 13490, 342, 6, 109, "Message",ExpressionUUID->"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], -Cell[546377, 13498, 342, 6, 109, "Message",ExpressionUUID->"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], -Cell[546722, 13506, 101, 0, 109, "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[591197, 14435, 232, 5, 36, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], +Cell[591432, 14442, 30382, 573, 290, "Output",ExpressionUUID->"cb15f48b-8781-4b9f-beb1-0ddc94d865e0"] }, Open ]], Cell[CellGroupData[{ -Cell[546860, 13511, 213, 6, 109, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[547076, 13519, 102, 0, 109, "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[621851, 15020, 1616, 48, 132, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], +Cell[623470, 15070, 642, 14, 73, "Message",ExpressionUUID->"cdf7277c-3f2a-407b-b003-ddf4053dd2fa"], +Cell[624115, 15086, 643, 14, 73, "Message",ExpressionUUID->"cea51cbf-513f-43a2-b91f-d8d71caf5cfb"], +Cell[624761, 15102, 643, 14, 73, "Message",ExpressionUUID->"6793d600-7d6b-40ef-89c2-4b4ad354f6f1"], +Cell[625407, 15118, 471, 11, 32, "Message",ExpressionUUID->"3ad75f5b-ee25-425b-8bc6-cfd64f31c259"], +Cell[625881, 15131, 170, 3, 41, "Output",ExpressionUUID->"43cb15e5-f418-4899-b8bb-57bedf1eee64"] }, Open ]], -Cell[547193, 13522, 188, 4, 109, "Input",ExpressionUUID->"2d6f49d4-1fcc-4bef-9913-3930bef1b779"] +Cell[CellGroupData[{ +Cell[626088, 15139, 2272, 64, 348, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], +Cell[628363, 15205, 643, 14, 73, "Message",ExpressionUUID->"a238e105-36ec-4e0b-9df7-50043cf6ce29"], +Cell[629009, 15221, 643, 14, 73, "Message",ExpressionUUID->"98d31a65-762f-4cf9-a44e-d869966334ce"], +Cell[629655, 15237, 643, 14, 73, "Message",ExpressionUUID->"93eb5c3d-f732-4fca-970e-e96d0b2e427a"], +Cell[630301, 15253, 471, 11, 32, "Message",ExpressionUUID->"9118818c-73a5-45c9-81aa-d152003c08b4"], +Cell[630775, 15266, 172, 3, 41, "Output",ExpressionUUID->"99e4a745-7f07-46b8-9896-ac5e1fe6a372"] +}, Open ]], +Cell[CellGroupData[{ +Cell[630984, 15274, 2233, 63, 348, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], +Cell[633220, 15339, 643, 14, 73, "Message",ExpressionUUID->"901ca4b7-2e77-4ce1-9891-4f47500b9adc"], +Cell[633866, 15355, 643, 14, 73, "Message",ExpressionUUID->"7ce736a7-1f61-4ddc-9f4f-d23a49a8b6e4"], +Cell[634512, 15371, 643, 14, 73, "Message",ExpressionUUID->"5ea39e41-a95a-416a-a8c6-6dd8f39b837e"], +Cell[635158, 15387, 471, 11, 32, "Message",ExpressionUUID->"5156a8cc-3ccd-4dd0-a937-484c1188ab48"], +Cell[635632, 15400, 170, 3, 41, "Output",ExpressionUUID->"bf2053ec-b885-4983-9333-3368d8943232"] +}, Open ]], +Cell[CellGroupData[{ +Cell[635839, 15408, 2235, 63, 348, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], +Cell[638077, 15473, 645, 14, 73, "Message",ExpressionUUID->"74ba1e6f-a22b-410f-9bd4-c9b7c1abe1d5"], +Cell[638725, 15489, 643, 14, 73, "Message",ExpressionUUID->"d9edfd6d-e887-4a95-b307-2f1935583b41"], +Cell[639371, 15505, 642, 14, 73, "Message",ExpressionUUID->"204910a7-681b-468e-a0c9-c7aa99d9ff61"], +Cell[640016, 15521, 471, 11, 32, "Message",ExpressionUUID->"24b451e2-43f4-4e17-b89f-a96306b00fdb"], +Cell[640490, 15534, 170, 3, 41, "Output",ExpressionUUID->"6842076d-789f-4e8f-a8f9-186c6cb45f3c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[640697, 15542, 236, 6, 60, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], +Cell[640936, 15550, 173, 3, 41, "Output",ExpressionUUID->"2115c273-19e3-490e-a61b-2dbb2f0e1526"] +}, Open ]], +Cell[641124, 15556, 211, 4, 109, "Input",ExpressionUUID->"2d6f49d4-1fcc-4bef-9913-3930bef1b779"] } ] *) diff --git a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw1.nb b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw1.nb index 24d770c..4ad4506 100644 --- a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw1.nb +++ b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 598568, 14570] -NotebookOptionsPosition[ 559529, 13949] -NotebookOutlinePosition[ 559940, 13966] -CellTagsIndexPosition[ 559897, 13963] +NotebookDataLength[ 715736, 16735] +NotebookOptionsPosition[ 675347, 16088] +NotebookOutlinePosition[ 675773, 16106] +CellTagsIndexPosition[ 675730, 16103] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -27,16 +27,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, - CellLabel-> - "In[408]:=",ExpressionUUID->"8fe1c173-48e4-40da-853e-c7660d0953ff"], + CellLabel->"In[1]:=",ExpressionUUID->"8fe1c173-48e4-40da-853e-c7660d0953ff"], Cell[BoxData["2"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, - 3.9940750908104277`*^9}}, - CellLabel-> - "Out[408]=",ExpressionUUID->"2e4fa5be-ebd9-47a6-b918-2d1037bfa0d3"] + 3.9940750908104277`*^9}, 3.994350007412024*^9, 3.9943525495886602`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"f6fe7e93-d329-46e0-9d32-747234faf456"] }, Open ]], Cell[CellGroupData[{ @@ -45,16 +43,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, - CellLabel-> - "In[409]:=",ExpressionUUID->"2da1658c-7e33-476a-91d3-3a12ac5d4054"], + CellLabel->"In[2]:=",ExpressionUUID->"2da1658c-7e33-476a-91d3-3a12ac5d4054"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, - 3.994075090853217*^9}}, - CellLabel-> - "Out[409]=",ExpressionUUID->"658291d7-f7a1-44c7-acc0-cc6804b86448"] + 3.994075090853217*^9}, 3.994350013612542*^9, 3.994352549694821*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"56dc98cf-6d80-4a3d-bb41-ec9c843b15ca"] }, Open ]], Cell[CellGroupData[{ @@ -63,16 +59,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "170"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, - CellLabel-> - "In[410]:=",ExpressionUUID->"c4ab2602-4821-4853-82aa-f55a72e0aaab"], + CellLabel->"In[3]:=",ExpressionUUID->"c4ab2602-4821-4853-82aa-f55a72e0aaab"], Cell[BoxData["170"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, - 3.994075090864901*^9}}, - CellLabel-> - "Out[410]=",ExpressionUUID->"388a5dec-22e1-403d-9df4-6c9a6c389a83"] + 3.994075090864901*^9}, 3.994350014020347*^9, 3.994352549715425*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"e50997f2-07cb-4634-9a9a-6ee8e80acb8d"] }, Open ]], Cell[CellGroupData[{ @@ -80,16 +74,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[411]:=",ExpressionUUID->"f789b39f-0ad8-4646-95c3-1ec11ff85d9d"], + CellLabel->"In[4]:=",ExpressionUUID->"f789b39f-0ad8-4646-95c3-1ec11ff85d9d"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, - 3.9940750908767548`*^9}}, - CellLabel-> - "Out[411]=",ExpressionUUID->"5a188d2d-00ef-4a8c-832a-844cf226ad94"] + 3.9940750908767548`*^9}, 3.994350014038136*^9, 3.9943525497366543`*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"f94403c1-2002-4f2d-8d68-6078d3aef669"] }, Open ]], Cell[CellGroupData[{ @@ -101,32 +93,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"55893559-3f60-4006-a662-5b99e964c5ad"], + CellLabel->"In[5]:=",ExpressionUUID->"55893559-3f60-4006-a662-5b99e964c5ad"], Cell[BoxData["0.5437500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, - 3.994075090888695*^9}}, - CellLabel-> - "Out[412]=",ExpressionUUID->"b8decdc7-2317-4b22-8ed5-af092522691c"] + 3.994075090888695*^9}, 3.9943500140511312`*^9, 3.994352549764677*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"b1474813-d20f-43bc-a579-af01bd8ac782"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"8dc4e2d5-d91c-4ed4-b5ed-77e7122fe469"], + CellLabel->"In[6]:=",ExpressionUUID->"8dc4e2d5-d91c-4ed4-b5ed-77e7122fe469"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, - 3.9940750909003353`*^9}}, - CellLabel-> - "Out[413]=",ExpressionUUID->"2a77efe3-a3c3-49f5-897f-bdb025f1b711"] + 3.9940750909003353`*^9}, 3.994350014064506*^9, 3.994352549794505*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"3dcfcb69-1753-471f-901a-a1bdfce1378f"] }, Open ]], Cell[CellGroupData[{ @@ -137,16 +125,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[414]:=",ExpressionUUID->"e4a8643f-da8e-487a-a9da-facf48dd1dbe"], + CellLabel->"In[7]:=",ExpressionUUID->"e4a8643f-da8e-487a-a9da-facf48dd1dbe"], Cell[BoxData["6.426003577835178`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, - 3.9940750909055967`*^9}}, - CellLabel-> - "Out[414]=",ExpressionUUID->"e1fe17f1-16a6-485c-b548-c95c3bb75d7d"] + 3.9940750909055967`*^9}, 3.994350014077064*^9, 3.994352549822948*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"05532ee1-ae50-4782-a900-8025330ef6c4"] }, Open ]], Cell[CellGroupData[{ @@ -158,16 +144,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[415]:=",ExpressionUUID->"9b20a0d1-981f-47cb-9932-f43daf3b20ff"], + CellLabel->"In[8]:=",ExpressionUUID->"9b20a0d1-981f-47cb-9932-f43daf3b20ff"], Cell[BoxData["4.7806909477779245`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, - 3.994075090919847*^9}}, - CellLabel-> - "Out[415]=",ExpressionUUID->"962ca9aa-e7fa-4fc2-ac4d-548281cd254e"] + 3.994075090919847*^9}, 3.9943500140909977`*^9, 3.9943525498321877`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"c12fc1d8-9b71-4131-a96a-e148d74178b9"] }, Open ]], Cell[CellGroupData[{ @@ -175,15 +159,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8747255229"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, - CellLabel-> - "In[416]:=",ExpressionUUID->"20aeb256-62d8-422c-9e4c-2e8eb192f455"], + CellLabel->"In[9]:=",ExpressionUUID->"20aeb256-62d8-422c-9e4c-2e8eb192f455"], Cell[BoxData["0.8747255229`"], "Output", CellChangeTimes->{ 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, - 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}}, - CellLabel-> - "Out[416]=",ExpressionUUID->"5864dfbb-c4d4-492d-a6a6-842db0ae821f"] + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.994350014105111*^9, 3.9943525498609257`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"a970ec18-6d9f-4f56-8b1a-8a8277f265fc"] }, Open ]], Cell[CellGroupData[{ @@ -191,47 +174,42 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3882072479"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, - CellLabel-> - "In[417]:=",ExpressionUUID->"de81fbf9-8a17-44ca-a205-0a2f9dffac83"], + CellLabel->"In[10]:=",ExpressionUUID->"de81fbf9-8a17-44ca-a205-0a2f9dffac83"], Cell[BoxData["0.3882072479`"], "Output", CellChangeTimes->{ 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, - 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}}, - CellLabel-> - "Out[417]=",ExpressionUUID->"dc56965f-2437-4b21-b0c3-783cc139f50c"] + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994350014118813*^9, 3.994352549892617*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"c3f085a0-d46d-4964-9626-7692da86fb88"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[418]:=",ExpressionUUID->"3fa258e5-621f-4343-b671-d18a2cdd0ab0"], + CellLabel->"In[11]:=",ExpressionUUID->"3fa258e5-621f-4343-b671-d18a2cdd0ab0"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, - 3.994075090955942*^9}}, - CellLabel-> - "Out[418]=",ExpressionUUID->"7a617167-5f7d-4152-97c6-3f012b851962"] + 3.994075090955942*^9}, 3.994350014133327*^9, 3.9943525499203157`*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"68561822-7b8f-4cc2-a1ea-679f3f737846"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[419]:=",ExpressionUUID->"b88bafaf-5c5f-49ae-afa0-a452969fca21"], + CellLabel->"In[12]:=",ExpressionUUID->"b88bafaf-5c5f-49ae-afa0-a452969fca21"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, - 3.9940750909684067`*^9}}, - CellLabel-> - "Out[419]=",ExpressionUUID->"e30e9937-5d86-46db-8e0e-cba3b49e6d5c"] + 3.9940750909684067`*^9}, 3.9943500141478662`*^9, 3.9943525499526157`*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"0bf80200-cbb9-41a1-9e97-0e97b52cfce8"] }, Open ]], Cell[CellGroupData[{ @@ -255,16 +233,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[420]:=",ExpressionUUID->"a65de40a-1982-4c6c-a9dd-ebeb9b25be9f"], + CellLabel->"In[13]:=",ExpressionUUID->"a65de40a-1982-4c6c-a9dd-ebeb9b25be9f"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, - 3.994075090978916*^9}}, - CellLabel-> - "Out[420]=",ExpressionUUID->"831e86d8-cb7d-4d59-b5d1-2804ba1a4f94"] + 3.994075090978916*^9}, 3.994350014164619*^9, 3.9943525499812193`*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"f96d861d-91a9-40a0-a2b6-d8dacaa48a01"] }, Open ]], Cell[CellGroupData[{ @@ -288,16 +264,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[421]:=",ExpressionUUID->"834c7559-63d6-4f38-8f88-0b74d1f00b6b"], + CellLabel->"In[14]:=",ExpressionUUID->"834c7559-63d6-4f38-8f88-0b74d1f00b6b"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, - 3.99407509098914*^9}}, - CellLabel-> - "Out[421]=",ExpressionUUID->"4525e55f-b065-42fb-906a-946f4dba3cb7"] + 3.99407509098914*^9}, 3.9943500141835203`*^9, 3.994352550010997*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"5e7a1805-a006-4690-a174-65062deaebe5"] }, Open ]], Cell[CellGroupData[{ @@ -352,16 +326,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[422]:=",ExpressionUUID->"88380677-4b53-464b-a364-c25e5bf28cfa"], + CellLabel->"In[15]:=",ExpressionUUID->"88380677-4b53-464b-a364-c25e5bf28cfa"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, - 3.994075090999715*^9}}, - CellLabel-> - "Out[422]=",ExpressionUUID->"7569faee-79b8-43a8-89dd-3d0efc170bd0"] + 3.994075090999715*^9}, 3.994350014202561*^9, 3.9943525500460367`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"15b20ca6-08df-4e89-8eee-80de530690e9"] }, Open ]], Cell[CellGroupData[{ @@ -412,17 +384,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[423]:=",ExpressionUUID->"1c6bff4f-3585-4780-9239-2d0970069dfe"], + CellLabel->"In[16]:=",ExpressionUUID->"1c6bff4f-3585-4780-9239-2d0970069dfe"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, - 3.994075091010479*^9}}, - CellLabel-> - "Out[423]=",ExpressionUUID->"6cd7a847-5d88-4450-a816-1c98309a1a1a"] + 3.994075091010479*^9}, 3.9943500142187862`*^9, 3.994352550084897*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"da94d778-f6cf-4ce3-b20c-19d3acbe5ac9"] }, Open ]], Cell[CellGroupData[{ @@ -473,17 +443,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[424]:=",ExpressionUUID->"4dc74e11-a432-4902-b777-1c51f8e95def"], + CellLabel->"In[17]:=",ExpressionUUID->"4dc74e11-a432-4902-b777-1c51f8e95def"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, - 3.9940750910236893`*^9}}, - CellLabel-> - "Out[424]=",ExpressionUUID->"72ed276c-667b-4494-86aa-9b2b6a273373"] + 3.9940750910236893`*^9}, 3.994350014235066*^9, 3.9943525501149406`*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"b26fb990-f85f-4f8f-a4eb-e3d4c3e57c98"] }, Open ]], Cell[CellGroupData[{ @@ -536,64 +504,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[425]:=",ExpressionUUID->"a3fbbc71-ed31-48aa-81aa-83cb9ac7c2e0"], + CellLabel->"In[18]:=",ExpressionUUID->"a3fbbc71-ed31-48aa-81aa-83cb9ac7c2e0"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, - 3.994075091035767*^9}}, - CellLabel-> - "Out[425]=",ExpressionUUID->"57935ae7-c6ce-4573-aa40-9f33f2113804"] + 3.994075091035767*^9}, 3.9943500142543087`*^9, 3.99435255015595*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"b0490063-d132-4635-b7d1-8a5d3600edd2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[426]:=",ExpressionUUID->"2cb5df68-72f8-4aa3-bfed-e59b541fd94a"], + CellLabel->"In[19]:=",ExpressionUUID->"2cb5df68-72f8-4aa3-bfed-e59b541fd94a"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, - 3.9940750910471153`*^9}}, - CellLabel-> - "Out[426]=",ExpressionUUID->"613e1fb5-c5fd-4266-9976-dfacc4c7e258"] + 3.9940750910471153`*^9}, 3.994350014271668*^9, 3.994352550184596*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"956e4a9c-08ed-4d6b-bd6c-3ffb557e2ab8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[427]:=",ExpressionUUID->"c39a481b-8f5b-46f1-bf4f-b7b84e7c763c"], + CellLabel->"In[20]:=",ExpressionUUID->"c39a481b-8f5b-46f1-bf4f-b7b84e7c763c"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, - 3.9940750910581427`*^9}}, - CellLabel-> - "Out[427]=",ExpressionUUID->"47ff5e5d-50b3-40b1-a3ca-407cb3563f45"] + 3.9940750910581427`*^9}, 3.994350014285447*^9, 3.994352550232533*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"3ca7d572-0f24-4821-a09f-cbe456b173ba"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[428]:=",ExpressionUUID->"52a6af0b-2aaf-4da3-8ad0-3cf9cac0c9c7"], + CellLabel->"In[21]:=",ExpressionUUID->"52a6af0b-2aaf-4da3-8ad0-3cf9cac0c9c7"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, - 3.994075091069083*^9}}, - CellLabel-> - "Out[428]=",ExpressionUUID->"d29d4705-0e39-4e58-9657-394a033522f2"] + 3.994075091069083*^9}, 3.994350014302601*^9, 3.994352550278421*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"04e70f22-e308-4f28-9a01-f7a32e4b3951"] }, Open ]], Cell[CellGroupData[{ @@ -602,33 +562,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[429]:=",ExpressionUUID->"274614a8-b2e4-488a-9a51-b3c1320f8cf2"], + CellLabel->"In[22]:=",ExpressionUUID->"274614a8-b2e4-488a-9a51-b3c1320f8cf2"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, - 3.994075091080567*^9}}, - CellLabel-> - "Out[429]=",ExpressionUUID->"5899c6a4-4bbb-474c-adbd-42c47f7a97b3"] + 3.994075091080567*^9}, 3.99435001431933*^9, 3.99435255032493*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"b329c9cb-3ea5-4dd2-b79a-77b698387271"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[430]:=",ExpressionUUID->"4c3ccab8-f16a-473a-9477-8f4038d7fcf0"], + CellLabel->"In[23]:=",ExpressionUUID->"4c3ccab8-f16a-473a-9477-8f4038d7fcf0"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, - 3.994075091090703*^9}}, - CellLabel-> - "Out[430]=",ExpressionUUID->"2d2025be-d99e-4781-94ac-86c0aacd6b4d"] + 3.994075091090703*^9}, 3.99435001433454*^9, 3.994352555471903*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"b81b8921-29eb-49c4-a4e1-7b82d84dc7a9"] }, Open ]], Cell[CellGroupData[{ @@ -638,16 +594,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073690740699*^9, 3.994073690862359*^9}}, - CellLabel-> - "In[431]:=",ExpressionUUID->"b139e6f3-21d1-4cfc-86bb-63f330a03334"], + CellLabel->"In[24]:=",ExpressionUUID->"b139e6f3-21d1-4cfc-86bb-63f330a03334"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, - 3.994075091102222*^9}}, - CellLabel-> - "Out[431]=",ExpressionUUID->"76702380-b2f8-44db-8133-f9eb3e9f6570"] + 3.994075091102222*^9}, 3.994350014349785*^9, 3.994352555859017*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"e75384a5-5bc7-4080-93c7-7d08d16f58af"] }, Open ]], Cell[CellGroupData[{ @@ -657,16 +611,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, - CellLabel-> - "In[432]:=",ExpressionUUID->"e1207387-24ac-4dea-843b-d1089efa7762"], + CellLabel->"In[25]:=",ExpressionUUID->"e1207387-24ac-4dea-843b-d1089efa7762"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, - 3.994075091112747*^9}}, - CellLabel-> - "Out[432]=",ExpressionUUID->"19f73123-c298-4350-8ed8-8c2fec5bbb1c"] + 3.994075091112747*^9}, 3.994350014370672*^9, 3.994352555899749*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"af198241-9b01-4d48-8d1b-a2f92e7a9c3e"] }, Open ]], Cell[CellGroupData[{ @@ -675,16 +627,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[433]:=",ExpressionUUID->"d35bc7f8-d637-4879-81b3-93555238ca00"], + CellLabel->"In[26]:=",ExpressionUUID->"d35bc7f8-d637-4879-81b3-93555238ca00"], Cell[BoxData["70"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, - 3.9940750911232967`*^9}}, - CellLabel-> - "Out[433]=",ExpressionUUID->"77e86005-a4b5-4b64-b60a-17a63c8d5c96"] + 3.9940750911232967`*^9}, 3.994350014390464*^9, 3.9943525559379683`*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"ca76ba9b-412a-4bc6-861f-d4d721d7e572"] }, Open ]], Cell[CellGroupData[{ @@ -699,16 +649,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[434]:=",ExpressionUUID->"873e03bc-05ef-4eee-b240-9645488938d1"], + CellLabel->"In[27]:=",ExpressionUUID->"873e03bc-05ef-4eee-b240-9645488938d1"], Cell[BoxData["0.1087764705882353`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, - 3.994075091133902*^9}}, - CellLabel-> - "Out[434]=",ExpressionUUID->"d5233a41-8a26-4392-8654-ad00aa242b61"] + 3.994075091133902*^9}, 3.994350014408455*^9, 3.994352555976458*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"14671ecb-8328-440e-b2c2-ad56ca6cdc60"] }, Open ]], Cell[CellGroupData[{ @@ -723,17 +671,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[435]:=",ExpressionUUID->"005f52ce-9a2a-4bce-9747-69a2e1f94c09"], + CellLabel->"In[28]:=",ExpressionUUID->"005f52ce-9a2a-4bce-9747-69a2e1f94c09"], Cell[BoxData[ RowBox[{"-", "2.5658588235294117`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, - 3.9940750911440773`*^9}}, - CellLabel-> - "Out[435]=",ExpressionUUID->"6abec2a2-b612-4b94-bc11-e1939f456334"] + 3.9940750911440773`*^9}, 3.994350014424663*^9, 3.994352556022147*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"72be62d0-2769-4d40-a1aa-4eaad45f3ae4"] }, Open ]], Cell[CellGroupData[{ @@ -764,16 +710,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[436]:=",ExpressionUUID->"a0840464-3e6c-4c47-a4dc-923fe4972af5"], + CellLabel->"In[29]:=",ExpressionUUID->"a0840464-3e6c-4c47-a4dc-923fe4972af5"], Cell[BoxData["17.474387700041003`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, - 3.9940750911556253`*^9}}, - CellLabel-> - "Out[436]=",ExpressionUUID->"e5a556e2-6106-4fd0-a44d-e56291c234f0"] + 3.9940750911556253`*^9}, 3.9943500144437237`*^9, 3.994352556056705*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"3a822a3f-510a-4874-8b45-9ce666bd0bb6"] }, Open ]], Cell[CellGroupData[{ @@ -781,16 +725,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[437]:=",ExpressionUUID->"b6441bd4-7a69-43ea-ba92-f5dcf5867d52"], + CellLabel->"In[30]:=",ExpressionUUID->"b6441bd4-7a69-43ea-ba92-f5dcf5867d52"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, - 3.99407509116647*^9}}, - CellLabel-> - "Out[437]=",ExpressionUUID->"4ec5757d-8ff3-425c-9386-0f27589df0fd"] + 3.99407509116647*^9}, 3.9943500144655313`*^9, 3.994352556086524*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"b42cd87c-e581-43a5-9179-89018e3349ec"] }, Open ]], Cell[CellGroupData[{ @@ -800,21 +742,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.9940737081112833`*^9, 3.994073709172043*^9}}, - CellLabel-> - "In[438]:=",ExpressionUUID->"ec59f7e4-521b-4033-9663-877560d36cf4"], + CellLabel->"In[31]:=",ExpressionUUID->"ec59f7e4-521b-4033-9663-877560d36cf4"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{ 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, - 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}}, - CellLabel-> - "Out[438]=",ExpressionUUID->"a8767b48-8606-4d48-b47c-275a280f9721"] + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.994350014481496*^9, 3.994352556124181*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"f9631a4b-a0de-4ace-ad48-a3a70d817213"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[439]:=",ExpressionUUID->"be9b1537-8539-405a-9142-2855b44c2bd8"], + CellLabel->"In[32]:=",ExpressionUUID->"be9b1537-8539-405a-9142-2855b44c2bd8"], Cell[CellGroupData[{ @@ -823,21 +763,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073711335288*^9, 3.994073712564888*^9}}, - CellLabel-> - "In[440]:=",ExpressionUUID->"ab141ba7-c516-4594-afd9-d4e4026a803a"], + CellLabel->"In[33]:=",ExpressionUUID->"ab141ba7-c516-4594-afd9-d4e4026a803a"], Cell[BoxData["0.785`"], "Output", CellChangeTimes->{ 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, - 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}}, - CellLabel-> - "Out[440]=",ExpressionUUID->"2a80916f-884a-4e8c-900e-62bb4ca81ee6"] + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.994350014511381*^9, 3.994352556177773*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"f5165c53-c626-47b6-b521-5ee2fe122155"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[441]:=",ExpressionUUID->"ea7ebe23-0332-41f4-9bf9-9de81a2d1c58"], + CellLabel->"In[34]:=",ExpressionUUID->"ea7ebe23-0332-41f4-9bf9-9de81a2d1c58"], Cell[CellGroupData[{ @@ -846,21 +784,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940737150021257`*^9, 3.994073716213628*^9}}, - CellLabel-> - "In[442]:=",ExpressionUUID->"d22f9856-b278-4da0-ac80-e4f2aad7e881"], + CellLabel->"In[35]:=",ExpressionUUID->"d22f9856-b278-4da0-ac80-e4f2aad7e881"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{ 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, - 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}}, - CellLabel-> - "Out[442]=",ExpressionUUID->"f3a9b9a5-c57c-4aca-a58a-22760bdb3199"] + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.994350014541834*^9, 3.994352556216663*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"734b6302-029b-4d35-9a3f-79a06a8464cf"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[443]:=",ExpressionUUID->"aa7c73c4-7d6d-45c1-b034-aa7300d12b27"], + CellLabel->"In[36]:=",ExpressionUUID->"aa7c73c4-7d6d-45c1-b034-aa7300d12b27"], Cell[CellGroupData[{ @@ -869,21 +805,19 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, - CellLabel-> - "In[444]:=",ExpressionUUID->"87502099-7a58-4c87-b791-742712d905a8"], + CellLabel->"In[37]:=",ExpressionUUID->"87502099-7a58-4c87-b791-742712d905a8"], Cell[BoxData["1.125`"], "Output", CellChangeTimes->{ 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, - 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}}, - CellLabel-> - "Out[444]=",ExpressionUUID->"0213b930-a2b7-43d8-aee3-0f480fb55ce1"] + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.9943500145664673`*^9, 3.9943525562542257`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"b546c886-84e8-415f-99aa-c0309a8ff4be"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[445]:=",ExpressionUUID->"3975a569-11c3-49b5-a9f5-12c45d938987"], + CellLabel->"In[38]:=",ExpressionUUID->"3975a569-11c3-49b5-a9f5-12c45d938987"], Cell[CellGroupData[{ @@ -892,21 +826,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, 3.9940737264630413`*^9}}, - CellLabel-> - "In[446]:=",ExpressionUUID->"46ff4a35-e8b3-4712-8c95-f04c6b4f1b19"], + CellLabel->"In[39]:=",ExpressionUUID->"46ff4a35-e8b3-4712-8c95-f04c6b4f1b19"], Cell[BoxData["1.145`"], "Output", CellChangeTimes->{ 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, - 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}}, - CellLabel-> - "Out[446]=",ExpressionUUID->"e94c18eb-a569-4463-a03a-4df750c8ee16"] + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.994350014593479*^9, 3.9943525562977448`*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"f992da28-b150-4c96-a77a-2a6dfe3b1763"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[447]:=",ExpressionUUID->"d749f7f6-4bc9-4a37-b767-de22f7bfae93"], + CellLabel->"In[40]:=",ExpressionUUID->"d749f7f6-4bc9-4a37-b767-de22f7bfae93"], Cell[CellGroupData[{ @@ -915,21 +847,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, 3.994073731586865*^9}}, - CellLabel-> - "In[448]:=",ExpressionUUID->"a6a1c89f-f1b6-4d8e-8892-18b23c974523"], + CellLabel->"In[41]:=",ExpressionUUID->"a6a1c89f-f1b6-4d8e-8892-18b23c974523"], Cell[BoxData["0.565`"], "Output", CellChangeTimes->{ 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, - 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}}, - CellLabel-> - "Out[448]=",ExpressionUUID->"ec577efd-2169-40b1-9d66-34a661b7d634"] + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.994350014616272*^9, 3.994352556331946*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"36471249-5de3-471d-81ef-bd67adcb8c99"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[449]:=",ExpressionUUID->"6ef6c23b-efe1-4381-8dbd-7a685bb93414"], + CellLabel->"In[42]:=",ExpressionUUID->"6ef6c23b-efe1-4381-8dbd-7a685bb93414"], Cell[CellGroupData[{ @@ -938,21 +868,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, 3.994073737300967*^9}}, - CellLabel-> - "In[450]:=",ExpressionUUID->"2db0b0f3-277c-414a-8b1e-cda1b8115745"], + CellLabel->"In[43]:=",ExpressionUUID->"2db0b0f3-277c-414a-8b1e-cda1b8115745"], Cell[BoxData["1.5`"], "Output", CellChangeTimes->{ 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, - 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}}, - CellLabel-> - "Out[450]=",ExpressionUUID->"799d4243-721b-49e0-9ea5-504a37101c70"] + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.994350014667396*^9, 3.994352556369924*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"b2687684-9c99-4d36-a0a1-4a8dc3b1abd2"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[451]:=",ExpressionUUID->"a90c1064-83ca-4580-a782-45503b2a3e0a"], + CellLabel->"In[44]:=",ExpressionUUID->"a90c1064-83ca-4580-a782-45503b2a3e0a"], Cell[CellGroupData[{ @@ -960,21 +888,19 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.635"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, - CellLabel-> - "In[452]:=",ExpressionUUID->"b2424bd5-a184-4487-a247-9670211a1381"], + CellLabel->"In[45]:=",ExpressionUUID->"b2424bd5-a184-4487-a247-9670211a1381"], Cell[BoxData["0.635`"], "Output", CellChangeTimes->{ 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, - 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}}, - CellLabel-> - "Out[452]=",ExpressionUUID->"9ea40502-7747-4bdb-b61f-8cbad2d3ceaa"] + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.994350014693096*^9, 3.9943525564141407`*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"e857e9ec-0cb6-4e6d-9ca3-c336eddeadb1"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[453]:=",ExpressionUUID->"446a7c7d-45fe-4d75-9981-40be2c500f76"], + CellLabel->"In[46]:=",ExpressionUUID->"446a7c7d-45fe-4d75-9981-40be2c500f76"], Cell[CellGroupData[{ @@ -1463,16 +1389,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[454]:=",ExpressionUUID->"91f7b36e-cafc-45ac-82d9-9cc8f7b4f65a"], + CellLabel->"In[47]:=",ExpressionUUID->"91f7b36e-cafc-45ac-82d9-9cc8f7b4f65a"], Cell[BoxData["0.12734722137174234`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, - 3.994075091306961*^9}}, - CellLabel-> - "Out[454]=",ExpressionUUID->"c5665871-9309-4d8e-a18f-86a7575e2a2a"] + 3.994075091306961*^9}, 3.994350014910227*^9, 3.994352556592387*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"14f4e230-a594-40ec-8df2-1f6868536604"] }, Open ]], Cell[CellGroupData[{ @@ -1966,16 +1890,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[455]:=",ExpressionUUID->"9e881350-3c46-4116-b9a6-a723c92eb5c9"], + CellLabel->"In[48]:=",ExpressionUUID->"9e881350-3c46-4116-b9a6-a723c92eb5c9"], Cell[BoxData["7.503764283698204`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, - 3.994075091332656*^9}}, - CellLabel-> - "Out[455]=",ExpressionUUID->"85f78186-7a84-4db6-bfd8-600689b234d5"] + 3.994075091332656*^9}, 3.9943500150143414`*^9, 3.994352556739131*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"09d3deb4-6c3d-4532-a484-547c5d294d2e"] }, Open ]], Cell[CellGroupData[{ @@ -2463,17 +2385,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[456]:=",ExpressionUUID->"ea63455f-1636-45bc-af0e-8bfd0e77196d"], + CellLabel->"In[49]:=",ExpressionUUID->"ea63455f-1636-45bc-af0e-8bfd0e77196d"], Cell[BoxData[ RowBox[{"-", "14.220629552114458`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, - 3.994075091358534*^9}}, - CellLabel-> - "Out[456]=",ExpressionUUID->"6d976a6c-2c71-41e6-b7f8-fa9e8b9c6fe8"] + 3.994075091358534*^9}, 3.994350015116166*^9, 3.994352556808947*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"a50d7ebf-4dbe-47d9-9775-09b4555b3389"] }, Open ]], Cell[CellGroupData[{ @@ -3031,17 +2951,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[457]:=",ExpressionUUID->"a5c096f4-a6a2-4f3a-b4dc-b7238271be18"], + CellLabel->"In[50]:=",ExpressionUUID->"a5c096f4-a6a2-4f3a-b4dc-b7238271be18"], Cell[BoxData[ RowBox[{"-", "18.05754390959481`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, - 3.99407509139049*^9}}, - CellLabel-> - "Out[457]=",ExpressionUUID->"1b6c8a71-712a-49ee-a2c8-b3f64ae83497"] + 3.99407509139049*^9}, 3.994350015237442*^9, 3.9943525569048967`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"6b2f7997-063c-4715-a92a-80950aedb810"] }, Open ]], Cell[CellGroupData[{ @@ -3599,17 +3517,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[458]:=",ExpressionUUID->"6a3ffacd-73ad-49ff-85c8-adad63d69aee"], + CellLabel->"In[51]:=",ExpressionUUID->"6a3ffacd-73ad-49ff-85c8-adad63d69aee"], Cell[BoxData[ RowBox[{"-", "51.76635903245878`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, - 3.994075091423628*^9}}, - CellLabel-> - "Out[458]=",ExpressionUUID->"711a396b-cd50-49c2-bb3a-40d91b0bb040"] + 3.994075091423628*^9}, 3.99435001533963*^9, 3.9943525569793663`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"1c65c269-74b4-4353-bf5f-cb057556ad04"] }, Open ]], Cell[CellGroupData[{ @@ -4240,49 +4156,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[459]:=",ExpressionUUID->"fb9a1b94-b949-44c2-8fe3-8942caa84fe2"], + CellLabel->"In[52]:=",ExpressionUUID->"fb9a1b94-b949-44c2-8fe3-8942caa84fe2"], Cell[BoxData[ RowBox[{"-", "131.16526179683018`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, - 3.9940750914627743`*^9}}, - CellLabel-> - "Out[459]=",ExpressionUUID->"e767b85b-91d1-4341-8d41-a79236dc2721"] + 3.9940750914627743`*^9}, 3.994350015471883*^9, 3.994352557080714*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"b66372e8-15b9-400c-8976-03910ea302a4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[460]:=",ExpressionUUID->"3350982b-73a4-40cd-8396-2ddf11ec098f"], + CellLabel->"In[53]:=",ExpressionUUID->"3350982b-73a4-40cd-8396-2ddf11ec098f"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, - 3.994075091476185*^9}}, - CellLabel-> - "Out[460]=",ExpressionUUID->"8d7ec022-2571-4e85-8e27-a6948cef4103"] + 3.994075091476185*^9}, 3.994350015493648*^9, 3.9943525571188917`*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"f6f4f57d-36df-46d7-bea7-3a6fe0073748"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[461]:=",ExpressionUUID->"7642c3e9-30be-455c-b967-c675f84df14c"], + CellLabel->"In[54]:=",ExpressionUUID->"7642c3e9-30be-455c-b967-c675f84df14c"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, - 3.994075091486505*^9}}, - CellLabel-> - "Out[461]=",ExpressionUUID->"4e3a5cd9-2b9d-48d7-8bc1-5d6df7953bc0"] + 3.994075091486505*^9}, 3.994350015508523*^9, 3.994352557157261*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"0a99dac7-40c6-4a68-8cc1-29bc381524f1"] }, Open ]], Cell[CellGroupData[{ @@ -4326,16 +4236,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[462]:=",ExpressionUUID->"ce01ebdc-52ef-45e2-8b39-b931f30e5522"], + CellLabel->"In[55]:=",ExpressionUUID->"ce01ebdc-52ef-45e2-8b39-b931f30e5522"], Cell[BoxData["102.57012833062927`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, - 3.994075091497402*^9}}, - CellLabel-> - "Out[462]=",ExpressionUUID->"6efaafab-1ee0-45ad-9a36-2517866d4697"] + 3.994075091497402*^9}, 3.994350015523693*^9, 3.994352557189999*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"3cf9d76f-cfb6-4ad5-8570-f1bd54a3f089"] }, Open ]], Cell[CellGroupData[{ @@ -4375,17 +4283,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[463]:=",ExpressionUUID->"0e1ac804-4cda-4439-83db-a1177dffaf72"], + CellLabel->"In[56]:=",ExpressionUUID->"0e1ac804-4cda-4439-83db-a1177dffaf72"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, - 3.994075091508032*^9}}, - CellLabel-> - "Out[463]=",ExpressionUUID->"7a25a679-eff9-432d-8d58-d7de1c50e057"] + 3.994075091508032*^9}, 3.994350015538252*^9, 3.994352557216886*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"87335a7a-f473-4f12-badf-dcdb430eeebc"] }, Open ]], Cell[CellGroupData[{ @@ -4429,103 +4335,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[464]:=",ExpressionUUID->"24896788-36d8-4a4e-9682-579df2322bb9"], + CellLabel->"In[57]:=",ExpressionUUID->"24896788-36d8-4a4e-9682-579df2322bb9"], Cell[BoxData["106.05157029710364`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, - 3.994075091518471*^9}}, - CellLabel-> - "Out[464]=",ExpressionUUID->"e7feeb19-25af-4e81-8c4b-70239431e215"] + 3.994075091518471*^9}, 3.994350015552257*^9, 3.994352557244298*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"b52b86f0-b089-4571-8eac-f2554315e9c2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[465]:=",ExpressionUUID->"1b5c9d0c-19c8-4c2b-9989-7dedd166bdcb"], + CellLabel->"In[58]:=",ExpressionUUID->"1b5c9d0c-19c8-4c2b-9989-7dedd166bdcb"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, - 3.99407509152868*^9}}, - CellLabel-> - "Out[465]=",ExpressionUUID->"0cbf36d9-74aa-46fd-a674-2b3fe840be7c"] + 3.99407509152868*^9}, 3.994350015565906*^9, 3.994352557279069*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"cdff87b2-09f8-4204-a951-5883f2adfbae"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[466]:=",ExpressionUUID->"c3446fed-5381-4526-b84d-b5424ef3f6ef"], + CellLabel->"In[59]:=",ExpressionUUID->"c3446fed-5381-4526-b84d-b5424ef3f6ef"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, - 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}}, - CellLabel-> - "Out[466]=",ExpressionUUID->"db83aecb-9123-40bd-bbaa-e4f7cf62ddfc"] + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.994350015579815*^9, 3.994352557310775*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"dd3a7ff6-a6b8-4570-858a-5fa863d893a4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[467]:=",ExpressionUUID->"526f1696-b258-400b-8a96-60fbae37852f"], + CellLabel->"In[60]:=",ExpressionUUID->"526f1696-b258-400b-8a96-60fbae37852f"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, - 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}}, - CellLabel-> - "Out[467]=",ExpressionUUID->"34fdcb2f-8e5b-4996-814b-db0b8cdec9b3"] + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.994350015593841*^9, 3.994352557347616*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"2e92b75d-f7bd-4145-8268-59fca0a0e62b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[468]:=",ExpressionUUID->"98b96cd6-5d4c-4e52-b363-b3dff8ee271e"], + CellLabel->"In[61]:=",ExpressionUUID->"98b96cd6-5d4c-4e52-b363-b3dff8ee271e"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, - 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}}, - CellLabel-> - "Out[468]=",ExpressionUUID->"86a7d301-7f0d-4076-bbf9-81ed2f2bb91f"] + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.994350015611946*^9, 3.994352557387364*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"ed5d2aca-c98f-47db-9b48-081b88133d18"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[469]:=",ExpressionUUID->"194b3329-8bba-47df-bf16-20b5c2eeb717"], + CellLabel->"In[62]:=",ExpressionUUID->"194b3329-8bba-47df-bf16-20b5c2eeb717"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, - 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}}, - CellLabel-> - "Out[469]=",ExpressionUUID->"b0cb48ea-77f9-4017-aaf8-d6521d884554"] + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.994350015625019*^9, 3.994352557431115*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"6ae4d682-377f-45dd-9a7d-a6fdd5f947c4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[470]:=",ExpressionUUID->"6f9c1217-09e6-44aa-9c38-6c85a894cd3c"], + CellLabel->"In[63]:=",ExpressionUUID->"6f9c1217-09e6-44aa-9c38-6c85a894cd3c"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, - 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}}, - CellLabel-> - "Out[470]=",ExpressionUUID->"acee040a-3dc3-4aa6-a5b1-f868fbb1889d"] + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.9943500156906643`*^9, 3.9943525574675198`*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"b56603b1-e3ee-4e6f-8f78-f2c60d36f589"] }, Open ]], Cell[CellGroupData[{ @@ -4546,16 +4443,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[471]:=",ExpressionUUID->"46851f4d-166d-41a3-9017-4031733d9226"], + CellLabel->"In[64]:=",ExpressionUUID->"46851f4d-166d-41a3-9017-4031733d9226"], Cell[BoxData[ RowBox[{"-", "33.35096235519822`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, - 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}}, - CellLabel-> - "Out[471]=",ExpressionUUID->"c6969745-bdfa-4dfc-9e80-1731f8fa155e"] + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994350015706835*^9, 3.994352557496716*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"615cbc97-2224-4d6c-8865-83112f8fcb5a"] }, Open ]], Cell[CellGroupData[{ @@ -4576,16 +4472,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[472]:=",ExpressionUUID->"ac442096-0fa2-4641-a8ed-927c3361bbfa"], + CellLabel->"In[65]:=",ExpressionUUID->"ac442096-0fa2-4641-a8ed-927c3361bbfa"], Cell[BoxData[ RowBox[{"-", "6.430095836913352`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, - 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}}, - CellLabel-> - "Out[472]=",ExpressionUUID->"ef0cf1ff-4b5a-49b2-a8c7-67c67860b919"] + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.994350015725582*^9, 3.994352557533999*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"8fdc3ee9-a56b-42d3-afa8-e35ac7beff0f"] }, Open ]], Cell[CellGroupData[{ @@ -4650,15 +4545,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[473]:=",ExpressionUUID->"70ef65cb-3261-4e79-9029-7f3d0227f633"], + CellLabel->"In[66]:=",ExpressionUUID->"70ef65cb-3261-4e79-9029-7f3d0227f633"], Cell[BoxData["69.21916597543105`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, - 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}}, - CellLabel-> - "Out[473]=",ExpressionUUID->"bddd9dad-d485-4198-a1a8-bf5bfd233e9c"] + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.994350015739843*^9, 3.994352557566646*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"2b98fa79-874d-4e4e-8f69-345078d4368b"] }, Open ]], Cell[CellGroupData[{ @@ -4699,16 +4593,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[474]:=",ExpressionUUID->"cb7cabb1-db00-484c-830a-2f5bbbc309a2"], + CellLabel->"In[67]:=",ExpressionUUID->"cb7cabb1-db00-484c-830a-2f5bbbc309a2"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, - 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}}, - CellLabel-> - "Out[474]=",ExpressionUUID->"4d4e46fb-e3d6-44e4-808a-e048716bae12"] + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.9943500157562857`*^9, 3.994352557600461*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"bd1c0d3c-baba-448c-afb7-4eabc76fc710"] }, Open ]], Cell[CellGroupData[{ @@ -4774,15 +4667,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[475]:=",ExpressionUUID->"60088de3-8c8f-45d8-ac7f-fe41010b2e24"], + CellLabel->"In[68]:=",ExpressionUUID->"60088de3-8c8f-45d8-ac7f-fe41010b2e24"], Cell[BoxData["99.62147446019029`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, - 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}}, - CellLabel-> - "Out[475]=",ExpressionUUID->"c6bbc6d1-64be-4f79-81a8-b6651d883b62"] + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994350015773941*^9, 3.9943525576364822`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"29cc2f36-c234-4769-ad84-b15aa66a9982"] }, Open ]], Cell[CellGroupData[{ @@ -4840,15 +4732,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[476]:=",ExpressionUUID->"fff42478-bb85-4588-a8a8-883adf3fa8f0"], + CellLabel->"In[69]:=",ExpressionUUID->"fff42478-bb85-4588-a8a8-883adf3fa8f0"], Cell[BoxData["40.3202486570226`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, - 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}}, - CellLabel-> - "Out[476]=",ExpressionUUID->"ab7efd9e-d235-44db-9309-ad5471bb6168"] + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.9943500157894*^9, 3.994352557716405*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"306be521-c5f3-4e92-bbbd-d61bb0312e91"] }, Open ]], Cell[CellGroupData[{ @@ -4906,30 +4797,43 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[477]:=",ExpressionUUID->"f40a19a2-1985-4e93-bc21-69807cb4221e"], + CellLabel->"In[70]:=",ExpressionUUID->"f40a19a2-1985-4e93-bc21-69807cb4221e"], Cell[BoxData["624.5259763904654`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, - 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}}, - CellLabel-> - "Out[477]=",ExpressionUUID->"6c81ad2c-cdd1-4e08-8c1d-75735da4a19e"] + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.994350015805571*^9, 3.9943525577499104`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"42dac667-11c9-439d-912f-234f11377daf"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4126334817"}]], "Input", CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{3.991849227197853*^9, 3.99423544488796*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[71]:=",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + +Cell[BoxData["0.4126334817`"], "Output", + CellChangeTimes->{3.9943500158194523`*^9, 3.9943525577907677`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"774a441b-4cb6-4902-b1f1-36311ea1d4a5"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1129347808"}]], "Input", CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{3.9918492290557346`*^9, 3.994235448955714*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[72]:=",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + +Cell[BoxData["0.1129347808`"], "Output", + CellChangeTimes->{3.994350015836522*^9, 3.994352557830336*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"594ac68e-aaaf-4b6d-be9e-62f81e6d054b"] +}, Open ]], Cell[CellGroupData[{ @@ -4975,13 +4879,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[233]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], + CellLabel->"In[73]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913335367025833`*^9}, - CellLabel-> - "Out[233]=",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[BoxData["1.502378697384544`*^-53"], "Output", + CellChangeTimes->{3.9913335367025833`*^9, 3.994350015850547*^9, + 3.9943525578444843`*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"14dfb06d-7eae-4217-93fe-e685a79a4996"] }, Open ]], Cell[CellGroupData[{ @@ -5015,14 +4918,13 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575926932735`*^9},ExpressionUUID->"e4db2648-4e1a-2c46-83ab-\ -fcd932c3b663"], + CellChangeTimes->{3.9915575926932735`*^9}, + CellLabel->"In[74]:=",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[BoxData["5.020725113795862`*^-55"], "Output", - CellChangeTimes->{3.991333536726557*^9}, - CellLabel-> - "Out[234]=",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[BoxData["6.41127826443102`*^-55"], "Output", + CellChangeTimes->{3.991333536726557*^9, 3.994350015865041*^9, + 3.994352557899563*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"6e46de52-c2b7-4255-8690-ad6fab4bc30d"] }, Open ]], Cell[CellGroupData[{ @@ -5055,14 +4957,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557595005127*^9, - 3.991557596789215*^9}},ExpressionUUID->"e4649c3d-e19e-ca42-95a0-\ -23b66397f1fd"], + CellChangeTimes->{{3.991557595005127*^9, 3.991557596789215*^9}}, + CellLabel->"In[75]:=",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[BoxData["1.871372642785671`*^-54"], "Output", - CellChangeTimes->{3.9913335367515736`*^9}, - CellLabel-> - "Out[235]=",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[BoxData["6.0912281782784575`*^-55"], "Output", + CellChangeTimes->{3.9913335367515736`*^9, 3.994350015877721*^9, + 3.994352557934814*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"633e8a61-b26d-4359-8380-47c12ba18fde"] }, Open ]], Cell[CellGroupData[{ @@ -5085,13 +4986,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[236]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], + CellLabel->"In[76]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[BoxData["25.178011816139865`"], "Output", - CellChangeTimes->{3.9913335367605553`*^9}, - CellLabel-> - "Out[236]=",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[BoxData["8.49543943724351`"], "Output", + CellChangeTimes->{3.9913335367605553`*^9, 3.99435001589377*^9, + 3.994352557964877*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"17653f7d-9e31-4df4-b17d-c3e324304a5f"] }, Open ]], Cell[CellGroupData[{ @@ -5116,13 +5016,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[237]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], + CellLabel->"In[77]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[BoxData["31.32034821453639`"], "Output", - CellChangeTimes->{3.991333536783556*^9}, - CellLabel-> - "Out[237]=",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[BoxData["16.75029935448233`"], "Output", + CellChangeTimes->{3.991333536783556*^9, 3.994350015908395*^9, + 3.994352557992262*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"612ebea9-efaa-4580-9758-76bf457b7b30"] }, Open ]], Cell[CellGroupData[{ @@ -5131,13 +5030,12 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[238]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], + CellLabel->"In[78]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[BoxData["0.7475613664925793`"], "Output", - CellChangeTimes->{3.9913335367915726`*^9}, - CellLabel-> - "Out[238]=",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[BoxData["2.1785557430472853`"], "Output", + CellChangeTimes->{3.9913335367915726`*^9, 3.994350015922365*^9, + 3.994352558013308*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"07460f76-7630-43d0-9d6e-aa190d53c8e0"] }, Open ]], Cell[CellGroupData[{ @@ -5146,13 +5044,12 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[239]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], + CellLabel->"In[79]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[BoxData["3.5403946764909393`"], "Output", - CellChangeTimes->{3.99133353681583*^9}, - CellLabel-> - "Out[239]=",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[BoxData["6.106100766792617`"], "Output", + CellChangeTimes->{3.99133353681583*^9, 3.994350015936513*^9, + 3.9943525580402527`*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"b2be6805-ca90-42e8-b725-835ef4d21210"] }, Open ]], Cell[CellGroupData[{ @@ -5161,13 +5058,12 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[240]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], + CellLabel->"In[80]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[BoxData["110.88639408458714`"], "Output", - CellChangeTimes->{3.991333536826782*^9}, - CellLabel-> - "Out[240]=",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[BoxData["102.27901573241043`"], "Output", + CellChangeTimes->{3.991333536826782*^9, 3.994350015952409*^9, + 3.9943525580614567`*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"f0807ba0-8c51-475b-93bb-d39b98cf9c38"] }, Open ]], Cell[CellGroupData[{ @@ -5176,13 +5072,12 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[241]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], + CellLabel->"In[81]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[BoxData["18.822108918839827`"], "Output", - CellChangeTimes->{3.9913335368508377`*^9}, - CellLabel-> - "Out[241]=",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[BoxData["18.507788375717247`"], "Output", + CellChangeTimes->{3.9913335368508377`*^9, 3.994350015968239*^9, + 3.994352558084515*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"92a5fbce-7994-4908-9371-a63cf5c3e74e"] }, Open ]], Cell[CellGroupData[{ @@ -5371,13 +5266,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[242]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], + CellLabel->"In[82]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[BoxData["0.042044960793272385`"], "Output", - CellChangeTimes->{3.9913335368758316`*^9}, - CellLabel-> - "Out[242]=",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[BoxData["0.008977189632030667`"], "Output", + CellChangeTimes->{3.9913335368758316`*^9, 3.994350015986025*^9, + 3.9943525581121387`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"ced5afc4-9e1f-4840-86a6-c8fe1d6f90be"] }, Open ]], Cell[CellGroupData[{ @@ -5390,13 +5284,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[243]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], + CellLabel->"In[83]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[BoxData["4.322031867849089`"], "Output", - CellChangeTimes->{3.991333536973074*^9}, - CellLabel-> - "Out[243]=",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[BoxData["9.353512717667225`"], "Output", + CellChangeTimes->{3.991333536973074*^9, 3.994350016326968*^9, + 3.994352558349959*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"ca7aa68d-77a3-44df-8752-14fb1ebf36b5"] }, Open ]], Cell[CellGroupData[{ @@ -5587,13 +5480,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[244]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], + CellLabel->"In[84]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[BoxData["0.011395075201487413`"], "Output", - CellChangeTimes->{3.9913335369870644`*^9}, - CellLabel-> - "Out[244]=",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[BoxData["0.05337896003258967`"], "Output", + CellChangeTimes->{3.9913335369870644`*^9, 3.9943500163481607`*^9, + 3.9943525583904448`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"7289296a-ea6f-4006-a69c-c9eccfb5c040"] }, Open ]], Cell[CellGroupData[{ @@ -5606,13 +5498,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[245]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], + CellLabel->"In[85]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[BoxData["8.302069082299768`"], "Output", - CellChangeTimes->{3.9913335370800858`*^9}, - CellLabel-> - "Out[245]=",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[BoxData["3.8358347260952215`"], "Output", + CellChangeTimes->{3.9913335370800858`*^9, 3.994350016448751*^9, + 3.99435255847184*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"c758fd62-e85c-40d1-9b91-b39c27c9038d"] }, Open ]], Cell[CellGroupData[{ @@ -5704,13 +5595,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[246]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], + CellLabel->"In[86]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913335370930634`*^9}, - CellLabel-> - "Out[246]=",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[BoxData["0.04702603264830412`"], "Output", + CellChangeTimes->{3.9913335370930634`*^9, 3.994350016463258*^9, + 3.994352558504537*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"0eb6cd3c-9f65-467a-ab9e-cb0514dd1a3f"] }, Open ]], Cell[CellGroupData[{ @@ -5799,13 +5689,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[247]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], + CellLabel->"In[87]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991333537118065*^9}, - CellLabel-> - "Out[247]=",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[BoxData["0.9529739673516959`"], "Output", + CellChangeTimes->{3.991333537118065*^9, 3.9943500164772873`*^9, + 3.994352558535617*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"974532a5-6d7a-4fb3-a42e-2b2a26d2e89e"] }, Open ]], Cell[CellGroupData[{ @@ -5927,19 +5816,18 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[248]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], + CellLabel->"In[88]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913335371420746`*^9}, - CellLabel-> - "Out[248]=",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[BoxData["0.04481458490166476`"], "Output", + CellChangeTimes->{3.9913335371420746`*^9, 3.994350016493218*^9, + 3.994352558566071*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"712356a3-3789-4650-a47c-fe85d51266a4"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"ba4a3eff-9e3b-\ -5e47-a896-3a959bbbf44d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ @@ -6000,65 +5888,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849241512779*^9},ExpressionUUID->"738a48f3-b38c-f441-aec4-\ -53babaa73a14"], + CellChangeTimes->{3.991849241512779*^9}, + CellLabel->"In[90]:=",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 217, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371540604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.368783777168297`*^-197\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 90, 1, + 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994350016542433*^9, + 3.994352558649695*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], +In[90]:=",ExpressionUUID->"6eb99916-2151-46f0-9305-7263dc1c5b52"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 218, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371630745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9049193905965883`*^-201\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 2, + 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994350016542433*^9, + 3.994352558668232*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], +In[90]:=",ExpressionUUID->"7325fb8c-586d-4bae-81fb-566f07d94ffa"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 249, 219, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371710587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5717818068499063`*^-205\\\", \ +\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ +4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 3, + 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994350016542433*^9, + 3.994352558676051*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], +In[90]:=",ExpressionUUID->"50e4e789-5e8d-4ede-80da-76f94afb792f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 249, 220, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133353717906*^9}, +during this calculation.\"", 2, 90, 4, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994350016542433*^9, + 3.9943525586836557`*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], +In[90]:=",ExpressionUUID->"8a473adf-926b-43b3-b86f-b54c9878d63b"], -Cell[BoxData["4.322031867849086`"], "Output", - CellChangeTimes->{3.9913335399194164`*^9}, - CellLabel-> - "Out[249]=",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[BoxData["9.353512717667227`"], "Output", + CellChangeTimes->{3.9913335399194164`*^9, 3.994350020736559*^9, + 3.9943525613589067`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"af434797-3c4a-40a9-b3ef-ebe2ec3aa4a2"] }, Open ]], Cell[CellGroupData[{ @@ -6120,65 +6018,78 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918492463930817`*^9},ExpressionUUID->"86c33485-ed26-8f49-b3d0-\ -7d040d3b48f0"], + CellChangeTimes->{3.9918492463930817`*^9}, + CellLabel->"In[91]:=",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 221, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399544125`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.368783777168297`*^-197\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 5, + 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994350020918112*^9, + 3.9943525614903316`*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], +In[91]:=",ExpressionUUID->"ec125bcd-4bbf-4878-8334-3ac563c23de1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 222, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399644184`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9049193905965883`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 6, + 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994350020918112*^9, + 3.9943525615070353`*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], +In[91]:=",ExpressionUUID->"fd088197-7e20-4c78-b243-e2a13c86c46b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 250, 223, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539972414*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5717818068499063`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 7, + 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994350020918112*^9, + 3.994352561514779*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], +In[91]:=",ExpressionUUID->"5038b892-6f60-44af-931f-023485690f9f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 250, 224, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539979416*^9}, +during this calculation.\"", 2, 91, 8, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994350020918112*^9, + 3.994352561522525*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], +In[91]:=",ExpressionUUID->"843553fa-41e7-477d-8ccd-a0096b9b87bd"], -Cell[BoxData["8.302069082299772`"], "Output", - CellChangeTimes->{3.991333542631773*^9}, - CellLabel-> - "Out[250]=",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[BoxData["3.8358347260952237`"], "Output", + CellChangeTimes->{3.991333542631773*^9, 3.994350025084772*^9, + 3.99435256424774*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"c0bceabf-bb28-427d-92b3-678251b7d44c"] }, Open ]], Cell[CellGroupData[{ @@ -6188,138 +6099,142 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492535482903`*^9},ExpressionUUID->"f373fe4f-940c-0842-9236-\ -63ec36d318ad"], + CellChangeTimes->{3.9918492535482903`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VesXB3ApEnIN5ZDMQ/cI6ZjltlaGlFmjIdPpnC1D5iREA9UtSVE0 +GQpJVEiJ6iZUv1Lc6tJoaCOZk2mj+r39sZ/9fJ73eb57vXu961Xlhm7gCwoI +CPSS5/c7/KXesjvNL1dvS9ot+2YxDauH8o241iWwIMrP8bc7cowzNKzvwcBh +hdHfduG9EBY3aIDRJwXzWojLYhLrhKwbwXONQHIr8d+P5R4mFv8L54SXR74j +vtscnj3L+Q/CV2g1fSDue/8sfk/NWxB49y2rjXhJt7rnhNVHSNVMbe4kth+O +N4tsbIcai5ld3cQPZvvEYoo7IdHe7O+vxC37WXG3Q2gYO7hOdIh4SNi6b4zT +DVcU2cwosXBKmLvBZA84bv6weYpYSeri0/CaXpgN9lH5SeykMFE4ZDUAbd5t +P0VlaaBy1WR1RYbgXOs7aWniRE3n5KDGYXDaWZQhT/yW9WZlVPE3qKEedrKJ +eR6BAekpo2CRLlrKIR65IJBXHvIdzEPYPauIRdR0Jb9xxsFypifPmTiDV2cr +uXgC7HIPaXgQq1xxT1wxOQEf380u4hOb6hwa2lkzBae1QyGeeIdxe2Of1Syg +fVz1DeKxmF3zRLV+gEBM+7X7xPtqxCzYIj/hraCyWCNxFppe82/8Be0zHJm+ +3/UVPLWOKJ6Dc9Tr1i9n0VD8OL1jv4IgStbJFlsQj3zxjj+ZIoi1H+1jnIjj +tccrbobMRYthL+9I4owbqurDHCF802Lu+oj4ffPAg5+XhTCdX6HSSqwyesdD +YrEwxnxY5D1AXGLodEp3UhgfZ55Rk5Ojof5u7JzgGhFMMKl4FUU8Xve6vddK +HMWOuzZbytMg7SAuGfdAHLv2TLb6Euu/scaFZgtxWLrTN5E4sKsyd6WeBNqa +HJq4Txwm2Kj/l7gkFvrYrVyzhIZutevfkieksPcFt8dHgfwf6tmCJgNpZAeq +zT1ELHitR1UuXBrbK63zSohVDJQ3FPdLY7ZCtd8MsYdVWvnLDhlUmyj8nr2U +hqbtEZGs54uxdk+m109FGtqupB7zFZHFpqzMkzpKNAz0F1++aiOLt8pVbD2J +RaPo16seyuLNHW+Nq4mtkzYZ+layUCCUzU5QpqE633i8KEcek1weeyqp0pDf +PR1tHqWIgY7iEg81aFi3+XBbZKkidlzrd50mHqiXWVvao4gl+pLzjTRpMMzX +WaziroSzZoYN14jrud4VQquVEd3NT2Zr0TA63LG796AK6jt2Bp79kwaZnda3 +KhzVsMexybxLh4aefNEdLoFqqFexsVRHl4aqj80Kg4fUkNJIOrmLeJuD10Gt +h2r4cvfkdRE9Ut/y6A1nOeqYanB8teEK8v2+KyMJLA28erSsInclDZv8xXTt +OjUxY8VnySZjGiB6M2frD030e/GfmIYJDdrJOSY8eS0UHzsQtYdY4LKBZYKr +Fpb2yZ/QNKWhtM1za3mtFlr8uvb1gBmZzy0l+5dcWobyAT9MNliQ+qwdW/q4 +bBS1s9pqZUnD5Y2ZHyYT2CiRlCpVSJzK7eyYd56NXE9F8wVW5Hzv29Wv9JqN +U7vkWpqJpe5dFNhopY2t++ab823I+TEY0q5RX463zo5WXlpHg4LaicRjXTrI +lLnmhjnTcO/oGJsR1MWWo6dq+oi3fXd/Q6nqoukuR3e+Cw3Z9RpsS29d1Ax2 +WLrNlQY1/+pXU626aNOtU+u8key3pFuTeq6Hk08SUpy30qCooESpuOvjv2XC +nmU+NOgURInPAAf1tC3ifoXTwOUdHNd1In4sIpMWQeZV/VSb7zYOpucoK6lG +0jD30o2bj2M4uDTRNtU6isxbdt+mU2UczFuzpjUtmtynWb4X2eoGeMJiSgri +SH+POei5CRtiwTyvbaNJNORFaLhUNhph46R0d+VZGsrbHh6T+2iEqgnnWRHn +aHhk5/Ukrt8Ig5sevNY7T0OX2pnVlqLGGGbzq/fqBRq0Xs/XbbI1xkvLjh0p +zCHzbNC/4OsjY9SuEyy4W0D6M1ZWt/SuCQZIx2fbltPQHA0mSQVm2LsvSlDo +BQ2q3v85eQX/hVF+z/cOzu8C/q/b1xX3IMqmrmktXtsFrP6q+SyuJapmNQn7 +p3dBlIHFx1Pa1ujiddUwiO4C7uDsU5k+G7yKd4YGzLqh1DJyfk6TLUp3eaJU +XjfkjwXWlmSsR0lbHZa1aA9MrZF7UZ9oj4oHHKM8DvXAJ4G53zr9HHFQRGsy +X/QLhCwNTduv7oxx0/v7L534AtcDnj48neyCV6/6dF7R7oXY7/KTywNcccH5 +wsbbDb0wbrd2yxOfDVirpDi7fs9XMPM8uabbdSP6h2YYJRn1wSv5i4H1Bpvw +QlbTnMHhPlhSePBe0Z+bMTCaZz3S0A9VHdoOTgu34DpFq6VM1gAovRnxjx7c +gunGDW2bIwbB4PTJkssdW/GR3jfNyoAhuDjvu96pOjccFpnzQsNzGG6vWfE+ ++a47BtTHTo8ajUCWyVGp2WIP9NDQS1KsHYGmDwWHDFI80djf8Ppq229Q6XhB +I2zfNtx1hnW/8+M3+LZzo0AIzwuXv/by7AgahfG17B1DVt44Jh1bv3t6FIoG +301FGvtgdp157uyZ7+CWV7DdS9wXzZ3cc6vYY1BRbu8z97Av9txa8dH+6RiY +Kbxi/mZ8sX1ePuuixziod/i//zfADyXGKr6zvoxDl1iQ8wXaD/c41y89ETsB +zalO2203c9FE9/5GwZ8TkBGTI7armYtLgt39eg5Owr0Hv5jt67djtu7M45bZ +SfhjGx42qN6Onzktiwq4U2DmO1SUbMhDx89tu93qpqDw7EikkzEPi8qKjuTX +T8Gi16OrWaY8nLO5q2a4YQqGbCbfFK3iYcHOnUcOPp0i95fAnEZLHkbvn7iZ ++2IKJCal3KVdeXg6c5C52ToFXceNFuTs5OGStGrrZf1TkFoTH1BVyMPYD/1K +Hn8wsJOTaRZTxMPi2i4Rf0kGHK6WLTAt5uEC5xaxSCkGRDN7rt4p5eFS0RzP +IzIMJEe49N2+xcOEDRUKRSwG4tkaQZWPeOjzoq+7RpmBwMznweVtPBQMGhng +rGBgvUSPRUQHD7f8kxKnps/An8kCCzmfeTjI8VaQWslAT4RRaVk3DyWjK4/3 +cxjwc8oZvDnAQ/PR18anjRlwE4oMuTHNQ4++yB01fzFgG7kkrESWj0/kw2td +7Rl4lHPI7pQcH4WH0+oNHRiwaBzViFnCR4lFgYWyjgzoaz5/Z6XExxp7EGp1 +YkC+Nc7qgyYf32Xb/mm3gYF+80+yokZ87PfhP2fcGDghmHvffyMfN0pMv4rn +k/2vEM9y3MzHW4+ecVZRDCR5xkQYbOWjYVVBwBRxzC2XZb88+MhnznqG7iD1 +U3NOnuHyMVo/yM45iAGDZ1xeQzgfReaiRmsYA60nNcXU0/gYI37VWyiOgeuw +cEfvST4+Svm1IIM4aXCsvjSdj6KnTUtV4xngrK9PMM3kY1Xxg/dmexlIFdg+ +6pjNR5sklZdeiQysDc19F1PCx5Buq8nIgwwoKh4xXn2dj/+LFJQcJR57Fpo+ +9yYfV1+LVApNYuCSFjimVvBxmWe/ApXMwI9Pnx5eruZjW8q107aHGbjloFD0 +8ikf/xnXDXh7lIFj04JCGc/4OLdww0ubYwxwi/r83Bv5eHbR6mXlxJLzqhW6 +mvh48exkxeEUBoJr3E4wLXzM2/7VSCuVAXXtM9Ea3WQ/gw71+icZmG7d+/pr +Dx+jZhTdjxM3J/P1b/Ty0XJaoqOXOKHTsM9sgPQ3b6TuwikG3me99nL+Tr5H +q3ROpjNwar6UTewcCsszU73izjBwb/STZ9RcCq9rijU0EX/5VBwRIkQh9u17 +r5ZJzsMt61zuAgqbDPolGoh7fGNm7KQo1K18e47JIvU72EjbyJC8TrNQq7MM +rDKRZsNiCt9UNowcI05bWLLFQJ7Ccauf03LnyHp1e5mCKoUGj8PZ6ucZoApK +ni5Wp3Bs4jKPS5yWtqf9D00KzcYcHXKJeyiZhfPYFD5cVqUid4Gsy9juGNCn +UPhiw4dJ4uqfMok9HAqVXdNjdC4y0P2143SHIYUHGtfU+hCbP4yte2NKYVTH +j82PiLuCryvdRwrzAw2P7c5mQMItzuiOJYXWprbJecRmVuscyqwpTK/+R/sZ +car85z0F6yiEgpLdrBwGqubdSMuxo1Dn6HxlC2J6OO7KWQcKBRRPh/sQmz5e +/N9xF5Ivt0TuEjG37HP/4Q0Untg3E1RLfPzCDcEDmyjMyaAD24k/R6zXj3aj +UCQjN4CVy8BCb1nbMA9iwe0BK4lN19NegdsoPKU6f5Ed8XHlvce8fSmMc3kT +sJu4StTukhuXwglqaFEK8edx2bsbeKTevxoDc37nddJNDhSF8WH+QWW/8xpv +9qzdQWGoRLXsI2Lunb0/MJDC7NMPgv/9nX/JbtGqYNKf8dCd7b/zj7OWG4VQ +yDr+P7mB3/kxXWtWhFHYr/skZJJYnFfmxo6gUEKeHzonjwET54RQ9SgK8wRy +l4gSc83tDylGU3hw/q4wKeIUTbmLrBgKfWo7w1jEtyW7K6RiKbzC6VJYStw5 +U/ZMLJ7ClObYcGVi8S8JnUIJFMrtzw9XJTZ+ZT/1K5H4vO9SNeL/AyFh1aM= + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6333,104 +6248,106 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV1Hk4VesXB3ApEnIN5ZDMQ/cI6ZjltlaGlFmjIdPpnC1D5iREA9UtSVE0 +GQpJVEiJ6iZUv1Lc6tJoaCOZk2mj+r39sZ/9fJ73eb57vXu961Xlhm7gCwoI +CPSS5/c7/KXesjvNL1dvS9ot+2YxDauH8o241iWwIMrP8bc7cowzNKzvwcBh +hdHfduG9EBY3aIDRJwXzWojLYhLrhKwbwXONQHIr8d+P5R4mFv8L54SXR74j +vtscnj3L+Q/CV2g1fSDue/8sfk/NWxB49y2rjXhJt7rnhNVHSNVMbe4kth+O +N4tsbIcai5ld3cQPZvvEYoo7IdHe7O+vxC37WXG3Q2gYO7hOdIh4SNi6b4zT +DVcU2cwosXBKmLvBZA84bv6weYpYSeri0/CaXpgN9lH5SeykMFE4ZDUAbd5t +P0VlaaBy1WR1RYbgXOs7aWniRE3n5KDGYXDaWZQhT/yW9WZlVPE3qKEedrKJ +eR6BAekpo2CRLlrKIR65IJBXHvIdzEPYPauIRdR0Jb9xxsFypifPmTiDV2cr +uXgC7HIPaXgQq1xxT1wxOQEf380u4hOb6hwa2lkzBae1QyGeeIdxe2Of1Syg +fVz1DeKxmF3zRLV+gEBM+7X7xPtqxCzYIj/hraCyWCNxFppe82/8Be0zHJm+ +3/UVPLWOKJ6Dc9Tr1i9n0VD8OL1jv4IgStbJFlsQj3zxjj+ZIoi1H+1jnIjj +tccrbobMRYthL+9I4owbqurDHCF802Lu+oj4ffPAg5+XhTCdX6HSSqwyesdD +YrEwxnxY5D1AXGLodEp3UhgfZ55Rk5Ojof5u7JzgGhFMMKl4FUU8Xve6vddK +HMWOuzZbytMg7SAuGfdAHLv2TLb6Euu/scaFZgtxWLrTN5E4sKsyd6WeBNqa +HJq4Txwm2Kj/l7gkFvrYrVyzhIZutevfkieksPcFt8dHgfwf6tmCJgNpZAeq +zT1ELHitR1UuXBrbK63zSohVDJQ3FPdLY7ZCtd8MsYdVWvnLDhlUmyj8nr2U +hqbtEZGs54uxdk+m109FGtqupB7zFZHFpqzMkzpKNAz0F1++aiOLt8pVbD2J +RaPo16seyuLNHW+Nq4mtkzYZ+layUCCUzU5QpqE633i8KEcek1weeyqp0pDf +PR1tHqWIgY7iEg81aFi3+XBbZKkidlzrd50mHqiXWVvao4gl+pLzjTRpMMzX +WaziroSzZoYN14jrud4VQquVEd3NT2Zr0TA63LG796AK6jt2Bp79kwaZnda3 +KhzVsMexybxLh4aefNEdLoFqqFexsVRHl4aqj80Kg4fUkNJIOrmLeJuD10Gt +h2r4cvfkdRE9Ut/y6A1nOeqYanB8teEK8v2+KyMJLA28erSsInclDZv8xXTt +OjUxY8VnySZjGiB6M2frD030e/GfmIYJDdrJOSY8eS0UHzsQtYdY4LKBZYKr +Fpb2yZ/QNKWhtM1za3mtFlr8uvb1gBmZzy0l+5dcWobyAT9MNliQ+qwdW/q4 +bBS1s9pqZUnD5Y2ZHyYT2CiRlCpVSJzK7eyYd56NXE9F8wVW5Hzv29Wv9JqN +U7vkWpqJpe5dFNhopY2t++ab823I+TEY0q5RX463zo5WXlpHg4LaicRjXTrI +lLnmhjnTcO/oGJsR1MWWo6dq+oi3fXd/Q6nqoukuR3e+Cw3Z9RpsS29d1Ax2 +WLrNlQY1/+pXU626aNOtU+u8key3pFuTeq6Hk08SUpy30qCooESpuOvjv2XC +nmU+NOgURInPAAf1tC3ifoXTwOUdHNd1In4sIpMWQeZV/VSb7zYOpucoK6lG +0jD30o2bj2M4uDTRNtU6isxbdt+mU2UczFuzpjUtmtynWb4X2eoGeMJiSgri +SH+POei5CRtiwTyvbaNJNORFaLhUNhph46R0d+VZGsrbHh6T+2iEqgnnWRHn +aHhk5/Ukrt8Ig5sevNY7T0OX2pnVlqLGGGbzq/fqBRq0Xs/XbbI1xkvLjh0p +zCHzbNC/4OsjY9SuEyy4W0D6M1ZWt/SuCQZIx2fbltPQHA0mSQVm2LsvSlDo +BQ2q3v85eQX/hVF+z/cOzu8C/q/b1xX3IMqmrmktXtsFrP6q+SyuJapmNQn7 +p3dBlIHFx1Pa1ujiddUwiO4C7uDsU5k+G7yKd4YGzLqh1DJyfk6TLUp3eaJU +XjfkjwXWlmSsR0lbHZa1aA9MrZF7UZ9oj4oHHKM8DvXAJ4G53zr9HHFQRGsy +X/QLhCwNTduv7oxx0/v7L534AtcDnj48neyCV6/6dF7R7oXY7/KTywNcccH5 +wsbbDb0wbrd2yxOfDVirpDi7fs9XMPM8uabbdSP6h2YYJRn1wSv5i4H1Bpvw +QlbTnMHhPlhSePBe0Z+bMTCaZz3S0A9VHdoOTgu34DpFq6VM1gAovRnxjx7c +gunGDW2bIwbB4PTJkssdW/GR3jfNyoAhuDjvu96pOjccFpnzQsNzGG6vWfE+ ++a47BtTHTo8ajUCWyVGp2WIP9NDQS1KsHYGmDwWHDFI80djf8Ppq229Q6XhB +I2zfNtx1hnW/8+M3+LZzo0AIzwuXv/by7AgahfG17B1DVt44Jh1bv3t6FIoG +301FGvtgdp157uyZ7+CWV7DdS9wXzZ3cc6vYY1BRbu8z97Av9txa8dH+6RiY +Kbxi/mZ8sX1ePuuixziod/i//zfADyXGKr6zvoxDl1iQ8wXaD/c41y89ETsB +zalO2203c9FE9/5GwZ8TkBGTI7armYtLgt39eg5Owr0Hv5jt67djtu7M45bZ +SfhjGx42qN6Onzktiwq4U2DmO1SUbMhDx89tu93qpqDw7EikkzEPi8qKjuTX +T8Gi16OrWaY8nLO5q2a4YQqGbCbfFK3iYcHOnUcOPp0i95fAnEZLHkbvn7iZ ++2IKJCal3KVdeXg6c5C52ToFXceNFuTs5OGStGrrZf1TkFoTH1BVyMPYD/1K +Hn8wsJOTaRZTxMPi2i4Rf0kGHK6WLTAt5uEC5xaxSCkGRDN7rt4p5eFS0RzP +IzIMJEe49N2+xcOEDRUKRSwG4tkaQZWPeOjzoq+7RpmBwMznweVtPBQMGhng +rGBgvUSPRUQHD7f8kxKnps/An8kCCzmfeTjI8VaQWslAT4RRaVk3DyWjK4/3 +cxjwc8oZvDnAQ/PR18anjRlwE4oMuTHNQ4++yB01fzFgG7kkrESWj0/kw2td +7Rl4lHPI7pQcH4WH0+oNHRiwaBzViFnCR4lFgYWyjgzoaz5/Z6XExxp7EGp1 +YkC+Nc7qgyYf32Xb/mm3gYF+80+yokZ87PfhP2fcGDghmHvffyMfN0pMv4rn +k/2vEM9y3MzHW4+ecVZRDCR5xkQYbOWjYVVBwBRxzC2XZb88+MhnznqG7iD1 +U3NOnuHyMVo/yM45iAGDZ1xeQzgfReaiRmsYA60nNcXU0/gYI37VWyiOgeuw +cEfvST4+Svm1IIM4aXCsvjSdj6KnTUtV4xngrK9PMM3kY1Xxg/dmexlIFdg+ +6pjNR5sklZdeiQysDc19F1PCx5Buq8nIgwwoKh4xXn2dj/+LFJQcJR57Fpo+ +9yYfV1+LVApNYuCSFjimVvBxmWe/ApXMwI9Pnx5eruZjW8q107aHGbjloFD0 +8ikf/xnXDXh7lIFj04JCGc/4OLdww0ubYwxwi/r83Bv5eHbR6mXlxJLzqhW6 +mvh48exkxeEUBoJr3E4wLXzM2/7VSCuVAXXtM9Ea3WQ/gw71+icZmG7d+/pr +Dx+jZhTdjxM3J/P1b/Ty0XJaoqOXOKHTsM9sgPQ3b6TuwikG3me99nL+Tr5H +q3ROpjNwar6UTewcCsszU73izjBwb/STZ9RcCq9rijU0EX/5VBwRIkQh9u17 +r5ZJzsMt61zuAgqbDPolGoh7fGNm7KQo1K18e47JIvU72EjbyJC8TrNQq7MM +rDKRZsNiCt9UNowcI05bWLLFQJ7Ccauf03LnyHp1e5mCKoUGj8PZ6ucZoApK +ni5Wp3Bs4jKPS5yWtqf9D00KzcYcHXKJeyiZhfPYFD5cVqUid4Gsy9juGNCn +UPhiw4dJ4uqfMok9HAqVXdNjdC4y0P2143SHIYUHGtfU+hCbP4yte2NKYVTH +j82PiLuCryvdRwrzAw2P7c5mQMItzuiOJYXWprbJecRmVuscyqwpTK/+R/sZ +car85z0F6yiEgpLdrBwGqubdSMuxo1Dn6HxlC2J6OO7KWQcKBRRPh/sQmz5e +/N9xF5Ivt0TuEjG37HP/4Q0Untg3E1RLfPzCDcEDmyjMyaAD24k/R6zXj3aj +UCQjN4CVy8BCb1nbMA9iwe0BK4lN19NegdsoPKU6f5Ed8XHlvce8fSmMc3kT +sJu4StTukhuXwglqaFEK8edx2bsbeKTevxoDc37nddJNDhSF8WH+QWW/8xpv +9qzdQWGoRLXsI2Lunb0/MJDC7NMPgv/9nX/JbtGqYNKf8dCd7b/zj7OWG4VQ +yDr+P7mB3/kxXWtWhFHYr/skZJJYnFfmxo6gUEKeHzonjwET54RQ9SgK8wRy +l4gSc83tDylGU3hw/q4wKeIUTbmLrBgKfWo7w1jEtyW7K6RiKbzC6VJYStw5 +U/ZMLJ7ClObYcGVi8S8JnUIJFMrtzw9XJTZ+ZT/1K5H4vO9SNeL/AyFh1aM= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "PlotRange" -> {{0, 180}, {0.5964146078878332, 1.601839171265686}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5964146078878345}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6442,21 +6359,20 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.5964146078878332, 1.601839171265686}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.5964146078878345}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6470,102 +6386,105 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV1Hk4VesXB3ApEnIN5ZDMQ/cI6ZjltlaGlFmjIdPpnC1D5iREA9UtSVE0 +GQpJVEiJ6iZUv1Lc6tJoaCOZk2mj+r39sZ/9fJ73eb57vXu961Xlhm7gCwoI +CPSS5/c7/KXesjvNL1dvS9ot+2YxDauH8o241iWwIMrP8bc7cowzNKzvwcBh +hdHfduG9EBY3aIDRJwXzWojLYhLrhKwbwXONQHIr8d+P5R4mFv8L54SXR74j +vtscnj3L+Q/CV2g1fSDue/8sfk/NWxB49y2rjXhJt7rnhNVHSNVMbe4kth+O +N4tsbIcai5ld3cQPZvvEYoo7IdHe7O+vxC37WXG3Q2gYO7hOdIh4SNi6b4zT +DVcU2cwosXBKmLvBZA84bv6weYpYSeri0/CaXpgN9lH5SeykMFE4ZDUAbd5t +P0VlaaBy1WR1RYbgXOs7aWniRE3n5KDGYXDaWZQhT/yW9WZlVPE3qKEedrKJ +eR6BAekpo2CRLlrKIR65IJBXHvIdzEPYPauIRdR0Jb9xxsFypifPmTiDV2cr +uXgC7HIPaXgQq1xxT1wxOQEf380u4hOb6hwa2lkzBae1QyGeeIdxe2Of1Syg +fVz1DeKxmF3zRLV+gEBM+7X7xPtqxCzYIj/hraCyWCNxFppe82/8Be0zHJm+ +3/UVPLWOKJ6Dc9Tr1i9n0VD8OL1jv4IgStbJFlsQj3zxjj+ZIoi1H+1jnIjj +tccrbobMRYthL+9I4owbqurDHCF802Lu+oj4ffPAg5+XhTCdX6HSSqwyesdD +YrEwxnxY5D1AXGLodEp3UhgfZ55Rk5Ojof5u7JzgGhFMMKl4FUU8Xve6vddK +HMWOuzZbytMg7SAuGfdAHLv2TLb6Euu/scaFZgtxWLrTN5E4sKsyd6WeBNqa +HJq4Txwm2Kj/l7gkFvrYrVyzhIZutevfkieksPcFt8dHgfwf6tmCJgNpZAeq +zT1ELHitR1UuXBrbK63zSohVDJQ3FPdLY7ZCtd8MsYdVWvnLDhlUmyj8nr2U +hqbtEZGs54uxdk+m109FGtqupB7zFZHFpqzMkzpKNAz0F1++aiOLt8pVbD2J +RaPo16seyuLNHW+Nq4mtkzYZ+layUCCUzU5QpqE633i8KEcek1weeyqp0pDf +PR1tHqWIgY7iEg81aFi3+XBbZKkidlzrd50mHqiXWVvao4gl+pLzjTRpMMzX +WaziroSzZoYN14jrud4VQquVEd3NT2Zr0TA63LG796AK6jt2Bp79kwaZnda3 +KhzVsMexybxLh4aefNEdLoFqqFexsVRHl4aqj80Kg4fUkNJIOrmLeJuD10Gt +h2r4cvfkdRE9Ut/y6A1nOeqYanB8teEK8v2+KyMJLA28erSsInclDZv8xXTt +OjUxY8VnySZjGiB6M2frD030e/GfmIYJDdrJOSY8eS0UHzsQtYdY4LKBZYKr +Fpb2yZ/QNKWhtM1za3mtFlr8uvb1gBmZzy0l+5dcWobyAT9MNliQ+qwdW/q4 +bBS1s9pqZUnD5Y2ZHyYT2CiRlCpVSJzK7eyYd56NXE9F8wVW5Hzv29Wv9JqN +U7vkWpqJpe5dFNhopY2t++ab823I+TEY0q5RX463zo5WXlpHg4LaicRjXTrI +lLnmhjnTcO/oGJsR1MWWo6dq+oi3fXd/Q6nqoukuR3e+Cw3Z9RpsS29d1Ax2 +WLrNlQY1/+pXU626aNOtU+u8key3pFuTeq6Hk08SUpy30qCooESpuOvjv2XC +nmU+NOgURInPAAf1tC3ifoXTwOUdHNd1In4sIpMWQeZV/VSb7zYOpucoK6lG +0jD30o2bj2M4uDTRNtU6isxbdt+mU2UczFuzpjUtmtynWb4X2eoGeMJiSgri +SH+POei5CRtiwTyvbaNJNORFaLhUNhph46R0d+VZGsrbHh6T+2iEqgnnWRHn +aHhk5/Ukrt8Ig5sevNY7T0OX2pnVlqLGGGbzq/fqBRq0Xs/XbbI1xkvLjh0p +zCHzbNC/4OsjY9SuEyy4W0D6M1ZWt/SuCQZIx2fbltPQHA0mSQVm2LsvSlDo +BQ2q3v85eQX/hVF+z/cOzu8C/q/b1xX3IMqmrmktXtsFrP6q+SyuJapmNQn7 +p3dBlIHFx1Pa1ujiddUwiO4C7uDsU5k+G7yKd4YGzLqh1DJyfk6TLUp3eaJU +XjfkjwXWlmSsR0lbHZa1aA9MrZF7UZ9oj4oHHKM8DvXAJ4G53zr9HHFQRGsy +X/QLhCwNTduv7oxx0/v7L534AtcDnj48neyCV6/6dF7R7oXY7/KTywNcccH5 +wsbbDb0wbrd2yxOfDVirpDi7fs9XMPM8uabbdSP6h2YYJRn1wSv5i4H1Bpvw +QlbTnMHhPlhSePBe0Z+bMTCaZz3S0A9VHdoOTgu34DpFq6VM1gAovRnxjx7c +gunGDW2bIwbB4PTJkssdW/GR3jfNyoAhuDjvu96pOjccFpnzQsNzGG6vWfE+ ++a47BtTHTo8ajUCWyVGp2WIP9NDQS1KsHYGmDwWHDFI80djf8Ppq229Q6XhB +I2zfNtx1hnW/8+M3+LZzo0AIzwuXv/by7AgahfG17B1DVt44Jh1bv3t6FIoG +301FGvtgdp157uyZ7+CWV7DdS9wXzZ3cc6vYY1BRbu8z97Av9txa8dH+6RiY +Kbxi/mZ8sX1ePuuixziod/i//zfADyXGKr6zvoxDl1iQ8wXaD/c41y89ETsB +zalO2203c9FE9/5GwZ8TkBGTI7armYtLgt39eg5Owr0Hv5jt67djtu7M45bZ +SfhjGx42qN6Onzktiwq4U2DmO1SUbMhDx89tu93qpqDw7EikkzEPi8qKjuTX +T8Gi16OrWaY8nLO5q2a4YQqGbCbfFK3iYcHOnUcOPp0i95fAnEZLHkbvn7iZ ++2IKJCal3KVdeXg6c5C52ToFXceNFuTs5OGStGrrZf1TkFoTH1BVyMPYD/1K +Hn8wsJOTaRZTxMPi2i4Rf0kGHK6WLTAt5uEC5xaxSCkGRDN7rt4p5eFS0RzP +IzIMJEe49N2+xcOEDRUKRSwG4tkaQZWPeOjzoq+7RpmBwMznweVtPBQMGhng +rGBgvUSPRUQHD7f8kxKnps/An8kCCzmfeTjI8VaQWslAT4RRaVk3DyWjK4/3 +cxjwc8oZvDnAQ/PR18anjRlwE4oMuTHNQ4++yB01fzFgG7kkrESWj0/kw2td +7Rl4lHPI7pQcH4WH0+oNHRiwaBzViFnCR4lFgYWyjgzoaz5/Z6XExxp7EGp1 +YkC+Nc7qgyYf32Xb/mm3gYF+80+yokZ87PfhP2fcGDghmHvffyMfN0pMv4rn +k/2vEM9y3MzHW4+ecVZRDCR5xkQYbOWjYVVBwBRxzC2XZb88+MhnznqG7iD1 +U3NOnuHyMVo/yM45iAGDZ1xeQzgfReaiRmsYA60nNcXU0/gYI37VWyiOgeuw +cEfvST4+Svm1IIM4aXCsvjSdj6KnTUtV4xngrK9PMM3kY1Xxg/dmexlIFdg+ +6pjNR5sklZdeiQysDc19F1PCx5Buq8nIgwwoKh4xXn2dj/+LFJQcJR57Fpo+ +9yYfV1+LVApNYuCSFjimVvBxmWe/ApXMwI9Pnx5eruZjW8q107aHGbjloFD0 +8ikf/xnXDXh7lIFj04JCGc/4OLdww0ubYwxwi/r83Bv5eHbR6mXlxJLzqhW6 +mvh48exkxeEUBoJr3E4wLXzM2/7VSCuVAXXtM9Ea3WQ/gw71+icZmG7d+/pr +Dx+jZhTdjxM3J/P1b/Ty0XJaoqOXOKHTsM9sgPQ3b6TuwikG3me99nL+Tr5H +q3ROpjNwar6UTewcCsszU73izjBwb/STZ9RcCq9rijU0EX/5VBwRIkQh9u17 +r5ZJzsMt61zuAgqbDPolGoh7fGNm7KQo1K18e47JIvU72EjbyJC8TrNQq7MM +rDKRZsNiCt9UNowcI05bWLLFQJ7Ccauf03LnyHp1e5mCKoUGj8PZ6ucZoApK +ni5Wp3Bs4jKPS5yWtqf9D00KzcYcHXKJeyiZhfPYFD5cVqUid4Gsy9juGNCn +UPhiw4dJ4uqfMok9HAqVXdNjdC4y0P2143SHIYUHGtfU+hCbP4yte2NKYVTH +j82PiLuCryvdRwrzAw2P7c5mQMItzuiOJYXWprbJecRmVuscyqwpTK/+R/sZ +car85z0F6yiEgpLdrBwGqubdSMuxo1Dn6HxlC2J6OO7KWQcKBRRPh/sQmz5e +/N9xF5Ivt0TuEjG37HP/4Q0Untg3E1RLfPzCDcEDmyjMyaAD24k/R6zXj3aj +UCQjN4CVy8BCb1nbMA9iwe0BK4lN19NegdsoPKU6f5Ed8XHlvce8fSmMc3kT +sJu4StTukhuXwglqaFEK8edx2bsbeKTevxoDc37nddJNDhSF8WH+QWW/8xpv +9qzdQWGoRLXsI2Lunb0/MJDC7NMPgv/9nX/JbtGqYNKf8dCd7b/zj7OWG4VQ +yDr+P7mB3/kxXWtWhFHYr/skZJJYnFfmxo6gUEKeHzonjwET54RQ9SgK8wRy +l4gSc83tDylGU3hw/q4wKeIUTbmLrBgKfWo7w1jEtyW7K6RiKbzC6VJYStw5 +U/ZMLJ7ClObYcGVi8S8JnUIJFMrtzw9XJTZ+ZT/1K5H4vO9SNeL/AyFh1aM= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.5964146078878332, 1.601839171265686}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.5964146078878345}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6575,7 +6494,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.9887929549829141}, + AxesOrigin->{0, 0.5964146078878345}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6603,7 +6523,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5964146078878332, 1.601839171265686}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6611,9 +6532,9 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991333813212965*^9}, - CellLabel-> - "Out[251]=",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] + CellChangeTimes->{3.991333813212965*^9, 3.994350619943089*^9, + 3.994353056750722*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"621a97ca-0607-4a55-a601-b3a09f8aeb65"] }, Open ]], Cell[CellGroupData[{ @@ -6676,372 +6597,198 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849261714945*^9},ExpressionUUID->"24fa5db0-1063-354a-bd60-\ -c117a27ff3e1"], + CellChangeTimes->{3.991849261714945*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.0784227471040894`*^-281\\\", \ -\\\"5919012181389927685417441689600000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 252, 225, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813432829*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.005147832212024`*^-268\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, 93, + 9, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.99435062056255*^9, + 3.994353057300887*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], +In[93]:=",ExpressionUUID->"326d7f47-a70f-4da1-9700-8c05054f31b3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9214123648785273`*^-295\\\", \ -\\\"2610284371992958109269091785113600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 226, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813442087*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.017170100541607`*^-278\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 93, 10, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.99435062056255*^9, + 3.9943530573248863`*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], +In[93]:=",ExpressionUUID->"d04d5c4c-59c6-455b-b314-a8871dcaa1b2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*SuperscriptBox[RowBox[{\\\"(\\\", RowBox[{\\\"-\\\", \ -\\\"9.614868462060315`*^-8\\\"}], \\\")\\\"}], \\\"44\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 227, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813450123*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.06714176707657`*^-289\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 93, 11, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.99435062056255*^9, + 3.994353057334922*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], +In[93]:=",ExpressionUUID->"5fa2ac3f-6403-4dfd-870d-5e9dd1e2668d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 252, 228, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813469118*^9}, +during this calculation.\"", 2, 93, 12, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.99435062056255*^9, + 3.994353057348013*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], +In[93]:=",ExpressionUUID->"32088fa8-3622-40ce-8df4-ed243abeb281"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8bAHBRGUVlj3uvTWTH5a6eR1ZGykhokEipkFARJSOVihaphFCS +cO+prDIzUmRFqVBaQpFV6et3fn+d1/t1zmecz+d5ns85yj5Bzn78fHx8exbw +8f3/Ov2+uV7tTM4a34UGGbrXbNZ0ZcgeMe89AZvNLo4fvK0OKNXmI9t7Aeyf +jESb3zaB8I13ewR6s6Gazpug3LaCFWMyF373cCH4dMiOd3mboL/SMWiypxaO +LrA+IJTnB9Zqw+/GezrALut8XnN2GPzuMb38s+cDyPKxct9djoc6i9s57dm/ +oHjphi85a68Apb/ss4/OP2gJ38x7ZJkJkvu87gpaCGD3TMzbNv5cuGBoXeG4 +SQj3Xjcojq7Ih9dpBtXjy0XRYzpivvxuIaR3FiwLVxfFoNSa4OLyQvAU0/T6 +wxDFGa//9K8/K4S3sdT/+HeKIst4U6LbcCEMBIqwJR+I4jnfCEM3rfvw1XLo +Ed1DDOnDS+ejcu/D7M/UosisZaiwtmLPpitFcCbnWBu/3Ap8Wi8sx71XDHbG +e8SlVFdg2HiXri2vGITqnTdp6q7ASW0V/b6yYoj7qN5nb74Cx9azJ340FMNR +leefL+1ZgWUb2je/HSiGwEzZ/zTKV2Be3OTFKokScLpeomO/RRwvbdk7cTus +BJbrXAva5ieO7IwK9/TIEmitiOMGBYmjujgn8WRMCdj1bTa7FCuOOyOlwPls +CayV/8/iXYE4lj0+MnEnpwSM0+y2BM2J40DLngLPjhKQufTx1MUbErg941Rj +sxYXZFc9iJvNk8BAOZOBUj0uyNcmHNtWLIEvnhIet1ZzgfZTK0yzTgLdsgz2 +B3C4oO4Q7F3xVQKjIEGoZiMXVi/8R/+4WhK5il53z4dzYUOo9JDRM0mcqCh4 +UfSECxuXfH2f2imJ2Ym2uiJ1XHDOLns991YSg3L9B70aueD2cmtbww9JLHot +b/2vjQvbdG6Ve0pJYZX+iT/zA1zYO6SfcsJbCs8Hl79X4+fBSVfbNR3TUrhb +K+Tgd+SBPNEqz79AGqdjxfQWWPHgvoTrjOESafw0uN9vhS0PXnVsL05RlMbY +zs12yk48UHMKVXFaJ41PG1NH/vPmQe36m4tfXpVG1aBVV0uO8eCf9VTrC7YM +nkg+bD9VyoPkvIiCf9YymHvDutqzkmy/mC9R10kGF5jUPyiv4oHDUxHzs34y +KEufVA1o4EG6hRLP4ZwM9jY+ljrZyQMztE9t6ZfBZte6a2UjPDjIyPJqPiGL +Q/kRsgsVCLDLFJu0T5JFJ/nLe5KoBKgIHk1svSyLW0IZc8uUCHjZ5VbSeUcW +y5hLvgqpE6AXvFTgfassBv7O+1KjR8DXvEN5E/JyyAtj/d1oTkCV6CdmmJoc +Dt9nZ5+1IOBKqHPbjK4cJtAtLz61IsBqre7sHMphrFndJk07ArLffbAV9JfD +o4aB+7nOBGyVdBxV4Mlhpe+V0C8+BKyOrIjJqJTDraeiF7/2JUDkw0pp5QY5 +FMi7O/J0FwFlRQKg8VoOzfall6YEECBtX5ZsMC+HNV1NPuMHyPnHqBlb2cuj +YX9wbvsxAm5/TWlqdJXHaq3pjsMxBERvmN9qt10elXJLvBViCdClvonfcEAe +Z9T5M50TCDhder7HI1UeNc0/159KIsDyx5+IwI/y6EPM71RII+DIukvaNSPy +2BUSrRpylYD7WbpvJKblcap+e3R9OgGyrt6MMiEFdKIUCm+9QcBI6dMZAT0F +fH6t5JxbNgHK4l633UwVUPjWTvPTtwhw2zvrlo8KSLEIulKWQ0A1ddVDRxcF +LP2tvWrJbQIunkgOvXpYAZse3pWNKCCgqU9LbSRGAfe+vDxz+h4Bc8Z1nWvO +KGAf6B9PLSRg15cpo6EbChiUZ3ThVhEBTIct43p1Cigebdh1kkfABymNwHpR +Cv5Y43k3ppwAmaAqqowMBSOWMdPWVxDg0OT+Yo8SBTePHwepSgIeRpzRWbaa +gnpxPk9SH5Pr0/9z2MOdgnLrUtP3VJP7b3Y6/d4OCrrsbwqWqCFgMkXVbj6A +gsdla4TKSG+3dMvPiaJg4QvnEzO1BBjlV/j/yKZgQI91uflTAvz5N8msvUfB +we+/K5tJX98y1nDpAQXrbmqfXt9AwGIxZQ1mEwUFfx9OXNdIAMu/vDupnexv +uLOiinRwtUt8/xsKBolrPjFqIuBNSMJQ3CgFJQfXGC9tJmDZc8VLPdMUvK1v +fzeEtKV6mYU2HxVfLOj/1UX6fs/37DZxKn5NZy4++4yAjwbxzioUKpZau7Z/ +IC17msYfpk7Ffs7VUOMWAmLYTjvkzaj4ssltXQvpddszJkzXUrHi7iod6ecE +iB3/HrvJgYrnLtsbbiXdnWUmddCNijrH2B43SF+vi89L9qaim0xC7mvSOz91 +mN4PoKJnQ4nMihcEaAsqNbeEUjG0wK7EgvT4yv2e36KpeOzau4MHSJfalX9f +fIqKexV/e6eTPrZPMErtIhXrQnQjnpC2PucqtvYGFa1PLK15R1q0OOum120q +7hrWMp0l3dU+ZhBVQr7/lPx70VYCrv1i1aZXUHH4WvgjGmkfqVMupU+pGHKs +u16btJbpq6HuNip+HmkXNCL90101/NdrKqq+FjxhTPpRRLDgiiEqtvZLmvz/ +fvT1x2l6Y1T8ZZ6msoq01RMRbYdZKoYPGTkokl46sLliDz8Nrzue5ImR7lyQ +63ByKQ3P3mF4/ibnl6468S5HmoZtZT/M+0l7W0FQrRINO75s3FdNWtM/iW9A +m4b+xov7rpMeS3yd8s+Yhkx2+flQ0sRdDVUFoKGPiVySDenI5wcJM1sado++ +bJcivXas2srNhYZ9zck+/eT6Cy8X6zm4jYZ3aoUxh/RLwy27U/xpWOw7tteX +9PawqdPPI2lIuf/8wStyv9VT11KG42kYZ766J7Hl//l9vlAwmYZGLv3r6aQj +5rRers2hoUb3hHksGT/mtEM7vO/TcOP5zloV0kJYPxFVSsNw95Gbj8n4uxy7 +XarsOQ0FQpvDPpHxuzW3IO/VKxoacyRCQkirNM6aTg7Q8OP8zfY/ZLwXi1z0 +1J+iocXQjZp/ZH48T2m8mUtVRMqxNanP68l6wZM0rNNUxF0f7/Qbk/bs3lE7 +YKiIfld5V9PqyPotOzekYK2IF4Mn9ziT+SiQaaB9IVARNWKj7p+vIuBZTVRF +0WFFXD3HeNT5hIDkj88cXpxQxE8fNqIEaZqmX5BQqiIuGVrUF0fWB+b9q0R0 +lSLeGlD2Nyoj86un9d9YkyJm2eXU7SglwJFvoY1XhyIaGkWtPfuIjHfnwNfw +SRHPde8q7H1Axmuk8rHji5Qws6N6pzmXzGfF6Vvmq5RQZZ8kb8tdAqZ4yU2/ +9ZVQzJg+vj6fXN91q0ZLjJXQqvVXAPsOAfEHvOkqa5Rw3+QDGbE8Mn7qnjXx +OymhpBsvNi6LgHr/m6N14UqooHtGoiqVANs5hvjRSCX0+zDYGnaFgNbkLrrx +cSV0FhEbWHmZgNdlwsdzTinh4/pLInEXyPhaEioef10J47ZtKBI7S9aD4nWm +1rVK6OD5pSScPE/2zY4fbxJVRnWbhvQb/uR6HNgl/VlcGb/1Hf5X6Ufu9/Cb +AgFZZTwjX+jcu5OA3L66V2tUlLH9a+Y7fm8C3j+5rPOAroxbIuQfaLoTsCGe +0ZvlpYzuwo92c23Ieikeox9ZoowvdxkJvlUlgO/MVH3aQ2UUifFeFa1Mzl8g +wPNhBTm++/IkiiIBe6ec48efKqNoS9BSR3kCcnrV+vzfKGMzH2Eft5w8L282 +JbgKqODpLyJ9MMeD36uWv9fdpIIyOxfKLWznwfQN+ZjVnir4tm55IbTyYHKZ +uhrDSwVDrg0PH2rhwdgvRoDlHhX0O+S8//1THnyo2DntGaWCDdGqrbHlPHhm +/0gsMVcF9VMElhjdIr9P9m6HD1Mq6HTlxZBOCA/YBfcyr1xRxQpvcSFlQR70 +KRXctLqmin8Te6+/EuBBxJX8jMmbqlg6Vd16io8Hj2Lyrjvnq5L16/mKb7+5 +YOSemSZWqYrLfPPsz4xwQWvRpeSEQVV8Zulv5d3OBWmvyOPhOmrYOzYv6nmV +C+Pidt5utWp46OL2uT8qXBhK8nYLEdTAY22fE92FS8D2xyHbT3RNDDlq51LY +XQQjO4UOEsdW4tnXTzIDbArJ/wkZ/pO1Wph0RG3cjrgL4i80zhX/0EbdKJVy +AYc7QEks2kin66DVJn1jo4pcSFvFWC7hr4vid19uTgm4Bc/kzU1+pehhdrus +dDBmAZNSm6z/Sh9ze09vviiTAWIC2aE7Thjg8jtBzDbrdKDFKLI9NAyRyfLX +MI2+AsLqWx86NxpilcCFjerqF0GPI1d0aJsRGscNdkR5JEPIe/E6O77VmF9X +hYOuZ+DHr6RNtmmrkSs8vfjDeALY6Dek2+oaI2+pY1WoYSw8+cX6O9NqjDMR +LfMKO45BoI7Rm3Y/EyyItt14p+0IhM3I//HabYJhl0vbAsuOwNFaAfmxABM8 +bGUqYXXrCJxx7/YQCTZB7cx7jUqHjsCduMOv10aYoFpzzLJLikfgw9snvbxz +Jug09HPnzoOHwe2sfc/lRyYoLhQREaRxCDhjvl0ewnSUF3eaSCkNBekKm+zK +JXS8fdq1yfp2KIyd1A5WFKPjmpOvCcEroZCh/HPJJ3E6rrf7UVp4MBT+c420 +CKbQse6aTu0p/VCoqkjhJujTccX74RNH8w+C+aknybxNdHwVmbdGJS8ErNRk +14tm0zF2/q8ErSYYiNGnyr45dOQx3PePc4NB7dHB6fI8Oi6VS5hszQmGhXZt +N3cX0PFxqHP4ncRgqA1KmKgj6Bjm1l3YtTEY1lRMpkY00lHIu9tCviEI6M7t +H76M0LHtwIhCMTUQVh4/fbjW1BS566IGXRbthUpW7iIHpinGv5arevw9ADbO +VF3oZptiU2vSXnZHABwOnLr31dwUX23xmjt0MwCatnoPijmQzyefOfeZGQC7 +GXS7Ld6mWLR+RvhK2B7InxhUmEw0RYPq5NGPv/1B249Rpf7GFGk0i4Fwlh+c +V3H8E/vWFCWCvcZWrPSDyX4fkw/vTZFRTfGqlPSDJ55JBRkfTVH7bKQ5jPmC +88b+VJlRUySMs3//zfKFI6z4YGE+M+yaSKldt9QXmla0K4+qm+FWmYnOke8+ +4PdkdxxxwAwdj5s7uXZ7w9j+4UNWoWZYHLHir3a9Nxym7tv7KtwM3acc/y7n +ecPpo0HOs5FmWGng1CGS4g3FzHAldoIZnqRtzibWe8Pcw9jKunQzXHzKn37/ +ohdcKMqY7KgzQ7FROVXp9G1QldnlOy7FwJabyQUVvz1gwEHZK1yWgSsLHs99 +e+8BfL/3e/yVZ2D9dtfnBvUesNZJ0HGREgOPfsbrguc9oGEB01ROm4HThd0z +Peoe8NznprD5GgZ+aSuO+7XZHd6oBdxP3sXAPo0MeuoLN5i8Mz+j/4iBZQSR +VPHHBT67WWeeKmOg4qzeg2+fXaB34dl1HysYOHDJwk+r0wUqvOWvXqlmoI5z +tea7Ahc4IWvC/NfMwKZZaJLc7gLLEwOOPnvLQO3l/ymVPXUGHf9uPj9+Jo6a +ifw9muUENClK/pOFTMwd1TGuO+8Ey+t8nGQFmZj6+d12uWgn+EX7mdWyhIkF +eiLuU55OUP5KxMJIiontIdNxAVJOsM4a4+c1mbjoXz4Lzm6EneoFwunrmfj2 +oaVl9PINEPF0e4DGRibKXvfV1B9zhGQ/8RauM3mf90KU/7kjVOYeSWrZzMSi +wfZg0URHkNRYt+zfDiYG2KkHPFrgCA0anyS9w5lY8V6MDX8dQHulopLGTSaa +fU196rnYHrCp4zg3i4lbA2hBUl/twG13wuCaHLL9tW3ZY812EHtnNHtzPhN1 +De+y5s7awduVleqneEwUq55wjZGxg3NaHqtGGpl49NV6BsXAFsa1L9K5P5n4 +rHCL3mC4DfQ+RyuJX0z8tMd96fw2G6gOHHMJnWJizn+9NcZWNnCOa3uA/oeJ +E4Fivl8kbECbyXevXICF9Q2NW/251uBju1+5TpqFG1McFtf8soIuf5ulXWwW +qjvflt100hIqhKfkTYCFGXE1gesOWEJ2QbbWFXMWCvR7Mp22WELwj3/W7tYs +PLZF6Vu2viWIHiJi3m5g4VYXm3zL1xZgnaA8M+TDwvYrLvMHDCygNOfv4FQi +CxsORH2YHTUHukXojN0ZFt7w/BL25o05PBgcWZp5loVTz3TOtzaaA5f23tTu +AgtHx5wlx7LM4V5a9dmMayxcG3iPK7TZHDKT4hk291mYFmpSnFGPcCp0WUpa +JwunPxe1NngACEkk5o12k+OpZCz8aQqQUMJXubaXhbVFNceY0gBxY+OfR96y +UEZ8a4dR5xqI3t3FNv/MwpQL1g2FjmsgZOvVr99mWbjJZYcMYc8BT0tVZNHY +eHil6CxsY8G/LiGxOiU2Cj778qKDzYJMv7E+O1U2JrPDyhMpLPicUHbIcyUb +hV+A07a3TAhp3lB0xIiN/JsvtOZuY8Jpx6O0Ums2/je1VzN1FwPK3bvnjIPY +2CQWUCiXYgrbvpU/qzzAxpc6rYYvQ02BLyIzzTKUjYxFd1ty3U3B+tpeY9cj +bPyW69ZQqGQKHe8W7DsYy8b6oz2ndbl0GPbR6ytJZWPZDLA73piAwv6TZXrV +bBSxqMkYMjeGc/O7TM7UstEp0PX4N21j4L9gXfKlno2fKC2OiyWNYfjhovzM +ZjaKNoZ6nPy8Gsr54tLEO9l4wkikIidpNXheOn5o+hMbb1FeXGC8M4K0iiMm +T5Zw8EvgY2P6eUNY6uhRIi/GQdG3Vp/EIg3h+ICZ7qHlHGy2Heub22UIuxfN +qhlIcbB1kaa9LBiC6YZwyWwaB9MKjy6w/2kArz6E/Io35OAmzZq4c24GICWy +r2T9Zg5OPherEvXVgxyLqIifHhwUUjkjUMjWA6OocxYXt3Iw//CkY6SUHjj+ +LO7u3cHBbV9uGOQ06kLCq6nfO/dxMEfg+y1lPV2YzT62NiKGg5bfvy3OFNCB +N6yLnXkFHNxeG/DTo00LdoflXLe9z0HBwyezIwu1YPr+A7+RYg4OBN3waTij +BeIqvTOGDzn4NJbq8WqdFtgLUSmPqzkYb3oZ+upXQmVXnm9nNzneqcYo53pN +sBMr1Q3v5WD3AcktP3M0odemeVq2j4P7/wieIeI1YbL8e+L2AQ4K73nIKLLR +BN0sg8JvwxyMDOph7nmhAZVvzMOTRjlYUzYoaVKkAXaSLqD/k4MPRF1/qado +wK6TYe2hUxws/mcnF75JAyarE9JlZjk406q4rNtUA078Sd1Z/oeDS3vm/Nzl +NWC5cb7Otn9k/w37pubn1CFjf/nU/DwHJ+KVL7f0q8P/AFivPSc= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7055,331 +6802,150 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwV13c8Vf8bAHBRGUVlj3uvTWTH5a6eR1ZGykhokEipkFARJSOVihaphFCS +cO+prDIzUmRFqVBaQpFV6et3fn+d1/t1zmecz+d5ns85yj5Bzn78fHx8exbw +8f3/Ov2+uV7tTM4a34UGGbrXbNZ0ZcgeMe89AZvNLo4fvK0OKNXmI9t7Aeyf +jESb3zaB8I13ewR6s6Gazpug3LaCFWMyF373cCH4dMiOd3mboL/SMWiypxaO +LrA+IJTnB9Zqw+/GezrALut8XnN2GPzuMb38s+cDyPKxct9djoc6i9s57dm/ +oHjphi85a68Apb/ss4/OP2gJ38x7ZJkJkvu87gpaCGD3TMzbNv5cuGBoXeG4 +SQj3Xjcojq7Ih9dpBtXjy0XRYzpivvxuIaR3FiwLVxfFoNSa4OLyQvAU0/T6 +wxDFGa//9K8/K4S3sdT/+HeKIst4U6LbcCEMBIqwJR+I4jnfCEM3rfvw1XLo +Ed1DDOnDS+ejcu/D7M/UosisZaiwtmLPpitFcCbnWBu/3Ap8Wi8sx71XDHbG +e8SlVFdg2HiXri2vGITqnTdp6q7ASW0V/b6yYoj7qN5nb74Cx9azJ340FMNR +leefL+1ZgWUb2je/HSiGwEzZ/zTKV2Be3OTFKokScLpeomO/RRwvbdk7cTus +BJbrXAva5ieO7IwK9/TIEmitiOMGBYmjujgn8WRMCdj1bTa7FCuOOyOlwPls +CayV/8/iXYE4lj0+MnEnpwSM0+y2BM2J40DLngLPjhKQufTx1MUbErg941Rj +sxYXZFc9iJvNk8BAOZOBUj0uyNcmHNtWLIEvnhIet1ZzgfZTK0yzTgLdsgz2 +B3C4oO4Q7F3xVQKjIEGoZiMXVi/8R/+4WhK5il53z4dzYUOo9JDRM0mcqCh4 +UfSECxuXfH2f2imJ2Ym2uiJ1XHDOLns991YSg3L9B70aueD2cmtbww9JLHot +b/2vjQvbdG6Ve0pJYZX+iT/zA1zYO6SfcsJbCs8Hl79X4+fBSVfbNR3TUrhb +K+Tgd+SBPNEqz79AGqdjxfQWWPHgvoTrjOESafw0uN9vhS0PXnVsL05RlMbY +zs12yk48UHMKVXFaJ41PG1NH/vPmQe36m4tfXpVG1aBVV0uO8eCf9VTrC7YM +nkg+bD9VyoPkvIiCf9YymHvDutqzkmy/mC9R10kGF5jUPyiv4oHDUxHzs34y +KEufVA1o4EG6hRLP4ZwM9jY+ljrZyQMztE9t6ZfBZte6a2UjPDjIyPJqPiGL +Q/kRsgsVCLDLFJu0T5JFJ/nLe5KoBKgIHk1svSyLW0IZc8uUCHjZ5VbSeUcW +y5hLvgqpE6AXvFTgfassBv7O+1KjR8DXvEN5E/JyyAtj/d1oTkCV6CdmmJoc +Dt9nZ5+1IOBKqHPbjK4cJtAtLz61IsBqre7sHMphrFndJk07ArLffbAV9JfD +o4aB+7nOBGyVdBxV4Mlhpe+V0C8+BKyOrIjJqJTDraeiF7/2JUDkw0pp5QY5 +FMi7O/J0FwFlRQKg8VoOzfall6YEECBtX5ZsMC+HNV1NPuMHyPnHqBlb2cuj +YX9wbvsxAm5/TWlqdJXHaq3pjsMxBERvmN9qt10elXJLvBViCdClvonfcEAe +Z9T5M50TCDhder7HI1UeNc0/159KIsDyx5+IwI/y6EPM71RII+DIukvaNSPy +2BUSrRpylYD7WbpvJKblcap+e3R9OgGyrt6MMiEFdKIUCm+9QcBI6dMZAT0F +fH6t5JxbNgHK4l633UwVUPjWTvPTtwhw2zvrlo8KSLEIulKWQ0A1ddVDRxcF +LP2tvWrJbQIunkgOvXpYAZse3pWNKCCgqU9LbSRGAfe+vDxz+h4Bc8Z1nWvO +KGAf6B9PLSRg15cpo6EbChiUZ3ThVhEBTIct43p1Cigebdh1kkfABymNwHpR +Cv5Y43k3ppwAmaAqqowMBSOWMdPWVxDg0OT+Yo8SBTePHwepSgIeRpzRWbaa +gnpxPk9SH5Pr0/9z2MOdgnLrUtP3VJP7b3Y6/d4OCrrsbwqWqCFgMkXVbj6A +gsdla4TKSG+3dMvPiaJg4QvnEzO1BBjlV/j/yKZgQI91uflTAvz5N8msvUfB +we+/K5tJX98y1nDpAQXrbmqfXt9AwGIxZQ1mEwUFfx9OXNdIAMu/vDupnexv +uLOiinRwtUt8/xsKBolrPjFqIuBNSMJQ3CgFJQfXGC9tJmDZc8VLPdMUvK1v +fzeEtKV6mYU2HxVfLOj/1UX6fs/37DZxKn5NZy4++4yAjwbxzioUKpZau7Z/ +IC17msYfpk7Ffs7VUOMWAmLYTjvkzaj4ssltXQvpddszJkzXUrHi7iod6ecE +iB3/HrvJgYrnLtsbbiXdnWUmddCNijrH2B43SF+vi89L9qaim0xC7mvSOz91 +mN4PoKJnQ4nMihcEaAsqNbeEUjG0wK7EgvT4yv2e36KpeOzau4MHSJfalX9f +fIqKexV/e6eTPrZPMErtIhXrQnQjnpC2PucqtvYGFa1PLK15R1q0OOum120q +7hrWMp0l3dU+ZhBVQr7/lPx70VYCrv1i1aZXUHH4WvgjGmkfqVMupU+pGHKs +u16btJbpq6HuNip+HmkXNCL90101/NdrKqq+FjxhTPpRRLDgiiEqtvZLmvz/ +fvT1x2l6Y1T8ZZ6msoq01RMRbYdZKoYPGTkokl46sLliDz8Nrzue5ImR7lyQ +63ByKQ3P3mF4/ibnl6468S5HmoZtZT/M+0l7W0FQrRINO75s3FdNWtM/iW9A +m4b+xov7rpMeS3yd8s+Yhkx2+flQ0sRdDVUFoKGPiVySDenI5wcJM1sado++ +bJcivXas2srNhYZ9zck+/eT6Cy8X6zm4jYZ3aoUxh/RLwy27U/xpWOw7tteX +9PawqdPPI2lIuf/8wStyv9VT11KG42kYZ766J7Hl//l9vlAwmYZGLv3r6aQj +5rRers2hoUb3hHksGT/mtEM7vO/TcOP5zloV0kJYPxFVSsNw95Gbj8n4uxy7 +XarsOQ0FQpvDPpHxuzW3IO/VKxoacyRCQkirNM6aTg7Q8OP8zfY/ZLwXi1z0 +1J+iocXQjZp/ZH48T2m8mUtVRMqxNanP68l6wZM0rNNUxF0f7/Qbk/bs3lE7 +YKiIfld5V9PqyPotOzekYK2IF4Mn9ziT+SiQaaB9IVARNWKj7p+vIuBZTVRF +0WFFXD3HeNT5hIDkj88cXpxQxE8fNqIEaZqmX5BQqiIuGVrUF0fWB+b9q0R0 +lSLeGlD2Nyoj86un9d9YkyJm2eXU7SglwJFvoY1XhyIaGkWtPfuIjHfnwNfw +SRHPde8q7H1Axmuk8rHji5Qws6N6pzmXzGfF6Vvmq5RQZZ8kb8tdAqZ4yU2/ +9ZVQzJg+vj6fXN91q0ZLjJXQqvVXAPsOAfEHvOkqa5Rw3+QDGbE8Mn7qnjXx +OymhpBsvNi6LgHr/m6N14UqooHtGoiqVANs5hvjRSCX0+zDYGnaFgNbkLrrx +cSV0FhEbWHmZgNdlwsdzTinh4/pLInEXyPhaEioef10J47ZtKBI7S9aD4nWm +1rVK6OD5pSScPE/2zY4fbxJVRnWbhvQb/uR6HNgl/VlcGb/1Hf5X6Ufu9/Cb +AgFZZTwjX+jcu5OA3L66V2tUlLH9a+Y7fm8C3j+5rPOAroxbIuQfaLoTsCGe +0ZvlpYzuwo92c23Ieikeox9ZoowvdxkJvlUlgO/MVH3aQ2UUifFeFa1Mzl8g +wPNhBTm++/IkiiIBe6ec48efKqNoS9BSR3kCcnrV+vzfKGMzH2Eft5w8L282 +JbgKqODpLyJ9MMeD36uWv9fdpIIyOxfKLWznwfQN+ZjVnir4tm55IbTyYHKZ +uhrDSwVDrg0PH2rhwdgvRoDlHhX0O+S8//1THnyo2DntGaWCDdGqrbHlPHhm +/0gsMVcF9VMElhjdIr9P9m6HD1Mq6HTlxZBOCA/YBfcyr1xRxQpvcSFlQR70 +KRXctLqmin8Te6+/EuBBxJX8jMmbqlg6Vd16io8Hj2Lyrjvnq5L16/mKb7+5 +YOSemSZWqYrLfPPsz4xwQWvRpeSEQVV8Zulv5d3OBWmvyOPhOmrYOzYv6nmV +C+Pidt5utWp46OL2uT8qXBhK8nYLEdTAY22fE92FS8D2xyHbT3RNDDlq51LY +XQQjO4UOEsdW4tnXTzIDbArJ/wkZ/pO1Wph0RG3cjrgL4i80zhX/0EbdKJVy +AYc7QEks2kin66DVJn1jo4pcSFvFWC7hr4vid19uTgm4Bc/kzU1+pehhdrus +dDBmAZNSm6z/Sh9ze09vviiTAWIC2aE7Thjg8jtBzDbrdKDFKLI9NAyRyfLX +MI2+AsLqWx86NxpilcCFjerqF0GPI1d0aJsRGscNdkR5JEPIe/E6O77VmF9X +hYOuZ+DHr6RNtmmrkSs8vfjDeALY6Dek2+oaI2+pY1WoYSw8+cX6O9NqjDMR +LfMKO45BoI7Rm3Y/EyyItt14p+0IhM3I//HabYJhl0vbAsuOwNFaAfmxABM8 +bGUqYXXrCJxx7/YQCTZB7cx7jUqHjsCduMOv10aYoFpzzLJLikfgw9snvbxz +Jug09HPnzoOHwe2sfc/lRyYoLhQREaRxCDhjvl0ewnSUF3eaSCkNBekKm+zK +JXS8fdq1yfp2KIyd1A5WFKPjmpOvCcEroZCh/HPJJ3E6rrf7UVp4MBT+c420 +CKbQse6aTu0p/VCoqkjhJujTccX74RNH8w+C+aknybxNdHwVmbdGJS8ErNRk +14tm0zF2/q8ErSYYiNGnyr45dOQx3PePc4NB7dHB6fI8Oi6VS5hszQmGhXZt +N3cX0PFxqHP4ncRgqA1KmKgj6Bjm1l3YtTEY1lRMpkY00lHIu9tCviEI6M7t +H76M0LHtwIhCMTUQVh4/fbjW1BS566IGXRbthUpW7iIHpinGv5arevw9ADbO +VF3oZptiU2vSXnZHABwOnLr31dwUX23xmjt0MwCatnoPijmQzyefOfeZGQC7 +GXS7Ld6mWLR+RvhK2B7InxhUmEw0RYPq5NGPv/1B249Rpf7GFGk0i4Fwlh+c +V3H8E/vWFCWCvcZWrPSDyX4fkw/vTZFRTfGqlPSDJ55JBRkfTVH7bKQ5jPmC +88b+VJlRUySMs3//zfKFI6z4YGE+M+yaSKldt9QXmla0K4+qm+FWmYnOke8+ +4PdkdxxxwAwdj5s7uXZ7w9j+4UNWoWZYHLHir3a9Nxym7tv7KtwM3acc/y7n +ecPpo0HOs5FmWGng1CGS4g3FzHAldoIZnqRtzibWe8Pcw9jKunQzXHzKn37/ +ohdcKMqY7KgzQ7FROVXp9G1QldnlOy7FwJabyQUVvz1gwEHZK1yWgSsLHs99 +e+8BfL/3e/yVZ2D9dtfnBvUesNZJ0HGREgOPfsbrguc9oGEB01ROm4HThd0z +Peoe8NznprD5GgZ+aSuO+7XZHd6oBdxP3sXAPo0MeuoLN5i8Mz+j/4iBZQSR +VPHHBT67WWeeKmOg4qzeg2+fXaB34dl1HysYOHDJwk+r0wUqvOWvXqlmoI5z +tea7Ahc4IWvC/NfMwKZZaJLc7gLLEwOOPnvLQO3l/ymVPXUGHf9uPj9+Jo6a +ifw9muUENClK/pOFTMwd1TGuO+8Ey+t8nGQFmZj6+d12uWgn+EX7mdWyhIkF +eiLuU55OUP5KxMJIiontIdNxAVJOsM4a4+c1mbjoXz4Lzm6EneoFwunrmfj2 +oaVl9PINEPF0e4DGRibKXvfV1B9zhGQ/8RauM3mf90KU/7kjVOYeSWrZzMSi +wfZg0URHkNRYt+zfDiYG2KkHPFrgCA0anyS9w5lY8V6MDX8dQHulopLGTSaa +fU196rnYHrCp4zg3i4lbA2hBUl/twG13wuCaHLL9tW3ZY812EHtnNHtzPhN1 +De+y5s7awduVleqneEwUq55wjZGxg3NaHqtGGpl49NV6BsXAFsa1L9K5P5n4 +rHCL3mC4DfQ+RyuJX0z8tMd96fw2G6gOHHMJnWJizn+9NcZWNnCOa3uA/oeJ +E4Fivl8kbECbyXevXICF9Q2NW/251uBju1+5TpqFG1McFtf8soIuf5ulXWwW +qjvflt100hIqhKfkTYCFGXE1gesOWEJ2QbbWFXMWCvR7Mp22WELwj3/W7tYs +PLZF6Vu2viWIHiJi3m5g4VYXm3zL1xZgnaA8M+TDwvYrLvMHDCygNOfv4FQi +CxsORH2YHTUHukXojN0ZFt7w/BL25o05PBgcWZp5loVTz3TOtzaaA5f23tTu +AgtHx5wlx7LM4V5a9dmMayxcG3iPK7TZHDKT4hk291mYFmpSnFGPcCp0WUpa +JwunPxe1NngACEkk5o12k+OpZCz8aQqQUMJXubaXhbVFNceY0gBxY+OfR96y +UEZ8a4dR5xqI3t3FNv/MwpQL1g2FjmsgZOvVr99mWbjJZYcMYc8BT0tVZNHY +eHil6CxsY8G/LiGxOiU2Cj778qKDzYJMv7E+O1U2JrPDyhMpLPicUHbIcyUb +hV+A07a3TAhp3lB0xIiN/JsvtOZuY8Jpx6O0Ums2/je1VzN1FwPK3bvnjIPY +2CQWUCiXYgrbvpU/qzzAxpc6rYYvQ02BLyIzzTKUjYxFd1ty3U3B+tpeY9cj +bPyW69ZQqGQKHe8W7DsYy8b6oz2ndbl0GPbR6ytJZWPZDLA73piAwv6TZXrV +bBSxqMkYMjeGc/O7TM7UstEp0PX4N21j4L9gXfKlno2fKC2OiyWNYfjhovzM +ZjaKNoZ6nPy8Gsr54tLEO9l4wkikIidpNXheOn5o+hMbb1FeXGC8M4K0iiMm +T5Zw8EvgY2P6eUNY6uhRIi/GQdG3Vp/EIg3h+ICZ7qHlHGy2Heub22UIuxfN +qhlIcbB1kaa9LBiC6YZwyWwaB9MKjy6w/2kArz6E/Io35OAmzZq4c24GICWy +r2T9Zg5OPherEvXVgxyLqIifHhwUUjkjUMjWA6OocxYXt3Iw//CkY6SUHjj+ +LO7u3cHBbV9uGOQ06kLCq6nfO/dxMEfg+y1lPV2YzT62NiKGg5bfvy3OFNCB +N6yLnXkFHNxeG/DTo00LdoflXLe9z0HBwyezIwu1YPr+A7+RYg4OBN3waTij +BeIqvTOGDzn4NJbq8WqdFtgLUSmPqzkYb3oZ+upXQmVXnm9nNzneqcYo53pN +sBMr1Q3v5WD3AcktP3M0odemeVq2j4P7/wieIeI1YbL8e+L2AQ4K73nIKLLR +BN0sg8JvwxyMDOph7nmhAZVvzMOTRjlYUzYoaVKkAXaSLqD/k4MPRF1/qado +wK6TYe2hUxws/mcnF75JAyarE9JlZjk406q4rNtUA078Sd1Z/oeDS3vm/Nzl +NWC5cb7Otn9k/w37pubn1CFjf/nU/DwHJ+KVL7f0q8P/AFivPSc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.08127144026352488}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7391,19 +6957,19 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.08127144026352488}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7417,330 +6983,149 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwV13c8Vf8bAHBRGUVlj3uvTWTH5a6eR1ZGykhokEipkFARJSOVihaphFCS +cO+prDIzUmRFqVBaQpFV6et3fn+d1/t1zmecz+d5ns85yj5Bzn78fHx8exbw +8f3/Ov2+uV7tTM4a34UGGbrXbNZ0ZcgeMe89AZvNLo4fvK0OKNXmI9t7Aeyf +jESb3zaB8I13ewR6s6Gazpug3LaCFWMyF373cCH4dMiOd3mboL/SMWiypxaO +LrA+IJTnB9Zqw+/GezrALut8XnN2GPzuMb38s+cDyPKxct9djoc6i9s57dm/ +oHjphi85a68Apb/ss4/OP2gJ38x7ZJkJkvu87gpaCGD3TMzbNv5cuGBoXeG4 +SQj3Xjcojq7Ih9dpBtXjy0XRYzpivvxuIaR3FiwLVxfFoNSa4OLyQvAU0/T6 +wxDFGa//9K8/K4S3sdT/+HeKIst4U6LbcCEMBIqwJR+I4jnfCEM3rfvw1XLo +Ed1DDOnDS+ejcu/D7M/UosisZaiwtmLPpitFcCbnWBu/3Ap8Wi8sx71XDHbG +e8SlVFdg2HiXri2vGITqnTdp6q7ASW0V/b6yYoj7qN5nb74Cx9azJ340FMNR +leefL+1ZgWUb2je/HSiGwEzZ/zTKV2Be3OTFKokScLpeomO/RRwvbdk7cTus +BJbrXAva5ieO7IwK9/TIEmitiOMGBYmjujgn8WRMCdj1bTa7FCuOOyOlwPls +CayV/8/iXYE4lj0+MnEnpwSM0+y2BM2J40DLngLPjhKQufTx1MUbErg941Rj +sxYXZFc9iJvNk8BAOZOBUj0uyNcmHNtWLIEvnhIet1ZzgfZTK0yzTgLdsgz2 +B3C4oO4Q7F3xVQKjIEGoZiMXVi/8R/+4WhK5il53z4dzYUOo9JDRM0mcqCh4 +UfSECxuXfH2f2imJ2Ym2uiJ1XHDOLns991YSg3L9B70aueD2cmtbww9JLHot +b/2vjQvbdG6Ve0pJYZX+iT/zA1zYO6SfcsJbCs8Hl79X4+fBSVfbNR3TUrhb +K+Tgd+SBPNEqz79AGqdjxfQWWPHgvoTrjOESafw0uN9vhS0PXnVsL05RlMbY +zs12yk48UHMKVXFaJ41PG1NH/vPmQe36m4tfXpVG1aBVV0uO8eCf9VTrC7YM +nkg+bD9VyoPkvIiCf9YymHvDutqzkmy/mC9R10kGF5jUPyiv4oHDUxHzs34y +KEufVA1o4EG6hRLP4ZwM9jY+ljrZyQMztE9t6ZfBZte6a2UjPDjIyPJqPiGL +Q/kRsgsVCLDLFJu0T5JFJ/nLe5KoBKgIHk1svSyLW0IZc8uUCHjZ5VbSeUcW +y5hLvgqpE6AXvFTgfassBv7O+1KjR8DXvEN5E/JyyAtj/d1oTkCV6CdmmJoc +Dt9nZ5+1IOBKqHPbjK4cJtAtLz61IsBqre7sHMphrFndJk07ArLffbAV9JfD +o4aB+7nOBGyVdBxV4Mlhpe+V0C8+BKyOrIjJqJTDraeiF7/2JUDkw0pp5QY5 +FMi7O/J0FwFlRQKg8VoOzfall6YEECBtX5ZsMC+HNV1NPuMHyPnHqBlb2cuj +YX9wbvsxAm5/TWlqdJXHaq3pjsMxBERvmN9qt10elXJLvBViCdClvonfcEAe +Z9T5M50TCDhder7HI1UeNc0/159KIsDyx5+IwI/y6EPM71RII+DIukvaNSPy +2BUSrRpylYD7WbpvJKblcap+e3R9OgGyrt6MMiEFdKIUCm+9QcBI6dMZAT0F +fH6t5JxbNgHK4l633UwVUPjWTvPTtwhw2zvrlo8KSLEIulKWQ0A1ddVDRxcF +LP2tvWrJbQIunkgOvXpYAZse3pWNKCCgqU9LbSRGAfe+vDxz+h4Bc8Z1nWvO +KGAf6B9PLSRg15cpo6EbChiUZ3ThVhEBTIct43p1Cigebdh1kkfABymNwHpR +Cv5Y43k3ppwAmaAqqowMBSOWMdPWVxDg0OT+Yo8SBTePHwepSgIeRpzRWbaa +gnpxPk9SH5Pr0/9z2MOdgnLrUtP3VJP7b3Y6/d4OCrrsbwqWqCFgMkXVbj6A +gsdla4TKSG+3dMvPiaJg4QvnEzO1BBjlV/j/yKZgQI91uflTAvz5N8msvUfB +we+/K5tJX98y1nDpAQXrbmqfXt9AwGIxZQ1mEwUFfx9OXNdIAMu/vDupnexv +uLOiinRwtUt8/xsKBolrPjFqIuBNSMJQ3CgFJQfXGC9tJmDZc8VLPdMUvK1v +fzeEtKV6mYU2HxVfLOj/1UX6fs/37DZxKn5NZy4++4yAjwbxzioUKpZau7Z/ +IC17msYfpk7Ffs7VUOMWAmLYTjvkzaj4ssltXQvpddszJkzXUrHi7iod6ecE +iB3/HrvJgYrnLtsbbiXdnWUmddCNijrH2B43SF+vi89L9qaim0xC7mvSOz91 +mN4PoKJnQ4nMihcEaAsqNbeEUjG0wK7EgvT4yv2e36KpeOzau4MHSJfalX9f +fIqKexV/e6eTPrZPMErtIhXrQnQjnpC2PucqtvYGFa1PLK15R1q0OOum120q +7hrWMp0l3dU+ZhBVQr7/lPx70VYCrv1i1aZXUHH4WvgjGmkfqVMupU+pGHKs +u16btJbpq6HuNip+HmkXNCL90101/NdrKqq+FjxhTPpRRLDgiiEqtvZLmvz/ +fvT1x2l6Y1T8ZZ6msoq01RMRbYdZKoYPGTkokl46sLliDz8Nrzue5ImR7lyQ +63ByKQ3P3mF4/ibnl6468S5HmoZtZT/M+0l7W0FQrRINO75s3FdNWtM/iW9A +m4b+xov7rpMeS3yd8s+Yhkx2+flQ0sRdDVUFoKGPiVySDenI5wcJM1sado++ +bJcivXas2srNhYZ9zck+/eT6Cy8X6zm4jYZ3aoUxh/RLwy27U/xpWOw7tteX +9PawqdPPI2lIuf/8wStyv9VT11KG42kYZ766J7Hl//l9vlAwmYZGLv3r6aQj +5rRers2hoUb3hHksGT/mtEM7vO/TcOP5zloV0kJYPxFVSsNw95Gbj8n4uxy7 +XarsOQ0FQpvDPpHxuzW3IO/VKxoacyRCQkirNM6aTg7Q8OP8zfY/ZLwXi1z0 +1J+iocXQjZp/ZH48T2m8mUtVRMqxNanP68l6wZM0rNNUxF0f7/Qbk/bs3lE7 +YKiIfld5V9PqyPotOzekYK2IF4Mn9ziT+SiQaaB9IVARNWKj7p+vIuBZTVRF +0WFFXD3HeNT5hIDkj88cXpxQxE8fNqIEaZqmX5BQqiIuGVrUF0fWB+b9q0R0 +lSLeGlD2Nyoj86un9d9YkyJm2eXU7SglwJFvoY1XhyIaGkWtPfuIjHfnwNfw +SRHPde8q7H1Axmuk8rHji5Qws6N6pzmXzGfF6Vvmq5RQZZ8kb8tdAqZ4yU2/ +9ZVQzJg+vj6fXN91q0ZLjJXQqvVXAPsOAfEHvOkqa5Rw3+QDGbE8Mn7qnjXx +OymhpBsvNi6LgHr/m6N14UqooHtGoiqVANs5hvjRSCX0+zDYGnaFgNbkLrrx +cSV0FhEbWHmZgNdlwsdzTinh4/pLInEXyPhaEioef10J47ZtKBI7S9aD4nWm +1rVK6OD5pSScPE/2zY4fbxJVRnWbhvQb/uR6HNgl/VlcGb/1Hf5X6Ufu9/Cb +AgFZZTwjX+jcu5OA3L66V2tUlLH9a+Y7fm8C3j+5rPOAroxbIuQfaLoTsCGe +0ZvlpYzuwo92c23Ieikeox9ZoowvdxkJvlUlgO/MVH3aQ2UUifFeFa1Mzl8g +wPNhBTm++/IkiiIBe6ec48efKqNoS9BSR3kCcnrV+vzfKGMzH2Eft5w8L282 +JbgKqODpLyJ9MMeD36uWv9fdpIIyOxfKLWznwfQN+ZjVnir4tm55IbTyYHKZ +uhrDSwVDrg0PH2rhwdgvRoDlHhX0O+S8//1THnyo2DntGaWCDdGqrbHlPHhm +/0gsMVcF9VMElhjdIr9P9m6HD1Mq6HTlxZBOCA/YBfcyr1xRxQpvcSFlQR70 +KRXctLqmin8Te6+/EuBBxJX8jMmbqlg6Vd16io8Hj2Lyrjvnq5L16/mKb7+5 +YOSemSZWqYrLfPPsz4xwQWvRpeSEQVV8Zulv5d3OBWmvyOPhOmrYOzYv6nmV +C+Pidt5utWp46OL2uT8qXBhK8nYLEdTAY22fE92FS8D2xyHbT3RNDDlq51LY +XQQjO4UOEsdW4tnXTzIDbArJ/wkZ/pO1Wph0RG3cjrgL4i80zhX/0EbdKJVy +AYc7QEks2kin66DVJn1jo4pcSFvFWC7hr4vid19uTgm4Bc/kzU1+pehhdrus +dDBmAZNSm6z/Sh9ze09vviiTAWIC2aE7Thjg8jtBzDbrdKDFKLI9NAyRyfLX +MI2+AsLqWx86NxpilcCFjerqF0GPI1d0aJsRGscNdkR5JEPIe/E6O77VmF9X +hYOuZ+DHr6RNtmmrkSs8vfjDeALY6Dek2+oaI2+pY1WoYSw8+cX6O9NqjDMR +LfMKO45BoI7Rm3Y/EyyItt14p+0IhM3I//HabYJhl0vbAsuOwNFaAfmxABM8 +bGUqYXXrCJxx7/YQCTZB7cx7jUqHjsCduMOv10aYoFpzzLJLikfgw9snvbxz +Jug09HPnzoOHwe2sfc/lRyYoLhQREaRxCDhjvl0ewnSUF3eaSCkNBekKm+zK +JXS8fdq1yfp2KIyd1A5WFKPjmpOvCcEroZCh/HPJJ3E6rrf7UVp4MBT+c420 +CKbQse6aTu0p/VCoqkjhJujTccX74RNH8w+C+aknybxNdHwVmbdGJS8ErNRk +14tm0zF2/q8ErSYYiNGnyr45dOQx3PePc4NB7dHB6fI8Oi6VS5hszQmGhXZt +N3cX0PFxqHP4ncRgqA1KmKgj6Bjm1l3YtTEY1lRMpkY00lHIu9tCviEI6M7t +H76M0LHtwIhCMTUQVh4/fbjW1BS566IGXRbthUpW7iIHpinGv5arevw9ADbO +VF3oZptiU2vSXnZHABwOnLr31dwUX23xmjt0MwCatnoPijmQzyefOfeZGQC7 +GXS7Ld6mWLR+RvhK2B7InxhUmEw0RYPq5NGPv/1B249Rpf7GFGk0i4Fwlh+c +V3H8E/vWFCWCvcZWrPSDyX4fkw/vTZFRTfGqlPSDJ55JBRkfTVH7bKQ5jPmC +88b+VJlRUySMs3//zfKFI6z4YGE+M+yaSKldt9QXmla0K4+qm+FWmYnOke8+ +4PdkdxxxwAwdj5s7uXZ7w9j+4UNWoWZYHLHir3a9Nxym7tv7KtwM3acc/y7n +ecPpo0HOs5FmWGng1CGS4g3FzHAldoIZnqRtzibWe8Pcw9jKunQzXHzKn37/ +ohdcKMqY7KgzQ7FROVXp9G1QldnlOy7FwJabyQUVvz1gwEHZK1yWgSsLHs99 +e+8BfL/3e/yVZ2D9dtfnBvUesNZJ0HGREgOPfsbrguc9oGEB01ROm4HThd0z +Peoe8NznprD5GgZ+aSuO+7XZHd6oBdxP3sXAPo0MeuoLN5i8Mz+j/4iBZQSR +VPHHBT67WWeeKmOg4qzeg2+fXaB34dl1HysYOHDJwk+r0wUqvOWvXqlmoI5z +tea7Ahc4IWvC/NfMwKZZaJLc7gLLEwOOPnvLQO3l/ymVPXUGHf9uPj9+Jo6a +ifw9muUENClK/pOFTMwd1TGuO+8Ey+t8nGQFmZj6+d12uWgn+EX7mdWyhIkF +eiLuU55OUP5KxMJIiontIdNxAVJOsM4a4+c1mbjoXz4Lzm6EneoFwunrmfj2 +oaVl9PINEPF0e4DGRibKXvfV1B9zhGQ/8RauM3mf90KU/7kjVOYeSWrZzMSi +wfZg0URHkNRYt+zfDiYG2KkHPFrgCA0anyS9w5lY8V6MDX8dQHulopLGTSaa +fU196rnYHrCp4zg3i4lbA2hBUl/twG13wuCaHLL9tW3ZY812EHtnNHtzPhN1 +De+y5s7awduVleqneEwUq55wjZGxg3NaHqtGGpl49NV6BsXAFsa1L9K5P5n4 +rHCL3mC4DfQ+RyuJX0z8tMd96fw2G6gOHHMJnWJizn+9NcZWNnCOa3uA/oeJ +E4Fivl8kbECbyXevXICF9Q2NW/251uBju1+5TpqFG1McFtf8soIuf5ulXWwW +qjvflt100hIqhKfkTYCFGXE1gesOWEJ2QbbWFXMWCvR7Mp22WELwj3/W7tYs +PLZF6Vu2viWIHiJi3m5g4VYXm3zL1xZgnaA8M+TDwvYrLvMHDCygNOfv4FQi +CxsORH2YHTUHukXojN0ZFt7w/BL25o05PBgcWZp5loVTz3TOtzaaA5f23tTu +AgtHx5wlx7LM4V5a9dmMayxcG3iPK7TZHDKT4hk291mYFmpSnFGPcCp0WUpa +JwunPxe1NngACEkk5o12k+OpZCz8aQqQUMJXubaXhbVFNceY0gBxY+OfR96y +UEZ8a4dR5xqI3t3FNv/MwpQL1g2FjmsgZOvVr99mWbjJZYcMYc8BT0tVZNHY +eHil6CxsY8G/LiGxOiU2Cj778qKDzYJMv7E+O1U2JrPDyhMpLPicUHbIcyUb +hV+A07a3TAhp3lB0xIiN/JsvtOZuY8Jpx6O0Ums2/je1VzN1FwPK3bvnjIPY +2CQWUCiXYgrbvpU/qzzAxpc6rYYvQ02BLyIzzTKUjYxFd1ty3U3B+tpeY9cj +bPyW69ZQqGQKHe8W7DsYy8b6oz2ndbl0GPbR6ytJZWPZDLA73piAwv6TZXrV +bBSxqMkYMjeGc/O7TM7UstEp0PX4N21j4L9gXfKlno2fKC2OiyWNYfjhovzM +ZjaKNoZ6nPy8Gsr54tLEO9l4wkikIidpNXheOn5o+hMbb1FeXGC8M4K0iiMm +T5Zw8EvgY2P6eUNY6uhRIi/GQdG3Vp/EIg3h+ICZ7qHlHGy2Heub22UIuxfN +qhlIcbB1kaa9LBiC6YZwyWwaB9MKjy6w/2kArz6E/Io35OAmzZq4c24GICWy +r2T9Zg5OPherEvXVgxyLqIifHhwUUjkjUMjWA6OocxYXt3Iw//CkY6SUHjj+ +LO7u3cHBbV9uGOQ06kLCq6nfO/dxMEfg+y1lPV2YzT62NiKGg5bfvy3OFNCB +N6yLnXkFHNxeG/DTo00LdoflXLe9z0HBwyezIwu1YPr+A7+RYg4OBN3waTij +BeIqvTOGDzn4NJbq8WqdFtgLUSmPqzkYb3oZ+upXQmVXnm9nNzneqcYo53pN +sBMr1Q3v5WD3AcktP3M0odemeVq2j4P7/wieIeI1YbL8e+L2AQ4K73nIKLLR +BN0sg8JvwxyMDOph7nmhAZVvzMOTRjlYUzYoaVKkAXaSLqD/k4MPRF1/qado +wK6TYe2hUxws/mcnF75JAyarE9JlZjk406q4rNtUA078Sd1Z/oeDS3vm/Nzl +NWC5cb7Otn9k/w37pubn1CFjf/nU/DwHJ+KVL7f0q8P/AFivPSc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.08127144026352488}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7751,6 +7136,7 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7778,7 +7164,8 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.17588335145564066`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08127144026352488}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7786,11 +7173,13 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991334471589432*^9}, - CellLabel-> - "Out[252]=",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] + CellChangeTimes->{3.991334471589432*^9, 3.9943515630235453`*^9, + 3.994353985695154*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"d6e6b039-a9ff-4683-8d55-7fc6605cc1ec"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7861,15 +7250,891 @@ Cell[BoxData[ CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, 3.994235588626381*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[94]:=",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943515632994633`*^9, 3.994353985934493*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"7d051b89-8634-4704-8b24-0201f4c77527"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6d3700e1-f504-214a-a332-\ -f16397f0b922"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[95]:=",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8bAHBRGUVlj3uvTWTH5a6eR1ZGykhokEipkFARJSOVihaphFCS +cO+prDIzUmRFqVBaQpFV6et3fn+d1/t1zmecz+d5ns85yj5Bzn78fHx8exbw +8f3/Ov2+uV7tTM4a34UGGbrXbNZ0ZcgeMe89AZvNLo4fvK0OKNXmI9t7Aeyf +jESb3zaB8I13ewR6s6Gazpug3LaCFWMyF373cCH4dMiOd3mboL/SMWiypxaO +LrA+IJTnB9Zqw+/GezrALut8XnN2GPzuMb38s+cDyPKxct9djoc6i9s57dm/ +oHjphi85a68Apb/ss4/OP2gJ38x7ZJkJkvu87gpaCGD3TMzbNv5cuGBoXeG4 +SQj3Xjcojq7Ih9dpBtXjy0XRYzpivvxuIaR3FiwLVxfFoNSa4OLyQvAU0/T6 +wxDFGa//9K8/K4S3sdT/+HeKIst4U6LbcCEMBIqwJR+I4jnfCEM3rfvw1XLo +Ed1DDOnDS+ejcu/D7M/UosisZaiwtmLPpitFcCbnWBu/3Ap8Wi8sx71XDHbG +e8SlVFdg2HiXri2vGITqnTdp6q7ASW0V/b6yYoj7qN5nb74Cx9azJ340FMNR +leefL+1ZgWUb2je/HSiGwEzZ/zTKV2Be3OTFKokScLpeomO/RRwvbdk7cTus +BJbrXAva5ieO7IwK9/TIEmitiOMGBYmjujgn8WRMCdj1bTa7FCuOOyOlwPls +CayV/8/iXYE4lj0+MnEnpwSM0+y2BM2J40DLngLPjhKQufTx1MUbErg941Rj +sxYXZFc9iJvNk8BAOZOBUj0uyNcmHNtWLIEvnhIet1ZzgfZTK0yzTgLdsgz2 +B3C4oO4Q7F3xVQKjIEGoZiMXVi/8R/+4WhK5il53z4dzYUOo9JDRM0mcqCh4 +UfSECxuXfH2f2imJ2Ym2uiJ1XHDOLns991YSg3L9B70aueD2cmtbww9JLHot +b/2vjQvbdG6Ve0pJYZX+iT/zA1zYO6SfcsJbCs8Hl79X4+fBSVfbNR3TUrhb +K+Tgd+SBPNEqz79AGqdjxfQWWPHgvoTrjOESafw0uN9vhS0PXnVsL05RlMbY +zs12yk48UHMKVXFaJ41PG1NH/vPmQe36m4tfXpVG1aBVV0uO8eCf9VTrC7YM +nkg+bD9VyoPkvIiCf9YymHvDutqzkmy/mC9R10kGF5jUPyiv4oHDUxHzs34y +KEufVA1o4EG6hRLP4ZwM9jY+ljrZyQMztE9t6ZfBZte6a2UjPDjIyPJqPiGL +Q/kRsgsVCLDLFJu0T5JFJ/nLe5KoBKgIHk1svSyLW0IZc8uUCHjZ5VbSeUcW +y5hLvgqpE6AXvFTgfassBv7O+1KjR8DXvEN5E/JyyAtj/d1oTkCV6CdmmJoc +Dt9nZ5+1IOBKqHPbjK4cJtAtLz61IsBqre7sHMphrFndJk07ArLffbAV9JfD +o4aB+7nOBGyVdBxV4Mlhpe+V0C8+BKyOrIjJqJTDraeiF7/2JUDkw0pp5QY5 +FMi7O/J0FwFlRQKg8VoOzfall6YEECBtX5ZsMC+HNV1NPuMHyPnHqBlb2cuj +YX9wbvsxAm5/TWlqdJXHaq3pjsMxBERvmN9qt10elXJLvBViCdClvonfcEAe +Z9T5M50TCDhder7HI1UeNc0/159KIsDyx5+IwI/y6EPM71RII+DIukvaNSPy +2BUSrRpylYD7WbpvJKblcap+e3R9OgGyrt6MMiEFdKIUCm+9QcBI6dMZAT0F +fH6t5JxbNgHK4l633UwVUPjWTvPTtwhw2zvrlo8KSLEIulKWQ0A1ddVDRxcF +LP2tvWrJbQIunkgOvXpYAZse3pWNKCCgqU9LbSRGAfe+vDxz+h4Bc8Z1nWvO +KGAf6B9PLSRg15cpo6EbChiUZ3ThVhEBTIct43p1Cigebdh1kkfABymNwHpR +Cv5Y43k3ppwAmaAqqowMBSOWMdPWVxDg0OT+Yo8SBTePHwepSgIeRpzRWbaa +gnpxPk9SH5Pr0/9z2MOdgnLrUtP3VJP7b3Y6/d4OCrrsbwqWqCFgMkXVbj6A +gsdla4TKSG+3dMvPiaJg4QvnEzO1BBjlV/j/yKZgQI91uflTAvz5N8msvUfB +we+/K5tJX98y1nDpAQXrbmqfXt9AwGIxZQ1mEwUFfx9OXNdIAMu/vDupnexv +uLOiinRwtUt8/xsKBolrPjFqIuBNSMJQ3CgFJQfXGC9tJmDZc8VLPdMUvK1v +fzeEtKV6mYU2HxVfLOj/1UX6fs/37DZxKn5NZy4++4yAjwbxzioUKpZau7Z/ +IC17msYfpk7Ffs7VUOMWAmLYTjvkzaj4ssltXQvpddszJkzXUrHi7iod6ecE +iB3/HrvJgYrnLtsbbiXdnWUmddCNijrH2B43SF+vi89L9qaim0xC7mvSOz91 +mN4PoKJnQ4nMihcEaAsqNbeEUjG0wK7EgvT4yv2e36KpeOzau4MHSJfalX9f +fIqKexV/e6eTPrZPMErtIhXrQnQjnpC2PucqtvYGFa1PLK15R1q0OOum120q +7hrWMp0l3dU+ZhBVQr7/lPx70VYCrv1i1aZXUHH4WvgjGmkfqVMupU+pGHKs +u16btJbpq6HuNip+HmkXNCL90101/NdrKqq+FjxhTPpRRLDgiiEqtvZLmvz/ +fvT1x2l6Y1T8ZZ6msoq01RMRbYdZKoYPGTkokl46sLliDz8Nrzue5ImR7lyQ +63ByKQ3P3mF4/ibnl6468S5HmoZtZT/M+0l7W0FQrRINO75s3FdNWtM/iW9A +m4b+xov7rpMeS3yd8s+Yhkx2+flQ0sRdDVUFoKGPiVySDenI5wcJM1sado++ +bJcivXas2srNhYZ9zck+/eT6Cy8X6zm4jYZ3aoUxh/RLwy27U/xpWOw7tteX +9PawqdPPI2lIuf/8wStyv9VT11KG42kYZ766J7Hl//l9vlAwmYZGLv3r6aQj +5rRers2hoUb3hHksGT/mtEM7vO/TcOP5zloV0kJYPxFVSsNw95Gbj8n4uxy7 +XarsOQ0FQpvDPpHxuzW3IO/VKxoacyRCQkirNM6aTg7Q8OP8zfY/ZLwXi1z0 +1J+iocXQjZp/ZH48T2m8mUtVRMqxNanP68l6wZM0rNNUxF0f7/Qbk/bs3lE7 +YKiIfld5V9PqyPotOzekYK2IF4Mn9ziT+SiQaaB9IVARNWKj7p+vIuBZTVRF +0WFFXD3HeNT5hIDkj88cXpxQxE8fNqIEaZqmX5BQqiIuGVrUF0fWB+b9q0R0 +lSLeGlD2Nyoj86un9d9YkyJm2eXU7SglwJFvoY1XhyIaGkWtPfuIjHfnwNfw +SRHPde8q7H1Axmuk8rHji5Qws6N6pzmXzGfF6Vvmq5RQZZ8kb8tdAqZ4yU2/ +9ZVQzJg+vj6fXN91q0ZLjJXQqvVXAPsOAfEHvOkqa5Rw3+QDGbE8Mn7qnjXx +OymhpBsvNi6LgHr/m6N14UqooHtGoiqVANs5hvjRSCX0+zDYGnaFgNbkLrrx +cSV0FhEbWHmZgNdlwsdzTinh4/pLInEXyPhaEioef10J47ZtKBI7S9aD4nWm +1rVK6OD5pSScPE/2zY4fbxJVRnWbhvQb/uR6HNgl/VlcGb/1Hf5X6Ufu9/Cb +AgFZZTwjX+jcu5OA3L66V2tUlLH9a+Y7fm8C3j+5rPOAroxbIuQfaLoTsCGe +0ZvlpYzuwo92c23Ieikeox9ZoowvdxkJvlUlgO/MVH3aQ2UUifFeFa1Mzl8g +wPNhBTm++/IkiiIBe6ec48efKqNoS9BSR3kCcnrV+vzfKGMzH2Eft5w8L282 +JbgKqODpLyJ9MMeD36uWv9fdpIIyOxfKLWznwfQN+ZjVnir4tm55IbTyYHKZ +uhrDSwVDrg0PH2rhwdgvRoDlHhX0O+S8//1THnyo2DntGaWCDdGqrbHlPHhm +/0gsMVcF9VMElhjdIr9P9m6HD1Mq6HTlxZBOCA/YBfcyr1xRxQpvcSFlQR70 +KRXctLqmin8Te6+/EuBBxJX8jMmbqlg6Vd16io8Hj2Lyrjvnq5L16/mKb7+5 +YOSemSZWqYrLfPPsz4xwQWvRpeSEQVV8Zulv5d3OBWmvyOPhOmrYOzYv6nmV +C+Pidt5utWp46OL2uT8qXBhK8nYLEdTAY22fE92FS8D2xyHbT3RNDDlq51LY +XQQjO4UOEsdW4tnXTzIDbArJ/wkZ/pO1Wph0RG3cjrgL4i80zhX/0EbdKJVy +AYc7QEks2kin66DVJn1jo4pcSFvFWC7hr4vid19uTgm4Bc/kzU1+pehhdrus +dDBmAZNSm6z/Sh9ze09vviiTAWIC2aE7Thjg8jtBzDbrdKDFKLI9NAyRyfLX +MI2+AsLqWx86NxpilcCFjerqF0GPI1d0aJsRGscNdkR5JEPIe/E6O77VmF9X +hYOuZ+DHr6RNtmmrkSs8vfjDeALY6Dek2+oaI2+pY1WoYSw8+cX6O9NqjDMR +LfMKO45BoI7Rm3Y/EyyItt14p+0IhM3I//HabYJhl0vbAsuOwNFaAfmxABM8 +bGUqYXXrCJxx7/YQCTZB7cx7jUqHjsCduMOv10aYoFpzzLJLikfgw9snvbxz +Jug09HPnzoOHwe2sfc/lRyYoLhQREaRxCDhjvl0ewnSUF3eaSCkNBekKm+zK +JXS8fdq1yfp2KIyd1A5WFKPjmpOvCcEroZCh/HPJJ3E6rrf7UVp4MBT+c420 +CKbQse6aTu0p/VCoqkjhJujTccX74RNH8w+C+aknybxNdHwVmbdGJS8ErNRk +14tm0zF2/q8ErSYYiNGnyr45dOQx3PePc4NB7dHB6fI8Oi6VS5hszQmGhXZt +N3cX0PFxqHP4ncRgqA1KmKgj6Bjm1l3YtTEY1lRMpkY00lHIu9tCviEI6M7t +H76M0LHtwIhCMTUQVh4/fbjW1BS566IGXRbthUpW7iIHpinGv5arevw9ADbO +VF3oZptiU2vSXnZHABwOnLr31dwUX23xmjt0MwCatnoPijmQzyefOfeZGQC7 +GXS7Ld6mWLR+RvhK2B7InxhUmEw0RYPq5NGPv/1B249Rpf7GFGk0i4Fwlh+c +V3H8E/vWFCWCvcZWrPSDyX4fkw/vTZFRTfGqlPSDJ55JBRkfTVH7bKQ5jPmC +88b+VJlRUySMs3//zfKFI6z4YGE+M+yaSKldt9QXmla0K4+qm+FWmYnOke8+ +4PdkdxxxwAwdj5s7uXZ7w9j+4UNWoWZYHLHir3a9Nxym7tv7KtwM3acc/y7n +ecPpo0HOs5FmWGng1CGS4g3FzHAldoIZnqRtzibWe8Pcw9jKunQzXHzKn37/ +ohdcKMqY7KgzQ7FROVXp9G1QldnlOy7FwJabyQUVvz1gwEHZK1yWgSsLHs99 +e+8BfL/3e/yVZ2D9dtfnBvUesNZJ0HGREgOPfsbrguc9oGEB01ROm4HThd0z +Peoe8NznprD5GgZ+aSuO+7XZHd6oBdxP3sXAPo0MeuoLN5i8Mz+j/4iBZQSR +VPHHBT67WWeeKmOg4qzeg2+fXaB34dl1HysYOHDJwk+r0wUqvOWvXqlmoI5z +tea7Ahc4IWvC/NfMwKZZaJLc7gLLEwOOPnvLQO3l/ymVPXUGHf9uPj9+Jo6a +ifw9muUENClK/pOFTMwd1TGuO+8Ey+t8nGQFmZj6+d12uWgn+EX7mdWyhIkF +eiLuU55OUP5KxMJIiontIdNxAVJOsM4a4+c1mbjoXz4Lzm6EneoFwunrmfj2 +oaVl9PINEPF0e4DGRibKXvfV1B9zhGQ/8RauM3mf90KU/7kjVOYeSWrZzMSi +wfZg0URHkNRYt+zfDiYG2KkHPFrgCA0anyS9w5lY8V6MDX8dQHulopLGTSaa +fU196rnYHrCp4zg3i4lbA2hBUl/twG13wuCaHLL9tW3ZY812EHtnNHtzPhN1 +De+y5s7awduVleqneEwUq55wjZGxg3NaHqtGGpl49NV6BsXAFsa1L9K5P5n4 +rHCL3mC4DfQ+RyuJX0z8tMd96fw2G6gOHHMJnWJizn+9NcZWNnCOa3uA/oeJ +E4Fivl8kbECbyXevXICF9Q2NW/251uBju1+5TpqFG1McFtf8soIuf5ulXWwW +qjvflt100hIqhKfkTYCFGXE1gesOWEJ2QbbWFXMWCvR7Mp22WELwj3/W7tYs +PLZF6Vu2viWIHiJi3m5g4VYXm3zL1xZgnaA8M+TDwvYrLvMHDCygNOfv4FQi +CxsORH2YHTUHukXojN0ZFt7w/BL25o05PBgcWZp5loVTz3TOtzaaA5f23tTu +AgtHx5wlx7LM4V5a9dmMayxcG3iPK7TZHDKT4hk291mYFmpSnFGPcCp0WUpa +JwunPxe1NngACEkk5o12k+OpZCz8aQqQUMJXubaXhbVFNceY0gBxY+OfR96y +UEZ8a4dR5xqI3t3FNv/MwpQL1g2FjmsgZOvVr99mWbjJZYcMYc8BT0tVZNHY +eHil6CxsY8G/LiGxOiU2Cj778qKDzYJMv7E+O1U2JrPDyhMpLPicUHbIcyUb +hV+A07a3TAhp3lB0xIiN/JsvtOZuY8Jpx6O0Ums2/je1VzN1FwPK3bvnjIPY +2CQWUCiXYgrbvpU/qzzAxpc6rYYvQ02BLyIzzTKUjYxFd1ty3U3B+tpeY9cj +bPyW69ZQqGQKHe8W7DsYy8b6oz2ndbl0GPbR6ytJZWPZDLA73piAwv6TZXrV +bBSxqMkYMjeGc/O7TM7UstEp0PX4N21j4L9gXfKlno2fKC2OiyWNYfjhovzM +ZjaKNoZ6nPy8Gsr54tLEO9l4wkikIidpNXheOn5o+hMbb1FeXGC8M4K0iiMm +T5Zw8EvgY2P6eUNY6uhRIi/GQdG3Vp/EIg3h+ICZ7qHlHGy2Heub22UIuxfN +qhlIcbB1kaa9LBiC6YZwyWwaB9MKjy6w/2kArz6E/Io35OAmzZq4c24GICWy +r2T9Zg5OPherEvXVgxyLqIifHhwUUjkjUMjWA6OocxYXt3Iw//CkY6SUHjj+ +LO7u3cHBbV9uGOQ06kLCq6nfO/dxMEfg+y1lPV2YzT62NiKGg5bfvy3OFNCB +N6yLnXkFHNxeG/DTo00LdoflXLe9z0HBwyezIwu1YPr+A7+RYg4OBN3waTij +BeIqvTOGDzn4NJbq8WqdFtgLUSmPqzkYb3oZ+upXQmVXnm9nNzneqcYo53pN +sBMr1Q3v5WD3AcktP3M0odemeVq2j4P7/wieIeI1YbL8e+L2AQ4K73nIKLLR +BN0sg8JvwxyMDOph7nmhAZVvzMOTRjlYUzYoaVKkAXaSLqD/k4MPRF1/qado +wK6TYe2hUxws/mcnF75JAyarE9JlZjk406q4rNtUA078Sd1Z/oeDS3vm/Nzl +NWC5cb7Otn9k/w37pubn1CFjf/nU/DwHJ+KVL7f0q8P/AFivPSc= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHBRGUVlj3uvTWTH5a6eR1ZGykhokEipkFARJSOVihaphFCS +cO+prDIzUmRFqVBaQpFV6et3fn+d1/t1zmecz+d5ns85yj5Bzn78fHx8exbw +8f3/Ov2+uV7tTM4a34UGGbrXbNZ0ZcgeMe89AZvNLo4fvK0OKNXmI9t7Aeyf +jESb3zaB8I13ewR6s6Gazpug3LaCFWMyF373cCH4dMiOd3mboL/SMWiypxaO +LrA+IJTnB9Zqw+/GezrALut8XnN2GPzuMb38s+cDyPKxct9djoc6i9s57dm/ +oHjphi85a68Apb/ss4/OP2gJ38x7ZJkJkvu87gpaCGD3TMzbNv5cuGBoXeG4 +SQj3Xjcojq7Ih9dpBtXjy0XRYzpivvxuIaR3FiwLVxfFoNSa4OLyQvAU0/T6 +wxDFGa//9K8/K4S3sdT/+HeKIst4U6LbcCEMBIqwJR+I4jnfCEM3rfvw1XLo +Ed1DDOnDS+ejcu/D7M/UosisZaiwtmLPpitFcCbnWBu/3Ap8Wi8sx71XDHbG +e8SlVFdg2HiXri2vGITqnTdp6q7ASW0V/b6yYoj7qN5nb74Cx9azJ340FMNR +leefL+1ZgWUb2je/HSiGwEzZ/zTKV2Be3OTFKokScLpeomO/RRwvbdk7cTus +BJbrXAva5ieO7IwK9/TIEmitiOMGBYmjujgn8WRMCdj1bTa7FCuOOyOlwPls +CayV/8/iXYE4lj0+MnEnpwSM0+y2BM2J40DLngLPjhKQufTx1MUbErg941Rj +sxYXZFc9iJvNk8BAOZOBUj0uyNcmHNtWLIEvnhIet1ZzgfZTK0yzTgLdsgz2 +B3C4oO4Q7F3xVQKjIEGoZiMXVi/8R/+4WhK5il53z4dzYUOo9JDRM0mcqCh4 +UfSECxuXfH2f2imJ2Ym2uiJ1XHDOLns991YSg3L9B70aueD2cmtbww9JLHot +b/2vjQvbdG6Ve0pJYZX+iT/zA1zYO6SfcsJbCs8Hl79X4+fBSVfbNR3TUrhb +K+Tgd+SBPNEqz79AGqdjxfQWWPHgvoTrjOESafw0uN9vhS0PXnVsL05RlMbY +zs12yk48UHMKVXFaJ41PG1NH/vPmQe36m4tfXpVG1aBVV0uO8eCf9VTrC7YM +nkg+bD9VyoPkvIiCf9YymHvDutqzkmy/mC9R10kGF5jUPyiv4oHDUxHzs34y +KEufVA1o4EG6hRLP4ZwM9jY+ljrZyQMztE9t6ZfBZte6a2UjPDjIyPJqPiGL +Q/kRsgsVCLDLFJu0T5JFJ/nLe5KoBKgIHk1svSyLW0IZc8uUCHjZ5VbSeUcW +y5hLvgqpE6AXvFTgfassBv7O+1KjR8DXvEN5E/JyyAtj/d1oTkCV6CdmmJoc +Dt9nZ5+1IOBKqHPbjK4cJtAtLz61IsBqre7sHMphrFndJk07ArLffbAV9JfD +o4aB+7nOBGyVdBxV4Mlhpe+V0C8+BKyOrIjJqJTDraeiF7/2JUDkw0pp5QY5 +FMi7O/J0FwFlRQKg8VoOzfall6YEECBtX5ZsMC+HNV1NPuMHyPnHqBlb2cuj +YX9wbvsxAm5/TWlqdJXHaq3pjsMxBERvmN9qt10elXJLvBViCdClvonfcEAe +Z9T5M50TCDhder7HI1UeNc0/159KIsDyx5+IwI/y6EPM71RII+DIukvaNSPy +2BUSrRpylYD7WbpvJKblcap+e3R9OgGyrt6MMiEFdKIUCm+9QcBI6dMZAT0F +fH6t5JxbNgHK4l633UwVUPjWTvPTtwhw2zvrlo8KSLEIulKWQ0A1ddVDRxcF +LP2tvWrJbQIunkgOvXpYAZse3pWNKCCgqU9LbSRGAfe+vDxz+h4Bc8Z1nWvO +KGAf6B9PLSRg15cpo6EbChiUZ3ThVhEBTIct43p1Cigebdh1kkfABymNwHpR +Cv5Y43k3ppwAmaAqqowMBSOWMdPWVxDg0OT+Yo8SBTePHwepSgIeRpzRWbaa +gnpxPk9SH5Pr0/9z2MOdgnLrUtP3VJP7b3Y6/d4OCrrsbwqWqCFgMkXVbj6A +gsdla4TKSG+3dMvPiaJg4QvnEzO1BBjlV/j/yKZgQI91uflTAvz5N8msvUfB +we+/K5tJX98y1nDpAQXrbmqfXt9AwGIxZQ1mEwUFfx9OXNdIAMu/vDupnexv +uLOiinRwtUt8/xsKBolrPjFqIuBNSMJQ3CgFJQfXGC9tJmDZc8VLPdMUvK1v +fzeEtKV6mYU2HxVfLOj/1UX6fs/37DZxKn5NZy4++4yAjwbxzioUKpZau7Z/ +IC17msYfpk7Ffs7VUOMWAmLYTjvkzaj4ssltXQvpddszJkzXUrHi7iod6ecE +iB3/HrvJgYrnLtsbbiXdnWUmddCNijrH2B43SF+vi89L9qaim0xC7mvSOz91 +mN4PoKJnQ4nMihcEaAsqNbeEUjG0wK7EgvT4yv2e36KpeOzau4MHSJfalX9f +fIqKexV/e6eTPrZPMErtIhXrQnQjnpC2PucqtvYGFa1PLK15R1q0OOum120q +7hrWMp0l3dU+ZhBVQr7/lPx70VYCrv1i1aZXUHH4WvgjGmkfqVMupU+pGHKs +u16btJbpq6HuNip+HmkXNCL90101/NdrKqq+FjxhTPpRRLDgiiEqtvZLmvz/ +fvT1x2l6Y1T8ZZ6msoq01RMRbYdZKoYPGTkokl46sLliDz8Nrzue5ImR7lyQ +63ByKQ3P3mF4/ibnl6468S5HmoZtZT/M+0l7W0FQrRINO75s3FdNWtM/iW9A +m4b+xov7rpMeS3yd8s+Yhkx2+flQ0sRdDVUFoKGPiVySDenI5wcJM1sado++ +bJcivXas2srNhYZ9zck+/eT6Cy8X6zm4jYZ3aoUxh/RLwy27U/xpWOw7tteX +9PawqdPPI2lIuf/8wStyv9VT11KG42kYZ766J7Hl//l9vlAwmYZGLv3r6aQj +5rRers2hoUb3hHksGT/mtEM7vO/TcOP5zloV0kJYPxFVSsNw95Gbj8n4uxy7 +XarsOQ0FQpvDPpHxuzW3IO/VKxoacyRCQkirNM6aTg7Q8OP8zfY/ZLwXi1z0 +1J+iocXQjZp/ZH48T2m8mUtVRMqxNanP68l6wZM0rNNUxF0f7/Qbk/bs3lE7 +YKiIfld5V9PqyPotOzekYK2IF4Mn9ziT+SiQaaB9IVARNWKj7p+vIuBZTVRF +0WFFXD3HeNT5hIDkj88cXpxQxE8fNqIEaZqmX5BQqiIuGVrUF0fWB+b9q0R0 +lSLeGlD2Nyoj86un9d9YkyJm2eXU7SglwJFvoY1XhyIaGkWtPfuIjHfnwNfw +SRHPde8q7H1Axmuk8rHji5Qws6N6pzmXzGfF6Vvmq5RQZZ8kb8tdAqZ4yU2/ +9ZVQzJg+vj6fXN91q0ZLjJXQqvVXAPsOAfEHvOkqa5Rw3+QDGbE8Mn7qnjXx +OymhpBsvNi6LgHr/m6N14UqooHtGoiqVANs5hvjRSCX0+zDYGnaFgNbkLrrx +cSV0FhEbWHmZgNdlwsdzTinh4/pLInEXyPhaEioef10J47ZtKBI7S9aD4nWm +1rVK6OD5pSScPE/2zY4fbxJVRnWbhvQb/uR6HNgl/VlcGb/1Hf5X6Ufu9/Cb +AgFZZTwjX+jcu5OA3L66V2tUlLH9a+Y7fm8C3j+5rPOAroxbIuQfaLoTsCGe +0ZvlpYzuwo92c23Ieikeox9ZoowvdxkJvlUlgO/MVH3aQ2UUifFeFa1Mzl8g +wPNhBTm++/IkiiIBe6ec48efKqNoS9BSR3kCcnrV+vzfKGMzH2Eft5w8L282 +JbgKqODpLyJ9MMeD36uWv9fdpIIyOxfKLWznwfQN+ZjVnir4tm55IbTyYHKZ +uhrDSwVDrg0PH2rhwdgvRoDlHhX0O+S8//1THnyo2DntGaWCDdGqrbHlPHhm +/0gsMVcF9VMElhjdIr9P9m6HD1Mq6HTlxZBOCA/YBfcyr1xRxQpvcSFlQR70 +KRXctLqmin8Te6+/EuBBxJX8jMmbqlg6Vd16io8Hj2Lyrjvnq5L16/mKb7+5 +YOSemSZWqYrLfPPsz4xwQWvRpeSEQVV8Zulv5d3OBWmvyOPhOmrYOzYv6nmV +C+Pidt5utWp46OL2uT8qXBhK8nYLEdTAY22fE92FS8D2xyHbT3RNDDlq51LY +XQQjO4UOEsdW4tnXTzIDbArJ/wkZ/pO1Wph0RG3cjrgL4i80zhX/0EbdKJVy +AYc7QEks2kin66DVJn1jo4pcSFvFWC7hr4vid19uTgm4Bc/kzU1+pehhdrus +dDBmAZNSm6z/Sh9ze09vviiTAWIC2aE7Thjg8jtBzDbrdKDFKLI9NAyRyfLX +MI2+AsLqWx86NxpilcCFjerqF0GPI1d0aJsRGscNdkR5JEPIe/E6O77VmF9X +hYOuZ+DHr6RNtmmrkSs8vfjDeALY6Dek2+oaI2+pY1WoYSw8+cX6O9NqjDMR +LfMKO45BoI7Rm3Y/EyyItt14p+0IhM3I//HabYJhl0vbAsuOwNFaAfmxABM8 +bGUqYXXrCJxx7/YQCTZB7cx7jUqHjsCduMOv10aYoFpzzLJLikfgw9snvbxz +Jug09HPnzoOHwe2sfc/lRyYoLhQREaRxCDhjvl0ewnSUF3eaSCkNBekKm+zK +JXS8fdq1yfp2KIyd1A5WFKPjmpOvCcEroZCh/HPJJ3E6rrf7UVp4MBT+c420 +CKbQse6aTu0p/VCoqkjhJujTccX74RNH8w+C+aknybxNdHwVmbdGJS8ErNRk +14tm0zF2/q8ErSYYiNGnyr45dOQx3PePc4NB7dHB6fI8Oi6VS5hszQmGhXZt +N3cX0PFxqHP4ncRgqA1KmKgj6Bjm1l3YtTEY1lRMpkY00lHIu9tCviEI6M7t +H76M0LHtwIhCMTUQVh4/fbjW1BS566IGXRbthUpW7iIHpinGv5arevw9ADbO +VF3oZptiU2vSXnZHABwOnLr31dwUX23xmjt0MwCatnoPijmQzyefOfeZGQC7 +GXS7Ld6mWLR+RvhK2B7InxhUmEw0RYPq5NGPv/1B249Rpf7GFGk0i4Fwlh+c +V3H8E/vWFCWCvcZWrPSDyX4fkw/vTZFRTfGqlPSDJ55JBRkfTVH7bKQ5jPmC +88b+VJlRUySMs3//zfKFI6z4YGE+M+yaSKldt9QXmla0K4+qm+FWmYnOke8+ +4PdkdxxxwAwdj5s7uXZ7w9j+4UNWoWZYHLHir3a9Nxym7tv7KtwM3acc/y7n +ecPpo0HOs5FmWGng1CGS4g3FzHAldoIZnqRtzibWe8Pcw9jKunQzXHzKn37/ +ohdcKMqY7KgzQ7FROVXp9G1QldnlOy7FwJabyQUVvz1gwEHZK1yWgSsLHs99 +e+8BfL/3e/yVZ2D9dtfnBvUesNZJ0HGREgOPfsbrguc9oGEB01ROm4HThd0z +Peoe8NznprD5GgZ+aSuO+7XZHd6oBdxP3sXAPo0MeuoLN5i8Mz+j/4iBZQSR +VPHHBT67WWeeKmOg4qzeg2+fXaB34dl1HysYOHDJwk+r0wUqvOWvXqlmoI5z +tea7Ahc4IWvC/NfMwKZZaJLc7gLLEwOOPnvLQO3l/ymVPXUGHf9uPj9+Jo6a +ifw9muUENClK/pOFTMwd1TGuO+8Ey+t8nGQFmZj6+d12uWgn+EX7mdWyhIkF +eiLuU55OUP5KxMJIiontIdNxAVJOsM4a4+c1mbjoXz4Lzm6EneoFwunrmfj2 +oaVl9PINEPF0e4DGRibKXvfV1B9zhGQ/8RauM3mf90KU/7kjVOYeSWrZzMSi +wfZg0URHkNRYt+zfDiYG2KkHPFrgCA0anyS9w5lY8V6MDX8dQHulopLGTSaa +fU196rnYHrCp4zg3i4lbA2hBUl/twG13wuCaHLL9tW3ZY812EHtnNHtzPhN1 +De+y5s7awduVleqneEwUq55wjZGxg3NaHqtGGpl49NV6BsXAFsa1L9K5P5n4 +rHCL3mC4DfQ+RyuJX0z8tMd96fw2G6gOHHMJnWJizn+9NcZWNnCOa3uA/oeJ +E4Fivl8kbECbyXevXICF9Q2NW/251uBju1+5TpqFG1McFtf8soIuf5ulXWwW +qjvflt100hIqhKfkTYCFGXE1gesOWEJ2QbbWFXMWCvR7Mp22WELwj3/W7tYs +PLZF6Vu2viWIHiJi3m5g4VYXm3zL1xZgnaA8M+TDwvYrLvMHDCygNOfv4FQi +CxsORH2YHTUHukXojN0ZFt7w/BL25o05PBgcWZp5loVTz3TOtzaaA5f23tTu +AgtHx5wlx7LM4V5a9dmMayxcG3iPK7TZHDKT4hk291mYFmpSnFGPcCp0WUpa +JwunPxe1NngACEkk5o12k+OpZCz8aQqQUMJXubaXhbVFNceY0gBxY+OfR96y +UEZ8a4dR5xqI3t3FNv/MwpQL1g2FjmsgZOvVr99mWbjJZYcMYc8BT0tVZNHY +eHil6CxsY8G/LiGxOiU2Cj778qKDzYJMv7E+O1U2JrPDyhMpLPicUHbIcyUb +hV+A07a3TAhp3lB0xIiN/JsvtOZuY8Jpx6O0Ums2/je1VzN1FwPK3bvnjIPY +2CQWUCiXYgrbvpU/qzzAxpc6rYYvQ02BLyIzzTKUjYxFd1ty3U3B+tpeY9cj +bPyW69ZQqGQKHe8W7DsYy8b6oz2ndbl0GPbR6ytJZWPZDLA73piAwv6TZXrV +bBSxqMkYMjeGc/O7TM7UstEp0PX4N21j4L9gXfKlno2fKC2OiyWNYfjhovzM +ZjaKNoZ6nPy8Gsr54tLEO9l4wkikIidpNXheOn5o+hMbb1FeXGC8M4K0iiMm +T5Zw8EvgY2P6eUNY6uhRIi/GQdG3Vp/EIg3h+ICZ7qHlHGy2Heub22UIuxfN +qhlIcbB1kaa9LBiC6YZwyWwaB9MKjy6w/2kArz6E/Io35OAmzZq4c24GICWy +r2T9Zg5OPherEvXVgxyLqIifHhwUUjkjUMjWA6OocxYXt3Iw//CkY6SUHjj+ +LO7u3cHBbV9uGOQ06kLCq6nfO/dxMEfg+y1lPV2YzT62NiKGg5bfvy3OFNCB +N6yLnXkFHNxeG/DTo00LdoflXLe9z0HBwyezIwu1YPr+A7+RYg4OBN3waTij +BeIqvTOGDzn4NJbq8WqdFtgLUSmPqzkYb3oZ+upXQmVXnm9nNzneqcYo53pN +sBMr1Q3v5WD3AcktP3M0odemeVq2j4P7/wieIeI1YbL8e+L2AQ4K73nIKLLR +BN0sg8JvwxyMDOph7nmhAZVvzMOTRjlYUzYoaVKkAXaSLqD/k4MPRF1/qado +wK6TYe2hUxws/mcnF75JAyarE9JlZjk406q4rNtUA078Sd1Z/oeDS3vm/Nzl +NWC5cb7Otn9k/w37pubn1CFjf/nU/DwHJ+KVL7f0q8P/AFivPSc= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08127144026352488}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08127144026352488}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHBRGUVlj3uvTWTH5a6eR1ZGykhokEipkFARJSOVihaphFCS +cO+prDIzUmRFqVBaQpFV6et3fn+d1/t1zmecz+d5ns85yj5Bzn78fHx8exbw +8f3/Ov2+uV7tTM4a34UGGbrXbNZ0ZcgeMe89AZvNLo4fvK0OKNXmI9t7Aeyf +jESb3zaB8I13ewR6s6Gazpug3LaCFWMyF373cCH4dMiOd3mboL/SMWiypxaO +LrA+IJTnB9Zqw+/GezrALut8XnN2GPzuMb38s+cDyPKxct9djoc6i9s57dm/ +oHjphi85a68Apb/ss4/OP2gJ38x7ZJkJkvu87gpaCGD3TMzbNv5cuGBoXeG4 +SQj3Xjcojq7Ih9dpBtXjy0XRYzpivvxuIaR3FiwLVxfFoNSa4OLyQvAU0/T6 +wxDFGa//9K8/K4S3sdT/+HeKIst4U6LbcCEMBIqwJR+I4jnfCEM3rfvw1XLo +Ed1DDOnDS+ejcu/D7M/UosisZaiwtmLPpitFcCbnWBu/3Ap8Wi8sx71XDHbG +e8SlVFdg2HiXri2vGITqnTdp6q7ASW0V/b6yYoj7qN5nb74Cx9azJ340FMNR +leefL+1ZgWUb2je/HSiGwEzZ/zTKV2Be3OTFKokScLpeomO/RRwvbdk7cTus +BJbrXAva5ieO7IwK9/TIEmitiOMGBYmjujgn8WRMCdj1bTa7FCuOOyOlwPls +CayV/8/iXYE4lj0+MnEnpwSM0+y2BM2J40DLngLPjhKQufTx1MUbErg941Rj +sxYXZFc9iJvNk8BAOZOBUj0uyNcmHNtWLIEvnhIet1ZzgfZTK0yzTgLdsgz2 +B3C4oO4Q7F3xVQKjIEGoZiMXVi/8R/+4WhK5il53z4dzYUOo9JDRM0mcqCh4 +UfSECxuXfH2f2imJ2Ym2uiJ1XHDOLns991YSg3L9B70aueD2cmtbww9JLHot +b/2vjQvbdG6Ve0pJYZX+iT/zA1zYO6SfcsJbCs8Hl79X4+fBSVfbNR3TUrhb +K+Tgd+SBPNEqz79AGqdjxfQWWPHgvoTrjOESafw0uN9vhS0PXnVsL05RlMbY +zs12yk48UHMKVXFaJ41PG1NH/vPmQe36m4tfXpVG1aBVV0uO8eCf9VTrC7YM +nkg+bD9VyoPkvIiCf9YymHvDutqzkmy/mC9R10kGF5jUPyiv4oHDUxHzs34y +KEufVA1o4EG6hRLP4ZwM9jY+ljrZyQMztE9t6ZfBZte6a2UjPDjIyPJqPiGL +Q/kRsgsVCLDLFJu0T5JFJ/nLe5KoBKgIHk1svSyLW0IZc8uUCHjZ5VbSeUcW +y5hLvgqpE6AXvFTgfassBv7O+1KjR8DXvEN5E/JyyAtj/d1oTkCV6CdmmJoc +Dt9nZ5+1IOBKqHPbjK4cJtAtLz61IsBqre7sHMphrFndJk07ArLffbAV9JfD +o4aB+7nOBGyVdBxV4Mlhpe+V0C8+BKyOrIjJqJTDraeiF7/2JUDkw0pp5QY5 +FMi7O/J0FwFlRQKg8VoOzfall6YEECBtX5ZsMC+HNV1NPuMHyPnHqBlb2cuj +YX9wbvsxAm5/TWlqdJXHaq3pjsMxBERvmN9qt10elXJLvBViCdClvonfcEAe +Z9T5M50TCDhder7HI1UeNc0/159KIsDyx5+IwI/y6EPM71RII+DIukvaNSPy +2BUSrRpylYD7WbpvJKblcap+e3R9OgGyrt6MMiEFdKIUCm+9QcBI6dMZAT0F +fH6t5JxbNgHK4l633UwVUPjWTvPTtwhw2zvrlo8KSLEIulKWQ0A1ddVDRxcF +LP2tvWrJbQIunkgOvXpYAZse3pWNKCCgqU9LbSRGAfe+vDxz+h4Bc8Z1nWvO +KGAf6B9PLSRg15cpo6EbChiUZ3ThVhEBTIct43p1Cigebdh1kkfABymNwHpR +Cv5Y43k3ppwAmaAqqowMBSOWMdPWVxDg0OT+Yo8SBTePHwepSgIeRpzRWbaa +gnpxPk9SH5Pr0/9z2MOdgnLrUtP3VJP7b3Y6/d4OCrrsbwqWqCFgMkXVbj6A +gsdla4TKSG+3dMvPiaJg4QvnEzO1BBjlV/j/yKZgQI91uflTAvz5N8msvUfB +we+/K5tJX98y1nDpAQXrbmqfXt9AwGIxZQ1mEwUFfx9OXNdIAMu/vDupnexv +uLOiinRwtUt8/xsKBolrPjFqIuBNSMJQ3CgFJQfXGC9tJmDZc8VLPdMUvK1v +fzeEtKV6mYU2HxVfLOj/1UX6fs/37DZxKn5NZy4++4yAjwbxzioUKpZau7Z/ +IC17msYfpk7Ffs7VUOMWAmLYTjvkzaj4ssltXQvpddszJkzXUrHi7iod6ecE +iB3/HrvJgYrnLtsbbiXdnWUmddCNijrH2B43SF+vi89L9qaim0xC7mvSOz91 +mN4PoKJnQ4nMihcEaAsqNbeEUjG0wK7EgvT4yv2e36KpeOzau4MHSJfalX9f +fIqKexV/e6eTPrZPMErtIhXrQnQjnpC2PucqtvYGFa1PLK15R1q0OOum120q +7hrWMp0l3dU+ZhBVQr7/lPx70VYCrv1i1aZXUHH4WvgjGmkfqVMupU+pGHKs +u16btJbpq6HuNip+HmkXNCL90101/NdrKqq+FjxhTPpRRLDgiiEqtvZLmvz/ +fvT1x2l6Y1T8ZZ6msoq01RMRbYdZKoYPGTkokl46sLliDz8Nrzue5ImR7lyQ +63ByKQ3P3mF4/ibnl6468S5HmoZtZT/M+0l7W0FQrRINO75s3FdNWtM/iW9A +m4b+xov7rpMeS3yd8s+Yhkx2+flQ0sRdDVUFoKGPiVySDenI5wcJM1sado++ +bJcivXas2srNhYZ9zck+/eT6Cy8X6zm4jYZ3aoUxh/RLwy27U/xpWOw7tteX +9PawqdPPI2lIuf/8wStyv9VT11KG42kYZ766J7Hl//l9vlAwmYZGLv3r6aQj +5rRers2hoUb3hHksGT/mtEM7vO/TcOP5zloV0kJYPxFVSsNw95Gbj8n4uxy7 +XarsOQ0FQpvDPpHxuzW3IO/VKxoacyRCQkirNM6aTg7Q8OP8zfY/ZLwXi1z0 +1J+iocXQjZp/ZH48T2m8mUtVRMqxNanP68l6wZM0rNNUxF0f7/Qbk/bs3lE7 +YKiIfld5V9PqyPotOzekYK2IF4Mn9ziT+SiQaaB9IVARNWKj7p+vIuBZTVRF +0WFFXD3HeNT5hIDkj88cXpxQxE8fNqIEaZqmX5BQqiIuGVrUF0fWB+b9q0R0 +lSLeGlD2Nyoj86un9d9YkyJm2eXU7SglwJFvoY1XhyIaGkWtPfuIjHfnwNfw +SRHPde8q7H1Axmuk8rHji5Qws6N6pzmXzGfF6Vvmq5RQZZ8kb8tdAqZ4yU2/ +9ZVQzJg+vj6fXN91q0ZLjJXQqvVXAPsOAfEHvOkqa5Rw3+QDGbE8Mn7qnjXx +OymhpBsvNi6LgHr/m6N14UqooHtGoiqVANs5hvjRSCX0+zDYGnaFgNbkLrrx +cSV0FhEbWHmZgNdlwsdzTinh4/pLInEXyPhaEioef10J47ZtKBI7S9aD4nWm +1rVK6OD5pSScPE/2zY4fbxJVRnWbhvQb/uR6HNgl/VlcGb/1Hf5X6Ufu9/Cb +AgFZZTwjX+jcu5OA3L66V2tUlLH9a+Y7fm8C3j+5rPOAroxbIuQfaLoTsCGe +0ZvlpYzuwo92c23Ieikeox9ZoowvdxkJvlUlgO/MVH3aQ2UUifFeFa1Mzl8g +wPNhBTm++/IkiiIBe6ec48efKqNoS9BSR3kCcnrV+vzfKGMzH2Eft5w8L282 +JbgKqODpLyJ9MMeD36uWv9fdpIIyOxfKLWznwfQN+ZjVnir4tm55IbTyYHKZ +uhrDSwVDrg0PH2rhwdgvRoDlHhX0O+S8//1THnyo2DntGaWCDdGqrbHlPHhm +/0gsMVcF9VMElhjdIr9P9m6HD1Mq6HTlxZBOCA/YBfcyr1xRxQpvcSFlQR70 +KRXctLqmin8Te6+/EuBBxJX8jMmbqlg6Vd16io8Hj2Lyrjvnq5L16/mKb7+5 +YOSemSZWqYrLfPPsz4xwQWvRpeSEQVV8Zulv5d3OBWmvyOPhOmrYOzYv6nmV +C+Pidt5utWp46OL2uT8qXBhK8nYLEdTAY22fE92FS8D2xyHbT3RNDDlq51LY +XQQjO4UOEsdW4tnXTzIDbArJ/wkZ/pO1Wph0RG3cjrgL4i80zhX/0EbdKJVy +AYc7QEks2kin66DVJn1jo4pcSFvFWC7hr4vid19uTgm4Bc/kzU1+pehhdrus +dDBmAZNSm6z/Sh9ze09vviiTAWIC2aE7Thjg8jtBzDbrdKDFKLI9NAyRyfLX +MI2+AsLqWx86NxpilcCFjerqF0GPI1d0aJsRGscNdkR5JEPIe/E6O77VmF9X +hYOuZ+DHr6RNtmmrkSs8vfjDeALY6Dek2+oaI2+pY1WoYSw8+cX6O9NqjDMR +LfMKO45BoI7Rm3Y/EyyItt14p+0IhM3I//HabYJhl0vbAsuOwNFaAfmxABM8 +bGUqYXXrCJxx7/YQCTZB7cx7jUqHjsCduMOv10aYoFpzzLJLikfgw9snvbxz +Jug09HPnzoOHwe2sfc/lRyYoLhQREaRxCDhjvl0ewnSUF3eaSCkNBekKm+zK +JXS8fdq1yfp2KIyd1A5WFKPjmpOvCcEroZCh/HPJJ3E6rrf7UVp4MBT+c420 +CKbQse6aTu0p/VCoqkjhJujTccX74RNH8w+C+aknybxNdHwVmbdGJS8ErNRk +14tm0zF2/q8ErSYYiNGnyr45dOQx3PePc4NB7dHB6fI8Oi6VS5hszQmGhXZt +N3cX0PFxqHP4ncRgqA1KmKgj6Bjm1l3YtTEY1lRMpkY00lHIu9tCviEI6M7t +H76M0LHtwIhCMTUQVh4/fbjW1BS566IGXRbthUpW7iIHpinGv5arevw9ADbO +VF3oZptiU2vSXnZHABwOnLr31dwUX23xmjt0MwCatnoPijmQzyefOfeZGQC7 +GXS7Ld6mWLR+RvhK2B7InxhUmEw0RYPq5NGPv/1B249Rpf7GFGk0i4Fwlh+c +V3H8E/vWFCWCvcZWrPSDyX4fkw/vTZFRTfGqlPSDJ55JBRkfTVH7bKQ5jPmC +88b+VJlRUySMs3//zfKFI6z4YGE+M+yaSKldt9QXmla0K4+qm+FWmYnOke8+ +4PdkdxxxwAwdj5s7uXZ7w9j+4UNWoWZYHLHir3a9Nxym7tv7KtwM3acc/y7n +ecPpo0HOs5FmWGng1CGS4g3FzHAldoIZnqRtzibWe8Pcw9jKunQzXHzKn37/ +ohdcKMqY7KgzQ7FROVXp9G1QldnlOy7FwJabyQUVvz1gwEHZK1yWgSsLHs99 +e+8BfL/3e/yVZ2D9dtfnBvUesNZJ0HGREgOPfsbrguc9oGEB01ROm4HThd0z +Peoe8NznprD5GgZ+aSuO+7XZHd6oBdxP3sXAPo0MeuoLN5i8Mz+j/4iBZQSR +VPHHBT67WWeeKmOg4qzeg2+fXaB34dl1HysYOHDJwk+r0wUqvOWvXqlmoI5z +tea7Ahc4IWvC/NfMwKZZaJLc7gLLEwOOPnvLQO3l/ymVPXUGHf9uPj9+Jo6a +ifw9muUENClK/pOFTMwd1TGuO+8Ey+t8nGQFmZj6+d12uWgn+EX7mdWyhIkF +eiLuU55OUP5KxMJIiontIdNxAVJOsM4a4+c1mbjoXz4Lzm6EneoFwunrmfj2 +oaVl9PINEPF0e4DGRibKXvfV1B9zhGQ/8RauM3mf90KU/7kjVOYeSWrZzMSi +wfZg0URHkNRYt+zfDiYG2KkHPFrgCA0anyS9w5lY8V6MDX8dQHulopLGTSaa +fU196rnYHrCp4zg3i4lbA2hBUl/twG13wuCaHLL9tW3ZY812EHtnNHtzPhN1 +De+y5s7awduVleqneEwUq55wjZGxg3NaHqtGGpl49NV6BsXAFsa1L9K5P5n4 +rHCL3mC4DfQ+RyuJX0z8tMd96fw2G6gOHHMJnWJizn+9NcZWNnCOa3uA/oeJ +E4Fivl8kbECbyXevXICF9Q2NW/251uBju1+5TpqFG1McFtf8soIuf5ulXWwW +qjvflt100hIqhKfkTYCFGXE1gesOWEJ2QbbWFXMWCvR7Mp22WELwj3/W7tYs +PLZF6Vu2viWIHiJi3m5g4VYXm3zL1xZgnaA8M+TDwvYrLvMHDCygNOfv4FQi +CxsORH2YHTUHukXojN0ZFt7w/BL25o05PBgcWZp5loVTz3TOtzaaA5f23tTu +AgtHx5wlx7LM4V5a9dmMayxcG3iPK7TZHDKT4hk291mYFmpSnFGPcCp0WUpa +JwunPxe1NngACEkk5o12k+OpZCz8aQqQUMJXubaXhbVFNceY0gBxY+OfR96y +UEZ8a4dR5xqI3t3FNv/MwpQL1g2FjmsgZOvVr99mWbjJZYcMYc8BT0tVZNHY +eHil6CxsY8G/LiGxOiU2Cj778qKDzYJMv7E+O1U2JrPDyhMpLPicUHbIcyUb +hV+A07a3TAhp3lB0xIiN/JsvtOZuY8Jpx6O0Ums2/je1VzN1FwPK3bvnjIPY +2CQWUCiXYgrbvpU/qzzAxpc6rYYvQ02BLyIzzTKUjYxFd1ty3U3B+tpeY9cj +bPyW69ZQqGQKHe8W7DsYy8b6oz2ndbl0GPbR6ytJZWPZDLA73piAwv6TZXrV +bBSxqMkYMjeGc/O7TM7UstEp0PX4N21j4L9gXfKlno2fKC2OiyWNYfjhovzM +ZjaKNoZ6nPy8Gsr54tLEO9l4wkikIidpNXheOn5o+hMbb1FeXGC8M4K0iiMm +T5Zw8EvgY2P6eUNY6uhRIi/GQdG3Vp/EIg3h+ICZ7qHlHGy2Heub22UIuxfN +qhlIcbB1kaa9LBiC6YZwyWwaB9MKjy6w/2kArz6E/Io35OAmzZq4c24GICWy +r2T9Zg5OPherEvXVgxyLqIifHhwUUjkjUMjWA6OocxYXt3Iw//CkY6SUHjj+ +LO7u3cHBbV9uGOQ06kLCq6nfO/dxMEfg+y1lPV2YzT62NiKGg5bfvy3OFNCB +N6yLnXkFHNxeG/DTo00LdoflXLe9z0HBwyezIwu1YPr+A7+RYg4OBN3waTij +BeIqvTOGDzn4NJbq8WqdFtgLUSmPqzkYb3oZ+upXQmVXnm9nNzneqcYo53pN +sBMr1Q3v5WD3AcktP3M0odemeVq2j4P7/wieIeI1YbL8e+L2AQ4K73nIKLLR +BN0sg8JvwxyMDOph7nmhAZVvzMOTRjlYUzYoaVKkAXaSLqD/k4MPRF1/qado +wK6TYe2hUxws/mcnF75JAyarE9JlZjk406q4rNtUA078Sd1Z/oeDS3vm/Nzl +NWC5cb7Otn9k/w37pubn1CFjf/nU/DwHJ+KVL7f0q8P/AFivPSc= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08127144026352488}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08127144026352488}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943515633377533`*^9, 3.99435398599858*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"4f8ee40d-17c3-485c-a575-c069de332abf"] +}, Open ]], Cell[CellGroupData[{ @@ -7878,14 +8143,13 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918492800964603`*^9},ExpressionUUID->"9051a5e3-bb9f-d941-bcca-\ -598d0b6835be"], + CellChangeTimes->{3.9918492800964603`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[BoxData["9.33220071900516`"], "Output", - CellChangeTimes->{3.991334803166374*^9}, - CellLabel-> - "Out[254]=",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[BoxData["8.962686601144428`"], "Output", + CellChangeTimes->{3.991334803166374*^9, 3.994351563388135*^9, + 3.994353986050827*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"96844b65-5272-4538-a6e4-227dca0b717c"] }, Open ]], Cell[CellGroupData[{ @@ -7941,191 +8205,204 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492818821335`*^9},ExpressionUUID->"65a995ff-ff3d-634e-9bad-\ -4a8a16073236"], + CellChangeTimes->{3.9918492818821335`*^9}, + CellLabel->"In[97]:=",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.015132160320536`*^-259\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 255, 233, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133480336051*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.88797445346101`*^-253\\\", \ +\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 97, 13, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994351563523088*^9, + 3.994353986180327*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], +In[97]:=",ExpressionUUID->"611564a3-2462-40e2-99ed-7904e5903f74"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.802481548114291`*^-269\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 234, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803369583*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.850632866592188`*^-262\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 97, 14, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994351563523088*^9, + 3.994353986188118*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], +In[97]:=",ExpressionUUID->"ba8999a5-6ee4-4940-ab41-c2bbe2a7b055"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.803946040382125`*^-279\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 235, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803378134*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.813448165200161`*^-271\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 97, 15, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994351563523088*^9, + 3.994353986195902*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], +In[97]:=",ExpressionUUID->"dea878ae-78c4-4fad-822d-9f150de67299"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 255, 236, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803386196*^9}, +during this calculation.\"", 2, 97, 16, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994351563523088*^9, + 3.994353986204808*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], +In[97]:=",ExpressionUUID->"1651067b-03fe-4862-a0ff-11a14e0407d1"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc8lf8XAHBpKEr2uO61Kbt0Xe51b+cYKSMqIU2RaImMjMjISpmJNIyv +7Mz7KFKJ0pLKKJTKKhXKLpLf8/vreb3/eM7n85xzPuf5KDif3OHKy8PDE7CI +h+f/z+mPzx4px+VuLKbxFnMJ843tN6QCjDrD4fBWl/xTqWsAxV85S3Umg4lq +kKthqj74bSt6t7gzB9RGx+1EUjeD8Khk8p93lbDbyEvs6SUH+FRnfXLyXQME +sjREm1PcwEz5e8/Yu1aoyV4YG084DX/e6af+etcHn0wsfmSGRkOjSX7um5wJ ++J7C1/mPkQ7UTzVfnDXnQeWqqtHL4mwQO36giM9kMZ7uaHjN9yQPkteb3bW2 +W45tf02bMt8UQ1f6uvoxoVVYN+Kalv27DDLailf7qaxCw9TUqZIl5bBbcM2B +WeYqPHdULXDxqnL4EEH7x+uyCsug5HwmrRw+e/CzxYhV+Pi/5gspG8thyHTg +NsNREC+2vOQcOVsOv3+llQVlr8aq55Wm9/6WQ1zu2Ve80sIolxwdmjNYARb0 +IyLiSsLYekpe7fBwBSx/tMNujZYwnpUKmlCaqIBz/SrvLY2EsUzObegiTyWc +UWz+cumIMBbIH14nI1MJHllS/1RrhZF54pUWxaYStl+r0LTcI4KVZ19o5FRW +gpDm1ZP7XEVw+7Kcjvw7ldBy91zlyZMimFDTEZJ/vxIs3jsYXIoQQZpgz4tL +zyvBmPLPpKdYBGf+vjNY01cJ9HSLPSf/iqBtmUWJulAVSF7qj025LoqOjtmr +8t2qQEqDOPc7TxTdYxKaEo9XAaUh6uy+clFUZF7d4OtVBbK/1HzXNIqiZEjY +Wu2gKlCx8nS6OySKr39aeDvFV8GGJfOM/g1imCqVZdxUVQU2PhIDus/FMFQg +bvzSbBVsExj6mNYmhvIlMtfb/1XBjpyarr8fxLBLdm5CcDEX7F/vfdX0Uwzz +jpjneQtwYZ/mf7W7xcVx1ZC0zLwMF44N6CSFO4njfd9WthCbC9E7zTe2Totj +447wFH1/LlC4LRTeRRLocOjFV+kzXCgV3TmzXkACPwTvnp06y4W3rfvLk+Qk +cHmtxZ6r0VxQ3u6juH2LBA5ekBe7epkLDVszl72+IoHGCZqFHlXkfm4p9y/8 +J4FhxqxlI9Vc+L6y6IFOqQTOJk6outZyQbiZ65/QIIEvE7UI44dccLJ4/t36 +hwSGDzwVrmrhwrzZVMtLtiSeV2rlHBniQmJeYPG8mSQad/YLnftBrr+MJ0Zr +uyQqqAqXp49yweoxv9FFV0l8vN7ErmySCxkm8lVW8ZIYT7PcmsxDgAFapr34 +JInpnIcJOpIEeDOzDzwLl8J93dyOZiDAIktw0vKCFH6YnhKdMyJAke9MTEuq +FL4dK+RRNiXgdbt9RVuBFG5/mz3kuoUAbc+Viz+2SGGH5IsVRdsIGMo7nTdO +kcZ1R2/b0J0IeLBqkOWrLI21Iv+6VjkTcNlnx6sZLWls8YmR73MhYJOx1u+/ +KI3HrFW+BLoRkNPTZ87nJo3FB6geJzwI2CtmPSJTJY03bS9ZOQQRsCHobtiN +Ommcc/Ja3XOGAP6+tRIKTdL43cHrxr4QAmrKFoNqlzR2r5BSsQkjQMKyJnHd +gjQmbleYmIgiYKRCVaVqOQXZyWv1tsUQ8EjqUo2eCAWNl/Ba5ceS+fji0cdS +oWDf9oK/my6Q3xumTN9kScGJsfTYTUkE5A8lPX2yk4I2XrNJ/skEhNgs7LXY +T0HJlbv981II0KJ1R9p4UdCQt6V/PJWA83cS3jmmUVDZYaWDdQYBpj9nAz36 +KZjgqflQKIeAgC2X1B8OU3ATS7VzhHRptla36DQFM3w2izb9R4DUTidmzXIZ +ch4NzLrdJGD4zuOZxdoy6MmjUelVQICCyIF8e30ZtDs7sXJtIQH2x37bF6IM +3jnSmdpFup6mUW1tK4P/rgrraxcTkBKe6HPFXwaXWO18f/0WAU/fqykPh8ng +RSe+F1qlBPylN7ZtjJNBDqE3cYf04a9TugPXZTDYa8d4fRkBVzGhj5Evg1eW +D7/glJP5ubI2ObZcBkPZDv0EaZbVnjHtRjK+L/+btAoCTt6czAprlsGvnvxF +iyoJyP13cVt7hwy2Tlk2HSYtWFFfFjAkgymjYi2KVQSY8O8+0Dwmg/tnneoC +SPu7TAjKzclgTN3piRek+8RVPR6toqJYY6aRM5cAyZMPaJKSVIyVCt+TR9rq +6a6XR+SpyGf6pnGQdJjC+Jk6NSqKFv0JkicIqA6M01y9gYpLDI5E2pP+0ab8 +4SCbiqPOCb3RpOW17sdxN1HxkGpPEpe0XZSDIZ8NFX/zPk77QPr8p1/fHXdR +cft87eQC6QcG5zNKDlLxxjV6kWw1AZNJShYLR6l4/ltBjQFptR91f7b7UPHp +8URla9L7Te0Lc4OpuKDlOryfdMr1n7tmoqh4sDJH5Bjpp9Mxyy0Sqeg+9zj9 +FOl5G8U7165QsTpya6gvad3Cu24/c6h4ZXPNc2/Sbrx2ksYlVBwvOx9wgvS1 +PaNNlwgqvsw1jXcm/YYb7ff1PhX1wo/x25JeJqigynpKxSapyJ8bSRu61XZc +eEPF9BIpUCXtWW8b+ambis8nSmeXk74pPULXHaCikXir0lfye7tPRQ2cG6Gi +b/6qunrSq5vlLr2bpuLSstFHqaRNVWpM1HloGHd9MR4mHRCyY+LMChpu2PZB +W5d06bsfOa9EaBgtyJ/yh6xP/7rIHYpUGsrHynnUkZY6L8vrq0JD3c7yh4H/ +rx97+0GKAQ0/2t7o/EbWf8v+G+P6xjR0eDB8K4W0YOiPCDsrGs7NfdAzIH2t +MTIv0YmGMh1drl5kf7kMtuqXHqXhn/xlIstIq/PJP3vhQ0MeQjwglezPOxa1 +P5bF0nA0Xyc0l+zfs8f5gpVTaJj56oiyMmmz+J2CxtdpSKkYiLtB9n/7m9F1 +wRU05I1bfSuCPB+/din5TXTR8Fv5I+/VJQTcDvTkEx6gYXZd+AlX8ryFXLuX +rj1Kw9tPLhtWFxGw8rPD3SO8snjs0Yl9W8jzucbtAs9ndVk065uc1M4jYDSm +K2meLouNfd4te8jzzi1SVZIBWbwY8fpiRC4BxqP1m+xtZTEylu9JIzkv9vtO +nW8OksWUcEFnvkwCVNKMqd8jZfGlkVChwI3/z4uEW3yJsrgrefAr/3UCAv+q +vTbOlcWEeyr2s+Q8So3YL17TLIsla8X0rl8moDnpSeZNmhzarLrDO0XOv5Qq +sfWNa+RQ9pfP+8I4AnZ3HGz4vF4Okz5pvHE8T857qb8DMmZyOHN6Oa04moDF +WevUkz3kcOykXYBoODkPSq9wQx7IIcN66MC8L9kf71rmR5/K4dkr6zJDfQiw +5lmy+UCrHPLFtdxfOEXWa4dHFwzKYdOUYP7YSTL/QQpnQ5fKo8DbKdvcI2R/ +yk3/Z6Qhj/x79g+a7SXnt1vmSKOfPLJnFywSNhJg/pcpciZIHiXVPsUmswlo +SWxn0EPl8Vaq5I8kFgFdNStCc2PlsdBGlBbJIPMt4CMSeU0e51o+B3K0yf4r +36Jv1iCPKS4/52eoBBz/PRb6dJUCqh8x3frfDBdYXoclvogoYPnEfelZ8v+6 +/Ht38WIpBVwRaXPLapwLN983vt2oqIDWZUv0Boe58PF+qibBUMCT9PUSA71c +sIlkdmYfUECfGtkbMi+4oCsSphNUoYAnqi8ORmZw4Y+G0EctO0Us+tPz5rsW +F6avU8I27FbEd3lDunvUuTC5WkWZeUARE2cCGU9VuTA6wTxqekQRCwIT1qXL +caHvrsv07mBF9LKbAyFhLjy3vC0Yc1MRbSekzF0mqiDj2H7om1LEjbZd8wVE +FbCLS7IuX1ZCXTHbo7brq2BMxMLJvkEZU8MoKmpylTBwwcn+FJ8q3h7ua8t/ +Ww7mP0+bDzLWoFrk6Z9LFcpg2GW5N/fsWowMXHZlbnMJeT+X5I1uUMNzvcZ+ +qv6FIPJSNb78pzre+/qYbdafB9SYsm0MhiZushnNcdDJhXQNppComxb2ait6 +Tz/LhucUI72JJG28HSSYvFQzE1jUhkSdtzp48Hqs2tWGDBBcnONzMHwdfulR +jZvjTQPZMDm2o+p6bKLUPYnYmwIrVPZW73iyHovU6kMt1yeCNke67PQ+Xdzf +3Zs8vS4OTn0UabTg2YB+da823bOKgp8TF+zM0zfgozZmucfBcNis05RhrkVH +WvXWnBKdENi1bMvO1zp0DN+QK+smHgJHe56tctClo94pI2P6XDDEx70MPaRP +x0ch6/YuexIMb7+2Hz5rREfePV8GYg4Ew6Gsfl3Cjo6v4k+mL6ScgXDhRS/k +Q+hYN3561Jc/CO5PGM7NtNDx2MZvflc0/CG7+baz7Rs65jiNqOlI+sO5mxue +l7bRUUH89ro2Xn8wd9C44tpJx+Ur6TSz7tPQXkvRb+ulY0GocvHb2NPwPezP +qdJJOu6TjnG79sMPJIRufz9E0cN9fstGY2p8wUNTt/uNqx7eFLvquS/YG3xn +KLMH3PXwYX6CQ99RbzjTsJgyelQPPy3rX+q3yxvidnU48nvqoaYWkfpsgzcU +nPPvMg7UQ13u24vyP05B34f7nVXxeugTXmkatfcU2F+0fJd6Ww8/Bz/cNWnu +BZzRQ+2OKxgIjHtv/2Z4gMTdzTl1Agz8dE/o9ecQDxiNVveUE2RgSOu5nm5n +D7ih8EtgUISBGm/DFoQ0PODfziATTyoDPzxK/BFRdwIe3E2qjNJh4PkZvlf+ +/cfBKPZ+YpUdA18x9H8aGx2DTcpSW1flMPDs1qd50Ux34I48VjiUy8C0w9sC +5xXdQfm293RtHgPHlVinIle6wxKLV5nuxQz065vLevHJDRpORo03chm4+nLe +bZ1oN9h4dzIt8AkDxT7NNVh1HQbGjjd9X4cZuExqav78eVdYG3rev0FfH8Me +yN0ulnWBOsObS61Y+vhamcZ4zO8C22YeJHew9VH1SWDLr2ln8PeYKhky0scT +ovPiIa+c4elep15BK300E+C/cDLMGdyZDIs9TvpY8Mc2JmfoIBSO98pMxujj +KRGp0pFGJ1B3ZT5Q6dbHR/dyegrt90GCovVsxAd9TO8o5GUy98HkJ2e9vo/6 +SCkwM+iT2Qf3d18ovtGvj6nLO2PCe/fCjm2f0iRH9LH35+Wi3yf2QoBhpOcK +HgNMEzY5WhS3B54Kv1EYUTHAkOLh3OwuR9B6NbjXcq0BFuzkJlo/cITkC7Np +heoGKFnJYYvedIS9fMqCh3UMsN2FN67f0xF+/vWb/WhggEbh7mI3VjiCxBC1 +7bWlAZakvtt/DHaB6333c1wvA3y5vId/5K49jJ74fnqTDxl/ob8nIMce/GnH +j731M0BtoQk++Vh7OH/m5I7fQQbkfUdn5R17eyhn+cmzo8j3qUqRYhN28Lc6 +oq4xwwCPsR/3H19nB8llNyZbGw3QxHDXDoF7tkA9ID/k0mSAhMPR1ow8W7gp +mPN+8qkBMrtcKEaJtnDnxM0GiRYD7BaIrHrjYgs9GiWJuzsNcFoj4SvPSltY +W1Cj2TdsgDY/H7hHOe2AB1nth8bEmVidlTZRIL0dPlspHPCTYmJ4Tgl7y7Lt +wPPnhOMchYn3XHvpc+PbwHg7n/VSeSaODxuNXm3eBk2LWPrS6kzMvBNe0BS6 +DZqdM1cYbWSieUbp7KEuG+hWPlqaeJiJW/ndRT/nboW519UF4keYOPKF2fYs +fCtQgxf/l3GMiXVY3vHWaSvs67iWluvJxPvuX5R307bC58hXoXcCmbiB3hjG +m24FX7/QbT/HM9F7+4DqgxRLmCxYmNG5zUQ3tSIJsVxz+GJvlhVbQ653S9tA +M8YcOpdc3NJ/l9xf7+bGA8fN4a4T5crleiamhXy6I6VnDuFSeqz5Z0ysKspP +e/VkCwjFHD3z/AMTCwe0+Djjm0HTrYPHlZeFado9f/x3m4GsOLXw/hIWispl +cFqNzECo0Xm7FB8LR/7V00zVzGBC9lf2CwEWUqPy9nn93gS1b/lNdMVZeP/X +heifaZtgixlGLqxhoY91tIj7e1NwUSlekbGVhXnGvaE13iYQ+Hj/UdVtLHzm +b/dDba8JJLqKvKjcwcK/Bg83ck1NoO5mwIUXDixULStgS0iYgJjqltXzB1k4 +4yH/cWWtMTSpDoo5+bGwKOSxcdkyY1BfKyevmsnC9K+B7+UrEfBpa2hlNgv1 +NjX5Zl5HsHeP6t2Yy0LL3rF/9FiEiIKRHIdCFr5anRyR64TwYW2dSmwVC+OL +k3qThRDi1Rw1hp+Q+VCli2z4thHG1FMYlb9YmFAwPnbiChs6m3GT6AS5XsIl +SW1/NtR7jNr6TLHw6MPgWGEHNsRXmnsxZsn99Ye+NBJngzqLp6R2sSGOeZ0y +NE0xBGfzEwqNEob4R/qJJjeVBe1um1e2sw3xV6VT7MEqA7i7YoqiB4b49fnq +91aXDSCnOEftspEhjjfYnnMIMADPn/Nmu8wM8erDCNfnYACrTnPDPtgYYku7 +tpxSiz6YRSnMDDgb4nWb2v+ifjHgTu5c71SMIa7o0TtmZakHDBOfGYs4Q6we +nKg/oqsHRO/wyqyLhphU6NOULa0HlbIf9S2SDXFvy+XAg0N0KEmvv3jjqiFe +WfK6nhpNh6wLkczNpYaoPivZfvzZBoj1WZ2U3kbux0OReOKkC8tFY/JGOgzR +jsdihYClLkRV8NQZdxriTUYa72E9XTg3OvZl+IMhxs4ExDjz60KIezvb6Ish +6nT5OnkT6+HU3itD334bYrSArf/n1etht6kSGsqy0UO49dbVIh2Yb18u2CjP +xiu3hN+HhOlAluvoewslNtox51gpu3TgS1TN6d1r2RhiS3lgzacDp57ZlAXo +svHQgJO0gJs2nLc+I3vHjI0LDnN3j+loQe2ujr/0k2z8XiJadqxPHfZ9q31e +50XGS/ffIPJAHXgCs9JNfdgY/2Uwv/+qOphdPUbfGcBGfb7s3GX26tDas+i4 +dwQblyq8ebO5WQ2+O2u/r0hjo1rm9K34+rUgcyK6RruejT17ZIYnm1QhfuGw +XlwDG/2EHp7NL1IF3mSziq+P2Pii4lt2YLwqfK9eWpj1jI3bnijxh9urQi3P +uXSRNjb+rb58V3hIBXZfCj09PcjGXapOSZLCKpB+N0DvvgAH9VLscrsDlGCl +tWMFRZCDt1NTkw4cVILQzwZap4U4+MA7eMUicyVwX/pbeZ04B91SD8lfkVIC +fRs/sRxZDrKOJOVQahThbd+picj1HNQpjxc1X1AAcf7jFVsdOFjK7pE6nykP +uSbBgb8cOXip+sPGyWh50A2ON0nZy8GgxKfBwZ7yYP2rvKPzIAefz/BVDBvJ +Q9TbqT8uxznIFThd790sB79zzhoHhnHwyWTx5Ed3Weg2TGnLK+bgmLqnf1az +DLj75l4zL+UganzjKc+VgelSwnW4nIOVix1mJs/IgIhi58z6ag6++96/VlZb +BiyX06j36jno/2k29ksyBera8w61dXDQu0UlQvKwNFgI3tHy6yTjbS/+fMBI +Gjo3P5uWes9BzX98t7uo0jBZ+yNm/2cOWt9w7HZqlwKt7HW3vn0n48sF7a/e +JAV13UZ+F0Y4mPXxX3+EohRYiNmCzi8OroyCRWELknA42veNzxQHqUpbJVfU +SsJkfVSG5G8Odjp8zUhJk4Tw2TSX2lkO/gvqfGHlKwlC9ELNffMctE9d60m3 +lYQbJ2qnFhY4+LJZztpivST8D5Gdqdw= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8139,150 +8416,156 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJwV1nc8lf8XAHBpKEr2uO61Kbt0Xe51b+cYKSMqIU2RaImMjMjISpmJNIyv +7Mz7KFKJ0pLKKJTKKhXKLpLf8/vreb3/eM7n85xzPuf5KDif3OHKy8PDE7CI +h+f/z+mPzx4px+VuLKbxFnMJ843tN6QCjDrD4fBWl/xTqWsAxV85S3Umg4lq +kKthqj74bSt6t7gzB9RGx+1EUjeD8Khk8p93lbDbyEvs6SUH+FRnfXLyXQME +sjREm1PcwEz5e8/Yu1aoyV4YG084DX/e6af+etcHn0wsfmSGRkOjSX7um5wJ ++J7C1/mPkQ7UTzVfnDXnQeWqqtHL4mwQO36giM9kMZ7uaHjN9yQPkteb3bW2 +W45tf02bMt8UQ1f6uvoxoVVYN+Kalv27DDLailf7qaxCw9TUqZIl5bBbcM2B +WeYqPHdULXDxqnL4EEH7x+uyCsug5HwmrRw+e/CzxYhV+Pi/5gspG8thyHTg +NsNREC+2vOQcOVsOv3+llQVlr8aq55Wm9/6WQ1zu2Ve80sIolxwdmjNYARb0 +IyLiSsLYekpe7fBwBSx/tMNujZYwnpUKmlCaqIBz/SrvLY2EsUzObegiTyWc +UWz+cumIMBbIH14nI1MJHllS/1RrhZF54pUWxaYStl+r0LTcI4KVZ19o5FRW +gpDm1ZP7XEVw+7Kcjvw7ldBy91zlyZMimFDTEZJ/vxIs3jsYXIoQQZpgz4tL +zyvBmPLPpKdYBGf+vjNY01cJ9HSLPSf/iqBtmUWJulAVSF7qj025LoqOjtmr +8t2qQEqDOPc7TxTdYxKaEo9XAaUh6uy+clFUZF7d4OtVBbK/1HzXNIqiZEjY +Wu2gKlCx8nS6OySKr39aeDvFV8GGJfOM/g1imCqVZdxUVQU2PhIDus/FMFQg +bvzSbBVsExj6mNYmhvIlMtfb/1XBjpyarr8fxLBLdm5CcDEX7F/vfdX0Uwzz +jpjneQtwYZ/mf7W7xcVx1ZC0zLwMF44N6CSFO4njfd9WthCbC9E7zTe2Totj +447wFH1/LlC4LRTeRRLocOjFV+kzXCgV3TmzXkACPwTvnp06y4W3rfvLk+Qk +cHmtxZ6r0VxQ3u6juH2LBA5ekBe7epkLDVszl72+IoHGCZqFHlXkfm4p9y/8 +J4FhxqxlI9Vc+L6y6IFOqQTOJk6outZyQbiZ65/QIIEvE7UI44dccLJ4/t36 +hwSGDzwVrmrhwrzZVMtLtiSeV2rlHBniQmJeYPG8mSQad/YLnftBrr+MJ0Zr +uyQqqAqXp49yweoxv9FFV0l8vN7ErmySCxkm8lVW8ZIYT7PcmsxDgAFapr34 +JInpnIcJOpIEeDOzDzwLl8J93dyOZiDAIktw0vKCFH6YnhKdMyJAke9MTEuq +FL4dK+RRNiXgdbt9RVuBFG5/mz3kuoUAbc+Viz+2SGGH5IsVRdsIGMo7nTdO +kcZ1R2/b0J0IeLBqkOWrLI21Iv+6VjkTcNlnx6sZLWls8YmR73MhYJOx1u+/ +KI3HrFW+BLoRkNPTZ87nJo3FB6geJzwI2CtmPSJTJY03bS9ZOQQRsCHobtiN +Ommcc/Ja3XOGAP6+tRIKTdL43cHrxr4QAmrKFoNqlzR2r5BSsQkjQMKyJnHd +gjQmbleYmIgiYKRCVaVqOQXZyWv1tsUQ8EjqUo2eCAWNl/Ba5ceS+fji0cdS +oWDf9oK/my6Q3xumTN9kScGJsfTYTUkE5A8lPX2yk4I2XrNJ/skEhNgs7LXY +T0HJlbv981II0KJ1R9p4UdCQt6V/PJWA83cS3jmmUVDZYaWDdQYBpj9nAz36 +KZjgqflQKIeAgC2X1B8OU3ATS7VzhHRptla36DQFM3w2izb9R4DUTidmzXIZ +ch4NzLrdJGD4zuOZxdoy6MmjUelVQICCyIF8e30ZtDs7sXJtIQH2x37bF6IM +3jnSmdpFup6mUW1tK4P/rgrraxcTkBKe6HPFXwaXWO18f/0WAU/fqykPh8ng +RSe+F1qlBPylN7ZtjJNBDqE3cYf04a9TugPXZTDYa8d4fRkBVzGhj5Evg1eW +D7/glJP5ubI2ObZcBkPZDv0EaZbVnjHtRjK+L/+btAoCTt6czAprlsGvnvxF +iyoJyP13cVt7hwy2Tlk2HSYtWFFfFjAkgymjYi2KVQSY8O8+0Dwmg/tnneoC +SPu7TAjKzclgTN3piRek+8RVPR6toqJYY6aRM5cAyZMPaJKSVIyVCt+TR9rq +6a6XR+SpyGf6pnGQdJjC+Jk6NSqKFv0JkicIqA6M01y9gYpLDI5E2pP+0ab8 +4SCbiqPOCb3RpOW17sdxN1HxkGpPEpe0XZSDIZ8NFX/zPk77QPr8p1/fHXdR +cft87eQC6QcG5zNKDlLxxjV6kWw1AZNJShYLR6l4/ltBjQFptR91f7b7UPHp +8URla9L7Te0Lc4OpuKDlOryfdMr1n7tmoqh4sDJH5Bjpp9Mxyy0Sqeg+9zj9 +FOl5G8U7165QsTpya6gvad3Cu24/c6h4ZXPNc2/Sbrx2ksYlVBwvOx9wgvS1 +PaNNlwgqvsw1jXcm/YYb7ff1PhX1wo/x25JeJqigynpKxSapyJ8bSRu61XZc +eEPF9BIpUCXtWW8b+ambis8nSmeXk74pPULXHaCikXir0lfye7tPRQ2cG6Gi +b/6qunrSq5vlLr2bpuLSstFHqaRNVWpM1HloGHd9MR4mHRCyY+LMChpu2PZB +W5d06bsfOa9EaBgtyJ/yh6xP/7rIHYpUGsrHynnUkZY6L8vrq0JD3c7yh4H/ +rx97+0GKAQ0/2t7o/EbWf8v+G+P6xjR0eDB8K4W0YOiPCDsrGs7NfdAzIH2t +MTIv0YmGMh1drl5kf7kMtuqXHqXhn/xlIstIq/PJP3vhQ0MeQjwglezPOxa1 +P5bF0nA0Xyc0l+zfs8f5gpVTaJj56oiyMmmz+J2CxtdpSKkYiLtB9n/7m9F1 +wRU05I1bfSuCPB+/din5TXTR8Fv5I+/VJQTcDvTkEx6gYXZd+AlX8ryFXLuX +rj1Kw9tPLhtWFxGw8rPD3SO8snjs0Yl9W8jzucbtAs9ndVk065uc1M4jYDSm +K2meLouNfd4te8jzzi1SVZIBWbwY8fpiRC4BxqP1m+xtZTEylu9JIzkv9vtO +nW8OksWUcEFnvkwCVNKMqd8jZfGlkVChwI3/z4uEW3yJsrgrefAr/3UCAv+q +vTbOlcWEeyr2s+Q8So3YL17TLIsla8X0rl8moDnpSeZNmhzarLrDO0XOv5Qq +sfWNa+RQ9pfP+8I4AnZ3HGz4vF4Okz5pvHE8T857qb8DMmZyOHN6Oa04moDF +WevUkz3kcOykXYBoODkPSq9wQx7IIcN66MC8L9kf71rmR5/K4dkr6zJDfQiw +5lmy+UCrHPLFtdxfOEXWa4dHFwzKYdOUYP7YSTL/QQpnQ5fKo8DbKdvcI2R/ +yk3/Z6Qhj/x79g+a7SXnt1vmSKOfPLJnFywSNhJg/pcpciZIHiXVPsUmswlo +SWxn0EPl8Vaq5I8kFgFdNStCc2PlsdBGlBbJIPMt4CMSeU0e51o+B3K0yf4r +36Jv1iCPKS4/52eoBBz/PRb6dJUCqh8x3frfDBdYXoclvogoYPnEfelZ8v+6 +/Ht38WIpBVwRaXPLapwLN983vt2oqIDWZUv0Boe58PF+qibBUMCT9PUSA71c +sIlkdmYfUECfGtkbMi+4oCsSphNUoYAnqi8ORmZw4Y+G0EctO0Us+tPz5rsW +F6avU8I27FbEd3lDunvUuTC5WkWZeUARE2cCGU9VuTA6wTxqekQRCwIT1qXL +caHvrsv07mBF9LKbAyFhLjy3vC0Yc1MRbSekzF0mqiDj2H7om1LEjbZd8wVE +FbCLS7IuX1ZCXTHbo7brq2BMxMLJvkEZU8MoKmpylTBwwcn+FJ8q3h7ua8t/ +Ww7mP0+bDzLWoFrk6Z9LFcpg2GW5N/fsWowMXHZlbnMJeT+X5I1uUMNzvcZ+ +qv6FIPJSNb78pzre+/qYbdafB9SYsm0MhiZushnNcdDJhXQNppComxb2ait6 +Tz/LhucUI72JJG28HSSYvFQzE1jUhkSdtzp48Hqs2tWGDBBcnONzMHwdfulR +jZvjTQPZMDm2o+p6bKLUPYnYmwIrVPZW73iyHovU6kMt1yeCNke67PQ+Xdzf +3Zs8vS4OTn0UabTg2YB+da823bOKgp8TF+zM0zfgozZmucfBcNis05RhrkVH +WvXWnBKdENi1bMvO1zp0DN+QK+smHgJHe56tctClo94pI2P6XDDEx70MPaRP +x0ch6/YuexIMb7+2Hz5rREfePV8GYg4Ew6Gsfl3Cjo6v4k+mL6ScgXDhRS/k +Q+hYN3561Jc/CO5PGM7NtNDx2MZvflc0/CG7+baz7Rs65jiNqOlI+sO5mxue +l7bRUUH89ro2Xn8wd9C44tpJx+Ur6TSz7tPQXkvRb+ulY0GocvHb2NPwPezP +qdJJOu6TjnG79sMPJIRufz9E0cN9fstGY2p8wUNTt/uNqx7eFLvquS/YG3xn +KLMH3PXwYX6CQ99RbzjTsJgyelQPPy3rX+q3yxvidnU48nvqoaYWkfpsgzcU +nPPvMg7UQ13u24vyP05B34f7nVXxeugTXmkatfcU2F+0fJd6Ww8/Bz/cNWnu +BZzRQ+2OKxgIjHtv/2Z4gMTdzTl1Agz8dE/o9ecQDxiNVveUE2RgSOu5nm5n +D7ih8EtgUISBGm/DFoQ0PODfziATTyoDPzxK/BFRdwIe3E2qjNJh4PkZvlf+ +/cfBKPZ+YpUdA18x9H8aGx2DTcpSW1flMPDs1qd50Ux34I48VjiUy8C0w9sC +5xXdQfm293RtHgPHlVinIle6wxKLV5nuxQz065vLevHJDRpORo03chm4+nLe +bZ1oN9h4dzIt8AkDxT7NNVh1HQbGjjd9X4cZuExqav78eVdYG3rev0FfH8Me +yN0ulnWBOsObS61Y+vhamcZ4zO8C22YeJHew9VH1SWDLr2ln8PeYKhky0scT +ovPiIa+c4elep15BK300E+C/cDLMGdyZDIs9TvpY8Mc2JmfoIBSO98pMxujj +KRGp0pFGJ1B3ZT5Q6dbHR/dyegrt90GCovVsxAd9TO8o5GUy98HkJ2e9vo/6 +SCkwM+iT2Qf3d18ovtGvj6nLO2PCe/fCjm2f0iRH9LH35+Wi3yf2QoBhpOcK +HgNMEzY5WhS3B54Kv1EYUTHAkOLh3OwuR9B6NbjXcq0BFuzkJlo/cITkC7Np +heoGKFnJYYvedIS9fMqCh3UMsN2FN67f0xF+/vWb/WhggEbh7mI3VjiCxBC1 +7bWlAZakvtt/DHaB6333c1wvA3y5vId/5K49jJ74fnqTDxl/ob8nIMce/GnH +j731M0BtoQk++Vh7OH/m5I7fQQbkfUdn5R17eyhn+cmzo8j3qUqRYhN28Lc6 +oq4xwwCPsR/3H19nB8llNyZbGw3QxHDXDoF7tkA9ID/k0mSAhMPR1ow8W7gp +mPN+8qkBMrtcKEaJtnDnxM0GiRYD7BaIrHrjYgs9GiWJuzsNcFoj4SvPSltY +W1Cj2TdsgDY/H7hHOe2AB1nth8bEmVidlTZRIL0dPlspHPCTYmJ4Tgl7y7Lt +wPPnhOMchYn3XHvpc+PbwHg7n/VSeSaODxuNXm3eBk2LWPrS6kzMvBNe0BS6 +DZqdM1cYbWSieUbp7KEuG+hWPlqaeJiJW/ndRT/nboW519UF4keYOPKF2fYs +fCtQgxf/l3GMiXVY3vHWaSvs67iWluvJxPvuX5R307bC58hXoXcCmbiB3hjG +m24FX7/QbT/HM9F7+4DqgxRLmCxYmNG5zUQ3tSIJsVxz+GJvlhVbQ653S9tA +M8YcOpdc3NJ/l9xf7+bGA8fN4a4T5crleiamhXy6I6VnDuFSeqz5Z0ysKspP +e/VkCwjFHD3z/AMTCwe0+Djjm0HTrYPHlZeFado9f/x3m4GsOLXw/hIWispl +cFqNzECo0Xm7FB8LR/7V00zVzGBC9lf2CwEWUqPy9nn93gS1b/lNdMVZeP/X +heifaZtgixlGLqxhoY91tIj7e1NwUSlekbGVhXnGvaE13iYQ+Hj/UdVtLHzm +b/dDba8JJLqKvKjcwcK/Bg83ck1NoO5mwIUXDixULStgS0iYgJjqltXzB1k4 +4yH/cWWtMTSpDoo5+bGwKOSxcdkyY1BfKyevmsnC9K+B7+UrEfBpa2hlNgv1 +NjX5Zl5HsHeP6t2Yy0LL3rF/9FiEiIKRHIdCFr5anRyR64TwYW2dSmwVC+OL +k3qThRDi1Rw1hp+Q+VCli2z4thHG1FMYlb9YmFAwPnbiChs6m3GT6AS5XsIl +SW1/NtR7jNr6TLHw6MPgWGEHNsRXmnsxZsn99Ye+NBJngzqLp6R2sSGOeZ0y +NE0xBGfzEwqNEob4R/qJJjeVBe1um1e2sw3xV6VT7MEqA7i7YoqiB4b49fnq +91aXDSCnOEftspEhjjfYnnMIMADPn/Nmu8wM8erDCNfnYACrTnPDPtgYYku7 +tpxSiz6YRSnMDDgb4nWb2v+ifjHgTu5c71SMIa7o0TtmZakHDBOfGYs4Q6we +nKg/oqsHRO/wyqyLhphU6NOULa0HlbIf9S2SDXFvy+XAg0N0KEmvv3jjqiFe +WfK6nhpNh6wLkczNpYaoPivZfvzZBoj1WZ2U3kbux0OReOKkC8tFY/JGOgzR +jsdihYClLkRV8NQZdxriTUYa72E9XTg3OvZl+IMhxs4ExDjz60KIezvb6Ish +6nT5OnkT6+HU3itD334bYrSArf/n1etht6kSGsqy0UO49dbVIh2Yb18u2CjP +xiu3hN+HhOlAluvoewslNtox51gpu3TgS1TN6d1r2RhiS3lgzacDp57ZlAXo +svHQgJO0gJs2nLc+I3vHjI0LDnN3j+loQe2ujr/0k2z8XiJadqxPHfZ9q31e +50XGS/ffIPJAHXgCs9JNfdgY/2Uwv/+qOphdPUbfGcBGfb7s3GX26tDas+i4 +dwQblyq8ebO5WQ2+O2u/r0hjo1rm9K34+rUgcyK6RruejT17ZIYnm1QhfuGw +XlwDG/2EHp7NL1IF3mSziq+P2Pii4lt2YLwqfK9eWpj1jI3bnijxh9urQi3P +uXSRNjb+rb58V3hIBXZfCj09PcjGXapOSZLCKpB+N0DvvgAH9VLscrsDlGCl +tWMFRZCDt1NTkw4cVILQzwZap4U4+MA7eMUicyVwX/pbeZ04B91SD8lfkVIC +fRs/sRxZDrKOJOVQahThbd+picj1HNQpjxc1X1AAcf7jFVsdOFjK7pE6nykP +uSbBgb8cOXip+sPGyWh50A2ON0nZy8GgxKfBwZ7yYP2rvKPzIAefz/BVDBvJ +Q9TbqT8uxznIFThd790sB79zzhoHhnHwyWTx5Ed3Weg2TGnLK+bgmLqnf1az +DLj75l4zL+UganzjKc+VgelSwnW4nIOVix1mJs/IgIhi58z6ag6++96/VlZb +BiyX06j36jno/2k29ksyBera8w61dXDQu0UlQvKwNFgI3tHy6yTjbS/+fMBI +Gjo3P5uWes9BzX98t7uo0jBZ+yNm/2cOWt9w7HZqlwKt7HW3vn0n48sF7a/e +JAV13UZ+F0Y4mPXxX3+EohRYiNmCzi8OroyCRWELknA42veNzxQHqUpbJVfU +SsJkfVSG5G8Odjp8zUhJk4Tw2TSX2lkO/gvqfGHlKwlC9ELNffMctE9d60m3 +lYQbJ2qnFhY4+LJZztpivST8D5Gdqdw= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08481535322564224}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8294,19 +8577,19 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08481535322564224}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8320,149 +8603,155 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJwV1nc8lf8XAHBpKEr2uO61Kbt0Xe51b+cYKSMqIU2RaImMjMjISpmJNIyv +7Mz7KFKJ0pLKKJTKKhXKLpLf8/vreb3/eM7n85xzPuf5KDif3OHKy8PDE7CI +h+f/z+mPzx4px+VuLKbxFnMJ843tN6QCjDrD4fBWl/xTqWsAxV85S3Umg4lq +kKthqj74bSt6t7gzB9RGx+1EUjeD8Khk8p93lbDbyEvs6SUH+FRnfXLyXQME +sjREm1PcwEz5e8/Yu1aoyV4YG084DX/e6af+etcHn0wsfmSGRkOjSX7um5wJ ++J7C1/mPkQ7UTzVfnDXnQeWqqtHL4mwQO36giM9kMZ7uaHjN9yQPkteb3bW2 +W45tf02bMt8UQ1f6uvoxoVVYN+Kalv27DDLailf7qaxCw9TUqZIl5bBbcM2B +WeYqPHdULXDxqnL4EEH7x+uyCsug5HwmrRw+e/CzxYhV+Pi/5gspG8thyHTg +NsNREC+2vOQcOVsOv3+llQVlr8aq55Wm9/6WQ1zu2Ve80sIolxwdmjNYARb0 +IyLiSsLYekpe7fBwBSx/tMNujZYwnpUKmlCaqIBz/SrvLY2EsUzObegiTyWc +UWz+cumIMBbIH14nI1MJHllS/1RrhZF54pUWxaYStl+r0LTcI4KVZ19o5FRW +gpDm1ZP7XEVw+7Kcjvw7ldBy91zlyZMimFDTEZJ/vxIs3jsYXIoQQZpgz4tL +zyvBmPLPpKdYBGf+vjNY01cJ9HSLPSf/iqBtmUWJulAVSF7qj025LoqOjtmr +8t2qQEqDOPc7TxTdYxKaEo9XAaUh6uy+clFUZF7d4OtVBbK/1HzXNIqiZEjY +Wu2gKlCx8nS6OySKr39aeDvFV8GGJfOM/g1imCqVZdxUVQU2PhIDus/FMFQg +bvzSbBVsExj6mNYmhvIlMtfb/1XBjpyarr8fxLBLdm5CcDEX7F/vfdX0Uwzz +jpjneQtwYZ/mf7W7xcVx1ZC0zLwMF44N6CSFO4njfd9WthCbC9E7zTe2Totj +447wFH1/LlC4LRTeRRLocOjFV+kzXCgV3TmzXkACPwTvnp06y4W3rfvLk+Qk +cHmtxZ6r0VxQ3u6juH2LBA5ekBe7epkLDVszl72+IoHGCZqFHlXkfm4p9y/8 +J4FhxqxlI9Vc+L6y6IFOqQTOJk6outZyQbiZ65/QIIEvE7UI44dccLJ4/t36 +hwSGDzwVrmrhwrzZVMtLtiSeV2rlHBniQmJeYPG8mSQad/YLnftBrr+MJ0Zr +uyQqqAqXp49yweoxv9FFV0l8vN7ErmySCxkm8lVW8ZIYT7PcmsxDgAFapr34 +JInpnIcJOpIEeDOzDzwLl8J93dyOZiDAIktw0vKCFH6YnhKdMyJAke9MTEuq +FL4dK+RRNiXgdbt9RVuBFG5/mz3kuoUAbc+Viz+2SGGH5IsVRdsIGMo7nTdO +kcZ1R2/b0J0IeLBqkOWrLI21Iv+6VjkTcNlnx6sZLWls8YmR73MhYJOx1u+/ +KI3HrFW+BLoRkNPTZ87nJo3FB6geJzwI2CtmPSJTJY03bS9ZOQQRsCHobtiN +Ommcc/Ja3XOGAP6+tRIKTdL43cHrxr4QAmrKFoNqlzR2r5BSsQkjQMKyJnHd +gjQmbleYmIgiYKRCVaVqOQXZyWv1tsUQ8EjqUo2eCAWNl/Ba5ceS+fji0cdS +oWDf9oK/my6Q3xumTN9kScGJsfTYTUkE5A8lPX2yk4I2XrNJ/skEhNgs7LXY +T0HJlbv981II0KJ1R9p4UdCQt6V/PJWA83cS3jmmUVDZYaWDdQYBpj9nAz36 +KZjgqflQKIeAgC2X1B8OU3ATS7VzhHRptla36DQFM3w2izb9R4DUTidmzXIZ +ch4NzLrdJGD4zuOZxdoy6MmjUelVQICCyIF8e30ZtDs7sXJtIQH2x37bF6IM +3jnSmdpFup6mUW1tK4P/rgrraxcTkBKe6HPFXwaXWO18f/0WAU/fqykPh8ng +RSe+F1qlBPylN7ZtjJNBDqE3cYf04a9TugPXZTDYa8d4fRkBVzGhj5Evg1eW +D7/glJP5ubI2ObZcBkPZDv0EaZbVnjHtRjK+L/+btAoCTt6czAprlsGvnvxF +iyoJyP13cVt7hwy2Tlk2HSYtWFFfFjAkgymjYi2KVQSY8O8+0Dwmg/tnneoC +SPu7TAjKzclgTN3piRek+8RVPR6toqJYY6aRM5cAyZMPaJKSVIyVCt+TR9rq +6a6XR+SpyGf6pnGQdJjC+Jk6NSqKFv0JkicIqA6M01y9gYpLDI5E2pP+0ab8 +4SCbiqPOCb3RpOW17sdxN1HxkGpPEpe0XZSDIZ8NFX/zPk77QPr8p1/fHXdR +cft87eQC6QcG5zNKDlLxxjV6kWw1AZNJShYLR6l4/ltBjQFptR91f7b7UPHp +8URla9L7Te0Lc4OpuKDlOryfdMr1n7tmoqh4sDJH5Bjpp9Mxyy0Sqeg+9zj9 +FOl5G8U7165QsTpya6gvad3Cu24/c6h4ZXPNc2/Sbrx2ksYlVBwvOx9wgvS1 +PaNNlwgqvsw1jXcm/YYb7ff1PhX1wo/x25JeJqigynpKxSapyJ8bSRu61XZc +eEPF9BIpUCXtWW8b+ambis8nSmeXk74pPULXHaCikXir0lfye7tPRQ2cG6Gi +b/6qunrSq5vlLr2bpuLSstFHqaRNVWpM1HloGHd9MR4mHRCyY+LMChpu2PZB +W5d06bsfOa9EaBgtyJ/yh6xP/7rIHYpUGsrHynnUkZY6L8vrq0JD3c7yh4H/ +rx97+0GKAQ0/2t7o/EbWf8v+G+P6xjR0eDB8K4W0YOiPCDsrGs7NfdAzIH2t +MTIv0YmGMh1drl5kf7kMtuqXHqXhn/xlIstIq/PJP3vhQ0MeQjwglezPOxa1 +P5bF0nA0Xyc0l+zfs8f5gpVTaJj56oiyMmmz+J2CxtdpSKkYiLtB9n/7m9F1 +wRU05I1bfSuCPB+/din5TXTR8Fv5I+/VJQTcDvTkEx6gYXZd+AlX8ryFXLuX +rj1Kw9tPLhtWFxGw8rPD3SO8snjs0Yl9W8jzucbtAs9ndVk065uc1M4jYDSm +K2meLouNfd4te8jzzi1SVZIBWbwY8fpiRC4BxqP1m+xtZTEylu9JIzkv9vtO +nW8OksWUcEFnvkwCVNKMqd8jZfGlkVChwI3/z4uEW3yJsrgrefAr/3UCAv+q +vTbOlcWEeyr2s+Q8So3YL17TLIsla8X0rl8moDnpSeZNmhzarLrDO0XOv5Qq +sfWNa+RQ9pfP+8I4AnZ3HGz4vF4Okz5pvHE8T857qb8DMmZyOHN6Oa04moDF +WevUkz3kcOykXYBoODkPSq9wQx7IIcN66MC8L9kf71rmR5/K4dkr6zJDfQiw +5lmy+UCrHPLFtdxfOEXWa4dHFwzKYdOUYP7YSTL/QQpnQ5fKo8DbKdvcI2R/ +yk3/Z6Qhj/x79g+a7SXnt1vmSKOfPLJnFywSNhJg/pcpciZIHiXVPsUmswlo +SWxn0EPl8Vaq5I8kFgFdNStCc2PlsdBGlBbJIPMt4CMSeU0e51o+B3K0yf4r +36Jv1iCPKS4/52eoBBz/PRb6dJUCqh8x3frfDBdYXoclvogoYPnEfelZ8v+6 +/Ht38WIpBVwRaXPLapwLN983vt2oqIDWZUv0Boe58PF+qibBUMCT9PUSA71c +sIlkdmYfUECfGtkbMi+4oCsSphNUoYAnqi8ORmZw4Y+G0EctO0Us+tPz5rsW +F6avU8I27FbEd3lDunvUuTC5WkWZeUARE2cCGU9VuTA6wTxqekQRCwIT1qXL +caHvrsv07mBF9LKbAyFhLjy3vC0Yc1MRbSekzF0mqiDj2H7om1LEjbZd8wVE +FbCLS7IuX1ZCXTHbo7brq2BMxMLJvkEZU8MoKmpylTBwwcn+FJ8q3h7ua8t/ +Ww7mP0+bDzLWoFrk6Z9LFcpg2GW5N/fsWowMXHZlbnMJeT+X5I1uUMNzvcZ+ +qv6FIPJSNb78pzre+/qYbdafB9SYsm0MhiZushnNcdDJhXQNppComxb2ait6 +Tz/LhucUI72JJG28HSSYvFQzE1jUhkSdtzp48Hqs2tWGDBBcnONzMHwdfulR +jZvjTQPZMDm2o+p6bKLUPYnYmwIrVPZW73iyHovU6kMt1yeCNke67PQ+Xdzf +3Zs8vS4OTn0UabTg2YB+da823bOKgp8TF+zM0zfgozZmucfBcNis05RhrkVH +WvXWnBKdENi1bMvO1zp0DN+QK+smHgJHe56tctClo94pI2P6XDDEx70MPaRP +x0ch6/YuexIMb7+2Hz5rREfePV8GYg4Ew6Gsfl3Cjo6v4k+mL6ScgXDhRS/k +Q+hYN3561Jc/CO5PGM7NtNDx2MZvflc0/CG7+baz7Rs65jiNqOlI+sO5mxue +l7bRUUH89ro2Xn8wd9C44tpJx+Ur6TSz7tPQXkvRb+ulY0GocvHb2NPwPezP +qdJJOu6TjnG79sMPJIRufz9E0cN9fstGY2p8wUNTt/uNqx7eFLvquS/YG3xn +KLMH3PXwYX6CQ99RbzjTsJgyelQPPy3rX+q3yxvidnU48nvqoaYWkfpsgzcU +nPPvMg7UQ13u24vyP05B34f7nVXxeugTXmkatfcU2F+0fJd6Ww8/Bz/cNWnu +BZzRQ+2OKxgIjHtv/2Z4gMTdzTl1Agz8dE/o9ecQDxiNVveUE2RgSOu5nm5n +D7ih8EtgUISBGm/DFoQ0PODfziATTyoDPzxK/BFRdwIe3E2qjNJh4PkZvlf+ +/cfBKPZ+YpUdA18x9H8aGx2DTcpSW1flMPDs1qd50Ux34I48VjiUy8C0w9sC +5xXdQfm293RtHgPHlVinIle6wxKLV5nuxQz065vLevHJDRpORo03chm4+nLe +bZ1oN9h4dzIt8AkDxT7NNVh1HQbGjjd9X4cZuExqav78eVdYG3rev0FfH8Me +yN0ulnWBOsObS61Y+vhamcZ4zO8C22YeJHew9VH1SWDLr2ln8PeYKhky0scT +ovPiIa+c4elep15BK300E+C/cDLMGdyZDIs9TvpY8Mc2JmfoIBSO98pMxujj +KRGp0pFGJ1B3ZT5Q6dbHR/dyegrt90GCovVsxAd9TO8o5GUy98HkJ2e9vo/6 +SCkwM+iT2Qf3d18ovtGvj6nLO2PCe/fCjm2f0iRH9LH35+Wi3yf2QoBhpOcK +HgNMEzY5WhS3B54Kv1EYUTHAkOLh3OwuR9B6NbjXcq0BFuzkJlo/cITkC7Np +heoGKFnJYYvedIS9fMqCh3UMsN2FN67f0xF+/vWb/WhggEbh7mI3VjiCxBC1 +7bWlAZakvtt/DHaB6333c1wvA3y5vId/5K49jJ74fnqTDxl/ob8nIMce/GnH +j731M0BtoQk++Vh7OH/m5I7fQQbkfUdn5R17eyhn+cmzo8j3qUqRYhN28Lc6 +oq4xwwCPsR/3H19nB8llNyZbGw3QxHDXDoF7tkA9ID/k0mSAhMPR1ow8W7gp +mPN+8qkBMrtcKEaJtnDnxM0GiRYD7BaIrHrjYgs9GiWJuzsNcFoj4SvPSltY +W1Cj2TdsgDY/H7hHOe2AB1nth8bEmVidlTZRIL0dPlspHPCTYmJ4Tgl7y7Lt +wPPnhOMchYn3XHvpc+PbwHg7n/VSeSaODxuNXm3eBk2LWPrS6kzMvBNe0BS6 +DZqdM1cYbWSieUbp7KEuG+hWPlqaeJiJW/ndRT/nboW519UF4keYOPKF2fYs +fCtQgxf/l3GMiXVY3vHWaSvs67iWluvJxPvuX5R307bC58hXoXcCmbiB3hjG +m24FX7/QbT/HM9F7+4DqgxRLmCxYmNG5zUQ3tSIJsVxz+GJvlhVbQ653S9tA +M8YcOpdc3NJ/l9xf7+bGA8fN4a4T5crleiamhXy6I6VnDuFSeqz5Z0ysKspP +e/VkCwjFHD3z/AMTCwe0+Djjm0HTrYPHlZeFado9f/x3m4GsOLXw/hIWispl +cFqNzECo0Xm7FB8LR/7V00zVzGBC9lf2CwEWUqPy9nn93gS1b/lNdMVZeP/X +heifaZtgixlGLqxhoY91tIj7e1NwUSlekbGVhXnGvaE13iYQ+Hj/UdVtLHzm +b/dDba8JJLqKvKjcwcK/Bg83ck1NoO5mwIUXDixULStgS0iYgJjqltXzB1k4 +4yH/cWWtMTSpDoo5+bGwKOSxcdkyY1BfKyevmsnC9K+B7+UrEfBpa2hlNgv1 +NjX5Zl5HsHeP6t2Yy0LL3rF/9FiEiIKRHIdCFr5anRyR64TwYW2dSmwVC+OL +k3qThRDi1Rw1hp+Q+VCli2z4thHG1FMYlb9YmFAwPnbiChs6m3GT6AS5XsIl +SW1/NtR7jNr6TLHw6MPgWGEHNsRXmnsxZsn99Ye+NBJngzqLp6R2sSGOeZ0y +NE0xBGfzEwqNEob4R/qJJjeVBe1um1e2sw3xV6VT7MEqA7i7YoqiB4b49fnq +91aXDSCnOEftspEhjjfYnnMIMADPn/Nmu8wM8erDCNfnYACrTnPDPtgYYku7 +tpxSiz6YRSnMDDgb4nWb2v+ifjHgTu5c71SMIa7o0TtmZakHDBOfGYs4Q6we +nKg/oqsHRO/wyqyLhphU6NOULa0HlbIf9S2SDXFvy+XAg0N0KEmvv3jjqiFe +WfK6nhpNh6wLkczNpYaoPivZfvzZBoj1WZ2U3kbux0OReOKkC8tFY/JGOgzR +jsdihYClLkRV8NQZdxriTUYa72E9XTg3OvZl+IMhxs4ExDjz60KIezvb6Ish +6nT5OnkT6+HU3itD334bYrSArf/n1etht6kSGsqy0UO49dbVIh2Yb18u2CjP +xiu3hN+HhOlAluvoewslNtox51gpu3TgS1TN6d1r2RhiS3lgzacDp57ZlAXo +svHQgJO0gJs2nLc+I3vHjI0LDnN3j+loQe2ujr/0k2z8XiJadqxPHfZ9q31e +50XGS/ffIPJAHXgCs9JNfdgY/2Uwv/+qOphdPUbfGcBGfb7s3GX26tDas+i4 +dwQblyq8ebO5WQ2+O2u/r0hjo1rm9K34+rUgcyK6RruejT17ZIYnm1QhfuGw +XlwDG/2EHp7NL1IF3mSziq+P2Pii4lt2YLwqfK9eWpj1jI3bnijxh9urQi3P +uXSRNjb+rb58V3hIBXZfCj09PcjGXapOSZLCKpB+N0DvvgAH9VLscrsDlGCl +tWMFRZCDt1NTkw4cVILQzwZap4U4+MA7eMUicyVwX/pbeZ04B91SD8lfkVIC +fRs/sRxZDrKOJOVQahThbd+picj1HNQpjxc1X1AAcf7jFVsdOFjK7pE6nykP +uSbBgb8cOXip+sPGyWh50A2ON0nZy8GgxKfBwZ7yYP2rvKPzIAefz/BVDBvJ +Q9TbqT8uxznIFThd790sB79zzhoHhnHwyWTx5Ed3Weg2TGnLK+bgmLqnf1az +DLj75l4zL+UganzjKc+VgelSwnW4nIOVix1mJs/IgIhi58z6ag6++96/VlZb +BiyX06j36jno/2k29ksyBera8w61dXDQu0UlQvKwNFgI3tHy6yTjbS/+fMBI +Gjo3P5uWes9BzX98t7uo0jBZ+yNm/2cOWt9w7HZqlwKt7HW3vn0n48sF7a/e +JAV13UZ+F0Y4mPXxX3+EohRYiNmCzi8OroyCRWELknA42veNzxQHqUpbJVfU +SsJkfVSG5G8Odjp8zUhJk4Tw2TSX2lkO/gvqfGHlKwlC9ELNffMctE9d60m3 +lYQbJ2qnFhY4+LJZztpivST8D5Gdqdw= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08481535322564224}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8473,6 +8762,7 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8500,7 +8790,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.08145702771151381}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08481535322564224}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8508,9 +8799,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991335257344549*^9}, - CellLabel-> - "Out[255]=",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] + CellChangeTimes->{3.9943553011539717`*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"9a98d2b2-82c6-48e3-8528-5d2dd4afbc4c"] }, Open ]], Cell[CellGroupData[{ @@ -8562,67 +8852,72 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel-> - "In[256]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], + CellLabel->"In[98]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.39639867535232`*^-188\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 237, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257395241*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.63226505299142`*^-153\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 98, + 17, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994355301308214*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], +In[98]:=",ExpressionUUID->"dd8a890d-e86f-479d-9179-6acf789d1fc8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.342395211692676`*^-192\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 238, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574052296`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.5537680473826425`*^-155\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 98, + 18, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994355301333997*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], +In[98]:=",ExpressionUUID->"f213bceb-68e0-4eb6-8b6c-dc94db1e09ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1800384500947783`*^-195\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 256, 239, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257413231*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.770714057341215`*^-158\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 98, + 19, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.9943553013430567`*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], +In[98]:=",ExpressionUUID->"cf085241-c04f-4d23-970b-bbde1e819891"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 256, 240, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574212303`*^9}, +during this calculation.\"", 2, 98, 20, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994355301351328*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], +In[98]:=",ExpressionUUID->"eed12f42-ce12-4947-8c09-f4145eb5d634"], -Cell[BoxData["9.332200719005158`"], "Output", - CellChangeTimes->{3.991335263670042*^9}, - CellLabel-> - "Out[256]=",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[BoxData["8.962169728021003`"], "Output", + CellChangeTimes->{3.991335263670042*^9, 3.9943554035924063`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"4f053d4e-d7b3-486c-aab1-4f4d73c70452"] }, Open ]], Cell[CellGroupData[{ @@ -8689,65 +8984,73 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849285445259*^9, - 3.991849289419262*^9}},ExpressionUUID->"6f0ad284-4db3-da47-b8dc-\ -45830eedfe9c"], + CellChangeTimes->{{3.991849285445259*^9, 3.991849289419262*^9}}, + CellLabel->"In[99]:=",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 241, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263710146*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.368783777168297`*^-197\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 21, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.994355403670693*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], +In[99]:=",ExpressionUUID->"a62e9def-598e-4b2a-ad9f-b4de7338be2a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 242, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637201557`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9049193905965883`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 22, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.994355403697402*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], +In[99]:=",ExpressionUUID->"5eee7922-e6f7-4188-a85c-9726e4bdd669"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 257, 243, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263728153*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5717818068499063`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 23, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.994355403705916*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], +In[99]:=",ExpressionUUID->"acce4cab-7749-448b-8c55-19bfd80fa811"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 257, 244, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637361546`*^9}, +during this calculation.\"", 2, 99, 24, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943554037178183`*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], +In[99]:=",ExpressionUUID->"d570fb6b-a169-4beb-abc3-043a589a0d73"], -Cell[BoxData["0.00046079539931050297`"], "Output", - CellChangeTimes->{3.991335268779545*^9}, - CellLabel-> - "Out[257]=",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[BoxData["0.8383018512095516`"], "Output", + CellChangeTimes->{3.991335268779545*^9, 3.9943554158612633`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"a8a2616a-a34d-4f74-9cca-a4cf085b567d"] }, Open ]], Cell[CellGroupData[{ @@ -8768,8 +9071,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8814,65 +9116,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849293744112*^9, - 3.9918492959939384`*^9}},ExpressionUUID->"b2dda819-6f34-5c49-bc62-\ -303d815946e5"], + CellChangeTimes->{{3.991849293744112*^9, 3.9918492959939384`*^9}}, + CellLabel-> + "In[100]:=",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 245, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268812542*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.368783777168297`*^-197\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 25, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994355415920062*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], +In[100]:=",ExpressionUUID->"528ae6a7-390e-48ea-ae1b-5c02fc18615b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 246, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268822542*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9049193905965883`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 26, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994355415929831*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], +In[100]:=",ExpressionUUID->"a7271803-d807-415d-95ea-026b05989b9d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 258, 247, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268831545*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5717818068499063`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 27, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994355415943025*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], +In[100]:=",ExpressionUUID->"d2379717-8e99-4683-b540-10752fed8e15"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 258, 248, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352688395576`*^9}, +during this calculation.\"", 2, 100, 28, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994355415952833*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], +In[100]:=",ExpressionUUID->"39d7916e-8715-46bf-a690-a2cca810bb9f"], -Cell[BoxData["5.104103620353258`"], "Output", - CellChangeTimes->{3.991335272704685*^9}, +Cell[BoxData["23.905235981297665`"], "Output", + CellChangeTimes->{3.991335272704685*^9, 3.994355427440872*^9}, CellLabel-> - "Out[258]=",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] + "Out[100]=",ExpressionUUID->"f4dcb8dc-d26e-4a1d-811e-aa6d613ae386"] }, Open ]], Cell[CellGroupData[{ @@ -8893,8 +9205,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8939,65 +9250,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918492993108063`*^9, - 3.991849303274454*^9}},ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-\ -1a175f609f7d"], + CellChangeTimes->{{3.9918492993108063`*^9, 3.991849303274454*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 249, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727386665`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.368783777168297`*^-197\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 29, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994355427513692*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], +In[101]:=",ExpressionUUID->"5f31fecc-098d-4b50-95b6-80c7c95e5866"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 250, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727476673`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9049193905965883`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 30, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994355427526804*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], +In[101]:=",ExpressionUUID->"074225e6-7018-44b1-8dff-47cd485369ae"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 259, 251, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727556705`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5717818068499063`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 31, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.9943554275349693`*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], +In[101]:=",ExpressionUUID->"9126b1f1-4f35-4afa-bc71-0a65b6101f77"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 259, 252, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727636833`*^9}, +during this calculation.\"", 2, 101, 32, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.9943554275430613`*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], +In[101]:=",ExpressionUUID->"c3baf05b-bd9d-4e72-8160-3beca06c18e7"], -Cell[BoxData["18.832858301324727`"], "Output", - CellChangeTimes->{3.991335275154251*^9}, +Cell[BoxData["4.020345028669161`"], "Output", + CellChangeTimes->{3.991335275154251*^9, 3.9943554371277113`*^9}, CellLabel-> - "Out[259]=",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] + "Out[101]=",ExpressionUUID->"b9011d0e-40e5-4108-8f59-8b3212a9edce"] }, Open ]], Cell[CellGroupData[{ @@ -9006,22 +9327,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918493065908413`*^9, - 3.9918493103344364`*^9}},ExpressionUUID->"69dd09d9-152e-3e4d-9517-\ -4de4791db2f4"], - -Cell[BoxData["0.00004699917922538678`"], "Output", - CellChangeTimes->{3.991335275186266*^9}, + CellChangeTimes->{{3.9918493065908413`*^9, 3.9918493103344364`*^9}}, CellLabel-> - "Out[260]=",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] + "In[102]:=",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], + +Cell[BoxData["0.08551105104806865`"], "Output", + CellChangeTimes->{3.991335275186266*^9, 3.994355437173602*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"a42fa2f6-eaa1-4c00-ae46-3d4d70ce99cf"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849314761318*^9, 3.9918493173333225`*^9}, - 3.991924798063732*^9},ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-\ -749729cd7104"], + 3.991924798063732*^9}, + CellLabel-> + "In[103]:=",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ @@ -9045,12 +9367,12 @@ Cell[BoxData[ RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellChangeTimes->{{3.99312673568116*^9, 3.993126746164192*^9}}, CellLabel-> - "In[262]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], + "In[104]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[BoxData["5.744985073726737`"], "Output", - CellChangeTimes->{3.9913352752142563`*^9}, +Cell[BoxData["4.533084270623094`"], "Output", + CellChangeTimes->{3.9913352752142563`*^9, 3.994355437197324*^9}, CellLabel-> - "Out[262]=",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] + "Out[104]=",ExpressionUUID->"ac3b9261-c10f-4a9e-926d-ab77d3c7e5b0"] }, Open ]], Cell[CellGroupData[{ @@ -9060,12 +9382,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[264]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], + "In[105]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[BoxData["1.564995573098557`"], "Output", - CellChangeTimes->{3.9913352752482567`*^9}, +Cell[BoxData["2.9823918544113313`"], "Output", + CellChangeTimes->{3.9913352752482567`*^9, 3.994355437212591*^9}, CellLabel-> - "Out[264]=",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] + "Out[105]=",ExpressionUUID->"58b30edd-39f3-4e32-a4a0-60e06012aeeb"] }, Open ]], Cell[CellGroupData[{ @@ -9075,12 +9397,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[267]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], + "In[106]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[BoxData["8.990876207899632`"], "Output", - CellChangeTimes->{3.9913352753089123`*^9}, +Cell[BoxData["13.519433604066448`"], "Output", + CellChangeTimes->{3.9913352753089123`*^9, 3.9943554372280073`*^9}, CellLabel-> - "Out[267]=",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] + "Out[106]=",ExpressionUUID->"f3c92e30-3a33-4aef-9b27-97b34d03ea1e"] }, Open ]], Cell[CellGroupData[{ @@ -9270,12 +9592,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[268]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], + "In[107]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[BoxData["0.07167004636648908`"], "Output", - CellChangeTimes->{3.9913352753341656`*^9}, +Cell[BoxData["0.009398047415895045`"], "Output", + CellChangeTimes->{3.9913352753341656`*^9, 3.994355437247958*^9}, CellLabel-> - "Out[268]=",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] + "Out[107]=",ExpressionUUID->"66a80af6-186a-4103-8a1f-f0a186962592"] }, Open ]], Cell[CellGroupData[{ @@ -9289,12 +9611,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[269]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], + "In[108]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[BoxData["3.3103666491187544`"], "Output", - CellChangeTimes->{3.9913352754296722`*^9}, +Cell[BoxData["9.141682311453014`"], "Output", + CellChangeTimes->{3.9913352754296722`*^9, 3.994355437438698*^9}, CellLabel-> - "Out[269]=",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] + "Out[108]=",ExpressionUUID->"c7b936a2-f8b4-4b0e-b9e0-96dc4314ead7"] }, Open ]], Cell[CellGroupData[{ @@ -9486,12 +9808,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[270]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], + "In[109]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[BoxData["0.012832691268660865`"], "Output", - CellChangeTimes->{3.9913352754426765`*^9}, +Cell[BoxData["0.07275045603342391`"], "Output", + CellChangeTimes->{3.9913352754426765`*^9, 3.9943554374574327`*^9}, CellLabel-> - "Out[270]=",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] + "Out[109]=",ExpressionUUID->"51d5e38f-d2e0-48ae-b163-2dec2e762a8f"] }, Open ]], Cell[CellGroupData[{ @@ -9505,12 +9827,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[271]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], + "In[110]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[BoxData["7.823229443917166`"], "Output", - CellChangeTimes->{3.991335275540678*^9}, +Cell[BoxData["3.285693742558576`"], "Output", + CellChangeTimes->{3.991335275540678*^9, 3.994355437652163*^9}, CellLabel-> - "Out[271]=",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] + "Out[110]=",ExpressionUUID->"dfb550f6-1d4c-40fe-9614-aa0db7c04b1c"] }, Open ]], Cell[CellGroupData[{ @@ -9603,12 +9925,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[272]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], + "In[111]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913352755566807`*^9}, +Cell[BoxData["0.04702603264830412`"], "Output", + CellChangeTimes->{3.9913352755566807`*^9, 3.9943554376703663`*^9}, CellLabel-> - "Out[272]=",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] + "Out[111]=",ExpressionUUID->"332ad3bc-d2b9-4766-8d72-e22e9b97a579"] }, Open ]], Cell[CellGroupData[{ @@ -9698,12 +10020,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[273]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], + "In[112]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991335275581682*^9}, +Cell[BoxData["0.9529739673516959`"], "Output", + CellChangeTimes->{3.991335275581682*^9, 3.994355437686961*^9}, CellLabel-> - "Out[273]=",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] + "Out[112]=",ExpressionUUID->"02d07624-4bb0-42e6-b50d-1f0e23be9ccb"] }, Open ]], Cell[CellGroupData[{ @@ -9826,12 +10148,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[274]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], + "In[113]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913352756087036`*^9}, +Cell[BoxData["0.04481458490166476`"], "Output", + CellChangeTimes->{3.9913352756087036`*^9, 3.994355437705233*^9}, CellLabel-> - "Out[274]=",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] + "Out[113]=",ExpressionUUID->"6bdaa1b9-7751-494b-8f46-946dd9fe95c5"] }, Open ]], Cell[CellGroupData[{ @@ -9893,68 +10215,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849332835844*^9},ExpressionUUID->"d6aa822f-4140-174a-8e29-\ -c889dba5c0d8"], + CellChangeTimes->{3.991849332835844*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 253, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275636673*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.612709912326228`*^-198\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 33, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.9943554377274227`*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], +In[114]:=",ExpressionUUID->"caf427b5-6ec0-4c7f-a0ab-a53004449f4a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 254, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756456738`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.596836566363542`*^-202\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 34, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.9943554377364607`*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], +In[114]:=",ExpressionUUID->"b1aceed4-23d7-4afb-902b-d26a81de4f6b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 255, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756546745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5021094889791347`*^-206\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 35, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994355437746303*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], +In[114]:=",ExpressionUUID->"4501fbe3-a5df-4e2a-803e-4e8a1c75b610"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 275, 256, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275662676*^9}, +during this calculation.\"", 2, 114, 36, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994355437755735*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], +In[114]:=",ExpressionUUID->"58676caf-d25a-4e30-962b-4d2ba01c1817"], -Cell[BoxData["3.3103666491187513`"], "Output", - CellChangeTimes->{3.991335279487499*^9}, +Cell[BoxData["9.14168231145302`"], "Output", + CellChangeTimes->{3.991335279487499*^9, 3.994355445950884*^9}, CellLabel-> - "Out[275]=",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] + "Out[114]=",ExpressionUUID->"e9bd6d5c-6ccc-4660-aef2-df9fe1d4a09e"] }, Open ]], Cell[CellGroupData[{ @@ -10016,68 +10345,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918493361354027`*^9},ExpressionUUID->"46f3f057-22eb-c143-af7a-\ -23ddab00799c"], + CellChangeTimes->{3.9918493361354027`*^9}, + CellLabel-> + "In[115]:=",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 257, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279522499*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.612709912326228`*^-198\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 37, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994355446011366*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], +In[115]:=",ExpressionUUID->"11d31d7f-4f62-4f2d-9c99-ed9ce1b06f27"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 258, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279532501*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.596836566363542`*^-202\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 38, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994355446021574*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], +In[115]:=",ExpressionUUID->"1033798f-fb24-483c-b159-0a0653036854"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 259, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795405006`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5021094889791347`*^-206\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 39, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.9943554460313797`*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], +In[115]:=",ExpressionUUID->"2c2bb3f6-45fa-4ac4-bc14-958f7669fa32"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 276, 260, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795487957`*^9}, +during this calculation.\"", 2, 115, 40, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994355446041038*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], +In[115]:=",ExpressionUUID->"aebdb5aa-f78b-4c20-b9ed-67daaea8403e"], -Cell[BoxData["7.82322944391716`"], "Output", - CellChangeTimes->{3.991335283631424*^9}, +Cell[BoxData["3.285693742558573`"], "Output", + CellChangeTimes->{3.991335283631424*^9, 3.994355454068946*^9}, CellLabel-> - "Out[276]=",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] + "Out[115]=",ExpressionUUID->"3d0cc6dc-be96-4c33-95ef-0c8f89b88aa9"] }, Open ]], Cell[CellGroupData[{ @@ -10135,94 +10471,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918494105860615`*^9},ExpressionUUID->"0137ed47-cd78-284a-910a-\ -31d165f1571c"], + CellChangeTimes->{3.9918494105860615`*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk0F98bB3BZIiFLyJpdFOGTreQ+tpQ9UbZk+cwoIVF+kqhvtC+2ikok +yi5rQlJKkqJoE6HMhz72bUjb7/pjzpzXec488773PHdG0e+AM8HJwcExhK/F ++8E32uoP2t+YZoZpCPLUUch0LFvfz7IQ/TvWghbdl2GQomJZh/y08z8u2on5 +eqkA4zmSOdPcuRS7NDK2kceyFc0mqhryYZ9tWtUQm/8WVbk++bsM+2H7wVu/ +9d6jT7031gpgs7taoo/UfkJlqPKRELY0pexJW3SjTacFK0WwbcejjcNbe5H9 +q2wRcez63+zlkfn9KFH5aMcq7A8nJI9WhXxHu/ITFmSxx5Zasmf0KPQ2mjql +iL30Qqg7Y46FumuORKphy4ukNx+sHUJmp+3b1mI7yNB3xyxGULV/RaEhNpmp +JKHFN4a4X1gzTLFjVR3j97eOI+s9MqutsD9Jduoeyp9EldMn1VywmR6B+5Iv +TCFXdylzL+yJmxy3y0KmUX/T+FMmNp+SlvCk3iwyLfCZicBOYTZaC4vT6PXt +X9nHsRXuuceun6PR9YxPNeewjdadGguunUdKbe4Smdh7DXpb2Ra/UXTgiQtt +2DORh7n51f6gvpkNAd3Yx2uXm2jw/UXp/Fr3fmCnglFBQOs/dMxhZCfPI5wv +p9kyLH8JSIuWHTbDzm9K7jshwwn6j1KitmNPDHpHJ17ghN9rHg/4Ykdrzpbf +D+GCbyKjQyexU0oUlcf1eOD8gZr7rdhd7SP1f+/wgPSOod5ebIWpBx5C4kuB +56vvoWnswg0OSVpzS+GlyMbXMvUUevYwaklQLR9U3rlkehB7trGjd8hCAEIl +HRXWP6aQqJ2A8NF6AXjtlPDGBlun0xIEjQUB3rCnSezAgcpMXW0h4DUav5OJ +HcrZqrNZQBi0VzilSTVQiFIqnoynReDGeacuxSd4f8iWZW0MUeiav75gic1Z +wFJcdVAUUsaEkvZiKzBWO+cPi8KpZZFqpdgeFgllb/rEwGj0AGX9lEJt/mHh +kq/E4eNu/kfnGyn09d6l8z58EhDaFONUhT0ynH8nz0oC5Jt1PPux+Q9979jU +IAFJq3d8MHpGIcs4lw0+lZIQW1ztP4pdk20wm5shBd/0nLqDmiiUTS1EbDwk +ByYPHzk+f0mhra6nv4YXyUHimfaFBeyRZ2Jbilhy4PubR0i3hUIbsteJK7jL +w+ynr0G3sJ/5eZfzmK6GX0bhAjGvKDQ13ve/oZMKcP/oqU6n1xQSC7asKLdX +gqs32MmWbynEyubf6xSoBJ2C4VtOY1d3t8uMnlKC2MYdvi3YXna7T6o1KIH/ +PtX27e9wvrURzml6ylBhb5pEdOD3s+9NxEiqgLLYbF7mewq5BCzXsulXhSCf +Y/pEF4VQhKverj+qENLoTpRja8ZnGDKl1GCcrv+55AuFOO4wzGO2qwFDYZ1T +JnbRV89dZU/U4Mym1vL+bnw+dxaekM5Sh5GBJW7/68X5LO0/sP00QPPBQ+Wx +AQrd2XHty1yMBqBnrKGtFIUu+fX3cd/QgInJ76LZ2Mzjh4flOzSgEtyueLIo +JFKXzrHDQhNkdYNc2gbx/DDGNGuV14L1XeLRSzaFZJQux54fWAernczt+Ccp +VHduRuMnpxZMzW+JjML2mnbvJBW1YN03W5lh7FvPVDTMvbXgmCmz6fUUhZQC +at7Nf9QCx506pakzeL2FlCr5ShvOFdl0W85TSE5GnlRw1wFZ4S+36X8UWpdz +SOAX0oNtLjWPG4RZyI95clbLQQ961MptrERYKFU56auPlx6YjKqbtmBzZZXc +b4rUg6o1yd7vRVmo6xbbJalUD1py3sZPrGShs6k+6RrKDNj8hOPgRikWYp23 +03ZbugEU6nQ7ZJVY6HaYilNlqz7IehVfldVnofYIZBiXYwxZhlIJM/4spOj9 +3mF30GYIS/IeupjGQsS/qmK5IwBrwzVcgt+xkORwNa+knzlMCxxaUSo5iA4x +TLqTNC3BJCHnbPKeQeQ3+rtZjG0F/eeyogcLB1GReThvRps1SCdwm1/hG0LZ +M4FPClO2QXm9t3UcMYTmzVa9fhZrC7KfC7IC3g2hHg6uyX5fe/h17sCuLKsf +KET2QMIJZUewLZBak1b9AxXva264Eu8ECkdL/OI2s1HUtNTc2n3b4YUlR7rz +Ezaatdmy88UeZ0hLXimU6DaMjD0TzajtO0ChbG5V/OwweieVHviM4QI75ewN +Ay6PIOm7J+ty17hCY6BVgYHpKKru07RzENwJc1IL/5UOjSL5zomAiNGdMA0j +t3dfHUOMK4mFd/p2QYfwnSuV7uMonXtaO6nRDfheuLB4l0+gKrP1XfEP3aFQ +WnJB8tAESjU8J/I73wPSRCfTB3omUNuXnFOMC57APp6fddEc/yfsb6qEHveC +T08Hxn1KJ9Fk8A6OEOZuaNmcp9knNYVmt2jsHbPwhg3Xh3UfH59CuaOf58MN +9oCO4Fte7Ykp5HY7x3+3gA+EDwaZb9k1jcrLbPdwnfaBPJ4p4c3Pp5GxzLuf +Z3/6QPBnaacAjRmk3BfQ9XafL0xV5jqEnJlBA8v3O9787gsWe+UHOIdnUPsl +B39rVz+ghDO+UGazKCUyY/nhdj8IMmZnRaTNorr6fz/9t/lDlfTj2cbBWbTC +C04zavzh138Z12U0aKSw8kWbbJ0/bA3njVLVpJFOq/2qpfX+4M1v91h7LY2c +TTzzPj3xh1r1s1FIi0YpshGvjr30h6T9+UXuujSS7ilY0fzJHzJWX30fakwj +FW/JVK85f7A7/zxvzTYaGfuM5cZvYIKZZXdeGUmju2kT4Q4GTHiguGR3fACN +VnZMmUoaMcGhzSBm114ajVnNdeZuYoK2B4N/YR+Nv18cS1rNmaB0RdDSKJhG +QnMi7qLbmcC3LFI2LZxGAxf1l2UEM8H1U67DcCyNLtVG76u+y4QT7x7HvLxK +o2C9a8aRuUzYWlWpFH6NRnZ5pcuM8plQ0B+hK5tKI/5rrLwHRUxoMPpyKSiN +RvFhTuyqCiacu1VmtfQmjaI1VPZXPmWCkJ7aGbnbNAq89iqo7CsTjN83nu3K +p9E2IZZJWB8T4ivlbQ8W0GhNPIeg3jcm1OX9L5y3kEasMP2iUooJ1pKl87pF +NPJ1yBi9P8KEy7Mq72JLaOTGEx5SssCENZkncv+W08g6XDq0UIIA6bObVM7U +0ehpximbpFUEGCjFlUk8opFJ65RKpDQBNcEVZ7KxdVRffbaQJ8ArxFagvp5G +Uh+PWnxRJcD974egoQYaDW/skeDXJ0BNYmmk9HMaXebMfBSwg4DyFsGBqVa8 +/vUCqfauBMjFDzMCX9MozjMyjLGLgDCu+Rd92JEVTur/PAgQ/6xT9+oNzk8u +SbzqR0DRB8a71HYaMVr8mM8PErBd+Vr6ik4afUxUXa6cgOuntLgOdNGoGAnu +HUokoFJMdGszdtzozLOiZAKsIxpYCl9opLftWYzRNQIUKxi67diXOPyn7G8R +EP7n7LxaD422HMj8HFlIABEhbF7ZSyM5uTMGpsUECMielOHuo9FMy4FkrvsE +xNmV2TtjZ6kh+0vlBByO4q0bwf7T09Nwp4YA/djueqlvNKqwk8l900wAZ7GU +k8sAjc4vcPKktBAg22NSnIrtl8v2dW8lIHSHDrMbW5i7RmagjYAjyds/+lI0 +Cqp1u/zzAwFzKryfmSwaKWtejVChCBjqWjC1HaLRwsdjHT9YBHwv414Zj90e +T+iUDBEQsWQl1GPH9G9gG48QoMlema79g0ZdqR27HacJkMpl7uNl0yiJV8Qq +agkJMRJvzdKGaVQ31eN5iIsExvGu2dfYgz35YSE8JNR6xnxYMoLnocIy028Z +CRNmvnIB2CyfyF82IiSkuOs1qI/i/HZWolZiJNwKLvzoir3JUFQDiZMwyO8t +cxI7QbBwJ0OKhMfeG9W/LNZrektlFEn4dDzb8cQYjcicwmZxZRI6Y+++yMVO +SDjSu0KVhMSgc/vbsFmkmCC3Bglmhm8NpMdxXcx674gOCQfdd3blYNf8FYtl +6ZHAXuV3vwmb+tF3pW8DCcvjeMtY2Bsboho7jUhQ1v9nqDKBz3NQsfwjIOF2 +Vqv9FWwht6P6D8xJqBh6E1uCbWyx1a7UkgSx3+t7mrEvSX07krOVBAnJWamf +2NXcJQkZNiSsH7b7uWKSRt/Hj95LsyPhjOowlxq2UZP4+4tOJPBWDlx3xPYr +/TZ82hnvT5y+uj/2xZslnP+5kOBR8uDrYexvYdt0ItxI6PDY3JaKLegtYR3q +QcJubiO+vMV+277vDvQiId/DOah68fnVx857+5BgU/KhshO7mt8my82PhJXx +xjf6F/vNSjx0ZpKQXlVUMLrYr/97mx1JgoWBzuD8Yr/W+6wte0lwWldvzzWF +8z049gcCSRigXXoFsC9m2azcFETCMs2pG+LY1Rcl1+qHkFBwOfmkHPa3yAGz +9aF4PeqGV1WwBZilbhphJCSrf+nQxDZ0jDmgfIgE/V/HTHQW+2+0PSUXQYKA +pXz7BuwLqqvSJSNJOPG55pIRdpUwVS4SRcJ8s3PkJuz+X6Uty6Px/LlSFzYv +9h+M6eeJIWFy/mCrKbbBO9v5f7EkNPnOGyDs/wPNQR5e "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10236,106 +10572,106 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwV1Xk0F98bB3BZIiFLyJpdFOGTreQ+tpQ9UbZk+cwoIVF+kqhvtC+2ikok +yi5rQlJKkqJoE6HMhz72bUjb7/pjzpzXec488773PHdG0e+AM8HJwcExhK/F ++8E32uoP2t+YZoZpCPLUUch0LFvfz7IQ/TvWghbdl2GQomJZh/y08z8u2on5 +eqkA4zmSOdPcuRS7NDK2kceyFc0mqhryYZ9tWtUQm/8WVbk++bsM+2H7wVu/ +9d6jT7031gpgs7taoo/UfkJlqPKRELY0pexJW3SjTacFK0WwbcejjcNbe5H9 +q2wRcez63+zlkfn9KFH5aMcq7A8nJI9WhXxHu/ITFmSxx5Zasmf0KPQ2mjql +iL30Qqg7Y46FumuORKphy4ukNx+sHUJmp+3b1mI7yNB3xyxGULV/RaEhNpmp +JKHFN4a4X1gzTLFjVR3j97eOI+s9MqutsD9Jduoeyp9EldMn1VywmR6B+5Iv +TCFXdylzL+yJmxy3y0KmUX/T+FMmNp+SlvCk3iwyLfCZicBOYTZaC4vT6PXt +X9nHsRXuuceun6PR9YxPNeewjdadGguunUdKbe4Smdh7DXpb2Ra/UXTgiQtt +2DORh7n51f6gvpkNAd3Yx2uXm2jw/UXp/Fr3fmCnglFBQOs/dMxhZCfPI5wv +p9kyLH8JSIuWHTbDzm9K7jshwwn6j1KitmNPDHpHJ17ghN9rHg/4Ykdrzpbf +D+GCbyKjQyexU0oUlcf1eOD8gZr7rdhd7SP1f+/wgPSOod5ebIWpBx5C4kuB +56vvoWnswg0OSVpzS+GlyMbXMvUUevYwaklQLR9U3rlkehB7trGjd8hCAEIl +HRXWP6aQqJ2A8NF6AXjtlPDGBlun0xIEjQUB3rCnSezAgcpMXW0h4DUav5OJ +HcrZqrNZQBi0VzilSTVQiFIqnoynReDGeacuxSd4f8iWZW0MUeiav75gic1Z +wFJcdVAUUsaEkvZiKzBWO+cPi8KpZZFqpdgeFgllb/rEwGj0AGX9lEJt/mHh +kq/E4eNu/kfnGyn09d6l8z58EhDaFONUhT0ynH8nz0oC5Jt1PPux+Q9979jU +IAFJq3d8MHpGIcs4lw0+lZIQW1ztP4pdk20wm5shBd/0nLqDmiiUTS1EbDwk +ByYPHzk+f0mhra6nv4YXyUHimfaFBeyRZ2Jbilhy4PubR0i3hUIbsteJK7jL +w+ynr0G3sJ/5eZfzmK6GX0bhAjGvKDQ13ve/oZMKcP/oqU6n1xQSC7asKLdX +gqs32MmWbynEyubf6xSoBJ2C4VtOY1d3t8uMnlKC2MYdvi3YXna7T6o1KIH/ +PtX27e9wvrURzml6ylBhb5pEdOD3s+9NxEiqgLLYbF7mewq5BCzXsulXhSCf +Y/pEF4VQhKverj+qENLoTpRja8ZnGDKl1GCcrv+55AuFOO4wzGO2qwFDYZ1T +JnbRV89dZU/U4Mym1vL+bnw+dxaekM5Sh5GBJW7/68X5LO0/sP00QPPBQ+Wx +AQrd2XHty1yMBqBnrKGtFIUu+fX3cd/QgInJ76LZ2Mzjh4flOzSgEtyueLIo +JFKXzrHDQhNkdYNc2gbx/DDGNGuV14L1XeLRSzaFZJQux54fWAernczt+Ccp +VHduRuMnpxZMzW+JjML2mnbvJBW1YN03W5lh7FvPVDTMvbXgmCmz6fUUhZQC +at7Nf9QCx506pakzeL2FlCr5ShvOFdl0W85TSE5GnlRw1wFZ4S+36X8UWpdz +SOAX0oNtLjWPG4RZyI95clbLQQ961MptrERYKFU56auPlx6YjKqbtmBzZZXc +b4rUg6o1yd7vRVmo6xbbJalUD1py3sZPrGShs6k+6RrKDNj8hOPgRikWYp23 +03ZbugEU6nQ7ZJVY6HaYilNlqz7IehVfldVnofYIZBiXYwxZhlIJM/4spOj9 +3mF30GYIS/IeupjGQsS/qmK5IwBrwzVcgt+xkORwNa+knzlMCxxaUSo5iA4x +TLqTNC3BJCHnbPKeQeQ3+rtZjG0F/eeyogcLB1GReThvRps1SCdwm1/hG0LZ +M4FPClO2QXm9t3UcMYTmzVa9fhZrC7KfC7IC3g2hHg6uyX5fe/h17sCuLKsf +KET2QMIJZUewLZBak1b9AxXva264Eu8ECkdL/OI2s1HUtNTc2n3b4YUlR7rz +Ezaatdmy88UeZ0hLXimU6DaMjD0TzajtO0ChbG5V/OwweieVHviM4QI75ewN +Ay6PIOm7J+ty17hCY6BVgYHpKKru07RzENwJc1IL/5UOjSL5zomAiNGdMA0j +t3dfHUOMK4mFd/p2QYfwnSuV7uMonXtaO6nRDfheuLB4l0+gKrP1XfEP3aFQ +WnJB8tAESjU8J/I73wPSRCfTB3omUNuXnFOMC57APp6fddEc/yfsb6qEHveC +T08Hxn1KJ9Fk8A6OEOZuaNmcp9knNYVmt2jsHbPwhg3Xh3UfH59CuaOf58MN +9oCO4Fte7Ykp5HY7x3+3gA+EDwaZb9k1jcrLbPdwnfaBPJ4p4c3Pp5GxzLuf +Z3/6QPBnaacAjRmk3BfQ9XafL0xV5jqEnJlBA8v3O9787gsWe+UHOIdnUPsl +B39rVz+ghDO+UGazKCUyY/nhdj8IMmZnRaTNorr6fz/9t/lDlfTj2cbBWbTC +C04zavzh138Z12U0aKSw8kWbbJ0/bA3njVLVpJFOq/2qpfX+4M1v91h7LY2c +TTzzPj3xh1r1s1FIi0YpshGvjr30h6T9+UXuujSS7ilY0fzJHzJWX30fakwj +FW/JVK85f7A7/zxvzTYaGfuM5cZvYIKZZXdeGUmju2kT4Q4GTHiguGR3fACN +VnZMmUoaMcGhzSBm114ajVnNdeZuYoK2B4N/YR+Nv18cS1rNmaB0RdDSKJhG +QnMi7qLbmcC3LFI2LZxGAxf1l2UEM8H1U67DcCyNLtVG76u+y4QT7x7HvLxK +o2C9a8aRuUzYWlWpFH6NRnZ5pcuM8plQ0B+hK5tKI/5rrLwHRUxoMPpyKSiN +RvFhTuyqCiacu1VmtfQmjaI1VPZXPmWCkJ7aGbnbNAq89iqo7CsTjN83nu3K +p9E2IZZJWB8T4ivlbQ8W0GhNPIeg3jcm1OX9L5y3kEasMP2iUooJ1pKl87pF +NPJ1yBi9P8KEy7Mq72JLaOTGEx5SssCENZkncv+W08g6XDq0UIIA6bObVM7U +0ehpximbpFUEGCjFlUk8opFJ65RKpDQBNcEVZ7KxdVRffbaQJ8ArxFagvp5G +Uh+PWnxRJcD974egoQYaDW/skeDXJ0BNYmmk9HMaXebMfBSwg4DyFsGBqVa8 +/vUCqfauBMjFDzMCX9MozjMyjLGLgDCu+Rd92JEVTur/PAgQ/6xT9+oNzk8u +SbzqR0DRB8a71HYaMVr8mM8PErBd+Vr6ik4afUxUXa6cgOuntLgOdNGoGAnu +HUokoFJMdGszdtzozLOiZAKsIxpYCl9opLftWYzRNQIUKxi67diXOPyn7G8R +EP7n7LxaD422HMj8HFlIABEhbF7ZSyM5uTMGpsUECMielOHuo9FMy4FkrvsE +xNmV2TtjZ6kh+0vlBByO4q0bwf7T09Nwp4YA/djueqlvNKqwk8l900wAZ7GU +k8sAjc4vcPKktBAg22NSnIrtl8v2dW8lIHSHDrMbW5i7RmagjYAjyds/+lI0 +Cqp1u/zzAwFzKryfmSwaKWtejVChCBjqWjC1HaLRwsdjHT9YBHwv414Zj90e +T+iUDBEQsWQl1GPH9G9gG48QoMlema79g0ZdqR27HacJkMpl7uNl0yiJV8Qq +agkJMRJvzdKGaVQ31eN5iIsExvGu2dfYgz35YSE8JNR6xnxYMoLnocIy028Z +CRNmvnIB2CyfyF82IiSkuOs1qI/i/HZWolZiJNwKLvzoir3JUFQDiZMwyO8t +cxI7QbBwJ0OKhMfeG9W/LNZrektlFEn4dDzb8cQYjcicwmZxZRI6Y+++yMVO +SDjSu0KVhMSgc/vbsFmkmCC3Bglmhm8NpMdxXcx674gOCQfdd3blYNf8FYtl +6ZHAXuV3vwmb+tF3pW8DCcvjeMtY2Bsboho7jUhQ1v9nqDKBz3NQsfwjIOF2 +Vqv9FWwht6P6D8xJqBh6E1uCbWyx1a7UkgSx3+t7mrEvSX07krOVBAnJWamf +2NXcJQkZNiSsH7b7uWKSRt/Hj95LsyPhjOowlxq2UZP4+4tOJPBWDlx3xPYr +/TZ82hnvT5y+uj/2xZslnP+5kOBR8uDrYexvYdt0ItxI6PDY3JaKLegtYR3q +QcJubiO+vMV+277vDvQiId/DOah68fnVx857+5BgU/KhshO7mt8my82PhJXx +xjf6F/vNSjx0ZpKQXlVUMLrYr/97mx1JgoWBzuD8Yr/W+6wte0lwWldvzzWF +8z049gcCSRigXXoFsC9m2azcFETCMs2pG+LY1Rcl1+qHkFBwOfmkHPa3yAGz +9aF4PeqGV1WwBZilbhphJCSrf+nQxDZ0jDmgfIgE/V/HTHQW+2+0PSUXQYKA +pXz7BuwLqqvSJSNJOPG55pIRdpUwVS4SRcJ8s3PkJuz+X6Uty6Px/LlSFzYv +9h+M6eeJIWFy/mCrKbbBO9v5f7EkNPnOGyDs/wPNQR5e "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6792016274517501, + 1.4341423175120425`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6792016274517516}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10347,21 +10683,21 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6792016274517501, + 1.4341423175120425`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6792016274517516}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10375,104 +10711,104 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwV1Xk0F98bB3BZIiFLyJpdFOGTreQ+tpQ9UbZk+cwoIVF+kqhvtC+2ikok +yi5rQlJKkqJoE6HMhz72bUjb7/pjzpzXec488773PHdG0e+AM8HJwcExhK/F ++8E32uoP2t+YZoZpCPLUUch0LFvfz7IQ/TvWghbdl2GQomJZh/y08z8u2on5 +eqkA4zmSOdPcuRS7NDK2kceyFc0mqhryYZ9tWtUQm/8WVbk++bsM+2H7wVu/ +9d6jT7031gpgs7taoo/UfkJlqPKRELY0pexJW3SjTacFK0WwbcejjcNbe5H9 +q2wRcez63+zlkfn9KFH5aMcq7A8nJI9WhXxHu/ITFmSxx5Zasmf0KPQ2mjql +iL30Qqg7Y46FumuORKphy4ukNx+sHUJmp+3b1mI7yNB3xyxGULV/RaEhNpmp +JKHFN4a4X1gzTLFjVR3j97eOI+s9MqutsD9Jduoeyp9EldMn1VywmR6B+5Iv +TCFXdylzL+yJmxy3y0KmUX/T+FMmNp+SlvCk3iwyLfCZicBOYTZaC4vT6PXt +X9nHsRXuuceun6PR9YxPNeewjdadGguunUdKbe4Smdh7DXpb2Ra/UXTgiQtt +2DORh7n51f6gvpkNAd3Yx2uXm2jw/UXp/Fr3fmCnglFBQOs/dMxhZCfPI5wv +p9kyLH8JSIuWHTbDzm9K7jshwwn6j1KitmNPDHpHJ17ghN9rHg/4Ykdrzpbf +D+GCbyKjQyexU0oUlcf1eOD8gZr7rdhd7SP1f+/wgPSOod5ebIWpBx5C4kuB +56vvoWnswg0OSVpzS+GlyMbXMvUUevYwaklQLR9U3rlkehB7trGjd8hCAEIl +HRXWP6aQqJ2A8NF6AXjtlPDGBlun0xIEjQUB3rCnSezAgcpMXW0h4DUav5OJ +HcrZqrNZQBi0VzilSTVQiFIqnoynReDGeacuxSd4f8iWZW0MUeiav75gic1Z +wFJcdVAUUsaEkvZiKzBWO+cPi8KpZZFqpdgeFgllb/rEwGj0AGX9lEJt/mHh +kq/E4eNu/kfnGyn09d6l8z58EhDaFONUhT0ynH8nz0oC5Jt1PPux+Q9979jU +IAFJq3d8MHpGIcs4lw0+lZIQW1ztP4pdk20wm5shBd/0nLqDmiiUTS1EbDwk +ByYPHzk+f0mhra6nv4YXyUHimfaFBeyRZ2Jbilhy4PubR0i3hUIbsteJK7jL +w+ynr0G3sJ/5eZfzmK6GX0bhAjGvKDQ13ve/oZMKcP/oqU6n1xQSC7asKLdX +gqs32MmWbynEyubf6xSoBJ2C4VtOY1d3t8uMnlKC2MYdvi3YXna7T6o1KIH/ +PtX27e9wvrURzml6ylBhb5pEdOD3s+9NxEiqgLLYbF7mewq5BCzXsulXhSCf +Y/pEF4VQhKverj+qENLoTpRja8ZnGDKl1GCcrv+55AuFOO4wzGO2qwFDYZ1T +JnbRV89dZU/U4Mym1vL+bnw+dxaekM5Sh5GBJW7/68X5LO0/sP00QPPBQ+Wx +AQrd2XHty1yMBqBnrKGtFIUu+fX3cd/QgInJ76LZ2Mzjh4flOzSgEtyueLIo +JFKXzrHDQhNkdYNc2gbx/DDGNGuV14L1XeLRSzaFZJQux54fWAernczt+Ccp +VHduRuMnpxZMzW+JjML2mnbvJBW1YN03W5lh7FvPVDTMvbXgmCmz6fUUhZQC +at7Nf9QCx506pakzeL2FlCr5ShvOFdl0W85TSE5GnlRw1wFZ4S+36X8UWpdz +SOAX0oNtLjWPG4RZyI95clbLQQ961MptrERYKFU56auPlx6YjKqbtmBzZZXc +b4rUg6o1yd7vRVmo6xbbJalUD1py3sZPrGShs6k+6RrKDNj8hOPgRikWYp23 +03ZbugEU6nQ7ZJVY6HaYilNlqz7IehVfldVnofYIZBiXYwxZhlIJM/4spOj9 +3mF30GYIS/IeupjGQsS/qmK5IwBrwzVcgt+xkORwNa+knzlMCxxaUSo5iA4x +TLqTNC3BJCHnbPKeQeQ3+rtZjG0F/eeyogcLB1GReThvRps1SCdwm1/hG0LZ +M4FPClO2QXm9t3UcMYTmzVa9fhZrC7KfC7IC3g2hHg6uyX5fe/h17sCuLKsf +KET2QMIJZUewLZBak1b9AxXva264Eu8ECkdL/OI2s1HUtNTc2n3b4YUlR7rz +Ezaatdmy88UeZ0hLXimU6DaMjD0TzajtO0ChbG5V/OwweieVHviM4QI75ewN +Ay6PIOm7J+ty17hCY6BVgYHpKKru07RzENwJc1IL/5UOjSL5zomAiNGdMA0j +t3dfHUOMK4mFd/p2QYfwnSuV7uMonXtaO6nRDfheuLB4l0+gKrP1XfEP3aFQ +WnJB8tAESjU8J/I73wPSRCfTB3omUNuXnFOMC57APp6fddEc/yfsb6qEHveC +T08Hxn1KJ9Fk8A6OEOZuaNmcp9knNYVmt2jsHbPwhg3Xh3UfH59CuaOf58MN +9oCO4Fte7Ykp5HY7x3+3gA+EDwaZb9k1jcrLbPdwnfaBPJ4p4c3Pp5GxzLuf +Z3/6QPBnaacAjRmk3BfQ9XafL0xV5jqEnJlBA8v3O9787gsWe+UHOIdnUPsl +B39rVz+ghDO+UGazKCUyY/nhdj8IMmZnRaTNorr6fz/9t/lDlfTj2cbBWbTC +C04zavzh138Z12U0aKSw8kWbbJ0/bA3njVLVpJFOq/2qpfX+4M1v91h7LY2c +TTzzPj3xh1r1s1FIi0YpshGvjr30h6T9+UXuujSS7ilY0fzJHzJWX30fakwj +FW/JVK85f7A7/zxvzTYaGfuM5cZvYIKZZXdeGUmju2kT4Q4GTHiguGR3fACN +VnZMmUoaMcGhzSBm114ajVnNdeZuYoK2B4N/YR+Nv18cS1rNmaB0RdDSKJhG +QnMi7qLbmcC3LFI2LZxGAxf1l2UEM8H1U67DcCyNLtVG76u+y4QT7x7HvLxK +o2C9a8aRuUzYWlWpFH6NRnZ5pcuM8plQ0B+hK5tKI/5rrLwHRUxoMPpyKSiN +RvFhTuyqCiacu1VmtfQmjaI1VPZXPmWCkJ7aGbnbNAq89iqo7CsTjN83nu3K +p9E2IZZJWB8T4ivlbQ8W0GhNPIeg3jcm1OX9L5y3kEasMP2iUooJ1pKl87pF +NPJ1yBi9P8KEy7Mq72JLaOTGEx5SssCENZkncv+W08g6XDq0UIIA6bObVM7U +0ehpximbpFUEGCjFlUk8opFJ65RKpDQBNcEVZ7KxdVRffbaQJ8ArxFagvp5G +Uh+PWnxRJcD974egoQYaDW/skeDXJ0BNYmmk9HMaXebMfBSwg4DyFsGBqVa8 +/vUCqfauBMjFDzMCX9MozjMyjLGLgDCu+Rd92JEVTur/PAgQ/6xT9+oNzk8u +SbzqR0DRB8a71HYaMVr8mM8PErBd+Vr6ik4afUxUXa6cgOuntLgOdNGoGAnu +HUokoFJMdGszdtzozLOiZAKsIxpYCl9opLftWYzRNQIUKxi67diXOPyn7G8R +EP7n7LxaD422HMj8HFlIABEhbF7ZSyM5uTMGpsUECMielOHuo9FMy4FkrvsE +xNmV2TtjZ6kh+0vlBByO4q0bwf7T09Nwp4YA/djueqlvNKqwk8l900wAZ7GU +k8sAjc4vcPKktBAg22NSnIrtl8v2dW8lIHSHDrMbW5i7RmagjYAjyds/+lI0 +Cqp1u/zzAwFzKryfmSwaKWtejVChCBjqWjC1HaLRwsdjHT9YBHwv414Zj90e +T+iUDBEQsWQl1GPH9G9gG48QoMlema79g0ZdqR27HacJkMpl7uNl0yiJV8Qq +agkJMRJvzdKGaVQ31eN5iIsExvGu2dfYgz35YSE8JNR6xnxYMoLnocIy028Z +CRNmvnIB2CyfyF82IiSkuOs1qI/i/HZWolZiJNwKLvzoir3JUFQDiZMwyO8t +cxI7QbBwJ0OKhMfeG9W/LNZrektlFEn4dDzb8cQYjcicwmZxZRI6Y+++yMVO +SDjSu0KVhMSgc/vbsFmkmCC3Bglmhm8NpMdxXcx674gOCQfdd3blYNf8FYtl +6ZHAXuV3vwmb+tF3pW8DCcvjeMtY2Bsboho7jUhQ1v9nqDKBz3NQsfwjIOF2 +Vqv9FWwht6P6D8xJqBh6E1uCbWyx1a7UkgSx3+t7mrEvSX07krOVBAnJWamf +2NXcJQkZNiSsH7b7uWKSRt/Hj95LsyPhjOowlxq2UZP4+4tOJPBWDlx3xPYr +/TZ82hnvT5y+uj/2xZslnP+5kOBR8uDrYexvYdt0ItxI6PDY3JaKLegtYR3q +QcJubiO+vMV+277vDvQiId/DOah68fnVx857+5BgU/KhshO7mt8my82PhJXx +xjf6F/vNSjx0ZpKQXlVUMLrYr/97mx1JgoWBzuD8Yr/W+6wte0lwWldvzzWF +8z049gcCSRigXXoFsC9m2azcFETCMs2pG+LY1Rcl1+qHkFBwOfmkHPa3yAGz +9aF4PeqGV1WwBZilbhphJCSrf+nQxDZ0jDmgfIgE/V/HTHQW+2+0PSUXQYKA +pXz7BuwLqqvSJSNJOPG55pIRdpUwVS4SRcJ8s3PkJuz+X6Uty6Px/LlSFzYv +9h+M6eeJIWFy/mCrKbbBO9v5f7EkNPnOGyDs/wPNQR5e "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6792016274517501, 1.4341423175120425`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6792016274517516}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10482,7 +10818,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6152015704378887}, + AxesOrigin->{0, 0.6792016274517516}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10510,7 +10847,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6792016274517501, 1.4341423175120425`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10518,11 +10856,13 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913355426284504`*^9}, + CellChangeTimes->{3.9913355426284504`*^9, 3.994356033665299*^9}, CellLabel-> - "Out[277]=",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] + "Out[116]=",ExpressionUUID->"c2175283-de1a-4f00-a3ee-30a7f68fb172"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"x", "=", RowBox[{"Plot", "[", @@ -10582,14 +10922,1266 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918494141657047`*^9, {3.991849451432905*^9, - 3.991849451715925*^9}},ExpressionUUID->"00a32bc3-df79-9e43-8f20-\ -d4884962c12d"], + 3.9918494141657047`*^9, {3.991849451432905*^9, 3.991849451715925*^9}}, + CellLabel-> + "In[117]:=",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.71764380672504`*^-271\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 117, 41, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943560338533*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"aeaa296a-a795-4d3c-ac90-89e3a0e029f8"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2105538684494784`*^-281\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 42, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356033861896*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"74d21ef1-cedc-4293-be2b-828ca4352dae"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.8988187393943133`*^-292\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 43, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356033868939*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"8e018081-6e04-4a81-b050-7d22d5a698cd"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 44, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356033877142*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"dcf5d8d5-6ea4-4a4c-875e-2841e891bed6"], + +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0VW8XB3BRmlCZh3u5xgwh073uZG9D5mTKVBkqFBVlCk0yRkmlyE8l +oUTGezMmUdIcUSKRShIiY4Xe8/511mc9a511zn72/j6P/M4gR19eHh6ekCU8 +PP9/znx88lApJc9IoCK1+shdS6OOq5KRxl0nIT834fTWIhVAsVc7JbvOQ/iB +lguUIiqE299+x9eVC4cVnEp+3zaHdWMS53+/q4DgtW0ZnNsu0FdvFzT1rgm2 +xqvHPiv0A3Ol4d6Jd+2gvO6HGrsgHH6/o10cfzcAr9TSKKKZCdBsejOvLXcS +VnJz7ZdZZwCpr2Zw54YFqL+47lvvkusgus/r9nJTPjzWMN6NE/lwXse8zm7r +Cqy/caEqvvM2vM/c2DixVhA/9IrH1A6UQNabojXhyoJYlBx8RmqyBDyE1nv9 +oQvibEixyAG+UvgQS17k3SWI2Y//HZlVLIX+A6tYolxBrEp/Y5eyuxSGzL5U +Ud2FUOVrs3fl51KYG88ojb6+BoPSx3in95VBSt7xV7xS63Be8FHDRcdysNbf +KyymuA437FUgmbuXw4qHjlvXa65DqZsH58e9yiHus3KPjfE6NPPqROr+cjii +8Hwwfe869HjXxz2WWA4HciQXVWrXIbdowJS/rhwcsss32GwTRvVDfeQhcgWs +3fBf0A5fYeQ6fv1vULECXtbFVQQFCSOl9W1kn1oFWPe4GqbHCmP8nQ8OjQYV +YCK9aNpbJIzl5lXuRpsrQD/TelvQvDBu9NsooBFdARLpn09duCKCbwZ3lD5o +rwBJDW7cXIEIVtk09pUS+yjdlHB8R5kIJi+Ui1/+UAGy42ph65sJb4q+tH2w +ApRtg73rhkQwg13QdvN3BegtXaB+1hPF4j0RvXZylbAlVPyL7lNRtF1ZMPXB +rxLsVw99zHgjit7p1SYagZXgmFvzfv6DKFrw650JDaoEl9fbX7X8FMWe1kLx +uYhK2LHhRq2HmBjeTSfNNiVVQuAX7XMnvcUwuH/qtX9hJSQ6Wxm1z4ihZWDT +/tHBSpDmvJTmXSKOeyJGNg8PV0KJiPOszmpxPB3Yaf5prBLetnuWnZMTx+hN +TrH3ZipBySFUwcFSHOvKb6lr83OgafM1/teXxZFz09V9VpEDC+bTL1+wJPAq +ad8/0jYOpBVEFS2YS+DtJcU7d3hyQImfJ0nTQQLP8578luHDAdtHq4zP+Erg +H71Hrn/9OZBlSqm0TZXAEEWR/uhQDhiiTcazPglcYiewdPdpDoTQr3s9OSmJ +Cm7nWjuqOGCdIzRlc1oSt7RW12nXckBh+ZGklxclUbL5Tm58PQded7iUv7kl +iWoW5+0UHnBAK1iA7+NLSYzlL98o95QDQwURBb+kpVDdc2X1+h4O3Bf8yghT +kkLBAm26bi8HLoU6vprVlELefZtraH0c2GSiOTePUrgYf7RG7zMHcnsHrJb7 +S6G10dFXP4c5sF3UblSmkljflc0f+ZsDetF1MVfrpVDa7+Vbvb8cWDWgKi7f +IoVyd1ZXfp/nQE0pH6i8l8IbR7UumPNwQdymJm3jPyn0vqW2+hE/F17HKOlv +spFGw8QrtzqFuXBz6FzrY2dpHLYUvmksyoVjW/5tt/aUxu/+JxpviXFBk9wd +v+UgsZ5marlHkgvJ1WffuWdIo5RQ/uNiMhfMfv6JOvBZGkecruy3Xc+FSMt0 +9Qcj0miTfGKJryoXSq5rdovMSOOVcvrEYTUuSDp702tWyOB7Rdeh8xpcGKl+ +NMunJYM39lY7ntXmgryw100Xmgz+11YzcHIjF1wC51wKUQa3twu8O6jDhUay +xl07Jxl0oPNNGOtx4cLJtNDLh2XwdvnKlUVULrT2qCmNxMgga6lvdySNC/P6 +zW+MUmQw3W1C0syQC37fpnW/XJHB+kG1gad0LjBst01oNcugWJPVo+ssLgTl +T+XEPJdBkYsOFFs2F/IWz9h3dMrg3vhnExOEhcobSyOHZHD5+/Z5beDCgJjK +gYeCJBShl3SEGXNBIug+WUKChAf965bOE7ZtdXuxl0LCh3t6OEdNuHA3KmXD +Gj0S9qljVogpF368UfrgwyLhp/LFtm+EKZoNKZxNJFS81JzqakbUu2982N2N +hA0/dmWrbeLCfcPkrGIfEnaVPvyZQnjqnKL1vwASngqlvvhO2NPMpTDvKAnB +018j05yoz5WfbrMJJKyBqpIhwq0zSSus00iYkEl/oG/BBd3COv+fuSR8Wc5/ ++T5hf96tEibFJHQNG/VeJJy9bawlnUtCBY7RPUNLLrRxEsO/NZBweMSm9ABh +fiF5FUYrCR8s2WOYQ5jpX9t5uo1Yp35zf0E4uNEpvq+bhOU6cmIzhPOlRvV1 +v5DQc9YvUNqKC92HEr7EjZJw3Yi4J4Pwmudy6e9mSJjVljS2lbCZco2pOg8Z +97VIyO4nHHnMcfLISjIGmFHGjhMuefcj95UwGbvkeLxTCX/eGO+oQCKjVoJ4 +WCZhyWRZ3jBlMi7ON2tdJWz7uar8sRYZX3sHpF4jHMNy8JE2JCPPl30Xswlb +el79RTMho+B056F0wkInfsRutSXj4JkOg0TCndcNxUJcyNhTrNcfSji7Ob4g +zZuM/oqNITsI7/raTisJIGNEuuUvJKy+nPLkWSgZOYeu7JAjPKG63+P7MTI+ +XUyrmiPqUW1d+4P/FBnvbJpd8v96Hd+3/KjSBTJ+kS0wyiZsnuosZHKFjI3q +YUF+hAXLrl/zuknG6tfsSxqEO9rGNh4tJ+N5dg/nB7Ff/00ym7LqyPjAR/1F +AeGdYqecqh+RMfnnyk/bCY+7KYZPviej5OsF3lqiH6qigpev+0JGVeMuUR/C +x7LvZWqNkXHS+ZUaH2GBfte6vbyyKJ1bsduQ6K83S/JtEwVk8WPTodRnRH9m +Kf7qzROXxdsOs03uhNf7n+bpV5fF/5grnP2Jfh5Len9uQV8WF4TCOYNE/3Nu +qyjKgCzasQPX+xA2GWvc5OIkixM8D2wtiHnxDJtOfh4ti14Kts+7jLignGFC +Go6XxTvrZOY2Gv0/L87eWZ4mix6d5uZxxDxGzau9NsmTxYSTDQ4kYn4vxnqK +1TyXRcn0ZzuEifnenl9U8PatLBqOC3eaEvOv8HiONtUvi/bPJo8FE/lQtuqC +h/a0LGprNxyqM+DC83OPr+WT5bDF86CopC4xP5WiOs3r5dDtUJiHIpE/Hp0+ +Tf06chhmWflZjcinIcn5LzLmclikYtWqqsUFvpyN6ucPyGGIiYbYGJF3jJLL +nGP35dDEnPdKJoXo53cvF8Za5ZD3b3v2ATku2PEstfBql8PgvsQslCX6x/HA +e/gqhzG3Gy91yRD7Hy1//MQyCkaWXX7YJU7Mk9zMDWMNCl54lpMsI8CF6cq0 +1t/aFLSs+YgVq4h6WGqMlutT0GLVEuFNK7kQf9CbqmBEwcmbWwW8iPzPan7a +yutAwVSG6sXdxPnw0P/aaHM4BfdZdl6umuSA1Txd+Eg0BVXdPveu/cWBl2kd +VP0TFJyafeHhN86B9zUrT+SdoqBI11t+/lEOjK0OFY7PpuCDevoOyUEOSJZZ +0sybKPgTNCqS33Fg39zEiVZBeUy5v/daJXG+Mg76iQ8Ky+NC/T3jAC4HVgx3 +F/FJyuOjWo97pEoO5Pc0vzVSkMcCrQLrsBIOfGy4uIFLlUdeKdqy6TwObImn +d133ksf7JkuZOuc4oCscox1dLo/X7Vf0lfhxgCdl+mHmXXk02BZc8nUX8f18 +AR536+RR+XnabUnifhA47Rg/8UieyOscvRDiPpHXpdTj3y2PHQ9uvvmzhQPi +11oTnPkU8NA9+Rsuhhz4rbH2o+ZWBSxXe+7tRNxPZq5Ix+h5KOD98SQ9JT4O +TK1RVqJ7KWB/fF3hxL9KGJukB5jtVcDRmb7kk78rYaBu14zHUQUsvvF6z5GR +SnhqUyWUlK+ADDOx7va2SsgK9ISBaQWM6FjWS8qqBFZRcc6lS4o43nvrQbV8 +JUwIW3u7NCnhkjtpFlrKFfDltLfLoeUq2OL07dipX2Vg9TPC6it1PUoKkhuC +j5bCyK4VIZzjqnh+yaJPdksxcd+X4E1sUsPQYb1VasK3QfiFSmrZT3WcFbP7 +sPTcTSAlldpTqRvwyYelP1VH8iBTg75WxF8TZ5fvXqF+NheeShsbTJ7Twoqy +0+4nPXOAQWpK036rjdt6ZaWm7LNBiC831OfkRlSkZ0jNJ2SCbIwcy11FB4eO +LM13epkOK5W333V8rIO1KzJFO1LOgRZbqjRihy7WnHKwbqg8A4c+Cjdb8+jh +j/y2c87pSfBz8vRWq0w95Ni7VNwNigML7ZYsK0197N7+vL1n9AQ0TDL/zr7U +R+k5s8AG72i4/rxqp1ObPs5EvgvItY6GuHy9pyVv9DHPt1D0on40WLlqXPbt +0kdadbZtwYpo6KiVpr35pI8PG2vSI8qjYDjm96GSKX0Ubi6/92pZFIivrRre +LW2AuYGChqo1h+HABt3uNl8DvHc8c2CFVTiEzUr/8dpjgMNySz+164fDkSY+ +6bEAA7zS8lejmBIOKW6d7quCDfC6oFfC6bkwuBV3+L1JlAFWfO7bzVcYBgMf +GroqUw1Q8M69lCaBMHA5Y/PuYpUBWs3seWfbFwLssd0d7iupaP5w6kpryUEQ +r7PIrV9NxWfUsE9G1w7CWKJ6sJwQFW0piXcbzx6Eq/Ljq78KU/F98tm/g8EH +YdE52jSYREUus5N1T+8g3K87V5GgTcVvyeTF5LpgMD7VkFa5lYrObuHchYIg +2KQkuVkwl4o8IroRr833AWf0kfzuPCru+nb8ca7mPlCqCpmpLaCiwScDpyTR +fbDU+tW1PUVU/LLf5efpgUBoCkr41cyhotnE2fmo44FgVDeVEfWYinpboxP7 +6wOA6tg28G2EinbFtIWTm/aC6onkw000Gl5+0GLSkOIH9cz8ZbYMGkovFam1 +CPMD+9n75ztZNPT/HnT5i6cfHD4wXTxkTMMbFosebrp+0Lrd+5OQLQ2DoteE +qXT7wh461XqbNw0fr/kV4qDpC4W/PslMJdGwy2WbfuKnXaDuS7+v3E3DOX3J +plvHfOCsgt2f2A80ZDsXX36/3wem+nYaDHykoYhjRIbkDh9o8DhddPUzDY8f ++/CxkekDjvZ9GRKjNNyxuCS15rc3RDLjg1fyGCJHjXeZ6WFvaF3XJj+qbIiN +2V0/vi16gm/DnjjOQUNM4A+4dH7PNhjbPxyxKdQQ/3kN6Gy02QaHyfsC34Yb +Ymy4St53zW2QfCTIcS7aEKPT9nNLJz2gjBFOYSUY4q8uWdWEEx4wfze2vjnL +EPnNJzytrrnD+dKrU+3NhigVWi2cPu4KJC/K0K4WQ+QtUJ47+dYV8oVye6Za +DbFOmyGUUu8K1fvzm8RfGuL6YzVRg0mu0KtRnObRZYiL+ltIrQquoHqrZsPA +iCHeSfo6oLTNBe7ndOyeEKNjwLYr0zW9ztBvK+8VLknHsgujXJHHzsDze7/7 +X2k6ppyr8owtcwYTh+V2yyh07PQVVsiLdYaWJQyalDod575yj3xXd4bnO6+t +NDai482fz1aHHnWCbqWAkjQ/Or5YriyxRtcR/r6+e0tsLx3rH48t8Mk6Auko +342sQDoGcuPyBFY5wo7O7Iy8YDoe4TwZcxtwgP74Vyeqo+gYtX2msOeCA3wb +1HfqT6Xj+W3soOg/9jB169+sdhUd1+TPz/oXbYFBF/OcUzV0/KcjGbszeQt0 +LT1j+bmOjn4R0TPRe7dAnbf05UuNdDwk0a27WnULnJQ0YCw8oaO68n92mQV2 +sDYp4MjTD3RUCksudC3cDBv8O3l8eRmob6rQ0vTQBmTFSIUNSxnoEN7tH3jT +BtY273SQXM7AovreKe1kG5iUHb/+bDUDRVaLhAnY20Dt21WmumIMVNE6f3Zt +rzVYmmP8v/UMJJLIX2feCnYpF63M2szAOG2PaIadJUQ98gxQsWeg3Q+FJ0t1 +LSHNV/hZhSMD+1+r3h4Rs4T6/MjTz1wZuPm5Za3oRwsQVbFcs+DDwMCYfOXm +IAtoUfkq6h3OQOO8J4sxmeagripHUbnGwNVXdru3L5oBtrafqLjOwMv7u1xJ +g2bgsifhk1EeAwVeLyk/8cIMYm+N5roWMjDT3nFdZrYZfFCtVz5VyUDJlIWP +i0wzSFVz1xh5TPzfXuqFjOOmMKF+gVoxzkCJyCGmvZQJdD3HTSKTDGTdM3+i +vMwEGg+MOYVOM9BsSLdpzYQxpFZYHaT+YaBThWwJ5YkxqDN4imv5mBhCWxWm +H2UMO632yzeLM5HZvJ0i2o/Q4W8h0MFi4mPncWZIKEDdymlpA2CiZn5Yx5Q9 +QG5RrtolYyYOxomMZGkCBP9cMHczZ2JaG0vU+ZsRCEZwYj5sYWKv9obS8O1G +YJ4gP/tlJxMvHYzM8N7Mhuq8v5+mk5j40enP/iFLJlBNQ2etU5gYWlav7abO +BO6nEYGcM0wU0nQy/LaaCRWyH2nW55kYm5dZvPMVA4ozG89c/Y+J9xWjBJ67 +MiDndDzdooSJatfWWtgfoMOp0DXnMt8w8Uah+IBXOQ1WiCQVjHYyERUt5GMv +0SChnKfepIuJxXYss6ZoGsSNTQyOfGDiav6QlxfMaXBsTwfLeJCJylJ+62N6 +qXBo++Wh73NMjDfTenxgLRU8zBSRKctCvi+zOUOn9GGhY4VQM4WFLg5xGW7B ++pDjO9ZjrcjCAf/FB19d9GEwoSbCQ5WFKfmZTFclfTj0ZEtppC4L+8NF4i80 +6kGy3RHZanMWmlIDBlwXdaHWrXNeP4iFVrVWkZapOrDje+3T+oMsnK3zklh/ +WAd4onIyzUJZON68yVtupw6Y/xeo7xzJQv5LLYnbqTrQ3rtkX0gsC291FVnw +92+E4Z1aPeUZLOxrvnOLx3AjyOxPrNFqZOEG4wyDe5OakPrPzyClififiImt +Qq81gfe8efm3hyzMEeQWJhRrwvDdZYU5T1jYmnDEfsRXE2p54jKF37DQOdLb +N7F7A3ikn4iY+cpC+497A3qeakBmXaRBw2o2psbZBMy2qIGAnXu5tBAbz2K4 +9eBNNTjRb6gZsZaNAbvPNM8mqcGeZXNKG8XY6Fe1czrGRg1oW8JFc2XZ+Gsx +PE27XRXeDhyajNdh4+od+KLt63oQW7WvfLMrG0dO36uyUlaBPNOjUePubKyu +31WrulwFdI+mml7YzkaxoMoyze/KYDde1tnlw8aUR6rPbt1RhoS307937WNj +FT5e6mWoDHO5x02iYti4vPBkTIGzEnQzL7wpKGJj+WHyUMxNBdgTlpdtVcLG +DeHCV1+eUYCZEq7vSBkbf5/T12KFKoCwQteszl02Jn7abRZprAA2K8ike41s +dPt7VymiVx7qOwp2v+lk4+aLLmI+MvJgLVStGd7Fxkahup5CPnnosngyI9nD +RiVlU411IxSYqv2R5NnPxpeXbrxl3KOA5vWNd74Ps7Fi5fyRGW8K1Hcbh58e +ZaORxatCbWsKWIs6gfY4Gyff2mxK0KOAX2JYW+g0G4tdq9gp/MT7GhOyJObY +uNAeXnSoXw5O/snYVfuHjfQbyvkrOHKwVr9ww44FNorymSp1JcrB1f210//+ +sVF2qPdL/zY5+B/g11+n + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0VW8XB3BRmlCZh3u5xgwh073uZG9D5mTKVBkqFBVlCk0yRkmlyE8l +oUTGezMmUdIcUSKRShIiY4Xe8/511mc9a511zn72/j6P/M4gR19eHh6ekCU8 +PP9/znx88lApJc9IoCK1+shdS6OOq5KRxl0nIT834fTWIhVAsVc7JbvOQ/iB +lguUIiqE299+x9eVC4cVnEp+3zaHdWMS53+/q4DgtW0ZnNsu0FdvFzT1rgm2 +xqvHPiv0A3Ol4d6Jd+2gvO6HGrsgHH6/o10cfzcAr9TSKKKZCdBsejOvLXcS +VnJz7ZdZZwCpr2Zw54YFqL+47lvvkusgus/r9nJTPjzWMN6NE/lwXse8zm7r +Cqy/caEqvvM2vM/c2DixVhA/9IrH1A6UQNabojXhyoJYlBx8RmqyBDyE1nv9 +oQvibEixyAG+UvgQS17k3SWI2Y//HZlVLIX+A6tYolxBrEp/Y5eyuxSGzL5U +Ud2FUOVrs3fl51KYG88ojb6+BoPSx3in95VBSt7xV7xS63Be8FHDRcdysNbf +KyymuA437FUgmbuXw4qHjlvXa65DqZsH58e9yiHus3KPjfE6NPPqROr+cjii +8Hwwfe869HjXxz2WWA4HciQXVWrXIbdowJS/rhwcsss32GwTRvVDfeQhcgWs +3fBf0A5fYeQ6fv1vULECXtbFVQQFCSOl9W1kn1oFWPe4GqbHCmP8nQ8OjQYV +YCK9aNpbJIzl5lXuRpsrQD/TelvQvDBu9NsooBFdARLpn09duCKCbwZ3lD5o +rwBJDW7cXIEIVtk09pUS+yjdlHB8R5kIJi+Ui1/+UAGy42ph65sJb4q+tH2w +ApRtg73rhkQwg13QdvN3BegtXaB+1hPF4j0RvXZylbAlVPyL7lNRtF1ZMPXB +rxLsVw99zHgjit7p1SYagZXgmFvzfv6DKFrw650JDaoEl9fbX7X8FMWe1kLx +uYhK2LHhRq2HmBjeTSfNNiVVQuAX7XMnvcUwuH/qtX9hJSQ6Wxm1z4ihZWDT +/tHBSpDmvJTmXSKOeyJGNg8PV0KJiPOszmpxPB3Yaf5prBLetnuWnZMTx+hN +TrH3ZipBySFUwcFSHOvKb6lr83OgafM1/teXxZFz09V9VpEDC+bTL1+wJPAq +ad8/0jYOpBVEFS2YS+DtJcU7d3hyQImfJ0nTQQLP8578luHDAdtHq4zP+Erg +H71Hrn/9OZBlSqm0TZXAEEWR/uhQDhiiTcazPglcYiewdPdpDoTQr3s9OSmJ +Cm7nWjuqOGCdIzRlc1oSt7RW12nXckBh+ZGklxclUbL5Tm58PQded7iUv7kl +iWoW5+0UHnBAK1iA7+NLSYzlL98o95QDQwURBb+kpVDdc2X1+h4O3Bf8yghT +kkLBAm26bi8HLoU6vprVlELefZtraH0c2GSiOTePUrgYf7RG7zMHcnsHrJb7 +S6G10dFXP4c5sF3UblSmkljflc0f+ZsDetF1MVfrpVDa7+Vbvb8cWDWgKi7f +IoVyd1ZXfp/nQE0pH6i8l8IbR7UumPNwQdymJm3jPyn0vqW2+hE/F17HKOlv +spFGw8QrtzqFuXBz6FzrY2dpHLYUvmksyoVjW/5tt/aUxu/+JxpviXFBk9wd +v+UgsZ5marlHkgvJ1WffuWdIo5RQ/uNiMhfMfv6JOvBZGkecruy3Xc+FSMt0 +9Qcj0miTfGKJryoXSq5rdovMSOOVcvrEYTUuSDp702tWyOB7Rdeh8xpcGKl+ +NMunJYM39lY7ntXmgryw100Xmgz+11YzcHIjF1wC51wKUQa3twu8O6jDhUay +xl07Jxl0oPNNGOtx4cLJtNDLh2XwdvnKlUVULrT2qCmNxMgga6lvdySNC/P6 +zW+MUmQw3W1C0syQC37fpnW/XJHB+kG1gad0LjBst01oNcugWJPVo+ssLgTl +T+XEPJdBkYsOFFs2F/IWz9h3dMrg3vhnExOEhcobSyOHZHD5+/Z5beDCgJjK +gYeCJBShl3SEGXNBIug+WUKChAf965bOE7ZtdXuxl0LCh3t6OEdNuHA3KmXD +Gj0S9qljVogpF368UfrgwyLhp/LFtm+EKZoNKZxNJFS81JzqakbUu2982N2N +hA0/dmWrbeLCfcPkrGIfEnaVPvyZQnjqnKL1vwASngqlvvhO2NPMpTDvKAnB +018j05yoz5WfbrMJJKyBqpIhwq0zSSus00iYkEl/oG/BBd3COv+fuSR8Wc5/ ++T5hf96tEibFJHQNG/VeJJy9bawlnUtCBY7RPUNLLrRxEsO/NZBweMSm9ABh +fiF5FUYrCR8s2WOYQ5jpX9t5uo1Yp35zf0E4uNEpvq+bhOU6cmIzhPOlRvV1 +v5DQc9YvUNqKC92HEr7EjZJw3Yi4J4Pwmudy6e9mSJjVljS2lbCZco2pOg8Z +97VIyO4nHHnMcfLISjIGmFHGjhMuefcj95UwGbvkeLxTCX/eGO+oQCKjVoJ4 +WCZhyWRZ3jBlMi7ON2tdJWz7uar8sRYZX3sHpF4jHMNy8JE2JCPPl30Xswlb +el79RTMho+B056F0wkInfsRutSXj4JkOg0TCndcNxUJcyNhTrNcfSji7Ob4g +zZuM/oqNITsI7/raTisJIGNEuuUvJKy+nPLkWSgZOYeu7JAjPKG63+P7MTI+ +XUyrmiPqUW1d+4P/FBnvbJpd8v96Hd+3/KjSBTJ+kS0wyiZsnuosZHKFjI3q +YUF+hAXLrl/zuknG6tfsSxqEO9rGNh4tJ+N5dg/nB7Ff/00ym7LqyPjAR/1F +AeGdYqecqh+RMfnnyk/bCY+7KYZPviej5OsF3lqiH6qigpev+0JGVeMuUR/C +x7LvZWqNkXHS+ZUaH2GBfte6vbyyKJ1bsduQ6K83S/JtEwVk8WPTodRnRH9m +Kf7qzROXxdsOs03uhNf7n+bpV5fF/5grnP2Jfh5Len9uQV8WF4TCOYNE/3Nu +qyjKgCzasQPX+xA2GWvc5OIkixM8D2wtiHnxDJtOfh4ti14Kts+7jLignGFC +Go6XxTvrZOY2Gv0/L87eWZ4mix6d5uZxxDxGzau9NsmTxYSTDQ4kYn4vxnqK +1TyXRcn0ZzuEifnenl9U8PatLBqOC3eaEvOv8HiONtUvi/bPJo8FE/lQtuqC +h/a0LGprNxyqM+DC83OPr+WT5bDF86CopC4xP5WiOs3r5dDtUJiHIpE/Hp0+ +Tf06chhmWflZjcinIcn5LzLmclikYtWqqsUFvpyN6ucPyGGIiYbYGJF3jJLL +nGP35dDEnPdKJoXo53cvF8Za5ZD3b3v2ATku2PEstfBql8PgvsQslCX6x/HA +e/gqhzG3Gy91yRD7Hy1//MQyCkaWXX7YJU7Mk9zMDWMNCl54lpMsI8CF6cq0 +1t/aFLSs+YgVq4h6WGqMlutT0GLVEuFNK7kQf9CbqmBEwcmbWwW8iPzPan7a +yutAwVSG6sXdxPnw0P/aaHM4BfdZdl6umuSA1Txd+Eg0BVXdPveu/cWBl2kd +VP0TFJyafeHhN86B9zUrT+SdoqBI11t+/lEOjK0OFY7PpuCDevoOyUEOSJZZ +0sybKPgTNCqS33Fg39zEiVZBeUy5v/daJXG+Mg76iQ8Ky+NC/T3jAC4HVgx3 +F/FJyuOjWo97pEoO5Pc0vzVSkMcCrQLrsBIOfGy4uIFLlUdeKdqy6TwObImn +d133ksf7JkuZOuc4oCscox1dLo/X7Vf0lfhxgCdl+mHmXXk02BZc8nUX8f18 +AR536+RR+XnabUnifhA47Rg/8UieyOscvRDiPpHXpdTj3y2PHQ9uvvmzhQPi +11oTnPkU8NA9+Rsuhhz4rbH2o+ZWBSxXe+7tRNxPZq5Ix+h5KOD98SQ9JT4O +TK1RVqJ7KWB/fF3hxL9KGJukB5jtVcDRmb7kk78rYaBu14zHUQUsvvF6z5GR +SnhqUyWUlK+ADDOx7va2SsgK9ISBaQWM6FjWS8qqBFZRcc6lS4o43nvrQbV8 +JUwIW3u7NCnhkjtpFlrKFfDltLfLoeUq2OL07dipX2Vg9TPC6it1PUoKkhuC +j5bCyK4VIZzjqnh+yaJPdksxcd+X4E1sUsPQYb1VasK3QfiFSmrZT3WcFbP7 +sPTcTSAlldpTqRvwyYelP1VH8iBTg75WxF8TZ5fvXqF+NheeShsbTJ7Twoqy +0+4nPXOAQWpK036rjdt6ZaWm7LNBiC831OfkRlSkZ0jNJ2SCbIwcy11FB4eO +LM13epkOK5W333V8rIO1KzJFO1LOgRZbqjRihy7WnHKwbqg8A4c+Cjdb8+jh +j/y2c87pSfBz8vRWq0w95Ni7VNwNigML7ZYsK0197N7+vL1n9AQ0TDL/zr7U +R+k5s8AG72i4/rxqp1ObPs5EvgvItY6GuHy9pyVv9DHPt1D0on40WLlqXPbt +0kdadbZtwYpo6KiVpr35pI8PG2vSI8qjYDjm96GSKX0Ubi6/92pZFIivrRre +LW2AuYGChqo1h+HABt3uNl8DvHc8c2CFVTiEzUr/8dpjgMNySz+164fDkSY+ +6bEAA7zS8lejmBIOKW6d7quCDfC6oFfC6bkwuBV3+L1JlAFWfO7bzVcYBgMf +GroqUw1Q8M69lCaBMHA5Y/PuYpUBWs3seWfbFwLssd0d7iupaP5w6kpryUEQ +r7PIrV9NxWfUsE9G1w7CWKJ6sJwQFW0piXcbzx6Eq/Ljq78KU/F98tm/g8EH +YdE52jSYREUus5N1T+8g3K87V5GgTcVvyeTF5LpgMD7VkFa5lYrObuHchYIg +2KQkuVkwl4o8IroRr833AWf0kfzuPCru+nb8ca7mPlCqCpmpLaCiwScDpyTR +fbDU+tW1PUVU/LLf5efpgUBoCkr41cyhotnE2fmo44FgVDeVEfWYinpboxP7 +6wOA6tg28G2EinbFtIWTm/aC6onkw000Gl5+0GLSkOIH9cz8ZbYMGkovFam1 +CPMD+9n75ztZNPT/HnT5i6cfHD4wXTxkTMMbFosebrp+0Lrd+5OQLQ2DoteE +qXT7wh461XqbNw0fr/kV4qDpC4W/PslMJdGwy2WbfuKnXaDuS7+v3E3DOX3J +plvHfOCsgt2f2A80ZDsXX36/3wem+nYaDHykoYhjRIbkDh9o8DhddPUzDY8f ++/CxkekDjvZ9GRKjNNyxuCS15rc3RDLjg1fyGCJHjXeZ6WFvaF3XJj+qbIiN +2V0/vi16gm/DnjjOQUNM4A+4dH7PNhjbPxyxKdQQ/3kN6Gy02QaHyfsC34Yb +Ymy4St53zW2QfCTIcS7aEKPT9nNLJz2gjBFOYSUY4q8uWdWEEx4wfze2vjnL +EPnNJzytrrnD+dKrU+3NhigVWi2cPu4KJC/K0K4WQ+QtUJ47+dYV8oVye6Za +DbFOmyGUUu8K1fvzm8RfGuL6YzVRg0mu0KtRnObRZYiL+ltIrQquoHqrZsPA +iCHeSfo6oLTNBe7ndOyeEKNjwLYr0zW9ztBvK+8VLknHsgujXJHHzsDze7/7 +X2k6ppyr8owtcwYTh+V2yyh07PQVVsiLdYaWJQyalDod575yj3xXd4bnO6+t +NDai482fz1aHHnWCbqWAkjQ/Or5YriyxRtcR/r6+e0tsLx3rH48t8Mk6Auko +342sQDoGcuPyBFY5wo7O7Iy8YDoe4TwZcxtwgP74Vyeqo+gYtX2msOeCA3wb +1HfqT6Xj+W3soOg/9jB169+sdhUd1+TPz/oXbYFBF/OcUzV0/KcjGbszeQt0 +LT1j+bmOjn4R0TPRe7dAnbf05UuNdDwk0a27WnULnJQ0YCw8oaO68n92mQV2 +sDYp4MjTD3RUCksudC3cDBv8O3l8eRmob6rQ0vTQBmTFSIUNSxnoEN7tH3jT +BtY273SQXM7AovreKe1kG5iUHb/+bDUDRVaLhAnY20Dt21WmumIMVNE6f3Zt +rzVYmmP8v/UMJJLIX2feCnYpF63M2szAOG2PaIadJUQ98gxQsWeg3Q+FJ0t1 +LSHNV/hZhSMD+1+r3h4Rs4T6/MjTz1wZuPm5Za3oRwsQVbFcs+DDwMCYfOXm +IAtoUfkq6h3OQOO8J4sxmeagripHUbnGwNVXdru3L5oBtrafqLjOwMv7u1xJ +g2bgsifhk1EeAwVeLyk/8cIMYm+N5roWMjDT3nFdZrYZfFCtVz5VyUDJlIWP +i0wzSFVz1xh5TPzfXuqFjOOmMKF+gVoxzkCJyCGmvZQJdD3HTSKTDGTdM3+i +vMwEGg+MOYVOM9BsSLdpzYQxpFZYHaT+YaBThWwJ5YkxqDN4imv5mBhCWxWm +H2UMO632yzeLM5HZvJ0i2o/Q4W8h0MFi4mPncWZIKEDdymlpA2CiZn5Yx5Q9 +QG5RrtolYyYOxomMZGkCBP9cMHczZ2JaG0vU+ZsRCEZwYj5sYWKv9obS8O1G +YJ4gP/tlJxMvHYzM8N7Mhuq8v5+mk5j40enP/iFLJlBNQ2etU5gYWlav7abO +BO6nEYGcM0wU0nQy/LaaCRWyH2nW55kYm5dZvPMVA4ozG89c/Y+J9xWjBJ67 +MiDndDzdooSJatfWWtgfoMOp0DXnMt8w8Uah+IBXOQ1WiCQVjHYyERUt5GMv +0SChnKfepIuJxXYss6ZoGsSNTQyOfGDiav6QlxfMaXBsTwfLeJCJylJ+62N6 +qXBo++Wh73NMjDfTenxgLRU8zBSRKctCvi+zOUOn9GGhY4VQM4WFLg5xGW7B ++pDjO9ZjrcjCAf/FB19d9GEwoSbCQ5WFKfmZTFclfTj0ZEtppC4L+8NF4i80 +6kGy3RHZanMWmlIDBlwXdaHWrXNeP4iFVrVWkZapOrDje+3T+oMsnK3zklh/ +WAd4onIyzUJZON68yVtupw6Y/xeo7xzJQv5LLYnbqTrQ3rtkX0gsC291FVnw +92+E4Z1aPeUZLOxrvnOLx3AjyOxPrNFqZOEG4wyDe5OakPrPzyClififiImt +Qq81gfe8efm3hyzMEeQWJhRrwvDdZYU5T1jYmnDEfsRXE2p54jKF37DQOdLb +N7F7A3ikn4iY+cpC+497A3qeakBmXaRBw2o2psbZBMy2qIGAnXu5tBAbz2K4 +9eBNNTjRb6gZsZaNAbvPNM8mqcGeZXNKG8XY6Fe1czrGRg1oW8JFc2XZ+Gsx +PE27XRXeDhyajNdh4+od+KLt63oQW7WvfLMrG0dO36uyUlaBPNOjUePubKyu +31WrulwFdI+mml7YzkaxoMoyze/KYDde1tnlw8aUR6rPbt1RhoS307937WNj +FT5e6mWoDHO5x02iYti4vPBkTIGzEnQzL7wpKGJj+WHyUMxNBdgTlpdtVcLG +DeHCV1+eUYCZEq7vSBkbf5/T12KFKoCwQteszl02Jn7abRZprAA2K8ike41s +dPt7VymiVx7qOwp2v+lk4+aLLmI+MvJgLVStGd7Fxkahup5CPnnosngyI9nD +RiVlU411IxSYqv2R5NnPxpeXbrxl3KOA5vWNd74Ps7Fi5fyRGW8K1Hcbh58e +ZaORxatCbWsKWIs6gfY4Gyff2mxK0KOAX2JYW+g0G4tdq9gp/MT7GhOyJObY +uNAeXnSoXw5O/snYVfuHjfQbyvkrOHKwVr9ww44FNorymSp1JcrB1f210//+ +sVF2qPdL/zY5+B/g11+n + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08315465189878357}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08315465189878357}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0VW8XB3BRmlCZh3u5xgwh073uZG9D5mTKVBkqFBVlCk0yRkmlyE8l +oUTGezMmUdIcUSKRShIiY4Xe8/511mc9a511zn72/j6P/M4gR19eHh6ekCU8 +PP9/znx88lApJc9IoCK1+shdS6OOq5KRxl0nIT834fTWIhVAsVc7JbvOQ/iB +lguUIiqE299+x9eVC4cVnEp+3zaHdWMS53+/q4DgtW0ZnNsu0FdvFzT1rgm2 +xqvHPiv0A3Ol4d6Jd+2gvO6HGrsgHH6/o10cfzcAr9TSKKKZCdBsejOvLXcS +VnJz7ZdZZwCpr2Zw54YFqL+47lvvkusgus/r9nJTPjzWMN6NE/lwXse8zm7r +Cqy/caEqvvM2vM/c2DixVhA/9IrH1A6UQNabojXhyoJYlBx8RmqyBDyE1nv9 +oQvibEixyAG+UvgQS17k3SWI2Y//HZlVLIX+A6tYolxBrEp/Y5eyuxSGzL5U +Ud2FUOVrs3fl51KYG88ojb6+BoPSx3in95VBSt7xV7xS63Be8FHDRcdysNbf +KyymuA437FUgmbuXw4qHjlvXa65DqZsH58e9yiHus3KPjfE6NPPqROr+cjii +8Hwwfe869HjXxz2WWA4HciQXVWrXIbdowJS/rhwcsss32GwTRvVDfeQhcgWs +3fBf0A5fYeQ6fv1vULECXtbFVQQFCSOl9W1kn1oFWPe4GqbHCmP8nQ8OjQYV +YCK9aNpbJIzl5lXuRpsrQD/TelvQvDBu9NsooBFdARLpn09duCKCbwZ3lD5o +rwBJDW7cXIEIVtk09pUS+yjdlHB8R5kIJi+Ui1/+UAGy42ph65sJb4q+tH2w +ApRtg73rhkQwg13QdvN3BegtXaB+1hPF4j0RvXZylbAlVPyL7lNRtF1ZMPXB +rxLsVw99zHgjit7p1SYagZXgmFvzfv6DKFrw650JDaoEl9fbX7X8FMWe1kLx +uYhK2LHhRq2HmBjeTSfNNiVVQuAX7XMnvcUwuH/qtX9hJSQ6Wxm1z4ihZWDT +/tHBSpDmvJTmXSKOeyJGNg8PV0KJiPOszmpxPB3Yaf5prBLetnuWnZMTx+hN +TrH3ZipBySFUwcFSHOvKb6lr83OgafM1/teXxZFz09V9VpEDC+bTL1+wJPAq +ad8/0jYOpBVEFS2YS+DtJcU7d3hyQImfJ0nTQQLP8578luHDAdtHq4zP+Erg +H71Hrn/9OZBlSqm0TZXAEEWR/uhQDhiiTcazPglcYiewdPdpDoTQr3s9OSmJ +Cm7nWjuqOGCdIzRlc1oSt7RW12nXckBh+ZGklxclUbL5Tm58PQded7iUv7kl +iWoW5+0UHnBAK1iA7+NLSYzlL98o95QDQwURBb+kpVDdc2X1+h4O3Bf8yghT +kkLBAm26bi8HLoU6vprVlELefZtraH0c2GSiOTePUrgYf7RG7zMHcnsHrJb7 +S6G10dFXP4c5sF3UblSmkljflc0f+ZsDetF1MVfrpVDa7+Vbvb8cWDWgKi7f +IoVyd1ZXfp/nQE0pH6i8l8IbR7UumPNwQdymJm3jPyn0vqW2+hE/F17HKOlv +spFGw8QrtzqFuXBz6FzrY2dpHLYUvmksyoVjW/5tt/aUxu/+JxpviXFBk9wd +v+UgsZ5marlHkgvJ1WffuWdIo5RQ/uNiMhfMfv6JOvBZGkecruy3Xc+FSMt0 +9Qcj0miTfGKJryoXSq5rdovMSOOVcvrEYTUuSDp702tWyOB7Rdeh8xpcGKl+ +NMunJYM39lY7ntXmgryw100Xmgz+11YzcHIjF1wC51wKUQa3twu8O6jDhUay +xl07Jxl0oPNNGOtx4cLJtNDLh2XwdvnKlUVULrT2qCmNxMgga6lvdySNC/P6 +zW+MUmQw3W1C0syQC37fpnW/XJHB+kG1gad0LjBst01oNcugWJPVo+ssLgTl +T+XEPJdBkYsOFFs2F/IWz9h3dMrg3vhnExOEhcobSyOHZHD5+/Z5beDCgJjK +gYeCJBShl3SEGXNBIug+WUKChAf965bOE7ZtdXuxl0LCh3t6OEdNuHA3KmXD +Gj0S9qljVogpF368UfrgwyLhp/LFtm+EKZoNKZxNJFS81JzqakbUu2982N2N +hA0/dmWrbeLCfcPkrGIfEnaVPvyZQnjqnKL1vwASngqlvvhO2NPMpTDvKAnB +018j05yoz5WfbrMJJKyBqpIhwq0zSSus00iYkEl/oG/BBd3COv+fuSR8Wc5/ ++T5hf96tEibFJHQNG/VeJJy9bawlnUtCBY7RPUNLLrRxEsO/NZBweMSm9ABh +fiF5FUYrCR8s2WOYQ5jpX9t5uo1Yp35zf0E4uNEpvq+bhOU6cmIzhPOlRvV1 +v5DQc9YvUNqKC92HEr7EjZJw3Yi4J4Pwmudy6e9mSJjVljS2lbCZco2pOg8Z +97VIyO4nHHnMcfLISjIGmFHGjhMuefcj95UwGbvkeLxTCX/eGO+oQCKjVoJ4 +WCZhyWRZ3jBlMi7ON2tdJWz7uar8sRYZX3sHpF4jHMNy8JE2JCPPl30Xswlb +el79RTMho+B056F0wkInfsRutSXj4JkOg0TCndcNxUJcyNhTrNcfSji7Ob4g +zZuM/oqNITsI7/raTisJIGNEuuUvJKy+nPLkWSgZOYeu7JAjPKG63+P7MTI+ +XUyrmiPqUW1d+4P/FBnvbJpd8v96Hd+3/KjSBTJ+kS0wyiZsnuosZHKFjI3q +YUF+hAXLrl/zuknG6tfsSxqEO9rGNh4tJ+N5dg/nB7Ff/00ym7LqyPjAR/1F +AeGdYqecqh+RMfnnyk/bCY+7KYZPviej5OsF3lqiH6qigpev+0JGVeMuUR/C +x7LvZWqNkXHS+ZUaH2GBfte6vbyyKJ1bsduQ6K83S/JtEwVk8WPTodRnRH9m +Kf7qzROXxdsOs03uhNf7n+bpV5fF/5grnP2Jfh5Len9uQV8WF4TCOYNE/3Nu +qyjKgCzasQPX+xA2GWvc5OIkixM8D2wtiHnxDJtOfh4ti14Kts+7jLignGFC +Go6XxTvrZOY2Gv0/L87eWZ4mix6d5uZxxDxGzau9NsmTxYSTDQ4kYn4vxnqK +1TyXRcn0ZzuEifnenl9U8PatLBqOC3eaEvOv8HiONtUvi/bPJo8FE/lQtuqC +h/a0LGprNxyqM+DC83OPr+WT5bDF86CopC4xP5WiOs3r5dDtUJiHIpE/Hp0+ +Tf06chhmWflZjcinIcn5LzLmclikYtWqqsUFvpyN6ucPyGGIiYbYGJF3jJLL +nGP35dDEnPdKJoXo53cvF8Za5ZD3b3v2ATku2PEstfBql8PgvsQslCX6x/HA +e/gqhzG3Gy91yRD7Hy1//MQyCkaWXX7YJU7Mk9zMDWMNCl54lpMsI8CF6cq0 +1t/aFLSs+YgVq4h6WGqMlutT0GLVEuFNK7kQf9CbqmBEwcmbWwW8iPzPan7a +yutAwVSG6sXdxPnw0P/aaHM4BfdZdl6umuSA1Txd+Eg0BVXdPveu/cWBl2kd +VP0TFJyafeHhN86B9zUrT+SdoqBI11t+/lEOjK0OFY7PpuCDevoOyUEOSJZZ +0sybKPgTNCqS33Fg39zEiVZBeUy5v/daJXG+Mg76iQ8Ky+NC/T3jAC4HVgx3 +F/FJyuOjWo97pEoO5Pc0vzVSkMcCrQLrsBIOfGy4uIFLlUdeKdqy6TwObImn +d133ksf7JkuZOuc4oCscox1dLo/X7Vf0lfhxgCdl+mHmXXk02BZc8nUX8f18 +AR536+RR+XnabUnifhA47Rg/8UieyOscvRDiPpHXpdTj3y2PHQ9uvvmzhQPi +11oTnPkU8NA9+Rsuhhz4rbH2o+ZWBSxXe+7tRNxPZq5Ix+h5KOD98SQ9JT4O +TK1RVqJ7KWB/fF3hxL9KGJukB5jtVcDRmb7kk78rYaBu14zHUQUsvvF6z5GR +SnhqUyWUlK+ADDOx7va2SsgK9ISBaQWM6FjWS8qqBFZRcc6lS4o43nvrQbV8 +JUwIW3u7NCnhkjtpFlrKFfDltLfLoeUq2OL07dipX2Vg9TPC6it1PUoKkhuC +j5bCyK4VIZzjqnh+yaJPdksxcd+X4E1sUsPQYb1VasK3QfiFSmrZT3WcFbP7 +sPTcTSAlldpTqRvwyYelP1VH8iBTg75WxF8TZ5fvXqF+NheeShsbTJ7Twoqy +0+4nPXOAQWpK036rjdt6ZaWm7LNBiC831OfkRlSkZ0jNJ2SCbIwcy11FB4eO +LM13epkOK5W333V8rIO1KzJFO1LOgRZbqjRihy7WnHKwbqg8A4c+Cjdb8+jh +j/y2c87pSfBz8vRWq0w95Ni7VNwNigML7ZYsK0197N7+vL1n9AQ0TDL/zr7U +R+k5s8AG72i4/rxqp1ObPs5EvgvItY6GuHy9pyVv9DHPt1D0on40WLlqXPbt +0kdadbZtwYpo6KiVpr35pI8PG2vSI8qjYDjm96GSKX0Ubi6/92pZFIivrRre +LW2AuYGChqo1h+HABt3uNl8DvHc8c2CFVTiEzUr/8dpjgMNySz+164fDkSY+ +6bEAA7zS8lejmBIOKW6d7quCDfC6oFfC6bkwuBV3+L1JlAFWfO7bzVcYBgMf +GroqUw1Q8M69lCaBMHA5Y/PuYpUBWs3seWfbFwLssd0d7iupaP5w6kpryUEQ +r7PIrV9NxWfUsE9G1w7CWKJ6sJwQFW0piXcbzx6Eq/Ljq78KU/F98tm/g8EH +YdE52jSYREUus5N1T+8g3K87V5GgTcVvyeTF5LpgMD7VkFa5lYrObuHchYIg +2KQkuVkwl4o8IroRr833AWf0kfzuPCru+nb8ca7mPlCqCpmpLaCiwScDpyTR +fbDU+tW1PUVU/LLf5efpgUBoCkr41cyhotnE2fmo44FgVDeVEfWYinpboxP7 +6wOA6tg28G2EinbFtIWTm/aC6onkw000Gl5+0GLSkOIH9cz8ZbYMGkovFam1 +CPMD+9n75ztZNPT/HnT5i6cfHD4wXTxkTMMbFosebrp+0Lrd+5OQLQ2DoteE +qXT7wh461XqbNw0fr/kV4qDpC4W/PslMJdGwy2WbfuKnXaDuS7+v3E3DOX3J +plvHfOCsgt2f2A80ZDsXX36/3wem+nYaDHykoYhjRIbkDh9o8DhddPUzDY8f ++/CxkekDjvZ9GRKjNNyxuCS15rc3RDLjg1fyGCJHjXeZ6WFvaF3XJj+qbIiN +2V0/vi16gm/DnjjOQUNM4A+4dH7PNhjbPxyxKdQQ/3kN6Gy02QaHyfsC34Yb +Ymy4St53zW2QfCTIcS7aEKPT9nNLJz2gjBFOYSUY4q8uWdWEEx4wfze2vjnL +EPnNJzytrrnD+dKrU+3NhigVWi2cPu4KJC/K0K4WQ+QtUJ47+dYV8oVye6Za +DbFOmyGUUu8K1fvzm8RfGuL6YzVRg0mu0KtRnObRZYiL+ltIrQquoHqrZsPA +iCHeSfo6oLTNBe7ndOyeEKNjwLYr0zW9ztBvK+8VLknHsgujXJHHzsDze7/7 +X2k6ppyr8owtcwYTh+V2yyh07PQVVsiLdYaWJQyalDod575yj3xXd4bnO6+t +NDai482fz1aHHnWCbqWAkjQ/Or5YriyxRtcR/r6+e0tsLx3rH48t8Mk6Auko +342sQDoGcuPyBFY5wo7O7Iy8YDoe4TwZcxtwgP74Vyeqo+gYtX2msOeCA3wb +1HfqT6Xj+W3soOg/9jB169+sdhUd1+TPz/oXbYFBF/OcUzV0/KcjGbszeQt0 +LT1j+bmOjn4R0TPRe7dAnbf05UuNdDwk0a27WnULnJQ0YCw8oaO68n92mQV2 +sDYp4MjTD3RUCksudC3cDBv8O3l8eRmob6rQ0vTQBmTFSIUNSxnoEN7tH3jT +BtY273SQXM7AovreKe1kG5iUHb/+bDUDRVaLhAnY20Dt21WmumIMVNE6f3Zt +rzVYmmP8v/UMJJLIX2feCnYpF63M2szAOG2PaIadJUQ98gxQsWeg3Q+FJ0t1 +LSHNV/hZhSMD+1+r3h4Rs4T6/MjTz1wZuPm5Za3oRwsQVbFcs+DDwMCYfOXm +IAtoUfkq6h3OQOO8J4sxmeagripHUbnGwNVXdru3L5oBtrafqLjOwMv7u1xJ +g2bgsifhk1EeAwVeLyk/8cIMYm+N5roWMjDT3nFdZrYZfFCtVz5VyUDJlIWP +i0wzSFVz1xh5TPzfXuqFjOOmMKF+gVoxzkCJyCGmvZQJdD3HTSKTDGTdM3+i +vMwEGg+MOYVOM9BsSLdpzYQxpFZYHaT+YaBThWwJ5YkxqDN4imv5mBhCWxWm +H2UMO632yzeLM5HZvJ0i2o/Q4W8h0MFi4mPncWZIKEDdymlpA2CiZn5Yx5Q9 +QG5RrtolYyYOxomMZGkCBP9cMHczZ2JaG0vU+ZsRCEZwYj5sYWKv9obS8O1G +YJ4gP/tlJxMvHYzM8N7Mhuq8v5+mk5j40enP/iFLJlBNQ2etU5gYWlav7abO +BO6nEYGcM0wU0nQy/LaaCRWyH2nW55kYm5dZvPMVA4ozG89c/Y+J9xWjBJ67 +MiDndDzdooSJatfWWtgfoMOp0DXnMt8w8Uah+IBXOQ1WiCQVjHYyERUt5GMv +0SChnKfepIuJxXYss6ZoGsSNTQyOfGDiav6QlxfMaXBsTwfLeJCJylJ+62N6 +qXBo++Wh73NMjDfTenxgLRU8zBSRKctCvi+zOUOn9GGhY4VQM4WFLg5xGW7B ++pDjO9ZjrcjCAf/FB19d9GEwoSbCQ5WFKfmZTFclfTj0ZEtppC4L+8NF4i80 +6kGy3RHZanMWmlIDBlwXdaHWrXNeP4iFVrVWkZapOrDje+3T+oMsnK3zklh/ +WAd4onIyzUJZON68yVtupw6Y/xeo7xzJQv5LLYnbqTrQ3rtkX0gsC291FVnw +92+E4Z1aPeUZLOxrvnOLx3AjyOxPrNFqZOEG4wyDe5OakPrPzyClififiImt +Qq81gfe8efm3hyzMEeQWJhRrwvDdZYU5T1jYmnDEfsRXE2p54jKF37DQOdLb +N7F7A3ikn4iY+cpC+497A3qeakBmXaRBw2o2psbZBMy2qIGAnXu5tBAbz2K4 +9eBNNTjRb6gZsZaNAbvPNM8mqcGeZXNKG8XY6Fe1czrGRg1oW8JFc2XZ+Gsx +PE27XRXeDhyajNdh4+od+KLt63oQW7WvfLMrG0dO36uyUlaBPNOjUePubKyu +31WrulwFdI+mml7YzkaxoMoyze/KYDde1tnlw8aUR6rPbt1RhoS307937WNj +FT5e6mWoDHO5x02iYti4vPBkTIGzEnQzL7wpKGJj+WHyUMxNBdgTlpdtVcLG +DeHCV1+eUYCZEq7vSBkbf5/T12KFKoCwQteszl02Jn7abRZprAA2K8ike41s +dPt7VymiVx7qOwp2v+lk4+aLLmI+MvJgLVStGd7Fxkahup5CPnnosngyI9nD +RiVlU411IxSYqv2R5NnPxpeXbrxl3KOA5vWNd74Ps7Fi5fyRGW8K1Hcbh58e +ZaORxatCbWsKWIs6gfY4Gyff2mxK0KOAX2JYW+g0G4tdq9gp/MT7GhOyJObY +uNAeXnSoXw5O/snYVfuHjfQbyvkrOHKwVr9ww44FNorymSp1JcrB1f210//+ +sVF2qPdL/zY5+B/g11+n + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08315465189878357}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08315465189878357}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356933798566*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"f50a9db8-aea4-4050-b196-d179bd43d762"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"344da507-9044-\ -ef47-aa8c-99f282e3d6d3"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[118]:=",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0VW8XB3BRmlCZh3u5xgwh073uZG9D5mTKVBkqFBVlCk0yRkmlyE8l +oUTGezMmUdIcUSKRShIiY4Xe8/511mc9a511zn72/j6P/M4gR19eHh6ekCU8 +PP9/znx88lApJc9IoCK1+shdS6OOq5KRxl0nIT834fTWIhVAsVc7JbvOQ/iB +lguUIiqE299+x9eVC4cVnEp+3zaHdWMS53+/q4DgtW0ZnNsu0FdvFzT1rgm2 +xqvHPiv0A3Ol4d6Jd+2gvO6HGrsgHH6/o10cfzcAr9TSKKKZCdBsejOvLXcS +VnJz7ZdZZwCpr2Zw54YFqL+47lvvkusgus/r9nJTPjzWMN6NE/lwXse8zm7r +Cqy/caEqvvM2vM/c2DixVhA/9IrH1A6UQNabojXhyoJYlBx8RmqyBDyE1nv9 +oQvibEixyAG+UvgQS17k3SWI2Y//HZlVLIX+A6tYolxBrEp/Y5eyuxSGzL5U +Ud2FUOVrs3fl51KYG88ojb6+BoPSx3in95VBSt7xV7xS63Be8FHDRcdysNbf +KyymuA437FUgmbuXw4qHjlvXa65DqZsH58e9yiHus3KPjfE6NPPqROr+cjii +8Hwwfe869HjXxz2WWA4HciQXVWrXIbdowJS/rhwcsss32GwTRvVDfeQhcgWs +3fBf0A5fYeQ6fv1vULECXtbFVQQFCSOl9W1kn1oFWPe4GqbHCmP8nQ8OjQYV +YCK9aNpbJIzl5lXuRpsrQD/TelvQvDBu9NsooBFdARLpn09duCKCbwZ3lD5o +rwBJDW7cXIEIVtk09pUS+yjdlHB8R5kIJi+Ui1/+UAGy42ph65sJb4q+tH2w +ApRtg73rhkQwg13QdvN3BegtXaB+1hPF4j0RvXZylbAlVPyL7lNRtF1ZMPXB +rxLsVw99zHgjit7p1SYagZXgmFvzfv6DKFrw650JDaoEl9fbX7X8FMWe1kLx +uYhK2LHhRq2HmBjeTSfNNiVVQuAX7XMnvcUwuH/qtX9hJSQ6Wxm1z4ihZWDT +/tHBSpDmvJTmXSKOeyJGNg8PV0KJiPOszmpxPB3Yaf5prBLetnuWnZMTx+hN +TrH3ZipBySFUwcFSHOvKb6lr83OgafM1/teXxZFz09V9VpEDC+bTL1+wJPAq +ad8/0jYOpBVEFS2YS+DtJcU7d3hyQImfJ0nTQQLP8578luHDAdtHq4zP+Erg +H71Hrn/9OZBlSqm0TZXAEEWR/uhQDhiiTcazPglcYiewdPdpDoTQr3s9OSmJ +Cm7nWjuqOGCdIzRlc1oSt7RW12nXckBh+ZGklxclUbL5Tm58PQded7iUv7kl +iWoW5+0UHnBAK1iA7+NLSYzlL98o95QDQwURBb+kpVDdc2X1+h4O3Bf8yghT +kkLBAm26bi8HLoU6vprVlELefZtraH0c2GSiOTePUrgYf7RG7zMHcnsHrJb7 +S6G10dFXP4c5sF3UblSmkljflc0f+ZsDetF1MVfrpVDa7+Vbvb8cWDWgKi7f +IoVyd1ZXfp/nQE0pH6i8l8IbR7UumPNwQdymJm3jPyn0vqW2+hE/F17HKOlv +spFGw8QrtzqFuXBz6FzrY2dpHLYUvmksyoVjW/5tt/aUxu/+JxpviXFBk9wd +v+UgsZ5marlHkgvJ1WffuWdIo5RQ/uNiMhfMfv6JOvBZGkecruy3Xc+FSMt0 +9Qcj0miTfGKJryoXSq5rdovMSOOVcvrEYTUuSDp702tWyOB7Rdeh8xpcGKl+ +NMunJYM39lY7ntXmgryw100Xmgz+11YzcHIjF1wC51wKUQa3twu8O6jDhUay +xl07Jxl0oPNNGOtx4cLJtNDLh2XwdvnKlUVULrT2qCmNxMgga6lvdySNC/P6 +zW+MUmQw3W1C0syQC37fpnW/XJHB+kG1gad0LjBst01oNcugWJPVo+ssLgTl +T+XEPJdBkYsOFFs2F/IWz9h3dMrg3vhnExOEhcobSyOHZHD5+/Z5beDCgJjK +gYeCJBShl3SEGXNBIug+WUKChAf965bOE7ZtdXuxl0LCh3t6OEdNuHA3KmXD +Gj0S9qljVogpF368UfrgwyLhp/LFtm+EKZoNKZxNJFS81JzqakbUu2982N2N +hA0/dmWrbeLCfcPkrGIfEnaVPvyZQnjqnKL1vwASngqlvvhO2NPMpTDvKAnB +018j05yoz5WfbrMJJKyBqpIhwq0zSSus00iYkEl/oG/BBd3COv+fuSR8Wc5/ ++T5hf96tEibFJHQNG/VeJJy9bawlnUtCBY7RPUNLLrRxEsO/NZBweMSm9ABh +fiF5FUYrCR8s2WOYQ5jpX9t5uo1Yp35zf0E4uNEpvq+bhOU6cmIzhPOlRvV1 +v5DQc9YvUNqKC92HEr7EjZJw3Yi4J4Pwmudy6e9mSJjVljS2lbCZco2pOg8Z +97VIyO4nHHnMcfLISjIGmFHGjhMuefcj95UwGbvkeLxTCX/eGO+oQCKjVoJ4 +WCZhyWRZ3jBlMi7ON2tdJWz7uar8sRYZX3sHpF4jHMNy8JE2JCPPl30Xswlb +el79RTMho+B056F0wkInfsRutSXj4JkOg0TCndcNxUJcyNhTrNcfSji7Ob4g +zZuM/oqNITsI7/raTisJIGNEuuUvJKy+nPLkWSgZOYeu7JAjPKG63+P7MTI+ +XUyrmiPqUW1d+4P/FBnvbJpd8v96Hd+3/KjSBTJ+kS0wyiZsnuosZHKFjI3q +YUF+hAXLrl/zuknG6tfsSxqEO9rGNh4tJ+N5dg/nB7Ff/00ym7LqyPjAR/1F +AeGdYqecqh+RMfnnyk/bCY+7KYZPviej5OsF3lqiH6qigpev+0JGVeMuUR/C +x7LvZWqNkXHS+ZUaH2GBfte6vbyyKJ1bsduQ6K83S/JtEwVk8WPTodRnRH9m +Kf7qzROXxdsOs03uhNf7n+bpV5fF/5grnP2Jfh5Len9uQV8WF4TCOYNE/3Nu +qyjKgCzasQPX+xA2GWvc5OIkixM8D2wtiHnxDJtOfh4ti14Kts+7jLignGFC +Go6XxTvrZOY2Gv0/L87eWZ4mix6d5uZxxDxGzau9NsmTxYSTDQ4kYn4vxnqK +1TyXRcn0ZzuEifnenl9U8PatLBqOC3eaEvOv8HiONtUvi/bPJo8FE/lQtuqC +h/a0LGprNxyqM+DC83OPr+WT5bDF86CopC4xP5WiOs3r5dDtUJiHIpE/Hp0+ +Tf06chhmWflZjcinIcn5LzLmclikYtWqqsUFvpyN6ucPyGGIiYbYGJF3jJLL +nGP35dDEnPdKJoXo53cvF8Za5ZD3b3v2ATku2PEstfBql8PgvsQslCX6x/HA +e/gqhzG3Gy91yRD7Hy1//MQyCkaWXX7YJU7Mk9zMDWMNCl54lpMsI8CF6cq0 +1t/aFLSs+YgVq4h6WGqMlutT0GLVEuFNK7kQf9CbqmBEwcmbWwW8iPzPan7a +yutAwVSG6sXdxPnw0P/aaHM4BfdZdl6umuSA1Txd+Eg0BVXdPveu/cWBl2kd +VP0TFJyafeHhN86B9zUrT+SdoqBI11t+/lEOjK0OFY7PpuCDevoOyUEOSJZZ +0sybKPgTNCqS33Fg39zEiVZBeUy5v/daJXG+Mg76iQ8Ky+NC/T3jAC4HVgx3 +F/FJyuOjWo97pEoO5Pc0vzVSkMcCrQLrsBIOfGy4uIFLlUdeKdqy6TwObImn +d133ksf7JkuZOuc4oCscox1dLo/X7Vf0lfhxgCdl+mHmXXk02BZc8nUX8f18 +AR536+RR+XnabUnifhA47Rg/8UieyOscvRDiPpHXpdTj3y2PHQ9uvvmzhQPi +11oTnPkU8NA9+Rsuhhz4rbH2o+ZWBSxXe+7tRNxPZq5Ix+h5KOD98SQ9JT4O +TK1RVqJ7KWB/fF3hxL9KGJukB5jtVcDRmb7kk78rYaBu14zHUQUsvvF6z5GR +SnhqUyWUlK+ADDOx7va2SsgK9ISBaQWM6FjWS8qqBFZRcc6lS4o43nvrQbV8 +JUwIW3u7NCnhkjtpFlrKFfDltLfLoeUq2OL07dipX2Vg9TPC6it1PUoKkhuC +j5bCyK4VIZzjqnh+yaJPdksxcd+X4E1sUsPQYb1VasK3QfiFSmrZT3WcFbP7 +sPTcTSAlldpTqRvwyYelP1VH8iBTg75WxF8TZ5fvXqF+NheeShsbTJ7Twoqy +0+4nPXOAQWpK036rjdt6ZaWm7LNBiC831OfkRlSkZ0jNJ2SCbIwcy11FB4eO +LM13epkOK5W333V8rIO1KzJFO1LOgRZbqjRihy7WnHKwbqg8A4c+Cjdb8+jh +j/y2c87pSfBz8vRWq0w95Ni7VNwNigML7ZYsK0197N7+vL1n9AQ0TDL/zr7U +R+k5s8AG72i4/rxqp1ObPs5EvgvItY6GuHy9pyVv9DHPt1D0on40WLlqXPbt +0kdadbZtwYpo6KiVpr35pI8PG2vSI8qjYDjm96GSKX0Ubi6/92pZFIivrRre +LW2AuYGChqo1h+HABt3uNl8DvHc8c2CFVTiEzUr/8dpjgMNySz+164fDkSY+ +6bEAA7zS8lejmBIOKW6d7quCDfC6oFfC6bkwuBV3+L1JlAFWfO7bzVcYBgMf +GroqUw1Q8M69lCaBMHA5Y/PuYpUBWs3seWfbFwLssd0d7iupaP5w6kpryUEQ +r7PIrV9NxWfUsE9G1w7CWKJ6sJwQFW0piXcbzx6Eq/Ljq78KU/F98tm/g8EH +YdE52jSYREUus5N1T+8g3K87V5GgTcVvyeTF5LpgMD7VkFa5lYrObuHchYIg +2KQkuVkwl4o8IroRr833AWf0kfzuPCru+nb8ca7mPlCqCpmpLaCiwScDpyTR +fbDU+tW1PUVU/LLf5efpgUBoCkr41cyhotnE2fmo44FgVDeVEfWYinpboxP7 +6wOA6tg28G2EinbFtIWTm/aC6onkw000Gl5+0GLSkOIH9cz8ZbYMGkovFam1 +CPMD+9n75ztZNPT/HnT5i6cfHD4wXTxkTMMbFosebrp+0Lrd+5OQLQ2DoteE +qXT7wh461XqbNw0fr/kV4qDpC4W/PslMJdGwy2WbfuKnXaDuS7+v3E3DOX3J +plvHfOCsgt2f2A80ZDsXX36/3wem+nYaDHykoYhjRIbkDh9o8DhddPUzDY8f ++/CxkekDjvZ9GRKjNNyxuCS15rc3RDLjg1fyGCJHjXeZ6WFvaF3XJj+qbIiN +2V0/vi16gm/DnjjOQUNM4A+4dH7PNhjbPxyxKdQQ/3kN6Gy02QaHyfsC34Yb +Ymy4St53zW2QfCTIcS7aEKPT9nNLJz2gjBFOYSUY4q8uWdWEEx4wfze2vjnL +EPnNJzytrrnD+dKrU+3NhigVWi2cPu4KJC/K0K4WQ+QtUJ47+dYV8oVye6Za +DbFOmyGUUu8K1fvzm8RfGuL6YzVRg0mu0KtRnObRZYiL+ltIrQquoHqrZsPA +iCHeSfo6oLTNBe7ndOyeEKNjwLYr0zW9ztBvK+8VLknHsgujXJHHzsDze7/7 +X2k6ppyr8owtcwYTh+V2yyh07PQVVsiLdYaWJQyalDod575yj3xXd4bnO6+t +NDai482fz1aHHnWCbqWAkjQ/Or5YriyxRtcR/r6+e0tsLx3rH48t8Mk6Auko +342sQDoGcuPyBFY5wo7O7Iy8YDoe4TwZcxtwgP74Vyeqo+gYtX2msOeCA3wb +1HfqT6Xj+W3soOg/9jB169+sdhUd1+TPz/oXbYFBF/OcUzV0/KcjGbszeQt0 +LT1j+bmOjn4R0TPRe7dAnbf05UuNdDwk0a27WnULnJQ0YCw8oaO68n92mQV2 +sDYp4MjTD3RUCksudC3cDBv8O3l8eRmob6rQ0vTQBmTFSIUNSxnoEN7tH3jT +BtY273SQXM7AovreKe1kG5iUHb/+bDUDRVaLhAnY20Dt21WmumIMVNE6f3Zt +rzVYmmP8v/UMJJLIX2feCnYpF63M2szAOG2PaIadJUQ98gxQsWeg3Q+FJ0t1 +LSHNV/hZhSMD+1+r3h4Rs4T6/MjTz1wZuPm5Za3oRwsQVbFcs+DDwMCYfOXm +IAtoUfkq6h3OQOO8J4sxmeagripHUbnGwNVXdru3L5oBtrafqLjOwMv7u1xJ +g2bgsifhk1EeAwVeLyk/8cIMYm+N5roWMjDT3nFdZrYZfFCtVz5VyUDJlIWP +i0wzSFVz1xh5TPzfXuqFjOOmMKF+gVoxzkCJyCGmvZQJdD3HTSKTDGTdM3+i +vMwEGg+MOYVOM9BsSLdpzYQxpFZYHaT+YaBThWwJ5YkxqDN4imv5mBhCWxWm +H2UMO632yzeLM5HZvJ0i2o/Q4W8h0MFi4mPncWZIKEDdymlpA2CiZn5Yx5Q9 +QG5RrtolYyYOxomMZGkCBP9cMHczZ2JaG0vU+ZsRCEZwYj5sYWKv9obS8O1G +YJ4gP/tlJxMvHYzM8N7Mhuq8v5+mk5j40enP/iFLJlBNQ2etU5gYWlav7abO +BO6nEYGcM0wU0nQy/LaaCRWyH2nW55kYm5dZvPMVA4ozG89c/Y+J9xWjBJ67 +MiDndDzdooSJatfWWtgfoMOp0DXnMt8w8Uah+IBXOQ1WiCQVjHYyERUt5GMv +0SChnKfepIuJxXYss6ZoGsSNTQyOfGDiav6QlxfMaXBsTwfLeJCJylJ+62N6 +qXBo++Wh73NMjDfTenxgLRU8zBSRKctCvi+zOUOn9GGhY4VQM4WFLg5xGW7B ++pDjO9ZjrcjCAf/FB19d9GEwoSbCQ5WFKfmZTFclfTj0ZEtppC4L+8NF4i80 +6kGy3RHZanMWmlIDBlwXdaHWrXNeP4iFVrVWkZapOrDje+3T+oMsnK3zklh/ +WAd4onIyzUJZON68yVtupw6Y/xeo7xzJQv5LLYnbqTrQ3rtkX0gsC291FVnw +92+E4Z1aPeUZLOxrvnOLx3AjyOxPrNFqZOEG4wyDe5OakPrPzyClififiImt +Qq81gfe8efm3hyzMEeQWJhRrwvDdZYU5T1jYmnDEfsRXE2p54jKF37DQOdLb +N7F7A3ikn4iY+cpC+497A3qeakBmXaRBw2o2psbZBMy2qIGAnXu5tBAbz2K4 +9eBNNTjRb6gZsZaNAbvPNM8mqcGeZXNKG8XY6Fe1czrGRg1oW8JFc2XZ+Gsx +PE27XRXeDhyajNdh4+od+KLt63oQW7WvfLMrG0dO36uyUlaBPNOjUePubKyu +31WrulwFdI+mml7YzkaxoMoyze/KYDde1tnlw8aUR6rPbt1RhoS307937WNj +FT5e6mWoDHO5x02iYti4vPBkTIGzEnQzL7wpKGJj+WHyUMxNBdgTlpdtVcLG +DeHCV1+eUYCZEq7vSBkbf5/T12KFKoCwQteszl02Jn7abRZprAA2K8ike41s +dPt7VymiVx7qOwp2v+lk4+aLLmI+MvJgLVStGd7Fxkahup5CPnnosngyI9nD +RiVlU411IxSYqv2R5NnPxpeXbrxl3KOA5vWNd74Ps7Fi5fyRGW8K1Hcbh58e +ZaORxatCbWsKWIs6gfY4Gyff2mxK0KOAX2JYW+g0G4tdq9gp/MT7GhOyJObY +uNAeXnSoXw5O/snYVfuHjfQbyvkrOHKwVr9ww44FNorymSp1JcrB1f210//+ +sVF2qPdL/zY5+B/g11+n + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0VW8XB3BRmlCZh3u5xgwh073uZG9D5mTKVBkqFBVlCk0yRkmlyE8l +oUTGezMmUdIcUSKRShIiY4Xe8/511mc9a511zn72/j6P/M4gR19eHh6ekCU8 +PP9/znx88lApJc9IoCK1+shdS6OOq5KRxl0nIT834fTWIhVAsVc7JbvOQ/iB +lguUIiqE299+x9eVC4cVnEp+3zaHdWMS53+/q4DgtW0ZnNsu0FdvFzT1rgm2 +xqvHPiv0A3Ol4d6Jd+2gvO6HGrsgHH6/o10cfzcAr9TSKKKZCdBsejOvLXcS +VnJz7ZdZZwCpr2Zw54YFqL+47lvvkusgus/r9nJTPjzWMN6NE/lwXse8zm7r +Cqy/caEqvvM2vM/c2DixVhA/9IrH1A6UQNabojXhyoJYlBx8RmqyBDyE1nv9 +oQvibEixyAG+UvgQS17k3SWI2Y//HZlVLIX+A6tYolxBrEp/Y5eyuxSGzL5U +Ud2FUOVrs3fl51KYG88ojb6+BoPSx3in95VBSt7xV7xS63Be8FHDRcdysNbf +KyymuA437FUgmbuXw4qHjlvXa65DqZsH58e9yiHus3KPjfE6NPPqROr+cjii +8Hwwfe869HjXxz2WWA4HciQXVWrXIbdowJS/rhwcsss32GwTRvVDfeQhcgWs +3fBf0A5fYeQ6fv1vULECXtbFVQQFCSOl9W1kn1oFWPe4GqbHCmP8nQ8OjQYV +YCK9aNpbJIzl5lXuRpsrQD/TelvQvDBu9NsooBFdARLpn09duCKCbwZ3lD5o +rwBJDW7cXIEIVtk09pUS+yjdlHB8R5kIJi+Ui1/+UAGy42ph65sJb4q+tH2w +ApRtg73rhkQwg13QdvN3BegtXaB+1hPF4j0RvXZylbAlVPyL7lNRtF1ZMPXB +rxLsVw99zHgjit7p1SYagZXgmFvzfv6DKFrw650JDaoEl9fbX7X8FMWe1kLx +uYhK2LHhRq2HmBjeTSfNNiVVQuAX7XMnvcUwuH/qtX9hJSQ6Wxm1z4ihZWDT +/tHBSpDmvJTmXSKOeyJGNg8PV0KJiPOszmpxPB3Yaf5prBLetnuWnZMTx+hN +TrH3ZipBySFUwcFSHOvKb6lr83OgafM1/teXxZFz09V9VpEDC+bTL1+wJPAq +ad8/0jYOpBVEFS2YS+DtJcU7d3hyQImfJ0nTQQLP8578luHDAdtHq4zP+Erg +H71Hrn/9OZBlSqm0TZXAEEWR/uhQDhiiTcazPglcYiewdPdpDoTQr3s9OSmJ +Cm7nWjuqOGCdIzRlc1oSt7RW12nXckBh+ZGklxclUbL5Tm58PQded7iUv7kl +iWoW5+0UHnBAK1iA7+NLSYzlL98o95QDQwURBb+kpVDdc2X1+h4O3Bf8yghT +kkLBAm26bi8HLoU6vprVlELefZtraH0c2GSiOTePUrgYf7RG7zMHcnsHrJb7 +S6G10dFXP4c5sF3UblSmkljflc0f+ZsDetF1MVfrpVDa7+Vbvb8cWDWgKi7f +IoVyd1ZXfp/nQE0pH6i8l8IbR7UumPNwQdymJm3jPyn0vqW2+hE/F17HKOlv +spFGw8QrtzqFuXBz6FzrY2dpHLYUvmksyoVjW/5tt/aUxu/+JxpviXFBk9wd +v+UgsZ5marlHkgvJ1WffuWdIo5RQ/uNiMhfMfv6JOvBZGkecruy3Xc+FSMt0 +9Qcj0miTfGKJryoXSq5rdovMSOOVcvrEYTUuSDp702tWyOB7Rdeh8xpcGKl+ +NMunJYM39lY7ntXmgryw100Xmgz+11YzcHIjF1wC51wKUQa3twu8O6jDhUay +xl07Jxl0oPNNGOtx4cLJtNDLh2XwdvnKlUVULrT2qCmNxMgga6lvdySNC/P6 +zW+MUmQw3W1C0syQC37fpnW/XJHB+kG1gad0LjBst01oNcugWJPVo+ssLgTl +T+XEPJdBkYsOFFs2F/IWz9h3dMrg3vhnExOEhcobSyOHZHD5+/Z5beDCgJjK +gYeCJBShl3SEGXNBIug+WUKChAf965bOE7ZtdXuxl0LCh3t6OEdNuHA3KmXD +Gj0S9qljVogpF368UfrgwyLhp/LFtm+EKZoNKZxNJFS81JzqakbUu2982N2N +hA0/dmWrbeLCfcPkrGIfEnaVPvyZQnjqnKL1vwASngqlvvhO2NPMpTDvKAnB +018j05yoz5WfbrMJJKyBqpIhwq0zSSus00iYkEl/oG/BBd3COv+fuSR8Wc5/ ++T5hf96tEibFJHQNG/VeJJy9bawlnUtCBY7RPUNLLrRxEsO/NZBweMSm9ABh +fiF5FUYrCR8s2WOYQ5jpX9t5uo1Yp35zf0E4uNEpvq+bhOU6cmIzhPOlRvV1 +v5DQc9YvUNqKC92HEr7EjZJw3Yi4J4Pwmudy6e9mSJjVljS2lbCZco2pOg8Z +97VIyO4nHHnMcfLISjIGmFHGjhMuefcj95UwGbvkeLxTCX/eGO+oQCKjVoJ4 +WCZhyWRZ3jBlMi7ON2tdJWz7uar8sRYZX3sHpF4jHMNy8JE2JCPPl30Xswlb +el79RTMho+B056F0wkInfsRutSXj4JkOg0TCndcNxUJcyNhTrNcfSji7Ob4g +zZuM/oqNITsI7/raTisJIGNEuuUvJKy+nPLkWSgZOYeu7JAjPKG63+P7MTI+ +XUyrmiPqUW1d+4P/FBnvbJpd8v96Hd+3/KjSBTJ+kS0wyiZsnuosZHKFjI3q +YUF+hAXLrl/zuknG6tfsSxqEO9rGNh4tJ+N5dg/nB7Ff/00ym7LqyPjAR/1F +AeGdYqecqh+RMfnnyk/bCY+7KYZPviej5OsF3lqiH6qigpev+0JGVeMuUR/C +x7LvZWqNkXHS+ZUaH2GBfte6vbyyKJ1bsduQ6K83S/JtEwVk8WPTodRnRH9m +Kf7qzROXxdsOs03uhNf7n+bpV5fF/5grnP2Jfh5Len9uQV8WF4TCOYNE/3Nu +qyjKgCzasQPX+xA2GWvc5OIkixM8D2wtiHnxDJtOfh4ti14Kts+7jLignGFC +Go6XxTvrZOY2Gv0/L87eWZ4mix6d5uZxxDxGzau9NsmTxYSTDQ4kYn4vxnqK +1TyXRcn0ZzuEifnenl9U8PatLBqOC3eaEvOv8HiONtUvi/bPJo8FE/lQtuqC +h/a0LGprNxyqM+DC83OPr+WT5bDF86CopC4xP5WiOs3r5dDtUJiHIpE/Hp0+ +Tf06chhmWflZjcinIcn5LzLmclikYtWqqsUFvpyN6ucPyGGIiYbYGJF3jJLL +nGP35dDEnPdKJoXo53cvF8Za5ZD3b3v2ATku2PEstfBql8PgvsQslCX6x/HA +e/gqhzG3Gy91yRD7Hy1//MQyCkaWXX7YJU7Mk9zMDWMNCl54lpMsI8CF6cq0 +1t/aFLSs+YgVq4h6WGqMlutT0GLVEuFNK7kQf9CbqmBEwcmbWwW8iPzPan7a +yutAwVSG6sXdxPnw0P/aaHM4BfdZdl6umuSA1Txd+Eg0BVXdPveu/cWBl2kd +VP0TFJyafeHhN86B9zUrT+SdoqBI11t+/lEOjK0OFY7PpuCDevoOyUEOSJZZ +0sybKPgTNCqS33Fg39zEiVZBeUy5v/daJXG+Mg76iQ8Ky+NC/T3jAC4HVgx3 +F/FJyuOjWo97pEoO5Pc0vzVSkMcCrQLrsBIOfGy4uIFLlUdeKdqy6TwObImn +d133ksf7JkuZOuc4oCscox1dLo/X7Vf0lfhxgCdl+mHmXXk02BZc8nUX8f18 +AR536+RR+XnabUnifhA47Rg/8UieyOscvRDiPpHXpdTj3y2PHQ9uvvmzhQPi +11oTnPkU8NA9+Rsuhhz4rbH2o+ZWBSxXe+7tRNxPZq5Ix+h5KOD98SQ9JT4O +TK1RVqJ7KWB/fF3hxL9KGJukB5jtVcDRmb7kk78rYaBu14zHUQUsvvF6z5GR +SnhqUyWUlK+ADDOx7va2SsgK9ISBaQWM6FjWS8qqBFZRcc6lS4o43nvrQbV8 +JUwIW3u7NCnhkjtpFlrKFfDltLfLoeUq2OL07dipX2Vg9TPC6it1PUoKkhuC +j5bCyK4VIZzjqnh+yaJPdksxcd+X4E1sUsPQYb1VasK3QfiFSmrZT3WcFbP7 +sPTcTSAlldpTqRvwyYelP1VH8iBTg75WxF8TZ5fvXqF+NheeShsbTJ7Twoqy +0+4nPXOAQWpK036rjdt6ZaWm7LNBiC831OfkRlSkZ0jNJ2SCbIwcy11FB4eO +LM13epkOK5W333V8rIO1KzJFO1LOgRZbqjRihy7WnHKwbqg8A4c+Cjdb8+jh +j/y2c87pSfBz8vRWq0w95Ni7VNwNigML7ZYsK0197N7+vL1n9AQ0TDL/zr7U +R+k5s8AG72i4/rxqp1ObPs5EvgvItY6GuHy9pyVv9DHPt1D0on40WLlqXPbt +0kdadbZtwYpo6KiVpr35pI8PG2vSI8qjYDjm96GSKX0Ubi6/92pZFIivrRre +LW2AuYGChqo1h+HABt3uNl8DvHc8c2CFVTiEzUr/8dpjgMNySz+164fDkSY+ +6bEAA7zS8lejmBIOKW6d7quCDfC6oFfC6bkwuBV3+L1JlAFWfO7bzVcYBgMf +GroqUw1Q8M69lCaBMHA5Y/PuYpUBWs3seWfbFwLssd0d7iupaP5w6kpryUEQ +r7PIrV9NxWfUsE9G1w7CWKJ6sJwQFW0piXcbzx6Eq/Ljq78KU/F98tm/g8EH +YdE52jSYREUus5N1T+8g3K87V5GgTcVvyeTF5LpgMD7VkFa5lYrObuHchYIg +2KQkuVkwl4o8IroRr833AWf0kfzuPCru+nb8ca7mPlCqCpmpLaCiwScDpyTR +fbDU+tW1PUVU/LLf5efpgUBoCkr41cyhotnE2fmo44FgVDeVEfWYinpboxP7 +6wOA6tg28G2EinbFtIWTm/aC6onkw000Gl5+0GLSkOIH9cz8ZbYMGkovFam1 +CPMD+9n75ztZNPT/HnT5i6cfHD4wXTxkTMMbFosebrp+0Lrd+5OQLQ2DoteE +qXT7wh461XqbNw0fr/kV4qDpC4W/PslMJdGwy2WbfuKnXaDuS7+v3E3DOX3J +plvHfOCsgt2f2A80ZDsXX36/3wem+nYaDHykoYhjRIbkDh9o8DhddPUzDY8f ++/CxkekDjvZ9GRKjNNyxuCS15rc3RDLjg1fyGCJHjXeZ6WFvaF3XJj+qbIiN +2V0/vi16gm/DnjjOQUNM4A+4dH7PNhjbPxyxKdQQ/3kN6Gy02QaHyfsC34Yb +Ymy4St53zW2QfCTIcS7aEKPT9nNLJz2gjBFOYSUY4q8uWdWEEx4wfze2vjnL +EPnNJzytrrnD+dKrU+3NhigVWi2cPu4KJC/K0K4WQ+QtUJ47+dYV8oVye6Za +DbFOmyGUUu8K1fvzm8RfGuL6YzVRg0mu0KtRnObRZYiL+ltIrQquoHqrZsPA +iCHeSfo6oLTNBe7ndOyeEKNjwLYr0zW9ztBvK+8VLknHsgujXJHHzsDze7/7 +X2k6ppyr8owtcwYTh+V2yyh07PQVVsiLdYaWJQyalDod575yj3xXd4bnO6+t +NDai482fz1aHHnWCbqWAkjQ/Or5YriyxRtcR/r6+e0tsLx3rH48t8Mk6Auko +342sQDoGcuPyBFY5wo7O7Iy8YDoe4TwZcxtwgP74Vyeqo+gYtX2msOeCA3wb +1HfqT6Xj+W3soOg/9jB169+sdhUd1+TPz/oXbYFBF/OcUzV0/KcjGbszeQt0 +LT1j+bmOjn4R0TPRe7dAnbf05UuNdDwk0a27WnULnJQ0YCw8oaO68n92mQV2 +sDYp4MjTD3RUCksudC3cDBv8O3l8eRmob6rQ0vTQBmTFSIUNSxnoEN7tH3jT +BtY273SQXM7AovreKe1kG5iUHb/+bDUDRVaLhAnY20Dt21WmumIMVNE6f3Zt +rzVYmmP8v/UMJJLIX2feCnYpF63M2szAOG2PaIadJUQ98gxQsWeg3Q+FJ0t1 +LSHNV/hZhSMD+1+r3h4Rs4T6/MjTz1wZuPm5Za3oRwsQVbFcs+DDwMCYfOXm +IAtoUfkq6h3OQOO8J4sxmeagripHUbnGwNVXdru3L5oBtrafqLjOwMv7u1xJ +g2bgsifhk1EeAwVeLyk/8cIMYm+N5roWMjDT3nFdZrYZfFCtVz5VyUDJlIWP +i0wzSFVz1xh5TPzfXuqFjOOmMKF+gVoxzkCJyCGmvZQJdD3HTSKTDGTdM3+i +vMwEGg+MOYVOM9BsSLdpzYQxpFZYHaT+YaBThWwJ5YkxqDN4imv5mBhCWxWm +H2UMO632yzeLM5HZvJ0i2o/Q4W8h0MFi4mPncWZIKEDdymlpA2CiZn5Yx5Q9 +QG5RrtolYyYOxomMZGkCBP9cMHczZ2JaG0vU+ZsRCEZwYj5sYWKv9obS8O1G +YJ4gP/tlJxMvHYzM8N7Mhuq8v5+mk5j40enP/iFLJlBNQ2etU5gYWlav7abO +BO6nEYGcM0wU0nQy/LaaCRWyH2nW55kYm5dZvPMVA4ozG89c/Y+J9xWjBJ67 +MiDndDzdooSJatfWWtgfoMOp0DXnMt8w8Uah+IBXOQ1WiCQVjHYyERUt5GMv +0SChnKfepIuJxXYss6ZoGsSNTQyOfGDiav6QlxfMaXBsTwfLeJCJylJ+62N6 +qXBo++Wh73NMjDfTenxgLRU8zBSRKctCvi+zOUOn9GGhY4VQM4WFLg5xGW7B ++pDjO9ZjrcjCAf/FB19d9GEwoSbCQ5WFKfmZTFclfTj0ZEtppC4L+8NF4i80 +6kGy3RHZanMWmlIDBlwXdaHWrXNeP4iFVrVWkZapOrDje+3T+oMsnK3zklh/ +WAd4onIyzUJZON68yVtupw6Y/xeo7xzJQv5LLYnbqTrQ3rtkX0gsC291FVnw +92+E4Z1aPeUZLOxrvnOLx3AjyOxPrNFqZOEG4wyDe5OakPrPzyClififiImt +Qq81gfe8efm3hyzMEeQWJhRrwvDdZYU5T1jYmnDEfsRXE2p54jKF37DQOdLb +N7F7A3ikn4iY+cpC+497A3qeakBmXaRBw2o2psbZBMy2qIGAnXu5tBAbz2K4 +9eBNNTjRb6gZsZaNAbvPNM8mqcGeZXNKG8XY6Fe1czrGRg1oW8JFc2XZ+Gsx +PE27XRXeDhyajNdh4+od+KLt63oQW7WvfLMrG0dO36uyUlaBPNOjUePubKyu +31WrulwFdI+mml7YzkaxoMoyze/KYDde1tnlw8aUR6rPbt1RhoS307937WNj +FT5e6mWoDHO5x02iYti4vPBkTIGzEnQzL7wpKGJj+WHyUMxNBdgTlpdtVcLG +DeHCV1+eUYCZEq7vSBkbf5/T12KFKoCwQteszl02Jn7abRZprAA2K8ike41s +dPt7VymiVx7qOwp2v+lk4+aLLmI+MvJgLVStGd7Fxkahup5CPnnosngyI9nD +RiVlU411IxSYqv2R5NnPxpeXbrxl3KOA5vWNd74Ps7Fi5fyRGW8K1Hcbh58e +ZaORxatCbWsKWIs6gfY4Gyff2mxK0KOAX2JYW+g0G4tdq9gp/MT7GhOyJObY +uNAeXnSoXw5O/snYVfuHjfQbyvkrOHKwVr9ww44FNorymSp1JcrB1f210//+ +sVF2qPdL/zY5+B/g11+n + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08315465189878357}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08315465189878357}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0VW8XB3BRmlCZh3u5xgwh073uZG9D5mTKVBkqFBVlCk0yRkmlyE8l +oUTGezMmUdIcUSKRShIiY4Xe8/511mc9a511zn72/j6P/M4gR19eHh6ekCU8 +PP9/znx88lApJc9IoCK1+shdS6OOq5KRxl0nIT834fTWIhVAsVc7JbvOQ/iB +lguUIiqE299+x9eVC4cVnEp+3zaHdWMS53+/q4DgtW0ZnNsu0FdvFzT1rgm2 +xqvHPiv0A3Ol4d6Jd+2gvO6HGrsgHH6/o10cfzcAr9TSKKKZCdBsejOvLXcS +VnJz7ZdZZwCpr2Zw54YFqL+47lvvkusgus/r9nJTPjzWMN6NE/lwXse8zm7r +Cqy/caEqvvM2vM/c2DixVhA/9IrH1A6UQNabojXhyoJYlBx8RmqyBDyE1nv9 +oQvibEixyAG+UvgQS17k3SWI2Y//HZlVLIX+A6tYolxBrEp/Y5eyuxSGzL5U +Ud2FUOVrs3fl51KYG88ojb6+BoPSx3in95VBSt7xV7xS63Be8FHDRcdysNbf +KyymuA437FUgmbuXw4qHjlvXa65DqZsH58e9yiHus3KPjfE6NPPqROr+cjii +8Hwwfe869HjXxz2WWA4HciQXVWrXIbdowJS/rhwcsss32GwTRvVDfeQhcgWs +3fBf0A5fYeQ6fv1vULECXtbFVQQFCSOl9W1kn1oFWPe4GqbHCmP8nQ8OjQYV +YCK9aNpbJIzl5lXuRpsrQD/TelvQvDBu9NsooBFdARLpn09duCKCbwZ3lD5o +rwBJDW7cXIEIVtk09pUS+yjdlHB8R5kIJi+Ui1/+UAGy42ph65sJb4q+tH2w +ApRtg73rhkQwg13QdvN3BegtXaB+1hPF4j0RvXZylbAlVPyL7lNRtF1ZMPXB +rxLsVw99zHgjit7p1SYagZXgmFvzfv6DKFrw650JDaoEl9fbX7X8FMWe1kLx +uYhK2LHhRq2HmBjeTSfNNiVVQuAX7XMnvcUwuH/qtX9hJSQ6Wxm1z4ihZWDT +/tHBSpDmvJTmXSKOeyJGNg8PV0KJiPOszmpxPB3Yaf5prBLetnuWnZMTx+hN +TrH3ZipBySFUwcFSHOvKb6lr83OgafM1/teXxZFz09V9VpEDC+bTL1+wJPAq +ad8/0jYOpBVEFS2YS+DtJcU7d3hyQImfJ0nTQQLP8578luHDAdtHq4zP+Erg +H71Hrn/9OZBlSqm0TZXAEEWR/uhQDhiiTcazPglcYiewdPdpDoTQr3s9OSmJ +Cm7nWjuqOGCdIzRlc1oSt7RW12nXckBh+ZGklxclUbL5Tm58PQded7iUv7kl +iWoW5+0UHnBAK1iA7+NLSYzlL98o95QDQwURBb+kpVDdc2X1+h4O3Bf8yghT +kkLBAm26bi8HLoU6vprVlELefZtraH0c2GSiOTePUrgYf7RG7zMHcnsHrJb7 +S6G10dFXP4c5sF3UblSmkljflc0f+ZsDetF1MVfrpVDa7+Vbvb8cWDWgKi7f +IoVyd1ZXfp/nQE0pH6i8l8IbR7UumPNwQdymJm3jPyn0vqW2+hE/F17HKOlv +spFGw8QrtzqFuXBz6FzrY2dpHLYUvmksyoVjW/5tt/aUxu/+JxpviXFBk9wd +v+UgsZ5marlHkgvJ1WffuWdIo5RQ/uNiMhfMfv6JOvBZGkecruy3Xc+FSMt0 +9Qcj0miTfGKJryoXSq5rdovMSOOVcvrEYTUuSDp702tWyOB7Rdeh8xpcGKl+ +NMunJYM39lY7ntXmgryw100Xmgz+11YzcHIjF1wC51wKUQa3twu8O6jDhUay +xl07Jxl0oPNNGOtx4cLJtNDLh2XwdvnKlUVULrT2qCmNxMgga6lvdySNC/P6 +zW+MUmQw3W1C0syQC37fpnW/XJHB+kG1gad0LjBst01oNcugWJPVo+ssLgTl +T+XEPJdBkYsOFFs2F/IWz9h3dMrg3vhnExOEhcobSyOHZHD5+/Z5beDCgJjK +gYeCJBShl3SEGXNBIug+WUKChAf965bOE7ZtdXuxl0LCh3t6OEdNuHA3KmXD +Gj0S9qljVogpF368UfrgwyLhp/LFtm+EKZoNKZxNJFS81JzqakbUu2982N2N +hA0/dmWrbeLCfcPkrGIfEnaVPvyZQnjqnKL1vwASngqlvvhO2NPMpTDvKAnB +018j05yoz5WfbrMJJKyBqpIhwq0zSSus00iYkEl/oG/BBd3COv+fuSR8Wc5/ ++T5hf96tEibFJHQNG/VeJJy9bawlnUtCBY7RPUNLLrRxEsO/NZBweMSm9ABh +fiF5FUYrCR8s2WOYQ5jpX9t5uo1Yp35zf0E4uNEpvq+bhOU6cmIzhPOlRvV1 +v5DQc9YvUNqKC92HEr7EjZJw3Yi4J4Pwmudy6e9mSJjVljS2lbCZco2pOg8Z +97VIyO4nHHnMcfLISjIGmFHGjhMuefcj95UwGbvkeLxTCX/eGO+oQCKjVoJ4 +WCZhyWRZ3jBlMi7ON2tdJWz7uar8sRYZX3sHpF4jHMNy8JE2JCPPl30Xswlb +el79RTMho+B056F0wkInfsRutSXj4JkOg0TCndcNxUJcyNhTrNcfSji7Ob4g +zZuM/oqNITsI7/raTisJIGNEuuUvJKy+nPLkWSgZOYeu7JAjPKG63+P7MTI+ +XUyrmiPqUW1d+4P/FBnvbJpd8v96Hd+3/KjSBTJ+kS0wyiZsnuosZHKFjI3q +YUF+hAXLrl/zuknG6tfsSxqEO9rGNh4tJ+N5dg/nB7Ff/00ym7LqyPjAR/1F +AeGdYqecqh+RMfnnyk/bCY+7KYZPviej5OsF3lqiH6qigpev+0JGVeMuUR/C +x7LvZWqNkXHS+ZUaH2GBfte6vbyyKJ1bsduQ6K83S/JtEwVk8WPTodRnRH9m +Kf7qzROXxdsOs03uhNf7n+bpV5fF/5grnP2Jfh5Len9uQV8WF4TCOYNE/3Nu +qyjKgCzasQPX+xA2GWvc5OIkixM8D2wtiHnxDJtOfh4ti14Kts+7jLignGFC +Go6XxTvrZOY2Gv0/L87eWZ4mix6d5uZxxDxGzau9NsmTxYSTDQ4kYn4vxnqK +1TyXRcn0ZzuEifnenl9U8PatLBqOC3eaEvOv8HiONtUvi/bPJo8FE/lQtuqC +h/a0LGprNxyqM+DC83OPr+WT5bDF86CopC4xP5WiOs3r5dDtUJiHIpE/Hp0+ +Tf06chhmWflZjcinIcn5LzLmclikYtWqqsUFvpyN6ucPyGGIiYbYGJF3jJLL +nGP35dDEnPdKJoXo53cvF8Za5ZD3b3v2ATku2PEstfBql8PgvsQslCX6x/HA +e/gqhzG3Gy91yRD7Hy1//MQyCkaWXX7YJU7Mk9zMDWMNCl54lpMsI8CF6cq0 +1t/aFLSs+YgVq4h6WGqMlutT0GLVEuFNK7kQf9CbqmBEwcmbWwW8iPzPan7a +yutAwVSG6sXdxPnw0P/aaHM4BfdZdl6umuSA1Txd+Eg0BVXdPveu/cWBl2kd +VP0TFJyafeHhN86B9zUrT+SdoqBI11t+/lEOjK0OFY7PpuCDevoOyUEOSJZZ +0sybKPgTNCqS33Fg39zEiVZBeUy5v/daJXG+Mg76iQ8Ky+NC/T3jAC4HVgx3 +F/FJyuOjWo97pEoO5Pc0vzVSkMcCrQLrsBIOfGy4uIFLlUdeKdqy6TwObImn +d133ksf7JkuZOuc4oCscox1dLo/X7Vf0lfhxgCdl+mHmXXk02BZc8nUX8f18 +AR536+RR+XnabUnifhA47Rg/8UieyOscvRDiPpHXpdTj3y2PHQ9uvvmzhQPi +11oTnPkU8NA9+Rsuhhz4rbH2o+ZWBSxXe+7tRNxPZq5Ix+h5KOD98SQ9JT4O +TK1RVqJ7KWB/fF3hxL9KGJukB5jtVcDRmb7kk78rYaBu14zHUQUsvvF6z5GR +SnhqUyWUlK+ADDOx7va2SsgK9ISBaQWM6FjWS8qqBFZRcc6lS4o43nvrQbV8 +JUwIW3u7NCnhkjtpFlrKFfDltLfLoeUq2OL07dipX2Vg9TPC6it1PUoKkhuC +j5bCyK4VIZzjqnh+yaJPdksxcd+X4E1sUsPQYb1VasK3QfiFSmrZT3WcFbP7 +sPTcTSAlldpTqRvwyYelP1VH8iBTg75WxF8TZ5fvXqF+NheeShsbTJ7Twoqy +0+4nPXOAQWpK036rjdt6ZaWm7LNBiC831OfkRlSkZ0jNJ2SCbIwcy11FB4eO +LM13epkOK5W333V8rIO1KzJFO1LOgRZbqjRihy7WnHKwbqg8A4c+Cjdb8+jh +j/y2c87pSfBz8vRWq0w95Ni7VNwNigML7ZYsK0197N7+vL1n9AQ0TDL/zr7U +R+k5s8AG72i4/rxqp1ObPs5EvgvItY6GuHy9pyVv9DHPt1D0on40WLlqXPbt +0kdadbZtwYpo6KiVpr35pI8PG2vSI8qjYDjm96GSKX0Ubi6/92pZFIivrRre +LW2AuYGChqo1h+HABt3uNl8DvHc8c2CFVTiEzUr/8dpjgMNySz+164fDkSY+ +6bEAA7zS8lejmBIOKW6d7quCDfC6oFfC6bkwuBV3+L1JlAFWfO7bzVcYBgMf +GroqUw1Q8M69lCaBMHA5Y/PuYpUBWs3seWfbFwLssd0d7iupaP5w6kpryUEQ +r7PIrV9NxWfUsE9G1w7CWKJ6sJwQFW0piXcbzx6Eq/Ljq78KU/F98tm/g8EH +YdE52jSYREUus5N1T+8g3K87V5GgTcVvyeTF5LpgMD7VkFa5lYrObuHchYIg +2KQkuVkwl4o8IroRr833AWf0kfzuPCru+nb8ca7mPlCqCpmpLaCiwScDpyTR +fbDU+tW1PUVU/LLf5efpgUBoCkr41cyhotnE2fmo44FgVDeVEfWYinpboxP7 +6wOA6tg28G2EinbFtIWTm/aC6onkw000Gl5+0GLSkOIH9cz8ZbYMGkovFam1 +CPMD+9n75ztZNPT/HnT5i6cfHD4wXTxkTMMbFosebrp+0Lrd+5OQLQ2DoteE +qXT7wh461XqbNw0fr/kV4qDpC4W/PslMJdGwy2WbfuKnXaDuS7+v3E3DOX3J +plvHfOCsgt2f2A80ZDsXX36/3wem+nYaDHykoYhjRIbkDh9o8DhddPUzDY8f ++/CxkekDjvZ9GRKjNNyxuCS15rc3RDLjg1fyGCJHjXeZ6WFvaF3XJj+qbIiN +2V0/vi16gm/DnjjOQUNM4A+4dH7PNhjbPxyxKdQQ/3kN6Gy02QaHyfsC34Yb +Ymy4St53zW2QfCTIcS7aEKPT9nNLJz2gjBFOYSUY4q8uWdWEEx4wfze2vjnL +EPnNJzytrrnD+dKrU+3NhigVWi2cPu4KJC/K0K4WQ+QtUJ47+dYV8oVye6Za +DbFOmyGUUu8K1fvzm8RfGuL6YzVRg0mu0KtRnObRZYiL+ltIrQquoHqrZsPA +iCHeSfo6oLTNBe7ndOyeEKNjwLYr0zW9ztBvK+8VLknHsgujXJHHzsDze7/7 +X2k6ppyr8owtcwYTh+V2yyh07PQVVsiLdYaWJQyalDod575yj3xXd4bnO6+t +NDai482fz1aHHnWCbqWAkjQ/Or5YriyxRtcR/r6+e0tsLx3rH48t8Mk6Auko +342sQDoGcuPyBFY5wo7O7Iy8YDoe4TwZcxtwgP74Vyeqo+gYtX2msOeCA3wb +1HfqT6Xj+W3soOg/9jB169+sdhUd1+TPz/oXbYFBF/OcUzV0/KcjGbszeQt0 +LT1j+bmOjn4R0TPRe7dAnbf05UuNdDwk0a27WnULnJQ0YCw8oaO68n92mQV2 +sDYp4MjTD3RUCksudC3cDBv8O3l8eRmob6rQ0vTQBmTFSIUNSxnoEN7tH3jT +BtY273SQXM7AovreKe1kG5iUHb/+bDUDRVaLhAnY20Dt21WmumIMVNE6f3Zt +rzVYmmP8v/UMJJLIX2feCnYpF63M2szAOG2PaIadJUQ98gxQsWeg3Q+FJ0t1 +LSHNV/hZhSMD+1+r3h4Rs4T6/MjTz1wZuPm5Za3oRwsQVbFcs+DDwMCYfOXm +IAtoUfkq6h3OQOO8J4sxmeagripHUbnGwNVXdru3L5oBtrafqLjOwMv7u1xJ +g2bgsifhk1EeAwVeLyk/8cIMYm+N5roWMjDT3nFdZrYZfFCtVz5VyUDJlIWP +i0wzSFVz1xh5TPzfXuqFjOOmMKF+gVoxzkCJyCGmvZQJdD3HTSKTDGTdM3+i +vMwEGg+MOYVOM9BsSLdpzYQxpFZYHaT+YaBThWwJ5YkxqDN4imv5mBhCWxWm +H2UMO632yzeLM5HZvJ0i2o/Q4W8h0MFi4mPncWZIKEDdymlpA2CiZn5Yx5Q9 +QG5RrtolYyYOxomMZGkCBP9cMHczZ2JaG0vU+ZsRCEZwYj5sYWKv9obS8O1G +YJ4gP/tlJxMvHYzM8N7Mhuq8v5+mk5j40enP/iFLJlBNQ2etU5gYWlav7abO +BO6nEYGcM0wU0nQy/LaaCRWyH2nW55kYm5dZvPMVA4ozG89c/Y+J9xWjBJ67 +MiDndDzdooSJatfWWtgfoMOp0DXnMt8w8Uah+IBXOQ1WiCQVjHYyERUt5GMv +0SChnKfepIuJxXYss6ZoGsSNTQyOfGDiav6QlxfMaXBsTwfLeJCJylJ+62N6 +qXBo++Wh73NMjDfTenxgLRU8zBSRKctCvi+zOUOn9GGhY4VQM4WFLg5xGW7B ++pDjO9ZjrcjCAf/FB19d9GEwoSbCQ5WFKfmZTFclfTj0ZEtppC4L+8NF4i80 +6kGy3RHZanMWmlIDBlwXdaHWrXNeP4iFVrVWkZapOrDje+3T+oMsnK3zklh/ +WAd4onIyzUJZON68yVtupw6Y/xeo7xzJQv5LLYnbqTrQ3rtkX0gsC291FVnw +92+E4Z1aPeUZLOxrvnOLx3AjyOxPrNFqZOEG4wyDe5OakPrPzyClififiImt +Qq81gfe8efm3hyzMEeQWJhRrwvDdZYU5T1jYmnDEfsRXE2p54jKF37DQOdLb +N7F7A3ikn4iY+cpC+497A3qeakBmXaRBw2o2psbZBMy2qIGAnXu5tBAbz2K4 +9eBNNTjRb6gZsZaNAbvPNM8mqcGeZXNKG8XY6Fe1czrGRg1oW8JFc2XZ+Gsx +PE27XRXeDhyajNdh4+od+KLt63oQW7WvfLMrG0dO36uyUlaBPNOjUePubKyu +31WrulwFdI+mml7YzkaxoMoyze/KYDde1tnlw8aUR6rPbt1RhoS307937WNj +FT5e6mWoDHO5x02iYti4vPBkTIGzEnQzL7wpKGJj+WHyUMxNBdgTlpdtVcLG +DeHCV1+eUYCZEq7vSBkbf5/T12KFKoCwQteszl02Jn7abRZprAA2K8ike41s +dPt7VymiVx7qOwp2v+lk4+aLLmI+MvJgLVStGd7Fxkahup5CPnnosngyI9nD +RiVlU411IxSYqv2R5NnPxpeXbrxl3KOA5vWNd74Ps7Fi5fyRGW8K1Hcbh58e +ZaORxatCbWsKWIs6gfY4Gyff2mxK0KOAX2JYW+g0G4tdq9gp/MT7GhOyJObY +uNAeXnSoXw5O/snYVfuHjfQbyvkrOHKwVr9ww44FNorymSp1JcrB1f210//+ +sVF2qPdL/zY5+B/g11+n + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08315465189878357}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08315465189878357}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356933883224*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"79cded15-ca3a-4e05-a8d2-966b5a35f3a0"] +}, Open ]], Cell[CellGroupData[{ @@ -10641,66 +12233,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[282]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], + "In[119]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.443621462424051`*^-173\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 282, 273, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269930374*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.957670963203737`*^-141\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 45, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.9943569339416723`*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], +In[119]:=",ExpressionUUID->"2f4b6a32-8909-4296-a082-80adc9bb8213"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.352709009016139`*^-176\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 282, 274, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699413757`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4695857675592938`*^-143\\\", \ +RowBox[{\\\"990359217009531794717859144615427415897\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0373833891840000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 46, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.9943569339516783`*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], +In[119]:=",ExpressionUUID->"cfb183fa-c04d-48b8-83e9-04f57f5da93c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.488155146821548`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 282, 275, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269949375*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.301969539821563`*^-146\\\", \ +RowBox[{\\\"393073573231083169323518294497863141369\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"96\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3746716712960000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 47, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.9943569339620237`*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], +In[119]:=",ExpressionUUID->"a9ae5c6d-bb2b-435f-83d8-b4c943332a38"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 282, 276, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699573765`*^9}, +during this calculation.\"", 2, 119, 48, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994356933971305*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], +In[119]:=",ExpressionUUID->"fec96cc2-f776-4e42-8d36-012aeb36d93e"], -Cell[BoxData["9.332200719005147`"], "Output", - CellChangeTimes->{3.9913372766841774`*^9}, +Cell[BoxData["8.957601177544653`"], "Output", + CellChangeTimes->{3.9913372766841774`*^9, 3.99435703679423*^9}, CellLabel-> - "Out[282]=",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] + "Out[119]=",ExpressionUUID->"c66db383-a0e9-4a57-bf38-e4dc6240be16"] }, Open ]], Cell[CellGroupData[{ @@ -10767,68 +12366,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494640512295`*^9, - 3.991849468375696*^9}},ExpressionUUID->"53e25fab-b431-cc42-a467-\ -e4dea0353ed0"], + CellChangeTimes->{{3.9918494640512295`*^9, 3.991849468375696*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 277, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767181473`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.612709912326228`*^-198\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 49, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357036845771*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], +In[120]:=",ExpressionUUID->"5737b97a-3d71-4d55-9aa4-1f22d8155720"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 278, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767281475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.596836566363542`*^-202\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 50, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357036855152*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], +In[120]:=",ExpressionUUID->"5265e820-b547-4639-8122-38c825a53053"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 279, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767351475`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5021094889791347`*^-206\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 51, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357036863887*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], +In[120]:=",ExpressionUUID->"69b598c8-e0ae-4222-8209-b21271f5db52"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 283, 280, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337276743145*^9}, +during this calculation.\"", 2, 120, 52, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994357036873328*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], +In[120]:=",ExpressionUUID->"e40481c0-e122-499e-8f0b-8616b72a39f4"], -Cell[BoxData["0.5406905105605413`"], "Output", - CellChangeTimes->{3.991337284091696*^9}, +Cell[BoxData["0.4113745929615342`"], "Output", + CellChangeTimes->{3.991337284091696*^9, 3.994357047932929*^9}, CellLabel-> - "Out[283]=",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] + "Out[120]=",ExpressionUUID->"cfe72637-3fa2-4e87-b913-433a8c1627a5"] }, Open ]], Cell[CellGroupData[{ @@ -10849,8 +12455,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10895,68 +12500,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494737320137`*^9, - 3.9918494774550457`*^9}},ExpressionUUID->"b18c819e-620a-d449-97d6-\ -547e3a6fa152"], + CellChangeTimes->{{3.9918494737320137`*^9, 3.9918494774550457`*^9}}, + CellLabel-> + "In[121]:=",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 281, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284131695*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.612709912326228`*^-198\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 53, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.9943570479863443`*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], +In[121]:=",ExpressionUUID->"c953fac7-ba7a-4ae3-92b4-d099380b9870"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 282, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284142767*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.596836566363542`*^-202\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 54, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.9943570479958982`*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], +In[121]:=",ExpressionUUID->"6981d288-88ac-4796-8524-0dfdeed1ea0c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 283, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284150778*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5021094889791347`*^-206\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 55, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.994357048004278*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], +In[121]:=",ExpressionUUID->"bb3b8fe0-eb93-425b-b25b-6a128773bc96"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 284, 284, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372841597614`*^9}, +during this calculation.\"", 2, 121, 56, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.99435704801429*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], +In[121]:=",ExpressionUUID->"db2893bd-fb2f-4d63-8a7b-6395e6b99cda"], -Cell[BoxData["2.9943030245183917`"], "Output", - CellChangeTimes->{3.9913372907074146`*^9}, +Cell[BoxData["22.83472588567628`"], "Output", + CellChangeTimes->{3.9913372907074146`*^9, 3.994357058535153*^9}, CellLabel-> - "Out[284]=",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] + "Out[121]=",ExpressionUUID->"aa806680-f559-4a76-9082-ab7aa1dad5d9"] }, Open ]], Cell[CellGroupData[{ @@ -10977,8 +12589,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11023,68 +12634,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849482271084*^9, - 3.9918494852683945`*^9}},ExpressionUUID->"22ab74c7-5916-9440-9d7d-\ -c3e0f6ab8836"], + CellChangeTimes->{{3.991849482271084*^9, 3.9918494852683945`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 285, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290744484*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.612709912326228`*^-198\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 57, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994357058585582*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], +In[122]:=",ExpressionUUID->"f51155dc-6e48-4557-9d75-ac93d9978b91"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 286, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290753483*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.596836566363542`*^-202\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 58, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994357058595426*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], +In[122]:=",ExpressionUUID->"0c2c322e-eb99-43a6-ac97-9abce5c9d9dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 287, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372907615204`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5021094889791347`*^-206\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 59, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.9943570586045303`*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], +In[122]:=",ExpressionUUID->"fbb2b69e-b066-447d-b217-5afdae6472fc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 285, 288, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133729076952*^9}, +during this calculation.\"", 2, 122, 60, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994357058613385*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], +In[122]:=",ExpressionUUID->"1079abb0-8609-4169-abca-cd4edb44ca00"], -Cell[BoxData["16.72305770548981`"], "Output", - CellChangeTimes->{3.991337294569908*^9}, +Cell[BoxData["2.9498349330478004`"], "Output", + CellChangeTimes->{3.991337294569908*^9, 3.994357067336824*^9}, CellLabel-> - "Out[285]=",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] + "Out[122]=",ExpressionUUID->"148707e2-2668-4034-b1c4-c548c6be52ce"] }, Open ]], Cell[CellGroupData[{ @@ -11093,22 +12711,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918494889040737`*^9, - 3.9918494971484394`*^9}},ExpressionUUID->"f9c66987-c237-7a40-a006-\ -e20e260dbdcb"], - -Cell[BoxData["0.07640873836855284`"], "Output", - CellChangeTimes->{3.9913372946009064`*^9}, + CellChangeTimes->{{3.9918494889040737`*^9, 3.9918494971484394`*^9}}, CellLabel-> - "Out[286]=",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] + "In[123]:=",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], + +Cell[BoxData["0.05012342128872107`"], "Output", + CellChangeTimes->{3.9913372946009064`*^9, 3.994357067380364*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"4f0df984-80a0-4654-81ca-2724bb23f2fb"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918495000311985`*^9, 3.9918495029810333`*^9}, - 3.9919248636163254`*^9},ExpressionUUID->"770a9ed7-7938-9e48-be64-\ -c31719ef3a6b"], + 3.9919248636163254`*^9}, + CellLabel-> + "In[124]:=",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ @@ -11131,12 +12750,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[288]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], + "In[125]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[BoxData["7.13574266196526`"], "Output", - CellChangeTimes->{3.991337294629921*^9}, +Cell[BoxData["8.923544444935626`"], "Output", + CellChangeTimes->{3.991337294629921*^9, 3.9943570674258738`*^9}, CellLabel-> - "Out[288]=",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] + "Out[125]=",ExpressionUUID->"decf2df4-a023-4361-afe0-cce6226014d5"] }, Open ]], Cell[CellGroupData[{ @@ -11146,12 +12765,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[290]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], + "In[126]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[BoxData["1.4042291233212119`"], "Output", - CellChangeTimes->{3.9913372946629753`*^9}, +Cell[BoxData["2.125655620179171`"], "Output", + CellChangeTimes->{3.9913372946629753`*^9, 3.994357067440546*^9}, CellLabel-> - "Out[290]=",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] + "Out[126]=",ExpressionUUID->"0d415ae4-d0fc-4b4d-8604-00977e723e40"] }, Open ]], Cell[CellGroupData[{ @@ -11161,12 +12780,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[293]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], + "In[127]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[BoxData["10.020217662457247`"], "Output", - CellChangeTimes->{3.9913372947367725`*^9}, +Cell[BoxData["18.968382401296036`"], "Output", + CellChangeTimes->{3.9913372947367725`*^9, 3.994357067454912*^9}, CellLabel-> - "Out[293]=",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] + "Out[127]=",ExpressionUUID->"8602d7df-3c23-4ea4-87df-e166b6d42801"] }, Open ]], Cell[CellGroupData[{ @@ -11356,12 +12975,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[294]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], + "In[128]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[BoxData["0.06674599726273667`"], "Output", - CellChangeTimes->{3.9913372947513313`*^9}, +Cell[BoxData["0.00894022324016398`"], "Output", + CellChangeTimes->{3.9913372947513313`*^9, 3.99435706747528*^9}, CellLabel-> - "Out[294]=",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] + "Out[128]=",ExpressionUUID->"be1e3efa-6da2-4f01-bc4d-38198f39c73f"] }, Open ]], Cell[CellGroupData[{ @@ -11375,12 +12994,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[295]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], + "In[129]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[BoxData["3.430301770911147`"], "Output", - CellChangeTimes->{3.9913372948636913`*^9}, +Cell[BoxData["9.372830408223757`"], "Output", + CellChangeTimes->{3.9913372948636913`*^9, 3.9943570676418037`*^9}, CellLabel-> - "Out[295]=",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] + "Out[129]=",ExpressionUUID->"fa47d725-e0d5-4013-9cda-12f115795eb5"] }, Open ]], Cell[CellGroupData[{ @@ -11572,12 +13191,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[296]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], + "In[130]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[BoxData["0.01266539131451536`"], "Output", - CellChangeTimes->{3.991337294877693*^9}, +Cell[BoxData["0.05209807518875241`"], "Output", + CellChangeTimes->{3.991337294877693*^9, 3.9943570676587687`*^9}, CellLabel-> - "Out[296]=",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] + "Out[130]=",ExpressionUUID->"53d90fc6-db30-4a3d-bae3-0f480b017ca4"] }, Open ]], Cell[CellGroupData[{ @@ -11591,12 +13210,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[297]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], + "In[131]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[BoxData["7.874729317258519`"], "Output", - CellChangeTimes->{3.991337294976324*^9}, +Cell[BoxData["3.8827023769121727`"], "Output", + CellChangeTimes->{3.991337294976324*^9, 3.9943570678343067`*^9}, CellLabel-> - "Out[297]=",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] + "Out[131]=",ExpressionUUID->"0fa8e046-110b-41cf-949a-1c339df141eb"] }, Open ]], Cell[CellGroupData[{ @@ -11689,12 +13308,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[298]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], + "In[132]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913372950022793`*^9}, +Cell[BoxData["0.04702603264830412`"], "Output", + CellChangeTimes->{3.9913372950022793`*^9, 3.994357067849607*^9}, CellLabel-> - "Out[298]=",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] + "Out[132]=",ExpressionUUID->"161006aa-a87d-4e57-b254-1d5605a671c4"] }, Open ]], Cell[CellGroupData[{ @@ -11784,12 +13403,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[299]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], + "In[133]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991337295013279*^9}, +Cell[BoxData["0.9529739673516959`"], "Output", + CellChangeTimes->{3.991337295013279*^9, 3.9943570678641167`*^9}, CellLabel-> - "Out[299]=",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] + "Out[133]=",ExpressionUUID->"03a24707-a837-47d5-aada-9e263db7fbc8"] }, Open ]], Cell[CellGroupData[{ @@ -11912,12 +13531,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[300]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], + "In[134]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.991337295041279*^9}, +Cell[BoxData["0.04481458490166476`"], "Output", + CellChangeTimes->{3.991337295041279*^9, 3.994357067882002*^9}, CellLabel-> - "Out[300]=",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] + "Out[134]=",ExpressionUUID->"b711b6e7-5233-40d8-bd90-a92a685e3fb1"] }, Open ]], Cell[CellGroupData[{ @@ -11979,68 +13598,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849517192892*^9},ExpressionUUID->"55d51961-97f2-ed4d-8bf8-\ -8a461d652ab4"], + CellChangeTimes->{3.991849517192892*^9}, + CellLabel-> + "In[135]:=",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 301, 289, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950662746`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1168056017162554`*^-196\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 61, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994357067902299*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], +In[135]:=",ExpressionUUID->"f2f042e8-423b-4e47-8495-28a3901c6caf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 290, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337295076277*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.139754546351969`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 62, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994357067911352*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], +In[135]:=",ExpressionUUID->"233919b3-e383-4d33-9c2c-1f2464c168ec"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 291, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950842743`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.375393697123231`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 63, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.9943570679206753`*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], +In[135]:=",ExpressionUUID->"092b89d9-2a5c-4a77-b4f8-d0d9e74f5219"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 301, 292, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950922775`*^9}, +during this calculation.\"", 2, 135, 64, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994357067928102*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], +In[135]:=",ExpressionUUID->"e8e77123-a01b-473e-a090-6840392c4dc3"], -Cell[BoxData["3.430301770911144`"], "Output", - CellChangeTimes->{3.991337298790371*^9}, +Cell[BoxData["9.372830408223752`"], "Output", + CellChangeTimes->{3.991337298790371*^9, 3.994357075654584*^9}, CellLabel-> - "Out[301]=",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] + "Out[135]=",ExpressionUUID->"caddafd9-7085-414e-ba6e-e3fb58b3b6e5"] }, Open ]], Cell[CellGroupData[{ @@ -12102,68 +13728,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849520751028*^9},ExpressionUUID->"9704b9d3-b449-2144-9970-\ -6a7de047241d"], + CellChangeTimes->{3.991849520751028*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 302, 293, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988243732`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1168056017162554`*^-196\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 65, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994357075705522*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], +In[136]:=",ExpressionUUID->"f9f20a6f-ab6d-4eda-a51d-9489ac639322"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 294, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988343716`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.139754546351969`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 66, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.9943570757131977`*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], +In[136]:=",ExpressionUUID->"a6e64613-9d0e-4bba-b9b8-64c1b6175bd4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 295, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988425922`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.375393697123231`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 67, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994357075722404*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], +In[136]:=",ExpressionUUID->"f6632333-dd8f-488f-9a0c-3cec6341213b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 302, 296, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988505898`*^9}, +during this calculation.\"", 2, 136, 68, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994357075730892*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], +In[136]:=",ExpressionUUID->"d3760211-7d65-477b-ac23-6ee1b4d849f2"], -Cell[BoxData["7.87472931725852`"], "Output", - CellChangeTimes->{3.991337302457178*^9}, +Cell[BoxData["3.8827023769121713`"], "Output", + CellChangeTimes->{3.991337302457178*^9, 3.994357083386492*^9}, CellLabel-> - "Out[302]=",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] + "Out[136]=",ExpressionUUID->"10698c27-f467-4f8e-9786-7e9b538c6ab4"] }, Open ]], Cell[CellGroupData[{ @@ -12221,94 +13854,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849523511486*^9},ExpressionUUID->"0fd90636-7592-fc40-bf9d-\ -ae1cb915c656"], + CellChangeTimes->{3.991849523511486*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4Vd0XB3CZKlGGIkTmolBXpkprFZKxUkQiXfccQ6akXiGapEEqaTZU +KElJg4S3n0olbiiilOleU6bQNRzp9dv9cZ7zfJ71nHW+6+y9jzo7xJkSFhIS +6ibX3/ueKoNFz2qq1pwCtqokjwdrBjKN2Va5YMY66PLXrekmyVpWJcC3r5j4 +602cD+KSRm+gMtl29mzi/IjY12JWXEhQ+n12DvHJt/NLY3M+gsdgc6wM8fOa +PWmTrM9QbjDSJEfc01gRfaD4C4gILHLkiZU6ND1GLb/DCZ/n7YrE9j+jzfdy +W8D3tu8ZFeIXkz2zInLaQK93Q6Y6cf1hhaiCYD68pzx1dYgHxK16BKwOuLcx +a8ESYvGEUHejsU6o7VKLWUasKpNavqe4G1LCahxNiJ2UR28PWPbBQALX1JKY +vqEhrz9jAJ6UKjrbEcdqb4zbzf0JXoYpjZuJvyjULQ/PGYLRtetM2MSc7QH+ +FxKG4f1TeuZu4sEUoZuPgn9BqOgru3DiGRr60kOsEZCYvXD+CeJkzmsb6Xmj +kFemnplErHbHPdZwbBSOOXqmpRKbLT0+EFQ8DmozDzc9IfYzaeH2WE5C/evT +x7uJBRH7RCV0/kDxIerYKPGh4lmrdWf8BypiBwdF+Ty4gmb3fLlTMNvGT06T +mJNVbhWWMw3XzrU+xiHOeXuh9bCyMKbbawj2EQ92eUWfTxDGgVTLT/HE0Xoj +jx8Gi6CKtuvXXOLkPHXNnywxjO6tk50kbqzpe/FfhhgqCfcLpNtJ/uFn22fP +E8flHZusdYhzVzgl6Y+Jo/tmoeXOxGXPI6cFFs/AhMIFK/KIR17XtnRbSqKK +v0vPwQ4eyDpISke9kMQGqR+SKcTL6qxQylwKFWjj/CLigPanN5YbzEZDr6kY +hjhUmLvMQlIaPzolGB7s5EGHxoOhuFEZ1BFf15nSRb4PXTGz2kgWxypstF8T +C9/rVJ+/RxYH2TqdP4jVjBY65/TK4pMF//SbdfNgu+W5R1Wtctjx4Y5sE3G1 +T9hehcp5yEr1fW7Rw4PmO4mnvWfI46e5SgqBxH29ORl3reWxRuLD6DViiXB+ +7apSefThwOoJYqtjW1d4P1XAUIXMlhe9PCjKNBnJTlfETwfHT3n38yCzY2L/ +ynAVzKt+eFJsiAcbXOKb995XweHRNGEk7iuTW3+/UwWnJVj0RxKvyFw6T81d +FQWjlxWGicvYXo/F1izEilr5lx3DPBj+2fpP91E1DD8x5s8T8EAuyOrJY0cN +ZD220VvO8KAzU8JvU4AGSrlEtRwgLvxeo9x/XANNRSrEXxPvcPA8qlOqgUGu +7+65TpB8S/Y7X2VpYkt9zsajv8n7e+4MxihoYSg/RHj4Dw+2+s7St2vTxjcr +hw21RfgA+11Y2/5oY6uXRmQksV5cuilHUQe/K0axaoiFMozWxWzWQQumoD9a +lA/3mz22PXqpgxfFqhK/ifFB3DX3sNKtRWhXbhp7fwYfCq0c63vYuqiUL2SW +OZsPGVsufxuL0cXApIKN0+fwIZHd1ip6XRdLDLTqA4g5h/b1qtbqIv3N3NBI +mg8yJalCWyz1kJ6ql30vw4cAowG9Ys0leIPSzZw5jw/KGmdjT7cvxaeq5bLN +ynwoOSXQZYT1kVd7JMNtAR92/HKvo9X1sUvD5lktcVqZlu46L32UjZ7hV6nC +Bw3fok/jDfr4aanRz9KFZN7cDm260gAfPvC7VqbJBxVlVVrNfRmOeVRdNljK +h6VZ4ZK/gYUlO+vaEtfwgc05OqLvxMK1q0ok1IAPVzSTmr13sJBeGnUnn1jk +Vt7DtxGkXn1tdT3yoTGtZ2tSPgsNXurWa1ny4eQV71RdTSOcsGziNtjwofO0 +g4Gb+ApcdHP3ZPJmPtwM09r0lGuMFUWsucE0Hx41l56e/90YTZeckVziy4dX +dp7vonqNseewxdlu4naNS2vWSZggd7jCiPLng07tdP1qGxO82P9ughPIh1yj +3pk/Xpngm92NJ2PCyPoI8l8veG6KopFeE4qxfKjZD6bHssyxNZzKFVzlg7rX +ZyfPQAusLi8oUPvMB2qq4IHKAcRjwRUn9ea2g0Jv4XQF9jrcxspJstvVDuFG +q78n6ZEzH+26+kV+O7D7J8vleqyxe0dyV+mMDri/bu/09GobZNyUtpwK7YBM +QcDL3GRbbAlJMwlr7IDxtfM/lMXa40W9kvDgbZ3QJCQy1LbLETlHpTxffu+E +4AUh5w5rbkStpi3STewueOBfXnoxbhOuXHxJe8NUF0T+Uhxb4r8Zk/p7Z365 +3g0jdutd3+10xlz7fnO7zT/A3OP82o7NW1DBr426MacHPimmBpQZbUU5kYa3 +1tweULp9tCR7sQtyS/wCZmT1QmGrnoOTlCu6a71MHI3sA9W6Qd/9/a5YIHqp +I3ZbPxhdPJ+b0boNCxpde545D0Cq6C+DpNdu2LLCL1N7w08oWGvYGPfcHRtL +hpK/GAzCFdNTMpM52zFmZcOd6yWDUP0t67hRggfmzJWZwbYegqeOKVqhh3Zg +YdWRpxrNQzAUtEUomOOJa64X3bQKHYaR9bp+A5Ze+PHa1AMt4V+Q3f91fK/J +TnS6csRnz61f4HYzy8dT0hstTfpYfDMBPH5kv1MknrhpW87tbwIwV/7EnGS8 +MasvZM7UnhHQbPVt/Oi/C++nmHAOCo9C+6zdG1P4u1A157q187VRqEl08rFx +YaMgaqd3pfoYJEekz9pXw0br28uLu++NQcmLKcbH1gfTAnTuvlk8DnN2YLxR +kQ/Sp3sGRs6Pg7n3QHbcCg6K7bMVHhoZh9tXB/c6mXBwz0Ds3g1j4zC3dniN +ghkH2du2CqWPj8OA9Vhd9ioOTpM8stv29zj5fwlN467jYOny7JgLQgzMHpNx +l93MQY9Tu50mJRhoP2M8Mz2Ig1vmX9ioupCBxOJo/8LbHBQ0ztqaZMVAEOuy +eUQ2ByXWl1/JtmbA4W7+TLMcDk6G/hr4dz0DEpc77z67z8F3/xyt6tjAQFzY +pp6CJxx8dkpui54jA9G6WrufvuLg1PtOk+MuDARcrgx81MzB1MKH1+MpBmxn +d64Oa+Vgw2WVM7E0A4vjhKRYPA6Wny2P3+/LQGeY8f38Dg5mVrde3uXPwC6n +9P6HfRxMavNasDSIATexvcF5ExwU+t/uw0nhDNjsVQrNlafwdKC1asYRBl6l +H7dLmk9h0APphYlHGVjNHdaKUKKwua1U8M8xBpZpV361VKXw8/ZClQ3HGVBs +iLL8pk1hiU+IV+NJBnpXNslLGFMYqRi88+05Bs4K3/jXdwuFIqInkotSyfyG +klccXSjMPX/rYWwaA8c8IsKMtlEoPi/uqmU6AxFPNi2a2k7qY09q3t0g+elp +5y+xKVTycqt6mcGAUQWb82YPheHdSXVRdxloOK89S/MchXdsghLFnzDwAKT8 +us9T6KHnZX+N+Fi/oOz+BQpZ3cOjS58ywLItizG7TGGZZKDixgKyfkI+w45p +FC6X8I8/XsjA+pAbXyNyKTyeV9/5soQBFZUTJmseUOgZ7hxt9S8DgoqQCyIP +KUw5o/HfG+JbOuCY+JhCtRTjt29eMPCnqak0o4jCut8hnMJSBp44KGdXlVPo +vsi/xL+MgdMTwmLJFRSeuHR2+jdidnbPLncuhXaJwhb2bxiQFi1Sbq8m/WVd +6cVvGQgsdjvL1FP40z4q7/M7BjT1Lu3X6qDQRWdAeLKCgYmGg7U/Oim02Mzp +8KhkoCaOWpbXTeGYkd/DIuKYthU95n0U0kceT4VzGWi8Uuu58ReFmYtvHvr+ +gYGk6TLWkdNoDPsmN7a/hoGS4SaPcBEaBRmO7CrirqacsGAxGo2XRYZofST7 +4YnVDfZMGvccNAvhEnd6R/y2k6ExqtpimmQtye9gLWstR6NO4H8RbsSrTGV1 +YR6Nvw80nM8gPieV62qkSGN0UPBt4zpSL2rJV1an0Xv8pJvtZwborNzyeZo0 +5hhS9aeIz5070DJHm8ZTldcFFcSdtJyUqC5N9tsbGZt6Upez8etbRmOTRSXX +oIGBov/kYjtZNPqdAnuKuONH68XWFTRmXw3xv0a8sjTydZ0ZjVLDxceEvpDz +HPhA9V+kcaeYgXEJ8Wy3KONn62j8eicrr4vY3HKDQ74VjYMC1/cyX8l+UeQd +yNpA5nU0aNxFXCiady7djsZX3uYf44n5P6PuXHWgcZfBBt9cYrO38z6f2UQj +Tx1Dh4jZ+bzeeGcat4vJ8mUaGTiTkid8ZCuZX/W5YBkxL8x22X43GkPjPQUB +xFJe8jah22kcsLfhxRGb2fI9A3aQPAYtwel/n1948LSXN42TLmM+VcSFEna3 +3Ng02r/15fL/9huRf+7MobH4Pl079rdfG7/agaZRwaE/QuIb6cd92Lnej0Z0 +GylRJmY/O/gHA2i0EDqQvoT4zC27uasCadT9Eaa2krjwjMIS42AaHQ2bwYaY +F9G+1jCURg264I8zsSQn3003jEarK2PunsSmG2NCNMNpTLBJ20r/7b/S/rjK +fpI38E5/EHGC9vxUhQgauRHS2uHEBdIdj2UiaTzg3DARQdz2O79iVjSNN90m +gqP/9u+KaROLoRF2RRyOITb5ZD8+FUsj/XwTK5b4/ydMHkc= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12322,106 +13955,106 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwV1Hk4Vd0XB3CZKlGGIkTmolBXpkprFZKxUkQiXfccQ6akXiGapEEqaTZU +KElJg4S3n0olbiiilOleU6bQNRzp9dv9cZ7zfJ71nHW+6+y9jzo7xJkSFhIS +6ibX3/ueKoNFz2qq1pwCtqokjwdrBjKN2Va5YMY66PLXrekmyVpWJcC3r5j4 +602cD+KSRm+gMtl29mzi/IjY12JWXEhQ+n12DvHJt/NLY3M+gsdgc6wM8fOa +PWmTrM9QbjDSJEfc01gRfaD4C4gILHLkiZU6ND1GLb/DCZ/n7YrE9j+jzfdy +W8D3tu8ZFeIXkz2zInLaQK93Q6Y6cf1hhaiCYD68pzx1dYgHxK16BKwOuLcx +a8ESYvGEUHejsU6o7VKLWUasKpNavqe4G1LCahxNiJ2UR28PWPbBQALX1JKY +vqEhrz9jAJ6UKjrbEcdqb4zbzf0JXoYpjZuJvyjULQ/PGYLRtetM2MSc7QH+ +FxKG4f1TeuZu4sEUoZuPgn9BqOgru3DiGRr60kOsEZCYvXD+CeJkzmsb6Xmj +kFemnplErHbHPdZwbBSOOXqmpRKbLT0+EFQ8DmozDzc9IfYzaeH2WE5C/evT +x7uJBRH7RCV0/kDxIerYKPGh4lmrdWf8BypiBwdF+Ty4gmb3fLlTMNvGT06T +mJNVbhWWMw3XzrU+xiHOeXuh9bCyMKbbawj2EQ92eUWfTxDGgVTLT/HE0Xoj +jx8Gi6CKtuvXXOLkPHXNnywxjO6tk50kbqzpe/FfhhgqCfcLpNtJ/uFn22fP +E8flHZusdYhzVzgl6Y+Jo/tmoeXOxGXPI6cFFs/AhMIFK/KIR17XtnRbSqKK +v0vPwQ4eyDpISke9kMQGqR+SKcTL6qxQylwKFWjj/CLigPanN5YbzEZDr6kY +hjhUmLvMQlIaPzolGB7s5EGHxoOhuFEZ1BFf15nSRb4PXTGz2kgWxypstF8T +C9/rVJ+/RxYH2TqdP4jVjBY65/TK4pMF//SbdfNgu+W5R1Wtctjx4Y5sE3G1 +T9hehcp5yEr1fW7Rw4PmO4mnvWfI46e5SgqBxH29ORl3reWxRuLD6DViiXB+ +7apSefThwOoJYqtjW1d4P1XAUIXMlhe9PCjKNBnJTlfETwfHT3n38yCzY2L/ +ynAVzKt+eFJsiAcbXOKb995XweHRNGEk7iuTW3+/UwWnJVj0RxKvyFw6T81d +FQWjlxWGicvYXo/F1izEilr5lx3DPBj+2fpP91E1DD8x5s8T8EAuyOrJY0cN +ZD220VvO8KAzU8JvU4AGSrlEtRwgLvxeo9x/XANNRSrEXxPvcPA8qlOqgUGu +7+65TpB8S/Y7X2VpYkt9zsajv8n7e+4MxihoYSg/RHj4Dw+2+s7St2vTxjcr +hw21RfgA+11Y2/5oY6uXRmQksV5cuilHUQe/K0axaoiFMozWxWzWQQumoD9a +lA/3mz22PXqpgxfFqhK/ifFB3DX3sNKtRWhXbhp7fwYfCq0c63vYuqiUL2SW +OZsPGVsufxuL0cXApIKN0+fwIZHd1ip6XRdLDLTqA4g5h/b1qtbqIv3N3NBI +mg8yJalCWyz1kJ6ql30vw4cAowG9Ys0leIPSzZw5jw/KGmdjT7cvxaeq5bLN +ynwoOSXQZYT1kVd7JMNtAR92/HKvo9X1sUvD5lktcVqZlu46L32UjZ7hV6nC +Bw3fok/jDfr4aanRz9KFZN7cDm260gAfPvC7VqbJBxVlVVrNfRmOeVRdNljK +h6VZ4ZK/gYUlO+vaEtfwgc05OqLvxMK1q0ok1IAPVzSTmr13sJBeGnUnn1jk +Vt7DtxGkXn1tdT3yoTGtZ2tSPgsNXurWa1ny4eQV71RdTSOcsGziNtjwofO0 +g4Gb+ApcdHP3ZPJmPtwM09r0lGuMFUWsucE0Hx41l56e/90YTZeckVziy4dX +dp7vonqNseewxdlu4naNS2vWSZggd7jCiPLng07tdP1qGxO82P9ughPIh1yj +3pk/Xpngm92NJ2PCyPoI8l8veG6KopFeE4qxfKjZD6bHssyxNZzKFVzlg7rX +ZyfPQAusLi8oUPvMB2qq4IHKAcRjwRUn9ea2g0Jv4XQF9jrcxspJstvVDuFG +q78n6ZEzH+26+kV+O7D7J8vleqyxe0dyV+mMDri/bu/09GobZNyUtpwK7YBM +QcDL3GRbbAlJMwlr7IDxtfM/lMXa40W9kvDgbZ3QJCQy1LbLETlHpTxffu+E +4AUh5w5rbkStpi3STewueOBfXnoxbhOuXHxJe8NUF0T+Uhxb4r8Zk/p7Z365 +3g0jdutd3+10xlz7fnO7zT/A3OP82o7NW1DBr426MacHPimmBpQZbUU5kYa3 +1tweULp9tCR7sQtyS/wCZmT1QmGrnoOTlCu6a71MHI3sA9W6Qd/9/a5YIHqp +I3ZbPxhdPJ+b0boNCxpde545D0Cq6C+DpNdu2LLCL1N7w08oWGvYGPfcHRtL +hpK/GAzCFdNTMpM52zFmZcOd6yWDUP0t67hRggfmzJWZwbYegqeOKVqhh3Zg +YdWRpxrNQzAUtEUomOOJa64X3bQKHYaR9bp+A5Ze+PHa1AMt4V+Q3f91fK/J +TnS6csRnz61f4HYzy8dT0hstTfpYfDMBPH5kv1MknrhpW87tbwIwV/7EnGS8 +MasvZM7UnhHQbPVt/Oi/C++nmHAOCo9C+6zdG1P4u1A157q187VRqEl08rFx +YaMgaqd3pfoYJEekz9pXw0br28uLu++NQcmLKcbH1gfTAnTuvlk8DnN2YLxR +kQ/Sp3sGRs6Pg7n3QHbcCg6K7bMVHhoZh9tXB/c6mXBwz0Ds3g1j4zC3dniN +ghkH2du2CqWPj8OA9Vhd9ioOTpM8stv29zj5fwlN467jYOny7JgLQgzMHpNx +l93MQY9Tu50mJRhoP2M8Mz2Ig1vmX9ioupCBxOJo/8LbHBQ0ztqaZMVAEOuy +eUQ2ByXWl1/JtmbA4W7+TLMcDk6G/hr4dz0DEpc77z67z8F3/xyt6tjAQFzY +pp6CJxx8dkpui54jA9G6WrufvuLg1PtOk+MuDARcrgx81MzB1MKH1+MpBmxn +d64Oa+Vgw2WVM7E0A4vjhKRYPA6Wny2P3+/LQGeY8f38Dg5mVrde3uXPwC6n +9P6HfRxMavNasDSIATexvcF5ExwU+t/uw0nhDNjsVQrNlafwdKC1asYRBl6l +H7dLmk9h0APphYlHGVjNHdaKUKKwua1U8M8xBpZpV361VKXw8/ZClQ3HGVBs +iLL8pk1hiU+IV+NJBnpXNslLGFMYqRi88+05Bs4K3/jXdwuFIqInkotSyfyG +klccXSjMPX/rYWwaA8c8IsKMtlEoPi/uqmU6AxFPNi2a2k7qY09q3t0g+elp +5y+xKVTycqt6mcGAUQWb82YPheHdSXVRdxloOK89S/MchXdsghLFnzDwAKT8 +us9T6KHnZX+N+Fi/oOz+BQpZ3cOjS58ywLItizG7TGGZZKDixgKyfkI+w45p +FC6X8I8/XsjA+pAbXyNyKTyeV9/5soQBFZUTJmseUOgZ7hxt9S8DgoqQCyIP +KUw5o/HfG+JbOuCY+JhCtRTjt29eMPCnqak0o4jCut8hnMJSBp44KGdXlVPo +vsi/xL+MgdMTwmLJFRSeuHR2+jdidnbPLncuhXaJwhb2bxiQFi1Sbq8m/WVd +6cVvGQgsdjvL1FP40z4q7/M7BjT1Lu3X6qDQRWdAeLKCgYmGg7U/Oim02Mzp +8KhkoCaOWpbXTeGYkd/DIuKYthU95n0U0kceT4VzGWi8Uuu58ReFmYtvHvr+ +gYGk6TLWkdNoDPsmN7a/hoGS4SaPcBEaBRmO7CrirqacsGAxGo2XRYZofST7 +4YnVDfZMGvccNAvhEnd6R/y2k6ExqtpimmQtye9gLWstR6NO4H8RbsSrTGV1 +YR6Nvw80nM8gPieV62qkSGN0UPBt4zpSL2rJV1an0Xv8pJvtZwborNzyeZo0 +5hhS9aeIz5070DJHm8ZTldcFFcSdtJyUqC5N9tsbGZt6Upez8etbRmOTRSXX +oIGBov/kYjtZNPqdAnuKuONH68XWFTRmXw3xv0a8sjTydZ0ZjVLDxceEvpDz +HPhA9V+kcaeYgXEJ8Wy3KONn62j8eicrr4vY3HKDQ74VjYMC1/cyX8l+UeQd +yNpA5nU0aNxFXCiady7djsZX3uYf44n5P6PuXHWgcZfBBt9cYrO38z6f2UQj +Tx1Dh4jZ+bzeeGcat4vJ8mUaGTiTkid8ZCuZX/W5YBkxL8x22X43GkPjPQUB +xFJe8jah22kcsLfhxRGb2fI9A3aQPAYtwel/n1948LSXN42TLmM+VcSFEna3 +3Ng02r/15fL/9huRf+7MobH4Pl079rdfG7/agaZRwaE/QuIb6cd92Lnej0Z0 +GylRJmY/O/gHA2i0EDqQvoT4zC27uasCadT9Eaa2krjwjMIS42AaHQ2bwYaY +F9G+1jCURg264I8zsSQn3003jEarK2PunsSmG2NCNMNpTLBJ20r/7b/S/rjK +fpI38E5/EHGC9vxUhQgauRHS2uHEBdIdj2UiaTzg3DARQdz2O79iVjSNN90m +gqP/9u+KaROLoRF2RRyOITb5ZD8+FUsj/XwTK5b4/ydMHkc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5900936692651026, + 1.6160881009523904`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.590093669265104}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12433,21 +14066,21 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5900936692651026, + 1.6160881009523904`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.590093669265104}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12461,104 +14094,104 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwV1Hk4Vd0XB3CZKlGGIkTmolBXpkprFZKxUkQiXfccQ6akXiGapEEqaTZU +KElJg4S3n0olbiiilOleU6bQNRzp9dv9cZ7zfJ71nHW+6+y9jzo7xJkSFhIS +6ibX3/ueKoNFz2qq1pwCtqokjwdrBjKN2Va5YMY66PLXrekmyVpWJcC3r5j4 +602cD+KSRm+gMtl29mzi/IjY12JWXEhQ+n12DvHJt/NLY3M+gsdgc6wM8fOa +PWmTrM9QbjDSJEfc01gRfaD4C4gILHLkiZU6ND1GLb/DCZ/n7YrE9j+jzfdy +W8D3tu8ZFeIXkz2zInLaQK93Q6Y6cf1hhaiCYD68pzx1dYgHxK16BKwOuLcx +a8ESYvGEUHejsU6o7VKLWUasKpNavqe4G1LCahxNiJ2UR28PWPbBQALX1JKY +vqEhrz9jAJ6UKjrbEcdqb4zbzf0JXoYpjZuJvyjULQ/PGYLRtetM2MSc7QH+ +FxKG4f1TeuZu4sEUoZuPgn9BqOgru3DiGRr60kOsEZCYvXD+CeJkzmsb6Xmj +kFemnplErHbHPdZwbBSOOXqmpRKbLT0+EFQ8DmozDzc9IfYzaeH2WE5C/evT +x7uJBRH7RCV0/kDxIerYKPGh4lmrdWf8BypiBwdF+Ty4gmb3fLlTMNvGT06T +mJNVbhWWMw3XzrU+xiHOeXuh9bCyMKbbawj2EQ92eUWfTxDGgVTLT/HE0Xoj +jx8Gi6CKtuvXXOLkPHXNnywxjO6tk50kbqzpe/FfhhgqCfcLpNtJ/uFn22fP +E8flHZusdYhzVzgl6Y+Jo/tmoeXOxGXPI6cFFs/AhMIFK/KIR17XtnRbSqKK +v0vPwQ4eyDpISke9kMQGqR+SKcTL6qxQylwKFWjj/CLigPanN5YbzEZDr6kY +hjhUmLvMQlIaPzolGB7s5EGHxoOhuFEZ1BFf15nSRb4PXTGz2kgWxypstF8T +C9/rVJ+/RxYH2TqdP4jVjBY65/TK4pMF//SbdfNgu+W5R1Wtctjx4Y5sE3G1 +T9hehcp5yEr1fW7Rw4PmO4mnvWfI46e5SgqBxH29ORl3reWxRuLD6DViiXB+ +7apSefThwOoJYqtjW1d4P1XAUIXMlhe9PCjKNBnJTlfETwfHT3n38yCzY2L/ +ynAVzKt+eFJsiAcbXOKb995XweHRNGEk7iuTW3+/UwWnJVj0RxKvyFw6T81d +FQWjlxWGicvYXo/F1izEilr5lx3DPBj+2fpP91E1DD8x5s8T8EAuyOrJY0cN +ZD220VvO8KAzU8JvU4AGSrlEtRwgLvxeo9x/XANNRSrEXxPvcPA8qlOqgUGu +7+65TpB8S/Y7X2VpYkt9zsajv8n7e+4MxihoYSg/RHj4Dw+2+s7St2vTxjcr +hw21RfgA+11Y2/5oY6uXRmQksV5cuilHUQe/K0axaoiFMozWxWzWQQumoD9a +lA/3mz22PXqpgxfFqhK/ifFB3DX3sNKtRWhXbhp7fwYfCq0c63vYuqiUL2SW +OZsPGVsufxuL0cXApIKN0+fwIZHd1ip6XRdLDLTqA4g5h/b1qtbqIv3N3NBI +mg8yJalCWyz1kJ6ql30vw4cAowG9Ys0leIPSzZw5jw/KGmdjT7cvxaeq5bLN +ynwoOSXQZYT1kVd7JMNtAR92/HKvo9X1sUvD5lktcVqZlu46L32UjZ7hV6nC +Bw3fok/jDfr4aanRz9KFZN7cDm260gAfPvC7VqbJBxVlVVrNfRmOeVRdNljK +h6VZ4ZK/gYUlO+vaEtfwgc05OqLvxMK1q0ok1IAPVzSTmr13sJBeGnUnn1jk +Vt7DtxGkXn1tdT3yoTGtZ2tSPgsNXurWa1ny4eQV71RdTSOcsGziNtjwofO0 +g4Gb+ApcdHP3ZPJmPtwM09r0lGuMFUWsucE0Hx41l56e/90YTZeckVziy4dX +dp7vonqNseewxdlu4naNS2vWSZggd7jCiPLng07tdP1qGxO82P9ughPIh1yj +3pk/Xpngm92NJ2PCyPoI8l8veG6KopFeE4qxfKjZD6bHssyxNZzKFVzlg7rX +ZyfPQAusLi8oUPvMB2qq4IHKAcRjwRUn9ea2g0Jv4XQF9jrcxspJstvVDuFG +q78n6ZEzH+26+kV+O7D7J8vleqyxe0dyV+mMDri/bu/09GobZNyUtpwK7YBM +QcDL3GRbbAlJMwlr7IDxtfM/lMXa40W9kvDgbZ3QJCQy1LbLETlHpTxffu+E +4AUh5w5rbkStpi3STewueOBfXnoxbhOuXHxJe8NUF0T+Uhxb4r8Zk/p7Z365 +3g0jdutd3+10xlz7fnO7zT/A3OP82o7NW1DBr426MacHPimmBpQZbUU5kYa3 +1tweULp9tCR7sQtyS/wCZmT1QmGrnoOTlCu6a71MHI3sA9W6Qd/9/a5YIHqp +I3ZbPxhdPJ+b0boNCxpde545D0Cq6C+DpNdu2LLCL1N7w08oWGvYGPfcHRtL +hpK/GAzCFdNTMpM52zFmZcOd6yWDUP0t67hRggfmzJWZwbYegqeOKVqhh3Zg +YdWRpxrNQzAUtEUomOOJa64X3bQKHYaR9bp+A5Ze+PHa1AMt4V+Q3f91fK/J +TnS6csRnz61f4HYzy8dT0hstTfpYfDMBPH5kv1MknrhpW87tbwIwV/7EnGS8 +MasvZM7UnhHQbPVt/Oi/C++nmHAOCo9C+6zdG1P4u1A157q187VRqEl08rFx +YaMgaqd3pfoYJEekz9pXw0br28uLu++NQcmLKcbH1gfTAnTuvlk8DnN2YLxR +kQ/Sp3sGRs6Pg7n3QHbcCg6K7bMVHhoZh9tXB/c6mXBwz0Ds3g1j4zC3dniN +ghkH2du2CqWPj8OA9Vhd9ioOTpM8stv29zj5fwlN467jYOny7JgLQgzMHpNx +l93MQY9Tu50mJRhoP2M8Mz2Ig1vmX9ioupCBxOJo/8LbHBQ0ztqaZMVAEOuy +eUQ2ByXWl1/JtmbA4W7+TLMcDk6G/hr4dz0DEpc77z67z8F3/xyt6tjAQFzY +pp6CJxx8dkpui54jA9G6WrufvuLg1PtOk+MuDARcrgx81MzB1MKH1+MpBmxn +d64Oa+Vgw2WVM7E0A4vjhKRYPA6Wny2P3+/LQGeY8f38Dg5mVrde3uXPwC6n +9P6HfRxMavNasDSIATexvcF5ExwU+t/uw0nhDNjsVQrNlafwdKC1asYRBl6l +H7dLmk9h0APphYlHGVjNHdaKUKKwua1U8M8xBpZpV361VKXw8/ZClQ3HGVBs +iLL8pk1hiU+IV+NJBnpXNslLGFMYqRi88+05Bs4K3/jXdwuFIqInkotSyfyG +klccXSjMPX/rYWwaA8c8IsKMtlEoPi/uqmU6AxFPNi2a2k7qY09q3t0g+elp +5y+xKVTycqt6mcGAUQWb82YPheHdSXVRdxloOK89S/MchXdsghLFnzDwAKT8 +us9T6KHnZX+N+Fi/oOz+BQpZ3cOjS58ywLItizG7TGGZZKDixgKyfkI+w45p +FC6X8I8/XsjA+pAbXyNyKTyeV9/5soQBFZUTJmseUOgZ7hxt9S8DgoqQCyIP +KUw5o/HfG+JbOuCY+JhCtRTjt29eMPCnqak0o4jCut8hnMJSBp44KGdXlVPo +vsi/xL+MgdMTwmLJFRSeuHR2+jdidnbPLncuhXaJwhb2bxiQFi1Sbq8m/WVd +6cVvGQgsdjvL1FP40z4q7/M7BjT1Lu3X6qDQRWdAeLKCgYmGg7U/Oim02Mzp +8KhkoCaOWpbXTeGYkd/DIuKYthU95n0U0kceT4VzGWi8Uuu58ReFmYtvHvr+ +gYGk6TLWkdNoDPsmN7a/hoGS4SaPcBEaBRmO7CrirqacsGAxGo2XRYZofST7 +4YnVDfZMGvccNAvhEnd6R/y2k6ExqtpimmQtye9gLWstR6NO4H8RbsSrTGV1 +YR6Nvw80nM8gPieV62qkSGN0UPBt4zpSL2rJV1an0Xv8pJvtZwborNzyeZo0 +5hhS9aeIz5070DJHm8ZTldcFFcSdtJyUqC5N9tsbGZt6Upez8etbRmOTRSXX +oIGBov/kYjtZNPqdAnuKuONH68XWFTRmXw3xv0a8sjTydZ0ZjVLDxceEvpDz +HPhA9V+kcaeYgXEJ8Wy3KONn62j8eicrr4vY3HKDQ74VjYMC1/cyX8l+UeQd +yNpA5nU0aNxFXCiady7djsZX3uYf44n5P6PuXHWgcZfBBt9cYrO38z6f2UQj +Tx1Dh4jZ+bzeeGcat4vJ8mUaGTiTkid8ZCuZX/W5YBkxL8x22X43GkPjPQUB +xFJe8jah22kcsLfhxRGb2fI9A3aQPAYtwel/n1948LSXN42TLmM+VcSFEna3 +3Ng02r/15fL/9huRf+7MobH4Pl079rdfG7/agaZRwaE/QuIb6cd92Lnej0Z0 +GylRJmY/O/gHA2i0EDqQvoT4zC27uasCadT9Eaa2krjwjMIS42AaHQ2bwYaY +F9G+1jCURg264I8zsSQn3003jEarK2PunsSmG2NCNMNpTLBJ20r/7b/S/rjK +fpI38E5/EHGC9vxUhQgauRHS2uHEBdIdj2UiaTzg3DARQdz2O79iVjSNN90m +gqP/9u+KaROLoRF2RRyOITb5ZD8+FUsj/XwTK5b4/ydMHkc= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5900936692651026, 1.6160881009523904`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.590093669265104}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12568,7 +14201,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.663943982390173}, + AxesOrigin->{0, 0.590093669265104}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12596,7 +14230,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5900936692651026, 1.6160881009523904`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12604,9 +14239,9 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991337564416748*^9}, + CellChangeTimes->{3.991337564416748*^9, 3.9943575010834017`*^9}, CellLabel-> - "Out[303]=",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] + "Out[137]=",ExpressionUUID->"34519780-0a4d-4fd5-96b1-e903c4e73ece"] }, Open ]], Cell[CellGroupData[{ @@ -12670,252 +14305,195 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918495265156612`*^9, {3.991849580574194*^9, - 3.9918495807911797`*^9}},ExpressionUUID->"90696e8b-5a2d-314c-8d58-\ -ac84cb8f4d66"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.976253354341118`*^-271\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 304, - 297, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337564646551*^9}, + 3.9918495265156612`*^9, {3.991849580574194*^9, 3.9918495807911797`*^9}}, CellLabel-> - "During evaluation of \ -In[304]:=",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], + "In[138]:=",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.718150004511881`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.452435943633613`*^-268\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 304, 298, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646565304`*^9}, + 138, 69, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.9943575012507753`*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], +In[138]:=",ExpressionUUID->"f0a35afb-3fb2-406e-a549-6452e6973052"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4847193100774497`*^-293\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.5388283610311533`*^-278\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 304, 299, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646656475`*^9}, + 2, 138, 70, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.994357501259873*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], +In[138]:=",ExpressionUUID->"175bbb10-c98d-4d12-9d26-6ae101c79ed5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.1774747782122555`*^-289\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 138, 71, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.9943575012691107`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"265518fc-6ebc-418c-8f9a-94df2afc4ae8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 304, 300, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646736584`*^9}, +during this calculation.\"", 2, 138, 72, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.994357501277066*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], +In[138]:=",ExpressionUUID->"57175993-52b2-4d92-be99-69975e868c76"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VO0bB3ChSEj2ZWaMvWSPGWbpvgmFsiVFhZIoQlmSJVlLStImypYl +KcvMKNsrUdKmsiX1IlFayE69qt/5/TXX55rrXOc5z33f3/Mclb1Bzj78fHx8 +B5bw8f3/d67/yUP11ML1Je/a1OziN67vypE/Zt4bD3eWlVvkpWsAyrzcK9+b +Abfp2cKB6SYQ7njrjUBvAQzXHK+0SbeCVeNyGT/fcOCDfGamSPo2GGiwD5p5 +0wx0S/pe+jkfsFb/+u/kmw6QNpzx/ZsaBj/f0C9NvBkCP5+taXqxSdCyoaTw +dcE0FK8ciz++9jKQBmo/7dX5DWuC+L9JGeeBdIDnLaENAngnxq3g5VghZBha +19tvE8akQM7QtYJSeJtp0DQpIYZznX6CmufuQFZn2cpwDTE0KTvdtyr3DriL +a3n+MhND5ZhpiZnyO/A+gfyH31sMxb4Up2W334HBQBGWdLUYxvpKeoaLlcOo +5fA9mps4ijiJTW5PKYeFiSsVUfkrsapUrafyWAWkFsa+5FdYhd/ieqJ/X68E +W+MDkjJqq/DLdL5mRmElCD903qaluwrzumVaVcoqIfGjxjs781U4ODI5aFhT +CdGqzz9dPLAKFQdGvGU6KiEwT/6PZt0qjKHuzRgVrAKna1U6djslUV5dkHdv +fxVI6GQH7faRxBusrV03A6qgvT6RExQkifsOL7RePFIFtu+2m15MkMSjGknK +u49XgYXinw3/lkniw6HZhIpLVWCcabszaFESq4/8cXFvqQK5ix9TLlyXQuPS +wJBmRQ7Ir61OXCiWQqdGZ/8qZQ4oNifH7q6UQsvVn59lq3OAMrEmTKtFCtcX +kB7t1eOAxuZgr/pRKTwpKHS61pwD6wR/0z6uk8Zax5NzKb4ccAiVHTZ6Ko0y +zL4EbgUHHFeM9l/plMbo4tZ6cR4HnAtq3y6+l0b1lcMOPjUccH2162XrD2k8 +apyfKviAA7t1btS5y8jgvIii7YoODvgP65+P95LBBef+SrNpDpx0sVnfMSeD +zTOzc/JGXFDktSvyL5HFb/8F3jCgcaFcymXecIUsfjoZ0G3B4EJPh0fleWVZ +3DX+7ImrBRfUnUJVnTbJ4tD3lGmWMxeat+Que3VVFtWD2+z5D3Pht/Vs+wuW +HIagwOPDt7iQXhxZ9ttaDh9/H4G+O8T1y/hO6TrJYYxopzm7igubH4mYn/WR +w4Mnhz9M3eNC1gYqd3OaHN5hymSTHnHBFO2uPBuQwwQDFvNgPxdCzPI9n8TL +41q9mD8TojywzROfsTsjj7KXBiVjVvJAVSj6VPsleWw4URokKMmDV12uVZ03 +5fFKiI3gUjke6AWLCvS3y2Oqj3HJCyoPRouPFk8pKqDlOpJVzDoe3BcbYYSp +K6DbRKRSowkPLoc6v5zXVcCGJ/EWv+g8sLLQXVhEBfyr+T5xH4sHBf8O2Qj5 +KmDEKuY3Pise7JK2H1PiKqBsSmyb2zYerIuqj8tpUED9BcMph+08EBlaLavS +qoBbO9LCzd14UFshAJpvFVBwQCBDdjcPZO1q0w3+KuB2fw+tlH3E+uPUja3s +FPFT9aFD6Ud4UDJ6vu2xiyJWathdYYXy4LjD3122HooYlpqkNRzGA11yX5LD +YUU810M/rnGMB6drzr1xu0KYsah4OJYHlj9+RQZ+VERl9eKnOqk8OLbpovaD +74qYaD367NQZHpTn6/ZJzSlilbNJ4OBZHsi7eJnVCivh/WU2V+PTefC95tG8 +gJ4S9l2Tzc+4xAMVSc8SV7oSiif7ND+7zANX/wXXUlTCis+XU/kyedBEXnvX +fqsS5rmsVtidxYML8emhVyOUMKldmDGUw4O2d2vUv8cp4fJd+7gLuTxYNG7p +XJ+qhLFCPe9E8nmw//Os0fB1JYxMrGSr3uABY/POSb0WJeT4xnuSS3gwJKMZ ++FCMhPvRYMqqnAdyQffJcnIkTPLmfylXwYPNbTteHKCSUMbf8+AI4buRqTor +15Hwb/jjwZAqYn8GJr667SChuNvC6G4eUX/T01m395DwwXhTj1g1D2bOq9n+ +PUjCm+LOqbWEPSxdSwtjSPhFe9kWwXs8MCqt9/1RQMKS6ymOvrU88OXfJmdx +m4TR814Zs4Sv7RxvvVhNQs+CCzdi63iwTFxFk9FGwjr9Q6Yn63nA9K3rPvOa +hOZHNjUKNvAguGlr0kAfCZUffpY7TrjvSPJw4hgJQ5O+2O77hwcrnytffDNH +wi35pzVfE7bUqN2gzUdGf7VDfWaNRP3efCt4KUnGx7VxL/8Q/miQ5KxKIuPC +zUXJnfeJep6m8IdpkDGYY7uOSziO5bRH0ZSMYSV/xbc38WCTR84U3YKMyfKO +oqWExU98S9i2mYyDjY4Gc4S7801lQlzJ+KQ+Lnr9A+L5WpKK073IqDq6byqO +sPdIB738IBnHO2IuNBHWFqI+eRZKxqH7Tnt+EZ5cfcj9y3EyChf77tZv5kGN +bd23ZSlkNNLblOJJODZAKEb9AhkLq2I+nSZsneYibnGdjBmmF8OrCItV5ud6 +lpCxKkKB2Um46/W4QUwVGds7r5lMEM6eZjZn1ZNxi2uFr3ALD/bKpGyteUTG +huqPHUqE19B7hrtfknGnQ3uENuGJHWrh02/JeEtz6U5jwvcig4VWDRPr/6gc +ZUb4+LV/MvXGydjcca/v/7ZqFNHevEDG7EHfKBPCooPb6w/wU9A++7mHDuHO +JUWbT4pS8LJ+YjKFcJba1L+FshQs8dWbWUHYywqCmqkUvFEaUDpDrFfL9wzf +oDYF9eY+lPQSHj/19vxvYwp+/WQ0eY8w75ammhJQ8PftpSczCEc9D+GZ2lDw +2kp+fz/CFuNNVq5bKRh38HWOGeHlEuJvQnZTMOo2RX0Z4VeGO/3O+1JwdNvl +xRfE/nuEzZ5+HkXBgIrGOw6ENa5YkL4mUTBf+1XK8gf/n+9zd4TSKRif9+J+ +I1HvyMU1rywKKdi5whOVCJtTju7xKqfgLMkrrZnoH2F8OBVTQ0HN3VpsH8KX +Ejxkap9TkOI23XKN6L9dRWXFPT0UHHc8nGtIWPXxAn1mkILd30uGHhD9Wyly +wV1/loLbfpuXdBH9/vz849wisjK+ep/u3kLMywWutGGLljJu7TIoWkfYvXtP +86ChMu65Uu2TS8zXqPzisJK1Mq6wzHU4UMMDgTwD7YxAZax9kvuzlZjXpw9i +6isilDH2lLCmFOH0j083v4hXxp23+nvciXmnaPkECV9Rxuw1Ri/ec4h8Kb/K +O35fGX3kd2MZkReWb9p/j7cp482cR85DRL7Y8wlu9OxQxsDKkdMyhL2dA9/C +iDIeOhVwJPg20a9RKrEnllJxn1W5zcJNYp6V526Yr6Vi2iapMCciz2a56W0/ +9al4T/zpNbs8Yn83rR2rMqbiS0sdAQsi/5IOe9FU11PRUNQ5Q+060T8tT9v4 +nah43GDyUy2Rpw99c8dawqk4Jb7YYXyOBzaLZpLRUVSUqooqnibyuj29i2Z8 +gopLItI6yok8f1u7/ERhChXpS4SYiqeJ/loRKpl0jYrRrSVRjxKJPKjcRLdu +puIZ/UzDIOJ9EbAweaJNTAU37va2U/Ii9uPwftlPkio48TenbYMHUe+vfWUC +8irYYtTJ8NvFg6J3LT3rVVUwO3KVUNEOHvQ3XtKppqng8YALMeOOPHBIMuvN +91RBUarbu2Yk8lIyTj+qSgUrj/znGEfmAV/q7MPMuyr48NTEax0lYv0CB93v +1qvgUivx813yPPCfdU6afKSCHUfUO+WleVDYq/7Ot08FX6eevRkqQrwvc9uS +XQRUMX4goDRqjgs/10r0625TRRnbWs6bZ1yYu64Yt85dlbh/YC7pCRdmVmqo +m3mq4p9jLTSPVi6MT5sdtDygiq51CYFvmrgwVO895x6jSpxvhy0Kqrnw1O6e ++KkiVVSapyVl5xDnE38PGJpVxXcLGnU6gVxgld3Ou3xZDTetaczYIsiFd9Sy +XKtsNTRqOTmyYgkXIi+X5szkquG83ljX498cuBdXfM25VA3LVe3Pm85zwGhH +XqZ4A+Hw5ru/v3BgzdKL6ckf1LD2Yqmv/EsOyHpGnQjXUcfLQyp8169wYFLS +1su1WR3tObNrHFU5MHzGy/WIkCZ+OX+pY1SkCmx+HLUZoWkhTdN89sb7Cvju +LRzCi12NU8urqJLOd4jvCTn+k81r0LoyyWdp8y2QfKGZVvlDG6mJl+5K7boJ +pFMVjjSaDnZkaYUbvCiCzLVmElK+urgh4UBOe8wNeKpobjJ9Xg/dQ0V+7HfJ +BwapOV2/Rx+nJrtbxTAHxAUKQvfEG+BrnZupU4FZQIlTZrlpGmLeqxE9w6LL +sFxj113nx4aoe7BF38X2AuixFSqO7jZCkTJFytnodDjSL9liy7cOX7YPtFZe +SoUf02e22WSuw7PM9BZH3ZOwUb81y0bXGLVaL0f4+yZA4zTzv/l2Y2SZ/LeV +9CAWAnWM+l77mKDA3QFqq3okhM0r/vL0M0G7thB7D/FIiG4WUBw/aILNWWOb +li0cg9Qd3W4iwSZYSVVMTnp2DG4mRry1iDRBJVHJzRhyDIbeN/Zy00xw58/+ +XXmPIsD1rN2bS/dMMGn8gXN32FFgj+/rcltOQ4kNRnIH+cNAtn5jQcMKGpr0 +flSbmwiF8ZPawcriNMwbq3BKGwiFHJWJFSOSNGw+YLEw1BAKf1yiNgSTaPh5 ++5rHpIhQuF9/npOsT0N2SSz5xUQImKc0pnO30TD91cf9c1+PgJW6/BaxAhqK +3GqPIy05DLyxRyr7CmmoWj7EfToVDOr3Qubqimlo3VKjnDAcDIK2L3P9ymio +btmQJtkWDM1ByVMtPBo+0nxvUHYuGNbXz1yJfEzDX8Ne9xupwUBzfj30+TsN +l9hF6WZcDITVJ05HNNPpKDrUsTo2xB8amEVLNzPoKOCaZ5zr5g+O8/czull0 +4vupRbcL/CEicPb2qDkdr3ekcaNF/aFtl9cH8c10TJ/uymktPgh+ZjTbnV50 +3JvZnmY0cABKpz4ozZyio9XmzLMSnn6g7WN2X6OPjjf8KkNVMn3gnKr9r4T3 +dDRueThwPNEHZgb2mgz10zGvYLLtW7APNLqfKcv5SMfXhlnj0zY+4Ow4cEVu +jI59g3JHGxb3wTFmUvByPlOkdW8X1vTZB22rXquMaZiiFm+nrby5N/g0+iXy +DpuiAOteYqDaHhg/9PWoVagpOj7+0blccg9EkAP8e8JNkb8k+yqPbw+cjg5y +XogyxTXmsTtN+72gkhFOZSWboo3B4on5q16weDehoSXLFOsOBefZSntBRkXO +TEeLKd74pRDwQ8sD7ud17ZuUMcNZSkWXSaQ7DG5W8QyXN0N+xzrRvx7uwPfz +kNt/imaYNxLyZ3CDO1g4CdkvpZqhxBZ8OC7mDq1LGHQFbTO8VJD6Sv+GGzzf +m7vcfL0Zbot/20rv2AF96gfL0/eb4fDkXeFB8+0wc/PvvP49M5Tq5irUervA +J1frvJRaM/ynFnZcdnCBXsGzmz7Wm2FkzjX7JKYL1HspXr3cZIai4dJ6mVIu +EC9vwvj9xAwztfI2pT/cChKnDkY/fW+G0RFCKY1rtoKObzefDz8Dazp3ZNby +OQNFhlTaKMjAhRNPX/PGnUCiZa+TvBADdf6orG167wTTlIn8ZysYSEvzFhWq +dYK6HpENRjIMXN0ybORyxAk2WWPSXy0GrlqfHfrhsyN4a5Qtz9rCwNPLOE2j +DQ4Q+cjjoKYjA0dvhTgKZDlAuo/kM44zA6+K19nhUQdoKDp25tl2BsbXxkuo +GDmAtOamlb/3MDD0wsjNyFJ7aNUckfYKZ2BL2uMlYTlbQHu1MlUzl4GXsgPP +PcizA2zrOMHJZ+Dlr3JZU3F24OqX/GF9IQOHw5zOW3jbQcLNsYLtpQz03Hag +b72mHbxf3aCRwmXgxacvx4ru2ELaGre13x8zcFlE23K5ZhuY1L5A40ww8MSX +xg2v+DZB73O0kppmYHDVsvcRnzdCU+D41tBZBv53Vfm6WftGSOPYHKb9YuDt +yj4bgWsbQZvBd7tOgIkh+8ap1aYbYa/NIZUWWSbGquqfiQu3hi7fjaJdLCaq +lzetowlYQf3yWUUTYKKg6H7Nxu+WUFBWsOayORPZPox3O3ssIfjHb+sd1kxM +EJs07y21BLGjvLj3Dkwsa+4V6HSyBOtklfnhvUwUWjiY2FS0AWoK//swe4qJ +qmf5tv3dZQG0DaHztqlMrIjjazphYwHVH76L5p1lYl6J0pw0zQI4lH66bQYT +WQXUxLCVFnA7s+lsTjYTZQaMD8m0mEPemSSzjeVM5LcufdSsaw4poSvPZ3Yy +8ajo8m1+EgjCUqeKx7qZOLqctsP2D0ByFV+DRS8T3772eDHyDiBxfPLT9/dM +NJ/enRl3BeC4XxfL/BMTcWQ82UYC4Miuq6NfFpioLJZUs0R4PbhbqiGTwkLx +riJNh5Us+N0lLN5CZaGZd1S28TgT8nzG39mqsfBKcHU1+wUTPiXXHnVfzcJ/ ++y8416Uy4cgTh4pjRiyUeZcQ4ybChNP20ZQaaxaqqS0JkBRnQN2O7kXjIBY+ +LDGvOK1nCru/1D1tOMzCGV9v/qJVpsAXmZdpGcrCi0V/xvtn6GCd7W/scoyF +zdf6Farq6dDx75KAkAQWlo35ej2zpcPXvXrvqq6wMCtXb+s/gTRQOnSyVq+J +hXd9zo22PTeGtL/7TVKbWSj4Vr7HttoY+DOsqz4/ZGH2lgjFkevG8PXu0tK8 +Jyx042/ZsjfIGOr4EjMlO1nIGin8Hi1lDO4XTxydG2Hh0TPt1cpe6yCz/phJ +4wo2FvWLOSSKGIGovVuVojgbg6yPPfs0awgnBk11j0qwcerzvz88PhiC39IF +dQMZNuaIkgfO1RgC3SFcuoDCxpr859QpX0PoGToynWTIxrR1XyuLnxqAjEhA +1ZbtbORSVS+mrdeHwg0xkRNubLxne5KNsvpgFJO24cIuNk6TtrSrjOuB/URl +d+8eYj1ufm9DcvQguWf2p3cAGw+dJQvbL9GDhYJYi8g4NnqLL0yWv9SBPuaF +zuIyNu6U8bj54qw2+IUVXrMpZ+Obz81nSP7aMFde7fO9ko1LJiTsLm3SBknV +3nnDu8T/Vi65AoLaYCdMJv3TxEazRuvq9ug10NBVvK+zm42N2yMz58NWg614 +jW54Lxv32EqQX25bDb0bn8zJv2Mjsz/g7guT1TBT9+2UxyAbrwkOR8GcFujm +G9z58pVNnH/zSicitKChzzz8zBgbW6VU1i66aYGt9FbQn2Djt2mPQF2mFuw/ +GfY6dJaNd6fOXOD7owkzTclZcgtsdIAc1YIBTYj/dcW77hcbL30sf+H3QBMk +jEt1dv9mI77m+Lvc0IScQ3Wzf/+ycfHEo859SZrwPxrpKvI= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12929,211 +14507,150 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwV13k4VO0bB3ChSEj2ZWaMvWSPGWbpvgmFsiVFhZIoQlmSJVlLStImypYl +KcvMKNsrUdKmsiX1IlFayE69qt/5/TXX55rrXOc5z33f3/Mclb1Bzj78fHx8 +B5bw8f3/d67/yUP11ML1Je/a1OziN67vypE/Zt4bD3eWlVvkpWsAyrzcK9+b +Abfp2cKB6SYQ7njrjUBvAQzXHK+0SbeCVeNyGT/fcOCDfGamSPo2GGiwD5p5 +0wx0S/pe+jkfsFb/+u/kmw6QNpzx/ZsaBj/f0C9NvBkCP5+taXqxSdCyoaTw +dcE0FK8ciz++9jKQBmo/7dX5DWuC+L9JGeeBdIDnLaENAngnxq3g5VghZBha +19tvE8akQM7QtYJSeJtp0DQpIYZznX6CmufuQFZn2cpwDTE0KTvdtyr3DriL +a3n+MhND5ZhpiZnyO/A+gfyH31sMxb4Up2W334HBQBGWdLUYxvpKeoaLlcOo +5fA9mps4ijiJTW5PKYeFiSsVUfkrsapUrafyWAWkFsa+5FdYhd/ieqJ/X68E +W+MDkjJqq/DLdL5mRmElCD903qaluwrzumVaVcoqIfGjxjs781U4ODI5aFhT +CdGqzz9dPLAKFQdGvGU6KiEwT/6PZt0qjKHuzRgVrAKna1U6djslUV5dkHdv +fxVI6GQH7faRxBusrV03A6qgvT6RExQkifsOL7RePFIFtu+2m15MkMSjGknK +u49XgYXinw3/lkniw6HZhIpLVWCcabszaFESq4/8cXFvqQK5ix9TLlyXQuPS +wJBmRQ7Ir61OXCiWQqdGZ/8qZQ4oNifH7q6UQsvVn59lq3OAMrEmTKtFCtcX +kB7t1eOAxuZgr/pRKTwpKHS61pwD6wR/0z6uk8Zax5NzKb4ccAiVHTZ6Ko0y +zL4EbgUHHFeM9l/plMbo4tZ6cR4HnAtq3y6+l0b1lcMOPjUccH2162XrD2k8 +apyfKviAA7t1btS5y8jgvIii7YoODvgP65+P95LBBef+SrNpDpx0sVnfMSeD +zTOzc/JGXFDktSvyL5HFb/8F3jCgcaFcymXecIUsfjoZ0G3B4EJPh0fleWVZ +3DX+7ImrBRfUnUJVnTbJ4tD3lGmWMxeat+Que3VVFtWD2+z5D3Pht/Vs+wuW +HIagwOPDt7iQXhxZ9ttaDh9/H4G+O8T1y/hO6TrJYYxopzm7igubH4mYn/WR +w4Mnhz9M3eNC1gYqd3OaHN5hymSTHnHBFO2uPBuQwwQDFvNgPxdCzPI9n8TL +41q9mD8TojywzROfsTsjj7KXBiVjVvJAVSj6VPsleWw4URokKMmDV12uVZ03 +5fFKiI3gUjke6AWLCvS3y2Oqj3HJCyoPRouPFk8pKqDlOpJVzDoe3BcbYYSp +K6DbRKRSowkPLoc6v5zXVcCGJ/EWv+g8sLLQXVhEBfyr+T5xH4sHBf8O2Qj5 +KmDEKuY3Pise7JK2H1PiKqBsSmyb2zYerIuqj8tpUED9BcMph+08EBlaLavS +qoBbO9LCzd14UFshAJpvFVBwQCBDdjcPZO1q0w3+KuB2fw+tlH3E+uPUja3s +FPFT9aFD6Ud4UDJ6vu2xiyJWathdYYXy4LjD3122HooYlpqkNRzGA11yX5LD +YUU810M/rnGMB6drzr1xu0KYsah4OJYHlj9+RQZ+VERl9eKnOqk8OLbpovaD +74qYaD367NQZHpTn6/ZJzSlilbNJ4OBZHsi7eJnVCivh/WU2V+PTefC95tG8 +gJ4S9l2Tzc+4xAMVSc8SV7oSiif7ND+7zANX/wXXUlTCis+XU/kyedBEXnvX +fqsS5rmsVtidxYML8emhVyOUMKldmDGUw4O2d2vUv8cp4fJd+7gLuTxYNG7p +XJ+qhLFCPe9E8nmw//Os0fB1JYxMrGSr3uABY/POSb0WJeT4xnuSS3gwJKMZ ++FCMhPvRYMqqnAdyQffJcnIkTPLmfylXwYPNbTteHKCSUMbf8+AI4buRqTor +15Hwb/jjwZAqYn8GJr667SChuNvC6G4eUX/T01m395DwwXhTj1g1D2bOq9n+ +PUjCm+LOqbWEPSxdSwtjSPhFe9kWwXs8MCqt9/1RQMKS6ymOvrU88OXfJmdx +m4TR814Zs4Sv7RxvvVhNQs+CCzdi63iwTFxFk9FGwjr9Q6Yn63nA9K3rPvOa +hOZHNjUKNvAguGlr0kAfCZUffpY7TrjvSPJw4hgJQ5O+2O77hwcrnytffDNH +wi35pzVfE7bUqN2gzUdGf7VDfWaNRP3efCt4KUnGx7VxL/8Q/miQ5KxKIuPC +zUXJnfeJep6m8IdpkDGYY7uOSziO5bRH0ZSMYSV/xbc38WCTR84U3YKMyfKO +oqWExU98S9i2mYyDjY4Gc4S7801lQlzJ+KQ+Lnr9A+L5WpKK073IqDq6byqO +sPdIB738IBnHO2IuNBHWFqI+eRZKxqH7Tnt+EZ5cfcj9y3EyChf77tZv5kGN +bd23ZSlkNNLblOJJODZAKEb9AhkLq2I+nSZsneYibnGdjBmmF8OrCItV5ud6 +lpCxKkKB2Um46/W4QUwVGds7r5lMEM6eZjZn1ZNxi2uFr3ALD/bKpGyteUTG +huqPHUqE19B7hrtfknGnQ3uENuGJHWrh02/JeEtz6U5jwvcig4VWDRPr/6gc +ZUb4+LV/MvXGydjcca/v/7ZqFNHevEDG7EHfKBPCooPb6w/wU9A++7mHDuHO +JUWbT4pS8LJ+YjKFcJba1L+FshQs8dWbWUHYywqCmqkUvFEaUDpDrFfL9wzf +oDYF9eY+lPQSHj/19vxvYwp+/WQ0eY8w75ammhJQ8PftpSczCEc9D+GZ2lDw +2kp+fz/CFuNNVq5bKRh38HWOGeHlEuJvQnZTMOo2RX0Z4VeGO/3O+1JwdNvl +xRfE/nuEzZ5+HkXBgIrGOw6ENa5YkL4mUTBf+1XK8gf/n+9zd4TSKRif9+J+ +I1HvyMU1rywKKdi5whOVCJtTju7xKqfgLMkrrZnoH2F8OBVTQ0HN3VpsH8KX +Ejxkap9TkOI23XKN6L9dRWXFPT0UHHc8nGtIWPXxAn1mkILd30uGHhD9Wyly +wV1/loLbfpuXdBH9/vz849wisjK+ep/u3kLMywWutGGLljJu7TIoWkfYvXtP +86ChMu65Uu2TS8zXqPzisJK1Mq6wzHU4UMMDgTwD7YxAZax9kvuzlZjXpw9i +6isilDH2lLCmFOH0j083v4hXxp23+nvciXmnaPkECV9Rxuw1Ri/ec4h8Kb/K +O35fGX3kd2MZkReWb9p/j7cp482cR85DRL7Y8wlu9OxQxsDKkdMyhL2dA9/C +iDIeOhVwJPg20a9RKrEnllJxn1W5zcJNYp6V526Yr6Vi2iapMCciz2a56W0/ +9al4T/zpNbs8Yn83rR2rMqbiS0sdAQsi/5IOe9FU11PRUNQ5Q+060T8tT9v4 +nah43GDyUy2Rpw99c8dawqk4Jb7YYXyOBzaLZpLRUVSUqooqnibyuj29i2Z8 +gopLItI6yok8f1u7/ERhChXpS4SYiqeJ/loRKpl0jYrRrSVRjxKJPKjcRLdu +puIZ/UzDIOJ9EbAweaJNTAU37va2U/Ii9uPwftlPkio48TenbYMHUe+vfWUC +8irYYtTJ8NvFg6J3LT3rVVUwO3KVUNEOHvQ3XtKppqng8YALMeOOPHBIMuvN +91RBUarbu2Yk8lIyTj+qSgUrj/znGEfmAV/q7MPMuyr48NTEax0lYv0CB93v +1qvgUivx813yPPCfdU6afKSCHUfUO+WleVDYq/7Ot08FX6eevRkqQrwvc9uS +XQRUMX4goDRqjgs/10r0625TRRnbWs6bZ1yYu64Yt85dlbh/YC7pCRdmVmqo +m3mq4p9jLTSPVi6MT5sdtDygiq51CYFvmrgwVO895x6jSpxvhy0Kqrnw1O6e ++KkiVVSapyVl5xDnE38PGJpVxXcLGnU6gVxgld3Ou3xZDTetaczYIsiFd9Sy +XKtsNTRqOTmyYgkXIi+X5szkquG83ljX498cuBdXfM25VA3LVe3Pm85zwGhH +XqZ4A+Hw5ru/v3BgzdKL6ckf1LD2Yqmv/EsOyHpGnQjXUcfLQyp8169wYFLS +1su1WR3tObNrHFU5MHzGy/WIkCZ+OX+pY1SkCmx+HLUZoWkhTdN89sb7Cvju +LRzCi12NU8urqJLOd4jvCTn+k81r0LoyyWdp8y2QfKGZVvlDG6mJl+5K7boJ +pFMVjjSaDnZkaYUbvCiCzLVmElK+urgh4UBOe8wNeKpobjJ9Xg/dQ0V+7HfJ +BwapOV2/Rx+nJrtbxTAHxAUKQvfEG+BrnZupU4FZQIlTZrlpGmLeqxE9w6LL +sFxj113nx4aoe7BF38X2AuixFSqO7jZCkTJFytnodDjSL9liy7cOX7YPtFZe +SoUf02e22WSuw7PM9BZH3ZOwUb81y0bXGLVaL0f4+yZA4zTzv/l2Y2SZ/LeV +9CAWAnWM+l77mKDA3QFqq3okhM0r/vL0M0G7thB7D/FIiG4WUBw/aILNWWOb +li0cg9Qd3W4iwSZYSVVMTnp2DG4mRry1iDRBJVHJzRhyDIbeN/Zy00xw58/+ +XXmPIsD1rN2bS/dMMGn8gXN32FFgj+/rcltOQ4kNRnIH+cNAtn5jQcMKGpr0 +flSbmwiF8ZPawcriNMwbq3BKGwiFHJWJFSOSNGw+YLEw1BAKf1yiNgSTaPh5 ++5rHpIhQuF9/npOsT0N2SSz5xUQImKc0pnO30TD91cf9c1+PgJW6/BaxAhqK +3GqPIy05DLyxRyr7CmmoWj7EfToVDOr3Qubqimlo3VKjnDAcDIK2L3P9ymio +btmQJtkWDM1ByVMtPBo+0nxvUHYuGNbXz1yJfEzDX8Ne9xupwUBzfj30+TsN +l9hF6WZcDITVJ05HNNPpKDrUsTo2xB8amEVLNzPoKOCaZ5zr5g+O8/czull0 +4vupRbcL/CEicPb2qDkdr3ekcaNF/aFtl9cH8c10TJ/uymktPgh+ZjTbnV50 +3JvZnmY0cABKpz4ozZyio9XmzLMSnn6g7WN2X6OPjjf8KkNVMn3gnKr9r4T3 +dDRueThwPNEHZgb2mgz10zGvYLLtW7APNLqfKcv5SMfXhlnj0zY+4Ow4cEVu +jI59g3JHGxb3wTFmUvByPlOkdW8X1vTZB22rXquMaZiiFm+nrby5N/g0+iXy +DpuiAOteYqDaHhg/9PWoVagpOj7+0blccg9EkAP8e8JNkb8k+yqPbw+cjg5y +XogyxTXmsTtN+72gkhFOZSWboo3B4on5q16weDehoSXLFOsOBefZSntBRkXO +TEeLKd74pRDwQ8sD7ud17ZuUMcNZSkWXSaQ7DG5W8QyXN0N+xzrRvx7uwPfz +kNt/imaYNxLyZ3CDO1g4CdkvpZqhxBZ8OC7mDq1LGHQFbTO8VJD6Sv+GGzzf +m7vcfL0Zbot/20rv2AF96gfL0/eb4fDkXeFB8+0wc/PvvP49M5Tq5irUervA +J1frvJRaM/ynFnZcdnCBXsGzmz7Wm2FkzjX7JKYL1HspXr3cZIai4dJ6mVIu +EC9vwvj9xAwztfI2pT/cChKnDkY/fW+G0RFCKY1rtoKObzefDz8Dazp3ZNby +OQNFhlTaKMjAhRNPX/PGnUCiZa+TvBADdf6orG167wTTlIn8ZysYSEvzFhWq +dYK6HpENRjIMXN0ybORyxAk2WWPSXy0GrlqfHfrhsyN4a5Qtz9rCwNPLOE2j +DQ4Q+cjjoKYjA0dvhTgKZDlAuo/kM44zA6+K19nhUQdoKDp25tl2BsbXxkuo +GDmAtOamlb/3MDD0wsjNyFJ7aNUckfYKZ2BL2uMlYTlbQHu1MlUzl4GXsgPP +PcizA2zrOMHJZ+Dlr3JZU3F24OqX/GF9IQOHw5zOW3jbQcLNsYLtpQz03Hag +b72mHbxf3aCRwmXgxacvx4ru2ELaGre13x8zcFlE23K5ZhuY1L5A40ww8MSX +xg2v+DZB73O0kppmYHDVsvcRnzdCU+D41tBZBv53Vfm6WftGSOPYHKb9YuDt +yj4bgWsbQZvBd7tOgIkh+8ap1aYbYa/NIZUWWSbGquqfiQu3hi7fjaJdLCaq +lzetowlYQf3yWUUTYKKg6H7Nxu+WUFBWsOayORPZPox3O3ssIfjHb+sd1kxM +EJs07y21BLGjvLj3Dkwsa+4V6HSyBOtklfnhvUwUWjiY2FS0AWoK//swe4qJ +qmf5tv3dZQG0DaHztqlMrIjjazphYwHVH76L5p1lYl6J0pw0zQI4lH66bQYT +WQXUxLCVFnA7s+lsTjYTZQaMD8m0mEPemSSzjeVM5LcufdSsaw4poSvPZ3Yy +8ajo8m1+EgjCUqeKx7qZOLqctsP2D0ByFV+DRS8T3772eDHyDiBxfPLT9/dM +NJ/enRl3BeC4XxfL/BMTcWQ82UYC4Miuq6NfFpioLJZUs0R4PbhbqiGTwkLx +riJNh5Us+N0lLN5CZaGZd1S28TgT8nzG39mqsfBKcHU1+wUTPiXXHnVfzcJ/ ++y8416Uy4cgTh4pjRiyUeZcQ4ybChNP20ZQaaxaqqS0JkBRnQN2O7kXjIBY+ +LDGvOK1nCru/1D1tOMzCGV9v/qJVpsAXmZdpGcrCi0V/xvtn6GCd7W/scoyF +zdf6Farq6dDx75KAkAQWlo35ej2zpcPXvXrvqq6wMCtXb+s/gTRQOnSyVq+J +hXd9zo22PTeGtL/7TVKbWSj4Vr7HttoY+DOsqz4/ZGH2lgjFkevG8PXu0tK8 +Jyx042/ZsjfIGOr4EjMlO1nIGin8Hi1lDO4XTxydG2Hh0TPt1cpe6yCz/phJ +4wo2FvWLOSSKGIGovVuVojgbg6yPPfs0awgnBk11j0qwcerzvz88PhiC39IF +dQMZNuaIkgfO1RgC3SFcuoDCxpr859QpX0PoGToynWTIxrR1XyuLnxqAjEhA +1ZbtbORSVS+mrdeHwg0xkRNubLxne5KNsvpgFJO24cIuNk6TtrSrjOuB/URl +d+8eYj1ufm9DcvQguWf2p3cAGw+dJQvbL9GDhYJYi8g4NnqLL0yWv9SBPuaF +zuIyNu6U8bj54qw2+IUVXrMpZ+Obz81nSP7aMFde7fO9ko1LJiTsLm3SBknV +3nnDu8T/Vi65AoLaYCdMJv3TxEazRuvq9ug10NBVvK+zm42N2yMz58NWg614 +jW54Lxv32EqQX25bDb0bn8zJv2Mjsz/g7guT1TBT9+2UxyAbrwkOR8GcFujm +G9z58pVNnH/zSicitKChzzz8zBgbW6VU1i66aYGt9FbQn2Djt2mPQF2mFuw/ +GfY6dJaNd6fOXOD7owkzTclZcgtsdIAc1YIBTYj/dcW77hcbL30sf+H3QBMk +jEt1dv9mI77m+Lvc0IScQ3Wzf/+ycfHEo859SZrwPxrpKvI= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.0811039122562063}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13145,19 +14662,19 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.0811039122562063}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13171,210 +14688,149 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwV13k4VO0bB3ChSEj2ZWaMvWSPGWbpvgmFsiVFhZIoQlmSJVlLStImypYl +KcvMKNsrUdKmsiX1IlFayE69qt/5/TXX55rrXOc5z33f3/Mclb1Bzj78fHx8 +B5bw8f3/d67/yUP11ML1Je/a1OziN67vypE/Zt4bD3eWlVvkpWsAyrzcK9+b +Abfp2cKB6SYQ7njrjUBvAQzXHK+0SbeCVeNyGT/fcOCDfGamSPo2GGiwD5p5 +0wx0S/pe+jkfsFb/+u/kmw6QNpzx/ZsaBj/f0C9NvBkCP5+taXqxSdCyoaTw +dcE0FK8ciz++9jKQBmo/7dX5DWuC+L9JGeeBdIDnLaENAngnxq3g5VghZBha +19tvE8akQM7QtYJSeJtp0DQpIYZznX6CmufuQFZn2cpwDTE0KTvdtyr3DriL +a3n+MhND5ZhpiZnyO/A+gfyH31sMxb4Up2W334HBQBGWdLUYxvpKeoaLlcOo +5fA9mps4ijiJTW5PKYeFiSsVUfkrsapUrafyWAWkFsa+5FdYhd/ieqJ/X68E +W+MDkjJqq/DLdL5mRmElCD903qaluwrzumVaVcoqIfGjxjs781U4ODI5aFhT +CdGqzz9dPLAKFQdGvGU6KiEwT/6PZt0qjKHuzRgVrAKna1U6djslUV5dkHdv +fxVI6GQH7faRxBusrV03A6qgvT6RExQkifsOL7RePFIFtu+2m15MkMSjGknK +u49XgYXinw3/lkniw6HZhIpLVWCcabszaFESq4/8cXFvqQK5ix9TLlyXQuPS +wJBmRQ7Ir61OXCiWQqdGZ/8qZQ4oNifH7q6UQsvVn59lq3OAMrEmTKtFCtcX +kB7t1eOAxuZgr/pRKTwpKHS61pwD6wR/0z6uk8Zax5NzKb4ccAiVHTZ6Ko0y +zL4EbgUHHFeM9l/plMbo4tZ6cR4HnAtq3y6+l0b1lcMOPjUccH2162XrD2k8 +apyfKviAA7t1btS5y8jgvIii7YoODvgP65+P95LBBef+SrNpDpx0sVnfMSeD +zTOzc/JGXFDktSvyL5HFb/8F3jCgcaFcymXecIUsfjoZ0G3B4EJPh0fleWVZ +3DX+7ImrBRfUnUJVnTbJ4tD3lGmWMxeat+Que3VVFtWD2+z5D3Pht/Vs+wuW +HIagwOPDt7iQXhxZ9ttaDh9/H4G+O8T1y/hO6TrJYYxopzm7igubH4mYn/WR +w4Mnhz9M3eNC1gYqd3OaHN5hymSTHnHBFO2uPBuQwwQDFvNgPxdCzPI9n8TL +41q9mD8TojywzROfsTsjj7KXBiVjVvJAVSj6VPsleWw4URokKMmDV12uVZ03 +5fFKiI3gUjke6AWLCvS3y2Oqj3HJCyoPRouPFk8pKqDlOpJVzDoe3BcbYYSp +K6DbRKRSowkPLoc6v5zXVcCGJ/EWv+g8sLLQXVhEBfyr+T5xH4sHBf8O2Qj5 +KmDEKuY3Pise7JK2H1PiKqBsSmyb2zYerIuqj8tpUED9BcMph+08EBlaLavS +qoBbO9LCzd14UFshAJpvFVBwQCBDdjcPZO1q0w3+KuB2fw+tlH3E+uPUja3s +FPFT9aFD6Ud4UDJ6vu2xiyJWathdYYXy4LjD3122HooYlpqkNRzGA11yX5LD +YUU810M/rnGMB6drzr1xu0KYsah4OJYHlj9+RQZ+VERl9eKnOqk8OLbpovaD +74qYaD367NQZHpTn6/ZJzSlilbNJ4OBZHsi7eJnVCivh/WU2V+PTefC95tG8 +gJ4S9l2Tzc+4xAMVSc8SV7oSiif7ND+7zANX/wXXUlTCis+XU/kyedBEXnvX +fqsS5rmsVtidxYML8emhVyOUMKldmDGUw4O2d2vUv8cp4fJd+7gLuTxYNG7p +XJ+qhLFCPe9E8nmw//Os0fB1JYxMrGSr3uABY/POSb0WJeT4xnuSS3gwJKMZ ++FCMhPvRYMqqnAdyQffJcnIkTPLmfylXwYPNbTteHKCSUMbf8+AI4buRqTor +15Hwb/jjwZAqYn8GJr667SChuNvC6G4eUX/T01m395DwwXhTj1g1D2bOq9n+ +PUjCm+LOqbWEPSxdSwtjSPhFe9kWwXs8MCqt9/1RQMKS6ymOvrU88OXfJmdx +m4TR814Zs4Sv7RxvvVhNQs+CCzdi63iwTFxFk9FGwjr9Q6Yn63nA9K3rPvOa +hOZHNjUKNvAguGlr0kAfCZUffpY7TrjvSPJw4hgJQ5O+2O77hwcrnytffDNH +wi35pzVfE7bUqN2gzUdGf7VDfWaNRP3efCt4KUnGx7VxL/8Q/miQ5KxKIuPC +zUXJnfeJep6m8IdpkDGYY7uOSziO5bRH0ZSMYSV/xbc38WCTR84U3YKMyfKO +oqWExU98S9i2mYyDjY4Gc4S7801lQlzJ+KQ+Lnr9A+L5WpKK073IqDq6byqO +sPdIB738IBnHO2IuNBHWFqI+eRZKxqH7Tnt+EZ5cfcj9y3EyChf77tZv5kGN +bd23ZSlkNNLblOJJODZAKEb9AhkLq2I+nSZsneYibnGdjBmmF8OrCItV5ud6 +lpCxKkKB2Um46/W4QUwVGds7r5lMEM6eZjZn1ZNxi2uFr3ALD/bKpGyteUTG +huqPHUqE19B7hrtfknGnQ3uENuGJHWrh02/JeEtz6U5jwvcig4VWDRPr/6gc +ZUb4+LV/MvXGydjcca/v/7ZqFNHevEDG7EHfKBPCooPb6w/wU9A++7mHDuHO +JUWbT4pS8LJ+YjKFcJba1L+FshQs8dWbWUHYywqCmqkUvFEaUDpDrFfL9wzf +oDYF9eY+lPQSHj/19vxvYwp+/WQ0eY8w75ammhJQ8PftpSczCEc9D+GZ2lDw +2kp+fz/CFuNNVq5bKRh38HWOGeHlEuJvQnZTMOo2RX0Z4VeGO/3O+1JwdNvl +xRfE/nuEzZ5+HkXBgIrGOw6ENa5YkL4mUTBf+1XK8gf/n+9zd4TSKRif9+J+ +I1HvyMU1rywKKdi5whOVCJtTju7xKqfgLMkrrZnoH2F8OBVTQ0HN3VpsH8KX +Ejxkap9TkOI23XKN6L9dRWXFPT0UHHc8nGtIWPXxAn1mkILd30uGHhD9Wyly +wV1/loLbfpuXdBH9/vz849wisjK+ep/u3kLMywWutGGLljJu7TIoWkfYvXtP +86ChMu65Uu2TS8zXqPzisJK1Mq6wzHU4UMMDgTwD7YxAZax9kvuzlZjXpw9i +6isilDH2lLCmFOH0j083v4hXxp23+nvciXmnaPkECV9Rxuw1Ri/ec4h8Kb/K +O35fGX3kd2MZkReWb9p/j7cp482cR85DRL7Y8wlu9OxQxsDKkdMyhL2dA9/C +iDIeOhVwJPg20a9RKrEnllJxn1W5zcJNYp6V526Yr6Vi2iapMCciz2a56W0/ +9al4T/zpNbs8Yn83rR2rMqbiS0sdAQsi/5IOe9FU11PRUNQ5Q+060T8tT9v4 +nah43GDyUy2Rpw99c8dawqk4Jb7YYXyOBzaLZpLRUVSUqooqnibyuj29i2Z8 +gopLItI6yok8f1u7/ERhChXpS4SYiqeJ/loRKpl0jYrRrSVRjxKJPKjcRLdu +puIZ/UzDIOJ9EbAweaJNTAU37va2U/Ii9uPwftlPkio48TenbYMHUe+vfWUC +8irYYtTJ8NvFg6J3LT3rVVUwO3KVUNEOHvQ3XtKppqng8YALMeOOPHBIMuvN +91RBUarbu2Yk8lIyTj+qSgUrj/znGEfmAV/q7MPMuyr48NTEax0lYv0CB93v +1qvgUivx813yPPCfdU6afKSCHUfUO+WleVDYq/7Ot08FX6eevRkqQrwvc9uS +XQRUMX4goDRqjgs/10r0625TRRnbWs6bZ1yYu64Yt85dlbh/YC7pCRdmVmqo +m3mq4p9jLTSPVi6MT5sdtDygiq51CYFvmrgwVO895x6jSpxvhy0Kqrnw1O6e ++KkiVVSapyVl5xDnE38PGJpVxXcLGnU6gVxgld3Ou3xZDTetaczYIsiFd9Sy +XKtsNTRqOTmyYgkXIi+X5szkquG83ljX498cuBdXfM25VA3LVe3Pm85zwGhH +XqZ4A+Hw5ru/v3BgzdKL6ckf1LD2Yqmv/EsOyHpGnQjXUcfLQyp8169wYFLS +1su1WR3tObNrHFU5MHzGy/WIkCZ+OX+pY1SkCmx+HLUZoWkhTdN89sb7Cvju +LRzCi12NU8urqJLOd4jvCTn+k81r0LoyyWdp8y2QfKGZVvlDG6mJl+5K7boJ +pFMVjjSaDnZkaYUbvCiCzLVmElK+urgh4UBOe8wNeKpobjJ9Xg/dQ0V+7HfJ +BwapOV2/Rx+nJrtbxTAHxAUKQvfEG+BrnZupU4FZQIlTZrlpGmLeqxE9w6LL +sFxj113nx4aoe7BF38X2AuixFSqO7jZCkTJFytnodDjSL9liy7cOX7YPtFZe +SoUf02e22WSuw7PM9BZH3ZOwUb81y0bXGLVaL0f4+yZA4zTzv/l2Y2SZ/LeV +9CAWAnWM+l77mKDA3QFqq3okhM0r/vL0M0G7thB7D/FIiG4WUBw/aILNWWOb +li0cg9Qd3W4iwSZYSVVMTnp2DG4mRry1iDRBJVHJzRhyDIbeN/Zy00xw58/+ +XXmPIsD1rN2bS/dMMGn8gXN32FFgj+/rcltOQ4kNRnIH+cNAtn5jQcMKGpr0 +flSbmwiF8ZPawcriNMwbq3BKGwiFHJWJFSOSNGw+YLEw1BAKf1yiNgSTaPh5 ++5rHpIhQuF9/npOsT0N2SSz5xUQImKc0pnO30TD91cf9c1+PgJW6/BaxAhqK +3GqPIy05DLyxRyr7CmmoWj7EfToVDOr3Qubqimlo3VKjnDAcDIK2L3P9ymio +btmQJtkWDM1ByVMtPBo+0nxvUHYuGNbXz1yJfEzDX8Ne9xupwUBzfj30+TsN +l9hF6WZcDITVJ05HNNPpKDrUsTo2xB8amEVLNzPoKOCaZ5zr5g+O8/czull0 +4vupRbcL/CEicPb2qDkdr3ekcaNF/aFtl9cH8c10TJ/uymktPgh+ZjTbnV50 +3JvZnmY0cABKpz4ozZyio9XmzLMSnn6g7WN2X6OPjjf8KkNVMn3gnKr9r4T3 +dDRueThwPNEHZgb2mgz10zGvYLLtW7APNLqfKcv5SMfXhlnj0zY+4Ow4cEVu +jI59g3JHGxb3wTFmUvByPlOkdW8X1vTZB22rXquMaZiiFm+nrby5N/g0+iXy +DpuiAOteYqDaHhg/9PWoVagpOj7+0blccg9EkAP8e8JNkb8k+yqPbw+cjg5y +XogyxTXmsTtN+72gkhFOZSWboo3B4on5q16weDehoSXLFOsOBefZSntBRkXO +TEeLKd74pRDwQ8sD7ud17ZuUMcNZSkWXSaQ7DG5W8QyXN0N+xzrRvx7uwPfz +kNt/imaYNxLyZ3CDO1g4CdkvpZqhxBZ8OC7mDq1LGHQFbTO8VJD6Sv+GGzzf +m7vcfL0Zbot/20rv2AF96gfL0/eb4fDkXeFB8+0wc/PvvP49M5Tq5irUervA +J1frvJRaM/ynFnZcdnCBXsGzmz7Wm2FkzjX7JKYL1HspXr3cZIai4dJ6mVIu +EC9vwvj9xAwztfI2pT/cChKnDkY/fW+G0RFCKY1rtoKObzefDz8Dazp3ZNby +OQNFhlTaKMjAhRNPX/PGnUCiZa+TvBADdf6orG167wTTlIn8ZysYSEvzFhWq +dYK6HpENRjIMXN0ybORyxAk2WWPSXy0GrlqfHfrhsyN4a5Qtz9rCwNPLOE2j +DQ4Q+cjjoKYjA0dvhTgKZDlAuo/kM44zA6+K19nhUQdoKDp25tl2BsbXxkuo +GDmAtOamlb/3MDD0wsjNyFJ7aNUckfYKZ2BL2uMlYTlbQHu1MlUzl4GXsgPP +PcizA2zrOMHJZ+Dlr3JZU3F24OqX/GF9IQOHw5zOW3jbQcLNsYLtpQz03Hag +b72mHbxf3aCRwmXgxacvx4ru2ELaGre13x8zcFlE23K5ZhuY1L5A40ww8MSX +xg2v+DZB73O0kppmYHDVsvcRnzdCU+D41tBZBv53Vfm6WftGSOPYHKb9YuDt +yj4bgWsbQZvBd7tOgIkh+8ap1aYbYa/NIZUWWSbGquqfiQu3hi7fjaJdLCaq +lzetowlYQf3yWUUTYKKg6H7Nxu+WUFBWsOayORPZPox3O3ssIfjHb+sd1kxM +EJs07y21BLGjvLj3Dkwsa+4V6HSyBOtklfnhvUwUWjiY2FS0AWoK//swe4qJ +qmf5tv3dZQG0DaHztqlMrIjjazphYwHVH76L5p1lYl6J0pw0zQI4lH66bQYT +WQXUxLCVFnA7s+lsTjYTZQaMD8m0mEPemSSzjeVM5LcufdSsaw4poSvPZ3Yy +8ajo8m1+EgjCUqeKx7qZOLqctsP2D0ByFV+DRS8T3772eDHyDiBxfPLT9/dM +NJ/enRl3BeC4XxfL/BMTcWQ82UYC4Miuq6NfFpioLJZUs0R4PbhbqiGTwkLx +riJNh5Us+N0lLN5CZaGZd1S28TgT8nzG39mqsfBKcHU1+wUTPiXXHnVfzcJ/ ++y8416Uy4cgTh4pjRiyUeZcQ4ybChNP20ZQaaxaqqS0JkBRnQN2O7kXjIBY+ +LDGvOK1nCru/1D1tOMzCGV9v/qJVpsAXmZdpGcrCi0V/xvtn6GCd7W/scoyF +zdf6Farq6dDx75KAkAQWlo35ej2zpcPXvXrvqq6wMCtXb+s/gTRQOnSyVq+J +hXd9zo22PTeGtL/7TVKbWSj4Vr7HttoY+DOsqz4/ZGH2lgjFkevG8PXu0tK8 +Jyx042/ZsjfIGOr4EjMlO1nIGin8Hi1lDO4XTxydG2Hh0TPt1cpe6yCz/phJ +4wo2FvWLOSSKGIGovVuVojgbg6yPPfs0awgnBk11j0qwcerzvz88PhiC39IF +dQMZNuaIkgfO1RgC3SFcuoDCxpr859QpX0PoGToynWTIxrR1XyuLnxqAjEhA +1ZbtbORSVS+mrdeHwg0xkRNubLxne5KNsvpgFJO24cIuNk6TtrSrjOuB/URl +d+8eYj1ufm9DcvQguWf2p3cAGw+dJQvbL9GDhYJYi8g4NnqLL0yWv9SBPuaF +zuIyNu6U8bj54qw2+IUVXrMpZ+Obz81nSP7aMFde7fO9ko1LJiTsLm3SBknV +3nnDu8T/Vi65AoLaYCdMJv3TxEazRuvq9ug10NBVvK+zm42N2yMz58NWg614 +jW54Lxv32EqQX25bDb0bn8zJv2Mjsz/g7guT1TBT9+2UxyAbrwkOR8GcFujm +G9z58pVNnH/zSicitKChzzz8zBgbW6VU1i66aYGt9FbQn2Djt2mPQF2mFuw/ +GfY6dJaNd6fOXOD7owkzTclZcgtsdIAc1YIBTYj/dcW77hcbL30sf+H3QBMk +jEt1dv9mI77m+Lvc0IScQ3Wzf/+ycfHEo859SZrwPxrpKvI= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.0811039122562063}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13385,6 +14841,7 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13412,7 +14869,8 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.22160540372702894`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0811039122562063}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13420,17 +14878,670 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913381496467495`*^9}, + CellChangeTimes->{3.9913381496467495`*^9, 3.9943580139862328`*^9}, CellLabel-> - "Out[304]=",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] + "Out[138]=",ExpressionUUID->"a0ebd5ff-bc54-4c36-ae04-bd7675d69c04"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ea848967-083d-ea47-bce0-\ -5c3b93725916"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[139]:=",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VO0bB3ChSEj2ZWaMvWSPGWbpvgmFsiVFhZIoQlmSJVlLStImypYl +KcvMKNsrUdKmsiX1IlFayE69qt/5/TXX55rrXOc5z33f3/Mclb1Bzj78fHx8 +B5bw8f3/d67/yUP11ML1Je/a1OziN67vypE/Zt4bD3eWlVvkpWsAyrzcK9+b +Abfp2cKB6SYQ7njrjUBvAQzXHK+0SbeCVeNyGT/fcOCDfGamSPo2GGiwD5p5 +0wx0S/pe+jkfsFb/+u/kmw6QNpzx/ZsaBj/f0C9NvBkCP5+taXqxSdCyoaTw +dcE0FK8ciz++9jKQBmo/7dX5DWuC+L9JGeeBdIDnLaENAngnxq3g5VghZBha +19tvE8akQM7QtYJSeJtp0DQpIYZznX6CmufuQFZn2cpwDTE0KTvdtyr3DriL +a3n+MhND5ZhpiZnyO/A+gfyH31sMxb4Up2W334HBQBGWdLUYxvpKeoaLlcOo +5fA9mps4ijiJTW5PKYeFiSsVUfkrsapUrafyWAWkFsa+5FdYhd/ieqJ/X68E +W+MDkjJqq/DLdL5mRmElCD903qaluwrzumVaVcoqIfGjxjs781U4ODI5aFhT +CdGqzz9dPLAKFQdGvGU6KiEwT/6PZt0qjKHuzRgVrAKna1U6djslUV5dkHdv +fxVI6GQH7faRxBusrV03A6qgvT6RExQkifsOL7RePFIFtu+2m15MkMSjGknK +u49XgYXinw3/lkniw6HZhIpLVWCcabszaFESq4/8cXFvqQK5ix9TLlyXQuPS +wJBmRQ7Ir61OXCiWQqdGZ/8qZQ4oNifH7q6UQsvVn59lq3OAMrEmTKtFCtcX +kB7t1eOAxuZgr/pRKTwpKHS61pwD6wR/0z6uk8Zax5NzKb4ccAiVHTZ6Ko0y +zL4EbgUHHFeM9l/plMbo4tZ6cR4HnAtq3y6+l0b1lcMOPjUccH2162XrD2k8 +apyfKviAA7t1btS5y8jgvIii7YoODvgP65+P95LBBef+SrNpDpx0sVnfMSeD +zTOzc/JGXFDktSvyL5HFb/8F3jCgcaFcymXecIUsfjoZ0G3B4EJPh0fleWVZ +3DX+7ImrBRfUnUJVnTbJ4tD3lGmWMxeat+Que3VVFtWD2+z5D3Pht/Vs+wuW +HIagwOPDt7iQXhxZ9ttaDh9/H4G+O8T1y/hO6TrJYYxopzm7igubH4mYn/WR +w4Mnhz9M3eNC1gYqd3OaHN5hymSTHnHBFO2uPBuQwwQDFvNgPxdCzPI9n8TL +41q9mD8TojywzROfsTsjj7KXBiVjVvJAVSj6VPsleWw4URokKMmDV12uVZ03 +5fFKiI3gUjke6AWLCvS3y2Oqj3HJCyoPRouPFk8pKqDlOpJVzDoe3BcbYYSp +K6DbRKRSowkPLoc6v5zXVcCGJ/EWv+g8sLLQXVhEBfyr+T5xH4sHBf8O2Qj5 +KmDEKuY3Pise7JK2H1PiKqBsSmyb2zYerIuqj8tpUED9BcMph+08EBlaLavS +qoBbO9LCzd14UFshAJpvFVBwQCBDdjcPZO1q0w3+KuB2fw+tlH3E+uPUja3s +FPFT9aFD6Ud4UDJ6vu2xiyJWathdYYXy4LjD3122HooYlpqkNRzGA11yX5LD +YUU810M/rnGMB6drzr1xu0KYsah4OJYHlj9+RQZ+VERl9eKnOqk8OLbpovaD +74qYaD367NQZHpTn6/ZJzSlilbNJ4OBZHsi7eJnVCivh/WU2V+PTefC95tG8 +gJ4S9l2Tzc+4xAMVSc8SV7oSiif7ND+7zANX/wXXUlTCis+XU/kyedBEXnvX +fqsS5rmsVtidxYML8emhVyOUMKldmDGUw4O2d2vUv8cp4fJd+7gLuTxYNG7p +XJ+qhLFCPe9E8nmw//Os0fB1JYxMrGSr3uABY/POSb0WJeT4xnuSS3gwJKMZ ++FCMhPvRYMqqnAdyQffJcnIkTPLmfylXwYPNbTteHKCSUMbf8+AI4buRqTor +15Hwb/jjwZAqYn8GJr667SChuNvC6G4eUX/T01m395DwwXhTj1g1D2bOq9n+ +PUjCm+LOqbWEPSxdSwtjSPhFe9kWwXs8MCqt9/1RQMKS6ymOvrU88OXfJmdx +m4TR814Zs4Sv7RxvvVhNQs+CCzdi63iwTFxFk9FGwjr9Q6Yn63nA9K3rPvOa +hOZHNjUKNvAguGlr0kAfCZUffpY7TrjvSPJw4hgJQ5O+2O77hwcrnytffDNH +wi35pzVfE7bUqN2gzUdGf7VDfWaNRP3efCt4KUnGx7VxL/8Q/miQ5KxKIuPC +zUXJnfeJep6m8IdpkDGYY7uOSziO5bRH0ZSMYSV/xbc38WCTR84U3YKMyfKO +oqWExU98S9i2mYyDjY4Gc4S7801lQlzJ+KQ+Lnr9A+L5WpKK073IqDq6byqO +sPdIB738IBnHO2IuNBHWFqI+eRZKxqH7Tnt+EZ5cfcj9y3EyChf77tZv5kGN +bd23ZSlkNNLblOJJODZAKEb9AhkLq2I+nSZsneYibnGdjBmmF8OrCItV5ud6 +lpCxKkKB2Um46/W4QUwVGds7r5lMEM6eZjZn1ZNxi2uFr3ALD/bKpGyteUTG +huqPHUqE19B7hrtfknGnQ3uENuGJHWrh02/JeEtz6U5jwvcig4VWDRPr/6gc +ZUb4+LV/MvXGydjcca/v/7ZqFNHevEDG7EHfKBPCooPb6w/wU9A++7mHDuHO +JUWbT4pS8LJ+YjKFcJba1L+FshQs8dWbWUHYywqCmqkUvFEaUDpDrFfL9wzf +oDYF9eY+lPQSHj/19vxvYwp+/WQ0eY8w75ammhJQ8PftpSczCEc9D+GZ2lDw +2kp+fz/CFuNNVq5bKRh38HWOGeHlEuJvQnZTMOo2RX0Z4VeGO/3O+1JwdNvl +xRfE/nuEzZ5+HkXBgIrGOw6ENa5YkL4mUTBf+1XK8gf/n+9zd4TSKRif9+J+ +I1HvyMU1rywKKdi5whOVCJtTju7xKqfgLMkrrZnoH2F8OBVTQ0HN3VpsH8KX +Ejxkap9TkOI23XKN6L9dRWXFPT0UHHc8nGtIWPXxAn1mkILd30uGHhD9Wyly +wV1/loLbfpuXdBH9/vz849wisjK+ep/u3kLMywWutGGLljJu7TIoWkfYvXtP +86ChMu65Uu2TS8zXqPzisJK1Mq6wzHU4UMMDgTwD7YxAZax9kvuzlZjXpw9i +6isilDH2lLCmFOH0j083v4hXxp23+nvciXmnaPkECV9Rxuw1Ri/ec4h8Kb/K +O35fGX3kd2MZkReWb9p/j7cp482cR85DRL7Y8wlu9OxQxsDKkdMyhL2dA9/C +iDIeOhVwJPg20a9RKrEnllJxn1W5zcJNYp6V526Yr6Vi2iapMCciz2a56W0/ +9al4T/zpNbs8Yn83rR2rMqbiS0sdAQsi/5IOe9FU11PRUNQ5Q+060T8tT9v4 +nah43GDyUy2Rpw99c8dawqk4Jb7YYXyOBzaLZpLRUVSUqooqnibyuj29i2Z8 +gopLItI6yok8f1u7/ERhChXpS4SYiqeJ/loRKpl0jYrRrSVRjxKJPKjcRLdu +puIZ/UzDIOJ9EbAweaJNTAU37va2U/Ii9uPwftlPkio48TenbYMHUe+vfWUC +8irYYtTJ8NvFg6J3LT3rVVUwO3KVUNEOHvQ3XtKppqng8YALMeOOPHBIMuvN +91RBUarbu2Yk8lIyTj+qSgUrj/znGEfmAV/q7MPMuyr48NTEax0lYv0CB93v +1qvgUivx813yPPCfdU6afKSCHUfUO+WleVDYq/7Ot08FX6eevRkqQrwvc9uS +XQRUMX4goDRqjgs/10r0625TRRnbWs6bZ1yYu64Yt85dlbh/YC7pCRdmVmqo +m3mq4p9jLTSPVi6MT5sdtDygiq51CYFvmrgwVO895x6jSpxvhy0Kqrnw1O6e ++KkiVVSapyVl5xDnE38PGJpVxXcLGnU6gVxgld3Ou3xZDTetaczYIsiFd9Sy +XKtsNTRqOTmyYgkXIi+X5szkquG83ljX498cuBdXfM25VA3LVe3Pm85zwGhH +XqZ4A+Hw5ru/v3BgzdKL6ckf1LD2Yqmv/EsOyHpGnQjXUcfLQyp8169wYFLS +1su1WR3tObNrHFU5MHzGy/WIkCZ+OX+pY1SkCmx+HLUZoWkhTdN89sb7Cvju +LRzCi12NU8urqJLOd4jvCTn+k81r0LoyyWdp8y2QfKGZVvlDG6mJl+5K7boJ +pFMVjjSaDnZkaYUbvCiCzLVmElK+urgh4UBOe8wNeKpobjJ9Xg/dQ0V+7HfJ +BwapOV2/Rx+nJrtbxTAHxAUKQvfEG+BrnZupU4FZQIlTZrlpGmLeqxE9w6LL +sFxj113nx4aoe7BF38X2AuixFSqO7jZCkTJFytnodDjSL9liy7cOX7YPtFZe +SoUf02e22WSuw7PM9BZH3ZOwUb81y0bXGLVaL0f4+yZA4zTzv/l2Y2SZ/LeV +9CAWAnWM+l77mKDA3QFqq3okhM0r/vL0M0G7thB7D/FIiG4WUBw/aILNWWOb +li0cg9Qd3W4iwSZYSVVMTnp2DG4mRry1iDRBJVHJzRhyDIbeN/Zy00xw58/+ +XXmPIsD1rN2bS/dMMGn8gXN32FFgj+/rcltOQ4kNRnIH+cNAtn5jQcMKGpr0 +flSbmwiF8ZPawcriNMwbq3BKGwiFHJWJFSOSNGw+YLEw1BAKf1yiNgSTaPh5 ++5rHpIhQuF9/npOsT0N2SSz5xUQImKc0pnO30TD91cf9c1+PgJW6/BaxAhqK +3GqPIy05DLyxRyr7CmmoWj7EfToVDOr3Qubqimlo3VKjnDAcDIK2L3P9ymio +btmQJtkWDM1ByVMtPBo+0nxvUHYuGNbXz1yJfEzDX8Ne9xupwUBzfj30+TsN +l9hF6WZcDITVJ05HNNPpKDrUsTo2xB8amEVLNzPoKOCaZ5zr5g+O8/czull0 +4vupRbcL/CEicPb2qDkdr3ekcaNF/aFtl9cH8c10TJ/uymktPgh+ZjTbnV50 +3JvZnmY0cABKpz4ozZyio9XmzLMSnn6g7WN2X6OPjjf8KkNVMn3gnKr9r4T3 +dDRueThwPNEHZgb2mgz10zGvYLLtW7APNLqfKcv5SMfXhlnj0zY+4Ow4cEVu +jI59g3JHGxb3wTFmUvByPlOkdW8X1vTZB22rXquMaZiiFm+nrby5N/g0+iXy +DpuiAOteYqDaHhg/9PWoVagpOj7+0blccg9EkAP8e8JNkb8k+yqPbw+cjg5y +XogyxTXmsTtN+72gkhFOZSWboo3B4on5q16weDehoSXLFOsOBefZSntBRkXO +TEeLKd74pRDwQ8sD7ud17ZuUMcNZSkWXSaQ7DG5W8QyXN0N+xzrRvx7uwPfz +kNt/imaYNxLyZ3CDO1g4CdkvpZqhxBZ8OC7mDq1LGHQFbTO8VJD6Sv+GGzzf +m7vcfL0Zbot/20rv2AF96gfL0/eb4fDkXeFB8+0wc/PvvP49M5Tq5irUervA +J1frvJRaM/ynFnZcdnCBXsGzmz7Wm2FkzjX7JKYL1HspXr3cZIai4dJ6mVIu +EC9vwvj9xAwztfI2pT/cChKnDkY/fW+G0RFCKY1rtoKObzefDz8Dazp3ZNby +OQNFhlTaKMjAhRNPX/PGnUCiZa+TvBADdf6orG167wTTlIn8ZysYSEvzFhWq +dYK6HpENRjIMXN0ybORyxAk2WWPSXy0GrlqfHfrhsyN4a5Qtz9rCwNPLOE2j +DQ4Q+cjjoKYjA0dvhTgKZDlAuo/kM44zA6+K19nhUQdoKDp25tl2BsbXxkuo +GDmAtOamlb/3MDD0wsjNyFJ7aNUckfYKZ2BL2uMlYTlbQHu1MlUzl4GXsgPP +PcizA2zrOMHJZ+Dlr3JZU3F24OqX/GF9IQOHw5zOW3jbQcLNsYLtpQz03Hag +b72mHbxf3aCRwmXgxacvx4ru2ELaGre13x8zcFlE23K5ZhuY1L5A40ww8MSX +xg2v+DZB73O0kppmYHDVsvcRnzdCU+D41tBZBv53Vfm6WftGSOPYHKb9YuDt +yj4bgWsbQZvBd7tOgIkh+8ap1aYbYa/NIZUWWSbGquqfiQu3hi7fjaJdLCaq +lzetowlYQf3yWUUTYKKg6H7Nxu+WUFBWsOayORPZPox3O3ssIfjHb+sd1kxM +EJs07y21BLGjvLj3Dkwsa+4V6HSyBOtklfnhvUwUWjiY2FS0AWoK//swe4qJ +qmf5tv3dZQG0DaHztqlMrIjjazphYwHVH76L5p1lYl6J0pw0zQI4lH66bQYT +WQXUxLCVFnA7s+lsTjYTZQaMD8m0mEPemSSzjeVM5LcufdSsaw4poSvPZ3Yy +8ajo8m1+EgjCUqeKx7qZOLqctsP2D0ByFV+DRS8T3772eDHyDiBxfPLT9/dM +NJ/enRl3BeC4XxfL/BMTcWQ82UYC4Miuq6NfFpioLJZUs0R4PbhbqiGTwkLx +riJNh5Us+N0lLN5CZaGZd1S28TgT8nzG39mqsfBKcHU1+wUTPiXXHnVfzcJ/ ++y8416Uy4cgTh4pjRiyUeZcQ4ybChNP20ZQaaxaqqS0JkBRnQN2O7kXjIBY+ +LDGvOK1nCru/1D1tOMzCGV9v/qJVpsAXmZdpGcrCi0V/xvtn6GCd7W/scoyF +zdf6Farq6dDx75KAkAQWlo35ej2zpcPXvXrvqq6wMCtXb+s/gTRQOnSyVq+J +hXd9zo22PTeGtL/7TVKbWSj4Vr7HttoY+DOsqz4/ZGH2lgjFkevG8PXu0tK8 +Jyx042/ZsjfIGOr4EjMlO1nIGin8Hi1lDO4XTxydG2Hh0TPt1cpe6yCz/phJ +4wo2FvWLOSSKGIGovVuVojgbg6yPPfs0awgnBk11j0qwcerzvz88PhiC39IF +dQMZNuaIkgfO1RgC3SFcuoDCxpr859QpX0PoGToynWTIxrR1XyuLnxqAjEhA +1ZbtbORSVS+mrdeHwg0xkRNubLxne5KNsvpgFJO24cIuNk6TtrSrjOuB/URl +d+8eYj1ufm9DcvQguWf2p3cAGw+dJQvbL9GDhYJYi8g4NnqLL0yWv9SBPuaF +zuIyNu6U8bj54qw2+IUVXrMpZ+Obz81nSP7aMFde7fO9ko1LJiTsLm3SBknV +3nnDu8T/Vi65AoLaYCdMJv3TxEazRuvq9ug10NBVvK+zm42N2yMz58NWg614 +jW54Lxv32EqQX25bDb0bn8zJv2Mjsz/g7guT1TBT9+2UxyAbrwkOR8GcFujm +G9z58pVNnH/zSicitKChzzz8zBgbW6VU1i66aYGt9FbQn2Djt2mPQF2mFuw/ +GfY6dJaNd6fOXOD7owkzTclZcgtsdIAc1YIBTYj/dcW77hcbL30sf+H3QBMk +jEt1dv9mI77m+Lvc0IScQ3Wzf/+ycfHEo859SZrwPxrpKvI= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VO0bB3ChSEj2ZWaMvWSPGWbpvgmFsiVFhZIoQlmSJVlLStImypYl +KcvMKNsrUdKmsiX1IlFayE69qt/5/TXX55rrXOc5z33f3/Mclb1Bzj78fHx8 +B5bw8f3/d67/yUP11ML1Je/a1OziN67vypE/Zt4bD3eWlVvkpWsAyrzcK9+b +Abfp2cKB6SYQ7njrjUBvAQzXHK+0SbeCVeNyGT/fcOCDfGamSPo2GGiwD5p5 +0wx0S/pe+jkfsFb/+u/kmw6QNpzx/ZsaBj/f0C9NvBkCP5+taXqxSdCyoaTw +dcE0FK8ciz++9jKQBmo/7dX5DWuC+L9JGeeBdIDnLaENAngnxq3g5VghZBha +19tvE8akQM7QtYJSeJtp0DQpIYZznX6CmufuQFZn2cpwDTE0KTvdtyr3DriL +a3n+MhND5ZhpiZnyO/A+gfyH31sMxb4Up2W334HBQBGWdLUYxvpKeoaLlcOo +5fA9mps4ijiJTW5PKYeFiSsVUfkrsapUrafyWAWkFsa+5FdYhd/ieqJ/X68E +W+MDkjJqq/DLdL5mRmElCD903qaluwrzumVaVcoqIfGjxjs781U4ODI5aFhT +CdGqzz9dPLAKFQdGvGU6KiEwT/6PZt0qjKHuzRgVrAKna1U6djslUV5dkHdv +fxVI6GQH7faRxBusrV03A6qgvT6RExQkifsOL7RePFIFtu+2m15MkMSjGknK +u49XgYXinw3/lkniw6HZhIpLVWCcabszaFESq4/8cXFvqQK5ix9TLlyXQuPS +wJBmRQ7Ir61OXCiWQqdGZ/8qZQ4oNifH7q6UQsvVn59lq3OAMrEmTKtFCtcX +kB7t1eOAxuZgr/pRKTwpKHS61pwD6wR/0z6uk8Zax5NzKb4ccAiVHTZ6Ko0y +zL4EbgUHHFeM9l/plMbo4tZ6cR4HnAtq3y6+l0b1lcMOPjUccH2162XrD2k8 +apyfKviAA7t1btS5y8jgvIii7YoODvgP65+P95LBBef+SrNpDpx0sVnfMSeD +zTOzc/JGXFDktSvyL5HFb/8F3jCgcaFcymXecIUsfjoZ0G3B4EJPh0fleWVZ +3DX+7ImrBRfUnUJVnTbJ4tD3lGmWMxeat+Que3VVFtWD2+z5D3Pht/Vs+wuW +HIagwOPDt7iQXhxZ9ttaDh9/H4G+O8T1y/hO6TrJYYxopzm7igubH4mYn/WR +w4Mnhz9M3eNC1gYqd3OaHN5hymSTHnHBFO2uPBuQwwQDFvNgPxdCzPI9n8TL +41q9mD8TojywzROfsTsjj7KXBiVjVvJAVSj6VPsleWw4URokKMmDV12uVZ03 +5fFKiI3gUjke6AWLCvS3y2Oqj3HJCyoPRouPFk8pKqDlOpJVzDoe3BcbYYSp +K6DbRKRSowkPLoc6v5zXVcCGJ/EWv+g8sLLQXVhEBfyr+T5xH4sHBf8O2Qj5 +KmDEKuY3Pise7JK2H1PiKqBsSmyb2zYerIuqj8tpUED9BcMph+08EBlaLavS +qoBbO9LCzd14UFshAJpvFVBwQCBDdjcPZO1q0w3+KuB2fw+tlH3E+uPUja3s +FPFT9aFD6Ud4UDJ6vu2xiyJWathdYYXy4LjD3122HooYlpqkNRzGA11yX5LD +YUU810M/rnGMB6drzr1xu0KYsah4OJYHlj9+RQZ+VERl9eKnOqk8OLbpovaD +74qYaD367NQZHpTn6/ZJzSlilbNJ4OBZHsi7eJnVCivh/WU2V+PTefC95tG8 +gJ4S9l2Tzc+4xAMVSc8SV7oSiif7ND+7zANX/wXXUlTCis+XU/kyedBEXnvX +fqsS5rmsVtidxYML8emhVyOUMKldmDGUw4O2d2vUv8cp4fJd+7gLuTxYNG7p +XJ+qhLFCPe9E8nmw//Os0fB1JYxMrGSr3uABY/POSb0WJeT4xnuSS3gwJKMZ ++FCMhPvRYMqqnAdyQffJcnIkTPLmfylXwYPNbTteHKCSUMbf8+AI4buRqTor +15Hwb/jjwZAqYn8GJr667SChuNvC6G4eUX/T01m395DwwXhTj1g1D2bOq9n+ +PUjCm+LOqbWEPSxdSwtjSPhFe9kWwXs8MCqt9/1RQMKS6ymOvrU88OXfJmdx +m4TR814Zs4Sv7RxvvVhNQs+CCzdi63iwTFxFk9FGwjr9Q6Yn63nA9K3rPvOa +hOZHNjUKNvAguGlr0kAfCZUffpY7TrjvSPJw4hgJQ5O+2O77hwcrnytffDNH +wi35pzVfE7bUqN2gzUdGf7VDfWaNRP3efCt4KUnGx7VxL/8Q/miQ5KxKIuPC +zUXJnfeJep6m8IdpkDGYY7uOSziO5bRH0ZSMYSV/xbc38WCTR84U3YKMyfKO +oqWExU98S9i2mYyDjY4Gc4S7801lQlzJ+KQ+Lnr9A+L5WpKK073IqDq6byqO +sPdIB738IBnHO2IuNBHWFqI+eRZKxqH7Tnt+EZ5cfcj9y3EyChf77tZv5kGN +bd23ZSlkNNLblOJJODZAKEb9AhkLq2I+nSZsneYibnGdjBmmF8OrCItV5ud6 +lpCxKkKB2Um46/W4QUwVGds7r5lMEM6eZjZn1ZNxi2uFr3ALD/bKpGyteUTG +huqPHUqE19B7hrtfknGnQ3uENuGJHWrh02/JeEtz6U5jwvcig4VWDRPr/6gc +ZUb4+LV/MvXGydjcca/v/7ZqFNHevEDG7EHfKBPCooPb6w/wU9A++7mHDuHO +JUWbT4pS8LJ+YjKFcJba1L+FshQs8dWbWUHYywqCmqkUvFEaUDpDrFfL9wzf +oDYF9eY+lPQSHj/19vxvYwp+/WQ0eY8w75ammhJQ8PftpSczCEc9D+GZ2lDw +2kp+fz/CFuNNVq5bKRh38HWOGeHlEuJvQnZTMOo2RX0Z4VeGO/3O+1JwdNvl +xRfE/nuEzZ5+HkXBgIrGOw6ENa5YkL4mUTBf+1XK8gf/n+9zd4TSKRif9+J+ +I1HvyMU1rywKKdi5whOVCJtTju7xKqfgLMkrrZnoH2F8OBVTQ0HN3VpsH8KX +Ejxkap9TkOI23XKN6L9dRWXFPT0UHHc8nGtIWPXxAn1mkILd30uGHhD9Wyly +wV1/loLbfpuXdBH9/vz849wisjK+ep/u3kLMywWutGGLljJu7TIoWkfYvXtP +86ChMu65Uu2TS8zXqPzisJK1Mq6wzHU4UMMDgTwD7YxAZax9kvuzlZjXpw9i +6isilDH2lLCmFOH0j083v4hXxp23+nvciXmnaPkECV9Rxuw1Ri/ec4h8Kb/K +O35fGX3kd2MZkReWb9p/j7cp482cR85DRL7Y8wlu9OxQxsDKkdMyhL2dA9/C +iDIeOhVwJPg20a9RKrEnllJxn1W5zcJNYp6V526Yr6Vi2iapMCciz2a56W0/ +9al4T/zpNbs8Yn83rR2rMqbiS0sdAQsi/5IOe9FU11PRUNQ5Q+060T8tT9v4 +nah43GDyUy2Rpw99c8dawqk4Jb7YYXyOBzaLZpLRUVSUqooqnibyuj29i2Z8 +gopLItI6yok8f1u7/ERhChXpS4SYiqeJ/loRKpl0jYrRrSVRjxKJPKjcRLdu +puIZ/UzDIOJ9EbAweaJNTAU37va2U/Ii9uPwftlPkio48TenbYMHUe+vfWUC +8irYYtTJ8NvFg6J3LT3rVVUwO3KVUNEOHvQ3XtKppqng8YALMeOOPHBIMuvN +91RBUarbu2Yk8lIyTj+qSgUrj/znGEfmAV/q7MPMuyr48NTEax0lYv0CB93v +1qvgUivx813yPPCfdU6afKSCHUfUO+WleVDYq/7Ot08FX6eevRkqQrwvc9uS +XQRUMX4goDRqjgs/10r0625TRRnbWs6bZ1yYu64Yt85dlbh/YC7pCRdmVmqo +m3mq4p9jLTSPVi6MT5sdtDygiq51CYFvmrgwVO895x6jSpxvhy0Kqrnw1O6e ++KkiVVSapyVl5xDnE38PGJpVxXcLGnU6gVxgld3Ou3xZDTetaczYIsiFd9Sy +XKtsNTRqOTmyYgkXIi+X5szkquG83ljX498cuBdXfM25VA3LVe3Pm85zwGhH +XqZ4A+Hw5ru/v3BgzdKL6ckf1LD2Yqmv/EsOyHpGnQjXUcfLQyp8169wYFLS +1su1WR3tObNrHFU5MHzGy/WIkCZ+OX+pY1SkCmx+HLUZoWkhTdN89sb7Cvju +LRzCi12NU8urqJLOd4jvCTn+k81r0LoyyWdp8y2QfKGZVvlDG6mJl+5K7boJ +pFMVjjSaDnZkaYUbvCiCzLVmElK+urgh4UBOe8wNeKpobjJ9Xg/dQ0V+7HfJ +BwapOV2/Rx+nJrtbxTAHxAUKQvfEG+BrnZupU4FZQIlTZrlpGmLeqxE9w6LL +sFxj113nx4aoe7BF38X2AuixFSqO7jZCkTJFytnodDjSL9liy7cOX7YPtFZe +SoUf02e22WSuw7PM9BZH3ZOwUb81y0bXGLVaL0f4+yZA4zTzv/l2Y2SZ/LeV +9CAWAnWM+l77mKDA3QFqq3okhM0r/vL0M0G7thB7D/FIiG4WUBw/aILNWWOb +li0cg9Qd3W4iwSZYSVVMTnp2DG4mRry1iDRBJVHJzRhyDIbeN/Zy00xw58/+ +XXmPIsD1rN2bS/dMMGn8gXN32FFgj+/rcltOQ4kNRnIH+cNAtn5jQcMKGpr0 +flSbmwiF8ZPawcriNMwbq3BKGwiFHJWJFSOSNGw+YLEw1BAKf1yiNgSTaPh5 ++5rHpIhQuF9/npOsT0N2SSz5xUQImKc0pnO30TD91cf9c1+PgJW6/BaxAhqK +3GqPIy05DLyxRyr7CmmoWj7EfToVDOr3Qubqimlo3VKjnDAcDIK2L3P9ymio +btmQJtkWDM1ByVMtPBo+0nxvUHYuGNbXz1yJfEzDX8Ne9xupwUBzfj30+TsN +l9hF6WZcDITVJ05HNNPpKDrUsTo2xB8amEVLNzPoKOCaZ5zr5g+O8/czull0 +4vupRbcL/CEicPb2qDkdr3ekcaNF/aFtl9cH8c10TJ/uymktPgh+ZjTbnV50 +3JvZnmY0cABKpz4ozZyio9XmzLMSnn6g7WN2X6OPjjf8KkNVMn3gnKr9r4T3 +dDRueThwPNEHZgb2mgz10zGvYLLtW7APNLqfKcv5SMfXhlnj0zY+4Ow4cEVu +jI59g3JHGxb3wTFmUvByPlOkdW8X1vTZB22rXquMaZiiFm+nrby5N/g0+iXy +DpuiAOteYqDaHhg/9PWoVagpOj7+0blccg9EkAP8e8JNkb8k+yqPbw+cjg5y +XogyxTXmsTtN+72gkhFOZSWboo3B4on5q16weDehoSXLFOsOBefZSntBRkXO +TEeLKd74pRDwQ8sD7ud17ZuUMcNZSkWXSaQ7DG5W8QyXN0N+xzrRvx7uwPfz +kNt/imaYNxLyZ3CDO1g4CdkvpZqhxBZ8OC7mDq1LGHQFbTO8VJD6Sv+GGzzf +m7vcfL0Zbot/20rv2AF96gfL0/eb4fDkXeFB8+0wc/PvvP49M5Tq5irUervA +J1frvJRaM/ynFnZcdnCBXsGzmz7Wm2FkzjX7JKYL1HspXr3cZIai4dJ6mVIu +EC9vwvj9xAwztfI2pT/cChKnDkY/fW+G0RFCKY1rtoKObzefDz8Dazp3ZNby +OQNFhlTaKMjAhRNPX/PGnUCiZa+TvBADdf6orG167wTTlIn8ZysYSEvzFhWq +dYK6HpENRjIMXN0ybORyxAk2WWPSXy0GrlqfHfrhsyN4a5Qtz9rCwNPLOE2j +DQ4Q+cjjoKYjA0dvhTgKZDlAuo/kM44zA6+K19nhUQdoKDp25tl2BsbXxkuo +GDmAtOamlb/3MDD0wsjNyFJ7aNUckfYKZ2BL2uMlYTlbQHu1MlUzl4GXsgPP +PcizA2zrOMHJZ+Dlr3JZU3F24OqX/GF9IQOHw5zOW3jbQcLNsYLtpQz03Hag +b72mHbxf3aCRwmXgxacvx4ru2ELaGre13x8zcFlE23K5ZhuY1L5A40ww8MSX +xg2v+DZB73O0kppmYHDVsvcRnzdCU+D41tBZBv53Vfm6WftGSOPYHKb9YuDt +yj4bgWsbQZvBd7tOgIkh+8ap1aYbYa/NIZUWWSbGquqfiQu3hi7fjaJdLCaq +lzetowlYQf3yWUUTYKKg6H7Nxu+WUFBWsOayORPZPox3O3ssIfjHb+sd1kxM +EJs07y21BLGjvLj3Dkwsa+4V6HSyBOtklfnhvUwUWjiY2FS0AWoK//swe4qJ +qmf5tv3dZQG0DaHztqlMrIjjazphYwHVH76L5p1lYl6J0pw0zQI4lH66bQYT +WQXUxLCVFnA7s+lsTjYTZQaMD8m0mEPemSSzjeVM5LcufdSsaw4poSvPZ3Yy +8ajo8m1+EgjCUqeKx7qZOLqctsP2D0ByFV+DRS8T3772eDHyDiBxfPLT9/dM +NJ/enRl3BeC4XxfL/BMTcWQ82UYC4Miuq6NfFpioLJZUs0R4PbhbqiGTwkLx +riJNh5Us+N0lLN5CZaGZd1S28TgT8nzG39mqsfBKcHU1+wUTPiXXHnVfzcJ/ ++y8416Uy4cgTh4pjRiyUeZcQ4ybChNP20ZQaaxaqqS0JkBRnQN2O7kXjIBY+ +LDGvOK1nCru/1D1tOMzCGV9v/qJVpsAXmZdpGcrCi0V/xvtn6GCd7W/scoyF +zdf6Farq6dDx75KAkAQWlo35ej2zpcPXvXrvqq6wMCtXb+s/gTRQOnSyVq+J +hXd9zo22PTeGtL/7TVKbWSj4Vr7HttoY+DOsqz4/ZGH2lgjFkevG8PXu0tK8 +Jyx042/ZsjfIGOr4EjMlO1nIGin8Hi1lDO4XTxydG2Hh0TPt1cpe6yCz/phJ +4wo2FvWLOSSKGIGovVuVojgbg6yPPfs0awgnBk11j0qwcerzvz88PhiC39IF +dQMZNuaIkgfO1RgC3SFcuoDCxpr859QpX0PoGToynWTIxrR1XyuLnxqAjEhA +1ZbtbORSVS+mrdeHwg0xkRNubLxne5KNsvpgFJO24cIuNk6TtrSrjOuB/URl +d+8eYj1ufm9DcvQguWf2p3cAGw+dJQvbL9GDhYJYi8g4NnqLL0yWv9SBPuaF +zuIyNu6U8bj54qw2+IUVXrMpZ+Obz81nSP7aMFde7fO9ko1LJiTsLm3SBknV +3nnDu8T/Vi65AoLaYCdMJv3TxEazRuvq9ug10NBVvK+zm42N2yMz58NWg614 +jW54Lxv32EqQX25bDb0bn8zJv2Mjsz/g7guT1TBT9+2UxyAbrwkOR8GcFujm +G9z58pVNnH/zSicitKChzzz8zBgbW6VU1i66aYGt9FbQn2Djt2mPQF2mFuw/ +GfY6dJaNd6fOXOD7owkzTclZcgtsdIAc1YIBTYj/dcW77hcbL30sf+H3QBMk +jEt1dv9mI77m+Lvc0IScQ3Wzf/+ycfHEo859SZrwPxrpKvI= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0811039122562063}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0811039122562063}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VO0bB3ChSEj2ZWaMvWSPGWbpvgmFsiVFhZIoQlmSJVlLStImypYl +KcvMKNsrUdKmsiX1IlFayE69qt/5/TXX55rrXOc5z33f3/Mclb1Bzj78fHx8 +B5bw8f3/d67/yUP11ML1Je/a1OziN67vypE/Zt4bD3eWlVvkpWsAyrzcK9+b +Abfp2cKB6SYQ7njrjUBvAQzXHK+0SbeCVeNyGT/fcOCDfGamSPo2GGiwD5p5 +0wx0S/pe+jkfsFb/+u/kmw6QNpzx/ZsaBj/f0C9NvBkCP5+taXqxSdCyoaTw +dcE0FK8ciz++9jKQBmo/7dX5DWuC+L9JGeeBdIDnLaENAngnxq3g5VghZBha +19tvE8akQM7QtYJSeJtp0DQpIYZznX6CmufuQFZn2cpwDTE0KTvdtyr3DriL +a3n+MhND5ZhpiZnyO/A+gfyH31sMxb4Up2W334HBQBGWdLUYxvpKeoaLlcOo +5fA9mps4ijiJTW5PKYeFiSsVUfkrsapUrafyWAWkFsa+5FdYhd/ieqJ/X68E +W+MDkjJqq/DLdL5mRmElCD903qaluwrzumVaVcoqIfGjxjs781U4ODI5aFhT +CdGqzz9dPLAKFQdGvGU6KiEwT/6PZt0qjKHuzRgVrAKna1U6djslUV5dkHdv +fxVI6GQH7faRxBusrV03A6qgvT6RExQkifsOL7RePFIFtu+2m15MkMSjGknK +u49XgYXinw3/lkniw6HZhIpLVWCcabszaFESq4/8cXFvqQK5ix9TLlyXQuPS +wJBmRQ7Ir61OXCiWQqdGZ/8qZQ4oNifH7q6UQsvVn59lq3OAMrEmTKtFCtcX +kB7t1eOAxuZgr/pRKTwpKHS61pwD6wR/0z6uk8Zax5NzKb4ccAiVHTZ6Ko0y +zL4EbgUHHFeM9l/plMbo4tZ6cR4HnAtq3y6+l0b1lcMOPjUccH2162XrD2k8 +apyfKviAA7t1btS5y8jgvIii7YoODvgP65+P95LBBef+SrNpDpx0sVnfMSeD +zTOzc/JGXFDktSvyL5HFb/8F3jCgcaFcymXecIUsfjoZ0G3B4EJPh0fleWVZ +3DX+7ImrBRfUnUJVnTbJ4tD3lGmWMxeat+Que3VVFtWD2+z5D3Pht/Vs+wuW +HIagwOPDt7iQXhxZ9ttaDh9/H4G+O8T1y/hO6TrJYYxopzm7igubH4mYn/WR +w4Mnhz9M3eNC1gYqd3OaHN5hymSTHnHBFO2uPBuQwwQDFvNgPxdCzPI9n8TL +41q9mD8TojywzROfsTsjj7KXBiVjVvJAVSj6VPsleWw4URokKMmDV12uVZ03 +5fFKiI3gUjke6AWLCvS3y2Oqj3HJCyoPRouPFk8pKqDlOpJVzDoe3BcbYYSp +K6DbRKRSowkPLoc6v5zXVcCGJ/EWv+g8sLLQXVhEBfyr+T5xH4sHBf8O2Qj5 +KmDEKuY3Pise7JK2H1PiKqBsSmyb2zYerIuqj8tpUED9BcMph+08EBlaLavS +qoBbO9LCzd14UFshAJpvFVBwQCBDdjcPZO1q0w3+KuB2fw+tlH3E+uPUja3s +FPFT9aFD6Ud4UDJ6vu2xiyJWathdYYXy4LjD3122HooYlpqkNRzGA11yX5LD +YUU810M/rnGMB6drzr1xu0KYsah4OJYHlj9+RQZ+VERl9eKnOqk8OLbpovaD +74qYaD367NQZHpTn6/ZJzSlilbNJ4OBZHsi7eJnVCivh/WU2V+PTefC95tG8 +gJ4S9l2Tzc+4xAMVSc8SV7oSiif7ND+7zANX/wXXUlTCis+XU/kyedBEXnvX +fqsS5rmsVtidxYML8emhVyOUMKldmDGUw4O2d2vUv8cp4fJd+7gLuTxYNG7p +XJ+qhLFCPe9E8nmw//Os0fB1JYxMrGSr3uABY/POSb0WJeT4xnuSS3gwJKMZ ++FCMhPvRYMqqnAdyQffJcnIkTPLmfylXwYPNbTteHKCSUMbf8+AI4buRqTor +15Hwb/jjwZAqYn8GJr667SChuNvC6G4eUX/T01m395DwwXhTj1g1D2bOq9n+ +PUjCm+LOqbWEPSxdSwtjSPhFe9kWwXs8MCqt9/1RQMKS6ymOvrU88OXfJmdx +m4TR814Zs4Sv7RxvvVhNQs+CCzdi63iwTFxFk9FGwjr9Q6Yn63nA9K3rPvOa +hOZHNjUKNvAguGlr0kAfCZUffpY7TrjvSPJw4hgJQ5O+2O77hwcrnytffDNH +wi35pzVfE7bUqN2gzUdGf7VDfWaNRP3efCt4KUnGx7VxL/8Q/miQ5KxKIuPC +zUXJnfeJep6m8IdpkDGYY7uOSziO5bRH0ZSMYSV/xbc38WCTR84U3YKMyfKO +oqWExU98S9i2mYyDjY4Gc4S7801lQlzJ+KQ+Lnr9A+L5WpKK073IqDq6byqO +sPdIB738IBnHO2IuNBHWFqI+eRZKxqH7Tnt+EZ5cfcj9y3EyChf77tZv5kGN +bd23ZSlkNNLblOJJODZAKEb9AhkLq2I+nSZsneYibnGdjBmmF8OrCItV5ud6 +lpCxKkKB2Um46/W4QUwVGds7r5lMEM6eZjZn1ZNxi2uFr3ALD/bKpGyteUTG +huqPHUqE19B7hrtfknGnQ3uENuGJHWrh02/JeEtz6U5jwvcig4VWDRPr/6gc +ZUb4+LV/MvXGydjcca/v/7ZqFNHevEDG7EHfKBPCooPb6w/wU9A++7mHDuHO +JUWbT4pS8LJ+YjKFcJba1L+FshQs8dWbWUHYywqCmqkUvFEaUDpDrFfL9wzf +oDYF9eY+lPQSHj/19vxvYwp+/WQ0eY8w75ammhJQ8PftpSczCEc9D+GZ2lDw +2kp+fz/CFuNNVq5bKRh38HWOGeHlEuJvQnZTMOo2RX0Z4VeGO/3O+1JwdNvl +xRfE/nuEzZ5+HkXBgIrGOw6ENa5YkL4mUTBf+1XK8gf/n+9zd4TSKRif9+J+ +I1HvyMU1rywKKdi5whOVCJtTju7xKqfgLMkrrZnoH2F8OBVTQ0HN3VpsH8KX +Ejxkap9TkOI23XKN6L9dRWXFPT0UHHc8nGtIWPXxAn1mkILd30uGHhD9Wyly +wV1/loLbfpuXdBH9/vz849wisjK+ep/u3kLMywWutGGLljJu7TIoWkfYvXtP +86ChMu65Uu2TS8zXqPzisJK1Mq6wzHU4UMMDgTwD7YxAZax9kvuzlZjXpw9i +6isilDH2lLCmFOH0j083v4hXxp23+nvciXmnaPkECV9Rxuw1Ri/ec4h8Kb/K +O35fGX3kd2MZkReWb9p/j7cp482cR85DRL7Y8wlu9OxQxsDKkdMyhL2dA9/C +iDIeOhVwJPg20a9RKrEnllJxn1W5zcJNYp6V526Yr6Vi2iapMCciz2a56W0/ +9al4T/zpNbs8Yn83rR2rMqbiS0sdAQsi/5IOe9FU11PRUNQ5Q+060T8tT9v4 +nah43GDyUy2Rpw99c8dawqk4Jb7YYXyOBzaLZpLRUVSUqooqnibyuj29i2Z8 +gopLItI6yok8f1u7/ERhChXpS4SYiqeJ/loRKpl0jYrRrSVRjxKJPKjcRLdu +puIZ/UzDIOJ9EbAweaJNTAU37va2U/Ii9uPwftlPkio48TenbYMHUe+vfWUC +8irYYtTJ8NvFg6J3LT3rVVUwO3KVUNEOHvQ3XtKppqng8YALMeOOPHBIMuvN +91RBUarbu2Yk8lIyTj+qSgUrj/znGEfmAV/q7MPMuyr48NTEax0lYv0CB93v +1qvgUivx813yPPCfdU6afKSCHUfUO+WleVDYq/7Ot08FX6eevRkqQrwvc9uS +XQRUMX4goDRqjgs/10r0625TRRnbWs6bZ1yYu64Yt85dlbh/YC7pCRdmVmqo +m3mq4p9jLTSPVi6MT5sdtDygiq51CYFvmrgwVO895x6jSpxvhy0Kqrnw1O6e ++KkiVVSapyVl5xDnE38PGJpVxXcLGnU6gVxgld3Ou3xZDTetaczYIsiFd9Sy +XKtsNTRqOTmyYgkXIi+X5szkquG83ljX498cuBdXfM25VA3LVe3Pm85zwGhH +XqZ4A+Hw5ru/v3BgzdKL6ckf1LD2Yqmv/EsOyHpGnQjXUcfLQyp8169wYFLS +1su1WR3tObNrHFU5MHzGy/WIkCZ+OX+pY1SkCmx+HLUZoWkhTdN89sb7Cvju +LRzCi12NU8urqJLOd4jvCTn+k81r0LoyyWdp8y2QfKGZVvlDG6mJl+5K7boJ +pFMVjjSaDnZkaYUbvCiCzLVmElK+urgh4UBOe8wNeKpobjJ9Xg/dQ0V+7HfJ +BwapOV2/Rx+nJrtbxTAHxAUKQvfEG+BrnZupU4FZQIlTZrlpGmLeqxE9w6LL +sFxj113nx4aoe7BF38X2AuixFSqO7jZCkTJFytnodDjSL9liy7cOX7YPtFZe +SoUf02e22WSuw7PM9BZH3ZOwUb81y0bXGLVaL0f4+yZA4zTzv/l2Y2SZ/LeV +9CAWAnWM+l77mKDA3QFqq3okhM0r/vL0M0G7thB7D/FIiG4WUBw/aILNWWOb +li0cg9Qd3W4iwSZYSVVMTnp2DG4mRry1iDRBJVHJzRhyDIbeN/Zy00xw58/+ +XXmPIsD1rN2bS/dMMGn8gXN32FFgj+/rcltOQ4kNRnIH+cNAtn5jQcMKGpr0 +flSbmwiF8ZPawcriNMwbq3BKGwiFHJWJFSOSNGw+YLEw1BAKf1yiNgSTaPh5 ++5rHpIhQuF9/npOsT0N2SSz5xUQImKc0pnO30TD91cf9c1+PgJW6/BaxAhqK +3GqPIy05DLyxRyr7CmmoWj7EfToVDOr3Qubqimlo3VKjnDAcDIK2L3P9ymio +btmQJtkWDM1ByVMtPBo+0nxvUHYuGNbXz1yJfEzDX8Ne9xupwUBzfj30+TsN +l9hF6WZcDITVJ05HNNPpKDrUsTo2xB8amEVLNzPoKOCaZ5zr5g+O8/czull0 +4vupRbcL/CEicPb2qDkdr3ekcaNF/aFtl9cH8c10TJ/uymktPgh+ZjTbnV50 +3JvZnmY0cABKpz4ozZyio9XmzLMSnn6g7WN2X6OPjjf8KkNVMn3gnKr9r4T3 +dDRueThwPNEHZgb2mgz10zGvYLLtW7APNLqfKcv5SMfXhlnj0zY+4Ow4cEVu +jI59g3JHGxb3wTFmUvByPlOkdW8X1vTZB22rXquMaZiiFm+nrby5N/g0+iXy +DpuiAOteYqDaHhg/9PWoVagpOj7+0blccg9EkAP8e8JNkb8k+yqPbw+cjg5y +XogyxTXmsTtN+72gkhFOZSWboo3B4on5q16weDehoSXLFOsOBefZSntBRkXO +TEeLKd74pRDwQ8sD7ud17ZuUMcNZSkWXSaQ7DG5W8QyXN0N+xzrRvx7uwPfz +kNt/imaYNxLyZ3CDO1g4CdkvpZqhxBZ8OC7mDq1LGHQFbTO8VJD6Sv+GGzzf +m7vcfL0Zbot/20rv2AF96gfL0/eb4fDkXeFB8+0wc/PvvP49M5Tq5irUervA +J1frvJRaM/ynFnZcdnCBXsGzmz7Wm2FkzjX7JKYL1HspXr3cZIai4dJ6mVIu +EC9vwvj9xAwztfI2pT/cChKnDkY/fW+G0RFCKY1rtoKObzefDz8Dazp3ZNby +OQNFhlTaKMjAhRNPX/PGnUCiZa+TvBADdf6orG167wTTlIn8ZysYSEvzFhWq +dYK6HpENRjIMXN0ybORyxAk2WWPSXy0GrlqfHfrhsyN4a5Qtz9rCwNPLOE2j +DQ4Q+cjjoKYjA0dvhTgKZDlAuo/kM44zA6+K19nhUQdoKDp25tl2BsbXxkuo +GDmAtOamlb/3MDD0wsjNyFJ7aNUckfYKZ2BL2uMlYTlbQHu1MlUzl4GXsgPP +PcizA2zrOMHJZ+Dlr3JZU3F24OqX/GF9IQOHw5zOW3jbQcLNsYLtpQz03Hag +b72mHbxf3aCRwmXgxacvx4ru2ELaGre13x8zcFlE23K5ZhuY1L5A40ww8MSX +xg2v+DZB73O0kppmYHDVsvcRnzdCU+D41tBZBv53Vfm6WftGSOPYHKb9YuDt +yj4bgWsbQZvBd7tOgIkh+8ap1aYbYa/NIZUWWSbGquqfiQu3hi7fjaJdLCaq +lzetowlYQf3yWUUTYKKg6H7Nxu+WUFBWsOayORPZPox3O3ssIfjHb+sd1kxM +EJs07y21BLGjvLj3Dkwsa+4V6HSyBOtklfnhvUwUWjiY2FS0AWoK//swe4qJ +qmf5tv3dZQG0DaHztqlMrIjjazphYwHVH76L5p1lYl6J0pw0zQI4lH66bQYT +WQXUxLCVFnA7s+lsTjYTZQaMD8m0mEPemSSzjeVM5LcufdSsaw4poSvPZ3Yy +8ajo8m1+EgjCUqeKx7qZOLqctsP2D0ByFV+DRS8T3772eDHyDiBxfPLT9/dM +NJ/enRl3BeC4XxfL/BMTcWQ82UYC4Miuq6NfFpioLJZUs0R4PbhbqiGTwkLx +riJNh5Us+N0lLN5CZaGZd1S28TgT8nzG39mqsfBKcHU1+wUTPiXXHnVfzcJ/ ++y8416Uy4cgTh4pjRiyUeZcQ4ybChNP20ZQaaxaqqS0JkBRnQN2O7kXjIBY+ +LDGvOK1nCru/1D1tOMzCGV9v/qJVpsAXmZdpGcrCi0V/xvtn6GCd7W/scoyF +zdf6Farq6dDx75KAkAQWlo35ej2zpcPXvXrvqq6wMCtXb+s/gTRQOnSyVq+J +hXd9zo22PTeGtL/7TVKbWSj4Vr7HttoY+DOsqz4/ZGH2lgjFkevG8PXu0tK8 +Jyx042/ZsjfIGOr4EjMlO1nIGin8Hi1lDO4XTxydG2Hh0TPt1cpe6yCz/phJ +4wo2FvWLOSSKGIGovVuVojgbg6yPPfs0awgnBk11j0qwcerzvz88PhiC39IF +dQMZNuaIkgfO1RgC3SFcuoDCxpr859QpX0PoGToynWTIxrR1XyuLnxqAjEhA +1ZbtbORSVS+mrdeHwg0xkRNubLxne5KNsvpgFJO24cIuNk6TtrSrjOuB/URl +d+8eYj1ufm9DcvQguWf2p3cAGw+dJQvbL9GDhYJYi8g4NnqLL0yWv9SBPuaF +zuIyNu6U8bj54qw2+IUVXrMpZ+Obz81nSP7aMFde7fO9ko1LJiTsLm3SBknV +3nnDu8T/Vi65AoLaYCdMJv3TxEazRuvq9ug10NBVvK+zm42N2yMz58NWg614 +jW54Lxv32EqQX25bDb0bn8zJv2Mjsz/g7guT1TBT9+2UxyAbrwkOR8GcFujm +G9z58pVNnH/zSicitKChzzz8zBgbW6VU1i66aYGt9FbQn2Djt2mPQF2mFuw/ +GfY6dJaNd6fOXOD7owkzTclZcgtsdIAc1YIBTYj/dcW77hcbL30sf+H3QBMk +jEt1dv9mI77m+Lvc0IScQ3Wzf/+ycfHEo859SZrwPxrpKvI= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0811039122562063}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0811039122562063}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943580140413237`*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"997edc1c-b372-45a3-8087-705432e6f7ce"] +}, Open ]], Cell[CellGroupData[{ @@ -13482,66 +15593,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[308]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], + "In[140]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.611115182999938`*^-175\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 308, 309, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133920579224*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2964807386656003`*^-154\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 73, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358014075758*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], +In[140]:=",ExpressionUUID->"0476f351-d94e-4bf8-826e-1ed0a5a8af2b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5007447195984937`*^-178\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 308, 310, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058022385`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3368690794181449`*^-156\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 74, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358014083865*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], +In[140]:=",ExpressionUUID->"11859a9d-b0af-4377-9599-ef721a8c6970"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1145242877114216`*^-181\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 308, 311, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339205811241*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.374351807714857`*^-159\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 75, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358014091352*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], +In[140]:=",ExpressionUUID->"4c816dbe-617e-4dd4-812a-0ce124cb05cf"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 308, 312, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058197193`*^9}, +during this calculation.\"", 2, 140, 76, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994358014097988*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], +In[140]:=",ExpressionUUID->"e178639e-291c-4aaa-80fe-e9b9ab4e2247"], -Cell[BoxData["9.33220071900515`"], "Output", - CellChangeTimes->{3.9913392124888554`*^9}, +Cell[BoxData["8.962280285255115`"], "Output", + CellChangeTimes->{3.9913392124888554`*^9, 3.994358055833639*^9}, CellLabel-> - "Out[308]=",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] + "Out[140]=",ExpressionUUID->"d2444b34-51d3-4f10-aad3-d9a9e2053f25"] }, Open ]], Cell[CellGroupData[{ @@ -13608,68 +15726,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849547748472*^9, - 3.9918495528702526`*^9}},ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-\ -0895c02ffd8f"], + CellChangeTimes->{{3.991849547748472*^9, 3.9918495528702526`*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 309, 313, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125258827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1168056017162554`*^-196\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 77, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358055870843*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], +In[141]:=",ExpressionUUID->"7881671b-ab07-47b3-a74c-82b9c1aa77b4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 314, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339212535879*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.139754546351969`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 78, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358055878017*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], +In[141]:=",ExpressionUUID->"4d880d23-978a-4fb2-ba07-fc6238de52d1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 315, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125438805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.375393697123231`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 79, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358055885306*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], +In[141]:=",ExpressionUUID->"83e0dcb6-9f03-4b5e-904e-e69b1e6e758f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 309, 316, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125518837`*^9}, +during this calculation.\"", 2, 141, 80, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994358055892837*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], +In[141]:=",ExpressionUUID->"3ec98665-56f9-40c4-8944-e2388ebacdd6"], -Cell[BoxData["0.41157157699018565`"], "Output", - CellChangeTimes->{3.9913392196090164`*^9}, +Cell[BoxData["0.8822574012422364`"], "Output", + CellChangeTimes->{3.9913392196090164`*^9, 3.994358061488905*^9}, CellLabel-> - "Out[309]=",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] + "Out[141]=",ExpressionUUID->"dc99acc0-cf97-42ba-b38c-9ece28e9ebcf"] }, Open ]], Cell[CellGroupData[{ @@ -13690,8 +15815,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13736,68 +15860,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918495568340263`*^9, - 3.991849559359928*^9}},ExpressionUUID->"57976ffc-56f1-604b-8519-\ -bead95265db8"], + CellChangeTimes->{{3.9918495568340263`*^9, 3.991849559359928*^9}}, + CellLabel-> + "In[142]:=",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 310, 317, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196440163`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1168056017162554`*^-196\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 81, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994358061517899*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], +In[142]:=",ExpressionUUID->"266cc358-d7b0-4eae-accd-a2c1d21c63ac"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 318, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196535416`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.139754546351969`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 82, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994358061524531*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], +In[142]:=",ExpressionUUID->"f3762846-e428-4793-a436-2843c093af84"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 319, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219661541*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.375393697123231`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 83, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994358061530244*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], +In[142]:=",ExpressionUUID->"2b54f9c0-3838-4949-9b36-ca485ca5700e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 310, 320, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219670542*^9}, +during this calculation.\"", 2, 142, 84, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.99435806153502*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], +In[142]:=",ExpressionUUID->"d22e0f8a-5ea6-4901-8738-866f2f1972f3"], -Cell[BoxData["3.215201591157595`"], "Output", - CellChangeTimes->{3.9913392268711624`*^9}, +Cell[BoxData["24.004080305114975`"], "Output", + CellChangeTimes->{3.9913392268711624`*^9, 3.9943580664463367`*^9}, CellLabel-> - "Out[310]=",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] + "Out[142]=",ExpressionUUID->"50353560-20ab-4bf7-ad03-960d81ba219c"] }, Open ]], Cell[CellGroupData[{ @@ -13818,8 +15949,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13864,68 +15994,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849563755764*^9, - 3.991849566543682*^9}},ExpressionUUID->"cfa37210-3ae7-3f49-b290-\ -f19508c6d2f1"], + CellChangeTimes->{{3.991849563755764*^9, 3.991849566543682*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 311, 321, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226907137*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1168056017162554`*^-196\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 85, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994358066475727*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], +In[143]:=",ExpressionUUID->"1b1daa27-d7df-4c74-b1df-8376e6e3c5ba"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 322, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226917137*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.139754546351969`*^-201\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 86, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.9943580664824*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], +In[143]:=",ExpressionUUID->"f0af1673-e4e0-4f52-857f-ef498789d12e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 323, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269251385`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.375393697123231`*^-205\\\", \ +RowBox[{\\\"154105300338610232238812282088443762157\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3624858499033438617600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 87, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994358066487541*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], +In[143]:=",ExpressionUUID->"0de72a09-f648-4439-884f-37f4775054eb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 311, 324, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269341373`*^9}, +during this calculation.\"", 2, 143, 88, 31388289776276925705, "6"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994358066492083*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], +In[143]:=",ExpressionUUID->"78778ede-ff96-4925-aad6-6b32c404e5e1"], -Cell[BoxData["16.94395627212904`"], "Output", - CellChangeTimes->{3.9913392304284153`*^9}, +Cell[BoxData["4.1191893524865355`"], "Output", + CellChangeTimes->{3.9913392304284153`*^9, 3.9943580694904327`*^9}, CellLabel-> - "Out[311]=",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] + "Out[143]=",ExpressionUUID->"f13e1e73-3e22-4d63-b7c5-0ea616fa066e"] }, Open ]], Cell[CellGroupData[{ @@ -13934,21 +16071,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849569404436*^9, - 3.991849573855135*^9}},ExpressionUUID->"7457b456-6d32-5b44-9679-\ -346c5f5ac532"], - -Cell[BoxData["0.05576142449710889`"], "Output", - CellChangeTimes->{3.9913392304624157`*^9}, + CellChangeTimes->{{3.991849569404436*^9, 3.991849573855135*^9}}, CellLabel-> - "Out[312]=",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] + "In[144]:=",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], + +Cell[BoxData["0.08872518155702727`"], "Output", + CellChangeTimes->{3.9913392304624157`*^9, 3.994358069516198*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"6618f4f9-dab6-419b-9c78-4e0e3ba12996"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"f36cb0fd-7ec0-4ab9-9521-1ef13679df34"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[145]:=",ExpressionUUID->"f36cb0fd-7ec0-4ab9-9521-1ef13679df34"] }, -WindowSize->{714, 876}, -WindowMargins->{{-3, Automatic}, {3, Automatic}}, +Evaluator->"6", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {3, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -13966,613 +16106,640 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 453, 8, 36, "Input",ExpressionUUID->"8fe1c173-48e4-40da-853e-c7660d0953ff"], -Cell[1032, 32, 302, 6, 41, "Output",ExpressionUUID->"2e4fa5be-ebd9-47a6-b918-2d1037bfa0d3"] +Cell[576, 22, 448, 7, 36, "Input",ExpressionUUID->"8fe1c173-48e4-40da-853e-c7660d0953ff"], +Cell[1027, 31, 343, 5, 41, "Output",ExpressionUUID->"f6fe7e93-d329-46e0-9d32-747234faf456"] }, Open ]], Cell[CellGroupData[{ -Cell[1371, 43, 255, 5, 36, "Input",ExpressionUUID->"2da1658c-7e33-476a-91d3-3a12ac5d4054"], -Cell[1629, 50, 305, 6, 41, "Output",ExpressionUUID->"658291d7-f7a1-44c7-acc0-cc6804b86448"] +Cell[1407, 41, 250, 4, 36, "Input",ExpressionUUID->"2da1658c-7e33-476a-91d3-3a12ac5d4054"], +Cell[1660, 47, 344, 5, 41, "Output",ExpressionUUID->"56dc98cf-6d80-4a3d-bb41-ec9c843b15ca"] }, Open ]], Cell[CellGroupData[{ -Cell[1971, 61, 226, 5, 36, "Input",ExpressionUUID->"c4ab2602-4821-4853-82aa-f55a72e0aaab"], -Cell[2200, 68, 300, 6, 41, "Output",ExpressionUUID->"388a5dec-22e1-403d-9df4-6c9a6c389a83"] +Cell[2041, 57, 221, 4, 36, "Input",ExpressionUUID->"c4ab2602-4821-4853-82aa-f55a72e0aaab"], +Cell[2265, 63, 339, 5, 41, "Output",ExpressionUUID->"e50997f2-07cb-4634-9a9a-6ee8e80acb8d"] }, Open ]], Cell[CellGroupData[{ -Cell[2537, 79, 180, 4, 36, "Input",ExpressionUUID->"f789b39f-0ad8-4646-95c3-1ec11ff85d9d"], -Cell[2720, 85, 303, 6, 41, "Output",ExpressionUUID->"5a188d2d-00ef-4a8c-832a-844cf226ad94"] +Cell[2641, 73, 175, 3, 36, "Input",ExpressionUUID->"f789b39f-0ad8-4646-95c3-1ec11ff85d9d"], +Cell[2819, 78, 344, 5, 41, "Output",ExpressionUUID->"f94403c1-2002-4f2d-8d68-6078d3aef669"] }, Open ]], Cell[CellGroupData[{ -Cell[3060, 96, 262, 8, 54, "Input",ExpressionUUID->"55893559-3f60-4006-a662-5b99e964c5ad"], -Cell[3325, 106, 317, 6, 41, "Output",ExpressionUUID->"b8decdc7-2317-4b22-8ed5-af092522691c"] +Cell[3200, 88, 257, 7, 54, "Input",ExpressionUUID->"55893559-3f60-4006-a662-5b99e964c5ad"], +Cell[3460, 97, 358, 5, 41, "Output",ExpressionUUID->"b1474813-d20f-43bc-a579-af01bd8ac782"] }, Open ]], Cell[CellGroupData[{ -Cell[3679, 117, 136, 3, 36, "Input",ExpressionUUID->"8dc4e2d5-d91c-4ed4-b5ed-77e7122fe469"], -Cell[3818, 122, 309, 6, 41, "Output",ExpressionUUID->"2a77efe3-a3c3-49f5-897f-bdb025f1b711"] +Cell[3855, 107, 131, 2, 36, "Input",ExpressionUUID->"8dc4e2d5-d91c-4ed4-b5ed-77e7122fe469"], +Cell[3989, 111, 348, 5, 41, "Output",ExpressionUUID->"3dcfcb69-1753-471f-901a-a1bdfce1378f"] }, Open ]], Cell[CellGroupData[{ -Cell[4164, 133, 281, 7, 36, "Input",ExpressionUUID->"e4a8643f-da8e-487a-a9da-facf48dd1dbe"], -Cell[4448, 142, 321, 6, 41, "Output",ExpressionUUID->"e1fe17f1-16a6-485c-b548-c95c3bb75d7d"] +Cell[4374, 121, 276, 6, 36, "Input",ExpressionUUID->"e4a8643f-da8e-487a-a9da-facf48dd1dbe"], +Cell[4653, 129, 360, 5, 41, "Output",ExpressionUUID->"05532ee1-ae50-4782-a900-8025330ef6c4"] }, Open ]], Cell[CellGroupData[{ -Cell[4806, 153, 262, 8, 36, "Input",ExpressionUUID->"9b20a0d1-981f-47cb-9932-f43daf3b20ff"], -Cell[5071, 163, 320, 6, 41, "Output",ExpressionUUID->"962ca9aa-e7fa-4fc2-ac4d-548281cd254e"] +Cell[5050, 139, 257, 7, 36, "Input",ExpressionUUID->"9b20a0d1-981f-47cb-9932-f43daf3b20ff"], +Cell[5310, 148, 363, 5, 41, "Output",ExpressionUUID->"c12fc1d8-9b71-4131-a96a-e148d74178b9"] }, Open ]], Cell[CellGroupData[{ -Cell[5428, 174, 208, 4, 36, "Input",ExpressionUUID->"20aeb256-62d8-422c-9e4c-2e8eb192f455"], -Cell[5639, 180, 288, 5, 41, "Output",ExpressionUUID->"5864dfbb-c4d4-492d-a6a6-842db0ae821f"] +Cell[5710, 158, 203, 3, 36, "Input",ExpressionUUID->"20aeb256-62d8-422c-9e4c-2e8eb192f455"], +Cell[5916, 163, 333, 5, 41, "Output",ExpressionUUID->"a970ec18-6d9f-4f56-8b1a-8a8277f265fc"] }, Open ]], Cell[CellGroupData[{ -Cell[5964, 190, 210, 4, 36, "Input",ExpressionUUID->"de81fbf9-8a17-44ca-a205-0a2f9dffac83"], -Cell[6177, 196, 288, 5, 41, "Output",ExpressionUUID->"dc56965f-2437-4b21-b0c3-783cc139f50c"] +Cell[6286, 173, 206, 3, 36, "Input",ExpressionUUID->"de81fbf9-8a17-44ca-a205-0a2f9dffac83"], +Cell[6495, 178, 332, 5, 41, "Output",ExpressionUUID->"c3f085a0-d46d-4964-9626-7692da86fb88"] }, Open ]], Cell[CellGroupData[{ -Cell[6502, 206, 133, 3, 40, "Input",ExpressionUUID->"3fa258e5-621f-4343-b671-d18a2cdd0ab0"], -Cell[6638, 211, 300, 6, 45, "Output",ExpressionUUID->"7a617167-5f7d-4152-97c6-3f012b851962"] +Cell[6864, 188, 129, 2, 36, "Input",ExpressionUUID->"3fa258e5-621f-4343-b671-d18a2cdd0ab0"], +Cell[6996, 192, 342, 5, 41, "Output",ExpressionUUID->"68561822-7b8f-4cc2-a1ea-679f3f737846"] }, Open ]], Cell[CellGroupData[{ -Cell[6975, 222, 133, 3, 40, "Input",ExpressionUUID->"b88bafaf-5c5f-49ae-afa0-a452969fca21"], -Cell[7111, 227, 301, 6, 45, "Output",ExpressionUUID->"e30e9937-5d86-46db-8e0e-cba3b49e6d5c"] +Cell[7375, 202, 129, 2, 36, "Input",ExpressionUUID->"b88bafaf-5c5f-49ae-afa0-a452969fca21"], +Cell[7507, 206, 345, 5, 41, "Output",ExpressionUUID->"0bf80200-cbb9-41a1-9e97-0e97b52cfce8"] }, Open ]], Cell[CellGroupData[{ -Cell[7449, 238, 561, 20, 109, "Input",ExpressionUUID->"a65de40a-1982-4c6c-a9dd-ebeb9b25be9f"], -Cell[8013, 260, 320, 6, 45, "Output",ExpressionUUID->"831e86d8-cb7d-4d59-b5d1-2804ba1a4f94"] +Cell[7889, 216, 557, 19, 100, "Input",ExpressionUUID->"a65de40a-1982-4c6c-a9dd-ebeb9b25be9f"], +Cell[8449, 237, 362, 5, 41, "Output",ExpressionUUID->"f96d861d-91a9-40a0-a2b6-d8dacaa48a01"] }, Open ]], Cell[CellGroupData[{ -Cell[8370, 271, 561, 20, 109, "Input",ExpressionUUID->"834c7559-63d6-4f38-8f88-0b74d1f00b6b"], -Cell[8934, 293, 317, 6, 45, "Output",ExpressionUUID->"4525e55f-b065-42fb-906a-946f4dba3cb7"] +Cell[8848, 247, 557, 19, 100, "Input",ExpressionUUID->"834c7559-63d6-4f38-8f88-0b74d1f00b6b"], +Cell[9408, 268, 359, 5, 41, "Output",ExpressionUUID->"5e7a1805-a006-4690-a174-65062deaebe5"] }, Open ]], Cell[CellGroupData[{ -Cell[9288, 304, 1592, 51, 188, "Input",ExpressionUUID->"88380677-4b53-464b-a364-c25e5bf28cfa"], -Cell[10883, 357, 317, 6, 45, "Output",ExpressionUUID->"7569faee-79b8-43a8-89dd-3d0efc170bd0"] +Cell[9804, 278, 1588, 50, 103, "Input",ExpressionUUID->"88380677-4b53-464b-a364-c25e5bf28cfa"], +Cell[11395, 330, 359, 5, 41, "Output",ExpressionUUID->"15b20ca6-08df-4e89-8eee-80de530690e9"] }, Open ]], Cell[CellGroupData[{ -Cell[11237, 368, 1426, 47, 155, "Input",ExpressionUUID->"1c6bff4f-3585-4780-9239-2d0970069dfe"], -Cell[12666, 417, 334, 7, 45, "Output",ExpressionUUID->"6cd7a847-5d88-4450-a816-1c98309a1a1a"] +Cell[11791, 340, 1422, 46, 73, "Input",ExpressionUUID->"1c6bff4f-3585-4780-9239-2d0970069dfe"], +Cell[13216, 388, 376, 6, 41, "Output",ExpressionUUID->"da94d778-f6cf-4ce3-b20c-19d3acbe5ac9"] }, Open ]], Cell[CellGroupData[{ -Cell[13037, 429, 1426, 47, 155, "Input",ExpressionUUID->"4dc74e11-a432-4902-b777-1c51f8e95def"], -Cell[14466, 478, 341, 7, 45, "Output",ExpressionUUID->"72ed276c-667b-4494-86aa-9b2b6a273373"] +Cell[13629, 399, 1422, 46, 73, "Input",ExpressionUUID->"4dc74e11-a432-4902-b777-1c51f8e95def"], +Cell[15054, 447, 383, 6, 41, "Output",ExpressionUUID->"b26fb990-f85f-4f8f-a4eb-e3d4c3e57c98"] }, Open ]], Cell[CellGroupData[{ -Cell[14844, 490, 1496, 49, 111, "Input",ExpressionUUID->"a3fbbc71-ed31-48aa-81aa-83cb9ac7c2e0"], -Cell[16343, 541, 318, 6, 45, "Output",ExpressionUUID->"57935ae7-c6ce-4573-aa40-9f33f2113804"] +Cell[15474, 458, 1492, 48, 101, "Input",ExpressionUUID->"a3fbbc71-ed31-48aa-81aa-83cb9ac7c2e0"], +Cell[16969, 508, 359, 5, 41, "Output",ExpressionUUID->"b0490063-d132-4635-b7d1-8a5d3600edd2"] }, Open ]], Cell[CellGroupData[{ -Cell[16698, 552, 135, 3, 40, "Input",ExpressionUUID->"2cb5df68-72f8-4aa3-bfed-e59b541fd94a"], -Cell[16836, 557, 302, 6, 45, "Output",ExpressionUUID->"613e1fb5-c5fd-4266-9976-dfacc4c7e258"] +Cell[17365, 518, 131, 2, 36, "Input",ExpressionUUID->"2cb5df68-72f8-4aa3-bfed-e59b541fd94a"], +Cell[17499, 522, 342, 5, 41, "Output",ExpressionUUID->"956e4a9c-08ed-4d6b-bd6c-3ffb557e2ab8"] }, Open ]], Cell[CellGroupData[{ -Cell[17175, 568, 137, 3, 40, "Input",ExpressionUUID->"c39a481b-8f5b-46f1-bf4f-b7b84e7c763c"], -Cell[17315, 573, 303, 6, 45, "Output",ExpressionUUID->"47ff5e5d-50b3-40b1-a3ca-407cb3563f45"] +Cell[17878, 532, 133, 2, 36, "Input",ExpressionUUID->"c39a481b-8f5b-46f1-bf4f-b7b84e7c763c"], +Cell[18014, 536, 343, 5, 41, "Output",ExpressionUUID->"3ca7d572-0f24-4821-a09f-cbe456b173ba"] }, Open ]], Cell[CellGroupData[{ -Cell[17655, 584, 138, 3, 40, "Input",ExpressionUUID->"52a6af0b-2aaf-4da3-8ad0-3cf9cac0c9c7"], -Cell[17796, 589, 304, 6, 45, "Output",ExpressionUUID->"d29d4705-0e39-4e58-9657-394a033522f2"] +Cell[18394, 546, 134, 2, 36, "Input",ExpressionUUID->"52a6af0b-2aaf-4da3-8ad0-3cf9cac0c9c7"], +Cell[18531, 550, 344, 5, 41, "Output",ExpressionUUID->"04e70f22-e308-4f28-9a01-f7a32e4b3951"] }, Open ]], Cell[CellGroupData[{ -Cell[18137, 600, 223, 5, 40, "Input",ExpressionUUID->"274614a8-b2e4-488a-9a51-b3c1320f8cf2"], -Cell[18363, 607, 321, 7, 45, "Output",ExpressionUUID->"5899c6a4-4bbb-474c-adbd-42c47f7a97b3"] +Cell[18912, 560, 219, 4, 36, "Input",ExpressionUUID->"274614a8-b2e4-488a-9a51-b3c1320f8cf2"], +Cell[19134, 566, 359, 6, 41, "Output",ExpressionUUID->"b329c9cb-3ea5-4dd2-b79a-77b698387271"] }, Open ]], Cell[CellGroupData[{ -Cell[18721, 619, 138, 3, 40, "Input",ExpressionUUID->"4c3ccab8-f16a-473a-9477-8f4038d7fcf0"], -Cell[18862, 624, 303, 6, 45, "Output",ExpressionUUID->"2d2025be-d99e-4781-94ac-86c0aacd6b4d"] +Cell[19530, 577, 134, 2, 36, "Input",ExpressionUUID->"4c3ccab8-f16a-473a-9477-8f4038d7fcf0"], +Cell[19667, 581, 342, 5, 41, "Output",ExpressionUUID->"b81b8921-29eb-49c4-a4e1-7b82d84dc7a9"] }, Open ]], Cell[CellGroupData[{ -Cell[19202, 635, 326, 6, 40, "Input",ExpressionUUID->"b139e6f3-21d1-4cfc-86bb-63f330a03334"], -Cell[19531, 643, 303, 6, 45, "Output",ExpressionUUID->"76702380-b2f8-44db-8133-f9eb3e9f6570"] +Cell[20046, 591, 322, 5, 36, "Input",ExpressionUUID->"b139e6f3-21d1-4cfc-86bb-63f330a03334"], +Cell[20371, 598, 343, 5, 41, "Output",ExpressionUUID->"e75384a5-5bc7-4080-93c7-7d08d16f58af"] }, Open ]], Cell[CellGroupData[{ -Cell[19871, 654, 302, 6, 40, "Input",ExpressionUUID->"e1207387-24ac-4dea-843b-d1089efa7762"], -Cell[20176, 662, 302, 6, 45, "Output",ExpressionUUID->"19f73123-c298-4350-8ed8-8c2fec5bbb1c"] +Cell[20751, 608, 298, 5, 36, "Input",ExpressionUUID->"e1207387-24ac-4dea-843b-d1089efa7762"], +Cell[21052, 615, 342, 5, 41, "Output",ExpressionUUID->"af198241-9b01-4d48-8d1b-a2f92e7a9c3e"] }, Open ]], Cell[CellGroupData[{ -Cell[20515, 673, 223, 5, 40, "Input",ExpressionUUID->"d35bc7f8-d637-4879-81b3-93555238ca00"], -Cell[20741, 680, 303, 6, 45, "Output",ExpressionUUID->"77e86005-a4b5-4b64-b60a-17a63c8d5c96"] +Cell[21431, 625, 219, 4, 36, "Input",ExpressionUUID->"d35bc7f8-d637-4879-81b3-93555238ca00"], +Cell[21653, 631, 345, 5, 41, "Output",ExpressionUUID->"ca76ba9b-412a-4bc6-861f-d4d721d7e572"] }, Open ]], Cell[CellGroupData[{ -Cell[21081, 691, 354, 11, 59, "Input",ExpressionUUID->"873e03bc-05ef-4eee-b240-9645488938d1"], -Cell[21438, 704, 320, 6, 45, "Output",ExpressionUUID->"d5233a41-8a26-4392-8654-ad00aa242b61"] +Cell[22035, 641, 350, 10, 54, "Input",ExpressionUUID->"873e03bc-05ef-4eee-b240-9645488938d1"], +Cell[22388, 653, 360, 5, 41, "Output",ExpressionUUID->"14671ecb-8328-440e-b2c2-ad56ca6cdc60"] }, Open ]], Cell[CellGroupData[{ -Cell[21795, 715, 354, 11, 59, "Input",ExpressionUUID->"005f52ce-9a2a-4bce-9747-69a2e1f94c09"], -Cell[22152, 728, 341, 7, 45, "Output",ExpressionUUID->"6abec2a2-b612-4b94-bc11-e1939f456334"] +Cell[22785, 663, 350, 10, 54, "Input",ExpressionUUID->"005f52ce-9a2a-4bce-9747-69a2e1f94c09"], +Cell[23138, 675, 381, 6, 41, "Output",ExpressionUUID->"72be62d0-2769-4d40-a1aa-4eaad45f3ae4"] }, Open ]], Cell[CellGroupData[{ -Cell[22530, 740, 998, 27, 60, "Input",ExpressionUUID->"a0840464-3e6c-4c47-a4dc-923fe4972af5"], -Cell[23531, 769, 321, 6, 45, "Output",ExpressionUUID->"e5a556e2-6106-4fd0-a44d-e56291c234f0"] +Cell[23556, 686, 994, 26, 55, "Input",ExpressionUUID->"a0840464-3e6c-4c47-a4dc-923fe4972af5"], +Cell[24553, 714, 363, 5, 41, "Output",ExpressionUUID->"3a822a3f-510a-4874-8b45-9ce666bd0bb6"] }, Open ]], Cell[CellGroupData[{ -Cell[23889, 780, 203, 4, 40, "Input",ExpressionUUID->"b6441bd4-7a69-43ea-ba92-f5dcf5867d52"], -Cell[24095, 786, 301, 6, 45, "Output",ExpressionUUID->"4ec5757d-8ff3-425c-9386-0f27589df0fd"] +Cell[24953, 724, 199, 3, 36, "Input",ExpressionUUID->"b6441bd4-7a69-43ea-ba92-f5dcf5867d52"], +Cell[25155, 729, 343, 5, 41, "Output",ExpressionUUID->"b42cd87c-e581-43a5-9179-89018e3349ec"] }, Open ]], Cell[CellGroupData[{ -Cell[24433, 797, 333, 6, 40, "Input",ExpressionUUID->"ec59f7e4-521b-4033-9663-877560d36cf4"], -Cell[24769, 805, 276, 5, 45, "Output",ExpressionUUID->"a8767b48-8606-4d48-b47c-275a280f9721"] +Cell[25535, 739, 329, 5, 36, "Input",ExpressionUUID->"ec59f7e4-521b-4033-9663-877560d36cf4"], +Cell[25867, 746, 320, 5, 41, "Output",ExpressionUUID->"f9631a4b-a0de-4ace-ad48-a3a70d817213"] }, Open ]], -Cell[25060, 813, 177, 3, 40, "Input",ExpressionUUID->"be9b1537-8539-405a-9142-2855b44c2bd8"], +Cell[26202, 754, 173, 2, 36, "Input",ExpressionUUID->"be9b1537-8539-405a-9142-2855b44c2bd8"], Cell[CellGroupData[{ -Cell[25262, 820, 331, 6, 40, "Input",ExpressionUUID->"ab141ba7-c516-4594-afd9-d4e4026a803a"], -Cell[25596, 828, 279, 5, 45, "Output",ExpressionUUID->"2a80916f-884a-4e8c-900e-62bb4ca81ee6"] +Cell[26400, 760, 327, 5, 36, "Input",ExpressionUUID->"ab141ba7-c516-4594-afd9-d4e4026a803a"], +Cell[26730, 767, 323, 5, 41, "Output",ExpressionUUID->"f5165c53-c626-47b6-b521-5ee2fe122155"] }, Open ]], -Cell[25890, 836, 177, 3, 40, "Input",ExpressionUUID->"ea7ebe23-0332-41f4-9bf9-9de81a2d1c58"], +Cell[27068, 775, 173, 2, 36, "Input",ExpressionUUID->"ea7ebe23-0332-41f4-9bf9-9de81a2d1c58"], Cell[CellGroupData[{ -Cell[26092, 843, 334, 6, 40, "Input",ExpressionUUID->"d22f9856-b278-4da0-ac80-e4f2aad7e881"], -Cell[26429, 851, 276, 5, 45, "Output",ExpressionUUID->"f3a9b9a5-c57c-4aca-a58a-22760bdb3199"] +Cell[27266, 781, 330, 5, 36, "Input",ExpressionUUID->"d22f9856-b278-4da0-ac80-e4f2aad7e881"], +Cell[27599, 788, 320, 5, 41, "Output",ExpressionUUID->"734b6302-029b-4d35-9a3f-79a06a8464cf"] }, Open ]], -Cell[26720, 859, 177, 3, 40, "Input",ExpressionUUID->"aa7c73c4-7d6d-45c1-b034-aa7300d12b27"], +Cell[27934, 796, 173, 2, 36, "Input",ExpressionUUID->"aa7c73c4-7d6d-45c1-b034-aa7300d12b27"], Cell[CellGroupData[{ -Cell[26922, 866, 358, 6, 40, "Input",ExpressionUUID->"87502099-7a58-4c87-b791-742712d905a8"], -Cell[27283, 874, 278, 5, 45, "Output",ExpressionUUID->"0213b930-a2b7-43d8-aee3-0f480fb55ce1"] +Cell[28132, 802, 354, 5, 36, "Input",ExpressionUUID->"87502099-7a58-4c87-b791-742712d905a8"], +Cell[28489, 809, 326, 5, 41, "Output",ExpressionUUID->"b546c886-84e8-415f-99aa-c0309a8ff4be"] }, Open ]], -Cell[27576, 882, 175, 3, 40, "Input",ExpressionUUID->"3975a569-11c3-49b5-a9f5-12c45d938987"], +Cell[28830, 817, 171, 2, 36, "Input",ExpressionUUID->"3975a569-11c3-49b5-a9f5-12c45d938987"], Cell[CellGroupData[{ -Cell[27776, 889, 307, 6, 40, "Input",ExpressionUUID->"46ff4a35-e8b3-4712-8c95-f04c6b4f1b19"], -Cell[28086, 897, 278, 5, 45, "Output",ExpressionUUID->"e94c18eb-a569-4463-a03a-4df750c8ee16"] +Cell[29026, 823, 303, 5, 36, "Input",ExpressionUUID->"46ff4a35-e8b3-4712-8c95-f04c6b4f1b19"], +Cell[29332, 830, 324, 5, 41, "Output",ExpressionUUID->"f992da28-b150-4c96-a77a-2a6dfe3b1763"] }, Open ]], -Cell[28379, 905, 175, 3, 40, "Input",ExpressionUUID->"d749f7f6-4bc9-4a37-b767-de22f7bfae93"], +Cell[29671, 838, 171, 2, 36, "Input",ExpressionUUID->"d749f7f6-4bc9-4a37-b767-de22f7bfae93"], Cell[CellGroupData[{ -Cell[28579, 912, 309, 6, 40, "Input",ExpressionUUID->"a6a1c89f-f1b6-4d8e-8892-18b23c974523"], -Cell[28891, 920, 279, 5, 45, "Output",ExpressionUUID->"ec577efd-2169-40b1-9d66-34a661b7d634"] +Cell[29867, 844, 305, 5, 36, "Input",ExpressionUUID->"a6a1c89f-f1b6-4d8e-8892-18b23c974523"], +Cell[30175, 851, 323, 5, 41, "Output",ExpressionUUID->"36471249-5de3-471d-81ef-bd67adcb8c99"] }, Open ]], -Cell[29185, 928, 177, 3, 40, "Input",ExpressionUUID->"6ef6c23b-efe1-4381-8dbd-7a685bb93414"], +Cell[30513, 859, 173, 2, 36, "Input",ExpressionUUID->"6ef6c23b-efe1-4381-8dbd-7a685bb93414"], Cell[CellGroupData[{ -Cell[29387, 935, 308, 6, 40, "Input",ExpressionUUID->"2db0b0f3-277c-414a-8b1e-cda1b8115745"], -Cell[29698, 943, 281, 5, 45, "Output",ExpressionUUID->"799d4243-721b-49e0-9ea5-504a37101c70"] +Cell[30711, 865, 304, 5, 36, "Input",ExpressionUUID->"2db0b0f3-277c-414a-8b1e-cda1b8115745"], +Cell[31018, 872, 325, 5, 41, "Output",ExpressionUUID->"b2687684-9c99-4d36-a0a1-4a8dc3b1abd2"] }, Open ]], -Cell[29994, 951, 176, 3, 40, "Input",ExpressionUUID->"a90c1064-83ca-4580-a782-45503b2a3e0a"], +Cell[31358, 880, 172, 2, 36, "Input",ExpressionUUID->"a90c1064-83ca-4580-a782-45503b2a3e0a"], Cell[CellGroupData[{ -Cell[30195, 958, 279, 5, 40, "Input",ExpressionUUID->"b2424bd5-a184-4487-a247-9670211a1381"], -Cell[30477, 965, 276, 5, 45, "Output",ExpressionUUID->"9ea40502-7747-4bdb-b61f-8cbad2d3ceaa"] +Cell[31555, 886, 275, 4, 36, "Input",ExpressionUUID->"b2424bd5-a184-4487-a247-9670211a1381"], +Cell[31833, 892, 322, 5, 41, "Output",ExpressionUUID->"e857e9ec-0cb6-4e6d-9ca3-c336eddeadb1"] }, Open ]], -Cell[30768, 973, 179, 3, 40, "Input",ExpressionUUID->"446a7c7d-45fe-4d75-9981-40be2c500f76"], +Cell[32170, 900, 175, 2, 36, "Input",ExpressionUUID->"446a7c7d-45fe-4d75-9981-40be2c500f76"], Cell[CellGroupData[{ -Cell[30972, 980, 19813, 486, 1845, "Input",ExpressionUUID->"91f7b36e-cafc-45ac-82d9-9cc8f7b4f65a"], -Cell[50788, 1468, 321, 6, 45, "Output",ExpressionUUID->"c5665871-9309-4d8e-a18f-86a7575e2a2a"] +Cell[32370, 906, 19809, 485, 3208, "Input",ExpressionUUID->"91f7b36e-cafc-45ac-82d9-9cc8f7b4f65a"], +Cell[52182, 1393, 361, 5, 41, "Output",ExpressionUUID->"14f4e230-a594-40ec-8df2-1f6868536604"] }, Open ]], Cell[CellGroupData[{ -Cell[51146, 1479, 19752, 490, 1859, "Input",ExpressionUUID->"9e881350-3c46-4116-b9a6-a723c92eb5c9"], -Cell[70901, 1971, 317, 6, 45, "Output",ExpressionUUID->"85f78186-7a84-4db6-bfd8-600689b234d5"] +Cell[52580, 1403, 19748, 489, 3138, "Input",ExpressionUUID->"9e881350-3c46-4116-b9a6-a723c92eb5c9"], +Cell[72331, 1894, 359, 5, 41, "Output",ExpressionUUID->"09d3deb4-6c3d-4532-a484-547c5d294d2e"] }, Open ]], Cell[CellGroupData[{ -Cell[71255, 1982, 19752, 484, 1858, "Input",ExpressionUUID->"ea63455f-1636-45bc-af0e-8bfd0e77196d"], -Cell[91010, 2468, 339, 7, 45, "Output",ExpressionUUID->"6d976a6c-2c71-41e6-b7f8-fa9e8b9c6fe8"] +Cell[72727, 1904, 19748, 483, 1720, "Input",ExpressionUUID->"ea63455f-1636-45bc-af0e-8bfd0e77196d"], +Cell[92478, 2389, 379, 6, 41, "Output",ExpressionUUID->"a50d7ebf-4dbe-47d9-9775-09b4555b3389"] }, Open ]], Cell[CellGroupData[{ -Cell[91386, 2480, 22538, 554, 2037, "Input",ExpressionUUID->"a5c096f4-a6a2-4f3a-b4dc-b7238271be18"], -Cell[113927, 3036, 335, 7, 45, "Output",ExpressionUUID->"1b6c8a71-712a-49ee-a2c8-b3f64ae83497"] +Cell[92894, 2400, 22534, 553, 1885, "Input",ExpressionUUID->"a5c096f4-a6a2-4f3a-b4dc-b7238271be18"], +Cell[115431, 2955, 377, 6, 41, "Output",ExpressionUUID->"6b2f7997-063c-4715-a92a-80950aedb810"] }, Open ]], Cell[CellGroupData[{ -Cell[114299, 3048, 22539, 554, 2037, "Input",ExpressionUUID->"6a3ffacd-73ad-49ff-85c8-adad63d69aee"], -Cell[136841, 3604, 340, 7, 45, "Output",ExpressionUUID->"711a396b-cd50-49c2-bb3a-40d91b0bb040"] +Cell[115845, 2966, 22535, 553, 1885, "Input",ExpressionUUID->"6a3ffacd-73ad-49ff-85c8-adad63d69aee"], +Cell[138383, 3521, 381, 6, 41, "Output",ExpressionUUID->"1c65c269-74b4-4353-bf5f-cb057556ad04"] }, Open ]], Cell[CellGroupData[{ -Cell[137218, 3616, 25495, 627, 2246, "Input",ExpressionUUID->"fb9a1b94-b949-44c2-8fe3-8942caa84fe2"], -Cell[162716, 4245, 334, 7, 45, "Output",ExpressionUUID->"e767b85b-91d1-4341-8d41-a79236dc2721"] +Cell[138801, 3532, 25491, 626, 2078, "Input",ExpressionUUID->"fb9a1b94-b949-44c2-8fe3-8942caa84fe2"], +Cell[164295, 4160, 374, 6, 41, "Output",ExpressionUUID->"b66372e8-15b9-400c-8976-03910ea302a4"] }, Open ]], Cell[CellGroupData[{ -Cell[163087, 4257, 134, 3, 40, "Input",ExpressionUUID->"3350982b-73a4-40cd-8396-2ddf11ec098f"], -Cell[163224, 4262, 301, 6, 45, "Output",ExpressionUUID->"8d7ec022-2571-4e85-8e27-a6948cef4103"] +Cell[164706, 4171, 130, 2, 36, "Input",ExpressionUUID->"3350982b-73a4-40cd-8396-2ddf11ec098f"], +Cell[164839, 4175, 343, 5, 41, "Output",ExpressionUUID->"f6f4f57d-36df-46d7-bea7-3a6fe0073748"] }, Open ]], Cell[CellGroupData[{ -Cell[163562, 4273, 134, 3, 40, "Input",ExpressionUUID->"7642c3e9-30be-455c-b967-c675f84df14c"], -Cell[163699, 4278, 301, 6, 45, "Output",ExpressionUUID->"4e3a5cd9-2b9d-48d7-8bc1-5d6df7953bc0"] +Cell[165219, 4185, 130, 2, 36, "Input",ExpressionUUID->"7642c3e9-30be-455c-b967-c675f84df14c"], +Cell[165352, 4189, 341, 5, 41, "Output",ExpressionUUID->"0a99dac7-40c6-4a68-8cc1-29bc381524f1"] }, Open ]], Cell[CellGroupData[{ -Cell[164037, 4289, 1148, 40, 78, "Input",ExpressionUUID->"ce01ebdc-52ef-45e2-8b39-b931f30e5522"], -Cell[165188, 4331, 320, 6, 45, "Output",ExpressionUUID->"6efaafab-1ee0-45ad-9a36-2517866d4697"] +Cell[165730, 4199, 1144, 39, 73, "Input",ExpressionUUID->"ce01ebdc-52ef-45e2-8b39-b931f30e5522"], +Cell[166877, 4240, 360, 5, 41, "Output",ExpressionUUID->"3cf9d76f-cfb6-4ad5-8570-f1bd54a3f089"] }, Open ]], Cell[CellGroupData[{ -Cell[165545, 4342, 1045, 36, 78, "Input",ExpressionUUID->"0e1ac804-4cda-4439-83db-a1177dffaf72"], -Cell[166593, 4380, 334, 7, 45, "Output",ExpressionUUID->"7a25a679-eff9-432d-8d58-d7de1c50e057"] +Cell[167274, 4250, 1041, 35, 73, "Input",ExpressionUUID->"0e1ac804-4cda-4439-83db-a1177dffaf72"], +Cell[168318, 4287, 374, 6, 41, "Output",ExpressionUUID->"87335a7a-f473-4f12-badf-dcdb430eeebc"] }, Open ]], Cell[CellGroupData[{ -Cell[166964, 4392, 1148, 40, 78, "Input",ExpressionUUID->"24896788-36d8-4a4e-9682-579df2322bb9"], -Cell[168115, 4434, 319, 6, 45, "Output",ExpressionUUID->"e7feeb19-25af-4e81-8c4b-70239431e215"] +Cell[168729, 4298, 1144, 39, 73, "Input",ExpressionUUID->"24896788-36d8-4a4e-9682-579df2322bb9"], +Cell[169876, 4339, 359, 5, 41, "Output",ExpressionUUID->"b52b86f0-b089-4571-8eac-f2554315e9c2"] }, Open ]], Cell[CellGroupData[{ -Cell[168471, 4445, 112, 2, 40, "Input",ExpressionUUID->"1b5c9d0c-19c8-4c2b-9989-7dedd166bdcb"], -Cell[168586, 4449, 318, 6, 45, "Output",ExpressionUUID->"0cbf36d9-74aa-46fd-a674-2b3fe840be7c"] +Cell[170272, 4349, 108, 1, 36, "Input",ExpressionUUID->"1b5c9d0c-19c8-4c2b-9989-7dedd166bdcb"], +Cell[170383, 4352, 358, 5, 41, "Output",ExpressionUUID->"cdff87b2-09f8-4204-a951-5883f2adfbae"] }, Open ]], Cell[CellGroupData[{ -Cell[168941, 4460, 112, 2, 40, "Input",ExpressionUUID->"c3446fed-5381-4526-b84d-b5424ef3f6ef"], -Cell[169056, 4464, 312, 6, 45, "Output",ExpressionUUID->"db83aecb-9123-40bd-bbaa-e4f7cf62ddfc"] +Cell[170778, 4362, 108, 1, 36, "Input",ExpressionUUID->"c3446fed-5381-4526-b84d-b5424ef3f6ef"], +Cell[170889, 4365, 356, 6, 41, "Output",ExpressionUUID->"dd3a7ff6-a6b8-4570-858a-5fa863d893a4"] }, Open ]], Cell[CellGroupData[{ -Cell[169405, 4475, 112, 2, 40, "Input",ExpressionUUID->"526f1696-b258-400b-8a96-60fbae37852f"], -Cell[169520, 4479, 306, 6, 45, "Output",ExpressionUUID->"34fdcb2f-8e5b-4996-814b-db0b8cdec9b3"] +Cell[171282, 4376, 108, 1, 36, "Input",ExpressionUUID->"526f1696-b258-400b-8a96-60fbae37852f"], +Cell[171393, 4379, 350, 6, 41, "Output",ExpressionUUID->"2e92b75d-f7bd-4145-8268-59fca0a0e62b"] }, Open ]], Cell[CellGroupData[{ -Cell[169863, 4490, 112, 2, 40, "Input",ExpressionUUID->"98b96cd6-5d4c-4e52-b363-b3dff8ee271e"], -Cell[169978, 4494, 289, 5, 45, "Output",ExpressionUUID->"86a7d301-7f0d-4076-bbf9-81ed2f2bb91f"] +Cell[171780, 4390, 108, 1, 36, "Input",ExpressionUUID->"98b96cd6-5d4c-4e52-b363-b3dff8ee271e"], +Cell[171891, 4393, 333, 5, 41, "Output",ExpressionUUID->"ed5d2aca-c98f-47db-9b48-081b88133d18"] }, Open ]], Cell[CellGroupData[{ -Cell[170304, 4504, 111, 2, 40, "Input",ExpressionUUID->"194b3329-8bba-47df-bf16-20b5c2eeb717"], -Cell[170418, 4508, 291, 5, 45, "Output",ExpressionUUID->"b0cb48ea-77f9-4017-aaf8-d6521d884554"] +Cell[172261, 4403, 107, 1, 36, "Input",ExpressionUUID->"194b3329-8bba-47df-bf16-20b5c2eeb717"], +Cell[172371, 4406, 335, 5, 41, "Output",ExpressionUUID->"6ae4d682-377f-45dd-9a7d-a6fdd5f947c4"] }, Open ]], Cell[CellGroupData[{ -Cell[170746, 4518, 111, 2, 40, "Input",ExpressionUUID->"6f9c1217-09e6-44aa-9c38-6c85a894cd3c"], -Cell[170860, 4522, 296, 5, 45, "Output",ExpressionUUID->"acee040a-3dc3-4aa6-a5b1-f868fbb1889d"] +Cell[172743, 4416, 107, 1, 36, "Input",ExpressionUUID->"6f9c1217-09e6-44aa-9c38-6c85a894cd3c"], +Cell[172853, 4419, 344, 5, 41, "Output",ExpressionUUID->"b56603b1-e3ee-4e6f-8f78-f2c60d36f589"] }, Open ]], Cell[CellGroupData[{ -Cell[171193, 4532, 501, 17, 77, "Input",ExpressionUUID->"46851f4d-166d-41a3-9017-4031733d9226"], -Cell[171697, 4551, 307, 6, 45, "Output",ExpressionUUID->"c6969745-bdfa-4dfc-9e80-1731f8fa155e"] +Cell[173234, 4429, 497, 16, 71, "Input",ExpressionUUID->"46851f4d-166d-41a3-9017-4031733d9226"], +Cell[173734, 4447, 351, 6, 41, "Output",ExpressionUUID->"615cbc97-2224-4d6c-8865-83112f8fcb5a"] }, Open ]], Cell[CellGroupData[{ -Cell[172041, 4562, 501, 17, 77, "Input",ExpressionUUID->"ac442096-0fa2-4641-a8ed-927c3361bbfa"], -Cell[172545, 4581, 310, 6, 45, "Output",ExpressionUUID->"ef0cf1ff-4b5a-49b2-a8c7-67c67860b919"] +Cell[174122, 4458, 497, 16, 71, "Input",ExpressionUUID->"ac442096-0fa2-4641-a8ed-927c3361bbfa"], +Cell[174622, 4476, 354, 6, 41, "Output",ExpressionUUID->"8fdc3ee9-a56b-42d3-afa8-e35ac7beff0f"] }, Open ]], Cell[CellGroupData[{ -Cell[172892, 4592, 1792, 61, 186, "Input",ExpressionUUID->"70ef65cb-3261-4e79-9029-7f3d0227f633"], -Cell[174687, 4655, 291, 5, 45, "Output",ExpressionUUID->"bddd9dad-d485-4198-a1a8-bf5bfd233e9c"] +Cell[175013, 4487, 1788, 60, 142, "Input",ExpressionUUID->"70ef65cb-3261-4e79-9029-7f3d0227f633"], +Cell[176804, 4549, 335, 5, 41, "Output",ExpressionUUID->"2b98fa79-874d-4e4e-8f69-345078d4368b"] }, Open ]], Cell[CellGroupData[{ -Cell[175015, 4665, 1105, 37, 78, "Input",ExpressionUUID->"cb7cabb1-db00-484c-830a-2f5bbbc309a2"], -Cell[176123, 4704, 312, 6, 45, "Output",ExpressionUUID->"4d4e46fb-e3d6-44e4-808a-e048716bae12"] +Cell[177176, 4559, 1101, 36, 73, "Input",ExpressionUUID->"cb7cabb1-db00-484c-830a-2f5bbbc309a2"], +Cell[178280, 4597, 358, 6, 41, "Output",ExpressionUUID->"bd1c0d3c-baba-448c-afb7-4eabc76fc710"] }, Open ]], Cell[CellGroupData[{ -Cell[176472, 4715, 1822, 62, 340, "Input",ExpressionUUID->"60088de3-8c8f-45d8-ac7f-fe41010b2e24"], -Cell[178297, 4779, 292, 5, 41, "Output",ExpressionUUID->"c6bbc6d1-64be-4f79-81a8-b6651d883b62"] +Cell[178675, 4608, 1818, 61, 144, "Input",ExpressionUUID->"60088de3-8c8f-45d8-ac7f-fe41010b2e24"], +Cell[180496, 4671, 338, 5, 41, "Output",ExpressionUUID->"29cc2f36-c234-4769-ad84-b15aa66a9982"] }, Open ]], Cell[CellGroupData[{ -Cell[178626, 4789, 1635, 54, 208, "Input",ExpressionUUID->"fff42478-bb85-4588-a8a8-883adf3fa8f0"], -Cell[180264, 4845, 291, 5, 41, "Output",ExpressionUUID->"ab7efd9e-d235-44db-9309-ad5471bb6168"] +Cell[180871, 4681, 1631, 53, 101, "Input",ExpressionUUID->"fff42478-bb85-4588-a8a8-883adf3fa8f0"], +Cell[182505, 4736, 333, 5, 41, "Output",ExpressionUUID->"306be521-c5f3-4e92-bbbd-d61bb0312e91"] }, Open ]], Cell[CellGroupData[{ -Cell[180592, 4855, 1635, 54, 208, "Input",ExpressionUUID->"f40a19a2-1985-4e93-bc21-69807cb4221e"], -Cell[182230, 4911, 289, 5, 41, "Output",ExpressionUUID->"6c81ad2c-cdd1-4e08-8c1d-75735da4a19e"] +Cell[182875, 4746, 1631, 53, 101, "Input",ExpressionUUID->"f40a19a2-1985-4e93-bc21-69807cb4221e"], +Cell[184509, 4801, 335, 5, 41, "Output",ExpressionUUID->"42dac667-11c9-439d-912f-234f11377daf"] }, Open ]], -Cell[182534, 4919, 250, 5, 56, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], -Cell[182787, 4926, 253, 5, 56, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], Cell[CellGroupData[{ -Cell[183065, 4935, 1301, 43, 174, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[184369, 4980, 178, 3, 41, "Output",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[184881, 4811, 271, 5, 56, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], +Cell[185155, 4818, 187, 2, 41, "Output",ExpressionUUID->"774a441b-4cb6-4902-b1f1-36311ea1d4a5"] }, Open ]], Cell[CellGroupData[{ -Cell[184584, 4988, 910, 31, 128, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[185497, 5021, 175, 3, 41, "Output",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[185379, 4825, 274, 5, 56, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], +Cell[185656, 4832, 183, 2, 41, "Output",ExpressionUUID->"594ac68e-aaaf-4b6d-be9e-62f81e6d054b"] }, Open ]], Cell[CellGroupData[{ -Cell[185709, 5029, 885, 30, 128, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[186597, 5061, 177, 3, 41, "Output",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[185876, 4839, 1297, 42, 61, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], +Cell[187176, 4883, 222, 3, 41, "Output",ExpressionUUID->"14dfb06d-7eae-4217-93fe-e685a79a4996"] }, Open ]], Cell[CellGroupData[{ -Cell[186811, 5069, 558, 19, 66, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[187372, 5090, 173, 3, 41, "Output",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[187435, 4891, 929, 30, 73, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], +Cell[188367, 4923, 217, 3, 41, "Output",ExpressionUUID->"6e46de52-c2b7-4255-8690-ad6fab4bc30d"] }, Open ]], Cell[CellGroupData[{ -Cell[187582, 5098, 623, 21, 66, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[188208, 5121, 170, 3, 41, "Output",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[188621, 4931, 904, 29, 73, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], +Cell[189528, 4962, 221, 3, 41, "Output",ExpressionUUID->"633e8a61-b26d-4359-8380-47c12ba18fde"] }, Open ]], Cell[CellGroupData[{ -Cell[188415, 5129, 170, 5, 71, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[188588, 5136, 173, 3, 41, "Output",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[189786, 4970, 554, 18, 66, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], +Cell[190343, 4990, 213, 3, 41, "Output",ExpressionUUID->"17653f7d-9e31-4df4-b17d-c3e324304a5f"] }, Open ]], Cell[CellGroupData[{ -Cell[188798, 5144, 170, 5, 69, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[188971, 5151, 170, 3, 41, "Output",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[190593, 4998, 619, 20, 66, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], +Cell[191215, 5020, 213, 3, 41, "Output",ExpressionUUID->"612ebea9-efaa-4580-9758-76bf457b7b30"] }, Open ]], Cell[CellGroupData[{ -Cell[189178, 5159, 181, 5, 55, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[189362, 5166, 171, 3, 41, "Output",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[191465, 5028, 166, 4, 71, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], +Cell[191634, 5034, 216, 3, 41, "Output",ExpressionUUID->"07460f76-7630-43d0-9d6e-aa190d53c8e0"] }, Open ]], Cell[CellGroupData[{ -Cell[189570, 5174, 181, 5, 55, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[189754, 5181, 173, 3, 41, "Output",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[191887, 5042, 166, 4, 69, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], +Cell[192056, 5048, 214, 3, 41, "Output",ExpressionUUID->"b2be6805-ca90-42e8-b725-835ef4d21210"] }, Open ]], Cell[CellGroupData[{ -Cell[189964, 5189, 6055, 185, 831, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[196022, 5376, 175, 3, 41, "Output",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[192307, 5056, 177, 4, 55, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], +Cell[192487, 5062, 216, 3, 41, "Output",ExpressionUUID->"f0807ba0-8c51-475b-93bb-d39b98cf9c38"] }, Open ]], Cell[CellGroupData[{ -Cell[196234, 5384, 368, 9, 53, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[196605, 5395, 170, 3, 41, "Output",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[192740, 5070, 177, 4, 55, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], +Cell[192920, 5076, 216, 3, 41, "Output",ExpressionUUID->"92a5fbce-7994-4908-9371-a63cf5c3e74e"] }, Open ]], Cell[CellGroupData[{ -Cell[196812, 5403, 6122, 187, 900, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[202937, 5592, 175, 3, 41, "Output",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[193173, 5084, 6051, 184, 431, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], +Cell[199227, 5270, 220, 3, 41, "Output",ExpressionUUID->"ced5afc4-9e1f-4840-86a6-c8fe1d6f90be"] }, Open ]], Cell[CellGroupData[{ -Cell[203149, 5600, 368, 9, 53, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[203520, 5611, 172, 3, 41, "Output",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[199484, 5278, 364, 8, 53, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], +Cell[199851, 5288, 213, 3, 41, "Output",ExpressionUUID->"ca7aa68d-77a3-44df-8752-14fb1ebf36b5"] }, Open ]], Cell[CellGroupData[{ -Cell[203729, 5619, 2663, 88, 435, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[206395, 5709, 173, 3, 41, "Output",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[200101, 5296, 6118, 186, 431, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], +Cell[206222, 5484, 221, 3, 41, "Output",ExpressionUUID->"7289296a-ea6f-4006-a69c-c9eccfb5c040"] }, Open ]], Cell[CellGroupData[{ -Cell[206605, 5717, 2603, 85, 435, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[209211, 5804, 172, 3, 41, "Output",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[206480, 5492, 364, 8, 53, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], +Cell[206847, 5502, 215, 3, 41, "Output",ExpressionUUID->"c758fd62-e85c-40d1-9b91-b39c27c9038d"] }, Open ]], Cell[CellGroupData[{ -Cell[209420, 5812, 3712, 118, 575, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[213135, 5932, 174, 3, 41, "Output",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[207099, 5510, 2659, 87, 215, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], +Cell[209761, 5599, 217, 3, 41, "Output",ExpressionUUID->"0eb6cd3c-9f65-467a-ab9e-cb0514dd1a3f"] }, Open ]], -Cell[213324, 5938, 138, 3, 36, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ -Cell[213487, 5945, 2052, 59, 276, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], -Cell[215542, 6006, 524, 11, 91, "Message",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], -Cell[216069, 6019, 526, 11, 91, "Message",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], -Cell[216598, 6032, 530, 11, 91, "Message",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], -Cell[217131, 6045, 455, 10, 26, "Message",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], -Cell[217589, 6057, 172, 3, 41, "Output",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[210015, 5607, 2599, 84, 215, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], +Cell[212617, 5693, 216, 3, 41, "Output",ExpressionUUID->"974532a5-6d7a-4fb3-a42e-2b2a26d2e89e"] }, Open ]], Cell[CellGroupData[{ -Cell[217798, 6065, 2054, 59, 276, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], -Cell[219855, 6126, 524, 11, 91, "Message",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], -Cell[220382, 6139, 526, 11, 91, "Message",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], -Cell[220911, 6152, 528, 11, 91, "Message",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], -Cell[221442, 6165, 456, 10, 26, "Message",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], -Cell[221901, 6177, 170, 3, 41, "Output",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[212870, 5701, 3708, 117, 316, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], +Cell[216581, 5820, 217, 3, 41, "Output",ExpressionUUID->"712356a3-3789-4650-a47c-fe85d51266a4"] }, Open ]], +Cell[216813, 5826, 160, 3, 109, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ -Cell[222108, 6185, 1938, 53, 232, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], -Cell[224049, 6240, 19994, 375, 285, "Output",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] +Cell[216998, 5833, 2071, 58, 276, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], +Cell[219072, 5893, 624, 14, 71, "Message",ExpressionUUID->"6eb99916-2151-46f0-9305-7263dc1c5b52"], +Cell[219699, 5909, 628, 14, 71, "Message",ExpressionUUID->"7325fb8c-586d-4bae-81fb-566f07d94ffa"], +Cell[220330, 5925, 632, 14, 71, "Message",ExpressionUUID->"50e4e789-5e8d-4ede-80da-76f94afb792f"], +Cell[220965, 5941, 512, 12, 32, "Message",ExpressionUUID->"8a473adf-926b-43b3-b86f-b54c9878d63b"], +Cell[221480, 5955, 217, 3, 41, "Output",ExpressionUUID->"af434797-3c4a-40a9-b3ef-ebe2ec3aa4a2"] }, Open ]], Cell[CellGroupData[{ -Cell[244080, 6620, 2092, 60, 311, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], -Cell[246175, 6682, 490, 11, 71, "Message",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], -Cell[246668, 6695, 493, 11, 71, "Message",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], -Cell[247164, 6708, 508, 11, 54, "Message",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], -Cell[247675, 6721, 456, 10, 26, "Message",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], -Cell[248134, 6733, 61603, 1057, 290, "Output",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] +Cell[221734, 5963, 2073, 58, 276, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], +Cell[223810, 6023, 684, 15, 73, "Message",ExpressionUUID->"ec125bcd-4bbf-4878-8334-3ac563c23de1"], +Cell[224497, 6040, 685, 15, 73, "Message",ExpressionUUID->"fd088197-7e20-4c78-b243-e2a13c86c46b"], +Cell[225185, 6057, 683, 15, 73, "Message",ExpressionUUID->"5038b892-6f60-44af-931f-023485690f9f"], +Cell[225871, 6074, 510, 12, 32, "Message",ExpressionUUID->"843553fa-41e7-477d-8ccd-a0096b9b87bd"], +Cell[226384, 6088, 213, 3, 41, "Output",ExpressionUUID->"c0bceabf-bb28-427d-92b3-678251b7d44c"] }, Open ]], -Cell[309752, 7793, 2522, 71, 316, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], -Cell[312277, 7866, 209, 5, 36, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], Cell[CellGroupData[{ -Cell[312511, 7875, 217, 7, 61, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[312731, 7884, 169, 3, 41, "Output",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[226634, 6096, 2049, 54, 232, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], +Cell[228686, 6152, 20418, 384, 295, "Output",ExpressionUUID->"621a97ca-0607-4a55-a601-b3a09f8aeb65"] }, Open ]], Cell[CellGroupData[{ -Cell[312937, 7892, 1816, 53, 311, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], -Cell[314756, 7947, 502, 11, 71, "Message",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], -Cell[315261, 7960, 506, 11, 71, "Message",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], -Cell[315770, 7973, 509, 11, 71, "Message",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], -Cell[316282, 7986, 456, 10, 26, "Message",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], -Cell[316741, 7998, 28560, 514, 290, "Output",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] +Cell[249141, 6541, 2111, 59, 311, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], +Cell[251255, 6602, 554, 13, 71, "Message",ExpressionUUID->"326d7f47-a70f-4da1-9700-8c05054f31b3"], +Cell[251812, 6617, 560, 13, 71, "Message",ExpressionUUID->"d04d5c4c-59c6-455b-b314-a8871dcaa1b2"], +Cell[252375, 6632, 560, 13, 71, "Message",ExpressionUUID->"5fa2ac3f-6403-4dfd-870d-5e9dd1e2668d"], +Cell[252938, 6647, 508, 12, 32, "Message",ExpressionUUID->"32088fa8-3622-40ce-8df4-ed243abeb281"], +Cell[253449, 6661, 28652, 516, 290, "Output",ExpressionUUID->"d6e6b039-a9ff-4683-8d55-7fc6605cc1ec"] }, Open ]], Cell[CellGroupData[{ -Cell[345338, 8517, 1616, 48, 132, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], -Cell[346957, 8567, 576, 12, 91, "Message",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], -Cell[347536, 8581, 582, 12, 91, "Message",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], -Cell[348121, 8595, 584, 12, 111, "Message",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], -Cell[348708, 8609, 458, 10, 109, "Message",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], -Cell[349169, 8621, 170, 3, 109, "Output",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[282138, 7182, 2543, 71, 316, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], +Cell[284684, 7255, 9516, 222, 298, "Output",ExpressionUUID->"7d051b89-8634-4704-8b24-0201f4c77527"] }, Open ]], Cell[CellGroupData[{ -Cell[349376, 8629, 2247, 64, 109, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], -Cell[351626, 8695, 522, 11, 91, "Message",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], -Cell[352151, 8708, 526, 11, 91, "Message",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], -Cell[352680, 8721, 528, 11, 91, "Message",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], -Cell[353211, 8734, 458, 10, 26, "Message",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], -Cell[353672, 8746, 175, 3, 41, "Output",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[294237, 7482, 228, 4, 36, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], +Cell[294468, 7488, 35010, 647, 290, "Output",ExpressionUUID->"4f8ee40d-17c3-485c-a575-c069de332abf"] }, Open ]], Cell[CellGroupData[{ -Cell[353884, 8754, 2221, 64, 348, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], -Cell[356108, 8820, 522, 11, 91, "Message",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], -Cell[356633, 8833, 524, 11, 91, "Message",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], -Cell[357160, 8846, 528, 11, 91, "Message",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], -Cell[357691, 8859, 458, 10, 26, "Message",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], -Cell[358152, 8871, 170, 3, 41, "Output",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] +Cell[329515, 8140, 236, 6, 61, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], +Cell[329754, 8148, 213, 3, 41, "Output",ExpressionUUID->"96844b65-5272-4538-a6e4-227dca0b717c"] }, Open ]], Cell[CellGroupData[{ -Cell[358359, 8879, 2221, 64, 348, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], -Cell[360583, 8945, 524, 11, 91, "Message",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], -Cell[361110, 8958, 526, 11, 91, "Message",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], -Cell[361639, 8971, 530, 11, 91, "Message",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], -Cell[362172, 8984, 458, 10, 26, "Message",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], -Cell[362633, 8996, 171, 3, 41, "Output",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] +Cell[330004, 8156, 1835, 52, 311, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], +Cell[331842, 8210, 560, 13, 71, "Message",ExpressionUUID->"611564a3-2462-40e2-99ed-7904e5903f74"], +Cell[332405, 8225, 564, 13, 71, "Message",ExpressionUUID->"ba8999a5-6ee4-4940-ab41-c2bbe2a7b055"], +Cell[332972, 8240, 567, 13, 71, "Message",ExpressionUUID->"dea878ae-78c4-4fad-822d-9f150de67299"], +Cell[333542, 8255, 508, 12, 32, "Message",ExpressionUUID->"1651067b-03fe-4862-a0ff-11a14e0407d1"], +Cell[334053, 8269, 29643, 533, 290, "Output",ExpressionUUID->"9a98d2b2-82c6-48e3-8528-5d2dd4afbc4c"] }, Open ]], Cell[CellGroupData[{ -Cell[362841, 9004, 215, 6, 60, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], -Cell[363059, 9012, 175, 3, 41, "Output",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] +Cell[363733, 8807, 1612, 47, 132, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], +Cell[365348, 8856, 655, 14, 73, "Message",ExpressionUUID->"dd8a890d-e86f-479d-9179-6acf789d1fc8"], +Cell[366006, 8872, 657, 14, 73, "Message",ExpressionUUID->"f213bceb-68e0-4eb6-8b6c-dc94db1e09ec"], +Cell[366666, 8888, 658, 14, 73, "Message",ExpressionUUID->"cf085241-c04f-4d23-970b-bbde1e819891"], +Cell[367327, 8904, 484, 11, 32, "Message",ExpressionUUID->"eed12f42-ce12-4947-8c09-f4145eb5d634"], +Cell[367814, 8917, 190, 2, 41, "Output",ExpressionUUID->"4f053d4e-d7b3-486c-aab1-4f4d73c70452"] }, Open ]], -Cell[363249, 9018, 245, 5, 36, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ -Cell[363519, 9027, 623, 20, 66, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[364145, 9049, 172, 3, 41, "Output",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] +Cell[368041, 8924, 2266, 63, 348, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], +Cell[370310, 8989, 656, 14, 73, "Message",ExpressionUUID->"a62e9def-598e-4b2a-ad9f-b4de7338be2a"], +Cell[370969, 9005, 657, 14, 73, "Message",ExpressionUUID->"5eee7922-e6f7-4188-a85c-9726e4bdd669"], +Cell[371629, 9021, 657, 14, 73, "Message",ExpressionUUID->"acce4cab-7749-448b-8c55-19bfd80fa811"], +Cell[372289, 9037, 486, 11, 32, "Message",ExpressionUUID->"d570fb6b-a169-4beb-abc3-043a589a0d73"], +Cell[372778, 9050, 191, 2, 41, "Output",ExpressionUUID->"a8a2616a-a34d-4f74-9cca-a4cf085b567d"] }, Open ]], Cell[CellGroupData[{ -Cell[364354, 9057, 170, 5, 71, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[364527, 9064, 172, 3, 41, "Output",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] +Cell[373006, 9057, 2233, 63, 348, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], +Cell[375242, 9122, 658, 14, 73, "Message",ExpressionUUID->"528ae6a7-390e-48ea-ae1b-5c02fc18615b"], +Cell[375903, 9138, 659, 14, 73, "Message",ExpressionUUID->"a7271803-d807-415d-95ea-026b05989b9d"], +Cell[376565, 9154, 659, 14, 73, "Message",ExpressionUUID->"d2379717-8e99-4683-b540-10752fed8e15"], +Cell[377227, 9170, 486, 11, 32, "Message",ExpressionUUID->"39d7916e-8715-46bf-a690-a2cca810bb9f"], +Cell[377716, 9183, 193, 3, 41, "Output",ExpressionUUID->"f4dcb8dc-d26e-4a1d-811e-aa6d613ae386"] }, Open ]], Cell[CellGroupData[{ -Cell[364736, 9072, 181, 5, 55, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[364920, 9079, 172, 3, 41, "Output",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] +Cell[377946, 9191, 2233, 63, 348, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], +Cell[380182, 9256, 660, 14, 73, "Message",ExpressionUUID->"5f31fecc-098d-4b50-95b6-80c7c95e5866"], +Cell[380845, 9272, 661, 14, 73, "Message",ExpressionUUID->"074225e6-7018-44b1-8dff-47cd485369ae"], +Cell[381509, 9288, 663, 14, 73, "Message",ExpressionUUID->"9126b1f1-4f35-4afa-bc71-0a65b6101f77"], +Cell[382175, 9304, 490, 11, 32, "Message",ExpressionUUID->"c3baf05b-bd9d-4e72-8160-3beca06c18e7"], +Cell[382668, 9317, 194, 3, 41, "Output",ExpressionUUID->"b9011d0e-40e5-4108-8f59-8b3212a9edce"] }, Open ]], Cell[CellGroupData[{ -Cell[365129, 9087, 6055, 185, 831, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[371187, 9274, 174, 3, 41, "Output",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] +Cell[382899, 9325, 238, 6, 60, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], +Cell[383140, 9333, 194, 3, 41, "Output",ExpressionUUID->"a42fa2f6-eaa1-4c00-ae46-3d4d70ce99cf"] }, Open ]], +Cell[383349, 9339, 271, 6, 109, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ -Cell[371398, 9282, 368, 9, 53, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[371769, 9293, 173, 3, 41, "Output",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] +Cell[383645, 9349, 623, 20, 66, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], +Cell[384271, 9371, 194, 3, 41, "Output",ExpressionUUID->"ac3b9261-c10f-4a9e-926d-ab77d3c7e5b0"] }, Open ]], Cell[CellGroupData[{ -Cell[371979, 9301, 6122, 187, 900, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[378104, 9490, 175, 3, 41, "Output",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] +Cell[384502, 9379, 170, 5, 71, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], +Cell[384675, 9386, 195, 3, 41, "Output",ExpressionUUID->"58b30edd-39f3-4e32-a4a0-60e06012aeeb"] }, Open ]], Cell[CellGroupData[{ -Cell[378316, 9498, 368, 9, 53, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[378687, 9509, 170, 3, 41, "Output",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] +Cell[384907, 9394, 181, 5, 55, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], +Cell[385091, 9401, 197, 3, 41, "Output",ExpressionUUID->"f3c92e30-3a33-4aef-9b27-97b34d03ea1e"] }, Open ]], Cell[CellGroupData[{ -Cell[378894, 9517, 2663, 88, 435, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[381560, 9607, 173, 3, 41, "Output",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] +Cell[385325, 9409, 6055, 185, 831, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], +Cell[391383, 9596, 197, 3, 41, "Output",ExpressionUUID->"66a80af6-186a-4103-8a1f-f0a186962592"] }, Open ]], Cell[CellGroupData[{ -Cell[381770, 9615, 2603, 85, 435, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[384376, 9702, 172, 3, 41, "Output",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] +Cell[391617, 9604, 368, 9, 53, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], +Cell[391988, 9615, 194, 3, 41, "Output",ExpressionUUID->"c7b936a2-f8b4-4b0e-b9e0-96dc4314ead7"] }, Open ]], Cell[CellGroupData[{ -Cell[384585, 9710, 3712, 118, 575, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[388300, 9830, 174, 3, 41, "Output",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] +Cell[392219, 9623, 6122, 187, 900, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], +Cell[398344, 9812, 198, 3, 41, "Output",ExpressionUUID->"51d5e38f-d2e0-48ae-b163-2dec2e762a8f"] }, Open ]], Cell[CellGroupData[{ -Cell[388511, 9838, 2052, 59, 276, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], -Cell[390566, 9899, 574, 12, 91, "Message",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], -Cell[391143, 9913, 580, 12, 91, "Message",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], -Cell[391726, 9927, 582, 12, 91, "Message",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], -Cell[392311, 9941, 456, 10, 26, "Message",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], -Cell[392770, 9953, 171, 3, 41, "Output",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] +Cell[398579, 9820, 368, 9, 53, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], +Cell[398950, 9831, 192, 3, 41, "Output",ExpressionUUID->"dfb550f6-1d4c-40fe-9614-aa0db7c04b1c"] }, Open ]], Cell[CellGroupData[{ -Cell[392978, 9961, 2054, 59, 276, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], -Cell[395035, 10022, 574, 12, 91, "Message",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], -Cell[395612, 10036, 578, 12, 91, "Message",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], -Cell[396193, 10050, 582, 12, 91, "Message",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], -Cell[396778, 10064, 458, 10, 26, "Message",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], -Cell[397239, 10076, 169, 3, 41, "Output",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] +Cell[399179, 9839, 2663, 88, 435, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], +Cell[401845, 9929, 198, 3, 41, "Output",ExpressionUUID->"332ad3bc-d2b9-4766-8d72-e22e9b97a579"] }, Open ]], Cell[CellGroupData[{ -Cell[397445, 10084, 2030, 55, 232, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], -Cell[399478, 10141, 20326, 381, 299, "Output",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] +Cell[402080, 9937, 2603, 85, 435, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], +Cell[404686, 10024, 193, 3, 41, "Output",ExpressionUUID->"02d07624-4bb0-42e6-b50d-1f0e23be9ccb"] }, Open ]], -Cell[419819, 10525, 2144, 61, 311, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], -Cell[421966, 10588, 138, 3, 36, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], Cell[CellGroupData[{ -Cell[422129, 10595, 1616, 48, 132, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], -Cell[423748, 10645, 592, 12, 111, "Message",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], -Cell[424343, 10659, 597, 12, 111, "Message",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], -Cell[424943, 10673, 599, 12, 111, "Message",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], -Cell[425545, 10687, 458, 10, 26, "Message",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], -Cell[426006, 10699, 172, 3, 41, "Output",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] +Cell[404916, 10032, 3712, 118, 575, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], +Cell[408631, 10152, 196, 3, 41, "Output",ExpressionUUID->"6bdaa1b9-7751-494b-8f46-946dd9fe95c5"] }, Open ]], Cell[CellGroupData[{ -Cell[426215, 10707, 2249, 64, 348, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], -Cell[428467, 10773, 576, 12, 91, "Message",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], -Cell[429046, 10787, 580, 12, 91, "Message",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], -Cell[429629, 10801, 582, 12, 91, "Message",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], -Cell[430214, 10815, 456, 10, 26, "Message",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], -Cell[430673, 10827, 171, 3, 41, "Output",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] +Cell[408864, 10160, 2075, 59, 276, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], +Cell[410942, 10221, 660, 14, 73, "Message",ExpressionUUID->"caf427b5-6ec0-4c7f-a0ab-a53004449f4a"], +Cell[411605, 10237, 660, 14, 73, "Message",ExpressionUUID->"b1aceed4-23d7-4afb-902b-d26a81de4f6b"], +Cell[412268, 10253, 659, 14, 73, "Message",ExpressionUUID->"4501fbe3-a5df-4e2a-803e-4e8a1c75b610"], +Cell[412930, 10269, 486, 11, 32, "Message",ExpressionUUID->"58676caf-d25a-4e30-962b-4d2ba01c1817"], +Cell[413419, 10282, 191, 3, 41, "Output",ExpressionUUID->"e9bd6d5c-6ccc-4660-aef2-df9fe1d4a09e"] }, Open ]], Cell[CellGroupData[{ -Cell[430881, 10835, 2223, 64, 348, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], -Cell[433107, 10901, 574, 12, 91, "Message",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], -Cell[433684, 10915, 578, 12, 91, "Message",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], -Cell[434265, 10929, 580, 12, 91, "Message",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], -Cell[434848, 10943, 458, 10, 26, "Message",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], -Cell[435309, 10955, 173, 3, 41, "Output",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] +Cell[413647, 10290, 2077, 59, 276, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], +Cell[415727, 10351, 658, 14, 73, "Message",ExpressionUUID->"11d31d7f-4f62-4f2d-9c99-ed9ce1b06f27"], +Cell[416388, 10367, 658, 14, 73, "Message",ExpressionUUID->"1033798f-fb24-483c-b159-0a0653036854"], +Cell[417049, 10383, 661, 14, 73, "Message",ExpressionUUID->"2c2bb3f6-45fa-4ac4-bc14-958f7669fa32"], +Cell[417713, 10399, 486, 11, 32, "Message",ExpressionUUID->"aebdb5aa-f78b-4c20-b9ed-67daaea8403e"], +Cell[418202, 10412, 192, 3, 41, "Output",ExpressionUUID->"3d0cc6dc-be96-4c33-95ef-0c8f89b88aa9"] }, Open ]], Cell[CellGroupData[{ -Cell[435519, 10963, 2221, 64, 348, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], -Cell[437743, 11029, 574, 12, 91, "Message",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], -Cell[438320, 11043, 578, 12, 91, "Message",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], -Cell[438901, 11057, 582, 12, 91, "Message",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], -Cell[439486, 11071, 455, 10, 26, "Message",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], -Cell[439944, 11083, 170, 3, 41, "Output",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] +Cell[418431, 10420, 2053, 55, 232, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], +Cell[420487, 10477, 20383, 383, 295, "Output",ExpressionUUID->"c2175283-de1a-4f00-a3ee-30a7f68fb172"] }, Open ]], Cell[CellGroupData[{ -Cell[440151, 11091, 215, 6, 60, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], -Cell[440369, 11099, 174, 3, 41, "Output",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] +Cell[440907, 10865, 2166, 61, 311, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], +Cell[443076, 10928, 508, 12, 71, "Message",ExpressionUUID->"aeaa296a-a795-4d3c-ac90-89e3a0e029f8"], +Cell[443587, 10942, 515, 12, 71, "Message",ExpressionUUID->"74d21ef1-cedc-4293-be2b-828ca4352dae"], +Cell[444105, 10956, 518, 12, 71, "Message",ExpressionUUID->"8e018081-6e04-4a81-b050-7d22d5a698cd"], +Cell[444626, 10970, 464, 11, 32, "Message",ExpressionUUID->"dcf5d8d5-6ea4-4a4c-875e-2841e891bed6"], +Cell[445093, 10983, 29243, 528, 290, "Output",ExpressionUUID->"f50a9db8-aea4-4050-b196-d179bd43d762"] }, Open ]], -Cell[440558, 11105, 249, 5, 36, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ -Cell[440832, 11114, 558, 19, 66, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[441393, 11135, 169, 3, 41, "Output",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] +Cell[474373, 11516, 164, 4, 36, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], +Cell[474540, 11522, 35627, 660, 290, "Output",ExpressionUUID->"79cded15-ca3a-4e05-a8d2-966b5a35f3a0"] }, Open ]], Cell[CellGroupData[{ -Cell[441599, 11143, 170, 5, 71, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[441772, 11150, 173, 3, 41, "Output",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] +Cell[510204, 12187, 1616, 48, 132, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], +Cell[511823, 12237, 660, 14, 73, "Message",ExpressionUUID->"2f4b6a32-8909-4296-a082-80adc9bb8213"], +Cell[512486, 12253, 661, 14, 73, "Message",ExpressionUUID->"cfb183fa-c04d-48b8-83e9-04f57f5da93c"], +Cell[513150, 12269, 660, 14, 73, "Message",ExpressionUUID->"a9ae5c6d-bb2b-435f-83d8-b4c943332a38"], +Cell[513813, 12285, 486, 11, 32, "Message",ExpressionUUID->"fec96cc2-f776-4e42-8d36-012aeb36d93e"], +Cell[514302, 12298, 193, 3, 41, "Output",ExpressionUUID->"c66db383-a0e9-4a57-bf38-e4dc6240be16"] }, Open ]], Cell[CellGroupData[{ -Cell[441982, 11158, 181, 5, 55, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[442166, 11165, 173, 3, 41, "Output",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] +Cell[514532, 12306, 2272, 64, 348, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], +Cell[516807, 12372, 660, 14, 73, "Message",ExpressionUUID->"5737b97a-3d71-4d55-9aa4-1f22d8155720"], +Cell[517470, 12388, 660, 14, 73, "Message",ExpressionUUID->"5265e820-b547-4639-8122-38c825a53053"], +Cell[518133, 12404, 661, 14, 73, "Message",ExpressionUUID->"69b598c8-e0ae-4222-8209-b21271f5db52"], +Cell[518797, 12420, 488, 11, 32, "Message",ExpressionUUID->"e40481c0-e122-499e-8f0b-8616b72a39f4"], +Cell[519288, 12433, 193, 3, 41, "Output",ExpressionUUID->"cfe72637-3fa2-4e87-b913-433a8c1627a5"] }, Open ]], Cell[CellGroupData[{ -Cell[442376, 11173, 6055, 185, 831, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[448434, 11360, 174, 3, 41, "Output",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] +Cell[519518, 12441, 2235, 63, 348, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], +Cell[521756, 12506, 660, 14, 73, "Message",ExpressionUUID->"c953fac7-ba7a-4ae3-92b4-d099380b9870"], +Cell[522419, 12522, 660, 14, 73, "Message",ExpressionUUID->"6981d288-88ac-4796-8524-0dfdeed1ea0c"], +Cell[523082, 12538, 659, 14, 73, "Message",ExpressionUUID->"bb3b8fe0-eb93-425b-b25b-6a128773bc96"], +Cell[523744, 12554, 485, 11, 32, "Message",ExpressionUUID->"db2893bd-fb2f-4d63-8a7b-6395e6b99cda"], +Cell[524232, 12567, 194, 3, 41, "Output",ExpressionUUID->"aa806680-f559-4a76-9082-ab7aa1dad5d9"] }, Open ]], Cell[CellGroupData[{ -Cell[448645, 11368, 368, 9, 53, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[449016, 11379, 172, 3, 41, "Output",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] +Cell[524463, 12575, 2233, 63, 348, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], +Cell[526699, 12640, 658, 14, 73, "Message",ExpressionUUID->"f51155dc-6e48-4557-9d75-ac93d9978b91"], +Cell[527360, 12656, 658, 14, 73, "Message",ExpressionUUID->"0c2c322e-eb99-43a6-ac97-9abce5c9d9dd"], +Cell[528021, 12672, 661, 14, 73, "Message",ExpressionUUID->"fbb2b69e-b066-447d-b217-5afdae6472fc"], +Cell[528685, 12688, 486, 11, 32, "Message",ExpressionUUID->"1079abb0-8609-4169-abca-cd4edb44ca00"], +Cell[529174, 12701, 193, 3, 41, "Output",ExpressionUUID->"148707e2-2668-4034-b1c4-c548c6be52ce"] }, Open ]], Cell[CellGroupData[{ -Cell[449225, 11387, 6122, 187, 900, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[455350, 11576, 172, 3, 41, "Output",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] +Cell[529404, 12709, 238, 6, 60, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], +Cell[529645, 12717, 196, 3, 41, "Output",ExpressionUUID->"4f0df984-80a0-4654-81ca-2724bb23f2fb"] }, Open ]], +Cell[529856, 12723, 275, 6, 109, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ -Cell[455559, 11584, 368, 9, 53, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[455930, 11595, 170, 3, 41, "Output",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] +Cell[530156, 12733, 558, 19, 66, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], +Cell[530717, 12754, 194, 3, 41, "Output",ExpressionUUID->"decf2df4-a023-4361-afe0-cce6226014d5"] }, Open ]], Cell[CellGroupData[{ -Cell[456137, 11603, 2663, 88, 435, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[458803, 11693, 173, 3, 41, "Output",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] +Cell[530948, 12762, 170, 5, 71, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], +Cell[531121, 12769, 194, 3, 41, "Output",ExpressionUUID->"0d415ae4-d0fc-4b4d-8604-00977e723e40"] }, Open ]], Cell[CellGroupData[{ -Cell[459013, 11701, 2603, 85, 435, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[461619, 11788, 172, 3, 41, "Output",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] +Cell[531352, 12777, 181, 5, 55, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], +Cell[531536, 12784, 195, 3, 41, "Output",ExpressionUUID->"8602d7df-3c23-4ea4-87df-e166b6d42801"] }, Open ]], Cell[CellGroupData[{ -Cell[461828, 11796, 3712, 118, 575, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[465543, 11916, 172, 3, 41, "Output",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] +Cell[531768, 12792, 6055, 185, 831, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], +Cell[537826, 12979, 195, 3, 41, "Output",ExpressionUUID->"be1e3efa-6da2-4f01-bc4d-38198f39c73f"] }, Open ]], Cell[CellGroupData[{ -Cell[465752, 11924, 2052, 59, 276, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], -Cell[467807, 11985, 573, 12, 91, "Message",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], -Cell[468383, 11999, 573, 12, 91, "Message",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], -Cell[468959, 12013, 579, 12, 91, "Message",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], -Cell[469541, 12027, 458, 10, 26, "Message",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], -Cell[470002, 12039, 170, 3, 41, "Output",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] +Cell[538058, 12987, 368, 9, 53, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], +Cell[538429, 12998, 196, 3, 41, "Output",ExpressionUUID->"fa47d725-e0d5-4013-9cda-12f115795eb5"] }, Open ]], Cell[CellGroupData[{ -Cell[470209, 12047, 2052, 59, 276, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], -Cell[472264, 12108, 573, 12, 91, "Message",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], -Cell[472840, 12122, 575, 12, 91, "Message",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], -Cell[473418, 12136, 579, 12, 91, "Message",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], -Cell[474000, 12150, 458, 10, 26, "Message",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], -Cell[474461, 12162, 169, 3, 41, "Output",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] +Cell[538662, 13006, 6122, 187, 900, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], +Cell[544787, 13195, 196, 3, 41, "Output",ExpressionUUID->"53d90fc6-db30-4a3d-bae3-0f480b017ca4"] }, Open ]], Cell[CellGroupData[{ -Cell[474667, 12170, 2028, 55, 232, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], -Cell[476698, 12227, 20296, 381, 295, "Output",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] +Cell[545020, 13203, 368, 9, 53, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], +Cell[545391, 13214, 195, 3, 41, "Output",ExpressionUUID->"0fa8e046-110b-41cf-949a-1c339df141eb"] }, Open ]], Cell[CellGroupData[{ -Cell[497031, 12613, 2146, 61, 311, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], -Cell[499180, 12676, 500, 11, 71, "Message",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], -Cell[499683, 12689, 505, 11, 71, "Message",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], -Cell[500191, 12702, 509, 11, 71, "Message",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], -Cell[500703, 12715, 458, 10, 26, "Message",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], -Cell[501164, 12727, 39609, 697, 290, "Output",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] +Cell[545623, 13222, 2663, 88, 435, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], +Cell[548289, 13312, 196, 3, 41, "Output",ExpressionUUID->"161006aa-a87d-4e57-b254-1d5605a671c4"] }, Open ]], -Cell[540788, 13427, 209, 5, 36, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], Cell[CellGroupData[{ -Cell[541022, 13436, 1616, 48, 132, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], -Cell[542641, 13486, 589, 12, 111, "Message",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], -Cell[543233, 13500, 595, 12, 111, "Message",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], -Cell[543831, 13514, 596, 12, 111, "Message",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], -Cell[544430, 13528, 458, 10, 26, "Message",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], -Cell[544891, 13540, 171, 3, 41, "Output",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] +Cell[548522, 13320, 2603, 85, 435, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], +Cell[551128, 13407, 195, 3, 41, "Output",ExpressionUUID->"03a24707-a837-47d5-aada-9e263db7fbc8"] }, Open ]], Cell[CellGroupData[{ -Cell[545099, 13548, 2249, 64, 348, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], -Cell[547351, 13614, 573, 12, 91, "Message",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], -Cell[547927, 13628, 573, 12, 91, "Message",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], -Cell[548503, 13642, 579, 12, 91, "Message",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], -Cell[549085, 13656, 458, 10, 26, "Message",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], -Cell[549546, 13668, 174, 3, 41, "Output",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] +Cell[551360, 13415, 3712, 118, 575, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], +Cell[555075, 13535, 194, 3, 41, "Output",ExpressionUUID->"b711b6e7-5233-40d8-bd90-a92a685e3fb1"] }, Open ]], Cell[CellGroupData[{ -Cell[549757, 13676, 2221, 64, 348, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], -Cell[551981, 13742, 573, 12, 91, "Message",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], -Cell[552557, 13756, 575, 12, 91, "Message",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], -Cell[553135, 13770, 577, 12, 91, "Message",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], -Cell[553715, 13784, 456, 10, 26, "Message",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], -Cell[554174, 13796, 172, 3, 41, "Output",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] +Cell[555306, 13543, 2075, 59, 276, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], +Cell[557384, 13604, 661, 14, 73, "Message",ExpressionUUID->"f2f042e8-423b-4e47-8495-28a3901c6caf"], +Cell[558048, 13620, 660, 14, 73, "Message",ExpressionUUID->"233919b3-e383-4d33-9c2c-1f2464c168ec"], +Cell[558711, 13636, 662, 14, 73, "Message",ExpressionUUID->"092b89d9-2a5c-4a77-b4f8-d0d9e74f5219"], +Cell[559376, 13652, 488, 11, 32, "Message",ExpressionUUID->"e8e77123-a01b-473e-a090-6840392c4dc3"], +Cell[559867, 13665, 192, 3, 41, "Output",ExpressionUUID->"caddafd9-7085-414e-ba6e-e3fb58b3b6e5"] }, Open ]], Cell[CellGroupData[{ -Cell[554383, 13804, 2219, 64, 348, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], -Cell[556605, 13870, 571, 12, 91, "Message",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], -Cell[557179, 13884, 573, 12, 91, "Message",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], -Cell[557755, 13898, 579, 12, 91, "Message",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], -Cell[558337, 13912, 458, 10, 26, "Message",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], -Cell[558798, 13924, 172, 3, 41, "Output",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] +Cell[560096, 13673, 2075, 59, 276, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], +Cell[562174, 13734, 661, 14, 73, "Message",ExpressionUUID->"f9f20a6f-ab6d-4eda-a51d-9489ac639322"], +Cell[562838, 13750, 662, 14, 73, "Message",ExpressionUUID->"a6e64613-9d0e-4bba-b9b8-64c1b6175bd4"], +Cell[563503, 13766, 660, 14, 73, "Message",ExpressionUUID->"f6632333-dd8f-488f-9a0c-3cec6341213b"], +Cell[564166, 13782, 488, 11, 32, "Message",ExpressionUUID->"d3760211-7d65-477b-ac23-6ee1b4d849f2"], +Cell[564657, 13795, 193, 3, 41, "Output",ExpressionUUID->"10698c27-f467-4f8e-9786-7e9b538c6ab4"] }, Open ]], Cell[CellGroupData[{ -Cell[559007, 13932, 211, 6, 60, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], -Cell[559221, 13940, 174, 3, 41, "Output",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] +Cell[564887, 13803, 2051, 55, 232, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], +Cell[566941, 13860, 20391, 383, 295, "Output",ExpressionUUID->"34519780-0a4d-4fd5-96b1-e903c4e73ece"] }, Open ]], -Cell[559410, 13946, 115, 1, 36, "Input",ExpressionUUID->"f36cb0fd-7ec0-4ab9-9521-1ef13679df34"] +Cell[CellGroupData[{ +Cell[587369, 14248, 2168, 61, 311, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], +Cell[589540, 14311, 535, 12, 71, "Message",ExpressionUUID->"f0a35afb-3fb2-406e-a549-6452e6973052"], +Cell[590078, 14325, 537, 12, 71, "Message",ExpressionUUID->"175bbb10-c98d-4d12-9d26-6ae101c79ed5"], +Cell[590618, 14339, 542, 12, 71, "Message",ExpressionUUID->"265518fc-6ebc-418c-8f9a-94df2afc4ae8"], +Cell[591163, 14353, 486, 11, 32, "Message",ExpressionUUID->"57175993-52b2-4d92-be99-69975e868c76"], +Cell[591652, 14366, 28617, 516, 290, "Output",ExpressionUUID->"a0ebd5ff-bc54-4c36-ae04-bd7675d69c04"] +}, Open ]], +Cell[CellGroupData[{ +Cell[620306, 14887, 232, 5, 36, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], +Cell[620541, 14894, 34977, 648, 290, "Output",ExpressionUUID->"997edc1c-b372-45a3-8087-705432e6f7ce"] +}, Open ]], +Cell[CellGroupData[{ +Cell[655555, 15547, 1616, 48, 132, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], +Cell[657174, 15597, 658, 14, 73, "Message",ExpressionUUID->"0476f351-d94e-4bf8-826e-1ed0a5a8af2b"], +Cell[657835, 15613, 658, 14, 73, "Message",ExpressionUUID->"11859a9d-b0af-4377-9599-ef721a8c6970"], +Cell[658496, 15629, 657, 14, 73, "Message",ExpressionUUID->"4c816dbe-617e-4dd4-812a-0ce124cb05cf"], +Cell[659156, 15645, 485, 11, 32, "Message",ExpressionUUID->"e178639e-291c-4aaa-80fe-e9b9ab4e2247"], +Cell[659644, 15658, 194, 3, 41, "Output",ExpressionUUID->"d2444b34-51d3-4f10-aad3-d9a9e2053f25"] +}, Open ]], +Cell[CellGroupData[{ +Cell[659875, 15666, 2272, 64, 348, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], +Cell[662150, 15732, 661, 14, 73, "Message",ExpressionUUID->"7881671b-ab07-47b3-a74c-82b9c1aa77b4"], +Cell[662814, 15748, 660, 14, 73, "Message",ExpressionUUID->"4d880d23-978a-4fb2-ba07-fc6238de52d1"], +Cell[663477, 15764, 660, 14, 73, "Message",ExpressionUUID->"83e0dcb6-9f03-4b5e-904e-e69b1e6e758f"], +Cell[664140, 15780, 488, 11, 32, "Message",ExpressionUUID->"3ec98665-56f9-40c4-8944-e2388ebacdd6"], +Cell[664631, 15793, 195, 3, 41, "Output",ExpressionUUID->"dc99acc0-cf97-42ba-b38c-9ece28e9ebcf"] +}, Open ]], +Cell[CellGroupData[{ +Cell[664863, 15801, 2233, 63, 348, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], +Cell[667099, 15866, 661, 14, 73, "Message",ExpressionUUID->"266cc358-d7b0-4eae-accd-a2c1d21c63ac"], +Cell[667763, 15882, 660, 14, 73, "Message",ExpressionUUID->"f3762846-e428-4793-a436-2843c093af84"], +Cell[668426, 15898, 660, 14, 73, "Message",ExpressionUUID->"2b54f9c0-3838-4949-9b36-ca485ca5700e"], +Cell[669089, 15914, 487, 11, 32, "Message",ExpressionUUID->"d22e0f8a-5ea6-4901-8738-866f2f1972f3"], +Cell[669579, 15927, 197, 3, 41, "Output",ExpressionUUID->"50353560-20ab-4bf7-ad03-960d81ba219c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[669813, 15935, 2231, 63, 348, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], +Cell[672047, 16000, 659, 14, 73, "Message",ExpressionUUID->"1b1daa27-d7df-4c74-b1df-8376e6e3c5ba"], +Cell[672709, 16016, 656, 14, 73, "Message",ExpressionUUID->"f0af1673-e4e0-4f52-857f-ef498789d12e"], +Cell[673368, 16032, 658, 14, 73, "Message",ExpressionUUID->"0de72a09-f648-4439-884f-37f4775054eb"], +Cell[674029, 16048, 486, 11, 32, "Message",ExpressionUUID->"78778ede-ff96-4925-aad6-6b32c404e5e1"], +Cell[674518, 16061, 197, 3, 41, "Output",ExpressionUUID->"f13e1e73-3e22-4d63-b7c5-0ea616fa066e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[674752, 16069, 234, 6, 60, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], +Cell[674989, 16077, 196, 3, 41, "Output",ExpressionUUID->"6618f4f9-dab6-419b-9c78-4e0e3ba12996"] +}, Open ]], +Cell[675200, 16083, 143, 3, 109, "Input",ExpressionUUID->"f36cb0fd-7ec0-4ab9-9521-1ef13679df34"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw2.nb b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw2.nb index c33aa94..4632ea1 100644 --- a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw2.nb +++ b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_gid_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 448712, 13231] -NotebookOptionsPosition[ 410320, 12615] -NotebookOutlinePosition[ 410732, 12632] -CellTagsIndexPosition[ 410689, 12629] +NotebookDataLength[ 702278, 16530] +NotebookOptionsPosition[ 661670, 15881] +NotebookOutlinePosition[ 662105, 15899] +CellTagsIndexPosition[ 662062, 15896] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -27,16 +27,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, - CellLabel-> - "In[408]:=",ExpressionUUID->"1b0145b9-c263-4046-9bc6-03f20ecab3a7"], + CellLabel->"In[1]:=",ExpressionUUID->"1b0145b9-c263-4046-9bc6-03f20ecab3a7"], Cell[BoxData["2"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, - 3.9940750908104277`*^9}}, - CellLabel-> - "Out[408]=",ExpressionUUID->"7bc51bb9-6bbb-4b19-9688-791c18ee3cde"] + 3.9940750908104277`*^9}, 3.994349995648958*^9, 3.9943525469565487`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"8a8cfbf4-6439-44ee-a772-d0b1e7f28a5c"] }, Open ]], Cell[CellGroupData[{ @@ -45,16 +43,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, - CellLabel-> - "In[409]:=",ExpressionUUID->"1c396d6a-893b-48dc-8cc2-08ef10f1f076"], + CellLabel->"In[2]:=",ExpressionUUID->"1c396d6a-893b-48dc-8cc2-08ef10f1f076"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, - 3.994075090853217*^9}}, - CellLabel-> - "Out[409]=",ExpressionUUID->"c46a7856-0093-4ed2-a7f9-fab8465786df"] + 3.994075090853217*^9}, 3.9943499964035378`*^9, 3.994352547046135*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"b88a675d-24f5-4784-8f36-f5269d69e2af"] }, Open ]], Cell[CellGroupData[{ @@ -63,16 +59,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "170"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, - CellLabel-> - "In[410]:=",ExpressionUUID->"8de3908c-9967-46e7-97c5-da93dbb91232"], + CellLabel->"In[3]:=",ExpressionUUID->"8de3908c-9967-46e7-97c5-da93dbb91232"], Cell[BoxData["170"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, - 3.994075090864901*^9}}, - CellLabel-> - "Out[410]=",ExpressionUUID->"97bbed16-09e4-411f-8cb7-2d5f7cb9d9fd"] + 3.994075090864901*^9}, 3.99434999641973*^9, 3.9943525470513363`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"e7ba16dd-61f7-4f5b-9f40-bcc47363d410"] }, Open ]], Cell[CellGroupData[{ @@ -80,16 +74,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[411]:=",ExpressionUUID->"36cff24f-2730-4a70-ae5f-44c80f05b7e3"], + CellLabel->"In[4]:=",ExpressionUUID->"36cff24f-2730-4a70-ae5f-44c80f05b7e3"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, - 3.9940750908767548`*^9}}, - CellLabel-> - "Out[411]=",ExpressionUUID->"8ad97b38-714e-4ceb-8567-a4cf0746eb59"] + 3.9940750908767548`*^9}, 3.99434999643917*^9, 3.994352547056181*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"73b2a2f4-e24c-47fb-b202-a45e4ebd8e2b"] }, Open ]], Cell[CellGroupData[{ @@ -101,32 +93,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"c4c6fe41-2a40-4985-b825-fc2006608934"], + CellLabel->"In[5]:=",ExpressionUUID->"c4c6fe41-2a40-4985-b825-fc2006608934"], Cell[BoxData["0.5437500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, - 3.994075090888695*^9}}, - CellLabel-> - "Out[412]=",ExpressionUUID->"92ccd187-38cc-4392-bcc9-29ef13f5fd36"] + 3.994075090888695*^9}, 3.994349996525988*^9, 3.994352547061602*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"becf103a-c708-4410-a3dc-f504632ed8bf"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"942a0b3a-7df8-40b9-8058-81db0d905c52"], + CellLabel->"In[6]:=",ExpressionUUID->"942a0b3a-7df8-40b9-8058-81db0d905c52"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, - 3.9940750909003353`*^9}}, - CellLabel-> - "Out[413]=",ExpressionUUID->"4b1f73ef-f962-4199-af60-2c0affa572e8"] + 3.9940750909003353`*^9}, 3.994349996559618*^9, 3.994352547066783*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"21c190c7-ee6e-44e1-8f55-58d46c3297c0"] }, Open ]], Cell[CellGroupData[{ @@ -137,16 +125,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[414]:=",ExpressionUUID->"707373aa-0b0c-48fc-8691-0925ee0e4a94"], + CellLabel->"In[7]:=",ExpressionUUID->"707373aa-0b0c-48fc-8691-0925ee0e4a94"], Cell[BoxData["6.426003577835178`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, - 3.9940750909055967`*^9}}, - CellLabel-> - "Out[414]=",ExpressionUUID->"9771dd66-86bd-43cc-9c37-14dd2cb198c1"] + 3.9940750909055967`*^9}, 3.9943499965972013`*^9, 3.994352547072942*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"5f0fe652-8a25-4543-8e43-7b47ff688ed5"] }, Open ]], Cell[CellGroupData[{ @@ -158,16 +144,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[415]:=",ExpressionUUID->"2db1cb82-f8b4-4dec-982e-7232505e99d8"], + CellLabel->"In[8]:=",ExpressionUUID->"2db1cb82-f8b4-4dec-982e-7232505e99d8"], Cell[BoxData["4.7806909477779245`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, - 3.994075090919847*^9}}, - CellLabel-> - "Out[415]=",ExpressionUUID->"126d1014-4469-400f-8de8-e9d2b11c3c06"] + 3.994075090919847*^9}, 3.994349996629689*^9, 3.994352547079627*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"7a0b9b3c-7709-404d-ad8e-8c2d390d86b9"] }, Open ]], Cell[CellGroupData[{ @@ -175,15 +159,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8747255229"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, - CellLabel-> - "In[416]:=",ExpressionUUID->"014d0552-9a9c-4487-93a6-43a7d805daee"], + CellLabel->"In[9]:=",ExpressionUUID->"014d0552-9a9c-4487-93a6-43a7d805daee"], Cell[BoxData["0.8747255229`"], "Output", CellChangeTimes->{ 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, - 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}}, - CellLabel-> - "Out[416]=",ExpressionUUID->"7b8c13ed-8165-42ff-9de3-c75975e62260"] + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.9943499966620417`*^9, 3.994352547087037*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"be62cc60-58fc-45c5-ae04-0d09f6efe17d"] }, Open ]], Cell[CellGroupData[{ @@ -191,47 +174,42 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3882072479"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, - CellLabel-> - "In[417]:=",ExpressionUUID->"61f06fbc-f9bf-4abf-8406-88a04612eb21"], + CellLabel->"In[10]:=",ExpressionUUID->"61f06fbc-f9bf-4abf-8406-88a04612eb21"], Cell[BoxData["0.3882072479`"], "Output", CellChangeTimes->{ 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, - 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}}, - CellLabel-> - "Out[417]=",ExpressionUUID->"9b3127b9-a0f5-4fd1-b083-4b9f94775b9a"] + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994349996743125*^9, 3.994352547094322*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"f59c9504-4b58-4d79-98ef-8489b428730a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[418]:=",ExpressionUUID->"559f4988-7e93-4915-9b5f-13ef42ae01c9"], + CellLabel->"In[11]:=",ExpressionUUID->"559f4988-7e93-4915-9b5f-13ef42ae01c9"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, - 3.994075090955942*^9}}, - CellLabel-> - "Out[418]=",ExpressionUUID->"dbcb1f62-d78d-4427-bc72-c6df84f1144d"] + 3.994075090955942*^9}, 3.9943499967781363`*^9, 3.994352547101512*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"5d2afbb3-8768-4400-b7f6-bbfaaea37b80"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[419]:=",ExpressionUUID->"30a25338-5f5e-4960-bbd1-64025eb95826"], + CellLabel->"In[12]:=",ExpressionUUID->"30a25338-5f5e-4960-bbd1-64025eb95826"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, - 3.9940750909684067`*^9}}, - CellLabel-> - "Out[419]=",ExpressionUUID->"58ffb66f-664d-40a8-a67c-2bb43cb6b212"] + 3.9940750909684067`*^9}, 3.9943499968073273`*^9, 3.994352547108818*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"0e06edf2-a14c-4bcc-9516-3928007cbe0f"] }, Open ]], Cell[CellGroupData[{ @@ -255,16 +233,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[420]:=",ExpressionUUID->"b5942fda-386e-457d-8dbc-79a4c3027062"], + CellLabel->"In[13]:=",ExpressionUUID->"b5942fda-386e-457d-8dbc-79a4c3027062"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, - 3.994075090978916*^9}}, - CellLabel-> - "Out[420]=",ExpressionUUID->"1febd101-8029-46be-ab2d-6d150b4b2020"] + 3.994075090978916*^9}, 3.994349996829918*^9, 3.994352547115652*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"60e10997-c992-4117-a367-a4176730e6b2"] }, Open ]], Cell[CellGroupData[{ @@ -288,16 +264,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[421]:=",ExpressionUUID->"fdc63ed7-5579-43ff-82ff-7b2f7d80ea6c"], + CellLabel->"In[14]:=",ExpressionUUID->"fdc63ed7-5579-43ff-82ff-7b2f7d80ea6c"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, - 3.99407509098914*^9}}, - CellLabel-> - "Out[421]=",ExpressionUUID->"c085af3f-a527-4c37-bdd9-04ab36a118f5"] + 3.99407509098914*^9}, 3.994349996863262*^9, 3.994352547122929*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"5d1e6371-32db-47a8-83b0-5fa55c703c98"] }, Open ]], Cell[CellGroupData[{ @@ -352,16 +326,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[422]:=",ExpressionUUID->"6ff41813-c0c4-43cb-b307-c0e34995eab2"], + CellLabel->"In[15]:=",ExpressionUUID->"6ff41813-c0c4-43cb-b307-c0e34995eab2"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, - 3.994075090999715*^9}}, - CellLabel-> - "Out[422]=",ExpressionUUID->"14e6e542-843a-4d26-9be8-de6d038dfbec"] + 3.994075090999715*^9}, 3.994349996886669*^9, 3.994352547130681*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"53b69e4a-6425-4b1c-bd50-87fa33d64c5b"] }, Open ]], Cell[CellGroupData[{ @@ -412,17 +384,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[423]:=",ExpressionUUID->"8df2443b-2533-4d1b-a3e2-1b4cf0d8f9a3"], + CellLabel->"In[16]:=",ExpressionUUID->"8df2443b-2533-4d1b-a3e2-1b4cf0d8f9a3"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, - 3.994075091010479*^9}}, - CellLabel-> - "Out[423]=",ExpressionUUID->"adde3154-f7a8-4325-9793-c5877fa58c08"] + 3.994075091010479*^9}, 3.994349996927909*^9, 3.9943525471373787`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"2d95c2c7-1fc1-4520-8661-4e2cce476593"] }, Open ]], Cell[CellGroupData[{ @@ -473,17 +443,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[424]:=",ExpressionUUID->"a3c6916f-506a-4e34-9223-3a09edea9851"], + CellLabel->"In[17]:=",ExpressionUUID->"a3c6916f-506a-4e34-9223-3a09edea9851"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, - 3.9940750910236893`*^9}}, - CellLabel-> - "Out[424]=",ExpressionUUID->"327bb7a0-39fc-4dd6-8ead-01e5117f5209"] + 3.9940750910236893`*^9}, 3.9943499969781437`*^9, 3.99435254714559*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"e1ba8f98-33fb-48b6-9115-92dbd8e8a6cf"] }, Open ]], Cell[CellGroupData[{ @@ -491,109 +459,103 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c22", "=", RowBox[{"1", "-", - FractionBox[ - RowBox[{ - RowBox[{"(", - RowBox[{ - RowBox[{"R01", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w1", "2"]}]}], ")"}], "*", - RowBox[{"(", - RowBox[{ - SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], - RowBox[{ - RowBox[{"R01", "*", + RowBox[{ + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w2", "2"]}], "+", - RowBox[{"R02", "*", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w1", "2"]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[425]:=",ExpressionUUID->"58aba826-d624-4a57-a6a0-84f64258744d"], + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"58aba826-d624-4a57-a6a0-84f64258744d"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, - 3.994075091035767*^9}}, - CellLabel-> - "Out[425]=",ExpressionUUID->"7dbfbe06-dc8f-4565-aa18-8ed572c8b8b9"] + 3.994075091035767*^9}, 3.994349997019823*^9, 3.9943525471539297`*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"5969372a-94a6-4071-b603-6d15b98fed99"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[426]:=",ExpressionUUID->"24515d9d-01ec-4943-8556-f3358f10ae69"], + CellLabel->"In[19]:=",ExpressionUUID->"24515d9d-01ec-4943-8556-f3358f10ae69"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, - 3.9940750910471153`*^9}}, - CellLabel-> - "Out[426]=",ExpressionUUID->"c19cda5a-2934-45df-aecd-25a4c5956951"] + 3.9940750910471153`*^9}, 3.994349997044269*^9, 3.99435254716265*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"c9194013-5a80-4638-9332-0f107813a07f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[427]:=",ExpressionUUID->"1504b6dc-3b0e-4f27-98cd-7951058814ca"], + CellLabel->"In[20]:=",ExpressionUUID->"1504b6dc-3b0e-4f27-98cd-7951058814ca"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, - 3.9940750910581427`*^9}}, - CellLabel-> - "Out[427]=",ExpressionUUID->"93dd4ad4-0ea4-428c-b268-b8ce16e1a032"] + 3.9940750910581427`*^9}, 3.9943499970660677`*^9, 3.994352547170349*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"91b28704-6d0c-4d4d-9ce7-9655891cd264"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[428]:=",ExpressionUUID->"09807293-e0ad-45aa-a71d-3fb37c1e2bd8"], + CellLabel->"In[21]:=",ExpressionUUID->"09807293-e0ad-45aa-a71d-3fb37c1e2bd8"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, - 3.994075091069083*^9}}, - CellLabel-> - "Out[428]=",ExpressionUUID->"9b512037-a260-4366-91f2-7dd6db3d4b4e"] + 3.994075091069083*^9}, 3.9943499970856247`*^9, 3.99435254717872*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"56702330-38d4-4c6b-9368-bedb3842cead"] }, Open ]], Cell[CellGroupData[{ @@ -602,33 +564,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[429]:=",ExpressionUUID->"9edcabb8-545b-495c-bd1d-223f7243fc56"], + CellLabel->"In[22]:=",ExpressionUUID->"9edcabb8-545b-495c-bd1d-223f7243fc56"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, - 3.994075091080567*^9}}, - CellLabel-> - "Out[429]=",ExpressionUUID->"f0b6785c-f6ed-4e27-a166-6f9d43d5bc95"] + 3.994075091080567*^9}, 3.99434999712389*^9, 3.994352547187112*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"48e34856-9c6d-4af6-b723-f11aedea40b1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[430]:=",ExpressionUUID->"d55e7d65-add0-4287-b08e-95b088880c38"], + CellLabel->"In[23]:=",ExpressionUUID->"d55e7d65-add0-4287-b08e-95b088880c38"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, - 3.994075091090703*^9}}, - CellLabel-> - "Out[430]=",ExpressionUUID->"1177acc0-9fbe-47b5-815d-2636500d9d6c"] + 3.994075091090703*^9}, 3.994349997157785*^9, 3.994352547195663*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"068c0fbe-1e80-43e1-8a5d-20689de6e9c2"] }, Open ]], Cell[CellGroupData[{ @@ -638,16 +596,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073690740699*^9, 3.994073690862359*^9}}, - CellLabel-> - "In[431]:=",ExpressionUUID->"db63370d-191f-49b4-b1cb-9588293ebd86"], + CellLabel->"In[24]:=",ExpressionUUID->"db63370d-191f-49b4-b1cb-9588293ebd86"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, - 3.994075091102222*^9}}, - CellLabel-> - "Out[431]=",ExpressionUUID->"36337149-1e3a-433e-9f79-ee3f37d4a4a0"] + 3.994075091102222*^9}, 3.994349997198112*^9, 3.994352547203076*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"4352c6c0-8b37-4671-a5c3-8e6fb28afe06"] }, Open ]], Cell[CellGroupData[{ @@ -657,16 +613,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, - CellLabel-> - "In[432]:=",ExpressionUUID->"9c310da3-6b04-46e7-8046-ec8d7a4efc3b"], + CellLabel->"In[25]:=",ExpressionUUID->"9c310da3-6b04-46e7-8046-ec8d7a4efc3b"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, - 3.994075091112747*^9}}, - CellLabel-> - "Out[432]=",ExpressionUUID->"cebf5036-dede-4b80-a327-ea3915d2c32a"] + 3.994075091112747*^9}, 3.994349997235105*^9, 3.9943525472108192`*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"5deac028-5471-417f-8fb4-9e1c53088673"] }, Open ]], Cell[CellGroupData[{ @@ -675,16 +629,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[433]:=",ExpressionUUID->"bbde5e1c-d408-43ac-9446-505d623205d4"], + CellLabel->"In[26]:=",ExpressionUUID->"bbde5e1c-d408-43ac-9446-505d623205d4"], Cell[BoxData["70"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, - 3.9940750911232967`*^9}}, - CellLabel-> - "Out[433]=",ExpressionUUID->"87d7851f-1340-47d6-9816-a4eb86236036"] + 3.9940750911232967`*^9}, 3.9943499972724447`*^9, 3.994352547218461*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"f27b07f6-c5a8-4285-ba6b-8e6c7c1a6601"] }, Open ]], Cell[CellGroupData[{ @@ -699,16 +651,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[434]:=",ExpressionUUID->"194c0861-57cb-4f6a-9737-5e902fa734fb"], + CellLabel->"In[27]:=",ExpressionUUID->"194c0861-57cb-4f6a-9737-5e902fa734fb"], Cell[BoxData["0.1087764705882353`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, - 3.994075091133902*^9}}, - CellLabel-> - "Out[434]=",ExpressionUUID->"2efcb1d0-c70b-4f8e-9247-858cf517b586"] + 3.994075091133902*^9}, 3.994349997290964*^9, 3.99435254722674*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"7425ba4a-051d-4e86-abf3-3aeaaa9d449b"] }, Open ]], Cell[CellGroupData[{ @@ -723,17 +673,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[435]:=",ExpressionUUID->"d369bc80-4e5f-488c-a048-377340b61c98"], + CellLabel->"In[28]:=",ExpressionUUID->"d369bc80-4e5f-488c-a048-377340b61c98"], Cell[BoxData[ RowBox[{"-", "2.5658588235294117`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, - 3.9940750911440773`*^9}}, - CellLabel-> - "Out[435]=",ExpressionUUID->"f1746dfe-74f3-4f23-8731-370fff4284f3"] + 3.9940750911440773`*^9}, 3.994349997393464*^9, 3.994352547234502*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"cbcb4841-a4e9-4c88-9537-a29d6f357c43"] }, Open ]], Cell[CellGroupData[{ @@ -764,16 +712,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[436]:=",ExpressionUUID->"04c76e26-c04c-4fd2-bf35-75b2bc9a4072"], + CellLabel->"In[29]:=",ExpressionUUID->"04c76e26-c04c-4fd2-bf35-75b2bc9a4072"], Cell[BoxData["17.474387700041003`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, - 3.9940750911556253`*^9}}, - CellLabel-> - "Out[436]=",ExpressionUUID->"e26dd477-ca73-4d15-af44-1a0b0d83f12e"] + 3.9940750911556253`*^9}, 3.994349997411324*^9, 3.994352547242538*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"5ef2b81f-1820-4e56-a7eb-0a9cdcd664f4"] }, Open ]], Cell[CellGroupData[{ @@ -781,16 +727,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[437]:=",ExpressionUUID->"fc5b5b54-94a3-43c3-8a44-2eff6945eba3"], + CellLabel->"In[30]:=",ExpressionUUID->"fc5b5b54-94a3-43c3-8a44-2eff6945eba3"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, - 3.99407509116647*^9}}, - CellLabel-> - "Out[437]=",ExpressionUUID->"3d406e82-145b-4854-b07b-ddc1842c5bca"] + 3.99407509116647*^9}, 3.9943499974600487`*^9, 3.9943525472503242`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"6fb299a0-7308-4519-9e60-829446ee4e58"] }, Open ]], Cell[CellGroupData[{ @@ -800,21 +744,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.9940737081112833`*^9, 3.994073709172043*^9}}, - CellLabel-> - "In[438]:=",ExpressionUUID->"89b30c0d-d26d-43fd-9e05-942f44c71582"], + CellLabel->"In[31]:=",ExpressionUUID->"89b30c0d-d26d-43fd-9e05-942f44c71582"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{ 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, - 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}}, - CellLabel-> - "Out[438]=",ExpressionUUID->"8b671d44-c4a8-4d86-8281-7f451c7c3c42"] + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.994349997489399*^9, 3.994352547257584*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"d37cbd73-6526-4d00-b3ea-0233854b7381"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[439]:=",ExpressionUUID->"7eec31d4-e290-4d0d-8cf4-db44d99d267d"], + CellLabel->"In[32]:=",ExpressionUUID->"7eec31d4-e290-4d0d-8cf4-db44d99d267d"], Cell[CellGroupData[{ @@ -823,21 +765,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073711335288*^9, 3.994073712564888*^9}}, - CellLabel-> - "In[440]:=",ExpressionUUID->"17359210-f5c0-41e4-9a26-40af026ba776"], + CellLabel->"In[33]:=",ExpressionUUID->"17359210-f5c0-41e4-9a26-40af026ba776"], Cell[BoxData["0.785`"], "Output", CellChangeTimes->{ 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, - 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}}, - CellLabel-> - "Out[440]=",ExpressionUUID->"294f100b-7718-4c92-9d87-ec7586264b55"] + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.994349997523468*^9, 3.994352547269683*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"19a4f264-ca34-4455-a63c-870ee070e407"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[441]:=",ExpressionUUID->"b831c6df-63d3-4eb4-9c2d-bad970a4708a"], + CellLabel->"In[34]:=",ExpressionUUID->"b831c6df-63d3-4eb4-9c2d-bad970a4708a"], Cell[CellGroupData[{ @@ -846,21 +786,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940737150021257`*^9, 3.994073716213628*^9}}, - CellLabel-> - "In[442]:=",ExpressionUUID->"a82c32e6-9644-43c8-84c6-a984343f5d78"], + CellLabel->"In[35]:=",ExpressionUUID->"a82c32e6-9644-43c8-84c6-a984343f5d78"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{ 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, - 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}}, - CellLabel-> - "Out[442]=",ExpressionUUID->"fa9d8691-b49c-4129-9a11-d2b876f94ca3"] + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.994349997557226*^9, 3.994352547279476*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"8a28ed79-cd56-4d83-9e58-e00e0ef8b57d"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[443]:=",ExpressionUUID->"08594332-f9c9-49de-8640-ebbb5d154674"], + CellLabel->"In[36]:=",ExpressionUUID->"08594332-f9c9-49de-8640-ebbb5d154674"], Cell[CellGroupData[{ @@ -869,21 +807,19 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, - CellLabel-> - "In[444]:=",ExpressionUUID->"536b6d61-fe40-4c6d-acb5-237ee933fd8e"], + CellLabel->"In[37]:=",ExpressionUUID->"536b6d61-fe40-4c6d-acb5-237ee933fd8e"], Cell[BoxData["1.125`"], "Output", CellChangeTimes->{ 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, - 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}}, - CellLabel-> - "Out[444]=",ExpressionUUID->"9e8acd84-519c-4e0d-89bc-daa26b67abf9"] + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.994349997586562*^9, 3.99435254728833*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"e4a08634-0e8a-4add-9eaa-c528b39f70fe"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[445]:=",ExpressionUUID->"1286c31b-6c3e-436b-acd7-1f05e5f2f1de"], + CellLabel->"In[38]:=",ExpressionUUID->"1286c31b-6c3e-436b-acd7-1f05e5f2f1de"], Cell[CellGroupData[{ @@ -892,21 +828,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, 3.9940737264630413`*^9}}, - CellLabel-> - "In[446]:=",ExpressionUUID->"f9519009-e507-492b-93e4-2ebbe6a1c510"], + CellLabel->"In[39]:=",ExpressionUUID->"f9519009-e507-492b-93e4-2ebbe6a1c510"], Cell[BoxData["1.145`"], "Output", CellChangeTimes->{ 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, - 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}}, - CellLabel-> - "Out[446]=",ExpressionUUID->"e0aed65f-abe0-4e89-920c-45a6c7efc0fa"] + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.9943499976173267`*^9, 3.994352547297097*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"913a30d1-c4f9-4c15-b1fb-b9e53a7bb7f2"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[447]:=",ExpressionUUID->"f69d3dce-28c8-4026-b684-5b1d934710a8"], + CellLabel->"In[40]:=",ExpressionUUID->"f69d3dce-28c8-4026-b684-5b1d934710a8"], Cell[CellGroupData[{ @@ -915,21 +849,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, 3.994073731586865*^9}}, - CellLabel-> - "In[448]:=",ExpressionUUID->"c7b878bc-8afa-43e6-8b34-0476fc19185e"], + CellLabel->"In[41]:=",ExpressionUUID->"c7b878bc-8afa-43e6-8b34-0476fc19185e"], Cell[BoxData["0.565`"], "Output", CellChangeTimes->{ 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, - 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}}, - CellLabel-> - "Out[448]=",ExpressionUUID->"ab4238b1-5831-4530-aabc-b14297c10e65"] + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.9943499976451283`*^9, 3.9943525473075*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"39e41ac4-7865-48d2-b374-9c5dc4571b4e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[449]:=",ExpressionUUID->"e5426d1d-dfa7-4f5d-ba9c-e3b73fd9a4ac"], + CellLabel->"In[42]:=",ExpressionUUID->"e5426d1d-dfa7-4f5d-ba9c-e3b73fd9a4ac"], Cell[CellGroupData[{ @@ -938,21 +870,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, 3.994073737300967*^9}}, - CellLabel-> - "In[450]:=",ExpressionUUID->"ffcc49f1-1bf7-4877-89a9-84c1f6b1893d"], + CellLabel->"In[43]:=",ExpressionUUID->"ffcc49f1-1bf7-4877-89a9-84c1f6b1893d"], Cell[BoxData["1.5`"], "Output", CellChangeTimes->{ 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, - 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}}, - CellLabel-> - "Out[450]=",ExpressionUUID->"f1e37cc7-df75-4cc0-a623-4f82f8cc691b"] + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.9943499976739073`*^9, 3.994352547318358*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"a596018b-a6f6-419c-8cc9-b2374ed7744d"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[451]:=",ExpressionUUID->"9a7e0309-288b-4ddf-90f9-f8d951d89362"], + CellLabel->"In[44]:=",ExpressionUUID->"9a7e0309-288b-4ddf-90f9-f8d951d89362"], Cell[CellGroupData[{ @@ -960,21 +890,19 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.635"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, - CellLabel-> - "In[452]:=",ExpressionUUID->"3e620f06-cbce-4668-834b-0e037d8ed983"], + CellLabel->"In[45]:=",ExpressionUUID->"3e620f06-cbce-4668-834b-0e037d8ed983"], Cell[BoxData["0.635`"], "Output", CellChangeTimes->{ 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, - 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}}, - CellLabel-> - "Out[452]=",ExpressionUUID->"6d2aa252-4daa-4dae-83d6-d1e960deec09"] + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.994349997728817*^9, 3.994352547326816*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"e028d864-9fb5-485d-95fc-3316a18732d8"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[453]:=",ExpressionUUID->"a9a33099-11b0-48de-8623-8c52261917f5"], + CellLabel->"In[46]:=",ExpressionUUID->"a9a33099-11b0-48de-8623-8c52261917f5"], Cell[CellGroupData[{ @@ -1463,16 +1391,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[454]:=",ExpressionUUID->"af53eeb9-f3a5-468c-9272-bdb3eb8d7245"], + CellLabel->"In[47]:=",ExpressionUUID->"af53eeb9-f3a5-468c-9272-bdb3eb8d7245"], Cell[BoxData["0.12734722137174234`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, - 3.994075091306961*^9}}, - CellLabel-> - "Out[454]=",ExpressionUUID->"1752660a-eb5d-4653-bf13-064231d220dd"] + 3.994075091306961*^9}, 3.994349997929103*^9, 3.994352547405897*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"f13499a8-3844-40d6-8992-08f0f47c6484"] }, Open ]], Cell[CellGroupData[{ @@ -1966,16 +1892,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[455]:=",ExpressionUUID->"a948efa2-657b-4b94-a800-b8db1e74b021"], + CellLabel->"In[48]:=",ExpressionUUID->"a948efa2-657b-4b94-a800-b8db1e74b021"], Cell[BoxData["7.503764283698204`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, - 3.994075091332656*^9}}, - CellLabel-> - "Out[455]=",ExpressionUUID->"c1c2080a-d4fc-4ab8-8452-7e143aac02f5"] + 3.994075091332656*^9}, 3.994349998013769*^9, 3.994352547454035*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"0bb2632c-fb3b-481d-8698-23b0db3bbfc8"] }, Open ]], Cell[CellGroupData[{ @@ -2463,17 +2387,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[456]:=",ExpressionUUID->"92f1dfeb-5e3c-484c-9a16-cf2b6ea3ed47"], + CellLabel->"In[49]:=",ExpressionUUID->"92f1dfeb-5e3c-484c-9a16-cf2b6ea3ed47"], Cell[BoxData[ RowBox[{"-", "14.220629552114458`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, - 3.994075091358534*^9}}, - CellLabel-> - "Out[456]=",ExpressionUUID->"0886f4c3-b9a7-48df-a57c-569d37ee9f60"] + 3.994075091358534*^9}, 3.9943499981090393`*^9, 3.99435254749397*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"0e08fc4e-f91f-434a-bda2-559415ab3289"] }, Open ]], Cell[CellGroupData[{ @@ -3031,17 +2953,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[457]:=",ExpressionUUID->"62f47c3c-85a5-444f-ae96-138c6dbfd4a5"], + CellLabel->"In[50]:=",ExpressionUUID->"62f47c3c-85a5-444f-ae96-138c6dbfd4a5"], Cell[BoxData[ RowBox[{"-", "18.05754390959481`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, - 3.99407509139049*^9}}, - CellLabel-> - "Out[457]=",ExpressionUUID->"92273eb4-7a74-483c-b588-a11b499517b1"] + 3.99407509139049*^9}, 3.994349998218618*^9, 3.994352547557411*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"b15de9a3-ce42-4f1f-b02d-46e914b924c5"] }, Open ]], Cell[CellGroupData[{ @@ -3599,17 +3519,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[458]:=",ExpressionUUID->"9c8c7dfd-906a-47eb-b578-8526cad374c5"], + CellLabel->"In[51]:=",ExpressionUUID->"9c8c7dfd-906a-47eb-b578-8526cad374c5"], Cell[BoxData[ RowBox[{"-", "51.76635903245878`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, - 3.994075091423628*^9}}, - CellLabel-> - "Out[458]=",ExpressionUUID->"bfd7cf19-a2ee-4254-a46b-4b7fc94f0449"] + 3.994075091423628*^9}, 3.9943499983377447`*^9, 3.9943525476110477`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"ed7a3212-963b-48a6-a270-027ca90ae334"] }, Open ]], Cell[CellGroupData[{ @@ -4240,49 +4158,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[459]:=",ExpressionUUID->"7bdfe7e1-55b5-4e0d-b7b9-96c0dc9db906"], + CellLabel->"In[52]:=",ExpressionUUID->"7bdfe7e1-55b5-4e0d-b7b9-96c0dc9db906"], Cell[BoxData[ RowBox[{"-", "131.16526179683018`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, - 3.9940750914627743`*^9}}, - CellLabel-> - "Out[459]=",ExpressionUUID->"7f5402e5-c3ab-4d3a-990e-3eda68450081"] + 3.9940750914627743`*^9}, 3.9943499984787703`*^9, 3.9943525476758738`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"2a89fb79-8da3-454a-bc49-9f13a45d8979"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[460]:=",ExpressionUUID->"c4d8b1b4-5123-4b97-8d9d-d1d3fc1d7555"], + CellLabel->"In[53]:=",ExpressionUUID->"c4d8b1b4-5123-4b97-8d9d-d1d3fc1d7555"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, - 3.994075091476185*^9}}, - CellLabel-> - "Out[460]=",ExpressionUUID->"331882c9-1152-4b3e-9f43-a2f1167cae8f"] + 3.994075091476185*^9}, 3.9943499985116568`*^9, 3.994352547688527*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"ccc118af-1c33-4a22-8fff-5eb52cb2d170"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[461]:=",ExpressionUUID->"4daf7a7c-622c-47c3-b5fb-0cf7246a4b73"], + CellLabel->"In[54]:=",ExpressionUUID->"4daf7a7c-622c-47c3-b5fb-0cf7246a4b73"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, - 3.994075091486505*^9}}, - CellLabel-> - "Out[461]=",ExpressionUUID->"803692b2-953a-4011-98b5-3c705cdbe364"] + 3.994075091486505*^9}, 3.994349998529757*^9, 3.994352547697945*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"a9f5268a-0872-49d1-b2c5-943f6473dec6"] }, Open ]], Cell[CellGroupData[{ @@ -4326,16 +4238,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[462]:=",ExpressionUUID->"1b1d1463-8589-474d-b533-05533221ce5a"], + CellLabel->"In[55]:=",ExpressionUUID->"1b1d1463-8589-474d-b533-05533221ce5a"], Cell[BoxData["102.57012833062927`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, - 3.994075091497402*^9}}, - CellLabel-> - "Out[462]=",ExpressionUUID->"54a1411e-c577-43be-8a45-a4613c86e6ae"] + 3.994075091497402*^9}, 3.9943499985517807`*^9, 3.994352547708303*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"102801fe-6987-4689-843b-37606b9c9e90"] }, Open ]], Cell[CellGroupData[{ @@ -4375,17 +4285,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[463]:=",ExpressionUUID->"6711db2d-76c0-45fc-a154-b6e909463e13"], + CellLabel->"In[56]:=",ExpressionUUID->"6711db2d-76c0-45fc-a154-b6e909463e13"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, - 3.994075091508032*^9}}, - CellLabel-> - "Out[463]=",ExpressionUUID->"e4d1cf93-7b9a-4abb-bb91-8958bf792072"] + 3.994075091508032*^9}, 3.9943499985717897`*^9, 3.99435254772025*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"7aed5878-35d9-4b76-9594-c4cda713635d"] }, Open ]], Cell[CellGroupData[{ @@ -4429,103 +4337,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[464]:=",ExpressionUUID->"2f46feef-fe19-4ae6-b041-de643f5933ea"], + CellLabel->"In[57]:=",ExpressionUUID->"2f46feef-fe19-4ae6-b041-de643f5933ea"], Cell[BoxData["106.05157029710364`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, - 3.994075091518471*^9}}, - CellLabel-> - "Out[464]=",ExpressionUUID->"eccf34c4-5424-4a72-96e5-ba1b9465448f"] + 3.994075091518471*^9}, 3.994349998594491*^9, 3.994352547733985*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"17ec4fe2-f586-4a1e-8cfa-9e59fd9cb73c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[465]:=",ExpressionUUID->"ab8d5ccc-87e4-41b2-a61b-3a61982208ac"], + CellLabel->"In[58]:=",ExpressionUUID->"ab8d5ccc-87e4-41b2-a61b-3a61982208ac"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, - 3.99407509152868*^9}}, - CellLabel-> - "Out[465]=",ExpressionUUID->"d3169ac3-6ffc-4bb8-90c6-6d5d74d56ea1"] + 3.99407509152868*^9}, 3.994349998609577*^9, 3.994352551552548*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"bc0c5f92-28cb-4c1c-ab25-09ad451fb699"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[466]:=",ExpressionUUID->"f0e29519-e5d2-4030-8e3e-5e1a05e73def"], + CellLabel->"In[59]:=",ExpressionUUID->"f0e29519-e5d2-4030-8e3e-5e1a05e73def"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, - 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}}, - CellLabel-> - "Out[466]=",ExpressionUUID->"cccab308-5eb9-4ca0-bb10-e9b1fdc432aa"] + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.9943499986289663`*^9, 3.994352551879681*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"f013e8d8-0156-413a-a1b5-5ab5c2f903cb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[467]:=",ExpressionUUID->"e4d3f5d0-7ba5-41d4-9d75-26e182eaa293"], + CellLabel->"In[60]:=",ExpressionUUID->"e4d3f5d0-7ba5-41d4-9d75-26e182eaa293"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, - 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}}, - CellLabel-> - "Out[467]=",ExpressionUUID->"10de6b50-f5e9-482d-8d51-4c39d987eeb9"] + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.994349998777978*^9, 3.994352551893137*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"6f1f4e93-eead-43fc-949b-c61fa77df767"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[468]:=",ExpressionUUID->"c5d1c79f-9d47-4e53-aa84-e02f48280215"], + CellLabel->"In[61]:=",ExpressionUUID->"c5d1c79f-9d47-4e53-aa84-e02f48280215"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, - 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}}, - CellLabel-> - "Out[468]=",ExpressionUUID->"5f304fad-9033-4c64-9933-908f1226d416"] + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.9943499988567667`*^9, 3.994352551905401*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"3a332b33-e232-4ef9-8e93-d3afc923a947"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[469]:=",ExpressionUUID->"1f76c2c6-d44b-4ad1-a305-91d6d9cfb3de"], + CellLabel->"In[62]:=",ExpressionUUID->"1f76c2c6-d44b-4ad1-a305-91d6d9cfb3de"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, - 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}}, - CellLabel-> - "Out[469]=",ExpressionUUID->"c4c0310f-0117-4a9b-8ffb-029e909ea83f"] + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.994349998872229*^9, 3.994352551917609*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"92935295-abcf-49e8-819f-68ba37dd1db1"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[470]:=",ExpressionUUID->"abcec447-a992-4fb6-a942-f6cc08e5359a"], + CellLabel->"In[63]:=",ExpressionUUID->"abcec447-a992-4fb6-a942-f6cc08e5359a"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, - 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}}, - CellLabel-> - "Out[470]=",ExpressionUUID->"3162e120-9206-43af-a40a-7c4441ab06b3"] + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.9943499988853903`*^9, 3.994352551930275*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"c8bdb2cb-f591-4cac-9ecd-178111bebbfd"] }, Open ]], Cell[CellGroupData[{ @@ -4546,16 +4445,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[471]:=",ExpressionUUID->"57c61dac-80b3-4542-b4fe-84eefab12319"], + CellLabel->"In[64]:=",ExpressionUUID->"57c61dac-80b3-4542-b4fe-84eefab12319"], Cell[BoxData[ RowBox[{"-", "33.35096235519822`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, - 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}}, - CellLabel-> - "Out[471]=",ExpressionUUID->"f74048a6-5a4d-46ab-92f5-9a8ce66e8449"] + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994349998900889*^9, 3.994352551942746*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"a9912436-f2b6-41de-b9d1-dbade3c741c2"] }, Open ]], Cell[CellGroupData[{ @@ -4576,16 +4474,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[472]:=",ExpressionUUID->"88cb455b-c21f-428e-90d8-99b777f7069f"], + CellLabel->"In[65]:=",ExpressionUUID->"88cb455b-c21f-428e-90d8-99b777f7069f"], Cell[BoxData[ RowBox[{"-", "6.430095836913352`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, - 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}}, - CellLabel-> - "Out[472]=",ExpressionUUID->"f1ca22ea-5f4d-4b5a-b5f3-43ce9e6dc189"] + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.994349998917692*^9, 3.994352551956028*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"ba408ccc-6c9f-495a-8013-a04a8a0f665b"] }, Open ]], Cell[CellGroupData[{ @@ -4650,15 +4547,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[473]:=",ExpressionUUID->"93b7a45c-6511-4e69-9c45-0d633fd7f374"], + CellLabel->"In[66]:=",ExpressionUUID->"93b7a45c-6511-4e69-9c45-0d633fd7f374"], Cell[BoxData["69.21916597543105`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, - 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}}, - CellLabel-> - "Out[473]=",ExpressionUUID->"56aece5d-bed6-4b8e-8e02-2562ea80be8d"] + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.994349998933497*^9, 3.9943525519670973`*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"b9a192eb-8ec9-491f-b800-dbcf44687abb"] }, Open ]], Cell[CellGroupData[{ @@ -4699,16 +4595,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[474]:=",ExpressionUUID->"56296330-5f4c-4d26-8935-94174ff82c03"], + CellLabel->"In[67]:=",ExpressionUUID->"56296330-5f4c-4d26-8935-94174ff82c03"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, - 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}}, - CellLabel-> - "Out[474]=",ExpressionUUID->"422bc55e-ad24-4e67-a92f-f47f4a5275e0"] + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.9943499989492083`*^9, 3.994352551977059*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"a6f20248-c187-4fc9-aed7-984f30bb5af0"] }, Open ]], Cell[CellGroupData[{ @@ -4774,15 +4669,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[475]:=",ExpressionUUID->"d96ee3ec-f062-4f5e-8919-9123d91d7459"], + CellLabel->"In[68]:=",ExpressionUUID->"d96ee3ec-f062-4f5e-8919-9123d91d7459"], Cell[BoxData["99.62147446019029`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, - 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}}, - CellLabel-> - "Out[475]=",ExpressionUUID->"d78fec70-bba0-4067-8341-8d5ca2da841a"] + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994349998965066*^9, 3.994352551988749*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"e05cb05a-9a0e-458c-af64-e7500d692777"] }, Open ]], Cell[CellGroupData[{ @@ -4840,15 +4734,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[476]:=",ExpressionUUID->"33137ca0-f184-4c25-89cc-b6113bf33322"], + CellLabel->"In[69]:=",ExpressionUUID->"33137ca0-f184-4c25-89cc-b6113bf33322"], Cell[BoxData["40.3202486570226`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, - 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}}, - CellLabel-> - "Out[476]=",ExpressionUUID->"05bd9f17-9fdb-4b6f-9ceb-c36aa2203f03"] + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.994349998983039*^9, 3.9943525520008907`*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"3ac25c2b-6f3a-4904-938d-b2389c2cc105"] }, Open ]], Cell[CellGroupData[{ @@ -4906,37 +4799,47 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[477]:=",ExpressionUUID->"92750103-210c-42fb-ae6c-b7962adcac6e"], + CellLabel->"In[70]:=",ExpressionUUID->"92750103-210c-42fb-ae6c-b7962adcac6e"], Cell[BoxData["624.5259763904654`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, - 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}}, - CellLabel-> - "Out[477]=",ExpressionUUID->"8a6efb38-a045-4948-a637-f1bb1190bc1f"] + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.99434999899892*^9, 3.9943525520115623`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"f603e1f2-9f91-4edb-b78a-57fcdc4727cb"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4126334817"}]], "Input", - CellChangeTimes->{3.9918505481678543`*^9, - 3.99423550540412*^9},ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], + CellChangeTimes->{3.9918505481678543`*^9, 3.99423550540412*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], + +Cell[BoxData["0.4126334817`"], "Output", + CellChangeTimes->{3.994349999013061*^9, 3.99435255202948*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"0c80d562-7210-48b5-a85b-3365b039d48c"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991850549355442*^9, - 3.991850549360302*^9}},ExpressionUUID->"7730e455-e5f4-194b-b761-\ -e7a6896afd10"], + CellChangeTimes->{{3.991850549355442*^9, 3.991850549360302*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1129347808"}]], "Input", - CellChangeTimes->{3.991850550777445*^9, - 3.994235509197481*^9},ExpressionUUID->"b70cfd2b-21a1-8344-9518-\ -5e27a96171a9"], + CellChangeTimes->{3.991850550777445*^9, 3.994235509197481*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], + +Cell[BoxData["0.1129347808`"], "Output", + CellChangeTimes->{3.994349999036964*^9, 3.994352552047035*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"fef400d3-6cab-4a5e-8d4a-9ae43e624e0e"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918505524437046`*^9, - 3.991850552447544*^9}},ExpressionUUID->"86df0a71-aa65-aa41-b8f1-\ -8c5c5be10fe8"], + CellChangeTimes->{{3.9918505524437046`*^9, 3.991850552447544*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ @@ -4981,9 +4884,12 @@ Cell[BoxData[ RowBox[{"1.16", "*", SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], - ")"}]}]], "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], + ")"}]}]], "Input", + CellLabel->"In[75]:=",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[BoxData["2.3793916761039806`*^-53"], "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[BoxData["1.502378697384544`*^-53"], "Output", + CellChangeTimes->{3.99434999906955*^9, 3.9943525520624237`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"5f958ed3-b8b1-477d-ac3e-c5949b401c46"] }, Open ]], Cell[CellGroupData[{ @@ -5017,11 +4923,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915577064670105`*^9},ExpressionUUID->"c16f367e-d189-2745-b3b8-\ -a9b137c5e3b6"], + CellChangeTimes->{3.9915577064670105`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[BoxData["5.0207251137958644`*^-55"], "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[BoxData["6.41127826443102`*^-55"], "Output", + CellChangeTimes->{3.994349999085387*^9, 3.9943525520717773`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"55b5440f-dd19-42de-aa11-f68bcaad5d84"] }, Open ]], Cell[CellGroupData[{ @@ -5054,11 +4961,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557709328657*^9, - 3.991557711123291*^9}},ExpressionUUID->"b7d001ae-480c-4b41-8df9-\ -8010347227f7"], + CellChangeTimes->{{3.991557709328657*^9, 3.991557711123291*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[BoxData["1.8713726427856714`*^-54"], "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[BoxData["6.0912281782784575`*^-55"], "Output", + CellChangeTimes->{3.994349999105163*^9, 3.994352552081168*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"af6d62ea-206f-4da2-a90c-f6a5efa8336b"] }, Open ]], Cell[CellGroupData[{ @@ -5080,10 +4988,12 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ih", "*", "Ir"}], - RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"d15e5e59-9ad8-\ -e247-a132-b43b2736212a"], + RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", + CellLabel->"In[78]:=",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[BoxData["25.178011816139865`"], "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[BoxData["8.49543943724351`"], "Output", + CellChangeTimes->{3.994349999126525*^9, 3.9943525521344967`*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"b891ce9e-e58d-43e6-90c7-cdfe6eea0de7"] }, Open ]], Cell[CellGroupData[{ @@ -5108,10 +5018,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", - RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input",Expre\ -ssionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], + RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", + CellLabel->"In[79]:=",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[BoxData["37.88040277230648`"], "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[BoxData["19.654154699241804`"], "Output", + CellChangeTimes->{3.994349999143241*^9, 3.994352552172756*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"bf587c61-d657-4652-afd8-2ec731125c8f"] }, Open ]], Cell[CellGroupData[{ @@ -5119,10 +5031,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb3"]]}]], "Input",ExpressionUUID->"906db7f6-73f3-8a4e-\ -88a4-7c75445a4f32"], + FractionBox["Kb", "Qb3"]]}]], "Input", + CellLabel->"In[80]:=",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[BoxData["0.7475613664924765`"], "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[BoxData["2.1785557430472853`"], "Output", + CellChangeTimes->{3.994349999158564*^9, 3.994352552183034*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"649727f7-f2e0-4889-a186-02578fe8587d"] }, Open ]], Cell[CellGroupData[{ @@ -5130,10 +5044,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ - FractionBox["Kw", "Qw3"]]}]], "Input",ExpressionUUID->"731b68b1-c44a-6c4a-\ -a9f8-bc957ede9a68"], + FractionBox["Kw", "Qw3"]]}]], "Input", + CellLabel->"In[81]:=",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[BoxData["3.219272026986442`"], "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[BoxData["5.637000436757284`"], "Output", + CellChangeTimes->{3.994349999172909*^9, 3.994352552194468*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"4ef0fd36-93c8-4819-93ec-eb4a3e0e127e"] }, Open ]], Cell[CellGroupData[{ @@ -5141,10 +5057,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ - RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input",ExpressionUUID->"71af6813-\ -eb8f-4944-8d03-7bcd77a7b4b4"], + RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", + CellLabel->"In[82]:=",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[BoxData["121.94732101586592`"], "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[BoxData["110.79047862372128`"], "Output", + CellChangeTimes->{3.9943499991875687`*^9, 3.9943525522068233`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"3ada5c56-d32b-47d4-b6cc-4fa7464de8a4"] }, Open ]], Cell[CellGroupData[{ @@ -5152,10 +5070,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"28815b73-\ -08dc-e64f-8823-2a55ad6b8ca8"], + RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", + CellLabel->"In[83]:=",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[BoxData["18.822108918837237`"], "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[BoxData["18.507788375717247`"], "Output", + CellChangeTimes->{3.9943499992028008`*^9, 3.994352552216148*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"71ebfbe0-7f0e-4028-83da-1528fd884f5e"] }, Open ]], Cell[CellGroupData[{ @@ -5343,10 +5263,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"137e8d46-8eff-3c47-\ -bf8f-1350d0b8a0bb"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[84]:=",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[BoxData["0.04118782656518991`"], "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[BoxData["0.008394670319501415`"], "Output", + CellChangeTimes->{3.9943499992213707`*^9, 3.994352552236343*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"79006835-30ad-45c9-9bda-8f2fead39770"] }, Open ]], Cell[CellGroupData[{ @@ -5358,18 +5280,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"65edd566-\ -4493-2440-9c51-9fca28ce324b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[85]:=",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], - -Cell[BoxData["4.366771860185336`"], "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[BoxData["9.672597546794682`"], "Output", + CellChangeTimes->{3.9943499995448427`*^9, 3.9943525524702997`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"bf5992c5-8fcb-4c05-9f45-b24997f337bb"] }, Open ]], Cell[CellGroupData[{ @@ -5559,10 +5475,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"d808e80b-1928-8046-\ -afec-31463f4946cd"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[86]:=",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[BoxData["0.010567083454288358`"], "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[BoxData["0.05332538222016878`"], "Output", + CellChangeTimes->{3.99434999956118*^9, 3.994352552483014*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"cb752439-26a6-4ad3-992b-e429f49913ff"] }, Open ]], Cell[CellGroupData[{ @@ -5574,18 +5492,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"56b1717f-\ -bc75-4047-98f0-7a0dede3f8a9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[87]:=",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], - -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[BoxData["3.837761238655195`"], "Output", + CellChangeTimes->{3.994349999728101*^9, 3.994352552569418*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"b83162cc-e563-4659-a7d2-865ba652605b"] }, Open ]], Cell[CellGroupData[{ @@ -5676,10 +5588,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-\ -f74418e31aeb"], + ")"}]}]}]], "Input", + CellLabel->"In[88]:=",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[BoxData["0.04702603264830412`"], "Output", + CellChangeTimes->{3.9943499997456408`*^9, 3.994352552679524*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"a5312a3c-6aee-4e0b-8738-6ae8c3454d3a"] }, Open ]], Cell[CellGroupData[{ @@ -5767,10 +5681,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-\ -91d5391478d5"], + ")"}]}]}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[BoxData["0.9529739673516959`"], "Output", + CellChangeTimes->{3.994349999764654*^9, 3.9943525526899652`*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"901f5368-7cce-40da-8679-3b12cb0202ee"] }, Open ]], Cell[CellGroupData[{ @@ -5891,16 +5807,18 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"bea639c9-f172-\ -ef4e-9454-9d4e027f5fa2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel->"In[90]:=",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[BoxData["0.04481458490166476`"], "Output", + CellChangeTimes->{3.9943499997852497`*^9, 3.994352552702653*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"78218b9c-24cf-4b73-90e6-aa4c185c6156"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"752e2dd5-bee6-\ -2048-8697-fe84d79611fa"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ @@ -5961,27 +5879,73 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918505674491863`*^9},ExpressionUUID->"f8b12d93-5bd9-8641-aa98-\ -3d78ebb0f21b"], + CellChangeTimes->{3.9918505674491863`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.116697080387539`*^-197\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 1, + 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349999990871*^9, 3.9943525527369328`*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"f5b293cd-8747-4220-b7aa-fe7433e5f227"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"42c1a263-2456-664a-bb33-c5fe841cb412"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6681936758962384`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 2, + 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349999990871*^9, 3.994352552755972*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"8e693e1c-b63a-44b3-acf4-2a8dd2af1ebd"], -Cell[BoxData["4.366771860185332`"], "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1639055193561464`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349999990871*^9, 3.9943525527616177`*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"64f8cb39-2447-49c8-bd02-2ef15a146f9d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 92, 4, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994349999990871*^9, 3.994352552770357*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"88ee63d9-4dc3-4fa2-b5ab-f872297caf32"], + +Cell[BoxData["9.67259754679468`"], "Output", + CellChangeTimes->{3.994350004293374*^9, 3.994352555526898*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"1c364cd8-2c31-4208-89fd-0f75f8826521"] }, Open ]], Cell[CellGroupData[{ @@ -6043,26 +6007,73 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185057022003*^9},ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], + CellChangeTimes->{3.99185057022003*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"be4d7bfb-c18e-564a-93ce-3f42607886e7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.116697080387539`*^-197\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 5, + 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943500043699837`*^9, 3.9943525555841837`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"8541e5f7-40d8-4be5-8c33-44ccb76a0fac"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6681936758962384`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 6, + 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943500043699837`*^9, 3.994352555647097*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"b6266434-5501-4054-be25-358a7aa45132"], -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1639055193561464`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943500043699837`*^9, 3.994352555655302*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"a4c782a9-4a19-4ff3-a0d2-6a5975cd3846"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 93, 8, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943500043699837`*^9, 3.994352555662244*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"7a3a28f3-cadd-4573-b06a-1031b9822c06"], + +Cell[BoxData["3.8377612386551956`"], "Output", + CellChangeTimes->{3.994350008486104*^9, 3.994352558432667*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"7ed11b55-4199-4771-b627-01baffed48a0"] }, Open ]], Cell[CellGroupData[{ @@ -6072,491 +6083,435 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505747312756`*^9},ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-\ -12d8b19f0936"], + CellChangeTimes->{3.9918505747312756`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d3cb6fbc-3803-0541-80d1-8cab47341c44"], + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk4VVsUAHCEJCqEzMNFj1K616zXXhnLVKRClG73nHSV+UnxbnqhFEIq +DagkkllKpDRJUmlUSoY7kHl2VPK2P853vt+3z1ln7bX2PluLGeROiAgJCXXh +a+4e8nrV8rvNr9exHT9fjH3IResGr5swbQvR0YTZ5jl3ZJum69jeR5cyQsLi +sDezXolLMZ6h+5xV/8Vjl0UeeSJm24QiHExnjmMn1C+rO1LwFunPS+AlYN9r +Dsn6Tf+IGuv1zBOxe1sbow/VfEYDtxZTydjKfNqOSZtviNtso5OG7TQUbRHW +1I4yPJ/cP4v94HfvwsiCTpTFTn50AfvTUcWoO4FcZMvIpWdhD4rb9o7T+ciT +O39JDrZ4YrAXY0qAEkrveOVjq8tkNoTU9KDRD2WLi7FdVSZvDNr0o1Facl01 +NnlFW8FQYhCptgbVPMI+orspLqBpCMnOZmm/wP6s+GFNeMEI+tUuMPmCzfJm +7zuTOIq6nIW6OrGHLwtdLQ8cQ8kn/X/2YktoGy4ZoU8ge+nlwX+w01lPHJbI +T6Jzf3FeSdRxkWae15HVU5NI75HueTls85XxgwdqKHRjo3+QAba/aXtTr81v +pPm1geGLPR75j6ik3gwK7iobY2PH1Cxcqy/xB0VnD2kcws4A81t7m2bRiZKA +2nPYrNwG29ACYbjmEynVgl1Qf6bjqIoINOgpre7BHu7eGZ2aKAJLFix9MI0d +bTBRURo4D0o1VLTUH+F8S7RoQ3QxSGyL/RWA3drc/+BPjhiQKVJHY7A1R+96 +L5IXh7ru8dCz2IXGrmmGU+Kgq913qQ776b3DwvtrJCBA84SI6mMumnjyvr3H +Rgrst5O0bmxZZ6klUQ+koO7HijrRJ1xk9MEWpC2kYZhDfNPGZvMqr6xZtQiI +JsszftjBIk1Gf0stgW9KF392YvO1i0fiJmVgZe3Vst9PcX3IxgVvGLJQORZg +r/2Mi0RuCbSWhciC5n/PvDdgazI03Av6ZMHeZ5XIOWxvm5Ty1x1yQCcWOZvV +c9GbPaFhii/lof5ly6vU51z0PS/5lJ+EAtySSfR5iN3fV5Bz004Bnh0YYQ9g +S4Zz31vVKYBn1Wdxpwa8DmM9jP0qFWH9Ch8rqRdcVH3ddCI/WwkilvtduNHI +Rdf5PyMsw9XAY5qysnrNRRu2Hv8eVqQGhU9ai8Kx+5/K2RcJ1IBa6nO6GNv4 ++kp5TS91aDrocJX2BteTubNCbJ0GcDgLhOWauWh0qONgzzFNiA9JLBd/x0Vy +B2xvV7hog8dz5ZH1n7hIcF3SfzNbG9QFJj4J2FXfmlUG4rWBreFk9hbbx9n3 +mF6dNjw8GPw3swXntyLC/QKdBjL82YSEz/j7vXnDHEUdiC+SXD7QykUeexca +OnbqQpRq+gmJDi5CEVvp22d0QSnE2skH2yAu24ylpAfDz38eKsUWymFYc9z0 +gLx4XsW7k4uKvu/YXv5IDxoy+UHlXXh/bis8qnxtOewcmd11kI/zs3X51MvU +h74XUZHufVyUs+X81ymOPjh7pz+pwE5mdnaIXtKHU3ZGUfL9eH3H/NOn/l4f +FDgiRq3YMvczhbbYGEB/3rFS/0G8fhiDBjW0FXC59sqSiyNcpKJ9+sgp3kqY +78AOcKW46P7Jcf1pEUNoMFlXXY/tM+b1gdQyhIgxIgFNc1HWUx19652GIBXd +kE//yUXae6vfUS2GwAiP6Vf/jedbyNclX64CwlosabEQD6mpqJOaXkZwP03g +6ybBQytzw6V+ITr0jFcUeyrzEJN1bMLQlQ4ai7ky3dgZtLTvfj508BNsEPyj +wkPzrpWU1kfSwbS5uStdlYdas3o90srokJd3eMVndR5KyPDL1KcxwDQrSSic +xkOCU86rPMWNoVHYnS9kyENXQ3U2VzaZwNL+OtGQ9TzUHIHMYnMtwLW/ltcb +xkNaOz+6+u7/G75L/1n2roiHiNk7xWqHABbfcmoP7OMhxb6q+YpMa2jXUm6u +NOWjcMbab2kGtrBaLPsvtTg+Yg78bpDrtYOFXhFXnn3hoyLrsPnZbxzA3pxk +pa4ToOvj7EeF6Rsh0X8ryyxXgKj1y149PeIEsdeK2hTVu1Gb0LyRzt0ucE6Q +OVOV1Y0CVYNSjtI2gRy9Mu+FRg8q3tdQdzZuM3jVcuT6K3vQ4TGlqRX73OBP +LHfrU6cfaMLRftvzXe7g1SbJFlA/kMWO1PV8ty0w5GDF6S3qRe+UMtlPGR4Q +7GT9+55fH1K+cex+/l9bIcWZ7Rlh2I+qOgycXaW3AdtByfX5ZD9S/zC8N2Jg +GxTlWxgnPhtAjLOphTkd26FX3CBpeekgyhQdW5X2xBMcXqRIsdOH0J31q1vj +7nlBHTOnvcpxGGWYnZT5XeANM7szZva9GkZvvubGMxJ3QMBE0sUxxxFU6XJZ +JzjGB2hSa0TjPo2gkQNbhAJZvrDaO3PX/h2jaMJe33/QZifkJ49/iWkfRfkD +X6gw010gTzW2TQeNIc+ruXt8pfxAebZeYWRyDFWUO+2ad9wPXKPuyDieGEcW +Ku+mE6b9IGXFwOFh6QlE69jb+nbfbpBXuJH6OWkC8RYGbLrM3Q3aa4sDSuQm +UXOy6x6HrUzou1DzPfvkJEqPzF74TzMTjD/u3rd/3hS6/2B2es/GPVAgxhpd +GzyFFvvAcUb1HtDTES7PejmFLPwG8+OMWZA6uTVjrTY+py4Mh7masiDD98o9 +gkahpe9H1ymas8Bv8wXZZB0KDdpNfci3YkHIsnj2Nz0K/1+EhJusWdD+s60g +aAWFFk3JeMm6seB1/Hl6sDGFeEkmC7IPsMBNEJvcYkeh5JrofVU3WNBRvubf +NSSFDtDPW0Tms6Avw6laay+FnG+WLTAvYIH5ubzlMv4UkjwvuHm3iAV33JzS +BvZRKC50c++d2yyotna7evkAhaL1dQIqH7PA19fn4PtwCrHPv9xf/p0FMenb +0q/9R6GNiwRrQztYIPxwOjTyGIX+ihOSpnexIFTIJ8ollkKCUJOiMj4Lilsy +JCbiKLTbNXugtJ8FnxUvLbZMoJCnWFhgyU8WJLFSci+dppBDmHJwoQIB4rbK +N2suUehxdrxj2jIC1vlrmcZfptDaplGdSGUCzFyU6jZlUshI9+UXG3UCUs/N +vGjPopBSS5TNV10CTvidKxm7SqE+yzYFSRMC9lp/SuvNo9BpkSu1e7cQcDGl +3UWuAs9/tVSGy1YC3vITZWuxY3dEhjK2EyA2VfuKuE2hyNubl896E8B8OKR3 +uxLnTwqnnmMS8DI0ZpdtFYUYjUzWsxACSj0qHtFrKdSSqruQlkJAksq4in09 +hYqRtH9PKgFGuw86PMOOHRh/WnSGgD2fVh23eU4h+sanHPPzBNipPbT+uwH3 +T2jPqEsWAVkzsnm6jRSyD7ryJbKQgFFOiWTjKwqpqZ0wXVdMQKDm4QDL1xQa +bww6M6+UgPzc3O83sa/pIZfkCgK07Mp/xb2h0ExbW11ONQExt8ulGW8pdNtZ +Jf91AwEm/LTDfh8odOqniFh6IwFdB5UmHmEz83t3ezUR0HqMjNH+SKElotUq +vDcEpDhONHRg76/xPD39iYBGmR0a7i0Uohmci9DhE7B+tuzV/FYK/Wz59/0P +AQGvVf9s9MZujiOMSnoIyJAp/XgLm9Np3GvRj+vvPqHs/JVCrRnvfTeNEVD5 +uMP76DcKpc2XsTssTIJb0+fsB98pdH+0bUf4PBI6N003L2inUHdbQWigGAlv +ej592IK99rbtFeYCEkbPBHrwsAV+kb8cZUgIic03murA+TvbydrJkdDGc5gw +76SQlZmsPpInwVSfOnUIO0W6cBtDiQR9jbWrp+bGq9vLVLRIsNlo5cTrohCZ +W9ggTyPh6ssNWapc/HzKofbFuiS8V333eAu2gJSTFtUn4daxpTEP5sblHPz7 +jUiYUD/zIo5Hoeo/ckcEdBJOOt69cRub/6PjbIcxCY/JLx5d2JZ1h598MCfB +MKCdZsnH+3l/sXotkBDM5Zz6ir3IM8rkrjUJkg6qQ0ICClnYbHAusyVhlaQb +TRc7WanrUO4GEtK2eszsw64SLUnJdiThx0XpnJPY3KGovAvOJEhXM5QKsM3r +5T8mbSaBI3Ylgo/NLOvqO+5Owouv732FuymUdLlE5D8PEobaN8mrYneFbjSK +8CQhoWl23AVbeqeCQ7A3CXecddQIbPONXF+2DwnrDELlo+be1/j31E4/Ek4Z +B0XkYFdJOl7zZJIQ2i3TXjkXb0LhnjuLBHHRZ4rP5+J1ct84kyRMmR3TbJmL +11QqsPfH+Sc7TPOxmXf/nQE2CdtCpa+NzcW/5rjUaj8JN282Kwv14PhJiitM +Akmw9E7asxC7K5K3fnUwCZvmQ7Q8thSrzFM/lATlND5LHdtsEyeIFk5Cs0WU +mh4209IpXi0C9+fSn9yV2Im6yzIVI0lglR/4swb7zhJ+hcxhEsJa6vVMsTt/ +lTUujMb9eyShYTEXv5vTKcYhYXs8vdsS2/SdEzV7hASLDJsjVtj/A/3t+jI= -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk4VVsUAHCEJCqEzMNFj1K616zXXhnLVKRClG73nHSV+UnxbnqhFEIq +DagkkllKpDRJUmlUSoY7kHl2VPK2P853vt+3z1ln7bX2PluLGeROiAgJCXXh +a+4e8nrV8rvNr9exHT9fjH3IResGr5swbQvR0YTZ5jl3ZJum69jeR5cyQsLi +sDezXolLMZ6h+5xV/8Vjl0UeeSJm24QiHExnjmMn1C+rO1LwFunPS+AlYN9r +Dsn6Tf+IGuv1zBOxe1sbow/VfEYDtxZTydjKfNqOSZtviNtso5OG7TQUbRHW +1I4yPJ/cP4v94HfvwsiCTpTFTn50AfvTUcWoO4FcZMvIpWdhD4rb9o7T+ciT +O39JDrZ4YrAXY0qAEkrveOVjq8tkNoTU9KDRD2WLi7FdVSZvDNr0o1Facl01 +NnlFW8FQYhCptgbVPMI+orspLqBpCMnOZmm/wP6s+GFNeMEI+tUuMPmCzfJm +7zuTOIq6nIW6OrGHLwtdLQ8cQ8kn/X/2YktoGy4ZoU8ge+nlwX+w01lPHJbI +T6Jzf3FeSdRxkWae15HVU5NI75HueTls85XxgwdqKHRjo3+QAba/aXtTr81v +pPm1geGLPR75j6ik3gwK7iobY2PH1Cxcqy/xB0VnD2kcws4A81t7m2bRiZKA +2nPYrNwG29ACYbjmEynVgl1Qf6bjqIoINOgpre7BHu7eGZ2aKAJLFix9MI0d +bTBRURo4D0o1VLTUH+F8S7RoQ3QxSGyL/RWA3drc/+BPjhiQKVJHY7A1R+96 +L5IXh7ru8dCz2IXGrmmGU+Kgq913qQ776b3DwvtrJCBA84SI6mMumnjyvr3H +Rgrst5O0bmxZZ6klUQ+koO7HijrRJ1xk9MEWpC2kYZhDfNPGZvMqr6xZtQiI +JsszftjBIk1Gf0stgW9KF392YvO1i0fiJmVgZe3Vst9PcX3IxgVvGLJQORZg +r/2Mi0RuCbSWhciC5n/PvDdgazI03Av6ZMHeZ5XIOWxvm5Ty1x1yQCcWOZvV +c9GbPaFhii/lof5ly6vU51z0PS/5lJ+EAtySSfR5iN3fV5Bz004Bnh0YYQ9g +S4Zz31vVKYBn1Wdxpwa8DmM9jP0qFWH9Ch8rqRdcVH3ddCI/WwkilvtduNHI +Rdf5PyMsw9XAY5qysnrNRRu2Hv8eVqQGhU9ai8Kx+5/K2RcJ1IBa6nO6GNv4 ++kp5TS91aDrocJX2BteTubNCbJ0GcDgLhOWauWh0qONgzzFNiA9JLBd/x0Vy +B2xvV7hog8dz5ZH1n7hIcF3SfzNbG9QFJj4J2FXfmlUG4rWBreFk9hbbx9n3 +mF6dNjw8GPw3swXntyLC/QKdBjL82YSEz/j7vXnDHEUdiC+SXD7QykUeexca +OnbqQpRq+gmJDi5CEVvp22d0QSnE2skH2yAu24ylpAfDz38eKsUWymFYc9z0 +gLx4XsW7k4uKvu/YXv5IDxoy+UHlXXh/bis8qnxtOewcmd11kI/zs3X51MvU +h74XUZHufVyUs+X81ymOPjh7pz+pwE5mdnaIXtKHU3ZGUfL9eH3H/NOn/l4f +FDgiRq3YMvczhbbYGEB/3rFS/0G8fhiDBjW0FXC59sqSiyNcpKJ9+sgp3kqY +78AOcKW46P7Jcf1pEUNoMFlXXY/tM+b1gdQyhIgxIgFNc1HWUx19652GIBXd +kE//yUXae6vfUS2GwAiP6Vf/jedbyNclX64CwlosabEQD6mpqJOaXkZwP03g +6ybBQytzw6V+ITr0jFcUeyrzEJN1bMLQlQ4ai7ky3dgZtLTvfj508BNsEPyj +wkPzrpWU1kfSwbS5uStdlYdas3o90srokJd3eMVndR5KyPDL1KcxwDQrSSic +xkOCU86rPMWNoVHYnS9kyENXQ3U2VzaZwNL+OtGQ9TzUHIHMYnMtwLW/ltcb +xkNaOz+6+u7/G75L/1n2roiHiNk7xWqHABbfcmoP7OMhxb6q+YpMa2jXUm6u +NOWjcMbab2kGtrBaLPsvtTg+Yg78bpDrtYOFXhFXnn3hoyLrsPnZbxzA3pxk +pa4ToOvj7EeF6Rsh0X8ryyxXgKj1y149PeIEsdeK2hTVu1Gb0LyRzt0ucE6Q +OVOV1Y0CVYNSjtI2gRy9Mu+FRg8q3tdQdzZuM3jVcuT6K3vQ4TGlqRX73OBP +LHfrU6cfaMLRftvzXe7g1SbJFlA/kMWO1PV8ty0w5GDF6S3qRe+UMtlPGR4Q +7GT9+55fH1K+cex+/l9bIcWZ7Rlh2I+qOgycXaW3AdtByfX5ZD9S/zC8N2Jg +GxTlWxgnPhtAjLOphTkd26FX3CBpeekgyhQdW5X2xBMcXqRIsdOH0J31q1vj +7nlBHTOnvcpxGGWYnZT5XeANM7szZva9GkZvvubGMxJ3QMBE0sUxxxFU6XJZ +JzjGB2hSa0TjPo2gkQNbhAJZvrDaO3PX/h2jaMJe33/QZifkJ49/iWkfRfkD +X6gw010gTzW2TQeNIc+ruXt8pfxAebZeYWRyDFWUO+2ad9wPXKPuyDieGEcW +Ku+mE6b9IGXFwOFh6QlE69jb+nbfbpBXuJH6OWkC8RYGbLrM3Q3aa4sDSuQm +UXOy6x6HrUzou1DzPfvkJEqPzF74TzMTjD/u3rd/3hS6/2B2es/GPVAgxhpd +GzyFFvvAcUb1HtDTES7PejmFLPwG8+OMWZA6uTVjrTY+py4Mh7masiDD98o9 +gkahpe9H1ymas8Bv8wXZZB0KDdpNfci3YkHIsnj2Nz0K/1+EhJusWdD+s60g +aAWFFk3JeMm6seB1/Hl6sDGFeEkmC7IPsMBNEJvcYkeh5JrofVU3WNBRvubf +NSSFDtDPW0Tms6Avw6laay+FnG+WLTAvYIH5ubzlMv4UkjwvuHm3iAV33JzS +BvZRKC50c++d2yyotna7evkAhaL1dQIqH7PA19fn4PtwCrHPv9xf/p0FMenb +0q/9R6GNiwRrQztYIPxwOjTyGIX+ihOSpnexIFTIJ8ollkKCUJOiMj4Lilsy +JCbiKLTbNXugtJ8FnxUvLbZMoJCnWFhgyU8WJLFSci+dppBDmHJwoQIB4rbK +N2suUehxdrxj2jIC1vlrmcZfptDaplGdSGUCzFyU6jZlUshI9+UXG3UCUs/N +vGjPopBSS5TNV10CTvidKxm7SqE+yzYFSRMC9lp/SuvNo9BpkSu1e7cQcDGl +3UWuAs9/tVSGy1YC3vITZWuxY3dEhjK2EyA2VfuKuE2hyNubl896E8B8OKR3 +uxLnTwqnnmMS8DI0ZpdtFYUYjUzWsxACSj0qHtFrKdSSqruQlkJAksq4in09 +hYqRtH9PKgFGuw86PMOOHRh/WnSGgD2fVh23eU4h+sanHPPzBNipPbT+uwH3 +T2jPqEsWAVkzsnm6jRSyD7ryJbKQgFFOiWTjKwqpqZ0wXVdMQKDm4QDL1xQa +bww6M6+UgPzc3O83sa/pIZfkCgK07Mp/xb2h0ExbW11ONQExt8ulGW8pdNtZ +Jf91AwEm/LTDfh8odOqniFh6IwFdB5UmHmEz83t3ezUR0HqMjNH+SKElotUq +vDcEpDhONHRg76/xPD39iYBGmR0a7i0Uohmci9DhE7B+tuzV/FYK/Wz59/0P +AQGvVf9s9MZujiOMSnoIyJAp/XgLm9Np3GvRj+vvPqHs/JVCrRnvfTeNEVD5 +uMP76DcKpc2XsTssTIJb0+fsB98pdH+0bUf4PBI6N003L2inUHdbQWigGAlv +ej592IK99rbtFeYCEkbPBHrwsAV+kb8cZUgIic03murA+TvbydrJkdDGc5gw +76SQlZmsPpInwVSfOnUIO0W6cBtDiQR9jbWrp+bGq9vLVLRIsNlo5cTrohCZ +W9ggTyPh6ssNWapc/HzKofbFuiS8V333eAu2gJSTFtUn4daxpTEP5sblHPz7 +jUiYUD/zIo5Hoeo/ckcEdBJOOt69cRub/6PjbIcxCY/JLx5d2JZ1h598MCfB +MKCdZsnH+3l/sXotkBDM5Zz6ir3IM8rkrjUJkg6qQ0ICClnYbHAusyVhlaQb +TRc7WanrUO4GEtK2eszsw64SLUnJdiThx0XpnJPY3KGovAvOJEhXM5QKsM3r +5T8mbSaBI3Ylgo/NLOvqO+5Owouv732FuymUdLlE5D8PEobaN8mrYneFbjSK +8CQhoWl23AVbeqeCQ7A3CXecddQIbPONXF+2DwnrDELlo+be1/j31E4/Ek4Z +B0XkYFdJOl7zZJIQ2i3TXjkXb0LhnjuLBHHRZ4rP5+J1ct84kyRMmR3TbJmL +11QqsPfH+Sc7TPOxmXf/nQE2CdtCpa+NzcW/5rjUaj8JN282Kwv14PhJiitM +Akmw9E7asxC7K5K3fnUwCZvmQ7Q8thSrzFM/lATlND5LHdtsEyeIFk5Cs0WU +mh4209IpXi0C9+fSn9yV2Im6yzIVI0lglR/4swb7zhJ+hcxhEsJa6vVMsTt/ +lTUujMb9eyShYTEXv5vTKcYhYXs8vdsS2/SdEzV7hASLDJsjVtj/A/3t+jI= -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d8687e0f-2f42-0543-a749-78a1ff3c9572"], + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6171286606134576, 1.556697365880167}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.617128660613459}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6171286606134576, 1.556697365880167}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.617128660613459}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk4VVsUAHCEJCqEzMNFj1K616zXXhnLVKRClG73nHSV+UnxbnqhFEIq +DagkkllKpDRJUmlUSoY7kHl2VPK2P853vt+3z1ln7bX2PluLGeROiAgJCXXh +a+4e8nrV8rvNr9exHT9fjH3IResGr5swbQvR0YTZ5jl3ZJum69jeR5cyQsLi +sDezXolLMZ6h+5xV/8Vjl0UeeSJm24QiHExnjmMn1C+rO1LwFunPS+AlYN9r +Dsn6Tf+IGuv1zBOxe1sbow/VfEYDtxZTydjKfNqOSZtviNtso5OG7TQUbRHW +1I4yPJ/cP4v94HfvwsiCTpTFTn50AfvTUcWoO4FcZMvIpWdhD4rb9o7T+ciT +O39JDrZ4YrAXY0qAEkrveOVjq8tkNoTU9KDRD2WLi7FdVSZvDNr0o1Facl01 +NnlFW8FQYhCptgbVPMI+orspLqBpCMnOZmm/wP6s+GFNeMEI+tUuMPmCzfJm +7zuTOIq6nIW6OrGHLwtdLQ8cQ8kn/X/2YktoGy4ZoU8ge+nlwX+w01lPHJbI +T6Jzf3FeSdRxkWae15HVU5NI75HueTls85XxgwdqKHRjo3+QAba/aXtTr81v +pPm1geGLPR75j6ik3gwK7iobY2PH1Cxcqy/xB0VnD2kcws4A81t7m2bRiZKA +2nPYrNwG29ACYbjmEynVgl1Qf6bjqIoINOgpre7BHu7eGZ2aKAJLFix9MI0d +bTBRURo4D0o1VLTUH+F8S7RoQ3QxSGyL/RWA3drc/+BPjhiQKVJHY7A1R+96 +L5IXh7ru8dCz2IXGrmmGU+Kgq913qQ776b3DwvtrJCBA84SI6mMumnjyvr3H +Rgrst5O0bmxZZ6klUQ+koO7HijrRJ1xk9MEWpC2kYZhDfNPGZvMqr6xZtQiI +JsszftjBIk1Gf0stgW9KF392YvO1i0fiJmVgZe3Vst9PcX3IxgVvGLJQORZg +r/2Mi0RuCbSWhciC5n/PvDdgazI03Av6ZMHeZ5XIOWxvm5Ty1x1yQCcWOZvV +c9GbPaFhii/lof5ly6vU51z0PS/5lJ+EAtySSfR5iN3fV5Bz004Bnh0YYQ9g +S4Zz31vVKYBn1Wdxpwa8DmM9jP0qFWH9Ch8rqRdcVH3ddCI/WwkilvtduNHI +Rdf5PyMsw9XAY5qysnrNRRu2Hv8eVqQGhU9ai8Kx+5/K2RcJ1IBa6nO6GNv4 ++kp5TS91aDrocJX2BteTubNCbJ0GcDgLhOWauWh0qONgzzFNiA9JLBd/x0Vy +B2xvV7hog8dz5ZH1n7hIcF3SfzNbG9QFJj4J2FXfmlUG4rWBreFk9hbbx9n3 +mF6dNjw8GPw3swXntyLC/QKdBjL82YSEz/j7vXnDHEUdiC+SXD7QykUeexca +OnbqQpRq+gmJDi5CEVvp22d0QSnE2skH2yAu24ylpAfDz38eKsUWymFYc9z0 +gLx4XsW7k4uKvu/YXv5IDxoy+UHlXXh/bis8qnxtOewcmd11kI/zs3X51MvU +h74XUZHufVyUs+X81ymOPjh7pz+pwE5mdnaIXtKHU3ZGUfL9eH3H/NOn/l4f +FDgiRq3YMvczhbbYGEB/3rFS/0G8fhiDBjW0FXC59sqSiyNcpKJ9+sgp3kqY +78AOcKW46P7Jcf1pEUNoMFlXXY/tM+b1gdQyhIgxIgFNc1HWUx19652GIBXd +kE//yUXae6vfUS2GwAiP6Vf/jedbyNclX64CwlosabEQD6mpqJOaXkZwP03g +6ybBQytzw6V+ITr0jFcUeyrzEJN1bMLQlQ4ai7ky3dgZtLTvfj508BNsEPyj +wkPzrpWU1kfSwbS5uStdlYdas3o90srokJd3eMVndR5KyPDL1KcxwDQrSSic +xkOCU86rPMWNoVHYnS9kyENXQ3U2VzaZwNL+OtGQ9TzUHIHMYnMtwLW/ltcb +xkNaOz+6+u7/G75L/1n2roiHiNk7xWqHABbfcmoP7OMhxb6q+YpMa2jXUm6u +NOWjcMbab2kGtrBaLPsvtTg+Yg78bpDrtYOFXhFXnn3hoyLrsPnZbxzA3pxk +pa4ToOvj7EeF6Rsh0X8ryyxXgKj1y149PeIEsdeK2hTVu1Gb0LyRzt0ucE6Q +OVOV1Y0CVYNSjtI2gRy9Mu+FRg8q3tdQdzZuM3jVcuT6K3vQ4TGlqRX73OBP +LHfrU6cfaMLRftvzXe7g1SbJFlA/kMWO1PV8ty0w5GDF6S3qRe+UMtlPGR4Q +7GT9+55fH1K+cex+/l9bIcWZ7Rlh2I+qOgycXaW3AdtByfX5ZD9S/zC8N2Jg +GxTlWxgnPhtAjLOphTkd26FX3CBpeekgyhQdW5X2xBMcXqRIsdOH0J31q1vj +7nlBHTOnvcpxGGWYnZT5XeANM7szZva9GkZvvubGMxJ3QMBE0sUxxxFU6XJZ +JzjGB2hSa0TjPo2gkQNbhAJZvrDaO3PX/h2jaMJe33/QZifkJ49/iWkfRfkD +X6gw010gTzW2TQeNIc+ruXt8pfxAebZeYWRyDFWUO+2ad9wPXKPuyDieGEcW +Ku+mE6b9IGXFwOFh6QlE69jb+nbfbpBXuJH6OWkC8RYGbLrM3Q3aa4sDSuQm +UXOy6x6HrUzou1DzPfvkJEqPzF74TzMTjD/u3rd/3hS6/2B2es/GPVAgxhpd +GzyFFvvAcUb1HtDTES7PejmFLPwG8+OMWZA6uTVjrTY+py4Mh7masiDD98o9 +gkahpe9H1ymas8Bv8wXZZB0KDdpNfci3YkHIsnj2Nz0K/1+EhJusWdD+s60g +aAWFFk3JeMm6seB1/Hl6sDGFeEkmC7IPsMBNEJvcYkeh5JrofVU3WNBRvubf +NSSFDtDPW0Tms6Avw6laay+FnG+WLTAvYIH5ubzlMv4UkjwvuHm3iAV33JzS +BvZRKC50c++d2yyotna7evkAhaL1dQIqH7PA19fn4PtwCrHPv9xf/p0FMenb +0q/9R6GNiwRrQztYIPxwOjTyGIX+ihOSpnexIFTIJ8ollkKCUJOiMj4Lilsy +JCbiKLTbNXugtJ8FnxUvLbZMoJCnWFhgyU8WJLFSci+dppBDmHJwoQIB4rbK +N2suUehxdrxj2jIC1vlrmcZfptDaplGdSGUCzFyU6jZlUshI9+UXG3UCUs/N +vGjPopBSS5TNV10CTvidKxm7SqE+yzYFSRMC9lp/SuvNo9BpkSu1e7cQcDGl +3UWuAs9/tVSGy1YC3vITZWuxY3dEhjK2EyA2VfuKuE2hyNubl896E8B8OKR3 +uxLnTwqnnmMS8DI0ZpdtFYUYjUzWsxACSj0qHtFrKdSSqruQlkJAksq4in09 +hYqRtH9PKgFGuw86PMOOHRh/WnSGgD2fVh23eU4h+sanHPPzBNipPbT+uwH3 +T2jPqEsWAVkzsnm6jRSyD7ryJbKQgFFOiWTjKwqpqZ0wXVdMQKDm4QDL1xQa +bww6M6+UgPzc3O83sa/pIZfkCgK07Mp/xb2h0ExbW11ONQExt8ulGW8pdNtZ +Jf91AwEm/LTDfh8odOqniFh6IwFdB5UmHmEz83t3ezUR0HqMjNH+SKElotUq +vDcEpDhONHRg76/xPD39iYBGmR0a7i0Uohmci9DhE7B+tuzV/FYK/Wz59/0P +AQGvVf9s9MZujiOMSnoIyJAp/XgLm9Np3GvRj+vvPqHs/JVCrRnvfTeNEVD5 +uMP76DcKpc2XsTssTIJb0+fsB98pdH+0bUf4PBI6N003L2inUHdbQWigGAlv +ej592IK99rbtFeYCEkbPBHrwsAV+kb8cZUgIic03murA+TvbydrJkdDGc5gw +76SQlZmsPpInwVSfOnUIO0W6cBtDiQR9jbWrp+bGq9vLVLRIsNlo5cTrohCZ +W9ggTyPh6ssNWapc/HzKofbFuiS8V333eAu2gJSTFtUn4daxpTEP5sblHPz7 +jUiYUD/zIo5Hoeo/ckcEdBJOOt69cRub/6PjbIcxCY/JLx5d2JZ1h598MCfB +MKCdZsnH+3l/sXotkBDM5Zz6ir3IM8rkrjUJkg6qQ0ICClnYbHAusyVhlaQb +TRc7WanrUO4GEtK2eszsw64SLUnJdiThx0XpnJPY3KGovAvOJEhXM5QKsM3r +5T8mbSaBI3Ylgo/NLOvqO+5Owouv732FuymUdLlE5D8PEobaN8mrYneFbjSK +8CQhoWl23AVbeqeCQ7A3CXecddQIbPONXF+2DwnrDELlo+be1/j31E4/Ek4Z +B0XkYFdJOl7zZJIQ2i3TXjkXb0LhnjuLBHHRZ4rP5+J1ct84kyRMmR3TbJmL +11QqsPfH+Sc7TPOxmXf/nQE2CdtCpa+NzcW/5rjUaj8JN282Kwv14PhJiitM +Akmw9E7asxC7K5K3fnUwCZvmQ7Q8thSrzFM/lATlND5LHdtsEyeIFk5Cs0WU +mh4209IpXi0C9+fSn9yV2Im6yzIVI0lglR/4swb7zhJ+hcxhEsJa6vVMsTt/ +lTUujMb9eyShYTEXv5vTKcYhYXs8vdsS2/SdEzV7hASLDJsjVtj/A/3t+jI= -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -2.67879 2.97603 [ -[.15608 .28474 -6 -9 ] -[.15608 .28474 6 0 ] -[.28836 .28474 -6 -9 ] -[.28836 .28474 6 0 ] -[.42063 .28474 -6 -9 ] -[.42063 .28474 6 0 ] -[.55291 .28474 -9 -9 ] -[.55291 .28474 9 0 ] -[.68519 .28474 -9 -9 ] -[.68519 .28474 9 0 ] -[.81746 .28474 -9 -9 ] -[.81746 .28474 9 0 ] -[.94974 .28474 -9 -9 ] -[.94974 .28474 9 0 ] -[.01131 .14844 -24 -4.5 ] -[.01131 .14844 0 4.5 ] -[.01131 .44604 -24 -4.5 ] -[.01131 .44604 0 4.5 ] -[.01131 .59484 -18 -4.5 ] -[.01131 .59484 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 -.15608 .29724 m -.15608 .30349 L -s -[(25)] .15608 .28474 0 1 Mshowa -.28836 .29724 m -.28836 .30349 L -s -[(50)] .28836 .28474 0 1 Mshowa -.42063 .29724 m -.42063 .30349 L -s -[(75)] .42063 .28474 0 1 Mshowa -.55291 .29724 m -.55291 .30349 L -s -[(100)] .55291 .28474 0 1 Mshowa -.68519 .29724 m -.68519 .30349 L -s -[(125)] .68519 .28474 0 1 Mshowa -.81746 .29724 m -.81746 .30349 L -s -[(150)] .81746 .28474 0 1 Mshowa -.94974 .29724 m -.94974 .30349 L -s -[(175)] .94974 .28474 0 1 Mshowa -.125 Mabswid -.05026 .29724 m -.05026 .30099 L -s -.07672 .29724 m -.07672 .30099 L -s -.10317 .29724 m -.10317 .30099 L -s -.12963 .29724 m -.12963 .30099 L -s -.18254 .29724 m -.18254 .30099 L -s -.20899 .29724 m -.20899 .30099 L -s -.23545 .29724 m -.23545 .30099 L -s -.2619 .29724 m -.2619 .30099 L -s -.31481 .29724 m -.31481 .30099 L -s -.34127 .29724 m -.34127 .30099 L -s -.36772 .29724 m -.36772 .30099 L -s -.39418 .29724 m -.39418 .30099 L -s -.44709 .29724 m -.44709 .30099 L -s -.47354 .29724 m -.47354 .30099 L -s -.5 .29724 m -.5 .30099 L -s -.52646 .29724 m -.52646 .30099 L -s -.57937 .29724 m -.57937 .30099 L -s -.60582 .29724 m -.60582 .30099 L -s -.63228 .29724 m -.63228 .30099 L -s -.65873 .29724 m -.65873 .30099 L -s -.71164 .29724 m -.71164 .30099 L -s -.7381 .29724 m -.7381 .30099 L -s -.76455 .29724 m -.76455 .30099 L -s -.79101 .29724 m -.79101 .30099 L -s -.84392 .29724 m -.84392 .30099 L -s -.87037 .29724 m -.87037 .30099 L -s -.89683 .29724 m -.89683 .30099 L -s -.92328 .29724 m -.92328 .30099 L -s -.97619 .29724 m -.97619 .30099 L -s -.25 Mabswid -0 .29724 m -1 .29724 L -s -.02381 .14844 m -.03006 .14844 L -s -[(0.95)] .01131 .14844 1 0 Mshowa -.02381 .44604 m -.03006 .44604 L -s -[(1.05)] .01131 .44604 1 0 Mshowa -.02381 .59484 m -.03006 .59484 L -s -[(1.1)] .01131 .59484 1 0 Mshowa -.125 Mabswid -.02381 .02939 m -.02756 .02939 L -s -.02381 .05915 m -.02756 .05915 L -s -.02381 .08892 m -.02756 .08892 L -s -.02381 .11868 m -.02756 .11868 L -s -.02381 .1782 m -.02756 .1782 L -s -.02381 .20796 m -.02756 .20796 L -s -.02381 .23772 m -.02756 .23772 L -s -.02381 .26748 m -.02756 .26748 L -s -.02381 .327 m -.02756 .327 L -s -.02381 .35676 m -.02756 .35676 L -s -.02381 .38652 m -.02756 .38652 L -s -.02381 .41628 m -.02756 .41628 L -s -.02381 .4758 m -.02756 .4758 L -s -.02381 .50556 m -.02756 .50556 L -s -.02381 .53532 m -.02756 .53532 L -s -.02381 .56508 m -.02756 .56508 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 -.5 Mabswid -.02381 .01472 m -.02499 .01472 L -.02605 .01472 L -.02729 .01473 L -.02846 .01474 L -.03053 .01478 L -.03279 .01482 L -.03527 .01489 L -.0379 .01499 L -.04262 .0152 L -.04749 .01548 L -.05205 .0158 L -.06244 .01675 L -.07305 .01801 L -.08274 .01944 L -.10458 .02358 L -.12357 .02821 L -.14429 .03435 L -.18493 .04963 L -.22406 .06826 L -.26565 .09204 L -.30571 .11858 L -.34426 .14717 L -.38527 .1805 L -.42475 .215 L -.46273 .24996 L -.50315 .28853 L -.54206 .3264 L -.58342 .36674 L -.62326 .40497 L -.66159 .44044 L -.70238 .47601 L -.74164 .50741 L -.77939 .53432 L -.8196 .55879 L -.85828 .57771 L -.87793 .58543 L -.89942 .59234 L -.91995 .59741 L -.92911 .59917 L -.93905 .60073 L -.94426 .60141 L -.94906 .60194 L -.95356 .60236 L -.95851 .60273 L -.96295 .60299 L -.9671 .60316 L -.96939 .60323 L -.97148 .60328 L -.97264 .6033 L -Mistroke -.9739 .60331 L -.97509 .60332 L -.97619 .60332 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzVnGdgVUUWgENekkeIRCAEpWhiqAkEkIBUQekGYaUsZRdBmgYQRMSyCkhR -6VKWjgIKSFmpsiIIuLqr0lEUld5xBZQm0pl957yZc++83DPzsuLK/sjk3Zlv -zjn3zNyp907TTv2yuvXq1K97l07Jjfp26pPVvcszyQ2f6huI8uWKiMh1MPCX -mhwRFfgtIiK0YKy4Lg5BEPgtxA1xCILf73c6/vOBbfALrzBc/n+UHhNMDvxa -4opNoNi3eFl5IYwjchpPJkKYm8iJPFkUQj+RY3kyWbd+FE+WhDCayGEuEsFU -PX0oL6mcTg7iyYoQRhE5gCczdPJFnryPLMbrF3iymi7zWZ6sqZN9ebK2rr0P -Tz6gy+zFk/V0mT15soEuM4snG+syH+fJTJ3sGlovHtbTO/OSmunkYzz5iE52 -4MkWOtmeJ1vp5J94srVOtuXJtjrZmidRXSSRf+TJP+syW/LkozrZnCc76uQf -eLKTbmcznuysy3w4tF501dMzQ9Mf19Mb85qydJsa8WR3XWYDnuypy6zPk0/q -MuvyZG9d5oM8+ZQusw5PPq3LrM2TfXWZtXiyny6zJk8+q8uszpPP6zKr8eQL -usz7QuvFi7qkKrykl3RJGTw5QJdZiScH6uS9PPmyrr0CTw7WZZbnySE6mc6T -Q3XtZYNkoiSvXrlKZKJH7ld1PWnB3JH4L1qMGztOlC5dWpQpU0b06NFD3Lh+ -IxALaVHiyuUrombNmqJEiRLiyOEjUTLL0iVLMUvx4sVFlSpVxJLFSyJiMC1G -zJg+Q9StW1eULFlSpKaminr16onPPv0st4ddr+l2pQbtivAjsPqD1eKhhx4S -F36+gDfYs2dPMWL4CDLtx1M/iri44Ehrw+cb/FL+nt17xBNPPCG6dOkiUb9Y -tHCR2L9vv9Irdn69U5QtW1bs+HJHhN/DrmG6t0tLu3wINGrUSHyx/QvpPp84 -d/acSElJkZ4Jxh0/dlzs+m4XXsXKuObNm4sVy1fglXJGwG9gqPRcdkNG6A4q -RYZcu3pNFC1aFMvKJzPWqlVLfPftd3iVT8Zt3LBR1KlTR1MKhtWuXZtVOlJX -WpKUnjxxUlSsWFFmCYYdOnQQaz9ci1e3SXef/um0aNu2LdaQChUqoPsLFiwo -Ll+6TEYsfnex6Nixo2MEDmNG6o4vTqoP7D8gqlevrqnOysoSy5Yu01Q3adJE -TJo4Ce/lzOkzomnTpiI2NlYcPXJU5vND4Ynp06aL69euI7d71240dfOmzZ61 -YYzujxQy6tTJU57+WLd2HV7FybjDhw5jdYMrVWvAl/Hx8VBTZN4YMXfOXLxJ -8Fm5cuVE1apV4SnwenJe1226x1oxVG1UNn3y8SeiRYsWmu2FChXCB95tJ9g0 -dcpULa/bkLG6Icnao9K4cWOxfdt27VGBlsQpMZ84dPCQKF++vKZ0y+YtokGD -BppxNkPG6YYkaW3JmtVrRMOGDcX5c+fxDqGZGzN6TES89DxUk8mTJiMbqCoi -IyMDHp2oMHVP0HXfpbev48eNx8YQ6livXr2waOJlGtTR9u3bYzoU+8r3VlIj -AlqLFCkCVSFwFQxl1dIaG7clf9UtKRa0xKtHmaiTRXlykk4W4ckpOnknT07V -yTt4cppOFuLJ6TqZ6CIRnKE3Lgm8pDd1SQV4cqZO5ufJWTqZjydn6+TtPPmW -Tsbz5Ns6mZcn5+pkHE/O08k8PPmOTsby5HydzM2TC3TSz5MLdTImtF4s0tOj -eUnv6qSPJxfrZCRPLtHJXDy5VCe9oWUE3eCh5QRd56EVBF3jofcIuspDKwm6 -wkPvE3SJh1YRdJGHPiDol9CiXk1JF0KT1lDSz7zoDwk6z0NrCTrHQ+sIOstD -6wk6w0MfEXSahyrIuG7duuFQrHLlyoErCONwEA3DBsniCBo6yLS0NBrC9evX -D4dvwSG638gEHyDveYWyDYZDMO6Cq6gwZMbRTd4ppQdmI2A//kGO/PnzB3rc -4H2NHDGS7tw+y4nGXjU9PR3HITBMOPHDiYgkq55otx7l2cDdeHsVxj6DXh6E -Q4tSpUqhrNatW+MAMNmqK4+my+Ap0y3Z1eiu8xkKy3Q7hj5D1UMYEsPQOTAh -kmriRLVq1TSP7d2zF8ZD4uIv+LDjJHDgwIGiXbt2VA9NTNDUGG4iqcwbPGiw -GD5suHZ3JrG3UVUsIiXAhKJVq1bSu0alyiaYIMIQ/9jRY6hg/jvzRWZmZoqH -xCjWZf5sLgNNs2bOgrkxDaZhzgnz8EsXL0Xw8sNzJWN2cQ+xfta9PquZhqGE -mm0F6jOuPATEkIixr49VkzpSDx4Dz8FVukdcpLwzOavXHtfArF5l+fabb1Ed -XOXxEOO0T4UNlYJRotwy7LVh2Ew5dumT+mRWdPj+6N27t5jz9hy8usdDntfN -RYZpn5c8v8GBblsMY8J7ZRwsK0CFHz1qNM3CApVTrF+33lW8fncc/tnWSsrJ -OGgqYTbqmKPLz+thWyHDA2vTq1wItSIwS9bi+vfvTzNOr2KPMfhk2tRp+ODa -ith9b+Ha4iUvt8F/blsMRVxJxsEDASsgE8ZPIDOhF4PlH6eIY9xx+CdXppTn -3YtSqnRfGfoKPhBu69yi4+kJNpWpbQlM+Qy6TJjbu+NmvjkTfcmVqd/gBFg3 -gBbTVqbuOwrXFlOZennNbYuhTDNk3NkzZ9GswIiE+pFRI0eJfXv3IQstFHQS -zZo1SzMnK4fbFgNVkcOYBR44pwBZ0fmp9BM9vBEVpmLl3aSkJBiLaXEL5i8Q -ffr0YUs/N+suv1i4YKHWoq16fxUuOZ8/d96zS48232xUmGaaKkZ235rNNHTp -lWXcpo2bcMnT8W4Mjmxh+Ar/YXQA3g48H2nmZFU2tgVaZQ0MYr8//n04mgtQ -RSloqCg2xcrbMJbyejQHDBjAVpRYg7u6du2KTTg0xTAih+XwwGTBa3wWbb7P -qDAt9KojsQa3Mha6pwxYO6rIXAUKFIAOVNMv651WhO441Tna1sJVXhjXTJk8 -RSstt7xCVOYJhjK3aVPWy0VxLQ6aYugquTLPY/AGeFQNKUqxBa3fkT9MW0yl -6+U1ty2G1Ug1C9y6ZasYOmSoph629WBbkSsMrwL3y2J33Q7+yf2GNJkFkmBD -zK0Omsf69euz6u6gss8nS1ven/JJjFm3qh0wBVIdqbseq3n13d7So3PoKXcB -lDAZ7F0fbFYmma0M18E5qiZ+8c3Ob3AjBHZxoBuDQS/spga6N3r6wq0izE6Q -qiJvzHiDpjjKWhhfQ4PONUF3UhVRuzpA16hRQ7Rs2VLMnjUbXETb44wBanwC -7SUM2ORAWsybOw92p5IMkqNz4Ca354tbrfV2IWNistXE8N0bZgWpKC3atnUb -diqFCxfGTgWqcKCZVDcNS37Qj8EWWqTcSAPrlJgyYXI+eYdeG3ruCgS9QKD3 -j/DJMCEhAdeD3Hdo01WQKtXtMgfs2GZmZqI//QZL1AogjMRAAxQVNE6BqQu1 -525ZMeE5EYoEVLl3I6GNUwYnsaLDd6yXySkecqNz6Gyb7YZtpi1UDod5aCtB -hpegtxF0kIe2E3SAh74gaD8PfUnQPh7aQdBeHvqKoD089DVBwZ4iWG4CItZD -YNjXivWIy03i8oSZ41aSEpLj1+QNSfVRatRvZv2tJOXmeNKwIXEr3eyt5DKv -HFGU6vvNrL+VpPzmla+aR1xVyljdI7UMpcbnOK+XtkTeuF0kbCcP7Sboax7a -Q9BXPLSXoB08tN8jbjuPH/CI28bjBz3itvL4IbLYAB0maIsLQuYIJW3m8x8l -aBMPHSNoIw8dJ2gDD31P0Oc89G+CPuOhHwj6lIdOEPQvHjpJ0D956BRBn/DQ -jwR9zEM/EfQPHjpN0EehxXqGktaHJp2lpHW86HMEreWh8wR9yEM/E7SGhy4Q -tJqHfiHoAx66SNAqHrpE0Ps8dJmgv/PQFYJW8tBVgt7joWsErQgtseuUtDw0 -6QYlLeNFY5jLI2GxJU+kR8K7ljzO4NBGOj353yxkNJGLLGQMkQstpJ/IBRbS -6UXnW8hYIt+xkE5fPs9COpv6cy2k807InNBqgul5Kf1tiyRnG9LwjSmGtxM5 -20LmI3KWhXR2N960kAlEvmEhnZWMGRYykcjpFtJZkZff1+b4hbBsn7YE1yq8 -X5xSi3M5+LQFQ2fxOLh7TuPm7Fv52b5nUfszzCs3as8tp5+2YOisWE7h7VK5 -3d+yqIUX25sgKq/t+xYMC5M1k3lr1CqY7QUFpdn2kQuGRUjzJLtm2za60uz9 -ZUuIvol2fbbd2UipNaefs2B4F1kywW6JbQ9QvUOVg+9XMLybjBhvN8K2VRXu -BysYJpHmcdR+ABCyr0GfUdn2RXKkPJmUjyXlXovm+aRbmfX2cD9OwfAe0vl6 -UKey2L2sml8+417LsG5tOf0oBcMUsmBM0AK2cS9O5GgLWZLIkRayFJEjLGRp -IodbSGcuPsxCphL5mot0hgdplP6qRVJZymg4kAHDdJI5xEKWJ3KwhaxA5CAL -WZHsHGghK5FMw3EQGGYQ2d9CVibyJQtZhez8i4V01lYMR0xgWI3I5y1kdSKf -86wXNeiyn2d6Lcr/jEXT/UQaDrPAsDapMBxmgeEDJPMpC/kgyexlIeuRzCct -ZH0iDQdkYNiAtHe3kI1IpuEoDQyd8zQMR2lgmEkyu1nIJkRmO3QD052TNzp7 -pjej/J0smh4hsqOFbE4qHrWQLUmm4VAODJ2TOQyHcmDonMxhOJQDw7akvY2F -bEcyDYdyYOiczGE4lAPDR0l7CwvZgWQ+YiEfI9JwKAeGzskc2Q7lwHTnZI5M -iyTnjA7D8RwYZhHZ0EL2INJw6AaGzskbhkM3MMSTN3BYXcdCPk0y77eQz5DM -GhbyOZIpj70I7gn86hmoOtgAhmNKjN/vVxLatGlDEthR1gt0F/IgjbySDGPG -qcbp8gttvGLH7i+Rokq8Iq8pZI604OABj5Yqz2spkBOJg0li2f9CojOVe4Xk -lL5JluHAFI/uSrlJEnGgjQeMFbtJEvHz8niIl98vx8mqFDJxUu/KwVcfUgAo -8No8wxBXhrAixumPFD8vihKdO3fGl4eWL1sO78GxwuXKrTpwIPuMx4ffPsGL -r8WKFfPc4XPLYduF/1E6/v4dDvaLyPUfxyNRZA==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-19.402618477936908, \ -0.8923747627909967, 0.7099700316630947, \ -0.001262238128389079}},ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-\ -c578eb57eb6a"] + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6171286606134576, 1.556697365880167}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.617128660613459}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.617128660613459}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6171286606134576, 1.556697365880167}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994350592343973*^9, 3.994353035202258*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"461c9ad4-05ca-4bff-b657-2d53a3d68ad5"] }, Open ]], Cell[CellGroupData[{ @@ -6619,444 +6574,560 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505781608486`*^9},ExpressionUUID->"4b73592e-b155-8f42-b33d-\ -562f8b3faecd"], + CellChangeTimes->{3.9918505781608486`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2933589687307733`*^-270\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 9, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943505928813562`*^9, 3.994353035753537*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"6920b9d0-0fed-4902-b6a4-da6318e36848"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"a2ecd22c-b766-5347-9e03-9d459620be75"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.757430182735487`*^-281\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 10, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943505928813562`*^9, 3.9943530357629747`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"a7cdc4e6-4850-43a8-ba1a-dc49e875c155"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.156158617394812`*^-292\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 11, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943505928813562`*^9, 3.9943530357726316`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"e038f56e-60ff-483f-ad87-a6df92f924fa"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 6.72103 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .14914 -24 -4.5 ] -[.01131 .14914 0 4.5 ] -[.01131 .28356 -24 -4.5 ] -[.01131 .28356 0 4.5 ] -[.01131 .41798 -24 -4.5 ] -[.01131 .41798 0 4.5 ] -[.01131 .5524 -24 -4.5 ] -[.01131 .5524 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .14914 m -.03006 .14914 L -s -[(0.02)] .01131 .14914 1 0 Mshowa -.02381 .28356 m -.03006 .28356 L -s -[(0.04)] .01131 .28356 1 0 Mshowa -.02381 .41798 m -.03006 .41798 L -s -[(0.06)] .01131 .41798 1 0 Mshowa -.02381 .5524 m -.03006 .5524 L -s -[(0.08)] .01131 .5524 1 0 Mshowa -.125 Mabswid -.02381 .04832 m -.02756 .04832 L -s -.02381 .08193 m -.02756 .08193 L -s -.02381 .11553 m -.02756 .11553 L -s -.02381 .18274 m -.02756 .18274 L -s -.02381 .21635 m -.02756 .21635 L -s -.02381 .24995 m -.02756 .24995 L -s -.02381 .31716 m -.02756 .31716 L -s -.02381 .35077 m -.02756 .35077 L -s -.02381 .38437 m -.02756 .38437 L -s -.02381 .45158 m -.02756 .45158 L -s -.02381 .48519 m -.02756 .48519 L -s -.02381 .51879 m -.02756 .51879 L -s -.02381 .586 m -.02756 .586 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 -.5 Mabswid -.02381 .01472 m -.06244 .18263 L -.10458 .34796 L -.12507 .41668 L -.14415 .47199 L -.16371 .51906 L -.18221 .55405 L -.192 .56876 L -.20263 .58172 L -.21228 .59082 L -.2212 .59698 L -.22586 .59936 L -.22843 .60043 L -.23087 .60129 L -.23313 .60195 L -.2356 .60252 L -.23669 .60272 L -.23784 .6029 L -.23886 .60304 L -.23993 .60315 L -.24059 .6032 L -.24132 .60325 L -.2426 .60331 L -.24332 .60332 L -.2441 .60332 L -.24483 .6033 L -.2455 .60328 L -.24679 .6032 L -.24752 .60314 L -.24819 .60307 L -.25074 .60272 L -.253 .60228 L -.2555 .60165 L -.26055 .59995 L -.26547 .59774 L -.27064 .59486 L -.2799 .58832 L -.30075 .56765 L -.3205 .54159 L -.33886 .51282 L -.37791 .44198 L -.41941 .36071 L -.45939 .28487 L -.49785 .21945 L -.53877 .16105 L -.57818 .1166 L -.61606 .08416 L -.63714 .07001 L -.6564 .05921 L -.69523 .04269 L -Mistroke -.71425 .03672 L -.73499 .0315 L -.7547 .02757 L -.77569 .0243 L -.79714 .02174 L -.81732 .01991 L -.83744 .01853 L -.85592 .01756 L -.87479 .01681 L -.89546 .0162 L -.91501 .01578 L -.93594 .01545 L -.95662 .01522 L -.97619 .01507 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzVXGmUFEUSbug5kEFuQRiRWxgYDmFmGJiBEVRuWFhwXcHHcx6HKCCzAquy -gLq8VZBBDmVRkFMRlCcCgoAil7sIrByK3Mdws3LfN+R2RFdFVZaRmd1t43N/ -TE9VVHzxfRmZlVUZVd3tsgf27tkve+Bz3bMrtHgxO6f3c90HVGje/8WAyZ/P -58t3IPCXVMEXE9gWPp/0MUbcFgfhI7AtxB1xED7C3+6P/+LFnt17xPPPPy9q -1KghqlWrJurUqSMGDhworl+77stAn1hx+NBhkZKSgn/gV6xYMV9+2PP5xVsj -3wIv9Mxv+Y8dMxZjVa9eHWPfuX3Hl2qMVdAdS6crDUP5Rc+ePUXJkiUtIcHP -hIQEcevmLcvDJIeLkeCOYZJixYkX27dtR58GDRqIevXqoe/wvw8XN2/cDChQ -64iVe2Pvnr1i0ReLxNUrV5E6ABfDhg0TTz31lK+JJXnL5i2ic+fOVlD4jBPL -li4TrVq1EpcvXUZMnz59xMgRI9MZSEwIVHaGDx08JOrWrSsWLlhoZdMv0tPT -KcP59fSpyjAJ7jD4p5NjJzlvf57YtXMXYS6cv4BJzsnJsZqllGLleZClCNSA -KtjL1OS1RYsWaHczVqpUictrQSa0nYATP58QqampYtrUaVbO/GLM24GT+NZt -KY8KurQQw8QzEmypN67fEJUrV3adGEo6T64CPSBWfLNCmasYywa9mZiYiMPa -HiyZmZli546duJemSZqbw/Y7e+YsjpLcUblWf5g5UhlsAsNhZ2XCuxNE69at -XZ1g5vDL6alVqxYOTFN6Tp44iR3jhPCLbt26ieVfLzemx83RwLJBZzVs2FCM -Hzc+bA43luNIs5TDbFWiRAnRrFkzGFD+EGmsDOVYw2zUW6PEvr37cIjBUH39 -tddF+/btufnMbggIAYFuht69e4v5n89XJitWT9fIgpw/dx7b+s3ybyi0ia4B -g43R09kj7NLFS2LEmyNgwg+5dZ78wfWmefPm+D8pKQldAz2oy9+pk6fYHgoI -N+ZPQZdhQTas34BXOfcpY6JLZ7B+PZ3dXVlZWXTmhUon5S948lpTnK9pBBOY -dcnRJE3myLIm4+LFi0Msml5N8e0B4cJRk93xG1u2AQMGiI9nfRzS5GVzaFKT -ZSXDyrbdzDirn1q2bCk2b9pMrYE5pEqVKmk6lExgt2/j9xvxsu3WffrU6V9c -nhSMqWGF4VP37LPPisWLFodCF6vOWBNrCMB4bNSokejUqZOYPm06tN9np+2r -ZV/h8L544SJeg+HGb3Tu6FQjlMtd8D6zbNmyGBZmG7jQdezYEWYhmpG0lKGE -kKnTLdwPW37AO6uDB3AJIbb9tE1UrVoV8CZqTw7hBjg5ORn+Aj0Hn35MgM1o -TzVrVq/BqzMkJd5K2Lix45AVLk39+vXDgd6A8Y8LkSvVUr5p4ya8HypTpgze -vMN9VSB2rIY2TQ+NCVFBikUx99O5onHjxniBgfwHJkurFTy9lVTVAq+WRQ9r -RpsKPxf8fxyvFLQGDq+Aj3w6K8bKD4ZCTNSEcGxOFOXWvb+W47ew/U7Vx7ht -8FcODPdoFSd4O/kx2nqcIXqUsT3G2HCWKQamxnebqj58FgJTjCoKT48OLeGj -IOw+wx5vBh8FYLe367ifjuNUHg+7L/Cnns/2xKk+DvYHGDxx0oqF/ZcNnnXJ -c4jbM8btSVKT4QMPvWZ2rk6Rh/PONgA2HqLIb5idK5PzSJdzLB2vQAnOZY8/ -SMffdpPFege/k6VEYhwbIqIMcbwTIqI0ISaoUyCNrBKkaiLfy7CXn7HhZ1EK -NikCdGFSOzkCdCFCTzGgndYmEGZayJiCtDtDjfGrVMYR48wI0LHE/ZEB7eiN -IcZZIWOc3dkujF81nd2ho3NCcb9N0T9VK+KAtwg41wBEp5u09ZnaPZaxXSPg -vPCAVwn4eXjAKwScbwCik+OuubVy3C/T1kK1exxjO0/AReEBzxFwsQGITo77 -l6G4n6WtJWr3eMZ2ioBLwwOeJOAy7wjn3H8m968NPOjkuC9XuxdgbMcZm4aR -C3GMsYWp4ijJX2EAopPjvjIU9yO0tUrtfg9jO0jA1eEBDxBwjQGITo77t6G4 -59HWv4LuumdowbkiBlfWGRkZUJ2A52n2IhHKX7B4rF27Ni7CT/x8gi4eR48c -RQWBYz77WRksKIcMGaI8bQsytn2MzWpocAirHsCQeCjRwBM2iLDuu3V21fHY -0WO4SgahEGb2x7NhLW9P/IEIuMa+dPESXfSXLlkatv69jM3KfDBX9kMRYrEe -ilg5DtpArF1Rs21vvvEmdhrsuat28mODOPH+e+9j8RcqP8C3Y/sOKEVxEwfX -gD00YNaSbNMTC3tRDE2zKlwkERL43sT3rM4J2j6c+SH2xZHDR9hTwrnpcdR8 -R2pMTwdsNTVr1hTnzp6T1EydMpW61E7snNlz0BeGM04EeEPK5WYnqVlHavL2 -62vttpry5cvDA11JDTDn5Nhl+KDtg8kfiKZNm2KuuT7jlr47SNd60mWqYdu6 -oB+4LA0dOhT3bA1Q91ry5RLlycDp2k66NhjHkj3cbV2uaqk0lmB4u3WNzh1N -VVqlLtTgqPmPdEJaTNIJCTMf7NnFDHjCAmU378m3e9duyQYlc+thDdn69+8v -ZkyfEYLCbbT1vTTlKaqevsJWzOPHjuMItiunsz6aJdq1a2c/ic/OzhZdu3bF -EwcOQzfC3Hzm9Bl2iHE1rq2MzUqjfUXhaohFrGPwXBRGGqiEfAekUE0XRgT0 -IJwhFStWFG3atIHRwF37OWU/UtI2BvVwF0Sn2OO4bwrF/Qfa2qx250pemxmb -hpELsYm4t4QH3CjL1wBdiZCPahgLq4aCk9/QgRsIuNUFRB+lOzcANIzOBIRb -P4Xivl4+J3n3IoxtLQG3RwD02EzczmUat3ao3Ysytm8JuDMCIHcJCj3EGuLe -ZQA6d8a4tVvtXoyxrWJsGkYuxErGFqaKFSR/rwHorGtwa5/avThjW87Y3Ix4 -hAN+TYz7w2P8ioB5BqBrfSof1TCWYGxLKdiBCIAem0Y0F2IJcWuegZUgJ8f9 -kNq9JGNbzNg0jFyIRcR9OAKgx2aS79RsnDU0734fY1tAwKMRAD22MLnnE/cx -A9BV/2LqEe4TrBTjNI9CHFfzKIEem0ZqKeLhgCZup3rpFIp499KMbS5j+294 -IT4l7hMGoKsuKx81iXYqwbh1Uu1+P2ObTcBTEQA9NhO3UxLHrdNB9ygXcOxj -8NoUvDNdtGhR9Bk8eDC7OPAo8xy1snJXSjX2gqBDhw7iQF5w9ucUlmFsH5Hq -M5bCaBdj4twVEfxbtXIVvGqFr8sGIEWKFMG3N1566aWQZX9Iss+S7MiLMfHu -Ygz+wcIfOvvqlauUgpDS63oqJB910hutMo2dXqjQWUtw/LN0OhUbZ2Q6aTtH -cvKiVKex5Vy5fAWbB+9feuV4clKWsc1gbE4fR6t4Y39DYeI/J2IJwyWUra1z -SqdTMs8bx2C4RRxbH0wOaWlp+P6rUZ/raah81OlssESjrBNjfUJBBd67NXUy -SnMSdkGaDSOs4sRZGuCNzSZNmuCfQkMiY5vK2KyOjLRwY88KXyz8AsOqeouT -M4WSczEogrv6JZITp/5CKECH55La/QHGNpmxaaRyISYR92UDEJ04RpNo11sP -8lENYznGNpGCXY0A6LFdcYXAI+UousNzTc3zIGObwNg0UrkQ7xL39QiAHptJ -PvI4jDfU7uUZ23jGphHNhRhH3DcjAHpsJvnI4zDeUrtXYGxjGJtGNBfibeK+ -HQHQYzPJRx6H8Y7avSJjy2VsGtFciFHELbynWkU65HHKZ6BwMJ6jQg2sxNhG -yLT5I0BzAjTyKxGjh9uvxlRmbG+ouDVt4OL8Q1YRY0Cjp5Jb04YqjG24zB0b -AZpToWlDFWL0cMeFjOEYNcqrMrbXZO74CNCcCncb8HBV4vEwFvB6PsTEHKbi -0ejl4gyVue8xoNFTyV1Aja7G2P4mcxeMAM2p0LSBizNYVpFgQKOnklvThuqM -7WWZu1AEaE6Fpg3VidHDfa8ak8TY/qrittoQ5ZKS/Z0W+Ipw27ZtMRys7lat -XMWuEzjJg+QGB9dId/MVoHiMBM2AdRocztufh9kI/GcLIUkkUZlfq598d/fN -H9s25YMpYtCgQZJt/Ljx4tVXX7Uy8EuZNRjbADn3RagR0XoPyLbBGIOXrNy2 -BfMXiO7duzuCsbbDDZEBqqwXJsHRrUH5cYTDCyduG9RackflcoIxh55sFiVx -ML6iV5GKx7eGYLzC1/ygKgXfP4TvKsL357jxW0OWyGXS6fpoVaTs8hl08eRJ -k/HlGCg7d+nSBV6c4aaHmowtR05qMeMQDbcyZdtmzphJw5F7xakmCfmLKolO -j4M5mm8bXbt6DSffQOJYccmM7QU5c8Utcb+qRGXPuzAYoDPhdzYC2rhX+5SS -uMxZ3Rppncq+RsF8D+8/wVwLf4Gxxp4QyZQaT5KCz4Lp1tn1nWt2TuUuy31V -bbQ6gMNwtj6yspIGNHoquUuo0bUZ23OqOBoVXJzechtKGdDoqeS+T42uw9h6 -ydylXWh0VGI47lIsGqN7eO5Xq6zL2HqoGEuHF6e7rKKMAY2eSm5NGx5mbNky -d9nw0M/I6EQDGj2zVco13PUYWzeZ+4EI0JwKTRvqEaOHu5waU5+xPa3i1rSh -PjE+LXM/qMakMLYuKm5NG1KIsYvMXd57ZqUy6D+rGDXKuThPquKUN8RBvU/K -yiuqMWmM7QkVdwVDHGR8QuaupMY0YGydVNyaNnBx/iirqGxAo6eSW9OGdMbW -QeauYkCjZ0cVt0Z5Q8bWXuauakCjpwfzUMgYTq+GsRFjayNzVzOg0bOtitut -HA9nMJ6tZMbqasYM8vRgktSYTMbWQqVXw51JjC1k7hpqTGPG9piMrmlAoyf3 -rX8TdxPG1kzmTjag0ZP7dQGT8izG9ogqjkZFFql4RFZeW43heLhc4GcwwN0q -bUHVAlZksNqBN6cmvT+JLW05jWsiNzN4n3l3C1rr163Hw9ZP9eHbFfA1nsB6 -nF3/NCWJmbLYupbY36aM1atXL/HJnE8kG/jA7+0F260Y/soJFPcfpkZEu4z1 -yiuvYOrdNvgRJMBrBaM4bqb2ZD26Zax4sfXHrViQtZfxgIERHljOBwcGlrC4 -nDoXcNyvRxLz9kenmGW/EQSVCL/fjwMrPj4eapjsCeb8tolHWn2SFt3SVTwW -R8AXuhy2V69ajfPA/n372dOK+8GWFFlsinFsRlq/ggb07dtXskGd2G4UNzad -6xh3t+zJLpijWdN6Z/w7+KqV2zbvs3miR48eSsGPk2BuUSRlOCpfqIPXI+Gn -BOE3ZeEwjDC4gATOR3YENGdszoIb94Nrg4hLXfZ1ae2/1+ILYvBjh3CGB+ZR -9rRpTuweHcH7e/by69wc1ZYx6WpMS/JMljEN1ZhWjC1JRjcyoNHTg8lQY1qT -ZzUZk6nGODfTVWVMYzWmLXlWljFN1Jh25FlRxmS5MAhxlhblZc9H1NH/QJ7l -ZExTNcZZciXKmGZqTEfyvJ/04pFH1ZhOhLlP5nlcjelM0YvJPM3VmD+RJ06u -MYRpqcZg6QF/CimGtvBIGzWmK3wWIM/2ak/8/J38TJ7pOG4bfgvel+9/Sn8S -OQ==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-3.233775858153751, \ --0.007969775184554129, 0.11832856225129938, \ -0.0005589111396958131}},ExpressionUUID->"06204099-db57-8e4e-bcc4-\ -fa1ae37c0063"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 95, 12, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943505928813562`*^9, 3.994353035781427*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"ebd0d93d-70ee-4ab6-9af4-299ddc0fcd82"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-\ -04dec8739bf5"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VO8bAHCRVCL7boy9ZKcZM2Y8jyV7kihbWYpsKVkKKWWNFqlvpJKE +byLL3EmJNloUqSyhjSgJWbLWl/rd31/3fM497znPe99nea+y/16XAF4eHp5N +S3h4/v+c/fT8sVpmkRkn2ExJUNzarCNfJta8+xiw3G3u3Ac1QMlX/jLd2XAl +4du902AMMc43uvi6CyHzVJtHOFiB6Jh09q8uDnRtO7+KBq7QW++0d7qrAWyS +NiXEm+0Ca7Xhj5NdbUCs+fi6yDQKfnXR/5no6gfjN7l12/STodHy36I3hVNg +tjFNOLPzHCj01g76ay/CJlP1GcFD+SAR5nNDwJIP6UrXKC9rrkG2gXWdk9ty +TEvZOLzF4Dr05Oo/nBQRwsNhR4zuTZdBXnvZ6hh1IfS0PflXYmk5eApr+vxm +CKFvvYrxLvFy+JCk+Id3pxBuubisacigHPrCV7IkbgmhpWeOUUZ4OQxZfblN +8xBGR6FD41qD5TA/kVMZf3U1+vy2ympuvQmZRUde8cqKopP62/6O5EqwNw4W +k1QVxYObbTZVnqmE5Y9d3DR1RDEpzqIqMb8SkgfU3zuYi+KEwSrr5Xcq4ZBK +y+C5YFF0We2acGO4EsILZP5o3BVF+odlqQqaVbD5UrW2g5cY+n14kklPqwLp +cwPHz14Wx5xmM6sgRjXIrLuVPF8iji17izw2m1WDXEPqke1V4tg4ZWdPs6wG +ysTaaM1Gcex/rVA35VgN6o77fOuGxLHQ/XYzy7cajJYu0gaMJLDmZKuxQGo1 +bIqS+mL4QgJPHxP9GNtaDc6CQ59y2iWw0iA08GNbNbgU1vYsfJBAr8TAelZX +NWx97f3q6bgEet553zLWWw3bta/d9ZSURJf3m2Kok9UQ+kXvzDFfSdzpp1tc +K8aBNFc7s7ZZSTTcuPn8IxcOyHFb5XiXSGHoHN19cisHKsRd5wwEpfD5W0Wq +ghcH3rbtqDqjJIU3zDQf+e/kgNrmKJXNtlKYXhtmyY3kQMPGK8teX5DCEzs+ +rQ06y4FF65nWlyxpDDHy/y32igNZJXFli9bS6GNXb3utjVy/jCddZ7M0VoDV +Rd23HHB8stL8ZIA0vtdfv5H2kQN5llTC8ZQ0Bood+LZihAMm6JDT3CuN25f5 +iDfwExDJuOrz/JgMWrzy//cAnQD7AuFphxMyuHuUNkxjEqAicCi99R8Z1N+0 +7P0ki4DXHVur26/LYPX4nWeeFgTo7lvF96lVBvNuEp3zjgQMlRwo+SknizN/ +nAQD/Qh4IPSVGa0mi18/iGzp20nA+SiXV3M6sugjLei0NZCADRY68wsoi/my +uj7rQwko/NhvJ7BbFh3itH49iCLAW8LphzwhiwaCfUECaQQYxdcdza+XxWV5 +MxLs4wSs7F8jpfxUFktsVsaHZxJQW8kHGj2y2FogfeDxaQKkHGqz9P/KIit5 +F4udS8Z/VM14g4MchkTU7fG/ToDV+O+48AE5VHznZXvkCQGxtue0Ho3K4YoN +8m/UnhFQcVXnnfisHL74/mTT0yYCZFx9GbXL5VFYb5vBYjMBo3eezPHpyiNl +fmUOs42As8eyoi4clEehvqWHpz8S0PR+rdroUXm85XOY49FLwIJxY7tZpjxO +PfP/drePgMBvM4ZfLsvjtBbDLWKAAKaj16RuozxKiiy6VgwR0C+pEf5YSAHp +mcvTg38SIL33gaK0tAIeLnspe3qKAMcm95fBVAU0fdlwu2qagJq4TO3VRgp4 +rt1DfmiWgIzeiWEPdwXc+69tjuZ/5HmYZOSV+ylg83h2gc4CAdNnVO3/hihg +6P7Aer1FAnZYbS0tSlDA9lejumv+EmBYWrd7vFAB5XvOSg3zcmE3r5u0RbkC +fg9iNb/m48Ilr7Gn524poG6lxAViKReWCStrMJsU0N/sftKeZVx4tz/1S/IP +BXx0UuEmZwUXVrconeuaVcCvJX6WcSu5YKVea6nFo4iyz5t+sQW5UNE1UvhK +TBEtUk68qF3FhaOszX5yJorYvEZKMmk1F2x35P+kWygida3IOEOEC8KJI0lu +joqI7EXzUdKXGlNKsnwVMSItbJulGBd2fm2jV4QoosAVZ4Uh0loC1OfNUYqo +lTmyI12cC3fs744sO66I2l1y/nUSXDgSJpCgdlYR584pqjtJcsH6lKuwxWVF +HOwjQj6Q7ngzpp9QTcbbl35sRIoLE+6qMVM9ihh48oZAhwwXbsftExD9oogT +8xK8lrJcOHzpXq7umCIaa0sdv0l6Vd+2umBeCg5t+888Wo4L7UuKHdNWUZCw +2R/TRjpP9efHIikK5o0Us9bJc0Fz9wmePi0KNpfEJr0iPZbec2bRmIJW+XeW +yStwgXtDQ1UeKNgn8JPqTzq+JZJrYkdBCb7Y9iLSFmMPN2zdQsEUjUKlAdIr +RIS7IrdTcORw4zJFRS68NvAKOrObgm9OGme4kM7Zcv1XRQQFw22dypJI74ie +yWiJp2CQVGhoFWn1HAuF4RQK1rwebO4mPXrn9E2BLAr6PKS0LpAm3n0wU88j +47scEalA4ULcwtrXFkUU5DsJ9+ikzSkH/HwrKFisPFzuRHo5Pv6ZcIeC6e4d +ln6kW/1Eky82UFDygn/SXtL/JO2QrG2h4Bnid1gsae/ispK3byn4o5eP9whp +lWfz9Ok+cn39oGUi6e9DG56LjlDwr6OQcQLpqpVnPfVmyP3O97dHkz6g3Tfi ++JeCdRkdaiGkzZx0EkJWKGGYrvMaT9L8++KE08WV0H3fk94NpFvOPLtSrKiE +86bFjjqkzxISBo2aSlj+zm+fCGnPTr+GPgMlzPgZ7jhO7l95rmLLH1MllE0x +739Oekhm4Yu8tRKKjG0yKiBdybSLYTgroX6/qPl+0jHe5wW2eSrh1B4eISTN +V6CvlR2uhDd0nL62kuf14lFCXeVBJTTTKJk+TTpr4IXjy2NKaMBWaHIkTdEM +2Ls8Rwk39vg/qiXz46sth0fjqhKmVtKGg0mXh/w9Y1mmhA8s9T5KkmZWXOAe +fqCEOy5e0/Qj882qq3VxrEkJ/VpM5QVIO/EstfFpU8I/8VeCS8l83ekS3gNf +lZAZ+kJ+gMzv8PhrKlVjSngnX+JYHOmDRd2h1HklbKDp2wqTto5XPpLIT0Vz +gdF5LWkuNK+uv2aykoo/eqQGCbJenIu2Nk0IU/Gl5RoTBmmvl5mifjJU3BhN +EWGQ9bVPafaa+ToqhnUFE0Jkfc4QWU2/9Ki4dmPHSCxZv3G2635UG1OR/vDQ +2X5RLqRE+NJUzKiY3/F4fSlZ/3mNL5p4N1OxfVFkRFCYC493X/nRGEPFy2NJ +FmuWc8FugSF2KJ6Kf+69FfIWIPMtq4NmnEjFLoHH20+Q/aqndkVi0XEq0p4M +ZPWT/WxMMEos5RIVJXOvhAQs4YJMlS3duoGKH9OXqTz9RcBlqwGvP0+pWEhk +fGiYJ+dlT0JiTTMVT1t+NqifI0CHl3iu0UnF3+pVnKIZAixcFb0Fhqh4y6PM +eOMkAWHzk4lNQsp4a69n/OI3sv9HBEoNiinjcFWn8o1BApYPvyvjk1FG1zPs +QZevBBS/b3xrpqKMGe12r3P7Cfh0/x/tWzRl3J/WvH32AwGbUhjdV32UcfH4 +Pv7frwmg/Lm558EuZVzjVREW/IqcVzEqfB+DldFjm4ZI50sC0oMEdWWilFGv +N1b86gsCHjp8TDqVroxrt741X/WY7P9iR/Xiq5Vx6ULOpH4NATyZM49za5Tx +t/BZ/gAuAa18IZ41dcootoU/+h8OAaEzLimTT5TxXxt2+EgFAUXdau93v1NG +3dIbS8L+JefxlaZUVz4VvLi1NOxRDgG/1ol80nFTwT98PQnN0QTMXpY7auSp +gu6ZFrsvRJLzabW6GsNHBdvaD67aFUHA2BQjxCpYBe2yNLPHw8j5WLdz1jNB +BSvDiUe95P3ihcNt4fRiFRQsuB6msZmAvNAd0D+jgsmlw0OeawlglZUXnD+v +iqPeu969ec2B99SyKxsuquLTfc7Joq0ciDtfmj99RRW/9VQ9c2rmwO2jJZdc +SlUxYfsp5YYnHDB0L8gVrldFnQfLNp+4y4G1/OeyUj+romjknGzVNQ5I+cQn +xmiroeq6SJp5FAcmxex9tzaoYSolSf+7MAe+nPDdul9AA7cU7oj+I1MNduMH +7L7SNFFWtOhximwVjO5cHsk9sgYPyrwqwM83yf8Lad60hrV44Y2Dr/3RMhB7 +qXGqalwL+3+0tFzFUlBIr3Sm0bSx6irfVNKbEshdxxAR362Dh7+Ge5bkFMEL +OfP1U2d0cYlY2NmZ+EJgKjRk6b3Vw8SJyaQHTgUgzFcY5XdMHwWsePRutlwC +ylElloeGAR4ZUVbpms2FFereNS7PDNDXq/VISco/oMuWrTyw3RBN7vsO5l3M +hv2fxBrteYwwVGuKf0vGaRifOuFml2uEifz6bw51ZoCN3tM8Ox1jLJBTodg+ +TIX7U6b/zbUao4hi+Vzk52MQrm347k3AevRcUi93LukIsMd2dXisoGGqf8Sw +fE0sbFCT2ShUSEOzKMHX7orRwP3xRHlXEQ01W5oYTauiQe125OzdEhq+kouJ +t1iIgqX2r64EldHQ03Hj/m3vo6Bhb+rPRi4N6blPrvDmRYFZ3XRO3DMatiXG +Z3jIRgHN5U3/t1EanrpoZjWoFAlrEjMONtDpWCK45L6/QwTUmxbzOzLpmCmk +xzBgRYDz3IPsThYdVxfkL67UiYCD4TPlQ+Z0jN5ta9cnHAFN3r6fhR3puDDB +YIu274MgBs3ey5eOjm0XNNO274PSn5/lp9Pp2PKPwhW9mXDQCmA8UH9HxydS +9Zrj/4bCaRWn30kf6Giy51b8oaxQmO71X9//iY45ySc75WJD4b7nibL8ATpe +W3kvKsM+FFyce3Okf9AxOG5gq/FYCMSapuxbwWOChkEBfjdMQqBJ9I3yD3UT +DIWXbz/2BEHA/aBkboQJmj31JrY7BMLYnuEDG6JM8ByXVmpBC4SDimGhb2NM +0EKd/d1EORAyDu11mY83werYKTmPuQCoYsZQWakm+NV3VHB3UQAs1CTVN+aZ +YPYz2eDKJQGQXZk/3dZogn+ETGWKm3bCg4KOXZOSDLwaHFH3IsUP+hyVfWJk +GKg3fth9IcoPeH7t8fhPjoHaxWWrWLv8wGKzgBM/lYHjP1ef+2rhB0+XMOmy +Wgx8EFcm3sfjBy3+V1aYmzGwuWHN8ZAjvvBOLaQiK5CBvQPRSZpCPjB9/e+c +3m0GWj80aYuI8YLBrdYFx2sZGBv4qZu63Qu6l560HahjoJhRcNQXSy+o85W7 +cP4hA20d3hiWinrBMZn1zMXnDPzN/9xes8ITRNJDDr34wEDvn94j34c9QHt3 +J08ALxP5ey76akW6w071shV5G5mo7iRQcafODeKe7AjRcGZi5G9OblCxG2QF +iDVzXJhofJD9Sfu0G9QXx55o3sbE7LQk05/+biChYbt60Y+JD1a0ZIYLusFT +ja8SvjFM/HD9nADV1xW01ihRNa4wcViB67ogvQUmtc7SOBNMZM6xqwPuO0N3 +C24Qn2LiLCt4vP+mMzwMH9sSNcPEGJbWw/DLznCKYxdB+81EubwTP6oPOYMW +k6f8Lp8puhSvsv5q6gz+dnuUG6VM8WhnwdBo7Cbo2G2zqoNFvi9YfXgieyPc +Kfrv80y6Kaocej+xX9weaJZRc/aZpjhweNLs/C87uPV5dFXBSVN82T5d8rrX +DjiUT3T7bFO8cTg5IaPcDspzH57Mv2iKWTUhriI2dlBwIoVhU2GK2a6Fdm6J +tnA8avWZ3HZTNPYxSXLgs4Hl4uklPzpN0ebvzq36o9aQWs1Tb9Ftil9OtSlq +dVpD8tjk4OgHU+zPPWbj/a81HA7qYJkPkvGtv82sdbSG/d4Xhr7Pm6IqOyLQ +5uIG8LRSRVMKCx9NP5XdYGMFix3LhRupLPS3HJv/rm8FBQFj7+1VWRh974JW +sZwVDKbWHvBcw8Jgxzr6jjFL2P98U2WsIQtnp96+7z5vCRlOhyh3rFl4WMbn +ZO+IBdx171ww3svCMy4HAiqLzWH797sv6iNYGHlq4vuvM+bAE1eQaxXFwrKx +yDD3w+ZgfTHU2DWWheVuh9Q2bzOHto9LwiKTWDgycDFCb6U5DPvrvq/OYWH4 +Sh/DrEgE+T1ptboPWXjwxOJkx3UzOPU3cH1mAwuHR6alDqSbAW+2dfW3xyzk +lf7PwyTIDIZr+EsLnrPQYO7Fa+k1ZnCXJzlXrJ2FK8oKrtmUssHzXOKB2a8s +fPjbe51rNQty62LX3xdkIzv5yOfwLiascvKolhNm4975BpHGu0xI7DPROSDC +xg1jluuN8pkQxD+vpi/Jxs7VaYuBAUygb4qRKKSwselDzojsDAPe9u+fSjFg +47Y7cXG5sgyQXBlWvXEbGx+wTza6xdChyDIhbsKDjaY164ZWeNLBMOGU5Vlv +NqaMy9l8ZNPBaaKqs9uPjYmqCYzP/HRIfTvza2cYGxU8Wi555tBgvvCIRdxR +Npprh4r/erAe3pmebS8pY+PY7Z54aU1jCIouumRXQcaT5hMRK2wMsxW3Akar +2Bi97fbC7IwRiKl0zxnUsHGlyflAqydG4LBcUeHeQzbuTzFNVw8wgvqOkl3t +nWS8Zn7u30sNwV74jk5MNxszl9WOzWUbQrfN81mZ9+T3sIQw6iFDmL47kr6j +j41VKxy5950MQeeq/s3vw2ysWZN4VWfGAOrfmcec+MHGkZGnF5b3GoC9xBbQ +m2Cjy2jIjYUmAwhMi34TNcPG8AqBSr3LBjD9MDVPep6N/eNu+8LTDODY75yd +d3+zMXlz+ZcnEQYgYlyqvX2Rja82jv5c720A+Xvuzvz9y8bitULH7lsbwP8A +lpFITg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHCRVCL7boy9ZKcZM2Y8jyV7kihbWYpsKVkKKWWNFqlvpJKE +byLL3EmJNloUqSyhjSgJWbLWl/rd31/3fM497znPe99nea+y/16XAF4eHp5N +S3h4/v+c/fT8sVpmkRkn2ExJUNzarCNfJta8+xiw3G3u3Ac1QMlX/jLd2XAl +4du902AMMc43uvi6CyHzVJtHOFiB6Jh09q8uDnRtO7+KBq7QW++0d7qrAWyS +NiXEm+0Ca7Xhj5NdbUCs+fi6yDQKfnXR/5no6gfjN7l12/STodHy36I3hVNg +tjFNOLPzHCj01g76ay/CJlP1GcFD+SAR5nNDwJIP6UrXKC9rrkG2gXWdk9ty +TEvZOLzF4Dr05Oo/nBQRwsNhR4zuTZdBXnvZ6hh1IfS0PflXYmk5eApr+vxm +CKFvvYrxLvFy+JCk+Id3pxBuubisacigHPrCV7IkbgmhpWeOUUZ4OQxZfblN +8xBGR6FD41qD5TA/kVMZf3U1+vy2ympuvQmZRUde8cqKopP62/6O5EqwNw4W +k1QVxYObbTZVnqmE5Y9d3DR1RDEpzqIqMb8SkgfU3zuYi+KEwSrr5Xcq4ZBK +y+C5YFF0We2acGO4EsILZP5o3BVF+odlqQqaVbD5UrW2g5cY+n14kklPqwLp +cwPHz14Wx5xmM6sgRjXIrLuVPF8iji17izw2m1WDXEPqke1V4tg4ZWdPs6wG +ysTaaM1Gcex/rVA35VgN6o77fOuGxLHQ/XYzy7cajJYu0gaMJLDmZKuxQGo1 +bIqS+mL4QgJPHxP9GNtaDc6CQ59y2iWw0iA08GNbNbgU1vYsfJBAr8TAelZX +NWx97f3q6bgEet553zLWWw3bta/d9ZSURJf3m2Kok9UQ+kXvzDFfSdzpp1tc +K8aBNFc7s7ZZSTTcuPn8IxcOyHFb5XiXSGHoHN19cisHKsRd5wwEpfD5W0Wq +ghcH3rbtqDqjJIU3zDQf+e/kgNrmKJXNtlKYXhtmyY3kQMPGK8teX5DCEzs+ +rQ06y4FF65nWlyxpDDHy/y32igNZJXFli9bS6GNXb3utjVy/jCddZ7M0VoDV +Rd23HHB8stL8ZIA0vtdfv5H2kQN5llTC8ZQ0Bood+LZihAMm6JDT3CuN25f5 +iDfwExDJuOrz/JgMWrzy//cAnQD7AuFphxMyuHuUNkxjEqAicCi99R8Z1N+0 +7P0ki4DXHVur26/LYPX4nWeeFgTo7lvF96lVBvNuEp3zjgQMlRwo+SknizN/ +nAQD/Qh4IPSVGa0mi18/iGzp20nA+SiXV3M6sugjLei0NZCADRY68wsoi/my +uj7rQwko/NhvJ7BbFh3itH49iCLAW8LphzwhiwaCfUECaQQYxdcdza+XxWV5 +MxLs4wSs7F8jpfxUFktsVsaHZxJQW8kHGj2y2FogfeDxaQKkHGqz9P/KIit5 +F4udS8Z/VM14g4MchkTU7fG/ToDV+O+48AE5VHznZXvkCQGxtue0Ho3K4YoN +8m/UnhFQcVXnnfisHL74/mTT0yYCZFx9GbXL5VFYb5vBYjMBo3eezPHpyiNl +fmUOs42As8eyoi4clEehvqWHpz8S0PR+rdroUXm85XOY49FLwIJxY7tZpjxO +PfP/drePgMBvM4ZfLsvjtBbDLWKAAKaj16RuozxKiiy6VgwR0C+pEf5YSAHp +mcvTg38SIL33gaK0tAIeLnspe3qKAMcm95fBVAU0fdlwu2qagJq4TO3VRgp4 +rt1DfmiWgIzeiWEPdwXc+69tjuZ/5HmYZOSV+ylg83h2gc4CAdNnVO3/hihg +6P7Aer1FAnZYbS0tSlDA9lejumv+EmBYWrd7vFAB5XvOSg3zcmE3r5u0RbkC +fg9iNb/m48Ilr7Gn524poG6lxAViKReWCStrMJsU0N/sftKeZVx4tz/1S/IP +BXx0UuEmZwUXVrconeuaVcCvJX6WcSu5YKVea6nFo4iyz5t+sQW5UNE1UvhK +TBEtUk68qF3FhaOszX5yJorYvEZKMmk1F2x35P+kWygida3IOEOEC8KJI0lu +joqI7EXzUdKXGlNKsnwVMSItbJulGBd2fm2jV4QoosAVZ4Uh0loC1OfNUYqo +lTmyI12cC3fs744sO66I2l1y/nUSXDgSJpCgdlYR584pqjtJcsH6lKuwxWVF +HOwjQj6Q7ngzpp9QTcbbl35sRIoLE+6qMVM9ihh48oZAhwwXbsftExD9oogT +8xK8lrJcOHzpXq7umCIaa0sdv0l6Vd+2umBeCg5t+888Wo4L7UuKHdNWUZCw +2R/TRjpP9efHIikK5o0Us9bJc0Fz9wmePi0KNpfEJr0iPZbec2bRmIJW+XeW +yStwgXtDQ1UeKNgn8JPqTzq+JZJrYkdBCb7Y9iLSFmMPN2zdQsEUjUKlAdIr +RIS7IrdTcORw4zJFRS68NvAKOrObgm9OGme4kM7Zcv1XRQQFw22dypJI74ie +yWiJp2CQVGhoFWn1HAuF4RQK1rwebO4mPXrn9E2BLAr6PKS0LpAm3n0wU88j +47scEalA4ULcwtrXFkUU5DsJ9+ikzSkH/HwrKFisPFzuRHo5Pv6ZcIeC6e4d +ln6kW/1Eky82UFDygn/SXtL/JO2QrG2h4Bnid1gsae/ispK3byn4o5eP9whp +lWfz9Ok+cn39oGUi6e9DG56LjlDwr6OQcQLpqpVnPfVmyP3O97dHkz6g3Tfi ++JeCdRkdaiGkzZx0EkJWKGGYrvMaT9L8++KE08WV0H3fk94NpFvOPLtSrKiE +86bFjjqkzxISBo2aSlj+zm+fCGnPTr+GPgMlzPgZ7jhO7l95rmLLH1MllE0x +739Oekhm4Yu8tRKKjG0yKiBdybSLYTgroX6/qPl+0jHe5wW2eSrh1B4eISTN +V6CvlR2uhDd0nL62kuf14lFCXeVBJTTTKJk+TTpr4IXjy2NKaMBWaHIkTdEM +2Ls8Rwk39vg/qiXz46sth0fjqhKmVtKGg0mXh/w9Y1mmhA8s9T5KkmZWXOAe +fqCEOy5e0/Qj882qq3VxrEkJ/VpM5QVIO/EstfFpU8I/8VeCS8l83ekS3gNf +lZAZ+kJ+gMzv8PhrKlVjSngnX+JYHOmDRd2h1HklbKDp2wqTto5XPpLIT0Vz +gdF5LWkuNK+uv2aykoo/eqQGCbJenIu2Nk0IU/Gl5RoTBmmvl5mifjJU3BhN +EWGQ9bVPafaa+ToqhnUFE0Jkfc4QWU2/9Ki4dmPHSCxZv3G2635UG1OR/vDQ +2X5RLqRE+NJUzKiY3/F4fSlZ/3mNL5p4N1OxfVFkRFCYC493X/nRGEPFy2NJ +FmuWc8FugSF2KJ6Kf+69FfIWIPMtq4NmnEjFLoHH20+Q/aqndkVi0XEq0p4M +ZPWT/WxMMEos5RIVJXOvhAQs4YJMlS3duoGKH9OXqTz9RcBlqwGvP0+pWEhk +fGiYJ+dlT0JiTTMVT1t+NqifI0CHl3iu0UnF3+pVnKIZAixcFb0Fhqh4y6PM +eOMkAWHzk4lNQsp4a69n/OI3sv9HBEoNiinjcFWn8o1BApYPvyvjk1FG1zPs +QZevBBS/b3xrpqKMGe12r3P7Cfh0/x/tWzRl3J/WvH32AwGbUhjdV32UcfH4 +Pv7frwmg/Lm558EuZVzjVREW/IqcVzEqfB+DldFjm4ZI50sC0oMEdWWilFGv +N1b86gsCHjp8TDqVroxrt741X/WY7P9iR/Xiq5Vx6ULOpH4NATyZM49za5Tx +t/BZ/gAuAa18IZ41dcootoU/+h8OAaEzLimTT5TxXxt2+EgFAUXdau93v1NG +3dIbS8L+JefxlaZUVz4VvLi1NOxRDgG/1ol80nFTwT98PQnN0QTMXpY7auSp +gu6ZFrsvRJLzabW6GsNHBdvaD67aFUHA2BQjxCpYBe2yNLPHw8j5WLdz1jNB +BSvDiUe95P3ihcNt4fRiFRQsuB6msZmAvNAd0D+jgsmlw0OeawlglZUXnD+v +iqPeu969ec2B99SyKxsuquLTfc7Joq0ciDtfmj99RRW/9VQ9c2rmwO2jJZdc +SlUxYfsp5YYnHDB0L8gVrldFnQfLNp+4y4G1/OeyUj+romjknGzVNQ5I+cQn +xmiroeq6SJp5FAcmxex9tzaoYSolSf+7MAe+nPDdul9AA7cU7oj+I1MNduMH +7L7SNFFWtOhximwVjO5cHsk9sgYPyrwqwM83yf8Lad60hrV44Y2Dr/3RMhB7 +qXGqalwL+3+0tFzFUlBIr3Sm0bSx6irfVNKbEshdxxAR362Dh7+Ge5bkFMEL +OfP1U2d0cYlY2NmZ+EJgKjRk6b3Vw8SJyaQHTgUgzFcY5XdMHwWsePRutlwC +ylElloeGAR4ZUVbpms2FFereNS7PDNDXq/VISco/oMuWrTyw3RBN7vsO5l3M +hv2fxBrteYwwVGuKf0vGaRifOuFml2uEifz6bw51ZoCN3tM8Ox1jLJBTodg+ +TIX7U6b/zbUao4hi+Vzk52MQrm347k3AevRcUi93LukIsMd2dXisoGGqf8Sw +fE0sbFCT2ShUSEOzKMHX7orRwP3xRHlXEQ01W5oYTauiQe125OzdEhq+kouJ +t1iIgqX2r64EldHQ03Hj/m3vo6Bhb+rPRi4N6blPrvDmRYFZ3XRO3DMatiXG +Z3jIRgHN5U3/t1EanrpoZjWoFAlrEjMONtDpWCK45L6/QwTUmxbzOzLpmCmk +xzBgRYDz3IPsThYdVxfkL67UiYCD4TPlQ+Z0jN5ta9cnHAFN3r6fhR3puDDB +YIu274MgBs3ey5eOjm0XNNO274PSn5/lp9Pp2PKPwhW9mXDQCmA8UH9HxydS +9Zrj/4bCaRWn30kf6Giy51b8oaxQmO71X9//iY45ySc75WJD4b7nibL8ATpe +W3kvKsM+FFyce3Okf9AxOG5gq/FYCMSapuxbwWOChkEBfjdMQqBJ9I3yD3UT +DIWXbz/2BEHA/aBkboQJmj31JrY7BMLYnuEDG6JM8ByXVmpBC4SDimGhb2NM +0EKd/d1EORAyDu11mY83werYKTmPuQCoYsZQWakm+NV3VHB3UQAs1CTVN+aZ +YPYz2eDKJQGQXZk/3dZogn+ETGWKm3bCg4KOXZOSDLwaHFH3IsUP+hyVfWJk +GKg3fth9IcoPeH7t8fhPjoHaxWWrWLv8wGKzgBM/lYHjP1ef+2rhB0+XMOmy +Wgx8EFcm3sfjBy3+V1aYmzGwuWHN8ZAjvvBOLaQiK5CBvQPRSZpCPjB9/e+c +3m0GWj80aYuI8YLBrdYFx2sZGBv4qZu63Qu6l560HahjoJhRcNQXSy+o85W7 +cP4hA20d3hiWinrBMZn1zMXnDPzN/9xes8ITRNJDDr34wEDvn94j34c9QHt3 +J08ALxP5ey76akW6w071shV5G5mo7iRQcafODeKe7AjRcGZi5G9OblCxG2QF +iDVzXJhofJD9Sfu0G9QXx55o3sbE7LQk05/+biChYbt60Y+JD1a0ZIYLusFT +ja8SvjFM/HD9nADV1xW01ihRNa4wcViB67ogvQUmtc7SOBNMZM6xqwPuO0N3 +C24Qn2LiLCt4vP+mMzwMH9sSNcPEGJbWw/DLznCKYxdB+81EubwTP6oPOYMW +k6f8Lp8puhSvsv5q6gz+dnuUG6VM8WhnwdBo7Cbo2G2zqoNFvi9YfXgieyPc +Kfrv80y6Kaocej+xX9weaJZRc/aZpjhweNLs/C87uPV5dFXBSVN82T5d8rrX +DjiUT3T7bFO8cTg5IaPcDspzH57Mv2iKWTUhriI2dlBwIoVhU2GK2a6Fdm6J +tnA8avWZ3HZTNPYxSXLgs4Hl4uklPzpN0ebvzq36o9aQWs1Tb9Ftil9OtSlq +dVpD8tjk4OgHU+zPPWbj/a81HA7qYJkPkvGtv82sdbSG/d4Xhr7Pm6IqOyLQ +5uIG8LRSRVMKCx9NP5XdYGMFix3LhRupLPS3HJv/rm8FBQFj7+1VWRh974JW +sZwVDKbWHvBcw8Jgxzr6jjFL2P98U2WsIQtnp96+7z5vCRlOhyh3rFl4WMbn +ZO+IBdx171ww3svCMy4HAiqLzWH797sv6iNYGHlq4vuvM+bAE1eQaxXFwrKx +yDD3w+ZgfTHU2DWWheVuh9Q2bzOHto9LwiKTWDgycDFCb6U5DPvrvq/OYWH4 +Sh/DrEgE+T1ptboPWXjwxOJkx3UzOPU3cH1mAwuHR6alDqSbAW+2dfW3xyzk +lf7PwyTIDIZr+EsLnrPQYO7Fa+k1ZnCXJzlXrJ2FK8oKrtmUssHzXOKB2a8s +fPjbe51rNQty62LX3xdkIzv5yOfwLiascvKolhNm4975BpHGu0xI7DPROSDC +xg1jluuN8pkQxD+vpi/Jxs7VaYuBAUygb4qRKKSwselDzojsDAPe9u+fSjFg +47Y7cXG5sgyQXBlWvXEbGx+wTza6xdChyDIhbsKDjaY164ZWeNLBMOGU5Vlv +NqaMy9l8ZNPBaaKqs9uPjYmqCYzP/HRIfTvza2cYGxU8Wi555tBgvvCIRdxR +Npprh4r/erAe3pmebS8pY+PY7Z54aU1jCIouumRXQcaT5hMRK2wMsxW3Akar +2Bi97fbC7IwRiKl0zxnUsHGlyflAqydG4LBcUeHeQzbuTzFNVw8wgvqOkl3t +nWS8Zn7u30sNwV74jk5MNxszl9WOzWUbQrfN81mZ9+T3sIQw6iFDmL47kr6j +j41VKxy5950MQeeq/s3vw2ysWZN4VWfGAOrfmcec+MHGkZGnF5b3GoC9xBbQ +m2Cjy2jIjYUmAwhMi34TNcPG8AqBSr3LBjD9MDVPep6N/eNu+8LTDODY75yd +d3+zMXlz+ZcnEQYgYlyqvX2Rja82jv5c720A+Xvuzvz9y8bitULH7lsbwP8A +lpFITg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07859040887591295}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07859040887591295}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHCRVCL7boy9ZKcZM2Y8jyV7kihbWYpsKVkKKWWNFqlvpJKE +byLL3EmJNloUqSyhjSgJWbLWl/rd31/3fM497znPe99nea+y/16XAF4eHp5N +S3h4/v+c/fT8sVpmkRkn2ExJUNzarCNfJta8+xiw3G3u3Ac1QMlX/jLd2XAl +4du902AMMc43uvi6CyHzVJtHOFiB6Jh09q8uDnRtO7+KBq7QW++0d7qrAWyS +NiXEm+0Ca7Xhj5NdbUCs+fi6yDQKfnXR/5no6gfjN7l12/STodHy36I3hVNg +tjFNOLPzHCj01g76ay/CJlP1GcFD+SAR5nNDwJIP6UrXKC9rrkG2gXWdk9ty +TEvZOLzF4Dr05Oo/nBQRwsNhR4zuTZdBXnvZ6hh1IfS0PflXYmk5eApr+vxm +CKFvvYrxLvFy+JCk+Id3pxBuubisacigHPrCV7IkbgmhpWeOUUZ4OQxZfblN +8xBGR6FD41qD5TA/kVMZf3U1+vy2ympuvQmZRUde8cqKopP62/6O5EqwNw4W +k1QVxYObbTZVnqmE5Y9d3DR1RDEpzqIqMb8SkgfU3zuYi+KEwSrr5Xcq4ZBK +y+C5YFF0We2acGO4EsILZP5o3BVF+odlqQqaVbD5UrW2g5cY+n14kklPqwLp +cwPHz14Wx5xmM6sgRjXIrLuVPF8iji17izw2m1WDXEPqke1V4tg4ZWdPs6wG +ysTaaM1Gcex/rVA35VgN6o77fOuGxLHQ/XYzy7cajJYu0gaMJLDmZKuxQGo1 +bIqS+mL4QgJPHxP9GNtaDc6CQ59y2iWw0iA08GNbNbgU1vYsfJBAr8TAelZX +NWx97f3q6bgEet553zLWWw3bta/d9ZSURJf3m2Kok9UQ+kXvzDFfSdzpp1tc +K8aBNFc7s7ZZSTTcuPn8IxcOyHFb5XiXSGHoHN19cisHKsRd5wwEpfD5W0Wq +ghcH3rbtqDqjJIU3zDQf+e/kgNrmKJXNtlKYXhtmyY3kQMPGK8teX5DCEzs+ +rQ06y4FF65nWlyxpDDHy/y32igNZJXFli9bS6GNXb3utjVy/jCddZ7M0VoDV +Rd23HHB8stL8ZIA0vtdfv5H2kQN5llTC8ZQ0Bood+LZihAMm6JDT3CuN25f5 +iDfwExDJuOrz/JgMWrzy//cAnQD7AuFphxMyuHuUNkxjEqAicCi99R8Z1N+0 +7P0ki4DXHVur26/LYPX4nWeeFgTo7lvF96lVBvNuEp3zjgQMlRwo+SknizN/ +nAQD/Qh4IPSVGa0mi18/iGzp20nA+SiXV3M6sugjLei0NZCADRY68wsoi/my +uj7rQwko/NhvJ7BbFh3itH49iCLAW8LphzwhiwaCfUECaQQYxdcdza+XxWV5 +MxLs4wSs7F8jpfxUFktsVsaHZxJQW8kHGj2y2FogfeDxaQKkHGqz9P/KIit5 +F4udS8Z/VM14g4MchkTU7fG/ToDV+O+48AE5VHznZXvkCQGxtue0Ho3K4YoN +8m/UnhFQcVXnnfisHL74/mTT0yYCZFx9GbXL5VFYb5vBYjMBo3eezPHpyiNl +fmUOs42As8eyoi4clEehvqWHpz8S0PR+rdroUXm85XOY49FLwIJxY7tZpjxO +PfP/drePgMBvM4ZfLsvjtBbDLWKAAKaj16RuozxKiiy6VgwR0C+pEf5YSAHp +mcvTg38SIL33gaK0tAIeLnspe3qKAMcm95fBVAU0fdlwu2qagJq4TO3VRgp4 +rt1DfmiWgIzeiWEPdwXc+69tjuZ/5HmYZOSV+ylg83h2gc4CAdNnVO3/hihg +6P7Aer1FAnZYbS0tSlDA9lejumv+EmBYWrd7vFAB5XvOSg3zcmE3r5u0RbkC +fg9iNb/m48Ilr7Gn524poG6lxAViKReWCStrMJsU0N/sftKeZVx4tz/1S/IP +BXx0UuEmZwUXVrconeuaVcCvJX6WcSu5YKVea6nFo4iyz5t+sQW5UNE1UvhK +TBEtUk68qF3FhaOszX5yJorYvEZKMmk1F2x35P+kWygida3IOEOEC8KJI0lu +joqI7EXzUdKXGlNKsnwVMSItbJulGBd2fm2jV4QoosAVZ4Uh0loC1OfNUYqo +lTmyI12cC3fs744sO66I2l1y/nUSXDgSJpCgdlYR584pqjtJcsH6lKuwxWVF +HOwjQj6Q7ngzpp9QTcbbl35sRIoLE+6qMVM9ihh48oZAhwwXbsftExD9oogT +8xK8lrJcOHzpXq7umCIaa0sdv0l6Vd+2umBeCg5t+888Wo4L7UuKHdNWUZCw +2R/TRjpP9efHIikK5o0Us9bJc0Fz9wmePi0KNpfEJr0iPZbec2bRmIJW+XeW +yStwgXtDQ1UeKNgn8JPqTzq+JZJrYkdBCb7Y9iLSFmMPN2zdQsEUjUKlAdIr +RIS7IrdTcORw4zJFRS68NvAKOrObgm9OGme4kM7Zcv1XRQQFw22dypJI74ie +yWiJp2CQVGhoFWn1HAuF4RQK1rwebO4mPXrn9E2BLAr6PKS0LpAm3n0wU88j +47scEalA4ULcwtrXFkUU5DsJ9+ikzSkH/HwrKFisPFzuRHo5Pv6ZcIeC6e4d +ln6kW/1Eky82UFDygn/SXtL/JO2QrG2h4Bnid1gsae/ispK3byn4o5eP9whp +lWfz9Ok+cn39oGUi6e9DG56LjlDwr6OQcQLpqpVnPfVmyP3O97dHkz6g3Tfi ++JeCdRkdaiGkzZx0EkJWKGGYrvMaT9L8++KE08WV0H3fk94NpFvOPLtSrKiE +86bFjjqkzxISBo2aSlj+zm+fCGnPTr+GPgMlzPgZ7jhO7l95rmLLH1MllE0x +739Oekhm4Yu8tRKKjG0yKiBdybSLYTgroX6/qPl+0jHe5wW2eSrh1B4eISTN +V6CvlR2uhDd0nL62kuf14lFCXeVBJTTTKJk+TTpr4IXjy2NKaMBWaHIkTdEM +2Ls8Rwk39vg/qiXz46sth0fjqhKmVtKGg0mXh/w9Y1mmhA8s9T5KkmZWXOAe +fqCEOy5e0/Qj882qq3VxrEkJ/VpM5QVIO/EstfFpU8I/8VeCS8l83ekS3gNf +lZAZ+kJ+gMzv8PhrKlVjSngnX+JYHOmDRd2h1HklbKDp2wqTto5XPpLIT0Vz +gdF5LWkuNK+uv2aykoo/eqQGCbJenIu2Nk0IU/Gl5RoTBmmvl5mifjJU3BhN +EWGQ9bVPafaa+ToqhnUFE0Jkfc4QWU2/9Ki4dmPHSCxZv3G2635UG1OR/vDQ +2X5RLqRE+NJUzKiY3/F4fSlZ/3mNL5p4N1OxfVFkRFCYC493X/nRGEPFy2NJ +FmuWc8FugSF2KJ6Kf+69FfIWIPMtq4NmnEjFLoHH20+Q/aqndkVi0XEq0p4M +ZPWT/WxMMEos5RIVJXOvhAQs4YJMlS3duoGKH9OXqTz9RcBlqwGvP0+pWEhk +fGiYJ+dlT0JiTTMVT1t+NqifI0CHl3iu0UnF3+pVnKIZAixcFb0Fhqh4y6PM +eOMkAWHzk4lNQsp4a69n/OI3sv9HBEoNiinjcFWn8o1BApYPvyvjk1FG1zPs +QZevBBS/b3xrpqKMGe12r3P7Cfh0/x/tWzRl3J/WvH32AwGbUhjdV32UcfH4 +Pv7frwmg/Lm558EuZVzjVREW/IqcVzEqfB+DldFjm4ZI50sC0oMEdWWilFGv +N1b86gsCHjp8TDqVroxrt741X/WY7P9iR/Xiq5Vx6ULOpH4NATyZM49za5Tx +t/BZ/gAuAa18IZ41dcootoU/+h8OAaEzLimTT5TxXxt2+EgFAUXdau93v1NG +3dIbS8L+JefxlaZUVz4VvLi1NOxRDgG/1ol80nFTwT98PQnN0QTMXpY7auSp +gu6ZFrsvRJLzabW6GsNHBdvaD67aFUHA2BQjxCpYBe2yNLPHw8j5WLdz1jNB +BSvDiUe95P3ihcNt4fRiFRQsuB6msZmAvNAd0D+jgsmlw0OeawlglZUXnD+v +iqPeu969ec2B99SyKxsuquLTfc7Joq0ciDtfmj99RRW/9VQ9c2rmwO2jJZdc +SlUxYfsp5YYnHDB0L8gVrldFnQfLNp+4y4G1/OeyUj+romjknGzVNQ5I+cQn +xmiroeq6SJp5FAcmxex9tzaoYSolSf+7MAe+nPDdul9AA7cU7oj+I1MNduMH +7L7SNFFWtOhximwVjO5cHsk9sgYPyrwqwM83yf8Lad60hrV44Y2Dr/3RMhB7 +qXGqalwL+3+0tFzFUlBIr3Sm0bSx6irfVNKbEshdxxAR362Dh7+Ge5bkFMEL +OfP1U2d0cYlY2NmZ+EJgKjRk6b3Vw8SJyaQHTgUgzFcY5XdMHwWsePRutlwC +ylElloeGAR4ZUVbpms2FFereNS7PDNDXq/VISco/oMuWrTyw3RBN7vsO5l3M +hv2fxBrteYwwVGuKf0vGaRifOuFml2uEifz6bw51ZoCN3tM8Ox1jLJBTodg+ +TIX7U6b/zbUao4hi+Vzk52MQrm347k3AevRcUi93LukIsMd2dXisoGGqf8Sw +fE0sbFCT2ShUSEOzKMHX7orRwP3xRHlXEQ01W5oYTauiQe125OzdEhq+kouJ +t1iIgqX2r64EldHQ03Hj/m3vo6Bhb+rPRi4N6blPrvDmRYFZ3XRO3DMatiXG +Z3jIRgHN5U3/t1EanrpoZjWoFAlrEjMONtDpWCK45L6/QwTUmxbzOzLpmCmk +xzBgRYDz3IPsThYdVxfkL67UiYCD4TPlQ+Z0jN5ta9cnHAFN3r6fhR3puDDB +YIu274MgBs3ey5eOjm0XNNO274PSn5/lp9Pp2PKPwhW9mXDQCmA8UH9HxydS +9Zrj/4bCaRWn30kf6Giy51b8oaxQmO71X9//iY45ySc75WJD4b7nibL8ATpe +W3kvKsM+FFyce3Okf9AxOG5gq/FYCMSapuxbwWOChkEBfjdMQqBJ9I3yD3UT +DIWXbz/2BEHA/aBkboQJmj31JrY7BMLYnuEDG6JM8ByXVmpBC4SDimGhb2NM +0EKd/d1EORAyDu11mY83werYKTmPuQCoYsZQWakm+NV3VHB3UQAs1CTVN+aZ +YPYz2eDKJQGQXZk/3dZogn+ETGWKm3bCg4KOXZOSDLwaHFH3IsUP+hyVfWJk +GKg3fth9IcoPeH7t8fhPjoHaxWWrWLv8wGKzgBM/lYHjP1ef+2rhB0+XMOmy +Wgx8EFcm3sfjBy3+V1aYmzGwuWHN8ZAjvvBOLaQiK5CBvQPRSZpCPjB9/e+c +3m0GWj80aYuI8YLBrdYFx2sZGBv4qZu63Qu6l560HahjoJhRcNQXSy+o85W7 +cP4hA20d3hiWinrBMZn1zMXnDPzN/9xes8ITRNJDDr34wEDvn94j34c9QHt3 +J08ALxP5ey76akW6w071shV5G5mo7iRQcafODeKe7AjRcGZi5G9OblCxG2QF +iDVzXJhofJD9Sfu0G9QXx55o3sbE7LQk05/+biChYbt60Y+JD1a0ZIYLusFT +ja8SvjFM/HD9nADV1xW01ihRNa4wcViB67ogvQUmtc7SOBNMZM6xqwPuO0N3 +C24Qn2LiLCt4vP+mMzwMH9sSNcPEGJbWw/DLznCKYxdB+81EubwTP6oPOYMW +k6f8Lp8puhSvsv5q6gz+dnuUG6VM8WhnwdBo7Cbo2G2zqoNFvi9YfXgieyPc +Kfrv80y6Kaocej+xX9weaJZRc/aZpjhweNLs/C87uPV5dFXBSVN82T5d8rrX +DjiUT3T7bFO8cTg5IaPcDspzH57Mv2iKWTUhriI2dlBwIoVhU2GK2a6Fdm6J +tnA8avWZ3HZTNPYxSXLgs4Hl4uklPzpN0ebvzq36o9aQWs1Tb9Ftil9OtSlq +dVpD8tjk4OgHU+zPPWbj/a81HA7qYJkPkvGtv82sdbSG/d4Xhr7Pm6IqOyLQ +5uIG8LRSRVMKCx9NP5XdYGMFix3LhRupLPS3HJv/rm8FBQFj7+1VWRh974JW +sZwVDKbWHvBcw8Jgxzr6jjFL2P98U2WsIQtnp96+7z5vCRlOhyh3rFl4WMbn +ZO+IBdx171ww3svCMy4HAiqLzWH797sv6iNYGHlq4vuvM+bAE1eQaxXFwrKx +yDD3w+ZgfTHU2DWWheVuh9Q2bzOHto9LwiKTWDgycDFCb6U5DPvrvq/OYWH4 +Sh/DrEgE+T1ptboPWXjwxOJkx3UzOPU3cH1mAwuHR6alDqSbAW+2dfW3xyzk +lf7PwyTIDIZr+EsLnrPQYO7Fa+k1ZnCXJzlXrJ2FK8oKrtmUssHzXOKB2a8s +fPjbe51rNQty62LX3xdkIzv5yOfwLiascvKolhNm4975BpHGu0xI7DPROSDC +xg1jluuN8pkQxD+vpi/Jxs7VaYuBAUygb4qRKKSwselDzojsDAPe9u+fSjFg +47Y7cXG5sgyQXBlWvXEbGx+wTza6xdChyDIhbsKDjaY164ZWeNLBMOGU5Vlv +NqaMy9l8ZNPBaaKqs9uPjYmqCYzP/HRIfTvza2cYGxU8Wi555tBgvvCIRdxR +Npprh4r/erAe3pmebS8pY+PY7Z54aU1jCIouumRXQcaT5hMRK2wMsxW3Akar +2Bi97fbC7IwRiKl0zxnUsHGlyflAqydG4LBcUeHeQzbuTzFNVw8wgvqOkl3t +nWS8Zn7u30sNwV74jk5MNxszl9WOzWUbQrfN81mZ9+T3sIQw6iFDmL47kr6j +j41VKxy5950MQeeq/s3vw2ysWZN4VWfGAOrfmcec+MHGkZGnF5b3GoC9xBbQ +m2Cjy2jIjYUmAwhMi34TNcPG8AqBSr3LBjD9MDVPep6N/eNu+8LTDODY75yd +d3+zMXlz+ZcnEQYgYlyqvX2Rja82jv5c720A+Xvuzvz9y8bitULH7lsbwP8A +lpFITg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07859040887591295}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07859040887591295}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994351464484971*^9, 3.994353869456068*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"368ba23a-0bbe-4e9c-b5f8-61d3de97a491"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7125,15 +7196,867 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003101"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.9942355674226227`*^9},ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-\ -5e6c7b4b5678"], + 3.9942355674226227`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994351464747096*^9, 3.994353869684317*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"9ae78470-d8a7-4941-a567-a8980c42fc42"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"cd9a8165-891b-9245-aca1-\ -3f60fcfd9a79"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VO8bAHCRVCL7boy9ZKcZM2Y8jyV7kihbWYpsKVkKKWWNFqlvpJKE +byLL3EmJNloUqSyhjSgJWbLWl/rd31/3fM497znPe99nea+y/16XAF4eHp5N +S3h4/v+c/fT8sVpmkRkn2ExJUNzarCNfJta8+xiw3G3u3Ac1QMlX/jLd2XAl +4du902AMMc43uvi6CyHzVJtHOFiB6Jh09q8uDnRtO7+KBq7QW++0d7qrAWyS +NiXEm+0Ca7Xhj5NdbUCs+fi6yDQKfnXR/5no6gfjN7l12/STodHy36I3hVNg +tjFNOLPzHCj01g76ay/CJlP1GcFD+SAR5nNDwJIP6UrXKC9rrkG2gXWdk9ty +TEvZOLzF4Dr05Oo/nBQRwsNhR4zuTZdBXnvZ6hh1IfS0PflXYmk5eApr+vxm +CKFvvYrxLvFy+JCk+Id3pxBuubisacigHPrCV7IkbgmhpWeOUUZ4OQxZfblN +8xBGR6FD41qD5TA/kVMZf3U1+vy2ympuvQmZRUde8cqKopP62/6O5EqwNw4W +k1QVxYObbTZVnqmE5Y9d3DR1RDEpzqIqMb8SkgfU3zuYi+KEwSrr5Xcq4ZBK +y+C5YFF0We2acGO4EsILZP5o3BVF+odlqQqaVbD5UrW2g5cY+n14kklPqwLp +cwPHz14Wx5xmM6sgRjXIrLuVPF8iji17izw2m1WDXEPqke1V4tg4ZWdPs6wG +ysTaaM1Gcex/rVA35VgN6o77fOuGxLHQ/XYzy7cajJYu0gaMJLDmZKuxQGo1 +bIqS+mL4QgJPHxP9GNtaDc6CQ59y2iWw0iA08GNbNbgU1vYsfJBAr8TAelZX +NWx97f3q6bgEet553zLWWw3bta/d9ZSURJf3m2Kok9UQ+kXvzDFfSdzpp1tc +K8aBNFc7s7ZZSTTcuPn8IxcOyHFb5XiXSGHoHN19cisHKsRd5wwEpfD5W0Wq +ghcH3rbtqDqjJIU3zDQf+e/kgNrmKJXNtlKYXhtmyY3kQMPGK8teX5DCEzs+ +rQ06y4FF65nWlyxpDDHy/y32igNZJXFli9bS6GNXb3utjVy/jCddZ7M0VoDV +Rd23HHB8stL8ZIA0vtdfv5H2kQN5llTC8ZQ0Bood+LZihAMm6JDT3CuN25f5 +iDfwExDJuOrz/JgMWrzy//cAnQD7AuFphxMyuHuUNkxjEqAicCi99R8Z1N+0 +7P0ki4DXHVur26/LYPX4nWeeFgTo7lvF96lVBvNuEp3zjgQMlRwo+SknizN/ +nAQD/Qh4IPSVGa0mi18/iGzp20nA+SiXV3M6sugjLei0NZCADRY68wsoi/my +uj7rQwko/NhvJ7BbFh3itH49iCLAW8LphzwhiwaCfUECaQQYxdcdza+XxWV5 +MxLs4wSs7F8jpfxUFktsVsaHZxJQW8kHGj2y2FogfeDxaQKkHGqz9P/KIit5 +F4udS8Z/VM14g4MchkTU7fG/ToDV+O+48AE5VHznZXvkCQGxtue0Ho3K4YoN +8m/UnhFQcVXnnfisHL74/mTT0yYCZFx9GbXL5VFYb5vBYjMBo3eezPHpyiNl +fmUOs42As8eyoi4clEehvqWHpz8S0PR+rdroUXm85XOY49FLwIJxY7tZpjxO +PfP/drePgMBvM4ZfLsvjtBbDLWKAAKaj16RuozxKiiy6VgwR0C+pEf5YSAHp +mcvTg38SIL33gaK0tAIeLnspe3qKAMcm95fBVAU0fdlwu2qagJq4TO3VRgp4 +rt1DfmiWgIzeiWEPdwXc+69tjuZ/5HmYZOSV+ylg83h2gc4CAdNnVO3/hihg +6P7Aer1FAnZYbS0tSlDA9lejumv+EmBYWrd7vFAB5XvOSg3zcmE3r5u0RbkC +fg9iNb/m48Ilr7Gn524poG6lxAViKReWCStrMJsU0N/sftKeZVx4tz/1S/IP +BXx0UuEmZwUXVrconeuaVcCvJX6WcSu5YKVea6nFo4iyz5t+sQW5UNE1UvhK +TBEtUk68qF3FhaOszX5yJorYvEZKMmk1F2x35P+kWygida3IOEOEC8KJI0lu +joqI7EXzUdKXGlNKsnwVMSItbJulGBd2fm2jV4QoosAVZ4Uh0loC1OfNUYqo +lTmyI12cC3fs744sO66I2l1y/nUSXDgSJpCgdlYR584pqjtJcsH6lKuwxWVF +HOwjQj6Q7ngzpp9QTcbbl35sRIoLE+6qMVM9ihh48oZAhwwXbsftExD9oogT +8xK8lrJcOHzpXq7umCIaa0sdv0l6Vd+2umBeCg5t+888Wo4L7UuKHdNWUZCw +2R/TRjpP9efHIikK5o0Us9bJc0Fz9wmePi0KNpfEJr0iPZbec2bRmIJW+XeW +yStwgXtDQ1UeKNgn8JPqTzq+JZJrYkdBCb7Y9iLSFmMPN2zdQsEUjUKlAdIr +RIS7IrdTcORw4zJFRS68NvAKOrObgm9OGme4kM7Zcv1XRQQFw22dypJI74ie +yWiJp2CQVGhoFWn1HAuF4RQK1rwebO4mPXrn9E2BLAr6PKS0LpAm3n0wU88j +47scEalA4ULcwtrXFkUU5DsJ9+ikzSkH/HwrKFisPFzuRHo5Pv6ZcIeC6e4d +ln6kW/1Eky82UFDygn/SXtL/JO2QrG2h4Bnid1gsae/ispK3byn4o5eP9whp +lWfz9Ok+cn39oGUi6e9DG56LjlDwr6OQcQLpqpVnPfVmyP3O97dHkz6g3Tfi ++JeCdRkdaiGkzZx0EkJWKGGYrvMaT9L8++KE08WV0H3fk94NpFvOPLtSrKiE +86bFjjqkzxISBo2aSlj+zm+fCGnPTr+GPgMlzPgZ7jhO7l95rmLLH1MllE0x +739Oekhm4Yu8tRKKjG0yKiBdybSLYTgroX6/qPl+0jHe5wW2eSrh1B4eISTN +V6CvlR2uhDd0nL62kuf14lFCXeVBJTTTKJk+TTpr4IXjy2NKaMBWaHIkTdEM +2Ls8Rwk39vg/qiXz46sth0fjqhKmVtKGg0mXh/w9Y1mmhA8s9T5KkmZWXOAe +fqCEOy5e0/Qj882qq3VxrEkJ/VpM5QVIO/EstfFpU8I/8VeCS8l83ekS3gNf +lZAZ+kJ+gMzv8PhrKlVjSngnX+JYHOmDRd2h1HklbKDp2wqTto5XPpLIT0Vz +gdF5LWkuNK+uv2aykoo/eqQGCbJenIu2Nk0IU/Gl5RoTBmmvl5mifjJU3BhN +EWGQ9bVPafaa+ToqhnUFE0Jkfc4QWU2/9Ki4dmPHSCxZv3G2635UG1OR/vDQ +2X5RLqRE+NJUzKiY3/F4fSlZ/3mNL5p4N1OxfVFkRFCYC493X/nRGEPFy2NJ +FmuWc8FugSF2KJ6Kf+69FfIWIPMtq4NmnEjFLoHH20+Q/aqndkVi0XEq0p4M +ZPWT/WxMMEos5RIVJXOvhAQs4YJMlS3duoGKH9OXqTz9RcBlqwGvP0+pWEhk +fGiYJ+dlT0JiTTMVT1t+NqifI0CHl3iu0UnF3+pVnKIZAixcFb0Fhqh4y6PM +eOMkAWHzk4lNQsp4a69n/OI3sv9HBEoNiinjcFWn8o1BApYPvyvjk1FG1zPs +QZevBBS/b3xrpqKMGe12r3P7Cfh0/x/tWzRl3J/WvH32AwGbUhjdV32UcfH4 +Pv7frwmg/Lm558EuZVzjVREW/IqcVzEqfB+DldFjm4ZI50sC0oMEdWWilFGv +N1b86gsCHjp8TDqVroxrt741X/WY7P9iR/Xiq5Vx6ULOpH4NATyZM49za5Tx +t/BZ/gAuAa18IZ41dcootoU/+h8OAaEzLimTT5TxXxt2+EgFAUXdau93v1NG +3dIbS8L+JefxlaZUVz4VvLi1NOxRDgG/1ol80nFTwT98PQnN0QTMXpY7auSp +gu6ZFrsvRJLzabW6GsNHBdvaD67aFUHA2BQjxCpYBe2yNLPHw8j5WLdz1jNB +BSvDiUe95P3ihcNt4fRiFRQsuB6msZmAvNAd0D+jgsmlw0OeawlglZUXnD+v +iqPeu969ec2B99SyKxsuquLTfc7Joq0ciDtfmj99RRW/9VQ9c2rmwO2jJZdc +SlUxYfsp5YYnHDB0L8gVrldFnQfLNp+4y4G1/OeyUj+romjknGzVNQ5I+cQn +xmiroeq6SJp5FAcmxex9tzaoYSolSf+7MAe+nPDdul9AA7cU7oj+I1MNduMH +7L7SNFFWtOhximwVjO5cHsk9sgYPyrwqwM83yf8Lad60hrV44Y2Dr/3RMhB7 +qXGqalwL+3+0tFzFUlBIr3Sm0bSx6irfVNKbEshdxxAR362Dh7+Ge5bkFMEL +OfP1U2d0cYlY2NmZ+EJgKjRk6b3Vw8SJyaQHTgUgzFcY5XdMHwWsePRutlwC +ylElloeGAR4ZUVbpms2FFereNS7PDNDXq/VISco/oMuWrTyw3RBN7vsO5l3M +hv2fxBrteYwwVGuKf0vGaRifOuFml2uEifz6bw51ZoCN3tM8Ox1jLJBTodg+ +TIX7U6b/zbUao4hi+Vzk52MQrm347k3AevRcUi93LukIsMd2dXisoGGqf8Sw +fE0sbFCT2ShUSEOzKMHX7orRwP3xRHlXEQ01W5oYTauiQe125OzdEhq+kouJ +t1iIgqX2r64EldHQ03Hj/m3vo6Bhb+rPRi4N6blPrvDmRYFZ3XRO3DMatiXG +Z3jIRgHN5U3/t1EanrpoZjWoFAlrEjMONtDpWCK45L6/QwTUmxbzOzLpmCmk +xzBgRYDz3IPsThYdVxfkL67UiYCD4TPlQ+Z0jN5ta9cnHAFN3r6fhR3puDDB +YIu274MgBs3ey5eOjm0XNNO274PSn5/lp9Pp2PKPwhW9mXDQCmA8UH9HxydS +9Zrj/4bCaRWn30kf6Giy51b8oaxQmO71X9//iY45ySc75WJD4b7nibL8ATpe +W3kvKsM+FFyce3Okf9AxOG5gq/FYCMSapuxbwWOChkEBfjdMQqBJ9I3yD3UT +DIWXbz/2BEHA/aBkboQJmj31JrY7BMLYnuEDG6JM8ByXVmpBC4SDimGhb2NM +0EKd/d1EORAyDu11mY83werYKTmPuQCoYsZQWakm+NV3VHB3UQAs1CTVN+aZ +YPYz2eDKJQGQXZk/3dZogn+ETGWKm3bCg4KOXZOSDLwaHFH3IsUP+hyVfWJk +GKg3fth9IcoPeH7t8fhPjoHaxWWrWLv8wGKzgBM/lYHjP1ef+2rhB0+XMOmy +Wgx8EFcm3sfjBy3+V1aYmzGwuWHN8ZAjvvBOLaQiK5CBvQPRSZpCPjB9/e+c +3m0GWj80aYuI8YLBrdYFx2sZGBv4qZu63Qu6l560HahjoJhRcNQXSy+o85W7 +cP4hA20d3hiWinrBMZn1zMXnDPzN/9xes8ITRNJDDr34wEDvn94j34c9QHt3 +J08ALxP5ey76akW6w071shV5G5mo7iRQcafODeKe7AjRcGZi5G9OblCxG2QF +iDVzXJhofJD9Sfu0G9QXx55o3sbE7LQk05/+biChYbt60Y+JD1a0ZIYLusFT +ja8SvjFM/HD9nADV1xW01ihRNa4wcViB67ogvQUmtc7SOBNMZM6xqwPuO0N3 +C24Qn2LiLCt4vP+mMzwMH9sSNcPEGJbWw/DLznCKYxdB+81EubwTP6oPOYMW +k6f8Lp8puhSvsv5q6gz+dnuUG6VM8WhnwdBo7Cbo2G2zqoNFvi9YfXgieyPc +Kfrv80y6Kaocej+xX9weaJZRc/aZpjhweNLs/C87uPV5dFXBSVN82T5d8rrX +DjiUT3T7bFO8cTg5IaPcDspzH57Mv2iKWTUhriI2dlBwIoVhU2GK2a6Fdm6J +tnA8avWZ3HZTNPYxSXLgs4Hl4uklPzpN0ebvzq36o9aQWs1Tb9Ftil9OtSlq +dVpD8tjk4OgHU+zPPWbj/a81HA7qYJkPkvGtv82sdbSG/d4Xhr7Pm6IqOyLQ +5uIG8LRSRVMKCx9NP5XdYGMFix3LhRupLPS3HJv/rm8FBQFj7+1VWRh974JW +sZwVDKbWHvBcw8Jgxzr6jjFL2P98U2WsIQtnp96+7z5vCRlOhyh3rFl4WMbn +ZO+IBdx171ww3svCMy4HAiqLzWH797sv6iNYGHlq4vuvM+bAE1eQaxXFwrKx +yDD3w+ZgfTHU2DWWheVuh9Q2bzOHto9LwiKTWDgycDFCb6U5DPvrvq/OYWH4 +Sh/DrEgE+T1ptboPWXjwxOJkx3UzOPU3cH1mAwuHR6alDqSbAW+2dfW3xyzk +lf7PwyTIDIZr+EsLnrPQYO7Fa+k1ZnCXJzlXrJ2FK8oKrtmUssHzXOKB2a8s +fPjbe51rNQty62LX3xdkIzv5yOfwLiascvKolhNm4975BpHGu0xI7DPROSDC +xg1jluuN8pkQxD+vpi/Jxs7VaYuBAUygb4qRKKSwselDzojsDAPe9u+fSjFg +47Y7cXG5sgyQXBlWvXEbGx+wTza6xdChyDIhbsKDjaY164ZWeNLBMOGU5Vlv +NqaMy9l8ZNPBaaKqs9uPjYmqCYzP/HRIfTvza2cYGxU8Wi555tBgvvCIRdxR +Npprh4r/erAe3pmebS8pY+PY7Z54aU1jCIouumRXQcaT5hMRK2wMsxW3Akar +2Bi97fbC7IwRiKl0zxnUsHGlyflAqydG4LBcUeHeQzbuTzFNVw8wgvqOkl3t +nWS8Zn7u30sNwV74jk5MNxszl9WOzWUbQrfN81mZ9+T3sIQw6iFDmL47kr6j +j41VKxy5950MQeeq/s3vw2ysWZN4VWfGAOrfmcec+MHGkZGnF5b3GoC9xBbQ +m2Cjy2jIjYUmAwhMi34TNcPG8AqBSr3LBjD9MDVPep6N/eNu+8LTDODY75yd +d3+zMXlz+ZcnEQYgYlyqvX2Rja82jv5c720A+Xvuzvz9y8bitULH7lsbwP8A +lpFITg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHCRVCL7boy9ZKcZM2Y8jyV7kihbWYpsKVkKKWWNFqlvpJKE +byLL3EmJNloUqSyhjSgJWbLWl/rd31/3fM497znPe99nea+y/16XAF4eHp5N +S3h4/v+c/fT8sVpmkRkn2ExJUNzarCNfJta8+xiw3G3u3Ac1QMlX/jLd2XAl +4du902AMMc43uvi6CyHzVJtHOFiB6Jh09q8uDnRtO7+KBq7QW++0d7qrAWyS +NiXEm+0Ca7Xhj5NdbUCs+fi6yDQKfnXR/5no6gfjN7l12/STodHy36I3hVNg +tjFNOLPzHCj01g76ay/CJlP1GcFD+SAR5nNDwJIP6UrXKC9rrkG2gXWdk9ty +TEvZOLzF4Dr05Oo/nBQRwsNhR4zuTZdBXnvZ6hh1IfS0PflXYmk5eApr+vxm +CKFvvYrxLvFy+JCk+Id3pxBuubisacigHPrCV7IkbgmhpWeOUUZ4OQxZfblN +8xBGR6FD41qD5TA/kVMZf3U1+vy2ympuvQmZRUde8cqKopP62/6O5EqwNw4W +k1QVxYObbTZVnqmE5Y9d3DR1RDEpzqIqMb8SkgfU3zuYi+KEwSrr5Xcq4ZBK +y+C5YFF0We2acGO4EsILZP5o3BVF+odlqQqaVbD5UrW2g5cY+n14kklPqwLp +cwPHz14Wx5xmM6sgRjXIrLuVPF8iji17izw2m1WDXEPqke1V4tg4ZWdPs6wG +ysTaaM1Gcex/rVA35VgN6o77fOuGxLHQ/XYzy7cajJYu0gaMJLDmZKuxQGo1 +bIqS+mL4QgJPHxP9GNtaDc6CQ59y2iWw0iA08GNbNbgU1vYsfJBAr8TAelZX +NWx97f3q6bgEet553zLWWw3bta/d9ZSURJf3m2Kok9UQ+kXvzDFfSdzpp1tc +K8aBNFc7s7ZZSTTcuPn8IxcOyHFb5XiXSGHoHN19cisHKsRd5wwEpfD5W0Wq +ghcH3rbtqDqjJIU3zDQf+e/kgNrmKJXNtlKYXhtmyY3kQMPGK8teX5DCEzs+ +rQ06y4FF65nWlyxpDDHy/y32igNZJXFli9bS6GNXb3utjVy/jCddZ7M0VoDV +Rd23HHB8stL8ZIA0vtdfv5H2kQN5llTC8ZQ0Bood+LZihAMm6JDT3CuN25f5 +iDfwExDJuOrz/JgMWrzy//cAnQD7AuFphxMyuHuUNkxjEqAicCi99R8Z1N+0 +7P0ki4DXHVur26/LYPX4nWeeFgTo7lvF96lVBvNuEp3zjgQMlRwo+SknizN/ +nAQD/Qh4IPSVGa0mi18/iGzp20nA+SiXV3M6sugjLei0NZCADRY68wsoi/my +uj7rQwko/NhvJ7BbFh3itH49iCLAW8LphzwhiwaCfUECaQQYxdcdza+XxWV5 +MxLs4wSs7F8jpfxUFktsVsaHZxJQW8kHGj2y2FogfeDxaQKkHGqz9P/KIit5 +F4udS8Z/VM14g4MchkTU7fG/ToDV+O+48AE5VHznZXvkCQGxtue0Ho3K4YoN +8m/UnhFQcVXnnfisHL74/mTT0yYCZFx9GbXL5VFYb5vBYjMBo3eezPHpyiNl +fmUOs42As8eyoi4clEehvqWHpz8S0PR+rdroUXm85XOY49FLwIJxY7tZpjxO +PfP/drePgMBvM4ZfLsvjtBbDLWKAAKaj16RuozxKiiy6VgwR0C+pEf5YSAHp +mcvTg38SIL33gaK0tAIeLnspe3qKAMcm95fBVAU0fdlwu2qagJq4TO3VRgp4 +rt1DfmiWgIzeiWEPdwXc+69tjuZ/5HmYZOSV+ylg83h2gc4CAdNnVO3/hihg +6P7Aer1FAnZYbS0tSlDA9lejumv+EmBYWrd7vFAB5XvOSg3zcmE3r5u0RbkC +fg9iNb/m48Ilr7Gn524poG6lxAViKReWCStrMJsU0N/sftKeZVx4tz/1S/IP +BXx0UuEmZwUXVrconeuaVcCvJX6WcSu5YKVea6nFo4iyz5t+sQW5UNE1UvhK +TBEtUk68qF3FhaOszX5yJorYvEZKMmk1F2x35P+kWygida3IOEOEC8KJI0lu +joqI7EXzUdKXGlNKsnwVMSItbJulGBd2fm2jV4QoosAVZ4Uh0loC1OfNUYqo +lTmyI12cC3fs744sO66I2l1y/nUSXDgSJpCgdlYR584pqjtJcsH6lKuwxWVF +HOwjQj6Q7ngzpp9QTcbbl35sRIoLE+6qMVM9ihh48oZAhwwXbsftExD9oogT +8xK8lrJcOHzpXq7umCIaa0sdv0l6Vd+2umBeCg5t+888Wo4L7UuKHdNWUZCw +2R/TRjpP9efHIikK5o0Us9bJc0Fz9wmePi0KNpfEJr0iPZbec2bRmIJW+XeW +yStwgXtDQ1UeKNgn8JPqTzq+JZJrYkdBCb7Y9iLSFmMPN2zdQsEUjUKlAdIr +RIS7IrdTcORw4zJFRS68NvAKOrObgm9OGme4kM7Zcv1XRQQFw22dypJI74ie +yWiJp2CQVGhoFWn1HAuF4RQK1rwebO4mPXrn9E2BLAr6PKS0LpAm3n0wU88j +47scEalA4ULcwtrXFkUU5DsJ9+ikzSkH/HwrKFisPFzuRHo5Pv6ZcIeC6e4d +ln6kW/1Eky82UFDygn/SXtL/JO2QrG2h4Bnid1gsae/ispK3byn4o5eP9whp +lWfz9Ok+cn39oGUi6e9DG56LjlDwr6OQcQLpqpVnPfVmyP3O97dHkz6g3Tfi ++JeCdRkdaiGkzZx0EkJWKGGYrvMaT9L8++KE08WV0H3fk94NpFvOPLtSrKiE +86bFjjqkzxISBo2aSlj+zm+fCGnPTr+GPgMlzPgZ7jhO7l95rmLLH1MllE0x +739Oekhm4Yu8tRKKjG0yKiBdybSLYTgroX6/qPl+0jHe5wW2eSrh1B4eISTN +V6CvlR2uhDd0nL62kuf14lFCXeVBJTTTKJk+TTpr4IXjy2NKaMBWaHIkTdEM +2Ls8Rwk39vg/qiXz46sth0fjqhKmVtKGg0mXh/w9Y1mmhA8s9T5KkmZWXOAe +fqCEOy5e0/Qj882qq3VxrEkJ/VpM5QVIO/EstfFpU8I/8VeCS8l83ekS3gNf +lZAZ+kJ+gMzv8PhrKlVjSngnX+JYHOmDRd2h1HklbKDp2wqTto5XPpLIT0Vz +gdF5LWkuNK+uv2aykoo/eqQGCbJenIu2Nk0IU/Gl5RoTBmmvl5mifjJU3BhN +EWGQ9bVPafaa+ToqhnUFE0Jkfc4QWU2/9Ki4dmPHSCxZv3G2635UG1OR/vDQ +2X5RLqRE+NJUzKiY3/F4fSlZ/3mNL5p4N1OxfVFkRFCYC493X/nRGEPFy2NJ +FmuWc8FugSF2KJ6Kf+69FfIWIPMtq4NmnEjFLoHH20+Q/aqndkVi0XEq0p4M +ZPWT/WxMMEos5RIVJXOvhAQs4YJMlS3duoGKH9OXqTz9RcBlqwGvP0+pWEhk +fGiYJ+dlT0JiTTMVT1t+NqifI0CHl3iu0UnF3+pVnKIZAixcFb0Fhqh4y6PM +eOMkAWHzk4lNQsp4a69n/OI3sv9HBEoNiinjcFWn8o1BApYPvyvjk1FG1zPs +QZevBBS/b3xrpqKMGe12r3P7Cfh0/x/tWzRl3J/WvH32AwGbUhjdV32UcfH4 +Pv7frwmg/Lm558EuZVzjVREW/IqcVzEqfB+DldFjm4ZI50sC0oMEdWWilFGv +N1b86gsCHjp8TDqVroxrt741X/WY7P9iR/Xiq5Vx6ULOpH4NATyZM49za5Tx +t/BZ/gAuAa18IZ41dcootoU/+h8OAaEzLimTT5TxXxt2+EgFAUXdau93v1NG +3dIbS8L+JefxlaZUVz4VvLi1NOxRDgG/1ol80nFTwT98PQnN0QTMXpY7auSp +gu6ZFrsvRJLzabW6GsNHBdvaD67aFUHA2BQjxCpYBe2yNLPHw8j5WLdz1jNB +BSvDiUe95P3ihcNt4fRiFRQsuB6msZmAvNAd0D+jgsmlw0OeawlglZUXnD+v +iqPeu969ec2B99SyKxsuquLTfc7Joq0ciDtfmj99RRW/9VQ9c2rmwO2jJZdc +SlUxYfsp5YYnHDB0L8gVrldFnQfLNp+4y4G1/OeyUj+romjknGzVNQ5I+cQn +xmiroeq6SJp5FAcmxex9tzaoYSolSf+7MAe+nPDdul9AA7cU7oj+I1MNduMH +7L7SNFFWtOhximwVjO5cHsk9sgYPyrwqwM83yf8Lad60hrV44Y2Dr/3RMhB7 +qXGqalwL+3+0tFzFUlBIr3Sm0bSx6irfVNKbEshdxxAR362Dh7+Ge5bkFMEL +OfP1U2d0cYlY2NmZ+EJgKjRk6b3Vw8SJyaQHTgUgzFcY5XdMHwWsePRutlwC +ylElloeGAR4ZUVbpms2FFereNS7PDNDXq/VISco/oMuWrTyw3RBN7vsO5l3M +hv2fxBrteYwwVGuKf0vGaRifOuFml2uEifz6bw51ZoCN3tM8Ox1jLJBTodg+ +TIX7U6b/zbUao4hi+Vzk52MQrm347k3AevRcUi93LukIsMd2dXisoGGqf8Sw +fE0sbFCT2ShUSEOzKMHX7orRwP3xRHlXEQ01W5oYTauiQe125OzdEhq+kouJ +t1iIgqX2r64EldHQ03Hj/m3vo6Bhb+rPRi4N6blPrvDmRYFZ3XRO3DMatiXG +Z3jIRgHN5U3/t1EanrpoZjWoFAlrEjMONtDpWCK45L6/QwTUmxbzOzLpmCmk +xzBgRYDz3IPsThYdVxfkL67UiYCD4TPlQ+Z0jN5ta9cnHAFN3r6fhR3puDDB +YIu274MgBs3ey5eOjm0XNNO274PSn5/lp9Pp2PKPwhW9mXDQCmA8UH9HxydS +9Zrj/4bCaRWn30kf6Giy51b8oaxQmO71X9//iY45ySc75WJD4b7nibL8ATpe +W3kvKsM+FFyce3Okf9AxOG5gq/FYCMSapuxbwWOChkEBfjdMQqBJ9I3yD3UT +DIWXbz/2BEHA/aBkboQJmj31JrY7BMLYnuEDG6JM8ByXVmpBC4SDimGhb2NM +0EKd/d1EORAyDu11mY83werYKTmPuQCoYsZQWakm+NV3VHB3UQAs1CTVN+aZ +YPYz2eDKJQGQXZk/3dZogn+ETGWKm3bCg4KOXZOSDLwaHFH3IsUP+hyVfWJk +GKg3fth9IcoPeH7t8fhPjoHaxWWrWLv8wGKzgBM/lYHjP1ef+2rhB0+XMOmy +Wgx8EFcm3sfjBy3+V1aYmzGwuWHN8ZAjvvBOLaQiK5CBvQPRSZpCPjB9/e+c +3m0GWj80aYuI8YLBrdYFx2sZGBv4qZu63Qu6l560HahjoJhRcNQXSy+o85W7 +cP4hA20d3hiWinrBMZn1zMXnDPzN/9xes8ITRNJDDr34wEDvn94j34c9QHt3 +J08ALxP5ey76akW6w071shV5G5mo7iRQcafODeKe7AjRcGZi5G9OblCxG2QF +iDVzXJhofJD9Sfu0G9QXx55o3sbE7LQk05/+biChYbt60Y+JD1a0ZIYLusFT +ja8SvjFM/HD9nADV1xW01ihRNa4wcViB67ogvQUmtc7SOBNMZM6xqwPuO0N3 +C24Qn2LiLCt4vP+mMzwMH9sSNcPEGJbWw/DLznCKYxdB+81EubwTP6oPOYMW +k6f8Lp8puhSvsv5q6gz+dnuUG6VM8WhnwdBo7Cbo2G2zqoNFvi9YfXgieyPc +Kfrv80y6Kaocej+xX9weaJZRc/aZpjhweNLs/C87uPV5dFXBSVN82T5d8rrX +DjiUT3T7bFO8cTg5IaPcDspzH57Mv2iKWTUhriI2dlBwIoVhU2GK2a6Fdm6J +tnA8avWZ3HZTNPYxSXLgs4Hl4uklPzpN0ebvzq36o9aQWs1Tb9Ftil9OtSlq +dVpD8tjk4OgHU+zPPWbj/a81HA7qYJkPkvGtv82sdbSG/d4Xhr7Pm6IqOyLQ +5uIG8LRSRVMKCx9NP5XdYGMFix3LhRupLPS3HJv/rm8FBQFj7+1VWRh974JW +sZwVDKbWHvBcw8Jgxzr6jjFL2P98U2WsIQtnp96+7z5vCRlOhyh3rFl4WMbn +ZO+IBdx171ww3svCMy4HAiqLzWH797sv6iNYGHlq4vuvM+bAE1eQaxXFwrKx +yDD3w+ZgfTHU2DWWheVuh9Q2bzOHto9LwiKTWDgycDFCb6U5DPvrvq/OYWH4 +Sh/DrEgE+T1ptboPWXjwxOJkx3UzOPU3cH1mAwuHR6alDqSbAW+2dfW3xyzk +lf7PwyTIDIZr+EsLnrPQYO7Fa+k1ZnCXJzlXrJ2FK8oKrtmUssHzXOKB2a8s +fPjbe51rNQty62LX3xdkIzv5yOfwLiascvKolhNm4975BpHGu0xI7DPROSDC +xg1jluuN8pkQxD+vpi/Jxs7VaYuBAUygb4qRKKSwselDzojsDAPe9u+fSjFg +47Y7cXG5sgyQXBlWvXEbGx+wTza6xdChyDIhbsKDjaY164ZWeNLBMOGU5Vlv +NqaMy9l8ZNPBaaKqs9uPjYmqCYzP/HRIfTvza2cYGxU8Wi555tBgvvCIRdxR +Npprh4r/erAe3pmebS8pY+PY7Z54aU1jCIouumRXQcaT5hMRK2wMsxW3Akar +2Bi97fbC7IwRiKl0zxnUsHGlyflAqydG4LBcUeHeQzbuTzFNVw8wgvqOkl3t +nWS8Zn7u30sNwV74jk5MNxszl9WOzWUbQrfN81mZ9+T3sIQw6iFDmL47kr6j +j41VKxy5950MQeeq/s3vw2ysWZN4VWfGAOrfmcec+MHGkZGnF5b3GoC9xBbQ +m2Cjy2jIjYUmAwhMi34TNcPG8AqBSr3LBjD9MDVPep6N/eNu+8LTDODY75yd +d3+zMXlz+ZcnEQYgYlyqvX2Rja82jv5c720A+Xvuzvz9y8bitULH7lsbwP8A +lpFITg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07859040887591295}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07859040887591295}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHCRVCL7boy9ZKcZM2Y8jyV7kihbWYpsKVkKKWWNFqlvpJKE +byLL3EmJNloUqSyhjSgJWbLWl/rd31/3fM497znPe99nea+y/16XAF4eHp5N +S3h4/v+c/fT8sVpmkRkn2ExJUNzarCNfJta8+xiw3G3u3Ac1QMlX/jLd2XAl +4du902AMMc43uvi6CyHzVJtHOFiB6Jh09q8uDnRtO7+KBq7QW++0d7qrAWyS +NiXEm+0Ca7Xhj5NdbUCs+fi6yDQKfnXR/5no6gfjN7l12/STodHy36I3hVNg +tjFNOLPzHCj01g76ay/CJlP1GcFD+SAR5nNDwJIP6UrXKC9rrkG2gXWdk9ty +TEvZOLzF4Dr05Oo/nBQRwsNhR4zuTZdBXnvZ6hh1IfS0PflXYmk5eApr+vxm +CKFvvYrxLvFy+JCk+Id3pxBuubisacigHPrCV7IkbgmhpWeOUUZ4OQxZfblN +8xBGR6FD41qD5TA/kVMZf3U1+vy2ympuvQmZRUde8cqKopP62/6O5EqwNw4W +k1QVxYObbTZVnqmE5Y9d3DR1RDEpzqIqMb8SkgfU3zuYi+KEwSrr5Xcq4ZBK +y+C5YFF0We2acGO4EsILZP5o3BVF+odlqQqaVbD5UrW2g5cY+n14kklPqwLp +cwPHz14Wx5xmM6sgRjXIrLuVPF8iji17izw2m1WDXEPqke1V4tg4ZWdPs6wG +ysTaaM1Gcex/rVA35VgN6o77fOuGxLHQ/XYzy7cajJYu0gaMJLDmZKuxQGo1 +bIqS+mL4QgJPHxP9GNtaDc6CQ59y2iWw0iA08GNbNbgU1vYsfJBAr8TAelZX +NWx97f3q6bgEet553zLWWw3bta/d9ZSURJf3m2Kok9UQ+kXvzDFfSdzpp1tc +K8aBNFc7s7ZZSTTcuPn8IxcOyHFb5XiXSGHoHN19cisHKsRd5wwEpfD5W0Wq +ghcH3rbtqDqjJIU3zDQf+e/kgNrmKJXNtlKYXhtmyY3kQMPGK8teX5DCEzs+ +rQ06y4FF65nWlyxpDDHy/y32igNZJXFli9bS6GNXb3utjVy/jCddZ7M0VoDV +Rd23HHB8stL8ZIA0vtdfv5H2kQN5llTC8ZQ0Bood+LZihAMm6JDT3CuN25f5 +iDfwExDJuOrz/JgMWrzy//cAnQD7AuFphxMyuHuUNkxjEqAicCi99R8Z1N+0 +7P0ki4DXHVur26/LYPX4nWeeFgTo7lvF96lVBvNuEp3zjgQMlRwo+SknizN/ +nAQD/Qh4IPSVGa0mi18/iGzp20nA+SiXV3M6sugjLei0NZCADRY68wsoi/my +uj7rQwko/NhvJ7BbFh3itH49iCLAW8LphzwhiwaCfUECaQQYxdcdza+XxWV5 +MxLs4wSs7F8jpfxUFktsVsaHZxJQW8kHGj2y2FogfeDxaQKkHGqz9P/KIit5 +F4udS8Z/VM14g4MchkTU7fG/ToDV+O+48AE5VHznZXvkCQGxtue0Ho3K4YoN +8m/UnhFQcVXnnfisHL74/mTT0yYCZFx9GbXL5VFYb5vBYjMBo3eezPHpyiNl +fmUOs42As8eyoi4clEehvqWHpz8S0PR+rdroUXm85XOY49FLwIJxY7tZpjxO +PfP/drePgMBvM4ZfLsvjtBbDLWKAAKaj16RuozxKiiy6VgwR0C+pEf5YSAHp +mcvTg38SIL33gaK0tAIeLnspe3qKAMcm95fBVAU0fdlwu2qagJq4TO3VRgp4 +rt1DfmiWgIzeiWEPdwXc+69tjuZ/5HmYZOSV+ylg83h2gc4CAdNnVO3/hihg +6P7Aer1FAnZYbS0tSlDA9lejumv+EmBYWrd7vFAB5XvOSg3zcmE3r5u0RbkC +fg9iNb/m48Ilr7Gn524poG6lxAViKReWCStrMJsU0N/sftKeZVx4tz/1S/IP +BXx0UuEmZwUXVrconeuaVcCvJX6WcSu5YKVea6nFo4iyz5t+sQW5UNE1UvhK +TBEtUk68qF3FhaOszX5yJorYvEZKMmk1F2x35P+kWygida3IOEOEC8KJI0lu +joqI7EXzUdKXGlNKsnwVMSItbJulGBd2fm2jV4QoosAVZ4Uh0loC1OfNUYqo +lTmyI12cC3fs744sO66I2l1y/nUSXDgSJpCgdlYR584pqjtJcsH6lKuwxWVF +HOwjQj6Q7ngzpp9QTcbbl35sRIoLE+6qMVM9ihh48oZAhwwXbsftExD9oogT +8xK8lrJcOHzpXq7umCIaa0sdv0l6Vd+2umBeCg5t+888Wo4L7UuKHdNWUZCw +2R/TRjpP9efHIikK5o0Us9bJc0Fz9wmePi0KNpfEJr0iPZbec2bRmIJW+XeW +yStwgXtDQ1UeKNgn8JPqTzq+JZJrYkdBCb7Y9iLSFmMPN2zdQsEUjUKlAdIr +RIS7IrdTcORw4zJFRS68NvAKOrObgm9OGme4kM7Zcv1XRQQFw22dypJI74ie +yWiJp2CQVGhoFWn1HAuF4RQK1rwebO4mPXrn9E2BLAr6PKS0LpAm3n0wU88j +47scEalA4ULcwtrXFkUU5DsJ9+ikzSkH/HwrKFisPFzuRHo5Pv6ZcIeC6e4d +ln6kW/1Eky82UFDygn/SXtL/JO2QrG2h4Bnid1gsae/ispK3byn4o5eP9whp +lWfz9Ok+cn39oGUi6e9DG56LjlDwr6OQcQLpqpVnPfVmyP3O97dHkz6g3Tfi ++JeCdRkdaiGkzZx0EkJWKGGYrvMaT9L8++KE08WV0H3fk94NpFvOPLtSrKiE +86bFjjqkzxISBo2aSlj+zm+fCGnPTr+GPgMlzPgZ7jhO7l95rmLLH1MllE0x +739Oekhm4Yu8tRKKjG0yKiBdybSLYTgroX6/qPl+0jHe5wW2eSrh1B4eISTN +V6CvlR2uhDd0nL62kuf14lFCXeVBJTTTKJk+TTpr4IXjy2NKaMBWaHIkTdEM +2Ls8Rwk39vg/qiXz46sth0fjqhKmVtKGg0mXh/w9Y1mmhA8s9T5KkmZWXOAe +fqCEOy5e0/Qj882qq3VxrEkJ/VpM5QVIO/EstfFpU8I/8VeCS8l83ekS3gNf +lZAZ+kJ+gMzv8PhrKlVjSngnX+JYHOmDRd2h1HklbKDp2wqTto5XPpLIT0Vz +gdF5LWkuNK+uv2aykoo/eqQGCbJenIu2Nk0IU/Gl5RoTBmmvl5mifjJU3BhN +EWGQ9bVPafaa+ToqhnUFE0Jkfc4QWU2/9Ki4dmPHSCxZv3G2635UG1OR/vDQ +2X5RLqRE+NJUzKiY3/F4fSlZ/3mNL5p4N1OxfVFkRFCYC493X/nRGEPFy2NJ +FmuWc8FugSF2KJ6Kf+69FfIWIPMtq4NmnEjFLoHH20+Q/aqndkVi0XEq0p4M +ZPWT/WxMMEos5RIVJXOvhAQs4YJMlS3duoGKH9OXqTz9RcBlqwGvP0+pWEhk +fGiYJ+dlT0JiTTMVT1t+NqifI0CHl3iu0UnF3+pVnKIZAixcFb0Fhqh4y6PM +eOMkAWHzk4lNQsp4a69n/OI3sv9HBEoNiinjcFWn8o1BApYPvyvjk1FG1zPs +QZevBBS/b3xrpqKMGe12r3P7Cfh0/x/tWzRl3J/WvH32AwGbUhjdV32UcfH4 +Pv7frwmg/Lm558EuZVzjVREW/IqcVzEqfB+DldFjm4ZI50sC0oMEdWWilFGv +N1b86gsCHjp8TDqVroxrt741X/WY7P9iR/Xiq5Vx6ULOpH4NATyZM49za5Tx +t/BZ/gAuAa18IZ41dcootoU/+h8OAaEzLimTT5TxXxt2+EgFAUXdau93v1NG +3dIbS8L+JefxlaZUVz4VvLi1NOxRDgG/1ol80nFTwT98PQnN0QTMXpY7auSp +gu6ZFrsvRJLzabW6GsNHBdvaD67aFUHA2BQjxCpYBe2yNLPHw8j5WLdz1jNB +BSvDiUe95P3ihcNt4fRiFRQsuB6msZmAvNAd0D+jgsmlw0OeawlglZUXnD+v +iqPeu969ec2B99SyKxsuquLTfc7Joq0ciDtfmj99RRW/9VQ9c2rmwO2jJZdc +SlUxYfsp5YYnHDB0L8gVrldFnQfLNp+4y4G1/OeyUj+romjknGzVNQ5I+cQn +xmiroeq6SJp5FAcmxex9tzaoYSolSf+7MAe+nPDdul9AA7cU7oj+I1MNduMH +7L7SNFFWtOhximwVjO5cHsk9sgYPyrwqwM83yf8Lad60hrV44Y2Dr/3RMhB7 +qXGqalwL+3+0tFzFUlBIr3Sm0bSx6irfVNKbEshdxxAR362Dh7+Ge5bkFMEL +OfP1U2d0cYlY2NmZ+EJgKjRk6b3Vw8SJyaQHTgUgzFcY5XdMHwWsePRutlwC +ylElloeGAR4ZUVbpms2FFereNS7PDNDXq/VISco/oMuWrTyw3RBN7vsO5l3M +hv2fxBrteYwwVGuKf0vGaRifOuFml2uEifz6bw51ZoCN3tM8Ox1jLJBTodg+ +TIX7U6b/zbUao4hi+Vzk52MQrm347k3AevRcUi93LukIsMd2dXisoGGqf8Sw +fE0sbFCT2ShUSEOzKMHX7orRwP3xRHlXEQ01W5oYTauiQe125OzdEhq+kouJ +t1iIgqX2r64EldHQ03Hj/m3vo6Bhb+rPRi4N6blPrvDmRYFZ3XRO3DMatiXG +Z3jIRgHN5U3/t1EanrpoZjWoFAlrEjMONtDpWCK45L6/QwTUmxbzOzLpmCmk +xzBgRYDz3IPsThYdVxfkL67UiYCD4TPlQ+Z0jN5ta9cnHAFN3r6fhR3puDDB +YIu274MgBs3ey5eOjm0XNNO274PSn5/lp9Pp2PKPwhW9mXDQCmA8UH9HxydS +9Zrj/4bCaRWn30kf6Giy51b8oaxQmO71X9//iY45ySc75WJD4b7nibL8ATpe +W3kvKsM+FFyce3Okf9AxOG5gq/FYCMSapuxbwWOChkEBfjdMQqBJ9I3yD3UT +DIWXbz/2BEHA/aBkboQJmj31JrY7BMLYnuEDG6JM8ByXVmpBC4SDimGhb2NM +0EKd/d1EORAyDu11mY83werYKTmPuQCoYsZQWakm+NV3VHB3UQAs1CTVN+aZ +YPYz2eDKJQGQXZk/3dZogn+ETGWKm3bCg4KOXZOSDLwaHFH3IsUP+hyVfWJk +GKg3fth9IcoPeH7t8fhPjoHaxWWrWLv8wGKzgBM/lYHjP1ef+2rhB0+XMOmy +Wgx8EFcm3sfjBy3+V1aYmzGwuWHN8ZAjvvBOLaQiK5CBvQPRSZpCPjB9/e+c +3m0GWj80aYuI8YLBrdYFx2sZGBv4qZu63Qu6l560HahjoJhRcNQXSy+o85W7 +cP4hA20d3hiWinrBMZn1zMXnDPzN/9xes8ITRNJDDr34wEDvn94j34c9QHt3 +J08ALxP5ey76akW6w071shV5G5mo7iRQcafODeKe7AjRcGZi5G9OblCxG2QF +iDVzXJhofJD9Sfu0G9QXx55o3sbE7LQk05/+biChYbt60Y+JD1a0ZIYLusFT +ja8SvjFM/HD9nADV1xW01ihRNa4wcViB67ogvQUmtc7SOBNMZM6xqwPuO0N3 +C24Qn2LiLCt4vP+mMzwMH9sSNcPEGJbWw/DLznCKYxdB+81EubwTP6oPOYMW +k6f8Lp8puhSvsv5q6gz+dnuUG6VM8WhnwdBo7Cbo2G2zqoNFvi9YfXgieyPc +Kfrv80y6Kaocej+xX9weaJZRc/aZpjhweNLs/C87uPV5dFXBSVN82T5d8rrX +DjiUT3T7bFO8cTg5IaPcDspzH57Mv2iKWTUhriI2dlBwIoVhU2GK2a6Fdm6J +tnA8avWZ3HZTNPYxSXLgs4Hl4uklPzpN0ebvzq36o9aQWs1Tb9Ftil9OtSlq +dVpD8tjk4OgHU+zPPWbj/a81HA7qYJkPkvGtv82sdbSG/d4Xhr7Pm6IqOyLQ +5uIG8LRSRVMKCx9NP5XdYGMFix3LhRupLPS3HJv/rm8FBQFj7+1VWRh974JW +sZwVDKbWHvBcw8Jgxzr6jjFL2P98U2WsIQtnp96+7z5vCRlOhyh3rFl4WMbn +ZO+IBdx171ww3svCMy4HAiqLzWH797sv6iNYGHlq4vuvM+bAE1eQaxXFwrKx +yDD3w+ZgfTHU2DWWheVuh9Q2bzOHto9LwiKTWDgycDFCb6U5DPvrvq/OYWH4 +Sh/DrEgE+T1ptboPWXjwxOJkx3UzOPU3cH1mAwuHR6alDqSbAW+2dfW3xyzk +lf7PwyTIDIZr+EsLnrPQYO7Fa+k1ZnCXJzlXrJ2FK8oKrtmUssHzXOKB2a8s +fPjbe51rNQty62LX3xdkIzv5yOfwLiascvKolhNm4975BpHGu0xI7DPROSDC +xg1jluuN8pkQxD+vpi/Jxs7VaYuBAUygb4qRKKSwselDzojsDAPe9u+fSjFg +47Y7cXG5sgyQXBlWvXEbGx+wTza6xdChyDIhbsKDjaY164ZWeNLBMOGU5Vlv +NqaMy9l8ZNPBaaKqs9uPjYmqCYzP/HRIfTvza2cYGxU8Wi555tBgvvCIRdxR +Npprh4r/erAe3pmebS8pY+PY7Z54aU1jCIouumRXQcaT5hMRK2wMsxW3Akar +2Bi97fbC7IwRiKl0zxnUsHGlyflAqydG4LBcUeHeQzbuTzFNVw8wgvqOkl3t +nWS8Zn7u30sNwV74jk5MNxszl9WOzWUbQrfN81mZ9+T3sIQw6iFDmL47kr6j +j41VKxy5950MQeeq/s3vw2ysWZN4VWfGAOrfmcec+MHGkZGnF5b3GoC9xBbQ +m2Cjy2jIjYUmAwhMi34TNcPG8AqBSr3LBjD9MDVPep6N/eNu+8LTDODY75yd +d3+zMXlz+ZcnEQYgYlyqvX2Rja82jv5c720A+Xvuzvz9y8bitULH7lsbwP8A +lpFITg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07859040887591295}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07859040887591295}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994351464795927*^9, 3.994353869736145*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"fb557fff-88d2-4c0e-af98-1fe2eaab4f53"] +}, Open ]], Cell[CellGroupData[{ @@ -7142,11 +8065,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.991850610344879*^9},ExpressionUUID->"c213919d-017d-a948-8e46-\ -fe19384187c3"], + CellChangeTimes->{3.991850610344879*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[BoxData["9.786582751762749`"], "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[BoxData["9.328163722458722`"], "Output", + CellChangeTimes->{3.994351464847381*^9, 3.994353869782877*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"a4874d3f-c25b-463e-9f4d-9a006a8936cb"] }, Open ]], Cell[CellGroupData[{ @@ -7202,447 +8126,580 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850612616415*^9},ExpressionUUID->"3764dfb4-9656-4349-b0a1-\ -77ebd1a3e048"], + CellChangeTimes->{3.991850612616415*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.88797445346101`*^-253\\\", \ +\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 13, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943514649961863`*^9, 3.994353869911427*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"84d96fb1-a69a-4b5f-8ac0-d5300d9117bb"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"05911c33-7605-8b49-a7ba-7fc8c8f30741"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.850632866592188`*^-262\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 14, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943514649961863`*^9, 3.994353869920763*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"7e6ad2e2-44ad-4bbc-bf50-c89240a4235e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.813448165200161`*^-271\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 99, 15, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943514649961863`*^9, 3.994353869928173*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"f6a7081c-cb4e-41e2-801d-aa39e36dec06"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 12.2218 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .13693 -24 -4.5 ] -[.01131 .13693 0 4.5 ] -[.01131 .25915 -24 -4.5 ] -[.01131 .25915 0 4.5 ] -[.01131 .38137 -24 -4.5 ] -[.01131 .38137 0 4.5 ] -[.01131 .50359 -24 -4.5 ] -[.01131 .50359 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .13693 m -.03006 .13693 L -s -[(0.01)] .01131 .13693 1 0 Mshowa -.02381 .25915 m -.03006 .25915 L -s -[(0.02)] .01131 .25915 1 0 Mshowa -.02381 .38137 m -.03006 .38137 L -s -[(0.03)] .01131 .38137 1 0 Mshowa -.02381 .50359 m -.03006 .50359 L -s -[(0.04)] .01131 .50359 1 0 Mshowa -.125 Mabswid -.02381 .03916 m -.02756 .03916 L -s -.02381 .0636 m -.02756 .0636 L -s -.02381 .08805 m -.02756 .08805 L -s -.02381 .11249 m -.02756 .11249 L -s -.02381 .16138 m -.02756 .16138 L -s -.02381 .18582 m -.02756 .18582 L -s -.02381 .21026 m -.02756 .21026 L -s -.02381 .23471 m -.02756 .23471 L -s -.02381 .2836 m -.02756 .2836 L -s -.02381 .30804 m -.02756 .30804 L -s -.02381 .33248 m -.02756 .33248 L -s -.02381 .35693 m -.02756 .35693 L -s -.02381 .40581 m -.02756 .40581 L -s -.02381 .43026 m -.02756 .43026 L -s -.02381 .4547 m -.02756 .4547 L -s -.02381 .47914 m -.02756 .47914 L -s -.02381 .52803 m -.02756 .52803 L -s -.02381 .55248 m -.02756 .55248 L -s -.02381 .57692 m -.02756 .57692 L -s -.02381 .60136 m -.02756 .60136 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 -.5 Mabswid -.02381 .01472 m -.06244 .10806 L -.10458 .20681 L -.14415 .29388 L -.18221 .37017 L -.22272 .44131 L -.26171 .49847 L -.30316 .54591 L -.32392 .56431 L -.34309 .5781 L -.36173 .58858 L -.37125 .59283 L -.3815 .59658 L -.3917 .59947 L -.40103 .60141 L -.40552 .6021 L -.40789 .6024 L -.41042 .60267 L -.41284 .60289 L -.41504 .60305 L -.41725 .60317 L -.41834 .60322 L -.41933 .60325 L -.4205 .60328 L -.42174 .60331 L -.4229 .60332 L -.42399 .60332 L -.42526 .60331 L -.42644 .60329 L -.42773 .60326 L -.4291 .60321 L -.43163 .60308 L -.434 .60293 L -.43941 .60241 L -.44405 .60181 L -.4483 .60112 L -.45788 .59913 L -.46769 .59645 L -.47681 .59341 L -.49751 .58461 L -.53655 .56157 L -.57805 .52937 L -.61803 .49268 L -.6565 .45377 L -.69742 .4102 L -.73682 .36757 L -.77471 .32713 L -.81505 .2857 L -.85387 .24819 L -.89515 .21147 L -Mistroke -.93491 .17954 L -.97316 .15219 L -.97619 .15016 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzdXHd8VUUWDqm7ZJWqCCgl9I5ACklIBJRqkKYroMGIgQhiIiAoP0AQpUtb -aYoEREBlVQQUUMD2c2VVQIoUEWnSi0hVUGbfmTdzzr2POXeS+OJvd//Iy7y5 -33fOd8/MnTtn7tyXljEoK7N/xqBHe2VUaj0gIyfr0V4DK7XKHuCrCisSElJk -v++vVqWQcF9ZhIS4PqaI38UB+PCVhbgmDsBH/svZ8l+U2PPdHtG3b19Ru3Zt -UaNGDdGgQQMxaNAg8esvv4YkSUyEOHTwkGjSpIn8A1yJEiVCQuFbSJiYMH4C -oCQyVOGnTpkqbdWsWVPavvb7tZBYq62iTlteuuKkqTCRmZkpSpcurYT4P6Oj -o8VvV39TCJsck41opw2bFGUnSuz4dofExMfHi0aNGkns6GdHi6tXrvoU8Doi -3K3x/Z7vxcoVK8XlS5elax9djBgxQnTr1i0kRUn+ZvM3omvXrsoofEaKNavX -iLZt24qLFy5KTr9+/cT4ceMTDJTwPLjSET544KBo2LChWP7uchXNMJGQkIAR -DvV2H8uaiXaakX9ecnSQ9/2wT+zetRs5534+J4Ock5OjTouVouL8pFIEakAV -fEv2iGvr1q1lvdNjTEyMKa5FDaZ1AE4cPyFiY2NF7rxcFbMwMWWy7yL+7XdX -HBl3cXk0E2WQoKVe+fWKqFKliuPCYN0FxMrXAmL9uvVsrMJVHbRm+fLlZbfW -nSU5OVns2rlLfovzCJrTh8b9dOYn2UsmTZyk2sPuI9bAjTb40FGZ8eIM0a5d -O0cj2H2EucNTr1492TFt4Tl54qRsGDIRJtLT08XaD9daw+P0Ea/qoLGaNm0q -pk+bnm8fTq7JR5xSDqNVqVKlRIsWLaBDheXRjYpQjupmEydMFHu/3yu7GHTV -USNHiQ4dOpjGM30iIAQEOj1kZWWJZe8sY4MV4e0uUVF+PvuzPNd1a9ehaZu7 -eAM33Nud7mEXzl8Q48aOgwE/z2cXED+437Rq1Ur+r1WrloT6WtArfqdOnjK2 -kE+4NX6MuyRF+fLfX8q7nPOSsblLMHDDvN3p5kpNTcUrL6/uXPHzX7xqiAtp -XoABTN1yPILm9pGqBuOSJUuCLRxebfZ1h3Dw8JSd9pupuoEDB4rFixbnafDS -PjxCk6qCoaKtTzNStVObNm3E5k2b8WxgDKlatWqcF8vtQJ/fxq83ytu2U/fp -U6evuz0xHmPzZcYcuj59+oj3Vr6XF3cRfMRSVBeA/piYmCi6dOki5ufOh/MP -0WH7YM0HsnufP3de3oNh4vfCpBdirVRT7PzzzHLlykmzMNrAja5Tp04wCuGI -5OkyLybcrhMUb8s3W+TM6sB+mUKIb7d/K6pVqwZ8m+uAGMIEuG7duvDnazn4 -DJMB0B71UPPpJ5/KuzMEJUoFbNrUadIr3Jr69+8vO3q8AR+ZR1+xSvmmjZvk -fKhs2bJy8g7zKp/tCA+3cd7U8DwqaKJcLH1zqWjWrJm8wUD8fYOlOguzexVU -LsGrp9xDzqhdyc93/zeOx/hrfYfXw0cRr1ppKxQq/mawGp2fOrLClm74oz7+ -jLr/U/VUig5s+juxdJfBbEtD3Z15xLU0OpWYln+yUwdIrgZdd0GFO48LDVlW -YIiGXQdxqw1F0DtOUITLjku1Eydt+W/EWpMf9HYgKNTgW37+00tbATl0Um/x -yDDO+lILh6x76AjnrL9ZCBxS5KE9grP+hoVD1p06JDCSs/k6bzPSbdPDexRn -fUkhcEiRh/a/cNYXWzhk3UPHXznriwqBQ4o8tBflrL8W2BOKum16eDfdO+Tn -wkLgkKLXeKRp7iE/X7VwyLqHDtN9W34usHDIuoeOGznr8wuBQ4qc2iWwGGcz -l7dZzG3Tw3txzvo8C4ese+gowVl/pRA4pEhp93r44h+zw2VKlpSUBGktPIjR -2QWsm0DWUb9+fZm9nTh+Qt1EIsTw4cPxeU3x4sVFnTp18NnP2Z/OoijTTack -d3Jz/ZL9Iya3ZI+qIamHZzJgZsMXG/Q61ZHDR2RedfjHw9LMksVLIPvTI3fH -jh3F9m3b5TfTeFvSHUUVbzUJUSvjOHVQK+MqJv468K+XVXTd2DFjZQPAN+fS -jV7BisijuFJc5F5GmbZlaj0awamoZQ2UNGzYMDF71uz8S6J4zUUhttVgLcTX -c3SPQSHzXpknxXgKkZNRNiIvoZB9P3gvq2ohFStWhGd3LiGvL3kdHiPlKyKl -7ZJsK5VaEvRjU2zg6su3JGoke2/RHVgLcSyCuXrLnNlz8iXkJi42c1zXmXLn -us5gcIJv+oYHq+ewpBJ4TX23+ztHXYRchFfNquUZpzU3uWOkG8s/FjELWOpe -FymOHjkqO7JeBFv02iKRlpamR8tZM2fJRWxYr4ELj9NwMxce/zWJ52Ra9ymm -jsGzLOg3IAfi6LsOcciENb0xz48RZcqUAQ2sBArDRPiQCCbdNHAm4NcbeE4Z -7lTHIvtGC5s8jkGVxRwcWXEL52c0mihh5JD1Z/FASV5RWc7PM2istIVNHolz -U545w1HlzTynHKdyKBq7xcImj0+jx7I8pzzncTAaK29hk0fi3MpzbuU8DkC9 -txWA/QT6rhjYX251qyRkpUDkbZz1x5FTmdd2m9tPfzQbw3MqcB77orGqFjZ5 -JE41nlOR89gH2dULwM7Es61hYZPeTPxai+dU4jw+jOzaFjZ5JE4dnlOZ85iO -51g3sOdUdvtJx6/1A5ExnPUeyGnAa4tx+yFOQ55ThfN4P7JvLwD778huZGGT -XuI05jlVOY9dkB1rYZNH4sTxnGqcx47IjrewySNxEnhOdc5jGrKbBvac6m4/ -hEzk/dTg/LRDdpKFTR6Jk8xzanIeWyE7pQDsu5CdamGTXuLcwXNqcR5bINu/ -/SDYubqe0EMmDM59x0L0hkiYPeoMy7TMWst9oiS1hV9qoeToerHAZ0FOky+c -v4BT+9WrVnsKrs1FORWlt1TSCzeX1/sGIDWCtBNyPfC3c8dO2FtgWkGu7Q42 -Kb4TFQcrrdchXvjqQtkCPx760ZiJ1OHCmYzi7kJxwU71IesGLHRiSvUDokRC -WqGQYKX6uoPNfXmuaN68uYy6qeHqclFqiuJao7hgJf1aCGxpWPX+KvaKqOuO -F0lqY+1V+U3/tSRfSox7b0yS2If7cSiuresiDd5CgH9flNqRh3XZ2dliwfwF -+Rcci4LbKcFBWCiIEhkZGaJHjx7yioLD0L4wVJ85fcbYAekxd4Cq9n5VBV0w -0Bt3oINAg8IFU7lyZdG+fXvoHKalnfpcqBqhqLv9okxBre8+EeKk8ZwGnMcG -yO5gYZNHkzEPdkPOt2lIuMdhJwzn0uS7Dn7tzHu8nfNoml90stgh3ya2h4pG -nArTfLNLAeyYZspdLXbobEzse3l2Y06FKYe6z2KHVFAOdT/PacL5phy2m4VN -HonTnefEch5p/aJHYE+Ndfsh5AO8nzjOD61YPWhhk0fipPOceM4jrUz2tLDJ -I3Ee4jkJnEd6HpJhYZNH4jzMc5pyHulJZC8LmzwS5xGek8h5pOfHmYH9JdHt -h5C9A5FJnHV61t+H15bk9kOcLJ6TzHmkHRqPWtjkkTh9eU4zziPtq+lnYZNH -4jzGc1I4j6bdTh6+U9y+TWwPFamGumto8XELUYIInh3Yc+4wEK8iPMcIl4cI -9AQvobmh7hckDrAQJYjgA3l4C0PdRSQOshAliOBP8nDTJsJzSBzsJxbKykOU -fF0BcgSohzfU4BkYpC0bv95ofDxImxtJ4RC/wkJccIiSO8TBotIhtm7ZKho3 -bgyzdOO0m/aUnsXSU0pn4a4uaDWQDObOy1Wnd71C07bT06j1adQarHUFreHY -0WOyN8AudVPkaMXsjOEoxTBYSwrh6hPe6KtQoYJ8bW3WzFm0qmAK1ElDHYUs -WIsMWhq8bLFt6za5yd8XdtN1QSubJmlDUVqwlhh0awKve/furp7n9NzaUHcM -tQ6z9rL8rjNoXZBdV69e3VuX1EBqhruuz2AsLGg1kNPD6MapaYMajmBphGtU -+0OrBpGiZ8+e8i0hGBChN/Xu3Rse85t6UltD3SFU9Yxf1R9dNTh+7Lh8lQpu -CYAZPHgwaGP1SN+kYqRfhelm1s5Qtx+JoyxECSL4szy8vaFuLxJHW4gSRPDn -HHCJvhsP7cHS87zNNEPdLiSOsRAlaLfhqIfHDoa6HYY6D98d0PcOLI3j4fcY -6rYhcbyFKEEEn8DD6dnZFixN5OGdDHWbkDjJQpQggr/Awzsb6r5C4uTADtQZ -DxFoCm+9i6FuAxKnWogSRPBpPLyroe5zJE7nifca6j5D4j8sRAki+Is8/D5D -3cdInGEhStAnhqMeHul59EeGox4e7zfUrTXUzbSYkL7XYml2YFfqhoc+wNIc -3mZ3Q90qJL7EE3sY6t5D4ssWogQRfC4PfwBBK7DksWn6QUPdMiTOsxAliOC5 -PDwdQW9jaT4P72moW4pEj639PRFEcOf+fol+CA+9gaWFgaAMg/XFCPd43yED -QQT3eGHjYbdNIprhvQx1C5Do8fpLL3f4ZMnjXZxH3K1K0TLDMw11c5Go3mwK -cpatj8FPJ+h9+IAZOnSocR5Ku6FImXqjq1Cyaz3fg123+/fJeZdRV2/3+CFL -6t23oGfTkc7sVv59/NHH8NMK8udxfJRixYrJt7WHDBliFEub2GZj6S0UW/B0 -OsqZTss/SNCgOS9fuownfl0oZQ5LmmZg6R3UFKxUWgcQdmeotEj+KU2UUmcZ -wjYdhS1DYcFKpLWwSxcvyROF31YJFBYgp6+hbipKfBclBiuh1r85BhvBIa10 -yDMuhNFGS1K13NrL8ptOa1VwqcfFxcnfsfFS1Q+1TMbSCteFGoy0Wq+LQJIL -v5rj0YyPoYxJWFrpGtEKmFlHKg2wgJmSkiL/GA390TPte/f/gkiB82g97qxY -vkK64tqDNg2Pw9L7fteme1Q2gsZgaRUPzzHU0ab51RYiJcqytMYBl2jaJD0S -Sx8GggbgoRFYWss7HoigYVhax8MHIYh2v6/n4U8iaAgK/IiH0151In7Cw4cY -6uj0P7UQQ93R+oyHP4Ug6g6f8/CnEUT9/F88nAJJY8UXga1KjdMH6zbwNocj -nCYwX/Jw6ik04/uKhz+DIJq3fs3DqbPSjH4TDx+FoB54qpt5OL1pQrnbFh7+ -HILuReJWHv48wjsjfDsPp5dqaI1lBw+nIehuJO4MbPrxWGqDpd28zYlok1bA -9/DwSWiTnpHt5eGTEZ6CpR94+FQEJWJpPw+fjiC5MixnRgd5+IsIvx1Lh3n4 -TATVRetHefhsBNXA0nEeLtNx+SMdFbF0iofLNDkSqm7G0tnAppdZaFEoRWLp -Am9TpmY3QtUVHiQ//0t+mMh2XJYtv74bUuQ/PkeLDQ==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-3.233775858153751, \ --0.0043827503402644324, 0.11832856225129938, \ -0.0003073572253865838}},ExpressionUUID->"899e43aa-c372-6647-a3e4-\ -4952f308ab17"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 99, 16, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943514649961863`*^9, 3.994353869936494*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"8069e7ba-fe1a-40f4-a622-1ffd80879bb0"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-\ -baecb9a57d9b"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8fB3Aladh73HvtTSTudZf32yyS7JBClNFAZLYQIhVSpGGkIWXd +Q1byJU2p7GgoTd+IjKav3/n9dR/PxznncT6Pz/v9fp3PVdkW5rJ9MR8fX8gi +Pr7//869fnhX/Vip+WBQ+yrx5rXmvRfl4iwGk4CbkG9d2KEBKP10m9xgDrzM +VU7b1WEK0U7XB/gHS0CfN1S7tsMGxCdkc34N1IDgn9RkwQ53eNPsGDYz0Abb +V9asM7q7HWzVx15NDXRDU2ZwxOfWffBrgHF6cuAdzFnG+A3yUqDd6mrp85Jp +OBwSnMLxPwOUNw0ft+nPQ4hJ/VLCuwikdvleF7TiR7EI59vHaZchZ7Vtk6P7 +Mvy8B/28X5bBi3yj1ikxYQwPWP1e7elNKOgpF43WEEaXm6e+a7y5Cd4iWr6/ +mcLoKXmJTvt2E14mU/9bHCCMPhtvbJwSqYCRPSs4UrXC+CXpobuKYwV8tn5/ +i+4lgueMu2wvP6qAn5N5lQnFoli9SG+/anMlHCs99HSxvDhyHzoJybdWgb1J +iIS0mjiyFYpsefeqYNldF3ctA3E0anL2X/ekCo6MagyvtxDHwYoe44ChKtiv +2vkxN0Qc4z6UqW2eqYI9RXL/aTaK42nnEUNXrWpwPl+tv36zBO7On5HySa8G +Mf1zYVu2S2BkfjHF6WQ1dDUdqQkLk0A3VsBb89PVYD+8ySw3WQK9ZEIuChVX +g6XCf1avyiVw5vtUZ3B9NZjk228O+yuBvloKZmofq0E2dzT91AVJ1OWLqyrg +1oCcXu2Rn1cksXBG71O6ZQ0otKUe2lIliT4m66Oi1tYAbVJnn1a7JCa69Z5k +O9eAhkO4X9NnSXwhdrUlO7AG1iyZp4+ukUKR5tAzWzJqYGOUzHvjR1L471D3 +7vDuGnBa+fl1Xo8UtpvdK37YXwMuJQ0v/r6UwqIOIWXacA14PPN5eu+bFHJj +cn7Xj9bAFv1Ljd7S0ih9/oNy3UwN7HxvmJ3kJ43Xf2ot6ZLmQZqbnXn3nDRO +PKmTjnTjgQLRpbB4kQw++LHMMNWTBxWSbj9Wr5TBrqz0hlM+POjv3lqVrSSD +z7IEVS8G8kDdOUrVeZ0MlkirWYRH8aBtQ+HSZ2dl0N+95Z/lp3gwbzvb9YQj +iz1LhC5JdPIg60p8+bytLIpaLKyMeko+v5TvqIGzLIYvyht72s0Dh44VFse3 +y+Lm8PHlMS94UGClzHM4IYu52m5DSR95YIbr8x6/kUXDR3qS2Qs8iGQW+z5M +ksPBaNHJDAMC7ItEZtZnyuHS6EamiBEBqoL7j3adlkPL5pGmTGMCnvV6VPdc +k0PPkfM7ExgErAoX4n/dJYcuh3TSlCwI+Hwl5sp3BXl8P2qklexKwB3hD6x9 +6vJ4Ze9Ks0Z3As5EuTz9YSCPv/J0Mr5uIsDG0uDnX5RHO6fiGUsfAkpevbMT +DJLH1bJz03WBBPhIOY4r8uQx17jOoDmKgDUJTYkXm8n7O0oKr0YTsOKdtozK +PXmUpPtvORFLQEMlP2i+kEdjRZM7G/YTILO+IctoQR6zvxFGucnk+hPVTWzW +KyCD2ROF2QRc/Zz94L6bAqpa8+ZHcgg4uHHBx36rAmLwjdf7cwkwoA6lbIxQ +wD336Deu5BGQUX9ywCtPAQXDVY+3XSDA+tvv+D2jCpgUH6VFKSMgbl2u7j9f +FVCJn/Jp53UCKooNhiTnFLAtqoJ1q5wAOTc/ZsMyRZw6IlGMFQR8re/4wb9K +EbdEFibTeASoSPhe9WAo4tmvm//YEwR47PzpUYaKuK9IUySyloBWql6do6si +6tnnLqu7RcCppKyos7GKqEN9GyrYTMCDYR31r4mK2FYs3Sd2m4C/Ju095scU +scz8xVvpFgJ2fJo1fn9BERed/vJRopUAlsPmqVXtiui+M7FxsJ2Ad9Kae+4K +UzBR8uGO3EcEyIbdocrKUnDth+Jwz8cEODzwfBKiTEERVaqBXCcBdfHH9EXX +UFAgxagt4wm5P28mx7w8KXh9/cl4zjOy/mYZBTf8KWijQWe8Jj2TrWa/EErB +OAuRyoTnBGy19igrPUBBZhSvt6ybAOOypqBvJRS0su6Q6eklIGixu6zlDQr+ +Yo88dukj4PzmiXu5tRS8XShu00V6qYiKJusBeT3G6mh9PwHsoMa+zOcULFY8 +7qY1QEB4q2vKmyEKvkk79CWb9NDe1PdHxim4PHYhwnuQANFOpdyBOQp6FowE +1ZO21miw0uWj4spWcT2JF2T9Bv4teSpBxaw0eVoD6VGjFBdVChUl5Rydlg6R +9cygLd6nQcUdaSfcNpJO5Dj7K5hR0X/s70Av6XVbL35nWFIx4qjaBplhAkQO +/5vs7kDFr5IHXrqQ7is2k470oKKnbV5aBunz7SlXsvyoqHlmkdNt0gEfuhkV +oVTcbLqB8S9pXUHlh4+jqPhdVBikXhIwpb3b+8tBKqY96gs2I11v3/jv0nQq +Xmjl1m0ifWiX4AH1U1Tcx/9Key9p2xNuIpYXqMj13NCWRlq4qrjQ9yoVm+i6 +R/JJ9z6fMDpQTcWu+2LhpaTPTbPbCpqoODxamFZOept0umt9BxUDxGM7b5LW +YfS/73tKxS3JbPz/9UlPtejpF1R8LXvi/SXSt+LDBcXfU/Gwh3RTHumD52/n +r5qg4uCe2I5U0jYtK3QdflJxmu4nEEFaaGRTU8hiGn7QidnvQbpn0WWHNCEa +Gu4I0WeQLlD7/qpUhoZWN97LSJL2s4GwNmUajvnkc8fI/dEKyuQb0aXhUIxp +STPpiaMvsudNaChbsMf2//tLXNdUUwQaJvz9oedKOqEzkjCzoyFlb5qbLGnL +iVYbD1ca3t3R+08/Wb/lYiIDkVtoGPEqb1826WerNwdnB9Gwa09mxFrSW/fN +ZnQm0PCn5p91l8n+0MizpIyl0NB5y3etDS/+P98nbwpm0dDrkZTHJNlf8X91 +nlmWkus59vGKNmkLWoy/XwUND29RenKb7M9lePf7gXoa1vqdsXMkfTp5q3RD +Jw2F+7c5+JP97XO5/Ep/Pw2XL3HsHyX7X/X+T8bMCA23D5Tc9iddteKUt+Es +DZmHO8o3kvPTmX2/8DJVCU/NfDSbIeftFE9qdbuWErr2CL11Ju3d5982sloJ +BWjs2evkfH6W+/te0VYJr9tQQjY+JYC/yEg3Z48ScoaNeP7kvD/650BTZawS +eg49/VZA5kHW6COHJ0lKGM+OvPqUzAua1vawZXlKmCznd1LvIZkvFWeJg3eU +sOiPY8zNDnK+BrrmJx4oYUdV39nuuwQ48i1Z69uthEp1tkPTZP4EuOx5AR+U +sFKA0aTbRvZrgsqhwwLKuIRSqxNK5le40twlCz1lTMw8o7S6joBZXtaDX4bK +6H5NfUSOzMf4dXrj1SbKCGWOg3/JPE2J8KOrmitj6vyS6IZqsn/aHz1Y7KyM +5rEypwVuEnA3qHC8PVoZs9/W942VEGD3lymxP0EZFUZu9J8pJqArq5duclgZ +DbmjOlBEwIuG5YdL05XRJmTkyREy/ydWRkmknFfGpZ+62O/J74Nc1TqGbZsy +7gp+Zzh7jIBdP6cOPxBWQekj96/ujCD3I2KHzEcJFYz8yvtzMIys99hQOb+c +Ck4OfzM/sZuAy8Pt/eaqKljgeuh8UQgBr1tO69fSVbBC0G0m15+AjSnMwWJf +FTyf+ZDS4kTmpUSiYUK1CmZd/16tqk8A37HZu/l1KhjW2hdRr0Ounz/Uu65J +hVwPZZe9FgE7Z11SpjpUUNQ4Qj5AlYDSQfXhoCEVXC1aURAkR34vCx+kuvGr +otq2Evc7/AT80hN7beCuinDn2d3GAR7MXVBIXOOtikJM079fenkwI6qhzvRV +xRwD/5fS5PljYpoZah2iipzn8UUB5HnlXVPAnPcBVbzV8E/cQCsPHq2/JXL0 +sioSx6uSVMvI88nOrfBuVhXfqsblecTwgFN+o+jMGTU8NX5wx+0VPBhWLi+0 +OaeGL8XNwoIEeRB/puziTKEabsrplRZdwoNbiVfOu5SpIWPDJetN8zVg7FmU +L9KshtUlon6Pv9WAjkBuVupbNaTkMe2te2tAxjfhcLS+Oio4nnmWeq4GpiTs +/Tza1PFjpeb722o18D7Tz2OvoCaaRf4ldAWrwe5bjN0HuhbamdXH2nRWwteA +ZZHEIW0UZyn91mHeJP9PyC5Oa9PB8bTa/fwl10HiieaJqm+6mJHfrVBFvwaU +o5VOdLo+7rB1Mve5dBny9ZhikkEGuG/pTWFl50vwSMHCdDp7FVofq/eV1CwG +FqUty7DfEC0WmU2teXcBRPhLovyTjNDAOXN4WrwAaIlKHC/N1Zj480PKjP0Z +WK7hU+dyfzX6V54Bx5kcWMWVr4zZYoy02mb3g3pZsPe1RLs93xqs6wsKmlnI +gG/Tme52+WvQJN05VK40FdYa3iuwMzDBnpKLzM9jSdAyzf7zo8sEeV6U2rbR +g7BH33jo+XZTPNKSKHHVLw72/VD47RtsipZ8tOPX7eNgfxu/wkSoKd5+Wn7n +tkkcHPPs81oRbooJ4bkGksvj4NqR2BeW8aa4jj/KNa4mFt69bBnknTBFYy3v +Bb1lseBxfP3A6VumaPXOsGKmJRq4E4G9Xsvp+ODFZoNAzyiQaVpb0rySjktP +Op1zXBsFE2m64UoidLz1IF7chh4FF1UmV36QoONvv4fz7lJR8J9bglU4hY5H +KXM6gs8j4U5Tdk2qIR39DD+FFztEgkV6SxbPnY4hfUOTGQ57wUZdboNwCR1F +x50U3uwOB2K8QyWwlI41LluMRn3DQf1W5FzjFToa92HglHM4LLF/WhhcTseV +9btF9enh0BaW+r2dIN9/Ma96zX9hYN40kxd/n47m2tVdpRphQHd5/u7TVzpW +lgjsVU3eDdqHM2LbGAzUvX9t2eroUGhmXxZwYDHwOZrn/vEJBacfd3L6OAwM +5Re7N2QVCrF7Zm98tmCg0++KT/3iofDAx++tiAMD751rq7lbEQLBTLr9Zj8G +Ob8Wc6Ffg6Hs+1vFmaMMXL+gkpMWHQS625l3NIYYKJ6RH81uD4STqo6/k18y +sMBQTlGrKhBm3mwzffeagV6OXfMqFwKhxTuz/OIoA7MfD3vYxASCi9ObPNlx +BvYLWqy10A+EOHZK+HI+M+xXeVUucDYAHog/VxnXMEPXxpaSAwe2wfaW4CNE +hBlmJF8cVwr3g4ndYzE2UWbo8+sfCWtfP4il7trZH22GU5F8gTGOfpCxP8zl +Z4IZSu9U3rrSwA+qWNHKnFQzvFBz63tXny/8rUtubi8ww2KjTZZPurdCTuXF +me52M+z8dWtRyDsfuFPUGzglzUQXje7iA65eMOKg4hstx0SG3kbCkOkFfL92 +e/1RYKJ1h+KPXzQvsHQWdBRQZmLDyO72/jFPuLeIxZDXZeIuR15EZbIndG4r +XG5hzkSRFf2KTxo2wZB6aEXWDiZemF4WzmZ4wMy1hR+Gt5jokW7LlYx0hY8e +tkXpDUzsgzc3rvu6wuCS4+tGm5jorMALdHVwhSY/hbNnWpn4NuZ17KCGKyTJ +mbLmHzJR27fwfuULFxA7Grr/0Usm8qfXN6RZu4B+UB/f9sUsLFV/bntE0xlo +0pSyliUs3NrWs0hf2hnE2rc5ywmysD4nM2KU3xmmaZPFj1ey8INfrnniWydo +7F9hZSzNQsv6Wk7MBSdYZ4spC1osfOUf4Ggp5wQBGuXLCzawsKak8v4SY0eI +79gaqunEQqNvh2ZjxRwha7vE4xoXFq4+/uGCyLcN0Hw5LvPxJhYeO1j274Ub +G0BKc53ovD8LlRM6N9vpbIB7mh+k/KJZ+FI9ubtR2wF0tZWUNQtZ6E1tlrYF +e8AH3YdrilmYfOnUNp6KPXgEp741L2XhWPLVW+ZL7CH52njJpjIW8t2VFK98 +aAcvtZs10nkstOj6WDLtbgcndLz0vt5nYVIC9/hs5DqY0j1Fr5lkYe2wQJJu +hy0MdqKN5DQLj2xgxI3csIXWPROuUbMszK45+upmri2cqLGLoP9m4QTvx8UT +gbagy+K70cjPRlf/12+3C9jCNrvdKu0ybLRanB7nvd4GeoPWCvVy2Didqq81 +8MkKmpbPKpgCGz39hcrcu62gpLxE54wFG7si9Dhfmq0g/Nu8ractG21PL3Lc +mGMFwjFE4suNbGQ5t+lIm1uBbarKj/fb2Ejj8ZnFnrWE+tI/b2ePslEmweGz +iq8F0K2iftgfY2Np33m+ww4WUPv2q1DRcTaOz3paTzItoIb2mmGfw8Y3lv2i +gtIWcCO/9fjFc2w8OXlKQKgToSgzhbm2go0rfbQEdnAR0qNEs/N72OjM6C58 +52UOyySPXhnvY2NGtMfchJk5pFbzNVsOsvEo1HxWlDOHIxNTH7++ZOONreKG +A/1cOBjcy7H4yMbkhW6dZ+5c2Otz9vOXn2yMiTruzvPigLe1GrJpHHTaZ1lw +MJYF873LRNqVOTj5JufclCcLirZPDNurcfCrw5lfqUwWfExtiPHW5mDfhMxa +uT9M2PtwY2WcMQdlMxOOPz/EhAzH/bR6Ww52T5TbJ500g0bPvr8mYRyM+XDp +1/w9Omz50vioOYKDf39Z2hwspwNffFG+dRQH23qjflOy6GB7bqeJWxwHzxYO +6dR60aH71aJdkckc7B9U8tkwYQpj21YNV+dx8MqFN978VFNQ3J3WsKqVgxTO +N8rtk2vgxMIO02NtHDwWoLB0Z9waWJxjW/3pLgetMj1cjALWwFidQFnRQw56 +aoQ18zHWQCPfkXyJHg6qLhrfV/fGGLxzD8fMfeBgyzatm9tMjSG/Kc60ZSUX +pyj9qnpTRiDk6FWtIMJF0+nvtudfGcHhETODGDEuShUsMVZ9ZATBAj/VjaS5 +qHhlWHjXJSNgbIyWKqFx8dxfonbWwwj63+2dTlnNRfmxbxmFyYYgvWJX9YZN +XFz+I4Zh4mAApVYH4ie9uCiBy6sENA3A+MAJq1M+XHweJSskwGcAjpNVfYP+ +XPxFN7yWSehDav/sr4BdXHQbERRuVNKHnyWHLOMTuXjfMU4g4D9dGGKf6rlS +zsX15589LhnWhuB9peftKrj4YcH6S0+jNsxV1G7/WsXFS8Z6QgYF2iChOvhj +dR0XC77+qPbw0ob1y6iU261cTP8cRSS90ILm3iuBPX1c3OP4uVf2rSbYi9Qb +RA9ykfl75RzRpgmDax/OyQ1zMUFBd09MqSbMNP57dOsIF4ueOd/eGawJBsVG +N7+McZFG+eMu/F0DmocsojPHuai8kHTjWa8G2Eu5guEkF3e7CkvU39KAHWn7 +nkfNctHqDy3k+wENmGlNLZD9ycUmTvIKG38NSPqdF9D4m4vbT15SaLLWADGT +Mv0t81x88vNphJu2Blzc3Ti7sMDFLxsOfRYT0oD/AT4JGRo= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8fB3Aladh73HvtTSTudZf32yyS7JBClNFAZLYQIhVSpGGkIWXd +Q1byJU2p7GgoTd+IjKav3/n9dR/PxznncT6Pz/v9fp3PVdkW5rJ9MR8fX8gi +Pr7//869fnhX/Vip+WBQ+yrx5rXmvRfl4iwGk4CbkG9d2KEBKP10m9xgDrzM +VU7b1WEK0U7XB/gHS0CfN1S7tsMGxCdkc34N1IDgn9RkwQ53eNPsGDYz0Abb +V9asM7q7HWzVx15NDXRDU2ZwxOfWffBrgHF6cuAdzFnG+A3yUqDd6mrp85Jp +OBwSnMLxPwOUNw0ft+nPQ4hJ/VLCuwikdvleF7TiR7EI59vHaZchZ7Vtk6P7 +Mvy8B/28X5bBi3yj1ikxYQwPWP1e7elNKOgpF43WEEaXm6e+a7y5Cd4iWr6/ +mcLoKXmJTvt2E14mU/9bHCCMPhtvbJwSqYCRPSs4UrXC+CXpobuKYwV8tn5/ +i+4lgueMu2wvP6qAn5N5lQnFoli9SG+/anMlHCs99HSxvDhyHzoJybdWgb1J +iIS0mjiyFYpsefeqYNldF3ctA3E0anL2X/ekCo6MagyvtxDHwYoe44ChKtiv +2vkxN0Qc4z6UqW2eqYI9RXL/aTaK42nnEUNXrWpwPl+tv36zBO7On5HySa8G +Mf1zYVu2S2BkfjHF6WQ1dDUdqQkLk0A3VsBb89PVYD+8ySw3WQK9ZEIuChVX +g6XCf1avyiVw5vtUZ3B9NZjk228O+yuBvloKZmofq0E2dzT91AVJ1OWLqyrg +1oCcXu2Rn1cksXBG71O6ZQ0otKUe2lIliT4m66Oi1tYAbVJnn1a7JCa69Z5k +O9eAhkO4X9NnSXwhdrUlO7AG1iyZp4+ukUKR5tAzWzJqYGOUzHvjR1L471D3 +7vDuGnBa+fl1Xo8UtpvdK37YXwMuJQ0v/r6UwqIOIWXacA14PPN5eu+bFHJj +cn7Xj9bAFv1Ljd7S0ih9/oNy3UwN7HxvmJ3kJ43Xf2ot6ZLmQZqbnXn3nDRO +PKmTjnTjgQLRpbB4kQw++LHMMNWTBxWSbj9Wr5TBrqz0hlM+POjv3lqVrSSD +z7IEVS8G8kDdOUrVeZ0MlkirWYRH8aBtQ+HSZ2dl0N+95Z/lp3gwbzvb9YQj +iz1LhC5JdPIg60p8+bytLIpaLKyMeko+v5TvqIGzLIYvyht72s0Dh44VFse3 +y+Lm8PHlMS94UGClzHM4IYu52m5DSR95YIbr8x6/kUXDR3qS2Qs8iGQW+z5M +ksPBaNHJDAMC7ItEZtZnyuHS6EamiBEBqoL7j3adlkPL5pGmTGMCnvV6VPdc +k0PPkfM7ExgErAoX4n/dJYcuh3TSlCwI+Hwl5sp3BXl8P2qklexKwB3hD6x9 +6vJ4Ze9Ks0Z3As5EuTz9YSCPv/J0Mr5uIsDG0uDnX5RHO6fiGUsfAkpevbMT +DJLH1bJz03WBBPhIOY4r8uQx17jOoDmKgDUJTYkXm8n7O0oKr0YTsOKdtozK +PXmUpPtvORFLQEMlP2i+kEdjRZM7G/YTILO+IctoQR6zvxFGucnk+hPVTWzW +KyCD2ROF2QRc/Zz94L6bAqpa8+ZHcgg4uHHBx36rAmLwjdf7cwkwoA6lbIxQ +wD336Deu5BGQUX9ywCtPAQXDVY+3XSDA+tvv+D2jCpgUH6VFKSMgbl2u7j9f +FVCJn/Jp53UCKooNhiTnFLAtqoJ1q5wAOTc/ZsMyRZw6IlGMFQR8re/4wb9K +EbdEFibTeASoSPhe9WAo4tmvm//YEwR47PzpUYaKuK9IUySyloBWql6do6si +6tnnLqu7RcCppKyos7GKqEN9GyrYTMCDYR31r4mK2FYs3Sd2m4C/Ju095scU +scz8xVvpFgJ2fJo1fn9BERed/vJRopUAlsPmqVXtiui+M7FxsJ2Ad9Kae+4K +UzBR8uGO3EcEyIbdocrKUnDth+Jwz8cEODzwfBKiTEERVaqBXCcBdfHH9EXX +UFAgxagt4wm5P28mx7w8KXh9/cl4zjOy/mYZBTf8KWijQWe8Jj2TrWa/EErB +OAuRyoTnBGy19igrPUBBZhSvt6ybAOOypqBvJRS0su6Q6eklIGixu6zlDQr+ +Yo88dukj4PzmiXu5tRS8XShu00V6qYiKJusBeT3G6mh9PwHsoMa+zOcULFY8 +7qY1QEB4q2vKmyEKvkk79CWb9NDe1PdHxim4PHYhwnuQANFOpdyBOQp6FowE +1ZO21miw0uWj4spWcT2JF2T9Bv4teSpBxaw0eVoD6VGjFBdVChUl5Rydlg6R +9cygLd6nQcUdaSfcNpJO5Dj7K5hR0X/s70Av6XVbL35nWFIx4qjaBplhAkQO +/5vs7kDFr5IHXrqQ7is2k470oKKnbV5aBunz7SlXsvyoqHlmkdNt0gEfuhkV +oVTcbLqB8S9pXUHlh4+jqPhdVBikXhIwpb3b+8tBKqY96gs2I11v3/jv0nQq +Xmjl1m0ifWiX4AH1U1Tcx/9Key9p2xNuIpYXqMj13NCWRlq4qrjQ9yoVm+i6 +R/JJ9z6fMDpQTcWu+2LhpaTPTbPbCpqoODxamFZOept0umt9BxUDxGM7b5LW +YfS/73tKxS3JbPz/9UlPtejpF1R8LXvi/SXSt+LDBcXfU/Gwh3RTHumD52/n +r5qg4uCe2I5U0jYtK3QdflJxmu4nEEFaaGRTU8hiGn7QidnvQbpn0WWHNCEa +Gu4I0WeQLlD7/qpUhoZWN97LSJL2s4GwNmUajvnkc8fI/dEKyuQb0aXhUIxp +STPpiaMvsudNaChbsMf2//tLXNdUUwQaJvz9oedKOqEzkjCzoyFlb5qbLGnL +iVYbD1ca3t3R+08/Wb/lYiIDkVtoGPEqb1826WerNwdnB9Gwa09mxFrSW/fN +ZnQm0PCn5p91l8n+0MizpIyl0NB5y3etDS/+P98nbwpm0dDrkZTHJNlf8X91 +nlmWkus59vGKNmkLWoy/XwUND29RenKb7M9lePf7gXoa1vqdsXMkfTp5q3RD +Jw2F+7c5+JP97XO5/Ep/Pw2XL3HsHyX7X/X+T8bMCA23D5Tc9iddteKUt+Es +DZmHO8o3kvPTmX2/8DJVCU/NfDSbIeftFE9qdbuWErr2CL11Ju3d5982sloJ +BWjs2evkfH6W+/te0VYJr9tQQjY+JYC/yEg3Z48ScoaNeP7kvD/650BTZawS +eg49/VZA5kHW6COHJ0lKGM+OvPqUzAua1vawZXlKmCznd1LvIZkvFWeJg3eU +sOiPY8zNDnK+BrrmJx4oYUdV39nuuwQ48i1Z69uthEp1tkPTZP4EuOx5AR+U +sFKA0aTbRvZrgsqhwwLKuIRSqxNK5le40twlCz1lTMw8o7S6joBZXtaDX4bK +6H5NfUSOzMf4dXrj1SbKCGWOg3/JPE2J8KOrmitj6vyS6IZqsn/aHz1Y7KyM +5rEypwVuEnA3qHC8PVoZs9/W942VEGD3lymxP0EZFUZu9J8pJqArq5duclgZ +DbmjOlBEwIuG5YdL05XRJmTkyREy/ydWRkmknFfGpZ+62O/J74Nc1TqGbZsy +7gp+Zzh7jIBdP6cOPxBWQekj96/ujCD3I2KHzEcJFYz8yvtzMIys99hQOb+c +Ck4OfzM/sZuAy8Pt/eaqKljgeuh8UQgBr1tO69fSVbBC0G0m15+AjSnMwWJf +FTyf+ZDS4kTmpUSiYUK1CmZd/16tqk8A37HZu/l1KhjW2hdRr0Ounz/Uu65J +hVwPZZe9FgE7Z11SpjpUUNQ4Qj5AlYDSQfXhoCEVXC1aURAkR34vCx+kuvGr +otq2Evc7/AT80hN7beCuinDn2d3GAR7MXVBIXOOtikJM079fenkwI6qhzvRV +xRwD/5fS5PljYpoZah2iipzn8UUB5HnlXVPAnPcBVbzV8E/cQCsPHq2/JXL0 +sioSx6uSVMvI88nOrfBuVhXfqsblecTwgFN+o+jMGTU8NX5wx+0VPBhWLi+0 +OaeGL8XNwoIEeRB/puziTKEabsrplRZdwoNbiVfOu5SpIWPDJetN8zVg7FmU +L9KshtUlon6Pv9WAjkBuVupbNaTkMe2te2tAxjfhcLS+Oio4nnmWeq4GpiTs +/Tza1PFjpeb722o18D7Tz2OvoCaaRf4ldAWrwe5bjN0HuhbamdXH2nRWwteA +ZZHEIW0UZyn91mHeJP9PyC5Oa9PB8bTa/fwl10HiieaJqm+6mJHfrVBFvwaU +o5VOdLo+7rB1Mve5dBny9ZhikkEGuG/pTWFl50vwSMHCdDp7FVofq/eV1CwG +FqUty7DfEC0WmU2teXcBRPhLovyTjNDAOXN4WrwAaIlKHC/N1Zj480PKjP0Z +WK7hU+dyfzX6V54Bx5kcWMWVr4zZYoy02mb3g3pZsPe1RLs93xqs6wsKmlnI +gG/Tme52+WvQJN05VK40FdYa3iuwMzDBnpKLzM9jSdAyzf7zo8sEeV6U2rbR +g7BH33jo+XZTPNKSKHHVLw72/VD47RtsipZ8tOPX7eNgfxu/wkSoKd5+Wn7n +tkkcHPPs81oRbooJ4bkGksvj4NqR2BeW8aa4jj/KNa4mFt69bBnknTBFYy3v +Bb1lseBxfP3A6VumaPXOsGKmJRq4E4G9Xsvp+ODFZoNAzyiQaVpb0rySjktP +Op1zXBsFE2m64UoidLz1IF7chh4FF1UmV36QoONvv4fz7lJR8J9bglU4hY5H +KXM6gs8j4U5Tdk2qIR39DD+FFztEgkV6SxbPnY4hfUOTGQ57wUZdboNwCR1F +x50U3uwOB2K8QyWwlI41LluMRn3DQf1W5FzjFToa92HglHM4LLF/WhhcTseV +9btF9enh0BaW+r2dIN9/Ma96zX9hYN40kxd/n47m2tVdpRphQHd5/u7TVzpW +lgjsVU3eDdqHM2LbGAzUvX9t2eroUGhmXxZwYDHwOZrn/vEJBacfd3L6OAwM +5Re7N2QVCrF7Zm98tmCg0++KT/3iofDAx++tiAMD751rq7lbEQLBTLr9Zj8G +Ob8Wc6Ffg6Hs+1vFmaMMXL+gkpMWHQS625l3NIYYKJ6RH81uD4STqo6/k18y +sMBQTlGrKhBm3mwzffeagV6OXfMqFwKhxTuz/OIoA7MfD3vYxASCi9ObPNlx +BvYLWqy10A+EOHZK+HI+M+xXeVUucDYAHog/VxnXMEPXxpaSAwe2wfaW4CNE +hBlmJF8cVwr3g4ndYzE2UWbo8+sfCWtfP4il7trZH22GU5F8gTGOfpCxP8zl +Z4IZSu9U3rrSwA+qWNHKnFQzvFBz63tXny/8rUtubi8ww2KjTZZPurdCTuXF +me52M+z8dWtRyDsfuFPUGzglzUQXje7iA65eMOKg4hstx0SG3kbCkOkFfL92 +e/1RYKJ1h+KPXzQvsHQWdBRQZmLDyO72/jFPuLeIxZDXZeIuR15EZbIndG4r +XG5hzkSRFf2KTxo2wZB6aEXWDiZemF4WzmZ4wMy1hR+Gt5jokW7LlYx0hY8e +tkXpDUzsgzc3rvu6wuCS4+tGm5jorMALdHVwhSY/hbNnWpn4NuZ17KCGKyTJ +mbLmHzJR27fwfuULFxA7Grr/0Usm8qfXN6RZu4B+UB/f9sUsLFV/bntE0xlo +0pSyliUs3NrWs0hf2hnE2rc5ywmysD4nM2KU3xmmaZPFj1ey8INfrnniWydo +7F9hZSzNQsv6Wk7MBSdYZ4spC1osfOUf4Ggp5wQBGuXLCzawsKak8v4SY0eI +79gaqunEQqNvh2ZjxRwha7vE4xoXFq4+/uGCyLcN0Hw5LvPxJhYeO1j274Ub +G0BKc53ovD8LlRM6N9vpbIB7mh+k/KJZ+FI9ubtR2wF0tZWUNQtZ6E1tlrYF +e8AH3YdrilmYfOnUNp6KPXgEp741L2XhWPLVW+ZL7CH52njJpjIW8t2VFK98 +aAcvtZs10nkstOj6WDLtbgcndLz0vt5nYVIC9/hs5DqY0j1Fr5lkYe2wQJJu +hy0MdqKN5DQLj2xgxI3csIXWPROuUbMszK45+upmri2cqLGLoP9m4QTvx8UT +gbagy+K70cjPRlf/12+3C9jCNrvdKu0ybLRanB7nvd4GeoPWCvVy2Didqq81 +8MkKmpbPKpgCGz39hcrcu62gpLxE54wFG7si9Dhfmq0g/Nu8ractG21PL3Lc +mGMFwjFE4suNbGQ5t+lIm1uBbarKj/fb2Ejj8ZnFnrWE+tI/b2ePslEmweGz +iq8F0K2iftgfY2Np33m+ww4WUPv2q1DRcTaOz3paTzItoIb2mmGfw8Y3lv2i +gtIWcCO/9fjFc2w8OXlKQKgToSgzhbm2go0rfbQEdnAR0qNEs/N72OjM6C58 +52UOyySPXhnvY2NGtMfchJk5pFbzNVsOsvEo1HxWlDOHIxNTH7++ZOONreKG +A/1cOBjcy7H4yMbkhW6dZ+5c2Otz9vOXn2yMiTruzvPigLe1GrJpHHTaZ1lw +MJYF873LRNqVOTj5JufclCcLirZPDNurcfCrw5lfqUwWfExtiPHW5mDfhMxa +uT9M2PtwY2WcMQdlMxOOPz/EhAzH/bR6Ww52T5TbJ500g0bPvr8mYRyM+XDp +1/w9Omz50vioOYKDf39Z2hwspwNffFG+dRQH23qjflOy6GB7bqeJWxwHzxYO +6dR60aH71aJdkckc7B9U8tkwYQpj21YNV+dx8MqFN978VFNQ3J3WsKqVgxTO +N8rtk2vgxMIO02NtHDwWoLB0Z9waWJxjW/3pLgetMj1cjALWwFidQFnRQw56 +aoQ18zHWQCPfkXyJHg6qLhrfV/fGGLxzD8fMfeBgyzatm9tMjSG/Kc60ZSUX +pyj9qnpTRiDk6FWtIMJF0+nvtudfGcHhETODGDEuShUsMVZ9ZATBAj/VjaS5 +qHhlWHjXJSNgbIyWKqFx8dxfonbWwwj63+2dTlnNRfmxbxmFyYYgvWJX9YZN +XFz+I4Zh4mAApVYH4ie9uCiBy6sENA3A+MAJq1M+XHweJSskwGcAjpNVfYP+ +XPxFN7yWSehDav/sr4BdXHQbERRuVNKHnyWHLOMTuXjfMU4g4D9dGGKf6rlS +zsX15589LhnWhuB9peftKrj4YcH6S0+jNsxV1G7/WsXFS8Z6QgYF2iChOvhj +dR0XC77+qPbw0ob1y6iU261cTP8cRSS90ILm3iuBPX1c3OP4uVf2rSbYi9Qb +RA9ykfl75RzRpgmDax/OyQ1zMUFBd09MqSbMNP57dOsIF4ueOd/eGawJBsVG +N7+McZFG+eMu/F0DmocsojPHuai8kHTjWa8G2Eu5guEkF3e7CkvU39KAHWn7 +nkfNctHqDy3k+wENmGlNLZD9ycUmTvIKG38NSPqdF9D4m4vbT15SaLLWADGT +Mv0t81x88vNphJu2Blzc3Ti7sMDFLxsOfRYT0oD/AT4JGRo= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08149229280394858}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08149229280394858}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8fB3Aladh73HvtTSTudZf32yyS7JBClNFAZLYQIhVSpGGkIWXd +Q1byJU2p7GgoTd+IjKav3/n9dR/PxznncT6Pz/v9fp3PVdkW5rJ9MR8fX8gi +Pr7//869fnhX/Vip+WBQ+yrx5rXmvRfl4iwGk4CbkG9d2KEBKP10m9xgDrzM +VU7b1WEK0U7XB/gHS0CfN1S7tsMGxCdkc34N1IDgn9RkwQ53eNPsGDYz0Abb +V9asM7q7HWzVx15NDXRDU2ZwxOfWffBrgHF6cuAdzFnG+A3yUqDd6mrp85Jp +OBwSnMLxPwOUNw0ft+nPQ4hJ/VLCuwikdvleF7TiR7EI59vHaZchZ7Vtk6P7 +Mvy8B/28X5bBi3yj1ikxYQwPWP1e7elNKOgpF43WEEaXm6e+a7y5Cd4iWr6/ +mcLoKXmJTvt2E14mU/9bHCCMPhtvbJwSqYCRPSs4UrXC+CXpobuKYwV8tn5/ +i+4lgueMu2wvP6qAn5N5lQnFoli9SG+/anMlHCs99HSxvDhyHzoJybdWgb1J +iIS0mjiyFYpsefeqYNldF3ctA3E0anL2X/ekCo6MagyvtxDHwYoe44ChKtiv +2vkxN0Qc4z6UqW2eqYI9RXL/aTaK42nnEUNXrWpwPl+tv36zBO7On5HySa8G +Mf1zYVu2S2BkfjHF6WQ1dDUdqQkLk0A3VsBb89PVYD+8ySw3WQK9ZEIuChVX +g6XCf1avyiVw5vtUZ3B9NZjk228O+yuBvloKZmofq0E2dzT91AVJ1OWLqyrg +1oCcXu2Rn1cksXBG71O6ZQ0otKUe2lIliT4m66Oi1tYAbVJnn1a7JCa69Z5k +O9eAhkO4X9NnSXwhdrUlO7AG1iyZp4+ukUKR5tAzWzJqYGOUzHvjR1L471D3 +7vDuGnBa+fl1Xo8UtpvdK37YXwMuJQ0v/r6UwqIOIWXacA14PPN5eu+bFHJj +cn7Xj9bAFv1Ljd7S0ih9/oNy3UwN7HxvmJ3kJ43Xf2ot6ZLmQZqbnXn3nDRO +PKmTjnTjgQLRpbB4kQw++LHMMNWTBxWSbj9Wr5TBrqz0hlM+POjv3lqVrSSD +z7IEVS8G8kDdOUrVeZ0MlkirWYRH8aBtQ+HSZ2dl0N+95Z/lp3gwbzvb9YQj +iz1LhC5JdPIg60p8+bytLIpaLKyMeko+v5TvqIGzLIYvyht72s0Dh44VFse3 +y+Lm8PHlMS94UGClzHM4IYu52m5DSR95YIbr8x6/kUXDR3qS2Qs8iGQW+z5M +ksPBaNHJDAMC7ItEZtZnyuHS6EamiBEBqoL7j3adlkPL5pGmTGMCnvV6VPdc +k0PPkfM7ExgErAoX4n/dJYcuh3TSlCwI+Hwl5sp3BXl8P2qklexKwB3hD6x9 +6vJ4Ze9Ks0Z3As5EuTz9YSCPv/J0Mr5uIsDG0uDnX5RHO6fiGUsfAkpevbMT +DJLH1bJz03WBBPhIOY4r8uQx17jOoDmKgDUJTYkXm8n7O0oKr0YTsOKdtozK +PXmUpPtvORFLQEMlP2i+kEdjRZM7G/YTILO+IctoQR6zvxFGucnk+hPVTWzW +KyCD2ROF2QRc/Zz94L6bAqpa8+ZHcgg4uHHBx36rAmLwjdf7cwkwoA6lbIxQ +wD336Deu5BGQUX9ywCtPAQXDVY+3XSDA+tvv+D2jCpgUH6VFKSMgbl2u7j9f +FVCJn/Jp53UCKooNhiTnFLAtqoJ1q5wAOTc/ZsMyRZw6IlGMFQR8re/4wb9K +EbdEFibTeASoSPhe9WAo4tmvm//YEwR47PzpUYaKuK9IUySyloBWql6do6si +6tnnLqu7RcCppKyos7GKqEN9GyrYTMCDYR31r4mK2FYs3Sd2m4C/Ju095scU +scz8xVvpFgJ2fJo1fn9BERed/vJRopUAlsPmqVXtiui+M7FxsJ2Ad9Kae+4K +UzBR8uGO3EcEyIbdocrKUnDth+Jwz8cEODzwfBKiTEERVaqBXCcBdfHH9EXX +UFAgxagt4wm5P28mx7w8KXh9/cl4zjOy/mYZBTf8KWijQWe8Jj2TrWa/EErB +OAuRyoTnBGy19igrPUBBZhSvt6ybAOOypqBvJRS0su6Q6eklIGixu6zlDQr+ +Yo88dukj4PzmiXu5tRS8XShu00V6qYiKJusBeT3G6mh9PwHsoMa+zOcULFY8 +7qY1QEB4q2vKmyEKvkk79CWb9NDe1PdHxim4PHYhwnuQANFOpdyBOQp6FowE +1ZO21miw0uWj4spWcT2JF2T9Bv4teSpBxaw0eVoD6VGjFBdVChUl5Rydlg6R +9cygLd6nQcUdaSfcNpJO5Dj7K5hR0X/s70Av6XVbL35nWFIx4qjaBplhAkQO +/5vs7kDFr5IHXrqQ7is2k470oKKnbV5aBunz7SlXsvyoqHlmkdNt0gEfuhkV +oVTcbLqB8S9pXUHlh4+jqPhdVBikXhIwpb3b+8tBKqY96gs2I11v3/jv0nQq +Xmjl1m0ifWiX4AH1U1Tcx/9Key9p2xNuIpYXqMj13NCWRlq4qrjQ9yoVm+i6 +R/JJ9z6fMDpQTcWu+2LhpaTPTbPbCpqoODxamFZOept0umt9BxUDxGM7b5LW +YfS/73tKxS3JbPz/9UlPtejpF1R8LXvi/SXSt+LDBcXfU/Gwh3RTHumD52/n +r5qg4uCe2I5U0jYtK3QdflJxmu4nEEFaaGRTU8hiGn7QidnvQbpn0WWHNCEa +Gu4I0WeQLlD7/qpUhoZWN97LSJL2s4GwNmUajvnkc8fI/dEKyuQb0aXhUIxp +STPpiaMvsudNaChbsMf2//tLXNdUUwQaJvz9oedKOqEzkjCzoyFlb5qbLGnL +iVYbD1ca3t3R+08/Wb/lYiIDkVtoGPEqb1826WerNwdnB9Gwa09mxFrSW/fN +ZnQm0PCn5p91l8n+0MizpIyl0NB5y3etDS/+P98nbwpm0dDrkZTHJNlf8X91 +nlmWkus59vGKNmkLWoy/XwUND29RenKb7M9lePf7gXoa1vqdsXMkfTp5q3RD +Jw2F+7c5+JP97XO5/Ep/Pw2XL3HsHyX7X/X+T8bMCA23D5Tc9iddteKUt+Es +DZmHO8o3kvPTmX2/8DJVCU/NfDSbIeftFE9qdbuWErr2CL11Ju3d5982sloJ +BWjs2evkfH6W+/te0VYJr9tQQjY+JYC/yEg3Z48ScoaNeP7kvD/650BTZawS +eg49/VZA5kHW6COHJ0lKGM+OvPqUzAua1vawZXlKmCznd1LvIZkvFWeJg3eU +sOiPY8zNDnK+BrrmJx4oYUdV39nuuwQ48i1Z69uthEp1tkPTZP4EuOx5AR+U +sFKA0aTbRvZrgsqhwwLKuIRSqxNK5le40twlCz1lTMw8o7S6joBZXtaDX4bK +6H5NfUSOzMf4dXrj1SbKCGWOg3/JPE2J8KOrmitj6vyS6IZqsn/aHz1Y7KyM +5rEypwVuEnA3qHC8PVoZs9/W942VEGD3lymxP0EZFUZu9J8pJqArq5duclgZ +DbmjOlBEwIuG5YdL05XRJmTkyREy/ydWRkmknFfGpZ+62O/J74Nc1TqGbZsy +7gp+Zzh7jIBdP6cOPxBWQekj96/ujCD3I2KHzEcJFYz8yvtzMIys99hQOb+c +Ck4OfzM/sZuAy8Pt/eaqKljgeuh8UQgBr1tO69fSVbBC0G0m15+AjSnMwWJf +FTyf+ZDS4kTmpUSiYUK1CmZd/16tqk8A37HZu/l1KhjW2hdRr0Ounz/Uu65J +hVwPZZe9FgE7Z11SpjpUUNQ4Qj5AlYDSQfXhoCEVXC1aURAkR34vCx+kuvGr +otq2Evc7/AT80hN7beCuinDn2d3GAR7MXVBIXOOtikJM079fenkwI6qhzvRV +xRwD/5fS5PljYpoZah2iipzn8UUB5HnlXVPAnPcBVbzV8E/cQCsPHq2/JXL0 +sioSx6uSVMvI88nOrfBuVhXfqsblecTwgFN+o+jMGTU8NX5wx+0VPBhWLi+0 +OaeGL8XNwoIEeRB/puziTKEabsrplRZdwoNbiVfOu5SpIWPDJetN8zVg7FmU +L9KshtUlon6Pv9WAjkBuVupbNaTkMe2te2tAxjfhcLS+Oio4nnmWeq4GpiTs +/Tza1PFjpeb722o18D7Tz2OvoCaaRf4ldAWrwe5bjN0HuhbamdXH2nRWwteA +ZZHEIW0UZyn91mHeJP9PyC5Oa9PB8bTa/fwl10HiieaJqm+6mJHfrVBFvwaU +o5VOdLo+7rB1Mve5dBny9ZhikkEGuG/pTWFl50vwSMHCdDp7FVofq/eV1CwG +FqUty7DfEC0WmU2teXcBRPhLovyTjNDAOXN4WrwAaIlKHC/N1Zj480PKjP0Z +WK7hU+dyfzX6V54Bx5kcWMWVr4zZYoy02mb3g3pZsPe1RLs93xqs6wsKmlnI +gG/Tme52+WvQJN05VK40FdYa3iuwMzDBnpKLzM9jSdAyzf7zo8sEeV6U2rbR +g7BH33jo+XZTPNKSKHHVLw72/VD47RtsipZ8tOPX7eNgfxu/wkSoKd5+Wn7n +tkkcHPPs81oRbooJ4bkGksvj4NqR2BeW8aa4jj/KNa4mFt69bBnknTBFYy3v +Bb1lseBxfP3A6VumaPXOsGKmJRq4E4G9Xsvp+ODFZoNAzyiQaVpb0rySjktP +Op1zXBsFE2m64UoidLz1IF7chh4FF1UmV36QoONvv4fz7lJR8J9bglU4hY5H +KXM6gs8j4U5Tdk2qIR39DD+FFztEgkV6SxbPnY4hfUOTGQ57wUZdboNwCR1F +x50U3uwOB2K8QyWwlI41LluMRn3DQf1W5FzjFToa92HglHM4LLF/WhhcTseV +9btF9enh0BaW+r2dIN9/Ma96zX9hYN40kxd/n47m2tVdpRphQHd5/u7TVzpW +lgjsVU3eDdqHM2LbGAzUvX9t2eroUGhmXxZwYDHwOZrn/vEJBacfd3L6OAwM +5Re7N2QVCrF7Zm98tmCg0++KT/3iofDAx++tiAMD751rq7lbEQLBTLr9Zj8G +Ob8Wc6Ffg6Hs+1vFmaMMXL+gkpMWHQS625l3NIYYKJ6RH81uD4STqo6/k18y +sMBQTlGrKhBm3mwzffeagV6OXfMqFwKhxTuz/OIoA7MfD3vYxASCi9ObPNlx +BvYLWqy10A+EOHZK+HI+M+xXeVUucDYAHog/VxnXMEPXxpaSAwe2wfaW4CNE +hBlmJF8cVwr3g4ndYzE2UWbo8+sfCWtfP4il7trZH22GU5F8gTGOfpCxP8zl +Z4IZSu9U3rrSwA+qWNHKnFQzvFBz63tXny/8rUtubi8ww2KjTZZPurdCTuXF +me52M+z8dWtRyDsfuFPUGzglzUQXje7iA65eMOKg4hstx0SG3kbCkOkFfL92 +e/1RYKJ1h+KPXzQvsHQWdBRQZmLDyO72/jFPuLeIxZDXZeIuR15EZbIndG4r +XG5hzkSRFf2KTxo2wZB6aEXWDiZemF4WzmZ4wMy1hR+Gt5jokW7LlYx0hY8e +tkXpDUzsgzc3rvu6wuCS4+tGm5jorMALdHVwhSY/hbNnWpn4NuZ17KCGKyTJ +mbLmHzJR27fwfuULFxA7Grr/0Usm8qfXN6RZu4B+UB/f9sUsLFV/bntE0xlo +0pSyliUs3NrWs0hf2hnE2rc5ywmysD4nM2KU3xmmaZPFj1ey8INfrnniWydo +7F9hZSzNQsv6Wk7MBSdYZ4spC1osfOUf4Ggp5wQBGuXLCzawsKak8v4SY0eI +79gaqunEQqNvh2ZjxRwha7vE4xoXFq4+/uGCyLcN0Hw5LvPxJhYeO1j274Ub +G0BKc53ovD8LlRM6N9vpbIB7mh+k/KJZ+FI9ubtR2wF0tZWUNQtZ6E1tlrYF +e8AH3YdrilmYfOnUNp6KPXgEp741L2XhWPLVW+ZL7CH52njJpjIW8t2VFK98 +aAcvtZs10nkstOj6WDLtbgcndLz0vt5nYVIC9/hs5DqY0j1Fr5lkYe2wQJJu +hy0MdqKN5DQLj2xgxI3csIXWPROuUbMszK45+upmri2cqLGLoP9m4QTvx8UT +gbagy+K70cjPRlf/12+3C9jCNrvdKu0ybLRanB7nvd4GeoPWCvVy2Didqq81 +8MkKmpbPKpgCGz39hcrcu62gpLxE54wFG7si9Dhfmq0g/Nu8ractG21PL3Lc +mGMFwjFE4suNbGQ5t+lIm1uBbarKj/fb2Ejj8ZnFnrWE+tI/b2ePslEmweGz +iq8F0K2iftgfY2Np33m+ww4WUPv2q1DRcTaOz3paTzItoIb2mmGfw8Y3lv2i +gtIWcCO/9fjFc2w8OXlKQKgToSgzhbm2go0rfbQEdnAR0qNEs/N72OjM6C58 +52UOyySPXhnvY2NGtMfchJk5pFbzNVsOsvEo1HxWlDOHIxNTH7++ZOONreKG +A/1cOBjcy7H4yMbkhW6dZ+5c2Otz9vOXn2yMiTruzvPigLe1GrJpHHTaZ1lw +MJYF873LRNqVOTj5JufclCcLirZPDNurcfCrw5lfqUwWfExtiPHW5mDfhMxa +uT9M2PtwY2WcMQdlMxOOPz/EhAzH/bR6Ww52T5TbJ500g0bPvr8mYRyM+XDp +1/w9Omz50vioOYKDf39Z2hwspwNffFG+dRQH23qjflOy6GB7bqeJWxwHzxYO +6dR60aH71aJdkckc7B9U8tkwYQpj21YNV+dx8MqFN978VFNQ3J3WsKqVgxTO +N8rtk2vgxMIO02NtHDwWoLB0Z9waWJxjW/3pLgetMj1cjALWwFidQFnRQw56 +aoQ18zHWQCPfkXyJHg6qLhrfV/fGGLxzD8fMfeBgyzatm9tMjSG/Kc60ZSUX +pyj9qnpTRiDk6FWtIMJF0+nvtudfGcHhETODGDEuShUsMVZ9ZATBAj/VjaS5 +qHhlWHjXJSNgbIyWKqFx8dxfonbWwwj63+2dTlnNRfmxbxmFyYYgvWJX9YZN +XFz+I4Zh4mAApVYH4ie9uCiBy6sENA3A+MAJq1M+XHweJSskwGcAjpNVfYP+ +XPxFN7yWSehDav/sr4BdXHQbERRuVNKHnyWHLOMTuXjfMU4g4D9dGGKf6rlS +zsX15589LhnWhuB9peftKrj4YcH6S0+jNsxV1G7/WsXFS8Z6QgYF2iChOvhj +dR0XC77+qPbw0ob1y6iU261cTP8cRSS90ILm3iuBPX1c3OP4uVf2rSbYi9Qb +RA9ykfl75RzRpgmDax/OyQ1zMUFBd09MqSbMNP57dOsIF4ueOd/eGawJBsVG +N7+McZFG+eMu/F0DmocsojPHuai8kHTjWa8G2Eu5guEkF3e7CkvU39KAHWn7 +nkfNctHqDy3k+wENmGlNLZD9ycUmTvIKG38NSPqdF9D4m4vbT15SaLLWADGT +Mv0t81x88vNphJu2Blzc3Ti7sMDFLxsOfRYT0oD/AT4JGRo= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08149229280394858}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08149229280394858}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994355148694315*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"a2031d71-24ec-4be1-b62e-1902349d5041"] }, Open ]], Cell[CellGroupData[{ @@ -7693,18 +8750,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[100]:=",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.63226505299142`*^-153\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 17, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355148856254*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"308df87a-b217-4609-9fd2-ba57bfeadb5b"], -Cell[BoxData["15.784298544249623`"], "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.5537680473826425`*^-155\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 18, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355148867152*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"72901b40-e54c-4212-af14-fd1b93a4d93f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.770714057341215`*^-158\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 19, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355148876903*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"7f0be2b9-06e8-4eef-b430-9c9773076fe9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 100, 20, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355148887684*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"aeb32ca5-89ac-4482-b6e8-89c634b27722"], + +Cell[BoxData["9.327021513034158`"], "Output", + CellChangeTimes->{3.994355244918316*^9}, + CellLabel-> + "Out[100]=",ExpressionUUID->"eb5c22a9-bfc0-4d65-9f61-0003b1f12576"] }, Open ]], Cell[CellGroupData[{ @@ -7771,27 +8885,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850595832054*^9, - 3.991850600247154*^9}},ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-\ -8e83e9537fdc"], + CellChangeTimes->{{3.991850595832054*^9, 3.991850600247154*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56921c73-2b67-0e4a-9808-5f61de992c7e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.116697080387539`*^-197\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 21, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355244989277*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"1a45e09b-e974-4575-968d-f3fd3c077b0a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6681936758962384`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 22, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943552449976463`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"66aa69ea-8caf-45c6-991d-1dc774e3fd30"], -Cell[BoxData["0.009432406283458074`"], "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1639055193561464`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 23, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355245007165*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"c6c7ba9a-f90e-4eb5-a8c4-8a6a05a0bd8a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 101, 24, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943552450163183`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"1e487b19-f810-4097-905e-fcc3f3ccf871"], + +Cell[BoxData["0.7659190155590293`"], "Output", + CellChangeTimes->{3.994355256668082*^9}, + CellLabel-> + "Out[101]=",ExpressionUUID->"1cff9fee-f905-4a0b-b69a-ecb768b281b9"] }, Open ]], Cell[CellGroupData[{ @@ -7812,8 +8974,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7858,27 +9019,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850617546938*^9, - 3.991850621692934*^9}},ExpressionUUID->"ccaee6a3-c390-0444-bf16-\ -3471356a3614"], + CellChangeTimes->{{3.991850617546938*^9, 3.991850621692934*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"1795c3b9-0182-224c-b986-6414d6712c04"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.116697080387539`*^-197\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 25, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355256728312*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"87f2de96-d09f-4dc5-aec5-59c47c12589a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c3b31753-a67f-9b45-b822-068e1df11f68"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6681936758962384`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 26, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355256737706*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"c79f2184-ac5f-413f-a2a9-8270029aeb10"], -Cell[BoxData["5.210321944589433`"], "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1639055193561464`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 27, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943552567470303`*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"57c069a1-d911-4967-9d9c-c4ac276c94cb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 102, 28, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435525675683*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"aa0463cb-8e83-4240-8c63-47acc0692099"], + +Cell[BoxData["25.564057721720953`"], "Output", + CellChangeTimes->{3.994355268019576*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"369a9208-18bc-4585-b467-21c559a8f4a0"] }, Open ]], Cell[CellGroupData[{ @@ -7899,8 +9108,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7945,27 +9153,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918506254460773`*^9, - 3.991850628958872*^9}},ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-\ -286954db37c5"], + CellChangeTimes->{{3.9918506254460773`*^9, 3.991850628958872*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.116697080387539`*^-197\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 29, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355268089045*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"4bacf803-a996-468b-b4be-00b46b9dfc32"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4e2b22f2-1724-7649-93fc-33cd27bb415e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6681936758962384`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 30, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355268098928*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"b1335e62-0d2b-4cca-885c-5ff2c936d13d"], -Cell[BoxData["20.308521034293705`"], "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1639055193561464`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 31, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355268107492*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"44c34357-96d1-4ee0-85dd-7d398bb2bd45"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 103, 32, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943552681162252`*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"c9603167-989f-4c77-ab3d-b98cc34c0c55"], + +Cell[BoxData["4.024384405094517`"], "Output", + CellChangeTimes->{3.994355277431209*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"ae5e6074-1a5d-44eb-b661-984855a9b55a"] }, Open ]], Cell[CellGroupData[{ @@ -7974,19 +9230,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918506775260105`*^9, - 3.9918506840946693`*^9}},ExpressionUUID->"7ec678fd-8398-414a-aeba-\ -20e078d734cd"], + CellChangeTimes->{{3.9918506775260105`*^9, 3.9918506840946693`*^9}}, + CellLabel-> + "In[104]:=",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[BoxData["0.0009169614351270098`"], "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[BoxData["0.07551239215656985`"], "Output", + CellChangeTimes->{3.994355277478009*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"a1aeec95-3634-4473-acbe-6809d7d223cb"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918506873951664`*^9, 3.991850690050791*^9}, - 3.9919245116307106`*^9},ExpressionUUID->"ca329276-48d7-8943-8408-\ -dd2997d3499c"], + 3.9919245116307106`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ @@ -8007,10 +9267,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Il", "*", "Ih"}], - RowBox[{"Il", "+", "Ih"}]]}]}]], "Input",ExpressionUUID->"681c316f-cd82-\ -ae4b-824f-5eb2b3081f6d"], + RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", + CellLabel-> + "In[106]:=",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[BoxData["5.744985073726742`"], "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[BoxData["4.533084270623094`"], "Output", + CellChangeTimes->{3.994355277500455*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"2fadf69d-206f-4e0f-90e3-29507f28635b"] }, Open ]], Cell[CellGroupData[{ @@ -8018,10 +9282,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb2"]]}]], "Input",ExpressionUUID->"11e77a67-96b2-a645-\ -89cd-559587f30b91"], + FractionBox["Kb", "Qb2"]]}]], "Input", + CellLabel-> + "In[107]:=",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[BoxData["1.564995573098341`"], "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[BoxData["2.9823918544113313`"], "Output", + CellChangeTimes->{3.994355277514299*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"58386002-52ed-46e6-a8a5-a76b3ecae9b4"] }, Open ]], Cell[CellGroupData[{ @@ -8029,10 +9297,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"3c5f43e9-\ -afc4-be40-8f37-0116656ecd38"], + RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[108]:=",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[BoxData["8.990876207898397`"], "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[BoxData["13.519433604066448`"], "Output", + CellChangeTimes->{3.994355277528247*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"36a1007f-8dcb-44b2-a838-15c8cbceba9a"] }, Open ]], Cell[CellGroupData[{ @@ -8220,10 +9492,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"f07a8476-d7bc-1049-\ -82a6-7cf06f61e28f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[109]:=",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[BoxData["0.06921475857237179`"], "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[BoxData["0.008761566102163108`"], "Output", + CellChangeTimes->{3.994355277546423*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"a22dd827-7c6a-4fd0-8c37-2c3b74e22ef0"] }, Open ]], Cell[CellGroupData[{ @@ -8235,18 +9511,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"b88b1a94-\ -22d7-2843-88e3-f607b95c8af9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[110]:=",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"def6b331-c871-b04d-a16e-4fc00b03d009"], - -Cell[BoxData["3.36857007702114`"], "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[BoxData["9.467908883498456`"], "Output", + CellChangeTimes->{3.994355277740713*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"4b60103b-9063-4f31-9269-e2425bdbb1af"] }, Open ]], Cell[CellGroupData[{ @@ -8436,10 +9708,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"9d771aab-c0b4-f24c-\ -9b53-9472e00c4d82"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[111]:=",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[BoxData["0.01179213875658184`"], "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[BoxData["0.07265097093478821`"], "Output", + CellChangeTimes->{3.994355277757955*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"d74b8d04-1f35-41e0-8c58-489e4468472b"] }, Open ]], Cell[CellGroupData[{ @@ -8451,18 +9727,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"47e2a8e8-\ -6af3-374f-9eea-9c2b6faaaf4a"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[112]:=",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c6c8676e-4601-144e-b83c-769e22949175"], - -Cell[BoxData["8.161099076568318`"], "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[BoxData["3.2879426164236545`"], "Output", + CellChangeTimes->{3.994355277952774*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"ea13fcb5-e9d3-43fd-84df-7ab8a53a2c4c"] }, Open ]], Cell[CellGroupData[{ @@ -8553,10 +9825,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-\ -6b0985b9b3bc"], + ")"}]}]}]], "Input", + CellLabel-> + "In[113]:=",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[BoxData["0.04702603264830412`"], "Output", + CellChangeTimes->{3.9943552779680367`*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"0eeebe53-7722-4835-b010-b7e50ab1ad6a"] }, Open ]], Cell[CellGroupData[{ @@ -8644,10 +9920,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-\ -4868d83e9702"], + ")"}]}]}]], "Input", + CellLabel-> + "In[114]:=",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[BoxData["0.9529739673516959`"], "Output", + CellChangeTimes->{3.994355277987265*^9}, + CellLabel-> + "Out[114]=",ExpressionUUID->"f1d22bfd-b2f6-406a-ab11-e0b8569f79a9"] }, Open ]], Cell[CellGroupData[{ @@ -8768,10 +10048,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"5caf1614-7e5c-\ -9940-98cd-9460e2c074b2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[115]:=",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[BoxData["0.04481458490166476`"], "Output", + CellChangeTimes->{3.994355278005001*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"378ad4fa-cb21-48c5-88a2-a4a660d6f4e5"] }, Open ]], Cell[CellGroupData[{ @@ -8833,27 +10117,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991850710120125*^9},ExpressionUUID->"db0784f6-51d0-fd44-b0e8-\ -05d6af1a6e52"], + CellChangeTimes->{3.991850710120125*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7fd60dea-f794-4744-8801-bfb1a50a0e07"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2752497252676706`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 33, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355278025448*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"b5dd6b94-e102-4090-b32b-202790d62017"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0b8c0718-41d2-4542-8afe-212a15805650"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.159612844631474`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 34, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355278034791*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"59f52ed1-2174-4a17-b207-9e594f0e85c8"], -Cell[BoxData["3.3685700770211437`"], "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3567835910406837`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 35, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355278044198*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"7605cd59-27af-4701-87df-3ce678fd404e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 116, 36, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943552780541553`*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"83e74496-cc23-49c9-9039-b2a87f718561"], + +Cell[BoxData["9.467908883498463`"], "Output", + CellChangeTimes->{3.994355286075219*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"44b8bdb6-86ce-481e-a45c-00925ab3ce07"] }, Open ]], Cell[CellGroupData[{ @@ -8915,27 +10247,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507152152424`*^9},ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-\ -f69c33a31448"], + CellChangeTimes->{3.9918507152152424`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b6f0ccc2-ff83-124b-a341-e143319c7670"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2752497252676706`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 37, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355286129499*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"c87bbe6e-9d2a-4bd0-b95d-c39e81e30349"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.159612844631474`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 38, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355286140025*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"e35a3173-728b-4ed9-b34d-e467f63e04d4"], -Cell[BoxData["8.161099076568323`"], "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3567835910406837`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 39, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943552861504107`*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"31422bf1-aad9-45c8-bd59-55057c97186b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 40, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355286159357*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"35094114-3bf1-413e-bfbf-be1d4a6c1300"], + +Cell[BoxData["3.2879426164236536`"], "Output", + CellChangeTimes->{3.994355294027893*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"0b3a50a5-29a8-4141-962f-aa19f55f0454"] }, Open ]], Cell[CellGroupData[{ @@ -8993,489 +10373,394 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507183992805`*^9},ExpressionUUID->"611f92ea-b199-2643-9788-\ -194fae57c34e"], + CellChangeTimes->{3.9918507183992805`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7797a546-4085-124a-83da-5f3c472cdc4c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"ca7472ca-7b27-a54a-84a1-e603fa592207"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-\ -49e8ffb5e8c8"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd0bB3AhlaHMQmRMRLgypvYTQqYkREpc955QlCEphQa8ikIqDYYM +hcxCIYne+EnxoknJfMxj7lFIv+2Ps876rLP293n2PnufdWTpp+yY7GxsbMP4 +Wrn7fdiuVNH6YbdV8cK6DB8S7Z7M1Kab5CFpzwmDFfek6iQqmFQjJb269yu2 +Zbzn4tX6F3kpnKvLxC4ODqtfbdKMPGmC4o+xo99urA3L/Q+Fe8X+9wT7Ratf +yhLtIyLaR8dysEc7my6cq/qCxkJUPPOwJQblXSjj76jntJVpIbbl1AX9gOZu +5F9nG1mCXbM0yhOc24syL+tuLcf+dEkspNy3Hy3/y6ZaiT3JZTI6RxtEg+l5 +8TXYXDGnnbXmSTSkudO5HltaILnRr2oY9cfmXW7EtpGkHk8ajyNXOb3Fdmwi +TU5Ube0k4npgZ9GJHaa4P+JE8xQScbdd7MH+ItahGZg7g7R9qMtT2IzD3l63 +YmZROmeq8zz29EO2RyW+PxF7zLaEv9hr5dT4Z2gstEVxZquAL4kSGfVm/CIU +MrqnEiWBLfPEOUx9nkI2deZmCth6qpGTPlW/UNSGHRN62J463c2jxktoUvh9 +C4E9F3yGk3vLHzSaStsVgB1exWOovHYZbW0N5Q3HTgK9p8eb/yLXPc2t97EZ +WY0m/rmroLjeeLoDO/ftrZ5LkuyAGsiTA9jTQ64X4mPYQW3E33IO+4IKq7TI +lwOOTJhtFzmF+y2UlZ+irQZ52tQ1F+zO1vGa5YzVoOQwKOqLLTNbcXi9CBcY +JDVwXsLO22GToDbPBZ1KdlzZ2G9enF91smotNERcT1vAZtW3dw8b88KdJUqz +5DSJBK14+UNqeEHP4NpcM7ZGhwnw6fOBuuIulWFs74GyNM3t62G0hXNqsx+J +TrM3a+zi5YfYCvUfidiDcgUzEZQAcLqnHkz0x+tDNK1r0RIEhX+izMux2Z+S +shv9BOF7/4OiL9gyWpvtcscEIfq1Vad0AIkOG8eVfOgRgjC/4VtF2C0e/gFi +70Tgm+D3tJFAEv14cuO621pR4AifbxQ8Q6LxsdyMnL2iIJBowzDE5g7sb99Z +Kwots6VzcdgmV+13uJWJwfo/5y6gIBJVZuqwslPF4b7N9NaSsyTKHFwIMgiU +ggcPVy9PnCeRuUPUj4B8Kbj3Ir5LNgTnvxEyzSeloDq3QtYRe0emqoiMszQU +PP34+RX2G7pr6erdm+HQhpDFuxdINDvVc3b4igwYFZ2TdQklkZCPybNSazmI +m1CeUb1MIjKT29PWWw7sGw8RPtjPv7dKTkTKwcIjcyjAPmJ19MqWWjmo4jon +p3kF97ctyO4eTR6ilwzTdl7F9UefTIeKKUB27YPLHpEksj/Oo2bRqwgyxwMn +lq+RCAU50A79UQQpJnXO4jqJVCJSdRniW4DBcen4HWy2DC2j0ANboOBiOVM9 +hkT5P1wOlbzeAiVHWyaZsfh8OuZdkkhXgkMFW7QHb+L+TKw/jdKV4c/irhTV +2yTKOHj323yoMpR84N1/FfsGvbeH84Ey3K6XcP+OzQg/Mybdrgxp7ovZsXdI +JFCdzHbQWAV0KPbGubt4/2hNqlTJb4O+/703+XifRJJyN8OuD6gCV/Ab0+40 +ElVfm1P+za4GS2GMFMtHeD1+OncQsmoQnFvl+Rw75Y2CspGrGjgO3HO4lU4i +ueOVbb8+q4F577E4m0w837xBReLdduCu9orpfEIiKUlpQsZZA3hulxSbF5JI +NSuQdxHRwIbVaRf6ikR0xhWWmg0NHu46Y7KMnSSf8MPtCA2kBB/eD60lEUd6 +YdHbYBrUf7gXGP4an7eUUfuEYhpw/0np/qcef0+T3JKV5bWg87tMYl4Dfr/X +rbY7ce2A0vc/olEriR75K9iWNWuD4OaTJol9JGoNQrpXs/RBqDQp89WGISTr ++tHm6Mld0O78OpFuPISYf8sLpM4B9KeE/5I+P4TExp6vEaMbgZ38Iq2seggF +ahl+T1AxgSalHwsvVg0j+sRSo9DoXggReHG123IY5RsFrEltMYPw+UvqjzOG +Ueac9+u8xH3goFgYE7I0jH7t2fj+TZglNBd40uiMEdTFxjHT624NsuYGxpvb +RpDvplNxl+T3w7sQL2CgUVTg1Vh7O8IW7CqzMs68HEXnf4rPb/M6AF8lDvFr +GowhloWpY8MxOxDZtTd/oXEM6bvE7xk8cBBOJV5dfHtkHLWJJ3u/0bKHZ8pL +WrYT40ji8ZXq7K0OsBgteZM/fgI971GxsuFzhIYToya2GpNIumP6eNCEI/Sq +3xzc2DaJtG7H52X0HAJj+4fboqOmUDLnz+0J9U5gqv+aa0FiGpXvUe+MeOEM +uk666+ZDplGS7jWBpdzDEPvKY9i2axq1fMuK1IpxgdjPj25k6c+gMuuHCqfD +j4Dop4oNCykzaMbnIJsv4yiU2IbE6izPIJapsueksSucEhbhLHCZRdkTX38F +6ByDIzapJx7UziKnR1keR3ndILlNf6RI6icqLbE8xhHlBoWqutp54T+RvmTb +7+jfbrC79LFOXOdPJN9zvPM/L3dQyuW68kB9Dg3wnNj/sN8dNllHu9+NmkOt +N2w8zBzoENq3ime6Yw4lBqfynGmlQ4P0sEapHAtV1/z97bHPA7Q3fK0Q8mSh +DUcgSqvSA16NBMV/e8RCMsINLZuqPSDha/WZt+kspNFsvZGrxgMy/8i1FmWw +kJ2hS86X13i8biJ5JYuFEjcFvbv4Pw/QOzORKJ/DQhJdTzc0fvEAw5LOD+ZF +LKTgKpZ0ZN4DipdVzyrXsJC+22R2xA4GlB3a1af/hYUe35sOsNFhgMrZ089/ +Ygu3z+4W02PA064u3vyvLDS5d74jeye2Wp+69DcW/n6xrWo2YkD/4tThhS4W +Wj8v4Cx4gAENiS5b7/ez0ECs9rpUHwZUeIfXBE2y0I2qC17PHzOg430OXzI7 +hXxod/WDsxmQ8kovhMZBIauc4nV6uQxg+D5lNGBz3yVzKvIZsJzTljvFSaEI +f9vR8mcMKOywXGWwhkIXlBVOlNUxQHjbvtoyHgp53313suQHAz629380F6bQ +vvWkoX8PA1hV52+8x94awcZH62PA6Ej7qwP4v4D0184vHmTA+iLfGCdRCrnb +pE4UjTNg8m9Z07GNFHJaHeBbuMAAg07HBvtNFDILkDidJ8qEc41j8l/kKVSX +GmmRsJEJ4hwGtx0UKGTYPKsQLMGEuuH1jDZsDcV3X42lmUCb7hNvUqSQ+OcQ +42+KTKiqcOwvVqLQmEGXKLc2E775TX2ib6PQTfa0l8cPMuFPfMOtfTQ8f3Xe +JGsHJihfk4kowb7qEuyvdYgJT2xmWiW0KBT8zFbp72Em3NZ8dHYE251YFX+H +zgTL2LblUG0KaTXRGf/6MWG8Kr/3mh6FPscr8sjHMSGqfNJLcTeFChCf53A8 +E/YJWw4FYF+dmHuTf4sJFv8cbHuNTdv3JlTvLhOEfLfPuCAK3WDzmLVOYYK+ +2nnbaKCQ6am0r8F5TNhUqBndaEQhKal/dHYXMGE7b2knnzGF5ppO3eIoYkJM +Ksc9O+z0Lcj6RikTlvt/uHRi/+nqqs2oZMJemuTvPhMKPbOSzP7QyIQrrZOR +X0wpdH2BfXViExPE3BJShc0oRM8edXduZoKZj7GCLTY/Z6XkQAsTOmwf+f2L +fbLK6ebvT0xQDxCXzDGnkLzKnSCFQSa8PfAq1d6CQgufL7aPkEyo1NANjMJu +jWBqFA4zod1a9NkL7NDeHaP640xQDRk4s8mSQp1J7Uf3/2SCgHEN2zfshDUC +e8+vIkC0p3CboTWFqme7XAI5CCjbJXzRG3uoK9ffdzUBpnapwknYhs9M0ujr +CBgeWBaZwSbdghctBAjgFKlzu2+D+7faK7hXiIAhV/2+OuyduoLKSISAl/aR +OaPYcXx5jlriBJQshKzT24+fV3YXS8oS4F/ZydeETWTlNYrIE6D4kv3lOHZc +3LnuDYoEXDevLF5vi+sRQnycygRkb3l+whY7TsjMc1yDgPH/xGXfYVcuC4WR +NAISXwwtDmEPjvTc7tmB68+v28R5gEIGtefrO/QI+LZZU9UAe+BkgfRLIMDP +3uV6MvZ6pxDtCiMCDGYl455h6xubWxWbEHAgn62zCfuGeN+5LHMC1qTL7mJh +P+csjEu1IECw66DjOjsK9U+FPLlnRYCm3p1nm7D13op8jLXF9bX1YQ82vbhv +LMqOgHb9eB877NiHheyX7QmwkR3upmP3+e/TCHIiINToyq1L2HyuomanDxPg +tbu24+ZK3r7+o95HCFBJnzicvDJ+88Xrrm4E3Ofm0ynHfs5tke5EJ8CC9vva +65U8lugLOwYBHWuaFJpX8nr7W6wIAth5LnJ8WslrLiJNPQmoHdqg1L3SX8XF +P+BNgGxQ+M2hlfx0C+GdJwlwqGw2nFrJjxXbpu2L98fA7HZqJT94YI/6aQJq +Dswwl7B5GcVOyv4E8F9727vqIIV094eekg8k4KKRXzoXNt3AMlIqiIApl+kn +3NgxihuTxYIJiOw3muXDLucfLBU4T8BlQc9L/Ni9i8VNPBcIsLM55iCIzTsU +2rs6FO+HrVt9hbB12ix//Q0jYNq17t2K/w9OTvhv + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd0bB3AhlaHMQmRMRLgypvYTQqYkREpc955QlCEphQa8ikIqDYYM +hcxCIYne+EnxoknJfMxj7lFIv+2Ps876rLP293n2PnufdWTpp+yY7GxsbMP4 +Wrn7fdiuVNH6YbdV8cK6DB8S7Z7M1Kab5CFpzwmDFfek6iQqmFQjJb269yu2 +Zbzn4tX6F3kpnKvLxC4ODqtfbdKMPGmC4o+xo99urA3L/Q+Fe8X+9wT7Ratf +yhLtIyLaR8dysEc7my6cq/qCxkJUPPOwJQblXSjj76jntJVpIbbl1AX9gOZu +5F9nG1mCXbM0yhOc24syL+tuLcf+dEkspNy3Hy3/y6ZaiT3JZTI6RxtEg+l5 +8TXYXDGnnbXmSTSkudO5HltaILnRr2oY9cfmXW7EtpGkHk8ajyNXOb3Fdmwi +TU5Ube0k4npgZ9GJHaa4P+JE8xQScbdd7MH+ItahGZg7g7R9qMtT2IzD3l63 +YmZROmeq8zz29EO2RyW+PxF7zLaEv9hr5dT4Z2gstEVxZquAL4kSGfVm/CIU +MrqnEiWBLfPEOUx9nkI2deZmCth6qpGTPlW/UNSGHRN62J463c2jxktoUvh9 +C4E9F3yGk3vLHzSaStsVgB1exWOovHYZbW0N5Q3HTgK9p8eb/yLXPc2t97EZ +WY0m/rmroLjeeLoDO/ftrZ5LkuyAGsiTA9jTQ64X4mPYQW3E33IO+4IKq7TI +lwOOTJhtFzmF+y2UlZ+irQZ52tQ1F+zO1vGa5YzVoOQwKOqLLTNbcXi9CBcY +JDVwXsLO22GToDbPBZ1KdlzZ2G9enF91smotNERcT1vAZtW3dw8b88KdJUqz +5DSJBK14+UNqeEHP4NpcM7ZGhwnw6fOBuuIulWFs74GyNM3t62G0hXNqsx+J +TrM3a+zi5YfYCvUfidiDcgUzEZQAcLqnHkz0x+tDNK1r0RIEhX+izMux2Z+S +shv9BOF7/4OiL9gyWpvtcscEIfq1Vad0AIkOG8eVfOgRgjC/4VtF2C0e/gFi +70Tgm+D3tJFAEv14cuO621pR4AifbxQ8Q6LxsdyMnL2iIJBowzDE5g7sb99Z +Kwots6VzcdgmV+13uJWJwfo/5y6gIBJVZuqwslPF4b7N9NaSsyTKHFwIMgiU +ggcPVy9PnCeRuUPUj4B8Kbj3Ir5LNgTnvxEyzSeloDq3QtYRe0emqoiMszQU +PP34+RX2G7pr6erdm+HQhpDFuxdINDvVc3b4igwYFZ2TdQklkZCPybNSazmI +m1CeUb1MIjKT29PWWw7sGw8RPtjPv7dKTkTKwcIjcyjAPmJ19MqWWjmo4jon +p3kF97ctyO4eTR6ilwzTdl7F9UefTIeKKUB27YPLHpEksj/Oo2bRqwgyxwMn +lq+RCAU50A79UQQpJnXO4jqJVCJSdRniW4DBcen4HWy2DC2j0ANboOBiOVM9 +hkT5P1wOlbzeAiVHWyaZsfh8OuZdkkhXgkMFW7QHb+L+TKw/jdKV4c/irhTV +2yTKOHj323yoMpR84N1/FfsGvbeH84Ey3K6XcP+OzQg/Mybdrgxp7ovZsXdI +JFCdzHbQWAV0KPbGubt4/2hNqlTJb4O+/703+XifRJJyN8OuD6gCV/Ab0+40 +ElVfm1P+za4GS2GMFMtHeD1+OncQsmoQnFvl+Rw75Y2CspGrGjgO3HO4lU4i +ueOVbb8+q4F577E4m0w837xBReLdduCu9orpfEIiKUlpQsZZA3hulxSbF5JI +NSuQdxHRwIbVaRf6ikR0xhWWmg0NHu46Y7KMnSSf8MPtCA2kBB/eD60lEUd6 +YdHbYBrUf7gXGP4an7eUUfuEYhpw/0np/qcef0+T3JKV5bWg87tMYl4Dfr/X +rbY7ce2A0vc/olEriR75K9iWNWuD4OaTJol9JGoNQrpXs/RBqDQp89WGISTr ++tHm6Mld0O78OpFuPISYf8sLpM4B9KeE/5I+P4TExp6vEaMbgZ38Iq2seggF +ahl+T1AxgSalHwsvVg0j+sRSo9DoXggReHG123IY5RsFrEltMYPw+UvqjzOG +Ueac9+u8xH3goFgYE7I0jH7t2fj+TZglNBd40uiMEdTFxjHT624NsuYGxpvb +RpDvplNxl+T3w7sQL2CgUVTg1Vh7O8IW7CqzMs68HEXnf4rPb/M6AF8lDvFr +GowhloWpY8MxOxDZtTd/oXEM6bvE7xk8cBBOJV5dfHtkHLWJJ3u/0bKHZ8pL +WrYT40ji8ZXq7K0OsBgteZM/fgI971GxsuFzhIYToya2GpNIumP6eNCEI/Sq +3xzc2DaJtG7H52X0HAJj+4fboqOmUDLnz+0J9U5gqv+aa0FiGpXvUe+MeOEM +uk666+ZDplGS7jWBpdzDEPvKY9i2axq1fMuK1IpxgdjPj25k6c+gMuuHCqfD +j4Dop4oNCykzaMbnIJsv4yiU2IbE6izPIJapsueksSucEhbhLHCZRdkTX38F +6ByDIzapJx7UziKnR1keR3ndILlNf6RI6icqLbE8xhHlBoWqutp54T+RvmTb +7+jfbrC79LFOXOdPJN9zvPM/L3dQyuW68kB9Dg3wnNj/sN8dNllHu9+NmkOt +N2w8zBzoENq3ime6Yw4lBqfynGmlQ4P0sEapHAtV1/z97bHPA7Q3fK0Q8mSh +DUcgSqvSA16NBMV/e8RCMsINLZuqPSDha/WZt+kspNFsvZGrxgMy/8i1FmWw +kJ2hS86X13i8biJ5JYuFEjcFvbv4Pw/QOzORKJ/DQhJdTzc0fvEAw5LOD+ZF +LKTgKpZ0ZN4DipdVzyrXsJC+22R2xA4GlB3a1af/hYUe35sOsNFhgMrZ089/ +Ygu3z+4W02PA064u3vyvLDS5d74jeye2Wp+69DcW/n6xrWo2YkD/4tThhS4W +Wj8v4Cx4gAENiS5b7/ez0ECs9rpUHwZUeIfXBE2y0I2qC17PHzOg430OXzI7 +hXxod/WDsxmQ8kovhMZBIauc4nV6uQxg+D5lNGBz3yVzKvIZsJzTljvFSaEI +f9vR8mcMKOywXGWwhkIXlBVOlNUxQHjbvtoyHgp53313suQHAz629380F6bQ +vvWkoX8PA1hV52+8x94awcZH62PA6Ej7qwP4v4D0184vHmTA+iLfGCdRCrnb +pE4UjTNg8m9Z07GNFHJaHeBbuMAAg07HBvtNFDILkDidJ8qEc41j8l/kKVSX +GmmRsJEJ4hwGtx0UKGTYPKsQLMGEuuH1jDZsDcV3X42lmUCb7hNvUqSQ+OcQ +42+KTKiqcOwvVqLQmEGXKLc2E775TX2ib6PQTfa0l8cPMuFPfMOtfTQ8f3Xe +JGsHJihfk4kowb7qEuyvdYgJT2xmWiW0KBT8zFbp72Em3NZ8dHYE251YFX+H +zgTL2LblUG0KaTXRGf/6MWG8Kr/3mh6FPscr8sjHMSGqfNJLcTeFChCf53A8 +E/YJWw4FYF+dmHuTf4sJFv8cbHuNTdv3JlTvLhOEfLfPuCAK3WDzmLVOYYK+ +2nnbaKCQ6am0r8F5TNhUqBndaEQhKal/dHYXMGE7b2knnzGF5ppO3eIoYkJM +Ksc9O+z0Lcj6RikTlvt/uHRi/+nqqs2oZMJemuTvPhMKPbOSzP7QyIQrrZOR +X0wpdH2BfXViExPE3BJShc0oRM8edXduZoKZj7GCLTY/Z6XkQAsTOmwf+f2L +fbLK6ebvT0xQDxCXzDGnkLzKnSCFQSa8PfAq1d6CQgufL7aPkEyo1NANjMJu +jWBqFA4zod1a9NkL7NDeHaP640xQDRk4s8mSQp1J7Uf3/2SCgHEN2zfshDUC +e8+vIkC0p3CboTWFqme7XAI5CCjbJXzRG3uoK9ffdzUBpnapwknYhs9M0ujr +CBgeWBaZwSbdghctBAjgFKlzu2+D+7faK7hXiIAhV/2+OuyduoLKSISAl/aR +OaPYcXx5jlriBJQshKzT24+fV3YXS8oS4F/ZydeETWTlNYrIE6D4kv3lOHZc +3LnuDYoEXDevLF5vi+sRQnycygRkb3l+whY7TsjMc1yDgPH/xGXfYVcuC4WR +NAISXwwtDmEPjvTc7tmB68+v28R5gEIGtefrO/QI+LZZU9UAe+BkgfRLIMDP +3uV6MvZ6pxDtCiMCDGYl455h6xubWxWbEHAgn62zCfuGeN+5LHMC1qTL7mJh +P+csjEu1IECw66DjOjsK9U+FPLlnRYCm3p1nm7D13op8jLXF9bX1YQ82vbhv +LMqOgHb9eB877NiHheyX7QmwkR3upmP3+e/TCHIiINToyq1L2HyuomanDxPg +tbu24+ZK3r7+o95HCFBJnzicvDJ+88Xrrm4E3Ofm0ynHfs5tke5EJ8CC9vva +65U8lugLOwYBHWuaFJpX8nr7W6wIAth5LnJ8WslrLiJNPQmoHdqg1L3SX8XF +P+BNgGxQ+M2hlfx0C+GdJwlwqGw2nFrJjxXbpu2L98fA7HZqJT94YI/6aQJq +Dswwl7B5GcVOyv4E8F9727vqIIV094eekg8k4KKRXzoXNt3AMlIqiIApl+kn +3NgxihuTxYIJiOw3muXDLucfLBU4T8BlQc9L/Ni9i8VNPBcIsLM55iCIzTsU +2rs6FO+HrVt9hbB12ix//Q0jYNq17t2K/w9OTvhv + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.7008834071071219, + 1.3952825507494104`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7008834071071235}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.7008834071071219, + 1.3952825507494104`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7008834071071235}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd0bB3AhlaHMQmRMRLgypvYTQqYkREpc955QlCEphQa8ikIqDYYM +hcxCIYne+EnxoknJfMxj7lFIv+2Ps876rLP293n2PnufdWTpp+yY7GxsbMP4 +Wrn7fdiuVNH6YbdV8cK6DB8S7Z7M1Kab5CFpzwmDFfek6iQqmFQjJb269yu2 +Zbzn4tX6F3kpnKvLxC4ODqtfbdKMPGmC4o+xo99urA3L/Q+Fe8X+9wT7Ratf +yhLtIyLaR8dysEc7my6cq/qCxkJUPPOwJQblXSjj76jntJVpIbbl1AX9gOZu +5F9nG1mCXbM0yhOc24syL+tuLcf+dEkspNy3Hy3/y6ZaiT3JZTI6RxtEg+l5 +8TXYXDGnnbXmSTSkudO5HltaILnRr2oY9cfmXW7EtpGkHk8ajyNXOb3Fdmwi +TU5Ube0k4npgZ9GJHaa4P+JE8xQScbdd7MH+ItahGZg7g7R9qMtT2IzD3l63 +YmZROmeq8zz29EO2RyW+PxF7zLaEv9hr5dT4Z2gstEVxZquAL4kSGfVm/CIU +MrqnEiWBLfPEOUx9nkI2deZmCth6qpGTPlW/UNSGHRN62J463c2jxktoUvh9 +C4E9F3yGk3vLHzSaStsVgB1exWOovHYZbW0N5Q3HTgK9p8eb/yLXPc2t97EZ +WY0m/rmroLjeeLoDO/ftrZ5LkuyAGsiTA9jTQ64X4mPYQW3E33IO+4IKq7TI +lwOOTJhtFzmF+y2UlZ+irQZ52tQ1F+zO1vGa5YzVoOQwKOqLLTNbcXi9CBcY +JDVwXsLO22GToDbPBZ1KdlzZ2G9enF91smotNERcT1vAZtW3dw8b88KdJUqz +5DSJBK14+UNqeEHP4NpcM7ZGhwnw6fOBuuIulWFs74GyNM3t62G0hXNqsx+J +TrM3a+zi5YfYCvUfidiDcgUzEZQAcLqnHkz0x+tDNK1r0RIEhX+izMux2Z+S +shv9BOF7/4OiL9gyWpvtcscEIfq1Vad0AIkOG8eVfOgRgjC/4VtF2C0e/gFi +70Tgm+D3tJFAEv14cuO621pR4AifbxQ8Q6LxsdyMnL2iIJBowzDE5g7sb99Z +Kwots6VzcdgmV+13uJWJwfo/5y6gIBJVZuqwslPF4b7N9NaSsyTKHFwIMgiU +ggcPVy9PnCeRuUPUj4B8Kbj3Ir5LNgTnvxEyzSeloDq3QtYRe0emqoiMszQU +PP34+RX2G7pr6erdm+HQhpDFuxdINDvVc3b4igwYFZ2TdQklkZCPybNSazmI +m1CeUb1MIjKT29PWWw7sGw8RPtjPv7dKTkTKwcIjcyjAPmJ19MqWWjmo4jon +p3kF97ctyO4eTR6ilwzTdl7F9UefTIeKKUB27YPLHpEksj/Oo2bRqwgyxwMn +lq+RCAU50A79UQQpJnXO4jqJVCJSdRniW4DBcen4HWy2DC2j0ANboOBiOVM9 +hkT5P1wOlbzeAiVHWyaZsfh8OuZdkkhXgkMFW7QHb+L+TKw/jdKV4c/irhTV +2yTKOHj323yoMpR84N1/FfsGvbeH84Ey3K6XcP+OzQg/Mybdrgxp7ovZsXdI +JFCdzHbQWAV0KPbGubt4/2hNqlTJb4O+/703+XifRJJyN8OuD6gCV/Ab0+40 +ElVfm1P+za4GS2GMFMtHeD1+OncQsmoQnFvl+Rw75Y2CspGrGjgO3HO4lU4i +ueOVbb8+q4F577E4m0w837xBReLdduCu9orpfEIiKUlpQsZZA3hulxSbF5JI +NSuQdxHRwIbVaRf6ikR0xhWWmg0NHu46Y7KMnSSf8MPtCA2kBB/eD60lEUd6 +YdHbYBrUf7gXGP4an7eUUfuEYhpw/0np/qcef0+T3JKV5bWg87tMYl4Dfr/X +rbY7ce2A0vc/olEriR75K9iWNWuD4OaTJol9JGoNQrpXs/RBqDQp89WGISTr ++tHm6Mld0O78OpFuPISYf8sLpM4B9KeE/5I+P4TExp6vEaMbgZ38Iq2seggF +ahl+T1AxgSalHwsvVg0j+sRSo9DoXggReHG123IY5RsFrEltMYPw+UvqjzOG +Ueac9+u8xH3goFgYE7I0jH7t2fj+TZglNBd40uiMEdTFxjHT624NsuYGxpvb +RpDvplNxl+T3w7sQL2CgUVTg1Vh7O8IW7CqzMs68HEXnf4rPb/M6AF8lDvFr +GowhloWpY8MxOxDZtTd/oXEM6bvE7xk8cBBOJV5dfHtkHLWJJ3u/0bKHZ8pL +WrYT40ji8ZXq7K0OsBgteZM/fgI971GxsuFzhIYToya2GpNIumP6eNCEI/Sq +3xzc2DaJtG7H52X0HAJj+4fboqOmUDLnz+0J9U5gqv+aa0FiGpXvUe+MeOEM +uk666+ZDplGS7jWBpdzDEPvKY9i2axq1fMuK1IpxgdjPj25k6c+gMuuHCqfD +j4Dop4oNCykzaMbnIJsv4yiU2IbE6izPIJapsueksSucEhbhLHCZRdkTX38F +6ByDIzapJx7UziKnR1keR3ndILlNf6RI6icqLbE8xhHlBoWqutp54T+RvmTb +7+jfbrC79LFOXOdPJN9zvPM/L3dQyuW68kB9Dg3wnNj/sN8dNllHu9+NmkOt +N2w8zBzoENq3ime6Yw4lBqfynGmlQ4P0sEapHAtV1/z97bHPA7Q3fK0Q8mSh +DUcgSqvSA16NBMV/e8RCMsINLZuqPSDha/WZt+kspNFsvZGrxgMy/8i1FmWw +kJ2hS86X13i8biJ5JYuFEjcFvbv4Pw/QOzORKJ/DQhJdTzc0fvEAw5LOD+ZF +LKTgKpZ0ZN4DipdVzyrXsJC+22R2xA4GlB3a1af/hYUe35sOsNFhgMrZ089/ +Ygu3z+4W02PA064u3vyvLDS5d74jeye2Wp+69DcW/n6xrWo2YkD/4tThhS4W +Wj8v4Cx4gAENiS5b7/ez0ECs9rpUHwZUeIfXBE2y0I2qC17PHzOg430OXzI7 +hXxod/WDsxmQ8kovhMZBIauc4nV6uQxg+D5lNGBz3yVzKvIZsJzTljvFSaEI +f9vR8mcMKOywXGWwhkIXlBVOlNUxQHjbvtoyHgp53313suQHAz629380F6bQ +vvWkoX8PA1hV52+8x94awcZH62PA6Ej7qwP4v4D0184vHmTA+iLfGCdRCrnb +pE4UjTNg8m9Z07GNFHJaHeBbuMAAg07HBvtNFDILkDidJ8qEc41j8l/kKVSX +GmmRsJEJ4hwGtx0UKGTYPKsQLMGEuuH1jDZsDcV3X42lmUCb7hNvUqSQ+OcQ +42+KTKiqcOwvVqLQmEGXKLc2E775TX2ib6PQTfa0l8cPMuFPfMOtfTQ8f3Xe +JGsHJihfk4kowb7qEuyvdYgJT2xmWiW0KBT8zFbp72Em3NZ8dHYE251YFX+H +zgTL2LblUG0KaTXRGf/6MWG8Kr/3mh6FPscr8sjHMSGqfNJLcTeFChCf53A8 +E/YJWw4FYF+dmHuTf4sJFv8cbHuNTdv3JlTvLhOEfLfPuCAK3WDzmLVOYYK+ +2nnbaKCQ6am0r8F5TNhUqBndaEQhKal/dHYXMGE7b2knnzGF5ppO3eIoYkJM +Ksc9O+z0Lcj6RikTlvt/uHRi/+nqqs2oZMJemuTvPhMKPbOSzP7QyIQrrZOR +X0wpdH2BfXViExPE3BJShc0oRM8edXduZoKZj7GCLTY/Z6XkQAsTOmwf+f2L +fbLK6ebvT0xQDxCXzDGnkLzKnSCFQSa8PfAq1d6CQgufL7aPkEyo1NANjMJu +jWBqFA4zod1a9NkL7NDeHaP640xQDRk4s8mSQp1J7Uf3/2SCgHEN2zfshDUC +e8+vIkC0p3CboTWFqme7XAI5CCjbJXzRG3uoK9ffdzUBpnapwknYhs9M0ujr +CBgeWBaZwSbdghctBAjgFKlzu2+D+7faK7hXiIAhV/2+OuyduoLKSISAl/aR +OaPYcXx5jlriBJQshKzT24+fV3YXS8oS4F/ZydeETWTlNYrIE6D4kv3lOHZc +3LnuDYoEXDevLF5vi+sRQnycygRkb3l+whY7TsjMc1yDgPH/xGXfYVcuC4WR +NAISXwwtDmEPjvTc7tmB68+v28R5gEIGtefrO/QI+LZZU9UAe+BkgfRLIMDP +3uV6MvZ6pxDtCiMCDGYl455h6xubWxWbEHAgn62zCfuGeN+5LHMC1qTL7mJh +P+csjEu1IECw66DjOjsK9U+FPLlnRYCm3p1nm7D13op8jLXF9bX1YQ82vbhv +LMqOgHb9eB877NiHheyX7QmwkR3upmP3+e/TCHIiINToyq1L2HyuomanDxPg +tbu24+ZK3r7+o95HCFBJnzicvDJ+88Xrrm4E3Ofm0ynHfs5tke5EJ8CC9vva +65U8lugLOwYBHWuaFJpX8nr7W6wIAth5LnJ8WslrLiJNPQmoHdqg1L3SX8XF +P+BNgGxQ+M2hlfx0C+GdJwlwqGw2nFrJjxXbpu2L98fA7HZqJT94YI/6aQJq +Dswwl7B5GcVOyv4E8F9727vqIIV094eekg8k4KKRXzoXNt3AMlIqiIApl+kn +3NgxihuTxYIJiOw3muXDLucfLBU4T8BlQc9L/Ni9i8VNPBcIsLM55iCIzTsU +2rs6FO+HrVt9hbB12ix//Q0jYNq17t2K/w9OTvhv + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.7008834071071219, 1.3952825507494104`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7008834071071235}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.7008834071071235}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7008834071071219, 1.3952825507494104`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943558696426563`*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"6bbd5f42-79a8-4f24-9371-4b950fc8eb74"] }, Open ]], Cell[CellGroupData[{ @@ -9538,427 +10823,1213 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918507211663303`*^9, - 3.991850725479061*^9}},ExpressionUUID->"f4c3d53a-1214-a145-beb0-\ -494cdae35e56"], + CellChangeTimes->{{3.9918507211663303`*^9, 3.991850725479061*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b9265795-17b8-4e47-bd29-fee31586537e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.306857490526473`*^-262\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355869828677*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"843bdbf9-e6cf-46cf-b68e-58e422c9775c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"072fb53f-7116-0f41-a298-6891351a3192"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.6010482040429244`*^-273\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 119, 42, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355869837785*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"4dcc13e8-32f7-40e6-9fc7-9086f86e9001"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.9614650948944828`*^-284\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 119, 43, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355869848382*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"0c7123d7-f89d-4b04-ad88-50ac319d04ac"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 119, 44, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994355869861321*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"9c01c2b2-f41c-446b-a5a6-deaca5426cdf"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-\ -87bc9c72594a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VP0XB3BRoSL7PjN22bMNM2OcQwghFEWyJkWyRpFCdupJKZIiiYpk +llJ4IlooUVmjRaWeIlvWVr/7++u+3v/ce8/3nvP5fq9SQLhbEC8PD4/XMh6e +/1/n37Y/UM0pt6irv/Vm5aqNFj0XZQ5ZDqSAurzFgpOyGqBkV4DMwCmQ/W7c +qaBsArEu1/v5BsoA//WN+KFkA6IT0qd+9LPh3PnS4kYld3jX6Bw+298CrJVy +5dOKQWCrOvpmuv8lRFUdMRokHYAf/aZnpvo/gPUy+eU5omnQuqGy/EXZDES+ +F6ecbjgDCu/ufg7Q+QPemVJKRo9LQGKf73X+DXx4dZ6irp9ZDqcMbBuc3QVQ +j6FySV7rGrwqXN88LSKErED59gjBG1DUXbU2Vk0IY48kRujK3gAvYQ3fnzQh +rHw+3TW87ga8Pkb6yxsohE9zYyu17W7A8P5V5hK3hPBXyRNH1/Qb8MV6pI7q +KYyrS6oor3hqYHGq4GbCpbW4KZ626/5EDeSUH+3ilRXFNFUIL/aoBQfjvWKS +KqLIHbSbU91ZCwIP3Nw1dEVR7svX4quBtZD6UW1ok6UoSrjNbboUUQuHlTs+ +5+8VxWPfOlduz66F/aUyf9XrRfFI3c6RV4214FrM0tm0Qwwrz4wFapBZIKJz +PnxnkBjuzJ96J6rKgs6GVHZ4uBge51h4LWiywGFom1n+MTEcdJmw4ZiwwEru +74Y3VWJo6n/93YQjC4wLHXaE/xbDzdI87jHxLJDO/5h1+oI4vrsSmMV+wQIZ +7VupixXiaBk5H1zaxwK5lvSjO2vFMdpkdW/WEAvIU5oHNFrF0Uvs8vbNn1ig +5hjh1/BFHJkaTgvliywwWv6H+tFIAk2qjqvHk9mwOUZqxPCJBIokuji272aD +y+ovbwu6JTBKRUZuXSgb3Mruvvr9WgI3xyjsTQlng8dz765HkxLY2lSVpXmQ +DTt1Ltd7SUrizYS/HZZZbAgd0c9L8ZPETDd1laLrbMjYam/xcl4SH1iJXvry +lQ1y3E453mVS+D57jbrgBBtqxLcuGKyWwpfcNi/V72zoe+lTm0eRwqEQtW6H +n2xQdY1RdrWTwuTxXX+2reJAi1PJyufnpNCKXagfrcmBP7Zznc/MpVFkKMr2 +RiAHTlbEV/2xlcbcB8WtKsEcUF3Jk6nrKo0Hz+h/zw/hgOPDVZbHg6QxemTX +ruBIDhRtUOQ4npDGfd27Lncc4YAZbip4+k4aFz4qPios5EA07ZJve4oMLnmO +jNHaOOBQKjy7KVcGG7WHr/c/4YAy/+HMzjMyGCoX0x3xjAPPezxY3VdlcEJv +WeCZlxzQi1jD97ZTBjtUvTIqX3PgS0VcxXc5WVzkG984NcmBJqFP9AOqsnje +Z2uP9XcOnI1x61rQlcXnV3Nf5M9ywMZKd/E3yqKH0yFFjR8cKHvzwZ4/WBaD +pd+TJXm54C3hPC7PkUULx80y0uJcMEpoSL7YKIuvXRy/K0tyYdWHdVJKj2Rx +WfWSjZY0F+7e5AP1V7KYaPPbW1ueC1Kb7p5cvySLXRIdXgvKXHierGpss0kO +2dOrNOoMuFD5Ja/t8VY5lMww/xpvxIUjm5e8HXzkUHFllT7dhAu6pMG0zZFy +mG4v41hlxoXsO//0exbI4f0PR/q3AResJ3/G7/8oh8v7F94NbuLCIbt8rfvf +5PBUp1jnZicu1FzSHRSfl8OQ0OaDzc5ckNnqR7srII+2B4ZXnnHlwrc7Dxf4 +9OSR3P1afvU2LpxOORlz7qA8auVXDGr7c6FtSFP1W7I8yki7T3kHcOG3cWu3 +RY48Sr8L7coK5MLu/+YMRy7IYwaP2XhfEBfojjum9VrlceNq3yaLEC58kFTf +/0BIAe2nfqbYRHFBOryJJC2tgMzq/wqMorng2Lb92V5FBUzUikglxXDhdnyO +zlojBdwxtvbLyAGi3ndTo57bFTDIcXbG8hAXmsyyi6r9FVC/ijIsHM+F2TwV +h6UQBYSmo1X9hH2sPa6VJyqgiGbrR+/DXDC81hA8WaaAC4Mf5kyOciGY113a +qloBU6upC+8JF++YeJR/SwHT719/l5XEhZXCSur0NgUcvrIs5FkyFxjB9b25 +LxRw7+kJob0pXIho3pL2blABpZfWXuA5xoXBqPSR1HEFRA+xZJVULqztoOT3 +zyugZAD/QA1ha7W7G7R4SCig7UmmphHfo3+srEuMhFIDdolm6VxINnf1lzMj +of8jqbI1mVyw87n43dSKhNFM8qEkwsJJY8fcHUl4fT0zb5JwcWtaxUk/Eibo +u2c3ZXEh8NNL05oQErJoCvsVs7mgxa/Y/jSGhBfqzxYeJnzHoX5sZRYJ1/pu +fayew4Wj+/gTVU+TUO9+VGcMYdsTW4WtLhD3k/ildI+wUO2lEt9KEmaL+rby +5nKh58XE+kQWCS3FxLhWhM/PMFqKGkgYI5I1l0g4QDJry52HJDxXTs/iEtY0 +7Rvp7SKh3/KSiM+Ep7arxM68Iupbtv6G+HEu1MVH8IuOkPAe/140J3yk+N9C +vQkSdio81vYjbHNvlZbjIgmr3rRFHCW8Znhbw15eMs4lTogUEe5edsUxYw0Z +tz26K1RLuEjl+5tyKTIaiNfsuU/YzwbCWxTJaLfFRaWTsEZwLs+wFhndVmpA +H+GJzFd5f4zJWMqo//cVYe51dRV5IGP9ydOlA4QTOqK5ZvZk/KNv8fUlYauJ +ZhuPLWS06LI910ZYUES4P3onGQNrGOy7hJ8b7NiTF0zGv2eqTSoIF2y5+qMm +koxjvVpqJwj7HJjL7kgg4/cN9imRhNUKrBRG08i4lV7s7HL8//P3zw3+k2Q8 +ePZujhZhzuBrC7UiMkbXmTF4CMf/1nxuVU7G64fZPi+I9bQkx/n71ZAxwvr+ +wgXCAvjge+IdMuaN8gjsJnzmmI/k3Q4y2lZn5X8hvqf3laqKvj4yOn0WlbhM +WPnxounsMBl7zOxFPQnXrjrtpT9HRtm0LTl1RL/E6QyPOS6R8YtL5Go/whbO +uokhghRM6Oteu5xwR97jkiskCoadWVNtQfTfaY6EQasGBXk1aBt7if706vVv +GTag4BhlW1gw4S8yv0fkbSnYc17F/0gGF27S7WNpLhRM7zIy5CMc632Wf5sX +BaXaF/OPEfPAV7pe69R+CvZ2R0vFEfPy5H5iw82DFHRrPms2SszTyY9PHJ+l +UHCXut3MdsJkjaBwgQIKUhhA0yTmkV5zjnukiYK5XevMzhDzbN3f+WeijYJt +7CzTaWLenXmWb/R9ScHXa7zD7AkHuu1/BZ8o2FIukTKRSMxDgtLRpBWKOPzM +/uDqBC48Xdt42WyVIu6/d3mLPZEvLuUebVPCilj9hz/yGJFHO57liPrLKOJ8 +SmfctzgiHyjzly21FbH92OW3eUSezXFOtv3QV8Sx0cIZFpF38Xba4yxjRZzp +D/foJPIwLdKPqmyhiHpTTat/RxD93PqkjddVEccVhHy1w7jwILhkvDVWEa/8 +SPo9uIsL9r9pYocTFLGvzPBKM5G/nSd7qMZJivhypQa3jMjnV3cFk8qzFHH0 ++trV3n5Ev6+OEUsrVsRiztm2yzuI/K+1M7VtUcSIvb8/ZBL5v29xOqlNSAlf +e3IfcOnE+kXulvospoSOk6eXCdKI/hodrOKTUcKJ4hHwNOXClaHWPgtlJXyV +Z9c+TuxXb++d0blFVcLmQR+H/3S4sDmNNnDJVwmX6Wp8JJGJ/BVL1k9gKeFo +6rbcq384wJMz96DwthKWtVdSkn9xoJMvxOt2gxKO2Nz+4U7sv6FzbmnTD5Ww +ljyTPUvsz+UDqkPBg0ooEu7jt+IbB6RK2tK38injw1b1Z3GvOPBDW+Strrsy +Hr0Tk3GTxYH5C3LJRl7K6Dj/KF3pJgdm16qp0nyV0cnL1eRkNQcmZmgh1nuV +USfs+dXASg58aAic90pUxnsXR9Q/FnPgyaY64cwryrgztXifbQZxfgn1gQ9z +yvjxMfXyDU8OmFdVl549q4Ld3qU7D8+xYUixqsTmvAoKplb+3UWcr+LPXrs4 +W6KC/9U50zdNsqEuuaLY7ZoKmtwbzRQhzmeG20sLhRtVUP0/v7ojr9mguSL/ +ZPp7FfRmLf852sIGKd+EpFgdVfSyWqMicoIN02IOfh4tqihOKePMkdgwkuvn +EcWvjoYK7ZN7RFlgPxln/4mqgXEFiUYBv2/Ct0CBaO7RdcgvveHU5LEbxP+G +NG9Giyb+9DpEEuerArFn6idqJ7XQr9TR9v7Vq6CQedOFStVB6qhkU4FKBRRq +00TEg3VxzX/BPucHL8MTOUuTmTw9nNeucBK5dQnoCi0n9fv0cYouF/dgeQkI +85XF+Kesx0dvunZeNjwP5GSKuae6AT7ZUpQwFFgAgmret90eG+B1n3qeZzz5 +oMeUvRm30xDfZb9JkdfMg6i3Yq0OPEYYfrbsSk1vLkzO5LrbFxphvktG68Ut +mbBR/1GRva4x0gaYr0KjU+HeDOPXQqcxSnqNtnO6kmC/juHgiyAT1NbnKSR1 +JgBzYlePpyAVr164frwiJhZsVGWchMqoOJByynzRKgq44w+VdpVTUfG0+j+T +RlGgWhc9X19BxUP3qFumVaNguUNXyZ4qKuqe3SwnwR8FLeHp31u5VNRwNRPu +exoJFg2zBfGPqdhK+vjWdlskUN1efPjvGxVXdg6O3j4QAeuSsg+2mJpiuaW+ +kXtJGDQyrqxwpJvi1zGrPQKpYeCy0HSq19wUs7yWy7/YEwYH989Vf7E0xVsT +9Q/LDMOgzdvvvbCjKWrumHpo83gf7KFRHXb4mWJkb5nu0dlQuPb9vfxspim6 +5tBsdvuEgFYQrUlt0BTXFFL47cKC4R9l55/HXptif13x0ejtwTD7LsDkw1tT +XBVY+aNmQzDc88qtuvjRFN9S8p66ywWDm8u7AulxU9Studzv37YbDjHSIgR5 +zDCjmKoSqrEb2kRfKI2rmWGlHfvZ0tQuCLq3J5UbaYZPz1VPqtcGwETYaJxN +jBle/KB3oOhCABwk7QvtizXDstwbq8k5AZB9ONxtMcEMF3sqLdx3B0AtPVbR +PN0M31q/SUkhBcDv28caW4vM8Gey0OPOE/5w6ubF2ZetZlg0Yb3j/WE/aCrt +2TUtScOXbGnL9YI7YdhRyTdWhoaU131JS2PewPMjzPOXHA0DnscVfen0BitX +fucVijSkvelaK3DGGx4to5vKatEwNW1p5pCyN3QElAhaWtDw5rdiB1mrHTCo +GlJzcjcNHUREAx+e9oTZq0sL+nU0PL72+MOxwx7w2cO2NOsuDbP/KfE1DPaA +geXH7T420DCPN+VCjqsHNPjJnTvbTEPdt387D6h7QIqMCf1POw15S7xOabxw +B5HMkMNPXtOwt7fmz6ymO+gE9/IE8dJx5w/biaEvWyBQrUqwyImObrvEDCTP +uUL8Q58QdRc6Pk5HK410VzgZJPaU7UZHP/l/szZFu0LjlUO5T7fR8Z3L9NEn +Tq4goW639o8/HUPt4/eW8rnCI/VPEn6xdOzyX3ApiXIBrXUURfUSOvr4qZUL +NDgDtr1MYl+i46dznA/J55zBY0/6e4tyOsr0dMzJH3SGY1fHy7Zdo2Nm9w5t +tokzvF7XqJbFoePHZ7PdgWwnOKHpqf3tMR3d/7nt/oDlCNNap6nsKTquzJP+ +p+mxAwx0oI34DB3f33P5KVntAM37J7bEzBH13h1WTD/pACfY9pHUn3QUSAly +4ng6gBadp7qej4EWLYkjFuP2EGAfptQqxcA71A00QVl76AneuKbHnIEl8Qan +3qZshAbBOTkTYGBtxQkPm5CNUFZVpnnWkoGUXy2era4bIWLyj+12WwYWkCOf +L1faCEJx3OTXmxlIbhoKPd9sC7bpSgsjAQzsN3QYW7ncFu6U/3o/l8lABhnE +Pc5bA3VDzIJDDgM/brHwmkizhlvvv60pPc7AT9dmHxRFWAOb/NbU4RQD5Xbt +adW3tYbqwubjF88z0OT9rwK77xugNDeNtrGGgc2flnw1nDdAVszavMJuBh7g +Ey/TlLACAfHMivFeBto+vqimscwK0lk8jVYDDExNin1OnbCE1Inpz99eM1Bo +u6VvbpslHNnTY275mYEDlUL1wkcsIcr73Jeviwy8pX3eMfAbgpe1CvHu5hjf +sDHhSRXAnx4B4VZFc2w51ZFEzwAoDZoYclAxR96zdnPPAwA+p9+N81pnjlTD +weIIOYCo9s03Dxma4999FgJxORaQ7XyYfMfWHFd4WNUlxzChfnvvb+Nwcywv +cFEt8WfAzq/1TxojzXHqTZRkkSUDeOJLC61jzDH52meTOiUG2J4PNd56yByH +Zi4c2/aBDi/fLNsXfcwc1Sp7u3SC6DAaoDfEKjDHLayAEOFIGsiHZdzVayae +/zXkTk+pKZxY2m2S02KOvokVv2+nmwLvKVvWfw/MUWGTTTVnnymM3l5xrbTd +HI3mbk78MjOFep7UQrFuc2wsNQ99+JIKXvlJcfOfzHHCnN2rsZoKhQ2HTO6t +ZmKKPO/F7BPGsMbZkyUnzMQNhzSLjscZQ9KwmW6cCBMVapy0r/oZw54Vi6rr +JZlouMC8rWJkDKabYyXKyExMVwIpw1dG0PchaibNgImF+fTIc5pGILlqH8tp +GxMnGzKSlw0ZQPmGxPgpTyYKcpeSYh8YgGHiiQ2nvZm4KXT2+ooaA3Cequ0d +8GeipnK+aFSyAaT3zf0I3MdEbGKZJGkawGLZUav4ZCYGdYxleB1ZD4OM090V +VUwMnP1udDlGD/YcKC+2r2HicE77PMtJD+ZrbgV9q2Xi2R+M4gl1PRBTHlgw +uM3E/l8XOqZe6cImAZLCv81MnJ8uPyxupQuNPRW7unuZeLV9PPqqnA44CN/R +jR0g6tezmTsyrw0DG9vnZYaYeO7SzcCkl9owWz+W6TPMxNQEcOHL0QbdS+tv +fB1lotxGqbDlf7WgcdAyNnecqF+80kt3SAscJLaA/hQTx7vPPDl6Rwt2Zxx4 +ETPHxJXLnI6WRmvBbHN6kfQiE78+9w7d76oFKT8LAut/MlGN5LkuSF8LRIyv +6ez8w0SbTMfsVCEtuBhWP7e0RKxndQixJJrwP8ZwrdQ= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VP0XB3BRoSL7PjN22bMNM2OcQwghFEWyJkWyRpFCdupJKZIiiYpk +llJ4IlooUVmjRaWeIlvWVr/7++u+3v/ce8/3nvP5fq9SQLhbEC8PD4/XMh6e +/1/n37Y/UM0pt6irv/Vm5aqNFj0XZQ5ZDqSAurzFgpOyGqBkV4DMwCmQ/W7c +qaBsArEu1/v5BsoA//WN+KFkA6IT0qd+9LPh3PnS4kYld3jX6Bw+298CrJVy +5dOKQWCrOvpmuv8lRFUdMRokHYAf/aZnpvo/gPUy+eU5omnQuqGy/EXZDES+ +F6ecbjgDCu/ufg7Q+QPemVJKRo9LQGKf73X+DXx4dZ6irp9ZDqcMbBuc3QVQ +j6FySV7rGrwqXN88LSKErED59gjBG1DUXbU2Vk0IY48kRujK3gAvYQ3fnzQh +rHw+3TW87ga8Pkb6yxsohE9zYyu17W7A8P5V5hK3hPBXyRNH1/Qb8MV6pI7q +KYyrS6oor3hqYHGq4GbCpbW4KZ626/5EDeSUH+3ilRXFNFUIL/aoBQfjvWKS +KqLIHbSbU91ZCwIP3Nw1dEVR7svX4quBtZD6UW1ok6UoSrjNbboUUQuHlTs+ +5+8VxWPfOlduz66F/aUyf9XrRfFI3c6RV4214FrM0tm0Qwwrz4wFapBZIKJz +PnxnkBjuzJ96J6rKgs6GVHZ4uBge51h4LWiywGFom1n+MTEcdJmw4ZiwwEru +74Y3VWJo6n/93YQjC4wLHXaE/xbDzdI87jHxLJDO/5h1+oI4vrsSmMV+wQIZ +7VupixXiaBk5H1zaxwK5lvSjO2vFMdpkdW/WEAvIU5oHNFrF0Uvs8vbNn1ig +5hjh1/BFHJkaTgvliywwWv6H+tFIAk2qjqvHk9mwOUZqxPCJBIokuji272aD +y+ovbwu6JTBKRUZuXSgb3Mruvvr9WgI3xyjsTQlng8dz765HkxLY2lSVpXmQ +DTt1Ltd7SUrizYS/HZZZbAgd0c9L8ZPETDd1laLrbMjYam/xcl4SH1iJXvry +lQ1y3E453mVS+D57jbrgBBtqxLcuGKyWwpfcNi/V72zoe+lTm0eRwqEQtW6H +n2xQdY1RdrWTwuTxXX+2reJAi1PJyufnpNCKXagfrcmBP7Zznc/MpVFkKMr2 +RiAHTlbEV/2xlcbcB8WtKsEcUF3Jk6nrKo0Hz+h/zw/hgOPDVZbHg6QxemTX +ruBIDhRtUOQ4npDGfd27Lncc4YAZbip4+k4aFz4qPios5EA07ZJve4oMLnmO +jNHaOOBQKjy7KVcGG7WHr/c/4YAy/+HMzjMyGCoX0x3xjAPPezxY3VdlcEJv +WeCZlxzQi1jD97ZTBjtUvTIqX3PgS0VcxXc5WVzkG984NcmBJqFP9AOqsnje +Z2uP9XcOnI1x61rQlcXnV3Nf5M9ywMZKd/E3yqKH0yFFjR8cKHvzwZ4/WBaD +pd+TJXm54C3hPC7PkUULx80y0uJcMEpoSL7YKIuvXRy/K0tyYdWHdVJKj2Rx +WfWSjZY0F+7e5AP1V7KYaPPbW1ueC1Kb7p5cvySLXRIdXgvKXHierGpss0kO +2dOrNOoMuFD5Ja/t8VY5lMww/xpvxIUjm5e8HXzkUHFllT7dhAu6pMG0zZFy +mG4v41hlxoXsO//0exbI4f0PR/q3AResJ3/G7/8oh8v7F94NbuLCIbt8rfvf +5PBUp1jnZicu1FzSHRSfl8OQ0OaDzc5ckNnqR7srII+2B4ZXnnHlwrc7Dxf4 +9OSR3P1afvU2LpxOORlz7qA8auVXDGr7c6FtSFP1W7I8yki7T3kHcOG3cWu3 +RY48Sr8L7coK5MLu/+YMRy7IYwaP2XhfEBfojjum9VrlceNq3yaLEC58kFTf +/0BIAe2nfqbYRHFBOryJJC2tgMzq/wqMorng2Lb92V5FBUzUikglxXDhdnyO +zlojBdwxtvbLyAGi3ndTo57bFTDIcXbG8hAXmsyyi6r9FVC/ijIsHM+F2TwV +h6UQBYSmo1X9hH2sPa6VJyqgiGbrR+/DXDC81hA8WaaAC4Mf5kyOciGY113a +qloBU6upC+8JF++YeJR/SwHT719/l5XEhZXCSur0NgUcvrIs5FkyFxjB9b25 +LxRw7+kJob0pXIho3pL2blABpZfWXuA5xoXBqPSR1HEFRA+xZJVULqztoOT3 +zyugZAD/QA1ha7W7G7R4SCig7UmmphHfo3+srEuMhFIDdolm6VxINnf1lzMj +of8jqbI1mVyw87n43dSKhNFM8qEkwsJJY8fcHUl4fT0zb5JwcWtaxUk/Eibo +u2c3ZXEh8NNL05oQErJoCvsVs7mgxa/Y/jSGhBfqzxYeJnzHoX5sZRYJ1/pu +fayew4Wj+/gTVU+TUO9+VGcMYdsTW4WtLhD3k/ildI+wUO2lEt9KEmaL+rby +5nKh58XE+kQWCS3FxLhWhM/PMFqKGkgYI5I1l0g4QDJry52HJDxXTs/iEtY0 +7Rvp7SKh3/KSiM+Ep7arxM68Iupbtv6G+HEu1MVH8IuOkPAe/140J3yk+N9C +vQkSdio81vYjbHNvlZbjIgmr3rRFHCW8Znhbw15eMs4lTogUEe5edsUxYw0Z +tz26K1RLuEjl+5tyKTIaiNfsuU/YzwbCWxTJaLfFRaWTsEZwLs+wFhndVmpA +H+GJzFd5f4zJWMqo//cVYe51dRV5IGP9ydOlA4QTOqK5ZvZk/KNv8fUlYauJ +ZhuPLWS06LI910ZYUES4P3onGQNrGOy7hJ8b7NiTF0zGv2eqTSoIF2y5+qMm +koxjvVpqJwj7HJjL7kgg4/cN9imRhNUKrBRG08i4lV7s7HL8//P3zw3+k2Q8 +ePZujhZhzuBrC7UiMkbXmTF4CMf/1nxuVU7G64fZPi+I9bQkx/n71ZAxwvr+ +wgXCAvjge+IdMuaN8gjsJnzmmI/k3Q4y2lZn5X8hvqf3laqKvj4yOn0WlbhM +WPnxounsMBl7zOxFPQnXrjrtpT9HRtm0LTl1RL/E6QyPOS6R8YtL5Go/whbO +uokhghRM6Oteu5xwR97jkiskCoadWVNtQfTfaY6EQasGBXk1aBt7if706vVv +GTag4BhlW1gw4S8yv0fkbSnYc17F/0gGF27S7WNpLhRM7zIy5CMc632Wf5sX +BaXaF/OPEfPAV7pe69R+CvZ2R0vFEfPy5H5iw82DFHRrPms2SszTyY9PHJ+l +UHCXut3MdsJkjaBwgQIKUhhA0yTmkV5zjnukiYK5XevMzhDzbN3f+WeijYJt +7CzTaWLenXmWb/R9ScHXa7zD7AkHuu1/BZ8o2FIukTKRSMxDgtLRpBWKOPzM +/uDqBC48Xdt42WyVIu6/d3mLPZEvLuUebVPCilj9hz/yGJFHO57liPrLKOJ8 +SmfctzgiHyjzly21FbH92OW3eUSezXFOtv3QV8Sx0cIZFpF38Xba4yxjRZzp +D/foJPIwLdKPqmyhiHpTTat/RxD93PqkjddVEccVhHy1w7jwILhkvDVWEa/8 +SPo9uIsL9r9pYocTFLGvzPBKM5G/nSd7qMZJivhypQa3jMjnV3cFk8qzFHH0 ++trV3n5Ev6+OEUsrVsRiztm2yzuI/K+1M7VtUcSIvb8/ZBL5v29xOqlNSAlf +e3IfcOnE+kXulvospoSOk6eXCdKI/hodrOKTUcKJ4hHwNOXClaHWPgtlJXyV +Z9c+TuxXb++d0blFVcLmQR+H/3S4sDmNNnDJVwmX6Wp8JJGJ/BVL1k9gKeFo +6rbcq384wJMz96DwthKWtVdSkn9xoJMvxOt2gxKO2Nz+4U7sv6FzbmnTD5Ww +ljyTPUvsz+UDqkPBg0ooEu7jt+IbB6RK2tK38injw1b1Z3GvOPBDW+Strrsy +Hr0Tk3GTxYH5C3LJRl7K6Dj/KF3pJgdm16qp0nyV0cnL1eRkNQcmZmgh1nuV +USfs+dXASg58aAic90pUxnsXR9Q/FnPgyaY64cwryrgztXifbQZxfgn1gQ9z +yvjxMfXyDU8OmFdVl549q4Ld3qU7D8+xYUixqsTmvAoKplb+3UWcr+LPXrs4 +W6KC/9U50zdNsqEuuaLY7ZoKmtwbzRQhzmeG20sLhRtVUP0/v7ojr9mguSL/ +ZPp7FfRmLf852sIGKd+EpFgdVfSyWqMicoIN02IOfh4tqihOKePMkdgwkuvn +EcWvjoYK7ZN7RFlgPxln/4mqgXEFiUYBv2/Ct0CBaO7RdcgvveHU5LEbxP+G +NG9Giyb+9DpEEuerArFn6idqJ7XQr9TR9v7Vq6CQedOFStVB6qhkU4FKBRRq +00TEg3VxzX/BPucHL8MTOUuTmTw9nNeucBK5dQnoCi0n9fv0cYouF/dgeQkI +85XF+Kesx0dvunZeNjwP5GSKuae6AT7ZUpQwFFgAgmret90eG+B1n3qeZzz5 +oMeUvRm30xDfZb9JkdfMg6i3Yq0OPEYYfrbsSk1vLkzO5LrbFxphvktG68Ut +mbBR/1GRva4x0gaYr0KjU+HeDOPXQqcxSnqNtnO6kmC/juHgiyAT1NbnKSR1 +JgBzYlePpyAVr164frwiJhZsVGWchMqoOJByynzRKgq44w+VdpVTUfG0+j+T +RlGgWhc9X19BxUP3qFumVaNguUNXyZ4qKuqe3SwnwR8FLeHp31u5VNRwNRPu +exoJFg2zBfGPqdhK+vjWdlskUN1efPjvGxVXdg6O3j4QAeuSsg+2mJpiuaW+ +kXtJGDQyrqxwpJvi1zGrPQKpYeCy0HSq19wUs7yWy7/YEwYH989Vf7E0xVsT +9Q/LDMOgzdvvvbCjKWrumHpo83gf7KFRHXb4mWJkb5nu0dlQuPb9vfxspim6 +5tBsdvuEgFYQrUlt0BTXFFL47cKC4R9l55/HXptif13x0ejtwTD7LsDkw1tT +XBVY+aNmQzDc88qtuvjRFN9S8p66ywWDm8u7AulxU9Studzv37YbDjHSIgR5 +zDCjmKoSqrEb2kRfKI2rmWGlHfvZ0tQuCLq3J5UbaYZPz1VPqtcGwETYaJxN +jBle/KB3oOhCABwk7QvtizXDstwbq8k5AZB9ONxtMcEMF3sqLdx3B0AtPVbR +PN0M31q/SUkhBcDv28caW4vM8Gey0OPOE/5w6ubF2ZetZlg0Yb3j/WE/aCrt +2TUtScOXbGnL9YI7YdhRyTdWhoaU131JS2PewPMjzPOXHA0DnscVfen0BitX +fucVijSkvelaK3DGGx4to5vKatEwNW1p5pCyN3QElAhaWtDw5rdiB1mrHTCo +GlJzcjcNHUREAx+e9oTZq0sL+nU0PL72+MOxwx7w2cO2NOsuDbP/KfE1DPaA +geXH7T420DCPN+VCjqsHNPjJnTvbTEPdt387D6h7QIqMCf1POw15S7xOabxw +B5HMkMNPXtOwt7fmz6ymO+gE9/IE8dJx5w/biaEvWyBQrUqwyImObrvEDCTP +uUL8Q58QdRc6Pk5HK410VzgZJPaU7UZHP/l/szZFu0LjlUO5T7fR8Z3L9NEn +Tq4goW639o8/HUPt4/eW8rnCI/VPEn6xdOzyX3ApiXIBrXUURfUSOvr4qZUL +NDgDtr1MYl+i46dznA/J55zBY0/6e4tyOsr0dMzJH3SGY1fHy7Zdo2Nm9w5t +tokzvF7XqJbFoePHZ7PdgWwnOKHpqf3tMR3d/7nt/oDlCNNap6nsKTquzJP+ +p+mxAwx0oI34DB3f33P5KVntAM37J7bEzBH13h1WTD/pACfY9pHUn3QUSAly +4ng6gBadp7qej4EWLYkjFuP2EGAfptQqxcA71A00QVl76AneuKbHnIEl8Qan +3qZshAbBOTkTYGBtxQkPm5CNUFZVpnnWkoGUXy2era4bIWLyj+12WwYWkCOf +L1faCEJx3OTXmxlIbhoKPd9sC7bpSgsjAQzsN3QYW7ncFu6U/3o/l8lABhnE +Pc5bA3VDzIJDDgM/brHwmkizhlvvv60pPc7AT9dmHxRFWAOb/NbU4RQD5Xbt +adW3tYbqwubjF88z0OT9rwK77xugNDeNtrGGgc2flnw1nDdAVszavMJuBh7g +Ey/TlLACAfHMivFeBto+vqimscwK0lk8jVYDDExNin1OnbCE1Inpz99eM1Bo +u6VvbpslHNnTY275mYEDlUL1wkcsIcr73Jeviwy8pX3eMfAbgpe1CvHu5hjf +sDHhSRXAnx4B4VZFc2w51ZFEzwAoDZoYclAxR96zdnPPAwA+p9+N81pnjlTD +weIIOYCo9s03Dxma4999FgJxORaQ7XyYfMfWHFd4WNUlxzChfnvvb+Nwcywv +cFEt8WfAzq/1TxojzXHqTZRkkSUDeOJLC61jzDH52meTOiUG2J4PNd56yByH +Zi4c2/aBDi/fLNsXfcwc1Sp7u3SC6DAaoDfEKjDHLayAEOFIGsiHZdzVayae +/zXkTk+pKZxY2m2S02KOvokVv2+nmwLvKVvWfw/MUWGTTTVnnymM3l5xrbTd +HI3mbk78MjOFep7UQrFuc2wsNQ99+JIKXvlJcfOfzHHCnN2rsZoKhQ2HTO6t +ZmKKPO/F7BPGsMbZkyUnzMQNhzSLjscZQ9KwmW6cCBMVapy0r/oZw54Vi6rr +JZlouMC8rWJkDKabYyXKyExMVwIpw1dG0PchaibNgImF+fTIc5pGILlqH8tp +GxMnGzKSlw0ZQPmGxPgpTyYKcpeSYh8YgGHiiQ2nvZm4KXT2+ooaA3Cequ0d +8GeipnK+aFSyAaT3zf0I3MdEbGKZJGkawGLZUav4ZCYGdYxleB1ZD4OM090V +VUwMnP1udDlGD/YcKC+2r2HicE77PMtJD+ZrbgV9q2Xi2R+M4gl1PRBTHlgw +uM3E/l8XOqZe6cImAZLCv81MnJ8uPyxupQuNPRW7unuZeLV9PPqqnA44CN/R +jR0g6tezmTsyrw0DG9vnZYaYeO7SzcCkl9owWz+W6TPMxNQEcOHL0QbdS+tv +fB1lotxGqbDlf7WgcdAyNnecqF+80kt3SAscJLaA/hQTx7vPPDl6Rwt2Zxx4 +ETPHxJXLnI6WRmvBbHN6kfQiE78+9w7d76oFKT8LAut/MlGN5LkuSF8LRIyv +6ez8w0SbTMfsVCEtuBhWP7e0RKxndQixJJrwP8ZwrdQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08028946764009826}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08028946764009826}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VP0XB3BRoSL7PjN22bMNM2OcQwghFEWyJkWyRpFCdupJKZIiiYpk +llJ4IlooUVmjRaWeIlvWVr/7++u+3v/ce8/3nvP5fq9SQLhbEC8PD4/XMh6e +/1/n37Y/UM0pt6irv/Vm5aqNFj0XZQ5ZDqSAurzFgpOyGqBkV4DMwCmQ/W7c +qaBsArEu1/v5BsoA//WN+KFkA6IT0qd+9LPh3PnS4kYld3jX6Bw+298CrJVy +5dOKQWCrOvpmuv8lRFUdMRokHYAf/aZnpvo/gPUy+eU5omnQuqGy/EXZDES+ +F6ecbjgDCu/ufg7Q+QPemVJKRo9LQGKf73X+DXx4dZ6irp9ZDqcMbBuc3QVQ +j6FySV7rGrwqXN88LSKErED59gjBG1DUXbU2Vk0IY48kRujK3gAvYQ3fnzQh +rHw+3TW87ga8Pkb6yxsohE9zYyu17W7A8P5V5hK3hPBXyRNH1/Qb8MV6pI7q +KYyrS6oor3hqYHGq4GbCpbW4KZ626/5EDeSUH+3ilRXFNFUIL/aoBQfjvWKS +KqLIHbSbU91ZCwIP3Nw1dEVR7svX4quBtZD6UW1ok6UoSrjNbboUUQuHlTs+ +5+8VxWPfOlduz66F/aUyf9XrRfFI3c6RV4214FrM0tm0Qwwrz4wFapBZIKJz +PnxnkBjuzJ96J6rKgs6GVHZ4uBge51h4LWiywGFom1n+MTEcdJmw4ZiwwEru +74Y3VWJo6n/93YQjC4wLHXaE/xbDzdI87jHxLJDO/5h1+oI4vrsSmMV+wQIZ +7VupixXiaBk5H1zaxwK5lvSjO2vFMdpkdW/WEAvIU5oHNFrF0Uvs8vbNn1ig +5hjh1/BFHJkaTgvliywwWv6H+tFIAk2qjqvHk9mwOUZqxPCJBIokuji272aD +y+ovbwu6JTBKRUZuXSgb3Mruvvr9WgI3xyjsTQlng8dz765HkxLY2lSVpXmQ +DTt1Ltd7SUrizYS/HZZZbAgd0c9L8ZPETDd1laLrbMjYam/xcl4SH1iJXvry +lQ1y3E453mVS+D57jbrgBBtqxLcuGKyWwpfcNi/V72zoe+lTm0eRwqEQtW6H +n2xQdY1RdrWTwuTxXX+2reJAi1PJyufnpNCKXagfrcmBP7Zznc/MpVFkKMr2 +RiAHTlbEV/2xlcbcB8WtKsEcUF3Jk6nrKo0Hz+h/zw/hgOPDVZbHg6QxemTX +ruBIDhRtUOQ4npDGfd27Lncc4YAZbip4+k4aFz4qPios5EA07ZJve4oMLnmO +jNHaOOBQKjy7KVcGG7WHr/c/4YAy/+HMzjMyGCoX0x3xjAPPezxY3VdlcEJv +WeCZlxzQi1jD97ZTBjtUvTIqX3PgS0VcxXc5WVzkG984NcmBJqFP9AOqsnje +Z2uP9XcOnI1x61rQlcXnV3Nf5M9ywMZKd/E3yqKH0yFFjR8cKHvzwZ4/WBaD +pd+TJXm54C3hPC7PkUULx80y0uJcMEpoSL7YKIuvXRy/K0tyYdWHdVJKj2Rx +WfWSjZY0F+7e5AP1V7KYaPPbW1ueC1Kb7p5cvySLXRIdXgvKXHierGpss0kO +2dOrNOoMuFD5Ja/t8VY5lMww/xpvxIUjm5e8HXzkUHFllT7dhAu6pMG0zZFy +mG4v41hlxoXsO//0exbI4f0PR/q3AResJ3/G7/8oh8v7F94NbuLCIbt8rfvf +5PBUp1jnZicu1FzSHRSfl8OQ0OaDzc5ckNnqR7srII+2B4ZXnnHlwrc7Dxf4 +9OSR3P1afvU2LpxOORlz7qA8auVXDGr7c6FtSFP1W7I8yki7T3kHcOG3cWu3 +RY48Sr8L7coK5MLu/+YMRy7IYwaP2XhfEBfojjum9VrlceNq3yaLEC58kFTf +/0BIAe2nfqbYRHFBOryJJC2tgMzq/wqMorng2Lb92V5FBUzUikglxXDhdnyO +zlojBdwxtvbLyAGi3ndTo57bFTDIcXbG8hAXmsyyi6r9FVC/ijIsHM+F2TwV +h6UQBYSmo1X9hH2sPa6VJyqgiGbrR+/DXDC81hA8WaaAC4Mf5kyOciGY113a +qloBU6upC+8JF++YeJR/SwHT719/l5XEhZXCSur0NgUcvrIs5FkyFxjB9b25 +LxRw7+kJob0pXIho3pL2blABpZfWXuA5xoXBqPSR1HEFRA+xZJVULqztoOT3 +zyugZAD/QA1ha7W7G7R4SCig7UmmphHfo3+srEuMhFIDdolm6VxINnf1lzMj +of8jqbI1mVyw87n43dSKhNFM8qEkwsJJY8fcHUl4fT0zb5JwcWtaxUk/Eibo +u2c3ZXEh8NNL05oQErJoCvsVs7mgxa/Y/jSGhBfqzxYeJnzHoX5sZRYJ1/pu +fayew4Wj+/gTVU+TUO9+VGcMYdsTW4WtLhD3k/ildI+wUO2lEt9KEmaL+rby +5nKh58XE+kQWCS3FxLhWhM/PMFqKGkgYI5I1l0g4QDJry52HJDxXTs/iEtY0 +7Rvp7SKh3/KSiM+Ep7arxM68Iupbtv6G+HEu1MVH8IuOkPAe/140J3yk+N9C +vQkSdio81vYjbHNvlZbjIgmr3rRFHCW8Znhbw15eMs4lTogUEe5edsUxYw0Z +tz26K1RLuEjl+5tyKTIaiNfsuU/YzwbCWxTJaLfFRaWTsEZwLs+wFhndVmpA +H+GJzFd5f4zJWMqo//cVYe51dRV5IGP9ydOlA4QTOqK5ZvZk/KNv8fUlYauJ +ZhuPLWS06LI910ZYUES4P3onGQNrGOy7hJ8b7NiTF0zGv2eqTSoIF2y5+qMm +koxjvVpqJwj7HJjL7kgg4/cN9imRhNUKrBRG08i4lV7s7HL8//P3zw3+k2Q8 +ePZujhZhzuBrC7UiMkbXmTF4CMf/1nxuVU7G64fZPi+I9bQkx/n71ZAxwvr+ +wgXCAvjge+IdMuaN8gjsJnzmmI/k3Q4y2lZn5X8hvqf3laqKvj4yOn0WlbhM +WPnxounsMBl7zOxFPQnXrjrtpT9HRtm0LTl1RL/E6QyPOS6R8YtL5Go/whbO +uokhghRM6Oteu5xwR97jkiskCoadWVNtQfTfaY6EQasGBXk1aBt7if706vVv +GTag4BhlW1gw4S8yv0fkbSnYc17F/0gGF27S7WNpLhRM7zIy5CMc632Wf5sX +BaXaF/OPEfPAV7pe69R+CvZ2R0vFEfPy5H5iw82DFHRrPms2SszTyY9PHJ+l +UHCXut3MdsJkjaBwgQIKUhhA0yTmkV5zjnukiYK5XevMzhDzbN3f+WeijYJt +7CzTaWLenXmWb/R9ScHXa7zD7AkHuu1/BZ8o2FIukTKRSMxDgtLRpBWKOPzM +/uDqBC48Xdt42WyVIu6/d3mLPZEvLuUebVPCilj9hz/yGJFHO57liPrLKOJ8 +SmfctzgiHyjzly21FbH92OW3eUSezXFOtv3QV8Sx0cIZFpF38Xba4yxjRZzp +D/foJPIwLdKPqmyhiHpTTat/RxD93PqkjddVEccVhHy1w7jwILhkvDVWEa/8 +SPo9uIsL9r9pYocTFLGvzPBKM5G/nSd7qMZJivhypQa3jMjnV3cFk8qzFHH0 ++trV3n5Ev6+OEUsrVsRiztm2yzuI/K+1M7VtUcSIvb8/ZBL5v29xOqlNSAlf +e3IfcOnE+kXulvospoSOk6eXCdKI/hodrOKTUcKJ4hHwNOXClaHWPgtlJXyV +Z9c+TuxXb++d0blFVcLmQR+H/3S4sDmNNnDJVwmX6Wp8JJGJ/BVL1k9gKeFo +6rbcq384wJMz96DwthKWtVdSkn9xoJMvxOt2gxKO2Nz+4U7sv6FzbmnTD5Ww +ljyTPUvsz+UDqkPBg0ooEu7jt+IbB6RK2tK38injw1b1Z3GvOPBDW+Strrsy +Hr0Tk3GTxYH5C3LJRl7K6Dj/KF3pJgdm16qp0nyV0cnL1eRkNQcmZmgh1nuV +USfs+dXASg58aAic90pUxnsXR9Q/FnPgyaY64cwryrgztXifbQZxfgn1gQ9z +yvjxMfXyDU8OmFdVl549q4Ld3qU7D8+xYUixqsTmvAoKplb+3UWcr+LPXrs4 +W6KC/9U50zdNsqEuuaLY7ZoKmtwbzRQhzmeG20sLhRtVUP0/v7ojr9mguSL/ +ZPp7FfRmLf852sIGKd+EpFgdVfSyWqMicoIN02IOfh4tqihOKePMkdgwkuvn +EcWvjoYK7ZN7RFlgPxln/4mqgXEFiUYBv2/Ct0CBaO7RdcgvveHU5LEbxP+G +NG9Giyb+9DpEEuerArFn6idqJ7XQr9TR9v7Vq6CQedOFStVB6qhkU4FKBRRq +00TEg3VxzX/BPucHL8MTOUuTmTw9nNeucBK5dQnoCi0n9fv0cYouF/dgeQkI +85XF+Kesx0dvunZeNjwP5GSKuae6AT7ZUpQwFFgAgmret90eG+B1n3qeZzz5 +oMeUvRm30xDfZb9JkdfMg6i3Yq0OPEYYfrbsSk1vLkzO5LrbFxphvktG68Ut +mbBR/1GRva4x0gaYr0KjU+HeDOPXQqcxSnqNtnO6kmC/juHgiyAT1NbnKSR1 +JgBzYlePpyAVr164frwiJhZsVGWchMqoOJByynzRKgq44w+VdpVTUfG0+j+T +RlGgWhc9X19BxUP3qFumVaNguUNXyZ4qKuqe3SwnwR8FLeHp31u5VNRwNRPu +exoJFg2zBfGPqdhK+vjWdlskUN1efPjvGxVXdg6O3j4QAeuSsg+2mJpiuaW+ +kXtJGDQyrqxwpJvi1zGrPQKpYeCy0HSq19wUs7yWy7/YEwYH989Vf7E0xVsT +9Q/LDMOgzdvvvbCjKWrumHpo83gf7KFRHXb4mWJkb5nu0dlQuPb9vfxspim6 +5tBsdvuEgFYQrUlt0BTXFFL47cKC4R9l55/HXptif13x0ejtwTD7LsDkw1tT +XBVY+aNmQzDc88qtuvjRFN9S8p66ywWDm8u7AulxU9Studzv37YbDjHSIgR5 +zDCjmKoSqrEb2kRfKI2rmWGlHfvZ0tQuCLq3J5UbaYZPz1VPqtcGwETYaJxN +jBle/KB3oOhCABwk7QvtizXDstwbq8k5AZB9ONxtMcEMF3sqLdx3B0AtPVbR +PN0M31q/SUkhBcDv28caW4vM8Gey0OPOE/5w6ubF2ZetZlg0Yb3j/WE/aCrt +2TUtScOXbGnL9YI7YdhRyTdWhoaU131JS2PewPMjzPOXHA0DnscVfen0BitX +fucVijSkvelaK3DGGx4to5vKatEwNW1p5pCyN3QElAhaWtDw5rdiB1mrHTCo +GlJzcjcNHUREAx+e9oTZq0sL+nU0PL72+MOxwx7w2cO2NOsuDbP/KfE1DPaA +geXH7T420DCPN+VCjqsHNPjJnTvbTEPdt387D6h7QIqMCf1POw15S7xOabxw +B5HMkMNPXtOwt7fmz6ymO+gE9/IE8dJx5w/biaEvWyBQrUqwyImObrvEDCTP +uUL8Q58QdRc6Pk5HK410VzgZJPaU7UZHP/l/szZFu0LjlUO5T7fR8Z3L9NEn +Tq4goW639o8/HUPt4/eW8rnCI/VPEn6xdOzyX3ApiXIBrXUURfUSOvr4qZUL +NDgDtr1MYl+i46dznA/J55zBY0/6e4tyOsr0dMzJH3SGY1fHy7Zdo2Nm9w5t +tokzvF7XqJbFoePHZ7PdgWwnOKHpqf3tMR3d/7nt/oDlCNNap6nsKTquzJP+ +p+mxAwx0oI34DB3f33P5KVntAM37J7bEzBH13h1WTD/pACfY9pHUn3QUSAly +4ng6gBadp7qej4EWLYkjFuP2EGAfptQqxcA71A00QVl76AneuKbHnIEl8Qan +3qZshAbBOTkTYGBtxQkPm5CNUFZVpnnWkoGUXy2era4bIWLyj+12WwYWkCOf +L1faCEJx3OTXmxlIbhoKPd9sC7bpSgsjAQzsN3QYW7ncFu6U/3o/l8lABhnE +Pc5bA3VDzIJDDgM/brHwmkizhlvvv60pPc7AT9dmHxRFWAOb/NbU4RQD5Xbt +adW3tYbqwubjF88z0OT9rwK77xugNDeNtrGGgc2flnw1nDdAVszavMJuBh7g +Ey/TlLACAfHMivFeBto+vqimscwK0lk8jVYDDExNin1OnbCE1Inpz99eM1Bo +u6VvbpslHNnTY275mYEDlUL1wkcsIcr73Jeviwy8pX3eMfAbgpe1CvHu5hjf +sDHhSRXAnx4B4VZFc2w51ZFEzwAoDZoYclAxR96zdnPPAwA+p9+N81pnjlTD +weIIOYCo9s03Dxma4999FgJxORaQ7XyYfMfWHFd4WNUlxzChfnvvb+Nwcywv +cFEt8WfAzq/1TxojzXHqTZRkkSUDeOJLC61jzDH52meTOiUG2J4PNd56yByH +Zi4c2/aBDi/fLNsXfcwc1Sp7u3SC6DAaoDfEKjDHLayAEOFIGsiHZdzVayae +/zXkTk+pKZxY2m2S02KOvokVv2+nmwLvKVvWfw/MUWGTTTVnnymM3l5xrbTd +HI3mbk78MjOFep7UQrFuc2wsNQ99+JIKXvlJcfOfzHHCnN2rsZoKhQ2HTO6t +ZmKKPO/F7BPGsMbZkyUnzMQNhzSLjscZQ9KwmW6cCBMVapy0r/oZw54Vi6rr +JZlouMC8rWJkDKabYyXKyExMVwIpw1dG0PchaibNgImF+fTIc5pGILlqH8tp +GxMnGzKSlw0ZQPmGxPgpTyYKcpeSYh8YgGHiiQ2nvZm4KXT2+ooaA3Cequ0d +8GeipnK+aFSyAaT3zf0I3MdEbGKZJGkawGLZUav4ZCYGdYxleB1ZD4OM090V +VUwMnP1udDlGD/YcKC+2r2HicE77PMtJD+ZrbgV9q2Xi2R+M4gl1PRBTHlgw +uM3E/l8XOqZe6cImAZLCv81MnJ8uPyxupQuNPRW7unuZeLV9PPqqnA44CN/R +jR0g6tezmTsyrw0DG9vnZYaYeO7SzcCkl9owWz+W6TPMxNQEcOHL0QbdS+tv +fB1lotxGqbDlf7WgcdAyNnecqF+80kt3SAscJLaA/hQTx7vPPDl6Rwt2Zxx4 +ETPHxJXLnI6WRmvBbHN6kfQiE78+9w7d76oFKT8LAut/MlGN5LkuSF8LRIyv +6ez8w0SbTMfsVCEtuBhWP7e0RKxndQixJJrwP8ZwrdQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08028946764009826}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08028946764009826}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356684062873*^9}, + CellLabel-> + "Out[119]=",ExpressionUUID->"b49ba0ff-1c9e-4f6a-8865-9a340c54f1d2"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"2335a158-7588-4c40-bdb5-\ -53b7ef04b97c"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VP0XB3BRoSL7PjN22bMNM2OcQwghFEWyJkWyRpFCdupJKZIiiYpk +llJ4IlooUVmjRaWeIlvWVr/7++u+3v/ce8/3nvP5fq9SQLhbEC8PD4/XMh6e +/1/n37Y/UM0pt6irv/Vm5aqNFj0XZQ5ZDqSAurzFgpOyGqBkV4DMwCmQ/W7c +qaBsArEu1/v5BsoA//WN+KFkA6IT0qd+9LPh3PnS4kYld3jX6Bw+298CrJVy +5dOKQWCrOvpmuv8lRFUdMRokHYAf/aZnpvo/gPUy+eU5omnQuqGy/EXZDES+ +F6ecbjgDCu/ufg7Q+QPemVJKRo9LQGKf73X+DXx4dZ6irp9ZDqcMbBuc3QVQ +j6FySV7rGrwqXN88LSKErED59gjBG1DUXbU2Vk0IY48kRujK3gAvYQ3fnzQh +rHw+3TW87ga8Pkb6yxsohE9zYyu17W7A8P5V5hK3hPBXyRNH1/Qb8MV6pI7q +KYyrS6oor3hqYHGq4GbCpbW4KZ626/5EDeSUH+3ilRXFNFUIL/aoBQfjvWKS +KqLIHbSbU91ZCwIP3Nw1dEVR7svX4quBtZD6UW1ok6UoSrjNbboUUQuHlTs+ +5+8VxWPfOlduz66F/aUyf9XrRfFI3c6RV4214FrM0tm0Qwwrz4wFapBZIKJz +PnxnkBjuzJ96J6rKgs6GVHZ4uBge51h4LWiywGFom1n+MTEcdJmw4ZiwwEru +74Y3VWJo6n/93YQjC4wLHXaE/xbDzdI87jHxLJDO/5h1+oI4vrsSmMV+wQIZ +7VupixXiaBk5H1zaxwK5lvSjO2vFMdpkdW/WEAvIU5oHNFrF0Uvs8vbNn1ig +5hjh1/BFHJkaTgvliywwWv6H+tFIAk2qjqvHk9mwOUZqxPCJBIokuji272aD +y+ovbwu6JTBKRUZuXSgb3Mruvvr9WgI3xyjsTQlng8dz765HkxLY2lSVpXmQ +DTt1Ltd7SUrizYS/HZZZbAgd0c9L8ZPETDd1laLrbMjYam/xcl4SH1iJXvry +lQ1y3E453mVS+D57jbrgBBtqxLcuGKyWwpfcNi/V72zoe+lTm0eRwqEQtW6H +n2xQdY1RdrWTwuTxXX+2reJAi1PJyufnpNCKXagfrcmBP7Zznc/MpVFkKMr2 +RiAHTlbEV/2xlcbcB8WtKsEcUF3Jk6nrKo0Hz+h/zw/hgOPDVZbHg6QxemTX +ruBIDhRtUOQ4npDGfd27Lncc4YAZbip4+k4aFz4qPios5EA07ZJve4oMLnmO +jNHaOOBQKjy7KVcGG7WHr/c/4YAy/+HMzjMyGCoX0x3xjAPPezxY3VdlcEJv +WeCZlxzQi1jD97ZTBjtUvTIqX3PgS0VcxXc5WVzkG984NcmBJqFP9AOqsnje +Z2uP9XcOnI1x61rQlcXnV3Nf5M9ywMZKd/E3yqKH0yFFjR8cKHvzwZ4/WBaD +pd+TJXm54C3hPC7PkUULx80y0uJcMEpoSL7YKIuvXRy/K0tyYdWHdVJKj2Rx +WfWSjZY0F+7e5AP1V7KYaPPbW1ueC1Kb7p5cvySLXRIdXgvKXHierGpss0kO +2dOrNOoMuFD5Ja/t8VY5lMww/xpvxIUjm5e8HXzkUHFllT7dhAu6pMG0zZFy +mG4v41hlxoXsO//0exbI4f0PR/q3AResJ3/G7/8oh8v7F94NbuLCIbt8rfvf +5PBUp1jnZicu1FzSHRSfl8OQ0OaDzc5ckNnqR7srII+2B4ZXnnHlwrc7Dxf4 +9OSR3P1afvU2LpxOORlz7qA8auVXDGr7c6FtSFP1W7I8yki7T3kHcOG3cWu3 +RY48Sr8L7coK5MLu/+YMRy7IYwaP2XhfEBfojjum9VrlceNq3yaLEC58kFTf +/0BIAe2nfqbYRHFBOryJJC2tgMzq/wqMorng2Lb92V5FBUzUikglxXDhdnyO +zlojBdwxtvbLyAGi3ndTo57bFTDIcXbG8hAXmsyyi6r9FVC/ijIsHM+F2TwV +h6UQBYSmo1X9hH2sPa6VJyqgiGbrR+/DXDC81hA8WaaAC4Mf5kyOciGY113a +qloBU6upC+8JF++YeJR/SwHT719/l5XEhZXCSur0NgUcvrIs5FkyFxjB9b25 +LxRw7+kJob0pXIho3pL2blABpZfWXuA5xoXBqPSR1HEFRA+xZJVULqztoOT3 +zyugZAD/QA1ha7W7G7R4SCig7UmmphHfo3+srEuMhFIDdolm6VxINnf1lzMj +of8jqbI1mVyw87n43dSKhNFM8qEkwsJJY8fcHUl4fT0zb5JwcWtaxUk/Eibo +u2c3ZXEh8NNL05oQErJoCvsVs7mgxa/Y/jSGhBfqzxYeJnzHoX5sZRYJ1/pu +fayew4Wj+/gTVU+TUO9+VGcMYdsTW4WtLhD3k/ildI+wUO2lEt9KEmaL+rby +5nKh58XE+kQWCS3FxLhWhM/PMFqKGkgYI5I1l0g4QDJry52HJDxXTs/iEtY0 +7Rvp7SKh3/KSiM+Ep7arxM68Iupbtv6G+HEu1MVH8IuOkPAe/140J3yk+N9C +vQkSdio81vYjbHNvlZbjIgmr3rRFHCW8Znhbw15eMs4lTogUEe5edsUxYw0Z +tz26K1RLuEjl+5tyKTIaiNfsuU/YzwbCWxTJaLfFRaWTsEZwLs+wFhndVmpA +H+GJzFd5f4zJWMqo//cVYe51dRV5IGP9ydOlA4QTOqK5ZvZk/KNv8fUlYauJ +ZhuPLWS06LI910ZYUES4P3onGQNrGOy7hJ8b7NiTF0zGv2eqTSoIF2y5+qMm +koxjvVpqJwj7HJjL7kgg4/cN9imRhNUKrBRG08i4lV7s7HL8//P3zw3+k2Q8 +ePZujhZhzuBrC7UiMkbXmTF4CMf/1nxuVU7G64fZPi+I9bQkx/n71ZAxwvr+ +wgXCAvjge+IdMuaN8gjsJnzmmI/k3Q4y2lZn5X8hvqf3laqKvj4yOn0WlbhM +WPnxounsMBl7zOxFPQnXrjrtpT9HRtm0LTl1RL/E6QyPOS6R8YtL5Go/whbO +uokhghRM6Oteu5xwR97jkiskCoadWVNtQfTfaY6EQasGBXk1aBt7if706vVv +GTag4BhlW1gw4S8yv0fkbSnYc17F/0gGF27S7WNpLhRM7zIy5CMc632Wf5sX +BaXaF/OPEfPAV7pe69R+CvZ2R0vFEfPy5H5iw82DFHRrPms2SszTyY9PHJ+l +UHCXut3MdsJkjaBwgQIKUhhA0yTmkV5zjnukiYK5XevMzhDzbN3f+WeijYJt +7CzTaWLenXmWb/R9ScHXa7zD7AkHuu1/BZ8o2FIukTKRSMxDgtLRpBWKOPzM +/uDqBC48Xdt42WyVIu6/d3mLPZEvLuUebVPCilj9hz/yGJFHO57liPrLKOJ8 +SmfctzgiHyjzly21FbH92OW3eUSezXFOtv3QV8Sx0cIZFpF38Xba4yxjRZzp +D/foJPIwLdKPqmyhiHpTTat/RxD93PqkjddVEccVhHy1w7jwILhkvDVWEa/8 +SPo9uIsL9r9pYocTFLGvzPBKM5G/nSd7qMZJivhypQa3jMjnV3cFk8qzFHH0 ++trV3n5Ev6+OEUsrVsRiztm2yzuI/K+1M7VtUcSIvb8/ZBL5v29xOqlNSAlf +e3IfcOnE+kXulvospoSOk6eXCdKI/hodrOKTUcKJ4hHwNOXClaHWPgtlJXyV +Z9c+TuxXb++d0blFVcLmQR+H/3S4sDmNNnDJVwmX6Wp8JJGJ/BVL1k9gKeFo +6rbcq384wJMz96DwthKWtVdSkn9xoJMvxOt2gxKO2Nz+4U7sv6FzbmnTD5Ww +ljyTPUvsz+UDqkPBg0ooEu7jt+IbB6RK2tK38injw1b1Z3GvOPBDW+Strrsy +Hr0Tk3GTxYH5C3LJRl7K6Dj/KF3pJgdm16qp0nyV0cnL1eRkNQcmZmgh1nuV +USfs+dXASg58aAic90pUxnsXR9Q/FnPgyaY64cwryrgztXifbQZxfgn1gQ9z +yvjxMfXyDU8OmFdVl549q4Ld3qU7D8+xYUixqsTmvAoKplb+3UWcr+LPXrs4 +W6KC/9U50zdNsqEuuaLY7ZoKmtwbzRQhzmeG20sLhRtVUP0/v7ojr9mguSL/ +ZPp7FfRmLf852sIGKd+EpFgdVfSyWqMicoIN02IOfh4tqihOKePMkdgwkuvn +EcWvjoYK7ZN7RFlgPxln/4mqgXEFiUYBv2/Ct0CBaO7RdcgvveHU5LEbxP+G +NG9Giyb+9DpEEuerArFn6idqJ7XQr9TR9v7Vq6CQedOFStVB6qhkU4FKBRRq +00TEg3VxzX/BPucHL8MTOUuTmTw9nNeucBK5dQnoCi0n9fv0cYouF/dgeQkI +85XF+Kesx0dvunZeNjwP5GSKuae6AT7ZUpQwFFgAgmret90eG+B1n3qeZzz5 +oMeUvRm30xDfZb9JkdfMg6i3Yq0OPEYYfrbsSk1vLkzO5LrbFxphvktG68Ut +mbBR/1GRva4x0gaYr0KjU+HeDOPXQqcxSnqNtnO6kmC/juHgiyAT1NbnKSR1 +JgBzYlePpyAVr164frwiJhZsVGWchMqoOJByynzRKgq44w+VdpVTUfG0+j+T +RlGgWhc9X19BxUP3qFumVaNguUNXyZ4qKuqe3SwnwR8FLeHp31u5VNRwNRPu +exoJFg2zBfGPqdhK+vjWdlskUN1efPjvGxVXdg6O3j4QAeuSsg+2mJpiuaW+ +kXtJGDQyrqxwpJvi1zGrPQKpYeCy0HSq19wUs7yWy7/YEwYH989Vf7E0xVsT +9Q/LDMOgzdvvvbCjKWrumHpo83gf7KFRHXb4mWJkb5nu0dlQuPb9vfxspim6 +5tBsdvuEgFYQrUlt0BTXFFL47cKC4R9l55/HXptif13x0ejtwTD7LsDkw1tT +XBVY+aNmQzDc88qtuvjRFN9S8p66ywWDm8u7AulxU9Studzv37YbDjHSIgR5 +zDCjmKoSqrEb2kRfKI2rmWGlHfvZ0tQuCLq3J5UbaYZPz1VPqtcGwETYaJxN +jBle/KB3oOhCABwk7QvtizXDstwbq8k5AZB9ONxtMcEMF3sqLdx3B0AtPVbR +PN0M31q/SUkhBcDv28caW4vM8Gey0OPOE/5w6ubF2ZetZlg0Yb3j/WE/aCrt +2TUtScOXbGnL9YI7YdhRyTdWhoaU131JS2PewPMjzPOXHA0DnscVfen0BitX +fucVijSkvelaK3DGGx4to5vKatEwNW1p5pCyN3QElAhaWtDw5rdiB1mrHTCo +GlJzcjcNHUREAx+e9oTZq0sL+nU0PL72+MOxwx7w2cO2NOsuDbP/KfE1DPaA +geXH7T420DCPN+VCjqsHNPjJnTvbTEPdt387D6h7QIqMCf1POw15S7xOabxw +B5HMkMNPXtOwt7fmz6ymO+gE9/IE8dJx5w/biaEvWyBQrUqwyImObrvEDCTP +uUL8Q58QdRc6Pk5HK410VzgZJPaU7UZHP/l/szZFu0LjlUO5T7fR8Z3L9NEn +Tq4goW639o8/HUPt4/eW8rnCI/VPEn6xdOzyX3ApiXIBrXUURfUSOvr4qZUL +NDgDtr1MYl+i46dznA/J55zBY0/6e4tyOsr0dMzJH3SGY1fHy7Zdo2Nm9w5t +tokzvF7XqJbFoePHZ7PdgWwnOKHpqf3tMR3d/7nt/oDlCNNap6nsKTquzJP+ +p+mxAwx0oI34DB3f33P5KVntAM37J7bEzBH13h1WTD/pACfY9pHUn3QUSAly +4ng6gBadp7qej4EWLYkjFuP2EGAfptQqxcA71A00QVl76AneuKbHnIEl8Qan +3qZshAbBOTkTYGBtxQkPm5CNUFZVpnnWkoGUXy2era4bIWLyj+12WwYWkCOf +L1faCEJx3OTXmxlIbhoKPd9sC7bpSgsjAQzsN3QYW7ncFu6U/3o/l8lABhnE +Pc5bA3VDzIJDDgM/brHwmkizhlvvv60pPc7AT9dmHxRFWAOb/NbU4RQD5Xbt +adW3tYbqwubjF88z0OT9rwK77xugNDeNtrGGgc2flnw1nDdAVszavMJuBh7g +Ey/TlLACAfHMivFeBto+vqimscwK0lk8jVYDDExNin1OnbCE1Inpz99eM1Bo +u6VvbpslHNnTY275mYEDlUL1wkcsIcr73Jeviwy8pX3eMfAbgpe1CvHu5hjf +sDHhSRXAnx4B4VZFc2w51ZFEzwAoDZoYclAxR96zdnPPAwA+p9+N81pnjlTD +weIIOYCo9s03Dxma4999FgJxORaQ7XyYfMfWHFd4WNUlxzChfnvvb+Nwcywv +cFEt8WfAzq/1TxojzXHqTZRkkSUDeOJLC61jzDH52meTOiUG2J4PNd56yByH +Zi4c2/aBDi/fLNsXfcwc1Sp7u3SC6DAaoDfEKjDHLayAEOFIGsiHZdzVayae +/zXkTk+pKZxY2m2S02KOvokVv2+nmwLvKVvWfw/MUWGTTTVnnymM3l5xrbTd +HI3mbk78MjOFep7UQrFuc2wsNQ99+JIKXvlJcfOfzHHCnN2rsZoKhQ2HTO6t +ZmKKPO/F7BPGsMbZkyUnzMQNhzSLjscZQ9KwmW6cCBMVapy0r/oZw54Vi6rr +JZlouMC8rWJkDKabYyXKyExMVwIpw1dG0PchaibNgImF+fTIc5pGILlqH8tp +GxMnGzKSlw0ZQPmGxPgpTyYKcpeSYh8YgGHiiQ2nvZm4KXT2+ooaA3Cequ0d +8GeipnK+aFSyAaT3zf0I3MdEbGKZJGkawGLZUav4ZCYGdYxleB1ZD4OM090V +VUwMnP1udDlGD/YcKC+2r2HicE77PMtJD+ZrbgV9q2Xi2R+M4gl1PRBTHlgw +uM3E/l8XOqZe6cImAZLCv81MnJ8uPyxupQuNPRW7unuZeLV9PPqqnA44CN/R +jR0g6tezmTsyrw0DG9vnZYaYeO7SzcCkl9owWz+W6TPMxNQEcOHL0QbdS+tv +fB1lotxGqbDlf7WgcdAyNnecqF+80kt3SAscJLaA/hQTx7vPPDl6Rwt2Zxx4 +ETPHxJXLnI6WRmvBbHN6kfQiE78+9w7d76oFKT8LAut/MlGN5LkuSF8LRIyv +6ez8w0SbTMfsVCEtuBhWP7e0RKxndQixJJrwP8ZwrdQ= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VP0XB3BRoSL7PjN22bMNM2OcQwghFEWyJkWyRpFCdupJKZIiiYpk +llJ4IlooUVmjRaWeIlvWVr/7++u+3v/ce8/3nvP5fq9SQLhbEC8PD4/XMh6e +/1/n37Y/UM0pt6irv/Vm5aqNFj0XZQ5ZDqSAurzFgpOyGqBkV4DMwCmQ/W7c +qaBsArEu1/v5BsoA//WN+KFkA6IT0qd+9LPh3PnS4kYld3jX6Bw+298CrJVy +5dOKQWCrOvpmuv8lRFUdMRokHYAf/aZnpvo/gPUy+eU5omnQuqGy/EXZDES+ +F6ecbjgDCu/ufg7Q+QPemVJKRo9LQGKf73X+DXx4dZ6irp9ZDqcMbBuc3QVQ +j6FySV7rGrwqXN88LSKErED59gjBG1DUXbU2Vk0IY48kRujK3gAvYQ3fnzQh +rHw+3TW87ga8Pkb6yxsohE9zYyu17W7A8P5V5hK3hPBXyRNH1/Qb8MV6pI7q +KYyrS6oor3hqYHGq4GbCpbW4KZ626/5EDeSUH+3ilRXFNFUIL/aoBQfjvWKS +KqLIHbSbU91ZCwIP3Nw1dEVR7svX4quBtZD6UW1ok6UoSrjNbboUUQuHlTs+ +5+8VxWPfOlduz66F/aUyf9XrRfFI3c6RV4214FrM0tm0Qwwrz4wFapBZIKJz +PnxnkBjuzJ96J6rKgs6GVHZ4uBge51h4LWiywGFom1n+MTEcdJmw4ZiwwEru +74Y3VWJo6n/93YQjC4wLHXaE/xbDzdI87jHxLJDO/5h1+oI4vrsSmMV+wQIZ +7VupixXiaBk5H1zaxwK5lvSjO2vFMdpkdW/WEAvIU5oHNFrF0Uvs8vbNn1ig +5hjh1/BFHJkaTgvliywwWv6H+tFIAk2qjqvHk9mwOUZqxPCJBIokuji272aD +y+ovbwu6JTBKRUZuXSgb3Mruvvr9WgI3xyjsTQlng8dz765HkxLY2lSVpXmQ +DTt1Ltd7SUrizYS/HZZZbAgd0c9L8ZPETDd1laLrbMjYam/xcl4SH1iJXvry +lQ1y3E453mVS+D57jbrgBBtqxLcuGKyWwpfcNi/V72zoe+lTm0eRwqEQtW6H +n2xQdY1RdrWTwuTxXX+2reJAi1PJyufnpNCKXagfrcmBP7Zznc/MpVFkKMr2 +RiAHTlbEV/2xlcbcB8WtKsEcUF3Jk6nrKo0Hz+h/zw/hgOPDVZbHg6QxemTX +ruBIDhRtUOQ4npDGfd27Lncc4YAZbip4+k4aFz4qPios5EA07ZJve4oMLnmO +jNHaOOBQKjy7KVcGG7WHr/c/4YAy/+HMzjMyGCoX0x3xjAPPezxY3VdlcEJv +WeCZlxzQi1jD97ZTBjtUvTIqX3PgS0VcxXc5WVzkG984NcmBJqFP9AOqsnje +Z2uP9XcOnI1x61rQlcXnV3Nf5M9ywMZKd/E3yqKH0yFFjR8cKHvzwZ4/WBaD +pd+TJXm54C3hPC7PkUULx80y0uJcMEpoSL7YKIuvXRy/K0tyYdWHdVJKj2Rx +WfWSjZY0F+7e5AP1V7KYaPPbW1ueC1Kb7p5cvySLXRIdXgvKXHierGpss0kO +2dOrNOoMuFD5Ja/t8VY5lMww/xpvxIUjm5e8HXzkUHFllT7dhAu6pMG0zZFy +mG4v41hlxoXsO//0exbI4f0PR/q3AResJ3/G7/8oh8v7F94NbuLCIbt8rfvf +5PBUp1jnZicu1FzSHRSfl8OQ0OaDzc5ckNnqR7srII+2B4ZXnnHlwrc7Dxf4 +9OSR3P1afvU2LpxOORlz7qA8auVXDGr7c6FtSFP1W7I8yki7T3kHcOG3cWu3 +RY48Sr8L7coK5MLu/+YMRy7IYwaP2XhfEBfojjum9VrlceNq3yaLEC58kFTf +/0BIAe2nfqbYRHFBOryJJC2tgMzq/wqMorng2Lb92V5FBUzUikglxXDhdnyO +zlojBdwxtvbLyAGi3ndTo57bFTDIcXbG8hAXmsyyi6r9FVC/ijIsHM+F2TwV +h6UQBYSmo1X9hH2sPa6VJyqgiGbrR+/DXDC81hA8WaaAC4Mf5kyOciGY113a +qloBU6upC+8JF++YeJR/SwHT719/l5XEhZXCSur0NgUcvrIs5FkyFxjB9b25 +LxRw7+kJob0pXIho3pL2blABpZfWXuA5xoXBqPSR1HEFRA+xZJVULqztoOT3 +zyugZAD/QA1ha7W7G7R4SCig7UmmphHfo3+srEuMhFIDdolm6VxINnf1lzMj +of8jqbI1mVyw87n43dSKhNFM8qEkwsJJY8fcHUl4fT0zb5JwcWtaxUk/Eibo +u2c3ZXEh8NNL05oQErJoCvsVs7mgxa/Y/jSGhBfqzxYeJnzHoX5sZRYJ1/pu +fayew4Wj+/gTVU+TUO9+VGcMYdsTW4WtLhD3k/ildI+wUO2lEt9KEmaL+rby +5nKh58XE+kQWCS3FxLhWhM/PMFqKGkgYI5I1l0g4QDJry52HJDxXTs/iEtY0 +7Rvp7SKh3/KSiM+Ep7arxM68Iupbtv6G+HEu1MVH8IuOkPAe/140J3yk+N9C +vQkSdio81vYjbHNvlZbjIgmr3rRFHCW8Znhbw15eMs4lTogUEe5edsUxYw0Z +tz26K1RLuEjl+5tyKTIaiNfsuU/YzwbCWxTJaLfFRaWTsEZwLs+wFhndVmpA +H+GJzFd5f4zJWMqo//cVYe51dRV5IGP9ydOlA4QTOqK5ZvZk/KNv8fUlYauJ +ZhuPLWS06LI910ZYUES4P3onGQNrGOy7hJ8b7NiTF0zGv2eqTSoIF2y5+qMm +koxjvVpqJwj7HJjL7kgg4/cN9imRhNUKrBRG08i4lV7s7HL8//P3zw3+k2Q8 +ePZujhZhzuBrC7UiMkbXmTF4CMf/1nxuVU7G64fZPi+I9bQkx/n71ZAxwvr+ +wgXCAvjge+IdMuaN8gjsJnzmmI/k3Q4y2lZn5X8hvqf3laqKvj4yOn0WlbhM +WPnxounsMBl7zOxFPQnXrjrtpT9HRtm0LTl1RL/E6QyPOS6R8YtL5Go/whbO +uokhghRM6Oteu5xwR97jkiskCoadWVNtQfTfaY6EQasGBXk1aBt7if706vVv +GTag4BhlW1gw4S8yv0fkbSnYc17F/0gGF27S7WNpLhRM7zIy5CMc632Wf5sX +BaXaF/OPEfPAV7pe69R+CvZ2R0vFEfPy5H5iw82DFHRrPms2SszTyY9PHJ+l +UHCXut3MdsJkjaBwgQIKUhhA0yTmkV5zjnukiYK5XevMzhDzbN3f+WeijYJt +7CzTaWLenXmWb/R9ScHXa7zD7AkHuu1/BZ8o2FIukTKRSMxDgtLRpBWKOPzM +/uDqBC48Xdt42WyVIu6/d3mLPZEvLuUebVPCilj9hz/yGJFHO57liPrLKOJ8 +SmfctzgiHyjzly21FbH92OW3eUSezXFOtv3QV8Sx0cIZFpF38Xba4yxjRZzp +D/foJPIwLdKPqmyhiHpTTat/RxD93PqkjddVEccVhHy1w7jwILhkvDVWEa/8 +SPo9uIsL9r9pYocTFLGvzPBKM5G/nSd7qMZJivhypQa3jMjnV3cFk8qzFHH0 ++trV3n5Ev6+OEUsrVsRiztm2yzuI/K+1M7VtUcSIvb8/ZBL5v29xOqlNSAlf +e3IfcOnE+kXulvospoSOk6eXCdKI/hodrOKTUcKJ4hHwNOXClaHWPgtlJXyV +Z9c+TuxXb++d0blFVcLmQR+H/3S4sDmNNnDJVwmX6Wp8JJGJ/BVL1k9gKeFo +6rbcq384wJMz96DwthKWtVdSkn9xoJMvxOt2gxKO2Nz+4U7sv6FzbmnTD5Ww +ljyTPUvsz+UDqkPBg0ooEu7jt+IbB6RK2tK38injw1b1Z3GvOPBDW+Strrsy +Hr0Tk3GTxYH5C3LJRl7K6Dj/KF3pJgdm16qp0nyV0cnL1eRkNQcmZmgh1nuV +USfs+dXASg58aAic90pUxnsXR9Q/FnPgyaY64cwryrgztXifbQZxfgn1gQ9z +yvjxMfXyDU8OmFdVl549q4Ld3qU7D8+xYUixqsTmvAoKplb+3UWcr+LPXrs4 +W6KC/9U50zdNsqEuuaLY7ZoKmtwbzRQhzmeG20sLhRtVUP0/v7ojr9mguSL/ +ZPp7FfRmLf852sIGKd+EpFgdVfSyWqMicoIN02IOfh4tqihOKePMkdgwkuvn +EcWvjoYK7ZN7RFlgPxln/4mqgXEFiUYBv2/Ct0CBaO7RdcgvveHU5LEbxP+G +NG9Giyb+9DpEEuerArFn6idqJ7XQr9TR9v7Vq6CQedOFStVB6qhkU4FKBRRq +00TEg3VxzX/BPucHL8MTOUuTmTw9nNeucBK5dQnoCi0n9fv0cYouF/dgeQkI +85XF+Kesx0dvunZeNjwP5GSKuae6AT7ZUpQwFFgAgmret90eG+B1n3qeZzz5 +oMeUvRm30xDfZb9JkdfMg6i3Yq0OPEYYfrbsSk1vLkzO5LrbFxphvktG68Ut +mbBR/1GRva4x0gaYr0KjU+HeDOPXQqcxSnqNtnO6kmC/juHgiyAT1NbnKSR1 +JgBzYlePpyAVr164frwiJhZsVGWchMqoOJByynzRKgq44w+VdpVTUfG0+j+T +RlGgWhc9X19BxUP3qFumVaNguUNXyZ4qKuqe3SwnwR8FLeHp31u5VNRwNRPu +exoJFg2zBfGPqdhK+vjWdlskUN1efPjvGxVXdg6O3j4QAeuSsg+2mJpiuaW+ +kXtJGDQyrqxwpJvi1zGrPQKpYeCy0HSq19wUs7yWy7/YEwYH989Vf7E0xVsT +9Q/LDMOgzdvvvbCjKWrumHpo83gf7KFRHXb4mWJkb5nu0dlQuPb9vfxspim6 +5tBsdvuEgFYQrUlt0BTXFFL47cKC4R9l55/HXptif13x0ejtwTD7LsDkw1tT +XBVY+aNmQzDc88qtuvjRFN9S8p66ywWDm8u7AulxU9Studzv37YbDjHSIgR5 +zDCjmKoSqrEb2kRfKI2rmWGlHfvZ0tQuCLq3J5UbaYZPz1VPqtcGwETYaJxN +jBle/KB3oOhCABwk7QvtizXDstwbq8k5AZB9ONxtMcEMF3sqLdx3B0AtPVbR +PN0M31q/SUkhBcDv28caW4vM8Gey0OPOE/5w6ubF2ZetZlg0Yb3j/WE/aCrt +2TUtScOXbGnL9YI7YdhRyTdWhoaU131JS2PewPMjzPOXHA0DnscVfen0BitX +fucVijSkvelaK3DGGx4to5vKatEwNW1p5pCyN3QElAhaWtDw5rdiB1mrHTCo +GlJzcjcNHUREAx+e9oTZq0sL+nU0PL72+MOxwx7w2cO2NOsuDbP/KfE1DPaA +geXH7T420DCPN+VCjqsHNPjJnTvbTEPdt387D6h7QIqMCf1POw15S7xOabxw +B5HMkMNPXtOwt7fmz6ymO+gE9/IE8dJx5w/biaEvWyBQrUqwyImObrvEDCTP +uUL8Q58QdRc6Pk5HK410VzgZJPaU7UZHP/l/szZFu0LjlUO5T7fR8Z3L9NEn +Tq4goW639o8/HUPt4/eW8rnCI/VPEn6xdOzyX3ApiXIBrXUURfUSOvr4qZUL +NDgDtr1MYl+i46dznA/J55zBY0/6e4tyOsr0dMzJH3SGY1fHy7Zdo2Nm9w5t +tokzvF7XqJbFoePHZ7PdgWwnOKHpqf3tMR3d/7nt/oDlCNNap6nsKTquzJP+ +p+mxAwx0oI34DB3f33P5KVntAM37J7bEzBH13h1WTD/pACfY9pHUn3QUSAly +4ng6gBadp7qej4EWLYkjFuP2EGAfptQqxcA71A00QVl76AneuKbHnIEl8Qan +3qZshAbBOTkTYGBtxQkPm5CNUFZVpnnWkoGUXy2era4bIWLyj+12WwYWkCOf +L1faCEJx3OTXmxlIbhoKPd9sC7bpSgsjAQzsN3QYW7ncFu6U/3o/l8lABhnE +Pc5bA3VDzIJDDgM/brHwmkizhlvvv60pPc7AT9dmHxRFWAOb/NbU4RQD5Xbt +adW3tYbqwubjF88z0OT9rwK77xugNDeNtrGGgc2flnw1nDdAVszavMJuBh7g +Ey/TlLACAfHMivFeBto+vqimscwK0lk8jVYDDExNin1OnbCE1Inpz99eM1Bo +u6VvbpslHNnTY275mYEDlUL1wkcsIcr73Jeviwy8pX3eMfAbgpe1CvHu5hjf +sDHhSRXAnx4B4VZFc2w51ZFEzwAoDZoYclAxR96zdnPPAwA+p9+N81pnjlTD +weIIOYCo9s03Dxma4999FgJxORaQ7XyYfMfWHFd4WNUlxzChfnvvb+Nwcywv +cFEt8WfAzq/1TxojzXHqTZRkkSUDeOJLC61jzDH52meTOiUG2J4PNd56yByH +Zi4c2/aBDi/fLNsXfcwc1Sp7u3SC6DAaoDfEKjDHLayAEOFIGsiHZdzVayae +/zXkTk+pKZxY2m2S02KOvokVv2+nmwLvKVvWfw/MUWGTTTVnnymM3l5xrbTd +HI3mbk78MjOFep7UQrFuc2wsNQ99+JIKXvlJcfOfzHHCnN2rsZoKhQ2HTO6t +ZmKKPO/F7BPGsMbZkyUnzMQNhzSLjscZQ9KwmW6cCBMVapy0r/oZw54Vi6rr +JZlouMC8rWJkDKabYyXKyExMVwIpw1dG0PchaibNgImF+fTIc5pGILlqH8tp +GxMnGzKSlw0ZQPmGxPgpTyYKcpeSYh8YgGHiiQ2nvZm4KXT2+ooaA3Cequ0d +8GeipnK+aFSyAaT3zf0I3MdEbGKZJGkawGLZUav4ZCYGdYxleB1ZD4OM090V +VUwMnP1udDlGD/YcKC+2r2HicE77PMtJD+ZrbgV9q2Xi2R+M4gl1PRBTHlgw +uM3E/l8XOqZe6cImAZLCv81MnJ8uPyxupQuNPRW7unuZeLV9PPqqnA44CN/R +jR0g6tezmTsyrw0DG9vnZYaYeO7SzcCkl9owWz+W6TPMxNQEcOHL0QbdS+tv +fB1lotxGqbDlf7WgcdAyNnecqF+80kt3SAscJLaA/hQTx7vPPDl6Rwt2Zxx4 +ETPHxJXLnI6WRmvBbHN6kfQiE78+9w7d76oFKT8LAut/MlGN5LkuSF8LRIyv +6ez8w0SbTMfsVCEtuBhWP7e0RKxndQixJJrwP8ZwrdQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08028946764009826}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08028946764009826}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VP0XB3BRoSL7PjN22bMNM2OcQwghFEWyJkWyRpFCdupJKZIiiYpk +llJ4IlooUVmjRaWeIlvWVr/7++u+3v/ce8/3nvP5fq9SQLhbEC8PD4/XMh6e +/1/n37Y/UM0pt6irv/Vm5aqNFj0XZQ5ZDqSAurzFgpOyGqBkV4DMwCmQ/W7c +qaBsArEu1/v5BsoA//WN+KFkA6IT0qd+9LPh3PnS4kYld3jX6Bw+298CrJVy +5dOKQWCrOvpmuv8lRFUdMRokHYAf/aZnpvo/gPUy+eU5omnQuqGy/EXZDES+ +F6ecbjgDCu/ufg7Q+QPemVJKRo9LQGKf73X+DXx4dZ6irp9ZDqcMbBuc3QVQ +j6FySV7rGrwqXN88LSKErED59gjBG1DUXbU2Vk0IY48kRujK3gAvYQ3fnzQh +rHw+3TW87ga8Pkb6yxsohE9zYyu17W7A8P5V5hK3hPBXyRNH1/Qb8MV6pI7q +KYyrS6oor3hqYHGq4GbCpbW4KZ626/5EDeSUH+3ilRXFNFUIL/aoBQfjvWKS +KqLIHbSbU91ZCwIP3Nw1dEVR7svX4quBtZD6UW1ok6UoSrjNbboUUQuHlTs+ +5+8VxWPfOlduz66F/aUyf9XrRfFI3c6RV4214FrM0tm0Qwwrz4wFapBZIKJz +PnxnkBjuzJ96J6rKgs6GVHZ4uBge51h4LWiywGFom1n+MTEcdJmw4ZiwwEru +74Y3VWJo6n/93YQjC4wLHXaE/xbDzdI87jHxLJDO/5h1+oI4vrsSmMV+wQIZ +7VupixXiaBk5H1zaxwK5lvSjO2vFMdpkdW/WEAvIU5oHNFrF0Uvs8vbNn1ig +5hjh1/BFHJkaTgvliywwWv6H+tFIAk2qjqvHk9mwOUZqxPCJBIokuji272aD +y+ovbwu6JTBKRUZuXSgb3Mruvvr9WgI3xyjsTQlng8dz765HkxLY2lSVpXmQ +DTt1Ltd7SUrizYS/HZZZbAgd0c9L8ZPETDd1laLrbMjYam/xcl4SH1iJXvry +lQ1y3E453mVS+D57jbrgBBtqxLcuGKyWwpfcNi/V72zoe+lTm0eRwqEQtW6H +n2xQdY1RdrWTwuTxXX+2reJAi1PJyufnpNCKXagfrcmBP7Zznc/MpVFkKMr2 +RiAHTlbEV/2xlcbcB8WtKsEcUF3Jk6nrKo0Hz+h/zw/hgOPDVZbHg6QxemTX +ruBIDhRtUOQ4npDGfd27Lncc4YAZbip4+k4aFz4qPios5EA07ZJve4oMLnmO +jNHaOOBQKjy7KVcGG7WHr/c/4YAy/+HMzjMyGCoX0x3xjAPPezxY3VdlcEJv +WeCZlxzQi1jD97ZTBjtUvTIqX3PgS0VcxXc5WVzkG984NcmBJqFP9AOqsnje +Z2uP9XcOnI1x61rQlcXnV3Nf5M9ywMZKd/E3yqKH0yFFjR8cKHvzwZ4/WBaD +pd+TJXm54C3hPC7PkUULx80y0uJcMEpoSL7YKIuvXRy/K0tyYdWHdVJKj2Rx +WfWSjZY0F+7e5AP1V7KYaPPbW1ueC1Kb7p5cvySLXRIdXgvKXHierGpss0kO +2dOrNOoMuFD5Ja/t8VY5lMww/xpvxIUjm5e8HXzkUHFllT7dhAu6pMG0zZFy +mG4v41hlxoXsO//0exbI4f0PR/q3AResJ3/G7/8oh8v7F94NbuLCIbt8rfvf +5PBUp1jnZicu1FzSHRSfl8OQ0OaDzc5ckNnqR7srII+2B4ZXnnHlwrc7Dxf4 +9OSR3P1afvU2LpxOORlz7qA8auVXDGr7c6FtSFP1W7I8yki7T3kHcOG3cWu3 +RY48Sr8L7coK5MLu/+YMRy7IYwaP2XhfEBfojjum9VrlceNq3yaLEC58kFTf +/0BIAe2nfqbYRHFBOryJJC2tgMzq/wqMorng2Lb92V5FBUzUikglxXDhdnyO +zlojBdwxtvbLyAGi3ndTo57bFTDIcXbG8hAXmsyyi6r9FVC/ijIsHM+F2TwV +h6UQBYSmo1X9hH2sPa6VJyqgiGbrR+/DXDC81hA8WaaAC4Mf5kyOciGY113a +qloBU6upC+8JF++YeJR/SwHT719/l5XEhZXCSur0NgUcvrIs5FkyFxjB9b25 +LxRw7+kJob0pXIho3pL2blABpZfWXuA5xoXBqPSR1HEFRA+xZJVULqztoOT3 +zyugZAD/QA1ha7W7G7R4SCig7UmmphHfo3+srEuMhFIDdolm6VxINnf1lzMj +of8jqbI1mVyw87n43dSKhNFM8qEkwsJJY8fcHUl4fT0zb5JwcWtaxUk/Eibo +u2c3ZXEh8NNL05oQErJoCvsVs7mgxa/Y/jSGhBfqzxYeJnzHoX5sZRYJ1/pu +fayew4Wj+/gTVU+TUO9+VGcMYdsTW4WtLhD3k/ildI+wUO2lEt9KEmaL+rby +5nKh58XE+kQWCS3FxLhWhM/PMFqKGkgYI5I1l0g4QDJry52HJDxXTs/iEtY0 +7Rvp7SKh3/KSiM+Ep7arxM68Iupbtv6G+HEu1MVH8IuOkPAe/140J3yk+N9C +vQkSdio81vYjbHNvlZbjIgmr3rRFHCW8Znhbw15eMs4lTogUEe5edsUxYw0Z +tz26K1RLuEjl+5tyKTIaiNfsuU/YzwbCWxTJaLfFRaWTsEZwLs+wFhndVmpA +H+GJzFd5f4zJWMqo//cVYe51dRV5IGP9ydOlA4QTOqK5ZvZk/KNv8fUlYauJ +ZhuPLWS06LI910ZYUES4P3onGQNrGOy7hJ8b7NiTF0zGv2eqTSoIF2y5+qMm +koxjvVpqJwj7HJjL7kgg4/cN9imRhNUKrBRG08i4lV7s7HL8//P3zw3+k2Q8 +ePZujhZhzuBrC7UiMkbXmTF4CMf/1nxuVU7G64fZPi+I9bQkx/n71ZAxwvr+ +wgXCAvjge+IdMuaN8gjsJnzmmI/k3Q4y2lZn5X8hvqf3laqKvj4yOn0WlbhM +WPnxounsMBl7zOxFPQnXrjrtpT9HRtm0LTl1RL/E6QyPOS6R8YtL5Go/whbO +uokhghRM6Oteu5xwR97jkiskCoadWVNtQfTfaY6EQasGBXk1aBt7if706vVv +GTag4BhlW1gw4S8yv0fkbSnYc17F/0gGF27S7WNpLhRM7zIy5CMc632Wf5sX +BaXaF/OPEfPAV7pe69R+CvZ2R0vFEfPy5H5iw82DFHRrPms2SszTyY9PHJ+l +UHCXut3MdsJkjaBwgQIKUhhA0yTmkV5zjnukiYK5XevMzhDzbN3f+WeijYJt +7CzTaWLenXmWb/R9ScHXa7zD7AkHuu1/BZ8o2FIukTKRSMxDgtLRpBWKOPzM +/uDqBC48Xdt42WyVIu6/d3mLPZEvLuUebVPCilj9hz/yGJFHO57liPrLKOJ8 +SmfctzgiHyjzly21FbH92OW3eUSezXFOtv3QV8Sx0cIZFpF38Xba4yxjRZzp +D/foJPIwLdKPqmyhiHpTTat/RxD93PqkjddVEccVhHy1w7jwILhkvDVWEa/8 +SPo9uIsL9r9pYocTFLGvzPBKM5G/nSd7qMZJivhypQa3jMjnV3cFk8qzFHH0 ++trV3n5Ev6+OEUsrVsRiztm2yzuI/K+1M7VtUcSIvb8/ZBL5v29xOqlNSAlf +e3IfcOnE+kXulvospoSOk6eXCdKI/hodrOKTUcKJ4hHwNOXClaHWPgtlJXyV +Z9c+TuxXb++d0blFVcLmQR+H/3S4sDmNNnDJVwmX6Wp8JJGJ/BVL1k9gKeFo +6rbcq384wJMz96DwthKWtVdSkn9xoJMvxOt2gxKO2Nz+4U7sv6FzbmnTD5Ww +ljyTPUvsz+UDqkPBg0ooEu7jt+IbB6RK2tK38injw1b1Z3GvOPBDW+Strrsy +Hr0Tk3GTxYH5C3LJRl7K6Dj/KF3pJgdm16qp0nyV0cnL1eRkNQcmZmgh1nuV +USfs+dXASg58aAic90pUxnsXR9Q/FnPgyaY64cwryrgztXifbQZxfgn1gQ9z +yvjxMfXyDU8OmFdVl549q4Ld3qU7D8+xYUixqsTmvAoKplb+3UWcr+LPXrs4 +W6KC/9U50zdNsqEuuaLY7ZoKmtwbzRQhzmeG20sLhRtVUP0/v7ojr9mguSL/ +ZPp7FfRmLf852sIGKd+EpFgdVfSyWqMicoIN02IOfh4tqihOKePMkdgwkuvn +EcWvjoYK7ZN7RFlgPxln/4mqgXEFiUYBv2/Ct0CBaO7RdcgvveHU5LEbxP+G +NG9Giyb+9DpEEuerArFn6idqJ7XQr9TR9v7Vq6CQedOFStVB6qhkU4FKBRRq +00TEg3VxzX/BPucHL8MTOUuTmTw9nNeucBK5dQnoCi0n9fv0cYouF/dgeQkI +85XF+Kesx0dvunZeNjwP5GSKuae6AT7ZUpQwFFgAgmret90eG+B1n3qeZzz5 +oMeUvRm30xDfZb9JkdfMg6i3Yq0OPEYYfrbsSk1vLkzO5LrbFxphvktG68Ut +mbBR/1GRva4x0gaYr0KjU+HeDOPXQqcxSnqNtnO6kmC/juHgiyAT1NbnKSR1 +JgBzYlePpyAVr164frwiJhZsVGWchMqoOJByynzRKgq44w+VdpVTUfG0+j+T +RlGgWhc9X19BxUP3qFumVaNguUNXyZ4qKuqe3SwnwR8FLeHp31u5VNRwNRPu +exoJFg2zBfGPqdhK+vjWdlskUN1efPjvGxVXdg6O3j4QAeuSsg+2mJpiuaW+ +kXtJGDQyrqxwpJvi1zGrPQKpYeCy0HSq19wUs7yWy7/YEwYH989Vf7E0xVsT +9Q/LDMOgzdvvvbCjKWrumHpo83gf7KFRHXb4mWJkb5nu0dlQuPb9vfxspim6 +5tBsdvuEgFYQrUlt0BTXFFL47cKC4R9l55/HXptif13x0ejtwTD7LsDkw1tT +XBVY+aNmQzDc88qtuvjRFN9S8p66ywWDm8u7AulxU9Studzv37YbDjHSIgR5 +zDCjmKoSqrEb2kRfKI2rmWGlHfvZ0tQuCLq3J5UbaYZPz1VPqtcGwETYaJxN +jBle/KB3oOhCABwk7QvtizXDstwbq8k5AZB9ONxtMcEMF3sqLdx3B0AtPVbR +PN0M31q/SUkhBcDv28caW4vM8Gey0OPOE/5w6ubF2ZetZlg0Yb3j/WE/aCrt +2TUtScOXbGnL9YI7YdhRyTdWhoaU131JS2PewPMjzPOXHA0DnscVfen0BitX +fucVijSkvelaK3DGGx4to5vKatEwNW1p5pCyN3QElAhaWtDw5rdiB1mrHTCo +GlJzcjcNHUREAx+e9oTZq0sL+nU0PL72+MOxwx7w2cO2NOsuDbP/KfE1DPaA +geXH7T420DCPN+VCjqsHNPjJnTvbTEPdt387D6h7QIqMCf1POw15S7xOabxw +B5HMkMNPXtOwt7fmz6ymO+gE9/IE8dJx5w/biaEvWyBQrUqwyImObrvEDCTP +uUL8Q58QdRc6Pk5HK410VzgZJPaU7UZHP/l/szZFu0LjlUO5T7fR8Z3L9NEn +Tq4goW639o8/HUPt4/eW8rnCI/VPEn6xdOzyX3ApiXIBrXUURfUSOvr4qZUL +NDgDtr1MYl+i46dznA/J55zBY0/6e4tyOsr0dMzJH3SGY1fHy7Zdo2Nm9w5t +tokzvF7XqJbFoePHZ7PdgWwnOKHpqf3tMR3d/7nt/oDlCNNap6nsKTquzJP+ +p+mxAwx0oI34DB3f33P5KVntAM37J7bEzBH13h1WTD/pACfY9pHUn3QUSAly +4ng6gBadp7qej4EWLYkjFuP2EGAfptQqxcA71A00QVl76AneuKbHnIEl8Qan +3qZshAbBOTkTYGBtxQkPm5CNUFZVpnnWkoGUXy2era4bIWLyj+12WwYWkCOf +L1faCEJx3OTXmxlIbhoKPd9sC7bpSgsjAQzsN3QYW7ncFu6U/3o/l8lABhnE +Pc5bA3VDzIJDDgM/brHwmkizhlvvv60pPc7AT9dmHxRFWAOb/NbU4RQD5Xbt +adW3tYbqwubjF88z0OT9rwK77xugNDeNtrGGgc2flnw1nDdAVszavMJuBh7g +Ey/TlLACAfHMivFeBto+vqimscwK0lk8jVYDDExNin1OnbCE1Inpz99eM1Bo +u6VvbpslHNnTY275mYEDlUL1wkcsIcr73Jeviwy8pX3eMfAbgpe1CvHu5hjf +sDHhSRXAnx4B4VZFc2w51ZFEzwAoDZoYclAxR96zdnPPAwA+p9+N81pnjlTD +weIIOYCo9s03Dxma4999FgJxORaQ7XyYfMfWHFd4WNUlxzChfnvvb+Nwcywv +cFEt8WfAzq/1TxojzXHqTZRkkSUDeOJLC61jzDH52meTOiUG2J4PNd56yByH +Zi4c2/aBDi/fLNsXfcwc1Sp7u3SC6DAaoDfEKjDHLayAEOFIGsiHZdzVayae +/zXkTk+pKZxY2m2S02KOvokVv2+nmwLvKVvWfw/MUWGTTTVnnymM3l5xrbTd +HI3mbk78MjOFep7UQrFuc2wsNQ99+JIKXvlJcfOfzHHCnN2rsZoKhQ2HTO6t +ZmKKPO/F7BPGsMbZkyUnzMQNhzSLjscZQ9KwmW6cCBMVapy0r/oZw54Vi6rr +JZlouMC8rWJkDKabYyXKyExMVwIpw1dG0PchaibNgImF+fTIc5pGILlqH8tp +GxMnGzKSlw0ZQPmGxPgpTyYKcpeSYh8YgGHiiQ2nvZm4KXT2+ooaA3Cequ0d +8GeipnK+aFSyAaT3zf0I3MdEbGKZJGkawGLZUav4ZCYGdYxleB1ZD4OM090V +VUwMnP1udDlGD/YcKC+2r2HicE77PMtJD+ZrbgV9q2Xi2R+M4gl1PRBTHlgw +uM3E/l8XOqZe6cImAZLCv81MnJ8uPyxupQuNPRW7unuZeLV9PPqqnA44CN/R +jR0g6tezmTsyrw0DG9vnZYaYeO7SzcCkl9owWz+W6TPMxNQEcOHL0QbdS+tv +fB1lotxGqbDlf7WgcdAyNnecqF+80kt3SAscJLaA/hQTx7vPPDl6Rwt2Zxx4 +ETPHxJXLnI6WRmvBbHN6kfQiE78+9w7d76oFKT8LAut/MlGN5LkuSF8LRIyv +6ez8w0SbTMfsVCEtuBhWP7e0RKxndQixJJrwP8ZwrdQ= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08028946764009826}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08028946764009826}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943566841493483`*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"064e142a-6c7d-45b4-831b-18e75e219957"] +}, Open ]], Cell[CellGroupData[{ @@ -10008,18 +12079,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"01995149-3665-fe4e-b326-b20429031afd"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[121]:=",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"52cff8eb-0c77-c944-a54f-e282b00ce766"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.957670963203737`*^-141\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 45, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943566842113113`*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"b2c984a4-2e3c-46fb-bb04-53f3b091bbf9"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4695857675592938`*^-143\\\", \ +RowBox[{\\\"990359217009531794717859144615427415897\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0373833891840000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 46, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943566842244673`*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"16693c04-d60e-4265-8f15-d3b1148fc496"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.301969539821563`*^-146\\\", \ +RowBox[{\\\"393073573231083169323518294497863141369\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"96\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3746716712960000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 47, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356684234766*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"684d6e94-697d-44c5-acb5-b8dd66cebeca"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 121, 48, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356684243639*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"97c31c04-2cf7-49f6-8bf7-e444cec502c9"], + +Cell[BoxData["9.318533117498196`"], "Output", + CellChangeTimes->{3.994356790165406*^9}, + CellLabel-> + "Out[121]=",ExpressionUUID->"207c53f9-bf35-46cd-99b1-71a329b71bfa"] }, Open ]], Cell[CellGroupData[{ @@ -10086,27 +12214,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507468132763`*^9, - 3.9918507511809216`*^9}},ExpressionUUID->"11b1e372-f457-5a4d-bcee-\ -062a3c04ed96"], + CellChangeTimes->{{3.9918507468132763`*^9, 3.9918507511809216`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cb5a1193-7562-6446-a279-d9f6295d156e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2752497252676706`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 49, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356790218281*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"5912d61e-44e2-4c91-870c-cd87f16b7c6f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566b0ad4-7f4e-b04f-8294-646ce1913fac"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.159612844631474`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 50, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356790228949*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"ebf7ef09-3939-4d3c-b3f9-79611dc878a3"], -Cell[BoxData["0.7273353591556563`"], "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3567835910406837`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 51, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356790237689*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"b1b19b52-b0b4-48fe-8aac-bbd9989852ed"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 122, 52, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943567902486486`*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"42244612-c2a9-405c-b697-4264cb141f6f"], + +Cell[BoxData["0.3635787415527212`"], "Output", + CellChangeTimes->{3.994356802255074*^9}, + CellLabel-> + "Out[122]=",ExpressionUUID->"e4d7e22a-2d8a-410c-b283-b6dd7ad1c300"] }, Open ]], Cell[CellGroupData[{ @@ -10127,8 +12303,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10173,27 +12348,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185075434021*^9, - 3.9918507570104733`*^9}},ExpressionUUID->"8cb4e371-90a5-d347-adec-\ -3382e7679ba8"], + CellChangeTimes->{{3.99185075434021*^9, 3.9918507570104733`*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4cd45900-7eb0-6b4b-830a-a339e8117392"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2752497252676706`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 53, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356802303176*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"319e4bda-83d5-497f-b687-0dd494b074f1"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.159612844631474`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 54, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435680231435*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"c81d8bed-1917-4733-a9b5-464fc92c2ee1"], -Cell[BoxData["3.1005213487548544`"], "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3567835910406837`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 55, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356802323351*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"bc9a16e7-879b-47c5-bfcc-cbfc7bfc5d92"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 123, 56, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356802332403*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"59c9654d-c230-4307-93cf-a4ab9ce3076a"], + +Cell[BoxData["24.493547626099524`"], "Output", + CellChangeTimes->{3.994356813577137*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"90cf632c-e662-47a1-b999-c7678756f4a7"] }, Open ]], Cell[CellGroupData[{ @@ -10214,8 +12437,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10260,27 +12482,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507598219967`*^9, - 3.9918507622107697`*^9}},ExpressionUUID->"732b358a-c98a-0347-8b16-\ -2462b23d6249"], + CellChangeTimes->{{3.9918507598219967`*^9, 3.9918507622107697`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2752497252676706`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 57, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356813632661*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"e8bfac7f-deab-4734-9d31-a5224ac2b9d5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"61220452-df6a-154e-8b5c-fecd0ab287a1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.159612844631474`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 58, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568136425037`*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"953b752e-42f3-4b07-bf73-7c6863e01a15"], -Cell[BoxData["18.198720438459198`"], "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3567835910406837`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 59, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568136514177`*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"8f3d8620-b366-4687-b611-a0c10b5f7765"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 124, 60, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356813660863*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"2bd50491-24f3-4fb3-86ac-6d8ea09c451e"], + +Cell[BoxData["2.9538743094731577`"], "Output", + CellChangeTimes->{3.9943568232738647`*^9}, + CellLabel-> + "Out[124]=",ExpressionUUID->"f9b0002f-1fcb-4897-b646-74b911e75f2b"] }, Open ]], Cell[CellGroupData[{ @@ -10289,19 +12559,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918507652122154`*^9, - 3.9918507685850487`*^9}},ExpressionUUID->"3d20548b-905d-0343-8df1-\ -168ec8f367e1"], + CellChangeTimes->{{3.9918507652122154`*^9, 3.9918507685850487`*^9}}, + CellLabel-> + "In[125]:=",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[BoxData["0.09682709699983048`"], "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[BoxData["0.04274414456300703`"], "Output", + CellChangeTimes->{3.9943568233223658`*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"3db04502-4151-46b1-bd85-62ca5221dc75"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918507716362114`*^9, 3.991850773604473*^9}, - 3.9919245563167305`*^9},ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-\ -e661a25a7ba1"], + 3.9919245563167305`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ @@ -10322,10 +12596,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ir", "*", "Il"}], - RowBox[{"Il", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"601c24ee-3f7b-\ -c74d-891b-10a6d009e34b"], + RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", + CellLabel-> + "In[127]:=",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[BoxData["7.1357426619652635`"], "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[BoxData["8.923544444935626`"], "Output", + CellChangeTimes->{3.994356823348648*^9}, + CellLabel-> + "Out[127]=",ExpressionUUID->"c546558e-00f9-4408-96c7-b6a0d9d44100"] }, Open ]], Cell[CellGroupData[{ @@ -10333,10 +12611,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb1"]]}]], "Input",ExpressionUUID->"05949206-8ee0-5646-\ -bb01-e9142212274d"], + FractionBox["Kb", "Qb1"]]}]], "Input", + CellLabel-> + "In[128]:=",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[BoxData["1.4042291233210182`"], "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[BoxData["2.125655620179171`"], "Output", + CellChangeTimes->{3.994356823362846*^9}, + CellLabel-> + "Out[128]=",ExpressionUUID->"ac99f861-0587-42be-9a70-67d631de7153"] }, Open ]], Cell[CellGroupData[{ @@ -10344,10 +12626,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"25a02cc2-\ -cb9a-bc4b-93f0-a7873f982a23"], + RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[129]:=",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[BoxData["10.02021766245587`"], "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[BoxData["18.968382401296036`"], "Output", + CellChangeTimes->{3.9943568233798323`*^9}, + CellLabel-> + "Out[129]=",ExpressionUUID->"cc12224a-bc1b-4151-a0c6-dd2483f89c9f"] }, Open ]], Cell[CellGroupData[{ @@ -10535,10 +12821,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"df51ca6a-83a1-6340-\ -b13c-0185de64c37f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[130]:=",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[BoxData["0.06461147402889976`"], "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[BoxData["0.00836233705064786`"], "Output", + CellChangeTimes->{3.994356823399871*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"2e920692-c196-432e-945f-d08fcab4e2af"] }, Open ]], Cell[CellGroupData[{ @@ -10550,18 +12840,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"731f0e35-\ -7798-8b45-a769-075ac4b3983f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[131]:=",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], - -Cell[BoxData["3.486503585502317`"], "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[BoxData["9.691279224334622`"], "Output", + CellChangeTimes->{3.99435682358921*^9}, + CellLabel-> + "Out[131]=",ExpressionUUID->"ec83c5bb-0e9f-4ee3-ae92-4e0b044438a7"] }, Open ]], Cell[CellGroupData[{ @@ -10751,10 +13037,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"413c8e7d-149c-5d4a-\ -9ccb-23aebae2e6d5"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[132]:=",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[BoxData["0.01165072070943232`"], "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[BoxData["0.052047036609386615`"], "Output", + CellChangeTimes->{3.9943568236081057`*^9}, + CellLabel-> + "Out[132]=",ExpressionUUID->"1bdae944-c2e0-4107-939f-9512b239f13f"] }, Open ]], Cell[CellGroupData[{ @@ -10766,18 +13056,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"e11d7eb8-\ -00a8-f540-98a0-89164ac4bae9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[133]:=",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], - -Cell[BoxData["8.21047995098231`"], "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[BoxData["3.8846056462253244`"], "Output", + CellChangeTimes->{3.9943568238007307`*^9}, + CellLabel-> + "Out[133]=",ExpressionUUID->"c5131915-61e9-4aab-ba41-d15898ba9d9e"] }, Open ]], Cell[CellGroupData[{ @@ -10868,10 +13154,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-\ -1ee89e798d8f"], + ")"}]}]}]], "Input", + CellLabel-> + "In[134]:=",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[BoxData["0.04702603264830412`"], "Output", + CellChangeTimes->{3.9943568238154297`*^9}, + CellLabel-> + "Out[134]=",ExpressionUUID->"8870690d-5982-4efa-b90e-aeb51931dbff"] }, Open ]], Cell[CellGroupData[{ @@ -10959,10 +13249,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-\ -f30d036fcdd2"], + ")"}]}]}]], "Input", + CellLabel-> + "In[135]:=",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[BoxData["0.9529739673516959`"], "Output", + CellChangeTimes->{3.994356823830365*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"13c48c4c-01cc-4cdd-afb4-e97829221787"] }, Open ]], Cell[CellGroupData[{ @@ -11083,10 +13377,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"46af1283-32d6-\ -7240-acd2-307af56b44db"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[136]:=",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[BoxData["0.04481458490166476`"], "Output", + CellChangeTimes->{3.994356823846848*^9}, + CellLabel-> + "Out[136]=",ExpressionUUID->"255fc7db-a423-48aa-b7b9-e38daa10b062"] }, Open ]], Cell[CellGroupData[{ @@ -11148,27 +13446,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507910247746`*^9},ExpressionUUID->"cd516020-ac7f-224d-b1ff-\ -af0307420662"], + CellChangeTimes->{3.9918507910247746`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b82c1933-5313-1d4c-a858-68be8f118333"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3581177145258355`*^-196\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 61, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356823868273*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"760583e6-8cff-4e5b-ac10-d0c843f679fe"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.030259800182519`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 62, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356823878446*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"8009f176-32bd-4adb-8fb6-8ef5238f9f64"], -Cell[BoxData["3.486503585502321`"], "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6775317683263727`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 63, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356823887052*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"dc3c1f65-0654-4015-9c86-8b22a1097f94"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 137, 64, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994356823895893*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"a655ae8e-d933-475a-8e73-237f7f1636b0"], + +Cell[BoxData["9.691279224334616`"], "Output", + CellChangeTimes->{3.994356832083252*^9}, + CellLabel-> + "Out[137]=",ExpressionUUID->"bd125d5e-714e-48ff-b2eb-0a4a2331c629"] }, Open ]], Cell[CellGroupData[{ @@ -11230,27 +13576,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507936164455`*^9},ExpressionUUID->"a9d0e817-a1c8-6546-a901-\ -34313c6ec04d"], + CellChangeTimes->{3.9918507936164455`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3581177145258355`*^-196\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 65, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435683213828*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"265c36b3-093d-49bb-9c94-8309d6f1193d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56712e4d-1aa7-524a-8254-bcfd8978eea0"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.030259800182519`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 66, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568321471767`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"0aa93378-634d-453c-9498-4e494794a5b4"], -Cell[BoxData["8.210479950982325`"], "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6775317683263727`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 67, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568321568327`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"a3d32615-1967-4eb1-8650-1a9c59e5cc32"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 138, 68, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943568321653852`*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"a8159cc4-cd5b-4d0f-a9c5-a25e91032326"], + +Cell[BoxData["3.8846056462253227`"], "Output", + CellChangeTimes->{3.994356840395846*^9}, + CellLabel-> + "Out[138]=",ExpressionUUID->"c098238a-4640-43f6-a063-6394f33b5f70"] }, Open ]], Cell[CellGroupData[{ @@ -11308,489 +13702,388 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507961174965`*^9},ExpressionUUID->"f68960b0-cff6-3245-b906-\ -ad38cf07d634"], + CellChangeTimes->{3.9918507961174965`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9c6ce535-b42f-3c43-a89e-eda48c04121e"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-\ -8b4ad9ffca61"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VdsbB3CEyFDIlEvmIkrnUMhtveYMoaiQxHHOJpWZhKsJDUpISRJF +QoZMEbm3hOsn15QoRdgcM5nPUeq3/LGf/Xyed+/vetdeey0Fmu9hBhcHB8cg +vtbu/i07t1W0texPko2M3RpLov3TWTo0k3zUITryds396XuSlE1eo3Ekx5DH +tqP/xytIrUca+UrBCtjFoRfe8Zg0o5cey7OK2NcbpN5cyGtHN86lfFHGftXm +/+gn5SMKWuWnbMMe72mKOF/9CWltslhUw94yrHR8yfgr0ms9qqKJbTUToRfY +/A1xnqTWamH//XNcIDRvAL0c7Xuvjd11STL8pQ+JLj9wMtLDnuY1GV+gDKMD +zzJV9mPz3vRzoi4zUbdZTbAxtpxIWqN/9Sj6VJ5NscC2kVnKnjaeRAJC43NH +sIkMRQlNvmn0LsZkyQX7gopt9OnmGcQ/70vQsT9Jdu4OyptFBT/0bwVh0529 +T925OYd87L4Y/4X9/SHH4xKfeeTNZ+MZg82nqLlplrKIjh3IX0jBTqK/M98k +voS8iu67ZmHLP3O6sGt5CUnoOukUYetqxEyfrWYh1mNHtQZsrz3fmseNf6Jj +CSd3sLEXQoO5N6iuoo6HP37w3iTRxWoBAzW+X8h9l5+eOPZ90H3u2fwb1YYO +r1Cw6U8bTQLyOEEiSex+IHZew53+SzJcYFQY0xqF/X3ENSLhJhfQJroD72FH +qC+WvvBZBwksyXXV2ElFCkozFB64mKRiwH+LRD1tk3//yuQBg56MHlls+bkK +Z2FxXtgszsmkYOdr2yRqLvOC2a4gY1fsuldhnGeq+YDpBdJV2IvvPnwbNRaE +0kCX3TFxJBK1FtwU/rcgzHrtnsvE1uo0ASE9IWCVSVBrsb2HyjN27xSGBwVS +Ohy3SeTH1az1p+AmkNm6Xf8y9rBi4Wz0kggM969YPIrH34do4m+lioLDzGPB +Omyu50wFKX9R+PJfsO04tjx16+G8CVG4uy7/iG4CiZyN40ta+sUgh/MmvQe7 +1SMgUPK9OEgWr97ac4dEfc/iYt34JEDjlp8DHXtyIi8z11QC5N2pqYnYG4LI +D/veSEBbZknud2yTKAdtt3JJUJ3/2lSSRKKqrD2LOenS4HpDQd72HomyhldC +9INkQft7i9poCokOHLnaF1ggC3ItwYMKD3B+nZhZAVMWlActBFywtbM0xOWd +5CDHNKqgHbuO5lrKs38rVJnc0q5NJdHcTP+50Svy4Mh93LYyjURiZ03KSg8q +QulR02bWYxIxszZ42XkrgqX35nh4QqLKr20yUzGKECXtW3cN28X6xBXVN4ow +5tUZuSUT97cj5HAKRQk0Kqr1jbPw+OPPvkdKKsPnsYX23GwSOXgKaFoOqIBz +U/e9989JhEKOUI6tqsCT5KTarfkkUo9O30uXVgVW1YRzEDZHJtUo8pAqzFSf +a5crIFFB3/FjJW9VgV3s0xVaiPfn0fxLW55sg7uj24wNi3F/Jge7xmlqsCKs +806pgkSZ9slfliPVAH0sux6NHUcb6OdOVYPb5w/WjGDTLwZPyH1QA3X3ntMF +lSQSeZ3GYW+sDiYtPcw/q/D/Q51Wr1baAcPaZo6BNSSSUbx9IXZIA3bV7j2g +VUei1zcW1NhcmhD0IXl3LrbLvFMnoaAJIcVcDxXrSfSoTlnNyFUTxs6LLEg0 +kEjRs6qD1a0JP1XfFvM04vnmD6sQ73eCzeCk14/3JJKVkSPknbSg27Nv3ryT +RBpPgwR/IAqsuI78IJgkotGvLGraUODPEP4/lrDvKyX2ublQ4Fq3SGH0CInW +PSl60RBKgb6b09uyR/F+ezTukFhMgYFj1wInx/F5et8tTU2JCqcd233jZvD6 +xlrvdOTVhoJ0K/XtbBI9DlC2K2/WgWbRu4plQkOoLQTtjXqqB+bPwjmCYQgp +uH60OXHmT6ir0I4uDhtCjN8vC2XPAyj5e6UWVA4hyYnK9ZI0IxB51WTnyz2M +gqgGXxPVTcCsu37ghP0wok39bBQbNwX90x01GTnDqMAocH16qzm0TTqn7xJm +oqwF77f5SRaQ7XW9LyeYiViGUv/VXbCC3aY8BokzTNTLsW52wP0gxJ5YMHXz +H0E+f/jGX1KyhbfeScEl8yOo8FTjm7vRduBVn8DwiB1FYfPSyztOHQLxHYsR +pOIYWrQ0O/rvycOwssk1eGPHGNI7nmA4fMgeqIup/3O6Po46pNO866gO4ErG +9NzcP4G2ZF95nbP9CHRJTV7ZLTyJKvvVrW2EjkKU8/GW2J5JJNf53TNk6ijM +tOikpOVPIerdhPzM/mOQ/tZFRSt1GqVxz+9MfOcICxt6465emUEvDXf1RL9y +gjsb81zLTb6j+3tviPzMcwb6stRrrqbvqPXL0xjqzePgnNwopmU5i8oPPlT2 +u+gCroZjVt2fZtHsWXsOH/oJ6H/roNTpNocWzdS8po1dwWAaeGRH51DO1GdW +4J6TMHV2xyyKmEeOj596nBB0g4Ibj83/x7uASkusTq676gaLRuF2Sg8XkJ5M +B/s62w1C1N+ppaksIqV+z572U+6Q4ifka5u7iIYETts+JN2BLv40BVGXUFuc +jYf5ERoobYWs2YIllBSaLhDcRoP+gCvP8tSX0eu/f7M9LDwgVfwAKZO6jDa6 +wFVqlQcE21+bfcBeRnpu0znR2nR4/j8R9X32LJSd8j3QZg8dhMjzL30cWGjz +h7n9krp06FfQCnp8hIWmTZc7c/bR4WOw52VuRxY+Xzg4m43o0JunMfjGhYWE +l0WcRA/Rwf/uuJ8owUJDt3T408/SQf/S9kGJUBaKq444VZlNh2qD5/b3Uljo +LCVZLzSHDvKUAZnbD1jIOreYXzePDtPd7kJXU1loQzIzt6KADopRLqeD0lgo +OsBu/GUZHQSk5gRNH7NQhJry6fJaOoiHcZfX5LCQd/L7MyV9dPjHVlVcoIKF +LISZBgH9dPhcv+/BKPb2aA4hyiAdjuVWG9ZXshAzQKegeJgOmeXqy+FVLORu +kz71YpIOnaryS301LOTIE+hTtEKHB41dkuF1LGQeuMUvX4IB76yab29oZ6Ha +9BjLRCkGXAtXYXzFNmieUw7dwoBU89M7CzpYSEvl/WdjOQb4unWkWnWykHR3 +uPEXFQbQUsu/hHez0IR+r8QGHQY4DM3U5Pay0G2ujBpPewZcDeuK1RvD898l +eP/gEQbwXboQMIYddTw0gHqMAQ1xlmb3x1kotMxu229nnB9xsWxuAvdPcCbc +ozGgWXhT9oNpFqI20ej1/gwwnO8qfTnPQt0JKgJK8Qxw/3hAX26VhQqRkNdo +AgMYhh5cT7CjphbqCu4w4P0/Rl3Kv1iIYlEXqZvMgLmCloxtv/H6cXjMHXzE +gKxjyTUKnGxk5pvxOTSfAU3z91ZGuNlIVvbanv2FDOjarufnwsNGC02+d9a9 +YECRaclMK/YTVXQwrpQBaZ/KBcp42Wi1t/dNZhUDXqyOlPnxsVGZtUxOSyMD +SK+J0moBNopd4eJJamJAgPTCK3lBNqLljLs7NTMgJkOhMQp7E3eVzFArA1ZX +Y35aCLHRmWrH2+wuBkhNNNU2CrORkvq9EOVhBtQmX3yRLMJGK91/fRhjMkD8 +erLmFHZbNEOraJQBJYddiw1F2ShyQHtcb5IBco+ym0ewe+5/OGE7z4DkuV7b +7ZvZKHG9iGkYJwH0c4nnwiTY6PVc7/GgdQR81NAgGrFHevMCfHgI4G9M/ENc +ko0MykwyaPwEjDwj+vOwmW6hPyxFCEhUfvT2Xyncv7WpqKkYARznRCYFpNlo +315RNSROQGV0aq8NdrxQ/lGqNAFVXBni7Wv1qm/FMgoEXl+d7oYtbEQ8zW8U +VyKgeIeqLqcMfj7+/LeNKgSsWMef1MdmEmJC3GoEfOK7xpm7Vhcz95rUIqD8 +q0r8uT/YqOqX2AUmhYCwoZ+KOdjDY/13+7UJqG34N7wbW/9N2LtOXQLiP65G +UmTZaOhMoVwNEKD2n3vTZ2xhx3CdCiMC9HOsYjnk2EjP+IB1sQmu97wWUcWO +kx48//QAAdlHeX3PYldyF8WnWxKQqthoehubnAl/lmJNgPmBoYEibN0G8Y+3 +7AhoGuLynsKmFQ9OXD1MgP3i7JENW9no1sMirssOBKy/s3m9KvZggIVWiCMB +7RPtlU7YQq4S5n7OBDQ4ubzyx9a1IE94uxBQUcWOvLb2/ta/Yl3dCOj4ZedU +gl25wfKJI42AxsLVs/VreYsSrw7TCSAmnph3r+UNkK3WBAF2YvuYI2t5zS+Y +Zl4ERI++sVjGplX8tQreBDjH7wrgkcf5Tyw37ztDwPU7l0+KYlfektyh40OA +Ul+5iBz2YOiQ4S4/PP9/6q9txxakFzuqBRDQOV5Ytxt7r22kr1IQAQIhPvV6 +2DR9qxjZEAIWejhjAfumilSaZCgBWUuEuBn2y03DpSJhBGTwP6RbYg/8KG4S +iCBguCI99OBa/kjkAE8kAa18/odssfd0WLF+XyDAwHPjzJr/DzwqzWA= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Hk4VdsbB3CEyFDIlEvmIkrnUMhtveYMoaiQxHHOJpWZhKsJDUpISRJF +QoZMEbm3hOsn15QoRdgcM5nPUeq3/LGf/Xyed+/vetdeey0Fmu9hBhcHB8cg +vtbu/i07t1W0texPko2M3RpLov3TWTo0k3zUITryds396XuSlE1eo3Ekx5DH +tqP/xytIrUca+UrBCtjFoRfe8Zg0o5cey7OK2NcbpN5cyGtHN86lfFHGftXm +/+gn5SMKWuWnbMMe72mKOF/9CWltslhUw94yrHR8yfgr0ms9qqKJbTUToRfY +/A1xnqTWamH//XNcIDRvAL0c7Xuvjd11STL8pQ+JLj9wMtLDnuY1GV+gDKMD +zzJV9mPz3vRzoi4zUbdZTbAxtpxIWqN/9Sj6VJ5NscC2kVnKnjaeRAJC43NH +sIkMRQlNvmn0LsZkyQX7gopt9OnmGcQ/70vQsT9Jdu4OyptFBT/0bwVh0529 +T925OYd87L4Y/4X9/SHH4xKfeeTNZ+MZg82nqLlplrKIjh3IX0jBTqK/M98k +voS8iu67ZmHLP3O6sGt5CUnoOukUYetqxEyfrWYh1mNHtQZsrz3fmseNf6Jj +CSd3sLEXQoO5N6iuoo6HP37w3iTRxWoBAzW+X8h9l5+eOPZ90H3u2fwb1YYO +r1Cw6U8bTQLyOEEiSex+IHZew53+SzJcYFQY0xqF/X3ENSLhJhfQJroD72FH +qC+WvvBZBwksyXXV2ElFCkozFB64mKRiwH+LRD1tk3//yuQBg56MHlls+bkK +Z2FxXtgszsmkYOdr2yRqLvOC2a4gY1fsuldhnGeq+YDpBdJV2IvvPnwbNRaE +0kCX3TFxJBK1FtwU/rcgzHrtnsvE1uo0ASE9IWCVSVBrsb2HyjN27xSGBwVS +Ohy3SeTH1az1p+AmkNm6Xf8y9rBi4Wz0kggM969YPIrH34do4m+lioLDzGPB +Omyu50wFKX9R+PJfsO04tjx16+G8CVG4uy7/iG4CiZyN40ta+sUgh/MmvQe7 +1SMgUPK9OEgWr97ac4dEfc/iYt34JEDjlp8DHXtyIi8z11QC5N2pqYnYG4LI +D/veSEBbZknud2yTKAdtt3JJUJ3/2lSSRKKqrD2LOenS4HpDQd72HomyhldC +9INkQft7i9poCokOHLnaF1ggC3ItwYMKD3B+nZhZAVMWlActBFywtbM0xOWd +5CDHNKqgHbuO5lrKs38rVJnc0q5NJdHcTP+50Svy4Mh93LYyjURiZ03KSg8q +QulR02bWYxIxszZ42XkrgqX35nh4QqLKr20yUzGKECXtW3cN28X6xBXVN4ow +5tUZuSUT97cj5HAKRQk0Kqr1jbPw+OPPvkdKKsPnsYX23GwSOXgKaFoOqIBz +U/e9989JhEKOUI6tqsCT5KTarfkkUo9O30uXVgVW1YRzEDZHJtUo8pAqzFSf +a5crIFFB3/FjJW9VgV3s0xVaiPfn0fxLW55sg7uj24wNi3F/Jge7xmlqsCKs +806pgkSZ9slfliPVAH0sux6NHUcb6OdOVYPb5w/WjGDTLwZPyH1QA3X3ntMF +lSQSeZ3GYW+sDiYtPcw/q/D/Q51Wr1baAcPaZo6BNSSSUbx9IXZIA3bV7j2g +VUei1zcW1NhcmhD0IXl3LrbLvFMnoaAJIcVcDxXrSfSoTlnNyFUTxs6LLEg0 +kEjRs6qD1a0JP1XfFvM04vnmD6sQ73eCzeCk14/3JJKVkSPknbSg27Nv3ryT +RBpPgwR/IAqsuI78IJgkotGvLGraUODPEP4/lrDvKyX2ublQ4Fq3SGH0CInW +PSl60RBKgb6b09uyR/F+ezTukFhMgYFj1wInx/F5et8tTU2JCqcd233jZvD6 +xlrvdOTVhoJ0K/XtbBI9DlC2K2/WgWbRu4plQkOoLQTtjXqqB+bPwjmCYQgp +uH60OXHmT6ir0I4uDhtCjN8vC2XPAyj5e6UWVA4hyYnK9ZI0IxB51WTnyz2M +gqgGXxPVTcCsu37ghP0wok39bBQbNwX90x01GTnDqMAocH16qzm0TTqn7xJm +oqwF77f5SRaQ7XW9LyeYiViGUv/VXbCC3aY8BokzTNTLsW52wP0gxJ5YMHXz +H0E+f/jGX1KyhbfeScEl8yOo8FTjm7vRduBVn8DwiB1FYfPSyztOHQLxHYsR +pOIYWrQ0O/rvycOwssk1eGPHGNI7nmA4fMgeqIup/3O6Po46pNO866gO4ErG +9NzcP4G2ZF95nbP9CHRJTV7ZLTyJKvvVrW2EjkKU8/GW2J5JJNf53TNk6ijM +tOikpOVPIerdhPzM/mOQ/tZFRSt1GqVxz+9MfOcICxt6465emUEvDXf1RL9y +gjsb81zLTb6j+3tviPzMcwb6stRrrqbvqPXL0xjqzePgnNwopmU5i8oPPlT2 +u+gCroZjVt2fZtHsWXsOH/oJ6H/roNTpNocWzdS8po1dwWAaeGRH51DO1GdW +4J6TMHV2xyyKmEeOj596nBB0g4Ibj83/x7uASkusTq676gaLRuF2Sg8XkJ5M +B/s62w1C1N+ppaksIqV+z572U+6Q4ifka5u7iIYETts+JN2BLv40BVGXUFuc +jYf5ERoobYWs2YIllBSaLhDcRoP+gCvP8tSX0eu/f7M9LDwgVfwAKZO6jDa6 +wFVqlQcE21+bfcBeRnpu0znR2nR4/j8R9X32LJSd8j3QZg8dhMjzL30cWGjz +h7n9krp06FfQCnp8hIWmTZc7c/bR4WOw52VuRxY+Xzg4m43o0JunMfjGhYWE +l0WcRA/Rwf/uuJ8owUJDt3T408/SQf/S9kGJUBaKq444VZlNh2qD5/b3Uljo +LCVZLzSHDvKUAZnbD1jIOreYXzePDtPd7kJXU1loQzIzt6KADopRLqeD0lgo +OsBu/GUZHQSk5gRNH7NQhJry6fJaOoiHcZfX5LCQd/L7MyV9dPjHVlVcoIKF +LISZBgH9dPhcv+/BKPb2aA4hyiAdjuVWG9ZXshAzQKegeJgOmeXqy+FVLORu +kz71YpIOnaryS301LOTIE+hTtEKHB41dkuF1LGQeuMUvX4IB76yab29oZ6Ha +9BjLRCkGXAtXYXzFNmieUw7dwoBU89M7CzpYSEvl/WdjOQb4unWkWnWykHR3 +uPEXFQbQUsu/hHez0IR+r8QGHQY4DM3U5Pay0G2ujBpPewZcDeuK1RvD898l +eP/gEQbwXboQMIYddTw0gHqMAQ1xlmb3x1kotMxu229nnB9xsWxuAvdPcCbc +ozGgWXhT9oNpFqI20ej1/gwwnO8qfTnPQt0JKgJK8Qxw/3hAX26VhQqRkNdo +AgMYhh5cT7CjphbqCu4w4P0/Rl3Kv1iIYlEXqZvMgLmCloxtv/H6cXjMHXzE +gKxjyTUKnGxk5pvxOTSfAU3z91ZGuNlIVvbanv2FDOjarufnwsNGC02+d9a9 +YECRaclMK/YTVXQwrpQBaZ/KBcp42Wi1t/dNZhUDXqyOlPnxsVGZtUxOSyMD +SK+J0moBNopd4eJJamJAgPTCK3lBNqLljLs7NTMgJkOhMQp7E3eVzFArA1ZX +Y35aCLHRmWrH2+wuBkhNNNU2CrORkvq9EOVhBtQmX3yRLMJGK91/fRhjMkD8 +erLmFHZbNEOraJQBJYddiw1F2ShyQHtcb5IBco+ym0ewe+5/OGE7z4DkuV7b +7ZvZKHG9iGkYJwH0c4nnwiTY6PVc7/GgdQR81NAgGrFHevMCfHgI4G9M/ENc +ko0MykwyaPwEjDwj+vOwmW6hPyxFCEhUfvT2Xyncv7WpqKkYARznRCYFpNlo +315RNSROQGV0aq8NdrxQ/lGqNAFVXBni7Wv1qm/FMgoEXl+d7oYtbEQ8zW8U +VyKgeIeqLqcMfj7+/LeNKgSsWMef1MdmEmJC3GoEfOK7xpm7Vhcz95rUIqD8 +q0r8uT/YqOqX2AUmhYCwoZ+KOdjDY/13+7UJqG34N7wbW/9N2LtOXQLiP65G +UmTZaOhMoVwNEKD2n3vTZ2xhx3CdCiMC9HOsYjnk2EjP+IB1sQmu97wWUcWO +kx48//QAAdlHeX3PYldyF8WnWxKQqthoehubnAl/lmJNgPmBoYEibN0G8Y+3 +7AhoGuLynsKmFQ9OXD1MgP3i7JENW9no1sMirssOBKy/s3m9KvZggIVWiCMB +7RPtlU7YQq4S5n7OBDQ4ubzyx9a1IE94uxBQUcWOvLb2/ta/Yl3dCOj4ZedU +gl25wfKJI42AxsLVs/VreYsSrw7TCSAmnph3r+UNkK3WBAF2YvuYI2t5zS+Y +Zl4ERI++sVjGplX8tQreBDjH7wrgkcf5Tyw37ztDwPU7l0+KYlfektyh40OA +Ul+5iBz2YOiQ4S4/PP9/6q9txxakFzuqBRDQOV5Ytxt7r22kr1IQAQIhPvV6 +2DR9qxjZEAIWejhjAfumilSaZCgBWUuEuBn2y03DpSJhBGTwP6RbYg/8KG4S +iCBguCI99OBa/kjkAE8kAa18/odssfd0WLF+XyDAwHPjzJr/DzwqzWA= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6107328152146914, + 1.5703887308395243`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6107328152146927}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6107328152146914, + 1.5703887308395243`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6107328152146927}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Hk4VdsbB3CEyFDIlEvmIkrnUMhtveYMoaiQxHHOJpWZhKsJDUpISRJF +QoZMEbm3hOsn15QoRdgcM5nPUeq3/LGf/Xyed+/vetdeey0Fmu9hBhcHB8cg +vtbu/i07t1W0texPko2M3RpLov3TWTo0k3zUITryds396XuSlE1eo3Ekx5DH +tqP/xytIrUca+UrBCtjFoRfe8Zg0o5cey7OK2NcbpN5cyGtHN86lfFHGftXm +/+gn5SMKWuWnbMMe72mKOF/9CWltslhUw94yrHR8yfgr0ms9qqKJbTUToRfY +/A1xnqTWamH//XNcIDRvAL0c7Xuvjd11STL8pQ+JLj9wMtLDnuY1GV+gDKMD +zzJV9mPz3vRzoi4zUbdZTbAxtpxIWqN/9Sj6VJ5NscC2kVnKnjaeRAJC43NH +sIkMRQlNvmn0LsZkyQX7gopt9OnmGcQ/70vQsT9Jdu4OyptFBT/0bwVh0529 +T925OYd87L4Y/4X9/SHH4xKfeeTNZ+MZg82nqLlplrKIjh3IX0jBTqK/M98k +voS8iu67ZmHLP3O6sGt5CUnoOukUYetqxEyfrWYh1mNHtQZsrz3fmseNf6Jj +CSd3sLEXQoO5N6iuoo6HP37w3iTRxWoBAzW+X8h9l5+eOPZ90H3u2fwb1YYO +r1Cw6U8bTQLyOEEiSex+IHZew53+SzJcYFQY0xqF/X3ENSLhJhfQJroD72FH +qC+WvvBZBwksyXXV2ElFCkozFB64mKRiwH+LRD1tk3//yuQBg56MHlls+bkK +Z2FxXtgszsmkYOdr2yRqLvOC2a4gY1fsuldhnGeq+YDpBdJV2IvvPnwbNRaE +0kCX3TFxJBK1FtwU/rcgzHrtnsvE1uo0ASE9IWCVSVBrsb2HyjN27xSGBwVS +Ohy3SeTH1az1p+AmkNm6Xf8y9rBi4Wz0kggM969YPIrH34do4m+lioLDzGPB +Omyu50wFKX9R+PJfsO04tjx16+G8CVG4uy7/iG4CiZyN40ta+sUgh/MmvQe7 +1SMgUPK9OEgWr97ac4dEfc/iYt34JEDjlp8DHXtyIi8z11QC5N2pqYnYG4LI +D/veSEBbZknud2yTKAdtt3JJUJ3/2lSSRKKqrD2LOenS4HpDQd72HomyhldC +9INkQft7i9poCokOHLnaF1ggC3ItwYMKD3B+nZhZAVMWlActBFywtbM0xOWd +5CDHNKqgHbuO5lrKs38rVJnc0q5NJdHcTP+50Svy4Mh93LYyjURiZ03KSg8q +QulR02bWYxIxszZ42XkrgqX35nh4QqLKr20yUzGKECXtW3cN28X6xBXVN4ow +5tUZuSUT97cj5HAKRQk0Kqr1jbPw+OPPvkdKKsPnsYX23GwSOXgKaFoOqIBz +U/e9989JhEKOUI6tqsCT5KTarfkkUo9O30uXVgVW1YRzEDZHJtUo8pAqzFSf +a5crIFFB3/FjJW9VgV3s0xVaiPfn0fxLW55sg7uj24wNi3F/Jge7xmlqsCKs +806pgkSZ9slfliPVAH0sux6NHUcb6OdOVYPb5w/WjGDTLwZPyH1QA3X3ntMF +lSQSeZ3GYW+sDiYtPcw/q/D/Q51Wr1baAcPaZo6BNSSSUbx9IXZIA3bV7j2g +VUei1zcW1NhcmhD0IXl3LrbLvFMnoaAJIcVcDxXrSfSoTlnNyFUTxs6LLEg0 +kEjRs6qD1a0JP1XfFvM04vnmD6sQ73eCzeCk14/3JJKVkSPknbSg27Nv3ryT +RBpPgwR/IAqsuI78IJgkotGvLGraUODPEP4/lrDvKyX2ublQ4Fq3SGH0CInW +PSl60RBKgb6b09uyR/F+ezTukFhMgYFj1wInx/F5et8tTU2JCqcd233jZvD6 +xlrvdOTVhoJ0K/XtbBI9DlC2K2/WgWbRu4plQkOoLQTtjXqqB+bPwjmCYQgp +uH60OXHmT6ir0I4uDhtCjN8vC2XPAyj5e6UWVA4hyYnK9ZI0IxB51WTnyz2M +gqgGXxPVTcCsu37ghP0wok39bBQbNwX90x01GTnDqMAocH16qzm0TTqn7xJm +oqwF77f5SRaQ7XW9LyeYiViGUv/VXbCC3aY8BokzTNTLsW52wP0gxJ5YMHXz +H0E+f/jGX1KyhbfeScEl8yOo8FTjm7vRduBVn8DwiB1FYfPSyztOHQLxHYsR +pOIYWrQ0O/rvycOwssk1eGPHGNI7nmA4fMgeqIup/3O6Po46pNO866gO4ErG +9NzcP4G2ZF95nbP9CHRJTV7ZLTyJKvvVrW2EjkKU8/GW2J5JJNf53TNk6ijM +tOikpOVPIerdhPzM/mOQ/tZFRSt1GqVxz+9MfOcICxt6465emUEvDXf1RL9y +gjsb81zLTb6j+3tviPzMcwb6stRrrqbvqPXL0xjqzePgnNwopmU5i8oPPlT2 +u+gCroZjVt2fZtHsWXsOH/oJ6H/roNTpNocWzdS8po1dwWAaeGRH51DO1GdW +4J6TMHV2xyyKmEeOj596nBB0g4Ibj83/x7uASkusTq676gaLRuF2Sg8XkJ5M +B/s62w1C1N+ppaksIqV+z572U+6Q4ifka5u7iIYETts+JN2BLv40BVGXUFuc +jYf5ERoobYWs2YIllBSaLhDcRoP+gCvP8tSX0eu/f7M9LDwgVfwAKZO6jDa6 +wFVqlQcE21+bfcBeRnpu0znR2nR4/j8R9X32LJSd8j3QZg8dhMjzL30cWGjz +h7n9krp06FfQCnp8hIWmTZc7c/bR4WOw52VuRxY+Xzg4m43o0JunMfjGhYWE +l0WcRA/Rwf/uuJ8owUJDt3T408/SQf/S9kGJUBaKq444VZlNh2qD5/b3Uljo +LCVZLzSHDvKUAZnbD1jIOreYXzePDtPd7kJXU1loQzIzt6KADopRLqeD0lgo +OsBu/GUZHQSk5gRNH7NQhJry6fJaOoiHcZfX5LCQd/L7MyV9dPjHVlVcoIKF +LISZBgH9dPhcv+/BKPb2aA4hyiAdjuVWG9ZXshAzQKegeJgOmeXqy+FVLORu +kz71YpIOnaryS301LOTIE+hTtEKHB41dkuF1LGQeuMUvX4IB76yab29oZ6Ha +9BjLRCkGXAtXYXzFNmieUw7dwoBU89M7CzpYSEvl/WdjOQb4unWkWnWykHR3 +uPEXFQbQUsu/hHez0IR+r8QGHQY4DM3U5Pay0G2ujBpPewZcDeuK1RvD898l +eP/gEQbwXboQMIYddTw0gHqMAQ1xlmb3x1kotMxu229nnB9xsWxuAvdPcCbc +ozGgWXhT9oNpFqI20ej1/gwwnO8qfTnPQt0JKgJK8Qxw/3hAX26VhQqRkNdo +AgMYhh5cT7CjphbqCu4w4P0/Rl3Kv1iIYlEXqZvMgLmCloxtv/H6cXjMHXzE +gKxjyTUKnGxk5pvxOTSfAU3z91ZGuNlIVvbanv2FDOjarufnwsNGC02+d9a9 +YECRaclMK/YTVXQwrpQBaZ/KBcp42Wi1t/dNZhUDXqyOlPnxsVGZtUxOSyMD +SK+J0moBNopd4eJJamJAgPTCK3lBNqLljLs7NTMgJkOhMQp7E3eVzFArA1ZX +Y35aCLHRmWrH2+wuBkhNNNU2CrORkvq9EOVhBtQmX3yRLMJGK91/fRhjMkD8 +erLmFHZbNEOraJQBJYddiw1F2ShyQHtcb5IBco+ym0ewe+5/OGE7z4DkuV7b +7ZvZKHG9iGkYJwH0c4nnwiTY6PVc7/GgdQR81NAgGrFHevMCfHgI4G9M/ENc +ko0MykwyaPwEjDwj+vOwmW6hPyxFCEhUfvT2Xyncv7WpqKkYARznRCYFpNlo +315RNSROQGV0aq8NdrxQ/lGqNAFVXBni7Wv1qm/FMgoEXl+d7oYtbEQ8zW8U +VyKgeIeqLqcMfj7+/LeNKgSsWMef1MdmEmJC3GoEfOK7xpm7Vhcz95rUIqD8 +q0r8uT/YqOqX2AUmhYCwoZ+KOdjDY/13+7UJqG34N7wbW/9N2LtOXQLiP65G +UmTZaOhMoVwNEKD2n3vTZ2xhx3CdCiMC9HOsYjnk2EjP+IB1sQmu97wWUcWO +kx48//QAAdlHeX3PYldyF8WnWxKQqthoehubnAl/lmJNgPmBoYEibN0G8Y+3 +7AhoGuLynsKmFQ9OXD1MgP3i7JENW9no1sMirssOBKy/s3m9KvZggIVWiCMB +7RPtlU7YQq4S5n7OBDQ4ubzyx9a1IE94uxBQUcWOvLb2/ta/Yl3dCOj4ZedU +gl25wfKJI42AxsLVs/VreYsSrw7TCSAmnph3r+UNkK3WBAF2YvuYI2t5zS+Y +Zl4ERI++sVjGplX8tQreBDjH7wrgkcf5Tyw37ztDwPU7l0+KYlfektyh40OA +Ul+5iBz2YOiQ4S4/PP9/6q9txxakFzuqBRDQOV5Ytxt7r22kr1IQAQIhPvV6 +2DR9qxjZEAIWejhjAfumilSaZCgBWUuEuBn2y03DpSJhBGTwP6RbYg/8KG4S +iCBguCI99OBa/kjkAE8kAa18/odssfd0WLF+XyDAwHPjzJr/DzwqzWA= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6107328152146914, 1.5703887308395243`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6107328152146927}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6107328152146927}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6107328152146914, 1.5703887308395243`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435732375957*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"dbd6e4e7-8c88-4a44-b403-6c88e9fba795"] }, Open ]], Cell[CellGroupData[{ @@ -11854,425 +14147,1194 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.99185079904813*^9, {3.9918508647235966`*^9, - 3.991850864992861*^9}},ExpressionUUID->"d43bf17b-b492-0e4a-af4a-\ -6a3bc399953c"], + 3.99185079904813*^9, {3.9918508647235966`*^9, 3.991850864992861*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.57213479339701`*^-270\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 140, 69, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357323954894*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"8d0662aa-3ad5-4d1f-8dc8-3f71b2c1da28"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"71d4e039-c2b8-d74d-819a-80d2051e4273"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.957238012546883`*^-281\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 140, 70, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357323965068*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"f3c4c042-bfd3-4955-b3d5-a314cde37d90"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"63625e13-15ef-1f45-89dc-998a1b63a626"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.934867184668775`*^-292\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 140, 71, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357323975526*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"e8414174-bdb1-4177-8fa1-3db6d1cd4dc4"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 140, 72, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943573239840593`*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"e2a49b7c-b1df-42f2-b658-285a0245f7cf"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-\ -1872f77ea023"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8bAHCRUCF732GWVeZ13Xs9DyE7KSrJSChJlJFVRBpKVlFUvpIG +Gffe7CIaRkmZoVIaWiK7kt/5/XVe79frnPN6Xs/nGedQdx1w8ePl4eFxXsLD +8//rzJvWh6ophWY/O3slNixYmXVfkY0y7z8GRx4NhD7RUgWUer5Ltj8DNmVl +3czRMoQI59t9fP0F8Pn+qZBILUsQG5PJmO9jQ1ix9QnQ2gJv650OTPU1AXW0 +0SdZczdYq359PdH3EuKiU2zuaoTBfB/t/HjfexBniu07opgEzetvFL4omISk +Pz0bLR5kgeLbmk+7tBegVjD410vPKyAZ5HVbYD0fqgiFUJ0Kr0GGnnWdk6sg +xlQmlG9SuAmvctY1TqwSRqEhrxu0oWK41FUsGqEmjIPLjZ2SvxWDu4iG12+6 +MKbbDwc9/V0MQ4lK/3h9hbGF8YEX5EpgOHg5U/KuMLIq+bTuuZbAqOWHKuPt +IigU22Ap/6wE5sazy2L+E0WPy8WOcPcOpBQefc4rJ4bPaBNP4gPLwM5wr7iU +ihja+xZKukWWgeBDF1cNHTGMYDj5KSeVQdKI2qC9uRj6ODYK5l8ug1jlp5+y +9ophwvtCybWdZRCcL/tPvVYMuetd5J7JlcOmvApt+x3ieK+kKbYtqhxkskZO +ZV6WQK9FXq0+rQqQ1bqbNFckgRLHFG83rKsA+abkozvLJfCU9JoVhUYVQBpf +E67RLIGKdu9CvKEC1BxCvOtGJdD0ZXrdDZcKMFi6YDxiIIk91ntfHThcARvD +pD/ot0miD+/nz+8bK8B5xeib7C5JDM/8Umb9qAJcCmpe/R2SxKAwdfui1gpw +6/R4/vinJKqmfpjf9rICdmpfq3WXksJum/e6Z0YqYN+HtenHvKXQeuhO2Rp+ +NpzYYmv2ckYKv9ymaoAVG+S5HfK8S6RxALJFQ2zZUCqxZVZvhTSG+eTx5zmy +ofelZ3k6WRqFgs/KfXRlg+qmMOVNNtK4xFlkiOHPhibHq8s6L0pjz7uu23+O +s2HBerrjGVMGdSb6B5sfsCGtKLp4wVoGnePyzNweEc8v4zmps0kGtzX0lIy0 +sMHh0XLzs34yKBc1U/zzORsuradwHFJlsDchkfb0NRtM0D67/a0MDlzdejV7 +jg2H6P95tR6TxTXfB/4e1uSAXb7IlP0ZWaxaJ8DP0OGAskDsyY7zsrjsG+3B +3FoOdHa7VXTdlMUzuffdAow4oBuyku9Nhyx++ef5bxVyYLQosuiXvBzWe0wk +XdjCgQbhj6bhqnJYZe0/IbGVAxfCXJ7P6shhS/ov6bPbOWBloTP3F+Vwa3t7 +6kFPDhS8fm8rECCH35LWMpfv4YCHpNMPBY4c/lHXHA2K5oBBTF3ClXo5bHue +KVUUy4Hl71dLUx/LYdOuUt7BIxyoKeMD9VdymG7wQskkkQPS9jVp6xblcEBN +ya8hhYg/QdXQyl4eJZtUb/DmccDy5+/o4BF5XGUT0uhVw4EomyzNB9/lcbd/ +uZ9QHQdK/9MZkJiRx0u10/xl9RyQ3eJNrxFUQD/+f/SxBg58r340y6ergKu6 +NiYwH3Mg81ha2MXDCviPckpB7iUHWgbXqH5PUEBk3ak/1sWBv4bNXWYpCkhb +VPEd7eaA/+dp/Q+XFTDiQGvTjT4OmDrsmNBtVkBRp+jhmSEOvJdSD34orIgm +SxqN+j5xQOZAg5KMjCI26aolLBnlgEPLtmd7KYooV7b/tcYXDlRGp2iLGihi +OV91+55vHDj9dvzr9m2KGJn1LqvuJ3EeJqcvlfgQ93sJxj0e58BUuordYqAi +atQ7xz6b4ICnpdutwjhFDDGKbX4+yQH9W3UBPwsUsYj15/T1WQ4E8LrKWJQo +YpvtiEX6HAfydow9zrqriGfHI2Wj5jmwTISqbtqiiOOifBTWHw4MHEz+kPRD +EY3t/Ksv/OOA6FNyVt+MImbkhoT7LhL5V6tZr8mjhG/HF9y0ebhQ2vet4Lm4 +Eub/UE5hL+FCAnOTj7yJEtYc9epMW8oFG88rv2gWSujlwBvgyM8Fkfhvia4O +SvhL/koM/zIu5DUfL0rzVsJmr0CVPQJc8P34klYaqIRx5yarxQW5oClAaW0P +U8J3ehovqglX29V+W3ZKCYU8nFNnhbhwNEggTjWTiEeg2ChtOResU7eIWFxW +Qvug6N2qK7jQ/WJsXVyFEqqmueyElVwY36YSMflKCdcJM9+ACBeqokMExD4o +ISXh+AiX8JG8ezm6Y0podJEarSbKhZXDW+v28pLwrOtO73nCXUuuO5xYSULR +48lsj1VcuKTy63WhNAk/BUnl1hHWCDjDM6xJQm7HCcMgMS6MnXyVvmBIwpV3 +eEbvEebeVldRABIaLF9OWyHOhZinh7gmtiQcs/ilvIWwxVijldtmEnqtEbqT +Q1holUjfoZ0kfMGX39tPuFNvx570ABLmpgj9JynBhezNN+dLQ0nY9+2isANh +z/Dp009jSLitsUjpKGG1bAvFr8dJ6Cd54uUdwt+rz90RSCNhpk+mTj9hzsCQ +mdolEuakqq37Rzj675pOi0ISyo/lDJIluWBOivTxLiVhPMtOj0VYEB/+iqsm +4cNr2fpuhDt8xJJym0hoUT48HEj4fKKnVM1TEp7ansyKIexxvbiot5eE1L9f +bU8QVn4yR5saJuHu7QcFzhH+MmrVKvaNhDYXEiIzCJcvz3RfO03CNaZHc9MJ +R2oPf3NYJGGeTlfYGcJmTjpxgUJk1Kv5tDSRMH9ItMhJCTI6JKk6hhN+mv7k +6nUlMn7MnHPyJZzJkdRr1iDjNtvOFY6E3Xt8mob1yLjOR/64PmHqbOnmfwwy +fpuwrpcgPCr794OCNRlbAp+wx4l8lJnaRtCdyXghQySwlXCExwWBre5kDEpO +G7lMmHlkJCdsNxnjq5sowYT58tdpZgST8cuYgoop4bYHcXVlh8noYyH5fQnh +tJE2h2fHyCinpBb3iDhPkobfAcFsMt7Pj10Awh9t2Dzq/5FR7Xb9zxmiXkoC +F9PXF5MR5gXKbxE2Lb3IPdJARsvgB/m8hC37OhbGWsiYkN43W0rUnxPP0g1e +L8moHyN8ZythX5fgV/CRjKfCWo2vEPUbHHNNuXyMjHNb2oSZhA8X9u+jzJHx +bu7whl6i/q1jqEfj+Sn4/Yjj10VhLrSL1l8zWU7BtBR113OEnQvdWsZFKLjs +tdxqBcI7nqWI+chS0PiU54rVRH+FkGeumWtRMKT731dpoh+nOWkt82spmMu0 +qD1F9Gu0jdaPCkMKJsf3/pkj+vl4qLexshkFX+0gDT4l+v9Sc1sL7yYKSlpn +69oR8+JhwNUfzREUNLeM2ZhHzB/bv3Tx2BgKKpR/HO4l5lNHWrexYTwFhzfW +zQsTflUjFF94ioKkDcJPQv9yYGxFmPjxPCJeV5gRJeadbLkNzbqJgox7hq9u +EPPzsuXIjn+PKXgqZTSpmJivyq/i4ivbKeje8vdZMTF/dXg5reo9FFT1H2YV +/OCAxRYlD4FR4vl903X+xPwOmpuIbxGm4hfaz+CNw8Q+CPWX/iROxb3tCo/5 +3nJA8OtAMZ8sFZk2n1jc1xy4Ptjca6ZMxaNmlReEBjnw5v557bvGVFRKVqEm +93Bg43F6/39eVKx4lcBoaeUA6d+d/Q27qehcwhcLLcT+ilDme72Xis+3Kvxh +E/vr5J4VurJhVOR5W1yf2syBRvvXiaknqeiy+P6Y3D1iH4gnrI2poOJ5K932 +uDIO8KRMP8yppOJh3aLBmjtE/vgC3SvrqGjhm2v7q5gD+6Zdjk88ouI17V6r +bTc5UNivOhgwQEWvszdm5vKJ/Xy1JXkLnzJqSLGmU9M5MK+16o2OqzI+u5G7 +TyGEAzOX5RMM3JXx2vw5n4n9xL4SVVOleylj5fV8yYf7iPOYpAda7lVGf763 +NV4BxL6s851xj1PGZHIgLYT4nmizrxI5eV0Z1wsevztrz4FL+zzh/bQyirbL +ZZSqcoBZXJJ/4YIK3lIwUNB+xoZBSvFVq1zCFjyhh9rYEH3h1pWpqypokbzV +u/oJG6oSivJcbqlg9pst4owmNuhvy88RqVfBdL19v1Sq2LCGPyst+Z0KmmCz +/PF8Nkh7xcRHaKviV6OM7rRQNkyI23m7NakiOelqpbYwGz6c8XY7KKCOf6bc +a6zkKsD2Z6TtR2MNlFcy9stQKIfvvoKHuEdXY7yBnNir0TvE/4YM74mmNThy +YPrdh5RiEH+mnlr+UxMjYpsf5DneAsWTZc7GxtrY5RXakzFcBDla9FUSATp4 +MszsidbNQmiTNzeaTNfFmdyU6aizBWCq2JS2tnctbt72MfCddz6I8BWE+Rxb +h44w0Go7kQekBDJzu7oebgqMEhVRuAhCah6VLk/0cJWfVFvHzfOgy5Iri9yp +j5PX1adt72XAwTfizXY8BpjeKudR3HoOfk6ecbXNMcAFnoPSiatSYMPax5ds +dQxRScvApWYmGe5PMv7Mdhhiu7XOxyrxRAjW1h944WeEBxWXsHYOHQXW2O7u +7ULGmJySO5a0NBqsVGUdhQuM0QRWLR7aFQ7cH4+ouwuNMfOg8vuGTeGgWnVo +prbIGEtP2VyXNg+HpXbPr+4pNsaHGrlVH8jh0HQg+Vcz1xitJHiP8r4JA7O6 +qezoJ8b4Z7hnLXqEgbHLi/efvxtjdkTPz3zvQ7A6/vThJhoNTw88fDR8IhTq +Gdf5HUxpWGG8oJ5yOBScZxsyepiE6Z+HcG8oHA6eLhk1p+G51eM6HXah0OLh +/U7EgYZNh/5WHhAJhT10Y7sd3jS8tzX8d0t2CNz69U5h6iQNM7I8D7r4HQBN +P3qD2gANc0bs6i+KBsE5ZaffiUM03KHOs+XL7D6YervL6P0bGobPVwjYDe+D +++5niq+M0LCykP+yWcU+cHF+my3zg4Y0Vm/45OZ9EMU4HiLEY4JVi7O5iXmB +0CL2gvpDzQQHEm6q/qXvBb/7e5K4oSaYk6UTa1foD2P7v0ZahZmgqNXGil+p +/nBYKWhfb4QJxsjcsy+J8ofTsQdc5mJM8P7h4sTNG/2h3DSCwkw2wZDgf49D +/vjB38rE+uZLJjgcEfp+yM0PMsquTL1sNkHz7/NHdeV3Q0N+9+4JKTrejsZv +Ozt9YNiB6hUhS8cWoGe5N/gAz/z+7X/k6ahhmhnsV+oDFpsEnPgpdFxHEU+/ +fsYHHi8xpclp0rFOuTKhw9YHnu66KmRuRsdPAwtNtY+9YUA1sDTNn45F0XGu +Eee9YOrm4uzaKjoKKzzoq/61Az65WeefqqFjq+8HLbFXO6B/6VmbkTo6rlXf +aH6kYQfUectfvNBIx02khMMXzuyAY7JGpgutdHz21e/8PY0dsOpkYGzbEB0t +ezKTB3zcQTugh8eP1xSnEgaPjn/YBr5qxUKXHE3xs6fLwWIVN4h+5Bmo7myK +Wm8fKQkJu0Gan3g728UUX+YVusbMuEL99agz7VtNUfMur/blVleQVLcRXfAx +xUSx+/e7Q1zhsfpHSe8IU1x6L2iKv3kLaK4mU9SvmiJrUFV9WcRmmNDMNGaP +m2K1vk+7lcQm6H9KlPakKXZZjO5O4N0EjcFjm8OmTVFm6Gd1+4QzpLJtQ41/ +m+Jt78DdZzqdQdOUp6SWj4H8tzvO16c6wy7b/dRmaQZGPusZ6hB2hu6ADSu7 +mQws9JbVHNZ2gurCP++mTzJQazFB5OEVOzBeHzZrl8LABdyzKyrJDu6++74y +/ywD82wMpK0D7YBNekOzy2CgKL3NVc3YDkpyGs9eyWXgfw+yzec7bCH/zHH6 +hlIGSp2t2vx5qS2cChNNz+lioDdVrnNXwgYQlDhZ9KOHgaY/JPTf790AyRU8 +9Rb9DGzsbGuLcNkASWMTn74PMTDrH7/nW5UNcGRPN9P8EwOLVVRYJU+s4aDH +xdEvcwzsfKOboi5hDe6WKsggMfGNrMsn7RpLWOgWFGmmMPEk1T8hqMAS8v3G +Bu1UmLhAXVnTlGIJn5JrIt1XM7HcuraM7WkJB1s3lkXpM1H83caLV/gt4bRT +LKnamokGS7yPnt+6Hmq39fw1PMDEsRcQELPCAnZ+qW2rD2XicusbBXtnzYEn +Oj/HMoyJVWcvUINGzME6d5/hligmHvmys+BOnTm8fL0k6FAiE6fnL9VT9pvD +1126gxXZTGyvNPpU1YWgsP9EjW4jE+Vtnoft8gRIXfQ3Smli4pon9cJ7WAC8 +GdYVnx8ysXR/v9FZRYCvlfy38luZuD3DutVo0AxqeZJyxLuYmC9UL7uw3Qzc +s+IjZz4ykRK6IsxxJwty6qKM7q9gYYG8b4F5NANWOm2vkBdhYdrpbXPLdjIg +fthEJ3IVC/Wmdt0ZBQbs4Z9TXSfFwv23tnXxLGMAbWOEZAGJhXucePYmZJpC +7/uDk8f1WKjxOO1RKYcOUsuDKhy3srA7alZCWtAECtfHRY9vZ2HXZK4Y/RsN +9ONS12d6sDA67PTDmA4aOI2X9/T7sDB36HKH13kaJPdOz/sGsbBJOVXmqioN +5gqOWkQnsNDqs/3YWxtjGGBkdhUVE/G3NDrm3jCEPeGFebalLPQNsvoYnWoI +M6V3/b6Xs1Dl2GRiRLghiCv3z+pVsjC/0y3gwXpDsBdUUrzXyMLVh1QbCt4Z +QH130e6uHhZK+/g/jlE2ADuRap2IfhY2npscF1lhAP0bWmdkB1m44trWA/WT ++jBV++2k5zAL7f6ML/g90ged/9bd+fKVhfd9gxLH9+pD/YB5xJkfLPw9LrV/ +82Z9sJPcDGvHWSj5MeLVc6Y++J8IfxE2zcKD7RFdkquI9zUmX5KZY+HC636d +1/N6cOx3tm/tbyK/MYcL74/owSrDW9o7F1iovnZMqeaZHlzZXzu9uMhCm72j +8U+r9OB/YMhezA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHCRUCF732GWVeZ13Xs9DyE7KSrJSChJlJFVRBpKVlFUvpIG +Gffe7CIaRkmZoVIaWiK7kt/5/XVe79frnPN6Xs/nGedQdx1w8ePl4eFxXsLD +8//rzJvWh6ophWY/O3slNixYmXVfkY0y7z8GRx4NhD7RUgWUer5Ltj8DNmVl +3czRMoQI59t9fP0F8Pn+qZBILUsQG5PJmO9jQ1ix9QnQ2gJv650OTPU1AXW0 +0SdZczdYq359PdH3EuKiU2zuaoTBfB/t/HjfexBniu07opgEzetvFL4omISk +Pz0bLR5kgeLbmk+7tBegVjD410vPKyAZ5HVbYD0fqgiFUJ0Kr0GGnnWdk6sg +xlQmlG9SuAmvctY1TqwSRqEhrxu0oWK41FUsGqEmjIPLjZ2SvxWDu4iG12+6 +MKbbDwc9/V0MQ4lK/3h9hbGF8YEX5EpgOHg5U/KuMLIq+bTuuZbAqOWHKuPt +IigU22Ap/6wE5sazy2L+E0WPy8WOcPcOpBQefc4rJ4bPaBNP4gPLwM5wr7iU +ihja+xZKukWWgeBDF1cNHTGMYDj5KSeVQdKI2qC9uRj6ODYK5l8ug1jlp5+y +9ophwvtCybWdZRCcL/tPvVYMuetd5J7JlcOmvApt+x3ieK+kKbYtqhxkskZO +ZV6WQK9FXq0+rQqQ1bqbNFckgRLHFG83rKsA+abkozvLJfCU9JoVhUYVQBpf +E67RLIGKdu9CvKEC1BxCvOtGJdD0ZXrdDZcKMFi6YDxiIIk91ntfHThcARvD +pD/ot0miD+/nz+8bK8B5xeib7C5JDM/8Umb9qAJcCmpe/R2SxKAwdfui1gpw +6/R4/vinJKqmfpjf9rICdmpfq3WXksJum/e6Z0YqYN+HtenHvKXQeuhO2Rp+ +NpzYYmv2ckYKv9ymaoAVG+S5HfK8S6RxALJFQ2zZUCqxZVZvhTSG+eTx5zmy +ofelZ3k6WRqFgs/KfXRlg+qmMOVNNtK4xFlkiOHPhibHq8s6L0pjz7uu23+O +s2HBerrjGVMGdSb6B5sfsCGtKLp4wVoGnePyzNweEc8v4zmps0kGtzX0lIy0 +sMHh0XLzs34yKBc1U/zzORsuradwHFJlsDchkfb0NRtM0D67/a0MDlzdejV7 +jg2H6P95tR6TxTXfB/4e1uSAXb7IlP0ZWaxaJ8DP0OGAskDsyY7zsrjsG+3B +3FoOdHa7VXTdlMUzuffdAow4oBuyku9Nhyx++ef5bxVyYLQosuiXvBzWe0wk +XdjCgQbhj6bhqnJYZe0/IbGVAxfCXJ7P6shhS/ov6bPbOWBloTP3F+Vwa3t7 +6kFPDhS8fm8rECCH35LWMpfv4YCHpNMPBY4c/lHXHA2K5oBBTF3ClXo5bHue +KVUUy4Hl71dLUx/LYdOuUt7BIxyoKeMD9VdymG7wQskkkQPS9jVp6xblcEBN +ya8hhYg/QdXQyl4eJZtUb/DmccDy5+/o4BF5XGUT0uhVw4EomyzNB9/lcbd/ +uZ9QHQdK/9MZkJiRx0u10/xl9RyQ3eJNrxFUQD/+f/SxBg58r340y6ergKu6 +NiYwH3Mg81ha2MXDCviPckpB7iUHWgbXqH5PUEBk3ak/1sWBv4bNXWYpCkhb +VPEd7eaA/+dp/Q+XFTDiQGvTjT4OmDrsmNBtVkBRp+jhmSEOvJdSD34orIgm +SxqN+j5xQOZAg5KMjCI26aolLBnlgEPLtmd7KYooV7b/tcYXDlRGp2iLGihi +OV91+55vHDj9dvzr9m2KGJn1LqvuJ3EeJqcvlfgQ93sJxj0e58BUuordYqAi +atQ7xz6b4ICnpdutwjhFDDGKbX4+yQH9W3UBPwsUsYj15/T1WQ4E8LrKWJQo +YpvtiEX6HAfydow9zrqriGfHI2Wj5jmwTISqbtqiiOOifBTWHw4MHEz+kPRD +EY3t/Ksv/OOA6FNyVt+MImbkhoT7LhL5V6tZr8mjhG/HF9y0ebhQ2vet4Lm4 +Eub/UE5hL+FCAnOTj7yJEtYc9epMW8oFG88rv2gWSujlwBvgyM8Fkfhvia4O +SvhL/koM/zIu5DUfL0rzVsJmr0CVPQJc8P34klYaqIRx5yarxQW5oClAaW0P +U8J3ehovqglX29V+W3ZKCYU8nFNnhbhwNEggTjWTiEeg2ChtOResU7eIWFxW +Qvug6N2qK7jQ/WJsXVyFEqqmueyElVwY36YSMflKCdcJM9+ACBeqokMExD4o +ISXh+AiX8JG8ezm6Y0podJEarSbKhZXDW+v28pLwrOtO73nCXUuuO5xYSULR +48lsj1VcuKTy63WhNAk/BUnl1hHWCDjDM6xJQm7HCcMgMS6MnXyVvmBIwpV3 +eEbvEebeVldRABIaLF9OWyHOhZinh7gmtiQcs/ilvIWwxVijldtmEnqtEbqT +Q1holUjfoZ0kfMGX39tPuFNvx570ABLmpgj9JynBhezNN+dLQ0nY9+2isANh +z/Dp009jSLitsUjpKGG1bAvFr8dJ6Cd54uUdwt+rz90RSCNhpk+mTj9hzsCQ +mdolEuakqq37Rzj675pOi0ISyo/lDJIluWBOivTxLiVhPMtOj0VYEB/+iqsm +4cNr2fpuhDt8xJJym0hoUT48HEj4fKKnVM1TEp7ansyKIexxvbiot5eE1L9f +bU8QVn4yR5saJuHu7QcFzhH+MmrVKvaNhDYXEiIzCJcvz3RfO03CNaZHc9MJ +R2oPf3NYJGGeTlfYGcJmTjpxgUJk1Kv5tDSRMH9ItMhJCTI6JKk6hhN+mv7k +6nUlMn7MnHPyJZzJkdRr1iDjNtvOFY6E3Xt8mob1yLjOR/64PmHqbOnmfwwy +fpuwrpcgPCr794OCNRlbAp+wx4l8lJnaRtCdyXghQySwlXCExwWBre5kDEpO +G7lMmHlkJCdsNxnjq5sowYT58tdpZgST8cuYgoop4bYHcXVlh8noYyH5fQnh +tJE2h2fHyCinpBb3iDhPkobfAcFsMt7Pj10Awh9t2Dzq/5FR7Xb9zxmiXkoC +F9PXF5MR5gXKbxE2Lb3IPdJARsvgB/m8hC37OhbGWsiYkN43W0rUnxPP0g1e +L8moHyN8ZythX5fgV/CRjKfCWo2vEPUbHHNNuXyMjHNb2oSZhA8X9u+jzJHx +bu7whl6i/q1jqEfj+Sn4/Yjj10VhLrSL1l8zWU7BtBR113OEnQvdWsZFKLjs +tdxqBcI7nqWI+chS0PiU54rVRH+FkGeumWtRMKT731dpoh+nOWkt82spmMu0 +qD1F9Gu0jdaPCkMKJsf3/pkj+vl4qLexshkFX+0gDT4l+v9Sc1sL7yYKSlpn +69oR8+JhwNUfzREUNLeM2ZhHzB/bv3Tx2BgKKpR/HO4l5lNHWrexYTwFhzfW +zQsTflUjFF94ioKkDcJPQv9yYGxFmPjxPCJeV5gRJeadbLkNzbqJgox7hq9u +EPPzsuXIjn+PKXgqZTSpmJivyq/i4ivbKeje8vdZMTF/dXg5reo9FFT1H2YV +/OCAxRYlD4FR4vl903X+xPwOmpuIbxGm4hfaz+CNw8Q+CPWX/iROxb3tCo/5 +3nJA8OtAMZ8sFZk2n1jc1xy4Ptjca6ZMxaNmlReEBjnw5v557bvGVFRKVqEm +93Bg43F6/39eVKx4lcBoaeUA6d+d/Q27qehcwhcLLcT+ilDme72Xis+3Kvxh +E/vr5J4VurJhVOR5W1yf2syBRvvXiaknqeiy+P6Y3D1iH4gnrI2poOJ5K932 +uDIO8KRMP8yppOJh3aLBmjtE/vgC3SvrqGjhm2v7q5gD+6Zdjk88ouI17V6r +bTc5UNivOhgwQEWvszdm5vKJ/Xy1JXkLnzJqSLGmU9M5MK+16o2OqzI+u5G7 +TyGEAzOX5RMM3JXx2vw5n4n9xL4SVVOleylj5fV8yYf7iPOYpAda7lVGf763 +NV4BxL6s851xj1PGZHIgLYT4nmizrxI5eV0Z1wsevztrz4FL+zzh/bQyirbL +ZZSqcoBZXJJ/4YIK3lIwUNB+xoZBSvFVq1zCFjyhh9rYEH3h1pWpqypokbzV +u/oJG6oSivJcbqlg9pst4owmNuhvy88RqVfBdL19v1Sq2LCGPyst+Z0KmmCz +/PF8Nkh7xcRHaKviV6OM7rRQNkyI23m7NakiOelqpbYwGz6c8XY7KKCOf6bc +a6zkKsD2Z6TtR2MNlFcy9stQKIfvvoKHuEdXY7yBnNir0TvE/4YM74mmNThy +YPrdh5RiEH+mnlr+UxMjYpsf5DneAsWTZc7GxtrY5RXakzFcBDla9FUSATp4 +MszsidbNQmiTNzeaTNfFmdyU6aizBWCq2JS2tnctbt72MfCddz6I8BWE+Rxb +h44w0Go7kQekBDJzu7oebgqMEhVRuAhCah6VLk/0cJWfVFvHzfOgy5Iri9yp +j5PX1adt72XAwTfizXY8BpjeKudR3HoOfk6ecbXNMcAFnoPSiatSYMPax5ds +dQxRScvApWYmGe5PMv7Mdhhiu7XOxyrxRAjW1h944WeEBxWXsHYOHQXW2O7u +7ULGmJySO5a0NBqsVGUdhQuM0QRWLR7aFQ7cH4+ouwuNMfOg8vuGTeGgWnVo +prbIGEtP2VyXNg+HpXbPr+4pNsaHGrlVH8jh0HQg+Vcz1xitJHiP8r4JA7O6 +qezoJ8b4Z7hnLXqEgbHLi/efvxtjdkTPz3zvQ7A6/vThJhoNTw88fDR8IhTq +Gdf5HUxpWGG8oJ5yOBScZxsyepiE6Z+HcG8oHA6eLhk1p+G51eM6HXah0OLh +/U7EgYZNh/5WHhAJhT10Y7sd3jS8tzX8d0t2CNz69U5h6iQNM7I8D7r4HQBN +P3qD2gANc0bs6i+KBsE5ZaffiUM03KHOs+XL7D6YervL6P0bGobPVwjYDe+D +++5niq+M0LCykP+yWcU+cHF+my3zg4Y0Vm/45OZ9EMU4HiLEY4JVi7O5iXmB +0CL2gvpDzQQHEm6q/qXvBb/7e5K4oSaYk6UTa1foD2P7v0ZahZmgqNXGil+p +/nBYKWhfb4QJxsjcsy+J8ofTsQdc5mJM8P7h4sTNG/2h3DSCwkw2wZDgf49D +/vjB38rE+uZLJjgcEfp+yM0PMsquTL1sNkHz7/NHdeV3Q0N+9+4JKTrejsZv +Ozt9YNiB6hUhS8cWoGe5N/gAz/z+7X/k6ahhmhnsV+oDFpsEnPgpdFxHEU+/ +fsYHHi8xpclp0rFOuTKhw9YHnu66KmRuRsdPAwtNtY+9YUA1sDTNn45F0XGu +Eee9YOrm4uzaKjoKKzzoq/61Az65WeefqqFjq+8HLbFXO6B/6VmbkTo6rlXf +aH6kYQfUectfvNBIx02khMMXzuyAY7JGpgutdHz21e/8PY0dsOpkYGzbEB0t +ezKTB3zcQTugh8eP1xSnEgaPjn/YBr5qxUKXHE3xs6fLwWIVN4h+5Bmo7myK +Wm8fKQkJu0Gan3g728UUX+YVusbMuEL99agz7VtNUfMur/blVleQVLcRXfAx +xUSx+/e7Q1zhsfpHSe8IU1x6L2iKv3kLaK4mU9SvmiJrUFV9WcRmmNDMNGaP +m2K1vk+7lcQm6H9KlPakKXZZjO5O4N0EjcFjm8OmTVFm6Gd1+4QzpLJtQ41/ +m+Jt78DdZzqdQdOUp6SWj4H8tzvO16c6wy7b/dRmaQZGPusZ6hB2hu6ADSu7 +mQws9JbVHNZ2gurCP++mTzJQazFB5OEVOzBeHzZrl8LABdyzKyrJDu6++74y +/ywD82wMpK0D7YBNekOzy2CgKL3NVc3YDkpyGs9eyWXgfw+yzec7bCH/zHH6 +hlIGSp2t2vx5qS2cChNNz+lioDdVrnNXwgYQlDhZ9KOHgaY/JPTf790AyRU8 +9Rb9DGzsbGuLcNkASWMTn74PMTDrH7/nW5UNcGRPN9P8EwOLVVRYJU+s4aDH +xdEvcwzsfKOboi5hDe6WKsggMfGNrMsn7RpLWOgWFGmmMPEk1T8hqMAS8v3G +Bu1UmLhAXVnTlGIJn5JrIt1XM7HcuraM7WkJB1s3lkXpM1H83caLV/gt4bRT +LKnamokGS7yPnt+6Hmq39fw1PMDEsRcQELPCAnZ+qW2rD2XicusbBXtnzYEn +Oj/HMoyJVWcvUINGzME6d5/hligmHvmys+BOnTm8fL0k6FAiE6fnL9VT9pvD +1126gxXZTGyvNPpU1YWgsP9EjW4jE+Vtnoft8gRIXfQ3Smli4pon9cJ7WAC8 +GdYVnx8ysXR/v9FZRYCvlfy38luZuD3DutVo0AxqeZJyxLuYmC9UL7uw3Qzc +s+IjZz4ykRK6IsxxJwty6qKM7q9gYYG8b4F5NANWOm2vkBdhYdrpbXPLdjIg +fthEJ3IVC/Wmdt0ZBQbs4Z9TXSfFwv23tnXxLGMAbWOEZAGJhXucePYmZJpC +7/uDk8f1WKjxOO1RKYcOUsuDKhy3srA7alZCWtAECtfHRY9vZ2HXZK4Y/RsN +9ONS12d6sDA67PTDmA4aOI2X9/T7sDB36HKH13kaJPdOz/sGsbBJOVXmqioN +5gqOWkQnsNDqs/3YWxtjGGBkdhUVE/G3NDrm3jCEPeGFebalLPQNsvoYnWoI +M6V3/b6Xs1Dl2GRiRLghiCv3z+pVsjC/0y3gwXpDsBdUUrzXyMLVh1QbCt4Z +QH130e6uHhZK+/g/jlE2ADuRap2IfhY2npscF1lhAP0bWmdkB1m44trWA/WT ++jBV++2k5zAL7f6ML/g90ged/9bd+fKVhfd9gxLH9+pD/YB5xJkfLPw9LrV/ +82Z9sJPcDGvHWSj5MeLVc6Y++J8IfxE2zcKD7RFdkquI9zUmX5KZY+HC636d +1/N6cOx3tm/tbyK/MYcL74/owSrDW9o7F1iovnZMqeaZHlzZXzu9uMhCm72j +8U+r9OB/YMhezA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07843890588409252}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07843890588409252}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHCRUCF732GWVeZ13Xs9DyE7KSrJSChJlJFVRBpKVlFUvpIG +Gffe7CIaRkmZoVIaWiK7kt/5/XVe79frnPN6Xs/nGedQdx1w8ePl4eFxXsLD +8//rzJvWh6ophWY/O3slNixYmXVfkY0y7z8GRx4NhD7RUgWUer5Ltj8DNmVl +3czRMoQI59t9fP0F8Pn+qZBILUsQG5PJmO9jQ1ix9QnQ2gJv650OTPU1AXW0 +0SdZczdYq359PdH3EuKiU2zuaoTBfB/t/HjfexBniu07opgEzetvFL4omISk +Pz0bLR5kgeLbmk+7tBegVjD410vPKyAZ5HVbYD0fqgiFUJ0Kr0GGnnWdk6sg +xlQmlG9SuAmvctY1TqwSRqEhrxu0oWK41FUsGqEmjIPLjZ2SvxWDu4iG12+6 +MKbbDwc9/V0MQ4lK/3h9hbGF8YEX5EpgOHg5U/KuMLIq+bTuuZbAqOWHKuPt +IigU22Ap/6wE5sazy2L+E0WPy8WOcPcOpBQefc4rJ4bPaBNP4gPLwM5wr7iU +ihja+xZKukWWgeBDF1cNHTGMYDj5KSeVQdKI2qC9uRj6ODYK5l8ug1jlp5+y +9ophwvtCybWdZRCcL/tPvVYMuetd5J7JlcOmvApt+x3ieK+kKbYtqhxkskZO +ZV6WQK9FXq0+rQqQ1bqbNFckgRLHFG83rKsA+abkozvLJfCU9JoVhUYVQBpf +E67RLIGKdu9CvKEC1BxCvOtGJdD0ZXrdDZcKMFi6YDxiIIk91ntfHThcARvD +pD/ot0miD+/nz+8bK8B5xeib7C5JDM/8Umb9qAJcCmpe/R2SxKAwdfui1gpw +6/R4/vinJKqmfpjf9rICdmpfq3WXksJum/e6Z0YqYN+HtenHvKXQeuhO2Rp+ +NpzYYmv2ckYKv9ymaoAVG+S5HfK8S6RxALJFQ2zZUCqxZVZvhTSG+eTx5zmy +ofelZ3k6WRqFgs/KfXRlg+qmMOVNNtK4xFlkiOHPhibHq8s6L0pjz7uu23+O +s2HBerrjGVMGdSb6B5sfsCGtKLp4wVoGnePyzNweEc8v4zmps0kGtzX0lIy0 +sMHh0XLzs34yKBc1U/zzORsuradwHFJlsDchkfb0NRtM0D67/a0MDlzdejV7 +jg2H6P95tR6TxTXfB/4e1uSAXb7IlP0ZWaxaJ8DP0OGAskDsyY7zsrjsG+3B +3FoOdHa7VXTdlMUzuffdAow4oBuyku9Nhyx++ef5bxVyYLQosuiXvBzWe0wk +XdjCgQbhj6bhqnJYZe0/IbGVAxfCXJ7P6shhS/ov6bPbOWBloTP3F+Vwa3t7 +6kFPDhS8fm8rECCH35LWMpfv4YCHpNMPBY4c/lHXHA2K5oBBTF3ClXo5bHue +KVUUy4Hl71dLUx/LYdOuUt7BIxyoKeMD9VdymG7wQskkkQPS9jVp6xblcEBN +ya8hhYg/QdXQyl4eJZtUb/DmccDy5+/o4BF5XGUT0uhVw4EomyzNB9/lcbd/ +uZ9QHQdK/9MZkJiRx0u10/xl9RyQ3eJNrxFUQD/+f/SxBg58r340y6ergKu6 +NiYwH3Mg81ha2MXDCviPckpB7iUHWgbXqH5PUEBk3ak/1sWBv4bNXWYpCkhb +VPEd7eaA/+dp/Q+XFTDiQGvTjT4OmDrsmNBtVkBRp+jhmSEOvJdSD34orIgm +SxqN+j5xQOZAg5KMjCI26aolLBnlgEPLtmd7KYooV7b/tcYXDlRGp2iLGihi +OV91+55vHDj9dvzr9m2KGJn1LqvuJ3EeJqcvlfgQ93sJxj0e58BUuordYqAi +atQ7xz6b4ICnpdutwjhFDDGKbX4+yQH9W3UBPwsUsYj15/T1WQ4E8LrKWJQo +YpvtiEX6HAfydow9zrqriGfHI2Wj5jmwTISqbtqiiOOifBTWHw4MHEz+kPRD +EY3t/Ksv/OOA6FNyVt+MImbkhoT7LhL5V6tZr8mjhG/HF9y0ebhQ2vet4Lm4 +Eub/UE5hL+FCAnOTj7yJEtYc9epMW8oFG88rv2gWSujlwBvgyM8Fkfhvia4O +SvhL/koM/zIu5DUfL0rzVsJmr0CVPQJc8P34klYaqIRx5yarxQW5oClAaW0P +U8J3ehovqglX29V+W3ZKCYU8nFNnhbhwNEggTjWTiEeg2ChtOResU7eIWFxW +Qvug6N2qK7jQ/WJsXVyFEqqmueyElVwY36YSMflKCdcJM9+ACBeqokMExD4o +ISXh+AiX8JG8ezm6Y0podJEarSbKhZXDW+v28pLwrOtO73nCXUuuO5xYSULR +48lsj1VcuKTy63WhNAk/BUnl1hHWCDjDM6xJQm7HCcMgMS6MnXyVvmBIwpV3 +eEbvEebeVldRABIaLF9OWyHOhZinh7gmtiQcs/ilvIWwxVijldtmEnqtEbqT +Q1holUjfoZ0kfMGX39tPuFNvx570ABLmpgj9JynBhezNN+dLQ0nY9+2isANh +z/Dp009jSLitsUjpKGG1bAvFr8dJ6Cd54uUdwt+rz90RSCNhpk+mTj9hzsCQ +mdolEuakqq37Rzj675pOi0ISyo/lDJIluWBOivTxLiVhPMtOj0VYEB/+iqsm +4cNr2fpuhDt8xJJym0hoUT48HEj4fKKnVM1TEp7ansyKIexxvbiot5eE1L9f +bU8QVn4yR5saJuHu7QcFzhH+MmrVKvaNhDYXEiIzCJcvz3RfO03CNaZHc9MJ +R2oPf3NYJGGeTlfYGcJmTjpxgUJk1Kv5tDSRMH9ItMhJCTI6JKk6hhN+mv7k +6nUlMn7MnHPyJZzJkdRr1iDjNtvOFY6E3Xt8mob1yLjOR/64PmHqbOnmfwwy +fpuwrpcgPCr794OCNRlbAp+wx4l8lJnaRtCdyXghQySwlXCExwWBre5kDEpO +G7lMmHlkJCdsNxnjq5sowYT58tdpZgST8cuYgoop4bYHcXVlh8noYyH5fQnh +tJE2h2fHyCinpBb3iDhPkobfAcFsMt7Pj10Awh9t2Dzq/5FR7Xb9zxmiXkoC +F9PXF5MR5gXKbxE2Lb3IPdJARsvgB/m8hC37OhbGWsiYkN43W0rUnxPP0g1e +L8moHyN8ZythX5fgV/CRjKfCWo2vEPUbHHNNuXyMjHNb2oSZhA8X9u+jzJHx +bu7whl6i/q1jqEfj+Sn4/Yjj10VhLrSL1l8zWU7BtBR113OEnQvdWsZFKLjs +tdxqBcI7nqWI+chS0PiU54rVRH+FkGeumWtRMKT731dpoh+nOWkt82spmMu0 +qD1F9Gu0jdaPCkMKJsf3/pkj+vl4qLexshkFX+0gDT4l+v9Sc1sL7yYKSlpn +69oR8+JhwNUfzREUNLeM2ZhHzB/bv3Tx2BgKKpR/HO4l5lNHWrexYTwFhzfW +zQsTflUjFF94ioKkDcJPQv9yYGxFmPjxPCJeV5gRJeadbLkNzbqJgox7hq9u +EPPzsuXIjn+PKXgqZTSpmJivyq/i4ivbKeje8vdZMTF/dXg5reo9FFT1H2YV +/OCAxRYlD4FR4vl903X+xPwOmpuIbxGm4hfaz+CNw8Q+CPWX/iROxb3tCo/5 +3nJA8OtAMZ8sFZk2n1jc1xy4Ptjca6ZMxaNmlReEBjnw5v557bvGVFRKVqEm +93Bg43F6/39eVKx4lcBoaeUA6d+d/Q27qehcwhcLLcT+ilDme72Xis+3Kvxh +E/vr5J4VurJhVOR5W1yf2syBRvvXiaknqeiy+P6Y3D1iH4gnrI2poOJ5K932 +uDIO8KRMP8yppOJh3aLBmjtE/vgC3SvrqGjhm2v7q5gD+6Zdjk88ouI17V6r +bTc5UNivOhgwQEWvszdm5vKJ/Xy1JXkLnzJqSLGmU9M5MK+16o2OqzI+u5G7 +TyGEAzOX5RMM3JXx2vw5n4n9xL4SVVOleylj5fV8yYf7iPOYpAda7lVGf763 +NV4BxL6s851xj1PGZHIgLYT4nmizrxI5eV0Z1wsevztrz4FL+zzh/bQyirbL +ZZSqcoBZXJJ/4YIK3lIwUNB+xoZBSvFVq1zCFjyhh9rYEH3h1pWpqypokbzV +u/oJG6oSivJcbqlg9pst4owmNuhvy88RqVfBdL19v1Sq2LCGPyst+Z0KmmCz +/PF8Nkh7xcRHaKviV6OM7rRQNkyI23m7NakiOelqpbYwGz6c8XY7KKCOf6bc +a6zkKsD2Z6TtR2MNlFcy9stQKIfvvoKHuEdXY7yBnNir0TvE/4YM74mmNThy +YPrdh5RiEH+mnlr+UxMjYpsf5DneAsWTZc7GxtrY5RXakzFcBDla9FUSATp4 +MszsidbNQmiTNzeaTNfFmdyU6aizBWCq2JS2tnctbt72MfCddz6I8BWE+Rxb +h44w0Go7kQekBDJzu7oebgqMEhVRuAhCah6VLk/0cJWfVFvHzfOgy5Iri9yp +j5PX1adt72XAwTfizXY8BpjeKudR3HoOfk6ecbXNMcAFnoPSiatSYMPax5ds +dQxRScvApWYmGe5PMv7Mdhhiu7XOxyrxRAjW1h944WeEBxWXsHYOHQXW2O7u +7ULGmJySO5a0NBqsVGUdhQuM0QRWLR7aFQ7cH4+ouwuNMfOg8vuGTeGgWnVo +prbIGEtP2VyXNg+HpXbPr+4pNsaHGrlVH8jh0HQg+Vcz1xitJHiP8r4JA7O6 +qezoJ8b4Z7hnLXqEgbHLi/efvxtjdkTPz3zvQ7A6/vThJhoNTw88fDR8IhTq +Gdf5HUxpWGG8oJ5yOBScZxsyepiE6Z+HcG8oHA6eLhk1p+G51eM6HXah0OLh +/U7EgYZNh/5WHhAJhT10Y7sd3jS8tzX8d0t2CNz69U5h6iQNM7I8D7r4HQBN +P3qD2gANc0bs6i+KBsE5ZaffiUM03KHOs+XL7D6YervL6P0bGobPVwjYDe+D +++5niq+M0LCykP+yWcU+cHF+my3zg4Y0Vm/45OZ9EMU4HiLEY4JVi7O5iXmB +0CL2gvpDzQQHEm6q/qXvBb/7e5K4oSaYk6UTa1foD2P7v0ZahZmgqNXGil+p +/nBYKWhfb4QJxsjcsy+J8ofTsQdc5mJM8P7h4sTNG/2h3DSCwkw2wZDgf49D +/vjB38rE+uZLJjgcEfp+yM0PMsquTL1sNkHz7/NHdeV3Q0N+9+4JKTrejsZv +Ozt9YNiB6hUhS8cWoGe5N/gAz/z+7X/k6ahhmhnsV+oDFpsEnPgpdFxHEU+/ +fsYHHi8xpclp0rFOuTKhw9YHnu66KmRuRsdPAwtNtY+9YUA1sDTNn45F0XGu +Eee9YOrm4uzaKjoKKzzoq/61Az65WeefqqFjq+8HLbFXO6B/6VmbkTo6rlXf +aH6kYQfUectfvNBIx02khMMXzuyAY7JGpgutdHz21e/8PY0dsOpkYGzbEB0t +ezKTB3zcQTugh8eP1xSnEgaPjn/YBr5qxUKXHE3xs6fLwWIVN4h+5Bmo7myK +Wm8fKQkJu0Gan3g728UUX+YVusbMuEL99agz7VtNUfMur/blVleQVLcRXfAx +xUSx+/e7Q1zhsfpHSe8IU1x6L2iKv3kLaK4mU9SvmiJrUFV9WcRmmNDMNGaP +m2K1vk+7lcQm6H9KlPakKXZZjO5O4N0EjcFjm8OmTVFm6Gd1+4QzpLJtQ41/ +m+Jt78DdZzqdQdOUp6SWj4H8tzvO16c6wy7b/dRmaQZGPusZ6hB2hu6ADSu7 +mQws9JbVHNZ2gurCP++mTzJQazFB5OEVOzBeHzZrl8LABdyzKyrJDu6++74y +/ywD82wMpK0D7YBNekOzy2CgKL3NVc3YDkpyGs9eyWXgfw+yzec7bCH/zHH6 +hlIGSp2t2vx5qS2cChNNz+lioDdVrnNXwgYQlDhZ9KOHgaY/JPTf790AyRU8 +9Rb9DGzsbGuLcNkASWMTn74PMTDrH7/nW5UNcGRPN9P8EwOLVVRYJU+s4aDH +xdEvcwzsfKOboi5hDe6WKsggMfGNrMsn7RpLWOgWFGmmMPEk1T8hqMAS8v3G +Bu1UmLhAXVnTlGIJn5JrIt1XM7HcuraM7WkJB1s3lkXpM1H83caLV/gt4bRT +LKnamokGS7yPnt+6Hmq39fw1PMDEsRcQELPCAnZ+qW2rD2XicusbBXtnzYEn +Oj/HMoyJVWcvUINGzME6d5/hligmHvmys+BOnTm8fL0k6FAiE6fnL9VT9pvD +1126gxXZTGyvNPpU1YWgsP9EjW4jE+Vtnoft8gRIXfQ3Smli4pon9cJ7WAC8 +GdYVnx8ysXR/v9FZRYCvlfy38luZuD3DutVo0AxqeZJyxLuYmC9UL7uw3Qzc +s+IjZz4ykRK6IsxxJwty6qKM7q9gYYG8b4F5NANWOm2vkBdhYdrpbXPLdjIg +fthEJ3IVC/Wmdt0ZBQbs4Z9TXSfFwv23tnXxLGMAbWOEZAGJhXucePYmZJpC +7/uDk8f1WKjxOO1RKYcOUsuDKhy3srA7alZCWtAECtfHRY9vZ2HXZK4Y/RsN +9ONS12d6sDA67PTDmA4aOI2X9/T7sDB36HKH13kaJPdOz/sGsbBJOVXmqioN +5gqOWkQnsNDqs/3YWxtjGGBkdhUVE/G3NDrm3jCEPeGFebalLPQNsvoYnWoI +M6V3/b6Xs1Dl2GRiRLghiCv3z+pVsjC/0y3gwXpDsBdUUrzXyMLVh1QbCt4Z +QH130e6uHhZK+/g/jlE2ADuRap2IfhY2npscF1lhAP0bWmdkB1m44trWA/WT ++jBV++2k5zAL7f6ML/g90ged/9bd+fKVhfd9gxLH9+pD/YB5xJkfLPw9LrV/ +82Z9sJPcDGvHWSj5MeLVc6Y++J8IfxE2zcKD7RFdkquI9zUmX5KZY+HC636d +1/N6cOx3tm/tbyK/MYcL74/owSrDW9o7F1iovnZMqeaZHlzZXzu9uMhCm72j +8U+r9OB/YMhezA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07843890588409252}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07843890588409252}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357861331256*^9}, + CellLabel-> + "Out[140]=",ExpressionUUID->"3a3c6139-3ddd-4ef9-ab3a-64e4e0419bcf"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"4ad58a38-0776-\ -5240-aa41-ba7c8ff64fb9"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[141]:=",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vf8bAHCRUCF732GWVeZ13Xs9DyE7KSrJSChJlJFVRBpKVlFUvpIG +Gffe7CIaRkmZoVIaWiK7kt/5/XVe79frnPN6Xs/nGedQdx1w8ePl4eFxXsLD +8//rzJvWh6ophWY/O3slNixYmXVfkY0y7z8GRx4NhD7RUgWUer5Ltj8DNmVl +3czRMoQI59t9fP0F8Pn+qZBILUsQG5PJmO9jQ1ix9QnQ2gJv650OTPU1AXW0 +0SdZczdYq359PdH3EuKiU2zuaoTBfB/t/HjfexBniu07opgEzetvFL4omISk +Pz0bLR5kgeLbmk+7tBegVjD410vPKyAZ5HVbYD0fqgiFUJ0Kr0GGnnWdk6sg +xlQmlG9SuAmvctY1TqwSRqEhrxu0oWK41FUsGqEmjIPLjZ2SvxWDu4iG12+6 +MKbbDwc9/V0MQ4lK/3h9hbGF8YEX5EpgOHg5U/KuMLIq+bTuuZbAqOWHKuPt +IigU22Ap/6wE5sazy2L+E0WPy8WOcPcOpBQefc4rJ4bPaBNP4gPLwM5wr7iU +ihja+xZKukWWgeBDF1cNHTGMYDj5KSeVQdKI2qC9uRj6ODYK5l8ug1jlp5+y +9ophwvtCybWdZRCcL/tPvVYMuetd5J7JlcOmvApt+x3ieK+kKbYtqhxkskZO +ZV6WQK9FXq0+rQqQ1bqbNFckgRLHFG83rKsA+abkozvLJfCU9JoVhUYVQBpf +E67RLIGKdu9CvKEC1BxCvOtGJdD0ZXrdDZcKMFi6YDxiIIk91ntfHThcARvD +pD/ot0miD+/nz+8bK8B5xeib7C5JDM/8Umb9qAJcCmpe/R2SxKAwdfui1gpw +6/R4/vinJKqmfpjf9rICdmpfq3WXksJum/e6Z0YqYN+HtenHvKXQeuhO2Rp+ +NpzYYmv2ckYKv9ymaoAVG+S5HfK8S6RxALJFQ2zZUCqxZVZvhTSG+eTx5zmy +ofelZ3k6WRqFgs/KfXRlg+qmMOVNNtK4xFlkiOHPhibHq8s6L0pjz7uu23+O +s2HBerrjGVMGdSb6B5sfsCGtKLp4wVoGnePyzNweEc8v4zmps0kGtzX0lIy0 +sMHh0XLzs34yKBc1U/zzORsuradwHFJlsDchkfb0NRtM0D67/a0MDlzdejV7 +jg2H6P95tR6TxTXfB/4e1uSAXb7IlP0ZWaxaJ8DP0OGAskDsyY7zsrjsG+3B +3FoOdHa7VXTdlMUzuffdAow4oBuyku9Nhyx++ef5bxVyYLQosuiXvBzWe0wk +XdjCgQbhj6bhqnJYZe0/IbGVAxfCXJ7P6shhS/ov6bPbOWBloTP3F+Vwa3t7 +6kFPDhS8fm8rECCH35LWMpfv4YCHpNMPBY4c/lHXHA2K5oBBTF3ClXo5bHue +KVUUy4Hl71dLUx/LYdOuUt7BIxyoKeMD9VdymG7wQskkkQPS9jVp6xblcEBN +ya8hhYg/QdXQyl4eJZtUb/DmccDy5+/o4BF5XGUT0uhVw4EomyzNB9/lcbd/ +uZ9QHQdK/9MZkJiRx0u10/xl9RyQ3eJNrxFUQD/+f/SxBg58r340y6ergKu6 +NiYwH3Mg81ha2MXDCviPckpB7iUHWgbXqH5PUEBk3ak/1sWBv4bNXWYpCkhb +VPEd7eaA/+dp/Q+XFTDiQGvTjT4OmDrsmNBtVkBRp+jhmSEOvJdSD34orIgm +SxqN+j5xQOZAg5KMjCI26aolLBnlgEPLtmd7KYooV7b/tcYXDlRGp2iLGihi +OV91+55vHDj9dvzr9m2KGJn1LqvuJ3EeJqcvlfgQ93sJxj0e58BUuordYqAi +atQ7xz6b4ICnpdutwjhFDDGKbX4+yQH9W3UBPwsUsYj15/T1WQ4E8LrKWJQo +YpvtiEX6HAfydow9zrqriGfHI2Wj5jmwTISqbtqiiOOifBTWHw4MHEz+kPRD +EY3t/Ksv/OOA6FNyVt+MImbkhoT7LhL5V6tZr8mjhG/HF9y0ebhQ2vet4Lm4 +Eub/UE5hL+FCAnOTj7yJEtYc9epMW8oFG88rv2gWSujlwBvgyM8Fkfhvia4O +SvhL/koM/zIu5DUfL0rzVsJmr0CVPQJc8P34klYaqIRx5yarxQW5oClAaW0P +U8J3ehovqglX29V+W3ZKCYU8nFNnhbhwNEggTjWTiEeg2ChtOResU7eIWFxW +Qvug6N2qK7jQ/WJsXVyFEqqmueyElVwY36YSMflKCdcJM9+ACBeqokMExD4o +ISXh+AiX8JG8ezm6Y0podJEarSbKhZXDW+v28pLwrOtO73nCXUuuO5xYSULR +48lsj1VcuKTy63WhNAk/BUnl1hHWCDjDM6xJQm7HCcMgMS6MnXyVvmBIwpV3 +eEbvEebeVldRABIaLF9OWyHOhZinh7gmtiQcs/ilvIWwxVijldtmEnqtEbqT +Q1holUjfoZ0kfMGX39tPuFNvx570ABLmpgj9JynBhezNN+dLQ0nY9+2isANh +z/Dp009jSLitsUjpKGG1bAvFr8dJ6Cd54uUdwt+rz90RSCNhpk+mTj9hzsCQ +mdolEuakqq37Rzj675pOi0ISyo/lDJIluWBOivTxLiVhPMtOj0VYEB/+iqsm +4cNr2fpuhDt8xJJym0hoUT48HEj4fKKnVM1TEp7ansyKIexxvbiot5eE1L9f +bU8QVn4yR5saJuHu7QcFzhH+MmrVKvaNhDYXEiIzCJcvz3RfO03CNaZHc9MJ +R2oPf3NYJGGeTlfYGcJmTjpxgUJk1Kv5tDSRMH9ItMhJCTI6JKk6hhN+mv7k +6nUlMn7MnHPyJZzJkdRr1iDjNtvOFY6E3Xt8mob1yLjOR/64PmHqbOnmfwwy +fpuwrpcgPCr794OCNRlbAp+wx4l8lJnaRtCdyXghQySwlXCExwWBre5kDEpO +G7lMmHlkJCdsNxnjq5sowYT58tdpZgST8cuYgoop4bYHcXVlh8noYyH5fQnh +tJE2h2fHyCinpBb3iDhPkobfAcFsMt7Pj10Awh9t2Dzq/5FR7Xb9zxmiXkoC +F9PXF5MR5gXKbxE2Lb3IPdJARsvgB/m8hC37OhbGWsiYkN43W0rUnxPP0g1e +L8moHyN8ZythX5fgV/CRjKfCWo2vEPUbHHNNuXyMjHNb2oSZhA8X9u+jzJHx +bu7whl6i/q1jqEfj+Sn4/Yjj10VhLrSL1l8zWU7BtBR113OEnQvdWsZFKLjs +tdxqBcI7nqWI+chS0PiU54rVRH+FkGeumWtRMKT731dpoh+nOWkt82spmMu0 +qD1F9Gu0jdaPCkMKJsf3/pkj+vl4qLexshkFX+0gDT4l+v9Sc1sL7yYKSlpn +69oR8+JhwNUfzREUNLeM2ZhHzB/bv3Tx2BgKKpR/HO4l5lNHWrexYTwFhzfW +zQsTflUjFF94ioKkDcJPQv9yYGxFmPjxPCJeV5gRJeadbLkNzbqJgox7hq9u +EPPzsuXIjn+PKXgqZTSpmJivyq/i4ivbKeje8vdZMTF/dXg5reo9FFT1H2YV +/OCAxRYlD4FR4vl903X+xPwOmpuIbxGm4hfaz+CNw8Q+CPWX/iROxb3tCo/5 +3nJA8OtAMZ8sFZk2n1jc1xy4Ptjca6ZMxaNmlReEBjnw5v557bvGVFRKVqEm +93Bg43F6/39eVKx4lcBoaeUA6d+d/Q27qehcwhcLLcT+ilDme72Xis+3Kvxh +E/vr5J4VurJhVOR5W1yf2syBRvvXiaknqeiy+P6Y3D1iH4gnrI2poOJ5K932 +uDIO8KRMP8yppOJh3aLBmjtE/vgC3SvrqGjhm2v7q5gD+6Zdjk88ouI17V6r +bTc5UNivOhgwQEWvszdm5vKJ/Xy1JXkLnzJqSLGmU9M5MK+16o2OqzI+u5G7 +TyGEAzOX5RMM3JXx2vw5n4n9xL4SVVOleylj5fV8yYf7iPOYpAda7lVGf763 +NV4BxL6s851xj1PGZHIgLYT4nmizrxI5eV0Z1wsevztrz4FL+zzh/bQyirbL +ZZSqcoBZXJJ/4YIK3lIwUNB+xoZBSvFVq1zCFjyhh9rYEH3h1pWpqypokbzV +u/oJG6oSivJcbqlg9pst4owmNuhvy88RqVfBdL19v1Sq2LCGPyst+Z0KmmCz +/PF8Nkh7xcRHaKviV6OM7rRQNkyI23m7NakiOelqpbYwGz6c8XY7KKCOf6bc +a6zkKsD2Z6TtR2MNlFcy9stQKIfvvoKHuEdXY7yBnNir0TvE/4YM74mmNThy +YPrdh5RiEH+mnlr+UxMjYpsf5DneAsWTZc7GxtrY5RXakzFcBDla9FUSATp4 +MszsidbNQmiTNzeaTNfFmdyU6aizBWCq2JS2tnctbt72MfCddz6I8BWE+Rxb +h44w0Go7kQekBDJzu7oebgqMEhVRuAhCah6VLk/0cJWfVFvHzfOgy5Iri9yp +j5PX1adt72XAwTfizXY8BpjeKudR3HoOfk6ecbXNMcAFnoPSiatSYMPax5ds +dQxRScvApWYmGe5PMv7Mdhhiu7XOxyrxRAjW1h944WeEBxWXsHYOHQXW2O7u +7ULGmJySO5a0NBqsVGUdhQuM0QRWLR7aFQ7cH4+ouwuNMfOg8vuGTeGgWnVo +prbIGEtP2VyXNg+HpXbPr+4pNsaHGrlVH8jh0HQg+Vcz1xitJHiP8r4JA7O6 +qezoJ8b4Z7hnLXqEgbHLi/efvxtjdkTPz3zvQ7A6/vThJhoNTw88fDR8IhTq +Gdf5HUxpWGG8oJ5yOBScZxsyepiE6Z+HcG8oHA6eLhk1p+G51eM6HXah0OLh +/U7EgYZNh/5WHhAJhT10Y7sd3jS8tzX8d0t2CNz69U5h6iQNM7I8D7r4HQBN +P3qD2gANc0bs6i+KBsE5ZaffiUM03KHOs+XL7D6YervL6P0bGobPVwjYDe+D +++5niq+M0LCykP+yWcU+cHF+my3zg4Y0Vm/45OZ9EMU4HiLEY4JVi7O5iXmB +0CL2gvpDzQQHEm6q/qXvBb/7e5K4oSaYk6UTa1foD2P7v0ZahZmgqNXGil+p +/nBYKWhfb4QJxsjcsy+J8ofTsQdc5mJM8P7h4sTNG/2h3DSCwkw2wZDgf49D +/vjB38rE+uZLJjgcEfp+yM0PMsquTL1sNkHz7/NHdeV3Q0N+9+4JKTrejsZv +Ozt9YNiB6hUhS8cWoGe5N/gAz/z+7X/k6ahhmhnsV+oDFpsEnPgpdFxHEU+/ +fsYHHi8xpclp0rFOuTKhw9YHnu66KmRuRsdPAwtNtY+9YUA1sDTNn45F0XGu +Eee9YOrm4uzaKjoKKzzoq/61Az65WeefqqFjq+8HLbFXO6B/6VmbkTo6rlXf +aH6kYQfUectfvNBIx02khMMXzuyAY7JGpgutdHz21e/8PY0dsOpkYGzbEB0t +ezKTB3zcQTugh8eP1xSnEgaPjn/YBr5qxUKXHE3xs6fLwWIVN4h+5Bmo7myK +Wm8fKQkJu0Gan3g728UUX+YVusbMuEL99agz7VtNUfMur/blVleQVLcRXfAx +xUSx+/e7Q1zhsfpHSe8IU1x6L2iKv3kLaK4mU9SvmiJrUFV9WcRmmNDMNGaP +m2K1vk+7lcQm6H9KlPakKXZZjO5O4N0EjcFjm8OmTVFm6Gd1+4QzpLJtQ41/ +m+Jt78DdZzqdQdOUp6SWj4H8tzvO16c6wy7b/dRmaQZGPusZ6hB2hu6ADSu7 +mQws9JbVHNZ2gurCP++mTzJQazFB5OEVOzBeHzZrl8LABdyzKyrJDu6++74y +/ywD82wMpK0D7YBNekOzy2CgKL3NVc3YDkpyGs9eyWXgfw+yzec7bCH/zHH6 +hlIGSp2t2vx5qS2cChNNz+lioDdVrnNXwgYQlDhZ9KOHgaY/JPTf790AyRU8 +9Rb9DGzsbGuLcNkASWMTn74PMTDrH7/nW5UNcGRPN9P8EwOLVVRYJU+s4aDH +xdEvcwzsfKOboi5hDe6WKsggMfGNrMsn7RpLWOgWFGmmMPEk1T8hqMAS8v3G +Bu1UmLhAXVnTlGIJn5JrIt1XM7HcuraM7WkJB1s3lkXpM1H83caLV/gt4bRT +LKnamokGS7yPnt+6Hmq39fw1PMDEsRcQELPCAnZ+qW2rD2XicusbBXtnzYEn +Oj/HMoyJVWcvUINGzME6d5/hligmHvmys+BOnTm8fL0k6FAiE6fnL9VT9pvD +1126gxXZTGyvNPpU1YWgsP9EjW4jE+Vtnoft8gRIXfQ3Smli4pon9cJ7WAC8 +GdYVnx8ysXR/v9FZRYCvlfy38luZuD3DutVo0AxqeZJyxLuYmC9UL7uw3Qzc +s+IjZz4ykRK6IsxxJwty6qKM7q9gYYG8b4F5NANWOm2vkBdhYdrpbXPLdjIg +fthEJ3IVC/Wmdt0ZBQbs4Z9TXSfFwv23tnXxLGMAbWOEZAGJhXucePYmZJpC +7/uDk8f1WKjxOO1RKYcOUsuDKhy3srA7alZCWtAECtfHRY9vZ2HXZK4Y/RsN +9ONS12d6sDA67PTDmA4aOI2X9/T7sDB36HKH13kaJPdOz/sGsbBJOVXmqioN +5gqOWkQnsNDqs/3YWxtjGGBkdhUVE/G3NDrm3jCEPeGFebalLPQNsvoYnWoI +M6V3/b6Xs1Dl2GRiRLghiCv3z+pVsjC/0y3gwXpDsBdUUrzXyMLVh1QbCt4Z +QH130e6uHhZK+/g/jlE2ADuRap2IfhY2npscF1lhAP0bWmdkB1m44trWA/WT ++jBV++2k5zAL7f6ML/g90ged/9bd+fKVhfd9gxLH9+pD/YB5xJkfLPw9LrV/ +82Z9sJPcDGvHWSj5MeLVc6Y++J8IfxE2zcKD7RFdkquI9zUmX5KZY+HC636d +1/N6cOx3tm/tbyK/MYcL74/owSrDW9o7F1iovnZMqeaZHlzZXzu9uMhCm72j +8U+r9OB/YMhezA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHCRUCF732GWVeZ13Xs9DyE7KSrJSChJlJFVRBpKVlFUvpIG +Gffe7CIaRkmZoVIaWiK7kt/5/XVe79frnPN6Xs/nGedQdx1w8ePl4eFxXsLD +8//rzJvWh6ophWY/O3slNixYmXVfkY0y7z8GRx4NhD7RUgWUer5Ltj8DNmVl +3czRMoQI59t9fP0F8Pn+qZBILUsQG5PJmO9jQ1ix9QnQ2gJv650OTPU1AXW0 +0SdZczdYq359PdH3EuKiU2zuaoTBfB/t/HjfexBniu07opgEzetvFL4omISk +Pz0bLR5kgeLbmk+7tBegVjD410vPKyAZ5HVbYD0fqgiFUJ0Kr0GGnnWdk6sg +xlQmlG9SuAmvctY1TqwSRqEhrxu0oWK41FUsGqEmjIPLjZ2SvxWDu4iG12+6 +MKbbDwc9/V0MQ4lK/3h9hbGF8YEX5EpgOHg5U/KuMLIq+bTuuZbAqOWHKuPt +IigU22Ap/6wE5sazy2L+E0WPy8WOcPcOpBQefc4rJ4bPaBNP4gPLwM5wr7iU +ihja+xZKukWWgeBDF1cNHTGMYDj5KSeVQdKI2qC9uRj6ODYK5l8ug1jlp5+y +9ophwvtCybWdZRCcL/tPvVYMuetd5J7JlcOmvApt+x3ieK+kKbYtqhxkskZO +ZV6WQK9FXq0+rQqQ1bqbNFckgRLHFG83rKsA+abkozvLJfCU9JoVhUYVQBpf +E67RLIGKdu9CvKEC1BxCvOtGJdD0ZXrdDZcKMFi6YDxiIIk91ntfHThcARvD +pD/ot0miD+/nz+8bK8B5xeib7C5JDM/8Umb9qAJcCmpe/R2SxKAwdfui1gpw +6/R4/vinJKqmfpjf9rICdmpfq3WXksJum/e6Z0YqYN+HtenHvKXQeuhO2Rp+ +NpzYYmv2ckYKv9ymaoAVG+S5HfK8S6RxALJFQ2zZUCqxZVZvhTSG+eTx5zmy +ofelZ3k6WRqFgs/KfXRlg+qmMOVNNtK4xFlkiOHPhibHq8s6L0pjz7uu23+O +s2HBerrjGVMGdSb6B5sfsCGtKLp4wVoGnePyzNweEc8v4zmps0kGtzX0lIy0 +sMHh0XLzs34yKBc1U/zzORsuradwHFJlsDchkfb0NRtM0D67/a0MDlzdejV7 +jg2H6P95tR6TxTXfB/4e1uSAXb7IlP0ZWaxaJ8DP0OGAskDsyY7zsrjsG+3B +3FoOdHa7VXTdlMUzuffdAow4oBuyku9Nhyx++ef5bxVyYLQosuiXvBzWe0wk +XdjCgQbhj6bhqnJYZe0/IbGVAxfCXJ7P6shhS/ov6bPbOWBloTP3F+Vwa3t7 +6kFPDhS8fm8rECCH35LWMpfv4YCHpNMPBY4c/lHXHA2K5oBBTF3ClXo5bHue +KVUUy4Hl71dLUx/LYdOuUt7BIxyoKeMD9VdymG7wQskkkQPS9jVp6xblcEBN +ya8hhYg/QdXQyl4eJZtUb/DmccDy5+/o4BF5XGUT0uhVw4EomyzNB9/lcbd/ +uZ9QHQdK/9MZkJiRx0u10/xl9RyQ3eJNrxFUQD/+f/SxBg58r340y6ergKu6 +NiYwH3Mg81ha2MXDCviPckpB7iUHWgbXqH5PUEBk3ak/1sWBv4bNXWYpCkhb +VPEd7eaA/+dp/Q+XFTDiQGvTjT4OmDrsmNBtVkBRp+jhmSEOvJdSD34orIgm +SxqN+j5xQOZAg5KMjCI26aolLBnlgEPLtmd7KYooV7b/tcYXDlRGp2iLGihi +OV91+55vHDj9dvzr9m2KGJn1LqvuJ3EeJqcvlfgQ93sJxj0e58BUuordYqAi +atQ7xz6b4ICnpdutwjhFDDGKbX4+yQH9W3UBPwsUsYj15/T1WQ4E8LrKWJQo +YpvtiEX6HAfydow9zrqriGfHI2Wj5jmwTISqbtqiiOOifBTWHw4MHEz+kPRD +EY3t/Ksv/OOA6FNyVt+MImbkhoT7LhL5V6tZr8mjhG/HF9y0ebhQ2vet4Lm4 +Eub/UE5hL+FCAnOTj7yJEtYc9epMW8oFG88rv2gWSujlwBvgyM8Fkfhvia4O +SvhL/koM/zIu5DUfL0rzVsJmr0CVPQJc8P34klYaqIRx5yarxQW5oClAaW0P +U8J3ehovqglX29V+W3ZKCYU8nFNnhbhwNEggTjWTiEeg2ChtOResU7eIWFxW +Qvug6N2qK7jQ/WJsXVyFEqqmueyElVwY36YSMflKCdcJM9+ACBeqokMExD4o +ISXh+AiX8JG8ezm6Y0podJEarSbKhZXDW+v28pLwrOtO73nCXUuuO5xYSULR +48lsj1VcuKTy63WhNAk/BUnl1hHWCDjDM6xJQm7HCcMgMS6MnXyVvmBIwpV3 +eEbvEebeVldRABIaLF9OWyHOhZinh7gmtiQcs/ilvIWwxVijldtmEnqtEbqT +Q1holUjfoZ0kfMGX39tPuFNvx570ABLmpgj9JynBhezNN+dLQ0nY9+2isANh +z/Dp009jSLitsUjpKGG1bAvFr8dJ6Cd54uUdwt+rz90RSCNhpk+mTj9hzsCQ +mdolEuakqq37Rzj675pOi0ISyo/lDJIluWBOivTxLiVhPMtOj0VYEB/+iqsm +4cNr2fpuhDt8xJJym0hoUT48HEj4fKKnVM1TEp7ansyKIexxvbiot5eE1L9f +bU8QVn4yR5saJuHu7QcFzhH+MmrVKvaNhDYXEiIzCJcvz3RfO03CNaZHc9MJ +R2oPf3NYJGGeTlfYGcJmTjpxgUJk1Kv5tDSRMH9ItMhJCTI6JKk6hhN+mv7k +6nUlMn7MnHPyJZzJkdRr1iDjNtvOFY6E3Xt8mob1yLjOR/64PmHqbOnmfwwy +fpuwrpcgPCr794OCNRlbAp+wx4l8lJnaRtCdyXghQySwlXCExwWBre5kDEpO +G7lMmHlkJCdsNxnjq5sowYT58tdpZgST8cuYgoop4bYHcXVlh8noYyH5fQnh +tJE2h2fHyCinpBb3iDhPkobfAcFsMt7Pj10Awh9t2Dzq/5FR7Xb9zxmiXkoC +F9PXF5MR5gXKbxE2Lb3IPdJARsvgB/m8hC37OhbGWsiYkN43W0rUnxPP0g1e +L8moHyN8ZythX5fgV/CRjKfCWo2vEPUbHHNNuXyMjHNb2oSZhA8X9u+jzJHx +bu7whl6i/q1jqEfj+Sn4/Yjj10VhLrSL1l8zWU7BtBR113OEnQvdWsZFKLjs +tdxqBcI7nqWI+chS0PiU54rVRH+FkGeumWtRMKT731dpoh+nOWkt82spmMu0 +qD1F9Gu0jdaPCkMKJsf3/pkj+vl4qLexshkFX+0gDT4l+v9Sc1sL7yYKSlpn +69oR8+JhwNUfzREUNLeM2ZhHzB/bv3Tx2BgKKpR/HO4l5lNHWrexYTwFhzfW +zQsTflUjFF94ioKkDcJPQv9yYGxFmPjxPCJeV5gRJeadbLkNzbqJgox7hq9u +EPPzsuXIjn+PKXgqZTSpmJivyq/i4ivbKeje8vdZMTF/dXg5reo9FFT1H2YV +/OCAxRYlD4FR4vl903X+xPwOmpuIbxGm4hfaz+CNw8Q+CPWX/iROxb3tCo/5 +3nJA8OtAMZ8sFZk2n1jc1xy4Ptjca6ZMxaNmlReEBjnw5v557bvGVFRKVqEm +93Bg43F6/39eVKx4lcBoaeUA6d+d/Q27qehcwhcLLcT+ilDme72Xis+3Kvxh +E/vr5J4VurJhVOR5W1yf2syBRvvXiaknqeiy+P6Y3D1iH4gnrI2poOJ5K932 +uDIO8KRMP8yppOJh3aLBmjtE/vgC3SvrqGjhm2v7q5gD+6Zdjk88ouI17V6r +bTc5UNivOhgwQEWvszdm5vKJ/Xy1JXkLnzJqSLGmU9M5MK+16o2OqzI+u5G7 +TyGEAzOX5RMM3JXx2vw5n4n9xL4SVVOleylj5fV8yYf7iPOYpAda7lVGf763 +NV4BxL6s851xj1PGZHIgLYT4nmizrxI5eV0Z1wsevztrz4FL+zzh/bQyirbL +ZZSqcoBZXJJ/4YIK3lIwUNB+xoZBSvFVq1zCFjyhh9rYEH3h1pWpqypokbzV +u/oJG6oSivJcbqlg9pst4owmNuhvy88RqVfBdL19v1Sq2LCGPyst+Z0KmmCz +/PF8Nkh7xcRHaKviV6OM7rRQNkyI23m7NakiOelqpbYwGz6c8XY7KKCOf6bc +a6zkKsD2Z6TtR2MNlFcy9stQKIfvvoKHuEdXY7yBnNir0TvE/4YM74mmNThy +YPrdh5RiEH+mnlr+UxMjYpsf5DneAsWTZc7GxtrY5RXakzFcBDla9FUSATp4 +MszsidbNQmiTNzeaTNfFmdyU6aizBWCq2JS2tnctbt72MfCddz6I8BWE+Rxb +h44w0Go7kQekBDJzu7oebgqMEhVRuAhCah6VLk/0cJWfVFvHzfOgy5Iri9yp +j5PX1adt72XAwTfizXY8BpjeKudR3HoOfk6ecbXNMcAFnoPSiatSYMPax5ds +dQxRScvApWYmGe5PMv7Mdhhiu7XOxyrxRAjW1h944WeEBxWXsHYOHQXW2O7u +7ULGmJySO5a0NBqsVGUdhQuM0QRWLR7aFQ7cH4+ouwuNMfOg8vuGTeGgWnVo +prbIGEtP2VyXNg+HpXbPr+4pNsaHGrlVH8jh0HQg+Vcz1xitJHiP8r4JA7O6 +qezoJ8b4Z7hnLXqEgbHLi/efvxtjdkTPz3zvQ7A6/vThJhoNTw88fDR8IhTq +Gdf5HUxpWGG8oJ5yOBScZxsyepiE6Z+HcG8oHA6eLhk1p+G51eM6HXah0OLh +/U7EgYZNh/5WHhAJhT10Y7sd3jS8tzX8d0t2CNz69U5h6iQNM7I8D7r4HQBN +P3qD2gANc0bs6i+KBsE5ZaffiUM03KHOs+XL7D6YervL6P0bGobPVwjYDe+D +++5niq+M0LCykP+yWcU+cHF+my3zg4Y0Vm/45OZ9EMU4HiLEY4JVi7O5iXmB +0CL2gvpDzQQHEm6q/qXvBb/7e5K4oSaYk6UTa1foD2P7v0ZahZmgqNXGil+p +/nBYKWhfb4QJxsjcsy+J8ofTsQdc5mJM8P7h4sTNG/2h3DSCwkw2wZDgf49D +/vjB38rE+uZLJjgcEfp+yM0PMsquTL1sNkHz7/NHdeV3Q0N+9+4JKTrejsZv +Ozt9YNiB6hUhS8cWoGe5N/gAz/z+7X/k6ahhmhnsV+oDFpsEnPgpdFxHEU+/ +fsYHHi8xpclp0rFOuTKhw9YHnu66KmRuRsdPAwtNtY+9YUA1sDTNn45F0XGu +Eee9YOrm4uzaKjoKKzzoq/61Az65WeefqqFjq+8HLbFXO6B/6VmbkTo6rlXf +aH6kYQfUectfvNBIx02khMMXzuyAY7JGpgutdHz21e/8PY0dsOpkYGzbEB0t +ezKTB3zcQTugh8eP1xSnEgaPjn/YBr5qxUKXHE3xs6fLwWIVN4h+5Bmo7myK +Wm8fKQkJu0Gan3g728UUX+YVusbMuEL99agz7VtNUfMur/blVleQVLcRXfAx +xUSx+/e7Q1zhsfpHSe8IU1x6L2iKv3kLaK4mU9SvmiJrUFV9WcRmmNDMNGaP +m2K1vk+7lcQm6H9KlPakKXZZjO5O4N0EjcFjm8OmTVFm6Gd1+4QzpLJtQ41/ +m+Jt78DdZzqdQdOUp6SWj4H8tzvO16c6wy7b/dRmaQZGPusZ6hB2hu6ADSu7 +mQws9JbVHNZ2gurCP++mTzJQazFB5OEVOzBeHzZrl8LABdyzKyrJDu6++74y +/ywD82wMpK0D7YBNekOzy2CgKL3NVc3YDkpyGs9eyWXgfw+yzec7bCH/zHH6 +hlIGSp2t2vx5qS2cChNNz+lioDdVrnNXwgYQlDhZ9KOHgaY/JPTf790AyRU8 +9Rb9DGzsbGuLcNkASWMTn74PMTDrH7/nW5UNcGRPN9P8EwOLVVRYJU+s4aDH +xdEvcwzsfKOboi5hDe6WKsggMfGNrMsn7RpLWOgWFGmmMPEk1T8hqMAS8v3G +Bu1UmLhAXVnTlGIJn5JrIt1XM7HcuraM7WkJB1s3lkXpM1H83caLV/gt4bRT +LKnamokGS7yPnt+6Hmq39fw1PMDEsRcQELPCAnZ+qW2rD2XicusbBXtnzYEn +Oj/HMoyJVWcvUINGzME6d5/hligmHvmys+BOnTm8fL0k6FAiE6fnL9VT9pvD +1126gxXZTGyvNPpU1YWgsP9EjW4jE+Vtnoft8gRIXfQ3Smli4pon9cJ7WAC8 +GdYVnx8ysXR/v9FZRYCvlfy38luZuD3DutVo0AxqeZJyxLuYmC9UL7uw3Qzc +s+IjZz4ykRK6IsxxJwty6qKM7q9gYYG8b4F5NANWOm2vkBdhYdrpbXPLdjIg +fthEJ3IVC/Wmdt0ZBQbs4Z9TXSfFwv23tnXxLGMAbWOEZAGJhXucePYmZJpC +7/uDk8f1WKjxOO1RKYcOUsuDKhy3srA7alZCWtAECtfHRY9vZ2HXZK4Y/RsN +9ONS12d6sDA67PTDmA4aOI2X9/T7sDB36HKH13kaJPdOz/sGsbBJOVXmqioN +5gqOWkQnsNDqs/3YWxtjGGBkdhUVE/G3NDrm3jCEPeGFebalLPQNsvoYnWoI +M6V3/b6Xs1Dl2GRiRLghiCv3z+pVsjC/0y3gwXpDsBdUUrzXyMLVh1QbCt4Z +QH130e6uHhZK+/g/jlE2ADuRap2IfhY2npscF1lhAP0bWmdkB1m44trWA/WT ++jBV++2k5zAL7f6ML/g90ged/9bd+fKVhfd9gxLH9+pD/YB5xJkfLPw9LrV/ +82Z9sJPcDGvHWSj5MeLVc6Y++J8IfxE2zcKD7RFdkquI9zUmX5KZY+HC636d +1/N6cOx3tm/tbyK/MYcL74/owSrDW9o7F1iovnZMqeaZHlzZXzu9uMhCm72j +8U+r9OB/YMhezA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07843890588409252}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07843890588409252}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vf8bAHCRUCF732GWVeZ13Xs9DyE7KSrJSChJlJFVRBpKVlFUvpIG +Gffe7CIaRkmZoVIaWiK7kt/5/XVe79frnPN6Xs/nGedQdx1w8ePl4eFxXsLD +8//rzJvWh6ophWY/O3slNixYmXVfkY0y7z8GRx4NhD7RUgWUer5Ltj8DNmVl +3czRMoQI59t9fP0F8Pn+qZBILUsQG5PJmO9jQ1ix9QnQ2gJv650OTPU1AXW0 +0SdZczdYq359PdH3EuKiU2zuaoTBfB/t/HjfexBniu07opgEzetvFL4omISk +Pz0bLR5kgeLbmk+7tBegVjD410vPKyAZ5HVbYD0fqgiFUJ0Kr0GGnnWdk6sg +xlQmlG9SuAmvctY1TqwSRqEhrxu0oWK41FUsGqEmjIPLjZ2SvxWDu4iG12+6 +MKbbDwc9/V0MQ4lK/3h9hbGF8YEX5EpgOHg5U/KuMLIq+bTuuZbAqOWHKuPt +IigU22Ap/6wE5sazy2L+E0WPy8WOcPcOpBQefc4rJ4bPaBNP4gPLwM5wr7iU +ihja+xZKukWWgeBDF1cNHTGMYDj5KSeVQdKI2qC9uRj6ODYK5l8ug1jlp5+y +9ophwvtCybWdZRCcL/tPvVYMuetd5J7JlcOmvApt+x3ieK+kKbYtqhxkskZO +ZV6WQK9FXq0+rQqQ1bqbNFckgRLHFG83rKsA+abkozvLJfCU9JoVhUYVQBpf +E67RLIGKdu9CvKEC1BxCvOtGJdD0ZXrdDZcKMFi6YDxiIIk91ntfHThcARvD +pD/ot0miD+/nz+8bK8B5xeib7C5JDM/8Umb9qAJcCmpe/R2SxKAwdfui1gpw +6/R4/vinJKqmfpjf9rICdmpfq3WXksJum/e6Z0YqYN+HtenHvKXQeuhO2Rp+ +NpzYYmv2ckYKv9ymaoAVG+S5HfK8S6RxALJFQ2zZUCqxZVZvhTSG+eTx5zmy +ofelZ3k6WRqFgs/KfXRlg+qmMOVNNtK4xFlkiOHPhibHq8s6L0pjz7uu23+O +s2HBerrjGVMGdSb6B5sfsCGtKLp4wVoGnePyzNweEc8v4zmps0kGtzX0lIy0 +sMHh0XLzs34yKBc1U/zzORsuradwHFJlsDchkfb0NRtM0D67/a0MDlzdejV7 +jg2H6P95tR6TxTXfB/4e1uSAXb7IlP0ZWaxaJ8DP0OGAskDsyY7zsrjsG+3B +3FoOdHa7VXTdlMUzuffdAow4oBuyku9Nhyx++ef5bxVyYLQosuiXvBzWe0wk +XdjCgQbhj6bhqnJYZe0/IbGVAxfCXJ7P6shhS/ov6bPbOWBloTP3F+Vwa3t7 +6kFPDhS8fm8rECCH35LWMpfv4YCHpNMPBY4c/lHXHA2K5oBBTF3ClXo5bHue +KVUUy4Hl71dLUx/LYdOuUt7BIxyoKeMD9VdymG7wQskkkQPS9jVp6xblcEBN +ya8hhYg/QdXQyl4eJZtUb/DmccDy5+/o4BF5XGUT0uhVw4EomyzNB9/lcbd/ +uZ9QHQdK/9MZkJiRx0u10/xl9RyQ3eJNrxFUQD/+f/SxBg58r340y6ergKu6 +NiYwH3Mg81ha2MXDCviPckpB7iUHWgbXqH5PUEBk3ak/1sWBv4bNXWYpCkhb +VPEd7eaA/+dp/Q+XFTDiQGvTjT4OmDrsmNBtVkBRp+jhmSEOvJdSD34orIgm +SxqN+j5xQOZAg5KMjCI26aolLBnlgEPLtmd7KYooV7b/tcYXDlRGp2iLGihi +OV91+55vHDj9dvzr9m2KGJn1LqvuJ3EeJqcvlfgQ93sJxj0e58BUuordYqAi +atQ7xz6b4ICnpdutwjhFDDGKbX4+yQH9W3UBPwsUsYj15/T1WQ4E8LrKWJQo +YpvtiEX6HAfydow9zrqriGfHI2Wj5jmwTISqbtqiiOOifBTWHw4MHEz+kPRD +EY3t/Ksv/OOA6FNyVt+MImbkhoT7LhL5V6tZr8mjhG/HF9y0ebhQ2vet4Lm4 +Eub/UE5hL+FCAnOTj7yJEtYc9epMW8oFG88rv2gWSujlwBvgyM8Fkfhvia4O +SvhL/koM/zIu5DUfL0rzVsJmr0CVPQJc8P34klYaqIRx5yarxQW5oClAaW0P +U8J3ehovqglX29V+W3ZKCYU8nFNnhbhwNEggTjWTiEeg2ChtOResU7eIWFxW +Qvug6N2qK7jQ/WJsXVyFEqqmueyElVwY36YSMflKCdcJM9+ACBeqokMExD4o +ISXh+AiX8JG8ezm6Y0podJEarSbKhZXDW+v28pLwrOtO73nCXUuuO5xYSULR +48lsj1VcuKTy63WhNAk/BUnl1hHWCDjDM6xJQm7HCcMgMS6MnXyVvmBIwpV3 +eEbvEebeVldRABIaLF9OWyHOhZinh7gmtiQcs/ilvIWwxVijldtmEnqtEbqT +Q1holUjfoZ0kfMGX39tPuFNvx570ABLmpgj9JynBhezNN+dLQ0nY9+2isANh +z/Dp009jSLitsUjpKGG1bAvFr8dJ6Cd54uUdwt+rz90RSCNhpk+mTj9hzsCQ +mdolEuakqq37Rzj675pOi0ISyo/lDJIluWBOivTxLiVhPMtOj0VYEB/+iqsm +4cNr2fpuhDt8xJJym0hoUT48HEj4fKKnVM1TEp7ansyKIexxvbiot5eE1L9f +bU8QVn4yR5saJuHu7QcFzhH+MmrVKvaNhDYXEiIzCJcvz3RfO03CNaZHc9MJ +R2oPf3NYJGGeTlfYGcJmTjpxgUJk1Kv5tDSRMH9ItMhJCTI6JKk6hhN+mv7k +6nUlMn7MnHPyJZzJkdRr1iDjNtvOFY6E3Xt8mob1yLjOR/64PmHqbOnmfwwy +fpuwrpcgPCr794OCNRlbAp+wx4l8lJnaRtCdyXghQySwlXCExwWBre5kDEpO +G7lMmHlkJCdsNxnjq5sowYT58tdpZgST8cuYgoop4bYHcXVlh8noYyH5fQnh +tJE2h2fHyCinpBb3iDhPkobfAcFsMt7Pj10Awh9t2Dzq/5FR7Xb9zxmiXkoC +F9PXF5MR5gXKbxE2Lb3IPdJARsvgB/m8hC37OhbGWsiYkN43W0rUnxPP0g1e +L8moHyN8ZythX5fgV/CRjKfCWo2vEPUbHHNNuXyMjHNb2oSZhA8X9u+jzJHx +bu7whl6i/q1jqEfj+Sn4/Yjj10VhLrSL1l8zWU7BtBR113OEnQvdWsZFKLjs +tdxqBcI7nqWI+chS0PiU54rVRH+FkGeumWtRMKT731dpoh+nOWkt82spmMu0 +qD1F9Gu0jdaPCkMKJsf3/pkj+vl4qLexshkFX+0gDT4l+v9Sc1sL7yYKSlpn +69oR8+JhwNUfzREUNLeM2ZhHzB/bv3Tx2BgKKpR/HO4l5lNHWrexYTwFhzfW +zQsTflUjFF94ioKkDcJPQv9yYGxFmPjxPCJeV5gRJeadbLkNzbqJgox7hq9u +EPPzsuXIjn+PKXgqZTSpmJivyq/i4ivbKeje8vdZMTF/dXg5reo9FFT1H2YV +/OCAxRYlD4FR4vl903X+xPwOmpuIbxGm4hfaz+CNw8Q+CPWX/iROxb3tCo/5 +3nJA8OtAMZ8sFZk2n1jc1xy4Ptjca6ZMxaNmlReEBjnw5v557bvGVFRKVqEm +93Bg43F6/39eVKx4lcBoaeUA6d+d/Q27qehcwhcLLcT+ilDme72Xis+3Kvxh +E/vr5J4VurJhVOR5W1yf2syBRvvXiaknqeiy+P6Y3D1iH4gnrI2poOJ5K932 +uDIO8KRMP8yppOJh3aLBmjtE/vgC3SvrqGjhm2v7q5gD+6Zdjk88ouI17V6r +bTc5UNivOhgwQEWvszdm5vKJ/Xy1JXkLnzJqSLGmU9M5MK+16o2OqzI+u5G7 +TyGEAzOX5RMM3JXx2vw5n4n9xL4SVVOleylj5fV8yYf7iPOYpAda7lVGf763 +NV4BxL6s851xj1PGZHIgLYT4nmizrxI5eV0Z1wsevztrz4FL+zzh/bQyirbL +ZZSqcoBZXJJ/4YIK3lIwUNB+xoZBSvFVq1zCFjyhh9rYEH3h1pWpqypokbzV +u/oJG6oSivJcbqlg9pst4owmNuhvy88RqVfBdL19v1Sq2LCGPyst+Z0KmmCz +/PF8Nkh7xcRHaKviV6OM7rRQNkyI23m7NakiOelqpbYwGz6c8XY7KKCOf6bc +a6zkKsD2Z6TtR2MNlFcy9stQKIfvvoKHuEdXY7yBnNir0TvE/4YM74mmNThy +YPrdh5RiEH+mnlr+UxMjYpsf5DneAsWTZc7GxtrY5RXakzFcBDla9FUSATp4 +MszsidbNQmiTNzeaTNfFmdyU6aizBWCq2JS2tnctbt72MfCddz6I8BWE+Rxb +h44w0Go7kQekBDJzu7oebgqMEhVRuAhCah6VLk/0cJWfVFvHzfOgy5Iri9yp +j5PX1adt72XAwTfizXY8BpjeKudR3HoOfk6ecbXNMcAFnoPSiatSYMPax5ds +dQxRScvApWYmGe5PMv7Mdhhiu7XOxyrxRAjW1h944WeEBxWXsHYOHQXW2O7u +7ULGmJySO5a0NBqsVGUdhQuM0QRWLR7aFQ7cH4+ouwuNMfOg8vuGTeGgWnVo +prbIGEtP2VyXNg+HpXbPr+4pNsaHGrlVH8jh0HQg+Vcz1xitJHiP8r4JA7O6 +qezoJ8b4Z7hnLXqEgbHLi/efvxtjdkTPz3zvQ7A6/vThJhoNTw88fDR8IhTq +Gdf5HUxpWGG8oJ5yOBScZxsyepiE6Z+HcG8oHA6eLhk1p+G51eM6HXah0OLh +/U7EgYZNh/5WHhAJhT10Y7sd3jS8tzX8d0t2CNz69U5h6iQNM7I8D7r4HQBN +P3qD2gANc0bs6i+KBsE5ZaffiUM03KHOs+XL7D6YervL6P0bGobPVwjYDe+D +++5niq+M0LCykP+yWcU+cHF+my3zg4Y0Vm/45OZ9EMU4HiLEY4JVi7O5iXmB +0CL2gvpDzQQHEm6q/qXvBb/7e5K4oSaYk6UTa1foD2P7v0ZahZmgqNXGil+p +/nBYKWhfb4QJxsjcsy+J8ofTsQdc5mJM8P7h4sTNG/2h3DSCwkw2wZDgf49D +/vjB38rE+uZLJjgcEfp+yM0PMsquTL1sNkHz7/NHdeV3Q0N+9+4JKTrejsZv +Ozt9YNiB6hUhS8cWoGe5N/gAz/z+7X/k6ahhmhnsV+oDFpsEnPgpdFxHEU+/ +fsYHHi8xpclp0rFOuTKhw9YHnu66KmRuRsdPAwtNtY+9YUA1sDTNn45F0XGu +Eee9YOrm4uzaKjoKKzzoq/61Az65WeefqqFjq+8HLbFXO6B/6VmbkTo6rlXf +aH6kYQfUectfvNBIx02khMMXzuyAY7JGpgutdHz21e/8PY0dsOpkYGzbEB0t +ezKTB3zcQTugh8eP1xSnEgaPjn/YBr5qxUKXHE3xs6fLwWIVN4h+5Bmo7myK +Wm8fKQkJu0Gan3g728UUX+YVusbMuEL99agz7VtNUfMur/blVleQVLcRXfAx +xUSx+/e7Q1zhsfpHSe8IU1x6L2iKv3kLaK4mU9SvmiJrUFV9WcRmmNDMNGaP +m2K1vk+7lcQm6H9KlPakKXZZjO5O4N0EjcFjm8OmTVFm6Gd1+4QzpLJtQ41/ +m+Jt78DdZzqdQdOUp6SWj4H8tzvO16c6wy7b/dRmaQZGPusZ6hB2hu6ADSu7 +mQws9JbVHNZ2gurCP++mTzJQazFB5OEVOzBeHzZrl8LABdyzKyrJDu6++74y +/ywD82wMpK0D7YBNekOzy2CgKL3NVc3YDkpyGs9eyWXgfw+yzec7bCH/zHH6 +hlIGSp2t2vx5qS2cChNNz+lioDdVrnNXwgYQlDhZ9KOHgaY/JPTf790AyRU8 +9Rb9DGzsbGuLcNkASWMTn74PMTDrH7/nW5UNcGRPN9P8EwOLVVRYJU+s4aDH +xdEvcwzsfKOboi5hDe6WKsggMfGNrMsn7RpLWOgWFGmmMPEk1T8hqMAS8v3G +Bu1UmLhAXVnTlGIJn5JrIt1XM7HcuraM7WkJB1s3lkXpM1H83caLV/gt4bRT +LKnamokGS7yPnt+6Hmq39fw1PMDEsRcQELPCAnZ+qW2rD2XicusbBXtnzYEn +Oj/HMoyJVWcvUINGzME6d5/hligmHvmys+BOnTm8fL0k6FAiE6fnL9VT9pvD +1126gxXZTGyvNPpU1YWgsP9EjW4jE+Vtnoft8gRIXfQ3Smli4pon9cJ7WAC8 +GdYVnx8ysXR/v9FZRYCvlfy38luZuD3DutVo0AxqeZJyxLuYmC9UL7uw3Qzc +s+IjZz4ykRK6IsxxJwty6qKM7q9gYYG8b4F5NANWOm2vkBdhYdrpbXPLdjIg +fthEJ3IVC/Wmdt0ZBQbs4Z9TXSfFwv23tnXxLGMAbWOEZAGJhXucePYmZJpC +7/uDk8f1WKjxOO1RKYcOUsuDKhy3srA7alZCWtAECtfHRY9vZ2HXZK4Y/RsN +9ONS12d6sDA67PTDmA4aOI2X9/T7sDB36HKH13kaJPdOz/sGsbBJOVXmqioN +5gqOWkQnsNDqs/3YWxtjGGBkdhUVE/G3NDrm3jCEPeGFebalLPQNsvoYnWoI +M6V3/b6Xs1Dl2GRiRLghiCv3z+pVsjC/0y3gwXpDsBdUUrzXyMLVh1QbCt4Z +QH130e6uHhZK+/g/jlE2ADuRap2IfhY2npscF1lhAP0bWmdkB1m44trWA/WT ++jBV++2k5zAL7f6ML/g90ged/9bd+fKVhfd9gxLH9+pD/YB5xJkfLPw9LrV/ +82Z9sJPcDGvHWSj5MeLVc6Y++J8IfxE2zcKD7RFdkquI9zUmX5KZY+HC636d +1/N6cOx3tm/tbyK/MYcL74/owSrDW9o7F1iovnZMqeaZHlzZXzu9uMhCm72j +8U+r9OB/YMhezA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07843890588409252}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07843890588409252}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357861397562*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"3452ebcd-e181-47b6-87e5-eeaab33b81ab"] +}, Open ]], Cell[CellGroupData[{ @@ -12322,18 +15384,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.2964807386656003`*^-154\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 73, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357861448004*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"f900c399-29c0-4106-a510-651dcf6ada2a"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3368690794181449`*^-156\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 74, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943578614566603`*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"1ac564df-1559-47b8-af41-dbb4f67f5bb3"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.374351807714857`*^-159\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 75, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943578614627*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"1169bf05-cb01-4e98-8f5f-cddf3c6b2e2e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 142, 76, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357861469029*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"f02941b5-2d48-4057-8d3e-33a3b59760ab"], + +Cell[BoxData["9.327242496960118`"], "Output", + CellChangeTimes->{3.994357913909111*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"2c507b18-afff-402c-980d-e4c172e2db80"] }, Open ]], Cell[CellGroupData[{ @@ -12400,27 +15519,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850818889292*^9, - 3.9918508230677433`*^9}},ExpressionUUID->"d2148290-3e90-8347-bddd-\ -5dd8190b0268"], + CellChangeTimes->{{3.991850818889292*^9, 3.9918508230677433`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"905b237c-0e51-ab4b-895d-05994c6f1d5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3581177145258355`*^-196\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 77, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435791394836*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"55702d8c-4c55-4cad-891b-875161b1d153"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ad8c79e-9570-a44d-b593-07aa87056e21"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.030259800182519`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 78, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357913955106*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"9c10f918-fb14-494c-82bb-0f8ba4631d9f"], -Cell[BoxData["0.576602516746911`"], "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6775317683263727`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 79, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357913962035*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"d63dee5c-c611-413d-a09a-938e797781ef"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 80, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357913969035*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"1e17735f-825d-43ea-bca8-1d7aeb118c1f"], + +Cell[BoxData["0.8076387172652721`"], "Output", + CellChangeTimes->{3.99435792199059*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"3674dbb6-329e-4807-ac82-1b70285cd191"] }, Open ]], Cell[CellGroupData[{ @@ -12441,8 +15608,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -12487,27 +15653,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850826380268*^9, - 3.991850829169306*^9}},ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-\ -98d71f8a8458"], + CellChangeTimes->{{3.991850826380268*^9, 3.991850829169306*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c516c31a-74b4-f24d-a16a-678221cde87e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3581177145258355`*^-196\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 81, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943579220300083`*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"91a2bbb2-815e-460d-82e3-d758c2fb0529"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"5c50b555-9ebe-f94d-801f-34634555f622"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.030259800182519`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 82, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357922036686*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"f9696be9-5f71-45fe-b4f3-7973a6b8e3fd"], -Cell[BoxData["3.32141991539404`"], "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6775317683263727`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 83, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357922043482*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"78f28f2d-a5c6-4a2a-8f6f-4f9c1d907552"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 84, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357922049567*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"364b10b2-9d58-496a-8e4b-94144b336f0c"], + +Cell[BoxData["25.662902045538296`"], "Output", + CellChangeTimes->{3.994357929339645*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"bbc88be7-32c6-4d6c-850e-72004adbffc5"] }, Open ]], Cell[CellGroupData[{ @@ -12528,8 +15742,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -12574,27 +15787,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918508329145336`*^9, - 3.991850837197098*^9}},ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-\ -57c1fe1d0585"], + CellChangeTimes->{{3.9918508329145336`*^9, 3.991850837197098*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ca591cf-a5ce-ce41-8101-8edfca50e890"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3581177145258355`*^-196\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 85, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943579293748007`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"0e24b6c4-1052-4469-8a2f-77793445a472"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cbafd11a-4be0-b541-81e4-e62191ae7695"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.030259800182519`*^-201\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 86, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357929382167*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"21c466bb-333f-417e-a597-75d83044582d"], -Cell[BoxData["18.419619005098298`"], "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6775317683263727`*^-205\\\", \ +RowBox[{\\\"668859810497440244092067196564426051030\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"40\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3165635789279094374400000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 87, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357929388836*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"8f89dbaa-d615-495e-a581-bd3c74594723"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 88, 31388289756611167805, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357929395544*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"f77678a7-e8e0-4f2d-8d67-cbb0cb606add"], + +Cell[BoxData["4.123228728911889`"], "Output", + CellChangeTimes->{3.994357933549478*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"cff03890-3627-427f-a5ac-38e5f790ffdd"] }, Open ]], Cell[CellGroupData[{ @@ -12603,18 +15864,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918508397421246`*^9, - 3.9918508449867363`*^9}},ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-\ -1ca469b254bd"], + CellChangeTimes->{{3.9918508397421246`*^9, 3.9918508449867363`*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[BoxData["0.07371813161570438`"], "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[BoxData["0.07851371616432594`"], "Output", + CellChangeTimes->{3.994357933583475*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"16104a80-c848-4fe1-adb7-417932fbfab5"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"2fc8c501-08b5-4b5e-96d2-21ebd6441cb1"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"2fc8c501-08b5-4b5e-96d2-21ebd6441cb1"] }, -WindowSize->{714, 288}, -WindowMargins->{{Automatic, 3}, {297, Automatic}}, +Evaluator->"kernel 5", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {150, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -12632,608 +15899,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 453, 8, 36, "Input",ExpressionUUID->"1b0145b9-c263-4046-9bc6-03f20ecab3a7"], -Cell[1032, 32, 302, 6, 41, "Output",ExpressionUUID->"7bc51bb9-6bbb-4b19-9688-791c18ee3cde"] +Cell[576, 22, 448, 7, 36, "Input",ExpressionUUID->"1b0145b9-c263-4046-9bc6-03f20ecab3a7"], +Cell[1027, 31, 343, 5, 41, "Output",ExpressionUUID->"8a8cfbf4-6439-44ee-a772-d0b1e7f28a5c"] }, Open ]], Cell[CellGroupData[{ -Cell[1371, 43, 255, 5, 36, "Input",ExpressionUUID->"1c396d6a-893b-48dc-8cc2-08ef10f1f076"], -Cell[1629, 50, 305, 6, 41, "Output",ExpressionUUID->"c46a7856-0093-4ed2-a7f9-fab8465786df"] +Cell[1407, 41, 250, 4, 36, "Input",ExpressionUUID->"1c396d6a-893b-48dc-8cc2-08ef10f1f076"], +Cell[1660, 47, 346, 5, 41, "Output",ExpressionUUID->"b88a675d-24f5-4784-8f36-f5269d69e2af"] }, Open ]], Cell[CellGroupData[{ -Cell[1971, 61, 226, 5, 36, "Input",ExpressionUUID->"8de3908c-9967-46e7-97c5-da93dbb91232"], -Cell[2200, 68, 300, 6, 41, "Output",ExpressionUUID->"97bbed16-09e4-411f-8cb7-2d5f7cb9d9fd"] +Cell[2043, 57, 221, 4, 36, "Input",ExpressionUUID->"8de3908c-9967-46e7-97c5-da93dbb91232"], +Cell[2267, 63, 340, 5, 41, "Output",ExpressionUUID->"e7ba16dd-61f7-4f5b-9f40-bcc47363d410"] }, Open ]], Cell[CellGroupData[{ -Cell[2537, 79, 180, 4, 36, "Input",ExpressionUUID->"36cff24f-2730-4a70-ae5f-44c80f05b7e3"], -Cell[2720, 85, 303, 6, 41, "Output",ExpressionUUID->"8ad97b38-714e-4ceb-8567-a4cf0746eb59"] +Cell[2644, 73, 175, 3, 36, "Input",ExpressionUUID->"36cff24f-2730-4a70-ae5f-44c80f05b7e3"], +Cell[2822, 78, 341, 5, 41, "Output",ExpressionUUID->"73b2a2f4-e24c-47fb-b202-a45e4ebd8e2b"] }, Open ]], Cell[CellGroupData[{ -Cell[3060, 96, 262, 8, 54, "Input",ExpressionUUID->"c4c6fe41-2a40-4985-b825-fc2006608934"], -Cell[3325, 106, 317, 6, 41, "Output",ExpressionUUID->"92ccd187-38cc-4392-bcc9-29ef13f5fd36"] +Cell[3200, 88, 257, 7, 54, "Input",ExpressionUUID->"c4c6fe41-2a40-4985-b825-fc2006608934"], +Cell[3460, 97, 356, 5, 41, "Output",ExpressionUUID->"becf103a-c708-4410-a3dc-f504632ed8bf"] }, Open ]], Cell[CellGroupData[{ -Cell[3679, 117, 136, 3, 36, "Input",ExpressionUUID->"942a0b3a-7df8-40b9-8058-81db0d905c52"], -Cell[3818, 122, 309, 6, 41, "Output",ExpressionUUID->"4b1f73ef-f962-4199-af60-2c0affa572e8"] +Cell[3853, 107, 131, 2, 36, "Input",ExpressionUUID->"942a0b3a-7df8-40b9-8058-81db0d905c52"], +Cell[3987, 111, 348, 5, 41, "Output",ExpressionUUID->"21c190c7-ee6e-44e1-8f55-58d46c3297c0"] }, Open ]], Cell[CellGroupData[{ -Cell[4164, 133, 281, 7, 36, "Input",ExpressionUUID->"707373aa-0b0c-48fc-8691-0925ee0e4a94"], -Cell[4448, 142, 321, 6, 41, "Output",ExpressionUUID->"9771dd66-86bd-43cc-9c37-14dd2cb198c1"] +Cell[4372, 121, 276, 6, 36, "Input",ExpressionUUID->"707373aa-0b0c-48fc-8691-0925ee0e4a94"], +Cell[4651, 129, 362, 5, 41, "Output",ExpressionUUID->"5f0fe652-8a25-4543-8e43-7b47ff688ed5"] }, Open ]], Cell[CellGroupData[{ -Cell[4806, 153, 262, 8, 36, "Input",ExpressionUUID->"2db1cb82-f8b4-4dec-982e-7232505e99d8"], -Cell[5071, 163, 320, 6, 41, "Output",ExpressionUUID->"126d1014-4469-400f-8de8-e9d2b11c3c06"] +Cell[5050, 139, 257, 7, 36, "Input",ExpressionUUID->"2db1cb82-f8b4-4dec-982e-7232505e99d8"], +Cell[5310, 148, 359, 5, 41, "Output",ExpressionUUID->"7a0b9b3c-7709-404d-ad8e-8c2d390d86b9"] }, Open ]], Cell[CellGroupData[{ -Cell[5428, 174, 208, 4, 36, "Input",ExpressionUUID->"014d0552-9a9c-4487-93a6-43a7d805daee"], -Cell[5639, 180, 288, 5, 41, "Output",ExpressionUUID->"7b8c13ed-8165-42ff-9de3-c75975e62260"] +Cell[5706, 158, 203, 3, 36, "Input",ExpressionUUID->"014d0552-9a9c-4487-93a6-43a7d805daee"], +Cell[5912, 163, 333, 5, 41, "Output",ExpressionUUID->"be62cc60-58fc-45c5-ae04-0d09f6efe17d"] }, Open ]], Cell[CellGroupData[{ -Cell[5964, 190, 210, 4, 36, "Input",ExpressionUUID->"61f06fbc-f9bf-4abf-8406-88a04612eb21"], -Cell[6177, 196, 288, 5, 41, "Output",ExpressionUUID->"9b3127b9-a0f5-4fd1-b083-4b9f94775b9a"] +Cell[6282, 173, 206, 3, 36, "Input",ExpressionUUID->"61f06fbc-f9bf-4abf-8406-88a04612eb21"], +Cell[6491, 178, 332, 5, 41, "Output",ExpressionUUID->"f59c9504-4b58-4d79-98ef-8489b428730a"] }, Open ]], Cell[CellGroupData[{ -Cell[6502, 206, 133, 3, 40, "Input",ExpressionUUID->"559f4988-7e93-4915-9b5f-13ef42ae01c9"], -Cell[6638, 211, 300, 6, 45, "Output",ExpressionUUID->"dbcb1f62-d78d-4427-bc72-c6df84f1144d"] +Cell[6860, 188, 129, 2, 36, "Input",ExpressionUUID->"559f4988-7e93-4915-9b5f-13ef42ae01c9"], +Cell[6992, 192, 342, 5, 41, "Output",ExpressionUUID->"5d2afbb3-8768-4400-b7f6-bbfaaea37b80"] }, Open ]], Cell[CellGroupData[{ -Cell[6975, 222, 133, 3, 40, "Input",ExpressionUUID->"30a25338-5f5e-4960-bbd1-64025eb95826"], -Cell[7111, 227, 301, 6, 45, "Output",ExpressionUUID->"58ffb66f-664d-40a8-a67c-2bb43cb6b212"] +Cell[7371, 202, 129, 2, 36, "Input",ExpressionUUID->"30a25338-5f5e-4960-bbd1-64025eb95826"], +Cell[7503, 206, 343, 5, 41, "Output",ExpressionUUID->"0e06edf2-a14c-4bcc-9516-3928007cbe0f"] }, Open ]], Cell[CellGroupData[{ -Cell[7449, 238, 561, 20, 109, "Input",ExpressionUUID->"b5942fda-386e-457d-8dbc-79a4c3027062"], -Cell[8013, 260, 320, 6, 45, "Output",ExpressionUUID->"1febd101-8029-46be-ab2d-6d150b4b2020"] +Cell[7883, 216, 557, 19, 100, "Input",ExpressionUUID->"b5942fda-386e-457d-8dbc-79a4c3027062"], +Cell[8443, 237, 360, 5, 41, "Output",ExpressionUUID->"60e10997-c992-4117-a367-a4176730e6b2"] }, Open ]], Cell[CellGroupData[{ -Cell[8370, 271, 561, 20, 109, "Input",ExpressionUUID->"fdc63ed7-5579-43ff-82ff-7b2f7d80ea6c"], -Cell[8934, 293, 317, 6, 45, "Output",ExpressionUUID->"c085af3f-a527-4c37-bdd9-04ab36a118f5"] +Cell[8840, 247, 557, 19, 100, "Input",ExpressionUUID->"fdc63ed7-5579-43ff-82ff-7b2f7d80ea6c"], +Cell[9400, 268, 357, 5, 41, "Output",ExpressionUUID->"5d1e6371-32db-47a8-83b0-5fa55c703c98"] }, Open ]], Cell[CellGroupData[{ -Cell[9288, 304, 1592, 51, 188, "Input",ExpressionUUID->"6ff41813-c0c4-43cb-b307-c0e34995eab2"], -Cell[10883, 357, 317, 6, 45, "Output",ExpressionUUID->"14e6e542-843a-4d26-9be8-de6d038dfbec"] +Cell[9794, 278, 1588, 50, 215, "Input",ExpressionUUID->"6ff41813-c0c4-43cb-b307-c0e34995eab2"], +Cell[11385, 330, 357, 5, 41, "Output",ExpressionUUID->"53b69e4a-6425-4b1c-bd50-87fa33d64c5b"] }, Open ]], Cell[CellGroupData[{ -Cell[11237, 368, 1426, 47, 155, "Input",ExpressionUUID->"8df2443b-2533-4d1b-a3e2-1b4cf0d8f9a3"], -Cell[12666, 417, 334, 7, 45, "Output",ExpressionUUID->"adde3154-f7a8-4325-9793-c5877fa58c08"] +Cell[11779, 340, 1422, 46, 215, "Input",ExpressionUUID->"8df2443b-2533-4d1b-a3e2-1b4cf0d8f9a3"], +Cell[13204, 388, 376, 6, 41, "Output",ExpressionUUID->"2d95c2c7-1fc1-4520-8661-4e2cce476593"] }, Open ]], Cell[CellGroupData[{ -Cell[13037, 429, 1426, 47, 155, "Input",ExpressionUUID->"a3c6916f-506a-4e34-9223-3a09edea9851"], -Cell[14466, 478, 341, 7, 45, "Output",ExpressionUUID->"327bb7a0-39fc-4dd6-8ead-01e5117f5209"] +Cell[13617, 399, 1422, 46, 215, "Input",ExpressionUUID->"a3c6916f-506a-4e34-9223-3a09edea9851"], +Cell[15042, 447, 382, 6, 41, "Output",ExpressionUUID->"e1ba8f98-33fb-48b6-9115-92dbd8e8a6cf"] }, Open ]], Cell[CellGroupData[{ -Cell[14844, 490, 1496, 49, 111, "Input",ExpressionUUID->"58aba826-d624-4a57-a6a0-84f64258744d"], -Cell[16343, 541, 318, 6, 45, "Output",ExpressionUUID->"7dbfbe06-dc8f-4565-aa18-8ed572c8b8b9"] +Cell[15461, 458, 1588, 50, 215, "Input",ExpressionUUID->"58aba826-d624-4a57-a6a0-84f64258744d"], +Cell[17052, 510, 360, 5, 41, "Output",ExpressionUUID->"5969372a-94a6-4071-b603-6d15b98fed99"] }, Open ]], Cell[CellGroupData[{ -Cell[16698, 552, 135, 3, 40, "Input",ExpressionUUID->"24515d9d-01ec-4943-8556-f3358f10ae69"], -Cell[16836, 557, 302, 6, 45, "Output",ExpressionUUID->"c19cda5a-2934-45df-aecd-25a4c5956951"] +Cell[17449, 520, 131, 2, 36, "Input",ExpressionUUID->"24515d9d-01ec-4943-8556-f3358f10ae69"], +Cell[17583, 524, 341, 5, 41, "Output",ExpressionUUID->"c9194013-5a80-4638-9332-0f107813a07f"] }, Open ]], Cell[CellGroupData[{ -Cell[17175, 568, 137, 3, 40, "Input",ExpressionUUID->"1504b6dc-3b0e-4f27-98cd-7951058814ca"], -Cell[17315, 573, 303, 6, 45, "Output",ExpressionUUID->"93dd4ad4-0ea4-428c-b268-b8ce16e1a032"] +Cell[17961, 534, 133, 2, 36, "Input",ExpressionUUID->"1504b6dc-3b0e-4f27-98cd-7951058814ca"], +Cell[18097, 538, 345, 5, 41, "Output",ExpressionUUID->"91b28704-6d0c-4d4d-9ce7-9655891cd264"] }, Open ]], Cell[CellGroupData[{ -Cell[17655, 584, 138, 3, 40, "Input",ExpressionUUID->"09807293-e0ad-45aa-a71d-3fb37c1e2bd8"], -Cell[17796, 589, 304, 6, 45, "Output",ExpressionUUID->"9b512037-a260-4366-91f2-7dd6db3d4b4e"] +Cell[18479, 548, 134, 2, 36, "Input",ExpressionUUID->"09807293-e0ad-45aa-a71d-3fb37c1e2bd8"], +Cell[18616, 552, 345, 5, 41, "Output",ExpressionUUID->"56702330-38d4-4c6b-9368-bedb3842cead"] }, Open ]], Cell[CellGroupData[{ -Cell[18137, 600, 223, 5, 40, "Input",ExpressionUUID->"9edcabb8-545b-495c-bd1d-223f7243fc56"], -Cell[18363, 607, 321, 7, 45, "Output",ExpressionUUID->"f0b6785c-f6ed-4e27-a166-6f9d43d5bc95"] +Cell[18998, 562, 219, 4, 36, "Input",ExpressionUUID->"9edcabb8-545b-495c-bd1d-223f7243fc56"], +Cell[19220, 568, 360, 6, 41, "Output",ExpressionUUID->"48e34856-9c6d-4af6-b723-f11aedea40b1"] }, Open ]], Cell[CellGroupData[{ -Cell[18721, 619, 138, 3, 40, "Input",ExpressionUUID->"d55e7d65-add0-4287-b08e-95b088880c38"], -Cell[18862, 624, 303, 6, 45, "Output",ExpressionUUID->"1177acc0-9fbe-47b5-815d-2636500d9d6c"] +Cell[19617, 579, 134, 2, 36, "Input",ExpressionUUID->"d55e7d65-add0-4287-b08e-95b088880c38"], +Cell[19754, 583, 343, 5, 41, "Output",ExpressionUUID->"068c0fbe-1e80-43e1-8a5d-20689de6e9c2"] }, Open ]], Cell[CellGroupData[{ -Cell[19202, 635, 326, 6, 40, "Input",ExpressionUUID->"db63370d-191f-49b4-b1cb-9588293ebd86"], -Cell[19531, 643, 303, 6, 45, "Output",ExpressionUUID->"36337149-1e3a-433e-9f79-ee3f37d4a4a0"] +Cell[20134, 593, 322, 5, 36, "Input",ExpressionUUID->"db63370d-191f-49b4-b1cb-9588293ebd86"], +Cell[20459, 600, 343, 5, 41, "Output",ExpressionUUID->"4352c6c0-8b37-4671-a5c3-8e6fb28afe06"] }, Open ]], Cell[CellGroupData[{ -Cell[19871, 654, 302, 6, 40, "Input",ExpressionUUID->"9c310da3-6b04-46e7-8046-ec8d7a4efc3b"], -Cell[20176, 662, 302, 6, 45, "Output",ExpressionUUID->"cebf5036-dede-4b80-a327-ea3915d2c32a"] +Cell[20839, 610, 298, 5, 36, "Input",ExpressionUUID->"9c310da3-6b04-46e7-8046-ec8d7a4efc3b"], +Cell[21140, 617, 344, 5, 41, "Output",ExpressionUUID->"5deac028-5471-417f-8fb4-9e1c53088673"] }, Open ]], Cell[CellGroupData[{ -Cell[20515, 673, 223, 5, 40, "Input",ExpressionUUID->"bbde5e1c-d408-43ac-9446-505d623205d4"], -Cell[20741, 680, 303, 6, 45, "Output",ExpressionUUID->"87d7851f-1340-47d6-9816-a4eb86236036"] +Cell[21521, 627, 219, 4, 36, "Input",ExpressionUUID->"bbde5e1c-d408-43ac-9446-505d623205d4"], +Cell[21743, 633, 345, 5, 41, "Output",ExpressionUUID->"f27b07f6-c5a8-4285-ba6b-8e6c7c1a6601"] }, Open ]], Cell[CellGroupData[{ -Cell[21081, 691, 354, 11, 59, "Input",ExpressionUUID->"194c0861-57cb-4f6a-9737-5e902fa734fb"], -Cell[21438, 704, 320, 6, 45, "Output",ExpressionUUID->"2efcb1d0-c70b-4f8e-9247-858cf517b586"] +Cell[22125, 643, 350, 10, 54, "Input",ExpressionUUID->"194c0861-57cb-4f6a-9737-5e902fa734fb"], +Cell[22478, 655, 359, 5, 41, "Output",ExpressionUUID->"7425ba4a-051d-4e86-abf3-3aeaaa9d449b"] }, Open ]], Cell[CellGroupData[{ -Cell[21795, 715, 354, 11, 59, "Input",ExpressionUUID->"d369bc80-4e5f-488c-a048-377340b61c98"], -Cell[22152, 728, 341, 7, 45, "Output",ExpressionUUID->"f1746dfe-74f3-4f23-8731-370fff4284f3"] +Cell[22874, 665, 350, 10, 54, "Input",ExpressionUUID->"d369bc80-4e5f-488c-a048-377340b61c98"], +Cell[23227, 677, 381, 6, 41, "Output",ExpressionUUID->"cbcb4841-a4e9-4c88-9537-a29d6f357c43"] }, Open ]], Cell[CellGroupData[{ -Cell[22530, 740, 998, 27, 60, "Input",ExpressionUUID->"04c76e26-c04c-4fd2-bf35-75b2bc9a4072"], -Cell[23531, 769, 321, 6, 45, "Output",ExpressionUUID->"e26dd477-ca73-4d15-af44-1a0b0d83f12e"] +Cell[23645, 688, 994, 26, 105, "Input",ExpressionUUID->"04c76e26-c04c-4fd2-bf35-75b2bc9a4072"], +Cell[24642, 716, 361, 5, 41, "Output",ExpressionUUID->"5ef2b81f-1820-4e56-a7eb-0a9cdcd664f4"] }, Open ]], Cell[CellGroupData[{ -Cell[23889, 780, 203, 4, 40, "Input",ExpressionUUID->"fc5b5b54-94a3-43c3-8a44-2eff6945eba3"], -Cell[24095, 786, 301, 6, 45, "Output",ExpressionUUID->"3d406e82-145b-4854-b07b-ddc1842c5bca"] +Cell[25040, 726, 199, 3, 36, "Input",ExpressionUUID->"fc5b5b54-94a3-43c3-8a44-2eff6945eba3"], +Cell[25242, 731, 345, 5, 41, "Output",ExpressionUUID->"6fb299a0-7308-4519-9e60-829446ee4e58"] }, Open ]], Cell[CellGroupData[{ -Cell[24433, 797, 333, 6, 40, "Input",ExpressionUUID->"89b30c0d-d26d-43fd-9e05-942f44c71582"], -Cell[24769, 805, 276, 5, 45, "Output",ExpressionUUID->"8b671d44-c4a8-4d86-8281-7f451c7c3c42"] +Cell[25624, 741, 329, 5, 36, "Input",ExpressionUUID->"89b30c0d-d26d-43fd-9e05-942f44c71582"], +Cell[25956, 748, 320, 5, 41, "Output",ExpressionUUID->"d37cbd73-6526-4d00-b3ea-0233854b7381"] }, Open ]], -Cell[25060, 813, 177, 3, 40, "Input",ExpressionUUID->"7eec31d4-e290-4d0d-8cf4-db44d99d267d"], +Cell[26291, 756, 173, 2, 109, "Input",ExpressionUUID->"7eec31d4-e290-4d0d-8cf4-db44d99d267d"], Cell[CellGroupData[{ -Cell[25262, 820, 331, 6, 40, "Input",ExpressionUUID->"17359210-f5c0-41e4-9a26-40af026ba776"], -Cell[25596, 828, 279, 5, 45, "Output",ExpressionUUID->"294f100b-7718-4c92-9d87-ec7586264b55"] +Cell[26489, 762, 327, 5, 36, "Input",ExpressionUUID->"17359210-f5c0-41e4-9a26-40af026ba776"], +Cell[26819, 769, 323, 5, 41, "Output",ExpressionUUID->"19a4f264-ca34-4455-a63c-870ee070e407"] }, Open ]], -Cell[25890, 836, 177, 3, 40, "Input",ExpressionUUID->"b831c6df-63d3-4eb4-9c2d-bad970a4708a"], +Cell[27157, 777, 173, 2, 109, "Input",ExpressionUUID->"b831c6df-63d3-4eb4-9c2d-bad970a4708a"], Cell[CellGroupData[{ -Cell[26092, 843, 334, 6, 40, "Input",ExpressionUUID->"a82c32e6-9644-43c8-84c6-a984343f5d78"], -Cell[26429, 851, 276, 5, 45, "Output",ExpressionUUID->"fa9d8691-b49c-4129-9a11-d2b876f94ca3"] +Cell[27355, 783, 330, 5, 36, "Input",ExpressionUUID->"a82c32e6-9644-43c8-84c6-a984343f5d78"], +Cell[27688, 790, 320, 5, 41, "Output",ExpressionUUID->"8a28ed79-cd56-4d83-9e58-e00e0ef8b57d"] }, Open ]], -Cell[26720, 859, 177, 3, 40, "Input",ExpressionUUID->"08594332-f9c9-49de-8640-ebbb5d154674"], +Cell[28023, 798, 173, 2, 109, "Input",ExpressionUUID->"08594332-f9c9-49de-8640-ebbb5d154674"], Cell[CellGroupData[{ -Cell[26922, 866, 358, 6, 40, "Input",ExpressionUUID->"536b6d61-fe40-4c6d-acb5-237ee933fd8e"], -Cell[27283, 874, 278, 5, 45, "Output",ExpressionUUID->"9e8acd84-519c-4e0d-89bc-daa26b67abf9"] +Cell[28221, 804, 354, 5, 36, "Input",ExpressionUUID->"536b6d61-fe40-4c6d-acb5-237ee933fd8e"], +Cell[28578, 811, 321, 5, 41, "Output",ExpressionUUID->"e4a08634-0e8a-4add-9eaa-c528b39f70fe"] }, Open ]], -Cell[27576, 882, 175, 3, 40, "Input",ExpressionUUID->"1286c31b-6c3e-436b-acd7-1f05e5f2f1de"], +Cell[28914, 819, 171, 2, 109, "Input",ExpressionUUID->"1286c31b-6c3e-436b-acd7-1f05e5f2f1de"], Cell[CellGroupData[{ -Cell[27776, 889, 307, 6, 40, "Input",ExpressionUUID->"f9519009-e507-492b-93e4-2ebbe6a1c510"], -Cell[28086, 897, 278, 5, 45, "Output",ExpressionUUID->"e0aed65f-abe0-4e89-920c-45a6c7efc0fa"] +Cell[29110, 825, 303, 5, 36, "Input",ExpressionUUID->"f9519009-e507-492b-93e4-2ebbe6a1c510"], +Cell[29416, 832, 324, 5, 41, "Output",ExpressionUUID->"913a30d1-c4f9-4c15-b1fb-b9e53a7bb7f2"] }, Open ]], -Cell[28379, 905, 175, 3, 40, "Input",ExpressionUUID->"f69d3dce-28c8-4026-b684-5b1d934710a8"], +Cell[29755, 840, 171, 2, 109, "Input",ExpressionUUID->"f69d3dce-28c8-4026-b684-5b1d934710a8"], Cell[CellGroupData[{ -Cell[28579, 912, 309, 6, 40, "Input",ExpressionUUID->"c7b878bc-8afa-43e6-8b34-0476fc19185e"], -Cell[28891, 920, 279, 5, 45, "Output",ExpressionUUID->"ab4238b1-5831-4530-aabc-b14297c10e65"] +Cell[29951, 846, 305, 5, 36, "Input",ExpressionUUID->"c7b878bc-8afa-43e6-8b34-0476fc19185e"], +Cell[30259, 853, 323, 5, 41, "Output",ExpressionUUID->"39e41ac4-7865-48d2-b374-9c5dc4571b4e"] }, Open ]], -Cell[29185, 928, 177, 3, 40, "Input",ExpressionUUID->"e5426d1d-dfa7-4f5d-ba9c-e3b73fd9a4ac"], +Cell[30597, 861, 173, 2, 109, "Input",ExpressionUUID->"e5426d1d-dfa7-4f5d-ba9c-e3b73fd9a4ac"], Cell[CellGroupData[{ -Cell[29387, 935, 308, 6, 40, "Input",ExpressionUUID->"ffcc49f1-1bf7-4877-89a9-84c1f6b1893d"], -Cell[29698, 943, 281, 5, 45, "Output",ExpressionUUID->"f1e37cc7-df75-4cc0-a623-4f82f8cc691b"] +Cell[30795, 867, 304, 5, 36, "Input",ExpressionUUID->"ffcc49f1-1bf7-4877-89a9-84c1f6b1893d"], +Cell[31102, 874, 327, 5, 41, "Output",ExpressionUUID->"a596018b-a6f6-419c-8cc9-b2374ed7744d"] }, Open ]], -Cell[29994, 951, 176, 3, 40, "Input",ExpressionUUID->"9a7e0309-288b-4ddf-90f9-f8d951d89362"], +Cell[31444, 882, 172, 2, 109, "Input",ExpressionUUID->"9a7e0309-288b-4ddf-90f9-f8d951d89362"], Cell[CellGroupData[{ -Cell[30195, 958, 279, 5, 40, "Input",ExpressionUUID->"3e620f06-cbce-4668-834b-0e037d8ed983"], -Cell[30477, 965, 276, 5, 45, "Output",ExpressionUUID->"6d2aa252-4daa-4dae-83d6-d1e960deec09"] +Cell[31641, 888, 275, 4, 36, "Input",ExpressionUUID->"3e620f06-cbce-4668-834b-0e037d8ed983"], +Cell[31919, 894, 320, 5, 41, "Output",ExpressionUUID->"e028d864-9fb5-485d-95fc-3316a18732d8"] }, Open ]], -Cell[30768, 973, 179, 3, 40, "Input",ExpressionUUID->"a9a33099-11b0-48de-8623-8c52261917f5"], +Cell[32254, 902, 175, 2, 109, "Input",ExpressionUUID->"a9a33099-11b0-48de-8623-8c52261917f5"], Cell[CellGroupData[{ -Cell[30972, 980, 19813, 486, 1845, "Input",ExpressionUUID->"af53eeb9-f3a5-468c-9272-bdb3eb8d7245"], -Cell[50788, 1468, 321, 6, 45, "Output",ExpressionUUID->"1752660a-eb5d-4653-bf13-064231d220dd"] +Cell[32454, 908, 19809, 485, 3208, "Input",ExpressionUUID->"af53eeb9-f3a5-468c-9272-bdb3eb8d7245"], +Cell[52266, 1395, 361, 5, 41, "Output",ExpressionUUID->"f13499a8-3844-40d6-8992-08f0f47c6484"] }, Open ]], Cell[CellGroupData[{ -Cell[51146, 1479, 19752, 490, 1859, "Input",ExpressionUUID->"a948efa2-657b-4b94-a800-b8db1e74b021"], -Cell[70901, 1971, 317, 6, 45, "Output",ExpressionUUID->"c1c2080a-d4fc-4ab8-8452-7e143aac02f5"] +Cell[52664, 1405, 19748, 489, 3138, "Input",ExpressionUUID->"a948efa2-657b-4b94-a800-b8db1e74b021"], +Cell[72415, 1896, 357, 5, 41, "Output",ExpressionUUID->"0bb2632c-fb3b-481d-8698-23b0db3bbfc8"] }, Open ]], Cell[CellGroupData[{ -Cell[71255, 1982, 19752, 484, 1858, "Input",ExpressionUUID->"92f1dfeb-5e3c-484c-9a16-cf2b6ea3ed47"], -Cell[91010, 2468, 339, 7, 45, "Output",ExpressionUUID->"0886f4c3-b9a7-48df-a57c-569d37ee9f60"] +Cell[72809, 1906, 19748, 483, 3198, "Input",ExpressionUUID->"92f1dfeb-5e3c-484c-9a16-cf2b6ea3ed47"], +Cell[92560, 2391, 380, 6, 41, "Output",ExpressionUUID->"0e08fc4e-f91f-434a-bda2-559415ab3289"] }, Open ]], Cell[CellGroupData[{ -Cell[91386, 2480, 22538, 554, 2037, "Input",ExpressionUUID->"62f47c3c-85a5-444f-ae96-138c6dbfd4a5"], -Cell[113927, 3036, 335, 7, 45, "Output",ExpressionUUID->"92273eb4-7a74-483c-b588-a11b499517b1"] +Cell[92977, 2402, 22534, 553, 3677, "Input",ExpressionUUID->"62f47c3c-85a5-444f-ae96-138c6dbfd4a5"], +Cell[115514, 2957, 375, 6, 41, "Output",ExpressionUUID->"b15de9a3-ce42-4f1f-b02d-46e914b924c5"] }, Open ]], Cell[CellGroupData[{ -Cell[114299, 3048, 22539, 554, 2037, "Input",ExpressionUUID->"9c8c7dfd-906a-47eb-b578-8526cad374c5"], -Cell[136841, 3604, 340, 7, 45, "Output",ExpressionUUID->"bfd7cf19-a2ee-4254-a46b-4b7fc94f0449"] +Cell[115926, 2968, 22535, 553, 3642, "Input",ExpressionUUID->"9c8c7dfd-906a-47eb-b578-8526cad374c5"], +Cell[138464, 3523, 384, 6, 41, "Output",ExpressionUUID->"ed7a3212-963b-48a6-a270-027ca90ae334"] }, Open ]], Cell[CellGroupData[{ -Cell[137218, 3616, 25495, 627, 2246, "Input",ExpressionUUID->"7bdfe7e1-55b5-4e0d-b7b9-96c0dc9db906"], -Cell[162716, 4245, 334, 7, 45, "Output",ExpressionUUID->"7f5402e5-c3ab-4d3a-990e-3eda68450081"] +Cell[138885, 3534, 25491, 626, 4121, "Input",ExpressionUUID->"7bdfe7e1-55b5-4e0d-b7b9-96c0dc9db906"], +Cell[164379, 4162, 378, 6, 41, "Output",ExpressionUUID->"2a89fb79-8da3-454a-bc49-9f13a45d8979"] }, Open ]], Cell[CellGroupData[{ -Cell[163087, 4257, 134, 3, 40, "Input",ExpressionUUID->"c4d8b1b4-5123-4b97-8d9d-d1d3fc1d7555"], -Cell[163224, 4262, 301, 6, 45, "Output",ExpressionUUID->"331882c9-1152-4b3e-9f43-a2f1167cae8f"] +Cell[164794, 4173, 130, 2, 36, "Input",ExpressionUUID->"c4d8b1b4-5123-4b97-8d9d-d1d3fc1d7555"], +Cell[164927, 4177, 343, 5, 41, "Output",ExpressionUUID->"ccc118af-1c33-4a22-8fff-5eb52cb2d170"] }, Open ]], Cell[CellGroupData[{ -Cell[163562, 4273, 134, 3, 40, "Input",ExpressionUUID->"4daf7a7c-622c-47c3-b5fb-0cf7246a4b73"], -Cell[163699, 4278, 301, 6, 45, "Output",ExpressionUUID->"803692b2-953a-4011-98b5-3c705cdbe364"] +Cell[165307, 4187, 130, 2, 36, "Input",ExpressionUUID->"4daf7a7c-622c-47c3-b5fb-0cf7246a4b73"], +Cell[165440, 4191, 341, 5, 41, "Output",ExpressionUUID->"a9f5268a-0872-49d1-b2c5-943f6473dec6"] }, Open ]], Cell[CellGroupData[{ -Cell[164037, 4289, 1148, 40, 78, "Input",ExpressionUUID->"1b1d1463-8589-474d-b533-05533221ce5a"], -Cell[165188, 4331, 320, 6, 45, "Output",ExpressionUUID->"54a1411e-c577-43be-8a45-a4613c86e6ae"] +Cell[165818, 4201, 1144, 39, 144, "Input",ExpressionUUID->"1b1d1463-8589-474d-b533-05533221ce5a"], +Cell[166965, 4242, 362, 5, 41, "Output",ExpressionUUID->"102801fe-6987-4689-843b-37606b9c9e90"] }, Open ]], Cell[CellGroupData[{ -Cell[165545, 4342, 1045, 36, 78, "Input",ExpressionUUID->"6711db2d-76c0-45fc-a154-b6e909463e13"], -Cell[166593, 4380, 334, 7, 45, "Output",ExpressionUUID->"e4d1cf93-7b9a-4abb-bb91-8958bf792072"] +Cell[167364, 4252, 1041, 35, 144, "Input",ExpressionUUID->"6711db2d-76c0-45fc-a154-b6e909463e13"], +Cell[168408, 4289, 375, 6, 41, "Output",ExpressionUUID->"7aed5878-35d9-4b76-9594-c4cda713635d"] }, Open ]], Cell[CellGroupData[{ -Cell[166964, 4392, 1148, 40, 78, "Input",ExpressionUUID->"2f46feef-fe19-4ae6-b041-de643f5933ea"], -Cell[168115, 4434, 319, 6, 45, "Output",ExpressionUUID->"eccf34c4-5424-4a72-96e5-ba1b9465448f"] +Cell[168820, 4300, 1144, 39, 144, "Input",ExpressionUUID->"2f46feef-fe19-4ae6-b041-de643f5933ea"], +Cell[169967, 4341, 359, 5, 41, "Output",ExpressionUUID->"17ec4fe2-f586-4a1e-8cfa-9e59fd9cb73c"] }, Open ]], Cell[CellGroupData[{ -Cell[168471, 4445, 112, 2, 40, "Input",ExpressionUUID->"ab8d5ccc-87e4-41b2-a61b-3a61982208ac"], -Cell[168586, 4449, 318, 6, 45, "Output",ExpressionUUID->"d3169ac3-6ffc-4bb8-90c6-6d5d74d56ea1"] +Cell[170363, 4351, 108, 1, 36, "Input",ExpressionUUID->"ab8d5ccc-87e4-41b2-a61b-3a61982208ac"], +Cell[170474, 4354, 358, 5, 41, "Output",ExpressionUUID->"bc0c5f92-28cb-4c1c-ab25-09ad451fb699"] }, Open ]], Cell[CellGroupData[{ -Cell[168941, 4460, 112, 2, 40, "Input",ExpressionUUID->"f0e29519-e5d2-4030-8e3e-5e1a05e73def"], -Cell[169056, 4464, 312, 6, 45, "Output",ExpressionUUID->"cccab308-5eb9-4ca0-bb10-e9b1fdc432aa"] +Cell[170869, 4364, 108, 1, 36, "Input",ExpressionUUID->"f0e29519-e5d2-4030-8e3e-5e1a05e73def"], +Cell[170980, 4367, 358, 6, 41, "Output",ExpressionUUID->"f013e8d8-0156-413a-a1b5-5ab5c2f903cb"] }, Open ]], Cell[CellGroupData[{ -Cell[169405, 4475, 112, 2, 40, "Input",ExpressionUUID->"e4d3f5d0-7ba5-41d4-9d75-26e182eaa293"], -Cell[169520, 4479, 306, 6, 45, "Output",ExpressionUUID->"10de6b50-f5e9-482d-8d51-4c39d987eeb9"] +Cell[171375, 4378, 108, 1, 36, "Input",ExpressionUUID->"e4d3f5d0-7ba5-41d4-9d75-26e182eaa293"], +Cell[171486, 4381, 350, 6, 41, "Output",ExpressionUUID->"6f1f4e93-eead-43fc-949b-c61fa77df767"] }, Open ]], Cell[CellGroupData[{ -Cell[169863, 4490, 112, 2, 40, "Input",ExpressionUUID->"c5d1c79f-9d47-4e53-aa84-e02f48280215"], -Cell[169978, 4494, 289, 5, 45, "Output",ExpressionUUID->"5f304fad-9033-4c64-9933-908f1226d416"] +Cell[171873, 4392, 108, 1, 36, "Input",ExpressionUUID->"c5d1c79f-9d47-4e53-aa84-e02f48280215"], +Cell[171984, 4395, 335, 5, 41, "Output",ExpressionUUID->"3a332b33-e232-4ef9-8e93-d3afc923a947"] }, Open ]], Cell[CellGroupData[{ -Cell[170304, 4504, 111, 2, 40, "Input",ExpressionUUID->"1f76c2c6-d44b-4ad1-a305-91d6d9cfb3de"], -Cell[170418, 4508, 291, 5, 45, "Output",ExpressionUUID->"c4c0310f-0117-4a9b-8ffb-029e909ea83f"] +Cell[172356, 4405, 107, 1, 36, "Input",ExpressionUUID->"1f76c2c6-d44b-4ad1-a305-91d6d9cfb3de"], +Cell[172466, 4408, 335, 5, 41, "Output",ExpressionUUID->"92935295-abcf-49e8-819f-68ba37dd1db1"] }, Open ]], Cell[CellGroupData[{ -Cell[170746, 4518, 111, 2, 40, "Input",ExpressionUUID->"abcec447-a992-4fb6-a942-f6cc08e5359a"], -Cell[170860, 4522, 296, 5, 45, "Output",ExpressionUUID->"3162e120-9206-43af-a40a-7c4441ab06b3"] +Cell[172838, 4418, 107, 1, 36, "Input",ExpressionUUID->"abcec447-a992-4fb6-a942-f6cc08e5359a"], +Cell[172948, 4421, 342, 5, 41, "Output",ExpressionUUID->"c8bdb2cb-f591-4cac-9ecd-178111bebbfd"] }, Open ]], Cell[CellGroupData[{ -Cell[171193, 4532, 501, 17, 77, "Input",ExpressionUUID->"57c61dac-80b3-4542-b4fe-84eefab12319"], -Cell[171697, 4551, 307, 6, 45, "Output",ExpressionUUID->"f74048a6-5a4d-46ab-92f5-9a8ce66e8449"] +Cell[173327, 4431, 497, 16, 71, "Input",ExpressionUUID->"57c61dac-80b3-4542-b4fe-84eefab12319"], +Cell[173827, 4449, 351, 6, 41, "Output",ExpressionUUID->"a9912436-f2b6-41de-b9d1-dbade3c741c2"] }, Open ]], Cell[CellGroupData[{ -Cell[172041, 4562, 501, 17, 77, "Input",ExpressionUUID->"88cb455b-c21f-428e-90d8-99b777f7069f"], -Cell[172545, 4581, 310, 6, 41, "Output",ExpressionUUID->"f1ca22ea-5f4d-4b5a-b5f3-43ce9e6dc189"] +Cell[174215, 4460, 497, 16, 71, "Input",ExpressionUUID->"88cb455b-c21f-428e-90d8-99b777f7069f"], +Cell[174715, 4478, 354, 6, 41, "Output",ExpressionUUID->"ba408ccc-6c9f-495a-8013-a04a8a0f665b"] }, Open ]], Cell[CellGroupData[{ -Cell[172892, 4592, 1792, 61, 340, "Input",ExpressionUUID->"93b7a45c-6511-4e69-9c45-0d633fd7f374"], -Cell[174687, 4655, 291, 5, 41, "Output",ExpressionUUID->"56aece5d-bed6-4b8e-8e02-2562ea80be8d"] +Cell[175106, 4489, 1788, 60, 340, "Input",ExpressionUUID->"93b7a45c-6511-4e69-9c45-0d633fd7f374"], +Cell[176897, 4551, 337, 5, 41, "Output",ExpressionUUID->"b9a192eb-8ec9-491f-b800-dbcf44687abb"] }, Open ]], Cell[CellGroupData[{ -Cell[175015, 4665, 1105, 37, 174, "Input",ExpressionUUID->"56296330-5f4c-4d26-8935-94174ff82c03"], -Cell[176123, 4704, 312, 6, 41, "Output",ExpressionUUID->"422bc55e-ad24-4e67-a92f-f47f4a5275e0"] +Cell[177271, 4561, 1101, 36, 174, "Input",ExpressionUUID->"56296330-5f4c-4d26-8935-94174ff82c03"], +Cell[178375, 4599, 358, 6, 41, "Output",ExpressionUUID->"a6f20248-c187-4fc9-aed7-984f30bb5af0"] }, Open ]], Cell[CellGroupData[{ -Cell[176472, 4715, 1822, 62, 340, "Input",ExpressionUUID->"d96ee3ec-f062-4f5e-8919-9123d91d7459"], -Cell[178297, 4779, 292, 5, 41, "Output",ExpressionUUID->"d78fec70-bba0-4067-8341-8d5ca2da841a"] +Cell[178770, 4610, 1818, 61, 340, "Input",ExpressionUUID->"d96ee3ec-f062-4f5e-8919-9123d91d7459"], +Cell[180591, 4673, 336, 5, 41, "Output",ExpressionUUID->"e05cb05a-9a0e-458c-af64-e7500d692777"] }, Open ]], Cell[CellGroupData[{ -Cell[178626, 4789, 1635, 54, 208, "Input",ExpressionUUID->"33137ca0-f184-4c25-89cc-b6113bf33322"], -Cell[180264, 4845, 291, 5, 41, "Output",ExpressionUUID->"05bd9f17-9fdb-4b6f-9ceb-c36aa2203f03"] +Cell[180964, 4683, 1631, 53, 208, "Input",ExpressionUUID->"33137ca0-f184-4c25-89cc-b6113bf33322"], +Cell[182598, 4738, 337, 5, 41, "Output",ExpressionUUID->"3ac25c2b-6f3a-4904-938d-b2389c2cc105"] }, Open ]], Cell[CellGroupData[{ -Cell[180592, 4855, 1635, 54, 208, "Input",ExpressionUUID->"92750103-210c-42fb-ae6c-b7962adcac6e"], -Cell[182230, 4911, 289, 5, 41, "Output",ExpressionUUID->"8a6efb38-a045-4948-a637-f1bb1190bc1f"] +Cell[182972, 4748, 1631, 53, 208, "Input",ExpressionUUID->"92750103-210c-42fb-ae6c-b7962adcac6e"], +Cell[184606, 4803, 334, 5, 41, "Output",ExpressionUUID->"f603e1f2-9f91-4edb-b78a-57fcdc4727cb"] }, Open ]], -Cell[182534, 4919, 184, 3, 36, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], -Cell[182721, 4924, 152, 3, 36, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], -Cell[182876, 4929, 185, 4, 36, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], -Cell[183064, 4935, 154, 3, 36, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[183243, 4942, 1273, 41, 174, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[184519, 4985, 106, 0, 41, "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[184977, 4813, 205, 3, 36, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], +Cell[185185, 4818, 182, 2, 41, "Output",ExpressionUUID->"0c80d562-7210-48b5-a85b-3365b039d48c"] }, Open ]], +Cell[185382, 4823, 171, 2, 109, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], Cell[CellGroupData[{ -Cell[184662, 4990, 910, 31, 128, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[185575, 5023, 106, 0, 41, "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[185578, 4829, 204, 3, 36, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], +Cell[185785, 4834, 183, 2, 41, "Output",ExpressionUUID->"fef400d3-6cab-4a5e-8d4a-9ae43e624e0e"] }, Open ]], +Cell[185983, 4839, 173, 2, 109, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[185718, 5028, 885, 30, 128, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[186606, 5060, 106, 0, 41, "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[186181, 4845, 1297, 42, 174, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], +Cell[187481, 4889, 194, 2, 41, "Output",ExpressionUUID->"5f958ed3-b8b1-477d-ac3e-c5949b401c46"] }, Open ]], Cell[CellGroupData[{ -Cell[186749, 5065, 532, 18, 66, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[187284, 5085, 101, 0, 41, "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[187712, 4896, 929, 30, 128, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], +Cell[188644, 4928, 194, 2, 41, "Output",ExpressionUUID->"55b5440f-dd19-42de-aa11-f68bcaad5d84"] }, Open ]], Cell[CellGroupData[{ -Cell[187422, 5090, 625, 21, 66, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[188050, 5113, 100, 0, 41, "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[188875, 4935, 904, 29, 128, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], +Cell[189782, 4966, 194, 2, 41, "Output",ExpressionUUID->"af6d62ea-206f-4da2-a90c-f6a5efa8336b"] }, Open ]], Cell[CellGroupData[{ -Cell[188187, 5118, 144, 4, 71, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[188334, 5124, 101, 0, 41, "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[190013, 4973, 554, 18, 66, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], +Cell[190570, 4993, 189, 2, 41, "Output",ExpressionUUID->"b891ce9e-e58d-43e6-90c7-cdfe6eea0de7"] }, Open ]], Cell[CellGroupData[{ -Cell[188472, 5129, 144, 4, 69, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[188619, 5135, 100, 0, 41, "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[190796, 5000, 647, 21, 66, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], +Cell[191446, 5023, 189, 2, 41, "Output",ExpressionUUID->"bf587c61-d657-4652-afd8-2ec731125c8f"] }, Open ]], Cell[CellGroupData[{ -Cell[188756, 5140, 155, 4, 55, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[188914, 5146, 101, 0, 41, "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[191672, 5030, 166, 4, 71, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], +Cell[191841, 5036, 189, 2, 41, "Output",ExpressionUUID->"649727f7-f2e0-4889-a186-02578fe8587d"] }, Open ]], Cell[CellGroupData[{ -Cell[189052, 5151, 155, 4, 55, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[189210, 5157, 101, 0, 41, "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[192067, 5043, 166, 4, 69, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], +Cell[192236, 5049, 188, 2, 41, "Output",ExpressionUUID->"4ef0fd36-93c8-4819-93ec-eb4a3e0e127e"] }, Open ]], Cell[CellGroupData[{ -Cell[189348, 5162, 6029, 184, 831, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[195380, 5348, 102, 0, 41, "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[192461, 5056, 177, 4, 55, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], +Cell[192641, 5062, 193, 2, 41, "Output",ExpressionUUID->"3ada5c56-d32b-47d4-b6cc-4fa7464de8a4"] }, Open ]], Cell[CellGroupData[{ -Cell[195519, 5353, 342, 8, 53, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[195864, 5363, 342, 6, 26, "Message",ExpressionUUID->"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], -Cell[196209, 5371, 100, 0, 41, "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[192871, 5069, 177, 4, 55, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], +Cell[193051, 5075, 191, 2, 41, "Output",ExpressionUUID->"71ebfbe0-7f0e-4028-83da-1528fd884f5e"] }, Open ]], Cell[CellGroupData[{ -Cell[196346, 5376, 6096, 186, 900, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[202445, 5564, 103, 0, 41, "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[193279, 5082, 6051, 184, 831, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], +Cell[199333, 5268, 193, 2, 41, "Output",ExpressionUUID->"79006835-30ad-45c9-9bda-8f2fead39770"] }, Open ]], Cell[CellGroupData[{ -Cell[202585, 5569, 342, 8, 53, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[202930, 5579, 342, 6, 26, "Message",ExpressionUUID->"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], -Cell[203275, 5587, 100, 0, 41, "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[199563, 5275, 364, 8, 53, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], +Cell[199930, 5285, 192, 2, 41, "Output",ExpressionUUID->"bf5992c5-8fcb-4c05-9f45-b24997f337bb"] }, Open ]], Cell[CellGroupData[{ -Cell[203412, 5592, 2637, 87, 435, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[206052, 5681, 101, 0, 41, "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[200159, 5292, 6118, 186, 900, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], +Cell[206280, 5480, 189, 2, 41, "Output",ExpressionUUID->"cb752439-26a6-4ad3-992b-e429f49913ff"] }, Open ]], Cell[CellGroupData[{ -Cell[206190, 5686, 2577, 84, 435, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[208770, 5772, 102, 0, 41, "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[206506, 5487, 364, 8, 53, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], +Cell[206873, 5497, 188, 2, 41, "Output",ExpressionUUID->"b83162cc-e563-4659-a7d2-865ba652605b"] }, Open ]], Cell[CellGroupData[{ -Cell[208909, 5777, 3686, 117, 575, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[212598, 5896, 102, 0, 41, "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[207098, 5504, 2659, 87, 435, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], +Cell[209760, 5593, 192, 2, 41, "Output",ExpressionUUID->"a5312a3c-6aee-4e0b-8738-6ae8c3454d3a"] }, Open ]], -Cell[212715, 5899, 138, 3, 36, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ -Cell[212878, 5906, 2054, 59, 276, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], -Cell[214935, 5967, 342, 6, 26, "Message",ExpressionUUID->"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], -Cell[215280, 5975, 342, 6, 26, "Message",ExpressionUUID->"42c1a263-2456-664a-bb33-c5fe841cb412"], -Cell[215625, 5983, 100, 0, 41, "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[209989, 5600, 2599, 84, 435, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], +Cell[212591, 5686, 191, 2, 41, "Output",ExpressionUUID->"901f5368-7cce-40da-8679-3b12cb0202ee"] }, Open ]], Cell[CellGroupData[{ -Cell[215762, 5988, 2049, 58, 276, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], -Cell[217814, 6048, 342, 6, 26, "Message",ExpressionUUID->"be4d7bfb-c18e-564a-93ce-3f42607886e7"], -Cell[218159, 6056, 342, 6, 26, "Message",ExpressionUUID->"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], -Cell[218504, 6064, 100, 0, 41, "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[212819, 5693, 3708, 117, 575, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], +Cell[216530, 5812, 192, 2, 41, "Output",ExpressionUUID->"78218b9c-24cf-4b73-90e6-aa4c185c6156"] }, Open ]], +Cell[216737, 5817, 160, 3, 109, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ -Cell[218641, 6069, 1938, 53, 232, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], -Cell[220582, 6124, 342, 6, 26, "Message",ExpressionUUID->"d3cb6fbc-3803-0541-80d1-8cab47341c44"], -Cell[220927, 6132, 342, 6, 26, "Message",ExpressionUUID->"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], -Cell[221272, 6140, 342, 6, 26, "Message",ExpressionUUID->"d8687e0f-2f42-0543-a749-78a1ff3c9572"], -Cell[221617, 6148, 407, 7, 48, "Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], -Cell[222027, 6157, 9852, 394, 232, 4231, 300, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], -Cell[231882, 6553, 191, 5, 41, "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-c578eb57eb6a"] +Cell[216922, 5824, 2073, 58, 276, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], +Cell[218998, 5884, 664, 14, 73, "Message",ExpressionUUID->"f5b293cd-8747-4220-b7aa-fe7433e5f227"], +Cell[219665, 5900, 663, 14, 73, "Message",ExpressionUUID->"8e693e1c-b63a-44b3-acf4-2a8dd2af1ebd"], +Cell[220331, 5916, 665, 14, 73, "Message",ExpressionUUID->"64f8cb39-2447-49c8-bd02-2ef15a146f9d"], +Cell[220999, 5932, 490, 11, 32, "Message",ExpressionUUID->"88ee63d9-4dc3-4fa2-b5ab-f872297caf32"], +Cell[221492, 5945, 187, 2, 41, "Output",ExpressionUUID->"1c364cd8-2c31-4208-89fd-0f75f8826521"] }, Open ]], Cell[CellGroupData[{ -Cell[232110, 6563, 2094, 60, 311, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], -Cell[234207, 6625, 342, 6, 26, "Message",ExpressionUUID->"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], -Cell[234552, 6633, 342, 6, 26, "Message",ExpressionUUID->"a2ecd22c-b766-5347-9e03-9d459620be75"], -Cell[234897, 6641, 342, 6, 26, "Message",ExpressionUUID->"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], -Cell[235242, 6649, 407, 7, 48, "Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], -Cell[235652, 6658, 10253, 391, 232, 4113, 287, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"06204099-db57-8e4e-bcc4-fa1ae37c0063"], -Cell[245908, 7051, 191, 5, 41, "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-04dec8739bf5"] +Cell[221716, 5952, 2070, 58, 276, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], +Cell[223789, 6012, 666, 14, 73, "Message",ExpressionUUID->"8541e5f7-40d8-4be5-8c33-44ccb76a0fac"], +Cell[224458, 6028, 665, 14, 73, "Message",ExpressionUUID->"b6266434-5501-4054-be25-358a7aa45132"], +Cell[225126, 6044, 665, 14, 73, "Message",ExpressionUUID->"a4c782a9-4a19-4ff3-a0d2-6a5975cd3846"], +Cell[225794, 6060, 492, 11, 32, "Message",ExpressionUUID->"7a3a28f3-cadd-4573-b06a-1031b9822c06"], +Cell[226289, 6073, 189, 2, 41, "Output",ExpressionUUID->"7ed11b55-4199-4771-b627-01baffed48a0"] }, Open ]], -Cell[246114, 7059, 2455, 69, 296, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], -Cell[248572, 7130, 209, 5, 36, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], Cell[CellGroupData[{ -Cell[248806, 7139, 215, 7, 61, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[249024, 7148, 100, 0, 41, "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[226515, 6080, 2049, 54, 232, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], +Cell[228567, 6136, 20023, 377, 300, "Output",ExpressionUUID->"461c9ad4-05ca-4bff-b657-2d53a3d68ad5"] }, Open ]], Cell[CellGroupData[{ -Cell[249161, 7153, 1814, 53, 311, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], -Cell[250978, 7208, 342, 6, 26, "Message",ExpressionUUID->"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], -Cell[251323, 7216, 342, 6, 26, "Message",ExpressionUUID->"05911c33-7605-8b49-a7ba-7fc8c8f30741"], -Cell[251668, 7224, 342, 6, 26, "Message",ExpressionUUID->"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], -Cell[252013, 7232, 407, 7, 48, "Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], -Cell[252423, 7241, 10062, 396, 232, 4186, 297, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"899e43aa-c372-6647-a3e4-4952f308ab17"], -Cell[262488, 7639, 191, 5, 41, "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-baecb9a57d9b"] +Cell[248627, 6518, 2113, 59, 311, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], +Cell[250743, 6579, 540, 12, 71, "Message",ExpressionUUID->"6920b9d0-0fed-4902-b6a4-da6318e36848"], +Cell[251286, 6593, 545, 12, 71, "Message",ExpressionUUID->"a7cdc4e6-4850-43a8-ba1a-dc49e875c155"], +Cell[251834, 6607, 548, 12, 71, "Message",ExpressionUUID->"e038f56e-60ff-483f-ad87-a6df92f924fa"], +Cell[252385, 6621, 493, 11, 32, "Message",ExpressionUUID->"ebd0d93d-70ee-4ab6-9af4-299ddc0fcd82"], +Cell[252881, 6634, 27029, 491, 290, "Output",ExpressionUUID->"368ba23a-0bbe-4e9c-b5f8-61d3de97a491"] }, Open ]], Cell[CellGroupData[{ -Cell[262716, 7649, 1590, 47, 132, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], -Cell[264309, 7698, 342, 6, 26, "Message",ExpressionUUID->"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], -Cell[264654, 7706, 101, 0, 41, "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[279947, 7130, 2477, 69, 296, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], +Cell[282427, 7201, 9514, 222, 298, "Output",ExpressionUUID->"9ae78470-d8a7-4941-a567-a8980c42fc42"] }, Open ]], Cell[CellGroupData[{ -Cell[264792, 7711, 2247, 64, 348, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], -Cell[267042, 7777, 342, 6, 26, "Message",ExpressionUUID->"56921c73-2b67-0e4a-9808-5f61de992c7e"], -Cell[267387, 7785, 342, 6, 26, "Message",ExpressionUUID->"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], -Cell[267732, 7793, 103, 0, 41, "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[291978, 7428, 228, 4, 36, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], +Cell[292209, 7434, 33413, 623, 290, "Output",ExpressionUUID->"fb557fff-88d2-4c0e-af98-1fe2eaab4f53"] }, Open ]], Cell[CellGroupData[{ -Cell[267872, 7798, 2219, 64, 348, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], -Cell[270094, 7864, 342, 6, 26, "Message",ExpressionUUID->"1795c3b9-0182-224c-b986-6414d6712c04"], -Cell[270439, 7872, 342, 6, 26, "Message",ExpressionUUID->"c3b31753-a67f-9b45-b822-068e1df11f68"], -Cell[270784, 7880, 100, 0, 41, "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[325659, 8062, 234, 6, 61, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], +Cell[325896, 8070, 188, 2, 41, "Output",ExpressionUUID->"a4874d3f-c25b-463e-9f4d-9a006a8936cb"] }, Open ]], Cell[CellGroupData[{ -Cell[270921, 7885, 2221, 64, 348, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], -Cell[273145, 7951, 342, 6, 26, "Message",ExpressionUUID->"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], -Cell[273490, 7959, 342, 6, 26, "Message",ExpressionUUID->"4e2b22f2-1724-7649-93fc-33cd27bb415e"], -Cell[273835, 7967, 101, 0, 41, "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[326121, 8077, 1833, 52, 311, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], +Cell[327957, 8131, 545, 12, 71, "Message",ExpressionUUID->"84d96fb1-a69a-4b5f-8ac0-d5300d9117bb"], +Cell[328505, 8145, 549, 12, 71, "Message",ExpressionUUID->"7e6ad2e2-44ad-4bbc-bf50-c89240a4235e"], +Cell[329057, 8159, 552, 12, 71, "Message",ExpressionUUID->"f6a7081c-cb4e-41e2-801d-aa39e36dec06"], +Cell[329612, 8173, 493, 11, 32, "Message",ExpressionUUID->"8069e7ba-fe1a-40f4-a622-1ffd80879bb0"], +Cell[330108, 8186, 28591, 515, 290, "Output",ExpressionUUID->"a2031d71-24ec-4be1-b62e-1902349d5041"] }, Open ]], Cell[CellGroupData[{ -Cell[273973, 7972, 215, 6, 60, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[274191, 7980, 104, 0, 41, "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[358736, 8706, 1616, 48, 132, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], +Cell[360355, 8756, 642, 14, 73, "Message",ExpressionUUID->"308df87a-b217-4609-9fd2-ba57bfeadb5b"], +Cell[361000, 8772, 644, 14, 73, "Message",ExpressionUUID->"72901b40-e54c-4212-af14-fd1b93a4d93f"], +Cell[361647, 8788, 643, 14, 73, "Message",ExpressionUUID->"7f0be2b9-06e8-4eef-b430-9c9773076fe9"], +Cell[362293, 8804, 471, 11, 32, "Message",ExpressionUUID->"aeb32ca5-89ac-4482-b6e8-89c634b27722"], +Cell[362767, 8817, 170, 3, 41, "Output",ExpressionUUID->"eb5c22a9-bfc0-4d65-9f61-0003b1f12576"] }, Open ]], -Cell[274310, 7983, 247, 5, 36, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ -Cell[274582, 7992, 532, 18, 66, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[275117, 8012, 100, 0, 41, "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[362974, 8825, 2270, 64, 348, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], +Cell[365247, 8891, 643, 14, 73, "Message",ExpressionUUID->"1a45e09b-e974-4575-968d-f3fd3c077b0a"], +Cell[365893, 8907, 646, 14, 73, "Message",ExpressionUUID->"66aa69ea-8caf-45c6-991d-1dc774e3fd30"], +Cell[366542, 8923, 644, 14, 73, "Message",ExpressionUUID->"c6c7ba9a-f90e-4eb5-a8c4-8a6a05a0bd8a"], +Cell[367189, 8939, 473, 11, 32, "Message",ExpressionUUID->"1e487b19-f810-4097-905e-fcc3f3ccf871"], +Cell[367665, 8952, 171, 3, 41, "Output",ExpressionUUID->"1cff9fee-f905-4a0b-b69a-ecb768b281b9"] }, Open ]], Cell[CellGroupData[{ -Cell[275254, 8017, 144, 4, 71, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[275401, 8023, 100, 0, 41, "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[367873, 8960, 2231, 63, 348, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], +Cell[370107, 9025, 643, 14, 73, "Message",ExpressionUUID->"87f2de96-d09f-4dc5-aec5-59c47c12589a"], +Cell[370753, 9041, 644, 14, 73, "Message",ExpressionUUID->"c79f2184-ac5f-413f-a2a9-8270029aeb10"], +Cell[371400, 9057, 646, 14, 73, "Message",ExpressionUUID->"57c069a1-d911-4967-9d9c-c4ac276c94cb"], +Cell[372049, 9073, 470, 11, 32, "Message",ExpressionUUID->"aa0463cb-8e83-4240-8c63-47acc0692099"], +Cell[372522, 9086, 171, 3, 41, "Output",ExpressionUUID->"369a9208-18bc-4585-b467-21c559a8f4a0"] }, Open ]], Cell[CellGroupData[{ -Cell[275538, 8028, 155, 4, 55, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[275696, 8034, 100, 0, 41, "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[372730, 9094, 2233, 63, 348, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], +Cell[374966, 9159, 643, 14, 73, "Message",ExpressionUUID->"4bacf803-a996-468b-b4be-00b46b9dfc32"], +Cell[375612, 9175, 644, 14, 73, "Message",ExpressionUUID->"b1335e62-0d2b-4cca-885c-5ff2c936d13d"], +Cell[376259, 9191, 644, 14, 73, "Message",ExpressionUUID->"44c34357-96d1-4ee0-85dd-7d398bb2bd45"], +Cell[376906, 9207, 473, 11, 32, "Message",ExpressionUUID->"c9603167-989f-4c77-ab3d-b98cc34c0c55"], +Cell[377382, 9220, 170, 3, 41, "Output",ExpressionUUID->"ae5e6074-1a5d-44eb-b661-984855a9b55a"] }, Open ]], Cell[CellGroupData[{ -Cell[275833, 8039, 6029, 184, 831, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[281865, 8225, 102, 0, 41, "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[377589, 9228, 238, 6, 60, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], +Cell[377830, 9236, 172, 3, 41, "Output",ExpressionUUID->"a1aeec95-3634-4473-acbe-6809d7d223cb"] }, Open ]], +Cell[378017, 9242, 273, 6, 109, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ -Cell[282004, 8230, 342, 8, 53, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[282349, 8240, 342, 6, 26, "Message",ExpressionUUID->"def6b331-c871-b04d-a16e-4fc00b03d009"], -Cell[282694, 8248, 99, 0, 41, "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[378315, 9252, 558, 19, 66, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], +Cell[378876, 9273, 170, 3, 41, "Output",ExpressionUUID->"2fadf69d-206f-4e0f-90e3-29507f28635b"] }, Open ]], Cell[CellGroupData[{ -Cell[282830, 8253, 6096, 186, 900, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[288929, 8441, 102, 0, 41, "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[379083, 9281, 170, 5, 71, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], +Cell[379256, 9288, 171, 3, 41, "Output",ExpressionUUID->"58386002-52ed-46e6-a8a5-a76b3ecae9b4"] }, Open ]], Cell[CellGroupData[{ -Cell[289068, 8446, 342, 8, 53, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[289413, 8456, 342, 6, 26, "Message",ExpressionUUID->"c6c8676e-4601-144e-b83c-769e22949175"], -Cell[289758, 8464, 100, 0, 41, "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[379464, 9296, 181, 5, 55, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], +Cell[379648, 9303, 171, 3, 41, "Output",ExpressionUUID->"36a1007f-8dcb-44b2-a838-15c8cbceba9a"] }, Open ]], Cell[CellGroupData[{ -Cell[289895, 8469, 2637, 87, 435, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[292535, 8558, 101, 0, 41, "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[379856, 9311, 6055, 185, 831, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], +Cell[385914, 9498, 173, 3, 41, "Output",ExpressionUUID->"a22dd827-7c6a-4fd0-8c37-2c3b74e22ef0"] }, Open ]], Cell[CellGroupData[{ -Cell[292673, 8563, 2577, 84, 435, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[295253, 8649, 102, 0, 41, "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[386124, 9506, 368, 9, 53, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], +Cell[386495, 9517, 170, 3, 41, "Output",ExpressionUUID->"4b60103b-9063-4f31-9269-e2425bdbb1af"] }, Open ]], Cell[CellGroupData[{ -Cell[295392, 8654, 3686, 117, 575, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[299081, 8773, 102, 0, 41, "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[386702, 9525, 6122, 187, 900, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], +Cell[392827, 9714, 172, 3, 41, "Output",ExpressionUUID->"d74b8d04-1f35-41e0-8c58-489e4468472b"] }, Open ]], Cell[CellGroupData[{ -Cell[299220, 8778, 2052, 59, 276, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], -Cell[301275, 8839, 342, 6, 26, "Message",ExpressionUUID->"7fd60dea-f794-4744-8801-bfb1a50a0e07"], -Cell[301620, 8847, 342, 6, 26, "Message",ExpressionUUID->"0b8c0718-41d2-4542-8afe-212a15805650"], -Cell[301965, 8855, 101, 0, 41, "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[393036, 9722, 368, 9, 53, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], +Cell[393407, 9733, 171, 3, 41, "Output",ExpressionUUID->"ea13fcb5-e9d3-43fd-84df-7ab8a53a2c4c"] }, Open ]], Cell[CellGroupData[{ -Cell[302103, 8860, 2054, 59, 276, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], -Cell[304160, 8921, 342, 6, 26, "Message",ExpressionUUID->"b6f0ccc2-ff83-124b-a341-e143319c7670"], -Cell[304505, 8929, 342, 6, 26, "Message",ExpressionUUID->"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], -Cell[304850, 8937, 100, 0, 41, "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[393615, 9741, 2663, 88, 435, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], +Cell[396281, 9831, 174, 3, 41, "Output",ExpressionUUID->"0eeebe53-7722-4835-b010-b7e50ab1ad6a"] }, Open ]], Cell[CellGroupData[{ -Cell[304987, 8942, 2030, 55, 232, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], -Cell[307020, 8999, 342, 6, 26, "Message",ExpressionUUID->"7797a546-4085-124a-83da-5f3c472cdc4c"], -Cell[307365, 9007, 342, 6, 26, "Message",ExpressionUUID->"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], -Cell[307710, 9015, 342, 6, 26, "Message",ExpressionUUID->"ca7472ca-7b27-a54a-84a1-e603fa592207"], -Cell[308055, 9023, 407, 7, 48, "Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], -Cell[308465, 9032, 9432, 438, 232, "Graphics",ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], -Cell[317900, 9472, 191, 5, 41, "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-49e8ffb5e8c8"] +Cell[396492, 9839, 2603, 85, 435, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], +Cell[399098, 9926, 171, 3, 41, "Output",ExpressionUUID->"f1d22bfd-b2f6-406a-ab11-e0b8569f79a9"] }, Open ]], Cell[CellGroupData[{ -Cell[318128, 9482, 2118, 60, 311, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], -Cell[320249, 9544, 342, 6, 26, "Message",ExpressionUUID->"b9265795-17b8-4e47-bd29-fee31586537e"], -Cell[320594, 9552, 342, 6, 26, "Message",ExpressionUUID->"072fb53f-7116-0f41-a298-6891351a3192"], -Cell[320939, 9560, 342, 6, 26, "Message",ExpressionUUID->"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], -Cell[321284, 9568, 407, 7, 48, "Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], -Cell[321694, 9577, 8546, 368, 232, "Graphics",ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], -Cell[330243, 9947, 191, 5, 41, "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-87bc9c72594a"] +Cell[399306, 9934, 3712, 118, 575, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], +Cell[403021, 10054, 172, 3, 41, "Output",ExpressionUUID->"378ad4fa-cb21-48c5-88a2-a4a660d6f4e5"] }, Open ]], -Cell[330449, 9955, 209, 5, 36, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], Cell[CellGroupData[{ -Cell[330683, 9964, 1590, 47, 132, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], -Cell[332276, 10013, 342, 6, 26, "Message",ExpressionUUID->"52cff8eb-0c77-c944-a54f-e282b00ce766"], -Cell[332621, 10021, 101, 0, 41, "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[403230, 10062, 2075, 59, 276, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], +Cell[405308, 10123, 644, 14, 73, "Message",ExpressionUUID->"b5dd6b94-e102-4090-b32b-202790d62017"], +Cell[405955, 10139, 643, 14, 73, "Message",ExpressionUUID->"59f52ed1-2174-4a17-b207-9e594f0e85c8"], +Cell[406601, 10155, 644, 14, 73, "Message",ExpressionUUID->"7605cd59-27af-4701-87df-3ce678fd404e"], +Cell[407248, 10171, 473, 11, 32, "Message",ExpressionUUID->"83e74496-cc23-49c9-9039-b2a87f718561"], +Cell[407724, 10184, 170, 3, 41, "Output",ExpressionUUID->"44b8bdb6-86ce-481e-a45c-00925ab3ce07"] }, Open ]], Cell[CellGroupData[{ -Cell[332759, 10026, 2251, 64, 348, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], -Cell[335013, 10092, 342, 6, 26, "Message",ExpressionUUID->"cb5a1193-7562-6446-a279-d9f6295d156e"], -Cell[335358, 10100, 342, 6, 26, "Message",ExpressionUUID->"566b0ad4-7f4e-b04f-8294-646ce1913fac"], -Cell[335703, 10108, 101, 0, 41, "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[407931, 10192, 2077, 59, 276, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], +Cell[410011, 10253, 644, 14, 73, "Message",ExpressionUUID->"c87bbe6e-9d2a-4bd0-b95d-c39e81e30349"], +Cell[410658, 10269, 643, 14, 73, "Message",ExpressionUUID->"e35a3173-728b-4ed9-b34d-e467f63e04d4"], +Cell[411304, 10285, 646, 14, 73, "Message",ExpressionUUID->"31422bf1-aad9-45c8-bd59-55057c97186b"], +Cell[411953, 10301, 471, 11, 32, "Message",ExpressionUUID->"35094114-3bf1-413e-bfbf-be1d4a6c1300"], +Cell[412427, 10314, 171, 3, 41, "Output",ExpressionUUID->"0b3a50a5-29a8-4141-962f-aa19f55f0454"] }, Open ]], Cell[CellGroupData[{ -Cell[335841, 10113, 2220, 64, 348, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], -Cell[338064, 10179, 342, 6, 26, "Message",ExpressionUUID->"4cd45900-7eb0-6b4b-830a-a339e8117392"], -Cell[338409, 10187, 342, 6, 26, "Message",ExpressionUUID->"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], -Cell[338754, 10195, 101, 0, 41, "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[412635, 10322, 2053, 55, 232, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], +Cell[414691, 10379, 20349, 383, 295, "Output",ExpressionUUID->"6bbd5f42-79a8-4f24-9371-4b950fc8eb74"] }, Open ]], Cell[CellGroupData[{ -Cell[338892, 10200, 2223, 64, 348, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], -Cell[341118, 10266, 342, 6, 26, "Message",ExpressionUUID->"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], -Cell[341463, 10274, 342, 6, 26, "Message",ExpressionUUID->"61220452-df6a-154e-8b5c-fecd0ab287a1"], -Cell[341808, 10282, 101, 0, 41, "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[435077, 10767, 2141, 60, 311, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], +Cell[437221, 10829, 515, 12, 71, "Message",ExpressionUUID->"843bdbf9-e6cf-46cf-b68e-58e422c9775c"], +Cell[437739, 10843, 519, 12, 71, "Message",ExpressionUUID->"4dcc13e8-32f7-40e6-9fc7-9086f86e9001"], +Cell[438261, 10857, 522, 12, 71, "Message",ExpressionUUID->"0c7123d7-f89d-4b04-ad88-50ac319d04ac"], +Cell[438786, 10871, 471, 11, 32, "Message",ExpressionUUID->"9c01c2b2-f41c-446b-a5a6-deaca5426cdf"], +Cell[439260, 10884, 27668, 501, 290, "Output",ExpressionUUID->"b49ba0ff-1c9e-4f6a-8865-9a340c54f1d2"] }, Open ]], Cell[CellGroupData[{ -Cell[341946, 10287, 215, 6, 60, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[342164, 10295, 102, 0, 41, "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[466965, 11390, 232, 5, 36, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], +Cell[467200, 11397, 34054, 633, 290, "Output",ExpressionUUID->"064e142a-6c7d-45b4-831b-18e75e219957"] }, Open ]], -Cell[342281, 10298, 247, 5, 36, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ -Cell[342553, 10307, 532, 18, 66, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[343088, 10327, 101, 0, 41, "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[501291, 12035, 1616, 48, 132, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], +Cell[502910, 12085, 645, 14, 73, "Message",ExpressionUUID->"b2c984a4-2e3c-46fb-bb04-53f3b091bbf9"], +Cell[503558, 12101, 646, 14, 73, "Message",ExpressionUUID->"16693c04-d60e-4265-8f15-d3b1148fc496"], +Cell[504207, 12117, 643, 14, 73, "Message",ExpressionUUID->"684d6e94-697d-44c5-acb5-b8dd66cebeca"], +Cell[504853, 12133, 471, 11, 32, "Message",ExpressionUUID->"97c31c04-2cf7-49f6-8bf7-e444cec502c9"], +Cell[505327, 12146, 170, 3, 41, "Output",ExpressionUUID->"207c53f9-bf35-46cd-99b1-71a329b71bfa"] }, Open ]], Cell[CellGroupData[{ -Cell[343226, 10332, 144, 4, 71, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[343373, 10338, 101, 0, 41, "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[505534, 12154, 2274, 64, 348, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], +Cell[507811, 12220, 644, 14, 73, "Message",ExpressionUUID->"5912d61e-44e2-4c91-870c-cd87f16b7c6f"], +Cell[508458, 12236, 643, 14, 73, "Message",ExpressionUUID->"ebf7ef09-3939-4d3c-b3f9-79611dc878a3"], +Cell[509104, 12252, 644, 14, 73, "Message",ExpressionUUID->"b1b19b52-b0b4-48fe-8aac-bbd9989852ed"], +Cell[509751, 12268, 473, 11, 32, "Message",ExpressionUUID->"42244612-c2a9-405c-b697-4264cb141f6f"], +Cell[510227, 12281, 171, 3, 41, "Output",ExpressionUUID->"e4d7e22a-2d8a-410c-b283-b6dd7ad1c300"] }, Open ]], Cell[CellGroupData[{ -Cell[343511, 10343, 155, 4, 55, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[343669, 10349, 100, 0, 41, "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[510435, 12289, 2232, 63, 348, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], +Cell[512670, 12354, 644, 14, 73, "Message",ExpressionUUID->"319e4bda-83d5-497f-b687-0dd494b074f1"], +Cell[513317, 12370, 642, 14, 73, "Message",ExpressionUUID->"c81d8bed-1917-4733-a9b5-464fc92c2ee1"], +Cell[513962, 12386, 644, 14, 73, "Message",ExpressionUUID->"bc9a16e7-879b-47c5-bfcc-cbfc7bfc5d92"], +Cell[514609, 12402, 471, 11, 32, "Message",ExpressionUUID->"59c9654d-c230-4307-93cf-a4ab9ce3076a"], +Cell[515083, 12415, 171, 3, 41, "Output",ExpressionUUID->"90cf632c-e662-47a1-b999-c7678756f4a7"] }, Open ]], Cell[CellGroupData[{ -Cell[343806, 10354, 6029, 184, 831, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[349838, 10540, 102, 0, 41, "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[515291, 12423, 2235, 63, 348, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], +Cell[517529, 12488, 644, 14, 73, "Message",ExpressionUUID->"e8bfac7f-deab-4734-9d31-a5224ac2b9d5"], +Cell[518176, 12504, 645, 14, 73, "Message",ExpressionUUID->"953b752e-42f3-4b07-bf73-7c6863e01a15"], +Cell[518824, 12520, 646, 14, 73, "Message",ExpressionUUID->"8f3d8620-b366-4687-b611-a0c10b5f7765"], +Cell[519473, 12536, 471, 11, 32, "Message",ExpressionUUID->"2bd50491-24f3-4fb3-86ac-6d8ea09c451e"], +Cell[519947, 12549, 173, 3, 41, "Output",ExpressionUUID->"f9b0002f-1fcb-4897-b646-74b911e75f2b"] }, Open ]], Cell[CellGroupData[{ -Cell[349977, 10545, 342, 8, 53, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[350322, 10555, 342, 6, 26, "Message",ExpressionUUID->"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], -Cell[350667, 10563, 100, 0, 41, "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[520157, 12557, 238, 6, 60, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], +Cell[520398, 12565, 174, 3, 41, "Output",ExpressionUUID->"3db04502-4151-46b1-bd85-62ca5221dc75"] }, Open ]], +Cell[520587, 12571, 273, 6, 109, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ -Cell[350804, 10568, 6096, 186, 900, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[356903, 10756, 102, 0, 41, "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[520885, 12581, 558, 19, 66, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], +Cell[521446, 12602, 170, 3, 41, "Output",ExpressionUUID->"c546558e-00f9-4408-96c7-b6a0d9d44100"] }, Open ]], Cell[CellGroupData[{ -Cell[357042, 10761, 342, 8, 53, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[357387, 10771, 342, 6, 26, "Message",ExpressionUUID->"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], -Cell[357732, 10779, 99, 0, 41, "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[521653, 12610, 170, 5, 71, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], +Cell[521826, 12617, 170, 3, 41, "Output",ExpressionUUID->"ac99f861-0587-42be-9a70-67d631de7153"] }, Open ]], Cell[CellGroupData[{ -Cell[357868, 10784, 2637, 87, 435, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[360508, 10873, 101, 0, 41, "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[522033, 12625, 181, 5, 55, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], +Cell[522217, 12632, 173, 3, 41, "Output",ExpressionUUID->"cc12224a-bc1b-4151-a0c6-dd2483f89c9f"] }, Open ]], Cell[CellGroupData[{ -Cell[360646, 10878, 2577, 84, 435, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[363226, 10964, 102, 0, 41, "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[522427, 12640, 6055, 185, 831, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], +Cell[528485, 12827, 172, 3, 41, "Output",ExpressionUUID->"2e920692-c196-432e-945f-d08fcab4e2af"] }, Open ]], Cell[CellGroupData[{ -Cell[363365, 10969, 3686, 117, 575, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[367054, 11088, 102, 0, 41, "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[528694, 12835, 368, 9, 53, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], +Cell[529065, 12846, 169, 3, 41, "Output",ExpressionUUID->"ec83c5bb-0e9f-4ee3-ae92-4e0b044438a7"] }, Open ]], Cell[CellGroupData[{ -Cell[367193, 11093, 2054, 59, 276, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], -Cell[369250, 11154, 342, 6, 26, "Message",ExpressionUUID->"b82c1933-5313-1d4c-a858-68be8f118333"], -Cell[369595, 11162, 342, 6, 26, "Message",ExpressionUUID->"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], -Cell[369940, 11170, 100, 0, 41, "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[529271, 12854, 6122, 187, 900, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], +Cell[535396, 13043, 175, 3, 41, "Output",ExpressionUUID->"1bdae944-c2e0-4107-939f-9512b239f13f"] }, Open ]], Cell[CellGroupData[{ -Cell[370077, 11175, 2054, 59, 276, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], -Cell[372134, 11236, 342, 6, 26, "Message",ExpressionUUID->"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], -Cell[372479, 11244, 342, 6, 26, "Message",ExpressionUUID->"56712e4d-1aa7-524a-8254-bcfd8978eea0"], -Cell[372824, 11252, 100, 0, 41, "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[535608, 13051, 368, 9, 53, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], +Cell[535979, 13062, 173, 3, 41, "Output",ExpressionUUID->"c5131915-61e9-4aab-ba41-d15898ba9d9e"] }, Open ]], Cell[CellGroupData[{ -Cell[372961, 11257, 2030, 55, 232, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], -Cell[374994, 11314, 342, 6, 26, "Message",ExpressionUUID->"9c6ce535-b42f-3c43-a89e-eda48c04121e"], -Cell[375339, 11322, 342, 6, 26, "Message",ExpressionUUID->"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], -Cell[375684, 11330, 342, 6, 26, "Message",ExpressionUUID->"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], -Cell[376029, 11338, 407, 7, 48, "Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], -Cell[376439, 11347, 9432, 438, 232, "Graphics",ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], -Cell[385874, 11787, 191, 5, 41, "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-8b4ad9ffca61"] +Cell[536189, 13070, 2663, 88, 435, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], +Cell[538855, 13160, 174, 3, 41, "Output",ExpressionUUID->"8870690d-5982-4efa-b90e-aeb51931dbff"] }, Open ]], Cell[CellGroupData[{ -Cell[386102, 11797, 2143, 61, 311, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], -Cell[388248, 11860, 342, 6, 26, "Message",ExpressionUUID->"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], -Cell[388593, 11868, 342, 6, 26, "Message",ExpressionUUID->"71d4e039-c2b8-d74d-819a-80d2051e4273"], -Cell[388938, 11876, 342, 6, 26, "Message",ExpressionUUID->"63625e13-15ef-1f45-89dc-998a1b63a626"], -Cell[389283, 11884, 407, 7, 48, "Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], -Cell[389693, 11893, 8546, 368, 232, "Graphics",ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], -Cell[398242, 12263, 191, 5, 41, "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-1872f77ea023"] +Cell[539066, 13168, 2603, 85, 435, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], +Cell[541672, 13255, 171, 3, 41, "Output",ExpressionUUID->"13c48c4c-01cc-4cdd-afb4-e97829221787"] }, Open ]], -Cell[398448, 12271, 138, 3, 36, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], Cell[CellGroupData[{ -Cell[398611, 12278, 1590, 47, 132, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], -Cell[400204, 12327, 342, 6, 26, "Message",ExpressionUUID->"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], -Cell[400549, 12335, 101, 0, 41, "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[541880, 13263, 3712, 118, 575, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], +Cell[545595, 13383, 172, 3, 41, "Output",ExpressionUUID->"255fc7db-a423-48aa-b7b9-e38daa10b062"] }, Open ]], Cell[CellGroupData[{ -Cell[400687, 12340, 2249, 64, 348, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], -Cell[402939, 12406, 342, 6, 26, "Message",ExpressionUUID->"905b237c-0e51-ab4b-895d-05994c6f1d5f"], -Cell[403284, 12414, 342, 6, 26, "Message",ExpressionUUID->"7ad8c79e-9570-a44d-b593-07aa87056e21"], -Cell[403629, 12422, 100, 0, 41, "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[545804, 13391, 2077, 59, 276, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], +Cell[547884, 13452, 644, 14, 73, "Message",ExpressionUUID->"760583e6-8cff-4e5b-ac10-d0c843f679fe"], +Cell[548531, 13468, 643, 14, 73, "Message",ExpressionUUID->"8009f176-32bd-4adb-8fb6-8ef5238f9f64"], +Cell[549177, 13484, 644, 14, 73, "Message",ExpressionUUID->"dc3c1f65-0654-4015-9c86-8b22a1097f94"], +Cell[549824, 13500, 471, 11, 32, "Message",ExpressionUUID->"a655ae8e-d933-475a-8e73-237f7f1636b0"], +Cell[550298, 13513, 170, 3, 41, "Output",ExpressionUUID->"bd125d5e-714e-48ff-b2eb-0a4a2331c629"] }, Open ]], Cell[CellGroupData[{ -Cell[403766, 12427, 2219, 64, 348, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], -Cell[405988, 12493, 342, 6, 26, "Message",ExpressionUUID->"c516c31a-74b4-f24d-a16a-678221cde87e"], -Cell[406333, 12501, 342, 6, 26, "Message",ExpressionUUID->"5c50b555-9ebe-f94d-801f-34634555f622"], -Cell[406678, 12509, 99, 0, 41, "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[550505, 13521, 2077, 59, 276, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], +Cell[552585, 13582, 643, 14, 73, "Message",ExpressionUUID->"265c36b3-093d-49bb-9c94-8309d6f1193d"], +Cell[553231, 13598, 645, 14, 73, "Message",ExpressionUUID->"0aa93378-634d-453c-9498-4e494794a5b4"], +Cell[553879, 13614, 646, 14, 73, "Message",ExpressionUUID->"a3d32615-1967-4eb1-8650-1a9c59e5cc32"], +Cell[554528, 13630, 473, 11, 32, "Message",ExpressionUUID->"a8159cc4-cd5b-4d0f-a9c5-a25e91032326"], +Cell[555004, 13643, 171, 3, 41, "Output",ExpressionUUID->"c098238a-4640-43f6-a063-6394f33b5f70"] }, Open ]], Cell[CellGroupData[{ -Cell[406814, 12514, 2221, 64, 348, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], -Cell[409038, 12580, 342, 6, 26, "Message",ExpressionUUID->"7ca591cf-a5ce-ce41-8101-8edfca50e890"], -Cell[409383, 12588, 342, 6, 26, "Message",ExpressionUUID->"cbafd11a-4be0-b541-81e4-e62191ae7695"], -Cell[409728, 12596, 101, 0, 41, "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[555212, 13651, 2053, 55, 232, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], +Cell[557268, 13708, 20028, 377, 296, "Output",ExpressionUUID->"dbd6e4e7-8c88-4a44-b403-6c88e9fba795"] }, Open ]], Cell[CellGroupData[{ -Cell[409866, 12601, 215, 6, 60, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[410084, 12609, 102, 0, 41, "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[577333, 14090, 2165, 61, 311, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], +Cell[579501, 14153, 517, 12, 71, "Message",ExpressionUUID->"8d0662aa-3ad5-4d1f-8dc8-3f71b2c1da28"], +Cell[580021, 14167, 521, 12, 71, "Message",ExpressionUUID->"f3c4c042-bfd3-4955-b3d5-a314cde37d90"], +Cell[580545, 14181, 524, 12, 71, "Message",ExpressionUUID->"e8414174-bdb1-4177-8fa1-3db6d1cd4dc4"], +Cell[581072, 14195, 473, 11, 32, "Message",ExpressionUUID->"e2a49b7c-b1df-42f2-b658-285a0245f7cf"], +Cell[581548, 14208, 27035, 492, 290, "Output",ExpressionUUID->"3a3c6139-3ddd-4ef9-ab3a-64e4e0419bcf"] }, Open ]], -Cell[410201, 12612, 115, 1, 36, "Input",ExpressionUUID->"2fc8c501-08b5-4b5e-96d2-21ebd6441cb1"] +Cell[CellGroupData[{ +Cell[608620, 14705, 164, 4, 36, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], +Cell[608787, 14711, 33419, 624, 290, "Output",ExpressionUUID->"3452ebcd-e181-47b6-87e5-eeaab33b81ab"] +}, Open ]], +Cell[CellGroupData[{ +Cell[642243, 15340, 1616, 48, 132, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], +Cell[643862, 15390, 644, 14, 73, "Message",ExpressionUUID->"f900c399-29c0-4106-a510-651dcf6ada2a"], +Cell[644509, 15406, 646, 14, 73, "Message",ExpressionUUID->"1ac564df-1559-47b8-af41-dbb4f67f5bb3"], +Cell[645158, 15422, 641, 14, 73, "Message",ExpressionUUID->"1169bf05-cb01-4e98-8f5f-cddf3c6b2e2e"], +Cell[645802, 15438, 471, 11, 32, "Message",ExpressionUUID->"f02941b5-2d48-4057-8d3e-33a3b59760ab"], +Cell[646276, 15451, 170, 3, 41, "Output",ExpressionUUID->"2c507b18-afff-402c-980d-e4c172e2db80"] +}, Open ]], +Cell[CellGroupData[{ +Cell[646483, 15459, 2272, 64, 348, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], +Cell[648758, 15525, 643, 14, 73, "Message",ExpressionUUID->"55702d8c-4c55-4cad-891b-875161b1d153"], +Cell[649404, 15541, 643, 14, 73, "Message",ExpressionUUID->"9c10f918-fb14-494c-82bb-0f8ba4631d9f"], +Cell[650050, 15557, 644, 14, 73, "Message",ExpressionUUID->"d63dee5c-c611-413d-a09a-938e797781ef"], +Cell[650697, 15573, 471, 11, 32, "Message",ExpressionUUID->"1e17735f-825d-43ea-bca8-1d7aeb118c1f"], +Cell[651171, 15586, 170, 3, 41, "Output",ExpressionUUID->"3674dbb6-329e-4807-ac82-1b70285cd191"] +}, Open ]], +Cell[CellGroupData[{ +Cell[651378, 15594, 2231, 63, 348, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], +Cell[653612, 15659, 646, 14, 73, "Message",ExpressionUUID->"91a2bbb2-815e-460d-82e3-d758c2fb0529"], +Cell[654261, 15675, 643, 14, 73, "Message",ExpressionUUID->"f9696be9-5f71-45fe-b4f3-7973a6b8e3fd"], +Cell[654907, 15691, 644, 14, 73, "Message",ExpressionUUID->"78f28f2d-a5c6-4a2a-8f6f-4f9c1d907552"], +Cell[655554, 15707, 471, 11, 32, "Message",ExpressionUUID->"364b10b2-9d58-496a-8e4b-94144b336f0c"], +Cell[656028, 15720, 171, 3, 41, "Output",ExpressionUUID->"bbc88be7-32c6-4d6c-850e-72004adbffc5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[656236, 15728, 2233, 63, 348, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], +Cell[658472, 15793, 646, 14, 73, "Message",ExpressionUUID->"0e24b6c4-1052-4469-8a2f-77793445a472"], +Cell[659121, 15809, 643, 14, 73, "Message",ExpressionUUID->"21c466bb-333f-417e-a597-75d83044582d"], +Cell[659767, 15825, 644, 14, 73, "Message",ExpressionUUID->"8f89dbaa-d615-495e-a581-bd3c74594723"], +Cell[660414, 15841, 471, 11, 32, "Message",ExpressionUUID->"f77678a7-e8e0-4f2d-8d67-cbb0cb606add"], +Cell[660888, 15854, 170, 3, 41, "Output",ExpressionUUID->"cff03890-3627-427f-a5ac-38e5f790ffdd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[661095, 15862, 238, 6, 60, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], +Cell[661336, 15870, 172, 3, 41, "Output",ExpressionUUID->"16104a80-c848-4fe1-adb7-417932fbfab5"] +}, Open ]], +Cell[661523, 15876, 143, 3, 109, "Input",ExpressionUUID->"2fc8c501-08b5-4b5e-96d2-21ebd6441cb1"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw1.nb b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw1.nb index b6a0e02..55224f5 100644 --- a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw1.nb +++ b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 587523, 14626] -NotebookOptionsPosition[ 545257, 13953] -NotebookOutlinePosition[ 545691, 13971] -CellTagsIndexPosition[ 545648, 13968] +NotebookDataLength[ 698143, 16712] +NotebookOptionsPosition[ 654990, 16022] +NotebookOutlinePosition[ 655454, 16041] +CellTagsIndexPosition[ 655411, 16038] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -27,16 +27,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, - CellLabel-> - "In[408]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], + CellLabel->"In[1]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], Cell[BoxData["2"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, - 3.9940750908104277`*^9}}, - CellLabel-> - "Out[408]=",ExpressionUUID->"fa94cc60-1305-4c6c-94b9-dfec3b3d5e97"] + 3.9940750908104277`*^9}, 3.99434999220583*^9, 3.994352544697736*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"47a50133-eee0-438d-96c9-b1e6d5cec904"] }, Open ]], Cell[CellGroupData[{ @@ -45,16 +43,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, - CellLabel-> - "In[409]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], + CellLabel->"In[2]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, - 3.994075090853217*^9}}, - CellLabel-> - "Out[409]=",ExpressionUUID->"50a462f5-1c8f-41d2-a98d-d73de3c59ec6"] + 3.994075090853217*^9}, 3.994349993004418*^9, 3.9943525447509003`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"76409cff-2a61-48a2-bc5b-fe9fce58d32b"] }, Open ]], Cell[CellGroupData[{ @@ -63,16 +59,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "170"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, - CellLabel-> - "In[410]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], + CellLabel->"In[3]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], Cell[BoxData["170"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, - 3.994075090864901*^9}}, - CellLabel-> - "Out[410]=",ExpressionUUID->"7c7a2405-8772-4f44-913e-66d3fac2d8b7"] + 3.994075090864901*^9}, 3.994349993069098*^9, 3.994352544756048*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"bcdc3628-a859-4ec6-9cbc-b1ff4db502c2"] }, Open ]], Cell[CellGroupData[{ @@ -80,16 +74,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[411]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], + CellLabel->"In[4]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, - 3.9940750908767548`*^9}}, - CellLabel-> - "Out[411]=",ExpressionUUID->"94d1ac3a-e16c-43f6-b45d-3876afcdc16d"] + 3.9940750908767548`*^9}, 3.994349993091261*^9, 3.994352544761016*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"5ab47e70-013d-4318-9620-f3a6e488cc88"] }, Open ]], Cell[CellGroupData[{ @@ -101,32 +93,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], + CellLabel->"In[5]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], Cell[BoxData["0.5437500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, - 3.994075090888695*^9}}, - CellLabel-> - "Out[412]=",ExpressionUUID->"09f8d98b-8e89-4313-8e8e-e5e97d73c783"] + 3.994075090888695*^9}, 3.994349993114458*^9, 3.994352544767799*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"3c2c9fff-1147-413e-abb4-314e6a41503a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], + CellLabel->"In[6]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, - 3.9940750909003353`*^9}}, - CellLabel-> - "Out[413]=",ExpressionUUID->"ea27385d-4662-4d8a-a618-8973e3e556ec"] + 3.9940750909003353`*^9}, 3.994349993133485*^9, 3.994352544772938*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"6f94e454-664b-4d9e-bf0c-c91844e2ba48"] }, Open ]], Cell[CellGroupData[{ @@ -137,16 +125,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[414]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], + CellLabel->"In[7]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], Cell[BoxData["6.426003577835178`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, - 3.9940750909055967`*^9}}, - CellLabel-> - "Out[414]=",ExpressionUUID->"999d7edd-cf6a-4a9f-9600-d4f1b948cf99"] + 3.9940750909055967`*^9}, 3.99434999315554*^9, 3.994352544778161*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"30a0d5d5-1f9e-4893-be64-6721156f6426"] }, Open ]], Cell[CellGroupData[{ @@ -158,16 +144,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[415]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], + CellLabel->"In[8]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], Cell[BoxData["4.7806909477779245`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, - 3.994075090919847*^9}}, - CellLabel-> - "Out[415]=",ExpressionUUID->"9e6351fe-ca20-4bf4-bec6-6a9b1f77d85e"] + 3.994075090919847*^9}, 3.994349993177393*^9, 3.994352544783416*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"c0da2337-12ee-41ca-9034-8dd2a5d453a2"] }, Open ]], Cell[CellGroupData[{ @@ -175,15 +159,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8747255229"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, - CellLabel-> - "In[416]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], + CellLabel->"In[9]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], Cell[BoxData["0.8747255229`"], "Output", CellChangeTimes->{ 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, - 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}}, - CellLabel-> - "Out[416]=",ExpressionUUID->"66fc1cb3-d6d8-4ab9-a3de-c5bef3e6ad7f"] + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.994349993195928*^9, 3.994352544789406*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"fd380399-62e8-483e-aee5-61cae8f25474"] }, Open ]], Cell[CellGroupData[{ @@ -191,47 +174,42 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3882072479"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, - CellLabel-> - "In[417]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], + CellLabel->"In[10]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], Cell[BoxData["0.3882072479`"], "Output", CellChangeTimes->{ 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, - 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}}, - CellLabel-> - "Out[417]=",ExpressionUUID->"2040dd30-863a-4f4e-94e7-263f4a362b30"] + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994349993218359*^9, 3.994352544795186*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"36aa09a1-a028-41ed-a5c0-287fcb6883ca"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[418]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], + CellLabel->"In[11]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, - 3.994075090955942*^9}}, - CellLabel-> - "Out[418]=",ExpressionUUID->"f014c2f3-83a1-4b59-91d6-6fe132b7d872"] + 3.994075090955942*^9}, 3.9943499932656927`*^9, 3.9943525448003674`*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"0946c5d0-f579-4439-a4e3-5a081f58c073"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[419]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], + CellLabel->"In[12]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, - 3.9940750909684067`*^9}}, - CellLabel-> - "Out[419]=",ExpressionUUID->"603d6b0b-6bef-4195-a4ab-f38eb57c8531"] + 3.9940750909684067`*^9}, 3.994349993288414*^9, 3.994352544806047*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"fe618d99-5d79-4fa8-9ecd-32b49f2e17f6"] }, Open ]], Cell[CellGroupData[{ @@ -255,16 +233,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[420]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], + CellLabel->"In[13]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, - 3.994075090978916*^9}}, - CellLabel-> - "Out[420]=",ExpressionUUID->"bd01e92c-e2aa-42b9-8795-1c21241e342f"] + 3.994075090978916*^9}, 3.994349993318995*^9, 3.99435254481441*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"d2aa920c-4b5a-4d1a-81d4-945e53d1eac4"] }, Open ]], Cell[CellGroupData[{ @@ -288,16 +264,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[421]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], + CellLabel->"In[14]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, - 3.99407509098914*^9}}, - CellLabel-> - "Out[421]=",ExpressionUUID->"01775465-9dc7-4028-8481-c09c2c089cda"] + 3.99407509098914*^9}, 3.994349993337638*^9, 3.994352544819866*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"2b176184-7121-43fb-93c3-f436124fde29"] }, Open ]], Cell[CellGroupData[{ @@ -305,25 +279,85 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c11", "=", RowBox[{"1", "-", - FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], + +Cell[BoxData["0.4215025991580821`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, + 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, + 3.994075090999715*^9}, 3.994349993358815*^9, 3.994352544826576*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"57eeca45-ed74-4813-a89c-3846619fcedf"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + RowBox[{ + RowBox[{"(", RowBox[{ RowBox[{"(", - RowBox[{ - RowBox[{"R02", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", RowBox[{"(", - RowBox[{ - SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], ")"}], "/", + RowBox[{"(", RowBox[{ RowBox[{"R01", "*", RowBox[{"(", @@ -349,85 +383,41 @@ Cell[BoxData[ SuperscriptBox["w1", "2"]}], "+", RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[422]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], - -Cell[BoxData["0.4215025991580821`"], "Output", - CellChangeTimes->{ - 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, - 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, - 3.994075090999715*^9}}, - CellLabel-> - "Out[422]=",ExpressionUUID->"3985d0fa-c50c-474c-a5a5-6827471756b9"] -}, Open ]], - -Cell[CellGroupData[{ - -Cell[BoxData[ - RowBox[{"c12", "=", - FractionBox[ - RowBox[{ - RowBox[{"(", - RowBox[{"R02", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", - RowBox[{"(", - RowBox[{"1", "-", - SuperscriptBox["w2", "2"]}], ")"}]}], - RowBox[{ - RowBox[{"R01", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w2", "2"]}], "+", - RowBox[{"R02", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w1", "2"]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]], "Input", - CellLabel-> - "In[423]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, - 3.994075091010479*^9}}, - CellLabel-> - "Out[423]=",ExpressionUUID->"adcc8b62-e3dc-424d-936f-9a791c76df39"] + 3.994075091010479*^9}, 3.994349993379632*^9, 3.9943525448323402`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"81e8f0f7-38cc-4820-80d2-040154894aa3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c21", "=", - FractionBox[ - RowBox[{ - RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ RowBox[{"R01", "*", RowBox[{"(", RowBox[{"1", "-", @@ -437,47 +427,31 @@ Cell[BoxData[ RowBox[{"b1", "*", SqrtBox[ FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", - RowBox[{"(", - RowBox[{"1", "-", - SuperscriptBox["w1", "2"]}], ")"}]}], - RowBox[{ - RowBox[{"R01", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w2", "2"]}], "+", - RowBox[{"R02", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w1", "2"]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]], "Input", - CellLabel-> - "In[424]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, - 3.9940750910236893`*^9}}, - CellLabel-> - "Out[424]=",ExpressionUUID->"de90c3de-d3ca-4aed-a946-1114d56aa2d0"] + 3.9940750910236893`*^9}, 3.994349993404739*^9, 3.994352544838725*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"04c80ad2-42d8-4244-857f-6134f6d41e04"] }, Open ]], Cell[CellGroupData[{ @@ -485,109 +459,103 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c22", "=", RowBox[{"1", "-", - FractionBox[ - RowBox[{ - RowBox[{"(", - RowBox[{ - RowBox[{"R01", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w1", "2"]}]}], ")"}], "*", - RowBox[{"(", - RowBox[{ - SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], - RowBox[{ - RowBox[{"R01", "*", + RowBox[{ + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w2", "2"]}], "+", - RowBox[{"R02", "*", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w1", "2"]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[425]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, - 3.994075091035767*^9}}, - CellLabel-> - "Out[425]=",ExpressionUUID->"9774975d-6419-47b6-a5f9-4d8f53da4848"] + 3.994075091035767*^9}, 3.994349993431782*^9, 3.994352544844469*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"9bbcc072-8254-4d20-a276-fddd2de32315"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[426]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], + CellLabel->"In[19]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, - 3.9940750910471153`*^9}}, - CellLabel-> - "Out[426]=",ExpressionUUID->"9de8014a-e9fd-4ba8-bdba-cf5232274296"] + 3.9940750910471153`*^9}, 3.994349993453208*^9, 3.994352544851005*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"cffc6bc4-057e-4df1-af5d-89cb0e7bd67f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[427]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], + CellLabel->"In[20]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, - 3.9940750910581427`*^9}}, - CellLabel-> - "Out[427]=",ExpressionUUID->"9d000889-367b-47cc-9abe-e3854d05a73f"] + 3.9940750910581427`*^9}, 3.9943499934741373`*^9, 3.994352544856593*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"0cb88c67-e79a-4b53-a935-702094c10534"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[428]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], + CellLabel->"In[21]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, - 3.994075091069083*^9}}, - CellLabel-> - "Out[428]=",ExpressionUUID->"76919cf3-f476-4f2e-97ee-532c2fed40ed"] + 3.994075091069083*^9}, 3.994349993492996*^9, 3.994352544861862*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"810f3782-f7b7-4f32-be94-e5e5997de953"] }, Open ]], Cell[CellGroupData[{ @@ -596,33 +564,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[429]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], + CellLabel->"In[22]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, - 3.994075091080567*^9}}, - CellLabel-> - "Out[429]=",ExpressionUUID->"37b1aac5-9db8-4caa-818d-10f1d9b2c3ab"] + 3.994075091080567*^9}, 3.994349993511737*^9, 3.994352544868712*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"5170b953-9504-4ea3-8113-1d4530a09e4f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[430]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], + CellLabel->"In[23]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, - 3.994075091090703*^9}}, - CellLabel-> - "Out[430]=",ExpressionUUID->"b69578e7-bb0f-4cc2-a4d1-829bda4ca0cc"] + 3.994075091090703*^9}, 3.994349993532908*^9, 3.9943525448757887`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"64522ca8-e38e-410d-80cc-250373f7ba97"] }, Open ]], Cell[CellGroupData[{ @@ -632,16 +596,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073690740699*^9, 3.994073690862359*^9}}, - CellLabel-> - "In[431]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], + CellLabel->"In[24]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, - 3.994075091102222*^9}}, - CellLabel-> - "Out[431]=",ExpressionUUID->"f300beeb-1e68-43d7-9a43-0bfc58afd9ba"] + 3.994075091102222*^9}, 3.994349993553545*^9, 3.994352544883093*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"e8dea8ce-1b6d-409c-8b55-3508306bf16e"] }, Open ]], Cell[CellGroupData[{ @@ -651,16 +613,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, - CellLabel-> - "In[432]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], + CellLabel->"In[25]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, - 3.994075091112747*^9}}, - CellLabel-> - "Out[432]=",ExpressionUUID->"12936372-2ef2-4ce9-b725-74d378c77de5"] + 3.994075091112747*^9}, 3.994349993572542*^9, 3.9943525448885603`*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"6bf38a9d-ca75-4f70-9646-8278f3b1f5f5"] }, Open ]], Cell[CellGroupData[{ @@ -669,16 +629,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[433]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], + CellLabel->"In[26]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], Cell[BoxData["70"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, - 3.9940750911232967`*^9}}, - CellLabel-> - "Out[433]=",ExpressionUUID->"573d81f5-eb0c-43e6-8eaa-3f8901160221"] + 3.9940750911232967`*^9}, 3.994349993593258*^9, 3.994352544894188*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"31a08bbe-baed-46e5-a47c-6870634a2257"] }, Open ]], Cell[CellGroupData[{ @@ -693,16 +651,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[434]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], + CellLabel->"In[27]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], Cell[BoxData["0.1087764705882353`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, - 3.994075091133902*^9}}, - CellLabel-> - "Out[434]=",ExpressionUUID->"1e8ae19a-cfe9-41b1-9a1a-bd48ee6c4d87"] + 3.994075091133902*^9}, 3.9943499936119432`*^9, 3.994352544900977*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"b1c96403-e905-4bad-8855-b5f13d0ffd85"] }, Open ]], Cell[CellGroupData[{ @@ -717,17 +673,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[435]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], + CellLabel->"In[28]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], Cell[BoxData[ RowBox[{"-", "2.5658588235294117`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, - 3.9940750911440773`*^9}}, - CellLabel-> - "Out[435]=",ExpressionUUID->"2ed79cd1-f2d4-43ad-8bd0-2589898aeb4c"] + 3.9940750911440773`*^9}, 3.994349993633739*^9, 3.994352544906453*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"13feda3a-36f2-48b2-8354-372e31c2f467"] }, Open ]], Cell[CellGroupData[{ @@ -758,16 +712,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[436]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], + CellLabel->"In[29]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], Cell[BoxData["17.474387700041003`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, - 3.9940750911556253`*^9}}, - CellLabel-> - "Out[436]=",ExpressionUUID->"70b0d530-b9a4-4f64-b884-e3ff28b434fc"] + 3.9940750911556253`*^9}, 3.994349993658306*^9, 3.994352544913439*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"c2934cf8-6ee4-4110-bbb4-dabef3bed374"] }, Open ]], Cell[CellGroupData[{ @@ -775,16 +727,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[437]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], + CellLabel->"In[30]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, - 3.99407509116647*^9}}, - CellLabel-> - "Out[437]=",ExpressionUUID->"de1af145-a36f-4cd8-bf85-50b5ce866ddc"] + 3.99407509116647*^9}, 3.994349993679582*^9, 3.994352544919167*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"da07d7a4-365d-422e-a239-168a87707d6e"] }, Open ]], Cell[CellGroupData[{ @@ -794,21 +744,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.9940737081112833`*^9, 3.994073709172043*^9}}, - CellLabel-> - "In[438]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], + CellLabel->"In[31]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{ 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, - 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}}, - CellLabel-> - "Out[438]=",ExpressionUUID->"e598e271-4662-4603-b100-b2ef0b372928"] + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.9943499936990232`*^9, 3.994352544925219*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"a234ba6f-a79d-4576-aa6c-ffc2b62be047"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[439]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], + CellLabel->"In[32]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ @@ -817,21 +765,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073711335288*^9, 3.994073712564888*^9}}, - CellLabel-> - "In[440]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], + CellLabel->"In[33]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], Cell[BoxData["0.785`"], "Output", CellChangeTimes->{ 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, - 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}}, - CellLabel-> - "Out[440]=",ExpressionUUID->"1bb1cb7f-b6e0-469a-95fc-2a46de990c5d"] + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.9943499937467537`*^9, 3.9943525449364977`*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"0c1ee3a7-11c3-4eca-8013-ea36803a8e3a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[441]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], + CellLabel->"In[34]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ @@ -840,21 +786,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940737150021257`*^9, 3.994073716213628*^9}}, - CellLabel-> - "In[442]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], + CellLabel->"In[35]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{ 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, - 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}}, - CellLabel-> - "Out[442]=",ExpressionUUID->"e3c488f2-9970-4453-be03-0af957364fd5"] + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.994349993794999*^9, 3.994352544946368*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"f8b82e24-acba-4bc7-b0c9-2ed58f4186a1"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[443]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], + CellLabel->"In[36]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ @@ -863,21 +807,19 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, - CellLabel-> - "In[444]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], + CellLabel->"In[37]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], Cell[BoxData["1.125`"], "Output", CellChangeTimes->{ 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, - 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}}, - CellLabel-> - "Out[444]=",ExpressionUUID->"47ff94e5-2a7c-423d-8b49-729701313d02"] + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.994349993822527*^9, 3.994352544954446*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"5574e04c-e034-49c2-a4cf-bd3a3bb5bd44"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[445]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], + CellLabel->"In[38]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ @@ -886,21 +828,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, 3.9940737264630413`*^9}}, - CellLabel-> - "In[446]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], + CellLabel->"In[39]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], Cell[BoxData["1.145`"], "Output", CellChangeTimes->{ 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, - 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}}, - CellLabel-> - "Out[446]=",ExpressionUUID->"b548f324-40f7-4096-b026-f2a9b1eb8a40"] + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.9943499938512163`*^9, 3.994352544962653*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"c8ec9cf0-a86f-45e3-b8ec-be236a876a85"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[447]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], + CellLabel->"In[40]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ @@ -909,21 +849,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, 3.994073731586865*^9}}, - CellLabel-> - "In[448]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], + CellLabel->"In[41]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], Cell[BoxData["0.565`"], "Output", CellChangeTimes->{ 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, - 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}}, - CellLabel-> - "Out[448]=",ExpressionUUID->"a51aaa20-e42c-41c4-9877-27708c69f3e3"] + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.994349993878025*^9, 3.9943525449708643`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"4a9d0cc9-8080-4a97-bb4e-abe4c1454bd9"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[449]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], + CellLabel->"In[42]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ @@ -932,21 +870,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, 3.994073737300967*^9}}, - CellLabel-> - "In[450]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], + CellLabel->"In[43]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], Cell[BoxData["1.5`"], "Output", CellChangeTimes->{ 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, - 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}}, - CellLabel-> - "Out[450]=",ExpressionUUID->"eb85382a-72c9-4210-9951-5dca056dceae"] + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.994349993907179*^9, 3.99435254500348*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"57aea4a6-bc65-4356-a87e-87191c4344bf"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[451]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], + CellLabel->"In[44]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ @@ -954,21 +890,19 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.635"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, - CellLabel-> - "In[452]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], + CellLabel->"In[45]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], Cell[BoxData["0.635`"], "Output", CellChangeTimes->{ 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, - 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}}, - CellLabel-> - "Out[452]=",ExpressionUUID->"805b68e3-0dc1-40ed-ab0d-b8b004b0fbf7"] + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.994349994061551*^9, 3.99435254502315*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"9192359d-9019-47a5-8fca-ebb89fc07dd1"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[453]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], + CellLabel->"In[46]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ @@ -1457,16 +1391,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[454]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], + CellLabel->"In[47]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], Cell[BoxData["0.12734722137174234`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, - 3.994075091306961*^9}}, - CellLabel-> - "Out[454]=",ExpressionUUID->"583f6967-640f-4503-ac67-302dadba9f42"] + 3.994075091306961*^9}, 3.994349994303849*^9, 3.9943525451130047`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"128bdfbc-96ec-4935-8dee-3f9e0d765ba7"] }, Open ]], Cell[CellGroupData[{ @@ -1960,16 +1892,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[455]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], + CellLabel->"In[48]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], Cell[BoxData["7.503764283698204`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, - 3.994075091332656*^9}}, - CellLabel-> - "Out[455]=",ExpressionUUID->"8f54d772-97eb-4307-b464-386a1b728f49"] + 3.994075091332656*^9}, 3.994349994504182*^9, 3.994352545157682*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"6895118a-6285-44b7-9d83-44b0b55b1f85"] }, Open ]], Cell[CellGroupData[{ @@ -2457,17 +2387,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[456]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], + CellLabel->"In[49]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], Cell[BoxData[ RowBox[{"-", "14.220629552114458`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, - 3.994075091358534*^9}}, - CellLabel-> - "Out[456]=",ExpressionUUID->"23550e8b-d4c6-4da8-8d5a-830ff5d1b49c"] + 3.994075091358534*^9}, 3.994349994587234*^9, 3.994352545197352*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"b4a837c0-fa7e-40ba-8a0a-280ed492d6b6"] }, Open ]], Cell[CellGroupData[{ @@ -3025,17 +2953,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[457]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], + CellLabel->"In[50]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], Cell[BoxData[ RowBox[{"-", "18.05754390959481`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, - 3.99407509139049*^9}}, - CellLabel-> - "Out[457]=",ExpressionUUID->"423c727c-a646-4144-a58e-809cb863c915"] + 3.99407509139049*^9}, 3.9943499947112293`*^9, 3.9943525452377977`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"039e45fa-4397-4f75-8c75-11f3c2ec2432"] }, Open ]], Cell[CellGroupData[{ @@ -3593,17 +3519,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[458]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], + CellLabel->"In[51]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], Cell[BoxData[ RowBox[{"-", "51.76635903245878`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, - 3.994075091423628*^9}}, - CellLabel-> - "Out[458]=",ExpressionUUID->"a0c385e2-8bba-4657-8b21-b3fe7b82988e"] + 3.994075091423628*^9}, 3.994349994887383*^9, 3.994352545279282*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"bb1e559a-2853-44ec-857c-89ddd29b9fd6"] }, Open ]], Cell[CellGroupData[{ @@ -4234,49 +4158,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[459]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], + CellLabel->"In[52]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], Cell[BoxData[ RowBox[{"-", "131.16526179683018`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, - 3.9940750914627743`*^9}}, - CellLabel-> - "Out[459]=",ExpressionUUID->"0e26e5d1-1aa5-45fe-949a-7bced0e7f8a3"] + 3.9940750914627743`*^9}, 3.994349995026395*^9, 3.9943525453304033`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"39175c2e-e2fa-4856-aecb-0193fa5c5e5f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[460]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], + CellLabel->"In[53]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, - 3.994075091476185*^9}}, - CellLabel-> - "Out[460]=",ExpressionUUID->"34626303-b9be-451d-9cf8-f0b2df71cec9"] + 3.994075091476185*^9}, 3.994349995056971*^9, 3.994352545348784*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"f905f885-afb9-4a3e-828e-390ec5a5ee48"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[461]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], + CellLabel->"In[54]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, - 3.994075091486505*^9}}, - CellLabel-> - "Out[461]=",ExpressionUUID->"b0064b53-e80b-4d29-9d13-d556198fb072"] + 3.994075091486505*^9}, 3.994349995070118*^9, 3.994352545359714*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"0d43fd33-5338-448f-8a4b-44f2e7843ce0"] }, Open ]], Cell[CellGroupData[{ @@ -4320,16 +4238,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[462]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], + CellLabel->"In[55]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], Cell[BoxData["102.57012833062927`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, - 3.994075091497402*^9}}, - CellLabel-> - "Out[462]=",ExpressionUUID->"0915ec79-a5ac-4fd4-a602-4bf984a7daa9"] + 3.994075091497402*^9}, 3.994349995089707*^9, 3.994352545370634*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"0a118a88-79d3-4fff-a5f9-6d96090405b5"] }, Open ]], Cell[CellGroupData[{ @@ -4369,17 +4285,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[463]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], + CellLabel->"In[56]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, - 3.994075091508032*^9}}, - CellLabel-> - "Out[463]=",ExpressionUUID->"60cbf343-82fa-4f2a-86d4-1783b0395be5"] + 3.994075091508032*^9}, 3.994349995116057*^9, 3.994352545379877*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"fca3acca-0945-45e9-addd-df50f5226d33"] }, Open ]], Cell[CellGroupData[{ @@ -4423,103 +4337,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[464]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], + CellLabel->"In[57]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], Cell[BoxData["106.05157029710364`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, - 3.994075091518471*^9}}, - CellLabel-> - "Out[464]=",ExpressionUUID->"9a3aa6c7-62fb-4aa4-ae5c-15bd1e280f25"] + 3.994075091518471*^9}, 3.994349995128224*^9, 3.994352545390357*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"23b937fe-1540-4b79-85e2-86b471e5786a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[465]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], + CellLabel->"In[58]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, - 3.99407509152868*^9}}, - CellLabel-> - "Out[465]=",ExpressionUUID->"f3b353c4-88b0-43f8-9620-410e423f7eef"] + 3.99407509152868*^9}, 3.9943499951445217`*^9, 3.9943525453987617`*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"2f65f2e0-0c88-43e2-802e-4819d9b52788"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[466]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], + CellLabel->"In[59]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, - 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}}, - CellLabel-> - "Out[466]=",ExpressionUUID->"80be49dd-d9b4-403f-9033-fe661198416a"] + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.9943499951631203`*^9, 3.9943525454102087`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"b10028b4-2fc7-40be-b84a-14452f0e89d7"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[467]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], + CellLabel->"In[60]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, - 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}}, - CellLabel-> - "Out[467]=",ExpressionUUID->"a47d7903-0d29-44bf-acb6-9b6eff97e33f"] + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.9943499951835318`*^9, 3.994352545420844*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"08aedeff-1800-4698-9c1a-1dd6bbf523cc"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[468]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], + CellLabel->"In[61]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, - 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}}, - CellLabel-> - "Out[468]=",ExpressionUUID->"f0c78dc3-d805-46c1-9ca9-382be008a5be"] + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.994349995240162*^9, 3.994352545429587*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"2e199d70-1d9b-4473-b403-e89dfe6ed439"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[469]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], + CellLabel->"In[62]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, - 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}}, - CellLabel-> - "Out[469]=",ExpressionUUID->"3029eb47-7bab-4d84-824d-0a7bd0e4d3f5"] + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.994349995256819*^9, 3.994352545438079*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"a378496a-4f1b-4b2b-892b-547011c7a736"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[470]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], + CellLabel->"In[63]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, - 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}}, - CellLabel-> - "Out[470]=",ExpressionUUID->"ceebf8be-0900-4414-928b-8c4a04a0366c"] + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.994349995271885*^9, 3.994352545447249*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"c7fbfa1f-cb6b-4770-8dfd-ac2e7766a61a"] }, Open ]], Cell[CellGroupData[{ @@ -4540,16 +4445,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[471]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], + CellLabel->"In[64]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], Cell[BoxData[ RowBox[{"-", "33.35096235519822`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, - 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}}, - CellLabel-> - "Out[471]=",ExpressionUUID->"b07b9286-d381-4dc2-8a27-14c7eed58c79"] + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994349995288454*^9, 3.9943525454560337`*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"8edc617b-849d-401a-895e-5d92e96d5fdd"] }, Open ]], Cell[CellGroupData[{ @@ -4570,16 +4474,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[472]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], + CellLabel->"In[65]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], Cell[BoxData[ RowBox[{"-", "6.430095836913352`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, - 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}}, - CellLabel-> - "Out[472]=",ExpressionUUID->"bc445076-8fae-4ece-b921-e9d1c3f70b07"] + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.994349995308022*^9, 3.994352545466178*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"c74618aa-e686-424d-b8cb-a16cb440a99d"] }, Open ]], Cell[CellGroupData[{ @@ -4644,15 +4547,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[473]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], + CellLabel->"In[66]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], Cell[BoxData["69.21916597543105`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, - 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}}, - CellLabel-> - "Out[473]=",ExpressionUUID->"ccf89f1b-f28b-4584-b7b8-0edc0a3401bc"] + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.994349995325433*^9, 3.99435254547593*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"f1308d5c-62eb-4bc5-ac73-065f313d3256"] }, Open ]], Cell[CellGroupData[{ @@ -4693,16 +4595,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[474]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], + CellLabel->"In[67]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, - 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}}, - CellLabel-> - "Out[474]=",ExpressionUUID->"35d56c82-c6f8-444e-8203-f5d91668e5ec"] + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.994349995369651*^9, 3.994352548486989*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"36bd2674-08eb-49c5-9ff3-e8697db14449"] }, Open ]], Cell[CellGroupData[{ @@ -4768,15 +4669,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[475]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], + CellLabel->"In[68]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], Cell[BoxData["99.62147446019029`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, - 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}}, - CellLabel-> - "Out[475]=",ExpressionUUID->"784942dc-4f73-427d-9fdf-670525e4f45f"] + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994349995385275*^9, 3.994352548743369*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"45992364-671c-43aa-8cc9-5ee8acbed27b"] }, Open ]], Cell[CellGroupData[{ @@ -4834,15 +4734,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[476]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], + CellLabel->"In[69]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], Cell[BoxData["40.3202486570226`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, - 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}}, - CellLabel-> - "Out[476]=",ExpressionUUID->"4bacb163-bb6c-49fa-99ef-8a50240e5d6a"] + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.9943499953973846`*^9, 3.994352548750588*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"e1a1f4fa-3b5d-4a8e-9e25-6182f6f737b7"] }, Open ]], Cell[CellGroupData[{ @@ -4900,15 +4799,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[477]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], + CellLabel->"In[70]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], Cell[BoxData["624.5259763904654`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, - 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}}, - CellLabel-> - "Out[477]=",ExpressionUUID->"5af8381f-1a53-4b41-97e5-43d3a1efd56f"] + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.9943499954126587`*^9, 3.994352548759362*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"045dae2e-eef4-45ac-a8f1-afe632fbf649"] }, Open ]], Cell[CellGroupData[{ @@ -4916,42 +4814,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f1", "=", "0.8638738906"}]], "Input", CellChangeTimes->{3.991799412462593*^9, 3.994073767563478*^9}, - CellLabel-> - "In[478]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], + CellLabel->"In[71]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], Cell[BoxData["0.8638738906`"], "Output", CellChangeTimes->{ 3.9940749364864273`*^9, 3.9940749754498367`*^9, 3.994075020223328*^9, { - 3.9940750740169067`*^9, 3.994075091664157*^9}}, - CellLabel-> - "Out[478]=",ExpressionUUID->"0d0a8d72-6cbf-4ca9-8187-103c65b65be9"] + 3.9940750740169067`*^9, 3.994075091664157*^9}, 3.994349995432994*^9, + 3.9943525487675333`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"5db298da-ca9e-46e9-980c-c124f0dfd3a0"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184866880085*^9, 3.9918486688048573`*^9}}, - CellLabel-> - "In[479]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], + CellLabel->"In[72]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.5114215939"}]], "Input", CellChangeTimes->{3.991799414288656*^9, 3.994073773058166*^9}, - CellLabel-> - "In[480]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], + CellLabel->"In[73]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], Cell[BoxData["0.5114215939`"], "Output", CellChangeTimes->{ 3.994074936499249*^9, 3.994074975462162*^9, 3.9940750202390757`*^9, { - 3.994075074029931*^9, 3.994075091676601*^9}}, - CellLabel-> - "Out[480]=",ExpressionUUID->"899d4388-5b66-465c-913b-006fd7895eed"] + 3.994075074029931*^9, 3.994075091676601*^9}, 3.994349995460924*^9, + 3.9943525487807293`*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"47789286-d0df-4986-8893-9784488ed99f"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848669922333*^9, 3.9918486699293537`*^9}}, - CellLabel-> - "In[481]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], + CellLabel->"In[74]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ @@ -4997,15 +4891,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[482]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], + CellLabel->"In[75]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], Cell[BoxData["1.502378697384544`*^-53"], "Output", CellChangeTimes->{ 3.99132042156752*^9, 3.994074936512719*^9, 3.9940749754745903`*^9, - 3.9940750202538557`*^9, {3.994075074042775*^9, 3.994075091689769*^9}}, - CellLabel-> - "Out[482]=",ExpressionUUID->"e2e96540-ebb2-46ee-bdd8-0564f4811472"] + 3.9940750202538557`*^9, {3.994075074042775*^9, 3.994075091689769*^9}, + 3.9943499954884872`*^9, 3.9943525487950706`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"1b0b4ac5-409c-419c-982c-d282e45c0ddb"] }, Open ]], Cell[CellGroupData[{ @@ -5040,15 +4933,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", CellChangeTimes->{3.991557471461853*^9}, - CellLabel-> - "In[483]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], + CellLabel->"In[76]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], Cell[BoxData["1.3422410307557068`*^-54"], "Output", CellChangeTimes->{ 3.99132042159643*^9, 3.9940749365248947`*^9, 3.9940749754844227`*^9, - 3.9940750202639236`*^9, {3.99407507405294*^9, 3.994075091699884*^9}}, - CellLabel-> - "Out[483]=",ExpressionUUID->"b2051f55-61c0-4492-a95d-307222f7dc5e"] + 3.9940750202639236`*^9, {3.99407507405294*^9, 3.994075091699884*^9}, + 3.99434999550996*^9, 3.994352548806011*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"f18c2e9d-30ea-4122-90ac-45c73eef9c95"] }, Open ]], Cell[CellGroupData[{ @@ -5082,15 +4974,14 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", CellChangeTimes->{{3.991557474366678*^9, 3.99155747655138*^9}}, - CellLabel-> - "In[484]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], + CellLabel->"In[77]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], Cell[BoxData["2.758393474248247`*^-54"], "Output", CellChangeTimes->{ 3.9913204216085243`*^9, 3.99407493653656*^9, 3.994074975494647*^9, - 3.994075020275387*^9, {3.994075074063376*^9, 3.994075091710374*^9}}, - CellLabel-> - "Out[484]=",ExpressionUUID->"ecb528e0-41d9-435b-9fa5-4988320ff6de"] + 3.994075020275387*^9, {3.994075074063376*^9, 3.994075091710374*^9}, + 3.994349995526746*^9, 3.994352548812234*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"5547d472-84fc-49e8-b962-bc6961976e53"] }, Open ]], Cell[CellGroupData[{ @@ -5113,8 +5004,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel-> - "In[485]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], + CellLabel->"In[78]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], Cell[BoxData["13.103190348487058`"], "Output", CellChangeTimes->{ @@ -5125,9 +5015,8 @@ Cell[BoxData["13.103190348487058`"], "Output", 3.992091446805294*^9}, {3.9920915031404457`*^9, 3.992091522601553*^9}, { 3.9920915619364376`*^9, 3.9920915885645847`*^9}, 3.994074936547941*^9, 3.994074975504512*^9, 3.994075020287477*^9, {3.994075074073863*^9, - 3.99407509172069*^9}}, - CellLabel-> - "Out[485]=",ExpressionUUID->"fb994914-d0f7-4d08-ae0a-8f202062ede3"] + 3.99407509172069*^9}, 3.994349995542041*^9, 3.994352548819277*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"d2da8486-d19f-434f-982d-4234670698c9"] }, Open ]], Cell[CellGroupData[{ @@ -5153,8 +5042,7 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", CellChangeTimes->{3.992086162437586*^9}, - CellLabel-> - "In[486]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], + CellLabel->"In[79]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], Cell[BoxData["46.75020900783951`"], "Output", CellChangeTimes->{ @@ -5164,9 +5052,9 @@ Cell[BoxData["46.75020900783951`"], "Output", 3.992091247484524*^9, {3.9920913926676064`*^9, 3.9920914468313007`*^9}, { 3.9920915031479607`*^9, 3.9920915226223583`*^9}, {3.9920915619450817`*^9, 3.992091588571615*^9}, 3.994074936558331*^9, 3.994074975514373*^9, - 3.994075020298012*^9, {3.994075074085128*^9, 3.994075091731069*^9}}, - CellLabel-> - "Out[486]=",ExpressionUUID->"3981cd16-8d87-4741-87d3-9dcb0dd6d891"] + 3.994075020298012*^9, {3.994075074085128*^9, 3.994075091731069*^9}, + 3.9943499955627728`*^9, 3.9943525488273497`*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"0c13aee3-1d4a-4683-bc39-6fda7af640cf"] }, Open ]], Cell[CellGroupData[{ @@ -5175,8 +5063,7 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel-> - "In[487]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], + CellLabel->"In[80]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], Cell[BoxData["1.754175640605632`"], "Output", CellChangeTimes->{ @@ -5187,9 +5074,8 @@ Cell[BoxData["1.754175640605632`"], "Output", 3.992091446837303*^9}, {3.9920915031795254`*^9, 3.992091522629343*^9}, { 3.9920915619686337`*^9, 3.992091588596325*^9}, 3.994074936568638*^9, 3.994074975524087*^9, 3.9940750203092957`*^9, {3.9940750740975637`*^9, - 3.994075091742402*^9}}, - CellLabel-> - "Out[487]=",ExpressionUUID->"d883b5d1-6205-4365-ac79-56c10834a948"] + 3.994075091742402*^9}, 3.994349995584444*^9, 3.9943525488356867`*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"c0a36584-dce5-4c84-9159-3683e5271bde"] }, Open ]], Cell[CellGroupData[{ @@ -5199,8 +5085,7 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kw", "Qw2"]]}]], "Input", CellChangeTimes->{{3.992086303949501*^9, 3.992086304210249*^9}}, - CellLabel-> - "In[488]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], + CellLabel->"In[81]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], Cell[BoxData["3.6549671258307512`"], "Output", CellChangeTimes->{ @@ -5210,9 +5095,9 @@ Cell[BoxData["3.6549671258307512`"], "Output", 3.992091392715067*^9, 3.9920914468593006`*^9}, {3.992091503202347*^9, 3.992091522636343*^9}, {3.992091561975609*^9, 3.99209158860334*^9}, 3.994074936578792*^9, 3.994074975533774*^9, 3.994075020318893*^9, { - 3.994075074107939*^9, 3.99407509175333*^9}}, - CellLabel-> - "Out[488]=",ExpressionUUID->"47f8cfe3-1756-44ab-946f-fe20a05ff862"] + 3.994075074107939*^9, 3.99407509175333*^9}, 3.994349995639203*^9, + 3.9943525488436728`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"dca48f31-2c2f-45fe-a782-042eda683938"] }, Open ]], Cell[CellGroupData[{ @@ -5222,8 +5107,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qw2", "*", "hw"}], "1"]}]], "Input", CellChangeTimes->{3.992086167409481*^9}, - CellLabel-> - "In[489]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], + CellLabel->"In[82]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], Cell[BoxData["170.87047704937007`"], "Output", CellChangeTimes->{ @@ -5233,9 +5117,9 @@ Cell[BoxData["170.87047704937007`"], "Output", 3.992091247547844*^9, {3.9920913927375374`*^9, 3.992091446867302*^9}, { 3.992091503209553*^9, 3.992091522657341*^9}, {3.992091561999613*^9, 3.9920915886284447`*^9}, 3.994074936589108*^9, 3.994074975543824*^9, - 3.994075020324066*^9, {3.9940750741179647`*^9, 3.9940750917638893`*^9}}, - CellLabel-> - "Out[489]=",ExpressionUUID->"d3459512-4875-4873-8e60-ded20134eea3"] + 3.994075020324066*^9, {3.9940750741179647`*^9, 3.9940750917638893`*^9}, + 3.9943499957023067`*^9, 3.994352548849925*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"67907090-2efe-44d6-a300-3826d4c7f38b"] }, Open ]], Cell[CellGroupData[{ @@ -5244,8 +5128,7 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[490]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], + CellLabel->"In[83]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], Cell[BoxData["22.985297323534816`"], "Output", CellChangeTimes->{ @@ -5256,9 +5139,8 @@ Cell[BoxData["22.985297323534816`"], "Output", 3.992091446891386*^9}, {3.9920915032325726`*^9, 3.992091522664852*^9}, { 3.992091562006651*^9, 3.992091588636162*^9}, 3.99407493659912*^9, 3.994074975554226*^9, 3.994075020337634*^9, {3.994075074128367*^9, - 3.994075091774065*^9}}, - CellLabel-> - "Out[490]=",ExpressionUUID->"9da34343-33f6-4881-86e9-8ffa6701b6e9"] + 3.994075091774065*^9}, 3.994349995716919*^9, 3.994352548856265*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"bf46e37f-7b24-431c-a166-b8cd84b929c5"] }, Open ]], Cell[CellGroupData[{ @@ -5447,8 +5329,7 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[491]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], + CellLabel->"In[84]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], Cell[BoxData["0.0061543729933492`"], "Output", CellChangeTimes->{ @@ -5458,9 +5339,9 @@ Cell[BoxData["0.0061543729933492`"], "Output", 3.992091247578861*^9, {3.9920913927664986`*^9, 3.992091446900387*^9}, { 3.992091503241564*^9, 3.9920915226853714`*^9}, {3.9920915620301514`*^9, 3.992091588657053*^9}, 3.994074936610054*^9, 3.9940749755647593`*^9, - 3.99407502034942*^9, {3.9940750741386423`*^9, 3.994075091784724*^9}}, - CellLabel-> - "Out[491]=",ExpressionUUID->"565968c7-f2a6-4154-b824-8ecc95d43d9f"] + 3.99407502034942*^9, {3.9940750741386423`*^9, 3.994075091784724*^9}, + 3.994349995734049*^9, 3.99435254886584*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"457dc5ed-7939-4784-9a45-249bd4c8beb9"] }, Open ]], Cell[CellGroupData[{ @@ -5473,8 +5354,7 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[492]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], + CellLabel->"In[85]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], Cell[BoxData["11.296737411375291`"], "Output", CellChangeTimes->{ @@ -5484,9 +5364,9 @@ Cell[BoxData["11.296737411375291`"], "Output", 3.9920913928462048`*^9, 3.9920914469749584`*^9}, {3.992091503316616*^9, 3.9920915227624416`*^9}, {3.9920915621031647`*^9, 3.9920915887305927`*^9}, 3.994074936766333*^9, 3.994074975611465*^9, 3.994075020433676*^9, { - 3.994075074192267*^9, 3.994075091838851*^9}}, - CellLabel-> - "Out[492]=",ExpressionUUID->"aeba6651-6b92-4513-85ef-72cbb67fe247"] + 3.994075074192267*^9, 3.994075091838851*^9}, 3.9943499963035917`*^9, + 3.9943525490333223`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"a3cc0cb0-aaa1-4714-acb2-1cd10a52063c"] }, Open ]], Cell[BoxData[ @@ -5498,8 +5378,7 @@ Cell[BoxData[ 3.992086184000986*^9, 3.9920862197077847`*^9}, {3.99208635879986*^9, 3.9920863634349823`*^9}, {3.9920864985362244`*^9, 3.992086501430176*^9}, { 3.9920869541635437`*^9, 3.992086954848522*^9}}, - CellLabel-> - "In[493]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], + CellLabel->"In[86]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ @@ -5521,15 +5400,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[494]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], + CellLabel->"In[87]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], Cell[BoxData["33.8214330516121`"], "Output", CellChangeTimes->{ 3.991320421637537*^9, 3.994074936780057*^9, 3.9940749756324463`*^9, - 3.994075020447908*^9, {3.994075074213812*^9, 3.994075091860526*^9}}, - CellLabel-> - "Out[494]=",ExpressionUUID->"7050747a-54ce-41f3-8bfa-829a38589ab0"] + 3.994075020447908*^9, {3.994075074213812*^9, 3.994075091860526*^9}, + 3.9943499965669107`*^9, 3.9943525490481577`*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"fc0875b2-6ba4-4a71-9e55-522868264d21"] }, Open ]], Cell[CellGroupData[{ @@ -5554,15 +5432,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[495]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], + CellLabel->"In[88]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], Cell[BoxData["46.75020900783951`"], "Output", CellChangeTimes->{ 3.9913204216685333`*^9, 3.994074936790141*^9, 3.994074975642214*^9, - 3.994075020455833*^9, {3.99407507422532*^9, 3.994075091871029*^9}}, - CellLabel-> - "Out[495]=",ExpressionUUID->"05783674-5c91-4039-b868-9761478c9935"] + 3.994075020455833*^9, {3.99407507422532*^9, 3.994075091871029*^9}, + 3.9943499966061487`*^9, 3.994352549055147*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"4e8ee53a-675d-49bb-9615-bf08106d8fc1"] }, Open ]], Cell[CellGroupData[{ @@ -5571,15 +5448,14 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[496]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], + CellLabel->"In[89]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], Cell[BoxData["1.0918565865262573`"], "Output", CellChangeTimes->{ 3.991320421698473*^9, 3.994074936801005*^9, 3.994074975652001*^9, - 3.994075020466427*^9, {3.994075074235756*^9, 3.994075091881679*^9}}, - CellLabel-> - "Out[496]=",ExpressionUUID->"c38b805d-cf94-48f5-ad87-4615a30ec5f1"] + 3.994075020466427*^9, {3.994075074235756*^9, 3.994075091881679*^9}, + 3.994349996636891*^9, 3.994352549062937*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"ba1c32fc-4b67-4882-a7d0-4dc48a57e793"] }, Open ]], Cell[CellGroupData[{ @@ -5588,15 +5464,14 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[497]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], + CellLabel->"In[90]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], Cell[BoxData["3.6549671258307512`"], "Output", CellChangeTimes->{ 3.991320421726494*^9, 3.994074936812052*^9, 3.994074975661764*^9, - 3.9940750204774027`*^9, {3.994075074246265*^9, 3.994075091892459*^9}}, - CellLabel-> - "Out[497]=",ExpressionUUID->"0a252b6c-4502-4fde-a0d4-0a974b9c8a2c"] + 3.9940750204774027`*^9, {3.994075074246265*^9, 3.994075091892459*^9}, + 3.994349996671013*^9, 3.9943525491290903`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"d019dbb1-46cd-4121-baf6-d749ef5f2ec9"] }, Open ]], Cell[CellGroupData[{ @@ -5605,15 +5480,14 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[498]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], + CellLabel->"In[91]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], Cell[BoxData["170.87047704937007`"], "Output", CellChangeTimes->{ 3.9913204217554817`*^9, 3.994074936823965*^9, 3.9940749756714354`*^9, - 3.994075020487782*^9, {3.994075074256814*^9, 3.994075091902958*^9}}, - CellLabel-> - "Out[498]=",ExpressionUUID->"2fa5e23b-ee03-4ec1-95ea-00097e00f2e1"] + 3.994075020487782*^9, {3.994075074256814*^9, 3.994075091902958*^9}, + 3.99434999670128*^9, 3.9943525491378736`*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"33a10739-34a3-4a48-beba-25950cb9389a"] }, Open ]], Cell[CellGroupData[{ @@ -5622,15 +5496,14 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[499]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], + CellLabel->"In[92]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], Cell[BoxData["36.92815444315952`"], "Output", CellChangeTimes->{ 3.9913204217855225`*^9, 3.994074936834209*^9, 3.994074975681313*^9, - 3.994075020497636*^9, {3.994075074267437*^9, 3.9940750919136257`*^9}}, - CellLabel-> - "Out[499]=",ExpressionUUID->"ef91c62f-36c8-4700-ae81-a69344d90fdd"] + 3.994075020497636*^9, {3.994075074267437*^9, 3.9940750919136257`*^9}, + 3.994349996729883*^9, 3.994352549159666*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"2bfdc40a-a752-49b2-b383-14198955e2ac"] }, Open ]], Cell[CellGroupData[{ @@ -5819,15 +5692,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[500]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], + CellLabel->"In[93]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], Cell[BoxData["0.0056680041461086164`"], "Output", CellChangeTimes->{ 3.9913204218154297`*^9, 3.994074936845209*^9, 3.994074975692152*^9, - 3.9940750205073423`*^9, {3.9940750742793093`*^9, 3.9940750919255133`*^9}}, - CellLabel-> - "Out[500]=",ExpressionUUID->"f3eb6687-2274-41a7-9df2-f310f556d96c"] + 3.9940750205073423`*^9, {3.9940750742793093`*^9, 3.9940750919255133`*^9}, + 3.99434999676691*^9, 3.9943525491686907`*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"a1309c7d-f344-4f56-a5b5-c76abb796588"] }, Open ]], Cell[CellGroupData[{ @@ -5841,16 +5713,15 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", Background->RGBColor[0.4, 0.6, 1, 0.33], - CellLabel-> - "In[501]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], + CellLabel->"In[94]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], Cell[BoxData["11.771447256638949`"], "Output", CellChangeTimes->{ 3.991320422776104*^9, 3.9940749368840637`*^9, 3.994074975739698*^9, - 3.99407502057265*^9, {3.994075074332365*^9, 3.9940750919803143`*^9}}, + 3.99407502057265*^9, {3.994075074332365*^9, 3.9940750919803143`*^9}, + 3.994349996900181*^9, 3.9943525492595778`*^9}, Background->RGBColor[0.14, 0.8, 0.14, 0.33], - CellLabel-> - "Out[501]=",ExpressionUUID->"30edd760-76a8-49bf-9ae2-da9ec7cb0149"] + CellLabel->"Out[94]=",ExpressionUUID->"cbdd8071-2eff-4855-9c13-a271be55feec"] }, Open ]], Cell[CellGroupData[{ @@ -6041,15 +5912,14 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[502]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], + CellLabel->"In[95]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], Cell[BoxData["0.02596221539752704`"], "Output", CellChangeTimes->{ 3.9913204229248886`*^9, 3.994074936896278*^9, 3.994074975750927*^9, - 3.994075020584323*^9, {3.994075074344434*^9, 3.994075091991942*^9}}, - CellLabel-> - "Out[502]=",ExpressionUUID->"e1607385-ce10-4cf7-9d7f-17a025004bc8"] + 3.994075020584323*^9, {3.994075074344434*^9, 3.994075091991942*^9}, + 3.9943499969368467`*^9, 3.9943525492955217`*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"645c137a-763d-473f-935e-c5f54b4b3475"] }, Open ]], Cell[CellGroupData[{ @@ -6063,16 +5933,15 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", Background->None, - CellLabel-> - "In[503]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], + CellLabel->"In[96]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], Cell[BoxData["5.5001440803059065`"], "Output", CellChangeTimes->{ 3.9913204230053368`*^9, 3.994074936936968*^9, 3.994074975800235*^9, - 3.994075020648406*^9, {3.994075074400708*^9, 3.994075092045961*^9}}, + 3.994075020648406*^9, {3.994075074400708*^9, 3.994075092045961*^9}, + 3.994349997096623*^9, 3.994352549359507*^9}, Background->None, - CellLabel-> - "Out[503]=",ExpressionUUID->"e22961d9-7314-42ad-95cb-daa7b394c85a"] + CellLabel->"Out[96]=",ExpressionUUID->"779e2a07-40eb-420e-a355-513bc4dd86de"] }, Open ]], Cell[CellGroupData[{ @@ -6164,15 +6033,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[504]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], + CellLabel->"In[97]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], Cell[BoxData["0.09644452732399805`"], "Output", CellChangeTimes->{ 3.9913204230393543`*^9, 3.994074936949451*^9, 3.9940749758111467`*^9, - 3.994075020657529*^9, {3.994075074412417*^9, 3.994075092057684*^9}}, - CellLabel-> - "Out[504]=",ExpressionUUID->"a26ce8ac-2269-4591-951c-a89d328f71df"] + 3.994075020657529*^9, {3.994075074412417*^9, 3.994075092057684*^9}, + 3.994349997132029*^9, 3.9943525493705482`*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"4cdfa488-e903-403c-9fe8-40c503b10585"] }, Open ]], Cell[CellGroupData[{ @@ -6261,15 +6129,14 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[505]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], + CellLabel->"In[98]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], Cell[BoxData["0.903555472676002`"], "Output", CellChangeTimes->{ 3.9913204230728855`*^9, 3.994074936960535*^9, 3.994074975821406*^9, - 3.994075020668214*^9, {3.994075074423147*^9, 3.994075092069425*^9}}, - CellLabel-> - "Out[505]=",ExpressionUUID->"3d9834dd-54fa-4d19-9791-ed7bda3baa31"] + 3.994075020668214*^9, {3.994075074423147*^9, 3.994075092069425*^9}, + 3.99434999716621*^9, 3.9943525493816557`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"dcb82c1f-1e2b-4677-a746-2b707ac0072e"] }, Open ]], Cell[CellGroupData[{ @@ -6391,22 +6258,21 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[506]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], + CellLabel->"In[99]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], Cell[BoxData["0.08714298047324866`"], "Output", CellChangeTimes->{ 3.9913204231038837`*^9, 3.994074936973423*^9, 3.994074975832206*^9, - 3.9940750206771507`*^9, {3.9940750744338417`*^9, 3.994075092080255*^9}}, - CellLabel-> - "Out[506]=",ExpressionUUID->"3ffcdb40-2814-4b1f-bc5b-690a5a109f96"] + 3.9940750206771507`*^9, {3.9940750744338417`*^9, 3.994075092080255*^9}, + 3.9943499972075253`*^9, 3.994352549392859*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"292773b1-8e2a-445f-a06a-59cd3924dfeb"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellLabel-> - "In[507]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], + "In[100]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ @@ -6420,7 +6286,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -6442,8 +6310,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6469,83 +6336,88 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.991799443370365*^9}, CellLabel-> - "In[508]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], + "In[101]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"4.210949781724305`*^-207\\\", \ -RowBox[{\\\"197404219092301941520573764\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ -\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"806995456000000000000000000\\\"}]]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 508, 25, - 31386469945955888881, "kernel 2"}, +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 101, 1, + 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.994074937018906*^9, 3.994074975850026*^9, - 3.994075020689248*^9, {3.994075074447703*^9, 3.9940750920943947`*^9}}, + 3.994075020689248*^9, {3.994075074447703*^9, 3.9940750920943947`*^9}, + 3.994349997314331*^9, 3.9943525494259357`*^9}, CellLabel-> "During evaluation of \ -In[508]:=",ExpressionUUID->"fa96e4e0-1824-4022-95b6-5d237e5dc412"], +In[101]:=",ExpressionUUID->"980bb0b7-408f-4eae-9d77-e8cf861c066c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"5.136589097020563`*^-212\\\", \ -RowBox[{\\\"365000401101666289871540890\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ -\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"134598144000000000000000000\\\"}]]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 508, 26, - 31386469945955888881, "kernel 2"}, +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 101, 2, + 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.994074937018906*^9, 3.994074975850026*^9, - 3.994075020689248*^9, {3.994075074447703*^9, 3.994075092097526*^9}}, + 3.994075020689248*^9, {3.994075074447703*^9, 3.9940750920943947`*^9}, + 3.994349997314331*^9, 3.994352549493217*^9}, CellLabel-> "During evaluation of \ -In[508]:=",ExpressionUUID->"ce87c19d-47ac-4429-8951-17671976d0d8"], +In[101]:=",ExpressionUUID->"a7c4c920-d9da-49a8-9e07-d4151e7231ce"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"6.265699882278472`*^-217\\\", \ -RowBox[{\\\"706640776532825937191303163\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ -\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"582006784000000000000000000\\\"}]]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 508, 27, - 31386469945955888881, "kernel 2"}, +RowBox[{\\\"7066407765328259371913031630455\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"47\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8628582006784000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 101, 3, + 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.994074937018906*^9, 3.994074975850026*^9, - 3.994075020689248*^9, {3.994075074447703*^9, 3.994075092100298*^9}}, + 3.994075020689248*^9, {3.994075074447703*^9, 3.9940750920943947`*^9}, + 3.994349997314331*^9, 3.994352549500745*^9}, CellLabel-> "During evaluation of \ -In[508]:=",ExpressionUUID->"a759d243-bcc4-47cf-b2cd-c3627b191112"], +In[101]:=",ExpressionUUID->"23c439e5-48fc-4612-b38e-15ac4c6048a3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 508, 28, 31386469945955888881, "kernel 2"}, +during this calculation.\"", 2, 101, 4, 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, 3.994074937018906*^9, 3.994074975850026*^9, - 3.994075020689248*^9, {3.994075074447703*^9, 3.994075092102895*^9}}, + 3.994075020689248*^9, {3.994075074447703*^9, 3.9940750920943947`*^9}, + 3.994349997314331*^9, 3.994352549506484*^9}, CellLabel-> "During evaluation of \ -In[508]:=",ExpressionUUID->"563b86f9-b72e-48af-a340-5efcc20f64ea"], +In[101]:=",ExpressionUUID->"a3b820a7-5477-40b5-98ec-fd843f1b7006"], Cell[BoxData["11.771447256638933`"], "Output", CellChangeTimes->{ 3.9913204260017204`*^9, 3.994074938236412*^9, 3.994074977437273*^9, - 3.994075021819463*^9, {3.994075075561866*^9, 3.994075093972012*^9}}, + 3.994075021819463*^9, {3.994075075561866*^9, 3.994075093972012*^9}, + 3.994350001280427*^9, 3.994352552017363*^9}, CellLabel-> - "Out[508]=",ExpressionUUID->"20383c24-ed62-4bf7-b689-7c4d58e0a3a9"] + "Out[101]=",ExpressionUUID->"cd17796e-b32d-4db1-a0e6-2e37e29ae21b"] }, Open ]], Cell[CellGroupData[{ @@ -6560,7 +6432,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -6582,8 +6456,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6609,78 +6482,83 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.9917994459475594`*^9}, CellLabel-> - "In[509]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], + "In[102]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"4.210949781724305`*^-207\\\", \ -RowBox[{\\\"197404219092301941520573764\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ -\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"806995456000000000000000000\\\"}]]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 509, 29, - 31386469945955888881, "kernel 2"}, +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 102, 5, + 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.9940749383071823`*^9, - 3.9940749774572887`*^9, 3.9940750939990263`*^9}, + 3.9940749774572887`*^9, 3.9940750939990263`*^9, 3.994350001366282*^9, + 3.9943525521459723`*^9}, CellLabel-> "During evaluation of \ -In[509]:=",ExpressionUUID->"816f1531-6ee6-4a82-9505-bb8aef05e747"], +In[102]:=",ExpressionUUID->"6b02ee7b-2498-4746-9ef5-e77e325e1ea8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"5.136589097020563`*^-212\\\", \ -RowBox[{\\\"365000401101666289871540890\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ -\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"134598144000000000000000000\\\"}]]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 509, 30, - 31386469945955888881, "kernel 2"}, +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 102, 6, + 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.9940749383071823`*^9, - 3.9940749774572887`*^9, 3.994075094002339*^9}, + 3.9940749774572887`*^9, 3.9940750939990263`*^9, 3.994350001366282*^9, + 3.994352552154376*^9}, CellLabel-> "During evaluation of \ -In[509]:=",ExpressionUUID->"0ca1d9d3-d84a-4c28-a629-150c9788c0af"], +In[102]:=",ExpressionUUID->"b2baaa5b-f86a-42f0-b2d8-e995de6a05d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"6.265699882278472`*^-217\\\", \ -RowBox[{\\\"706640776532825937191303163\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ -\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"582006784000000000000000000\\\"}]]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 509, 31, - 31386469945955888881, "kernel 2"}, +RowBox[{\\\"7066407765328259371913031630455\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"47\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8628582006784000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 102, 7, + 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.9940749383071823`*^9, - 3.9940749774572887`*^9, 3.994075094004982*^9}, + 3.9940749774572887`*^9, 3.9940750939990263`*^9, 3.994350001366282*^9, + 3.994352552162088*^9}, CellLabel-> "During evaluation of \ -In[509]:=",ExpressionUUID->"e7d6c14b-d5c2-4db6-95f0-047bf5c02b49"], +In[102]:=",ExpressionUUID->"ccba9853-3354-41af-bf12-11447cff7401"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 509, 32, 31386469945955888881, "kernel 2"}, +during this calculation.\"", 2, 102, 8, 31388289743499617120, "kernel 4"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{3.9913204262354183`*^9, 3.9940749383071823`*^9, - 3.9940749774572887`*^9, 3.9940750940075417`*^9}, + 3.9940749774572887`*^9, 3.9940750939990263`*^9, 3.994350001366282*^9, + 3.994352552167631*^9}, CellLabel-> "During evaluation of \ -In[509]:=",ExpressionUUID->"42a43128-060c-42b8-aa62-06747df7c5b7"], +In[102]:=",ExpressionUUID->"30807e21-ddfa-4635-8488-651563beadab"], Cell[BoxData["5.500144080305909`"], "Output", CellChangeTimes->{3.991320428882721*^9, 3.994074939481648*^9, - 3.99407497756094*^9, 3.994075096009781*^9}, + 3.99407497756094*^9, 3.994075096009781*^9, 3.994350005097934*^9, + 3.994352555187785*^9}, CellLabel-> - "Out[509]=",ExpressionUUID->"b6842594-c56a-4a5b-b298-6eeb8591f167"] + "Out[102]=",ExpressionUUID->"e84192b9-7c2d-44bc-8abb-ec37988c3280"] }, Open ]], Cell[CellGroupData[{ @@ -6690,61 +6568,441 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{3.9917994505623856`*^9}, CellLabel-> - "In[510]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], + "In[103]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[BoxData["$Aborted"], "Output", +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VV0XAHBzMmUWMs/KeBGl9spFGUNlznDdewwJmSJTk9SbVCIqU2VK +5oiQVPL6SlGKRpHrJvPYvd5U3/bHec7ze9Y5a6+199n7OUqUcBcaBxsb2zi+ +1u5HXulqNPW92hn6KJMkFENHO2eKjSmWlUhzd03QmocLTbJULdvQ4i523g3Y +TtSXPAKkZ6iv8ayIMHZdXMpTbsse1FVplSqCfa5rY0dKxWtUaWQaIIb9oO9I +warhO5Tk63dXAnvi4/PE+Nb3SJzcfnAjtsyYitdP8mcUuuJ8TBbbbjbRLKrn +K7IqkmVXwG5fneCPqxhB1z1kF5SxB05IJdwPG0Xads4OGtgzPJYTS4ZjqK/g +oegWbJ70CA8Sk4H2n/SzMMCWF8nvPtI6jnI0tn02wXaU/Vk6Q55CipmZjmRs +okhZUod3Bs2+EtGwxU5R25t6qGcW0dq6g52x30u9NYiumEd8nUM6/thUz5Dg +K+kLKD9mZ00w9lwe2836sEWUzDN4PRKbV1lHeN5wGbUoNtSmYmdRn+4WlviJ +HPxXPl7EVizzSNFj/kTVs3Hh17FNt5yZOdzKQg0XNQdrsYNMvvZMkFdRzeKB +m9+wl+JiuPjUf6O0vHi5OezjrfzmWrx/0F/dT5x/sHPB9G5gz1/kq+25QTYW +11fSbRlZwQ7RAm5KntgVXVeGT8hygHRc/GwI9tx3n8TL6RywGjikkYidqL18 +rzaMEyQORw4WYmfVKKnMGnIDp8yAwRT2x76p9j+3uUE7V8GF7Siuf6HJU0iC +BzpIdZ/FsSuNHDN1mDzw42ONPsLufHCMPbSVFxyPGLzNxV5+2v91nCwA6lzr ++Pzi6EjUXkA4oV0AFK6dFk/C1n9rCYJmgsB4snrjOnYIvbHIQFcI1gl+UxrE +juDo0d8hIAyMraXrXePpaEy5ej71pwh0du+3PXQMzw/xfH0vSRTyr6moXcLm +uMtQ2nhEFF56cSU1YiuSFFwqJkXhty1HMXsCHXmSL9W/GhaDHeoKvYXYvQGR +UVIvJOC+c/CNxUQ6GirLOO/HKwmbTDT3KCbR0dRkxe07VpKwe0Qi0gGbL3q0 +f3uHJEQfT91xB9vy9H4jv0YpyH06U08k01FLsclyeaE0cDk+kV5JoaPisf9i +t0XLQeacy/eEU3S050DaUFSVHESHlG1rwJ7qFLOuYshBaYjfrylso+ItEooe +8lBdyfvM9zSeT4rPPe6dCvB6LDzeNpWOFmaHj46fUoQKxawgozQ6Ejts2XDP +QRn49EcjPM/TEaOYL8gpRBkk39rGFGE3f+6TnT6jDOO21O8MbG/7g6fUO5TB ++nCTeEw6rm9zrMs1QxXYcVE76+oFPP5E2VyylCoUs9drzlyko/2B/Dq2I2rA +73mubTaLjlDsAUO332qwpYxvcFc2HWmnFm6lSqvDVP9+ryxsttski2RndTz+ +3pvbrtJR1ZCXW/1jdXgWa6ySnoP3p2vlCZlbGrDUEcVOvo7rs3QYmKBogWWX +yk62Ijq6vS/nEzNZC1jGn3J8sTMoI8NcN7Sg5fMTr0fY1OMxk/L9WkCv11c+ +fpOORNry2faRtSHh7Pgdntv4+yHNaLeqbIYdGmNlGqV0JKt8MeU8fQucLm88 ++qCSjtr+WdJa4dCBUd/P7npVeD4WPd4SSjpwVfpkUwl2QaeqloWPDkyU+Uxf +qaYj5cCWN6xBHQh9/2N7bC3ut3JMjXihCw8su4JcGuhITlaeUPTQh1ZIVw9u +o6MtJdECv5AhVIvsDhF5RUcU6qllHUdDoNI3f8jDzlXJHPLzNoRryrn3NXvp +iPNWTW1XnCEIbZV9uKsP77eCif2ZdYagQfdciXuDz9Ncv3wtFRIkxliRVgfw ++p6313XnMQIzjtrXB4bp6GakqlNjjzFkP2VNui7RUV8s2nq6xAyKlxIkm9TG +kJLPO8eDoTtAWMWEzdFnDNH+3q+WiwfgDdyXH3N9DElNNq+ToljAXT12p6+j +YyiaZP45U9sSSsSb+831GYgyvdotNmEFHHStiuyTDFRlEbWusHc3PExO3pxA +Z6DipZDHlVk2YHTZ1ZVzz3fE2rXxZWeKHZwJyrjA8fA7+sLGOT/i7wAy4Uon +yWbjKGxT+KUTKnthdYcLtaZxHFUHd3dkpzpBk02croz1D3RsUZq5OdgZDMgh +v7+/+4GWba1d//V1AdP1UfylCRPIzOvyrjHnfeA24vwlTnMSvZHOD+kk7Qfh +nfWNLW8mkUzpqbZyzQMwnSC/Kpc9hZqHte0dBV1hWb/Zp3bfNJJ/OxcYO+0K +zXbnxgYlZxAp+3Ll7WE3SKmUMc1cnEH5XIu6mU/d4YQf7Wzh/2bR/V16H1Mf +eID/NyXeSe85lLv1H5HVCk/wSioWLhyYQ72fSs6Q0r1gRC3hlpzdPGp0yFON +OO4NJlv4m7V75tH84X1sYdSD0GzfJ5pnvYCWrbWCZsg+sF5oJXzo0QIqn/7A +ijLxhdcbrIzWWS4i95slAQcF/EDknNQy/6NFdK/ezpczzQ+aTefJQuQlZCb7 +ZuXcih90XeBs4mxbQirDgR9fB/tDqkLUFE1vGdH5D+3NG/UHSdWqsPayZdSX +4Riw+wAFODUv/+Mt+hNlxRXyx/RR4Narm3P7k3+itva/KwE2ASD/qDne5etP +tMEb0kgtARBWYE3J0mciRfF/eze1BcCvpqv5Xw2YSL/HYSNPewAcSauS0yYx +kYu51533jwNA1WJpos2YibI2xb5I+l8AWMzurfuwjYlkvtzd0P0+AAJ2scpn +LZlI1Ucq15sZAGnyBZrn3ZnIzG+mPNWICkrGuuwRSUxUem0uytGECj6/gihH +k5lIvH9hp5QpFbLLzYWTU5hoxor5tnw7Fa7z9zidO8HE5xcbe48FFT6r+/rm +pDKREFPEQ9SZCtxc/icuX2Ai+gXj9YWHqbCa0O+2msdEGa2Jwc2lVAjojW0s +esBEhw1zzOLKqaDc/9E5poWJ7O/UrTetoELoSZKxTSsT8eUw7jRVUeEku1Df +TBsTpUY6TdxvoELp70Rngw4mStRSPdT4hApGdRTvK11MFJLzIrR+CI9nVEx5 +/oaJbIQY5pHDVLjlVnQ2rZ+JNFPZBA2/UaHZVXeO/JaJGJHGVXVjVIjWOniq +5R0T+TsWTtdOUUFP8kZjwXsmcueOCqv5jwrn2drUyUNMtDtKJqJSkgY3ejK2 +/BpnoieFZ2wzN9JA/uWiUfUPJjLvWVCNk6HBur1n3Pwm8HqpvfhAlqdB+UDi +xONJJpIeTCB/UqMBu0irxbEZJprc9kWSz5gGmxbPZz9aZKKLHEUPA/fRQEY9 +PffGb9y/nkCuwwFsYcVMgz9MdNorLpLkRoPMgayiLuy4BieNv540MAk882v6 +L66fYL98lUIDV8K7xICDhUjPKdRnR2jwXHVzeToPCw1eVuNXuUSDobMmRy4J +sVA1Egwav0wDvTfb29g2sNDp6aXOqis0aLt03yQC29CmM9k0hwZSHGUP7IVZ +KIMtYMGhgAYCY01Lv0RYyDq86ENcJQ2Opu3TJkmwkJzcWZOd1TRozNPxv4q9 +9Dz8CmctDTrSVp+xsG+pI4eMezRgyChIt0qy0O8vXzput9CAQ1lw1Hgj/g+z +ly1/1U2DW/MDC5yyLHT+Pw7urOc0aOD89McDm1I+4e/RQ4M76OTWGmxhrhZZ +ei8NfliH6rptYqHQVveLKwM0CE3J0c+XYyEV7auxqmM0uMKuF8uuyEL/DSb1 +/2DQwLqrlGyL3ZdK068Zp4FQVaF5JnbyiNGE2RQN4ubf1CoosdDH3P6Dexdp +sOiZWKSvzEKZ60SsjrETYNbsf1FblYXaFr54RXMSYOfCPhmK/f1LRWQYNwF5 +fSXm1djmDZZFlPUE/Hpf/1hHjYUYfnG/bEUIYFiNOimq4/rtrUStxAi4Llft +6Ym9fauoFpIg4JDdnMcV7EuCla4kaQJKUq+ZcmjgeMvXOlklAsqVuqP7sYmS +ym4JFQLCyVma3Jr4+UvxXzeoEfCP/sHXxtgMQkyQS4uAvr4q9qy1uNjuoCl9 +ArgK330ia7FQyx+xFIYhAZRjIiaHscd+DGcPGxHwtOrb6WzsbR3Hnr41JaBI +RIptFJseWi3/EAjo2nP10BFtFhJyTzBusiCg3domOBPbjLzHvs4S9+e8w6se +O0P6W3zJHgJOynXKzmI3c9VcKrQlQJRmNcG/mYVGZxPKrtljd9MrNbBNuyTe +XXAioNfcR8gbm1L3bTLNhQDTHVpV0dgX8mo4Tu4nwN9kCaVjf4u00Y91JyAe +he9qxhb0kdwd4YnXp1S0tmctn83owRBvAqLv5YkOr72vkHTexw/31+54j3ML +rofP9pY7hYDAxNB5Mexvy5IPXKgEpPt6q6hgC46M9toTBAzwytgYYJv21DKs +gwhYoN2k7MSmNCX9hhAcr5sJt8W+cMtWfHsoAeei/0QcWMt/QWqzcRgBe0+9 +pPmu5Y+j79KLIKCAzcMxCFuAWueuFYn79y7QjsDeujc5XCWagFSXG//FruXf +ZndGLpaAdTMO7YnY6Wob86XiCBhMbYg5gX1feOyeyDECIttfKqZij/yqe86f +SEDGudxHaWv5vyePcCcTIK4u7nIO2+SNHetvCgG6ivB+zf8HypzGKQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VV0XAHBzMmUWMs/KeBGl9spFGUNlznDdewwJmSJTk9SbVCIqU2VK +5oiQVPL6SlGKRpHrJvPYvd5U3/bHec7ze9Y5a6+199n7OUqUcBcaBxsb2zi+ +1u5HXulqNPW92hn6KJMkFENHO2eKjSmWlUhzd03QmocLTbJULdvQ4i523g3Y +TtSXPAKkZ6iv8ayIMHZdXMpTbsse1FVplSqCfa5rY0dKxWtUaWQaIIb9oO9I +warhO5Tk63dXAnvi4/PE+Nb3SJzcfnAjtsyYitdP8mcUuuJ8TBbbbjbRLKrn +K7IqkmVXwG5fneCPqxhB1z1kF5SxB05IJdwPG0Xads4OGtgzPJYTS4ZjqK/g +oegWbJ70CA8Sk4H2n/SzMMCWF8nvPtI6jnI0tn02wXaU/Vk6Q55CipmZjmRs +okhZUod3Bs2+EtGwxU5R25t6qGcW0dq6g52x30u9NYiumEd8nUM6/thUz5Dg +K+kLKD9mZ00w9lwe2836sEWUzDN4PRKbV1lHeN5wGbUoNtSmYmdRn+4WlviJ +HPxXPl7EVizzSNFj/kTVs3Hh17FNt5yZOdzKQg0XNQdrsYNMvvZMkFdRzeKB +m9+wl+JiuPjUf6O0vHi5OezjrfzmWrx/0F/dT5x/sHPB9G5gz1/kq+25QTYW +11fSbRlZwQ7RAm5KntgVXVeGT8hygHRc/GwI9tx3n8TL6RywGjikkYidqL18 +rzaMEyQORw4WYmfVKKnMGnIDp8yAwRT2x76p9j+3uUE7V8GF7Siuf6HJU0iC +BzpIdZ/FsSuNHDN1mDzw42ONPsLufHCMPbSVFxyPGLzNxV5+2v91nCwA6lzr ++Pzi6EjUXkA4oV0AFK6dFk/C1n9rCYJmgsB4snrjOnYIvbHIQFcI1gl+UxrE +juDo0d8hIAyMraXrXePpaEy5ej71pwh0du+3PXQMzw/xfH0vSRTyr6moXcLm +uMtQ2nhEFF56cSU1YiuSFFwqJkXhty1HMXsCHXmSL9W/GhaDHeoKvYXYvQGR +UVIvJOC+c/CNxUQ6GirLOO/HKwmbTDT3KCbR0dRkxe07VpKwe0Qi0gGbL3q0 +f3uHJEQfT91xB9vy9H4jv0YpyH06U08k01FLsclyeaE0cDk+kV5JoaPisf9i +t0XLQeacy/eEU3S050DaUFSVHESHlG1rwJ7qFLOuYshBaYjfrylso+ItEooe +8lBdyfvM9zSeT4rPPe6dCvB6LDzeNpWOFmaHj46fUoQKxawgozQ6Ejts2XDP +QRn49EcjPM/TEaOYL8gpRBkk39rGFGE3f+6TnT6jDOO21O8MbG/7g6fUO5TB ++nCTeEw6rm9zrMs1QxXYcVE76+oFPP5E2VyylCoUs9drzlyko/2B/Dq2I2rA +73mubTaLjlDsAUO332qwpYxvcFc2HWmnFm6lSqvDVP9+ryxsttski2RndTz+ +3pvbrtJR1ZCXW/1jdXgWa6ySnoP3p2vlCZlbGrDUEcVOvo7rs3QYmKBogWWX +yk62Ijq6vS/nEzNZC1jGn3J8sTMoI8NcN7Sg5fMTr0fY1OMxk/L9WkCv11c+ +fpOORNry2faRtSHh7Pgdntv4+yHNaLeqbIYdGmNlGqV0JKt8MeU8fQucLm88 ++qCSjtr+WdJa4dCBUd/P7npVeD4WPd4SSjpwVfpkUwl2QaeqloWPDkyU+Uxf +qaYj5cCWN6xBHQh9/2N7bC3ut3JMjXihCw8su4JcGuhITlaeUPTQh1ZIVw9u +o6MtJdECv5AhVIvsDhF5RUcU6qllHUdDoNI3f8jDzlXJHPLzNoRryrn3NXvp +iPNWTW1XnCEIbZV9uKsP77eCif2ZdYagQfdciXuDz9Ncv3wtFRIkxliRVgfw ++p6313XnMQIzjtrXB4bp6GakqlNjjzFkP2VNui7RUV8s2nq6xAyKlxIkm9TG +kJLPO8eDoTtAWMWEzdFnDNH+3q+WiwfgDdyXH3N9DElNNq+ToljAXT12p6+j +YyiaZP45U9sSSsSb+831GYgyvdotNmEFHHStiuyTDFRlEbWusHc3PExO3pxA +Z6DipZDHlVk2YHTZ1ZVzz3fE2rXxZWeKHZwJyrjA8fA7+sLGOT/i7wAy4Uon +yWbjKGxT+KUTKnthdYcLtaZxHFUHd3dkpzpBk02croz1D3RsUZq5OdgZDMgh +v7+/+4GWba1d//V1AdP1UfylCRPIzOvyrjHnfeA24vwlTnMSvZHOD+kk7Qfh +nfWNLW8mkUzpqbZyzQMwnSC/Kpc9hZqHte0dBV1hWb/Zp3bfNJJ/OxcYO+0K +zXbnxgYlZxAp+3Ll7WE3SKmUMc1cnEH5XIu6mU/d4YQf7Wzh/2bR/V16H1Mf +eID/NyXeSe85lLv1H5HVCk/wSioWLhyYQ72fSs6Q0r1gRC3hlpzdPGp0yFON +OO4NJlv4m7V75tH84X1sYdSD0GzfJ5pnvYCWrbWCZsg+sF5oJXzo0QIqn/7A +ijLxhdcbrIzWWS4i95slAQcF/EDknNQy/6NFdK/ezpczzQ+aTefJQuQlZCb7 +ZuXcih90XeBs4mxbQirDgR9fB/tDqkLUFE1vGdH5D+3NG/UHSdWqsPayZdSX +4Riw+wAFODUv/+Mt+hNlxRXyx/RR4Narm3P7k3+itva/KwE2ASD/qDne5etP +tMEb0kgtARBWYE3J0mciRfF/eze1BcCvpqv5Xw2YSL/HYSNPewAcSauS0yYx +kYu51533jwNA1WJpos2YibI2xb5I+l8AWMzurfuwjYlkvtzd0P0+AAJ2scpn +LZlI1Ucq15sZAGnyBZrn3ZnIzG+mPNWICkrGuuwRSUxUem0uytGECj6/gihH +k5lIvH9hp5QpFbLLzYWTU5hoxor5tnw7Fa7z9zidO8HE5xcbe48FFT6r+/rm +pDKREFPEQ9SZCtxc/icuX2Ai+gXj9YWHqbCa0O+2msdEGa2Jwc2lVAjojW0s +esBEhw1zzOLKqaDc/9E5poWJ7O/UrTetoELoSZKxTSsT8eUw7jRVUeEku1Df +TBsTpUY6TdxvoELp70Rngw4mStRSPdT4hApGdRTvK11MFJLzIrR+CI9nVEx5 +/oaJbIQY5pHDVLjlVnQ2rZ+JNFPZBA2/UaHZVXeO/JaJGJHGVXVjVIjWOniq +5R0T+TsWTtdOUUFP8kZjwXsmcueOCqv5jwrn2drUyUNMtDtKJqJSkgY3ejK2 +/BpnoieFZ2wzN9JA/uWiUfUPJjLvWVCNk6HBur1n3Pwm8HqpvfhAlqdB+UDi +xONJJpIeTCB/UqMBu0irxbEZJprc9kWSz5gGmxbPZz9aZKKLHEUPA/fRQEY9 +PffGb9y/nkCuwwFsYcVMgz9MdNorLpLkRoPMgayiLuy4BieNv540MAk882v6 +L66fYL98lUIDV8K7xICDhUjPKdRnR2jwXHVzeToPCw1eVuNXuUSDobMmRy4J +sVA1Egwav0wDvTfb29g2sNDp6aXOqis0aLt03yQC29CmM9k0hwZSHGUP7IVZ +KIMtYMGhgAYCY01Lv0RYyDq86ENcJQ2Opu3TJkmwkJzcWZOd1TRozNPxv4q9 +9Dz8CmctDTrSVp+xsG+pI4eMezRgyChIt0qy0O8vXzput9CAQ1lw1Hgj/g+z +ly1/1U2DW/MDC5yyLHT+Pw7urOc0aOD89McDm1I+4e/RQ4M76OTWGmxhrhZZ +ei8NfliH6rptYqHQVveLKwM0CE3J0c+XYyEV7auxqmM0uMKuF8uuyEL/DSb1 +/2DQwLqrlGyL3ZdK068Zp4FQVaF5JnbyiNGE2RQN4ubf1CoosdDH3P6Dexdp +sOiZWKSvzEKZ60SsjrETYNbsf1FblYXaFr54RXMSYOfCPhmK/f1LRWQYNwF5 +fSXm1djmDZZFlPUE/Hpf/1hHjYUYfnG/bEUIYFiNOimq4/rtrUStxAi4Llft +6Ym9fauoFpIg4JDdnMcV7EuCla4kaQJKUq+ZcmjgeMvXOlklAsqVuqP7sYmS +ym4JFQLCyVma3Jr4+UvxXzeoEfCP/sHXxtgMQkyQS4uAvr4q9qy1uNjuoCl9 +ArgK330ia7FQyx+xFIYhAZRjIiaHscd+DGcPGxHwtOrb6WzsbR3Hnr41JaBI +RIptFJseWi3/EAjo2nP10BFtFhJyTzBusiCg3domOBPbjLzHvs4S9+e8w6se +O0P6W3zJHgJOynXKzmI3c9VcKrQlQJRmNcG/mYVGZxPKrtljd9MrNbBNuyTe +XXAioNfcR8gbm1L3bTLNhQDTHVpV0dgX8mo4Tu4nwN9kCaVjf4u00Y91JyAe +he9qxhb0kdwd4YnXp1S0tmctn83owRBvAqLv5YkOr72vkHTexw/31+54j3ML +rofP9pY7hYDAxNB5Mexvy5IPXKgEpPt6q6hgC46M9toTBAzwytgYYJv21DKs +gwhYoN2k7MSmNCX9hhAcr5sJt8W+cMtWfHsoAeei/0QcWMt/QWqzcRgBe0+9 +pPmu5Y+j79KLIKCAzcMxCFuAWueuFYn79y7QjsDeujc5XCWagFSXG//FruXf +ZndGLpaAdTMO7YnY6Wob86XiCBhMbYg5gX1feOyeyDECIttfKqZij/yqe86f +SEDGudxHaWv5vyePcCcTIK4u7nIO2+SNHetvCgG6ivB+zf8HypzGKQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6392889983453478, 1.510873646477204}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6392889983453492}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6392889983453478, 1.510873646477204}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6392889983453492}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VV0XAHBzMmUWMs/KeBGl9spFGUNlznDdewwJmSJTk9SbVCIqU2VK +5oiQVPL6SlGKRpHrJvPYvd5U3/bHec7ze9Y5a6+199n7OUqUcBcaBxsb2zi+ +1u5HXulqNPW92hn6KJMkFENHO2eKjSmWlUhzd03QmocLTbJULdvQ4i523g3Y +TtSXPAKkZ6iv8ayIMHZdXMpTbsse1FVplSqCfa5rY0dKxWtUaWQaIIb9oO9I +warhO5Tk63dXAnvi4/PE+Nb3SJzcfnAjtsyYitdP8mcUuuJ8TBbbbjbRLKrn +K7IqkmVXwG5fneCPqxhB1z1kF5SxB05IJdwPG0Xads4OGtgzPJYTS4ZjqK/g +oegWbJ70CA8Sk4H2n/SzMMCWF8nvPtI6jnI0tn02wXaU/Vk6Q55CipmZjmRs +okhZUod3Bs2+EtGwxU5R25t6qGcW0dq6g52x30u9NYiumEd8nUM6/thUz5Dg +K+kLKD9mZ00w9lwe2836sEWUzDN4PRKbV1lHeN5wGbUoNtSmYmdRn+4WlviJ +HPxXPl7EVizzSNFj/kTVs3Hh17FNt5yZOdzKQg0XNQdrsYNMvvZMkFdRzeKB +m9+wl+JiuPjUf6O0vHi5OezjrfzmWrx/0F/dT5x/sHPB9G5gz1/kq+25QTYW +11fSbRlZwQ7RAm5KntgVXVeGT8hygHRc/GwI9tx3n8TL6RywGjikkYidqL18 +rzaMEyQORw4WYmfVKKnMGnIDp8yAwRT2x76p9j+3uUE7V8GF7Siuf6HJU0iC +BzpIdZ/FsSuNHDN1mDzw42ONPsLufHCMPbSVFxyPGLzNxV5+2v91nCwA6lzr ++Pzi6EjUXkA4oV0AFK6dFk/C1n9rCYJmgsB4snrjOnYIvbHIQFcI1gl+UxrE +juDo0d8hIAyMraXrXePpaEy5ej71pwh0du+3PXQMzw/xfH0vSRTyr6moXcLm +uMtQ2nhEFF56cSU1YiuSFFwqJkXhty1HMXsCHXmSL9W/GhaDHeoKvYXYvQGR +UVIvJOC+c/CNxUQ6GirLOO/HKwmbTDT3KCbR0dRkxe07VpKwe0Qi0gGbL3q0 +f3uHJEQfT91xB9vy9H4jv0YpyH06U08k01FLsclyeaE0cDk+kV5JoaPisf9i +t0XLQeacy/eEU3S050DaUFSVHESHlG1rwJ7qFLOuYshBaYjfrylso+ItEooe +8lBdyfvM9zSeT4rPPe6dCvB6LDzeNpWOFmaHj46fUoQKxawgozQ6Ejts2XDP +QRn49EcjPM/TEaOYL8gpRBkk39rGFGE3f+6TnT6jDOO21O8MbG/7g6fUO5TB ++nCTeEw6rm9zrMs1QxXYcVE76+oFPP5E2VyylCoUs9drzlyko/2B/Dq2I2rA +73mubTaLjlDsAUO332qwpYxvcFc2HWmnFm6lSqvDVP9+ryxsttski2RndTz+ +3pvbrtJR1ZCXW/1jdXgWa6ySnoP3p2vlCZlbGrDUEcVOvo7rs3QYmKBogWWX +yk62Ijq6vS/nEzNZC1jGn3J8sTMoI8NcN7Sg5fMTr0fY1OMxk/L9WkCv11c+ +fpOORNry2faRtSHh7Pgdntv4+yHNaLeqbIYdGmNlGqV0JKt8MeU8fQucLm88 ++qCSjtr+WdJa4dCBUd/P7npVeD4WPd4SSjpwVfpkUwl2QaeqloWPDkyU+Uxf +qaYj5cCWN6xBHQh9/2N7bC3ut3JMjXihCw8su4JcGuhITlaeUPTQh1ZIVw9u +o6MtJdECv5AhVIvsDhF5RUcU6qllHUdDoNI3f8jDzlXJHPLzNoRryrn3NXvp +iPNWTW1XnCEIbZV9uKsP77eCif2ZdYagQfdciXuDz9Ncv3wtFRIkxliRVgfw ++p6313XnMQIzjtrXB4bp6GakqlNjjzFkP2VNui7RUV8s2nq6xAyKlxIkm9TG +kJLPO8eDoTtAWMWEzdFnDNH+3q+WiwfgDdyXH3N9DElNNq+ToljAXT12p6+j +YyiaZP45U9sSSsSb+831GYgyvdotNmEFHHStiuyTDFRlEbWusHc3PExO3pxA +Z6DipZDHlVk2YHTZ1ZVzz3fE2rXxZWeKHZwJyrjA8fA7+sLGOT/i7wAy4Uon +yWbjKGxT+KUTKnthdYcLtaZxHFUHd3dkpzpBk02croz1D3RsUZq5OdgZDMgh +v7+/+4GWba1d//V1AdP1UfylCRPIzOvyrjHnfeA24vwlTnMSvZHOD+kk7Qfh +nfWNLW8mkUzpqbZyzQMwnSC/Kpc9hZqHte0dBV1hWb/Zp3bfNJJ/OxcYO+0K +zXbnxgYlZxAp+3Ll7WE3SKmUMc1cnEH5XIu6mU/d4YQf7Wzh/2bR/V16H1Mf +eID/NyXeSe85lLv1H5HVCk/wSioWLhyYQ72fSs6Q0r1gRC3hlpzdPGp0yFON +OO4NJlv4m7V75tH84X1sYdSD0GzfJ5pnvYCWrbWCZsg+sF5oJXzo0QIqn/7A +ijLxhdcbrIzWWS4i95slAQcF/EDknNQy/6NFdK/ezpczzQ+aTefJQuQlZCb7 +ZuXcih90XeBs4mxbQirDgR9fB/tDqkLUFE1vGdH5D+3NG/UHSdWqsPayZdSX +4Riw+wAFODUv/+Mt+hNlxRXyx/RR4Narm3P7k3+itva/KwE2ASD/qDne5etP +tMEb0kgtARBWYE3J0mciRfF/eze1BcCvpqv5Xw2YSL/HYSNPewAcSauS0yYx +kYu51533jwNA1WJpos2YibI2xb5I+l8AWMzurfuwjYlkvtzd0P0+AAJ2scpn +LZlI1Ucq15sZAGnyBZrn3ZnIzG+mPNWICkrGuuwRSUxUem0uytGECj6/gihH +k5lIvH9hp5QpFbLLzYWTU5hoxor5tnw7Fa7z9zidO8HE5xcbe48FFT6r+/rm +pDKREFPEQ9SZCtxc/icuX2Ai+gXj9YWHqbCa0O+2msdEGa2Jwc2lVAjojW0s +esBEhw1zzOLKqaDc/9E5poWJ7O/UrTetoELoSZKxTSsT8eUw7jRVUeEku1Df +TBsTpUY6TdxvoELp70Rngw4mStRSPdT4hApGdRTvK11MFJLzIrR+CI9nVEx5 +/oaJbIQY5pHDVLjlVnQ2rZ+JNFPZBA2/UaHZVXeO/JaJGJHGVXVjVIjWOniq +5R0T+TsWTtdOUUFP8kZjwXsmcueOCqv5jwrn2drUyUNMtDtKJqJSkgY3ejK2 +/BpnoieFZ2wzN9JA/uWiUfUPJjLvWVCNk6HBur1n3Pwm8HqpvfhAlqdB+UDi +xONJJpIeTCB/UqMBu0irxbEZJprc9kWSz5gGmxbPZz9aZKKLHEUPA/fRQEY9 +PffGb9y/nkCuwwFsYcVMgz9MdNorLpLkRoPMgayiLuy4BieNv540MAk882v6 +L66fYL98lUIDV8K7xICDhUjPKdRnR2jwXHVzeToPCw1eVuNXuUSDobMmRy4J +sVA1Egwav0wDvTfb29g2sNDp6aXOqis0aLt03yQC29CmM9k0hwZSHGUP7IVZ +KIMtYMGhgAYCY01Lv0RYyDq86ENcJQ2Opu3TJkmwkJzcWZOd1TRozNPxv4q9 +9Dz8CmctDTrSVp+xsG+pI4eMezRgyChIt0qy0O8vXzput9CAQ1lw1Hgj/g+z +ly1/1U2DW/MDC5yyLHT+Pw7urOc0aOD89McDm1I+4e/RQ4M76OTWGmxhrhZZ +ei8NfliH6rptYqHQVveLKwM0CE3J0c+XYyEV7auxqmM0uMKuF8uuyEL/DSb1 +/2DQwLqrlGyL3ZdK068Zp4FQVaF5JnbyiNGE2RQN4ubf1CoosdDH3P6Dexdp +sOiZWKSvzEKZ60SsjrETYNbsf1FblYXaFr54RXMSYOfCPhmK/f1LRWQYNwF5 +fSXm1djmDZZFlPUE/Hpf/1hHjYUYfnG/bEUIYFiNOimq4/rtrUStxAi4Llft +6Ym9fauoFpIg4JDdnMcV7EuCla4kaQJKUq+ZcmjgeMvXOlklAsqVuqP7sYmS +ym4JFQLCyVma3Jr4+UvxXzeoEfCP/sHXxtgMQkyQS4uAvr4q9qy1uNjuoCl9 +ArgK330ia7FQyx+xFIYhAZRjIiaHscd+DGcPGxHwtOrb6WzsbR3Hnr41JaBI +RIptFJseWi3/EAjo2nP10BFtFhJyTzBusiCg3domOBPbjLzHvs4S9+e8w6se +O0P6W3zJHgJOynXKzmI3c9VcKrQlQJRmNcG/mYVGZxPKrtljd9MrNbBNuyTe +XXAioNfcR8gbm1L3bTLNhQDTHVpV0dgX8mo4Tu4nwN9kCaVjf4u00Y91JyAe +he9qxhb0kdwd4YnXp1S0tmctn83owRBvAqLv5YkOr72vkHTexw/31+54j3ML +rofP9pY7hYDAxNB5Mexvy5IPXKgEpPt6q6hgC46M9toTBAzwytgYYJv21DKs +gwhYoN2k7MSmNCX9hhAcr5sJt8W+cMtWfHsoAeei/0QcWMt/QWqzcRgBe0+9 +pPmu5Y+j79KLIKCAzcMxCFuAWueuFYn79y7QjsDeujc5XCWagFSXG//FruXf +ZndGLpaAdTMO7YnY6Wob86XiCBhMbYg5gX1feOyeyDECIttfKqZij/yqe86f +SEDGudxHaWv5vyePcCcTIK4u7nIO2+SNHetvCgG6ivB+zf8HypzGKQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6392889983453478, 1.510873646477204}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6392889983453492}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6392889983453492}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6392889983453478, 1.510873646477204}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", CellChangeTimes->{3.9913206956809444`*^9, 3.9940749491604347`*^9, - 3.9940750965563307`*^9}, + 3.9940750965563307`*^9, 3.994350609105274*^9, 3.994353048728511*^9}, CellLabel-> - "Out[510]=",ExpressionUUID->"7554495c-e131-4bab-93bd-e74ae9ef4b47"] + "Out[103]=",ExpressionUUID->"797c9f23-37bb-46fc-9e89-325c4cb5d934"] }, Open ]], Cell[CellGroupData[{ @@ -6807,274 +7065,162 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917994543716736`*^9},ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-\ -9aed2c391662"], + CellChangeTimes->{3.9917994543716736`*^9}, + CellLabel-> + "In[104]:=",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3559275616020787`*^-274\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.3167535246397406`*^-273\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 86, 9, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696298666*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 104, + 9, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350609661249*^9, + 3.994353049291905*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], +In[104]:=",ExpressionUUID->"0df1da07-9053-425e-9cae-fef492c8fff7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7743624682465165`*^-285\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.352213673202415`*^-284\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 86, - 10, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696309664*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, + 104, 10, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350609661249*^9, + 3.994353049302475*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], +In[104]:=",ExpressionUUID->"faed9633-37bb-45b9-9a0b-116474c85e6b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.227765210043865`*^-297\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.5358364161048506`*^-295\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 86, 11, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696318653*^9}, + 2, 104, 11, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350609661249*^9, + 3.994353049310837*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], +In[104]:=",ExpressionUUID->"39cc0360-bfd3-4300-9ddd-74f7b50c1d74"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 86, 12, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913206963286114`*^9}, +during this calculation.\"", 2, 104, 12, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994350609661249*^9, + 3.9943530493202963`*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], +In[104]:=",ExpressionUUID->"a3b5a3a1-4036-4c2f-a10c-9a77c8c65cc9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13lUTd0bB/AolSHSPHc79zbPRYmu51E0ItGEpEmG0iRRNGimpJJUNMqQ +0j1EJNJAJeQtaaSI14s0aRb67d8fZ531WXvdffazz97ffa6Cu9/2fQu5uLj+ +kOv/96m+509ZiUXrK2Mqrgu+Zq9vz5UI2dAVBfxZCcKLnaQBRV+7S3SlQeC7 +RR+bHdUheNvNTu6uQnD1TagpdFwHK4fF02Y774DeSP75Q47W0P9oq99EZx34 +8agKVDvsBjPW9/djnW3gqS2po2TnDbOdhhdGOwdg7W4zgw7LE1Bver2otXAc +rp/+Jj8JSSDTX/nFXeMPXG/W/an/LB1EfPbe5DPlxoLbJcH00kuQpmtWtdWe +Hyui5wZP1eRDd6ZOzZigAO4v+HzXJPUKJBZFvF4ouRIt0jTqLFyugXj6p9Pn +c4TxwvMukf/e3oB4O8v1bVOi6Cgwu0Xk/U2QutsitXCBGBYeDBfa9O9NKBO2 +m9ZdKoadJrMX/IduQkebC50qL4Znto+/vf/nJrBsgyhbCzG84rVDnk+uBOq2 +5PH+kyWGVcs0+G/sKYE/ZpMtr4zFMTxjYPlQVwkcMSrY+zxKAmXnQn2cnpSC +Vf7yCeskCSx1SuWtflYKFN/JhJYLEvh9Ys2A3MtS+Kfd4fabGxLo2x/i3NZV +Clr+y7j7WiRQ0vXRNq6fpfD12rFrP6Ukcfb15nfHmLfAWWTrkHS5JK7Ic/nU +FnULNo78CvX9JIWfXzUuVNEvgxCLdLXaH1LYo3p+1YY1ZVBWoNkjPCWFv7zf +PrNnl4GEnatRJb80npuz5A0wL4MfD55Nc2tJY1EB92+/3WVwPiolKOu4NHY/ +57t+LqoMBkSVfJ8KyKB54uZs+1dlIO73RFZcXAY1+0wze1rLYHOT06uDDBk0 +2QsTuzrKoCI0UWOFvgxGm7o1bOkvgzP9o993OsmgaJRn+9xoGegVV+0fKZRB +09HqKyHCHDhlbOsmtUYW59jnb/2244CFS+5PQxNZnJS0kTHdyYHlkYPR9ptl +cdXXGKmYPRy4XB97LcVVFnsM2Q2T+zjwwOrhIO9pWRTbvvXjxWAOjDoxg8e7 +ZbH7sKtLZwYHXI5Onnl5Qg67/urHb3rDAcWLJjLfY+Xwucqbw30dHFL/uVt8 +KXJ4id0wFNDDgdDfqv+YFMmhxQ3zqoSPHLgQ7SJa+VIO32V5ZR4d4cDL1Ma8 +q7LyOHmf46K0iIa1ZVl3w5/IY/hMHP8vWRo2drb8GW6Sx+w9X047ytOwlYvH +fG+bPH6RXP3gDoMGj+2+3fCvPCpap8u4M2kwO6EQEbmIgR2HFZZeVaHBX37q +ygZ1BvJRR+9X6dEwWZ7SNKvNwIa8I4oT+jSEWqgP3V7FwC3zhzeqraYhNsDV +gFrPQCVun4xzhjRk1zc3LbRloED9hrT1xjQ83Z83VB/MwOxjZSpam2iw/G0k +dPIEA23/42vaYEZDS0q7wapIBsbwjsrsMKehu3JxZNFpBtoIX/nqa0nD8NIg +odjLDLxoqCOYuIUGCdrC0KyOgbkJfl/s7WnI2fhp998GBsrUqvNscqCB6g6L +rHjBwP7jSe90HWnQXFj+XOktA0UD0qp5dtJgYifrzPeVgVmFmrbnnGnwmRmL +bBJQQCcu1b+GHmQ+A7zEvggp4KP6A/3CnjTwf+8p4ZZQQEEVDZkh4qu99R3r +KQXslpO+edGLhr7qCxr3DBTQVPEl69VBGkoNl9S1rVNAvTyHkfOHyHzR4Y6j +qIA9WTqSTt40iBXuj1K3VsDk1GdJXT402MQadRXsVcAL9UYLHvrRIPf31uEn +ngqo2reg3dufhh/BFPf7g6T9xIol0gE0JBxYqiURRMZ3aWFhQCANNdbvo5MT +FNBCLP/cfBANekKntE/cVsCa38kduSE0cCVOPs2sUMArIh+klUPJfHMf2lVR +RX5v0/eylNh7cnvs2DMFtDIQCqJP0FDUxerd36OABi3NXzLDaAi0zfKP7Se+ +Np65LJwGbBbgvfJZAb3ajKrCiN9XTen0DSugw4zbdqcIUl9eU5wdN4VK++V6 +hyNp+CzOlgnkp/BTuJrc1lM03Em5ffucAIWvPAbf3iS2icp+1yxO4XTrwFXn +KFL/3PLArzIUloeYPblN/ONINB8vRWG3WqUNTzSpf5+P3gYNCo2Pa3QVEDv0 +fWh00aWQPePS+oOY5Wi/56QBhT4WPBtXx5D5sVifcB8pZBWuzKwmTq69I/t2 +E4WFFnToPLHzWuXyn1YU+s9odbNjaZhVF+zTtKcwXA6XlRNP5Uid0t9F4ZCE +/H9fiSdWKLKM9lLYEJDmKBNH1ue40aGNBynkakuZO0E8uG+jgJUvhfdCrHRu +EH/t3ErbHKHw+ZPJ363EA1UeU7vCSH+mMa5y8TT0a/pmuUZRmOmRPYPE7/KO +G3vFk/F+5lN3I+5eGd3vnUThWPz+mXDijuizUQGpFNZetHPLJn4zeVHxWAaF +XgOHvMqJ/9lf2HTyEoXOj8z4m4lfdZd6R+VTeHQ+xryPuNn6/vKEqxQeW1LP +GiVufFx7++xNChtrcvPniZ9qv7Q7z6Fw2ZmKqmUJNNQWdExn3qWw1bY4WJy4 +Wvhjdm4lherxYm3yxFWxg+yiagp3yuS2KBI/mJ78UFxPnhf3wUeV+N5BrhhO +E4Xcj8NvqRHf6V2ifO8VhcVGUqn/b+dsEW1+2EZh3bSdhBJx6RP5wzWdFAoH +tZoyiIt11QQb3pH+S/VEJIivXVlV/uIjhX/lZM4IEF8RBYfWLxTeb9a9xkWc +H2852zFIIaUlcXCM1JMzu+Pyu1Hyfs2D3vQTZ3u7wMAkhTzpg/++IL74/sDA +f78oXCHIKrhHnG5zJHZonkJTg6eLcohTa8NUxnmYeGg+UCSKOFk/4cXMYiZy +D3S+8iROvJrm+3c5Eydas/U2ESeI56zkEWEiEz1NmcRRc7cdV8gxMeF5mXcX +ef8Rhx/9EmEycd2q6BgO8cn+hhwpFSbureLZHEMcXN/7SVGPiVuWVn1TIj6y ++kucuiETu3+b1U6Q9ed/fVRV15iJ+bu1rGqIvRMX+RubMTFkpC5wG/GBPyuE +TayZWCv1QliU2MtPqsJ8GxOHcz8f6CTr3XWH9u/tu5hIveDVsye2k96ZcNCX +iYwY2LGa7B/bsx7qfkeY+HKO98Z/ZP9tnT/cEnSctIu6V1wktvgUJRIZxUQn +4ZyFY2T/GpeU5mdkMPHAomc+CWS/9zJK8jZdYqLs/TMq2sShGcW5E3lMNAzJ +HH5D8uH+qWuXtxcz8VhzzyVxYj2n/Mzlj5hYV6qfGE/ypvVV7sXHNUxMTPYv +liP2N83J8HnGxKkDlzrKT9JQppWd3tzCxCpzEdcukleqi9JT4j4ysfyxKC4h +edYUmnZu9Rcmxiiafkkl+ec1mpL8+TsTH4ZL5osTF/WeTTKZYGJ1EctW9jgN +jDvxCX95Wfj8Z0TlymCSX3tPRAZrsND4T6laHsnbe+0hEYq6LMwofryDn9jO +6nh4+2oWMkzUsv1IPqetPnpSD1i4vCH51BqS3wLL/I4P27Lw8seeF+Uk33kq +3f29jrGwTUmlZ9t+GsaErFwd6lgoeVTdSnU3DV0+1D+HGlmYNVkUtmkXyauG +XxDxkoVr66xS95LzKiW0RP5GBwuFhvycz5LzTGdgWf/sdxY+nYjNer2DBt/b +r/fkCCvijNh67xFrGr7b2O/+7KmIbbKu7oVraWgr1nwxc1AR+Z5qwUkjGh5y +864T8FPEr9Inxe3W0HD6foWUQYgi9tYJV/8h57mKvERP/FnSX3/L3BpdGvYP +9zipVyji2JTRvI0yyfMkV4dAPiWcn/vqwStEnv9dg9JZpoQOKqlYKUjDtPns +0JCgEr5+JBt0aAUNS7jTYg9KKaFba+9A4zIy/pD6u66aSni+/dG4Lx8NYfuU +hG12KGETFS3yfoYDYut/vFbPU0JfrdxLAc0csBw5ZvmvgTLqCO56bOHJARld +uTh+Y2Xctnjl+hxXDgwHPq1T36CMg9wB1sPOHEifEjQOtFbGdjNFkTh7DvT9 +Kdaa36uMuytMLySZcSBw2TthydPKKKJ6WWxamQPZqti3uVcZz7y9rrLtK/ke +9eA/cjdCBftTMpfG7C0j/yfEF8bXqaJE9A3rGN1bIPRKKZkeUcMjT3py8idL +QCaBs83AQAMdHnSNuJ+6CZnqRoLC+zVx92CW3RXBYmiW2rB6PFULeQ0NPlhn +XYe1MnUp2h3aOJ1pemJi5ios5y4McovSwapEjaO2AUUgd0reeKeSLuqPCTcs +eVEIixWdK7Y36mKy6m/HG/oFoMWW5Bzbo4eye8YLuqPzILBPqN6KSx/b+GsU +zCIuw8h4kr1lpj66Xa3s6GvJAnPthmxLzVXolZxx98LWi1A9vm5uumUVeoQc +4lyvTQdfDb2e1n2r8cW5iPo7p9OAPezZvnOxARaEhYiqbUuBTSyJLQKFBmiy +5N21iddJoBJ55nidoSEuFdqsfc/jNKjtM3qi2GOI3kFN0vcWxcG+6gMxdwPW +4AIV2GSsGw1P8ts9x0SNkLaJMWceiYSJG/PT2veNcOXbLuQonAQPxZLF2VvW +Ylho3PUkveMwpnbe4M7oWjzqJenZGxgED4rmPk4mrMOJdesbGz0DYNdGkp1y +xtjEYzu5MfkwSB+Or9SqMUaqOnfPnqsHQHSJz+0tjmz0ZnsaR9zzhCLTsNDR +nWz8Zj4ibHTVE/TCkk3PO7NxZMn44J90T9g6Sr/tcmNjbZhm3I0gT4jrmJz1 +8GFjPcnbyFWeMFMYYRJ6io2vHxqZranwgJ51599cK2HjBoOx6Eu17nDgaNFl +yzI28meIW9+84w5TZff2/aDZ2FSu4lx/xR2EqK5p3Qo2NnKXbBKJcwdrflmZ +xzVsXNA4kqVj7Q6P2q95vnnLRs9hde+tnW5gtfyBZnAXG6fybFfPN7lBl/nz +KYleNhbql4xWPnSDiYeDCS4f2Oies1hxS64baBbo3Pr2nY2qz0wHv+1zg0c9 +G4KThthoEvby6jdH0p/IDtAeZeOaXR2K45Zu4BV/tDVoktT/7z1XphbpryYu +W3yGjQ7GdwWtGG4Q9euix8NfbPzJF+sfKuQGgquKNfb8YSOXaG3oXR43yD38 +cHJ+no1+vxaqzUy5wv8AYZcscQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7088,233 +7234,113 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV13lUTd0bB/AolSHSPHc79zbPRYmu51E0ItGEpEmG0iRRNGimpJJUNMqQ +0j1EJNJAJeQtaaSI14s0aRb67d8fZ531WXvdffazz97ffa6Cu9/2fQu5uLj+ +kOv/96m+509ZiUXrK2Mqrgu+Zq9vz5UI2dAVBfxZCcKLnaQBRV+7S3SlQeC7 +RR+bHdUheNvNTu6uQnD1TagpdFwHK4fF02Y774DeSP75Q47W0P9oq99EZx34 +8agKVDvsBjPW9/djnW3gqS2po2TnDbOdhhdGOwdg7W4zgw7LE1Bver2otXAc +rp/+Jj8JSSDTX/nFXeMPXG/W/an/LB1EfPbe5DPlxoLbJcH00kuQpmtWtdWe +Hyui5wZP1eRDd6ZOzZigAO4v+HzXJPUKJBZFvF4ouRIt0jTqLFyugXj6p9Pn +c4TxwvMukf/e3oB4O8v1bVOi6Cgwu0Xk/U2QutsitXCBGBYeDBfa9O9NKBO2 +m9ZdKoadJrMX/IduQkebC50qL4Znto+/vf/nJrBsgyhbCzG84rVDnk+uBOq2 +5PH+kyWGVcs0+G/sKYE/ZpMtr4zFMTxjYPlQVwkcMSrY+zxKAmXnQn2cnpSC +Vf7yCeskCSx1SuWtflYKFN/JhJYLEvh9Ys2A3MtS+Kfd4fabGxLo2x/i3NZV +Clr+y7j7WiRQ0vXRNq6fpfD12rFrP6Ukcfb15nfHmLfAWWTrkHS5JK7Ic/nU +FnULNo78CvX9JIWfXzUuVNEvgxCLdLXaH1LYo3p+1YY1ZVBWoNkjPCWFv7zf +PrNnl4GEnatRJb80npuz5A0wL4MfD55Nc2tJY1EB92+/3WVwPiolKOu4NHY/ +57t+LqoMBkSVfJ8KyKB54uZs+1dlIO73RFZcXAY1+0wze1rLYHOT06uDDBk0 +2QsTuzrKoCI0UWOFvgxGm7o1bOkvgzP9o993OsmgaJRn+9xoGegVV+0fKZRB +09HqKyHCHDhlbOsmtUYW59jnb/2244CFS+5PQxNZnJS0kTHdyYHlkYPR9ptl +cdXXGKmYPRy4XB97LcVVFnsM2Q2T+zjwwOrhIO9pWRTbvvXjxWAOjDoxg8e7 +ZbH7sKtLZwYHXI5Onnl5Qg67/urHb3rDAcWLJjLfY+Xwucqbw30dHFL/uVt8 +KXJ4id0wFNDDgdDfqv+YFMmhxQ3zqoSPHLgQ7SJa+VIO32V5ZR4d4cDL1Ma8 +q7LyOHmf46K0iIa1ZVl3w5/IY/hMHP8vWRo2drb8GW6Sx+w9X047ytOwlYvH +fG+bPH6RXP3gDoMGj+2+3fCvPCpap8u4M2kwO6EQEbmIgR2HFZZeVaHBX37q +ygZ1BvJRR+9X6dEwWZ7SNKvNwIa8I4oT+jSEWqgP3V7FwC3zhzeqraYhNsDV +gFrPQCVun4xzhjRk1zc3LbRloED9hrT1xjQ83Z83VB/MwOxjZSpam2iw/G0k +dPIEA23/42vaYEZDS0q7wapIBsbwjsrsMKehu3JxZNFpBtoIX/nqa0nD8NIg +odjLDLxoqCOYuIUGCdrC0KyOgbkJfl/s7WnI2fhp998GBsrUqvNscqCB6g6L +rHjBwP7jSe90HWnQXFj+XOktA0UD0qp5dtJgYifrzPeVgVmFmrbnnGnwmRmL +bBJQQCcu1b+GHmQ+A7zEvggp4KP6A/3CnjTwf+8p4ZZQQEEVDZkh4qu99R3r +KQXslpO+edGLhr7qCxr3DBTQVPEl69VBGkoNl9S1rVNAvTyHkfOHyHzR4Y6j +qIA9WTqSTt40iBXuj1K3VsDk1GdJXT402MQadRXsVcAL9UYLHvrRIPf31uEn +ngqo2reg3dufhh/BFPf7g6T9xIol0gE0JBxYqiURRMZ3aWFhQCANNdbvo5MT +FNBCLP/cfBANekKntE/cVsCa38kduSE0cCVOPs2sUMArIh+klUPJfHMf2lVR +RX5v0/eylNh7cnvs2DMFtDIQCqJP0FDUxerd36OABi3NXzLDaAi0zfKP7Se+ +Np65LJwGbBbgvfJZAb3ajKrCiN9XTen0DSugw4zbdqcIUl9eU5wdN4VK++V6 +hyNp+CzOlgnkp/BTuJrc1lM03Em5ffucAIWvPAbf3iS2icp+1yxO4XTrwFXn +KFL/3PLArzIUloeYPblN/ONINB8vRWG3WqUNTzSpf5+P3gYNCo2Pa3QVEDv0 +fWh00aWQPePS+oOY5Wi/56QBhT4WPBtXx5D5sVifcB8pZBWuzKwmTq69I/t2 +E4WFFnToPLHzWuXyn1YU+s9odbNjaZhVF+zTtKcwXA6XlRNP5Uid0t9F4ZCE +/H9fiSdWKLKM9lLYEJDmKBNH1ue40aGNBynkakuZO0E8uG+jgJUvhfdCrHRu +EH/t3ErbHKHw+ZPJ363EA1UeU7vCSH+mMa5y8TT0a/pmuUZRmOmRPYPE7/KO +G3vFk/F+5lN3I+5eGd3vnUThWPz+mXDijuizUQGpFNZetHPLJn4zeVHxWAaF +XgOHvMqJ/9lf2HTyEoXOj8z4m4lfdZd6R+VTeHQ+xryPuNn6/vKEqxQeW1LP +GiVufFx7++xNChtrcvPniZ9qv7Q7z6Fw2ZmKqmUJNNQWdExn3qWw1bY4WJy4 +Wvhjdm4lherxYm3yxFWxg+yiagp3yuS2KBI/mJ78UFxPnhf3wUeV+N5BrhhO +E4Xcj8NvqRHf6V2ifO8VhcVGUqn/b+dsEW1+2EZh3bSdhBJx6RP5wzWdFAoH +tZoyiIt11QQb3pH+S/VEJIivXVlV/uIjhX/lZM4IEF8RBYfWLxTeb9a9xkWc +H2852zFIIaUlcXCM1JMzu+Pyu1Hyfs2D3vQTZ3u7wMAkhTzpg/++IL74/sDA +f78oXCHIKrhHnG5zJHZonkJTg6eLcohTa8NUxnmYeGg+UCSKOFk/4cXMYiZy +D3S+8iROvJrm+3c5Eydas/U2ESeI56zkEWEiEz1NmcRRc7cdV8gxMeF5mXcX +ef8Rhx/9EmEycd2q6BgO8cn+hhwpFSbureLZHEMcXN/7SVGPiVuWVn1TIj6y ++kucuiETu3+b1U6Q9ed/fVRV15iJ+bu1rGqIvRMX+RubMTFkpC5wG/GBPyuE +TayZWCv1QliU2MtPqsJ8GxOHcz8f6CTr3XWH9u/tu5hIveDVsye2k96ZcNCX +iYwY2LGa7B/bsx7qfkeY+HKO98Z/ZP9tnT/cEnSctIu6V1wktvgUJRIZxUQn +4ZyFY2T/GpeU5mdkMPHAomc+CWS/9zJK8jZdYqLs/TMq2sShGcW5E3lMNAzJ +HH5D8uH+qWuXtxcz8VhzzyVxYj2n/Mzlj5hYV6qfGE/ypvVV7sXHNUxMTPYv +liP2N83J8HnGxKkDlzrKT9JQppWd3tzCxCpzEdcukleqi9JT4j4ysfyxKC4h +edYUmnZu9Rcmxiiafkkl+ec1mpL8+TsTH4ZL5osTF/WeTTKZYGJ1EctW9jgN +jDvxCX95Wfj8Z0TlymCSX3tPRAZrsND4T6laHsnbe+0hEYq6LMwofryDn9jO +6nh4+2oWMkzUsv1IPqetPnpSD1i4vCH51BqS3wLL/I4P27Lw8seeF+Uk33kq +3f29jrGwTUmlZ9t+GsaErFwd6lgoeVTdSnU3DV0+1D+HGlmYNVkUtmkXyauG +XxDxkoVr66xS95LzKiW0RP5GBwuFhvycz5LzTGdgWf/sdxY+nYjNer2DBt/b +r/fkCCvijNh67xFrGr7b2O/+7KmIbbKu7oVraWgr1nwxc1AR+Z5qwUkjGh5y +864T8FPEr9Inxe3W0HD6foWUQYgi9tYJV/8h57mKvERP/FnSX3/L3BpdGvYP +9zipVyji2JTRvI0yyfMkV4dAPiWcn/vqwStEnv9dg9JZpoQOKqlYKUjDtPns +0JCgEr5+JBt0aAUNS7jTYg9KKaFba+9A4zIy/pD6u66aSni+/dG4Lx8NYfuU +hG12KGETFS3yfoYDYut/vFbPU0JfrdxLAc0csBw5ZvmvgTLqCO56bOHJARld +uTh+Y2Xctnjl+hxXDgwHPq1T36CMg9wB1sPOHEifEjQOtFbGdjNFkTh7DvT9 +Kdaa36uMuytMLySZcSBw2TthydPKKKJ6WWxamQPZqti3uVcZz7y9rrLtK/ke +9eA/cjdCBftTMpfG7C0j/yfEF8bXqaJE9A3rGN1bIPRKKZkeUcMjT3py8idL +QCaBs83AQAMdHnSNuJ+6CZnqRoLC+zVx92CW3RXBYmiW2rB6PFULeQ0NPlhn +XYe1MnUp2h3aOJ1pemJi5ios5y4McovSwapEjaO2AUUgd0reeKeSLuqPCTcs +eVEIixWdK7Y36mKy6m/HG/oFoMWW5Bzbo4eye8YLuqPzILBPqN6KSx/b+GsU +zCIuw8h4kr1lpj66Xa3s6GvJAnPthmxLzVXolZxx98LWi1A9vm5uumUVeoQc +4lyvTQdfDb2e1n2r8cW5iPo7p9OAPezZvnOxARaEhYiqbUuBTSyJLQKFBmiy +5N21iddJoBJ55nidoSEuFdqsfc/jNKjtM3qi2GOI3kFN0vcWxcG+6gMxdwPW +4AIV2GSsGw1P8ts9x0SNkLaJMWceiYSJG/PT2veNcOXbLuQonAQPxZLF2VvW +Ylho3PUkveMwpnbe4M7oWjzqJenZGxgED4rmPk4mrMOJdesbGz0DYNdGkp1y +xtjEYzu5MfkwSB+Or9SqMUaqOnfPnqsHQHSJz+0tjmz0ZnsaR9zzhCLTsNDR +nWz8Zj4ibHTVE/TCkk3PO7NxZMn44J90T9g6Sr/tcmNjbZhm3I0gT4jrmJz1 +8GFjPcnbyFWeMFMYYRJ6io2vHxqZranwgJ51599cK2HjBoOx6Eu17nDgaNFl +yzI28meIW9+84w5TZff2/aDZ2FSu4lx/xR2EqK5p3Qo2NnKXbBKJcwdrflmZ +xzVsXNA4kqVj7Q6P2q95vnnLRs9hde+tnW5gtfyBZnAXG6fybFfPN7lBl/nz +KYleNhbql4xWPnSDiYeDCS4f2Oies1hxS64baBbo3Pr2nY2qz0wHv+1zg0c9 +G4KThthoEvby6jdH0p/IDtAeZeOaXR2K45Zu4BV/tDVoktT/7z1XphbpryYu +W3yGjQ7GdwWtGG4Q9euix8NfbPzJF+sfKuQGgquKNfb8YSOXaG3oXR43yD38 +cHJ+no1+vxaqzUy5wv8AYZcscQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06457773910254976}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7326,19 +7352,19 @@ HbLGog== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06457773910254976}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7352,232 +7378,112 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV13lUTd0bB/AolSHSPHc79zbPRYmu51E0ItGEpEmG0iRRNGimpJJUNMqQ +0j1EJNJAJeQtaaSI14s0aRb67d8fZ531WXvdffazz97ffa6Cu9/2fQu5uLj+ +kOv/96m+509ZiUXrK2Mqrgu+Zq9vz5UI2dAVBfxZCcKLnaQBRV+7S3SlQeC7 +RR+bHdUheNvNTu6uQnD1TagpdFwHK4fF02Y774DeSP75Q47W0P9oq99EZx34 +8agKVDvsBjPW9/djnW3gqS2po2TnDbOdhhdGOwdg7W4zgw7LE1Bver2otXAc +rp/+Jj8JSSDTX/nFXeMPXG/W/an/LB1EfPbe5DPlxoLbJcH00kuQpmtWtdWe +Hyui5wZP1eRDd6ZOzZigAO4v+HzXJPUKJBZFvF4ouRIt0jTqLFyugXj6p9Pn +c4TxwvMukf/e3oB4O8v1bVOi6Cgwu0Xk/U2QutsitXCBGBYeDBfa9O9NKBO2 +m9ZdKoadJrMX/IduQkebC50qL4Znto+/vf/nJrBsgyhbCzG84rVDnk+uBOq2 +5PH+kyWGVcs0+G/sKYE/ZpMtr4zFMTxjYPlQVwkcMSrY+zxKAmXnQn2cnpSC +Vf7yCeskCSx1SuWtflYKFN/JhJYLEvh9Ys2A3MtS+Kfd4fabGxLo2x/i3NZV +Clr+y7j7WiRQ0vXRNq6fpfD12rFrP6Ukcfb15nfHmLfAWWTrkHS5JK7Ic/nU +FnULNo78CvX9JIWfXzUuVNEvgxCLdLXaH1LYo3p+1YY1ZVBWoNkjPCWFv7zf +PrNnl4GEnatRJb80npuz5A0wL4MfD55Nc2tJY1EB92+/3WVwPiolKOu4NHY/ +57t+LqoMBkSVfJ8KyKB54uZs+1dlIO73RFZcXAY1+0wze1rLYHOT06uDDBk0 +2QsTuzrKoCI0UWOFvgxGm7o1bOkvgzP9o993OsmgaJRn+9xoGegVV+0fKZRB +09HqKyHCHDhlbOsmtUYW59jnb/2244CFS+5PQxNZnJS0kTHdyYHlkYPR9ptl +cdXXGKmYPRy4XB97LcVVFnsM2Q2T+zjwwOrhIO9pWRTbvvXjxWAOjDoxg8e7 +ZbH7sKtLZwYHXI5Onnl5Qg67/urHb3rDAcWLJjLfY+Xwucqbw30dHFL/uVt8 +KXJ4id0wFNDDgdDfqv+YFMmhxQ3zqoSPHLgQ7SJa+VIO32V5ZR4d4cDL1Ma8 +q7LyOHmf46K0iIa1ZVl3w5/IY/hMHP8vWRo2drb8GW6Sx+w9X047ytOwlYvH +fG+bPH6RXP3gDoMGj+2+3fCvPCpap8u4M2kwO6EQEbmIgR2HFZZeVaHBX37q +ygZ1BvJRR+9X6dEwWZ7SNKvNwIa8I4oT+jSEWqgP3V7FwC3zhzeqraYhNsDV +gFrPQCVun4xzhjRk1zc3LbRloED9hrT1xjQ83Z83VB/MwOxjZSpam2iw/G0k +dPIEA23/42vaYEZDS0q7wapIBsbwjsrsMKehu3JxZNFpBtoIX/nqa0nD8NIg +odjLDLxoqCOYuIUGCdrC0KyOgbkJfl/s7WnI2fhp998GBsrUqvNscqCB6g6L +rHjBwP7jSe90HWnQXFj+XOktA0UD0qp5dtJgYifrzPeVgVmFmrbnnGnwmRmL +bBJQQCcu1b+GHmQ+A7zEvggp4KP6A/3CnjTwf+8p4ZZQQEEVDZkh4qu99R3r +KQXslpO+edGLhr7qCxr3DBTQVPEl69VBGkoNl9S1rVNAvTyHkfOHyHzR4Y6j +qIA9WTqSTt40iBXuj1K3VsDk1GdJXT402MQadRXsVcAL9UYLHvrRIPf31uEn +ngqo2reg3dufhh/BFPf7g6T9xIol0gE0JBxYqiURRMZ3aWFhQCANNdbvo5MT +FNBCLP/cfBANekKntE/cVsCa38kduSE0cCVOPs2sUMArIh+klUPJfHMf2lVR +RX5v0/eylNh7cnvs2DMFtDIQCqJP0FDUxerd36OABi3NXzLDaAi0zfKP7Se+ +Np65LJwGbBbgvfJZAb3ajKrCiN9XTen0DSugw4zbdqcIUl9eU5wdN4VK++V6 +hyNp+CzOlgnkp/BTuJrc1lM03Em5ffucAIWvPAbf3iS2icp+1yxO4XTrwFXn +KFL/3PLArzIUloeYPblN/ONINB8vRWG3WqUNTzSpf5+P3gYNCo2Pa3QVEDv0 +fWh00aWQPePS+oOY5Wi/56QBhT4WPBtXx5D5sVifcB8pZBWuzKwmTq69I/t2 +E4WFFnToPLHzWuXyn1YU+s9odbNjaZhVF+zTtKcwXA6XlRNP5Uid0t9F4ZCE +/H9fiSdWKLKM9lLYEJDmKBNH1ue40aGNBynkakuZO0E8uG+jgJUvhfdCrHRu +EH/t3ErbHKHw+ZPJ363EA1UeU7vCSH+mMa5y8TT0a/pmuUZRmOmRPYPE7/KO +G3vFk/F+5lN3I+5eGd3vnUThWPz+mXDijuizUQGpFNZetHPLJn4zeVHxWAaF +XgOHvMqJ/9lf2HTyEoXOj8z4m4lfdZd6R+VTeHQ+xryPuNn6/vKEqxQeW1LP +GiVufFx7++xNChtrcvPniZ9qv7Q7z6Fw2ZmKqmUJNNQWdExn3qWw1bY4WJy4 +Wvhjdm4lherxYm3yxFWxg+yiagp3yuS2KBI/mJ78UFxPnhf3wUeV+N5BrhhO +E4Xcj8NvqRHf6V2ifO8VhcVGUqn/b+dsEW1+2EZh3bSdhBJx6RP5wzWdFAoH +tZoyiIt11QQb3pH+S/VEJIivXVlV/uIjhX/lZM4IEF8RBYfWLxTeb9a9xkWc +H2852zFIIaUlcXCM1JMzu+Pyu1Hyfs2D3vQTZ3u7wMAkhTzpg/++IL74/sDA +f78oXCHIKrhHnG5zJHZonkJTg6eLcohTa8NUxnmYeGg+UCSKOFk/4cXMYiZy +D3S+8iROvJrm+3c5Eydas/U2ESeI56zkEWEiEz1NmcRRc7cdV8gxMeF5mXcX +ef8Rhx/9EmEycd2q6BgO8cn+hhwpFSbureLZHEMcXN/7SVGPiVuWVn1TIj6y ++kucuiETu3+b1U6Q9ed/fVRV15iJ+bu1rGqIvRMX+RubMTFkpC5wG/GBPyuE +TayZWCv1QliU2MtPqsJ8GxOHcz8f6CTr3XWH9u/tu5hIveDVsye2k96ZcNCX +iYwY2LGa7B/bsx7qfkeY+HKO98Z/ZP9tnT/cEnSctIu6V1wktvgUJRIZxUQn +4ZyFY2T/GpeU5mdkMPHAomc+CWS/9zJK8jZdYqLs/TMq2sShGcW5E3lMNAzJ +HH5D8uH+qWuXtxcz8VhzzyVxYj2n/Mzlj5hYV6qfGE/ypvVV7sXHNUxMTPYv +liP2N83J8HnGxKkDlzrKT9JQppWd3tzCxCpzEdcukleqi9JT4j4ysfyxKC4h +edYUmnZu9Rcmxiiafkkl+ec1mpL8+TsTH4ZL5osTF/WeTTKZYGJ1EctW9jgN +jDvxCX95Wfj8Z0TlymCSX3tPRAZrsND4T6laHsnbe+0hEYq6LMwofryDn9jO +6nh4+2oWMkzUsv1IPqetPnpSD1i4vCH51BqS3wLL/I4P27Lw8seeF+Uk33kq +3f29jrGwTUmlZ9t+GsaErFwd6lgoeVTdSnU3DV0+1D+HGlmYNVkUtmkXyauG +XxDxkoVr66xS95LzKiW0RP5GBwuFhvycz5LzTGdgWf/sdxY+nYjNer2DBt/b +r/fkCCvijNh67xFrGr7b2O/+7KmIbbKu7oVraWgr1nwxc1AR+Z5qwUkjGh5y +864T8FPEr9Inxe3W0HD6foWUQYgi9tYJV/8h57mKvERP/FnSX3/L3BpdGvYP +9zipVyji2JTRvI0yyfMkV4dAPiWcn/vqwStEnv9dg9JZpoQOKqlYKUjDtPns +0JCgEr5+JBt0aAUNS7jTYg9KKaFba+9A4zIy/pD6u66aSni+/dG4Lx8NYfuU +hG12KGETFS3yfoYDYut/vFbPU0JfrdxLAc0csBw5ZvmvgTLqCO56bOHJARld +uTh+Y2Xctnjl+hxXDgwHPq1T36CMg9wB1sPOHEifEjQOtFbGdjNFkTh7DvT9 +Kdaa36uMuytMLySZcSBw2TthydPKKKJ6WWxamQPZqti3uVcZz7y9rrLtK/ke +9eA/cjdCBftTMpfG7C0j/yfEF8bXqaJE9A3rGN1bIPRKKZkeUcMjT3py8idL +QCaBs83AQAMdHnSNuJ+6CZnqRoLC+zVx92CW3RXBYmiW2rB6PFULeQ0NPlhn +XYe1MnUp2h3aOJ1pemJi5ios5y4McovSwapEjaO2AUUgd0reeKeSLuqPCTcs +eVEIixWdK7Y36mKy6m/HG/oFoMWW5Bzbo4eye8YLuqPzILBPqN6KSx/b+GsU +zCIuw8h4kr1lpj66Xa3s6GvJAnPthmxLzVXolZxx98LWi1A9vm5uumUVeoQc +4lyvTQdfDb2e1n2r8cW5iPo7p9OAPezZvnOxARaEhYiqbUuBTSyJLQKFBmiy +5N21iddJoBJ55nidoSEuFdqsfc/jNKjtM3qi2GOI3kFN0vcWxcG+6gMxdwPW +4AIV2GSsGw1P8ts9x0SNkLaJMWceiYSJG/PT2veNcOXbLuQonAQPxZLF2VvW +Ylho3PUkveMwpnbe4M7oWjzqJenZGxgED4rmPk4mrMOJdesbGz0DYNdGkp1y +xtjEYzu5MfkwSB+Or9SqMUaqOnfPnqsHQHSJz+0tjmz0ZnsaR9zzhCLTsNDR +nWz8Zj4ibHTVE/TCkk3PO7NxZMn44J90T9g6Sr/tcmNjbZhm3I0gT4jrmJz1 +8GFjPcnbyFWeMFMYYRJ6io2vHxqZranwgJ51599cK2HjBoOx6Eu17nDgaNFl +yzI28meIW9+84w5TZff2/aDZ2FSu4lx/xR2EqK5p3Qo2NnKXbBKJcwdrflmZ +xzVsXNA4kqVj7Q6P2q95vnnLRs9hde+tnW5gtfyBZnAXG6fybFfPN7lBl/nz +KYleNhbql4xWPnSDiYeDCS4f2Oies1hxS64baBbo3Pr2nY2qz0wHv+1zg0c9 +G4KThthoEvby6jdH0p/IDtAeZeOaXR2K45Zu4BV/tDVoktT/7z1XphbpryYu +W3yGjQ7GdwWtGG4Q9euix8NfbPzJF+sfKuQGgquKNfb8YSOXaG3oXR43yD38 +cHJ+no1+vxaqzUy5wv8AYZcscQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06457773910254976}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7588,6 +7494,7 @@ HbLGog== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7615,7 +7522,8 @@ HbLGog== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.12263499218727081`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06457773910254976}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7623,10 +7531,14 @@ HbLGog== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913218813523655`*^9}, - CellLabel->"Out[86]=",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] + CellChangeTimes->{3.9913218813523655`*^9, 3.994351197544799*^9, + 3.9943536007158422`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"1e466f42-acc5-4dae-ac56-e6650757a102"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7695,15 +7607,784 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003101"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.9942354198766413`*^9},ExpressionUUID->"d9d63445-4981-8f49-b88b-\ -9e93d345c648"], + 3.9942354198766413`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943511977943983`*^9, 3.994353600987585*^9}, + CellLabel-> + "Out[105]=",ExpressionUUID->"091a07e9-856e-4152-aa01-f3e347f65a37"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"39000a9e-1f94-0640-8925-\ -ec28b28907cc"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13lUTd0bB/AolSHSPHc79zbPRYmu51E0ItGEpEmG0iRRNGimpJJUNMqQ +0j1EJNJAJeQtaaSI14s0aRb67d8fZ531WXvdffazz97ffa6Cu9/2fQu5uLj+ +kOv/96m+509ZiUXrK2Mqrgu+Zq9vz5UI2dAVBfxZCcKLnaQBRV+7S3SlQeC7 +RR+bHdUheNvNTu6uQnD1TagpdFwHK4fF02Y774DeSP75Q47W0P9oq99EZx34 +8agKVDvsBjPW9/djnW3gqS2po2TnDbOdhhdGOwdg7W4zgw7LE1Bver2otXAc +rp/+Jj8JSSDTX/nFXeMPXG/W/an/LB1EfPbe5DPlxoLbJcH00kuQpmtWtdWe +Hyui5wZP1eRDd6ZOzZigAO4v+HzXJPUKJBZFvF4ouRIt0jTqLFyugXj6p9Pn +c4TxwvMukf/e3oB4O8v1bVOi6Cgwu0Xk/U2QutsitXCBGBYeDBfa9O9NKBO2 +m9ZdKoadJrMX/IduQkebC50qL4Znto+/vf/nJrBsgyhbCzG84rVDnk+uBOq2 +5PH+kyWGVcs0+G/sKYE/ZpMtr4zFMTxjYPlQVwkcMSrY+zxKAmXnQn2cnpSC +Vf7yCeskCSx1SuWtflYKFN/JhJYLEvh9Ys2A3MtS+Kfd4fabGxLo2x/i3NZV +Clr+y7j7WiRQ0vXRNq6fpfD12rFrP6Ukcfb15nfHmLfAWWTrkHS5JK7Ic/nU +FnULNo78CvX9JIWfXzUuVNEvgxCLdLXaH1LYo3p+1YY1ZVBWoNkjPCWFv7zf +PrNnl4GEnatRJb80npuz5A0wL4MfD55Nc2tJY1EB92+/3WVwPiolKOu4NHY/ +57t+LqoMBkSVfJ8KyKB54uZs+1dlIO73RFZcXAY1+0wze1rLYHOT06uDDBk0 +2QsTuzrKoCI0UWOFvgxGm7o1bOkvgzP9o993OsmgaJRn+9xoGegVV+0fKZRB +09HqKyHCHDhlbOsmtUYW59jnb/2244CFS+5PQxNZnJS0kTHdyYHlkYPR9ptl +cdXXGKmYPRy4XB97LcVVFnsM2Q2T+zjwwOrhIO9pWRTbvvXjxWAOjDoxg8e7 +ZbH7sKtLZwYHXI5Onnl5Qg67/urHb3rDAcWLJjLfY+Xwucqbw30dHFL/uVt8 +KXJ4id0wFNDDgdDfqv+YFMmhxQ3zqoSPHLgQ7SJa+VIO32V5ZR4d4cDL1Ma8 +q7LyOHmf46K0iIa1ZVl3w5/IY/hMHP8vWRo2drb8GW6Sx+w9X047ytOwlYvH +fG+bPH6RXP3gDoMGj+2+3fCvPCpap8u4M2kwO6EQEbmIgR2HFZZeVaHBX37q +ygZ1BvJRR+9X6dEwWZ7SNKvNwIa8I4oT+jSEWqgP3V7FwC3zhzeqraYhNsDV +gFrPQCVun4xzhjRk1zc3LbRloED9hrT1xjQ83Z83VB/MwOxjZSpam2iw/G0k +dPIEA23/42vaYEZDS0q7wapIBsbwjsrsMKehu3JxZNFpBtoIX/nqa0nD8NIg +odjLDLxoqCOYuIUGCdrC0KyOgbkJfl/s7WnI2fhp998GBsrUqvNscqCB6g6L +rHjBwP7jSe90HWnQXFj+XOktA0UD0qp5dtJgYifrzPeVgVmFmrbnnGnwmRmL +bBJQQCcu1b+GHmQ+A7zEvggp4KP6A/3CnjTwf+8p4ZZQQEEVDZkh4qu99R3r +KQXslpO+edGLhr7qCxr3DBTQVPEl69VBGkoNl9S1rVNAvTyHkfOHyHzR4Y6j +qIA9WTqSTt40iBXuj1K3VsDk1GdJXT402MQadRXsVcAL9UYLHvrRIPf31uEn +ngqo2reg3dufhh/BFPf7g6T9xIol0gE0JBxYqiURRMZ3aWFhQCANNdbvo5MT +FNBCLP/cfBANekKntE/cVsCa38kduSE0cCVOPs2sUMArIh+klUPJfHMf2lVR +RX5v0/eylNh7cnvs2DMFtDIQCqJP0FDUxerd36OABi3NXzLDaAi0zfKP7Se+ +Np65LJwGbBbgvfJZAb3ajKrCiN9XTen0DSugw4zbdqcIUl9eU5wdN4VK++V6 +hyNp+CzOlgnkp/BTuJrc1lM03Em5ffucAIWvPAbf3iS2icp+1yxO4XTrwFXn +KFL/3PLArzIUloeYPblN/ONINB8vRWG3WqUNTzSpf5+P3gYNCo2Pa3QVEDv0 +fWh00aWQPePS+oOY5Wi/56QBhT4WPBtXx5D5sVifcB8pZBWuzKwmTq69I/t2 +E4WFFnToPLHzWuXyn1YU+s9odbNjaZhVF+zTtKcwXA6XlRNP5Uid0t9F4ZCE +/H9fiSdWKLKM9lLYEJDmKBNH1ue40aGNBynkakuZO0E8uG+jgJUvhfdCrHRu +EH/t3ErbHKHw+ZPJ363EA1UeU7vCSH+mMa5y8TT0a/pmuUZRmOmRPYPE7/KO +G3vFk/F+5lN3I+5eGd3vnUThWPz+mXDijuizUQGpFNZetHPLJn4zeVHxWAaF +XgOHvMqJ/9lf2HTyEoXOj8z4m4lfdZd6R+VTeHQ+xryPuNn6/vKEqxQeW1LP +GiVufFx7++xNChtrcvPniZ9qv7Q7z6Fw2ZmKqmUJNNQWdExn3qWw1bY4WJy4 +Wvhjdm4lherxYm3yxFWxg+yiagp3yuS2KBI/mJ78UFxPnhf3wUeV+N5BrhhO +E4Xcj8NvqRHf6V2ifO8VhcVGUqn/b+dsEW1+2EZh3bSdhBJx6RP5wzWdFAoH +tZoyiIt11QQb3pH+S/VEJIivXVlV/uIjhX/lZM4IEF8RBYfWLxTeb9a9xkWc +H2852zFIIaUlcXCM1JMzu+Pyu1Hyfs2D3vQTZ3u7wMAkhTzpg/++IL74/sDA +f78oXCHIKrhHnG5zJHZonkJTg6eLcohTa8NUxnmYeGg+UCSKOFk/4cXMYiZy +D3S+8iROvJrm+3c5Eydas/U2ESeI56zkEWEiEz1NmcRRc7cdV8gxMeF5mXcX +ef8Rhx/9EmEycd2q6BgO8cn+hhwpFSbureLZHEMcXN/7SVGPiVuWVn1TIj6y ++kucuiETu3+b1U6Q9ed/fVRV15iJ+bu1rGqIvRMX+RubMTFkpC5wG/GBPyuE +TayZWCv1QliU2MtPqsJ8GxOHcz8f6CTr3XWH9u/tu5hIveDVsye2k96ZcNCX +iYwY2LGa7B/bsx7qfkeY+HKO98Z/ZP9tnT/cEnSctIu6V1wktvgUJRIZxUQn +4ZyFY2T/GpeU5mdkMPHAomc+CWS/9zJK8jZdYqLs/TMq2sShGcW5E3lMNAzJ +HH5D8uH+qWuXtxcz8VhzzyVxYj2n/Mzlj5hYV6qfGE/ypvVV7sXHNUxMTPYv +liP2N83J8HnGxKkDlzrKT9JQppWd3tzCxCpzEdcukleqi9JT4j4ysfyxKC4h +edYUmnZu9Rcmxiiafkkl+ec1mpL8+TsTH4ZL5osTF/WeTTKZYGJ1EctW9jgN +jDvxCX95Wfj8Z0TlymCSX3tPRAZrsND4T6laHsnbe+0hEYq6LMwofryDn9jO +6nh4+2oWMkzUsv1IPqetPnpSD1i4vCH51BqS3wLL/I4P27Lw8seeF+Uk33kq +3f29jrGwTUmlZ9t+GsaErFwd6lgoeVTdSnU3DV0+1D+HGlmYNVkUtmkXyauG +XxDxkoVr66xS95LzKiW0RP5GBwuFhvycz5LzTGdgWf/sdxY+nYjNer2DBt/b +r/fkCCvijNh67xFrGr7b2O/+7KmIbbKu7oVraWgr1nwxc1AR+Z5qwUkjGh5y +864T8FPEr9Inxe3W0HD6foWUQYgi9tYJV/8h57mKvERP/FnSX3/L3BpdGvYP +9zipVyji2JTRvI0yyfMkV4dAPiWcn/vqwStEnv9dg9JZpoQOKqlYKUjDtPns +0JCgEr5+JBt0aAUNS7jTYg9KKaFba+9A4zIy/pD6u66aSni+/dG4Lx8NYfuU +hG12KGETFS3yfoYDYut/vFbPU0JfrdxLAc0csBw5ZvmvgTLqCO56bOHJARld +uTh+Y2Xctnjl+hxXDgwHPq1T36CMg9wB1sPOHEifEjQOtFbGdjNFkTh7DvT9 +Kdaa36uMuytMLySZcSBw2TthydPKKKJ6WWxamQPZqti3uVcZz7y9rrLtK/ke +9eA/cjdCBftTMpfG7C0j/yfEF8bXqaJE9A3rGN1bIPRKKZkeUcMjT3py8idL +QCaBs83AQAMdHnSNuJ+6CZnqRoLC+zVx92CW3RXBYmiW2rB6PFULeQ0NPlhn +XYe1MnUp2h3aOJ1pemJi5ios5y4McovSwapEjaO2AUUgd0reeKeSLuqPCTcs +eVEIixWdK7Y36mKy6m/HG/oFoMWW5Bzbo4eye8YLuqPzILBPqN6KSx/b+GsU +zCIuw8h4kr1lpj66Xa3s6GvJAnPthmxLzVXolZxx98LWi1A9vm5uumUVeoQc +4lyvTQdfDb2e1n2r8cW5iPo7p9OAPezZvnOxARaEhYiqbUuBTSyJLQKFBmiy +5N21iddJoBJ55nidoSEuFdqsfc/jNKjtM3qi2GOI3kFN0vcWxcG+6gMxdwPW +4AIV2GSsGw1P8ts9x0SNkLaJMWceiYSJG/PT2veNcOXbLuQonAQPxZLF2VvW +Ylho3PUkveMwpnbe4M7oWjzqJenZGxgED4rmPk4mrMOJdesbGz0DYNdGkp1y +xtjEYzu5MfkwSB+Or9SqMUaqOnfPnqsHQHSJz+0tjmz0ZnsaR9zzhCLTsNDR +nWz8Zj4ibHTVE/TCkk3PO7NxZMn44J90T9g6Sr/tcmNjbZhm3I0gT4jrmJz1 +8GFjPcnbyFWeMFMYYRJ6io2vHxqZranwgJ51599cK2HjBoOx6Eu17nDgaNFl +yzI28meIW9+84w5TZff2/aDZ2FSu4lx/xR2EqK5p3Qo2NnKXbBKJcwdrflmZ +xzVsXNA4kqVj7Q6P2q95vnnLRs9hde+tnW5gtfyBZnAXG6fybFfPN7lBl/nz +KYleNhbql4xWPnSDiYeDCS4f2Oies1hxS64baBbo3Pr2nY2qz0wHv+1zg0c9 +G4KThthoEvby6jdH0p/IDtAeZeOaXR2K45Zu4BV/tDVoktT/7z1XphbpryYu +W3yGjQ7GdwWtGG4Q9euix8NfbPzJF+sfKuQGgquKNfb8YSOXaG3oXR43yD38 +cHJ+no1+vxaqzUy5wv8AYZcscQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13lUTd0bB/AolSHSPHc79zbPRYmu51E0ItGEpEmG0iRRNGimpJJUNMqQ +0j1EJNJAJeQtaaSI14s0aRb67d8fZ531WXvdffazz97ffa6Cu9/2fQu5uLj+ +kOv/96m+509ZiUXrK2Mqrgu+Zq9vz5UI2dAVBfxZCcKLnaQBRV+7S3SlQeC7 +RR+bHdUheNvNTu6uQnD1TagpdFwHK4fF02Y774DeSP75Q47W0P9oq99EZx34 +8agKVDvsBjPW9/djnW3gqS2po2TnDbOdhhdGOwdg7W4zgw7LE1Bver2otXAc +rp/+Jj8JSSDTX/nFXeMPXG/W/an/LB1EfPbe5DPlxoLbJcH00kuQpmtWtdWe +Hyui5wZP1eRDd6ZOzZigAO4v+HzXJPUKJBZFvF4ouRIt0jTqLFyugXj6p9Pn +c4TxwvMukf/e3oB4O8v1bVOi6Cgwu0Xk/U2QutsitXCBGBYeDBfa9O9NKBO2 +m9ZdKoadJrMX/IduQkebC50qL4Znto+/vf/nJrBsgyhbCzG84rVDnk+uBOq2 +5PH+kyWGVcs0+G/sKYE/ZpMtr4zFMTxjYPlQVwkcMSrY+zxKAmXnQn2cnpSC +Vf7yCeskCSx1SuWtflYKFN/JhJYLEvh9Ys2A3MtS+Kfd4fabGxLo2x/i3NZV +Clr+y7j7WiRQ0vXRNq6fpfD12rFrP6Ukcfb15nfHmLfAWWTrkHS5JK7Ic/nU +FnULNo78CvX9JIWfXzUuVNEvgxCLdLXaH1LYo3p+1YY1ZVBWoNkjPCWFv7zf +PrNnl4GEnatRJb80npuz5A0wL4MfD55Nc2tJY1EB92+/3WVwPiolKOu4NHY/ +57t+LqoMBkSVfJ8KyKB54uZs+1dlIO73RFZcXAY1+0wze1rLYHOT06uDDBk0 +2QsTuzrKoCI0UWOFvgxGm7o1bOkvgzP9o993OsmgaJRn+9xoGegVV+0fKZRB +09HqKyHCHDhlbOsmtUYW59jnb/2244CFS+5PQxNZnJS0kTHdyYHlkYPR9ptl +cdXXGKmYPRy4XB97LcVVFnsM2Q2T+zjwwOrhIO9pWRTbvvXjxWAOjDoxg8e7 +ZbH7sKtLZwYHXI5Onnl5Qg67/urHb3rDAcWLJjLfY+Xwucqbw30dHFL/uVt8 +KXJ4id0wFNDDgdDfqv+YFMmhxQ3zqoSPHLgQ7SJa+VIO32V5ZR4d4cDL1Ma8 +q7LyOHmf46K0iIa1ZVl3w5/IY/hMHP8vWRo2drb8GW6Sx+w9X047ytOwlYvH +fG+bPH6RXP3gDoMGj+2+3fCvPCpap8u4M2kwO6EQEbmIgR2HFZZeVaHBX37q +ygZ1BvJRR+9X6dEwWZ7SNKvNwIa8I4oT+jSEWqgP3V7FwC3zhzeqraYhNsDV +gFrPQCVun4xzhjRk1zc3LbRloED9hrT1xjQ83Z83VB/MwOxjZSpam2iw/G0k +dPIEA23/42vaYEZDS0q7wapIBsbwjsrsMKehu3JxZNFpBtoIX/nqa0nD8NIg +odjLDLxoqCOYuIUGCdrC0KyOgbkJfl/s7WnI2fhp998GBsrUqvNscqCB6g6L +rHjBwP7jSe90HWnQXFj+XOktA0UD0qp5dtJgYifrzPeVgVmFmrbnnGnwmRmL +bBJQQCcu1b+GHmQ+A7zEvggp4KP6A/3CnjTwf+8p4ZZQQEEVDZkh4qu99R3r +KQXslpO+edGLhr7qCxr3DBTQVPEl69VBGkoNl9S1rVNAvTyHkfOHyHzR4Y6j +qIA9WTqSTt40iBXuj1K3VsDk1GdJXT402MQadRXsVcAL9UYLHvrRIPf31uEn +ngqo2reg3dufhh/BFPf7g6T9xIol0gE0JBxYqiURRMZ3aWFhQCANNdbvo5MT +FNBCLP/cfBANekKntE/cVsCa38kduSE0cCVOPs2sUMArIh+klUPJfHMf2lVR +RX5v0/eylNh7cnvs2DMFtDIQCqJP0FDUxerd36OABi3NXzLDaAi0zfKP7Se+ +Np65LJwGbBbgvfJZAb3ajKrCiN9XTen0DSugw4zbdqcIUl9eU5wdN4VK++V6 +hyNp+CzOlgnkp/BTuJrc1lM03Em5ffucAIWvPAbf3iS2icp+1yxO4XTrwFXn +KFL/3PLArzIUloeYPblN/ONINB8vRWG3WqUNTzSpf5+P3gYNCo2Pa3QVEDv0 +fWh00aWQPePS+oOY5Wi/56QBhT4WPBtXx5D5sVifcB8pZBWuzKwmTq69I/t2 +E4WFFnToPLHzWuXyn1YU+s9odbNjaZhVF+zTtKcwXA6XlRNP5Uid0t9F4ZCE +/H9fiSdWKLKM9lLYEJDmKBNH1ue40aGNBynkakuZO0E8uG+jgJUvhfdCrHRu +EH/t3ErbHKHw+ZPJ363EA1UeU7vCSH+mMa5y8TT0a/pmuUZRmOmRPYPE7/KO +G3vFk/F+5lN3I+5eGd3vnUThWPz+mXDijuizUQGpFNZetHPLJn4zeVHxWAaF +XgOHvMqJ/9lf2HTyEoXOj8z4m4lfdZd6R+VTeHQ+xryPuNn6/vKEqxQeW1LP +GiVufFx7++xNChtrcvPniZ9qv7Q7z6Fw2ZmKqmUJNNQWdExn3qWw1bY4WJy4 +Wvhjdm4lherxYm3yxFWxg+yiagp3yuS2KBI/mJ78UFxPnhf3wUeV+N5BrhhO +E4Xcj8NvqRHf6V2ifO8VhcVGUqn/b+dsEW1+2EZh3bSdhBJx6RP5wzWdFAoH +tZoyiIt11QQb3pH+S/VEJIivXVlV/uIjhX/lZM4IEF8RBYfWLxTeb9a9xkWc +H2852zFIIaUlcXCM1JMzu+Pyu1Hyfs2D3vQTZ3u7wMAkhTzpg/++IL74/sDA +f78oXCHIKrhHnG5zJHZonkJTg6eLcohTa8NUxnmYeGg+UCSKOFk/4cXMYiZy +D3S+8iROvJrm+3c5Eydas/U2ESeI56zkEWEiEz1NmcRRc7cdV8gxMeF5mXcX +ef8Rhx/9EmEycd2q6BgO8cn+hhwpFSbureLZHEMcXN/7SVGPiVuWVn1TIj6y ++kucuiETu3+b1U6Q9ed/fVRV15iJ+bu1rGqIvRMX+RubMTFkpC5wG/GBPyuE +TayZWCv1QliU2MtPqsJ8GxOHcz8f6CTr3XWH9u/tu5hIveDVsye2k96ZcNCX +iYwY2LGa7B/bsx7qfkeY+HKO98Z/ZP9tnT/cEnSctIu6V1wktvgUJRIZxUQn +4ZyFY2T/GpeU5mdkMPHAomc+CWS/9zJK8jZdYqLs/TMq2sShGcW5E3lMNAzJ +HH5D8uH+qWuXtxcz8VhzzyVxYj2n/Mzlj5hYV6qfGE/ypvVV7sXHNUxMTPYv +liP2N83J8HnGxKkDlzrKT9JQppWd3tzCxCpzEdcukleqi9JT4j4ysfyxKC4h +edYUmnZu9Rcmxiiafkkl+ec1mpL8+TsTH4ZL5osTF/WeTTKZYGJ1EctW9jgN +jDvxCX95Wfj8Z0TlymCSX3tPRAZrsND4T6laHsnbe+0hEYq6LMwofryDn9jO +6nh4+2oWMkzUsv1IPqetPnpSD1i4vCH51BqS3wLL/I4P27Lw8seeF+Uk33kq +3f29jrGwTUmlZ9t+GsaErFwd6lgoeVTdSnU3DV0+1D+HGlmYNVkUtmkXyauG +XxDxkoVr66xS95LzKiW0RP5GBwuFhvycz5LzTGdgWf/sdxY+nYjNer2DBt/b +r/fkCCvijNh67xFrGr7b2O/+7KmIbbKu7oVraWgr1nwxc1AR+Z5qwUkjGh5y +864T8FPEr9Inxe3W0HD6foWUQYgi9tYJV/8h57mKvERP/FnSX3/L3BpdGvYP +9zipVyji2JTRvI0yyfMkV4dAPiWcn/vqwStEnv9dg9JZpoQOKqlYKUjDtPns +0JCgEr5+JBt0aAUNS7jTYg9KKaFba+9A4zIy/pD6u66aSni+/dG4Lx8NYfuU +hG12KGETFS3yfoYDYut/vFbPU0JfrdxLAc0csBw5ZvmvgTLqCO56bOHJARld +uTh+Y2Xctnjl+hxXDgwHPq1T36CMg9wB1sPOHEifEjQOtFbGdjNFkTh7DvT9 +Kdaa36uMuytMLySZcSBw2TthydPKKKJ6WWxamQPZqti3uVcZz7y9rrLtK/ke +9eA/cjdCBftTMpfG7C0j/yfEF8bXqaJE9A3rGN1bIPRKKZkeUcMjT3py8idL +QCaBs83AQAMdHnSNuJ+6CZnqRoLC+zVx92CW3RXBYmiW2rB6PFULeQ0NPlhn +XYe1MnUp2h3aOJ1pemJi5ios5y4McovSwapEjaO2AUUgd0reeKeSLuqPCTcs +eVEIixWdK7Y36mKy6m/HG/oFoMWW5Bzbo4eye8YLuqPzILBPqN6KSx/b+GsU +zCIuw8h4kr1lpj66Xa3s6GvJAnPthmxLzVXolZxx98LWi1A9vm5uumUVeoQc +4lyvTQdfDb2e1n2r8cW5iPo7p9OAPezZvnOxARaEhYiqbUuBTSyJLQKFBmiy +5N21iddJoBJ55nidoSEuFdqsfc/jNKjtM3qi2GOI3kFN0vcWxcG+6gMxdwPW +4AIV2GSsGw1P8ts9x0SNkLaJMWceiYSJG/PT2veNcOXbLuQonAQPxZLF2VvW +Ylho3PUkveMwpnbe4M7oWjzqJenZGxgED4rmPk4mrMOJdesbGz0DYNdGkp1y +xtjEYzu5MfkwSB+Or9SqMUaqOnfPnqsHQHSJz+0tjmz0ZnsaR9zzhCLTsNDR +nWz8Zj4ibHTVE/TCkk3PO7NxZMn44J90T9g6Sr/tcmNjbZhm3I0gT4jrmJz1 +8GFjPcnbyFWeMFMYYRJ6io2vHxqZranwgJ51599cK2HjBoOx6Eu17nDgaNFl +yzI28meIW9+84w5TZff2/aDZ2FSu4lx/xR2EqK5p3Qo2NnKXbBKJcwdrflmZ +xzVsXNA4kqVj7Q6P2q95vnnLRs9hde+tnW5gtfyBZnAXG6fybFfPN7lBl/nz +KYleNhbql4xWPnSDiYeDCS4f2Oies1hxS64baBbo3Pr2nY2qz0wHv+1zg0c9 +G4KThthoEvby6jdH0p/IDtAeZeOaXR2K45Zu4BV/tDVoktT/7z1XphbpryYu +W3yGjQ7GdwWtGG4Q9euix8NfbPzJF+sfKuQGgquKNfb8YSOXaG3oXR43yD38 +cHJ+no1+vxaqzUy5wv8AYZcscQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06457773910254976}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06457773910254976}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13lUTd0bB/AolSHSPHc79zbPRYmu51E0ItGEpEmG0iRRNGimpJJUNMqQ +0j1EJNJAJeQtaaSI14s0aRb67d8fZ531WXvdffazz97ffa6Cu9/2fQu5uLj+ +kOv/96m+509ZiUXrK2Mqrgu+Zq9vz5UI2dAVBfxZCcKLnaQBRV+7S3SlQeC7 +RR+bHdUheNvNTu6uQnD1TagpdFwHK4fF02Y774DeSP75Q47W0P9oq99EZx34 +8agKVDvsBjPW9/djnW3gqS2po2TnDbOdhhdGOwdg7W4zgw7LE1Bver2otXAc +rp/+Jj8JSSDTX/nFXeMPXG/W/an/LB1EfPbe5DPlxoLbJcH00kuQpmtWtdWe +Hyui5wZP1eRDd6ZOzZigAO4v+HzXJPUKJBZFvF4ouRIt0jTqLFyugXj6p9Pn +c4TxwvMukf/e3oB4O8v1bVOi6Cgwu0Xk/U2QutsitXCBGBYeDBfa9O9NKBO2 +m9ZdKoadJrMX/IduQkebC50qL4Znto+/vf/nJrBsgyhbCzG84rVDnk+uBOq2 +5PH+kyWGVcs0+G/sKYE/ZpMtr4zFMTxjYPlQVwkcMSrY+zxKAmXnQn2cnpSC +Vf7yCeskCSx1SuWtflYKFN/JhJYLEvh9Ys2A3MtS+Kfd4fabGxLo2x/i3NZV +Clr+y7j7WiRQ0vXRNq6fpfD12rFrP6Ukcfb15nfHmLfAWWTrkHS5JK7Ic/nU +FnULNo78CvX9JIWfXzUuVNEvgxCLdLXaH1LYo3p+1YY1ZVBWoNkjPCWFv7zf +PrNnl4GEnatRJb80npuz5A0wL4MfD55Nc2tJY1EB92+/3WVwPiolKOu4NHY/ +57t+LqoMBkSVfJ8KyKB54uZs+1dlIO73RFZcXAY1+0wze1rLYHOT06uDDBk0 +2QsTuzrKoCI0UWOFvgxGm7o1bOkvgzP9o993OsmgaJRn+9xoGegVV+0fKZRB +09HqKyHCHDhlbOsmtUYW59jnb/2244CFS+5PQxNZnJS0kTHdyYHlkYPR9ptl +cdXXGKmYPRy4XB97LcVVFnsM2Q2T+zjwwOrhIO9pWRTbvvXjxWAOjDoxg8e7 +ZbH7sKtLZwYHXI5Onnl5Qg67/urHb3rDAcWLJjLfY+Xwucqbw30dHFL/uVt8 +KXJ4id0wFNDDgdDfqv+YFMmhxQ3zqoSPHLgQ7SJa+VIO32V5ZR4d4cDL1Ma8 +q7LyOHmf46K0iIa1ZVl3w5/IY/hMHP8vWRo2drb8GW6Sx+w9X047ytOwlYvH +fG+bPH6RXP3gDoMGj+2+3fCvPCpap8u4M2kwO6EQEbmIgR2HFZZeVaHBX37q +ygZ1BvJRR+9X6dEwWZ7SNKvNwIa8I4oT+jSEWqgP3V7FwC3zhzeqraYhNsDV +gFrPQCVun4xzhjRk1zc3LbRloED9hrT1xjQ83Z83VB/MwOxjZSpam2iw/G0k +dPIEA23/42vaYEZDS0q7wapIBsbwjsrsMKehu3JxZNFpBtoIX/nqa0nD8NIg +odjLDLxoqCOYuIUGCdrC0KyOgbkJfl/s7WnI2fhp998GBsrUqvNscqCB6g6L +rHjBwP7jSe90HWnQXFj+XOktA0UD0qp5dtJgYifrzPeVgVmFmrbnnGnwmRmL +bBJQQCcu1b+GHmQ+A7zEvggp4KP6A/3CnjTwf+8p4ZZQQEEVDZkh4qu99R3r +KQXslpO+edGLhr7qCxr3DBTQVPEl69VBGkoNl9S1rVNAvTyHkfOHyHzR4Y6j +qIA9WTqSTt40iBXuj1K3VsDk1GdJXT402MQadRXsVcAL9UYLHvrRIPf31uEn +ngqo2reg3dufhh/BFPf7g6T9xIol0gE0JBxYqiURRMZ3aWFhQCANNdbvo5MT +FNBCLP/cfBANekKntE/cVsCa38kduSE0cCVOPs2sUMArIh+klUPJfHMf2lVR +RX5v0/eylNh7cnvs2DMFtDIQCqJP0FDUxerd36OABi3NXzLDaAi0zfKP7Se+ +Np65LJwGbBbgvfJZAb3ajKrCiN9XTen0DSugw4zbdqcIUl9eU5wdN4VK++V6 +hyNp+CzOlgnkp/BTuJrc1lM03Em5ffucAIWvPAbf3iS2icp+1yxO4XTrwFXn +KFL/3PLArzIUloeYPblN/ONINB8vRWG3WqUNTzSpf5+P3gYNCo2Pa3QVEDv0 +fWh00aWQPePS+oOY5Wi/56QBhT4WPBtXx5D5sVifcB8pZBWuzKwmTq69I/t2 +E4WFFnToPLHzWuXyn1YU+s9odbNjaZhVF+zTtKcwXA6XlRNP5Uid0t9F4ZCE +/H9fiSdWKLKM9lLYEJDmKBNH1ue40aGNBynkakuZO0E8uG+jgJUvhfdCrHRu +EH/t3ErbHKHw+ZPJ363EA1UeU7vCSH+mMa5y8TT0a/pmuUZRmOmRPYPE7/KO +G3vFk/F+5lN3I+5eGd3vnUThWPz+mXDijuizUQGpFNZetHPLJn4zeVHxWAaF +XgOHvMqJ/9lf2HTyEoXOj8z4m4lfdZd6R+VTeHQ+xryPuNn6/vKEqxQeW1LP +GiVufFx7++xNChtrcvPniZ9qv7Q7z6Fw2ZmKqmUJNNQWdExn3qWw1bY4WJy4 +Wvhjdm4lherxYm3yxFWxg+yiagp3yuS2KBI/mJ78UFxPnhf3wUeV+N5BrhhO +E4Xcj8NvqRHf6V2ifO8VhcVGUqn/b+dsEW1+2EZh3bSdhBJx6RP5wzWdFAoH +tZoyiIt11QQb3pH+S/VEJIivXVlV/uIjhX/lZM4IEF8RBYfWLxTeb9a9xkWc +H2852zFIIaUlcXCM1JMzu+Pyu1Hyfs2D3vQTZ3u7wMAkhTzpg/++IL74/sDA +f78oXCHIKrhHnG5zJHZonkJTg6eLcohTa8NUxnmYeGg+UCSKOFk/4cXMYiZy +D3S+8iROvJrm+3c5Eydas/U2ESeI56zkEWEiEz1NmcRRc7cdV8gxMeF5mXcX +ef8Rhx/9EmEycd2q6BgO8cn+hhwpFSbureLZHEMcXN/7SVGPiVuWVn1TIj6y ++kucuiETu3+b1U6Q9ed/fVRV15iJ+bu1rGqIvRMX+RubMTFkpC5wG/GBPyuE +TayZWCv1QliU2MtPqsJ8GxOHcz8f6CTr3XWH9u/tu5hIveDVsye2k96ZcNCX +iYwY2LGa7B/bsx7qfkeY+HKO98Z/ZP9tnT/cEnSctIu6V1wktvgUJRIZxUQn +4ZyFY2T/GpeU5mdkMPHAomc+CWS/9zJK8jZdYqLs/TMq2sShGcW5E3lMNAzJ +HH5D8uH+qWuXtxcz8VhzzyVxYj2n/Mzlj5hYV6qfGE/ypvVV7sXHNUxMTPYv +liP2N83J8HnGxKkDlzrKT9JQppWd3tzCxCpzEdcukleqi9JT4j4ysfyxKC4h +edYUmnZu9Rcmxiiafkkl+ec1mpL8+TsTH4ZL5osTF/WeTTKZYGJ1EctW9jgN +jDvxCX95Wfj8Z0TlymCSX3tPRAZrsND4T6laHsnbe+0hEYq6LMwofryDn9jO +6nh4+2oWMkzUsv1IPqetPnpSD1i4vCH51BqS3wLL/I4P27Lw8seeF+Uk33kq +3f29jrGwTUmlZ9t+GsaErFwd6lgoeVTdSnU3DV0+1D+HGlmYNVkUtmkXyauG +XxDxkoVr66xS95LzKiW0RP5GBwuFhvycz5LzTGdgWf/sdxY+nYjNer2DBt/b +r/fkCCvijNh67xFrGr7b2O/+7KmIbbKu7oVraWgr1nwxc1AR+Z5qwUkjGh5y +864T8FPEr9Inxe3W0HD6foWUQYgi9tYJV/8h57mKvERP/FnSX3/L3BpdGvYP +9zipVyji2JTRvI0yyfMkV4dAPiWcn/vqwStEnv9dg9JZpoQOKqlYKUjDtPns +0JCgEr5+JBt0aAUNS7jTYg9KKaFba+9A4zIy/pD6u66aSni+/dG4Lx8NYfuU +hG12KGETFS3yfoYDYut/vFbPU0JfrdxLAc0csBw5ZvmvgTLqCO56bOHJARld +uTh+Y2Xctnjl+hxXDgwHPq1T36CMg9wB1sPOHEifEjQOtFbGdjNFkTh7DvT9 +Kdaa36uMuytMLySZcSBw2TthydPKKKJ6WWxamQPZqti3uVcZz7y9rrLtK/ke +9eA/cjdCBftTMpfG7C0j/yfEF8bXqaJE9A3rGN1bIPRKKZkeUcMjT3py8idL +QCaBs83AQAMdHnSNuJ+6CZnqRoLC+zVx92CW3RXBYmiW2rB6PFULeQ0NPlhn +XYe1MnUp2h3aOJ1pemJi5ios5y4McovSwapEjaO2AUUgd0reeKeSLuqPCTcs +eVEIixWdK7Y36mKy6m/HG/oFoMWW5Bzbo4eye8YLuqPzILBPqN6KSx/b+GsU +zCIuw8h4kr1lpj66Xa3s6GvJAnPthmxLzVXolZxx98LWi1A9vm5uumUVeoQc +4lyvTQdfDb2e1n2r8cW5iPo7p9OAPezZvnOxARaEhYiqbUuBTSyJLQKFBmiy +5N21iddJoBJ55nidoSEuFdqsfc/jNKjtM3qi2GOI3kFN0vcWxcG+6gMxdwPW +4AIV2GSsGw1P8ts9x0SNkLaJMWceiYSJG/PT2veNcOXbLuQonAQPxZLF2VvW +Ylho3PUkveMwpnbe4M7oWjzqJenZGxgED4rmPk4mrMOJdesbGz0DYNdGkp1y +xtjEYzu5MfkwSB+Or9SqMUaqOnfPnqsHQHSJz+0tjmz0ZnsaR9zzhCLTsNDR +nWz8Zj4ibHTVE/TCkk3PO7NxZMn44J90T9g6Sr/tcmNjbZhm3I0gT4jrmJz1 +8GFjPcnbyFWeMFMYYRJ6io2vHxqZranwgJ51599cK2HjBoOx6Eu17nDgaNFl +yzI28meIW9+84w5TZff2/aDZ2FSu4lx/xR2EqK5p3Qo2NnKXbBKJcwdrflmZ +xzVsXNA4kqVj7Q6P2q95vnnLRs9hde+tnW5gtfyBZnAXG6fybFfPN7lBl/nz +KYleNhbql4xWPnSDiYeDCS4f2Oies1hxS64baBbo3Pr2nY2qz0wHv+1zg0c9 +G4KThthoEvby6jdH0p/IDtAeZeOaXR2K45Zu4BV/tDVoktT/7z1XphbpryYu +W3yGjQ7GdwWtGG4Q9euix8NfbPzJF+sfKuQGgquKNfb8YSOXaG3oXR43yD38 +cHJ+no1+vxaqzUy5wv8AYZcscQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06457773910254976}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06457773910254976}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943511978359632`*^9, 3.994353601028591*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"301a136c-4b1e-4145-a15d-69baa19b79b0"] +}, Open ]], Cell[CellGroupData[{ @@ -7712,12 +8393,15 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.99179966106703*^9},ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], + CellChangeTimes->{3.99179966106703*^9}, + CellLabel-> + "In[107]:=",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[BoxData["11.27534350842078`"], "Output", - CellChangeTimes->{3.9913229040054893`*^9}, - CellLabel->"Out[88]=",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[BoxData["11.584531015687302`"], "Output", + CellChangeTimes->{3.9913229040054893`*^9, 3.9943511978860703`*^9, + 3.99435360107236*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"48bcffd1-69e5-4aff-bad7-30caa8bcbcf5"] }, Open ]], Cell[CellGroupData[{ @@ -7773,158 +8457,163 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991799666995865*^9},ExpressionUUID->"7116d4f3-8ab8-b741-8264-\ -0a5eeac170a0"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 17, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042538757`*^9}, + CellChangeTimes->{3.991799666995865*^9}, CellLabel-> - "During evaluation of \ -In[89]:=",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], + "In[108]:=",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.174310069630281`*^-261\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 18, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042728806`*^9}, + 2, 108, 13, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994351198019972*^9, + 3.9943536012110357`*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], +In[108]:=",ExpressionUUID->"a6516d2b-1c5c-4903-8ae0-72446eb2ad2e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.137765660473369`*^-271\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 89, 19, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042938766`*^9}, +\"", 2, 108, 14, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994351198019972*^9, + 3.994353601221294*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], +In[108]:=",ExpressionUUID->"73ce3702-6419-4abe-a9d8-b9b24b5f8c8d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.60500069326141`*^-280\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 108, 15, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994351198019972*^9, + 3.9943536012319937`*^9}, + CellLabel-> + "During evaluation of \ +In[108]:=",ExpressionUUID->"1b4451ee-a737-45e8-b074-05ca2fa145a6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 89, 20, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229043127804`*^9}, +during this calculation.\"", 2, 108, 16, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994351198019972*^9, + 3.994353601240082*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], +In[108]:=",ExpressionUUID->"9e8bb89d-d60e-4678-97b2-5409f8e344c9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4Fe0bB3AvZUsS4ZDtzDmokCyROO5baUGJLEXZCYlKJUnZEhVSiiiU +LMlyBlGkyK4iLa+t4k27JJK14vf8/phrrs81M9c8c8/9fJ8Zpvv+7V68PDw8 +c2T7/36ir7WBfS7bWMQq2cay2dj4VQbjmEl3JLTf+edWjaEcoOQzd0b3RWir +dXAIM1SHIKvbXXzdWdDyfuqCnaERLB6WvjjdVQrFPu4rZQ23QH+15f5fXXVw +bU1/mPva3bCRPfh2tOsFlKZ09Gfo74PpLv3LI10DICcaEH1dPRTq1+dlP88a +A6nYUDv28niQ66/85K7+FyKONog8C7gMS/a53BZYz4eR+YqKmz9ehYtaG+9b +2gmi+paIM0dNb0DPlVW1o2ILcfaTdt1N1Ww4lx32jFdmMQo/791TNC8PpC+9 +P5OULoFjDVoTxTH5EGNrZvxiQhJ3St9i+l8uANk77bK8/0jhuKNeekl6ARRL +2E5qLZDCtYr1cSM5BdD5wpm+oCiFfLG/650qCoBtfZiy3iyFzmUbg8c7C6Bu +ayZ/R6oU/m41Xy4jXQh/N463txlJY5XG4mS1pEI4ZHDDpTWSgeUXZEatQ4rA +/LroL4s4Boo75J29F14ElEBobPtlBk48d1WWjSmCjlf2JS9vMdAjt2R3e1IR +rDwgwtfXzsDAwEvNM4VF8CX3aO5PWRnsumlo4NFXBLuXWH5fWiaDZ5d1qh3g +FIPO8fsRGdUymLNpiYHe+mIQHlgmxWySwZaOaaPJzcVQyeUDlR4Z9NBtVt1r +WwxSFpWJq+ZksLFJJErCrxg6Iti6GyxkMdu3g3k4pRhMf8yEBLyXxWvCIa/8 +horh2OZLKx4NyeIG3rLwoNFiKL6h0SsxIYuJo3+sQieKgWHralApuBRl9COd +jvFwYehe4yTfyqXIy21jGyzhQlJk4uHU4KVY07jD89laLgxIqgQ0LJTD6iVV +efanuCC9v0ZeWloOC362tjXGcmFLy842XyU5XMIxZKyK50JFyDn1RTpyKBaS +ITtxmQtn+0cGHXbKYXSAdvemPC5o59/3/pElh7/2D1jxtnIhwsjaTXaNPN7U +W6a8dx4Nm50zfuqvk8fWKK3bJ/hpEA3/FmW3RR4PUZvsEwRpuFYfnZvoKo+6 +I7rsPBEa7plXfeM/I4/efSlXK5bQMLKTFTTWI49psmKKW9k0OB8ZP/v0uAKu +TvjW5WBCg3LKOrnBaAWc8FdPE19Pk+c/XySQqIBCjqNnWkxpCPmzvGNdtgK2 +tC8YU9tMw+UoZ8nKpwrIONz+s8OShqcXmjNz5BXxtknQx6RdNKwtTr1zskYR +z8945s0F0mDa1f53uEURzbyScNNhGix55m1yeaGIayQk/eOO0OCxPaAHPipi +f9zqiEXBNGw8zgwLn6+Er6R4M6ZCaTigOHHTRE0Jhc44DdmfpmG8LLFlWlMJ +05aI9R2NIePbrPa9RFcJP1d/8E6OpSH6oKseZayEByoMNzw9S0Na/eMWXmsl +bE4t1Vx6noYG78zv9UFKmMdVFt2YQoPZHwPx0ONKOLYtJB+v0NCe+EpPN1wJ +txtZDqxJpaGnUig8+4wSVrv2aVBXaRhecFg8+poSFr3P1evOoIFBb9bfWKeE +pj9eur7IoSHd9P2u2SYlbNQrncvNpYHqORFe8UQJdS5PmhzLo0GDt6xV5V9y +vYJpqVQ+Dets5XcLfFHCHcE9W1YX0rBvajS8ZSETmbU29f+Uknoe3CP1SZyJ +Kx5MOtcQCw72FvAxmJjn8twwpIyGnNf1ncYUE611zO5/vkND38PL6uV6TLQp +9/vvxl0aCvWF614YMtEtrvuS2T1SL/rkjhFkYnzwq4RhYqks70g1Cya2h5fZ +raqiYVu0QfcNFyaujXpsnFRNg8JskX+NJxPXOHhrKj8g/RFE8b31ZWK4gMze +O8SxPgtWMg4zsfKJcO3jhzTUWryNSohlouVE6GxnLQ0JDdYyhfFMXP9UzMrm +EQ27OU3FrReZ6Ny8d+Qp8fRKbs+8dCbyXupUvFdHg7Z4hObxEia6nA82D2ig +gefceMOVCiYe/cxi/UvczrfXseI+E+cFHNxm0EiD3/j26NFGJvIk+OdME68N +aJZd9ISJsyK7OuyaSL0+G9LqHUysOuVjzSXO7ma/9u5l4jtLn52OzTQEWqce +iO5nov7djP4CYny8kP/mByauW3+iZob47f2JVX3DTAyeX3cusYXUK7PltC0f +hZMlwT7XWmn4IM2RCxSkcJ7eTFM3cWliScn5hRSe/LY9SvwxqWdk2pvH0hQe +C9JgnCRW+C0a+EWOwpEs3p9c4qFDUQL8FIUTRXbq/cSxXvu0TdQptP1KNa5+ +QoN933/NzloUuvmNs52I2TvsnEL1KIwLmPgcQfzzWevPVEMKs3NfimYT1242 +jr2LFBZ4GqbVEyc8KpX/dwOFR5LfnP2PePda1bKf5hSym/a8myFeUXZ1s5gV +hV0yZzPEn5L3oSbWp2FH4VKbyTpV4ol02QgdRwoTrcNnDYh/LVJmG7hQOPep +usqMeDRCs9nYk8IHvPZT9sTDYwZ7TX0pHKLG77oRf/MyXWgeQOFqW9MZX+Iv +XZb0tkMUGmsN1+wn/mjmYGMXTKHnQLrQIeKB+x4Tjico1JWf6/q/+zUCUl0j +KVRmP1QLJH6TGWy0J4ZCqilmfgBxz+Kofr84Cpc7C+3xJu6Mio88eIHCNy9G +tjoTvxxPUT6aTKF68tCD7cQd3lktoVcpHMguqDAlbusp9Iu8TqHJ6bdrdIkf +W9wVjc2hMMtCewOTuPnBo5L42xTOnnd8s4C4QfOpbRKXwvSjAnNjpH6PbnRO +XrlDYQ53sKiH+KHEu7SMSvI+/Cu+VhPfj/7GyX5IocV++bJ04nuT4//l11P4 +cfqFcChx6Wth1fI2Cv/xmPbWIuZulXxc9YLC1oCXAYLEhTWK/rVdpB5O7fxv +SX/k3tQte/KOQoO/s0P/76ebkmD//BOFikJZRluIr8eYTXd+o9C/AJWkidP8 +nGFgnMJyKevcHNKfKW99Bj7PUDjjoGvuS3xp26Ho73PkfNWJUyuIE3Rin0wJ +sdDj599HOaTfz+VcDJgVZSF1orLRhThWOn3xvCUsvF1g7CFNHPm7ZMciBRYG +pSYHhJH5EuZfPbOExcIH3wbeahKH9jelyy5jIY/A0Ne3ZP4F1b9+r6zNwvX6 +Gq+1if3OzT9gtJGFsYds9GvJ/Pb5u0hinQULjU7vveFEvGe/bMUmKxbaeRkV +T9XT4Gqj+We7Iws/PmaUqRLbLnWI9Q1gYedHwTBfkidGBYXXk5NZqD0w8ySU +5NNrpYLMDVdZaHUh9fdfkmchyfkZvzJZWH4oWPUE8d2I3Gvb81mYc+tU0JH7 +JH92Xr8iWs3Cpu+P+SwraVg+/1Li6XcsvIttfpkkX1tCLp5f/Ync/11dIQ/x +npHEhA+DLHziveOXC8nj7Nfxcet+sVDkCE8ag+S1UmlM7Cw/G7cvemMdyCX5 +4XI8PEidjSmd4kItJP/LXx0LU9Zio4lBI58wsa158MlXq9moPt2yyPwWDRdX +HwnVBjY6a4Q6N5D1ZKHI/uBhaza6v8j7euMmDfMq3Q/sOUqOmzda/ZNO5qO4 +uat9HRtD3sqDfQIN3fuojr3NbDx9YyxwYzzJh6YZCHvKxi8dy4/rxtGQGFKg +eKuTjTVmziLCZL1cNSDSPz3IxmSzOIur0TQElDxzSpdQxjdfbRbsIOvx4Da7 +XR88lbGquFdyrQ8NL/I1nkz5KiN42d34tIeGKj5+w4X7lbHtp4TiBS8aztyt +kNU7poy1fprj/e40LFNk9MbEK2OPabmKlxMN3sO9O9UqyPkf84NEt5M8jXO1 +DxRQwcTMZSnvDcj9B9WpVSIq+Frhyxq/NTRMbpr+/l1MBbMXVKqN6tEgzHcx +2ldWBUuftQhM6ZDxH6u/46qhgj5bjOlRDRpOeKlIbLNRwYtD4sGXmaT+xkPP +1DJV0Lc/LDVbgKz/P46afdRTxaKDK2oVMrggp6VwWtBIFY+UR4dJpHFhOLCh +Ts1EFZdmuzbPS+bCpQkxo0ALVSzP0Jx+Q77v+v7mr5xzUUV+xxCm5wkuBIq8 +kZA5o4qZHrw+z3ZxIW059m15rYp/4o6OL5Mi35cegofuhC1DRtSCpe4RxeR/ +Q5o3pm45ChRIK6sbFYF4m0oC/WMFCg5fZrh9KwC5WK6Vnp466oy966l2uw1X +1AzEJLw1MFMsruFs3y14LGuyeuzCSvwoaPmtwz4P1srVJWp2auLNqxbiL3Nz +QJQv67Bb5CrkSwk5cFc8GxQiFI0cVLSwx/KOjp1bFggp767Y3qyFqnz7rE8+ +ug4rOTLco07aGK9yRkPoUgYE9onXm/PoYMJ0ktOxmKvwYyzOzuyKDk4rDSw9 +9/IKbNJsSjPT0MWh+n4DNZtkeDhm+HuyXRdbPJ1On2pNggB17d7nXqtRr31D +nHvKBeAMe75yENJDrws1G/zaEmADm7F1YZYepias+hq2+BwsCz8bXKevj7KX +aj6qV8fACi+DGuVeffTRMf3ic+wUeD30OXXn4BrkPJE71V0TATXXX3mOShqg +7dWJW4lwEn7dmpvUvGuAbZ5Tz9wrjoGHcoFQ2ta16MY/5Sc8ewRGVyTplY6s +xXve/AvYwYFwL/v3u/FYQ1Lf+IhMw/3gaMpCQwUj/ONxipvruheW+sdUrqw1 +wu93r80r6vECSeF9JVt3cHBl+aBOpLE7ZK8/ETLiwMH3syqMPE130D6RsD5p +NwclrByDOpXcwXKE/rfbjYOUlc4ZWz53ON05Pu2xj4O/KyY821rcYCorbF1I +BAcvoeXbQjs36DVMeplbwMEeFuP4TJAr+BzJvmZWzMGFO/m9PXxdYaK43GuI +5uDTunmSnbtcQZzqntSq4KCJ373r3egKFoLycg9qOairJ9lrvcAVql/ler78 +l4Pb4n99VjR1AXPRexpB3Rxc4xHZyF7hAt2bWicYr8l4JDSPGIm5wK+qb7HO +/3Fwv/2IQvYbZ9C4saro6yAH7W3W+doEOUN1r0lQ3HcOfh7szf6+2xnMl9iA +5ggHj/sv3pW23hn2xBx5fnicg8baHxaoLXaGX7Wn06SnOBh1pmNEdMoJImdS +PKpmOGgwOcOe3+8EYrr56k5/OWiTeTl9YZMTZPhXjc/NcXCW27ltWZET/A/Q +h1aC "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7938,117 +8627,114 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwV13k4Fe0bB3AvZUsS4ZDtzDmokCyROO5baUGJLEXZCYlKJUnZEhVSiiiU +LMlyBlGkyK4iLa+t4k27JJK14vf8/phrrs81M9c8c8/9fJ8Zpvv+7V68PDw8 +c2T7/36ir7WBfS7bWMQq2cay2dj4VQbjmEl3JLTf+edWjaEcoOQzd0b3RWir +dXAIM1SHIKvbXXzdWdDyfuqCnaERLB6WvjjdVQrFPu4rZQ23QH+15f5fXXVw +bU1/mPva3bCRPfh2tOsFlKZ09Gfo74PpLv3LI10DICcaEH1dPRTq1+dlP88a +A6nYUDv28niQ66/85K7+FyKONog8C7gMS/a53BZYz4eR+YqKmz9ehYtaG+9b +2gmi+paIM0dNb0DPlVW1o2ILcfaTdt1N1Ww4lx32jFdmMQo/791TNC8PpC+9 +P5OULoFjDVoTxTH5EGNrZvxiQhJ3St9i+l8uANk77bK8/0jhuKNeekl6ARRL +2E5qLZDCtYr1cSM5BdD5wpm+oCiFfLG/650qCoBtfZiy3iyFzmUbg8c7C6Bu +ayZ/R6oU/m41Xy4jXQh/N463txlJY5XG4mS1pEI4ZHDDpTWSgeUXZEatQ4rA +/LroL4s4Boo75J29F14ElEBobPtlBk48d1WWjSmCjlf2JS9vMdAjt2R3e1IR +rDwgwtfXzsDAwEvNM4VF8CX3aO5PWRnsumlo4NFXBLuXWH5fWiaDZ5d1qh3g +FIPO8fsRGdUymLNpiYHe+mIQHlgmxWySwZaOaaPJzcVQyeUDlR4Z9NBtVt1r +WwxSFpWJq+ZksLFJJErCrxg6Iti6GyxkMdu3g3k4pRhMf8yEBLyXxWvCIa/8 +horh2OZLKx4NyeIG3rLwoNFiKL6h0SsxIYuJo3+sQieKgWHralApuBRl9COd +jvFwYehe4yTfyqXIy21jGyzhQlJk4uHU4KVY07jD89laLgxIqgQ0LJTD6iVV +efanuCC9v0ZeWloOC362tjXGcmFLy842XyU5XMIxZKyK50JFyDn1RTpyKBaS +ITtxmQtn+0cGHXbKYXSAdvemPC5o59/3/pElh7/2D1jxtnIhwsjaTXaNPN7U +W6a8dx4Nm50zfuqvk8fWKK3bJ/hpEA3/FmW3RR4PUZvsEwRpuFYfnZvoKo+6 +I7rsPBEa7plXfeM/I4/efSlXK5bQMLKTFTTWI49psmKKW9k0OB8ZP/v0uAKu +TvjW5WBCg3LKOrnBaAWc8FdPE19Pk+c/XySQqIBCjqNnWkxpCPmzvGNdtgK2 +tC8YU9tMw+UoZ8nKpwrIONz+s8OShqcXmjNz5BXxtknQx6RdNKwtTr1zskYR +z8945s0F0mDa1f53uEURzbyScNNhGix55m1yeaGIayQk/eOO0OCxPaAHPipi +f9zqiEXBNGw8zgwLn6+Er6R4M6ZCaTigOHHTRE0Jhc44DdmfpmG8LLFlWlMJ +05aI9R2NIePbrPa9RFcJP1d/8E6OpSH6oKseZayEByoMNzw9S0Na/eMWXmsl +bE4t1Vx6noYG78zv9UFKmMdVFt2YQoPZHwPx0ONKOLYtJB+v0NCe+EpPN1wJ +txtZDqxJpaGnUig8+4wSVrv2aVBXaRhecFg8+poSFr3P1evOoIFBb9bfWKeE +pj9eur7IoSHd9P2u2SYlbNQrncvNpYHqORFe8UQJdS5PmhzLo0GDt6xV5V9y +vYJpqVQ+Dets5XcLfFHCHcE9W1YX0rBvajS8ZSETmbU29f+Uknoe3CP1SZyJ +Kx5MOtcQCw72FvAxmJjn8twwpIyGnNf1ncYUE611zO5/vkND38PL6uV6TLQp +9/vvxl0aCvWF614YMtEtrvuS2T1SL/rkjhFkYnzwq4RhYqks70g1Cya2h5fZ +raqiYVu0QfcNFyaujXpsnFRNg8JskX+NJxPXOHhrKj8g/RFE8b31ZWK4gMze +O8SxPgtWMg4zsfKJcO3jhzTUWryNSohlouVE6GxnLQ0JDdYyhfFMXP9UzMrm +EQ27OU3FrReZ6Ny8d+Qp8fRKbs+8dCbyXupUvFdHg7Z4hObxEia6nA82D2ig +gefceMOVCiYe/cxi/UvczrfXseI+E+cFHNxm0EiD3/j26NFGJvIk+OdME68N +aJZd9ISJsyK7OuyaSL0+G9LqHUysOuVjzSXO7ma/9u5l4jtLn52OzTQEWqce +iO5nov7djP4CYny8kP/mByauW3+iZob47f2JVX3DTAyeX3cusYXUK7PltC0f +hZMlwT7XWmn4IM2RCxSkcJ7eTFM3cWliScn5hRSe/LY9SvwxqWdk2pvH0hQe +C9JgnCRW+C0a+EWOwpEs3p9c4qFDUQL8FIUTRXbq/cSxXvu0TdQptP1KNa5+ +QoN933/NzloUuvmNs52I2TvsnEL1KIwLmPgcQfzzWevPVEMKs3NfimYT1242 +jr2LFBZ4GqbVEyc8KpX/dwOFR5LfnP2PePda1bKf5hSym/a8myFeUXZ1s5gV +hV0yZzPEn5L3oSbWp2FH4VKbyTpV4ol02QgdRwoTrcNnDYh/LVJmG7hQOPep +usqMeDRCs9nYk8IHvPZT9sTDYwZ7TX0pHKLG77oRf/MyXWgeQOFqW9MZX+Iv +XZb0tkMUGmsN1+wn/mjmYGMXTKHnQLrQIeKB+x4Tjico1JWf6/q/+zUCUl0j +KVRmP1QLJH6TGWy0J4ZCqilmfgBxz+Kofr84Cpc7C+3xJu6Mio88eIHCNy9G +tjoTvxxPUT6aTKF68tCD7cQd3lktoVcpHMguqDAlbusp9Iu8TqHJ6bdrdIkf +W9wVjc2hMMtCewOTuPnBo5L42xTOnnd8s4C4QfOpbRKXwvSjAnNjpH6PbnRO +XrlDYQ53sKiH+KHEu7SMSvI+/Cu+VhPfj/7GyX5IocV++bJ04nuT4//l11P4 +cfqFcChx6Wth1fI2Cv/xmPbWIuZulXxc9YLC1oCXAYLEhTWK/rVdpB5O7fxv +SX/k3tQte/KOQoO/s0P/76ebkmD//BOFikJZRluIr8eYTXd+o9C/AJWkidP8 +nGFgnMJyKevcHNKfKW99Bj7PUDjjoGvuS3xp26Ho73PkfNWJUyuIE3Rin0wJ +sdDj599HOaTfz+VcDJgVZSF1orLRhThWOn3xvCUsvF1g7CFNHPm7ZMciBRYG +pSYHhJH5EuZfPbOExcIH3wbeahKH9jelyy5jIY/A0Ne3ZP4F1b9+r6zNwvX6 +Gq+1if3OzT9gtJGFsYds9GvJ/Pb5u0hinQULjU7vveFEvGe/bMUmKxbaeRkV +T9XT4Gqj+We7Iws/PmaUqRLbLnWI9Q1gYedHwTBfkidGBYXXk5NZqD0w8ySU +5NNrpYLMDVdZaHUh9fdfkmchyfkZvzJZWH4oWPUE8d2I3Gvb81mYc+tU0JH7 +JH92Xr8iWs3Cpu+P+SwraVg+/1Li6XcsvIttfpkkX1tCLp5f/Ync/11dIQ/x +npHEhA+DLHziveOXC8nj7Nfxcet+sVDkCE8ag+S1UmlM7Cw/G7cvemMdyCX5 +4XI8PEidjSmd4kItJP/LXx0LU9Zio4lBI58wsa158MlXq9moPt2yyPwWDRdX +HwnVBjY6a4Q6N5D1ZKHI/uBhaza6v8j7euMmDfMq3Q/sOUqOmzda/ZNO5qO4 +uat9HRtD3sqDfQIN3fuojr3NbDx9YyxwYzzJh6YZCHvKxi8dy4/rxtGQGFKg +eKuTjTVmziLCZL1cNSDSPz3IxmSzOIur0TQElDxzSpdQxjdfbRbsIOvx4Da7 +XR88lbGquFdyrQ8NL/I1nkz5KiN42d34tIeGKj5+w4X7lbHtp4TiBS8aztyt +kNU7poy1fprj/e40LFNk9MbEK2OPabmKlxMN3sO9O9UqyPkf84NEt5M8jXO1 +DxRQwcTMZSnvDcj9B9WpVSIq+Frhyxq/NTRMbpr+/l1MBbMXVKqN6tEgzHcx +2ldWBUuftQhM6ZDxH6u/46qhgj5bjOlRDRpOeKlIbLNRwYtD4sGXmaT+xkPP +1DJV0Lc/LDVbgKz/P46afdRTxaKDK2oVMrggp6VwWtBIFY+UR4dJpHFhOLCh +Ts1EFZdmuzbPS+bCpQkxo0ALVSzP0Jx+Q77v+v7mr5xzUUV+xxCm5wkuBIq8 +kZA5o4qZHrw+z3ZxIW059m15rYp/4o6OL5Mi35cegofuhC1DRtSCpe4RxeR/ +Q5o3pm45ChRIK6sbFYF4m0oC/WMFCg5fZrh9KwC5WK6Vnp466oy966l2uw1X +1AzEJLw1MFMsruFs3y14LGuyeuzCSvwoaPmtwz4P1srVJWp2auLNqxbiL3Nz +QJQv67Bb5CrkSwk5cFc8GxQiFI0cVLSwx/KOjp1bFggp767Y3qyFqnz7rE8+ +ug4rOTLco07aGK9yRkPoUgYE9onXm/PoYMJ0ktOxmKvwYyzOzuyKDk4rDSw9 +9/IKbNJsSjPT0MWh+n4DNZtkeDhm+HuyXRdbPJ1On2pNggB17d7nXqtRr31D +nHvKBeAMe75yENJDrws1G/zaEmADm7F1YZYepias+hq2+BwsCz8bXKevj7KX +aj6qV8fACi+DGuVeffTRMf3ic+wUeD30OXXn4BrkPJE71V0TATXXX3mOShqg +7dWJW4lwEn7dmpvUvGuAbZ5Tz9wrjoGHcoFQ2ta16MY/5Sc8ewRGVyTplY6s +xXve/AvYwYFwL/v3u/FYQ1Lf+IhMw/3gaMpCQwUj/ONxipvruheW+sdUrqw1 +wu93r80r6vECSeF9JVt3cHBl+aBOpLE7ZK8/ETLiwMH3syqMPE130D6RsD5p +NwclrByDOpXcwXKE/rfbjYOUlc4ZWz53ON05Pu2xj4O/KyY821rcYCorbF1I +BAcvoeXbQjs36DVMeplbwMEeFuP4TJAr+BzJvmZWzMGFO/m9PXxdYaK43GuI +5uDTunmSnbtcQZzqntSq4KCJ373r3egKFoLycg9qOairJ9lrvcAVql/ler78 +l4Pb4n99VjR1AXPRexpB3Rxc4xHZyF7hAt2bWicYr8l4JDSPGIm5wK+qb7HO +/3Fwv/2IQvYbZ9C4saro6yAH7W3W+doEOUN1r0lQ3HcOfh7szf6+2xnMl9iA +5ggHj/sv3pW23hn2xBx5fnicg8baHxaoLXaGX7Wn06SnOBh1pmNEdMoJImdS +PKpmOGgwOcOe3+8EYrr56k5/OWiTeTl9YZMTZPhXjc/NcXCW27ltWZET/A/Q +h1aC "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06561969779351245}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8060,19 +8746,19 @@ U0FU/w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06561969779351245}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8086,116 +8772,113 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwV13k4Fe0bB3AvZUsS4ZDtzDmokCyROO5baUGJLEXZCYlKJUnZEhVSiiiU +LMlyBlGkyK4iLa+t4k27JJK14vf8/phrrs81M9c8c8/9fJ8Zpvv+7V68PDw8 +c2T7/36ir7WBfS7bWMQq2cay2dj4VQbjmEl3JLTf+edWjaEcoOQzd0b3RWir +dXAIM1SHIKvbXXzdWdDyfuqCnaERLB6WvjjdVQrFPu4rZQ23QH+15f5fXXVw +bU1/mPva3bCRPfh2tOsFlKZ09Gfo74PpLv3LI10DICcaEH1dPRTq1+dlP88a +A6nYUDv28niQ66/85K7+FyKONog8C7gMS/a53BZYz4eR+YqKmz9ehYtaG+9b +2gmi+paIM0dNb0DPlVW1o2ILcfaTdt1N1Ww4lx32jFdmMQo/791TNC8PpC+9 +P5OULoFjDVoTxTH5EGNrZvxiQhJ3St9i+l8uANk77bK8/0jhuKNeekl6ARRL +2E5qLZDCtYr1cSM5BdD5wpm+oCiFfLG/650qCoBtfZiy3iyFzmUbg8c7C6Bu +ayZ/R6oU/m41Xy4jXQh/N463txlJY5XG4mS1pEI4ZHDDpTWSgeUXZEatQ4rA +/LroL4s4Boo75J29F14ElEBobPtlBk48d1WWjSmCjlf2JS9vMdAjt2R3e1IR +rDwgwtfXzsDAwEvNM4VF8CX3aO5PWRnsumlo4NFXBLuXWH5fWiaDZ5d1qh3g +FIPO8fsRGdUymLNpiYHe+mIQHlgmxWySwZaOaaPJzcVQyeUDlR4Z9NBtVt1r +WwxSFpWJq+ZksLFJJErCrxg6Iti6GyxkMdu3g3k4pRhMf8yEBLyXxWvCIa/8 +horh2OZLKx4NyeIG3rLwoNFiKL6h0SsxIYuJo3+sQieKgWHralApuBRl9COd +jvFwYehe4yTfyqXIy21jGyzhQlJk4uHU4KVY07jD89laLgxIqgQ0LJTD6iVV +efanuCC9v0ZeWloOC362tjXGcmFLy842XyU5XMIxZKyK50JFyDn1RTpyKBaS +ITtxmQtn+0cGHXbKYXSAdvemPC5o59/3/pElh7/2D1jxtnIhwsjaTXaNPN7U +W6a8dx4Nm50zfuqvk8fWKK3bJ/hpEA3/FmW3RR4PUZvsEwRpuFYfnZvoKo+6 +I7rsPBEa7plXfeM/I4/efSlXK5bQMLKTFTTWI49psmKKW9k0OB8ZP/v0uAKu +TvjW5WBCg3LKOrnBaAWc8FdPE19Pk+c/XySQqIBCjqNnWkxpCPmzvGNdtgK2 +tC8YU9tMw+UoZ8nKpwrIONz+s8OShqcXmjNz5BXxtknQx6RdNKwtTr1zskYR +z8945s0F0mDa1f53uEURzbyScNNhGix55m1yeaGIayQk/eOO0OCxPaAHPipi +f9zqiEXBNGw8zgwLn6+Er6R4M6ZCaTigOHHTRE0Jhc44DdmfpmG8LLFlWlMJ +05aI9R2NIePbrPa9RFcJP1d/8E6OpSH6oKseZayEByoMNzw9S0Na/eMWXmsl +bE4t1Vx6noYG78zv9UFKmMdVFt2YQoPZHwPx0ONKOLYtJB+v0NCe+EpPN1wJ +txtZDqxJpaGnUig8+4wSVrv2aVBXaRhecFg8+poSFr3P1evOoIFBb9bfWKeE +pj9eur7IoSHd9P2u2SYlbNQrncvNpYHqORFe8UQJdS5PmhzLo0GDt6xV5V9y +vYJpqVQ+Dets5XcLfFHCHcE9W1YX0rBvajS8ZSETmbU29f+Uknoe3CP1SZyJ +Kx5MOtcQCw72FvAxmJjn8twwpIyGnNf1ncYUE611zO5/vkND38PL6uV6TLQp +9/vvxl0aCvWF614YMtEtrvuS2T1SL/rkjhFkYnzwq4RhYqks70g1Cya2h5fZ +raqiYVu0QfcNFyaujXpsnFRNg8JskX+NJxPXOHhrKj8g/RFE8b31ZWK4gMze +O8SxPgtWMg4zsfKJcO3jhzTUWryNSohlouVE6GxnLQ0JDdYyhfFMXP9UzMrm +EQ27OU3FrReZ6Ny8d+Qp8fRKbs+8dCbyXupUvFdHg7Z4hObxEia6nA82D2ig +gefceMOVCiYe/cxi/UvczrfXseI+E+cFHNxm0EiD3/j26NFGJvIk+OdME68N +aJZd9ISJsyK7OuyaSL0+G9LqHUysOuVjzSXO7ma/9u5l4jtLn52OzTQEWqce +iO5nov7djP4CYny8kP/mByauW3+iZob47f2JVX3DTAyeX3cusYXUK7PltC0f +hZMlwT7XWmn4IM2RCxSkcJ7eTFM3cWliScn5hRSe/LY9SvwxqWdk2pvH0hQe +C9JgnCRW+C0a+EWOwpEs3p9c4qFDUQL8FIUTRXbq/cSxXvu0TdQptP1KNa5+ +QoN933/NzloUuvmNs52I2TvsnEL1KIwLmPgcQfzzWevPVEMKs3NfimYT1242 +jr2LFBZ4GqbVEyc8KpX/dwOFR5LfnP2PePda1bKf5hSym/a8myFeUXZ1s5gV +hV0yZzPEn5L3oSbWp2FH4VKbyTpV4ol02QgdRwoTrcNnDYh/LVJmG7hQOPep +usqMeDRCs9nYk8IHvPZT9sTDYwZ7TX0pHKLG77oRf/MyXWgeQOFqW9MZX+Iv +XZb0tkMUGmsN1+wn/mjmYGMXTKHnQLrQIeKB+x4Tjico1JWf6/q/+zUCUl0j +KVRmP1QLJH6TGWy0J4ZCqilmfgBxz+Kofr84Cpc7C+3xJu6Mio88eIHCNy9G +tjoTvxxPUT6aTKF68tCD7cQd3lktoVcpHMguqDAlbusp9Iu8TqHJ6bdrdIkf +W9wVjc2hMMtCewOTuPnBo5L42xTOnnd8s4C4QfOpbRKXwvSjAnNjpH6PbnRO +XrlDYQ53sKiH+KHEu7SMSvI+/Cu+VhPfj/7GyX5IocV++bJ04nuT4//l11P4 +cfqFcChx6Wth1fI2Cv/xmPbWIuZulXxc9YLC1oCXAYLEhTWK/rVdpB5O7fxv +SX/k3tQte/KOQoO/s0P/76ebkmD//BOFikJZRluIr8eYTXd+o9C/AJWkidP8 +nGFgnMJyKevcHNKfKW99Bj7PUDjjoGvuS3xp26Ho73PkfNWJUyuIE3Rin0wJ +sdDj599HOaTfz+VcDJgVZSF1orLRhThWOn3xvCUsvF1g7CFNHPm7ZMciBRYG +pSYHhJH5EuZfPbOExcIH3wbeahKH9jelyy5jIY/A0Ne3ZP4F1b9+r6zNwvX6 +Gq+1if3OzT9gtJGFsYds9GvJ/Pb5u0hinQULjU7vveFEvGe/bMUmKxbaeRkV +T9XT4Gqj+We7Iws/PmaUqRLbLnWI9Q1gYedHwTBfkidGBYXXk5NZqD0w8ySU +5NNrpYLMDVdZaHUh9fdfkmchyfkZvzJZWH4oWPUE8d2I3Gvb81mYc+tU0JH7 +JH92Xr8iWs3Cpu+P+SwraVg+/1Li6XcsvIttfpkkX1tCLp5f/Ync/11dIQ/x +npHEhA+DLHziveOXC8nj7Nfxcet+sVDkCE8ag+S1UmlM7Cw/G7cvemMdyCX5 +4XI8PEidjSmd4kItJP/LXx0LU9Zio4lBI58wsa158MlXq9moPt2yyPwWDRdX +HwnVBjY6a4Q6N5D1ZKHI/uBhaza6v8j7euMmDfMq3Q/sOUqOmzda/ZNO5qO4 +uat9HRtD3sqDfQIN3fuojr3NbDx9YyxwYzzJh6YZCHvKxi8dy4/rxtGQGFKg +eKuTjTVmziLCZL1cNSDSPz3IxmSzOIur0TQElDxzSpdQxjdfbRbsIOvx4Da7 +XR88lbGquFdyrQ8NL/I1nkz5KiN42d34tIeGKj5+w4X7lbHtp4TiBS8aztyt +kNU7poy1fprj/e40LFNk9MbEK2OPabmKlxMN3sO9O9UqyPkf84NEt5M8jXO1 +DxRQwcTMZSnvDcj9B9WpVSIq+Frhyxq/NTRMbpr+/l1MBbMXVKqN6tEgzHcx +2ldWBUuftQhM6ZDxH6u/46qhgj5bjOlRDRpOeKlIbLNRwYtD4sGXmaT+xkPP +1DJV0Lc/LDVbgKz/P46afdRTxaKDK2oVMrggp6VwWtBIFY+UR4dJpHFhOLCh +Ts1EFZdmuzbPS+bCpQkxo0ALVSzP0Jx+Q77v+v7mr5xzUUV+xxCm5wkuBIq8 +kZA5o4qZHrw+z3ZxIW059m15rYp/4o6OL5Mi35cegofuhC1DRtSCpe4RxeR/ +Q5o3pm45ChRIK6sbFYF4m0oC/WMFCg5fZrh9KwC5WK6Vnp466oy966l2uw1X +1AzEJLw1MFMsruFs3y14LGuyeuzCSvwoaPmtwz4P1srVJWp2auLNqxbiL3Nz +QJQv67Bb5CrkSwk5cFc8GxQiFI0cVLSwx/KOjp1bFggp767Y3qyFqnz7rE8+ +ug4rOTLco07aGK9yRkPoUgYE9onXm/PoYMJ0ktOxmKvwYyzOzuyKDk4rDSw9 +9/IKbNJsSjPT0MWh+n4DNZtkeDhm+HuyXRdbPJ1On2pNggB17d7nXqtRr31D +nHvKBeAMe75yENJDrws1G/zaEmADm7F1YZYepias+hq2+BwsCz8bXKevj7KX +aj6qV8fACi+DGuVeffTRMf3ic+wUeD30OXXn4BrkPJE71V0TATXXX3mOShqg +7dWJW4lwEn7dmpvUvGuAbZ5Tz9wrjoGHcoFQ2ta16MY/5Sc8ewRGVyTplY6s +xXve/AvYwYFwL/v3u/FYQ1Lf+IhMw/3gaMpCQwUj/ONxipvruheW+sdUrqw1 +wu93r80r6vECSeF9JVt3cHBl+aBOpLE7ZK8/ETLiwMH3syqMPE130D6RsD5p +NwclrByDOpXcwXKE/rfbjYOUlc4ZWz53ON05Pu2xj4O/KyY821rcYCorbF1I +BAcvoeXbQjs36DVMeplbwMEeFuP4TJAr+BzJvmZWzMGFO/m9PXxdYaK43GuI +5uDTunmSnbtcQZzqntSq4KCJ373r3egKFoLycg9qOairJ9lrvcAVql/ler78 +l4Pb4n99VjR1AXPRexpB3Rxc4xHZyF7hAt2bWicYr8l4JDSPGIm5wK+qb7HO +/3Fwv/2IQvYbZ9C4saro6yAH7W3W+doEOUN1r0lQ3HcOfh7szf6+2xnMl9iA +5ggHj/sv3pW23hn2xBx5fnicg8baHxaoLXaGX7Wn06SnOBh1pmNEdMoJImdS +PKpmOGgwOcOe3+8EYrr56k5/OWiTeTl9YZMTZPhXjc/NcXCW27ltWZET/A/Q +h1aC "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06561969779351245}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8206,6 +8889,7 @@ U0FU/w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8233,7 +8917,8 @@ U0FU/w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.06741909458355917}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06561969779351245}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8241,8 +8926,10 @@ U0FU/w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913236646248627`*^9}, - CellLabel->"Out[89]=",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] + CellChangeTimes->{3.9913236646248627`*^9, 3.994351964164661*^9, + 3.994354369619548*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"edac8afe-f975-4e93-8090-715f8abedc5a"] }, Open ]], Cell[CellGroupData[{ @@ -8294,65 +8981,79 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel->"In[90]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], + CellLabel-> + "In[109]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 90, - 21, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323664732767*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5534777048385944`*^-171\\\", \ +RowBox[{\\\"1827462709233582921886409544590\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1507584000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 109, 17, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994351964408504*^9, + 3.994354369775717*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], +In[109]:=",ExpressionUUID->"52769f81-b1ca-44a6-a3dd-dece251482d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 22, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132366476486*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.300353565701364`*^-175\\\", \ +RowBox[{\\\"5328881260125127800220770232025\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"81\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6114944000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 109, 18, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994351964408504*^9, + 3.9943543697878847`*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], +In[109]:=",ExpressionUUID->"6fe40b08-86c3-48ab-862e-4c1eb9afa3b8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 23, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236647877655`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.567931627061298`*^-178\\\", \ +RowBox[{\\\"1611986581187851159566782995187\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7705600000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 109, 19, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994351964408504*^9, + 3.99435436980021*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], +In[109]:=",ExpressionUUID->"1d26e763-e309-4625-87d1-d3b1076f2cd5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 90, 24, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236648078594`*^9}, +during this calculation.\"", 2, 109, 20, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994351964408504*^9, + 3.994354369809465*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], +In[109]:=",ExpressionUUID->"89e2ed0b-b0ec-4893-852c-d065994d8502"], -Cell[BoxData["11.275343508420768`"], "Output", - CellChangeTimes->{3.9913236764669056`*^9}, - CellLabel->"Out[90]=",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[BoxData["11.584417718348634`"], "Output", + CellChangeTimes->{3.9913236764669056`*^9, 3.994352055124601*^9, + 3.9943544552995367`*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"7781adda-7cef-49ad-a21d-f9da3664bc74"] }, Open ]], Cell[CellGroupData[{ @@ -8419,67 +9120,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917996753598194`*^9, - 3.991799698091812*^9}},ExpressionUUID->"18d0289f-01fd-a740-8fac-\ -540622282b2c"], + CellChangeTimes->{{3.9917996753598194`*^9, 3.991799698091812*^9}}, + CellLabel-> + "In[110]:=",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 25, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765399036`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.210949781724305`*^-207\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 110, 21, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994352056052989*^9, + 3.9943544553900642`*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], +In[110]:=",ExpressionUUID->"a13dc37d-5dee-4bd9-a3bc-05f421d0a4de"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 26, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765679016`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.136589097020563`*^-212\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 110, 22, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994352056052989*^9, + 3.994354455403503*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], +In[110]:=",ExpressionUUID->"810df756-7bad-4aa2-aaac-2312260d4bab"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 27, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323676587904*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.265699882278472`*^-217\\\", \ +RowBox[{\\\"7066407765328259371913031630455\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"47\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8628582006784000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 110, 23, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994352056052989*^9, + 3.9943544554149733`*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], +In[110]:=",ExpressionUUID->"0f0c1e67-1d7a-40aa-8cf1-db49e9ee2da4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 91, 28, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236766039066`*^9}, +during this calculation.\"", 2, 110, 24, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994352056052989*^9, + 3.994354455427823*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], +In[110]:=",ExpressionUUID->"e405328c-ccd1-4067-876b-979d1ffcc33d"], -Cell[BoxData["0.5376063675902706`"], "Output", - CellChangeTimes->{3.9913236883162384`*^9}, - CellLabel->"Out[91]=",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[BoxData["1.1620664588992287`"], "Output", + CellChangeTimes->{3.9913236883162384`*^9, 3.9943520718369513`*^9, + 3.994354467323883*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"338bf943-9056-46db-9d7b-6f732c0bb72b"] }, Open ]], Cell[CellGroupData[{ @@ -8500,8 +9214,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8546,67 +9259,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997261183853`*^9, - 3.991799730012718*^9}},ExpressionUUID->"33f25e29-8e2f-5249-9603-\ -4bb381db84df"], + CellChangeTimes->{{3.9917997261183853`*^9, 3.991799730012718*^9}}, + CellLabel-> + "In[111]:=",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 29, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132368839011*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.210949781724305`*^-207\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 111, 25, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.9943520758328867`*^9, + 3.994354467374318*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], +In[111]:=",ExpressionUUID->"01807a2f-5ee5-4f82-9c4f-00f6666f00b9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 30, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884141064`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.136589097020563`*^-212\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 111, 26, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.9943520758328867`*^9, + 3.994354467386034*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], +In[111]:=",ExpressionUUID->"893e0137-0dae-414a-8d35-08da9b730df4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 31, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323688443001*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.265699882278472`*^-217\\\", \ +RowBox[{\\\"7066407765328259371913031630455\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"47\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8628582006784000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 111, 27, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.9943520758328867`*^9, + 3.9943544673961782`*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], +In[111]:=",ExpressionUUID->"b6cbf566-a11e-459d-8538-3038d1e8977d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 92, 32, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884570007`*^9}, +during this calculation.\"", 2, 111, 28, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.9943520758328867`*^9, + 3.994354467404277*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], +In[111]:=",ExpressionUUID->"6fac02b6-7273-47d4-81eb-a9fdd44c8bc7"], -Cell[BoxData["10.498798062085507`"], "Output", - CellChangeTimes->{3.9913236988049507`*^9}, - CellLabel->"Out[92]=",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[BoxData["37.861975939076736`"], "Output", + CellChangeTimes->{3.9913236988049507`*^9, 3.9943521048491373`*^9, + 3.994354478492136*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"1525b00d-654d-4482-902e-e230fed137f1"] }, Open ]], Cell[CellGroupData[{ @@ -8627,8 +9353,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8673,67 +9398,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997336698074`*^9, - 3.9917997367747993`*^9}},ExpressionUUID->"88e14da9-8532-e842-b722-\ -1b0781de8eeb"], + CellChangeTimes->{{3.9917997336698074`*^9, 3.9917997367747993`*^9}}, + CellLabel-> + "In[112]:=",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 33, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698915848*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.210949781724305`*^-207\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 112, 29, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994352105034671*^9, + 3.99435447856525*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], +In[112]:=",ExpressionUUID->"5c75bb3e-a234-4cd0-a579-4508fbc39066"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 34, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698943981*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.136589097020563`*^-212\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 112, 30, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994352105034671*^9, + 3.9943544785794773`*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], +In[112]:=",ExpressionUUID->"d668ddd3-769f-4982-8264-f37a3882918e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 35, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698971981*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.265699882278472`*^-217\\\", \ +RowBox[{\\\"7066407765328259371913031630455\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"47\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8628582006784000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 112, 31, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994352105034671*^9, + 3.994354478592763*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], +In[112]:=",ExpressionUUID->"e661b6cc-b43b-474f-ad6b-61eed00bb7bb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 93, 36, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698986994*^9}, +during this calculation.\"", 2, 112, 32, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994352105034671*^9, + 3.994354478602263*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], +In[112]:=",ExpressionUUID->"aa5ba7a8-6d59-4dfe-a444-e57b0abf6c9b"], -Cell[BoxData["18.521732102530788`"], "Output", - CellChangeTimes->{3.991323706795576*^9}, - CellLabel->"Out[93]=",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[BoxData["8.265929286719988`"], "Output", + CellChangeTimes->{3.991323706795576*^9, 3.994352116985641*^9, + 3.994354487880616*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"60ca8ffb-c960-40cf-ac78-a6d45e93d617"] }, Open ]], Cell[CellGroupData[{ @@ -8742,21 +9480,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991799742384985*^9, - 3.9917997459840527`*^9}},ExpressionUUID->"fcd1131c-ba92-0b46-817b-\ -e5f89f4ec38f"], + CellChangeTimes->{{3.991799742384985*^9, 3.9917997459840527`*^9}}, + CellLabel-> + "In[113]:=",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[BoxData["0.038552612544494616`"], "Output", - CellChangeTimes->{3.991323706858589*^9}, - CellLabel->"Out[94]=",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[BoxData["0.06568761380150998`"], "Output", + CellChangeTimes->{3.991323706858589*^9, 3.99435211704466*^9, + 3.994354487931555*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"77be9f0a-aede-423d-988b-588cea5e903b"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9917997487290344`*^9, 3.991799750684988*^9}, - 3.9919243164025135`*^9},ExpressionUUID->"c771f2bd-f081-e54a-b4e5-\ -bf0dbc996ac3"], + 3.9919243164025135`*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ @@ -8778,11 +9519,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel->"In[96]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], + CellLabel-> + "In[115]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.991323706886154*^9}, - CellLabel->"Out[96]=",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[BoxData["13.103190348487058`"], "Output", + CellChangeTimes->{3.991323706886154*^9, 3.9943521170755033`*^9, + 3.9943544879572897`*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"4cf5a937-3891-44fe-8f97-4a63b8b759a1"] }, Open ]], Cell[CellGroupData[{ @@ -8791,11 +9535,14 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel->"In[98]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], + CellLabel-> + "In[116]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.9913237069236546`*^9}, - CellLabel->"Out[98]=",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[BoxData["1.754175640605632`"], "Output", + CellChangeTimes->{3.9913237069236546`*^9, 3.994352117097124*^9, + 3.9943544879735928`*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"43b20dd4-c7e8-479f-b16b-a7762c91c3d1"] }, Open ]], Cell[CellGroupData[{ @@ -8805,12 +9552,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[101]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], + "In[117]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913237069753113`*^9}, +Cell[BoxData["22.985297323534816`"], "Output", + CellChangeTimes->{3.9913237069753113`*^9, 3.994352117113965*^9, + 3.994354487989139*^9}, CellLabel-> - "Out[101]=",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] + "Out[117]=",ExpressionUUID->"90f6b9ca-89b9-48a1-b399-e41845bfbc78"] }, Open ]], Cell[CellGroupData[{ @@ -9000,12 +9748,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[102]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], + "In[118]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[BoxData["0.02467166981689615`"], "Output", - CellChangeTimes->{3.991323707000412*^9}, +Cell[BoxData["0.0061543729933492`"], "Output", + CellChangeTimes->{3.991323707000412*^9, 3.9943521171368313`*^9, + 3.994354488009697*^9}, CellLabel-> - "Out[102]=",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] + "Out[118]=",ExpressionUUID->"78e5c412-c2d3-4d69-8050-8ced188e75a2"] }, Open ]], Cell[CellGroupData[{ @@ -9019,12 +9768,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[103]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], + "In[119]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[BoxData["5.642163519289108`"], "Output", - CellChangeTimes->{3.991323707203314*^9}, +Cell[BoxData["11.296737411375291`"], "Output", + CellChangeTimes->{3.991323707203314*^9, 3.994352117334117*^9, + 3.9943544882110157`*^9}, CellLabel-> - "Out[103]=",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] + "Out[119]=",ExpressionUUID->"28dc22e0-85ad-43a0-9df1-a78affd82074"] }, Open ]], Cell[CellGroupData[{ @@ -9216,12 +9966,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[104]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], + "In[120]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[BoxData["0.012834083028601704`"], "Output", - CellChangeTimes->{3.9913237072224197`*^9}, +Cell[BoxData["0.04069232775464233`"], "Output", + CellChangeTimes->{3.9913237072224197`*^9, 3.994352117355802*^9, + 3.99435448823188*^9}, CellLabel-> - "Out[104]=",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] + "Out[120]=",ExpressionUUID->"c6f0d9b6-6ad9-4c81-baa6-b32517de9cca"] }, Open ]], Cell[CellGroupData[{ @@ -9235,12 +9986,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[105]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], + "In[121]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[BoxData["7.82280524717004`"], "Output", - CellChangeTimes->{3.991323707432623*^9}, +Cell[BoxData["4.393277879881701`"], "Output", + CellChangeTimes->{3.991323707432623*^9, 3.994352117549796*^9, + 3.994354488431745*^9}, CellLabel-> - "Out[105]=",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] + "Out[121]=",ExpressionUUID->"63e26554-c335-4b94-bbc0-c90d6b1ae27a"] }, Open ]], Cell[CellGroupData[{ @@ -9333,12 +10085,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[106]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], + "In[122]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913237074497375`*^9}, +Cell[BoxData["0.09644452732399805`"], "Output", + CellChangeTimes->{3.9913237074497375`*^9, 3.994352117568603*^9, + 3.994354488446607*^9}, CellLabel-> - "Out[106]=",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] + "Out[122]=",ExpressionUUID->"596c5739-6c7c-4b71-8e1b-64fafcc99600"] }, Open ]], Cell[CellGroupData[{ @@ -9428,12 +10181,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[107]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], + "In[123]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991323707467621*^9}, +Cell[BoxData["0.903555472676002`"], "Output", + CellChangeTimes->{3.991323707467621*^9, 3.994352117587557*^9, + 3.994354488461802*^9}, CellLabel-> - "Out[107]=",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] + "Out[123]=",ExpressionUUID->"90221126-83d0-4819-a914-c48de3d281d3"] }, Open ]], Cell[CellGroupData[{ @@ -9556,12 +10310,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[108]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], + "In[124]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991323707488617*^9}, +Cell[BoxData["0.08714298047324866`"], "Output", + CellChangeTimes->{3.991323707488617*^9, 3.9943521176100397`*^9, + 3.994354488482786*^9}, CellLabel-> - "Out[108]=",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] + "Out[124]=",ExpressionUUID->"1abb11f8-d92b-43f8-8234-448c068f97bb"] }, Open ]], Cell[CellGroupData[{ @@ -9576,7 +10331,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -9598,8 +10355,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9623,68 +10379,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799766323864*^9},ExpressionUUID->"ee2d2671-1677-5943-bf7a-\ -6ffa36275fe8"], + CellChangeTimes->{3.991799766323864*^9}, + CellLabel-> + "In[125]:=",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 109, 37, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075117207`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3444778584138733`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39706282409984000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 125, 33, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943521176379147`*^9, + 3.994354488504293*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], +In[125]:=",ExpressionUUID->"5a84994c-b0d5-4297-8b65-4324071fe773"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 38, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323707545618*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.711727713253255`*^-221\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 125, 34, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943521176379147`*^9, + 3.994354488516098*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], +In[125]:=",ExpressionUUID->"c12a3014-a478-4beb-b95d-6f8ca46a1b30"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 39, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075757256`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4265058190569778`*^-226\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 125, 35, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943521176379147`*^9, + 3.994354488525426*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], +In[125]:=",ExpressionUUID->"3aa6e46e-f262-46d1-8380-99bd7982cd95"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 109, 40, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075926247`*^9}, +during this calculation.\"", 2, 125, 36, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943521176379147`*^9, + 3.994354488534214*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], +In[125]:=",ExpressionUUID->"cd0469ed-add5-4bd7-90e2-5888ced6c948"], -Cell[BoxData["5.642163519289105`"], "Output", - CellChangeTimes->{3.9913237161181736`*^9}, +Cell[BoxData["11.296737411375293`"], "Output", + CellChangeTimes->{3.9913237161181736`*^9, 3.994352125812731*^9, + 3.99435449723426*^9}, CellLabel-> - "Out[109]=",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] + "Out[125]=",ExpressionUUID->"c7ec3d3f-15db-4e8f-b799-d0c7558bdec9"] }, Open ]], Cell[CellGroupData[{ @@ -9699,7 +10467,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -9721,8 +10491,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9746,68 +10515,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917997699328365`*^9},ExpressionUUID->"b0b1035a-0fdf-b146-a71f-\ -1ab9142a9a90"], + CellChangeTimes->{3.9917997699328365`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 110, 41, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237161871567`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3444778584138733`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39706282409984000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 126, 37, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994352125871429*^9, + 3.99435449729405*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], +In[126]:=",ExpressionUUID->"23f079f0-cbad-4eb6-8d66-92dfb2edbb31"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 42, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162070637`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.711727713253255`*^-221\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 126, 38, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994352125871429*^9, + 3.994354497308117*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], +In[126]:=",ExpressionUUID->"847f54bd-f36d-4fed-937d-45e525fe2626"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 43, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323716227171*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4265058190569778`*^-226\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 126, 39, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994352125871429*^9, + 3.994354497317224*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], +In[126]:=",ExpressionUUID->"24722b7f-2dfb-4375-a5ed-cc455a756ddf"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 110, 44, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162481613`*^9}, +during this calculation.\"", 2, 126, 40, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994352125871429*^9, + 3.994354497325755*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], +In[126]:=",ExpressionUUID->"96f7a3b7-1c52-4db7-b3f7-8571ed06306f"], -Cell[BoxData["7.822805247170038`"], "Output", - CellChangeTimes->{3.991323724852854*^9}, +Cell[BoxData["4.393277879881702`"], "Output", + CellChangeTimes->{3.991323724852854*^9, 3.994352133824477*^9, + 3.9943545058818607`*^9}, CellLabel-> - "Out[110]=",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] + "Out[126]=",ExpressionUUID->"cc03d014-e7aa-4e94-9de4-b0e1d13428ff"] }, Open ]], Cell[CellGroupData[{ @@ -9865,95 +10646,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917997843341885`*^9},ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-\ -ff25938e6592"], + CellChangeTimes->{3.9917997843341885`*^9}, + CellLabel-> + "In[127]:=",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4Ft0bB3BbJVtkJ7ImInosWXqdO0sieypL9ucZ+y4hkUp6S0L10oKs +2aWiRH6FSpIUpc2+VGM3hLT8zvPHXHN9rjNzn++558xcI+sVYs9gY2FhmcIH +8xzWuV3pflenoZ/thz0t60lkOF2o7WVSgfg5ZAOYHszVuaxg0ohai5Z7mbal +v1rLo/kUvdJyv9CKXROd0LLGpANdrnY4/xT732dijxPK3qAdQh/fPMOu7wrL ++UV7h0bcJz3asMlP7XExDR9Q6cVU3XZsiTF5lx/GX1B67v8cO7D3zcTpRXQM +IM/zCU86sZt+kdzRZUNIxboz/A32+0TRY3XBI8hluDywB3t6rQm5QBtD7EZi +1b3Ya1NCnTSXxtEBQlD/M7a0QHZbWMM3pLg3m3cA21ryR/G08STareCa+hWb +uCknosY5jfbyXjKYxE5QtEkK6JhBy2mHdsxhfxDt2RFZNocOoZQfq9h0Z3+/ +Synz6M/+X09ZuUg0e4Ml704whVx6f/atw+aUU+Ofoy2ixqX8r0LYl+ktZvzC +P9D6WMuPktgyt5wS1Jd+oFLt04Ly2LqqZ6aDGpZRgFSOJw3bV2eggzT+hcon +YugO2AvRRzi4tvxGQbGXrrlin2jg3qXM+QcNN+iL+2BngW65T8df9I2TNhuL +TS9qMwkvY4W9Z55wFGOXPbs0mCjJBvH+exJqmHm/usWlp7BBwQFHo0fYcSqL +d28Hs8PYgFz+O2bealn5GdoamFu1aVvPTaJPXZNNfwrWgLCDfrIotsz8fWc+ +4bUwPnQ7VRG7Qss6Q21pLayoGB01wm6tj2UNbOCEAKX5qgTsxZbugW/GPMCR +GPBgHQ+JNlry8B9r4gFieTlFElujxwR49XihcPV5nTq2/2jtzR3b+aBvSJnL +CTuUrUPjHx5+uJe/VF2NPSZXNZf0QwB+zJxfCuTF/SHa17/W3Ahp0eIyZ7DZ +ysdlxcI2gr7UWHYutozmZvuyiY3g2qx9tRvb2TjtTuegIPyJr01FfCR67R0e +IfpSGPZJL0QqbSBR/63U8x6cItCcZDJnij05UVZQaioCXE87m+nYXJEj3QaP +ReDkjYuMAmyT0w5aHrWiMKr3sFSBn0QPC3UWS3LF4WRjoOpOARIVjv2M0o+U +gut242I3BEm090Byf0SlFPR2WCc0Y0+2Cu6pHJeCK3mr6t+xtQpVhWWcpOHj +OtnQnUK4n15ud9cYboZH4ekBvdjzM4NHv52SAZ+RBmtFERIJBpncu2slBxti +KlqWxUg0Xsjla+svBxfyZ8O2ipPowZcuyakzcsDjHOTviH3Y0vXUlsdyMNvO +p1+PXbgtyv4qTR6ifoztj5fA85O3ZuNFFaB/W1KYyCYSOfhwq1kMKYK8rLtd +/GYSoagDtEO/FaGlW0apDlslKXcnXXwLpE+qmExjsxRoGsXbbYF5PxEHdxkS +Vfa7HLrzZAuYSv/z0kQWv58HKxIl8pVgMsZFREoe5zOxek96KcNijNkmdiUS +FezP/LwUrwx3/m76ZIyd6jU0yHFdGfTdVQZOY9NPHJmQ7laGWT+yad1WEgk0 +ZrPsN1aB/PqZHn5lvH80p1Ua5LeBB+2Cs8Y2EknKXUw4P6oKvE2fnxeqk6jx +3ILyCpsafM/MrljAPkw59RCyasD7WXjMRINEOa0KykZualCFttiNY8v5PHy7 +3KsGRnVVwmo0vN6KMUXi5XY45HnDpl2LRFKS0oSMkwYUX7l5wlifRKpFkTyr +iAa8N/TyNPaQyIt+alHNmgYu3VXVqdhZ8hn9HodpwLfyfu0UNnt+9e1n0TT4 +6b7rYpkZft9ySIeMGhp4Z+3mVDbH39Msj2xleU0YI7yuaVri53vecrvjWi3I +YajrJtiTKC9cwba2QxveHaLJzLqTqCsK7TxdpAf5Nu3fqRMkknV7Z+0a+A+Y +OW2WO1VMIsbfuiqpGADfJfV6qU4SiU48WCfqZQSu8fYVrH9IFKm560uGigls +L+P7Zas+gbymfrUJkqYgPk89nfCeQJVGEetyX5vBZEBcRG3eBCpc8H9Scdkc +OJ9H+NQNTKDl3WKvWhP2QQW7JmeG0iTqY2GfG/K0gjcroU73widR8KaQtER5 +G6gq1Ut80jiJqvzaHl9JsoUX36Y8TQSmUCwlvrTNzw4cTF8OTXlPoUWLPQef +u9uDeokVPeDJFNJzSd89ZrcfSq4uGs7JTKO34tn+rZoOoBL9ZGjr8WkkUXyq +sWTrAXh50czIcHQaPRhUsbTmPQhuLqYzkmYzSLpn1idq6iAouAT7apTNIM0r +6RUFg4eArdlg6xfuWZTNQW3PaHGE29finzaiWVS3W/1TUr0T3NdNSM2InkVZ +O88J/CpzhpbDle6Nt2fR689FZzRTXGBvlbmO9tgsqrW6oRB64jAkHg8dmpKa +Q3NB+1mC6a7wb5/3rxD7ObS4R9l32tgNnAPrjXYlzaGSqY/LETrusC7/mvi+ +hjnkmFfk7crjATdjJ7VCJ+fQ3Tv73NmTPcCp9PqDpc3zSE/y7cq/Kx5wyyhP +RdZ6HskP+nx64+cJbNNmaUYx82iUO8DmxognvFjIfHGwaB51pVp7mx3wAvua +DfmFL+fR5ehc7iNdXqDq2dn3aG4eNTb9XfE294Y9V0zmvAUptOEwJGs+9Iai +S6X2quoUkhF6/npTozfw/bF5cwNbo8NKbG2TN0i4uHPxalDIfpdL6Ycn3mDN +GlM+iX15U9TL4y+8gT3s060SGoUk+so3tH3wBjP+M8cEdSik4CaadXjJG4SS +3sje20UhPY/pkiQtOtjkRchJm1Oo+OpshLUOHZ59eBIXhS3UPW8oqksHedVt +mZ3Y06ZLPSUGdIi/LscTb0Hh7xcLa4cRHQaCghc/7qMQ35KA00Y7OlzrHWxI +sqbQ6AXt9blBdPDtn++o2E8hu+c7e3xC6CCYkCP8G7uJRT9XI4wO5ZobpKwc +KHQ1wlC7OZIOt0REfSexrZ3MPMeO0eGXUtGU0kEK1Ss41W87R4dc5aXKDEcK +pTbE+T0oxvMnLTTpuFIoiJapF11Ch7M2Et7HsS1La9brltHhTiz9eQs2V+Z4 +6f1KOhwwM+6ycaNQUrgtWXePDnlZesN0dwrFKSsE1DbToSQ/6+9JTwr5Z74M +vNNPh2z/reOpDAqZ843vCh+kg8Hf6/GvsLcmsfDShumQPKz6npug0Hi4dmXN +GB2Ka5Kbk7E9rXOnbk/ivKTFxTgfCjmuiQiu/kmHF0uB805+FDKLkAitEGHA +PYPh8pFACjXnnrHIEGNAVIVWnXQQhXZ1zCtESzDgeJhQhBO2huLLj8bSDPBI +ceLoxBbvPWb8WZEBbMe4T9/F/0ET+n0iXNoM6Kc1zYaEUugi281HPvsZcLRs +i1lVBF6/Ok+W1QEG6PftvTSAfdolOlzzEAOkdX6m8UdSKPqerdJfZwZYnp66 +GYbtSbCm/+fFgAc0m40aRyik2e5FfxrGgDqZ71o5URTqTVfklk9jwN6zMvtQ +DIWqEK/vt3Q8vmIhScc+PbXQWnmJAUdGw4vPYtPMW+N1Mxlwwrlkqgs7lcV7 +3iqHAf8pbEVusRTaE3LzY3QFAwwmzpEBxygkJXVWx7CKAcvWAb4p2AvtIZfY +bzNg7idrXgV2/hZklXqXARqXdxtNYv/u63tc8JAB1pmZJr5xFLpnKVnS2caA +XgcV0/3HKXT+J9uay+0MCH1/MTAE26uE9HTqYICVWZD1eWx+joeSo69x/zIT +dzdjBzY4Xlx5j/NaV46qxlNIXuW/KIUxBrzaIb5pEftn7/Hu7+MMaGfx/M6T +QKGuJIZG9TcGbLeZCFXAjh/SIvUmGeBn1lBlj/0pq9vVhmJAceniaDl2xjoB +01hWAuJfO+nZnaBQ43yfSyQ7ATZnc74S2F/7ysKD1xBAa20xjMPedc/kptd6 +Aor58r8WYY97RK9aCBCwmdVOfhGb39J0o6kgAYdO7RLjTKSQwc6NykiYgPnk +6VoJ7DTeioOa4gREyl2bMGSOPxyokZQlYN2PJnQKmyiqaBOWx3lOXoi9xLw+ +LWZggyIBnzfyuBVgjxOCvBzKBAhxb9jczBwXNPOd1CAgmuXb2VXsh38EE8Zp +BCTOznGuP0mhse+DVwa1CBAgs3aIYOs/jm3p0SVA9WxtnDr2aGCV9CMgwNt/ +bsUVm8/xmPZ9IwK2GJY3+WLrGe+1rDEh4E3x/LYI7FTx4ZiivXi+s/IsydgP +OKrTci0IuPZqvU8a9sjMsVtXLQkYQUejrmLrPhN+d8GWgJCBodQybK+a4Ylk +ewJemH/JvIN94UY120kH3A8XR/OH2MPh5hpRjgQYnesqasPmdRMxC3XG/TjQ +bvuaWc98xNX/MAG6CrsL3zHv33z8vJsHAZ0teSZDzDxcFvmOXgS8vftv+jiz +3qJIvT2dgIIx8swEs97QyGtLggCNlFaFWWa9jtvje3wJOP1NOGCBme/+8d/g +T0CPeb/TMrN+voWQQSBeL6/U3Cqz/gXRbdrBBIznvNH4y6wfPbpbPZSAx0dX +xdhOUYiHXuOoHI7zbL5WyoG90yY+RD6SgFnVyuG12F76+85IRRFgYKzVyomd +oiiWLRpNQJ+QujUXdh3/2F2BWAI0vbJPcGMPrda0c8cRULsS78LDrP81fmhN +PAGcD7r7mdZ5u2/5bwJzf13n4sX+P33k+p8= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -9967,107 +10748,107 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1nk4Ft0bB3BbJVtkJ7ImInosWXqdO0sieypL9ucZ+y4hkUp6S0L10oKs +2aWiRH6FSpIUpc2+VGM3hLT8zvPHXHN9rjNzn++558xcI+sVYs9gY2FhmcIH +8xzWuV3pflenoZ/thz0t60lkOF2o7WVSgfg5ZAOYHszVuaxg0ohai5Z7mbal +v1rLo/kUvdJyv9CKXROd0LLGpANdrnY4/xT732dijxPK3qAdQh/fPMOu7wrL ++UV7h0bcJz3asMlP7XExDR9Q6cVU3XZsiTF5lx/GX1B67v8cO7D3zcTpRXQM +IM/zCU86sZt+kdzRZUNIxboz/A32+0TRY3XBI8hluDywB3t6rQm5QBtD7EZi +1b3Ya1NCnTSXxtEBQlD/M7a0QHZbWMM3pLg3m3cA21ryR/G08STareCa+hWb +uCknosY5jfbyXjKYxE5QtEkK6JhBy2mHdsxhfxDt2RFZNocOoZQfq9h0Z3+/ +Synz6M/+X09ZuUg0e4Ml704whVx6f/atw+aUU+Ofoy2ixqX8r0LYl+ktZvzC +P9D6WMuPktgyt5wS1Jd+oFLt04Ly2LqqZ6aDGpZRgFSOJw3bV2eggzT+hcon +YugO2AvRRzi4tvxGQbGXrrlin2jg3qXM+QcNN+iL+2BngW65T8df9I2TNhuL +TS9qMwkvY4W9Z55wFGOXPbs0mCjJBvH+exJqmHm/usWlp7BBwQFHo0fYcSqL +d28Hs8PYgFz+O2bealn5GdoamFu1aVvPTaJPXZNNfwrWgLCDfrIotsz8fWc+ +4bUwPnQ7VRG7Qss6Q21pLayoGB01wm6tj2UNbOCEAKX5qgTsxZbugW/GPMCR +GPBgHQ+JNlry8B9r4gFieTlFElujxwR49XihcPV5nTq2/2jtzR3b+aBvSJnL +CTuUrUPjHx5+uJe/VF2NPSZXNZf0QwB+zJxfCuTF/SHa17/W3Ahp0eIyZ7DZ +ysdlxcI2gr7UWHYutozmZvuyiY3g2qx9tRvb2TjtTuegIPyJr01FfCR67R0e +IfpSGPZJL0QqbSBR/63U8x6cItCcZDJnij05UVZQaioCXE87m+nYXJEj3QaP +ReDkjYuMAmyT0w5aHrWiMKr3sFSBn0QPC3UWS3LF4WRjoOpOARIVjv2M0o+U +gut242I3BEm090Byf0SlFPR2WCc0Y0+2Cu6pHJeCK3mr6t+xtQpVhWWcpOHj +OtnQnUK4n15ud9cYboZH4ekBvdjzM4NHv52SAZ+RBmtFERIJBpncu2slBxti +KlqWxUg0Xsjla+svBxfyZ8O2ipPowZcuyakzcsDjHOTviH3Y0vXUlsdyMNvO +p1+PXbgtyv4qTR6ifoztj5fA85O3ZuNFFaB/W1KYyCYSOfhwq1kMKYK8rLtd +/GYSoagDtEO/FaGlW0apDlslKXcnXXwLpE+qmExjsxRoGsXbbYF5PxEHdxkS +Vfa7HLrzZAuYSv/z0kQWv58HKxIl8pVgMsZFREoe5zOxek96KcNijNkmdiUS +FezP/LwUrwx3/m76ZIyd6jU0yHFdGfTdVQZOY9NPHJmQ7laGWT+yad1WEgk0 +ZrPsN1aB/PqZHn5lvH80p1Ua5LeBB+2Cs8Y2EknKXUw4P6oKvE2fnxeqk6jx +3ILyCpsafM/MrljAPkw59RCyasD7WXjMRINEOa0KykZualCFttiNY8v5PHy7 +3KsGRnVVwmo0vN6KMUXi5XY45HnDpl2LRFKS0oSMkwYUX7l5wlifRKpFkTyr +iAa8N/TyNPaQyIt+alHNmgYu3VXVqdhZ8hn9HodpwLfyfu0UNnt+9e1n0TT4 +6b7rYpkZft9ySIeMGhp4Z+3mVDbH39Msj2xleU0YI7yuaVri53vecrvjWi3I +YajrJtiTKC9cwba2QxveHaLJzLqTqCsK7TxdpAf5Nu3fqRMkknV7Z+0a+A+Y +OW2WO1VMIsbfuiqpGADfJfV6qU4SiU48WCfqZQSu8fYVrH9IFKm560uGigls +L+P7Zas+gbymfrUJkqYgPk89nfCeQJVGEetyX5vBZEBcRG3eBCpc8H9Scdkc +OJ9H+NQNTKDl3WKvWhP2QQW7JmeG0iTqY2GfG/K0gjcroU73widR8KaQtER5 +G6gq1Ut80jiJqvzaHl9JsoUX36Y8TQSmUCwlvrTNzw4cTF8OTXlPoUWLPQef +u9uDeokVPeDJFNJzSd89ZrcfSq4uGs7JTKO34tn+rZoOoBL9ZGjr8WkkUXyq +sWTrAXh50czIcHQaPRhUsbTmPQhuLqYzkmYzSLpn1idq6iAouAT7apTNIM0r +6RUFg4eArdlg6xfuWZTNQW3PaHGE29finzaiWVS3W/1TUr0T3NdNSM2InkVZ +O88J/CpzhpbDle6Nt2fR689FZzRTXGBvlbmO9tgsqrW6oRB64jAkHg8dmpKa +Q3NB+1mC6a7wb5/3rxD7ObS4R9l32tgNnAPrjXYlzaGSqY/LETrusC7/mvi+ +hjnkmFfk7crjATdjJ7VCJ+fQ3Tv73NmTPcCp9PqDpc3zSE/y7cq/Kx5wyyhP +RdZ6HskP+nx64+cJbNNmaUYx82iUO8DmxognvFjIfHGwaB51pVp7mx3wAvua +DfmFL+fR5ehc7iNdXqDq2dn3aG4eNTb9XfE294Y9V0zmvAUptOEwJGs+9Iai +S6X2quoUkhF6/npTozfw/bF5cwNbo8NKbG2TN0i4uHPxalDIfpdL6Ycn3mDN +GlM+iX15U9TL4y+8gT3s060SGoUk+so3tH3wBjP+M8cEdSik4CaadXjJG4SS +3sje20UhPY/pkiQtOtjkRchJm1Oo+OpshLUOHZ59eBIXhS3UPW8oqksHedVt +mZ3Y06ZLPSUGdIi/LscTb0Hh7xcLa4cRHQaCghc/7qMQ35KA00Y7OlzrHWxI +sqbQ6AXt9blBdPDtn++o2E8hu+c7e3xC6CCYkCP8G7uJRT9XI4wO5ZobpKwc +KHQ1wlC7OZIOt0REfSexrZ3MPMeO0eGXUtGU0kEK1Ss41W87R4dc5aXKDEcK +pTbE+T0oxvMnLTTpuFIoiJapF11Ch7M2Et7HsS1La9brltHhTiz9eQs2V+Z4 +6f1KOhwwM+6ycaNQUrgtWXePDnlZesN0dwrFKSsE1DbToSQ/6+9JTwr5Z74M +vNNPh2z/reOpDAqZ843vCh+kg8Hf6/GvsLcmsfDShumQPKz6npug0Hi4dmXN +GB2Ka5Kbk7E9rXOnbk/ivKTFxTgfCjmuiQiu/kmHF0uB805+FDKLkAitEGHA +PYPh8pFACjXnnrHIEGNAVIVWnXQQhXZ1zCtESzDgeJhQhBO2huLLj8bSDPBI +ceLoxBbvPWb8WZEBbMe4T9/F/0ET+n0iXNoM6Kc1zYaEUugi281HPvsZcLRs +i1lVBF6/Ok+W1QEG6PftvTSAfdolOlzzEAOkdX6m8UdSKPqerdJfZwZYnp66 +GYbtSbCm/+fFgAc0m40aRyik2e5FfxrGgDqZ71o5URTqTVfklk9jwN6zMvtQ +DIWqEK/vt3Q8vmIhScc+PbXQWnmJAUdGw4vPYtPMW+N1Mxlwwrlkqgs7lcV7 +3iqHAf8pbEVusRTaE3LzY3QFAwwmzpEBxygkJXVWx7CKAcvWAb4p2AvtIZfY +bzNg7idrXgV2/hZklXqXARqXdxtNYv/u63tc8JAB1pmZJr5xFLpnKVnS2caA +XgcV0/3HKXT+J9uay+0MCH1/MTAE26uE9HTqYICVWZD1eWx+joeSo69x/zIT +dzdjBzY4Xlx5j/NaV46qxlNIXuW/KIUxBrzaIb5pEftn7/Hu7+MMaGfx/M6T +QKGuJIZG9TcGbLeZCFXAjh/SIvUmGeBn1lBlj/0pq9vVhmJAceniaDl2xjoB +01hWAuJfO+nZnaBQ43yfSyQ7ATZnc74S2F/7ysKD1xBAa20xjMPedc/kptd6 +Aor58r8WYY97RK9aCBCwmdVOfhGb39J0o6kgAYdO7RLjTKSQwc6NykiYgPnk +6VoJ7DTeioOa4gREyl2bMGSOPxyokZQlYN2PJnQKmyiqaBOWx3lOXoi9xLw+ +LWZggyIBnzfyuBVgjxOCvBzKBAhxb9jczBwXNPOd1CAgmuXb2VXsh38EE8Zp +BCTOznGuP0mhse+DVwa1CBAgs3aIYOs/jm3p0SVA9WxtnDr2aGCV9CMgwNt/ +bsUVm8/xmPZ9IwK2GJY3+WLrGe+1rDEh4E3x/LYI7FTx4ZiivXi+s/IsydgP +OKrTci0IuPZqvU8a9sjMsVtXLQkYQUejrmLrPhN+d8GWgJCBodQybK+a4Ylk +ewJemH/JvIN94UY120kH3A8XR/OH2MPh5hpRjgQYnesqasPmdRMxC3XG/TjQ +bvuaWc98xNX/MAG6CrsL3zHv33z8vJsHAZ0teSZDzDxcFvmOXgS8vftv+jiz +3qJIvT2dgIIx8swEs97QyGtLggCNlFaFWWa9jtvje3wJOP1NOGCBme/+8d/g +T0CPeb/TMrN+voWQQSBeL6/U3Cqz/gXRbdrBBIznvNH4y6wfPbpbPZSAx0dX +xdhOUYiHXuOoHI7zbL5WyoG90yY+RD6SgFnVyuG12F76+85IRRFgYKzVyomd +oiiWLRpNQJ+QujUXdh3/2F2BWAI0vbJPcGMPrda0c8cRULsS78LDrP81fmhN +PAGcD7r7mdZ5u2/5bwJzf13n4sX+P33k+p8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.8136917480174023, + 1.2194948591572907`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.8136917480174041}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10079,21 +10860,21 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.8136917480174023, + 1.2194948591572907`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.8136917480174041}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10107,105 +10888,105 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1nk4Ft0bB3BbJVtkJ7ImInosWXqdO0sieypL9ucZ+y4hkUp6S0L10oKs +2aWiRH6FSpIUpc2+VGM3hLT8zvPHXHN9rjNzn++558xcI+sVYs9gY2FhmcIH +8xzWuV3pflenoZ/thz0t60lkOF2o7WVSgfg5ZAOYHszVuaxg0ohai5Z7mbal +v1rLo/kUvdJyv9CKXROd0LLGpANdrnY4/xT732dijxPK3qAdQh/fPMOu7wrL ++UV7h0bcJz3asMlP7XExDR9Q6cVU3XZsiTF5lx/GX1B67v8cO7D3zcTpRXQM +IM/zCU86sZt+kdzRZUNIxboz/A32+0TRY3XBI8hluDywB3t6rQm5QBtD7EZi +1b3Ya1NCnTSXxtEBQlD/M7a0QHZbWMM3pLg3m3cA21ryR/G08STareCa+hWb +uCknosY5jfbyXjKYxE5QtEkK6JhBy2mHdsxhfxDt2RFZNocOoZQfq9h0Z3+/ +Synz6M/+X09ZuUg0e4Ml704whVx6f/atw+aUU+Ofoy2ixqX8r0LYl+ktZvzC +P9D6WMuPktgyt5wS1Jd+oFLt04Ly2LqqZ6aDGpZRgFSOJw3bV2eggzT+hcon +YugO2AvRRzi4tvxGQbGXrrlin2jg3qXM+QcNN+iL+2BngW65T8df9I2TNhuL +TS9qMwkvY4W9Z55wFGOXPbs0mCjJBvH+exJqmHm/usWlp7BBwQFHo0fYcSqL +d28Hs8PYgFz+O2bealn5GdoamFu1aVvPTaJPXZNNfwrWgLCDfrIotsz8fWc+ +4bUwPnQ7VRG7Qss6Q21pLayoGB01wm6tj2UNbOCEAKX5qgTsxZbugW/GPMCR +GPBgHQ+JNlry8B9r4gFieTlFElujxwR49XihcPV5nTq2/2jtzR3b+aBvSJnL +CTuUrUPjHx5+uJe/VF2NPSZXNZf0QwB+zJxfCuTF/SHa17/W3Ahp0eIyZ7DZ +ysdlxcI2gr7UWHYutozmZvuyiY3g2qx9tRvb2TjtTuegIPyJr01FfCR67R0e +IfpSGPZJL0QqbSBR/63U8x6cItCcZDJnij05UVZQaioCXE87m+nYXJEj3QaP +ReDkjYuMAmyT0w5aHrWiMKr3sFSBn0QPC3UWS3LF4WRjoOpOARIVjv2M0o+U +gut242I3BEm090Byf0SlFPR2WCc0Y0+2Cu6pHJeCK3mr6t+xtQpVhWWcpOHj +OtnQnUK4n15ud9cYboZH4ekBvdjzM4NHv52SAZ+RBmtFERIJBpncu2slBxti +KlqWxUg0Xsjla+svBxfyZ8O2ipPowZcuyakzcsDjHOTviH3Y0vXUlsdyMNvO +p1+PXbgtyv4qTR6ifoztj5fA85O3ZuNFFaB/W1KYyCYSOfhwq1kMKYK8rLtd +/GYSoagDtEO/FaGlW0apDlslKXcnXXwLpE+qmExjsxRoGsXbbYF5PxEHdxkS +Vfa7HLrzZAuYSv/z0kQWv58HKxIl8pVgMsZFREoe5zOxek96KcNijNkmdiUS +FezP/LwUrwx3/m76ZIyd6jU0yHFdGfTdVQZOY9NPHJmQ7laGWT+yad1WEgk0 +ZrPsN1aB/PqZHn5lvH80p1Ua5LeBB+2Cs8Y2EknKXUw4P6oKvE2fnxeqk6jx +3ILyCpsafM/MrljAPkw59RCyasD7WXjMRINEOa0KykZualCFttiNY8v5PHy7 +3KsGRnVVwmo0vN6KMUXi5XY45HnDpl2LRFKS0oSMkwYUX7l5wlifRKpFkTyr +iAa8N/TyNPaQyIt+alHNmgYu3VXVqdhZ8hn9HodpwLfyfu0UNnt+9e1n0TT4 +6b7rYpkZft9ySIeMGhp4Z+3mVDbH39Msj2xleU0YI7yuaVri53vecrvjWi3I +YajrJtiTKC9cwba2QxveHaLJzLqTqCsK7TxdpAf5Nu3fqRMkknV7Z+0a+A+Y +OW2WO1VMIsbfuiqpGADfJfV6qU4SiU48WCfqZQSu8fYVrH9IFKm560uGigls +L+P7Zas+gbymfrUJkqYgPk89nfCeQJVGEetyX5vBZEBcRG3eBCpc8H9Scdkc +OJ9H+NQNTKDl3WKvWhP2QQW7JmeG0iTqY2GfG/K0gjcroU73widR8KaQtER5 +G6gq1Ut80jiJqvzaHl9JsoUX36Y8TQSmUCwlvrTNzw4cTF8OTXlPoUWLPQef +u9uDeokVPeDJFNJzSd89ZrcfSq4uGs7JTKO34tn+rZoOoBL9ZGjr8WkkUXyq +sWTrAXh50czIcHQaPRhUsbTmPQhuLqYzkmYzSLpn1idq6iAouAT7apTNIM0r +6RUFg4eArdlg6xfuWZTNQW3PaHGE29finzaiWVS3W/1TUr0T3NdNSM2InkVZ +O88J/CpzhpbDle6Nt2fR689FZzRTXGBvlbmO9tgsqrW6oRB64jAkHg8dmpKa +Q3NB+1mC6a7wb5/3rxD7ObS4R9l32tgNnAPrjXYlzaGSqY/LETrusC7/mvi+ +hjnkmFfk7crjATdjJ7VCJ+fQ3Tv73NmTPcCp9PqDpc3zSE/y7cq/Kx5wyyhP +RdZ6HskP+nx64+cJbNNmaUYx82iUO8DmxognvFjIfHGwaB51pVp7mx3wAvua +DfmFL+fR5ehc7iNdXqDq2dn3aG4eNTb9XfE294Y9V0zmvAUptOEwJGs+9Iai +S6X2quoUkhF6/npTozfw/bF5cwNbo8NKbG2TN0i4uHPxalDIfpdL6Ycn3mDN +GlM+iX15U9TL4y+8gT3s060SGoUk+so3tH3wBjP+M8cEdSik4CaadXjJG4SS +3sje20UhPY/pkiQtOtjkRchJm1Oo+OpshLUOHZ59eBIXhS3UPW8oqksHedVt +mZ3Y06ZLPSUGdIi/LscTb0Hh7xcLa4cRHQaCghc/7qMQ35KA00Y7OlzrHWxI +sqbQ6AXt9blBdPDtn++o2E8hu+c7e3xC6CCYkCP8G7uJRT9XI4wO5ZobpKwc +KHQ1wlC7OZIOt0REfSexrZ3MPMeO0eGXUtGU0kEK1Ss41W87R4dc5aXKDEcK +pTbE+T0oxvMnLTTpuFIoiJapF11Ch7M2Et7HsS1La9brltHhTiz9eQs2V+Z4 +6f1KOhwwM+6ycaNQUrgtWXePDnlZesN0dwrFKSsE1DbToSQ/6+9JTwr5Z74M +vNNPh2z/reOpDAqZ843vCh+kg8Hf6/GvsLcmsfDShumQPKz6npug0Hi4dmXN +GB2Ka5Kbk7E9rXOnbk/ivKTFxTgfCjmuiQiu/kmHF0uB805+FDKLkAitEGHA +PYPh8pFACjXnnrHIEGNAVIVWnXQQhXZ1zCtESzDgeJhQhBO2huLLj8bSDPBI +ceLoxBbvPWb8WZEBbMe4T9/F/0ET+n0iXNoM6Kc1zYaEUugi281HPvsZcLRs +i1lVBF6/Ok+W1QEG6PftvTSAfdolOlzzEAOkdX6m8UdSKPqerdJfZwZYnp66 +GYbtSbCm/+fFgAc0m40aRyik2e5FfxrGgDqZ71o5URTqTVfklk9jwN6zMvtQ +DIWqEK/vt3Q8vmIhScc+PbXQWnmJAUdGw4vPYtPMW+N1Mxlwwrlkqgs7lcV7 +3iqHAf8pbEVusRTaE3LzY3QFAwwmzpEBxygkJXVWx7CKAcvWAb4p2AvtIZfY +bzNg7idrXgV2/hZklXqXARqXdxtNYv/u63tc8JAB1pmZJr5xFLpnKVnS2caA +XgcV0/3HKXT+J9uay+0MCH1/MTAE26uE9HTqYICVWZD1eWx+joeSo69x/zIT +dzdjBzY4Xlx5j/NaV46qxlNIXuW/KIUxBrzaIb5pEftn7/Hu7+MMaGfx/M6T +QKGuJIZG9TcGbLeZCFXAjh/SIvUmGeBn1lBlj/0pq9vVhmJAceniaDl2xjoB +01hWAuJfO+nZnaBQ43yfSyQ7ATZnc74S2F/7ysKD1xBAa20xjMPedc/kptd6 +Aor58r8WYY97RK9aCBCwmdVOfhGb39J0o6kgAYdO7RLjTKSQwc6NykiYgPnk +6VoJ7DTeioOa4gREyl2bMGSOPxyokZQlYN2PJnQKmyiqaBOWx3lOXoi9xLw+ +LWZggyIBnzfyuBVgjxOCvBzKBAhxb9jczBwXNPOd1CAgmuXb2VXsh38EE8Zp +BCTOznGuP0mhse+DVwa1CBAgs3aIYOs/jm3p0SVA9WxtnDr2aGCV9CMgwNt/ +bsUVm8/xmPZ9IwK2GJY3+WLrGe+1rDEh4E3x/LYI7FTx4ZiivXi+s/IsydgP +OKrTci0IuPZqvU8a9sjMsVtXLQkYQUejrmLrPhN+d8GWgJCBodQybK+a4Ylk +ewJemH/JvIN94UY120kH3A8XR/OH2MPh5hpRjgQYnesqasPmdRMxC3XG/TjQ +bvuaWc98xNX/MAG6CrsL3zHv33z8vJsHAZ0teSZDzDxcFvmOXgS8vftv+jiz +3qJIvT2dgIIx8swEs97QyGtLggCNlFaFWWa9jtvje3wJOP1NOGCBme/+8d/g +T0CPeb/TMrN+voWQQSBeL6/U3Cqz/gXRbdrBBIznvNH4y6wfPbpbPZSAx0dX +xdhOUYiHXuOoHI7zbL5WyoG90yY+RD6SgFnVyuG12F76+85IRRFgYKzVyomd +oiiWLRpNQJ+QujUXdh3/2F2BWAI0vbJPcGMPrda0c8cRULsS78LDrP81fmhN +PAGcD7r7mdZ5u2/5bwJzf13n4sX+P33k+p8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.8136917480174023, 1.2194948591572907`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.8136917480174041}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10215,7 +10996,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5082122808512888}, + AxesOrigin->{0, 0.8136917480174041}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10243,7 +11025,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.8136917480174023, 1.2194948591572907`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10251,9 +11034,9 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913242457281837`*^9}, + CellChangeTimes->{3.9913242457281837`*^9, 3.994355114500832*^9}, CellLabel-> - "Out[111]=",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] + "Out[127]=",ExpressionUUID->"933e6561-35e1-465c-b705-37d1d6886a52"] }, Open ]], Cell[CellGroupData[{ @@ -10316,158 +11099,161 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9917997871187477`*^9, - 3.991799792469698*^9}},ExpressionUUID->"8faa67fd-f295-ea48-b116-\ -d12d9d52c36b"], + CellChangeTimes->{{3.9917997871187477`*^9, 3.991799792469698*^9}}, + CellLabel-> + "In[128]:=",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.955409411483839`*^-270\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 112, - 45, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246104725*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.649903619016824`*^-272\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 41, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994355114696783*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], +In[128]:=",ExpressionUUID->"90258b71-de7b-41e4-9a7d-2740a3671178"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.877419838456823`*^-281\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.419528319735338`*^-284\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 42, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994355114706009*^9}, + CellLabel-> + "During evaluation of \ +In[128]:=",ExpressionUUID->"152755aa-6964-4c1d-82a9-d0ceeb05a22d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1838826134420884`*^-295\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 112, 46, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461217346`*^9}, + 128, 43, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994355114714285*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.990320554242227`*^-292\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 112, 47, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461427383`*^9}, - CellLabel-> - "During evaluation of \ -In[112]:=",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], +In[128]:=",ExpressionUUID->"730cbfef-4f65-48a9-9fa1-c9334b32ebac"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 112, 48, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246159645*^9}, +during this calculation.\"", 2, 128, 44, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.9943551147232437`*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], +In[128]:=",ExpressionUUID->"d756f105-7ac8-4ce7-b68a-157527cc86b8"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VO0XAHBR9i2yNpi5M0bJWvaMc5IU3ngThVciiUoSUpS1lFKSECJr +WixzJyIqCRVRWuxFlDYJZYlUfvf31/18/7jPcz7nec459zJ27Hf04efj4xNa +wMf3/+d0f3MjK6HQIqroneR3HbRov6wYtqY7FkSPCIRXkCqAcm07FLuTwSmh +uDyQ1IbQf290CXTnQxymr7AiObB4VCF5tusmpHrZOAmQG+HtXfv9k131UMwa +vGzC3QbWrOG+710v4byUlL1myT6Y7TJOHe96B8vrwJE/NwIa1l4tfJE/AVx7 +tsXjokSgva3+uEPrDzh0C9qwjqfBEv/tN4TWCqB005h04YZsSNa3vmPvLIy7 +ds2Wpy/Nh550vbrv0hJ4jvt1mR3tCiQURrXxKy3GSjGf9Csy10Ah5f2pC9my +aBYZfXjl1Rtw0snG4uW0HM4tuqYZWVsCyhXPlPkXyKNIR6Zf36MSKJN1+qkv +Jo9f5jHbqK0EOl96kOfV5FEcOz52vi0B1qYQYtMGeTQ/+WrgGV8p1G/MEXye +IY8nqysLL60phT/WU8+emitgqnxYZH5tKQSb5m1vjlXEOGnxL+ZFZWCbKzlp +d0YRC4gPR3JKyoAQOhr/LFURpViThb9vlsHz9i28V9cUUeC2ze2i+2WgEygu +0P9MEX281vZWd5fB56JDRT+UlXCDh0LjaxEuuC+x/7a0XAkZKvHW4n5cWHXk +Tszlu0qYOWEm+WAfF0TfLZNnPKJ8tdU7MJgL1VwBYPcoofDkl6raSC7I21Un +6c0r4RLu2LxSKheex7AM1tkpI5/w5okndVywGvsVHvBeGZunKkdERUkI25Ci ++WBEGYtZjgdjxEkoy9PulZ1Wxln9OY8pSRIUnTxNq4WXorbXCecOWRJGbj/8 +KaCzFHsClzw/qELChdikkIzDS7E75ccCUz0S3smxAxolaGhNV69o2kyCwv77 +KgoKNHwaIRf81ZmEf5pcnu6m03AFZzBFzIWEyvAELalVNCyPDlpg5U7C6bfj +w64uNHy451BM6k4SVl6/4zuWT8PLrTTjOyEkxJhv8lI2UcGu7gJ/mQskbPC4 +/MPYUgXPRewUFUklQTL66zHnf1TQ5c+9jN9pJGQ1xBUleapg23HtxN5MEm7b +1nwVPKWC+qZt7QfySRh3YYZO9Kggd+iijCSPhKrwQKHFQypYpkP//OomCZFZ +99J1RlWwuuNAeVoFCeIDW+/s5lfFwYosLdnbJGj4nuEb0FRF4m4Q71MtCR4H +p063HlFF12E5u/kWEtQvWtKG41Rx8h09P+Xp//N3rlQoSRUPhYlMsttICP+9 +/LlloSo2r+o6ZfmShNRjHnLVrarYb+Nw0rmbhNbzj3OuqKghI7Bn6df3JJiV +ZVRE3ldDB+Xtu7tmSLDqevZntEkNxTwLV8/MkmDPt3D99pdqeCyt95D8HAne +jgE98EENPwYk69r9IcH6CCMqehEdr3ZfLkpdwINAtemCNSvouLzvhjBXhAdT +5UlNs7p0HMvbfbVIlAfhG1Z84xnQMeHg2spLYjyIO+BpRFjQUXfNZ/VICR5k +Njxp4t9ER/qSwy6sxTxo9M351hBKxyWWVX7TCjyw+W0qc/QIHVut1Fc/VOTB +s6R2I4NoOkp+Dj5+XokHPdUi0YWn6GhsHRZBLOXBqFiITFwWHU/fIeXYqjwI +zpU05uTRse5XcfEA5RmD6/9NXaGjSQzzbroaDwQ8+gt9uHQ0tfG0X8DggSK5 +wdi6no5tPmrrKpg8yLZ6/9/fR3Ss2id0143FA6InIrqyhY62x7V4fylr85c3 +szvomKOupAhsHlg6qbgLfaZjmqDYx7xlPPCf+R7dJMFAzc9542NaPDA7sEv+ +owwD/RrVRcO0eSA83FssoMjAJqVfZvOUr7xu6LQgGJg0t+oDvy4P+mtTtW4Z +MXB9xsGAT3o8KDEWrX+5moGrPvA5u+pT+SUjt44jAwc/6Lo0UZbP941dYcfA +lg96VdkreeAQZ9qdt52B5Zljw+oGPFD9W7rv/k4Geos2NkdTHgklBPp2M1Bd +//6TbsrxfmI6iiEMVFCbNYw25MGWwagGwzAGuoXm5bVRZrlNumyOZODXgrUr +aUY8qLPrO5YYz8B/sv59WEI5sXGTUslZBk480Gwep+zOeVTWnMzAtKC+SX1j +HszqcHsWZjPQTKr8UTHlpqvM/UQ+A40W2wUMUU6jpy/EqwxkNl9BZRMerJSJ +0T3CY+Ccc6pfBGW+hKnG9EoG2o8U3r9B+ZnAHrfKOwzcW+Nv1UE562j/2Ks6 +Bha9K/75m/LeKce47w+p/JkRvQxTKv8Bj5WlWhgoZ5M0spay8KfVpNZzBtZv +qNL1pty5nVxn28HASJZrYRTlwm7Wa99eBgYeNrHLoBy0KSMw7i0V/3lFdZIy +PpEQLBhioP/eeysbKUuujb1U94Vav/xrSAflvjvTev2jDDRt8Bt5T7nEYO+j +uQkGOl75lTFGObz07X9Kswxsk/aLnKG8ge303egvA5P3HM78S1k+p+mEkwCB +QY0TowvMeDCkwKEFCRN4603+UX7KN5N4vHMSBF5QcbDioxwtwl5fKkMgN6ve +eo563yE2880TBQIvKTcdn6CsOicZ9JlGoCP/ivnPlEeCjwkJEgSW+1VVvqZc +M/Izi6lBoIi4WUkL5Xgf/5VrtAg8sjl64DblLf0Djz30CUyxd3EqoMza6rzt +qBGBFRVJwgmUf7Q1/8hYTWDW0Myf/ZTrNljEVyGBb997GjpSTnxwU6VjHYE+ +HhlcfcruZhrlP2wJHLwSvE+S8uwK6X5tZwKjaVuq7lPnN52tHLPKjUDmmmvy +qZQnpdRZptsJ9Kpnd/pSHp0w3WO1m0BO+dPDiyh/9bGSsA2g4hM+ve05dZ8+ +d9mTDsEEzhzPvJJO+d0d72m3CALz9T7uYFB+qx2Q4RlLoO9Edc8gdV/f5Bw2 +33WSQFsB2aocyp3HzsYeOE9gY+KZa7KUn9hVScZfIfC9rGXEG6peHt97wDt7 +g8C74wMW8ZQbdVudLnAJLJ2P3adPuVZ2MPNyNYHDu5Xljq6izuu1qMatpwQ+ +Kq8u/EHVK3ej3JOalwTSgs5/OEW55L7avrouAmetJTNVKRcVGJS3DBL4JtfR +C6n6z9zrAe+mCIyJLIz20eHBxT6/d59+ETgRA6Gfqf6R4hAc922eWj/e6qMf +5cRV8S0zIkzMXT9rsoPqP7FzvK1SqkwsuMl8YKRJ1UfCokBzaya2mAyp+qnz +wO+PlKylHRPdL40TDVR/27VfuXL9v0y0l9rCXUrZc7Pub0c3Jja2Ve98SPDA +aalr/O4AJnZKD7jNUf3UvLgkNy2NicruahY/qP78ml6cs+4SE8etxgQNKIen +Xb88mcPEwT9vKoOpfl4VU5TleJ2JPhXibSPyVL275KZL3mWibkvJ1ENZHixf +lJJ0YpCJdnvONy6h5kVTePI5w49MXMx1dzUUp+IbT0ocGmaiRojr4GZqvhS+ +PnvGcpKJUVtnnp6m5hH95sn4v4Is1JzdrDuwiKqn7UeiQ7VYyO7pvr/8Lwm3 +2sOi1PVZmGvuPbScmm9Otocj2w1ZWOUQL7zsNwnJhgePrgQWcqYfO6r+IkFC +fP/h0U0sjCw1WDQxRcLC6h2Buw6xULs/8gLnGwnfZWw9t9Sz8IyZyYR7Lwnd +/sTzPY9ZOMpvcV6gh4S6R78gqpWFm+p6f1ztIiEpvFjtWicLY2XEFw23k6D3 +Tvzt7DALTZwfx26m5nsAr21btqw6Xiq4+PxuAwnDDs7/De1UxxMzUbrjN0h4 +eV27ZWa3OnaG1Thsuk5CjYDgaon96vikoNWZvErCqapKZaMwdXxR06HgV0jC +MjXF3pNn1ZGmRUuuzSbBd7TXZUWlOtp8OOwsnETC0BnPLUFCbDR/JdYpH0zt +P6xF6Imzsbg7p3/LARJ+rp/99k2ajecm9PVT95MgKpAct1uZjbtUZ6vE/an4 +wxoqPLXZmK1c4/OJ+v6K8GHLOmxmI/vUU6l/tpAgbzHStiKHjT7Zv5f0GJNg +M3bI5oORBm72CGX7j3CBpq96QthcA7vCNlY3fOLCaFBj/Yo1Gvj9xdQrhfdc +SJmWNg+y08Bzb7ffuNXDhf4/13Xmt2vgVTkdtaZHXAgSfyOrdEoDH3ZIW9vm +ciFzOfb/81oDK3gyke3/cmHEWzi4ImoZblny+nb8tTLqf0SB/2T9cvTe+Ib/ +CacUZJ6yE8kxTdT879vY6ZZioMVz/zUy0kLRnnmWGP0GpK8wlZb11cbM4w1n +RaOvwRPlNYYT53XwUnT4mOLbIjCj1SfpdurieMzlsQMKV0BSID/EK1YPuwe9 +L34KLADVGDVzV7Y+pozH26Vz80BE3b3S8bE+jnFGU7UX5oIOR4l7aNtKrJ8s +nG4VzYagfpkGW75VmNX1VS51KgPGJs4426SvQvZzuYuP4SKs132UaaNtgD5l +OR1P61OgdmL13M9nBihx4fvDuTXJEKC1sveFjyGu9+X3NKQlAWd0Z7uriBFW +eb7SNptNgHUsxY0S+Ub4rodwuLEjHpZFnz5cb2yMz4dqox8ZxoGmj+l99V5j +fLmuL/shIxZ8av2OVxwwwWFxgT/tmlFwP7d953c5U5SsSOtr2hgOk9fmf+pW +maJJ3wv3OVYoeKsXi2RuNMP1x3YVcBqD4LvmBaOb42bIb7Lk2qJV++F24dzg +VPxqFHspwEpU2wNuVkxcrWqOx3o69/d2+8DSfSerderM0adLTG3goxckzu8y +TKg3x4KCrTt8e7yAP9ma96nRHLfWnzjws8ULhisXXc9tNkdahMWgPs8LaviO +p8u8MscOQb0TUke9wC0l+tD0B3PU1r/2dbesF6TfCTOsFeNg6ftjWUc2eIKc +qD9v41YOvmn1VTdK2waFayPCx105GBLG/nTv6DZYGZG49oI7B8UTGjpcvLeB +/TjZ0e3FQemLt0Sb9LbBic6pWW9/Dn7QXnfmdKs7zORHWYbHcPDprdyGVCF3 +6F194VVRMQclBd0LQhLcwO9gYZZNGQc5p93z7ULcYLrsls8IycG9prPbDba5 +gQzR/VO/koNCfaHDZrpuYCesQrtXx0H/jRcXLW13hbvtRTtfdXCQyPMpUWG4 +gq3kbe3Qbg4e+zLmIybmCt3rm6cVX1PxjU5oi065wGTN13iPAQ7mey2sNWt2 +Ae08vdIvwxzUuZvA3RXkAnd714Se+cZBpU9CZa/dXcB2yWbQHeeghGDZTq/1 +LrDr5MEXIVMc3ITX2y7TqPXqTmQqzHCwMj8/YIuQC8T+uuhd84uDliclL6n+ +2ArSBte1tv3h4IEmW9ufb7bC5X01U/PzHNQarz4w8Hgr/A8HXWne "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10481,117 +11267,116 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwV13k8VO0XAHBR9i2yNpi5M0bJWvaMc5IU3ngThVciiUoSUpS1lFKSECJr +WixzJyIqCRVRWuxFlDYJZYlUfvf31/18/7jPcz7nec459zJ27Hf04efj4xNa +wMf3/+d0f3MjK6HQIqroneR3HbRov6wYtqY7FkSPCIRXkCqAcm07FLuTwSmh +uDyQ1IbQf290CXTnQxymr7AiObB4VCF5tusmpHrZOAmQG+HtXfv9k131UMwa +vGzC3QbWrOG+710v4byUlL1myT6Y7TJOHe96B8vrwJE/NwIa1l4tfJE/AVx7 +tsXjokSgva3+uEPrDzh0C9qwjqfBEv/tN4TWCqB005h04YZsSNa3vmPvLIy7 +ds2Wpy/Nh550vbrv0hJ4jvt1mR3tCiQURrXxKy3GSjGf9Csy10Ah5f2pC9my +aBYZfXjl1Rtw0snG4uW0HM4tuqYZWVsCyhXPlPkXyKNIR6Zf36MSKJN1+qkv +Jo9f5jHbqK0EOl96kOfV5FEcOz52vi0B1qYQYtMGeTQ/+WrgGV8p1G/MEXye +IY8nqysLL60phT/WU8+emitgqnxYZH5tKQSb5m1vjlXEOGnxL+ZFZWCbKzlp +d0YRC4gPR3JKyoAQOhr/LFURpViThb9vlsHz9i28V9cUUeC2ze2i+2WgEygu +0P9MEX281vZWd5fB56JDRT+UlXCDh0LjaxEuuC+x/7a0XAkZKvHW4n5cWHXk +Tszlu0qYOWEm+WAfF0TfLZNnPKJ8tdU7MJgL1VwBYPcoofDkl6raSC7I21Un +6c0r4RLu2LxSKheex7AM1tkpI5/w5okndVywGvsVHvBeGZunKkdERUkI25Ci ++WBEGYtZjgdjxEkoy9PulZ1Wxln9OY8pSRIUnTxNq4WXorbXCecOWRJGbj/8 +KaCzFHsClzw/qELChdikkIzDS7E75ccCUz0S3smxAxolaGhNV69o2kyCwv77 +KgoKNHwaIRf81ZmEf5pcnu6m03AFZzBFzIWEyvAELalVNCyPDlpg5U7C6bfj +w64uNHy451BM6k4SVl6/4zuWT8PLrTTjOyEkxJhv8lI2UcGu7gJ/mQskbPC4 +/MPYUgXPRewUFUklQTL66zHnf1TQ5c+9jN9pJGQ1xBUleapg23HtxN5MEm7b +1nwVPKWC+qZt7QfySRh3YYZO9Kggd+iijCSPhKrwQKHFQypYpkP//OomCZFZ +99J1RlWwuuNAeVoFCeIDW+/s5lfFwYosLdnbJGj4nuEb0FRF4m4Q71MtCR4H +p063HlFF12E5u/kWEtQvWtKG41Rx8h09P+Xp//N3rlQoSRUPhYlMsttICP+9 +/LlloSo2r+o6ZfmShNRjHnLVrarYb+Nw0rmbhNbzj3OuqKghI7Bn6df3JJiV +ZVRE3ldDB+Xtu7tmSLDqevZntEkNxTwLV8/MkmDPt3D99pdqeCyt95D8HAne +jgE98EENPwYk69r9IcH6CCMqehEdr3ZfLkpdwINAtemCNSvouLzvhjBXhAdT +5UlNs7p0HMvbfbVIlAfhG1Z84xnQMeHg2spLYjyIO+BpRFjQUXfNZ/VICR5k +Njxp4t9ER/qSwy6sxTxo9M351hBKxyWWVX7TCjyw+W0qc/QIHVut1Fc/VOTB +s6R2I4NoOkp+Dj5+XokHPdUi0YWn6GhsHRZBLOXBqFiITFwWHU/fIeXYqjwI +zpU05uTRse5XcfEA5RmD6/9NXaGjSQzzbroaDwQ8+gt9uHQ0tfG0X8DggSK5 +wdi6no5tPmrrKpg8yLZ6/9/fR3Ss2id0143FA6InIrqyhY62x7V4fylr85c3 +szvomKOupAhsHlg6qbgLfaZjmqDYx7xlPPCf+R7dJMFAzc9542NaPDA7sEv+ +owwD/RrVRcO0eSA83FssoMjAJqVfZvOUr7xu6LQgGJg0t+oDvy4P+mtTtW4Z +MXB9xsGAT3o8KDEWrX+5moGrPvA5u+pT+SUjt44jAwc/6Lo0UZbP941dYcfA +lg96VdkreeAQZ9qdt52B5Zljw+oGPFD9W7rv/k4Geos2NkdTHgklBPp2M1Bd +//6TbsrxfmI6iiEMVFCbNYw25MGWwagGwzAGuoXm5bVRZrlNumyOZODXgrUr +aUY8qLPrO5YYz8B/sv59WEI5sXGTUslZBk480Gwep+zOeVTWnMzAtKC+SX1j +HszqcHsWZjPQTKr8UTHlpqvM/UQ+A40W2wUMUU6jpy/EqwxkNl9BZRMerJSJ +0T3CY+Ccc6pfBGW+hKnG9EoG2o8U3r9B+ZnAHrfKOwzcW+Nv1UE562j/2Ks6 +Bha9K/75m/LeKce47w+p/JkRvQxTKv8Bj5WlWhgoZ5M0spay8KfVpNZzBtZv +qNL1pty5nVxn28HASJZrYRTlwm7Wa99eBgYeNrHLoBy0KSMw7i0V/3lFdZIy +PpEQLBhioP/eeysbKUuujb1U94Vav/xrSAflvjvTev2jDDRt8Bt5T7nEYO+j +uQkGOl75lTFGObz07X9Kswxsk/aLnKG8ge303egvA5P3HM78S1k+p+mEkwCB +QY0TowvMeDCkwKEFCRN4603+UX7KN5N4vHMSBF5QcbDioxwtwl5fKkMgN6ve +eo563yE2880TBQIvKTcdn6CsOicZ9JlGoCP/ivnPlEeCjwkJEgSW+1VVvqZc +M/Izi6lBoIi4WUkL5Xgf/5VrtAg8sjl64DblLf0Djz30CUyxd3EqoMza6rzt +qBGBFRVJwgmUf7Q1/8hYTWDW0Myf/ZTrNljEVyGBb997GjpSTnxwU6VjHYE+ +HhlcfcruZhrlP2wJHLwSvE+S8uwK6X5tZwKjaVuq7lPnN52tHLPKjUDmmmvy +qZQnpdRZptsJ9Kpnd/pSHp0w3WO1m0BO+dPDiyh/9bGSsA2g4hM+ve05dZ8+ +d9mTDsEEzhzPvJJO+d0d72m3CALz9T7uYFB+qx2Q4RlLoO9Edc8gdV/f5Bw2 +33WSQFsB2aocyp3HzsYeOE9gY+KZa7KUn9hVScZfIfC9rGXEG6peHt97wDt7 +g8C74wMW8ZQbdVudLnAJLJ2P3adPuVZ2MPNyNYHDu5Xljq6izuu1qMatpwQ+ +Kq8u/EHVK3ej3JOalwTSgs5/OEW55L7avrouAmetJTNVKRcVGJS3DBL4JtfR +C6n6z9zrAe+mCIyJLIz20eHBxT6/d59+ETgRA6Gfqf6R4hAc922eWj/e6qMf +5cRV8S0zIkzMXT9rsoPqP7FzvK1SqkwsuMl8YKRJ1UfCokBzaya2mAyp+qnz +wO+PlKylHRPdL40TDVR/27VfuXL9v0y0l9rCXUrZc7Pub0c3Jja2Ve98SPDA +aalr/O4AJnZKD7jNUf3UvLgkNy2NicruahY/qP78ml6cs+4SE8etxgQNKIen +Xb88mcPEwT9vKoOpfl4VU5TleJ2JPhXibSPyVL275KZL3mWibkvJ1ENZHixf +lJJ0YpCJdnvONy6h5kVTePI5w49MXMx1dzUUp+IbT0ocGmaiRojr4GZqvhS+ +PnvGcpKJUVtnnp6m5hH95sn4v4Is1JzdrDuwiKqn7UeiQ7VYyO7pvr/8Lwm3 +2sOi1PVZmGvuPbScmm9Otocj2w1ZWOUQL7zsNwnJhgePrgQWcqYfO6r+IkFC +fP/h0U0sjCw1WDQxRcLC6h2Buw6xULs/8gLnGwnfZWw9t9Sz8IyZyYR7Lwnd +/sTzPY9ZOMpvcV6gh4S6R78gqpWFm+p6f1ztIiEpvFjtWicLY2XEFw23k6D3 +Tvzt7DALTZwfx26m5nsAr21btqw6Xiq4+PxuAwnDDs7/De1UxxMzUbrjN0h4 +eV27ZWa3OnaG1Thsuk5CjYDgaon96vikoNWZvErCqapKZaMwdXxR06HgV0jC +MjXF3pNn1ZGmRUuuzSbBd7TXZUWlOtp8OOwsnETC0BnPLUFCbDR/JdYpH0zt +P6xF6Imzsbg7p3/LARJ+rp/99k2ajecm9PVT95MgKpAct1uZjbtUZ6vE/an4 +wxoqPLXZmK1c4/OJ+v6K8GHLOmxmI/vUU6l/tpAgbzHStiKHjT7Zv5f0GJNg +M3bI5oORBm72CGX7j3CBpq96QthcA7vCNlY3fOLCaFBj/Yo1Gvj9xdQrhfdc +SJmWNg+y08Bzb7ffuNXDhf4/13Xmt2vgVTkdtaZHXAgSfyOrdEoDH3ZIW9vm +ciFzOfb/81oDK3gyke3/cmHEWzi4ImoZblny+nb8tTLqf0SB/2T9cvTe+Ib/ +CacUZJ6yE8kxTdT879vY6ZZioMVz/zUy0kLRnnmWGP0GpK8wlZb11cbM4w1n +RaOvwRPlNYYT53XwUnT4mOLbIjCj1SfpdurieMzlsQMKV0BSID/EK1YPuwe9 +L34KLADVGDVzV7Y+pozH26Vz80BE3b3S8bE+jnFGU7UX5oIOR4l7aNtKrJ8s +nG4VzYagfpkGW75VmNX1VS51KgPGJs4426SvQvZzuYuP4SKs132UaaNtgD5l +OR1P61OgdmL13M9nBihx4fvDuTXJEKC1sveFjyGu9+X3NKQlAWd0Z7uriBFW +eb7SNptNgHUsxY0S+Ub4rodwuLEjHpZFnz5cb2yMz4dqox8ZxoGmj+l99V5j +fLmuL/shIxZ8av2OVxwwwWFxgT/tmlFwP7d953c5U5SsSOtr2hgOk9fmf+pW +maJJ3wv3OVYoeKsXi2RuNMP1x3YVcBqD4LvmBaOb42bIb7Lk2qJV++F24dzg +VPxqFHspwEpU2wNuVkxcrWqOx3o69/d2+8DSfSerderM0adLTG3goxckzu8y +TKg3x4KCrTt8e7yAP9ma96nRHLfWnzjws8ULhisXXc9tNkdahMWgPs8LaviO +p8u8MscOQb0TUke9wC0l+tD0B3PU1r/2dbesF6TfCTOsFeNg6ftjWUc2eIKc +qD9v41YOvmn1VTdK2waFayPCx105GBLG/nTv6DZYGZG49oI7B8UTGjpcvLeB +/TjZ0e3FQemLt0Sb9LbBic6pWW9/Dn7QXnfmdKs7zORHWYbHcPDprdyGVCF3 +6F194VVRMQclBd0LQhLcwO9gYZZNGQc5p93z7ULcYLrsls8IycG9prPbDba5 +gQzR/VO/koNCfaHDZrpuYCesQrtXx0H/jRcXLW13hbvtRTtfdXCQyPMpUWG4 +gq3kbe3Qbg4e+zLmIybmCt3rm6cVX1PxjU5oi065wGTN13iPAQ7mey2sNWt2 +Ae08vdIvwxzUuZvA3RXkAnd714Se+cZBpU9CZa/dXcB2yWbQHeeghGDZTq/1 +LrDr5MEXIVMc3ITX2y7TqPXqTmQqzHCwMj8/YIuQC8T+uuhd84uDliclL6n+ +2ArSBte1tv3h4IEmW9ufb7bC5X01U/PzHNQarz4w8Hgr/A8HXWne "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06729140799403661}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10603,19 +11388,19 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06729140799403661}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10629,116 +11414,115 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwV13k8VO0XAHBR9i2yNpi5M0bJWvaMc5IU3ngThVciiUoSUpS1lFKSECJr +WixzJyIqCRVRWuxFlDYJZYlUfvf31/18/7jPcz7nec459zJ27Hf04efj4xNa +wMf3/+d0f3MjK6HQIqroneR3HbRov6wYtqY7FkSPCIRXkCqAcm07FLuTwSmh +uDyQ1IbQf290CXTnQxymr7AiObB4VCF5tusmpHrZOAmQG+HtXfv9k131UMwa +vGzC3QbWrOG+710v4byUlL1myT6Y7TJOHe96B8vrwJE/NwIa1l4tfJE/AVx7 +tsXjokSgva3+uEPrDzh0C9qwjqfBEv/tN4TWCqB005h04YZsSNa3vmPvLIy7 +ds2Wpy/Nh550vbrv0hJ4jvt1mR3tCiQURrXxKy3GSjGf9Csy10Ah5f2pC9my +aBYZfXjl1Rtw0snG4uW0HM4tuqYZWVsCyhXPlPkXyKNIR6Zf36MSKJN1+qkv +Jo9f5jHbqK0EOl96kOfV5FEcOz52vi0B1qYQYtMGeTQ/+WrgGV8p1G/MEXye +IY8nqysLL60phT/WU8+emitgqnxYZH5tKQSb5m1vjlXEOGnxL+ZFZWCbKzlp +d0YRC4gPR3JKyoAQOhr/LFURpViThb9vlsHz9i28V9cUUeC2ze2i+2WgEygu +0P9MEX281vZWd5fB56JDRT+UlXCDh0LjaxEuuC+x/7a0XAkZKvHW4n5cWHXk +Tszlu0qYOWEm+WAfF0TfLZNnPKJ8tdU7MJgL1VwBYPcoofDkl6raSC7I21Un +6c0r4RLu2LxSKheex7AM1tkpI5/w5okndVywGvsVHvBeGZunKkdERUkI25Ci ++WBEGYtZjgdjxEkoy9PulZ1Wxln9OY8pSRIUnTxNq4WXorbXCecOWRJGbj/8 +KaCzFHsClzw/qELChdikkIzDS7E75ccCUz0S3smxAxolaGhNV69o2kyCwv77 +KgoKNHwaIRf81ZmEf5pcnu6m03AFZzBFzIWEyvAELalVNCyPDlpg5U7C6bfj +w64uNHy451BM6k4SVl6/4zuWT8PLrTTjOyEkxJhv8lI2UcGu7gJ/mQskbPC4 +/MPYUgXPRewUFUklQTL66zHnf1TQ5c+9jN9pJGQ1xBUleapg23HtxN5MEm7b +1nwVPKWC+qZt7QfySRh3YYZO9Kggd+iijCSPhKrwQKHFQypYpkP//OomCZFZ +99J1RlWwuuNAeVoFCeIDW+/s5lfFwYosLdnbJGj4nuEb0FRF4m4Q71MtCR4H +p063HlFF12E5u/kWEtQvWtKG41Rx8h09P+Xp//N3rlQoSRUPhYlMsttICP+9 +/LlloSo2r+o6ZfmShNRjHnLVrarYb+Nw0rmbhNbzj3OuqKghI7Bn6df3JJiV +ZVRE3ldDB+Xtu7tmSLDqevZntEkNxTwLV8/MkmDPt3D99pdqeCyt95D8HAne +jgE98EENPwYk69r9IcH6CCMqehEdr3ZfLkpdwINAtemCNSvouLzvhjBXhAdT +5UlNs7p0HMvbfbVIlAfhG1Z84xnQMeHg2spLYjyIO+BpRFjQUXfNZ/VICR5k +Njxp4t9ER/qSwy6sxTxo9M351hBKxyWWVX7TCjyw+W0qc/QIHVut1Fc/VOTB +s6R2I4NoOkp+Dj5+XokHPdUi0YWn6GhsHRZBLOXBqFiITFwWHU/fIeXYqjwI +zpU05uTRse5XcfEA5RmD6/9NXaGjSQzzbroaDwQ8+gt9uHQ0tfG0X8DggSK5 +wdi6no5tPmrrKpg8yLZ6/9/fR3Ss2id0143FA6InIrqyhY62x7V4fylr85c3 +szvomKOupAhsHlg6qbgLfaZjmqDYx7xlPPCf+R7dJMFAzc9542NaPDA7sEv+ +owwD/RrVRcO0eSA83FssoMjAJqVfZvOUr7xu6LQgGJg0t+oDvy4P+mtTtW4Z +MXB9xsGAT3o8KDEWrX+5moGrPvA5u+pT+SUjt44jAwc/6Lo0UZbP941dYcfA +lg96VdkreeAQZ9qdt52B5Zljw+oGPFD9W7rv/k4Geos2NkdTHgklBPp2M1Bd +//6TbsrxfmI6iiEMVFCbNYw25MGWwagGwzAGuoXm5bVRZrlNumyOZODXgrUr +aUY8qLPrO5YYz8B/sv59WEI5sXGTUslZBk480Gwep+zOeVTWnMzAtKC+SX1j +HszqcHsWZjPQTKr8UTHlpqvM/UQ+A40W2wUMUU6jpy/EqwxkNl9BZRMerJSJ +0T3CY+Ccc6pfBGW+hKnG9EoG2o8U3r9B+ZnAHrfKOwzcW+Nv1UE562j/2Ks6 +Bha9K/75m/LeKce47w+p/JkRvQxTKv8Bj5WlWhgoZ5M0spay8KfVpNZzBtZv +qNL1pty5nVxn28HASJZrYRTlwm7Wa99eBgYeNrHLoBy0KSMw7i0V/3lFdZIy +PpEQLBhioP/eeysbKUuujb1U94Vav/xrSAflvjvTev2jDDRt8Bt5T7nEYO+j +uQkGOl75lTFGObz07X9Kswxsk/aLnKG8ge303egvA5P3HM78S1k+p+mEkwCB +QY0TowvMeDCkwKEFCRN4603+UX7KN5N4vHMSBF5QcbDioxwtwl5fKkMgN6ve +eo563yE2880TBQIvKTcdn6CsOicZ9JlGoCP/ivnPlEeCjwkJEgSW+1VVvqZc +M/Izi6lBoIi4WUkL5Xgf/5VrtAg8sjl64DblLf0Djz30CUyxd3EqoMza6rzt +qBGBFRVJwgmUf7Q1/8hYTWDW0Myf/ZTrNljEVyGBb997GjpSTnxwU6VjHYE+ +HhlcfcruZhrlP2wJHLwSvE+S8uwK6X5tZwKjaVuq7lPnN52tHLPKjUDmmmvy +qZQnpdRZptsJ9Kpnd/pSHp0w3WO1m0BO+dPDiyh/9bGSsA2g4hM+ve05dZ8+ +d9mTDsEEzhzPvJJO+d0d72m3CALz9T7uYFB+qx2Q4RlLoO9Edc8gdV/f5Bw2 +33WSQFsB2aocyp3HzsYeOE9gY+KZa7KUn9hVScZfIfC9rGXEG6peHt97wDt7 +g8C74wMW8ZQbdVudLnAJLJ2P3adPuVZ2MPNyNYHDu5Xljq6izuu1qMatpwQ+ +Kq8u/EHVK3ej3JOalwTSgs5/OEW55L7avrouAmetJTNVKRcVGJS3DBL4JtfR +C6n6z9zrAe+mCIyJLIz20eHBxT6/d59+ETgRA6Gfqf6R4hAc922eWj/e6qMf +5cRV8S0zIkzMXT9rsoPqP7FzvK1SqkwsuMl8YKRJ1UfCokBzaya2mAyp+qnz +wO+PlKylHRPdL40TDVR/27VfuXL9v0y0l9rCXUrZc7Pub0c3Jja2Ve98SPDA +aalr/O4AJnZKD7jNUf3UvLgkNy2NicruahY/qP78ml6cs+4SE8etxgQNKIen +Xb88mcPEwT9vKoOpfl4VU5TleJ2JPhXibSPyVL275KZL3mWibkvJ1ENZHixf +lJJ0YpCJdnvONy6h5kVTePI5w49MXMx1dzUUp+IbT0ocGmaiRojr4GZqvhS+ +PnvGcpKJUVtnnp6m5hH95sn4v4Is1JzdrDuwiKqn7UeiQ7VYyO7pvr/8Lwm3 +2sOi1PVZmGvuPbScmm9Otocj2w1ZWOUQL7zsNwnJhgePrgQWcqYfO6r+IkFC +fP/h0U0sjCw1WDQxRcLC6h2Buw6xULs/8gLnGwnfZWw9t9Sz8IyZyYR7Lwnd +/sTzPY9ZOMpvcV6gh4S6R78gqpWFm+p6f1ztIiEpvFjtWicLY2XEFw23k6D3 +Tvzt7DALTZwfx26m5nsAr21btqw6Xiq4+PxuAwnDDs7/De1UxxMzUbrjN0h4 +eV27ZWa3OnaG1Thsuk5CjYDgaon96vikoNWZvErCqapKZaMwdXxR06HgV0jC +MjXF3pNn1ZGmRUuuzSbBd7TXZUWlOtp8OOwsnETC0BnPLUFCbDR/JdYpH0zt +P6xF6Imzsbg7p3/LARJ+rp/99k2ajecm9PVT95MgKpAct1uZjbtUZ6vE/an4 +wxoqPLXZmK1c4/OJ+v6K8GHLOmxmI/vUU6l/tpAgbzHStiKHjT7Zv5f0GJNg +M3bI5oORBm72CGX7j3CBpq96QthcA7vCNlY3fOLCaFBj/Yo1Gvj9xdQrhfdc +SJmWNg+y08Bzb7ffuNXDhf4/13Xmt2vgVTkdtaZHXAgSfyOrdEoDH3ZIW9vm +ciFzOfb/81oDK3gyke3/cmHEWzi4ImoZblny+nb8tTLqf0SB/2T9cvTe+Ib/ +CacUZJ6yE8kxTdT879vY6ZZioMVz/zUy0kLRnnmWGP0GpK8wlZb11cbM4w1n +RaOvwRPlNYYT53XwUnT4mOLbIjCj1SfpdurieMzlsQMKV0BSID/EK1YPuwe9 +L34KLADVGDVzV7Y+pozH26Vz80BE3b3S8bE+jnFGU7UX5oIOR4l7aNtKrJ8s +nG4VzYagfpkGW75VmNX1VS51KgPGJs4426SvQvZzuYuP4SKs132UaaNtgD5l +OR1P61OgdmL13M9nBihx4fvDuTXJEKC1sveFjyGu9+X3NKQlAWd0Z7uriBFW +eb7SNptNgHUsxY0S+Ub4rodwuLEjHpZFnz5cb2yMz4dqox8ZxoGmj+l99V5j +fLmuL/shIxZ8av2OVxwwwWFxgT/tmlFwP7d953c5U5SsSOtr2hgOk9fmf+pW +maJJ3wv3OVYoeKsXi2RuNMP1x3YVcBqD4LvmBaOb42bIb7Lk2qJV++F24dzg +VPxqFHspwEpU2wNuVkxcrWqOx3o69/d2+8DSfSerderM0adLTG3goxckzu8y +TKg3x4KCrTt8e7yAP9ma96nRHLfWnzjws8ULhisXXc9tNkdahMWgPs8LaviO +p8u8MscOQb0TUke9wC0l+tD0B3PU1r/2dbesF6TfCTOsFeNg6ftjWUc2eIKc +qD9v41YOvmn1VTdK2waFayPCx105GBLG/nTv6DZYGZG49oI7B8UTGjpcvLeB +/TjZ0e3FQemLt0Sb9LbBic6pWW9/Dn7QXnfmdKs7zORHWYbHcPDprdyGVCF3 +6F194VVRMQclBd0LQhLcwO9gYZZNGQc5p93z7ULcYLrsls8IycG9prPbDba5 +gQzR/VO/koNCfaHDZrpuYCesQrtXx0H/jRcXLW13hbvtRTtfdXCQyPMpUWG4 +gq3kbe3Qbg4e+zLmIybmCt3rm6cVX1PxjU5oi065wGTN13iPAQ7mey2sNWt2 +Ae08vdIvwxzUuZvA3RXkAnd714Se+cZBpU9CZa/dXcB2yWbQHeeghGDZTq/1 +LrDr5MEXIVMc3ITX2y7TqPXqTmQqzHCwMj8/YIuQC8T+uuhd84uDliclL6n+ +2ArSBte1tv3h4IEmW9ufb7bC5X01U/PzHNQarz4w8Hgr/A8HXWne "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06729140799403661}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10749,6 +11533,7 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10776,7 +11561,8 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.13473082946272152`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06729140799403661}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10784,22 +11570,574 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991324915847246*^9}, + CellChangeTimes->{3.991324915847246*^9, 3.994355634957106*^9}, CellLabel-> - "Out[112]=",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] + "Out[128]=",ExpressionUUID->"8ce7a142-09a0-415c-b80d-960659aeedc6"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{3.991799816909994*^9, 3.9918001103050213`*^9, - 3.991924419552084*^9},ExpressionUUID->"c5eb8b00-da53-e74c-9781-\ -4f98a6653ef7"], + 3.991924419552084*^9}, + CellLabel-> + "In[129]:=",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799819852022*^9, - 3.9917998213158054`*^9}},ExpressionUUID->"05df483d-64d7-9449-845e-\ -6e6b94590d4b"], + CellChangeTimes->{{3.991799819852022*^9, 3.9917998213158054`*^9}}, + CellLabel-> + "In[130]:=",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VO0XAHBR9i2yNpi5M0bJWvaMc5IU3ngThVciiUoSUpS1lFKSECJr +WixzJyIqCRVRWuxFlDYJZYlUfvf31/18/7jPcz7nec459zJ27Hf04efj4xNa +wMf3/+d0f3MjK6HQIqroneR3HbRov6wYtqY7FkSPCIRXkCqAcm07FLuTwSmh +uDyQ1IbQf290CXTnQxymr7AiObB4VCF5tusmpHrZOAmQG+HtXfv9k131UMwa +vGzC3QbWrOG+710v4byUlL1myT6Y7TJOHe96B8vrwJE/NwIa1l4tfJE/AVx7 +tsXjokSgva3+uEPrDzh0C9qwjqfBEv/tN4TWCqB005h04YZsSNa3vmPvLIy7 +ds2Wpy/Nh550vbrv0hJ4jvt1mR3tCiQURrXxKy3GSjGf9Csy10Ah5f2pC9my +aBYZfXjl1Rtw0snG4uW0HM4tuqYZWVsCyhXPlPkXyKNIR6Zf36MSKJN1+qkv +Jo9f5jHbqK0EOl96kOfV5FEcOz52vi0B1qYQYtMGeTQ/+WrgGV8p1G/MEXye +IY8nqysLL60phT/WU8+emitgqnxYZH5tKQSb5m1vjlXEOGnxL+ZFZWCbKzlp +d0YRC4gPR3JKyoAQOhr/LFURpViThb9vlsHz9i28V9cUUeC2ze2i+2WgEygu +0P9MEX281vZWd5fB56JDRT+UlXCDh0LjaxEuuC+x/7a0XAkZKvHW4n5cWHXk +Tszlu0qYOWEm+WAfF0TfLZNnPKJ8tdU7MJgL1VwBYPcoofDkl6raSC7I21Un +6c0r4RLu2LxSKheex7AM1tkpI5/w5okndVywGvsVHvBeGZunKkdERUkI25Ci ++WBEGYtZjgdjxEkoy9PulZ1Wxln9OY8pSRIUnTxNq4WXorbXCecOWRJGbj/8 +KaCzFHsClzw/qELChdikkIzDS7E75ccCUz0S3smxAxolaGhNV69o2kyCwv77 +KgoKNHwaIRf81ZmEf5pcnu6m03AFZzBFzIWEyvAELalVNCyPDlpg5U7C6bfj +w64uNHy451BM6k4SVl6/4zuWT8PLrTTjOyEkxJhv8lI2UcGu7gJ/mQskbPC4 +/MPYUgXPRewUFUklQTL66zHnf1TQ5c+9jN9pJGQ1xBUleapg23HtxN5MEm7b +1nwVPKWC+qZt7QfySRh3YYZO9Kggd+iijCSPhKrwQKHFQypYpkP//OomCZFZ +99J1RlWwuuNAeVoFCeIDW+/s5lfFwYosLdnbJGj4nuEb0FRF4m4Q71MtCR4H +p063HlFF12E5u/kWEtQvWtKG41Rx8h09P+Xp//N3rlQoSRUPhYlMsttICP+9 +/LlloSo2r+o6ZfmShNRjHnLVrarYb+Nw0rmbhNbzj3OuqKghI7Bn6df3JJiV +ZVRE3ldDB+Xtu7tmSLDqevZntEkNxTwLV8/MkmDPt3D99pdqeCyt95D8HAne +jgE98EENPwYk69r9IcH6CCMqehEdr3ZfLkpdwINAtemCNSvouLzvhjBXhAdT +5UlNs7p0HMvbfbVIlAfhG1Z84xnQMeHg2spLYjyIO+BpRFjQUXfNZ/VICR5k +Njxp4t9ER/qSwy6sxTxo9M351hBKxyWWVX7TCjyw+W0qc/QIHVut1Fc/VOTB +s6R2I4NoOkp+Dj5+XokHPdUi0YWn6GhsHRZBLOXBqFiITFwWHU/fIeXYqjwI +zpU05uTRse5XcfEA5RmD6/9NXaGjSQzzbroaDwQ8+gt9uHQ0tfG0X8DggSK5 +wdi6no5tPmrrKpg8yLZ6/9/fR3Ss2id0143FA6InIrqyhY62x7V4fylr85c3 +szvomKOupAhsHlg6qbgLfaZjmqDYx7xlPPCf+R7dJMFAzc9542NaPDA7sEv+ +owwD/RrVRcO0eSA83FssoMjAJqVfZvOUr7xu6LQgGJg0t+oDvy4P+mtTtW4Z +MXB9xsGAT3o8KDEWrX+5moGrPvA5u+pT+SUjt44jAwc/6Lo0UZbP941dYcfA +lg96VdkreeAQZ9qdt52B5Zljw+oGPFD9W7rv/k4Geos2NkdTHgklBPp2M1Bd +//6TbsrxfmI6iiEMVFCbNYw25MGWwagGwzAGuoXm5bVRZrlNumyOZODXgrUr +aUY8qLPrO5YYz8B/sv59WEI5sXGTUslZBk480Gwep+zOeVTWnMzAtKC+SX1j +HszqcHsWZjPQTKr8UTHlpqvM/UQ+A40W2wUMUU6jpy/EqwxkNl9BZRMerJSJ +0T3CY+Ccc6pfBGW+hKnG9EoG2o8U3r9B+ZnAHrfKOwzcW+Nv1UE562j/2Ks6 +Bha9K/75m/LeKce47w+p/JkRvQxTKv8Bj5WlWhgoZ5M0spay8KfVpNZzBtZv +qNL1pty5nVxn28HASJZrYRTlwm7Wa99eBgYeNrHLoBy0KSMw7i0V/3lFdZIy +PpEQLBhioP/eeysbKUuujb1U94Vav/xrSAflvjvTev2jDDRt8Bt5T7nEYO+j +uQkGOl75lTFGObz07X9Kswxsk/aLnKG8ge303egvA5P3HM78S1k+p+mEkwCB +QY0TowvMeDCkwKEFCRN4603+UX7KN5N4vHMSBF5QcbDioxwtwl5fKkMgN6ve +eo563yE2880TBQIvKTcdn6CsOicZ9JlGoCP/ivnPlEeCjwkJEgSW+1VVvqZc +M/Izi6lBoIi4WUkL5Xgf/5VrtAg8sjl64DblLf0Djz30CUyxd3EqoMza6rzt +qBGBFRVJwgmUf7Q1/8hYTWDW0Myf/ZTrNljEVyGBb997GjpSTnxwU6VjHYE+ +HhlcfcruZhrlP2wJHLwSvE+S8uwK6X5tZwKjaVuq7lPnN52tHLPKjUDmmmvy +qZQnpdRZptsJ9Kpnd/pSHp0w3WO1m0BO+dPDiyh/9bGSsA2g4hM+ve05dZ8+ +d9mTDsEEzhzPvJJO+d0d72m3CALz9T7uYFB+qx2Q4RlLoO9Edc8gdV/f5Bw2 +33WSQFsB2aocyp3HzsYeOE9gY+KZa7KUn9hVScZfIfC9rGXEG6peHt97wDt7 +g8C74wMW8ZQbdVudLnAJLJ2P3adPuVZ2MPNyNYHDu5Xljq6izuu1qMatpwQ+ +Kq8u/EHVK3ej3JOalwTSgs5/OEW55L7avrouAmetJTNVKRcVGJS3DBL4JtfR +C6n6z9zrAe+mCIyJLIz20eHBxT6/d59+ETgRA6Gfqf6R4hAc922eWj/e6qMf +5cRV8S0zIkzMXT9rsoPqP7FzvK1SqkwsuMl8YKRJ1UfCokBzaya2mAyp+qnz +wO+PlKylHRPdL40TDVR/27VfuXL9v0y0l9rCXUrZc7Pub0c3Jja2Ve98SPDA +aalr/O4AJnZKD7jNUf3UvLgkNy2NicruahY/qP78ml6cs+4SE8etxgQNKIen +Xb88mcPEwT9vKoOpfl4VU5TleJ2JPhXibSPyVL275KZL3mWibkvJ1ENZHixf +lJJ0YpCJdnvONy6h5kVTePI5w49MXMx1dzUUp+IbT0ocGmaiRojr4GZqvhS+ +PnvGcpKJUVtnnp6m5hH95sn4v4Is1JzdrDuwiKqn7UeiQ7VYyO7pvr/8Lwm3 +2sOi1PVZmGvuPbScmm9Otocj2w1ZWOUQL7zsNwnJhgePrgQWcqYfO6r+IkFC +fP/h0U0sjCw1WDQxRcLC6h2Buw6xULs/8gLnGwnfZWw9t9Sz8IyZyYR7Lwnd +/sTzPY9ZOMpvcV6gh4S6R78gqpWFm+p6f1ztIiEpvFjtWicLY2XEFw23k6D3 +Tvzt7DALTZwfx26m5nsAr21btqw6Xiq4+PxuAwnDDs7/De1UxxMzUbrjN0h4 +eV27ZWa3OnaG1Thsuk5CjYDgaon96vikoNWZvErCqapKZaMwdXxR06HgV0jC +MjXF3pNn1ZGmRUuuzSbBd7TXZUWlOtp8OOwsnETC0BnPLUFCbDR/JdYpH0zt +P6xF6Imzsbg7p3/LARJ+rp/99k2ajecm9PVT95MgKpAct1uZjbtUZ6vE/an4 +wxoqPLXZmK1c4/OJ+v6K8GHLOmxmI/vUU6l/tpAgbzHStiKHjT7Zv5f0GJNg +M3bI5oORBm72CGX7j3CBpq96QthcA7vCNlY3fOLCaFBj/Yo1Gvj9xdQrhfdc +SJmWNg+y08Bzb7ffuNXDhf4/13Xmt2vgVTkdtaZHXAgSfyOrdEoDH3ZIW9vm +ciFzOfb/81oDK3gyke3/cmHEWzi4ImoZblny+nb8tTLqf0SB/2T9cvTe+Ib/ +CacUZJ6yE8kxTdT879vY6ZZioMVz/zUy0kLRnnmWGP0GpK8wlZb11cbM4w1n +RaOvwRPlNYYT53XwUnT4mOLbIjCj1SfpdurieMzlsQMKV0BSID/EK1YPuwe9 +L34KLADVGDVzV7Y+pozH26Vz80BE3b3S8bE+jnFGU7UX5oIOR4l7aNtKrJ8s +nG4VzYagfpkGW75VmNX1VS51KgPGJs4426SvQvZzuYuP4SKs132UaaNtgD5l +OR1P61OgdmL13M9nBihx4fvDuTXJEKC1sveFjyGu9+X3NKQlAWd0Z7uriBFW +eb7SNptNgHUsxY0S+Ub4rodwuLEjHpZFnz5cb2yMz4dqox8ZxoGmj+l99V5j +fLmuL/shIxZ8av2OVxwwwWFxgT/tmlFwP7d953c5U5SsSOtr2hgOk9fmf+pW +maJJ3wv3OVYoeKsXi2RuNMP1x3YVcBqD4LvmBaOb42bIb7Lk2qJV++F24dzg +VPxqFHspwEpU2wNuVkxcrWqOx3o69/d2+8DSfSerderM0adLTG3goxckzu8y +TKg3x4KCrTt8e7yAP9ma96nRHLfWnzjws8ULhisXXc9tNkdahMWgPs8LaviO +p8u8MscOQb0TUke9wC0l+tD0B3PU1r/2dbesF6TfCTOsFeNg6ftjWUc2eIKc +qD9v41YOvmn1VTdK2waFayPCx105GBLG/nTv6DZYGZG49oI7B8UTGjpcvLeB +/TjZ0e3FQemLt0Sb9LbBic6pWW9/Dn7QXnfmdKs7zORHWYbHcPDprdyGVCF3 +6F194VVRMQclBd0LQhLcwO9gYZZNGQc5p93z7ULcYLrsls8IycG9prPbDba5 +gQzR/VO/koNCfaHDZrpuYCesQrtXx0H/jRcXLW13hbvtRTtfdXCQyPMpUWG4 +gq3kbe3Qbg4e+zLmIybmCt3rm6cVX1PxjU5oi065wGTN13iPAQ7mey2sNWt2 +Ae08vdIvwxzUuZvA3RXkAnd714Se+cZBpU9CZa/dXcB2yWbQHeeghGDZTq/1 +LrDr5MEXIVMc3ITX2y7TqPXqTmQqzHCwMj8/YIuQC8T+uuhd84uDliclL6n+ +2ArSBte1tv3h4IEmW9ufb7bC5X01U/PzHNQarz4w8Hgr/A8HXWne + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VO0XAHBR9i2yNpi5M0bJWvaMc5IU3ngThVciiUoSUpS1lFKSECJr +WixzJyIqCRVRWuxFlDYJZYlUfvf31/18/7jPcz7nec459zJ27Hf04efj4xNa +wMf3/+d0f3MjK6HQIqroneR3HbRov6wYtqY7FkSPCIRXkCqAcm07FLuTwSmh +uDyQ1IbQf290CXTnQxymr7AiObB4VCF5tusmpHrZOAmQG+HtXfv9k131UMwa +vGzC3QbWrOG+710v4byUlL1myT6Y7TJOHe96B8vrwJE/NwIa1l4tfJE/AVx7 +tsXjokSgva3+uEPrDzh0C9qwjqfBEv/tN4TWCqB005h04YZsSNa3vmPvLIy7 +ds2Wpy/Nh550vbrv0hJ4jvt1mR3tCiQURrXxKy3GSjGf9Csy10Ah5f2pC9my +aBYZfXjl1Rtw0snG4uW0HM4tuqYZWVsCyhXPlPkXyKNIR6Zf36MSKJN1+qkv +Jo9f5jHbqK0EOl96kOfV5FEcOz52vi0B1qYQYtMGeTQ/+WrgGV8p1G/MEXye +IY8nqysLL60phT/WU8+emitgqnxYZH5tKQSb5m1vjlXEOGnxL+ZFZWCbKzlp +d0YRC4gPR3JKyoAQOhr/LFURpViThb9vlsHz9i28V9cUUeC2ze2i+2WgEygu +0P9MEX281vZWd5fB56JDRT+UlXCDh0LjaxEuuC+x/7a0XAkZKvHW4n5cWHXk +Tszlu0qYOWEm+WAfF0TfLZNnPKJ8tdU7MJgL1VwBYPcoofDkl6raSC7I21Un +6c0r4RLu2LxSKheex7AM1tkpI5/w5okndVywGvsVHvBeGZunKkdERUkI25Ci ++WBEGYtZjgdjxEkoy9PulZ1Wxln9OY8pSRIUnTxNq4WXorbXCecOWRJGbj/8 +KaCzFHsClzw/qELChdikkIzDS7E75ccCUz0S3smxAxolaGhNV69o2kyCwv77 +KgoKNHwaIRf81ZmEf5pcnu6m03AFZzBFzIWEyvAELalVNCyPDlpg5U7C6bfj +w64uNHy451BM6k4SVl6/4zuWT8PLrTTjOyEkxJhv8lI2UcGu7gJ/mQskbPC4 +/MPYUgXPRewUFUklQTL66zHnf1TQ5c+9jN9pJGQ1xBUleapg23HtxN5MEm7b +1nwVPKWC+qZt7QfySRh3YYZO9Kggd+iijCSPhKrwQKHFQypYpkP//OomCZFZ +99J1RlWwuuNAeVoFCeIDW+/s5lfFwYosLdnbJGj4nuEb0FRF4m4Q71MtCR4H +p063HlFF12E5u/kWEtQvWtKG41Rx8h09P+Xp//N3rlQoSRUPhYlMsttICP+9 +/LlloSo2r+o6ZfmShNRjHnLVrarYb+Nw0rmbhNbzj3OuqKghI7Bn6df3JJiV +ZVRE3ldDB+Xtu7tmSLDqevZntEkNxTwLV8/MkmDPt3D99pdqeCyt95D8HAne +jgE98EENPwYk69r9IcH6CCMqehEdr3ZfLkpdwINAtemCNSvouLzvhjBXhAdT +5UlNs7p0HMvbfbVIlAfhG1Z84xnQMeHg2spLYjyIO+BpRFjQUXfNZ/VICR5k +Njxp4t9ER/qSwy6sxTxo9M351hBKxyWWVX7TCjyw+W0qc/QIHVut1Fc/VOTB +s6R2I4NoOkp+Dj5+XokHPdUi0YWn6GhsHRZBLOXBqFiITFwWHU/fIeXYqjwI +zpU05uTRse5XcfEA5RmD6/9NXaGjSQzzbroaDwQ8+gt9uHQ0tfG0X8DggSK5 +wdi6no5tPmrrKpg8yLZ6/9/fR3Ss2id0143FA6InIrqyhY62x7V4fylr85c3 +szvomKOupAhsHlg6qbgLfaZjmqDYx7xlPPCf+R7dJMFAzc9542NaPDA7sEv+ +owwD/RrVRcO0eSA83FssoMjAJqVfZvOUr7xu6LQgGJg0t+oDvy4P+mtTtW4Z +MXB9xsGAT3o8KDEWrX+5moGrPvA5u+pT+SUjt44jAwc/6Lo0UZbP941dYcfA +lg96VdkreeAQZ9qdt52B5Zljw+oGPFD9W7rv/k4Geos2NkdTHgklBPp2M1Bd +//6TbsrxfmI6iiEMVFCbNYw25MGWwagGwzAGuoXm5bVRZrlNumyOZODXgrUr +aUY8qLPrO5YYz8B/sv59WEI5sXGTUslZBk480Gwep+zOeVTWnMzAtKC+SX1j +HszqcHsWZjPQTKr8UTHlpqvM/UQ+A40W2wUMUU6jpy/EqwxkNl9BZRMerJSJ +0T3CY+Ccc6pfBGW+hKnG9EoG2o8U3r9B+ZnAHrfKOwzcW+Nv1UE562j/2Ks6 +Bha9K/75m/LeKce47w+p/JkRvQxTKv8Bj5WlWhgoZ5M0spay8KfVpNZzBtZv +qNL1pty5nVxn28HASJZrYRTlwm7Wa99eBgYeNrHLoBy0KSMw7i0V/3lFdZIy +PpEQLBhioP/eeysbKUuujb1U94Vav/xrSAflvjvTev2jDDRt8Bt5T7nEYO+j +uQkGOl75lTFGObz07X9Kswxsk/aLnKG8ge303egvA5P3HM78S1k+p+mEkwCB +QY0TowvMeDCkwKEFCRN4603+UX7KN5N4vHMSBF5QcbDioxwtwl5fKkMgN6ve +eo563yE2880TBQIvKTcdn6CsOicZ9JlGoCP/ivnPlEeCjwkJEgSW+1VVvqZc +M/Izi6lBoIi4WUkL5Xgf/5VrtAg8sjl64DblLf0Djz30CUyxd3EqoMza6rzt +qBGBFRVJwgmUf7Q1/8hYTWDW0Myf/ZTrNljEVyGBb997GjpSTnxwU6VjHYE+ +HhlcfcruZhrlP2wJHLwSvE+S8uwK6X5tZwKjaVuq7lPnN52tHLPKjUDmmmvy +qZQnpdRZptsJ9Kpnd/pSHp0w3WO1m0BO+dPDiyh/9bGSsA2g4hM+ve05dZ8+ +d9mTDsEEzhzPvJJO+d0d72m3CALz9T7uYFB+qx2Q4RlLoO9Edc8gdV/f5Bw2 +33WSQFsB2aocyp3HzsYeOE9gY+KZa7KUn9hVScZfIfC9rGXEG6peHt97wDt7 +g8C74wMW8ZQbdVudLnAJLJ2P3adPuVZ2MPNyNYHDu5Xljq6izuu1qMatpwQ+ +Kq8u/EHVK3ej3JOalwTSgs5/OEW55L7avrouAmetJTNVKRcVGJS3DBL4JtfR +C6n6z9zrAe+mCIyJLIz20eHBxT6/d59+ETgRA6Gfqf6R4hAc922eWj/e6qMf +5cRV8S0zIkzMXT9rsoPqP7FzvK1SqkwsuMl8YKRJ1UfCokBzaya2mAyp+qnz +wO+PlKylHRPdL40TDVR/27VfuXL9v0y0l9rCXUrZc7Pub0c3Jja2Ve98SPDA +aalr/O4AJnZKD7jNUf3UvLgkNy2NicruahY/qP78ml6cs+4SE8etxgQNKIen +Xb88mcPEwT9vKoOpfl4VU5TleJ2JPhXibSPyVL275KZL3mWibkvJ1ENZHixf +lJJ0YpCJdnvONy6h5kVTePI5w49MXMx1dzUUp+IbT0ocGmaiRojr4GZqvhS+ +PnvGcpKJUVtnnp6m5hH95sn4v4Is1JzdrDuwiKqn7UeiQ7VYyO7pvr/8Lwm3 +2sOi1PVZmGvuPbScmm9Otocj2w1ZWOUQL7zsNwnJhgePrgQWcqYfO6r+IkFC +fP/h0U0sjCw1WDQxRcLC6h2Buw6xULs/8gLnGwnfZWw9t9Sz8IyZyYR7Lwnd +/sTzPY9ZOMpvcV6gh4S6R78gqpWFm+p6f1ztIiEpvFjtWicLY2XEFw23k6D3 +Tvzt7DALTZwfx26m5nsAr21btqw6Xiq4+PxuAwnDDs7/De1UxxMzUbrjN0h4 +eV27ZWa3OnaG1Thsuk5CjYDgaon96vikoNWZvErCqapKZaMwdXxR06HgV0jC +MjXF3pNn1ZGmRUuuzSbBd7TXZUWlOtp8OOwsnETC0BnPLUFCbDR/JdYpH0zt +P6xF6Imzsbg7p3/LARJ+rp/99k2ajecm9PVT95MgKpAct1uZjbtUZ6vE/an4 +wxoqPLXZmK1c4/OJ+v6K8GHLOmxmI/vUU6l/tpAgbzHStiKHjT7Zv5f0GJNg +M3bI5oORBm72CGX7j3CBpq96QthcA7vCNlY3fOLCaFBj/Yo1Gvj9xdQrhfdc +SJmWNg+y08Bzb7ffuNXDhf4/13Xmt2vgVTkdtaZHXAgSfyOrdEoDH3ZIW9vm +ciFzOfb/81oDK3gyke3/cmHEWzi4ImoZblny+nb8tTLqf0SB/2T9cvTe+Ib/ +CacUZJ6yE8kxTdT879vY6ZZioMVz/zUy0kLRnnmWGP0GpK8wlZb11cbM4w1n +RaOvwRPlNYYT53XwUnT4mOLbIjCj1SfpdurieMzlsQMKV0BSID/EK1YPuwe9 +L34KLADVGDVzV7Y+pozH26Vz80BE3b3S8bE+jnFGU7UX5oIOR4l7aNtKrJ8s +nG4VzYagfpkGW75VmNX1VS51KgPGJs4426SvQvZzuYuP4SKs132UaaNtgD5l +OR1P61OgdmL13M9nBihx4fvDuTXJEKC1sveFjyGu9+X3NKQlAWd0Z7uriBFW +eb7SNptNgHUsxY0S+Ub4rodwuLEjHpZFnz5cb2yMz4dqox8ZxoGmj+l99V5j +fLmuL/shIxZ8av2OVxwwwWFxgT/tmlFwP7d953c5U5SsSOtr2hgOk9fmf+pW +maJJ3wv3OVYoeKsXi2RuNMP1x3YVcBqD4LvmBaOb42bIb7Lk2qJV++F24dzg +VPxqFHspwEpU2wNuVkxcrWqOx3o69/d2+8DSfSerderM0adLTG3goxckzu8y +TKg3x4KCrTt8e7yAP9ma96nRHLfWnzjws8ULhisXXc9tNkdahMWgPs8LaviO +p8u8MscOQb0TUke9wC0l+tD0B3PU1r/2dbesF6TfCTOsFeNg6ftjWUc2eIKc +qD9v41YOvmn1VTdK2waFayPCx105GBLG/nTv6DZYGZG49oI7B8UTGjpcvLeB +/TjZ0e3FQemLt0Sb9LbBic6pWW9/Dn7QXnfmdKs7zORHWYbHcPDprdyGVCF3 +6F194VVRMQclBd0LQhLcwO9gYZZNGQc5p93z7ULcYLrsls8IycG9prPbDba5 +gQzR/VO/koNCfaHDZrpuYCesQrtXx0H/jRcXLW13hbvtRTtfdXCQyPMpUWG4 +gq3kbe3Qbg4e+zLmIybmCt3rm6cVX1PxjU5oi065wGTN13iPAQ7mey2sNWt2 +Ae08vdIvwxzUuZvA3RXkAnd714Se+cZBpU9CZa/dXcB2yWbQHeeghGDZTq/1 +LrDr5MEXIVMc3ITX2y7TqPXqTmQqzHCwMj8/YIuQC8T+uuhd84uDliclL6n+ +2ArSBte1tv3h4IEmW9ufb7bC5X01U/PzHNQarz4w8Hgr/A8HXWne + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06729140799403661}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06729140799403661}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VO0XAHBR9i2yNpi5M0bJWvaMc5IU3ngThVciiUoSUpS1lFKSECJr +WixzJyIqCRVRWuxFlDYJZYlUfvf31/18/7jPcz7nec459zJ27Hf04efj4xNa +wMf3/+d0f3MjK6HQIqroneR3HbRov6wYtqY7FkSPCIRXkCqAcm07FLuTwSmh +uDyQ1IbQf290CXTnQxymr7AiObB4VCF5tusmpHrZOAmQG+HtXfv9k131UMwa +vGzC3QbWrOG+710v4byUlL1myT6Y7TJOHe96B8vrwJE/NwIa1l4tfJE/AVx7 +tsXjokSgva3+uEPrDzh0C9qwjqfBEv/tN4TWCqB005h04YZsSNa3vmPvLIy7 +ds2Wpy/Nh550vbrv0hJ4jvt1mR3tCiQURrXxKy3GSjGf9Csy10Ah5f2pC9my +aBYZfXjl1Rtw0snG4uW0HM4tuqYZWVsCyhXPlPkXyKNIR6Zf36MSKJN1+qkv +Jo9f5jHbqK0EOl96kOfV5FEcOz52vi0B1qYQYtMGeTQ/+WrgGV8p1G/MEXye +IY8nqysLL60phT/WU8+emitgqnxYZH5tKQSb5m1vjlXEOGnxL+ZFZWCbKzlp +d0YRC4gPR3JKyoAQOhr/LFURpViThb9vlsHz9i28V9cUUeC2ze2i+2WgEygu +0P9MEX281vZWd5fB56JDRT+UlXCDh0LjaxEuuC+x/7a0XAkZKvHW4n5cWHXk +Tszlu0qYOWEm+WAfF0TfLZNnPKJ8tdU7MJgL1VwBYPcoofDkl6raSC7I21Un +6c0r4RLu2LxSKheex7AM1tkpI5/w5okndVywGvsVHvBeGZunKkdERUkI25Ci ++WBEGYtZjgdjxEkoy9PulZ1Wxln9OY8pSRIUnTxNq4WXorbXCecOWRJGbj/8 +KaCzFHsClzw/qELChdikkIzDS7E75ccCUz0S3smxAxolaGhNV69o2kyCwv77 +KgoKNHwaIRf81ZmEf5pcnu6m03AFZzBFzIWEyvAELalVNCyPDlpg5U7C6bfj +w64uNHy451BM6k4SVl6/4zuWT8PLrTTjOyEkxJhv8lI2UcGu7gJ/mQskbPC4 +/MPYUgXPRewUFUklQTL66zHnf1TQ5c+9jN9pJGQ1xBUleapg23HtxN5MEm7b +1nwVPKWC+qZt7QfySRh3YYZO9Kggd+iijCSPhKrwQKHFQypYpkP//OomCZFZ +99J1RlWwuuNAeVoFCeIDW+/s5lfFwYosLdnbJGj4nuEb0FRF4m4Q71MtCR4H +p063HlFF12E5u/kWEtQvWtKG41Rx8h09P+Xp//N3rlQoSRUPhYlMsttICP+9 +/LlloSo2r+o6ZfmShNRjHnLVrarYb+Nw0rmbhNbzj3OuqKghI7Bn6df3JJiV +ZVRE3ldDB+Xtu7tmSLDqevZntEkNxTwLV8/MkmDPt3D99pdqeCyt95D8HAne +jgE98EENPwYk69r9IcH6CCMqehEdr3ZfLkpdwINAtemCNSvouLzvhjBXhAdT +5UlNs7p0HMvbfbVIlAfhG1Z84xnQMeHg2spLYjyIO+BpRFjQUXfNZ/VICR5k +Njxp4t9ER/qSwy6sxTxo9M351hBKxyWWVX7TCjyw+W0qc/QIHVut1Fc/VOTB +s6R2I4NoOkp+Dj5+XokHPdUi0YWn6GhsHRZBLOXBqFiITFwWHU/fIeXYqjwI +zpU05uTRse5XcfEA5RmD6/9NXaGjSQzzbroaDwQ8+gt9uHQ0tfG0X8DggSK5 +wdi6no5tPmrrKpg8yLZ6/9/fR3Ss2id0143FA6InIrqyhY62x7V4fylr85c3 +szvomKOupAhsHlg6qbgLfaZjmqDYx7xlPPCf+R7dJMFAzc9542NaPDA7sEv+ +owwD/RrVRcO0eSA83FssoMjAJqVfZvOUr7xu6LQgGJg0t+oDvy4P+mtTtW4Z +MXB9xsGAT3o8KDEWrX+5moGrPvA5u+pT+SUjt44jAwc/6Lo0UZbP941dYcfA +lg96VdkreeAQZ9qdt52B5Zljw+oGPFD9W7rv/k4Geos2NkdTHgklBPp2M1Bd +//6TbsrxfmI6iiEMVFCbNYw25MGWwagGwzAGuoXm5bVRZrlNumyOZODXgrUr +aUY8qLPrO5YYz8B/sv59WEI5sXGTUslZBk480Gwep+zOeVTWnMzAtKC+SX1j +HszqcHsWZjPQTKr8UTHlpqvM/UQ+A40W2wUMUU6jpy/EqwxkNl9BZRMerJSJ +0T3CY+Ccc6pfBGW+hKnG9EoG2o8U3r9B+ZnAHrfKOwzcW+Nv1UE562j/2Ks6 +Bha9K/75m/LeKce47w+p/JkRvQxTKv8Bj5WlWhgoZ5M0spay8KfVpNZzBtZv +qNL1pty5nVxn28HASJZrYRTlwm7Wa99eBgYeNrHLoBy0KSMw7i0V/3lFdZIy +PpEQLBhioP/eeysbKUuujb1U94Vav/xrSAflvjvTev2jDDRt8Bt5T7nEYO+j +uQkGOl75lTFGObz07X9Kswxsk/aLnKG8ge303egvA5P3HM78S1k+p+mEkwCB +QY0TowvMeDCkwKEFCRN4603+UX7KN5N4vHMSBF5QcbDioxwtwl5fKkMgN6ve +eo563yE2880TBQIvKTcdn6CsOicZ9JlGoCP/ivnPlEeCjwkJEgSW+1VVvqZc +M/Izi6lBoIi4WUkL5Xgf/5VrtAg8sjl64DblLf0Djz30CUyxd3EqoMza6rzt +qBGBFRVJwgmUf7Q1/8hYTWDW0Myf/ZTrNljEVyGBb997GjpSTnxwU6VjHYE+ +HhlcfcruZhrlP2wJHLwSvE+S8uwK6X5tZwKjaVuq7lPnN52tHLPKjUDmmmvy +qZQnpdRZptsJ9Kpnd/pSHp0w3WO1m0BO+dPDiyh/9bGSsA2g4hM+ve05dZ8+ +d9mTDsEEzhzPvJJO+d0d72m3CALz9T7uYFB+qx2Q4RlLoO9Edc8gdV/f5Bw2 +33WSQFsB2aocyp3HzsYeOE9gY+KZa7KUn9hVScZfIfC9rGXEG6peHt97wDt7 +g8C74wMW8ZQbdVudLnAJLJ2P3adPuVZ2MPNyNYHDu5Xljq6izuu1qMatpwQ+ +Kq8u/EHVK3ej3JOalwTSgs5/OEW55L7avrouAmetJTNVKRcVGJS3DBL4JtfR +C6n6z9zrAe+mCIyJLIz20eHBxT6/d59+ETgRA6Gfqf6R4hAc922eWj/e6qMf +5cRV8S0zIkzMXT9rsoPqP7FzvK1SqkwsuMl8YKRJ1UfCokBzaya2mAyp+qnz +wO+PlKylHRPdL40TDVR/27VfuXL9v0y0l9rCXUrZc7Pub0c3Jja2Ve98SPDA +aalr/O4AJnZKD7jNUf3UvLgkNy2NicruahY/qP78ml6cs+4SE8etxgQNKIen +Xb88mcPEwT9vKoOpfl4VU5TleJ2JPhXibSPyVL275KZL3mWibkvJ1ENZHixf +lJJ0YpCJdnvONy6h5kVTePI5w49MXMx1dzUUp+IbT0ocGmaiRojr4GZqvhS+ +PnvGcpKJUVtnnp6m5hH95sn4v4Is1JzdrDuwiKqn7UeiQ7VYyO7pvr/8Lwm3 +2sOi1PVZmGvuPbScmm9Otocj2w1ZWOUQL7zsNwnJhgePrgQWcqYfO6r+IkFC +fP/h0U0sjCw1WDQxRcLC6h2Buw6xULs/8gLnGwnfZWw9t9Sz8IyZyYR7Lwnd +/sTzPY9ZOMpvcV6gh4S6R78gqpWFm+p6f1ztIiEpvFjtWicLY2XEFw23k6D3 +Tvzt7DALTZwfx26m5nsAr21btqw6Xiq4+PxuAwnDDs7/De1UxxMzUbrjN0h4 +eV27ZWa3OnaG1Thsuk5CjYDgaon96vikoNWZvErCqapKZaMwdXxR06HgV0jC +MjXF3pNn1ZGmRUuuzSbBd7TXZUWlOtp8OOwsnETC0BnPLUFCbDR/JdYpH0zt +P6xF6Imzsbg7p3/LARJ+rp/99k2ajecm9PVT95MgKpAct1uZjbtUZ6vE/an4 +wxoqPLXZmK1c4/OJ+v6K8GHLOmxmI/vUU6l/tpAgbzHStiKHjT7Zv5f0GJNg +M3bI5oORBm72CGX7j3CBpq96QthcA7vCNlY3fOLCaFBj/Yo1Gvj9xdQrhfdc +SJmWNg+y08Bzb7ffuNXDhf4/13Xmt2vgVTkdtaZHXAgSfyOrdEoDH3ZIW9vm +ciFzOfb/81oDK3gyke3/cmHEWzi4ImoZblny+nb8tTLqf0SB/2T9cvTe+Ib/ +CacUZJ6yE8kxTdT879vY6ZZioMVz/zUy0kLRnnmWGP0GpK8wlZb11cbM4w1n +RaOvwRPlNYYT53XwUnT4mOLbIjCj1SfpdurieMzlsQMKV0BSID/EK1YPuwe9 +L34KLADVGDVzV7Y+pozH26Vz80BE3b3S8bE+jnFGU7UX5oIOR4l7aNtKrJ8s +nG4VzYagfpkGW75VmNX1VS51KgPGJs4426SvQvZzuYuP4SKs132UaaNtgD5l +OR1P61OgdmL13M9nBihx4fvDuTXJEKC1sveFjyGu9+X3NKQlAWd0Z7uriBFW +eb7SNptNgHUsxY0S+Ub4rodwuLEjHpZFnz5cb2yMz4dqox8ZxoGmj+l99V5j +fLmuL/shIxZ8av2OVxwwwWFxgT/tmlFwP7d953c5U5SsSOtr2hgOk9fmf+pW +maJJ3wv3OVYoeKsXi2RuNMP1x3YVcBqD4LvmBaOb42bIb7Lk2qJV++F24dzg +VPxqFHspwEpU2wNuVkxcrWqOx3o69/d2+8DSfSerderM0adLTG3goxckzu8y +TKg3x4KCrTt8e7yAP9ma96nRHLfWnzjws8ULhisXXc9tNkdahMWgPs8LaviO +p8u8MscOQb0TUke9wC0l+tD0B3PU1r/2dbesF6TfCTOsFeNg6ftjWUc2eIKc +qD9v41YOvmn1VTdK2waFayPCx105GBLG/nTv6DZYGZG49oI7B8UTGjpcvLeB +/TjZ0e3FQemLt0Sb9LbBic6pWW9/Dn7QXnfmdKs7zORHWYbHcPDprdyGVCF3 +6F194VVRMQclBd0LQhLcwO9gYZZNGQc5p93z7ULcYLrsls8IycG9prPbDba5 +gQzR/VO/koNCfaHDZrpuYCesQrtXx0H/jRcXLW13hbvtRTtfdXCQyPMpUWG4 +gq3kbe3Qbg4e+zLmIybmCt3rm6cVX1PxjU5oi065wGTN13iPAQ7mey2sNWt2 +Ae08vdIvwxzUuZvA3RXkAnd714Se+cZBpU9CZa/dXcB2yWbQHeeghGDZTq/1 +LrDr5MEXIVMc3ITX2y7TqPXqTmQqzHCwMj8/YIuQC8T+uuhd84uDliclL6n+ +2ArSBte1tv3h4IEmW9ufb7bC5X01U/PzHNQarz4w8Hgr/A8HXWne + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06729140799403661}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06729140799403661}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435563504976*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"c1cf7cd9-ef70-4d85-bcf3-7caeff573c2e"] +}, Open ]], Cell[CellGroupData[{ @@ -10851,66 +12189,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[116]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], + "In[131]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 116, 57, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068365192`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.9365647317570075`*^-161\\\", \ +RowBox[{\\\"1642431204554797391706825085547\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0438400000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 131, 45, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.994355635102913*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], +In[131]:=",ExpressionUUID->"45ed315b-1eb9-4110-bea8-35682ef4b515"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 116, 58, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506846985*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.173701344046779`*^-164\\\", \ +RowBox[{\\\"5525138572122338425701759587783\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"95\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4777600000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 131, 46, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.9943556351123667`*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], +In[131]:=",ExpressionUUID->"20af9f3f-7f77-4514-a54e-d309666e1b94"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 116, 59, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506856045*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4176009216168073`*^-166\\\", \ +RowBox[{\\\"1923300736955786005986782512507\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"99\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0825600000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 131, 47, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.9943556351234694`*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], +In[131]:=",ExpressionUUID->"ad2f0359-45b2-46e9-962c-6fd7eaae1e75"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 116, 60, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068640423`*^9}, +during this calculation.\"", 2, 131, 48, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.994355635131719*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], +In[131]:=",ExpressionUUID->"ba26ca9f-ef29-4d5e-9678-d16417920e0a"], -Cell[BoxData["11.275343508404701`"], "Output", - CellChangeTimes->{3.991326513010317*^9}, +Cell[BoxData["11.57951360810342`"], "Output", + CellChangeTimes->{3.991326513010317*^9, 3.994355723462454*^9}, CellLabel-> - "Out[116]=",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] + "Out[131]=",ExpressionUUID->"879b4173-8483-463a-b083-4d113aba1768"] }, Open ]], Cell[CellGroupData[{ @@ -10977,68 +12322,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998502248*^9, - 3.9917998584727135`*^9}},ExpressionUUID->"df92a918-12ed-ff47-a8a8-\ -122296a3d634"], + CellChangeTimes->{{3.9917998502248*^9, 3.9917998584727135`*^9}}, + CellLabel-> + "In[132]:=",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 117, 61, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130447063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3444778584138733`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39706282409984000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 132, 49, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994355723514441*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], +In[132]:=",ExpressionUUID->"237b5238-a8d6-4184-aa18-6d3e7da1ece0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 62, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513053705*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.711727713253255`*^-221\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 132, 50, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.9943557235231123`*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], +In[132]:=",ExpressionUUID->"f02306f8-6080-4590-87e1-7bfcb58ac2c6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 63, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130617065`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4265058190569778`*^-226\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 132, 51, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994355723532578*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], +In[132]:=",ExpressionUUID->"099e6d61-d049-4f7c-8412-0abf3a3af28f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 117, 64, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513069849*^9}, +during this calculation.\"", 2, 132, 52, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.99435572354151*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], +In[132]:=",ExpressionUUID->"1dc47cda-9a19-4f17-b476-44c9664fb06a"], -Cell[BoxData["1.662840304462236`"], "Output", - CellChangeTimes->{3.9913265201819115`*^9}, +Cell[BoxData["0.20383243385232355`"], "Output", + CellChangeTimes->{3.9913265201819115`*^9, 3.994355734650716*^9}, CellLabel-> - "Out[117]=",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] + "Out[132]=",ExpressionUUID->"2446460e-fd50-493a-b685-b68d0dc2810c"] }, Open ]], Cell[CellGroupData[{ @@ -11059,8 +12411,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11105,68 +12456,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998626681576`*^9, - 3.991799866004116*^9}},ExpressionUUID->"1990573a-00f1-b54c-9d39-\ -9c68738afe07"], + CellChangeTimes->{{3.9917998626681576`*^9, 3.991799866004116*^9}}, + CellLabel-> + "In[133]:=",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 118, 65, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520216116*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3444778584138733`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39706282409984000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 133, 53, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.9943557347036333`*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], +In[133]:=",ExpressionUUID->"b280816e-ab7d-405b-93fe-71776d4850fc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 66, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520226103*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.711727713253255`*^-221\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 133, 54, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.994355734713284*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], +In[133]:=",ExpressionUUID->"4f5443e5-c02a-4ed4-8a4b-50c03309ed83"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 67, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265202341022`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4265058190569778`*^-226\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 133, 55, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.994355734722694*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], +In[133]:=",ExpressionUUID->"71def9c7-a10f-4e16-9c72-062633ea82cc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 118, 68, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520242243*^9}, +during this calculation.\"", 2, 133, 56, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.9943557347312727`*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], +In[133]:=",ExpressionUUID->"6b4966cf-c57c-4f65-9bb2-892756cb3529"], -Cell[BoxData["8.698310175000124`"], "Output", - CellChangeTimes->{3.9913265264075394`*^9}, +Cell[BoxData["34.86981319371832`"], "Output", + CellChangeTimes->{3.9913265264075394`*^9, 3.994355745256674*^9}, CellLabel-> - "Out[118]=",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] + "Out[133]=",ExpressionUUID->"90d7d467-ec43-4e60-8c0d-17ffee1c8a3e"] }, Open ]], Cell[CellGroupData[{ @@ -11187,8 +12545,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11233,68 +12590,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799871682028*^9, - 3.9917998792226925`*^9}},ExpressionUUID->"586f2005-dac7-8547-be11-\ -766f96e6af5d"], + CellChangeTimes->{{3.991799871682028*^9, 3.9917998792226925`*^9}}, + CellLabel-> + "In[134]:=",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 119, 69, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264435444`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3444778584138733`*^-215\\\", \ +RowBox[{\\\"6657177494374971892087697643746\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"33\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"39706282409984000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 134, 57, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.9943557452999077`*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], +In[134]:=",ExpressionUUID->"c8dff39d-f386-4d8d-8169-601eb4250656"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 70, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264535427`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.711727713253255`*^-221\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 134, 58, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.994355745309362*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], +In[134]:=",ExpressionUUID->"f3cec021-ae00-47b3-9455-d90c737d6a0b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 71, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264615555`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4265058190569778`*^-226\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 134, 59, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.99435574531787*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], +In[134]:=",ExpressionUUID->"c650512b-f3ca-40f9-b07c-cd6810e74f8f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 119, 72, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326526468542*^9}, +during this calculation.\"", 2, 134, 60, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.9943557453288918`*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], +In[134]:=",ExpressionUUID->"82c1df0b-e5b8-4052-bc2f-6a9f54a78eea"], -Cell[BoxData["16.721244215445346`"], "Output", - CellChangeTimes->{3.9913265299431496`*^9}, +Cell[BoxData["5.273766541361585`"], "Output", + CellChangeTimes->{3.9913265299431496`*^9, 3.994355754140573*^9}, CellLabel-> - "Out[119]=",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] + "Out[134]=",ExpressionUUID->"f7670872-1846-4154-b680-a148f1522e1f"] }, Open ]], Cell[CellGroupData[{ @@ -11303,22 +12667,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9917998836260815`*^9, - 3.991799887334032*^9}},ExpressionUUID->"363f609f-6fd9-cc4c-924f-\ -14ef82ef0962"], - -Cell[BoxData["0.13787921511838797`"], "Output", - CellChangeTimes->{3.991326529975149*^9}, + CellChangeTimes->{{3.9917998836260815`*^9, 3.991799887334032*^9}}, CellLabel-> - "Out[120]=",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] + "In[135]:=",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], + +Cell[BoxData["0.015031005354751782`"], "Output", + CellChangeTimes->{3.991326529975149*^9, 3.994355754189909*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"2f07bc70-d745-43b5-8c4a-0c3444430f0a"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991799895862177*^9, 3.9917998977747803`*^9}, - 3.991924340381132*^9},ExpressionUUID->"32c57f0b-017d-d340-92c6-\ -0f56a212e9c3"], + 3.991924340381132*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ @@ -11341,12 +12706,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[122]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], + "In[137]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913265300040226`*^9}, +Cell[BoxData["17.88166778591983`"], "Output", + CellChangeTimes->{3.9913265300040226`*^9, 3.994355754216415*^9}, CellLabel-> - "Out[122]=",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] + "Out[137]=",ExpressionUUID->"2c2ed349-0889-4509-be11-33ca554e85e9"] }, Open ]], Cell[CellGroupData[{ @@ -11356,12 +12721,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[124]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], + "In[138]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.991326530052025*^9}, +Cell[BoxData["1.501611514492998`"], "Output", + CellChangeTimes->{3.991326530052025*^9, 3.9943557542330303`*^9}, CellLabel-> - "Out[124]=",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] + "Out[138]=",ExpressionUUID->"70eff134-309e-4eea-9f95-0151d1b9fbb8"] }, Open ]], Cell[CellGroupData[{ @@ -11371,12 +12736,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[127]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], + "In[139]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913265300922585`*^9}, +Cell[BoxData["26.85131824567573`"], "Output", + CellChangeTimes->{3.9913265300922585`*^9, 3.994355754247384*^9}, CellLabel-> - "Out[127]=",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] + "Out[139]=",ExpressionUUID->"7d865c99-aeb2-4fea-bd0c-7dd4128c0324"] }, Open ]], Cell[CellGroupData[{ @@ -11566,12 +12931,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[128]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], + "In[140]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[BoxData["0.022635100966331548`"], "Output", - CellChangeTimes->{3.9913265301172295`*^9}, +Cell[BoxData["0.006011345443424357`"], "Output", + CellChangeTimes->{3.9913265301172295`*^9, 3.994355754266197*^9}, CellLabel-> - "Out[128]=",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] + "Out[140]=",ExpressionUUID->"e7270eeb-9140-4f10-9399-89d4a0da593f"] }, Open ]], Cell[CellGroupData[{ @@ -11585,12 +12950,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[129]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], + "In[141]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[BoxData["5.890521190513567`"], "Output", - CellChangeTimes->{3.991326530210228*^9}, +Cell[BoxData["11.430338659614225`"], "Output", + CellChangeTimes->{3.991326530210228*^9, 3.994355754464635*^9}, CellLabel-> - "Out[129]=",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] + "Out[141]=",ExpressionUUID->"8ce6c3dd-e37b-4282-88e8-128c864eed63"] }, Open ]], Cell[CellGroupData[{ @@ -11782,12 +13147,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[130]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], + "In[142]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[BoxData["0.012260254107801566`"], "Output", - CellChangeTimes->{3.9913265302252293`*^9}, +Cell[BoxData["0.03516090580658647`"], "Output", + CellChangeTimes->{3.9913265302252293`*^9, 3.994355754482596*^9}, CellLabel-> - "Out[130]=",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] + "Out[142]=",ExpressionUUID->"d55743cf-aec1-4151-896e-cd0ef57445fd"] }, Open ]], Cell[CellGroupData[{ @@ -11801,12 +13166,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[131]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], + "In[143]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[BoxData["8.003781147223087`"], "Output", - CellChangeTimes->{3.9913265303172264`*^9}, +Cell[BoxData["4.7262306610832505`"], "Output", + CellChangeTimes->{3.9913265303172264`*^9, 3.994355754676202*^9}, CellLabel-> - "Out[131]=",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] + "Out[143]=",ExpressionUUID->"2cf14cab-cbb8-4cfe-b2e0-af01a5ad067f"] }, Open ]], Cell[CellGroupData[{ @@ -11899,12 +13264,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[132]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], + "In[144]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913265303292294`*^9}, +Cell[BoxData["0.09644452732399805`"], "Output", + CellChangeTimes->{3.9913265303292294`*^9, 3.994355754693275*^9}, CellLabel-> - "Out[132]=",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] + "Out[144]=",ExpressionUUID->"02147772-452c-4997-b072-5f875f19f8c7"] }, Open ]], Cell[CellGroupData[{ @@ -11994,12 +13359,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[133]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], + "In[145]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991326530340416*^9}, +Cell[BoxData["0.903555472676002`"], "Output", + CellChangeTimes->{3.991326530340416*^9, 3.9943557547087708`*^9}, CellLabel-> - "Out[133]=",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] + "Out[145]=",ExpressionUUID->"99618a8b-bf7c-4dd6-8539-0668e2344dfa"] }, Open ]], Cell[CellGroupData[{ @@ -12122,12 +13487,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[134]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], + "In[146]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991326530367384*^9}, +Cell[BoxData["0.08714298047324866`"], "Output", + CellChangeTimes->{3.991326530367384*^9, 3.994355754726708*^9}, CellLabel-> - "Out[134]=",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] + "Out[146]=",ExpressionUUID->"4ecdddf1-24b2-420b-8eb9-7fea8f562ab1"] }, Open ]], Cell[CellGroupData[{ @@ -12142,7 +13507,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -12164,8 +13531,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12189,68 +13555,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799912745739*^9},ExpressionUUID->"c3883d3a-8a99-644a-9175-\ -a97b5c6c44f4"], + CellChangeTimes->{3.991799912745739*^9}, + CellLabel-> + "In[147]:=",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 135, 73, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265303923836`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3289868713253457`*^-212\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 147, 61, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994355754753977*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], +In[147]:=",ExpressionUUID->"f3f753b9-c774-4fd3-84bd-937bee899701"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 135, 74, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304013824`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.032369241441778`*^-218\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 147, 62, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994355754765711*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], +In[147]:=",ExpressionUUID->"a52e3b00-56c2-4a85-8264-71816f4c2bb9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 135, - 75, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304095325`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.138788566991886`*^-223\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 147, 63, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994355754775774*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], +In[147]:=",ExpressionUUID->"5d671b01-66c4-487a-ae23-d26a325573d7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 135, 76, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304175396`*^9}, +during this calculation.\"", 2, 147, 64, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994355754786538*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], +In[147]:=",ExpressionUUID->"1c68d214-7139-4cc9-9d81-39ce58e7216d"], -Cell[BoxData["5.890521190513565`"], "Output", - CellChangeTimes->{3.9913265339749985`*^9}, +Cell[BoxData["11.430338659614229`"], "Output", + CellChangeTimes->{3.9913265339749985`*^9, 3.994355763300889*^9}, CellLabel-> - "Out[135]=",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] + "Out[147]=",ExpressionUUID->"86b9e37c-4e14-4081-b959-ba1787b6cd09"] }, Open ]], Cell[CellGroupData[{ @@ -12265,7 +13638,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -12287,8 +13662,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12312,68 +13686,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917999175346184`*^9},ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-\ -bed1f30b804b"], + CellChangeTimes->{3.9917999175346184`*^9}, + CellLabel-> + "In[148]:=",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 136, 77, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340092525`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3289868713253457`*^-212\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 148, 65, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.9943557633585377`*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], +In[148]:=",ExpressionUUID->"4f38e291-9bd7-447b-b07f-cc674a352704"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 136, 78, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340202503`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.032369241441778`*^-218\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 148, 66, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.9943557633691463`*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], +In[148]:=",ExpressionUUID->"d5ce8dd4-81cc-4c7f-bec9-1926152de723"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 136, - 79, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340282536`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.138788566991886`*^-223\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 148, 67, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.9943557633782682`*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], +In[148]:=",ExpressionUUID->"6349457c-1219-4b5f-8811-69de39e527b9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 136, 80, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340354958`*^9}, +during this calculation.\"", 2, 148, 68, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994355763386222*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], +In[148]:=",ExpressionUUID->"a042378d-2457-45fd-87e6-892faeff11e1"], -Cell[BoxData["8.00378114722308`"], "Output", - CellChangeTimes->{3.9913265375649567`*^9}, +Cell[BoxData["4.7262306610832505`"], "Output", + CellChangeTimes->{3.9913265375649567`*^9, 3.994355771636857*^9}, CellLabel-> - "Out[136]=",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] + "Out[148]=",ExpressionUUID->"8a4d7a55-bcac-4247-abc2-a6eb82f66869"] }, Open ]], Cell[CellGroupData[{ @@ -12431,92 +13812,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917999220519733`*^9},ExpressionUUID->"d5c5d0e8-862b-f245-8b21-\ -eac61b5b75d3"], + CellChangeTimes->{3.9917999220519733`*^9}, + CellLabel-> + "In[149]:=",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk4Ft0bB3BLJFshWyJrhUjPYy11bluWbGXPEo/nGUshlJBIok2ilHpb +yBaSspUor0ryk+2NdmRv7NtIlvQ7/phrrs81M98559xzn5FjBB1gcbCxsZH4 +WDkHN6tvedbavGdBQDXswkYS7RnP1mIYF6LKUt7MFXena6cqGr9Acnm5Shex +bZlN3Pz0t8hwdJntEnZxeMwbLuNGNBQropmIfaFOoiam4D+Ufri/+jL289bg +e0u0jyiiMPj+Fezhbw1REVVfULJZ1fcU7A0DCq6/jDrQEeNXAanY+yai9EIb +f6ATOXFOadjVS8N84QU96H0wx61/sD/Fip98GtiHpJ/spt3DHuc2HqZoA0jI +V0shE5s78agLfW4Q1d0fOpyLLSN0tz64ikQ04iD/Q2xrqV+540ajKOBpsH05 +NpEhL6bGM44qnCSWKrFjlGziDzdOoKyik4s12F/E23ccK5hCq5+EszdjMw/6 ++11LnEb3jgvzfMSevMN2vyRwBils8SM6sHnk1dZN0WbR2kQrlVHsVOYb03Wi +v5Cz5/crFLbsA5eY7XO/kDpjs9UfbN1tCeMBVb/RCV2qea00iXy1fzQOGy2h +iy7BE7rYVPjxVbyb/6CSmmFhY+zTVXz6yjzLSHpRLskG+yboPvRp/IsWzBsu ++WAzc+qNQwrYQWIDV/Zt7IK6a92xUhzg2B0Un489+dMjKiWRA0jLW9XPsKNU +ZkufBHKCYfJW3Y/YqY/lFCZoXNC8Rd9svQyJvrWOVi9ncUH+2fSfitiy088O +Copyw87zr7u0sAs1ra+qzXGDvZBZuzN27fNI9iNVPDCyw6EjE3v2TdsP0ogf +JjX+8TTdRCJhS/51J6v5oXhkvdshbI12YxDQE4B7JmXVJ7D9+8szdqgLgsNb +r+f52Ec5GjV286+DisLos8KyJBqQL5qK/yUErtzzwXPYFNGwpoUuDDM3v/8Q +lSMRx8NBOYlgYTg6PVimiS1L33SgYEQYtitFpIZiHzRKLmnuFoE149eUf2G3 +eIeEir8XhQyjoYeCCiTqepB0yZNHDCQsTiXSsUdHCrLyTcTg9Q7U7ozNe6yv +bVeNGCzxWd/KxjY+a6/pWS4OmjP350GRRJXZ2rN56ZIg1Xxc5LISibIHFsJ2 +HpOG4zVpRSFbSWTmcK4r9JE0SJb8VbqPPVorsvfRoDQILfvMtWBrZm8TlXWR +gfItu/LUlfF6MjxKufZsgoKIXwaT2NMT3SfIOFl4wynpeFaVRCIBxmWlVvKQ +ETvBOalOosFsXl9bf3kYiFR5obydRBUdrVJjCfLQphDa7I3tZuket7lGHpZd +trN/xc5WDTtwi6YAiQc8099p4PcPP5iMFleEKVvBf8tpJLL34VOz6FGCAu81 +Vz5qkwiFOdCc/ijB4niOuqQOiVTi03WYkpvha9MPRXdstiy6YfT+zSB/QU10 +EPtRl6tTyavNELkFcS3p4v50LIzdkLkFOEyLFHR34fEZW30aZijDEfZg9ylE +oiy7tO9z0crAp1D1HwISJTF6ulfdVoY3eaV3krCZp4+PyLQpQ4JCibaaAYmE +XtxlszNSgYW3VGSgIf5+6OMqVQqqsPWVkAm7CYmk5K/EXOrfBv52DX0+FiR6 +cZFSnudQgxmNqNp6bLcZl3ZCTg3Y2o34VPaR6F6torKhhxr0Xxd/P4Yt71P5 +4fdnNTB0+ikSaYXnWzigRLxXh1zBjoYcWxJJS8kQsi4asKrrc5u5E4m25Rzj +X0Q00By+FVvLIhGDGTerZk0DrtDr/2oTuF8VrnZ5utEAnSpwzMfmzHz8pC6c +BmrcislXfHC/3Ru2v1pMA9sLfhqefng/vel5V1mBDr7r+jcLB+D6XrJUd+bW +BCOJ1smKYyS6H6JoW96oBXX8HfLC8SRqDUM6Z3P0wDvOqHbfIxLJeXy0dj+y +G9w2PIxR+04i1t+nRdIRAHX27r3FfENIfKRitTjDEBLSxq5f3juEjtH1O66q +GIOj3qdTh+KGEGNsqV5k2ASWy9QVTtcOoUeGoavTW0whv6nk7X6hYZRN+b8q +TDWH5oCJ8Vcew+i3gURTbcw+sDMpyJ6qGEadbJxTPV5WABZ71taIj6DAjUHJ +sQo2UJPg71F6fAQV+dXXXI+3hXClSZ5LPSMockZyTtVvP6ze3ef+cN8omrXY +6/ju0AE4Pt5Qe6J2FOm5phgM7LcDtaWCly9hDH2QvOtfS7eHQ/86KJ5/PoY2 +5Ma9yNvqACkJ+gNnDPC+3q1iaS3gCK1/2Q/21I4jmfZJn7AxR3C+cSYlwnwC +0a+nFGZ1O4FcSFbM1s4JdHfVjPrVN86wIF1vv05rEj012P4t/rkLxOnssOg7 +M4lu6lwUWio4CDVqtwP8WydRy/ecBHqiK0yxovz9JKdQudUdxaOn3UA1L+L0 +hO8UmgqwYwtkuoP8iVdHZUun0OxeZd9xIw9gEEOigYtTKG/s6+9Q7UOwOtj9 +8bTZNHK+n+Ptzu8Jic610pNXplFpyb5DnOc8oaSyOv7nt2mkJ/Vh/sK8J7C1 +6HKek8H/nW6fb//5ecF8weSslMcM6uc7bHOnzwvYRtTPn0qfQa1J1t6mDgwY +25Y8m/llBqWGp/Mdb2WAxMxVVr0QhV5U/533NvcGnpCKS2eMKbTWDc7RK72h +WFJD/1oghWTXv2vZ+MIbXm/dNLg7iEIajVYS3NXe0FCjqkxiH9B3zf/yyhvE +nm+N3BVModSNYe9P/c8bTPXijDtDKbSh8+Ha+i/esM0ozEsggkKKHuI33ea8 +oS7cZFYmjkJ6nuN58ZpMMNDsima/QaHcW5Oh1tpMsPNs5zqPvb5teo+4LhOa +BFTVBNMoNG4y1563iwnBFQ/cJG9SeP9iY280ZMJk2X191X8oJDgn5CK8nwmX +I7vG9e9RqP+y1pr0ACaIzniniOdSKKkqyq8ilwmeVp6ZOWUUCqCl6YXnMaF7 +dG+MUDmFLPOL1+gWMGHq6YvFKGzetMH8Z4+Y8MdatO3AUwrFh9gOPy1jgoxM +5fz8MwpFKSseLn/NhH8EFyW0qyjkn/b+SEkXE0QUA+isVxQyFxzUD+lmwt2X +f/pqsbfGswnQevH9mXSa4msKDYZoPSoeYEJ2icODHmwv6/SxJ6NMOPi8d9qp +lkLOXKGBjxeYUKTVxEF7RyHT0A1HC8VYMHRCO/d2I4VepydYXJVgQW367r+z +2PqN04rhG1jg0BHda9OE66X0/quRDAsu04NMOZopJPn5pNF3JRbcUja/4NVC +oZGdnWK8Wiw4c5L+Y80HCl3hyHjpY8eCkqAMf/bPeP7b+W9aObDAIH/3mCX2 +WdfwELoTC/LW6P1Oww4vs93y9yALPqqvf7DtCx4/wZ5yg8ECCdogYfuVQvQG +BvNtMAveRVzxjv1Ooc8pSnwKySx4fo9j4fwPChUhAV8yhQVpTbG+r7DPjlG1 +j66xYDo0NmAem2ZeG62bxgK1L107fbtx/di8p63uscDnsEwv9FBob1DG1/BC +FtCWzV27eikkLX1ee08RCxZcW9TW9VGIagi6xvmEBccImxsG2JmbkVVSKQsy +bGSVs7D/dHbWZFWywKpc3cGrn0JlllJ5zfUssLWNrvnfAIUuLXBwpTaw4Pyv +rRMUNiNv2MulkQW6q11KNw1SaN2qSqn+FhaoeKgvhWIfqXK+Mv+JBTomVJL4 +TwopqNwIUxxgQe+yY6kFSaGFz6fahgZZENVgoxOE3RrP0nhM4vUJ8rO9hh3d +ozmsN8oCviDS4Bv2t5tt7jYzuH6rIuS8hyh0dbWQSSQ7Abq8O5s9h3H/Tne6 +HuMk4Fvma+Ez2D87C0ICuQjYbVT+Xya2fplxBmMNAWbvqqt7sQc9wxcthAgw +biu1dxvB47c0ETYRIaCA7Dgcgb1LR1gZiRLwkxf9uY6dLFDoSJckIHssLalp +5Xrlj2IpOQJq9FYd1h6lEJFTWC+qQEA1r7udDXZycsSPtUoE6JyrLffBHiRE +BFYpE5BoVkjeWLkuYuo7qkFAiZwH9wR25bJIzCCNAMOGgmrOMQoNDHVf79Yk +YKNr76Q49s6ayDftugSwW3K82YPdf6RI5iUQMN1+WzoBW9D5pNYzQwKKj37M +voGtZ2RmWWxMQFFbR04udpJkb0SOGQGPncxE32JXrHqcnG5BgF1Qblwbdt/E +yQe3LAkI31V3uAdbt07042VbAuickL+IzSjuHTl3gAD9htTl1eMUunznMccZ +ewJedmQ0iWD3hphrhDkT8CX94xdlbAEPMdOjBwnom5xfr4mta97n7u9GgEVz +Y8Pulec3nbrk4UnA/LWwLBvsCl6LTGcGAc1T5nVOK3mzYs8PMAkQelfLOLSS +19PXYkkQIJ8yEE6s5DU+GdzrSwA/WcATgM14duoP+BMQEy0iHLqSn2mxftcR +Aj7JyVwPX8m/LK6qFUiASOX/Uk6t5If3G2w/SkCnuSjPGWx+ZrGzcggBF8f/ +zsVj69hEBykcI0Cs+7zXhZX8nfsSpMPwegQ/Nk7ETlSSuCseToDS2tD7SdhP +1w2UCkUSQBm0nUjG7lksbuCLIsCosOVdykr+z+germgCWHy+KVextT/s+/03 +hgA3nTvtK/4/sUv8HQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12530,104 +13913,106 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV1Xk4Ft0bB3BLJFshWyJrhUjPYy11bluWbGXPEo/nGUshlJBIok2ilHpb +yBaSspUor0ryk+2NdmRv7NtIlvQ7/phrrs81M98559xzn5FjBB1gcbCxsZH4 +WDkHN6tvedbavGdBQDXswkYS7RnP1mIYF6LKUt7MFXena6cqGr9Acnm5Shex +bZlN3Pz0t8hwdJntEnZxeMwbLuNGNBQropmIfaFOoiam4D+Ufri/+jL289bg +e0u0jyiiMPj+Fezhbw1REVVfULJZ1fcU7A0DCq6/jDrQEeNXAanY+yai9EIb +f6ATOXFOadjVS8N84QU96H0wx61/sD/Fip98GtiHpJ/spt3DHuc2HqZoA0jI +V0shE5s78agLfW4Q1d0fOpyLLSN0tz64ikQ04iD/Q2xrqV+540ajKOBpsH05 +NpEhL6bGM44qnCSWKrFjlGziDzdOoKyik4s12F/E23ccK5hCq5+EszdjMw/6 ++11LnEb3jgvzfMSevMN2vyRwBils8SM6sHnk1dZN0WbR2kQrlVHsVOYb03Wi +v5Cz5/crFLbsA5eY7XO/kDpjs9UfbN1tCeMBVb/RCV2qea00iXy1fzQOGy2h +iy7BE7rYVPjxVbyb/6CSmmFhY+zTVXz6yjzLSHpRLskG+yboPvRp/IsWzBsu ++WAzc+qNQwrYQWIDV/Zt7IK6a92xUhzg2B0Un489+dMjKiWRA0jLW9XPsKNU +ZkufBHKCYfJW3Y/YqY/lFCZoXNC8Rd9svQyJvrWOVi9ncUH+2fSfitiy088O +Copyw87zr7u0sAs1ra+qzXGDvZBZuzN27fNI9iNVPDCyw6EjE3v2TdsP0ogf +JjX+8TTdRCJhS/51J6v5oXhkvdshbI12YxDQE4B7JmXVJ7D9+8szdqgLgsNb +r+f52Ec5GjV286+DisLos8KyJBqQL5qK/yUErtzzwXPYFNGwpoUuDDM3v/8Q +lSMRx8NBOYlgYTg6PVimiS1L33SgYEQYtitFpIZiHzRKLmnuFoE149eUf2G3 +eIeEir8XhQyjoYeCCiTqepB0yZNHDCQsTiXSsUdHCrLyTcTg9Q7U7ozNe6yv +bVeNGCzxWd/KxjY+a6/pWS4OmjP350GRRJXZ2rN56ZIg1Xxc5LISibIHFsJ2 +HpOG4zVpRSFbSWTmcK4r9JE0SJb8VbqPPVorsvfRoDQILfvMtWBrZm8TlXWR +gfItu/LUlfF6MjxKufZsgoKIXwaT2NMT3SfIOFl4wynpeFaVRCIBxmWlVvKQ +ETvBOalOosFsXl9bf3kYiFR5obydRBUdrVJjCfLQphDa7I3tZuket7lGHpZd +trN/xc5WDTtwi6YAiQc8099p4PcPP5iMFleEKVvBf8tpJLL34VOz6FGCAu81 +Vz5qkwiFOdCc/ijB4niOuqQOiVTi03WYkpvha9MPRXdstiy6YfT+zSB/QU10 +EPtRl6tTyavNELkFcS3p4v50LIzdkLkFOEyLFHR34fEZW30aZijDEfZg9ylE +oiy7tO9z0crAp1D1HwISJTF6ulfdVoY3eaV3krCZp4+PyLQpQ4JCibaaAYmE +XtxlszNSgYW3VGSgIf5+6OMqVQqqsPWVkAm7CYmk5K/EXOrfBv52DX0+FiR6 +cZFSnudQgxmNqNp6bLcZl3ZCTg3Y2o34VPaR6F6torKhhxr0Xxd/P4Yt71P5 +4fdnNTB0+ikSaYXnWzigRLxXh1zBjoYcWxJJS8kQsi4asKrrc5u5E4m25Rzj +X0Q00By+FVvLIhGDGTerZk0DrtDr/2oTuF8VrnZ5utEAnSpwzMfmzHz8pC6c +BmrcislXfHC/3Ru2v1pMA9sLfhqefng/vel5V1mBDr7r+jcLB+D6XrJUd+bW +BCOJ1smKYyS6H6JoW96oBXX8HfLC8SRqDUM6Z3P0wDvOqHbfIxLJeXy0dj+y +G9w2PIxR+04i1t+nRdIRAHX27r3FfENIfKRitTjDEBLSxq5f3juEjtH1O66q +GIOj3qdTh+KGEGNsqV5k2ASWy9QVTtcOoUeGoavTW0whv6nk7X6hYZRN+b8q +TDWH5oCJ8Vcew+i3gURTbcw+sDMpyJ6qGEadbJxTPV5WABZ71taIj6DAjUHJ +sQo2UJPg71F6fAQV+dXXXI+3hXClSZ5LPSMockZyTtVvP6ze3ef+cN8omrXY +6/ju0AE4Pt5Qe6J2FOm5phgM7LcDtaWCly9hDH2QvOtfS7eHQ/86KJ5/PoY2 +5Ma9yNvqACkJ+gNnDPC+3q1iaS3gCK1/2Q/21I4jmfZJn7AxR3C+cSYlwnwC +0a+nFGZ1O4FcSFbM1s4JdHfVjPrVN86wIF1vv05rEj012P4t/rkLxOnssOg7 +M4lu6lwUWio4CDVqtwP8WydRy/ecBHqiK0yxovz9JKdQudUdxaOn3UA1L+L0 +hO8UmgqwYwtkuoP8iVdHZUun0OxeZd9xIw9gEEOigYtTKG/s6+9Q7UOwOtj9 +8bTZNHK+n+Ptzu8Jic610pNXplFpyb5DnOc8oaSyOv7nt2mkJ/Vh/sK8J7C1 +6HKek8H/nW6fb//5ecF8weSslMcM6uc7bHOnzwvYRtTPn0qfQa1J1t6mDgwY +25Y8m/llBqWGp/Mdb2WAxMxVVr0QhV5U/533NvcGnpCKS2eMKbTWDc7RK72h +WFJD/1oghWTXv2vZ+MIbXm/dNLg7iEIajVYS3NXe0FCjqkxiH9B3zf/yyhvE +nm+N3BVModSNYe9P/c8bTPXijDtDKbSh8+Ha+i/esM0ozEsggkKKHuI33ea8 +oS7cZFYmjkJ6nuN58ZpMMNDsima/QaHcW5Oh1tpMsPNs5zqPvb5teo+4LhOa +BFTVBNMoNG4y1563iwnBFQ/cJG9SeP9iY280ZMJk2X191X8oJDgn5CK8nwmX +I7vG9e9RqP+y1pr0ACaIzniniOdSKKkqyq8ilwmeVp6ZOWUUCqCl6YXnMaF7 +dG+MUDmFLPOL1+gWMGHq6YvFKGzetMH8Z4+Y8MdatO3AUwrFh9gOPy1jgoxM +5fz8MwpFKSseLn/NhH8EFyW0qyjkn/b+SEkXE0QUA+isVxQyFxzUD+lmwt2X +f/pqsbfGswnQevH9mXSa4msKDYZoPSoeYEJ2icODHmwv6/SxJ6NMOPi8d9qp +lkLOXKGBjxeYUKTVxEF7RyHT0A1HC8VYMHRCO/d2I4VepydYXJVgQW367r+z +2PqN04rhG1jg0BHda9OE66X0/quRDAsu04NMOZopJPn5pNF3JRbcUja/4NVC +oZGdnWK8Wiw4c5L+Y80HCl3hyHjpY8eCkqAMf/bPeP7b+W9aObDAIH/3mCX2 +WdfwELoTC/LW6P1Oww4vs93y9yALPqqvf7DtCx4/wZ5yg8ECCdogYfuVQvQG +BvNtMAveRVzxjv1Ooc8pSnwKySx4fo9j4fwPChUhAV8yhQVpTbG+r7DPjlG1 +j66xYDo0NmAem2ZeG62bxgK1L107fbtx/di8p63uscDnsEwv9FBob1DG1/BC +FtCWzV27eikkLX1ee08RCxZcW9TW9VGIagi6xvmEBccImxsG2JmbkVVSKQsy +bGSVs7D/dHbWZFWywKpc3cGrn0JlllJ5zfUssLWNrvnfAIUuLXBwpTaw4Pyv +rRMUNiNv2MulkQW6q11KNw1SaN2qSqn+FhaoeKgvhWIfqXK+Mv+JBTomVJL4 +TwopqNwIUxxgQe+yY6kFSaGFz6fahgZZENVgoxOE3RrP0nhM4vUJ8rO9hh3d +ozmsN8oCviDS4Bv2t5tt7jYzuH6rIuS8hyh0dbWQSSQ7Abq8O5s9h3H/Tne6 +HuMk4Fvma+Ez2D87C0ICuQjYbVT+Xya2fplxBmMNAWbvqqt7sQc9wxcthAgw +biu1dxvB47c0ETYRIaCA7Dgcgb1LR1gZiRLwkxf9uY6dLFDoSJckIHssLalp +5Xrlj2IpOQJq9FYd1h6lEJFTWC+qQEA1r7udDXZycsSPtUoE6JyrLffBHiRE +BFYpE5BoVkjeWLkuYuo7qkFAiZwH9wR25bJIzCCNAMOGgmrOMQoNDHVf79Yk +YKNr76Q49s6ayDftugSwW3K82YPdf6RI5iUQMN1+WzoBW9D5pNYzQwKKj37M +voGtZ2RmWWxMQFFbR04udpJkb0SOGQGPncxE32JXrHqcnG5BgF1Qblwbdt/E +yQe3LAkI31V3uAdbt07042VbAuickL+IzSjuHTl3gAD9htTl1eMUunznMccZ +ewJedmQ0iWD3hphrhDkT8CX94xdlbAEPMdOjBwnom5xfr4mta97n7u9GgEVz +Y8Pulec3nbrk4UnA/LWwLBvsCl6LTGcGAc1T5nVOK3mzYs8PMAkQelfLOLSS +19PXYkkQIJ8yEE6s5DU+GdzrSwA/WcATgM14duoP+BMQEy0iHLqSn2mxftcR +Aj7JyVwPX8m/LK6qFUiASOX/Uk6t5If3G2w/SkCnuSjPGWx+ZrGzcggBF8f/ +zsVj69hEBykcI0Cs+7zXhZX8nfsSpMPwegQ/Nk7ETlSSuCseToDS2tD7SdhP +1w2UCkUSQBm0nUjG7lksbuCLIsCosOVdykr+z+germgCWHy+KVextT/s+/03 +hgA3nTvtK/4/sUv8HQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7534835155460649, + 1.3082454972349842`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7534835155460665}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12639,21 +14024,21 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7534835155460649, + 1.3082454972349842`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7534835155460665}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12667,102 +14052,104 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV1Xk4Ft0bB3BLJFshWyJrhUjPYy11bluWbGXPEo/nGUshlJBIok2ilHpb +yBaSspUor0ryk+2NdmRv7NtIlvQ7/phrrs81M98559xzn5FjBB1gcbCxsZH4 +WDkHN6tvedbavGdBQDXswkYS7RnP1mIYF6LKUt7MFXena6cqGr9Acnm5Shex +bZlN3Pz0t8hwdJntEnZxeMwbLuNGNBQropmIfaFOoiam4D+Ufri/+jL289bg +e0u0jyiiMPj+Fezhbw1REVVfULJZ1fcU7A0DCq6/jDrQEeNXAanY+yai9EIb +f6ATOXFOadjVS8N84QU96H0wx61/sD/Fip98GtiHpJ/spt3DHuc2HqZoA0jI +V0shE5s78agLfW4Q1d0fOpyLLSN0tz64ikQ04iD/Q2xrqV+540ajKOBpsH05 +NpEhL6bGM44qnCSWKrFjlGziDzdOoKyik4s12F/E23ccK5hCq5+EszdjMw/6 ++11LnEb3jgvzfMSevMN2vyRwBils8SM6sHnk1dZN0WbR2kQrlVHsVOYb03Wi +v5Cz5/crFLbsA5eY7XO/kDpjs9UfbN1tCeMBVb/RCV2qea00iXy1fzQOGy2h +iy7BE7rYVPjxVbyb/6CSmmFhY+zTVXz6yjzLSHpRLskG+yboPvRp/IsWzBsu ++WAzc+qNQwrYQWIDV/Zt7IK6a92xUhzg2B0Un489+dMjKiWRA0jLW9XPsKNU +ZkufBHKCYfJW3Y/YqY/lFCZoXNC8Rd9svQyJvrWOVi9ncUH+2fSfitiy088O +Copyw87zr7u0sAs1ra+qzXGDvZBZuzN27fNI9iNVPDCyw6EjE3v2TdsP0ogf +JjX+8TTdRCJhS/51J6v5oXhkvdshbI12YxDQE4B7JmXVJ7D9+8szdqgLgsNb +r+f52Ec5GjV286+DisLos8KyJBqQL5qK/yUErtzzwXPYFNGwpoUuDDM3v/8Q +lSMRx8NBOYlgYTg6PVimiS1L33SgYEQYtitFpIZiHzRKLmnuFoE149eUf2G3 +eIeEir8XhQyjoYeCCiTqepB0yZNHDCQsTiXSsUdHCrLyTcTg9Q7U7ozNe6yv +bVeNGCzxWd/KxjY+a6/pWS4OmjP350GRRJXZ2rN56ZIg1Xxc5LISibIHFsJ2 +HpOG4zVpRSFbSWTmcK4r9JE0SJb8VbqPPVorsvfRoDQILfvMtWBrZm8TlXWR +gfItu/LUlfF6MjxKufZsgoKIXwaT2NMT3SfIOFl4wynpeFaVRCIBxmWlVvKQ +ETvBOalOosFsXl9bf3kYiFR5obydRBUdrVJjCfLQphDa7I3tZuket7lGHpZd +trN/xc5WDTtwi6YAiQc8099p4PcPP5iMFleEKVvBf8tpJLL34VOz6FGCAu81 +Vz5qkwiFOdCc/ijB4niOuqQOiVTi03WYkpvha9MPRXdstiy6YfT+zSB/QU10 +EPtRl6tTyavNELkFcS3p4v50LIzdkLkFOEyLFHR34fEZW30aZijDEfZg9ylE +oiy7tO9z0crAp1D1HwISJTF6ulfdVoY3eaV3krCZp4+PyLQpQ4JCibaaAYmE +XtxlszNSgYW3VGSgIf5+6OMqVQqqsPWVkAm7CYmk5K/EXOrfBv52DX0+FiR6 +cZFSnudQgxmNqNp6bLcZl3ZCTg3Y2o34VPaR6F6torKhhxr0Xxd/P4Yt71P5 +4fdnNTB0+ikSaYXnWzigRLxXh1zBjoYcWxJJS8kQsi4asKrrc5u5E4m25Rzj +X0Q00By+FVvLIhGDGTerZk0DrtDr/2oTuF8VrnZ5utEAnSpwzMfmzHz8pC6c +BmrcislXfHC/3Ru2v1pMA9sLfhqefng/vel5V1mBDr7r+jcLB+D6XrJUd+bW +BCOJ1smKYyS6H6JoW96oBXX8HfLC8SRqDUM6Z3P0wDvOqHbfIxLJeXy0dj+y +G9w2PIxR+04i1t+nRdIRAHX27r3FfENIfKRitTjDEBLSxq5f3juEjtH1O66q +GIOj3qdTh+KGEGNsqV5k2ASWy9QVTtcOoUeGoavTW0whv6nk7X6hYZRN+b8q +TDWH5oCJ8Vcew+i3gURTbcw+sDMpyJ6qGEadbJxTPV5WABZ71taIj6DAjUHJ +sQo2UJPg71F6fAQV+dXXXI+3hXClSZ5LPSMockZyTtVvP6ze3ef+cN8omrXY +6/ju0AE4Pt5Qe6J2FOm5phgM7LcDtaWCly9hDH2QvOtfS7eHQ/86KJ5/PoY2 +5Ma9yNvqACkJ+gNnDPC+3q1iaS3gCK1/2Q/21I4jmfZJn7AxR3C+cSYlwnwC +0a+nFGZ1O4FcSFbM1s4JdHfVjPrVN86wIF1vv05rEj012P4t/rkLxOnssOg7 +M4lu6lwUWio4CDVqtwP8WydRy/ecBHqiK0yxovz9JKdQudUdxaOn3UA1L+L0 +hO8UmgqwYwtkuoP8iVdHZUun0OxeZd9xIw9gEEOigYtTKG/s6+9Q7UOwOtj9 +8bTZNHK+n+Ptzu8Jic610pNXplFpyb5DnOc8oaSyOv7nt2mkJ/Vh/sK8J7C1 +6HKek8H/nW6fb//5ecF8weSslMcM6uc7bHOnzwvYRtTPn0qfQa1J1t6mDgwY +25Y8m/llBqWGp/Mdb2WAxMxVVr0QhV5U/533NvcGnpCKS2eMKbTWDc7RK72h +WFJD/1oghWTXv2vZ+MIbXm/dNLg7iEIajVYS3NXe0FCjqkxiH9B3zf/yyhvE +nm+N3BVModSNYe9P/c8bTPXijDtDKbSh8+Ha+i/esM0ozEsggkKKHuI33ea8 +oS7cZFYmjkJ6nuN58ZpMMNDsima/QaHcW5Oh1tpMsPNs5zqPvb5teo+4LhOa +BFTVBNMoNG4y1563iwnBFQ/cJG9SeP9iY280ZMJk2X191X8oJDgn5CK8nwmX +I7vG9e9RqP+y1pr0ACaIzniniOdSKKkqyq8ilwmeVp6ZOWUUCqCl6YXnMaF7 +dG+MUDmFLPOL1+gWMGHq6YvFKGzetMH8Z4+Y8MdatO3AUwrFh9gOPy1jgoxM +5fz8MwpFKSseLn/NhH8EFyW0qyjkn/b+SEkXE0QUA+isVxQyFxzUD+lmwt2X +f/pqsbfGswnQevH9mXSa4msKDYZoPSoeYEJ2icODHmwv6/SxJ6NMOPi8d9qp +lkLOXKGBjxeYUKTVxEF7RyHT0A1HC8VYMHRCO/d2I4VepydYXJVgQW367r+z +2PqN04rhG1jg0BHda9OE66X0/quRDAsu04NMOZopJPn5pNF3JRbcUja/4NVC +oZGdnWK8Wiw4c5L+Y80HCl3hyHjpY8eCkqAMf/bPeP7b+W9aObDAIH/3mCX2 +WdfwELoTC/LW6P1Oww4vs93y9yALPqqvf7DtCx4/wZ5yg8ECCdogYfuVQvQG +BvNtMAveRVzxjv1Ooc8pSnwKySx4fo9j4fwPChUhAV8yhQVpTbG+r7DPjlG1 +j66xYDo0NmAem2ZeG62bxgK1L107fbtx/di8p63uscDnsEwv9FBob1DG1/BC +FtCWzV27eikkLX1ee08RCxZcW9TW9VGIagi6xvmEBccImxsG2JmbkVVSKQsy +bGSVs7D/dHbWZFWywKpc3cGrn0JlllJ5zfUssLWNrvnfAIUuLXBwpTaw4Pyv +rRMUNiNv2MulkQW6q11KNw1SaN2qSqn+FhaoeKgvhWIfqXK+Mv+JBTomVJL4 +TwopqNwIUxxgQe+yY6kFSaGFz6fahgZZENVgoxOE3RrP0nhM4vUJ8rO9hh3d +ozmsN8oCviDS4Bv2t5tt7jYzuH6rIuS8hyh0dbWQSSQ7Abq8O5s9h3H/Tne6 +HuMk4Fvma+Ez2D87C0ICuQjYbVT+Xya2fplxBmMNAWbvqqt7sQc9wxcthAgw +biu1dxvB47c0ETYRIaCA7Dgcgb1LR1gZiRLwkxf9uY6dLFDoSJckIHssLalp +5Xrlj2IpOQJq9FYd1h6lEJFTWC+qQEA1r7udDXZycsSPtUoE6JyrLffBHiRE +BFYpE5BoVkjeWLkuYuo7qkFAiZwH9wR25bJIzCCNAMOGgmrOMQoNDHVf79Yk +YKNr76Q49s6ayDftugSwW3K82YPdf6RI5iUQMN1+WzoBW9D5pNYzQwKKj37M +voGtZ2RmWWxMQFFbR04udpJkb0SOGQGPncxE32JXrHqcnG5BgF1Qblwbdt/E +yQe3LAkI31V3uAdbt07042VbAuickL+IzSjuHTl3gAD9htTl1eMUunznMccZ +ewJedmQ0iWD3hphrhDkT8CX94xdlbAEPMdOjBwnom5xfr4mta97n7u9GgEVz +Y8Pulec3nbrk4UnA/LWwLBvsCl6LTGcGAc1T5nVOK3mzYs8PMAkQelfLOLSS +19PXYkkQIJ8yEE6s5DU+GdzrSwA/WcATgM14duoP+BMQEy0iHLqSn2mxftcR +Aj7JyVwPX8m/LK6qFUiASOX/Uk6t5If3G2w/SkCnuSjPGWx+ZrGzcggBF8f/ +zsVj69hEBykcI0Cs+7zXhZX8nfsSpMPwegQ/Nk7ETlSSuCseToDS2tD7SdhP +1w2UCkUSQBm0nUjG7lksbuCLIsCosOVdykr+z+germgCWHy+KVextT/s+/03 +hgA3nTvtK/4/sUv8HQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7534835155460649, 1.3082454972349842`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7534835155460665}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12772,7 +14159,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6007907022525477}, + AxesOrigin->{0, 0.7534835155460665}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12800,7 +14188,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7534835155460649, 1.3082454972349842`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12808,9 +14197,9 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913267728125134`*^9}, + CellChangeTimes->{3.9913267728125134`*^9, 3.9943563668625937`*^9}, CellLabel-> - "Out[137]=",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] + "Out[149]=",ExpressionUUID->"da4eafe2-1f54-47c5-956e-a78e06bef838"] }, Open ]], Cell[CellGroupData[{ @@ -12873,154 +14262,159 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799933259697*^9, - 3.9917999365172615`*^9}},ExpressionUUID->"201ddeed-58e9-7047-8ad4-\ -c179c9adcae7"], + CellChangeTimes->{{3.991799933259697*^9, 3.9917999365172615`*^9}}, + CellLabel-> + "In[150]:=",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.962223088138177`*^-266\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.2960874580303942`*^-267\\\", \ \\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 81, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773051552*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 150, + 69, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.9943563670557137`*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], +In[150]:=",ExpressionUUID->"639504fb-ac60-4374-a344-63eef0030587"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.450949205829742`*^-278\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.861218653928325`*^-279\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 82, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730605392`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 150, + 70, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994356367064539*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], +In[150]:=",ExpressionUUID->"2c070f69-ca5e-4950-a60a-48aedfb246c2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4109778485455803`*^-289\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.4961923157154693`*^-290\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 138, 83, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730685368`*^9}, + 150, 71, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994356367074644*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], +In[150]:=",ExpressionUUID->"06b671ca-6c7b-4e22-b165-ab089aaf07bf"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 138, 84, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773076536*^9}, +during this calculation.\"", 2, 150, 72, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994356367084358*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], +In[150]:=",ExpressionUUID->"42a41023-4c42-4270-bd39-f3eceb0dcfe9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV12k4VV0bB3AhQ48pMh3TOfscRIbIkOG4byoZk6EyD5WikNBAGcuUSDQq +KaFk2kdSqFRkTpMQRUnDI0mZkgfvfveXff2+rL3Wuu71X/dmbN/n5M/NRT1L +uLj+/54eaG1kpRWYdXCrNzvmglnXFZlI894EyDAWOSfGpQAo+Xy7TG8WZMVd +iuhc1ICDm2/18PTmgxaqmV5fNIXlY9JZsz2V8DTJZ4n/oh0M3t+0b7LnCQjL +dAVdX/AES9bI+189r6DMI2Xi3lwQzPYYnh3vGQJeD2hXGj8KDetuFLzMn4Cs +6wrC4r/TQX6w5st2jXl4oKIb8I7rHKwI8rnFv44H58NT18RcvQxZOpZ1m7YI +4Mv3eq7v7lyDtxdWP/olJoyCqe3RpTcLIK0g9jm37HIMfGcZpZl9A6TPfErN +zpXAwLi4B+eUbkGyi7XZq2lJnLvH75emWwq0qk4a9xIp/KJwpH3AuBTKJVxm +dP6RwqobbgEa60qh+5U3eVpJChPNYvWrnUuB5RhBOFpJ4bUTo9zHI0rhiX0e +34uLUugr3naZ/04pzFtOdT4zlcaERL6WmzplEG50zac1QQZ1JA0c1WTLweaq +yKTtSRmkx5QUZyiVA8F/NKXzrAyq/DFoH1MuhxddWzmvb8rgmIJAQJ5uOWiF +CvEMdMog01Jr4bFtOXwrOlT0myaL6SzcJBRdDp4rNv2Quy2LAv0vXG/3l8Oa +I3XxV+7LorIDXXf/x3JYNrRSitEki6Mp0u1qX8uhpoIHVN7K4gWWrkna73KQ +sq3JXL0oi7Tn/SKighXwIp6lt8GWhow9I940/QpY//NvVMgnGh57XPTULLUC +Iq3OqD8epWG6VmC9cUYFlF/T7JOYpmHwroZinewKkHHxNaoRkMOyWK3NYrkV +MHrv6QyPlhyeiqr6lElWQHZCZsTFw3KYJhizMq+7AoYkVUIaheWR22fB4rAo +CdL76hWkpeUxy+2xY+FyEuxaXJ8F0uWxWK7z7XMJEqqj0jRE18ijgLvYVgUZ +Ek4Mjo+4ucpjQ9beJTl0EnSL63b/zJfHwQhDQ5oOCfGmjn60tQpIaz02YLCZ +BCvvK78NLRQwN7PtpokTCSJx349tsVPA1/9MRbNdSLjckFiU6auAhY0PrNe6 +knDPpvY7X6oChpu0By3zJWHclXlw4q0CGmxfvpyxjwTvA1MnOo4oor7hfJxs +GgnK5y3kRxIV8Qgoyj46SVLrP1XGn6mI9lqCjTsySIj6T+2FRYEics3sd84/ +TcLZY96SNR2KKCOr6/ffeRI6TjfnFSoo4QJzbRyrgATj8otVMfVKSKad1d9Y +S8L6ns75sRYlDF+7+U1UHQmbuHg3+rxSwhH96N8l90nY4RTyFj4rYZ9RdBFf +PQmWRxixcUvp+E+Y70JuAwmhStPXzVfRceHBQo1LBwlTtzNbZrXp2Knn7eb7 +jJqf1aofHD06XmNxjgR2kpC439eAMKNjg12RTcQLEnIa2lq4Heko7EqXD+oi +oXF33o+Gg3QkM599HO4nwfo/I/GjR+j43MT6fcs7Ejozuwz04uh4ub3T79Z7 +Et7WCMYVpNIxwfA0/65BEsb+iRBPvExHXj3Ll/VDJMiQVoaWT+ioOzZYM/+N +hNz1nzwWmui4byfrUO2/JBBvo+Oq2+lot47WGDFCgib37VaVN3RUT+0RGfpO +goWLgif/NzpWLx0OzxsjIejPr7gWYQY+DA36UDhB7ef+XVJfxBlo/YG0spok +QWCkr4RHhoEdC9/7v1Iu7G/oNiMYuH2oOFFxmoSBh2c17hgw8EGwykzgHxJK +DZc9eWXCQMNt881TlKPImG3jyMB2WmFLzCwJUvm7E1bZMtBOaMgj5S8JDolG +vdd8GCj66mx/5H8kKC6UBdfvZOC7O2GmPymPHiR43gcy8FLryld+8ySkBPyj +JRPBQObqyitmCyRs/RjboB/JwM8KL7pvUma5T7o6xzDwVqinpdgiCY9s3x/L +SGFgzRqvzm7KGY2OsqXpDFzdx/imz8UBT3ZTeWsWA5Ucp0yyKM9qVbzlzWXg +zcehZyyWcEBXPF77CIeBcZ2H5RK4OcCVNtV4oZqBjiYhMu2UO3n2uFfXMdA+ +rstlOQ8H9k45Jf56ykDvbE7GWcrGIc000XYGqkukpr+mLPDVhNR4wcCSZ1md +IrwcKOhl9e/uY2BM/VJaNOUwx4uhiYMMFFz2RpmkjG3CfNeHGdhZlX/wA2WR +dQmXHv3LQKMIprDIUg68r5tePTDGwPNFQiNrKZfq7W2am2BgvvMKET/KUWWD +HrKzDKRp/IpMomyl4vLLYIGBq1LdtYopS+W1JLnwEKgUJKDRSnlYmi0fJkDg +s+jb4V8oV2ZyOKeECVQXkeRbwseBOEGVjWXiBPZIfP0kQ9khIeddmzSBF1cN +C2tRVpwTCfsmT+Ds+ebjSHk0/Bg/H0FgHdpbb6ZcOzpzmalK4K5KHU8vyin+ +QbrmGgR+UNB9uJvy1oEPzd46BL7ZJhS6jzJr2xavowYE7uiNCYug/Pt56++L +JgRG11o1HaT8yMos5S4SmF2nFvR/ZzyuVHizgUB+k6Gd4ZQ9jVVv/7Yh8I7R +Gk4wZfXbl6zENhMY4zbg6E95dpXYgOYWAtvfFW50pzydS4tf407gMmbWWzvK +k6LKLCMfAicudfaZUv4Vr91stpPA9V0r7NQpj00Y7VkfSCBjVFFLkvJ3//XC +NiEEXjp3I36e2r9vPZtIh3ACTWX3bPxE+bO1m/OWwwQW2RJxTZSH6nZMu0cT +KH7+pMYNyoOaIRd9Ewj8OeVvn0j5Xd5h013JBO6c2PvJl3L3sfSE/acJfNs8 +vV+M8uup88qHzhE4c3x27zBVHy9257ccvUSgYClr4A7lNtu7IimFBAaoTms6 +Um5+8JiTfotA/W5FYTnKjdodLtkVBMpdj9g9RNXnQ4mPOVdqCBz1qMwMpFyX ++J1d8JDAawIMPzXK92amPhQ3ECjr0lbxhar/yv5lqneeEUjb8KHNjXKFvWRb +7SsCj/L0XhClXFqvFPyoh8Dw0/RvT6jzVHRd73b7RwIDDR4JE5Rz9nrD0BSB +SdryaU+o83n+fcDQ178E1upERu6kfMYhPPHHIlUvPME/ef5/ftektP8RZGKZ +uOUBE+q8J8xxtokqMtHzreTiSSovYoPv/13BZOJcQTTKUT462JRLW8nErzc/ +id6YI+FgQ/8nZV0m6jR/9bhL5c/etKWhppZMlLiUU19L5VXAvKiEhS0Trd7U +JutT3rWPVr1xMxN36foNl82Q4Ous/Z+TOxOfPUz3Pk/ln4ucW0pgCBOlDuQF +21P5aFpSevXcOSbuGeGrtPxJQj+9JG/DJSa2Lmi3FlF5G3Wu+MpkHhPFn2q9 +5KV8N77oslMxE0vaw6trR6n72fXqBZH7TDQWvfyvMJXfakvPZCZ9ZKLa19RT +TsMktERlndL/wsQqz6UCWZ+o+Y1nZgyPMDFs2YWjz6n7oaA//aTFJBPNzAc9 +138kgV6ZnLLAx8L9I0IiUgNU/vociTuowcK04Koutx4S7nRFxirrsFCPS9E/ +sptaj83hmC59Ft5S158/94aELP0DR3WBhYJ/PDd2vCZBWGjf4TFHFoafWuuq +RN13vDXbQ3cdYmEw72bxgBYSfonb+G59wsKcbBG11Lsk9AYRL/Y0s/BYp32v +UzWVx01/IbaDhXMtHCfaHRIyo0qUbnazMONpT2l+JQmrh4QGZ0dYeJwbxC+W +kRDCee6VK6GMNgaNsQrXSRhx2OIxvFMZbdU9R9Ko/uFVsWb7n0BldNaR+CFG +9Re1PHwmwvuU8dohmf7sVBJS71bTDCKV8YyIWnR2EgkrlWT6ktOV8UCB7nRk +HAm7x/pcV1VT44X6Xx8OJ2H4pO/WMH4VDBVy1V/rRn1/RINYLaSCYgHJ5jnb +SJjZOPvjh5gKDlaX5vzdQsIynqzEQJoKOvfYGVZT/dLqyIYqX00VNFaT1pW1 +IyHaX0XCwVkFoyKFxjPMqP03G32+Kk8FG1c43ASC6gd+HrL+bKCKildqmjtb +K0BeRzFJwFQVXST0O0OfVsBYWOOTVeaqqPXvRw/RxxVwZlrMNMxWFavo05IW +9ypgYL5Ya9FHFd9MsjbEFFVAmNA7CdlUVeQTdjvtnFABOWo4YNevij4R++bi +Dal+c4dAeFXsSsxJvpi870I59f8hzZ38RA2tzzrTt0MZiD9TySB/quPBZRf4 ++96VgHxKxWYDAw30/3FOT9f8FlxYZSQmsVsT7QdSzHPLb0IbzVx/4rQWzrpH +OHjK3gBj+SeZ2t3amPRN6sYlz0IQ4cmP8EtYjflOhnHRD6+DYrySqZuKDgp/ +mPLw5c0HQWXPaqdmHVy4nyss630VtNiyFYe8dFHvwLjcaGMuhA2IN9hwrcGl +bk2mrNs58HPi5BbrC2swx/6SQeH8edio3ZRjramHE0Ied1NjzsLDCZO5mU49 +THTyesM/mwUhGrp9L/318YT0caPFjkxgj+3schM0wMNG64M/W6fDBpaMvXC+ +AYaU6G6Uu5YKK+NOHH5iaIiiXH6cMt8kUPc3qlfuM8TeiCK2ucEx8H8YcLxq +/1oszHVR9joTB/VXu3b+kjTCR8f6T9bLH4XJm4sz2neNcM3eyIzkpkOwQ7lE +MMfeGHVDXG9wTCPgl3q2QeW4MXY29+/2+xoK9wrmPk6lmGDqr+q6zaFB4L6e +iSaKpnh57HbYt+HdIBecXKP1yBQFc+sWVMp3gOSyII79NjY2jrREdWzzhYJ1 +0VHjbmxczedHSNv4gm50xrpsTzaG0z907DX1hU3j5JtePzaueCEusYbhC0nd +U7M7gtiYUXQkbn+3D/zJj7WIimfj1/3ZAobcPtBnkv26qISNE4llHI0ALwg4 +UHDZupyN7TYLlhoOXjBdfsd/lGSjn75FmJmBF4gTvTM61WxUKW71yuH1AlsB +BfkHj9hYLtLtoJ3vCfe7ina+fsNGoT2rvjR88AAbkXuaB3vZKN+mmf+1xQN6 +N7ZOy/SzMXr0joUCxwMma7+neH9gYwdxdunDeA/QvLa67N8RNv6O1fPrYnrA +/T7zgyd/sDH+wHfRJCFqvBXOoD3ORuMTknbWU+6wK/nAy4gpNh5QTTfnbXaH +yUdJOdJ/2Pjurs3nuQp3SPh7fkftXzY+O+TxnfeiO4jpFWt4zbMxOJDbWinB +Ha4E104tLrJxdjJpwmavO/wPMVMiiQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13034,113 +14428,114 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV12k4VV0bB3AhQ48pMh3TOfscRIbIkOG4byoZk6EyD5WikNBAGcuUSDQq +KaFk2kdSqFRkTpMQRUnDI0mZkgfvfveXff2+rL3Wuu71X/dmbN/n5M/NRT1L +uLj+/54eaG1kpRWYdXCrNzvmglnXFZlI894EyDAWOSfGpQAo+Xy7TG8WZMVd +iuhc1ICDm2/18PTmgxaqmV5fNIXlY9JZsz2V8DTJZ4n/oh0M3t+0b7LnCQjL +dAVdX/AES9bI+189r6DMI2Xi3lwQzPYYnh3vGQJeD2hXGj8KDetuFLzMn4Cs +6wrC4r/TQX6w5st2jXl4oKIb8I7rHKwI8rnFv44H58NT18RcvQxZOpZ1m7YI +4Mv3eq7v7lyDtxdWP/olJoyCqe3RpTcLIK0g9jm37HIMfGcZpZl9A6TPfErN +zpXAwLi4B+eUbkGyi7XZq2lJnLvH75emWwq0qk4a9xIp/KJwpH3AuBTKJVxm +dP6RwqobbgEa60qh+5U3eVpJChPNYvWrnUuB5RhBOFpJ4bUTo9zHI0rhiX0e +34uLUugr3naZ/04pzFtOdT4zlcaERL6WmzplEG50zac1QQZ1JA0c1WTLweaq +yKTtSRmkx5QUZyiVA8F/NKXzrAyq/DFoH1MuhxddWzmvb8rgmIJAQJ5uOWiF +CvEMdMog01Jr4bFtOXwrOlT0myaL6SzcJBRdDp4rNv2Quy2LAv0vXG/3l8Oa +I3XxV+7LorIDXXf/x3JYNrRSitEki6Mp0u1qX8uhpoIHVN7K4gWWrkna73KQ +sq3JXL0oi7Tn/SKighXwIp6lt8GWhow9I940/QpY//NvVMgnGh57XPTULLUC +Iq3OqD8epWG6VmC9cUYFlF/T7JOYpmHwroZinewKkHHxNaoRkMOyWK3NYrkV +MHrv6QyPlhyeiqr6lElWQHZCZsTFw3KYJhizMq+7AoYkVUIaheWR22fB4rAo +CdL76hWkpeUxy+2xY+FyEuxaXJ8F0uWxWK7z7XMJEqqj0jRE18ijgLvYVgUZ +Ek4Mjo+4ucpjQ9beJTl0EnSL63b/zJfHwQhDQ5oOCfGmjn60tQpIaz02YLCZ +BCvvK78NLRQwN7PtpokTCSJx349tsVPA1/9MRbNdSLjckFiU6auAhY0PrNe6 +knDPpvY7X6oChpu0By3zJWHclXlw4q0CGmxfvpyxjwTvA1MnOo4oor7hfJxs +GgnK5y3kRxIV8Qgoyj46SVLrP1XGn6mI9lqCjTsySIj6T+2FRYEics3sd84/ +TcLZY96SNR2KKCOr6/ffeRI6TjfnFSoo4QJzbRyrgATj8otVMfVKSKad1d9Y +S8L6ns75sRYlDF+7+U1UHQmbuHg3+rxSwhH96N8l90nY4RTyFj4rYZ9RdBFf +PQmWRxixcUvp+E+Y70JuAwmhStPXzVfRceHBQo1LBwlTtzNbZrXp2Knn7eb7 +jJqf1aofHD06XmNxjgR2kpC439eAMKNjg12RTcQLEnIa2lq4Heko7EqXD+oi +oXF33o+Gg3QkM599HO4nwfo/I/GjR+j43MT6fcs7Ejozuwz04uh4ub3T79Z7 +Et7WCMYVpNIxwfA0/65BEsb+iRBPvExHXj3Ll/VDJMiQVoaWT+ioOzZYM/+N +hNz1nzwWmui4byfrUO2/JBBvo+Oq2+lot47WGDFCgib37VaVN3RUT+0RGfpO +goWLgif/NzpWLx0OzxsjIejPr7gWYQY+DA36UDhB7ef+XVJfxBlo/YG0spok +QWCkr4RHhoEdC9/7v1Iu7G/oNiMYuH2oOFFxmoSBh2c17hgw8EGwykzgHxJK +DZc9eWXCQMNt881TlKPImG3jyMB2WmFLzCwJUvm7E1bZMtBOaMgj5S8JDolG +vdd8GCj66mx/5H8kKC6UBdfvZOC7O2GmPymPHiR43gcy8FLryld+8ySkBPyj +JRPBQObqyitmCyRs/RjboB/JwM8KL7pvUma5T7o6xzDwVqinpdgiCY9s3x/L +SGFgzRqvzm7KGY2OsqXpDFzdx/imz8UBT3ZTeWsWA5Ucp0yyKM9qVbzlzWXg +zcehZyyWcEBXPF77CIeBcZ2H5RK4OcCVNtV4oZqBjiYhMu2UO3n2uFfXMdA+ +rstlOQ8H9k45Jf56ykDvbE7GWcrGIc000XYGqkukpr+mLPDVhNR4wcCSZ1md +IrwcKOhl9e/uY2BM/VJaNOUwx4uhiYMMFFz2RpmkjG3CfNeHGdhZlX/wA2WR +dQmXHv3LQKMIprDIUg68r5tePTDGwPNFQiNrKZfq7W2am2BgvvMKET/KUWWD +HrKzDKRp/IpMomyl4vLLYIGBq1LdtYopS+W1JLnwEKgUJKDRSnlYmi0fJkDg +s+jb4V8oV2ZyOKeECVQXkeRbwseBOEGVjWXiBPZIfP0kQ9khIeddmzSBF1cN +C2tRVpwTCfsmT+Ds+ebjSHk0/Bg/H0FgHdpbb6ZcOzpzmalK4K5KHU8vyin+ +QbrmGgR+UNB9uJvy1oEPzd46BL7ZJhS6jzJr2xavowYE7uiNCYug/Pt56++L +JgRG11o1HaT8yMos5S4SmF2nFvR/ZzyuVHizgUB+k6Gd4ZQ9jVVv/7Yh8I7R +Gk4wZfXbl6zENhMY4zbg6E95dpXYgOYWAtvfFW50pzydS4tf407gMmbWWzvK +k6LKLCMfAicudfaZUv4Vr91stpPA9V0r7NQpj00Y7VkfSCBjVFFLkvJ3//XC +NiEEXjp3I36e2r9vPZtIh3ACTWX3bPxE+bO1m/OWwwQW2RJxTZSH6nZMu0cT +KH7+pMYNyoOaIRd9Ewj8OeVvn0j5Xd5h013JBO6c2PvJl3L3sfSE/acJfNs8 +vV+M8uup88qHzhE4c3x27zBVHy9257ccvUSgYClr4A7lNtu7IimFBAaoTms6 +Um5+8JiTfotA/W5FYTnKjdodLtkVBMpdj9g9RNXnQ4mPOVdqCBz1qMwMpFyX ++J1d8JDAawIMPzXK92amPhQ3ECjr0lbxhar/yv5lqneeEUjb8KHNjXKFvWRb +7SsCj/L0XhClXFqvFPyoh8Dw0/RvT6jzVHRd73b7RwIDDR4JE5Rz9nrD0BSB +SdryaU+o83n+fcDQ178E1upERu6kfMYhPPHHIlUvPME/ef5/ftektP8RZGKZ +uOUBE+q8J8xxtokqMtHzreTiSSovYoPv/13BZOJcQTTKUT462JRLW8nErzc/ +id6YI+FgQ/8nZV0m6jR/9bhL5c/etKWhppZMlLiUU19L5VXAvKiEhS0Trd7U +JutT3rWPVr1xMxN36foNl82Q4Ous/Z+TOxOfPUz3Pk/ln4ucW0pgCBOlDuQF +21P5aFpSevXcOSbuGeGrtPxJQj+9JG/DJSa2Lmi3FlF5G3Wu+MpkHhPFn2q9 +5KV8N77oslMxE0vaw6trR6n72fXqBZH7TDQWvfyvMJXfakvPZCZ9ZKLa19RT +TsMktERlndL/wsQqz6UCWZ+o+Y1nZgyPMDFs2YWjz6n7oaA//aTFJBPNzAc9 +138kgV6ZnLLAx8L9I0IiUgNU/vociTuowcK04Koutx4S7nRFxirrsFCPS9E/ +sptaj83hmC59Ft5S158/94aELP0DR3WBhYJ/PDd2vCZBWGjf4TFHFoafWuuq +RN13vDXbQ3cdYmEw72bxgBYSfonb+G59wsKcbBG11Lsk9AYRL/Y0s/BYp32v +UzWVx01/IbaDhXMtHCfaHRIyo0qUbnazMONpT2l+JQmrh4QGZ0dYeJwbxC+W +kRDCee6VK6GMNgaNsQrXSRhx2OIxvFMZbdU9R9Ko/uFVsWb7n0BldNaR+CFG +9Re1PHwmwvuU8dohmf7sVBJS71bTDCKV8YyIWnR2EgkrlWT6ktOV8UCB7nRk +HAm7x/pcV1VT44X6Xx8OJ2H4pO/WMH4VDBVy1V/rRn1/RINYLaSCYgHJ5jnb +SJjZOPvjh5gKDlaX5vzdQsIynqzEQJoKOvfYGVZT/dLqyIYqX00VNFaT1pW1 +IyHaX0XCwVkFoyKFxjPMqP03G32+Kk8FG1c43ASC6gd+HrL+bKCKildqmjtb +K0BeRzFJwFQVXST0O0OfVsBYWOOTVeaqqPXvRw/RxxVwZlrMNMxWFavo05IW +9ypgYL5Ya9FHFd9MsjbEFFVAmNA7CdlUVeQTdjvtnFABOWo4YNevij4R++bi +Dal+c4dAeFXsSsxJvpi870I59f8hzZ38RA2tzzrTt0MZiD9TySB/quPBZRf4 ++96VgHxKxWYDAw30/3FOT9f8FlxYZSQmsVsT7QdSzHPLb0IbzVx/4rQWzrpH +OHjK3gBj+SeZ2t3amPRN6sYlz0IQ4cmP8EtYjflOhnHRD6+DYrySqZuKDgp/ +mPLw5c0HQWXPaqdmHVy4nyss630VtNiyFYe8dFHvwLjcaGMuhA2IN9hwrcGl +bk2mrNs58HPi5BbrC2swx/6SQeH8edio3ZRjramHE0Ied1NjzsLDCZO5mU49 +THTyesM/mwUhGrp9L/318YT0caPFjkxgj+3schM0wMNG64M/W6fDBpaMvXC+ +AYaU6G6Uu5YKK+NOHH5iaIiiXH6cMt8kUPc3qlfuM8TeiCK2ucEx8H8YcLxq +/1oszHVR9joTB/VXu3b+kjTCR8f6T9bLH4XJm4sz2neNcM3eyIzkpkOwQ7lE +MMfeGHVDXG9wTCPgl3q2QeW4MXY29+/2+xoK9wrmPk6lmGDqr+q6zaFB4L6e +iSaKpnh57HbYt+HdIBecXKP1yBQFc+sWVMp3gOSyII79NjY2jrREdWzzhYJ1 +0VHjbmxczedHSNv4gm50xrpsTzaG0z907DX1hU3j5JtePzaueCEusYbhC0nd +U7M7gtiYUXQkbn+3D/zJj7WIimfj1/3ZAobcPtBnkv26qISNE4llHI0ALwg4 +UHDZupyN7TYLlhoOXjBdfsd/lGSjn75FmJmBF4gTvTM61WxUKW71yuH1AlsB +BfkHj9hYLtLtoJ3vCfe7ina+fsNGoT2rvjR88AAbkXuaB3vZKN+mmf+1xQN6 +N7ZOy/SzMXr0joUCxwMma7+neH9gYwdxdunDeA/QvLa67N8RNv6O1fPrYnrA +/T7zgyd/sDH+wHfRJCFqvBXOoD3ORuMTknbWU+6wK/nAy4gpNh5QTTfnbXaH +yUdJOdJ/2Pjurs3nuQp3SPh7fkftXzY+O+TxnfeiO4jpFWt4zbMxOJDbWinB +Ha4E104tLrJxdjJpwmavO/wPMVMiiQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.0665048822490721}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13152,19 +14547,19 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.0665048822490721}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13178,112 +14573,113 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV12k4VV0bB3AhQ48pMh3TOfscRIbIkOG4byoZk6EyD5WikNBAGcuUSDQq +KaFk2kdSqFRkTpMQRUnDI0mZkgfvfveXff2+rL3Wuu71X/dmbN/n5M/NRT1L +uLj+/54eaG1kpRWYdXCrNzvmglnXFZlI894EyDAWOSfGpQAo+Xy7TG8WZMVd +iuhc1ICDm2/18PTmgxaqmV5fNIXlY9JZsz2V8DTJZ4n/oh0M3t+0b7LnCQjL +dAVdX/AES9bI+189r6DMI2Xi3lwQzPYYnh3vGQJeD2hXGj8KDetuFLzMn4Cs +6wrC4r/TQX6w5st2jXl4oKIb8I7rHKwI8rnFv44H58NT18RcvQxZOpZ1m7YI +4Mv3eq7v7lyDtxdWP/olJoyCqe3RpTcLIK0g9jm37HIMfGcZpZl9A6TPfErN +zpXAwLi4B+eUbkGyi7XZq2lJnLvH75emWwq0qk4a9xIp/KJwpH3AuBTKJVxm +dP6RwqobbgEa60qh+5U3eVpJChPNYvWrnUuB5RhBOFpJ4bUTo9zHI0rhiX0e +34uLUugr3naZ/04pzFtOdT4zlcaERL6WmzplEG50zac1QQZ1JA0c1WTLweaq +yKTtSRmkx5QUZyiVA8F/NKXzrAyq/DFoH1MuhxddWzmvb8rgmIJAQJ5uOWiF +CvEMdMog01Jr4bFtOXwrOlT0myaL6SzcJBRdDp4rNv2Quy2LAv0vXG/3l8Oa +I3XxV+7LorIDXXf/x3JYNrRSitEki6Mp0u1qX8uhpoIHVN7K4gWWrkna73KQ +sq3JXL0oi7Tn/SKighXwIp6lt8GWhow9I940/QpY//NvVMgnGh57XPTULLUC +Iq3OqD8epWG6VmC9cUYFlF/T7JOYpmHwroZinewKkHHxNaoRkMOyWK3NYrkV +MHrv6QyPlhyeiqr6lElWQHZCZsTFw3KYJhizMq+7AoYkVUIaheWR22fB4rAo +CdL76hWkpeUxy+2xY+FyEuxaXJ8F0uWxWK7z7XMJEqqj0jRE18ijgLvYVgUZ +Ek4Mjo+4ucpjQ9beJTl0EnSL63b/zJfHwQhDQ5oOCfGmjn60tQpIaz02YLCZ +BCvvK78NLRQwN7PtpokTCSJx349tsVPA1/9MRbNdSLjckFiU6auAhY0PrNe6 +knDPpvY7X6oChpu0By3zJWHclXlw4q0CGmxfvpyxjwTvA1MnOo4oor7hfJxs +GgnK5y3kRxIV8Qgoyj46SVLrP1XGn6mI9lqCjTsySIj6T+2FRYEics3sd84/ +TcLZY96SNR2KKCOr6/ffeRI6TjfnFSoo4QJzbRyrgATj8otVMfVKSKad1d9Y +S8L6ns75sRYlDF+7+U1UHQmbuHg3+rxSwhH96N8l90nY4RTyFj4rYZ9RdBFf +PQmWRxixcUvp+E+Y70JuAwmhStPXzVfRceHBQo1LBwlTtzNbZrXp2Knn7eb7 +jJqf1aofHD06XmNxjgR2kpC439eAMKNjg12RTcQLEnIa2lq4Heko7EqXD+oi +oXF33o+Gg3QkM599HO4nwfo/I/GjR+j43MT6fcs7Ejozuwz04uh4ub3T79Z7 +Et7WCMYVpNIxwfA0/65BEsb+iRBPvExHXj3Ll/VDJMiQVoaWT+ioOzZYM/+N +hNz1nzwWmui4byfrUO2/JBBvo+Oq2+lot47WGDFCgib37VaVN3RUT+0RGfpO +goWLgif/NzpWLx0OzxsjIejPr7gWYQY+DA36UDhB7ef+XVJfxBlo/YG0spok +QWCkr4RHhoEdC9/7v1Iu7G/oNiMYuH2oOFFxmoSBh2c17hgw8EGwykzgHxJK +DZc9eWXCQMNt881TlKPImG3jyMB2WmFLzCwJUvm7E1bZMtBOaMgj5S8JDolG +vdd8GCj66mx/5H8kKC6UBdfvZOC7O2GmPymPHiR43gcy8FLryld+8ySkBPyj +JRPBQObqyitmCyRs/RjboB/JwM8KL7pvUma5T7o6xzDwVqinpdgiCY9s3x/L +SGFgzRqvzm7KGY2OsqXpDFzdx/imz8UBT3ZTeWsWA5Ucp0yyKM9qVbzlzWXg +zcehZyyWcEBXPF77CIeBcZ2H5RK4OcCVNtV4oZqBjiYhMu2UO3n2uFfXMdA+ +rstlOQ8H9k45Jf56ykDvbE7GWcrGIc000XYGqkukpr+mLPDVhNR4wcCSZ1md +IrwcKOhl9e/uY2BM/VJaNOUwx4uhiYMMFFz2RpmkjG3CfNeHGdhZlX/wA2WR +dQmXHv3LQKMIprDIUg68r5tePTDGwPNFQiNrKZfq7W2am2BgvvMKET/KUWWD +HrKzDKRp/IpMomyl4vLLYIGBq1LdtYopS+W1JLnwEKgUJKDRSnlYmi0fJkDg +s+jb4V8oV2ZyOKeECVQXkeRbwseBOEGVjWXiBPZIfP0kQ9khIeddmzSBF1cN +C2tRVpwTCfsmT+Ds+ebjSHk0/Bg/H0FgHdpbb6ZcOzpzmalK4K5KHU8vyin+ +QbrmGgR+UNB9uJvy1oEPzd46BL7ZJhS6jzJr2xavowYE7uiNCYug/Pt56++L +JgRG11o1HaT8yMos5S4SmF2nFvR/ZzyuVHizgUB+k6Gd4ZQ9jVVv/7Yh8I7R +Gk4wZfXbl6zENhMY4zbg6E95dpXYgOYWAtvfFW50pzydS4tf407gMmbWWzvK +k6LKLCMfAicudfaZUv4Vr91stpPA9V0r7NQpj00Y7VkfSCBjVFFLkvJ3//XC +NiEEXjp3I36e2r9vPZtIh3ACTWX3bPxE+bO1m/OWwwQW2RJxTZSH6nZMu0cT +KH7+pMYNyoOaIRd9Ewj8OeVvn0j5Xd5h013JBO6c2PvJl3L3sfSE/acJfNs8 +vV+M8uup88qHzhE4c3x27zBVHy9257ccvUSgYClr4A7lNtu7IimFBAaoTms6 +Um5+8JiTfotA/W5FYTnKjdodLtkVBMpdj9g9RNXnQ4mPOVdqCBz1qMwMpFyX ++J1d8JDAawIMPzXK92amPhQ3ECjr0lbxhar/yv5lqneeEUjb8KHNjXKFvWRb +7SsCj/L0XhClXFqvFPyoh8Dw0/RvT6jzVHRd73b7RwIDDR4JE5Rz9nrD0BSB +SdryaU+o83n+fcDQ178E1upERu6kfMYhPPHHIlUvPME/ef5/ftektP8RZGKZ +uOUBE+q8J8xxtokqMtHzreTiSSovYoPv/13BZOJcQTTKUT462JRLW8nErzc/ +id6YI+FgQ/8nZV0m6jR/9bhL5c/etKWhppZMlLiUU19L5VXAvKiEhS0Trd7U +JutT3rWPVr1xMxN36foNl82Q4Ous/Z+TOxOfPUz3Pk/ln4ucW0pgCBOlDuQF +21P5aFpSevXcOSbuGeGrtPxJQj+9JG/DJSa2Lmi3FlF5G3Wu+MpkHhPFn2q9 +5KV8N77oslMxE0vaw6trR6n72fXqBZH7TDQWvfyvMJXfakvPZCZ9ZKLa19RT +TsMktERlndL/wsQqz6UCWZ+o+Y1nZgyPMDFs2YWjz6n7oaA//aTFJBPNzAc9 +138kgV6ZnLLAx8L9I0IiUgNU/vociTuowcK04Koutx4S7nRFxirrsFCPS9E/ +sptaj83hmC59Ft5S158/94aELP0DR3WBhYJ/PDd2vCZBWGjf4TFHFoafWuuq +RN13vDXbQ3cdYmEw72bxgBYSfonb+G59wsKcbBG11Lsk9AYRL/Y0s/BYp32v +UzWVx01/IbaDhXMtHCfaHRIyo0qUbnazMONpT2l+JQmrh4QGZ0dYeJwbxC+W +kRDCee6VK6GMNgaNsQrXSRhx2OIxvFMZbdU9R9Ko/uFVsWb7n0BldNaR+CFG +9Re1PHwmwvuU8dohmf7sVBJS71bTDCKV8YyIWnR2EgkrlWT6ktOV8UCB7nRk +HAm7x/pcV1VT44X6Xx8OJ2H4pO/WMH4VDBVy1V/rRn1/RINYLaSCYgHJ5jnb +SJjZOPvjh5gKDlaX5vzdQsIynqzEQJoKOvfYGVZT/dLqyIYqX00VNFaT1pW1 +IyHaX0XCwVkFoyKFxjPMqP03G32+Kk8FG1c43ASC6gd+HrL+bKCKildqmjtb +K0BeRzFJwFQVXST0O0OfVsBYWOOTVeaqqPXvRw/RxxVwZlrMNMxWFavo05IW +9ypgYL5Ya9FHFd9MsjbEFFVAmNA7CdlUVeQTdjvtnFABOWo4YNevij4R++bi +Dal+c4dAeFXsSsxJvpi870I59f8hzZ38RA2tzzrTt0MZiD9TySB/quPBZRf4 ++96VgHxKxWYDAw30/3FOT9f8FlxYZSQmsVsT7QdSzHPLb0IbzVx/4rQWzrpH +OHjK3gBj+SeZ2t3amPRN6sYlz0IQ4cmP8EtYjflOhnHRD6+DYrySqZuKDgp/ +mPLw5c0HQWXPaqdmHVy4nyss630VtNiyFYe8dFHvwLjcaGMuhA2IN9hwrcGl +bk2mrNs58HPi5BbrC2swx/6SQeH8edio3ZRjramHE0Ied1NjzsLDCZO5mU49 +THTyesM/mwUhGrp9L/318YT0caPFjkxgj+3schM0wMNG64M/W6fDBpaMvXC+ +AYaU6G6Uu5YKK+NOHH5iaIiiXH6cMt8kUPc3qlfuM8TeiCK2ucEx8H8YcLxq +/1oszHVR9joTB/VXu3b+kjTCR8f6T9bLH4XJm4sz2neNcM3eyIzkpkOwQ7lE +MMfeGHVDXG9wTCPgl3q2QeW4MXY29+/2+xoK9wrmPk6lmGDqr+q6zaFB4L6e +iSaKpnh57HbYt+HdIBecXKP1yBQFc+sWVMp3gOSyII79NjY2jrREdWzzhYJ1 +0VHjbmxczedHSNv4gm50xrpsTzaG0z907DX1hU3j5JtePzaueCEusYbhC0nd +U7M7gtiYUXQkbn+3D/zJj7WIimfj1/3ZAobcPtBnkv26qISNE4llHI0ALwg4 +UHDZupyN7TYLlhoOXjBdfsd/lGSjn75FmJmBF4gTvTM61WxUKW71yuH1AlsB +BfkHj9hYLtLtoJ3vCfe7ina+fsNGoT2rvjR88AAbkXuaB3vZKN+mmf+1xQN6 +N7ZOy/SzMXr0joUCxwMma7+neH9gYwdxdunDeA/QvLa67N8RNv6O1fPrYnrA +/T7zgyd/sDH+wHfRJCFqvBXOoD3ORuMTknbWU+6wK/nAy4gpNh5QTTfnbXaH +yUdJOdJ/2Pjurs3nuQp3SPh7fkftXzY+O+TxnfeiO4jpFWt4zbMxOJDbWinB +Ha4E104tLrJxdjJpwmavO/wPMVMiiQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.0665048822490721}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13294,6 +14690,7 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13321,7 +14718,8 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12905028199662316`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0665048822490721}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13329,22 +14727,568 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991327033758711*^9}, + CellChangeTimes->{3.991327033758711*^9, 3.994356903958665*^9}, CellLabel-> - "Out[138]=",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] + "Out[150]=",ExpressionUUID->"17f895b4-e851-4ed1-baa4-f6e330709a7d"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9917999433700733`*^9, 3.9917999479698143`*^9}, - 3.9919244033659534`*^9},ExpressionUUID->"d48877eb-e0f2-d842-b248-\ -ea3fc2b4c4a8"], + 3.9919244033659534`*^9}, + CellLabel-> + "In[151]:=",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799951845436*^9, - 3.991799954096182*^9}},ExpressionUUID->"eae5aeae-3f12-2d4a-842b-\ -85a3484011b6"], + CellChangeTimes->{{3.991799951845436*^9, 3.991799954096182*^9}}, + CellLabel-> + "In[152]:=",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV12k4VV0bB3AhQ48pMh3TOfscRIbIkOG4byoZk6EyD5WikNBAGcuUSDQq +KaFk2kdSqFRkTpMQRUnDI0mZkgfvfveXff2+rL3Wuu71X/dmbN/n5M/NRT1L +uLj+/54eaG1kpRWYdXCrNzvmglnXFZlI894EyDAWOSfGpQAo+Xy7TG8WZMVd +iuhc1ICDm2/18PTmgxaqmV5fNIXlY9JZsz2V8DTJZ4n/oh0M3t+0b7LnCQjL +dAVdX/AES9bI+189r6DMI2Xi3lwQzPYYnh3vGQJeD2hXGj8KDetuFLzMn4Cs +6wrC4r/TQX6w5st2jXl4oKIb8I7rHKwI8rnFv44H58NT18RcvQxZOpZ1m7YI +4Mv3eq7v7lyDtxdWP/olJoyCqe3RpTcLIK0g9jm37HIMfGcZpZl9A6TPfErN +zpXAwLi4B+eUbkGyi7XZq2lJnLvH75emWwq0qk4a9xIp/KJwpH3AuBTKJVxm +dP6RwqobbgEa60qh+5U3eVpJChPNYvWrnUuB5RhBOFpJ4bUTo9zHI0rhiX0e +34uLUugr3naZ/04pzFtOdT4zlcaERL6WmzplEG50zac1QQZ1JA0c1WTLweaq +yKTtSRmkx5QUZyiVA8F/NKXzrAyq/DFoH1MuhxddWzmvb8rgmIJAQJ5uOWiF +CvEMdMog01Jr4bFtOXwrOlT0myaL6SzcJBRdDp4rNv2Quy2LAv0vXG/3l8Oa +I3XxV+7LorIDXXf/x3JYNrRSitEki6Mp0u1qX8uhpoIHVN7K4gWWrkna73KQ +sq3JXL0oi7Tn/SKighXwIp6lt8GWhow9I940/QpY//NvVMgnGh57XPTULLUC +Iq3OqD8epWG6VmC9cUYFlF/T7JOYpmHwroZinewKkHHxNaoRkMOyWK3NYrkV +MHrv6QyPlhyeiqr6lElWQHZCZsTFw3KYJhizMq+7AoYkVUIaheWR22fB4rAo +CdL76hWkpeUxy+2xY+FyEuxaXJ8F0uWxWK7z7XMJEqqj0jRE18ijgLvYVgUZ +Ek4Mjo+4ucpjQ9beJTl0EnSL63b/zJfHwQhDQ5oOCfGmjn60tQpIaz02YLCZ +BCvvK78NLRQwN7PtpokTCSJx349tsVPA1/9MRbNdSLjckFiU6auAhY0PrNe6 +knDPpvY7X6oChpu0By3zJWHclXlw4q0CGmxfvpyxjwTvA1MnOo4oor7hfJxs +GgnK5y3kRxIV8Qgoyj46SVLrP1XGn6mI9lqCjTsySIj6T+2FRYEics3sd84/ +TcLZY96SNR2KKCOr6/ffeRI6TjfnFSoo4QJzbRyrgATj8otVMfVKSKad1d9Y +S8L6ns75sRYlDF+7+U1UHQmbuHg3+rxSwhH96N8l90nY4RTyFj4rYZ9RdBFf +PQmWRxixcUvp+E+Y70JuAwmhStPXzVfRceHBQo1LBwlTtzNbZrXp2Knn7eb7 +jJqf1aofHD06XmNxjgR2kpC439eAMKNjg12RTcQLEnIa2lq4Heko7EqXD+oi +oXF33o+Gg3QkM599HO4nwfo/I/GjR+j43MT6fcs7Ejozuwz04uh4ub3T79Z7 +Et7WCMYVpNIxwfA0/65BEsb+iRBPvExHXj3Ll/VDJMiQVoaWT+ioOzZYM/+N +hNz1nzwWmui4byfrUO2/JBBvo+Oq2+lot47WGDFCgib37VaVN3RUT+0RGfpO +goWLgif/NzpWLx0OzxsjIejPr7gWYQY+DA36UDhB7ef+XVJfxBlo/YG0spok +QWCkr4RHhoEdC9/7v1Iu7G/oNiMYuH2oOFFxmoSBh2c17hgw8EGwykzgHxJK +DZc9eWXCQMNt881TlKPImG3jyMB2WmFLzCwJUvm7E1bZMtBOaMgj5S8JDolG +vdd8GCj66mx/5H8kKC6UBdfvZOC7O2GmPymPHiR43gcy8FLryld+8ySkBPyj +JRPBQObqyitmCyRs/RjboB/JwM8KL7pvUma5T7o6xzDwVqinpdgiCY9s3x/L +SGFgzRqvzm7KGY2OsqXpDFzdx/imz8UBT3ZTeWsWA5Ucp0yyKM9qVbzlzWXg +zcehZyyWcEBXPF77CIeBcZ2H5RK4OcCVNtV4oZqBjiYhMu2UO3n2uFfXMdA+ +rstlOQ8H9k45Jf56ykDvbE7GWcrGIc000XYGqkukpr+mLPDVhNR4wcCSZ1md +IrwcKOhl9e/uY2BM/VJaNOUwx4uhiYMMFFz2RpmkjG3CfNeHGdhZlX/wA2WR +dQmXHv3LQKMIprDIUg68r5tePTDGwPNFQiNrKZfq7W2am2BgvvMKET/KUWWD +HrKzDKRp/IpMomyl4vLLYIGBq1LdtYopS+W1JLnwEKgUJKDRSnlYmi0fJkDg +s+jb4V8oV2ZyOKeECVQXkeRbwseBOEGVjWXiBPZIfP0kQ9khIeddmzSBF1cN +C2tRVpwTCfsmT+Ds+ebjSHk0/Bg/H0FgHdpbb6ZcOzpzmalK4K5KHU8vyin+ +QbrmGgR+UNB9uJvy1oEPzd46BL7ZJhS6jzJr2xavowYE7uiNCYug/Pt56++L +JgRG11o1HaT8yMos5S4SmF2nFvR/ZzyuVHizgUB+k6Gd4ZQ9jVVv/7Yh8I7R +Gk4wZfXbl6zENhMY4zbg6E95dpXYgOYWAtvfFW50pzydS4tf407gMmbWWzvK +k6LKLCMfAicudfaZUv4Vr91stpPA9V0r7NQpj00Y7VkfSCBjVFFLkvJ3//XC +NiEEXjp3I36e2r9vPZtIh3ACTWX3bPxE+bO1m/OWwwQW2RJxTZSH6nZMu0cT +KH7+pMYNyoOaIRd9Ewj8OeVvn0j5Xd5h013JBO6c2PvJl3L3sfSE/acJfNs8 +vV+M8uup88qHzhE4c3x27zBVHy9257ccvUSgYClr4A7lNtu7IimFBAaoTms6 +Um5+8JiTfotA/W5FYTnKjdodLtkVBMpdj9g9RNXnQ4mPOVdqCBz1qMwMpFyX ++J1d8JDAawIMPzXK92amPhQ3ECjr0lbxhar/yv5lqneeEUjb8KHNjXKFvWRb +7SsCj/L0XhClXFqvFPyoh8Dw0/RvT6jzVHRd73b7RwIDDR4JE5Rz9nrD0BSB +SdryaU+o83n+fcDQ178E1upERu6kfMYhPPHHIlUvPME/ef5/ftektP8RZGKZ +uOUBE+q8J8xxtokqMtHzreTiSSovYoPv/13BZOJcQTTKUT462JRLW8nErzc/ +id6YI+FgQ/8nZV0m6jR/9bhL5c/etKWhppZMlLiUU19L5VXAvKiEhS0Trd7U +JutT3rWPVr1xMxN36foNl82Q4Ous/Z+TOxOfPUz3Pk/ln4ucW0pgCBOlDuQF +21P5aFpSevXcOSbuGeGrtPxJQj+9JG/DJSa2Lmi3FlF5G3Wu+MpkHhPFn2q9 +5KV8N77oslMxE0vaw6trR6n72fXqBZH7TDQWvfyvMJXfakvPZCZ9ZKLa19RT +TsMktERlndL/wsQqz6UCWZ+o+Y1nZgyPMDFs2YWjz6n7oaA//aTFJBPNzAc9 +138kgV6ZnLLAx8L9I0IiUgNU/vociTuowcK04Koutx4S7nRFxirrsFCPS9E/ +sptaj83hmC59Ft5S158/94aELP0DR3WBhYJ/PDd2vCZBWGjf4TFHFoafWuuq +RN13vDXbQ3cdYmEw72bxgBYSfonb+G59wsKcbBG11Lsk9AYRL/Y0s/BYp32v +UzWVx01/IbaDhXMtHCfaHRIyo0qUbnazMONpT2l+JQmrh4QGZ0dYeJwbxC+W +kRDCee6VK6GMNgaNsQrXSRhx2OIxvFMZbdU9R9Ko/uFVsWb7n0BldNaR+CFG +9Re1PHwmwvuU8dohmf7sVBJS71bTDCKV8YyIWnR2EgkrlWT6ktOV8UCB7nRk +HAm7x/pcV1VT44X6Xx8OJ2H4pO/WMH4VDBVy1V/rRn1/RINYLaSCYgHJ5jnb +SJjZOPvjh5gKDlaX5vzdQsIynqzEQJoKOvfYGVZT/dLqyIYqX00VNFaT1pW1 +IyHaX0XCwVkFoyKFxjPMqP03G32+Kk8FG1c43ASC6gd+HrL+bKCKildqmjtb +K0BeRzFJwFQVXST0O0OfVsBYWOOTVeaqqPXvRw/RxxVwZlrMNMxWFavo05IW +9ypgYL5Ya9FHFd9MsjbEFFVAmNA7CdlUVeQTdjvtnFABOWo4YNevij4R++bi +Dal+c4dAeFXsSsxJvpi870I59f8hzZ38RA2tzzrTt0MZiD9TySB/quPBZRf4 ++96VgHxKxWYDAw30/3FOT9f8FlxYZSQmsVsT7QdSzHPLb0IbzVx/4rQWzrpH +OHjK3gBj+SeZ2t3amPRN6sYlz0IQ4cmP8EtYjflOhnHRD6+DYrySqZuKDgp/ +mPLw5c0HQWXPaqdmHVy4nyss630VtNiyFYe8dFHvwLjcaGMuhA2IN9hwrcGl +bk2mrNs58HPi5BbrC2swx/6SQeH8edio3ZRjramHE0Ied1NjzsLDCZO5mU49 +THTyesM/mwUhGrp9L/318YT0caPFjkxgj+3schM0wMNG64M/W6fDBpaMvXC+ +AYaU6G6Uu5YKK+NOHH5iaIiiXH6cMt8kUPc3qlfuM8TeiCK2ucEx8H8YcLxq +/1oszHVR9joTB/VXu3b+kjTCR8f6T9bLH4XJm4sz2neNcM3eyIzkpkOwQ7lE +MMfeGHVDXG9wTCPgl3q2QeW4MXY29+/2+xoK9wrmPk6lmGDqr+q6zaFB4L6e +iSaKpnh57HbYt+HdIBecXKP1yBQFc+sWVMp3gOSyII79NjY2jrREdWzzhYJ1 +0VHjbmxczedHSNv4gm50xrpsTzaG0z907DX1hU3j5JtePzaueCEusYbhC0nd +U7M7gtiYUXQkbn+3D/zJj7WIimfj1/3ZAobcPtBnkv26qISNE4llHI0ALwg4 +UHDZupyN7TYLlhoOXjBdfsd/lGSjn75FmJmBF4gTvTM61WxUKW71yuH1AlsB +BfkHj9hYLtLtoJ3vCfe7ina+fsNGoT2rvjR88AAbkXuaB3vZKN+mmf+1xQN6 +N7ZOy/SzMXr0joUCxwMma7+neH9gYwdxdunDeA/QvLa67N8RNv6O1fPrYnrA +/T7zgyd/sDH+wHfRJCFqvBXOoD3ORuMTknbWU+6wK/nAy4gpNh5QTTfnbXaH +yUdJOdJ/2Pjurs3nuQp3SPh7fkftXzY+O+TxnfeiO4jpFWt4zbMxOJDbWinB +Ha4E104tLrJxdjJpwmavO/wPMVMiiQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k4VV0bB3AhQ48pMh3TOfscRIbIkOG4byoZk6EyD5WikNBAGcuUSDQq +KaFk2kdSqFRkTpMQRUnDI0mZkgfvfveXff2+rL3Wuu71X/dmbN/n5M/NRT1L +uLj+/54eaG1kpRWYdXCrNzvmglnXFZlI894EyDAWOSfGpQAo+Xy7TG8WZMVd +iuhc1ICDm2/18PTmgxaqmV5fNIXlY9JZsz2V8DTJZ4n/oh0M3t+0b7LnCQjL +dAVdX/AES9bI+189r6DMI2Xi3lwQzPYYnh3vGQJeD2hXGj8KDetuFLzMn4Cs +6wrC4r/TQX6w5st2jXl4oKIb8I7rHKwI8rnFv44H58NT18RcvQxZOpZ1m7YI +4Mv3eq7v7lyDtxdWP/olJoyCqe3RpTcLIK0g9jm37HIMfGcZpZl9A6TPfErN +zpXAwLi4B+eUbkGyi7XZq2lJnLvH75emWwq0qk4a9xIp/KJwpH3AuBTKJVxm +dP6RwqobbgEa60qh+5U3eVpJChPNYvWrnUuB5RhBOFpJ4bUTo9zHI0rhiX0e +34uLUugr3naZ/04pzFtOdT4zlcaERL6WmzplEG50zac1QQZ1JA0c1WTLweaq +yKTtSRmkx5QUZyiVA8F/NKXzrAyq/DFoH1MuhxddWzmvb8rgmIJAQJ5uOWiF +CvEMdMog01Jr4bFtOXwrOlT0myaL6SzcJBRdDp4rNv2Quy2LAv0vXG/3l8Oa +I3XxV+7LorIDXXf/x3JYNrRSitEki6Mp0u1qX8uhpoIHVN7K4gWWrkna73KQ +sq3JXL0oi7Tn/SKighXwIp6lt8GWhow9I940/QpY//NvVMgnGh57XPTULLUC +Iq3OqD8epWG6VmC9cUYFlF/T7JOYpmHwroZinewKkHHxNaoRkMOyWK3NYrkV +MHrv6QyPlhyeiqr6lElWQHZCZsTFw3KYJhizMq+7AoYkVUIaheWR22fB4rAo +CdL76hWkpeUxy+2xY+FyEuxaXJ8F0uWxWK7z7XMJEqqj0jRE18ijgLvYVgUZ +Ek4Mjo+4ucpjQ9beJTl0EnSL63b/zJfHwQhDQ5oOCfGmjn60tQpIaz02YLCZ +BCvvK78NLRQwN7PtpokTCSJx349tsVPA1/9MRbNdSLjckFiU6auAhY0PrNe6 +knDPpvY7X6oChpu0By3zJWHclXlw4q0CGmxfvpyxjwTvA1MnOo4oor7hfJxs +GgnK5y3kRxIV8Qgoyj46SVLrP1XGn6mI9lqCjTsySIj6T+2FRYEics3sd84/ +TcLZY96SNR2KKCOr6/ffeRI6TjfnFSoo4QJzbRyrgATj8otVMfVKSKad1d9Y +S8L6ns75sRYlDF+7+U1UHQmbuHg3+rxSwhH96N8l90nY4RTyFj4rYZ9RdBFf +PQmWRxixcUvp+E+Y70JuAwmhStPXzVfRceHBQo1LBwlTtzNbZrXp2Knn7eb7 +jJqf1aofHD06XmNxjgR2kpC439eAMKNjg12RTcQLEnIa2lq4Heko7EqXD+oi +oXF33o+Gg3QkM599HO4nwfo/I/GjR+j43MT6fcs7Ejozuwz04uh4ub3T79Z7 +Et7WCMYVpNIxwfA0/65BEsb+iRBPvExHXj3Ll/VDJMiQVoaWT+ioOzZYM/+N +hNz1nzwWmui4byfrUO2/JBBvo+Oq2+lot47WGDFCgib37VaVN3RUT+0RGfpO +goWLgif/NzpWLx0OzxsjIejPr7gWYQY+DA36UDhB7ef+XVJfxBlo/YG0spok +QWCkr4RHhoEdC9/7v1Iu7G/oNiMYuH2oOFFxmoSBh2c17hgw8EGwykzgHxJK +DZc9eWXCQMNt881TlKPImG3jyMB2WmFLzCwJUvm7E1bZMtBOaMgj5S8JDolG +vdd8GCj66mx/5H8kKC6UBdfvZOC7O2GmPymPHiR43gcy8FLryld+8ySkBPyj +JRPBQObqyitmCyRs/RjboB/JwM8KL7pvUma5T7o6xzDwVqinpdgiCY9s3x/L +SGFgzRqvzm7KGY2OsqXpDFzdx/imz8UBT3ZTeWsWA5Ucp0yyKM9qVbzlzWXg +zcehZyyWcEBXPF77CIeBcZ2H5RK4OcCVNtV4oZqBjiYhMu2UO3n2uFfXMdA+ +rstlOQ8H9k45Jf56ykDvbE7GWcrGIc000XYGqkukpr+mLPDVhNR4wcCSZ1md +IrwcKOhl9e/uY2BM/VJaNOUwx4uhiYMMFFz2RpmkjG3CfNeHGdhZlX/wA2WR +dQmXHv3LQKMIprDIUg68r5tePTDGwPNFQiNrKZfq7W2am2BgvvMKET/KUWWD +HrKzDKRp/IpMomyl4vLLYIGBq1LdtYopS+W1JLnwEKgUJKDRSnlYmi0fJkDg +s+jb4V8oV2ZyOKeECVQXkeRbwseBOEGVjWXiBPZIfP0kQ9khIeddmzSBF1cN +C2tRVpwTCfsmT+Ds+ebjSHk0/Bg/H0FgHdpbb6ZcOzpzmalK4K5KHU8vyin+ +QbrmGgR+UNB9uJvy1oEPzd46BL7ZJhS6jzJr2xavowYE7uiNCYug/Pt56++L +JgRG11o1HaT8yMos5S4SmF2nFvR/ZzyuVHizgUB+k6Gd4ZQ9jVVv/7Yh8I7R +Gk4wZfXbl6zENhMY4zbg6E95dpXYgOYWAtvfFW50pzydS4tf407gMmbWWzvK +k6LKLCMfAicudfaZUv4Vr91stpPA9V0r7NQpj00Y7VkfSCBjVFFLkvJ3//XC +NiEEXjp3I36e2r9vPZtIh3ACTWX3bPxE+bO1m/OWwwQW2RJxTZSH6nZMu0cT +KH7+pMYNyoOaIRd9Ewj8OeVvn0j5Xd5h013JBO6c2PvJl3L3sfSE/acJfNs8 +vV+M8uup88qHzhE4c3x27zBVHy9257ccvUSgYClr4A7lNtu7IimFBAaoTms6 +Um5+8JiTfotA/W5FYTnKjdodLtkVBMpdj9g9RNXnQ4mPOVdqCBz1qMwMpFyX ++J1d8JDAawIMPzXK92amPhQ3ECjr0lbxhar/yv5lqneeEUjb8KHNjXKFvWRb +7SsCj/L0XhClXFqvFPyoh8Dw0/RvT6jzVHRd73b7RwIDDR4JE5Rz9nrD0BSB +SdryaU+o83n+fcDQ178E1upERu6kfMYhPPHHIlUvPME/ef5/ftektP8RZGKZ +uOUBE+q8J8xxtokqMtHzreTiSSovYoPv/13BZOJcQTTKUT462JRLW8nErzc/ +id6YI+FgQ/8nZV0m6jR/9bhL5c/etKWhppZMlLiUU19L5VXAvKiEhS0Trd7U +JutT3rWPVr1xMxN36foNl82Q4Ous/Z+TOxOfPUz3Pk/ln4ucW0pgCBOlDuQF +21P5aFpSevXcOSbuGeGrtPxJQj+9JG/DJSa2Lmi3FlF5G3Wu+MpkHhPFn2q9 +5KV8N77oslMxE0vaw6trR6n72fXqBZH7TDQWvfyvMJXfakvPZCZ9ZKLa19RT +TsMktERlndL/wsQqz6UCWZ+o+Y1nZgyPMDFs2YWjz6n7oaA//aTFJBPNzAc9 +138kgV6ZnLLAx8L9I0IiUgNU/vociTuowcK04Koutx4S7nRFxirrsFCPS9E/ +sptaj83hmC59Ft5S158/94aELP0DR3WBhYJ/PDd2vCZBWGjf4TFHFoafWuuq +RN13vDXbQ3cdYmEw72bxgBYSfonb+G59wsKcbBG11Lsk9AYRL/Y0s/BYp32v +UzWVx01/IbaDhXMtHCfaHRIyo0qUbnazMONpT2l+JQmrh4QGZ0dYeJwbxC+W +kRDCee6VK6GMNgaNsQrXSRhx2OIxvFMZbdU9R9Ko/uFVsWb7n0BldNaR+CFG +9Re1PHwmwvuU8dohmf7sVBJS71bTDCKV8YyIWnR2EgkrlWT6ktOV8UCB7nRk +HAm7x/pcV1VT44X6Xx8OJ2H4pO/WMH4VDBVy1V/rRn1/RINYLaSCYgHJ5jnb +SJjZOPvjh5gKDlaX5vzdQsIynqzEQJoKOvfYGVZT/dLqyIYqX00VNFaT1pW1 +IyHaX0XCwVkFoyKFxjPMqP03G32+Kk8FG1c43ASC6gd+HrL+bKCKildqmjtb +K0BeRzFJwFQVXST0O0OfVsBYWOOTVeaqqPXvRw/RxxVwZlrMNMxWFavo05IW +9ypgYL5Ya9FHFd9MsjbEFFVAmNA7CdlUVeQTdjvtnFABOWo4YNevij4R++bi +Dal+c4dAeFXsSsxJvpi870I59f8hzZ38RA2tzzrTt0MZiD9TySB/quPBZRf4 ++96VgHxKxWYDAw30/3FOT9f8FlxYZSQmsVsT7QdSzHPLb0IbzVx/4rQWzrpH +OHjK3gBj+SeZ2t3amPRN6sYlz0IQ4cmP8EtYjflOhnHRD6+DYrySqZuKDgp/ +mPLw5c0HQWXPaqdmHVy4nyss630VtNiyFYe8dFHvwLjcaGMuhA2IN9hwrcGl +bk2mrNs58HPi5BbrC2swx/6SQeH8edio3ZRjramHE0Ied1NjzsLDCZO5mU49 +THTyesM/mwUhGrp9L/318YT0caPFjkxgj+3schM0wMNG64M/W6fDBpaMvXC+ +AYaU6G6Uu5YKK+NOHH5iaIiiXH6cMt8kUPc3qlfuM8TeiCK2ucEx8H8YcLxq +/1oszHVR9joTB/VXu3b+kjTCR8f6T9bLH4XJm4sz2neNcM3eyIzkpkOwQ7lE +MMfeGHVDXG9wTCPgl3q2QeW4MXY29+/2+xoK9wrmPk6lmGDqr+q6zaFB4L6e +iSaKpnh57HbYt+HdIBecXKP1yBQFc+sWVMp3gOSyII79NjY2jrREdWzzhYJ1 +0VHjbmxczedHSNv4gm50xrpsTzaG0z907DX1hU3j5JtePzaueCEusYbhC0nd +U7M7gtiYUXQkbn+3D/zJj7WIimfj1/3ZAobcPtBnkv26qISNE4llHI0ALwg4 +UHDZupyN7TYLlhoOXjBdfsd/lGSjn75FmJmBF4gTvTM61WxUKW71yuH1AlsB +BfkHj9hYLtLtoJ3vCfe7ina+fsNGoT2rvjR88AAbkXuaB3vZKN+mmf+1xQN6 +N7ZOy/SzMXr0joUCxwMma7+neH9gYwdxdunDeA/QvLa67N8RNv6O1fPrYnrA +/T7zgyd/sDH+wHfRJCFqvBXOoD3ORuMTknbWU+6wK/nAy4gpNh5QTTfnbXaH +yUdJOdJ/2Pjurs3nuQp3SPh7fkftXzY+O+TxnfeiO4jpFWt4zbMxOJDbWinB +Ha4E104tLrJxdjJpwmavO/wPMVMiiQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0665048822490721}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0665048822490721}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k4VV0bB3AhQ48pMh3TOfscRIbIkOG4byoZk6EyD5WikNBAGcuUSDQq +KaFk2kdSqFRkTpMQRUnDI0mZkgfvfveXff2+rL3Wuu71X/dmbN/n5M/NRT1L +uLj+/54eaG1kpRWYdXCrNzvmglnXFZlI894EyDAWOSfGpQAo+Xy7TG8WZMVd +iuhc1ICDm2/18PTmgxaqmV5fNIXlY9JZsz2V8DTJZ4n/oh0M3t+0b7LnCQjL +dAVdX/AES9bI+189r6DMI2Xi3lwQzPYYnh3vGQJeD2hXGj8KDetuFLzMn4Cs +6wrC4r/TQX6w5st2jXl4oKIb8I7rHKwI8rnFv44H58NT18RcvQxZOpZ1m7YI +4Mv3eq7v7lyDtxdWP/olJoyCqe3RpTcLIK0g9jm37HIMfGcZpZl9A6TPfErN +zpXAwLi4B+eUbkGyi7XZq2lJnLvH75emWwq0qk4a9xIp/KJwpH3AuBTKJVxm +dP6RwqobbgEa60qh+5U3eVpJChPNYvWrnUuB5RhBOFpJ4bUTo9zHI0rhiX0e +34uLUugr3naZ/04pzFtOdT4zlcaERL6WmzplEG50zac1QQZ1JA0c1WTLweaq +yKTtSRmkx5QUZyiVA8F/NKXzrAyq/DFoH1MuhxddWzmvb8rgmIJAQJ5uOWiF +CvEMdMog01Jr4bFtOXwrOlT0myaL6SzcJBRdDp4rNv2Quy2LAv0vXG/3l8Oa +I3XxV+7LorIDXXf/x3JYNrRSitEki6Mp0u1qX8uhpoIHVN7K4gWWrkna73KQ +sq3JXL0oi7Tn/SKighXwIp6lt8GWhow9I940/QpY//NvVMgnGh57XPTULLUC +Iq3OqD8epWG6VmC9cUYFlF/T7JOYpmHwroZinewKkHHxNaoRkMOyWK3NYrkV +MHrv6QyPlhyeiqr6lElWQHZCZsTFw3KYJhizMq+7AoYkVUIaheWR22fB4rAo +CdL76hWkpeUxy+2xY+FyEuxaXJ8F0uWxWK7z7XMJEqqj0jRE18ijgLvYVgUZ +Ek4Mjo+4ucpjQ9beJTl0EnSL63b/zJfHwQhDQ5oOCfGmjn60tQpIaz02YLCZ +BCvvK78NLRQwN7PtpokTCSJx349tsVPA1/9MRbNdSLjckFiU6auAhY0PrNe6 +knDPpvY7X6oChpu0By3zJWHclXlw4q0CGmxfvpyxjwTvA1MnOo4oor7hfJxs +GgnK5y3kRxIV8Qgoyj46SVLrP1XGn6mI9lqCjTsySIj6T+2FRYEics3sd84/ +TcLZY96SNR2KKCOr6/ffeRI6TjfnFSoo4QJzbRyrgATj8otVMfVKSKad1d9Y +S8L6ns75sRYlDF+7+U1UHQmbuHg3+rxSwhH96N8l90nY4RTyFj4rYZ9RdBFf +PQmWRxixcUvp+E+Y70JuAwmhStPXzVfRceHBQo1LBwlTtzNbZrXp2Knn7eb7 +jJqf1aofHD06XmNxjgR2kpC439eAMKNjg12RTcQLEnIa2lq4Heko7EqXD+oi +oXF33o+Gg3QkM599HO4nwfo/I/GjR+j43MT6fcs7Ejozuwz04uh4ub3T79Z7 +Et7WCMYVpNIxwfA0/65BEsb+iRBPvExHXj3Ll/VDJMiQVoaWT+ioOzZYM/+N +hNz1nzwWmui4byfrUO2/JBBvo+Oq2+lot47WGDFCgib37VaVN3RUT+0RGfpO +goWLgif/NzpWLx0OzxsjIejPr7gWYQY+DA36UDhB7ef+XVJfxBlo/YG0spok +QWCkr4RHhoEdC9/7v1Iu7G/oNiMYuH2oOFFxmoSBh2c17hgw8EGwykzgHxJK +DZc9eWXCQMNt881TlKPImG3jyMB2WmFLzCwJUvm7E1bZMtBOaMgj5S8JDolG +vdd8GCj66mx/5H8kKC6UBdfvZOC7O2GmPymPHiR43gcy8FLryld+8ySkBPyj +JRPBQObqyitmCyRs/RjboB/JwM8KL7pvUma5T7o6xzDwVqinpdgiCY9s3x/L +SGFgzRqvzm7KGY2OsqXpDFzdx/imz8UBT3ZTeWsWA5Ucp0yyKM9qVbzlzWXg +zcehZyyWcEBXPF77CIeBcZ2H5RK4OcCVNtV4oZqBjiYhMu2UO3n2uFfXMdA+ +rstlOQ8H9k45Jf56ykDvbE7GWcrGIc000XYGqkukpr+mLPDVhNR4wcCSZ1md +IrwcKOhl9e/uY2BM/VJaNOUwx4uhiYMMFFz2RpmkjG3CfNeHGdhZlX/wA2WR +dQmXHv3LQKMIprDIUg68r5tePTDGwPNFQiNrKZfq7W2am2BgvvMKET/KUWWD +HrKzDKRp/IpMomyl4vLLYIGBq1LdtYopS+W1JLnwEKgUJKDRSnlYmi0fJkDg +s+jb4V8oV2ZyOKeECVQXkeRbwseBOEGVjWXiBPZIfP0kQ9khIeddmzSBF1cN +C2tRVpwTCfsmT+Ds+ebjSHk0/Bg/H0FgHdpbb6ZcOzpzmalK4K5KHU8vyin+ +QbrmGgR+UNB9uJvy1oEPzd46BL7ZJhS6jzJr2xavowYE7uiNCYug/Pt56++L +JgRG11o1HaT8yMos5S4SmF2nFvR/ZzyuVHizgUB+k6Gd4ZQ9jVVv/7Yh8I7R +Gk4wZfXbl6zENhMY4zbg6E95dpXYgOYWAtvfFW50pzydS4tf407gMmbWWzvK +k6LKLCMfAicudfaZUv4Vr91stpPA9V0r7NQpj00Y7VkfSCBjVFFLkvJ3//XC +NiEEXjp3I36e2r9vPZtIh3ACTWX3bPxE+bO1m/OWwwQW2RJxTZSH6nZMu0cT +KH7+pMYNyoOaIRd9Ewj8OeVvn0j5Xd5h013JBO6c2PvJl3L3sfSE/acJfNs8 +vV+M8uup88qHzhE4c3x27zBVHy9257ccvUSgYClr4A7lNtu7IimFBAaoTms6 +Um5+8JiTfotA/W5FYTnKjdodLtkVBMpdj9g9RNXnQ4mPOVdqCBz1qMwMpFyX ++J1d8JDAawIMPzXK92amPhQ3ECjr0lbxhar/yv5lqneeEUjb8KHNjXKFvWRb +7SsCj/L0XhClXFqvFPyoh8Dw0/RvT6jzVHRd73b7RwIDDR4JE5Rz9nrD0BSB +SdryaU+o83n+fcDQ178E1upERu6kfMYhPPHHIlUvPME/ef5/ftektP8RZGKZ +uOUBE+q8J8xxtokqMtHzreTiSSovYoPv/13BZOJcQTTKUT462JRLW8nErzc/ +id6YI+FgQ/8nZV0m6jR/9bhL5c/etKWhppZMlLiUU19L5VXAvKiEhS0Trd7U +JutT3rWPVr1xMxN36foNl82Q4Ous/Z+TOxOfPUz3Pk/ln4ucW0pgCBOlDuQF +21P5aFpSevXcOSbuGeGrtPxJQj+9JG/DJSa2Lmi3FlF5G3Wu+MpkHhPFn2q9 +5KV8N77oslMxE0vaw6trR6n72fXqBZH7TDQWvfyvMJXfakvPZCZ9ZKLa19RT +TsMktERlndL/wsQqz6UCWZ+o+Y1nZgyPMDFs2YWjz6n7oaA//aTFJBPNzAc9 +138kgV6ZnLLAx8L9I0IiUgNU/vociTuowcK04Koutx4S7nRFxirrsFCPS9E/ +sptaj83hmC59Ft5S158/94aELP0DR3WBhYJ/PDd2vCZBWGjf4TFHFoafWuuq +RN13vDXbQ3cdYmEw72bxgBYSfonb+G59wsKcbBG11Lsk9AYRL/Y0s/BYp32v +UzWVx01/IbaDhXMtHCfaHRIyo0qUbnazMONpT2l+JQmrh4QGZ0dYeJwbxC+W +kRDCee6VK6GMNgaNsQrXSRhx2OIxvFMZbdU9R9Ko/uFVsWb7n0BldNaR+CFG +9Re1PHwmwvuU8dohmf7sVBJS71bTDCKV8YyIWnR2EgkrlWT6ktOV8UCB7nRk +HAm7x/pcV1VT44X6Xx8OJ2H4pO/WMH4VDBVy1V/rRn1/RINYLaSCYgHJ5jnb +SJjZOPvjh5gKDlaX5vzdQsIynqzEQJoKOvfYGVZT/dLqyIYqX00VNFaT1pW1 +IyHaX0XCwVkFoyKFxjPMqP03G32+Kk8FG1c43ASC6gd+HrL+bKCKildqmjtb +K0BeRzFJwFQVXST0O0OfVsBYWOOTVeaqqPXvRw/RxxVwZlrMNMxWFavo05IW +9ypgYL5Ya9FHFd9MsjbEFFVAmNA7CdlUVeQTdjvtnFABOWo4YNevij4R++bi +Dal+c4dAeFXsSsxJvpi870I59f8hzZ38RA2tzzrTt0MZiD9TySB/quPBZRf4 ++96VgHxKxWYDAw30/3FOT9f8FlxYZSQmsVsT7QdSzHPLb0IbzVx/4rQWzrpH +OHjK3gBj+SeZ2t3amPRN6sYlz0IQ4cmP8EtYjflOhnHRD6+DYrySqZuKDgp/ +mPLw5c0HQWXPaqdmHVy4nyss630VtNiyFYe8dFHvwLjcaGMuhA2IN9hwrcGl +bk2mrNs58HPi5BbrC2swx/6SQeH8edio3ZRjramHE0Ied1NjzsLDCZO5mU49 +THTyesM/mwUhGrp9L/318YT0caPFjkxgj+3schM0wMNG64M/W6fDBpaMvXC+ +AYaU6G6Uu5YKK+NOHH5iaIiiXH6cMt8kUPc3qlfuM8TeiCK2ucEx8H8YcLxq +/1oszHVR9joTB/VXu3b+kjTCR8f6T9bLH4XJm4sz2neNcM3eyIzkpkOwQ7lE +MMfeGHVDXG9wTCPgl3q2QeW4MXY29+/2+xoK9wrmPk6lmGDqr+q6zaFB4L6e +iSaKpnh57HbYt+HdIBecXKP1yBQFc+sWVMp3gOSyII79NjY2jrREdWzzhYJ1 +0VHjbmxczedHSNv4gm50xrpsTzaG0z907DX1hU3j5JtePzaueCEusYbhC0nd +U7M7gtiYUXQkbn+3D/zJj7WIimfj1/3ZAobcPtBnkv26qISNE4llHI0ALwg4 +UHDZupyN7TYLlhoOXjBdfsd/lGSjn75FmJmBF4gTvTM61WxUKW71yuH1AlsB +BfkHj9hYLtLtoJ3vCfe7ina+fsNGoT2rvjR88AAbkXuaB3vZKN+mmf+1xQN6 +N7ZOy/SzMXr0joUCxwMma7+neH9gYwdxdunDeA/QvLa67N8RNv6O1fPrYnrA +/T7zgyd/sDH+wHfRJCFqvBXOoD3ORuMTknbWU+6wK/nAy4gpNh5QTTfnbXaH +yUdJOdJ/2Pjurs3nuQp3SPh7fkftXzY+O+TxnfeiO4jpFWt4zbMxOJDbWinB +Ha4E104tLrJxdjJpwmavO/wPMVMiiQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0665048822490721}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0665048822490721}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99435690405968*^9}, + CellLabel-> + "Out[152]=",ExpressionUUID->"0fbdfa17-216e-429b-9d89-b513f188c7cb"] +}, Open ]], Cell[CellGroupData[{ @@ -13396,66 +15340,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[142]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], + "In[153]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 93, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097599506`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.30706965136482`*^-163\\\", \ +RowBox[{\\\"1611986581187851159566782995187\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7705600000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 153, 73, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994356904114398*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], +In[153]:=",ExpressionUUID->"ce01a7f5-2009-417f-bd05-160e0638d57e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 94, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909769953*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0538805309887299`*^-165\\\", \ +RowBox[{\\\"5055189918605101236401431472908\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"88\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4761600000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 153, 74, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994356904124979*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], +In[153]:=",ExpressionUUID->"53bfda70-c116-49c6-b3ed-84f7dd03f6b5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 142, 95, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097784023`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1933553902588606`*^-168\\\", \ +RowBox[{\\\"1642431204554797391706825085547\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0438400000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 153, 75, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.99435690413363*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], +In[153]:=",ExpressionUUID->"5ddb664a-8763-48bf-b67a-e9470cf69fe4"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 142, 96, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909786396*^9}, +during this calculation.\"", 2, 153, 76, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994356904142531*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], +In[153]:=",ExpressionUUID->"bd019d7d-d2f9-410f-9d69-ebe7fada5569"], -Cell[BoxData["11.275343508420296`"], "Output", - CellChangeTimes->{3.9913279159698696`*^9}, +Cell[BoxData["11.58270446026548`"], "Output", + CellChangeTimes->{3.9913279159698696`*^9, 3.9943569927703238`*^9}, CellLabel-> - "Out[142]=",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] + "Out[153]=",ExpressionUUID->"c64788bc-f8cb-4de0-a658-6843ffa730fa"] }, Open ]], Cell[CellGroupData[{ @@ -13522,68 +15473,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99179998339209*^9, - 3.991799988637089*^9}},ExpressionUUID->"a5e0631c-6c6c-a045-8418-\ -22c641e38d86"], + CellChangeTimes->{{3.99179998339209*^9, 3.991799988637089*^9}}, + CellLabel-> + "In[154]:=",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 143, 97, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916008396*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3289868713253457`*^-212\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 154, 77, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.9943569928281937`*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], +In[154]:=",ExpressionUUID->"29743041-f224-422f-b048-41ce7ca4b373"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 143, 98, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916018362*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.032369241441778`*^-218\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 154, 78, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.994356992837779*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], +In[154]:=",ExpressionUUID->"451178dd-5660-407a-bdd2-e98968037e9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 143, - 99, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279160263577`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.138788566991886`*^-223\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 154, 79, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.99435699284638*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], +In[154]:=",ExpressionUUID->"494445cf-3192-4821-92d4-8b1dd0629b10"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 143, 100, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916034359*^9}, +during this calculation.\"", 2, 154, 80, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.9943569928549623`*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], +In[154]:=",ExpressionUUID->"6b7cc5ab-1a5e-428c-98ea-348e597fedde"], -Cell[BoxData["1.0734937398087425`"], "Output", - CellChangeTimes->{3.991327922931429*^9}, +Cell[BoxData["0.4091837167682036`"], "Output", + CellChangeTimes->{3.991327922931429*^9, 3.9943570042313147`*^9}, CellLabel-> - "Out[143]=",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] + "Out[154]=",ExpressionUUID->"963cec12-2d2e-4440-adf8-ecd79388edaf"] }, Open ]], Cell[CellGroupData[{ @@ -13604,8 +15562,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13650,68 +15607,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799991275097*^9, - 3.9917999948700333`*^9}},ExpressionUUID->"4b6c44e4-d946-0c4d-9992-\ -4f0fc7048689"], + CellChangeTimes->{{3.991799991275097*^9, 3.9917999948700333`*^9}}, + CellLabel-> + "In[155]:=",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 144, 101, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229664307`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3289868713253457`*^-212\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 155, 81, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.9943570042846622`*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], +In[155]:=",ExpressionUUID->"b520d1f8-7e85-4554-8b77-ed3a5e9329f3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 144, 102, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327922975607*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.032369241441778`*^-218\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 155, 82, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994357004298052*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], +In[155]:=",ExpressionUUID->"64c25521-ed87-4fef-84c6-1192d919c5d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 144, - 103, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229836063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.138788566991886`*^-223\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 155, 83, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994357004307102*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], +In[155]:=",ExpressionUUID->"b2368603-29fe-4642-ba47-1b2cd4ccb272"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 144, 104, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229916077`*^9}, +during this calculation.\"", 2, 155, 84, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994357004316609*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], +In[155]:=",ExpressionUUID->"aaec4bfa-3812-4181-8af7-def4b73fe47f"], -Cell[BoxData["9.48093127226425`"], "Output", - CellChangeTimes->{3.9913279288200035`*^9}, +Cell[BoxData["35.699468383953715`"], "Output", + CellChangeTimes->{3.9913279288200035`*^9, 3.994357014952484*^9}, CellLabel-> - "Out[144]=",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] + "Out[155]=",ExpressionUUID->"b8fdee49-37d6-4b90-b98b-d21872fa9aba"] }, Open ]], Cell[CellGroupData[{ @@ -13732,8 +15696,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13778,68 +15741,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918000011431293`*^9, - 3.9918000068677616`*^9}},ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-\ -32244819d42b"], + CellChangeTimes->{{3.9918000011431293`*^9, 3.9918000068677616`*^9}}, + CellLabel-> + "In[156]:=",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 145, 105, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928854006*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3289868713253457`*^-212\\\", \ +RowBox[{\\\"1119071536804432775059941973913\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"38\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6260731183104000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 156, 85, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994357015008717*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], +In[156]:=",ExpressionUUID->"a60361d0-d50d-40d0-9155-90fe197b52f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 145, 106, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928864023*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.032369241441778`*^-218\\\", \ +RowBox[{\\\"1974042190923019415205737641984\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"41\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3929806995456000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 156, 86, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994357015018693*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], +In[156]:=",ExpressionUUID->"cf70529d-0e4a-4b18-8822-5d0323a72e7f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 145, - 107, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928871004*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.138788566991886`*^-223\\\", \ +RowBox[{\\\"3650004011016662898715408900028\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"44\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6213134598144000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 156, 87, + 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994357015028851*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], +In[156]:=",ExpressionUUID->"584dc885-e6af-43fd-b749-e2dda879049a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 145, 108, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928878006*^9}, +during this calculation.\"", 2, 156, 88, 31388289743499617120, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994357015038719*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], +In[156]:=",ExpressionUUID->"90d25ec6-224c-464f-8769-21799d3da0f5"], -Cell[BoxData["17.503865312709518`"], "Output", - CellChangeTimes->{3.9913279320131683`*^9}, +Cell[BoxData["6.103421731596914`"], "Output", + CellChangeTimes->{3.9913279320131683`*^9, 3.994357023955749*^9}, CellLabel-> - "Out[145]=",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] + "Out[156]=",ExpressionUUID->"74b56185-7f43-4d3b-b6b9-6074f624a689"] }, Open ]], Cell[CellGroupData[{ @@ -13848,18 +15818,22 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991800029528055*^9, - 3.991800041720209*^9}},ExpressionUUID->"99da2760-e71e-1246-8cc9-\ -f0a7464dc747"], - -Cell[BoxData["0.08333108480569339`"], "Output", - CellChangeTimes->{3.9913279320452003`*^9}, + CellChangeTimes->{{3.991800029528055*^9, 3.991800041720209*^9}}, CellLabel-> - "Out[146]=",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] + "In[157]:=",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], + +Cell[BoxData["0.02772048207236424`"], "Output", + CellChangeTimes->{3.9913279320452003`*^9, 3.994357024030137*^9}, + CellLabel-> + "Out[157]=",ExpressionUUID->"8ec13d18-6e5f-4e57-aecd-76745353b576"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"db19731b-41c3-414b-814d-467835909659"], + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[158]:=",ExpressionUUID->"db19731b-41c3-414b-814d-467835909659"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ @@ -13949,10 +15923,106 @@ Cell[BoxData[ RowBox[{"FrameMargins", "->", "10"}]}], "]"}], ",", "\"\\""}], "]"}], "]"}], "\n"}]], "Input", CellChangeTimes->{{3.9943043996512623`*^9, 3.994304399651291*^9}}, - CellLabel->"In[1]:=",ExpressionUUID->"508b6267-8039-4e78-b3be-315b0a8c82a4"] + CellLabel-> + "In[159]:=",ExpressionUUID->"508b6267-8039-4e78-b3be-315b0a8c82a4"], + +Cell[BoxData[ + PanelBox[ + TemplateBox[{ + StyleBox[ + "\"\:0423\:043f\:0440\:0430\:0432\:043b\:0435\:043d\:0438\:0435 \:043a\ +\:044d\:0448\:0435\:043c \:0433\:0440\:0430\:0444\:0438\:043a\:0430: \"", + Bold, StripOnInput -> False], + ButtonBox[ + "\"\:0421\:0434\:0435\:043b\:0430\:0442\:044c \:0442\:0430\:0431\:043b\ +\:0438\:0446\:0443 (\:041b\:0438\:043d\:0438\:044f 1)\"", ButtonFunction :> + Module[{$CellContext`cell, $CellContext`pts}, $CellContext`cell = + NotebookRead[ + EvaluationNotebook[]]; $CellContext`pts = + Cases[$CellContext`cell, Line[ + Pattern[$CellContext`p, + Blank[]]] :> $CellContext`p, Infinity]; + If[Length[$CellContext`pts] > + 0, $CellContext`plotX = + Part[$CellContext`pts, 1]; $CellContext`fInterp = + Interpolation[$CellContext`plotX]; $CellContext`dataX = + Table[{$CellContext`x, + $CellContext`fInterp[$CellContext`x]}, {$CellContext`x, 0, 30, + 1}]; SelectionMove[ + EvaluationNotebook[], After, Cell]; CellPrint[ + Cell[ + BoxData[ + ToBoxes[ + TableForm[$CellContext`dataX]]], "Output"]], + MessageDialog[ + "\:041e\:0448\:0438\:0431\:043a\:0430: \ +\:0421\:043d\:0430\:0447\:0430\:043b\:0430 \:0432\:044b\:0434\:0435\:043b\ +\:0438\:0442\:0435 \:043d\:0443\:0436\:043d\:044b\:0439 \:0433\:0440\:0430\ +\:0444\:0438\:043a (\:043a\:043b\:0438\:043a\:043d\:0438\:0442\:0435 \:043f\ +\:043e \:0435\:0433\:043e \:044f\:0447\:0435\:0439\:043a\:0435 \:0441\:043f\ +\:0440\:0430\:0432\:0430)!", WindowFloating -> True]]], Background -> + RGBColor[0.9, 0.95, 1], ImageSize -> {180, 25}, Appearance -> Automatic, + Evaluator -> Automatic, Method -> "Preemptive"]}, + "RowDefault"], + Background->GrayLevel[0.95], + FrameMargins->10]], "Output", + CellChangeTimes->{ + 3.994357024222693*^9},ExpressionUUID->"2d9fc57d-1ebb-455a-9b62-\ +cc7b75ac93a9"], + +Cell[BoxData[ + TagBox[GridBox[{ + {"0", + RowBox[{"-", "4.0657581468206416`*^-20"}]}, + {"1", "0.011271970623659259`"}, + {"2", "0.02216367511461063`"}, + {"3", "0.032316669789077504`"}, + {"4", "0.041412567530907114`"}, + {"5", "0.049191598402254`"}, + {"6", "0.05546186030411121`"}, + {"7", "0.06010915622943811`"}, + {"8", "0.06309701800824481`"}, + {"9", "0.06446358401115607`"}, + {"10", "0.06431345817904205`"}, + {"11", "0.06280602479066556`"}, + {"12", "0.06014139041452839`"}, + {"13", "0.05654524261265153`"}, + {"14", "0.05225383182218886`"}, + {"15", "0.047500250992708874`"}, + {"16", "0.042502586890994655`"}, + {"17", "0.03745524243930151`"}, + {"18", "0.03252228914350942`"}, + {"19", "0.02783442997115754`"}, + {"20", "0.02348866373785624`"}, + {"21", "0.019548924358099674`"}, + {"22", "0.016050076196021678`"}, + {"23", "0.013002055728176448`"}, + {"24", "0.010394427506960839`"}, + {"25", "0.0082018423027298`"}, + {"26", "0.00638857424799413`"}, + {"27", "0.004912809149280335`"}, + {"28", "0.0037302394170503797`"}, + {"29", "0.0027968372136704615`"}, + {"30", "0.00207088879366813`"} + }, + GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[2.0999999999999996`]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], + Function[BoxForm`e$, + TableForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{ + 3.9943881236582947`*^9},ExpressionUUID->"4081db83-30f0-4542-a0b0-\ +babb5e38c5d7"] +}, Open ]] }, +Evaluator->"kernel 4", WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, 18}}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, Magnification:>1.1 Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", @@ -13971,663 +16041,679 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 453, 8, 40, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], -Cell[1032, 32, 302, 6, 45, "Output",ExpressionUUID->"fa94cc60-1305-4c6c-94b9-dfec3b3d5e97"] +Cell[576, 22, 448, 7, 73, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], +Cell[1027, 31, 340, 5, 45, "Output",ExpressionUUID->"47a50133-eee0-438d-96c9-b1e6d5cec904"] }, Open ]], Cell[CellGroupData[{ -Cell[1371, 43, 255, 5, 40, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], -Cell[1629, 50, 305, 6, 45, "Output",ExpressionUUID->"50a462f5-1c8f-41d2-a98d-d73de3c59ec6"] +Cell[1404, 41, 250, 4, 40, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], +Cell[1657, 47, 346, 5, 45, "Output",ExpressionUUID->"76409cff-2a61-48a2-bc5b-fe9fce58d32b"] }, Open ]], Cell[CellGroupData[{ -Cell[1971, 61, 226, 5, 40, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], -Cell[2200, 68, 300, 6, 45, "Output",ExpressionUUID->"7c7a2405-8772-4f44-913e-66d3fac2d8b7"] +Cell[2040, 57, 221, 4, 40, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], +Cell[2264, 63, 339, 5, 45, "Output",ExpressionUUID->"bcdc3628-a859-4ec6-9cbc-b1ff4db502c2"] }, Open ]], Cell[CellGroupData[{ -Cell[2537, 79, 180, 4, 40, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], -Cell[2720, 85, 303, 6, 45, "Output",ExpressionUUID->"94d1ac3a-e16c-43f6-b45d-3876afcdc16d"] +Cell[2640, 73, 175, 3, 40, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], +Cell[2818, 78, 342, 5, 45, "Output",ExpressionUUID->"5ab47e70-013d-4318-9620-f3a6e488cc88"] }, Open ]], Cell[CellGroupData[{ -Cell[3060, 96, 262, 8, 59, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], -Cell[3325, 106, 317, 6, 45, "Output",ExpressionUUID->"09f8d98b-8e89-4313-8e8e-e5e97d73c783"] +Cell[3197, 88, 257, 7, 59, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], +Cell[3457, 97, 356, 5, 45, "Output",ExpressionUUID->"3c2c9fff-1147-413e-abb4-314e6a41503a"] }, Open ]], Cell[CellGroupData[{ -Cell[3679, 117, 136, 3, 40, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], -Cell[3818, 122, 309, 6, 45, "Output",ExpressionUUID->"ea27385d-4662-4d8a-a618-8973e3e556ec"] +Cell[3850, 107, 131, 2, 40, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], +Cell[3984, 111, 348, 5, 45, "Output",ExpressionUUID->"6f94e454-664b-4d9e-bf0c-c91844e2ba48"] }, Open ]], Cell[CellGroupData[{ -Cell[4164, 133, 281, 7, 40, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], -Cell[4448, 142, 321, 6, 45, "Output",ExpressionUUID->"999d7edd-cf6a-4a9f-9600-d4f1b948cf99"] +Cell[4369, 121, 276, 6, 40, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], +Cell[4648, 129, 359, 5, 45, "Output",ExpressionUUID->"30a0d5d5-1f9e-4893-be64-6721156f6426"] }, Open ]], Cell[CellGroupData[{ -Cell[4806, 153, 262, 8, 40, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], -Cell[5071, 163, 320, 6, 45, "Output",ExpressionUUID->"9e6351fe-ca20-4bf4-bec6-6a9b1f77d85e"] +Cell[5044, 139, 257, 7, 40, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], +Cell[5304, 148, 359, 5, 45, "Output",ExpressionUUID->"c0da2337-12ee-41ca-9034-8dd2a5d453a2"] }, Open ]], Cell[CellGroupData[{ -Cell[5428, 174, 208, 4, 40, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], -Cell[5639, 180, 288, 5, 45, "Output",ExpressionUUID->"66fc1cb3-d6d8-4ab9-a3de-c5bef3e6ad7f"] +Cell[5700, 158, 203, 3, 40, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], +Cell[5906, 163, 331, 5, 45, "Output",ExpressionUUID->"fd380399-62e8-483e-aee5-61cae8f25474"] }, Open ]], Cell[CellGroupData[{ -Cell[5964, 190, 210, 4, 40, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], -Cell[6177, 196, 288, 5, 45, "Output",ExpressionUUID->"2040dd30-863a-4f4e-94e7-263f4a362b30"] +Cell[6274, 173, 206, 3, 40, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], +Cell[6483, 178, 332, 5, 45, "Output",ExpressionUUID->"36aa09a1-a028-41ed-a5c0-287fcb6883ca"] }, Open ]], Cell[CellGroupData[{ -Cell[6502, 206, 133, 3, 40, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], -Cell[6638, 211, 300, 6, 45, "Output",ExpressionUUID->"f014c2f3-83a1-4b59-91d6-6fe132b7d872"] +Cell[6852, 188, 129, 2, 40, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], +Cell[6984, 192, 344, 5, 45, "Output",ExpressionUUID->"0946c5d0-f579-4439-a4e3-5a081f58c073"] }, Open ]], Cell[CellGroupData[{ -Cell[6975, 222, 133, 3, 40, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], -Cell[7111, 227, 301, 6, 45, "Output",ExpressionUUID->"603d6b0b-6bef-4195-a4ab-f38eb57c8531"] +Cell[7365, 202, 129, 2, 40, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], +Cell[7497, 206, 341, 5, 45, "Output",ExpressionUUID->"fe618d99-5d79-4fa8-9ecd-32b49f2e17f6"] }, Open ]], Cell[CellGroupData[{ -Cell[7449, 238, 561, 20, 109, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], -Cell[8013, 260, 320, 6, 45, "Output",ExpressionUUID->"bd01e92c-e2aa-42b9-8795-1c21241e342f"] +Cell[7875, 216, 557, 19, 109, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], +Cell[8435, 237, 359, 5, 45, "Output",ExpressionUUID->"d2aa920c-4b5a-4d1a-81d4-945e53d1eac4"] }, Open ]], Cell[CellGroupData[{ -Cell[8370, 271, 561, 20, 109, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], -Cell[8934, 293, 317, 6, 45, "Output",ExpressionUUID->"01775465-9dc7-4028-8481-c09c2c089cda"] +Cell[8831, 247, 557, 19, 109, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], +Cell[9391, 268, 357, 5, 45, "Output",ExpressionUUID->"2b176184-7121-43fb-93c3-f436124fde29"] }, Open ]], Cell[CellGroupData[{ -Cell[9288, 304, 1496, 49, 111, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], -Cell[10787, 355, 317, 6, 45, "Output",ExpressionUUID->"3985d0fa-c50c-474c-a5a5-6827471756b9"] +Cell[9785, 278, 1588, 50, 188, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], +Cell[11376, 330, 357, 5, 45, "Output",ExpressionUUID->"57eeca45-ed74-4813-a89c-3846619fcedf"] }, Open ]], Cell[CellGroupData[{ -Cell[11141, 366, 1335, 45, 111, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], -Cell[12479, 413, 334, 7, 45, "Output",ExpressionUUID->"adcc8b62-e3dc-424d-936f-9a791c76df39"] +Cell[11770, 340, 1422, 46, 155, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], +Cell[13195, 388, 376, 6, 45, "Output",ExpressionUUID->"81e8f0f7-38cc-4820-80d2-040154894aa3"] }, Open ]], Cell[CellGroupData[{ -Cell[12850, 425, 1335, 45, 111, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], -Cell[14188, 472, 341, 7, 45, "Output",ExpressionUUID->"de90c3de-d3ca-4aed-a946-1114d56aa2d0"] +Cell[13608, 399, 1422, 46, 155, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], +Cell[15033, 447, 381, 6, 45, "Output",ExpressionUUID->"04c80ad2-42d8-4244-857f-6134f6d41e04"] }, Open ]], Cell[CellGroupData[{ -Cell[14566, 484, 1496, 49, 111, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], -Cell[16065, 535, 318, 6, 45, "Output",ExpressionUUID->"9774975d-6419-47b6-a5f9-4d8f53da4848"] +Cell[15451, 458, 1588, 50, 188, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], +Cell[17042, 510, 358, 5, 45, "Output",ExpressionUUID->"9bbcc072-8254-4d20-a276-fddd2de32315"] }, Open ]], Cell[CellGroupData[{ -Cell[16420, 546, 135, 3, 40, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], -Cell[16558, 551, 302, 6, 45, "Output",ExpressionUUID->"9de8014a-e9fd-4ba8-bdba-cf5232274296"] +Cell[17437, 520, 131, 2, 40, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], +Cell[17571, 524, 342, 5, 45, "Output",ExpressionUUID->"cffc6bc4-057e-4df1-af5d-89cb0e7bd67f"] }, Open ]], Cell[CellGroupData[{ -Cell[16897, 562, 137, 3, 40, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], -Cell[17037, 567, 303, 6, 45, "Output",ExpressionUUID->"9d000889-367b-47cc-9abe-e3854d05a73f"] +Cell[17950, 534, 133, 2, 40, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], +Cell[18086, 538, 345, 5, 45, "Output",ExpressionUUID->"0cb88c67-e79a-4b53-a935-702094c10534"] }, Open ]], Cell[CellGroupData[{ -Cell[17377, 578, 138, 3, 40, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], -Cell[17518, 583, 304, 6, 45, "Output",ExpressionUUID->"76919cf3-f476-4f2e-97ee-532c2fed40ed"] +Cell[18468, 548, 134, 2, 40, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], +Cell[18605, 552, 344, 5, 45, "Output",ExpressionUUID->"810f3782-f7b7-4f32-be94-e5e5997de953"] }, Open ]], Cell[CellGroupData[{ -Cell[17859, 594, 223, 5, 40, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], -Cell[18085, 601, 321, 7, 109, "Output",ExpressionUUID->"37b1aac5-9db8-4caa-818d-10f1d9b2c3ab"] +Cell[18986, 562, 219, 4, 40, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], +Cell[19208, 568, 361, 6, 45, "Output",ExpressionUUID->"5170b953-9504-4ea3-8113-1d4530a09e4f"] }, Open ]], Cell[CellGroupData[{ -Cell[18443, 613, 138, 3, 109, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], -Cell[18584, 618, 303, 6, 109, "Output",ExpressionUUID->"b69578e7-bb0f-4cc2-a4d1-829bda4ca0cc"] +Cell[19606, 579, 134, 2, 40, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], +Cell[19743, 583, 345, 5, 45, "Output",ExpressionUUID->"64522ca8-e38e-410d-80cc-250373f7ba97"] }, Open ]], Cell[CellGroupData[{ -Cell[18924, 629, 326, 6, 40, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], -Cell[19253, 637, 303, 6, 45, "Output",ExpressionUUID->"f300beeb-1e68-43d7-9a43-0bfc58afd9ba"] +Cell[20125, 593, 322, 5, 40, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], +Cell[20450, 600, 343, 5, 45, "Output",ExpressionUUID->"e8dea8ce-1b6d-409c-8b55-3508306bf16e"] }, Open ]], Cell[CellGroupData[{ -Cell[19593, 648, 302, 6, 40, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], -Cell[19898, 656, 302, 6, 45, "Output",ExpressionUUID->"12936372-2ef2-4ce9-b725-74d378c77de5"] +Cell[20830, 610, 298, 5, 40, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], +Cell[21131, 617, 344, 5, 45, "Output",ExpressionUUID->"6bf38a9d-ca75-4f70-9646-8278f3b1f5f5"] }, Open ]], Cell[CellGroupData[{ -Cell[20237, 667, 223, 5, 40, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], -Cell[20463, 674, 303, 6, 45, "Output",ExpressionUUID->"573d81f5-eb0c-43e6-8eaa-3f8901160221"] +Cell[21512, 627, 219, 4, 40, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], +Cell[21734, 633, 343, 5, 45, "Output",ExpressionUUID->"31a08bbe-baed-46e5-a47c-6870634a2257"] }, Open ]], Cell[CellGroupData[{ -Cell[20803, 685, 354, 11, 59, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], -Cell[21160, 698, 320, 6, 45, "Output",ExpressionUUID->"1e8ae19a-cfe9-41b1-9a1a-bd48ee6c4d87"] +Cell[22114, 643, 350, 10, 59, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], +Cell[22467, 655, 362, 5, 45, "Output",ExpressionUUID->"b1c96403-e905-4bad-8855-b5f13d0ffd85"] }, Open ]], Cell[CellGroupData[{ -Cell[21517, 709, 354, 11, 59, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], -Cell[21874, 722, 341, 7, 45, "Output",ExpressionUUID->"2ed79cd1-f2d4-43ad-8bd0-2589898aeb4c"] +Cell[22866, 665, 350, 10, 59, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], +Cell[23219, 677, 381, 6, 45, "Output",ExpressionUUID->"13feda3a-36f2-48b2-8354-372e31c2f467"] }, Open ]], Cell[CellGroupData[{ -Cell[22252, 734, 998, 27, 60, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], -Cell[23253, 763, 321, 6, 45, "Output",ExpressionUUID->"70b0d530-b9a4-4f64-b884-e3ff28b434fc"] +Cell[23637, 688, 994, 26, 60, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], +Cell[24634, 716, 361, 5, 45, "Output",ExpressionUUID->"c2934cf8-6ee4-4110-bbb4-dabef3bed374"] }, Open ]], Cell[CellGroupData[{ -Cell[23611, 774, 203, 4, 40, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], -Cell[23817, 780, 301, 6, 45, "Output",ExpressionUUID->"de1af145-a36f-4cd8-bf85-50b5ce866ddc"] +Cell[25032, 726, 199, 3, 40, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], +Cell[25234, 731, 341, 5, 45, "Output",ExpressionUUID->"da07d7a4-365d-422e-a239-168a87707d6e"] }, Open ]], Cell[CellGroupData[{ -Cell[24155, 791, 333, 6, 40, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], -Cell[24491, 799, 276, 5, 45, "Output",ExpressionUUID->"e598e271-4662-4603-b100-b2ef0b372928"] +Cell[25612, 741, 329, 5, 40, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], +Cell[25944, 748, 322, 5, 45, "Output",ExpressionUUID->"a234ba6f-a79d-4576-aa6c-ffc2b62be047"] }, Open ]], -Cell[24782, 807, 177, 3, 40, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], +Cell[26281, 756, 173, 2, 40, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ -Cell[24984, 814, 331, 6, 40, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], -Cell[25318, 822, 279, 5, 45, "Output",ExpressionUUID->"1bb1cb7f-b6e0-469a-95fc-2a46de990c5d"] +Cell[26479, 762, 327, 5, 40, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], +Cell[26809, 769, 327, 5, 45, "Output",ExpressionUUID->"0c1ee3a7-11c3-4eca-8013-ea36803a8e3a"] }, Open ]], -Cell[25612, 830, 177, 3, 40, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], +Cell[27151, 777, 173, 2, 40, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ -Cell[25814, 837, 334, 6, 40, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], -Cell[26151, 845, 276, 5, 45, "Output",ExpressionUUID->"e3c488f2-9970-4453-be03-0af957364fd5"] +Cell[27349, 783, 330, 5, 40, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], +Cell[27682, 790, 320, 5, 45, "Output",ExpressionUUID->"f8b82e24-acba-4bc7-b0c9-2ed58f4186a1"] }, Open ]], -Cell[26442, 853, 177, 3, 40, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], +Cell[28017, 798, 173, 2, 40, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ -Cell[26644, 860, 358, 6, 40, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], -Cell[27005, 868, 278, 5, 45, "Output",ExpressionUUID->"47ff94e5-2a7c-423d-8b49-729701313d02"] +Cell[28215, 804, 354, 5, 40, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], +Cell[28572, 811, 322, 5, 45, "Output",ExpressionUUID->"5574e04c-e034-49c2-a4cf-bd3a3bb5bd44"] }, Open ]], -Cell[27298, 876, 175, 3, 40, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], +Cell[28909, 819, 171, 2, 40, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ -Cell[27498, 883, 307, 6, 40, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], -Cell[27808, 891, 278, 5, 45, "Output",ExpressionUUID->"b548f324-40f7-4096-b026-f2a9b1eb8a40"] +Cell[29105, 825, 303, 5, 40, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], +Cell[29411, 832, 324, 5, 45, "Output",ExpressionUUID->"c8ec9cf0-a86f-45e3-b8ec-be236a876a85"] }, Open ]], -Cell[28101, 899, 175, 3, 40, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], +Cell[29750, 840, 171, 2, 40, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ -Cell[28301, 906, 309, 6, 40, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], -Cell[28613, 914, 279, 5, 45, "Output",ExpressionUUID->"a51aaa20-e42c-41c4-9877-27708c69f3e3"] +Cell[29946, 846, 305, 5, 40, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], +Cell[30254, 853, 325, 5, 45, "Output",ExpressionUUID->"4a9d0cc9-8080-4a97-bb4e-abe4c1454bd9"] }, Open ]], -Cell[28907, 922, 177, 3, 40, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], +Cell[30594, 861, 173, 2, 40, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ -Cell[29109, 929, 308, 6, 40, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], -Cell[29420, 937, 281, 5, 45, "Output",ExpressionUUID->"eb85382a-72c9-4210-9951-5dca056dceae"] +Cell[30792, 867, 304, 5, 40, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], +Cell[31099, 874, 324, 5, 45, "Output",ExpressionUUID->"57aea4a6-bc65-4356-a87e-87191c4344bf"] }, Open ]], -Cell[29716, 945, 176, 3, 40, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], +Cell[31438, 882, 172, 2, 40, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ -Cell[29917, 952, 279, 5, 40, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], -Cell[30199, 959, 276, 5, 45, "Output",ExpressionUUID->"805b68e3-0dc1-40ed-ab0d-b8b004b0fbf7"] +Cell[31635, 888, 275, 4, 40, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], +Cell[31913, 894, 319, 5, 45, "Output",ExpressionUUID->"9192359d-9019-47a5-8fca-ebb89fc07dd1"] }, Open ]], -Cell[30490, 967, 179, 3, 40, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], +Cell[32247, 902, 175, 2, 40, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ -Cell[30694, 974, 19813, 486, 1845, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], -Cell[50510, 1462, 321, 6, 45, "Output",ExpressionUUID->"583f6967-640f-4503-ac67-302dadba9f42"] +Cell[32447, 908, 19809, 485, 1845, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], +Cell[52259, 1395, 363, 5, 45, "Output",ExpressionUUID->"128bdfbc-96ec-4935-8dee-3f9e0d765ba7"] }, Open ]], Cell[CellGroupData[{ -Cell[50868, 1473, 19752, 490, 1859, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], -Cell[70623, 1965, 317, 6, 45, "Output",ExpressionUUID->"8f54d772-97eb-4307-b464-386a1b728f49"] +Cell[52659, 1405, 19748, 489, 1859, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], +Cell[72410, 1896, 357, 5, 45, "Output",ExpressionUUID->"6895118a-6285-44b7-9d83-44b0b55b1f85"] }, Open ]], Cell[CellGroupData[{ -Cell[70977, 1976, 19752, 484, 1858, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], -Cell[90732, 2462, 339, 7, 45, "Output",ExpressionUUID->"23550e8b-d4c6-4da8-8d5a-830ff5d1b49c"] +Cell[72804, 1906, 19748, 483, 1858, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], +Cell[92555, 2391, 379, 6, 109, "Output",ExpressionUUID->"b4a837c0-fa7e-40ba-8a0a-280ed492d6b6"] }, Open ]], Cell[CellGroupData[{ -Cell[91108, 2474, 22538, 554, 2037, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], -Cell[113649, 3030, 335, 7, 45, "Output",ExpressionUUID->"423c727c-a646-4144-a58e-809cb863c915"] +Cell[92971, 2402, 22534, 553, 109, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], +Cell[115508, 2957, 379, 6, 109, "Output",ExpressionUUID->"039e45fa-4397-4f75-8c75-11f3c2ec2432"] }, Open ]], Cell[CellGroupData[{ -Cell[114021, 3042, 22539, 554, 2037, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], -Cell[136563, 3598, 340, 7, 45, "Output",ExpressionUUID->"a0c385e2-8bba-4657-8b21-b3fe7b82988e"] +Cell[115924, 2968, 22535, 553, 109, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], +Cell[138462, 3523, 380, 6, 109, "Output",ExpressionUUID->"bb1e559a-2853-44ec-857c-89ddd29b9fd6"] }, Open ]], Cell[CellGroupData[{ -Cell[136940, 3610, 25495, 627, 2246, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], -Cell[162438, 4239, 334, 7, 45, "Output",ExpressionUUID->"0e26e5d1-1aa5-45fe-949a-7bced0e7f8a3"] +Cell[138879, 3534, 25491, 626, 109, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], +Cell[164373, 4162, 376, 6, 109, "Output",ExpressionUUID->"39175c2e-e2fa-4856-aecb-0193fa5c5e5f"] }, Open ]], Cell[CellGroupData[{ -Cell[162809, 4251, 134, 3, 40, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], -Cell[162946, 4256, 301, 6, 45, "Output",ExpressionUUID->"34626303-b9be-451d-9cf8-f0b2df71cec9"] +Cell[164786, 4173, 130, 2, 109, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], +Cell[164919, 4177, 341, 5, 109, "Output",ExpressionUUID->"f905f885-afb9-4a3e-828e-390ec5a5ee48"] }, Open ]], Cell[CellGroupData[{ -Cell[163284, 4267, 134, 3, 40, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], -Cell[163421, 4272, 301, 6, 45, "Output",ExpressionUUID->"b0064b53-e80b-4d29-9d13-d556198fb072"] +Cell[165297, 4187, 130, 2, 109, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], +Cell[165430, 4191, 341, 5, 109, "Output",ExpressionUUID->"0d43fd33-5338-448f-8a4b-44f2e7843ce0"] }, Open ]], Cell[CellGroupData[{ -Cell[163759, 4283, 1148, 40, 78, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], -Cell[164910, 4325, 320, 6, 45, "Output",ExpressionUUID->"0915ec79-a5ac-4fd4-a602-4bf984a7daa9"] +Cell[165808, 4201, 1144, 39, 109, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], +Cell[166955, 4242, 360, 5, 109, "Output",ExpressionUUID->"0a118a88-79d3-4fff-a5f9-6d96090405b5"] }, Open ]], Cell[CellGroupData[{ -Cell[165267, 4336, 1045, 36, 78, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], -Cell[166315, 4374, 334, 7, 45, "Output",ExpressionUUID->"60cbf343-82fa-4f2a-86d4-1783b0395be5"] +Cell[167352, 4252, 1041, 35, 109, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], +Cell[168396, 4289, 374, 6, 109, "Output",ExpressionUUID->"fca3acca-0945-45e9-addd-df50f5226d33"] }, Open ]], Cell[CellGroupData[{ -Cell[166686, 4386, 1148, 40, 78, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], -Cell[167837, 4428, 319, 6, 45, "Output",ExpressionUUID->"9a3aa6c7-62fb-4aa4-ae5c-15bd1e280f25"] +Cell[168807, 4300, 1144, 39, 109, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], +Cell[169954, 4341, 359, 5, 109, "Output",ExpressionUUID->"23b937fe-1540-4b79-85e2-86b471e5786a"] }, Open ]], Cell[CellGroupData[{ -Cell[168193, 4439, 112, 2, 40, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], -Cell[168308, 4443, 318, 6, 45, "Output",ExpressionUUID->"f3b353c4-88b0-43f8-9620-410e423f7eef"] +Cell[170350, 4351, 108, 1, 109, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], +Cell[170461, 4354, 362, 5, 109, "Output",ExpressionUUID->"2f65f2e0-0c88-43e2-802e-4819d9b52788"] }, Open ]], Cell[CellGroupData[{ -Cell[168663, 4454, 112, 2, 40, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], -Cell[168778, 4458, 312, 6, 45, "Output",ExpressionUUID->"80be49dd-d9b4-403f-9033-fe661198416a"] +Cell[170860, 4364, 108, 1, 109, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], +Cell[170971, 4367, 360, 6, 109, "Output",ExpressionUUID->"b10028b4-2fc7-40be-b84a-14452f0e89d7"] }, Open ]], Cell[CellGroupData[{ -Cell[169127, 4469, 112, 2, 40, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], -Cell[169242, 4473, 306, 6, 45, "Output",ExpressionUUID->"a47d7903-0d29-44bf-acb6-9b6eff97e33f"] +Cell[171368, 4378, 108, 1, 109, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], +Cell[171479, 4381, 352, 6, 109, "Output",ExpressionUUID->"08aedeff-1800-4698-9c1a-1dd6bbf523cc"] }, Open ]], Cell[CellGroupData[{ -Cell[169585, 4484, 112, 2, 40, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], -Cell[169700, 4488, 289, 5, 45, "Output",ExpressionUUID->"f0c78dc3-d805-46c1-9ca9-382be008a5be"] +Cell[171868, 4392, 108, 1, 109, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], +Cell[171979, 4395, 333, 5, 109, "Output",ExpressionUUID->"2e199d70-1d9b-4473-b403-e89dfe6ed439"] }, Open ]], Cell[CellGroupData[{ -Cell[170026, 4498, 111, 2, 40, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], -Cell[170140, 4502, 291, 5, 45, "Output",ExpressionUUID->"3029eb47-7bab-4d84-824d-0a7bd0e4d3f5"] +Cell[172349, 4405, 107, 1, 109, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], +Cell[172459, 4408, 335, 5, 109, "Output",ExpressionUUID->"a378496a-4f1b-4b2b-892b-547011c7a736"] }, Open ]], Cell[CellGroupData[{ -Cell[170468, 4512, 111, 2, 40, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], -Cell[170582, 4516, 296, 5, 45, "Output",ExpressionUUID->"ceebf8be-0900-4414-928b-8c4a04a0366c"] +Cell[172831, 4418, 107, 1, 109, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], +Cell[172941, 4421, 340, 5, 109, "Output",ExpressionUUID->"c7fbfa1f-cb6b-4770-8dfd-ac2e7766a61a"] }, Open ]], Cell[CellGroupData[{ -Cell[170915, 4526, 501, 17, 77, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], -Cell[171419, 4545, 307, 6, 45, "Output",ExpressionUUID->"b07b9286-d381-4dc2-8a27-14c7eed58c79"] +Cell[173318, 4431, 497, 16, 109, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], +Cell[173818, 4449, 353, 6, 109, "Output",ExpressionUUID->"8edc617b-849d-401a-895e-5d92e96d5fdd"] }, Open ]], Cell[CellGroupData[{ -Cell[171763, 4556, 501, 17, 77, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], -Cell[172267, 4575, 310, 6, 45, "Output",ExpressionUUID->"bc445076-8fae-4ece-b921-e9d1c3f70b07"] +Cell[174208, 4460, 497, 16, 109, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], +Cell[174708, 4478, 354, 6, 109, "Output",ExpressionUUID->"c74618aa-e686-424d-b8cb-a16cb440a99d"] }, Open ]], Cell[CellGroupData[{ -Cell[172614, 4586, 1792, 61, 186, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], -Cell[174409, 4649, 291, 5, 45, "Output",ExpressionUUID->"ccf89f1b-f28b-4584-b7b8-0edc0a3401bc"] +Cell[175099, 4489, 1788, 60, 109, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], +Cell[176890, 4551, 334, 5, 109, "Output",ExpressionUUID->"f1308d5c-62eb-4bc5-ac73-065f313d3256"] }, Open ]], Cell[CellGroupData[{ -Cell[174737, 4659, 1105, 37, 78, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], -Cell[175845, 4698, 312, 6, 45, "Output",ExpressionUUID->"35d56c82-c6f8-444e-8203-f5d91668e5ec"] +Cell[177261, 4561, 1101, 36, 109, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], +Cell[178365, 4599, 356, 6, 109, "Output",ExpressionUUID->"36bd2674-08eb-49c5-9ff3-e8697db14449"] }, Open ]], Cell[CellGroupData[{ -Cell[176194, 4709, 1822, 62, 155, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], -Cell[178019, 4773, 292, 5, 45, "Output",ExpressionUUID->"784942dc-4f73-427d-9fdf-670525e4f45f"] +Cell[178758, 4610, 1818, 61, 109, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], +Cell[180579, 4673, 336, 5, 109, "Output",ExpressionUUID->"45992364-671c-43aa-8cc9-5ee8acbed27b"] }, Open ]], Cell[CellGroupData[{ -Cell[178348, 4783, 1635, 54, 111, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], -Cell[179986, 4839, 291, 5, 45, "Output",ExpressionUUID->"4bacb163-bb6c-49fa-99ef-8a50240e5d6a"] +Cell[180952, 4683, 1631, 53, 109, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], +Cell[182586, 4738, 337, 5, 109, "Output",ExpressionUUID->"e1a1f4fa-3b5d-4a8e-9e25-6182f6f737b7"] }, Open ]], Cell[CellGroupData[{ -Cell[180314, 4849, 1635, 54, 111, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], -Cell[181952, 4905, 289, 5, 45, "Output",ExpressionUUID->"5af8381f-1a53-4b41-97e5-43d3a1efd56f"] +Cell[182960, 4748, 1631, 53, 109, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], +Cell[184594, 4803, 335, 5, 109, "Output",ExpressionUUID->"045dae2e-eef4-45ac-a8f1-afe632fbf649"] }, Open ]], Cell[CellGroupData[{ -Cell[182278, 4915, 208, 4, 40, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], -Cell[182489, 4921, 268, 5, 45, "Output",ExpressionUUID->"0d0a8d72-6cbf-4ca9-8187-103c65b65be9"] +Cell[184966, 4813, 204, 3, 109, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], +Cell[185173, 4818, 314, 5, 109, "Output",ExpressionUUID->"5db298da-ca9e-46e9-980c-c124f0dfd3a0"] }, Open ]], -Cell[182772, 4929, 176, 3, 40, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], +Cell[185502, 4826, 172, 2, 109, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ -Cell[182973, 4936, 208, 4, 40, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], -Cell[183184, 4942, 264, 5, 45, "Output",ExpressionUUID->"899d4388-5b66-465c-913b-006fd7895eed"] +Cell[185699, 4832, 204, 3, 109, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], +Cell[185906, 4837, 310, 5, 109, "Output",ExpressionUUID->"47789286-d0df-4986-8893-9784488ed99f"] }, Open ]], -Cell[183463, 4950, 177, 3, 40, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], +Cell[186231, 4845, 173, 2, 109, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ -Cell[183665, 4957, 1301, 43, 67, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], -Cell[184969, 5002, 297, 5, 45, "Output",ExpressionUUID->"e2e96540-ebb2-46ee-bdd8-0564f4811472"] +Cell[186429, 4851, 1297, 42, 109, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], +Cell[187729, 4895, 345, 5, 109, "Output",ExpressionUUID->"1b0b4ac5-409c-419c-982c-d282e45c0ddb"] }, Open ]], Cell[CellGroupData[{ -Cell[185303, 5012, 931, 31, 78, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], -Cell[186237, 5045, 299, 5, 45, "Output",ExpressionUUID->"b2051f55-61c0-4492-a95d-307222f7dc5e"] +Cell[188111, 4905, 927, 30, 109, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], +Cell[189041, 4937, 342, 5, 109, "Output",ExpressionUUID->"f18c2e9d-30ea-4122-90ac-45c73eef9c95"] }, Open ]], Cell[CellGroupData[{ -Cell[186573, 5055, 907, 30, 78, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], -Cell[187483, 5087, 295, 5, 45, "Output",ExpressionUUID->"ecb528e0-41d9-435b-9fa5-4988320ff6de"] +Cell[189420, 4947, 903, 29, 109, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], +Cell[190326, 4978, 339, 5, 109, "Output",ExpressionUUID->"5547d472-84fc-49e8-b962-bc6961976e53"] }, Open ]], Cell[CellGroupData[{ -Cell[187815, 5097, 558, 19, 72, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], -Cell[188376, 5118, 686, 11, 45, "Output",ExpressionUUID->"fb994914-d0f7-4d08-ae0a-8f202062ede3"] +Cell[190702, 4988, 554, 18, 109, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], +Cell[191259, 5008, 726, 10, 109, "Output",ExpressionUUID->"d2da8486-d19f-434f-982d-4234670698c9"] }, Open ]], Cell[CellGroupData[{ -Cell[189099, 5134, 665, 22, 72, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], -Cell[189767, 5158, 669, 10, 45, "Output",ExpressionUUID->"3981cd16-8d87-4741-87d3-9dcb0dd6d891"] +Cell[192022, 5023, 661, 21, 109, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], +Cell[192686, 5046, 717, 10, 109, "Output",ExpressionUUID->"0c13aee3-1d4a-4683-bc39-6fda7af640cf"] }, Open ]], Cell[CellGroupData[{ -Cell[190473, 5173, 170, 5, 77, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], -Cell[190646, 5180, 701, 11, 45, "Output",ExpressionUUID->"d883b5d1-6205-4365-ac79-56c10834a948"] +Cell[193440, 5061, 166, 4, 109, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], +Cell[193609, 5067, 743, 10, 109, "Output",ExpressionUUID->"c0a36584-dce5-4c84-9159-3683e5271bde"] }, Open ]], Cell[CellGroupData[{ -Cell[191384, 5196, 236, 6, 76, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], -Cell[191623, 5204, 635, 10, 45, "Output",ExpressionUUID->"47f8cfe3-1756-44ab-946f-fe20a05ff862"] +Cell[194389, 5082, 232, 5, 109, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], +Cell[194624, 5089, 681, 10, 109, "Output",ExpressionUUID->"dca48f31-2c2f-45fe-a782-042eda683938"] }, Open ]], Cell[CellGroupData[{ -Cell[192295, 5219, 223, 6, 60, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], -Cell[192521, 5227, 670, 10, 45, "Output",ExpressionUUID->"d3459512-4875-4873-8e60-ded20134eea3"] +Cell[195342, 5104, 219, 5, 109, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], +Cell[195564, 5111, 716, 10, 109, "Output",ExpressionUUID->"67907090-2efe-44d6-a300-3826d4c7f38b"] }, Open ]], Cell[CellGroupData[{ -Cell[193228, 5242, 181, 5, 60, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], -Cell[193412, 5249, 687, 11, 45, "Output",ExpressionUUID->"9da34343-33f6-4881-86e9-8ffa6701b6e9"] +Cell[196317, 5126, 177, 4, 109, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], +Cell[196497, 5132, 727, 10, 109, "Output",ExpressionUUID->"bf46e37f-7b24-431c-a166-b8cd84b929c5"] }, Open ]], Cell[CellGroupData[{ -Cell[194136, 5265, 6055, 185, 464, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], -Cell[200194, 5452, 665, 10, 45, "Output",ExpressionUUID->"565968c7-f2a6-4154-b824-8ecc95d43d9f"] +Cell[197261, 5147, 6051, 184, 109, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], +Cell[203315, 5333, 708, 10, 109, "Output",ExpressionUUID->"457dc5ed-7939-4784-9a45-249bd4c8beb9"] }, Open ]], Cell[CellGroupData[{ -Cell[200896, 5467, 368, 9, 58, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], -Cell[201267, 5478, 641, 10, 45, "Output",ExpressionUUID->"aeba6651-6b92-4513-85ef-72cbb67fe247"] +Cell[204060, 5348, 364, 8, 109, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], +Cell[204427, 5358, 689, 10, 109, "Output",ExpressionUUID->"a3cc0cb0-aaa1-4714-acb2-1cd10a52063c"] }, Open ]], -Cell[201923, 5491, 492, 10, 40, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], +Cell[205131, 5371, 488, 9, 109, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ -Cell[202440, 5505, 558, 19, 72, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], -Cell[203001, 5526, 290, 5, 45, "Output",ExpressionUUID->"7050747a-54ce-41f3-8bfa-829a38589ab0"] +Cell[205644, 5384, 554, 18, 109, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], +Cell[206201, 5404, 338, 5, 109, "Output",ExpressionUUID->"fc0875b2-6ba4-4a71-9e55-522868264d21"] }, Open ]], Cell[CellGroupData[{ -Cell[203328, 5536, 623, 21, 72, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], -Cell[203954, 5559, 290, 5, 45, "Output",ExpressionUUID->"05783674-5c91-4039-b868-9761478c9935"] +Cell[206576, 5414, 619, 20, 109, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], +Cell[207198, 5436, 336, 5, 109, "Output",ExpressionUUID->"4e8ee53a-675d-49bb-9615-bf08106d8fc1"] }, Open ]], Cell[CellGroupData[{ -Cell[204281, 5569, 170, 5, 77, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], -Cell[204454, 5576, 290, 5, 45, "Output",ExpressionUUID->"c38b805d-cf94-48f5-ad87-4615a30ec5f1"] +Cell[207571, 5446, 166, 4, 109, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], +Cell[207740, 5452, 334, 5, 109, "Output",ExpressionUUID->"ba1c32fc-4b67-4882-a7d0-4dc48a57e793"] }, Open ]], Cell[CellGroupData[{ -Cell[204781, 5586, 170, 5, 76, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], -Cell[204954, 5593, 292, 5, 45, "Output",ExpressionUUID->"0a252b6c-4502-4fde-a0d4-0a974b9c8a2c"] +Cell[208111, 5462, 166, 4, 109, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], +Cell[208280, 5468, 338, 5, 109, "Output",ExpressionUUID->"d019dbb1-46cd-4121-baf6-d749ef5f2ec9"] }, Open ]], Cell[CellGroupData[{ -Cell[205283, 5603, 181, 5, 60, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], -Cell[205467, 5610, 294, 5, 45, "Output",ExpressionUUID->"2fa5e23b-ee03-4ec1-95ea-00097e00f2e1"] +Cell[208655, 5478, 177, 4, 109, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], +Cell[208835, 5484, 339, 5, 109, "Output",ExpressionUUID->"33a10739-34a3-4a48-beba-25950cb9389a"] }, Open ]], Cell[CellGroupData[{ -Cell[205798, 5620, 181, 5, 60, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], -Cell[205982, 5627, 293, 5, 45, "Output",ExpressionUUID->"ef91c62f-36c8-4700-ae81-a69344d90fdd"] +Cell[209211, 5494, 177, 4, 109, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], +Cell[209391, 5500, 337, 5, 109, "Output",ExpressionUUID->"2bfdc40a-a752-49b2-b383-14198955e2ac"] }, Open ]], Cell[CellGroupData[{ -Cell[206312, 5637, 6055, 185, 464, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], -Cell[212370, 5824, 301, 5, 45, "Output",ExpressionUUID->"f3eb6687-2274-41a7-9df2-f310f556d96c"] +Cell[209765, 5510, 6051, 184, 109, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], +Cell[215819, 5696, 346, 5, 109, "Output",ExpressionUUID->"a1309c7d-f344-4f56-a5b5-c76abb796588"] }, Open ]], Cell[CellGroupData[{ -Cell[212708, 5834, 410, 10, 80, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], -Cell[213121, 5846, 339, 6, 67, "Output",ExpressionUUID->"30edd760-76a8-49bf-9ae2-da9ec7cb0149"] +Cell[216202, 5706, 406, 9, 109, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], +Cell[216611, 5717, 385, 6, 109, "Output",ExpressionUUID->"cbdd8071-2eff-4855-9c13-a271be55feec"] }, Open ]], Cell[CellGroupData[{ -Cell[213497, 5857, 6122, 187, 464, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], -Cell[219622, 6046, 293, 5, 45, "Output",ExpressionUUID->"e1607385-ce10-4cf7-9d7f-17a025004bc8"] +Cell[217033, 5728, 6118, 186, 109, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], +Cell[223154, 5916, 341, 5, 109, "Output",ExpressionUUID->"645c137a-763d-473f-935e-c5f54b4b3475"] }, Open ]], Cell[CellGroupData[{ -Cell[219952, 6056, 387, 10, 58, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], -Cell[220342, 6068, 311, 6, 45, "Output",ExpressionUUID->"e22961d9-7314-42ad-95cb-daa7b394c85a"] +Cell[223532, 5926, 383, 9, 109, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], +Cell[223918, 5937, 355, 6, 109, "Output",ExpressionUUID->"779e2a07-40eb-420e-a355-513bc4dd86de"] }, Open ]], Cell[CellGroupData[{ -Cell[220690, 6079, 2663, 88, 231, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], -Cell[223356, 6169, 295, 5, 45, "Output",ExpressionUUID->"a26ce8ac-2269-4591-951c-a89d328f71df"] +Cell[224310, 5948, 2659, 87, 109, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], +Cell[226972, 6037, 341, 5, 109, "Output",ExpressionUUID->"4cdfa488-e903-403c-9fe8-40c503b10585"] }, Open ]], Cell[CellGroupData[{ -Cell[223688, 6179, 2603, 85, 231, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], -Cell[226294, 6266, 291, 5, 45, "Output",ExpressionUUID->"3d9834dd-54fa-4d19-9791-ed7bda3baa31"] +Cell[227350, 6047, 2599, 84, 109, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], +Cell[229952, 6133, 336, 5, 109, "Output",ExpressionUUID->"dcb82c1f-1e2b-4677-a746-2b707ac0072e"] }, Open ]], Cell[CellGroupData[{ -Cell[226622, 6276, 3712, 118, 340, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], -Cell[230337, 6396, 297, 5, 45, "Output",ExpressionUUID->"3ffcdb40-2814-4b1f-bc5b-690a5a109f96"] +Cell[230325, 6143, 3708, 117, 109, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], +Cell[234036, 6262, 343, 5, 109, "Output",ExpressionUUID->"292773b1-8e2a-445f-a06a-59cd3924dfeb"] }, Open ]], -Cell[230649, 6404, 164, 4, 40, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], +Cell[234394, 6270, 164, 4, 109, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ -Cell[230838, 6412, 2075, 59, 127, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], -Cell[232916, 6473, 741, 16, 54, "Message",ExpressionUUID->"fa96e4e0-1824-4022-95b6-5d237e5dc412"], -Cell[233660, 6491, 739, 16, 54, "Message",ExpressionUUID->"ce87c19d-47ac-4429-8951-17671976d0d8"], -Cell[234402, 6509, 739, 16, 54, "Message",ExpressionUUID->"a759d243-bcc4-47cf-b2cd-c3627b191112"], -Cell[235144, 6527, 592, 13, 35, "Message",ExpressionUUID->"563b86f9-b72e-48af-a340-5efcc20f64ea"], -Cell[235739, 6542, 292, 5, 45, "Output",ExpressionUUID->"20383c24-ed62-4bf7-b689-7c4d58e0a3a9"] +Cell[234583, 6278, 2101, 60, 109, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], +Cell[236687, 6340, 798, 17, 109, "Message",ExpressionUUID->"980bb0b7-408f-4eae-9d77-e8cf861c066c"], +Cell[237488, 6359, 796, 17, 109, "Message",ExpressionUUID->"a7c4c920-d9da-49a8-9e07-d4151e7231ce"], +Cell[238287, 6378, 796, 17, 109, "Message",ExpressionUUID->"23c439e5-48fc-4612-b38e-15ac4c6048a3"], +Cell[239086, 6397, 641, 14, 109, "Message",ExpressionUUID->"a3b820a7-5477-40b5-98ec-fd843f1b7006"], +Cell[239730, 6413, 340, 6, 109, "Output",ExpressionUUID->"cd17796e-b32d-4db1-a0e6-2e37e29ae21b"] }, Open ]], Cell[CellGroupData[{ -Cell[236068, 6552, 2077, 59, 127, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], -Cell[238148, 6613, 695, 15, 54, "Message",ExpressionUUID->"816f1531-6ee6-4a82-9505-bb8aef05e747"], -Cell[238846, 6630, 693, 15, 54, "Message",ExpressionUUID->"0ca1d9d3-d84a-4c28-a629-150c9788c0af"], -Cell[239542, 6647, 693, 15, 54, "Message",ExpressionUUID->"e7d6c14b-d5c2-4db6-95f0-047bf5c02b49"], -Cell[240238, 6664, 548, 12, 35, "Message",ExpressionUUID->"42a43128-060c-42b8-aa62-06747df7c5b7"], -Cell[240789, 6678, 238, 4, 45, "Output",ExpressionUUID->"b6842594-c56a-4a5b-b298-6eeb8591f167"] +Cell[240107, 6424, 2103, 60, 109, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], +Cell[242213, 6486, 751, 16, 109, "Message",ExpressionUUID->"6b02ee7b-2498-4746-9ef5-e77e325e1ea8"], +Cell[242967, 6504, 749, 16, 109, "Message",ExpressionUUID->"b2baaa5b-f86a-42f0-b2d8-e995de6a05d8"], +Cell[243719, 6522, 749, 16, 109, "Message",ExpressionUUID->"ccba9853-3354-41af-bf12-11447cff7401"], +Cell[244471, 6540, 594, 13, 109, "Message",ExpressionUUID->"30807e21-ddfa-4635-8488-651563beadab"], +Cell[245068, 6555, 285, 5, 109, "Output",ExpressionUUID->"e84192b9-7c2d-44bc-8abb-ec37988c3280"] }, Open ]], Cell[CellGroupData[{ -Cell[241064, 6687, 1961, 53, 94, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[243028, 6742, 213, 4, 109, "Output",ExpressionUUID->"7554495c-e131-4bab-93bd-e74ae9ef4b47"] +Cell[245390, 6565, 2053, 55, 109, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], +Cell[247446, 6622, 20457, 382, 109, "Output",ExpressionUUID->"797c9f23-37bb-46fc-9e89-325c4cb5d934"] }, Open ]], Cell[CellGroupData[{ -Cell[243278, 6751, 2094, 60, 109, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], -Cell[245375, 6813, 497, 11, 109, "Message",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], -Cell[245875, 6826, 501, 11, 109, "Message",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], -Cell[246379, 6839, 503, 11, 54, "Message",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], -Cell[246885, 6852, 455, 10, 35, "Message",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], -Cell[247343, 6864, 43631, 762, 319, "Output",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] +Cell[267940, 7009, 2117, 60, 109, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], +Cell[270060, 7071, 562, 13, 109, "Message",ExpressionUUID->"0df1da07-9053-425e-9cae-fef492c8fff7"], +Cell[270625, 7086, 565, 13, 109, "Message",ExpressionUUID->"faed9633-37bb-45b9-9a0b-116474c85e6b"], +Cell[271193, 7101, 569, 13, 109, "Message",ExpressionUUID->"39cc0360-bfd3-4300-9ddd-74f7b50c1d74"], +Cell[271765, 7116, 520, 12, 109, "Message",ExpressionUUID->"a3b5a3a1-4036-4c2f-a10c-9a77c8c65cc9"], +Cell[272288, 7130, 21815, 406, 319, "Output",ExpressionUUID->"1e466f42-acc5-4dae-ac56-e6650757a102"] }, Open ]], -Cell[290989, 7629, 2455, 69, 153, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], -Cell[293447, 7700, 209, 5, 40, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], Cell[CellGroupData[{ -Cell[293681, 7709, 212, 6, 66, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[293896, 7717, 168, 2, 45, "Output",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[294140, 7541, 2481, 70, 153, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], +Cell[296624, 7613, 9520, 223, 328, "Output",ExpressionUUID->"091a07e9-856e-4152-aa01-f3e347f65a37"] }, Open ]], Cell[CellGroupData[{ -Cell[294101, 7724, 1814, 53, 127, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], -Cell[295918, 7779, 505, 11, 54, "Message",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], -Cell[296426, 7792, 509, 11, 109, "Message",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], -Cell[296938, 7805, 508, 11, 109, "Message",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], -Cell[297449, 7818, 455, 10, 109, "Message",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], -Cell[297907, 7830, 22399, 414, 109, "Output",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] +Cell[306181, 7841, 232, 5, 40, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], +Cell[306416, 7848, 28172, 537, 319, "Output",ExpressionUUID->"301a136c-4b1e-4145-a15d-69baa19b79b0"] }, Open ]], Cell[CellGroupData[{ -Cell[320343, 8249, 1612, 47, 109, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], -Cell[321958, 8298, 581, 12, 109, "Message",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], -Cell[322542, 8312, 584, 12, 109, "Message",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], -Cell[323129, 8326, 590, 12, 109, "Message",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], -Cell[323722, 8340, 455, 10, 109, "Message",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], -Cell[324180, 8352, 169, 2, 109, "Output",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[334625, 8390, 237, 7, 66, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], +Cell[334865, 8399, 221, 4, 45, "Output",ExpressionUUID->"48bcffd1-69e5-4aff-bad7-30caa8bcbcf5"] }, Open ]], Cell[CellGroupData[{ -Cell[324386, 8359, 2249, 64, 156, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], -Cell[326638, 8425, 557, 12, 79, "Message",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], -Cell[327198, 8439, 560, 12, 79, "Message",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], -Cell[327761, 8453, 560, 12, 79, "Message",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], -Cell[328324, 8467, 455, 10, 35, "Message",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], -Cell[328782, 8479, 169, 2, 45, "Output",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[335123, 8408, 1837, 53, 127, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], +Cell[336963, 8463, 575, 13, 54, "Message",ExpressionUUID->"a6516d2b-1c5c-4903-8ae0-72446eb2ad2e"], +Cell[337541, 8478, 573, 13, 54, "Message",ExpressionUUID->"73ce3702-6419-4abe-a9d8-b9b24b5f8c8d"], +Cell[338117, 8493, 577, 13, 54, "Message",ExpressionUUID->"1b4451ee-a737-45e8-b074-05ca2fa145a6"], +Cell[338697, 8508, 520, 12, 35, "Message",ExpressionUUID->"9e8bb89d-d60e-4678-97b2-5409f8e344c9"], +Cell[339220, 8522, 21924, 409, 319, "Output",ExpressionUUID->"edac8afe-f975-4e93-8090-715f8abedc5a"] }, Open ]], Cell[CellGroupData[{ -Cell[328988, 8486, 2221, 64, 122, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], -Cell[331212, 8552, 554, 12, 79, "Message",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], -Cell[331769, 8566, 560, 12, 79, "Message",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], -Cell[332332, 8580, 560, 12, 79, "Message",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], -Cell[332895, 8594, 455, 10, 35, "Message",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], -Cell[333353, 8606, 169, 2, 45, "Output",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[361181, 8936, 1616, 48, 94, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], +Cell[362800, 8986, 674, 15, 54, "Message",ExpressionUUID->"52769f81-b1ca-44a6-a3dd-dece251482d2"], +Cell[363477, 9003, 675, 15, 54, "Message",ExpressionUUID->"6fe40b08-86c3-48ab-862e-4c1eb9afa3b8"], +Cell[364155, 9020, 672, 15, 54, "Message",ExpressionUUID->"1d26e763-e309-4625-87d1-d3b1076f2cd5"], +Cell[364830, 9037, 518, 12, 35, "Message",ExpressionUUID->"89e2ed0b-b0ec-4893-852c-d065994d8502"], +Cell[365351, 9051, 222, 4, 45, "Output",ExpressionUUID->"7781adda-7cef-49ad-a21d-f9da3664bc74"] }, Open ]], Cell[CellGroupData[{ -Cell[333559, 8613, 2223, 64, 122, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], -Cell[335785, 8679, 555, 12, 109, "Message",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], -Cell[336343, 8693, 558, 12, 109, "Message",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], -Cell[336904, 8707, 560, 12, 109, "Message",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], -Cell[337467, 8721, 453, 10, 35, "Message",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], -Cell[337923, 8733, 167, 2, 45, "Output",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[365610, 9060, 2272, 64, 156, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], +Cell[367885, 9126, 677, 15, 54, "Message",ExpressionUUID->"a13dc37d-5dee-4bd9-a3bc-05f421d0a4de"], +Cell[368565, 9143, 675, 15, 54, "Message",ExpressionUUID->"810df756-7bad-4aa2-aaac-2312260d4bab"], +Cell[369243, 9160, 677, 15, 54, "Message",ExpressionUUID->"0f0c1e67-1d7a-40aa-8cf1-db49e9ee2da4"], +Cell[369923, 9177, 520, 12, 29, "Message",ExpressionUUID->"e405328c-ccd1-4067-876b-979d1ffcc33d"], +Cell[370446, 9191, 222, 4, 45, "Output",ExpressionUUID->"338bf943-9056-46db-9d7b-6f732c0bb72b"] }, Open ]], Cell[CellGroupData[{ -Cell[338127, 8740, 213, 6, 65, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[338343, 8748, 169, 2, 45, "Output",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[370705, 9200, 2233, 63, 122, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], +Cell[372941, 9265, 674, 15, 54, "Message",ExpressionUUID->"01807a2f-5ee5-4f82-9c4f-00f6666f00b9"], +Cell[373618, 9282, 674, 15, 54, "Message",ExpressionUUID->"893e0137-0dae-414a-8d35-08da9b730df4"], +Cell[374295, 9299, 676, 15, 54, "Message",ExpressionUUID->"b6cbf566-a11e-459d-8538-3038d1e8977d"], +Cell[374974, 9316, 519, 12, 29, "Message",ExpressionUUID->"6fac02b6-7273-47d4-81eb-a9fdd44c8bc7"], +Cell[375496, 9330, 222, 4, 45, "Output",ExpressionUUID->"1525b00d-654d-4482-902e-e230fed137f1"] }, Open ]], -Cell[338527, 8753, 247, 5, 40, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[338799, 8762, 554, 18, 72, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[339356, 8782, 167, 2, 45, "Output",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[375755, 9339, 2235, 63, 122, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], +Cell[377993, 9404, 672, 15, 54, "Message",ExpressionUUID->"5c75bb3e-a234-4cd0-a579-4508fbc39066"], +Cell[378668, 9421, 675, 15, 54, "Message",ExpressionUUID->"d668ddd3-769f-4982-8264-f37a3882918e"], +Cell[379346, 9438, 673, 15, 54, "Message",ExpressionUUID->"e661b6cc-b43b-474f-ad6b-61eed00bb7bb"], +Cell[380022, 9455, 518, 12, 29, "Message",ExpressionUUID->"aa5ba7a8-6d59-4dfe-a444-e57b0abf6c9b"], +Cell[380543, 9469, 217, 4, 45, "Output",ExpressionUUID->"60ca8ffb-c960-40cf-ac78-a6d45e93d617"] }, Open ]], Cell[CellGroupData[{ -Cell[339560, 8789, 166, 4, 77, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[339729, 8795, 169, 2, 45, "Output",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[380797, 9478, 236, 6, 65, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], +Cell[381036, 9486, 218, 4, 45, "Output",ExpressionUUID->"77be9f0a-aede-423d-988b-588cea5e903b"] }, Open ]], +Cell[381269, 9493, 273, 6, 40, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[339935, 8802, 181, 5, 60, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[340119, 8809, 173, 3, 45, "Output",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] +Cell[381567, 9503, 558, 19, 72, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], +Cell[382128, 9524, 222, 4, 45, "Output",ExpressionUUID->"4cf5a937-3891-44fe-8f97-4a63b8b759a1"] }, Open ]], Cell[CellGroupData[{ -Cell[340329, 8817, 6055, 185, 464, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[346387, 9004, 172, 3, 45, "Output",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] +Cell[382387, 9533, 170, 5, 77, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], +Cell[382560, 9540, 221, 4, 45, "Output",ExpressionUUID->"43b20dd4-c7e8-479f-b16b-a7762c91c3d1"] }, Open ]], Cell[CellGroupData[{ -Cell[346596, 9012, 368, 9, 58, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[346967, 9023, 170, 3, 45, "Output",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] +Cell[382818, 9549, 181, 5, 60, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], +Cell[383002, 9556, 220, 4, 45, "Output",ExpressionUUID->"90f6b9ca-89b9-48a1-b399-e41845bfbc78"] }, Open ]], Cell[CellGroupData[{ -Cell[347174, 9031, 6122, 187, 464, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[353299, 9220, 175, 3, 45, "Output",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] +Cell[383259, 9565, 6055, 185, 464, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], +Cell[389317, 9752, 220, 4, 45, "Output",ExpressionUUID->"78e5c412-c2d3-4d69-8050-8ced188e75a2"] }, Open ]], Cell[CellGroupData[{ -Cell[353511, 9228, 368, 9, 58, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[353882, 9239, 169, 3, 45, "Output",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] +Cell[389574, 9761, 368, 9, 58, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], +Cell[389945, 9772, 220, 4, 45, "Output",ExpressionUUID->"28dc22e0-85ad-43a0-9df1-a78affd82074"] }, Open ]], Cell[CellGroupData[{ -Cell[354088, 9247, 2663, 88, 231, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[356754, 9337, 173, 3, 45, "Output",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] +Cell[390202, 9781, 6122, 187, 464, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], +Cell[396327, 9970, 220, 4, 45, "Output",ExpressionUUID->"c6f0d9b6-6ad9-4c81-baa6-b32517de9cca"] }, Open ]], Cell[CellGroupData[{ -Cell[356964, 9345, 2603, 85, 231, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[359570, 9432, 171, 3, 45, "Output",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] +Cell[396584, 9979, 368, 9, 58, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], +Cell[396955, 9990, 217, 4, 45, "Output",ExpressionUUID->"63e26554-c335-4b94-bbc0-c90d6b1ae27a"] }, Open ]], Cell[CellGroupData[{ -Cell[359778, 9440, 3712, 118, 340, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[363493, 9560, 171, 3, 45, "Output",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] +Cell[397209, 9999, 2663, 88, 231, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], +Cell[399875, 10089, 221, 4, 45, "Output",ExpressionUUID->"596c5739-6c7c-4b71-8e1b-64fafcc99600"] }, Open ]], Cell[CellGroupData[{ -Cell[363701, 9568, 2052, 59, 127, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], -Cell[365756, 9629, 572, 12, 79, "Message",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], -Cell[366331, 9643, 573, 12, 79, "Message",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], -Cell[366907, 9657, 578, 12, 79, "Message",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], -Cell[367488, 9671, 457, 10, 35, "Message",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], -Cell[367948, 9683, 172, 3, 45, "Output",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] +Cell[400133, 10098, 2603, 85, 231, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], +Cell[402739, 10185, 217, 4, 45, "Output",ExpressionUUID->"90221126-83d0-4819-a914-c48de3d281d3"] }, Open ]], Cell[CellGroupData[{ -Cell[368157, 9691, 2054, 59, 127, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], -Cell[370214, 9752, 572, 12, 79, "Message",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], -Cell[370789, 9766, 575, 12, 79, "Message",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], -Cell[371367, 9780, 576, 12, 79, "Message",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], -Cell[371946, 9794, 457, 10, 35, "Message",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], -Cell[372406, 9806, 170, 3, 45, "Output",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] +Cell[402993, 10194, 3712, 118, 340, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], +Cell[406708, 10314, 221, 4, 45, "Output",ExpressionUUID->"1abb11f8-d92b-43f8-8234-448c068f97bb"] }, Open ]], Cell[CellGroupData[{ -Cell[372613, 9814, 2030, 55, 69, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], -Cell[374646, 9871, 20377, 384, 109, "Output",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] +Cell[406966, 10323, 2101, 60, 87, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], +Cell[409070, 10385, 679, 15, 54, "Message",ExpressionUUID->"5a84994c-b0d5-4297-8b65-4324071fe773"], +Cell[409752, 10402, 677, 15, 54, "Message",ExpressionUUID->"c12a3014-a478-4beb-b95d-6f8ca46a1b30"], +Cell[410432, 10419, 678, 15, 54, "Message",ExpressionUUID->"3aa6e46e-f262-46d1-8380-99bd7982cd95"], +Cell[411113, 10436, 522, 12, 29, "Message",ExpressionUUID->"cd0469ed-add5-4bd7-90e2-5888ced6c948"], +Cell[411638, 10450, 219, 4, 45, "Output",ExpressionUUID->"c7ec3d3f-15db-4e8f-b799-d0c7558bdec9"] }, Open ]], Cell[CellGroupData[{ -Cell[395060, 10260, 2118, 60, 109, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], -Cell[397181, 10322, 499, 11, 109, "Message",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], -Cell[397683, 10335, 504, 11, 109, "Message",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], -Cell[398190, 10348, 507, 11, 54, "Message",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], -Cell[398700, 10361, 455, 10, 35, "Message",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], -Cell[399158, 10373, 22381, 415, 322, "Output",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] +Cell[411894, 10459, 2103, 60, 87, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], +Cell[414000, 10521, 676, 15, 54, "Message",ExpressionUUID->"23f079f0-cbad-4eb6-8d66-92dfb2edbb31"], +Cell[414679, 10538, 675, 15, 54, "Message",ExpressionUUID->"847f54bd-f36d-4fed-937d-45e525fe2626"], +Cell[415357, 10555, 676, 15, 54, "Message",ExpressionUUID->"24722b7f-2dfb-4375-a5ed-cc455a756ddf"], +Cell[416036, 10572, 520, 12, 29, "Message",ExpressionUUID->"96f7a3b7-1c52-4db7-b3f7-8571ed06306f"], +Cell[416559, 10586, 219, 4, 45, "Output",ExpressionUUID->"cc03d014-e7aa-4e94-9de4-b0e1d13428ff"] }, Open ]], -Cell[421554, 10791, 174, 3, 40, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], -Cell[421731, 10796, 209, 5, 40, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], Cell[CellGroupData[{ -Cell[421965, 10805, 1616, 48, 94, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], -Cell[423584, 10855, 594, 12, 79, "Message",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], -Cell[424181, 10869, 594, 12, 79, "Message",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], -Cell[424778, 10883, 598, 12, 113, "Message",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], -Cell[425379, 10897, 457, 10, 109, "Message",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], -Cell[425839, 10909, 171, 3, 109, "Output",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] +Cell[416815, 10595, 2053, 55, 69, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], +Cell[418871, 10652, 20542, 386, 325, "Output",ExpressionUUID->"933e6561-35e1-465c-b705-37d1d6886a52"] }, Open ]], Cell[CellGroupData[{ -Cell[426047, 10917, 2247, 64, 109, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], -Cell[428297, 10983, 572, 12, 109, "Message",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], -Cell[428872, 10997, 573, 12, 79, "Message",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], -Cell[429448, 11011, 578, 12, 79, "Message",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], -Cell[430029, 11025, 455, 10, 35, "Message",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], -Cell[430487, 11037, 172, 3, 45, "Output",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] +Cell[439450, 11043, 2141, 60, 127, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], +Cell[441594, 11105, 534, 12, 54, "Message",ExpressionUUID->"90258b71-de7b-41e4-9a7d-2740a3671178"], +Cell[442131, 11119, 537, 12, 54, "Message",ExpressionUUID->"152755aa-6964-4c1d-82a9-d0ceeb05a22d"], +Cell[442671, 11133, 541, 12, 54, "Message",ExpressionUUID->"730cbfef-4f65-48a9-9fa1-c9334b32ebac"], +Cell[443215, 11147, 495, 11, 29, "Message",ExpressionUUID->"d756f105-7ac8-4ce7-b68a-157527cc86b8"], +Cell[443713, 11160, 22407, 414, 323, "Output",ExpressionUUID->"8ce7a142-09a0-415c-b80d-960659aeedc6"] }, Open ]], +Cell[466135, 11577, 200, 4, 40, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], Cell[CellGroupData[{ -Cell[430696, 11045, 2221, 64, 122, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], -Cell[432920, 11111, 570, 12, 79, "Message",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], -Cell[433493, 11125, 573, 12, 79, "Message",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], -Cell[434069, 11139, 578, 12, 79, "Message",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], -Cell[434650, 11153, 455, 10, 35, "Message",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], -Cell[435108, 11165, 172, 3, 45, "Output",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] +Cell[466360, 11585, 232, 5, 40, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], +Cell[466595, 11592, 28768, 546, 323, "Output",ExpressionUUID->"c1cf7cd9-ef70-4d85-bcf3-7caeff573c2e"] }, Open ]], Cell[CellGroupData[{ -Cell[435317, 11173, 2221, 64, 122, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], -Cell[437541, 11239, 572, 12, 79, "Message",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], -Cell[438116, 11253, 575, 12, 79, "Message",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], -Cell[438694, 11267, 578, 12, 79, "Message",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], -Cell[439275, 11281, 455, 10, 35, "Message",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], -Cell[439733, 11293, 173, 3, 45, "Output",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] +Cell[495400, 12143, 1616, 48, 94, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], +Cell[497019, 12193, 651, 14, 54, "Message",ExpressionUUID->"45ed315b-1eb9-4110-bea8-35682ef4b515"], +Cell[497673, 12209, 652, 14, 54, "Message",ExpressionUUID->"20af9f3f-7f77-4514-a54e-d309666e1b94"], +Cell[498328, 12225, 653, 14, 54, "Message",ExpressionUUID->"ad2f0359-45b2-46e9-962c-6fd7eaae1e75"], +Cell[498984, 12241, 495, 11, 29, "Message",ExpressionUUID->"ba26ca9f-ef29-4d5e-9678-d16417920e0a"], +Cell[499482, 12254, 192, 3, 45, "Output",ExpressionUUID->"879b4173-8483-463a-b083-4d113aba1768"] }, Open ]], Cell[CellGroupData[{ -Cell[439943, 11301, 213, 6, 65, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], -Cell[440159, 11309, 172, 3, 45, "Output",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] +Cell[499711, 12262, 2270, 64, 156, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], +Cell[501984, 12328, 652, 14, 54, "Message",ExpressionUUID->"237b5238-a8d6-4184-aa18-6d3e7da1ece0"], +Cell[502639, 12344, 652, 14, 54, "Message",ExpressionUUID->"f02306f8-6080-4590-87e1-7bfcb58ac2c6"], +Cell[503294, 12360, 651, 14, 54, "Message",ExpressionUUID->"099e6d61-d049-4f7c-8412-0abf3a3af28f"], +Cell[503948, 12376, 494, 11, 29, "Message",ExpressionUUID->"1dc47cda-9a19-4f17-b476-44c9664fb06a"], +Cell[504445, 12389, 196, 3, 45, "Output",ExpressionUUID->"2446460e-fd50-493a-b685-b68d0dc2810c"] }, Open ]], -Cell[440346, 11315, 245, 5, 40, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[440616, 11324, 558, 19, 72, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[441177, 11345, 173, 3, 45, "Output",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] +Cell[504678, 12397, 2233, 63, 122, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], +Cell[506914, 12462, 652, 14, 54, "Message",ExpressionUUID->"b280816e-ab7d-405b-93fe-71776d4850fc"], +Cell[507569, 12478, 648, 14, 54, "Message",ExpressionUUID->"4f5443e5-c02a-4ed4-8a4b-50c03309ed83"], +Cell[508220, 12494, 649, 14, 54, "Message",ExpressionUUID->"71def9c7-a10f-4e16-9c72-062633ea82cc"], +Cell[508872, 12510, 495, 11, 29, "Message",ExpressionUUID->"6b4966cf-c57c-4f65-9bb2-892756cb3529"], +Cell[509370, 12523, 194, 3, 45, "Output",ExpressionUUID->"90d7d467-ec43-4e60-8c0d-17ffee1c8a3e"] }, Open ]], Cell[CellGroupData[{ -Cell[441387, 11353, 170, 5, 77, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[441560, 11360, 171, 3, 45, "Output",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] +Cell[509601, 12531, 2233, 63, 122, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], +Cell[511837, 12596, 654, 14, 54, "Message",ExpressionUUID->"c8dff39d-f386-4d8d-8169-601eb4250656"], +Cell[512494, 12612, 650, 14, 54, "Message",ExpressionUUID->"f3cec021-ae00-47b3-9455-d90c737d6a0b"], +Cell[513147, 12628, 650, 14, 54, "Message",ExpressionUUID->"c650512b-f3ca-40f9-b07c-cd6810e74f8f"], +Cell[513800, 12644, 497, 11, 29, "Message",ExpressionUUID->"82c1df0b-e5b8-4052-bc2f-6a9f54a78eea"], +Cell[514300, 12657, 194, 3, 45, "Output",ExpressionUUID->"f7670872-1846-4154-b680-a148f1522e1f"] }, Open ]], Cell[CellGroupData[{ -Cell[441768, 11368, 181, 5, 60, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[441952, 11375, 173, 3, 45, "Output",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] +Cell[514531, 12665, 236, 6, 65, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], +Cell[514770, 12673, 195, 3, 45, "Output",ExpressionUUID->"2f07bc70-d745-43b5-8c4a-0c3444430f0a"] }, Open ]], +Cell[514980, 12679, 271, 6, 40, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[442162, 11383, 6055, 185, 109, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[448220, 11570, 175, 3, 109, "Output",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] +Cell[515276, 12689, 558, 19, 72, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], +Cell[515837, 12710, 194, 3, 45, "Output",ExpressionUUID->"2c2ed349-0889-4509-be11-33ca554e85e9"] }, Open ]], Cell[CellGroupData[{ -Cell[448432, 11578, 368, 9, 109, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[448803, 11589, 170, 3, 109, "Output",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] +Cell[516068, 12718, 170, 5, 77, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], +Cell[516241, 12725, 194, 3, 45, "Output",ExpressionUUID->"70eff134-309e-4eea-9f95-0151d1b9fbb8"] }, Open ]], Cell[CellGroupData[{ -Cell[449010, 11597, 6122, 187, 464, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[455135, 11786, 175, 3, 45, "Output",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] +Cell[516472, 12733, 181, 5, 60, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], +Cell[516656, 12740, 194, 3, 45, "Output",ExpressionUUID->"7d865c99-aeb2-4fea-bd0c-7dd4128c0324"] }, Open ]], Cell[CellGroupData[{ -Cell[455347, 11794, 368, 9, 58, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[455718, 11805, 172, 3, 45, "Output",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] +Cell[516887, 12748, 6055, 185, 464, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], +Cell[522945, 12935, 197, 3, 45, "Output",ExpressionUUID->"e7270eeb-9140-4f10-9399-89d4a0da593f"] }, Open ]], Cell[CellGroupData[{ -Cell[455927, 11813, 2663, 88, 231, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[458593, 11903, 173, 3, 45, "Output",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] +Cell[523179, 12943, 368, 9, 58, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], +Cell[523550, 12954, 193, 3, 45, "Output",ExpressionUUID->"8ce6c3dd-e37b-4282-88e8-128c864eed63"] }, Open ]], Cell[CellGroupData[{ -Cell[458803, 11911, 2603, 85, 231, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[461409, 11998, 171, 3, 45, "Output",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] +Cell[523780, 12962, 6122, 187, 464, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], +Cell[529905, 13151, 196, 3, 45, "Output",ExpressionUUID->"d55743cf-aec1-4151-896e-cd0ef57445fd"] }, Open ]], Cell[CellGroupData[{ -Cell[461617, 12006, 3712, 118, 340, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[465332, 12126, 171, 3, 45, "Output",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] +Cell[530138, 13159, 368, 9, 58, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], +Cell[530509, 13170, 195, 3, 45, "Output",ExpressionUUID->"2cf14cab-cbb8-4cfe-b2e0-af01a5ad067f"] }, Open ]], Cell[CellGroupData[{ -Cell[465540, 12134, 2052, 59, 127, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], -Cell[467595, 12195, 568, 12, 79, "Message",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], -Cell[468166, 12209, 572, 12, 79, "Message",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], -Cell[468741, 12223, 574, 12, 79, "Message",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], -Cell[469318, 12237, 457, 10, 35, "Message",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], -Cell[469778, 12249, 172, 3, 45, "Output",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] +Cell[530741, 13178, 2663, 88, 231, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], +Cell[533407, 13268, 196, 3, 45, "Output",ExpressionUUID->"02147772-452c-4997-b072-5f875f19f8c7"] }, Open ]], Cell[CellGroupData[{ -Cell[469987, 12257, 2054, 59, 127, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], -Cell[472044, 12318, 568, 12, 79, "Message",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], -Cell[472615, 12332, 572, 12, 79, "Message",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], -Cell[473190, 12346, 574, 12, 79, "Message",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], -Cell[473767, 12360, 457, 10, 35, "Message",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], -Cell[474227, 12372, 171, 3, 45, "Output",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] +Cell[533640, 13276, 2603, 85, 231, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], +Cell[536246, 13363, 194, 3, 45, "Output",ExpressionUUID->"99618a8b-bf7c-4dd6-8539-0668e2344dfa"] }, Open ]], Cell[CellGroupData[{ -Cell[474435, 12380, 2030, 55, 69, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], -Cell[476468, 12437, 19960, 375, 325, "Output",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] +Cell[536477, 13371, 3712, 118, 340, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], +Cell[540192, 13491, 194, 3, 45, "Output",ExpressionUUID->"4ecdddf1-24b2-420b-8eb9-7fea8f562ab1"] }, Open ]], Cell[CellGroupData[{ -Cell[496465, 12817, 2118, 60, 109, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], -Cell[498586, 12879, 496, 11, 109, "Message",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], -Cell[499085, 12892, 501, 11, 109, "Message",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], -Cell[499589, 12905, 505, 11, 54, "Message",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], -Cell[500097, 12918, 455, 10, 35, "Message",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], -Cell[500555, 12930, 21721, 403, 319, "Output",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] +Cell[540423, 13499, 2101, 60, 87, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], +Cell[542527, 13561, 651, 14, 54, "Message",ExpressionUUID->"f3f753b9-c774-4fd3-84bd-937bee899701"], +Cell[543181, 13577, 650, 14, 54, "Message",ExpressionUUID->"a52e3b00-56c2-4a85-8264-71816f4c2bb9"], +Cell[543834, 13593, 650, 14, 54, "Message",ExpressionUUID->"5d671b01-66c4-487a-ae23-d26a325573d7"], +Cell[544487, 13609, 495, 11, 29, "Message",ExpressionUUID->"1c68d214-7139-4cc9-9d81-39ce58e7216d"], +Cell[544985, 13622, 195, 3, 45, "Output",ExpressionUUID->"86b9e37c-4e14-4081-b959-ba1787b6cd09"] }, Open ]], -Cell[522291, 13336, 181, 3, 40, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], -Cell[522475, 13341, 207, 5, 40, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], Cell[CellGroupData[{ -Cell[522707, 13350, 1616, 48, 94, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], -Cell[524326, 13400, 589, 12, 79, "Message",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], -Cell[524918, 13414, 588, 12, 79, "Message",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], -Cell[525509, 13428, 594, 12, 79, "Message",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], -Cell[526106, 13442, 455, 10, 35, "Message",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], -Cell[526564, 13454, 173, 3, 109, "Output",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] +Cell[545217, 13630, 2103, 60, 87, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], +Cell[547323, 13692, 653, 14, 54, "Message",ExpressionUUID->"4f38e291-9bd7-447b-b07f-cc674a352704"], +Cell[547979, 13708, 652, 14, 54, "Message",ExpressionUUID->"d5ce8dd4-81cc-4c7f-bec9-1926152de723"], +Cell[548634, 13724, 652, 14, 54, "Message",ExpressionUUID->"6349457c-1219-4b5f-8811-69de39e527b9"], +Cell[549289, 13740, 495, 11, 29, "Message",ExpressionUUID->"a042378d-2457-45fd-87e6-892faeff11e1"], +Cell[549787, 13753, 195, 3, 45, "Output",ExpressionUUID->"8a4d7a55-bcac-4247-abc2-a6eb82f66869"] }, Open ]], Cell[CellGroupData[{ -Cell[526774, 13462, 2246, 64, 109, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], -Cell[529023, 13528, 566, 12, 109, "Message",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], -Cell[529592, 13542, 570, 12, 109, "Message",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], -Cell[530165, 13556, 574, 12, 79, "Message",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], -Cell[530742, 13570, 456, 10, 35, "Message",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], -Cell[531201, 13582, 171, 3, 45, "Output",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] +Cell[550019, 13761, 2053, 55, 69, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], +Cell[552075, 13818, 20313, 383, 325, "Output",ExpressionUUID->"da4eafe2-1f54-47c5-956e-a78e06bef838"] }, Open ]], Cell[CellGroupData[{ -Cell[531409, 13590, 2221, 64, 122, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], -Cell[533633, 13656, 569, 12, 79, "Message",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], -Cell[534205, 13670, 571, 12, 79, "Message",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], -Cell[534779, 13684, 575, 12, 79, "Message",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], -Cell[535357, 13698, 458, 10, 35, "Message",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], -Cell[535818, 13710, 171, 3, 45, "Output",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] +Cell[572425, 14206, 2141, 60, 127, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], +Cell[574569, 14268, 537, 12, 54, "Message",ExpressionUUID->"639504fb-ac60-4374-a344-63eef0030587"], +Cell[575109, 14282, 537, 12, 54, "Message",ExpressionUUID->"2c070f69-ca5e-4950-a60a-48aedfb246c2"], +Cell[575649, 14296, 541, 12, 54, "Message",ExpressionUUID->"06b671ca-6c7b-4e22-b165-ab089aaf07bf"], +Cell[576193, 14310, 493, 11, 29, "Message",ExpressionUUID->"42a41023-4c42-4270-bd39-f3eceb0dcfe9"], +Cell[576689, 14323, 21977, 408, 326, "Output",ExpressionUUID->"17f895b4-e851-4ed1-baa4-f6e330709a7d"] }, Open ]], +Cell[598681, 14734, 207, 4, 40, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], Cell[CellGroupData[{ -Cell[536026, 13718, 2223, 64, 122, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], -Cell[538252, 13784, 567, 12, 79, "Message",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], -Cell[538822, 13798, 571, 12, 79, "Message",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], -Cell[539396, 13812, 573, 12, 79, "Message",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], -Cell[539972, 13826, 456, 10, 35, "Message",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], -Cell[540431, 13838, 173, 3, 45, "Output",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] +Cell[598913, 14742, 230, 5, 40, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], +Cell[599146, 14749, 28338, 540, 326, "Output",ExpressionUUID->"0fbdfa17-216e-429b-9d89-b513f188c7cb"] }, Open ]], Cell[CellGroupData[{ -Cell[540641, 13846, 211, 6, 65, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], -Cell[540855, 13854, 174, 3, 45, "Output",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] +Cell[627521, 15294, 1616, 48, 94, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], +Cell[629140, 15344, 649, 14, 54, "Message",ExpressionUUID->"ce01a7f5-2009-417f-bd05-160e0638d57e"], +Cell[629792, 15360, 651, 14, 54, "Message",ExpressionUUID->"53bfda70-c116-49c6-b3ed-84f7dd03f6b5"], +Cell[630446, 15376, 650, 14, 54, "Message",ExpressionUUID->"5ddb664a-8763-48bf-b67a-e9470cf69fe4"], +Cell[631099, 15392, 495, 11, 29, "Message",ExpressionUUID->"bd019d7d-d2f9-410f-9d69-ebe7fada5569"], +Cell[631597, 15405, 196, 3, 45, "Output",ExpressionUUID->"c64788bc-f8cb-4de0-a658-6843ffa730fa"] }, Open ]], -Cell[541044, 13860, 115, 1, 40, "Input",ExpressionUUID->"db19731b-41c3-414b-814d-467835909659"], -Cell[541162, 13863, 4091, 88, 436, "Input",ExpressionUUID->"508b6267-8039-4e78-b3be-315b0a8c82a4"] +Cell[CellGroupData[{ +Cell[631830, 15413, 2269, 64, 156, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], +Cell[634102, 15479, 651, 14, 54, "Message",ExpressionUUID->"29743041-f224-422f-b048-41ce7ca4b373"], +Cell[634756, 15495, 648, 14, 54, "Message",ExpressionUUID->"451178dd-5660-407a-bdd2-e98968037e9c"], +Cell[635407, 15511, 647, 14, 54, "Message",ExpressionUUID->"494445cf-3192-4821-92d4-8b1dd0629b10"], +Cell[636057, 15527, 495, 11, 29, "Message",ExpressionUUID->"6b7cc5ab-1a5e-428c-98ea-348e597fedde"], +Cell[636555, 15540, 195, 3, 45, "Output",ExpressionUUID->"963cec12-2d2e-4440-adf8-ecd79388edaf"] +}, Open ]], +Cell[CellGroupData[{ +Cell[636787, 15548, 2233, 63, 122, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], +Cell[639023, 15613, 653, 14, 54, "Message",ExpressionUUID->"b520d1f8-7e85-4554-8b77-ed3a5e9329f3"], +Cell[639679, 15629, 650, 14, 54, "Message",ExpressionUUID->"64c25521-ed87-4fef-84c6-1192d919c5d9"], +Cell[640332, 15645, 650, 14, 54, "Message",ExpressionUUID->"b2368603-29fe-4642-ba47-1b2cd4ccb272"], +Cell[640985, 15661, 495, 11, 29, "Message",ExpressionUUID->"aaec4bfa-3812-4181-8af7-def4b73fe47f"], +Cell[641483, 15674, 195, 3, 45, "Output",ExpressionUUID->"b8fdee49-37d6-4b90-b98b-d21872fa9aba"] +}, Open ]], +Cell[CellGroupData[{ +Cell[641715, 15682, 2235, 63, 122, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], +Cell[643953, 15747, 649, 14, 54, "Message",ExpressionUUID->"a60361d0-d50d-40d0-9155-90fe197b52f4"], +Cell[644605, 15763, 648, 14, 54, "Message",ExpressionUUID->"cf70529d-0e4a-4b18-8822-5d0323a72e7f"], +Cell[645256, 15779, 648, 14, 54, "Message",ExpressionUUID->"584dc885-e6af-43fd-b749-e2dda879049a"], +Cell[645907, 15795, 493, 11, 29, "Message",ExpressionUUID->"90d25ec6-224c-464f-8769-21799d3da0f5"], +Cell[646403, 15808, 194, 3, 45, "Output",ExpressionUUID->"74b56185-7f43-4d3b-b6b9-6074f624a689"] +}, Open ]], +Cell[CellGroupData[{ +Cell[646634, 15816, 234, 6, 65, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], +Cell[646871, 15824, 196, 3, 45, "Output",ExpressionUUID->"8ec13d18-6e5f-4e57-aecd-76745353b576"] +}, Open ]], +Cell[647082, 15830, 143, 3, 40, "Input",ExpressionUUID->"db19731b-41c3-414b-814d-467835909659"], +Cell[CellGroupData[{ +Cell[647250, 15837, 4096, 89, 436, "Input",ExpressionUUID->"508b6267-8039-4e78-b3be-315b0a8c82a4"], +Cell[651349, 15928, 1975, 42, 89, "Output",ExpressionUUID->"2d9fc57d-1ebb-455a-9b62-cc7b75ac93a9"], +Cell[653327, 15972, 1647, 47, 752, "Output",ExpressionUUID->"4081db83-30f0-4542-a0b0-babb5e38c5d7"] +}, Open ]] } ] *) diff --git a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw2.nb b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw2.nb index 8f74eef..3984d8a 100644 --- a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw2.nb +++ b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_osc_Qw2.nb @@ -10,35 +10,4900 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 383944, 9197] -NotebookOptionsPosition[ 359027, 8823] -NotebookOutlinePosition[ 359438, 8840] -CellTagsIndexPosition[ 359395, 8837] +NotebookDataLength[ 669324, 15973] +NotebookOptionsPosition[ 628660, 15323] +NotebookOutlinePosition[ 629094, 15341] +CellTagsIndexPosition[ 629051, 15338] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ + +Cell[CellGroupData[{ Cell[BoxData[ - RowBox[{"f1", "=", "0.8638738906"}]], "Input", - CellChangeTimes->{3.9918496921150837`*^9, - 3.994235487372745*^9},ExpressionUUID->"ede64bc2-06f7-8743-a0a6-\ -6f058773310c"], + RowBox[{"d", "=", "2"}]], "Input", + CellChangeTimes->{ + 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, + 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { + 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, + 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"00b5f403-9f80-4701-a740-6acdb2556420"], + +Cell[BoxData["2"], "Output", + CellChangeTimes->{ + 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, + 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, + 3.9940750908104277`*^9}, 3.99434999220583*^9, 3.994352544697736*^9, + 3.994384604016588*^9, 3.994384703166684*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"41abba8c-b76d-4f9f-a8fb-515a30bf9914"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A", "=", "240"}]], "Input", + CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { + 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"e64514fa-ed72-47c6-bdf6-20893a2eb3f8"], + +Cell[BoxData["240"], "Output", + CellChangeTimes->{ + 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, + 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, + 3.994075090853217*^9}, 3.994349993004418*^9, 3.9943525447509003`*^9, + 3.994384604098668*^9, 3.994384703233693*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"a5ff662d-ee7a-4a5f-8aaa-0e6f48b391f7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A1", "=", "170"}]], "Input", + CellChangeTimes->{ + 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"21416c0e-1c97-4e2c-bb07-e2899c15253d"], + +Cell[BoxData["170"], "Output", + CellChangeTimes->{ + 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, + 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, + 3.994075090864901*^9}, 3.994349993069098*^9, 3.994352544756048*^9, + 3.9943846041131077`*^9, 3.994384703246682*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"2815ebf8-87a0-4bb9-926c-c0ebbfde11d6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a1", "=", "0.55"}]], "Input", + CellChangeTimes->{3.9434144380252676`*^9}, + CellLabel->"In[4]:=",ExpressionUUID->"d10bd82b-d5cf-4f27-a6c7-02ecf55a9cf6"], + +Cell[BoxData["0.55`"], "Output", + CellChangeTimes->{ + 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, + 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, + 3.9940750908767548`*^9}, 3.994349993091261*^9, 3.994352544761016*^9, + 3.9943846041273212`*^9, 3.994384703259883*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"2b83be9a-4144-4235-809e-aee8d334bec1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"a2", "=", + RowBox[{"a1", "-", + RowBox[{"0.015", "*", + FractionBox[ + RowBox[{ + RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", + CellLabel->"In[5]:=",ExpressionUUID->"7980ec81-8604-4a43-98dd-472ef65a37a0"], + +Cell[BoxData["0.5437500000000001`"], "Output", + CellChangeTimes->{ + 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, + 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, + 3.994075090888695*^9}, 3.994349993114458*^9, 3.994352544767799*^9, + 3.99438460414177*^9, 3.994384703272935*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"e0ea2a55-263f-46b7-9587-7b274d89d7d1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"p0", "=", "0.17"}]], "Input", + CellLabel->"In[6]:=",ExpressionUUID->"29f1ed3d-8677-4c8f-a5a1-9ea3d4c79e44"], + +Cell[BoxData["0.17`"], "Output", + CellChangeTimes->{ + 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, + 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, + 3.9940750909003353`*^9}, 3.994349993133485*^9, 3.994352544772938*^9, + 3.9943846041571217`*^9, 3.994384703285965*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"d1febf94-ddc6-4b0f-9a6e-1022779235e7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R01", "=", + RowBox[{"1.16", "*", + SuperscriptBox["A1", + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, + CellLabel->"In[7]:=",ExpressionUUID->"2eebf9e8-0303-4345-8b46-b6c4e129a574"], + +Cell[BoxData["6.426003577835178`"], "Output", + CellChangeTimes->{ + 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, + 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, + 3.9940750909055967`*^9}, 3.99434999315554*^9, 3.994352544778161*^9, + 3.994384604162402*^9, 3.9943847032988987`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"5ec5670b-48da-499b-b4e0-d27bcb2f799c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R02", "=", + RowBox[{"1.16", "*", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"A", "-", "A1"}], ")"}], + RowBox[{"1", "/", "3"}]]}]}]], "Input", + CellLabel->"In[8]:=",ExpressionUUID->"74ff78ca-8237-4c0a-9187-2e580c3900b2"], + +Cell[BoxData["4.7806909477779245`"], "Output", + CellChangeTimes->{ + 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, + 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, + 3.994075090919847*^9}, 3.994349993177393*^9, 3.994352544783416*^9, + 3.994384604176207*^9, 3.9943847033117733`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"d685af70-54f4-4814-8558-4314459d3ca6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b1", "=", "0.8747255229"}]], "Input", + CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, + CellLabel->"In[9]:=",ExpressionUUID->"f3c8ec0f-9f4b-4ac1-b569-028443a2e34c"], + +Cell[BoxData["0.8747255229`"], "Output", + CellChangeTimes->{ + 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.994349993195928*^9, 3.994352544789406*^9, 3.9943846042003813`*^9, + 3.994384703324615*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"bef599c1-cab8-4c69-8009-bea3cd16d23e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"b2", "=", "0.3882072479"}]], "Input", + CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, + CellLabel->"In[10]:=",ExpressionUUID->"7c4fa5b8-67d5-4eef-9ed9-916f6843a703"], + +Cell[BoxData["0.3882072479`"], "Output", + CellChangeTimes->{ + 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994349993218359*^9, 3.994352544795186*^9, 3.994384604215147*^9, + 3.99438470334006*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"564e13fe-336c-4dfb-840e-1365cd7d7dab"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x1", "=", "0"}]], "Input", + CellLabel->"In[11]:=",ExpressionUUID->"baf40374-29d2-4781-a381-3de499d62150"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, + 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, + 3.994075090955942*^9}, 3.9943499932656927`*^9, 3.9943525448003674`*^9, + 3.9943846042290373`*^9, 3.994384703352186*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"d906f7d2-814a-4354-98d3-08e1ef799a65"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"x2", "=", "0"}]], "Input", + CellLabel->"In[12]:=",ExpressionUUID->"fb279d0c-7712-4cca-871c-fa0638c502d7"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, + 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, + 3.9940750909684067`*^9}, 3.994349993288414*^9, 3.994352544806047*^9, + 3.994384604243244*^9, 3.994384703371809*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"cac1acc6-7c98-4ea9-8ff9-b4a2545b1221"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w1", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[13]:=",ExpressionUUID->"43d9c7e8-9d80-4926-a885-d2ac88aaf467"], + +Cell[BoxData["2.2478963955971953`"], "Output", + CellChangeTimes->{ + 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, + 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, + 3.994075090978916*^9}, 3.994349993318995*^9, 3.99435254481441*^9, + 3.994384604257495*^9, 3.994384703386326*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"ca052a6b-2a78-4089-9ed9-809e40108c0d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"w2", "=", + FractionBox[ + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "-", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", + CellLabel->"In[14]:=",ExpressionUUID->"5299cfad-2761-41b2-973f-3913012a1f0b"], + +Cell[BoxData["1.4243583722932822`"], "Output", + CellChangeTimes->{ + 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, + 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, + 3.99407509098914*^9}, 3.994349993337638*^9, 3.994352544819866*^9, + 3.994384604271644*^9, 3.9943847033996162`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"4fff1add-cc83-48bd-ad2b-da8bab1227a3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c11", "=", + RowBox[{"1", "-", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w1", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[15]:=",ExpressionUUID->"dd34f530-b874-45bb-b7e3-a474aef0daa0"], + +Cell[BoxData["0.4215025991580821`"], "Output", + CellChangeTimes->{ + 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, + 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, + 3.994075090999715*^9}, 3.994349993358815*^9, 3.994352544826576*^9, + 3.994384604286007*^9, 3.994384703412642*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"cd13431b-9425-433e-8368-02177631c3b1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c12", "=", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w2", "2"]}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", + CellLabel->"In[16]:=",ExpressionUUID->"e0b396f5-c6e2-4d41-bf1c-9b15a0f2d258"], + +Cell[BoxData[ + RowBox[{"-", "0.08696983109232953`"}]], "Output", + CellChangeTimes->{ + 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, + 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, + 3.994075091010479*^9}, 3.994349993379632*^9, 3.9943525448323402`*^9, + 3.994384604300453*^9, 3.994384703426064*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"98239ab7-8cdc-4c1d-99ca-1fb8ff6914a5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c21", "=", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], ")"}], "*", + RowBox[{"(", + RowBox[{"1", "-", + SuperscriptBox["w1", "2"]}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", + CellLabel->"In[17]:=",ExpressionUUID->"4b796fed-adf3-4ae9-8480-f7ebaf369d4d"], + +Cell[BoxData[ + RowBox[{"-", "0.5569156814457635`"}]], "Output", + CellChangeTimes->{ + 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, + 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, + 3.9940750910236893`*^9}, 3.994349993404739*^9, 3.994352544838725*^9, + 3.9943846043156157`*^9, 3.994384703440419*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"b3890f6c-e59b-4e54-827c-d3b5212d6e7c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"c22", "=", + RowBox[{"1", "-", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", + RowBox[{"(", + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"bae893ff-4d07-4361-9344-3655d773e555"], + +Cell[BoxData["0.7095150675393332`"], "Output", + CellChangeTimes->{ + 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, + 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, + 3.994075091035767*^9}, 3.994349993431782*^9, 3.994352544844469*^9, + 3.9943846043299437`*^9, 3.9943847034549637`*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"03778055-e619-4c57-aca0-f4f150f2841b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"730053d9-490d-44dc-8769-390a3de7ea2a"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, + 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, + 3.9940750910471153`*^9}, 3.994349993453208*^9, 3.994352544851005*^9, + 3.994384604343547*^9, 3.994384703469923*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"a0c3b176-24a7-4e99-84df-491c384b0c3c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fin", "=", "0.09"}]], "Input", + CellLabel->"In[20]:=",ExpressionUUID->"e0e8bd1d-f12b-46a9-8215-9e5358eb43b6"], + +Cell[BoxData["0.09`"], "Output", + CellChangeTimes->{ + 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, + 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, + 3.9940750910581427`*^9}, 3.9943499934741373`*^9, 3.994352544856593*^9, + 3.994384604357709*^9, 3.994384703485059*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"7d259d9f-cb11-47be-b1d7-a9964c302896"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffin", "=", "0.42"}]], "Input", + CellLabel->"In[21]:=",ExpressionUUID->"d375ba23-de99-4d0f-9f9c-9c9e4e03d929"], + +Cell[BoxData["0.42`"], "Output", + CellChangeTimes->{ + 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, + 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, + 3.994075091069083*^9}, 3.994349993492996*^9, 3.994352544861862*^9, + 3.9943846043727293`*^9, 3.9943847035003023`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"237ac37e-5a63-405b-80fa-0435baaf2a94"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"fex", "=", + RowBox[{"-", "2.59"}]}]], "Input", + CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"2b7ed650-9712-4eac-8773-86cae1c5041e"], + +Cell[BoxData[ + RowBox[{"-", "2.59`"}]], "Output", + CellChangeTimes->{ + 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, + 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, + 3.994075091080567*^9}, 3.994349993511737*^9, 3.994352544868712*^9, + 3.994384604387033*^9, 3.994384703516149*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"f645ae2e-ff9b-4e8f-a51e-28a3df82530b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ffex", "=", "0.54"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"c2cbdea7-0098-490b-a21b-b9dc3af6c40c"], + +Cell[BoxData["0.54`"], "Output", + CellChangeTimes->{ + 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, + 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, + 3.994075091090703*^9}, 3.994349993532908*^9, 3.9943525448757887`*^9, + 3.994384604401565*^9, 3.994384703531871*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"ef204ef0-bab1-4d19-ada5-c3231c210482"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z1", "=", "66"}]], "Input", + CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { + 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { + 3.994073690740699*^9, 3.994073690862359*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"e3435374-4cd5-426b-8879-f84effad39e6"], + +Cell[BoxData["66"], "Output", + CellChangeTimes->{ + 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, + 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, + 3.994075091102222*^9}, 3.994349993553545*^9, 3.994352544883093*^9, + 3.9943846044157963`*^9, 3.994384703547068*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"2067e5d8-4ab0-4f57-9029-13f49510c6e1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Z2", "=", + RowBox[{"94", "-", "Z1"}]}]], "Input", + CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, + 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, + CellLabel->"In[25]:=",ExpressionUUID->"4d616e57-a8cb-4b84-b0e9-4b67c3651d4d"], + +Cell[BoxData["28"], "Output", + CellChangeTimes->{ + 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, + 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, + 3.994075091112747*^9}, 3.994349993572542*^9, 3.9943525448885603`*^9, + 3.9943846044296227`*^9, 3.994384703561955*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"58c7bd8b-04bf-45de-81b2-d9beb42178dc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"A2", "=", + RowBox[{"A", "-", "A1"}]}]], "Input", + CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"156df1c5-3023-4310-b2b8-0405a27f695c"], + +Cell[BoxData["70"], "Output", + CellChangeTimes->{ + 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, + 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, + 3.9940750911232967`*^9}, 3.994349993593258*^9, 3.994352544894188*^9, + 3.99438460444357*^9, 3.9943847035765123`*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"92ec0384-3f85-4c25-bf18-125a25d618a6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Din", "=", + RowBox[{"fin", "+", + RowBox[{"ffin", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"97d5d8c6-b27a-4078-b24a-de9688ae59b8"], + +Cell[BoxData["0.1087764705882353`"], "Output", + CellChangeTimes->{ + 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, + 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, + 3.994075091133902*^9}, 3.9943499936119432`*^9, 3.994352544900977*^9, + 3.994384604457987*^9, 3.99438470359054*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"02898e4d-8dd0-40ea-a109-2b9f7b06ffbf"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Dex", "=", + RowBox[{"fex", "+", + RowBox[{"ffex", "*", + FractionBox[ + RowBox[{"A1", "-", + RowBox[{"2", "*", "Z1"}]}], "A1"], "*", + FractionBox[ + RowBox[{"A2", "-", + RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"43a5047a-f33d-472c-a371-716501754506"], + +Cell[BoxData[ + RowBox[{"-", "2.5658588235294117`"}]], "Output", + CellChangeTimes->{ + 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, + 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, + 3.9940750911440773`*^9}, 3.994349993633739*^9, 3.994352544906453*^9, + 3.994384604471878*^9, 3.994384703604535*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"2de18a4e-1eb2-4016-8107-84d629e226af"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"R00", "=", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x1", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"2", ",", "0", ",", "x2", ",", "\[Phi]"}], "]"}]}]}], ")"}]}], + "+", "d"}]}]], "Input", + CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { + 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, + 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"439da5e8-e32a-4ecb-9fd6-7a3a765bc8c4"], + +Cell[BoxData["17.474387700041003`"], "Output", + CellChangeTimes->{ + 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, + 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, + 3.9940750911556253`*^9}, 3.994349993658306*^9, 3.994352544913439*^9, + 3.994384604486144*^9, 3.994384703618546*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"8e02e233-f861-4134-a680-665fbac32672"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"C0", "=", "300"}]], "Input", + CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"79a2f49b-fd51-4254-9b15-c668bf1fd392"], + +Cell[BoxData["300"], "Output", + CellChangeTimes->{ + 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, + 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, + 3.99407509116647*^9}, 3.994349993679582*^9, 3.994352544919167*^9, + 3.994384604500237*^9, 3.994384703632353*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"66136411-1821-4b28-8ad4-85aaf7e87424"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v1", "=", "1.895"}]], "Input", + CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, + 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { + 3.9940737081112833`*^9, 3.994073709172043*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"dec744ef-5206-430b-a6be-c9a39e01e52c"], + +Cell[BoxData["1.895`"], "Output", + CellChangeTimes->{ + 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.9943499936990232`*^9, 3.994352544925219*^9, 3.994384604515194*^9, + 3.9943847036457777`*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"35eaa3f7-d39d-4b31-a463-d6051bb882c2"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918496892276516`*^9, - 3.9918496892324924`*^9}},ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-\ -c82e80965ca9"], + CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"f2638b08-e43e-48b7-8a53-727774c1e8e4"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n1", "=", "0.785"}]], "Input", + CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, + 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { + 3.994073711335288*^9, 3.994073712564888*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"0ace9e24-1792-4ce7-bd97-911cc536f512"], + +Cell[BoxData["0.785`"], "Output", + CellChangeTimes->{ + 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.9943499937467537`*^9, 3.9943525449364977`*^9, 3.9943846045425873`*^9, + 3.994384703662682*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"e1edd7ea-c19c-4c6d-b16a-4be5eef6c717"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"712c11a1-32c1-47d0-8c65-53db37c72ff9"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv1", "=", "2.605"}]], "Input", + CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { + 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { + 3.9940737150021257`*^9, 3.994073716213628*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"3af6c04f-b98a-41ca-8665-8b917f9a2d54"], + +Cell[BoxData["2.605`"], "Output", + CellChangeTimes->{ + 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.994349993794999*^9, 3.994352544946368*^9, 3.994384604567624*^9, + 3.99438470367737*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"fd4f9df4-b29d-408c-a5df-4358b9d6796f"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"64a55b93-21f8-4df0-918c-42ae9a49b3f9"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn1", "=", "1.125"}]], "Input", + CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { + 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, + 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"135500b0-2cb8-4afb-8e68-56ca3f4ca1a2"], + +Cell[BoxData["1.125`"], "Output", + CellChangeTimes->{ + 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.994349993822527*^9, 3.994352544954446*^9, 3.994384604592453*^9, + 3.9943847036931553`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"66db71db-3c14-40de-988e-dd7216e9b9fb"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"30dc47a1-c619-457e-906a-de0efa03ffc9"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"v2", "=", "1.145"}]], "Input", + CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, + 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, + 3.9940737264630413`*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"c98c394e-11d3-4620-af82-137e0c5e0298"], + +Cell[BoxData["1.145`"], "Output", + CellChangeTimes->{ + 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.9943499938512163`*^9, 3.994352544962653*^9, 3.994384604617812*^9, + 3.994384703708722*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"ad055ee0-f1be-4814-9610-478f21ea1846"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"c3ed8dc5-599c-42fc-b9e9-bc8e1fd93a7b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"n2", "=", "0.565"}]], "Input", + CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, + 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, + 3.994073731586865*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"fe2ec0eb-4b88-484a-9180-19d3e333e1ea"], + +Cell[BoxData["0.565`"], "Output", + CellChangeTimes->{ + 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.994349993878025*^9, 3.9943525449708643`*^9, 3.994384604643689*^9, + 3.994384703723853*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"14e02510-853e-4855-a642-71377822e09f"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"eb5e3d35-73bf-4e75-a76a-7c425818c525"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"vv2", "=", "1.5"}]], "Input", + CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, + 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, + 3.994073737300967*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"39d37940-e769-4bf6-9846-ffee65b68219"], + +Cell[BoxData["1.5`"], "Output", + CellChangeTimes->{ + 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.994349993907179*^9, 3.99435254500348*^9, 3.99438460466936*^9, + 3.9943847037391043`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"b43eae10-7ab5-4fc0-8cfb-c9c27abd2006"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"1029386b-e53a-4b98-ad6b-f534cfb8b8f8"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"nn2", "=", "0.635"}]], "Input", + CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, + 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"852209a8-1309-44cc-a021-45a40ce0501a"], + +Cell[BoxData["0.635`"], "Output", + CellChangeTimes->{ + 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.994349994061551*^9, 3.99435254502315*^9, 3.994384604694202*^9, + 3.994384703753717*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"8c94475f-51e6-4d2f-bbaa-8e4d46444890"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"0428f92a-4025-45b7-ab9c-1ef491e421c6"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U31", "=", + RowBox[{"C0", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", "R1"}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "a1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "nn2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "nn2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"Dex", "*", "v2", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/aR7S2Zj4lvHP7Jp2SD6t2ddPojOapZrBdETK9in +g+jbL87PBNEGxc+WgOhrG/jXgWi9vpDNIFrqcOcWEL1ki/glEK3Wwn0ZRDdb +HLoOonX+9D8E0abp/OxNQDq+aD4niN52MlAbRD/heKsDovPud4WB6HnRPNEg +uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt +Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr +ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== + "], + CellLabel->"In[47]:=",ExpressionUUID->"77ac3191-67f4-4832-ad57-ef7fd3894f6e"], + +Cell[BoxData["0.12734722137174234`"], "Output", + CellChangeTimes->{ + 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, + 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, + 3.994075091306961*^9}, 3.994349994303849*^9, 3.9943525451130047`*^9, + 3.994384604807631*^9, 3.994384703829062*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"b106808e-a472-4767-b07a-4e27d04bab1c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U33", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", + FractionBox[ + RowBox[{"R01", "*", "R01"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "-", + RowBox[{"2", "*", "vv1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "a2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}], + ")"}]}], "-", + RowBox[{"v1", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "a2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], "]"}]}], + "+", + RowBox[{"Dex", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "a2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "a2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "a2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + StyleBox[ + RowBox[{"Method", "\[Rule]", " ", "Trapezoidal"}], "MR"]}], + "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"e74881dd-1312-4f4d-92c6-02b5000be880"], + +Cell[BoxData["7.503764283698204`"], "Output", + CellChangeTimes->{ + 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, + 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, + 3.994075091332656*^9}, 3.994349994504182*^9, 3.994352545157682*^9, + 3.9943846048329163`*^9, 3.994384703860755*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"912f3b44-df45-48d1-8116-0597dee40dff"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U32", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02"}], "1"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { + 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, + 3.943439550065191*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"87ea46e1-e6b0-4a13-9054-147e530c949e"], + +Cell[BoxData[ + RowBox[{"-", "14.220629552114458`"}]], "Output", + CellChangeTimes->{ + 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, + 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, + 3.994075091358534*^9}, 3.994349994587234*^9, 3.994352545197352*^9, + 3.994384604858861*^9, 3.9943847038913193`*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"03c288d2-79fc-4337-8baa-623465e6d43c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U41", "=", + RowBox[{"C0", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[50]:=",ExpressionUUID->"50881ca6-0259-4a04-825c-2799cd88bd93"], + +Cell[BoxData[ + RowBox[{"-", "18.05754390959481`"}]], "Output", + CellChangeTimes->{ + 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, + 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, + 3.99407509139049*^9}, 3.9943499947112293`*^9, 3.9943525452377977`*^9, + 3.994384604890503*^9, 3.9943847039259663`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"d5f60ba3-43ee-4a5f-a115-780800bf0184"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U42", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[51]:=",ExpressionUUID->"70db96f9-5c92-4c70-94f3-4f3e2a469c8f"], + +Cell[BoxData[ + RowBox[{"-", "51.76635903245878`"}]], "Output", + CellChangeTimes->{ + 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, + 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, + 3.994075091423628*^9}, 3.994349994887383*^9, 3.994352545279282*^9, + 3.9943846049216843`*^9, 3.994384703962797*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"4ccc1368-a2ab-4180-897a-1abe8a7fb3a5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U51", "=", + RowBox[{"C0", "*", "b1", "*", "b1", "*", "b2", "*", "b2", "*", + FractionBox[ + RowBox[{"R01", "*", "R01", "*", "R02", "*", "R02"}], "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "nn1", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R01", "nn1"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"vv1", "*", "v2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R1", "nn1"], "]"}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", "n2", ")"}], "*", + RowBox[{"(", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", + "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "3"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}], ")"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"Coth", "[", + FractionBox["R02", "n2"], "]"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"2", "*", "v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "-", + RowBox[{"v1", "*", "vv2", "*", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "Din"}], "+", "Dex"}], ")"}], "*", + RowBox[{"(", + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{"Coth", "[", + FractionBox["R2", "n2"], "]"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ")"}], "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "nn2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "nn2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "nn2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "0"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}], "+", + RowBox[{"v2", "*", "v1", "*", + RowBox[{"NIntegrate", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"D", "[", + RowBox[{ + RowBox[{ + RowBox[{"-", "4"}], "\[Pi]", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n1", "*", "R1", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n1"}], "R1"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R1"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n1", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R1"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"2", "\[Pi]"}]], "*", "n2", "*", "R2", "*", "p0"}], + RowBox[{"r", "*", + RowBox[{"Sinh", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}]], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"\[Pi]", "*", "n2"}], "R2"], "*", + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R2"}], "]"}], "*", + RowBox[{"Coth", "[", + RowBox[{"\[Pi]", "*", "n2", "*", "r"}], "]"}]}], "-", + RowBox[{"Cos", "[", + RowBox[{"r", "*", "R2"}], "]"}]}], ")"}], "*", + FractionBox[ + RowBox[{"Sin", "[", + RowBox[{"r", "*", "R00"}], "]"}], + RowBox[{"r", "*", "R00"}]], "*", "r", "*", "r"}], ",", + RowBox[{"{", + RowBox[{"R2", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R2", "->", "R02"}]}], ",", + RowBox[{"{", + RowBox[{"R1", ",", "2"}], "}"}]}], "]"}], "/.", + RowBox[{"R1", "->", "R01"}]}], ",", + RowBox[{"{", + RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", + RowBox[{"Method", "\[Rule]", + StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[52]:=",ExpressionUUID->"63126559-5b43-40b2-9641-1bf051eb03c3"], + +Cell[BoxData[ + RowBox[{"-", "131.16526179683018`"}]], "Output", + CellChangeTimes->{ + 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, + 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, + 3.9940750914627743`*^9}, 3.994349995026395*^9, 3.9943525453304033`*^9, + 3.994384604958918*^9, 3.9943847040069427`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"6f6e2126-cfa6-4072-8614-d1dffeb0efae"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U21", "=", "0"}]], "Input", + CellLabel->"In[53]:=",ExpressionUUID->"efc242d5-d839-4b44-93f9-d9afa7f4bd6d"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, + 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, + 3.994075091476185*^9}, 3.994349995056971*^9, 3.994352545348784*^9, + 3.994384604974415*^9, 3.9943847040250597`*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"2c1ce97d-441f-41d7-b17a-cbbcce2a94d3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"U22", "=", "0"}]], "Input", + CellLabel->"In[54]:=",ExpressionUUID->"977e3cdf-8189-42d3-94f6-70b575958acc"], + +Cell[BoxData["0"], "Output", + CellChangeTimes->{ + 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, + 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, + 3.994075091486505*^9}, 3.994349995070118*^9, 3.994352545359714*^9, + 3.994384604987849*^9, 3.994384704037307*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"105f46d1-cb89-49d5-b3ca-cde758697722"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[55]:=",ExpressionUUID->"084ed529-feee-4cc4-89f4-131d9d8ec211"], + +Cell[BoxData["102.57012833062927`"], "Output", + CellChangeTimes->{ + 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, + 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, + 3.994075091497402*^9}, 3.994349995089707*^9, 3.994352545370634*^9, + 3.9943846050020514`*^9, 3.9943847040498*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"5a11b18f-4c97-4060-ab0d-daaa01893456"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"91af6c96-f936-446e-a4c4-a0f7d3bb34f5"], + +Cell[BoxData[ + RowBox[{"-", "89.85372860437164`"}]], "Output", + CellChangeTimes->{ + 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, + 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, + 3.994075091508032*^9}, 3.994349995116057*^9, 3.994352545379877*^9, + 3.9943846050156183`*^9, 3.994384704062228*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"436032ea-e72b-4779-8794-8ec5230d9b9e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", + CellLabel->"In[57]:=",ExpressionUUID->"1279a3da-598b-4c64-95df-652f90a6fa69"], + +Cell[BoxData["106.05157029710364`"], "Output", + CellChangeTimes->{ + 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, + 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, + 3.994075091518471*^9}, 3.994349995128224*^9, 3.994352545390357*^9, + 3.994384605029241*^9, 3.994384704074978*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"e80c313e-a820-4fe3-be63-da70f681e7c6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c11"], "Input", + CellLabel->"In[58]:=",ExpressionUUID->"b90c938b-520d-4f8f-a313-a849756aac13"], + +Cell[BoxData["0.4215025991580821`"], "Output", + CellChangeTimes->{ + 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, + 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, + 3.99407509152868*^9}, 3.9943499951445217`*^9, 3.9943525453987617`*^9, + 3.994384605076007*^9, 3.9943847040871964`*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"1d1edd09-7c8a-4ecc-807c-4d230ab33861"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c12"], "Input", + CellLabel->"In[59]:=",ExpressionUUID->"0be29b28-a940-415b-bed5-761197359f6e"], + +Cell[BoxData[ + RowBox[{"-", "0.08696983109232953`"}]], "Output", + CellChangeTimes->{ + 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.9943499951631203`*^9, 3.9943525454102087`*^9, 3.994384605089348*^9, + 3.994384704099424*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"9303aeac-65eb-46d0-a0b1-0139414cd3ca"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c21"], "Input", + CellLabel->"In[60]:=",ExpressionUUID->"b44d3425-b192-4e3c-8b9c-888d81608d5b"], + +Cell[BoxData[ + RowBox[{"-", "0.5569156814457635`"}]], "Output", + CellChangeTimes->{ + 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.9943499951835318`*^9, 3.994352545420844*^9, 3.994384605103475*^9, + 3.9943847041112947`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"7fe8b958-470b-421f-a3c6-1b1d12521b16"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["c22"], "Input", + CellLabel->"In[61]:=",ExpressionUUID->"b818c8ac-54a4-4ae3-bdf2-e854382fc1a6"], + +Cell[BoxData["0.7095150675393332`"], "Output", + CellChangeTimes->{ + 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.994349995240162*^9, 3.994352545429587*^9, 3.9943846051169453`*^9, + 3.994384704124589*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"83cf5396-8b35-46a6-8f57-d7305ec9362e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w1"], "Input", + CellLabel->"In[62]:=",ExpressionUUID->"9361a024-5be8-4d5a-99b9-38a364266af0"], + +Cell[BoxData["2.2478963955971953`"], "Output", + CellChangeTimes->{ + 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.994349995256819*^9, 3.994352545438079*^9, 3.994384605130226*^9, + 3.9943847041390038`*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"585e71e8-f85e-4b21-9c89-cfa6d2eb8a49"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData["w2"], "Input", + CellLabel->"In[63]:=",ExpressionUUID->"c2dfc9a4-07ef-4d85-a2c6-b650b454a546"], + +Cell[BoxData["1.4243583722932822`"], "Output", + CellChangeTimes->{ + 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.994349995271885*^9, 3.994352545447249*^9, 3.994384605143569*^9, + 3.994384704151029*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"f77c3731-77d4-4e65-968c-e2378e05eda9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", + CellLabel->"In[64]:=",ExpressionUUID->"808fdb69-0ab6-4b13-8dd9-d7d68614e246"], + +Cell[BoxData[ + RowBox[{"-", "33.35096235519822`"}]], "Output", + CellChangeTimes->{ + 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994349995288454*^9, 3.9943525454560337`*^9, 3.9943846051579313`*^9, + 3.994384704163197*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"0abea612-c0e7-416e-a592-d8e45e698aac"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "3"}], + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", + CellLabel->"In[65]:=",ExpressionUUID->"ff539507-26e8-4e25-b83c-d396502c7858"], + +Cell[BoxData[ + RowBox[{"-", "6.430095836913352`"}]], "Output", + CellChangeTimes->{ + 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.994349995308022*^9, 3.994352545466178*^9, 3.994384605171722*^9, + 3.994384704175374*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"7205ac10-eb2c-45f3-9a6f-f5bd32623616"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB11", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U22"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c11", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c21", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R01", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b1"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[66]:=",ExpressionUUID->"90c44208-b182-4fb3-9146-9018fd3c991f"], + +Cell[BoxData["69.21916597543105`"], "Output", + CellChangeTimes->{ + 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.994349995325433*^9, 3.99435254547593*^9, 3.99438460517684*^9, + 3.994384704188039*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"c3891874-ca20-4041-b295-4d92b8234abc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB12", "=", + RowBox[{ + RowBox[{"-", + FractionBox["15", + RowBox[{"4", "\[Pi]"}]]}], + RowBox[{"(", + RowBox[{ + RowBox[{"c11", "*", "c12", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + RowBox[{"c21", "*", "c22", + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", + CellLabel->"In[67]:=",ExpressionUUID->"79ed964e-0dbc-4e6f-804f-5b8a5f86c50e"], + +Cell[BoxData[ + RowBox[{"-", "89.85372860437164`"}]], "Output", + CellChangeTimes->{ + 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.994349995369651*^9, 3.994352548486989*^9, 3.994384605198908*^9, + 3.994384704224327*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"e0c6c862-890d-4481-9d1d-ea438f444cba"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"BBB22", "=", + RowBox[{ + RowBox[{ + RowBox[{"-", "3"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "U21"}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c22", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U31"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U41"}], "+", "U42"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}], "+", + "\[IndentingNewLine]", + RowBox[{ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]], "*", + SuperscriptBox["c12", "2"], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U33"}], "+", "U32", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "U42"}], "+", "U41"}], ")"}]}], "+", + RowBox[{ + FractionBox["5", + RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"3", + FractionBox[ + RowBox[{"Z1", "*", "Z2", "*", "1.44"}], + SuperscriptBox["R00", "3"]], + SuperscriptBox["R02", "2"], "*", + RowBox[{"(", + RowBox[{ + RowBox[{ + SqrtBox[ + FractionBox["9", + RowBox[{"20", "\[Pi]"}]]], "*", "b2"}], "+", + RowBox[{ + FractionBox["6", + RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], + ")"}]}]}]}]], "Input", + CellLabel->"In[68]:=",ExpressionUUID->"0c56dce6-169a-4efe-b501-d9d1e994d1a1"], + +Cell[BoxData["99.62147446019029`"], "Output", + CellChangeTimes->{ + 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994349995385275*^9, 3.994352548743369*^9, 3.994384605213688*^9, + 3.9943847042370567`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"5f88080f-109b-4f77-a223-e0893f3c0150"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kb", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "+", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"5ffc8823-16a8-479e-9477-1c71a4ccd488"], + +Cell[BoxData["40.3202486570226`"], "Output", + CellChangeTimes->{ + 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.9943499953973846`*^9, 3.994352548750588*^9, 3.99438460522754*^9, + 3.994384704249699*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"feb13aa5-a195-4ee6-b65a-e329c9b6631d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Kw", "=", + RowBox[{ + RowBox[{"(", "BBB11", ")"}], "-", + RowBox[{"2", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], "*", + RowBox[{"(", "BBB12", ")"}]}], "+", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b1"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}], + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]], "*", "b2"}], "-", + RowBox[{ + FractionBox["1", + RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], + "2"], "*", + RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", + CellLabel->"In[70]:=",ExpressionUUID->"e44eb6ce-a936-4027-9489-8da44f4b6a1f"], + +Cell[BoxData["624.5259763904654`"], "Output", + CellChangeTimes->{ + 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.9943499954126587`*^9, 3.994352548759362*^9, 3.994384605241433*^9, + 3.9943847042621307`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"5d43789a-0d95-43e0-b863-031f947b2972"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"f1", "=", "0.8638738906"}]], "Input", + CellChangeTimes->{3.9918496921150837`*^9, 3.994235487372745*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], + +Cell[BoxData["0.8638738906`"], "Output", + CellChangeTimes->{3.994349988893268*^9, 3.994352541213336*^9, + 3.9943846052614098`*^9, 3.994384704274437*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"e97d6138-6381-42eb-93ea-1e18080fc528"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.9918496892276516`*^9, 3.9918496892324924`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.5114215939"}]], "Input", - CellChangeTimes->{3.991849690724144*^9, - 3.994235492669819*^9},ExpressionUUID->"328429c4-9130-334e-ba7f-\ -7dc8ec78e5b4"], + CellChangeTimes->{3.991849690724144*^9, 3.994235492669819*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], + +Cell[BoxData["0.5114215939`"], "Output", + CellChangeTimes->{3.994349989723563*^9, 3.9943525413037233`*^9, + 3.99438460528542*^9, 3.994384704289385*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"6fc1efaa-e4d2-4509-be9e-f2321d298db0"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991849693382303*^9, - 3.991849693386299*^9}},ExpressionUUID->"b3364ab6-86a4-7a46-ae33-\ -623392314869"], + CellChangeTimes->{{3.991849693382303*^9, 3.991849693386299*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ @@ -84,13 +4949,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], + CellLabel->"In[75]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.991339230528511*^9}, - CellLabel-> - "Out[316]=",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[BoxData["1.502378697384544`*^-53"], "Output", + CellChangeTimes->{3.991339230528511*^9, 3.994349989748518*^9, + 3.994352541351139*^9, 3.994384605309615*^9, 3.994384704304319*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"a186a3e0-6ca4-4839-8184-8dcf9b2b6fb9"] }, Open ]], Cell[CellGroupData[{ @@ -124,14 +4988,13 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557615205345*^9},ExpressionUUID->"35e76fc7-2f05-694a-b379-\ -67189aa511ad"], + CellChangeTimes->{3.991557615205345*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[BoxData["2.192147584896785`*^-54"], "Output", - CellChangeTimes->{3.991339230554512*^9}, - CellLabel-> - "Out[317]=",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[BoxData["1.3422410307557068`*^-54"], "Output", + CellChangeTimes->{3.991339230554512*^9, 3.994349989775379*^9, + 3.994352541373777*^9, 3.99438460532376*^9, 3.994384704317937*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"21061b19-5038-4536-be79-a0b18abe23b7"] }, Open ]], Cell[CellGroupData[{ @@ -164,14 +5027,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557618917984*^9, - 3.9915576208320503`*^9}},ExpressionUUID->"a10e19cd-f567-6b4d-a841-\ -5f01117db38b"], + CellChangeTimes->{{3.991557618917984*^9, 3.9915576208320503`*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[BoxData["3.508823705223133`*^-54"], "Output", - CellChangeTimes->{3.9913392305796223`*^9}, - CellLabel-> - "Out[318]=",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[BoxData["2.758393474248247`*^-54"], "Output", + CellChangeTimes->{3.9913392305796223`*^9, 3.9943499898162947`*^9, + 3.994352541391917*^9, 3.994384605338319*^9, 3.994384704330564*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"ff8ed238-c4cd-4b31-919e-a33217e339f8"] }, Open ]], Cell[CellGroupData[{ @@ -194,13 +5056,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], + CellLabel->"In[78]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[BoxData["44.37747929594205`"], "Output", - CellChangeTimes->{3.9913392305906105`*^9}, - CellLabel-> - "Out[319]=",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[BoxData["33.8214330516121`"], "Output", + CellChangeTimes->{3.9913392305906105`*^9, 3.994349989834147*^9, + 3.994352541410178*^9, 3.994384605351741*^9, 3.9943847043430643`*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"74981adf-6902-443e-9f15-bdded19056d4"] }, Open ]], Cell[CellGroupData[{ @@ -226,13 +5087,12 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], + CellLabel->"In[79]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[BoxData["102.55835649176893`"], "Output", - CellChangeTimes->{3.99133923061561*^9}, - CellLabel-> - "Out[320]=",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[BoxData["75.75326148956475`"], "Output", + CellChangeTimes->{3.99133923061561*^9, 3.994349989872396*^9, + 3.994352541433078*^9, 3.9943846053659487`*^9, 3.994384704355589*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"25ff2014-de1e-4127-9b07-6f9d0b0699a9"] }, Open ]], Cell[CellGroupData[{ @@ -241,13 +5101,12 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], + CellLabel->"In[80]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[BoxData["0.5630879721742558`"], "Output", - CellChangeTimes->{3.9913392306426105`*^9}, - CellLabel-> - "Out[321]=",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[BoxData["1.0918565865262573`"], "Output", + CellChangeTimes->{3.9913392306426105`*^9, 3.994349989902164*^9, + 3.9943525414567537`*^9, 3.994384605378463*^9, 3.994384704367877*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"f2da52a5-afab-4da4-8428-1bddd8524e51"] }, Open ]], Cell[CellGroupData[{ @@ -256,13 +5115,12 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], + CellLabel->"In[81]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[BoxData["1.956498159343112`"], "Output", - CellChangeTimes->{3.99133923065361*^9}, - CellLabel-> - "Out[322]=",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[BoxData["2.8712736516301174`"], "Output", + CellChangeTimes->{3.99133923065361*^9, 3.9943499899955797`*^9, + 3.994352541477469*^9, 3.99438460539089*^9, 3.9943847044757643`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"a57631c9-8e25-4287-a865-1f0ff01073f1"] }, Open ]], Cell[CellGroupData[{ @@ -271,13 +5129,12 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], + CellLabel->"In[82]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[BoxData["200.65523570140064`"], "Output", - CellChangeTimes->{3.9913392306776104`*^9}, - CellLabel-> - "Out[323]=",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[BoxData["217.50834374003372`"], "Output", + CellChangeTimes->{3.9913392306776104`*^9, 3.994349990035109*^9, + 3.994352541497242*^9, 3.994384605405444*^9, 3.9943847044908457`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"9aefc543-8b45-40bd-9064-1618e9e077e5"] }, Open ]], Cell[CellGroupData[{ @@ -286,13 +5143,12 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], + CellLabel->"In[83]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[BoxData["24.98842482695703`"], "Output", - CellChangeTimes->{3.991339230703802*^9}, - CellLabel-> - "Out[324]=",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[BoxData["36.92815444315952`"], "Output", + CellChangeTimes->{3.991339230703802*^9, 3.994349990081441*^9, + 3.994352541521111*^9, 3.99438460542133*^9, 3.994384704502993*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"3b57836f-a76e-4332-b992-e44a81460803"] }, Open ]], Cell[CellGroupData[{ @@ -481,13 +5337,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[325]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], + CellLabel->"In[84]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[BoxData["0.01829601703069907`"], "Output", - CellChangeTimes->{3.9913392307297993`*^9}, - CellLabel-> - "Out[325]=",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[BoxData["0.004661902873194626`"], "Output", + CellChangeTimes->{3.9913392307297993`*^9, 3.994349990119809*^9, + 3.994352541539516*^9, 3.9943846054383993`*^9, 3.994384704516354*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"77e2744c-041a-4502-922c-e5b070c350e9"] }, Open ]], Cell[CellGroupData[{ @@ -500,13 +5355,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], + CellLabel->"In[85]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.991339230837267*^9}, - CellLabel-> - "Out[326]=",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[BoxData["12.9796604118422`"], "Output", + CellChangeTimes->{3.991339230837267*^9, 3.9943503667183933`*^9, + 3.994352915355991*^9, 3.9943846055080433`*^9, 3.994384704640761*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"5d701014-2cad-45fc-85fe-c1cb356a12db"] }, Open ]], Cell[CellGroupData[{ @@ -697,13 +5551,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[327]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], + CellLabel->"In[86]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[BoxData["0.00990105610750653`"], "Output", - CellChangeTimes->{3.9913392308522797`*^9}, - CellLabel-> - "Out[327]=",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[BoxData["0.025673071893128063`"], "Output", + CellChangeTimes->{3.9913392308522797`*^9, 3.994350367635969*^9, + 3.994352916275052*^9, 3.994384605524426*^9, 3.99438470465584*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"776cdc9b-0bd0-434a-9456-53db2a511b34"] }, Open ]], Cell[CellGroupData[{ @@ -716,13 +5569,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[328]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], + CellLabel->"In[87]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[BoxData["8.906440683949702`"], "Output", - CellChangeTimes->{3.991339230966341*^9}, - CellLabel-> - "Out[328]=",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[BoxData["5.531030103536052`"], "Output", + CellChangeTimes->{3.991339230966341*^9, 3.994350749282404*^9, + 3.994353297703125*^9, 3.994384605564281*^9, 3.994384704693441*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"4d6568aa-0b00-423a-8be5-0a00f2a67ae3"] }, Open ]], Cell[CellGroupData[{ @@ -814,13 +5666,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[329]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], + CellLabel->"In[88]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991339230988348*^9}, - CellLabel-> - "Out[329]=",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[BoxData["0.09644452732399805`"], "Output", + CellChangeTimes->{3.991339230988348*^9, 3.9943507500648108`*^9, + 3.9943532984318657`*^9, 3.994384605580339*^9, 3.994384704708475*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"e4c38e4e-5d5e-47d4-b54f-cb0564c3c45e"] }, Open ]], Cell[CellGroupData[{ @@ -909,13 +5760,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], + CellLabel->"In[89]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991339231030445*^9}, - CellLabel-> - "Out[330]=",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[BoxData["0.903555472676002`"], "Output", + CellChangeTimes->{3.991339231030445*^9, 3.994350750084556*^9, + 3.994353298448777*^9, 3.994384605595036*^9, 3.994384704721115*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"a9413fb1-0342-4e52-a6ce-6899a1e6c2dd"] }, Open ]], Cell[CellGroupData[{ @@ -1037,19 +5887,18 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], + CellLabel->"In[90]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991339231060343*^9}, - CellLabel-> - "Out[331]=",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[BoxData["0.08714298047324866`"], "Output", + CellChangeTimes->{3.991339231060343*^9, 3.9943507501045027`*^9, + 3.994353298470153*^9, 3.9943846056103077`*^9, 3.994384704734415*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"8d37ff55-669a-4dbe-a8a9-2668522149cd"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"0055f95b-c532-\ -e24d-bdc4-544ea2d2fbd9"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ @@ -1110,68 +5959,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918497046469917`*^9},ExpressionUUID->"574b810b-aa4a-d545-b080-\ -c44fbe83a713"], + CellChangeTimes->{3.9918497046469917`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 332, 325, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310873375`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.650873745222287`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 92, 1, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.99435077664088*^9, + 3.994353324927289*^9, 3.994384605637051*^9, 3.994384704764921*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], +In[92]:=",ExpressionUUID->"98724400-7dcb-4caa-b74f-231793ff8b5e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 332, 326, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310973415`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.832599448291594`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 92, 2, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.99435077664088*^9, + 3.994353324927289*^9, 3.994384605637051*^9, 3.994384704810502*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], +In[92]:=",ExpressionUUID->"2af98b5e-ab50-42a7-b385-c9b7d5501ebf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 332, 327, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339231105339*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4198863278249528`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 92, 3, + 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.99435077664088*^9, + 3.994353324927289*^9, 3.994384605637051*^9, 3.9943847048148737`*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], +In[92]:=",ExpressionUUID->"7d3652d1-e514-4593-a9a6-05a55f63df66"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 332, 328, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392311143417`*^9}, +during this calculation.\"", 2, 92, 4, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.99435077664088*^9, + 3.994353324927289*^9, 3.994384605637051*^9, 3.994384704817729*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], +In[92]:=",ExpressionUUID->"47a5e455-aecc-4db8-9e53-2f5e95ee8c5b"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.9913392346332226`*^9}, - CellLabel-> - "Out[332]=",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[BoxData["12.979660411842195`"], "Output", + CellChangeTimes->{3.9943844227062807`*^9, 3.994384606796486*^9, + 3.9943847058986464`*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"d3c5e2cf-82ea-4d04-8e13-55bc9831e886"] }, Open ]], Cell[CellGroupData[{ @@ -1233,68 +6089,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849710877041*^9},ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-\ -656c90598e75"], + CellChangeTimes->{3.991849710877041*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 333, 329, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234667631*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.650873745222287`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 93, 5, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994384606842792*^9, + 3.994384705965568*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], +In[93]:=",ExpressionUUID->"c2c3906b-d245-42a4-a23c-d744b2e1f0d3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 333, 330, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234676628*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.832599448291594`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 93, 6, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994384606842792*^9, + 3.994384705968081*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], +In[93]:=",ExpressionUUID->"dff9fe07-2579-401e-a365-f7fdf2827aac"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 333, 331, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234685627*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4198863278249528`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 93, 7, + 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994384606842792*^9, + 3.994384705970282*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], +In[93]:=",ExpressionUUID->"8a2a580f-7af0-41d8-aa8c-4f4e8c4facdd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 333, 332, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133923469363*^9}, +during this calculation.\"", 2, 93, 8, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994384606842792*^9, + 3.994384705972189*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], +In[93]:=",ExpressionUUID->"a06c3051-9033-4762-a235-bbff734fdabb"], -Cell[BoxData["8.906440683949707`"], "Output", - CellChangeTimes->{3.99133923819088*^9}, - CellLabel-> - "Out[333]=",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[BoxData["5.531030103536052`"], "Output", + CellChangeTimes->{3.99133923819088*^9, 3.994384607953734*^9, + 3.994384707067273*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"2fe19f50-090c-4e86-8870-79436c5a55f8"] }, Open ]], Cell[CellGroupData[{ @@ -1350,92 +6213,93 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849713921898*^9},ExpressionUUID->"9c540ba7-8bb4-ef46-919c-\ -62296271f174"], + CellChangeTimes->{3.991849713921898*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4Vd0XB/AbpRIKIURyUTcp7jWm2iuzjJkyx3XvIYpIkkRCXkNm4o2U +KEkDMoS8KvlJipJIEcKVeTo099v+OM95Ps96zvestc/ZeyvTz4rNRaFQRvG1 +fPd/vWtbVfvr/Z4P6ofClDlo/1SBGlOvBB2SThMOx+7PU0+X06tD+zT5ry3b +kvWKh4/xHBlSlOLOY5cGhz9bpdeKaCFzbyKwY5s2NYQXv0HjxS6nI7Eftftf +/UXvRHbZviHR2GM9LaFnaruRm5n8xxhsiWGq06LuJ1TVHpEdh20yHap1svUz +Mt4VVXEJu/7X2Lrg4gF0NWDn7hTs9xFiZyt9v6C6OyE8GdhTPHpjC/RhxPfV +VzsbmyfhhANjaQR5aa99nYstLZjb7F87ivZVGNfnY5tLLt6c0p1AgSceV93F +Jq7JiiqtmUKNvTMN5djh8hbRPq3TiNPSsq0Gu1vsnUpg8SxqSwgQaMZmOXof +TUuYQyezIbENeyaHcr3Mdx5lZ1T4dGGvkVXaMEsnkdundDSKnc56ZrhBZBHl +eP9Vm8WWueUQvntpEd3yE4z7ga258+LU8dpvKOTUThMBFQ7yUv/cOqb7C3mP +6KjswV4IPrWSV+E3epU5udEA+3ztur20NX8Qv/ABOyvsLNC849n6F2mrfZn1 +wWYVNusFFK+A4M/il25gFzel9UdIcsHT/A2uZdgzHNfQlAQueDBUmvAEO3QH +Wf7AlxsaPixwDWCn399KnaavguqkSGs5Ogf1tE/U/7mxCtr1OgXVsWXmqhwF +RHhAMLZDyQi7RNU8VWmJB4y+vA87jt34KGTFsdo1ELRzRXQdNvms4/OoLh/E +mijKHmNwkJAp34az9XygL/yhNhpb+Z0e8GvxQ8y5wmd52N5DFddUdgmAu3yO +VCf2Ca5W5X18G2DupsBPPVUOGpa9Nxu9KAhX5MKctdTw+hAta9sYQsA1YN3t +gM11Z2TrJn8hWNdt+TQEW4axxap4XAi6Bp72P8Z21E0ue90vDL1NWYbG6hzU +5hFwUuylCMj45z4O1OCgvluJ8W5rREEim7E5B3tivPjGbX1RuJryc/QZNm/g +lw7tBlF43Ud9tVGTg/SibFTdKsSA99nYf7XYNQXqZFGeOPyY+WMhvYeDCoZ/ +BO0JlAKbeEEZ9X0cZGQb03fyrhQ8EnF67Ik90ShscHdECmZXt9VkY6sW7BSR +cZCGHDOt93+wG5mu5av2b4G+90pJr/Zz0Nx0/+nRSBko87PgPQccJHxc72G5 +mSywtkcryulx0EgBr5eltywknf+vzR27+lO75ORFWZCwgXd52M6mLpEKDbJA +sxT/s1kf96cYZJVNp8IFSb1OSQP8/rFbM2FicqCQ75KqaMRBNp7rlA4OyEPV +3JR5mikHoSBb+uHf8rBanDv+I/aO6DwNlrgCMEobqHJmHES5wdAJO6QAd2L2 ++lRi3+1zOlz2RAGeGNhafTbH+9OuJEIifxvokVwXdA7h/vTM3o8xaeDkaOFn +bsdBN6wvf1wKo4GlVoNOPnYic6B/5RUaVHv/DVjEZp0/NS7dQYOcssmveYc5 +SLAul2KtuwOo/5aoLNnj/4cxtaOWqgh8La9oVU4cJCmbFB4/tBMKIu48D3Xn +oLq4Bdp3LiVIl/KxHMJ2nnd4R2xVAg3jZCNTJgddbZSj6bgqQaKDUISUBwfJ +eta8/dalBHPfFYSfs/C8JcPyxMtd0KQo93i7FwdJSUoTMg7KYLfWXE3Hj4N2 +Fgby/UR0sGjVlK0P4yAmK5JUMqfDw8V0G81wvF+pqX1uznS4m1Y4UobNnX// +QVMwHSrXjtNun8f77eqYTWopHVxdNJT+vYDP0yy3XBqVAW/SnLcnXsTfN950 +lz2PKnjq6/5+nMhB1wPkLCta1cBEtCtm3zUOag9CGlGFWvAwSsjc5iUHbXXt +NHc5tg92Xz1cF/uLg9h/K+9JnQFgP6kpKFAeRWLj1avFmDpQm8O2nvcbRYGM +vZ9Sd+jBzdXtqSGlo4g5+atZeEwfOm4LjzxfGkV3dU6uzmszBJ0af4meg19R +wYL3k5J0Y4hL0GA0X/2Kvh3Y9Kox3AQYJnXyTyljqJfCPTvgbgZ59ePfV3qN +Id/NfskRVAtYnHv7Pvf1GLp3tLkhI9oSsqXW/lOpN45C5sWXFI8egt/6p9/o +PxpH5EEDu/8dsYKeK9o05/0TSMsp5cDwIWv48dGvt/Z/E+iteK53I8MGQqzY +H8vNJpHEzci6ou22MPpibxTv8CSq7t9has5vB87tBYZNp6eQ9LsZz6BJO9DP +rMgg+KYRIyOl5Eb/YbgsQXInlU2j3JXzu1Kf2cO3+Oaswe0zqPLA7p7oRw6w +OLW6c0vEDMrSiBP8VewIf5TFvjM/zKC2j4UXGQlOsPbpJsE3O2dRhVmO3Inz +zvDmwGCI4D+zaPa4NcWX5QJHc5xU4npnEWlA85rSdQVv/bN3FFTmUNHkh28n +1Y/AwCzIUePnkP31Qg8XPjdQCbWp+dg7h8rLTI5wx7hBLPdSRqzaPNKSfPs9 +9rsbfHgRPP41ah5R+z173hx1h35vHtWXbfNoaJ2PRc4XdyBKkyd5pRZQe6K5 +h6EtE64c2k82ui2g9OC8dafamSBe+TP2QcECqqv/+93D2AMo5ZVRcgMLaL0z +xDBqPMDNbPs5D2ESyWz8X9vmOg8Ik92RtHsjiZRbzTbx1HvACZm+bT+xrfY6 +3e5+4gGEX+NEsiiJ0jcHvTz3wgOSELuhUpxEEr131jd3e0CPxDrf8S0kknMV +y3Je8oCyBMfPS4ok0nKbKopWZUEfv+++DB0S3cyeOWmuzoIE9YWj6rok2tgx +t19MkwXRvj/lurCn9JfeFWmz4JXfVgMxfRKfX5QVrToskFjfp5JqSCKBJUEH +oUMsUFb9cjnAlERDl9TW5h1nQcWpfs4nWxIl1oYerb6J857USVt5kug4/bJW +cBELWIwd8R3YprdL12oWs+CAXVKUjReJeC+P3K66y4KemXEp26Mkig6wHKt8 +yAIukeujlj4kCqXJ+VQ8ZUHQ4Rcv6X4k8r788lhZHwsWnajaeUEkMhYY2RvQ +z4KLf5ukhU6TaHs0hZ8+yAKKQF9CFPZIgNrd0mFcz5RY4xVMInfzvMkHEyzQ +iqwPpoWQyH7VSd/7P1jQEn+annmORIYnJU6UiLLhlUlxrGgUiZ7mXTyYuokN +Lv/VCkVi722dkwuWYMPks1aBaWxl+ZcfdKXZUFqQdeR5NInEu87qfpRnw4fk +eHefGBKN7+kV5VVjg87zjnc5cSRK4rr22NOaDXnnJKfSk/H8u/myzGzZMJ/x ++/40dpRTcADjMBsuRPgMGqeQKPih5ba/jmz4G3Qj6xe2O7EiJZPJhm6PTCOn +NBIxWpis5/5ssDY4fet3Bom6UuTXUZPZ8CnbaqrzXxLdQ/xeoym4bqTwQvwK +zp9caLybxgZCw0LeBZtu3BimeZkNZ5QD3AexEykec2ZX2WBZUcMZySGRgd+1 +D8ElbMhRSpTtvkoiKal/1PffY4Pqeh/+jXkkWmjxS+N+wAZt5kSwBXa+AjJL +LGfDc5nyN43Yv3t7G27UsEGAqhZ7+xqJHppKFr1uZsO0ROBqp3wSxf/gWpXe +wgZ7q5mlRGxm0Zi7Qyuelzzl9RR7w8oayaE2Nlg9OfNi2w0SHau1T/r+ng31 +5PG4CWzqjswguWE2GDcWUlwLSfSj61zH1xE2ZA5WTMZit0ezle+PskHe96Bj +BXbYgOqY1gQbUMZgKe9NEvVkdbhYzLNh1VmK433s1NWC+iErCLge2RTTf4tE +dXO9ToHcBEj6V11aU0QiTm9xgO8qArazueZ3Y+99qHeNuZYAHrWoj6HYI27B +Pw8KErC114K6/jbu31RfSF+YAOap7VQ6traGEA2JENCmL3HBBjuZv8SOIU7A +rXpFl8vL9ZrPpZJbcT5lX4xIMYmIwpJmESoB92xFwhnYyclnPq+XJ6Dr9etO +S+wRQph/JY2AmJqXebHLdWFDrwllAnx5dAvnsWv+CIeP0AmQFz6TxneHRMNf ++zP6VQkomnbrl8Pe0xDy7J0mAVlrVDKtsYeO3ZN+DARs/m3gfxtbwP6sWpUO +AXadYTaPsbV0jUxL9QiYnz6Q2Y6dKD54ptAI93/AQY3Erl55PznvIAG2ZwtT +eUpI9GX67K1sU1z/dcxcDFuzSaTzkiUBOa5HBtSxmaWD4zFWBIQ5RVbrY1/K +uc91wYaAhO6NU9bYgwHGykH2BCiuDwz0xeZ3FTU84UhA9x/t5yHLecZfXLyd +CZjsYQdeXH5+y7l4VzcCTI06J69gV/MezLdnEtBAE60uXM4jRR9ZsQiYuHy/ +/95y3sCXNlOCAIG0PM+q5bzWByMGXgSU7h8y/W+5v6pzv8GbgPyBs8lNy/n5 +BzdqHyNgaZhFf7Wcf0lMUc2XAKEPufSO5fzgoQO7T+D19JFP6cbmY5Xa0wII +iPb/YdaLrWER5kcNJEBkUPLowHL+HpOLUkEEvO/6Z3AIO0F+U65YMAH/JkMN +B7tyw3C5YAgBccd1Zr5iD/wsbVkXSoDE/KWo8eV8TtjAqjACuF/Inp7AVn9r +8u1vOF7/Gkrzsv8PL+f0Uw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -1449,104 +6313,106 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwV1Hk4Vd0XB/AbpRIKIURyUTcp7jWm2iuzjJkyx3XvIYpIkkRCXkNm4o2U +KEkDMoS8KvlJipJIEcKVeTo099v+OM95Ps96zvestc/ZeyvTz4rNRaFQRvG1 +fPd/vWtbVfvr/Z4P6ofClDlo/1SBGlOvBB2SThMOx+7PU0+X06tD+zT5ry3b +kvWKh4/xHBlSlOLOY5cGhz9bpdeKaCFzbyKwY5s2NYQXv0HjxS6nI7Eftftf +/UXvRHbZviHR2GM9LaFnaruRm5n8xxhsiWGq06LuJ1TVHpEdh20yHap1svUz +Mt4VVXEJu/7X2Lrg4gF0NWDn7hTs9xFiZyt9v6C6OyE8GdhTPHpjC/RhxPfV +VzsbmyfhhANjaQR5aa99nYstLZjb7F87ivZVGNfnY5tLLt6c0p1AgSceV93F +Jq7JiiqtmUKNvTMN5djh8hbRPq3TiNPSsq0Gu1vsnUpg8SxqSwgQaMZmOXof +TUuYQyezIbENeyaHcr3Mdx5lZ1T4dGGvkVXaMEsnkdundDSKnc56ZrhBZBHl +eP9Vm8WWueUQvntpEd3yE4z7ga258+LU8dpvKOTUThMBFQ7yUv/cOqb7C3mP +6KjswV4IPrWSV+E3epU5udEA+3ztur20NX8Qv/ABOyvsLNC849n6F2mrfZn1 +wWYVNusFFK+A4M/il25gFzel9UdIcsHT/A2uZdgzHNfQlAQueDBUmvAEO3QH +Wf7AlxsaPixwDWCn399KnaavguqkSGs5Ogf1tE/U/7mxCtr1OgXVsWXmqhwF +RHhAMLZDyQi7RNU8VWmJB4y+vA87jt34KGTFsdo1ELRzRXQdNvms4/OoLh/E +mijKHmNwkJAp34az9XygL/yhNhpb+Z0e8GvxQ8y5wmd52N5DFddUdgmAu3yO +VCf2Ca5W5X18G2DupsBPPVUOGpa9Nxu9KAhX5MKctdTw+hAta9sYQsA1YN3t +gM11Z2TrJn8hWNdt+TQEW4axxap4XAi6Bp72P8Z21E0ue90vDL1NWYbG6hzU +5hFwUuylCMj45z4O1OCgvluJ8W5rREEim7E5B3tivPjGbX1RuJryc/QZNm/g +lw7tBlF43Ud9tVGTg/SibFTdKsSA99nYf7XYNQXqZFGeOPyY+WMhvYeDCoZ/ +BO0JlAKbeEEZ9X0cZGQb03fyrhQ8EnF67Ik90ShscHdECmZXt9VkY6sW7BSR +cZCGHDOt93+wG5mu5av2b4G+90pJr/Zz0Nx0/+nRSBko87PgPQccJHxc72G5 +mSywtkcryulx0EgBr5eltywknf+vzR27+lO75ORFWZCwgXd52M6mLpEKDbJA +sxT/s1kf96cYZJVNp8IFSb1OSQP8/rFbM2FicqCQ75KqaMRBNp7rlA4OyEPV +3JR5mikHoSBb+uHf8rBanDv+I/aO6DwNlrgCMEobqHJmHES5wdAJO6QAd2L2 ++lRi3+1zOlz2RAGeGNhafTbH+9OuJEIifxvokVwXdA7h/vTM3o8xaeDkaOFn +bsdBN6wvf1wKo4GlVoNOPnYic6B/5RUaVHv/DVjEZp0/NS7dQYOcssmveYc5 +SLAul2KtuwOo/5aoLNnj/4cxtaOWqgh8La9oVU4cJCmbFB4/tBMKIu48D3Xn +oLq4Bdp3LiVIl/KxHMJ2nnd4R2xVAg3jZCNTJgddbZSj6bgqQaKDUISUBwfJ +eta8/dalBHPfFYSfs/C8JcPyxMtd0KQo93i7FwdJSUoTMg7KYLfWXE3Hj4N2 +Fgby/UR0sGjVlK0P4yAmK5JUMqfDw8V0G81wvF+pqX1uznS4m1Y4UobNnX// +QVMwHSrXjtNun8f77eqYTWopHVxdNJT+vYDP0yy3XBqVAW/SnLcnXsTfN950 +lz2PKnjq6/5+nMhB1wPkLCta1cBEtCtm3zUOag9CGlGFWvAwSsjc5iUHbXXt +NHc5tg92Xz1cF/uLg9h/K+9JnQFgP6kpKFAeRWLj1avFmDpQm8O2nvcbRYGM +vZ9Sd+jBzdXtqSGlo4g5+atZeEwfOm4LjzxfGkV3dU6uzmszBJ0af4meg19R +wYL3k5J0Y4hL0GA0X/2Kvh3Y9Kox3AQYJnXyTyljqJfCPTvgbgZ59ePfV3qN +Id/NfskRVAtYnHv7Pvf1GLp3tLkhI9oSsqXW/lOpN45C5sWXFI8egt/6p9/o +PxpH5EEDu/8dsYKeK9o05/0TSMsp5cDwIWv48dGvt/Z/E+iteK53I8MGQqzY +H8vNJpHEzci6ou22MPpibxTv8CSq7t9has5vB87tBYZNp6eQ9LsZz6BJO9DP +rMgg+KYRIyOl5Eb/YbgsQXInlU2j3JXzu1Kf2cO3+Oaswe0zqPLA7p7oRw6w +OLW6c0vEDMrSiBP8VewIf5TFvjM/zKC2j4UXGQlOsPbpJsE3O2dRhVmO3Inz +zvDmwGCI4D+zaPa4NcWX5QJHc5xU4npnEWlA85rSdQVv/bN3FFTmUNHkh28n +1Y/AwCzIUePnkP31Qg8XPjdQCbWp+dg7h8rLTI5wx7hBLPdSRqzaPNKSfPs9 +9rsbfHgRPP41ah5R+z173hx1h35vHtWXbfNoaJ2PRc4XdyBKkyd5pRZQe6K5 +h6EtE64c2k82ui2g9OC8dafamSBe+TP2QcECqqv/+93D2AMo5ZVRcgMLaL0z +xDBqPMDNbPs5D2ESyWz8X9vmOg8Ik92RtHsjiZRbzTbx1HvACZm+bT+xrfY6 +3e5+4gGEX+NEsiiJ0jcHvTz3wgOSELuhUpxEEr131jd3e0CPxDrf8S0kknMV +y3Je8oCyBMfPS4ok0nKbKopWZUEfv+++DB0S3cyeOWmuzoIE9YWj6rok2tgx +t19MkwXRvj/lurCn9JfeFWmz4JXfVgMxfRKfX5QVrToskFjfp5JqSCKBJUEH +oUMsUFb9cjnAlERDl9TW5h1nQcWpfs4nWxIl1oYerb6J857USVt5kug4/bJW +cBELWIwd8R3YprdL12oWs+CAXVKUjReJeC+P3K66y4KemXEp26Mkig6wHKt8 +yAIukeujlj4kCqXJ+VQ8ZUHQ4Rcv6X4k8r788lhZHwsWnajaeUEkMhYY2RvQ +z4KLf5ukhU6TaHs0hZ8+yAKKQF9CFPZIgNrd0mFcz5RY4xVMInfzvMkHEyzQ +iqwPpoWQyH7VSd/7P1jQEn+annmORIYnJU6UiLLhlUlxrGgUiZ7mXTyYuokN +Lv/VCkVi722dkwuWYMPks1aBaWxl+ZcfdKXZUFqQdeR5NInEu87qfpRnw4fk +eHefGBKN7+kV5VVjg87zjnc5cSRK4rr22NOaDXnnJKfSk/H8u/myzGzZMJ/x ++/40dpRTcADjMBsuRPgMGqeQKPih5ba/jmz4G3Qj6xe2O7EiJZPJhm6PTCOn +NBIxWpis5/5ssDY4fet3Bom6UuTXUZPZ8CnbaqrzXxLdQ/xeoym4bqTwQvwK +zp9caLybxgZCw0LeBZtu3BimeZkNZ5QD3AexEykec2ZX2WBZUcMZySGRgd+1 +D8ElbMhRSpTtvkoiKal/1PffY4Pqeh/+jXkkWmjxS+N+wAZt5kSwBXa+AjJL +LGfDc5nyN43Yv3t7G27UsEGAqhZ7+xqJHppKFr1uZsO0ROBqp3wSxf/gWpXe +wgZ7q5mlRGxm0Zi7Qyuelzzl9RR7w8oayaE2Nlg9OfNi2w0SHau1T/r+ng31 +5PG4CWzqjswguWE2GDcWUlwLSfSj61zH1xE2ZA5WTMZit0ezle+PskHe96Bj +BXbYgOqY1gQbUMZgKe9NEvVkdbhYzLNh1VmK433s1NWC+iErCLge2RTTf4tE +dXO9ToHcBEj6V11aU0QiTm9xgO8qArazueZ3Y+99qHeNuZYAHrWoj6HYI27B +Pw8KErC114K6/jbu31RfSF+YAOap7VQ6traGEA2JENCmL3HBBjuZv8SOIU7A +rXpFl8vL9ZrPpZJbcT5lX4xIMYmIwpJmESoB92xFwhnYyclnPq+XJ6Dr9etO +S+wRQph/JY2AmJqXebHLdWFDrwllAnx5dAvnsWv+CIeP0AmQFz6TxneHRMNf ++zP6VQkomnbrl8Pe0xDy7J0mAVlrVDKtsYeO3ZN+DARs/m3gfxtbwP6sWpUO +AXadYTaPsbV0jUxL9QiYnz6Q2Y6dKD54ptAI93/AQY3Erl55PznvIAG2ZwtT +eUpI9GX67K1sU1z/dcxcDFuzSaTzkiUBOa5HBtSxmaWD4zFWBIQ5RVbrY1/K +uc91wYaAhO6NU9bYgwHGykH2BCiuDwz0xeZ3FTU84UhA9x/t5yHLecZfXLyd +CZjsYQdeXH5+y7l4VzcCTI06J69gV/MezLdnEtBAE60uXM4jRR9ZsQiYuHy/ +/95y3sCXNlOCAIG0PM+q5bzWByMGXgSU7h8y/W+5v6pzv8GbgPyBs8lNy/n5 +BzdqHyNgaZhFf7Wcf0lMUc2XAKEPufSO5fzgoQO7T+D19JFP6cbmY5Xa0wII +iPb/YdaLrWER5kcNJEBkUPLowHL+HpOLUkEEvO/6Z3AIO0F+U65YMAH/JkMN +B7tyw3C5YAgBccd1Zr5iD/wsbVkXSoDE/KWo8eV8TtjAqjACuF/Inp7AVn9r +8u1vOF7/Gkrzsv8PL+f0Uw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.7246698825524732, + 1.3547179997073233`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.7246698825524748}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -1558,130 +6424,132 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.7246698825524732, + 1.3547179997073233`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.7246698825524748}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{115.12306105754327`, - 253.30690491292427`}, {-15.402138689748952`, 5.769736310251048}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwV1Hk4Vd0XB/AbpRIKIURyUTcp7jWm2iuzjJkyx3XvIYpIkkRCXkNm4o2U +KEkDMoS8KvlJipJIEcKVeTo099v+OM95Ps96zvestc/ZeyvTz4rNRaFQRvG1 +fPd/vWtbVfvr/Z4P6ofClDlo/1SBGlOvBB2SThMOx+7PU0+X06tD+zT5ry3b +kvWKh4/xHBlSlOLOY5cGhz9bpdeKaCFzbyKwY5s2NYQXv0HjxS6nI7Eftftf +/UXvRHbZviHR2GM9LaFnaruRm5n8xxhsiWGq06LuJ1TVHpEdh20yHap1svUz +Mt4VVXEJu/7X2Lrg4gF0NWDn7hTs9xFiZyt9v6C6OyE8GdhTPHpjC/RhxPfV +VzsbmyfhhANjaQR5aa99nYstLZjb7F87ivZVGNfnY5tLLt6c0p1AgSceV93F +Jq7JiiqtmUKNvTMN5djh8hbRPq3TiNPSsq0Gu1vsnUpg8SxqSwgQaMZmOXof +TUuYQyezIbENeyaHcr3Mdx5lZ1T4dGGvkVXaMEsnkdundDSKnc56ZrhBZBHl +eP9Vm8WWueUQvntpEd3yE4z7ga258+LU8dpvKOTUThMBFQ7yUv/cOqb7C3mP +6KjswV4IPrWSV+E3epU5udEA+3ztur20NX8Qv/ABOyvsLNC849n6F2mrfZn1 +wWYVNusFFK+A4M/il25gFzel9UdIcsHT/A2uZdgzHNfQlAQueDBUmvAEO3QH +Wf7AlxsaPixwDWCn399KnaavguqkSGs5Ogf1tE/U/7mxCtr1OgXVsWXmqhwF +RHhAMLZDyQi7RNU8VWmJB4y+vA87jt34KGTFsdo1ELRzRXQdNvms4/OoLh/E +mijKHmNwkJAp34az9XygL/yhNhpb+Z0e8GvxQ8y5wmd52N5DFddUdgmAu3yO +VCf2Ca5W5X18G2DupsBPPVUOGpa9Nxu9KAhX5MKctdTw+hAta9sYQsA1YN3t +gM11Z2TrJn8hWNdt+TQEW4axxap4XAi6Bp72P8Z21E0ue90vDL1NWYbG6hzU +5hFwUuylCMj45z4O1OCgvluJ8W5rREEim7E5B3tivPjGbX1RuJryc/QZNm/g +lw7tBlF43Ud9tVGTg/SibFTdKsSA99nYf7XYNQXqZFGeOPyY+WMhvYeDCoZ/ +BO0JlAKbeEEZ9X0cZGQb03fyrhQ8EnF67Ik90ShscHdECmZXt9VkY6sW7BSR +cZCGHDOt93+wG5mu5av2b4G+90pJr/Zz0Nx0/+nRSBko87PgPQccJHxc72G5 +mSywtkcryulx0EgBr5eltywknf+vzR27+lO75ORFWZCwgXd52M6mLpEKDbJA +sxT/s1kf96cYZJVNp8IFSb1OSQP8/rFbM2FicqCQ75KqaMRBNp7rlA4OyEPV +3JR5mikHoSBb+uHf8rBanDv+I/aO6DwNlrgCMEobqHJmHES5wdAJO6QAd2L2 ++lRi3+1zOlz2RAGeGNhafTbH+9OuJEIifxvokVwXdA7h/vTM3o8xaeDkaOFn +bsdBN6wvf1wKo4GlVoNOPnYic6B/5RUaVHv/DVjEZp0/NS7dQYOcssmveYc5 +SLAul2KtuwOo/5aoLNnj/4cxtaOWqgh8La9oVU4cJCmbFB4/tBMKIu48D3Xn +oLq4Bdp3LiVIl/KxHMJ2nnd4R2xVAg3jZCNTJgddbZSj6bgqQaKDUISUBwfJ +eta8/dalBHPfFYSfs/C8JcPyxMtd0KQo93i7FwdJSUoTMg7KYLfWXE3Hj4N2 +Fgby/UR0sGjVlK0P4yAmK5JUMqfDw8V0G81wvF+pqX1uznS4m1Y4UobNnX// +QVMwHSrXjtNun8f77eqYTWopHVxdNJT+vYDP0yy3XBqVAW/SnLcnXsTfN950 +lz2PKnjq6/5+nMhB1wPkLCta1cBEtCtm3zUOag9CGlGFWvAwSsjc5iUHbXXt +NHc5tg92Xz1cF/uLg9h/K+9JnQFgP6kpKFAeRWLj1avFmDpQm8O2nvcbRYGM +vZ9Sd+jBzdXtqSGlo4g5+atZeEwfOm4LjzxfGkV3dU6uzmszBJ0af4meg19R +wYL3k5J0Y4hL0GA0X/2Kvh3Y9Kox3AQYJnXyTyljqJfCPTvgbgZ59ePfV3qN +Id/NfskRVAtYnHv7Pvf1GLp3tLkhI9oSsqXW/lOpN45C5sWXFI8egt/6p9/o +PxpH5EEDu/8dsYKeK9o05/0TSMsp5cDwIWv48dGvt/Z/E+iteK53I8MGQqzY +H8vNJpHEzci6ou22MPpibxTv8CSq7t9has5vB87tBYZNp6eQ9LsZz6BJO9DP +rMgg+KYRIyOl5Eb/YbgsQXInlU2j3JXzu1Kf2cO3+Oaswe0zqPLA7p7oRw6w +OLW6c0vEDMrSiBP8VewIf5TFvjM/zKC2j4UXGQlOsPbpJsE3O2dRhVmO3Inz +zvDmwGCI4D+zaPa4NcWX5QJHc5xU4npnEWlA85rSdQVv/bN3FFTmUNHkh28n +1Y/AwCzIUePnkP31Qg8XPjdQCbWp+dg7h8rLTI5wx7hBLPdSRqzaPNKSfPs9 +9rsbfHgRPP41ah5R+z173hx1h35vHtWXbfNoaJ2PRc4XdyBKkyd5pRZQe6K5 +h6EtE64c2k82ui2g9OC8dafamSBe+TP2QcECqqv/+93D2AMo5ZVRcgMLaL0z +xDBqPMDNbPs5D2ESyWz8X9vmOg8Ik92RtHsjiZRbzTbx1HvACZm+bT+xrfY6 +3e5+4gGEX+NEsiiJ0jcHvTz3wgOSELuhUpxEEr131jd3e0CPxDrf8S0kknMV +y3Je8oCyBMfPS4ok0nKbKopWZUEfv+++DB0S3cyeOWmuzoIE9YWj6rok2tgx +t19MkwXRvj/lurCn9JfeFWmz4JXfVgMxfRKfX5QVrToskFjfp5JqSCKBJUEH +oUMsUFb9cjnAlERDl9TW5h1nQcWpfs4nWxIl1oYerb6J857USVt5kug4/bJW +cBELWIwd8R3YprdL12oWs+CAXVKUjReJeC+P3K66y4KemXEp26Mkig6wHKt8 +yAIukeujlj4kCqXJ+VQ8ZUHQ4Rcv6X4k8r788lhZHwsWnajaeUEkMhYY2RvQ +z4KLf5ukhU6TaHs0hZ8+yAKKQF9CFPZIgNrd0mFcz5RY4xVMInfzvMkHEyzQ +iqwPpoWQyH7VSd/7P1jQEn+annmORIYnJU6UiLLhlUlxrGgUiZ7mXTyYuokN +Lv/VCkVi722dkwuWYMPks1aBaWxl+ZcfdKXZUFqQdeR5NInEu87qfpRnw4fk +eHefGBKN7+kV5VVjg87zjnc5cSRK4rr22NOaDXnnJKfSk/H8u/myzGzZMJ/x ++/40dpRTcADjMBsuRPgMGqeQKPih5ba/jmz4G3Qj6xe2O7EiJZPJhm6PTCOn +NBIxWpis5/5ssDY4fet3Bom6UuTXUZPZ8CnbaqrzXxLdQ/xeoym4bqTwQvwK +zp9caLybxgZCw0LeBZtu3BimeZkNZ5QD3AexEykec2ZX2WBZUcMZySGRgd+1 +D8ElbMhRSpTtvkoiKal/1PffY4Pqeh/+jXkkWmjxS+N+wAZt5kSwBXa+AjJL +LGfDc5nyN43Yv3t7G27UsEGAqhZ7+xqJHppKFr1uZsO0ROBqp3wSxf/gWpXe +wgZ7q5mlRGxm0Zi7Qyuelzzl9RR7w8oayaE2Nlg9OfNi2w0SHau1T/r+ng31 +5PG4CWzqjswguWE2GDcWUlwLSfSj61zH1xE2ZA5WTMZit0ezle+PskHe96Bj +BXbYgOqY1gQbUMZgKe9NEvVkdbhYzLNh1VmK433s1NWC+iErCLge2RTTf4tE +dXO9ToHcBEj6V11aU0QiTm9xgO8qArazueZ3Y+99qHeNuZYAHrWoj6HYI27B +Pw8KErC114K6/jbu31RfSF+YAOap7VQ6traGEA2JENCmL3HBBjuZv8SOIU7A +rXpFl8vL9ZrPpZJbcT5lX4xIMYmIwpJmESoB92xFwhnYyclnPq+XJ6Dr9etO +S+wRQph/JY2AmJqXebHLdWFDrwllAnx5dAvnsWv+CIeP0AmQFz6TxneHRMNf ++zP6VQkomnbrl8Pe0xDy7J0mAVlrVDKtsYeO3ZN+DARs/m3gfxtbwP6sWpUO +AXadYTaPsbV0jUxL9QiYnz6Q2Y6dKD54ptAI93/AQY3Erl55PznvIAG2ZwtT +eUpI9GX67K1sU1z/dcxcDFuzSaTzkiUBOa5HBtSxmaWD4zFWBIQ5RVbrY1/K +uc91wYaAhO6NU9bYgwHGykH2BCiuDwz0xeZ3FTU84UhA9x/t5yHLecZfXLyd +CZjsYQdeXH5+y7l4VzcCTI06J69gV/MezLdnEtBAE60uXM4jRR9ZsQiYuHy/ +/95y3sCXNlOCAIG0PM+q5bzWByMGXgSU7h8y/W+5v6pzv8GbgPyBs8lNy/n5 +BzdqHyNgaZhFf7Wcf0lMUc2XAKEPufSO5fzgoQO7T+D19JFP6cbmY5Xa0wII +iPb/YdaLrWER5kcNJEBkUPLowHL+HpOLUkEEvO/6Z3AIO0F+U65YMAH/JkMN +B7tyw3C5YAgBccd1Zr5iD/wsbVkXSoDE/KWo8eV8TtjAqjACuF/Inp7AVn9r +8u1vOF7/Gkrzsv8PL+f0Uw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.7246698825524732, 1.3547179997073233`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.7246698825524748}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -1691,7 +6559,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5986424829233548}, + AxesOrigin->{0, 0.7246698825524748}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -1719,7 +6588,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7246698825524732, 1.3547179997073233`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -1727,9 +6597,9 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991339493274267*^9}, - CellLabel-> - "Out[334]=",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] + CellChangeTimes->{3.991339493274267*^9, 3.994384635867612*^9, + 3.99438483045212*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"49428130-3ed0-4404-96b4-cacefa0bbb92"] }, Open ]], Cell[CellGroupData[{ @@ -1792,262 +6662,158 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849724783457*^9},ExpressionUUID->"6e33cb28-ef1e-1547-b52d-\ -2171e7786920"], + CellChangeTimes->{3.991849724783457*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2261575897868585`*^-267\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.040099805592759`*^-270\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994384830672637*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"7ee992bf-ce80-406d-9280-1f02d83c27b2"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.836931842496716`*^-282\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 335, - 333, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493498577*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994384830675989*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], +In[95]:=",ExpressionUUID->"c337c175-0907-4c7c-8f0f-11d0ea90100b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.273330099721687`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.216336143754343`*^-294\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 335, 334, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493508564*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 11, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994384830679141*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.013344112917215`*^-290\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 335, 335, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493517563*^9}, - CellLabel-> - "During evaluation of \ -In[335]:=",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], +In[95]:=",ExpressionUUID->"18330615-b0ea-42e7-8c4f-7e21e78eed3c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 335, 336, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493525564*^9}, +during this calculation.\"", 2, 95, 12, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.9943848306822863`*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], +In[95]:=",ExpressionUUID->"9b5f16a7-c7f9-437a-b251-c493c9053efd"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd8XAHBFgwYVX0LG9+57yKwQee1dyhhKUqSQIXOZpUQZi4ylKEKv +wntXKSmKhKRCSIhS+qVBAxJp9Dv9cdddn7XuPXefe/bZ+yju3mvrMVNAQOAv +uf7dJwceNFLJ3DVPLvCSjsStWtOVL7l/be8RWLK0ZCQqSgJQ/PFuyd5MMFg6 +pGQZxYawTaU9gr1FsH1PeLFqlB4s+bI080fPVUguqIkUjDKBl7et937rqQfj +IFv6+EF7MKGGX4z1dEJ5bfWMlkhP+NGjf3K05zV0zC716ggOgwbjS9yOonGo +1Kw3WL8hEWReVr3drfYHNKS+z5hNZcB/fs6lc4wFUcvmuOFMl2zI1Da5Zb11 +Lro2S82Lbz8Dz05r1Y0tXoi/Tc5XqNkUQDI3+vFMqSUYoXRppX5NESw98b+j +WXliyOCULfH6zIVEO/M1nZPiKGFxYSqr6SIEGxQ6PzgiiT+S99stSS2G9SM/ +IwP+J42TE77zTv8tgf1mJ5bf/SSNbAt2VqtgKZQVqveJTUqj1xPvyum5pSBp +52JQNXcZxo67PnIQK4VPN+99F9RYhm5O4kpDSqWQdSQ9JCdiGaYPDu3ZvqkU +XouzAxoXyqDwHFezy/mlcNhos6v0KlnsXCVULqrNA7Nd+V/118livPP87Ee6 +PBCJ+Ri7daMsFq3Q94sx5MHZhviL6S6ymDjD/+MLYx7ctKj+OPuoLBYfzdH2 +sufB6HZm2PgzWbSJjaiviuTBrtCJYy0H5PC/6uX2m+p4wDq1TmY4ntixTi2x +kUfiTaPnpMvhmNCLsapmHkT+Vmlfx5VDy9AcU7EOHpyM3SVe1SKHtot6FE4O +8qAl4/65C7Ly2Npln/x0Bh8My3IqDt2Rx2UJZZHmwIf1PW1/vjTLo5Jxa3vt +Oj5YCwiZOnfK41sdkzwtEz642QY8gyF5HLl2JkfYig8mBxSjY2YpYFnTJkaG +Ix/2yU+eX6uqgAmq0scmQ/jQuOfc54YwBVyo6Hhs2SU+mP82ED14QAENe4Nf +y5fyoS29S29ljAL+dftUoUDz4VmVcAz3qAIe+FLyYOk1PnyZHyIaf1YBBfhW +N/pr+SB5xUzfpF4B/6e/qrX6KR/8psZimhcq4pUrv7b1CNBgGOgp8VZUEZvb +rxYUCdIwd7iPJyipiP7hIm3es2m40N/QvYahiLrGQr0f59MwUHtS7bqeIo7G +2V2tlaDBJt6gt9BZEcXkhtvOqdKgI3pY80C5Irb99ra0taVBIHmi8XSlIh4S +dn2Ra0dDm6CPY+UtRTygbuLy0p4G3wnb+LF7ipg8WGDotIMGbi/Vv6dPEUPk +da1Z7jRInGtOsBNk4LyVZdsnQmj4obp4QH0rA6XzBvekZ9EwmSd9eIUjA3sN +K2/anKTh2yIWZeDMQO5uH835p2j4Mm7gs96bgYnvktLDcml4fctt0jGKge8M +92nJF9Lw0PKGSNIFBqrNFna5SdNwv+Zu+fFSBm56uNrG8DINjZotdlmXGcgr +n+N/8woNtWKDuflVDEzLqdAruUbD1f55StdbGTjZkCG6s4qGXN9d8HqCgXUC +W/eJNNJw6oXX63c/GWiycUvalns0nLAJjv88zcAoM5+3J5poSF2R9GhKmIlv +7jrBggc0HPlVvm2RHBPtrnfTra3k/yTP2mdkwkQeVTz/bDcNXn8Wia2zZOKK +JvEpbg8NnnulK003MXGn/HN2aS8NLls0f9s6MjH1rox1SR8NdssckrwDmNgy +ZdgdOUCDEY9fkJ3NxELuNQ/fIRr6FXjnNpxhovThgEWqb2mIzC7J/3aOiXUz +aw+/I75x+OJZ2xIm+n/zqrd/T9Z3e8FpkdtMTHfWaBT5SENHa/6pmjomhgY/ +rK8g3mecl+13j4k1v7mp2z7RUKaRe+JhGxNnuoekZ32mQWXWifSEQSYqnNSx +GhqhoTkyM033LRMdr4Y0BY6S+Yymp74ZJvE/qFvyi5jbfzxl3TcmaqW8VRD6 +SoPC1cSkv7MptO3J1Bkdp+GOUkIiPZ/CqGxLK7dvNOzKi0twWkyhtsCvNU+I +zyQdjquWovD625qSkgmST84HYsLUKDSa2lem9Z2G6137o1naFC7ZF5F5jNjO +IuJQly6F84ZibQeJM3VDD+oAhRdn6HvHT9GgzQs+MGhMYfts5budxO0KQZHp +ZhRyGy5/l/lBw8IFeyO+bKZQOmeZYDEx/7B/eJ49hZuErZ69J7b47hu2cQeF +zS8vp7N/0vDBzyf0lzOFhkKfVFyJk157hZS6Ez8vuXCaWGn7nmAHbwqnLTKF +WombWj2C5gZQKFhubfqXWKhq9z7PcAqrt36M3PaLhvMarnvFD1KYeE/BP5p4 +Hdc5oDGGQr3Urg1c4ldSu/yD4ym8cujqrCbi6DQnP8YxCuMHPek3xHKzdvh2 +pJL5HMznCPym4Xakg09MFoULMmbfkCTeMbrNW/M0hVl9G6U1iH962HsNnCXv +p8l7IXFOv92e44UUHnRRL7QhXrV5i6fRRRJvBKtpB3FP02aPj6UUWkXe6HEn +DjPa5J57mcLxuKxuH2Lxq9Zu5hUUVmj4NPgTVyhZ7Z66SaFY4qf8f7bNs3S9 +VEOhpkSL97/nx0QtXOzrKdz9vJr6N16vH6Pd5z6FIpsDXzsQ1zX9hOgWCnVM +S+dsJC5WeHI5q4PCwpsWJw2J0yN58sXdJL71q1JYxBFdsWm3+yk0V3P4vIDY +RcNpuv0VhTu2n6gaJf/HLGnl3qEhCgtsO8baibVeL3j5Y5jCDLOpbJpY0mjI +WmSUwrXzvpYkEAtk19QyJsj484pVnYjfj5zU0P9J4dAOIVkN4sfmAfmW0xTu +uj526DdZz8rzJiIuQiy85bfD9j5x/h+5QyHCLHwSoX46lTig/PHOPDEW6h2r +OSRKbD+/uLVckoUFZ+wVH5P8WuMRw2mSZSFbSsQw6V8+SmnLjiixUGftyY4R +kq/fgoSPC6qzcNPwett84uctg7+X6rDwxa/OjebE/JjM52jEwhrRzddOkPw/ +0eezcetaFur+YinqEh9caXzb24SF+5ecX9A5SYPl+/EzmZtYeEff02UG8bDN +1h1v3Fn4VmVIXI/sv84S9UdT3iwsF2hJrib7tVpw9uqFe1m49MD8xNXER29U +SuvtZ6Hl6/AlK8j+VpaX7Es8zsJdEi4ZU6Q+LN4/an42k4Xvo12tXImnOpur +rpxiYc7TjOymL6R+JOzPeVbIQtXg0K4EUl/2fOnbrlrJQqkepvTAMA3WZtea +4RYLs74F71Al1itKXmVXx8J0vS/aoR9omG1vJBn1kIXzjnkX/X1Hw8WavJ62 +ARZKhjyl37+h4U2Ki33QHDa6fGZukSb1M2BYjaG1gI3nJ/8KrH1Bw3fTH58/ +L2Zjp8pwvftzGuYJZsZ7S7PxQI9dwnlSf7X2N1S4qLOxwX8j8y+p31EebDGb +LWzsX54XqvyYfL/h68CC7Wy82CjwSKGN5KPCndKHTmxcOa69TqL1X/3bts7E +k40fGJE5Uw9Jv9p8NJCzn40VXQyhM6R/SKz59Fj1HBu1YmXSttXQUHDm5pkP +59lo5PvIh3Gb1NsfcXsuFbORxfYKG64m9b9CdppxlY2KygKKQTdpcFtuoyF9 +j40WnM7nzqSfXZG4mjL3Ixu9HXyrrhfTYD4Sbj6kp4RZYyZ+mzNokNGWS5hr +pISzWjZcK0oj/TWosV51rRKGn7V/PHqc5MvkYqMgSyXcrhOaHHuMnBf+lGhM +OyuhXIaWbmwsDUELnotJHVVCcf5up0+kn+eq4MDGfiV8ocE4FLCVBj/ft9L7 +Ximhku74HactNACdsi1rSAnTagf+mG4m66H1rP3ZiBIyc2YEi1vRoLEqqMFT +SBkLkwI9UtbT0GDCLY5RV0ZKYFHcRx0aPrnNDa6IVsau6Jlx4QtJvPnra+7E +KePSpztlxMh5ZuRZzJxHR5XxufS9cd5cGr7a/DgzmKWME6K57k/Jeej76uFG +kWJllC8q2DfnJx9m/tci4d2ujN801Dd8GOKDVGNatayiCr6/FJTIv0XOd9TS +mYn1Kuhm4hsX7syHD7tNi1ffV0GTVz7TBU58SCkMtx59pIIC6wodmx348ESu +N9fhqQoeiXh+fbEdH1ykclaovVfBY+63ZJLM+LBfZJlHx8LlGFQrlC2qzQf+ +lFzzMoflaBz+KSVPgA+irezUKyPL0fR9XH5TDg9kki5v0tNTw46Yp0KvCkvh +tKrBYrE96mgxJzn01LkSeCi9Vnc8QwPVbf8eyzteDIYy9ema3Zq4QaOlZnzz +JRARLApxPaKFbRveZfvJXQS5w/JGDmxtvPeufU/pfS4Is5wqbe9r4+vHp9Jm +BJ0HDY7U5fCdOnjo4IIeB50iCBoQbbAQWIESoUFVK/oKYGQ8Zav56RX4Ivmv +S4jROTDVbMo1V1+Jvl6+3JKXZ6F2fPWv720rUf3Z454I91wIUNPp6/DQxaI/ +Ik+1VU8D54t7l4OwHipofDV+NHASNlCSVguL9FDnoBeD250FyjHHIur19fEo +w/RR2UQGLPcwuMPq08ea6NsDyQvTwaPWK64icBVmzyjM/vooBe4UdLmPiRtg +Bas1rfHAUfhWPP1d84YBrpy4o9IZkwBuLJ5wrpUhztRhe36eiIWx5Vl6V0cN +8Ybg0cuaIYfhJvfX4ETSakxfzhFWow+B43omrpYzQodKJ58TnyNhmX9ilUad +EZaXFSdamYWD+Dy/cqttHGQazfIWwBDgGkdFjjpwMCVXfs3qFSGgE5VqnOXE +wce1YiUH2SFgPXrlaa8rB3MygvXFFoZAQvfEDzc/DnaEhE6m9gXDVFH0usjD +HPTpDRO4ExYMfauznlzkcfBStLXj2LUg8ArlnjUv4+C4p0nsz0tBMFl23ePT +FQ4Kf9n+Q/hsEIgyer9rV3JQ5Pb1htVxQWA5V1ampo6DnoaXMobtguB210X3 +J085eOS0rXjw90CwELmpHtbLQd3RldMvPwZCr+mDScl+Du5d371ky6tA+Fb9 +MWnXKw6eG8diyweBoF6oRX8Y5qCFhLJjwplAuN23NizlMwdLYoMtqHQy3n9b +QHOUgwkS9pub4wLBMzG0I2SCg9xdbTmMADJeXULu0ikO6qv0d/fuDoQjP0+5 +Vf/koMkGf8WT2wJh8coStZ1/ONh5EMO3bQyEfP/qielpDrpVLO6WXxsI/wec +FVTa "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2061,221 +6827,114 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwV1nk0Vd8XAHBFgwYVX0LG9+57yKwQee1dyhhKUqSQIXOZpUQZi4ylKEKv +wntXKSmKhKRCSIhS+qVBAxJp9Dv9cdddn7XuPXefe/bZ+yju3mvrMVNAQOAv +uf7dJwceNFLJ3DVPLvCSjsStWtOVL7l/be8RWLK0ZCQqSgJQ/PFuyd5MMFg6 +pGQZxYawTaU9gr1FsH1PeLFqlB4s+bI080fPVUguqIkUjDKBl7et937rqQfj +IFv6+EF7MKGGX4z1dEJ5bfWMlkhP+NGjf3K05zV0zC716ggOgwbjS9yOonGo +1Kw3WL8hEWReVr3drfYHNKS+z5hNZcB/fs6lc4wFUcvmuOFMl2zI1Da5Zb11 +Lro2S82Lbz8Dz05r1Y0tXoi/Tc5XqNkUQDI3+vFMqSUYoXRppX5NESw98b+j +WXliyOCULfH6zIVEO/M1nZPiKGFxYSqr6SIEGxQ6PzgiiT+S99stSS2G9SM/ +IwP+J42TE77zTv8tgf1mJ5bf/SSNbAt2VqtgKZQVqveJTUqj1xPvyum5pSBp +52JQNXcZxo67PnIQK4VPN+99F9RYhm5O4kpDSqWQdSQ9JCdiGaYPDu3ZvqkU +XouzAxoXyqDwHFezy/mlcNhos6v0KlnsXCVULqrNA7Nd+V/118livPP87Ee6 +PBCJ+Ri7daMsFq3Q94sx5MHZhviL6S6ymDjD/+MLYx7ctKj+OPuoLBYfzdH2 +sufB6HZm2PgzWbSJjaiviuTBrtCJYy0H5PC/6uX2m+p4wDq1TmY4ntixTi2x +kUfiTaPnpMvhmNCLsapmHkT+Vmlfx5VDy9AcU7EOHpyM3SVe1SKHtot6FE4O +8qAl4/65C7Ly2Npln/x0Bh8My3IqDt2Rx2UJZZHmwIf1PW1/vjTLo5Jxa3vt +Oj5YCwiZOnfK41sdkzwtEz642QY8gyF5HLl2JkfYig8mBxSjY2YpYFnTJkaG +Ix/2yU+eX6uqgAmq0scmQ/jQuOfc54YwBVyo6Hhs2SU+mP82ED14QAENe4Nf +y5fyoS29S29ljAL+dftUoUDz4VmVcAz3qAIe+FLyYOk1PnyZHyIaf1YBBfhW +N/pr+SB5xUzfpF4B/6e/qrX6KR/8psZimhcq4pUrv7b1CNBgGOgp8VZUEZvb +rxYUCdIwd7iPJyipiP7hIm3es2m40N/QvYahiLrGQr0f59MwUHtS7bqeIo7G +2V2tlaDBJt6gt9BZEcXkhtvOqdKgI3pY80C5Irb99ra0taVBIHmi8XSlIh4S +dn2Ra0dDm6CPY+UtRTygbuLy0p4G3wnb+LF7ipg8WGDotIMGbi/Vv6dPEUPk +da1Z7jRInGtOsBNk4LyVZdsnQmj4obp4QH0rA6XzBvekZ9EwmSd9eIUjA3sN +K2/anKTh2yIWZeDMQO5uH835p2j4Mm7gs96bgYnvktLDcml4fctt0jGKge8M +92nJF9Lw0PKGSNIFBqrNFna5SdNwv+Zu+fFSBm56uNrG8DINjZotdlmXGcgr +n+N/8woNtWKDuflVDEzLqdAruUbD1f55StdbGTjZkCG6s4qGXN9d8HqCgXUC +W/eJNNJw6oXX63c/GWiycUvalns0nLAJjv88zcAoM5+3J5poSF2R9GhKmIlv +7jrBggc0HPlVvm2RHBPtrnfTra3k/yTP2mdkwkQeVTz/bDcNXn8Wia2zZOKK +JvEpbg8NnnulK003MXGn/HN2aS8NLls0f9s6MjH1rox1SR8NdssckrwDmNgy +ZdgdOUCDEY9fkJ3NxELuNQ/fIRr6FXjnNpxhovThgEWqb2mIzC7J/3aOiXUz +aw+/I75x+OJZ2xIm+n/zqrd/T9Z3e8FpkdtMTHfWaBT5SENHa/6pmjomhgY/ +rK8g3mecl+13j4k1v7mp2z7RUKaRe+JhGxNnuoekZ32mQWXWifSEQSYqnNSx +GhqhoTkyM033LRMdr4Y0BY6S+Yymp74ZJvE/qFvyi5jbfzxl3TcmaqW8VRD6 +SoPC1cSkv7MptO3J1Bkdp+GOUkIiPZ/CqGxLK7dvNOzKi0twWkyhtsCvNU+I +zyQdjquWovD625qSkgmST84HYsLUKDSa2lem9Z2G6137o1naFC7ZF5F5jNjO +IuJQly6F84ZibQeJM3VDD+oAhRdn6HvHT9GgzQs+MGhMYfts5budxO0KQZHp +ZhRyGy5/l/lBw8IFeyO+bKZQOmeZYDEx/7B/eJ49hZuErZ69J7b47hu2cQeF +zS8vp7N/0vDBzyf0lzOFhkKfVFyJk157hZS6Ez8vuXCaWGn7nmAHbwqnLTKF +WombWj2C5gZQKFhubfqXWKhq9z7PcAqrt36M3PaLhvMarnvFD1KYeE/BP5p4 +Hdc5oDGGQr3Urg1c4ldSu/yD4ym8cujqrCbi6DQnP8YxCuMHPek3xHKzdvh2 +pJL5HMznCPym4Xakg09MFoULMmbfkCTeMbrNW/M0hVl9G6U1iH962HsNnCXv +p8l7IXFOv92e44UUHnRRL7QhXrV5i6fRRRJvBKtpB3FP02aPj6UUWkXe6HEn +DjPa5J57mcLxuKxuH2Lxq9Zu5hUUVmj4NPgTVyhZ7Z66SaFY4qf8f7bNs3S9 +VEOhpkSL97/nx0QtXOzrKdz9vJr6N16vH6Pd5z6FIpsDXzsQ1zX9hOgWCnVM +S+dsJC5WeHI5q4PCwpsWJw2J0yN58sXdJL71q1JYxBFdsWm3+yk0V3P4vIDY +RcNpuv0VhTu2n6gaJf/HLGnl3qEhCgtsO8baibVeL3j5Y5jCDLOpbJpY0mjI +WmSUwrXzvpYkEAtk19QyJsj484pVnYjfj5zU0P9J4dAOIVkN4sfmAfmW0xTu +uj526DdZz8rzJiIuQiy85bfD9j5x/h+5QyHCLHwSoX46lTig/PHOPDEW6h2r +OSRKbD+/uLVckoUFZ+wVH5P8WuMRw2mSZSFbSsQw6V8+SmnLjiixUGftyY4R +kq/fgoSPC6qzcNPwett84uctg7+X6rDwxa/OjebE/JjM52jEwhrRzddOkPw/ +0eezcetaFur+YinqEh9caXzb24SF+5ecX9A5SYPl+/EzmZtYeEff02UG8bDN +1h1v3Fn4VmVIXI/sv84S9UdT3iwsF2hJrib7tVpw9uqFe1m49MD8xNXER29U +SuvtZ6Hl6/AlK8j+VpaX7Es8zsJdEi4ZU6Q+LN4/an42k4Xvo12tXImnOpur +rpxiYc7TjOymL6R+JOzPeVbIQtXg0K4EUl/2fOnbrlrJQqkepvTAMA3WZtea +4RYLs74F71Al1itKXmVXx8J0vS/aoR9omG1vJBn1kIXzjnkX/X1Hw8WavJ62 +ARZKhjyl37+h4U2Ki33QHDa6fGZukSb1M2BYjaG1gI3nJ/8KrH1Bw3fTH58/ +L2Zjp8pwvftzGuYJZsZ7S7PxQI9dwnlSf7X2N1S4qLOxwX8j8y+p31EebDGb +LWzsX54XqvyYfL/h68CC7Wy82CjwSKGN5KPCndKHTmxcOa69TqL1X/3bts7E +k40fGJE5Uw9Jv9p8NJCzn40VXQyhM6R/SKz59Fj1HBu1YmXSttXQUHDm5pkP +59lo5PvIh3Gb1NsfcXsuFbORxfYKG64m9b9CdppxlY2KygKKQTdpcFtuoyF9 +j40WnM7nzqSfXZG4mjL3Ixu9HXyrrhfTYD4Sbj6kp4RZYyZ+mzNokNGWS5hr +pISzWjZcK0oj/TWosV51rRKGn7V/PHqc5MvkYqMgSyXcrhOaHHuMnBf+lGhM +OyuhXIaWbmwsDUELnotJHVVCcf5up0+kn+eq4MDGfiV8ocE4FLCVBj/ft9L7 +Ximhku74HactNACdsi1rSAnTagf+mG4m66H1rP3ZiBIyc2YEi1vRoLEqqMFT +SBkLkwI9UtbT0GDCLY5RV0ZKYFHcRx0aPrnNDa6IVsau6Jlx4QtJvPnra+7E +KePSpztlxMh5ZuRZzJxHR5XxufS9cd5cGr7a/DgzmKWME6K57k/Jeej76uFG +kWJllC8q2DfnJx9m/tci4d2ujN801Dd8GOKDVGNatayiCr6/FJTIv0XOd9TS +mYn1Kuhm4hsX7syHD7tNi1ffV0GTVz7TBU58SCkMtx59pIIC6wodmx348ESu +N9fhqQoeiXh+fbEdH1ykclaovVfBY+63ZJLM+LBfZJlHx8LlGFQrlC2qzQf+ +lFzzMoflaBz+KSVPgA+irezUKyPL0fR9XH5TDg9kki5v0tNTw46Yp0KvCkvh +tKrBYrE96mgxJzn01LkSeCi9Vnc8QwPVbf8eyzteDIYy9ema3Zq4QaOlZnzz +JRARLApxPaKFbRveZfvJXQS5w/JGDmxtvPeufU/pfS4Is5wqbe9r4+vHp9Jm +BJ0HDY7U5fCdOnjo4IIeB50iCBoQbbAQWIESoUFVK/oKYGQ8Zav56RX4Ivmv +S4jROTDVbMo1V1+Jvl6+3JKXZ6F2fPWv720rUf3Z454I91wIUNPp6/DQxaI/ +Ik+1VU8D54t7l4OwHipofDV+NHASNlCSVguL9FDnoBeD250FyjHHIur19fEo +w/RR2UQGLPcwuMPq08ea6NsDyQvTwaPWK64icBVmzyjM/vooBe4UdLmPiRtg +Bas1rfHAUfhWPP1d84YBrpy4o9IZkwBuLJ5wrpUhztRhe36eiIWx5Vl6V0cN +8Ybg0cuaIYfhJvfX4ETSakxfzhFWow+B43omrpYzQodKJ58TnyNhmX9ilUad +EZaXFSdamYWD+Dy/cqttHGQazfIWwBDgGkdFjjpwMCVXfs3qFSGgE5VqnOXE +wce1YiUH2SFgPXrlaa8rB3MygvXFFoZAQvfEDzc/DnaEhE6m9gXDVFH0usjD +HPTpDRO4ExYMfauznlzkcfBStLXj2LUg8ArlnjUv4+C4p0nsz0tBMFl23ePT +FQ4Kf9n+Q/hsEIgyer9rV3JQ5Pb1htVxQWA5V1ampo6DnoaXMobtguB210X3 +J085eOS0rXjw90CwELmpHtbLQd3RldMvPwZCr+mDScl+Du5d371ky6tA+Fb9 +MWnXKw6eG8diyweBoF6oRX8Y5qCFhLJjwplAuN23NizlMwdLYoMtqHQy3n9b +QHOUgwkS9pub4wLBMzG0I2SCg9xdbTmMADJeXULu0ikO6qv0d/fuDoQjP0+5 +Vf/koMkGf8WT2wJh8coStZ1/ONh5EMO3bQyEfP/qielpDrpVLO6WXxsI/wec +FVTa "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.058566503624289196`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -2287,19 +6946,19 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.058566503624289196`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2313,220 +6972,113 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwV1nk0Vd8XAHBFgwYVX0LG9+57yKwQee1dyhhKUqSQIXOZpUQZi4ylKEKv +wntXKSmKhKRCSIhS+qVBAxJp9Dv9cdddn7XuPXefe/bZ+yju3mvrMVNAQOAv +uf7dJwceNFLJ3DVPLvCSjsStWtOVL7l/be8RWLK0ZCQqSgJQ/PFuyd5MMFg6 +pGQZxYawTaU9gr1FsH1PeLFqlB4s+bI080fPVUguqIkUjDKBl7et937rqQfj +IFv6+EF7MKGGX4z1dEJ5bfWMlkhP+NGjf3K05zV0zC716ggOgwbjS9yOonGo +1Kw3WL8hEWReVr3drfYHNKS+z5hNZcB/fs6lc4wFUcvmuOFMl2zI1Da5Zb11 +Lro2S82Lbz8Dz05r1Y0tXoi/Tc5XqNkUQDI3+vFMqSUYoXRppX5NESw98b+j +WXliyOCULfH6zIVEO/M1nZPiKGFxYSqr6SIEGxQ6PzgiiT+S99stSS2G9SM/ +IwP+J42TE77zTv8tgf1mJ5bf/SSNbAt2VqtgKZQVqveJTUqj1xPvyum5pSBp +52JQNXcZxo67PnIQK4VPN+99F9RYhm5O4kpDSqWQdSQ9JCdiGaYPDu3ZvqkU +XouzAxoXyqDwHFezy/mlcNhos6v0KlnsXCVULqrNA7Nd+V/118livPP87Ee6 +PBCJ+Ri7daMsFq3Q94sx5MHZhviL6S6ymDjD/+MLYx7ctKj+OPuoLBYfzdH2 +sufB6HZm2PgzWbSJjaiviuTBrtCJYy0H5PC/6uX2m+p4wDq1TmY4ntixTi2x +kUfiTaPnpMvhmNCLsapmHkT+Vmlfx5VDy9AcU7EOHpyM3SVe1SKHtot6FE4O +8qAl4/65C7Ly2Npln/x0Bh8My3IqDt2Rx2UJZZHmwIf1PW1/vjTLo5Jxa3vt +Oj5YCwiZOnfK41sdkzwtEz642QY8gyF5HLl2JkfYig8mBxSjY2YpYFnTJkaG +Ix/2yU+eX6uqgAmq0scmQ/jQuOfc54YwBVyo6Hhs2SU+mP82ED14QAENe4Nf +y5fyoS29S29ljAL+dftUoUDz4VmVcAz3qAIe+FLyYOk1PnyZHyIaf1YBBfhW +N/pr+SB5xUzfpF4B/6e/qrX6KR/8psZimhcq4pUrv7b1CNBgGOgp8VZUEZvb +rxYUCdIwd7iPJyipiP7hIm3es2m40N/QvYahiLrGQr0f59MwUHtS7bqeIo7G +2V2tlaDBJt6gt9BZEcXkhtvOqdKgI3pY80C5Irb99ra0taVBIHmi8XSlIh4S +dn2Ra0dDm6CPY+UtRTygbuLy0p4G3wnb+LF7ipg8WGDotIMGbi/Vv6dPEUPk +da1Z7jRInGtOsBNk4LyVZdsnQmj4obp4QH0rA6XzBvekZ9EwmSd9eIUjA3sN +K2/anKTh2yIWZeDMQO5uH835p2j4Mm7gs96bgYnvktLDcml4fctt0jGKge8M +92nJF9Lw0PKGSNIFBqrNFna5SdNwv+Zu+fFSBm56uNrG8DINjZotdlmXGcgr +n+N/8woNtWKDuflVDEzLqdAruUbD1f55StdbGTjZkCG6s4qGXN9d8HqCgXUC +W/eJNNJw6oXX63c/GWiycUvalns0nLAJjv88zcAoM5+3J5poSF2R9GhKmIlv +7jrBggc0HPlVvm2RHBPtrnfTra3k/yTP2mdkwkQeVTz/bDcNXn8Wia2zZOKK +JvEpbg8NnnulK003MXGn/HN2aS8NLls0f9s6MjH1rox1SR8NdssckrwDmNgy +ZdgdOUCDEY9fkJ3NxELuNQ/fIRr6FXjnNpxhovThgEWqb2mIzC7J/3aOiXUz +aw+/I75x+OJZ2xIm+n/zqrd/T9Z3e8FpkdtMTHfWaBT5SENHa/6pmjomhgY/ +rK8g3mecl+13j4k1v7mp2z7RUKaRe+JhGxNnuoekZ32mQWXWifSEQSYqnNSx +GhqhoTkyM033LRMdr4Y0BY6S+Yymp74ZJvE/qFvyi5jbfzxl3TcmaqW8VRD6 +SoPC1cSkv7MptO3J1Bkdp+GOUkIiPZ/CqGxLK7dvNOzKi0twWkyhtsCvNU+I +zyQdjquWovD625qSkgmST84HYsLUKDSa2lem9Z2G6137o1naFC7ZF5F5jNjO +IuJQly6F84ZibQeJM3VDD+oAhRdn6HvHT9GgzQs+MGhMYfts5budxO0KQZHp +ZhRyGy5/l/lBw8IFeyO+bKZQOmeZYDEx/7B/eJ49hZuErZ69J7b47hu2cQeF +zS8vp7N/0vDBzyf0lzOFhkKfVFyJk157hZS6Ez8vuXCaWGn7nmAHbwqnLTKF +WombWj2C5gZQKFhubfqXWKhq9z7PcAqrt36M3PaLhvMarnvFD1KYeE/BP5p4 +Hdc5oDGGQr3Urg1c4ldSu/yD4ym8cujqrCbi6DQnP8YxCuMHPek3xHKzdvh2 +pJL5HMznCPym4Xakg09MFoULMmbfkCTeMbrNW/M0hVl9G6U1iH962HsNnCXv +p8l7IXFOv92e44UUHnRRL7QhXrV5i6fRRRJvBKtpB3FP02aPj6UUWkXe6HEn +DjPa5J57mcLxuKxuH2Lxq9Zu5hUUVmj4NPgTVyhZ7Z66SaFY4qf8f7bNs3S9 +VEOhpkSL97/nx0QtXOzrKdz9vJr6N16vH6Pd5z6FIpsDXzsQ1zX9hOgWCnVM +S+dsJC5WeHI5q4PCwpsWJw2J0yN58sXdJL71q1JYxBFdsWm3+yk0V3P4vIDY +RcNpuv0VhTu2n6gaJf/HLGnl3qEhCgtsO8baibVeL3j5Y5jCDLOpbJpY0mjI +WmSUwrXzvpYkEAtk19QyJsj484pVnYjfj5zU0P9J4dAOIVkN4sfmAfmW0xTu +uj526DdZz8rzJiIuQiy85bfD9j5x/h+5QyHCLHwSoX46lTig/PHOPDEW6h2r +OSRKbD+/uLVckoUFZ+wVH5P8WuMRw2mSZSFbSsQw6V8+SmnLjiixUGftyY4R +kq/fgoSPC6qzcNPwett84uctg7+X6rDwxa/OjebE/JjM52jEwhrRzddOkPw/ +0eezcetaFur+YinqEh9caXzb24SF+5ecX9A5SYPl+/EzmZtYeEff02UG8bDN +1h1v3Fn4VmVIXI/sv84S9UdT3iwsF2hJrib7tVpw9uqFe1m49MD8xNXER29U +SuvtZ6Hl6/AlK8j+VpaX7Es8zsJdEi4ZU6Q+LN4/an42k4Xvo12tXImnOpur +rpxiYc7TjOymL6R+JOzPeVbIQtXg0K4EUl/2fOnbrlrJQqkepvTAMA3WZtea +4RYLs74F71Al1itKXmVXx8J0vS/aoR9omG1vJBn1kIXzjnkX/X1Hw8WavJ62 +ARZKhjyl37+h4U2Ki33QHDa6fGZukSb1M2BYjaG1gI3nJ/8KrH1Bw3fTH58/ +L2Zjp8pwvftzGuYJZsZ7S7PxQI9dwnlSf7X2N1S4qLOxwX8j8y+p31EebDGb +LWzsX54XqvyYfL/h68CC7Wy82CjwSKGN5KPCndKHTmxcOa69TqL1X/3bts7E +k40fGJE5Uw9Jv9p8NJCzn40VXQyhM6R/SKz59Fj1HBu1YmXSttXQUHDm5pkP +59lo5PvIh3Gb1NsfcXsuFbORxfYKG64m9b9CdppxlY2KygKKQTdpcFtuoyF9 +j40WnM7nzqSfXZG4mjL3Ixu9HXyrrhfTYD4Sbj6kp4RZYyZ+mzNokNGWS5hr +pISzWjZcK0oj/TWosV51rRKGn7V/PHqc5MvkYqMgSyXcrhOaHHuMnBf+lGhM +OyuhXIaWbmwsDUELnotJHVVCcf5up0+kn+eq4MDGfiV8ocE4FLCVBj/ft9L7 +Ximhku74HactNACdsi1rSAnTagf+mG4m66H1rP3ZiBIyc2YEi1vRoLEqqMFT +SBkLkwI9UtbT0GDCLY5RV0ZKYFHcRx0aPrnNDa6IVsau6Jlx4QtJvPnra+7E +KePSpztlxMh5ZuRZzJxHR5XxufS9cd5cGr7a/DgzmKWME6K57k/Jeej76uFG +kWJllC8q2DfnJx9m/tci4d2ujN801Dd8GOKDVGNatayiCr6/FJTIv0XOd9TS +mYn1Kuhm4hsX7syHD7tNi1ffV0GTVz7TBU58SCkMtx59pIIC6wodmx348ESu +N9fhqQoeiXh+fbEdH1ykclaovVfBY+63ZJLM+LBfZJlHx8LlGFQrlC2qzQf+ +lFzzMoflaBz+KSVPgA+irezUKyPL0fR9XH5TDg9kki5v0tNTw46Yp0KvCkvh +tKrBYrE96mgxJzn01LkSeCi9Vnc8QwPVbf8eyzteDIYy9ema3Zq4QaOlZnzz +JRARLApxPaKFbRveZfvJXQS5w/JGDmxtvPeufU/pfS4Is5wqbe9r4+vHp9Jm +BJ0HDY7U5fCdOnjo4IIeB50iCBoQbbAQWIESoUFVK/oKYGQ8Zav56RX4Ivmv +S4jROTDVbMo1V1+Jvl6+3JKXZ6F2fPWv720rUf3Z454I91wIUNPp6/DQxaI/ +Ik+1VU8D54t7l4OwHipofDV+NHASNlCSVguL9FDnoBeD250FyjHHIur19fEo +w/RR2UQGLPcwuMPq08ea6NsDyQvTwaPWK64icBVmzyjM/vooBe4UdLmPiRtg +Bas1rfHAUfhWPP1d84YBrpy4o9IZkwBuLJ5wrpUhztRhe36eiIWx5Vl6V0cN +8Ybg0cuaIYfhJvfX4ETSakxfzhFWow+B43omrpYzQodKJ58TnyNhmX9ilUad +EZaXFSdamYWD+Dy/cqttHGQazfIWwBDgGkdFjjpwMCVXfs3qFSGgE5VqnOXE +wce1YiUH2SFgPXrlaa8rB3MygvXFFoZAQvfEDzc/DnaEhE6m9gXDVFH0usjD +HPTpDRO4ExYMfauznlzkcfBStLXj2LUg8ArlnjUv4+C4p0nsz0tBMFl23ePT +FQ4Kf9n+Q/hsEIgyer9rV3JQ5Pb1htVxQWA5V1ampo6DnoaXMobtguB210X3 +J085eOS0rXjw90CwELmpHtbLQd3RldMvPwZCr+mDScl+Du5d371ky6tA+Fb9 +MWnXKw6eG8diyweBoF6oRX8Y5qCFhLJjwplAuN23NizlMwdLYoMtqHQy3n9b +QHOUgwkS9pub4wLBMzG0I2SCg9xdbTmMADJeXULu0ikO6qv0d/fuDoQjP0+5 +Vf/koMkGf8WT2wJh8coStZ1/ONh5EMO3bQyEfP/qielpDrpVLO6WXxsI/wec +FVTa "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.058566503624289196`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -2537,6 +7089,7 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -2564,7 +7117,8 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.11602348907445073`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.058566503624289196`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -2572,11 +7126,12 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991340117671425*^9}, - CellLabel-> - "Out[335]=",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] + CellChangeTimes->{3.991340117671425*^9, 3.994384981437283*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"4c702a14-b673-4235-ada5-4310ab2e47bc"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -2645,15 +7200,783 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003101"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.9942355603687773`*^9},ExpressionUUID->"2d5a8299-5376-9747-8056-\ -2bd9764114a1"], + 3.9942355603687773`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994384981592347*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"0a2064b9-49ef-4727-9da6-345542d3ad61"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-\ -0ac982b58a3a"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd8XAHBFgwYVX0LG9+57yKwQee1dyhhKUqSQIXOZpUQZi4ylKEKv +wntXKSmKhKRCSIhS+qVBAxJp9Dv9cdddn7XuPXefe/bZ+yju3mvrMVNAQOAv +uf7dJwceNFLJ3DVPLvCSjsStWtOVL7l/be8RWLK0ZCQqSgJQ/PFuyd5MMFg6 +pGQZxYawTaU9gr1FsH1PeLFqlB4s+bI080fPVUguqIkUjDKBl7et937rqQfj +IFv6+EF7MKGGX4z1dEJ5bfWMlkhP+NGjf3K05zV0zC716ggOgwbjS9yOonGo +1Kw3WL8hEWReVr3drfYHNKS+z5hNZcB/fs6lc4wFUcvmuOFMl2zI1Da5Zb11 +Lro2S82Lbz8Dz05r1Y0tXoi/Tc5XqNkUQDI3+vFMqSUYoXRppX5NESw98b+j +WXliyOCULfH6zIVEO/M1nZPiKGFxYSqr6SIEGxQ6PzgiiT+S99stSS2G9SM/ +IwP+J42TE77zTv8tgf1mJ5bf/SSNbAt2VqtgKZQVqveJTUqj1xPvyum5pSBp +52JQNXcZxo67PnIQK4VPN+99F9RYhm5O4kpDSqWQdSQ9JCdiGaYPDu3ZvqkU +XouzAxoXyqDwHFezy/mlcNhos6v0KlnsXCVULqrNA7Nd+V/118livPP87Ee6 +PBCJ+Ri7daMsFq3Q94sx5MHZhviL6S6ymDjD/+MLYx7ctKj+OPuoLBYfzdH2 +sufB6HZm2PgzWbSJjaiviuTBrtCJYy0H5PC/6uX2m+p4wDq1TmY4ntixTi2x +kUfiTaPnpMvhmNCLsapmHkT+Vmlfx5VDy9AcU7EOHpyM3SVe1SKHtot6FE4O +8qAl4/65C7Ly2Npln/x0Bh8My3IqDt2Rx2UJZZHmwIf1PW1/vjTLo5Jxa3vt +Oj5YCwiZOnfK41sdkzwtEz642QY8gyF5HLl2JkfYig8mBxSjY2YpYFnTJkaG +Ix/2yU+eX6uqgAmq0scmQ/jQuOfc54YwBVyo6Hhs2SU+mP82ED14QAENe4Nf +y5fyoS29S29ljAL+dftUoUDz4VmVcAz3qAIe+FLyYOk1PnyZHyIaf1YBBfhW +N/pr+SB5xUzfpF4B/6e/qrX6KR/8psZimhcq4pUrv7b1CNBgGOgp8VZUEZvb +rxYUCdIwd7iPJyipiP7hIm3es2m40N/QvYahiLrGQr0f59MwUHtS7bqeIo7G +2V2tlaDBJt6gt9BZEcXkhtvOqdKgI3pY80C5Irb99ra0taVBIHmi8XSlIh4S +dn2Ra0dDm6CPY+UtRTygbuLy0p4G3wnb+LF7ipg8WGDotIMGbi/Vv6dPEUPk +da1Z7jRInGtOsBNk4LyVZdsnQmj4obp4QH0rA6XzBvekZ9EwmSd9eIUjA3sN +K2/anKTh2yIWZeDMQO5uH835p2j4Mm7gs96bgYnvktLDcml4fctt0jGKge8M +92nJF9Lw0PKGSNIFBqrNFna5SdNwv+Zu+fFSBm56uNrG8DINjZotdlmXGcgr +n+N/8woNtWKDuflVDEzLqdAruUbD1f55StdbGTjZkCG6s4qGXN9d8HqCgXUC +W/eJNNJw6oXX63c/GWiycUvalns0nLAJjv88zcAoM5+3J5poSF2R9GhKmIlv +7jrBggc0HPlVvm2RHBPtrnfTra3k/yTP2mdkwkQeVTz/bDcNXn8Wia2zZOKK +JvEpbg8NnnulK003MXGn/HN2aS8NLls0f9s6MjH1rox1SR8NdssckrwDmNgy +ZdgdOUCDEY9fkJ3NxELuNQ/fIRr6FXjnNpxhovThgEWqb2mIzC7J/3aOiXUz +aw+/I75x+OJZ2xIm+n/zqrd/T9Z3e8FpkdtMTHfWaBT5SENHa/6pmjomhgY/ +rK8g3mecl+13j4k1v7mp2z7RUKaRe+JhGxNnuoekZ32mQWXWifSEQSYqnNSx +GhqhoTkyM033LRMdr4Y0BY6S+Yymp74ZJvE/qFvyi5jbfzxl3TcmaqW8VRD6 +SoPC1cSkv7MptO3J1Bkdp+GOUkIiPZ/CqGxLK7dvNOzKi0twWkyhtsCvNU+I +zyQdjquWovD625qSkgmST84HYsLUKDSa2lem9Z2G6137o1naFC7ZF5F5jNjO +IuJQly6F84ZibQeJM3VDD+oAhRdn6HvHT9GgzQs+MGhMYfts5budxO0KQZHp +ZhRyGy5/l/lBw8IFeyO+bKZQOmeZYDEx/7B/eJ49hZuErZ69J7b47hu2cQeF +zS8vp7N/0vDBzyf0lzOFhkKfVFyJk157hZS6Ez8vuXCaWGn7nmAHbwqnLTKF +WombWj2C5gZQKFhubfqXWKhq9z7PcAqrt36M3PaLhvMarnvFD1KYeE/BP5p4 +Hdc5oDGGQr3Urg1c4ldSu/yD4ym8cujqrCbi6DQnP8YxCuMHPek3xHKzdvh2 +pJL5HMznCPym4Xakg09MFoULMmbfkCTeMbrNW/M0hVl9G6U1iH962HsNnCXv +p8l7IXFOv92e44UUHnRRL7QhXrV5i6fRRRJvBKtpB3FP02aPj6UUWkXe6HEn +DjPa5J57mcLxuKxuH2Lxq9Zu5hUUVmj4NPgTVyhZ7Z66SaFY4qf8f7bNs3S9 +VEOhpkSL97/nx0QtXOzrKdz9vJr6N16vH6Pd5z6FIpsDXzsQ1zX9hOgWCnVM +S+dsJC5WeHI5q4PCwpsWJw2J0yN58sXdJL71q1JYxBFdsWm3+yk0V3P4vIDY +RcNpuv0VhTu2n6gaJf/HLGnl3qEhCgtsO8baibVeL3j5Y5jCDLOpbJpY0mjI +WmSUwrXzvpYkEAtk19QyJsj484pVnYjfj5zU0P9J4dAOIVkN4sfmAfmW0xTu +uj526DdZz8rzJiIuQiy85bfD9j5x/h+5QyHCLHwSoX46lTig/PHOPDEW6h2r +OSRKbD+/uLVckoUFZ+wVH5P8WuMRw2mSZSFbSsQw6V8+SmnLjiixUGftyY4R +kq/fgoSPC6qzcNPwett84uctg7+X6rDwxa/OjebE/JjM52jEwhrRzddOkPw/ +0eezcetaFur+YinqEh9caXzb24SF+5ecX9A5SYPl+/EzmZtYeEff02UG8bDN +1h1v3Fn4VmVIXI/sv84S9UdT3iwsF2hJrib7tVpw9uqFe1m49MD8xNXER29U +SuvtZ6Hl6/AlK8j+VpaX7Es8zsJdEi4ZU6Q+LN4/an42k4Xvo12tXImnOpur +rpxiYc7TjOymL6R+JOzPeVbIQtXg0K4EUl/2fOnbrlrJQqkepvTAMA3WZtea +4RYLs74F71Al1itKXmVXx8J0vS/aoR9omG1vJBn1kIXzjnkX/X1Hw8WavJ62 +ARZKhjyl37+h4U2Ki33QHDa6fGZukSb1M2BYjaG1gI3nJ/8KrH1Bw3fTH58/ +L2Zjp8pwvftzGuYJZsZ7S7PxQI9dwnlSf7X2N1S4qLOxwX8j8y+p31EebDGb +LWzsX54XqvyYfL/h68CC7Wy82CjwSKGN5KPCndKHTmxcOa69TqL1X/3bts7E +k40fGJE5Uw9Jv9p8NJCzn40VXQyhM6R/SKz59Fj1HBu1YmXSttXQUHDm5pkP +59lo5PvIh3Gb1NsfcXsuFbORxfYKG64m9b9CdppxlY2KygKKQTdpcFtuoyF9 +j40WnM7nzqSfXZG4mjL3Ixu9HXyrrhfTYD4Sbj6kp4RZYyZ+mzNokNGWS5hr +pISzWjZcK0oj/TWosV51rRKGn7V/PHqc5MvkYqMgSyXcrhOaHHuMnBf+lGhM +OyuhXIaWbmwsDUELnotJHVVCcf5up0+kn+eq4MDGfiV8ocE4FLCVBj/ft9L7 +Ximhku74HactNACdsi1rSAnTagf+mG4m66H1rP3ZiBIyc2YEi1vRoLEqqMFT +SBkLkwI9UtbT0GDCLY5RV0ZKYFHcRx0aPrnNDa6IVsau6Jlx4QtJvPnra+7E +KePSpztlxMh5ZuRZzJxHR5XxufS9cd5cGr7a/DgzmKWME6K57k/Jeej76uFG +kWJllC8q2DfnJx9m/tci4d2ujN801Dd8GOKDVGNatayiCr6/FJTIv0XOd9TS +mYn1Kuhm4hsX7syHD7tNi1ffV0GTVz7TBU58SCkMtx59pIIC6wodmx348ESu +N9fhqQoeiXh+fbEdH1ykclaovVfBY+63ZJLM+LBfZJlHx8LlGFQrlC2qzQf+ +lFzzMoflaBz+KSVPgA+irezUKyPL0fR9XH5TDg9kki5v0tNTw46Yp0KvCkvh +tKrBYrE96mgxJzn01LkSeCi9Vnc8QwPVbf8eyzteDIYy9ema3Zq4QaOlZnzz +JRARLApxPaKFbRveZfvJXQS5w/JGDmxtvPeufU/pfS4Is5wqbe9r4+vHp9Jm +BJ0HDY7U5fCdOnjo4IIeB50iCBoQbbAQWIESoUFVK/oKYGQ8Zav56RX4Ivmv +S4jROTDVbMo1V1+Jvl6+3JKXZ6F2fPWv720rUf3Z454I91wIUNPp6/DQxaI/ +Ik+1VU8D54t7l4OwHipofDV+NHASNlCSVguL9FDnoBeD250FyjHHIur19fEo +w/RR2UQGLPcwuMPq08ea6NsDyQvTwaPWK64icBVmzyjM/vooBe4UdLmPiRtg +Bas1rfHAUfhWPP1d84YBrpy4o9IZkwBuLJ5wrpUhztRhe36eiIWx5Vl6V0cN +8Ybg0cuaIYfhJvfX4ETSakxfzhFWow+B43omrpYzQodKJ58TnyNhmX9ilUad +EZaXFSdamYWD+Dy/cqttHGQazfIWwBDgGkdFjjpwMCVXfs3qFSGgE5VqnOXE +wce1YiUH2SFgPXrlaa8rB3MygvXFFoZAQvfEDzc/DnaEhE6m9gXDVFH0usjD +HPTpDRO4ExYMfauznlzkcfBStLXj2LUg8ArlnjUv4+C4p0nsz0tBMFl23ePT +FQ4Kf9n+Q/hsEIgyer9rV3JQ5Pb1htVxQWA5V1ampo6DnoaXMobtguB210X3 +J085eOS0rXjw90CwELmpHtbLQd3RldMvPwZCr+mDScl+Du5d371ky6tA+Fb9 +MWnXKw6eG8diyweBoF6oRX8Y5qCFhLJjwplAuN23NizlMwdLYoMtqHQy3n9b +QHOUgwkS9pub4wLBMzG0I2SCg9xdbTmMADJeXULu0ikO6qv0d/fuDoQjP0+5 +Vf/koMkGf8WT2wJh8coStZ1/ONh5EMO3bQyEfP/qielpDrpVLO6WXxsI/wec +FVTa + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd8XAHBFgwYVX0LG9+57yKwQee1dyhhKUqSQIXOZpUQZi4ylKEKv +wntXKSmKhKRCSIhS+qVBAxJp9Dv9cdddn7XuPXefe/bZ+yju3mvrMVNAQOAv +uf7dJwceNFLJ3DVPLvCSjsStWtOVL7l/be8RWLK0ZCQqSgJQ/PFuyd5MMFg6 +pGQZxYawTaU9gr1FsH1PeLFqlB4s+bI080fPVUguqIkUjDKBl7et937rqQfj +IFv6+EF7MKGGX4z1dEJ5bfWMlkhP+NGjf3K05zV0zC716ggOgwbjS9yOonGo +1Kw3WL8hEWReVr3drfYHNKS+z5hNZcB/fs6lc4wFUcvmuOFMl2zI1Da5Zb11 +Lro2S82Lbz8Dz05r1Y0tXoi/Tc5XqNkUQDI3+vFMqSUYoXRppX5NESw98b+j +WXliyOCULfH6zIVEO/M1nZPiKGFxYSqr6SIEGxQ6PzgiiT+S99stSS2G9SM/ +IwP+J42TE77zTv8tgf1mJ5bf/SSNbAt2VqtgKZQVqveJTUqj1xPvyum5pSBp +52JQNXcZxo67PnIQK4VPN+99F9RYhm5O4kpDSqWQdSQ9JCdiGaYPDu3ZvqkU +XouzAxoXyqDwHFezy/mlcNhos6v0KlnsXCVULqrNA7Nd+V/118livPP87Ee6 +PBCJ+Ri7daMsFq3Q94sx5MHZhviL6S6ymDjD/+MLYx7ctKj+OPuoLBYfzdH2 +sufB6HZm2PgzWbSJjaiviuTBrtCJYy0H5PC/6uX2m+p4wDq1TmY4ntixTi2x +kUfiTaPnpMvhmNCLsapmHkT+Vmlfx5VDy9AcU7EOHpyM3SVe1SKHtot6FE4O +8qAl4/65C7Ly2Npln/x0Bh8My3IqDt2Rx2UJZZHmwIf1PW1/vjTLo5Jxa3vt +Oj5YCwiZOnfK41sdkzwtEz642QY8gyF5HLl2JkfYig8mBxSjY2YpYFnTJkaG +Ix/2yU+eX6uqgAmq0scmQ/jQuOfc54YwBVyo6Hhs2SU+mP82ED14QAENe4Nf +y5fyoS29S29ljAL+dftUoUDz4VmVcAz3qAIe+FLyYOk1PnyZHyIaf1YBBfhW +N/pr+SB5xUzfpF4B/6e/qrX6KR/8psZimhcq4pUrv7b1CNBgGOgp8VZUEZvb +rxYUCdIwd7iPJyipiP7hIm3es2m40N/QvYahiLrGQr0f59MwUHtS7bqeIo7G +2V2tlaDBJt6gt9BZEcXkhtvOqdKgI3pY80C5Irb99ra0taVBIHmi8XSlIh4S +dn2Ra0dDm6CPY+UtRTygbuLy0p4G3wnb+LF7ipg8WGDotIMGbi/Vv6dPEUPk +da1Z7jRInGtOsBNk4LyVZdsnQmj4obp4QH0rA6XzBvekZ9EwmSd9eIUjA3sN +K2/anKTh2yIWZeDMQO5uH835p2j4Mm7gs96bgYnvktLDcml4fctt0jGKge8M +92nJF9Lw0PKGSNIFBqrNFna5SdNwv+Zu+fFSBm56uNrG8DINjZotdlmXGcgr +n+N/8woNtWKDuflVDEzLqdAruUbD1f55StdbGTjZkCG6s4qGXN9d8HqCgXUC +W/eJNNJw6oXX63c/GWiycUvalns0nLAJjv88zcAoM5+3J5poSF2R9GhKmIlv +7jrBggc0HPlVvm2RHBPtrnfTra3k/yTP2mdkwkQeVTz/bDcNXn8Wia2zZOKK +JvEpbg8NnnulK003MXGn/HN2aS8NLls0f9s6MjH1rox1SR8NdssckrwDmNgy +ZdgdOUCDEY9fkJ3NxELuNQ/fIRr6FXjnNpxhovThgEWqb2mIzC7J/3aOiXUz +aw+/I75x+OJZ2xIm+n/zqrd/T9Z3e8FpkdtMTHfWaBT5SENHa/6pmjomhgY/ +rK8g3mecl+13j4k1v7mp2z7RUKaRe+JhGxNnuoekZ32mQWXWifSEQSYqnNSx +GhqhoTkyM033LRMdr4Y0BY6S+Yymp74ZJvE/qFvyi5jbfzxl3TcmaqW8VRD6 +SoPC1cSkv7MptO3J1Bkdp+GOUkIiPZ/CqGxLK7dvNOzKi0twWkyhtsCvNU+I +zyQdjquWovD625qSkgmST84HYsLUKDSa2lem9Z2G6137o1naFC7ZF5F5jNjO +IuJQly6F84ZibQeJM3VDD+oAhRdn6HvHT9GgzQs+MGhMYfts5budxO0KQZHp +ZhRyGy5/l/lBw8IFeyO+bKZQOmeZYDEx/7B/eJ49hZuErZ69J7b47hu2cQeF +zS8vp7N/0vDBzyf0lzOFhkKfVFyJk157hZS6Ez8vuXCaWGn7nmAHbwqnLTKF +WombWj2C5gZQKFhubfqXWKhq9z7PcAqrt36M3PaLhvMarnvFD1KYeE/BP5p4 +Hdc5oDGGQr3Urg1c4ldSu/yD4ym8cujqrCbi6DQnP8YxCuMHPek3xHKzdvh2 +pJL5HMznCPym4Xakg09MFoULMmbfkCTeMbrNW/M0hVl9G6U1iH962HsNnCXv +p8l7IXFOv92e44UUHnRRL7QhXrV5i6fRRRJvBKtpB3FP02aPj6UUWkXe6HEn +DjPa5J57mcLxuKxuH2Lxq9Zu5hUUVmj4NPgTVyhZ7Z66SaFY4qf8f7bNs3S9 +VEOhpkSL97/nx0QtXOzrKdz9vJr6N16vH6Pd5z6FIpsDXzsQ1zX9hOgWCnVM +S+dsJC5WeHI5q4PCwpsWJw2J0yN58sXdJL71q1JYxBFdsWm3+yk0V3P4vIDY +RcNpuv0VhTu2n6gaJf/HLGnl3qEhCgtsO8baibVeL3j5Y5jCDLOpbJpY0mjI +WmSUwrXzvpYkEAtk19QyJsj484pVnYjfj5zU0P9J4dAOIVkN4sfmAfmW0xTu +uj526DdZz8rzJiIuQiy85bfD9j5x/h+5QyHCLHwSoX46lTig/PHOPDEW6h2r +OSRKbD+/uLVckoUFZ+wVH5P8WuMRw2mSZSFbSsQw6V8+SmnLjiixUGftyY4R +kq/fgoSPC6qzcNPwett84uctg7+X6rDwxa/OjebE/JjM52jEwhrRzddOkPw/ +0eezcetaFur+YinqEh9caXzb24SF+5ecX9A5SYPl+/EzmZtYeEff02UG8bDN +1h1v3Fn4VmVIXI/sv84S9UdT3iwsF2hJrib7tVpw9uqFe1m49MD8xNXER29U +SuvtZ6Hl6/AlK8j+VpaX7Es8zsJdEi4ZU6Q+LN4/an42k4Xvo12tXImnOpur +rpxiYc7TjOymL6R+JOzPeVbIQtXg0K4EUl/2fOnbrlrJQqkepvTAMA3WZtea +4RYLs74F71Al1itKXmVXx8J0vS/aoR9omG1vJBn1kIXzjnkX/X1Hw8WavJ62 +ARZKhjyl37+h4U2Ki33QHDa6fGZukSb1M2BYjaG1gI3nJ/8KrH1Bw3fTH58/ +L2Zjp8pwvftzGuYJZsZ7S7PxQI9dwnlSf7X2N1S4qLOxwX8j8y+p31EebDGb +LWzsX54XqvyYfL/h68CC7Wy82CjwSKGN5KPCndKHTmxcOa69TqL1X/3bts7E +k40fGJE5Uw9Jv9p8NJCzn40VXQyhM6R/SKz59Fj1HBu1YmXSttXQUHDm5pkP +59lo5PvIh3Gb1NsfcXsuFbORxfYKG64m9b9CdppxlY2KygKKQTdpcFtuoyF9 +j40WnM7nzqSfXZG4mjL3Ixu9HXyrrhfTYD4Sbj6kp4RZYyZ+mzNokNGWS5hr +pISzWjZcK0oj/TWosV51rRKGn7V/PHqc5MvkYqMgSyXcrhOaHHuMnBf+lGhM +OyuhXIaWbmwsDUELnotJHVVCcf5up0+kn+eq4MDGfiV8ocE4FLCVBj/ft9L7 +Ximhku74HactNACdsi1rSAnTagf+mG4m66H1rP3ZiBIyc2YEi1vRoLEqqMFT +SBkLkwI9UtbT0GDCLY5RV0ZKYFHcRx0aPrnNDa6IVsau6Jlx4QtJvPnra+7E +KePSpztlxMh5ZuRZzJxHR5XxufS9cd5cGr7a/DgzmKWME6K57k/Jeej76uFG +kWJllC8q2DfnJx9m/tci4d2ujN801Dd8GOKDVGNatayiCr6/FJTIv0XOd9TS +mYn1Kuhm4hsX7syHD7tNi1ffV0GTVz7TBU58SCkMtx59pIIC6wodmx348ESu +N9fhqQoeiXh+fbEdH1ykclaovVfBY+63ZJLM+LBfZJlHx8LlGFQrlC2qzQf+ +lFzzMoflaBz+KSVPgA+irezUKyPL0fR9XH5TDg9kki5v0tNTw46Yp0KvCkvh +tKrBYrE96mgxJzn01LkSeCi9Vnc8QwPVbf8eyzteDIYy9ema3Zq4QaOlZnzz +JRARLApxPaKFbRveZfvJXQS5w/JGDmxtvPeufU/pfS4Is5wqbe9r4+vHp9Jm +BJ0HDY7U5fCdOnjo4IIeB50iCBoQbbAQWIESoUFVK/oKYGQ8Zav56RX4Ivmv +S4jROTDVbMo1V1+Jvl6+3JKXZ6F2fPWv720rUf3Z454I91wIUNPp6/DQxaI/ +Ik+1VU8D54t7l4OwHipofDV+NHASNlCSVguL9FDnoBeD250FyjHHIur19fEo +w/RR2UQGLPcwuMPq08ea6NsDyQvTwaPWK64icBVmzyjM/vooBe4UdLmPiRtg +Bas1rfHAUfhWPP1d84YBrpy4o9IZkwBuLJ5wrpUhztRhe36eiIWx5Vl6V0cN +8Ybg0cuaIYfhJvfX4ETSakxfzhFWow+B43omrpYzQodKJ58TnyNhmX9ilUad +EZaXFSdamYWD+Dy/cqttHGQazfIWwBDgGkdFjjpwMCVXfs3qFSGgE5VqnOXE +wce1YiUH2SFgPXrlaa8rB3MygvXFFoZAQvfEDzc/DnaEhE6m9gXDVFH0usjD +HPTpDRO4ExYMfauznlzkcfBStLXj2LUg8ArlnjUv4+C4p0nsz0tBMFl23ePT +FQ4Kf9n+Q/hsEIgyer9rV3JQ5Pb1htVxQWA5V1ampo6DnoaXMobtguB210X3 +J085eOS0rXjw90CwELmpHtbLQd3RldMvPwZCr+mDScl+Du5d371ky6tA+Fb9 +MWnXKw6eG8diyweBoF6oRX8Y5qCFhLJjwplAuN23NizlMwdLYoMtqHQy3n9b +QHOUgwkS9pub4wLBMzG0I2SCg9xdbTmMADJeXULu0ikO6qv0d/fuDoQjP0+5 +Vf/koMkGf8WT2wJh8coStZ1/ONh5EMO3bQyEfP/qielpDrpVLO6WXxsI/wec +FVTa + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.058566503624289196`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.058566503624289196`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd8XAHBFgwYVX0LG9+57yKwQee1dyhhKUqSQIXOZpUQZi4ylKEKv +wntXKSmKhKRCSIhS+qVBAxJp9Dv9cdddn7XuPXefe/bZ+yju3mvrMVNAQOAv +uf7dJwceNFLJ3DVPLvCSjsStWtOVL7l/be8RWLK0ZCQqSgJQ/PFuyd5MMFg6 +pGQZxYawTaU9gr1FsH1PeLFqlB4s+bI080fPVUguqIkUjDKBl7et937rqQfj +IFv6+EF7MKGGX4z1dEJ5bfWMlkhP+NGjf3K05zV0zC716ggOgwbjS9yOonGo +1Kw3WL8hEWReVr3drfYHNKS+z5hNZcB/fs6lc4wFUcvmuOFMl2zI1Da5Zb11 +Lro2S82Lbz8Dz05r1Y0tXoi/Tc5XqNkUQDI3+vFMqSUYoXRppX5NESw98b+j +WXliyOCULfH6zIVEO/M1nZPiKGFxYSqr6SIEGxQ6PzgiiT+S99stSS2G9SM/ +IwP+J42TE77zTv8tgf1mJ5bf/SSNbAt2VqtgKZQVqveJTUqj1xPvyum5pSBp +52JQNXcZxo67PnIQK4VPN+99F9RYhm5O4kpDSqWQdSQ9JCdiGaYPDu3ZvqkU +XouzAxoXyqDwHFezy/mlcNhos6v0KlnsXCVULqrNA7Nd+V/118livPP87Ee6 +PBCJ+Ri7daMsFq3Q94sx5MHZhviL6S6ymDjD/+MLYx7ctKj+OPuoLBYfzdH2 +sufB6HZm2PgzWbSJjaiviuTBrtCJYy0H5PC/6uX2m+p4wDq1TmY4ntixTi2x +kUfiTaPnpMvhmNCLsapmHkT+Vmlfx5VDy9AcU7EOHpyM3SVe1SKHtot6FE4O +8qAl4/65C7Ly2Npln/x0Bh8My3IqDt2Rx2UJZZHmwIf1PW1/vjTLo5Jxa3vt +Oj5YCwiZOnfK41sdkzwtEz642QY8gyF5HLl2JkfYig8mBxSjY2YpYFnTJkaG +Ix/2yU+eX6uqgAmq0scmQ/jQuOfc54YwBVyo6Hhs2SU+mP82ED14QAENe4Nf +y5fyoS29S29ljAL+dftUoUDz4VmVcAz3qAIe+FLyYOk1PnyZHyIaf1YBBfhW +N/pr+SB5xUzfpF4B/6e/qrX6KR/8psZimhcq4pUrv7b1CNBgGOgp8VZUEZvb +rxYUCdIwd7iPJyipiP7hIm3es2m40N/QvYahiLrGQr0f59MwUHtS7bqeIo7G +2V2tlaDBJt6gt9BZEcXkhtvOqdKgI3pY80C5Irb99ra0taVBIHmi8XSlIh4S +dn2Ra0dDm6CPY+UtRTygbuLy0p4G3wnb+LF7ipg8WGDotIMGbi/Vv6dPEUPk +da1Z7jRInGtOsBNk4LyVZdsnQmj4obp4QH0rA6XzBvekZ9EwmSd9eIUjA3sN +K2/anKTh2yIWZeDMQO5uH835p2j4Mm7gs96bgYnvktLDcml4fctt0jGKge8M +92nJF9Lw0PKGSNIFBqrNFna5SdNwv+Zu+fFSBm56uNrG8DINjZotdlmXGcgr +n+N/8woNtWKDuflVDEzLqdAruUbD1f55StdbGTjZkCG6s4qGXN9d8HqCgXUC +W/eJNNJw6oXX63c/GWiycUvalns0nLAJjv88zcAoM5+3J5poSF2R9GhKmIlv +7jrBggc0HPlVvm2RHBPtrnfTra3k/yTP2mdkwkQeVTz/bDcNXn8Wia2zZOKK +JvEpbg8NnnulK003MXGn/HN2aS8NLls0f9s6MjH1rox1SR8NdssckrwDmNgy +ZdgdOUCDEY9fkJ3NxELuNQ/fIRr6FXjnNpxhovThgEWqb2mIzC7J/3aOiXUz +aw+/I75x+OJZ2xIm+n/zqrd/T9Z3e8FpkdtMTHfWaBT5SENHa/6pmjomhgY/ +rK8g3mecl+13j4k1v7mp2z7RUKaRe+JhGxNnuoekZ32mQWXWifSEQSYqnNSx +GhqhoTkyM033LRMdr4Y0BY6S+Yymp74ZJvE/qFvyi5jbfzxl3TcmaqW8VRD6 +SoPC1cSkv7MptO3J1Bkdp+GOUkIiPZ/CqGxLK7dvNOzKi0twWkyhtsCvNU+I +zyQdjquWovD625qSkgmST84HYsLUKDSa2lem9Z2G6137o1naFC7ZF5F5jNjO +IuJQly6F84ZibQeJM3VDD+oAhRdn6HvHT9GgzQs+MGhMYfts5budxO0KQZHp +ZhRyGy5/l/lBw8IFeyO+bKZQOmeZYDEx/7B/eJ49hZuErZ69J7b47hu2cQeF +zS8vp7N/0vDBzyf0lzOFhkKfVFyJk157hZS6Ez8vuXCaWGn7nmAHbwqnLTKF +WombWj2C5gZQKFhubfqXWKhq9z7PcAqrt36M3PaLhvMarnvFD1KYeE/BP5p4 +Hdc5oDGGQr3Urg1c4ldSu/yD4ym8cujqrCbi6DQnP8YxCuMHPek3xHKzdvh2 +pJL5HMznCPym4Xakg09MFoULMmbfkCTeMbrNW/M0hVl9G6U1iH962HsNnCXv +p8l7IXFOv92e44UUHnRRL7QhXrV5i6fRRRJvBKtpB3FP02aPj6UUWkXe6HEn +DjPa5J57mcLxuKxuH2Lxq9Zu5hUUVmj4NPgTVyhZ7Z66SaFY4qf8f7bNs3S9 +VEOhpkSL97/nx0QtXOzrKdz9vJr6N16vH6Pd5z6FIpsDXzsQ1zX9hOgWCnVM +S+dsJC5WeHI5q4PCwpsWJw2J0yN58sXdJL71q1JYxBFdsWm3+yk0V3P4vIDY +RcNpuv0VhTu2n6gaJf/HLGnl3qEhCgtsO8baibVeL3j5Y5jCDLOpbJpY0mjI +WmSUwrXzvpYkEAtk19QyJsj484pVnYjfj5zU0P9J4dAOIVkN4sfmAfmW0xTu +uj526DdZz8rzJiIuQiy85bfD9j5x/h+5QyHCLHwSoX46lTig/PHOPDEW6h2r +OSRKbD+/uLVckoUFZ+wVH5P8WuMRw2mSZSFbSsQw6V8+SmnLjiixUGftyY4R +kq/fgoSPC6qzcNPwett84uctg7+X6rDwxa/OjebE/JjM52jEwhrRzddOkPw/ +0eezcetaFur+YinqEh9caXzb24SF+5ecX9A5SYPl+/EzmZtYeEff02UG8bDN +1h1v3Fn4VmVIXI/sv84S9UdT3iwsF2hJrib7tVpw9uqFe1m49MD8xNXER29U +SuvtZ6Hl6/AlK8j+VpaX7Es8zsJdEi4ZU6Q+LN4/an42k4Xvo12tXImnOpur +rpxiYc7TjOymL6R+JOzPeVbIQtXg0K4EUl/2fOnbrlrJQqkepvTAMA3WZtea +4RYLs74F71Al1itKXmVXx8J0vS/aoR9omG1vJBn1kIXzjnkX/X1Hw8WavJ62 +ARZKhjyl37+h4U2Ki33QHDa6fGZukSb1M2BYjaG1gI3nJ/8KrH1Bw3fTH58/ +L2Zjp8pwvftzGuYJZsZ7S7PxQI9dwnlSf7X2N1S4qLOxwX8j8y+p31EebDGb +LWzsX54XqvyYfL/h68CC7Wy82CjwSKGN5KPCndKHTmxcOa69TqL1X/3bts7E +k40fGJE5Uw9Jv9p8NJCzn40VXQyhM6R/SKz59Fj1HBu1YmXSttXQUHDm5pkP +59lo5PvIh3Gb1NsfcXsuFbORxfYKG64m9b9CdppxlY2KygKKQTdpcFtuoyF9 +j40WnM7nzqSfXZG4mjL3Ixu9HXyrrhfTYD4Sbj6kp4RZYyZ+mzNokNGWS5hr +pISzWjZcK0oj/TWosV51rRKGn7V/PHqc5MvkYqMgSyXcrhOaHHuMnBf+lGhM +OyuhXIaWbmwsDUELnotJHVVCcf5up0+kn+eq4MDGfiV8ocE4FLCVBj/ft9L7 +Ximhku74HactNACdsi1rSAnTagf+mG4m66H1rP3ZiBIyc2YEi1vRoLEqqMFT +SBkLkwI9UtbT0GDCLY5RV0ZKYFHcRx0aPrnNDa6IVsau6Jlx4QtJvPnra+7E +KePSpztlxMh5ZuRZzJxHR5XxufS9cd5cGr7a/DgzmKWME6K57k/Jeej76uFG +kWJllC8q2DfnJx9m/tci4d2ujN801Dd8GOKDVGNatayiCr6/FJTIv0XOd9TS +mYn1Kuhm4hsX7syHD7tNi1ffV0GTVz7TBU58SCkMtx59pIIC6wodmx348ESu +N9fhqQoeiXh+fbEdH1ykclaovVfBY+63ZJLM+LBfZJlHx8LlGFQrlC2qzQf+ +lFzzMoflaBz+KSVPgA+irezUKyPL0fR9XH5TDg9kki5v0tNTw46Yp0KvCkvh +tKrBYrE96mgxJzn01LkSeCi9Vnc8QwPVbf8eyzteDIYy9ema3Zq4QaOlZnzz +JRARLApxPaKFbRveZfvJXQS5w/JGDmxtvPeufU/pfS4Is5wqbe9r4+vHp9Jm +BJ0HDY7U5fCdOnjo4IIeB50iCBoQbbAQWIESoUFVK/oKYGQ8Zav56RX4Ivmv +S4jROTDVbMo1V1+Jvl6+3JKXZ6F2fPWv720rUf3Z454I91wIUNPp6/DQxaI/ +Ik+1VU8D54t7l4OwHipofDV+NHASNlCSVguL9FDnoBeD250FyjHHIur19fEo +w/RR2UQGLPcwuMPq08ea6NsDyQvTwaPWK64icBVmzyjM/vooBe4UdLmPiRtg +Bas1rfHAUfhWPP1d84YBrpy4o9IZkwBuLJ5wrpUhztRhe36eiIWx5Vl6V0cN +8Ybg0cuaIYfhJvfX4ETSakxfzhFWow+B43omrpYzQodKJ58TnyNhmX9ilUad +EZaXFSdamYWD+Dy/cqttHGQazfIWwBDgGkdFjjpwMCVXfs3qFSGgE5VqnOXE +wce1YiUH2SFgPXrlaa8rB3MygvXFFoZAQvfEDzc/DnaEhE6m9gXDVFH0usjD +HPTpDRO4ExYMfauznlzkcfBStLXj2LUg8ArlnjUv4+C4p0nsz0tBMFl23ePT +FQ4Kf9n+Q/hsEIgyer9rV3JQ5Pb1htVxQWA5V1ampo6DnoaXMobtguB210X3 +J085eOS0rXjw90CwELmpHtbLQd3RldMvPwZCr+mDScl+Du5d371ky6tA+Fb9 +MWnXKw6eG8diyweBoF6oRX8Y5qCFhLJjwplAuN23NizlMwdLYoMtqHQy3n9b +QHOUgwkS9pub4wLBMzG0I2SCg9xdbTmMADJeXULu0ikO6qv0d/fuDoQjP0+5 +Vf/koMkGf8WT2wJh8coStZ1/ONh5EMO3bQyEfP/qielpDrpVLO6WXxsI/wec +FVTa + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.058566503624289196`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.058566503624289196`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99438498160846*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"e3300068-48f5-4dde-9c5a-e06626525018"] +}, Open ]], Cell[CellGroupData[{ @@ -2662,14 +7985,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918497405884743`*^9},ExpressionUUID->"650e43f8-1352-de46-8137-\ -52adca93b0cf"], + CellChangeTimes->{3.9918497405884743`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[BoxData["12.55365498952246`"], "Output", - CellChangeTimes->{3.991340544411957*^9}, - CellLabel-> - "Out[337]=",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[BoxData["13.070220108974574`"], "Output", + CellChangeTimes->{3.991340544411957*^9, 3.994384981625265*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"9c588486-851b-4bd2-b431-88287bda08da"] }, Open ]], Cell[CellGroupData[{ @@ -2725,157 +8046,158 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849742961588*^9},ExpressionUUID->"9ad75b45-8f6d-114b-80bd-\ -d2b12a49fd20"], + CellChangeTimes->{3.991849742961588*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 341, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544611845*^9}, - CellLabel-> - "During evaluation of \ -In[338]:=",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.174310069630281`*^-261\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 342, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913405446218624`*^9}, + 2, 99, 13, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994384981672769*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], +In[99]:=",ExpressionUUID->"fbb9e0e4-835b-4696-9ad0-c7662c6a9af3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.137765660473369`*^-271\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 338, 343, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544630844*^9}, +\"", 2, 99, 14, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994384981675885*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], +In[99]:=",ExpressionUUID->"5ec9b80f-2093-485e-80d3-ef6f1825ac06"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.60500069326141`*^-280\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 15, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994384981678706*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"ffa684a0-f02a-4e19-bb25-4e0233250fe2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 338, 344, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544639845*^9}, +during this calculation.\"", 2, 99, 16, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.9943849816809464`*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], +In[99]:=",ExpressionUUID->"214c3b99-f86e-4832-b759-72d7d1ef4cf2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc4Vf8fAHCFaEmk7HHvudfeRcb1fqOUtI3QIDMl5crIyF5FCSUyIvve +g0pCRKhUGkpZ31Qa37JLZvX1O78/znOe1/N5znnOeX/e46PgcmKv+2IeHp7/ +qOv/9+mBx23EuUITbzL2wRv1jSZdueKnTXuiYCYrie+P+lpAsRcu4j2psHfB +ZfqxOhMCdpd38/YUAGN10X/l6nqwemxd6lz3TegatWqOVreA9w07T/zqboFl +9CLx1ep2YEEMvfvR/Qoejx2+s1/VA+a69S9NdA/CscqzoqlEALSalxR2FkxC +9aqXny9OxoH0+7qvLmp/YcRW6qLjtxRY4+1ULmDOi2TiBzs+0cuQqm1xd6et +IPIPRSU7sa9C7xWt5h/CKzE6sP8hn8Q1OFcY/mKxxGqsWGYdkBhRAOvSPyWm +5Yhi28c8WjanEOJtLE1eTYuh2lxYm1FkMfgZ5Ds9jhLHZy7TTeYWpbBpfD7Y +55MkRk5skuq8XQant6ar3B+RxMJjYY78d8ugIl+9T3RaEk2cqrfoNZeBuI2z +QZ2gFErXjqicf1IGI7UPZng1pDBrft+Kte/LIC0q5VRmkBSOqE/8jhUoh0Ex +pk/bSmncvOp73Wfbcog03nNYcqMMzvVUHrz4rRy2Hsr9qW8mg4L1LqI7R8tB +KGI42na7DF486Ptyyc9yyG6NLU5xlkFr2mJn79/lULutfnhJogxu+NT+UkCI +AxP29IDJXhn8N/VJX7gOBw75T53tCJFF7nRrp18QBxgZZtJDsbLYmJyjfyOU +Q33vBVIgRRZ3jxXnD0VwIPiP8kuzQlkc1qJH7UnkwKXoQ2J1HdTzSaN+45kc +6Lj4KK9IRg6VfUzWeddzwLAis/pMkxzyNxX5HpnlwKbu53/H2uWwrZDl+vU3 +B3by8G1xeiWHh3j83zkvcMB1r08vfJFDcz4+b6slXLAIUQiP4JfH5taMyWlR +LpyUm75uqiqPExrR90o0uNDmmTfaGiCPKq3aMycPc8Hyj4FIaIg8Sja2KUe4 +ceF5Spfe+gh5XF5u/+2cJxd665ZGFCbKo9IFmWWZx7kwtvyUSGw29fxE0OfE +01wQr9qqb9Eij3HbsyQepnDBe/ZHRPtKBWy2XPyqrIELhr4ea7+KKKDAcVH9 +6CYuCA71cXjFFfBZc2m6fQsXivpb35rQFJBXINVw5hEXBu5dUrutp4CfzCYM ++F5zYVesQU++E7X+4cDOg9+4oCMSqRlyQwE37qAZCAmTwHNuqu1KjQL6Xvpj +7SlCwnPeo441dxUQc/LZDWtIODa1N/bHAwW0XjvR4ChBQmEP0e/Zp4Cry7Zf +9KSRsDavPc6Gl4Y7Vu3IbNElYU5VeEDdloZM3V7bSGsSpnMkI3UdaTg8MKtg +bUvCr1UMwsCJhoS7GENhHwljkwZHN3nRkHxs8OqGIwmDd12nHcNo6FO14m3R +YRKeWN0RSiii4TF7i6keHxIeNd6/kVxOw6Rfwcd9TpLQptlhk1ZJw+KsHoKH +TcI90Y9ZuXU0DK9eby3uT8LN/mWKt5/RsFa0oFEqhISsY4dgcIqGwcJ2m0/E +kZDx7sjgv/M0jN8g+rM9noT0XX6xows0ZHz5+lU2kYTzuglPZ5fS8cV6RU7T +ORKift/Yt0qWjhHPEyu6Uqj4nOM/aWxBxwQvNcUdWSQc+btK1MyKjidUu7KP +XSXB44RkzZbddJyRMnaLyybB2Vrzz15HOvYqvRyqyiXBRsohwcuHjm+YT771 +FpBgzOFeu3yZjp1WhzeGlpPQL8/J23yVjunTv3t2c0gIvlyW+yuPjkZHlu+i +cUm4E1mcvbeMjozPNY13SRJ07K9dEWqgY+Xe/Or2KhI6n+VmNDbTcSwbhGNu +kHDSPOey9wM6Sjc3bDa+SUKFRlb6k+d0vMZOxeu3SFDmT0+J+0jHwtCIWKsa +EtqDUy9s+ErHiU9fm0Ype0yknP88RMeDrDs9SXeofOhPTjL7RUdX/i8l92tJ +kL8Zn/DfEgJvzN/t4L9LQpNiXDy5nEAev9vLLlA+lBMTd0CYwOzQNlWxBhKu +JkTG1EsQ2J0bJSHeSOWTU0hEgBqBBVF61bP3SLjddTqcoU1gkUeKlFcTFa9t +QWe6NhCod+bp0beUUzf4h+oAgUlhNq0lzSRoc/xCPpoTKGjY/2z5fRJeyrOD +U7YSKPO6usWb8soVJ4LG9hCYWth9nNFCAjfyeGCOHYGQeZARRnnbzLGA7fsJ +9B2sfNxJOWHwyKlyNwLLYGO/bysJivaefg5eBC4ar7BspPzwmTtb0IdAurJf +CX8bCXx1Lic9Agk80nhUN5nydY3DJ8RCCSxOHHTpoGxW6OTTFkHghjatGMEH +JHyQOHTcL5bAld2zGaaUwy8c8KadJbChaCA3kLIs//5jnecJ5E2Oyyyn3BDs +cDQijcB0l0sJfZTn3e2ODGQTePdsmIX2QxIy+208k/MJxE8Fa+0pb9xj7WFc +TKDbhkfvQih3P9zjPlxO4KPKi9nZlAOMd7tlVRJ4YLbMup6y2M2drpbVBGqr +1fK+oVytuMNltpZA1fdu5AjlvTlWh0saCeyUctiz6BEJP0S2Odu1EPjRxWRC +hHKPN+3l0UcE6rjlXadRbn44D+EdBDK0jJ5qUC6Vf12Z1kng8IdhT33KKcEc +udK3VDx1k4KNKQd1RV9o6CcwPmaG14Sys8aBhZcfCFz+Zin//9e3Jqw/8eUL +gZ/b8s7oUdYaXPF+bojAufTLvuqUxY2/7BSaINCO2TEgT5nncuM92hSBzXOy +j4Qpfxu/pKE/T8Vb00f1L/U/Lyx9cq0WqO+NzVzxlXLNdQshZz4GRjpEHntK +Ofev7JlTSxm4pWSJJUk5bt/MaIIQAzMElhefo+xz48XBHFEGFlSdjPagbLe8 +9NkNcQa6+ksOsiibuEewHsowcN+D4ZbVlJlN9mQfjYGfOO3MQWr/Vkpoy4wr +MnD5y0tClZR/sZcm86oz8IPfxpAgyv90fPyzToeB9qcuHzehzI1I/QeNGXhv +kdy/TVQ+pfcd3W5rykDPbeInQyiHrjdv8LJgoKXH0ShdylbfJq+m7magpEKj +RSaVr0O7bPd/dmNgrHS9pxGV36/K1J/OejFQf6uobT9VH/W8S4xWnmCgWJ30 +60DKiXdqJPVOM9DMciammKovJTnxvvhkKh41w719VH0Kn56wzE5l4HTsJw8n +yrOv2uuqMhio4iyY9IGq5/a405m9+QwsDS0o6KHq3XOsz161hoHvhOqkrtWT +sHPrrXa4y8DXQ7djllLWKzi30aaZgQ9WRyafqCNhiZ2xeNgTBvrEHYzSpvpL +cWNO9/MBKj7j29ck3ybhc5KzHVuAiRNb79+6Xkntx5AaTWsFEx0NG82+VJAw +s2VudFSYiUG+vmN0yst4U2O9JJlYFG6ad4Xqn1qnW6ud1ZmoqrwzzKmMhDB3 +puguayZGt70ddKX68ZLWnwMr7Jl4+FZsXmA+la/yTeVPDjDx41+xuIRr/+9/ ++8wsPJjoHK/TlU/18yd7En1Zp5ko86373E1qHqw1GXmhmsdEAcNfjB2pJFy7 +Wnv1+3Umzpx59kX3ItVv52I8S0qZeMZc9N06ap4YV8ss0G4ycRmvjX93Mgmu +Krs0JB8w0Smnw20DNY+q1t5MEhxmInm8Z9HxcBIsxwMtv+gp4t8zpfadXiRI +a8vGCRorYlXr6semR6j5ym5rUTVVxOJ1c2KVHlS+TAsbs60UcWRLr2WEKwkD +f8s0FpwUsUdK2vDvARLYK/4RlUhUxGe1f8FlFzUvlXFge78iGvPTRD5qk+B9 +7KvkyQ+KaFnYZj2uSQKQSfvSvijiCseTGfPq1H5o9b7sHVfEXRWVyoIqJGhs +ZLd68Clh4uLQqwsKJLRaFJZGqCuh09W5FufVJIy4CvpVhyshwxbLf41S56Pc +TY1NMUooEMi3p2qYC+O9EQJPE5Ww6pOskdd3LvzcNXf1Y5oS6masGHj1mQsz +RkNtQqVKyK/xNjy2nwuL13Ss9XqphMwnvsZe7VyQaLtQL6OgjD9vWU/qXKPO +d8S6xfEtykjnbOMV3cqF7y5bSo0eKaNdxzKx/Zu5kJQfuHPiqTJO/eMomG/G +hdeyPVkOb5RxEf/NDCaLC84Smbpq35QxzirQX1yHC6eFpNw7V6rgN9GKVVek +uMCdlW2XclDBZ5fie1aOckDkGfN81bgKShua/lhxlgPSCZW79fTU8NurxwZH +ssrhiqqBsKinOl5cU+BdlFcGTyRNN0xe1MDrCw/N76eXgqF0S4rmW02s+rXF +ep9zCQjxFpw6HKWFOnZ9+mt0i0E2Us7YgamNd8LXbA4dLISljAM1ex9pY1CB +Q61G6nXQYElUBh7UwbHXH1Xe2RUAe0CkdRuPLpralPZyF+fD+GSSreUVXQzY +TjvjmpYHWzQfZlmqr8cR/QvbVYxy4N6k0e+Z5+vxTpY7T2xrFvio6fR1um9A +mz39eZZJV4A15tblsFQP70Qmj3biZdhMiO9YWaCHmstfXPDZmA5KEWeDWvT1 +cXvrJ6Fddqmg4m7QxOjTx3urHDP+HEsB93tHYqp9NyKdnq1pGp0MTde63H6I +GWBQ3nU+UvUs/CpdmNG8Y4BaM6P6+5XiwZXBWZq1wxAF68p5PqfHwA+VNL2b +E4aYw9L+Y7o0CmoLf3+cSjDCsa2HJOXawsFxE3VWkjVG9aOjTk4/QkDqeHyd +RrMxLtfKnTLXDwKxZd43duxj4cDnB533pfyh0DwseMKBhb7fC++XCPmDTth5 +87QDLPRW89mdvsgfdk5Uvek5zEKd9xOmkf+egri3U3Ou3iycsV+mX37rFMwW +hJsFR7JwbH9HiN6OU9BnlPa6mMPCNtu6P0qxfnDEvzDbsoKFmh5j0QNBfjBd +cdt9pIqFzrberlnefiBC65nRrmHh6JWjNIaNH1gJykg3NrPQpj3WJY7uBw1d +xW6v37Bwtq/zt38rG7YJ1aoH9LDQtnT9fxfusKFny+Np8X4Wqj8N21DFYcOv ++uGEQx9YmMkeMuBNZ4N6vhb5fYiF/kvMDky6saGhzzQgaZSFt5VGHpk4UO9b +Yw2aEyysmnlql7KDDR7x/p2nplgY8dbmzWY96n3NcVnrZln4UDq1uUyFDVHz +Ga718yysD1N/KCrHBuH1ZWoH/7KwQevHp2hRNuQer59aWGDh5tMl6+YF2PA/ +bMxQjg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -2889,116 +8211,114 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwV1nc4Vf8fAHCFaEmk7HHvudfeRcb1fqOUtI3QIDMl5crIyF5FCSUyIvve +g0pCRKhUGkpZ31Qa37JLZvX1O78/znOe1/N5znnOeX/e46PgcmKv+2IeHp7/ +qOv/9+mBx23EuUITbzL2wRv1jSZdueKnTXuiYCYrie+P+lpAsRcu4j2psHfB +ZfqxOhMCdpd38/YUAGN10X/l6nqwemxd6lz3TegatWqOVreA9w07T/zqboFl +9CLx1ep2YEEMvfvR/Qoejx2+s1/VA+a69S9NdA/CscqzoqlEALSalxR2FkxC +9aqXny9OxoH0+7qvLmp/YcRW6qLjtxRY4+1ULmDOi2TiBzs+0cuQqm1xd6et +IPIPRSU7sa9C7xWt5h/CKzE6sP8hn8Q1OFcY/mKxxGqsWGYdkBhRAOvSPyWm +5Yhi28c8WjanEOJtLE1eTYuh2lxYm1FkMfgZ5Ds9jhLHZy7TTeYWpbBpfD7Y +55MkRk5skuq8XQant6ar3B+RxMJjYY78d8ugIl+9T3RaEk2cqrfoNZeBuI2z +QZ2gFErXjqicf1IGI7UPZng1pDBrft+Kte/LIC0q5VRmkBSOqE/8jhUoh0Ex +pk/bSmncvOp73Wfbcog03nNYcqMMzvVUHrz4rRy2Hsr9qW8mg4L1LqI7R8tB +KGI42na7DF486Ptyyc9yyG6NLU5xlkFr2mJn79/lULutfnhJogxu+NT+UkCI +AxP29IDJXhn8N/VJX7gOBw75T53tCJFF7nRrp18QBxgZZtJDsbLYmJyjfyOU +Q33vBVIgRRZ3jxXnD0VwIPiP8kuzQlkc1qJH7UnkwKXoQ2J1HdTzSaN+45kc +6Lj4KK9IRg6VfUzWeddzwLAis/pMkxzyNxX5HpnlwKbu53/H2uWwrZDl+vU3 +B3by8G1xeiWHh3j83zkvcMB1r08vfJFDcz4+b6slXLAIUQiP4JfH5taMyWlR +LpyUm75uqiqPExrR90o0uNDmmTfaGiCPKq3aMycPc8Hyj4FIaIg8Sja2KUe4 +ceF5Spfe+gh5XF5u/+2cJxd665ZGFCbKo9IFmWWZx7kwtvyUSGw29fxE0OfE +01wQr9qqb9Eij3HbsyQepnDBe/ZHRPtKBWy2XPyqrIELhr4ea7+KKKDAcVH9 +6CYuCA71cXjFFfBZc2m6fQsXivpb35rQFJBXINVw5hEXBu5dUrutp4CfzCYM ++F5zYVesQU++E7X+4cDOg9+4oCMSqRlyQwE37qAZCAmTwHNuqu1KjQL6Xvpj +7SlCwnPeo441dxUQc/LZDWtIODa1N/bHAwW0XjvR4ChBQmEP0e/Zp4Cry7Zf +9KSRsDavPc6Gl4Y7Vu3IbNElYU5VeEDdloZM3V7bSGsSpnMkI3UdaTg8MKtg +bUvCr1UMwsCJhoS7GENhHwljkwZHN3nRkHxs8OqGIwmDd12nHcNo6FO14m3R +YRKeWN0RSiii4TF7i6keHxIeNd6/kVxOw6Rfwcd9TpLQptlhk1ZJw+KsHoKH +TcI90Y9ZuXU0DK9eby3uT8LN/mWKt5/RsFa0oFEqhISsY4dgcIqGwcJ2m0/E +kZDx7sjgv/M0jN8g+rM9noT0XX6xows0ZHz5+lU2kYTzuglPZ5fS8cV6RU7T +ORKift/Yt0qWjhHPEyu6Uqj4nOM/aWxBxwQvNcUdWSQc+btK1MyKjidUu7KP +XSXB44RkzZbddJyRMnaLyybB2Vrzz15HOvYqvRyqyiXBRsohwcuHjm+YT771 +FpBgzOFeu3yZjp1WhzeGlpPQL8/J23yVjunTv3t2c0gIvlyW+yuPjkZHlu+i +cUm4E1mcvbeMjozPNY13SRJ07K9dEWqgY+Xe/Or2KhI6n+VmNDbTcSwbhGNu +kHDSPOey9wM6Sjc3bDa+SUKFRlb6k+d0vMZOxeu3SFDmT0+J+0jHwtCIWKsa +EtqDUy9s+ErHiU9fm0Ype0yknP88RMeDrDs9SXeofOhPTjL7RUdX/i8l92tJ +kL8Zn/DfEgJvzN/t4L9LQpNiXDy5nEAev9vLLlA+lBMTd0CYwOzQNlWxBhKu +JkTG1EsQ2J0bJSHeSOWTU0hEgBqBBVF61bP3SLjddTqcoU1gkUeKlFcTFa9t +QWe6NhCod+bp0beUUzf4h+oAgUlhNq0lzSRoc/xCPpoTKGjY/2z5fRJeyrOD +U7YSKPO6usWb8soVJ4LG9hCYWth9nNFCAjfyeGCOHYGQeZARRnnbzLGA7fsJ +9B2sfNxJOWHwyKlyNwLLYGO/bysJivaefg5eBC4ar7BspPzwmTtb0IdAurJf +CX8bCXx1Lic9Agk80nhUN5nydY3DJ8RCCSxOHHTpoGxW6OTTFkHghjatGMEH +JHyQOHTcL5bAld2zGaaUwy8c8KadJbChaCA3kLIs//5jnecJ5E2Oyyyn3BDs +cDQijcB0l0sJfZTn3e2ODGQTePdsmIX2QxIy+208k/MJxE8Fa+0pb9xj7WFc +TKDbhkfvQih3P9zjPlxO4KPKi9nZlAOMd7tlVRJ4YLbMup6y2M2drpbVBGqr +1fK+oVytuMNltpZA1fdu5AjlvTlWh0saCeyUctiz6BEJP0S2Odu1EPjRxWRC +hHKPN+3l0UcE6rjlXadRbn44D+EdBDK0jJ5qUC6Vf12Z1kng8IdhT33KKcEc +udK3VDx1k4KNKQd1RV9o6CcwPmaG14Sys8aBhZcfCFz+Zin//9e3Jqw/8eUL +gZ/b8s7oUdYaXPF+bojAufTLvuqUxY2/7BSaINCO2TEgT5nncuM92hSBzXOy +j4Qpfxu/pKE/T8Vb00f1L/U/Lyx9cq0WqO+NzVzxlXLNdQshZz4GRjpEHntK +Ofev7JlTSxm4pWSJJUk5bt/MaIIQAzMElhefo+xz48XBHFEGFlSdjPagbLe8 +9NkNcQa6+ksOsiibuEewHsowcN+D4ZbVlJlN9mQfjYGfOO3MQWr/Vkpoy4wr +MnD5y0tClZR/sZcm86oz8IPfxpAgyv90fPyzToeB9qcuHzehzI1I/QeNGXhv +kdy/TVQ+pfcd3W5rykDPbeInQyiHrjdv8LJgoKXH0ShdylbfJq+m7magpEKj +RSaVr0O7bPd/dmNgrHS9pxGV36/K1J/OejFQf6uobT9VH/W8S4xWnmCgWJ30 +60DKiXdqJPVOM9DMciammKovJTnxvvhkKh41w719VH0Kn56wzE5l4HTsJw8n +yrOv2uuqMhio4iyY9IGq5/a405m9+QwsDS0o6KHq3XOsz161hoHvhOqkrtWT +sHPrrXa4y8DXQ7djllLWKzi30aaZgQ9WRyafqCNhiZ2xeNgTBvrEHYzSpvpL +cWNO9/MBKj7j29ck3ybhc5KzHVuAiRNb79+6Xkntx5AaTWsFEx0NG82+VJAw +s2VudFSYiUG+vmN0yst4U2O9JJlYFG6ad4Xqn1qnW6ud1ZmoqrwzzKmMhDB3 +puguayZGt70ddKX68ZLWnwMr7Jl4+FZsXmA+la/yTeVPDjDx41+xuIRr/+9/ ++8wsPJjoHK/TlU/18yd7En1Zp5ko86373E1qHqw1GXmhmsdEAcNfjB2pJFy7 +Wnv1+3Umzpx59kX3ItVv52I8S0qZeMZc9N06ap4YV8ss0G4ycRmvjX93Mgmu +Krs0JB8w0Smnw20DNY+q1t5MEhxmInm8Z9HxcBIsxwMtv+gp4t8zpfadXiRI +a8vGCRorYlXr6semR6j5ym5rUTVVxOJ1c2KVHlS+TAsbs60UcWRLr2WEKwkD +f8s0FpwUsUdK2vDvARLYK/4RlUhUxGe1f8FlFzUvlXFge78iGvPTRD5qk+B9 +7KvkyQ+KaFnYZj2uSQKQSfvSvijiCseTGfPq1H5o9b7sHVfEXRWVyoIqJGhs +ZLd68Clh4uLQqwsKJLRaFJZGqCuh09W5FufVJIy4CvpVhyshwxbLf41S56Pc +TY1NMUooEMi3p2qYC+O9EQJPE5Ww6pOskdd3LvzcNXf1Y5oS6masGHj1mQsz +RkNtQqVKyK/xNjy2nwuL13Ss9XqphMwnvsZe7VyQaLtQL6OgjD9vWU/qXKPO +d8S6xfEtykjnbOMV3cqF7y5bSo0eKaNdxzKx/Zu5kJQfuHPiqTJO/eMomG/G +hdeyPVkOb5RxEf/NDCaLC84Smbpq35QxzirQX1yHC6eFpNw7V6rgN9GKVVek +uMCdlW2XclDBZ5fie1aOckDkGfN81bgKShua/lhxlgPSCZW79fTU8NurxwZH +ssrhiqqBsKinOl5cU+BdlFcGTyRNN0xe1MDrCw/N76eXgqF0S4rmW02s+rXF +ep9zCQjxFpw6HKWFOnZ9+mt0i0E2Us7YgamNd8LXbA4dLISljAM1ex9pY1CB +Q61G6nXQYElUBh7UwbHXH1Xe2RUAe0CkdRuPLpralPZyF+fD+GSSreUVXQzY +TjvjmpYHWzQfZlmqr8cR/QvbVYxy4N6k0e+Z5+vxTpY7T2xrFvio6fR1um9A +mz39eZZJV4A15tblsFQP70Qmj3biZdhMiO9YWaCHmstfXPDZmA5KEWeDWvT1 +cXvrJ6Fddqmg4m7QxOjTx3urHDP+HEsB93tHYqp9NyKdnq1pGp0MTde63H6I +GWBQ3nU+UvUs/CpdmNG8Y4BaM6P6+5XiwZXBWZq1wxAF68p5PqfHwA+VNL2b +E4aYw9L+Y7o0CmoLf3+cSjDCsa2HJOXawsFxE3VWkjVG9aOjTk4/QkDqeHyd +RrMxLtfKnTLXDwKxZd43duxj4cDnB533pfyh0DwseMKBhb7fC++XCPmDTth5 +87QDLPRW89mdvsgfdk5Uvek5zEKd9xOmkf+egri3U3Ou3iycsV+mX37rFMwW +hJsFR7JwbH9HiN6OU9BnlPa6mMPCNtu6P0qxfnDEvzDbsoKFmh5j0QNBfjBd +cdt9pIqFzrberlnefiBC65nRrmHh6JWjNIaNH1gJykg3NrPQpj3WJY7uBw1d +xW6v37Bwtq/zt38rG7YJ1aoH9LDQtnT9fxfusKFny+Np8X4Wqj8N21DFYcOv ++uGEQx9YmMkeMuBNZ4N6vhb5fYiF/kvMDky6saGhzzQgaZSFt5VGHpk4UO9b +Yw2aEyysmnlql7KDDR7x/p2nplgY8dbmzWY96n3NcVnrZln4UDq1uUyFDVHz +Ga718yysD1N/KCrHBuH1ZWoH/7KwQevHp2hRNuQer59aWGDh5tMl6+YF2PA/ +bMxQjg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.058160722717510764`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -3010,19 +8330,19 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.058160722717510764`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3036,115 +8356,113 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwV1nc4Vf8fAHCFaEmk7HHvudfeRcb1fqOUtI3QIDMl5crIyF5FCSUyIvve +g0pCRKhUGkpZ31Qa37JLZvX1O78/znOe1/N5znnOeX/e46PgcmKv+2IeHp7/ +qOv/9+mBx23EuUITbzL2wRv1jSZdueKnTXuiYCYrie+P+lpAsRcu4j2psHfB +ZfqxOhMCdpd38/YUAGN10X/l6nqwemxd6lz3TegatWqOVreA9w07T/zqboFl +9CLx1ep2YEEMvfvR/Qoejx2+s1/VA+a69S9NdA/CscqzoqlEALSalxR2FkxC +9aqXny9OxoH0+7qvLmp/YcRW6qLjtxRY4+1ULmDOi2TiBzs+0cuQqm1xd6et +IPIPRSU7sa9C7xWt5h/CKzE6sP8hn8Q1OFcY/mKxxGqsWGYdkBhRAOvSPyWm +5Yhi28c8WjanEOJtLE1eTYuh2lxYm1FkMfgZ5Ds9jhLHZy7TTeYWpbBpfD7Y +55MkRk5skuq8XQant6ar3B+RxMJjYY78d8ugIl+9T3RaEk2cqrfoNZeBuI2z +QZ2gFErXjqicf1IGI7UPZng1pDBrft+Kte/LIC0q5VRmkBSOqE/8jhUoh0Ex +pk/bSmncvOp73Wfbcog03nNYcqMMzvVUHrz4rRy2Hsr9qW8mg4L1LqI7R8tB +KGI42na7DF486Ptyyc9yyG6NLU5xlkFr2mJn79/lULutfnhJogxu+NT+UkCI +AxP29IDJXhn8N/VJX7gOBw75T53tCJFF7nRrp18QBxgZZtJDsbLYmJyjfyOU +Q33vBVIgRRZ3jxXnD0VwIPiP8kuzQlkc1qJH7UnkwKXoQ2J1HdTzSaN+45kc +6Lj4KK9IRg6VfUzWeddzwLAis/pMkxzyNxX5HpnlwKbu53/H2uWwrZDl+vU3 +B3by8G1xeiWHh3j83zkvcMB1r08vfJFDcz4+b6slXLAIUQiP4JfH5taMyWlR +LpyUm75uqiqPExrR90o0uNDmmTfaGiCPKq3aMycPc8Hyj4FIaIg8Sja2KUe4 +ceF5Spfe+gh5XF5u/+2cJxd665ZGFCbKo9IFmWWZx7kwtvyUSGw29fxE0OfE +01wQr9qqb9Eij3HbsyQepnDBe/ZHRPtKBWy2XPyqrIELhr4ea7+KKKDAcVH9 +6CYuCA71cXjFFfBZc2m6fQsXivpb35rQFJBXINVw5hEXBu5dUrutp4CfzCYM ++F5zYVesQU++E7X+4cDOg9+4oCMSqRlyQwE37qAZCAmTwHNuqu1KjQL6Xvpj +7SlCwnPeo441dxUQc/LZDWtIODa1N/bHAwW0XjvR4ChBQmEP0e/Zp4Cry7Zf +9KSRsDavPc6Gl4Y7Vu3IbNElYU5VeEDdloZM3V7bSGsSpnMkI3UdaTg8MKtg +bUvCr1UMwsCJhoS7GENhHwljkwZHN3nRkHxs8OqGIwmDd12nHcNo6FO14m3R +YRKeWN0RSiii4TF7i6keHxIeNd6/kVxOw6Rfwcd9TpLQptlhk1ZJw+KsHoKH +TcI90Y9ZuXU0DK9eby3uT8LN/mWKt5/RsFa0oFEqhISsY4dgcIqGwcJ2m0/E +kZDx7sjgv/M0jN8g+rM9noT0XX6xows0ZHz5+lU2kYTzuglPZ5fS8cV6RU7T +ORKift/Yt0qWjhHPEyu6Uqj4nOM/aWxBxwQvNcUdWSQc+btK1MyKjidUu7KP +XSXB44RkzZbddJyRMnaLyybB2Vrzz15HOvYqvRyqyiXBRsohwcuHjm+YT771 +FpBgzOFeu3yZjp1WhzeGlpPQL8/J23yVjunTv3t2c0gIvlyW+yuPjkZHlu+i +cUm4E1mcvbeMjozPNY13SRJ07K9dEWqgY+Xe/Or2KhI6n+VmNDbTcSwbhGNu +kHDSPOey9wM6Sjc3bDa+SUKFRlb6k+d0vMZOxeu3SFDmT0+J+0jHwtCIWKsa +EtqDUy9s+ErHiU9fm0Ype0yknP88RMeDrDs9SXeofOhPTjL7RUdX/i8l92tJ +kL8Zn/DfEgJvzN/t4L9LQpNiXDy5nEAev9vLLlA+lBMTd0CYwOzQNlWxBhKu +JkTG1EsQ2J0bJSHeSOWTU0hEgBqBBVF61bP3SLjddTqcoU1gkUeKlFcTFa9t +QWe6NhCod+bp0beUUzf4h+oAgUlhNq0lzSRoc/xCPpoTKGjY/2z5fRJeyrOD +U7YSKPO6usWb8soVJ4LG9hCYWth9nNFCAjfyeGCOHYGQeZARRnnbzLGA7fsJ +9B2sfNxJOWHwyKlyNwLLYGO/bysJivaefg5eBC4ar7BspPzwmTtb0IdAurJf +CX8bCXx1Lic9Agk80nhUN5nydY3DJ8RCCSxOHHTpoGxW6OTTFkHghjatGMEH +JHyQOHTcL5bAld2zGaaUwy8c8KadJbChaCA3kLIs//5jnecJ5E2Oyyyn3BDs +cDQijcB0l0sJfZTn3e2ODGQTePdsmIX2QxIy+208k/MJxE8Fa+0pb9xj7WFc +TKDbhkfvQih3P9zjPlxO4KPKi9nZlAOMd7tlVRJ4YLbMup6y2M2drpbVBGqr +1fK+oVytuMNltpZA1fdu5AjlvTlWh0saCeyUctiz6BEJP0S2Odu1EPjRxWRC +hHKPN+3l0UcE6rjlXadRbn44D+EdBDK0jJ5qUC6Vf12Z1kng8IdhT33KKcEc +udK3VDx1k4KNKQd1RV9o6CcwPmaG14Sys8aBhZcfCFz+Zin//9e3Jqw/8eUL +gZ/b8s7oUdYaXPF+bojAufTLvuqUxY2/7BSaINCO2TEgT5nncuM92hSBzXOy +j4Qpfxu/pKE/T8Vb00f1L/U/Lyx9cq0WqO+NzVzxlXLNdQshZz4GRjpEHntK +Ofev7JlTSxm4pWSJJUk5bt/MaIIQAzMElhefo+xz48XBHFEGFlSdjPagbLe8 +9NkNcQa6+ksOsiibuEewHsowcN+D4ZbVlJlN9mQfjYGfOO3MQWr/Vkpoy4wr +MnD5y0tClZR/sZcm86oz8IPfxpAgyv90fPyzToeB9qcuHzehzI1I/QeNGXhv +kdy/TVQ+pfcd3W5rykDPbeInQyiHrjdv8LJgoKXH0ShdylbfJq+m7magpEKj +RSaVr0O7bPd/dmNgrHS9pxGV36/K1J/OejFQf6uobT9VH/W8S4xWnmCgWJ30 +60DKiXdqJPVOM9DMciammKovJTnxvvhkKh41w719VH0Kn56wzE5l4HTsJw8n +yrOv2uuqMhio4iyY9IGq5/a405m9+QwsDS0o6KHq3XOsz161hoHvhOqkrtWT +sHPrrXa4y8DXQ7djllLWKzi30aaZgQ9WRyafqCNhiZ2xeNgTBvrEHYzSpvpL +cWNO9/MBKj7j29ck3ybhc5KzHVuAiRNb79+6Xkntx5AaTWsFEx0NG82+VJAw +s2VudFSYiUG+vmN0yst4U2O9JJlYFG6ad4Xqn1qnW6ud1ZmoqrwzzKmMhDB3 +puguayZGt70ddKX68ZLWnwMr7Jl4+FZsXmA+la/yTeVPDjDx41+xuIRr/+9/ ++8wsPJjoHK/TlU/18yd7En1Zp5ko86373E1qHqw1GXmhmsdEAcNfjB2pJFy7 +Wnv1+3Umzpx59kX3ItVv52I8S0qZeMZc9N06ap4YV8ss0G4ycRmvjX93Mgmu +Krs0JB8w0Smnw20DNY+q1t5MEhxmInm8Z9HxcBIsxwMtv+gp4t8zpfadXiRI +a8vGCRorYlXr6semR6j5ym5rUTVVxOJ1c2KVHlS+TAsbs60UcWRLr2WEKwkD +f8s0FpwUsUdK2vDvARLYK/4RlUhUxGe1f8FlFzUvlXFge78iGvPTRD5qk+B9 +7KvkyQ+KaFnYZj2uSQKQSfvSvijiCseTGfPq1H5o9b7sHVfEXRWVyoIqJGhs +ZLd68Clh4uLQqwsKJLRaFJZGqCuh09W5FufVJIy4CvpVhyshwxbLf41S56Pc +TY1NMUooEMi3p2qYC+O9EQJPE5Ww6pOskdd3LvzcNXf1Y5oS6masGHj1mQsz +RkNtQqVKyK/xNjy2nwuL13Ss9XqphMwnvsZe7VyQaLtQL6OgjD9vWU/qXKPO +d8S6xfEtykjnbOMV3cqF7y5bSo0eKaNdxzKx/Zu5kJQfuHPiqTJO/eMomG/G +hdeyPVkOb5RxEf/NDCaLC84Smbpq35QxzirQX1yHC6eFpNw7V6rgN9GKVVek +uMCdlW2XclDBZ5fie1aOckDkGfN81bgKShua/lhxlgPSCZW79fTU8NurxwZH +ssrhiqqBsKinOl5cU+BdlFcGTyRNN0xe1MDrCw/N76eXgqF0S4rmW02s+rXF +ep9zCQjxFpw6HKWFOnZ9+mt0i0E2Us7YgamNd8LXbA4dLISljAM1ex9pY1CB +Q61G6nXQYElUBh7UwbHXH1Xe2RUAe0CkdRuPLpralPZyF+fD+GSSreUVXQzY +TjvjmpYHWzQfZlmqr8cR/QvbVYxy4N6k0e+Z5+vxTpY7T2xrFvio6fR1um9A +mz39eZZJV4A15tblsFQP70Qmj3biZdhMiO9YWaCHmstfXPDZmA5KEWeDWvT1 +cXvrJ6Fddqmg4m7QxOjTx3urHDP+HEsB93tHYqp9NyKdnq1pGp0MTde63H6I +GWBQ3nU+UvUs/CpdmNG8Y4BaM6P6+5XiwZXBWZq1wxAF68p5PqfHwA+VNL2b +E4aYw9L+Y7o0CmoLf3+cSjDCsa2HJOXawsFxE3VWkjVG9aOjTk4/QkDqeHyd +RrMxLtfKnTLXDwKxZd43duxj4cDnB533pfyh0DwseMKBhb7fC++XCPmDTth5 +87QDLPRW89mdvsgfdk5Uvek5zEKd9xOmkf+egri3U3Ou3iycsV+mX37rFMwW +hJsFR7JwbH9HiN6OU9BnlPa6mMPCNtu6P0qxfnDEvzDbsoKFmh5j0QNBfjBd +cdt9pIqFzrberlnefiBC65nRrmHh6JWjNIaNH1gJykg3NrPQpj3WJY7uBw1d +xW6v37Bwtq/zt38rG7YJ1aoH9LDQtnT9fxfusKFny+Np8X4Wqj8N21DFYcOv ++uGEQx9YmMkeMuBNZ4N6vhb5fYiF/kvMDky6saGhzzQgaZSFt5VGHpk4UO9b +Yw2aEyysmnlql7KDDR7x/p2nplgY8dbmzWY96n3NcVnrZln4UDq1uUyFDVHz +Ga718yysD1N/KCrHBuH1ZWoH/7KwQevHp2hRNuQer59aWGDh5tMl6+YF2PA/ +bMxQjg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.058160722717510764`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -3155,6 +8473,7 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -3182,7 +8501,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.060553949877372025`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.058160722717510764`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -3190,9 +8510,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913408819317417`*^9}, - CellLabel-> - "Out[338]=",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] + CellChangeTimes->{3.9913408819317417`*^9, 3.994385192887747*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"1947c267-810d-4ba8-ab35-6fcfd966c025"] }, Open ]], Cell[CellGroupData[{ @@ -3245,66 +8564,70 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[339]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], + "In[100]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 339, 345, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881982744*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5534777048385944`*^-171\\\", \ +\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ +734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 100, 17, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994385192958378*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], +In[100]:=",ExpressionUUID->"a1d21c89-26ab-4562-a752-3755b9a7dee8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 346, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881991743*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.300353565701364`*^-175\\\", \ +\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ +116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 100, 18, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.99438519296133*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], +In[100]:=",ExpressionUUID->"a455fa80-a03f-44bb-90bc-d70de36f2677"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 347, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882000746*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.567931627061298`*^-178\\\", \ +\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ +2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 100, 19, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.9943851929644613`*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], +In[100]:=",ExpressionUUID->"247dbecb-b72b-4e41-aacb-fcfc37d9e707"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 339, 348, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882008745*^9}, +during this calculation.\"", 2, 100, 20, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994385192966587*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], +In[100]:=",ExpressionUUID->"b66d6385-1bc1-40bc-adc6-e2af1cb33d4d"], -Cell[BoxData["12.553654989521348`"], "Output", - CellChangeTimes->{3.9913408882266617`*^9}, +Cell[BoxData["13.068759294420904`"], "Output", + CellChangeTimes->{3.9913408882266617`*^9, 3.994385213557166*^9}, CellLabel-> - "Out[339]=",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] + "Out[100]=",ExpressionUUID->"b1eb9690-9668-490a-8703-2c0c2f199b74"] }, Open ]], Cell[CellGroupData[{ @@ -3372,68 +8695,72 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{ - 3.9918497473740044`*^9, {3.99184977815234*^9, - 3.991849780845421*^9}},ExpressionUUID->"1d118f77-7d68-dd41-b0af-\ -09454f88e7f1"], + 3.9918497473740044`*^9, {3.99184977815234*^9, 3.991849780845421*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 340, 349, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882626343`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.650873745222287`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 101, 21, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.9943852135959272`*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], +In[101]:=",ExpressionUUID->"81a128fb-889d-4b56-9f49-4ba6cb881870"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 340, 350, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882726326`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.832599448291594`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 101, 22, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994385213598419*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], +In[101]:=",ExpressionUUID->"454ca8be-df63-4408-9696-d7a3f1910237"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 340, 351, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882816315`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4198863278249528`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 101, 23, + 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.9943852136006117`*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], +In[101]:=",ExpressionUUID->"d8e1697c-266c-41de-a5f2-84cff7d5c917"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 340, 352, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882906322`*^9}, +during this calculation.\"", 2, 101, 24, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994385213602736*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], +In[101]:=",ExpressionUUID->"f774f38e-523a-48d1-9fff-e13f3c98e545"], -Cell[BoxData["1.3456729512531673`"], "Output", - CellChangeTimes->{3.991340895263792*^9}, +Cell[BoxData["0.6956489834030958`"], "Output", + CellChangeTimes->{3.991340895263792*^9, 3.99438521666082*^9}, CellLabel-> - "Out[340]=",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] + "Out[101]=",ExpressionUUID->"6a7918ed-1c51-42b4-be43-febbaec5e164"] }, Open ]], Cell[CellGroupData[{ @@ -3454,8 +8781,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3500,68 +8826,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497892022038`*^9, - 3.991849792285101*^9}},ExpressionUUID->"c8039063-5f4d-134a-b6ba-\ -e19335f7a9f6"], + CellChangeTimes->{{3.9918497892022038`*^9, 3.991849792285101*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 341, 353, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895297941*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.650873745222287`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 102, 25, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.9943852166791267`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], +In[102]:=",ExpressionUUID->"f9d42bdf-e80c-43d4-a36a-ce0375b59644"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 341, 354, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895308939*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.832599448291594`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 102, 26, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.9943852166815643`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], +In[102]:=",ExpressionUUID->"ec5ed300-8646-4830-9516-70263ed3775b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 341, 355, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895316965*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4198863278249528`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 102, 27, + 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994385216683593*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], +In[102]:=",ExpressionUUID->"dd6ffee0-29fb-4e74-84c1-8e9ea390e9f7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 341, 356, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895324953*^9}, +during this calculation.\"", 2, 102, 28, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994385216685626*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], +In[102]:=",ExpressionUUID->"f7277a3c-1221-4348-9429-2d78c2552caa"], -Cell[BoxData["11.729429210875175`"], "Output", - CellChangeTimes->{3.9913409010488796`*^9}, +Cell[BoxData["46.03309902411016`"], "Output", + CellChangeTimes->{3.9913409010488796`*^9, 3.994385219568543*^9}, CellLabel-> - "Out[341]=",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] + "Out[102]=",ExpressionUUID->"8d83013a-265a-405f-9b6f-704fd827939b"] }, Open ]], Cell[CellGroupData[{ @@ -3582,8 +8912,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -3628,68 +8957,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497964884186`*^9, - 3.9918497998504505`*^9}},ExpressionUUID->"a474307a-af78-3040-90ec-\ -fb8d284b16bb"], + CellChangeTimes->{{3.9918497964884186`*^9, 3.9918497998504505`*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 342, 357, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010848827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.650873745222287`*^-213\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 103, 29, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994385219586491*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], +In[103]:=",ExpressionUUID->"d0dd5459-99be-4c9d-ba36-f650e7a2f18c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 342, 358, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010938797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.832599448291594`*^-218\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 103, 30, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994385219588945*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], +In[103]:=",ExpressionUUID->"59cd7659-cbda-4180-8f5d-9e0df4ee9345"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 342, 359, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340901101883*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4198863278249528`*^-223\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 103, 31, + 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994385219591004*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], +In[103]:=",ExpressionUUID->"47478dbb-b822-40de-a05f-371f281d7671"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 342, 360, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409011098804`*^9}, +during this calculation.\"", 2, 103, 32, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994385219592963*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], +In[103]:=",ExpressionUUID->"a12503c2-d659-4ce0-a1e1-f8069244a813"], -Cell[BoxData["21.67464099510054`"], "Output", - CellChangeTimes->{3.991340904517517*^9}, +Cell[BoxData["8.35902448666432`"], "Output", + CellChangeTimes->{3.991340904517517*^9, 3.9943852214530497`*^9}, CellLabel-> - "Out[342]=",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] + "Out[103]=",ExpressionUUID->"0c3c4bde-6001-4a84-8a77-4721fba470a1"] }, Open ]], Cell[CellGroupData[{ @@ -3698,22 +9031,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849803549658*^9, - 3.9918498086143265`*^9}},ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-\ -f67bfdbd9bc7"], - -Cell[BoxData["0.0843966342510027`"], "Output", - CellChangeTimes->{3.991340904549515*^9}, + CellChangeTimes->{{3.991849803549658*^9, 3.9918498086143265`*^9}}, CellLabel-> - "Out[343]=",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] + "In[104]:=",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], + +Cell[BoxData["0.035463145135140976`"], "Output", + CellChangeTimes->{3.991340904549515*^9, 3.994385221469872*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"1bcae88b-9251-4df6-9ced-0f2a61680830"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918501018852215`*^9, 3.991850105557743*^9}, - 3.99192470649716*^9},ExpressionUUID->"d104d373-080a-854b-92ff-\ -e87abbd4c41c"], + 3.99192470649716*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ @@ -3736,12 +9070,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[345]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], + "In[106]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.9913409045775146`*^9}, +Cell[BoxData["13.103190348487058`"], "Output", + CellChangeTimes->{3.9913409045775146`*^9, 3.9943852214838257`*^9}, CellLabel-> - "Out[345]=",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] + "Out[106]=",ExpressionUUID->"de36f3eb-ce24-484f-bcdb-34bdc4863c59"] }, Open ]], Cell[CellGroupData[{ @@ -3751,12 +9085,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[347]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], + "In[107]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.991340904625164*^9}, +Cell[BoxData["1.754175640605632`"], "Output", + CellChangeTimes->{3.991340904625164*^9, 3.994385221494502*^9}, CellLabel-> - "Out[347]=",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] + "Out[107]=",ExpressionUUID->"3c0c2811-a2fd-4848-83e3-b0fbb57a4c39"] }, Open ]], Cell[CellGroupData[{ @@ -3766,12 +9100,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[350]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], + "In[108]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913409046880226`*^9}, +Cell[BoxData["22.985297323534816`"], "Output", + CellChangeTimes->{3.9913409046880226`*^9, 3.994385221505604*^9}, CellLabel-> - "Out[350]=",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] + "Out[108]=",ExpressionUUID->"9442259f-57ce-4de2-bb49-dce675136547"] }, Open ]], Cell[CellGroupData[{ @@ -3961,12 +9295,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[351]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], + "In[109]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[BoxData["0.021613768236132463`"], "Output", - CellChangeTimes->{3.9913409047132187`*^9}, +Cell[BoxData["0.004985993687792884`"], "Output", + CellChangeTimes->{3.9913409047132187`*^9, 3.994385221517632*^9}, CellLabel-> - "Out[351]=",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] + "Out[109]=",ExpressionUUID->"8a693f76-8364-4d91-a6ad-c8c55c48ff8d"] }, Open ]], Cell[CellGroupData[{ @@ -3980,12 +9314,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[352]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], + "In[110]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[BoxData["6.028089553291302`"], "Output", - CellChangeTimes->{3.9913409048112164`*^9}, +Cell[BoxData["12.550732649231167`"], "Output", + CellChangeTimes->{3.9913409048112164`*^9, 3.994385221568954*^9}, CellLabel-> - "Out[352]=",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] + "Out[110]=",ExpressionUUID->"cc561807-107e-46b4-b163-ace78b7ec36e"] }, Open ]], Cell[CellGroupData[{ @@ -4177,12 +9511,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[353]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], + "In[111]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[BoxData["0.010798036798660033`"], "Output", - CellChangeTimes->{3.991340904825058*^9}, +Cell[BoxData["0.03998646638330067`"], "Output", + CellChangeTimes->{3.991340904825058*^9, 3.994385221581168*^9}, CellLabel-> - "Out[353]=",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] + "Out[111]=",ExpressionUUID->"e2dde519-2e48-415d-a2a5-af087c0b393b"] }, Open ]], Cell[CellGroupData[{ @@ -4196,12 +9530,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[354]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], + "In[112]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[BoxData["8.5284977476633`"], "Output", - CellChangeTimes->{3.9913409049303207`*^9}, +Cell[BoxData["4.431884433506331`"], "Output", + CellChangeTimes->{3.9913409049303207`*^9, 3.994385221635549*^9}, CellLabel-> - "Out[354]=",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] + "Out[112]=",ExpressionUUID->"4f849243-408f-4f70-ba82-87190a97aed0"] }, Open ]], Cell[CellGroupData[{ @@ -4294,12 +9628,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[355]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], + "In[113]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991340904948307*^9}, +Cell[BoxData["0.09644452732399805`"], "Output", + CellChangeTimes->{3.991340904948307*^9, 3.994385221647705*^9}, CellLabel-> - "Out[355]=",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] + "Out[113]=",ExpressionUUID->"e2cbd994-d6ce-40c0-a740-3ed77064ee5d"] }, Open ]], Cell[CellGroupData[{ @@ -4389,12 +9723,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[356]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], + "In[114]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991340904981308*^9}, +Cell[BoxData["0.903555472676002`"], "Output", + CellChangeTimes->{3.991340904981308*^9, 3.994385221659087*^9}, CellLabel-> - "Out[356]=",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] + "Out[114]=",ExpressionUUID->"8e314aec-8523-4dcf-af5b-0b7dc6c3a6c8"] }, Open ]], Cell[CellGroupData[{ @@ -4517,12 +9851,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[357]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], + "In[115]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.99134090500931*^9}, +Cell[BoxData["0.08714298047324866`"], "Output", + CellChangeTimes->{3.99134090500931*^9, 3.994385221670793*^9}, CellLabel-> - "Out[357]=",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] + "Out[115]=",ExpressionUUID->"e70f9df7-5067-461a-808d-234f9baa0d4d"] }, Open ]], Cell[CellGroupData[{ @@ -4584,68 +9918,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849824909197*^9},ExpressionUUID->"486d514f-ec65-1e4e-b780-\ -7e9487f745c3"], + CellChangeTimes->{3.991849824909197*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 361, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905038307*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2017001309457002`*^-229\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 116, 33, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994385221682415*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], +In[116]:=",ExpressionUUID->"c1e1e560-4991-4e41-af5d-9bb1a8247c60"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 362, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905047306*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.812024036625513`*^-236\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 116, 34, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994385221685398*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], +In[116]:=",ExpressionUUID->"a78a4844-0fea-439c-9a18-94fca18d6588"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 363, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905056307*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0784482731800915`*^-242\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 116, 35, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994385221687901*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], +In[116]:=",ExpressionUUID->"3dc698fb-4ddf-4aa5-b5b6-08fc0f1ae0c3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 358, 364, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905064308*^9}, +during this calculation.\"", 2, 116, 36, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.9943852216900883`*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], +In[116]:=",ExpressionUUID->"647dd47b-3c44-4beb-a45b-99cdb2aaad21"], -Cell[BoxData["6.028089553291301`"], "Output", - CellChangeTimes->{3.991340908920454*^9}, +Cell[BoxData["12.550732649231167`"], "Output", + CellChangeTimes->{3.991340908920454*^9, 3.994385223192669*^9}, CellLabel-> - "Out[358]=",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] + "Out[116]=",ExpressionUUID->"33c50b2a-02b2-4e9c-b84a-94d58b897f87"] }, Open ]], Cell[CellGroupData[{ @@ -4707,68 +10045,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918498299076843`*^9},ExpressionUUID->"c7144ce5-8356-d548-8854-\ -18c538c3321c"], + CellChangeTimes->{3.9918498299076843`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 365, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908954941*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2017001309457002`*^-229\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 117, 37, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.9943852232102118`*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], +In[117]:=",ExpressionUUID->"cc6b3789-0a93-45d5-9929-a48989fbc58b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 366, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908964924*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.812024036625513`*^-236\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 117, 38, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994385223212728*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], +In[117]:=",ExpressionUUID->"da3a4878-d96c-4161-86e7-4203ca7ed998"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 367, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409089739246`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0784482731800915`*^-242\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 117, 39, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994385223214952*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], +In[117]:=",ExpressionUUID->"661258bc-bde2-4211-bf30-b45f2f3764ad"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 359, 368, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908981924*^9}, +during this calculation.\"", 2, 117, 40, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994385223217084*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], +In[117]:=",ExpressionUUID->"0147200b-1037-47cc-837c-fa122e5072ab"], -Cell[BoxData["8.528497747663296`"], "Output", - CellChangeTimes->{3.991340912767397*^9}, +Cell[BoxData["4.431884433506329`"], "Output", + CellChangeTimes->{3.991340912767397*^9, 3.9943852247284813`*^9}, CellLabel-> - "Out[359]=",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] + "Out[117]=",ExpressionUUID->"70fa42d5-9afe-4ecd-8a93-69d0bae8b777"] }, Open ]], Cell[CellGroupData[{ @@ -4826,95 +10168,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849833066021*^9},ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-\ -a45df2eabf0c"], + CellChangeTimes->{3.991849833066021*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd0bB3BDZCxDppTMhUSusbz2U0hkKGXKfJ1zSCJDuoZooMkQovS+ +SYUMGTMkVCpv/OKNSoUos5J7ucYG1W/fP84667P2Xt/z7P2s9ayjRA9xJHm4 +uLiY+OG8Q19u2Xi/66XZPc11G7j+YiIzVr4B3aIURdIpPY4Hcw0zVS2aUE69 +eRDHe4n/+EVo/yJJrZoOjqsY8c/4LDpQYt39/dzYF57LNseXvEJfney5ebAf +dIXeWNZ7i4x5GW85nux7ERvV2IMq6/S7eLHXjqm4L5r3o1j/BPYK7D3TsSbh +HZ+QirC/CT/2o+VJYUbJEOK70l+4EvvdKZmYuuARNPlj1FQQm8VvMTmvN4Y8 +tE5+E8LmTz7qRlsaR8dkyvtEsBXEc9pCGz8jgfLgkVXY9vKLd1jmU4iRWhgg +iU3dVJbWFmCh4fINY1LY8WoOiYc7ptGYuuZ5Weweme6tESVslNq4sEMBmzgY +eOhy8ix6kVfnqoQ9c53r1r3gOZQbLXhFFVtAWVuMrbeAZmKIBC3sTOKZlZjU +IhL1DzLQwVYsdIvXWVpERU/4RGnYxpvPso40fkOHjKZ0tmMHGH7qmDRfRotz +ZyzssOcZx1YIqf9CtvqSmo7YJxuFTTUEfqP+PD1DF+xsML7r3/EHbXJWeurL +qa+gzSKshBtmbtYXMbBLnl8ePCXPA8K/nz2N49Q74RWbnswDJWxP3kTsWM2F +6spgXrCqNf2Wzqm3QkllWo8PHkvkVpZh93VNPfqdxwf302T/1HDqn71/cJUU +P7CqFSKasEv17TO0l/jh8bvOV+3YLQ+iuYMaBYDV9NB9Cnvh2ZtPn81FIH4+ +oVjfjIkkbEXEYh6JAHn1HxrC1u22AFETUZCX+DlpjR04Wntz65ZV8ONRxpA3 +9lGeDt2/RMTAo0+GlYI9plzOTlwUh8p5wYRZ7HnqhWAnTQIuN4UP/8HmuTuu +JBsqAZpmCsGiCNdL2+BY8lUCylRoohrYB83T7r0clAQrXttAOnanX1i4TLsU +RKtX5g5gfyxMTfIRkAbDd/2vmNhTX0vyii2lwcUItv7GFooYebO9WRpadxcd +3wBMZJFwQN+nVgamer4oE9gN+YYLRblyIP8lZXYBO3/sR+S2iPXw6vXLo9t3 +MtFup3Mfw8vWg8kGqtsBe6pFclfZ+HoIDXT0JrD18zdLKbopwLZ59a8p2C10 +r2o+sw2Quaukbxh7dnrw+OczinA+J0A205yJJI9Y1FTbKYN7/5TAGksmGs8X +CtgbqAxza9KctLHr+7vkmWeVYWTbkf/twvaw9Tyj3qwMFhdfqUdj52tFOl7T +U4H2hI31w9j6k4UzcTKq0Hpqi37jLiY64C+sbTOkBh/5zl+8sJuJUKSTnssv +NTBVZagWYmsm5hoRcupwNGR5pAWbK4+2M26fOryye/iGy5qJyj66u9x7og7b +N/JERmPzO5eeWnt7I9jU5bVE2OD6LOzeTdI1YHee2+lEWybK23/1w1KcBkyr +F3YUYqfShwZX/KMBdy0J0xfYxMljXxXeaIAytSl5tR0TiTflcO0314RQeu3U +P9iBNJZmo4oWVP/VWtloz0Tyypfik0Y3A6u2eLvMPiZqujiv8Z1HGyayT5zc +ge0x59ZNKWnDz97N7MPYN1pUNXZ6aYPabmnnJ9jK/g2vv73XBsFNw9rBjvi8 +pWNqVPsW2Gf6VLJrPxOtl1egFN10QavT526NMxNtLogQ+Yn0QMC86BqXJxPR +iTML2vZ6cOWGgbEedrZKxkcfDz0YfJKw7IfNe7ui8jlDD1Ys+Sy2YvfdmDyQ +UaUHvyb7y9O98DzN9snRUKHB76umWzf74P4m2W5x5deHPRVywSf8mOhWmOre +2g4DEFRycUkLZKKuSGSUUGACZr31XiMxTKTk9dbeM+gv+HigNvb0JSYi/9SV +r48CCPbzJOTymUjma/1KGfpO0PgVfbC/iYkiaKb9GZoWwCy81kZ7h+tnLrdJ +TlqCs1z5OnE27ufO8JW5nVZg9EgLUWIslD8f+KQ00xrmEi6l/63DQt92yP7X +Er8HlJ7oOETtZ6EBLl72kK8dHIodqC9gsFDwupC0UyoOUMD91nXhOguVH2pr +zkrcC2FRf+vzPGeh6Dm5Ja1D+0DXe+jHMyYLLdjscm71doQLHvq3LdZOIxP3 +9B1j+/YDU1i+4i+rafRaLiewhXYAGuYrb+qGTaO1d840FW1yAuGXC5Ult6ZR +/aCmrb2oM/Sc5esrfzmNFLpn/COZzjAiWWVr+3Ma0bLSS/MGXUDIftyXX3oG +5ayY25LxzBW25Noe7tk8g+p26PQlPnCDT135W1MsZ1C20UXx5ZKD4Pptq9ld +zxnU+aHgLC3ZHRaTxu/NhM+gWrvrqkdPegBNs7O9KWkGsY/s5womPEHhdtDI +mVszaGGXRgDL3Auu5jVddK+bQUXM3m/hht7w1WGDk23HDHK9VeDnKeIDge05 +3QKDM6j63h5v3nM+IKl0NDRhfgaZyL/+fuG7D9z6nviggp+NVAb9+14d8oUT +fds6T8uw0ajwYYfrI75QvpyWlLqJjbpS7f2snOh4HpKtyIiNMhm5wse66JDX +z/e62ZKNmh79+e5n7QdWYjEoypGNVnvAOVqDHyh6ic198WAjxTWtneua/KA+ +KkJ+jScb6XbYyfI/8oPcsd5NZtiOpu7FPU/8YKD06mw6dua6yPYT//OD9riA +HcZebLR24O7qth4/4H1f3RbvzUaqXjLZHks4n2+D7w9fNjLxYRUl6hPw29rt +w3WKje5cmwm3NyRAyczqv4fYa97MmskYEyDb+vrOR2yW5VJ30XYCUr/UiSn6 +s/H84uLu2ElApQr98S3sVUvibhL7COgYak68GYDvI8VAMPcIAQ/j2beTAtlo +X6tRt38IAaWk+Jli7Edc23J1QwkQCDtm04p9LdzM4GkEAVZef1J5DrORvZuV +71gMAW05Xazj2A9U3R5oXcST/oLiSq8gzn9B7KH6OwQ41haclwlmoyN6V00Y +RQRI8/T+uxXbtrhK0LiEgAzL75N7sIWujhffLyOg5N7SVDx2YtjeyboaAj7l +lXWOY8dqqB6ufUpAYazYqsoQNgq82h507yMBiteqvHVD2ch61bhp2CABFdwO +V6ywNyVyieoNE0Dtzarxwh4PMyirGiPApXBNUTK2r30us3KKgIlPdwInsF35 +woMrfhCQ5k96ZIexkVX42qOl0iQML0qPTYSz0dPcszYZsiRsyrJ7+gvbtGNW +lbGWhKHPV05LRuD+q7X3miuQEPHetdQMW+59jPkHNRJ6T3vkX8b+um1AWsiA +hFPap1WNj7HRJZ6bD/33k5A81eN8OBKfX0ck286JBGORAxknsBPcGWE0FxIu +F96svITNqNm78c9BEgpZd7KqsX0p7vQrdBI0qvS5f2DTXtCJf0NJcHF47nHq +OBu9T1cTVkkjYVXthFw0g43KkWjA53QSCuJKq89hJzDnW8ouk/BldR8tC1vP +uiXO+CoJE02BExXYqVx+s3Y3SMjbuEN+FHtXyM1eRikJ6z4311hFsdH69ecN +zcpJkBo7W7Mfe/5FyGXeShIuxeX97Y19Wx3ZpVaTcH9Pv9xx7F8DA815DSS4 +6uiM5mPX2MoXvWwjQfQao/AndtIPHr7MFyRkKm8R4Y9mI3rRpK9bBwnNfpou +YthiKxrkRzs5nstVxQ5qdL30/R3uj3H58h5sFc0rkapjJHwu4xvOwv7x/sSb +L+MkdGY9LLmB3ZVI6lZ8JsH7WrlbIXbckP6kyRQJ1f3GgfXYfdlvPB3mSGjX +73Xqxc5YKW4ZzU3B2fpCZ+kYPA9mB9wjeCmQ+yfUWQF7YqAkLJiPAmu0ylAd +27TG4iZdkIJkh6ZMA+xxH8ZPG3EKeqbedDpii9laSlhKUnBbcd1LN+ztRhIa +SIoC3ijdUh/sNNFSZ5ocBYvJDSuDOesNn6rklSiYfoxMz2FTBaVtUioUNJ7o +Nk7h7E+L+rRajQKeIh2py5zvUZKiKzQomC02PHKDsy5pFTClS8F/vJF/V2M3 +/JaMH9ejoKl0c1Y99tiXwaxBfQqMp/NDHmJva45+1m1MwXn5nmfPsUeDyhUe +AgWPu7d9eY+9yjXG4P5OCrznp4c+YJuY77atsqBAspne8Ak7VW44qmA3BZrF +8UIT2PUrKtJybXD+4qbTk9gj0zGF12wpaLBP7WViGz+XepuylwJmUdLGeWx6 +1fDXc44UcC0pKyxhp1yv4Dl9gALHLxHz37GHw6x1I13xfURbwR9sUS9pq6MH +KTh4prWWOxbnWY94BnpQgHi4hVdgp2w4keTlQ8EWz9wDAtj1Qja3XekUSDzm +tRbCHl6QfuBIUKCYp7heBFt0aKTTlqLA7O1Clygnr6NyfFcABSzVM8RqbPr9 +E78gkIJdZNt7MU7+bZs124MoWAj6V1OCk58io2UQTMF26WhPSU4+Y3SHzlEK +ls3GQ9ZgixBVrhphFBS3CdKlsI0c4kJUIihwyh6lSXPyt+05uz6SghtXIsc4 +TlaTzZFhUPC84nGkDHad2Fi1eDQF1988nuB46GfVC+FYCi4vRBrLcvIn4ob4 +4ii4KzIWwLHh6z3f/sRTcFpSKIrj/wNOlgSF "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -4928,106 +10269,105 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1nk0Vd0bB3BDZCxDppTMhUSusbz2U0hkKGXKfJ1zSCJDuoZooMkQovS+ +SYUMGTMkVCpv/OKNSoUos5J7ucYG1W/fP84667P2Xt/z7P2s9ayjRA9xJHm4 +uLiY+OG8Q19u2Xi/66XZPc11G7j+YiIzVr4B3aIURdIpPY4Hcw0zVS2aUE69 +eRDHe4n/+EVo/yJJrZoOjqsY8c/4LDpQYt39/dzYF57LNseXvEJfney5ebAf +dIXeWNZ7i4x5GW85nux7ERvV2IMq6/S7eLHXjqm4L5r3o1j/BPYK7D3TsSbh +HZ+QirC/CT/2o+VJYUbJEOK70l+4EvvdKZmYuuARNPlj1FQQm8VvMTmvN4Y8 +tE5+E8LmTz7qRlsaR8dkyvtEsBXEc9pCGz8jgfLgkVXY9vKLd1jmU4iRWhgg +iU3dVJbWFmCh4fINY1LY8WoOiYc7ptGYuuZ5Weweme6tESVslNq4sEMBmzgY +eOhy8ix6kVfnqoQ9c53r1r3gOZQbLXhFFVtAWVuMrbeAZmKIBC3sTOKZlZjU +IhL1DzLQwVYsdIvXWVpERU/4RGnYxpvPso40fkOHjKZ0tmMHGH7qmDRfRotz +ZyzssOcZx1YIqf9CtvqSmo7YJxuFTTUEfqP+PD1DF+xsML7r3/EHbXJWeurL +qa+gzSKshBtmbtYXMbBLnl8ePCXPA8K/nz2N49Q74RWbnswDJWxP3kTsWM2F +6spgXrCqNf2Wzqm3QkllWo8PHkvkVpZh93VNPfqdxwf302T/1HDqn71/cJUU +P7CqFSKasEv17TO0l/jh8bvOV+3YLQ+iuYMaBYDV9NB9Cnvh2ZtPn81FIH4+ +oVjfjIkkbEXEYh6JAHn1HxrC1u22AFETUZCX+DlpjR04Wntz65ZV8ONRxpA3 +9lGeDt2/RMTAo0+GlYI9plzOTlwUh8p5wYRZ7HnqhWAnTQIuN4UP/8HmuTuu +JBsqAZpmCsGiCNdL2+BY8lUCylRoohrYB83T7r0clAQrXttAOnanX1i4TLsU +RKtX5g5gfyxMTfIRkAbDd/2vmNhTX0vyii2lwcUItv7GFooYebO9WRpadxcd +3wBMZJFwQN+nVgamer4oE9gN+YYLRblyIP8lZXYBO3/sR+S2iPXw6vXLo9t3 +MtFup3Mfw8vWg8kGqtsBe6pFclfZ+HoIDXT0JrD18zdLKbopwLZ59a8p2C10 +r2o+sw2Quaukbxh7dnrw+OczinA+J0A205yJJI9Y1FTbKYN7/5TAGksmGs8X +CtgbqAxza9KctLHr+7vkmWeVYWTbkf/twvaw9Tyj3qwMFhdfqUdj52tFOl7T +U4H2hI31w9j6k4UzcTKq0Hpqi37jLiY64C+sbTOkBh/5zl+8sJuJUKSTnssv +NTBVZagWYmsm5hoRcupwNGR5pAWbK4+2M26fOryye/iGy5qJyj66u9x7og7b +N/JERmPzO5eeWnt7I9jU5bVE2OD6LOzeTdI1YHee2+lEWybK23/1w1KcBkyr +F3YUYqfShwZX/KMBdy0J0xfYxMljXxXeaIAytSl5tR0TiTflcO0314RQeu3U +P9iBNJZmo4oWVP/VWtloz0Tyypfik0Y3A6u2eLvMPiZqujiv8Z1HGyayT5zc +ge0x59ZNKWnDz97N7MPYN1pUNXZ6aYPabmnnJ9jK/g2vv73XBsFNw9rBjvi8 +pWNqVPsW2Gf6VLJrPxOtl1egFN10QavT526NMxNtLogQ+Yn0QMC86BqXJxPR +iTML2vZ6cOWGgbEedrZKxkcfDz0YfJKw7IfNe7ui8jlDD1Ys+Sy2YvfdmDyQ +UaUHvyb7y9O98DzN9snRUKHB76umWzf74P4m2W5x5deHPRVywSf8mOhWmOre +2g4DEFRycUkLZKKuSGSUUGACZr31XiMxTKTk9dbeM+gv+HigNvb0JSYi/9SV +r48CCPbzJOTymUjma/1KGfpO0PgVfbC/iYkiaKb9GZoWwCy81kZ7h+tnLrdJ +TlqCs1z5OnE27ufO8JW5nVZg9EgLUWIslD8f+KQ00xrmEi6l/63DQt92yP7X +Er8HlJ7oOETtZ6EBLl72kK8dHIodqC9gsFDwupC0UyoOUMD91nXhOguVH2pr +zkrcC2FRf+vzPGeh6Dm5Ja1D+0DXe+jHMyYLLdjscm71doQLHvq3LdZOIxP3 +9B1j+/YDU1i+4i+rafRaLiewhXYAGuYrb+qGTaO1d840FW1yAuGXC5Ult6ZR +/aCmrb2oM/Sc5esrfzmNFLpn/COZzjAiWWVr+3Ma0bLSS/MGXUDIftyXX3oG +5ayY25LxzBW25Noe7tk8g+p26PQlPnCDT135W1MsZ1C20UXx5ZKD4Pptq9ld +zxnU+aHgLC3ZHRaTxu/NhM+gWrvrqkdPegBNs7O9KWkGsY/s5womPEHhdtDI +mVszaGGXRgDL3Auu5jVddK+bQUXM3m/hht7w1WGDk23HDHK9VeDnKeIDge05 +3QKDM6j63h5v3nM+IKl0NDRhfgaZyL/+fuG7D9z6nviggp+NVAb9+14d8oUT +fds6T8uw0ajwYYfrI75QvpyWlLqJjbpS7f2snOh4HpKtyIiNMhm5wse66JDX +z/e62ZKNmh79+e5n7QdWYjEoypGNVnvAOVqDHyh6ic198WAjxTWtneua/KA+ +KkJ+jScb6XbYyfI/8oPcsd5NZtiOpu7FPU/8YKD06mw6dua6yPYT//OD9riA +HcZebLR24O7qth4/4H1f3RbvzUaqXjLZHks4n2+D7w9fNjLxYRUl6hPw29rt +w3WKje5cmwm3NyRAyczqv4fYa97MmskYEyDb+vrOR2yW5VJ30XYCUr/UiSn6 +s/H84uLu2ElApQr98S3sVUvibhL7COgYak68GYDvI8VAMPcIAQ/j2beTAtlo +X6tRt38IAaWk+Jli7Edc23J1QwkQCDtm04p9LdzM4GkEAVZef1J5DrORvZuV +71gMAW05Xazj2A9U3R5oXcST/oLiSq8gzn9B7KH6OwQ41haclwlmoyN6V00Y +RQRI8/T+uxXbtrhK0LiEgAzL75N7sIWujhffLyOg5N7SVDx2YtjeyboaAj7l +lXWOY8dqqB6ufUpAYazYqsoQNgq82h507yMBiteqvHVD2ch61bhp2CABFdwO +V6ywNyVyieoNE0Dtzarxwh4PMyirGiPApXBNUTK2r30us3KKgIlPdwInsF35 +woMrfhCQ5k96ZIexkVX42qOl0iQML0qPTYSz0dPcszYZsiRsyrJ7+gvbtGNW +lbGWhKHPV05LRuD+q7X3miuQEPHetdQMW+59jPkHNRJ6T3vkX8b+um1AWsiA +hFPap1WNj7HRJZ6bD/33k5A81eN8OBKfX0ck286JBGORAxknsBPcGWE0FxIu +F96svITNqNm78c9BEgpZd7KqsX0p7vQrdBI0qvS5f2DTXtCJf0NJcHF47nHq +OBu9T1cTVkkjYVXthFw0g43KkWjA53QSCuJKq89hJzDnW8ouk/BldR8tC1vP +uiXO+CoJE02BExXYqVx+s3Y3SMjbuEN+FHtXyM1eRikJ6z4311hFsdH69ecN +zcpJkBo7W7Mfe/5FyGXeShIuxeX97Y19Wx3ZpVaTcH9Pv9xx7F8DA815DSS4 +6uiM5mPX2MoXvWwjQfQao/AndtIPHr7MFyRkKm8R4Y9mI3rRpK9bBwnNfpou +YthiKxrkRzs5nstVxQ5qdL30/R3uj3H58h5sFc0rkapjJHwu4xvOwv7x/sSb +L+MkdGY9LLmB3ZVI6lZ8JsH7WrlbIXbckP6kyRQJ1f3GgfXYfdlvPB3mSGjX +73Xqxc5YKW4ZzU3B2fpCZ+kYPA9mB9wjeCmQ+yfUWQF7YqAkLJiPAmu0ylAd +27TG4iZdkIJkh6ZMA+xxH8ZPG3EKeqbedDpii9laSlhKUnBbcd1LN+ztRhIa +SIoC3ijdUh/sNNFSZ5ocBYvJDSuDOesNn6rklSiYfoxMz2FTBaVtUioUNJ7o +Nk7h7E+L+rRajQKeIh2py5zvUZKiKzQomC02PHKDsy5pFTClS8F/vJF/V2M3 +/JaMH9ejoKl0c1Y99tiXwaxBfQqMp/NDHmJva45+1m1MwXn5nmfPsUeDyhUe +AgWPu7d9eY+9yjXG4P5OCrznp4c+YJuY77atsqBAspne8Ak7VW44qmA3BZrF +8UIT2PUrKtJybXD+4qbTk9gj0zGF12wpaLBP7WViGz+XepuylwJmUdLGeWx6 +1fDXc44UcC0pKyxhp1yv4Dl9gALHLxHz37GHw6x1I13xfURbwR9sUS9pq6MH +KTh4prWWOxbnWY94BnpQgHi4hVdgp2w4keTlQ8EWz9wDAtj1Qja3XekUSDzm +tRbCHl6QfuBIUKCYp7heBFt0aKTTlqLA7O1Clygnr6NyfFcABSzVM8RqbPr9 +E78gkIJdZNt7MU7+bZs124MoWAj6V1OCk58io2UQTMF26WhPSU4+Y3SHzlEK +ls3GQ9ZgixBVrhphFBS3CdKlsI0c4kJUIihwyh6lSXPyt+05uz6SghtXIsc4 +TlaTzZFhUPC84nGkDHad2Fi1eDQF1988nuB46GfVC+FYCi4vRBrLcvIn4ob4 +4ii4KzIWwLHh6z3f/sRTcFpSKIrj/wNOlgSF "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.9136963470094399, 1.092796776590348}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.9136963470094419}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5039,20 +10379,20 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.9136963470094399, 1.092796776590348}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.9136963470094419}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5066,105 +10406,104 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1nk0Vd0bB3BDZCxDppTMhUSusbz2U0hkKGXKfJ1zSCJDuoZooMkQovS+ +SYUMGTMkVCpv/OKNSoUos5J7ucYG1W/fP84667P2Xt/z7P2s9ayjRA9xJHm4 +uLiY+OG8Q19u2Xi/66XZPc11G7j+YiIzVr4B3aIURdIpPY4Hcw0zVS2aUE69 +eRDHe4n/+EVo/yJJrZoOjqsY8c/4LDpQYt39/dzYF57LNseXvEJfney5ebAf +dIXeWNZ7i4x5GW85nux7ERvV2IMq6/S7eLHXjqm4L5r3o1j/BPYK7D3TsSbh +HZ+QirC/CT/2o+VJYUbJEOK70l+4EvvdKZmYuuARNPlj1FQQm8VvMTmvN4Y8 +tE5+E8LmTz7qRlsaR8dkyvtEsBXEc9pCGz8jgfLgkVXY9vKLd1jmU4iRWhgg +iU3dVJbWFmCh4fINY1LY8WoOiYc7ptGYuuZ5Weweme6tESVslNq4sEMBmzgY +eOhy8ix6kVfnqoQ9c53r1r3gOZQbLXhFFVtAWVuMrbeAZmKIBC3sTOKZlZjU +IhL1DzLQwVYsdIvXWVpERU/4RGnYxpvPso40fkOHjKZ0tmMHGH7qmDRfRotz +ZyzssOcZx1YIqf9CtvqSmo7YJxuFTTUEfqP+PD1DF+xsML7r3/EHbXJWeurL +qa+gzSKshBtmbtYXMbBLnl8ePCXPA8K/nz2N49Q74RWbnswDJWxP3kTsWM2F +6spgXrCqNf2Wzqm3QkllWo8PHkvkVpZh93VNPfqdxwf302T/1HDqn71/cJUU +P7CqFSKasEv17TO0l/jh8bvOV+3YLQ+iuYMaBYDV9NB9Cnvh2ZtPn81FIH4+ +oVjfjIkkbEXEYh6JAHn1HxrC1u22AFETUZCX+DlpjR04Wntz65ZV8ONRxpA3 +9lGeDt2/RMTAo0+GlYI9plzOTlwUh8p5wYRZ7HnqhWAnTQIuN4UP/8HmuTuu +JBsqAZpmCsGiCNdL2+BY8lUCylRoohrYB83T7r0clAQrXttAOnanX1i4TLsU +RKtX5g5gfyxMTfIRkAbDd/2vmNhTX0vyii2lwcUItv7GFooYebO9WRpadxcd +3wBMZJFwQN+nVgamer4oE9gN+YYLRblyIP8lZXYBO3/sR+S2iPXw6vXLo9t3 +MtFup3Mfw8vWg8kGqtsBe6pFclfZ+HoIDXT0JrD18zdLKbopwLZ59a8p2C10 +r2o+sw2Quaukbxh7dnrw+OczinA+J0A205yJJI9Y1FTbKYN7/5TAGksmGs8X +CtgbqAxza9KctLHr+7vkmWeVYWTbkf/twvaw9Tyj3qwMFhdfqUdj52tFOl7T +U4H2hI31w9j6k4UzcTKq0Hpqi37jLiY64C+sbTOkBh/5zl+8sJuJUKSTnssv +NTBVZagWYmsm5hoRcupwNGR5pAWbK4+2M26fOryye/iGy5qJyj66u9x7og7b +N/JERmPzO5eeWnt7I9jU5bVE2OD6LOzeTdI1YHee2+lEWybK23/1w1KcBkyr +F3YUYqfShwZX/KMBdy0J0xfYxMljXxXeaIAytSl5tR0TiTflcO0314RQeu3U +P9iBNJZmo4oWVP/VWtloz0Tyypfik0Y3A6u2eLvMPiZqujiv8Z1HGyayT5zc +ge0x59ZNKWnDz97N7MPYN1pUNXZ6aYPabmnnJ9jK/g2vv73XBsFNw9rBjvi8 +pWNqVPsW2Gf6VLJrPxOtl1egFN10QavT526NMxNtLogQ+Yn0QMC86BqXJxPR +iTML2vZ6cOWGgbEedrZKxkcfDz0YfJKw7IfNe7ui8jlDD1Ys+Sy2YvfdmDyQ +UaUHvyb7y9O98DzN9snRUKHB76umWzf74P4m2W5x5deHPRVywSf8mOhWmOre +2g4DEFRycUkLZKKuSGSUUGACZr31XiMxTKTk9dbeM+gv+HigNvb0JSYi/9SV +r48CCPbzJOTymUjma/1KGfpO0PgVfbC/iYkiaKb9GZoWwCy81kZ7h+tnLrdJ +TlqCs1z5OnE27ufO8JW5nVZg9EgLUWIslD8f+KQ00xrmEi6l/63DQt92yP7X +Er8HlJ7oOETtZ6EBLl72kK8dHIodqC9gsFDwupC0UyoOUMD91nXhOguVH2pr +zkrcC2FRf+vzPGeh6Dm5Ja1D+0DXe+jHMyYLLdjscm71doQLHvq3LdZOIxP3 +9B1j+/YDU1i+4i+rafRaLiewhXYAGuYrb+qGTaO1d840FW1yAuGXC5Ult6ZR +/aCmrb2oM/Sc5esrfzmNFLpn/COZzjAiWWVr+3Ma0bLSS/MGXUDIftyXX3oG +5ayY25LxzBW25Noe7tk8g+p26PQlPnCDT135W1MsZ1C20UXx5ZKD4Pptq9ld +zxnU+aHgLC3ZHRaTxu/NhM+gWrvrqkdPegBNs7O9KWkGsY/s5womPEHhdtDI +mVszaGGXRgDL3Auu5jVddK+bQUXM3m/hht7w1WGDk23HDHK9VeDnKeIDge05 +3QKDM6j63h5v3nM+IKl0NDRhfgaZyL/+fuG7D9z6nviggp+NVAb9+14d8oUT +fds6T8uw0ajwYYfrI75QvpyWlLqJjbpS7f2snOh4HpKtyIiNMhm5wse66JDX +z/e62ZKNmh79+e5n7QdWYjEoypGNVnvAOVqDHyh6ic198WAjxTWtneua/KA+ +KkJ+jScb6XbYyfI/8oPcsd5NZtiOpu7FPU/8YKD06mw6dua6yPYT//OD9riA +HcZebLR24O7qth4/4H1f3RbvzUaqXjLZHks4n2+D7w9fNjLxYRUl6hPw29rt +w3WKje5cmwm3NyRAyczqv4fYa97MmskYEyDb+vrOR2yW5VJ30XYCUr/UiSn6 +s/H84uLu2ElApQr98S3sVUvibhL7COgYak68GYDvI8VAMPcIAQ/j2beTAtlo +X6tRt38IAaWk+Jli7Edc23J1QwkQCDtm04p9LdzM4GkEAVZef1J5DrORvZuV +71gMAW05Xazj2A9U3R5oXcST/oLiSq8gzn9B7KH6OwQ41haclwlmoyN6V00Y +RQRI8/T+uxXbtrhK0LiEgAzL75N7sIWujhffLyOg5N7SVDx2YtjeyboaAj7l +lXWOY8dqqB6ufUpAYazYqsoQNgq82h507yMBiteqvHVD2ch61bhp2CABFdwO +V6ywNyVyieoNE0Dtzarxwh4PMyirGiPApXBNUTK2r30us3KKgIlPdwInsF35 +woMrfhCQ5k96ZIexkVX42qOl0iQML0qPTYSz0dPcszYZsiRsyrJ7+gvbtGNW +lbGWhKHPV05LRuD+q7X3miuQEPHetdQMW+59jPkHNRJ6T3vkX8b+um1AWsiA +hFPap1WNj7HRJZ6bD/33k5A81eN8OBKfX0ck286JBGORAxknsBPcGWE0FxIu +F96svITNqNm78c9BEgpZd7KqsX0p7vQrdBI0qvS5f2DTXtCJf0NJcHF47nHq +OBu9T1cTVkkjYVXthFw0g43KkWjA53QSCuJKq89hJzDnW8ouk/BldR8tC1vP +uiXO+CoJE02BExXYqVx+s3Y3SMjbuEN+FHtXyM1eRikJ6z4311hFsdH69ecN +zcpJkBo7W7Mfe/5FyGXeShIuxeX97Y19Wx3ZpVaTcH9Pv9xx7F8DA815DSS4 +6uiM5mPX2MoXvWwjQfQao/AndtIPHr7MFyRkKm8R4Y9mI3rRpK9bBwnNfpou +YthiKxrkRzs5nstVxQ5qdL30/R3uj3H58h5sFc0rkapjJHwu4xvOwv7x/sSb +L+MkdGY9LLmB3ZVI6lZ8JsH7WrlbIXbckP6kyRQJ1f3GgfXYfdlvPB3mSGjX +73Xqxc5YKW4ZzU3B2fpCZ+kYPA9mB9wjeCmQ+yfUWQF7YqAkLJiPAmu0ylAd +27TG4iZdkIJkh6ZMA+xxH8ZPG3EKeqbedDpii9laSlhKUnBbcd1LN+ztRhIa +SIoC3ijdUh/sNNFSZ5ocBYvJDSuDOesNn6rklSiYfoxMz2FTBaVtUioUNJ7o +Nk7h7E+L+rRajQKeIh2py5zvUZKiKzQomC02PHKDsy5pFTClS8F/vJF/V2M3 +/JaMH9ejoKl0c1Y99tiXwaxBfQqMp/NDHmJva45+1m1MwXn5nmfPsUeDyhUe +AgWPu7d9eY+9yjXG4P5OCrznp4c+YJuY77atsqBAspne8Ak7VW44qmA3BZrF +8UIT2PUrKtJybXD+4qbTk9gj0zGF12wpaLBP7WViGz+XepuylwJmUdLGeWx6 +1fDXc44UcC0pKyxhp1yv4Dl9gALHLxHz37GHw6x1I13xfURbwR9sUS9pq6MH +KTh4prWWOxbnWY94BnpQgHi4hVdgp2w4keTlQ8EWz9wDAtj1Qja3XekUSDzm +tRbCHl6QfuBIUKCYp7heBFt0aKTTlqLA7O1Clygnr6NyfFcABSzVM8RqbPr9 +E78gkIJdZNt7MU7+bZs124MoWAj6V1OCk58io2UQTMF26WhPSU4+Y3SHzlEK +ls3GQ9ZgixBVrhphFBS3CdKlsI0c4kJUIihwyh6lSXPyt+05uz6SghtXIsc4 +TlaTzZFhUPC84nGkDHad2Fi1eDQF1988nuB46GfVC+FYCi4vRBrLcvIn4ob4 +4ii4KzIWwLHh6z3f/sRTcFpSKIrj/wNOlgSF "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.9136963470094399, 1.092796776590348}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.9136963470094419}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5174,7 +10513,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.42228371308737755`}, + AxesOrigin->{0, 0.9136963470094419}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5202,7 +10542,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.4222837130873766, 2.103798844286089}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.9136963470094399, 1.092796776590348}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5210,9 +10551,9 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913411752988663`*^9}, + CellChangeTimes->{3.9913411752988663`*^9, 3.99438535814189*^9}, CellLabel-> - "Out[360]=",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] + "Out[118]=",ExpressionUUID->"60e47437-e47b-46fb-8115-3d23f0e27d3b"] }, Open ]], Cell[CellGroupData[{ @@ -5275,157 +10616,161 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918498397477245`*^9, - 3.9918498435341415`*^9}},ExpressionUUID->"92d458c4-bfde-c447-a06c-\ -70a15768b745"], + CellChangeTimes->{{3.9918498397477245`*^9, 3.9918498435341415`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.939746899581406`*^-267\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.3813588888014213`*^-278\\\", \ +\\\"1263377636044591724886240423994982400000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.9943853582080183`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"9c333887-6445-45c8-a68d-d433632cfe45"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.256143538649823`*^-291\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 42, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994385358211548*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"e974ebd4-d397-48cc-9a92-ad4764443a43"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0158731555097066`*^-303\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 361, - 369, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755393047`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 43, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.9943853582147017`*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7974258435449576`*^-278\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 361, 370, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755492897`*^9}, - CellLabel-> - "During evaluation of \ -In[361]:=",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.87479384448772`*^-289\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 361, 371, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991341175557289*^9}, - CellLabel-> - "During evaluation of \ -In[361]:=",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], +In[119]:=",ExpressionUUID->"4a7c702a-8ace-4652-ad1a-8bfe883168e2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 361, 372, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755664787`*^9}, +during this calculation.\"", 2, 119, 44, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994385358217082*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], +In[119]:=",ExpressionUUID->"428df95a-003a-4764-ae51-51ec9e16b1da"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc81e0bB3ARURmJHJszkJ2K6JyuKxpalCgjVHZZURTKalghUiIjHdv5 +GpWQoqEpGkQSpad6UhnZevC7f399X+9/7td939/r+ly36kE/Kzd+Pj4+oXl8 +fP//jvc8e8SM564TMpet7Vxjsq4tm3ZifWcUaAzd0W8QpQFKtx6kdaaAc7hg +Y4yoBgTtLOkQ6MyDm91a8e6ia2DJgEzKVEcVmGpPnTIWNYfeegu/0Y4HYLrv +8sobi21hE7P/43DHGxiv6pSsXOgJUx1GaUMdfWAdlFx5i/84PDQr5L7OG4Ee +YbHv2z/FgEJv7beD2jNwoPr8RsGdKSDl7VyywEwAL7a9WnC77zKkrNh0x8JG +GC+VK7DuFGXB+3T9xmEJUax853DG0ekaxHPDW/lll+BBT6a096/rIHPxS2xq +1lJcsjvC2nF1AZyz3rLuzbg0eqge3bhJuQgCja85P4uiYfEClcGG4WLYmis2 +ui2BhqUF/4ovnCwG+oKwmJY0Gv4ZNbHbOVsMr9r2VL4touGqeWEurxeWgK7/ +YoGeFhq2quaa5zNK4N+C4II/crKYPLigP9W6BPZJWfyWvyGLQgoHnGNvlMCG +wekQ3y9yGC3/rPOeWymcML+oef+XHNZ01wqOHSoF6ppO19JxOZypeeyl7l8K +NOv9xrXC8mh1ZeW7iJBS+FXTNCGgK4/OY5HGQkmlkBqVfPTKcXmUE+Yft79d +Cn3Sar6PRBXw1KxYm6ZgGcj4NSjKyCjgdT/W8e8iZbD9qe1LLxUF3FI+tD1X +rAyqQ+K1xVcqYErnkhghWhnE9Q7129kq4JAYF/M1y8Cg+I7HYJ4ChtdPZWtZ +lkEke9cBuTWKmBq6a59DWhmYO2X/MTJVxJA6T7fpK2UgFvEz2ma7IlItLwcu +ZpfB1YdnCpL3K6K1lGVUfWEZ1Gyt+ykUq4g35MRK22vLYMiWETTyXhFVJjfN +6n0sA6djY3HNoUo44b/i3mkVHrAumyr0n1HCdse9LalMHjl/Em9BshKW2Hs6 +Z2vwIOS/5a9MuUrYdaJ0foE+D9KinaRrm5WwXCvNKRx50HzhSU6+ojIe6Mk6 +ZO/MAxPqys1TDcpYrX1spOoKDzZ0tMwMPFXG4lrjrPGrPLDgm7/Z+Y0yWjea +HjDM5YGLle97+KqMawK+rCkp4MGmUNXwCEEVZDu803K5wQN/5fHr67VU8LjC +kIVcMw8eeeT8fhikgtKqERo50zzY8p+xZFioCj7xnj7nPsODluQ2w1URKtj8 +ZLeIJh8F72tFIrixKhjq+TIgX5CCgUVHJc9cVUErB50fPhIU0CrMjTY9UEGp +xsdFG1kUeE8ORzwVVcU/wrqPJbdTYHLEfdk3SVV0e05bk2xBgXB/V6kATRUV +NA5oieyiIP/Dw3fr6KqY3SqU/tuGgp57adq3DFXx0nDT5QhnCizPGHdec1bF +8c8J+a1HKFCa5fk0uKri4FrRw4JHKfgVRBf46KWKvxT21BkGURDjuUiXdlQV +OR8jJuNDKGjc9jE6MUYVbbbrC8yLpsBAMlIvtJKst1ekXTqVAr74sUfp1ar4 +V5gbNj+NghaBQ/bVd1SRHhJ2e+ASBYfHrM4MN6miQYXHj1sZFHA7mR88ulTx +VNx3S/E8CpblPD1rLUDHiNVdNQPlFPwjw1EIEKbjqgtnP1+qpKAqubIySZSO +Gkd+FJrcIOeJyuh+LkPH7oZUiWPVZL9u3gbrtenoVzHpequegiktiR4dGzq2 +eCyvdX1KwXiWXORKezq2L6dda3xGwag4i2nsTMd+tr897QX5HyPGhzZ40fG2 +iMGGOy8p6LvjMm5/ko7vHwsKt76hoFfH98r+KDqyHE2TRNoo6M45znY/R0fZ +4pLf0E7Bu+jzUUcu0NFq25BBbgcFz7fdFovJp+POKcVR3W4Knty9X3m+hOzf +NmKL+UcKHuk1W6eW0/Frn3CYYw8F95Z+zsiupaOgdkZo6Cdy3g8L1W+9JOsH +75g+8w8FGYedoG+MjjZ0s/z2nxRc/ujZ932ajg5fPDR5vyi4aBl45vccHUt8 +t1+J+E1B4sqYF5MiDOQ1pxvJD1IQ9bdyr7gSA6XizM8r/6Eg3Kd+WorBwNgC +v+B3xGG9j7PkNBio/XNkV+wIBUEPP3xhGTBQZkPAh75R8v/iBf3Zmxiov1PY +1m2CAs8Z8aWm2xj4Ubi9+y+xu59c9eadDBRoemWbOEnB/t16/1nZM3DT5ZfG +hVMUODYZ59g6M3B5R0KuzjQF9kYbTJ1cGcjwmZhXQWwtbxfj5ctA57rdNUV/ +Kdh13kXLL5CBx2ZFxJX/o8Bizqfl6HEG2laOulwgNv8SJRURxcDBlVOLDs1Q +wC4ty710iYE+Qd99fs5S8EGlNGdjJgM116krsucoCLlUnD2aw8BXH3z3xBLf +jiy4alXMwH/fiR2S5SuHPRPczHkUA8W3ft24j3jU+3pGRRUD2+82UJnEBra5 +6WL15LxrozUl5pXD65fZl+82MrBEYHDdRmJ/s6xL3k0MjN7k+iWIWLw2M03+ +OdlfWz4tn5jSzbj4vIWBtyWDe1uJd3DTU0+8ZeCl8cw1E8S/ZC+naHQysFfk +PVOevxziktIudHQzUMdzhLuWeLngxeSznxk4fa+i1pb4aUhK0upvDHTY0eES +QOw+lJz4Tz8Dr37R4cYQC7onnU8dZJD6Cg3NJOZ+OJ9gOsrAYXZsfwmx2a6E ++OFJBhYHKv2pJu57HBeXO8PA5+nzUxuII9mxsZb8TMzaIdjyiFil6lzMrBAT +zz7ov/6YuEH97DneIibWV4dLNxE7ZZ0+u0+CiVPBSYxG4v8ko88skmYif9/X +ltvEmTGRp+tkmejlZEkrIzaZDY/2UmLiin/S+bKIOwNPRdEYTHSbSIqJIw7+ +ERb5RJ2JbUX8lUeJlzmHRgRpM/F6WkOIA/GtthPhrBVMFPye9m0dsfXW46fa +VjPx9S6bMSXikYagk9EmTMRlLYV/yf2mrD4WZgBMPDL3araNeEVpYOhnMybq +u+j9LSF+pRIQkmzOxCTVO1kniUUX+x0f2MXEi73cThpxWaRPcNYeJsZaFgd8 +JvWwdeJw0HYHJs5NqVcXEMf0eR4tcWXisoZvbHVidVuPQDsv4sTXkX2k3h6/ +dAsQ9mVizlx8YAbx/NqD/u7BTDwn8GI/H/F13QN+0mFMnB8960iR+jXlOvs+ +imBi3CnnRXbE4Un7vOlx5D5Oi4ZwSb0rCTocfp3IRPESUc5G4voQu0MRqUxM +Db92o4/0x7TbHs+eq0xMUR26t5T4ygdrj/PXmHhK86BNIemvNbt2u7MLmPjW +4V2eEXEQe6drRjkTRayM3S1IPw5Lbt2/5wETH9YaFFqTfu70pr869ISJMpuP +nX5A+r3x8TSENzPRU5yXoE2cHFKqXPSOiV93nKCPjVGg37e4d6qf3Pd36Whb +kic09lcLsSEminYkdhSSvOG7dPcefYzUz1Ph/SPDFLRu8c3eNsfEgLCUJeFD +FPhWtjpmLWVhooGajBfJsz2Lil5W0lj4KvqFVgbJu3VuEZzHiizUfFJ08gnJ +Q1HZFYqD6iy8oHfj47J+CsoiUrqRzUKm56PymG8U9FvaOPzjykLR1T3Xa0ne +vinWeTHpxULjrYtky0ke1wkIrRX1Y2GHuUNPLsnr2NvVcoYnWJjwY5XTiS4K +NJRpXefOs7C7tNB6luS9x0CXrVY1C+XcrHXsmkk+md94CndYKCDjbyhF5olh +Xvwa60YWTkoaX39B5o3QHjbt5HMW3g14Xqb3hIKCu1kdLT0sDDV9ldd8n8y7 +hP17Ahao4dzH4JUOZJ759mvT9RerYatyes74TQomNk/9/i2hhha3fk4kkvm3 +UCDljJecGiroWx+priD3feLhzf06augqYsP9VELBSTe1pZa71XBEuGksL5vM +13W/WrVy1HCV3c+Kb2R+52bWZP64roaHHfQp1SgKlk+d9igsUkOp5MJauwiS +pzcV5+hVapjDOTvXGEaBi6alrlyTGp7+luDmfYyCimVVCcI/1XBplX6ykTsF +WwaDt3w1VMeX11sUCzdSoLBC6awwWx3nneZa25qR+Rrw6IHWenWsytJGofVk +Xo1LsAO2qWNXoNRaWzZ5r8wU6845q2PrvWv/thlQELC4e6lsrDp5D0h6GCiT ++bcce7Z/UMe1MgPLY8bI+9BFOPBmuAaeYle2DKfzYCB7w92G0xqYTZ3U60/j +weD7iAUvYjWw0n5xQ28KD/5YTmV+TtVArryJ/4MEHkys7X8kVqSBU3qHzNwj +eMAv1bzM65UG0psS/mh48ED2UVKdoupyvPnGqIxrQN6DTBn+cw+WY6/DrwVP +75eB5Eu1xIpBTQya/vo0pr0UFGLKdxoaaqPZMLsq6GYJpGsZSyz10MEIw+Bt +AueL4bnc+tUjF3TxkHmWpoNtEZgoPEjWe6eHbTaQeHGqAMQE8o4eiNLHvLqV +ZySK8kEpUpltp7YCDffLNaxaxQUR1r5qqycrMI6vVq6iKQ90ObLlwY4GWOP0 +/JVFwDUI6JF8uJVvJY7E/5zOFM6FwZEEmy3pK/FTS9RRXngWbNZ7nLFFZxVu +HH02z14iE+6NrP070bIKpa3cby6JSQdfbYOu126rUaRXPPmh+SXgDLi22YkY +4nz+0skF/6XCRiZth2ieIUaGuD59O3kBNCLijj8wMkJ6rne9lGoyaLoZN7C6 +jLC6wmiTZWICuN3zPH3zyBocEO26b78/Fhpy21yHpY0xbPQW/3yTszBaNDeh +d9sYndniy+56R4MLq1QkY4cJfvrRvsFLPBKGNVMNq4ZM0NGx6b1N1Emo4f79 +PBazFqkvn4Ytik+A/QYGrlVi46Q8X67Z1iCQ9zlXq9vIxvYdTwZiFweC9ELv +yh17OdilMfIz+qA/cM1OhgzZcTBVS+rvvr3+YHAy0Sx1HwetWkuc2Nv9wWKo +or3zAAdVfo3QxAz94ey7sSkXbw6epitLzoj4w2ReuGlIJAdz5n+pFHX3g661 +qW8LSjnoG1jA81vqC57HuFe3UBxMUumZK5v1gXHqltuvCg5qOZTuHf/hA5L0 +zokV1RyMmrsvwGv0gW3Cigp3Gzl4RYnZWOzrA/VtBa5v2zm4ZMGMY3ezN2wV +q9EJ6uTg7Y/dJR013tC5+dk47QMHN3+NL+vhesNo3c8Yp08cNMrl1Imf9Aad +a/q8H/0cfKx+MGBGxxvqu9YHJfzmYMHC5e9t5Mh6UrtBb4iD8X1ZzbVC3uB+ +7tjro2MclL+WuJHbexhGG89myExykO/vwvuazYchavqyS900BzMMDG/V1xwG +iVXF2o4zHBw/IKlon38Ysn3qxubmOGjjljfCn3IY/gf5SXsY "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -5439,116 +10784,116 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV1nc81e0bB3ARURmJHJszkJ2K6JyuKxpalCgjVHZZURTKalghUiIjHdv5 +GpWQoqEpGkQSpad6UhnZevC7f399X+9/7td939/r+ly36kE/Kzd+Pj4+oXl8 +fP//jvc8e8SM564TMpet7Vxjsq4tm3ZifWcUaAzd0W8QpQFKtx6kdaaAc7hg +Y4yoBgTtLOkQ6MyDm91a8e6ia2DJgEzKVEcVmGpPnTIWNYfeegu/0Y4HYLrv +8sobi21hE7P/43DHGxiv6pSsXOgJUx1GaUMdfWAdlFx5i/84PDQr5L7OG4Ee +YbHv2z/FgEJv7beD2jNwoPr8RsGdKSDl7VyywEwAL7a9WnC77zKkrNh0x8JG +GC+VK7DuFGXB+3T9xmEJUax853DG0ekaxHPDW/lll+BBT6a096/rIHPxS2xq +1lJcsjvC2nF1AZyz3rLuzbg0eqge3bhJuQgCja85P4uiYfEClcGG4WLYmis2 +ui2BhqUF/4ovnCwG+oKwmJY0Gv4ZNbHbOVsMr9r2VL4touGqeWEurxeWgK7/ +YoGeFhq2quaa5zNK4N+C4II/crKYPLigP9W6BPZJWfyWvyGLQgoHnGNvlMCG +wekQ3y9yGC3/rPOeWymcML+oef+XHNZ01wqOHSoF6ppO19JxOZypeeyl7l8K +NOv9xrXC8mh1ZeW7iJBS+FXTNCGgK4/OY5HGQkmlkBqVfPTKcXmUE+Yft79d +Cn3Sar6PRBXw1KxYm6ZgGcj4NSjKyCjgdT/W8e8iZbD9qe1LLxUF3FI+tD1X +rAyqQ+K1xVcqYErnkhghWhnE9Q7129kq4JAYF/M1y8Cg+I7HYJ4ChtdPZWtZ +lkEke9cBuTWKmBq6a59DWhmYO2X/MTJVxJA6T7fpK2UgFvEz2ma7IlItLwcu +ZpfB1YdnCpL3K6K1lGVUfWEZ1Gyt+ykUq4g35MRK22vLYMiWETTyXhFVJjfN +6n0sA6djY3HNoUo44b/i3mkVHrAumyr0n1HCdse9LalMHjl/Em9BshKW2Hs6 +Z2vwIOS/5a9MuUrYdaJ0foE+D9KinaRrm5WwXCvNKRx50HzhSU6+ojIe6Mk6 +ZO/MAxPqys1TDcpYrX1spOoKDzZ0tMwMPFXG4lrjrPGrPLDgm7/Z+Y0yWjea +HjDM5YGLle97+KqMawK+rCkp4MGmUNXwCEEVZDu803K5wQN/5fHr67VU8LjC +kIVcMw8eeeT8fhikgtKqERo50zzY8p+xZFioCj7xnj7nPsODluQ2w1URKtj8 +ZLeIJh8F72tFIrixKhjq+TIgX5CCgUVHJc9cVUErB50fPhIU0CrMjTY9UEGp +xsdFG1kUeE8ORzwVVcU/wrqPJbdTYHLEfdk3SVV0e05bk2xBgXB/V6kATRUV +NA5oieyiIP/Dw3fr6KqY3SqU/tuGgp57adq3DFXx0nDT5QhnCizPGHdec1bF +8c8J+a1HKFCa5fk0uKri4FrRw4JHKfgVRBf46KWKvxT21BkGURDjuUiXdlQV +OR8jJuNDKGjc9jE6MUYVbbbrC8yLpsBAMlIvtJKst1ekXTqVAr74sUfp1ar4 +V5gbNj+NghaBQ/bVd1SRHhJ2e+ASBYfHrM4MN6miQYXHj1sZFHA7mR88ulTx +VNx3S/E8CpblPD1rLUDHiNVdNQPlFPwjw1EIEKbjqgtnP1+qpKAqubIySZSO +Gkd+FJrcIOeJyuh+LkPH7oZUiWPVZL9u3gbrtenoVzHpequegiktiR4dGzq2 +eCyvdX1KwXiWXORKezq2L6dda3xGwag4i2nsTMd+tr897QX5HyPGhzZ40fG2 +iMGGOy8p6LvjMm5/ko7vHwsKt76hoFfH98r+KDqyHE2TRNoo6M45znY/R0fZ +4pLf0E7Bu+jzUUcu0NFq25BBbgcFz7fdFovJp+POKcVR3W4Knty9X3m+hOzf +NmKL+UcKHuk1W6eW0/Frn3CYYw8F95Z+zsiupaOgdkZo6Cdy3g8L1W+9JOsH +75g+8w8FGYedoG+MjjZ0s/z2nxRc/ujZ932ajg5fPDR5vyi4aBl45vccHUt8 +t1+J+E1B4sqYF5MiDOQ1pxvJD1IQ9bdyr7gSA6XizM8r/6Eg3Kd+WorBwNgC +v+B3xGG9j7PkNBio/XNkV+wIBUEPP3xhGTBQZkPAh75R8v/iBf3Zmxiov1PY +1m2CAs8Z8aWm2xj4Ubi9+y+xu59c9eadDBRoemWbOEnB/t16/1nZM3DT5ZfG +hVMUODYZ59g6M3B5R0KuzjQF9kYbTJ1cGcjwmZhXQWwtbxfj5ctA57rdNUV/ +Kdh13kXLL5CBx2ZFxJX/o8Bizqfl6HEG2laOulwgNv8SJRURxcDBlVOLDs1Q +wC4ty710iYE+Qd99fs5S8EGlNGdjJgM116krsucoCLlUnD2aw8BXH3z3xBLf +jiy4alXMwH/fiR2S5SuHPRPczHkUA8W3ft24j3jU+3pGRRUD2+82UJnEBra5 +6WL15LxrozUl5pXD65fZl+82MrBEYHDdRmJ/s6xL3k0MjN7k+iWIWLw2M03+ +OdlfWz4tn5jSzbj4vIWBtyWDe1uJd3DTU0+8ZeCl8cw1E8S/ZC+naHQysFfk +PVOevxziktIudHQzUMdzhLuWeLngxeSznxk4fa+i1pb4aUhK0upvDHTY0eES +QOw+lJz4Tz8Dr37R4cYQC7onnU8dZJD6Cg3NJOZ+OJ9gOsrAYXZsfwmx2a6E ++OFJBhYHKv2pJu57HBeXO8PA5+nzUxuII9mxsZb8TMzaIdjyiFil6lzMrBAT +zz7ov/6YuEH97DneIibWV4dLNxE7ZZ0+u0+CiVPBSYxG4v8ko88skmYif9/X +ltvEmTGRp+tkmejlZEkrIzaZDY/2UmLiin/S+bKIOwNPRdEYTHSbSIqJIw7+ +ERb5RJ2JbUX8lUeJlzmHRgRpM/F6WkOIA/GtthPhrBVMFPye9m0dsfXW46fa +VjPx9S6bMSXikYagk9EmTMRlLYV/yf2mrD4WZgBMPDL3araNeEVpYOhnMybq +u+j9LSF+pRIQkmzOxCTVO1kniUUX+x0f2MXEi73cThpxWaRPcNYeJsZaFgd8 +JvWwdeJw0HYHJs5NqVcXEMf0eR4tcWXisoZvbHVidVuPQDsv4sTXkX2k3h6/ +dAsQ9mVizlx8YAbx/NqD/u7BTDwn8GI/H/F13QN+0mFMnB8960iR+jXlOvs+ +imBi3CnnRXbE4Un7vOlx5D5Oi4ZwSb0rCTocfp3IRPESUc5G4voQu0MRqUxM +Db92o4/0x7TbHs+eq0xMUR26t5T4ygdrj/PXmHhK86BNIemvNbt2u7MLmPjW +4V2eEXEQe6drRjkTRayM3S1IPw5Lbt2/5wETH9YaFFqTfu70pr869ISJMpuP +nX5A+r3x8TSENzPRU5yXoE2cHFKqXPSOiV93nKCPjVGg37e4d6qf3Pd36Whb +kic09lcLsSEminYkdhSSvOG7dPcefYzUz1Ph/SPDFLRu8c3eNsfEgLCUJeFD +FPhWtjpmLWVhooGajBfJsz2Lil5W0lj4KvqFVgbJu3VuEZzHiizUfFJ08gnJ +Q1HZFYqD6iy8oHfj47J+CsoiUrqRzUKm56PymG8U9FvaOPzjykLR1T3Xa0ne +vinWeTHpxULjrYtky0ke1wkIrRX1Y2GHuUNPLsnr2NvVcoYnWJjwY5XTiS4K +NJRpXefOs7C7tNB6luS9x0CXrVY1C+XcrHXsmkk+md94CndYKCDjbyhF5olh +Xvwa60YWTkoaX39B5o3QHjbt5HMW3g14Xqb3hIKCu1kdLT0sDDV9ldd8n8y7 +hP17Ahao4dzH4JUOZJ759mvT9RerYatyes74TQomNk/9/i2hhha3fk4kkvm3 +UCDljJecGiroWx+priD3feLhzf06augqYsP9VELBSTe1pZa71XBEuGksL5vM +13W/WrVy1HCV3c+Kb2R+52bWZP64roaHHfQp1SgKlk+d9igsUkOp5MJauwiS +pzcV5+hVapjDOTvXGEaBi6alrlyTGp7+luDmfYyCimVVCcI/1XBplX6ykTsF +WwaDt3w1VMeX11sUCzdSoLBC6awwWx3nneZa25qR+Rrw6IHWenWsytJGofVk +Xo1LsAO2qWNXoNRaWzZ5r8wU6845q2PrvWv/thlQELC4e6lsrDp5D0h6GCiT ++bcce7Z/UMe1MgPLY8bI+9BFOPBmuAaeYle2DKfzYCB7w92G0xqYTZ3U60/j +weD7iAUvYjWw0n5xQ28KD/5YTmV+TtVArryJ/4MEHkys7X8kVqSBU3qHzNwj +eMAv1bzM65UG0psS/mh48ED2UVKdoupyvPnGqIxrQN6DTBn+cw+WY6/DrwVP +75eB5Eu1xIpBTQya/vo0pr0UFGLKdxoaaqPZMLsq6GYJpGsZSyz10MEIw+Bt +AueL4bnc+tUjF3TxkHmWpoNtEZgoPEjWe6eHbTaQeHGqAMQE8o4eiNLHvLqV +ZySK8kEpUpltp7YCDffLNaxaxQUR1r5qqycrMI6vVq6iKQ90ObLlwY4GWOP0 +/JVFwDUI6JF8uJVvJY7E/5zOFM6FwZEEmy3pK/FTS9RRXngWbNZ7nLFFZxVu +HH02z14iE+6NrP070bIKpa3cby6JSQdfbYOu126rUaRXPPmh+SXgDLi22YkY +4nz+0skF/6XCRiZth2ieIUaGuD59O3kBNCLijj8wMkJ6rne9lGoyaLoZN7C6 +jLC6wmiTZWICuN3zPH3zyBocEO26b78/Fhpy21yHpY0xbPQW/3yTszBaNDeh +d9sYndniy+56R4MLq1QkY4cJfvrRvsFLPBKGNVMNq4ZM0NGx6b1N1Emo4f79 +PBazFqkvn4Ytik+A/QYGrlVi46Q8X67Z1iCQ9zlXq9vIxvYdTwZiFweC9ELv +yh17OdilMfIz+qA/cM1OhgzZcTBVS+rvvr3+YHAy0Sx1HwetWkuc2Nv9wWKo +or3zAAdVfo3QxAz94ey7sSkXbw6epitLzoj4w2ReuGlIJAdz5n+pFHX3g661 +qW8LSjnoG1jA81vqC57HuFe3UBxMUumZK5v1gXHqltuvCg5qOZTuHf/hA5L0 +zokV1RyMmrsvwGv0gW3Cigp3Gzl4RYnZWOzrA/VtBa5v2zm4ZMGMY3ezN2wV +q9EJ6uTg7Y/dJR013tC5+dk47QMHN3+NL+vhesNo3c8Yp08cNMrl1Imf9Aad +a/q8H/0cfKx+MGBGxxvqu9YHJfzmYMHC5e9t5Mh6UrtBb4iD8X1ZzbVC3uB+ +7tjro2MclL+WuJHbexhGG89myExykO/vwvuazYchavqyS900BzMMDG/V1xwG +iVXF2o4zHBw/IKlon38Ysn3qxubmOGjjljfCn3IY/gf5SXsY "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.060568053731349145`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -5560,19 +10905,19 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.060568053731349145`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5586,115 +10931,115 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV1nc81e0bB3ARURmJHJszkJ2K6JyuKxpalCgjVHZZURTKalghUiIjHdv5 +GpWQoqEpGkQSpad6UhnZevC7f399X+9/7td939/r+ly36kE/Kzd+Pj4+oXl8 +fP//jvc8e8SM564TMpet7Vxjsq4tm3ZifWcUaAzd0W8QpQFKtx6kdaaAc7hg +Y4yoBgTtLOkQ6MyDm91a8e6ia2DJgEzKVEcVmGpPnTIWNYfeegu/0Y4HYLrv +8sobi21hE7P/43DHGxiv6pSsXOgJUx1GaUMdfWAdlFx5i/84PDQr5L7OG4Ee +YbHv2z/FgEJv7beD2jNwoPr8RsGdKSDl7VyywEwAL7a9WnC77zKkrNh0x8JG +GC+VK7DuFGXB+3T9xmEJUax853DG0ekaxHPDW/lll+BBT6a096/rIHPxS2xq +1lJcsjvC2nF1AZyz3rLuzbg0eqge3bhJuQgCja85P4uiYfEClcGG4WLYmis2 +ui2BhqUF/4ovnCwG+oKwmJY0Gv4ZNbHbOVsMr9r2VL4touGqeWEurxeWgK7/ +YoGeFhq2quaa5zNK4N+C4II/crKYPLigP9W6BPZJWfyWvyGLQgoHnGNvlMCG +wekQ3y9yGC3/rPOeWymcML+oef+XHNZ01wqOHSoF6ppO19JxOZypeeyl7l8K +NOv9xrXC8mh1ZeW7iJBS+FXTNCGgK4/OY5HGQkmlkBqVfPTKcXmUE+Yft79d +Cn3Sar6PRBXw1KxYm6ZgGcj4NSjKyCjgdT/W8e8iZbD9qe1LLxUF3FI+tD1X +rAyqQ+K1xVcqYErnkhghWhnE9Q7129kq4JAYF/M1y8Cg+I7HYJ4ChtdPZWtZ +lkEke9cBuTWKmBq6a59DWhmYO2X/MTJVxJA6T7fpK2UgFvEz2ma7IlItLwcu +ZpfB1YdnCpL3K6K1lGVUfWEZ1Gyt+ykUq4g35MRK22vLYMiWETTyXhFVJjfN +6n0sA6djY3HNoUo44b/i3mkVHrAumyr0n1HCdse9LalMHjl/Em9BshKW2Hs6 +Z2vwIOS/5a9MuUrYdaJ0foE+D9KinaRrm5WwXCvNKRx50HzhSU6+ojIe6Mk6 +ZO/MAxPqys1TDcpYrX1spOoKDzZ0tMwMPFXG4lrjrPGrPLDgm7/Z+Y0yWjea +HjDM5YGLle97+KqMawK+rCkp4MGmUNXwCEEVZDu803K5wQN/5fHr67VU8LjC +kIVcMw8eeeT8fhikgtKqERo50zzY8p+xZFioCj7xnj7nPsODluQ2w1URKtj8 +ZLeIJh8F72tFIrixKhjq+TIgX5CCgUVHJc9cVUErB50fPhIU0CrMjTY9UEGp +xsdFG1kUeE8ORzwVVcU/wrqPJbdTYHLEfdk3SVV0e05bk2xBgXB/V6kATRUV +NA5oieyiIP/Dw3fr6KqY3SqU/tuGgp57adq3DFXx0nDT5QhnCizPGHdec1bF +8c8J+a1HKFCa5fk0uKri4FrRw4JHKfgVRBf46KWKvxT21BkGURDjuUiXdlQV +OR8jJuNDKGjc9jE6MUYVbbbrC8yLpsBAMlIvtJKst1ekXTqVAr74sUfp1ar4 +V5gbNj+NghaBQ/bVd1SRHhJ2e+ASBYfHrM4MN6miQYXHj1sZFHA7mR88ulTx +VNx3S/E8CpblPD1rLUDHiNVdNQPlFPwjw1EIEKbjqgtnP1+qpKAqubIySZSO +Gkd+FJrcIOeJyuh+LkPH7oZUiWPVZL9u3gbrtenoVzHpequegiktiR4dGzq2 +eCyvdX1KwXiWXORKezq2L6dda3xGwag4i2nsTMd+tr897QX5HyPGhzZ40fG2 +iMGGOy8p6LvjMm5/ko7vHwsKt76hoFfH98r+KDqyHE2TRNoo6M45znY/R0fZ +4pLf0E7Bu+jzUUcu0NFq25BBbgcFz7fdFovJp+POKcVR3W4Knty9X3m+hOzf +NmKL+UcKHuk1W6eW0/Frn3CYYw8F95Z+zsiupaOgdkZo6Cdy3g8L1W+9JOsH +75g+8w8FGYedoG+MjjZ0s/z2nxRc/ujZ932ajg5fPDR5vyi4aBl45vccHUt8 +t1+J+E1B4sqYF5MiDOQ1pxvJD1IQ9bdyr7gSA6XizM8r/6Eg3Kd+WorBwNgC +v+B3xGG9j7PkNBio/XNkV+wIBUEPP3xhGTBQZkPAh75R8v/iBf3Zmxiov1PY +1m2CAs8Z8aWm2xj4Ubi9+y+xu59c9eadDBRoemWbOEnB/t16/1nZM3DT5ZfG +hVMUODYZ59g6M3B5R0KuzjQF9kYbTJ1cGcjwmZhXQWwtbxfj5ctA57rdNUV/ +Kdh13kXLL5CBx2ZFxJX/o8Bizqfl6HEG2laOulwgNv8SJRURxcDBlVOLDs1Q +wC4ty710iYE+Qd99fs5S8EGlNGdjJgM116krsucoCLlUnD2aw8BXH3z3xBLf +jiy4alXMwH/fiR2S5SuHPRPczHkUA8W3ft24j3jU+3pGRRUD2+82UJnEBra5 +6WL15LxrozUl5pXD65fZl+82MrBEYHDdRmJ/s6xL3k0MjN7k+iWIWLw2M03+ +OdlfWz4tn5jSzbj4vIWBtyWDe1uJd3DTU0+8ZeCl8cw1E8S/ZC+naHQysFfk +PVOevxziktIudHQzUMdzhLuWeLngxeSznxk4fa+i1pb4aUhK0upvDHTY0eES +QOw+lJz4Tz8Dr37R4cYQC7onnU8dZJD6Cg3NJOZ+OJ9gOsrAYXZsfwmx2a6E ++OFJBhYHKv2pJu57HBeXO8PA5+nzUxuII9mxsZb8TMzaIdjyiFil6lzMrBAT +zz7ov/6YuEH97DneIibWV4dLNxE7ZZ0+u0+CiVPBSYxG4v8ko88skmYif9/X +ltvEmTGRp+tkmejlZEkrIzaZDY/2UmLiin/S+bKIOwNPRdEYTHSbSIqJIw7+ +ERb5RJ2JbUX8lUeJlzmHRgRpM/F6WkOIA/GtthPhrBVMFPye9m0dsfXW46fa +VjPx9S6bMSXikYagk9EmTMRlLYV/yf2mrD4WZgBMPDL3araNeEVpYOhnMybq +u+j9LSF+pRIQkmzOxCTVO1kniUUX+x0f2MXEi73cThpxWaRPcNYeJsZaFgd8 +JvWwdeJw0HYHJs5NqVcXEMf0eR4tcWXisoZvbHVidVuPQDsv4sTXkX2k3h6/ +dAsQ9mVizlx8YAbx/NqD/u7BTDwn8GI/H/F13QN+0mFMnB8960iR+jXlOvs+ +imBi3CnnRXbE4Un7vOlx5D5Oi4ZwSb0rCTocfp3IRPESUc5G4voQu0MRqUxM +Db92o4/0x7TbHs+eq0xMUR26t5T4ygdrj/PXmHhK86BNIemvNbt2u7MLmPjW +4V2eEXEQe6drRjkTRayM3S1IPw5Lbt2/5wETH9YaFFqTfu70pr869ISJMpuP +nX5A+r3x8TSENzPRU5yXoE2cHFKqXPSOiV93nKCPjVGg37e4d6qf3Pd36Whb +kic09lcLsSEminYkdhSSvOG7dPcefYzUz1Ph/SPDFLRu8c3eNsfEgLCUJeFD +FPhWtjpmLWVhooGajBfJsz2Lil5W0lj4KvqFVgbJu3VuEZzHiizUfFJ08gnJ +Q1HZFYqD6iy8oHfj47J+CsoiUrqRzUKm56PymG8U9FvaOPzjykLR1T3Xa0ne +vinWeTHpxULjrYtky0ke1wkIrRX1Y2GHuUNPLsnr2NvVcoYnWJjwY5XTiS4K +NJRpXefOs7C7tNB6luS9x0CXrVY1C+XcrHXsmkk+md94CndYKCDjbyhF5olh +Xvwa60YWTkoaX39B5o3QHjbt5HMW3g14Xqb3hIKCu1kdLT0sDDV9ldd8n8y7 +hP17Ahao4dzH4JUOZJ759mvT9RerYatyes74TQomNk/9/i2hhha3fk4kkvm3 +UCDljJecGiroWx+priD3feLhzf06augqYsP9VELBSTe1pZa71XBEuGksL5vM +13W/WrVy1HCV3c+Kb2R+52bWZP64roaHHfQp1SgKlk+d9igsUkOp5MJauwiS +pzcV5+hVapjDOTvXGEaBi6alrlyTGp7+luDmfYyCimVVCcI/1XBplX6ykTsF +WwaDt3w1VMeX11sUCzdSoLBC6awwWx3nneZa25qR+Rrw6IHWenWsytJGofVk +Xo1LsAO2qWNXoNRaWzZ5r8wU6845q2PrvWv/thlQELC4e6lsrDp5D0h6GCiT ++bcce7Z/UMe1MgPLY8bI+9BFOPBmuAaeYle2DKfzYCB7w92G0xqYTZ3U60/j +weD7iAUvYjWw0n5xQ28KD/5YTmV+TtVArryJ/4MEHkys7X8kVqSBU3qHzNwj +eMAv1bzM65UG0psS/mh48ED2UVKdoupyvPnGqIxrQN6DTBn+cw+WY6/DrwVP +75eB5Eu1xIpBTQya/vo0pr0UFGLKdxoaaqPZMLsq6GYJpGsZSyz10MEIw+Bt +AueL4bnc+tUjF3TxkHmWpoNtEZgoPEjWe6eHbTaQeHGqAMQE8o4eiNLHvLqV +ZySK8kEpUpltp7YCDffLNaxaxQUR1r5qqycrMI6vVq6iKQ90ObLlwY4GWOP0 +/JVFwDUI6JF8uJVvJY7E/5zOFM6FwZEEmy3pK/FTS9RRXngWbNZ7nLFFZxVu +HH02z14iE+6NrP070bIKpa3cby6JSQdfbYOu126rUaRXPPmh+SXgDLi22YkY +4nz+0skF/6XCRiZth2ieIUaGuD59O3kBNCLijj8wMkJ6rne9lGoyaLoZN7C6 +jLC6wmiTZWICuN3zPH3zyBocEO26b78/Fhpy21yHpY0xbPQW/3yTszBaNDeh +d9sYndniy+56R4MLq1QkY4cJfvrRvsFLPBKGNVMNq4ZM0NGx6b1N1Emo4f79 +PBazFqkvn4Ytik+A/QYGrlVi46Q8X67Z1iCQ9zlXq9vIxvYdTwZiFweC9ELv +yh17OdilMfIz+qA/cM1OhgzZcTBVS+rvvr3+YHAy0Sx1HwetWkuc2Nv9wWKo +or3zAAdVfo3QxAz94ey7sSkXbw6epitLzoj4w2ReuGlIJAdz5n+pFHX3g661 +qW8LSjnoG1jA81vqC57HuFe3UBxMUumZK5v1gXHqltuvCg5qOZTuHf/hA5L0 +zokV1RyMmrsvwGv0gW3Cigp3Gzl4RYnZWOzrA/VtBa5v2zm4ZMGMY3ezN2wV +q9EJ6uTg7Y/dJR013tC5+dk47QMHN3+NL+vhesNo3c8Yp08cNMrl1Imf9Aad +a/q8H/0cfKx+MGBGxxvqu9YHJfzmYMHC5e9t5Mh6UrtBb4iD8X1ZzbVC3uB+ +7tjro2MclL+WuJHbexhGG89myExykO/vwvuazYchavqyS900BzMMDG/V1xwG +iVXF2o4zHBw/IKlon38Ysn3qxubmOGjjljfCn3IY/gf5SXsY "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.060568053731349145`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -5705,6 +11050,7 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -5732,7 +11078,8 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1261051971575712}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.060568053731349145`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -5740,17 +11087,568 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913414579436264`*^9}, + CellChangeTimes->{3.9913414579436264`*^9, 3.994385499476218*^9}, CellLabel-> - "Out[361]=",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] + "Out[119]=",ExpressionUUID->"16d49726-da40-4d42-8530-3731610bba7a"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"e1c8585a-8b57-f841-82e1-\ -8e8787fb2589"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nc81e0bB3ARURmJHJszkJ2K6JyuKxpalCgjVHZZURTKalghUiIjHdv5 +GpWQoqEpGkQSpad6UhnZevC7f399X+9/7td939/r+ly36kE/Kzd+Pj4+oXl8 +fP//jvc8e8SM564TMpet7Vxjsq4tm3ZifWcUaAzd0W8QpQFKtx6kdaaAc7hg +Y4yoBgTtLOkQ6MyDm91a8e6ia2DJgEzKVEcVmGpPnTIWNYfeegu/0Y4HYLrv +8sobi21hE7P/43DHGxiv6pSsXOgJUx1GaUMdfWAdlFx5i/84PDQr5L7OG4Ee +YbHv2z/FgEJv7beD2jNwoPr8RsGdKSDl7VyywEwAL7a9WnC77zKkrNh0x8JG +GC+VK7DuFGXB+3T9xmEJUax853DG0ekaxHPDW/lll+BBT6a096/rIHPxS2xq +1lJcsjvC2nF1AZyz3rLuzbg0eqge3bhJuQgCja85P4uiYfEClcGG4WLYmis2 +ui2BhqUF/4ovnCwG+oKwmJY0Gv4ZNbHbOVsMr9r2VL4touGqeWEurxeWgK7/ +YoGeFhq2quaa5zNK4N+C4II/crKYPLigP9W6BPZJWfyWvyGLQgoHnGNvlMCG +wekQ3y9yGC3/rPOeWymcML+oef+XHNZ01wqOHSoF6ppO19JxOZypeeyl7l8K +NOv9xrXC8mh1ZeW7iJBS+FXTNCGgK4/OY5HGQkmlkBqVfPTKcXmUE+Yft79d +Cn3Sar6PRBXw1KxYm6ZgGcj4NSjKyCjgdT/W8e8iZbD9qe1LLxUF3FI+tD1X +rAyqQ+K1xVcqYErnkhghWhnE9Q7129kq4JAYF/M1y8Cg+I7HYJ4ChtdPZWtZ +lkEke9cBuTWKmBq6a59DWhmYO2X/MTJVxJA6T7fpK2UgFvEz2ma7IlItLwcu +ZpfB1YdnCpL3K6K1lGVUfWEZ1Gyt+ykUq4g35MRK22vLYMiWETTyXhFVJjfN +6n0sA6djY3HNoUo44b/i3mkVHrAumyr0n1HCdse9LalMHjl/Em9BshKW2Hs6 +Z2vwIOS/5a9MuUrYdaJ0foE+D9KinaRrm5WwXCvNKRx50HzhSU6+ojIe6Mk6 +ZO/MAxPqys1TDcpYrX1spOoKDzZ0tMwMPFXG4lrjrPGrPLDgm7/Z+Y0yWjea +HjDM5YGLle97+KqMawK+rCkp4MGmUNXwCEEVZDu803K5wQN/5fHr67VU8LjC +kIVcMw8eeeT8fhikgtKqERo50zzY8p+xZFioCj7xnj7nPsODluQ2w1URKtj8 +ZLeIJh8F72tFIrixKhjq+TIgX5CCgUVHJc9cVUErB50fPhIU0CrMjTY9UEGp +xsdFG1kUeE8ORzwVVcU/wrqPJbdTYHLEfdk3SVV0e05bk2xBgXB/V6kATRUV +NA5oieyiIP/Dw3fr6KqY3SqU/tuGgp57adq3DFXx0nDT5QhnCizPGHdec1bF +8c8J+a1HKFCa5fk0uKri4FrRw4JHKfgVRBf46KWKvxT21BkGURDjuUiXdlQV +OR8jJuNDKGjc9jE6MUYVbbbrC8yLpsBAMlIvtJKst1ekXTqVAr74sUfp1ar4 +V5gbNj+NghaBQ/bVd1SRHhJ2e+ASBYfHrM4MN6miQYXHj1sZFHA7mR88ulTx +VNx3S/E8CpblPD1rLUDHiNVdNQPlFPwjw1EIEKbjqgtnP1+qpKAqubIySZSO +Gkd+FJrcIOeJyuh+LkPH7oZUiWPVZL9u3gbrtenoVzHpequegiktiR4dGzq2 +eCyvdX1KwXiWXORKezq2L6dda3xGwag4i2nsTMd+tr897QX5HyPGhzZ40fG2 +iMGGOy8p6LvjMm5/ko7vHwsKt76hoFfH98r+KDqyHE2TRNoo6M45znY/R0fZ +4pLf0E7Bu+jzUUcu0NFq25BBbgcFz7fdFovJp+POKcVR3W4Knty9X3m+hOzf +NmKL+UcKHuk1W6eW0/Frn3CYYw8F95Z+zsiupaOgdkZo6Cdy3g8L1W+9JOsH +75g+8w8FGYedoG+MjjZ0s/z2nxRc/ujZ932ajg5fPDR5vyi4aBl45vccHUt8 +t1+J+E1B4sqYF5MiDOQ1pxvJD1IQ9bdyr7gSA6XizM8r/6Eg3Kd+WorBwNgC +v+B3xGG9j7PkNBio/XNkV+wIBUEPP3xhGTBQZkPAh75R8v/iBf3Zmxiov1PY +1m2CAs8Z8aWm2xj4Ubi9+y+xu59c9eadDBRoemWbOEnB/t16/1nZM3DT5ZfG +hVMUODYZ59g6M3B5R0KuzjQF9kYbTJ1cGcjwmZhXQWwtbxfj5ctA57rdNUV/ +Kdh13kXLL5CBx2ZFxJX/o8Bizqfl6HEG2laOulwgNv8SJRURxcDBlVOLDs1Q +wC4ty710iYE+Qd99fs5S8EGlNGdjJgM116krsucoCLlUnD2aw8BXH3z3xBLf +jiy4alXMwH/fiR2S5SuHPRPczHkUA8W3ft24j3jU+3pGRRUD2+82UJnEBra5 +6WL15LxrozUl5pXD65fZl+82MrBEYHDdRmJ/s6xL3k0MjN7k+iWIWLw2M03+ +OdlfWz4tn5jSzbj4vIWBtyWDe1uJd3DTU0+8ZeCl8cw1E8S/ZC+naHQysFfk +PVOevxziktIudHQzUMdzhLuWeLngxeSznxk4fa+i1pb4aUhK0upvDHTY0eES +QOw+lJz4Tz8Dr37R4cYQC7onnU8dZJD6Cg3NJOZ+OJ9gOsrAYXZsfwmx2a6E ++OFJBhYHKv2pJu57HBeXO8PA5+nzUxuII9mxsZb8TMzaIdjyiFil6lzMrBAT +zz7ov/6YuEH97DneIibWV4dLNxE7ZZ0+u0+CiVPBSYxG4v8ko88skmYif9/X +ltvEmTGRp+tkmejlZEkrIzaZDY/2UmLiin/S+bKIOwNPRdEYTHSbSIqJIw7+ +ERb5RJ2JbUX8lUeJlzmHRgRpM/F6WkOIA/GtthPhrBVMFPye9m0dsfXW46fa +VjPx9S6bMSXikYagk9EmTMRlLYV/yf2mrD4WZgBMPDL3araNeEVpYOhnMybq +u+j9LSF+pRIQkmzOxCTVO1kniUUX+x0f2MXEi73cThpxWaRPcNYeJsZaFgd8 +JvWwdeJw0HYHJs5NqVcXEMf0eR4tcWXisoZvbHVidVuPQDsv4sTXkX2k3h6/ +dAsQ9mVizlx8YAbx/NqD/u7BTDwn8GI/H/F13QN+0mFMnB8960iR+jXlOvs+ +imBi3CnnRXbE4Un7vOlx5D5Oi4ZwSb0rCTocfp3IRPESUc5G4voQu0MRqUxM +Db92o4/0x7TbHs+eq0xMUR26t5T4ygdrj/PXmHhK86BNIemvNbt2u7MLmPjW +4V2eEXEQe6drRjkTRayM3S1IPw5Lbt2/5wETH9YaFFqTfu70pr869ISJMpuP +nX5A+r3x8TSENzPRU5yXoE2cHFKqXPSOiV93nKCPjVGg37e4d6qf3Pd36Whb +kic09lcLsSEminYkdhSSvOG7dPcefYzUz1Ph/SPDFLRu8c3eNsfEgLCUJeFD +FPhWtjpmLWVhooGajBfJsz2Lil5W0lj4KvqFVgbJu3VuEZzHiizUfFJ08gnJ +Q1HZFYqD6iy8oHfj47J+CsoiUrqRzUKm56PymG8U9FvaOPzjykLR1T3Xa0ne +vinWeTHpxULjrYtky0ke1wkIrRX1Y2GHuUNPLsnr2NvVcoYnWJjwY5XTiS4K +NJRpXefOs7C7tNB6luS9x0CXrVY1C+XcrHXsmkk+md94CndYKCDjbyhF5olh +Xvwa60YWTkoaX39B5o3QHjbt5HMW3g14Xqb3hIKCu1kdLT0sDDV9ldd8n8y7 +hP17Ahao4dzH4JUOZJ759mvT9RerYatyes74TQomNk/9/i2hhha3fk4kkvm3 +UCDljJecGiroWx+priD3feLhzf06augqYsP9VELBSTe1pZa71XBEuGksL5vM +13W/WrVy1HCV3c+Kb2R+52bWZP64roaHHfQp1SgKlk+d9igsUkOp5MJauwiS +pzcV5+hVapjDOTvXGEaBi6alrlyTGp7+luDmfYyCimVVCcI/1XBplX6ykTsF +WwaDt3w1VMeX11sUCzdSoLBC6awwWx3nneZa25qR+Rrw6IHWenWsytJGofVk +Xo1LsAO2qWNXoNRaWzZ5r8wU6845q2PrvWv/thlQELC4e6lsrDp5D0h6GCiT ++bcce7Z/UMe1MgPLY8bI+9BFOPBmuAaeYle2DKfzYCB7w92G0xqYTZ3U60/j +weD7iAUvYjWw0n5xQ28KD/5YTmV+TtVArryJ/4MEHkys7X8kVqSBU3qHzNwj +eMAv1bzM65UG0psS/mh48ED2UVKdoupyvPnGqIxrQN6DTBn+cw+WY6/DrwVP +75eB5Eu1xIpBTQya/vo0pr0UFGLKdxoaaqPZMLsq6GYJpGsZSyz10MEIw+Bt +AueL4bnc+tUjF3TxkHmWpoNtEZgoPEjWe6eHbTaQeHGqAMQE8o4eiNLHvLqV +ZySK8kEpUpltp7YCDffLNaxaxQUR1r5qqycrMI6vVq6iKQ90ObLlwY4GWOP0 +/JVFwDUI6JF8uJVvJY7E/5zOFM6FwZEEmy3pK/FTS9RRXngWbNZ7nLFFZxVu +HH02z14iE+6NrP070bIKpa3cby6JSQdfbYOu126rUaRXPPmh+SXgDLi22YkY +4nz+0skF/6XCRiZth2ieIUaGuD59O3kBNCLijj8wMkJ6rne9lGoyaLoZN7C6 +jLC6wmiTZWICuN3zPH3zyBocEO26b78/Fhpy21yHpY0xbPQW/3yTszBaNDeh +d9sYndniy+56R4MLq1QkY4cJfvrRvsFLPBKGNVMNq4ZM0NGx6b1N1Emo4f79 +PBazFqkvn4Ytik+A/QYGrlVi46Q8X67Z1iCQ9zlXq9vIxvYdTwZiFweC9ELv +yh17OdilMfIz+qA/cM1OhgzZcTBVS+rvvr3+YHAy0Sx1HwetWkuc2Nv9wWKo +or3zAAdVfo3QxAz94ey7sSkXbw6epitLzoj4w2ReuGlIJAdz5n+pFHX3g661 +qW8LSjnoG1jA81vqC57HuFe3UBxMUumZK5v1gXHqltuvCg5qOZTuHf/hA5L0 +zokV1RyMmrsvwGv0gW3Cigp3Gzl4RYnZWOzrA/VtBa5v2zm4ZMGMY3ezN2wV +q9EJ6uTg7Y/dJR013tC5+dk47QMHN3+NL+vhesNo3c8Yp08cNMrl1Imf9Aad +a/q8H/0cfKx+MGBGxxvqu9YHJfzmYMHC5e9t5Mh6UrtBb4iD8X1ZzbVC3uB+ +7tjro2MclL+WuJHbexhGG89myExykO/vwvuazYchavqyS900BzMMDG/V1xwG +iVXF2o4zHBw/IKlon38Ysn3qxubmOGjjljfCn3IY/gf5SXsY + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc81e0bB3ARURmJHJszkJ2K6JyuKxpalCgjVHZZURTKalghUiIjHdv5 +GpWQoqEpGkQSpad6UhnZevC7f399X+9/7td939/r+ly36kE/Kzd+Pj4+oXl8 +fP//jvc8e8SM564TMpet7Vxjsq4tm3ZifWcUaAzd0W8QpQFKtx6kdaaAc7hg +Y4yoBgTtLOkQ6MyDm91a8e6ia2DJgEzKVEcVmGpPnTIWNYfeegu/0Y4HYLrv +8sobi21hE7P/43DHGxiv6pSsXOgJUx1GaUMdfWAdlFx5i/84PDQr5L7OG4Ee +YbHv2z/FgEJv7beD2jNwoPr8RsGdKSDl7VyywEwAL7a9WnC77zKkrNh0x8JG +GC+VK7DuFGXB+3T9xmEJUax853DG0ekaxHPDW/lll+BBT6a096/rIHPxS2xq +1lJcsjvC2nF1AZyz3rLuzbg0eqge3bhJuQgCja85P4uiYfEClcGG4WLYmis2 +ui2BhqUF/4ovnCwG+oKwmJY0Gv4ZNbHbOVsMr9r2VL4touGqeWEurxeWgK7/ +YoGeFhq2quaa5zNK4N+C4II/crKYPLigP9W6BPZJWfyWvyGLQgoHnGNvlMCG +wekQ3y9yGC3/rPOeWymcML+oef+XHNZ01wqOHSoF6ppO19JxOZypeeyl7l8K +NOv9xrXC8mh1ZeW7iJBS+FXTNCGgK4/OY5HGQkmlkBqVfPTKcXmUE+Yft79d +Cn3Sar6PRBXw1KxYm6ZgGcj4NSjKyCjgdT/W8e8iZbD9qe1LLxUF3FI+tD1X +rAyqQ+K1xVcqYErnkhghWhnE9Q7129kq4JAYF/M1y8Cg+I7HYJ4ChtdPZWtZ +lkEke9cBuTWKmBq6a59DWhmYO2X/MTJVxJA6T7fpK2UgFvEz2ma7IlItLwcu +ZpfB1YdnCpL3K6K1lGVUfWEZ1Gyt+ykUq4g35MRK22vLYMiWETTyXhFVJjfN +6n0sA6djY3HNoUo44b/i3mkVHrAumyr0n1HCdse9LalMHjl/Em9BshKW2Hs6 +Z2vwIOS/5a9MuUrYdaJ0foE+D9KinaRrm5WwXCvNKRx50HzhSU6+ojIe6Mk6 +ZO/MAxPqys1TDcpYrX1spOoKDzZ0tMwMPFXG4lrjrPGrPLDgm7/Z+Y0yWjea +HjDM5YGLle97+KqMawK+rCkp4MGmUNXwCEEVZDu803K5wQN/5fHr67VU8LjC +kIVcMw8eeeT8fhikgtKqERo50zzY8p+xZFioCj7xnj7nPsODluQ2w1URKtj8 +ZLeIJh8F72tFIrixKhjq+TIgX5CCgUVHJc9cVUErB50fPhIU0CrMjTY9UEGp +xsdFG1kUeE8ORzwVVcU/wrqPJbdTYHLEfdk3SVV0e05bk2xBgXB/V6kATRUV +NA5oieyiIP/Dw3fr6KqY3SqU/tuGgp57adq3DFXx0nDT5QhnCizPGHdec1bF +8c8J+a1HKFCa5fk0uKri4FrRw4JHKfgVRBf46KWKvxT21BkGURDjuUiXdlQV +OR8jJuNDKGjc9jE6MUYVbbbrC8yLpsBAMlIvtJKst1ekXTqVAr74sUfp1ar4 +V5gbNj+NghaBQ/bVd1SRHhJ2e+ASBYfHrM4MN6miQYXHj1sZFHA7mR88ulTx +VNx3S/E8CpblPD1rLUDHiNVdNQPlFPwjw1EIEKbjqgtnP1+qpKAqubIySZSO +Gkd+FJrcIOeJyuh+LkPH7oZUiWPVZL9u3gbrtenoVzHpequegiktiR4dGzq2 +eCyvdX1KwXiWXORKezq2L6dda3xGwag4i2nsTMd+tr897QX5HyPGhzZ40fG2 +iMGGOy8p6LvjMm5/ko7vHwsKt76hoFfH98r+KDqyHE2TRNoo6M45znY/R0fZ +4pLf0E7Bu+jzUUcu0NFq25BBbgcFz7fdFovJp+POKcVR3W4Knty9X3m+hOzf +NmKL+UcKHuk1W6eW0/Frn3CYYw8F95Z+zsiupaOgdkZo6Cdy3g8L1W+9JOsH +75g+8w8FGYedoG+MjjZ0s/z2nxRc/ujZ932ajg5fPDR5vyi4aBl45vccHUt8 +t1+J+E1B4sqYF5MiDOQ1pxvJD1IQ9bdyr7gSA6XizM8r/6Eg3Kd+WorBwNgC +v+B3xGG9j7PkNBio/XNkV+wIBUEPP3xhGTBQZkPAh75R8v/iBf3Zmxiov1PY +1m2CAs8Z8aWm2xj4Ubi9+y+xu59c9eadDBRoemWbOEnB/t16/1nZM3DT5ZfG +hVMUODYZ59g6M3B5R0KuzjQF9kYbTJ1cGcjwmZhXQWwtbxfj5ctA57rdNUV/ +Kdh13kXLL5CBx2ZFxJX/o8Bizqfl6HEG2laOulwgNv8SJRURxcDBlVOLDs1Q +wC4ty710iYE+Qd99fs5S8EGlNGdjJgM116krsucoCLlUnD2aw8BXH3z3xBLf +jiy4alXMwH/fiR2S5SuHPRPczHkUA8W3ft24j3jU+3pGRRUD2+82UJnEBra5 +6WL15LxrozUl5pXD65fZl+82MrBEYHDdRmJ/s6xL3k0MjN7k+iWIWLw2M03+ +OdlfWz4tn5jSzbj4vIWBtyWDe1uJd3DTU0+8ZeCl8cw1E8S/ZC+naHQysFfk +PVOevxziktIudHQzUMdzhLuWeLngxeSznxk4fa+i1pb4aUhK0upvDHTY0eES +QOw+lJz4Tz8Dr37R4cYQC7onnU8dZJD6Cg3NJOZ+OJ9gOsrAYXZsfwmx2a6E ++OFJBhYHKv2pJu57HBeXO8PA5+nzUxuII9mxsZb8TMzaIdjyiFil6lzMrBAT +zz7ov/6YuEH97DneIibWV4dLNxE7ZZ0+u0+CiVPBSYxG4v8ko88skmYif9/X +ltvEmTGRp+tkmejlZEkrIzaZDY/2UmLiin/S+bKIOwNPRdEYTHSbSIqJIw7+ +ERb5RJ2JbUX8lUeJlzmHRgRpM/F6WkOIA/GtthPhrBVMFPye9m0dsfXW46fa +VjPx9S6bMSXikYagk9EmTMRlLYV/yf2mrD4WZgBMPDL3araNeEVpYOhnMybq +u+j9LSF+pRIQkmzOxCTVO1kniUUX+x0f2MXEi73cThpxWaRPcNYeJsZaFgd8 +JvWwdeJw0HYHJs5NqVcXEMf0eR4tcWXisoZvbHVidVuPQDsv4sTXkX2k3h6/ +dAsQ9mVizlx8YAbx/NqD/u7BTDwn8GI/H/F13QN+0mFMnB8960iR+jXlOvs+ +imBi3CnnRXbE4Un7vOlx5D5Oi4ZwSb0rCTocfp3IRPESUc5G4voQu0MRqUxM +Db92o4/0x7TbHs+eq0xMUR26t5T4ygdrj/PXmHhK86BNIemvNbt2u7MLmPjW +4V2eEXEQe6drRjkTRayM3S1IPw5Lbt2/5wETH9YaFFqTfu70pr869ISJMpuP +nX5A+r3x8TSENzPRU5yXoE2cHFKqXPSOiV93nKCPjVGg37e4d6qf3Pd36Whb +kic09lcLsSEminYkdhSSvOG7dPcefYzUz1Ph/SPDFLRu8c3eNsfEgLCUJeFD +FPhWtjpmLWVhooGajBfJsz2Lil5W0lj4KvqFVgbJu3VuEZzHiizUfFJ08gnJ +Q1HZFYqD6iy8oHfj47J+CsoiUrqRzUKm56PymG8U9FvaOPzjykLR1T3Xa0ne +vinWeTHpxULjrYtky0ke1wkIrRX1Y2GHuUNPLsnr2NvVcoYnWJjwY5XTiS4K +NJRpXefOs7C7tNB6luS9x0CXrVY1C+XcrHXsmkk+md94CndYKCDjbyhF5olh +Xvwa60YWTkoaX39B5o3QHjbt5HMW3g14Xqb3hIKCu1kdLT0sDDV9ldd8n8y7 +hP17Ahao4dzH4JUOZJ759mvT9RerYatyes74TQomNk/9/i2hhha3fk4kkvm3 +UCDljJecGiroWx+priD3feLhzf06augqYsP9VELBSTe1pZa71XBEuGksL5vM +13W/WrVy1HCV3c+Kb2R+52bWZP64roaHHfQp1SgKlk+d9igsUkOp5MJauwiS +pzcV5+hVapjDOTvXGEaBi6alrlyTGp7+luDmfYyCimVVCcI/1XBplX6ykTsF +WwaDt3w1VMeX11sUCzdSoLBC6awwWx3nneZa25qR+Rrw6IHWenWsytJGofVk +Xo1LsAO2qWNXoNRaWzZ5r8wU6845q2PrvWv/thlQELC4e6lsrDp5D0h6GCiT ++bcce7Z/UMe1MgPLY8bI+9BFOPBmuAaeYle2DKfzYCB7w92G0xqYTZ3U60/j +weD7iAUvYjWw0n5xQ28KD/5YTmV+TtVArryJ/4MEHkys7X8kVqSBU3qHzNwj +eMAv1bzM65UG0psS/mh48ED2UVKdoupyvPnGqIxrQN6DTBn+cw+WY6/DrwVP +75eB5Eu1xIpBTQya/vo0pr0UFGLKdxoaaqPZMLsq6GYJpGsZSyz10MEIw+Bt +AueL4bnc+tUjF3TxkHmWpoNtEZgoPEjWe6eHbTaQeHGqAMQE8o4eiNLHvLqV +ZySK8kEpUpltp7YCDffLNaxaxQUR1r5qqycrMI6vVq6iKQ90ObLlwY4GWOP0 +/JVFwDUI6JF8uJVvJY7E/5zOFM6FwZEEmy3pK/FTS9RRXngWbNZ7nLFFZxVu +HH02z14iE+6NrP070bIKpa3cby6JSQdfbYOu126rUaRXPPmh+SXgDLi22YkY +4nz+0skF/6XCRiZth2ieIUaGuD59O3kBNCLijj8wMkJ6rne9lGoyaLoZN7C6 +jLC6wmiTZWICuN3zPH3zyBocEO26b78/Fhpy21yHpY0xbPQW/3yTszBaNDeh +d9sYndniy+56R4MLq1QkY4cJfvrRvsFLPBKGNVMNq4ZM0NGx6b1N1Emo4f79 +PBazFqkvn4Ytik+A/QYGrlVi46Q8X67Z1iCQ9zlXq9vIxvYdTwZiFweC9ELv +yh17OdilMfIz+qA/cM1OhgzZcTBVS+rvvr3+YHAy0Sx1HwetWkuc2Nv9wWKo +or3zAAdVfo3QxAz94ey7sSkXbw6epitLzoj4w2ReuGlIJAdz5n+pFHX3g661 +qW8LSjnoG1jA81vqC57HuFe3UBxMUumZK5v1gXHqltuvCg5qOZTuHf/hA5L0 +zokV1RyMmrsvwGv0gW3Cigp3Gzl4RYnZWOzrA/VtBa5v2zm4ZMGMY3ezN2wV +q9EJ6uTg7Y/dJR013tC5+dk47QMHN3+NL+vhesNo3c8Yp08cNMrl1Imf9Aad +a/q8H/0cfKx+MGBGxxvqu9YHJfzmYMHC5e9t5Mh6UrtBb4iD8X1ZzbVC3uB+ +7tjro2MclL+WuJHbexhGG89myExykO/vwvuazYchavqyS900BzMMDG/V1xwG +iVXF2o4zHBw/IKlon38Ysn3qxubmOGjjljfCn3IY/gf5SXsY + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.060568053731349145`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.060568053731349145`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nc81e0bB3ARURmJHJszkJ2K6JyuKxpalCgjVHZZURTKalghUiIjHdv5 +GpWQoqEpGkQSpad6UhnZevC7f399X+9/7td939/r+ly36kE/Kzd+Pj4+oXl8 +fP//jvc8e8SM564TMpet7Vxjsq4tm3ZifWcUaAzd0W8QpQFKtx6kdaaAc7hg +Y4yoBgTtLOkQ6MyDm91a8e6ia2DJgEzKVEcVmGpPnTIWNYfeegu/0Y4HYLrv +8sobi21hE7P/43DHGxiv6pSsXOgJUx1GaUMdfWAdlFx5i/84PDQr5L7OG4Ee +YbHv2z/FgEJv7beD2jNwoPr8RsGdKSDl7VyywEwAL7a9WnC77zKkrNh0x8JG +GC+VK7DuFGXB+3T9xmEJUax853DG0ekaxHPDW/lll+BBT6a096/rIHPxS2xq +1lJcsjvC2nF1AZyz3rLuzbg0eqge3bhJuQgCja85P4uiYfEClcGG4WLYmis2 +ui2BhqUF/4ovnCwG+oKwmJY0Gv4ZNbHbOVsMr9r2VL4touGqeWEurxeWgK7/ +YoGeFhq2quaa5zNK4N+C4II/crKYPLigP9W6BPZJWfyWvyGLQgoHnGNvlMCG +wekQ3y9yGC3/rPOeWymcML+oef+XHNZ01wqOHSoF6ppO19JxOZypeeyl7l8K +NOv9xrXC8mh1ZeW7iJBS+FXTNCGgK4/OY5HGQkmlkBqVfPTKcXmUE+Yft79d +Cn3Sar6PRBXw1KxYm6ZgGcj4NSjKyCjgdT/W8e8iZbD9qe1LLxUF3FI+tD1X +rAyqQ+K1xVcqYErnkhghWhnE9Q7129kq4JAYF/M1y8Cg+I7HYJ4ChtdPZWtZ +lkEke9cBuTWKmBq6a59DWhmYO2X/MTJVxJA6T7fpK2UgFvEz2ma7IlItLwcu +ZpfB1YdnCpL3K6K1lGVUfWEZ1Gyt+ykUq4g35MRK22vLYMiWETTyXhFVJjfN +6n0sA6djY3HNoUo44b/i3mkVHrAumyr0n1HCdse9LalMHjl/Em9BshKW2Hs6 +Z2vwIOS/5a9MuUrYdaJ0foE+D9KinaRrm5WwXCvNKRx50HzhSU6+ojIe6Mk6 +ZO/MAxPqys1TDcpYrX1spOoKDzZ0tMwMPFXG4lrjrPGrPLDgm7/Z+Y0yWjea +HjDM5YGLle97+KqMawK+rCkp4MGmUNXwCEEVZDu803K5wQN/5fHr67VU8LjC +kIVcMw8eeeT8fhikgtKqERo50zzY8p+xZFioCj7xnj7nPsODluQ2w1URKtj8 +ZLeIJh8F72tFIrixKhjq+TIgX5CCgUVHJc9cVUErB50fPhIU0CrMjTY9UEGp +xsdFG1kUeE8ORzwVVcU/wrqPJbdTYHLEfdk3SVV0e05bk2xBgXB/V6kATRUV +NA5oieyiIP/Dw3fr6KqY3SqU/tuGgp57adq3DFXx0nDT5QhnCizPGHdec1bF +8c8J+a1HKFCa5fk0uKri4FrRw4JHKfgVRBf46KWKvxT21BkGURDjuUiXdlQV +OR8jJuNDKGjc9jE6MUYVbbbrC8yLpsBAMlIvtJKst1ekXTqVAr74sUfp1ar4 +V5gbNj+NghaBQ/bVd1SRHhJ2e+ASBYfHrM4MN6miQYXHj1sZFHA7mR88ulTx +VNx3S/E8CpblPD1rLUDHiNVdNQPlFPwjw1EIEKbjqgtnP1+qpKAqubIySZSO +Gkd+FJrcIOeJyuh+LkPH7oZUiWPVZL9u3gbrtenoVzHpequegiktiR4dGzq2 +eCyvdX1KwXiWXORKezq2L6dda3xGwag4i2nsTMd+tr897QX5HyPGhzZ40fG2 +iMGGOy8p6LvjMm5/ko7vHwsKt76hoFfH98r+KDqyHE2TRNoo6M45znY/R0fZ +4pLf0E7Bu+jzUUcu0NFq25BBbgcFz7fdFovJp+POKcVR3W4Knty9X3m+hOzf +NmKL+UcKHuk1W6eW0/Frn3CYYw8F95Z+zsiupaOgdkZo6Cdy3g8L1W+9JOsH +75g+8w8FGYedoG+MjjZ0s/z2nxRc/ujZ932ajg5fPDR5vyi4aBl45vccHUt8 +t1+J+E1B4sqYF5MiDOQ1pxvJD1IQ9bdyr7gSA6XizM8r/6Eg3Kd+WorBwNgC +v+B3xGG9j7PkNBio/XNkV+wIBUEPP3xhGTBQZkPAh75R8v/iBf3Zmxiov1PY +1m2CAs8Z8aWm2xj4Ubi9+y+xu59c9eadDBRoemWbOEnB/t16/1nZM3DT5ZfG +hVMUODYZ59g6M3B5R0KuzjQF9kYbTJ1cGcjwmZhXQWwtbxfj5ctA57rdNUV/ +Kdh13kXLL5CBx2ZFxJX/o8Bizqfl6HEG2laOulwgNv8SJRURxcDBlVOLDs1Q +wC4ty710iYE+Qd99fs5S8EGlNGdjJgM116krsucoCLlUnD2aw8BXH3z3xBLf +jiy4alXMwH/fiR2S5SuHPRPczHkUA8W3ft24j3jU+3pGRRUD2+82UJnEBra5 +6WL15LxrozUl5pXD65fZl+82MrBEYHDdRmJ/s6xL3k0MjN7k+iWIWLw2M03+ +OdlfWz4tn5jSzbj4vIWBtyWDe1uJd3DTU0+8ZeCl8cw1E8S/ZC+naHQysFfk +PVOevxziktIudHQzUMdzhLuWeLngxeSznxk4fa+i1pb4aUhK0upvDHTY0eES +QOw+lJz4Tz8Dr37R4cYQC7onnU8dZJD6Cg3NJOZ+OJ9gOsrAYXZsfwmx2a6E ++OFJBhYHKv2pJu57HBeXO8PA5+nzUxuII9mxsZb8TMzaIdjyiFil6lzMrBAT +zz7ov/6YuEH97DneIibWV4dLNxE7ZZ0+u0+CiVPBSYxG4v8ko88skmYif9/X +ltvEmTGRp+tkmejlZEkrIzaZDY/2UmLiin/S+bKIOwNPRdEYTHSbSIqJIw7+ +ERb5RJ2JbUX8lUeJlzmHRgRpM/F6WkOIA/GtthPhrBVMFPye9m0dsfXW46fa +VjPx9S6bMSXikYagk9EmTMRlLYV/yf2mrD4WZgBMPDL3araNeEVpYOhnMybq +u+j9LSF+pRIQkmzOxCTVO1kniUUX+x0f2MXEi73cThpxWaRPcNYeJsZaFgd8 +JvWwdeJw0HYHJs5NqVcXEMf0eR4tcWXisoZvbHVidVuPQDsv4sTXkX2k3h6/ +dAsQ9mVizlx8YAbx/NqD/u7BTDwn8GI/H/F13QN+0mFMnB8960iR+jXlOvs+ +imBi3CnnRXbE4Un7vOlx5D5Oi4ZwSb0rCTocfp3IRPESUc5G4voQu0MRqUxM +Db92o4/0x7TbHs+eq0xMUR26t5T4ygdrj/PXmHhK86BNIemvNbt2u7MLmPjW +4V2eEXEQe6drRjkTRayM3S1IPw5Lbt2/5wETH9YaFFqTfu70pr869ISJMpuP +nX5A+r3x8TSENzPRU5yXoE2cHFKqXPSOiV93nKCPjVGg37e4d6qf3Pd36Whb +kic09lcLsSEminYkdhSSvOG7dPcefYzUz1Ph/SPDFLRu8c3eNsfEgLCUJeFD +FPhWtjpmLWVhooGajBfJsz2Lil5W0lj4KvqFVgbJu3VuEZzHiizUfFJ08gnJ +Q1HZFYqD6iy8oHfj47J+CsoiUrqRzUKm56PymG8U9FvaOPzjykLR1T3Xa0ne +vinWeTHpxULjrYtky0ke1wkIrRX1Y2GHuUNPLsnr2NvVcoYnWJjwY5XTiS4K +NJRpXefOs7C7tNB6luS9x0CXrVY1C+XcrHXsmkk+md94CndYKCDjbyhF5olh +Xvwa60YWTkoaX39B5o3QHjbt5HMW3g14Xqb3hIKCu1kdLT0sDDV9ldd8n8y7 +hP17Ahao4dzH4JUOZJ759mvT9RerYatyes74TQomNk/9/i2hhha3fk4kkvm3 +UCDljJecGiroWx+priD3feLhzf06augqYsP9VELBSTe1pZa71XBEuGksL5vM +13W/WrVy1HCV3c+Kb2R+52bWZP64roaHHfQp1SgKlk+d9igsUkOp5MJauwiS +pzcV5+hVapjDOTvXGEaBi6alrlyTGp7+luDmfYyCimVVCcI/1XBplX6ykTsF +WwaDt3w1VMeX11sUCzdSoLBC6awwWx3nneZa25qR+Rrw6IHWenWsytJGofVk +Xo1LsAO2qWNXoNRaWzZ5r8wU6845q2PrvWv/thlQELC4e6lsrDp5D0h6GCiT ++bcce7Z/UMe1MgPLY8bI+9BFOPBmuAaeYle2DKfzYCB7w92G0xqYTZ3U60/j +weD7iAUvYjWw0n5xQ28KD/5YTmV+TtVArryJ/4MEHkys7X8kVqSBU3qHzNwj +eMAv1bzM65UG0psS/mh48ED2UVKdoupyvPnGqIxrQN6DTBn+cw+WY6/DrwVP +75eB5Eu1xIpBTQya/vo0pr0UFGLKdxoaaqPZMLsq6GYJpGsZSyz10MEIw+Bt +AueL4bnc+tUjF3TxkHmWpoNtEZgoPEjWe6eHbTaQeHGqAMQE8o4eiNLHvLqV +ZySK8kEpUpltp7YCDffLNaxaxQUR1r5qqycrMI6vVq6iKQ90ObLlwY4GWOP0 +/JVFwDUI6JF8uJVvJY7E/5zOFM6FwZEEmy3pK/FTS9RRXngWbNZ7nLFFZxVu +HH02z14iE+6NrP070bIKpa3cby6JSQdfbYOu126rUaRXPPmh+SXgDLi22YkY +4nz+0skF/6XCRiZth2ieIUaGuD59O3kBNCLijj8wMkJ6rne9lGoyaLoZN7C6 +jLC6wmiTZWICuN3zPH3zyBocEO26b78/Fhpy21yHpY0xbPQW/3yTszBaNDeh +d9sYndniy+56R4MLq1QkY4cJfvrRvsFLPBKGNVMNq4ZM0NGx6b1N1Emo4f79 +PBazFqkvn4Ytik+A/QYGrlVi46Q8X67Z1iCQ9zlXq9vIxvYdTwZiFweC9ELv +yh17OdilMfIz+qA/cM1OhgzZcTBVS+rvvr3+YHAy0Sx1HwetWkuc2Nv9wWKo +or3zAAdVfo3QxAz94ey7sSkXbw6epitLzoj4w2ReuGlIJAdz5n+pFHX3g661 +qW8LSjnoG1jA81vqC57HuFe3UBxMUumZK5v1gXHqltuvCg5qOZTuHf/hA5L0 +zokV1RyMmrsvwGv0gW3Cigp3Gzl4RYnZWOzrA/VtBa5v2zm4ZMGMY3ezN2wV +q9EJ6uTg7Y/dJR013tC5+dk47QMHN3+NL+vhesNo3c8Yp08cNMrl1Imf9Aad +a/q8H/0cfKx+MGBGxxvqu9YHJfzmYMHC5e9t5Mh6UrtBb4iD8X1ZzbVC3uB+ +7tjro2MclL+WuJHbexhGG89myExykO/vwvuazYchavqyS900BzMMDG/V1xwG +iVXF2o4zHBw/IKlon38Ysn3qxubmOGjjljfCn3IY/gf5SXsY + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.060568053731349145`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.060568053731349145`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994385499505505*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"17f01e88-c85f-4c20-87a4-1f144415ac01"] +}, Open ]], Cell[CellGroupData[{ @@ -5802,66 +11700,70 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[365]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], + "In[121]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 365, 381, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423358439445`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.9365647317570075`*^-161\\\", \ +\\\"16424312045547973917068250855478962797836184904556443340043143969743430318\ +444318157938322185531163516963194464925547245426704384000000000000000000000000\ +00\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 121, 45, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994385499523242*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], +In[121]:=",ExpressionUUID->"4efc7179-2389-4552-bfe2-902cf4874c48"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 365, 382, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335853943*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.173701344046779`*^-164\\\", \ +\\\"55251385721223384257017595877831230851920926018927875395905136314216899591\ +246686283304515832126834071064186180009540933615433547776000000000000000000000\ +00000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 121, 46, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994385499525741*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], +In[121]:=",ExpressionUUID->"012b007b-c241-46dd-be6c-7c5e2304b390"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 365, 383, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335861944*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4176009216168073`*^-166\\\", \ +\\\"19233007369557860059867825125073051459553674347188793425314577950978902747\ +712971495218301961163350940137443209261321198991532417980825600000000000000000\ +000000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 121, 47, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.99438549952807*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], +In[121]:=",ExpressionUUID->"940a0e3b-c04f-491e-8819-5321a4bf89a3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 365, 384, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335870945*^9}, +during this calculation.\"", 2, 121, 48, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994385499530167*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], +In[121]:=",ExpressionUUID->"79d7c03a-85ce-46fa-afa4-40adc6e46374"], -Cell[BoxData["12.5536549879565`"], "Output", - CellChangeTimes->{3.9913423425170345`*^9}, +Cell[BoxData["13.039518724943939`"], "Output", + CellChangeTimes->{3.9913423425170345`*^9, 3.994385521538476*^9}, CellLabel-> - "Out[365]=",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] + "Out[121]=",ExpressionUUID->"2620fece-20f7-4b8e-b091-85e2099c0e02"] }, Open ]], Cell[CellGroupData[{ @@ -5928,68 +11830,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99184987967128*^9, - 3.9918498857615337`*^9}},ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-\ -30286a178ca1"], + CellChangeTimes->{{3.99184987967128*^9, 3.9918498857615337`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 385, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425545177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2017001309457002`*^-229\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 122, 49, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.994385521556347*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], +In[122]:=",ExpressionUUID->"eba53fad-fc39-4e51-92fd-34d138f81d70"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 386, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342342564516*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.812024036625513`*^-236\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 122, 50, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.994385521558876*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], +In[122]:=",ExpressionUUID->"ac360164-0a17-4a5a-b299-49ca64535ee5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 387, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425725136`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0784482731800915`*^-242\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 122, 51, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.994385521561006*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], +In[122]:=",ExpressionUUID->"641f8d9b-23af-402e-8e2b-f53b2b11524f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 366, 388, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425815163`*^9}, +during this calculation.\"", 2, 122, 52, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.9943855215630293`*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], +In[122]:=",ExpressionUUID->"2dfa88c3-fa9c-4226-8f5a-cda02d73c9e5"], -Cell[BoxData["2.904399821349581`"], "Output", - CellChangeTimes->{3.9913423499055786`*^9}, +Cell[BoxData["0.045057782825505335`"], "Output", + CellChangeTimes->{3.9913423499055786`*^9, 3.9943855243952*^9}, CellLabel-> - "Out[366]=",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] + "Out[122]=",ExpressionUUID->"7937a08c-a092-45d6-9322-822b81445e53"] }, Open ]], Cell[CellGroupData[{ @@ -6010,8 +11916,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6056,67 +11961,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849890499424*^9, - 3.9918498944226*^9}},ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], + CellChangeTimes->{{3.991849890499424*^9, 3.9918498944226*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 389, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499435787`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2017001309457002`*^-229\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 123, 53, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.99438552441396*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], +In[123]:=",ExpressionUUID->"a4768198-d8b6-4bed-aa76-842e11ffc219"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 390, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342349953579*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.812024036625513`*^-236\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 123, 54, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.994385524416438*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], +In[123]:=",ExpressionUUID->"b5fa3707-6d3e-4e61-bab3-a26d29085b8c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 391, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499625797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0784482731800915`*^-242\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 123, 55, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.994385524418481*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], +In[123]:=",ExpressionUUID->"7a1bba91-075e-4fb7-8328-9a2549b7c0d0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 367, 392, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499715805`*^9}, +during this calculation.\"", 2, 123, 56, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.994385524420425*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], +In[123]:=",ExpressionUUID->"17c65a92-56cd-499f-8ee0-cebc202cc6c2"], -Cell[BoxData["9.928941323789857`"], "Output", - CellChangeTimes->{3.991342356382967*^9}, +Cell[BoxData["43.040936278751715`"], "Output", + CellChangeTimes->{3.991342356382967*^9, 3.994385527066461*^9}, CellLabel-> - "Out[367]=",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] + "Out[123]=",ExpressionUUID->"5d82138d-ec7d-4396-aca8-1c02a0232d9e"] }, Open ]], Cell[CellGroupData[{ @@ -6137,8 +12047,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -6183,68 +12092,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499002266407`*^9, - 3.9918499040814323`*^9}},ExpressionUUID->"935796a8-6280-564a-b4d0-\ -fc6fb6cd41f8"], + CellChangeTimes->{{3.9918499002266407`*^9, 3.9918499040814323`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 393, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356420965*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2017001309457002`*^-229\\\", \ +\\\"18944089915624276894277943633734584709109446010887506295524523639832576000\ +0000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 124, 57, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994385527084549*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], +In[124]:=",ExpressionUUID->"4cceb862-9a97-4a01-bb45-2878e38c035a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 394, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356431965*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.812024036625513`*^-236\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 124, 58, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994385527087049*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], +In[124]:=",ExpressionUUID->"d73fb0a9-1801-4b42-a5bf-781ec5b67556"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 395, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356441965*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0784482731800915`*^-242\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 124, 59, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994385527089212*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], +In[124]:=",ExpressionUUID->"a1fe2e9d-45e7-41e0-8f7a-807e30349384"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 368, 396, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356450968*^9}, +during this calculation.\"", 2, 124, 60, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994385527091317*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], +In[124]:=",ExpressionUUID->"c587a616-a9a4-43ae-ac9b-a78e9c9f8ced"], -Cell[BoxData["19.874153108015193`"], "Output", - CellChangeTimes->{3.9913423600715523`*^9}, +Cell[BoxData["5.366861741305924`"], "Output", + CellChangeTimes->{3.9913423600715523`*^9, 3.994385528773418*^9}, CellLabel-> - "Out[368]=",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] + "Out[124]=",ExpressionUUID->"905e033e-4fdc-4c32-b134-acad0dda823b"] }, Open ]], Cell[CellGroupData[{ @@ -6253,22 +12166,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849908545643*^9, - 3.9918499133398113`*^9}},ExpressionUUID->"ee52036b-90c5-e14a-aed9-\ -684ff23ed035"], - -Cell[BoxData["0.2067571864462191`"], "Output", - CellChangeTimes->{3.9913423601046352`*^9}, + CellChangeTimes->{{3.991849908545643*^9, 3.9918499133398113`*^9}}, CellLabel-> - "Out[369]=",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] + "In[125]:=",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], + +Cell[BoxData["0.0029646181200426547`"], "Output", + CellChangeTimes->{3.9913423601046352`*^9, 3.9943855287886066`*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"e007053e-dd5b-41e6-a529-76937d592840"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849916273302*^9, 3.9918499185334816`*^9}, - 3.9919247506818066`*^9},ExpressionUUID->"c6d4a146-4cca-7e4e-b483-\ -85227a6e6b51"], + 3.9919247506818066`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ @@ -6291,12 +12205,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[371]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], + "In[127]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913423601345863`*^9}, +Cell[BoxData["17.88166778591983`"], "Output", + CellChangeTimes->{3.9913423601345863`*^9, 3.994385528802291*^9}, CellLabel-> - "Out[371]=",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] + "Out[127]=",ExpressionUUID->"6434c6e3-88af-4db1-a232-018ab2e14312"] }, Open ]], Cell[CellGroupData[{ @@ -6306,12 +12220,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[373]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], + "In[128]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.9913423601709976`*^9}, +Cell[BoxData["1.501611514492998`"], "Output", + CellChangeTimes->{3.9913423601709976`*^9, 3.994385528812974*^9}, CellLabel-> - "Out[373]=",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] + "Out[128]=",ExpressionUUID->"1262ca71-a0f7-48dd-bef2-212c8a6bc7b5"] }, Open ]], Cell[CellGroupData[{ @@ -6321,12 +12235,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[376]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], + "In[129]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913423602320137`*^9}, +Cell[BoxData["26.85131824567573`"], "Output", + CellChangeTimes->{3.9913423602320137`*^9, 3.9943855288238087`*^9}, CellLabel-> - "Out[376]=",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] + "Out[129]=",ExpressionUUID->"b80e957b-9128-4ac5-b72e-3ed01e433bf9"] }, Open ]], Cell[CellGroupData[{ @@ -6516,12 +12430,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[377]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], + "In[130]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[BoxData["0.02003459702393596`"], "Output", - CellChangeTimes->{3.991342360260002*^9}, +Cell[BoxData["0.004891701465986797`"], "Output", + CellChangeTimes->{3.991342360260002*^9, 3.994385528835368*^9}, CellLabel-> - "Out[377]=",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] + "Out[130]=",ExpressionUUID->"6c345393-33fb-4c96-900a-c0af166ef0e0"] }, Open ]], Cell[CellGroupData[{ @@ -6535,12 +12449,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[378]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], + "In[131]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[BoxData["6.261157591052328`"], "Output", - CellChangeTimes->{3.9913423603598785`*^9}, +Cell[BoxData["12.671118962600854`"], "Output", + CellChangeTimes->{3.9913423603598785`*^9, 3.9943855288871403`*^9}, CellLabel-> - "Out[378]=",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] + "Out[131]=",ExpressionUUID->"f70891d9-79e1-4d17-8f65-6cdbd428bc11"] }, Open ]], Cell[CellGroupData[{ @@ -6732,12 +12646,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[379]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], + "In[132]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[BoxData["0.010388932679900494`"], "Output", - CellChangeTimes->{3.991342360375868*^9}, +Cell[BoxData["0.03463265556658037`"], "Output", + CellChangeTimes->{3.991342360375868*^9, 3.994385528898967*^9}, CellLabel-> - "Out[379]=",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] + "Out[132]=",ExpressionUUID->"db3d0ff0-6e14-42a0-b6f8-717c1e2b2787"] }, Open ]], Cell[CellGroupData[{ @@ -6751,12 +12665,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[380]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], + "In[133]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[BoxData["8.694797556550151`"], "Output", - CellChangeTimes->{3.991342360471882*^9}, +Cell[BoxData["4.7621387384095915`"], "Output", + CellChangeTimes->{3.991342360471882*^9, 3.994385528951764*^9}, CellLabel-> - "Out[380]=",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] + "Out[133]=",ExpressionUUID->"7f1c08d1-a088-4ff5-b4a6-48bd4c850502"] }, Open ]], Cell[CellGroupData[{ @@ -6849,12 +12763,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[381]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], + "In[134]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991342360486868*^9}, +Cell[BoxData["0.09644452732399805`"], "Output", + CellChangeTimes->{3.991342360486868*^9, 3.9943855289633636`*^9}, CellLabel-> - "Out[381]=",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] + "Out[134]=",ExpressionUUID->"b15cb45a-8dfb-4522-b1e8-c540f2cb1975"] }, Open ]], Cell[CellGroupData[{ @@ -6944,12 +12858,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[382]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], + "In[135]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.9913423605138645`*^9}, +Cell[BoxData["0.903555472676002`"], "Output", + CellChangeTimes->{3.9913423605138645`*^9, 3.994385528974606*^9}, CellLabel-> - "Out[382]=",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] + "Out[135]=",ExpressionUUID->"d604ac2f-793e-4e0f-bed9-431501e76acc"] }, Open ]], Cell[CellGroupData[{ @@ -7072,12 +12986,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[383]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], + "In[136]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.9913423605448647`*^9}, +Cell[BoxData["0.08714298047324866`"], "Output", + CellChangeTimes->{3.9913423605448647`*^9, 3.9943855289864273`*^9}, CellLabel-> - "Out[383]=",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] + "Out[136]=",ExpressionUUID->"b03bd0d4-d651-4e3d-a306-b64a7eb3f57f"] }, Open ]], Cell[CellGroupData[{ @@ -7139,68 +13053,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849936863495*^9},ExpressionUUID->"6b25ec99-ae49-ec4d-9652-\ -65328572e509"], + CellChangeTimes->{3.991849936863495*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 384, 397, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342360571863*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.657970070013153`*^-224\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 137, 61, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.9943855289978724`*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], +In[137]:=",ExpressionUUID->"13c54846-6748-459c-8de6-bdf7f0b70352"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 384, 398, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605818653`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0312176019425215`*^-230\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 137, 62, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994385529000617*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], +In[137]:=",ExpressionUUID->"b625b985-8f3e-47c9-a6a9-4a9ad480c03b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 384, - 399, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605898647`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.541885415490815`*^-236\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 137, 63, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.99438552900279*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], +In[137]:=",ExpressionUUID->"55cadb20-a070-4fad-bc5b-f991a0312da2"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 384, 400, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605988636`*^9}, +during this calculation.\"", 2, 137, 64, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994385529004944*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], +In[137]:=",ExpressionUUID->"775237be-8684-4516-8d6d-4c0130319155"], -Cell[BoxData["6.261157591052324`"], "Output", - CellChangeTimes->{3.9913423642473736`*^9}, +Cell[BoxData["12.67111896260084`"], "Output", + CellChangeTimes->{3.9913423642473736`*^9, 3.994385530579196*^9}, CellLabel-> - "Out[384]=",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] + "Out[137]=",ExpressionUUID->"09337971-3d4c-4457-b52c-a87322939d71"] }, Open ]], Cell[CellGroupData[{ @@ -7262,68 +13180,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849940282545*^9},ExpressionUUID->"3e2baf62-fab9-eb41-8de7-\ -aa229443ac14"], + CellChangeTimes->{3.991849940282545*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 385, 401, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364284378*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.657970070013153`*^-224\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 138, 65, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.9943855305974197`*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], +In[138]:=",ExpressionUUID->"eea76993-263e-499b-b75a-ad8282abadf5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 385, 402, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423642935734`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0312176019425215`*^-230\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 138, 66, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994385530599966*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], +In[138]:=",ExpressionUUID->"8c7042cb-8eb7-4ccd-8de3-4f4f89ec20b8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 385, - 403, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364302574*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.541885415490815`*^-236\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 138, 67, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994385530602151*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], +In[138]:=",ExpressionUUID->"93b4badf-3ac0-425e-9136-30770884f0c7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 385, 404, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423643105717`*^9}, +during this calculation.\"", 2, 138, 68, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994385530604548*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], +In[138]:=",ExpressionUUID->"cf6a9807-c71e-42fc-b9c6-856a12633245"], -Cell[BoxData["8.694797556550144`"], "Output", - CellChangeTimes->{3.9913423679416714`*^9}, +Cell[BoxData["4.76213873840959`"], "Output", + CellChangeTimes->{3.9913423679416714`*^9, 3.9943855321808243`*^9}, CellLabel-> - "Out[385]=",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] + "Out[138]=",ExpressionUUID->"7fa5b87f-829b-41ce-bd88-788c38d1b567"] }, Open ]], Cell[CellGroupData[{ @@ -7381,95 +13303,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849946138607*^9},ExpressionUUID->"725c3011-bda9-4c42-96ce-\ -9a77a5dc787c"], + CellChangeTimes->{3.991849946138607*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk0ldsbB3AZylgoU6JMFSIdQ6bsJ47MEspQXHHe1xAy32N2Q65ENOFX +MmVIhkQpUypJUtxSaSZDOKbzIinVb/vjXe/6rL32dz3PnuQ8j9sTnBwcHFP4 +W/kHP1ff1tD73MjxXUEfU4mFjKavanvSK5FXXfncigfydc4r0puRpFyrXSS2 +HePZakHNR+ii3CBrxbXM+Ic89G7kclPkURR2aodkW3zFf4jo2f8hGvtub/CV +Zdor9Cf00q5Y7Il3XTGRTf1I9n/z7XHYG0cUDn8z+YAe6R++mIBtNROjF9r9 +GT2w6Sk5gd26PCHArBhEk0/s5pKwX/8jEX07cAhRVz/HpWBPr6ZPzNNGkP/L +aPNT2KtPB7loLo6iT+ZKdunYsiJ5ncFNY+j54vsLmdi20t9Kp00mUVxH0Pts +bLJAXlyNdxqVPbJ9fwk7Xml/8rHuGQQtelIF2P0SfbvCKtio2lxn/zVshquf +77nTFGLUmZlVY89e5ii8GTiHBNuJ2DpsXnk1YTZtAYlGPi5uxT7PeGgmLPYN +ZbH4z7djbylzid+5+A35FLg+6MLW3XFyOqDpO/rjIfv2DbaPzufuCZNlNDqn +OTOPPc8M5+bf+gt5ar/uWcZOaBIwVOb9jRJaEqe5t7JQDuhe9+7+g9A6jlEx +bEZJJz2kYhVERUW26GNXdJwb+EeaEyoagzPo2LNf3WOyTnOCK0dYni12jMpC +3Y1ALrg/eiHcC/t8jZzCDI0H6qYt1mZiv+udbP1dzAOnNNJ7LmFvoRpc14qt +hk3s/udl2JVatmfVFleDgXhqSht2+92oVf5NvODeZTo4j73w8OXnMRNBKJNc +1vbdxkKi1oLC0a2CIGggpRqFrdFHByE9IXDR2uibhu03fKtgl/pa0DfquFeN +HcTZrbFHUBgc3JvffMceka9mJ38TAR7bJ7X/247Xh+zi69EUhYiZBa0b2JzX +R+Ukg0VhHxfHqg7sLZqb7StYopBbVxFKYbuaZN58PrAe0oxsHtoqs1CPV0io +xFMxqNVxFRBTYaFPZRlpHrziANcVN+3EnmRVFF8zFYeg8vZwC2z+sKGXBm3i +0CGYyBWPTU9y1PK4JQGl/eP/TmE3XtVZKM+XgstWH/X7VVno6siPCP0wGTCg +L+kMq7GQ+cGUT6FVMlC7GMHPo47z29fvqxqVASEpL5mt2FpXd4htcZGFzXuS +Vvlit3u61/EYbYaFmf4HbGxqZuDvscQtwASkvE6DhdYH0OvrbOSBvuCaEElj +odGr/D52fvIgE0lAEfadD73SUyflYW6oEz3FPmLtlri1TR7cArKXZTRxfaoR +9rk0BdjFaRTYga01UTYbJ6EIDr2cuxS0WcjRW0DNclAJRL80qAvqshCKOEhz ++qUEqekuQwbYKsn5uxlSW+Hxf+19x7A5ijWN4w5shVNN8wHd2FWfDjvdvL8V +niwVRmbq4ft5qPKfjUXbYHNCwIKCAa6PbvN6wlMZwrm8mUwjFip2yH6/GKcM +zxjx7TXYGZ6DA9yXlIH+1cTmKzYjIZwl+1IZEu2fbXBCLCTSnMfhYKICNecf +ResBPj+a0ypNCqq4f7Kcz5iFpOXPxKcN7wC1Dxzhb0xZqPnUvPISpxoYRede +l96H12POpY+UU4MNvoHKHthX2hWVjd3VwPDg4x/j2PLejS++v1EDeWHBeQ5z +3G/liBL5VB0CkjORoSULyUjLkltcNMC3rWznmC0L7SgJE/yJaOCW87eEmAsL +eTISF9RsaeAoe/oAgZ2jcPaTxxEapI3ZPrmFzVVUc6ODSYMl6bfBTq74vl2Z +cDxbS4P0kL7SvMP4Pc3xyFNW0ATxWZ58bXe8v2nW6s6rteDvE1wt57xYqDBE +0e5WtzbUpBvZ8R5nod4ItDupRA+MXv5topjGQnLur2zd/PdAoYigjeh1FiL+ +3K6WiQS4VcFkV3ezkATrzhoJT2O4M6gbAgssFKZp+OGsCh1uPA5PmpGdRJ5T +y53rJ0xB1ULgi63VJKoyDl2T32MGUc9EXlnHT6Kr8373K89bQOaJWPtDdZPo ++17JZ+3xVkDjWmRGzkyijxxc7MGjNqDnZDOzXX0KBW46nvmPwn7IUh6bv3ds +ClX7drZdSLaDZvmPY89rp1DUnNSiqu8BEDIqnZb8NoUWLPcdevyXPbTFNqYI +mUwjvcNZe0cOOED0Nct3HlnT6IVUnl+7piOsLjUtqP8wjTaWJjaXbz8I/Rd4 +Xp7TmEF3BlSsbYUOwcUzNOPahBkk2zfrHTF1CErpzzZV9M4gzQtZlcUDTuC0 +buNJ1w2zKI97Tv3sQ2dIpOuwB/bMott7d75LvusCMg+f9Kgdm0U5u0+JLFe4 +wrnGlCP3smdRz/uSk5qnD4NW0o0jOvdn0S2by4pBCUdgJBD97J+aRewAB45A +hhtMfvXv/y3ORgv7lH2mTdxhWKynucSIjcqn3n4P1fkLSvEBrPJhI+fCEi83 +QQ9Q0mcHtWSwUd1Nq7+4Ujzg9NSl8fjbbKQn/WIpdckDxhtKVX69ZSOFAe93 +//kehbaMoHd8P9loWODY/stDR0FvUp1dv4lCvRm2XmYHPUHmuce+AT0KnWfm +C4T3esJZz67h54co1Nz6Z8nLwgtkvejHrIIotO4IpGg2esEUUXbGMplCWzY8 +7tnU7AUn+Mdi87E1um0kV7d6wYUf0zrz2PaGh6/13/eCy8WKfHkncf6miKex +T7yAp4lTbTKFQhs/Xl/X2e8FMVsMfBNOUUjRXSLnyKIXPg9+fglnKKTnMV2e +rMWAn9sGXT/kUKg0dzbUVocB709Yz8jmUmjDS8pIQpcB9xaUHI5iT5su9pUb +MKDBmCd1BPuqKseqbmMGLASVVLL+R6G1iyIuogcYYFm+3D19mULD6dp8+QEM +yKvLRb0FFDrweHef93EGlOy9USdYSKFWDv18jWAGLN3a/80cOzfUSPtBGAN8 ++NZ+bcO2dTE7OhLNAMO0rvDqIgrdVXS5q3qKAWpThHHCVQplNMX43illAG34 +kN/vMgoF0LL1mOUMiAHHs5rlFLK+VsunW8EA28o/qT7Y/Nmj1xqqGCCZYjH2 +H3ZyiN3E7XoGhGnxehRdo1CMsuKxWw8YMBeit1v/OoX8sp/63/yE+xttcDOt +ppDF2lHDkAEGpBJXgsKwtydzCNG+MKDIMdG+GHs0RLuqdoQBKhOaiRw1FDpq +mz91Y5IBtZ8Ksu9gO/OEBtb8YMCnCON/N9dSyCx0Y1ClOAGzp2PIzjoKPcg/ +aXlWkoB1rd875rENuylF5kYC7B6sndpSj/df6elbE1kC5JzYqUxsqTfRJu+V +CJB5xeZRukUhlv5HcX5tAiQur+IMvU2hM5wFLd4OBCgvzgx/uYP73ymYY3OQ +gFPuktNr7lIo6TAzRNOJgADfXc07sJn1dtv+uBKQayBfFo59lFyVddET16cT +1cDdSCHNLk/Go2ACzIoXWySaKPQmS0lAIZMAkUQXE5EWClUjIZ+xLAKaO8vG +dmAnTc23V50jgCdB2NUcm2bRHqebTUBxh2JhHHYGhxdlc4WA3izOtjHsfccL +3jIrCXC2XthT10ohGZl/dYyqCZjYkVD8FHu+6/g5rhsECGh96xvCLtqKbDLq +CBCuzbm0/h6Ffn382FbcSEBE+rGGIOx6a+ny5514vt+vrXJtFEr7wclzvouA +YadlCx1sz/KJoy7dBJRzt+haYQtzN0oP9xDwWzQqMgzbv8n5zNJrAkKSC1Pa +sRVULkYojhDwl0NVn+t9Cv14E/tyfJQAZH37pj92bzKhUTNGwJ80tyNx2HGD +WhN6kwQovIgTLcR+l/PSbf8cAS+IV3zD2GfXiJhGrSIhslxNweMBfg+oj4fD +uEhYO7LTNwj768eKkEAeEj6MdwQkYBvW0ws8+UgYolXczMce9WD+tBQhQX8j +r+p7bGFrU1HT9SR41YQQ49gGu0WVkRgJ0t0e7ovYmUKVhzSlSBitvJcm+hCP +N36ulZYjwfyUfZ8pNllS2SmmQALkFnPaY2dmRn5ep0RCsonvjBv2KLleiFuZ +hHUlVtzhK+PrzXwmNUhwMEXSBdiNv9fHj9JIcLu4Zk8F9sj4wIUBLRK+sHbL +1GPrt0U97NMlIYX/qeRj7GH/atkWIMFi6sLyOPZa52jtBmMS6haZIhS2nom5 +dS2dBPWOu8NL2BlSXyJLzEkYAbsO3nYK3eGuycy3JMH1WXHfOuyhmeiyXGsS +zD7ZFYpj63aIvUq3I+FHfV24ArZn7RdWij2eX+Idq4ydfrmG84QjCZnBwSY7 +sb+EWGhEOJOQdCiRXx9byF3cLMiVhPGRVAG0kmcx5OZ3hAQjw6Euk5X5m2PT +3D1IUMpKS7JeqYffssjZk4Quu7dxdit5C+J37RkkXHT5e7fjSt7gUI81ScJJ +BaLaaSWv+8boPh9c386iIdeV+hpif4EfCVV86m/cVvKLLDcY+JNwj86b6rGS +ny6hqh1IQn2cxpLnSj5zeO/OIBL83Eu3EdiCjFpn5RBcz3nfDd7Yu/fHHVcI +IyH1beQ9n5V8fauTMhEkXGa/3u6HfVpJMk+CScKD8gS7Y9i3hUfqRKJI6OyL +0PHHHvxZ2yUQQ0Kf4913Kxb8GjfIE0dCuIj5ngBsnRdW3//Ek5C9LO++4v8D +sJsfHw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7483,107 +13405,107 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV1Hk0ldsbB3AZylgoU6JMFSIdQ6bsJ47MEspQXHHe1xAy32N2Q65ENOFX +MmVIhkQpUypJUtxSaSZDOKbzIinVb/vjXe/6rL32dz3PnuQ8j9sTnBwcHFP4 +W/kHP1ff1tD73MjxXUEfU4mFjKavanvSK5FXXfncigfydc4r0puRpFyrXSS2 +HePZakHNR+ii3CBrxbXM+Ic89G7kclPkURR2aodkW3zFf4jo2f8hGvtub/CV +Zdor9Cf00q5Y7Il3XTGRTf1I9n/z7XHYG0cUDn8z+YAe6R++mIBtNROjF9r9 +GT2w6Sk5gd26PCHArBhEk0/s5pKwX/8jEX07cAhRVz/HpWBPr6ZPzNNGkP/L +aPNT2KtPB7loLo6iT+ZKdunYsiJ5ncFNY+j54vsLmdi20t9Kp00mUVxH0Pts +bLJAXlyNdxqVPbJ9fwk7Xml/8rHuGQQtelIF2P0SfbvCKtio2lxn/zVshquf +77nTFGLUmZlVY89e5ii8GTiHBNuJ2DpsXnk1YTZtAYlGPi5uxT7PeGgmLPYN +ZbH4z7djbylzid+5+A35FLg+6MLW3XFyOqDpO/rjIfv2DbaPzufuCZNlNDqn +OTOPPc8M5+bf+gt5ar/uWcZOaBIwVOb9jRJaEqe5t7JQDuhe9+7+g9A6jlEx +bEZJJz2kYhVERUW26GNXdJwb+EeaEyoagzPo2LNf3WOyTnOCK0dYni12jMpC +3Y1ALrg/eiHcC/t8jZzCDI0H6qYt1mZiv+udbP1dzAOnNNJ7LmFvoRpc14qt +hk3s/udl2JVatmfVFleDgXhqSht2+92oVf5NvODeZTo4j73w8OXnMRNBKJNc +1vbdxkKi1oLC0a2CIGggpRqFrdFHByE9IXDR2uibhu03fKtgl/pa0DfquFeN +HcTZrbFHUBgc3JvffMceka9mJ38TAR7bJ7X/247Xh+zi69EUhYiZBa0b2JzX +R+Ukg0VhHxfHqg7sLZqb7StYopBbVxFKYbuaZN58PrAe0oxsHtoqs1CPV0io +xFMxqNVxFRBTYaFPZRlpHrziANcVN+3EnmRVFF8zFYeg8vZwC2z+sKGXBm3i +0CGYyBWPTU9y1PK4JQGl/eP/TmE3XtVZKM+XgstWH/X7VVno6siPCP0wGTCg +L+kMq7GQ+cGUT6FVMlC7GMHPo47z29fvqxqVASEpL5mt2FpXd4htcZGFzXuS +Vvlit3u61/EYbYaFmf4HbGxqZuDvscQtwASkvE6DhdYH0OvrbOSBvuCaEElj +odGr/D52fvIgE0lAEfadD73SUyflYW6oEz3FPmLtlri1TR7cArKXZTRxfaoR +9rk0BdjFaRTYga01UTYbJ6EIDr2cuxS0WcjRW0DNclAJRL80qAvqshCKOEhz ++qUEqekuQwbYKsn5uxlSW+Hxf+19x7A5ijWN4w5shVNN8wHd2FWfDjvdvL8V +niwVRmbq4ft5qPKfjUXbYHNCwIKCAa6PbvN6wlMZwrm8mUwjFip2yH6/GKcM +zxjx7TXYGZ6DA9yXlIH+1cTmKzYjIZwl+1IZEu2fbXBCLCTSnMfhYKICNecf +ResBPj+a0ypNCqq4f7Kcz5iFpOXPxKcN7wC1Dxzhb0xZqPnUvPISpxoYRede +l96H12POpY+UU4MNvoHKHthX2hWVjd3VwPDg4x/j2PLejS++v1EDeWHBeQ5z +3G/liBL5VB0CkjORoSULyUjLkltcNMC3rWznmC0L7SgJE/yJaOCW87eEmAsL +eTISF9RsaeAoe/oAgZ2jcPaTxxEapI3ZPrmFzVVUc6ODSYMl6bfBTq74vl2Z +cDxbS4P0kL7SvMP4Pc3xyFNW0ATxWZ58bXe8v2nW6s6rteDvE1wt57xYqDBE +0e5WtzbUpBvZ8R5nod4ItDupRA+MXv5topjGQnLur2zd/PdAoYigjeh1FiL+ +3K6WiQS4VcFkV3ezkATrzhoJT2O4M6gbAgssFKZp+OGsCh1uPA5PmpGdRJ5T +y53rJ0xB1ULgi63VJKoyDl2T32MGUc9EXlnHT6Kr8373K89bQOaJWPtDdZPo ++17JZ+3xVkDjWmRGzkyijxxc7MGjNqDnZDOzXX0KBW46nvmPwn7IUh6bv3ds +ClX7drZdSLaDZvmPY89rp1DUnNSiqu8BEDIqnZb8NoUWLPcdevyXPbTFNqYI +mUwjvcNZe0cOOED0Nct3HlnT6IVUnl+7piOsLjUtqP8wjTaWJjaXbz8I/Rd4 +Xp7TmEF3BlSsbYUOwcUzNOPahBkk2zfrHTF1CErpzzZV9M4gzQtZlcUDTuC0 +buNJ1w2zKI97Tv3sQ2dIpOuwB/bMott7d75LvusCMg+f9Kgdm0U5u0+JLFe4 +wrnGlCP3smdRz/uSk5qnD4NW0o0jOvdn0S2by4pBCUdgJBD97J+aRewAB45A +hhtMfvXv/y3ORgv7lH2mTdxhWKynucSIjcqn3n4P1fkLSvEBrPJhI+fCEi83 +QQ9Q0mcHtWSwUd1Nq7+4Ujzg9NSl8fjbbKQn/WIpdckDxhtKVX69ZSOFAe93 +//kehbaMoHd8P9loWODY/stDR0FvUp1dv4lCvRm2XmYHPUHmuce+AT0KnWfm +C4T3esJZz67h54co1Nz6Z8nLwgtkvejHrIIotO4IpGg2esEUUXbGMplCWzY8 +7tnU7AUn+Mdi87E1um0kV7d6wYUf0zrz2PaGh6/13/eCy8WKfHkncf6miKex +T7yAp4lTbTKFQhs/Xl/X2e8FMVsMfBNOUUjRXSLnyKIXPg9+fglnKKTnMV2e +rMWAn9sGXT/kUKg0dzbUVocB709Yz8jmUmjDS8pIQpcB9xaUHI5iT5su9pUb +MKDBmCd1BPuqKseqbmMGLASVVLL+R6G1iyIuogcYYFm+3D19mULD6dp8+QEM +yKvLRb0FFDrweHef93EGlOy9USdYSKFWDv18jWAGLN3a/80cOzfUSPtBGAN8 ++NZ+bcO2dTE7OhLNAMO0rvDqIgrdVXS5q3qKAWpThHHCVQplNMX43illAG34 +kN/vMgoF0LL1mOUMiAHHs5rlFLK+VsunW8EA28o/qT7Y/Nmj1xqqGCCZYjH2 +H3ZyiN3E7XoGhGnxehRdo1CMsuKxWw8YMBeit1v/OoX8sp/63/yE+xttcDOt +ppDF2lHDkAEGpBJXgsKwtydzCNG+MKDIMdG+GHs0RLuqdoQBKhOaiRw1FDpq +mz91Y5IBtZ8Ksu9gO/OEBtb8YMCnCON/N9dSyCx0Y1ClOAGzp2PIzjoKPcg/ +aXlWkoB1rd875rENuylF5kYC7B6sndpSj/df6elbE1kC5JzYqUxsqTfRJu+V +CJB5xeZRukUhlv5HcX5tAiQur+IMvU2hM5wFLd4OBCgvzgx/uYP73ymYY3OQ +gFPuktNr7lIo6TAzRNOJgADfXc07sJn1dtv+uBKQayBfFo59lFyVddET16cT +1cDdSCHNLk/Go2ACzIoXWySaKPQmS0lAIZMAkUQXE5EWClUjIZ+xLAKaO8vG +dmAnTc23V50jgCdB2NUcm2bRHqebTUBxh2JhHHYGhxdlc4WA3izOtjHsfccL +3jIrCXC2XthT10ohGZl/dYyqCZjYkVD8FHu+6/g5rhsECGh96xvCLtqKbDLq +CBCuzbm0/h6Ffn382FbcSEBE+rGGIOx6a+ny5514vt+vrXJtFEr7wclzvouA +YadlCx1sz/KJoy7dBJRzt+haYQtzN0oP9xDwWzQqMgzbv8n5zNJrAkKSC1Pa +sRVULkYojhDwl0NVn+t9Cv14E/tyfJQAZH37pj92bzKhUTNGwJ80tyNx2HGD +WhN6kwQovIgTLcR+l/PSbf8cAS+IV3zD2GfXiJhGrSIhslxNweMBfg+oj4fD +uEhYO7LTNwj768eKkEAeEj6MdwQkYBvW0ws8+UgYolXczMce9WD+tBQhQX8j +r+p7bGFrU1HT9SR41YQQ49gGu0WVkRgJ0t0e7ovYmUKVhzSlSBitvJcm+hCP +N36ulZYjwfyUfZ8pNllS2SmmQALkFnPaY2dmRn5ep0RCsonvjBv2KLleiFuZ +hHUlVtzhK+PrzXwmNUhwMEXSBdiNv9fHj9JIcLu4Zk8F9sj4wIUBLRK+sHbL +1GPrt0U97NMlIYX/qeRj7GH/atkWIMFi6sLyOPZa52jtBmMS6haZIhS2nom5 +dS2dBPWOu8NL2BlSXyJLzEkYAbsO3nYK3eGuycy3JMH1WXHfOuyhmeiyXGsS +zD7ZFYpj63aIvUq3I+FHfV24ArZn7RdWij2eX+Idq4ydfrmG84QjCZnBwSY7 +sb+EWGhEOJOQdCiRXx9byF3cLMiVhPGRVAG0kmcx5OZ3hAQjw6Euk5X5m2PT +3D1IUMpKS7JeqYffssjZk4Quu7dxdit5C+J37RkkXHT5e7fjSt7gUI81ScJJ +BaLaaSWv+8boPh9c386iIdeV+hpif4EfCVV86m/cVvKLLDcY+JNwj86b6rGS +ny6hqh1IQn2cxpLnSj5zeO/OIBL83Eu3EdiCjFpn5RBcz3nfDd7Yu/fHHVcI +IyH1beQ9n5V8fauTMhEkXGa/3u6HfVpJMk+CScKD8gS7Y9i3hUfqRKJI6OyL +0PHHHvxZ2yUQQ0Kf4913Kxb8GjfIE0dCuIj5ngBsnRdW3//Ek5C9LO++4v8D +sJsfHw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.8483242180726145, + 1.1729558636868995`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.8483242180726164}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7595,21 +13517,21 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.8483242180726145, + 1.1729558636868995`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.8483242180726164}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7623,105 +13545,105 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV1Hk0ldsbB3AZylgoU6JMFSIdQ6bsJ47MEspQXHHe1xAy32N2Q65ENOFX +MmVIhkQpUypJUtxSaSZDOKbzIinVb/vjXe/6rL32dz3PnuQ8j9sTnBwcHFP4 +W/kHP1ff1tD73MjxXUEfU4mFjKavanvSK5FXXfncigfydc4r0puRpFyrXSS2 +HePZakHNR+ii3CBrxbXM+Ic89G7kclPkURR2aodkW3zFf4jo2f8hGvtub/CV +Zdor9Cf00q5Y7Il3XTGRTf1I9n/z7XHYG0cUDn8z+YAe6R++mIBtNROjF9r9 +GT2w6Sk5gd26PCHArBhEk0/s5pKwX/8jEX07cAhRVz/HpWBPr6ZPzNNGkP/L +aPNT2KtPB7loLo6iT+ZKdunYsiJ5ncFNY+j54vsLmdi20t9Kp00mUVxH0Pts +bLJAXlyNdxqVPbJ9fwk7Xml/8rHuGQQtelIF2P0SfbvCKtio2lxn/zVshquf +77nTFGLUmZlVY89e5ii8GTiHBNuJ2DpsXnk1YTZtAYlGPi5uxT7PeGgmLPYN +ZbH4z7djbylzid+5+A35FLg+6MLW3XFyOqDpO/rjIfv2DbaPzufuCZNlNDqn +OTOPPc8M5+bf+gt5ar/uWcZOaBIwVOb9jRJaEqe5t7JQDuhe9+7+g9A6jlEx +bEZJJz2kYhVERUW26GNXdJwb+EeaEyoagzPo2LNf3WOyTnOCK0dYni12jMpC +3Y1ALrg/eiHcC/t8jZzCDI0H6qYt1mZiv+udbP1dzAOnNNJ7LmFvoRpc14qt +hk3s/udl2JVatmfVFleDgXhqSht2+92oVf5NvODeZTo4j73w8OXnMRNBKJNc +1vbdxkKi1oLC0a2CIGggpRqFrdFHByE9IXDR2uibhu03fKtgl/pa0DfquFeN +HcTZrbFHUBgc3JvffMceka9mJ38TAR7bJ7X/247Xh+zi69EUhYiZBa0b2JzX +R+Ukg0VhHxfHqg7sLZqb7StYopBbVxFKYbuaZN58PrAe0oxsHtoqs1CPV0io +xFMxqNVxFRBTYaFPZRlpHrziANcVN+3EnmRVFF8zFYeg8vZwC2z+sKGXBm3i +0CGYyBWPTU9y1PK4JQGl/eP/TmE3XtVZKM+XgstWH/X7VVno6siPCP0wGTCg +L+kMq7GQ+cGUT6FVMlC7GMHPo47z29fvqxqVASEpL5mt2FpXd4htcZGFzXuS +Vvlit3u61/EYbYaFmf4HbGxqZuDvscQtwASkvE6DhdYH0OvrbOSBvuCaEElj +odGr/D52fvIgE0lAEfadD73SUyflYW6oEz3FPmLtlri1TR7cArKXZTRxfaoR +9rk0BdjFaRTYga01UTYbJ6EIDr2cuxS0WcjRW0DNclAJRL80qAvqshCKOEhz ++qUEqekuQwbYKsn5uxlSW+Hxf+19x7A5ijWN4w5shVNN8wHd2FWfDjvdvL8V +niwVRmbq4ft5qPKfjUXbYHNCwIKCAa6PbvN6wlMZwrm8mUwjFip2yH6/GKcM +zxjx7TXYGZ6DA9yXlIH+1cTmKzYjIZwl+1IZEu2fbXBCLCTSnMfhYKICNecf +ResBPj+a0ypNCqq4f7Kcz5iFpOXPxKcN7wC1Dxzhb0xZqPnUvPISpxoYRede +l96H12POpY+UU4MNvoHKHthX2hWVjd3VwPDg4x/j2PLejS++v1EDeWHBeQ5z +3G/liBL5VB0CkjORoSULyUjLkltcNMC3rWznmC0L7SgJE/yJaOCW87eEmAsL +eTISF9RsaeAoe/oAgZ2jcPaTxxEapI3ZPrmFzVVUc6ODSYMl6bfBTq74vl2Z +cDxbS4P0kL7SvMP4Pc3xyFNW0ATxWZ58bXe8v2nW6s6rteDvE1wt57xYqDBE +0e5WtzbUpBvZ8R5nod4ItDupRA+MXv5topjGQnLur2zd/PdAoYigjeh1FiL+ +3K6WiQS4VcFkV3ezkATrzhoJT2O4M6gbAgssFKZp+OGsCh1uPA5PmpGdRJ5T +y53rJ0xB1ULgi63VJKoyDl2T32MGUc9EXlnHT6Kr8373K89bQOaJWPtDdZPo ++17JZ+3xVkDjWmRGzkyijxxc7MGjNqDnZDOzXX0KBW46nvmPwn7IUh6bv3ds +ClX7drZdSLaDZvmPY89rp1DUnNSiqu8BEDIqnZb8NoUWLPcdevyXPbTFNqYI +mUwjvcNZe0cOOED0Nct3HlnT6IVUnl+7piOsLjUtqP8wjTaWJjaXbz8I/Rd4 +Xp7TmEF3BlSsbYUOwcUzNOPahBkk2zfrHTF1CErpzzZV9M4gzQtZlcUDTuC0 +buNJ1w2zKI97Tv3sQ2dIpOuwB/bMott7d75LvusCMg+f9Kgdm0U5u0+JLFe4 +wrnGlCP3smdRz/uSk5qnD4NW0o0jOvdn0S2by4pBCUdgJBD97J+aRewAB45A +hhtMfvXv/y3ORgv7lH2mTdxhWKynucSIjcqn3n4P1fkLSvEBrPJhI+fCEi83 +QQ9Q0mcHtWSwUd1Nq7+4Ujzg9NSl8fjbbKQn/WIpdckDxhtKVX69ZSOFAe93 +//kehbaMoHd8P9loWODY/stDR0FvUp1dv4lCvRm2XmYHPUHmuce+AT0KnWfm +C4T3esJZz67h54co1Nz6Z8nLwgtkvejHrIIotO4IpGg2esEUUXbGMplCWzY8 +7tnU7AUn+Mdi87E1um0kV7d6wYUf0zrz2PaGh6/13/eCy8WKfHkncf6miKex +T7yAp4lTbTKFQhs/Xl/X2e8FMVsMfBNOUUjRXSLnyKIXPg9+fglnKKTnMV2e +rMWAn9sGXT/kUKg0dzbUVocB709Yz8jmUmjDS8pIQpcB9xaUHI5iT5su9pUb +MKDBmCd1BPuqKseqbmMGLASVVLL+R6G1iyIuogcYYFm+3D19mULD6dp8+QEM +yKvLRb0FFDrweHef93EGlOy9USdYSKFWDv18jWAGLN3a/80cOzfUSPtBGAN8 ++NZ+bcO2dTE7OhLNAMO0rvDqIgrdVXS5q3qKAWpThHHCVQplNMX43illAG34 +kN/vMgoF0LL1mOUMiAHHs5rlFLK+VsunW8EA28o/qT7Y/Nmj1xqqGCCZYjH2 +H3ZyiN3E7XoGhGnxehRdo1CMsuKxWw8YMBeit1v/OoX8sp/63/yE+xttcDOt +ppDF2lHDkAEGpBJXgsKwtydzCNG+MKDIMdG+GHs0RLuqdoQBKhOaiRw1FDpq +mz91Y5IBtZ8Ksu9gO/OEBtb8YMCnCON/N9dSyCx0Y1ClOAGzp2PIzjoKPcg/ +aXlWkoB1rd875rENuylF5kYC7B6sndpSj/df6elbE1kC5JzYqUxsqTfRJu+V +CJB5xeZRukUhlv5HcX5tAiQur+IMvU2hM5wFLd4OBCgvzgx/uYP73ymYY3OQ +gFPuktNr7lIo6TAzRNOJgADfXc07sJn1dtv+uBKQayBfFo59lFyVddET16cT +1cDdSCHNLk/Go2ACzIoXWySaKPQmS0lAIZMAkUQXE5EWClUjIZ+xLAKaO8vG +dmAnTc23V50jgCdB2NUcm2bRHqebTUBxh2JhHHYGhxdlc4WA3izOtjHsfccL +3jIrCXC2XthT10ohGZl/dYyqCZjYkVD8FHu+6/g5rhsECGh96xvCLtqKbDLq +CBCuzbm0/h6Ffn382FbcSEBE+rGGIOx6a+ny5514vt+vrXJtFEr7wclzvouA +YadlCx1sz/KJoy7dBJRzt+haYQtzN0oP9xDwWzQqMgzbv8n5zNJrAkKSC1Pa +sRVULkYojhDwl0NVn+t9Cv14E/tyfJQAZH37pj92bzKhUTNGwJ80tyNx2HGD +WhN6kwQovIgTLcR+l/PSbf8cAS+IV3zD2GfXiJhGrSIhslxNweMBfg+oj4fD +uEhYO7LTNwj768eKkEAeEj6MdwQkYBvW0ws8+UgYolXczMce9WD+tBQhQX8j +r+p7bGFrU1HT9SR41YQQ49gGu0WVkRgJ0t0e7ovYmUKVhzSlSBitvJcm+hCP +N36ulZYjwfyUfZ8pNllS2SmmQALkFnPaY2dmRn5ep0RCsonvjBv2KLleiFuZ +hHUlVtzhK+PrzXwmNUhwMEXSBdiNv9fHj9JIcLu4Zk8F9sj4wIUBLRK+sHbL +1GPrt0U97NMlIYX/qeRj7GH/atkWIMFi6sLyOPZa52jtBmMS6haZIhS2nom5 +dS2dBPWOu8NL2BlSXyJLzEkYAbsO3nYK3eGuycy3JMH1WXHfOuyhmeiyXGsS +zD7ZFYpj63aIvUq3I+FHfV24ArZn7RdWij2eX+Idq4ydfrmG84QjCZnBwSY7 +sb+EWGhEOJOQdCiRXx9byF3cLMiVhPGRVAG0kmcx5OZ3hAQjw6Euk5X5m2PT +3D1IUMpKS7JeqYffssjZk4Quu7dxdit5C+J37RkkXHT5e7fjSt7gUI81ScJJ +BaLaaSWv+8boPh9c386iIdeV+hpif4EfCVV86m/cVvKLLDcY+JNwj86b6rGS +ny6hqh1IQn2cxpLnSj5zeO/OIBL83Eu3EdiCjFpn5RBcz3nfDd7Yu/fHHVcI +IyH1beQ9n5V8fauTMhEkXGa/3u6HfVpJMk+CScKD8gS7Y9i3hUfqRKJI6OyL +0PHHHvxZ2yUQQ0Kf4913Kxb8GjfIE0dCuIj5ngBsnRdW3//Ek5C9LO++4v8D +sJsfHw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.8483242180726145, 1.1729558636868995`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.8483242180726164}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7731,7 +13653,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5012481131960849}, + AxesOrigin->{0, 0.8483242180726164}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7759,7 +13682,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.8483242180726145, 1.1729558636868995`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7767,9 +13691,9 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991342629715925*^9}, + CellChangeTimes->{3.991342629715925*^9, 3.994385668258007*^9}, CellLabel-> - "Out[386]=",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] + "Out[139]=",ExpressionUUID->"5942579e-aa3e-4451-9041-df401445fb9f"] }, Open ]], Cell[CellGroupData[{ @@ -7832,156 +13756,160 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991849950722357*^9, - 3.9918499540026855`*^9}},ExpressionUUID->"1ea503b1-33a1-2744-a92d-\ -2e1269faf5ed"], + CellChangeTimes->{{3.991849950722357*^9, 3.9918499540026855`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.03396961278019`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.5626925614208465`*^-268\\\", \ +\\\"1263377636044591724886240423994982400000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.99438566832504*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"8ad16d7c-72ce-448a-97b4-e663a3957ce7"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7597680987062826`*^-280\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 70, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994385668328567*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"ef625543-2ba6-4987-ac54-4cb61560eda0"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.208410172895401`*^-292\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 387, - 405, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299467087`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 71, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.9943856683318987`*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.366286872093514`*^-285\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 387, 406, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629956772*^9}, - CellLabel-> - "During evaluation of \ -In[387]:=",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.843812508005402`*^-296\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 387, 407, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629966284*^9}, - CellLabel-> - "During evaluation of \ -In[387]:=",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], +In[140]:=",ExpressionUUID->"c86ada11-7e2b-45ac-97b1-44cfcf084680"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 387, 408, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299753895`*^9}, +during this calculation.\"", 2, 140, 72, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.9943856683344393`*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], +In[140]:=",ExpressionUUID->"851dfb4f-a116-4761-b63d-4343d9eadb24"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd8XAHAZSrMxj4zv3ecpIYQMz96lSKXBlEqjTGUKESlDZSYhY8Zk +6HnXUClTlIRCGokiRd+SIZlCw+/+/rjrrs9a9561zj5777MVjrub2/Py8PDw +LqAe6j3d2/KYiMozXFymUDRYqWv4OpPmt6krBB4LP4vdkSoBKP78OK0rHnb/ +llNblcoCnz23Ovm6ciE3pa1xMkUHhEcl4mc7yyHlxHHllhQT6KvZ5T7Z+Qhc +JrqbTVL2gTEx9GG88yWsMPrZbZPkCLOdOtd+dH4CzkDnVFGsLzQYFeS9yJ0A +r7ylwg+dwkG6r/LL8XV/wO4jS6v911UQczlya5ERHyaFP3Q/6JkM8erG1bus +BLE8eG9CnlwGvEtZXz8utBxxaaR8xcociMoLfM4rKYwWZ4akUhJvgETi54iE +DFFc/GCbVsjbmxBmaWr4clocxdXpkbXVBeClm3OkJYSGcj/TyjZFFcH27BWT +O6JpWFHZ9uvS1SKgLwoIb79Gw9YDnmGPk4ug47V12atCGqbyL/fbmFcEqh7L ++Hrbabh0dUbWRE0RfM33zf8pJYkLHz2MqRgpAluxXSOrb0vikuyRylM7b8GW +sTl/t89SWKKmnR3w9xb4bUtc+3BYCmeT2Om3+ThA5qh0i05L4dWiqKEvghyg +WR7VrRRcjeZ/hy9tFuXA8P3GGT7V1TiZEZnTxuJAQkicd+rZ1VhyXMxIcw8H +Pokruj1eLo1Tm0+n6mVyQMK9TkZCQhpzj6UVzedyYGezTZuzvDQuFGYsqizg +QIV/1LqVmtL45nNxkVIZByL7fgztt5HGCOkt4T0NHNAoqnYcy5VGo686UVe+ +ciDYYO8xqY0yuI17qENNrRi2Hc78qbNZBguHvwV2ahbDiqDvF612ymBfd12H +/8ZiuN5wOT/uqAyOvP5ldWdTMdzfXvV9YYQMDt3hDv+0KIYfNgyfiXcyONyk +DZm+xXD4zFRk6zlZ/KvDtOBWFwMzebP00GVZ9DPllWqpK6b2f4W7KE4WPfwf +BX9sKAb/32s6NufJ4oc4pQ28rcVw7eJh8cpWWQy64KYo/L4YWq82Zd2UkcNG ++YsWh+aLQY9MvXOhTg61X2pllGhzYUtn+5/RZjnc3JzSyqvHhV08/CZHXsph +OO9SdXM2F+zM3d7BoBz+GatJHTTigvE5hcAgAXkcWtA/2ruHCx5y0zc2Kctj +Vr/E89UnufDYMWukwUcendoYzXWpXDD9rSsScE4erWk1U6nXudAe91p7Q5A8 +lpz6dNgjiwvvKhcH5UXIY6LthwHhm1wYXeotcvm6PBaOvn7CKuUCrXSbjvEj +6v+8RLmsRi64/BoPal6ugF/s7mo8GOGC3mmHVV9EFPC+fq6bxQ8uCA51c/ho +Csh/pmDbwE8u3OxpeGtIV8Cy64+6fs1woffBtXV3tRWwVGLozMgCEnZf1u3K +OaKAz1xblgmIkyD7l+tad0IBvZNrjllKkDDsQ+f74KyAh3JsbbMkSQh3WqpK +81bAzvecLUqyJNTv+HAxNlwB8d7cmACLBA2RYLVzZQp4zoytNK5DAk/U1OOU +Cmo96ZUS87oktPOdPFBRrYCXHRh3eAxIODVlfnm8UQFbjh+c/wsk5HURPY7d +Cuh8Wqe9yYSEVVnNoZZ8dFw7b7QkypqEWWWhXhUrOr7N3aP53oOE6QypYM0D +dPSTviJh7UnC5EomoXuEjiZlfoPPvEgYndA9ucWZjtO8Y8jxIeFTtd30gfN0 +pBu2CeoGkPB0x70V4TfpaMyq9bwaSkJT7cOymFt0rL/duOlpGAmP1VotE0ro +eK1gp8C/cBIeiPanZVbS8cV/BS62USSU9yxh3W2jo69LcMeXKySknToMn6bo +yEgZjNVLISH5g9On/+boqOO57rdGKgmJu70uj/yj41ODNGdWGgmxmuHPfi1m +4Hu3cRP+6ySEzJftWynLwAzh76zYLBICXWvmxBgM3BtZz3HIJiGg70mGlBID +k873aennkODT0POZqcFAG3Opo125VDyjBDwMjBnIyU+gf75JgtOflaKbdzBw +nVndaHo+CQ7uUhUmexhYLhDZtKeAhKMWar/NDzCww0M7lywkwXL1/nBnNwZy +t3JE9Dkk7I2xU3b3YiBbJPLAa8q7/rm2e59loHDllbvOxSRs+xwiFhRC/a92 +vDCcS4IBpzg7KYmBrmNxKcklJPTIc7K2pjOwqlb57OJSEvyTijInsxjo+D1l +wpfyveD86+ZFDJTqKanfXkaC9Uxe+gKSgXmNtaIllCddbqSVljNw4IiDgFA5 +lV822SkrahhopGXd1ET5RVtmcm09tR5jYarsbRI8jDKSXBoZeE+RvsyTMqma +lvi0nYqHgM+7FXdIMMtLSfB7xcBmsdVaNpSHJZPjlboYuDtroVYm5TUCiXGh +/QzcX36VkL9LQrN//BWtLwyMGMgVt6Xs8CMudmCIOq+BD9xEygIOV2ISxhgY +OfR7pIVyXk9M9OZJBs5WVr2dp2y0Nzpq/BcDvfJeOq2toPLvSWRk9h8GVofx +3LSiHGwQEbGbl8BXbTzR5ynLl4eF/11IYK5LnGwu5TpWaBh3KYHpgy6HGigf +zrgUaitEoM9WS9N+yr9FLl5eKk5gO0Pg8zzl9PDgS1WSBL7LNVQWvUeC3t/A +i86yBNLc6+ksyl1eF0JoDAJ/Ptj+VIey77eA4CYWgQHmmfStlFcdORfks47A +xV4B63ZTvvvaL5CpTuCXn/lfrShbbj974bUWgUtUPu7bT3mizuf8RT0Ca/i/ ++//f8VpnAjSAQM3BSHNryuocr3P9RgQee3ix7//rdch7+sdtI/CiaBrdmLJb +kocfmBH45n28tC7l5cvcz47uJXDTTc12JcrFwa6+GdYECp/bvFGc8vaZUz47 +DxIY+vPywb/Ufr+5nDwzf4TAFGbjxgHK4Z+cvG+dIPD67aaOJ5RZNo5e+50J +/FxvReRTftJm7ynoRmDwtM6GEMr8lcc9HHwJ3CsmG72e8g3VY+7iAQSKfL77 +hpfy5rwjbo+DCMzMb+l9QZ1n4BVbF3okgd0B8RoOlGUFDp56EUvgidi+C8qU +a/z3nwxKILDsalfMCJVPc/bWTr3XCbTk4Z9xpJzaY+kYk0Og2NmX5vKUN+61 +cDDIJ7Bj9pL3GypffQz2nEgrIdCq6tUybcrjItuPWj8iMPDs54IOqh66XOgd +J5sIrHeW+s+Bcv2TOQhsJbAq0fj4LFVPcf4cucK3VHxL7wqJUl7/aVnf7BCB +1ueSTkmSJNAMBnet+EFg47hk4VWqXnmSah/QpwjkMRdZs5Dyc1O3zB3/qHy0 +Jn9/purdrez5oQxRJqYs7xD0KqLqc2lhWxmNiX8aNcLaqH5haB/EfiLDxOLI +O+YE5eWS6jJjLCaacXzePKH6TXFQ/Hs0YOKwW0Nh3w0ShnZbHRw4wcSTCxcF +Hssg4WWRyrNfzky02ECzDKb6XxXfQv3l7kwsH5UIz0gnIeJehZS2HxNvNboI +P6P6p5IcrTssholeB8xb5q6R4DjabaNcwUSBLP3n3BiqP2273QzVTJxoTpNO +jCZBOzdqo2U9ExecsOrxofr1QmsD2vmnTKT1RZepR5CQX5vR2d7LRNdPk/0B +l0gYiD5q7blIEZs/Ctqe9Kf2P7SOvn6ZIpZaRY2q+pEwYzI7MiKkiArammd/ ++JKwhC/+srOUIrpIffQ+eYaKt1/DnaMqijjbAGp61P103l5RdLeFIvp+/3XZ +1J6qL8Ph58pZipiTbF+nakZCdvr99G83FPEPbZpI3EH1n9lLjgWFiijg/jZn +2pTqp3dk/tHLFXH01s3BcmMS7NbuVpVqVMQJB5dyQSShdFV5tOB36nsBfdO1 +GiSYjvmaDmqz8Ezc0YadYiRIq8uGChqwkL3Sf6mKCHUfej5+pLyJhcnRL4WW +CFH30bSQgecOFuap37OpWkpC758i1X9HWJh9KZ9vkpcEz2XvRSUjWBijZTTX +Ss0XaWuwd2cPC+O2pirIPaXmkVNfpDw+sjCgTbwutYkLwI3elzDIwhFFC2Nh +al4ZWP+u490YC3V4qiVm6rigutGzwYFfCfkb/45k3OVCg3FeYZCKEo5fCC7Y +n82FYTtBrzuBSrjahf9Aghc1D2Vuqa27pISHc/eeq/bgwti7oEXPIpQwVUXz ++UdXLvzcPZven6CELtUbxRhOXJjRH3q8olAJU87y6YXacoFXrHWVc4cSrjFR +Um7ewgXJx1eqZBTW4H8DlfZbRKl5jpDgDXu0BqvdP6x0LSwGkTbF2NKxtahR +npJ0tIkD0uEle7S116HG70DZDeW3IEVZV0jUUQVHn7vvdr9WBE+lNmlNXFVF +xnzj8dKThaAn/ShO7a0a1li3TvSLF8AKvlzvYyHrcfydotuL1psgGyxnsF9R +HfXEvzWvOpYHi5m2FeZN6jjoMB/sMZsLqmzJEt9DGhg9ajzpzskBz16Rhu08 +mujUlWXsYZwNYxPRVqYpmvg2+utaPt5MMFF7kmaqsgFTImQ3WCanw4MJ/fmZ +9g3Y4s7LJySSCm7rNLpf2GthZAt/f9urJGCPnni9f7E2nh8SC/AKTYStBM1s +ea427jrw9pV6cDwoBUWefaSjg3WOXQF6+XGw1l63jtmtg1lbhyL2XIkB+wdO +l+6c3oiJPvmzg9aRUJf9+sS4uC5GlLkwSEYYTBb+m1G7p4syjGubkrddAjsm +Z3GamR52yCyuLfoQDONrE7TLf+jhoY4eOXeeQLifN98/Fa6Pv0P5799ecg4O +bGGgvqwByhsWxxZe8YXVrmGVqvUGKOvXe4q+wRvEl7iUme1j4573K+NU3E9D +ntF5/x/72TghySyPszsNGudjjRJs2dhR2G44t+807PpR+qbrGBuVrL7GfMTT +EPp2atbOhY1+B4NrZ0VOw6/cwM3+wWwUS1bSsr3vAd36Ca/yOWw8+9NasWOR +BzidybtuSrLRpsr72sysO0yTd+2HS9noLJEvdnDAHUToXTPqFWw0zI/KNa50 +hx2CMtK19WwMmDb3LLFzh5rX+SdevWFjTt9YfEOVG2xfcV/Fp4uNwS8NJ3pu +ukGXScs0rYeNUQ1sfZ6rbjBZ9T388Ec27pgj3Vwc3UAlZz332xAbeT5s6H4p +5gY13Zt8okfYaKD0dtSUh1pPzALUfrBRL/x3Q+t3V3AIO/PCe4qNZa/Mrk89 +coXJ+tA0iV9sbOy+cy2ddIWQuWS7qjk2uqyXNDBLcwWhDUXrDv1ho9yhtMgl +oa6Q6Vo19e8fG7+E2AS8Ou0K/wNSU3P8 "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7995,115 +13923,115 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nk0Vd8XAHAZSrMxj4zv3ecpIYQMz96lSKXBlEqjTGUKESlDZSYhY8Zk +6HnXUClTlIRCGokiRd+SIZlCw+/+/rjrrs9a9561zj5777MVjrub2/Py8PDw +LqAe6j3d2/KYiMozXFymUDRYqWv4OpPmt6krBB4LP4vdkSoBKP78OK0rHnb/ +llNblcoCnz23Ovm6ciE3pa1xMkUHhEcl4mc7yyHlxHHllhQT6KvZ5T7Z+Qhc +JrqbTVL2gTEx9GG88yWsMPrZbZPkCLOdOtd+dH4CzkDnVFGsLzQYFeS9yJ0A +r7ylwg+dwkG6r/LL8XV/wO4jS6v911UQczlya5ERHyaFP3Q/6JkM8erG1bus +BLE8eG9CnlwGvEtZXz8utBxxaaR8xcociMoLfM4rKYwWZ4akUhJvgETi54iE +DFFc/GCbVsjbmxBmaWr4clocxdXpkbXVBeClm3OkJYSGcj/TyjZFFcH27BWT +O6JpWFHZ9uvS1SKgLwoIb79Gw9YDnmGPk4ug47V12atCGqbyL/fbmFcEqh7L ++Hrbabh0dUbWRE0RfM33zf8pJYkLHz2MqRgpAluxXSOrb0vikuyRylM7b8GW +sTl/t89SWKKmnR3w9xb4bUtc+3BYCmeT2Om3+ThA5qh0i05L4dWiqKEvghyg +WR7VrRRcjeZ/hy9tFuXA8P3GGT7V1TiZEZnTxuJAQkicd+rZ1VhyXMxIcw8H +Pokruj1eLo1Tm0+n6mVyQMK9TkZCQhpzj6UVzedyYGezTZuzvDQuFGYsqizg +QIV/1LqVmtL45nNxkVIZByL7fgztt5HGCOkt4T0NHNAoqnYcy5VGo686UVe+ +ciDYYO8xqY0yuI17qENNrRi2Hc78qbNZBguHvwV2ahbDiqDvF612ymBfd12H +/8ZiuN5wOT/uqAyOvP5ldWdTMdzfXvV9YYQMDt3hDv+0KIYfNgyfiXcyONyk +DZm+xXD4zFRk6zlZ/KvDtOBWFwMzebP00GVZ9DPllWqpK6b2f4W7KE4WPfwf +BX9sKAb/32s6NufJ4oc4pQ28rcVw7eJh8cpWWQy64KYo/L4YWq82Zd2UkcNG ++YsWh+aLQY9MvXOhTg61X2pllGhzYUtn+5/RZjnc3JzSyqvHhV08/CZHXsph +OO9SdXM2F+zM3d7BoBz+GatJHTTigvE5hcAgAXkcWtA/2ruHCx5y0zc2Kctj +Vr/E89UnufDYMWukwUcendoYzXWpXDD9rSsScE4erWk1U6nXudAe91p7Q5A8 +lpz6dNgjiwvvKhcH5UXIY6LthwHhm1wYXeotcvm6PBaOvn7CKuUCrXSbjvEj +6v+8RLmsRi64/BoPal6ugF/s7mo8GOGC3mmHVV9EFPC+fq6bxQ8uCA51c/ho +Csh/pmDbwE8u3OxpeGtIV8Cy64+6fs1woffBtXV3tRWwVGLozMgCEnZf1u3K +OaKAz1xblgmIkyD7l+tad0IBvZNrjllKkDDsQ+f74KyAh3JsbbMkSQh3WqpK +81bAzvecLUqyJNTv+HAxNlwB8d7cmACLBA2RYLVzZQp4zoytNK5DAk/U1OOU +Cmo96ZUS87oktPOdPFBRrYCXHRh3eAxIODVlfnm8UQFbjh+c/wsk5HURPY7d +Cuh8Wqe9yYSEVVnNoZZ8dFw7b7QkypqEWWWhXhUrOr7N3aP53oOE6QypYM0D +dPSTviJh7UnC5EomoXuEjiZlfoPPvEgYndA9ucWZjtO8Y8jxIeFTtd30gfN0 +pBu2CeoGkPB0x70V4TfpaMyq9bwaSkJT7cOymFt0rL/duOlpGAmP1VotE0ro +eK1gp8C/cBIeiPanZVbS8cV/BS62USSU9yxh3W2jo69LcMeXKySknToMn6bo +yEgZjNVLISH5g9On/+boqOO57rdGKgmJu70uj/yj41ODNGdWGgmxmuHPfi1m +4Hu3cRP+6ySEzJftWynLwAzh76zYLBICXWvmxBgM3BtZz3HIJiGg70mGlBID +k873aennkODT0POZqcFAG3Opo125VDyjBDwMjBnIyU+gf75JgtOflaKbdzBw +nVndaHo+CQ7uUhUmexhYLhDZtKeAhKMWar/NDzCww0M7lywkwXL1/nBnNwZy +t3JE9Dkk7I2xU3b3YiBbJPLAa8q7/rm2e59loHDllbvOxSRs+xwiFhRC/a92 +vDCcS4IBpzg7KYmBrmNxKcklJPTIc7K2pjOwqlb57OJSEvyTijInsxjo+D1l +wpfyveD86+ZFDJTqKanfXkaC9Uxe+gKSgXmNtaIllCddbqSVljNw4IiDgFA5 +lV822SkrahhopGXd1ET5RVtmcm09tR5jYarsbRI8jDKSXBoZeE+RvsyTMqma +lvi0nYqHgM+7FXdIMMtLSfB7xcBmsdVaNpSHJZPjlboYuDtroVYm5TUCiXGh +/QzcX36VkL9LQrN//BWtLwyMGMgVt6Xs8CMudmCIOq+BD9xEygIOV2ISxhgY +OfR7pIVyXk9M9OZJBs5WVr2dp2y0Nzpq/BcDvfJeOq2toPLvSWRk9h8GVofx +3LSiHGwQEbGbl8BXbTzR5ynLl4eF/11IYK5LnGwu5TpWaBh3KYHpgy6HGigf +zrgUaitEoM9WS9N+yr9FLl5eKk5gO0Pg8zzl9PDgS1WSBL7LNVQWvUeC3t/A +i86yBNLc6+ksyl1eF0JoDAJ/Ptj+VIey77eA4CYWgQHmmfStlFcdORfks47A +xV4B63ZTvvvaL5CpTuCXn/lfrShbbj974bUWgUtUPu7bT3mizuf8RT0Ca/i/ ++//f8VpnAjSAQM3BSHNryuocr3P9RgQee3ix7//rdch7+sdtI/CiaBrdmLJb +kocfmBH45n28tC7l5cvcz47uJXDTTc12JcrFwa6+GdYECp/bvFGc8vaZUz47 +DxIY+vPywb/Ufr+5nDwzf4TAFGbjxgHK4Z+cvG+dIPD67aaOJ5RZNo5e+50J +/FxvReRTftJm7ynoRmDwtM6GEMr8lcc9HHwJ3CsmG72e8g3VY+7iAQSKfL77 +hpfy5rwjbo+DCMzMb+l9QZ1n4BVbF3okgd0B8RoOlGUFDp56EUvgidi+C8qU +a/z3nwxKILDsalfMCJVPc/bWTr3XCbTk4Z9xpJzaY+kYk0Og2NmX5vKUN+61 +cDDIJ7Bj9pL3GypffQz2nEgrIdCq6tUybcrjItuPWj8iMPDs54IOqh66XOgd +J5sIrHeW+s+Bcv2TOQhsJbAq0fj4LFVPcf4cucK3VHxL7wqJUl7/aVnf7BCB +1ueSTkmSJNAMBnet+EFg47hk4VWqXnmSah/QpwjkMRdZs5Dyc1O3zB3/qHy0 +Jn9/purdrez5oQxRJqYs7xD0KqLqc2lhWxmNiX8aNcLaqH5haB/EfiLDxOLI +O+YE5eWS6jJjLCaacXzePKH6TXFQ/Hs0YOKwW0Nh3w0ShnZbHRw4wcSTCxcF +Hssg4WWRyrNfzky02ECzDKb6XxXfQv3l7kwsH5UIz0gnIeJehZS2HxNvNboI +P6P6p5IcrTssholeB8xb5q6R4DjabaNcwUSBLP3n3BiqP2273QzVTJxoTpNO +jCZBOzdqo2U9ExecsOrxofr1QmsD2vmnTKT1RZepR5CQX5vR2d7LRNdPk/0B +l0gYiD5q7blIEZs/Ctqe9Kf2P7SOvn6ZIpZaRY2q+pEwYzI7MiKkiArammd/ ++JKwhC/+srOUIrpIffQ+eYaKt1/DnaMqijjbAGp61P103l5RdLeFIvp+/3XZ +1J6qL8Ph58pZipiTbF+nakZCdvr99G83FPEPbZpI3EH1n9lLjgWFiijg/jZn +2pTqp3dk/tHLFXH01s3BcmMS7NbuVpVqVMQJB5dyQSShdFV5tOB36nsBfdO1 +GiSYjvmaDmqz8Ezc0YadYiRIq8uGChqwkL3Sf6mKCHUfej5+pLyJhcnRL4WW +CFH30bSQgecOFuap37OpWkpC758i1X9HWJh9KZ9vkpcEz2XvRSUjWBijZTTX +Ss0XaWuwd2cPC+O2pirIPaXmkVNfpDw+sjCgTbwutYkLwI3elzDIwhFFC2Nh +al4ZWP+u490YC3V4qiVm6rigutGzwYFfCfkb/45k3OVCg3FeYZCKEo5fCC7Y +n82FYTtBrzuBSrjahf9Aghc1D2Vuqa27pISHc/eeq/bgwti7oEXPIpQwVUXz ++UdXLvzcPZven6CELtUbxRhOXJjRH3q8olAJU87y6YXacoFXrHWVc4cSrjFR +Um7ewgXJx1eqZBTW4H8DlfZbRKl5jpDgDXu0BqvdP6x0LSwGkTbF2NKxtahR +npJ0tIkD0uEle7S116HG70DZDeW3IEVZV0jUUQVHn7vvdr9WBE+lNmlNXFVF +xnzj8dKThaAn/ShO7a0a1li3TvSLF8AKvlzvYyHrcfydotuL1psgGyxnsF9R +HfXEvzWvOpYHi5m2FeZN6jjoMB/sMZsLqmzJEt9DGhg9ajzpzskBz16Rhu08 +mujUlWXsYZwNYxPRVqYpmvg2+utaPt5MMFF7kmaqsgFTImQ3WCanw4MJ/fmZ +9g3Y4s7LJySSCm7rNLpf2GthZAt/f9urJGCPnni9f7E2nh8SC/AKTYStBM1s +ea427jrw9pV6cDwoBUWefaSjg3WOXQF6+XGw1l63jtmtg1lbhyL2XIkB+wdO +l+6c3oiJPvmzg9aRUJf9+sS4uC5GlLkwSEYYTBb+m1G7p4syjGubkrddAjsm +Z3GamR52yCyuLfoQDONrE7TLf+jhoY4eOXeeQLifN98/Fa6Pv0P5799ecg4O +bGGgvqwByhsWxxZe8YXVrmGVqvUGKOvXe4q+wRvEl7iUme1j4573K+NU3E9D +ntF5/x/72TghySyPszsNGudjjRJs2dhR2G44t+807PpR+qbrGBuVrL7GfMTT +EPp2atbOhY1+B4NrZ0VOw6/cwM3+wWwUS1bSsr3vAd36Ca/yOWw8+9NasWOR +BzidybtuSrLRpsr72sysO0yTd+2HS9noLJEvdnDAHUToXTPqFWw0zI/KNa50 +hx2CMtK19WwMmDb3LLFzh5rX+SdevWFjTt9YfEOVG2xfcV/Fp4uNwS8NJ3pu +ukGXScs0rYeNUQ1sfZ6rbjBZ9T388Ec27pgj3Vwc3UAlZz332xAbeT5s6H4p +5gY13Zt8okfYaKD0dtSUh1pPzALUfrBRL/x3Q+t3V3AIO/PCe4qNZa/Mrk89 +coXJ+tA0iV9sbOy+cy2ddIWQuWS7qjk2uqyXNDBLcwWhDUXrDv1ho9yhtMgl +oa6Q6Vo19e8fG7+E2AS8Ou0K/wNSU3P8 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.059992595915454555`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8115,19 +14043,19 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.059992595915454555`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8141,114 +14069,114 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nk0Vd8XAHAZSrMxj4zv3ecpIYQMz96lSKXBlEqjTGUKESlDZSYhY8Zk +6HnXUClTlIRCGokiRd+SIZlCw+/+/rjrrs9a9561zj5777MVjrub2/Py8PDw +LqAe6j3d2/KYiMozXFymUDRYqWv4OpPmt6krBB4LP4vdkSoBKP78OK0rHnb/ +llNblcoCnz23Ovm6ciE3pa1xMkUHhEcl4mc7yyHlxHHllhQT6KvZ5T7Z+Qhc +JrqbTVL2gTEx9GG88yWsMPrZbZPkCLOdOtd+dH4CzkDnVFGsLzQYFeS9yJ0A +r7ylwg+dwkG6r/LL8XV/wO4jS6v911UQczlya5ERHyaFP3Q/6JkM8erG1bus +BLE8eG9CnlwGvEtZXz8utBxxaaR8xcociMoLfM4rKYwWZ4akUhJvgETi54iE +DFFc/GCbVsjbmxBmaWr4clocxdXpkbXVBeClm3OkJYSGcj/TyjZFFcH27BWT +O6JpWFHZ9uvS1SKgLwoIb79Gw9YDnmGPk4ug47V12atCGqbyL/fbmFcEqh7L ++Hrbabh0dUbWRE0RfM33zf8pJYkLHz2MqRgpAluxXSOrb0vikuyRylM7b8GW +sTl/t89SWKKmnR3w9xb4bUtc+3BYCmeT2Om3+ThA5qh0i05L4dWiqKEvghyg +WR7VrRRcjeZ/hy9tFuXA8P3GGT7V1TiZEZnTxuJAQkicd+rZ1VhyXMxIcw8H +Pokruj1eLo1Tm0+n6mVyQMK9TkZCQhpzj6UVzedyYGezTZuzvDQuFGYsqizg +QIV/1LqVmtL45nNxkVIZByL7fgztt5HGCOkt4T0NHNAoqnYcy5VGo686UVe+ +ciDYYO8xqY0yuI17qENNrRi2Hc78qbNZBguHvwV2ahbDiqDvF612ymBfd12H +/8ZiuN5wOT/uqAyOvP5ldWdTMdzfXvV9YYQMDt3hDv+0KIYfNgyfiXcyONyk +DZm+xXD4zFRk6zlZ/KvDtOBWFwMzebP00GVZ9DPllWqpK6b2f4W7KE4WPfwf +BX9sKAb/32s6NufJ4oc4pQ28rcVw7eJh8cpWWQy64KYo/L4YWq82Zd2UkcNG ++YsWh+aLQY9MvXOhTg61X2pllGhzYUtn+5/RZjnc3JzSyqvHhV08/CZHXsph +OO9SdXM2F+zM3d7BoBz+GatJHTTigvE5hcAgAXkcWtA/2ruHCx5y0zc2Kctj +Vr/E89UnufDYMWukwUcendoYzXWpXDD9rSsScE4erWk1U6nXudAe91p7Q5A8 +lpz6dNgjiwvvKhcH5UXIY6LthwHhm1wYXeotcvm6PBaOvn7CKuUCrXSbjvEj +6v+8RLmsRi64/BoPal6ugF/s7mo8GOGC3mmHVV9EFPC+fq6bxQ8uCA51c/ho +Csh/pmDbwE8u3OxpeGtIV8Cy64+6fs1woffBtXV3tRWwVGLozMgCEnZf1u3K +OaKAz1xblgmIkyD7l+tad0IBvZNrjllKkDDsQ+f74KyAh3JsbbMkSQh3WqpK +81bAzvecLUqyJNTv+HAxNlwB8d7cmACLBA2RYLVzZQp4zoytNK5DAk/U1OOU +Cmo96ZUS87oktPOdPFBRrYCXHRh3eAxIODVlfnm8UQFbjh+c/wsk5HURPY7d +Cuh8Wqe9yYSEVVnNoZZ8dFw7b7QkypqEWWWhXhUrOr7N3aP53oOE6QypYM0D +dPSTviJh7UnC5EomoXuEjiZlfoPPvEgYndA9ucWZjtO8Y8jxIeFTtd30gfN0 +pBu2CeoGkPB0x70V4TfpaMyq9bwaSkJT7cOymFt0rL/duOlpGAmP1VotE0ro +eK1gp8C/cBIeiPanZVbS8cV/BS62USSU9yxh3W2jo69LcMeXKySknToMn6bo +yEgZjNVLISH5g9On/+boqOO57rdGKgmJu70uj/yj41ODNGdWGgmxmuHPfi1m +4Hu3cRP+6ySEzJftWynLwAzh76zYLBICXWvmxBgM3BtZz3HIJiGg70mGlBID +k873aennkODT0POZqcFAG3Opo125VDyjBDwMjBnIyU+gf75JgtOflaKbdzBw +nVndaHo+CQ7uUhUmexhYLhDZtKeAhKMWar/NDzCww0M7lywkwXL1/nBnNwZy +t3JE9Dkk7I2xU3b3YiBbJPLAa8q7/rm2e59loHDllbvOxSRs+xwiFhRC/a92 +vDCcS4IBpzg7KYmBrmNxKcklJPTIc7K2pjOwqlb57OJSEvyTijInsxjo+D1l +wpfyveD86+ZFDJTqKanfXkaC9Uxe+gKSgXmNtaIllCddbqSVljNw4IiDgFA5 +lV822SkrahhopGXd1ET5RVtmcm09tR5jYarsbRI8jDKSXBoZeE+RvsyTMqma +lvi0nYqHgM+7FXdIMMtLSfB7xcBmsdVaNpSHJZPjlboYuDtroVYm5TUCiXGh +/QzcX36VkL9LQrN//BWtLwyMGMgVt6Xs8CMudmCIOq+BD9xEygIOV2ISxhgY +OfR7pIVyXk9M9OZJBs5WVr2dp2y0Nzpq/BcDvfJeOq2toPLvSWRk9h8GVofx +3LSiHGwQEbGbl8BXbTzR5ynLl4eF/11IYK5LnGwu5TpWaBh3KYHpgy6HGigf +zrgUaitEoM9WS9N+yr9FLl5eKk5gO0Pg8zzl9PDgS1WSBL7LNVQWvUeC3t/A +i86yBNLc6+ksyl1eF0JoDAJ/Ptj+VIey77eA4CYWgQHmmfStlFcdORfks47A +xV4B63ZTvvvaL5CpTuCXn/lfrShbbj974bUWgUtUPu7bT3mizuf8RT0Ca/i/ ++//f8VpnAjSAQM3BSHNryuocr3P9RgQee3ix7//rdch7+sdtI/CiaBrdmLJb +kocfmBH45n28tC7l5cvcz47uJXDTTc12JcrFwa6+GdYECp/bvFGc8vaZUz47 +DxIY+vPywb/Ufr+5nDwzf4TAFGbjxgHK4Z+cvG+dIPD67aaOJ5RZNo5e+50J +/FxvReRTftJm7ynoRmDwtM6GEMr8lcc9HHwJ3CsmG72e8g3VY+7iAQSKfL77 +hpfy5rwjbo+DCMzMb+l9QZ1n4BVbF3okgd0B8RoOlGUFDp56EUvgidi+C8qU +a/z3nwxKILDsalfMCJVPc/bWTr3XCbTk4Z9xpJzaY+kYk0Og2NmX5vKUN+61 +cDDIJ7Bj9pL3GypffQz2nEgrIdCq6tUybcrjItuPWj8iMPDs54IOqh66XOgd +J5sIrHeW+s+Bcv2TOQhsJbAq0fj4LFVPcf4cucK3VHxL7wqJUl7/aVnf7BCB +1ueSTkmSJNAMBnet+EFg47hk4VWqXnmSah/QpwjkMRdZs5Dyc1O3zB3/qHy0 +Jn9/purdrez5oQxRJqYs7xD0KqLqc2lhWxmNiX8aNcLaqH5haB/EfiLDxOLI +O+YE5eWS6jJjLCaacXzePKH6TXFQ/Hs0YOKwW0Nh3w0ShnZbHRw4wcSTCxcF +Hssg4WWRyrNfzky02ECzDKb6XxXfQv3l7kwsH5UIz0gnIeJehZS2HxNvNboI +P6P6p5IcrTssholeB8xb5q6R4DjabaNcwUSBLP3n3BiqP2273QzVTJxoTpNO +jCZBOzdqo2U9ExecsOrxofr1QmsD2vmnTKT1RZepR5CQX5vR2d7LRNdPk/0B +l0gYiD5q7blIEZs/Ctqe9Kf2P7SOvn6ZIpZaRY2q+pEwYzI7MiKkiArammd/ ++JKwhC/+srOUIrpIffQ+eYaKt1/DnaMqijjbAGp61P103l5RdLeFIvp+/3XZ +1J6qL8Ph58pZipiTbF+nakZCdvr99G83FPEPbZpI3EH1n9lLjgWFiijg/jZn +2pTqp3dk/tHLFXH01s3BcmMS7NbuVpVqVMQJB5dyQSShdFV5tOB36nsBfdO1 +GiSYjvmaDmqz8Ezc0YadYiRIq8uGChqwkL3Sf6mKCHUfej5+pLyJhcnRL4WW +CFH30bSQgecOFuap37OpWkpC758i1X9HWJh9KZ9vkpcEz2XvRSUjWBijZTTX +Ss0XaWuwd2cPC+O2pirIPaXmkVNfpDw+sjCgTbwutYkLwI3elzDIwhFFC2Nh +al4ZWP+u490YC3V4qiVm6rigutGzwYFfCfkb/45k3OVCg3FeYZCKEo5fCC7Y +n82FYTtBrzuBSrjahf9Aghc1D2Vuqa27pISHc/eeq/bgwti7oEXPIpQwVUXz ++UdXLvzcPZven6CELtUbxRhOXJjRH3q8olAJU87y6YXacoFXrHWVc4cSrjFR +Um7ewgXJx1eqZBTW4H8DlfZbRKl5jpDgDXu0BqvdP6x0LSwGkTbF2NKxtahR +npJ0tIkD0uEle7S116HG70DZDeW3IEVZV0jUUQVHn7vvdr9WBE+lNmlNXFVF +xnzj8dKThaAn/ShO7a0a1li3TvSLF8AKvlzvYyHrcfydotuL1psgGyxnsF9R +HfXEvzWvOpYHi5m2FeZN6jjoMB/sMZsLqmzJEt9DGhg9ajzpzskBz16Rhu08 +mujUlWXsYZwNYxPRVqYpmvg2+utaPt5MMFF7kmaqsgFTImQ3WCanw4MJ/fmZ +9g3Y4s7LJySSCm7rNLpf2GthZAt/f9urJGCPnni9f7E2nh8SC/AKTYStBM1s +ea427jrw9pV6cDwoBUWefaSjg3WOXQF6+XGw1l63jtmtg1lbhyL2XIkB+wdO +l+6c3oiJPvmzg9aRUJf9+sS4uC5GlLkwSEYYTBb+m1G7p4syjGubkrddAjsm +Z3GamR52yCyuLfoQDONrE7TLf+jhoY4eOXeeQLifN98/Fa6Pv0P5799ecg4O +bGGgvqwByhsWxxZe8YXVrmGVqvUGKOvXe4q+wRvEl7iUme1j4573K+NU3E9D +ntF5/x/72TghySyPszsNGudjjRJs2dhR2G44t+807PpR+qbrGBuVrL7GfMTT +EPp2atbOhY1+B4NrZ0VOw6/cwM3+wWwUS1bSsr3vAd36Ca/yOWw8+9NasWOR +BzidybtuSrLRpsr72sysO0yTd+2HS9noLJEvdnDAHUToXTPqFWw0zI/KNa50 +hx2CMtK19WwMmDb3LLFzh5rX+SdevWFjTt9YfEOVG2xfcV/Fp4uNwS8NJ3pu +ukGXScs0rYeNUQ1sfZ6rbjBZ9T388Ec27pgj3Vwc3UAlZz332xAbeT5s6H4p +5gY13Zt8okfYaKD0dtSUh1pPzALUfrBRL/x3Q+t3V3AIO/PCe4qNZa/Mrk89 +coXJ+tA0iV9sbOy+cy2ddIWQuWS7qjk2uqyXNDBLcwWhDUXrDv1ho9yhtMgl +oa6Q6Vo19e8fG7+E2AS8Ou0K/wNSU3P8 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.059992595915454555`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8259,6 +14187,7 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8286,7 +14215,8 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12141098789525176`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.059992595915454555`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8294,17 +14224,565 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913429049348164`*^9}, + CellChangeTimes->{3.9913429049348164`*^9, 3.9943858150139112`*^9}, CellLabel-> - "Out[387]=",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] + "Out[140]=",ExpressionUUID->"2081fab6-70fa-45f9-8e1c-9873aed317f7"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"b530b35f-2a32-0145-82a7-\ -25a7a01bdd8f"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd8XAHAZSrMxj4zv3ecpIYQMz96lSKXBlEqjTGUKESlDZSYhY8Zk +6HnXUClTlIRCGokiRd+SIZlCw+/+/rjrrs9a9561zj5777MVjrub2/Py8PDw +LqAe6j3d2/KYiMozXFymUDRYqWv4OpPmt6krBB4LP4vdkSoBKP78OK0rHnb/ +llNblcoCnz23Ovm6ciE3pa1xMkUHhEcl4mc7yyHlxHHllhQT6KvZ5T7Z+Qhc +JrqbTVL2gTEx9GG88yWsMPrZbZPkCLOdOtd+dH4CzkDnVFGsLzQYFeS9yJ0A +r7ylwg+dwkG6r/LL8XV/wO4jS6v911UQczlya5ERHyaFP3Q/6JkM8erG1bus +BLE8eG9CnlwGvEtZXz8utBxxaaR8xcociMoLfM4rKYwWZ4akUhJvgETi54iE +DFFc/GCbVsjbmxBmaWr4clocxdXpkbXVBeClm3OkJYSGcj/TyjZFFcH27BWT +O6JpWFHZ9uvS1SKgLwoIb79Gw9YDnmGPk4ug47V12atCGqbyL/fbmFcEqh7L ++Hrbabh0dUbWRE0RfM33zf8pJYkLHz2MqRgpAluxXSOrb0vikuyRylM7b8GW +sTl/t89SWKKmnR3w9xb4bUtc+3BYCmeT2Om3+ThA5qh0i05L4dWiqKEvghyg +WR7VrRRcjeZ/hy9tFuXA8P3GGT7V1TiZEZnTxuJAQkicd+rZ1VhyXMxIcw8H +Pokruj1eLo1Tm0+n6mVyQMK9TkZCQhpzj6UVzedyYGezTZuzvDQuFGYsqizg +QIV/1LqVmtL45nNxkVIZByL7fgztt5HGCOkt4T0NHNAoqnYcy5VGo686UVe+ +ciDYYO8xqY0yuI17qENNrRi2Hc78qbNZBguHvwV2ahbDiqDvF612ymBfd12H +/8ZiuN5wOT/uqAyOvP5ldWdTMdzfXvV9YYQMDt3hDv+0KIYfNgyfiXcyONyk +DZm+xXD4zFRk6zlZ/KvDtOBWFwMzebP00GVZ9DPllWqpK6b2f4W7KE4WPfwf +BX9sKAb/32s6NufJ4oc4pQ28rcVw7eJh8cpWWQy64KYo/L4YWq82Zd2UkcNG ++YsWh+aLQY9MvXOhTg61X2pllGhzYUtn+5/RZjnc3JzSyqvHhV08/CZHXsph +OO9SdXM2F+zM3d7BoBz+GatJHTTigvE5hcAgAXkcWtA/2ruHCx5y0zc2Kctj +Vr/E89UnufDYMWukwUcendoYzXWpXDD9rSsScE4erWk1U6nXudAe91p7Q5A8 +lpz6dNgjiwvvKhcH5UXIY6LthwHhm1wYXeotcvm6PBaOvn7CKuUCrXSbjvEj +6v+8RLmsRi64/BoPal6ugF/s7mo8GOGC3mmHVV9EFPC+fq6bxQ8uCA51c/ho +Csh/pmDbwE8u3OxpeGtIV8Cy64+6fs1woffBtXV3tRWwVGLozMgCEnZf1u3K +OaKAz1xblgmIkyD7l+tad0IBvZNrjllKkDDsQ+f74KyAh3JsbbMkSQh3WqpK +81bAzvecLUqyJNTv+HAxNlwB8d7cmACLBA2RYLVzZQp4zoytNK5DAk/U1OOU +Cmo96ZUS87oktPOdPFBRrYCXHRh3eAxIODVlfnm8UQFbjh+c/wsk5HURPY7d +Cuh8Wqe9yYSEVVnNoZZ8dFw7b7QkypqEWWWhXhUrOr7N3aP53oOE6QypYM0D +dPSTviJh7UnC5EomoXuEjiZlfoPPvEgYndA9ucWZjtO8Y8jxIeFTtd30gfN0 +pBu2CeoGkPB0x70V4TfpaMyq9bwaSkJT7cOymFt0rL/duOlpGAmP1VotE0ro +eK1gp8C/cBIeiPanZVbS8cV/BS62USSU9yxh3W2jo69LcMeXKySknToMn6bo +yEgZjNVLISH5g9On/+boqOO57rdGKgmJu70uj/yj41ODNGdWGgmxmuHPfi1m +4Hu3cRP+6ySEzJftWynLwAzh76zYLBICXWvmxBgM3BtZz3HIJiGg70mGlBID +k873aennkODT0POZqcFAG3Opo125VDyjBDwMjBnIyU+gf75JgtOflaKbdzBw +nVndaHo+CQ7uUhUmexhYLhDZtKeAhKMWar/NDzCww0M7lywkwXL1/nBnNwZy +t3JE9Dkk7I2xU3b3YiBbJPLAa8q7/rm2e59loHDllbvOxSRs+xwiFhRC/a92 +vDCcS4IBpzg7KYmBrmNxKcklJPTIc7K2pjOwqlb57OJSEvyTijInsxjo+D1l +wpfyveD86+ZFDJTqKanfXkaC9Uxe+gKSgXmNtaIllCddbqSVljNw4IiDgFA5 +lV822SkrahhopGXd1ET5RVtmcm09tR5jYarsbRI8jDKSXBoZeE+RvsyTMqma +lvi0nYqHgM+7FXdIMMtLSfB7xcBmsdVaNpSHJZPjlboYuDtroVYm5TUCiXGh +/QzcX36VkL9LQrN//BWtLwyMGMgVt6Xs8CMudmCIOq+BD9xEygIOV2ISxhgY +OfR7pIVyXk9M9OZJBs5WVr2dp2y0Nzpq/BcDvfJeOq2toPLvSWRk9h8GVofx +3LSiHGwQEbGbl8BXbTzR5ynLl4eF/11IYK5LnGwu5TpWaBh3KYHpgy6HGigf +zrgUaitEoM9WS9N+yr9FLl5eKk5gO0Pg8zzl9PDgS1WSBL7LNVQWvUeC3t/A +i86yBNLc6+ksyl1eF0JoDAJ/Ptj+VIey77eA4CYWgQHmmfStlFcdORfks47A +xV4B63ZTvvvaL5CpTuCXn/lfrShbbj974bUWgUtUPu7bT3mizuf8RT0Ca/i/ ++//f8VpnAjSAQM3BSHNryuocr3P9RgQee3ix7//rdch7+sdtI/CiaBrdmLJb +kocfmBH45n28tC7l5cvcz47uJXDTTc12JcrFwa6+GdYECp/bvFGc8vaZUz47 +DxIY+vPywb/Ufr+5nDwzf4TAFGbjxgHK4Z+cvG+dIPD67aaOJ5RZNo5e+50J +/FxvReRTftJm7ynoRmDwtM6GEMr8lcc9HHwJ3CsmG72e8g3VY+7iAQSKfL77 +hpfy5rwjbo+DCMzMb+l9QZ1n4BVbF3okgd0B8RoOlGUFDp56EUvgidi+C8qU +a/z3nwxKILDsalfMCJVPc/bWTr3XCbTk4Z9xpJzaY+kYk0Og2NmX5vKUN+61 +cDDIJ7Bj9pL3GypffQz2nEgrIdCq6tUybcrjItuPWj8iMPDs54IOqh66XOgd +J5sIrHeW+s+Bcv2TOQhsJbAq0fj4LFVPcf4cucK3VHxL7wqJUl7/aVnf7BCB +1ueSTkmSJNAMBnet+EFg47hk4VWqXnmSah/QpwjkMRdZs5Dyc1O3zB3/qHy0 +Jn9/purdrez5oQxRJqYs7xD0KqLqc2lhWxmNiX8aNcLaqH5haB/EfiLDxOLI +O+YE5eWS6jJjLCaacXzePKH6TXFQ/Hs0YOKwW0Nh3w0ShnZbHRw4wcSTCxcF +Hssg4WWRyrNfzky02ECzDKb6XxXfQv3l7kwsH5UIz0gnIeJehZS2HxNvNboI +P6P6p5IcrTssholeB8xb5q6R4DjabaNcwUSBLP3n3BiqP2273QzVTJxoTpNO +jCZBOzdqo2U9ExecsOrxofr1QmsD2vmnTKT1RZepR5CQX5vR2d7LRNdPk/0B +l0gYiD5q7blIEZs/Ctqe9Kf2P7SOvn6ZIpZaRY2q+pEwYzI7MiKkiArammd/ ++JKwhC/+srOUIrpIffQ+eYaKt1/DnaMqijjbAGp61P103l5RdLeFIvp+/3XZ +1J6qL8Ph58pZipiTbF+nakZCdvr99G83FPEPbZpI3EH1n9lLjgWFiijg/jZn +2pTqp3dk/tHLFXH01s3BcmMS7NbuVpVqVMQJB5dyQSShdFV5tOB36nsBfdO1 +GiSYjvmaDmqz8Ezc0YadYiRIq8uGChqwkL3Sf6mKCHUfej5+pLyJhcnRL4WW +CFH30bSQgecOFuap37OpWkpC758i1X9HWJh9KZ9vkpcEz2XvRSUjWBijZTTX +Ss0XaWuwd2cPC+O2pirIPaXmkVNfpDw+sjCgTbwutYkLwI3elzDIwhFFC2Nh +al4ZWP+u490YC3V4qiVm6rigutGzwYFfCfkb/45k3OVCg3FeYZCKEo5fCC7Y +n82FYTtBrzuBSrjahf9Aghc1D2Vuqa27pISHc/eeq/bgwti7oEXPIpQwVUXz ++UdXLvzcPZven6CELtUbxRhOXJjRH3q8olAJU87y6YXacoFXrHWVc4cSrjFR +Um7ewgXJx1eqZBTW4H8DlfZbRKl5jpDgDXu0BqvdP6x0LSwGkTbF2NKxtahR +npJ0tIkD0uEle7S116HG70DZDeW3IEVZV0jUUQVHn7vvdr9WBE+lNmlNXFVF +xnzj8dKThaAn/ShO7a0a1li3TvSLF8AKvlzvYyHrcfydotuL1psgGyxnsF9R +HfXEvzWvOpYHi5m2FeZN6jjoMB/sMZsLqmzJEt9DGhg9ajzpzskBz16Rhu08 +mujUlWXsYZwNYxPRVqYpmvg2+utaPt5MMFF7kmaqsgFTImQ3WCanw4MJ/fmZ +9g3Y4s7LJySSCm7rNLpf2GthZAt/f9urJGCPnni9f7E2nh8SC/AKTYStBM1s +ea427jrw9pV6cDwoBUWefaSjg3WOXQF6+XGw1l63jtmtg1lbhyL2XIkB+wdO +l+6c3oiJPvmzg9aRUJf9+sS4uC5GlLkwSEYYTBb+m1G7p4syjGubkrddAjsm +Z3GamR52yCyuLfoQDONrE7TLf+jhoY4eOXeeQLifN98/Fa6Pv0P5799ecg4O +bGGgvqwByhsWxxZe8YXVrmGVqvUGKOvXe4q+wRvEl7iUme1j4573K+NU3E9D +ntF5/x/72TghySyPszsNGudjjRJs2dhR2G44t+807PpR+qbrGBuVrL7GfMTT +EPp2atbOhY1+B4NrZ0VOw6/cwM3+wWwUS1bSsr3vAd36Ca/yOWw8+9NasWOR +BzidybtuSrLRpsr72sysO0yTd+2HS9noLJEvdnDAHUToXTPqFWw0zI/KNa50 +hx2CMtK19WwMmDb3LLFzh5rX+SdevWFjTt9YfEOVG2xfcV/Fp4uNwS8NJ3pu +ukGXScs0rYeNUQ1sfZ6rbjBZ9T388Ec27pgj3Vwc3UAlZz332xAbeT5s6H4p +5gY13Zt8okfYaKD0dtSUh1pPzALUfrBRL/x3Q+t3V3AIO/PCe4qNZa/Mrk89 +coXJ+tA0iV9sbOy+cy2ddIWQuWS7qjk2uqyXNDBLcwWhDUXrDv1ho9yhtMgl +oa6Q6Vo19e8fG7+E2AS8Ou0K/wNSU3P8 + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd8XAHAZSrMxj4zv3ecpIYQMz96lSKXBlEqjTGUKESlDZSYhY8Zk +6HnXUClTlIRCGokiRd+SIZlCw+/+/rjrrs9a9561zj5777MVjrub2/Py8PDw +LqAe6j3d2/KYiMozXFymUDRYqWv4OpPmt6krBB4LP4vdkSoBKP78OK0rHnb/ +llNblcoCnz23Ovm6ciE3pa1xMkUHhEcl4mc7yyHlxHHllhQT6KvZ5T7Z+Qhc +JrqbTVL2gTEx9GG88yWsMPrZbZPkCLOdOtd+dH4CzkDnVFGsLzQYFeS9yJ0A +r7ylwg+dwkG6r/LL8XV/wO4jS6v911UQczlya5ERHyaFP3Q/6JkM8erG1bus +BLE8eG9CnlwGvEtZXz8utBxxaaR8xcociMoLfM4rKYwWZ4akUhJvgETi54iE +DFFc/GCbVsjbmxBmaWr4clocxdXpkbXVBeClm3OkJYSGcj/TyjZFFcH27BWT +O6JpWFHZ9uvS1SKgLwoIb79Gw9YDnmGPk4ug47V12atCGqbyL/fbmFcEqh7L ++Hrbabh0dUbWRE0RfM33zf8pJYkLHz2MqRgpAluxXSOrb0vikuyRylM7b8GW +sTl/t89SWKKmnR3w9xb4bUtc+3BYCmeT2Om3+ThA5qh0i05L4dWiqKEvghyg +WR7VrRRcjeZ/hy9tFuXA8P3GGT7V1TiZEZnTxuJAQkicd+rZ1VhyXMxIcw8H +Pokruj1eLo1Tm0+n6mVyQMK9TkZCQhpzj6UVzedyYGezTZuzvDQuFGYsqizg +QIV/1LqVmtL45nNxkVIZByL7fgztt5HGCOkt4T0NHNAoqnYcy5VGo686UVe+ +ciDYYO8xqY0yuI17qENNrRi2Hc78qbNZBguHvwV2ahbDiqDvF612ymBfd12H +/8ZiuN5wOT/uqAyOvP5ldWdTMdzfXvV9YYQMDt3hDv+0KIYfNgyfiXcyONyk +DZm+xXD4zFRk6zlZ/KvDtOBWFwMzebP00GVZ9DPllWqpK6b2f4W7KE4WPfwf +BX9sKAb/32s6NufJ4oc4pQ28rcVw7eJh8cpWWQy64KYo/L4YWq82Zd2UkcNG ++YsWh+aLQY9MvXOhTg61X2pllGhzYUtn+5/RZjnc3JzSyqvHhV08/CZHXsph +OO9SdXM2F+zM3d7BoBz+GatJHTTigvE5hcAgAXkcWtA/2ruHCx5y0zc2Kctj +Vr/E89UnufDYMWukwUcendoYzXWpXDD9rSsScE4erWk1U6nXudAe91p7Q5A8 +lpz6dNgjiwvvKhcH5UXIY6LthwHhm1wYXeotcvm6PBaOvn7CKuUCrXSbjvEj +6v+8RLmsRi64/BoPal6ugF/s7mo8GOGC3mmHVV9EFPC+fq6bxQ8uCA51c/ho +Csh/pmDbwE8u3OxpeGtIV8Cy64+6fs1woffBtXV3tRWwVGLozMgCEnZf1u3K +OaKAz1xblgmIkyD7l+tad0IBvZNrjllKkDDsQ+f74KyAh3JsbbMkSQh3WqpK +81bAzvecLUqyJNTv+HAxNlwB8d7cmACLBA2RYLVzZQp4zoytNK5DAk/U1OOU +Cmo96ZUS87oktPOdPFBRrYCXHRh3eAxIODVlfnm8UQFbjh+c/wsk5HURPY7d +Cuh8Wqe9yYSEVVnNoZZ8dFw7b7QkypqEWWWhXhUrOr7N3aP53oOE6QypYM0D +dPSTviJh7UnC5EomoXuEjiZlfoPPvEgYndA9ucWZjtO8Y8jxIeFTtd30gfN0 +pBu2CeoGkPB0x70V4TfpaMyq9bwaSkJT7cOymFt0rL/duOlpGAmP1VotE0ro +eK1gp8C/cBIeiPanZVbS8cV/BS62USSU9yxh3W2jo69LcMeXKySknToMn6bo +yEgZjNVLISH5g9On/+boqOO57rdGKgmJu70uj/yj41ODNGdWGgmxmuHPfi1m +4Hu3cRP+6ySEzJftWynLwAzh76zYLBICXWvmxBgM3BtZz3HIJiGg70mGlBID +k873aennkODT0POZqcFAG3Opo125VDyjBDwMjBnIyU+gf75JgtOflaKbdzBw +nVndaHo+CQ7uUhUmexhYLhDZtKeAhKMWar/NDzCww0M7lywkwXL1/nBnNwZy +t3JE9Dkk7I2xU3b3YiBbJPLAa8q7/rm2e59loHDllbvOxSRs+xwiFhRC/a92 +vDCcS4IBpzg7KYmBrmNxKcklJPTIc7K2pjOwqlb57OJSEvyTijInsxjo+D1l +wpfyveD86+ZFDJTqKanfXkaC9Uxe+gKSgXmNtaIllCddbqSVljNw4IiDgFA5 +lV822SkrahhopGXd1ET5RVtmcm09tR5jYarsbRI8jDKSXBoZeE+RvsyTMqma +lvi0nYqHgM+7FXdIMMtLSfB7xcBmsdVaNpSHJZPjlboYuDtroVYm5TUCiXGh +/QzcX36VkL9LQrN//BWtLwyMGMgVt6Xs8CMudmCIOq+BD9xEygIOV2ISxhgY +OfR7pIVyXk9M9OZJBs5WVr2dp2y0Nzpq/BcDvfJeOq2toPLvSWRk9h8GVofx +3LSiHGwQEbGbl8BXbTzR5ynLl4eF/11IYK5LnGwu5TpWaBh3KYHpgy6HGigf +zrgUaitEoM9WS9N+yr9FLl5eKk5gO0Pg8zzl9PDgS1WSBL7LNVQWvUeC3t/A +i86yBNLc6+ksyl1eF0JoDAJ/Ptj+VIey77eA4CYWgQHmmfStlFcdORfks47A +xV4B63ZTvvvaL5CpTuCXn/lfrShbbj974bUWgUtUPu7bT3mizuf8RT0Ca/i/ ++//f8VpnAjSAQM3BSHNryuocr3P9RgQee3ix7//rdch7+sdtI/CiaBrdmLJb +kocfmBH45n28tC7l5cvcz47uJXDTTc12JcrFwa6+GdYECp/bvFGc8vaZUz47 +DxIY+vPywb/Ufr+5nDwzf4TAFGbjxgHK4Z+cvG+dIPD67aaOJ5RZNo5e+50J +/FxvReRTftJm7ynoRmDwtM6GEMr8lcc9HHwJ3CsmG72e8g3VY+7iAQSKfL77 +hpfy5rwjbo+DCMzMb+l9QZ1n4BVbF3okgd0B8RoOlGUFDp56EUvgidi+C8qU +a/z3nwxKILDsalfMCJVPc/bWTr3XCbTk4Z9xpJzaY+kYk0Og2NmX5vKUN+61 +cDDIJ7Bj9pL3GypffQz2nEgrIdCq6tUybcrjItuPWj8iMPDs54IOqh66XOgd +J5sIrHeW+s+Bcv2TOQhsJbAq0fj4LFVPcf4cucK3VHxL7wqJUl7/aVnf7BCB +1ueSTkmSJNAMBnet+EFg47hk4VWqXnmSah/QpwjkMRdZs5Dyc1O3zB3/qHy0 +Jn9/purdrez5oQxRJqYs7xD0KqLqc2lhWxmNiX8aNcLaqH5haB/EfiLDxOLI +O+YE5eWS6jJjLCaacXzePKH6TXFQ/Hs0YOKwW0Nh3w0ShnZbHRw4wcSTCxcF +Hssg4WWRyrNfzky02ECzDKb6XxXfQv3l7kwsH5UIz0gnIeJehZS2HxNvNboI +P6P6p5IcrTssholeB8xb5q6R4DjabaNcwUSBLP3n3BiqP2273QzVTJxoTpNO +jCZBOzdqo2U9ExecsOrxofr1QmsD2vmnTKT1RZepR5CQX5vR2d7LRNdPk/0B +l0gYiD5q7blIEZs/Ctqe9Kf2P7SOvn6ZIpZaRY2q+pEwYzI7MiKkiArammd/ ++JKwhC/+srOUIrpIffQ+eYaKt1/DnaMqijjbAGp61P103l5RdLeFIvp+/3XZ +1J6qL8Ph58pZipiTbF+nakZCdvr99G83FPEPbZpI3EH1n9lLjgWFiijg/jZn +2pTqp3dk/tHLFXH01s3BcmMS7NbuVpVqVMQJB5dyQSShdFV5tOB36nsBfdO1 +GiSYjvmaDmqz8Ezc0YadYiRIq8uGChqwkL3Sf6mKCHUfej5+pLyJhcnRL4WW +CFH30bSQgecOFuap37OpWkpC758i1X9HWJh9KZ9vkpcEz2XvRSUjWBijZTTX +Ss0XaWuwd2cPC+O2pirIPaXmkVNfpDw+sjCgTbwutYkLwI3elzDIwhFFC2Nh +al4ZWP+u490YC3V4qiVm6rigutGzwYFfCfkb/45k3OVCg3FeYZCKEo5fCC7Y +n82FYTtBrzuBSrjahf9Aghc1D2Vuqa27pISHc/eeq/bgwti7oEXPIpQwVUXz ++UdXLvzcPZven6CELtUbxRhOXJjRH3q8olAJU87y6YXacoFXrHWVc4cSrjFR +Um7ewgXJx1eqZBTW4H8DlfZbRKl5jpDgDXu0BqvdP6x0LSwGkTbF2NKxtahR +npJ0tIkD0uEle7S116HG70DZDeW3IEVZV0jUUQVHn7vvdr9WBE+lNmlNXFVF +xnzj8dKThaAn/ShO7a0a1li3TvSLF8AKvlzvYyHrcfydotuL1psgGyxnsF9R +HfXEvzWvOpYHi5m2FeZN6jjoMB/sMZsLqmzJEt9DGhg9ajzpzskBz16Rhu08 +mujUlWXsYZwNYxPRVqYpmvg2+utaPt5MMFF7kmaqsgFTImQ3WCanw4MJ/fmZ +9g3Y4s7LJySSCm7rNLpf2GthZAt/f9urJGCPnni9f7E2nh8SC/AKTYStBM1s +ea427jrw9pV6cDwoBUWefaSjg3WOXQF6+XGw1l63jtmtg1lbhyL2XIkB+wdO +l+6c3oiJPvmzg9aRUJf9+sS4uC5GlLkwSEYYTBb+m1G7p4syjGubkrddAjsm +Z3GamR52yCyuLfoQDONrE7TLf+jhoY4eOXeeQLifN98/Fa6Pv0P5799ecg4O +bGGgvqwByhsWxxZe8YXVrmGVqvUGKOvXe4q+wRvEl7iUme1j4573K+NU3E9D +ntF5/x/72TghySyPszsNGudjjRJs2dhR2G44t+807PpR+qbrGBuVrL7GfMTT +EPp2atbOhY1+B4NrZ0VOw6/cwM3+wWwUS1bSsr3vAd36Ca/yOWw8+9NasWOR +BzidybtuSrLRpsr72sysO0yTd+2HS9noLJEvdnDAHUToXTPqFWw0zI/KNa50 +hx2CMtK19WwMmDb3LLFzh5rX+SdevWFjTt9YfEOVG2xfcV/Fp4uNwS8NJ3pu +ukGXScs0rYeNUQ1sfZ6rbjBZ9T388Ec27pgj3Vwc3UAlZz332xAbeT5s6H4p +5gY13Zt8okfYaKD0dtSUh1pPzALUfrBRL/x3Q+t3V3AIO/PCe4qNZa/Mrk89 +coXJ+tA0iV9sbOy+cy2ddIWQuWS7qjk2uqyXNDBLcwWhDUXrDv1ho9yhtMgl +oa6Q6Vo19e8fG7+E2AS8Ou0K/wNSU3P8 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.059992595915454555`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.059992595915454555`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Vd8XAHAZSrMxj4zv3ecpIYQMz96lSKXBlEqjTGUKESlDZSYhY8Zk +6HnXUClTlIRCGokiRd+SIZlCw+/+/rjrrs9a9561zj5777MVjrub2/Py8PDw +LqAe6j3d2/KYiMozXFymUDRYqWv4OpPmt6krBB4LP4vdkSoBKP78OK0rHnb/ +llNblcoCnz23Ovm6ciE3pa1xMkUHhEcl4mc7yyHlxHHllhQT6KvZ5T7Z+Qhc +JrqbTVL2gTEx9GG88yWsMPrZbZPkCLOdOtd+dH4CzkDnVFGsLzQYFeS9yJ0A +r7ylwg+dwkG6r/LL8XV/wO4jS6v911UQczlya5ERHyaFP3Q/6JkM8erG1bus +BLE8eG9CnlwGvEtZXz8utBxxaaR8xcociMoLfM4rKYwWZ4akUhJvgETi54iE +DFFc/GCbVsjbmxBmaWr4clocxdXpkbXVBeClm3OkJYSGcj/TyjZFFcH27BWT +O6JpWFHZ9uvS1SKgLwoIb79Gw9YDnmGPk4ug47V12atCGqbyL/fbmFcEqh7L ++Hrbabh0dUbWRE0RfM33zf8pJYkLHz2MqRgpAluxXSOrb0vikuyRylM7b8GW +sTl/t89SWKKmnR3w9xb4bUtc+3BYCmeT2Om3+ThA5qh0i05L4dWiqKEvghyg +WR7VrRRcjeZ/hy9tFuXA8P3GGT7V1TiZEZnTxuJAQkicd+rZ1VhyXMxIcw8H +Pokruj1eLo1Tm0+n6mVyQMK9TkZCQhpzj6UVzedyYGezTZuzvDQuFGYsqizg +QIV/1LqVmtL45nNxkVIZByL7fgztt5HGCOkt4T0NHNAoqnYcy5VGo686UVe+ +ciDYYO8xqY0yuI17qENNrRi2Hc78qbNZBguHvwV2ahbDiqDvF612ymBfd12H +/8ZiuN5wOT/uqAyOvP5ldWdTMdzfXvV9YYQMDt3hDv+0KIYfNgyfiXcyONyk +DZm+xXD4zFRk6zlZ/KvDtOBWFwMzebP00GVZ9DPllWqpK6b2f4W7KE4WPfwf +BX9sKAb/32s6NufJ4oc4pQ28rcVw7eJh8cpWWQy64KYo/L4YWq82Zd2UkcNG ++YsWh+aLQY9MvXOhTg61X2pllGhzYUtn+5/RZjnc3JzSyqvHhV08/CZHXsph +OO9SdXM2F+zM3d7BoBz+GatJHTTigvE5hcAgAXkcWtA/2ruHCx5y0zc2Kctj +Vr/E89UnufDYMWukwUcendoYzXWpXDD9rSsScE4erWk1U6nXudAe91p7Q5A8 +lpz6dNgjiwvvKhcH5UXIY6LthwHhm1wYXeotcvm6PBaOvn7CKuUCrXSbjvEj +6v+8RLmsRi64/BoPal6ugF/s7mo8GOGC3mmHVV9EFPC+fq6bxQ8uCA51c/ho +Csh/pmDbwE8u3OxpeGtIV8Cy64+6fs1woffBtXV3tRWwVGLozMgCEnZf1u3K +OaKAz1xblgmIkyD7l+tad0IBvZNrjllKkDDsQ+f74KyAh3JsbbMkSQh3WqpK +81bAzvecLUqyJNTv+HAxNlwB8d7cmACLBA2RYLVzZQp4zoytNK5DAk/U1OOU +Cmo96ZUS87oktPOdPFBRrYCXHRh3eAxIODVlfnm8UQFbjh+c/wsk5HURPY7d +Cuh8Wqe9yYSEVVnNoZZ8dFw7b7QkypqEWWWhXhUrOr7N3aP53oOE6QypYM0D +dPSTviJh7UnC5EomoXuEjiZlfoPPvEgYndA9ucWZjtO8Y8jxIeFTtd30gfN0 +pBu2CeoGkPB0x70V4TfpaMyq9bwaSkJT7cOymFt0rL/duOlpGAmP1VotE0ro +eK1gp8C/cBIeiPanZVbS8cV/BS62USSU9yxh3W2jo69LcMeXKySknToMn6bo +yEgZjNVLISH5g9On/+boqOO57rdGKgmJu70uj/yj41ODNGdWGgmxmuHPfi1m +4Hu3cRP+6ySEzJftWynLwAzh76zYLBICXWvmxBgM3BtZz3HIJiGg70mGlBID +k873aennkODT0POZqcFAG3Opo125VDyjBDwMjBnIyU+gf75JgtOflaKbdzBw +nVndaHo+CQ7uUhUmexhYLhDZtKeAhKMWar/NDzCww0M7lywkwXL1/nBnNwZy +t3JE9Dkk7I2xU3b3YiBbJPLAa8q7/rm2e59loHDllbvOxSRs+xwiFhRC/a92 +vDCcS4IBpzg7KYmBrmNxKcklJPTIc7K2pjOwqlb57OJSEvyTijInsxjo+D1l +wpfyveD86+ZFDJTqKanfXkaC9Uxe+gKSgXmNtaIllCddbqSVljNw4IiDgFA5 +lV822SkrahhopGXd1ET5RVtmcm09tR5jYarsbRI8jDKSXBoZeE+RvsyTMqma +lvi0nYqHgM+7FXdIMMtLSfB7xcBmsdVaNpSHJZPjlboYuDtroVYm5TUCiXGh +/QzcX36VkL9LQrN//BWtLwyMGMgVt6Xs8CMudmCIOq+BD9xEygIOV2ISxhgY +OfR7pIVyXk9M9OZJBs5WVr2dp2y0Nzpq/BcDvfJeOq2toPLvSWRk9h8GVofx +3LSiHGwQEbGbl8BXbTzR5ynLl4eF/11IYK5LnGwu5TpWaBh3KYHpgy6HGigf +zrgUaitEoM9WS9N+yr9FLl5eKk5gO0Pg8zzl9PDgS1WSBL7LNVQWvUeC3t/A +i86yBNLc6+ksyl1eF0JoDAJ/Ptj+VIey77eA4CYWgQHmmfStlFcdORfks47A +xV4B63ZTvvvaL5CpTuCXn/lfrShbbj974bUWgUtUPu7bT3mizuf8RT0Ca/i/ ++//f8VpnAjSAQM3BSHNryuocr3P9RgQee3ix7//rdch7+sdtI/CiaBrdmLJb +kocfmBH45n28tC7l5cvcz47uJXDTTc12JcrFwa6+GdYECp/bvFGc8vaZUz47 +DxIY+vPywb/Ufr+5nDwzf4TAFGbjxgHK4Z+cvG+dIPD67aaOJ5RZNo5e+50J +/FxvReRTftJm7ynoRmDwtM6GEMr8lcc9HHwJ3CsmG72e8g3VY+7iAQSKfL77 +hpfy5rwjbo+DCMzMb+l9QZ1n4BVbF3okgd0B8RoOlGUFDp56EUvgidi+C8qU +a/z3nwxKILDsalfMCJVPc/bWTr3XCbTk4Z9xpJzaY+kYk0Og2NmX5vKUN+61 +cDDIJ7Bj9pL3GypffQz2nEgrIdCq6tUybcrjItuPWj8iMPDs54IOqh66XOgd +J5sIrHeW+s+Bcv2TOQhsJbAq0fj4LFVPcf4cucK3VHxL7wqJUl7/aVnf7BCB +1ueSTkmSJNAMBnet+EFg47hk4VWqXnmSah/QpwjkMRdZs5Dyc1O3zB3/qHy0 +Jn9/purdrez5oQxRJqYs7xD0KqLqc2lhWxmNiX8aNcLaqH5haB/EfiLDxOLI +O+YE5eWS6jJjLCaacXzePKH6TXFQ/Hs0YOKwW0Nh3w0ShnZbHRw4wcSTCxcF +Hssg4WWRyrNfzky02ECzDKb6XxXfQv3l7kwsH5UIz0gnIeJehZS2HxNvNboI +P6P6p5IcrTssholeB8xb5q6R4DjabaNcwUSBLP3n3BiqP2273QzVTJxoTpNO +jCZBOzdqo2U9ExecsOrxofr1QmsD2vmnTKT1RZepR5CQX5vR2d7LRNdPk/0B +l0gYiD5q7blIEZs/Ctqe9Kf2P7SOvn6ZIpZaRY2q+pEwYzI7MiKkiArammd/ ++JKwhC/+srOUIrpIffQ+eYaKt1/DnaMqijjbAGp61P103l5RdLeFIvp+/3XZ +1J6qL8Ph58pZipiTbF+nakZCdvr99G83FPEPbZpI3EH1n9lLjgWFiijg/jZn +2pTqp3dk/tHLFXH01s3BcmMS7NbuVpVqVMQJB5dyQSShdFV5tOB36nsBfdO1 +GiSYjvmaDmqz8Ezc0YadYiRIq8uGChqwkL3Sf6mKCHUfej5+pLyJhcnRL4WW +CFH30bSQgecOFuap37OpWkpC758i1X9HWJh9KZ9vkpcEz2XvRSUjWBijZTTX +Ss0XaWuwd2cPC+O2pirIPaXmkVNfpDw+sjCgTbwutYkLwI3elzDIwhFFC2Nh +al4ZWP+u490YC3V4qiVm6rigutGzwYFfCfkb/45k3OVCg3FeYZCKEo5fCC7Y +n82FYTtBrzuBSrjahf9Aghc1D2Vuqa27pISHc/eeq/bgwti7oEXPIpQwVUXz ++UdXLvzcPZven6CELtUbxRhOXJjRH3q8olAJU87y6YXacoFXrHWVc4cSrjFR +Um7ewgXJx1eqZBTW4H8DlfZbRKl5jpDgDXu0BqvdP6x0LSwGkTbF2NKxtahR +npJ0tIkD0uEle7S116HG70DZDeW3IEVZV0jUUQVHn7vvdr9WBE+lNmlNXFVF +xnzj8dKThaAn/ShO7a0a1li3TvSLF8AKvlzvYyHrcfydotuL1psgGyxnsF9R +HfXEvzWvOpYHi5m2FeZN6jjoMB/sMZsLqmzJEt9DGhg9ajzpzskBz16Rhu08 +mujUlWXsYZwNYxPRVqYpmvg2+utaPt5MMFF7kmaqsgFTImQ3WCanw4MJ/fmZ +9g3Y4s7LJySSCm7rNLpf2GthZAt/f9urJGCPnni9f7E2nh8SC/AKTYStBM1s +ea427jrw9pV6cDwoBUWefaSjg3WOXQF6+XGw1l63jtmtg1lbhyL2XIkB+wdO +l+6c3oiJPvmzg9aRUJf9+sS4uC5GlLkwSEYYTBb+m1G7p4syjGubkrddAjsm +Z3GamR52yCyuLfoQDONrE7TLf+jhoY4eOXeeQLifN98/Fa6Pv0P5799ecg4O +bGGgvqwByhsWxxZe8YXVrmGVqvUGKOvXe4q+wRvEl7iUme1j4573K+NU3E9D +ntF5/x/72TghySyPszsNGudjjRJs2dhR2G44t+807PpR+qbrGBuVrL7GfMTT +EPp2atbOhY1+B4NrZ0VOw6/cwM3+wWwUS1bSsr3vAd36Ca/yOWw8+9NasWOR +BzidybtuSrLRpsr72sysO0yTd+2HS9noLJEvdnDAHUToXTPqFWw0zI/KNa50 +hx2CMtK19WwMmDb3LLFzh5rX+SdevWFjTt9YfEOVG2xfcV/Fp4uNwS8NJ3pu +ukGXScs0rYeNUQ1sfZ6rbjBZ9T388Ec27pgj3Vwc3UAlZz332xAbeT5s6H4p +5gY13Zt8okfYaKD0dtSUh1pPzALUfrBRL/x3Q+t3V3AIO/PCe4qNZa/Mrk89 +coXJ+tA0iV9sbOy+cy2ddIWQuWS7qjk2uqyXNDBLcwWhDUXrDv1ho9yhtMgl +oa6Q6Vo19e8fG7+E2AS8Ou0K/wNSU3P8 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.059992595915454555`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.059992595915454555`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943858150455112`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"ad7298d0-0cff-4b19-b948-d6eaf6bdf702"] +}, Open ]], Cell[CellGroupData[{ @@ -8356,66 +14834,70 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[391]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], + "In[142]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 417, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437636167164`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.30706965136482`*^-163\\\", \ +\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ +2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 142, 73, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994385815066204*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], +In[142]:=",ExpressionUUID->"91758c94-06f6-41d6-ba30-cb8b396a36be"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 418, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763625717*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0538805309887299`*^-165\\\", \ +\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ +2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ +\"]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 74, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994385815069593*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], +In[142]:=",ExpressionUUID->"ff12bb4c-2016-4f04-ad7d-031e3607ea71"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 391, 419, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763634718*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1933553902588606`*^-168\\\", \ +\\\"16424312045547973917068250855478962797836184904556443340043143969743430318\ +444318157938322185531163516963194464925547245426704384000000000000000000000000\ +00\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 142, 75, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994385815072597*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], +In[142]:=",ExpressionUUID->"2c2cb1af-8f30-4d39-95a6-7ed482a6a4c8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 391, 420, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763643717*^9}, +during this calculation.\"", 2, 142, 76, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994385815075367*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], +In[142]:=",ExpressionUUID->"dc4968a9-51b1-4efd-8e6e-6f6eea111242"], -Cell[BoxData["12.55365498945131`"], "Output", - CellChangeTimes->{3.991343769962549*^9}, +Cell[BoxData["13.056228696638817`"], "Output", + CellChangeTimes->{3.991343769962549*^9, 3.994385836491486*^9}, CellLabel-> - "Out[391]=",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] + "Out[142]=",ExpressionUUID->"1d2d8743-b173-479a-a1b4-c9c3bea72b3e"] }, Open ]], Cell[CellGroupData[{ @@ -8482,68 +14964,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499777649403`*^9, - 3.9918499820026073`*^9}},ExpressionUUID->"97b28b29-5d04-5c42-a0e8-\ -93b70f20e7f6"], + CellChangeTimes->{{3.9918499777649403`*^9, 3.9918499820026073`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 392, 421, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343769999645*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.657970070013153`*^-224\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 143, 77, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943858365101223`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], +In[143]:=",ExpressionUUID->"6232d0d7-b88c-4fb4-b465-72c9c18e4d1b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 392, 422, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700095463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0312176019425215`*^-230\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 143, 78, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.99438583651357*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], +In[143]:=",ExpressionUUID->"591fdf83-2608-4e14-9335-ce861b02343d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 392, - 423, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343770018547*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.541885415490815`*^-236\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 143, 79, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.994385836516433*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], +In[143]:=",ExpressionUUID->"38cd3638-db26-49fa-9e8a-02cef66ef4c7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 392, 424, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700265465`*^9}, +during this calculation.\"", 2, 143, 80, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.99438583651868*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], +In[143]:=",ExpressionUUID->"3c21718c-ed27-4018-8afc-591fcaad924b"], -Cell[BoxData["2.1234790234082306`"], "Output", - CellChangeTimes->{3.9913437771602173`*^9}, +Cell[BoxData["0.1594827402248766`"], "Output", + CellChangeTimes->{3.9913437771602173`*^9, 3.994385839422138*^9}, CellLabel-> - "Out[392]=",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] + "Out[143]=",ExpressionUUID->"59d2a817-02e2-4d1d-a72b-8c1c3cfd4d38"] }, Open ]], Cell[CellGroupData[{ @@ -8564,8 +15050,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8610,68 +15095,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499862910366`*^9, - 3.991849989300226*^9}},ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-\ -cdce838d9efe"], + CellChangeTimes->{{3.9918499862910366`*^9, 3.991849989300226*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 393, 425, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437771982174`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.657970070013153`*^-224\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 144, 81, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.9943858394401073`*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], +In[144]:=",ExpressionUUID->"4728e2a5-1ea9-4d2b-acba-23c9c9276094"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 393, 426, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772082157`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0312176019425215`*^-230\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 144, 82, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994385839442548*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], +In[144]:=",ExpressionUUID->"14abb13f-7f0d-409e-98d7-c15ca0b96579"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 393, - 427, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134377721661*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.541885415490815`*^-236\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 144, 83, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994385839444582*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], +In[144]:=",ExpressionUUID->"2adc46b1-3b88-444a-be06-f72e1c24ed81"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 393, 428, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772256165`*^9}, +during this calculation.\"", 2, 144, 84, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.9943858394465227`*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], +In[144]:=",ExpressionUUID->"32584fc0-250b-45d2-a3cb-17048fdf376b"], -Cell[BoxData["10.711562421053975`"], "Output", - CellChangeTimes->{3.991343783589731*^9}, +Cell[BoxData["43.87059146898699`"], "Output", + CellChangeTimes->{3.991343783589731*^9, 3.994385842266005*^9}, CellLabel-> - "Out[393]=",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] + "Out[144]=",ExpressionUUID->"bc1ddd23-440a-4b7e-baa5-a24adc06e09d"] }, Open ]], Cell[CellGroupData[{ @@ -8692,8 +15181,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8738,68 +15226,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849992549782*^9, - 3.9918499952553864`*^9}},ExpressionUUID->"0794d062-69d5-0a45-936e-\ -533b19d33de6"], + CellChangeTimes->{{3.991849992549782*^9, 3.9918499952553864`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 394, 429, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836316223`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.657970070013153`*^-224\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 145, 85, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994385842283806*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], +In[145]:=",ExpressionUUID->"d0f1946c-af38-45b9-a536-569b0fa85c5a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 394, 430, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836416245`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.0312176019425215`*^-230\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 145, 86, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994385842286318*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], +In[145]:=",ExpressionUUID->"65267f96-893d-4dcb-98e2-2c97f3740874"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 394, - 431, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343783649622*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.541885415490815`*^-236\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 145, 87, 31388500494787480016, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994385842288445*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], +In[145]:=",ExpressionUUID->"ae5c3765-4a66-431c-a876-4bf174f9d1b1"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 394, 432, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836576347`*^9}, +during this calculation.\"", 2, 145, 88, 31388500494787480016, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994385842290504*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], +In[145]:=",ExpressionUUID->"6dca0c2a-cec0-4b50-ad4a-8d1b68a5b205"], -Cell[BoxData["20.656774205279326`"], "Output", - CellChangeTimes->{3.9913437870822353`*^9}, +Cell[BoxData["6.196516931541251`"], "Output", + CellChangeTimes->{3.9913437870822353`*^9, 3.9943858440958023`*^9}, CellLabel-> - "Out[394]=",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] + "Out[145]=",ExpressionUUID->"01f74080-b679-4be8-9949-c8666294f41a"] }, Open ]], Cell[CellGroupData[{ @@ -8808,21 +15300,30 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918500011025047`*^9, - 3.9918500053803673`*^9}},ExpressionUUID->"95c56266-e4d3-624e-89c1-\ -cedeeeb0247a"], - -Cell[BoxData["0.14275466609450368`"], "Output", - CellChangeTimes->{3.991343787117275*^9}, + CellChangeTimes->{{3.9918500011025047`*^9, 3.9918500053803673`*^9}}, CellLabel-> - "Out[395]=",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] + "In[146]:=",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], + +Cell[BoxData["0.009672820395687237`"], "Output", + CellChangeTimes->{3.991343787117275*^9, 3.9943858441119137`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"f57860b8-3bd5-42a4-97a7-8075abf53be1"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"370581aa-9efa-4b64-87cf-3407d34ae244"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"370581aa-9efa-4b64-87cf-3407d34ae244"], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.994384418725371*^9, 3.9943844214351*^9}, { + 3.994384522432501*^9, + 3.9943845225512342`*^9}},ExpressionUUID->"52fcfbe4-a598-4872-aaf5-\ +4287ed2d1246"] }, -WindowSize->{714, 288}, -WindowMargins->{{Automatic, 3}, {Automatic, 15}}, +Evaluator->"kernel 2", +WindowSize->{1440, 882}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -8839,367 +15340,644 @@ CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ -Cell[554, 20, 187, 4, 66, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], -Cell[744, 26, 156, 3, 36, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], -Cell[903, 31, 185, 4, 36, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], -Cell[1091, 37, 152, 3, 36, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[1268, 44, 1301, 43, 174, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[2572, 89, 176, 3, 41, "Output",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[576, 22, 448, 7, 36, "Input",ExpressionUUID->"00b5f403-9f80-4701-a740-6acdb2556420"], +Cell[1027, 31, 388, 6, 41, "Output",ExpressionUUID->"41abba8c-b76d-4f9f-a8fb-515a30bf9914"] }, Open ]], Cell[CellGroupData[{ -Cell[2785, 97, 908, 31, 73, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[3696, 130, 175, 3, 41, "Output",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[1452, 42, 250, 4, 36, "Input",ExpressionUUID->"e64514fa-ed72-47c6-bdf6-20893a2eb3f8"], +Cell[1705, 48, 394, 6, 41, "Output",ExpressionUUID->"a5ff662d-ee7a-4a5f-8aaa-0e6f48b391f7"] }, Open ]], Cell[CellGroupData[{ -Cell[3908, 138, 887, 30, 73, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[4798, 170, 177, 3, 41, "Output",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[2136, 59, 221, 4, 36, "Input",ExpressionUUID->"21416c0e-1c97-4e2c-bb07-e2899c15253d"], +Cell[2360, 65, 389, 6, 41, "Output",ExpressionUUID->"2815ebf8-87a0-4bb9-926c-c0ebbfde11d6"] }, Open ]], Cell[CellGroupData[{ -Cell[5012, 178, 558, 19, 66, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[5573, 199, 172, 3, 41, "Output",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[2786, 76, 175, 3, 36, "Input",ExpressionUUID->"d10bd82b-d5cf-4f27-a6c7-02ecf55a9cf6"], +Cell[2964, 81, 392, 6, 41, "Output",ExpressionUUID->"2b83be9a-4144-4235-809e-aee8d334bec1"] }, Open ]], Cell[CellGroupData[{ -Cell[5782, 207, 651, 22, 66, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[6436, 231, 170, 3, 41, "Output",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[3393, 92, 257, 7, 54, "Input",ExpressionUUID->"7980ec81-8604-4a43-98dd-472ef65a37a0"], +Cell[3653, 101, 403, 6, 41, "Output",ExpressionUUID->"e0ea2a55-263f-46b7-9587-7b274d89d7d1"] }, Open ]], Cell[CellGroupData[{ -Cell[6643, 239, 170, 5, 71, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[6816, 246, 173, 3, 41, "Output",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[4093, 112, 131, 2, 36, "Input",ExpressionUUID->"29f1ed3d-8677-4c8f-a5a1-9ea3d4c79e44"], +Cell[4227, 116, 398, 6, 41, "Output",ExpressionUUID->"d1febf94-ddc6-4b0f-9a6e-1022779235e7"] }, Open ]], Cell[CellGroupData[{ -Cell[7026, 254, 170, 5, 69, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[7199, 261, 169, 3, 109, "Output",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[4662, 127, 276, 6, 36, "Input",ExpressionUUID->"2eebf9e8-0303-4345-8b46-b6c4e129a574"], +Cell[4941, 135, 409, 6, 41, "Output",ExpressionUUID->"5ec5670b-48da-499b-b4e0-d27bcb2f799c"] }, Open ]], Cell[CellGroupData[{ -Cell[7405, 269, 181, 5, 109, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[7589, 276, 173, 3, 109, "Output",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[5387, 146, 257, 7, 36, "Input",ExpressionUUID->"74ff78ca-8237-4c0a-9187-2e580c3900b2"], +Cell[5647, 155, 409, 6, 41, "Output",ExpressionUUID->"d685af70-54f4-4814-8558-4314459d3ca6"] }, Open ]], Cell[CellGroupData[{ -Cell[7799, 284, 181, 5, 109, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[7983, 291, 170, 3, 109, "Output",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[6093, 166, 203, 3, 36, "Input",ExpressionUUID->"f3c8ec0f-9f4b-4ac1-b569-028443a2e34c"], +Cell[6299, 171, 381, 6, 41, "Output",ExpressionUUID->"bef599c1-cab8-4c69-8009-bea3cd16d23e"] }, Open ]], Cell[CellGroupData[{ -Cell[8190, 299, 6055, 185, 109, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[14248, 486, 174, 3, 109, "Output",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[6717, 182, 206, 3, 36, "Input",ExpressionUUID->"7c4fa5b8-67d5-4eef-9ed9-916f6843a703"], +Cell[6926, 187, 379, 6, 41, "Output",ExpressionUUID->"564e13fe-336c-4dfb-840e-1365cd7d7dab"] }, Open ]], Cell[CellGroupData[{ -Cell[14459, 494, 368, 9, 109, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[14830, 505, 170, 3, 109, "Output",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[7342, 198, 129, 2, 36, "Input",ExpressionUUID->"baf40374-29d2-4781-a381-3de499d62150"], +Cell[7474, 202, 394, 6, 41, "Output",ExpressionUUID->"d906f7d2-814a-4354-98d3-08e1ef799a65"] }, Open ]], Cell[CellGroupData[{ -Cell[15037, 513, 6122, 187, 109, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[21162, 702, 174, 3, 109, "Output",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[7905, 213, 129, 2, 36, "Input",ExpressionUUID->"fb279d0c-7712-4cca-871c-fa0638c502d7"], +Cell[8037, 217, 389, 6, 41, "Output",ExpressionUUID->"cac1acc6-7c98-4ea9-8ff9-b4a2545b1221"] }, Open ]], Cell[CellGroupData[{ -Cell[21373, 710, 368, 9, 109, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[21744, 721, 170, 3, 109, "Output",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[8463, 228, 557, 19, 100, "Input",ExpressionUUID->"43d9c7e8-9d80-4926-a885-d2ac88aaf467"], +Cell[9023, 249, 407, 6, 41, "Output",ExpressionUUID->"ca052a6b-2a78-4089-9ed9-809e40108c0d"] }, Open ]], Cell[CellGroupData[{ -Cell[21951, 729, 2663, 88, 109, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[24617, 819, 171, 3, 109, "Output",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[9467, 260, 557, 19, 100, "Input",ExpressionUUID->"5299cfad-2761-41b2-973f-3913012a1f0b"], +Cell[10027, 281, 407, 6, 41, "Output",ExpressionUUID->"4fff1add-cc83-48bd-ad2b-da8bab1227a3"] }, Open ]], Cell[CellGroupData[{ -Cell[24825, 827, 2603, 85, 109, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[27431, 914, 171, 3, 109, "Output",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[10471, 292, 1588, 50, 103, "Input",ExpressionUUID->"dd34f530-b874-45bb-b7e3-a474aef0daa0"], +Cell[12062, 344, 405, 6, 41, "Output",ExpressionUUID->"cd13431b-9425-433e-8368-02177631c3b1"] }, Open ]], Cell[CellGroupData[{ -Cell[27639, 922, 3712, 118, 109, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[31354, 1042, 171, 3, 109, "Output",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[12504, 355, 1422, 46, 73, "Input",ExpressionUUID->"e0b396f5-c6e2-4d41-bf1c-9b15a0f2d258"], +Cell[13929, 403, 424, 7, 41, "Output",ExpressionUUID->"98239ab7-8cdc-4c1d-99ca-1fb8ff6914a5"] }, Open ]], -Cell[31540, 1048, 138, 3, 109, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ -Cell[31703, 1055, 2054, 59, 109, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], -Cell[33760, 1116, 566, 12, 109, "Message",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], -Cell[34329, 1130, 569, 12, 109, "Message",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], -Cell[34901, 1144, 570, 12, 109, "Message",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], -Cell[35474, 1158, 458, 10, 109, "Message",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], -Cell[35935, 1170, 172, 3, 109, "Output",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[14390, 415, 1422, 46, 73, "Input",ExpressionUUID->"4b796fed-adf3-4ae9-8480-f7ebaf369d4d"], +Cell[15815, 463, 431, 7, 41, "Output",ExpressionUUID->"b3890f6c-e59b-4e54-827c-d3b5212d6e7c"] }, Open ]], Cell[CellGroupData[{ -Cell[36144, 1178, 2052, 59, 109, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], -Cell[38199, 1239, 564, 12, 109, "Message",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], -Cell[38766, 1253, 567, 12, 109, "Message",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], -Cell[39336, 1267, 570, 12, 109, "Message",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], -Cell[39909, 1281, 455, 10, 109, "Message",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], -Cell[40367, 1293, 169, 3, 109, "Output",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[16283, 475, 1588, 50, 103, "Input",ExpressionUUID->"bae893ff-4d07-4361-9344-3655d773e555"], +Cell[17874, 527, 410, 6, 41, "Output",ExpressionUUID->"03778055-e619-4c57-aca0-f4f150f2841b"] }, Open ]], Cell[CellGroupData[{ -Cell[40573, 1301, 1936, 53, 109, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], -Cell[42512, 1356, 19983, 375, 109, "Output",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] +Cell[18321, 538, 131, 2, 36, "Input",ExpressionUUID->"730053d9-490d-44dc-8769-390a3de7ea2a"], +Cell[18455, 542, 390, 6, 41, "Output",ExpressionUUID->"a0c3b176-24a7-4e99-84df-491c384b0c3c"] }, Open ]], Cell[CellGroupData[{ -Cell[62532, 1736, 2092, 60, 109, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], -Cell[64627, 1798, 501, 11, 109, "Message",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], -Cell[65131, 1811, 503, 11, 109, "Message",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], -Cell[65637, 1824, 506, 11, 109, "Message",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], -Cell[66146, 1837, 456, 10, 109, "Message",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], -Cell[66605, 1849, 41581, 727, 292, "Output",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] +Cell[18882, 553, 133, 2, 36, "Input",ExpressionUUID->"e0e8bd1d-f12b-46a9-8215-9e5358eb43b6"], +Cell[19018, 557, 393, 6, 41, "Output",ExpressionUUID->"7d259d9f-cb11-47be-b1d7-a9964c302896"] }, Open ]], -Cell[108201, 2579, 2455, 69, 296, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], -Cell[110659, 2650, 209, 5, 36, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], Cell[CellGroupData[{ -Cell[110893, 2659, 217, 7, 61, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[111113, 2668, 170, 3, 41, "Output",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[19448, 568, 134, 2, 36, "Input",ExpressionUUID->"d375ba23-de99-4d0f-9f9c-9c9e4e03d929"], +Cell[19585, 572, 396, 6, 41, "Output",ExpressionUUID->"237ac37e-5a63-405b-80fa-0435baaf2a94"] }, Open ]], Cell[CellGroupData[{ -Cell[111320, 2676, 1814, 53, 311, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], -Cell[113137, 2731, 506, 11, 71, "Message",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], -Cell[113646, 2744, 512, 11, 71, "Message",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], -Cell[114161, 2757, 509, 11, 71, "Message",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], -Cell[114673, 2770, 456, 10, 26, "Message",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], -Cell[115132, 2782, 22336, 412, 290, "Output",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] +Cell[20018, 583, 219, 4, 36, "Input",ExpressionUUID->"2b7ed650-9712-4eac-8773-86cae1c5041e"], +Cell[20240, 589, 409, 7, 41, "Output",ExpressionUUID->"f645ae2e-ff9b-4e8f-a51e-28a3df82530b"] }, Open ]], Cell[CellGroupData[{ -Cell[137505, 3199, 1616, 48, 132, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], -Cell[139124, 3249, 584, 12, 111, "Message",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], -Cell[139711, 3263, 588, 12, 111, "Message",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], -Cell[140302, 3277, 591, 12, 111, "Message",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], -Cell[140896, 3291, 456, 10, 26, "Message",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], -Cell[141355, 3303, 173, 3, 41, "Output",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] +Cell[20686, 601, 134, 2, 36, "Input",ExpressionUUID->"c2cbdea7-0098-490b-a21b-b9dc3af6c40c"], +Cell[20823, 605, 393, 6, 41, "Output",ExpressionUUID->"ef204ef0-bab1-4d19-ada5-c3231c210482"] }, Open ]], Cell[CellGroupData[{ -Cell[141565, 3311, 2274, 65, 348, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], -Cell[143842, 3378, 566, 12, 91, "Message",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], -Cell[144411, 3392, 569, 12, 91, "Message",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], -Cell[144983, 3406, 572, 12, 91, "Message",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], -Cell[145558, 3420, 458, 10, 26, "Message",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], -Cell[146019, 3432, 171, 3, 41, "Output",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] +Cell[21253, 616, 322, 5, 36, "Input",ExpressionUUID->"e3435374-4cd5-426b-8879-f84effad39e6"], +Cell[21578, 623, 393, 6, 41, "Output",ExpressionUUID->"2067e5d8-4ab0-4f57-9029-13f49510c6e1"] }, Open ]], Cell[CellGroupData[{ -Cell[146227, 3440, 2221, 64, 348, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], -Cell[148451, 3506, 564, 12, 91, "Message",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], -Cell[149018, 3520, 567, 12, 91, "Message",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], -Cell[149588, 3534, 570, 12, 91, "Message",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], -Cell[150161, 3548, 456, 10, 26, "Message",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], -Cell[150620, 3560, 173, 3, 41, "Output",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] +Cell[22008, 634, 298, 5, 36, "Input",ExpressionUUID->"4d616e57-a8cb-4b84-b0e9-4b67c3651d4d"], +Cell[22309, 641, 394, 6, 41, "Output",ExpressionUUID->"58c7bd8b-04bf-45de-81b2-d9beb42178dc"] }, Open ]], Cell[CellGroupData[{ -Cell[150830, 3568, 2223, 64, 348, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], -Cell[153056, 3634, 566, 12, 91, "Message",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], -Cell[153625, 3648, 569, 12, 91, "Message",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], -Cell[154197, 3662, 570, 12, 91, "Message",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], -Cell[154770, 3676, 458, 10, 26, "Message",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], -Cell[155231, 3688, 170, 3, 41, "Output",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] +Cell[22740, 652, 219, 4, 36, "Input",ExpressionUUID->"156df1c5-3023-4310-b2b8-0405a27f695c"], +Cell[22962, 658, 392, 6, 41, "Output",ExpressionUUID->"92ec0384-3f85-4c25-bf18-125a25d618a6"] }, Open ]], Cell[CellGroupData[{ -Cell[155438, 3696, 213, 6, 60, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], -Cell[155654, 3704, 171, 3, 41, "Output",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] +Cell[23391, 669, 350, 10, 54, "Input",ExpressionUUID->"97d5d8c6-b27a-4078-b24a-de9688ae59b8"], +Cell[23744, 681, 409, 6, 41, "Output",ExpressionUUID->"02898e4d-8dd0-40ea-a109-2b9f7b06ffbf"] }, Open ]], -Cell[155840, 3710, 244, 5, 36, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ -Cell[156109, 3719, 558, 19, 66, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[156670, 3740, 173, 3, 41, "Output",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] +Cell[24190, 692, 350, 10, 54, "Input",ExpressionUUID->"43a5047a-f33d-472c-a371-716501754506"], +Cell[24543, 704, 429, 7, 41, "Output",ExpressionUUID->"2de18a4e-1eb2-4016-8107-84d629e226af"] }, Open ]], Cell[CellGroupData[{ -Cell[156880, 3748, 170, 5, 71, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[157053, 3755, 171, 3, 41, "Output",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] +Cell[25009, 716, 994, 26, 55, "Input",ExpressionUUID->"439da5e8-e32a-4ecb-9fd6-7a3a765bc8c4"], +Cell[26006, 744, 409, 6, 41, "Output",ExpressionUUID->"8e02e233-f861-4134-a680-665fbac32672"] }, Open ]], Cell[CellGroupData[{ -Cell[157261, 3763, 181, 5, 55, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[157445, 3770, 173, 3, 41, "Output",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] +Cell[26452, 755, 199, 3, 36, "Input",ExpressionUUID->"79a2f49b-fd51-4254-9b15-c668bf1fd392"], +Cell[26654, 760, 389, 6, 41, "Output",ExpressionUUID->"66136411-1821-4b28-8ad4-85aaf7e87424"] }, Open ]], Cell[CellGroupData[{ -Cell[157655, 3778, 6055, 185, 831, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[163713, 3965, 175, 3, 41, "Output",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] +Cell[27080, 771, 329, 5, 36, "Input",ExpressionUUID->"dec744ef-5206-430b-a6be-c9a39e01e52c"], +Cell[27412, 778, 372, 6, 41, "Output",ExpressionUUID->"35eaa3f7-d39d-4b31-a463-d6051bb882c2"] }, Open ]], +Cell[27799, 787, 173, 2, 36, "Input",ExpressionUUID->"f2638b08-e43e-48b7-8a53-727774c1e8e4"], Cell[CellGroupData[{ -Cell[163925, 3973, 368, 9, 53, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[164296, 3984, 172, 3, 41, "Output",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] +Cell[27997, 793, 327, 5, 36, "Input",ExpressionUUID->"0ace9e24-1792-4ce7-bd97-911cc536f512"], +Cell[28327, 800, 377, 6, 41, "Output",ExpressionUUID->"e1edd7ea-c19c-4c6d-b16a-4be5eef6c717"] }, Open ]], +Cell[28719, 809, 173, 2, 36, "Input",ExpressionUUID->"712c11a1-32c1-47d0-8c65-53db37c72ff9"], Cell[CellGroupData[{ -Cell[164505, 3992, 6122, 187, 900, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[170630, 4181, 173, 3, 41, "Output",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] +Cell[28917, 815, 330, 5, 36, "Input",ExpressionUUID->"3af6c04f-b98a-41ca-8665-8b917f9a2d54"], +Cell[29250, 822, 367, 6, 41, "Output",ExpressionUUID->"fd4f9df4-b29d-408c-a5df-4358b9d6796f"] }, Open ]], +Cell[29632, 831, 173, 2, 36, "Input",ExpressionUUID->"64a55b93-21f8-4df0-918c-42ae9a49b3f9"], Cell[CellGroupData[{ -Cell[170840, 4189, 368, 9, 53, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[171211, 4200, 170, 3, 41, "Output",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] +Cell[29830, 837, 354, 5, 36, "Input",ExpressionUUID->"135500b0-2cb8-4afb-8e68-56ca3f4ca1a2"], +Cell[30187, 844, 372, 6, 41, "Output",ExpressionUUID->"66db71db-3c14-40de-988e-dd7216e9b9fb"] }, Open ]], +Cell[30574, 853, 171, 2, 36, "Input",ExpressionUUID->"30dc47a1-c619-457e-906a-de0efa03ffc9"], Cell[CellGroupData[{ -Cell[171418, 4208, 2663, 88, 435, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[174084, 4298, 171, 3, 41, "Output",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] +Cell[30770, 859, 303, 5, 36, "Input",ExpressionUUID->"c98c394e-11d3-4620-af82-137e0c5e0298"], +Cell[31076, 866, 372, 6, 41, "Output",ExpressionUUID->"ad055ee0-f1be-4814-9610-478f21ea1846"] }, Open ]], +Cell[31463, 875, 171, 2, 36, "Input",ExpressionUUID->"c3ed8dc5-599c-42fc-b9e9-bc8e1fd93a7b"], Cell[CellGroupData[{ -Cell[174292, 4306, 2603, 85, 435, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[176898, 4393, 171, 3, 41, "Output",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] +Cell[31659, 881, 305, 5, 36, "Input",ExpressionUUID->"fe2ec0eb-4b88-484a-9180-19d3e333e1ea"], +Cell[31967, 888, 373, 6, 41, "Output",ExpressionUUID->"14e02510-853e-4855-a642-71377822e09f"] }, Open ]], +Cell[32355, 897, 173, 2, 36, "Input",ExpressionUUID->"eb5e3d35-73bf-4e75-a76a-7c425818c525"], Cell[CellGroupData[{ -Cell[177106, 4401, 3712, 118, 575, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[180821, 4521, 170, 3, 41, "Output",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] +Cell[32553, 903, 304, 5, 36, "Input",ExpressionUUID->"39d37940-e769-4bf6-9846-ffee65b68219"], +Cell[32860, 910, 373, 6, 41, "Output",ExpressionUUID->"b43eae10-7ab5-4fc0-8cfb-c9c27abd2006"] }, Open ]], +Cell[33248, 919, 172, 2, 36, "Input",ExpressionUUID->"1029386b-e53a-4b98-ad6b-f534cfb8b8f8"], Cell[CellGroupData[{ -Cell[181028, 4529, 2052, 59, 276, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], -Cell[183083, 4590, 573, 12, 91, "Message",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], -Cell[183659, 4604, 577, 12, 91, "Message",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], -Cell[184239, 4618, 580, 12, 91, "Message",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], -Cell[184822, 4632, 456, 10, 26, "Message",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], -Cell[185281, 4644, 170, 3, 41, "Output",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] +Cell[33445, 925, 275, 4, 36, "Input",ExpressionUUID->"852209a8-1309-44cc-a021-45a40ce0501a"], +Cell[33723, 931, 367, 6, 41, "Output",ExpressionUUID->"8c94475f-51e6-4d2f-bbaa-8e4d46444890"] }, Open ]], +Cell[34105, 940, 175, 2, 36, "Input",ExpressionUUID->"0428f92a-4025-45b7-ab9c-1ef491e421c6"], Cell[CellGroupData[{ -Cell[185488, 4652, 2054, 59, 276, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], -Cell[187545, 4713, 573, 12, 91, "Message",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], -Cell[188121, 4727, 577, 12, 91, "Message",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], -Cell[188701, 4741, 582, 12, 91, "Message",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], -Cell[189286, 4755, 456, 10, 26, "Message",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], -Cell[189745, 4767, 170, 3, 41, "Output",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] +Cell[34305, 946, 19809, 485, 1708, "Input",ExpressionUUID->"77ac3191-67f4-4832-ad57-ef7fd3894f6e"], +Cell[54117, 1433, 411, 6, 41, "Output",ExpressionUUID->"b106808e-a472-4767-b07a-4e27d04bab1c"] }, Open ]], Cell[CellGroupData[{ -Cell[189952, 4775, 2028, 55, 232, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], -Cell[191983, 4832, 20422, 382, 295, "Output",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] +Cell[54565, 1444, 19748, 489, 1720, "Input",ExpressionUUID->"e74881dd-1312-4f4d-92c6-02b5000be880"], +Cell[74316, 1935, 407, 6, 41, "Output",ExpressionUUID->"912f3b44-df45-48d1-8116-0597dee40dff"] }, Open ]], Cell[CellGroupData[{ -Cell[212442, 5219, 2120, 60, 311, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], -Cell[214565, 5281, 502, 11, 71, "Message",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], -Cell[215070, 5294, 506, 11, 71, "Message",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], -Cell[215579, 5307, 505, 11, 71, "Message",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], -Cell[216087, 5320, 458, 10, 26, "Message",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], -Cell[216548, 5332, 22288, 412, 290, "Output",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] +Cell[74760, 1946, 19748, 483, 1720, "Input",ExpressionUUID->"87ea46e1-e6b0-4a13-9054-147e530c949e"], +Cell[94511, 2431, 429, 7, 41, "Output",ExpressionUUID->"03c288d2-79fc-4337-8baa-623465e6d43c"] }, Open ]], -Cell[238851, 5747, 209, 5, 36, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], Cell[CellGroupData[{ -Cell[239085, 5756, 1616, 48, 132, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], -Cell[240704, 5806, 595, 12, 111, "Message",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], -Cell[241302, 5820, 595, 12, 111, "Message",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], -Cell[241900, 5834, 599, 12, 111, "Message",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], -Cell[242502, 5848, 456, 10, 26, "Message",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], -Cell[242961, 5860, 171, 3, 41, "Output",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] +Cell[94977, 2443, 22534, 553, 1885, "Input",ExpressionUUID->"50881ca6-0259-4a04-825c-2799cd88bd93"], +Cell[117514, 2998, 429, 7, 41, "Output",ExpressionUUID->"d5f60ba3-43ee-4a5f-a115-780800bf0184"] }, Open ]], Cell[CellGroupData[{ -Cell[243169, 5868, 2248, 64, 348, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], -Cell[245420, 5934, 575, 12, 91, "Message",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], -Cell[245998, 5948, 577, 12, 91, "Message",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], -Cell[246578, 5962, 582, 12, 91, "Message",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], -Cell[247163, 5976, 458, 10, 26, "Message",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], -Cell[247624, 5988, 172, 3, 41, "Output",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] +Cell[117980, 3010, 22535, 553, 1885, "Input",ExpressionUUID->"70db96f9-5c92-4c70-94f3-4f3e2a469c8f"], +Cell[140518, 3565, 430, 7, 41, "Output",ExpressionUUID->"4ccc1368-a2ab-4180-897a-1abe8a7fb3a5"] }, Open ]], Cell[CellGroupData[{ -Cell[247833, 5996, 2215, 63, 348, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], -Cell[250051, 6061, 575, 12, 91, "Message",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], -Cell[250629, 6075, 577, 12, 91, "Message",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], -Cell[251209, 6089, 582, 12, 91, "Message",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], -Cell[251794, 6103, 458, 10, 26, "Message",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], -Cell[252255, 6115, 170, 3, 41, "Output",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] +Cell[140985, 3577, 25491, 626, 2078, "Input",ExpressionUUID->"63126559-5b43-40b2-9641-1bf051eb03c3"], +Cell[166479, 4205, 426, 7, 41, "Output",ExpressionUUID->"6f6e2126-cfa6-4072-8614-d1dffeb0efae"] }, Open ]], Cell[CellGroupData[{ -Cell[252462, 6123, 2223, 64, 348, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], -Cell[254688, 6189, 573, 12, 91, "Message",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], -Cell[255264, 6203, 577, 12, 91, "Message",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], -Cell[255844, 6217, 580, 12, 91, "Message",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], -Cell[256427, 6231, 456, 10, 26, "Message",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], -Cell[256886, 6243, 173, 3, 41, "Output",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] +Cell[166942, 4217, 130, 2, 36, "Input",ExpressionUUID->"efc242d5-d839-4b44-93f9-d9afa7f4bd6d"], +Cell[167075, 4221, 391, 6, 41, "Output",ExpressionUUID->"2c1ce97d-441f-41d7-b17a-cbbcce2a94d3"] }, Open ]], Cell[CellGroupData[{ -Cell[257096, 6251, 213, 6, 60, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], -Cell[257312, 6259, 173, 3, 41, "Output",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] +Cell[167503, 4232, 130, 2, 36, "Input",ExpressionUUID->"977e3cdf-8189-42d3-94f6-70b575958acc"], +Cell[167636, 4236, 389, 6, 41, "Output",ExpressionUUID->"105f46d1-cb89-49d5-b3ca-cde758697722"] }, Open ]], -Cell[257500, 6265, 247, 5, 36, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ -Cell[257772, 6274, 558, 19, 66, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[258333, 6295, 173, 3, 41, "Output",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] +Cell[168062, 4247, 1144, 39, 73, "Input",ExpressionUUID->"084ed529-feee-4cc4-89f4-131d9d8ec211"], +Cell[169209, 4288, 408, 6, 41, "Output",ExpressionUUID->"5a11b18f-4c97-4060-ab0d-daaa01893456"] }, Open ]], Cell[CellGroupData[{ -Cell[258543, 6303, 170, 5, 71, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[258716, 6310, 173, 3, 41, "Output",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] +Cell[169654, 4299, 1041, 35, 73, "Input",ExpressionUUID->"91af6c96-f936-446e-a4c4-a0f7d3bb34f5"], +Cell[170698, 4336, 424, 7, 41, "Output",ExpressionUUID->"436032ea-e72b-4779-8794-8ec5230d9b9e"] }, Open ]], Cell[CellGroupData[{ -Cell[258926, 6318, 181, 5, 55, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[259110, 6325, 173, 3, 41, "Output",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] +Cell[171159, 4348, 1144, 39, 73, "Input",ExpressionUUID->"1279a3da-598b-4c64-95df-652f90a6fa69"], +Cell[172306, 4389, 407, 6, 41, "Output",ExpressionUUID->"e80c313e-a820-4fe3-be63-da70f681e7c6"] }, Open ]], Cell[CellGroupData[{ -Cell[259320, 6333, 6055, 185, 831, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[265378, 6520, 172, 3, 41, "Output",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] +Cell[172750, 4400, 108, 1, 36, "Input",ExpressionUUID->"b90c938b-520d-4f8f-a313-a849756aac13"], +Cell[172861, 4403, 412, 6, 41, "Output",ExpressionUUID->"1d1edd09-7c8a-4ecc-807c-4d230ab33861"] }, Open ]], Cell[CellGroupData[{ -Cell[265587, 6528, 368, 9, 53, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[265958, 6539, 172, 3, 41, "Output",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] +Cell[173310, 4414, 108, 1, 36, "Input",ExpressionUUID->"0be29b28-a940-415b-bed5-761197359f6e"], +Cell[173421, 4417, 408, 7, 41, "Output",ExpressionUUID->"9303aeac-65eb-46d0-a0b1-0139414cd3ca"] }, Open ]], Cell[CellGroupData[{ -Cell[266167, 6547, 6122, 187, 900, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[272292, 6736, 173, 3, 41, "Output",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] +Cell[173866, 4429, 108, 1, 36, "Input",ExpressionUUID->"b44d3425-b192-4e3c-8b9c-888d81608d5b"], +Cell[173977, 4432, 402, 7, 41, "Output",ExpressionUUID->"7fe8b958-470b-421f-a3c6-1b1d12521b16"] }, Open ]], Cell[CellGroupData[{ -Cell[272502, 6744, 368, 9, 53, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[272873, 6755, 170, 3, 41, "Output",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] +Cell[174416, 4444, 108, 1, 36, "Input",ExpressionUUID->"b818c8ac-54a4-4ae3-bdf2-e854382fc1a6"], +Cell[174527, 4447, 383, 6, 41, "Output",ExpressionUUID->"83cf5396-8b35-46a6-8f57-d7305ec9362e"] }, Open ]], Cell[CellGroupData[{ -Cell[273080, 6763, 2663, 88, 435, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[275746, 6853, 171, 3, 41, "Output",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] +Cell[174947, 4458, 107, 1, 36, "Input",ExpressionUUID->"9361a024-5be8-4d5a-99b9-38a364266af0"], +Cell[175057, 4461, 385, 6, 41, "Output",ExpressionUUID->"585e71e8-f85e-4b21-9c89-cfa6d2eb8a49"] }, Open ]], Cell[CellGroupData[{ -Cell[275954, 6861, 2603, 85, 435, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[278560, 6948, 173, 3, 41, "Output",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] +Cell[175479, 4472, 107, 1, 36, "Input",ExpressionUUID->"c2dfc9a4-07ef-4d85-a2c6-b650b454a546"], +Cell[175589, 4475, 388, 6, 41, "Output",ExpressionUUID->"f77c3731-77d4-4e65-968c-e2378e05eda9"] }, Open ]], Cell[CellGroupData[{ -Cell[278770, 6956, 3712, 118, 575, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[282485, 7076, 173, 3, 41, "Output",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] +Cell[176014, 4486, 497, 16, 71, "Input",ExpressionUUID->"808fdb69-0ab6-4b13-8dd9-d7d68614e246"], +Cell[176514, 4504, 403, 7, 41, "Output",ExpressionUUID->"0abea612-c0e7-416e-a592-d8e45e698aac"] }, Open ]], Cell[CellGroupData[{ -Cell[282695, 7084, 2052, 59, 276, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], -Cell[284750, 7145, 568, 12, 91, "Message",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], -Cell[285321, 7159, 573, 12, 91, "Message",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], -Cell[285897, 7173, 576, 12, 91, "Message",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], -Cell[286476, 7187, 458, 10, 26, "Message",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], -Cell[286937, 7199, 172, 3, 41, "Output",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] +Cell[176954, 4516, 497, 16, 71, "Input",ExpressionUUID->"ff539507-26e8-4e25-b83c-d396502c7858"], +Cell[177454, 4534, 402, 7, 41, "Output",ExpressionUUID->"7205ac10-eb2c-45f3-9a6f-f5bd32623616"] }, Open ]], Cell[CellGroupData[{ -Cell[287146, 7207, 2052, 59, 276, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], -Cell[289201, 7268, 568, 12, 91, "Message",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], -Cell[289772, 7282, 573, 12, 91, "Message",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], -Cell[290348, 7296, 574, 12, 91, "Message",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], -Cell[290925, 7310, 458, 10, 26, "Message",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], -Cell[291386, 7322, 172, 3, 41, "Output",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] +Cell[177893, 4546, 1788, 60, 142, "Input",ExpressionUUID->"90c44208-b182-4fb3-9146-9018fd3c991f"], +Cell[179684, 4608, 381, 6, 41, "Output",ExpressionUUID->"c3891874-ca20-4041-b295-4d92b8234abc"] }, Open ]], Cell[CellGroupData[{ -Cell[291595, 7330, 2028, 55, 232, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], -Cell[293626, 7387, 20375, 384, 295, "Output",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] +Cell[180102, 4619, 1101, 36, 73, "Input",ExpressionUUID->"79ed964e-0dbc-4e6f-804f-5b8a5f86c50e"], +Cell[181206, 4657, 404, 7, 41, "Output",ExpressionUUID->"e0c6c862-890d-4481-9d1d-ea438f444cba"] }, Open ]], Cell[CellGroupData[{ -Cell[314038, 7776, 2118, 60, 311, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], -Cell[316159, 7838, 501, 11, 71, "Message",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], -Cell[316663, 7851, 503, 11, 71, "Message",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], -Cell[317169, 7864, 506, 11, 71, "Message",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], -Cell[317678, 7877, 458, 10, 26, "Message",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], -Cell[318139, 7889, 22161, 409, 290, "Output",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] +Cell[181647, 4669, 1818, 61, 144, "Input",ExpressionUUID->"0c56dce6-169a-4efe-b501-d9d1e994d1a1"], +Cell[183468, 4732, 386, 6, 41, "Output",ExpressionUUID->"5f88080f-109b-4f77-a223-e0893f3c0150"] }, Open ]], -Cell[340315, 8301, 209, 5, 36, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], Cell[CellGroupData[{ -Cell[340549, 8310, 1616, 48, 132, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], -Cell[342168, 8360, 590, 12, 111, "Message",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], -Cell[342761, 8374, 589, 12, 111, "Message",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], -Cell[343353, 8388, 593, 12, 111, "Message",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], -Cell[343949, 8402, 456, 10, 26, "Message",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], -Cell[344408, 8414, 170, 3, 41, "Output",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] +Cell[183891, 4743, 1631, 53, 101, "Input",ExpressionUUID->"5ffc8823-16a8-479e-9477-1c71a4ccd488"], +Cell[185525, 4798, 384, 6, 41, "Output",ExpressionUUID->"feb13aa5-a195-4ee6-b65a-e329c9b6631d"] }, Open ]], Cell[CellGroupData[{ -Cell[344615, 8422, 2251, 64, 348, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], -Cell[346869, 8488, 568, 12, 91, "Message",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], -Cell[347440, 8502, 573, 12, 91, "Message",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], -Cell[348016, 8516, 574, 12, 91, "Message",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], -Cell[348593, 8530, 458, 10, 26, "Message",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], -Cell[349054, 8542, 173, 3, 41, "Output",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] +Cell[185946, 4809, 1631, 53, 101, "Input",ExpressionUUID->"e44eb6ce-a936-4027-9489-8da44f4b6a1f"], +Cell[187580, 4864, 385, 6, 41, "Output",ExpressionUUID->"5d43789a-0d95-43e0-b863-031f947b2972"] }, Open ]], Cell[CellGroupData[{ -Cell[349264, 8550, 2221, 64, 348, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], -Cell[351488, 8616, 570, 12, 91, "Message",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], -Cell[352061, 8630, 573, 12, 91, "Message",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], -Cell[352637, 8644, 573, 12, 91, "Message",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], -Cell[353213, 8658, 458, 10, 26, "Message",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], -Cell[353674, 8670, 171, 3, 41, "Output",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] +Cell[188002, 4875, 206, 3, 36, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], +Cell[188211, 4880, 232, 3, 41, "Output",ExpressionUUID->"e97d6138-6381-42eb-93ea-1e18080fc528"] }, Open ]], +Cell[188458, 4886, 175, 2, 36, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], Cell[CellGroupData[{ -Cell[353882, 8678, 2221, 64, 348, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], -Cell[356106, 8744, 570, 12, 91, "Message",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], -Cell[356679, 8758, 573, 12, 91, "Message",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], -Cell[357255, 8772, 574, 12, 91, "Message",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], -Cell[357832, 8786, 458, 10, 26, "Message",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], -Cell[358293, 8798, 173, 3, 41, "Output",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] +Cell[188658, 4892, 204, 3, 36, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], +Cell[188865, 4897, 231, 3, 41, "Output",ExpressionUUID->"6fc1efaa-e4d2-4509-be9e-f2321d298db0"] }, Open ]], +Cell[189111, 4903, 171, 2, 36, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[358503, 8806, 215, 6, 60, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], -Cell[358721, 8814, 172, 3, 41, "Output",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] +Cell[189307, 4909, 1297, 42, 61, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], +Cell[190607, 4953, 262, 3, 41, "Output",ExpressionUUID->"a186a3e0-6ca4-4839-8184-8dcf9b2b6fb9"] }, Open ]], -Cell[358908, 8820, 115, 1, 36, "Input",ExpressionUUID->"370581aa-9efa-4b64-87cf-3407d34ae244"] +Cell[CellGroupData[{ +Cell[190906, 4961, 927, 30, 73, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], +Cell[191836, 4993, 262, 3, 41, "Output",ExpressionUUID->"21061b19-5038-4536-be79-a0b18abe23b7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[192135, 5001, 906, 29, 73, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], +Cell[193044, 5032, 266, 3, 41, "Output",ExpressionUUID->"ff8ed238-c4cd-4b31-919e-a33217e339f8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[193347, 5040, 554, 18, 66, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], +Cell[193904, 5060, 260, 3, 41, "Output",ExpressionUUID->"74981adf-6902-443e-9f15-bdded19056d4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[194201, 5068, 647, 21, 66, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], +Cell[194851, 5091, 258, 3, 41, "Output",ExpressionUUID->"25ff2014-de1e-4127-9b07-6f9d0b0699a9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[195146, 5099, 166, 4, 71, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], +Cell[195315, 5105, 262, 3, 41, "Output",ExpressionUUID->"f2da52a5-afab-4da4-8428-1bddd8524e51"] +}, Open ]], +Cell[CellGroupData[{ +Cell[195614, 5113, 166, 4, 69, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], +Cell[195783, 5119, 260, 3, 41, "Output",ExpressionUUID->"a57631c9-8e25-4287-a865-1f0ff01073f1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[196080, 5127, 177, 4, 55, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], +Cell[196260, 5133, 262, 3, 41, "Output",ExpressionUUID->"9aefc543-8b45-40bd-9064-1618e9e077e5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[196559, 5141, 177, 4, 55, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], +Cell[196739, 5147, 256, 3, 41, "Output",ExpressionUUID->"3b57836f-a76e-4332-b992-e44a81460803"] +}, Open ]], +Cell[CellGroupData[{ +Cell[197032, 5155, 6051, 184, 431, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], +Cell[203086, 5341, 264, 3, 41, "Output",ExpressionUUID->"77e2744c-041a-4502-922c-e5b070c350e9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[203387, 5349, 364, 8, 53, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], +Cell[203754, 5359, 260, 3, 41, "Output",ExpressionUUID->"5d701014-2cad-45fc-85fe-c1cb356a12db"] +}, Open ]], +Cell[CellGroupData[{ +Cell[204051, 5367, 6118, 186, 431, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], +Cell[210172, 5555, 261, 3, 41, "Output",ExpressionUUID->"776cdc9b-0bd0-434a-9456-53db2a511b34"] +}, Open ]], +Cell[CellGroupData[{ +Cell[210470, 5563, 364, 8, 53, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], +Cell[210837, 5573, 257, 3, 41, "Output",ExpressionUUID->"4d6568aa-0b00-423a-8be5-0a00f2a67ae3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[211131, 5581, 2659, 87, 215, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], +Cell[213793, 5670, 263, 3, 41, "Output",ExpressionUUID->"e4c38e4e-5d5e-47d4-b54f-cb0564c3c45e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[214093, 5678, 2599, 84, 215, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], +Cell[216695, 5764, 257, 3, 41, "Output",ExpressionUUID->"a9413fb1-0342-4e52-a6ce-6899a1e6c2dd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[216989, 5772, 3708, 117, 316, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], +Cell[220700, 5891, 263, 3, 41, "Output",ExpressionUUID->"8d37ff55-669a-4dbe-a8a9-2668522149cd"] +}, Open ]], +Cell[220978, 5897, 160, 3, 36, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], +Cell[CellGroupData[{ +Cell[221163, 5904, 2073, 58, 116, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], +Cell[223239, 5964, 654, 14, 48, "Message",ExpressionUUID->"98724400-7dcb-4caa-b74f-231793ff8b5e"], +Cell[223896, 5980, 658, 14, 71, "Message",ExpressionUUID->"2af98b5e-ab50-42a7-b385-c9b7d5501ebf"], +Cell[224557, 5996, 664, 14, 71, "Message",ExpressionUUID->"7d3652d1-e514-4593-a9a6-05a55f63df66"], +Cell[225224, 6012, 560, 12, 32, "Message",ExpressionUUID->"47a5e455-aecc-4db8-9e53-2f5e95ee8c5b"], +Cell[225787, 6026, 218, 3, 41, "Output",ExpressionUUID->"d3c5e2cf-82ea-4d04-8e13-55bc9831e886"] +}, Open ]], +Cell[CellGroupData[{ +Cell[226042, 6034, 2071, 58, 116, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], +Cell[228116, 6094, 609, 14, 48, "Message",ExpressionUUID->"c2c3906b-d245-42a4-a23c-d744b2e1f0d3"], +Cell[228728, 6110, 613, 14, 71, "Message",ExpressionUUID->"dff9fe07-2579-401e-a365-f7fdf2827aac"], +Cell[229344, 6126, 617, 14, 71, "Message",ExpressionUUID->"8a2a580f-7af0-41d8-aa8c-4f4e8c4facdd"], +Cell[229964, 6142, 515, 12, 32, "Message",ExpressionUUID->"a06c3051-9033-4762-a235-bbff734fdabb"], +Cell[230482, 6156, 212, 3, 41, "Output",ExpressionUUID->"2fe19f50-090c-4e86-8870-79436c5a55f8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[230731, 6164, 1955, 52, 86, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], +Cell[232689, 6218, 20341, 383, 295, "Output",ExpressionUUID->"49428130-3ed0-4404-96b4-cacefa0bbb92"] +}, Open ]], +Cell[CellGroupData[{ +Cell[253067, 6606, 2111, 59, 116, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], +Cell[255181, 6667, 531, 12, 48, "Message",ExpressionUUID->"7ee992bf-ce80-406d-9280-1f02d83c27b2"], +Cell[255715, 6681, 535, 12, 48, "Message",ExpressionUUID->"c337c175-0907-4c7c-8f0f-11d0ea90100b"], +Cell[256253, 6695, 538, 12, 48, "Message",ExpressionUUID->"18330615-b0ea-42e7-8c4f-7e21e78eed3c"], +Cell[256794, 6709, 493, 11, 32, "Message",ExpressionUUID->"9b5f16a7-c7f9-437a-b251-c493c9053efd"], +Cell[257290, 6722, 21901, 407, 290, "Output",ExpressionUUID->"4c702a14-b673-4235-ada5-4310ab2e47bc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[279228, 7134, 2477, 69, 140, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], +Cell[281708, 7205, 9492, 222, 298, "Output",ExpressionUUID->"0a2064b9-49ef-4727-9da6-345542d3ad61"] +}, Open ]], +Cell[CellGroupData[{ +Cell[291237, 7432, 228, 4, 36, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], +Cell[291468, 7438, 28262, 539, 290, "Output",ExpressionUUID->"e3300068-48f5-4dde-9c5a-e06626525018"] +}, Open ]], +Cell[CellGroupData[{ +Cell[319767, 7982, 236, 6, 61, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], +Cell[320006, 7990, 189, 2, 41, "Output",ExpressionUUID->"9c588486-851b-4bd2-b431-88287bda08da"] +}, Open ]], +Cell[CellGroupData[{ +Cell[320232, 7997, 1833, 52, 116, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], +Cell[322068, 8051, 544, 12, 48, "Message",ExpressionUUID->"fbb9e0e4-835b-4696-9ad0-c7662c6a9af3"], +Cell[322615, 8065, 544, 12, 48, "Message",ExpressionUUID->"5ec9b80f-2093-485e-80d3-ef6f1825ac06"], +Cell[323162, 8079, 546, 12, 48, "Message",ExpressionUUID->"ffa684a0-f02a-4e19-bb25-4e0233250fe2"], +Cell[323711, 8093, 493, 11, 32, "Message",ExpressionUUID->"214c3b99-f86e-4832-b759-72d7d1ef4cf2"], +Cell[324207, 8106, 21915, 407, 292, "Output",ExpressionUUID->"1947c267-810d-4ba8-ab35-6fcfd966c025"] +}, Open ]], +Cell[CellGroupData[{ +Cell[346159, 8518, 1616, 48, 86, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], +Cell[347778, 8568, 630, 13, 71, "Message",ExpressionUUID->"a1d21c89-26ab-4562-a752-3755b9a7dee8"], +Cell[348411, 8583, 631, 13, 71, "Message",ExpressionUUID->"a455fa80-a03f-44bb-90bc-d70de36f2677"], +Cell[349045, 8598, 638, 13, 71, "Message",ExpressionUUID->"247dbecb-b72b-4e41-aacb-fcfc37d9e707"], +Cell[349686, 8613, 493, 11, 32, "Message",ExpressionUUID->"b66d6385-1bc1-40bc-adc6-e2af1cb33d4d"], +Cell[350182, 8626, 195, 3, 41, "Output",ExpressionUUID->"b1eb9690-9668-490a-8703-2c0c2f199b74"] +}, Open ]], +Cell[CellGroupData[{ +Cell[350414, 8634, 2296, 65, 81, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], +Cell[352713, 8701, 591, 13, 48, "Message",ExpressionUUID->"81a128fb-889d-4b56-9f49-4ba6cb881870"], +Cell[353307, 8716, 593, 13, 71, "Message",ExpressionUUID->"454ca8be-df63-4408-9696-d7a3f1910237"], +Cell[353903, 8731, 599, 13, 71, "Message",ExpressionUUID->"d8e1697c-266c-41de-a5f2-84cff7d5c917"], +Cell[354505, 8746, 495, 11, 32, "Message",ExpressionUUID->"f774f38e-523a-48d1-9fff-e13f3c98e545"], +Cell[355003, 8759, 192, 3, 41, "Output",ExpressionUUID->"6a7918ed-1c51-42b4-be43-febbaec5e164"] +}, Open ]], +Cell[CellGroupData[{ +Cell[355232, 8767, 2233, 63, 81, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], +Cell[357468, 8832, 589, 13, 48, "Message",ExpressionUUID->"f9d42bdf-e80c-43d4-a36a-ce0375b59644"], +Cell[358060, 8847, 593, 13, 71, "Message",ExpressionUUID->"ec5ed300-8646-4830-9516-70263ed3775b"], +Cell[358656, 8862, 595, 13, 71, "Message",ExpressionUUID->"dd6ffee0-29fb-4e74-84c1-8e9ea390e9f7"], +Cell[359254, 8877, 493, 11, 32, "Message",ExpressionUUID->"f7277a3c-1221-4348-9429-2d78c2552caa"], +Cell[359750, 8890, 194, 3, 41, "Output",ExpressionUUID->"8d83013a-265a-405f-9b6f-704fd827939b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[359981, 8898, 2235, 63, 81, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], +Cell[362219, 8963, 589, 13, 48, "Message",ExpressionUUID->"d0dd5459-99be-4c9d-ba36-f650e7a2f18c"], +Cell[362811, 8978, 593, 13, 71, "Message",ExpressionUUID->"59cd7659-cbda-4180-8f5d-9e0df4ee9345"], +Cell[363407, 8993, 597, 13, 71, "Message",ExpressionUUID->"47478dbb-b822-40de-a05f-371f281d7671"], +Cell[364007, 9008, 495, 11, 32, "Message",ExpressionUUID->"a12503c2-d659-4ce0-a1e1-f8069244a813"], +Cell[364505, 9021, 193, 3, 41, "Output",ExpressionUUID->"0c3c4bde-6001-4a84-8a77-4721fba470a1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[364735, 9029, 236, 6, 60, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], +Cell[364974, 9037, 195, 3, 41, "Output",ExpressionUUID->"1bcae88b-9251-4df6-9ced-0f2a61680830"] +}, Open ]], +Cell[365184, 9043, 270, 6, 109, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], +Cell[CellGroupData[{ +Cell[365479, 9053, 558, 19, 66, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], +Cell[366040, 9074, 197, 3, 41, "Output",ExpressionUUID->"de36f3eb-ce24-484f-bcdb-34bdc4863c59"] +}, Open ]], +Cell[CellGroupData[{ +Cell[366274, 9082, 170, 5, 71, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], +Cell[366447, 9089, 192, 3, 41, "Output",ExpressionUUID->"3c0c2811-a2fd-4848-83e3-b0fbb57a4c39"] +}, Open ]], +Cell[CellGroupData[{ +Cell[366676, 9097, 181, 5, 55, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], +Cell[366860, 9104, 195, 3, 41, "Output",ExpressionUUID->"9442259f-57ce-4de2-bb49-dce675136547"] +}, Open ]], +Cell[CellGroupData[{ +Cell[367092, 9112, 6055, 185, 431, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], +Cell[373150, 9299, 197, 3, 41, "Output",ExpressionUUID->"8a693f76-8364-4d91-a6ad-c8c55c48ff8d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[373384, 9307, 368, 9, 53, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], +Cell[373755, 9318, 195, 3, 41, "Output",ExpressionUUID->"cc561807-107e-46b4-b163-ace78b7ec36e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[373987, 9326, 6122, 187, 431, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], +Cell[380112, 9515, 194, 3, 41, "Output",ExpressionUUID->"e2dde519-2e48-415d-a2a5-af087c0b393b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[380343, 9523, 368, 9, 53, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], +Cell[380714, 9534, 194, 3, 41, "Output",ExpressionUUID->"4f849243-408f-4f70-ba82-87190a97aed0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[380945, 9542, 2663, 88, 215, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], +Cell[383611, 9632, 194, 3, 41, "Output",ExpressionUUID->"e2cbd994-d6ce-40c0-a740-3ed77064ee5d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[383842, 9640, 2603, 85, 215, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], +Cell[386448, 9727, 192, 3, 41, "Output",ExpressionUUID->"8e314aec-8523-4dcf-af5b-0b7dc6c3a6c8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[386677, 9735, 3712, 118, 316, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], +Cell[390392, 9855, 193, 3, 41, "Output",ExpressionUUID->"e70f9df7-5067-461a-808d-234f9baa0d4d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[390622, 9863, 2075, 59, 116, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], +Cell[392700, 9924, 579, 13, 48, "Message",ExpressionUUID->"c1e1e560-4991-4e41-af5d-9bb1a8247c60"], +Cell[393282, 9939, 581, 13, 48, "Message",ExpressionUUID->"a78a4844-0fea-439c-9a18-94fca18d6588"], +Cell[393866, 9954, 585, 13, 48, "Message",ExpressionUUID->"3dc698fb-4ddf-4aa5-b5b6-08fc0f1ae0c3"], +Cell[394454, 9969, 495, 11, 32, "Message",ExpressionUUID->"647dd47b-3c44-4beb-a45b-99cdb2aaad21"], +Cell[394952, 9982, 193, 3, 41, "Output",ExpressionUUID->"33c50b2a-02b2-4e9c-b84a-94d58b897f87"] +}, Open ]], +Cell[CellGroupData[{ +Cell[395182, 9990, 2077, 59, 116, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], +Cell[397262, 10051, 581, 13, 48, "Message",ExpressionUUID->"cc6b3789-0a93-45d5-9929-a48989fbc58b"], +Cell[397846, 10066, 581, 13, 48, "Message",ExpressionUUID->"da3a4878-d96c-4161-86e7-4203ca7ed998"], +Cell[398430, 10081, 585, 13, 48, "Message",ExpressionUUID->"661258bc-bde2-4211-bf30-b45f2f3764ad"], +Cell[399018, 10096, 493, 11, 32, "Message",ExpressionUUID->"0147200b-1037-47cc-837c-fa122e5072ab"], +Cell[399514, 10109, 194, 3, 41, "Output",ExpressionUUID->"70fa42d5-9afe-4ecd-8a93-69d0bae8b777"] +}, Open ]], +Cell[CellGroupData[{ +Cell[399745, 10117, 2051, 55, 63, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], +Cell[401799, 10174, 20323, 381, 294, "Output",ExpressionUUID->"60e47437-e47b-46fb-8115-3d23f0e27d3b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[422159, 10560, 2143, 60, 116, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], +Cell[424305, 10622, 537, 12, 48, "Message",ExpressionUUID->"9c333887-6445-45c8-a68d-d433632cfe45"], +Cell[424845, 10636, 536, 12, 48, "Message",ExpressionUUID->"e974ebd4-d397-48cc-9a92-ad4764443a43"], +Cell[425384, 10650, 542, 12, 48, "Message",ExpressionUUID->"4a7c702a-8ace-4652-ad1a-8bfe883168e2"], +Cell[425929, 10664, 495, 11, 32, "Message",ExpressionUUID->"428df95a-003a-4764-ae51-51ec9e16b1da"], +Cell[426427, 10677, 22405, 414, 290, "Output",ExpressionUUID->"16d49726-da40-4d42-8530-3731610bba7a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[448869, 11096, 232, 5, 36, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], +Cell[449104, 11103, 28765, 546, 290, "Output",ExpressionUUID->"17f01e88-c85f-4c20-87a4-1f144415ac01"] +}, Open ]], +Cell[CellGroupData[{ +Cell[477906, 11654, 1616, 48, 86, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], +Cell[479525, 11704, 646, 13, 71, "Message",ExpressionUUID->"4efc7179-2389-4552-bfe2-902cf4874c48"], +Cell[480174, 11719, 648, 13, 71, "Message",ExpressionUUID->"012b007b-c241-46dd-be6c-7c5e2304b390"], +Cell[480825, 11734, 652, 13, 71, "Message",ExpressionUUID->"940a0e3b-c04f-491e-8819-5321a4bf89a3"], +Cell[481480, 11749, 495, 11, 32, "Message",ExpressionUUID->"79d7c03a-85ce-46fa-afa4-40adc6e46374"], +Cell[481978, 11762, 195, 3, 41, "Output",ExpressionUUID->"2620fece-20f7-4b8e-b091-85e2099c0e02"] +}, Open ]], +Cell[CellGroupData[{ +Cell[482210, 11770, 2271, 64, 81, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], +Cell[484484, 11836, 581, 13, 48, "Message",ExpressionUUID->"eba53fad-fc39-4e51-92fd-34d138f81d70"], +Cell[485068, 11851, 583, 13, 48, "Message",ExpressionUUID->"ac360164-0a17-4a5a-b299-49ca64535ee5"], +Cell[485654, 11866, 587, 13, 48, "Message",ExpressionUUID->"641f8d9b-23af-402e-8e2b-f53b2b11524f"], +Cell[486244, 11881, 497, 11, 32, "Message",ExpressionUUID->"2dfa88c3-fa9c-4226-8f5a-cda02d73c9e5"], +Cell[486744, 11894, 195, 3, 41, "Output",ExpressionUUID->"7937a08c-a092-45d6-9322-822b81445e53"] +}, Open ]], +Cell[CellGroupData[{ +Cell[486976, 11902, 2229, 63, 81, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], +Cell[489208, 11967, 580, 13, 48, "Message",ExpressionUUID->"a4768198-d8b6-4bed-aa76-842e11ffc219"], +Cell[489791, 11982, 583, 13, 48, "Message",ExpressionUUID->"b5fa3707-6d3e-4e61-bab3-a26d29085b8c"], +Cell[490377, 11997, 587, 13, 48, "Message",ExpressionUUID->"7a1bba91-075e-4fb7-8328-9a2549b7c0d0"], +Cell[490967, 12012, 495, 11, 32, "Message",ExpressionUUID->"17c65a92-56cd-499f-8ee0-cebc202cc6c2"], +Cell[491465, 12025, 193, 3, 41, "Output",ExpressionUUID->"5d82138d-ec7d-4396-aca8-1c02a0232d9e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[491695, 12033, 2235, 63, 81, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], +Cell[493933, 12098, 579, 13, 48, "Message",ExpressionUUID->"4cceb862-9a97-4a01-bb45-2878e38c035a"], +Cell[494515, 12113, 581, 13, 48, "Message",ExpressionUUID->"d73fb0a9-1801-4b42-a5bf-781ec5b67556"], +Cell[495099, 12128, 585, 13, 48, "Message",ExpressionUUID->"a1fe2e9d-45e7-41e0-8f7a-807e30349384"], +Cell[495687, 12143, 493, 11, 32, "Message",ExpressionUUID->"c587a616-a9a4-43ae-ac9b-a78e9c9f8ced"], +Cell[496183, 12156, 194, 3, 41, "Output",ExpressionUUID->"905e033e-4fdc-4c32-b134-acad0dda823b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[496414, 12164, 236, 6, 60, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], +Cell[496653, 12172, 200, 3, 41, "Output",ExpressionUUID->"e007053e-dd5b-41e6-a529-76937d592840"] +}, Open ]], +Cell[496868, 12178, 273, 6, 109, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], +Cell[CellGroupData[{ +Cell[497166, 12188, 558, 19, 66, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], +Cell[497727, 12209, 194, 3, 41, "Output",ExpressionUUID->"6434c6e3-88af-4db1-a232-018ab2e14312"] +}, Open ]], +Cell[CellGroupData[{ +Cell[497958, 12217, 170, 5, 71, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], +Cell[498131, 12224, 194, 3, 41, "Output",ExpressionUUID->"1262ca71-a0f7-48dd-bef2-212c8a6bc7b5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[498362, 12232, 181, 5, 55, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], +Cell[498546, 12239, 196, 3, 41, "Output",ExpressionUUID->"b80e957b-9128-4ac5-b72e-3ed01e433bf9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[498779, 12247, 6055, 185, 431, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], +Cell[504837, 12434, 195, 3, 41, "Output",ExpressionUUID->"6c345393-33fb-4c96-900a-c0af166ef0e0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[505069, 12442, 368, 9, 53, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], +Cell[505440, 12453, 197, 3, 41, "Output",ExpressionUUID->"f70891d9-79e1-4d17-8f65-6cdbd428bc11"] +}, Open ]], +Cell[CellGroupData[{ +Cell[505674, 12461, 6122, 187, 431, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], +Cell[511799, 12650, 194, 3, 41, "Output",ExpressionUUID->"db3d0ff0-6e14-42a0-b6f8-717c1e2b2787"] +}, Open ]], +Cell[CellGroupData[{ +Cell[512030, 12658, 368, 9, 53, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], +Cell[512401, 12669, 193, 3, 41, "Output",ExpressionUUID->"7f1c08d1-a088-4ff5-b4a6-48bd4c850502"] +}, Open ]], +Cell[CellGroupData[{ +Cell[512631, 12677, 2663, 88, 215, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], +Cell[515297, 12767, 196, 3, 41, "Output",ExpressionUUID->"b15cb45a-8dfb-4522-b1e8-c540f2cb1975"] +}, Open ]], +Cell[CellGroupData[{ +Cell[515530, 12775, 2603, 85, 215, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], +Cell[518136, 12862, 194, 3, 41, "Output",ExpressionUUID->"d604ac2f-793e-4e0f-bed9-431501e76acc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[518367, 12870, 3712, 118, 316, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], +Cell[522082, 12990, 198, 3, 41, "Output",ExpressionUUID->"b03bd0d4-d651-4e3d-a306-b64a7eb3f57f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[522317, 12998, 2075, 59, 116, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], +Cell[524395, 13059, 586, 13, 48, "Message",ExpressionUUID->"13c54846-6748-459c-8de6-bdf7f0b70352"], +Cell[524984, 13074, 588, 13, 48, "Message",ExpressionUUID->"b625b985-8f3e-47c9-a6a9-4a9ad480c03b"], +Cell[525575, 13089, 590, 13, 71, "Message",ExpressionUUID->"55cadb20-a070-4fad-bc5b-f991a0312da2"], +Cell[526168, 13104, 493, 11, 32, "Message",ExpressionUUID->"775237be-8684-4516-8d6d-4c0130319155"], +Cell[526664, 13117, 194, 3, 41, "Output",ExpressionUUID->"09337971-3d4c-4457-b52c-a87322939d71"] +}, Open ]], +Cell[CellGroupData[{ +Cell[526895, 13125, 2075, 59, 116, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], +Cell[528973, 13186, 586, 13, 48, "Message",ExpressionUUID->"eea76993-263e-499b-b75a-ad8282abadf5"], +Cell[529562, 13201, 588, 13, 48, "Message",ExpressionUUID->"8c7042cb-8eb7-4ccd-8de3-4f4f89ec20b8"], +Cell[530153, 13216, 591, 13, 71, "Message",ExpressionUUID->"93b4badf-3ac0-425e-9136-30770884f0c7"], +Cell[530747, 13231, 493, 11, 32, "Message",ExpressionUUID->"cf6a9807-c71e-42fc-b9c6-856a12633245"], +Cell[531243, 13244, 195, 3, 41, "Output",ExpressionUUID->"7fa5b87f-829b-41ce-bd88-788c38d1b567"] +}, Open ]], +Cell[CellGroupData[{ +Cell[531475, 13252, 2051, 55, 63, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], +Cell[533529, 13309, 20456, 386, 290, "Output",ExpressionUUID->"5942579e-aa3e-4451-9041-df401445fb9f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[554022, 13700, 2141, 60, 116, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], +Cell[556166, 13762, 534, 12, 48, "Message",ExpressionUUID->"8ad16d7c-72ce-448a-97b4-e663a3957ce7"], +Cell[556703, 13776, 537, 12, 48, "Message",ExpressionUUID->"ef625543-2ba6-4987-ac54-4cb61560eda0"], +Cell[557243, 13790, 541, 12, 48, "Message",ExpressionUUID->"c86ada11-7e2b-45ac-97b1-44cfcf084680"], +Cell[557787, 13804, 497, 11, 32, "Message",ExpressionUUID->"851dfb4f-a116-4761-b63d-4343d9eadb24"], +Cell[558287, 13817, 22176, 411, 290, "Output",ExpressionUUID->"2081fab6-70fa-45f9-8e1c-9873aed317f7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[580500, 14233, 232, 5, 36, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], +Cell[580735, 14240, 28536, 543, 290, "Output",ExpressionUUID->"ad7298d0-0cff-4b19-b948-d6eaf6bdf702"] +}, Open ]], +Cell[CellGroupData[{ +Cell[609308, 14788, 1616, 48, 86, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], +Cell[610927, 14838, 637, 13, 71, "Message",ExpressionUUID->"91758c94-06f6-41d6-ba30-cb8b396a36be"], +Cell[611567, 14853, 642, 13, 71, "Message",ExpressionUUID->"ff12bb4c-2016-4f04-ad7d-031e3607ea71"], +Cell[612212, 14868, 646, 13, 71, "Message",ExpressionUUID->"2c2cb1af-8f30-4d39-95a6-7ed482a6a4c8"], +Cell[612861, 14883, 495, 11, 32, "Message",ExpressionUUID->"dc4968a9-51b1-4efd-8e6e-6f6eea111242"], +Cell[613359, 14896, 193, 3, 41, "Output",ExpressionUUID->"1d2d8743-b173-479a-a1b4-c9c3bea72b3e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[613589, 14904, 2274, 64, 81, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], +Cell[615866, 14970, 586, 13, 48, "Message",ExpressionUUID->"6232d0d7-b88c-4fb4-b465-72c9c18e4d1b"], +Cell[616455, 14985, 587, 13, 48, "Message",ExpressionUUID->"591fdf83-2608-4e14-9335-ce861b02343d"], +Cell[617045, 15000, 591, 13, 71, "Message",ExpressionUUID->"38cd3638-db26-49fa-9e8a-02cef66ef4c7"], +Cell[617639, 15015, 492, 11, 32, "Message",ExpressionUUID->"3c21718c-ed27-4018-8afc-591fcaad924b"], +Cell[618134, 15028, 195, 3, 41, "Output",ExpressionUUID->"59d2a817-02e2-4d1d-a72b-8c1c3cfd4d38"] +}, Open ]], +Cell[CellGroupData[{ +Cell[618366, 15036, 2233, 63, 81, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], +Cell[620602, 15101, 588, 13, 48, "Message",ExpressionUUID->"4728e2a5-1ea9-4d2b-acba-23c9c9276094"], +Cell[621193, 15116, 590, 13, 48, "Message",ExpressionUUID->"14abb13f-7f0d-409e-98d7-c15ca0b96579"], +Cell[621786, 15131, 593, 13, 71, "Message",ExpressionUUID->"2adc46b1-3b88-444a-be06-f72e1c24ed81"], +Cell[622382, 15146, 497, 11, 32, "Message",ExpressionUUID->"32584fc0-250b-45d2-a3cb-17048fdf376b"], +Cell[622882, 15159, 192, 3, 41, "Output",ExpressionUUID->"bc1ddd23-440a-4b7e-baa5-a24adc06e09d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[623111, 15167, 2233, 63, 81, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], +Cell[625347, 15232, 586, 13, 48, "Message",ExpressionUUID->"d0f1946c-af38-45b9-a536-569b0fa85c5a"], +Cell[625936, 15247, 590, 13, 48, "Message",ExpressionUUID->"65267f96-893d-4dcb-98e2-2c97f3740874"], +Cell[626529, 15262, 593, 13, 71, "Message",ExpressionUUID->"ae5c3765-4a66-431c-a876-4bf174f9d1b1"], +Cell[627125, 15277, 495, 11, 32, "Message",ExpressionUUID->"6dca0c2a-cec0-4b50-ad4a-8d1b68a5b205"], +Cell[627623, 15290, 196, 3, 41, "Output",ExpressionUUID->"01f74080-b679-4be8-9949-c8666294f41a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[627856, 15298, 238, 6, 60, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], +Cell[628097, 15306, 197, 3, 41, "Output",ExpressionUUID->"f57860b8-3bd5-42a4-97a7-8075abf53be1"] +}, Open ]], +Cell[628309, 15312, 143, 3, 109, "Input",ExpressionUUID->"370581aa-9efa-4b64-87cf-3407d34ae244"], +Cell[628455, 15317, 201, 4, 109, "Input",ExpressionUUID->"52fcfbe4-a598-4872-aaf5-4287ed2d1246"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw1.nb b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw1.nb index b78f4c9..11610af 100644 --- a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw1.nb +++ b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 619043, 14980] -NotebookOptionsPosition[ 579184, 14349] -NotebookOutlinePosition[ 579625, 14367] -CellTagsIndexPosition[ 579582, 14364] +NotebookDataLength[ 697150, 16421] +NotebookOptionsPosition[ 656458, 15772] +NotebookOutlinePosition[ 656900, 15790] +CellTagsIndexPosition[ 656857, 15787] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -27,16 +27,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, - CellLabel-> - "In[408]:=",ExpressionUUID->"faf503b8-bf82-4409-955e-15ee2a94c2df"], + CellLabel->"In[1]:=",ExpressionUUID->"faf503b8-bf82-4409-955e-15ee2a94c2df"], Cell[BoxData["2"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, - 3.9940750908104277`*^9}}, - CellLabel-> - "Out[408]=",ExpressionUUID->"7dcd0da0-ce28-451b-a6f6-179b3ac96f74"] + 3.9940750908104277`*^9}, 3.994349986610195*^9, 3.994352536918981*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"814e3e8e-c0aa-4424-8c31-0630a938890a"] }, Open ]], Cell[CellGroupData[{ @@ -45,16 +43,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, - CellLabel-> - "In[409]:=",ExpressionUUID->"0482454e-7a46-47a1-a981-2b03e3a5820a"], + CellLabel->"In[2]:=",ExpressionUUID->"0482454e-7a46-47a1-a981-2b03e3a5820a"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, - 3.994075090853217*^9}}, - CellLabel-> - "Out[409]=",ExpressionUUID->"1ed7fc2d-5475-4719-b897-23a712e44396"] + 3.994075090853217*^9}, 3.994349987221389*^9, 3.9943525369726048`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"22beac2c-59c7-410a-b0a3-ef3994c1f869"] }, Open ]], Cell[CellGroupData[{ @@ -63,16 +59,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "170"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, - CellLabel-> - "In[410]:=",ExpressionUUID->"7e1f76b5-da0b-4708-bde6-bea9db2f787f"], + CellLabel->"In[3]:=",ExpressionUUID->"7e1f76b5-da0b-4708-bde6-bea9db2f787f"], Cell[BoxData["170"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, - 3.994075090864901*^9}}, - CellLabel-> - "Out[410]=",ExpressionUUID->"231b5efc-c0ff-44c8-80cd-9f5ce3841156"] + 3.994075090864901*^9}, 3.994349987241455*^9, 3.9943525369785147`*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"0c0a13ff-5b00-4aa9-9383-95032e5312e4"] }, Open ]], Cell[CellGroupData[{ @@ -80,16 +74,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[411]:=",ExpressionUUID->"b59b5ec0-bdc8-4f20-8ee1-a8b6af224589"], + CellLabel->"In[4]:=",ExpressionUUID->"b59b5ec0-bdc8-4f20-8ee1-a8b6af224589"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, - 3.9940750908767548`*^9}}, - CellLabel-> - "Out[411]=",ExpressionUUID->"bfce32fc-5e05-45d0-ba98-cb8aacbd0357"] + 3.9940750908767548`*^9}, 3.994349987284462*^9, 3.994352536987865*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"ddf5e378-7077-4367-944a-c38935b2ed2b"] }, Open ]], Cell[CellGroupData[{ @@ -101,32 +93,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"20530379-6c67-4b6d-a3a2-80100049257f"], + CellLabel->"In[5]:=",ExpressionUUID->"20530379-6c67-4b6d-a3a2-80100049257f"], Cell[BoxData["0.5437500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, - 3.994075090888695*^9}}, - CellLabel-> - "Out[412]=",ExpressionUUID->"2811e28b-07ed-4573-8619-55ef8fba4b35"] + 3.994075090888695*^9}, 3.994349987298872*^9, 3.994352536995349*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"4fccee45-d122-4913-9fed-396096a33e86"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"c131c4ba-350b-4e28-b404-b38b303d2bdb"], + CellLabel->"In[6]:=",ExpressionUUID->"c131c4ba-350b-4e28-b404-b38b303d2bdb"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, - 3.9940750909003353`*^9}}, - CellLabel-> - "Out[413]=",ExpressionUUID->"e7b4dc2b-fe02-46f7-8226-05931a569ef6"] + 3.9940750909003353`*^9}, 3.994349987310508*^9, 3.9943525370029593`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"25a19f85-5501-4638-a3ad-37744e7d709e"] }, Open ]], Cell[CellGroupData[{ @@ -137,16 +125,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[414]:=",ExpressionUUID->"7ccd5104-a703-429c-85c4-472095119179"], + CellLabel->"In[7]:=",ExpressionUUID->"7ccd5104-a703-429c-85c4-472095119179"], Cell[BoxData["6.426003577835178`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, - 3.9940750909055967`*^9}}, - CellLabel-> - "Out[414]=",ExpressionUUID->"d45ef454-4988-408a-9c43-f12d9533a1f1"] + 3.9940750909055967`*^9}, 3.994349987327943*^9, 3.99435253700961*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"4bf1a7da-78c7-4084-9d7a-6e599db88e31"] }, Open ]], Cell[CellGroupData[{ @@ -158,16 +144,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[415]:=",ExpressionUUID->"d84fb6ac-5c42-4ded-b544-a8c4c222399e"], + CellLabel->"In[8]:=",ExpressionUUID->"d84fb6ac-5c42-4ded-b544-a8c4c222399e"], Cell[BoxData["4.7806909477779245`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, - 3.994075090919847*^9}}, - CellLabel-> - "Out[415]=",ExpressionUUID->"b36670ac-5411-489e-b5aa-4a880e403306"] + 3.994075090919847*^9}, 3.994349987343257*^9, 3.99435253701607*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"4a6f50d0-c9f0-4bf1-ba0e-ad1871beab23"] }, Open ]], Cell[CellGroupData[{ @@ -175,15 +159,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8747255229"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, - CellLabel-> - "In[416]:=",ExpressionUUID->"2ecbf9f4-05d6-4a3e-9036-ede71c8661a1"], + CellLabel->"In[9]:=",ExpressionUUID->"2ecbf9f4-05d6-4a3e-9036-ede71c8661a1"], Cell[BoxData["0.8747255229`"], "Output", CellChangeTimes->{ 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, - 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}}, - CellLabel-> - "Out[416]=",ExpressionUUID->"efb938d7-4e73-414f-b299-17ae25e63fdd"] + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.9943499874760733`*^9, 3.9943525370224648`*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"c0531cb1-e00a-4769-91c8-714c3a1048a8"] }, Open ]], Cell[CellGroupData[{ @@ -191,47 +174,42 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3882072479"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, - CellLabel-> - "In[417]:=",ExpressionUUID->"e6a46019-5cb5-415d-bd52-06c6ee550cd5"], + CellLabel->"In[10]:=",ExpressionUUID->"e6a46019-5cb5-415d-bd52-06c6ee550cd5"], Cell[BoxData["0.3882072479`"], "Output", CellChangeTimes->{ 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, - 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}}, - CellLabel-> - "Out[417]=",ExpressionUUID->"b2e5b6d7-26e6-4ab5-93b4-e436656232bf"] + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994349987497568*^9, 3.994352537029293*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"bf203c90-71f7-4f16-9978-e58b1c6f1ef6"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[418]:=",ExpressionUUID->"4ef33a45-e772-4713-b351-ea3e169fd068"], + CellLabel->"In[11]:=",ExpressionUUID->"4ef33a45-e772-4713-b351-ea3e169fd068"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, - 3.994075090955942*^9}}, - CellLabel-> - "Out[418]=",ExpressionUUID->"d8af5bd4-2231-4326-b532-292130c5eddd"] + 3.994075090955942*^9}, 3.9943499875185432`*^9, 3.994352537035578*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"a4bf26f2-dba0-4500-b8ef-74c3f337d400"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[419]:=",ExpressionUUID->"0a8a9ae5-b423-42bd-af89-cb4709c6dbb9"], + CellLabel->"In[12]:=",ExpressionUUID->"0a8a9ae5-b423-42bd-af89-cb4709c6dbb9"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, - 3.9940750909684067`*^9}}, - CellLabel-> - "Out[419]=",ExpressionUUID->"2606210e-db88-4da1-836a-498e7b4da9f1"] + 3.9940750909684067`*^9}, 3.99434998754319*^9, 3.9943525370415993`*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"5271f56d-73bd-4207-86b2-55e8ad65e29b"] }, Open ]], Cell[CellGroupData[{ @@ -255,16 +233,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[420]:=",ExpressionUUID->"798d81cf-8599-4a8c-9c09-952b3eedf2c9"], + CellLabel->"In[13]:=",ExpressionUUID->"798d81cf-8599-4a8c-9c09-952b3eedf2c9"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, - 3.994075090978916*^9}}, - CellLabel-> - "Out[420]=",ExpressionUUID->"448e88d2-7fc6-4699-8327-90cd3e45a5b5"] + 3.994075090978916*^9}, 3.9943499875703297`*^9, 3.994352537052124*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"89fd1218-c897-41ab-b511-a5b2f209a7b1"] }, Open ]], Cell[CellGroupData[{ @@ -288,16 +264,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[421]:=",ExpressionUUID->"d28a4f17-6e1f-44e0-8aeb-0dadd20f46e9"], + CellLabel->"In[14]:=",ExpressionUUID->"d28a4f17-6e1f-44e0-8aeb-0dadd20f46e9"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, - 3.99407509098914*^9}}, - CellLabel-> - "Out[421]=",ExpressionUUID->"01e30b20-77a9-4106-acd1-f09b0656e464"] + 3.99407509098914*^9}, 3.994349987592244*^9, 3.994352537061124*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"c45fc8f5-82b9-4499-a21a-ce412d8d6dfb"] }, Open ]], Cell[CellGroupData[{ @@ -352,16 +326,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[422]:=",ExpressionUUID->"c38b68b1-105e-4887-ac1a-9ca660ce7261"], + CellLabel->"In[15]:=",ExpressionUUID->"c38b68b1-105e-4887-ac1a-9ca660ce7261"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, - 3.994075090999715*^9}}, - CellLabel-> - "Out[422]=",ExpressionUUID->"e9aab4fb-febd-46e7-9c91-d99929afee2f"] + 3.994075090999715*^9}, 3.9943499876154413`*^9, 3.9943525370686903`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"7f30457c-06ac-4f7f-91dd-7e30f086bf7f"] }, Open ]], Cell[CellGroupData[{ @@ -412,17 +384,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[423]:=",ExpressionUUID->"288b92fe-a08b-4910-9c73-2479be62d5f4"], + CellLabel->"In[16]:=",ExpressionUUID->"288b92fe-a08b-4910-9c73-2479be62d5f4"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, - 3.994075091010479*^9}}, - CellLabel-> - "Out[423]=",ExpressionUUID->"3e994045-7be0-44c7-b7b0-b5ea746b9807"] + 3.994075091010479*^9}, 3.994349987643477*^9, 3.9943525370752497`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"6db1a079-fe02-49a0-a79e-c62e856a8cd5"] }, Open ]], Cell[CellGroupData[{ @@ -473,17 +443,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[424]:=",ExpressionUUID->"7deb9773-c069-4aa9-8bf5-d3e375b009af"], + CellLabel->"In[17]:=",ExpressionUUID->"7deb9773-c069-4aa9-8bf5-d3e375b009af"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, - 3.9940750910236893`*^9}}, - CellLabel-> - "Out[424]=",ExpressionUUID->"9cfe3724-4ddd-4d09-bfff-ef96385f8adc"] + 3.9940750910236893`*^9}, 3.994349987706311*^9, 3.99435253708355*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"fcdb9cb2-654e-473c-9d68-d1288a7576de"] }, Open ]], Cell[CellGroupData[{ @@ -491,109 +459,103 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c22", "=", RowBox[{"1", "-", - FractionBox[ - RowBox[{ - RowBox[{"(", - RowBox[{ - RowBox[{"R01", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w1", "2"]}]}], ")"}], "*", - RowBox[{"(", - RowBox[{ - SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], - RowBox[{ - RowBox[{"R01", "*", + RowBox[{ + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w2", "2"]}], "+", - RowBox[{"R02", "*", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w1", "2"]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[425]:=",ExpressionUUID->"ff528133-b2b2-4632-a8b1-e3cc7c87bf02"], + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[18]:=",ExpressionUUID->"ff528133-b2b2-4632-a8b1-e3cc7c87bf02"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, - 3.994075091035767*^9}}, - CellLabel-> - "Out[425]=",ExpressionUUID->"426a65d0-5ac1-42a0-83ba-77b04562f15e"] + 3.994075091035767*^9}, 3.994349987729898*^9, 3.99435253709056*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"c8f166a9-8093-4e53-8b4b-03897e74e16f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[426]:=",ExpressionUUID->"c76593e4-5022-433f-bc20-c104d8c438c6"], + CellLabel->"In[19]:=",ExpressionUUID->"c76593e4-5022-433f-bc20-c104d8c438c6"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, - 3.9940750910471153`*^9}}, - CellLabel-> - "Out[426]=",ExpressionUUID->"8d293245-efa7-4d05-80bc-d82b84f5d512"] + 3.9940750910471153`*^9}, 3.994349987782955*^9, 3.994352537097616*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"75403b98-9aa8-43d3-af1a-0e1131c9c9e4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[427]:=",ExpressionUUID->"577be7ba-83c4-4f8c-b77c-efd450a50206"], + CellLabel->"In[20]:=",ExpressionUUID->"577be7ba-83c4-4f8c-b77c-efd450a50206"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, - 3.9940750910581427`*^9}}, - CellLabel-> - "Out[427]=",ExpressionUUID->"504fa325-c1cf-49c7-9d67-59287b96c20b"] + 3.9940750910581427`*^9}, 3.994349987838822*^9, 3.994352537103898*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"979a028c-58d8-49ce-8c03-7b483dc84c62"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[428]:=",ExpressionUUID->"db4b09ee-1b65-4f02-aa32-ae3647575031"], + CellLabel->"In[21]:=",ExpressionUUID->"db4b09ee-1b65-4f02-aa32-ae3647575031"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, - 3.994075091069083*^9}}, - CellLabel-> - "Out[428]=",ExpressionUUID->"f6341bac-028e-4117-a388-942d499e30b8"] + 3.994075091069083*^9}, 3.994349987866993*^9, 3.994352537111747*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"86c324a6-0964-431f-a865-6e762b989cda"] }, Open ]], Cell[CellGroupData[{ @@ -602,33 +564,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[429]:=",ExpressionUUID->"36e5c699-a54a-4843-8823-32fbba51e948"], + CellLabel->"In[22]:=",ExpressionUUID->"36e5c699-a54a-4843-8823-32fbba51e948"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, - 3.994075091080567*^9}}, - CellLabel-> - "Out[429]=",ExpressionUUID->"3b9f8bfd-b9b1-4cf7-8d29-889e8ee20440"] + 3.994075091080567*^9}, 3.994349987892992*^9, 3.994352537118964*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"0170ad78-7f93-45dc-b2b6-20b41860db32"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[430]:=",ExpressionUUID->"6c7e19fa-dac6-4294-a9da-c64cf80c099c"], + CellLabel->"In[23]:=",ExpressionUUID->"6c7e19fa-dac6-4294-a9da-c64cf80c099c"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, - 3.994075091090703*^9}}, - CellLabel-> - "Out[430]=",ExpressionUUID->"9a6e3eca-8464-45d5-b6c0-ea2a6c019f4b"] + 3.994075091090703*^9}, 3.994349987919627*^9, 3.994352537125484*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"7bfd5c76-2192-4095-987b-eed000bbe68d"] }, Open ]], Cell[CellGroupData[{ @@ -638,16 +596,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073690740699*^9, 3.994073690862359*^9}}, - CellLabel-> - "In[431]:=",ExpressionUUID->"c2ea0e2c-bdb3-49a4-b5fd-e06b5d537674"], + CellLabel->"In[24]:=",ExpressionUUID->"c2ea0e2c-bdb3-49a4-b5fd-e06b5d537674"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, - 3.994075091102222*^9}}, - CellLabel-> - "Out[431]=",ExpressionUUID->"ab9e21c5-3598-41d6-b7dc-e4731c13abe4"] + 3.994075091102222*^9}, 3.994349987947522*^9, 3.994352537131518*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"0e769203-0c14-4ab5-8aa2-37f7225e2534"] }, Open ]], Cell[CellGroupData[{ @@ -657,16 +613,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, - CellLabel-> - "In[432]:=",ExpressionUUID->"451bc2a2-746f-407f-ab4a-b355e77abe9b"], + CellLabel->"In[25]:=",ExpressionUUID->"451bc2a2-746f-407f-ab4a-b355e77abe9b"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, - 3.994075091112747*^9}}, - CellLabel-> - "Out[432]=",ExpressionUUID->"9719b37f-2430-441b-9ac9-e04ef62a3385"] + 3.994075091112747*^9}, 3.9943499879701014`*^9, 3.994352537140211*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"8a28245e-df6d-4625-8e4e-83fef895a25a"] }, Open ]], Cell[CellGroupData[{ @@ -675,16 +629,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[433]:=",ExpressionUUID->"f5226187-30d5-47f5-9822-c9e8fcd842dd"], + CellLabel->"In[26]:=",ExpressionUUID->"f5226187-30d5-47f5-9822-c9e8fcd842dd"], Cell[BoxData["70"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, - 3.9940750911232967`*^9}}, - CellLabel-> - "Out[433]=",ExpressionUUID->"5be17cba-0629-4c94-b2de-e158b43ba315"] + 3.9940750911232967`*^9}, 3.994349987991637*^9, 3.994352537146381*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"859e781e-69c5-4c8a-9039-232c24bbe1af"] }, Open ]], Cell[CellGroupData[{ @@ -699,16 +651,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[434]:=",ExpressionUUID->"ae36c648-63dc-4c97-8921-aacc9a1502d7"], + CellLabel->"In[27]:=",ExpressionUUID->"ae36c648-63dc-4c97-8921-aacc9a1502d7"], Cell[BoxData["0.1087764705882353`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, - 3.994075091133902*^9}}, - CellLabel-> - "Out[434]=",ExpressionUUID->"3d7f70c5-5f1a-40a7-a2e3-f61b09b7c563"] + 3.994075091133902*^9}, 3.994349988012348*^9, 3.9943525371525087`*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"37ee0c17-8706-4f90-9307-a01a7523a817"] }, Open ]], Cell[CellGroupData[{ @@ -723,17 +673,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[435]:=",ExpressionUUID->"1c8c0d19-1c22-468b-b120-8bd73a3590bf"], + CellLabel->"In[28]:=",ExpressionUUID->"1c8c0d19-1c22-468b-b120-8bd73a3590bf"], Cell[BoxData[ RowBox[{"-", "2.5658588235294117`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, - 3.9940750911440773`*^9}}, - CellLabel-> - "Out[435]=",ExpressionUUID->"7dd762ff-da61-4554-aa40-fdcb5de59ac9"] + 3.9940750911440773`*^9}, 3.9943499880370827`*^9, 3.9943525371586246`*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"dfec7bc3-4931-42db-8b21-d0db9c7f2cae"] }, Open ]], Cell[CellGroupData[{ @@ -764,16 +712,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[436]:=",ExpressionUUID->"47c0c7b8-007c-4975-a6a2-6b6f0fec59c0"], + CellLabel->"In[29]:=",ExpressionUUID->"47c0c7b8-007c-4975-a6a2-6b6f0fec59c0"], Cell[BoxData["17.474387700041003`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, - 3.9940750911556253`*^9}}, - CellLabel-> - "Out[436]=",ExpressionUUID->"80421a31-fa4c-4cc0-a7aa-24a2f7c26657"] + 3.9940750911556253`*^9}, 3.994349988063176*^9, 3.994352537165329*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"cba44d21-fd16-4643-b813-a4a8a468bd18"] }, Open ]], Cell[CellGroupData[{ @@ -781,16 +727,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[437]:=",ExpressionUUID->"c810247c-73c8-4319-8fe6-4d16224b180a"], + CellLabel->"In[30]:=",ExpressionUUID->"c810247c-73c8-4319-8fe6-4d16224b180a"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, - 3.99407509116647*^9}}, - CellLabel-> - "Out[437]=",ExpressionUUID->"d4478ff5-8048-44e0-b1e0-74303ae3682e"] + 3.99407509116647*^9}, 3.994349988088962*^9, 3.994352537171351*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"dd27bb24-802d-4646-aa63-641b82ae7ed0"] }, Open ]], Cell[CellGroupData[{ @@ -800,21 +744,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.9940737081112833`*^9, 3.994073709172043*^9}}, - CellLabel-> - "In[438]:=",ExpressionUUID->"e8439067-3845-4d86-b0de-851c2f5f29d9"], + CellLabel->"In[31]:=",ExpressionUUID->"e8439067-3845-4d86-b0de-851c2f5f29d9"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{ 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, - 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}}, - CellLabel-> - "Out[438]=",ExpressionUUID->"963196ec-2acd-4451-9d10-777b378f56b8"] + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.994349988112339*^9, 3.994352537178234*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"7bc0617e-f5bd-47ef-9d3e-abc460ee4c41"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[439]:=",ExpressionUUID->"0ff2aa6d-ae8f-4495-8d98-c7fdb2b39241"], + CellLabel->"In[32]:=",ExpressionUUID->"0ff2aa6d-ae8f-4495-8d98-c7fdb2b39241"], Cell[CellGroupData[{ @@ -823,21 +765,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073711335288*^9, 3.994073712564888*^9}}, - CellLabel-> - "In[440]:=",ExpressionUUID->"2f03b11b-316f-4525-8cf1-d218b17ee3a9"], + CellLabel->"In[33]:=",ExpressionUUID->"2f03b11b-316f-4525-8cf1-d218b17ee3a9"], Cell[BoxData["0.785`"], "Output", CellChangeTimes->{ 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, - 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}}, - CellLabel-> - "Out[440]=",ExpressionUUID->"d6d63f32-4b97-409b-9c0e-6499ffa93417"] + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.994349988159536*^9, 3.99435253718775*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"7896c708-8d81-4a4a-b78c-03629e257e8b"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[441]:=",ExpressionUUID->"74301e05-69cc-480d-934c-a1b00099d8bc"], + CellLabel->"In[34]:=",ExpressionUUID->"74301e05-69cc-480d-934c-a1b00099d8bc"], Cell[CellGroupData[{ @@ -846,21 +786,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940737150021257`*^9, 3.994073716213628*^9}}, - CellLabel-> - "In[442]:=",ExpressionUUID->"ac3a0401-11e4-4255-90e3-a666a2b3e134"], + CellLabel->"In[35]:=",ExpressionUUID->"ac3a0401-11e4-4255-90e3-a666a2b3e134"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{ 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, - 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}}, - CellLabel-> - "Out[442]=",ExpressionUUID->"70bb58d4-3fc8-4849-b431-2decee6fbd82"] + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.994349988296597*^9, 3.994352537198862*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"77c5fa2c-a91b-461e-9c2b-7f44b94520c8"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[443]:=",ExpressionUUID->"aca2a824-518f-4e0c-9dc3-7c4b1cbbab9b"], + CellLabel->"In[36]:=",ExpressionUUID->"aca2a824-518f-4e0c-9dc3-7c4b1cbbab9b"], Cell[CellGroupData[{ @@ -869,21 +807,19 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, - CellLabel-> - "In[444]:=",ExpressionUUID->"2cdc5ad7-2cf7-490b-a717-99d56799cda0"], + CellLabel->"In[37]:=",ExpressionUUID->"2cdc5ad7-2cf7-490b-a717-99d56799cda0"], Cell[BoxData["1.125`"], "Output", CellChangeTimes->{ 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, - 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}}, - CellLabel-> - "Out[444]=",ExpressionUUID->"0fc64376-bdbf-4291-b37e-55200f87693a"] + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.99434998832959*^9, 3.9943525372091703`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"55923ae0-b650-407e-b57d-41be7165d38f"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[445]:=",ExpressionUUID->"cfe644e6-6a71-4395-a7c6-8a24e6df830b"], + CellLabel->"In[38]:=",ExpressionUUID->"cfe644e6-6a71-4395-a7c6-8a24e6df830b"], Cell[CellGroupData[{ @@ -892,21 +828,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, 3.9940737264630413`*^9}}, - CellLabel-> - "In[446]:=",ExpressionUUID->"eb3757d9-7ff9-4674-8ef6-4c8a7dc320a2"], + CellLabel->"In[39]:=",ExpressionUUID->"eb3757d9-7ff9-4674-8ef6-4c8a7dc320a2"], Cell[BoxData["1.145`"], "Output", CellChangeTimes->{ 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, - 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}}, - CellLabel-> - "Out[446]=",ExpressionUUID->"1f65794f-2b1c-4452-aab4-7b85dcd256bf"] + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.994349988371475*^9, 3.9943525372193613`*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"4d0e48de-8bde-477d-8fd9-690e0d5de757"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[447]:=",ExpressionUUID->"ae670d93-2719-4f7e-8005-30cd2720262b"], + CellLabel->"In[40]:=",ExpressionUUID->"ae670d93-2719-4f7e-8005-30cd2720262b"], Cell[CellGroupData[{ @@ -915,21 +849,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, 3.994073731586865*^9}}, - CellLabel-> - "In[448]:=",ExpressionUUID->"42992945-6511-420b-aeb1-baab39cc276b"], + CellLabel->"In[41]:=",ExpressionUUID->"42992945-6511-420b-aeb1-baab39cc276b"], Cell[BoxData["0.565`"], "Output", CellChangeTimes->{ 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, - 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}}, - CellLabel-> - "Out[448]=",ExpressionUUID->"339d80cd-fb9a-4ba1-bc47-63f890e7eedb"] + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.994349988396262*^9, 3.9943525372295437`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"33f5026a-7077-42a8-bdb5-8bf19f64d45f"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[449]:=",ExpressionUUID->"30d9c5d5-74cd-42c0-87fa-52be7a0496a6"], + CellLabel->"In[42]:=",ExpressionUUID->"30d9c5d5-74cd-42c0-87fa-52be7a0496a6"], Cell[CellGroupData[{ @@ -938,21 +870,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, 3.994073737300967*^9}}, - CellLabel-> - "In[450]:=",ExpressionUUID->"b7618fd1-2275-4c4d-8608-c841f952eb45"], + CellLabel->"In[43]:=",ExpressionUUID->"b7618fd1-2275-4c4d-8608-c841f952eb45"], Cell[BoxData["1.5`"], "Output", CellChangeTimes->{ 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, - 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}}, - CellLabel-> - "Out[450]=",ExpressionUUID->"958ec7a0-713c-415b-a96e-0c6e2c641577"] + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.9943499884196157`*^9, 3.994352537238669*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"d7817b11-25ab-424f-a28a-4a002db04695"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[451]:=",ExpressionUUID->"483ac3d1-0043-4c48-962e-dc44f7738e5e"], + CellLabel->"In[44]:=",ExpressionUUID->"483ac3d1-0043-4c48-962e-dc44f7738e5e"], Cell[CellGroupData[{ @@ -960,21 +890,19 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.635"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, - CellLabel-> - "In[452]:=",ExpressionUUID->"6d50d0b3-d04f-4154-b54d-ecb80531dd64"], + CellLabel->"In[45]:=",ExpressionUUID->"6d50d0b3-d04f-4154-b54d-ecb80531dd64"], Cell[BoxData["0.635`"], "Output", CellChangeTimes->{ 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, - 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}}, - CellLabel-> - "Out[452]=",ExpressionUUID->"4c03725b-01c1-44e2-bea9-12329b1a9c88"] + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.994349988443768*^9, 3.994352537248096*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"1b05aedd-2890-496c-a266-e7580e407ef4"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[453]:=",ExpressionUUID->"cce1f09e-472d-43a8-b22a-f75983ffc02b"], + CellLabel->"In[46]:=",ExpressionUUID->"cce1f09e-472d-43a8-b22a-f75983ffc02b"], Cell[CellGroupData[{ @@ -1463,16 +1391,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[454]:=",ExpressionUUID->"e9fe2a31-f845-48e7-a025-f041278678bb"], + CellLabel->"In[47]:=",ExpressionUUID->"e9fe2a31-f845-48e7-a025-f041278678bb"], Cell[BoxData["0.12734722137174234`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, - 3.994075091306961*^9}}, - CellLabel-> - "Out[454]=",ExpressionUUID->"8587f47c-9752-4ad1-8635-562ee6f9d838"] + 3.994075091306961*^9}, 3.994349988663845*^9, 3.994352537337516*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"b3b900db-480a-43db-8b08-e093e862eb33"] }, Open ]], Cell[CellGroupData[{ @@ -1966,16 +1892,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[455]:=",ExpressionUUID->"bed3b2d2-7173-4716-8631-10ab9d971dba"], + CellLabel->"In[48]:=",ExpressionUUID->"bed3b2d2-7173-4716-8631-10ab9d971dba"], Cell[BoxData["7.503764283698204`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, - 3.994075091332656*^9}}, - CellLabel-> - "Out[455]=",ExpressionUUID->"1f015ce4-62ae-4fca-9ffc-65f0d23e6c1e"] + 3.994075091332656*^9}, 3.994349988877015*^9, 3.994352537375074*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"8eecd7f3-b16f-477f-8462-7f8b1ce48577"] }, Open ]], Cell[CellGroupData[{ @@ -2463,17 +2387,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[456]:=",ExpressionUUID->"3d1eee7d-aed8-404e-842a-b2d39195cb1c"], + CellLabel->"In[49]:=",ExpressionUUID->"3d1eee7d-aed8-404e-842a-b2d39195cb1c"], Cell[BoxData[ RowBox[{"-", "14.220629552114458`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, - 3.994075091358534*^9}}, - CellLabel-> - "Out[456]=",ExpressionUUID->"6e9b5e38-1d21-4cfb-88f4-f67d2766736f"] + 3.994075091358534*^9}, 3.994349988988562*^9, 3.9943525374103737`*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"f3276dd7-e1e0-4d95-a32e-57cab61a51aa"] }, Open ]], Cell[CellGroupData[{ @@ -3031,17 +2953,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[457]:=",ExpressionUUID->"57977419-3181-4bd7-b046-b5348ce6379e"], + CellLabel->"In[50]:=",ExpressionUUID->"57977419-3181-4bd7-b046-b5348ce6379e"], Cell[BoxData[ RowBox[{"-", "18.05754390959481`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, - 3.99407509139049*^9}}, - CellLabel-> - "Out[457]=",ExpressionUUID->"34c30351-3f9e-4608-9c56-249e5c22b8a4"] + 3.99407509139049*^9}, 3.994349989249803*^9, 3.994352537448635*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"7b50ec7e-569d-4670-b156-4b44400b6f09"] }, Open ]], Cell[CellGroupData[{ @@ -3599,17 +3519,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[458]:=",ExpressionUUID->"4a92750a-5025-4c91-9ece-3360c1b46e63"], + CellLabel->"In[51]:=",ExpressionUUID->"4a92750a-5025-4c91-9ece-3360c1b46e63"], Cell[BoxData[ RowBox[{"-", "51.76635903245878`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, - 3.994075091423628*^9}}, - CellLabel-> - "Out[458]=",ExpressionUUID->"09910f10-5c1d-409b-9a47-88b772e540fc"] + 3.994075091423628*^9}, 3.994349989665111*^9, 3.9943525374874783`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"2d92d7d8-dbde-4ce1-84a2-ed20dedf9e5d"] }, Open ]], Cell[CellGroupData[{ @@ -4240,49 +4158,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[459]:=",ExpressionUUID->"2d9d5c62-e6c7-4f94-8992-fb01069f2bc8"], + CellLabel->"In[52]:=",ExpressionUUID->"2d9d5c62-e6c7-4f94-8992-fb01069f2bc8"], Cell[BoxData[ RowBox[{"-", "131.16526179683018`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, - 3.9940750914627743`*^9}}, - CellLabel-> - "Out[459]=",ExpressionUUID->"af329f52-9f93-4724-945b-860188860e51"] + 3.9940750914627743`*^9}, 3.994349989788344*^9, 3.994352537534348*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"588a3899-36cc-443c-9b5c-af6dc836d233"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[460]:=",ExpressionUUID->"577a6f40-f17a-46a7-86e4-31839bd7c63f"], + CellLabel->"In[53]:=",ExpressionUUID->"577a6f40-f17a-46a7-86e4-31839bd7c63f"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, - 3.994075091476185*^9}}, - CellLabel-> - "Out[460]=",ExpressionUUID->"0aa2cc7d-063d-42b7-aed0-1aca1ef94296"] + 3.994075091476185*^9}, 3.994349989892473*^9, 3.994352537546229*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"c8a9b157-f59a-4975-8d96-fa8e7e408a33"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[461]:=",ExpressionUUID->"bddadc26-aed4-4de8-861b-3eed221711a3"], + CellLabel->"In[54]:=",ExpressionUUID->"bddadc26-aed4-4de8-861b-3eed221711a3"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, - 3.994075091486505*^9}}, - CellLabel-> - "Out[461]=",ExpressionUUID->"a3f94d76-478b-4242-a14d-f9cce6c9dc13"] + 3.994075091486505*^9}, 3.994349989928753*^9, 3.9943525375527678`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"db6e391b-2666-4c46-9b39-05f6199b61aa"] }, Open ]], Cell[CellGroupData[{ @@ -4326,16 +4238,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[462]:=",ExpressionUUID->"7758746a-3303-4080-8034-003e81e72aab"], + CellLabel->"In[55]:=",ExpressionUUID->"7758746a-3303-4080-8034-003e81e72aab"], Cell[BoxData["102.57012833062927`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, - 3.994075091497402*^9}}, - CellLabel-> - "Out[462]=",ExpressionUUID->"c5fb0dbf-94ba-4aca-aa17-6adcdae2a7f3"] + 3.994075091497402*^9}, 3.994349989945673*^9, 3.994352537559493*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"364d50d7-7e20-4a8f-9ef1-3028cf2ad81a"] }, Open ]], Cell[CellGroupData[{ @@ -4375,17 +4285,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[463]:=",ExpressionUUID->"864b711b-7ed6-4139-9bf5-17283229ae04"], + CellLabel->"In[56]:=",ExpressionUUID->"864b711b-7ed6-4139-9bf5-17283229ae04"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, - 3.994075091508032*^9}}, - CellLabel-> - "Out[463]=",ExpressionUUID->"c13a7a11-cf1a-49d1-bf4f-ff7375eeeab0"] + 3.994075091508032*^9}, 3.994349989966955*^9, 3.994352537568205*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"c32f318e-880a-41f0-a0ed-1982283ca243"] }, Open ]], Cell[CellGroupData[{ @@ -4429,103 +4337,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[464]:=",ExpressionUUID->"0cefa213-96fe-4065-8dbb-30c6a021066f"], + CellLabel->"In[57]:=",ExpressionUUID->"0cefa213-96fe-4065-8dbb-30c6a021066f"], Cell[BoxData["106.05157029710364`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, - 3.994075091518471*^9}}, - CellLabel-> - "Out[464]=",ExpressionUUID->"59e314fd-9410-48a9-aeb6-18fc922cea3b"] + 3.994075091518471*^9}, 3.99434998998804*^9, 3.9943525375750628`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"d7ce40e6-618c-41c4-ad03-c47a0741c6af"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[465]:=",ExpressionUUID->"0be320fe-f46c-457e-b8fd-af97c3546bdc"], + CellLabel->"In[58]:=",ExpressionUUID->"0be320fe-f46c-457e-b8fd-af97c3546bdc"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, - 3.99407509152868*^9}}, - CellLabel-> - "Out[465]=",ExpressionUUID->"6edda228-88ac-4b6c-9766-ae1a82bff058"] + 3.99407509152868*^9}, 3.99434999002677*^9, 3.9943525375812674`*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"055ec95d-f69f-4962-bac4-2a59205cf84b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[466]:=",ExpressionUUID->"025364aa-405c-4d73-b1ea-94437671667d"], + CellLabel->"In[59]:=",ExpressionUUID->"025364aa-405c-4d73-b1ea-94437671667d"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, - 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}}, - CellLabel-> - "Out[466]=",ExpressionUUID->"a0f20734-4a80-499a-9b52-5e08ea865325"] + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.994349990073927*^9, 3.994352537587289*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"c737c59e-5e6b-475e-b4e1-78a23d4b1202"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[467]:=",ExpressionUUID->"c370832f-4e6d-42fa-bc49-5128ff0384ba"], + CellLabel->"In[60]:=",ExpressionUUID->"c370832f-4e6d-42fa-bc49-5128ff0384ba"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, - 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}}, - CellLabel-> - "Out[467]=",ExpressionUUID->"d04b1e2e-2127-4cc2-804b-b6b3d0e428f7"] + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.994349990107481*^9, 3.9943525375933332`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"51fdec94-c7f1-42cb-9a44-ace3f2a1f9d7"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[468]:=",ExpressionUUID->"91986df6-265b-411a-9ec2-1af16f04a5e4"], + CellLabel->"In[61]:=",ExpressionUUID->"91986df6-265b-411a-9ec2-1af16f04a5e4"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, - 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}}, - CellLabel-> - "Out[468]=",ExpressionUUID->"ff17035c-412b-4bf0-ad41-0ae59cb3ca9f"] + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.994349990161047*^9, 3.9943525376001596`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"e0713234-7f62-429d-b783-f23e0e81d791"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[469]:=",ExpressionUUID->"47c69875-f9e7-4088-bf36-8b70746ddcc4"], + CellLabel->"In[62]:=",ExpressionUUID->"47c69875-f9e7-4088-bf36-8b70746ddcc4"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, - 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}}, - CellLabel-> - "Out[469]=",ExpressionUUID->"ab625dd8-3903-4fba-8bfe-51c742eb179f"] + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.9943499901767683`*^9, 3.994352537607641*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"5f22247d-4f6d-4225-a6ac-548f2a9359ce"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[470]:=",ExpressionUUID->"74c384a6-84a4-4c32-a653-d2988bb330d5"], + CellLabel->"In[63]:=",ExpressionUUID->"74c384a6-84a4-4c32-a653-d2988bb330d5"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, - 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}}, - CellLabel-> - "Out[470]=",ExpressionUUID->"734fe929-6a54-4311-8a69-b87d23b704a1"] + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.994349990194056*^9, 3.9943525376142*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"86caf3a9-ce49-4a93-9188-42b19e8b8c36"] }, Open ]], Cell[CellGroupData[{ @@ -4546,16 +4445,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[471]:=",ExpressionUUID->"bbd3ba20-daed-4e05-8619-384f2129461e"], + CellLabel->"In[64]:=",ExpressionUUID->"bbd3ba20-daed-4e05-8619-384f2129461e"], Cell[BoxData[ RowBox[{"-", "33.35096235519822`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, - 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}}, - CellLabel-> - "Out[471]=",ExpressionUUID->"67c975c7-010e-4036-a9ec-de572d0d96e7"] + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994349990213873*^9, 3.994352537620954*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"dabbf4c8-62c5-4a45-ace7-622fe149f4f5"] }, Open ]], Cell[CellGroupData[{ @@ -4576,16 +4474,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[472]:=",ExpressionUUID->"7826628e-c8b8-49e1-b5c6-a44bee3e6416"], + CellLabel->"In[65]:=",ExpressionUUID->"7826628e-c8b8-49e1-b5c6-a44bee3e6416"], Cell[BoxData[ RowBox[{"-", "6.430095836913352`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, - 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}}, - CellLabel-> - "Out[472]=",ExpressionUUID->"3a4d0d17-66a7-46a9-a59e-8cf04f698be0"] + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.994349990231628*^9, 3.994352537627564*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"9791523d-7ba6-4976-aa06-19b8978aa562"] }, Open ]], Cell[CellGroupData[{ @@ -4650,15 +4547,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[473]:=",ExpressionUUID->"463277f7-b347-495e-8624-e148927c8041"], + CellLabel->"In[66]:=",ExpressionUUID->"463277f7-b347-495e-8624-e148927c8041"], Cell[BoxData["69.21916597543105`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, - 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}}, - CellLabel-> - "Out[473]=",ExpressionUUID->"c39c7495-bff7-4cb5-9bcc-5f2e293cd72d"] + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.9943499902539473`*^9, 3.9943525376350727`*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"88fd1a29-3c99-4155-923c-d2f15a7af807"] }, Open ]], Cell[CellGroupData[{ @@ -4699,16 +4595,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[474]:=",ExpressionUUID->"eee689fc-f105-4d18-89f0-7c11cf6f99fe"], + CellLabel->"In[67]:=",ExpressionUUID->"eee689fc-f105-4d18-89f0-7c11cf6f99fe"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, - 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}}, - CellLabel-> - "Out[474]=",ExpressionUUID->"26e40046-7615-4c4a-a431-8166fbfa44ab"] + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.994349990275393*^9, 3.994352537641501*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"099b1c58-c862-4a9e-9663-35e4d6b86de9"] }, Open ]], Cell[CellGroupData[{ @@ -4774,15 +4669,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[475]:=",ExpressionUUID->"406780a6-3bee-4562-b12c-fd4639943008"], + CellLabel->"In[68]:=",ExpressionUUID->"406780a6-3bee-4562-b12c-fd4639943008"], Cell[BoxData["99.62147446019029`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, - 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}}, - CellLabel-> - "Out[475]=",ExpressionUUID->"1380be76-e3c2-4286-a595-7c0c0ed65cbe"] + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994349990295334*^9, 3.994352537648913*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"c9451974-18ae-4a90-8919-bafe491f0c03"] }, Open ]], Cell[CellGroupData[{ @@ -4840,15 +4734,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[476]:=",ExpressionUUID->"1dc5648e-1b63-4675-a8c5-15d0b057772e"], + CellLabel->"In[69]:=",ExpressionUUID->"1dc5648e-1b63-4675-a8c5-15d0b057772e"], Cell[BoxData["40.3202486570226`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, - 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}}, - CellLabel-> - "Out[476]=",ExpressionUUID->"8edd87a3-b0a5-477f-a8a0-f698b932875f"] + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.994349990314067*^9, 3.9943525376557913`*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"edf712f1-d882-4b88-b864-05b2af2ec2e0"] }, Open ]], Cell[CellGroupData[{ @@ -4906,37 +4799,48 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[477]:=",ExpressionUUID->"049e63fe-e62f-491f-a2e5-08cb3d411df2"], + CellLabel->"In[70]:=",ExpressionUUID->"049e63fe-e62f-491f-a2e5-08cb3d411df2"], Cell[BoxData["624.5259763904654`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, - 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}}, - CellLabel-> - "Out[477]=",ExpressionUUID->"ee7c412f-1624-4c5c-89de-5bafa33fd0fc"] + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.994349990331979*^9, 3.994352537662499*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"4a888b8a-d1a6-41d5-b30c-629d787cb22b"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.466369126"}]], "Input", CellChangeTimes->{3.9918488488187084`*^9, 3.99423545423339*^9, - 3.994235776086232*^9},ExpressionUUID->"bdefbecf-0aaa-4a45-a861-\ -406cf54e52d1"], + 3.994235776086232*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], + +Cell[BoxData["0.466369126`"], "Output", + CellChangeTimes->{3.994349990351676*^9, 3.994352537668872*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"c652ac40-fbac-4e50-a23b-cee5c9e4c0b5"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848849725815*^9, - 3.9918488497328167`*^9}},ExpressionUUID->"a5161e25-7247-124f-8601-\ -7bcc4af89c62"], + CellChangeTimes->{{3.991848849725815*^9, 3.9918488497328167`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1888262039"}]], "Input", - CellChangeTimes->{3.9918488509977226`*^9, - 3.99423545860105*^9},ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], + CellChangeTimes->{3.9918488509977226`*^9, 3.99423545860105*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], + +Cell[BoxData["0.1888262039`"], "Output", + CellChangeTimes->{3.9943499903919477`*^9, 3.994352537679451*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"a7ddf061-5dec-47ed-855f-20f1b37f44f6"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848851636154*^9, - 3.9918488516427097`*^9}},ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-\ -11f4dcb03e07"], + CellChangeTimes->{{3.991848851636154*^9, 3.9918488516427097`*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ @@ -4982,13 +4886,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[150]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], + CellLabel->"In[75]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913279321052856`*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[BoxData["1.502378697384544`*^-53"], "Output", + CellChangeTimes->{3.9913279321052856`*^9, 3.994349990457491*^9, + 3.9943525376896877`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"c70f156e-ed48-40fd-b68a-35e1670573ae"] }, Open ]], Cell[CellGroupData[{ @@ -5022,14 +4925,13 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575644922657`*^9},ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-\ -7221ff813b6d"], + CellChangeTimes->{3.9915575644922657`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.991327932129387*^9}, - CellLabel-> - "Out[151]=",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[BoxData["7.246193955000845`*^-55"], "Output", + CellChangeTimes->{3.991327932129387*^9, 3.994349990479208*^9, + 3.9943525376969023`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"3acc648d-4c6b-4ac3-a45a-14612bed3171"] }, Open ]], Cell[CellGroupData[{ @@ -5062,14 +4964,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915575683388195`*^9, - 3.991557570173399*^9}},ExpressionUUID->"f22831a7-63b7-f444-8e3a-\ -fa370a62ac27"], + CellChangeTimes->{{3.9915575683388195`*^9, 3.991557570173399*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.991327932138338*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[BoxData["1.0184493083932505`*^-54"], "Output", + CellChangeTimes->{3.991327932138338*^9, 3.994349990498308*^9, + 3.994352537703072*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"84adc614-72b2-4eb3-bc62-5e91571a0a15"] }, Open ]], Cell[CellGroupData[{ @@ -5092,13 +4993,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[153]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], + CellLabel->"In[78]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913279321616154`*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[BoxData["13.841887348405606`"], "Output", + CellChangeTimes->{3.9913279321616154`*^9, 3.994349990516189*^9, + 3.994352537709702*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"1c9ad64b-b8a8-4748-a344-b6014f096b0d"] }, Open ]], Cell[CellGroupData[{ @@ -5123,13 +5023,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[154]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], + CellLabel->"In[79]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[BoxData["37.77192070584817`"], "Output", - CellChangeTimes->{3.9913279321696014`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[BoxData["22.666459088499717`"], "Output", + CellChangeTimes->{3.9913279321696014`*^9, 3.9943499905342607`*^9, + 3.9943525377158117`*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"61101ef7-402e-4666-b6a4-fdfe330930f1"] }, Open ]], Cell[CellGroupData[{ @@ -5138,13 +5037,12 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], + CellLabel->"In[80]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913279321926613`*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[BoxData["1.7067265547102797`"], "Output", + CellChangeTimes->{3.9913279321926613`*^9, 3.994349990552363*^9, + 3.9943525377218027`*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"22f99091-7c34-4c93-a8c3-a94170171ab7"] }, Open ]], Cell[CellGroupData[{ @@ -5153,13 +5051,12 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], + CellLabel->"In[81]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[BoxData["3.2238916343938024`"], "Output", - CellChangeTimes->{3.991327932200657*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[BoxData["5.24908267517158`"], "Output", + CellChangeTimes->{3.991327932200657*^9, 3.9943499905699997`*^9, + 3.994352537727776*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"29051c6f-da64-4f65-82ea-a5d3f6294978"] }, Open ]], Cell[CellGroupData[{ @@ -5168,13 +5065,12 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], + CellLabel->"In[82]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[BoxData["121.77257917856996`"], "Output", - CellChangeTimes->{3.99132793222501*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[BoxData["118.97811770892926`"], "Output", + CellChangeTimes->{3.99132793222501*^9, 3.994349990587213*^9, + 3.994352537733726*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"074f3ce7-ea23-4924-9b2e-9af4e8536720"] }, Open ]], Cell[CellGroupData[{ @@ -5183,13 +5079,12 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], + CellLabel->"In[83]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913279322642612`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[BoxData["23.624316704832108`"], "Output", + CellChangeTimes->{3.9913279322642612`*^9, 3.99434999060376*^9, + 3.994352537739682*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"c4d47ca2-3dba-47eb-b1d3-b55e2aec409a"] }, Open ]], Cell[CellGroupData[{ @@ -5378,13 +5273,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], + CellLabel->"In[84]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[BoxData["0.032550594324745`"], "Output", - CellChangeTimes->{3.9913279322906475`*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[BoxData["0.007876248016096713`"], "Output", + CellChangeTimes->{3.9913279322906475`*^9, 3.9943499906237917`*^9, + 3.994352537747109*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"dd4f7250-6329-495c-8917-4a01e467db70"] }, Open ]], Cell[CellGroupData[{ @@ -5397,13 +5291,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], + CellLabel->"In[85]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[BoxData["4.91208054446651`"], "Output", - CellChangeTimes->{3.9913279323826447`*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[BoxData["9.98585485037555`"], "Output", + CellChangeTimes->{3.9913279323826447`*^9, 3.994349990955349*^9, + 3.9943525404418697`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"15f8e4a6-28f1-4841-b141-3e02eed00573"] }, Open ]], Cell[CellGroupData[{ @@ -5594,13 +5487,12 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], + CellLabel->"In[86]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[BoxData["0.012685641417856707`"], "Output", - CellChangeTimes->{3.991327932394655*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[BoxData["0.04136500683196503`"], "Output", + CellChangeTimes->{3.991327932394655*^9, 3.994349991106431*^9, + 3.994352540684225*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"e94ea018-395c-4b18-a397-33d4a766e2b2"] }, Open ]], Cell[CellGroupData[{ @@ -5613,13 +5505,12 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], + CellLabel->"In[87]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.991327932491659*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[BoxData["4.357409646175253`"], "Output", + CellChangeTimes->{3.991327932491659*^9, 3.9943499912196493`*^9, + 3.994352540732872*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"5d6a4cc2-ebc9-4125-9675-8b3e53228e0d"] }, Open ]], Cell[CellGroupData[{ @@ -5711,13 +5602,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], + CellLabel->"In[88]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991327932509678*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[BoxData["0.06803408589806512`"], "Output", + CellChangeTimes->{3.991327932509678*^9, 3.994349991242866*^9, + 3.9943525407406693`*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"3e160cd1-b412-4012-ba2d-cee65acdf0f8"] }, Open ]], Cell[CellGroupData[{ @@ -5806,13 +5696,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], + CellLabel->"In[89]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913279325457134`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[BoxData["0.9319659141019349`"], "Output", + CellChangeTimes->{3.9913279325457134`*^9, 3.9943499912651873`*^9, + 3.9943525407723083`*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"0993d303-9ba6-451b-bbf5-4594308e4a4f"] }, Open ]], Cell[CellGroupData[{ @@ -5934,19 +5823,18 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], + CellLabel->"In[90]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913279325697117`*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[BoxData["0.06340544905407981`"], "Output", + CellChangeTimes->{3.9913279325697117`*^9, 3.9943499912868013`*^9, + 3.994352540783514*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"53c29fda-2cdf-4d72-842b-b16e56cc4336"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"714abd93-e0d1-\ -eb45-a9e1-7a2f5d020eb1"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ @@ -5960,30 +5848,33 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6007,68 +5898,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918488620812244`*^9},ExpressionUUID->"137c38a2-741c-bd43-b6d9-\ -c0135e32eaf8"], + CellChangeTimes->{3.9918488620812244`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 166, 109, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279325947113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4875796689597595`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 1, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9943499913540297`*^9, + 3.9943525408051662`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], +In[92]:=",ExpressionUUID->"2e936eef-634a-4718-ab9b-6a89d86bd614"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 110, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326047096`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8688258335062654`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 2, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9943499913540297`*^9, + 3.9943525408517733`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], +In[92]:=",ExpressionUUID->"58d8a5ee-5d52-4213-afbb-5b916f0e393a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 111, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327932612709*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5935593562928167`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"70\\\", \\\"\[RightSkeleton]\\\"}], \\\"4374400000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 92, 3, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9943499913540297`*^9, + 3.994352540856625*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], +In[92]:=",ExpressionUUID->"810468af-86b2-4d71-9c7c-85cf5ca68c9b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 166, 112, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326207104`*^9}, +during this calculation.\"", 2, 92, 4, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9943499913540297`*^9, + 3.9943525408599443`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], +In[92]:=",ExpressionUUID->"1a4c6059-d72b-41a8-841c-ec1b5eadc045"], -Cell[BoxData["4.912080544466506`"], "Output", - CellChangeTimes->{3.9913279359974174`*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[BoxData["9.985854850375546`"], "Output", + CellChangeTimes->{3.9913279359974174`*^9, 3.994349995097727*^9, + 3.9943525422768183`*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"6ed0496b-c4e8-4d09-ab5b-701bc8fb3a56"] }, Open ]], Cell[CellGroupData[{ @@ -6083,30 +5981,33 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6130,68 +6031,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848865140564*^9},ExpressionUUID->"9b196534-2ca5-e54b-8014-\ -b0ab3cd09ac2"], + CellChangeTimes->{3.991848865140564*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 167, 113, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936033827*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4875796689597595`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 5, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.994349995192507*^9, + 3.9943525423084183`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], +In[93]:=",ExpressionUUID->"6fe74961-0a91-4f20-ba86-a1b78334f17b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 114, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360428295`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8688258335062654`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 6, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.994349995192507*^9, + 3.994352542313306*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], +In[93]:=",ExpressionUUID->"43aa8afb-e474-402a-9523-cd5c05c6be0b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 115, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936050829*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5935593562928167`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"70\\\", \\\"\[RightSkeleton]\\\"}], \\\"4374400000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 93, 7, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.994349995192507*^9, + 3.9943525423167887`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], +In[93]:=",ExpressionUUID->"eae314b6-0f66-43dd-8c51-7f786985e0bc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 167, 116, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360588284`*^9}, +during this calculation.\"", 2, 93, 8, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.994349995192507*^9, + 3.994352542321081*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], +In[93]:=",ExpressionUUID->"b0df7b2c-7f0f-46b5-8046-6e6171a3b7e9"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.9913279393385086`*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[BoxData["4.357409646175253`"], "Output", + CellChangeTimes->{3.9913279393385086`*^9, 3.9943499990500097`*^9, + 3.99435254378761*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"638db146-88ca-4060-a6ff-03bb0fddcd5f"] }, Open ]], Cell[CellGroupData[{ @@ -6201,141 +6109,140 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848869193308*^9},ExpressionUUID->"124cd7db-c537-8943-bef2-\ -1a154ab4a709"], + CellChangeTimes->{3.991848869193308*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VdsbB/BjLkMlM5fMRZRMOSrrDVFCKPOQ4ZxtSCqkk0IldSsU8ZN7 +yTwkMpcoqVRCpSjlkuEch0yZ7VOq3/LHfvbzedbe3/Wud++1lHyPOdC5KRTK +EL5W7ifebtn4oOOtyVDXufymDCYymco38DUvRZ67unpWPJBlmKJq/ghVvGiN +eoptR3vDL6z3AnGfpCU8w65kxDznM29HAc45q5uxr7yUboopeY8uRJ2ffYH9 +sOPE7WXdj2h6mXdvC/ZYT+vZ0w2f0dz3zYJt2LLDKu6LZr2o/uSi0Vvs/d/P +UsPa+5FMFa3rPXbj8pgQo2QQdb6J6P2I/em81Jn7IUy0b1HLvgd7it98bF53 +GA16Xtbtx+aPP+6qt8RGcTsunWNhK4hmtpxoGEWKbRo7xrBt5RYLp8wmkJ+A +9+IiNpGtLKm9agoVmM0t/sKOUTsQd6T9O+Ky16LxZTLRZ6mubeElM+iXbtJF +CWyaW1DgzfhZdOHx4+0K2NMZlJyqkDnEupjkvBF7lbL2uhndBfQ0SKfPGDuF +9txyncQiCqcvm+7BVixyjdm6tIgcHE9I2GEbaV2aOtpAol4uF4o/doBhf/uY +2TKKE984lY49zzjJK6j+C51U2PewCPtcg9BOjVW/ESdMeqYW+xYY3fVv/4M4 +l58Wdq7UV9BiHlrCBdKCdprit5mo5OXNgfNy3DDJ991NDXt6xOtsUjw3jH4E +0hD7rOZCdUUID1wXpZx2x04pV1L5rssH/n08N+9g93RMNP7O4wOOiZ1GI7bi +7AO3NRL8QNvqpNWJXapvm6y9xA894cmM39jNDyO5ghtWgV3RiIZbFhMtPO/s +HzUThgNck9Nq2Uy03lp43ZlGYXCwmCoww9bpMgcRqgi8Sm/v8cEOYtVmb9uy +Bg5XqTdnYR/nbtfZJbwO4ldHpyrlMNGw8r2ZuEVRoE5S9Xfl4v4Qravf6a0H +N95PI77Y3HfZStIn1oPo7iNyV7AV9TY4lIyvhyqpK9zd2G5mN6reDojBvHJb +ByOPid75hYZJtUnAeMqeY135TPS1KPGa9ypJWOtzTIW7gIkmxkvy7uyRBB6u +WmcdbMFwZueOJkkgbDMhEdv84iF971opmI9XF7crZKL6fMOF4iwZEMw61Dxe +xET5wz8ijMPlQQrAI/YuE+11vPw1rEwelPXKfz3CnmgWsyhjy0POp7/WLmHr +52tJKLoqwKa83+eDS3E/fb2q+Uw2gFiaerFHGRPNfh84NRqrCE60INK+nInE +jprXVNsogyyj59GNaiZi5wsG2AUpQ9jzBL/P2HW9HXKTl5RhTW9GpGINE3lY +e8aqNymDBf0/TiV2/uYIh3RdFWiNNtjVU4vnHyuajpZSBV6L/T2ojokO+Qtp +Ww2qwYOE4EuHHzMRinDUdf6lBhe9yq5XY2vGZW2nyaiDuqgr36pGJqLk6ZlG +26tDQvYfgyrssq/uzlVP1aGMd7pUqAnvT6fS87K5G+FHbc78h2e4PnObT2O+ +GqCc6chf3cJEeQfT/luK1oChJLt88ddMlOg7OMD7rwaY6OqVR2DTzp0cV+jU +AHuTJqGdrUwk+iiTctBME4KXjw20teH/R29Ks0FlM0hmj/7885aJ5JSvx1xj +aUGGF5Kt/8hEj67Oa3C4tWHKtrdD9xPux5xrF6GkDRdaLFeVYt9uVtUw9dIG +qYJcTlY3Eyn7138gu7Xh3nmxkYQveL2lw2pE2xaIXrafPd/HRPJyCoSiqw6k +FAostQ4zkVZBuPBPpAtzlFK9oSUm8qXFLmjb6kJdeYXECRLvV5Xkr94euuDY +4BNI4TART255xUuGLojkDtIVf+D9dnvsUHKlLhg85q+hL+Pz9JZ3poaKHiTf +oZfwcbEQ+5r1Fhd+fWBV+Gj9K8hCOaGqdrXtBmBmGf9TfgMLdUSg7RcLqBCt +oxH5yp6FlLw+2noG74K6fueBkWssRP9z/578aYD/XkJs82sWkhqvE5DyNYU4 +auMdT4lhFK63szdZ0xyofV/ObaANI9/J5RaxsT0QcTNl59aHw6jMNEwg650l +lDq8ORqlwEb580FPS1P2QUXihcSKODYid0u/aY7ZD09TFYZ3/2GjPgrPzKCP +DXRtmHt/99wICvnr2I3zKgdgo037eDL3KLoX2NKUGmcHxqe8fjWmj6LIOZml +zYH20DBzLLtS5xtasLJwenXYAfKlI3dt7f+GqO5Ju4ftD4LtYY2e+6lj6INM +ZlCz3iHQ9gV9eatxJFsY+6h4kyMUnnoc3SI9geoGNK1tRZzA7WmevAJrAil0 +TftHTDpBytAOF/HaSaSXmlSaN+AMhyTfDNrnTqFM3rktyc9d4NzLQW6rK9/R +/d1be+IeusLB8q/+Lyym0a3tV0WXS9wgdtfWJ9vaptG7/wou6cW7g8zlWq8z +VjOo1iZD9fg5D+gO46dKf55BM0cPUkJonrAQ5Pyv4OFZtGChETBl5gVtKXOE +yfAsKp78QoYZHgb/BxMHVRlzyCWnwM9T2Btq2opjGFzzqLpq/2Gey96wa1g5 +81TqPKLKfeBc4XjDBCWvuUB+AakM+Pe8D/SBsh9K+9ZmLyCW0JEDGUwf6LUR +vvfvpkXUkWjrZ+noC1TKq1iB3EWUwsgSOtnhCwFR9v8ckV9Cjxr/cPz2+UHg +587InPgltNYDLuvV+4HJLady0bElRPWeKo7Tp0GnEY9SqSmJCtOnw2wNafDT +j63ca0Yi8c5ZEykjGtQzdrsI7SHR1J6lruIdNPD4Yu7hb0ni84XC1W5KgyiZ +d08lrEm0ZknUdb09DX5Esl7sdyQRK8FgddZRGtzqqXkv60+ixIazgXWFOD/V +6ozh3yQ6qptGZRTTwOL0lLvWFRJZ36lcbVRCA5e7xgFKV0kkmMa+86CMBukn +v3GvjidRXKjd2P0aGmh7MIzfXifRWQ3VI7XPaPApoOi8ThqJgtLagqu+0oDl +XjnnUECifWvYO0MHaJBt3/9Vu5BEm+IoIrpDNNiGFqYEikjEDjUoqxymgfFr +4aiHxSTysc2arJigQcD2w/vXl5LIhS8spPwHDdYJd1z8p4pElmGyx0sl6ZBC +TZLkfUKiZ1mXrJKl6TAvNX+iE3tn+6wqQ5YOFgsHm3OaSKSj1vbFTIEOfxWq +2ux4RiKZ7jNm/6nRIf3Z21GfFyQaN+6TFDSgQzzNTiqqjUTXubMf+x+kw2JZ +U/e3T3j9W4Vv2TjSQeFLVHFaN4kuujNC9ZzpIMZICDT/TCJGjd3GP250aGYM +NvzzBddPcCX9z5cOHw7JZhj3kkiv1Zf24gQd0rjKlSwHSdSdpCakcoMOjZvS +BJLHSHQPiQSMJuH1DGqaiI/j/Mn55rKbdDj11ic2FVt3X3O0URodNh6hUlMn +8Pej+M3a3KaDbpj8gStTJLI4lv2FUUoHVTn2KvNZEsnL/21oco8O3Ns05R5g +z7ceu8lTQYeYi1rGGnMkylVHNonVdGCW/sgUnCfRr76+prx6OnSEVHKeLpCo +xlqu+G0LHU43TX3j5pDo2g9uvpRWOpAT1g0Etm/xmI9rOx1aDj9Je429jrde +jvWODkHPo0/E/yBRcIPLdc4nOiQebC7gXyaRiub/IlSH6SD9UvJX+28S/eiO +6vzGpoMrd0W40h8SdcTRdcpH6bDl3PeFcOzoQf0x6gQddvKvkZChcFDPrU7P +A3N0GJm//tyRi4OSBUT3RHIR4OBS0JHNw0GPZvvcw3kIsJ0t6JjEHukrCQ3h +I0Cqa3MGlZeDdtaYZ/uuJmBKLzD1DTbbm/HTSpSAv8s3rxnh46B11nvW7xEj +YNnwo78mPwft2L5eA0kQIGxpHx+MfUOk1ElPhoC1jSEGkyvj9f2VckoEXDUU +5x8Q4CCioLRFQoWApGTVGplV+Pkbp/vXqhFQXROs5YDNJsREeDUIUFzrdebJ +yriYZcCEDgGFN6duXFvNQfW/xWLYugS8n2cmNmAPfxtIHdAngDc00WkM27gp +8nmXEQGUWy2m5oIcxAq+p/AYCJAsPJDwDXuNyxmDB6YECDgFdq8V4iCq2V7r +SnMClorejOljJ8oMnS7YS0D4xr1Hz2DX8ZbfyLIi4Jrp3t4MbOb3M0Xp1gR0 +9BDij7GNXkp8TLAjoP5qdz8H27dyaPyyAwFO6ZJhksIclJBRzn3hEAGbxWzf +bcMeCt2nE+FCgCft4hANW8RL0vK4G65nV1j6WWyjfUzPIA8CYmKNZW6uvL8h +6pqXNwER1wzDHmHXCVrluvgSYOLqZfNuJW9B8qEDjYCoMvPpgZW8QeY7a4KA +SS6W+8xKXnsF2yKAgJfbtt+giOD6HkT9giAC7p+mJqzBTsi1Et8RTMD0KbaD +HHZdgtRmgxACNLWMB9Wxhxis3VuPE3B9ScdoG7YwrdJFI5SAiYxXzsbY2w9E +H1MJJyASfiLTlXzj/ZfkIwgQD3g9vRc7Xk06U4pBgOzPrUG22PfXDVeLRhJw +2lS71AF78Gdlq9BZAmpHn9x3XMkfiR7kiyagl8O+4oxt+GE/+SeGgERmjpoL +9v8BLpzJLg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6349,106 +6256,105 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwV1Hk4VdsbB/BjLkMlM5fMRZRMOSrrDVFCKPOQ4ZxtSCqkk0IldSsU8ZN7 +yTwkMpcoqVRCpSjlkuEch0yZ7VOq3/LHfvbzedbe3/Wud++1lHyPOdC5KRTK +EL5W7ifebtn4oOOtyVDXufymDCYymco38DUvRZ67unpWPJBlmKJq/ghVvGiN +eoptR3vDL6z3AnGfpCU8w65kxDznM29HAc45q5uxr7yUboopeY8uRJ2ffYH9 +sOPE7WXdj2h6mXdvC/ZYT+vZ0w2f0dz3zYJt2LLDKu6LZr2o/uSi0Vvs/d/P +UsPa+5FMFa3rPXbj8pgQo2QQdb6J6P2I/em81Jn7IUy0b1HLvgd7it98bF53 +GA16Xtbtx+aPP+6qt8RGcTsunWNhK4hmtpxoGEWKbRo7xrBt5RYLp8wmkJ+A +9+IiNpGtLKm9agoVmM0t/sKOUTsQd6T9O+Ky16LxZTLRZ6mubeElM+iXbtJF +CWyaW1DgzfhZdOHx4+0K2NMZlJyqkDnEupjkvBF7lbL2uhndBfQ0SKfPGDuF +9txyncQiCqcvm+7BVixyjdm6tIgcHE9I2GEbaV2aOtpAol4uF4o/doBhf/uY +2TKKE984lY49zzjJK6j+C51U2PewCPtcg9BOjVW/ESdMeqYW+xYY3fVv/4M4 +l58Wdq7UV9BiHlrCBdKCdprit5mo5OXNgfNy3DDJ991NDXt6xOtsUjw3jH4E +0hD7rOZCdUUID1wXpZx2x04pV1L5rssH/n08N+9g93RMNP7O4wOOiZ1GI7bi +7AO3NRL8QNvqpNWJXapvm6y9xA894cmM39jNDyO5ghtWgV3RiIZbFhMtPO/s +HzUThgNck9Nq2Uy03lp43ZlGYXCwmCoww9bpMgcRqgi8Sm/v8cEOYtVmb9uy +Bg5XqTdnYR/nbtfZJbwO4ldHpyrlMNGw8r2ZuEVRoE5S9Xfl4v4Qravf6a0H +N95PI77Y3HfZStIn1oPo7iNyV7AV9TY4lIyvhyqpK9zd2G5mN6reDojBvHJb +ByOPid75hYZJtUnAeMqeY135TPS1KPGa9ypJWOtzTIW7gIkmxkvy7uyRBB6u +WmcdbMFwZueOJkkgbDMhEdv84iF971opmI9XF7crZKL6fMOF4iwZEMw61Dxe +xET5wz8ijMPlQQrAI/YuE+11vPw1rEwelPXKfz3CnmgWsyhjy0POp7/WLmHr +52tJKLoqwKa83+eDS3E/fb2q+Uw2gFiaerFHGRPNfh84NRqrCE60INK+nInE +jprXVNsogyyj59GNaiZi5wsG2AUpQ9jzBL/P2HW9HXKTl5RhTW9GpGINE3lY +e8aqNymDBf0/TiV2/uYIh3RdFWiNNtjVU4vnHyuajpZSBV6L/T2ojokO+Qtp +Ww2qwYOE4EuHHzMRinDUdf6lBhe9yq5XY2vGZW2nyaiDuqgr36pGJqLk6ZlG +26tDQvYfgyrssq/uzlVP1aGMd7pUqAnvT6fS87K5G+FHbc78h2e4PnObT2O+ +GqCc6chf3cJEeQfT/luK1oChJLt88ddMlOg7OMD7rwaY6OqVR2DTzp0cV+jU +AHuTJqGdrUwk+iiTctBME4KXjw20teH/R29Ks0FlM0hmj/7885aJ5JSvx1xj +aUGGF5Kt/8hEj67Oa3C4tWHKtrdD9xPux5xrF6GkDRdaLFeVYt9uVtUw9dIG +qYJcTlY3Eyn7138gu7Xh3nmxkYQveL2lw2pE2xaIXrafPd/HRPJyCoSiqw6k +FAostQ4zkVZBuPBPpAtzlFK9oSUm8qXFLmjb6kJdeYXECRLvV5Xkr94euuDY +4BNI4TART255xUuGLojkDtIVf+D9dnvsUHKlLhg85q+hL+Pz9JZ3poaKHiTf +oZfwcbEQ+5r1Fhd+fWBV+Gj9K8hCOaGqdrXtBmBmGf9TfgMLdUSg7RcLqBCt +oxH5yp6FlLw+2noG74K6fueBkWssRP9z/578aYD/XkJs82sWkhqvE5DyNYU4 +auMdT4lhFK63szdZ0xyofV/ObaANI9/J5RaxsT0QcTNl59aHw6jMNEwg650l +lDq8ORqlwEb580FPS1P2QUXihcSKODYid0u/aY7ZD09TFYZ3/2GjPgrPzKCP +DXRtmHt/99wICvnr2I3zKgdgo037eDL3KLoX2NKUGmcHxqe8fjWmj6LIOZml +zYH20DBzLLtS5xtasLJwenXYAfKlI3dt7f+GqO5Ju4ftD4LtYY2e+6lj6INM +ZlCz3iHQ9gV9eatxJFsY+6h4kyMUnnoc3SI9geoGNK1tRZzA7WmevAJrAil0 +TftHTDpBytAOF/HaSaSXmlSaN+AMhyTfDNrnTqFM3rktyc9d4NzLQW6rK9/R +/d1be+IeusLB8q/+Lyym0a3tV0WXS9wgdtfWJ9vaptG7/wou6cW7g8zlWq8z +VjOo1iZD9fg5D+gO46dKf55BM0cPUkJonrAQ5Pyv4OFZtGChETBl5gVtKXOE +yfAsKp78QoYZHgb/BxMHVRlzyCWnwM9T2Btq2opjGFzzqLpq/2Gey96wa1g5 +81TqPKLKfeBc4XjDBCWvuUB+AakM+Pe8D/SBsh9K+9ZmLyCW0JEDGUwf6LUR +vvfvpkXUkWjrZ+noC1TKq1iB3EWUwsgSOtnhCwFR9v8ckV9Cjxr/cPz2+UHg +587InPgltNYDLuvV+4HJLady0bElRPWeKo7Tp0GnEY9SqSmJCtOnw2wNafDT +j63ca0Yi8c5ZEykjGtQzdrsI7SHR1J6lruIdNPD4Yu7hb0ni84XC1W5KgyiZ +d08lrEm0ZknUdb09DX5Esl7sdyQRK8FgddZRGtzqqXkv60+ixIazgXWFOD/V +6ozh3yQ6qptGZRTTwOL0lLvWFRJZ36lcbVRCA5e7xgFKV0kkmMa+86CMBukn +v3GvjidRXKjd2P0aGmh7MIzfXifRWQ3VI7XPaPApoOi8ThqJgtLagqu+0oDl +XjnnUECifWvYO0MHaJBt3/9Vu5BEm+IoIrpDNNiGFqYEikjEDjUoqxymgfFr +4aiHxSTysc2arJigQcD2w/vXl5LIhS8spPwHDdYJd1z8p4pElmGyx0sl6ZBC +TZLkfUKiZ1mXrJKl6TAvNX+iE3tn+6wqQ5YOFgsHm3OaSKSj1vbFTIEOfxWq +2ux4RiKZ7jNm/6nRIf3Z21GfFyQaN+6TFDSgQzzNTiqqjUTXubMf+x+kw2JZ +U/e3T3j9W4Vv2TjSQeFLVHFaN4kuujNC9ZzpIMZICDT/TCJGjd3GP250aGYM +NvzzBddPcCX9z5cOHw7JZhj3kkiv1Zf24gQd0rjKlSwHSdSdpCakcoMOjZvS +BJLHSHQPiQSMJuH1DGqaiI/j/Mn55rKbdDj11ic2FVt3X3O0URodNh6hUlMn +8Pej+M3a3KaDbpj8gStTJLI4lv2FUUoHVTn2KvNZEsnL/21oco8O3Ns05R5g +z7ceu8lTQYeYi1rGGnMkylVHNonVdGCW/sgUnCfRr76+prx6OnSEVHKeLpCo +xlqu+G0LHU43TX3j5pDo2g9uvpRWOpAT1g0Etm/xmI9rOx1aDj9Je429jrde +jvWODkHPo0/E/yBRcIPLdc4nOiQebC7gXyaRiub/IlSH6SD9UvJX+28S/eiO +6vzGpoMrd0W40h8SdcTRdcpH6bDl3PeFcOzoQf0x6gQddvKvkZChcFDPrU7P +A3N0GJm//tyRi4OSBUT3RHIR4OBS0JHNw0GPZvvcw3kIsJ0t6JjEHukrCQ3h +I0Cqa3MGlZeDdtaYZ/uuJmBKLzD1DTbbm/HTSpSAv8s3rxnh46B11nvW7xEj +YNnwo78mPwft2L5eA0kQIGxpHx+MfUOk1ElPhoC1jSEGkyvj9f2VckoEXDUU +5x8Q4CCioLRFQoWApGTVGplV+Pkbp/vXqhFQXROs5YDNJsREeDUIUFzrdebJ +yriYZcCEDgGFN6duXFvNQfW/xWLYugS8n2cmNmAPfxtIHdAngDc00WkM27gp +8nmXEQGUWy2m5oIcxAq+p/AYCJAsPJDwDXuNyxmDB6YECDgFdq8V4iCq2V7r +SnMClorejOljJ8oMnS7YS0D4xr1Hz2DX8ZbfyLIi4Jrp3t4MbOb3M0Xp1gR0 +9BDij7GNXkp8TLAjoP5qdz8H27dyaPyyAwFO6ZJhksIclJBRzn3hEAGbxWzf +bcMeCt2nE+FCgCft4hANW8RL0vK4G65nV1j6WWyjfUzPIA8CYmKNZW6uvL8h +6pqXNwER1wzDHmHXCVrluvgSYOLqZfNuJW9B8qEDjYCoMvPpgZW8QeY7a4KA +SS6W+8xKXnsF2yKAgJfbtt+giOD6HkT9giAC7p+mJqzBTsi1Et8RTMD0KbaD +HHZdgtRmgxACNLWMB9Wxhxis3VuPE3B9ScdoG7YwrdJFI5SAiYxXzsbY2w9E +H1MJJyASfiLTlXzj/ZfkIwgQD3g9vRc7Xk06U4pBgOzPrUG22PfXDVeLRhJw +2lS71AF78Gdlq9BZAmpHn9x3XMkfiR7kiyagl8O+4oxt+GE/+SeGgERmjpoL +9v8BLpzJLg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "PlotRange" -> {{0, 180}, {0.6128848278955525, + 1.5657578916563781`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6128848278955539}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6460,132 +6366,131 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, + "PlotRange" -> {{0, 180}, {0.6128848278955525, + 1.5657578916563781`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "AxesOrigin" -> {0, 0.6128848278955539}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{91.80048673422971, - 202.7475686600987}, {-12.9358605040218, 4.401639495978198}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwV1Hk4VdsbB/BjLkMlM5fMRZRMOSrrDVFCKPOQ4ZxtSCqkk0IldSsU8ZN7 +yTwkMpcoqVRCpSjlkuEch0yZ7VOq3/LHfvbzedbe3/Wud++1lHyPOdC5KRTK +EL5W7ifebtn4oOOtyVDXufymDCYymco38DUvRZ67unpWPJBlmKJq/ghVvGiN +eoptR3vDL6z3AnGfpCU8w65kxDznM29HAc45q5uxr7yUboopeY8uRJ2ffYH9 +sOPE7WXdj2h6mXdvC/ZYT+vZ0w2f0dz3zYJt2LLDKu6LZr2o/uSi0Vvs/d/P +UsPa+5FMFa3rPXbj8pgQo2QQdb6J6P2I/em81Jn7IUy0b1HLvgd7it98bF53 +GA16Xtbtx+aPP+6qt8RGcTsunWNhK4hmtpxoGEWKbRo7xrBt5RYLp8wmkJ+A +9+IiNpGtLKm9agoVmM0t/sKOUTsQd6T9O+Ky16LxZTLRZ6mubeElM+iXbtJF +CWyaW1DgzfhZdOHx4+0K2NMZlJyqkDnEupjkvBF7lbL2uhndBfQ0SKfPGDuF +9txyncQiCqcvm+7BVixyjdm6tIgcHE9I2GEbaV2aOtpAol4uF4o/doBhf/uY +2TKKE984lY49zzjJK6j+C51U2PewCPtcg9BOjVW/ESdMeqYW+xYY3fVv/4M4 +l58Wdq7UV9BiHlrCBdKCdprit5mo5OXNgfNy3DDJ991NDXt6xOtsUjw3jH4E +0hD7rOZCdUUID1wXpZx2x04pV1L5rssH/n08N+9g93RMNP7O4wOOiZ1GI7bi +7AO3NRL8QNvqpNWJXapvm6y9xA894cmM39jNDyO5ghtWgV3RiIZbFhMtPO/s +HzUThgNck9Nq2Uy03lp43ZlGYXCwmCoww9bpMgcRqgi8Sm/v8cEOYtVmb9uy +Bg5XqTdnYR/nbtfZJbwO4ldHpyrlMNGw8r2ZuEVRoE5S9Xfl4v4Qravf6a0H +N95PI77Y3HfZStIn1oPo7iNyV7AV9TY4lIyvhyqpK9zd2G5mN6reDojBvHJb +ByOPid75hYZJtUnAeMqeY135TPS1KPGa9ypJWOtzTIW7gIkmxkvy7uyRBB6u +WmcdbMFwZueOJkkgbDMhEdv84iF971opmI9XF7crZKL6fMOF4iwZEMw61Dxe +xET5wz8ijMPlQQrAI/YuE+11vPw1rEwelPXKfz3CnmgWsyhjy0POp7/WLmHr +52tJKLoqwKa83+eDS3E/fb2q+Uw2gFiaerFHGRPNfh84NRqrCE60INK+nInE +jprXVNsogyyj59GNaiZi5wsG2AUpQ9jzBL/P2HW9HXKTl5RhTW9GpGINE3lY +e8aqNymDBf0/TiV2/uYIh3RdFWiNNtjVU4vnHyuajpZSBV6L/T2ojokO+Qtp +Ww2qwYOE4EuHHzMRinDUdf6lBhe9yq5XY2vGZW2nyaiDuqgr36pGJqLk6ZlG +26tDQvYfgyrssq/uzlVP1aGMd7pUqAnvT6fS87K5G+FHbc78h2e4PnObT2O+ +GqCc6chf3cJEeQfT/luK1oChJLt88ddMlOg7OMD7rwaY6OqVR2DTzp0cV+jU +AHuTJqGdrUwk+iiTctBME4KXjw20teH/R29Ks0FlM0hmj/7885aJ5JSvx1xj +aUGGF5Kt/8hEj67Oa3C4tWHKtrdD9xPux5xrF6GkDRdaLFeVYt9uVtUw9dIG +qYJcTlY3Eyn7138gu7Xh3nmxkYQveL2lw2pE2xaIXrafPd/HRPJyCoSiqw6k +FAostQ4zkVZBuPBPpAtzlFK9oSUm8qXFLmjb6kJdeYXECRLvV5Xkr94euuDY +4BNI4TART255xUuGLojkDtIVf+D9dnvsUHKlLhg85q+hL+Pz9JZ3poaKHiTf +oZfwcbEQ+5r1Fhd+fWBV+Gj9K8hCOaGqdrXtBmBmGf9TfgMLdUSg7RcLqBCt +oxH5yp6FlLw+2noG74K6fueBkWssRP9z/578aYD/XkJs82sWkhqvE5DyNYU4 +auMdT4lhFK63szdZ0xyofV/ObaANI9/J5RaxsT0QcTNl59aHw6jMNEwg650l +lDq8ORqlwEb580FPS1P2QUXihcSKODYid0u/aY7ZD09TFYZ3/2GjPgrPzKCP +DXRtmHt/99wICvnr2I3zKgdgo037eDL3KLoX2NKUGmcHxqe8fjWmj6LIOZml +zYH20DBzLLtS5xtasLJwenXYAfKlI3dt7f+GqO5Ju4ftD4LtYY2e+6lj6INM +ZlCz3iHQ9gV9eatxJFsY+6h4kyMUnnoc3SI9geoGNK1tRZzA7WmevAJrAil0 +TftHTDpBytAOF/HaSaSXmlSaN+AMhyTfDNrnTqFM3rktyc9d4NzLQW6rK9/R +/d1be+IeusLB8q/+Lyym0a3tV0WXS9wgdtfWJ9vaptG7/wou6cW7g8zlWq8z +VjOo1iZD9fg5D+gO46dKf55BM0cPUkJonrAQ5Pyv4OFZtGChETBl5gVtKXOE +yfAsKp78QoYZHgb/BxMHVRlzyCWnwM9T2Btq2opjGFzzqLpq/2Gey96wa1g5 +81TqPKLKfeBc4XjDBCWvuUB+AakM+Pe8D/SBsh9K+9ZmLyCW0JEDGUwf6LUR +vvfvpkXUkWjrZ+noC1TKq1iB3EWUwsgSOtnhCwFR9v8ckV9Cjxr/cPz2+UHg +587InPgltNYDLuvV+4HJLady0bElRPWeKo7Tp0GnEY9SqSmJCtOnw2wNafDT +j63ca0Yi8c5ZEykjGtQzdrsI7SHR1J6lruIdNPD4Yu7hb0ni84XC1W5KgyiZ +d08lrEm0ZknUdb09DX5Esl7sdyQRK8FgddZRGtzqqXkv60+ixIazgXWFOD/V +6ozh3yQ6qptGZRTTwOL0lLvWFRJZ36lcbVRCA5e7xgFKV0kkmMa+86CMBukn +v3GvjidRXKjd2P0aGmh7MIzfXifRWQ3VI7XPaPApoOi8ThqJgtLagqu+0oDl +XjnnUECifWvYO0MHaJBt3/9Vu5BEm+IoIrpDNNiGFqYEikjEDjUoqxymgfFr +4aiHxSTysc2arJigQcD2w/vXl5LIhS8spPwHDdYJd1z8p4pElmGyx0sl6ZBC +TZLkfUKiZ1mXrJKl6TAvNX+iE3tn+6wqQ5YOFgsHm3OaSKSj1vbFTIEOfxWq +2ux4RiKZ7jNm/6nRIf3Z21GfFyQaN+6TFDSgQzzNTiqqjUTXubMf+x+kw2JZ +U/e3T3j9W4Vv2TjSQeFLVHFaN4kuujNC9ZzpIMZICDT/TCJGjd3GP250aGYM +NvzzBddPcCX9z5cOHw7JZhj3kkiv1Zf24gQd0rjKlSwHSdSdpCakcoMOjZvS +BJLHSHQPiQSMJuH1DGqaiI/j/Mn55rKbdDj11ic2FVt3X3O0URodNh6hUlMn +8Pej+M3a3KaDbpj8gStTJLI4lv2FUUoHVTn2KvNZEsnL/21oco8O3Ns05R5g +z7ceu8lTQYeYi1rGGnMkylVHNonVdGCW/sgUnCfRr76+prx6OnSEVHKeLpCo +xlqu+G0LHU43TX3j5pDo2g9uvpRWOpAT1g0Etm/xmI9rOx1aDj9Je429jrde +jvWODkHPo0/E/yBRcIPLdc4nOiQebC7gXyaRiub/IlSH6SD9UvJX+28S/eiO +6vzGpoMrd0W40h8SdcTRdcpH6bDl3PeFcOzoQf0x6gQddvKvkZChcFDPrU7P +A3N0GJm//tyRi4OSBUT3RHIR4OBS0JHNw0GPZvvcw3kIsJ0t6JjEHukrCQ3h +I0Cqa3MGlZeDdtaYZ/uuJmBKLzD1DTbbm/HTSpSAv8s3rxnh46B11nvW7xEj +YNnwo78mPwft2L5eA0kQIGxpHx+MfUOk1ElPhoC1jSEGkyvj9f2VckoEXDUU +5x8Q4CCioLRFQoWApGTVGplV+Pkbp/vXqhFQXROs5YDNJsREeDUIUFzrdebJ +yriYZcCEDgGFN6duXFvNQfW/xWLYugS8n2cmNmAPfxtIHdAngDc00WkM27gp +8nmXEQGUWy2m5oIcxAq+p/AYCJAsPJDwDXuNyxmDB6YECDgFdq8V4iCq2V7r +SnMClorejOljJ8oMnS7YS0D4xr1Hz2DX8ZbfyLIi4Jrp3t4MbOb3M0Xp1gR0 +9BDij7GNXkp8TLAjoP5qdz8H27dyaPyyAwFO6ZJhksIclJBRzn3hEAGbxWzf +bcMeCt2nE+FCgCft4hANW8RL0vK4G65nV1j6WWyjfUzPIA8CYmKNZW6uvL8h +6pqXNwER1wzDHmHXCVrluvgSYOLqZfNuJW9B8qEDjYCoMvPpgZW8QeY7a4KA +SS6W+8xKXnsF2yKAgJfbtt+giOD6HkT9giAC7p+mJqzBTsi1Et8RTMD0KbaD +HHZdgtRmgxACNLWMB9Wxhxis3VuPE3B9ScdoG7YwrdJFI5SAiYxXzsbY2w9E +H1MJJyASfiLTlXzj/ZfkIwgQD3g9vRc7Xk06U4pBgOzPrUG22PfXDVeLRhJw +2lS71AF78Gdlq9BZAmpHn9x3XMkfiR7kiyagl8O+4oxt+GE/+SeGgERmjpoL +9v8BLpzJLg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, + "PlotRange" -> {{0, 180}, {0.6128848278955525, 1.5657578916563781`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "AxesOrigin" -> {0, 0.6128848278955539}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6595,7 +6500,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.819001000320631}, + AxesOrigin->{0, 0.6128848278955539}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6623,7 +6529,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.8190010003206292, 1.212160280392001}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6128848278955525, 1.5657578916563781`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6631,9 +6538,9 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913281932019863`*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] + CellChangeTimes->{3.9913281932019863`*^9, 3.9943505842575607`*^9, + 3.994353006095866*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"6d845623-8448-413c-bbf3-437fde592e4e"] }, Open ]], Cell[CellGroupData[{ @@ -6648,30 +6555,33 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ RowBox[{"-", FractionBox["1", "Cw"]}], "+", FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6696,348 +6606,182 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488717861137`*^9},ExpressionUUID->"5a7f9400-1446-9746-a463-\ -bade8ae5c530"], + CellChangeTimes->{3.9918488717861137`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0472568361461936`*^-267\\\", \ -\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 117, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934227676`*^9}, - CellLabel-> - "During evaluation of \ -In[169]:=",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5836247142456827`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.4187315575080884`*^-262\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 118, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934317894`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.9943505848314*^9, + 3.994353006768147*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], +In[95]:=",ExpressionUUID->"576fda25-0375-4c4a-9dc7-52a446a8e9dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.3739060311364366`*^-291\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.744065288628775`*^-273\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 169, 119, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934409904`*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.9943505848314*^9, + 3.994353006779642*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], +In[95]:=",ExpressionUUID->"dd5df6d0-0503-4230-9391-816cdc713cd5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.144002306075743`*^-284\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 11, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.9943505848314*^9, + 3.994353006788898*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"78fa5127-8ec2-4e42-87af-2d34aa0514ed"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 169, 120, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132819344899*^9}, +during this calculation.\"", 2, 95, 12, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.9943505848314*^9, + 3.994353006797018*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], +In[95]:=",ExpressionUUID->"beec6d19-eac9-4476-a01d-3cb4447bc1ac"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VV8XB3ApQyWVebwDosxkupdrLUSmhFChQsiUOYr6GZqIiqiUIpIG +Ge49kqlSVAilECrJVEmiEEXe8/51ns9zzt7nefZZ67v3oXuFOPpwc3FxMZZw +cf3/OtPX1KCQUmAsOGGRLlixybgjR+KQSXci2DdcX5KzKAco+tJLovscBG78 +IR6+qA1R9nfeLu3OB9Xh7MBti6awdlz83NxbDsS7fNKnLzrCx1q7kKm3T6CC +oVJ0+J8XWCiMfph8+xoerDzRMv83HObe6p+feDsAZcKPbiz/mQj1ZjcL2vN/ +wZHi1feF0jJA5mPViJfqAgg8tH9ZXXgFRIL23OEzW4ptkmW/PE/nwzktixo7 +Z35UXf9ieXNbIfRkadZNrlmFigc6Yvr97kBKQdxLbsm1qLOE91hmbzFY6/gL +icqvxbYvEflin4uBv8HRWUltLfqdP3Ur7VcxHBtc987GZC3WWpl7BQmUwGG5 +lpFM/7WYYfvY+gmrBIKvSfxTrF6Lr72dfg7nlIDDFbaqjZsQlorPhyy4loJ4 +5mByxlVhzPdz/bboXgYSKveOzRYKI5+2hc17zzKQenIibleZMD7alDxR7lsG +lIkNB5TqhdGbv47fLbQM1tmGetR8Ecajn7/uiTlaBhuXLegNbhTBNMhS47ld +BlsjxYa0m0XwZt4mYvNkGdiv/NJ38Y0IUqS23C+aLgPH/Kqe+fciqCBQOrHy +Txm4vHJ/+eyHCMoFf1jymJsNu1SvV7uKimJfV8O5BWE2BA5ppCd6iOLT3O1S +dbpsOOlkZfx6RhTzFMJ9/aLYIFXeJsW9RAyFBcsfFcawoUTY6bfWSjFkJHpc +7P+PDV2vd5elU8VQZ+p5ncVJNig4RMo5WIrhS4WhX+8vsuHJllzeV5fI+44b +8jUr2bBgMd3WaiSOed6KVRHTbEgrjClasBBHZmt7CH2OHM/LlaTmII5OfPM5 +zfNssH26wuS0jzjKnDjtu3oZBy6b0QjbM+J4UMHhkpcQBwzQ5uKLj+K4LPtt +koY6ByIYeXuaEiWwRKaxZa8XB6yvCU7ZpEqgkfhUk40PB+T4Die1nZdA411j +nRp+HHjV4cJ+c0sChwZbpMb2c0A9VGBpX5sEilv7uese4sCXwujCn1KSOOC9 +fWjFWQ64i9h9lyYkkXdVw8H6+xzYGFuTkFMricfKz9xVq+bAioH1YvRnkugR +LDKTUcuBqtKloNgjiWuKk144PeaAmE1VmuaiJG7RH0y62Uy+P0FBx9xGCsP0 +FbPS33Ng048/McGDUujq6nU9ZoEDhywzlR+PSeHWq+/Tdy9yoCRPrVd4RgrF +AnsajZcQIOHkwajil0aNcmmhqWUEjFU+/b1UXRofu9lQtAUIyEhMi7x0UBpV +5LyPz0sS0Phug8JYgjS6HF658YY0AfM69W+MU6TxbcAjTWtZAnw/T2sPXZXG +2dTtlGQaAUxbt0n1emlU/dr+qleRgAFRxeCGVTL4VubzijZtAsRDHsmKi8ug +oeyXWUMdAmwbd7T602Rw2fJ8KNQloCImRXX1Rhn0zjvXE2JAwKmPE6M7d8jg +JbOBrW9ZBGjfrtn3I18Gz9OLWn9vJmAft7O46V0ZDKmSPKtiRcAVt/Fnmfdk +cFs2H+FmTQCvIF2R2SiD/6XPKrBtCegNPzF07LsM6smfqdd0ICDByMFTykAW +22VmEo7uJMByd85PfVNZXCVp33XOlQDB+G9HnW1l8WvxzPRVN3L++uOFaR6y ++Nr35eWbuwiotK7+xpssi+JaJzOTPAmIC+I7opAhi4+WieyK8iLA4oyToOlV +WWQP7prds5eAjvZxzSNscr7nf+8o+hAwsUM+6lePLLaFRUgn+hFwPyaUb+2Q +LH5b/TPTzp+A/648yFIfl0Whyd9fxAIIEOjfXuPPTUHjd1kK2YEEKO1L5epX +puDCwWje8GACxpN60hd0KNhGBIfKhhBQfkdRXhoo+N1j9YMG0qbjdeYu2yiY +8imamy+MgN0Hpk+1xFKwTtbdzTWCgHUXTWVGj1NQV0pgdiji//VxtpgvjYJK +PR/iAiMJiJnf8Mq0gILtE4bOQQcIMKFEe3qUUHCRMVMwQpofG34eqaQgR0F9 +yD2KgPNHd4tWtVBwWDxBlxVNgPuNosKuLgp2xHRY3SQt93xWf6qfgjraYo6r +DhJQtiLDVWOagkkJg6atpKNV+7/ZLlLQ9hFbTekQAcZ2akcCllNRJ/vXmiOk +W9Kf596QpaLMEZ+nMjFk/RIiWvVKVIxxHsjyJe3a6fmkX4uKrcFB/ndJ03+X +bPtnSMWgHWoG46S/SMwPSVtQcf/AVl7VWAJKmVZRDHsqXpHh6vQhHeV+gW+7 +KxVTnQNvZJM2+m8wK9Kbihck6w62kl56TVP5XDAVP2qp2/8l3fz4SE3pQSq6 +Xh9RXXeYgLTBZtvWRCq2F0uvsSG9nUeibzSVioPNXH+DSFOUfEL4L1JRoLh5 +/BTpYUsOl2IeFfOMS8cKSN8NWEw3K6Jiz7Xh6WrSEam28p73qPhcuXBlK2lm +yaXy/x5RcY+fssY70pveti2MN1Lx1mD06yHSdlzLNu95TcWZZVb830jv2MBI +e/mOist25LZ/J73XMbgHhqn4eOsRjf87OPa6XNk4FbPNR+S+kj5Y0B1Im6Vi +y8G+u59IPx454drIRcPcVYFtXaQtYulx8Tw0rBM4l9RI+sXq2usGK2h41Mv1 +fQVp+wKXxglBGir1vWjOI91lMDl2S5iGilo/nJJJu7WmrPWUoOHh8dbY/aT7 +PRX1JGVp+DM5HO1I+87UubbTaei6/ct1FdLfTrnFJSvScCTZ8CYP6VDqzHUT +FRr6bzxk855c/2kirXFOg4aXzUrTS0nHWKp8Z+vQ0OfkWEwc6eNhHnpyxjTk +VallipJewfvXtdeUhiKhocLvyHpIu3w+7txmGtazQzKukr5c39zI7UDD8m1X +TkuQpu7w+V7tTMNin5/L28n6KxhbXBvhSkPDriGtE6RLRXXdBveSz0fOJY2Q +9duwL/d7fRQNQ8tPhceR9W41zxA6HEvDJ0O+AbKk29I69HTiaXh28x2xSrJf +eqqWxxck09C26F3aINlP4ysjhY5foeGyCCsVYbL/Iq4J6rPyaKiwrHr4Atmf +szq33aZv0LCgJW2XOOmlu/sKfEpp+ICzmCwYTuZ9maW+xRMazt+cnu4k+//q +pkG3f89oeFP/Rg2Qlus5El/xgobHqsY2F5L5ocZNNCl20jBB9Vul/34yL5xk +3fm+0NChyke2mcyfoNnJ+MZVdJwbbZqd9CbrL8xXbESIjrF3He6Ik+Yf7S1a +KkHHNxT/Wwwy7268q+8ylqMjfAxLCyfzse/hedV7enQszt5iWEnm59bjjO68 +PXQ88OmAa6Yz2Q//ivc/8qbjwoclaXFOZP5EyS394E/HamSo7NtGQJLfSnWJ +SDqu2ix0SYXM7zqbD0fPJNFxP8+huGQy37WFEjRi2XQcFAgauGxKAFfKdENW +BR1fP3iks8WEXO+lAa4VNXRMtXvOOw8EBE47Hp98SseK5nOaW8n9paBb4d2+ +XjoWnClteqFPgFhu4wmnpXLo98stmapKwJzKmj41Zzn8GhYszxIiYOaqVMJG +VznUG9B/dWoNAVOr1ykw9sjhUbcah05B8vv9YgRs8pdD5fqMHo+V5H5Ys3fG +9YgcHtNTVHEk999mm/uCSTfkMA+e2eZOk+eVwN0wMC2HPAa5nj86OXDxg9/A +5z9ymGaf8qX3DQcyt0Yc/75Ivv9gVEx9OwfObEx6MbtcHqXOGzxLaeVA4l/2 +9tUUeVyivlp9roEDgSk8oUYW8kixf/bUkuCAUdHdaxcuyGNVdpT389MceEcr +yjXPlsfNhn5tCSkciLlwO2cqlzTXhy5GMgfuJxRecbwtj5HXKU35xzigveNa +lmCtPC5YVbntiOXABp7MtBOf5DGndjJuG3k+EtsTGx+lqoD9til8mciBSSFr +D5cnChh05f73tFE2dAfJvQp4roAu34JdEz6zoe7ZH4hrUUBFy2b/kCHyfBdT +RL3VpYCzmpIHN/WxQXNA4OPcqAKG5XckvW5nQzD75a6rwutwuTl9Qzx5Phzd +6uw25L0OJ/qM+9SPsWEo1cMlnE8Ri5SHZS1E2WD1I9pqWE8JH+yI436oXQZj +e/kjyuPWYyn/s3f7t5SQ/xfi3CefbMADh/WNG6h3QahV8UzZD2UMmIqcjuC7 +AzJJpfZ6eqqoVbO12L72JmSpMNYI71PDwEz1keNXbkCzlInur3R1DBpT3eeT +cR2YMk/SNLo08KaagXBbeB4ILs2P9EzUxNAqZwV9ai5QEqhGOxW18MLmV1Wv +N2fD8nXuFY7PtVB/WMKyvekiqLMkS6N3aWP8T9ctPi8yIbxPqN6aayM6qsWv +P/Y2HX78SnW2ytqIb6PDM1sqz8BmjWeXrdR0cFmUbO8t91Pw8Jfh399tOugi +bz1tpHoCglW1e9t9dNE3sMPm6sNEYI17d+xcroe7/n1LTOWLA3MFiS2r8vXw +Ipz/SOk6BOvjTx18oq+PhmU1O20OHABlH8ajdb36eODf6JqHQWFwVs7uz9H3 +pOeUjs3vDoOpj166A336GP9ah7bJIQweuqYW5QyS40XL68Z1w8DR/uNF8e/6 +mNKpvo69GAqHDI+HLucyIPv76+mRzFBoXNtO/77OAOWF57S+poSAz0O/Y+Vh +BtijcqvU9mgQjO8fjTaPNMCQCONHSgFBcFA2KLArygCl8w7UiDoEwanDIY6z +sQbYoWlkp0wNgjJmFM3ohAF6afMU69QGwnzF0dr6ywa4zY7a3TAXAOdKc6Ze +1xtgeuzJxpOJ/vDoWof3pCgD3+/RO2XV6Av9tvQ9URIMPJt0JWuM8AWuuf07 +/0oxUG7tiHturi+YOvDZ8dAY+Dntb//GaF94toSpL6nMQEbryxZxJV9o8cpd +bmLMQBNsGn2S7AO9CgElab4M3Lugdcfb1Rumbi3+1rjPwL43Zqc6FL1gxMXi +WnIVAz3aTskaintB97LTloM1DHzzONOjmM8LajykLl2oY6D68P2e8i+ekCih +y1xoYqDzWaM3dkWesCYp4HDzewb6xws23NL2BNV9nVw+3Ex8eZKi2WDlAXvX +FS2/vIWJNbp9jizNXRDzdHeAoj0TazO4DW1EdkGaj9ALjiMTcya9b4XOukPt +jUOpL7YzsSKnp33JY3cQUbRcveDJRNO8oUuG29zhmeKwiEcUEx1pIaP/Yt1A +eT2VppjLxE9x/THOfTthUjlDjzPBxPrs8BsDAy7Q3YLmwr+Y2LxoZNLZ6gJ1 +wePbIqeZ+L4+jben0gXOcKzC9P4w8evSVR+Fz7qAMpPrbvVSQ3z+RT7B2cgF +vKz20+vFDPHO/NuAf5ecoWPfZoEOI/K+2RzvRU8nqCz4+2k6yRAruqWORFMd +Qc8s8rd1iiFeVeobYQs6wr1PYwLXThviyISv8p8FB+BQ+vStzxniSuqiePl7 +B7ibVXc6J5ucT/fTfy2XHeBa6nHG5hJDlE94LHFS0gGSI1enZ70xxM+rf4d8 +otmD6yZ5NKQY4Vf5K0znO7aw0MEvWE8zwor0acuuVFu45jP+zlreCKdjuy6G +h9jCyImqaNf1RugyV3dtXscWwpu2lh7SJsdfl+VxemwDp+wOUyotjNBki1/4 +Qp81VO/onNcJMUKWtYXXLTUrkN5/skq9zgjThlz+TAlbwJlFX92UJ0b4HyMk +X/ufOXCfs2B/bjDCUNMVd45+MYfRCp7b15qM8Mvqwew9D8yhmutYltAbIzTl +6fNb2GcOrpnx0TPDRnj8HW9tfd0myKo5pPtwJQtnYicbROPNQMBuJ1tKkIVy +957yXg8yg/h+A7XoNSw0dbLsNdlpBn48swqaoiw8pzvzj9A2A/2tUSL5FBYW +L9F44DdiCl0D4b+Oa7EQNuVI8zuYguiKIPaW7Szca1CaXadtAgVmR2ImdrIw +v9/SyItqAtpHzphluLMwMV/5rriACdhNlHV2e7LwfuVDzoNhhBNd03N7g1h4 +2rwpaOoSwmx+nGlMAgunPpTbLPAg9BpmvCksYqGLV6zEim4W+B0ouGJVwsKm +Ujv8d48FMyX3fMbKWHig5uUz0UwWCMl1/9aqYOFjF7/gEnsW2PDLyjyoY6F0 +iOL1xBdGUNtR6P2mk4UqoZMvLj83BGvBSrWobhamrggZvnfTELo3N81IvGOh +g9Jzr58nDWGq+lvS7n4WnqVnrXppaQhqeZrFX0dZ+Ovbx0bhFibU9ppEpX5n +4UdKyQ29YiZYi2wDjQkWXqz8MHnoDBN8Tx5oj5xmoUzBpz2eDkyYqjtxWXyW +hVU7ysx5NjIh8c/FvdV/WNhP65RrEmHCGp3bqrsWWMgtfrLn7gwDcvZXTy8u +kvYXsS3rZsD/ANx22Uk= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7051,307 +6795,134 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV13k4VV8XB3ApQyWVebwDosxkupdrLUSmhFChQsiUOYr6GZqIiqiUIpIG +Ge49kqlSVAilECrJVEmiEEXe8/51ns9zzt7nefZZ67v3oXuFOPpwc3FxMZZw +cf3/OtPX1KCQUmAsOGGRLlixybgjR+KQSXci2DdcX5KzKAco+tJLovscBG78 +IR6+qA1R9nfeLu3OB9Xh7MBti6awdlz83NxbDsS7fNKnLzrCx1q7kKm3T6CC +oVJ0+J8XWCiMfph8+xoerDzRMv83HObe6p+feDsAZcKPbiz/mQj1ZjcL2vN/ +wZHi1feF0jJA5mPViJfqAgg8tH9ZXXgFRIL23OEzW4ptkmW/PE/nwzktixo7 +Z35UXf9ieXNbIfRkadZNrlmFigc6Yvr97kBKQdxLbsm1qLOE91hmbzFY6/gL +icqvxbYvEflin4uBv8HRWUltLfqdP3Ur7VcxHBtc987GZC3WWpl7BQmUwGG5 +lpFM/7WYYfvY+gmrBIKvSfxTrF6Lr72dfg7nlIDDFbaqjZsQlorPhyy4loJ4 +5mByxlVhzPdz/bboXgYSKveOzRYKI5+2hc17zzKQenIibleZMD7alDxR7lsG +lIkNB5TqhdGbv47fLbQM1tmGetR8Ecajn7/uiTlaBhuXLegNbhTBNMhS47ld +BlsjxYa0m0XwZt4mYvNkGdiv/NJ38Y0IUqS23C+aLgPH/Kqe+fciqCBQOrHy +Txm4vHJ/+eyHCMoFf1jymJsNu1SvV7uKimJfV8O5BWE2BA5ppCd6iOLT3O1S +dbpsOOlkZfx6RhTzFMJ9/aLYIFXeJsW9RAyFBcsfFcawoUTY6bfWSjFkJHpc +7P+PDV2vd5elU8VQZ+p5ncVJNig4RMo5WIrhS4WhX+8vsuHJllzeV5fI+44b +8jUr2bBgMd3WaiSOed6KVRHTbEgrjClasBBHZmt7CH2OHM/LlaTmII5OfPM5 +zfNssH26wuS0jzjKnDjtu3oZBy6b0QjbM+J4UMHhkpcQBwzQ5uKLj+K4LPtt +koY6ByIYeXuaEiWwRKaxZa8XB6yvCU7ZpEqgkfhUk40PB+T4Die1nZdA411j +nRp+HHjV4cJ+c0sChwZbpMb2c0A9VGBpX5sEilv7uese4sCXwujCn1KSOOC9 +fWjFWQ64i9h9lyYkkXdVw8H6+xzYGFuTkFMricfKz9xVq+bAioH1YvRnkugR +LDKTUcuBqtKloNgjiWuKk144PeaAmE1VmuaiJG7RH0y62Uy+P0FBx9xGCsP0 +FbPS33Ng048/McGDUujq6nU9ZoEDhywzlR+PSeHWq+/Tdy9yoCRPrVd4RgrF +AnsajZcQIOHkwajil0aNcmmhqWUEjFU+/b1UXRofu9lQtAUIyEhMi7x0UBpV +5LyPz0sS0Phug8JYgjS6HF658YY0AfM69W+MU6TxbcAjTWtZAnw/T2sPXZXG +2dTtlGQaAUxbt0n1emlU/dr+qleRgAFRxeCGVTL4VubzijZtAsRDHsmKi8ug +oeyXWUMdAmwbd7T602Rw2fJ8KNQloCImRXX1Rhn0zjvXE2JAwKmPE6M7d8jg +JbOBrW9ZBGjfrtn3I18Gz9OLWn9vJmAft7O46V0ZDKmSPKtiRcAVt/Fnmfdk +cFs2H+FmTQCvIF2R2SiD/6XPKrBtCegNPzF07LsM6smfqdd0ICDByMFTykAW +22VmEo7uJMByd85PfVNZXCVp33XOlQDB+G9HnW1l8WvxzPRVN3L++uOFaR6y ++Nr35eWbuwiotK7+xpssi+JaJzOTPAmIC+I7opAhi4+WieyK8iLA4oyToOlV +WWQP7prds5eAjvZxzSNscr7nf+8o+hAwsUM+6lePLLaFRUgn+hFwPyaUb+2Q +LH5b/TPTzp+A/648yFIfl0Whyd9fxAIIEOjfXuPPTUHjd1kK2YEEKO1L5epX +puDCwWje8GACxpN60hd0KNhGBIfKhhBQfkdRXhoo+N1j9YMG0qbjdeYu2yiY +8imamy+MgN0Hpk+1xFKwTtbdzTWCgHUXTWVGj1NQV0pgdiji//VxtpgvjYJK +PR/iAiMJiJnf8Mq0gILtE4bOQQcIMKFEe3qUUHCRMVMwQpofG34eqaQgR0F9 +yD2KgPNHd4tWtVBwWDxBlxVNgPuNosKuLgp2xHRY3SQt93xWf6qfgjraYo6r +DhJQtiLDVWOagkkJg6atpKNV+7/ZLlLQ9hFbTekQAcZ2akcCllNRJ/vXmiOk +W9Kf596QpaLMEZ+nMjFk/RIiWvVKVIxxHsjyJe3a6fmkX4uKrcFB/ndJ03+X +bPtnSMWgHWoG46S/SMwPSVtQcf/AVl7VWAJKmVZRDHsqXpHh6vQhHeV+gW+7 +KxVTnQNvZJM2+m8wK9Kbihck6w62kl56TVP5XDAVP2qp2/8l3fz4SE3pQSq6 +Xh9RXXeYgLTBZtvWRCq2F0uvsSG9nUeibzSVioPNXH+DSFOUfEL4L1JRoLh5 +/BTpYUsOl2IeFfOMS8cKSN8NWEw3K6Jiz7Xh6WrSEam28p73qPhcuXBlK2lm +yaXy/x5RcY+fssY70pveti2MN1Lx1mD06yHSdlzLNu95TcWZZVb830jv2MBI +e/mOist25LZ/J73XMbgHhqn4eOsRjf87OPa6XNk4FbPNR+S+kj5Y0B1Im6Vi +y8G+u59IPx454drIRcPcVYFtXaQtYulx8Tw0rBM4l9RI+sXq2usGK2h41Mv1 +fQVp+wKXxglBGir1vWjOI91lMDl2S5iGilo/nJJJu7WmrPWUoOHh8dbY/aT7 +PRX1JGVp+DM5HO1I+87UubbTaei6/ct1FdLfTrnFJSvScCTZ8CYP6VDqzHUT +FRr6bzxk855c/2kirXFOg4aXzUrTS0nHWKp8Z+vQ0OfkWEwc6eNhHnpyxjTk +VallipJewfvXtdeUhiKhocLvyHpIu3w+7txmGtazQzKukr5c39zI7UDD8m1X +TkuQpu7w+V7tTMNin5/L28n6KxhbXBvhSkPDriGtE6RLRXXdBveSz0fOJY2Q +9duwL/d7fRQNQ8tPhceR9W41zxA6HEvDJ0O+AbKk29I69HTiaXh28x2xSrJf +eqqWxxck09C26F3aINlP4ysjhY5foeGyCCsVYbL/Iq4J6rPyaKiwrHr4Atmf +szq33aZv0LCgJW2XOOmlu/sKfEpp+ICzmCwYTuZ9maW+xRMazt+cnu4k+//q +pkG3f89oeFP/Rg2Qlus5El/xgobHqsY2F5L5ocZNNCl20jBB9Vul/34yL5xk +3fm+0NChyke2mcyfoNnJ+MZVdJwbbZqd9CbrL8xXbESIjrF3He6Ik+Yf7S1a +KkHHNxT/Wwwy7268q+8ylqMjfAxLCyfzse/hedV7enQszt5iWEnm59bjjO68 +PXQ88OmAa6Yz2Q//ivc/8qbjwoclaXFOZP5EyS394E/HamSo7NtGQJLfSnWJ +SDqu2ix0SYXM7zqbD0fPJNFxP8+huGQy37WFEjRi2XQcFAgauGxKAFfKdENW +BR1fP3iks8WEXO+lAa4VNXRMtXvOOw8EBE47Hp98SseK5nOaW8n9paBb4d2+ +XjoWnClteqFPgFhu4wmnpXLo98stmapKwJzKmj41Zzn8GhYszxIiYOaqVMJG +VznUG9B/dWoNAVOr1ykw9sjhUbcah05B8vv9YgRs8pdD5fqMHo+V5H5Ys3fG +9YgcHtNTVHEk999mm/uCSTfkMA+e2eZOk+eVwN0wMC2HPAa5nj86OXDxg9/A +5z9ymGaf8qX3DQcyt0Yc/75Ivv9gVEx9OwfObEx6MbtcHqXOGzxLaeVA4l/2 +9tUUeVyivlp9roEDgSk8oUYW8kixf/bUkuCAUdHdaxcuyGNVdpT389MceEcr +yjXPlsfNhn5tCSkciLlwO2cqlzTXhy5GMgfuJxRecbwtj5HXKU35xzigveNa +lmCtPC5YVbntiOXABp7MtBOf5DGndjJuG3k+EtsTGx+lqoD9til8mciBSSFr +D5cnChh05f73tFE2dAfJvQp4roAu34JdEz6zoe7ZH4hrUUBFy2b/kCHyfBdT +RL3VpYCzmpIHN/WxQXNA4OPcqAKG5XckvW5nQzD75a6rwutwuTl9Qzx5Phzd +6uw25L0OJ/qM+9SPsWEo1cMlnE8Ri5SHZS1E2WD1I9pqWE8JH+yI436oXQZj +e/kjyuPWYyn/s3f7t5SQ/xfi3CefbMADh/WNG6h3QahV8UzZD2UMmIqcjuC7 +AzJJpfZ6eqqoVbO12L72JmSpMNYI71PDwEz1keNXbkCzlInur3R1DBpT3eeT +cR2YMk/SNLo08KaagXBbeB4ILs2P9EzUxNAqZwV9ai5QEqhGOxW18MLmV1Wv +N2fD8nXuFY7PtVB/WMKyvekiqLMkS6N3aWP8T9ctPi8yIbxPqN6aayM6qsWv +P/Y2HX78SnW2ytqIb6PDM1sqz8BmjWeXrdR0cFmUbO8t91Pw8Jfh399tOugi +bz1tpHoCglW1e9t9dNE3sMPm6sNEYI17d+xcroe7/n1LTOWLA3MFiS2r8vXw +Ipz/SOk6BOvjTx18oq+PhmU1O20OHABlH8ajdb36eODf6JqHQWFwVs7uz9H3 +pOeUjs3vDoOpj166A336GP9ah7bJIQweuqYW5QyS40XL68Z1w8DR/uNF8e/6 +mNKpvo69GAqHDI+HLucyIPv76+mRzFBoXNtO/77OAOWF57S+poSAz0O/Y+Vh +BtijcqvU9mgQjO8fjTaPNMCQCONHSgFBcFA2KLArygCl8w7UiDoEwanDIY6z +sQbYoWlkp0wNgjJmFM3ohAF6afMU69QGwnzF0dr6ywa4zY7a3TAXAOdKc6Ze +1xtgeuzJxpOJ/vDoWof3pCgD3+/RO2XV6Av9tvQ9URIMPJt0JWuM8AWuuf07 +/0oxUG7tiHturi+YOvDZ8dAY+Dntb//GaF94toSpL6nMQEbryxZxJV9o8cpd +bmLMQBNsGn2S7AO9CgElab4M3Lugdcfb1Rumbi3+1rjPwL43Zqc6FL1gxMXi +WnIVAz3aTskaintB97LTloM1DHzzONOjmM8LajykLl2oY6D68P2e8i+ekCih +y1xoYqDzWaM3dkWesCYp4HDzewb6xws23NL2BNV9nVw+3Ex8eZKi2WDlAXvX +FS2/vIWJNbp9jizNXRDzdHeAoj0TazO4DW1EdkGaj9ALjiMTcya9b4XOukPt +jUOpL7YzsSKnp33JY3cQUbRcveDJRNO8oUuG29zhmeKwiEcUEx1pIaP/Yt1A +eT2VppjLxE9x/THOfTthUjlDjzPBxPrs8BsDAy7Q3YLmwr+Y2LxoZNLZ6gJ1 +wePbIqeZ+L4+jben0gXOcKzC9P4w8evSVR+Fz7qAMpPrbvVSQ3z+RT7B2cgF +vKz20+vFDPHO/NuAf5ecoWPfZoEOI/K+2RzvRU8nqCz4+2k6yRAruqWORFMd +Qc8s8rd1iiFeVeobYQs6wr1PYwLXThviyISv8p8FB+BQ+vStzxniSuqiePl7 +B7ibVXc6J5ucT/fTfy2XHeBa6nHG5hJDlE94LHFS0gGSI1enZ70xxM+rf4d8 +otmD6yZ5NKQY4Vf5K0znO7aw0MEvWE8zwor0acuuVFu45jP+zlreCKdjuy6G +h9jCyImqaNf1RugyV3dtXscWwpu2lh7SJsdfl+VxemwDp+wOUyotjNBki1/4 +Qp81VO/onNcJMUKWtYXXLTUrkN5/skq9zgjThlz+TAlbwJlFX92UJ0b4HyMk +X/ufOXCfs2B/bjDCUNMVd45+MYfRCp7b15qM8Mvqwew9D8yhmutYltAbIzTl +6fNb2GcOrpnx0TPDRnj8HW9tfd0myKo5pPtwJQtnYicbROPNQMBuJ1tKkIVy +957yXg8yg/h+A7XoNSw0dbLsNdlpBn48swqaoiw8pzvzj9A2A/2tUSL5FBYW +L9F44DdiCl0D4b+Oa7EQNuVI8zuYguiKIPaW7Szca1CaXadtAgVmR2ImdrIw +v9/SyItqAtpHzphluLMwMV/5rriACdhNlHV2e7LwfuVDzoNhhBNd03N7g1h4 +2rwpaOoSwmx+nGlMAgunPpTbLPAg9BpmvCksYqGLV6zEim4W+B0ouGJVwsKm +Ujv8d48FMyX3fMbKWHig5uUz0UwWCMl1/9aqYOFjF7/gEnsW2PDLyjyoY6F0 +iOL1xBdGUNtR6P2mk4UqoZMvLj83BGvBSrWobhamrggZvnfTELo3N81IvGOh +g9Jzr58nDWGq+lvS7n4WnqVnrXppaQhqeZrFX0dZ+Ovbx0bhFibU9ppEpX5n +4UdKyQ29YiZYi2wDjQkWXqz8MHnoDBN8Tx5oj5xmoUzBpz2eDkyYqjtxWXyW +hVU7ysx5NjIh8c/FvdV/WNhP65RrEmHCGp3bqrsWWMgtfrLn7gwDcvZXTy8u +kvYXsS3rZsD/ANx22Uk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07612501495108864}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7363,19 +6934,19 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07612501495108864}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7389,306 +6960,133 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV13k4VV8XB3ApQyWVebwDosxkupdrLUSmhFChQsiUOYr6GZqIiqiUIpIG +Ge49kqlSVAilECrJVEmiEEXe8/51ns9zzt7nefZZ67v3oXuFOPpwc3FxMZZw +cf3/OtPX1KCQUmAsOGGRLlixybgjR+KQSXci2DdcX5KzKAco+tJLovscBG78 +IR6+qA1R9nfeLu3OB9Xh7MBti6awdlz83NxbDsS7fNKnLzrCx1q7kKm3T6CC +oVJ0+J8XWCiMfph8+xoerDzRMv83HObe6p+feDsAZcKPbiz/mQj1ZjcL2vN/ +wZHi1feF0jJA5mPViJfqAgg8tH9ZXXgFRIL23OEzW4ptkmW/PE/nwzktixo7 +Z35UXf9ieXNbIfRkadZNrlmFigc6Yvr97kBKQdxLbsm1qLOE91hmbzFY6/gL +icqvxbYvEflin4uBv8HRWUltLfqdP3Ur7VcxHBtc987GZC3WWpl7BQmUwGG5 +lpFM/7WYYfvY+gmrBIKvSfxTrF6Lr72dfg7nlIDDFbaqjZsQlorPhyy4loJ4 +5mByxlVhzPdz/bboXgYSKveOzRYKI5+2hc17zzKQenIibleZMD7alDxR7lsG +lIkNB5TqhdGbv47fLbQM1tmGetR8Ecajn7/uiTlaBhuXLegNbhTBNMhS47ld +BlsjxYa0m0XwZt4mYvNkGdiv/NJ38Y0IUqS23C+aLgPH/Kqe+fciqCBQOrHy +Txm4vHJ/+eyHCMoFf1jymJsNu1SvV7uKimJfV8O5BWE2BA5ppCd6iOLT3O1S +dbpsOOlkZfx6RhTzFMJ9/aLYIFXeJsW9RAyFBcsfFcawoUTY6bfWSjFkJHpc +7P+PDV2vd5elU8VQZ+p5ncVJNig4RMo5WIrhS4WhX+8vsuHJllzeV5fI+44b +8jUr2bBgMd3WaiSOed6KVRHTbEgrjClasBBHZmt7CH2OHM/LlaTmII5OfPM5 +zfNssH26wuS0jzjKnDjtu3oZBy6b0QjbM+J4UMHhkpcQBwzQ5uKLj+K4LPtt +koY6ByIYeXuaEiWwRKaxZa8XB6yvCU7ZpEqgkfhUk40PB+T4Die1nZdA411j +nRp+HHjV4cJ+c0sChwZbpMb2c0A9VGBpX5sEilv7uese4sCXwujCn1KSOOC9 +fWjFWQ64i9h9lyYkkXdVw8H6+xzYGFuTkFMricfKz9xVq+bAioH1YvRnkugR +LDKTUcuBqtKloNgjiWuKk144PeaAmE1VmuaiJG7RH0y62Uy+P0FBx9xGCsP0 +FbPS33Ng048/McGDUujq6nU9ZoEDhywzlR+PSeHWq+/Tdy9yoCRPrVd4RgrF +AnsajZcQIOHkwajil0aNcmmhqWUEjFU+/b1UXRofu9lQtAUIyEhMi7x0UBpV +5LyPz0sS0Phug8JYgjS6HF658YY0AfM69W+MU6TxbcAjTWtZAnw/T2sPXZXG +2dTtlGQaAUxbt0n1emlU/dr+qleRgAFRxeCGVTL4VubzijZtAsRDHsmKi8ug +oeyXWUMdAmwbd7T602Rw2fJ8KNQloCImRXX1Rhn0zjvXE2JAwKmPE6M7d8jg +JbOBrW9ZBGjfrtn3I18Gz9OLWn9vJmAft7O46V0ZDKmSPKtiRcAVt/Fnmfdk +cFs2H+FmTQCvIF2R2SiD/6XPKrBtCegNPzF07LsM6smfqdd0ICDByMFTykAW +22VmEo7uJMByd85PfVNZXCVp33XOlQDB+G9HnW1l8WvxzPRVN3L++uOFaR6y ++Nr35eWbuwiotK7+xpssi+JaJzOTPAmIC+I7opAhi4+WieyK8iLA4oyToOlV +WWQP7prds5eAjvZxzSNscr7nf+8o+hAwsUM+6lePLLaFRUgn+hFwPyaUb+2Q +LH5b/TPTzp+A/648yFIfl0Whyd9fxAIIEOjfXuPPTUHjd1kK2YEEKO1L5epX +puDCwWje8GACxpN60hd0KNhGBIfKhhBQfkdRXhoo+N1j9YMG0qbjdeYu2yiY +8imamy+MgN0Hpk+1xFKwTtbdzTWCgHUXTWVGj1NQV0pgdiji//VxtpgvjYJK +PR/iAiMJiJnf8Mq0gILtE4bOQQcIMKFEe3qUUHCRMVMwQpofG34eqaQgR0F9 +yD2KgPNHd4tWtVBwWDxBlxVNgPuNosKuLgp2xHRY3SQt93xWf6qfgjraYo6r +DhJQtiLDVWOagkkJg6atpKNV+7/ZLlLQ9hFbTekQAcZ2akcCllNRJ/vXmiOk +W9Kf596QpaLMEZ+nMjFk/RIiWvVKVIxxHsjyJe3a6fmkX4uKrcFB/ndJ03+X +bPtnSMWgHWoG46S/SMwPSVtQcf/AVl7VWAJKmVZRDHsqXpHh6vQhHeV+gW+7 +KxVTnQNvZJM2+m8wK9Kbihck6w62kl56TVP5XDAVP2qp2/8l3fz4SE3pQSq6 +Xh9RXXeYgLTBZtvWRCq2F0uvsSG9nUeibzSVioPNXH+DSFOUfEL4L1JRoLh5 +/BTpYUsOl2IeFfOMS8cKSN8NWEw3K6Jiz7Xh6WrSEam28p73qPhcuXBlK2lm +yaXy/x5RcY+fssY70pveti2MN1Lx1mD06yHSdlzLNu95TcWZZVb830jv2MBI +e/mOist25LZ/J73XMbgHhqn4eOsRjf87OPa6XNk4FbPNR+S+kj5Y0B1Im6Vi +y8G+u59IPx454drIRcPcVYFtXaQtYulx8Tw0rBM4l9RI+sXq2usGK2h41Mv1 +fQVp+wKXxglBGir1vWjOI91lMDl2S5iGilo/nJJJu7WmrPWUoOHh8dbY/aT7 +PRX1JGVp+DM5HO1I+87UubbTaei6/ct1FdLfTrnFJSvScCTZ8CYP6VDqzHUT +FRr6bzxk855c/2kirXFOg4aXzUrTS0nHWKp8Z+vQ0OfkWEwc6eNhHnpyxjTk +VallipJewfvXtdeUhiKhocLvyHpIu3w+7txmGtazQzKukr5c39zI7UDD8m1X +TkuQpu7w+V7tTMNin5/L28n6KxhbXBvhSkPDriGtE6RLRXXdBveSz0fOJY2Q +9duwL/d7fRQNQ8tPhceR9W41zxA6HEvDJ0O+AbKk29I69HTiaXh28x2xSrJf +eqqWxxck09C26F3aINlP4ysjhY5foeGyCCsVYbL/Iq4J6rPyaKiwrHr4Atmf +szq33aZv0LCgJW2XOOmlu/sKfEpp+ICzmCwYTuZ9maW+xRMazt+cnu4k+//q +pkG3f89oeFP/Rg2Qlus5El/xgobHqsY2F5L5ocZNNCl20jBB9Vul/34yL5xk +3fm+0NChyke2mcyfoNnJ+MZVdJwbbZqd9CbrL8xXbESIjrF3He6Ik+Yf7S1a +KkHHNxT/Wwwy7268q+8ylqMjfAxLCyfzse/hedV7enQszt5iWEnm59bjjO68 +PXQ88OmAa6Yz2Q//ivc/8qbjwoclaXFOZP5EyS394E/HamSo7NtGQJLfSnWJ +SDqu2ix0SYXM7zqbD0fPJNFxP8+huGQy37WFEjRi2XQcFAgauGxKAFfKdENW +BR1fP3iks8WEXO+lAa4VNXRMtXvOOw8EBE47Hp98SseK5nOaW8n9paBb4d2+ +XjoWnClteqFPgFhu4wmnpXLo98stmapKwJzKmj41Zzn8GhYszxIiYOaqVMJG +VznUG9B/dWoNAVOr1ykw9sjhUbcah05B8vv9YgRs8pdD5fqMHo+V5H5Ys3fG +9YgcHtNTVHEk999mm/uCSTfkMA+e2eZOk+eVwN0wMC2HPAa5nj86OXDxg9/A +5z9ymGaf8qX3DQcyt0Yc/75Ivv9gVEx9OwfObEx6MbtcHqXOGzxLaeVA4l/2 +9tUUeVyivlp9roEDgSk8oUYW8kixf/bUkuCAUdHdaxcuyGNVdpT389MceEcr +yjXPlsfNhn5tCSkciLlwO2cqlzTXhy5GMgfuJxRecbwtj5HXKU35xzigveNa +lmCtPC5YVbntiOXABp7MtBOf5DGndjJuG3k+EtsTGx+lqoD9til8mciBSSFr +D5cnChh05f73tFE2dAfJvQp4roAu34JdEz6zoe7ZH4hrUUBFy2b/kCHyfBdT +RL3VpYCzmpIHN/WxQXNA4OPcqAKG5XckvW5nQzD75a6rwutwuTl9Qzx5Phzd +6uw25L0OJ/qM+9SPsWEo1cMlnE8Ri5SHZS1E2WD1I9pqWE8JH+yI436oXQZj +e/kjyuPWYyn/s3f7t5SQ/xfi3CefbMADh/WNG6h3QahV8UzZD2UMmIqcjuC7 +AzJJpfZ6eqqoVbO12L72JmSpMNYI71PDwEz1keNXbkCzlInur3R1DBpT3eeT +cR2YMk/SNLo08KaagXBbeB4ILs2P9EzUxNAqZwV9ai5QEqhGOxW18MLmV1Wv +N2fD8nXuFY7PtVB/WMKyvekiqLMkS6N3aWP8T9ctPi8yIbxPqN6aayM6qsWv +P/Y2HX78SnW2ytqIb6PDM1sqz8BmjWeXrdR0cFmUbO8t91Pw8Jfh399tOugi +bz1tpHoCglW1e9t9dNE3sMPm6sNEYI17d+xcroe7/n1LTOWLA3MFiS2r8vXw +Ipz/SOk6BOvjTx18oq+PhmU1O20OHABlH8ajdb36eODf6JqHQWFwVs7uz9H3 +pOeUjs3vDoOpj166A336GP9ah7bJIQweuqYW5QyS40XL68Z1w8DR/uNF8e/6 +mNKpvo69GAqHDI+HLucyIPv76+mRzFBoXNtO/77OAOWF57S+poSAz0O/Y+Vh +BtijcqvU9mgQjO8fjTaPNMCQCONHSgFBcFA2KLArygCl8w7UiDoEwanDIY6z +sQbYoWlkp0wNgjJmFM3ohAF6afMU69QGwnzF0dr6ywa4zY7a3TAXAOdKc6Ze +1xtgeuzJxpOJ/vDoWof3pCgD3+/RO2XV6Av9tvQ9URIMPJt0JWuM8AWuuf07 +/0oxUG7tiHturi+YOvDZ8dAY+Dntb//GaF94toSpL6nMQEbryxZxJV9o8cpd +bmLMQBNsGn2S7AO9CgElab4M3Lugdcfb1Rumbi3+1rjPwL43Zqc6FL1gxMXi +WnIVAz3aTskaintB97LTloM1DHzzONOjmM8LajykLl2oY6D68P2e8i+ekCih +y1xoYqDzWaM3dkWesCYp4HDzewb6xws23NL2BNV9nVw+3Ex8eZKi2WDlAXvX +FS2/vIWJNbp9jizNXRDzdHeAoj0TazO4DW1EdkGaj9ALjiMTcya9b4XOukPt +jUOpL7YzsSKnp33JY3cQUbRcveDJRNO8oUuG29zhmeKwiEcUEx1pIaP/Yt1A +eT2VppjLxE9x/THOfTthUjlDjzPBxPrs8BsDAy7Q3YLmwr+Y2LxoZNLZ6gJ1 +wePbIqeZ+L4+jben0gXOcKzC9P4w8evSVR+Fz7qAMpPrbvVSQ3z+RT7B2cgF +vKz20+vFDPHO/NuAf5ecoWPfZoEOI/K+2RzvRU8nqCz4+2k6yRAruqWORFMd +Qc8s8rd1iiFeVeobYQs6wr1PYwLXThviyISv8p8FB+BQ+vStzxniSuqiePl7 +B7ibVXc6J5ucT/fTfy2XHeBa6nHG5hJDlE94LHFS0gGSI1enZ70xxM+rf4d8 +otmD6yZ5NKQY4Vf5K0znO7aw0MEvWE8zwor0acuuVFu45jP+zlreCKdjuy6G +h9jCyImqaNf1RugyV3dtXscWwpu2lh7SJsdfl+VxemwDp+wOUyotjNBki1/4 +Qp81VO/onNcJMUKWtYXXLTUrkN5/skq9zgjThlz+TAlbwJlFX92UJ0b4HyMk +X/ufOXCfs2B/bjDCUNMVd45+MYfRCp7b15qM8Mvqwew9D8yhmutYltAbIzTl +6fNb2GcOrpnx0TPDRnj8HW9tfd0myKo5pPtwJQtnYicbROPNQMBuJ1tKkIVy +957yXg8yg/h+A7XoNSw0dbLsNdlpBn48swqaoiw8pzvzj9A2A/2tUSL5FBYW +L9F44DdiCl0D4b+Oa7EQNuVI8zuYguiKIPaW7Szca1CaXadtAgVmR2ImdrIw +v9/SyItqAtpHzphluLMwMV/5rriACdhNlHV2e7LwfuVDzoNhhBNd03N7g1h4 +2rwpaOoSwmx+nGlMAgunPpTbLPAg9BpmvCksYqGLV6zEim4W+B0ouGJVwsKm +Ujv8d48FMyX3fMbKWHig5uUz0UwWCMl1/9aqYOFjF7/gEnsW2PDLyjyoY6F0 +iOL1xBdGUNtR6P2mk4UqoZMvLj83BGvBSrWobhamrggZvnfTELo3N81IvGOh +g9Jzr58nDWGq+lvS7n4WnqVnrXppaQhqeZrFX0dZ+Ovbx0bhFibU9ppEpX5n +4UdKyQ29YiZYi2wDjQkWXqz8MHnoDBN8Tx5oj5xmoUzBpz2eDkyYqjtxWXyW +hVU7ysx5NjIh8c/FvdV/WNhP65RrEmHCGp3bqrsWWMgtfrLn7gwDcvZXTy8u +kvYXsS3rZsD/ANx22Uk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07612501495108864}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7699,6 +7097,7 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7726,7 +7125,8 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15475569508294718`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07612501495108864}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7734,11 +7134,13 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913290128289948`*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] + CellChangeTimes->{3.9913290128289948`*^9, 3.9943513913786*^9, + 3.994353791882698*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"aad1f07b-d16d-4a30-a338-d85a059f162b"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7807,576 +7209,804 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003101"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994235599272483*^9},ExpressionUUID->"0f83f761-b16d-5343-987d-\ -511095eaf120"], + 3.994235599272483*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], Cell[BoxData[ - RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"8cdd4baa-f7c9-104e-b978-\ -89d3982ba28f"], - -Cell[CellGroupData[{ - -Cell[BoxData[ - RowBox[{"L", "=", - FractionBox[ - SqrtBox[ - RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918488983507824`*^9},ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-\ -3438788b15d6"], - -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913294794877434`*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] -}, Open ]], - -Cell[CellGroupData[{ - -Cell[BoxData[ - RowBox[{"L", "=", - RowBox[{"Plot", "[", - RowBox[{ - RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], - RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", - RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"], - ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", - FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - FractionBox["1", "Cb"], ")"}]}]], - RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", - RowBox[{"{", - RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488997875195`*^9},ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-\ -0e75880d5d98"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 125, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294796838703`*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 126, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479692892*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 172, 127, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294797011433`*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "stop", - "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ -\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 172, 128, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479709572*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], - -Cell[BoxData[ - GraphicsBox[ - InterpretationBox[{ - TagBox[{{{}, {}, - TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK - "]]}, - Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, - {"WolframDynamicHighlight", <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], - StyleBox[ - DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, - Slot["HighlightElements"], - Slot["LayoutOptions"], - Slot["Meta"], - Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ Annotation[{ Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], - Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK - "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| "HighlightElements" -> <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, "LayoutOptions" -> <| - "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, - "Frame" -> {{False, False}, {False, False}}, + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> - Plot, "GroupHighlight" -> False|>|>]]& )[<| - "HighlightElements" -> <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, - "LayoutOptions" -> <| - "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, - "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), - "DefaultStyle" -> { - Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], - AbsoluteThickness[2]]}, - "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ - Part[#, 1]], - Identity[ - Part[#, 2]]}& ), - "ScalingFunctions" -> {{Identity, Identity}, { - Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, - "Meta" -> <| - "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> - Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { - 4.503599627370496*^15, -4.503599627370496*^15}}], - Selectable->False]}, - Annotation[{{{{}, {}, + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ Annotation[{ Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], - Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK - "]]}, "Charting`Private`Tag#1"]}}, {}}, <| - "HighlightElements" -> <| - "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, - "LayoutOptions" -> <| - "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, - "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, - "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, - "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { - Directive[ - Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], - AbsoluteThickness[2]]}, - "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ - Part[#, 1]], - Identity[ - Part[#, 2]]}& ), - "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, - "Primitives" -> {}, "GCFlag" -> False|>, - "Meta" -> <| - "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> - Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994351391670487*^9, 3.994353792135827*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"2ff97cf2-1e9c-4efb-b17b-2c4c41278326"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VV8XB3ApQyWVebwDosxkupdrLUSmhFChQsiUOYr6GZqIiqiUIpIG +Ge49kqlSVAilECrJVEmiEEXe8/51ns9zzt7nefZZ67v3oXuFOPpwc3FxMZZw +cf3/OtPX1KCQUmAsOGGRLlixybgjR+KQSXci2DdcX5KzKAco+tJLovscBG78 +IR6+qA1R9nfeLu3OB9Xh7MBti6awdlz83NxbDsS7fNKnLzrCx1q7kKm3T6CC +oVJ0+J8XWCiMfph8+xoerDzRMv83HObe6p+feDsAZcKPbiz/mQj1ZjcL2vN/ +wZHi1feF0jJA5mPViJfqAgg8tH9ZXXgFRIL23OEzW4ptkmW/PE/nwzktixo7 +Z35UXf9ieXNbIfRkadZNrlmFigc6Yvr97kBKQdxLbsm1qLOE91hmbzFY6/gL +icqvxbYvEflin4uBv8HRWUltLfqdP3Ur7VcxHBtc987GZC3WWpl7BQmUwGG5 +lpFM/7WYYfvY+gmrBIKvSfxTrF6Lr72dfg7nlIDDFbaqjZsQlorPhyy4loJ4 +5mByxlVhzPdz/bboXgYSKveOzRYKI5+2hc17zzKQenIibleZMD7alDxR7lsG +lIkNB5TqhdGbv47fLbQM1tmGetR8Ecajn7/uiTlaBhuXLegNbhTBNMhS47ld +BlsjxYa0m0XwZt4mYvNkGdiv/NJ38Y0IUqS23C+aLgPH/Kqe+fciqCBQOrHy +Txm4vHJ/+eyHCMoFf1jymJsNu1SvV7uKimJfV8O5BWE2BA5ppCd6iOLT3O1S +dbpsOOlkZfx6RhTzFMJ9/aLYIFXeJsW9RAyFBcsfFcawoUTY6bfWSjFkJHpc +7P+PDV2vd5elU8VQZ+p5ncVJNig4RMo5WIrhS4WhX+8vsuHJllzeV5fI+44b +8jUr2bBgMd3WaiSOed6KVRHTbEgrjClasBBHZmt7CH2OHM/LlaTmII5OfPM5 +zfNssH26wuS0jzjKnDjtu3oZBy6b0QjbM+J4UMHhkpcQBwzQ5uKLj+K4LPtt +koY6ByIYeXuaEiWwRKaxZa8XB6yvCU7ZpEqgkfhUk40PB+T4Die1nZdA411j +nRp+HHjV4cJ+c0sChwZbpMb2c0A9VGBpX5sEilv7uese4sCXwujCn1KSOOC9 +fWjFWQ64i9h9lyYkkXdVw8H6+xzYGFuTkFMricfKz9xVq+bAioH1YvRnkugR +LDKTUcuBqtKloNgjiWuKk144PeaAmE1VmuaiJG7RH0y62Uy+P0FBx9xGCsP0 +FbPS33Ng048/McGDUujq6nU9ZoEDhywzlR+PSeHWq+/Tdy9yoCRPrVd4RgrF +AnsajZcQIOHkwajil0aNcmmhqWUEjFU+/b1UXRofu9lQtAUIyEhMi7x0UBpV +5LyPz0sS0Phug8JYgjS6HF658YY0AfM69W+MU6TxbcAjTWtZAnw/T2sPXZXG +2dTtlGQaAUxbt0n1emlU/dr+qleRgAFRxeCGVTL4VubzijZtAsRDHsmKi8ug +oeyXWUMdAmwbd7T602Rw2fJ8KNQloCImRXX1Rhn0zjvXE2JAwKmPE6M7d8jg +JbOBrW9ZBGjfrtn3I18Gz9OLWn9vJmAft7O46V0ZDKmSPKtiRcAVt/Fnmfdk +cFs2H+FmTQCvIF2R2SiD/6XPKrBtCegNPzF07LsM6smfqdd0ICDByMFTykAW +22VmEo7uJMByd85PfVNZXCVp33XOlQDB+G9HnW1l8WvxzPRVN3L++uOFaR6y ++Nr35eWbuwiotK7+xpssi+JaJzOTPAmIC+I7opAhi4+WieyK8iLA4oyToOlV +WWQP7prds5eAjvZxzSNscr7nf+8o+hAwsUM+6lePLLaFRUgn+hFwPyaUb+2Q +LH5b/TPTzp+A/648yFIfl0Whyd9fxAIIEOjfXuPPTUHjd1kK2YEEKO1L5epX +puDCwWje8GACxpN60hd0KNhGBIfKhhBQfkdRXhoo+N1j9YMG0qbjdeYu2yiY +8imamy+MgN0Hpk+1xFKwTtbdzTWCgHUXTWVGj1NQV0pgdiji//VxtpgvjYJK +PR/iAiMJiJnf8Mq0gILtE4bOQQcIMKFEe3qUUHCRMVMwQpofG34eqaQgR0F9 +yD2KgPNHd4tWtVBwWDxBlxVNgPuNosKuLgp2xHRY3SQt93xWf6qfgjraYo6r +DhJQtiLDVWOagkkJg6atpKNV+7/ZLlLQ9hFbTekQAcZ2akcCllNRJ/vXmiOk +W9Kf596QpaLMEZ+nMjFk/RIiWvVKVIxxHsjyJe3a6fmkX4uKrcFB/ndJ03+X +bPtnSMWgHWoG46S/SMwPSVtQcf/AVl7VWAJKmVZRDHsqXpHh6vQhHeV+gW+7 +KxVTnQNvZJM2+m8wK9Kbihck6w62kl56TVP5XDAVP2qp2/8l3fz4SE3pQSq6 +Xh9RXXeYgLTBZtvWRCq2F0uvsSG9nUeibzSVioPNXH+DSFOUfEL4L1JRoLh5 +/BTpYUsOl2IeFfOMS8cKSN8NWEw3K6Jiz7Xh6WrSEam28p73qPhcuXBlK2lm +yaXy/x5RcY+fssY70pveti2MN1Lx1mD06yHSdlzLNu95TcWZZVb830jv2MBI +e/mOist25LZ/J73XMbgHhqn4eOsRjf87OPa6XNk4FbPNR+S+kj5Y0B1Im6Vi +y8G+u59IPx454drIRcPcVYFtXaQtYulx8Tw0rBM4l9RI+sXq2usGK2h41Mv1 +fQVp+wKXxglBGir1vWjOI91lMDl2S5iGilo/nJJJu7WmrPWUoOHh8dbY/aT7 +PRX1JGVp+DM5HO1I+87UubbTaei6/ct1FdLfTrnFJSvScCTZ8CYP6VDqzHUT +FRr6bzxk855c/2kirXFOg4aXzUrTS0nHWKp8Z+vQ0OfkWEwc6eNhHnpyxjTk +VallipJewfvXtdeUhiKhocLvyHpIu3w+7txmGtazQzKukr5c39zI7UDD8m1X +TkuQpu7w+V7tTMNin5/L28n6KxhbXBvhSkPDriGtE6RLRXXdBveSz0fOJY2Q +9duwL/d7fRQNQ8tPhceR9W41zxA6HEvDJ0O+AbKk29I69HTiaXh28x2xSrJf +eqqWxxck09C26F3aINlP4ysjhY5foeGyCCsVYbL/Iq4J6rPyaKiwrHr4Atmf +szq33aZv0LCgJW2XOOmlu/sKfEpp+ICzmCwYTuZ9maW+xRMazt+cnu4k+//q +pkG3f89oeFP/Rg2Qlus5El/xgobHqsY2F5L5ocZNNCl20jBB9Vul/34yL5xk +3fm+0NChyke2mcyfoNnJ+MZVdJwbbZqd9CbrL8xXbESIjrF3He6Ik+Yf7S1a +KkHHNxT/Wwwy7268q+8ylqMjfAxLCyfzse/hedV7enQszt5iWEnm59bjjO68 +PXQ88OmAa6Yz2Q//ivc/8qbjwoclaXFOZP5EyS394E/HamSo7NtGQJLfSnWJ +SDqu2ix0SYXM7zqbD0fPJNFxP8+huGQy37WFEjRi2XQcFAgauGxKAFfKdENW +BR1fP3iks8WEXO+lAa4VNXRMtXvOOw8EBE47Hp98SseK5nOaW8n9paBb4d2+ +XjoWnClteqFPgFhu4wmnpXLo98stmapKwJzKmj41Zzn8GhYszxIiYOaqVMJG +VznUG9B/dWoNAVOr1ykw9sjhUbcah05B8vv9YgRs8pdD5fqMHo+V5H5Ys3fG +9YgcHtNTVHEk999mm/uCSTfkMA+e2eZOk+eVwN0wMC2HPAa5nj86OXDxg9/A +5z9ymGaf8qX3DQcyt0Yc/75Ivv9gVEx9OwfObEx6MbtcHqXOGzxLaeVA4l/2 +9tUUeVyivlp9roEDgSk8oUYW8kixf/bUkuCAUdHdaxcuyGNVdpT389MceEcr +yjXPlsfNhn5tCSkciLlwO2cqlzTXhy5GMgfuJxRecbwtj5HXKU35xzigveNa +lmCtPC5YVbntiOXABp7MtBOf5DGndjJuG3k+EtsTGx+lqoD9til8mciBSSFr +D5cnChh05f73tFE2dAfJvQp4roAu34JdEz6zoe7ZH4hrUUBFy2b/kCHyfBdT +RL3VpYCzmpIHN/WxQXNA4OPcqAKG5XckvW5nQzD75a6rwutwuTl9Qzx5Phzd +6uw25L0OJ/qM+9SPsWEo1cMlnE8Ri5SHZS1E2WD1I9pqWE8JH+yI436oXQZj +e/kjyuPWYyn/s3f7t5SQ/xfi3CefbMADh/WNG6h3QahV8UzZD2UMmIqcjuC7 +AzJJpfZ6eqqoVbO12L72JmSpMNYI71PDwEz1keNXbkCzlInur3R1DBpT3eeT +cR2YMk/SNLo08KaagXBbeB4ILs2P9EzUxNAqZwV9ai5QEqhGOxW18MLmV1Wv +N2fD8nXuFY7PtVB/WMKyvekiqLMkS6N3aWP8T9ctPi8yIbxPqN6aayM6qsWv +P/Y2HX78SnW2ytqIb6PDM1sqz8BmjWeXrdR0cFmUbO8t91Pw8Jfh399tOugi +bz1tpHoCglW1e9t9dNE3sMPm6sNEYI17d+xcroe7/n1LTOWLA3MFiS2r8vXw +Ipz/SOk6BOvjTx18oq+PhmU1O20OHABlH8ajdb36eODf6JqHQWFwVs7uz9H3 +pOeUjs3vDoOpj166A336GP9ah7bJIQweuqYW5QyS40XL68Z1w8DR/uNF8e/6 +mNKpvo69GAqHDI+HLucyIPv76+mRzFBoXNtO/77OAOWF57S+poSAz0O/Y+Vh +BtijcqvU9mgQjO8fjTaPNMCQCONHSgFBcFA2KLArygCl8w7UiDoEwanDIY6z +sQbYoWlkp0wNgjJmFM3ohAF6afMU69QGwnzF0dr6ywa4zY7a3TAXAOdKc6Ze +1xtgeuzJxpOJ/vDoWof3pCgD3+/RO2XV6Av9tvQ9URIMPJt0JWuM8AWuuf07 +/0oxUG7tiHturi+YOvDZ8dAY+Dntb//GaF94toSpL6nMQEbryxZxJV9o8cpd +bmLMQBNsGn2S7AO9CgElab4M3Lugdcfb1Rumbi3+1rjPwL43Zqc6FL1gxMXi +WnIVAz3aTskaintB97LTloM1DHzzONOjmM8LajykLl2oY6D68P2e8i+ekCih +y1xoYqDzWaM3dkWesCYp4HDzewb6xws23NL2BNV9nVw+3Ex8eZKi2WDlAXvX +FS2/vIWJNbp9jizNXRDzdHeAoj0TazO4DW1EdkGaj9ALjiMTcya9b4XOukPt +jUOpL7YzsSKnp33JY3cQUbRcveDJRNO8oUuG29zhmeKwiEcUEx1pIaP/Yt1A +eT2VppjLxE9x/THOfTthUjlDjzPBxPrs8BsDAy7Q3YLmwr+Y2LxoZNLZ6gJ1 +wePbIqeZ+L4+jben0gXOcKzC9P4w8evSVR+Fz7qAMpPrbvVSQ3z+RT7B2cgF +vKz20+vFDPHO/NuAf5ecoWPfZoEOI/K+2RzvRU8nqCz4+2k6yRAruqWORFMd +Qc8s8rd1iiFeVeobYQs6wr1PYwLXThviyISv8p8FB+BQ+vStzxniSuqiePl7 +B7ibVXc6J5ucT/fTfy2XHeBa6nHG5hJDlE94LHFS0gGSI1enZ70xxM+rf4d8 +otmD6yZ5NKQY4Vf5K0znO7aw0MEvWE8zwor0acuuVFu45jP+zlreCKdjuy6G +h9jCyImqaNf1RugyV3dtXscWwpu2lh7SJsdfl+VxemwDp+wOUyotjNBki1/4 +Qp81VO/onNcJMUKWtYXXLTUrkN5/skq9zgjThlz+TAlbwJlFX92UJ0b4HyMk +X/ufOXCfs2B/bjDCUNMVd45+MYfRCp7b15qM8Mvqwew9D8yhmutYltAbIzTl +6fNb2GcOrpnx0TPDRnj8HW9tfd0myKo5pPtwJQtnYicbROPNQMBuJ1tKkIVy +957yXg8yg/h+A7XoNSw0dbLsNdlpBn48swqaoiw8pzvzj9A2A/2tUSL5FBYW +L9F44DdiCl0D4b+Oa7EQNuVI8zuYguiKIPaW7Szca1CaXadtAgVmR2ImdrIw +v9/SyItqAtpHzphluLMwMV/5rriACdhNlHV2e7LwfuVDzoNhhBNd03N7g1h4 +2rwpaOoSwmx+nGlMAgunPpTbLPAg9BpmvCksYqGLV6zEim4W+B0ouGJVwsKm +Ujv8d48FMyX3fMbKWHig5uUz0UwWCMl1/9aqYOFjF7/gEnsW2PDLyjyoY6F0 +iOL1xBdGUNtR6P2mk4UqoZMvLj83BGvBSrWobhamrggZvnfTELo3N81IvGOh +g9Jzr58nDWGq+lvS7n4WnqVnrXppaQhqeZrFX0dZ+Ovbx0bhFibU9ppEpX5n +4UdKyQ29YiZYi2wDjQkWXqz8MHnoDBN8Tx5oj5xmoUzBpz2eDkyYqjtxWXyW +hVU7ysx5NjIh8c/FvdV/WNhP65RrEmHCGp3bqrsWWMgtfrLn7gwDcvZXTy8u +kvYXsS3rZsD/ANx22Uk= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VV8XB3ApQyWVebwDosxkupdrLUSmhFChQsiUOYr6GZqIiqiUIpIG +Ge49kqlSVAilECrJVEmiEEXe8/51ns9zzt7nefZZ67v3oXuFOPpwc3FxMZZw +cf3/OtPX1KCQUmAsOGGRLlixybgjR+KQSXci2DdcX5KzKAco+tJLovscBG78 +IR6+qA1R9nfeLu3OB9Xh7MBti6awdlz83NxbDsS7fNKnLzrCx1q7kKm3T6CC +oVJ0+J8XWCiMfph8+xoerDzRMv83HObe6p+feDsAZcKPbiz/mQj1ZjcL2vN/ +wZHi1feF0jJA5mPViJfqAgg8tH9ZXXgFRIL23OEzW4ptkmW/PE/nwzktixo7 +Z35UXf9ieXNbIfRkadZNrlmFigc6Yvr97kBKQdxLbsm1qLOE91hmbzFY6/gL +icqvxbYvEflin4uBv8HRWUltLfqdP3Ur7VcxHBtc987GZC3WWpl7BQmUwGG5 +lpFM/7WYYfvY+gmrBIKvSfxTrF6Lr72dfg7nlIDDFbaqjZsQlorPhyy4loJ4 +5mByxlVhzPdz/bboXgYSKveOzRYKI5+2hc17zzKQenIibleZMD7alDxR7lsG +lIkNB5TqhdGbv47fLbQM1tmGetR8Ecajn7/uiTlaBhuXLegNbhTBNMhS47ld +BlsjxYa0m0XwZt4mYvNkGdiv/NJ38Y0IUqS23C+aLgPH/Kqe+fciqCBQOrHy +Txm4vHJ/+eyHCMoFf1jymJsNu1SvV7uKimJfV8O5BWE2BA5ppCd6iOLT3O1S +dbpsOOlkZfx6RhTzFMJ9/aLYIFXeJsW9RAyFBcsfFcawoUTY6bfWSjFkJHpc +7P+PDV2vd5elU8VQZ+p5ncVJNig4RMo5WIrhS4WhX+8vsuHJllzeV5fI+44b +8jUr2bBgMd3WaiSOed6KVRHTbEgrjClasBBHZmt7CH2OHM/LlaTmII5OfPM5 +zfNssH26wuS0jzjKnDjtu3oZBy6b0QjbM+J4UMHhkpcQBwzQ5uKLj+K4LPtt +koY6ByIYeXuaEiWwRKaxZa8XB6yvCU7ZpEqgkfhUk40PB+T4Die1nZdA411j +nRp+HHjV4cJ+c0sChwZbpMb2c0A9VGBpX5sEilv7uese4sCXwujCn1KSOOC9 +fWjFWQ64i9h9lyYkkXdVw8H6+xzYGFuTkFMricfKz9xVq+bAioH1YvRnkugR +LDKTUcuBqtKloNgjiWuKk144PeaAmE1VmuaiJG7RH0y62Uy+P0FBx9xGCsP0 +FbPS33Ng048/McGDUujq6nU9ZoEDhywzlR+PSeHWq+/Tdy9yoCRPrVd4RgrF +AnsajZcQIOHkwajil0aNcmmhqWUEjFU+/b1UXRofu9lQtAUIyEhMi7x0UBpV +5LyPz0sS0Phug8JYgjS6HF658YY0AfM69W+MU6TxbcAjTWtZAnw/T2sPXZXG +2dTtlGQaAUxbt0n1emlU/dr+qleRgAFRxeCGVTL4VubzijZtAsRDHsmKi8ug +oeyXWUMdAmwbd7T602Rw2fJ8KNQloCImRXX1Rhn0zjvXE2JAwKmPE6M7d8jg +JbOBrW9ZBGjfrtn3I18Gz9OLWn9vJmAft7O46V0ZDKmSPKtiRcAVt/Fnmfdk +cFs2H+FmTQCvIF2R2SiD/6XPKrBtCegNPzF07LsM6smfqdd0ICDByMFTykAW +22VmEo7uJMByd85PfVNZXCVp33XOlQDB+G9HnW1l8WvxzPRVN3L++uOFaR6y ++Nr35eWbuwiotK7+xpssi+JaJzOTPAmIC+I7opAhi4+WieyK8iLA4oyToOlV +WWQP7prds5eAjvZxzSNscr7nf+8o+hAwsUM+6lePLLaFRUgn+hFwPyaUb+2Q +LH5b/TPTzp+A/648yFIfl0Whyd9fxAIIEOjfXuPPTUHjd1kK2YEEKO1L5epX +puDCwWje8GACxpN60hd0KNhGBIfKhhBQfkdRXhoo+N1j9YMG0qbjdeYu2yiY +8imamy+MgN0Hpk+1xFKwTtbdzTWCgHUXTWVGj1NQV0pgdiji//VxtpgvjYJK +PR/iAiMJiJnf8Mq0gILtE4bOQQcIMKFEe3qUUHCRMVMwQpofG34eqaQgR0F9 +yD2KgPNHd4tWtVBwWDxBlxVNgPuNosKuLgp2xHRY3SQt93xWf6qfgjraYo6r +DhJQtiLDVWOagkkJg6atpKNV+7/ZLlLQ9hFbTekQAcZ2akcCllNRJ/vXmiOk +W9Kf596QpaLMEZ+nMjFk/RIiWvVKVIxxHsjyJe3a6fmkX4uKrcFB/ndJ03+X +bPtnSMWgHWoG46S/SMwPSVtQcf/AVl7VWAJKmVZRDHsqXpHh6vQhHeV+gW+7 +KxVTnQNvZJM2+m8wK9Kbihck6w62kl56TVP5XDAVP2qp2/8l3fz4SE3pQSq6 +Xh9RXXeYgLTBZtvWRCq2F0uvsSG9nUeibzSVioPNXH+DSFOUfEL4L1JRoLh5 +/BTpYUsOl2IeFfOMS8cKSN8NWEw3K6Jiz7Xh6WrSEam28p73qPhcuXBlK2lm +yaXy/x5RcY+fssY70pveti2MN1Lx1mD06yHSdlzLNu95TcWZZVb830jv2MBI +e/mOist25LZ/J73XMbgHhqn4eOsRjf87OPa6XNk4FbPNR+S+kj5Y0B1Im6Vi +y8G+u59IPx454drIRcPcVYFtXaQtYulx8Tw0rBM4l9RI+sXq2usGK2h41Mv1 +fQVp+wKXxglBGir1vWjOI91lMDl2S5iGilo/nJJJu7WmrPWUoOHh8dbY/aT7 +PRX1JGVp+DM5HO1I+87UubbTaei6/ct1FdLfTrnFJSvScCTZ8CYP6VDqzHUT +FRr6bzxk855c/2kirXFOg4aXzUrTS0nHWKp8Z+vQ0OfkWEwc6eNhHnpyxjTk +VallipJewfvXtdeUhiKhocLvyHpIu3w+7txmGtazQzKukr5c39zI7UDD8m1X +TkuQpu7w+V7tTMNin5/L28n6KxhbXBvhSkPDriGtE6RLRXXdBveSz0fOJY2Q +9duwL/d7fRQNQ8tPhceR9W41zxA6HEvDJ0O+AbKk29I69HTiaXh28x2xSrJf +eqqWxxck09C26F3aINlP4ysjhY5foeGyCCsVYbL/Iq4J6rPyaKiwrHr4Atmf +szq33aZv0LCgJW2XOOmlu/sKfEpp+ICzmCwYTuZ9maW+xRMazt+cnu4k+//q +pkG3f89oeFP/Rg2Qlus5El/xgobHqsY2F5L5ocZNNCl20jBB9Vul/34yL5xk +3fm+0NChyke2mcyfoNnJ+MZVdJwbbZqd9CbrL8xXbESIjrF3He6Ik+Yf7S1a +KkHHNxT/Wwwy7268q+8ylqMjfAxLCyfzse/hedV7enQszt5iWEnm59bjjO68 +PXQ88OmAa6Yz2Q//ivc/8qbjwoclaXFOZP5EyS394E/HamSo7NtGQJLfSnWJ +SDqu2ix0SYXM7zqbD0fPJNFxP8+huGQy37WFEjRi2XQcFAgauGxKAFfKdENW +BR1fP3iks8WEXO+lAa4VNXRMtXvOOw8EBE47Hp98SseK5nOaW8n9paBb4d2+ +XjoWnClteqFPgFhu4wmnpXLo98stmapKwJzKmj41Zzn8GhYszxIiYOaqVMJG +VznUG9B/dWoNAVOr1ykw9sjhUbcah05B8vv9YgRs8pdD5fqMHo+V5H5Ys3fG +9YgcHtNTVHEk999mm/uCSTfkMA+e2eZOk+eVwN0wMC2HPAa5nj86OXDxg9/A +5z9ymGaf8qX3DQcyt0Yc/75Ivv9gVEx9OwfObEx6MbtcHqXOGzxLaeVA4l/2 +9tUUeVyivlp9roEDgSk8oUYW8kixf/bUkuCAUdHdaxcuyGNVdpT389MceEcr +yjXPlsfNhn5tCSkciLlwO2cqlzTXhy5GMgfuJxRecbwtj5HXKU35xzigveNa +lmCtPC5YVbntiOXABp7MtBOf5DGndjJuG3k+EtsTGx+lqoD9til8mciBSSFr +D5cnChh05f73tFE2dAfJvQp4roAu34JdEz6zoe7ZH4hrUUBFy2b/kCHyfBdT +RL3VpYCzmpIHN/WxQXNA4OPcqAKG5XckvW5nQzD75a6rwutwuTl9Qzx5Phzd +6uw25L0OJ/qM+9SPsWEo1cMlnE8Ri5SHZS1E2WD1I9pqWE8JH+yI436oXQZj +e/kjyuPWYyn/s3f7t5SQ/xfi3CefbMADh/WNG6h3QahV8UzZD2UMmIqcjuC7 +AzJJpfZ6eqqoVbO12L72JmSpMNYI71PDwEz1keNXbkCzlInur3R1DBpT3eeT +cR2YMk/SNLo08KaagXBbeB4ILs2P9EzUxNAqZwV9ai5QEqhGOxW18MLmV1Wv +N2fD8nXuFY7PtVB/WMKyvekiqLMkS6N3aWP8T9ctPi8yIbxPqN6aayM6qsWv +P/Y2HX78SnW2ytqIb6PDM1sqz8BmjWeXrdR0cFmUbO8t91Pw8Jfh399tOugi +bz1tpHoCglW1e9t9dNE3sMPm6sNEYI17d+xcroe7/n1LTOWLA3MFiS2r8vXw +Ipz/SOk6BOvjTx18oq+PhmU1O20OHABlH8ajdb36eODf6JqHQWFwVs7uz9H3 +pOeUjs3vDoOpj166A336GP9ah7bJIQweuqYW5QyS40XL68Z1w8DR/uNF8e/6 +mNKpvo69GAqHDI+HLucyIPv76+mRzFBoXNtO/77OAOWF57S+poSAz0O/Y+Vh +BtijcqvU9mgQjO8fjTaPNMCQCONHSgFBcFA2KLArygCl8w7UiDoEwanDIY6z +sQbYoWlkp0wNgjJmFM3ohAF6afMU69QGwnzF0dr6ywa4zY7a3TAXAOdKc6Ze +1xtgeuzJxpOJ/vDoWof3pCgD3+/RO2XV6Av9tvQ9URIMPJt0JWuM8AWuuf07 +/0oxUG7tiHturi+YOvDZ8dAY+Dntb//GaF94toSpL6nMQEbryxZxJV9o8cpd +bmLMQBNsGn2S7AO9CgElab4M3Lugdcfb1Rumbi3+1rjPwL43Zqc6FL1gxMXi +WnIVAz3aTskaintB97LTloM1DHzzONOjmM8LajykLl2oY6D68P2e8i+ekCih +y1xoYqDzWaM3dkWesCYp4HDzewb6xws23NL2BNV9nVw+3Ex8eZKi2WDlAXvX +FS2/vIWJNbp9jizNXRDzdHeAoj0TazO4DW1EdkGaj9ALjiMTcya9b4XOukPt +jUOpL7YzsSKnp33JY3cQUbRcveDJRNO8oUuG29zhmeKwiEcUEx1pIaP/Yt1A +eT2VppjLxE9x/THOfTthUjlDjzPBxPrs8BsDAy7Q3YLmwr+Y2LxoZNLZ6gJ1 +wePbIqeZ+L4+jben0gXOcKzC9P4w8evSVR+Fz7qAMpPrbvVSQ3z+RT7B2cgF +vKz20+vFDPHO/NuAf5ecoWPfZoEOI/K+2RzvRU8nqCz4+2k6yRAruqWORFMd +Qc8s8rd1iiFeVeobYQs6wr1PYwLXThviyISv8p8FB+BQ+vStzxniSuqiePl7 +B7ibVXc6J5ucT/fTfy2XHeBa6nHG5hJDlE94LHFS0gGSI1enZ70xxM+rf4d8 +otmD6yZ5NKQY4Vf5K0znO7aw0MEvWE8zwor0acuuVFu45jP+zlreCKdjuy6G +h9jCyImqaNf1RugyV3dtXscWwpu2lh7SJsdfl+VxemwDp+wOUyotjNBki1/4 +Qp81VO/onNcJMUKWtYXXLTUrkN5/skq9zgjThlz+TAlbwJlFX92UJ0b4HyMk +X/ufOXCfs2B/bjDCUNMVd45+MYfRCp7b15qM8Mvqwew9D8yhmutYltAbIzTl +6fNb2GcOrpnx0TPDRnj8HW9tfd0myKo5pPtwJQtnYicbROPNQMBuJ1tKkIVy +957yXg8yg/h+A7XoNSw0dbLsNdlpBn48swqaoiw8pzvzj9A2A/2tUSL5FBYW +L9F44DdiCl0D4b+Oa7EQNuVI8zuYguiKIPaW7Szca1CaXadtAgVmR2ImdrIw +v9/SyItqAtpHzphluLMwMV/5rriACdhNlHV2e7LwfuVDzoNhhBNd03N7g1h4 +2rwpaOoSwmx+nGlMAgunPpTbLPAg9BpmvCksYqGLV6zEim4W+B0ouGJVwsKm +Ujv8d48FMyX3fMbKWHig5uUz0UwWCMl1/9aqYOFjF7/gEnsW2PDLyjyoY6F0 +iOL1xBdGUNtR6P2mk4UqoZMvLj83BGvBSrWobhamrggZvnfTELo3N81IvGOh +g9Jzr58nDWGq+lvS7n4WnqVnrXppaQhqeZrFX0dZ+Ovbx0bhFibU9ppEpX5n +4UdKyQ29YiZYi2wDjQkWXqz8MHnoDBN8Tx5oj5xmoUzBpz2eDkyYqjtxWXyW +hVU7ysx5NjIh8c/FvdV/WNhP65RrEmHCGp3bqrsWWMgtfrLn7gwDcvZXTy8u +kvYXsS3rZsD/ANx22Uk= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07612501495108864}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07612501495108864}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VV8XB3ApQyWVebwDosxkupdrLUSmhFChQsiUOYr6GZqIiqiUIpIG +Ge49kqlSVAilECrJVEmiEEXe8/51ns9zzt7nefZZ67v3oXuFOPpwc3FxMZZw +cf3/OtPX1KCQUmAsOGGRLlixybgjR+KQSXci2DdcX5KzKAco+tJLovscBG78 +IR6+qA1R9nfeLu3OB9Xh7MBti6awdlz83NxbDsS7fNKnLzrCx1q7kKm3T6CC +oVJ0+J8XWCiMfph8+xoerDzRMv83HObe6p+feDsAZcKPbiz/mQj1ZjcL2vN/ +wZHi1feF0jJA5mPViJfqAgg8tH9ZXXgFRIL23OEzW4ptkmW/PE/nwzktixo7 +Z35UXf9ieXNbIfRkadZNrlmFigc6Yvr97kBKQdxLbsm1qLOE91hmbzFY6/gL +icqvxbYvEflin4uBv8HRWUltLfqdP3Ur7VcxHBtc987GZC3WWpl7BQmUwGG5 +lpFM/7WYYfvY+gmrBIKvSfxTrF6Lr72dfg7nlIDDFbaqjZsQlorPhyy4loJ4 +5mByxlVhzPdz/bboXgYSKveOzRYKI5+2hc17zzKQenIibleZMD7alDxR7lsG +lIkNB5TqhdGbv47fLbQM1tmGetR8Ecajn7/uiTlaBhuXLegNbhTBNMhS47ld +BlsjxYa0m0XwZt4mYvNkGdiv/NJ38Y0IUqS23C+aLgPH/Kqe+fciqCBQOrHy +Txm4vHJ/+eyHCMoFf1jymJsNu1SvV7uKimJfV8O5BWE2BA5ppCd6iOLT3O1S +dbpsOOlkZfx6RhTzFMJ9/aLYIFXeJsW9RAyFBcsfFcawoUTY6bfWSjFkJHpc +7P+PDV2vd5elU8VQZ+p5ncVJNig4RMo5WIrhS4WhX+8vsuHJllzeV5fI+44b +8jUr2bBgMd3WaiSOed6KVRHTbEgrjClasBBHZmt7CH2OHM/LlaTmII5OfPM5 +zfNssH26wuS0jzjKnDjtu3oZBy6b0QjbM+J4UMHhkpcQBwzQ5uKLj+K4LPtt +koY6ByIYeXuaEiWwRKaxZa8XB6yvCU7ZpEqgkfhUk40PB+T4Die1nZdA411j +nRp+HHjV4cJ+c0sChwZbpMb2c0A9VGBpX5sEilv7uese4sCXwujCn1KSOOC9 +fWjFWQ64i9h9lyYkkXdVw8H6+xzYGFuTkFMricfKz9xVq+bAioH1YvRnkugR +LDKTUcuBqtKloNgjiWuKk144PeaAmE1VmuaiJG7RH0y62Uy+P0FBx9xGCsP0 +FbPS33Ng048/McGDUujq6nU9ZoEDhywzlR+PSeHWq+/Tdy9yoCRPrVd4RgrF +AnsajZcQIOHkwajil0aNcmmhqWUEjFU+/b1UXRofu9lQtAUIyEhMi7x0UBpV +5LyPz0sS0Phug8JYgjS6HF658YY0AfM69W+MU6TxbcAjTWtZAnw/T2sPXZXG +2dTtlGQaAUxbt0n1emlU/dr+qleRgAFRxeCGVTL4VubzijZtAsRDHsmKi8ug +oeyXWUMdAmwbd7T602Rw2fJ8KNQloCImRXX1Rhn0zjvXE2JAwKmPE6M7d8jg +JbOBrW9ZBGjfrtn3I18Gz9OLWn9vJmAft7O46V0ZDKmSPKtiRcAVt/Fnmfdk +cFs2H+FmTQCvIF2R2SiD/6XPKrBtCegNPzF07LsM6smfqdd0ICDByMFTykAW +22VmEo7uJMByd85PfVNZXCVp33XOlQDB+G9HnW1l8WvxzPRVN3L++uOFaR6y ++Nr35eWbuwiotK7+xpssi+JaJzOTPAmIC+I7opAhi4+WieyK8iLA4oyToOlV +WWQP7prds5eAjvZxzSNscr7nf+8o+hAwsUM+6lePLLaFRUgn+hFwPyaUb+2Q +LH5b/TPTzp+A/648yFIfl0Whyd9fxAIIEOjfXuPPTUHjd1kK2YEEKO1L5epX +puDCwWje8GACxpN60hd0KNhGBIfKhhBQfkdRXhoo+N1j9YMG0qbjdeYu2yiY +8imamy+MgN0Hpk+1xFKwTtbdzTWCgHUXTWVGj1NQV0pgdiji//VxtpgvjYJK +PR/iAiMJiJnf8Mq0gILtE4bOQQcIMKFEe3qUUHCRMVMwQpofG34eqaQgR0F9 +yD2KgPNHd4tWtVBwWDxBlxVNgPuNosKuLgp2xHRY3SQt93xWf6qfgjraYo6r +DhJQtiLDVWOagkkJg6atpKNV+7/ZLlLQ9hFbTekQAcZ2akcCllNRJ/vXmiOk +W9Kf596QpaLMEZ+nMjFk/RIiWvVKVIxxHsjyJe3a6fmkX4uKrcFB/ndJ03+X +bPtnSMWgHWoG46S/SMwPSVtQcf/AVl7VWAJKmVZRDHsqXpHh6vQhHeV+gW+7 +KxVTnQNvZJM2+m8wK9Kbihck6w62kl56TVP5XDAVP2qp2/8l3fz4SE3pQSq6 +Xh9RXXeYgLTBZtvWRCq2F0uvsSG9nUeibzSVioPNXH+DSFOUfEL4L1JRoLh5 +/BTpYUsOl2IeFfOMS8cKSN8NWEw3K6Jiz7Xh6WrSEam28p73qPhcuXBlK2lm +yaXy/x5RcY+fssY70pveti2MN1Lx1mD06yHSdlzLNu95TcWZZVb830jv2MBI +e/mOist25LZ/J73XMbgHhqn4eOsRjf87OPa6XNk4FbPNR+S+kj5Y0B1Im6Vi +y8G+u59IPx454drIRcPcVYFtXaQtYulx8Tw0rBM4l9RI+sXq2usGK2h41Mv1 +fQVp+wKXxglBGir1vWjOI91lMDl2S5iGilo/nJJJu7WmrPWUoOHh8dbY/aT7 +PRX1JGVp+DM5HO1I+87UubbTaei6/ct1FdLfTrnFJSvScCTZ8CYP6VDqzHUT +FRr6bzxk855c/2kirXFOg4aXzUrTS0nHWKp8Z+vQ0OfkWEwc6eNhHnpyxjTk +VallipJewfvXtdeUhiKhocLvyHpIu3w+7txmGtazQzKukr5c39zI7UDD8m1X +TkuQpu7w+V7tTMNin5/L28n6KxhbXBvhSkPDriGtE6RLRXXdBveSz0fOJY2Q +9duwL/d7fRQNQ8tPhceR9W41zxA6HEvDJ0O+AbKk29I69HTiaXh28x2xSrJf +eqqWxxck09C26F3aINlP4ysjhY5foeGyCCsVYbL/Iq4J6rPyaKiwrHr4Atmf +szq33aZv0LCgJW2XOOmlu/sKfEpp+ICzmCwYTuZ9maW+xRMazt+cnu4k+//q +pkG3f89oeFP/Rg2Qlus5El/xgobHqsY2F5L5ocZNNCl20jBB9Vul/34yL5xk +3fm+0NChyke2mcyfoNnJ+MZVdJwbbZqd9CbrL8xXbESIjrF3He6Ik+Yf7S1a +KkHHNxT/Wwwy7268q+8ylqMjfAxLCyfzse/hedV7enQszt5iWEnm59bjjO68 +PXQ88OmAa6Yz2Q//ivc/8qbjwoclaXFOZP5EyS394E/HamSo7NtGQJLfSnWJ +SDqu2ix0SYXM7zqbD0fPJNFxP8+huGQy37WFEjRi2XQcFAgauGxKAFfKdENW +BR1fP3iks8WEXO+lAa4VNXRMtXvOOw8EBE47Hp98SseK5nOaW8n9paBb4d2+ +XjoWnClteqFPgFhu4wmnpXLo98stmapKwJzKmj41Zzn8GhYszxIiYOaqVMJG +VznUG9B/dWoNAVOr1ykw9sjhUbcah05B8vv9YgRs8pdD5fqMHo+V5H5Ys3fG +9YgcHtNTVHEk999mm/uCSTfkMA+e2eZOk+eVwN0wMC2HPAa5nj86OXDxg9/A +5z9ymGaf8qX3DQcyt0Yc/75Ivv9gVEx9OwfObEx6MbtcHqXOGzxLaeVA4l/2 +9tUUeVyivlp9roEDgSk8oUYW8kixf/bUkuCAUdHdaxcuyGNVdpT389MceEcr +yjXPlsfNhn5tCSkciLlwO2cqlzTXhy5GMgfuJxRecbwtj5HXKU35xzigveNa +lmCtPC5YVbntiOXABp7MtBOf5DGndjJuG3k+EtsTGx+lqoD9til8mciBSSFr +D5cnChh05f73tFE2dAfJvQp4roAu34JdEz6zoe7ZH4hrUUBFy2b/kCHyfBdT +RL3VpYCzmpIHN/WxQXNA4OPcqAKG5XckvW5nQzD75a6rwutwuTl9Qzx5Phzd +6uw25L0OJ/qM+9SPsWEo1cMlnE8Ri5SHZS1E2WD1I9pqWE8JH+yI436oXQZj +e/kjyuPWYyn/s3f7t5SQ/xfi3CefbMADh/WNG6h3QahV8UzZD2UMmIqcjuC7 +AzJJpfZ6eqqoVbO12L72JmSpMNYI71PDwEz1keNXbkCzlInur3R1DBpT3eeT +cR2YMk/SNLo08KaagXBbeB4ILs2P9EzUxNAqZwV9ai5QEqhGOxW18MLmV1Wv +N2fD8nXuFY7PtVB/WMKyvekiqLMkS6N3aWP8T9ctPi8yIbxPqN6aayM6qsWv +P/Y2HX78SnW2ytqIb6PDM1sqz8BmjWeXrdR0cFmUbO8t91Pw8Jfh399tOugi +bz1tpHoCglW1e9t9dNE3sMPm6sNEYI17d+xcroe7/n1LTOWLA3MFiS2r8vXw +Ipz/SOk6BOvjTx18oq+PhmU1O20OHABlH8ajdb36eODf6JqHQWFwVs7uz9H3 +pOeUjs3vDoOpj166A336GP9ah7bJIQweuqYW5QyS40XL68Z1w8DR/uNF8e/6 +mNKpvo69GAqHDI+HLucyIPv76+mRzFBoXNtO/77OAOWF57S+poSAz0O/Y+Vh +BtijcqvU9mgQjO8fjTaPNMCQCONHSgFBcFA2KLArygCl8w7UiDoEwanDIY6z +sQbYoWlkp0wNgjJmFM3ohAF6afMU69QGwnzF0dr6ywa4zY7a3TAXAOdKc6Ze +1xtgeuzJxpOJ/vDoWof3pCgD3+/RO2XV6Av9tvQ9URIMPJt0JWuM8AWuuf07 +/0oxUG7tiHturi+YOvDZ8dAY+Dntb//GaF94toSpL6nMQEbryxZxJV9o8cpd +bmLMQBNsGn2S7AO9CgElab4M3Lugdcfb1Rumbi3+1rjPwL43Zqc6FL1gxMXi +WnIVAz3aTskaintB97LTloM1DHzzONOjmM8LajykLl2oY6D68P2e8i+ekCih +y1xoYqDzWaM3dkWesCYp4HDzewb6xws23NL2BNV9nVw+3Ex8eZKi2WDlAXvX +FS2/vIWJNbp9jizNXRDzdHeAoj0TazO4DW1EdkGaj9ALjiMTcya9b4XOukPt +jUOpL7YzsSKnp33JY3cQUbRcveDJRNO8oUuG29zhmeKwiEcUEx1pIaP/Yt1A +eT2VppjLxE9x/THOfTthUjlDjzPBxPrs8BsDAy7Q3YLmwr+Y2LxoZNLZ6gJ1 +wePbIqeZ+L4+jben0gXOcKzC9P4w8evSVR+Fz7qAMpPrbvVSQ3z+RT7B2cgF +vKz20+vFDPHO/NuAf5ecoWPfZoEOI/K+2RzvRU8nqCz4+2k6yRAruqWORFMd +Qc8s8rd1iiFeVeobYQs6wr1PYwLXThviyISv8p8FB+BQ+vStzxniSuqiePl7 +B7ibVXc6J5ucT/fTfy2XHeBa6nHG5hJDlE94LHFS0gGSI1enZ70xxM+rf4d8 +otmD6yZ5NKQY4Vf5K0znO7aw0MEvWE8zwor0acuuVFu45jP+zlreCKdjuy6G +h9jCyImqaNf1RugyV3dtXscWwpu2lh7SJsdfl+VxemwDp+wOUyotjNBki1/4 +Qp81VO/onNcJMUKWtYXXLTUrkN5/skq9zgjThlz+TAlbwJlFX92UJ0b4HyMk +X/ufOXCfs2B/bjDCUNMVd45+MYfRCp7b15qM8Mvqwew9D8yhmutYltAbIzTl +6fNb2GcOrpnx0TPDRnj8HW9tfd0myKo5pPtwJQtnYicbROPNQMBuJ1tKkIVy +957yXg8yg/h+A7XoNSw0dbLsNdlpBn48swqaoiw8pzvzj9A2A/2tUSL5FBYW +L9F44DdiCl0D4b+Oa7EQNuVI8zuYguiKIPaW7Szca1CaXadtAgVmR2ImdrIw +v9/SyItqAtpHzphluLMwMV/5rriACdhNlHV2e7LwfuVDzoNhhBNd03N7g1h4 +2rwpaOoSwmx+nGlMAgunPpTbLPAg9BpmvCksYqGLV6zEim4W+B0ouGJVwsKm +Ujv8d48FMyX3fMbKWHig5uUz0UwWCMl1/9aqYOFjF7/gEnsW2PDLyjyoY6F0 +iOL1xBdGUNtR6P2mk4UqoZMvLj83BGvBSrWobhamrggZvnfTELo3N81IvGOh +g9Jzr58nDWGq+lvS7n4WnqVnrXppaQhqeZrFX0dZ+Ovbx0bhFibU9ppEpX5n +4UdKyQ29YiZYi2wDjQkWXqz8MHnoDBN8Tx5oj5xmoUzBpz2eDkyYqjtxWXyW +hVU7ysx5NjIh8c/FvdV/WNhP65RrEmHCGp3bqrsWWMgtfrLn7gwDcvZXTy8u +kvYXsS3rZsD/ANx22Uk= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07612501495108864}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8404,7 +8034,8 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07773075306777268}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07612501495108864}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8412,9 +8043,637 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913298974454536`*^9}, + CellChangeTimes->{3.9943513917091627`*^9, 3.994353792185532*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"a0806228-fece-44eb-a547-d9b074b47c40"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"L", "=", + FractionBox[ + SqrtBox[ + RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", + CellChangeTimes->{3.9918488983507824`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], + +Cell[BoxData["9.666705495311133`"], "Output", + CellChangeTimes->{3.9913294794877434`*^9, 3.994351391763975*^9, + 3.994353792234722*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"af65cca2-cfa8-45c1-bf14-bd58e24c0f9e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"L", "=", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + RowBox[{"(", + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], + RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + FractionBox["h2", "Cb"], ")"}], "*", "x", "*", "y"}], "2"], + ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + FractionBox["1", "Cb"], ")"}]}]], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", + RowBox[{"{", + RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", + CellChangeTimes->{3.9918488997875195`*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.9539380697128215`*^-259\\\", \ +RowBox[{\\\"9295690268007118823449497\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"5542386262016000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 99, 13, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.99435139190937*^9, + 3.994353792360997*^9}, CellLabel-> - "Out[172]=",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] + "During evaluation of \ +In[99]:=",ExpressionUUID->"b6752a21-defd-4478-8c76-b01a9c579e86"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7266385596673545`*^-268\\\", \ +RowBox[{\\\"7817675515393986930521027\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"12\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1146846355456000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 99, 14, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.99435139190937*^9, + 3.994353792371338*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"231e88e2-45ca-40ef-8e92-b5bbd7442cea"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0092563369211032`*^-277\\\", \ +RowBox[{\\\"7035907963854588237468924\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"2161719910400000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 99, 15, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.99435139190937*^9, + 3.9943537923808613`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"8dce707c-33b1-4c06-89ed-8b26d50ec8c9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 99, 16, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.99435139190937*^9, + 3.9943537923910427`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"a7f3a5b0-3f94-4ee9-a1e1-5f3d196c9bfe"], + +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VP8bB3ChUNn3bYy1kpKlGcOM5xGmLMmetFkSkTWplFJRikSbpZJs +328RZu6kLN/yJYqkbFmT0CaUrPkqv/v7657XOZ/POZ9zP8/zfu5V9wl19uPn +4+PbuoSP7//Pmf6GZ1qJeebC1VHG3xXZ5u1ZCscsus6AuefAqARbC1D2tY9C +1xVw7J0c/GBtDFGO9zsFunLgCv/XsGprK5Acl7/yq5MLuQ2TAgnWrvC+yiF0 +qrMGuAJ9S15Z7QO21si7ic5WSDA5kDJlEQm/OunXf3QOQrRib3A2LQ5qLf/K +a8mZhCe5sz9neq+ByvvyTz56v0Gy4aekfXwWyBzce1/IUgDlQ5+8+asqF64Y +sCsd3IRxob990tbkb+hO31A9ISGK1rY/I08tFEJmW6F4lLYoBictaPasKAJP +sVV75xmiqG/Jo+kpF0HfWdU//L6iKN+75WgZowgGQpYzZR6KotqfekHfqCL4 +YjX8iLZDDJ8U3JRXHC+CuR9pJcfvimOjzgXuwNsHkJh36jW/oiR6uG2bWX2p +BGyND0jJakpiT6bHomBmCQg/c3ZbtU4Sl40KzXUWlEDckHavnYUkxqclFftU +l8AJjaZP1w5I4sLUxdHlkyUQkq3wR6dCEmN7Hzk4ry0Fp1scPbudUigfEXAn +KrEU5K8NXbh6WxrT7d+lcFkcUFj7MG6uQBoTQvzbb27igFLNuVO7S6XRrkdy +InYzByg/1hxeVSuN7y6kEOZOHNC2D/Oq/CKNuQESDgn7OGAk+Js2ZCSDaoGe +fi4XObAtUm7YsFEG7W+FdtS1csBxxZf+tDYZvDASbrOmkwPOOeXdC30yOPb8 +z/mEXg64v9n1uv67DJpvc/E1HebAbr3cCk9ZWRRpjb0QNM2BoGH91DNesmje +J+EgIM+F86425q0zsjgfGtK/bDsXlHjNSvxL5LAm1c+CtpMLxdKuswYr5HB5 +wsxfXnu58LZ1T2mqmhxqn1l9qsCfC1pOkRpOW+Tw8yMlp5kjXKjZemfZmww5 +tDz+dV9BGhd+s6ebXzHlsWfe4NXmNi6kFEQX/mbLo988O7zzLbl/GV/COid5 +vJ5tJu/TwwX7uuUWl/zk8UIy5UDABy5kWlIJ+2R5vEp7sorxnQsmaJf28r08 +ElHC+t9ECDjEuLu34YwCOmkRjVfMCLDNFpuyS1JAu+4da53MCdAQOpHQfF0B +PxZLmaywIOBNuzun7W8F5Fs64B7BJmB92EqB/mYFjNvL5q50IuBLwZGCn0qK ++OOc/eoIPwKein40PayliJUa3NBv/gTciHR+PbtOEWX3RwZ4BRJgvWnd3AIq +YkR3WigrlICcd4M2Qv6KmGoV+r72KAG7ZBzGlAlFzFhckcufSIDR8crTWVWK +yKmLNKBfImD54Go59XpFtNgtftT/MgHlJQKg062IDbue6VdeJUDOrjxlw6Ii +btcccde/RZ7/tJaxtZ0S/nd2fMa2iACr7/PRIUNKuEGF4+3SQMCxLdd0/x1V +wpVTvJuzjQQU313XIz2jhL4TyxrTmghQcPVilAsro8V16WVNrwkYfVw3K7Be +Gb19k0QF3xJw9UxKZMZRZXTwXz3K/UDAi941WqOnlbFPOOmx3BABC8a1beaJ +yqh/4tXZqGEC9n+eNhy+rYwzLyoUdT8TYGq/c2J9rTImZjG3e48SMCirE/JM +VAW/yYxVScwQIB/6VFVeXgV1qJubjWcJsH/h8eoAVQUra11HXOcIKItO1BM3 +UsG89kLrC/MEXHz/Y2SHhwrmvIy8U/OHvA+Ti5lF3uT+vGSV54sETKVq2i4G +qqDP4D/3n/PxYI+V+728GBU8djnvdxU/DwzvVfp/z1FBRdnma0eX8cCf301+ +U5EK8gnXc3YL8eDWzvH6aw9VkJV+5pO5MA+WianrmL5QwcmuR5nTIjzoiTg3 +HDemgiGLHmxjUR6IN6ld65whz1tEMOZJW2mXW+ryqWKQbrNdlRgPiju/5byW +UsWYkLevjSV4cJrp5K1kooqN70+FzUrxYMuerJ/0Tapo85L/aJE0D8Riv511 +s1fF2rODM7tkyPPUxhekeKmin2T03lJZHvh+bKUXB6qiL+eGnYscD3SFqA0v +I1XxFaebmCD92Lbi27ILqngk78FvqgIPTh0UitG6qoo3hko+cEizk13FNt1W +xQdKlWxzRR60t4xviOGo4jLpgXQbJR788NCMmuxWRfH7vrG6Kjx4FB0mJDms +imH2OZfTSJ+89U/6+nFVvLYwt4ZPlQcrB7ZXHuCnYPq41NJnpNuW5NufX0nB +Qp2DW9QoPMjU/PkuT46Cp9xFVKJIr/JP4hvQpaDAL7tjcmo8GE/oTv1tTMG8 +bVeXepHm3dfRVAYKJvn6rMonfbzpEM/EhoJZnaIDH0lvGq+2dneh4OH6bxs0 +qDwQkRDrPLSbgu7/uih7kn5jsDMg1Z+C481Z2ZdIp7n8/as4nILrA1fVVJHe +c3j6YtNxCv6OtTn9mbR22iaVkXgKbjzk815UnUfW/+UHQikUNJVseadPmujp +M9fOpOBY5nTMVtLRC2vebMqj4L4nBv/uJ21BOeLtVUzBihtf/j5OWhif/Yx5 +TMHB+ydpSaSbvSXjbtZQ0Hd0R1A66etn98iWN1FwVdmHLdmkd+UXFrx9SyHv +/+SbXNIaz+foUwMUbHe7KfB/f/1i3SD5jYJpH3OGbpMuXX7VU3+agsMh/BHX +SB/RG/hmv0hBN5vVpedImzusiwkUUcP09XF3IkkvDYsWS5BWQzrjvMUe0k2p +z+/kq6qh41BumiXpq4SMQe0qNQxZ6pCrRdqzw7tmwEANmR3zfktIq88Wu/wx +U0OPYeqHbvJ9fVFYGFZmq+EKNRO5YtIlpjZRDEc1FHlZvuwk6ahdN4S2e6qh +9Tkqz4a0QPYG3SshavjaJdmunby/xn9jKkuOqmHLtlSTq6RThhrtX51Rw4W1 +4V+2kqas8gsVTlPDgU+vbpSR9fJxC5dP564aaoNT+j7SRYGLqZaF5PkCnviI +kTYtzuCdfKqGfkfCPdzI+rPqbP49/kIN8w8rWP8i69WBT3Dz3lY1zNQ/mZhB +2tc5pBs+qqGEbJLua2WyH46rn4pdSsX9ntIdYmT9vxSvyjVZTsWVCiuI62R/ +OOa5v/ghRsWEpZ+nFEjvfJUo6a1ARUGzsHsyZD+Fqc3kWqyl4qjIn18DZH9O +EykvfulTseEOW9mOdPSWtWMcYyo+pHfc55D9HB/uRdMwp+LJ/mVKkWS/Z9Y2 +vuB3omLo9NPdzWQ+PPO/M1YbRcWg+oz87uU8sFlgSJ04TsWJrV9sV5BuTmmn +GcdSsd59/BCDzKPucpHYvAtUrBy76Z5I5tf4ikip+FtULOwTiV8qyAOF0i10 +dg0Vk3+5/+O6QMBtq6Gdf+qp6DBubbXtP3IedsfElr2kotsJhh+bzNd1/ESD +TgcV/2P3R+uS+bvJVXWX0Bcq2usrqTZOEnBwbiL2hag6nl/z4lTACJnv4fvl +PkmpY7+XeJnUVwKER3oKBRTU0fBSoEg5mf/5vbVvzTXUscGwR2yenA/9T67r +PaSpY76fdcPW9wRsi2d03d2rjumPn+Wx2gig/HkQ/HSfOlbmil++30LOoygN +gXcH1DGC2cmTfkNAQsCK9QqR6ujtmF7RQ86vart3Z5MT1PFJhclHs3oCDKVO +6x/nqKOgYM5B+8cE8CVOP0svU0cplay5mDICmgUCPcsq1VFJIvR9IY+AoGnn ++Ik6ddyhF1e3UEpAXpdWr3+POk4c8Fx76B45b++8OOcqoIHhS8h0yiDg11qJ +/nVuGujUZvH+2hECZm4rnTby1MCB9BYzr8Pk/BHX1mLs1cC+23Uuqw8RMD7J +CLQ6oIH+d6v+KQ4h51+l74xnjAY+PmnCuUZ+TzTaPRJLyNfAfJfR1npnAjKD +9sDgtAb6tagKtOoSwCwsyr5xQxPLz3c2TbdwoZdaeMf6pibelf8lbPSaC9E3 +7mVN3dFEv/IL/cFNXHh0uuCW8z1NJB5W7eqr54KhR3a6WJUmhjR3tN+q5MKa +pddSzn3QxMjpEf0HeVyQ23s8NkpPC594xp+QP8yFCSlbL/caLXSNWrI5QpwL +w0le7hFCOvj65cbgYQUO2Hw/YvORtgrjDIcP9ymUwqiv8CHeqdXYsWFid1v/ +A/L/QZ7/fM0a/LdjPYzEFILUK53k0u+6aHIjWfgM8x6oJJQ40mh6KFNqPFnV +VADpaxkS0v7rMOOf7pEDV/KgUcli42TqenwrtSHxQFQOmKrUpOi/1cfoHZSX +/DbZICaQE+l9ZgPWhcqWKv57Cyin1Zg7dAzw1qhVl9+3dBDR3lXm/NwANVP7 +MpKir8N6lmLJkd2GOHfYvPpXyhWI6JeqteUzQkF7oXmPqMvwfTLJzSbdCF8f +/HJwsOYibNavz7RZZ4wc9WRBjZJz8GTS7L/ZZmPUrXTpmWg5AyF6hj0tfhvx +Jq3qRL7/KWCN72vfIULDNL8y6cO3j4G1lsJW0RwaJpvNsHOEDgNvrE59Xx4N +bz749FllNhK0Hh2aqSigIVtg7Z6cT5EgaPv6TkAhDY0KnMte1UVCTei5n7U8 +Gg7u5J3Lj4sE88qptOjnNAxP9Ka5CUYCzbll8PMoDcd19vinrjgEq2MvHq2h +07HscoXMPpNwqDLLX2pvSsfQGJlJ1ppwcJx9eqWDSce/HojIayqFw9GQ6aIv +FnSMI2rlxBfC4MUurw9i9nSc0+ayg6vDIIBBs93pRcff0a9mmHZhcO/nB+Wp +BDoarZG/t9ASArp+jKfaPXR8vlXsnv/5ILis4TB/to+OvvW54cJhQTD13mfj +YD8d+0zFGRUeQfDEM6kwa4iOguJWWY66QeDs+D5NfoyO258+ebS5ORCOmcWH +ifCZ4Hr9m33uioHwQrJFfUzbBOkOQ7qPKgPA70lAHC/cBIeSvgge198P48Ej +R6wjTVDOX0blkNJ+OKp6MOhtlAmqabZEnli6Hy6eCHWeO26CB1ZTntT0+kGp +aRSVec4ETfi7o1Qu+MFC2dmq2kwT9JpzrJv/tA+ulGRNtdaa4HfnHz2yJb7w +NLt934QsA+9myLocDPGGAXv1vVEKDCx5uSyjeLc38P0K3vGfEgNvDtWN/bH3 +hk1OQg5LqQzU27j7dsNab6hfYkpX1GXg2qS/RJaNeEGTzx0RC3MGOt43aJQ6 +4AU9WoHFKfsZmHAtryFycA9M/b04q/+IgXv2MYLPb9sJn9zZ2RfKGdhyPYPn +RNsJXYKXtgxVMvC0a8eZDao7odJLKeNGNQN7liSdWPvNE84obDT93UBaRt5X +NsETJBICTzT2MZC1qoP/Qd0O0PPv4PPjN8Wy7EqJS9s8wFe7UCRzqyku9s2l +G9x0g+i6PYE6jqbo1Lp8x39xbpDiJ/WS62yKiouu+7pD3KAq/1jSy+2mGDtK +p7RucgMZnS3iv71N8brt/YO8b65Qr/NRxivKFPPm9y+st3AF3dVqVJ07ppjW +1vo9dd4ZJnSv0rg/TLFHMT+rN9cRuprQWnrSFPOX3Y0KvuoI1SHjLpHTpmg+ +m9kuetYRkrk24bR5UwzWL5855uMIuqZ8RRUCZuj1yzHnj7oj+NgEq9fKmaH/ +e4VNXpu3Qbv/5pXtTDM0eDv1d6vPVnic99+H6QQzpB9N+Dny2QZolpGztolm +WM3H+mdDsw08/DC6MvuSGZ7JaE28xLMBLqWfbnvFDAc3xo8lnraBovTqS1k3 +zTC26G5bhooNZCfFMzYXm+Hd5prWEfctcCFSPDW9zQylaM4rv/ayQVg6oWCs +wwy7gp4Wjj1jwzkOX9WmLjOkjZzSFSpmQ9z4xKfRPjO0bVwddzSWDScD2pkW +n8wwjJv1zlmHDRG7Mr58nTPD573zM52HrcHTShPNKExM7rK24Wlawe92YbFa +KhOPrfAYOipqBdl+4722mkxsysh67DJrCZ/OlR/xXE2uN9r43O6lJUQ0bCs5 +ZsjEj23RHpaRlnDR4QTlMZuJDvrRadC4CSo8OhaMQ5n4eVD/76/xFrD7a0Vj +VTgTqUdEZZwiLIAvOjvdKpKJ3hoKAU17LIB9M8jY9RgTFaH+9B+6BbS+W3Lw +0Fly/eWWSw7fEEZ81vdy0ph4bUakLtkNQTn4fPn6aibGiJ3eviHMHJIX929M +rGHil+HxkwKO5sB/hc35/IyJHMXu7Gl9cxgpW3ovu4GJTB3BINoPFlTwxaVL +tTGxq2OYuSqCBZ7XYo/MfGTiqRFL45LjTEivPLbxyQoWxqfrSf6VZworHXZw +lMRYWCh5aGpVginEDpisOyLBwtwxbuGzIFMIWDqntUGWha8Sfmx0MjIF+rYo +mRwKC/NTPyvzahnwdjBiMt6AhTol1tFJX01AdvlBztbtLAzZeGfvxy10yLOM +if6xg4VO26VG6/XoYBiTbHl1FwspJ4yTnkvQweFHaUeXNwvdd0Zf0u6mwbm3 +0798D7Jw/xqmpVMQDeZyTm2KPs3CXUdn2Vuvb4Qes6ttBYUsFE0Jkl2xaAQB +h/Nu2RSzECkrmq9/MoKZ4od+o6Us9I7+NGfWbARSGl2zBmUsrA49QO+5bQR2 +wqoq/1SzsMho/86d5kZQ1V6wr62DhR8KGPc84gzBVuzxuqguFu7xDmq/FGwI +XZsbZhR6Wdi3tvRZn7shTFV8S9gzwEL2Keuk52sMYd3dDQ++jrDwmBx76NUb +A6jqsYhKGmNh2BFFn+YKA7CVcQH9Hyy8r/q183OeAew/f7glcpqFXX1yln7H +DGCq+lym/BwLM4vnljb4GsCZ+TTfinkWpin2e1o7GICE8T293b9ZaJj9dHWP +iQFkBVdMLy6ysC6+0P28pgH8D7ipTM4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VP8bB3ChUNn3bYy1kpKlGcOM5xGmLMmetFkSkTWplFJRikSbpZJs +328RZu6kLN/yJYqkbFmT0CaUrPkqv/v7657XOZ/POZ9zP8/zfu5V9wl19uPn +4+PbuoSP7//Pmf6GZ1qJeebC1VHG3xXZ5u1ZCscsus6AuefAqARbC1D2tY9C +1xVw7J0c/GBtDFGO9zsFunLgCv/XsGprK5Acl7/yq5MLuQ2TAgnWrvC+yiF0 +qrMGuAJ9S15Z7QO21si7ic5WSDA5kDJlEQm/OunXf3QOQrRib3A2LQ5qLf/K +a8mZhCe5sz9neq+ByvvyTz56v0Gy4aekfXwWyBzce1/IUgDlQ5+8+asqF64Y +sCsd3IRxob990tbkb+hO31A9ISGK1rY/I08tFEJmW6F4lLYoBictaPasKAJP +sVV75xmiqG/Jo+kpF0HfWdU//L6iKN+75WgZowgGQpYzZR6KotqfekHfqCL4 +YjX8iLZDDJ8U3JRXHC+CuR9pJcfvimOjzgXuwNsHkJh36jW/oiR6uG2bWX2p +BGyND0jJakpiT6bHomBmCQg/c3ZbtU4Sl40KzXUWlEDckHavnYUkxqclFftU +l8AJjaZP1w5I4sLUxdHlkyUQkq3wR6dCEmN7Hzk4ry0Fp1scPbudUigfEXAn +KrEU5K8NXbh6WxrT7d+lcFkcUFj7MG6uQBoTQvzbb27igFLNuVO7S6XRrkdy +InYzByg/1hxeVSuN7y6kEOZOHNC2D/Oq/CKNuQESDgn7OGAk+Js2ZCSDaoGe +fi4XObAtUm7YsFEG7W+FdtS1csBxxZf+tDYZvDASbrOmkwPOOeXdC30yOPb8 +z/mEXg64v9n1uv67DJpvc/E1HebAbr3cCk9ZWRRpjb0QNM2BoGH91DNesmje +J+EgIM+F86425q0zsjgfGtK/bDsXlHjNSvxL5LAm1c+CtpMLxdKuswYr5HB5 +wsxfXnu58LZ1T2mqmhxqn1l9qsCfC1pOkRpOW+Tw8yMlp5kjXKjZemfZmww5 +tDz+dV9BGhd+s6ebXzHlsWfe4NXmNi6kFEQX/mbLo988O7zzLbl/GV/COid5 +vJ5tJu/TwwX7uuUWl/zk8UIy5UDABy5kWlIJ+2R5vEp7sorxnQsmaJf28r08 +ElHC+t9ECDjEuLu34YwCOmkRjVfMCLDNFpuyS1JAu+4da53MCdAQOpHQfF0B +PxZLmaywIOBNuzun7W8F5Fs64B7BJmB92EqB/mYFjNvL5q50IuBLwZGCn0qK ++OOc/eoIPwKein40PayliJUa3NBv/gTciHR+PbtOEWX3RwZ4BRJgvWnd3AIq +YkR3WigrlICcd4M2Qv6KmGoV+r72KAG7ZBzGlAlFzFhckcufSIDR8crTWVWK +yKmLNKBfImD54Go59XpFtNgtftT/MgHlJQKg062IDbue6VdeJUDOrjxlw6Ii +btcccde/RZ7/tJaxtZ0S/nd2fMa2iACr7/PRIUNKuEGF4+3SQMCxLdd0/x1V +wpVTvJuzjQQU313XIz2jhL4TyxrTmghQcPVilAsro8V16WVNrwkYfVw3K7Be +Gb19k0QF3xJw9UxKZMZRZXTwXz3K/UDAi941WqOnlbFPOOmx3BABC8a1beaJ +yqh/4tXZqGEC9n+eNhy+rYwzLyoUdT8TYGq/c2J9rTImZjG3e48SMCirE/JM +VAW/yYxVScwQIB/6VFVeXgV1qJubjWcJsH/h8eoAVQUra11HXOcIKItO1BM3 +UsG89kLrC/MEXHz/Y2SHhwrmvIy8U/OHvA+Ti5lF3uT+vGSV54sETKVq2i4G +qqDP4D/3n/PxYI+V+728GBU8djnvdxU/DwzvVfp/z1FBRdnma0eX8cCf301+ +U5EK8gnXc3YL8eDWzvH6aw9VkJV+5pO5MA+WianrmL5QwcmuR5nTIjzoiTg3 +HDemgiGLHmxjUR6IN6ld65whz1tEMOZJW2mXW+ryqWKQbrNdlRgPiju/5byW +UsWYkLevjSV4cJrp5K1kooqN70+FzUrxYMuerJ/0Tapo85L/aJE0D8Riv511 +s1fF2rODM7tkyPPUxhekeKmin2T03lJZHvh+bKUXB6qiL+eGnYscD3SFqA0v +I1XxFaebmCD92Lbi27ILqngk78FvqgIPTh0UitG6qoo3hko+cEizk13FNt1W +xQdKlWxzRR60t4xviOGo4jLpgXQbJR788NCMmuxWRfH7vrG6Kjx4FB0mJDms +imH2OZfTSJ+89U/6+nFVvLYwt4ZPlQcrB7ZXHuCnYPq41NJnpNuW5NufX0nB +Qp2DW9QoPMjU/PkuT46Cp9xFVKJIr/JP4hvQpaDAL7tjcmo8GE/oTv1tTMG8 +bVeXepHm3dfRVAYKJvn6rMonfbzpEM/EhoJZnaIDH0lvGq+2dneh4OH6bxs0 +qDwQkRDrPLSbgu7/uih7kn5jsDMg1Z+C481Z2ZdIp7n8/as4nILrA1fVVJHe +c3j6YtNxCv6OtTn9mbR22iaVkXgKbjzk815UnUfW/+UHQikUNJVseadPmujp +M9fOpOBY5nTMVtLRC2vebMqj4L4nBv/uJ21BOeLtVUzBihtf/j5OWhif/Yx5 +TMHB+ydpSaSbvSXjbtZQ0Hd0R1A66etn98iWN1FwVdmHLdmkd+UXFrx9SyHv +/+SbXNIaz+foUwMUbHe7KfB/f/1i3SD5jYJpH3OGbpMuXX7VU3+agsMh/BHX +SB/RG/hmv0hBN5vVpedImzusiwkUUcP09XF3IkkvDYsWS5BWQzrjvMUe0k2p +z+/kq6qh41BumiXpq4SMQe0qNQxZ6pCrRdqzw7tmwEANmR3zfktIq88Wu/wx +U0OPYeqHbvJ9fVFYGFZmq+EKNRO5YtIlpjZRDEc1FHlZvuwk6ahdN4S2e6qh +9Tkqz4a0QPYG3SshavjaJdmunby/xn9jKkuOqmHLtlSTq6RThhrtX51Rw4W1 +4V+2kqas8gsVTlPDgU+vbpSR9fJxC5dP564aaoNT+j7SRYGLqZaF5PkCnviI +kTYtzuCdfKqGfkfCPdzI+rPqbP49/kIN8w8rWP8i69WBT3Dz3lY1zNQ/mZhB +2tc5pBs+qqGEbJLua2WyH46rn4pdSsX9ntIdYmT9vxSvyjVZTsWVCiuI62R/ +OOa5v/ghRsWEpZ+nFEjvfJUo6a1ARUGzsHsyZD+Fqc3kWqyl4qjIn18DZH9O +EykvfulTseEOW9mOdPSWtWMcYyo+pHfc55D9HB/uRdMwp+LJ/mVKkWS/Z9Y2 +vuB3omLo9NPdzWQ+PPO/M1YbRcWg+oz87uU8sFlgSJ04TsWJrV9sV5BuTmmn +GcdSsd59/BCDzKPucpHYvAtUrBy76Z5I5tf4ikip+FtULOwTiV8qyAOF0i10 +dg0Vk3+5/+O6QMBtq6Gdf+qp6DBubbXtP3IedsfElr2kotsJhh+bzNd1/ESD +TgcV/2P3R+uS+bvJVXWX0Bcq2usrqTZOEnBwbiL2hag6nl/z4lTACJnv4fvl +PkmpY7+XeJnUVwKER3oKBRTU0fBSoEg5mf/5vbVvzTXUscGwR2yenA/9T67r +PaSpY76fdcPW9wRsi2d03d2rjumPn+Wx2gig/HkQ/HSfOlbmil++30LOoygN +gXcH1DGC2cmTfkNAQsCK9QqR6ujtmF7RQ86vart3Z5MT1PFJhclHs3oCDKVO +6x/nqKOgYM5B+8cE8CVOP0svU0cplay5mDICmgUCPcsq1VFJIvR9IY+AoGnn ++Ik6ddyhF1e3UEpAXpdWr3+POk4c8Fx76B45b++8OOcqoIHhS8h0yiDg11qJ +/nVuGujUZvH+2hECZm4rnTby1MCB9BYzr8Pk/BHX1mLs1cC+23Uuqw8RMD7J +CLQ6oIH+d6v+KQ4h51+l74xnjAY+PmnCuUZ+TzTaPRJLyNfAfJfR1npnAjKD +9sDgtAb6tagKtOoSwCwsyr5xQxPLz3c2TbdwoZdaeMf6pibelf8lbPSaC9E3 +7mVN3dFEv/IL/cFNXHh0uuCW8z1NJB5W7eqr54KhR3a6WJUmhjR3tN+q5MKa +pddSzn3QxMjpEf0HeVyQ23s8NkpPC594xp+QP8yFCSlbL/caLXSNWrI5QpwL +w0le7hFCOvj65cbgYQUO2Hw/YvORtgrjDIcP9ymUwqiv8CHeqdXYsWFid1v/ +A/L/QZ7/fM0a/LdjPYzEFILUK53k0u+6aHIjWfgM8x6oJJQ40mh6KFNqPFnV +VADpaxkS0v7rMOOf7pEDV/KgUcli42TqenwrtSHxQFQOmKrUpOi/1cfoHZSX +/DbZICaQE+l9ZgPWhcqWKv57Cyin1Zg7dAzw1qhVl9+3dBDR3lXm/NwANVP7 +MpKir8N6lmLJkd2GOHfYvPpXyhWI6JeqteUzQkF7oXmPqMvwfTLJzSbdCF8f +/HJwsOYibNavz7RZZ4wc9WRBjZJz8GTS7L/ZZmPUrXTpmWg5AyF6hj0tfhvx +Jq3qRL7/KWCN72vfIULDNL8y6cO3j4G1lsJW0RwaJpvNsHOEDgNvrE59Xx4N +bz749FllNhK0Hh2aqSigIVtg7Z6cT5EgaPv6TkAhDY0KnMte1UVCTei5n7U8 +Gg7u5J3Lj4sE88qptOjnNAxP9Ka5CUYCzbll8PMoDcd19vinrjgEq2MvHq2h +07HscoXMPpNwqDLLX2pvSsfQGJlJ1ppwcJx9eqWDSce/HojIayqFw9GQ6aIv +FnSMI2rlxBfC4MUurw9i9nSc0+ayg6vDIIBBs93pRcff0a9mmHZhcO/nB+Wp +BDoarZG/t9ASArp+jKfaPXR8vlXsnv/5ILis4TB/to+OvvW54cJhQTD13mfj +YD8d+0zFGRUeQfDEM6kwa4iOguJWWY66QeDs+D5NfoyO258+ebS5ORCOmcWH +ifCZ4Hr9m33uioHwQrJFfUzbBOkOQ7qPKgPA70lAHC/cBIeSvgge198P48Ej +R6wjTVDOX0blkNJ+OKp6MOhtlAmqabZEnli6Hy6eCHWeO26CB1ZTntT0+kGp +aRSVec4ETfi7o1Qu+MFC2dmq2kwT9JpzrJv/tA+ulGRNtdaa4HfnHz2yJb7w +NLt934QsA+9myLocDPGGAXv1vVEKDCx5uSyjeLc38P0K3vGfEgNvDtWN/bH3 +hk1OQg5LqQzU27j7dsNab6hfYkpX1GXg2qS/RJaNeEGTzx0RC3MGOt43aJQ6 +4AU9WoHFKfsZmHAtryFycA9M/b04q/+IgXv2MYLPb9sJn9zZ2RfKGdhyPYPn +RNsJXYKXtgxVMvC0a8eZDao7odJLKeNGNQN7liSdWPvNE84obDT93UBaRt5X +NsETJBICTzT2MZC1qoP/Qd0O0PPv4PPjN8Wy7EqJS9s8wFe7UCRzqyku9s2l +G9x0g+i6PYE6jqbo1Lp8x39xbpDiJ/WS62yKiouu+7pD3KAq/1jSy+2mGDtK +p7RucgMZnS3iv71N8brt/YO8b65Qr/NRxivKFPPm9y+st3AF3dVqVJ07ppjW +1vo9dd4ZJnSv0rg/TLFHMT+rN9cRuprQWnrSFPOX3Y0KvuoI1SHjLpHTpmg+ +m9kuetYRkrk24bR5UwzWL5855uMIuqZ8RRUCZuj1yzHnj7oj+NgEq9fKmaH/ +e4VNXpu3Qbv/5pXtTDM0eDv1d6vPVnic99+H6QQzpB9N+Dny2QZolpGztolm +WM3H+mdDsw08/DC6MvuSGZ7JaE28xLMBLqWfbnvFDAc3xo8lnraBovTqS1k3 +zTC26G5bhooNZCfFMzYXm+Hd5prWEfctcCFSPDW9zQylaM4rv/ayQVg6oWCs +wwy7gp4Wjj1jwzkOX9WmLjOkjZzSFSpmQ9z4xKfRPjO0bVwddzSWDScD2pkW +n8wwjJv1zlmHDRG7Mr58nTPD573zM52HrcHTShPNKExM7rK24Wlawe92YbFa +KhOPrfAYOipqBdl+4722mkxsysh67DJrCZ/OlR/xXE2uN9r43O6lJUQ0bCs5 +ZsjEj23RHpaRlnDR4QTlMZuJDvrRadC4CSo8OhaMQ5n4eVD/76/xFrD7a0Vj +VTgTqUdEZZwiLIAvOjvdKpKJ3hoKAU17LIB9M8jY9RgTFaH+9B+6BbS+W3Lw +0Fly/eWWSw7fEEZ81vdy0ph4bUakLtkNQTn4fPn6aibGiJ3eviHMHJIX929M +rGHil+HxkwKO5sB/hc35/IyJHMXu7Gl9cxgpW3ovu4GJTB3BINoPFlTwxaVL +tTGxq2OYuSqCBZ7XYo/MfGTiqRFL45LjTEivPLbxyQoWxqfrSf6VZworHXZw +lMRYWCh5aGpVginEDpisOyLBwtwxbuGzIFMIWDqntUGWha8Sfmx0MjIF+rYo +mRwKC/NTPyvzahnwdjBiMt6AhTol1tFJX01AdvlBztbtLAzZeGfvxy10yLOM +if6xg4VO26VG6/XoYBiTbHl1FwspJ4yTnkvQweFHaUeXNwvdd0Zf0u6mwbm3 +0798D7Jw/xqmpVMQDeZyTm2KPs3CXUdn2Vuvb4Qes6ttBYUsFE0Jkl2xaAQB +h/Nu2RSzECkrmq9/MoKZ4od+o6Us9I7+NGfWbARSGl2zBmUsrA49QO+5bQR2 +wqoq/1SzsMho/86d5kZQ1V6wr62DhR8KGPc84gzBVuzxuqguFu7xDmq/FGwI +XZsbZhR6Wdi3tvRZn7shTFV8S9gzwEL2Keuk52sMYd3dDQ++jrDwmBx76NUb +A6jqsYhKGmNh2BFFn+YKA7CVcQH9Hyy8r/q183OeAew/f7glcpqFXX1yln7H +DGCq+lym/BwLM4vnljb4GsCZ+TTfinkWpin2e1o7GICE8T293b9ZaJj9dHWP +iQFkBVdMLy6ysC6+0P28pgH8D7ipTM4= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07863830414025332}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07863830414025332}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VP8bB3ChUNn3bYy1kpKlGcOM5xGmLMmetFkSkTWplFJRikSbpZJs +328RZu6kLN/yJYqkbFmT0CaUrPkqv/v7657XOZ/POZ9zP8/zfu5V9wl19uPn +4+PbuoSP7//Pmf6GZ1qJeebC1VHG3xXZ5u1ZCscsus6AuefAqARbC1D2tY9C +1xVw7J0c/GBtDFGO9zsFunLgCv/XsGprK5Acl7/yq5MLuQ2TAgnWrvC+yiF0 +qrMGuAJ9S15Z7QO21si7ic5WSDA5kDJlEQm/OunXf3QOQrRib3A2LQ5qLf/K +a8mZhCe5sz9neq+ByvvyTz56v0Gy4aekfXwWyBzce1/IUgDlQ5+8+asqF64Y +sCsd3IRxob990tbkb+hO31A9ISGK1rY/I08tFEJmW6F4lLYoBictaPasKAJP +sVV75xmiqG/Jo+kpF0HfWdU//L6iKN+75WgZowgGQpYzZR6KotqfekHfqCL4 +YjX8iLZDDJ8U3JRXHC+CuR9pJcfvimOjzgXuwNsHkJh36jW/oiR6uG2bWX2p +BGyND0jJakpiT6bHomBmCQg/c3ZbtU4Sl40KzXUWlEDckHavnYUkxqclFftU +l8AJjaZP1w5I4sLUxdHlkyUQkq3wR6dCEmN7Hzk4ry0Fp1scPbudUigfEXAn +KrEU5K8NXbh6WxrT7d+lcFkcUFj7MG6uQBoTQvzbb27igFLNuVO7S6XRrkdy +InYzByg/1hxeVSuN7y6kEOZOHNC2D/Oq/CKNuQESDgn7OGAk+Js2ZCSDaoGe +fi4XObAtUm7YsFEG7W+FdtS1csBxxZf+tDYZvDASbrOmkwPOOeXdC30yOPb8 +z/mEXg64v9n1uv67DJpvc/E1HebAbr3cCk9ZWRRpjb0QNM2BoGH91DNesmje +J+EgIM+F86425q0zsjgfGtK/bDsXlHjNSvxL5LAm1c+CtpMLxdKuswYr5HB5 +wsxfXnu58LZ1T2mqmhxqn1l9qsCfC1pOkRpOW+Tw8yMlp5kjXKjZemfZmww5 +tDz+dV9BGhd+s6ebXzHlsWfe4NXmNi6kFEQX/mbLo988O7zzLbl/GV/COid5 +vJ5tJu/TwwX7uuUWl/zk8UIy5UDABy5kWlIJ+2R5vEp7sorxnQsmaJf28r08 +ElHC+t9ECDjEuLu34YwCOmkRjVfMCLDNFpuyS1JAu+4da53MCdAQOpHQfF0B +PxZLmaywIOBNuzun7W8F5Fs64B7BJmB92EqB/mYFjNvL5q50IuBLwZGCn0qK ++OOc/eoIPwKein40PayliJUa3NBv/gTciHR+PbtOEWX3RwZ4BRJgvWnd3AIq +YkR3WigrlICcd4M2Qv6KmGoV+r72KAG7ZBzGlAlFzFhckcufSIDR8crTWVWK +yKmLNKBfImD54Go59XpFtNgtftT/MgHlJQKg062IDbue6VdeJUDOrjxlw6Ii +btcccde/RZ7/tJaxtZ0S/nd2fMa2iACr7/PRIUNKuEGF4+3SQMCxLdd0/x1V +wpVTvJuzjQQU313XIz2jhL4TyxrTmghQcPVilAsro8V16WVNrwkYfVw3K7Be +Gb19k0QF3xJw9UxKZMZRZXTwXz3K/UDAi941WqOnlbFPOOmx3BABC8a1beaJ +yqh/4tXZqGEC9n+eNhy+rYwzLyoUdT8TYGq/c2J9rTImZjG3e48SMCirE/JM +VAW/yYxVScwQIB/6VFVeXgV1qJubjWcJsH/h8eoAVQUra11HXOcIKItO1BM3 +UsG89kLrC/MEXHz/Y2SHhwrmvIy8U/OHvA+Ti5lF3uT+vGSV54sETKVq2i4G +qqDP4D/3n/PxYI+V+728GBU8djnvdxU/DwzvVfp/z1FBRdnma0eX8cCf301+ +U5EK8gnXc3YL8eDWzvH6aw9VkJV+5pO5MA+WianrmL5QwcmuR5nTIjzoiTg3 +HDemgiGLHmxjUR6IN6ld65whz1tEMOZJW2mXW+ryqWKQbrNdlRgPiju/5byW +UsWYkLevjSV4cJrp5K1kooqN70+FzUrxYMuerJ/0Tapo85L/aJE0D8Riv511 +s1fF2rODM7tkyPPUxhekeKmin2T03lJZHvh+bKUXB6qiL+eGnYscD3SFqA0v +I1XxFaebmCD92Lbi27ILqngk78FvqgIPTh0UitG6qoo3hko+cEizk13FNt1W +xQdKlWxzRR60t4xviOGo4jLpgXQbJR788NCMmuxWRfH7vrG6Kjx4FB0mJDms +imH2OZfTSJ+89U/6+nFVvLYwt4ZPlQcrB7ZXHuCnYPq41NJnpNuW5NufX0nB +Qp2DW9QoPMjU/PkuT46Cp9xFVKJIr/JP4hvQpaDAL7tjcmo8GE/oTv1tTMG8 +bVeXepHm3dfRVAYKJvn6rMonfbzpEM/EhoJZnaIDH0lvGq+2dneh4OH6bxs0 +qDwQkRDrPLSbgu7/uih7kn5jsDMg1Z+C481Z2ZdIp7n8/as4nILrA1fVVJHe +c3j6YtNxCv6OtTn9mbR22iaVkXgKbjzk815UnUfW/+UHQikUNJVseadPmujp +M9fOpOBY5nTMVtLRC2vebMqj4L4nBv/uJ21BOeLtVUzBihtf/j5OWhif/Yx5 +TMHB+ydpSaSbvSXjbtZQ0Hd0R1A66etn98iWN1FwVdmHLdmkd+UXFrx9SyHv +/+SbXNIaz+foUwMUbHe7KfB/f/1i3SD5jYJpH3OGbpMuXX7VU3+agsMh/BHX +SB/RG/hmv0hBN5vVpedImzusiwkUUcP09XF3IkkvDYsWS5BWQzrjvMUe0k2p +z+/kq6qh41BumiXpq4SMQe0qNQxZ6pCrRdqzw7tmwEANmR3zfktIq88Wu/wx +U0OPYeqHbvJ9fVFYGFZmq+EKNRO5YtIlpjZRDEc1FHlZvuwk6ahdN4S2e6qh +9Tkqz4a0QPYG3SshavjaJdmunby/xn9jKkuOqmHLtlSTq6RThhrtX51Rw4W1 +4V+2kqas8gsVTlPDgU+vbpSR9fJxC5dP564aaoNT+j7SRYGLqZaF5PkCnviI +kTYtzuCdfKqGfkfCPdzI+rPqbP49/kIN8w8rWP8i69WBT3Dz3lY1zNQ/mZhB +2tc5pBs+qqGEbJLua2WyH46rn4pdSsX9ntIdYmT9vxSvyjVZTsWVCiuI62R/ +OOa5v/ghRsWEpZ+nFEjvfJUo6a1ARUGzsHsyZD+Fqc3kWqyl4qjIn18DZH9O +EykvfulTseEOW9mOdPSWtWMcYyo+pHfc55D9HB/uRdMwp+LJ/mVKkWS/Z9Y2 +vuB3omLo9NPdzWQ+PPO/M1YbRcWg+oz87uU8sFlgSJ04TsWJrV9sV5BuTmmn +GcdSsd59/BCDzKPucpHYvAtUrBy76Z5I5tf4ikip+FtULOwTiV8qyAOF0i10 +dg0Vk3+5/+O6QMBtq6Gdf+qp6DBubbXtP3IedsfElr2kotsJhh+bzNd1/ESD +TgcV/2P3R+uS+bvJVXWX0Bcq2usrqTZOEnBwbiL2hag6nl/z4lTACJnv4fvl +PkmpY7+XeJnUVwKER3oKBRTU0fBSoEg5mf/5vbVvzTXUscGwR2yenA/9T67r +PaSpY76fdcPW9wRsi2d03d2rjumPn+Wx2gig/HkQ/HSfOlbmil++30LOoygN +gXcH1DGC2cmTfkNAQsCK9QqR6ujtmF7RQ86vart3Z5MT1PFJhclHs3oCDKVO +6x/nqKOgYM5B+8cE8CVOP0svU0cplay5mDICmgUCPcsq1VFJIvR9IY+AoGnn ++Ik6ddyhF1e3UEpAXpdWr3+POk4c8Fx76B45b++8OOcqoIHhS8h0yiDg11qJ +/nVuGujUZvH+2hECZm4rnTby1MCB9BYzr8Pk/BHX1mLs1cC+23Uuqw8RMD7J +CLQ6oIH+d6v+KQ4h51+l74xnjAY+PmnCuUZ+TzTaPRJLyNfAfJfR1npnAjKD +9sDgtAb6tagKtOoSwCwsyr5xQxPLz3c2TbdwoZdaeMf6pibelf8lbPSaC9E3 +7mVN3dFEv/IL/cFNXHh0uuCW8z1NJB5W7eqr54KhR3a6WJUmhjR3tN+q5MKa +pddSzn3QxMjpEf0HeVyQ23s8NkpPC594xp+QP8yFCSlbL/caLXSNWrI5QpwL +w0le7hFCOvj65cbgYQUO2Hw/YvORtgrjDIcP9ymUwqiv8CHeqdXYsWFid1v/ +A/L/QZ7/fM0a/LdjPYzEFILUK53k0u+6aHIjWfgM8x6oJJQ40mh6KFNqPFnV +VADpaxkS0v7rMOOf7pEDV/KgUcli42TqenwrtSHxQFQOmKrUpOi/1cfoHZSX +/DbZICaQE+l9ZgPWhcqWKv57Cyin1Zg7dAzw1qhVl9+3dBDR3lXm/NwANVP7 +MpKir8N6lmLJkd2GOHfYvPpXyhWI6JeqteUzQkF7oXmPqMvwfTLJzSbdCF8f +/HJwsOYibNavz7RZZ4wc9WRBjZJz8GTS7L/ZZmPUrXTpmWg5AyF6hj0tfhvx +Jq3qRL7/KWCN72vfIULDNL8y6cO3j4G1lsJW0RwaJpvNsHOEDgNvrE59Xx4N +bz749FllNhK0Hh2aqSigIVtg7Z6cT5EgaPv6TkAhDY0KnMte1UVCTei5n7U8 +Gg7u5J3Lj4sE88qptOjnNAxP9Ka5CUYCzbll8PMoDcd19vinrjgEq2MvHq2h +07HscoXMPpNwqDLLX2pvSsfQGJlJ1ppwcJx9eqWDSce/HojIayqFw9GQ6aIv +FnSMI2rlxBfC4MUurw9i9nSc0+ayg6vDIIBBs93pRcff0a9mmHZhcO/nB+Wp +BDoarZG/t9ASArp+jKfaPXR8vlXsnv/5ILis4TB/to+OvvW54cJhQTD13mfj +YD8d+0zFGRUeQfDEM6kwa4iOguJWWY66QeDs+D5NfoyO258+ebS5ORCOmcWH +ifCZ4Hr9m33uioHwQrJFfUzbBOkOQ7qPKgPA70lAHC/cBIeSvgge198P48Ej +R6wjTVDOX0blkNJ+OKp6MOhtlAmqabZEnli6Hy6eCHWeO26CB1ZTntT0+kGp +aRSVec4ETfi7o1Qu+MFC2dmq2kwT9JpzrJv/tA+ulGRNtdaa4HfnHz2yJb7w +NLt934QsA+9myLocDPGGAXv1vVEKDCx5uSyjeLc38P0K3vGfEgNvDtWN/bH3 +hk1OQg5LqQzU27j7dsNab6hfYkpX1GXg2qS/RJaNeEGTzx0RC3MGOt43aJQ6 +4AU9WoHFKfsZmHAtryFycA9M/b04q/+IgXv2MYLPb9sJn9zZ2RfKGdhyPYPn +RNsJXYKXtgxVMvC0a8eZDao7odJLKeNGNQN7liSdWPvNE84obDT93UBaRt5X +NsETJBICTzT2MZC1qoP/Qd0O0PPv4PPjN8Wy7EqJS9s8wFe7UCRzqyku9s2l +G9x0g+i6PYE6jqbo1Lp8x39xbpDiJ/WS62yKiouu+7pD3KAq/1jSy+2mGDtK +p7RucgMZnS3iv71N8brt/YO8b65Qr/NRxivKFPPm9y+st3AF3dVqVJ07ppjW +1vo9dd4ZJnSv0rg/TLFHMT+rN9cRuprQWnrSFPOX3Y0KvuoI1SHjLpHTpmg+ +m9kuetYRkrk24bR5UwzWL5855uMIuqZ8RRUCZuj1yzHnj7oj+NgEq9fKmaH/ +e4VNXpu3Qbv/5pXtTDM0eDv1d6vPVnic99+H6QQzpB9N+Dny2QZolpGztolm +WM3H+mdDsw08/DC6MvuSGZ7JaE28xLMBLqWfbnvFDAc3xo8lnraBovTqS1k3 +zTC26G5bhooNZCfFMzYXm+Hd5prWEfctcCFSPDW9zQylaM4rv/ayQVg6oWCs +wwy7gp4Wjj1jwzkOX9WmLjOkjZzSFSpmQ9z4xKfRPjO0bVwddzSWDScD2pkW +n8wwjJv1zlmHDRG7Mr58nTPD573zM52HrcHTShPNKExM7rK24Wlawe92YbFa +KhOPrfAYOipqBdl+4722mkxsysh67DJrCZ/OlR/xXE2uN9r43O6lJUQ0bCs5 +ZsjEj23RHpaRlnDR4QTlMZuJDvrRadC4CSo8OhaMQ5n4eVD/76/xFrD7a0Vj +VTgTqUdEZZwiLIAvOjvdKpKJ3hoKAU17LIB9M8jY9RgTFaH+9B+6BbS+W3Lw +0Fly/eWWSw7fEEZ81vdy0ph4bUakLtkNQTn4fPn6aibGiJ3eviHMHJIX929M +rGHil+HxkwKO5sB/hc35/IyJHMXu7Gl9cxgpW3ovu4GJTB3BINoPFlTwxaVL +tTGxq2OYuSqCBZ7XYo/MfGTiqRFL45LjTEivPLbxyQoWxqfrSf6VZworHXZw +lMRYWCh5aGpVginEDpisOyLBwtwxbuGzIFMIWDqntUGWha8Sfmx0MjIF+rYo +mRwKC/NTPyvzahnwdjBiMt6AhTol1tFJX01AdvlBztbtLAzZeGfvxy10yLOM +if6xg4VO26VG6/XoYBiTbHl1FwspJ4yTnkvQweFHaUeXNwvdd0Zf0u6mwbm3 +0798D7Jw/xqmpVMQDeZyTm2KPs3CXUdn2Vuvb4Qes6ttBYUsFE0Jkl2xaAQB +h/Nu2RSzECkrmq9/MoKZ4od+o6Us9I7+NGfWbARSGl2zBmUsrA49QO+5bQR2 +wqoq/1SzsMho/86d5kZQ1V6wr62DhR8KGPc84gzBVuzxuqguFu7xDmq/FGwI +XZsbZhR6Wdi3tvRZn7shTFV8S9gzwEL2Keuk52sMYd3dDQ++jrDwmBx76NUb +A6jqsYhKGmNh2BFFn+YKA7CVcQH9Hyy8r/q183OeAew/f7glcpqFXX1yln7H +DGCq+lym/BwLM4vnljb4GsCZ+TTfinkWpin2e1o7GICE8T293b9ZaJj9dHWP +iQFkBVdMLy6ysC6+0P28pgH8D7ipTM4= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07863830414025332}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07863830414025332}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943549172841797`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"ec1c5524-348d-4652-b34b-32a8d60000e0"] }, Open ]], Cell[CellGroupData[{ @@ -8426,7 +8685,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -8444,8 +8705,8 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"(", FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -8467,66 +8728,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[173]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], + "In[100]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 173, 129, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298974999084`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.884808547861024`*^-161\\\", \ +RowBox[{\\\"164243120455479739170682\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"105\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 100, 17, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.99435491743913*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], +In[100]:=",ExpressionUUID->"376bc1c8-460f-4a39-8a03-85c035eae336"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 130, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897510906*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3827052732035246`*^-163\\\", \ +RowBox[{\\\"552513857212233842570175\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"108\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 100, 18, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.994354917449987*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], +In[100]:=",ExpressionUUID->"11ef85ef-4336-46c3-84d7-72a59523da17"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 131, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298975189075`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1518458864317433`*^-166\\\", \ +RowBox[{\\\"192330073695578600598678\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"112\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 100, 19, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.994354917461488*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], +In[100]:=",ExpressionUUID->"cfe913a0-6da3-4c04-bdb1-406526ffa68a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 173, 132, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897526905*^9}, +during this calculation.\"", 2, 100, 20, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943549174701157`*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], +In[100]:=",ExpressionUUID->"0d8f876d-3e0a-4aa8-8942-12656bbb25fa"], -Cell[BoxData["9.77956849963325`"], "Output", - CellChangeTimes->{3.991329904262455*^9}, +Cell[BoxData["9.666504521095893`"], "Output", + CellChangeTimes->{3.991329904262455*^9, 3.9943550089760447`*^9}, CellLabel-> - "Out[173]=",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] + "Out[100]=",ExpressionUUID->"a4b64961-0c8d-4329-a23a-a53a910b3e5d"] }, Open ]], Cell[CellGroupData[{ @@ -8593,68 +8861,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489049186344`*^9, - 3.991848908595253*^9}},ExpressionUUID->"eb852908-4d60-c84e-80d9-\ -a57fd4094f56"], + CellChangeTimes->{{3.9918489049186344`*^9, 3.991848908595253*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 174, 133, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904300501*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4875796689597595`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 21, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994355009046701*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], +In[101]:=",ExpressionUUID->"a8ed2a68-cbdf-4a35-bee7-dc6e81a16a8b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 134, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904310505*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8688258335062654`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 22, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994355009057022*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], +In[101]:=",ExpressionUUID->"d505b280-9397-4421-b9ea-c9c025b9db9f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 135, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043185062`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5935593562928167`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"70\\\", \\\"\[RightSkeleton]\\\"}], \\\"4374400000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 101, 23, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994355009065398*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], +In[101]:=",ExpressionUUID->"487ac232-c5cd-4f65-92f9-5a8a8e0721a3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 174, 136, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043256874`*^9}, +during this calculation.\"", 2, 101, 24, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.9943550090753937`*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], +In[101]:=",ExpressionUUID->"aabe1cec-2051-4c8d-8bef-ab07a4154a1f"], -Cell[BoxData["0.1491428555515254`"], "Output", - CellChangeTimes->{3.9913299110465336`*^9}, +Cell[BoxData["0.9213679737208704`"], "Output", + CellChangeTimes->{3.9913299110465336`*^9, 3.994355020818984*^9}, CellLabel-> - "Out[174]=",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] + "Out[101]=",ExpressionUUID->"fe61d067-5b6d-44ea-bdca-96296620099e"] }, Open ]], Cell[CellGroupData[{ @@ -8675,8 +8947,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8721,68 +8992,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489121661835`*^9, - 3.9918489145264854`*^9}},ExpressionUUID->"d11037f6-09e7-b44f-8a1d-\ -47c1a485c608"], + CellChangeTimes->{{3.9918489121661835`*^9, 3.9918489145264854`*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 175, 137, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911081766*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4875796689597595`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 25, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994355020873732*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], +In[102]:=",ExpressionUUID->"3b5c289e-4dc0-49ff-ba9a-9ad38a7b164f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 138, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911090769*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8688258335062654`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 26, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994355020883484*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], +In[102]:=",ExpressionUUID->"d1fd5766-58b9-4ef9-8cbc-a34eefa91bb6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 139, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911098768*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5935593562928167`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"70\\\", \\\"\[RightSkeleton]\\\"}], \\\"4374400000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 102, 27, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.9943550208923273`*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], +In[102]:=",ExpressionUUID->"8f30f7cb-e509-406d-b50e-b36c802acdde"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 175, 140, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299111067944`*^9}, +during this calculation.\"", 2, 102, 28, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994355020900794*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], +In[102]:=",ExpressionUUID->"db20052a-c28a-4ce2-89af-04598c31fcc8"], -Cell[BoxData["6.5928699937564845`"], "Output", - CellChangeTimes->{3.9913299163114815`*^9}, +Cell[BoxData["27.246708859849225`"], "Output", + CellChangeTimes->{3.9913299163114815`*^9, 3.9943550320365677`*^9}, CellLabel-> - "Out[175]=",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] + "Out[102]=",ExpressionUUID->"6525a8f1-56d7-4a2a-bb31-f914d386fd41"] }, Open ]], Cell[CellGroupData[{ @@ -8803,8 +9078,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8849,68 +9123,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489192162857`*^9, - 3.991848922582632*^9}},ExpressionUUID->"431dd2fa-6331-2449-bc19-\ -0d79e6ed8953"], + CellChangeTimes->{{3.9918489192162857`*^9, 3.991848922582632*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 176, 141, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163444805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4875796689597595`*^-202\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 29, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994355032114736*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], +In[103]:=",ExpressionUUID->"e1a1f1d8-e3bc-4af4-8d67-92e3034f4af7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 142, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916354479*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.8688258335062654`*^-207\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 30, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994355032126911*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], +In[103]:=",ExpressionUUID->"1681b1b8-3d62-423f-a739-1063eeff97d3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 143, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163634796`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5935593562928167`*^-211\\\", \ +RowBox[{\\\"668859810497440244092067\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"70\\\", \\\"\[RightSkeleton]\\\"}], \\\"4374400000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 103, 31, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994355032137652*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], +In[103]:=",ExpressionUUID->"ebf77489-6aa1-4346-bd00-f84f4738dd82"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 176, 144, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916371479*^9}, +during this calculation.\"", 2, 103, 32, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994355032148073*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], +In[103]:=",ExpressionUUID->"cb1ece74-4987-403d-93b6-2eb314d62dc4"], -Cell[BoxData["16.916908616104454`"], "Output", - CellChangeTimes->{3.9913299193276234`*^9}, +Cell[BoxData["5.188004379506523`"], "Output", + CellChangeTimes->{3.9913299193276234`*^9, 3.9943550414475803`*^9}, CellLabel-> - "Out[176]=",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] + "Out[103]=",ExpressionUUID->"57ac9915-2af7-4923-abe9-2c4ede339d7c"] }, Open ]], Cell[CellGroupData[{ @@ -8919,22 +9197,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991848926103155*^9, - 3.9918489295815735`*^9}},ExpressionUUID->"8c5df121-e0b9-a146-bc34-\ -b231aa8028b9"], - -Cell[BoxData["0.01412227604937243`"], "Output", - CellChangeTimes->{3.99132991935894*^9}, + CellChangeTimes->{{3.991848926103155*^9, 3.9918489295815735`*^9}}, CellLabel-> - "Out[177]=",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] + "In[104]:=",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], + +Cell[BoxData["0.07749539918912444`"], "Output", + CellChangeTimes->{3.99132991935894*^9, 3.9943550414980183`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"03250a9f-10cd-4e4d-a780-852761d9f226"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918489327910748`*^9, 3.991848934830887*^9}, - 3.991924914130762*^9},ExpressionUUID->"831a27fc-89ff-e041-97f1-\ -0ec5d19a7879"], + 3.991924914130762*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ @@ -8957,12 +9236,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[179]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], + "In[106]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.9913299193849545`*^9}, +Cell[BoxData["6.144354311111192`"], "Output", + CellChangeTimes->{3.9913299193849545`*^9, 3.9943550415248547`*^9}, CellLabel-> - "Out[179]=",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] + "Out[106]=",ExpressionUUID->"ecaad542-2aa6-4dd0-a87c-da44deb6aa60"] }, Open ]], Cell[CellGroupData[{ @@ -8972,12 +9251,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[181]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], + "In[107]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913299194207077`*^9}, +Cell[BoxData["2.561671728757241`"], "Output", + CellChangeTimes->{3.9913299194207077`*^9, 3.994355041539937*^9}, CellLabel-> - "Out[181]=",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] + "Out[107]=",ExpressionUUID->"ebf7047c-b0f6-4b66-97be-4d6e7187e557"] }, Open ]], Cell[CellGroupData[{ @@ -8987,12 +9266,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[184]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], + "In[108]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.9913299194738407`*^9}, +Cell[BoxData["15.739818730241213`"], "Output", + CellChangeTimes->{3.9913299194738407`*^9, 3.994355041554521*^9}, CellLabel-> - "Out[184]=",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] + "Out[108]=",ExpressionUUID->"80a0a935-66e2-424e-815c-37836a1c2e4c"] }, Open ]], Cell[CellGroupData[{ @@ -9182,12 +9461,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[185]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], + "In[109]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[BoxData["0.04472011299838893`"], "Output", - CellChangeTimes->{3.991329919501911*^9}, +Cell[BoxData["0.00839775051963199`"], "Output", + CellChangeTimes->{3.991329919501911*^9, 3.99435504157515*^9}, CellLabel-> - "Out[185]=",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] + "Out[109]=",ExpressionUUID->"8281b6a8-167b-49cb-a6a7-338b7a2b4834"] }, Open ]], Cell[CellGroupData[{ @@ -9201,12 +9480,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[186]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], + "In[110]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329919596855*^9}, +Cell[BoxData["9.670823484285835`"], "Output", + CellChangeTimes->{3.991329919596855*^9, 3.9943550417715397`*^9}, CellLabel-> - "Out[186]=",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] + "Out[110]=",ExpressionUUID->"fd2337ae-9a33-4b82-937e-309d29adf389"] }, Open ]], Cell[CellGroupData[{ @@ -9398,12 +9677,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[187]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], + "In[111]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[BoxData["0.014190600885170185`"], "Output", - CellChangeTimes->{3.9913299196126003`*^9}, +Cell[BoxData["0.0613853749902016`"], "Output", + CellChangeTimes->{3.9913299196126003`*^9, 3.994355041789606*^9}, CellLabel-> - "Out[187]=",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] + "Out[111]=",ExpressionUUID->"1bdb8c85-cfc6-4d89-b608-bd2a194a8ea3"] }, Open ]], Cell[CellGroupData[{ @@ -9417,12 +9696,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[188]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], + "In[112]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[BoxData["7.439513700547701`"], "Output", - CellChangeTimes->{3.9913299197036095`*^9}, +Cell[BoxData["3.5769468259993147`"], "Output", + CellChangeTimes->{3.9913299197036095`*^9, 3.994355041985112*^9}, CellLabel-> - "Out[188]=",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] + "Out[112]=",ExpressionUUID->"e898994c-fff0-4410-948e-c7ed686e794a"] }, Open ]], Cell[CellGroupData[{ @@ -9515,12 +9794,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[189]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], + "In[113]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913299197165985`*^9}, +Cell[BoxData["0.06803408589806512`"], "Output", + CellChangeTimes->{3.9913299197165985`*^9, 3.9943550420029*^9}, CellLabel-> - "Out[189]=",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] + "Out[113]=",ExpressionUUID->"47c37ff7-606c-470f-a551-80220237f4a4"] }, Open ]], Cell[CellGroupData[{ @@ -9610,12 +9889,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[190]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], + "In[114]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991329919739599*^9}, +Cell[BoxData["0.9319659141019349`"], "Output", + CellChangeTimes->{3.991329919739599*^9, 3.9943550420197287`*^9}, CellLabel-> - "Out[190]=",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] + "Out[114]=",ExpressionUUID->"a0fc65aa-7f92-44e9-a352-517d9ecff9ea"] }, Open ]], Cell[CellGroupData[{ @@ -9738,12 +10017,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[191]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], + "In[115]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913299197646008`*^9}, +Cell[BoxData["0.06340544905407981`"], "Output", + CellChangeTimes->{3.9913299197646008`*^9, 3.994355042038409*^9}, CellLabel-> - "Out[191]=",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] + "Out[115]=",ExpressionUUID->"915145f0-3d2b-410b-9b03-f6dac0dde688"] }, Open ]], Cell[CellGroupData[{ @@ -9758,30 +10037,33 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9805,68 +10087,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848964116934*^9},ExpressionUUID->"220bdeed-2e17-e94c-a7b0-\ -3e066daf15d7"], + CellChangeTimes->{3.991848964116934*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 145, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919788595*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3722353092919838`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 116, 33, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943550420606527`*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], +In[116]:=",ExpressionUUID->"3182b605-028e-4c2d-befb-d8ca59fe3955"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 146, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299197985992`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6284176281009414`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 116, 34, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.994355042069964*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], +In[116]:=",ExpressionUUID->"c68f178c-4086-4898-b033-dca16046562f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 192, 147, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299198065968`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0345441346180744`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 116, 35, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943550420801973`*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], +In[116]:=",ExpressionUUID->"a92d27c9-641e-42c6-9857-41441585d4ce"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 192, 148, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919814598*^9}, +during this calculation.\"", 2, 116, 36, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.994355042091132*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], +In[116]:=",ExpressionUUID->"bb875da6-71e1-456b-b65a-8100095bed2d"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329923627493*^9}, +Cell[BoxData["9.670823484285828`"], "Output", + CellChangeTimes->{3.991329923627493*^9, 3.994355049911169*^9}, CellLabel-> - "Out[192]=",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] + "Out[116]=",ExpressionUUID->"3c42b0da-e7ed-4a7d-8d16-e4a0fce2491b"] }, Open ]], Cell[CellGroupData[{ @@ -9881,30 +10167,33 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9928,68 +10217,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918489685110855`*^9},ExpressionUUID->"b8791a07-33fe-8c4f-9c59-\ -dd23af9a4471"], + CellChangeTimes->{3.9918489685110855`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 149, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236609*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3722353092919838`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 117, 37, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994355049965322*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], +In[117]:=",ExpressionUUID->"af7b41ff-db98-40fd-b9e8-7420894f3175"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 150, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329923669897*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6284176281009414`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 117, 38, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994355049975724*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], +In[117]:=",ExpressionUUID->"874f79d7-5057-4ff5-baa1-3c7993edfaab"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 193, 151, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236779003`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0345441346180744`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 117, 39, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.9943550499853*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], +In[117]:=",ExpressionUUID->"9146c83b-c0f0-41a7-beab-95b001cdcf71"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 193, 152, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236858997`*^9}, +during this calculation.\"", 2, 117, 40, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994355049993877*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], +In[117]:=",ExpressionUUID->"7f805e8a-85b3-4f7a-819a-3f9d2eac54b6"], -Cell[BoxData["7.439513700547696`"], "Output", - CellChangeTimes->{3.9913299274564743`*^9}, +Cell[BoxData["3.576946825999313`"], "Output", + CellChangeTimes->{3.9913299274564743`*^9, 3.9943550578178988`*^9}, CellLabel-> - "Out[193]=",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] + "Out[117]=",ExpressionUUID->"d9b607de-8b8c-4239-b97e-14e9f4483923"] }, Open ]], Cell[CellGroupData[{ @@ -10047,93 +10340,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848973885317*^9},ExpressionUUID->"3fe6e7f1-b44a-234f-af77-\ -3cf1fdaf28d9"], + CellChangeTimes->{3.991848973885317*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk0Vd0bB3BzxkwZIjKXpGSKyH5CySwkU+K69xCRkJdCKfRLE1LxlqFE +ksoYISneSKaSNJnCvVwz90QqftsfZ531WXud7372fvY+ipTjjjQONja2Ufys +vk+0b9tU2dlusmh1mWGVyUAmU/f1KOZFqP1fUQlr7IFs/TQV81o0FZKVuWoH +ahuPoM5/SKxDO84GuyTyTAO3eSsaq2x/aYt98Y10/ZnC9yhoe6ibPfbzzhNZ +f7S7Ue4uObsD2MyvLdFRNZ/Rzf6OTCdsmRFlj59m39Fd1aT9LtjW09GGYa39 +iFvCxs4Nu+4PUyCycBDZVEo89cT+FCd1+lnwEOKVYgR4Y0/xmDNZ2iPoM6qP +o2LzXA5x01mgowKTu/P+2PKimc0nakaRlWJSfRC2nezP/CmzCZTUERYYiU3k +KElq8k6hwNpwy1jsM6r2CYGt00i4M+ZcPPZnqY87wgtnUUh1AXcqNtU94Oj1 +y3PoSk2LfQb2zB22u6XB84jcSbJysHmVNEVmtUmUzUl1KMFOozZYiEj8RAKJ +BTzV2AoP3M5sX/iJjJmkVAO2wdbEqaCaRRTW8sj6E7a/fn8r0+wPUrO+sMCW +xUCsyJNc/Gp/0WldyURB7LM1AsbqvMuogv3pcWnsdDB45Ne6gjT6lp12YFPz +ms1DC9lheUHWxw+78M31gThZDtB2XG46iT3D8IpOucwB0V/GL8ZjR28hy4qD +OWFw85h8LnbaU0XlaW1uuLMh9Mow9tfOibrlXG7gVi9rJbEV5ird10rwwK05 +Nr812QxUpGuXqrnAA4MZDUUa2I3PT7Efq+EFpXPj0ZHYZENX/6iZIFTd/r1d +OYeBxGwERU7XCYL1211ixthaH81ByFAI7M/GHTmIHTBckbNj21oIX1Yzuogd +wtGqtVtQBGpqv/8ksUeUnswm/BQFdRObs0N38f4QLXwdOmLAWastznmPgTge +0RWlT4jBNdNNosrYCjobHQvHxWB+t7EdFdvdLLm0fUAcGkWU28axO3xDw6Te +ScCckmPf2vsM1Pfg6iVvXkmgbHJS0sOeGC/MfbhXEnR1At57YPOHD3UZ1UtC +S9r3kEJs83hnXe8KKZA0/lFuk8dA1ff1yYLs9fDp4/yBvHwGuj+yFLErXA4y +ulKH8x8y0P6DF/rCHsvBS/r3DT3YE43i+x7T5aC06UbpmkIG0r2/VULBTR7a +nF1+HsVupHiVcZtshIpE5X7tRww0Nz3wz+h5BbDfGqX/qYiBxIPMy8tslUB0 +LIfNt5iB6Pf5/R0ClICIZxvNwq763ik7magEEnzDW79he9ocPq9WrwSezw07 +nEtwfRoRjhnayjB7SDfCphTPz3wwEyulAsu8wna25Qzk7CegaTWoCmXMri03 +qhgIRRzUPvRXFUqLqj2+YW9JyN5JXa8GPdm36YrPGYgtV8c09oAaCDjZ8xdj +P+7zOFT6Sg0cytMudlbj++lSFCdzbxO8v+rgr/QC12du+4lJUYfwX/FFfK8Z +KNfp1reFWHWwe+so74F9lTI4wHVbHYat9ZlF2NSzJ8flu9RBdJ1p8oEGBhKt +zWRzMtsC+ZcSJbIb8fnRmdpSo6wBWpVp3NZNDCSrdO3MpeGtcONh7Dl6KwPV +JrHUf3FoglVVgbR1G96PebePhKImcM4sSBdjZzWqqJt6aUKWsIDr6XYGUvKr +/rDYowkddZs7JTvxeotGVIl32yCwL+ChTxcDycnKEwpuWhDlfJHP4isDbc0L +F/yNtMFsKLzDYYyBKNTzpKadNmiwFqOasNOVU/u8PbXhxAsUZ8JkIM57T4vf +RGrDdIxMvuY4vm9ZTOfUEm3I+L3JUmQS/0/TvTPVlXXAYeNLkj6D+3vJZpsr +jy4Y+PbPfllkoLuhKg4VrXpg5P3u5Se+UdQZgXbG5xkCv3zUnQc6o0jRq9vu +8LHdEBk3MevjO4poK8+eyEUB3Pr7NnzoxiiSGq9aI0UxhcTunEq9rlEUrmP8 +PXWLOSTlcgneExtDlMk/zeLMvTBqwsWZ6TKGHpuGrcnusIDerct6P/LH0H1W +wKuiNEvooarvGVkYQ4t7pNsaz1gDf7rwiqcLE/Wycc4O+thCtHIYs/05EwVv +OJ4cp2wPZuMnsmI3jKMnR5vrbyQ4gGKy2/nZK+Po1Pz6BY2jByAipfBSw99x +RFrtc2k64ghLGh4le2ImkKFHyp6RA04g4MMl+oBtEn1YnxnQqOMMH9VjdqWf +nUQy+edrCzYfhBLDAw+HRaZQ1cAWGzshF9DwEz6ZcmcKyX+c8YuYdIFd527v +7lSfRjo3UopyBw7BmvQsl9CmaZTJNb8ttcEVdPTa/Ddsn0HP9mz/mvDcDZRK +v39OODeD0ncmif4pdIcNtKrA1u4Z1PEtL1Hnsgdwd2ZzHlGZRRW2d1RCznqC +azx6o3ZqFs0GObEFUw8D9b91UW4ts4jcp+4/ZeYFj7ynOAql51DB5JfFMP0j +cOKQSVzrsTnkejfP97CgN0g7lXGxV8+hslLrI5wXvMHxHM+3EoF5ZCj74dfF +X95Q0W1ESTw4j5QH/L6+P+oDWsYrRSK359GwQKD9nSEfKG9Wsiz9MY86r9r5 +WhykQJ/WOjd/RRZKi8wWONlJAYeuzhf63ixUW7fyy9fSFxIkbYME0llI2BMu +6FT7wt7qIj7iDQsprGvq2FDrC2l2gnpKTSyk1WorzVPnC8bfPkz3Yjsaezz8 +/MoX6PNC4s5vcf6GiHcxb33BxPWaoFErC8n0PhJu/uwLMpuuPZl/z0IqXlLp +ngu+IPo4pnltLwsZek8VJOhSYb1l9OGRWRbKz5gJs9OnQh9tx+eoORZa1zVn +ImVAhajUwTGheRaa2rvwscCICkbMrve6LBb+f7Gxt5pSwTX6aEnMTxZauyDq +JnaACp0hnf/+XmKh4St6fNlBVFh2DTj5gJNEV2uij1blU2GSyAmrFidRkPYt +w8gCKowP1qTvWEcim4clfAaFVJCoy3MqwOa/RX9Y+ZgK7W8yktIkSJQQ6sB8 +Vk6FgGdLS35SJIpWVwmseE2FsJVr3UsyJAq49e5YaR8V1v1Tz+pQJJHlWrpx +6AAVhLanFBsqkWhzApuQ9g8qRGYurNzDpofqPS4ZocLpClO3cGUS+dhlTxZP +UOEaDztLVJVErtxhwU+XqGBxqK3GYDOJLMJkQookaVD6NEZVdxuJXmcnWqVK +0+D6ZDl7OrZx65xKpAwNeMp/e/zG1lJ998VMngYfeIOS6reTaH3PabNvqjSg +639uNd9BovFdvZL8ejT4LjXWo6tLomscOS/8nGig//Dm5VJDvP7tgum2B2mw +XwJ4eXaRKN4jMlTnEA0En3WsuGJHljtsWnGnwXQ5hfIX24dgT7lJocHQp/vz +yJhEOi0U6n8naOBh62RYZEKinhRVAeVkGvz7n9aEghmJniAh/9EUPL9wmtMR +7PhJVuPj6zTo6abuy8TWtmyMNbhFg0N1qu1S5rh/bL5ztlk0uHSZj7ZmL4n2 +Hc/5EllEgy/ctQ8695FITu5/+iZPaGD6xfbVGgsSsVqOX+cspkF9aAnNBPue +GrK9WkaDyYK3doXYf3t763OraXBS0/xu9H4SldvIFrQ308Dd8D0SsCLRpSUO +7rQWGrxcS3AYYVMKmD5urTRw0TC3D8AW4aqWHe7A87+svdCEfazG9dqvTzTI +NWkKjbYmkfKWmxEqIzR4Vl2/pdOGREs9MV1jdBrILflcXcTuTKBpPR2lwZ+A +ntMKtiSKHdRlGk7QgGahwgrG/preddh+ngZabMluPHYkSl0juvcUOwGHLsCc +vD2Jaud6PcI5CTjVXV9nhs3oLQwN5iagcn/Cgh+2cbl5DoWPgKtJtY+fYNO9 +I39biRLgmie9Vc8B12+zV2yvOAHHj0+6HcQ22immjiQIsHVumw/HThYqctFZ +T0COVlpg6ep4dX+JrCIBFbuvBKgdIBGRV9QsoUyAhCjf4h7s5OSofmFVAmpy +vWY9semEuBCXOgE+985uSlkdF7fwn9AiQJ6L/+4cdvWy+Bm6NgFev2ov8zmS +aGRs4MaALgG/eBSGN2Lvqj/V8NGAgNgfQ91W2MPHnsi/AAIScxiNGdhrXU/r +VZoSoJuYLVSEbWi236bEnICymyOvXmBfXf8jKm8/Xs8VoaB+7Cqup8nZVgQc +Cxz1ncYemj79IMOGAF+q2ZtlbIM3Et1XHAjIGj/WJuuE+13yY/yCIwGvj+qF +qmNfufOU45wzAfE/TpzTx/4RaqkV4UpA6aLRiB22kJekRYg7AbyxjTvdsQ0s +hw4HeBLQ2/aMpK5+vzHmkpc3AUpzHWWR2FX8VvdcKQSU58+Vxa3mkZLPHakE +CNEjNiat5g0OddgQBPRMuv9MWc1rLabv8yegWSbTIGO1vsqYvxCA+zNqRM9e +zb9ntc7oGAFb5/RW8lbzr0hp6AUTsHf24vlHq/mRw3u2hxDwtU4/rBhbkFri +qh6K63M0ai/H3mkfe1w5HJ+vxptpVav5u6wT5SIIcLfc/6YG+7KqdKZUJAHC +O+1967CfiYyUiZ4ioID9UWA99uDvkhaBaAKCjT36X63mM2IHuWPx/mQcqXuN +rf/BenHlDAEDzEreBuz/A/Cv+z0= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10147,105 +10441,106 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1Hk0Vd0bB3BzxkwZIjKXpGSKyH5CySwkU+K69xCRkJdCKfRLE1LxlqFE +ksoYISneSKaSNJnCvVwz90QqftsfZ531WXud7372fvY+ipTjjjQONja2Ufys +vk+0b9tU2dlusmh1mWGVyUAmU/f1KOZFqP1fUQlr7IFs/TQV81o0FZKVuWoH +ahuPoM5/SKxDO84GuyTyTAO3eSsaq2x/aYt98Y10/ZnC9yhoe6ibPfbzzhNZ +f7S7Ue4uObsD2MyvLdFRNZ/Rzf6OTCdsmRFlj59m39Fd1aT9LtjW09GGYa39 +iFvCxs4Nu+4PUyCycBDZVEo89cT+FCd1+lnwEOKVYgR4Y0/xmDNZ2iPoM6qP +o2LzXA5x01mgowKTu/P+2PKimc0nakaRlWJSfRC2nezP/CmzCZTUERYYiU3k +KElq8k6hwNpwy1jsM6r2CYGt00i4M+ZcPPZnqY87wgtnUUh1AXcqNtU94Oj1 +y3PoSk2LfQb2zB22u6XB84jcSbJysHmVNEVmtUmUzUl1KMFOozZYiEj8RAKJ +BTzV2AoP3M5sX/iJjJmkVAO2wdbEqaCaRRTW8sj6E7a/fn8r0+wPUrO+sMCW +xUCsyJNc/Gp/0WldyURB7LM1AsbqvMuogv3pcWnsdDB45Ne6gjT6lp12YFPz +ms1DC9lheUHWxw+78M31gThZDtB2XG46iT3D8IpOucwB0V/GL8ZjR28hy4qD +OWFw85h8LnbaU0XlaW1uuLMh9Mow9tfOibrlXG7gVi9rJbEV5ird10rwwK05 +Nr812QxUpGuXqrnAA4MZDUUa2I3PT7Efq+EFpXPj0ZHYZENX/6iZIFTd/r1d +OYeBxGwERU7XCYL1211ixthaH81ByFAI7M/GHTmIHTBckbNj21oIX1Yzuogd +wtGqtVtQBGpqv/8ksUeUnswm/BQFdRObs0N38f4QLXwdOmLAWastznmPgTge +0RWlT4jBNdNNosrYCjobHQvHxWB+t7EdFdvdLLm0fUAcGkWU28axO3xDw6Te +ScCckmPf2vsM1Pfg6iVvXkmgbHJS0sOeGC/MfbhXEnR1At57YPOHD3UZ1UtC +S9r3kEJs83hnXe8KKZA0/lFuk8dA1ff1yYLs9fDp4/yBvHwGuj+yFLErXA4y +ulKH8x8y0P6DF/rCHsvBS/r3DT3YE43i+x7T5aC06UbpmkIG0r2/VULBTR7a +nF1+HsVupHiVcZtshIpE5X7tRww0Nz3wz+h5BbDfGqX/qYiBxIPMy8tslUB0 +LIfNt5iB6Pf5/R0ClICIZxvNwq763ik7magEEnzDW79he9ocPq9WrwSezw07 +nEtwfRoRjhnayjB7SDfCphTPz3wwEyulAsu8wna25Qzk7CegaTWoCmXMri03 +qhgIRRzUPvRXFUqLqj2+YW9JyN5JXa8GPdm36YrPGYgtV8c09oAaCDjZ8xdj +P+7zOFT6Sg0cytMudlbj++lSFCdzbxO8v+rgr/QC12du+4lJUYfwX/FFfK8Z +KNfp1reFWHWwe+so74F9lTI4wHVbHYat9ZlF2NSzJ8flu9RBdJ1p8oEGBhKt +zWRzMtsC+ZcSJbIb8fnRmdpSo6wBWpVp3NZNDCSrdO3MpeGtcONh7Dl6KwPV +JrHUf3FoglVVgbR1G96PebePhKImcM4sSBdjZzWqqJt6aUKWsIDr6XYGUvKr +/rDYowkddZs7JTvxeotGVIl32yCwL+ChTxcDycnKEwpuWhDlfJHP4isDbc0L +F/yNtMFsKLzDYYyBKNTzpKadNmiwFqOasNOVU/u8PbXhxAsUZ8JkIM57T4vf +RGrDdIxMvuY4vm9ZTOfUEm3I+L3JUmQS/0/TvTPVlXXAYeNLkj6D+3vJZpsr +jy4Y+PbPfllkoLuhKg4VrXpg5P3u5Se+UdQZgXbG5xkCv3zUnQc6o0jRq9vu +8LHdEBk3MevjO4poK8+eyEUB3Pr7NnzoxiiSGq9aI0UxhcTunEq9rlEUrmP8 +PXWLOSTlcgneExtDlMk/zeLMvTBqwsWZ6TKGHpuGrcnusIDerct6P/LH0H1W +wKuiNEvooarvGVkYQ4t7pNsaz1gDf7rwiqcLE/Wycc4O+thCtHIYs/05EwVv +OJ4cp2wPZuMnsmI3jKMnR5vrbyQ4gGKy2/nZK+Po1Pz6BY2jByAipfBSw99x +RFrtc2k64ghLGh4le2ImkKFHyp6RA04g4MMl+oBtEn1YnxnQqOMMH9VjdqWf +nUQy+edrCzYfhBLDAw+HRaZQ1cAWGzshF9DwEz6ZcmcKyX+c8YuYdIFd527v +7lSfRjo3UopyBw7BmvQsl9CmaZTJNb8ttcEVdPTa/Ddsn0HP9mz/mvDcDZRK +v39OODeD0ncmif4pdIcNtKrA1u4Z1PEtL1Hnsgdwd2ZzHlGZRRW2d1RCznqC +azx6o3ZqFs0GObEFUw8D9b91UW4ts4jcp+4/ZeYFj7ynOAql51DB5JfFMP0j +cOKQSVzrsTnkejfP97CgN0g7lXGxV8+hslLrI5wXvMHxHM+3EoF5ZCj74dfF +X95Q0W1ESTw4j5QH/L6+P+oDWsYrRSK359GwQKD9nSEfKG9Wsiz9MY86r9r5 +WhykQJ/WOjd/RRZKi8wWONlJAYeuzhf63ixUW7fyy9fSFxIkbYME0llI2BMu +6FT7wt7qIj7iDQsprGvq2FDrC2l2gnpKTSyk1WorzVPnC8bfPkz3Yjsaezz8 +/MoX6PNC4s5vcf6GiHcxb33BxPWaoFErC8n0PhJu/uwLMpuuPZl/z0IqXlLp +ngu+IPo4pnltLwsZek8VJOhSYb1l9OGRWRbKz5gJs9OnQh9tx+eoORZa1zVn +ImVAhajUwTGheRaa2rvwscCICkbMrve6LBb+f7Gxt5pSwTX6aEnMTxZauyDq +JnaACp0hnf/+XmKh4St6fNlBVFh2DTj5gJNEV2uij1blU2GSyAmrFidRkPYt +w8gCKowP1qTvWEcim4clfAaFVJCoy3MqwOa/RX9Y+ZgK7W8yktIkSJQQ6sB8 +Vk6FgGdLS35SJIpWVwmseE2FsJVr3UsyJAq49e5YaR8V1v1Tz+pQJJHlWrpx +6AAVhLanFBsqkWhzApuQ9g8qRGYurNzDpofqPS4ZocLpClO3cGUS+dhlTxZP +UOEaDztLVJVErtxhwU+XqGBxqK3GYDOJLMJkQookaVD6NEZVdxuJXmcnWqVK +0+D6ZDl7OrZx65xKpAwNeMp/e/zG1lJ998VMngYfeIOS6reTaH3PabNvqjSg +639uNd9BovFdvZL8ejT4LjXWo6tLomscOS/8nGig//Dm5VJDvP7tgum2B2mw +XwJ4eXaRKN4jMlTnEA0En3WsuGJHljtsWnGnwXQ5hfIX24dgT7lJocHQp/vz +yJhEOi0U6n8naOBh62RYZEKinhRVAeVkGvz7n9aEghmJniAh/9EUPL9wmtMR +7PhJVuPj6zTo6abuy8TWtmyMNbhFg0N1qu1S5rh/bL5ztlk0uHSZj7ZmL4n2 +Hc/5EllEgy/ctQ8695FITu5/+iZPaGD6xfbVGgsSsVqOX+cspkF9aAnNBPue +GrK9WkaDyYK3doXYf3t763OraXBS0/xu9H4SldvIFrQ308Dd8D0SsCLRpSUO +7rQWGrxcS3AYYVMKmD5urTRw0TC3D8AW4aqWHe7A87+svdCEfazG9dqvTzTI +NWkKjbYmkfKWmxEqIzR4Vl2/pdOGREs9MV1jdBrILflcXcTuTKBpPR2lwZ+A +ntMKtiSKHdRlGk7QgGahwgrG/preddh+ngZabMluPHYkSl0juvcUOwGHLsCc +vD2Jaud6PcI5CTjVXV9nhs3oLQwN5iagcn/Cgh+2cbl5DoWPgKtJtY+fYNO9 +I39biRLgmie9Vc8B12+zV2yvOAHHj0+6HcQ22immjiQIsHVumw/HThYqctFZ +T0COVlpg6ep4dX+JrCIBFbuvBKgdIBGRV9QsoUyAhCjf4h7s5OSofmFVAmpy +vWY9semEuBCXOgE+985uSlkdF7fwn9AiQJ6L/+4cdvWy+Bm6NgFev2ov8zmS +aGRs4MaALgG/eBSGN2Lvqj/V8NGAgNgfQ91W2MPHnsi/AAIScxiNGdhrXU/r +VZoSoJuYLVSEbWi236bEnICymyOvXmBfXf8jKm8/Xs8VoaB+7Cqup8nZVgQc +Cxz1ncYemj79IMOGAF+q2ZtlbIM3Et1XHAjIGj/WJuuE+13yY/yCIwGvj+qF +qmNfufOU45wzAfE/TpzTx/4RaqkV4UpA6aLRiB22kJekRYg7AbyxjTvdsQ0s +hw4HeBLQ2/aMpK5+vzHmkpc3AUpzHWWR2FX8VvdcKQSU58+Vxa3mkZLPHakE +CNEjNiat5g0OddgQBPRMuv9MWc1rLabv8yegWSbTIGO1vsqYvxCA+zNqRM9e +zb9ntc7oGAFb5/RW8lbzr0hp6AUTsHf24vlHq/mRw3u2hxDwtU4/rBhbkFri +qh6K63M0ai/H3mkfe1w5HJ+vxptpVav5u6wT5SIIcLfc/6YG+7KqdKZUJAHC +O+1967CfiYyUiZ4ioID9UWA99uDvkhaBaAKCjT36X63mM2IHuWPx/mQcqXuN +rf/BenHlDAEDzEreBuz/A/Cv+z0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.7379507563040013, + 1.3329496708453732`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.737950756304003}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10257,21 +10552,21 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.7379507563040013, + 1.3329496708453732`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.737950756304003}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10285,103 +10580,104 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1Hk0Vd0bB3BzxkwZIjKXpGSKyH5CySwkU+K69xCRkJdCKfRLE1LxlqFE +ksoYISneSKaSNJnCvVwz90QqftsfZ531WXud7372fvY+ipTjjjQONja2Ufys +vk+0b9tU2dlusmh1mWGVyUAmU/f1KOZFqP1fUQlr7IFs/TQV81o0FZKVuWoH +ahuPoM5/SKxDO84GuyTyTAO3eSsaq2x/aYt98Y10/ZnC9yhoe6ibPfbzzhNZ +f7S7Ue4uObsD2MyvLdFRNZ/Rzf6OTCdsmRFlj59m39Fd1aT9LtjW09GGYa39 +iFvCxs4Nu+4PUyCycBDZVEo89cT+FCd1+lnwEOKVYgR4Y0/xmDNZ2iPoM6qP +o2LzXA5x01mgowKTu/P+2PKimc0nakaRlWJSfRC2nezP/CmzCZTUERYYiU3k +KElq8k6hwNpwy1jsM6r2CYGt00i4M+ZcPPZnqY87wgtnUUh1AXcqNtU94Oj1 +y3PoSk2LfQb2zB22u6XB84jcSbJysHmVNEVmtUmUzUl1KMFOozZYiEj8RAKJ +BTzV2AoP3M5sX/iJjJmkVAO2wdbEqaCaRRTW8sj6E7a/fn8r0+wPUrO+sMCW +xUCsyJNc/Gp/0WldyURB7LM1AsbqvMuogv3pcWnsdDB45Ne6gjT6lp12YFPz +ms1DC9lheUHWxw+78M31gThZDtB2XG46iT3D8IpOucwB0V/GL8ZjR28hy4qD +OWFw85h8LnbaU0XlaW1uuLMh9Mow9tfOibrlXG7gVi9rJbEV5ird10rwwK05 +Nr812QxUpGuXqrnAA4MZDUUa2I3PT7Efq+EFpXPj0ZHYZENX/6iZIFTd/r1d +OYeBxGwERU7XCYL1211ixthaH81ByFAI7M/GHTmIHTBckbNj21oIX1Yzuogd +wtGqtVtQBGpqv/8ksUeUnswm/BQFdRObs0N38f4QLXwdOmLAWastznmPgTge +0RWlT4jBNdNNosrYCjobHQvHxWB+t7EdFdvdLLm0fUAcGkWU28axO3xDw6Te +ScCckmPf2vsM1Pfg6iVvXkmgbHJS0sOeGC/MfbhXEnR1At57YPOHD3UZ1UtC +S9r3kEJs83hnXe8KKZA0/lFuk8dA1ff1yYLs9fDp4/yBvHwGuj+yFLErXA4y +ulKH8x8y0P6DF/rCHsvBS/r3DT3YE43i+x7T5aC06UbpmkIG0r2/VULBTR7a +nF1+HsVupHiVcZtshIpE5X7tRww0Nz3wz+h5BbDfGqX/qYiBxIPMy8tslUB0 +LIfNt5iB6Pf5/R0ClICIZxvNwq763ik7magEEnzDW79he9ocPq9WrwSezw07 +nEtwfRoRjhnayjB7SDfCphTPz3wwEyulAsu8wna25Qzk7CegaTWoCmXMri03 +qhgIRRzUPvRXFUqLqj2+YW9JyN5JXa8GPdm36YrPGYgtV8c09oAaCDjZ8xdj +P+7zOFT6Sg0cytMudlbj++lSFCdzbxO8v+rgr/QC12du+4lJUYfwX/FFfK8Z +KNfp1reFWHWwe+so74F9lTI4wHVbHYat9ZlF2NSzJ8flu9RBdJ1p8oEGBhKt +zWRzMtsC+ZcSJbIb8fnRmdpSo6wBWpVp3NZNDCSrdO3MpeGtcONh7Dl6KwPV +JrHUf3FoglVVgbR1G96PebePhKImcM4sSBdjZzWqqJt6aUKWsIDr6XYGUvKr +/rDYowkddZs7JTvxeotGVIl32yCwL+ChTxcDycnKEwpuWhDlfJHP4isDbc0L +F/yNtMFsKLzDYYyBKNTzpKadNmiwFqOasNOVU/u8PbXhxAsUZ8JkIM57T4vf +RGrDdIxMvuY4vm9ZTOfUEm3I+L3JUmQS/0/TvTPVlXXAYeNLkj6D+3vJZpsr +jy4Y+PbPfllkoLuhKg4VrXpg5P3u5Se+UdQZgXbG5xkCv3zUnQc6o0jRq9vu +8LHdEBk3MevjO4poK8+eyEUB3Pr7NnzoxiiSGq9aI0UxhcTunEq9rlEUrmP8 +PXWLOSTlcgneExtDlMk/zeLMvTBqwsWZ6TKGHpuGrcnusIDerct6P/LH0H1W +wKuiNEvooarvGVkYQ4t7pNsaz1gDf7rwiqcLE/Wycc4O+thCtHIYs/05EwVv +OJ4cp2wPZuMnsmI3jKMnR5vrbyQ4gGKy2/nZK+Po1Pz6BY2jByAipfBSw99x +RFrtc2k64ghLGh4le2ImkKFHyp6RA04g4MMl+oBtEn1YnxnQqOMMH9VjdqWf +nUQy+edrCzYfhBLDAw+HRaZQ1cAWGzshF9DwEz6ZcmcKyX+c8YuYdIFd527v +7lSfRjo3UopyBw7BmvQsl9CmaZTJNb8ttcEVdPTa/Ddsn0HP9mz/mvDcDZRK +v39OODeD0ncmif4pdIcNtKrA1u4Z1PEtL1Hnsgdwd2ZzHlGZRRW2d1RCznqC +azx6o3ZqFs0GObEFUw8D9b91UW4ts4jcp+4/ZeYFj7ynOAql51DB5JfFMP0j +cOKQSVzrsTnkejfP97CgN0g7lXGxV8+hslLrI5wXvMHxHM+3EoF5ZCj74dfF +X95Q0W1ESTw4j5QH/L6+P+oDWsYrRSK359GwQKD9nSEfKG9Wsiz9MY86r9r5 +WhykQJ/WOjd/RRZKi8wWONlJAYeuzhf63ixUW7fyy9fSFxIkbYME0llI2BMu +6FT7wt7qIj7iDQsprGvq2FDrC2l2gnpKTSyk1WorzVPnC8bfPkz3Yjsaezz8 +/MoX6PNC4s5vcf6GiHcxb33BxPWaoFErC8n0PhJu/uwLMpuuPZl/z0IqXlLp +ngu+IPo4pnltLwsZek8VJOhSYb1l9OGRWRbKz5gJs9OnQh9tx+eoORZa1zVn +ImVAhajUwTGheRaa2rvwscCICkbMrve6LBb+f7Gxt5pSwTX6aEnMTxZauyDq +JnaACp0hnf/+XmKh4St6fNlBVFh2DTj5gJNEV2uij1blU2GSyAmrFidRkPYt +w8gCKowP1qTvWEcim4clfAaFVJCoy3MqwOa/RX9Y+ZgK7W8yktIkSJQQ6sB8 +Vk6FgGdLS35SJIpWVwmseE2FsJVr3UsyJAq49e5YaR8V1v1Tz+pQJJHlWrpx +6AAVhLanFBsqkWhzApuQ9g8qRGYurNzDpofqPS4ZocLpClO3cGUS+dhlTxZP +UOEaDztLVJVErtxhwU+XqGBxqK3GYDOJLMJkQookaVD6NEZVdxuJXmcnWqVK +0+D6ZDl7OrZx65xKpAwNeMp/e/zG1lJ998VMngYfeIOS6reTaH3PabNvqjSg +639uNd9BovFdvZL8ejT4LjXWo6tLomscOS/8nGig//Dm5VJDvP7tgum2B2mw +XwJ4eXaRKN4jMlTnEA0En3WsuGJHljtsWnGnwXQ5hfIX24dgT7lJocHQp/vz +yJhEOi0U6n8naOBh62RYZEKinhRVAeVkGvz7n9aEghmJniAh/9EUPL9wmtMR +7PhJVuPj6zTo6abuy8TWtmyMNbhFg0N1qu1S5rh/bL5ztlk0uHSZj7ZmL4n2 +Hc/5EllEgy/ctQ8695FITu5/+iZPaGD6xfbVGgsSsVqOX+cspkF9aAnNBPue +GrK9WkaDyYK3doXYf3t763OraXBS0/xu9H4SldvIFrQ308Dd8D0SsCLRpSUO +7rQWGrxcS3AYYVMKmD5urTRw0TC3D8AW4aqWHe7A87+svdCEfazG9dqvTzTI +NWkKjbYmkfKWmxEqIzR4Vl2/pdOGREs9MV1jdBrILflcXcTuTKBpPR2lwZ+A +ntMKtiSKHdRlGk7QgGahwgrG/preddh+ngZabMluPHYkSl0juvcUOwGHLsCc +vD2Jaud6PcI5CTjVXV9nhs3oLQwN5iagcn/Cgh+2cbl5DoWPgKtJtY+fYNO9 +I39biRLgmie9Vc8B12+zV2yvOAHHj0+6HcQ22immjiQIsHVumw/HThYqctFZ +T0COVlpg6ep4dX+JrCIBFbuvBKgdIBGRV9QsoUyAhCjf4h7s5OSofmFVAmpy +vWY9semEuBCXOgE+985uSlkdF7fwn9AiQJ6L/+4cdvWy+Bm6NgFev2ov8zmS +aGRs4MaALgG/eBSGN2Lvqj/V8NGAgNgfQ91W2MPHnsi/AAIScxiNGdhrXU/r +VZoSoJuYLVSEbWi236bEnICymyOvXmBfXf8jKm8/Xs8VoaB+7Cqup8nZVgQc +Cxz1ncYemj79IMOGAF+q2ZtlbIM3Et1XHAjIGj/WJuuE+13yY/yCIwGvj+qF +qmNfufOU45wzAfE/TpzTx/4RaqkV4UpA6aLRiB22kJekRYg7AbyxjTvdsQ0s +hw4HeBLQ2/aMpK5+vzHmkpc3AUpzHWWR2FX8VvdcKQSU58+Vxa3mkZLPHakE +CNEjNiat5g0OddgQBPRMuv9MWc1rLabv8yegWSbTIGO1vsqYvxCA+zNqRM9e +zb9ntc7oGAFb5/RW8lbzr0hp6AUTsHf24vlHq/mRw3u2hxDwtU4/rBhbkFri +qh6K63M0ai/H3mkfe1w5HJ+vxptpVav5u6wT5SIIcLfc/6YG+7KqdKZUJAHC +O+1967CfiYyUiZ4ioID9UWA99uDvkhaBaAKCjT36X63mM2IHuWPx/mQcqXuN +rf/BenHlDAEDzEreBuz/A/Cv+z0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.7379507563040013, 1.3329496708453732`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.737950756304003}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10391,7 +10687,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5311368545847414}, + AxesOrigin->{0, 0.737950756304003}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10419,7 +10716,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7379507563040013, 1.3329496708453732`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10427,9 +10725,9 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913301734961166`*^9}, + CellChangeTimes->{3.9913301734961166`*^9, 3.994355630132913*^9}, CellLabel-> - "Out[194]=",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] + "Out[118]=",ExpressionUUID->"ef3101a5-f3a8-4d57-9288-13047cf26615"] }, Open ]], Cell[CellGroupData[{ @@ -10444,30 +10742,33 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ RowBox[{"-", FractionBox["1", "Cw"]}], "+", FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -10492,213 +10793,186 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991848978152012*^9, - 3.99184898469532*^9}},ExpressionUUID->"ab29778f-f183-804b-b871-\ -4070462057d7"], + CellChangeTimes->{{3.991848978152012*^9, 3.99184898469532*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.47138536392029`*^-264\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.6950715482468205`*^-268\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 195, - 153, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913301737143345`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.9943556303232613`*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], +In[119]:=",ExpressionUUID->"bc57f14c-51f2-4211-be2b-6000f4f47045"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.656148098260251`*^-275\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.6583192587746376`*^-279\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 195, 154, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173723337*^9}, + 119, 42, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994355630332939*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], +In[119]:=",ExpressionUUID->"0fab13dd-6697-4352-8ab0-87bc802256bf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.85074473590452`*^-286\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.9124558724512427`*^-290\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 195, 155, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173731432*^9}, + 2, 119, 43, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994355630341934*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], +In[119]:=",ExpressionUUID->"e3912fa9-3c99-42d2-8ec5-eebf05bb2257"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 195, 156, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173739336*^9}, +during this calculation.\"", 2, 119, 44, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994355630350397*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], +In[119]:=",ExpressionUUID->"983bca50-17a0-4dba-9740-43a3eb05ab9d"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VWsXAHCXQgMyHtM5x6xExnAmaxkzZQplqIyRqUQqKmSMBqFIhSQ3 +KWKfytRwcbtEaVCkopAkpIwV+fb3135+z7Pfvdf7vGvYW9Fvj0sgLw8Pj+Nf +PDz/v872tbWoZJaaOMTLTVIlrUy6CqUPmfYcg6O64qVXTVUAJTv9pHuyYeel +5VdjTA0gxul6N19PCfAn32O7mVqA6AQl+2d3DewsmP0kb+oK/Y0Oe6a7m8CZ +om7ghwFgpTL6/nv3CxjbG72UwYmGn91GZye7B+CMkUE7Sy8Zms3/Ln1eMgX6 +Jb53DnXngnx/3bCf5iKs+ndbZtfRQpAI23ldwJwPz7YEyWTVXoFsXasGBzdB +7LK7czBM/xq8ydd5+H2NEBLXPo6LzVVAwcsKkRhVIdyjvjs/lP8GeAqr7/zF +EMJ7ebzXGyRvwLsk6h9ef9LvMqdMDW7Ah4iVbInbQmi+/EXt8N4bMGIxdNfQ +Qxidx2M+nhy5AfOTeVVxl0VwYNs1E+bzm5BZGt/JKyOKTdMzKe5pVWBrsFtM +UlkUa1NvRejmVoFgi4ubupYoVsUctuW7XAXJg6pv7UxF8VvwkeeZ9VVwWKlj +OHe3KN4MT3ujPV4FEcXSf9TqRTH2UfxHn7W3wPlitaadlxjqZDK5R9NvASV3 +8HjOJXEcXbrYWcOsBun1t5Pny8QxtmruxwWoBtmm1Pjtt8RR+/bEZIJFNdAm +1+1XbxbHz/qxsSYO1aBqv9enYUQcGev6uGm+1aC/bNFwUF8Cp6rmXFzSqsEx +WmpI77EEVrLSvrZ0VoPTqpG+vJcSeD48PWJtVzW4lNS9WXgngfoWGffSeqrB +/Zl356NvEriKX+M+42M1bNe8Uu8pKYknlcMw9Ec1hA5pnznmI4n1PoO8yyRq +IM3VxuTFrCQ+aOUvXelaA7Lcp7K8f0nhNv19NsxtNVAp7jqnu0oKo61UpgO8 +a+D1ix23ztClUFbv0raKgBpQcY5WcraWwsOnlT0WomugaXMR/7PzUmhh2i5T +lVsDi1YzT5+wKWhUuoqy9VkNZJXFVixaUTDkGeh9fkmu5+dJ13Km4EbLSad9 +ZJ7a/7vS9GQgBTV3084f6quBAnMFwv4UBesys7faj9WAMdrltfdT8OrS3HVe +AQKiGJd3th2TxuqnnNVcYwJsi4Wn7U5I45YlyqooFgFKAofTn56VxmJLz7ta +JgQ863KvfnlNGn9LMWXOmROwYe9qvr6n0ri9mVip70DASNmBsh+yMpi4mTJ2 +yY+AB0KfmPtVZDBV5fEwJZCAc9EunXNaMiipp5Z7MogASzOt+QWUQa/9PoJh +YQSUvB+wEQiSwataH31n9hPgLeEwLkfIoONyfUNmOgH6cQ2JhY0yyLUKOrEn +g4CVA2ulFB/JYMArkYvFJwioq+IDtTcyKHvh6peZLAKk7OqydJZIfzlpF36e +jD9RxcDSTha1xFIvni4nwOLbr9iIQVm0CFZ0KXtEwCHrXI1/xmTR4W9WjF0r +AZWXtXrFZ2WR2dlyeqyNAGlXH0adoBxudyu6qvSEgLHaf+f4Nsgho4sWseMl +ATnHsqLPH5TDt3+6+ST7CWh9u05lLFEOIwVXdRz6QMCCQfNLk0xy/UHd3N6P +BOz6PKM3dEkOeYrU1LOGCGDae33f0CyHlSkXQtu/EDAgqRbRIiSPR/vlxZKm +CKDseUClUOQx9Z61zrVpAuxbtz3ZrSCPMTQ9z7YZAu7EZmqK6MujxR6vrqU5 +AjL6J0c9tsnj1hX0g5wF8jyMMwpu+MpjrqzlSvNFAqbPKNsuhcjjVFxypcUf +AnZYuJeXHpHH9Wq5OmweLuiVNwR9K5HHOB2q3gIfF4J43ShmN+Txl8/6sIFl +XLjoNfEo97Y8jiz+vt+ynAv8wopqzFZ5bKtyrDkiwIXefalDyePy6Bf6/fPD +lVwQ6aDnds/Ko6Mqiyd9FRcsVOvMNXioeNyGbWy3mguV3V9LOsWouCV1ZuUj +IS4ksp19ZY2paJN7yPXkGi5Y7yj8YWRGxV3lGiXmolwQTvia5GZPxcQ01+AZ +0hebU8qyfKgYYfHMz06cC/6fXhhVhlCxbyj5/DfSGgIKbe3RVLTvPLD5tAQX +am3rv/Ifp2Id85vuP5JciA8TOKKSQ8Wo3wMBW6S4YHXKVdjsEhV9kqZkPpLu +ej6hc6SafF+op8g3ChcmtynHTL2horSyku0rGS7cjd0rIDpExY8dL2+Zy3Lh +6MV7+RsmyHgFy6/cJL36w9aG3bw07Ijo04uW48LLv67ap62mYdGBF8+fkS5Q +/vG+VIqGRLso7zp5LqgHneD5oEHD0bjrch2kJ9LfnFk0oKFD8RUBCpUL3Otq +ynJAQ2qhesZ20nEdUVxjGxparMgoLSJtNvHQ0n0LDWXG6dvek16xRrg7ajsN +17ZDmRSNC890vYLPBNHwz3nTLDvSeVuu/ayMpOFS81HKYdI79s9kdMTR0EjN +hXONtGqemfxoCg3lRaT5npEeqz19UyCLhsGcDSFTpInedyaqBTTs75uKEqNz +IXZh3TOzUhrKnW5T1CJtSjvg61NJQz930f3mpAWx5ceRWhruurZhjxvpp76i +yReaaCjhnyrqT/ps0g7Jug4a+j85uj2MtPfVirLXr2koci7eNZK00n/zRtMf +aBjz4vvc//1lxLJN9CsNvRfBJoL0rZU5ntozNCydeWWzi/QBzQ9f7ZdoqLWo +8NuDtImD1pGQFXTMuHt6hw3p5XtjhdPF6fh8bfZ+A9IdZ/4rukqlozf3vKkc +6RxCQrdZnY55cjIti+R+PV/5Nn3QpeODw8l/3pJWnKvc8odFxwpn5x+3SY9I +LwzJWdExLWK2OJN0FdMmhuFEx795xlZtJx3jfU5gqycd4WSFgQZpvmIdjewI +OtZ67v/3Lnlej/850lB1kI4OLod0DpLOGnxs/+QYHd2rmDsNSNPUA/cI5pHx +Zc8JFZP58cm6hkftMh3PeM9lOZK+EbJ0xryCjtJi997/IvOLWXmee/QBHYfk +qnstSFt0P12caKXjWIGu3iiZnw48yzbtfEHHpxWaQ5mk/V0i3sAnOn5VOevd +QuZ3RNwVpVsTdFxunarqRfpgaU+owjwdZ/f+3DwhTdZLnGJ8wnIF5Ht9oGkF +6XaRxivGKxVQMFpYNJusF6dS99ZJYQUcfMNpkSLt9SRT1FdaAaNU07dLkvW1 +lz57xXS9An5hfI7/TNbrDJHV+lNbAS1nPChbSMdarx+vNlDAGZ6H1AYxLqRE ++hgqmSjghhelhxPI+i9oftzK66yAQ9ca/v4gzIWWoKLx5hgFzFH1fT8nyAWb +BYbY4TgFXKhFvvWkn2Z1GRokKKBjaMxNT7JfvalbkVB6XAGZR7xyq8h+NrEq +WizlogJeVot/oc3LBelb1kZWTQrIn59klfmLgEsWg15/HilgU9LRrWk/yXn5 +5kjCnXYFTOoW4kuYJ0CLl2hTe6WAqoNntYNmCTBzpXoLjJDx07X4hX4QEDb/ +PaFVSBGjGyW+3h0h+3/kLqlhMUVcPd/6yv8zAYKjvRV80op4+8TavlXDBFx9 +2/zaREkRu/f4OToNEtB3/6zmbUNFPJ1jNXL9PQGOKYyeyzsVsakALlx7TgDt +z83wBwGKmO3Qb0Z5Rs6rGCW+97sVsUo8Qe3YUwLSg1dtkI5WxC1f48rt2wl4 +aPc+6VS6It7blN3FbSFATyxRO65aEQn9/qiXdwjgyZxpyb+jiMOvP7fw3ybg +KV+I550GRSxsNIw0JAgInXFJ+f4vGY9e3mBGFQGlPSpvg3oV0eqlQpDgNXIe +F7WmuvIpYf7kbPnWfAJ+rl/Tp+WmhNTGPnu3GAJmL8km6nsq4fzou0ilaHI+ +iaiqMHYqoapLustYJAETU4wQi91KWJrf4hATTs7HBv9ZzyNKKLiKP8Q/gIDH +dneF068qoUkm8/MVZwIKQnfAwIwSLvPLn21fRwC74kbxuXPKKOPXPrDueQ28 +VagosrygjC4PC58HP62B2HPlhdNFyshqG/K42l4DdxPLLrqUK+OnpeMcyqMa +0NtWnC/cqIyvb59M6KuvgXXLc7NSPyqjctCrvQtXakBqZ1xCjKYKtrUe7U8k +v+e+i9n6uDepYJ1HaJGYSA0MnfBx3yeghq20Lx2z0tVg8+2AzSdDdcxdr7vg +InMLxvwFo7jxa9GiPulnyoeb5P8FhTetaR3mX87Jt0qoALEnaqdufdNA0RAD +hwAoB/n0KidDQ01MdlIXl3hWBvnrGWvEg7SwOTlLUvxcKTyWNd04dWYDnvpc +YW8bWwJM+aYs7dfaeO+Ka9ryzcUgzFcS7XtMB7s7PS102y4CLZHO9lDTRVOl +w8GBU/mwQtX7jst/uti5evi3w7GzsIEjU3Vgux7eHh8pC8rPhn19Ys22PPpo +UN6n7Zh8Gr5NnXCzyddHl9zw2oHODNik/ajARssAz3h1LlEbUuH+FOv33FMD +NG8TMWh9dwwiNPV6nwduRM+R2Q0acfHAmQjo8lhhiDtOJdyvrDwElirSm4VK +DHHjxtcyT6X2A3f8X8WAUkN0iZocRP79oHI3ara+zBCvrdZLuT8TDctsO4uC +KwxxZP0r496uaGjak/qjmWuIPZSdr7NzosGkYTov9j9DdDqXErtMPBoMXZ4P +fB4zxDn/ZoFHMlGwNiHjYJOREWb5Sxwvt4yERtbV5fZMI6Q0L0TGGUaC09yD +7FdsI7ScELqyTT0SDkbM3BgxNUJYW9lisCISWr19PgrbG+GvTuutUU/2QjDD +0NbLxwgbPXbbLNu2F8p/fJSbTjfCt+4pm3NHI0AjkPFAtdcIFwfGShULQ+G0 +ksOvpHdG2BvX2MVNDYXpfr+NA31GaB2wWdBjTyjc9zxRUThohJtEc127MBRc +nPrzKONGKKK+98DZoRA4xErZu4LHGP+bWXGJoR0CraLPFcdVjZE6JX/jv2fB +EHg/OJkbaYwP6Ms3zprtgonw0QOW0cZYvrVr/IPWLjhIDQt9HWOMVaaMiXfS +uyDj8B6X+Thj1NP8nC/4LRBuMWMU2KnGyG0gvLUuBsLCnaTG5gJj/FLwbaDk +ZwBkVxVOv2g2Rpbt08nJh/7woLgr4LskA791JCY+OOoLH+wVd8ZIM/DSUZby +bLgv8PwM9/gty8DR2pw3zO2+YOYs4LBcgYERtU+2T7B84dFfTCMZDQZSp8Xr +Fn76QIdf0QpTEwbejRCKqDzoA70qIZVZuxjYWppw2ppnJ0xfW5rTvsvAfuu0 +3DshXjDsblV8vI6BvwR5n4c7e0HPspPWgw0MdA5bW8gw9oIGH9nz5x4ycNkS +lRDm94Jj0huZi20MLBEttLxZ4glr0kMOP37HwDVbC0Vv9XuAZtArnkBeJpbf +u9QYHrwN/FUrVhRsZuLHzxsUR6vdIPbfHSFqTky0rz7SdfmCG2QFirXXuDBR +iDXzPjzFDRqvHjrRvpWJ/D7zXDMPN5BQsxZZ9GWidHnow/d/ucEjtU8SPjHk +/eP7X7S7u4LGWrqCWhETP1G9XlFFtsB3jRzDmkkmPrT5JRZ4xwl6OtBSfIqJ +sfX+qSNXneBhxMSW6BkmZtvkp8eedYJTNTaRhr+YaEtJE3oc7QQaTJ4b9Xws +PLDzzWdJAyfwswlXbJZiYeaTnPbKEEfoCtq0uovNQsFhP7GI5M1QW/r740w6 +Cwc4wTYu/LZgaB49Z5vJwhUqzgvxYzZw++PY6uKTLOwtS2pqeWEDNbQ+I9ts +FhIKZ0xzimzgRv7Dk4UXWLh9nClrxrSB4hMpjE2VLBStCOvpjrKG49EiZ/Jf +sjCqfH9HyJwVCIqnl42/YmFhr9pGjw9WkFrN02jWw8LdrzsyvdusIHni+/DY +OxZWUVb/c/mCFRwN7mKbDrPwjaNmgoqpFezzPj/yZZ6FC61OMounLcHTguzl +NDZKhretyWRbwGKXoHCzAhu9HwUmMNQsoDhw4q2tMhuTXiew/ohYwHBq3QHP +tWz0UIq3ejxoDvvaHKsO6bGRX/xGdsgJc8hwOEyrtWKj1N0m64aPZlC/7dWC +wR421hLCErIXTWH7l/rHjZFsVBYScQxPNwWe2OJ8i2g27i9ISuyKNgWrC6EG +rofYeDamPqVvsym8eP9XWFQSG8+1tMr385jCqN+Gt9V5bNwT0MBMCkGQC0+r +2/CQjRXaOT/u55nAqaVdGzOb2OiY9eX9ngMmwJttVf25hY08MXnvYKsJjN5Z +Xl7cxkZZj7+vsykmUM+TnC/2ko1CnV43yvI54JmbcGD2Exvr4/TyVS+zIb/h +0Mb7qzjo+3LIndrKhNUOHtWywhwc4Qvmia9gQsIHY60DazjIFFI+u3CKCcHL +51V0JDn4xK2fbufOBCPHGIkSGgcDJLLk9IcZ8Hpg31SKLgeTGPrjMqsYILky +rHrzVg6alvfHFwcbQan5kdhJDw4K7dN187M3Ar0jp8xzvDm4A3Q8zHWMwGHy +1qseX/L5G4f2+c0bQurrmZ/+YRwMOx9ZIJphCPMl8WaxiRwMXxYVI0NshF5W +zsuyCg7Wra9x4pUzgOD9pRdtKjn44uz9rL28BjBbeTtw7BYHSwcHvX590Qcx +pZ453TscPK3jqOpTpw92glT5ew85aDx3ITXSQx8au8oCXr7i4L68jL6cQj2w +Fa7ViunhIN8RXUplmh70bGqblX5L7vefB5oDe/Vguv5r+o4PHDyZpJyaZ64H +Wpd1bn4Z5SBj9bCcwaguNPaaxpwY56C6kGCgbJcu2EpsAe1JDpZtOdgoc18X +dqXtfx49w0GXCxd1/LN1YfphagFlnoOu/FzZm4d14divPP/6XxwcDv9wUyRI +F9YYlGtuX+SgNWvl8wxnXSgMr59ZWuLgtSLtUBpbF/4Hb9g+9g== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10712,172 +10986,141 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwV13k4VWsXAHCXQgMyHtM5x6xExnAmaxkzZQplqIyRqUQqKmSMBqFIhSQ3 +KWKfytRwcbtEaVCkopAkpIwV+fb3135+z7Pfvdf7vGvYW9Fvj0sgLw8Pj+Nf +PDz/v872tbWoZJaaOMTLTVIlrUy6CqUPmfYcg6O64qVXTVUAJTv9pHuyYeel +5VdjTA0gxul6N19PCfAn32O7mVqA6AQl+2d3DewsmP0kb+oK/Y0Oe6a7m8CZ +om7ghwFgpTL6/nv3CxjbG72UwYmGn91GZye7B+CMkUE7Sy8Zms3/Ln1eMgX6 +Jb53DnXngnx/3bCf5iKs+ndbZtfRQpAI23ldwJwPz7YEyWTVXoFsXasGBzdB +7LK7czBM/xq8ydd5+H2NEBLXPo6LzVVAwcsKkRhVIdyjvjs/lP8GeAqr7/zF +EMJ7ebzXGyRvwLsk6h9ef9LvMqdMDW7Ah4iVbInbQmi+/EXt8N4bMGIxdNfQ +Qxidx2M+nhy5AfOTeVVxl0VwYNs1E+bzm5BZGt/JKyOKTdMzKe5pVWBrsFtM +UlkUa1NvRejmVoFgi4ubupYoVsUctuW7XAXJg6pv7UxF8VvwkeeZ9VVwWKlj +OHe3KN4MT3ujPV4FEcXSf9TqRTH2UfxHn7W3wPlitaadlxjqZDK5R9NvASV3 +8HjOJXEcXbrYWcOsBun1t5Pny8QxtmruxwWoBtmm1Pjtt8RR+/bEZIJFNdAm +1+1XbxbHz/qxsSYO1aBqv9enYUQcGev6uGm+1aC/bNFwUF8Cp6rmXFzSqsEx +WmpI77EEVrLSvrZ0VoPTqpG+vJcSeD48PWJtVzW4lNS9WXgngfoWGffSeqrB +/Zl356NvEriKX+M+42M1bNe8Uu8pKYknlcMw9Ec1hA5pnznmI4n1PoO8yyRq +IM3VxuTFrCQ+aOUvXelaA7Lcp7K8f0nhNv19NsxtNVAp7jqnu0oKo61UpgO8 +a+D1ix23ztClUFbv0raKgBpQcY5WcraWwsOnlT0WomugaXMR/7PzUmhh2i5T +lVsDi1YzT5+wKWhUuoqy9VkNZJXFVixaUTDkGeh9fkmu5+dJ13Km4EbLSad9 +ZJ7a/7vS9GQgBTV3084f6quBAnMFwv4UBesys7faj9WAMdrltfdT8OrS3HVe +AQKiGJd3th2TxuqnnNVcYwJsi4Wn7U5I45YlyqooFgFKAofTn56VxmJLz7ta +JgQ863KvfnlNGn9LMWXOmROwYe9qvr6n0ri9mVip70DASNmBsh+yMpi4mTJ2 +yY+AB0KfmPtVZDBV5fEwJZCAc9EunXNaMiipp5Z7MogASzOt+QWUQa/9PoJh +YQSUvB+wEQiSwataH31n9hPgLeEwLkfIoONyfUNmOgH6cQ2JhY0yyLUKOrEn +g4CVA2ulFB/JYMArkYvFJwioq+IDtTcyKHvh6peZLAKk7OqydJZIfzlpF36e +jD9RxcDSTha1xFIvni4nwOLbr9iIQVm0CFZ0KXtEwCHrXI1/xmTR4W9WjF0r +AZWXtXrFZ2WR2dlyeqyNAGlXH0adoBxudyu6qvSEgLHaf+f4Nsgho4sWseMl +ATnHsqLPH5TDt3+6+ST7CWh9u05lLFEOIwVXdRz6QMCCQfNLk0xy/UHd3N6P +BOz6PKM3dEkOeYrU1LOGCGDae33f0CyHlSkXQtu/EDAgqRbRIiSPR/vlxZKm +CKDseUClUOQx9Z61zrVpAuxbtz3ZrSCPMTQ9z7YZAu7EZmqK6MujxR6vrqU5 +AjL6J0c9tsnj1hX0g5wF8jyMMwpu+MpjrqzlSvNFAqbPKNsuhcjjVFxypcUf +AnZYuJeXHpHH9Wq5OmweLuiVNwR9K5HHOB2q3gIfF4J43ShmN+Txl8/6sIFl +XLjoNfEo97Y8jiz+vt+ynAv8wopqzFZ5bKtyrDkiwIXefalDyePy6Bf6/fPD +lVwQ6aDnds/Ko6Mqiyd9FRcsVOvMNXioeNyGbWy3mguV3V9LOsWouCV1ZuUj +IS4ksp19ZY2paJN7yPXkGi5Y7yj8YWRGxV3lGiXmolwQTvia5GZPxcQ01+AZ +0hebU8qyfKgYYfHMz06cC/6fXhhVhlCxbyj5/DfSGgIKbe3RVLTvPLD5tAQX +am3rv/Ifp2Id85vuP5JciA8TOKKSQ8Wo3wMBW6S4YHXKVdjsEhV9kqZkPpLu +ej6hc6SafF+op8g3ChcmtynHTL2horSyku0rGS7cjd0rIDpExY8dL2+Zy3Lh +6MV7+RsmyHgFy6/cJL36w9aG3bw07Ijo04uW48LLv67ap62mYdGBF8+fkS5Q +/vG+VIqGRLso7zp5LqgHneD5oEHD0bjrch2kJ9LfnFk0oKFD8RUBCpUL3Otq +ynJAQ2qhesZ20nEdUVxjGxparMgoLSJtNvHQ0n0LDWXG6dvek16xRrg7ajsN +17ZDmRSNC890vYLPBNHwz3nTLDvSeVuu/ayMpOFS81HKYdI79s9kdMTR0EjN +hXONtGqemfxoCg3lRaT5npEeqz19UyCLhsGcDSFTpInedyaqBTTs75uKEqNz +IXZh3TOzUhrKnW5T1CJtSjvg61NJQz930f3mpAWx5ceRWhruurZhjxvpp76i +yReaaCjhnyrqT/ps0g7Jug4a+j85uj2MtPfVirLXr2koci7eNZK00n/zRtMf +aBjz4vvc//1lxLJN9CsNvRfBJoL0rZU5ntozNCydeWWzi/QBzQ9f7ZdoqLWo +8NuDtImD1pGQFXTMuHt6hw3p5XtjhdPF6fh8bfZ+A9IdZ/4rukqlozf3vKkc +6RxCQrdZnY55cjIti+R+PV/5Nn3QpeODw8l/3pJWnKvc8odFxwpn5x+3SY9I +LwzJWdExLWK2OJN0FdMmhuFEx795xlZtJx3jfU5gqycd4WSFgQZpvmIdjewI +OtZ67v/3Lnlej/850lB1kI4OLod0DpLOGnxs/+QYHd2rmDsNSNPUA/cI5pHx +Zc8JFZP58cm6hkftMh3PeM9lOZK+EbJ0xryCjtJi997/IvOLWXmee/QBHYfk +qnstSFt0P12caKXjWIGu3iiZnw48yzbtfEHHpxWaQ5mk/V0i3sAnOn5VOevd +QuZ3RNwVpVsTdFxunarqRfpgaU+owjwdZ/f+3DwhTdZLnGJ8wnIF5Ht9oGkF +6XaRxivGKxVQMFpYNJusF6dS99ZJYQUcfMNpkSLt9SRT1FdaAaNU07dLkvW1 +lz57xXS9An5hfI7/TNbrDJHV+lNbAS1nPChbSMdarx+vNlDAGZ6H1AYxLqRE ++hgqmSjghhelhxPI+i9oftzK66yAQ9ca/v4gzIWWoKLx5hgFzFH1fT8nyAWb +BYbY4TgFXKhFvvWkn2Z1GRokKKBjaMxNT7JfvalbkVB6XAGZR7xyq8h+NrEq +WizlogJeVot/oc3LBelb1kZWTQrIn59klfmLgEsWg15/HilgU9LRrWk/yXn5 +5kjCnXYFTOoW4kuYJ0CLl2hTe6WAqoNntYNmCTBzpXoLjJDx07X4hX4QEDb/ +PaFVSBGjGyW+3h0h+3/kLqlhMUVcPd/6yv8zAYKjvRV80op4+8TavlXDBFx9 +2/zaREkRu/f4OToNEtB3/6zmbUNFPJ1jNXL9PQGOKYyeyzsVsakALlx7TgDt +z83wBwGKmO3Qb0Z5Rs6rGCW+97sVsUo8Qe3YUwLSg1dtkI5WxC1f48rt2wl4 +aPc+6VS6It7blN3FbSFATyxRO65aEQn9/qiXdwjgyZxpyb+jiMOvP7fw3ybg +KV+I550GRSxsNIw0JAgInXFJ+f4vGY9e3mBGFQGlPSpvg3oV0eqlQpDgNXIe +F7WmuvIpYf7kbPnWfAJ+rl/Tp+WmhNTGPnu3GAJmL8km6nsq4fzou0ilaHI+ +iaiqMHYqoapLustYJAETU4wQi91KWJrf4hATTs7HBv9ZzyNKKLiKP8Q/gIDH +dneF068qoUkm8/MVZwIKQnfAwIwSLvPLn21fRwC74kbxuXPKKOPXPrDueQ28 +VagosrygjC4PC58HP62B2HPlhdNFyshqG/K42l4DdxPLLrqUK+OnpeMcyqMa +0NtWnC/cqIyvb59M6KuvgXXLc7NSPyqjctCrvQtXakBqZ1xCjKYKtrUe7U8k +v+e+i9n6uDepYJ1HaJGYSA0MnfBx3yeghq20Lx2z0tVg8+2AzSdDdcxdr7vg +InMLxvwFo7jxa9GiPulnyoeb5P8FhTetaR3mX87Jt0qoALEnaqdufdNA0RAD +hwAoB/n0KidDQ01MdlIXl3hWBvnrGWvEg7SwOTlLUvxcKTyWNd04dWYDnvpc +YW8bWwJM+aYs7dfaeO+Ka9ryzcUgzFcS7XtMB7s7PS102y4CLZHO9lDTRVOl +w8GBU/mwQtX7jst/uti5evi3w7GzsIEjU3Vgux7eHh8pC8rPhn19Ys22PPpo +UN6n7Zh8Gr5NnXCzyddHl9zw2oHODNik/ajARssAz3h1LlEbUuH+FOv33FMD +NG8TMWh9dwwiNPV6nwduRM+R2Q0acfHAmQjo8lhhiDtOJdyvrDwElirSm4VK +DHHjxtcyT6X2A3f8X8WAUkN0iZocRP79oHI3ara+zBCvrdZLuT8TDctsO4uC +KwxxZP0r496uaGjak/qjmWuIPZSdr7NzosGkYTov9j9DdDqXErtMPBoMXZ4P +fB4zxDn/ZoFHMlGwNiHjYJOREWb5Sxwvt4yERtbV5fZMI6Q0L0TGGUaC09yD +7FdsI7ScELqyTT0SDkbM3BgxNUJYW9lisCISWr19PgrbG+GvTuutUU/2QjDD +0NbLxwgbPXbbLNu2F8p/fJSbTjfCt+4pm3NHI0AjkPFAtdcIFwfGShULQ+G0 +ksOvpHdG2BvX2MVNDYXpfr+NA31GaB2wWdBjTyjc9zxRUThohJtEc127MBRc +nPrzKONGKKK+98DZoRA4xErZu4LHGP+bWXGJoR0CraLPFcdVjZE6JX/jv2fB +EHg/OJkbaYwP6Ms3zprtgonw0QOW0cZYvrVr/IPWLjhIDQt9HWOMVaaMiXfS +uyDj8B6X+Thj1NP8nC/4LRBuMWMU2KnGyG0gvLUuBsLCnaTG5gJj/FLwbaDk +ZwBkVxVOv2g2Rpbt08nJh/7woLgr4LskA791JCY+OOoLH+wVd8ZIM/DSUZby +bLgv8PwM9/gty8DR2pw3zO2+YOYs4LBcgYERtU+2T7B84dFfTCMZDQZSp8Xr +Fn76QIdf0QpTEwbejRCKqDzoA70qIZVZuxjYWppw2ppnJ0xfW5rTvsvAfuu0 +3DshXjDsblV8vI6BvwR5n4c7e0HPspPWgw0MdA5bW8gw9oIGH9nz5x4ycNkS +lRDm94Jj0huZi20MLBEttLxZ4glr0kMOP37HwDVbC0Vv9XuAZtArnkBeJpbf +u9QYHrwN/FUrVhRsZuLHzxsUR6vdIPbfHSFqTky0rz7SdfmCG2QFirXXuDBR +iDXzPjzFDRqvHjrRvpWJ/D7zXDMPN5BQsxZZ9GWidHnow/d/ucEjtU8SPjHk +/eP7X7S7u4LGWrqCWhETP1G9XlFFtsB3jRzDmkkmPrT5JRZ4xwl6OtBSfIqJ +sfX+qSNXneBhxMSW6BkmZtvkp8eedYJTNTaRhr+YaEtJE3oc7QQaTJ4b9Xws +PLDzzWdJAyfwswlXbJZiYeaTnPbKEEfoCtq0uovNQsFhP7GI5M1QW/r740w6 +Cwc4wTYu/LZgaB49Z5vJwhUqzgvxYzZw++PY6uKTLOwtS2pqeWEDNbQ+I9ts +FhIKZ0xzimzgRv7Dk4UXWLh9nClrxrSB4hMpjE2VLBStCOvpjrKG49EiZ/Jf +sjCqfH9HyJwVCIqnl42/YmFhr9pGjw9WkFrN02jWw8LdrzsyvdusIHni+/DY +OxZWUVb/c/mCFRwN7mKbDrPwjaNmgoqpFezzPj/yZZ6FC61OMounLcHTguzl +NDZKhretyWRbwGKXoHCzAhu9HwUmMNQsoDhw4q2tMhuTXiew/ohYwHBq3QHP +tWz0UIq3ejxoDvvaHKsO6bGRX/xGdsgJc8hwOEyrtWKj1N0m64aPZlC/7dWC +wR421hLCErIXTWH7l/rHjZFsVBYScQxPNwWe2OJ8i2g27i9ISuyKNgWrC6EG +rofYeDamPqVvsym8eP9XWFQSG8+1tMr385jCqN+Gt9V5bNwT0MBMCkGQC0+r +2/CQjRXaOT/u55nAqaVdGzOb2OiY9eX9ngMmwJttVf25hY08MXnvYKsJjN5Z +Xl7cxkZZj7+vsykmUM+TnC/2ko1CnV43yvI54JmbcGD2Exvr4/TyVS+zIb/h +0Mb7qzjo+3LIndrKhNUOHtWywhwc4Qvmia9gQsIHY60DazjIFFI+u3CKCcHL +51V0JDn4xK2fbufOBCPHGIkSGgcDJLLk9IcZ8Hpg31SKLgeTGPrjMqsYILky +rHrzVg6alvfHFwcbQan5kdhJDw4K7dN187M3Ar0jp8xzvDm4A3Q8zHWMwGHy +1qseX/L5G4f2+c0bQurrmZ/+YRwMOx9ZIJphCPMl8WaxiRwMXxYVI0NshF5W +zsuyCg7Wra9x4pUzgOD9pRdtKjn44uz9rL28BjBbeTtw7BYHSwcHvX590Qcx +pZ453TscPK3jqOpTpw92glT5ew85aDx3ITXSQx8au8oCXr7i4L68jL6cQj2w +Fa7ViunhIN8RXUplmh70bGqblX5L7vefB5oDe/Vguv5r+o4PHDyZpJyaZ64H +Wpd1bn4Z5SBj9bCcwaguNPaaxpwY56C6kGCgbJcu2EpsAe1JDpZtOdgoc18X +dqXtfx49w0GXCxd1/LN1YfphagFlnoOu/FzZm4d14divPP/6XxwcDv9wUyRI +F9YYlGtuX+SgNWvl8wxnXSgMr59ZWuLgtSLtUBpbF/4Hb9g+9g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07860481551490203}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10889,19 +11132,19 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07860481551490203}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10915,171 +11158,140 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwV13k4VWsXAHCXQgMyHtM5x6xExnAmaxkzZQplqIyRqUQqKmSMBqFIhSQ3 +KWKfytRwcbtEaVCkopAkpIwV+fb3135+z7Pfvdf7vGvYW9Fvj0sgLw8Pj+Nf +PDz/v872tbWoZJaaOMTLTVIlrUy6CqUPmfYcg6O64qVXTVUAJTv9pHuyYeel +5VdjTA0gxul6N19PCfAn32O7mVqA6AQl+2d3DewsmP0kb+oK/Y0Oe6a7m8CZ +om7ghwFgpTL6/nv3CxjbG72UwYmGn91GZye7B+CMkUE7Sy8Zms3/Ln1eMgX6 +Jb53DnXngnx/3bCf5iKs+ndbZtfRQpAI23ldwJwPz7YEyWTVXoFsXasGBzdB +7LK7czBM/xq8ydd5+H2NEBLXPo6LzVVAwcsKkRhVIdyjvjs/lP8GeAqr7/zF +EMJ7ebzXGyRvwLsk6h9ef9LvMqdMDW7Ah4iVbInbQmi+/EXt8N4bMGIxdNfQ +Qxidx2M+nhy5AfOTeVVxl0VwYNs1E+bzm5BZGt/JKyOKTdMzKe5pVWBrsFtM +UlkUa1NvRejmVoFgi4ubupYoVsUctuW7XAXJg6pv7UxF8VvwkeeZ9VVwWKlj +OHe3KN4MT3ujPV4FEcXSf9TqRTH2UfxHn7W3wPlitaadlxjqZDK5R9NvASV3 +8HjOJXEcXbrYWcOsBun1t5Pny8QxtmruxwWoBtmm1Pjtt8RR+/bEZIJFNdAm +1+1XbxbHz/qxsSYO1aBqv9enYUQcGev6uGm+1aC/bNFwUF8Cp6rmXFzSqsEx +WmpI77EEVrLSvrZ0VoPTqpG+vJcSeD48PWJtVzW4lNS9WXgngfoWGffSeqrB +/Zl356NvEriKX+M+42M1bNe8Uu8pKYknlcMw9Ec1hA5pnznmI4n1PoO8yyRq +IM3VxuTFrCQ+aOUvXelaA7Lcp7K8f0nhNv19NsxtNVAp7jqnu0oKo61UpgO8 +a+D1ix23ztClUFbv0raKgBpQcY5WcraWwsOnlT0WomugaXMR/7PzUmhh2i5T +lVsDi1YzT5+wKWhUuoqy9VkNZJXFVixaUTDkGeh9fkmu5+dJ13Km4EbLSad9 +ZJ7a/7vS9GQgBTV3084f6quBAnMFwv4UBesys7faj9WAMdrltfdT8OrS3HVe +AQKiGJd3th2TxuqnnNVcYwJsi4Wn7U5I45YlyqooFgFKAofTn56VxmJLz7ta +JgQ863KvfnlNGn9LMWXOmROwYe9qvr6n0ri9mVip70DASNmBsh+yMpi4mTJ2 +yY+AB0KfmPtVZDBV5fEwJZCAc9EunXNaMiipp5Z7MogASzOt+QWUQa/9PoJh +YQSUvB+wEQiSwataH31n9hPgLeEwLkfIoONyfUNmOgH6cQ2JhY0yyLUKOrEn +g4CVA2ulFB/JYMArkYvFJwioq+IDtTcyKHvh6peZLAKk7OqydJZIfzlpF36e +jD9RxcDSTha1xFIvni4nwOLbr9iIQVm0CFZ0KXtEwCHrXI1/xmTR4W9WjF0r +AZWXtXrFZ2WR2dlyeqyNAGlXH0adoBxudyu6qvSEgLHaf+f4Nsgho4sWseMl +ATnHsqLPH5TDt3+6+ST7CWh9u05lLFEOIwVXdRz6QMCCQfNLk0xy/UHd3N6P +BOz6PKM3dEkOeYrU1LOGCGDae33f0CyHlSkXQtu/EDAgqRbRIiSPR/vlxZKm +CKDseUClUOQx9Z61zrVpAuxbtz3ZrSCPMTQ9z7YZAu7EZmqK6MujxR6vrqU5 +AjL6J0c9tsnj1hX0g5wF8jyMMwpu+MpjrqzlSvNFAqbPKNsuhcjjVFxypcUf +AnZYuJeXHpHH9Wq5OmweLuiVNwR9K5HHOB2q3gIfF4J43ShmN+Txl8/6sIFl +XLjoNfEo97Y8jiz+vt+ynAv8wopqzFZ5bKtyrDkiwIXefalDyePy6Bf6/fPD +lVwQ6aDnds/Ko6Mqiyd9FRcsVOvMNXioeNyGbWy3mguV3V9LOsWouCV1ZuUj +IS4ksp19ZY2paJN7yPXkGi5Y7yj8YWRGxV3lGiXmolwQTvia5GZPxcQ01+AZ +0hebU8qyfKgYYfHMz06cC/6fXhhVhlCxbyj5/DfSGgIKbe3RVLTvPLD5tAQX +am3rv/Ifp2Id85vuP5JciA8TOKKSQ8Wo3wMBW6S4YHXKVdjsEhV9kqZkPpLu +ej6hc6SafF+op8g3ChcmtynHTL2horSyku0rGS7cjd0rIDpExY8dL2+Zy3Lh +6MV7+RsmyHgFy6/cJL36w9aG3bw07Ijo04uW48LLv67ap62mYdGBF8+fkS5Q +/vG+VIqGRLso7zp5LqgHneD5oEHD0bjrch2kJ9LfnFk0oKFD8RUBCpUL3Otq +ynJAQ2qhesZ20nEdUVxjGxparMgoLSJtNvHQ0n0LDWXG6dvek16xRrg7ajsN +17ZDmRSNC890vYLPBNHwz3nTLDvSeVuu/ayMpOFS81HKYdI79s9kdMTR0EjN +hXONtGqemfxoCg3lRaT5npEeqz19UyCLhsGcDSFTpInedyaqBTTs75uKEqNz +IXZh3TOzUhrKnW5T1CJtSjvg61NJQz930f3mpAWx5ceRWhruurZhjxvpp76i +yReaaCjhnyrqT/ps0g7Jug4a+j85uj2MtPfVirLXr2koci7eNZK00n/zRtMf +aBjz4vvc//1lxLJN9CsNvRfBJoL0rZU5ntozNCydeWWzi/QBzQ9f7ZdoqLWo +8NuDtImD1pGQFXTMuHt6hw3p5XtjhdPF6fh8bfZ+A9IdZ/4rukqlozf3vKkc +6RxCQrdZnY55cjIti+R+PV/5Nn3QpeODw8l/3pJWnKvc8odFxwpn5x+3SY9I +LwzJWdExLWK2OJN0FdMmhuFEx795xlZtJx3jfU5gqycd4WSFgQZpvmIdjewI +OtZ67v/3Lnlej/850lB1kI4OLod0DpLOGnxs/+QYHd2rmDsNSNPUA/cI5pHx +Zc8JFZP58cm6hkftMh3PeM9lOZK+EbJ0xryCjtJi997/IvOLWXmee/QBHYfk +qnstSFt0P12caKXjWIGu3iiZnw48yzbtfEHHpxWaQ5mk/V0i3sAnOn5VOevd +QuZ3RNwVpVsTdFxunarqRfpgaU+owjwdZ/f+3DwhTdZLnGJ8wnIF5Ht9oGkF +6XaRxivGKxVQMFpYNJusF6dS99ZJYQUcfMNpkSLt9SRT1FdaAaNU07dLkvW1 +lz57xXS9An5hfI7/TNbrDJHV+lNbAS1nPChbSMdarx+vNlDAGZ6H1AYxLqRE ++hgqmSjghhelhxPI+i9oftzK66yAQ9ca/v4gzIWWoKLx5hgFzFH1fT8nyAWb +BYbY4TgFXKhFvvWkn2Z1GRokKKBjaMxNT7JfvalbkVB6XAGZR7xyq8h+NrEq +WizlogJeVot/oc3LBelb1kZWTQrIn59klfmLgEsWg15/HilgU9LRrWk/yXn5 +5kjCnXYFTOoW4kuYJ0CLl2hTe6WAqoNntYNmCTBzpXoLjJDx07X4hX4QEDb/ +PaFVSBGjGyW+3h0h+3/kLqlhMUVcPd/6yv8zAYKjvRV80op4+8TavlXDBFx9 +2/zaREkRu/f4OToNEtB3/6zmbUNFPJ1jNXL9PQGOKYyeyzsVsakALlx7TgDt +z83wBwGKmO3Qb0Z5Rs6rGCW+97sVsUo8Qe3YUwLSg1dtkI5WxC1f48rt2wl4 +aPc+6VS6It7blN3FbSFATyxRO65aEQn9/qiXdwjgyZxpyb+jiMOvP7fw3ybg +KV+I550GRSxsNIw0JAgInXFJ+f4vGY9e3mBGFQGlPSpvg3oV0eqlQpDgNXIe +F7WmuvIpYf7kbPnWfAJ+rl/Tp+WmhNTGPnu3GAJmL8km6nsq4fzou0ilaHI+ +iaiqMHYqoapLustYJAETU4wQi91KWJrf4hATTs7HBv9ZzyNKKLiKP8Q/gIDH +dneF068qoUkm8/MVZwIKQnfAwIwSLvPLn21fRwC74kbxuXPKKOPXPrDueQ28 +VagosrygjC4PC58HP62B2HPlhdNFyshqG/K42l4DdxPLLrqUK+OnpeMcyqMa +0NtWnC/cqIyvb59M6KuvgXXLc7NSPyqjctCrvQtXakBqZ1xCjKYKtrUe7U8k +v+e+i9n6uDepYJ1HaJGYSA0MnfBx3yeghq20Lx2z0tVg8+2AzSdDdcxdr7vg +InMLxvwFo7jxa9GiPulnyoeb5P8FhTetaR3mX87Jt0qoALEnaqdufdNA0RAD +hwAoB/n0KidDQ01MdlIXl3hWBvnrGWvEg7SwOTlLUvxcKTyWNd04dWYDnvpc +YW8bWwJM+aYs7dfaeO+Ka9ryzcUgzFcS7XtMB7s7PS102y4CLZHO9lDTRVOl +w8GBU/mwQtX7jst/uti5evi3w7GzsIEjU3Vgux7eHh8pC8rPhn19Ys22PPpo +UN6n7Zh8Gr5NnXCzyddHl9zw2oHODNik/ajARssAz3h1LlEbUuH+FOv33FMD +NG8TMWh9dwwiNPV6nwduRM+R2Q0acfHAmQjo8lhhiDtOJdyvrDwElirSm4VK +DHHjxtcyT6X2A3f8X8WAUkN0iZocRP79oHI3ara+zBCvrdZLuT8TDctsO4uC +KwxxZP0r496uaGjak/qjmWuIPZSdr7NzosGkYTov9j9DdDqXErtMPBoMXZ4P +fB4zxDn/ZoFHMlGwNiHjYJOREWb5Sxwvt4yERtbV5fZMI6Q0L0TGGUaC09yD +7FdsI7ScELqyTT0SDkbM3BgxNUJYW9lisCISWr19PgrbG+GvTuutUU/2QjDD +0NbLxwgbPXbbLNu2F8p/fJSbTjfCt+4pm3NHI0AjkPFAtdcIFwfGShULQ+G0 +ksOvpHdG2BvX2MVNDYXpfr+NA31GaB2wWdBjTyjc9zxRUThohJtEc127MBRc +nPrzKONGKKK+98DZoRA4xErZu4LHGP+bWXGJoR0CraLPFcdVjZE6JX/jv2fB +EHg/OJkbaYwP6Ms3zprtgonw0QOW0cZYvrVr/IPWLjhIDQt9HWOMVaaMiXfS +uyDj8B6X+Thj1NP8nC/4LRBuMWMU2KnGyG0gvLUuBsLCnaTG5gJj/FLwbaDk +ZwBkVxVOv2g2Rpbt08nJh/7woLgr4LskA791JCY+OOoLH+wVd8ZIM/DSUZby +bLgv8PwM9/gty8DR2pw3zO2+YOYs4LBcgYERtU+2T7B84dFfTCMZDQZSp8Xr +Fn76QIdf0QpTEwbejRCKqDzoA70qIZVZuxjYWppw2ppnJ0xfW5rTvsvAfuu0 +3DshXjDsblV8vI6BvwR5n4c7e0HPspPWgw0MdA5bW8gw9oIGH9nz5x4ycNkS +lRDm94Jj0huZi20MLBEttLxZ4glr0kMOP37HwDVbC0Vv9XuAZtArnkBeJpbf +u9QYHrwN/FUrVhRsZuLHzxsUR6vdIPbfHSFqTky0rz7SdfmCG2QFirXXuDBR +iDXzPjzFDRqvHjrRvpWJ/D7zXDMPN5BQsxZZ9GWidHnow/d/ucEjtU8SPjHk +/eP7X7S7u4LGWrqCWhETP1G9XlFFtsB3jRzDmkkmPrT5JRZ4xwl6OtBSfIqJ +sfX+qSNXneBhxMSW6BkmZtvkp8eedYJTNTaRhr+YaEtJE3oc7QQaTJ4b9Xws +PLDzzWdJAyfwswlXbJZiYeaTnPbKEEfoCtq0uovNQsFhP7GI5M1QW/r740w6 +Cwc4wTYu/LZgaB49Z5vJwhUqzgvxYzZw++PY6uKTLOwtS2pqeWEDNbQ+I9ts +FhIKZ0xzimzgRv7Dk4UXWLh9nClrxrSB4hMpjE2VLBStCOvpjrKG49EiZ/Jf +sjCqfH9HyJwVCIqnl42/YmFhr9pGjw9WkFrN02jWw8LdrzsyvdusIHni+/DY +OxZWUVb/c/mCFRwN7mKbDrPwjaNmgoqpFezzPj/yZZ6FC61OMounLcHTguzl +NDZKhretyWRbwGKXoHCzAhu9HwUmMNQsoDhw4q2tMhuTXiew/ohYwHBq3QHP +tWz0UIq3ejxoDvvaHKsO6bGRX/xGdsgJc8hwOEyrtWKj1N0m64aPZlC/7dWC +wR421hLCErIXTWH7l/rHjZFsVBYScQxPNwWe2OJ8i2g27i9ISuyKNgWrC6EG +rofYeDamPqVvsym8eP9XWFQSG8+1tMr385jCqN+Gt9V5bNwT0MBMCkGQC0+r +2/CQjRXaOT/u55nAqaVdGzOb2OiY9eX9ngMmwJttVf25hY08MXnvYKsJjN5Z +Xl7cxkZZj7+vsykmUM+TnC/2ko1CnV43yvI54JmbcGD2Exvr4/TyVS+zIb/h +0Mb7qzjo+3LIndrKhNUOHtWywhwc4Qvmia9gQsIHY60DazjIFFI+u3CKCcHL +51V0JDn4xK2fbufOBCPHGIkSGgcDJLLk9IcZ8Hpg31SKLgeTGPrjMqsYILky +rHrzVg6alvfHFwcbQan5kdhJDw4K7dN187M3Ar0jp8xzvDm4A3Q8zHWMwGHy +1qseX/L5G4f2+c0bQurrmZ/+YRwMOx9ZIJphCPMl8WaxiRwMXxYVI0NshF5W +zsuyCg7Wra9x4pUzgOD9pRdtKjn44uz9rL28BjBbeTtw7BYHSwcHvX590Qcx +pZ453TscPK3jqOpTpw92glT5ew85aDx3ITXSQx8au8oCXr7i4L68jL6cQj2w +Fa7ViunhIN8RXUplmh70bGqblX5L7vefB5oDe/Vguv5r+o4PHDyZpJyaZ64H +Wpd1bn4Z5SBj9bCcwaguNPaaxpwY56C6kGCgbJcu2EpsAe1JDpZtOdgoc18X +dqXtfx49w0GXCxd1/LN1YfphagFlnoOu/FzZm4d14divPP/6XxwcDv9wUyRI +F9YYlGtuX+SgNWvl8wxnXSgMr59ZWuLgtSLtUBpbF/4Hb9g+9g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07860481551490203}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11090,6 +11302,7 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11117,7 +11330,8 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1813924222088017}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07860481551490203}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11125,17 +11339,643 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913306567510605`*^9}, + CellChangeTimes->{3.9913306567510605`*^9, 3.99435638191899*^9}, CellLabel-> - "Out[195]=",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] + "Out[119]=",ExpressionUUID->"1c9570fd-5754-43ba-90dd-9784139dd833"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-\ -6bd251746ea6"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VWsXAHCXQgMyHtM5x6xExnAmaxkzZQplqIyRqUQqKmSMBqFIhSQ3 +KWKfytRwcbtEaVCkopAkpIwV+fb3135+z7Pfvdf7vGvYW9Fvj0sgLw8Pj+Nf +PDz/v872tbWoZJaaOMTLTVIlrUy6CqUPmfYcg6O64qVXTVUAJTv9pHuyYeel +5VdjTA0gxul6N19PCfAn32O7mVqA6AQl+2d3DewsmP0kb+oK/Y0Oe6a7m8CZ +om7ghwFgpTL6/nv3CxjbG72UwYmGn91GZye7B+CMkUE7Sy8Zms3/Ln1eMgX6 +Jb53DnXngnx/3bCf5iKs+ndbZtfRQpAI23ldwJwPz7YEyWTVXoFsXasGBzdB +7LK7czBM/xq8ydd5+H2NEBLXPo6LzVVAwcsKkRhVIdyjvjs/lP8GeAqr7/zF +EMJ7ebzXGyRvwLsk6h9ef9LvMqdMDW7Ah4iVbInbQmi+/EXt8N4bMGIxdNfQ +Qxidx2M+nhy5AfOTeVVxl0VwYNs1E+bzm5BZGt/JKyOKTdMzKe5pVWBrsFtM +UlkUa1NvRejmVoFgi4ubupYoVsUctuW7XAXJg6pv7UxF8VvwkeeZ9VVwWKlj +OHe3KN4MT3ujPV4FEcXSf9TqRTH2UfxHn7W3wPlitaadlxjqZDK5R9NvASV3 +8HjOJXEcXbrYWcOsBun1t5Pny8QxtmruxwWoBtmm1Pjtt8RR+/bEZIJFNdAm +1+1XbxbHz/qxsSYO1aBqv9enYUQcGev6uGm+1aC/bNFwUF8Cp6rmXFzSqsEx +WmpI77EEVrLSvrZ0VoPTqpG+vJcSeD48PWJtVzW4lNS9WXgngfoWGffSeqrB +/Zl356NvEriKX+M+42M1bNe8Uu8pKYknlcMw9Ec1hA5pnznmI4n1PoO8yyRq +IM3VxuTFrCQ+aOUvXelaA7Lcp7K8f0nhNv19NsxtNVAp7jqnu0oKo61UpgO8 +a+D1ix23ztClUFbv0raKgBpQcY5WcraWwsOnlT0WomugaXMR/7PzUmhh2i5T +lVsDi1YzT5+wKWhUuoqy9VkNZJXFVixaUTDkGeh9fkmu5+dJ13Km4EbLSad9 +ZJ7a/7vS9GQgBTV3084f6quBAnMFwv4UBesys7faj9WAMdrltfdT8OrS3HVe +AQKiGJd3th2TxuqnnNVcYwJsi4Wn7U5I45YlyqooFgFKAofTn56VxmJLz7ta +JgQ863KvfnlNGn9LMWXOmROwYe9qvr6n0ri9mVip70DASNmBsh+yMpi4mTJ2 +yY+AB0KfmPtVZDBV5fEwJZCAc9EunXNaMiipp5Z7MogASzOt+QWUQa/9PoJh +YQSUvB+wEQiSwataH31n9hPgLeEwLkfIoONyfUNmOgH6cQ2JhY0yyLUKOrEn +g4CVA2ulFB/JYMArkYvFJwioq+IDtTcyKHvh6peZLAKk7OqydJZIfzlpF36e +jD9RxcDSTha1xFIvni4nwOLbr9iIQVm0CFZ0KXtEwCHrXI1/xmTR4W9WjF0r +AZWXtXrFZ2WR2dlyeqyNAGlXH0adoBxudyu6qvSEgLHaf+f4Nsgho4sWseMl +ATnHsqLPH5TDt3+6+ST7CWh9u05lLFEOIwVXdRz6QMCCQfNLk0xy/UHd3N6P +BOz6PKM3dEkOeYrU1LOGCGDae33f0CyHlSkXQtu/EDAgqRbRIiSPR/vlxZKm +CKDseUClUOQx9Z61zrVpAuxbtz3ZrSCPMTQ9z7YZAu7EZmqK6MujxR6vrqU5 +AjL6J0c9tsnj1hX0g5wF8jyMMwpu+MpjrqzlSvNFAqbPKNsuhcjjVFxypcUf +AnZYuJeXHpHH9Wq5OmweLuiVNwR9K5HHOB2q3gIfF4J43ShmN+Txl8/6sIFl +XLjoNfEo97Y8jiz+vt+ynAv8wopqzFZ5bKtyrDkiwIXefalDyePy6Bf6/fPD +lVwQ6aDnds/Ko6Mqiyd9FRcsVOvMNXioeNyGbWy3mguV3V9LOsWouCV1ZuUj +IS4ksp19ZY2paJN7yPXkGi5Y7yj8YWRGxV3lGiXmolwQTvia5GZPxcQ01+AZ +0hebU8qyfKgYYfHMz06cC/6fXhhVhlCxbyj5/DfSGgIKbe3RVLTvPLD5tAQX +am3rv/Ifp2Id85vuP5JciA8TOKKSQ8Wo3wMBW6S4YHXKVdjsEhV9kqZkPpLu +ej6hc6SafF+op8g3ChcmtynHTL2horSyku0rGS7cjd0rIDpExY8dL2+Zy3Lh +6MV7+RsmyHgFy6/cJL36w9aG3bw07Ijo04uW48LLv67ap62mYdGBF8+fkS5Q +/vG+VIqGRLso7zp5LqgHneD5oEHD0bjrch2kJ9LfnFk0oKFD8RUBCpUL3Otq +ynJAQ2qhesZ20nEdUVxjGxparMgoLSJtNvHQ0n0LDWXG6dvek16xRrg7ajsN +17ZDmRSNC890vYLPBNHwz3nTLDvSeVuu/ayMpOFS81HKYdI79s9kdMTR0EjN +hXONtGqemfxoCg3lRaT5npEeqz19UyCLhsGcDSFTpInedyaqBTTs75uKEqNz +IXZh3TOzUhrKnW5T1CJtSjvg61NJQz930f3mpAWx5ceRWhruurZhjxvpp76i +yReaaCjhnyrqT/ps0g7Jug4a+j85uj2MtPfVirLXr2koci7eNZK00n/zRtMf +aBjz4vvc//1lxLJN9CsNvRfBJoL0rZU5ntozNCydeWWzi/QBzQ9f7ZdoqLWo +8NuDtImD1pGQFXTMuHt6hw3p5XtjhdPF6fh8bfZ+A9IdZ/4rukqlozf3vKkc +6RxCQrdZnY55cjIti+R+PV/5Nn3QpeODw8l/3pJWnKvc8odFxwpn5x+3SY9I +LwzJWdExLWK2OJN0FdMmhuFEx795xlZtJx3jfU5gqycd4WSFgQZpvmIdjewI +OtZ67v/3Lnlej/850lB1kI4OLod0DpLOGnxs/+QYHd2rmDsNSNPUA/cI5pHx +Zc8JFZP58cm6hkftMh3PeM9lOZK+EbJ0xryCjtJi997/IvOLWXmee/QBHYfk +qnstSFt0P12caKXjWIGu3iiZnw48yzbtfEHHpxWaQ5mk/V0i3sAnOn5VOevd +QuZ3RNwVpVsTdFxunarqRfpgaU+owjwdZ/f+3DwhTdZLnGJ8wnIF5Ht9oGkF +6XaRxivGKxVQMFpYNJusF6dS99ZJYQUcfMNpkSLt9SRT1FdaAaNU07dLkvW1 +lz57xXS9An5hfI7/TNbrDJHV+lNbAS1nPChbSMdarx+vNlDAGZ6H1AYxLqRE ++hgqmSjghhelhxPI+i9oftzK66yAQ9ca/v4gzIWWoKLx5hgFzFH1fT8nyAWb +BYbY4TgFXKhFvvWkn2Z1GRokKKBjaMxNT7JfvalbkVB6XAGZR7xyq8h+NrEq +WizlogJeVot/oc3LBelb1kZWTQrIn59klfmLgEsWg15/HilgU9LRrWk/yXn5 +5kjCnXYFTOoW4kuYJ0CLl2hTe6WAqoNntYNmCTBzpXoLjJDx07X4hX4QEDb/ +PaFVSBGjGyW+3h0h+3/kLqlhMUVcPd/6yv8zAYKjvRV80op4+8TavlXDBFx9 +2/zaREkRu/f4OToNEtB3/6zmbUNFPJ1jNXL9PQGOKYyeyzsVsakALlx7TgDt +z83wBwGKmO3Qb0Z5Rs6rGCW+97sVsUo8Qe3YUwLSg1dtkI5WxC1f48rt2wl4 +aPc+6VS6It7blN3FbSFATyxRO65aEQn9/qiXdwjgyZxpyb+jiMOvP7fw3ybg +KV+I550GRSxsNIw0JAgInXFJ+f4vGY9e3mBGFQGlPSpvg3oV0eqlQpDgNXIe +F7WmuvIpYf7kbPnWfAJ+rl/Tp+WmhNTGPnu3GAJmL8km6nsq4fzou0ilaHI+ +iaiqMHYqoapLustYJAETU4wQi91KWJrf4hATTs7HBv9ZzyNKKLiKP8Q/gIDH +dneF068qoUkm8/MVZwIKQnfAwIwSLvPLn21fRwC74kbxuXPKKOPXPrDueQ28 +VagosrygjC4PC58HP62B2HPlhdNFyshqG/K42l4DdxPLLrqUK+OnpeMcyqMa +0NtWnC/cqIyvb59M6KuvgXXLc7NSPyqjctCrvQtXakBqZ1xCjKYKtrUe7U8k +v+e+i9n6uDepYJ1HaJGYSA0MnfBx3yeghq20Lx2z0tVg8+2AzSdDdcxdr7vg +InMLxvwFo7jxa9GiPulnyoeb5P8FhTetaR3mX87Jt0qoALEnaqdufdNA0RAD +hwAoB/n0KidDQ01MdlIXl3hWBvnrGWvEg7SwOTlLUvxcKTyWNd04dWYDnvpc +YW8bWwJM+aYs7dfaeO+Ka9ryzcUgzFcS7XtMB7s7PS102y4CLZHO9lDTRVOl +w8GBU/mwQtX7jst/uti5evi3w7GzsIEjU3Vgux7eHh8pC8rPhn19Ys22PPpo +UN6n7Zh8Gr5NnXCzyddHl9zw2oHODNik/ajARssAz3h1LlEbUuH+FOv33FMD +NG8TMWh9dwwiNPV6nwduRM+R2Q0acfHAmQjo8lhhiDtOJdyvrDwElirSm4VK +DHHjxtcyT6X2A3f8X8WAUkN0iZocRP79oHI3ara+zBCvrdZLuT8TDctsO4uC +KwxxZP0r496uaGjak/qjmWuIPZSdr7NzosGkYTov9j9DdDqXErtMPBoMXZ4P +fB4zxDn/ZoFHMlGwNiHjYJOREWb5Sxwvt4yERtbV5fZMI6Q0L0TGGUaC09yD +7FdsI7ScELqyTT0SDkbM3BgxNUJYW9lisCISWr19PgrbG+GvTuutUU/2QjDD +0NbLxwgbPXbbLNu2F8p/fJSbTjfCt+4pm3NHI0AjkPFAtdcIFwfGShULQ+G0 +ksOvpHdG2BvX2MVNDYXpfr+NA31GaB2wWdBjTyjc9zxRUThohJtEc127MBRc +nPrzKONGKKK+98DZoRA4xErZu4LHGP+bWXGJoR0CraLPFcdVjZE6JX/jv2fB +EHg/OJkbaYwP6Ms3zprtgonw0QOW0cZYvrVr/IPWLjhIDQt9HWOMVaaMiXfS +uyDj8B6X+Thj1NP8nC/4LRBuMWMU2KnGyG0gvLUuBsLCnaTG5gJj/FLwbaDk +ZwBkVxVOv2g2Rpbt08nJh/7woLgr4LskA791JCY+OOoLH+wVd8ZIM/DSUZby +bLgv8PwM9/gty8DR2pw3zO2+YOYs4LBcgYERtU+2T7B84dFfTCMZDQZSp8Xr +Fn76QIdf0QpTEwbejRCKqDzoA70qIZVZuxjYWppw2ppnJ0xfW5rTvsvAfuu0 +3DshXjDsblV8vI6BvwR5n4c7e0HPspPWgw0MdA5bW8gw9oIGH9nz5x4ycNkS +lRDm94Jj0huZi20MLBEttLxZ4glr0kMOP37HwDVbC0Vv9XuAZtArnkBeJpbf +u9QYHrwN/FUrVhRsZuLHzxsUR6vdIPbfHSFqTky0rz7SdfmCG2QFirXXuDBR +iDXzPjzFDRqvHjrRvpWJ/D7zXDMPN5BQsxZZ9GWidHnow/d/ucEjtU8SPjHk +/eP7X7S7u4LGWrqCWhETP1G9XlFFtsB3jRzDmkkmPrT5JRZ4xwl6OtBSfIqJ +sfX+qSNXneBhxMSW6BkmZtvkp8eedYJTNTaRhr+YaEtJE3oc7QQaTJ4b9Xws +PLDzzWdJAyfwswlXbJZiYeaTnPbKEEfoCtq0uovNQsFhP7GI5M1QW/r740w6 +Cwc4wTYu/LZgaB49Z5vJwhUqzgvxYzZw++PY6uKTLOwtS2pqeWEDNbQ+I9ts +FhIKZ0xzimzgRv7Dk4UXWLh9nClrxrSB4hMpjE2VLBStCOvpjrKG49EiZ/Jf +sjCqfH9HyJwVCIqnl42/YmFhr9pGjw9WkFrN02jWw8LdrzsyvdusIHni+/DY +OxZWUVb/c/mCFRwN7mKbDrPwjaNmgoqpFezzPj/yZZ6FC61OMounLcHTguzl +NDZKhretyWRbwGKXoHCzAhu9HwUmMNQsoDhw4q2tMhuTXiew/ohYwHBq3QHP +tWz0UIq3ejxoDvvaHKsO6bGRX/xGdsgJc8hwOEyrtWKj1N0m64aPZlC/7dWC +wR421hLCErIXTWH7l/rHjZFsVBYScQxPNwWe2OJ8i2g27i9ISuyKNgWrC6EG +rofYeDamPqVvsym8eP9XWFQSG8+1tMr385jCqN+Gt9V5bNwT0MBMCkGQC0+r +2/CQjRXaOT/u55nAqaVdGzOb2OiY9eX9ngMmwJttVf25hY08MXnvYKsJjN5Z +Xl7cxkZZj7+vsykmUM+TnC/2ko1CnV43yvI54JmbcGD2Exvr4/TyVS+zIb/h +0Mb7qzjo+3LIndrKhNUOHtWywhwc4Qvmia9gQsIHY60DazjIFFI+u3CKCcHL +51V0JDn4xK2fbufOBCPHGIkSGgcDJLLk9IcZ8Hpg31SKLgeTGPrjMqsYILky +rHrzVg6alvfHFwcbQan5kdhJDw4K7dN187M3Ar0jp8xzvDm4A3Q8zHWMwGHy +1qseX/L5G4f2+c0bQurrmZ/+YRwMOx9ZIJphCPMl8WaxiRwMXxYVI0NshF5W +zsuyCg7Wra9x4pUzgOD9pRdtKjn44uz9rL28BjBbeTtw7BYHSwcHvX590Qcx +pZ453TscPK3jqOpTpw92glT5ew85aDx3ITXSQx8au8oCXr7i4L68jL6cQj2w +Fa7ViunhIN8RXUplmh70bGqblX5L7vefB5oDe/Vguv5r+o4PHDyZpJyaZ64H +Wpd1bn4Z5SBj9bCcwaguNPaaxpwY56C6kGCgbJcu2EpsAe1JDpZtOdgoc18X +dqXtfx49w0GXCxd1/LN1YfphagFlnoOu/FzZm4d14divPP/6XxwcDv9wUyRI +F9YYlGtuX+SgNWvl8wxnXSgMr59ZWuLgtSLtUBpbF/4Hb9g+9g== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VWsXAHCXQgMyHtM5x6xExnAmaxkzZQplqIyRqUQqKmSMBqFIhSQ3 +KWKfytRwcbtEaVCkopAkpIwV+fb3135+z7Pfvdf7vGvYW9Fvj0sgLw8Pj+Nf +PDz/v872tbWoZJaaOMTLTVIlrUy6CqUPmfYcg6O64qVXTVUAJTv9pHuyYeel +5VdjTA0gxul6N19PCfAn32O7mVqA6AQl+2d3DewsmP0kb+oK/Y0Oe6a7m8CZ +om7ghwFgpTL6/nv3CxjbG72UwYmGn91GZye7B+CMkUE7Sy8Zms3/Ln1eMgX6 +Jb53DnXngnx/3bCf5iKs+ndbZtfRQpAI23ldwJwPz7YEyWTVXoFsXasGBzdB +7LK7czBM/xq8ydd5+H2NEBLXPo6LzVVAwcsKkRhVIdyjvjs/lP8GeAqr7/zF +EMJ7ebzXGyRvwLsk6h9ef9LvMqdMDW7Ah4iVbInbQmi+/EXt8N4bMGIxdNfQ +Qxidx2M+nhy5AfOTeVVxl0VwYNs1E+bzm5BZGt/JKyOKTdMzKe5pVWBrsFtM +UlkUa1NvRejmVoFgi4ubupYoVsUctuW7XAXJg6pv7UxF8VvwkeeZ9VVwWKlj +OHe3KN4MT3ujPV4FEcXSf9TqRTH2UfxHn7W3wPlitaadlxjqZDK5R9NvASV3 +8HjOJXEcXbrYWcOsBun1t5Pny8QxtmruxwWoBtmm1Pjtt8RR+/bEZIJFNdAm +1+1XbxbHz/qxsSYO1aBqv9enYUQcGev6uGm+1aC/bNFwUF8Cp6rmXFzSqsEx +WmpI77EEVrLSvrZ0VoPTqpG+vJcSeD48PWJtVzW4lNS9WXgngfoWGffSeqrB +/Zl356NvEriKX+M+42M1bNe8Uu8pKYknlcMw9Ec1hA5pnznmI4n1PoO8yyRq +IM3VxuTFrCQ+aOUvXelaA7Lcp7K8f0nhNv19NsxtNVAp7jqnu0oKo61UpgO8 +a+D1ix23ztClUFbv0raKgBpQcY5WcraWwsOnlT0WomugaXMR/7PzUmhh2i5T +lVsDi1YzT5+wKWhUuoqy9VkNZJXFVixaUTDkGeh9fkmu5+dJ13Km4EbLSad9 +ZJ7a/7vS9GQgBTV3084f6quBAnMFwv4UBesys7faj9WAMdrltfdT8OrS3HVe +AQKiGJd3th2TxuqnnNVcYwJsi4Wn7U5I45YlyqooFgFKAofTn56VxmJLz7ta +JgQ863KvfnlNGn9LMWXOmROwYe9qvr6n0ri9mVip70DASNmBsh+yMpi4mTJ2 +yY+AB0KfmPtVZDBV5fEwJZCAc9EunXNaMiipp5Z7MogASzOt+QWUQa/9PoJh +YQSUvB+wEQiSwataH31n9hPgLeEwLkfIoONyfUNmOgH6cQ2JhY0yyLUKOrEn +g4CVA2ulFB/JYMArkYvFJwioq+IDtTcyKHvh6peZLAKk7OqydJZIfzlpF36e +jD9RxcDSTha1xFIvni4nwOLbr9iIQVm0CFZ0KXtEwCHrXI1/xmTR4W9WjF0r +AZWXtXrFZ2WR2dlyeqyNAGlXH0adoBxudyu6qvSEgLHaf+f4Nsgho4sWseMl +ATnHsqLPH5TDt3+6+ST7CWh9u05lLFEOIwVXdRz6QMCCQfNLk0xy/UHd3N6P +BOz6PKM3dEkOeYrU1LOGCGDae33f0CyHlSkXQtu/EDAgqRbRIiSPR/vlxZKm +CKDseUClUOQx9Z61zrVpAuxbtz3ZrSCPMTQ9z7YZAu7EZmqK6MujxR6vrqU5 +AjL6J0c9tsnj1hX0g5wF8jyMMwpu+MpjrqzlSvNFAqbPKNsuhcjjVFxypcUf +AnZYuJeXHpHH9Wq5OmweLuiVNwR9K5HHOB2q3gIfF4J43ShmN+Txl8/6sIFl +XLjoNfEo97Y8jiz+vt+ynAv8wopqzFZ5bKtyrDkiwIXefalDyePy6Bf6/fPD +lVwQ6aDnds/Ko6Mqiyd9FRcsVOvMNXioeNyGbWy3mguV3V9LOsWouCV1ZuUj +IS4ksp19ZY2paJN7yPXkGi5Y7yj8YWRGxV3lGiXmolwQTvia5GZPxcQ01+AZ +0hebU8qyfKgYYfHMz06cC/6fXhhVhlCxbyj5/DfSGgIKbe3RVLTvPLD5tAQX +am3rv/Ifp2Id85vuP5JciA8TOKKSQ8Wo3wMBW6S4YHXKVdjsEhV9kqZkPpLu +ej6hc6SafF+op8g3ChcmtynHTL2horSyku0rGS7cjd0rIDpExY8dL2+Zy3Lh +6MV7+RsmyHgFy6/cJL36w9aG3bw07Ijo04uW48LLv67ap62mYdGBF8+fkS5Q +/vG+VIqGRLso7zp5LqgHneD5oEHD0bjrch2kJ9LfnFk0oKFD8RUBCpUL3Otq +ynJAQ2qhesZ20nEdUVxjGxparMgoLSJtNvHQ0n0LDWXG6dvek16xRrg7ajsN +17ZDmRSNC890vYLPBNHwz3nTLDvSeVuu/ayMpOFS81HKYdI79s9kdMTR0EjN +hXONtGqemfxoCg3lRaT5npEeqz19UyCLhsGcDSFTpInedyaqBTTs75uKEqNz +IXZh3TOzUhrKnW5T1CJtSjvg61NJQz930f3mpAWx5ceRWhruurZhjxvpp76i +yReaaCjhnyrqT/ps0g7Jug4a+j85uj2MtPfVirLXr2koci7eNZK00n/zRtMf +aBjz4vvc//1lxLJN9CsNvRfBJoL0rZU5ntozNCydeWWzi/QBzQ9f7ZdoqLWo +8NuDtImD1pGQFXTMuHt6hw3p5XtjhdPF6fh8bfZ+A9IdZ/4rukqlozf3vKkc +6RxCQrdZnY55cjIti+R+PV/5Nn3QpeODw8l/3pJWnKvc8odFxwpn5x+3SY9I +LwzJWdExLWK2OJN0FdMmhuFEx795xlZtJx3jfU5gqycd4WSFgQZpvmIdjewI +OtZ67v/3Lnlej/850lB1kI4OLod0DpLOGnxs/+QYHd2rmDsNSNPUA/cI5pHx +Zc8JFZP58cm6hkftMh3PeM9lOZK+EbJ0xryCjtJi997/IvOLWXmee/QBHYfk +qnstSFt0P12caKXjWIGu3iiZnw48yzbtfEHHpxWaQ5mk/V0i3sAnOn5VOevd +QuZ3RNwVpVsTdFxunarqRfpgaU+owjwdZ/f+3DwhTdZLnGJ8wnIF5Ht9oGkF +6XaRxivGKxVQMFpYNJusF6dS99ZJYQUcfMNpkSLt9SRT1FdaAaNU07dLkvW1 +lz57xXS9An5hfI7/TNbrDJHV+lNbAS1nPChbSMdarx+vNlDAGZ6H1AYxLqRE ++hgqmSjghhelhxPI+i9oftzK66yAQ9ca/v4gzIWWoKLx5hgFzFH1fT8nyAWb +BYbY4TgFXKhFvvWkn2Z1GRokKKBjaMxNT7JfvalbkVB6XAGZR7xyq8h+NrEq +WizlogJeVot/oc3LBelb1kZWTQrIn59klfmLgEsWg15/HilgU9LRrWk/yXn5 +5kjCnXYFTOoW4kuYJ0CLl2hTe6WAqoNntYNmCTBzpXoLjJDx07X4hX4QEDb/ +PaFVSBGjGyW+3h0h+3/kLqlhMUVcPd/6yv8zAYKjvRV80op4+8TavlXDBFx9 +2/zaREkRu/f4OToNEtB3/6zmbUNFPJ1jNXL9PQGOKYyeyzsVsakALlx7TgDt +z83wBwGKmO3Qb0Z5Rs6rGCW+97sVsUo8Qe3YUwLSg1dtkI5WxC1f48rt2wl4 +aPc+6VS6It7blN3FbSFATyxRO65aEQn9/qiXdwjgyZxpyb+jiMOvP7fw3ybg +KV+I550GRSxsNIw0JAgInXFJ+f4vGY9e3mBGFQGlPSpvg3oV0eqlQpDgNXIe +F7WmuvIpYf7kbPnWfAJ+rl/Tp+WmhNTGPnu3GAJmL8km6nsq4fzou0ilaHI+ +iaiqMHYqoapLustYJAETU4wQi91KWJrf4hATTs7HBv9ZzyNKKLiKP8Q/gIDH +dneF068qoUkm8/MVZwIKQnfAwIwSLvPLn21fRwC74kbxuXPKKOPXPrDueQ28 +VagosrygjC4PC58HP62B2HPlhdNFyshqG/K42l4DdxPLLrqUK+OnpeMcyqMa +0NtWnC/cqIyvb59M6KuvgXXLc7NSPyqjctCrvQtXakBqZ1xCjKYKtrUe7U8k +v+e+i9n6uDepYJ1HaJGYSA0MnfBx3yeghq20Lx2z0tVg8+2AzSdDdcxdr7vg +InMLxvwFo7jxa9GiPulnyoeb5P8FhTetaR3mX87Jt0qoALEnaqdufdNA0RAD +hwAoB/n0KidDQ01MdlIXl3hWBvnrGWvEg7SwOTlLUvxcKTyWNd04dWYDnvpc +YW8bWwJM+aYs7dfaeO+Ka9ryzcUgzFcS7XtMB7s7PS102y4CLZHO9lDTRVOl +w8GBU/mwQtX7jst/uti5evi3w7GzsIEjU3Vgux7eHh8pC8rPhn19Ys22PPpo +UN6n7Zh8Gr5NnXCzyddHl9zw2oHODNik/ajARssAz3h1LlEbUuH+FOv33FMD +NG8TMWh9dwwiNPV6nwduRM+R2Q0acfHAmQjo8lhhiDtOJdyvrDwElirSm4VK +DHHjxtcyT6X2A3f8X8WAUkN0iZocRP79oHI3ara+zBCvrdZLuT8TDctsO4uC +KwxxZP0r496uaGjak/qjmWuIPZSdr7NzosGkYTov9j9DdDqXErtMPBoMXZ4P +fB4zxDn/ZoFHMlGwNiHjYJOREWb5Sxwvt4yERtbV5fZMI6Q0L0TGGUaC09yD +7FdsI7ScELqyTT0SDkbM3BgxNUJYW9lisCISWr19PgrbG+GvTuutUU/2QjDD +0NbLxwgbPXbbLNu2F8p/fJSbTjfCt+4pm3NHI0AjkPFAtdcIFwfGShULQ+G0 +ksOvpHdG2BvX2MVNDYXpfr+NA31GaB2wWdBjTyjc9zxRUThohJtEc127MBRc +nPrzKONGKKK+98DZoRA4xErZu4LHGP+bWXGJoR0CraLPFcdVjZE6JX/jv2fB +EHg/OJkbaYwP6Ms3zprtgonw0QOW0cZYvrVr/IPWLjhIDQt9HWOMVaaMiXfS +uyDj8B6X+Thj1NP8nC/4LRBuMWMU2KnGyG0gvLUuBsLCnaTG5gJj/FLwbaDk +ZwBkVxVOv2g2Rpbt08nJh/7woLgr4LskA791JCY+OOoLH+wVd8ZIM/DSUZby +bLgv8PwM9/gty8DR2pw3zO2+YOYs4LBcgYERtU+2T7B84dFfTCMZDQZSp8Xr +Fn76QIdf0QpTEwbejRCKqDzoA70qIZVZuxjYWppw2ppnJ0xfW5rTvsvAfuu0 +3DshXjDsblV8vI6BvwR5n4c7e0HPspPWgw0MdA5bW8gw9oIGH9nz5x4ycNkS +lRDm94Jj0huZi20MLBEttLxZ4glr0kMOP37HwDVbC0Vv9XuAZtArnkBeJpbf +u9QYHrwN/FUrVhRsZuLHzxsUR6vdIPbfHSFqTky0rz7SdfmCG2QFirXXuDBR +iDXzPjzFDRqvHjrRvpWJ/D7zXDMPN5BQsxZZ9GWidHnow/d/ucEjtU8SPjHk +/eP7X7S7u4LGWrqCWhETP1G9XlFFtsB3jRzDmkkmPrT5JRZ4xwl6OtBSfIqJ +sfX+qSNXneBhxMSW6BkmZtvkp8eedYJTNTaRhr+YaEtJE3oc7QQaTJ4b9Xws +PLDzzWdJAyfwswlXbJZiYeaTnPbKEEfoCtq0uovNQsFhP7GI5M1QW/r740w6 +Cwc4wTYu/LZgaB49Z5vJwhUqzgvxYzZw++PY6uKTLOwtS2pqeWEDNbQ+I9ts +FhIKZ0xzimzgRv7Dk4UXWLh9nClrxrSB4hMpjE2VLBStCOvpjrKG49EiZ/Jf +sjCqfH9HyJwVCIqnl42/YmFhr9pGjw9WkFrN02jWw8LdrzsyvdusIHni+/DY +OxZWUVb/c/mCFRwN7mKbDrPwjaNmgoqpFezzPj/yZZ6FC61OMounLcHTguzl +NDZKhretyWRbwGKXoHCzAhu9HwUmMNQsoDhw4q2tMhuTXiew/ohYwHBq3QHP +tWz0UIq3ejxoDvvaHKsO6bGRX/xGdsgJc8hwOEyrtWKj1N0m64aPZlC/7dWC +wR421hLCErIXTWH7l/rHjZFsVBYScQxPNwWe2OJ8i2g27i9ISuyKNgWrC6EG +rofYeDamPqVvsym8eP9XWFQSG8+1tMr385jCqN+Gt9V5bNwT0MBMCkGQC0+r +2/CQjRXaOT/u55nAqaVdGzOb2OiY9eX9ngMmwJttVf25hY08MXnvYKsJjN5Z +Xl7cxkZZj7+vsykmUM+TnC/2ko1CnV43yvI54JmbcGD2Exvr4/TyVS+zIb/h +0Mb7qzjo+3LIndrKhNUOHtWywhwc4Qvmia9gQsIHY60DazjIFFI+u3CKCcHL +51V0JDn4xK2fbufOBCPHGIkSGgcDJLLk9IcZ8Hpg31SKLgeTGPrjMqsYILky +rHrzVg6alvfHFwcbQan5kdhJDw4K7dN187M3Ar0jp8xzvDm4A3Q8zHWMwGHy +1qseX/L5G4f2+c0bQurrmZ/+YRwMOx9ZIJphCPMl8WaxiRwMXxYVI0NshF5W +zsuyCg7Wra9x4pUzgOD9pRdtKjn44uz9rL28BjBbeTtw7BYHSwcHvX590Qcx +pZ453TscPK3jqOpTpw92glT5ew85aDx3ITXSQx8au8oCXr7i4L68jL6cQj2w +Fa7ViunhIN8RXUplmh70bGqblX5L7vefB5oDe/Vguv5r+o4PHDyZpJyaZ64H +Wpd1bn4Z5SBj9bCcwaguNPaaxpwY56C6kGCgbJcu2EpsAe1JDpZtOdgoc18X +dqXtfx49w0GXCxd1/LN1YfphagFlnoOu/FzZm4d14divPP/6XxwcDv9wUyRI +F9YYlGtuX+SgNWvl8wxnXSgMr59ZWuLgtSLtUBpbF/4Hb9g+9g== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07860481551490203}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07860481551490203}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VWsXAHCXQgMyHtM5x6xExnAmaxkzZQplqIyRqUQqKmSMBqFIhSQ3 +KWKfytRwcbtEaVCkopAkpIwV+fb3135+z7Pfvdf7vGvYW9Fvj0sgLw8Pj+Nf +PDz/v872tbWoZJaaOMTLTVIlrUy6CqUPmfYcg6O64qVXTVUAJTv9pHuyYeel +5VdjTA0gxul6N19PCfAn32O7mVqA6AQl+2d3DewsmP0kb+oK/Y0Oe6a7m8CZ +om7ghwFgpTL6/nv3CxjbG72UwYmGn91GZye7B+CMkUE7Sy8Zms3/Ln1eMgX6 +Jb53DnXngnx/3bCf5iKs+ndbZtfRQpAI23ldwJwPz7YEyWTVXoFsXasGBzdB +7LK7czBM/xq8ydd5+H2NEBLXPo6LzVVAwcsKkRhVIdyjvjs/lP8GeAqr7/zF +EMJ7ebzXGyRvwLsk6h9ef9LvMqdMDW7Ah4iVbInbQmi+/EXt8N4bMGIxdNfQ +Qxidx2M+nhy5AfOTeVVxl0VwYNs1E+bzm5BZGt/JKyOKTdMzKe5pVWBrsFtM +UlkUa1NvRejmVoFgi4ubupYoVsUctuW7XAXJg6pv7UxF8VvwkeeZ9VVwWKlj +OHe3KN4MT3ujPV4FEcXSf9TqRTH2UfxHn7W3wPlitaadlxjqZDK5R9NvASV3 +8HjOJXEcXbrYWcOsBun1t5Pny8QxtmruxwWoBtmm1Pjtt8RR+/bEZIJFNdAm +1+1XbxbHz/qxsSYO1aBqv9enYUQcGev6uGm+1aC/bNFwUF8Cp6rmXFzSqsEx +WmpI77EEVrLSvrZ0VoPTqpG+vJcSeD48PWJtVzW4lNS9WXgngfoWGffSeqrB +/Zl356NvEriKX+M+42M1bNe8Uu8pKYknlcMw9Ec1hA5pnznmI4n1PoO8yyRq +IM3VxuTFrCQ+aOUvXelaA7Lcp7K8f0nhNv19NsxtNVAp7jqnu0oKo61UpgO8 +a+D1ix23ztClUFbv0raKgBpQcY5WcraWwsOnlT0WomugaXMR/7PzUmhh2i5T +lVsDi1YzT5+wKWhUuoqy9VkNZJXFVixaUTDkGeh9fkmu5+dJ13Km4EbLSad9 +ZJ7a/7vS9GQgBTV3084f6quBAnMFwv4UBesys7faj9WAMdrltfdT8OrS3HVe +AQKiGJd3th2TxuqnnNVcYwJsi4Wn7U5I45YlyqooFgFKAofTn56VxmJLz7ta +JgQ863KvfnlNGn9LMWXOmROwYe9qvr6n0ri9mVip70DASNmBsh+yMpi4mTJ2 +yY+AB0KfmPtVZDBV5fEwJZCAc9EunXNaMiipp5Z7MogASzOt+QWUQa/9PoJh +YQSUvB+wEQiSwataH31n9hPgLeEwLkfIoONyfUNmOgH6cQ2JhY0yyLUKOrEn +g4CVA2ulFB/JYMArkYvFJwioq+IDtTcyKHvh6peZLAKk7OqydJZIfzlpF36e +jD9RxcDSTha1xFIvni4nwOLbr9iIQVm0CFZ0KXtEwCHrXI1/xmTR4W9WjF0r +AZWXtXrFZ2WR2dlyeqyNAGlXH0adoBxudyu6qvSEgLHaf+f4Nsgho4sWseMl +ATnHsqLPH5TDt3+6+ST7CWh9u05lLFEOIwVXdRz6QMCCQfNLk0xy/UHd3N6P +BOz6PKM3dEkOeYrU1LOGCGDae33f0CyHlSkXQtu/EDAgqRbRIiSPR/vlxZKm +CKDseUClUOQx9Z61zrVpAuxbtz3ZrSCPMTQ9z7YZAu7EZmqK6MujxR6vrqU5 +AjL6J0c9tsnj1hX0g5wF8jyMMwpu+MpjrqzlSvNFAqbPKNsuhcjjVFxypcUf +AnZYuJeXHpHH9Wq5OmweLuiVNwR9K5HHOB2q3gIfF4J43ShmN+Txl8/6sIFl +XLjoNfEo97Y8jiz+vt+ynAv8wopqzFZ5bKtyrDkiwIXefalDyePy6Bf6/fPD +lVwQ6aDnds/Ko6Mqiyd9FRcsVOvMNXioeNyGbWy3mguV3V9LOsWouCV1ZuUj +IS4ksp19ZY2paJN7yPXkGi5Y7yj8YWRGxV3lGiXmolwQTvia5GZPxcQ01+AZ +0hebU8qyfKgYYfHMz06cC/6fXhhVhlCxbyj5/DfSGgIKbe3RVLTvPLD5tAQX +am3rv/Ifp2Id85vuP5JciA8TOKKSQ8Wo3wMBW6S4YHXKVdjsEhV9kqZkPpLu +ej6hc6SafF+op8g3ChcmtynHTL2horSyku0rGS7cjd0rIDpExY8dL2+Zy3Lh +6MV7+RsmyHgFy6/cJL36w9aG3bw07Ijo04uW48LLv67ap62mYdGBF8+fkS5Q +/vG+VIqGRLso7zp5LqgHneD5oEHD0bjrch2kJ9LfnFk0oKFD8RUBCpUL3Otq +ynJAQ2qhesZ20nEdUVxjGxparMgoLSJtNvHQ0n0LDWXG6dvek16xRrg7ajsN +17ZDmRSNC890vYLPBNHwz3nTLDvSeVuu/ayMpOFS81HKYdI79s9kdMTR0EjN +hXONtGqemfxoCg3lRaT5npEeqz19UyCLhsGcDSFTpInedyaqBTTs75uKEqNz +IXZh3TOzUhrKnW5T1CJtSjvg61NJQz930f3mpAWx5ceRWhruurZhjxvpp76i +yReaaCjhnyrqT/ps0g7Jug4a+j85uj2MtPfVirLXr2koci7eNZK00n/zRtMf +aBjz4vvc//1lxLJN9CsNvRfBJoL0rZU5ntozNCydeWWzi/QBzQ9f7ZdoqLWo +8NuDtImD1pGQFXTMuHt6hw3p5XtjhdPF6fh8bfZ+A9IdZ/4rukqlozf3vKkc +6RxCQrdZnY55cjIti+R+PV/5Nn3QpeODw8l/3pJWnKvc8odFxwpn5x+3SY9I +LwzJWdExLWK2OJN0FdMmhuFEx795xlZtJx3jfU5gqycd4WSFgQZpvmIdjewI +OtZ67v/3Lnlej/850lB1kI4OLod0DpLOGnxs/+QYHd2rmDsNSNPUA/cI5pHx +Zc8JFZP58cm6hkftMh3PeM9lOZK+EbJ0xryCjtJi997/IvOLWXmee/QBHYfk +qnstSFt0P12caKXjWIGu3iiZnw48yzbtfEHHpxWaQ5mk/V0i3sAnOn5VOevd +QuZ3RNwVpVsTdFxunarqRfpgaU+owjwdZ/f+3DwhTdZLnGJ8wnIF5Ht9oGkF +6XaRxivGKxVQMFpYNJusF6dS99ZJYQUcfMNpkSLt9SRT1FdaAaNU07dLkvW1 +lz57xXS9An5hfI7/TNbrDJHV+lNbAS1nPChbSMdarx+vNlDAGZ6H1AYxLqRE ++hgqmSjghhelhxPI+i9oftzK66yAQ9ca/v4gzIWWoKLx5hgFzFH1fT8nyAWb +BYbY4TgFXKhFvvWkn2Z1GRokKKBjaMxNT7JfvalbkVB6XAGZR7xyq8h+NrEq +WizlogJeVot/oc3LBelb1kZWTQrIn59klfmLgEsWg15/HilgU9LRrWk/yXn5 +5kjCnXYFTOoW4kuYJ0CLl2hTe6WAqoNntYNmCTBzpXoLjJDx07X4hX4QEDb/ +PaFVSBGjGyW+3h0h+3/kLqlhMUVcPd/6yv8zAYKjvRV80op4+8TavlXDBFx9 +2/zaREkRu/f4OToNEtB3/6zmbUNFPJ1jNXL9PQGOKYyeyzsVsakALlx7TgDt +z83wBwGKmO3Qb0Z5Rs6rGCW+97sVsUo8Qe3YUwLSg1dtkI5WxC1f48rt2wl4 +aPc+6VS6It7blN3FbSFATyxRO65aEQn9/qiXdwjgyZxpyb+jiMOvP7fw3ybg +KV+I550GRSxsNIw0JAgInXFJ+f4vGY9e3mBGFQGlPSpvg3oV0eqlQpDgNXIe +F7WmuvIpYf7kbPnWfAJ+rl/Tp+WmhNTGPnu3GAJmL8km6nsq4fzou0ilaHI+ +iaiqMHYqoapLustYJAETU4wQi91KWJrf4hATTs7HBv9ZzyNKKLiKP8Q/gIDH +dneF068qoUkm8/MVZwIKQnfAwIwSLvPLn21fRwC74kbxuXPKKOPXPrDueQ28 +VagosrygjC4PC58HP62B2HPlhdNFyshqG/K42l4DdxPLLrqUK+OnpeMcyqMa +0NtWnC/cqIyvb59M6KuvgXXLc7NSPyqjctCrvQtXakBqZ1xCjKYKtrUe7U8k +v+e+i9n6uDepYJ1HaJGYSA0MnfBx3yeghq20Lx2z0tVg8+2AzSdDdcxdr7vg +InMLxvwFo7jxa9GiPulnyoeb5P8FhTetaR3mX87Jt0qoALEnaqdufdNA0RAD +hwAoB/n0KidDQ01MdlIXl3hWBvnrGWvEg7SwOTlLUvxcKTyWNd04dWYDnvpc +YW8bWwJM+aYs7dfaeO+Ka9ryzcUgzFcS7XtMB7s7PS102y4CLZHO9lDTRVOl +w8GBU/mwQtX7jst/uti5evi3w7GzsIEjU3Vgux7eHh8pC8rPhn19Ys22PPpo +UN6n7Zh8Gr5NnXCzyddHl9zw2oHODNik/ajARssAz3h1LlEbUuH+FOv33FMD +NG8TMWh9dwwiNPV6nwduRM+R2Q0acfHAmQjo8lhhiDtOJdyvrDwElirSm4VK +DHHjxtcyT6X2A3f8X8WAUkN0iZocRP79oHI3ara+zBCvrdZLuT8TDctsO4uC +KwxxZP0r496uaGjak/qjmWuIPZSdr7NzosGkYTov9j9DdDqXErtMPBoMXZ4P +fB4zxDn/ZoFHMlGwNiHjYJOREWb5Sxwvt4yERtbV5fZMI6Q0L0TGGUaC09yD +7FdsI7ScELqyTT0SDkbM3BgxNUJYW9lisCISWr19PgrbG+GvTuutUU/2QjDD +0NbLxwgbPXbbLNu2F8p/fJSbTjfCt+4pm3NHI0AjkPFAtdcIFwfGShULQ+G0 +ksOvpHdG2BvX2MVNDYXpfr+NA31GaB2wWdBjTyjc9zxRUThohJtEc127MBRc +nPrzKONGKKK+98DZoRA4xErZu4LHGP+bWXGJoR0CraLPFcdVjZE6JX/jv2fB +EHg/OJkbaYwP6Ms3zprtgonw0QOW0cZYvrVr/IPWLjhIDQt9HWOMVaaMiXfS +uyDj8B6X+Thj1NP8nC/4LRBuMWMU2KnGyG0gvLUuBsLCnaTG5gJj/FLwbaDk +ZwBkVxVOv2g2Rpbt08nJh/7woLgr4LskA791JCY+OOoLH+wVd8ZIM/DSUZby +bLgv8PwM9/gty8DR2pw3zO2+YOYs4LBcgYERtU+2T7B84dFfTCMZDQZSp8Xr +Fn76QIdf0QpTEwbejRCKqDzoA70qIZVZuxjYWppw2ppnJ0xfW5rTvsvAfuu0 +3DshXjDsblV8vI6BvwR5n4c7e0HPspPWgw0MdA5bW8gw9oIGH9nz5x4ycNkS +lRDm94Jj0huZi20MLBEttLxZ4glr0kMOP37HwDVbC0Vv9XuAZtArnkBeJpbf +u9QYHrwN/FUrVhRsZuLHzxsUR6vdIPbfHSFqTky0rz7SdfmCG2QFirXXuDBR +iDXzPjzFDRqvHjrRvpWJ/D7zXDMPN5BQsxZZ9GWidHnow/d/ucEjtU8SPjHk +/eP7X7S7u4LGWrqCWhETP1G9XlFFtsB3jRzDmkkmPrT5JRZ4xwl6OtBSfIqJ +sfX+qSNXneBhxMSW6BkmZtvkp8eedYJTNTaRhr+YaEtJE3oc7QQaTJ4b9Xws +PLDzzWdJAyfwswlXbJZiYeaTnPbKEEfoCtq0uovNQsFhP7GI5M1QW/r740w6 +Cwc4wTYu/LZgaB49Z5vJwhUqzgvxYzZw++PY6uKTLOwtS2pqeWEDNbQ+I9ts +FhIKZ0xzimzgRv7Dk4UXWLh9nClrxrSB4hMpjE2VLBStCOvpjrKG49EiZ/Jf +sjCqfH9HyJwVCIqnl42/YmFhr9pGjw9WkFrN02jWw8LdrzsyvdusIHni+/DY +OxZWUVb/c/mCFRwN7mKbDrPwjaNmgoqpFezzPj/yZZ6FC61OMounLcHTguzl +NDZKhretyWRbwGKXoHCzAhu9HwUmMNQsoDhw4q2tMhuTXiew/ohYwHBq3QHP +tWz0UIq3ejxoDvvaHKsO6bGRX/xGdsgJc8hwOEyrtWKj1N0m64aPZlC/7dWC +wR421hLCErIXTWH7l/rHjZFsVBYScQxPNwWe2OJ8i2g27i9ISuyKNgWrC6EG +rofYeDamPqVvsym8eP9XWFQSG8+1tMr385jCqN+Gt9V5bNwT0MBMCkGQC0+r +2/CQjRXaOT/u55nAqaVdGzOb2OiY9eX9ngMmwJttVf25hY08MXnvYKsJjN5Z +Xl7cxkZZj7+vsykmUM+TnC/2ko1CnV43yvI54JmbcGD2Exvr4/TyVS+zIb/h +0Mb7qzjo+3LIndrKhNUOHtWywhwc4Qvmia9gQsIHY60DazjIFFI+u3CKCcHL +51V0JDn4xK2fbufOBCPHGIkSGgcDJLLk9IcZ8Hpg31SKLgeTGPrjMqsYILky +rHrzVg6alvfHFwcbQan5kdhJDw4K7dN187M3Ar0jp8xzvDm4A3Q8zHWMwGHy +1qseX/L5G4f2+c0bQurrmZ/+YRwMOx9ZIJphCPMl8WaxiRwMXxYVI0NshF5W +zsuyCg7Wra9x4pUzgOD9pRdtKjn44uz9rL28BjBbeTtw7BYHSwcHvX590Qcx +pZ453TscPK3jqOpTpw92glT5ew85aDx3ITXSQx8au8oCXr7i4L68jL6cQj2w +Fa7ViunhIN8RXUplmh70bGqblX5L7vefB5oDe/Vguv5r+o4PHDyZpJyaZ64H +Wpd1bn4Z5SBj9bCcwaguNPaaxpwY56C6kGCgbJcu2EpsAe1JDpZtOdgoc18X +dqXtfx49w0GXCxd1/LN1YfphagFlnoOu/FzZm4d14divPP/6XxwcDv9wUyRI +F9YYlGtuX+SgNWvl8wxnXSgMr59ZWuLgtSLtUBpbF/4Hb9g+9g== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07860481551490203}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07860481551490203}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356382000533*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"a8df06da-6634-45be-832f-861b1d9c1ef2"] +}, Open ]], Cell[CellGroupData[{ @@ -11146,7 +11986,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -11164,8 +12006,8 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"(", FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -11187,66 +12029,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[199]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], + "In[121]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 199, 165, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752212366*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.875692056371218`*^-148\\\", \ +RowBox[{\\\"692388265304082962155241\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 121, 45, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943563820603447`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], +In[121]:=",ExpressionUUID->"09cf2f08-36c9-4f24-8b15-332d21cda711"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 199, 166, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133175222237*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.7093731291604725`*^-150\\\", \ +RowBox[{\\\"257637673519649270217965\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"119\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 121, 46, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943563820684147`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], +In[121]:=",ExpressionUUID->"d5bed7ab-8f9c-4580-b2e3-6d08fe57c88e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 199, 167, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317522303677`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.992906157552862`*^-153\\\", \ +RowBox[{\\\"990359217009531794717859\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"122\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 121, 47, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943563820765142`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], +In[121]:=",ExpressionUUID->"ed0e4701-60c2-41ea-afb4-b189ad69a9e7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 199, 168, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752237467*^9}, +during this calculation.\"", 2, 121, 48, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.994356382083664*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], +In[121]:=",ExpressionUUID->"cc057008-4149-43da-8b96-7d10bad069c0"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.991331759108553*^9}, +Cell[BoxData["9.661683336978601`"], "Output", + CellChangeTimes->{3.991331759108553*^9, 3.994356481774383*^9}, CellLabel-> - "Out[199]=",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] + "Out[121]=",ExpressionUUID->"7552fc6d-d945-4671-a78f-fe9371717d17"] }, Open ]], Cell[CellGroupData[{ @@ -11313,68 +12162,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849016830597*^9, - 3.991849020984995*^9}},ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-\ -7a397847208f"], + CellChangeTimes->{{3.991849016830597*^9, 3.991849020984995*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 169, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591425533`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3722353092919838`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 122, 49, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.994356481830122*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], +In[122]:=",ExpressionUUID->"8261bfb7-0a68-4dbb-b59d-759f340f1469"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 170, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591525517`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6284176281009414`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 122, 50, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.99435648183746*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], +In[122]:=",ExpressionUUID->"e6688c1b-9705-454f-b896-2dd101fd148b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 200, 171, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331759160553*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0345441346180744`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 122, 51, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.994356481845511*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], +In[122]:=",ExpressionUUID->"9c9c4344-1f1e-4702-babc-50eb45dae51f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 200, 172, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591685543`*^9}, +during this calculation.\"", 2, 122, 52, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.994356481853771*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], +In[122]:=",ExpressionUUID->"b909307e-5d1d-4b0a-95a7-a9c70ee53bf3"], -Cell[BoxData["1.044718879268698`"], "Output", - CellChangeTimes->{3.991331766558941*^9}, +Cell[BoxData["0.300116857020395`"], "Output", + CellChangeTimes->{3.991331766558941*^9, 3.9943564935758753`*^9}, CellLabel-> - "Out[200]=",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] + "Out[122]=",ExpressionUUID->"217b5996-7704-40b4-ab7c-933b3c8127cf"] }, Open ]], Cell[CellGroupData[{ @@ -11395,8 +12248,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11441,68 +12293,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849024657757*^9, - 3.991849027138817*^9}},ExpressionUUID->"22b50200-0b82-dc47-9932-\ -f1f0210d6caf"], + CellChangeTimes->{{3.991849024657757*^9, 3.991849027138817*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 173, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317665951805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3722353092919838`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 123, 53, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.9943564936328583`*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], +In[123]:=",ExpressionUUID->"be2c7bcc-bd6b-4b63-8453-7273c4959da3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 174, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666041794`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6284176281009414`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 123, 54, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.99435649364316*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], +In[123]:=",ExpressionUUID->"58c1a737-49ad-47c1-8609-91143e42b265"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 201, 175, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666131783`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0345441346180744`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 123, 55, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994356493652671*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], +In[123]:=",ExpressionUUID->"3964fbae-c48e-4bf8-8040-fa0fedcf561b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 201, 176, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666211815`*^9}, +during this calculation.\"", 2, 123, 56, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994356493662211*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], +In[123]:=",ExpressionUUID->"a9932742-1162-4c14-a707-17f77da94e54"], -Cell[BoxData["4.7987767072565894`"], "Output", - CellChangeTimes->{3.991331773590704*^9}, +Cell[BoxData["25.5546811138129`"], "Output", + CellChangeTimes->{3.991331773590704*^9, 3.994356504612591*^9}, CellLabel-> - "Out[201]=",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] + "Out[123]=",ExpressionUUID->"22d27693-61a0-4bd8-ac9c-7f2b83605c33"] }, Open ]], Cell[CellGroupData[{ @@ -11523,8 +12379,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11569,68 +12424,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849031047804*^9, - 3.9918490341764317`*^9}},ExpressionUUID->"8a5105db-666c-444e-9451-\ -d3e8d1574bcd"], + CellChangeTimes->{{3.991849031047804*^9, 3.9918490341764317`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 177, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736257057`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3722353092919838`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"57\\\", \\\"\[RightSkeleton]\\\"}], \\\"4598144000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 124, 57, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.99435650466678*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], +In[124]:=",ExpressionUUID->"3ac0f089-4335-454b-b227-abfa1c299e98"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 178, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736361847`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6284176281009414`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 124, 58, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943565046762877`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], +In[124]:=",ExpressionUUID->"24e540cd-a6bd-4ae2-aeb1-beb9069bfffe"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 202, 179, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773644182*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.0345441346180744`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 124, 59, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943565046899767`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], +In[124]:=",ExpressionUUID->"223f5b22-14cb-488f-97a6-11d0fa2a506e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 202, 180, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773653183*^9}, +during this calculation.\"", 2, 124, 60, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.994356504698053*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], +In[124]:=",ExpressionUUID->"18e753ab-a867-491b-8d0c-9e61eaf0b28a"], -Cell[BoxData["15.12281532960454`"], "Output", - CellChangeTimes->{3.991331777337887*^9}, +Cell[BoxData["3.4959766334702134`"], "Output", + CellChangeTimes->{3.991331777337887*^9, 3.9943565138333187`*^9}, CellLabel-> - "Out[202]=",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] + "Out[124]=",ExpressionUUID->"e5aec996-33fe-4f5c-8944-13b68868350c"] }, Open ]], Cell[CellGroupData[{ @@ -11639,22 +12498,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918490375675926`*^9, - 3.991849040901537*^9}},ExpressionUUID->"d0efa798-230b-fa46-b413-\ -76bfd8e40ccb"], - -Cell[BoxData["0.12263596348954131`"], "Output", - CellChangeTimes->{3.9913317773679104`*^9}, + CellChangeTimes->{{3.9918490375675926`*^9, 3.991849040901537*^9}}, CellLabel-> - "Out[203]=",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] + "In[125]:=",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], + +Cell[BoxData["0.03175198612068754`"], "Output", + CellChangeTimes->{3.9913317773679104`*^9, 3.994356513884528*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"013ae986-0349-4679-97a6-f7b811fd9cdb"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918490438339844`*^9, 3.991849046673996*^9}, - 3.9919249287922287`*^9},ExpressionUUID->"f842f74e-f562-934a-9011-\ -6604b8708636"], + 3.9919249287922287`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ @@ -11677,12 +12537,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[205]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], + "In[127]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.9913317774008274`*^9}, +Cell[BoxData["10.032152912597079`"], "Output", + CellChangeTimes->{3.9913317774008274`*^9, 3.9943565139111567`*^9}, CellLabel-> - "Out[205]=",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] + "Out[127]=",ExpressionUUID->"c6f5e94e-953a-459d-9248-aae24c3e7812"] }, Open ]], Cell[CellGroupData[{ @@ -11692,12 +12552,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[207]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], + "In[128]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.9913317774358253`*^9}, +Cell[BoxData["2.0047698823718987`"], "Output", + CellChangeTimes->{3.9913317774358253`*^9, 3.9943565139258204`*^9}, CellLabel-> - "Out[207]=",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] + "Out[128]=",ExpressionUUID->"724b649e-b878-46f9-b0c0-5f0a48aa677f"] }, Open ]], Cell[CellGroupData[{ @@ -11707,12 +12567,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[210]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], + "In[129]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.991331777510603*^9}, +Cell[BoxData["20.112158014524148`"], "Output", + CellChangeTimes->{3.991331777510603*^9, 3.994356513940535*^9}, CellLabel-> - "Out[210]=",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] + "Out[129]=",ExpressionUUID->"e04dc4bd-5c44-41ab-9ff5-24a2b523b725"] }, Open ]], Cell[CellGroupData[{ @@ -11902,12 +12762,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[211]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], + "In[130]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[BoxData["0.041096786108657246`"], "Output", - CellChangeTimes->{3.991331777537592*^9}, +Cell[BoxData["0.008100324314104448`"], "Output", + CellChangeTimes->{3.991331777537592*^9, 3.9943565139614077`*^9}, CellLabel-> - "Out[211]=",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] + "Out[130]=",ExpressionUUID->"2ab67409-b39e-4bda-b62b-8d52a616ce04"] }, Open ]], Cell[CellGroupData[{ @@ -11921,12 +12781,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[212]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], + "In[131]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[BoxData["4.371605972693579`"], "Output", - CellChangeTimes->{3.9913317776362495`*^9}, +Cell[BoxData["9.846768714042216`"], "Output", + CellChangeTimes->{3.9913317776362495`*^9, 3.994356514156061*^9}, CellLabel-> - "Out[212]=",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] + "Out[131]=",ExpressionUUID->"8309c33f-0686-40ac-b543-f794339b5c5c"] }, Open ]], Cell[CellGroupData[{ @@ -12118,12 +12978,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[213]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], + "In[132]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[BoxData["0.013804398425195999`"], "Output", - CellChangeTimes->{3.9913317776511555`*^9}, +Cell[BoxData["0.04839600043513408`"], "Output", + CellChangeTimes->{3.9913317776511555`*^9, 3.9943565141804237`*^9}, CellLabel-> - "Out[213]=",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] + "Out[132]=",ExpressionUUID->"5c3903e6-116c-41fe-a842-1353d0ae0aef"] }, Open ]], Cell[CellGroupData[{ @@ -12137,12 +12997,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[214]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], + "In[133]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[BoxData["7.5428626210616345`"], "Output", - CellChangeTimes->{3.991331777742655*^9}, +Cell[BoxData["4.028470657663142`"], "Output", + CellChangeTimes->{3.991331777742655*^9, 3.994356514365693*^9}, CellLabel-> - "Out[214]=",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] + "Out[133]=",ExpressionUUID->"3bad7398-6647-498c-a40c-d20ed738c278"] }, Open ]], Cell[CellGroupData[{ @@ -12235,12 +13095,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[215]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], + "In[134]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913317777546787`*^9}, +Cell[BoxData["0.06803408589806512`"], "Output", + CellChangeTimes->{3.9913317777546787`*^9, 3.99435651438211*^9}, CellLabel-> - "Out[215]=",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] + "Out[134]=",ExpressionUUID->"cb8ed9dd-076a-4107-80de-b79459062b5a"] }, Open ]], Cell[CellGroupData[{ @@ -12330,12 +13190,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[216]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], + "In[135]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991331777779663*^9}, +Cell[BoxData["0.9319659141019349`"], "Output", + CellChangeTimes->{3.991331777779663*^9, 3.99435651439918*^9}, CellLabel-> - "Out[216]=",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] + "Out[135]=",ExpressionUUID->"b5bf9a14-1013-4d0c-bbe0-ef6ea06fd63c"] }, Open ]], Cell[CellGroupData[{ @@ -12458,12 +13318,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[217]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], + "In[136]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913317778036633`*^9}, +Cell[BoxData["0.06340544905407981`"], "Output", + CellChangeTimes->{3.9913317778036633`*^9, 3.9943565144209023`*^9}, CellLabel-> - "Out[217]=",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] + "Out[136]=",ExpressionUUID->"c73d1af1-6cc0-4382-8239-cb27890a9ddb"] }, Open ]], Cell[CellGroupData[{ @@ -12478,30 +13338,33 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12525,68 +13388,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918490946810665`*^9},ExpressionUUID->"1dec41a6-6752-2041-9d38-\ -804123b5ccd0"], + CellChangeTimes->{3.9918490946810665`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 218, 181, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778296604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.459568573313842`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 137, 61, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994356514443849*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], +In[137]:=",ExpressionUUID->"0ce20d01-bc1e-4645-8223-4b2c94b74577"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 182, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777838663*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.785162836721694`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 137, 62, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.9943565144526243`*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], +In[137]:=",ExpressionUUID->"67faae4e-108b-4220-b389-c679645f5a5c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 183, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778466587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8718093579639622`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 137, 63, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994356514462268*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], +In[137]:=",ExpressionUUID->"13aecec3-fe2f-4cfd-9914-38e8be0fd6f7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 218, 184, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777854885*^9}, +during this calculation.\"", 2, 137, 64, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.9943565144711647`*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], +In[137]:=",ExpressionUUID->"25fc0c51-f5d6-4d7d-a085-aac6c16f5606"], -Cell[BoxData["4.37160597269358`"], "Output", - CellChangeTimes->{3.991331781456501*^9}, +Cell[BoxData["9.846768714042229`"], "Output", + CellChangeTimes->{3.991331781456501*^9, 3.9943565226331778`*^9}, CellLabel-> - "Out[218]=",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] + "Out[137]=",ExpressionUUID->"77b8fae5-ec38-4031-895e-e0a11449d649"] }, Open ]], Cell[CellGroupData[{ @@ -12601,30 +13468,33 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", + RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12648,67 +13518,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99184909912471*^9},ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], + CellChangeTimes->{3.99184909912471*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 219, 185, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331781491499*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.459568573313842`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 138, 65, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.9943565226897287`*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], +In[138]:=",ExpressionUUID->"a95c701b-5048-4a7d-935c-edaa4c002182"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 186, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815004997`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.785162836721694`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 138, 66, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.994356522699868*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], +In[138]:=",ExpressionUUID->"2a83baeb-4c44-4352-b65b-2a07906ee034"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 187, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815094967`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8718093579639622`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 138, 67, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.9943565227097397`*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], +In[138]:=",ExpressionUUID->"0f469ede-cff1-4670-a85c-a5e4a1beed17"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 219, 188, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815164986`*^9}, +during this calculation.\"", 2, 138, 68, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.9943565227184153`*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], +In[138]:=",ExpressionUUID->"48f63a2a-7a82-4f9e-91ee-f6f53588e33a"], -Cell[BoxData["7.54286262106163`"], "Output", - CellChangeTimes->{3.9913317851500416`*^9}, +Cell[BoxData["4.028470657663144`"], "Output", + CellChangeTimes->{3.9913317851500416`*^9, 3.994356530765051*^9}, CellLabel-> - "Out[219]=",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] + "Out[138]=",ExpressionUUID->"d321a0ac-453f-4403-936b-a05278661ccb"] }, Open ]], Cell[CellGroupData[{ @@ -12766,93 +13641,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918491043389053`*^9},ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-\ -b799ae260294"], + CellChangeTimes->{3.9918491043389053`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VVsfB3AJyVBR5ihjIUMOhWT9yonMJWPGOGcTQpJ7DJFy1H0jQ9zU +zRDJEEUkU1LcckuiNBNiS+bx7Ooa3uWP/ezn86zn+a7vWnvtJe8dbMfk5uLi +GsbPyvtku+a2hx3txhnK3Unq20hkPHFLz5teisZPP3yy4r6cXelK9AYk33fA +fQf2IcYrPiHaP8jk+AUvDewKVmwzL70NJUhFv9TE/vOZZFNsSSfKXFDM1sau +7TiZvaDzDkXIx37UwR75/CI6ov4jcrqeFKmHLU0qunJMulFvtG28PrblZLTB +qbZeNNzfMr8Hu3FhRJBV0o9ayPF2hP0+TiKqOmgATRW+WE/HnuCjj8zpkMjV +0rXmIDZfYogLjRpCupycVmtsOZGs1pP1w2ihMxOOYNvIcG5PmIwh2ttCX09s +IldBXIN/AtHdGsUJ7FhlW3ZA2yTK7flT4wT2R4munWEl02jVA0iLxmYc9T9+ +JXEG2f+5oy8ee+oG1837QbPIw649IwmbX0Fjw7TOPCof0NXPxU5nNJttEOOg +Z/TfSiXYWwtdYrUoDtrZFh5Rha2/I2HiRP1PpHHrL5cX2H67ettGTBZQWFIU +5zf2HOs0j4DKImqU45Hn306is/WCRqr8S2joo2mlGHYm6N/xbVtG9IsL63Sw +GQWt9NCSVTDRrpcfjF3y7EpfnAw3qCXeEDyLPfXdIzo1kRuUzJ98ScGOVpuv +LA9aDUtjppWV2On35BUndXhB6bEdWsL+3DHWuJTPC0GmtaSIKu4/8/DoOjE+ +aGJ9m1XGLtW1SdOg+CA7NNbMFrulNnJVYD0/bGZzXt7Gnm9+2ztsIgQq1pEW +x9VIJGoltCGqUQiUG4dvsbG1u+ggbCAMUt7OEXnY/oMPcndqroPUGyilBzuE +u017r9AGOGBnHe6iTiJS4e40myMCCf4hSn478P4QL9a+pomCkEDMlkRs7jtD +8pInRWGNY256OfZW2ha7klFRkD65ffw39lGTlPvtfRvBTCnIKUODRK99Qk9J +vBSD+mkp0X5NEn0tvHzJi18c2thb7wlpkWhstCS/+IA4VL868kwfWyBs4O2e +JnFQkzbzScOmx9vrej2QgJi1KU6W2iSqu7VrvihHCmroeupdO0l0i/wdbhgm +C8c7BRL36ZHooMOFr6fKZGHxut4FFvZYy0bTsiFZaGmWHr+HrXtrh9hWFznQ +PSHza8suvJ/eHpW8xlvAm6UqyrubRDOTfX8Mn98KcX5yFgP6JNp4gl5Vaa0A +jntseieNSDR0S8DvkL8CjOWx9XT3kqimu0NmPEEBouofcljYblbu51WaFIBn +fFPdamPcTz3c7pqOIvQnzdDlEJ5/pHAqRkIJQqrRCd99JLL3FdSw6FeGsUe/ +JC1MSYTCHXScFpUhU6V493VsNXbOboaUCjBlwx+NYHPl0/bHHFYBm8rQpUQz +EpV9dXW6/0QFmuX2Or4/iP9Px9I46bxtIEA5eEZb4n506/cj3qpwKUZ7ROww +ifKPXP1CxagC77W86VDsy979fTx/q8KhNRe9OrAZZ0+Pyr1VBY5PTViiHYlE +GrK4jpiowRVfrj/W2uPzQ5tQq1dUh6ftT0hxJxLJKCTHXhrcAWJ3zeNi3UnU +8L851V/cGhCa4XBmBttt1qWLkNeAiv7kWaYHibJblFT3e2iAysFcGxtPEin4 +1r35+UEDRpILHisdw+stJZWJl5oQn/wrZZhBIlkZOWKrizYY7XdZ3xZIoh0F +YUL/IR1YPP8kenUMibwZ5+c1bHRgsHZ3wCXsTMW0r15uOjBbI/PPxlgSrc67 +V/6MpQP+XXvrlc/i/y17xD6tQgeaT3pV2JzD92mmV5aqIg0agj+2ViXg73vJ +StOZTxcCauefdiaT6Gao0qEHbXogK+nbZ5tPoo5wtDu+wADU9+RHMd+SSN7j +nY174F4IVz47FCYwhJjL1XdlIwAaWrtzxulDSGK0Zo2E93641ryFRy9xCIXR +jLrT1OgQHTCSuP/9EPIeX2jdOHIA9OIOKXKrfEdl+0+tyXltBpo9inWl8d/R +rTn/J6Xp5jDzR6RTy+B39HOf5KuWWEv4yL75N9thGPVwrZ7uP2YNo+MBWWtf +DaOgzcEpcYq20Cmzk4qg/0B3j7c2ZbAPQTut6nJH+w8UOStFqR8/DL9FQ3vA +eQTNW5g6Pve0A7fS5A1mnBFk4Jq6jzx8BMyH7kTkXB9Fb6Sy/Fto9rDJ82Ca +tNEYkr59vqFouwMQxOVczuwYqulTs7IRdoRPiZL9FYXjSK5ryjd83BGK9zhv +MvCcQLSM1NL8Pie4aON+RF1zEmXxzGqmNTuD1sBchgFnElXv0/rMrnWBJXa6 +GlfAFMrc/T+RhZKjUP34g9Dilyn0+ktBAi3RFf7gKNU+N5tGD6xvKIWcdQND +HqPF1sZpNH3iCFcQwx1aBqfe2GjNoHlTVb8JEw/oeRW30yt7BhWNf/p5apcn +iPzK8OaRmEXONwt83IW8gLM/22cyYRZV3rf0XH3BC9q716fdXJpFBjJvfv35 +ywty854UzATMIcU+38+dx49Bx8XR18Nv59CgYIDtjYFjYBjvvJcH5lHHZRsf +MwdvGC18FBSfM4/SWTmCpzu8IdZ4zurn8jxqaFz+5WPuA9vY3cUMRw5a7wYX +aHU+EHOpNzA/m4O2bnr+enODDwQrz2X/m8NB2m3WknyNPlDT77p9MpeD7Ixc +iz8+8YE7LFnQz+eg9M3hL8/86wPPjYyinxZykHTPnfWtH32gqatnvLqcg5Q8 +JDLdKB84C/Zzsk85yMBrooity4CPj0/3vv/GQbevTZ2y2cWA4QWae9MAB216 +O2Msoc+Arj5fw+JBDpo4QHUV7WGAhUiYaMQQB99fXKva9jPAT22BJjLCQeso +ERfRwwzgCRPbpDjNQYNJemtzTuD8xRD+tiUOulwffbzmNgMyM45uVZWk0Amd +qwasIgbYpMY5kNhWxRVr9UsYMMD6RuZKUUjg6lDxwzIGdCg0SIjLUIgdemik +uooBJT/r63/KUihaVSngwVMGbJp9OJitSCH/qy8D739lgOHC1scnNClkvm7I +KLSPAYKqcmJiWhTazuYS1vnGgCzP3if12EOhemUVJAOa92zbsmYnhY7Z5IyX +jzHArVOJzKBRyJn3VNC93wxgJ3Cdu6JPIbNT0iGl4kxYC+Jb1u2n0NOcBIs0 +SSZ0L1oFlmIbtc0osaSZ8MElZ9zchELayi8/mcgxQb58+dI5OoWkPkSZfFFm +grTlX7QRUwqNGvaIC+gxodlkUviKJYWSuXMf+R5hQk9KMmVuj9evJZRp7cAE +/i7/c+3Y8a6sUJoTE/7etWqvnQOFWFWHti0fZcJYSy84OeL+xKrUv7yZMJQ6 +HevkTCHaC2/GPyeZIGUZ1qTtRqEPqcqCiil4/oCgMwd8KHQXCfsNpzKBepdb +XoQdPz7XUnaFCUo7HdQFGRTSMW+J0b/KBFuJKc4r7MtcPjPW2UwQvlE2aEFQ +yDQ49xOrFPf1eMSvcJxCsrIXdxnfZUKoX2pJBPbci+Arq8uZsNe8JK0DO08F +WV+uZEJRmpdetD+FFnt6mvLrmBD4rv/piwAKVVnJFLW3MiEm/eUEPYhCl35z +86a/YEL5cupYCrZ30cgxlzY8/jNBqxt7A0+dzOBrJhi6NcSHBFMosN45+dd7 +JlQJ3vBPCaGQotpf4UokEwrzf4iXhVLo94czb38MMeGaAcNrHLuDzdS+N8wE +fX+5iR2nKBTTrztiMMYELUuZ98XYnzPfutvOMmFzavP762EUSlsjciByFQH3 +3R4ku4RTqGGmxzVsNQGPMjpV0rG/95SEBvESEFK3+OYVtlEVPdd7LQHrDh/0 +N/4Dnzcv1n8WIgTwKvNd2cTC/a0OiB7YSEAha7nDDHvPblFVJEZAgXK6YiR2 +inCpI02KAK5hF77ulfG63goZeQKirceb0iMoRBSUtoopEvB+ziGvCTslJaJ3 +vTIBtHXzV0exh4iNwjyqBOS/KnpsHInHN5r5jWnjfs2Vy5+w65Y2xg7pECB6 +4e+4JWzyR19Gny4BH5IZEgpRFDJsimzu0ieg6GJYDIE9GHhX7hEQsC85xWAQ +e51zlN7D/QQcNGS7rIqmkIHJQasKOgGr/xFLksW+LPUtouAgAQGsMc0j2DU8 +91JyLAh4Y6yUFYg9MBlVeM2KAMbWL3JsbP1nYu+SDhFgolrqVontXfFt9IId +AZt/1Er+i5104x73OXsCYF5juAf7W6i5drgzAYvdOk94zlBI2EPcLOQoXp9V +7QtxbH3zAXd/NwJGtFK/b8NO2nLmkocXAY26iq5m2DUCFnnO3gRkkV0VDtjf +5sVr7RgElKo+l/FZyesfeG1FEBDmy8kMXslrKx8y9SNghu6pGoXt/fDMIvgT +0FC41MZeyc+z2LQnkACyqvN88kp+koS6XhABgp3vrDNX8lmD+7RCCLDP5VfP +xRZiVDirhhIQyecnU4i92zYmWDGMgIcqM3JlK/mGlgmy4QQM+hTo3cdOVJbM +kmAR4OZ11rMau3oDWSkSScCGpbgbtdj9/1W8EIwmIMajeKx+Jf97TD9vDAF1 +3+ZtH2HvemP5czmWAELd99mK/w8OwOe2 "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12866,105 +13742,105 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV1Hk4VVsfB3AJyVBR5ihjIUMOhWT9yonMJWPGOGcTQpJ7DJFy1H0jQ9zU +zRDJEEUkU1LcckuiNBNiS+bx7Ooa3uWP/ezn86zn+a7vWnvtJe8dbMfk5uLi +GsbPyvtku+a2hx3txhnK3Unq20hkPHFLz5teisZPP3yy4r6cXelK9AYk33fA +fQf2IcYrPiHaP8jk+AUvDewKVmwzL70NJUhFv9TE/vOZZFNsSSfKXFDM1sau +7TiZvaDzDkXIx37UwR75/CI6ov4jcrqeFKmHLU0qunJMulFvtG28PrblZLTB +qbZeNNzfMr8Hu3FhRJBV0o9ayPF2hP0+TiKqOmgATRW+WE/HnuCjj8zpkMjV +0rXmIDZfYogLjRpCupycVmtsOZGs1pP1w2ihMxOOYNvIcG5PmIwh2ttCX09s +IldBXIN/AtHdGsUJ7FhlW3ZA2yTK7flT4wT2R4munWEl02jVA0iLxmYc9T9+ +JXEG2f+5oy8ee+oG1837QbPIw649IwmbX0Fjw7TOPCof0NXPxU5nNJttEOOg +Z/TfSiXYWwtdYrUoDtrZFh5Rha2/I2HiRP1PpHHrL5cX2H67ettGTBZQWFIU +5zf2HOs0j4DKImqU45Hn306is/WCRqr8S2joo2mlGHYm6N/xbVtG9IsL63Sw +GQWt9NCSVTDRrpcfjF3y7EpfnAw3qCXeEDyLPfXdIzo1kRuUzJ98ScGOVpuv +LA9aDUtjppWV2On35BUndXhB6bEdWsL+3DHWuJTPC0GmtaSIKu4/8/DoOjE+ +aGJ9m1XGLtW1SdOg+CA7NNbMFrulNnJVYD0/bGZzXt7Gnm9+2ztsIgQq1pEW +x9VIJGoltCGqUQiUG4dvsbG1u+ggbCAMUt7OEXnY/oMPcndqroPUGyilBzuE +u017r9AGOGBnHe6iTiJS4e40myMCCf4hSn478P4QL9a+pomCkEDMlkRs7jtD +8pInRWGNY256OfZW2ha7klFRkD65ffw39lGTlPvtfRvBTCnIKUODRK99Qk9J +vBSD+mkp0X5NEn0tvHzJi18c2thb7wlpkWhstCS/+IA4VL868kwfWyBs4O2e +JnFQkzbzScOmx9vrej2QgJi1KU6W2iSqu7VrvihHCmroeupdO0l0i/wdbhgm +C8c7BRL36ZHooMOFr6fKZGHxut4FFvZYy0bTsiFZaGmWHr+HrXtrh9hWFznQ +PSHza8suvJ/eHpW8xlvAm6UqyrubRDOTfX8Mn98KcX5yFgP6JNp4gl5Vaa0A +jntseieNSDR0S8DvkL8CjOWx9XT3kqimu0NmPEEBouofcljYblbu51WaFIBn +fFPdamPcTz3c7pqOIvQnzdDlEJ5/pHAqRkIJQqrRCd99JLL3FdSw6FeGsUe/ +JC1MSYTCHXScFpUhU6V493VsNXbOboaUCjBlwx+NYHPl0/bHHFYBm8rQpUQz +EpV9dXW6/0QFmuX2Or4/iP9Px9I46bxtIEA5eEZb4n506/cj3qpwKUZ7ROww +ifKPXP1CxagC77W86VDsy979fTx/q8KhNRe9OrAZZ0+Pyr1VBY5PTViiHYlE +GrK4jpiowRVfrj/W2uPzQ5tQq1dUh6ftT0hxJxLJKCTHXhrcAWJ3zeNi3UnU +8L851V/cGhCa4XBmBttt1qWLkNeAiv7kWaYHibJblFT3e2iAysFcGxtPEin4 +1r35+UEDRpILHisdw+stJZWJl5oQn/wrZZhBIlkZOWKrizYY7XdZ3xZIoh0F +YUL/IR1YPP8kenUMibwZ5+c1bHRgsHZ3wCXsTMW0r15uOjBbI/PPxlgSrc67 +V/6MpQP+XXvrlc/i/y17xD6tQgeaT3pV2JzD92mmV5aqIg0agj+2ViXg73vJ +StOZTxcCauefdiaT6Gao0qEHbXogK+nbZ5tPoo5wtDu+wADU9+RHMd+SSN7j +nY174F4IVz47FCYwhJjL1XdlIwAaWrtzxulDSGK0Zo2E93641ryFRy9xCIXR +jLrT1OgQHTCSuP/9EPIeX2jdOHIA9OIOKXKrfEdl+0+tyXltBpo9inWl8d/R +rTn/J6Xp5jDzR6RTy+B39HOf5KuWWEv4yL75N9thGPVwrZ7uP2YNo+MBWWtf +DaOgzcEpcYq20Cmzk4qg/0B3j7c2ZbAPQTut6nJH+w8UOStFqR8/DL9FQ3vA +eQTNW5g6Pve0A7fS5A1mnBFk4Jq6jzx8BMyH7kTkXB9Fb6Sy/Fto9rDJ82Ca +tNEYkr59vqFouwMQxOVczuwYqulTs7IRdoRPiZL9FYXjSK5ryjd83BGK9zhv +MvCcQLSM1NL8Pie4aON+RF1zEmXxzGqmNTuD1sBchgFnElXv0/rMrnWBJXa6 +GlfAFMrc/T+RhZKjUP34g9Dilyn0+ktBAi3RFf7gKNU+N5tGD6xvKIWcdQND +HqPF1sZpNH3iCFcQwx1aBqfe2GjNoHlTVb8JEw/oeRW30yt7BhWNf/p5apcn +iPzK8OaRmEXONwt83IW8gLM/22cyYRZV3rf0XH3BC9q716fdXJpFBjJvfv35 +ywty854UzATMIcU+38+dx49Bx8XR18Nv59CgYIDtjYFjYBjvvJcH5lHHZRsf +MwdvGC18FBSfM4/SWTmCpzu8IdZ4zurn8jxqaFz+5WPuA9vY3cUMRw5a7wYX +aHU+EHOpNzA/m4O2bnr+enODDwQrz2X/m8NB2m3WknyNPlDT77p9MpeD7Ixc +iz8+8YE7LFnQz+eg9M3hL8/86wPPjYyinxZykHTPnfWtH32gqatnvLqcg5Q8 +JDLdKB84C/Zzsk85yMBrooity4CPj0/3vv/GQbevTZ2y2cWA4QWae9MAB216 +O2Msoc+Arj5fw+JBDpo4QHUV7WGAhUiYaMQQB99fXKva9jPAT22BJjLCQeso +ERfRwwzgCRPbpDjNQYNJemtzTuD8xRD+tiUOulwffbzmNgMyM45uVZWk0Amd +qwasIgbYpMY5kNhWxRVr9UsYMMD6RuZKUUjg6lDxwzIGdCg0SIjLUIgdemik +uooBJT/r63/KUihaVSngwVMGbJp9OJitSCH/qy8D739lgOHC1scnNClkvm7I +KLSPAYKqcmJiWhTazuYS1vnGgCzP3if12EOhemUVJAOa92zbsmYnhY7Z5IyX +jzHArVOJzKBRyJn3VNC93wxgJ3Cdu6JPIbNT0iGl4kxYC+Jb1u2n0NOcBIs0 +SSZ0L1oFlmIbtc0osaSZ8MElZ9zchELayi8/mcgxQb58+dI5OoWkPkSZfFFm +grTlX7QRUwqNGvaIC+gxodlkUviKJYWSuXMf+R5hQk9KMmVuj9evJZRp7cAE +/i7/c+3Y8a6sUJoTE/7etWqvnQOFWFWHti0fZcJYSy84OeL+xKrUv7yZMJQ6 +HevkTCHaC2/GPyeZIGUZ1qTtRqEPqcqCiil4/oCgMwd8KHQXCfsNpzKBepdb +XoQdPz7XUnaFCUo7HdQFGRTSMW+J0b/KBFuJKc4r7MtcPjPW2UwQvlE2aEFQ +yDQ49xOrFPf1eMSvcJxCsrIXdxnfZUKoX2pJBPbci+Arq8uZsNe8JK0DO08F +WV+uZEJRmpdetD+FFnt6mvLrmBD4rv/piwAKVVnJFLW3MiEm/eUEPYhCl35z +86a/YEL5cupYCrZ30cgxlzY8/jNBqxt7A0+dzOBrJhi6NcSHBFMosN45+dd7 +JlQJ3vBPCaGQotpf4UokEwrzf4iXhVLo94czb38MMeGaAcNrHLuDzdS+N8wE +fX+5iR2nKBTTrztiMMYELUuZ98XYnzPfutvOMmFzavP762EUSlsjciByFQH3 +3R4ku4RTqGGmxzVsNQGPMjpV0rG/95SEBvESEFK3+OYVtlEVPdd7LQHrDh/0 +N/4Dnzcv1n8WIgTwKvNd2cTC/a0OiB7YSEAha7nDDHvPblFVJEZAgXK6YiR2 +inCpI02KAK5hF77ulfG63goZeQKirceb0iMoRBSUtoopEvB+ziGvCTslJaJ3 +vTIBtHXzV0exh4iNwjyqBOS/KnpsHInHN5r5jWnjfs2Vy5+w65Y2xg7pECB6 +4e+4JWzyR19Gny4BH5IZEgpRFDJsimzu0ieg6GJYDIE9GHhX7hEQsC85xWAQ +e51zlN7D/QQcNGS7rIqmkIHJQasKOgGr/xFLksW+LPUtouAgAQGsMc0j2DU8 +91JyLAh4Y6yUFYg9MBlVeM2KAMbWL3JsbP1nYu+SDhFgolrqVontXfFt9IId +AZt/1Er+i5104x73OXsCYF5juAf7W6i5drgzAYvdOk94zlBI2EPcLOQoXp9V +7QtxbH3zAXd/NwJGtFK/b8NO2nLmkocXAY26iq5m2DUCFnnO3gRkkV0VDtjf +5sVr7RgElKo+l/FZyesfeG1FEBDmy8kMXslrKx8y9SNghu6pGoXt/fDMIvgT +0FC41MZeyc+z2LQnkACyqvN88kp+koS6XhABgp3vrDNX8lmD+7RCCLDP5VfP +xRZiVDirhhIQyecnU4i92zYmWDGMgIcqM3JlK/mGlgmy4QQM+hTo3cdOVJbM +kmAR4OZ11rMau3oDWSkSScCGpbgbtdj9/1W8EIwmIMajeKx+Jf97TD9vDAF1 +3+ZtH2HvemP5czmWAELd99mK/w8OwOe2 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "PlotRange" -> {{0, 180}, {0.6610315104200476, 1.468198561679594}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.661031510420049}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12976,21 +13852,20 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6610315104200476, 1.468198561679594}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.661031510420049}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13004,103 +13879,104 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV1Hk4VVsfB3AJyVBR5ihjIUMOhWT9yonMJWPGOGcTQpJ7DJFy1H0jQ9zU +zRDJEEUkU1LcckuiNBNiS+bx7Ooa3uWP/ezn86zn+a7vWnvtJe8dbMfk5uLi +GsbPyvtku+a2hx3txhnK3Unq20hkPHFLz5teisZPP3yy4r6cXelK9AYk33fA +fQf2IcYrPiHaP8jk+AUvDewKVmwzL70NJUhFv9TE/vOZZFNsSSfKXFDM1sau +7TiZvaDzDkXIx37UwR75/CI6ov4jcrqeFKmHLU0qunJMulFvtG28PrblZLTB +qbZeNNzfMr8Hu3FhRJBV0o9ayPF2hP0+TiKqOmgATRW+WE/HnuCjj8zpkMjV +0rXmIDZfYogLjRpCupycVmtsOZGs1pP1w2ihMxOOYNvIcG5PmIwh2ttCX09s +IldBXIN/AtHdGsUJ7FhlW3ZA2yTK7flT4wT2R4munWEl02jVA0iLxmYc9T9+ +JXEG2f+5oy8ee+oG1837QbPIw649IwmbX0Fjw7TOPCof0NXPxU5nNJttEOOg +Z/TfSiXYWwtdYrUoDtrZFh5Rha2/I2HiRP1PpHHrL5cX2H67ettGTBZQWFIU +5zf2HOs0j4DKImqU45Hn306is/WCRqr8S2joo2mlGHYm6N/xbVtG9IsL63Sw +GQWt9NCSVTDRrpcfjF3y7EpfnAw3qCXeEDyLPfXdIzo1kRuUzJ98ScGOVpuv +LA9aDUtjppWV2On35BUndXhB6bEdWsL+3DHWuJTPC0GmtaSIKu4/8/DoOjE+ +aGJ9m1XGLtW1SdOg+CA7NNbMFrulNnJVYD0/bGZzXt7Gnm9+2ztsIgQq1pEW +x9VIJGoltCGqUQiUG4dvsbG1u+ggbCAMUt7OEXnY/oMPcndqroPUGyilBzuE +u017r9AGOGBnHe6iTiJS4e40myMCCf4hSn478P4QL9a+pomCkEDMlkRs7jtD +8pInRWGNY256OfZW2ha7klFRkD65ffw39lGTlPvtfRvBTCnIKUODRK99Qk9J +vBSD+mkp0X5NEn0tvHzJi18c2thb7wlpkWhstCS/+IA4VL868kwfWyBs4O2e +JnFQkzbzScOmx9vrej2QgJi1KU6W2iSqu7VrvihHCmroeupdO0l0i/wdbhgm +C8c7BRL36ZHooMOFr6fKZGHxut4FFvZYy0bTsiFZaGmWHr+HrXtrh9hWFznQ +PSHza8suvJ/eHpW8xlvAm6UqyrubRDOTfX8Mn98KcX5yFgP6JNp4gl5Vaa0A +jntseieNSDR0S8DvkL8CjOWx9XT3kqimu0NmPEEBouofcljYblbu51WaFIBn +fFPdamPcTz3c7pqOIvQnzdDlEJ5/pHAqRkIJQqrRCd99JLL3FdSw6FeGsUe/ +JC1MSYTCHXScFpUhU6V493VsNXbOboaUCjBlwx+NYHPl0/bHHFYBm8rQpUQz +EpV9dXW6/0QFmuX2Or4/iP9Px9I46bxtIEA5eEZb4n506/cj3qpwKUZ7ROww +ifKPXP1CxagC77W86VDsy979fTx/q8KhNRe9OrAZZ0+Pyr1VBY5PTViiHYlE +GrK4jpiowRVfrj/W2uPzQ5tQq1dUh6ftT0hxJxLJKCTHXhrcAWJ3zeNi3UnU +8L851V/cGhCa4XBmBttt1qWLkNeAiv7kWaYHibJblFT3e2iAysFcGxtPEin4 +1r35+UEDRpILHisdw+stJZWJl5oQn/wrZZhBIlkZOWKrizYY7XdZ3xZIoh0F +YUL/IR1YPP8kenUMibwZ5+c1bHRgsHZ3wCXsTMW0r15uOjBbI/PPxlgSrc67 +V/6MpQP+XXvrlc/i/y17xD6tQgeaT3pV2JzD92mmV5aqIg0agj+2ViXg73vJ +StOZTxcCauefdiaT6Gao0qEHbXogK+nbZ5tPoo5wtDu+wADU9+RHMd+SSN7j +nY174F4IVz47FCYwhJjL1XdlIwAaWrtzxulDSGK0Zo2E93641ryFRy9xCIXR +jLrT1OgQHTCSuP/9EPIeX2jdOHIA9OIOKXKrfEdl+0+tyXltBpo9inWl8d/R +rTn/J6Xp5jDzR6RTy+B39HOf5KuWWEv4yL75N9thGPVwrZ7uP2YNo+MBWWtf +DaOgzcEpcYq20Cmzk4qg/0B3j7c2ZbAPQTut6nJH+w8UOStFqR8/DL9FQ3vA +eQTNW5g6Pve0A7fS5A1mnBFk4Jq6jzx8BMyH7kTkXB9Fb6Sy/Fto9rDJ82Ca +tNEYkr59vqFouwMQxOVczuwYqulTs7IRdoRPiZL9FYXjSK5ryjd83BGK9zhv +MvCcQLSM1NL8Pie4aON+RF1zEmXxzGqmNTuD1sBchgFnElXv0/rMrnWBJXa6 +GlfAFMrc/T+RhZKjUP34g9Dilyn0+ktBAi3RFf7gKNU+N5tGD6xvKIWcdQND +HqPF1sZpNH3iCFcQwx1aBqfe2GjNoHlTVb8JEw/oeRW30yt7BhWNf/p5apcn +iPzK8OaRmEXONwt83IW8gLM/22cyYRZV3rf0XH3BC9q716fdXJpFBjJvfv35 +ywty854UzATMIcU+38+dx49Bx8XR18Nv59CgYIDtjYFjYBjvvJcH5lHHZRsf +MwdvGC18FBSfM4/SWTmCpzu8IdZ4zurn8jxqaFz+5WPuA9vY3cUMRw5a7wYX +aHU+EHOpNzA/m4O2bnr+enODDwQrz2X/m8NB2m3WknyNPlDT77p9MpeD7Ixc +iz8+8YE7LFnQz+eg9M3hL8/86wPPjYyinxZykHTPnfWtH32gqatnvLqcg5Q8 +JDLdKB84C/Zzsk85yMBrooity4CPj0/3vv/GQbevTZ2y2cWA4QWae9MAB216 +O2Msoc+Arj5fw+JBDpo4QHUV7WGAhUiYaMQQB99fXKva9jPAT22BJjLCQeso +ERfRwwzgCRPbpDjNQYNJemtzTuD8xRD+tiUOulwffbzmNgMyM45uVZWk0Amd +qwasIgbYpMY5kNhWxRVr9UsYMMD6RuZKUUjg6lDxwzIGdCg0SIjLUIgdemik +uooBJT/r63/KUihaVSngwVMGbJp9OJitSCH/qy8D739lgOHC1scnNClkvm7I +KLSPAYKqcmJiWhTazuYS1vnGgCzP3if12EOhemUVJAOa92zbsmYnhY7Z5IyX +jzHArVOJzKBRyJn3VNC93wxgJ3Cdu6JPIbNT0iGl4kxYC+Jb1u2n0NOcBIs0 +SSZ0L1oFlmIbtc0osaSZ8MElZ9zchELayi8/mcgxQb58+dI5OoWkPkSZfFFm +grTlX7QRUwqNGvaIC+gxodlkUviKJYWSuXMf+R5hQk9KMmVuj9evJZRp7cAE +/i7/c+3Y8a6sUJoTE/7etWqvnQOFWFWHti0fZcJYSy84OeL+xKrUv7yZMJQ6 +HevkTCHaC2/GPyeZIGUZ1qTtRqEPqcqCiil4/oCgMwd8KHQXCfsNpzKBepdb +XoQdPz7XUnaFCUo7HdQFGRTSMW+J0b/KBFuJKc4r7MtcPjPW2UwQvlE2aEFQ +yDQ49xOrFPf1eMSvcJxCsrIXdxnfZUKoX2pJBPbci+Arq8uZsNe8JK0DO08F +WV+uZEJRmpdetD+FFnt6mvLrmBD4rv/piwAKVVnJFLW3MiEm/eUEPYhCl35z +86a/YEL5cupYCrZ30cgxlzY8/jNBqxt7A0+dzOBrJhi6NcSHBFMosN45+dd7 +JlQJ3vBPCaGQotpf4UokEwrzf4iXhVLo94czb38MMeGaAcNrHLuDzdS+N8wE +fX+5iR2nKBTTrztiMMYELUuZ98XYnzPfutvOMmFzavP762EUSlsjciByFQH3 +3R4ku4RTqGGmxzVsNQGPMjpV0rG/95SEBvESEFK3+OYVtlEVPdd7LQHrDh/0 +N/4Dnzcv1n8WIgTwKvNd2cTC/a0OiB7YSEAha7nDDHvPblFVJEZAgXK6YiR2 +inCpI02KAK5hF77ulfG63goZeQKirceb0iMoRBSUtoopEvB+ziGvCTslJaJ3 +vTIBtHXzV0exh4iNwjyqBOS/KnpsHInHN5r5jWnjfs2Vy5+w65Y2xg7pECB6 +4e+4JWzyR19Gny4BH5IZEgpRFDJsimzu0ieg6GJYDIE9GHhX7hEQsC85xWAQ +e51zlN7D/QQcNGS7rIqmkIHJQasKOgGr/xFLksW+LPUtouAgAQGsMc0j2DU8 +91JyLAh4Y6yUFYg9MBlVeM2KAMbWL3JsbP1nYu+SDhFgolrqVontXfFt9IId +AZt/1Er+i5104x73OXsCYF5juAf7W6i5drgzAYvdOk94zlBI2EPcLOQoXp9V +7QtxbH3zAXd/NwJGtFK/b8NO2nLmkocXAY26iq5m2DUCFnnO3gRkkV0VDtjf +5sVr7RgElKo+l/FZyesfeG1FEBDmy8kMXslrKx8y9SNghu6pGoXt/fDMIvgT +0FC41MZeyc+z2LQnkACyqvN88kp+koS6XhABgp3vrDNX8lmD+7RCCLDP5VfP +xRZiVDirhhIQyecnU4i92zYmWDGMgIcqM3JlK/mGlgmy4QQM+hTo3cdOVJbM +kmAR4OZ11rMau3oDWSkSScCGpbgbtdj9/1W8EIwmIMajeKx+Jf97TD9vDAF1 +3+ZtH2HvemP5czmWAELd99mK/w8OwOe2 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6610315104200476, 1.468198561679594}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.661031510420049}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13110,7 +13986,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6044061540843444}, + AxesOrigin->{0, 0.661031510420049}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13138,7 +14015,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6610315104200476, 1.468198561679594}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13146,9 +14024,9 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913320330871353`*^9}, + CellChangeTimes->{3.9913320330871353`*^9, 3.994357114413371*^9}, CellLabel-> - "Out[220]=",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] + "Out[139]=",ExpressionUUID->"6a770377-a62d-4d80-af27-196387642b51"] }, Open ]], Cell[CellGroupData[{ @@ -13163,30 +14041,33 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{ - UnderoverscriptBox["\[Sum]", - RowBox[{"n", "=", "0"}], "100"], - RowBox[{ - SuperscriptBox[ - RowBox[{"(", - FractionBox[ - RowBox[{"2", - RowBox[{"(", - RowBox[{ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"n", "=", "0"}], "100"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + FractionBox[ + RowBox[{"2", + RowBox[{"(", + RowBox[{ RowBox[{"-", FractionBox["1", "Cw"]}], "+", FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y"}], - "2"], ")"}], - RowBox[{"2", "*", "n"}]], "*", - SuperscriptBox[ - RowBox[{"(", - FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + "2"], ")"}], + RowBox[{"2", "*", "n"}]], "*", + SuperscriptBox[ + RowBox[{"(", + FractionBox["1", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}], ")"}]}], ")"}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -13211,205 +14092,179 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918491076725483`*^9, - 3.9918491120260525`*^9}},ExpressionUUID->"cbec275e-4d01-7747-9ece-\ -7fa9a2a651b1"], + CellChangeTimes->{{3.9918491076725483`*^9, 3.9918491120260525`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2976471457269651`*^-270\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.3446404364624925`*^-264\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 221, - 189, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033325203*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994357114607316*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], +In[140]:=",ExpressionUUID->"f1b10c4b-d0ca-48ef-80c5-037b8ef700ce"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.376858869110442`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.429383595000662`*^-275\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 221, 190, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913320333342056`*^9}, + 140, 70, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994357114616349*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], +In[140]:=",ExpressionUUID->"e8eef9ed-2aea-4da3-9e03-bd26268972a6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.193593532260836`*^-293\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.517189655128067`*^-286\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 221, 191, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033342205*^9}, + 2, 140, 71, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994357114625022*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], +In[140]:=",ExpressionUUID->"782e5b7c-3277-447f-adf9-b3d9a03ba285"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 221, 192, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033351204*^9}, +during this calculation.\"", 2, 140, 72, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.9943571146348257`*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], +In[140]:=",ExpressionUUID->"1fa8893b-e5f7-422c-90dc-d9a93570882a"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VA8XB3CRNSnZt1lsbfZkDDPOsYYkhGxZQqVFiihtKLtkSUkLSalk +mblFlsqWaFH9LIlCoVRIZS3y3veveT7PPPfembnn+z136Nv3OwXy8vDwGC7i +4fn/61RvS6NqcoFJxOr8hSE7S5P2q7JHTLtiQFlOyWAuUQVQ6tV22a4MEN8w +NtuauA7CHe685evKh9GYCyqlieYgPiaTMfuWC/8ZNG+NTNwCfTX2+yfe1oN1 +okDoiwR/sFL99uHn2//Ae8OrmpVxoTD7lpE1/vYT7JqSarh29BQ0mBcWvMn/ +DV4azoqvFc+BYl/l5+0a88CSGvJoPnAFJPf63BE058PAnZI/Voldhwxdq2p7 +FyHspfcthO8qhHfZOrU/ly9F6+9qOqWSRZBccPIVr5w4/noroD+UWQK2+kEr +pFTEsa1fQ+FsXgkINTq5rNQUx2+L+GJ0ikvg9IBaz0ZTcez3Vn/i3lQCx5Rf +fD4XJI5HiyZ6LWdKIDhP9p96lTjObP7qEeNRCo6XORobPVegatbmJBPRMpA5 +N5CYeUUCP6SnPuF/WAaya++fnrkpgTOfP0YP15WBfH3cyW1lEvhyUtT1aVMZ +UMZXH1rZIIGyUbnmR16XgZpdiG/1sAROwIJKyUAZrFs8bzCwThInffqjPIU5 +sDlMelDvmSS6udSvq3PkgMOS4d4LbZJ40oL1Xc2VA075le/m3kti5VKpojgP +Dri+9nrV9EMS60+7mbH8ObBN43qVh5QULhMva4wI48CeQe30GF8pDOh61aJ9 +ngPxzjYm/01JofrakOJrnRyQv9cqz7tIGkNrHtR0d3OgRMJ5WneJNI42XpJe +1seBzv+8y9Kp0hgYp3k76AsHVB3DlB2tpVGj7a3Z52kO1G/KFXh9URo5Hzly +8zJcmLeabH3JkkGHjCnbPGcupN2MLJq3kkH/lcKuZm5cUBXgSdB0lMHTTqGF +fZ5csHsiYnomUAYf7rJTEvXnQo45jbBLlUG5/IMuGge4YIgbLzzvk0EqQ2pR +UgoXQpnXfFpiZNFcQWK26jEXbPPEJjamyKJUHLhm1HNBWfBYQmuWLMqV+2QH +PuHC63ZXTtstWfwQY/Fi4RkXtEJE+XpbZfG9zIEZ3k4uDN+MuPlLXg5tludn +WXzngpek/agCIYfmfVYt5SsIWHe0OvpqjRxqcy6ZLpEiQOTTKml6kxzKWX0v +9JQhoLKUD9TfyWF24R8YVyBAemNlms6CHIqPF94aViXgdbSqvuVGeayRMayQ +NiDA4sefyOABeeyug6+7XQg4Yn1uTd2IPN479LJVfysBJdc0uyWm5LErYabr +jxsBss6+zEohBRx4qr/tqBcBIw+eTPNpKeDJZSPr7P0JyIxJC7t4WAFn3OMz +jUMIaO5ZrToSrYAPt0ryNR8gYE6/oc0kWQEVC/nyHEIJ2PFlUm/wigISlwMC +XMMJMLLz/KnVoIB3V/9aqX+MgE9S6sGNSxXR4J2WKjOeAJn9j5VkZBRRsUWY +SEggwK7Z7WUQTRFfnGIfaU8koDwyWWPZOkVc+d6lxDeFgKS+8W/uboo4sl62 +dWM6AXq3q3f+yFdENkif2JdDwE5eFxmzu4pYNenbHnWJgMueY03n7iviZzWV +fWmXCRAQo6sbNSvigu78roKrBHQfjBs8PaqIVyXfXM3NJyCa5egnb6iEifRP +dwduE2DtffUXw0wJFUUOcl/eIUAs6vspFzslpB9GH6KIPH9D7M00XyUU/Mfl +Higm4IFt1XeBRCUcIGa2VZURcHKv4HHVTCX8t/FYVTSHAKtUZzGzK0por3mx +yYJLQPubMZ3jHCW8snr450OCgHE3lfDf75RQRFuLOFZOQEVkiKD4oBL6/Gi8 +Q68g4MTlh9laY0o4GF7sUU9atH9rdRAvBRNPfP8y9YCAtkU37OJFKdjqF/U0 +qZKAHJVfHwqkKZjweshfvoqAlTtTePrXUDDmXtlbjWoCxhLepc/rU3DDgC+n +lPS9O+oqCkDBELEIO60aAszGai1dt1CQYEc+pzwkwPvQZNKLoxS0Zd1d+vIR +AWoXzBS/xVIw6p6ThNbj/8/P2WLBNPJ8wi8HkkhHzq1+bVZAQZUAsW+MWgJM +KRF+viUUZPmaKieQFsLGX8cfULBNmbamnXTWKW+pyhcU9Gt9WuxTR4DXjaKb +nZ0UPHJCUCOXtPLTGcZEPwWVo/tPdJP+OmzZIv6dgk0Z6YXi9QSUiWR6aE9S +8HqjR6EF6QiN/u92CxS8f/T4yVDSJvaax3cLU7FoP0v3Kmn+kEixBAkqvrzd +87CR9Iv0p7k3lKj4+1Se+hfSmYSkbsNKKgYUvtnL30CAR4dffb8uFduWVKRT +SdOnS7b8M6Yie+ri+fWkh2XnBhWsqPh2uvHYBtKlRjbhTAcqLoycsnQhHe51 +XnCrBxVl51R+eZNmnRjIDgugYtq536cCSPPl6azJCKbijX1mc4Gkn9Udry49 +TMUdsX5e/qTTBp7ZvYyhYjb1+g0v0lv5ZXu/pZBu9HjnSJqyMnC/0AUq2uCH +GTPSQ9ZcHvVrVPyRF8WvQ/ru7oV08yIqahlc5pEjHZpip+J3n4qdZxO+z5Pf +16jk4r0Tj6nYcSz3aS9pi7et82PNVPygEy7+iLQ9z+INPv9R8fUbWsdF0m6r +mWmveqh4yrBa4iBpf6fgdzBExQMa21utSAcfva5cNkbF6e3rBGRJHy7o2kOb +oWL0iU01Q+T9szpKPxnFT0PF5J7CcNLPl9VcNxShoZ9neh+TtEOBa/O4GA1j +XkrkzJLz4fkyWdxPloYdPqKXg0n3+6kbyCnR0PXW8yEV0jumaj3e0GlY9/Fr +eQc5fyHUqeuma2mo4NP3+//zOUmkNc9q01Dyr8D2TnJ+I63XjnL0abjXQMsr +knTsAV8DZRMahiyozVaQ857T8KyZ15GGArZZU8JkHqhugaNVLjTUlkkdyiLz +UjCyIB7qQcNber+CKKRLpdZ7DvjTsLiwnqFG5q1xZ+5oQzgNxe/QhEXIfNrM +MVccO0peb174SSSZ39a0dgP9KBrGBiyiDZN5f1cpHFWQSMObb/5WPLhP5nNJ +2IrYyzSkO0Rk6JL9EJonxmBfo+H3JJWgeLI/ZvRve07eoKG8TPnwO7Jf+Lx7 +CwJLadj6NPFLGNk/smXWDKt6Gn4W/CNwiuynKxYDnv+aaPjr4scNj+6SeXp3 +PKr8OQ3b0quNp8g+0+QlWtQ7aDj1xNPUi+w7M2clL8FhGmY5iw7zFBKwd+Zn +VPNSOg6FFTUU55LzcmCH9OcVdJwTHqjNJftU6Ft3EZ8sHW++ujR55goBN3oa +Ok2U6Zisay3qQ/Zx76MsjfsGdHxs/lSp/TwBm2OZXdd86Hh6/UH7JWfI+f1X +vO9xAB13WJqfrUsm+yRcme9DEB0HMweVw5IISNi1REs2jI7fVp+xaSX3R+3G +D6dSE+hoc977iWsMuQ9WRGsf5ZAOgEVV5P7hSZ5szC6no6H3PVODQ+Tvzbfb +o7yaju/3Mn6WkPtqz6RT7M8ndBSfzirIIvdbQZdqz85uOgbarTxruJvct7nN +cc58yuil90W4k9yPs2uX92q6KGNXJuXgMSBg6op89DoPZRw9cMIsk03AxDI1 +VaaPMt51e9lz05i8f7+Zuy2ClJH+yDekkUHuv2r/KY/jyvh5yZUt77TJfG+s +EEu4oYwdIiHn91DJedvjDZ8mlZHfvO+FyRwXLnzY9enLH2U8ZWls8muWC+c2 +h8aOLiijmdooN3+aC6nrEp7PCKvgxPLG4j+/uBDzl7N1GUUF7286pBT/lQt7 +kvlDWFYqSCc0EyTI5xFW0d288+dVsCztZ41gMRd6aEW5lpdUMKpRQfvMHS5E +nr99dSJXBa/UX2Mtv8WFiuibl51uq+AblWntZde5oOeWly1Wo4L6Fx2uj2dz +YTX/ubS4jyoo5tEnZ36aC9I+R6PCNVRxM9+Usa47F36usPV1rVfF+Yynt5Lm +ODCY4ut6UFAdHzKlKsXlOGDzI8JmyGAlTo7VSw2uLoMRf6HQeydXYdS486Gt +yiXk874Mb3z9asyKEv60o7cIVrxUTy37sQYXy1iJiN+7DYoJpQ4GBhoY0lcx +WOxWCNlrmcsldmpihml94ajGDXgmb7r+d7oWWoYmW8ooXAcjxfo07U5t3D4Q +uMxhIg/E+PLD/GJ08PLW2c97Fa8CJZrKclfXxfZVViVBFjkgrOZV7vRUF980 +LZ9te3YetNhypRHb9NCIefLplvZMONi7osGWZx1qCb4KDBxJgx+/U1xsstfh +yL0EpYfzKbBBuynHRlMfu8/ct4h/nACPfhv/nW7Vx16LfzbjnNMQrKHX/SZw +Pd5bumntt8BoYI8FtLsLG6BlWoaQSe4xsFSV3bQ03wA/CpSbFZRFwKqopMP1 +DAbavK8dqUsNhRrjG/x2RgyEHL0YPBEKDtOPMzpYDPxomNTwbF8oHA6evDts +ykAi+K8u76ZQaPby/Shmx8DeuATpuSWhsItpYOvpy8CZt45N0ikH4favjwoT +CQy8lRyu9+jcAVgTyHys1s3Ae8Oth2XP7IezyvZ/Tr1n4CXRTkpA6H6Y6Nu+ +/lMvAx8F5Z+pc98PjzxSiq4OMFBOJziPo74fnBz6LsiMMtAi+9iFwLpgOGIc +GyLMY4jHP+VWSP7ZB83ib+ijaoaYPp6UvvnwXgh8tOv0vQOG6Jy+OJ19MwjG +9n2LsAwzROUfAnJfUoPgsNLePZ3hhvjUmfshPyIIko7td5o5Sr4vUDXuYBME +ZUbhNFacIaa+thGKG90Fc+WnahpyDLGDNuxty9wFGaVXJ/5rMMRMd5ODPz7s +gMd57QE/pZg4uvhBvIt7APTb0X3CZZkY3tfsnGEVADyz+9z/yjMx9PJF9d51 +AWDmKGjPT2OiU4M8N18sAJoWGTHk1jAxNqjFq7fRH15szxU2NWHiqxDPEhl9 +f+hW3V2StoOJLpprDjgobYeJWwvT2hVMrIutZHfJ+sJnV6u8xEomLn5+/Xym +iC90LT5jPVDNRLtMjvC9GR+o9pW/eL6WiUKlMiLLa30gRna90XwLExNX6lx7 +tdkHlifsPvbsPROfSH/66xvqDRo7O3gCeY0wMf+I7t5nXuCvViScs8kImWKT +Lgb33SHyifdudQcjPN6b6d5+yR3SAlc85zoZoW9kWVRCjDvU3DiS8nyrEVYJ +Ws3qObiDpLr1snk/I2yq/tCeOuIGTepDkr7hRphKMXRzXu0Ga1ZRaeq55PH1 +GXa3ua7wc02mAXfcCLXVdtqsXeQMXS/QUuK3ET7ilRrWHdsCtcFjW8ImjZC3 +UjvFumcLpHJtDhj8MULT94srbtzfAmuMeO5W8RljTsaoG2XPFthus4/eIG2M +rUaOP/51OUH7zg2i7Sxj/EiJK9KudYQHBX8/TiYYo2oLp+Fr6GYwMA+btk02 +RqOT+/W/uGyG+x9HRPPOGOP5odJN/xibgUvpZdhmGOMiuXKtI3P2cDe79szV +S8b4JHp5Xm6cPeSlxDI3lBijGYqI5uZugsSwZenZbcY4apKRNDywETwsVNCY +wsL3UvbPn3OsYb5dSKyBxsJBoXaRnAvWkBc41mOrwsIWR3CNPm4Nn+MqIzxW +sfBvx++HOTbWcLBlc+kRPRZOlwmnTX3aAEn2xygPrFg45n8tAOU3QJVbx5z+ +fhaec+J/kJZjCQr74iu1almoF129ZuyDGaQu7FifXM9C8+msrIZnZsCbYcX5 +0sjC218aC+9UmMG3cv7beS0sdIy3TixON4MqntPZK9pYuMNa8P5pKzPwOBcV +MTVEfj6rq8F7CVPIrj6y/tESNqpq3DKru4ggau/OkRdjY/ff6zVlCQhR/Yaa +EcvZOEm5uKosAmEX/4yqjhQb2zco5ve6IDA2h0vmU9go/G9t6cwKhM5PB3/H +6rLx7Yu4zrU0ACmRvZxNW9k4xfT+Z7iWDQXmxyPH3dno+yevYpswG/SOp5pn +erHx7K6TePMLC+zHyzq6/Nh4yeqQcX4BC+I6J2f997JR6HapvhmNBTP5J80i +o9m4CTOO8lOMods4s+1mERsf9TvWPdBjwq5DBZdtStiYli18QVaKCVMl9wNH +ytjY+qUIsqcNYYVy17RuORtdOWfTpmoMYaOQkuLDWjZ61+h+XmtjCDXtNwPa +Otg4LkD18NnJAFuxB5rhXWxkeWh6l2xkQNeGlinZHjb23w3xVNBhwETV9wTv +fjautfZrtZ81AM1rOsVfv7GxiicpTPaMAdR0m4anjLIxNIZFcz5oALaSW0B7 +nI2WwRIf7241gB3xh96ETbKRR6ZH976yAUzUxuXIzLDJ/589iQFCBhDz54J/ +1R82lkpT4nXG1sNy/dsa2+bZ6BA4uFSufT1c3Vc1ubDAxnj5WF5K1Xr4H0nd +1sY= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13423,164 +14278,134 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwV13k4VA8XB3CRNSnZt1lsbfZkDDPOsYYkhGxZQqVFiihtKLtkSUkLSalk +mblFlsqWaFH9LIlCoVRIZS3y3veveT7PPPfembnn+z136Nv3OwXy8vDwGC7i +4fn/61RvS6NqcoFJxOr8hSE7S5P2q7JHTLtiQFlOyWAuUQVQ6tV22a4MEN8w +NtuauA7CHe685evKh9GYCyqlieYgPiaTMfuWC/8ZNG+NTNwCfTX2+yfe1oN1 +okDoiwR/sFL99uHn2//Ae8OrmpVxoTD7lpE1/vYT7JqSarh29BQ0mBcWvMn/ +DV4azoqvFc+BYl/l5+0a88CSGvJoPnAFJPf63BE058PAnZI/Voldhwxdq2p7 +FyHspfcthO8qhHfZOrU/ly9F6+9qOqWSRZBccPIVr5w4/noroD+UWQK2+kEr +pFTEsa1fQ+FsXgkINTq5rNQUx2+L+GJ0ikvg9IBaz0ZTcez3Vn/i3lQCx5Rf +fD4XJI5HiyZ6LWdKIDhP9p96lTjObP7qEeNRCo6XORobPVegatbmJBPRMpA5 +N5CYeUUCP6SnPuF/WAaya++fnrkpgTOfP0YP15WBfH3cyW1lEvhyUtT1aVMZ +UMZXH1rZIIGyUbnmR16XgZpdiG/1sAROwIJKyUAZrFs8bzCwThInffqjPIU5 +sDlMelDvmSS6udSvq3PkgMOS4d4LbZJ40oL1Xc2VA075le/m3kti5VKpojgP +Dri+9nrV9EMS60+7mbH8ObBN43qVh5QULhMva4wI48CeQe30GF8pDOh61aJ9 +ngPxzjYm/01JofrakOJrnRyQv9cqz7tIGkNrHtR0d3OgRMJ5WneJNI42XpJe +1seBzv+8y9Kp0hgYp3k76AsHVB3DlB2tpVGj7a3Z52kO1G/KFXh9URo5Hzly +8zJcmLeabH3JkkGHjCnbPGcupN2MLJq3kkH/lcKuZm5cUBXgSdB0lMHTTqGF +fZ5csHsiYnomUAYf7rJTEvXnQo45jbBLlUG5/IMuGge4YIgbLzzvk0EqQ2pR +UgoXQpnXfFpiZNFcQWK26jEXbPPEJjamyKJUHLhm1HNBWfBYQmuWLMqV+2QH +PuHC63ZXTtstWfwQY/Fi4RkXtEJE+XpbZfG9zIEZ3k4uDN+MuPlLXg5tludn +WXzngpek/agCIYfmfVYt5SsIWHe0OvpqjRxqcy6ZLpEiQOTTKml6kxzKWX0v +9JQhoLKUD9TfyWF24R8YVyBAemNlms6CHIqPF94aViXgdbSqvuVGeayRMayQ +NiDA4sefyOABeeyug6+7XQg4Yn1uTd2IPN479LJVfysBJdc0uyWm5LErYabr +jxsBss6+zEohBRx4qr/tqBcBIw+eTPNpKeDJZSPr7P0JyIxJC7t4WAFn3OMz +jUMIaO5ZrToSrYAPt0ryNR8gYE6/oc0kWQEVC/nyHEIJ2PFlUm/wigISlwMC +XMMJMLLz/KnVoIB3V/9aqX+MgE9S6sGNSxXR4J2WKjOeAJn9j5VkZBRRsUWY +SEggwK7Z7WUQTRFfnGIfaU8koDwyWWPZOkVc+d6lxDeFgKS+8W/uboo4sl62 +dWM6AXq3q3f+yFdENkif2JdDwE5eFxmzu4pYNenbHnWJgMueY03n7iviZzWV +fWmXCRAQo6sbNSvigu78roKrBHQfjBs8PaqIVyXfXM3NJyCa5egnb6iEifRP +dwduE2DtffUXw0wJFUUOcl/eIUAs6vspFzslpB9GH6KIPH9D7M00XyUU/Mfl +Higm4IFt1XeBRCUcIGa2VZURcHKv4HHVTCX8t/FYVTSHAKtUZzGzK0por3mx +yYJLQPubMZ3jHCW8snr450OCgHE3lfDf75RQRFuLOFZOQEVkiKD4oBL6/Gi8 +Q68g4MTlh9laY0o4GF7sUU9atH9rdRAvBRNPfP8y9YCAtkU37OJFKdjqF/U0 +qZKAHJVfHwqkKZjweshfvoqAlTtTePrXUDDmXtlbjWoCxhLepc/rU3DDgC+n +lPS9O+oqCkDBELEIO60aAszGai1dt1CQYEc+pzwkwPvQZNKLoxS0Zd1d+vIR +AWoXzBS/xVIw6p6ThNbj/8/P2WLBNPJ8wi8HkkhHzq1+bVZAQZUAsW+MWgJM +KRF+viUUZPmaKieQFsLGX8cfULBNmbamnXTWKW+pyhcU9Gt9WuxTR4DXjaKb +nZ0UPHJCUCOXtPLTGcZEPwWVo/tPdJP+OmzZIv6dgk0Z6YXi9QSUiWR6aE9S +8HqjR6EF6QiN/u92CxS8f/T4yVDSJvaax3cLU7FoP0v3Kmn+kEixBAkqvrzd +87CR9Iv0p7k3lKj4+1Se+hfSmYSkbsNKKgYUvtnL30CAR4dffb8uFduWVKRT +SdOnS7b8M6Yie+ri+fWkh2XnBhWsqPh2uvHYBtKlRjbhTAcqLoycsnQhHe51 +XnCrBxVl51R+eZNmnRjIDgugYtq536cCSPPl6azJCKbijX1mc4Gkn9Udry49 +TMUdsX5e/qTTBp7ZvYyhYjb1+g0v0lv5ZXu/pZBu9HjnSJqyMnC/0AUq2uCH +GTPSQ9ZcHvVrVPyRF8WvQ/ru7oV08yIqahlc5pEjHZpip+J3n4qdZxO+z5Pf +16jk4r0Tj6nYcSz3aS9pi7et82PNVPygEy7+iLQ9z+INPv9R8fUbWsdF0m6r +mWmveqh4yrBa4iBpf6fgdzBExQMa21utSAcfva5cNkbF6e3rBGRJHy7o2kOb +oWL0iU01Q+T9szpKPxnFT0PF5J7CcNLPl9VcNxShoZ9neh+TtEOBa/O4GA1j +XkrkzJLz4fkyWdxPloYdPqKXg0n3+6kbyCnR0PXW8yEV0jumaj3e0GlY9/Fr +eQc5fyHUqeuma2mo4NP3+//zOUmkNc9q01Dyr8D2TnJ+I63XjnL0abjXQMsr +knTsAV8DZRMahiyozVaQ857T8KyZ15GGArZZU8JkHqhugaNVLjTUlkkdyiLz +UjCyIB7qQcNber+CKKRLpdZ7DvjTsLiwnqFG5q1xZ+5oQzgNxe/QhEXIfNrM +MVccO0peb174SSSZ39a0dgP9KBrGBiyiDZN5f1cpHFWQSMObb/5WPLhP5nNJ +2IrYyzSkO0Rk6JL9EJonxmBfo+H3JJWgeLI/ZvRve07eoKG8TPnwO7Jf+Lx7 +CwJLadj6NPFLGNk/smXWDKt6Gn4W/CNwiuynKxYDnv+aaPjr4scNj+6SeXp3 +PKr8OQ3b0quNp8g+0+QlWtQ7aDj1xNPUi+w7M2clL8FhGmY5iw7zFBKwd+Zn +VPNSOg6FFTUU55LzcmCH9OcVdJwTHqjNJftU6Ft3EZ8sHW++ujR55goBN3oa +Ok2U6Zisay3qQ/Zx76MsjfsGdHxs/lSp/TwBm2OZXdd86Hh6/UH7JWfI+f1X +vO9xAB13WJqfrUsm+yRcme9DEB0HMweVw5IISNi1REs2jI7fVp+xaSX3R+3G +D6dSE+hoc977iWsMuQ9WRGsf5ZAOgEVV5P7hSZ5szC6no6H3PVODQ+Tvzbfb +o7yaju/3Mn6WkPtqz6RT7M8ndBSfzirIIvdbQZdqz85uOgbarTxruJvct7nN +cc58yuil90W4k9yPs2uX92q6KGNXJuXgMSBg6op89DoPZRw9cMIsk03AxDI1 +VaaPMt51e9lz05i8f7+Zuy2ClJH+yDekkUHuv2r/KY/jyvh5yZUt77TJfG+s +EEu4oYwdIiHn91DJedvjDZ8mlZHfvO+FyRwXLnzY9enLH2U8ZWls8muWC+c2 +h8aOLiijmdooN3+aC6nrEp7PCKvgxPLG4j+/uBDzl7N1GUUF7286pBT/lQt7 +kvlDWFYqSCc0EyTI5xFW0d288+dVsCztZ41gMRd6aEW5lpdUMKpRQfvMHS5E +nr99dSJXBa/UX2Mtv8WFiuibl51uq+AblWntZde5oOeWly1Wo4L6Fx2uj2dz +YTX/ubS4jyoo5tEnZ36aC9I+R6PCNVRxM9+Usa47F36usPV1rVfF+Yynt5Lm +ODCY4ut6UFAdHzKlKsXlOGDzI8JmyGAlTo7VSw2uLoMRf6HQeydXYdS486Gt +yiXk874Mb3z9asyKEv60o7cIVrxUTy37sQYXy1iJiN+7DYoJpQ4GBhoY0lcx +WOxWCNlrmcsldmpihml94ajGDXgmb7r+d7oWWoYmW8ooXAcjxfo07U5t3D4Q +uMxhIg/E+PLD/GJ08PLW2c97Fa8CJZrKclfXxfZVViVBFjkgrOZV7vRUF980 +LZ9te3YetNhypRHb9NCIefLplvZMONi7osGWZx1qCb4KDBxJgx+/U1xsstfh +yL0EpYfzKbBBuynHRlMfu8/ct4h/nACPfhv/nW7Vx16LfzbjnNMQrKHX/SZw +Pd5bumntt8BoYI8FtLsLG6BlWoaQSe4xsFSV3bQ03wA/CpSbFZRFwKqopMP1 +DAbavK8dqUsNhRrjG/x2RgyEHL0YPBEKDtOPMzpYDPxomNTwbF8oHA6evDts +ykAi+K8u76ZQaPby/Shmx8DeuATpuSWhsItpYOvpy8CZt45N0ikH4favjwoT +CQy8lRyu9+jcAVgTyHys1s3Ae8Oth2XP7IezyvZ/Tr1n4CXRTkpA6H6Y6Nu+ +/lMvAx8F5Z+pc98PjzxSiq4OMFBOJziPo74fnBz6LsiMMtAi+9iFwLpgOGIc +GyLMY4jHP+VWSP7ZB83ib+ijaoaYPp6UvvnwXgh8tOv0vQOG6Jy+OJ19MwjG +9n2LsAwzROUfAnJfUoPgsNLePZ3hhvjUmfshPyIIko7td5o5Sr4vUDXuYBME +ZUbhNFacIaa+thGKG90Fc+WnahpyDLGDNuxty9wFGaVXJ/5rMMRMd5ODPz7s +gMd57QE/pZg4uvhBvIt7APTb0X3CZZkY3tfsnGEVADyz+9z/yjMx9PJF9d51 +AWDmKGjPT2OiU4M8N18sAJoWGTHk1jAxNqjFq7fRH15szxU2NWHiqxDPEhl9 +f+hW3V2StoOJLpprDjgobYeJWwvT2hVMrIutZHfJ+sJnV6u8xEomLn5+/Xym +iC90LT5jPVDNRLtMjvC9GR+o9pW/eL6WiUKlMiLLa30gRna90XwLExNX6lx7 +tdkHlifsPvbsPROfSH/66xvqDRo7O3gCeY0wMf+I7t5nXuCvViScs8kImWKT +Lgb33SHyifdudQcjPN6b6d5+yR3SAlc85zoZoW9kWVRCjDvU3DiS8nyrEVYJ +Ws3qObiDpLr1snk/I2yq/tCeOuIGTepDkr7hRphKMXRzXu0Ga1ZRaeq55PH1 +GXa3ua7wc02mAXfcCLXVdtqsXeQMXS/QUuK3ET7ilRrWHdsCtcFjW8ImjZC3 +UjvFumcLpHJtDhj8MULT94srbtzfAmuMeO5W8RljTsaoG2XPFthus4/eIG2M +rUaOP/51OUH7zg2i7Sxj/EiJK9KudYQHBX8/TiYYo2oLp+Fr6GYwMA+btk02 +RqOT+/W/uGyG+x9HRPPOGOP5odJN/xibgUvpZdhmGOMiuXKtI3P2cDe79szV +S8b4JHp5Xm6cPeSlxDI3lBijGYqI5uZugsSwZenZbcY4apKRNDywETwsVNCY +wsL3UvbPn3OsYb5dSKyBxsJBoXaRnAvWkBc41mOrwsIWR3CNPm4Nn+MqIzxW +sfBvx++HOTbWcLBlc+kRPRZOlwmnTX3aAEn2xygPrFg45n8tAOU3QJVbx5z+ +fhaec+J/kJZjCQr74iu1almoF129ZuyDGaQu7FifXM9C8+msrIZnZsCbYcX5 +0sjC218aC+9UmMG3cv7beS0sdIy3TixON4MqntPZK9pYuMNa8P5pKzPwOBcV +MTVEfj6rq8F7CVPIrj6y/tESNqpq3DKru4ggau/OkRdjY/ff6zVlCQhR/Yaa +EcvZOEm5uKosAmEX/4yqjhQb2zco5ve6IDA2h0vmU9go/G9t6cwKhM5PB3/H +6rLx7Yu4zrU0ACmRvZxNW9k4xfT+Z7iWDQXmxyPH3dno+yevYpswG/SOp5pn +erHx7K6TePMLC+zHyzq6/Nh4yeqQcX4BC+I6J2f997JR6HapvhmNBTP5J80i +o9m4CTOO8lOMods4s+1mERsf9TvWPdBjwq5DBZdtStiYli18QVaKCVMl9wNH +ytjY+qUIsqcNYYVy17RuORtdOWfTpmoMYaOQkuLDWjZ61+h+XmtjCDXtNwPa +Otg4LkD18NnJAFuxB5rhXWxkeWh6l2xkQNeGlinZHjb23w3xVNBhwETV9wTv +fjautfZrtZ81AM1rOsVfv7GxiicpTPaMAdR0m4anjLIxNIZFcz5oALaSW0B7 +nI2WwRIf7241gB3xh96ETbKRR6ZH976yAUzUxuXIzLDJ/589iQFCBhDz54J/ +1R82lkpT4nXG1sNy/dsa2+bZ6BA4uFSufT1c3Vc1ubDAxnj5WF5K1Xr4H0nd +1sY= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.0772002926700482}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13592,19 +14417,19 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.0772002926700482}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13618,163 +14443,133 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwV13k4VA8XB3CRNSnZt1lsbfZkDDPOsYYkhGxZQqVFiihtKLtkSUkLSalk +mblFlsqWaFH9LIlCoVRIZS3y3veveT7PPPfembnn+z136Nv3OwXy8vDwGC7i +4fn/61RvS6NqcoFJxOr8hSE7S5P2q7JHTLtiQFlOyWAuUQVQ6tV22a4MEN8w +NtuauA7CHe685evKh9GYCyqlieYgPiaTMfuWC/8ZNG+NTNwCfTX2+yfe1oN1 +okDoiwR/sFL99uHn2//Ae8OrmpVxoTD7lpE1/vYT7JqSarh29BQ0mBcWvMn/ +DV4azoqvFc+BYl/l5+0a88CSGvJoPnAFJPf63BE058PAnZI/Voldhwxdq2p7 +FyHspfcthO8qhHfZOrU/ly9F6+9qOqWSRZBccPIVr5w4/noroD+UWQK2+kEr +pFTEsa1fQ+FsXgkINTq5rNQUx2+L+GJ0ikvg9IBaz0ZTcez3Vn/i3lQCx5Rf +fD4XJI5HiyZ6LWdKIDhP9p96lTjObP7qEeNRCo6XORobPVegatbmJBPRMpA5 +N5CYeUUCP6SnPuF/WAaya++fnrkpgTOfP0YP15WBfH3cyW1lEvhyUtT1aVMZ +UMZXH1rZIIGyUbnmR16XgZpdiG/1sAROwIJKyUAZrFs8bzCwThInffqjPIU5 +sDlMelDvmSS6udSvq3PkgMOS4d4LbZJ40oL1Xc2VA075le/m3kti5VKpojgP +Dri+9nrV9EMS60+7mbH8ObBN43qVh5QULhMva4wI48CeQe30GF8pDOh61aJ9 +ngPxzjYm/01JofrakOJrnRyQv9cqz7tIGkNrHtR0d3OgRMJ5WneJNI42XpJe +1seBzv+8y9Kp0hgYp3k76AsHVB3DlB2tpVGj7a3Z52kO1G/KFXh9URo5Hzly +8zJcmLeabH3JkkGHjCnbPGcupN2MLJq3kkH/lcKuZm5cUBXgSdB0lMHTTqGF +fZ5csHsiYnomUAYf7rJTEvXnQo45jbBLlUG5/IMuGge4YIgbLzzvk0EqQ2pR +UgoXQpnXfFpiZNFcQWK26jEXbPPEJjamyKJUHLhm1HNBWfBYQmuWLMqV+2QH +PuHC63ZXTtstWfwQY/Fi4RkXtEJE+XpbZfG9zIEZ3k4uDN+MuPlLXg5tludn +WXzngpek/agCIYfmfVYt5SsIWHe0OvpqjRxqcy6ZLpEiQOTTKml6kxzKWX0v +9JQhoLKUD9TfyWF24R8YVyBAemNlms6CHIqPF94aViXgdbSqvuVGeayRMayQ +NiDA4sefyOABeeyug6+7XQg4Yn1uTd2IPN479LJVfysBJdc0uyWm5LErYabr +jxsBss6+zEohBRx4qr/tqBcBIw+eTPNpKeDJZSPr7P0JyIxJC7t4WAFn3OMz +jUMIaO5ZrToSrYAPt0ryNR8gYE6/oc0kWQEVC/nyHEIJ2PFlUm/wigISlwMC +XMMJMLLz/KnVoIB3V/9aqX+MgE9S6sGNSxXR4J2WKjOeAJn9j5VkZBRRsUWY +SEggwK7Z7WUQTRFfnGIfaU8koDwyWWPZOkVc+d6lxDeFgKS+8W/uboo4sl62 +dWM6AXq3q3f+yFdENkif2JdDwE5eFxmzu4pYNenbHnWJgMueY03n7iviZzWV +fWmXCRAQo6sbNSvigu78roKrBHQfjBs8PaqIVyXfXM3NJyCa5egnb6iEifRP +dwduE2DtffUXw0wJFUUOcl/eIUAs6vspFzslpB9GH6KIPH9D7M00XyUU/Mfl +Higm4IFt1XeBRCUcIGa2VZURcHKv4HHVTCX8t/FYVTSHAKtUZzGzK0por3mx +yYJLQPubMZ3jHCW8snr450OCgHE3lfDf75RQRFuLOFZOQEVkiKD4oBL6/Gi8 +Q68g4MTlh9laY0o4GF7sUU9atH9rdRAvBRNPfP8y9YCAtkU37OJFKdjqF/U0 +qZKAHJVfHwqkKZjweshfvoqAlTtTePrXUDDmXtlbjWoCxhLepc/rU3DDgC+n +lPS9O+oqCkDBELEIO60aAszGai1dt1CQYEc+pzwkwPvQZNKLoxS0Zd1d+vIR +AWoXzBS/xVIw6p6ThNbj/8/P2WLBNPJ8wi8HkkhHzq1+bVZAQZUAsW+MWgJM +KRF+viUUZPmaKieQFsLGX8cfULBNmbamnXTWKW+pyhcU9Gt9WuxTR4DXjaKb +nZ0UPHJCUCOXtPLTGcZEPwWVo/tPdJP+OmzZIv6dgk0Z6YXi9QSUiWR6aE9S +8HqjR6EF6QiN/u92CxS8f/T4yVDSJvaax3cLU7FoP0v3Kmn+kEixBAkqvrzd +87CR9Iv0p7k3lKj4+1Se+hfSmYSkbsNKKgYUvtnL30CAR4dffb8uFduWVKRT +SdOnS7b8M6Yie+ri+fWkh2XnBhWsqPh2uvHYBtKlRjbhTAcqLoycsnQhHe51 +XnCrBxVl51R+eZNmnRjIDgugYtq536cCSPPl6azJCKbijX1mc4Gkn9Udry49 +TMUdsX5e/qTTBp7ZvYyhYjb1+g0v0lv5ZXu/pZBu9HjnSJqyMnC/0AUq2uCH +GTPSQ9ZcHvVrVPyRF8WvQ/ru7oV08yIqahlc5pEjHZpip+J3n4qdZxO+z5Pf +16jk4r0Tj6nYcSz3aS9pi7et82PNVPygEy7+iLQ9z+INPv9R8fUbWsdF0m6r +mWmveqh4yrBa4iBpf6fgdzBExQMa21utSAcfva5cNkbF6e3rBGRJHy7o2kOb +oWL0iU01Q+T9szpKPxnFT0PF5J7CcNLPl9VcNxShoZ9neh+TtEOBa/O4GA1j +XkrkzJLz4fkyWdxPloYdPqKXg0n3+6kbyCnR0PXW8yEV0jumaj3e0GlY9/Fr +eQc5fyHUqeuma2mo4NP3+//zOUmkNc9q01Dyr8D2TnJ+I63XjnL0abjXQMsr +knTsAV8DZRMahiyozVaQ857T8KyZ15GGArZZU8JkHqhugaNVLjTUlkkdyiLz +UjCyIB7qQcNber+CKKRLpdZ7DvjTsLiwnqFG5q1xZ+5oQzgNxe/QhEXIfNrM +MVccO0peb174SSSZ39a0dgP9KBrGBiyiDZN5f1cpHFWQSMObb/5WPLhP5nNJ +2IrYyzSkO0Rk6JL9EJonxmBfo+H3JJWgeLI/ZvRve07eoKG8TPnwO7Jf+Lx7 +CwJLadj6NPFLGNk/smXWDKt6Gn4W/CNwiuynKxYDnv+aaPjr4scNj+6SeXp3 +PKr8OQ3b0quNp8g+0+QlWtQ7aDj1xNPUi+w7M2clL8FhGmY5iw7zFBKwd+Zn +VPNSOg6FFTUU55LzcmCH9OcVdJwTHqjNJftU6Ft3EZ8sHW++ujR55goBN3oa +Ok2U6Zisay3qQ/Zx76MsjfsGdHxs/lSp/TwBm2OZXdd86Hh6/UH7JWfI+f1X +vO9xAB13WJqfrUsm+yRcme9DEB0HMweVw5IISNi1REs2jI7fVp+xaSX3R+3G +D6dSE+hoc977iWsMuQ9WRGsf5ZAOgEVV5P7hSZ5szC6no6H3PVODQ+Tvzbfb +o7yaju/3Mn6WkPtqz6RT7M8ndBSfzirIIvdbQZdqz85uOgbarTxruJvct7nN +cc58yuil90W4k9yPs2uX92q6KGNXJuXgMSBg6op89DoPZRw9cMIsk03AxDI1 +VaaPMt51e9lz05i8f7+Zuy2ClJH+yDekkUHuv2r/KY/jyvh5yZUt77TJfG+s +EEu4oYwdIiHn91DJedvjDZ8mlZHfvO+FyRwXLnzY9enLH2U8ZWls8muWC+c2 +h8aOLiijmdooN3+aC6nrEp7PCKvgxPLG4j+/uBDzl7N1GUUF7286pBT/lQt7 +kvlDWFYqSCc0EyTI5xFW0d288+dVsCztZ41gMRd6aEW5lpdUMKpRQfvMHS5E +nr99dSJXBa/UX2Mtv8WFiuibl51uq+AblWntZde5oOeWly1Wo4L6Fx2uj2dz +YTX/ubS4jyoo5tEnZ36aC9I+R6PCNVRxM9+Usa47F36usPV1rVfF+Yynt5Lm +ODCY4ut6UFAdHzKlKsXlOGDzI8JmyGAlTo7VSw2uLoMRf6HQeydXYdS486Gt +yiXk874Mb3z9asyKEv60o7cIVrxUTy37sQYXy1iJiN+7DYoJpQ4GBhoY0lcx +WOxWCNlrmcsldmpihml94ajGDXgmb7r+d7oWWoYmW8ooXAcjxfo07U5t3D4Q +uMxhIg/E+PLD/GJ08PLW2c97Fa8CJZrKclfXxfZVViVBFjkgrOZV7vRUF980 +LZ9te3YetNhypRHb9NCIefLplvZMONi7osGWZx1qCb4KDBxJgx+/U1xsstfh +yL0EpYfzKbBBuynHRlMfu8/ct4h/nACPfhv/nW7Vx16LfzbjnNMQrKHX/SZw +Pd5bumntt8BoYI8FtLsLG6BlWoaQSe4xsFSV3bQ03wA/CpSbFZRFwKqopMP1 +DAbavK8dqUsNhRrjG/x2RgyEHL0YPBEKDtOPMzpYDPxomNTwbF8oHA6evDts +ykAi+K8u76ZQaPby/Shmx8DeuATpuSWhsItpYOvpy8CZt45N0ikH4favjwoT +CQy8lRyu9+jcAVgTyHys1s3Ae8Oth2XP7IezyvZ/Tr1n4CXRTkpA6H6Y6Nu+ +/lMvAx8F5Z+pc98PjzxSiq4OMFBOJziPo74fnBz6LsiMMtAi+9iFwLpgOGIc +GyLMY4jHP+VWSP7ZB83ib+ijaoaYPp6UvvnwXgh8tOv0vQOG6Jy+OJ19MwjG +9n2LsAwzROUfAnJfUoPgsNLePZ3hhvjUmfshPyIIko7td5o5Sr4vUDXuYBME +ZUbhNFacIaa+thGKG90Fc+WnahpyDLGDNuxty9wFGaVXJ/5rMMRMd5ODPz7s +gMd57QE/pZg4uvhBvIt7APTb0X3CZZkY3tfsnGEVADyz+9z/yjMx9PJF9d51 +AWDmKGjPT2OiU4M8N18sAJoWGTHk1jAxNqjFq7fRH15szxU2NWHiqxDPEhl9 +f+hW3V2StoOJLpprDjgobYeJWwvT2hVMrIutZHfJ+sJnV6u8xEomLn5+/Xym +iC90LT5jPVDNRLtMjvC9GR+o9pW/eL6WiUKlMiLLa30gRna90XwLExNX6lx7 +tdkHlifsPvbsPROfSH/66xvqDRo7O3gCeY0wMf+I7t5nXuCvViScs8kImWKT +Lgb33SHyifdudQcjPN6b6d5+yR3SAlc85zoZoW9kWVRCjDvU3DiS8nyrEVYJ +Ws3qObiDpLr1snk/I2yq/tCeOuIGTepDkr7hRphKMXRzXu0Ga1ZRaeq55PH1 +GXa3ua7wc02mAXfcCLXVdtqsXeQMXS/QUuK3ET7ilRrWHdsCtcFjW8ImjZC3 +UjvFumcLpHJtDhj8MULT94srbtzfAmuMeO5W8RljTsaoG2XPFthus4/eIG2M +rUaOP/51OUH7zg2i7Sxj/EiJK9KudYQHBX8/TiYYo2oLp+Fr6GYwMA+btk02 +RqOT+/W/uGyG+x9HRPPOGOP5odJN/xibgUvpZdhmGOMiuXKtI3P2cDe79szV +S8b4JHp5Xm6cPeSlxDI3lBijGYqI5uZugsSwZenZbcY4apKRNDywETwsVNCY +wsL3UvbPn3OsYb5dSKyBxsJBoXaRnAvWkBc41mOrwsIWR3CNPm4Nn+MqIzxW +sfBvx++HOTbWcLBlc+kRPRZOlwmnTX3aAEn2xygPrFg45n8tAOU3QJVbx5z+ +fhaec+J/kJZjCQr74iu1almoF129ZuyDGaQu7FifXM9C8+msrIZnZsCbYcX5 +0sjC218aC+9UmMG3cv7beS0sdIy3TixON4MqntPZK9pYuMNa8P5pKzPwOBcV +MTVEfj6rq8F7CVPIrj6y/tESNqpq3DKru4ggau/OkRdjY/ff6zVlCQhR/Yaa +EcvZOEm5uKosAmEX/4yqjhQb2zco5ve6IDA2h0vmU9go/G9t6cwKhM5PB3/H +6rLx7Yu4zrU0ACmRvZxNW9k4xfT+Z7iWDQXmxyPH3dno+yevYpswG/SOp5pn +erHx7K6TePMLC+zHyzq6/Nh4yeqQcX4BC+I6J2f997JR6HapvhmNBTP5J80i +o9m4CTOO8lOMods4s+1mERsf9TvWPdBjwq5DBZdtStiYli18QVaKCVMl9wNH +ytjY+qUIsqcNYYVy17RuORtdOWfTpmoMYaOQkuLDWjZ61+h+XmtjCDXtNwPa +Otg4LkD18NnJAFuxB5rhXWxkeWh6l2xkQNeGlinZHjb23w3xVNBhwETV9wTv +fjautfZrtZ81AM1rOsVfv7GxiicpTPaMAdR0m4anjLIxNIZFcz5oALaSW0B7 +nI2WwRIf7241gB3xh96ETbKRR6ZH976yAUzUxuXIzLDJ/589iQFCBhDz54J/ +1R82lkpT4nXG1sNy/dsa2+bZ6BA4uFSufT1c3Vc1ubDAxnj5WF5K1Xr4H0nd +1sY= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.0772002926700482}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13785,6 +14580,7 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13812,7 +14608,8 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.17388882737814787`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0772002926700482}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13820,17 +14617,622 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913324679337597`*^9}, + CellChangeTimes->{3.9913324679337597`*^9, 3.9943576558358583`*^9}, CellLabel-> - "Out[221]=",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] + "Out[140]=",ExpressionUUID->"cf24b5d3-c8c2-44ec-97d2-13398049e12b"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"f380af60-a605-c546-a4c8-\ -b989835aa113"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VA8XB3CRNSnZt1lsbfZkDDPOsYYkhGxZQqVFiihtKLtkSUkLSalk +mblFlsqWaFH9LIlCoVRIZS3y3veveT7PPPfembnn+z136Nv3OwXy8vDwGC7i +4fn/61RvS6NqcoFJxOr8hSE7S5P2q7JHTLtiQFlOyWAuUQVQ6tV22a4MEN8w +NtuauA7CHe685evKh9GYCyqlieYgPiaTMfuWC/8ZNG+NTNwCfTX2+yfe1oN1 +okDoiwR/sFL99uHn2//Ae8OrmpVxoTD7lpE1/vYT7JqSarh29BQ0mBcWvMn/ +DV4azoqvFc+BYl/l5+0a88CSGvJoPnAFJPf63BE058PAnZI/Voldhwxdq2p7 +FyHspfcthO8qhHfZOrU/ly9F6+9qOqWSRZBccPIVr5w4/noroD+UWQK2+kEr +pFTEsa1fQ+FsXgkINTq5rNQUx2+L+GJ0ikvg9IBaz0ZTcez3Vn/i3lQCx5Rf +fD4XJI5HiyZ6LWdKIDhP9p96lTjObP7qEeNRCo6XORobPVegatbmJBPRMpA5 +N5CYeUUCP6SnPuF/WAaya++fnrkpgTOfP0YP15WBfH3cyW1lEvhyUtT1aVMZ +UMZXH1rZIIGyUbnmR16XgZpdiG/1sAROwIJKyUAZrFs8bzCwThInffqjPIU5 +sDlMelDvmSS6udSvq3PkgMOS4d4LbZJ40oL1Xc2VA075le/m3kti5VKpojgP +Dri+9nrV9EMS60+7mbH8ObBN43qVh5QULhMva4wI48CeQe30GF8pDOh61aJ9 +ngPxzjYm/01JofrakOJrnRyQv9cqz7tIGkNrHtR0d3OgRMJ5WneJNI42XpJe +1seBzv+8y9Kp0hgYp3k76AsHVB3DlB2tpVGj7a3Z52kO1G/KFXh9URo5Hzly +8zJcmLeabH3JkkGHjCnbPGcupN2MLJq3kkH/lcKuZm5cUBXgSdB0lMHTTqGF +fZ5csHsiYnomUAYf7rJTEvXnQo45jbBLlUG5/IMuGge4YIgbLzzvk0EqQ2pR +UgoXQpnXfFpiZNFcQWK26jEXbPPEJjamyKJUHLhm1HNBWfBYQmuWLMqV+2QH +PuHC63ZXTtstWfwQY/Fi4RkXtEJE+XpbZfG9zIEZ3k4uDN+MuPlLXg5tludn +WXzngpek/agCIYfmfVYt5SsIWHe0OvpqjRxqcy6ZLpEiQOTTKml6kxzKWX0v +9JQhoLKUD9TfyWF24R8YVyBAemNlms6CHIqPF94aViXgdbSqvuVGeayRMayQ +NiDA4sefyOABeeyug6+7XQg4Yn1uTd2IPN479LJVfysBJdc0uyWm5LErYabr +jxsBss6+zEohBRx4qr/tqBcBIw+eTPNpKeDJZSPr7P0JyIxJC7t4WAFn3OMz +jUMIaO5ZrToSrYAPt0ryNR8gYE6/oc0kWQEVC/nyHEIJ2PFlUm/wigISlwMC +XMMJMLLz/KnVoIB3V/9aqX+MgE9S6sGNSxXR4J2WKjOeAJn9j5VkZBRRsUWY +SEggwK7Z7WUQTRFfnGIfaU8koDwyWWPZOkVc+d6lxDeFgKS+8W/uboo4sl62 +dWM6AXq3q3f+yFdENkif2JdDwE5eFxmzu4pYNenbHnWJgMueY03n7iviZzWV +fWmXCRAQo6sbNSvigu78roKrBHQfjBs8PaqIVyXfXM3NJyCa5egnb6iEifRP +dwduE2DtffUXw0wJFUUOcl/eIUAs6vspFzslpB9GH6KIPH9D7M00XyUU/Mfl +Higm4IFt1XeBRCUcIGa2VZURcHKv4HHVTCX8t/FYVTSHAKtUZzGzK0por3mx +yYJLQPubMZ3jHCW8snr450OCgHE3lfDf75RQRFuLOFZOQEVkiKD4oBL6/Gi8 +Q68g4MTlh9laY0o4GF7sUU9atH9rdRAvBRNPfP8y9YCAtkU37OJFKdjqF/U0 +qZKAHJVfHwqkKZjweshfvoqAlTtTePrXUDDmXtlbjWoCxhLepc/rU3DDgC+n +lPS9O+oqCkDBELEIO60aAszGai1dt1CQYEc+pzwkwPvQZNKLoxS0Zd1d+vIR +AWoXzBS/xVIw6p6ThNbj/8/P2WLBNPJ8wi8HkkhHzq1+bVZAQZUAsW+MWgJM +KRF+viUUZPmaKieQFsLGX8cfULBNmbamnXTWKW+pyhcU9Gt9WuxTR4DXjaKb +nZ0UPHJCUCOXtPLTGcZEPwWVo/tPdJP+OmzZIv6dgk0Z6YXi9QSUiWR6aE9S +8HqjR6EF6QiN/u92CxS8f/T4yVDSJvaax3cLU7FoP0v3Kmn+kEixBAkqvrzd +87CR9Iv0p7k3lKj4+1Se+hfSmYSkbsNKKgYUvtnL30CAR4dffb8uFduWVKRT +SdOnS7b8M6Yie+ri+fWkh2XnBhWsqPh2uvHYBtKlRjbhTAcqLoycsnQhHe51 +XnCrBxVl51R+eZNmnRjIDgugYtq536cCSPPl6azJCKbijX1mc4Gkn9Udry49 +TMUdsX5e/qTTBp7ZvYyhYjb1+g0v0lv5ZXu/pZBu9HjnSJqyMnC/0AUq2uCH +GTPSQ9ZcHvVrVPyRF8WvQ/ru7oV08yIqahlc5pEjHZpip+J3n4qdZxO+z5Pf +16jk4r0Tj6nYcSz3aS9pi7et82PNVPygEy7+iLQ9z+INPv9R8fUbWsdF0m6r +mWmveqh4yrBa4iBpf6fgdzBExQMa21utSAcfva5cNkbF6e3rBGRJHy7o2kOb +oWL0iU01Q+T9szpKPxnFT0PF5J7CcNLPl9VcNxShoZ9neh+TtEOBa/O4GA1j +XkrkzJLz4fkyWdxPloYdPqKXg0n3+6kbyCnR0PXW8yEV0jumaj3e0GlY9/Fr +eQc5fyHUqeuma2mo4NP3+//zOUmkNc9q01Dyr8D2TnJ+I63XjnL0abjXQMsr +knTsAV8DZRMahiyozVaQ857T8KyZ15GGArZZU8JkHqhugaNVLjTUlkkdyiLz +UjCyIB7qQcNber+CKKRLpdZ7DvjTsLiwnqFG5q1xZ+5oQzgNxe/QhEXIfNrM +MVccO0peb174SSSZ39a0dgP9KBrGBiyiDZN5f1cpHFWQSMObb/5WPLhP5nNJ +2IrYyzSkO0Rk6JL9EJonxmBfo+H3JJWgeLI/ZvRve07eoKG8TPnwO7Jf+Lx7 +CwJLadj6NPFLGNk/smXWDKt6Gn4W/CNwiuynKxYDnv+aaPjr4scNj+6SeXp3 +PKr8OQ3b0quNp8g+0+QlWtQ7aDj1xNPUi+w7M2clL8FhGmY5iw7zFBKwd+Zn +VPNSOg6FFTUU55LzcmCH9OcVdJwTHqjNJftU6Ft3EZ8sHW++ujR55goBN3oa +Ok2U6Zisay3qQ/Zx76MsjfsGdHxs/lSp/TwBm2OZXdd86Hh6/UH7JWfI+f1X +vO9xAB13WJqfrUsm+yRcme9DEB0HMweVw5IISNi1REs2jI7fVp+xaSX3R+3G +D6dSE+hoc977iWsMuQ9WRGsf5ZAOgEVV5P7hSZ5szC6no6H3PVODQ+Tvzbfb +o7yaju/3Mn6WkPtqz6RT7M8ndBSfzirIIvdbQZdqz85uOgbarTxruJvct7nN +cc58yuil90W4k9yPs2uX92q6KGNXJuXgMSBg6op89DoPZRw9cMIsk03AxDI1 +VaaPMt51e9lz05i8f7+Zuy2ClJH+yDekkUHuv2r/KY/jyvh5yZUt77TJfG+s +EEu4oYwdIiHn91DJedvjDZ8mlZHfvO+FyRwXLnzY9enLH2U8ZWls8muWC+c2 +h8aOLiijmdooN3+aC6nrEp7PCKvgxPLG4j+/uBDzl7N1GUUF7286pBT/lQt7 +kvlDWFYqSCc0EyTI5xFW0d288+dVsCztZ41gMRd6aEW5lpdUMKpRQfvMHS5E +nr99dSJXBa/UX2Mtv8WFiuibl51uq+AblWntZde5oOeWly1Wo4L6Fx2uj2dz +YTX/ubS4jyoo5tEnZ36aC9I+R6PCNVRxM9+Usa47F36usPV1rVfF+Yynt5Lm +ODCY4ut6UFAdHzKlKsXlOGDzI8JmyGAlTo7VSw2uLoMRf6HQeydXYdS486Gt +yiXk874Mb3z9asyKEv60o7cIVrxUTy37sQYXy1iJiN+7DYoJpQ4GBhoY0lcx +WOxWCNlrmcsldmpihml94ajGDXgmb7r+d7oWWoYmW8ooXAcjxfo07U5t3D4Q +uMxhIg/E+PLD/GJ08PLW2c97Fa8CJZrKclfXxfZVViVBFjkgrOZV7vRUF980 +LZ9te3YetNhypRHb9NCIefLplvZMONi7osGWZx1qCb4KDBxJgx+/U1xsstfh +yL0EpYfzKbBBuynHRlMfu8/ct4h/nACPfhv/nW7Vx16LfzbjnNMQrKHX/SZw +Pd5bumntt8BoYI8FtLsLG6BlWoaQSe4xsFSV3bQ03wA/CpSbFZRFwKqopMP1 +DAbavK8dqUsNhRrjG/x2RgyEHL0YPBEKDtOPMzpYDPxomNTwbF8oHA6evDts +ykAi+K8u76ZQaPby/Shmx8DeuATpuSWhsItpYOvpy8CZt45N0ikH4favjwoT +CQy8lRyu9+jcAVgTyHys1s3Ae8Oth2XP7IezyvZ/Tr1n4CXRTkpA6H6Y6Nu+ +/lMvAx8F5Z+pc98PjzxSiq4OMFBOJziPo74fnBz6LsiMMtAi+9iFwLpgOGIc +GyLMY4jHP+VWSP7ZB83ib+ijaoaYPp6UvvnwXgh8tOv0vQOG6Jy+OJ19MwjG +9n2LsAwzROUfAnJfUoPgsNLePZ3hhvjUmfshPyIIko7td5o5Sr4vUDXuYBME +ZUbhNFacIaa+thGKG90Fc+WnahpyDLGDNuxty9wFGaVXJ/5rMMRMd5ODPz7s +gMd57QE/pZg4uvhBvIt7APTb0X3CZZkY3tfsnGEVADyz+9z/yjMx9PJF9d51 +AWDmKGjPT2OiU4M8N18sAJoWGTHk1jAxNqjFq7fRH15szxU2NWHiqxDPEhl9 +f+hW3V2StoOJLpprDjgobYeJWwvT2hVMrIutZHfJ+sJnV6u8xEomLn5+/Xym +iC90LT5jPVDNRLtMjvC9GR+o9pW/eL6WiUKlMiLLa30gRna90XwLExNX6lx7 +tdkHlifsPvbsPROfSH/66xvqDRo7O3gCeY0wMf+I7t5nXuCvViScs8kImWKT +Lgb33SHyifdudQcjPN6b6d5+yR3SAlc85zoZoW9kWVRCjDvU3DiS8nyrEVYJ +Ws3qObiDpLr1snk/I2yq/tCeOuIGTepDkr7hRphKMXRzXu0Ga1ZRaeq55PH1 +GXa3ua7wc02mAXfcCLXVdtqsXeQMXS/QUuK3ET7ilRrWHdsCtcFjW8ImjZC3 +UjvFumcLpHJtDhj8MULT94srbtzfAmuMeO5W8RljTsaoG2XPFthus4/eIG2M +rUaOP/51OUH7zg2i7Sxj/EiJK9KudYQHBX8/TiYYo2oLp+Fr6GYwMA+btk02 +RqOT+/W/uGyG+x9HRPPOGOP5odJN/xibgUvpZdhmGOMiuXKtI3P2cDe79szV +S8b4JHp5Xm6cPeSlxDI3lBijGYqI5uZugsSwZenZbcY4apKRNDywETwsVNCY +wsL3UvbPn3OsYb5dSKyBxsJBoXaRnAvWkBc41mOrwsIWR3CNPm4Nn+MqIzxW +sfBvx++HOTbWcLBlc+kRPRZOlwmnTX3aAEn2xygPrFg45n8tAOU3QJVbx5z+ +fhaec+J/kJZjCQr74iu1almoF129ZuyDGaQu7FifXM9C8+msrIZnZsCbYcX5 +0sjC218aC+9UmMG3cv7beS0sdIy3TixON4MqntPZK9pYuMNa8P5pKzPwOBcV +MTVEfj6rq8F7CVPIrj6y/tESNqpq3DKru4ggau/OkRdjY/ff6zVlCQhR/Yaa +EcvZOEm5uKosAmEX/4yqjhQb2zco5ve6IDA2h0vmU9go/G9t6cwKhM5PB3/H +6rLx7Yu4zrU0ACmRvZxNW9k4xfT+Z7iWDQXmxyPH3dno+yevYpswG/SOp5pn +erHx7K6TePMLC+zHyzq6/Nh4yeqQcX4BC+I6J2f997JR6HapvhmNBTP5J80i +o9m4CTOO8lOMods4s+1mERsf9TvWPdBjwq5DBZdtStiYli18QVaKCVMl9wNH +ytjY+qUIsqcNYYVy17RuORtdOWfTpmoMYaOQkuLDWjZ61+h+XmtjCDXtNwPa +Otg4LkD18NnJAFuxB5rhXWxkeWh6l2xkQNeGlinZHjb23w3xVNBhwETV9wTv +fjautfZrtZ81AM1rOsVfv7GxiicpTPaMAdR0m4anjLIxNIZFcz5oALaSW0B7 +nI2WwRIf7241gB3xh96ETbKRR6ZH976yAUzUxuXIzLDJ/589iQFCBhDz54J/ +1R82lkpT4nXG1sNy/dsa2+bZ6BA4uFSufT1c3Vc1ubDAxnj5WF5K1Xr4H0nd +1sY= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VA8XB3CRNSnZt1lsbfZkDDPOsYYkhGxZQqVFiihtKLtkSUkLSalk +mblFlsqWaFH9LIlCoVRIZS3y3veveT7PPPfembnn+z136Nv3OwXy8vDwGC7i +4fn/61RvS6NqcoFJxOr8hSE7S5P2q7JHTLtiQFlOyWAuUQVQ6tV22a4MEN8w +NtuauA7CHe685evKh9GYCyqlieYgPiaTMfuWC/8ZNG+NTNwCfTX2+yfe1oN1 +okDoiwR/sFL99uHn2//Ae8OrmpVxoTD7lpE1/vYT7JqSarh29BQ0mBcWvMn/ +DV4azoqvFc+BYl/l5+0a88CSGvJoPnAFJPf63BE058PAnZI/Voldhwxdq2p7 +FyHspfcthO8qhHfZOrU/ly9F6+9qOqWSRZBccPIVr5w4/noroD+UWQK2+kEr +pFTEsa1fQ+FsXgkINTq5rNQUx2+L+GJ0ikvg9IBaz0ZTcez3Vn/i3lQCx5Rf +fD4XJI5HiyZ6LWdKIDhP9p96lTjObP7qEeNRCo6XORobPVegatbmJBPRMpA5 +N5CYeUUCP6SnPuF/WAaya++fnrkpgTOfP0YP15WBfH3cyW1lEvhyUtT1aVMZ +UMZXH1rZIIGyUbnmR16XgZpdiG/1sAROwIJKyUAZrFs8bzCwThInffqjPIU5 +sDlMelDvmSS6udSvq3PkgMOS4d4LbZJ40oL1Xc2VA075le/m3kti5VKpojgP +Dri+9nrV9EMS60+7mbH8ObBN43qVh5QULhMva4wI48CeQe30GF8pDOh61aJ9 +ngPxzjYm/01JofrakOJrnRyQv9cqz7tIGkNrHtR0d3OgRMJ5WneJNI42XpJe +1seBzv+8y9Kp0hgYp3k76AsHVB3DlB2tpVGj7a3Z52kO1G/KFXh9URo5Hzly +8zJcmLeabH3JkkGHjCnbPGcupN2MLJq3kkH/lcKuZm5cUBXgSdB0lMHTTqGF +fZ5csHsiYnomUAYf7rJTEvXnQo45jbBLlUG5/IMuGge4YIgbLzzvk0EqQ2pR +UgoXQpnXfFpiZNFcQWK26jEXbPPEJjamyKJUHLhm1HNBWfBYQmuWLMqV+2QH +PuHC63ZXTtstWfwQY/Fi4RkXtEJE+XpbZfG9zIEZ3k4uDN+MuPlLXg5tludn +WXzngpek/agCIYfmfVYt5SsIWHe0OvpqjRxqcy6ZLpEiQOTTKml6kxzKWX0v +9JQhoLKUD9TfyWF24R8YVyBAemNlms6CHIqPF94aViXgdbSqvuVGeayRMayQ +NiDA4sefyOABeeyug6+7XQg4Yn1uTd2IPN479LJVfysBJdc0uyWm5LErYabr +jxsBss6+zEohBRx4qr/tqBcBIw+eTPNpKeDJZSPr7P0JyIxJC7t4WAFn3OMz +jUMIaO5ZrToSrYAPt0ryNR8gYE6/oc0kWQEVC/nyHEIJ2PFlUm/wigISlwMC +XMMJMLLz/KnVoIB3V/9aqX+MgE9S6sGNSxXR4J2WKjOeAJn9j5VkZBRRsUWY +SEggwK7Z7WUQTRFfnGIfaU8koDwyWWPZOkVc+d6lxDeFgKS+8W/uboo4sl62 +dWM6AXq3q3f+yFdENkif2JdDwE5eFxmzu4pYNenbHnWJgMueY03n7iviZzWV +fWmXCRAQo6sbNSvigu78roKrBHQfjBs8PaqIVyXfXM3NJyCa5egnb6iEifRP +dwduE2DtffUXw0wJFUUOcl/eIUAs6vspFzslpB9GH6KIPH9D7M00XyUU/Mfl +Higm4IFt1XeBRCUcIGa2VZURcHKv4HHVTCX8t/FYVTSHAKtUZzGzK0por3mx +yYJLQPubMZ3jHCW8snr450OCgHE3lfDf75RQRFuLOFZOQEVkiKD4oBL6/Gi8 +Q68g4MTlh9laY0o4GF7sUU9atH9rdRAvBRNPfP8y9YCAtkU37OJFKdjqF/U0 +qZKAHJVfHwqkKZjweshfvoqAlTtTePrXUDDmXtlbjWoCxhLepc/rU3DDgC+n +lPS9O+oqCkDBELEIO60aAszGai1dt1CQYEc+pzwkwPvQZNKLoxS0Zd1d+vIR +AWoXzBS/xVIw6p6ThNbj/8/P2WLBNPJ8wi8HkkhHzq1+bVZAQZUAsW+MWgJM +KRF+viUUZPmaKieQFsLGX8cfULBNmbamnXTWKW+pyhcU9Gt9WuxTR4DXjaKb +nZ0UPHJCUCOXtPLTGcZEPwWVo/tPdJP+OmzZIv6dgk0Z6YXi9QSUiWR6aE9S +8HqjR6EF6QiN/u92CxS8f/T4yVDSJvaax3cLU7FoP0v3Kmn+kEixBAkqvrzd +87CR9Iv0p7k3lKj4+1Se+hfSmYSkbsNKKgYUvtnL30CAR4dffb8uFduWVKRT +SdOnS7b8M6Yie+ri+fWkh2XnBhWsqPh2uvHYBtKlRjbhTAcqLoycsnQhHe51 +XnCrBxVl51R+eZNmnRjIDgugYtq536cCSPPl6azJCKbijX1mc4Gkn9Udry49 +TMUdsX5e/qTTBp7ZvYyhYjb1+g0v0lv5ZXu/pZBu9HjnSJqyMnC/0AUq2uCH +GTPSQ9ZcHvVrVPyRF8WvQ/ru7oV08yIqahlc5pEjHZpip+J3n4qdZxO+z5Pf +16jk4r0Tj6nYcSz3aS9pi7et82PNVPygEy7+iLQ9z+INPv9R8fUbWsdF0m6r +mWmveqh4yrBa4iBpf6fgdzBExQMa21utSAcfva5cNkbF6e3rBGRJHy7o2kOb +oWL0iU01Q+T9szpKPxnFT0PF5J7CcNLPl9VcNxShoZ9neh+TtEOBa/O4GA1j +XkrkzJLz4fkyWdxPloYdPqKXg0n3+6kbyCnR0PXW8yEV0jumaj3e0GlY9/Fr +eQc5fyHUqeuma2mo4NP3+//zOUmkNc9q01Dyr8D2TnJ+I63XjnL0abjXQMsr +knTsAV8DZRMahiyozVaQ857T8KyZ15GGArZZU8JkHqhugaNVLjTUlkkdyiLz +UjCyIB7qQcNber+CKKRLpdZ7DvjTsLiwnqFG5q1xZ+5oQzgNxe/QhEXIfNrM +MVccO0peb174SSSZ39a0dgP9KBrGBiyiDZN5f1cpHFWQSMObb/5WPLhP5nNJ +2IrYyzSkO0Rk6JL9EJonxmBfo+H3JJWgeLI/ZvRve07eoKG8TPnwO7Jf+Lx7 +CwJLadj6NPFLGNk/smXWDKt6Gn4W/CNwiuynKxYDnv+aaPjr4scNj+6SeXp3 +PKr8OQ3b0quNp8g+0+QlWtQ7aDj1xNPUi+w7M2clL8FhGmY5iw7zFBKwd+Zn +VPNSOg6FFTUU55LzcmCH9OcVdJwTHqjNJftU6Ft3EZ8sHW++ujR55goBN3oa +Ok2U6Zisay3qQ/Zx76MsjfsGdHxs/lSp/TwBm2OZXdd86Hh6/UH7JWfI+f1X +vO9xAB13WJqfrUsm+yRcme9DEB0HMweVw5IISNi1REs2jI7fVp+xaSX3R+3G +D6dSE+hoc977iWsMuQ9WRGsf5ZAOgEVV5P7hSZ5szC6no6H3PVODQ+Tvzbfb +o7yaju/3Mn6WkPtqz6RT7M8ndBSfzirIIvdbQZdqz85uOgbarTxruJvct7nN +cc58yuil90W4k9yPs2uX92q6KGNXJuXgMSBg6op89DoPZRw9cMIsk03AxDI1 +VaaPMt51e9lz05i8f7+Zuy2ClJH+yDekkUHuv2r/KY/jyvh5yZUt77TJfG+s +EEu4oYwdIiHn91DJedvjDZ8mlZHfvO+FyRwXLnzY9enLH2U8ZWls8muWC+c2 +h8aOLiijmdooN3+aC6nrEp7PCKvgxPLG4j+/uBDzl7N1GUUF7286pBT/lQt7 +kvlDWFYqSCc0EyTI5xFW0d288+dVsCztZ41gMRd6aEW5lpdUMKpRQfvMHS5E +nr99dSJXBa/UX2Mtv8WFiuibl51uq+AblWntZde5oOeWly1Wo4L6Fx2uj2dz +YTX/ubS4jyoo5tEnZ36aC9I+R6PCNVRxM9+Usa47F36usPV1rVfF+Yynt5Lm +ODCY4ut6UFAdHzKlKsXlOGDzI8JmyGAlTo7VSw2uLoMRf6HQeydXYdS486Gt +yiXk874Mb3z9asyKEv60o7cIVrxUTy37sQYXy1iJiN+7DYoJpQ4GBhoY0lcx +WOxWCNlrmcsldmpihml94ajGDXgmb7r+d7oWWoYmW8ooXAcjxfo07U5t3D4Q +uMxhIg/E+PLD/GJ08PLW2c97Fa8CJZrKclfXxfZVViVBFjkgrOZV7vRUF980 +LZ9te3YetNhypRHb9NCIefLplvZMONi7osGWZx1qCb4KDBxJgx+/U1xsstfh +yL0EpYfzKbBBuynHRlMfu8/ct4h/nACPfhv/nW7Vx16LfzbjnNMQrKHX/SZw +Pd5bumntt8BoYI8FtLsLG6BlWoaQSe4xsFSV3bQ03wA/CpSbFZRFwKqopMP1 +DAbavK8dqUsNhRrjG/x2RgyEHL0YPBEKDtOPMzpYDPxomNTwbF8oHA6evDts +ykAi+K8u76ZQaPby/Shmx8DeuATpuSWhsItpYOvpy8CZt45N0ikH4favjwoT +CQy8lRyu9+jcAVgTyHys1s3Ae8Oth2XP7IezyvZ/Tr1n4CXRTkpA6H6Y6Nu+ +/lMvAx8F5Z+pc98PjzxSiq4OMFBOJziPo74fnBz6LsiMMtAi+9iFwLpgOGIc +GyLMY4jHP+VWSP7ZB83ib+ijaoaYPp6UvvnwXgh8tOv0vQOG6Jy+OJ19MwjG +9n2LsAwzROUfAnJfUoPgsNLePZ3hhvjUmfshPyIIko7td5o5Sr4vUDXuYBME +ZUbhNFacIaa+thGKG90Fc+WnahpyDLGDNuxty9wFGaVXJ/5rMMRMd5ODPz7s +gMd57QE/pZg4uvhBvIt7APTb0X3CZZkY3tfsnGEVADyz+9z/yjMx9PJF9d51 +AWDmKGjPT2OiU4M8N18sAJoWGTHk1jAxNqjFq7fRH15szxU2NWHiqxDPEhl9 +f+hW3V2StoOJLpprDjgobYeJWwvT2hVMrIutZHfJ+sJnV6u8xEomLn5+/Xym +iC90LT5jPVDNRLtMjvC9GR+o9pW/eL6WiUKlMiLLa30gRna90XwLExNX6lx7 +tdkHlifsPvbsPROfSH/66xvqDRo7O3gCeY0wMf+I7t5nXuCvViScs8kImWKT +Lgb33SHyifdudQcjPN6b6d5+yR3SAlc85zoZoW9kWVRCjDvU3DiS8nyrEVYJ +Ws3qObiDpLr1snk/I2yq/tCeOuIGTepDkr7hRphKMXRzXu0Ga1ZRaeq55PH1 +GXa3ua7wc02mAXfcCLXVdtqsXeQMXS/QUuK3ET7ilRrWHdsCtcFjW8ImjZC3 +UjvFumcLpHJtDhj8MULT94srbtzfAmuMeO5W8RljTsaoG2XPFthus4/eIG2M +rUaOP/51OUH7zg2i7Sxj/EiJK9KudYQHBX8/TiYYo2oLp+Fr6GYwMA+btk02 +RqOT+/W/uGyG+x9HRPPOGOP5odJN/xibgUvpZdhmGOMiuXKtI3P2cDe79szV +S8b4JHp5Xm6cPeSlxDI3lBijGYqI5uZugsSwZenZbcY4apKRNDywETwsVNCY +wsL3UvbPn3OsYb5dSKyBxsJBoXaRnAvWkBc41mOrwsIWR3CNPm4Nn+MqIzxW +sfBvx++HOTbWcLBlc+kRPRZOlwmnTX3aAEn2xygPrFg45n8tAOU3QJVbx5z+ +fhaec+J/kJZjCQr74iu1almoF129ZuyDGaQu7FifXM9C8+msrIZnZsCbYcX5 +0sjC218aC+9UmMG3cv7beS0sdIy3TixON4MqntPZK9pYuMNa8P5pKzPwOBcV +MTVEfj6rq8F7CVPIrj6y/tESNqpq3DKru4ggau/OkRdjY/ff6zVlCQhR/Yaa +EcvZOEm5uKosAmEX/4yqjhQb2zco5ve6IDA2h0vmU9go/G9t6cwKhM5PB3/H +6rLx7Yu4zrU0ACmRvZxNW9k4xfT+Z7iWDQXmxyPH3dno+yevYpswG/SOp5pn +erHx7K6TePMLC+zHyzq6/Nh4yeqQcX4BC+I6J2f997JR6HapvhmNBTP5J80i +o9m4CTOO8lOMods4s+1mERsf9TvWPdBjwq5DBZdtStiYli18QVaKCVMl9wNH +ytjY+qUIsqcNYYVy17RuORtdOWfTpmoMYaOQkuLDWjZ61+h+XmtjCDXtNwPa +Otg4LkD18NnJAFuxB5rhXWxkeWh6l2xkQNeGlinZHjb23w3xVNBhwETV9wTv +fjautfZrtZ81AM1rOsVfv7GxiicpTPaMAdR0m4anjLIxNIZFcz5oALaSW0B7 +nI2WwRIf7241gB3xh96ETbKRR6ZH976yAUzUxuXIzLDJ/589iQFCBhDz54J/ +1R82lkpT4nXG1sNy/dsa2+bZ6BA4uFSufT1c3Vc1ubDAxnj5WF5K1Xr4H0nd +1sY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0772002926700482}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0772002926700482}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VA8XB3CRNSnZt1lsbfZkDDPOsYYkhGxZQqVFiihtKLtkSUkLSalk +mblFlsqWaFH9LIlCoVRIZS3y3veveT7PPPfembnn+z136Nv3OwXy8vDwGC7i +4fn/61RvS6NqcoFJxOr8hSE7S5P2q7JHTLtiQFlOyWAuUQVQ6tV22a4MEN8w +NtuauA7CHe685evKh9GYCyqlieYgPiaTMfuWC/8ZNG+NTNwCfTX2+yfe1oN1 +okDoiwR/sFL99uHn2//Ae8OrmpVxoTD7lpE1/vYT7JqSarh29BQ0mBcWvMn/ +DV4azoqvFc+BYl/l5+0a88CSGvJoPnAFJPf63BE058PAnZI/Voldhwxdq2p7 +FyHspfcthO8qhHfZOrU/ly9F6+9qOqWSRZBccPIVr5w4/noroD+UWQK2+kEr +pFTEsa1fQ+FsXgkINTq5rNQUx2+L+GJ0ikvg9IBaz0ZTcez3Vn/i3lQCx5Rf +fD4XJI5HiyZ6LWdKIDhP9p96lTjObP7qEeNRCo6XORobPVegatbmJBPRMpA5 +N5CYeUUCP6SnPuF/WAaya++fnrkpgTOfP0YP15WBfH3cyW1lEvhyUtT1aVMZ +UMZXH1rZIIGyUbnmR16XgZpdiG/1sAROwIJKyUAZrFs8bzCwThInffqjPIU5 +sDlMelDvmSS6udSvq3PkgMOS4d4LbZJ40oL1Xc2VA075le/m3kti5VKpojgP +Dri+9nrV9EMS60+7mbH8ObBN43qVh5QULhMva4wI48CeQe30GF8pDOh61aJ9 +ngPxzjYm/01JofrakOJrnRyQv9cqz7tIGkNrHtR0d3OgRMJ5WneJNI42XpJe +1seBzv+8y9Kp0hgYp3k76AsHVB3DlB2tpVGj7a3Z52kO1G/KFXh9URo5Hzly +8zJcmLeabH3JkkGHjCnbPGcupN2MLJq3kkH/lcKuZm5cUBXgSdB0lMHTTqGF +fZ5csHsiYnomUAYf7rJTEvXnQo45jbBLlUG5/IMuGge4YIgbLzzvk0EqQ2pR +UgoXQpnXfFpiZNFcQWK26jEXbPPEJjamyKJUHLhm1HNBWfBYQmuWLMqV+2QH +PuHC63ZXTtstWfwQY/Fi4RkXtEJE+XpbZfG9zIEZ3k4uDN+MuPlLXg5tludn +WXzngpek/agCIYfmfVYt5SsIWHe0OvpqjRxqcy6ZLpEiQOTTKml6kxzKWX0v +9JQhoLKUD9TfyWF24R8YVyBAemNlms6CHIqPF94aViXgdbSqvuVGeayRMayQ +NiDA4sefyOABeeyug6+7XQg4Yn1uTd2IPN479LJVfysBJdc0uyWm5LErYabr +jxsBss6+zEohBRx4qr/tqBcBIw+eTPNpKeDJZSPr7P0JyIxJC7t4WAFn3OMz +jUMIaO5ZrToSrYAPt0ryNR8gYE6/oc0kWQEVC/nyHEIJ2PFlUm/wigISlwMC +XMMJMLLz/KnVoIB3V/9aqX+MgE9S6sGNSxXR4J2WKjOeAJn9j5VkZBRRsUWY +SEggwK7Z7WUQTRFfnGIfaU8koDwyWWPZOkVc+d6lxDeFgKS+8W/uboo4sl62 +dWM6AXq3q3f+yFdENkif2JdDwE5eFxmzu4pYNenbHnWJgMueY03n7iviZzWV +fWmXCRAQo6sbNSvigu78roKrBHQfjBs8PaqIVyXfXM3NJyCa5egnb6iEifRP +dwduE2DtffUXw0wJFUUOcl/eIUAs6vspFzslpB9GH6KIPH9D7M00XyUU/Mfl +Higm4IFt1XeBRCUcIGa2VZURcHKv4HHVTCX8t/FYVTSHAKtUZzGzK0por3mx +yYJLQPubMZ3jHCW8snr450OCgHE3lfDf75RQRFuLOFZOQEVkiKD4oBL6/Gi8 +Q68g4MTlh9laY0o4GF7sUU9atH9rdRAvBRNPfP8y9YCAtkU37OJFKdjqF/U0 +qZKAHJVfHwqkKZjweshfvoqAlTtTePrXUDDmXtlbjWoCxhLepc/rU3DDgC+n +lPS9O+oqCkDBELEIO60aAszGai1dt1CQYEc+pzwkwPvQZNKLoxS0Zd1d+vIR +AWoXzBS/xVIw6p6ThNbj/8/P2WLBNPJ8wi8HkkhHzq1+bVZAQZUAsW+MWgJM +KRF+viUUZPmaKieQFsLGX8cfULBNmbamnXTWKW+pyhcU9Gt9WuxTR4DXjaKb +nZ0UPHJCUCOXtPLTGcZEPwWVo/tPdJP+OmzZIv6dgk0Z6YXi9QSUiWR6aE9S +8HqjR6EF6QiN/u92CxS8f/T4yVDSJvaax3cLU7FoP0v3Kmn+kEixBAkqvrzd +87CR9Iv0p7k3lKj4+1Se+hfSmYSkbsNKKgYUvtnL30CAR4dffb8uFduWVKRT +SdOnS7b8M6Yie+ri+fWkh2XnBhWsqPh2uvHYBtKlRjbhTAcqLoycsnQhHe51 +XnCrBxVl51R+eZNmnRjIDgugYtq536cCSPPl6azJCKbijX1mc4Gkn9Udry49 +TMUdsX5e/qTTBp7ZvYyhYjb1+g0v0lv5ZXu/pZBu9HjnSJqyMnC/0AUq2uCH +GTPSQ9ZcHvVrVPyRF8WvQ/ru7oV08yIqahlc5pEjHZpip+J3n4qdZxO+z5Pf +16jk4r0Tj6nYcSz3aS9pi7et82PNVPygEy7+iLQ9z+INPv9R8fUbWsdF0m6r +mWmveqh4yrBa4iBpf6fgdzBExQMa21utSAcfva5cNkbF6e3rBGRJHy7o2kOb +oWL0iU01Q+T9szpKPxnFT0PF5J7CcNLPl9VcNxShoZ9neh+TtEOBa/O4GA1j +XkrkzJLz4fkyWdxPloYdPqKXg0n3+6kbyCnR0PXW8yEV0jumaj3e0GlY9/Fr +eQc5fyHUqeuma2mo4NP3+//zOUmkNc9q01Dyr8D2TnJ+I63XjnL0abjXQMsr +knTsAV8DZRMahiyozVaQ857T8KyZ15GGArZZU8JkHqhugaNVLjTUlkkdyiLz +UjCyIB7qQcNber+CKKRLpdZ7DvjTsLiwnqFG5q1xZ+5oQzgNxe/QhEXIfNrM +MVccO0peb174SSSZ39a0dgP9KBrGBiyiDZN5f1cpHFWQSMObb/5WPLhP5nNJ +2IrYyzSkO0Rk6JL9EJonxmBfo+H3JJWgeLI/ZvRve07eoKG8TPnwO7Jf+Lx7 +CwJLadj6NPFLGNk/smXWDKt6Gn4W/CNwiuynKxYDnv+aaPjr4scNj+6SeXp3 +PKr8OQ3b0quNp8g+0+QlWtQ7aDj1xNPUi+w7M2clL8FhGmY5iw7zFBKwd+Zn +VPNSOg6FFTUU55LzcmCH9OcVdJwTHqjNJftU6Ft3EZ8sHW++ujR55goBN3oa +Ok2U6Zisay3qQ/Zx76MsjfsGdHxs/lSp/TwBm2OZXdd86Hh6/UH7JWfI+f1X +vO9xAB13WJqfrUsm+yRcme9DEB0HMweVw5IISNi1REs2jI7fVp+xaSX3R+3G +D6dSE+hoc977iWsMuQ9WRGsf5ZAOgEVV5P7hSZ5szC6no6H3PVODQ+Tvzbfb +o7yaju/3Mn6WkPtqz6RT7M8ndBSfzirIIvdbQZdqz85uOgbarTxruJvct7nN +cc58yuil90W4k9yPs2uX92q6KGNXJuXgMSBg6op89DoPZRw9cMIsk03AxDI1 +VaaPMt51e9lz05i8f7+Zuy2ClJH+yDekkUHuv2r/KY/jyvh5yZUt77TJfG+s +EEu4oYwdIiHn91DJedvjDZ8mlZHfvO+FyRwXLnzY9enLH2U8ZWls8muWC+c2 +h8aOLiijmdooN3+aC6nrEp7PCKvgxPLG4j+/uBDzl7N1GUUF7286pBT/lQt7 +kvlDWFYqSCc0EyTI5xFW0d288+dVsCztZ41gMRd6aEW5lpdUMKpRQfvMHS5E +nr99dSJXBa/UX2Mtv8WFiuibl51uq+AblWntZde5oOeWly1Wo4L6Fx2uj2dz +YTX/ubS4jyoo5tEnZ36aC9I+R6PCNVRxM9+Usa47F36usPV1rVfF+Yynt5Lm +ODCY4ut6UFAdHzKlKsXlOGDzI8JmyGAlTo7VSw2uLoMRf6HQeydXYdS486Gt +yiXk874Mb3z9asyKEv60o7cIVrxUTy37sQYXy1iJiN+7DYoJpQ4GBhoY0lcx +WOxWCNlrmcsldmpihml94ajGDXgmb7r+d7oWWoYmW8ooXAcjxfo07U5t3D4Q +uMxhIg/E+PLD/GJ08PLW2c97Fa8CJZrKclfXxfZVViVBFjkgrOZV7vRUF980 +LZ9te3YetNhypRHb9NCIefLplvZMONi7osGWZx1qCb4KDBxJgx+/U1xsstfh +yL0EpYfzKbBBuynHRlMfu8/ct4h/nACPfhv/nW7Vx16LfzbjnNMQrKHX/SZw +Pd5bumntt8BoYI8FtLsLG6BlWoaQSe4xsFSV3bQ03wA/CpSbFZRFwKqopMP1 +DAbavK8dqUsNhRrjG/x2RgyEHL0YPBEKDtOPMzpYDPxomNTwbF8oHA6evDts +ykAi+K8u76ZQaPby/Shmx8DeuATpuSWhsItpYOvpy8CZt45N0ikH4favjwoT +CQy8lRyu9+jcAVgTyHys1s3Ae8Oth2XP7IezyvZ/Tr1n4CXRTkpA6H6Y6Nu+ +/lMvAx8F5Z+pc98PjzxSiq4OMFBOJziPo74fnBz6LsiMMtAi+9iFwLpgOGIc +GyLMY4jHP+VWSP7ZB83ib+ijaoaYPp6UvvnwXgh8tOv0vQOG6Jy+OJ19MwjG +9n2LsAwzROUfAnJfUoPgsNLePZ3hhvjUmfshPyIIko7td5o5Sr4vUDXuYBME +ZUbhNFacIaa+thGKG90Fc+WnahpyDLGDNuxty9wFGaVXJ/5rMMRMd5ODPz7s +gMd57QE/pZg4uvhBvIt7APTb0X3CZZkY3tfsnGEVADyz+9z/yjMx9PJF9d51 +AWDmKGjPT2OiU4M8N18sAJoWGTHk1jAxNqjFq7fRH15szxU2NWHiqxDPEhl9 +f+hW3V2StoOJLpprDjgobYeJWwvT2hVMrIutZHfJ+sJnV6u8xEomLn5+/Xym +iC90LT5jPVDNRLtMjvC9GR+o9pW/eL6WiUKlMiLLa30gRna90XwLExNX6lx7 +tdkHlifsPvbsPROfSH/66xvqDRo7O3gCeY0wMf+I7t5nXuCvViScs8kImWKT +Lgb33SHyifdudQcjPN6b6d5+yR3SAlc85zoZoW9kWVRCjDvU3DiS8nyrEVYJ +Ws3qObiDpLr1snk/I2yq/tCeOuIGTepDkr7hRphKMXRzXu0Ga1ZRaeq55PH1 +GXa3ua7wc02mAXfcCLXVdtqsXeQMXS/QUuK3ET7ilRrWHdsCtcFjW8ImjZC3 +UjvFumcLpHJtDhj8MULT94srbtzfAmuMeO5W8RljTsaoG2XPFthus4/eIG2M +rUaOP/51OUH7zg2i7Sxj/EiJK9KudYQHBX8/TiYYo2oLp+Fr6GYwMA+btk02 +RqOT+/W/uGyG+x9HRPPOGOP5odJN/xibgUvpZdhmGOMiuXKtI3P2cDe79szV +S8b4JHp5Xm6cPeSlxDI3lBijGYqI5uZugsSwZenZbcY4apKRNDywETwsVNCY +wsL3UvbPn3OsYb5dSKyBxsJBoXaRnAvWkBc41mOrwsIWR3CNPm4Nn+MqIzxW +sfBvx++HOTbWcLBlc+kRPRZOlwmnTX3aAEn2xygPrFg45n8tAOU3QJVbx5z+ +fhaec+J/kJZjCQr74iu1almoF129ZuyDGaQu7FifXM9C8+msrIZnZsCbYcX5 +0sjC218aC+9UmMG3cv7beS0sdIy3TixON4MqntPZK9pYuMNa8P5pKzPwOBcV +MTVEfj6rq8F7CVPIrj6y/tESNqpq3DKru4ggau/OkRdjY/ff6zVlCQhR/Yaa +EcvZOEm5uKosAmEX/4yqjhQb2zco5ve6IDA2h0vmU9go/G9t6cwKhM5PB3/H +6rLx7Yu4zrU0ACmRvZxNW9k4xfT+Z7iWDQXmxyPH3dno+yevYpswG/SOp5pn +erHx7K6TePMLC+zHyzq6/Nh4yeqQcX4BC+I6J2f997JR6HapvhmNBTP5J80i +o9m4CTOO8lOMods4s+1mERsf9TvWPdBjwq5DBZdtStiYli18QVaKCVMl9wNH +ytjY+qUIsqcNYYVy17RuORtdOWfTpmoMYaOQkuLDWjZ61+h+XmtjCDXtNwPa +Otg4LkD18NnJAFuxB5rhXWxkeWh6l2xkQNeGlinZHjb23w3xVNBhwETV9wTv +fjautfZrtZ81AM1rOsVfv7GxiicpTPaMAdR0m4anjLIxNIZFcz5oALaSW0B7 +nI2WwRIf7241gB3xh96ETbKRR6ZH976yAUzUxuXIzLDJ/589iQFCBhDz54J/ +1R82lkpT4nXG1sNy/dsa2+bZ6BA4uFSufT1c3Vc1ubDAxnj5WF5K1Xr4H0nd +1sY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0772002926700482}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0772002926700482}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357655902561*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"44269e41-1a97-4999-9535-368c263cb7fe"] +}, Open ]], Cell[CellGroupData[{ @@ -13841,7 +15243,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "*", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -13859,8 +15263,8 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"(", FractionBox["1", - RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -13882,66 +15286,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[225]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], + "In[142]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5794624625701512`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 225, 201, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512859148*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.7749957631735324`*^-155\\\", \ +RowBox[{\\\"552513857212233842570175\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"108\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 142, 73, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994357655949821*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], +In[142]:=",ExpressionUUID->"8f643200-f220-418c-84e0-c0031d5240b6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.303016475329449`*^-178\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 225, 202, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512868147*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.811360538966727`*^-158\\\", \ +RowBox[{\\\"192330073695578600598678\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"112\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 142, 74, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994357655956848*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], +In[142]:=",ExpressionUUID->"b5024757-a5ee-4afa-aeec-1aa86e95553f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3647813242367804`*^-181\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 225, 203, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335128761463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.183945820817468`*^-161\\\", \ +RowBox[{\\\"692388265304082962155241\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"115\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 142, 75, + 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994357655965521*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], +In[142]:=",ExpressionUUID->"59e3e2f3-d4ac-4a85-868b-4faad77b42aa"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 225, 204, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512885145*^9}, +during this calculation.\"", 2, 142, 76, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994357655971705*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], +In[142]:=",ExpressionUUID->"6749f825-2dfc-48b4-a21e-cd558403bf35"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913335200445786`*^9}, +Cell[BoxData["9.665875677450723`"], "Output", + CellChangeTimes->{3.9913335200445786`*^9, 3.994357715854485*^9}, CellLabel-> - "Out[225]=",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] + "Out[142]=",ExpressionUUID->"8a12ea3e-61fb-4ecc-b587-86d0f91577b5"] }, Open ]], Cell[CellGroupData[{ @@ -14008,68 +15419,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491385551624`*^9, - 3.991849142620474*^9}},ExpressionUUID->"f2835c98-560f-8e47-bdab-\ -0d2700971836"], + CellChangeTimes->{{3.9918491385551624`*^9, 3.991849142620474*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 226, 205, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200775414`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.459568573313842`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 143, 77, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357715892377*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], +In[143]:=",ExpressionUUID->"1e5b9b86-f0da-4544-bce0-c0c3f8a3fe7f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 206, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200875454`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.785162836721694`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 143, 78, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357715899527*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], +In[143]:=",ExpressionUUID->"2c4d94e4-d860-4ea6-a51d-5d5af1f80ee7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 207, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200945435`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8718093579639622`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 143, 79, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.9943577159077044`*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], +In[143]:=",ExpressionUUID->"0d0ce7e3-1a7e-4c75-8798-937a5851c47e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 226, 208, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335201035423`*^9}, +during this calculation.\"", 2, 143, 80, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994357715915085*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], +In[143]:=",ExpressionUUID->"09822309-ee97-4866-8ca0-446d6b63afc6"], -Cell[BoxData["0.7348275136088338`"], "Output", - CellChangeTimes->{3.9913335271231823`*^9}, +Cell[BoxData["0.6165139033736661`"], "Output", + CellChangeTimes->{3.9913335271231823`*^9, 3.99435772408092*^9}, CellLabel-> - "Out[226]=",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] + "Out[143]=",ExpressionUUID->"f2aae503-903f-46dc-8e7b-cd8cadbda2e8"] }, Open ]], Cell[CellGroupData[{ @@ -14090,8 +15505,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14136,68 +15550,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849146408966*^9, - 3.9918491485488663`*^9}},ExpressionUUID->"ca837916-250f-4d4e-8368-\ -5a08f479e656"], + CellChangeTimes->{{3.991849146408966*^9, 3.9918491485488663`*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 227, 209, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271591835`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.459568573313842`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 144, 81, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994357724120875*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], +In[144]:=",ExpressionUUID->"1fd0fac6-24e8-497a-bf18-e8a0ab49a97a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 210, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271681843`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.785162836721694`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 144, 82, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994357724130803*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], +In[144]:=",ExpressionUUID->"b32a5f91-7e8b-4dfe-8b6f-d88461aff67b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 211, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527176182*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8718093579639622`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 144, 83, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994357724139537*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], +In[144]:=",ExpressionUUID->"aa4254ac-020d-457a-9ea5-27ea6c86572a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 227, 212, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527184183*^9}, +during this calculation.\"", 2, 144, 84, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.9943577241485453`*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], +In[144]:=",ExpressionUUID->"a6a0e96c-2488-40a5-849f-af9ef1bedb19"], -Cell[BoxData["5.221864211842707`"], "Output", - CellChangeTimes->{3.9913335331581306`*^9}, +Cell[BoxData["26.492993154469445`"], "Output", + CellChangeTimes->{3.9913335331581306`*^9, 3.9943577320379143`*^9}, CellLabel-> - "Out[227]=",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] + "Out[144]=",ExpressionUUID->"b150f23d-c86a-46a6-9962-0707a461ae71"] }, Open ]], Cell[CellGroupData[{ @@ -14218,8 +15636,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14264,68 +15681,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491518098984`*^9, - 3.9918491543107758`*^9}},ExpressionUUID->"b579991f-985b-234a-94aa-\ -ed18c097f8c0"], + CellChangeTimes->{{3.9918491518098984`*^9, 3.9918491543107758`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 228, 213, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335331923027`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.459568573313842`*^-201\\\", \ +RowBox[{\\\"706640776532825937191303\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"60\\\", \\\"\[RightSkeleton]\\\"}], \\\"2006784000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 145, 85, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994357732079753*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], +In[145]:=",ExpressionUUID->"de98b6a8-73e8-4ef6-a92d-761154732e2a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 214, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533202278*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.785162836721694`*^-206\\\", \ +RowBox[{\\\"143094757247897252281238\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"64\\\", \\\"\[RightSkeleton]\\\"}], \\\"3737600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 145, 86, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.99435773208893*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], +In[145]:=",ExpressionUUID->"77f12d01-b71e-403f-a7d2-20749e0c55dc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 215, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335332102795`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8718093579639622`*^-210\\\", \ +RowBox[{\\\"302788506336550585827101\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\ +\"67\\\", \\\"\[RightSkeleton]\\\"}], \\\"8761600000000000000000000\\\"}]]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 145, 87, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994357732097127*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], +In[145]:=",ExpressionUUID->"d663e0ab-6cdb-49a0-a107-231e59c2510c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 228, 216, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533218281*^9}, +during this calculation.\"", 2, 145, 88, 31388289691059288762, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994357732104843*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], +In[145]:=",ExpressionUUID->"581fd853-43f0-4f40-bbff-de339a2489f7"], -Cell[BoxData["15.545902834190647`"], "Output", - CellChangeTimes->{3.9913335366055527`*^9}, +Cell[BoxData["4.4342886741268215`"], "Output", + CellChangeTimes->{3.9913335366055527`*^9, 3.994357737157031*^9}, CellLabel-> - "Out[228]=",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] + "Out[145]=",ExpressionUUID->"5f40632c-2610-4bed-80b2-25a6b1eeae9b"] }, Open ]], Cell[CellGroupData[{ @@ -14334,21 +15755,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918491594691143`*^9, - 3.9918491632611027`*^9}},ExpressionUUID->"afb7855c-8700-d444-926c-\ -6d96abe14e67"], - -Cell[BoxData["0.08155763943441016`"], "Output", - CellChangeTimes->{3.9913335366395893`*^9}, + CellChangeTimes->{{3.9918491594691143`*^9, 3.9918491632611027`*^9}}, CellLabel-> - "Out[229]=",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] + "In[146]:=",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], + +Cell[BoxData["0.0568807586536988`"], "Output", + CellChangeTimes->{3.9913335366395893`*^9, 3.994357737206788*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"b9f1979d-37a2-4eb1-b6c1-e20d9108e35b"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"2809d080-4c9b-47b9-8022-1a475fefd15e"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"2809d080-4c9b-47b9-8022-1a475fefd15e"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {Automatic, 162}}, CellContext->Notebook, Magnification:>1.4 Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", @@ -14367,622 +15790,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 453, 8, 51, "Input",ExpressionUUID->"faf503b8-bf82-4409-955e-15ee2a94c2df"], -Cell[1032, 32, 302, 6, 58, "Output",ExpressionUUID->"7dcd0da0-ce28-451b-a6f6-179b3ac96f74"] +Cell[576, 22, 448, 7, 51, "Input",ExpressionUUID->"faf503b8-bf82-4409-955e-15ee2a94c2df"], +Cell[1027, 31, 341, 5, 58, "Output",ExpressionUUID->"814e3e8e-c0aa-4424-8c31-0630a938890a"] }, Open ]], Cell[CellGroupData[{ -Cell[1371, 43, 255, 5, 51, "Input",ExpressionUUID->"0482454e-7a46-47a1-a981-2b03e3a5820a"], -Cell[1629, 50, 305, 6, 58, "Output",ExpressionUUID->"1ed7fc2d-5475-4719-b897-23a712e44396"] +Cell[1405, 41, 250, 4, 51, "Input",ExpressionUUID->"0482454e-7a46-47a1-a981-2b03e3a5820a"], +Cell[1658, 47, 346, 5, 58, "Output",ExpressionUUID->"22beac2c-59c7-410a-b0a3-ef3994c1f869"] }, Open ]], Cell[CellGroupData[{ -Cell[1971, 61, 226, 5, 51, "Input",ExpressionUUID->"7e1f76b5-da0b-4708-bde6-bea9db2f787f"], -Cell[2200, 68, 300, 6, 58, "Output",ExpressionUUID->"231b5efc-c0ff-44c8-80cd-9f5ce3841156"] +Cell[2041, 57, 221, 4, 51, "Input",ExpressionUUID->"7e1f76b5-da0b-4708-bde6-bea9db2f787f"], +Cell[2265, 63, 341, 5, 58, "Output",ExpressionUUID->"0c0a13ff-5b00-4aa9-9383-95032e5312e4"] }, Open ]], Cell[CellGroupData[{ -Cell[2537, 79, 180, 4, 51, "Input",ExpressionUUID->"b59b5ec0-bdc8-4f20-8ee1-a8b6af224589"], -Cell[2720, 85, 303, 6, 58, "Output",ExpressionUUID->"bfce32fc-5e05-45d0-ba98-cb8aacbd0357"] +Cell[2643, 73, 175, 3, 51, "Input",ExpressionUUID->"b59b5ec0-bdc8-4f20-8ee1-a8b6af224589"], +Cell[2821, 78, 342, 5, 58, "Output",ExpressionUUID->"ddf5e378-7077-4367-944a-c38935b2ed2b"] }, Open ]], Cell[CellGroupData[{ -Cell[3060, 96, 262, 8, 74, "Input",ExpressionUUID->"20530379-6c67-4b6d-a3a2-80100049257f"], -Cell[3325, 106, 317, 6, 58, "Output",ExpressionUUID->"2811e28b-07ed-4573-8619-55ef8fba4b35"] +Cell[3200, 88, 257, 7, 74, "Input",ExpressionUUID->"20530379-6c67-4b6d-a3a2-80100049257f"], +Cell[3460, 97, 356, 5, 58, "Output",ExpressionUUID->"4fccee45-d122-4913-9fed-396096a33e86"] }, Open ]], Cell[CellGroupData[{ -Cell[3679, 117, 136, 3, 51, "Input",ExpressionUUID->"c131c4ba-350b-4e28-b404-b38b303d2bdb"], -Cell[3818, 122, 309, 6, 58, "Output",ExpressionUUID->"e7b4dc2b-fe02-46f7-8226-05931a569ef6"] +Cell[3853, 107, 131, 2, 51, "Input",ExpressionUUID->"c131c4ba-350b-4e28-b404-b38b303d2bdb"], +Cell[3987, 111, 350, 5, 58, "Output",ExpressionUUID->"25a19f85-5501-4638-a3ad-37744e7d709e"] }, Open ]], Cell[CellGroupData[{ -Cell[4164, 133, 281, 7, 51, "Input",ExpressionUUID->"7ccd5104-a703-429c-85c4-472095119179"], -Cell[4448, 142, 321, 6, 58, "Output",ExpressionUUID->"d45ef454-4988-408a-9c43-f12d9533a1f1"] +Cell[4374, 121, 276, 6, 51, "Input",ExpressionUUID->"7ccd5104-a703-429c-85c4-472095119179"], +Cell[4653, 129, 359, 5, 58, "Output",ExpressionUUID->"4bf1a7da-78c7-4084-9d7a-6e599db88e31"] }, Open ]], Cell[CellGroupData[{ -Cell[4806, 153, 262, 8, 51, "Input",ExpressionUUID->"d84fb6ac-5c42-4ded-b544-a8c4c222399e"], -Cell[5071, 163, 320, 6, 58, "Output",ExpressionUUID->"b36670ac-5411-489e-b5aa-4a880e403306"] +Cell[5049, 139, 257, 7, 51, "Input",ExpressionUUID->"d84fb6ac-5c42-4ded-b544-a8c4c222399e"], +Cell[5309, 148, 358, 5, 58, "Output",ExpressionUUID->"4a6f50d0-c9f0-4bf1-ba0e-ad1871beab23"] }, Open ]], Cell[CellGroupData[{ -Cell[5428, 174, 208, 4, 51, "Input",ExpressionUUID->"2ecbf9f4-05d6-4a3e-9036-ede71c8661a1"], -Cell[5639, 180, 288, 5, 58, "Output",ExpressionUUID->"efb938d7-4e73-414f-b299-17ae25e63fdd"] +Cell[5704, 158, 203, 3, 51, "Input",ExpressionUUID->"2ecbf9f4-05d6-4a3e-9036-ede71c8661a1"], +Cell[5910, 163, 335, 5, 58, "Output",ExpressionUUID->"c0531cb1-e00a-4769-91c8-714c3a1048a8"] }, Open ]], Cell[CellGroupData[{ -Cell[5964, 190, 210, 4, 51, "Input",ExpressionUUID->"e6a46019-5cb5-415d-bd52-06c6ee550cd5"], -Cell[6177, 196, 288, 5, 58, "Output",ExpressionUUID->"b2e5b6d7-26e6-4ab5-93b4-e436656232bf"] +Cell[6282, 173, 206, 3, 51, "Input",ExpressionUUID->"e6a46019-5cb5-415d-bd52-06c6ee550cd5"], +Cell[6491, 178, 332, 5, 58, "Output",ExpressionUUID->"bf203c90-71f7-4f16-9978-e58b1c6f1ef6"] }, Open ]], Cell[CellGroupData[{ -Cell[6502, 206, 133, 3, 51, "Input",ExpressionUUID->"4ef33a45-e772-4713-b351-ea3e169fd068"], -Cell[6638, 211, 300, 6, 58, "Output",ExpressionUUID->"d8af5bd4-2231-4326-b532-292130c5eddd"] +Cell[6860, 188, 129, 2, 51, "Input",ExpressionUUID->"4ef33a45-e772-4713-b351-ea3e169fd068"], +Cell[6992, 192, 342, 5, 58, "Output",ExpressionUUID->"a4bf26f2-dba0-4500-b8ef-74c3f337d400"] }, Open ]], Cell[CellGroupData[{ -Cell[6975, 222, 133, 3, 51, "Input",ExpressionUUID->"0a8a9ae5-b423-42bd-af89-cb4709c6dbb9"], -Cell[7111, 227, 301, 6, 58, "Output",ExpressionUUID->"2606210e-db88-4da1-836a-498e7b4da9f1"] +Cell[7371, 202, 129, 2, 51, "Input",ExpressionUUID->"0a8a9ae5-b423-42bd-af89-cb4709c6dbb9"], +Cell[7503, 206, 342, 5, 58, "Output",ExpressionUUID->"5271f56d-73bd-4207-86b2-55e8ad65e29b"] }, Open ]], Cell[CellGroupData[{ -Cell[7449, 238, 561, 20, 140, "Input",ExpressionUUID->"798d81cf-8599-4a8c-9c09-952b3eedf2c9"], -Cell[8013, 260, 320, 6, 58, "Output",ExpressionUUID->"448e88d2-7fc6-4699-8327-90cd3e45a5b5"] +Cell[7882, 216, 557, 19, 140, "Input",ExpressionUUID->"798d81cf-8599-4a8c-9c09-952b3eedf2c9"], +Cell[8442, 237, 362, 5, 58, "Output",ExpressionUUID->"89fd1218-c897-41ab-b511-a5b2f209a7b1"] }, Open ]], Cell[CellGroupData[{ -Cell[8370, 271, 561, 20, 140, "Input",ExpressionUUID->"d28a4f17-6e1f-44e0-8aeb-0dadd20f46e9"], -Cell[8934, 293, 317, 6, 58, "Output",ExpressionUUID->"01e30b20-77a9-4106-acd1-f09b0656e464"] +Cell[8841, 247, 557, 19, 140, "Input",ExpressionUUID->"d28a4f17-6e1f-44e0-8aeb-0dadd20f46e9"], +Cell[9401, 268, 357, 5, 58, "Output",ExpressionUUID->"c45fc8f5-82b9-4499-a21a-ce412d8d6dfb"] }, Open ]], Cell[CellGroupData[{ -Cell[9288, 304, 1592, 51, 190, "Input",ExpressionUUID->"c38b68b1-105e-4887-ac1a-9ca660ce7261"], -Cell[10883, 357, 317, 6, 58, "Output",ExpressionUUID->"e9aab4fb-febd-46e7-9c91-d99929afee2f"] +Cell[9795, 278, 1588, 50, 539, "Input",ExpressionUUID->"c38b68b1-105e-4887-ac1a-9ca660ce7261"], +Cell[11386, 330, 361, 5, 58, "Output",ExpressionUUID->"7f30457c-06ac-4f7f-91dd-7e30f086bf7f"] }, Open ]], Cell[CellGroupData[{ -Cell[11237, 368, 1426, 47, 190, "Input",ExpressionUUID->"288b92fe-a08b-4910-9c73-2479be62d5f4"], -Cell[12666, 417, 334, 7, 58, "Output",ExpressionUUID->"3e994045-7be0-44c7-b7b0-b5ea746b9807"] +Cell[11784, 340, 1422, 46, 503, "Input",ExpressionUUID->"288b92fe-a08b-4910-9c73-2479be62d5f4"], +Cell[13209, 388, 376, 6, 58, "Output",ExpressionUUID->"6db1a079-fe02-49a0-a79e-c62e856a8cd5"] }, Open ]], Cell[CellGroupData[{ -Cell[13037, 429, 1426, 47, 190, "Input",ExpressionUUID->"7deb9773-c069-4aa9-8bf5-d3e375b009af"], -Cell[14466, 478, 341, 7, 58, "Output",ExpressionUUID->"9cfe3724-4ddd-4d09-bfff-ef96385f8adc"] +Cell[13622, 399, 1422, 46, 503, "Input",ExpressionUUID->"7deb9773-c069-4aa9-8bf5-d3e375b009af"], +Cell[15047, 447, 380, 6, 58, "Output",ExpressionUUID->"fcdb9cb2-654e-473c-9d68-d1288a7576de"] }, Open ]], Cell[CellGroupData[{ -Cell[14844, 490, 1496, 49, 141, "Input",ExpressionUUID->"ff528133-b2b2-4632-a8b1-e3cc7c87bf02"], -Cell[16343, 541, 318, 6, 58, "Output",ExpressionUUID->"426a65d0-5ac1-42a0-83ba-77b04562f15e"] +Cell[15464, 458, 1588, 50, 539, "Input",ExpressionUUID->"ff528133-b2b2-4632-a8b1-e3cc7c87bf02"], +Cell[17055, 510, 357, 5, 58, "Output",ExpressionUUID->"c8f166a9-8093-4e53-8b4b-03897e74e16f"] }, Open ]], Cell[CellGroupData[{ -Cell[16698, 552, 135, 3, 51, "Input",ExpressionUUID->"c76593e4-5022-433f-bc20-c104d8c438c6"], -Cell[16836, 557, 302, 6, 58, "Output",ExpressionUUID->"8d293245-efa7-4d05-80bc-d82b84f5d512"] +Cell[17449, 520, 131, 2, 51, "Input",ExpressionUUID->"c76593e4-5022-433f-bc20-c104d8c438c6"], +Cell[17583, 524, 342, 5, 58, "Output",ExpressionUUID->"75403b98-9aa8-43d3-af1a-0e1131c9c9e4"] }, Open ]], Cell[CellGroupData[{ -Cell[17175, 568, 137, 3, 51, "Input",ExpressionUUID->"577be7ba-83c4-4f8c-b77c-efd450a50206"], -Cell[17315, 573, 303, 6, 58, "Output",ExpressionUUID->"504fa325-c1cf-49c7-9d67-59287b96c20b"] +Cell[17962, 534, 133, 2, 51, "Input",ExpressionUUID->"577be7ba-83c4-4f8c-b77c-efd450a50206"], +Cell[18098, 538, 343, 5, 58, "Output",ExpressionUUID->"979a028c-58d8-49ce-8c03-7b483dc84c62"] }, Open ]], Cell[CellGroupData[{ -Cell[17655, 584, 138, 3, 51, "Input",ExpressionUUID->"db4b09ee-1b65-4f02-aa32-ae3647575031"], -Cell[17796, 589, 304, 6, 58, "Output",ExpressionUUID->"f6341bac-028e-4117-a388-942d499e30b8"] +Cell[18478, 548, 134, 2, 51, "Input",ExpressionUUID->"db4b09ee-1b65-4f02-aa32-ae3647575031"], +Cell[18615, 552, 344, 5, 58, "Output",ExpressionUUID->"86c324a6-0964-431f-a865-6e762b989cda"] }, Open ]], Cell[CellGroupData[{ -Cell[18137, 600, 223, 5, 51, "Input",ExpressionUUID->"36e5c699-a54a-4843-8823-32fbba51e948"], -Cell[18363, 607, 321, 7, 58, "Output",ExpressionUUID->"3b9f8bfd-b9b1-4cf7-8d29-889e8ee20440"] +Cell[18996, 562, 219, 4, 51, "Input",ExpressionUUID->"36e5c699-a54a-4843-8823-32fbba51e948"], +Cell[19218, 568, 361, 6, 58, "Output",ExpressionUUID->"0170ad78-7f93-45dc-b2b6-20b41860db32"] }, Open ]], Cell[CellGroupData[{ -Cell[18721, 619, 138, 3, 51, "Input",ExpressionUUID->"6c7e19fa-dac6-4294-a9da-c64cf80c099c"], -Cell[18862, 624, 303, 6, 58, "Output",ExpressionUUID->"9a6e3eca-8464-45d5-b6c0-ea2a6c019f4b"] +Cell[19616, 579, 134, 2, 51, "Input",ExpressionUUID->"6c7e19fa-dac6-4294-a9da-c64cf80c099c"], +Cell[19753, 583, 343, 5, 58, "Output",ExpressionUUID->"7bfd5c76-2192-4095-987b-eed000bbe68d"] }, Open ]], Cell[CellGroupData[{ -Cell[19202, 635, 326, 6, 51, "Input",ExpressionUUID->"c2ea0e2c-bdb3-49a4-b5fd-e06b5d537674"], -Cell[19531, 643, 303, 6, 58, "Output",ExpressionUUID->"ab9e21c5-3598-41d6-b7dc-e4731c13abe4"] +Cell[20133, 593, 322, 5, 51, "Input",ExpressionUUID->"c2ea0e2c-bdb3-49a4-b5fd-e06b5d537674"], +Cell[20458, 600, 343, 5, 58, "Output",ExpressionUUID->"0e769203-0c14-4ab5-8aa2-37f7225e2534"] }, Open ]], Cell[CellGroupData[{ -Cell[19871, 654, 302, 6, 51, "Input",ExpressionUUID->"451bc2a2-746f-407f-ab4a-b355e77abe9b"], -Cell[20176, 662, 302, 6, 58, "Output",ExpressionUUID->"9719b37f-2430-441b-9ac9-e04ef62a3385"] +Cell[20838, 610, 298, 5, 51, "Input",ExpressionUUID->"451bc2a2-746f-407f-ab4a-b355e77abe9b"], +Cell[21139, 617, 344, 5, 58, "Output",ExpressionUUID->"8a28245e-df6d-4625-8e4e-83fef895a25a"] }, Open ]], Cell[CellGroupData[{ -Cell[20515, 673, 223, 5, 51, "Input",ExpressionUUID->"f5226187-30d5-47f5-9822-c9e8fcd842dd"], -Cell[20741, 680, 303, 6, 58, "Output",ExpressionUUID->"5be17cba-0629-4c94-b2de-e158b43ba315"] +Cell[21520, 627, 219, 4, 51, "Input",ExpressionUUID->"f5226187-30d5-47f5-9822-c9e8fcd842dd"], +Cell[21742, 633, 343, 5, 58, "Output",ExpressionUUID->"859e781e-69c5-4c8a-9039-232c24bbe1af"] }, Open ]], Cell[CellGroupData[{ -Cell[21081, 691, 354, 11, 74, "Input",ExpressionUUID->"ae36c648-63dc-4c97-8921-aacc9a1502d7"], -Cell[21438, 704, 320, 6, 58, "Output",ExpressionUUID->"3d7f70c5-5f1a-40a7-a2e3-f61b09b7c563"] +Cell[22122, 643, 350, 10, 74, "Input",ExpressionUUID->"ae36c648-63dc-4c97-8921-aacc9a1502d7"], +Cell[22475, 655, 362, 5, 58, "Output",ExpressionUUID->"37ee0c17-8706-4f90-9307-a01a7523a817"] }, Open ]], Cell[CellGroupData[{ -Cell[21795, 715, 354, 11, 74, "Input",ExpressionUUID->"1c8c0d19-1c22-468b-b120-8bd73a3590bf"], -Cell[22152, 728, 341, 7, 58, "Output",ExpressionUUID->"7dd762ff-da61-4554-aa40-fdcb5de59ac9"] +Cell[22874, 665, 350, 10, 74, "Input",ExpressionUUID->"1c8c0d19-1c22-468b-b120-8bd73a3590bf"], +Cell[23227, 677, 385, 6, 58, "Output",ExpressionUUID->"dfec7bc3-4931-42db-8b21-d0db9c7f2cae"] }, Open ]], Cell[CellGroupData[{ -Cell[22530, 740, 998, 27, 142, "Input",ExpressionUUID->"47c0c7b8-007c-4975-a6a2-6b6f0fec59c0"], -Cell[23531, 769, 321, 6, 58, "Output",ExpressionUUID->"80421a31-fa4c-4cc0-a7aa-24a2f7c26657"] +Cell[23649, 688, 994, 26, 445, "Input",ExpressionUUID->"47c0c7b8-007c-4975-a6a2-6b6f0fec59c0"], +Cell[24646, 716, 361, 5, 58, "Output",ExpressionUUID->"cba44d21-fd16-4643-b813-a4a8a468bd18"] }, Open ]], Cell[CellGroupData[{ -Cell[23889, 780, 203, 4, 51, "Input",ExpressionUUID->"c810247c-73c8-4319-8fe6-4d16224b180a"], -Cell[24095, 786, 301, 6, 58, "Output",ExpressionUUID->"d4478ff5-8048-44e0-b1e0-74303ae3682e"] +Cell[25044, 726, 199, 3, 51, "Input",ExpressionUUID->"c810247c-73c8-4319-8fe6-4d16224b180a"], +Cell[25246, 731, 341, 5, 58, "Output",ExpressionUUID->"dd27bb24-802d-4646-aa63-641b82ae7ed0"] }, Open ]], Cell[CellGroupData[{ -Cell[24433, 797, 333, 6, 51, "Input",ExpressionUUID->"e8439067-3845-4d86-b0de-851c2f5f29d9"], -Cell[24769, 805, 276, 5, 58, "Output",ExpressionUUID->"963196ec-2acd-4451-9d10-777b378f56b8"] +Cell[25624, 741, 329, 5, 51, "Input",ExpressionUUID->"e8439067-3845-4d86-b0de-851c2f5f29d9"], +Cell[25956, 748, 320, 5, 58, "Output",ExpressionUUID->"7bc0617e-f5bd-47ef-9d3e-abc460ee4c41"] }, Open ]], -Cell[25060, 813, 177, 3, 51, "Input",ExpressionUUID->"0ff2aa6d-ae8f-4495-8d98-c7fdb2b39241"], +Cell[26291, 756, 173, 2, 109, "Input",ExpressionUUID->"0ff2aa6d-ae8f-4495-8d98-c7fdb2b39241"], Cell[CellGroupData[{ -Cell[25262, 820, 331, 6, 51, "Input",ExpressionUUID->"2f03b11b-316f-4525-8cf1-d218b17ee3a9"], -Cell[25596, 828, 279, 5, 58, "Output",ExpressionUUID->"d6d63f32-4b97-409b-9c0e-6499ffa93417"] +Cell[26489, 762, 327, 5, 51, "Input",ExpressionUUID->"2f03b11b-316f-4525-8cf1-d218b17ee3a9"], +Cell[26819, 769, 322, 5, 58, "Output",ExpressionUUID->"7896c708-8d81-4a4a-b78c-03629e257e8b"] }, Open ]], -Cell[25890, 836, 177, 3, 51, "Input",ExpressionUUID->"74301e05-69cc-480d-934c-a1b00099d8bc"], +Cell[27156, 777, 173, 2, 109, "Input",ExpressionUUID->"74301e05-69cc-480d-934c-a1b00099d8bc"], Cell[CellGroupData[{ -Cell[26092, 843, 334, 6, 51, "Input",ExpressionUUID->"ac3a0401-11e4-4255-90e3-a666a2b3e134"], -Cell[26429, 851, 276, 5, 58, "Output",ExpressionUUID->"70bb58d4-3fc8-4849-b431-2decee6fbd82"] +Cell[27354, 783, 330, 5, 51, "Input",ExpressionUUID->"ac3a0401-11e4-4255-90e3-a666a2b3e134"], +Cell[27687, 790, 320, 5, 58, "Output",ExpressionUUID->"77c5fa2c-a91b-461e-9c2b-7f44b94520c8"] }, Open ]], -Cell[26720, 859, 177, 3, 51, "Input",ExpressionUUID->"aca2a824-518f-4e0c-9dc3-7c4b1cbbab9b"], +Cell[28022, 798, 173, 2, 109, "Input",ExpressionUUID->"aca2a824-518f-4e0c-9dc3-7c4b1cbbab9b"], Cell[CellGroupData[{ -Cell[26922, 866, 358, 6, 51, "Input",ExpressionUUID->"2cdc5ad7-2cf7-490b-a717-99d56799cda0"], -Cell[27283, 874, 278, 5, 58, "Output",ExpressionUUID->"0fc64376-bdbf-4291-b37e-55200f87693a"] +Cell[28220, 804, 354, 5, 51, "Input",ExpressionUUID->"2cdc5ad7-2cf7-490b-a717-99d56799cda0"], +Cell[28577, 811, 323, 5, 58, "Output",ExpressionUUID->"55923ae0-b650-407e-b57d-41be7165d38f"] }, Open ]], -Cell[27576, 882, 175, 3, 51, "Input",ExpressionUUID->"cfe644e6-6a71-4395-a7c6-8a24e6df830b"], +Cell[28915, 819, 171, 2, 109, "Input",ExpressionUUID->"cfe644e6-6a71-4395-a7c6-8a24e6df830b"], Cell[CellGroupData[{ -Cell[27776, 889, 307, 6, 51, "Input",ExpressionUUID->"eb3757d9-7ff9-4674-8ef6-4c8a7dc320a2"], -Cell[28086, 897, 278, 5, 58, "Output",ExpressionUUID->"1f65794f-2b1c-4452-aab4-7b85dcd256bf"] +Cell[29111, 825, 303, 5, 51, "Input",ExpressionUUID->"eb3757d9-7ff9-4674-8ef6-4c8a7dc320a2"], +Cell[29417, 832, 324, 5, 58, "Output",ExpressionUUID->"4d0e48de-8bde-477d-8fd9-690e0d5de757"] }, Open ]], -Cell[28379, 905, 175, 3, 51, "Input",ExpressionUUID->"ae670d93-2719-4f7e-8005-30cd2720262b"], +Cell[29756, 840, 171, 2, 109, "Input",ExpressionUUID->"ae670d93-2719-4f7e-8005-30cd2720262b"], Cell[CellGroupData[{ -Cell[28579, 912, 309, 6, 51, "Input",ExpressionUUID->"42992945-6511-420b-aeb1-baab39cc276b"], -Cell[28891, 920, 279, 5, 58, "Output",ExpressionUUID->"339d80cd-fb9a-4ba1-bc47-63f890e7eedb"] +Cell[29952, 846, 305, 5, 51, "Input",ExpressionUUID->"42992945-6511-420b-aeb1-baab39cc276b"], +Cell[30260, 853, 325, 5, 58, "Output",ExpressionUUID->"33f5026a-7077-42a8-bdb5-8bf19f64d45f"] }, Open ]], -Cell[29185, 928, 177, 3, 51, "Input",ExpressionUUID->"30d9c5d5-74cd-42c0-87fa-52be7a0496a6"], +Cell[30600, 861, 173, 2, 109, "Input",ExpressionUUID->"30d9c5d5-74cd-42c0-87fa-52be7a0496a6"], Cell[CellGroupData[{ -Cell[29387, 935, 308, 6, 51, "Input",ExpressionUUID->"b7618fd1-2275-4c4d-8608-c841f952eb45"], -Cell[29698, 943, 281, 5, 58, "Output",ExpressionUUID->"958ec7a0-713c-415b-a96e-0c6e2c641577"] +Cell[30798, 867, 304, 5, 51, "Input",ExpressionUUID->"b7618fd1-2275-4c4d-8608-c841f952eb45"], +Cell[31105, 874, 327, 5, 58, "Output",ExpressionUUID->"d7817b11-25ab-424f-a28a-4a002db04695"] }, Open ]], -Cell[29994, 951, 176, 3, 51, "Input",ExpressionUUID->"483ac3d1-0043-4c48-962e-dc44f7738e5e"], +Cell[31447, 882, 172, 2, 109, "Input",ExpressionUUID->"483ac3d1-0043-4c48-962e-dc44f7738e5e"], Cell[CellGroupData[{ -Cell[30195, 958, 279, 5, 51, "Input",ExpressionUUID->"6d50d0b3-d04f-4154-b54d-ecb80531dd64"], -Cell[30477, 965, 276, 5, 58, "Output",ExpressionUUID->"4c03725b-01c1-44e2-bea9-12329b1a9c88"] +Cell[31644, 888, 275, 4, 51, "Input",ExpressionUUID->"6d50d0b3-d04f-4154-b54d-ecb80531dd64"], +Cell[31922, 894, 320, 5, 58, "Output",ExpressionUUID->"1b05aedd-2890-496c-a266-e7580e407ef4"] }, Open ]], -Cell[30768, 973, 179, 3, 51, "Input",ExpressionUUID->"cce1f09e-472d-43a8-b22a-f75983ffc02b"], +Cell[32257, 902, 175, 2, 109, "Input",ExpressionUUID->"cce1f09e-472d-43a8-b22a-f75983ffc02b"], Cell[CellGroupData[{ -Cell[30972, 980, 19813, 486, 2581, "Input",ExpressionUUID->"e9fe2a31-f845-48e7-a025-f041278678bb"], -Cell[50788, 1468, 321, 6, 58, "Output",ExpressionUUID->"8587f47c-9752-4ad1-8635-562ee6f9d838"] +Cell[32457, 908, 19809, 485, 5658, "Input",ExpressionUUID->"e9fe2a31-f845-48e7-a025-f041278678bb"], +Cell[52269, 1395, 361, 5, 58, "Output",ExpressionUUID->"b3b900db-480a-43db-8b08-e093e862eb33"] }, Open ]], Cell[CellGroupData[{ -Cell[51146, 1479, 19752, 490, 2539, "Input",ExpressionUUID->"bed3b2d2-7173-4716-8631-10ab9d971dba"], -Cell[70901, 1971, 317, 6, 58, "Output",ExpressionUUID->"1f015ce4-62ae-4fca-9ffc-65f0d23e6c1e"] +Cell[52667, 1405, 19748, 489, 5670, "Input",ExpressionUUID->"bed3b2d2-7173-4716-8631-10ab9d971dba"], +Cell[72418, 1896, 357, 5, 58, "Output",ExpressionUUID->"8eecd7f3-b16f-477f-8462-7f8b1ce48577"] }, Open ]], Cell[CellGroupData[{ -Cell[71255, 1982, 19752, 484, 2561, "Input",ExpressionUUID->"3d1eee7d-aed8-404e-842a-b2d39195cb1c"], -Cell[91010, 2468, 339, 7, 58, "Output",ExpressionUUID->"6e9b5e38-1d21-4cfb-88f4-f67d2766736f"] +Cell[72812, 1906, 19748, 483, 5669, "Input",ExpressionUUID->"3d1eee7d-aed8-404e-842a-b2d39195cb1c"], +Cell[92563, 2391, 381, 6, 58, "Output",ExpressionUUID->"f3276dd7-e1e0-4d95-a32e-57cab61a51aa"] }, Open ]], Cell[CellGroupData[{ -Cell[91386, 2480, 22538, 554, 2904, "Input",ExpressionUUID->"57977419-3181-4bd7-b046-b5348ce6379e"], -Cell[113927, 3036, 335, 7, 58, "Output",ExpressionUUID->"34c30351-3f9e-4608-9c56-249e5c22b8a4"] +Cell[92981, 2402, 22534, 553, 6496, "Input",ExpressionUUID->"57977419-3181-4bd7-b046-b5348ce6379e"], +Cell[115518, 2957, 375, 6, 58, "Output",ExpressionUUID->"7b50ec7e-569d-4670-b156-4b44400b6f09"] }, Open ]], Cell[CellGroupData[{ -Cell[114299, 3048, 22539, 554, 2883, "Input",ExpressionUUID->"4a92750a-5025-4c91-9ece-3360c1b46e63"], -Cell[136841, 3604, 340, 7, 58, "Output",ExpressionUUID->"09910f10-5c1d-409b-9a47-88b772e540fc"] +Cell[115930, 2968, 22535, 553, 6496, "Input",ExpressionUUID->"4a92750a-5025-4c91-9ece-3360c1b46e63"], +Cell[138468, 3523, 382, 6, 58, "Output",ExpressionUUID->"2d92d7d8-dbde-4ce1-84a2-ed20dedf9e5d"] }, Open ]], Cell[CellGroupData[{ -Cell[137218, 3616, 25495, 627, 3226, "Input",ExpressionUUID->"2d9d5c62-e6c7-4f94-8992-fb01069f2bc8"], -Cell[162716, 4245, 334, 7, 58, "Output",ExpressionUUID->"af329f52-9f93-4724-945b-860188860e51"] +Cell[138887, 3534, 25491, 626, 7361, "Input",ExpressionUUID->"2d9d5c62-e6c7-4f94-8992-fb01069f2bc8"], +Cell[164381, 4162, 374, 6, 58, "Output",ExpressionUUID->"588a3899-36cc-443c-9b5c-af6dc836d233"] }, Open ]], Cell[CellGroupData[{ -Cell[163087, 4257, 134, 3, 51, "Input",ExpressionUUID->"577a6f40-f17a-46a7-86e4-31839bd7c63f"], -Cell[163224, 4262, 301, 6, 58, "Output",ExpressionUUID->"0aa2cc7d-063d-42b7-aed0-1aca1ef94296"] +Cell[164792, 4173, 130, 2, 51, "Input",ExpressionUUID->"577a6f40-f17a-46a7-86e4-31839bd7c63f"], +Cell[164925, 4177, 341, 5, 58, "Output",ExpressionUUID->"c8a9b157-f59a-4975-8d96-fa8e7e408a33"] }, Open ]], Cell[CellGroupData[{ -Cell[163562, 4273, 134, 3, 51, "Input",ExpressionUUID->"bddadc26-aed4-4de8-861b-3eed221711a3"], -Cell[163699, 4278, 301, 6, 58, "Output",ExpressionUUID->"a3f94d76-478b-4242-a14d-f9cce6c9dc13"] +Cell[165303, 4187, 130, 2, 51, "Input",ExpressionUUID->"bddadc26-aed4-4de8-861b-3eed221711a3"], +Cell[165436, 4191, 343, 5, 58, "Output",ExpressionUUID->"db6e391b-2666-4c46-9b39-05f6199b61aa"] }, Open ]], Cell[CellGroupData[{ -Cell[164037, 4289, 1148, 40, 190, "Input",ExpressionUUID->"7758746a-3303-4080-8034-003e81e72aab"], -Cell[165188, 4331, 320, 6, 58, "Output",ExpressionUUID->"c5fb0dbf-94ba-4aca-aa17-6adcdae2a7f3"] +Cell[165816, 4201, 1144, 39, 565, "Input",ExpressionUUID->"7758746a-3303-4080-8034-003e81e72aab"], +Cell[166963, 4242, 360, 5, 58, "Output",ExpressionUUID->"364d50d7-7e20-4a8f-9ef1-3028cf2ad81a"] }, Open ]], Cell[CellGroupData[{ -Cell[165545, 4342, 1045, 36, 257, "Input",ExpressionUUID->"864b711b-7ed6-4139-9bf5-17283229ae04"], -Cell[166593, 4380, 334, 7, 58, "Output",ExpressionUUID->"c13a7a11-cf1a-49d1-bf4f-ff7375eeeab0"] +Cell[167360, 4252, 1041, 35, 562, "Input",ExpressionUUID->"864b711b-7ed6-4139-9bf5-17283229ae04"], +Cell[168404, 4289, 374, 6, 58, "Output",ExpressionUUID->"c32f318e-880a-41f0-a0ed-1982283ca243"] }, Open ]], Cell[CellGroupData[{ -Cell[166964, 4392, 1148, 40, 190, "Input",ExpressionUUID->"0cefa213-96fe-4065-8dbb-30c6a021066f"], -Cell[168115, 4434, 319, 6, 58, "Output",ExpressionUUID->"59e314fd-9410-48a9-aeb6-18fc922cea3b"] +Cell[168815, 4300, 1144, 39, 565, "Input",ExpressionUUID->"0cefa213-96fe-4065-8dbb-30c6a021066f"], +Cell[169962, 4341, 360, 5, 58, "Output",ExpressionUUID->"d7ce40e6-618c-41c4-ad03-c47a0741c6af"] }, Open ]], Cell[CellGroupData[{ -Cell[168471, 4445, 112, 2, 51, "Input",ExpressionUUID->"0be320fe-f46c-457e-b8fd-af97c3546bdc"], -Cell[168586, 4449, 318, 6, 58, "Output",ExpressionUUID->"6edda228-88ac-4b6c-9766-ae1a82bff058"] +Cell[170359, 4351, 108, 1, 51, "Input",ExpressionUUID->"0be320fe-f46c-457e-b8fd-af97c3546bdc"], +Cell[170470, 4354, 359, 5, 58, "Output",ExpressionUUID->"055ec95d-f69f-4962-bac4-2a59205cf84b"] }, Open ]], Cell[CellGroupData[{ -Cell[168941, 4460, 112, 2, 51, "Input",ExpressionUUID->"025364aa-405c-4d73-b1ea-94437671667d"], -Cell[169056, 4464, 312, 6, 58, "Output",ExpressionUUID->"a0f20734-4a80-499a-9b52-5e08ea865325"] +Cell[170866, 4364, 108, 1, 51, "Input",ExpressionUUID->"025364aa-405c-4d73-b1ea-94437671667d"], +Cell[170977, 4367, 356, 6, 58, "Output",ExpressionUUID->"c737c59e-5e6b-475e-b4e1-78a23d4b1202"] }, Open ]], Cell[CellGroupData[{ -Cell[169405, 4475, 112, 2, 51, "Input",ExpressionUUID->"c370832f-4e6d-42fa-bc49-5128ff0384ba"], -Cell[169520, 4479, 306, 6, 58, "Output",ExpressionUUID->"d04b1e2e-2127-4cc2-804b-b6b3d0e428f7"] +Cell[171370, 4378, 108, 1, 51, "Input",ExpressionUUID->"c370832f-4e6d-42fa-bc49-5128ff0384ba"], +Cell[171481, 4381, 352, 6, 58, "Output",ExpressionUUID->"51fdec94-c7f1-42cb-9a44-ace3f2a1f9d7"] }, Open ]], Cell[CellGroupData[{ -Cell[169863, 4490, 112, 2, 51, "Input",ExpressionUUID->"91986df6-265b-411a-9ec2-1af16f04a5e4"], -Cell[169978, 4494, 289, 5, 58, "Output",ExpressionUUID->"ff17035c-412b-4bf0-ad41-0ae59cb3ca9f"] +Cell[171870, 4392, 108, 1, 51, "Input",ExpressionUUID->"91986df6-265b-411a-9ec2-1af16f04a5e4"], +Cell[171981, 4395, 335, 5, 58, "Output",ExpressionUUID->"e0713234-7f62-429d-b783-f23e0e81d791"] }, Open ]], Cell[CellGroupData[{ -Cell[170304, 4504, 111, 2, 51, "Input",ExpressionUUID->"47c69875-f9e7-4088-bf36-8b70746ddcc4"], -Cell[170418, 4508, 291, 5, 58, "Output",ExpressionUUID->"ab625dd8-3903-4fba-8bfe-51c742eb179f"] +Cell[172353, 4405, 107, 1, 51, "Input",ExpressionUUID->"47c69875-f9e7-4088-bf36-8b70746ddcc4"], +Cell[172463, 4408, 337, 5, 58, "Output",ExpressionUUID->"5f22247d-4f6d-4225-a6ac-548f2a9359ce"] }, Open ]], Cell[CellGroupData[{ -Cell[170746, 4518, 111, 2, 51, "Input",ExpressionUUID->"74c384a6-84a4-4c32-a653-d2988bb330d5"], -Cell[170860, 4522, 296, 5, 58, "Output",ExpressionUUID->"734fe929-6a54-4311-8a69-b87d23b704a1"] +Cell[172837, 4418, 107, 1, 51, "Input",ExpressionUUID->"74c384a6-84a4-4c32-a653-d2988bb330d5"], +Cell[172947, 4421, 338, 5, 58, "Output",ExpressionUUID->"86caf3a9-ce49-4a93-9188-42b19e8b8c36"] }, Open ]], Cell[CellGroupData[{ -Cell[171193, 4532, 501, 17, 97, "Input",ExpressionUUID->"bbd3ba20-daed-4e05-8619-384f2129461e"], -Cell[171697, 4551, 307, 6, 58, "Output",ExpressionUUID->"67c975c7-010e-4036-a9ec-de572d0d96e7"] +Cell[173322, 4431, 497, 16, 166, "Input",ExpressionUUID->"bbd3ba20-daed-4e05-8619-384f2129461e"], +Cell[173822, 4449, 351, 6, 58, "Output",ExpressionUUID->"dabbf4c8-62c5-4a45-ace7-622fe149f4f5"] }, Open ]], Cell[CellGroupData[{ -Cell[172041, 4562, 501, 17, 97, "Input",ExpressionUUID->"7826628e-c8b8-49e1-b5c6-a44bee3e6416"], -Cell[172545, 4581, 310, 6, 58, "Output",ExpressionUUID->"3a4d0d17-66a7-46a9-a59e-8cf04f698be0"] +Cell[174210, 4460, 497, 16, 166, "Input",ExpressionUUID->"7826628e-c8b8-49e1-b5c6-a44bee3e6416"], +Cell[174710, 4478, 354, 6, 58, "Output",ExpressionUUID->"9791523d-7ba6-4976-aa06-19b8978aa562"] }, Open ]], Cell[CellGroupData[{ -Cell[172892, 4592, 1792, 61, 324, "Input",ExpressionUUID->"463277f7-b347-495e-8624-e148927c8041"], -Cell[174687, 4655, 291, 5, 58, "Output",ExpressionUUID->"c39c7495-bff7-4cb5-9bcc-5f2e293cd72d"] +Cell[175101, 4489, 1788, 60, 828, "Input",ExpressionUUID->"463277f7-b347-495e-8624-e148927c8041"], +Cell[176892, 4551, 339, 5, 58, "Output",ExpressionUUID->"88fd1a29-3c99-4155-923c-d2f15a7af807"] }, Open ]], Cell[CellGroupData[{ -Cell[175015, 4665, 1105, 37, 231, "Input",ExpressionUUID->"eee689fc-f105-4d18-89f0-7c11cf6f99fe"], -Cell[176123, 4704, 312, 6, 58, "Output",ExpressionUUID->"26e40046-7615-4c4a-a431-8166fbfa44ab"] +Cell[177268, 4561, 1101, 36, 600, "Input",ExpressionUUID->"eee689fc-f105-4d18-89f0-7c11cf6f99fe"], +Cell[178372, 4599, 356, 6, 58, "Output",ExpressionUUID->"099b1c58-c862-4a9e-9663-35e4d6b86de9"] }, Open ]], Cell[CellGroupData[{ -Cell[176472, 4715, 1822, 62, 283, "Input",ExpressionUUID->"406780a6-3bee-4562-b12c-fd4639943008"], -Cell[178297, 4779, 292, 5, 58, "Output",ExpressionUUID->"1380be76-e3c2-4286-a595-7c0c0ed65cbe"] +Cell[178765, 4610, 1818, 61, 828, "Input",ExpressionUUID->"406780a6-3bee-4562-b12c-fd4639943008"], +Cell[180586, 4673, 336, 5, 58, "Output",ExpressionUUID->"c9451974-18ae-4a90-8919-bafe491f0c03"] }, Open ]], Cell[CellGroupData[{ -Cell[178626, 4789, 1635, 54, 141, "Input",ExpressionUUID->"1dc5648e-1b63-4675-a8c5-15d0b057772e"], -Cell[180264, 4845, 291, 5, 58, "Output",ExpressionUUID->"8edd87a3-b0a5-477f-a8a0-f698b932875f"] +Cell[180959, 4683, 1631, 53, 453, "Input",ExpressionUUID->"1dc5648e-1b63-4675-a8c5-15d0b057772e"], +Cell[182593, 4738, 337, 5, 58, "Output",ExpressionUUID->"edf712f1-d882-4b88-b864-05b2af2ec2e0"] }, Open ]], Cell[CellGroupData[{ -Cell[180592, 4855, 1635, 54, 141, "Input",ExpressionUUID->"049e63fe-e62f-491f-a2e5-08cb3d411df2"], -Cell[182230, 4911, 289, 5, 58, "Output",ExpressionUUID->"ee7c412f-1624-4c5c-89de-5bafa33fd0fc"] +Cell[182967, 4748, 1631, 53, 453, "Input",ExpressionUUID->"049e63fe-e62f-491f-a2e5-08cb3d411df2"], +Cell[184601, 4803, 333, 5, 58, "Output",ExpressionUUID->"4a888b8a-d1a6-41d5-b30c-629d787cb22b"] }, Open ]], -Cell[182534, 4919, 207, 4, 51, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], -Cell[182744, 4925, 154, 3, 51, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], -Cell[182901, 4930, 184, 3, 51, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], -Cell[183088, 4935, 154, 3, 51, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[183267, 4942, 1301, 43, 198, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[184571, 4987, 178, 3, 58, "Output",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[184971, 4813, 229, 4, 51, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], +Cell[185203, 4819, 182, 2, 58, "Output",ExpressionUUID->"c652ac40-fbac-4e50-a23b-cee5c9e4c0b5"] }, Open ]], +Cell[185400, 4824, 173, 2, 109, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], Cell[CellGroupData[{ -Cell[184786, 4995, 910, 31, 97, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[185699, 5028, 175, 3, 58, "Output",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[185598, 4830, 205, 3, 51, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], +Cell[185806, 4835, 185, 2, 58, "Output",ExpressionUUID->"a7ddf061-5dec-47ed-855f-20f1b37f44f6"] }, Open ]], +Cell[186006, 4840, 173, 2, 109, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[185911, 5036, 887, 30, 97, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[186801, 5068, 176, 3, 58, "Output",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[186204, 4846, 1297, 42, 237, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], +Cell[187504, 4890, 222, 3, 58, "Output",ExpressionUUID->"c70f156e-ed48-40fd-b68a-35e1670573ae"] }, Open ]], Cell[CellGroupData[{ -Cell[187014, 5076, 558, 19, 91, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[187575, 5097, 172, 3, 58, "Output",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[187763, 4898, 929, 30, 236, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], +Cell[188695, 4930, 220, 3, 58, "Output",ExpressionUUID->"3acc648d-4c6b-4ac3-a45a-14612bed3171"] }, Open ]], Cell[CellGroupData[{ -Cell[187784, 5105, 623, 21, 91, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[188410, 5128, 172, 3, 58, "Output",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[188952, 4938, 906, 29, 236, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], +Cell[189861, 4969, 219, 3, 58, "Output",ExpressionUUID->"84adc614-72b2-4eb3-bc62-5e91571a0a15"] }, Open ]], Cell[CellGroupData[{ -Cell[188619, 5136, 170, 5, 97, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[188792, 5143, 172, 3, 58, "Output",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[190117, 4977, 554, 18, 91, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], +Cell[190674, 4997, 216, 3, 58, "Output",ExpressionUUID->"1c9ad64b-b8a8-4748-a344-b6014f096b0d"] }, Open ]], Cell[CellGroupData[{ -Cell[189001, 5151, 170, 5, 96, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[189174, 5158, 171, 3, 58, "Output",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[190927, 5005, 619, 20, 91, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], +Cell[191549, 5027, 220, 3, 58, "Output",ExpressionUUID->"61101ef7-402e-4666-b6a4-fdfe330930f1"] }, Open ]], Cell[CellGroupData[{ -Cell[189382, 5166, 181, 5, 75, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[189566, 5173, 170, 3, 58, "Output",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[191806, 5035, 166, 4, 97, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], +Cell[191975, 5041, 218, 3, 58, "Output",ExpressionUUID->"22f99091-7c34-4c93-a8c3-a94170171ab7"] }, Open ]], Cell[CellGroupData[{ -Cell[189773, 5181, 181, 5, 75, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[189957, 5188, 172, 3, 58, "Output",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[192230, 5049, 166, 4, 96, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], +Cell[192399, 5055, 214, 3, 58, "Output",ExpressionUUID->"29051c6f-da64-4f65-82ea-a5d3f6294978"] }, Open ]], Cell[CellGroupData[{ -Cell[190166, 5196, 6055, 185, 1734, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[196224, 5383, 172, 3, 58, "Output",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[192650, 5063, 177, 4, 75, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], +Cell[192830, 5069, 213, 3, 58, "Output",ExpressionUUID->"074f3ce7-ea23-4924-9b2e-9af4e8536720"] }, Open ]], Cell[CellGroupData[{ -Cell[196433, 5391, 368, 9, 73, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[196804, 5402, 171, 3, 58, "Output",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[193080, 5077, 177, 4, 75, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], +Cell[193260, 5083, 215, 3, 58, "Output",ExpressionUUID->"c4d47ca2-3dba-47eb-b1d3-b55e2aec409a"] }, Open ]], Cell[CellGroupData[{ -Cell[197012, 5410, 6122, 187, 1645, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[203137, 5599, 173, 3, 58, "Output",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[193512, 5091, 6051, 184, 1734, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], +Cell[199566, 5277, 220, 3, 58, "Output",ExpressionUUID->"dd4f7250-6329-495c-8917-4a01e467db70"] }, Open ]], Cell[CellGroupData[{ -Cell[203347, 5607, 368, 9, 73, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[203718, 5618, 170, 3, 58, "Output",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[199823, 5285, 364, 8, 73, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], +Cell[200190, 5295, 216, 3, 58, "Output",ExpressionUUID->"15f8e4a6-28f1-4841-b141-3e02eed00573"] }, Open ]], Cell[CellGroupData[{ -Cell[203925, 5626, 2663, 88, 786, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[206591, 5716, 171, 3, 58, "Output",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[200443, 5303, 6118, 186, 1645, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], +Cell[206564, 5491, 215, 3, 58, "Output",ExpressionUUID->"e94ea018-395c-4b18-a397-33d4a766e2b2"] }, Open ]], Cell[CellGroupData[{ -Cell[206799, 5724, 2603, 85, 786, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[209405, 5811, 173, 3, 58, "Output",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[206816, 5499, 364, 8, 73, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], +Cell[207183, 5509, 215, 3, 58, "Output",ExpressionUUID->"5d6a4cc2-ebc9-4125-9675-8b3e53228e0d"] }, Open ]], Cell[CellGroupData[{ -Cell[209615, 5819, 3712, 118, 1131, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[213330, 5939, 174, 3, 58, "Output",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[207435, 5517, 2659, 87, 786, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], +Cell[210097, 5606, 217, 3, 58, "Output",ExpressionUUID->"3e160cd1-b412-4012-ba2d-cee65acdf0f8"] }, Open ]], -Cell[213519, 5945, 138, 3, 51, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ -Cell[213682, 5952, 2054, 59, 581, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], -Cell[215739, 6013, 557, 12, 189, "Message",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], -Cell[216299, 6027, 559, 12, 189, "Message",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], -Cell[216861, 6041, 561, 12, 189, "Message",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], -Cell[217425, 6055, 458, 10, 66, "Message",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], -Cell[217886, 6067, 172, 3, 58, "Output",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[210351, 5614, 2599, 84, 786, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], +Cell[212953, 5700, 220, 3, 58, "Output",ExpressionUUID->"0993d303-9ba6-451b-bbf5-4594308e4a4f"] }, Open ]], Cell[CellGroupData[{ -Cell[218095, 6075, 2052, 59, 581, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], -Cell[220150, 6136, 555, 12, 189, "Message",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], -Cell[220708, 6150, 559, 12, 189, "Message",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], -Cell[221270, 6164, 561, 12, 189, "Message",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], -Cell[221834, 6178, 458, 10, 66, "Message",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], -Cell[222295, 6190, 172, 3, 58, "Output",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[213210, 5708, 3708, 117, 1131, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], +Cell[216921, 5827, 219, 3, 58, "Output",ExpressionUUID->"53c29fda-2cdf-4d72-842b-b16e56cc4336"] }, Open ]], +Cell[217155, 5833, 160, 3, 109, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ -Cell[222504, 6198, 1936, 53, 412, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], -Cell[224443, 6253, 20440, 382, 329, "Output",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] +Cell[217340, 5840, 2209, 61, 581, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], +Cell[219552, 5903, 660, 14, 169, "Message",ExpressionUUID->"2e936eef-634a-4718-ab9b-6a89d86bd614"], +Cell[220215, 5919, 660, 14, 169, "Message",ExpressionUUID->"58d8a5ee-5d52-4213-afbb-5b916f0e393a"], +Cell[220878, 5935, 658, 14, 169, "Message",ExpressionUUID->"810468af-86b2-4d71-9c7c-85cf5ca68c9b"], +Cell[221539, 5951, 521, 12, 75, "Message",ExpressionUUID->"1a4c6059-d72b-41a8-841c-ec1b5eadc045"], +Cell[222063, 5965, 217, 3, 58, "Output",ExpressionUUID->"6ed0496b-c4e8-4d09-ab5b-701bc8fb3a56"] }, Open ]], Cell[CellGroupData[{ -Cell[244920, 6640, 2094, 60, 629, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], -Cell[247017, 6702, 500, 11, 130, "Message",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], -Cell[247520, 6715, 503, 11, 160, "Message",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], -Cell[248026, 6728, 506, 11, 160, "Message",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], -Cell[248535, 6741, 455, 10, 66, "Message",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], -Cell[248993, 6753, 57321, 985, 322, "Output",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] +Cell[222317, 5973, 2207, 61, 581, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], +Cell[224527, 6036, 656, 14, 169, "Message",ExpressionUUID->"6fe74961-0a91-4f20-ba86-a1b78334f17b"], +Cell[225186, 6052, 654, 14, 169, "Message",ExpressionUUID->"43aa8afb-e474-402a-9523-cd5c05c6be0b"], +Cell[225843, 6068, 656, 14, 169, "Message",ExpressionUUID->"eae314b6-0f66-43dd-8c51-7f786985e0bc"], +Cell[226502, 6084, 515, 12, 75, "Message",ExpressionUUID->"b0df7b2c-7f0f-46b5-8046-6e6171a3b7e9"], +Cell[227020, 6098, 216, 3, 58, "Output",ExpressionUUID->"638db146-88ca-4060-a6ff-03bb0fddcd5f"] }, Open ]], -Cell[306329, 7741, 2453, 69, 616, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], -Cell[308785, 7812, 209, 5, 51, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], Cell[CellGroupData[{ -Cell[309019, 7821, 217, 7, 83, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], -Cell[309239, 7830, 172, 3, 58, "Output",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] +Cell[227273, 6106, 2047, 54, 412, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], +Cell[229323, 6162, 20127, 380, 333, "Output",ExpressionUUID->"6d845623-8448-413c-bbf3-437fde592e4e"] }, Open ]], Cell[CellGroupData[{ -Cell[309448, 7838, 1816, 53, 611, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], -Cell[311267, 7893, 508, 11, 160, "Message",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], -Cell[311778, 7906, 508, 11, 160, "Message",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], -Cell[312289, 7919, 511, 11, 160, "Message",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], -Cell[312803, 7932, 456, 10, 66, "Message",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], -Cell[313262, 7944, 26000, 472, 324, "Output",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] +Cell[249487, 6547, 2249, 62, 629, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], +Cell[251739, 6611, 560, 13, 169, "Message",ExpressionUUID->"576fda25-0375-4c4a-9dc7-52a446a8e9dd"], +Cell[252302, 6626, 563, 13, 169, "Message",ExpressionUUID->"dd5df6d0-0503-4230-9391-816cdc713cd5"], +Cell[252868, 6641, 566, 13, 169, "Message",ExpressionUUID->"78fa5127-8ec2-4e42-87af-2d34aa0514ed"], +Cell[253437, 6656, 516, 12, 75, "Message",ExpressionUUID->"beec6d19-eac9-4476-a01d-3cb4447bc1ac"], +Cell[253956, 6670, 25626, 468, 330, "Output",ExpressionUUID->"aad1f07b-d16d-4a30-a338-d85a059f162b"] }, Open ]], Cell[CellGroupData[{ -Cell[339299, 8421, 1616, 48, 420, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], -Cell[340918, 8471, 584, 12, 218, "Message",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], -Cell[341505, 8485, 588, 12, 218, "Message",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], -Cell[342096, 8499, 592, 12, 218, "Message",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], -Cell[342691, 8513, 456, 10, 66, "Message",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], -Cell[343150, 8525, 169, 3, 58, "Output",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] +Cell[279619, 7143, 2475, 69, 616, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], +Cell[282097, 7214, 9514, 222, 330, "Output",ExpressionUUID->"2ff97cf2-1e9c-4efb-b17b-2c4c41278326"] }, Open ]], Cell[CellGroupData[{ -Cell[343356, 8533, 2249, 64, 624, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], -Cell[345608, 8599, 555, 12, 189, "Message",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], -Cell[346166, 8613, 557, 12, 189, "Message",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], -Cell[346726, 8627, 563, 12, 189, "Message",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], -Cell[347292, 8641, 458, 10, 66, "Message",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], -Cell[347753, 8653, 173, 3, 58, "Output",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] +Cell[291648, 7441, 228, 4, 51, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], +Cell[291879, 7447, 31987, 599, 330, "Output",ExpressionUUID->"a0806228-fece-44eb-a547-d9b074b47c40"] }, Open ]], Cell[CellGroupData[{ -Cell[347963, 8661, 2223, 64, 624, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], -Cell[350189, 8727, 555, 12, 189, "Message",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], -Cell[350747, 8741, 557, 12, 189, "Message",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], -Cell[351307, 8755, 561, 12, 189, "Message",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], -Cell[351871, 8769, 458, 10, 66, "Message",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], -Cell[352332, 8781, 173, 3, 58, "Output",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] +Cell[323903, 8051, 236, 6, 83, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], +Cell[324142, 8059, 215, 3, 58, "Output",ExpressionUUID->"af65cca2-cfa8-45c1-bf14-bd58e24c0f9e"] }, Open ]], Cell[CellGroupData[{ -Cell[352542, 8789, 2221, 64, 624, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], -Cell[354766, 8855, 557, 12, 189, "Message",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], -Cell[355326, 8869, 557, 12, 189, "Message",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], -Cell[355886, 8883, 563, 12, 189, "Message",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], -Cell[356452, 8897, 456, 10, 66, "Message",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], -Cell[356911, 8909, 173, 3, 58, "Output",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] +Cell[324394, 8067, 1861, 53, 611, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], +Cell[326258, 8122, 660, 15, 169, "Message",ExpressionUUID->"b6752a21-defd-4478-8c76-b01a9c579e86"], +Cell[326921, 8139, 661, 15, 169, "Message",ExpressionUUID->"231e88e2-45ca-40ef-8e92-b5bbd7442cea"], +Cell[327585, 8156, 663, 15, 169, "Message",ExpressionUUID->"8dce707c-33b1-4c06-89ed-8b26d50ec8c9"], +Cell[328251, 8173, 519, 12, 75, "Message",ExpressionUUID->"a7f3a5b0-3f94-4ee9-a1e1-5f3d196c9bfe"], +Cell[328773, 8187, 26898, 488, 322, "Output",ExpressionUUID->"ec1c5524-348d-4652-b34b-32a8d60000e0"] }, Open ]], Cell[CellGroupData[{ -Cell[357121, 8917, 213, 6, 81, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], -Cell[357337, 8925, 171, 3, 58, "Output",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] +Cell[355708, 8680, 1648, 50, 420, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], +Cell[357359, 8732, 637, 14, 169, "Message",ExpressionUUID->"376bc1c8-460f-4a39-8a03-85c035eae336"], +Cell[357999, 8748, 639, 14, 169, "Message",ExpressionUUID->"11ef85ef-4336-46c3-84d7-72a59523da17"], +Cell[358641, 8764, 639, 14, 169, "Message",ExpressionUUID->"cfe913a0-6da3-4c04-bdb1-406526ffa68a"], +Cell[359283, 8780, 497, 11, 75, "Message",ExpressionUUID->"0d8f876d-3e0a-4aa8-8942-12656bbb25fa"], +Cell[359783, 8793, 194, 3, 58, "Output",ExpressionUUID->"a4b64961-0c8d-4329-a23a-a53a910b3e5d"] }, Open ]], -Cell[357523, 8931, 245, 5, 51, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ -Cell[357793, 8940, 558, 19, 91, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[358354, 8961, 172, 3, 58, "Output",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] +Cell[360014, 8801, 2272, 64, 624, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], +Cell[362289, 8867, 632, 13, 169, "Message",ExpressionUUID->"a8ed2a68-cbdf-4a35-bee7-dc6e81a16a8b"], +Cell[362924, 8882, 632, 13, 169, "Message",ExpressionUUID->"d505b280-9397-4421-b9ea-c9c025b9db9f"], +Cell[363559, 8897, 632, 13, 169, "Message",ExpressionUUID->"487ac232-c5cd-4f65-92f9-5a8a8e0721a3"], +Cell[364194, 8912, 495, 11, 75, "Message",ExpressionUUID->"aabe1cec-2051-4c8d-8bef-ab07a4154a1f"], +Cell[364692, 8925, 195, 3, 58, "Output",ExpressionUUID->"fe61d067-5b6d-44ea-bdca-96296620099e"] }, Open ]], Cell[CellGroupData[{ -Cell[358563, 8969, 170, 5, 97, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[358736, 8976, 173, 3, 58, "Output",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] +Cell[364924, 8933, 2235, 63, 624, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], +Cell[367162, 8998, 632, 13, 169, "Message",ExpressionUUID->"3b5c289e-4dc0-49ff-ba9a-9ad38a7b164f"], +Cell[367797, 9013, 632, 13, 169, "Message",ExpressionUUID->"d1fd5766-58b9-4ef9-8cbc-a34eefa91bb6"], +Cell[368432, 9028, 634, 13, 169, "Message",ExpressionUUID->"8f30f7cb-e509-406d-b50e-b36c802acdde"], +Cell[369069, 9043, 493, 11, 75, "Message",ExpressionUUID->"db20052a-c28a-4ce2-89af-04598c31fcc8"], +Cell[369565, 9056, 197, 3, 58, "Output",ExpressionUUID->"6525a8f1-56d7-4a2a-bb31-f914d386fd41"] }, Open ]], Cell[CellGroupData[{ -Cell[358946, 8984, 181, 5, 75, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[359130, 8991, 173, 3, 58, "Output",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] +Cell[369799, 9064, 2233, 63, 624, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], +Cell[372035, 9129, 634, 13, 169, "Message",ExpressionUUID->"e1a1f1d8-e3bc-4af4-8d67-92e3034f4af7"], +Cell[372672, 9144, 634, 13, 169, "Message",ExpressionUUID->"1681b1b8-3d62-423f-a739-1063eeff97d3"], +Cell[373309, 9159, 634, 13, 169, "Message",ExpressionUUID->"ebf77489-6aa1-4346-bd00-f84f4738dd82"], +Cell[373946, 9174, 495, 11, 75, "Message",ExpressionUUID->"cb1ece74-4987-403d-93b6-2eb314d62dc4"], +Cell[374444, 9187, 196, 3, 58, "Output",ExpressionUUID->"57ac9915-2af7-4923-abe9-2c4ede339d7c"] }, Open ]], Cell[CellGroupData[{ -Cell[359340, 8999, 6055, 185, 1734, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[365398, 9186, 172, 3, 58, "Output",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] +Cell[374677, 9195, 236, 6, 81, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], +Cell[374916, 9203, 195, 3, 58, "Output",ExpressionUUID->"03250a9f-10cd-4e4d-a780-852761d9f226"] }, Open ]], +Cell[375126, 9209, 271, 6, 109, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ -Cell[365607, 9194, 368, 9, 73, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[365978, 9205, 170, 3, 58, "Output",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] +Cell[375422, 9219, 558, 19, 91, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], +Cell[375983, 9240, 196, 3, 58, "Output",ExpressionUUID->"ecaad542-2aa6-4dd0-a87c-da44deb6aa60"] }, Open ]], Cell[CellGroupData[{ -Cell[366185, 9213, 6122, 187, 1645, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[372310, 9402, 175, 3, 58, "Output",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] +Cell[376216, 9248, 170, 5, 97, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], +Cell[376389, 9255, 194, 3, 58, "Output",ExpressionUUID->"ebf7047c-b0f6-4b66-97be-4d6e7187e557"] }, Open ]], Cell[CellGroupData[{ -Cell[372522, 9410, 368, 9, 73, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[372893, 9421, 172, 3, 58, "Output",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] +Cell[376620, 9263, 181, 5, 75, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], +Cell[376804, 9270, 195, 3, 58, "Output",ExpressionUUID->"80a0a935-66e2-424e-815c-37836a1c2e4c"] }, Open ]], Cell[CellGroupData[{ -Cell[373102, 9429, 2663, 88, 786, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[375768, 9519, 173, 3, 58, "Output",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] +Cell[377036, 9278, 6055, 185, 1734, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], +Cell[383094, 9465, 193, 3, 58, "Output",ExpressionUUID->"8281b6a8-167b-49cb-a6a7-338b7a2b4834"] }, Open ]], Cell[CellGroupData[{ -Cell[375978, 9527, 2603, 85, 786, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[378584, 9614, 171, 3, 58, "Output",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] +Cell[383324, 9473, 368, 9, 73, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], +Cell[383695, 9484, 194, 3, 58, "Output",ExpressionUUID->"fd2337ae-9a33-4b82-937e-309d29adf389"] }, Open ]], Cell[CellGroupData[{ -Cell[378792, 9622, 3712, 118, 1131, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[382507, 9742, 174, 3, 58, "Output",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] +Cell[383926, 9492, 6122, 187, 1645, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], +Cell[390051, 9681, 195, 3, 58, "Output",ExpressionUUID->"1bdb8c85-cfc6-4d89-b608-bd2a194a8ea3"] }, Open ]], Cell[CellGroupData[{ -Cell[382718, 9750, 2052, 59, 581, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], -Cell[384773, 9811, 578, 12, 189, "Message",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], -Cell[385354, 9825, 583, 12, 218, "Message",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], -Cell[385940, 9839, 586, 12, 218, "Message",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], -Cell[386529, 9853, 456, 10, 66, "Message",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], -Cell[386988, 9865, 170, 3, 58, "Output",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] +Cell[390283, 9689, 368, 9, 73, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], +Cell[390654, 9700, 195, 3, 58, "Output",ExpressionUUID->"e898994c-fff0-4410-948e-c7ed686e794a"] }, Open ]], Cell[CellGroupData[{ -Cell[387195, 9873, 2054, 59, 581, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], -Cell[389252, 9934, 576, 12, 189, "Message",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], -Cell[389831, 9948, 581, 12, 218, "Message",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], -Cell[390415, 9962, 586, 12, 218, "Message",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], -Cell[391004, 9976, 458, 10, 66, "Message",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], -Cell[391465, 9988, 172, 3, 58, "Output",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] +Cell[390886, 9708, 2663, 88, 786, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], +Cell[393552, 9798, 194, 3, 58, "Output",ExpressionUUID->"47c37ff7-606c-470f-a551-80220237f4a4"] }, Open ]], Cell[CellGroupData[{ -Cell[391674, 9996, 2028, 55, 412, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], -Cell[393705, 10053, 20011, 378, 332, "Output",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] +Cell[393783, 9806, 2603, 85, 786, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], +Cell[396389, 9893, 195, 3, 58, "Output",ExpressionUUID->"a0fc65aa-7f92-44e9-a352-517d9ecff9ea"] }, Open ]], Cell[CellGroupData[{ -Cell[413753, 10436, 2115, 60, 629, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], -Cell[415871, 10498, 501, 11, 160, "Message",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], -Cell[416375, 10511, 503, 11, 160, "Message",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], -Cell[416881, 10524, 505, 11, 160, "Message",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], -Cell[417389, 10537, 456, 10, 66, "Message",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], -Cell[417848, 10549, 32548, 580, 323, "Output",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] +Cell[396621, 9901, 3712, 118, 1131, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], +Cell[400336, 10021, 196, 3, 58, "Output",ExpressionUUID->"915145f0-3d2b-410b-9b03-f6dac0dde688"] }, Open ]], -Cell[450411, 11132, 209, 5, 51, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], Cell[CellGroupData[{ -Cell[450645, 11141, 1616, 48, 420, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], -Cell[452264, 11191, 596, 12, 218, "Message",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], -Cell[452863, 11205, 599, 12, 218, "Message",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], -Cell[453465, 11219, 605, 12, 218, "Message",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], -Cell[454073, 11233, 456, 10, 66, "Message",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], -Cell[454532, 11245, 170, 3, 58, "Output",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] +Cell[400569, 10029, 2211, 62, 581, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], +Cell[402783, 10093, 634, 13, 169, "Message",ExpressionUUID->"3182b605-028e-4c2d-befb-d8ca59fe3955"], +Cell[403420, 10108, 632, 13, 169, "Message",ExpressionUUID->"c68f178c-4086-4898-b033-dca16046562f"], +Cell[404055, 10123, 634, 13, 169, "Message",ExpressionUUID->"a92d27c9-641e-42c6-9857-41441585d4ce"], +Cell[404692, 10138, 493, 11, 75, "Message",ExpressionUUID->"bb875da6-71e1-456b-b65a-8100095bed2d"], +Cell[405188, 10151, 192, 3, 58, "Output",ExpressionUUID->"3c42b0da-e7ed-4a7d-8d16-e4a0fce2491b"] }, Open ]], Cell[CellGroupData[{ -Cell[454739, 11253, 2247, 64, 624, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], -Cell[456989, 11319, 580, 12, 189, "Message",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], -Cell[457572, 11333, 583, 12, 218, "Message",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], -Cell[458158, 11347, 584, 12, 218, "Message",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], -Cell[458745, 11361, 458, 10, 66, "Message",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], -Cell[459206, 11373, 170, 3, 58, "Output",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] +Cell[405417, 10159, 2213, 62, 581, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], +Cell[407633, 10223, 630, 13, 169, "Message",ExpressionUUID->"af7b41ff-db98-40fd-b9e8-7420894f3175"], +Cell[408266, 10238, 630, 13, 169, "Message",ExpressionUUID->"874f79d7-5057-4ff5-baa1-3c7993edfaab"], +Cell[408899, 10253, 628, 13, 169, "Message",ExpressionUUID->"9146c83b-c0f0-41a7-beab-95b001cdcf71"], +Cell[409530, 10268, 491, 11, 75, "Message",ExpressionUUID->"7f805e8a-85b3-4f7a-819a-3f9d2eac54b6"], +Cell[410024, 10281, 196, 3, 58, "Output",ExpressionUUID->"d9b607de-8b8c-4239-b97e-14e9f4483923"] }, Open ]], Cell[CellGroupData[{ -Cell[459413, 11381, 2219, 64, 624, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], -Cell[461635, 11447, 580, 12, 189, "Message",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], -Cell[462218, 11461, 583, 12, 218, "Message",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], -Cell[462804, 11475, 586, 12, 218, "Message",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], -Cell[463393, 11489, 458, 10, 66, "Message",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], -Cell[463854, 11501, 171, 3, 58, "Output",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] +Cell[410257, 10289, 2051, 55, 412, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], +Cell[412311, 10346, 20331, 383, 329, "Output",ExpressionUUID->"ef3101a5-f3a8-4d57-9288-13047cf26615"] }, Open ]], Cell[CellGroupData[{ -Cell[464062, 11509, 2221, 64, 624, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], -Cell[466286, 11575, 580, 12, 189, "Message",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], -Cell[466869, 11589, 583, 12, 218, "Message",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], -Cell[467455, 11603, 584, 12, 218, "Message",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], -Cell[468042, 11617, 456, 10, 66, "Message",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], -Cell[468501, 11629, 170, 3, 58, "Output",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] +Cell[432679, 10734, 2274, 63, 629, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], +Cell[434956, 10799, 542, 12, 169, "Message",ExpressionUUID->"bc57f14c-51f2-4211-be2b-6000f4f47045"], +Cell[435501, 10813, 543, 12, 169, "Message",ExpressionUUID->"0fab13dd-6697-4352-8ab0-87bc802256bf"], +Cell[436047, 10827, 546, 12, 169, "Message",ExpressionUUID->"e3912fa9-3c99-42d2-8ec5-eebf05bb2257"], +Cell[436596, 10841, 495, 11, 75, "Message",ExpressionUUID->"983bca50-17a0-4dba-9740-43a3eb05ab9d"], +Cell[437094, 10854, 26983, 489, 322, "Output",ExpressionUUID->"1c9570fd-5754-43ba-90dd-9784139dd833"] }, Open ]], Cell[CellGroupData[{ -Cell[468708, 11637, 213, 6, 81, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], -Cell[468924, 11645, 174, 3, 58, "Output",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] +Cell[464114, 11348, 232, 5, 51, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], +Cell[464349, 11355, 33344, 621, 322, "Output",ExpressionUUID->"a8df06da-6634-45be-832f-861b1d9c1ef2"] }, Open ]], -Cell[469113, 11651, 247, 5, 51, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ -Cell[469385, 11660, 558, 19, 91, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[469946, 11681, 173, 3, 58, "Output",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] +Cell[497730, 11981, 1648, 50, 420, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], +Cell[499381, 12033, 638, 14, 169, "Message",ExpressionUUID->"09cf2f08-36c9-4f24-8b15-332d21cda711"], +Cell[500022, 12049, 639, 14, 169, "Message",ExpressionUUID->"d5bed7ab-8f9c-4580-b2e3-6d08fe57c88e"], +Cell[500664, 12065, 638, 14, 169, "Message",ExpressionUUID->"ed0e4701-60c2-41ea-afb4-b189ad69a9e7"], +Cell[501305, 12081, 493, 11, 75, "Message",ExpressionUUID->"cc057008-4149-43da-8b96-7d10bad069c0"], +Cell[501801, 12094, 192, 3, 58, "Output",ExpressionUUID->"7552fc6d-d945-4671-a78f-fe9371717d17"] }, Open ]], Cell[CellGroupData[{ -Cell[470156, 11689, 170, 5, 97, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[470329, 11696, 173, 3, 58, "Output",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] +Cell[502030, 12102, 2270, 64, 624, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], +Cell[504303, 12168, 634, 13, 169, "Message",ExpressionUUID->"8261bfb7-0a68-4dbb-b59d-759f340f1469"], +Cell[504940, 12183, 633, 13, 169, "Message",ExpressionUUID->"e6688c1b-9705-454f-b896-2dd101fd148b"], +Cell[505576, 12198, 634, 13, 169, "Message",ExpressionUUID->"9c9c4344-1f1e-4702-babc-50eb45dae51f"], +Cell[506213, 12213, 495, 11, 75, "Message",ExpressionUUID->"b909307e-5d1d-4b0a-95a7-a9c70ee53bf3"], +Cell[506711, 12226, 194, 3, 58, "Output",ExpressionUUID->"217b5996-7704-40b4-ab7c-933b3c8127cf"] }, Open ]], Cell[CellGroupData[{ -Cell[470539, 11704, 181, 5, 75, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[470723, 11711, 171, 3, 58, "Output",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] +Cell[506942, 12234, 2231, 63, 624, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], +Cell[509176, 12299, 636, 13, 169, "Message",ExpressionUUID->"be2c7bcc-bd6b-4b63-8453-7273c4959da3"], +Cell[509815, 12314, 633, 13, 169, "Message",ExpressionUUID->"58c1a737-49ad-47c1-8609-91143e42b265"], +Cell[510451, 12329, 634, 13, 169, "Message",ExpressionUUID->"3964fbae-c48e-4bf8-8040-fa0fedcf561b"], +Cell[511088, 12344, 495, 11, 75, "Message",ExpressionUUID->"a9932742-1162-4c14-a707-17f77da94e54"], +Cell[511586, 12357, 191, 3, 58, "Output",ExpressionUUID->"22d27693-61a0-4bd8-ac9c-7f2b83605c33"] }, Open ]], Cell[CellGroupData[{ -Cell[470931, 11719, 6055, 185, 1734, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[476989, 11906, 173, 3, 58, "Output",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] +Cell[511814, 12365, 2233, 63, 624, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], +Cell[514050, 12430, 633, 13, 169, "Message",ExpressionUUID->"3ac0f089-4335-454b-b227-abfa1c299e98"], +Cell[514686, 12445, 636, 13, 169, "Message",ExpressionUUID->"24e540cd-a6bd-4ae2-aeb1-beb9069bfffe"], +Cell[515325, 12460, 636, 13, 169, "Message",ExpressionUUID->"223f5b22-14cb-488f-97a6-11d0fa2a506e"], +Cell[515964, 12475, 495, 11, 75, "Message",ExpressionUUID->"18e753ab-a867-491b-8d0c-9e61eaf0b28a"], +Cell[516462, 12488, 195, 3, 58, "Output",ExpressionUUID->"e5aec996-33fe-4f5c-8944-13b68868350c"] }, Open ]], Cell[CellGroupData[{ -Cell[477199, 11914, 368, 9, 73, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[477570, 11925, 172, 3, 58, "Output",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] +Cell[516694, 12496, 236, 6, 81, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], +Cell[516933, 12504, 196, 3, 58, "Output",ExpressionUUID->"013ae986-0349-4679-97a6-f7b811fd9cdb"] }, Open ]], +Cell[517144, 12510, 273, 6, 109, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ -Cell[477779, 11933, 6122, 187, 1645, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[483904, 12122, 175, 3, 58, "Output",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] +Cell[517442, 12520, 558, 19, 91, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], +Cell[518003, 12541, 197, 3, 58, "Output",ExpressionUUID->"c6f5e94e-953a-459d-9248-aae24c3e7812"] }, Open ]], Cell[CellGroupData[{ -Cell[484116, 12130, 368, 9, 73, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[484487, 12141, 171, 3, 58, "Output",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] +Cell[518237, 12549, 170, 5, 97, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], +Cell[518410, 12556, 197, 3, 58, "Output",ExpressionUUID->"724b649e-b878-46f9-b0c0-5f0a48aa677f"] }, Open ]], Cell[CellGroupData[{ -Cell[484695, 12149, 2663, 88, 786, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[487361, 12239, 173, 3, 58, "Output",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] +Cell[518644, 12564, 181, 5, 75, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], +Cell[518828, 12571, 193, 3, 58, "Output",ExpressionUUID->"e04dc4bd-5c44-41ab-9ff5-24a2b523b725"] }, Open ]], Cell[CellGroupData[{ -Cell[487571, 12247, 2603, 85, 786, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[490177, 12334, 171, 3, 58, "Output",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] +Cell[519058, 12579, 6055, 185, 1734, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], +Cell[525116, 12766, 197, 3, 58, "Output",ExpressionUUID->"2ab67409-b39e-4bda-b62b-8d52a616ce04"] }, Open ]], Cell[CellGroupData[{ -Cell[490385, 12342, 3712, 118, 1131, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[494100, 12462, 174, 3, 58, "Output",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] +Cell[525350, 12774, 368, 9, 73, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], +Cell[525721, 12785, 194, 3, 58, "Output",ExpressionUUID->"8309c33f-0686-40ac-b543-f794339b5c5c"] }, Open ]], Cell[CellGroupData[{ -Cell[494311, 12470, 2054, 59, 581, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], -Cell[496368, 12531, 572, 12, 189, "Message",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], -Cell[496943, 12545, 573, 12, 189, "Message",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], -Cell[497519, 12559, 579, 12, 189, "Message",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], -Cell[498101, 12573, 456, 10, 66, "Message",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], -Cell[498560, 12585, 169, 3, 58, "Output",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] +Cell[525952, 12793, 6122, 187, 1645, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], +Cell[532077, 12982, 198, 3, 58, "Output",ExpressionUUID->"5c3903e6-116c-41fe-a842-1353d0ae0aef"] }, Open ]], Cell[CellGroupData[{ -Cell[498766, 12593, 2049, 58, 581, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], -Cell[500818, 12653, 570, 12, 189, "Message",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], -Cell[501391, 12667, 575, 12, 189, "Message",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], -Cell[501969, 12681, 579, 12, 189, "Message",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], -Cell[502551, 12695, 458, 10, 66, "Message",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], -Cell[503012, 12707, 171, 3, 58, "Output",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] +Cell[532312, 12990, 368, 9, 73, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], +Cell[532683, 13001, 192, 3, 58, "Output",ExpressionUUID->"3bad7398-6647-498c-a40c-d20ed738c278"] }, Open ]], Cell[CellGroupData[{ -Cell[503220, 12715, 2030, 55, 412, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], -Cell[505253, 12772, 20011, 378, 329, "Output",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] +Cell[532912, 13009, 2663, 88, 786, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], +Cell[535578, 13099, 195, 3, 58, "Output",ExpressionUUID->"cb8ed9dd-076a-4107-80de-b79459062b5a"] }, Open ]], Cell[CellGroupData[{ -Cell[525301, 13155, 2120, 60, 629, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], -Cell[527424, 13217, 501, 11, 160, "Message",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], -Cell[527928, 13230, 505, 11, 160, "Message",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], -Cell[528436, 13243, 506, 11, 160, "Message",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], -Cell[528945, 13256, 456, 10, 66, "Message",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], -Cell[529404, 13268, 31008, 556, 323, "Output",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] +Cell[535810, 13107, 2603, 85, 786, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], +Cell[538416, 13194, 192, 3, 58, "Output",ExpressionUUID->"b5bf9a14-1013-4d0c-bbe0-ef6ea06fd63c"] }, Open ]], -Cell[560427, 13827, 209, 5, 51, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], Cell[CellGroupData[{ -Cell[560661, 13836, 1616, 48, 420, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], -Cell[562280, 13886, 593, 12, 218, "Message",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], -Cell[562876, 13900, 595, 12, 218, "Message",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], -Cell[563474, 13914, 602, 12, 218, "Message",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], -Cell[564079, 13928, 456, 10, 66, "Message",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], -Cell[564538, 13940, 172, 3, 58, "Output",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] +Cell[538645, 13202, 3712, 118, 1131, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], +Cell[542360, 13322, 198, 3, 58, "Output",ExpressionUUID->"c73d1af1-6cc0-4382-8239-cb27890a9ddb"] }, Open ]], Cell[CellGroupData[{ -Cell[564747, 13948, 2249, 64, 624, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], -Cell[566999, 14014, 572, 12, 189, "Message",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], -Cell[567574, 14028, 575, 12, 189, "Message",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], -Cell[568152, 14042, 579, 12, 189, "Message",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], -Cell[568734, 14056, 458, 10, 66, "Message",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], -Cell[569195, 14068, 173, 3, 58, "Output",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] +Cell[542595, 13330, 2213, 62, 581, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], +Cell[544811, 13394, 633, 13, 169, "Message",ExpressionUUID->"0ce20d01-bc1e-4645-8223-4b2c94b74577"], +Cell[545447, 13409, 635, 13, 169, "Message",ExpressionUUID->"67faae4e-108b-4220-b389-c679645f5a5c"], +Cell[546085, 13424, 634, 13, 169, "Message",ExpressionUUID->"13aecec3-fe2f-4cfd-9914-38e8be0fd6f7"], +Cell[546722, 13439, 497, 11, 75, "Message",ExpressionUUID->"25fc0c51-f5d6-4d7d-a085-aac6c16f5606"], +Cell[547222, 13452, 194, 3, 58, "Output",ExpressionUUID->"77b8fae5-ec38-4031-895e-e0a11449d649"] }, Open ]], Cell[CellGroupData[{ -Cell[569405, 14076, 2221, 64, 624, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], -Cell[571629, 14142, 572, 12, 189, "Message",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], -Cell[572204, 14156, 575, 12, 189, "Message",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], -Cell[572782, 14170, 577, 12, 189, "Message",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], -Cell[573362, 14184, 456, 10, 66, "Message",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], -Cell[573821, 14196, 172, 3, 58, "Output",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] +Cell[547453, 13460, 2210, 62, 581, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], +Cell[549666, 13524, 633, 13, 169, "Message",ExpressionUUID->"a95c701b-5048-4a7d-935c-edaa4c002182"], +Cell[550302, 13539, 631, 13, 169, "Message",ExpressionUUID->"2a83baeb-4c44-4352-b65b-2a07906ee034"], +Cell[550936, 13554, 634, 13, 169, "Message",ExpressionUUID->"0f469ede-cff1-4670-a85c-a5e4a1beed17"], +Cell[551573, 13569, 495, 11, 75, "Message",ExpressionUUID->"48f63a2a-7a82-4f9e-91ee-f6f53588e33a"], +Cell[552071, 13582, 194, 3, 58, "Output",ExpressionUUID->"d321a0ac-453f-4403-936b-a05278661ccb"] }, Open ]], Cell[CellGroupData[{ -Cell[574030, 14204, 2223, 64, 624, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], -Cell[576256, 14270, 572, 12, 189, "Message",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], -Cell[576831, 14284, 573, 12, 189, "Message",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], -Cell[577407, 14298, 579, 12, 189, "Message",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], -Cell[577989, 14312, 456, 10, 66, "Message",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], -Cell[578448, 14324, 173, 3, 58, "Output",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] +Cell[552302, 13590, 2053, 55, 412, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], +Cell[554358, 13647, 20308, 381, 329, "Output",ExpressionUUID->"6a770377-a62d-4d80-af27-196387642b51"] }, Open ]], Cell[CellGroupData[{ -Cell[578658, 14332, 215, 6, 81, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], -Cell[578876, 14340, 174, 3, 58, "Output",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] +Cell[574703, 14033, 2279, 63, 629, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], +Cell[576985, 14098, 538, 12, 169, "Message",ExpressionUUID->"f1b10c4b-d0ca-48ef-80c5-037b8ef700ce"], +Cell[577526, 14112, 540, 12, 169, "Message",ExpressionUUID->"e8eef9ed-2aea-4da3-9e03-bd26268972a6"], +Cell[578069, 14126, 543, 12, 169, "Message",ExpressionUUID->"782e5b7c-3277-447f-adf9-b3d9a03ba285"], +Cell[578615, 14140, 495, 11, 75, "Message",ExpressionUUID->"1fa8893b-e5f7-422c-90dc-d9a93570882a"], +Cell[579113, 14153, 25557, 468, 326, "Output",ExpressionUUID->"cf24b5d3-c8c2-44ec-97d2-13398049e12b"] }, Open ]], -Cell[579065, 14346, 115, 1, 51, "Input",ExpressionUUID->"2809d080-4c9b-47b9-8022-1a475fefd15e"] +Cell[CellGroupData[{ +Cell[604707, 14626, 232, 5, 51, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], +Cell[604942, 14633, 31915, 600, 326, "Output",ExpressionUUID->"44269e41-1a97-4999-9535-368c263cb7fe"] +}, Open ]], +Cell[CellGroupData[{ +Cell[636894, 15238, 1648, 50, 420, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], +Cell[638545, 15290, 637, 14, 169, "Message",ExpressionUUID->"8f643200-f220-418c-84e0-c0031d5240b6"], +Cell[639185, 15306, 636, 14, 169, "Message",ExpressionUUID->"b5024757-a5ee-4afa-aeec-1aa86e95553f"], +Cell[639824, 15322, 636, 14, 169, "Message",ExpressionUUID->"59e3e2f3-d4ac-4a85-868b-4faad77b42aa"], +Cell[640463, 15338, 493, 11, 75, "Message",ExpressionUUID->"6749f825-2dfc-48b4-a21e-cd558403bf35"], +Cell[640959, 15351, 194, 3, 58, "Output",ExpressionUUID->"8a12ea3e-61fb-4ecc-b587-86d0f91577b5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[641190, 15359, 2272, 64, 624, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], +Cell[643465, 15425, 633, 13, 169, "Message",ExpressionUUID->"1e5b9b86-f0da-4544-bce0-c0c3f8a3fe7f"], +Cell[644101, 15440, 633, 13, 169, "Message",ExpressionUUID->"2c4d94e4-d860-4ea6-a51d-5d5af1f80ee7"], +Cell[644737, 15455, 636, 13, 169, "Message",ExpressionUUID->"0d0ce7e3-1a7e-4c75-8798-937a5851c47e"], +Cell[645376, 15470, 495, 11, 75, "Message",ExpressionUUID->"09822309-ee97-4866-8ca0-446d6b63afc6"], +Cell[645874, 15483, 194, 3, 58, "Output",ExpressionUUID->"f2aae503-903f-46dc-8e7b-cd8cadbda2e8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[646105, 15491, 2233, 63, 624, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], +Cell[648341, 15556, 633, 13, 169, "Message",ExpressionUUID->"1fd0fac6-24e8-497a-bf18-e8a0ab49a97a"], +Cell[648977, 15571, 633, 13, 169, "Message",ExpressionUUID->"b32a5f91-7e8b-4dfe-8b6f-d88461aff67b"], +Cell[649613, 15586, 634, 13, 169, "Message",ExpressionUUID->"aa4254ac-020d-457a-9ea5-27ea6c86572a"], +Cell[650250, 15601, 497, 11, 75, "Message",ExpressionUUID->"a6a0e96c-2488-40a5-849f-af9ef1bedb19"], +Cell[650750, 15614, 197, 3, 58, "Output",ExpressionUUID->"b150f23d-c86a-46a6-9962-0707a461ae71"] +}, Open ]], +Cell[CellGroupData[{ +Cell[650984, 15622, 2235, 63, 624, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], +Cell[653222, 15687, 633, 13, 169, "Message",ExpressionUUID->"de98b6a8-73e8-4ef6-a92d-761154732e2a"], +Cell[653858, 15702, 632, 13, 169, "Message",ExpressionUUID->"77f12d01-b71e-403f-a7d2-20749e0c55dc"], +Cell[654493, 15717, 634, 13, 169, "Message",ExpressionUUID->"d663e0ab-6cdb-49a0-a107-231e59c2510c"], +Cell[655130, 15732, 495, 11, 75, "Message",ExpressionUUID->"581fd853-43f0-4f40-bbff-de339a2489f7"], +Cell[655628, 15745, 195, 3, 58, "Output",ExpressionUUID->"5f40632c-2610-4bed-80b2-25a6b1eeae9b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[655860, 15753, 238, 6, 81, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], +Cell[656101, 15761, 195, 3, 58, "Output",ExpressionUUID->"b9f1979d-37a2-4eb1-b6c1-e20d9108e35b"] +}, Open ]], +Cell[656311, 15767, 143, 3, 109, "Input",ExpressionUUID->"2809d080-4c9b-47b9-8022-1a475fefd15e"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw2.nb b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw2.nb index 7ad16db..2b5f14f 100644 --- a/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw2.nb +++ b/Pu240_798-811_TitovAA/170-70_h_Pu240_24-25/h_170-70_Pu240_24-25_pr_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 803795, 19881] -NotebookOptionsPosition[ 749995, 19004] -NotebookOutlinePosition[ 750405, 19021] -CellTagsIndexPosition[ 750362, 19018] +NotebookDataLength[ 888040, 21484] +NotebookOptionsPosition[ 832478, 20579] +NotebookOutlinePosition[ 832909, 20597] +CellTagsIndexPosition[ 832866, 20594] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -27,16 +27,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, - CellLabel-> - "In[408]:=",ExpressionUUID->"81b527e9-1a4a-4a72-b90f-3535b7c3d89c"], + CellLabel->"In[1]:=",ExpressionUUID->"81b527e9-1a4a-4a72-b90f-3535b7c3d89c"], Cell[BoxData["2"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, - 3.9940750908104277`*^9}}, - CellLabel-> - "Out[408]=",ExpressionUUID->"07f0787f-581a-4439-9d6d-37f725e93a51"] + 3.9940750908104277`*^9}, 3.9943499828863363`*^9, 3.994352531625037*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"ebb6d2d1-c5f1-4848-8545-e642d655304d"] }, Open ]], Cell[CellGroupData[{ @@ -45,16 +43,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, - CellLabel-> - "In[409]:=",ExpressionUUID->"134c5a5b-fb7e-4fc8-b759-5838444ed063"], + CellLabel->"In[2]:=",ExpressionUUID->"134c5a5b-fb7e-4fc8-b759-5838444ed063"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, - 3.994075090853217*^9}}, - CellLabel-> - "Out[409]=",ExpressionUUID->"c39f08c8-842b-409d-83a7-ee4f988a36de"] + 3.994075090853217*^9}, 3.994349983489924*^9, 3.994352531888768*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"b0c6a54a-b0ce-4b45-822b-4eda2e6d3153"] }, Open ]], Cell[CellGroupData[{ @@ -63,16 +59,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "170"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, - CellLabel-> - "In[410]:=",ExpressionUUID->"b43c51b8-3564-4e75-973a-9cc22cbf1ac4"], + CellLabel->"In[3]:=",ExpressionUUID->"b43c51b8-3564-4e75-973a-9cc22cbf1ac4"], Cell[BoxData["170"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, - 3.994075090864901*^9}}, - CellLabel-> - "Out[410]=",ExpressionUUID->"fbf78345-d43f-497e-9785-8d0970ea6f6b"] + 3.994075090864901*^9}, 3.994349983531753*^9, 3.994352531903076*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"e154f047-0299-446c-860d-5884f04da558"] }, Open ]], Cell[CellGroupData[{ @@ -80,16 +74,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[411]:=",ExpressionUUID->"5797654b-52b1-44d0-a8d9-179c3e288f61"], + CellLabel->"In[4]:=",ExpressionUUID->"5797654b-52b1-44d0-a8d9-179c3e288f61"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, - 3.9940750908767548`*^9}}, - CellLabel-> - "Out[411]=",ExpressionUUID->"6cbad377-4ab0-4ccc-9211-9dd75f8afb60"] + 3.9940750908767548`*^9}, 3.994349983570492*^9, 3.994352531917288*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"3f12a846-9212-4d0b-a71f-bd7884a7ae46"] }, Open ]], Cell[CellGroupData[{ @@ -101,32 +93,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"55247566-8120-4655-a71a-f0839cd707d9"], + CellLabel->"In[5]:=",ExpressionUUID->"55247566-8120-4655-a71a-f0839cd707d9"], Cell[BoxData["0.5437500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, - 3.994075090888695*^9}}, - CellLabel-> - "Out[412]=",ExpressionUUID->"442e9716-3d2a-4108-9a0f-d1ac5ab6c9ee"] + 3.994075090888695*^9}, 3.994349983603786*^9, 3.994352531931275*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"86c8b19c-f491-4e51-adb1-9b1af86c2d41"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"9be26ed7-edeb-4da5-a549-86a2c4581309"], + CellLabel->"In[6]:=",ExpressionUUID->"9be26ed7-edeb-4da5-a549-86a2c4581309"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, - 3.9940750909003353`*^9}}, - CellLabel-> - "Out[413]=",ExpressionUUID->"5b996026-7e1d-495a-b544-8cb3b0822826"] + 3.9940750909003353`*^9}, 3.99434998363513*^9, 3.994352531945204*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"0f3a791c-bfa6-4a09-8f5d-92a0d530aa8c"] }, Open ]], Cell[CellGroupData[{ @@ -137,16 +125,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[414]:=",ExpressionUUID->"4cbcc918-98e8-460e-9080-638d3804e3f5"], + CellLabel->"In[7]:=",ExpressionUUID->"4cbcc918-98e8-460e-9080-638d3804e3f5"], Cell[BoxData["6.426003577835178`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, - 3.9940750909055967`*^9}}, - CellLabel-> - "Out[414]=",ExpressionUUID->"0efc00a8-ae19-42aa-996a-3bef55caec17"] + 3.9940750909055967`*^9}, 3.994349983676399*^9, 3.994352531959276*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"38772d95-6859-44b3-986c-30891b424c88"] }, Open ]], Cell[CellGroupData[{ @@ -158,16 +144,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[415]:=",ExpressionUUID->"22ff34f5-3764-46f1-b790-637cf5aaf7d0"], + CellLabel->"In[8]:=",ExpressionUUID->"22ff34f5-3764-46f1-b790-637cf5aaf7d0"], Cell[BoxData["4.7806909477779245`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, - 3.994075090919847*^9}}, - CellLabel-> - "Out[415]=",ExpressionUUID->"2b733097-549c-4317-85bc-0cf633ba2f8e"] + 3.994075090919847*^9}, 3.994349983718504*^9, 3.994352531973096*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"6b321be3-e1c2-4d44-8196-f97d10a007f8"] }, Open ]], Cell[CellGroupData[{ @@ -175,15 +159,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8747255229"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, - CellLabel-> - "In[416]:=",ExpressionUUID->"6834db87-b122-4ba9-8997-2a6808e2a7fa"], + CellLabel->"In[9]:=",ExpressionUUID->"6834db87-b122-4ba9-8997-2a6808e2a7fa"], Cell[BoxData["0.8747255229`"], "Output", CellChangeTimes->{ 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, - 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}}, - CellLabel-> - "Out[416]=",ExpressionUUID->"f308de37-a60d-4d54-ba06-dd2efcdbc402"] + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.994349983764226*^9, 3.99435253198711*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"cc693a85-48d7-40f3-8f7e-b9ba3bea383e"] }, Open ]], Cell[CellGroupData[{ @@ -191,47 +174,42 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3882072479"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, - CellLabel-> - "In[417]:=",ExpressionUUID->"78c225f3-4236-4030-be10-19a9eb0e8500"], + CellLabel->"In[10]:=",ExpressionUUID->"78c225f3-4236-4030-be10-19a9eb0e8500"], Cell[BoxData["0.3882072479`"], "Output", CellChangeTimes->{ 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, - 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}}, - CellLabel-> - "Out[417]=",ExpressionUUID->"31a6958c-ca23-41dd-87c2-450329edba5d"] + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994349983809341*^9, 3.994352532000956*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"0c37fc4a-606b-412c-9387-51d1bd415b27"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[418]:=",ExpressionUUID->"c954b44c-22ac-4023-bfd3-2d72e9cda875"], + CellLabel->"In[11]:=",ExpressionUUID->"c954b44c-22ac-4023-bfd3-2d72e9cda875"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, - 3.994075090955942*^9}}, - CellLabel-> - "Out[418]=",ExpressionUUID->"d3894bce-5251-446d-9675-10f0ffe5230f"] + 3.994075090955942*^9}, 3.994349983821702*^9, 3.994352532015386*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"2fb0f300-47bc-4227-a1d9-f768f0f482f9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[419]:=",ExpressionUUID->"3f3cd860-e5a5-4f15-a7ef-da034b5da88b"], + CellLabel->"In[12]:=",ExpressionUUID->"3f3cd860-e5a5-4f15-a7ef-da034b5da88b"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, - 3.9940750909684067`*^9}}, - CellLabel-> - "Out[419]=",ExpressionUUID->"0d32f0e0-50c7-4b58-8e3b-bb7c495b5d3c"] + 3.9940750909684067`*^9}, 3.9943499838716383`*^9, 3.994352532030851*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"9dd0594c-8fce-481a-8af2-c5c2465af648"] }, Open ]], Cell[CellGroupData[{ @@ -255,16 +233,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[420]:=",ExpressionUUID->"4ae63ea4-9ceb-446d-85b8-3f2529094ea8"], + CellLabel->"In[13]:=",ExpressionUUID->"4ae63ea4-9ceb-446d-85b8-3f2529094ea8"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, - 3.994075090978916*^9}}, - CellLabel-> - "Out[420]=",ExpressionUUID->"f931dc3a-cc55-4dd2-bc48-1dda79a3bded"] + 3.994075090978916*^9}, 3.9943499839083157`*^9, 3.9943525320474586`*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"e49bbfab-0b8c-4e2a-8985-91cedb3150c9"] }, Open ]], Cell[CellGroupData[{ @@ -288,16 +264,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[421]:=",ExpressionUUID->"07a2d665-3e57-46fe-a011-636961fd623b"], + CellLabel->"In[14]:=",ExpressionUUID->"07a2d665-3e57-46fe-a011-636961fd623b"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, - 3.99407509098914*^9}}, - CellLabel-> - "Out[421]=",ExpressionUUID->"c6ee6a11-2260-4ea7-98e1-b4922dd7d924"] + 3.99407509098914*^9}, 3.994349983993136*^9, 3.994352532062193*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"acf334b9-bc87-4f43-933a-9f0aea25a225"] }, Open ]], Cell[CellGroupData[{ @@ -352,16 +326,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[422]:=",ExpressionUUID->"a1b528f2-606b-46cc-ab92-6f748f78f2ad"], + CellLabel->"In[15]:=",ExpressionUUID->"a1b528f2-606b-46cc-ab92-6f748f78f2ad"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, - 3.994075090999715*^9}}, - CellLabel-> - "Out[422]=",ExpressionUUID->"2b5198b1-074d-4859-b5c7-4baae7a5ff32"] + 3.994075090999715*^9}, 3.994349984028678*^9, 3.9943525320768633`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"67f38f09-fb54-4276-be32-e21fba5706e2"] }, Open ]], Cell[CellGroupData[{ @@ -412,17 +384,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[423]:=",ExpressionUUID->"0be2b1e0-cb10-4a08-ab94-bf55fd089016"], + CellLabel->"In[16]:=",ExpressionUUID->"0be2b1e0-cb10-4a08-ab94-bf55fd089016"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, - 3.994075091010479*^9}}, - CellLabel-> - "Out[423]=",ExpressionUUID->"c78eec67-2fc1-4d16-a49e-c1de3d508601"] + 3.994075091010479*^9}, 3.994349984068945*^9, 3.994352532093441*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"11c6615a-b7b1-49ad-b44f-fe1ae2395a03"] }, Open ]], Cell[CellGroupData[{ @@ -473,17 +443,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[424]:=",ExpressionUUID->"98c397be-c84e-4e6d-b795-6b135f8bf1f7"], + CellLabel->"In[17]:=",ExpressionUUID->"98c397be-c84e-4e6d-b795-6b135f8bf1f7"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, - 3.9940750910236893`*^9}}, - CellLabel-> - "Out[424]=",ExpressionUUID->"6812a211-e1c4-478a-ab97-09a4444900b3"] + 3.9940750910236893`*^9}, 3.994349984113145*^9, 3.994352532109387*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"39d552d3-df35-484d-abcf-ee3832d5974b"] }, Open ]], Cell[CellGroupData[{ @@ -536,64 +504,56 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[425]:=",ExpressionUUID->"bc2e9ecb-9f98-4a9d-a794-eed238079895"], + CellLabel->"In[18]:=",ExpressionUUID->"bc2e9ecb-9f98-4a9d-a794-eed238079895"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, - 3.994075091035767*^9}}, - CellLabel-> - "Out[425]=",ExpressionUUID->"8b8c9dcd-123b-40ff-a496-360706c20e12"] + 3.994075091035767*^9}, 3.9943499841248693`*^9, 3.994352532125039*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"e326e252-3850-4600-9ba4-56381220ead2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[426]:=",ExpressionUUID->"10ca4ab8-d4d1-4e93-96ba-6d736cbe4e69"], + CellLabel->"In[19]:=",ExpressionUUID->"10ca4ab8-d4d1-4e93-96ba-6d736cbe4e69"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, - 3.9940750910471153`*^9}}, - CellLabel-> - "Out[426]=",ExpressionUUID->"0d0b47ad-7c92-4ad7-8075-47b9bcb98d7b"] + 3.9940750910471153`*^9}, 3.9943499841681023`*^9, 3.9943525321421013`*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"cda9e7ac-f3df-4442-bee6-79d66d62d268"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[427]:=",ExpressionUUID->"7e0d93aa-f871-45de-8331-4f903699483e"], + CellLabel->"In[20]:=",ExpressionUUID->"7e0d93aa-f871-45de-8331-4f903699483e"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, - 3.9940750910581427`*^9}}, - CellLabel-> - "Out[427]=",ExpressionUUID->"59f9bf8b-cd38-4c14-b4df-237c8dbd073c"] + 3.9940750910581427`*^9}, 3.9943499842216597`*^9, 3.994352532158445*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"3ffceaa4-0aaa-4a62-88d1-31ad5ead4f32"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[428]:=",ExpressionUUID->"aa33af73-769e-4a25-b7cf-91f1615de0b8"], + CellLabel->"In[21]:=",ExpressionUUID->"aa33af73-769e-4a25-b7cf-91f1615de0b8"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, - 3.994075091069083*^9}}, - CellLabel-> - "Out[428]=",ExpressionUUID->"eb6413cf-902a-44a2-bb52-7931a4cb1a88"] + 3.994075091069083*^9}, 3.994349984247944*^9, 3.994352532175537*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"cd45e1f6-cbba-453a-bed3-97912f06cebe"] }, Open ]], Cell[CellGroupData[{ @@ -602,33 +562,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[429]:=",ExpressionUUID->"d55f4443-2ba8-4c0a-96a1-424b50e81576"], + CellLabel->"In[22]:=",ExpressionUUID->"d55f4443-2ba8-4c0a-96a1-424b50e81576"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, - 3.994075091080567*^9}}, - CellLabel-> - "Out[429]=",ExpressionUUID->"f7a3dcc3-f3d3-415d-88e8-bf068b3fcd03"] + 3.994075091080567*^9}, 3.994349984262686*^9, 3.994352532191874*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"efe55710-4429-4ea6-8746-98f66fb20d85"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[430]:=",ExpressionUUID->"52ae6f0b-9fef-418d-b34f-d0156c471818"], + CellLabel->"In[23]:=",ExpressionUUID->"52ae6f0b-9fef-418d-b34f-d0156c471818"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, - 3.994075091090703*^9}}, - CellLabel-> - "Out[430]=",ExpressionUUID->"44896276-b91a-483b-aacd-639012eb5a03"] + 3.994075091090703*^9}, 3.9943499842771273`*^9, 3.994352532208364*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"487b8ef1-c26c-4ade-b3ef-58b82c314979"] }, Open ]], Cell[CellGroupData[{ @@ -638,16 +594,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073690740699*^9, 3.994073690862359*^9}}, - CellLabel-> - "In[431]:=",ExpressionUUID->"0f22a465-82d4-444b-a05c-243d880f3c9c"], + CellLabel->"In[24]:=",ExpressionUUID->"0f22a465-82d4-444b-a05c-243d880f3c9c"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, - 3.994075091102222*^9}}, - CellLabel-> - "Out[431]=",ExpressionUUID->"f7ceba86-6ad8-40a3-9e7c-fa74a2e46f89"] + 3.994075091102222*^9}, 3.99434998429335*^9, 3.994352532223929*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"690c2146-371d-4649-aed6-8a4e7b9cb729"] }, Open ]], Cell[CellGroupData[{ @@ -657,16 +611,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, - CellLabel-> - "In[432]:=",ExpressionUUID->"674f5b65-3f95-499c-ae0e-149d7ff5bbea"], + CellLabel->"In[25]:=",ExpressionUUID->"674f5b65-3f95-499c-ae0e-149d7ff5bbea"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, - 3.994075091112747*^9}}, - CellLabel-> - "Out[432]=",ExpressionUUID->"d2a06cb7-d102-4bee-b038-393092cf6ff7"] + 3.994075091112747*^9}, 3.9943499843073807`*^9, 3.99435253223939*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"5190012b-8874-4f37-8ac9-ee23b140c1af"] }, Open ]], Cell[CellGroupData[{ @@ -675,16 +627,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[433]:=",ExpressionUUID->"419fa898-845d-4e55-b445-f18a32d77680"], + CellLabel->"In[26]:=",ExpressionUUID->"419fa898-845d-4e55-b445-f18a32d77680"], Cell[BoxData["70"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, - 3.9940750911232967`*^9}}, - CellLabel-> - "Out[433]=",ExpressionUUID->"fdb2a482-89e7-4e1c-ba40-14f45a3ea955"] + 3.9940750911232967`*^9}, 3.99434998432417*^9, 3.994352532254312*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"f8d945fa-2656-41c8-81a8-eceae35072d9"] }, Open ]], Cell[CellGroupData[{ @@ -699,16 +649,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[434]:=",ExpressionUUID->"ba616683-0f1c-4d79-a9fe-9e7bb0668997"], + CellLabel->"In[27]:=",ExpressionUUID->"ba616683-0f1c-4d79-a9fe-9e7bb0668997"], Cell[BoxData["0.1087764705882353`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, - 3.994075091133902*^9}}, - CellLabel-> - "Out[434]=",ExpressionUUID->"90712c98-beeb-4a8a-a41c-11095ade9b01"] + 3.994075091133902*^9}, 3.9943499843391027`*^9, 3.9943525322685328`*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"ff446f56-7470-4498-9b59-01509bee8776"] }, Open ]], Cell[CellGroupData[{ @@ -723,17 +671,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[435]:=",ExpressionUUID->"a585b481-0438-4e38-a5db-e58c3f347d51"], + CellLabel->"In[28]:=",ExpressionUUID->"a585b481-0438-4e38-a5db-e58c3f347d51"], Cell[BoxData[ RowBox[{"-", "2.5658588235294117`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, - 3.9940750911440773`*^9}}, - CellLabel-> - "Out[435]=",ExpressionUUID->"56ad2987-614e-4ac2-b3f5-f9ab5b085e41"] + 3.9940750911440773`*^9}, 3.994349984352584*^9, 3.994352532282777*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"fa13a3d5-78ec-41bd-a3be-7bd02e5fe94d"] }, Open ]], Cell[CellGroupData[{ @@ -764,16 +710,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[436]:=",ExpressionUUID->"9df59fdf-3144-4ce6-ac26-b866533ca4bd"], + CellLabel->"In[29]:=",ExpressionUUID->"9df59fdf-3144-4ce6-ac26-b866533ca4bd"], Cell[BoxData["17.474387700041003`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, - 3.9940750911556253`*^9}}, - CellLabel-> - "Out[436]=",ExpressionUUID->"78251514-3973-44e8-8212-9aff757fa46a"] + 3.9940750911556253`*^9}, 3.994349984370935*^9, 3.99435253229741*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"bbae0e40-4147-4242-a4a4-dfa67625f583"] }, Open ]], Cell[CellGroupData[{ @@ -781,16 +725,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[437]:=",ExpressionUUID->"c6804401-99e6-4312-84b8-003a58fc9e74"], + CellLabel->"In[30]:=",ExpressionUUID->"c6804401-99e6-4312-84b8-003a58fc9e74"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, - 3.99407509116647*^9}}, - CellLabel-> - "Out[437]=",ExpressionUUID->"2668198c-24b3-44fe-8bb5-23aee1d84d93"] + 3.99407509116647*^9}, 3.9943499843867483`*^9, 3.99435253231182*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"a975d77e-98da-4872-b258-2fdfafc13b7f"] }, Open ]], Cell[CellGroupData[{ @@ -800,21 +742,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.9940737081112833`*^9, 3.994073709172043*^9}}, - CellLabel-> - "In[438]:=",ExpressionUUID->"abb24b70-6e69-40b5-8e99-1e6fc0f229c6"], + CellLabel->"In[31]:=",ExpressionUUID->"abb24b70-6e69-40b5-8e99-1e6fc0f229c6"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{ 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, - 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}}, - CellLabel-> - "Out[438]=",ExpressionUUID->"bb84bf09-67d5-4828-ae2e-9bf840698a86"] + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.994349984401531*^9, 3.994352532326417*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"8930c349-c4d8-4954-ac53-30abde326047"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[439]:=",ExpressionUUID->"2033be30-ce42-461b-9483-9d9fe4970881"], + CellLabel->"In[32]:=",ExpressionUUID->"2033be30-ce42-461b-9483-9d9fe4970881"], Cell[CellGroupData[{ @@ -823,21 +763,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073711335288*^9, 3.994073712564888*^9}}, - CellLabel-> - "In[440]:=",ExpressionUUID->"94550ac3-3438-49b5-b74e-e8d552b88948"], + CellLabel->"In[33]:=",ExpressionUUID->"94550ac3-3438-49b5-b74e-e8d552b88948"], Cell[BoxData["0.785`"], "Output", CellChangeTimes->{ 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, - 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}}, - CellLabel-> - "Out[440]=",ExpressionUUID->"1df62af1-d286-4890-8f5d-30b72d2daff6"] + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.994349984425955*^9, 3.994352532344205*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"0f7682cc-3f1d-41ed-bc76-6e014eb6954a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[441]:=",ExpressionUUID->"9e0c9678-3423-4776-87d8-a635992f4d12"], + CellLabel->"In[34]:=",ExpressionUUID->"9e0c9678-3423-4776-87d8-a635992f4d12"], Cell[CellGroupData[{ @@ -846,21 +784,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940737150021257`*^9, 3.994073716213628*^9}}, - CellLabel-> - "In[442]:=",ExpressionUUID->"51045f82-8d11-44c3-9364-24648a013a2e"], + CellLabel->"In[35]:=",ExpressionUUID->"51045f82-8d11-44c3-9364-24648a013a2e"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{ 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, - 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}}, - CellLabel-> - "Out[442]=",ExpressionUUID->"44f95c9b-18e3-48a0-b3db-0568974168ad"] + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.994349984445984*^9, 3.9943525323614063`*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"3e37c264-95cb-4854-be4b-414837fdbf2e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[443]:=",ExpressionUUID->"0eb0248c-9222-4513-961b-455d0864b215"], + CellLabel->"In[36]:=",ExpressionUUID->"0eb0248c-9222-4513-961b-455d0864b215"], Cell[CellGroupData[{ @@ -869,21 +805,19 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, - CellLabel-> - "In[444]:=",ExpressionUUID->"e2d3a0dc-7fed-48de-b89a-2c0157c5fbb3"], + CellLabel->"In[37]:=",ExpressionUUID->"e2d3a0dc-7fed-48de-b89a-2c0157c5fbb3"], Cell[BoxData["1.125`"], "Output", CellChangeTimes->{ 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, - 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}}, - CellLabel-> - "Out[444]=",ExpressionUUID->"7ff7b5a3-6281-40ae-a27a-2e8606d239c8"] + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.994349984470213*^9, 3.9943525323776293`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"bb4db495-887f-44d3-86f9-beeeffe39a5d"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[445]:=",ExpressionUUID->"5ff06203-ae66-4fd9-9d55-92540c3e7ba7"], + CellLabel->"In[38]:=",ExpressionUUID->"5ff06203-ae66-4fd9-9d55-92540c3e7ba7"], Cell[CellGroupData[{ @@ -892,21 +826,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, 3.9940737264630413`*^9}}, - CellLabel-> - "In[446]:=",ExpressionUUID->"78d24afd-74f6-40f2-a8d0-785bc780349c"], + CellLabel->"In[39]:=",ExpressionUUID->"78d24afd-74f6-40f2-a8d0-785bc780349c"], Cell[BoxData["1.145`"], "Output", CellChangeTimes->{ 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, - 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}}, - CellLabel-> - "Out[446]=",ExpressionUUID->"529bdeb2-c753-42f1-9090-88df1be4716b"] + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.99434998449476*^9, 3.994352532394834*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"74eb0fa1-0703-4a48-8daf-b26641eeaf6f"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[447]:=",ExpressionUUID->"f8eaba12-c009-4373-85c6-cc8eb648d821"], + CellLabel->"In[40]:=",ExpressionUUID->"f8eaba12-c009-4373-85c6-cc8eb648d821"], Cell[CellGroupData[{ @@ -915,21 +847,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, 3.994073731586865*^9}}, - CellLabel-> - "In[448]:=",ExpressionUUID->"9a47dda6-f61c-467d-a2a7-1ad99c2ec831"], + CellLabel->"In[41]:=",ExpressionUUID->"9a47dda6-f61c-467d-a2a7-1ad99c2ec831"], Cell[BoxData["0.565`"], "Output", CellChangeTimes->{ 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, - 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}}, - CellLabel-> - "Out[448]=",ExpressionUUID->"64e2d668-4442-49ad-b2da-b50a933e0d0c"] + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.994349984515429*^9, 3.994352532410779*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"f2e7855d-2a86-4907-80c4-aa2cdcbd8c0a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[449]:=",ExpressionUUID->"4ce2f91d-123e-4fd5-9ad4-7c55cfd9f644"], + CellLabel->"In[42]:=",ExpressionUUID->"4ce2f91d-123e-4fd5-9ad4-7c55cfd9f644"], Cell[CellGroupData[{ @@ -938,21 +868,19 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, 3.994073737300967*^9}}, - CellLabel-> - "In[450]:=",ExpressionUUID->"00b90950-380c-4ad7-bdb9-9b9016abdda2"], + CellLabel->"In[43]:=",ExpressionUUID->"00b90950-380c-4ad7-bdb9-9b9016abdda2"], Cell[BoxData["1.5`"], "Output", CellChangeTimes->{ 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, - 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}}, - CellLabel-> - "Out[450]=",ExpressionUUID->"1bf8ef89-cb3f-48b2-ba4c-976d1a5b2dba"] + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.994349984536622*^9, 3.994352532426592*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"07c1f823-c508-42e4-bcbb-7894d1bdf835"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[451]:=",ExpressionUUID->"8f369104-d5c5-476d-8d7a-af83e1b30d17"], + CellLabel->"In[44]:=",ExpressionUUID->"8f369104-d5c5-476d-8d7a-af83e1b30d17"], Cell[CellGroupData[{ @@ -960,21 +888,19 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.635"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, - CellLabel-> - "In[452]:=",ExpressionUUID->"f1ee930f-df89-4ccf-8a09-e2d7b3b8e0b5"], + CellLabel->"In[45]:=",ExpressionUUID->"f1ee930f-df89-4ccf-8a09-e2d7b3b8e0b5"], Cell[BoxData["0.635`"], "Output", CellChangeTimes->{ 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, - 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}}, - CellLabel-> - "Out[452]=",ExpressionUUID->"9d21e662-f4a0-440f-873e-7a28287ce341"] + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.99434998455842*^9, 3.994352532443109*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"64b48ce8-4ec0-4738-8c7b-0a38af2c3f81"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[453]:=",ExpressionUUID->"86b52cef-b172-4954-b709-1f6c41e2feab"], + CellLabel->"In[46]:=",ExpressionUUID->"86b52cef-b172-4954-b709-1f6c41e2feab"], Cell[CellGroupData[{ @@ -1463,16 +1389,14 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[454]:=",ExpressionUUID->"761aab7f-a618-4bb2-9981-34a333242c95"], + CellLabel->"In[47]:=",ExpressionUUID->"761aab7f-a618-4bb2-9981-34a333242c95"], Cell[BoxData["0.12734722137174234`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, - 3.994075091306961*^9}}, - CellLabel-> - "Out[454]=",ExpressionUUID->"da1d140f-d2ea-4b89-a4a0-e015a1955f1b"] + 3.994075091306961*^9}, 3.9943499847716913`*^9, 3.9943525325400267`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"d07db094-5fa6-4e14-bcb6-26d444f735cb"] }, Open ]], Cell[CellGroupData[{ @@ -1966,16 +1890,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[455]:=",ExpressionUUID->"4e5c5ac6-229a-4cbf-84e4-e21aa5975ed7"], + CellLabel->"In[48]:=",ExpressionUUID->"4e5c5ac6-229a-4cbf-84e4-e21aa5975ed7"], Cell[BoxData["7.503764283698204`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, - 3.994075091332656*^9}}, - CellLabel-> - "Out[455]=",ExpressionUUID->"de40f40d-3522-4fa6-9672-aeed9d5cc67f"] + 3.994075091332656*^9}, 3.994349984842669*^9, 3.99435253257909*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"91d3eced-055d-4da7-bf06-c8905f829b16"] }, Open ]], Cell[CellGroupData[{ @@ -2463,17 +2385,15 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[456]:=",ExpressionUUID->"b6e1c50f-453f-4f08-9bb8-406c60c96df1"], + CellLabel->"In[49]:=",ExpressionUUID->"b6e1c50f-453f-4f08-9bb8-406c60c96df1"], Cell[BoxData[ RowBox[{"-", "14.220629552114458`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, - 3.994075091358534*^9}}, - CellLabel-> - "Out[456]=",ExpressionUUID->"ccf5e2ec-b2de-4012-877b-25e7811a88c9"] + 3.994075091358534*^9}, 3.994349984909412*^9, 3.994352532612213*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"d1ad4db8-94b9-48e6-8ca0-465157e7bc9e"] }, Open ]], Cell[CellGroupData[{ @@ -3031,17 +2951,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[457]:=",ExpressionUUID->"b1144424-b828-459f-9f8e-0fe461d33ea3"], + CellLabel->"In[50]:=",ExpressionUUID->"b1144424-b828-459f-9f8e-0fe461d33ea3"], Cell[BoxData[ RowBox[{"-", "18.05754390959481`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, - 3.99407509139049*^9}}, - CellLabel-> - "Out[457]=",ExpressionUUID->"c840fd50-f566-4d91-963d-473db10d95e2"] + 3.99407509139049*^9}, 3.994349985155326*^9, 3.9943525326500607`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"0f9862f5-61ea-4c9d-953b-2ec5442d8fe2"] }, Open ]], Cell[CellGroupData[{ @@ -3599,17 +3517,15 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[458]:=",ExpressionUUID->"fadb9a7b-eff8-44cc-94cc-acd3f21ce013"], + CellLabel->"In[51]:=",ExpressionUUID->"fadb9a7b-eff8-44cc-94cc-acd3f21ce013"], Cell[BoxData[ RowBox[{"-", "51.76635903245878`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, - 3.994075091423628*^9}}, - CellLabel-> - "Out[458]=",ExpressionUUID->"b1f7ada8-b17f-4a15-9fa6-eec88e63a741"] + 3.994075091423628*^9}, 3.9943499852545757`*^9, 3.9943525327161207`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"f99ac96f-5120-4e7d-b36a-b09ba2cd2da9"] }, Open ]], Cell[CellGroupData[{ @@ -4240,49 +4156,43 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[459]:=",ExpressionUUID->"356916c3-d654-4d58-8f12-2f430ab9b5c1"], + CellLabel->"In[52]:=",ExpressionUUID->"356916c3-d654-4d58-8f12-2f430ab9b5c1"], Cell[BoxData[ RowBox[{"-", "131.16526179683018`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, - 3.9940750914627743`*^9}}, - CellLabel-> - "Out[459]=",ExpressionUUID->"1e1312dd-9d34-4d8e-8720-893eac72717e"] + 3.9940750914627743`*^9}, 3.9943499853520412`*^9, 3.994352532763597*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"9b76938f-4143-4f57-b185-429a80c0bbeb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[460]:=",ExpressionUUID->"6fdba6ea-9211-4186-ac47-3f23f522b52a"], + CellLabel->"In[53]:=",ExpressionUUID->"6fdba6ea-9211-4186-ac47-3f23f522b52a"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, - 3.994075091476185*^9}}, - CellLabel-> - "Out[460]=",ExpressionUUID->"82a28b28-d91f-4f71-b960-99e442f4f8fe"] + 3.994075091476185*^9}, 3.994349985373592*^9, 3.994352532773353*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"3006a4df-1b5f-45db-91ce-3ce508e19479"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[461]:=",ExpressionUUID->"ee67e7d8-cb19-4690-bde5-ffd8c12d3af6"], + CellLabel->"In[54]:=",ExpressionUUID->"ee67e7d8-cb19-4690-bde5-ffd8c12d3af6"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, - 3.994075091486505*^9}}, - CellLabel-> - "Out[461]=",ExpressionUUID->"dba9ec90-7702-4c85-b569-3be6822db3f8"] + 3.994075091486505*^9}, 3.994349985385391*^9, 3.994352532778715*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"350d2122-eb03-41d1-a153-dfb4c1fdca01"] }, Open ]], Cell[CellGroupData[{ @@ -4326,16 +4236,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[462]:=",ExpressionUUID->"1182daf8-2f15-4198-b949-2c1fa7a543c4"], + CellLabel->"In[55]:=",ExpressionUUID->"1182daf8-2f15-4198-b949-2c1fa7a543c4"], Cell[BoxData["102.57012833062927`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, - 3.994075091497402*^9}}, - CellLabel-> - "Out[462]=",ExpressionUUID->"a6a8d1ea-50f1-4283-aec3-45c24bf2786e"] + 3.994075091497402*^9}, 3.994349985396826*^9, 3.994352532784306*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"3af36eac-c7f0-4fd8-a0b6-fe671fb9fbc9"] }, Open ]], Cell[CellGroupData[{ @@ -4375,17 +4283,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[463]:=",ExpressionUUID->"0dcf7a55-ee33-4614-93c0-0e72222bcd7e"], + CellLabel->"In[56]:=",ExpressionUUID->"0dcf7a55-ee33-4614-93c0-0e72222bcd7e"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, - 3.994075091508032*^9}}, - CellLabel-> - "Out[463]=",ExpressionUUID->"9fe7a3dc-e8ab-4b30-9548-af0c3094e4d6"] + 3.994075091508032*^9}, 3.994349985433289*^9, 3.994352532789826*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"8a9638cc-c447-4078-93fe-074f0b09f870"] }, Open ]], Cell[CellGroupData[{ @@ -4429,103 +4335,94 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[464]:=",ExpressionUUID->"6e83f30d-8cdb-4e1c-b8a7-c6cb26789aec"], + CellLabel->"In[57]:=",ExpressionUUID->"6e83f30d-8cdb-4e1c-b8a7-c6cb26789aec"], Cell[BoxData["106.05157029710364`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, - 3.994075091518471*^9}}, - CellLabel-> - "Out[464]=",ExpressionUUID->"2705791c-d2d7-41cd-b9bf-7e8432fcebb5"] + 3.994075091518471*^9}, 3.994349985476924*^9, 3.9943525327955227`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"bc4fb844-3efb-4555-bf50-7090706a0374"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[465]:=",ExpressionUUID->"fc4e1618-32ec-4d47-ac59-d1e28e2df293"], + CellLabel->"In[58]:=",ExpressionUUID->"fc4e1618-32ec-4d47-ac59-d1e28e2df293"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, - 3.99407509152868*^9}}, - CellLabel-> - "Out[465]=",ExpressionUUID->"d985ee92-d209-4cd3-9974-9400d81a5bae"] + 3.99407509152868*^9}, 3.9943499854967957`*^9, 3.994352532799756*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"9b0a899b-326e-4d82-8c42-42933d3a82a5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[466]:=",ExpressionUUID->"e93313e8-eb83-4efd-aa32-92a2c370bcb9"], + CellLabel->"In[59]:=",ExpressionUUID->"e93313e8-eb83-4efd-aa32-92a2c370bcb9"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, - 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}}, - CellLabel-> - "Out[466]=",ExpressionUUID->"7fbbb59d-d23e-4283-babb-b90ab7faf890"] + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.994349985508966*^9, 3.994352532805484*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"18a601c6-b837-4ad8-a14e-ea00e6ea2cbb"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[467]:=",ExpressionUUID->"9aa8886b-58cf-4323-9df2-f08d91b7ab7f"], + CellLabel->"In[60]:=",ExpressionUUID->"9aa8886b-58cf-4323-9df2-f08d91b7ab7f"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, - 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}}, - CellLabel-> - "Out[467]=",ExpressionUUID->"ee0130eb-724e-4293-b231-76ec6c27d217"] + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.994349985534693*^9, 3.994352532811677*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"887959fe-f47f-4208-8c9e-8df7db334798"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[468]:=",ExpressionUUID->"bc4d44f9-6286-4fc7-87d7-4a141615ff3c"], + CellLabel->"In[61]:=",ExpressionUUID->"bc4d44f9-6286-4fc7-87d7-4a141615ff3c"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, - 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}}, - CellLabel-> - "Out[468]=",ExpressionUUID->"151187f2-ccbc-4db9-8cc1-5a2100e9a240"] + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.9943499855549498`*^9, 3.994352532818097*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"2dc430b9-6a56-457a-8033-89bfecc7c740"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[469]:=",ExpressionUUID->"67840883-954c-47c3-a8fa-8b687de69b62"], + CellLabel->"In[62]:=",ExpressionUUID->"67840883-954c-47c3-a8fa-8b687de69b62"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, - 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}}, - CellLabel-> - "Out[469]=",ExpressionUUID->"a254d151-fb54-4db5-be28-93af222ff9db"] + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.9943499855730553`*^9, 3.994352532825035*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"326795ec-1f58-4d23-b5e5-8c171cc24e4a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[470]:=",ExpressionUUID->"a271cd04-ea38-4071-a67e-0c886d87f1e6"], + CellLabel->"In[63]:=",ExpressionUUID->"a271cd04-ea38-4071-a67e-0c886d87f1e6"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, - 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}}, - CellLabel-> - "Out[470]=",ExpressionUUID->"a6b2e7bd-0d99-4e97-9f96-93074b1b5d79"] + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.9943499855888243`*^9, 3.994352532830611*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"2768c09d-fdf1-4a0f-abd6-759ea2658e36"] }, Open ]], Cell[CellGroupData[{ @@ -4546,16 +4443,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[471]:=",ExpressionUUID->"b5662b85-47db-436d-a08e-10ba73aa5993"], + CellLabel->"In[64]:=",ExpressionUUID->"b5662b85-47db-436d-a08e-10ba73aa5993"], Cell[BoxData[ RowBox[{"-", "33.35096235519822`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, - 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}}, - CellLabel-> - "Out[471]=",ExpressionUUID->"0df25805-9742-4d87-8e1b-eb2d12d70039"] + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994349985605891*^9, 3.994352532836953*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"a8714458-22f3-4da7-81f0-39a9f3e10f8b"] }, Open ]], Cell[CellGroupData[{ @@ -4576,16 +4472,15 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[472]:=",ExpressionUUID->"87d968ec-8f4f-4bbe-9075-1707aa31c21b"], + CellLabel->"In[65]:=",ExpressionUUID->"87d968ec-8f4f-4bbe-9075-1707aa31c21b"], Cell[BoxData[ RowBox[{"-", "6.430095836913352`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, - 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}}, - CellLabel-> - "Out[472]=",ExpressionUUID->"3258c19d-d6b5-4df2-8018-8ba9e3741593"] + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.9943499856235857`*^9, 3.994352532842811*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"5a20de18-9c7d-4589-8f42-8f86e3230624"] }, Open ]], Cell[CellGroupData[{ @@ -4650,15 +4545,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[473]:=",ExpressionUUID->"78cd79c7-7ff2-46f3-8433-a0a081ea00c6"], + CellLabel->"In[66]:=",ExpressionUUID->"78cd79c7-7ff2-46f3-8433-a0a081ea00c6"], Cell[BoxData["69.21916597543105`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, - 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}}, - CellLabel-> - "Out[473]=",ExpressionUUID->"de79af3a-0e3f-4a69-bd57-148e6fec3b57"] + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.994349985642659*^9, 3.994352532848947*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"132aa7b5-a2a6-439a-a802-f7ba9a6ec4e6"] }, Open ]], Cell[CellGroupData[{ @@ -4699,16 +4593,15 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[474]:=",ExpressionUUID->"74094ace-1086-4ee6-b372-8a4db63634de"], + CellLabel->"In[67]:=",ExpressionUUID->"74094ace-1086-4ee6-b372-8a4db63634de"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, - 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}}, - CellLabel-> - "Out[474]=",ExpressionUUID->"c5d0cf6a-eece-4f09-907a-80a09037fb8a"] + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.994349985663288*^9, 3.994352532855404*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"57f236df-64cb-43b5-976e-c5c823f59ac2"] }, Open ]], Cell[CellGroupData[{ @@ -4774,15 +4667,14 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[475]:=",ExpressionUUID->"00b1c57a-c808-4661-90df-5cc2c8ce592a"], + CellLabel->"In[68]:=",ExpressionUUID->"00b1c57a-c808-4661-90df-5cc2c8ce592a"], Cell[BoxData["99.62147446019029`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, - 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}}, - CellLabel-> - "Out[475]=",ExpressionUUID->"cb6c1c8e-222a-440a-a063-bbff58d14ce9"] + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994349985679772*^9, 3.994352532862463*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"3f9b702f-f992-43bb-bc16-8953eb154cda"] }, Open ]], Cell[CellGroupData[{ @@ -4840,15 +4732,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[476]:=",ExpressionUUID->"e4b898ef-b009-4105-ba8b-ae4d254c5c7b"], + CellLabel->"In[69]:=",ExpressionUUID->"e4b898ef-b009-4105-ba8b-ae4d254c5c7b"], Cell[BoxData["40.3202486570226`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, - 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}}, - CellLabel-> - "Out[476]=",ExpressionUUID->"a4427087-22ef-4b60-ac6b-e2bb7ca02b24"] + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.994349985696589*^9, 3.99435253287033*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"8cbb79a5-d21d-4144-88db-cc3e25c801de"] }, Open ]], Cell[CellGroupData[{ @@ -4906,15 +4797,14 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[477]:=",ExpressionUUID->"90d90135-22e2-4a5c-a5c7-a83223d75bfd"], + CellLabel->"In[70]:=",ExpressionUUID->"90d90135-22e2-4a5c-a5c7-a83223d75bfd"], Cell[BoxData["624.5259763904654`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, - 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}}, - CellLabel-> - "Out[477]=",ExpressionUUID->"a1bc32c6-af80-4e29-b006-ef19da17b909"] + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.994349985715227*^9, 3.994352532876643*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"b4e28596-e807-4358-a982-a06efb70b23f"] }, Open ]], Cell[CellGroupData[{ @@ -4926,16 +4816,14 @@ Cell[BoxData[ 3.9920650045886707`*^9, {3.994074365586355*^9, 3.9940743682625427`*^9}, { 3.994074972569545*^9, 3.994074973088262*^9}, {3.9940750163921824`*^9, 3.9940750181750507`*^9}, {3.994075068546856*^9, 3.994075088637937*^9}}, - CellLabel-> - "In[408]:=",ExpressionUUID->"b9510d34-a584-4a0b-98f3-c4e78b02c45f"], + CellLabel->"In[71]:=",ExpressionUUID->"b9510d34-a584-4a0b-98f3-c4e78b02c45f"], Cell[BoxData["2"], "Output", CellChangeTimes->{ 3.991320420900818*^9, 3.994074326579653*^9, 3.994074935279605*^9, 3.994074974578923*^9, 3.9940750193451347`*^9, {3.994075073182597*^9, - 3.9940750908104277`*^9}}, - CellLabel-> - "Out[408]=",ExpressionUUID->"82a356e3-ceb6-4f2d-8bb2-07b5492c64c8"] + 3.9940750908104277`*^9}, 3.994349985734754*^9, 3.994352532882225*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"b000abb6-3130-48dd-a7e7-47794f080393"] }, Open ]], Cell[CellGroupData[{ @@ -4944,16 +4832,14 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940736553396893`*^9, 3.9940736559062967`*^9}}, - CellLabel-> - "In[409]:=",ExpressionUUID->"526bbada-818a-43ae-a5e7-84d27538ffc1"], + CellLabel->"In[72]:=",ExpressionUUID->"526bbada-818a-43ae-a5e7-84d27538ffc1"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, 3.994074326639216*^9, 3.994074935535688*^9, 3.99407497466455*^9, 3.9940750193870497`*^9, {3.9940750732233963`*^9, - 3.994075090853217*^9}}, - CellLabel-> - "Out[409]=",ExpressionUUID->"fd0e3e99-c68d-4c0b-9f70-ba55d633f53f"] + 3.994075090853217*^9}, 3.994349985751563*^9, 3.994352532888743*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"b8b5b9e4-0ee1-445c-936e-ebc5ba3b5053"] }, Open ]], Cell[CellGroupData[{ @@ -4962,16 +4848,14 @@ Cell[BoxData[ RowBox[{"A1", "=", "170"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994073658167858*^9, 3.994073658855419*^9}}, - CellLabel-> - "In[410]:=",ExpressionUUID->"1f5d1f43-3157-43e3-8128-9a3651e366c5"], + CellLabel->"In[73]:=",ExpressionUUID->"1f5d1f43-3157-43e3-8128-9a3651e366c5"], Cell[BoxData["170"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, 3.99407432665131*^9, 3.994074935546548*^9, 3.994074974677713*^9, 3.994075019399205*^9, {3.99407507323412*^9, - 3.994075090864901*^9}}, - CellLabel-> - "Out[410]=",ExpressionUUID->"15580006-1bcc-41dd-9936-18c1390c439b"] + 3.994075090864901*^9}, 3.994349985769065*^9, 3.994352532895582*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"5c097751-e181-4392-9808-26f9a6aeae69"] }, Open ]], Cell[CellGroupData[{ @@ -4979,16 +4863,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[411]:=",ExpressionUUID->"140ea6ab-fc56-4e96-967f-eba18f9f1627"], + CellLabel->"In[74]:=",ExpressionUUID->"140ea6ab-fc56-4e96-967f-eba18f9f1627"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, 3.994074326662937*^9, 3.994074935557375*^9, 3.994074974689283*^9, 3.99407501941103*^9, {3.994075073246029*^9, - 3.9940750908767548`*^9}}, - CellLabel-> - "Out[411]=",ExpressionUUID->"a49001ba-3592-4437-93c7-87a59dc10ac7"] + 3.9940750908767548`*^9}, 3.994349985786058*^9, 3.994352532902411*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"897dc51b-3269-4697-a8d0-807a9eaed3fd"] }, Open ]], Cell[CellGroupData[{ @@ -5000,32 +4882,28 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"f6dcb05c-ce3c-405c-9748-80831769e78f"], + CellLabel->"In[75]:=",ExpressionUUID->"f6dcb05c-ce3c-405c-9748-80831769e78f"], Cell[BoxData["0.5437500000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, 3.994074326674385*^9, 3.994074935568224*^9, 3.994074974701558*^9, 3.99407501942295*^9, {3.994075073258301*^9, - 3.994075090888695*^9}}, - CellLabel-> - "Out[412]=",ExpressionUUID->"454198c6-0b9c-4940-a189-c69e444d572a"] + 3.994075090888695*^9}, 3.9943499858045692`*^9, 3.9943525329088697`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"46495c47-bbda-4057-bb94-98d987c791f2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"da31ac4f-0f16-4a3f-bb1f-5fb7f12aaacd"], + CellLabel->"In[76]:=",ExpressionUUID->"da31ac4f-0f16-4a3f-bb1f-5fb7f12aaacd"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, 3.99407432668569*^9, 3.9940749355790033`*^9, 3.994074974713187*^9, 3.9940750194346647`*^9, {3.994075073269951*^9, - 3.9940750909003353`*^9}}, - CellLabel-> - "Out[413]=",ExpressionUUID->"8c8ed8b4-dd03-49a0-b047-a2b86cfeb51e"] + 3.9940750909003353`*^9}, 3.994349985825117*^9, 3.994352532914979*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"a6f9860b-2c5c-48ac-b64d-9097b3231035"] }, Open ]], Cell[CellGroupData[{ @@ -5036,16 +4914,14 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[414]:=",ExpressionUUID->"838b680d-23ae-4346-ab5e-25fd8edfcf43"], + CellLabel->"In[77]:=",ExpressionUUID->"838b680d-23ae-4346-ab5e-25fd8edfcf43"], Cell[BoxData["6.426003577835178`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, 3.994074326696957*^9, 3.9940749355899067`*^9, 3.994074974724668*^9, 3.994075019446229*^9, {3.994075073281803*^9, - 3.9940750909055967`*^9}}, - CellLabel-> - "Out[414]=",ExpressionUUID->"f5c57208-17e6-454a-a1b0-7d2f0d115c57"] + 3.9940750909055967`*^9}, 3.9943499858435087`*^9, 3.994352532921117*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"f91afc1b-8f13-4443-ad16-9270116c770c"] }, Open ]], Cell[CellGroupData[{ @@ -5057,16 +4933,14 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[415]:=",ExpressionUUID->"71d08f20-13be-480f-9ba8-0af2c0cc2b0a"], + CellLabel->"In[78]:=",ExpressionUUID->"71d08f20-13be-480f-9ba8-0af2c0cc2b0a"], Cell[BoxData["4.7806909477779245`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, 3.994074326708106*^9, 3.994074935599874*^9, 3.9940749747357597`*^9, 3.994075019457683*^9, {3.994075073286825*^9, - 3.994075090919847*^9}}, - CellLabel-> - "Out[415]=",ExpressionUUID->"596f584f-d888-4897-9072-2b4e85d7ba27"] + 3.994075090919847*^9}, 3.994349985860273*^9, 3.994352532927226*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"c59f3201-0075-4515-adf6-3dfb335d20a1"] }, Open ]], Cell[CellGroupData[{ @@ -5074,15 +4948,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.8747255229"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.994073678806656*^9}, - CellLabel-> - "In[416]:=",ExpressionUUID->"c0484b17-a8d5-4f1b-8b99-5c87369acd5e"], + CellLabel->"In[79]:=",ExpressionUUID->"c0484b17-a8d5-4f1b-8b99-5c87369acd5e"], Cell[BoxData["0.8747255229`"], "Output", CellChangeTimes->{ 3.994074326718845*^9, 3.994074935610774*^9, 3.9940749747456427`*^9, - 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}}, - CellLabel-> - "Out[416]=",ExpressionUUID->"b013be95-433d-45a6-8a88-9b77e78145df"] + 3.994075019469336*^9, {3.9940750733015203`*^9, 3.994075090931666*^9}, + 3.9943499858771963`*^9, 3.994352532932843*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"1533dd56-a3fc-4e94-afaf-dc5d7449639f"] }, Open ]], Cell[CellGroupData[{ @@ -5090,47 +4963,42 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3882072479"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.9940736835660563`*^9}, - CellLabel-> - "In[417]:=",ExpressionUUID->"bebc8e35-625c-4bfc-9677-12518aef7afb"], + CellLabel->"In[80]:=",ExpressionUUID->"bebc8e35-625c-4bfc-9677-12518aef7afb"], Cell[BoxData["0.3882072479`"], "Output", CellChangeTimes->{ 3.994074326731606*^9, 3.9940749356216*^9, 3.9940749747554703`*^9, - 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}}, - CellLabel-> - "Out[417]=",ExpressionUUID->"5c11af60-9064-4c81-8d15-34cf1ff9ae60"] + 3.994075019480736*^9, {3.9940750733138313`*^9, 3.9940750909438963`*^9}, + 3.994349985976314*^9, 3.994352532938347*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"9b4eea08-43bc-42ee-8937-3c79fb7ecd1e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[418]:=",ExpressionUUID->"ba4e6e50-3572-45a0-b010-d5c4dfcdd337"], + CellLabel->"In[81]:=",ExpressionUUID->"ba4e6e50-3572-45a0-b010-d5c4dfcdd337"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, 3.994074326743565*^9, 3.994074935632176*^9, 3.994074974765235*^9, 3.994075019485297*^9, {3.994075073318596*^9, - 3.994075090955942*^9}}, - CellLabel-> - "Out[418]=",ExpressionUUID->"ac5acdb4-1361-4fde-aa37-2ecc78c4469b"] + 3.994075090955942*^9}, 3.994349986031741*^9, 3.994352532943815*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"c7ed64d3-1701-417e-8d59-1b264ef48d5c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[419]:=",ExpressionUUID->"8bac60d8-5432-4304-a48b-bc40990756f8"], + CellLabel->"In[82]:=",ExpressionUUID->"8bac60d8-5432-4304-a48b-bc40990756f8"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, 3.994074326755156*^9, 3.994074935643033*^9, 3.99407497477602*^9, 3.994075019498505*^9, {3.994075073331485*^9, - 3.9940750909684067`*^9}}, - CellLabel-> - "Out[419]=",ExpressionUUID->"282ce56f-f060-4c3e-bf5b-ed20d5434266"] + 3.9940750909684067`*^9}, 3.9943499860465403`*^9, 3.994352532949685*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"43d37a7f-ef9b-4140-b2ea-f2ed51c85733"] }, Open ]], Cell[CellGroupData[{ @@ -5154,16 +5022,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[420]:=",ExpressionUUID->"526d508c-9975-40b6-8a6d-1cc4b5a5276d"], + CellLabel->"In[83]:=",ExpressionUUID->"526d508c-9975-40b6-8a6d-1cc4b5a5276d"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, 3.9940743267687807`*^9, 3.994074935653433*^9, 3.994074974785841*^9, 3.994075019509776*^9, {3.994075073341671*^9, - 3.994075090978916*^9}}, - CellLabel-> - "Out[420]=",ExpressionUUID->"ddc9739d-40fa-4e39-9801-d85b9d0bcbc4"] + 3.994075090978916*^9}, 3.99434998606178*^9, 3.9943525329553003`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"9da8d178-3ed5-4e24-ad85-ea734095757a"] }, Open ]], Cell[CellGroupData[{ @@ -5187,16 +5053,14 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[421]:=",ExpressionUUID->"3e891a96-8c59-4f7c-9c3e-990a898f2e20"], + CellLabel->"In[84]:=",ExpressionUUID->"3e891a96-8c59-4f7c-9c3e-990a898f2e20"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, 3.994074326780384*^9, 3.994074935663515*^9, 3.994074974795456*^9, 3.994075019519595*^9, {3.994075073351719*^9, - 3.99407509098914*^9}}, - CellLabel-> - "Out[421]=",ExpressionUUID->"a2482aad-b112-4d90-a4de-a0b8e20fac00"] + 3.99407509098914*^9}, 3.994349986073759*^9, 3.9943525329607763`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"e835fbea-a5e6-419c-a5e5-c747ce5b24d7"] }, Open ]], Cell[CellGroupData[{ @@ -5251,16 +5115,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[422]:=",ExpressionUUID->"a37dec1c-59a4-4c51-9022-e4ddc2be01cf"], + CellLabel->"In[85]:=",ExpressionUUID->"a37dec1c-59a4-4c51-9022-e4ddc2be01cf"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, 3.994074326791608*^9, 3.994074935674151*^9, 3.994074974805192*^9, 3.9940750195300922`*^9, {3.99407507336273*^9, - 3.994075090999715*^9}}, - CellLabel-> - "Out[422]=",ExpressionUUID->"627d1a1d-1f6a-40e9-9386-e4a720261599"] + 3.994075090999715*^9}, 3.9943499860899763`*^9, 3.994352532966403*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"8a8ea1d2-6bb1-4867-b737-83dc9dd5515f"] }, Open ]], Cell[CellGroupData[{ @@ -5311,17 +5173,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[423]:=",ExpressionUUID->"87c79552-81b0-401a-90ad-03e92adf048f"], + CellLabel->"In[86]:=",ExpressionUUID->"87c79552-81b0-401a-90ad-03e92adf048f"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, 3.994074326803142*^9, 3.994074935687113*^9, 3.994074974815411*^9, 3.994075019541635*^9, {3.994075073373554*^9, - 3.994075091010479*^9}}, - CellLabel-> - "Out[423]=",ExpressionUUID->"2558ad60-6f31-4a85-a918-bec124988945"] + 3.994075091010479*^9}, 3.994349986103703*^9, 3.994352532972081*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"2f3c456f-b39a-40ca-8572-48c8e59b53f7"] }, Open ]], Cell[CellGroupData[{ @@ -5372,17 +5232,15 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[424]:=",ExpressionUUID->"2cdde44d-4a40-4e27-9396-3f09b99ecfb8"], + CellLabel->"In[87]:=",ExpressionUUID->"2cdde44d-4a40-4e27-9396-3f09b99ecfb8"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, 3.994074326815329*^9, 3.994074935701499*^9, 3.9940749748259974`*^9, 3.9940750195530157`*^9, {3.994075073384471*^9, - 3.9940750910236893`*^9}}, - CellLabel-> - "Out[424]=",ExpressionUUID->"73548512-b863-4786-a429-b7d9ae6e1712"] + 3.9940750910236893`*^9}, 3.994349986119671*^9, 3.994352532977828*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"05259630-e53b-41e6-8fdb-8f95ab7fb116"] }, Open ]], Cell[CellGroupData[{ @@ -5390,109 +5248,103 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"c22", "=", RowBox[{"1", "-", - FractionBox[ - RowBox[{ - RowBox[{"(", - RowBox[{ - RowBox[{"R01", "*", - RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w1", "2"]}]}], ")"}], "*", - RowBox[{"(", - RowBox[{ - SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], - RowBox[{ - RowBox[{"R01", "*", + RowBox[{ + RowBox[{"(", + RowBox[{ RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b1", "*", "b1"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b1", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w2", "2"]}], "+", - RowBox[{"R02", "*", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w1", "2"]}]}], ")"}], "*", RowBox[{"(", - RowBox[{"1", "-", - FractionBox[ - RowBox[{"b2", "*", "b2"}], - RowBox[{"4", "\[Pi]"}]], "+", - RowBox[{"b2", "*", - SqrtBox[ - FractionBox["5", - RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", - SuperscriptBox["w1", "2"]}], "+", - RowBox[{"d", "*", - SuperscriptBox["w2", "2"], "*", - SuperscriptBox["w1", "2"]}]}]]}]}]], "Input", - CellLabel-> - "In[425]:=",ExpressionUUID->"c65e3e00-b427-478d-9793-d3efacd1ccc3"], + RowBox[{ + SuperscriptBox["w2", "2"], "-", "1"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{"R01", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b1", "*", "b1"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b1", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w2", "2"]}], "+", + RowBox[{"R02", "*", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox[ + RowBox[{"b2", "*", "b2"}], + RowBox[{"4", "\[Pi]"}]], "+", + RowBox[{"b2", "*", + SqrtBox[ + FractionBox["5", + RowBox[{"4", "\[Pi]"}]]]}]}], ")"}], "*", + SuperscriptBox["w1", "2"]}], "+", + RowBox[{"d", "*", + SuperscriptBox["w2", "2"], "*", + SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", + CellLabel->"In[88]:=",ExpressionUUID->"c65e3e00-b427-478d-9793-d3efacd1ccc3"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, 3.9940743268278837`*^9, 3.994074935715124*^9, 3.994074974837141*^9, 3.994075019564198*^9, {3.9940750733955727`*^9, - 3.994075091035767*^9}}, - CellLabel-> - "Out[425]=",ExpressionUUID->"0fdfe0e8-1170-4734-92db-737edd725b4f"] + 3.994075091035767*^9}, 3.994349986144309*^9, 3.99435253298353*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"e6e9caa4-e850-4570-b104-8901a364250a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[426]:=",ExpressionUUID->"faec3591-5272-4811-8e51-10325cc5a1e7"], + CellLabel->"In[89]:=",ExpressionUUID->"faec3591-5272-4811-8e51-10325cc5a1e7"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, 3.994074326840913*^9, 3.994074935728681*^9, 3.994074974847731*^9, 3.994075019576145*^9, {3.994075073406547*^9, - 3.9940750910471153`*^9}}, - CellLabel-> - "Out[426]=",ExpressionUUID->"3dd75654-1ea8-4b42-9562-4f01be51dd58"] + 3.9940750910471153`*^9}, 3.994349986159252*^9, 3.99435253298932*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"6ac46d9e-bde2-4462-ada5-e2c89b5cb01c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[427]:=",ExpressionUUID->"dc6187d2-4115-43fe-93bd-75e52bbf170b"], + CellLabel->"In[90]:=",ExpressionUUID->"dc6187d2-4115-43fe-93bd-75e52bbf170b"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, 3.994074326854053*^9, 3.99407493574161*^9, 3.994074974858211*^9, 3.994075019594636*^9, {3.994075073417151*^9, - 3.9940750910581427`*^9}}, - CellLabel-> - "Out[427]=",ExpressionUUID->"c50399a1-ff58-492c-aafc-d2ce340a4bbb"] + 3.9940750910581427`*^9}, 3.994349986171977*^9, 3.9943525329947577`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"02c559a9-a87c-48ca-b539-6686fdf535cd"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[428]:=",ExpressionUUID->"bcd62977-bb90-4a5d-859e-c6f310ed28dc"], + CellLabel->"In[91]:=",ExpressionUUID->"bcd62977-bb90-4a5d-859e-c6f310ed28dc"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, 3.994074326866469*^9, 3.994074935754272*^9, 3.994074974869028*^9, 3.994075019614243*^9, {3.994075073428639*^9, - 3.994075091069083*^9}}, - CellLabel-> - "Out[428]=",ExpressionUUID->"0b879a3d-43fd-4295-b00c-0ad6e9bb7923"] + 3.994075091069083*^9}, 3.994349986187461*^9, 3.994352533000071*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"d9a0c7c0-9080-4ace-b54c-d04d2fb8e985"] }, Open ]], Cell[CellGroupData[{ @@ -5501,33 +5353,29 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[429]:=",ExpressionUUID->"2730540f-d341-435a-928d-3b1dc9befa4a"], + CellLabel->"In[92]:=",ExpressionUUID->"2730540f-d341-435a-928d-3b1dc9befa4a"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, 3.9940743268793383`*^9, 3.994074935766993*^9, 3.994074974879899*^9, 3.994075019631719*^9, {3.9940750734398613`*^9, - 3.994075091080567*^9}}, - CellLabel-> - "Out[429]=",ExpressionUUID->"93fcfa8f-4160-41e6-b3d3-25792634aef4"] + 3.994075091080567*^9}, 3.9943499862021723`*^9, 3.994352533005473*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"c51f976c-a17f-4732-bdec-8ee33a34bbf4"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[430]:=",ExpressionUUID->"6e143f26-c6bd-44b7-a20a-d9b93450045a"], + CellLabel->"In[93]:=",ExpressionUUID->"6e143f26-c6bd-44b7-a20a-d9b93450045a"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, 3.994074326891512*^9, 3.994074935779024*^9, 3.994074974889886*^9, 3.99407501964223*^9, {3.994075073449995*^9, - 3.994075091090703*^9}}, - CellLabel-> - "Out[430]=",ExpressionUUID->"638c0066-2a47-4f7c-8e62-9d97a616f9e3"] + 3.994075091090703*^9}, 3.994349986213769*^9, 3.9943525330108147`*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"f8bfbcce-1550-46ad-8b80-6657a57984f8"] }, Open ]], Cell[CellGroupData[{ @@ -5537,16 +5385,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994073690740699*^9, 3.994073690862359*^9}}, - CellLabel-> - "In[431]:=",ExpressionUUID->"9306094a-05a0-4f8f-a845-c5e177318cbc"], + CellLabel->"In[94]:=",ExpressionUUID->"9306094a-05a0-4f8f-a845-c5e177318cbc"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, 3.994074326904242*^9, 3.994074935791787*^9, 3.9940749749005938`*^9, 3.994075019653521*^9, {3.994075073461108*^9, - 3.994075091102222*^9}}, - CellLabel-> - "Out[431]=",ExpressionUUID->"0d146129-6fda-469d-aaa6-446ac94d1c2e"] + 3.994075091102222*^9}, 3.994349986224596*^9, 3.99435253301612*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"76092ab3-a136-40e1-a64b-f76a2d489b8a"] }, Open ]], Cell[CellGroupData[{ @@ -5556,16 +5402,14 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.994073693453496*^9, 3.9940736957455587`*^9}}, - CellLabel-> - "In[432]:=",ExpressionUUID->"585538e8-f108-4c55-ae2d-a725785abf30"], + CellLabel->"In[95]:=",ExpressionUUID->"585538e8-f108-4c55-ae2d-a725785abf30"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, 3.994074326916279*^9, 3.9940749358034363`*^9, 3.99407497491004*^9, 3.994075019663575*^9, {3.994075073471445*^9, - 3.994075091112747*^9}}, - CellLabel-> - "Out[432]=",ExpressionUUID->"c039b2c0-c1b7-4f4d-ab11-f06f1e8e7c92"] + 3.994075091112747*^9}, 3.9943499862377987`*^9, 3.994352533021714*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"b9caa06e-2a56-49d3-99c8-12ee8ef4e5ce"] }, Open ]], Cell[CellGroupData[{ @@ -5574,16 +5418,14 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[433]:=",ExpressionUUID->"97bca7ac-ba3f-42c3-823a-5e52a461adf8"], + CellLabel->"In[96]:=",ExpressionUUID->"97bca7ac-ba3f-42c3-823a-5e52a461adf8"], Cell[BoxData["70"], "Output", CellChangeTimes->{ 3.991319786827894*^9, 3.994074326928279*^9, 3.994074935814618*^9, 3.994074974919529*^9, 3.994075019673669*^9, {3.9940750734815598`*^9, - 3.9940750911232967`*^9}}, - CellLabel-> - "Out[433]=",ExpressionUUID->"6f07860c-5857-4452-b7cb-d589d7d12517"] + 3.9940750911232967`*^9}, 3.994349986250043*^9, 3.994352533027001*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"935ca77f-5ddc-4196-8265-06489a1dec95"] }, Open ]], Cell[CellGroupData[{ @@ -5598,16 +5440,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[434]:=",ExpressionUUID->"5e0f746f-61a4-497b-a535-07508ad6f848"], + CellLabel->"In[97]:=",ExpressionUUID->"5e0f746f-61a4-497b-a535-07508ad6f848"], Cell[BoxData["0.1087764705882353`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, 3.9940743269397917`*^9, 3.994074935826476*^9, 3.994074974929028*^9, 3.994075019683881*^9, {3.994075073492182*^9, - 3.994075091133902*^9}}, - CellLabel-> - "Out[434]=",ExpressionUUID->"acd501c3-a338-433a-9eea-8d93b27dc7b6"] + 3.994075091133902*^9}, 3.994349986262344*^9, 3.994352533034051*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"4e45235f-690b-44ae-afc6-e18ca0fccdd1"] }, Open ]], Cell[CellGroupData[{ @@ -5622,17 +5462,15 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[435]:=",ExpressionUUID->"e2224fe5-7fb9-4e84-b205-303205bdefd4"], + CellLabel->"In[98]:=",ExpressionUUID->"e2224fe5-7fb9-4e84-b205-303205bdefd4"], Cell[BoxData[ RowBox[{"-", "2.5658588235294117`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, 3.994074326951318*^9, 3.9940749358379097`*^9, 3.9940749749388123`*^9, 3.994075019694408*^9, {3.994075073502742*^9, - 3.9940750911440773`*^9}}, - CellLabel-> - "Out[435]=",ExpressionUUID->"ffad908c-912a-49e8-90fd-34c352b9c9cb"] + 3.9940750911440773`*^9}, 3.994349986276054*^9, 3.994352533039673*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"57f927c0-c5dc-4c02-8fc3-545d08baf8ac"] }, Open ]], Cell[CellGroupData[{ @@ -5663,16 +5501,14 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[436]:=",ExpressionUUID->"15d38e2e-3604-480d-9612-69d8f22a5340"], + CellLabel->"In[99]:=",ExpressionUUID->"15d38e2e-3604-480d-9612-69d8f22a5340"], Cell[BoxData["17.474387700041003`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, 3.994074326963644*^9, 3.99407493585293*^9, 3.994074974948763*^9, 3.9940750197049227`*^9, {3.994075073513197*^9, - 3.9940750911556253`*^9}}, - CellLabel-> - "Out[436]=",ExpressionUUID->"1d0f3d04-7cec-46b2-86c6-fb02e9438d08"] + 3.9940750911556253`*^9}, 3.9943499862892838`*^9, 3.994352533045473*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"c572c2c1-79c0-4396-bc12-225bb92927fc"] }, Open ]], Cell[CellGroupData[{ @@ -5681,15 +5517,15 @@ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, CellLabel-> - "In[437]:=",ExpressionUUID->"a2181dac-7825-479f-b3f7-7d4307fe8f3d"], + "In[100]:=",ExpressionUUID->"a2181dac-7825-479f-b3f7-7d4307fe8f3d"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, 3.994074326975409*^9, 3.994074935865913*^9, 3.994074974958894*^9, 3.9940750197157593`*^9, {3.994075073523876*^9, - 3.99407509116647*^9}}, + 3.99407509116647*^9}, 3.994349986302774*^9, 3.994352533051512*^9}, CellLabel-> - "Out[437]=",ExpressionUUID->"45584973-5d3a-4cda-b8f4-c16e0f3b1434"] + "Out[100]=",ExpressionUUID->"b874334d-f2d3-48db-a89d-c0baee7cb2e9"] }, Open ]], Cell[CellGroupData[{ @@ -5700,20 +5536,21 @@ Cell[BoxData[ 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.9940737081112833`*^9, 3.994073709172043*^9}}, CellLabel-> - "In[438]:=",ExpressionUUID->"2bfa74b1-b31e-4d1b-bd69-2b0c4f35294f"], + "In[101]:=",ExpressionUUID->"2bfa74b1-b31e-4d1b-bd69-2b0c4f35294f"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{ 3.99407432698682*^9, 3.994074935879013*^9, 3.994074974974915*^9, - 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}}, + 3.994075019726281*^9, {3.994075073534071*^9, 3.994075091176951*^9}, + 3.994349986315557*^9, 3.994352533057778*^9}, CellLabel-> - "Out[438]=",ExpressionUUID->"7e020882-109d-482d-88f5-78b459c2ac67"] + "Out[101]=",ExpressionUUID->"f557cf6e-403b-4445-a276-9abb50166abe"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, CellLabel-> - "In[439]:=",ExpressionUUID->"82f366d1-b423-48e2-8f7f-e260eab3cc90"], + "In[102]:=",ExpressionUUID->"82f366d1-b423-48e2-8f7f-e260eab3cc90"], Cell[CellGroupData[{ @@ -5723,20 +5560,21 @@ Cell[BoxData[ 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994073711335288*^9, 3.994073712564888*^9}}, CellLabel-> - "In[440]:=",ExpressionUUID->"6d0c910a-a04a-4526-beb8-a5baa60bc8fa"], + "In[103]:=",ExpressionUUID->"6d0c910a-a04a-4526-beb8-a5baa60bc8fa"], Cell[BoxData["0.785`"], "Output", CellChangeTimes->{ 3.994074327001001*^9, 3.994074935894207*^9, 3.994074974988394*^9, - 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}}, + 3.9940750197399607`*^9, {3.994075073548934*^9, 3.994075091190888*^9}, + 3.994349986336849*^9, 3.9943525330662413`*^9}, CellLabel-> - "Out[440]=",ExpressionUUID->"cd6f236b-43e8-4575-bc66-a686b1bc7b8b"] + "Out[103]=",ExpressionUUID->"d17534d9-c497-454f-becf-cc5d75e09c0c"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, CellLabel-> - "In[441]:=",ExpressionUUID->"b7033cf9-26f0-4f8d-a018-e3f3e0e21657"], + "In[104]:=",ExpressionUUID->"b7033cf9-26f0-4f8d-a018-e3f3e0e21657"], Cell[CellGroupData[{ @@ -5746,20 +5584,21 @@ Cell[BoxData[ 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940737150021257`*^9, 3.994073716213628*^9}}, CellLabel-> - "In[442]:=",ExpressionUUID->"53284a79-2a40-4ddf-9665-90f2bea0ca7a"], + "In[105]:=",ExpressionUUID->"53284a79-2a40-4ddf-9665-90f2bea0ca7a"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{ 3.99407432701412*^9, 3.994074935907247*^9, 3.994074975000514*^9, - 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}}, + 3.994075019753892*^9, {3.994075073561831*^9, 3.994075091203961*^9}, + 3.99434998636053*^9, 3.994352533074708*^9}, CellLabel-> - "Out[442]=",ExpressionUUID->"5826ca9c-3a2d-433e-b21f-ef0d95635b74"] + "Out[105]=",ExpressionUUID->"6e44a19d-b4c7-4c40-9642-8582d9ab7bc7"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, CellLabel-> - "In[443]:=",ExpressionUUID->"35de1d89-3842-4102-8886-8963b779c8f3"], + "In[106]:=",ExpressionUUID->"35de1d89-3842-4102-8886-8963b779c8f3"], Cell[CellGroupData[{ @@ -5769,20 +5608,21 @@ Cell[BoxData[ 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994073720159833*^9, 3.9940737213308268`*^9}}, CellLabel-> - "In[444]:=",ExpressionUUID->"34a03e26-3ef6-4224-91c0-3919b80256a8"], + "In[107]:=",ExpressionUUID->"34a03e26-3ef6-4224-91c0-3919b80256a8"], Cell[BoxData["1.125`"], "Output", CellChangeTimes->{ 3.9940743270271187`*^9, 3.994074935920094*^9, 3.994074975012611*^9, - 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}}, + 3.994075019766945*^9, {3.99407507357449*^9, 3.994075091216796*^9}, + 3.9943499863811893`*^9, 3.994352533083555*^9}, CellLabel-> - "Out[444]=",ExpressionUUID->"4e192d79-d65f-4f2c-8251-6d1e5425dbfd"] + "Out[107]=",ExpressionUUID->"72b29fd7-cb96-4275-958e-525904df4f39"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, CellLabel-> - "In[445]:=",ExpressionUUID->"e5faaea7-83bd-40b1-910e-f91ea67907ba"], + "In[108]:=",ExpressionUUID->"e5faaea7-83bd-40b1-910e-f91ea67907ba"], Cell[CellGroupData[{ @@ -5792,20 +5632,21 @@ Cell[BoxData[ 3.991718016467348*^9, 3.991799361414671*^9, {3.9940737243709307`*^9, 3.9940737264630413`*^9}}, CellLabel-> - "In[446]:=",ExpressionUUID->"71ef7802-0384-44a9-b2f7-055696206568"], + "In[109]:=",ExpressionUUID->"71ef7802-0384-44a9-b2f7-055696206568"], Cell[BoxData["1.145`"], "Output", CellChangeTimes->{ 3.9940743270398684`*^9, 3.994074935932911*^9, 3.994074975024604*^9, - 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}}, + 3.994075019782*^9, {3.994075073587862*^9, 3.9940750912294607`*^9}, + 3.994349986402521*^9, 3.994352533092188*^9}, CellLabel-> - "Out[446]=",ExpressionUUID->"065dc7d4-fd1e-4162-bb13-31615374f1cf"] + "Out[109]=",ExpressionUUID->"429271e1-7d69-46e9-a4e5-817f633a42f1"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, CellLabel-> - "In[447]:=",ExpressionUUID->"c38a225e-16ac-4173-8b77-ba3fa4a8a6b0"], + "In[110]:=",ExpressionUUID->"c38a225e-16ac-4173-8b77-ba3fa4a8a6b0"], Cell[CellGroupData[{ @@ -5815,20 +5656,21 @@ Cell[BoxData[ 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.9940737287627993`*^9, 3.994073731586865*^9}}, CellLabel-> - "In[448]:=",ExpressionUUID->"74130078-2486-4980-9abc-f65d3f8b532e"], + "In[111]:=",ExpressionUUID->"74130078-2486-4980-9abc-f65d3f8b532e"], Cell[BoxData["0.565`"], "Output", CellChangeTimes->{ 3.994074327052676*^9, 3.994074935945746*^9, 3.994074975036669*^9, - 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}}, + 3.994075019795862*^9, {3.994075073601301*^9, 3.9940750912417994`*^9}, + 3.994349986423626*^9, 3.994352533101206*^9}, CellLabel-> - "Out[448]=",ExpressionUUID->"8d4a7c08-4940-4988-9878-689145082c92"] + "Out[111]=",ExpressionUUID->"931e5edc-a46b-4cf9-b8b1-c6c8efe0ed31"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, CellLabel-> - "In[449]:=",ExpressionUUID->"8830e9a5-1b52-4167-be80-e38579b52fe2"], + "In[112]:=",ExpressionUUID->"8830e9a5-1b52-4167-be80-e38579b52fe2"], Cell[CellGroupData[{ @@ -5838,20 +5680,21 @@ Cell[BoxData[ 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994073736277706*^9, 3.994073737300967*^9}}, CellLabel-> - "In[450]:=",ExpressionUUID->"7ffcde28-2645-4dce-810e-6960d04b5265"], + "In[113]:=",ExpressionUUID->"7ffcde28-2645-4dce-810e-6960d04b5265"], Cell[BoxData["1.5`"], "Output", CellChangeTimes->{ 3.994074327065536*^9, 3.9940749359585743`*^9, 3.994074975048807*^9, - 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}}, + 3.9940750198098516`*^9, {3.9940750736145077`*^9, 3.994075091254464*^9}, + 3.994349986449009*^9, 3.994352533109931*^9}, CellLabel-> - "Out[450]=",ExpressionUUID->"34af5f12-6b37-40e2-a51a-80e820da2559"] + "Out[113]=",ExpressionUUID->"e9b28100-4af6-46d2-814f-a09aabb1e48a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, CellLabel-> - "In[451]:=",ExpressionUUID->"534834d7-c99a-4c8b-8bf6-062f6ae916aa"], + "In[114]:=",ExpressionUUID->"534834d7-c99a-4c8b-8bf6-062f6ae916aa"], Cell[CellGroupData[{ @@ -5860,20 +5703,21 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994073740255535*^9, 3.994073742830049*^9}}, CellLabel-> - "In[452]:=",ExpressionUUID->"135ee35f-8ffd-4924-b26f-b5459b9e110b"], + "In[115]:=",ExpressionUUID->"135ee35f-8ffd-4924-b26f-b5459b9e110b"], Cell[BoxData["0.635`"], "Output", CellChangeTimes->{ 3.99407432707825*^9, 3.994074935971406*^9, 3.994074975061311*^9, - 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}}, + 3.994075019822795*^9, {3.994075073627393*^9, 3.994075091268227*^9}, + 3.994349986516523*^9, 3.994352533118325*^9}, CellLabel-> - "Out[452]=",ExpressionUUID->"ea2d5a72-20f2-40d8-960a-24f2a78badff"] + "Out[115]=",ExpressionUUID->"e8cab31b-d186-4a99-8767-d43df5610188"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, CellLabel-> - "In[453]:=",ExpressionUUID->"c56c1ddb-b12d-4422-bf29-3b0b01c42f00"], + "In[116]:=",ExpressionUUID->"c56c1ddb-b12d-4422-bf29-3b0b01c42f00"], Cell[CellGroupData[{ @@ -6363,15 +6207,15 @@ Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], CellLabel-> - "In[454]:=",ExpressionUUID->"f68497d7-f76f-494c-8ef6-957d51a34243"], + "In[117]:=",ExpressionUUID->"f68497d7-f76f-494c-8ef6-957d51a34243"], Cell[BoxData["0.12734722137174234`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, 3.9940743271585913`*^9, 3.994074936065404*^9, 3.9940749751004868`*^9, 3.9940750198601313`*^9, {3.9940750736645*^9, - 3.994075091306961*^9}}, + 3.994075091306961*^9}, 3.994349986618073*^9, 3.994352533158681*^9}, CellLabel-> - "Out[454]=",ExpressionUUID->"a28a9f72-8e9e-47a9-b3f4-bc795be1bf42"] + "Out[117]=",ExpressionUUID->"01a4906d-a626-4aad-beb4-d8749e96a849"] }, Open ]], Cell[CellGroupData[{ @@ -6866,15 +6710,15 @@ Cell[BoxData[ 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, CellLabel-> - "In[455]:=",ExpressionUUID->"78d34269-346e-45af-a043-7c2873164ad0"], + "In[118]:=",ExpressionUUID->"78d34269-346e-45af-a043-7c2873164ad0"], Cell[BoxData["7.503764283698204`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, 3.9940743271979237`*^9, 3.994074936098249*^9, 3.994074975128014*^9, 3.994075019886159*^9, {3.994075073691079*^9, - 3.994075091332656*^9}}, + 3.994075091332656*^9}, 3.994349986711598*^9, 3.9943525331942*^9}, CellLabel-> - "Out[455]=",ExpressionUUID->"13855b8e-81c8-4d5d-b355-a789b0e64673"] + "Out[118]=",ExpressionUUID->"68aba0bd-e6f8-4679-b2af-bfa93e841af7"] }, Open ]], Cell[CellGroupData[{ @@ -7363,16 +7207,16 @@ Cell[BoxData[ 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, CellLabel-> - "In[456]:=",ExpressionUUID->"1753f734-cfd4-40c6-94a3-98cc442028d6"], + "In[119]:=",ExpressionUUID->"1753f734-cfd4-40c6-94a3-98cc442028d6"], Cell[BoxData[ RowBox[{"-", "14.220629552114458`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, 3.9940743272387447`*^9, 3.9940749361294937`*^9, 3.994074975156514*^9, 3.994075019911666*^9, {3.9940750737180433`*^9, - 3.994075091358534*^9}}, + 3.994075091358534*^9}, 3.994349986791297*^9, 3.9943525332291727`*^9}, CellLabel-> - "Out[456]=",ExpressionUUID->"7cb5d14d-9770-47e2-a6f8-19d4b435743e"] + "Out[119]=",ExpressionUUID->"9ae66106-d69c-42a2-8b0c-67ac9f9561f8"] }, Open ]], Cell[CellGroupData[{ @@ -7931,16 +7775,16 @@ Cell[BoxData[ RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", CellLabel-> - "In[457]:=",ExpressionUUID->"1533e185-520c-4b06-a810-4fff825ed6e3"], + "In[120]:=",ExpressionUUID->"1533e185-520c-4b06-a810-4fff825ed6e3"], Cell[BoxData[ RowBox[{"-", "18.05754390959481`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, 3.994074327278555*^9, 3.9940749361661787`*^9, 3.9940749751890287`*^9, 3.994075019948382*^9, {3.994075073748582*^9, - 3.99407509139049*^9}}, + 3.99407509139049*^9}, 3.994349986888632*^9, 3.994352533268405*^9}, CellLabel-> - "Out[457]=",ExpressionUUID->"45c7995d-c0e8-47b6-a4f6-d0e532ba365e"] + "Out[120]=",ExpressionUUID->"f349aa58-c096-4d0c-a0f7-27e41e3f7ab3"] }, Open ]], Cell[CellGroupData[{ @@ -8499,16 +8343,16 @@ Cell[BoxData[ RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", CellLabel-> - "In[458]:=",ExpressionUUID->"48f0ab0f-99ff-430c-ae9a-cae1ff11d0d4"], + "In[121]:=",ExpressionUUID->"48f0ab0f-99ff-430c-ae9a-cae1ff11d0d4"], Cell[BoxData[ RowBox[{"-", "51.76635903245878`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, 3.994074327318758*^9, 3.9940749362040663`*^9, 3.9940749752210827`*^9, 3.994075019983523*^9, {3.9940750737782516`*^9, - 3.994075091423628*^9}}, + 3.994075091423628*^9}, 3.9943499871825037`*^9, 3.994352533307733*^9}, CellLabel-> - "Out[458]=",ExpressionUUID->"90adaa06-9cb2-4c80-84e5-03ac35947e75"] + "Out[121]=",ExpressionUUID->"629db214-6024-4179-bd73-287d37c8d451"] }, Open ]], Cell[CellGroupData[{ @@ -9140,16 +8984,16 @@ Cell[BoxData[ RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", CellLabel-> - "In[459]:=",ExpressionUUID->"2e857b96-d62e-443e-96bd-c5f4027b4f4b"], + "In[122]:=",ExpressionUUID->"2e857b96-d62e-443e-96bd-c5f4027b4f4b"], Cell[BoxData[ RowBox[{"-", "131.16526179683018`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, 3.994074327362462*^9, 3.994074936248407*^9, 3.99407497525825*^9, 3.994075020024899*^9, {3.994075073816177*^9, - 3.9940750914627743`*^9}}, + 3.9940750914627743`*^9}, 3.994349987352845*^9, 3.9943525333568707`*^9}, CellLabel-> - "Out[459]=",ExpressionUUID->"344aa463-5250-48bf-a7c9-25db18dc062f"] + "Out[122]=",ExpressionUUID->"8e7e6484-2994-4b9e-b57d-0d576d614c25"] }, Open ]], Cell[CellGroupData[{ @@ -9157,15 +9001,15 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", CellLabel-> - "In[460]:=",ExpressionUUID->"b10475d2-3167-4670-99eb-cbdcff897155"], + "In[123]:=",ExpressionUUID->"b10475d2-3167-4670-99eb-cbdcff897155"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, 3.9940743273758507`*^9, 3.994074936262808*^9, 3.994074975269576*^9, 3.99407502003885*^9, {3.994075073828107*^9, - 3.994075091476185*^9}}, + 3.994075091476185*^9}, 3.994349987483387*^9, 3.9943525333662043`*^9}, CellLabel-> - "Out[460]=",ExpressionUUID->"48a44076-b792-40d6-94ea-e5e93bd32a46"] + "Out[123]=",ExpressionUUID->"007a8d9b-4f40-4b58-9aaf-38305a9e1883"] }, Open ]], Cell[CellGroupData[{ @@ -9173,15 +9017,15 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", CellLabel-> - "In[461]:=",ExpressionUUID->"bb87416f-6346-4cf4-a693-31a8607807dd"], + "In[124]:=",ExpressionUUID->"bb87416f-6346-4cf4-a693-31a8607807dd"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, 3.994074327386962*^9, 3.9940749362749443`*^9, 3.99407497527983*^9, 3.994075020050624*^9, {3.994075073838533*^9, - 3.994075091486505*^9}}, + 3.994075091486505*^9}, 3.9943499875041924`*^9, 3.994352533371269*^9}, CellLabel-> - "Out[461]=",ExpressionUUID->"30f697c8-90d9-43ec-acde-aca91b3bab9a"] + "Out[124]=",ExpressionUUID->"e31e9e06-148f-4453-8369-79dd4bd03ee1"] }, Open ]], Cell[CellGroupData[{ @@ -9226,15 +9070,15 @@ Cell[BoxData[ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", CellLabel-> - "In[462]:=",ExpressionUUID->"8bd5d07d-3777-48b8-9134-a98d0c5e6a3c"], + "In[125]:=",ExpressionUUID->"8bd5d07d-3777-48b8-9134-a98d0c5e6a3c"], Cell[BoxData["102.57012833062927`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, 3.9940743273966637`*^9, 3.994074936286751*^9, 3.994074975289721*^9, 3.994075020061038*^9, {3.9940750738489656`*^9, - 3.994075091497402*^9}}, + 3.994075091497402*^9}, 3.994349987527669*^9, 3.9943525333795223`*^9}, CellLabel-> - "Out[462]=",ExpressionUUID->"e38fe0b7-4224-47cf-aa68-b513fd72c7f5"] + "Out[125]=",ExpressionUUID->"f8646403-4be2-4d01-9d3d-c730abdf3726"] }, Open ]], Cell[CellGroupData[{ @@ -9275,16 +9119,16 @@ Cell[BoxData[ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", CellLabel-> - "In[463]:=",ExpressionUUID->"21c2ba5f-8c84-456a-866a-d59808603e16"], + "In[126]:=",ExpressionUUID->"21c2ba5f-8c84-456a-866a-d59808603e16"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, 3.994074327406303*^9, 3.9940749362972116`*^9, 3.994074975299696*^9, 3.994075020070904*^9, {3.994075073859618*^9, - 3.994075091508032*^9}}, + 3.994075091508032*^9}, 3.9943499875503387`*^9, 3.994352533385741*^9}, CellLabel-> - "Out[463]=",ExpressionUUID->"55ce79d7-0043-47a4-b4c8-43064e4fda97"] + "Out[126]=",ExpressionUUID->"86f718dc-c821-47fd-91f1-804d40616291"] }, Open ]], Cell[CellGroupData[{ @@ -9329,102 +9173,107 @@ Cell[BoxData[ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", CellLabel-> - "In[464]:=",ExpressionUUID->"0d3f7a6f-e62d-4e5d-9bf5-33c7c1aa96fa"], + "In[127]:=",ExpressionUUID->"0d3f7a6f-e62d-4e5d-9bf5-33c7c1aa96fa"], Cell[BoxData["106.05157029710364`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, 3.9940743274159946`*^9, 3.994074936339744*^9, 3.99407497530958*^9, 3.994075020080964*^9, {3.994075073870014*^9, - 3.994075091518471*^9}}, + 3.994075091518471*^9}, 3.994349987578545*^9, 3.9943525333918753`*^9}, CellLabel-> - "Out[464]=",ExpressionUUID->"5a2a7e66-6a1a-42da-aa4e-82d9cdb3b900"] + "Out[127]=",ExpressionUUID->"0d7c9beb-4850-4aef-8082-999f1ac72f54"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", CellLabel-> - "In[465]:=",ExpressionUUID->"51091a04-ee5c-44c8-9b87-7f6eab0f54d4"], + "In[128]:=",ExpressionUUID->"51091a04-ee5c-44c8-9b87-7f6eab0f54d4"], Cell[BoxData["0.4215025991580821`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, 3.9940743274252653`*^9, 3.994074936349539*^9, 3.994074975319766*^9, 3.99407502009256*^9, {3.994075073880959*^9, - 3.99407509152868*^9}}, + 3.99407509152868*^9}, 3.994349987599551*^9, 3.9943525333977213`*^9}, CellLabel-> - "Out[465]=",ExpressionUUID->"96e0f1e0-ae5f-4aa1-9e87-b05302102c04"] + "Out[128]=",ExpressionUUID->"2fbb416e-7924-4132-9acc-412a2b60c9c3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", CellLabel-> - "In[466]:=",ExpressionUUID->"aa8664e9-7a0d-4329-a494-0b9235ba70bd"], + "In[129]:=",ExpressionUUID->"aa8664e9-7a0d-4329-a494-0b9235ba70bd"], Cell[BoxData[ RowBox[{"-", "0.08696983109232953`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, 3.9940749363615837`*^9, 3.994074975323977*^9, - 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}}, + 3.994075020102562*^9, {3.994075073891796*^9, 3.994075091539506*^9}, + 3.994349987621277*^9, 3.994352533403561*^9}, CellLabel-> - "Out[466]=",ExpressionUUID->"1fd4dc44-78d3-4bec-88c6-5f3004e320b3"] + "Out[129]=",ExpressionUUID->"19e2d04f-25cf-4ae6-a709-1ca46c9d8af8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", CellLabel-> - "In[467]:=",ExpressionUUID->"8ad16100-9963-455d-bb4a-18485cc6a462"], + "In[130]:=",ExpressionUUID->"8ad16100-9963-455d-bb4a-18485cc6a462"], Cell[BoxData[ RowBox[{"-", "0.5569156814457635`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, 3.994074936371666*^9, 3.994074975333539*^9, - 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}}, + 3.99407502011357*^9, {3.994075073902575*^9, 3.994075091549716*^9}, + 3.99434998763625*^9, 3.994352533409196*^9}, CellLabel-> - "Out[467]=",ExpressionUUID->"86fffbfa-5c5d-4ed7-94a2-e95b3eb6a461"] + "Out[130]=",ExpressionUUID->"7dbd7165-585f-47bb-9f8f-c89ac977d689"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", CellLabel-> - "In[468]:=",ExpressionUUID->"5362a78a-eafb-4101-84fc-a110bd990c05"], + "In[131]:=",ExpressionUUID->"5362a78a-eafb-4101-84fc-a110bd990c05"], Cell[BoxData["0.7095150675393332`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, 3.994074936381706*^9, 3.994074975343092*^9, - 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}}, + 3.994075020123022*^9, {3.994075073912849*^9, 3.99407509155998*^9}, + 3.994349987656581*^9, 3.994352533414867*^9}, CellLabel-> - "Out[468]=",ExpressionUUID->"8f9b014e-aa60-4461-9d31-d7c041656133"] + "Out[131]=",ExpressionUUID->"3c7b0159-0c32-41f1-ace8-cdb23f3b3190"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", CellLabel-> - "In[469]:=",ExpressionUUID->"ab8298db-eb89-468c-9f30-8b26a0639fed"], + "In[132]:=",ExpressionUUID->"ab8298db-eb89-468c-9f30-8b26a0639fed"], Cell[BoxData["2.2478963955971953`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, 3.994074936391926*^9, 3.994074975352632*^9, - 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}}, + 3.99407502013336*^9, {3.994075073923398*^9, 3.994075091570552*^9}, + 3.994349987669284*^9, 3.994352533420438*^9}, CellLabel-> - "Out[469]=",ExpressionUUID->"d426c2dd-db45-4cde-b59d-cbf17cd96c57"] + "Out[132]=",ExpressionUUID->"e5cd2a7d-da86-4e7b-9b3a-d0ce247d4c7f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", CellLabel-> - "In[470]:=",ExpressionUUID->"15afe09a-545b-456c-b862-783499a9aa3e"], + "In[133]:=",ExpressionUUID->"15afe09a-545b-456c-b862-783499a9aa3e"], Cell[BoxData["1.4243583722932822`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, 3.994074936401989*^9, 3.994074975362446*^9, - 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}}, + 3.9940750201447487`*^9, {3.9940750739335833`*^9, 3.994075091580728*^9}, + 3.994349987683522*^9, 3.9943525334260187`*^9}, CellLabel-> - "Out[470]=",ExpressionUUID->"f554d23f-b187-4b9f-a7d9-ae4231f6c6bd"] + "Out[133]=",ExpressionUUID->"3f4fd7b7-a700-46df-a6f7-37904032e25e"] }, Open ]], Cell[CellGroupData[{ @@ -9446,15 +9295,16 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", CellLabel-> - "In[471]:=",ExpressionUUID->"d2cee077-a240-4c98-8e64-6034cd291aad"], + "In[134]:=",ExpressionUUID->"d2cee077-a240-4c98-8e64-6034cd291aad"], Cell[BoxData[ RowBox[{"-", "33.35096235519822`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, 3.994074936412284*^9, 3.994074975373137*^9, - 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}}, + 3.994075020154063*^9, {3.994075073943824*^9, 3.99407509159135*^9}, + 3.994349987698597*^9, 3.994352533431815*^9}, CellLabel-> - "Out[471]=",ExpressionUUID->"c73fd9b3-ab13-41b7-98b1-ec37e2936624"] + "Out[134]=",ExpressionUUID->"a02a4112-f64a-4ca5-8aae-cb4e8e21fdb3"] }, Open ]], Cell[CellGroupData[{ @@ -9476,15 +9326,16 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", CellLabel-> - "In[472]:=",ExpressionUUID->"52944921-5af5-4c21-a7ae-13086ddc9cd1"], + "In[135]:=",ExpressionUUID->"52944921-5af5-4c21-a7ae-13086ddc9cd1"], Cell[BoxData[ RowBox[{"-", "6.430095836913352`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, 3.994074936422553*^9, 3.994074975386326*^9, - 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}}, + 3.9940750201636887`*^9, {3.994075073954281*^9, 3.9940750916019077`*^9}, + 3.994349987722659*^9, 3.994352533437654*^9}, CellLabel-> - "Out[472]=",ExpressionUUID->"a3630ce9-ef03-450a-8517-62db7645491a"] + "Out[135]=",ExpressionUUID->"bdb6858a-5b08-4d68-a449-84a33e52f7bb"] }, Open ]], Cell[CellGroupData[{ @@ -9550,14 +9401,15 @@ Cell[BoxData[ RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", CellLabel-> - "In[473]:=",ExpressionUUID->"d5fd357f-fd90-433e-8ded-24de79601f6c"], + "In[136]:=",ExpressionUUID->"d5fd357f-fd90-433e-8ded-24de79601f6c"], Cell[BoxData["69.21916597543105`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, 3.994074936433895*^9, 3.994074975398871*^9, - 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}}, + 3.994075020173421*^9, {3.994075073964881*^9, 3.994075091612443*^9}, + 3.994349987772469*^9, 3.994352533444045*^9}, CellLabel-> - "Out[473]=",ExpressionUUID->"7a5076e9-e527-4503-81c4-86cb6ce0e74c"] + "Out[136]=",ExpressionUUID->"324bfffa-3b64-43f3-a170-dc5453a6f625"] }, Open ]], Cell[CellGroupData[{ @@ -9599,15 +9451,16 @@ Cell[BoxData[ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", CellLabel-> - "In[474]:=",ExpressionUUID->"2d3e2067-d5af-489d-ac0b-6d494a615060"], + "In[137]:=",ExpressionUUID->"2d3e2067-d5af-489d-ac0b-6d494a615060"], Cell[BoxData[ RowBox[{"-", "89.85372860437164`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, 3.9940749364442453`*^9, 3.994074975409512*^9, - 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}}, + 3.9940750201838827`*^9, {3.994075073975268*^9, 3.994075091623101*^9}, + 3.994349987828903*^9, 3.9943525334505577`*^9}, CellLabel-> - "Out[474]=",ExpressionUUID->"6565c76d-b318-481c-95be-db18f4ec6ff7"] + "Out[137]=",ExpressionUUID->"9cf64d0f-ceaf-41db-8540-f12b158afe42"] }, Open ]], Cell[CellGroupData[{ @@ -9674,14 +9527,15 @@ Cell[BoxData[ RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", CellLabel-> - "In[475]:=",ExpressionUUID->"67723656-50a5-49b8-8d0f-139bec049352"], + "In[138]:=",ExpressionUUID->"67723656-50a5-49b8-8d0f-139bec049352"], Cell[BoxData["99.62147446019029`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, 3.9940749364549513`*^9, 3.9940749754197397`*^9, - 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}}, + 3.99407502019348*^9, {3.994075073985984*^9, 3.994075091633762*^9}, + 3.994349987856482*^9, 3.9943525334568043`*^9}, CellLabel-> - "Out[475]=",ExpressionUUID->"c7a01b89-358f-4ad6-9168-8545a79e20e8"] + "Out[138]=",ExpressionUUID->"8ab7ebf5-803f-4616-add0-2c8b0d6b3e52"] }, Open ]], Cell[CellGroupData[{ @@ -9740,14 +9594,15 @@ Cell[BoxData[ "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", CellLabel-> - "In[476]:=",ExpressionUUID->"4335829d-0808-4d97-a0f4-f678101e0a58"], + "In[139]:=",ExpressionUUID->"4335829d-0808-4d97-a0f4-f678101e0a58"], Cell[BoxData["40.3202486570226`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, 3.994074936466222*^9, 3.994074975429769*^9, - 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}}, + 3.9940750202031527`*^9, {3.99407507399641*^9, 3.994075091644145*^9}, + 3.9943499878831472`*^9, 3.9943525334627666`*^9}, CellLabel-> - "Out[476]=",ExpressionUUID->"c02b99d0-639a-4df5-a73a-9065ee8890b7"] + "Out[139]=",ExpressionUUID->"b8d2cfcc-f90c-4601-a7a7-22099a8e3be3"] }, Open ]], Cell[CellGroupData[{ @@ -9806,38 +9661,55 @@ Cell[BoxData[ "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", CellLabel-> - "In[477]:=",ExpressionUUID->"d62b6b99-b96c-485c-87cb-c0a9062a99c6"], + "In[140]:=",ExpressionUUID->"d62b6b99-b96c-485c-87cb-c0a9062a99c6"], Cell[BoxData["624.5259763904654`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, 3.994074936476499*^9, 3.994074975439941*^9, - 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}}, + 3.994075020213862*^9, {3.994075074006929*^9, 3.994075091654208*^9}, + 3.994349987909128*^9, 3.994352533468834*^9}, CellLabel-> - "Out[477]=",ExpressionUUID->"740b69e0-a972-4090-a479-ecd2691cd4e7"] + "Out[140]=",ExpressionUUID->"b18c63a9-5e8c-4011-aeb3-cd7332bff109"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.466369126"}]], "Input", CellChangeTimes->{ - 3.9918501413985214`*^9, {3.9942355154034843`*^9, - 3.994235536476674*^9}},ExpressionUUID->"5894836c-9594-0940-b94c-\ -299085c765cc"], + 3.9918501413985214`*^9, {3.9942355154034843`*^9, 3.994235536476674*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], + +Cell[BoxData["0.466369126`"], "Output", + CellChangeTimes->{3.994349987937258*^9, 3.9943525334743032`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"7723de11-30cc-43a0-a485-5d1306fa3ae6"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918501359768734`*^9, - 3.991850137465685*^9}},ExpressionUUID->"5965eb10-01f8-5545-9b6f-\ -8fab318cd4b7"], + CellChangeTimes->{{3.9918501359768734`*^9, 3.991850137465685*^9}}, + CellLabel-> + "In[142]:=",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1888262039"}]], "Input", - CellChangeTimes->{3.9918501402114105`*^9, - 3.994235547153337*^9},ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-\ -092c5143dcf0"], + CellChangeTimes->{3.9918501402114105`*^9, 3.994235547153337*^9}, + CellLabel-> + "In[143]:=",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], + +Cell[BoxData["0.1888262039`"], "Output", + CellChangeTimes->{3.9943499879834757`*^9, 3.994352533482835*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"c600809b-b9b9-44a7-821a-e55c75d2ac1a"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918501388085117`*^9, - 3.991850138811516*^9}},ExpressionUUID->"6e7c45d7-0298-ce41-ba97-\ -a3c857e6ae57"], + CellChangeTimes->{{3.9918501388085117`*^9, 3.991850138811516*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ @@ -9884,12 +9756,13 @@ Cell[BoxData[ RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", CellLabel-> - "In[399]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], + "In[145]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913437871842365`*^9}, +Cell[BoxData["1.502378697384544`*^-53"], "Output", + CellChangeTimes->{3.9913437871842365`*^9, 3.99434998802905*^9, + 3.994352533491728*^9}, CellLabel-> - "Out[399]=",ExpressionUUID->"d7904bcf-fc55-b844-b4d2-059d830f1317"] + "Out[145]=",ExpressionUUID->"966198f8-4cf8-4ba5-8143-f5063637f28c"] }, Open ]], Cell[CellGroupData[{ @@ -9923,14 +9796,15 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557655438551*^9},ExpressionUUID->"f2e6289f-a8bc-6d44-a856-\ -301cf9f22a61"], - -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.9913437872132397`*^9}, + CellChangeTimes->{3.991557655438551*^9}, CellLabel-> - "Out[400]=",ExpressionUUID->"7c075ec9-a97b-ab47-b241-cc392b585c5e"] + "In[146]:=",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], + +Cell[BoxData["7.246193955000845`*^-55"], "Output", + CellChangeTimes->{3.9913437872132397`*^9, 3.994349988054098*^9, + 3.9943525334993267`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"45aa011f-5a96-43fa-95ce-4bdb998dd995"] }, Open ]], Cell[CellGroupData[{ @@ -9963,14 +9837,15 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915576595317745`*^9, - 3.9915576617156334`*^9}},ExpressionUUID->"cdf84d2f-1e96-4c43-9286-\ -fda42549e334"], - -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.9913437872412376`*^9}, + CellChangeTimes->{{3.9915576595317745`*^9, 3.9915576617156334`*^9}}, CellLabel-> - "Out[401]=",ExpressionUUID->"ddda4800-8c90-d44b-acfd-6ccb39eee852"] + "In[147]:=",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], + +Cell[BoxData["1.0184493083932505`*^-54"], "Output", + CellChangeTimes->{3.9913437872412376`*^9, 3.994349988079591*^9, + 3.994352533505433*^9}, + CellLabel-> + "Out[147]=",ExpressionUUID->"1f126b19-c813-4dcc-8520-d8ff13beab0b"] }, Open ]], Cell[CellGroupData[{ @@ -9994,12 +9869,13 @@ Cell[BoxData[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[402]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], + "In[148]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913437872672386`*^9}, +Cell[BoxData["13.841887348405606`"], "Output", + CellChangeTimes->{3.9913437872672386`*^9, 3.9943499881031637`*^9, + 3.994352533513011*^9}, CellLabel-> - "Out[402]=",ExpressionUUID->"046d7438-d73f-9343-9ae7-b01adfd6d8f5"] + "Out[148]=",ExpressionUUID->"beecb047-ec4b-4e6b-9065-65fbd4ff665f"] }, Open ]], Cell[CellGroupData[{ @@ -10026,12 +9902,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", CellLabel-> - "In[403]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], + "In[149]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[BoxData["47.62007062351`"], "Output", - CellChangeTimes->{3.991343787279253*^9}, +Cell[BoxData["28.231119412954918`"], "Output", + CellChangeTimes->{3.991343787279253*^9, 3.994349988129071*^9, + 3.99435253351935*^9}, CellLabel-> - "Out[403]=",ExpressionUUID->"d2928e96-58be-3a4f-8bee-5b9e193c2ac6"] + "Out[149]=",ExpressionUUID->"5f92bca7-796f-439d-bd28-bf2bd21720a7"] }, Open ]], Cell[CellGroupData[{ @@ -10041,12 +9918,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", CellLabel-> - "In[404]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], + "In[150]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913437873062572`*^9}, +Cell[BoxData["1.7067265547102797`"], "Output", + CellChangeTimes->{3.9913437873062572`*^9, 3.994349988149994*^9, + 3.994352533525324*^9}, CellLabel-> - "Out[404]=",ExpressionUUID->"bf655ed3-7200-2249-b687-593ee351a598"] + "Out[150]=",ExpressionUUID->"dc3c3e61-af54-4c14-a201-68ba17cf3623"] }, Open ]], Cell[CellGroupData[{ @@ -10056,12 +9934,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", CellLabel-> - "In[405]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], + "In[151]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[BoxData["2.8712430196956706`"], "Output", - CellChangeTimes->{3.9913437873353844`*^9}, +Cell[BoxData["4.703392301788809`"], "Output", + CellChangeTimes->{3.9913437873353844`*^9, 3.994349988238167*^9, + 3.994352533530787*^9}, CellLabel-> - "Out[405]=",ExpressionUUID->"56f5f06b-52e2-6941-b28e-41b961cb42e9"] + "Out[151]=",ExpressionUUID->"8eccdfdc-f8c6-4ba4-afda-7bb4d2958cb2"] }, Open ]], Cell[CellGroupData[{ @@ -10071,12 +9950,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", CellLabel-> - "In[406]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], + "In[152]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[BoxData["136.72879537516795`"], "Output", - CellChangeTimes->{3.991343787361582*^9}, +Cell[BoxData["132.78202971777276`"], "Output", + CellChangeTimes->{3.991343787361582*^9, 3.994349988317965*^9, + 3.994352533536255*^9}, CellLabel-> - "Out[406]=",ExpressionUUID->"8c210f75-69a5-5340-94a4-65e97302ca45"] + "Out[152]=",ExpressionUUID->"f084a007-40dd-4e55-af94-d1055ef9d76a"] }, Open ]], Cell[CellGroupData[{ @@ -10086,12 +9966,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[407]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], + "In[153]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913437873734856`*^9}, +Cell[BoxData["23.624316704832108`"], "Output", + CellChangeTimes->{3.9913437873734856`*^9, 3.994349988339142*^9, + 3.994352533541748*^9}, CellLabel-> - "Out[407]=",ExpressionUUID->"bad7f5b6-1bd3-6b4b-87e4-44aee3a120fc"] + "Out[153]=",ExpressionUUID->"8f528a8a-3362-4990-b9a6-f46ab8f64c2f"] }, Open ]], Cell[CellGroupData[{ @@ -10281,12 +10162,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[408]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], + "In[154]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[BoxData["0.03116264120310575`"], "Output", - CellChangeTimes->{3.9913437874002857`*^9}, +Cell[BoxData["0.007196650139687933`"], "Output", + CellChangeTimes->{3.9913437874002857`*^9, 3.99434998836045*^9, + 3.994352533548036*^9}, CellLabel-> - "Out[408]=",ExpressionUUID->"ffdf2eb3-13bd-724f-a87b-fb40655ae9c4"] + "Out[154]=",ExpressionUUID->"df30cd95-eaf5-45d3-8153-e8e64b12b03a"] }, Open ]], Cell[CellGroupData[{ @@ -10300,12 +10182,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[409]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], + "In[155]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[BoxData["5.020278507983894`"], "Output", - CellChangeTimes->{3.9913437875033875`*^9}, +Cell[BoxData["10.446714971188468`"], "Output", + CellChangeTimes->{3.9913437875033875`*^9, 3.994349988716794*^9, + 3.994352533698488*^9}, CellLabel-> - "Out[409]=",ExpressionUUID->"609425d6-cf9c-7a45-bc21-030ca3aa1290"] + "Out[155]=",ExpressionUUID->"71428057-06f8-41ae-8291-5ec6c70a5e78"] }, Open ]], Cell[CellGroupData[{ @@ -10497,12 +10380,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[410]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], + "In[156]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[BoxData["0.011613560908040731`"], "Output", - CellChangeTimes->{3.9913437875342865`*^9}, +Cell[BoxData["0.04125596950705819`"], "Output", + CellChangeTimes->{3.9913437875342865`*^9, 3.994349988755481*^9, + 3.994352533763549*^9}, CellLabel-> - "Out[410]=",ExpressionUUID->"b20cbe94-36a3-8548-a61e-959a25814c62"] + "Out[156]=",ExpressionUUID->"8f79555d-2fea-48fa-99c1-a8927a78c6cb"] }, Open ]], Cell[CellGroupData[{ @@ -10516,12 +10400,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[411]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], + "In[157]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[BoxData["8.223604958038852`"], "Output", - CellChangeTimes->{3.9913437876352882`*^9}, +Cell[BoxData["4.363164047075164`"], "Output", + CellChangeTimes->{3.9913437876352882`*^9, 3.994349988900753*^9, + 3.994352533804636*^9}, CellLabel-> - "Out[411]=",ExpressionUUID->"4fc2e2c1-457d-3d4a-a5b7-180877c6f370"] + "Out[157]=",ExpressionUUID->"689f8711-9036-4beb-8b45-c3c0a6d44dba"] }, Open ]], Cell[CellGroupData[{ @@ -10614,12 +10499,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[412]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], + "In[158]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991343787650694*^9}, +Cell[BoxData["0.06803408589806512`"], "Output", + CellChangeTimes->{3.991343787650694*^9, 3.9943499889794188`*^9, + 3.994352533812392*^9}, CellLabel-> - "Out[412]=",ExpressionUUID->"08fcefa1-a87b-bf4b-998d-0c9017752dd4"] + "Out[158]=",ExpressionUUID->"b2ae10ec-3d3a-4dd7-8e42-34058e45eb89"] }, Open ]], Cell[CellGroupData[{ @@ -10709,12 +10595,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[413]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], + "In[159]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913437876776943`*^9}, +Cell[BoxData["0.9319659141019349`"], "Output", + CellChangeTimes->{3.9913437876776943`*^9, 3.99434998902569*^9, + 3.994352533818763*^9}, CellLabel-> - "Out[413]=",ExpressionUUID->"5678b502-e98a-5d4b-9c03-fe98b2cc6f78"] + "Out[159]=",ExpressionUUID->"322cb07f-73ae-4dc1-990a-67b89d0faf30"] }, Open ]], Cell[CellGroupData[{ @@ -10837,18 +10724,20 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[414]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], + "In[160]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913437877049465`*^9}, +Cell[BoxData["0.06340544905407981`"], "Output", + CellChangeTimes->{3.9913437877049465`*^9, 3.994349989041192*^9, + 3.994352533826336*^9}, CellLabel-> - "Out[414]=",ExpressionUUID->"d74c1470-6eae-4841-b978-069a86bca67d"] + "Out[160]=",ExpressionUUID->"1e3ebfac-4839-4a45-a46b-a11fce4b7445"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"8111b6bb-cdcb-\ -ad40-9440-412e77bed40d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel-> + "In[161]:=",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ @@ -10909,68 +10798,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501532204666`*^9},ExpressionUUID->"fc88a60e-e348-d344-96c4-\ -1f4f66f53217"], + CellChangeTimes->{3.9918501532204666`*^9}, + CellLabel-> + "In[162]:=",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 433, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877189426`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.106038125832353`*^-204\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 162, + 1, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994349989092032*^9, + 3.994352533851982*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], +In[162]:=",ExpressionUUID->"3f13f16a-5713-42ff-b51b-f4666b0ac007"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 434, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787730139*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.948278080102363`*^-209\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 162, + 2, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994349989092032*^9, + 3.994352533873345*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], +In[162]:=",ExpressionUUID->"73f9b6f7-9fd7-4ada-a8bb-20dbb3067edb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 435, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877381363`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1626311821085546`*^-213\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 162, + 3, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994349989092032*^9, + 3.994352533877882*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], +In[162]:=",ExpressionUUID->"df73bc34-fbe8-4289-abbd-f2ee057e5ef5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 415, 436, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787747137*^9}, +during this calculation.\"", 2, 162, 4, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994349989092032*^9, + 3.9943525338812447`*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], +In[162]:=",ExpressionUUID->"df0fae3f-68d4-4b37-a7bf-789329a6e407"], -Cell[BoxData["5.020278507983898`"], "Output", - CellChangeTimes->{3.991343791131052*^9}, +Cell[BoxData["10.446714971188475`"], "Output", + CellChangeTimes->{3.991343791131052*^9, 3.9943499928264017`*^9, + 3.994352535256875*^9}, CellLabel-> - "Out[415]=",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] + "Out[162]=",ExpressionUUID->"8f29da31-d224-4676-9917-6dfe5ce36b03"] }, Open ]], Cell[CellGroupData[{ @@ -11032,68 +10933,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501579408264`*^9},ExpressionUUID->"dca13eb7-7f94-3e45-81a8-\ -b62dad3009d2"], + CellChangeTimes->{3.9918501579408264`*^9}, + CellLabel-> + "In[163]:=",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 437, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911686516`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.106038125832353`*^-204\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 163, + 5, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994349993021618*^9, + 3.994352535294799*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], +In[163]:=",ExpressionUUID->"b535ca66-940b-4d5c-8c1e-308e9addd8c8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 438, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134379117865*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.948278080102363`*^-209\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 163, + 6, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994349993021618*^9, + 3.9943525353038054`*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], +In[163]:=",ExpressionUUID->"de96ce64-0a83-413c-b58c-45bc679e4da0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 439, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911866493`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1626311821085546`*^-213\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 163, + 7, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994349993021618*^9, + 3.994352535307501*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], +In[163]:=",ExpressionUUID->"17ff6abb-b73a-4228-907c-767daccf9af8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 416, 440, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911946507`*^9}, +during this calculation.\"", 2, 163, 8, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994349993021618*^9, + 3.994352535310544*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], +In[163]:=",ExpressionUUID->"1f3d4f64-a292-4303-95af-69fa58289e67"], -Cell[BoxData["8.223604958038848`"], "Output", - CellChangeTimes->{3.991343794599764*^9}, +Cell[BoxData["4.363164047075166`"], "Output", + CellChangeTimes->{3.991343794599764*^9, 3.994349996838324*^9, + 3.994352536619783*^9}, CellLabel-> - "Out[416]=",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] + "Out[163]=",ExpressionUUID->"656ff11b-5315-417f-b4f8-5b4a68613cc9"] }, Open ]], Cell[CellGroupData[{ @@ -11103,140 +11016,142 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501631488323`*^9},ExpressionUUID->"46451e4d-f5ef-b246-91c6-\ -4265c9fafb97"], + CellChangeTimes->{3.9918501631488323`*^9}, + CellLabel-> + "In[164]:=",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VlsXAHBEJMqQKZG5XkPkJZTaK0MiJEMRiXc4hiuZU8RVqYQG1aX7 +FSVKMqZkKCEhmW5UKmPOa87MUZRv98d5zvN71j5rr7323keRcdyezcPFxTWE +nz/vwOYtm563Nu/6h6dgXCGLRLvGM/QZZjloPjpMWRG7N23bDRWzFyjVs7bq +j+1YTSuF6G/Qhty0t0rYheHRr/nMGhG/H88OFey4WunK6Oz/UNrjcQk17NLW +wNQl3Q9oLJJ1eDP2yJeGyJPlHahzlimggb2eo+w6b9qJVml+37gFe99EpFFw +Yw+a28V1byt2xdLI6vDsPlRhcydeH/tjjFREsX8/uhZZ02OEPb7SbGRWl4No +M6F3dmGvTAhwoVMDyKCrsMYUW170Tn1g+RDa4BvuZIltKzv/YNx0DP0yflDk +hE3cVZLUEhhH/80Kx7hhR6vuj/2rcQIJ0rlLmNgdUu1bQ7KnELddPCMYm3XY +1+d6wjQarVD6GIE9eZvr3hP/GeTXvqfoHLaAkpbIlO4cOrFzW3Yy9g3WawsR +iXnkj3hq7mErPHSJ1qbm0U8zN4scbEPN8+PHyhdQQF/5pWps7209jSOmSyjq +mx7vLPZseCivoNovZOgT6cv9iER/l682pgn8RnZMp+1rsVPA8LFX4zK6VPhS +UhOblVlvFpTNDc/iwqp9sbNrr/fGyPJANMs5NAJ7ctA98loCD3BLtF5LwI5U +nysq8F8BegFn+Quwb+QrKk/o8kEaXWhgEftL61jF7/t8cP1NHmdtNq5/+vnh +NRIroTdmzFYFO0fPNkmLWgnIz9jdFrum9BS3X7kA2EaYBjzEnnvd1jNkKgQm +iQ8Yxx6TSMxaSCSiQggMV/zYeQlbp90MhI2EwW/p5M2H2L7ks7tbt6yBpQCh +0n7sAJ5GnZ1CIiB1IPm9Zw6JOEp5U7HzouAYE2oXmov7QzSsaqGLQa+Y3cQt +bJ7HA4rSgWIgSRwXfIWtQN9onz0qBtXJZ54J5pHosOnVJ8294rCov7nnIXYL +MyhY6p0EzPcMx/zIJ1H3w8vxHgKSMHbxE0e1gERjo9n3H5lLwjEv1Vp7bMGQ +/rYdlZJQcWh4MRfb7JyjnsczKVDX2mvsW0iisoxtc1lpMqA5rCz28wmJMjg/ +w7aHyIHC/VDFE8Uk2ut0oTs4Vw78K2Kl87HHasT35A7IwUpt08hBbL0MTQkF +F3mQcmyOc3mO+8lwL+LbtRE+MjxempSQaHqi98TQWQWYlDh4kVZGIvFjZk+L +bJTgzDqfl3srSDSQIeht56sEPHH+tpexSzpbZb+fV4KCfl/rdmw36yNn1SqV +4NYZ+yuer3B9GmH2t3SVQbBadWtMJZ5/5OFklJQKfPmqMdheTSJHr9VaVn2q +QFr81m6uIxEKc9I99EsVVHwMqjfWk0g9Ns2AJaMGwZ4xLwOxue7TTaIOqAG1 +12FC8i2JcrtdDz2pUoPtHxAQDfh+HsyJWZ++CU5dbb4l3YTrM7P5OMKgwccQ +0d2N70l03yH5KxVFgyA7+qJ6G4kuM/p6ef9HAxHrevlL2Ky/Q0fl22gg0+Gc +btlOItEXd7gcTNXhVnjg/5o+4PNDH1cvV9YA6aVQ5+EOEskqXYmOJzXBf1xD +MqCHRC8uzdJ+8GjBid80HQ6224xLO6GoBXwFVbWHe0mUWqNCM3HXAhXh/3ws ++kik5FX2fuGTFmTZzV9Q68frzeGoEu+2gF962ualARLJycoTCi46cC40Xp5v +gkSamSFCi0gXFgJV+a5wcRCDdXZOy1YXgryfnJHh5qAU5aRuDzddsLaZOJaB +vSI9v6A2XBeeaycklvNw0JfUEcekQl0QMfwyNc7LQXEpHndoynT4N0fUwXcV +Bw3EW29xXqkHemJz/xaJcdC9IBW7Z4360BY0yrymxkGtYcjgXKYRGFt6m6cc +4iBF9w+2R/x2QpOjkMabKxzEXi7OkzsJUGn26O2JdxwkNVrCL8Uwgd2Ju8ut +1w2gELpxZ5K6GZzq9b4u4DGAGN+X6sVHzEFjXxj9ceEAyjUJ5k9rsYC2wYyz +uWKDKGPWtyrnhiXs2aKxbBI6iBZ2SzfVRO+DBc20BYnhQdTFtWKqz9MG5tYd +iljJGkL+G45fjVHeD5k3HU+s7RlCeT71lTdj7cCAfDlWd2wYnZqRoTR8DsBy +6NP4psVhNGe152DdUXvYp+tW5ZE2goxcr+3mHHCAAt6H9FbLUfRe5o5vDd0R +/G/p2yVPjaL1D86+yNrsBNpRcRO/C8ZQSa+6ta3wQTAe/lgV6fcdybdPeoV9 +PwiR7o+Ro+Y4ot+8lnO/9xCk5sZcwhuI7vDObEl67QzvT5zaT/s0gYp3a3+J +LXUBAzfGOQfPSZRicEl0KfswPD+i33auYxK1fM08T09whU7nC9PRVlPomc1t +lYC/3UB4tsE1o34KTR1z4PJnHYHzG9Yn6ME0mttD8x43dYcPsYtN0cXTKOv7 +54XgbUfhV/LpDGuDGeR8L5N5RMgDKqz4SsXyZ1DRk31HV1zwAOsNMTdPas8i +I9n3P+J+eECtTp8Ab+YsUu71+vKfjyfYmzfJCkrMIXL1X/tv93uC+Wj7zrq4 +OdR62ZZp4cSAV96BsnJTc+hGeNrq0FYGBBE5sbku8+hFxfIPpiUTPp2PaYx7 +Po/WusEFehkT4mcu+G9cSSGFdXUtG14wwfOBdM5RfgrpNNpIr6xggviVfnqa +AIXsjV0fdVQxITV/SWHDagrd2BD27vRbJvCmivsIi1BofdfjtfUdTMgpnTve +JEMhFXepFDeKCaE7NjlXaVLIyGM8K1aPBckJIr+97Sj04NZksO02Fpyp447y +OkChdW3Tu6QMWZDVJWfHtqfQuDnVnrWDBUIXl4fdHSn8/+LibjRhAe9w4ril +M4XWUKIuYgdYsDmLKbR8lEJkov6qtGMsuDlerkX6U+hyeaRPyQMcZ/jxX7lE +oWO6yUbhWSxI+izHcIunkPWjwlWG2SxI9XqzipZAIcHkgUfPc1mQ6LQPVSZS +KDbIbqT4KQtaH8btGrhKoUiayl/PqlmQN095iyRTyDf5nd+TblyPTYdNZzqF +LNcMGAf1skDZtmo+6T6FNsdyCet+Y8HJ5tjBvRkUGgjSzy3ksMBQlv/uk0wK +edqmfS8YYwHbvdz7dBaFnPmC/fN/soCIIA0mcylkEbw+IEeSDUWFMY2WJRSq +TjtvlSTNBmmhx4/msY0bp1XC17MhfdOzrPRSvF+q7z6byrPhl33F6oUyCsl8 +ijD9qsoG7rZpj5SXFBrd3iUpqM+Gkg+8yvnVFLrCc/ellwMbbrfXDdMb8fq1 +hVJsnNjwU5G3qAb7nGt4EP0QG7xSN9xybKJQ+FO7TcuH2bDYsr88sBnXT3Bf ++4fBBtmhBod7rRSiNzBYbwLZwG9HK/7QTqFP11RXK19lQ1dfiWNSJ4XykLD3 +0DU2fAh+X/ob+9z32Zrc62xQ+XjRybeLQrqWNVGGyWzwX+ung7rx/nExp21S +2WDJFxbY00OhPcfvfg7PYYNYd6jQz28UkpO7uG1XHhtq+k+0uvRTaLbh+PUV +BWx4VZb9tgQ7XQ3ZXC5ig8yIjWsISaFfXV2V98vYQPy1+0cfh0JPrWWzmuvZ +EH5h85rkIQrF/+Thu9HABs3sNNkRbEbWiKdLIxu+SAocMR6mkAhvmSzZwoYO +EWZEN7ZfufOVHx/ZEGpsoSIzSiFl9X/CVDhsMKm8JOX9nUI/P51uGx5gwwvh +Vtc87NZYtk7+EBtMjWbfz2BH9emNGI3h+er/dYkcp9CXlLYj+2fYoCZZXHt2 +gkJJ/KLmp7gJGHQkxP2mKPRiuss1ZAUBQdMt8jnYg13ZQf58BCxmRdJGsY2f +mt1lrCLAv9bZmJjG580jfNFKlABfw50H7WZw/dbmYubiBJyV73G5iL3DQIyG +JAjYo7vL7RX2VeGcg3QZAqpN5t3UZ3G8rKdQVpEAT98861lsIjOnXkKZgM7N +KWYqc3j81ZM9a1UJsNv0brsD9gAhLsxLI6Bqb4di3p+4uIX3mA4B/yvY8vnQ +PIXKfotHD+gSMMXPVR2NzRnuvdmrR8BYVUnWA+ztladetxsScL3l6fEpbNIv +T/4lELDOpvjbKQrfd+cI/ecmBLwuTSv9F9vIdK91oRkB394pXC7Fvizz7WTm +XgLciTrtWewS3vyraVYEnPHqXFq7QKH+iYiHt6wJKFj2qlPHNqyV+JBoR4AT +/xvHI9iMwm+jF+wJ6Ne/KBWKnXg7n+eMIwElJzM/xWN/C7LUCXMmoK63fX8x +trC7pEXAYQJ+r/rK3/Ann2X/EV83As45Kr/s/PP9xtPx7h4EhEewNy5jlwha +pTszCDDPdGpc8wPnm5MstWcRoBYfEiaHLdzX32JNEKAhWCGngW3YWDCwx5sA +v71bqg2wGc9P/wJfAuaeVjFNsRPTrdbt8COgmz+Uxxa7JFFKQ9+fAEMT89RD +f/KHk7u1AwiQz9M28MAWYhU604IIeNy9tckL22B/1HHlEAJ4Ciw9/P/k377v +vFwY7odF6GQwdoKq9B2pcAL6xIpOh2MXi3CKRE8RMPKWWyASu2+xsGF1JAEv +/DyuRP3JPxjVxxdFwBOzZvG/sbe937ewHE0AkFY3//j/LGUY1w== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -11250,105 +11165,105 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1Hk4VlsXAHBEJMqQKZG5XkPkJZTaK0MiJEMRiXc4hiuZU8RVqYQG1aX7 +FSVKMqZkKCEhmW5UKmPOa87MUZRv98d5zvN71j5rr7323keRcdyezcPFxTWE +nz/vwOYtm563Nu/6h6dgXCGLRLvGM/QZZjloPjpMWRG7N23bDRWzFyjVs7bq +j+1YTSuF6G/Qhty0t0rYheHRr/nMGhG/H88OFey4WunK6Oz/UNrjcQk17NLW +wNQl3Q9oLJJ1eDP2yJeGyJPlHahzlimggb2eo+w6b9qJVml+37gFe99EpFFw +Yw+a28V1byt2xdLI6vDsPlRhcydeH/tjjFREsX8/uhZZ02OEPb7SbGRWl4No +M6F3dmGvTAhwoVMDyKCrsMYUW170Tn1g+RDa4BvuZIltKzv/YNx0DP0yflDk +hE3cVZLUEhhH/80Kx7hhR6vuj/2rcQIJ0rlLmNgdUu1bQ7KnELddPCMYm3XY +1+d6wjQarVD6GIE9eZvr3hP/GeTXvqfoHLaAkpbIlO4cOrFzW3Yy9g3WawsR +iXnkj3hq7mErPHSJ1qbm0U8zN4scbEPN8+PHyhdQQF/5pWps7209jSOmSyjq +mx7vLPZseCivoNovZOgT6cv9iER/l682pgn8RnZMp+1rsVPA8LFX4zK6VPhS +UhOblVlvFpTNDc/iwqp9sbNrr/fGyPJANMs5NAJ7ctA98loCD3BLtF5LwI5U +nysq8F8BegFn+Quwb+QrKk/o8kEaXWhgEftL61jF7/t8cP1NHmdtNq5/+vnh +NRIroTdmzFYFO0fPNkmLWgnIz9jdFrum9BS3X7kA2EaYBjzEnnvd1jNkKgQm +iQ8Yxx6TSMxaSCSiQggMV/zYeQlbp90MhI2EwW/p5M2H2L7ks7tbt6yBpQCh +0n7sAJ5GnZ1CIiB1IPm9Zw6JOEp5U7HzouAYE2oXmov7QzSsaqGLQa+Y3cQt +bJ7HA4rSgWIgSRwXfIWtQN9onz0qBtXJZ54J5pHosOnVJ8294rCov7nnIXYL +MyhY6p0EzPcMx/zIJ1H3w8vxHgKSMHbxE0e1gERjo9n3H5lLwjEv1Vp7bMGQ +/rYdlZJQcWh4MRfb7JyjnsczKVDX2mvsW0iisoxtc1lpMqA5rCz28wmJMjg/ +w7aHyIHC/VDFE8Uk2ut0oTs4Vw78K2Kl87HHasT35A7IwUpt08hBbL0MTQkF +F3mQcmyOc3mO+8lwL+LbtRE+MjxempSQaHqi98TQWQWYlDh4kVZGIvFjZk+L +bJTgzDqfl3srSDSQIeht56sEPHH+tpexSzpbZb+fV4KCfl/rdmw36yNn1SqV +4NYZ+yuer3B9GmH2t3SVQbBadWtMJZ5/5OFklJQKfPmqMdheTSJHr9VaVn2q +QFr81m6uIxEKc9I99EsVVHwMqjfWk0g9Ns2AJaMGwZ4xLwOxue7TTaIOqAG1 +12FC8i2JcrtdDz2pUoPtHxAQDfh+HsyJWZ++CU5dbb4l3YTrM7P5OMKgwccQ +0d2N70l03yH5KxVFgyA7+qJ6G4kuM/p6ef9HAxHrevlL2Ky/Q0fl22gg0+Gc +btlOItEXd7gcTNXhVnjg/5o+4PNDH1cvV9YA6aVQ5+EOEskqXYmOJzXBf1xD +MqCHRC8uzdJ+8GjBid80HQ6224xLO6GoBXwFVbWHe0mUWqNCM3HXAhXh/3ws ++kik5FX2fuGTFmTZzV9Q68frzeGoEu+2gF962ualARLJycoTCi46cC40Xp5v +gkSamSFCi0gXFgJV+a5wcRCDdXZOy1YXgryfnJHh5qAU5aRuDzddsLaZOJaB +vSI9v6A2XBeeaycklvNw0JfUEcekQl0QMfwyNc7LQXEpHndoynT4N0fUwXcV +Bw3EW29xXqkHemJz/xaJcdC9IBW7Z4360BY0yrymxkGtYcjgXKYRGFt6m6cc +4iBF9w+2R/x2QpOjkMabKxzEXi7OkzsJUGn26O2JdxwkNVrCL8Uwgd2Ju8ut +1w2gELpxZ5K6GZzq9b4u4DGAGN+X6sVHzEFjXxj9ceEAyjUJ5k9rsYC2wYyz +uWKDKGPWtyrnhiXs2aKxbBI6iBZ2SzfVRO+DBc20BYnhQdTFtWKqz9MG5tYd +iljJGkL+G45fjVHeD5k3HU+s7RlCeT71lTdj7cCAfDlWd2wYnZqRoTR8DsBy +6NP4psVhNGe152DdUXvYp+tW5ZE2goxcr+3mHHCAAt6H9FbLUfRe5o5vDd0R +/G/p2yVPjaL1D86+yNrsBNpRcRO/C8ZQSa+6ta3wQTAe/lgV6fcdybdPeoV9 +PwiR7o+Ro+Y4ot+8lnO/9xCk5sZcwhuI7vDObEl67QzvT5zaT/s0gYp3a3+J +LXUBAzfGOQfPSZRicEl0KfswPD+i33auYxK1fM08T09whU7nC9PRVlPomc1t +lYC/3UB4tsE1o34KTR1z4PJnHYHzG9Yn6ME0mttD8x43dYcPsYtN0cXTKOv7 +54XgbUfhV/LpDGuDGeR8L5N5RMgDKqz4SsXyZ1DRk31HV1zwAOsNMTdPas8i +I9n3P+J+eECtTp8Ab+YsUu71+vKfjyfYmzfJCkrMIXL1X/tv93uC+Wj7zrq4 +OdR62ZZp4cSAV96BsnJTc+hGeNrq0FYGBBE5sbku8+hFxfIPpiUTPp2PaYx7 +Po/WusEFehkT4mcu+G9cSSGFdXUtG14wwfOBdM5RfgrpNNpIr6xggviVfnqa +AIXsjV0fdVQxITV/SWHDagrd2BD27vRbJvCmivsIi1BofdfjtfUdTMgpnTve +JEMhFXepFDeKCaE7NjlXaVLIyGM8K1aPBckJIr+97Sj04NZksO02Fpyp447y +OkChdW3Tu6QMWZDVJWfHtqfQuDnVnrWDBUIXl4fdHSn8/+LibjRhAe9w4ril +M4XWUKIuYgdYsDmLKbR8lEJkov6qtGMsuDlerkX6U+hyeaRPyQMcZ/jxX7lE +oWO6yUbhWSxI+izHcIunkPWjwlWG2SxI9XqzipZAIcHkgUfPc1mQ6LQPVSZS +KDbIbqT4KQtaH8btGrhKoUiayl/PqlmQN095iyRTyDf5nd+TblyPTYdNZzqF +LNcMGAf1skDZtmo+6T6FNsdyCet+Y8HJ5tjBvRkUGgjSzy3ksMBQlv/uk0wK +edqmfS8YYwHbvdz7dBaFnPmC/fN/soCIIA0mcylkEbw+IEeSDUWFMY2WJRSq +TjtvlSTNBmmhx4/msY0bp1XC17MhfdOzrPRSvF+q7z6byrPhl33F6oUyCsl8 +ijD9qsoG7rZpj5SXFBrd3iUpqM+Gkg+8yvnVFLrCc/ellwMbbrfXDdMb8fq1 +hVJsnNjwU5G3qAb7nGt4EP0QG7xSN9xybKJQ+FO7TcuH2bDYsr88sBnXT3Bf ++4fBBtmhBod7rRSiNzBYbwLZwG9HK/7QTqFP11RXK19lQ1dfiWNSJ4XykLD3 +0DU2fAh+X/ob+9z32Zrc62xQ+XjRybeLQrqWNVGGyWzwX+ung7rx/nExp21S +2WDJFxbY00OhPcfvfg7PYYNYd6jQz28UkpO7uG1XHhtq+k+0uvRTaLbh+PUV +BWx4VZb9tgQ7XQ3ZXC5ig8yIjWsISaFfXV2V98vYQPy1+0cfh0JPrWWzmuvZ +EH5h85rkIQrF/+Thu9HABs3sNNkRbEbWiKdLIxu+SAocMR6mkAhvmSzZwoYO +EWZEN7ZfufOVHx/ZEGpsoSIzSiFl9X/CVDhsMKm8JOX9nUI/P51uGx5gwwvh +Vtc87NZYtk7+EBtMjWbfz2BH9emNGI3h+er/dYkcp9CXlLYj+2fYoCZZXHt2 +gkJJ/KLmp7gJGHQkxP2mKPRiuss1ZAUBQdMt8jnYg13ZQf58BCxmRdJGsY2f +mt1lrCLAv9bZmJjG580jfNFKlABfw50H7WZw/dbmYubiBJyV73G5iL3DQIyG +JAjYo7vL7RX2VeGcg3QZAqpN5t3UZ3G8rKdQVpEAT98861lsIjOnXkKZgM7N +KWYqc3j81ZM9a1UJsNv0brsD9gAhLsxLI6Bqb4di3p+4uIX3mA4B/yvY8vnQ +PIXKfotHD+gSMMXPVR2NzRnuvdmrR8BYVUnWA+ztladetxsScL3l6fEpbNIv +T/4lELDOpvjbKQrfd+cI/ecmBLwuTSv9F9vIdK91oRkB394pXC7Fvizz7WTm +XgLciTrtWewS3vyraVYEnPHqXFq7QKH+iYiHt6wJKFj2qlPHNqyV+JBoR4AT +/xvHI9iMwm+jF+wJ6Ne/KBWKnXg7n+eMIwElJzM/xWN/C7LUCXMmoK63fX8x +trC7pEXAYQJ+r/rK3/Ann2X/EV83As45Kr/s/PP9xtPx7h4EhEewNy5jlwha +pTszCDDPdGpc8wPnm5MstWcRoBYfEiaHLdzX32JNEKAhWCGngW3YWDCwx5sA +v71bqg2wGc9P/wJfAuaeVjFNsRPTrdbt8COgmz+Uxxa7JFFKQ9+fAEMT89RD +f/KHk7u1AwiQz9M28MAWYhU604IIeNy9tckL22B/1HHlEAJ4Ciw9/P/k377v +vFwY7odF6GQwdoKq9B2pcAL6xIpOh2MXi3CKRE8RMPKWWyASu2+xsGF1JAEv +/DyuRP3JPxjVxxdFwBOzZvG/sbe937ewHE0AkFY3//j/LGUY1w== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.64552351587925, 1.4984136420955707`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.6455235158792515}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -11360,131 +11275,131 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.64552351587925, 1.4984136420955707`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.6455235158792515}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{115.12306105754324`, - 253.30690491292427`}, {-15.402138689748767`, 5.769736310251233}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1Hk4VlsXAHBEJMqQKZG5XkPkJZTaK0MiJEMRiXc4hiuZU8RVqYQG1aX7 +FSVKMqZkKCEhmW5UKmPOa87MUZRv98d5zvN71j5rr7323keRcdyezcPFxTWE +nz/vwOYtm563Nu/6h6dgXCGLRLvGM/QZZjloPjpMWRG7N23bDRWzFyjVs7bq +j+1YTSuF6G/Qhty0t0rYheHRr/nMGhG/H88OFey4WunK6Oz/UNrjcQk17NLW +wNQl3Q9oLJJ1eDP2yJeGyJPlHahzlimggb2eo+w6b9qJVml+37gFe99EpFFw +Yw+a28V1byt2xdLI6vDsPlRhcydeH/tjjFREsX8/uhZZ02OEPb7SbGRWl4No +M6F3dmGvTAhwoVMDyKCrsMYUW170Tn1g+RDa4BvuZIltKzv/YNx0DP0yflDk +hE3cVZLUEhhH/80Kx7hhR6vuj/2rcQIJ0rlLmNgdUu1bQ7KnELddPCMYm3XY +1+d6wjQarVD6GIE9eZvr3hP/GeTXvqfoHLaAkpbIlO4cOrFzW3Yy9g3WawsR +iXnkj3hq7mErPHSJ1qbm0U8zN4scbEPN8+PHyhdQQF/5pWps7209jSOmSyjq +mx7vLPZseCivoNovZOgT6cv9iER/l682pgn8RnZMp+1rsVPA8LFX4zK6VPhS +UhOblVlvFpTNDc/iwqp9sbNrr/fGyPJANMs5NAJ7ctA98loCD3BLtF5LwI5U +nysq8F8BegFn+Quwb+QrKk/o8kEaXWhgEftL61jF7/t8cP1NHmdtNq5/+vnh +NRIroTdmzFYFO0fPNkmLWgnIz9jdFrum9BS3X7kA2EaYBjzEnnvd1jNkKgQm +iQ8Yxx6TSMxaSCSiQggMV/zYeQlbp90MhI2EwW/p5M2H2L7ks7tbt6yBpQCh +0n7sAJ5GnZ1CIiB1IPm9Zw6JOEp5U7HzouAYE2oXmov7QzSsaqGLQa+Y3cQt +bJ7HA4rSgWIgSRwXfIWtQN9onz0qBtXJZ54J5pHosOnVJ8294rCov7nnIXYL +MyhY6p0EzPcMx/zIJ1H3w8vxHgKSMHbxE0e1gERjo9n3H5lLwjEv1Vp7bMGQ +/rYdlZJQcWh4MRfb7JyjnsczKVDX2mvsW0iisoxtc1lpMqA5rCz28wmJMjg/ +w7aHyIHC/VDFE8Uk2ut0oTs4Vw78K2Kl87HHasT35A7IwUpt08hBbL0MTQkF +F3mQcmyOc3mO+8lwL+LbtRE+MjxempSQaHqi98TQWQWYlDh4kVZGIvFjZk+L +bJTgzDqfl3srSDSQIeht56sEPHH+tpexSzpbZb+fV4KCfl/rdmw36yNn1SqV +4NYZ+yuer3B9GmH2t3SVQbBadWtMJZ5/5OFklJQKfPmqMdheTSJHr9VaVn2q +QFr81m6uIxEKc9I99EsVVHwMqjfWk0g9Ns2AJaMGwZ4xLwOxue7TTaIOqAG1 +12FC8i2JcrtdDz2pUoPtHxAQDfh+HsyJWZ++CU5dbb4l3YTrM7P5OMKgwccQ +0d2N70l03yH5KxVFgyA7+qJ6G4kuM/p6ef9HAxHrevlL2Ky/Q0fl22gg0+Gc +btlOItEXd7gcTNXhVnjg/5o+4PNDH1cvV9YA6aVQ5+EOEskqXYmOJzXBf1xD +MqCHRC8uzdJ+8GjBid80HQ6224xLO6GoBXwFVbWHe0mUWqNCM3HXAhXh/3ws ++kik5FX2fuGTFmTZzV9Q68frzeGoEu+2gF962ualARLJycoTCi46cC40Xp5v +gkSamSFCi0gXFgJV+a5wcRCDdXZOy1YXgryfnJHh5qAU5aRuDzddsLaZOJaB +vSI9v6A2XBeeaycklvNw0JfUEcekQl0QMfwyNc7LQXEpHndoynT4N0fUwXcV +Bw3EW29xXqkHemJz/xaJcdC9IBW7Z4360BY0yrymxkGtYcjgXKYRGFt6m6cc +4iBF9w+2R/x2QpOjkMabKxzEXi7OkzsJUGn26O2JdxwkNVrCL8Uwgd2Ju8ut +1w2gELpxZ5K6GZzq9b4u4DGAGN+X6sVHzEFjXxj9ceEAyjUJ5k9rsYC2wYyz +uWKDKGPWtyrnhiXs2aKxbBI6iBZ2SzfVRO+DBc20BYnhQdTFtWKqz9MG5tYd +iljJGkL+G45fjVHeD5k3HU+s7RlCeT71lTdj7cCAfDlWd2wYnZqRoTR8DsBy +6NP4psVhNGe152DdUXvYp+tW5ZE2goxcr+3mHHCAAt6H9FbLUfRe5o5vDd0R +/G/p2yVPjaL1D86+yNrsBNpRcRO/C8ZQSa+6ta3wQTAe/lgV6fcdybdPeoV9 +PwiR7o+Ro+Y4ot+8lnO/9xCk5sZcwhuI7vDObEl67QzvT5zaT/s0gYp3a3+J +LXUBAzfGOQfPSZRicEl0KfswPD+i33auYxK1fM08T09whU7nC9PRVlPomc1t +lYC/3UB4tsE1o34KTR1z4PJnHYHzG9Yn6ME0mttD8x43dYcPsYtN0cXTKOv7 +54XgbUfhV/LpDGuDGeR8L5N5RMgDKqz4SsXyZ1DRk31HV1zwAOsNMTdPas8i +I9n3P+J+eECtTp8Ab+YsUu71+vKfjyfYmzfJCkrMIXL1X/tv93uC+Wj7zrq4 +OdR62ZZp4cSAV96BsnJTc+hGeNrq0FYGBBE5sbku8+hFxfIPpiUTPp2PaYx7 +Po/WusEFehkT4mcu+G9cSSGFdXUtG14wwfOBdM5RfgrpNNpIr6xggviVfnqa +AIXsjV0fdVQxITV/SWHDagrd2BD27vRbJvCmivsIi1BofdfjtfUdTMgpnTve +JEMhFXepFDeKCaE7NjlXaVLIyGM8K1aPBckJIr+97Sj04NZksO02Fpyp447y +OkChdW3Tu6QMWZDVJWfHtqfQuDnVnrWDBUIXl4fdHSn8/+LibjRhAe9w4ril +M4XWUKIuYgdYsDmLKbR8lEJkov6qtGMsuDlerkX6U+hyeaRPyQMcZ/jxX7lE +oWO6yUbhWSxI+izHcIunkPWjwlWG2SxI9XqzipZAIcHkgUfPc1mQ6LQPVSZS +KDbIbqT4KQtaH8btGrhKoUiayl/PqlmQN095iyRTyDf5nd+TblyPTYdNZzqF +LNcMGAf1skDZtmo+6T6FNsdyCet+Y8HJ5tjBvRkUGgjSzy3ksMBQlv/uk0wK +edqmfS8YYwHbvdz7dBaFnPmC/fN/soCIIA0mcylkEbw+IEeSDUWFMY2WJRSq +TjtvlSTNBmmhx4/msY0bp1XC17MhfdOzrPRSvF+q7z6byrPhl33F6oUyCsl8 +ijD9qsoG7rZpj5SXFBrd3iUpqM+Gkg+8yvnVFLrCc/ellwMbbrfXDdMb8fq1 +hVJsnNjwU5G3qAb7nGt4EP0QG7xSN9xybKJQ+FO7TcuH2bDYsr88sBnXT3Bf ++4fBBtmhBod7rRSiNzBYbwLZwG9HK/7QTqFP11RXK19lQ1dfiWNSJ4XykLD3 +0DU2fAh+X/ob+9z32Zrc62xQ+XjRybeLQrqWNVGGyWzwX+ung7rx/nExp21S +2WDJFxbY00OhPcfvfg7PYYNYd6jQz28UkpO7uG1XHhtq+k+0uvRTaLbh+PUV +BWx4VZb9tgQ7XQ3ZXC5ig8yIjWsISaFfXV2V98vYQPy1+0cfh0JPrWWzmuvZ +EH5h85rkIQrF/+Thu9HABs3sNNkRbEbWiKdLIxu+SAocMR6mkAhvmSzZwoYO +EWZEN7ZfufOVHx/ZEGpsoSIzSiFl9X/CVDhsMKm8JOX9nUI/P51uGx5gwwvh +Vtc87NZYtk7+EBtMjWbfz2BH9emNGI3h+er/dYkcp9CXlLYj+2fYoCZZXHt2 +gkJJ/KLmp7gJGHQkxP2mKPRiuss1ZAUBQdMt8jnYg13ZQf58BCxmRdJGsY2f +mt1lrCLAv9bZmJjG580jfNFKlABfw50H7WZw/dbmYubiBJyV73G5iL3DQIyG +JAjYo7vL7RX2VeGcg3QZAqpN5t3UZ3G8rKdQVpEAT98861lsIjOnXkKZgM7N +KWYqc3j81ZM9a1UJsNv0brsD9gAhLsxLI6Bqb4di3p+4uIX3mA4B/yvY8vnQ +PIXKfotHD+gSMMXPVR2NzRnuvdmrR8BYVUnWA+ztladetxsScL3l6fEpbNIv +T/4lELDOpvjbKQrfd+cI/ecmBLwuTSv9F9vIdK91oRkB394pXC7Fvizz7WTm +XgLciTrtWewS3vyraVYEnPHqXFq7QKH+iYiHt6wJKFj2qlPHNqyV+JBoR4AT +/xvHI9iMwm+jF+wJ6Ne/KBWKnXg7n+eMIwElJzM/xWN/C7LUCXMmoK63fX8x +trC7pEXAYQJ+r/rK3/Ann2X/EV83As45Kr/s/PP9xtPx7h4EhEewNy5jlwha +pTszCDDPdGpc8wPnm5MstWcRoBYfEiaHLdzX32JNEKAhWCGngW3YWDCwx5sA +v71bqg2wGc9P/wJfAuaeVjFNsRPTrdbt8COgmz+Uxxa7JFFKQ9+fAEMT89RD +f/KHk7u1AwiQz9M28MAWYhU604IIeNy9tckL22B/1HHlEAJ4Ciw9/P/k377v +vFwY7odF6GQwdoKq9B2pcAL6xIpOh2MXi3CKRE8RMPKWWyASu2+xsGF1JAEv +/DyuRP3JPxjVxxdFwBOzZvG/sbe937ewHE0AkFY3//j/LGUY1w== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.64552351587925, 1.4984136420955707`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.6455235158792515}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11494,7 +11409,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.7504249066936067}, + AxesOrigin->{0, 0.6455235158792515}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11522,7 +11438,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.7504249066936051, 1.313047485013753}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.64552351587925, 1.4984136420955707`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11530,9 +11447,10 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913440619685707`*^9}, + CellChangeTimes->{3.9913440619685707`*^9, 3.994350597956603*^9, + 3.9943529834879217`*^9}, CellLabel-> - "Out[417]=",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] + "Out[164]=",ExpressionUUID->"81e549d6-8472-4452-8841-3e1dcb569aac"] }, Open ]], Cell[CellGroupData[{ @@ -11595,340 +11513,174 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501659425144`*^9},ExpressionUUID->"06bd0169-a5a6-404c-935d-\ -e1a61565f71e"], + CellChangeTimes->{3.9918501659425144`*^9}, + CellLabel-> + "In[165]:=",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7414575136308495`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.976831720351112`*^-266\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 418, - 441, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621885586`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 165, + 9, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350598537383*^9, + 3.994352984053948*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], +In[165]:=",ExpressionUUID->"5cbe2213-b0b7-482d-9e4f-3a9d7496e301"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.133412609607657`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.39196964206943`*^-277\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 418, 442, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621975574`*^9}, + 165, 10, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350598537383*^9, + 3.994352984065261*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], +In[165]:=",ExpressionUUID->"f01a1bf3-08a3-401b-ac60-f2bfd79e7557"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.599262146182568`*^-296\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.875838770674493`*^-288\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 418, 443, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991344062205559*^9}, + 2, 165, 11, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350598537383*^9, + 3.994352984073402*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], +In[165]:=",ExpressionUUID->"d2ed7c51-6d50-4f3c-b6d2-e4daa97ddf0e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 418, 444, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134406221356*^9}, +during this calculation.\"", 2, 165, 12, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994350598537383*^9, + 3.994352984083681*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], +In[165]:=",ExpressionUUID->"743348cf-c592-4bcc-8b1a-33f60fb0fb7d"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Ve8fAHChtCgjxMW51yiSsuf1+WRlS0j2TiqUJFFWhYiMZGQnDdK9 +p1KiEioraVgpKhpfIcou9Tu/v87r/Xqd5/Wc53k+4zl07+CdfpwcHBzEEg6O +/z9nBlqaZJLL9PMsst0yRg303xSKHtvWGwdGOdXHZ1zogOteeIv2ZsDLWINz +HS7KELbjeg9XbynQHBNsb7lsA/5xkYz5HhJG+L9eSHSxhcE66+CpngYIUVN8 +/tfZC0xkRt5P9ryCP65X3b7tPgTzPZpZEz2fYPAOzS93Ryw0Gl4pe1n6C+7W +rZi8NJwOtMGaL96Ki8CR2D3LxcwDoQMe13kMuVDYKkv0LncJZCib1Fo7LEeV +H85KZXNl0JeztX5yLS/quD8d2OJ0FZLLol9wrufHjwd4on0LK0Dk/NCZzAJB +XNJ2103frwpEN905NVcuiJ77h/57FFQFYg3x0W4sQRz1dOHVDa8CyQn5Ixsa +BdEwMXCdZHIVyFoe9Kz9Johl2UYrsllVoMq9qDGkKoQZft4xdgtVYBMqPKzS +KoSG/fNyPxJvQoK9mf6rmXV4pHnPNn0zFojd7hDjXCKMQ33JnXFWLKgStJ9V +XiWMxzekhjfasqD7lTsrXUoY7bXO8Ws7s0DGNpRhayqM4wV5rtP7WNBgVbSs +M1cYQy7nc5PJLFg0me54rieCE+3zztqtLEgrj6hYNBHBly7pLhwd1PhlHImb +bUWQrSO6v/ElCyyfrNyW4ieCmV60amYfC/IMiVuWqSLonxg0w/mNBVpokd02 +KII/npBzL7jZcFi7xKMlThStIi8KH9Zlg3kx35TFWVH0nvMZP6nPBgbP8cSO +LFFcmuRtl76NDZ1vdrFfXxXFNOvxppLtbFA6uJproIMaLzpjnGvHhm/lR8t/ +iq3HbBXpx5/2scFVyHpM/NZ6lFoX8nHwAhtUI2tjC+vWo4lkyf64XDas/LRR +mP50PZYSSafo+WyouckFcn3r8WARt49DCRuELWrStv5bj6nZKt2ZFdT8sTJq +xhZiWHfywZ39j9hg9GMhImhIDFcEVJ5PHGbDMdPzCo9HxfCBZrIK+YUNVSWb +3wrOiGG/DT2h9xsbRO09tWuWi6O/0V4H8TE2jN57MsulJI5cy8xTjk2zITMu +LTQ3XBwrjDvLcpaS0NwvLzMaK45DAb3tKTwk/FFrfK2fLI4fr/XfjF5Bwp6v +0yrDBeK4wLfsqhMvCTqWLpNKjeJ491ZswBchEj6tkwtq4qVhtvlIuI80CSLB +jyRERGgIvQlhMrIkWDbvfh5A0FA2fbfaJzkSqiOSFdeo0pDDn/OnnQIJSYMT +I067abh26Fb0WmUSVK7V+v8opWHE1mPa40wSYvVsvcS0JNB56d9FfQcSTN0L +f2oaSCCP3QxX9S4S+GK+n3SwlMCUeGsT+d0k5DeeLk/zlMBDnolx3C4k3DO/ +/33ZGQl8mmY+kuJJwsRu6bBffRL4Ttyce2wfCXcjDvLwD0vg70Z58Y0HSIjK +f5CjNC6BrfP54R6BJKz+4FgbwCmJ3r+mVjQGk7DB/yzHBwVJ9Lx4I9ctlAT3 +I9NJ7ZGSuHP31lUfj5Mgm21AGzktiQO4YfDDCZLa/3M3eNIkkcdt3dL3USRE +/JHvNCiTxMiqXrPWGBKyTrqvq2mXRHmaSXv4KRJcL1eUd3dLYupvLWOX0yQw +ns1pTn2gfMVQWCeeBNbKTOct05IoqPq0cTSBhPb0Z0WXJaRQ5MQzb7lkEjJv +CSk3bpBCdbhHfqfs3OXV8EFZCvcck/e6cZaEb6J/hsVNpDDnSfc72VQSuIq3 +KmQESeEa1/w939NIaH18ovZmuBReqmt+nJlOQtpQq+XzOCl0m5aJ08ogQXKD +X/DybCmcsulTP5pJxUNV7u2oR1IoXO4b25JFglFPx+J4sxQuFmoPWVwgwZqD +e7vHKymU/a9gQxtln51BffBZCodezDrXZ5MQFHmJwRqXwlc0LwuNHBLCy3r3 +E3NSeE1sG/0aZZNIenTMUgKX73CIOZ1LQtuauktaKwkcvcC16gflHWW7mif4 +CAytpEU55JHg8jyZ30uUwGn+s8T6iyQclJq5tG0TgUecjuyPzCdh+lZa8/wW +AuulkqzbKUeYbhpjqxGofEWEECsg4fQhTw2GPoF2t8n0Ssorl/12fmtA4Hsu +K9VJyml5WdEZ2wlUvHLsqUohCXmNrc2ctgSqf6toqqQstdtv7L4DgVcPGCl/ +plw2+o//sDOB5vxZGWJFJCjE5mls8iDQVCngP0vKN9epuwz5ENj17qzGccpq +119EX9xLYPJMe8RVyvf195XZBRI4JzRb/ZIyvOZuWRVCIF963/dZyk3+RWON +YQTmxBmKiReTYPZHW+B4JIE1j7gNdSl3pL3RUIsh0P3d2J7dlO1lg11GTxF4 +X74zPoRyX82KmLIzBFbfOXHpDGV367Iy11QCD5m3PCigPPxJv0Uok0BWYHx3 +FeWAo31j7dkEunieGa+jPL4qVOB0PoFfJa4sa6Z8uJhPk1lC4AeXO1KdlOfU +rrlMX6bWeyZJp4tyVIthzI3rBEp1LDr2UOZyHyjzu0ngy5Vfw7spJ/4Mb5G4 +TeDNHsnCV5T5EgTHu+4R6HwqqrmNcqZ4lUDqAwJNRD7MPaYsyjLVNGkgUM5K +cusdygVGQy5/nxLolyMUfJkyo+9ETHUbgdlEUXUG5auBopeDOgkcf5zHc4Ly +Zs5bLXJdBJKrP3v7UiYvWI0P9BFYaeTaYkpZa9M3gewBAq94DuoqUH7wKE7T +ZojA3hXWtcspG9hLuPJ8I9D2YqLpMHUez77djXk0SmAM/eBwHWXLEzsvH50k +MN/py7kMyo7lCeNfFwj8abRivTrldzoMweJ/1Psfj88toez9ok5zNzcdk5bw +fm+j4ufA3GRMMy8dH9BEeR0p6xzaI/xFgI7BXHu7BSgvH3lbwSVKx4uLYmpt +VHxe7m/s1mfQMe2+KVuZcqi91gHXDXR0Flj3epCKd4PnlUsiFOn48fLXlCTK +Aw+zFO9o0DG01vJ1F5UvlZorG17p0jGH0PIMoxzBinKcQDouj+9PEqQsXOof +t8mCjq7cyx4aUvlmc1q7t8SDjoU1zAeRVL5K/r0R+MiXjktqNJyWUB4NY3C9 +D6CjG4Tln6TyPXHvKiXRUDoGfCiWiKLqQb3F+5OpiXRM/FOnaHGehNQm2/WV +KXRcmvtHppqqL67Mp1UtGXT0UTTrkKA8r3Szj7uAjhHX/2gNUfVJRSB2SySb +jooaZekm50jgSJ5uyqmmY+czmno2Vd86uPY5V9fSUXe6MHM4hYT90ztPTz6h +Y5BSR/wRqh6W9cr0+7+lo860f8DBM9T6iprj7bkYmDN0Tb8tjop/ESYtZDkD +uQ1WK36LpeIjjc0+x8tATyPe/5ZQtonLe9cqwkDXvk09m6Kp9fkdUNmmyEDv +7a1XnSKp7920dmCzAwOT34ZbSB4mYaZALFbVmYFOgVPfeUNImFojK6PtwcDJ +ha2pCwepfPqlvc8ogIGNtfzvW4Oo/lrrM+N8goFuwdnN26l+1Wpxly/xMjVf +++L8LaqfPXvwmJ1ynYG7aJt3hnpQ9WBLu33mTQaeb1ioV3Yn4aHgx7zCGgZe +sX749RLVD8n+lRvuPGcg/7BMtB/VP/P2u8OnaQYqcDgu8bAgIfv93k9fFxh4 +dfa2z6QZCedtDp8e+8dA468KP2NMqfNRTWybWyGNltovc7KNSYj7zXZcIymN ++0NMVS8Btb/JSw/qmUhjmjCrU02VBL2KyuILF6RxiYerv4UoCf1ERZHxRWl8 +PaRbWCZMxdeFa4VTRdIoYKEY/5u6T9yNLc/feU0aNXwHA0v5qfPdXZzDVyeN +m/f9q3uzkgT5pefT4j9K4+35J+7tf6j7k0dkTJiiDAbqWH5ZM8iGSQFzz10N +Mjg2E1qhUMCG3gOMzn3PZNCHs2mwJY8N9U8XILpdBnOyX1TvyWFDWkSF1NVu +GVQ75GqXm8mGrZ9WD86PyOCFGVrIpzNsCGK/cCsQlMX1shcvLw1jw4iNg8uw +rywO3SgezbNkw/BZz10hPHI41xA54vSLBWY/jpp91tiAhYNreJhaLBj1WX74 +dvRGzOLm7+W8VkX9P4hwJjTIo8Jgt3pJYyUIPJdLZf1QwO73W2aNvl4HWuLN +HRoaiviZ1nt+5PVVyNmkvVbQfzNGKql8nRooh1axbeq/0pWwtMjqzuhMGejQ +GtK2dG/B10IPN3lMlAIfV2moV9xW3Jc67nieVgKSsVJ6TnLKSHhqdEkcKoQV +sq7VO58po5JypMHtyTxQYq6/edRNBdPyX7eu/5wNIQMCjeYcqvi8/7rM767z +8OPXWQezHFVMs62Wd9PKgO1bnuaZbVbD5nXpLg2N5+DhL93fsx1quHCgt318 +azIEKaq8femnjsMOUfZ/PBOAOe77xmmFBgqelnTkvncSjGVErXhLNXDl5nT2 +n7sxsDEmKbxBUxPPTARtkzE9Dgp+2o9k32riTJzL0obgo+D3cO+p24e00PzK +RmPZlMPwqPiN7+Q6bYw7G8HkGQuGqav/Zrfc1cbq93y5v/4GwJddJsVnarSx +kjUQ8mAkAHq5U0yHarXxd8nBh+e7A6DWUyz3Qr02DjU6nNtfFQBxouo6iy3a +eHr4o2ONewCsTdx3vPWdNqp0Fia8eLwXFP27OPw4ddDgTVh/dbo/+MhWrMiz +0kEb7zaJ37v8IOKJ+z65HToo0LW56biRH6T5CbSRO3Xw3Tpfw9UqflB3+djZ +NkcdTKnKqrDn9QMhOdM1i146WMhxXT+pyReeyn0W8gzTQdH/Yhxi1X1BYaMU +IVekg23lXcv86T4wqZCpQU7o4Ln3c48dpbygtx2NBX/poL3SqJkQvxfUB43b +hU7roBzXhFI/pxekkmaHNBZ0cItK/2zCF09Q0OGovM+li03v8vpdqzzB2yyQ +3iisi7ymM2Xj4Alv/LevfqOni/PTWnz8Xe5wr+z3x+lEXbS3GjxceM8FNAxD +Z82TdVHQr93Os8QF7nwcXV2coovZOpy7VJNcgJQc0DTP0MV7S5uyV7u6QGVO +fUrhRV38uHJyPInDBYrPntbeXqWLHj/8Rm9YOsOZ0DXpOa918Xax/TKTyd3g +bCSNupJ6eOtxfE1mwC5YfLOcr5HQQzPTqKZK+11Q7Dfeby6th9YBrQI9sAu+ +xNccdd6oh6axzWYewrsgpMXm5jEVPRxQi+zSa3KAJOvjkvdM9JAm0yPCkHaA ++7u7/qgF6yF37AMxozE7EA9MqFGq18Mes6zyYJYtpP7bo57coIdZ/hWLxcW2 +wJlhwv7apIcBO26PDaTZwkj10mvFLXro7FsQFnPIFu5znMoReK2HO3/d0ndS +tQXn8zFHZz7rIVkqb+VcswNyao+pP1zFxCcnrXrq821g3coDbCtHJvpUXjpy +RN0SygxPREw4MXF1fcj9MlFLUDmRapjpysRl83v3jv+2AOsJVlevFxOlNV9W +djZYQHz39LzPASbShI5nddhawFxptEFELBOdlPL+FoSaw1vdzNflFUwMf3oy +6m+7Kew9UpZvVsXE2H/nSu1umcJM1R2/URYTh6WLb9bnmoIAo3dWuZqJgR1/ +ND/tMQWL5RK0B/VMlH9eNIKcplD3ptz3dRcT2y7Umrgyt4M5373NYb1MlI0q +Ftwgux16t7fMiPYzsTGz7uJy3u0wdf97ovsHJs44NmeueW8Cm0u23vhvhIlv +Vi+jb4oygbq328LOjjHRRkH+ybU9JmAuZAdbJpjovFEgQ9/GBPYkHHkZOs1E +Y7t3btcJE5iqj88TmWNi0b8bWrErTCBuIdvn/gIT5+LkpgJ/GsNatWuKbotM +ZBu4RB3sN4bCwPvT//4xcYtx4JPEJmP4H40ZNOk= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -11942,299 +11694,125 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13c8Ve8fAHChtCgjxMW51yiSsuf1+WRlS0j2TiqUJFFWhYiMZGQnDdK9 +p1KiEioraVgpKhpfIcou9Tu/v87r/Xqd5/Wc53k+4zl07+CdfpwcHBzEEg6O +/z9nBlqaZJLL9PMsst0yRg303xSKHtvWGwdGOdXHZ1zogOteeIv2ZsDLWINz +HS7KELbjeg9XbynQHBNsb7lsA/5xkYz5HhJG+L9eSHSxhcE66+CpngYIUVN8 +/tfZC0xkRt5P9ryCP65X3b7tPgTzPZpZEz2fYPAOzS93Ryw0Gl4pe1n6C+7W +rZi8NJwOtMGaL96Ki8CR2D3LxcwDoQMe13kMuVDYKkv0LncJZCib1Fo7LEeV +H85KZXNl0JeztX5yLS/quD8d2OJ0FZLLol9wrufHjwd4on0LK0Dk/NCZzAJB +XNJ2103frwpEN905NVcuiJ77h/57FFQFYg3x0W4sQRz1dOHVDa8CyQn5Ixsa +BdEwMXCdZHIVyFoe9Kz9Johl2UYrsllVoMq9qDGkKoQZft4xdgtVYBMqPKzS +KoSG/fNyPxJvQoK9mf6rmXV4pHnPNn0zFojd7hDjXCKMQ33JnXFWLKgStJ9V +XiWMxzekhjfasqD7lTsrXUoY7bXO8Ws7s0DGNpRhayqM4wV5rtP7WNBgVbSs +M1cYQy7nc5PJLFg0me54rieCE+3zztqtLEgrj6hYNBHBly7pLhwd1PhlHImb +bUWQrSO6v/ElCyyfrNyW4ieCmV60amYfC/IMiVuWqSLonxg0w/mNBVpokd02 +KII/npBzL7jZcFi7xKMlThStIi8KH9Zlg3kx35TFWVH0nvMZP6nPBgbP8cSO +LFFcmuRtl76NDZ1vdrFfXxXFNOvxppLtbFA6uJproIMaLzpjnGvHhm/lR8t/ +iq3HbBXpx5/2scFVyHpM/NZ6lFoX8nHwAhtUI2tjC+vWo4lkyf64XDas/LRR +mP50PZYSSafo+WyouckFcn3r8WARt49DCRuELWrStv5bj6nZKt2ZFdT8sTJq +xhZiWHfywZ39j9hg9GMhImhIDFcEVJ5PHGbDMdPzCo9HxfCBZrIK+YUNVSWb +3wrOiGG/DT2h9xsbRO09tWuWi6O/0V4H8TE2jN57MsulJI5cy8xTjk2zITMu +LTQ3XBwrjDvLcpaS0NwvLzMaK45DAb3tKTwk/FFrfK2fLI4fr/XfjF5Bwp6v +0yrDBeK4wLfsqhMvCTqWLpNKjeJ491ZswBchEj6tkwtq4qVhtvlIuI80CSLB +jyRERGgIvQlhMrIkWDbvfh5A0FA2fbfaJzkSqiOSFdeo0pDDn/OnnQIJSYMT +I067abh26Fb0WmUSVK7V+v8opWHE1mPa40wSYvVsvcS0JNB56d9FfQcSTN0L +f2oaSCCP3QxX9S4S+GK+n3SwlMCUeGsT+d0k5DeeLk/zlMBDnolx3C4k3DO/ +/33ZGQl8mmY+kuJJwsRu6bBffRL4Ttyce2wfCXcjDvLwD0vg70Z58Y0HSIjK +f5CjNC6BrfP54R6BJKz+4FgbwCmJ3r+mVjQGk7DB/yzHBwVJ9Lx4I9ctlAT3 +I9NJ7ZGSuHP31lUfj5Mgm21AGzktiQO4YfDDCZLa/3M3eNIkkcdt3dL3USRE +/JHvNCiTxMiqXrPWGBKyTrqvq2mXRHmaSXv4KRJcL1eUd3dLYupvLWOX0yQw +ns1pTn2gfMVQWCeeBNbKTOct05IoqPq0cTSBhPb0Z0WXJaRQ5MQzb7lkEjJv +CSk3bpBCdbhHfqfs3OXV8EFZCvcck/e6cZaEb6J/hsVNpDDnSfc72VQSuIq3 +KmQESeEa1/w939NIaH18ovZmuBReqmt+nJlOQtpQq+XzOCl0m5aJ08ogQXKD +X/DybCmcsulTP5pJxUNV7u2oR1IoXO4b25JFglFPx+J4sxQuFmoPWVwgwZqD +e7vHKymU/a9gQxtln51BffBZCodezDrXZ5MQFHmJwRqXwlc0LwuNHBLCy3r3 +E3NSeE1sG/0aZZNIenTMUgKX73CIOZ1LQtuauktaKwkcvcC16gflHWW7mif4 +CAytpEU55JHg8jyZ30uUwGn+s8T6iyQclJq5tG0TgUecjuyPzCdh+lZa8/wW +AuulkqzbKUeYbhpjqxGofEWEECsg4fQhTw2GPoF2t8n0Ssorl/12fmtA4Hsu +K9VJyml5WdEZ2wlUvHLsqUohCXmNrc2ctgSqf6toqqQstdtv7L4DgVcPGCl/ +plw2+o//sDOB5vxZGWJFJCjE5mls8iDQVCngP0vKN9epuwz5ENj17qzGccpq +119EX9xLYPJMe8RVyvf195XZBRI4JzRb/ZIyvOZuWRVCIF963/dZyk3+RWON +YQTmxBmKiReTYPZHW+B4JIE1j7gNdSl3pL3RUIsh0P3d2J7dlO1lg11GTxF4 +X74zPoRyX82KmLIzBFbfOXHpDGV367Iy11QCD5m3PCigPPxJv0Uok0BWYHx3 +FeWAo31j7dkEunieGa+jPL4qVOB0PoFfJa4sa6Z8uJhPk1lC4AeXO1KdlOfU +rrlMX6bWeyZJp4tyVIthzI3rBEp1LDr2UOZyHyjzu0ngy5Vfw7spJ/4Mb5G4 +TeDNHsnCV5T5EgTHu+4R6HwqqrmNcqZ4lUDqAwJNRD7MPaYsyjLVNGkgUM5K +cusdygVGQy5/nxLolyMUfJkyo+9ETHUbgdlEUXUG5auBopeDOgkcf5zHc4Ly +Zs5bLXJdBJKrP3v7UiYvWI0P9BFYaeTaYkpZa9M3gewBAq94DuoqUH7wKE7T +ZojA3hXWtcspG9hLuPJ8I9D2YqLpMHUez77djXk0SmAM/eBwHWXLEzsvH50k +MN/py7kMyo7lCeNfFwj8abRivTrldzoMweJ/1Psfj88toez9ok5zNzcdk5bw +fm+j4ufA3GRMMy8dH9BEeR0p6xzaI/xFgI7BXHu7BSgvH3lbwSVKx4uLYmpt +VHxe7m/s1mfQMe2+KVuZcqi91gHXDXR0Flj3epCKd4PnlUsiFOn48fLXlCTK +Aw+zFO9o0DG01vJ1F5UvlZorG17p0jGH0PIMoxzBinKcQDouj+9PEqQsXOof +t8mCjq7cyx4aUvlmc1q7t8SDjoU1zAeRVL5K/r0R+MiXjktqNJyWUB4NY3C9 +D6CjG4Tln6TyPXHvKiXRUDoGfCiWiKLqQb3F+5OpiXRM/FOnaHGehNQm2/WV +KXRcmvtHppqqL67Mp1UtGXT0UTTrkKA8r3Szj7uAjhHX/2gNUfVJRSB2SySb +jooaZekm50jgSJ5uyqmmY+czmno2Vd86uPY5V9fSUXe6MHM4hYT90ztPTz6h +Y5BSR/wRqh6W9cr0+7+lo860f8DBM9T6iprj7bkYmDN0Tb8tjop/ESYtZDkD +uQ1WK36LpeIjjc0+x8tATyPe/5ZQtonLe9cqwkDXvk09m6Kp9fkdUNmmyEDv +7a1XnSKp7920dmCzAwOT34ZbSB4mYaZALFbVmYFOgVPfeUNImFojK6PtwcDJ +ha2pCwepfPqlvc8ogIGNtfzvW4Oo/lrrM+N8goFuwdnN26l+1Wpxly/xMjVf +++L8LaqfPXvwmJ1ynYG7aJt3hnpQ9WBLu33mTQaeb1ioV3Yn4aHgx7zCGgZe +sX749RLVD8n+lRvuPGcg/7BMtB/VP/P2u8OnaQYqcDgu8bAgIfv93k9fFxh4 +dfa2z6QZCedtDp8e+8dA468KP2NMqfNRTWybWyGNltovc7KNSYj7zXZcIymN ++0NMVS8Btb/JSw/qmUhjmjCrU02VBL2KyuILF6RxiYerv4UoCf1ERZHxRWl8 +PaRbWCZMxdeFa4VTRdIoYKEY/5u6T9yNLc/feU0aNXwHA0v5qfPdXZzDVyeN +m/f9q3uzkgT5pefT4j9K4+35J+7tf6j7k0dkTJiiDAbqWH5ZM8iGSQFzz10N +Mjg2E1qhUMCG3gOMzn3PZNCHs2mwJY8N9U8XILpdBnOyX1TvyWFDWkSF1NVu +GVQ75GqXm8mGrZ9WD86PyOCFGVrIpzNsCGK/cCsQlMX1shcvLw1jw4iNg8uw +rywO3SgezbNkw/BZz10hPHI41xA54vSLBWY/jpp91tiAhYNreJhaLBj1WX74 +dvRGzOLm7+W8VkX9P4hwJjTIo8Jgt3pJYyUIPJdLZf1QwO73W2aNvl4HWuLN +HRoaiviZ1nt+5PVVyNmkvVbQfzNGKql8nRooh1axbeq/0pWwtMjqzuhMGejQ +GtK2dG/B10IPN3lMlAIfV2moV9xW3Jc67nieVgKSsVJ6TnLKSHhqdEkcKoQV +sq7VO58po5JypMHtyTxQYq6/edRNBdPyX7eu/5wNIQMCjeYcqvi8/7rM767z +8OPXWQezHFVMs62Wd9PKgO1bnuaZbVbD5nXpLg2N5+DhL93fsx1quHCgt318 +azIEKaq8femnjsMOUfZ/PBOAOe77xmmFBgqelnTkvncSjGVErXhLNXDl5nT2 +n7sxsDEmKbxBUxPPTARtkzE9Dgp+2o9k32riTJzL0obgo+D3cO+p24e00PzK +RmPZlMPwqPiN7+Q6bYw7G8HkGQuGqav/Zrfc1cbq93y5v/4GwJddJsVnarSx +kjUQ8mAkAHq5U0yHarXxd8nBh+e7A6DWUyz3Qr02DjU6nNtfFQBxouo6iy3a +eHr4o2ONewCsTdx3vPWdNqp0Fia8eLwXFP27OPw4ddDgTVh/dbo/+MhWrMiz +0kEb7zaJ37v8IOKJ+z65HToo0LW56biRH6T5CbSRO3Xw3Tpfw9UqflB3+djZ +NkcdTKnKqrDn9QMhOdM1i146WMhxXT+pyReeyn0W8gzTQdH/Yhxi1X1BYaMU +IVekg23lXcv86T4wqZCpQU7o4Ln3c48dpbygtx2NBX/poL3SqJkQvxfUB43b +hU7roBzXhFI/pxekkmaHNBZ0cItK/2zCF09Q0OGovM+li03v8vpdqzzB2yyQ +3iisi7ymM2Xj4Alv/LevfqOni/PTWnz8Xe5wr+z3x+lEXbS3GjxceM8FNAxD +Z82TdVHQr93Os8QF7nwcXV2coovZOpy7VJNcgJQc0DTP0MV7S5uyV7u6QGVO +fUrhRV38uHJyPInDBYrPntbeXqWLHj/8Rm9YOsOZ0DXpOa918Xax/TKTyd3g +bCSNupJ6eOtxfE1mwC5YfLOcr5HQQzPTqKZK+11Q7Dfeby6th9YBrQI9sAu+ +xNccdd6oh6axzWYewrsgpMXm5jEVPRxQi+zSa3KAJOvjkvdM9JAm0yPCkHaA ++7u7/qgF6yF37AMxozE7EA9MqFGq18Mes6zyYJYtpP7bo57coIdZ/hWLxcW2 +wJlhwv7apIcBO26PDaTZwkj10mvFLXro7FsQFnPIFu5znMoReK2HO3/d0ndS +tQXn8zFHZz7rIVkqb+VcswNyao+pP1zFxCcnrXrq821g3coDbCtHJvpUXjpy +RN0SygxPREw4MXF1fcj9MlFLUDmRapjpysRl83v3jv+2AOsJVlevFxOlNV9W +djZYQHz39LzPASbShI5nddhawFxptEFELBOdlPL+FoSaw1vdzNflFUwMf3oy +6m+7Kew9UpZvVsXE2H/nSu1umcJM1R2/URYTh6WLb9bnmoIAo3dWuZqJgR1/ +ND/tMQWL5RK0B/VMlH9eNIKcplD3ptz3dRcT2y7Umrgyt4M5373NYb1MlI0q +Ftwgux16t7fMiPYzsTGz7uJy3u0wdf97ovsHJs44NmeueW8Cm0u23vhvhIlv +Vi+jb4oygbq328LOjjHRRkH+ybU9JmAuZAdbJpjovFEgQ9/GBPYkHHkZOs1E +Y7t3btcJE5iqj88TmWNi0b8bWrErTCBuIdvn/gIT5+LkpgJ/GsNatWuKbotM +ZBu4RB3sN4bCwPvT//4xcYtx4JPEJmP4H40ZNOk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.07276674173572716}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12246,19 +11824,19 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.07276674173572716}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12272,298 +11850,124 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13c8Ve8fAHChtCgjxMW51yiSsuf1+WRlS0j2TiqUJFFWhYiMZGQnDdK9 +p1KiEioraVgpKhpfIcou9Tu/v87r/Xqd5/Wc53k+4zl07+CdfpwcHBzEEg6O +/z9nBlqaZJLL9PMsst0yRg303xSKHtvWGwdGOdXHZ1zogOteeIv2ZsDLWINz +HS7KELbjeg9XbynQHBNsb7lsA/5xkYz5HhJG+L9eSHSxhcE66+CpngYIUVN8 +/tfZC0xkRt5P9ryCP65X3b7tPgTzPZpZEz2fYPAOzS93Ryw0Gl4pe1n6C+7W +rZi8NJwOtMGaL96Ki8CR2D3LxcwDoQMe13kMuVDYKkv0LncJZCib1Fo7LEeV +H85KZXNl0JeztX5yLS/quD8d2OJ0FZLLol9wrufHjwd4on0LK0Dk/NCZzAJB +XNJ2103frwpEN905NVcuiJ77h/57FFQFYg3x0W4sQRz1dOHVDa8CyQn5Ixsa +BdEwMXCdZHIVyFoe9Kz9Johl2UYrsllVoMq9qDGkKoQZft4xdgtVYBMqPKzS +KoSG/fNyPxJvQoK9mf6rmXV4pHnPNn0zFojd7hDjXCKMQ33JnXFWLKgStJ9V +XiWMxzekhjfasqD7lTsrXUoY7bXO8Ws7s0DGNpRhayqM4wV5rtP7WNBgVbSs +M1cYQy7nc5PJLFg0me54rieCE+3zztqtLEgrj6hYNBHBly7pLhwd1PhlHImb +bUWQrSO6v/ElCyyfrNyW4ieCmV60amYfC/IMiVuWqSLonxg0w/mNBVpokd02 +KII/npBzL7jZcFi7xKMlThStIi8KH9Zlg3kx35TFWVH0nvMZP6nPBgbP8cSO +LFFcmuRtl76NDZ1vdrFfXxXFNOvxppLtbFA6uJproIMaLzpjnGvHhm/lR8t/ +iq3HbBXpx5/2scFVyHpM/NZ6lFoX8nHwAhtUI2tjC+vWo4lkyf64XDas/LRR +mP50PZYSSafo+WyouckFcn3r8WARt49DCRuELWrStv5bj6nZKt2ZFdT8sTJq +xhZiWHfywZ39j9hg9GMhImhIDFcEVJ5PHGbDMdPzCo9HxfCBZrIK+YUNVSWb +3wrOiGG/DT2h9xsbRO09tWuWi6O/0V4H8TE2jN57MsulJI5cy8xTjk2zITMu +LTQ3XBwrjDvLcpaS0NwvLzMaK45DAb3tKTwk/FFrfK2fLI4fr/XfjF5Bwp6v +0yrDBeK4wLfsqhMvCTqWLpNKjeJ491ZswBchEj6tkwtq4qVhtvlIuI80CSLB +jyRERGgIvQlhMrIkWDbvfh5A0FA2fbfaJzkSqiOSFdeo0pDDn/OnnQIJSYMT +I067abh26Fb0WmUSVK7V+v8opWHE1mPa40wSYvVsvcS0JNB56d9FfQcSTN0L +f2oaSCCP3QxX9S4S+GK+n3SwlMCUeGsT+d0k5DeeLk/zlMBDnolx3C4k3DO/ +/33ZGQl8mmY+kuJJwsRu6bBffRL4Ttyce2wfCXcjDvLwD0vg70Z58Y0HSIjK +f5CjNC6BrfP54R6BJKz+4FgbwCmJ3r+mVjQGk7DB/yzHBwVJ9Lx4I9ctlAT3 +I9NJ7ZGSuHP31lUfj5Mgm21AGzktiQO4YfDDCZLa/3M3eNIkkcdt3dL3USRE +/JHvNCiTxMiqXrPWGBKyTrqvq2mXRHmaSXv4KRJcL1eUd3dLYupvLWOX0yQw +ns1pTn2gfMVQWCeeBNbKTOct05IoqPq0cTSBhPb0Z0WXJaRQ5MQzb7lkEjJv +CSk3bpBCdbhHfqfs3OXV8EFZCvcck/e6cZaEb6J/hsVNpDDnSfc72VQSuIq3 +KmQESeEa1/w939NIaH18ovZmuBReqmt+nJlOQtpQq+XzOCl0m5aJ08ogQXKD +X/DybCmcsulTP5pJxUNV7u2oR1IoXO4b25JFglFPx+J4sxQuFmoPWVwgwZqD +e7vHKymU/a9gQxtln51BffBZCodezDrXZ5MQFHmJwRqXwlc0LwuNHBLCy3r3 +E3NSeE1sG/0aZZNIenTMUgKX73CIOZ1LQtuauktaKwkcvcC16gflHWW7mif4 +CAytpEU55JHg8jyZ30uUwGn+s8T6iyQclJq5tG0TgUecjuyPzCdh+lZa8/wW +AuulkqzbKUeYbhpjqxGofEWEECsg4fQhTw2GPoF2t8n0Ssorl/12fmtA4Hsu +K9VJyml5WdEZ2wlUvHLsqUohCXmNrc2ctgSqf6toqqQstdtv7L4DgVcPGCl/ +plw2+o//sDOB5vxZGWJFJCjE5mls8iDQVCngP0vKN9epuwz5ENj17qzGccpq +119EX9xLYPJMe8RVyvf195XZBRI4JzRb/ZIyvOZuWRVCIF963/dZyk3+RWON +YQTmxBmKiReTYPZHW+B4JIE1j7gNdSl3pL3RUIsh0P3d2J7dlO1lg11GTxF4 +X74zPoRyX82KmLIzBFbfOXHpDGV367Iy11QCD5m3PCigPPxJv0Uok0BWYHx3 +FeWAo31j7dkEunieGa+jPL4qVOB0PoFfJa4sa6Z8uJhPk1lC4AeXO1KdlOfU +rrlMX6bWeyZJp4tyVIthzI3rBEp1LDr2UOZyHyjzu0ngy5Vfw7spJ/4Mb5G4 +TeDNHsnCV5T5EgTHu+4R6HwqqrmNcqZ4lUDqAwJNRD7MPaYsyjLVNGkgUM5K +cusdygVGQy5/nxLolyMUfJkyo+9ETHUbgdlEUXUG5auBopeDOgkcf5zHc4Ly +Zs5bLXJdBJKrP3v7UiYvWI0P9BFYaeTaYkpZa9M3gewBAq94DuoqUH7wKE7T +ZojA3hXWtcspG9hLuPJ8I9D2YqLpMHUez77djXk0SmAM/eBwHWXLEzsvH50k +MN/py7kMyo7lCeNfFwj8abRivTrldzoMweJ/1Psfj88toez9ok5zNzcdk5bw +fm+j4ufA3GRMMy8dH9BEeR0p6xzaI/xFgI7BXHu7BSgvH3lbwSVKx4uLYmpt +VHxe7m/s1mfQMe2+KVuZcqi91gHXDXR0Flj3epCKd4PnlUsiFOn48fLXlCTK +Aw+zFO9o0DG01vJ1F5UvlZorG17p0jGH0PIMoxzBinKcQDouj+9PEqQsXOof +t8mCjq7cyx4aUvlmc1q7t8SDjoU1zAeRVL5K/r0R+MiXjktqNJyWUB4NY3C9 +D6CjG4Tln6TyPXHvKiXRUDoGfCiWiKLqQb3F+5OpiXRM/FOnaHGehNQm2/WV +KXRcmvtHppqqL67Mp1UtGXT0UTTrkKA8r3Szj7uAjhHX/2gNUfVJRSB2SySb +jooaZekm50jgSJ5uyqmmY+czmno2Vd86uPY5V9fSUXe6MHM4hYT90ztPTz6h +Y5BSR/wRqh6W9cr0+7+lo860f8DBM9T6iprj7bkYmDN0Tb8tjop/ESYtZDkD +uQ1WK36LpeIjjc0+x8tATyPe/5ZQtonLe9cqwkDXvk09m6Kp9fkdUNmmyEDv +7a1XnSKp7920dmCzAwOT34ZbSB4mYaZALFbVmYFOgVPfeUNImFojK6PtwcDJ +ha2pCwepfPqlvc8ogIGNtfzvW4Oo/lrrM+N8goFuwdnN26l+1Wpxly/xMjVf +++L8LaqfPXvwmJ1ynYG7aJt3hnpQ9WBLu33mTQaeb1ioV3Yn4aHgx7zCGgZe +sX749RLVD8n+lRvuPGcg/7BMtB/VP/P2u8OnaQYqcDgu8bAgIfv93k9fFxh4 +dfa2z6QZCedtDp8e+8dA468KP2NMqfNRTWybWyGNltovc7KNSYj7zXZcIymN ++0NMVS8Btb/JSw/qmUhjmjCrU02VBL2KyuILF6RxiYerv4UoCf1ERZHxRWl8 +PaRbWCZMxdeFa4VTRdIoYKEY/5u6T9yNLc/feU0aNXwHA0v5qfPdXZzDVyeN +m/f9q3uzkgT5pefT4j9K4+35J+7tf6j7k0dkTJiiDAbqWH5ZM8iGSQFzz10N +Mjg2E1qhUMCG3gOMzn3PZNCHs2mwJY8N9U8XILpdBnOyX1TvyWFDWkSF1NVu +GVQ75GqXm8mGrZ9WD86PyOCFGVrIpzNsCGK/cCsQlMX1shcvLw1jw4iNg8uw +rywO3SgezbNkw/BZz10hPHI41xA54vSLBWY/jpp91tiAhYNreJhaLBj1WX74 +dvRGzOLm7+W8VkX9P4hwJjTIo8Jgt3pJYyUIPJdLZf1QwO73W2aNvl4HWuLN +HRoaiviZ1nt+5PVVyNmkvVbQfzNGKql8nRooh1axbeq/0pWwtMjqzuhMGejQ +GtK2dG/B10IPN3lMlAIfV2moV9xW3Jc67nieVgKSsVJ6TnLKSHhqdEkcKoQV +sq7VO58po5JypMHtyTxQYq6/edRNBdPyX7eu/5wNIQMCjeYcqvi8/7rM767z +8OPXWQezHFVMs62Wd9PKgO1bnuaZbVbD5nXpLg2N5+DhL93fsx1quHCgt318 +azIEKaq8femnjsMOUfZ/PBOAOe77xmmFBgqelnTkvncSjGVErXhLNXDl5nT2 +n7sxsDEmKbxBUxPPTARtkzE9Dgp+2o9k32riTJzL0obgo+D3cO+p24e00PzK +RmPZlMPwqPiN7+Q6bYw7G8HkGQuGqav/Zrfc1cbq93y5v/4GwJddJsVnarSx +kjUQ8mAkAHq5U0yHarXxd8nBh+e7A6DWUyz3Qr02DjU6nNtfFQBxouo6iy3a +eHr4o2ONewCsTdx3vPWdNqp0Fia8eLwXFP27OPw4ddDgTVh/dbo/+MhWrMiz +0kEb7zaJ37v8IOKJ+z65HToo0LW56biRH6T5CbSRO3Xw3Tpfw9UqflB3+djZ +NkcdTKnKqrDn9QMhOdM1i146WMhxXT+pyReeyn0W8gzTQdH/Yhxi1X1BYaMU +IVekg23lXcv86T4wqZCpQU7o4Ln3c48dpbygtx2NBX/poL3SqJkQvxfUB43b +hU7roBzXhFI/pxekkmaHNBZ0cItK/2zCF09Q0OGovM+li03v8vpdqzzB2yyQ +3iisi7ymM2Xj4Alv/LevfqOni/PTWnz8Xe5wr+z3x+lEXbS3GjxceM8FNAxD +Z82TdVHQr93Os8QF7nwcXV2coovZOpy7VJNcgJQc0DTP0MV7S5uyV7u6QGVO +fUrhRV38uHJyPInDBYrPntbeXqWLHj/8Rm9YOsOZ0DXpOa918Xax/TKTyd3g +bCSNupJ6eOtxfE1mwC5YfLOcr5HQQzPTqKZK+11Q7Dfeby6th9YBrQI9sAu+ +xNccdd6oh6axzWYewrsgpMXm5jEVPRxQi+zSa3KAJOvjkvdM9JAm0yPCkHaA ++7u7/qgF6yF37AMxozE7EA9MqFGq18Mes6zyYJYtpP7bo57coIdZ/hWLxcW2 +wJlhwv7apIcBO26PDaTZwkj10mvFLXro7FsQFnPIFu5znMoReK2HO3/d0ndS +tQXn8zFHZz7rIVkqb+VcswNyao+pP1zFxCcnrXrq821g3coDbCtHJvpUXjpy +RN0SygxPREw4MXF1fcj9MlFLUDmRapjpysRl83v3jv+2AOsJVlevFxOlNV9W +djZYQHz39LzPASbShI5nddhawFxptEFELBOdlPL+FoSaw1vdzNflFUwMf3oy +6m+7Kew9UpZvVsXE2H/nSu1umcJM1R2/URYTh6WLb9bnmoIAo3dWuZqJgR1/ +ND/tMQWL5RK0B/VMlH9eNIKcplD3ptz3dRcT2y7Umrgyt4M5373NYb1MlI0q +Ftwgux16t7fMiPYzsTGz7uJy3u0wdf97ovsHJs44NmeueW8Cm0u23vhvhIlv +Vi+jb4oygbq328LOjjHRRkH+ybU9JmAuZAdbJpjovFEgQ9/GBPYkHHkZOs1E +Y7t3btcJE5iqj88TmWNi0b8bWrErTCBuIdvn/gIT5+LkpgJ/GsNatWuKbotM +ZBu4RB3sN4bCwPvT//4xcYtx4JPEJmP4H40ZNOk= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.07276674173572716}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12574,6 +11978,7 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12601,7 +12006,8 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15142054732361562`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07276674173572716}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12609,11 +12015,14 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.99134491550045*^9}, + CellChangeTimes->{3.99134491550045*^9, 3.994351264974059*^9, + 3.9943536275431128`*^9}, CellLabel-> - "Out[418]=",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] + "Out[165]=",ExpressionUUID->"543d84ea-a273-4643-a3a0-828caf2f38d3"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -12682,15 +12091,820 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003101"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.9942355752784367`*^9},ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-\ -b938908ab9a4"], + 3.9942355752784367`*^9}, + CellLabel-> + "In[166]:=",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.061803}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994351265260899*^9, 3.99435362778734*^9}, + CellLabel-> + "Out[166]=",ExpressionUUID->"a8ffee24-7cba-47f8-9c23-1ddafa3282b4"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6b0777bb-40fd-b54e-aa03-\ -b6e82cb2e939"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[167]:=",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Ve8fAHChtCgjxMW51yiSsuf1+WRlS0j2TiqUJFFWhYiMZGQnDdK9 +p1KiEioraVgpKhpfIcou9Tu/v87r/Xqd5/Wc53k+4zl07+CdfpwcHBzEEg6O +/z9nBlqaZJLL9PMsst0yRg303xSKHtvWGwdGOdXHZ1zogOteeIv2ZsDLWINz +HS7KELbjeg9XbynQHBNsb7lsA/5xkYz5HhJG+L9eSHSxhcE66+CpngYIUVN8 +/tfZC0xkRt5P9ryCP65X3b7tPgTzPZpZEz2fYPAOzS93Ryw0Gl4pe1n6C+7W +rZi8NJwOtMGaL96Ki8CR2D3LxcwDoQMe13kMuVDYKkv0LncJZCib1Fo7LEeV +H85KZXNl0JeztX5yLS/quD8d2OJ0FZLLol9wrufHjwd4on0LK0Dk/NCZzAJB +XNJ2103frwpEN905NVcuiJ77h/57FFQFYg3x0W4sQRz1dOHVDa8CyQn5Ixsa +BdEwMXCdZHIVyFoe9Kz9Johl2UYrsllVoMq9qDGkKoQZft4xdgtVYBMqPKzS +KoSG/fNyPxJvQoK9mf6rmXV4pHnPNn0zFojd7hDjXCKMQ33JnXFWLKgStJ9V +XiWMxzekhjfasqD7lTsrXUoY7bXO8Ws7s0DGNpRhayqM4wV5rtP7WNBgVbSs +M1cYQy7nc5PJLFg0me54rieCE+3zztqtLEgrj6hYNBHBly7pLhwd1PhlHImb +bUWQrSO6v/ElCyyfrNyW4ieCmV60amYfC/IMiVuWqSLonxg0w/mNBVpokd02 +KII/npBzL7jZcFi7xKMlThStIi8KH9Zlg3kx35TFWVH0nvMZP6nPBgbP8cSO +LFFcmuRtl76NDZ1vdrFfXxXFNOvxppLtbFA6uJproIMaLzpjnGvHhm/lR8t/ +iq3HbBXpx5/2scFVyHpM/NZ6lFoX8nHwAhtUI2tjC+vWo4lkyf64XDas/LRR +mP50PZYSSafo+WyouckFcn3r8WARt49DCRuELWrStv5bj6nZKt2ZFdT8sTJq +xhZiWHfywZ39j9hg9GMhImhIDFcEVJ5PHGbDMdPzCo9HxfCBZrIK+YUNVSWb +3wrOiGG/DT2h9xsbRO09tWuWi6O/0V4H8TE2jN57MsulJI5cy8xTjk2zITMu +LTQ3XBwrjDvLcpaS0NwvLzMaK45DAb3tKTwk/FFrfK2fLI4fr/XfjF5Bwp6v +0yrDBeK4wLfsqhMvCTqWLpNKjeJ491ZswBchEj6tkwtq4qVhtvlIuI80CSLB +jyRERGgIvQlhMrIkWDbvfh5A0FA2fbfaJzkSqiOSFdeo0pDDn/OnnQIJSYMT +I067abh26Fb0WmUSVK7V+v8opWHE1mPa40wSYvVsvcS0JNB56d9FfQcSTN0L +f2oaSCCP3QxX9S4S+GK+n3SwlMCUeGsT+d0k5DeeLk/zlMBDnolx3C4k3DO/ +/33ZGQl8mmY+kuJJwsRu6bBffRL4Ttyce2wfCXcjDvLwD0vg70Z58Y0HSIjK +f5CjNC6BrfP54R6BJKz+4FgbwCmJ3r+mVjQGk7DB/yzHBwVJ9Lx4I9ctlAT3 +I9NJ7ZGSuHP31lUfj5Mgm21AGzktiQO4YfDDCZLa/3M3eNIkkcdt3dL3USRE +/JHvNCiTxMiqXrPWGBKyTrqvq2mXRHmaSXv4KRJcL1eUd3dLYupvLWOX0yQw +ns1pTn2gfMVQWCeeBNbKTOct05IoqPq0cTSBhPb0Z0WXJaRQ5MQzb7lkEjJv +CSk3bpBCdbhHfqfs3OXV8EFZCvcck/e6cZaEb6J/hsVNpDDnSfc72VQSuIq3 +KmQESeEa1/w939NIaH18ovZmuBReqmt+nJlOQtpQq+XzOCl0m5aJ08ogQXKD +X/DybCmcsulTP5pJxUNV7u2oR1IoXO4b25JFglFPx+J4sxQuFmoPWVwgwZqD +e7vHKymU/a9gQxtln51BffBZCodezDrXZ5MQFHmJwRqXwlc0LwuNHBLCy3r3 +E3NSeE1sG/0aZZNIenTMUgKX73CIOZ1LQtuauktaKwkcvcC16gflHWW7mif4 +CAytpEU55JHg8jyZ30uUwGn+s8T6iyQclJq5tG0TgUecjuyPzCdh+lZa8/wW +AuulkqzbKUeYbhpjqxGofEWEECsg4fQhTw2GPoF2t8n0Ssorl/12fmtA4Hsu +K9VJyml5WdEZ2wlUvHLsqUohCXmNrc2ctgSqf6toqqQstdtv7L4DgVcPGCl/ +plw2+o//sDOB5vxZGWJFJCjE5mls8iDQVCngP0vKN9epuwz5ENj17qzGccpq +119EX9xLYPJMe8RVyvf195XZBRI4JzRb/ZIyvOZuWRVCIF963/dZyk3+RWON +YQTmxBmKiReTYPZHW+B4JIE1j7gNdSl3pL3RUIsh0P3d2J7dlO1lg11GTxF4 +X74zPoRyX82KmLIzBFbfOXHpDGV367Iy11QCD5m3PCigPPxJv0Uok0BWYHx3 +FeWAo31j7dkEunieGa+jPL4qVOB0PoFfJa4sa6Z8uJhPk1lC4AeXO1KdlOfU +rrlMX6bWeyZJp4tyVIthzI3rBEp1LDr2UOZyHyjzu0ngy5Vfw7spJ/4Mb5G4 +TeDNHsnCV5T5EgTHu+4R6HwqqrmNcqZ4lUDqAwJNRD7MPaYsyjLVNGkgUM5K +cusdygVGQy5/nxLolyMUfJkyo+9ETHUbgdlEUXUG5auBopeDOgkcf5zHc4Ly +Zs5bLXJdBJKrP3v7UiYvWI0P9BFYaeTaYkpZa9M3gewBAq94DuoqUH7wKE7T +ZojA3hXWtcspG9hLuPJ8I9D2YqLpMHUez77djXk0SmAM/eBwHWXLEzsvH50k +MN/py7kMyo7lCeNfFwj8abRivTrldzoMweJ/1Psfj88toez9ok5zNzcdk5bw +fm+j4ufA3GRMMy8dH9BEeR0p6xzaI/xFgI7BXHu7BSgvH3lbwSVKx4uLYmpt +VHxe7m/s1mfQMe2+KVuZcqi91gHXDXR0Flj3epCKd4PnlUsiFOn48fLXlCTK +Aw+zFO9o0DG01vJ1F5UvlZorG17p0jGH0PIMoxzBinKcQDouj+9PEqQsXOof +t8mCjq7cyx4aUvlmc1q7t8SDjoU1zAeRVL5K/r0R+MiXjktqNJyWUB4NY3C9 +D6CjG4Tln6TyPXHvKiXRUDoGfCiWiKLqQb3F+5OpiXRM/FOnaHGehNQm2/WV +KXRcmvtHppqqL67Mp1UtGXT0UTTrkKA8r3Szj7uAjhHX/2gNUfVJRSB2SySb +jooaZekm50jgSJ5uyqmmY+czmno2Vd86uPY5V9fSUXe6MHM4hYT90ztPTz6h +Y5BSR/wRqh6W9cr0+7+lo860f8DBM9T6iprj7bkYmDN0Tb8tjop/ESYtZDkD +uQ1WK36LpeIjjc0+x8tATyPe/5ZQtonLe9cqwkDXvk09m6Kp9fkdUNmmyEDv +7a1XnSKp7920dmCzAwOT34ZbSB4mYaZALFbVmYFOgVPfeUNImFojK6PtwcDJ +ha2pCwepfPqlvc8ogIGNtfzvW4Oo/lrrM+N8goFuwdnN26l+1Wpxly/xMjVf +++L8LaqfPXvwmJ1ynYG7aJt3hnpQ9WBLu33mTQaeb1ioV3Yn4aHgx7zCGgZe +sX749RLVD8n+lRvuPGcg/7BMtB/VP/P2u8OnaQYqcDgu8bAgIfv93k9fFxh4 +dfa2z6QZCedtDp8e+8dA468KP2NMqfNRTWybWyGNltovc7KNSYj7zXZcIymN ++0NMVS8Btb/JSw/qmUhjmjCrU02VBL2KyuILF6RxiYerv4UoCf1ERZHxRWl8 +PaRbWCZMxdeFa4VTRdIoYKEY/5u6T9yNLc/feU0aNXwHA0v5qfPdXZzDVyeN +m/f9q3uzkgT5pefT4j9K4+35J+7tf6j7k0dkTJiiDAbqWH5ZM8iGSQFzz10N +Mjg2E1qhUMCG3gOMzn3PZNCHs2mwJY8N9U8XILpdBnOyX1TvyWFDWkSF1NVu +GVQ75GqXm8mGrZ9WD86PyOCFGVrIpzNsCGK/cCsQlMX1shcvLw1jw4iNg8uw +rywO3SgezbNkw/BZz10hPHI41xA54vSLBWY/jpp91tiAhYNreJhaLBj1WX74 +dvRGzOLm7+W8VkX9P4hwJjTIo8Jgt3pJYyUIPJdLZf1QwO73W2aNvl4HWuLN +HRoaiviZ1nt+5PVVyNmkvVbQfzNGKql8nRooh1axbeq/0pWwtMjqzuhMGejQ +GtK2dG/B10IPN3lMlAIfV2moV9xW3Jc67nieVgKSsVJ6TnLKSHhqdEkcKoQV +sq7VO58po5JypMHtyTxQYq6/edRNBdPyX7eu/5wNIQMCjeYcqvi8/7rM767z +8OPXWQezHFVMs62Wd9PKgO1bnuaZbVbD5nXpLg2N5+DhL93fsx1quHCgt318 +azIEKaq8femnjsMOUfZ/PBOAOe77xmmFBgqelnTkvncSjGVErXhLNXDl5nT2 +n7sxsDEmKbxBUxPPTARtkzE9Dgp+2o9k32riTJzL0obgo+D3cO+p24e00PzK +RmPZlMPwqPiN7+Q6bYw7G8HkGQuGqav/Zrfc1cbq93y5v/4GwJddJsVnarSx +kjUQ8mAkAHq5U0yHarXxd8nBh+e7A6DWUyz3Qr02DjU6nNtfFQBxouo6iy3a +eHr4o2ONewCsTdx3vPWdNqp0Fia8eLwXFP27OPw4ddDgTVh/dbo/+MhWrMiz +0kEb7zaJ37v8IOKJ+z65HToo0LW56biRH6T5CbSRO3Xw3Tpfw9UqflB3+djZ +NkcdTKnKqrDn9QMhOdM1i146WMhxXT+pyReeyn0W8gzTQdH/Yhxi1X1BYaMU +IVekg23lXcv86T4wqZCpQU7o4Ln3c48dpbygtx2NBX/poL3SqJkQvxfUB43b +hU7roBzXhFI/pxekkmaHNBZ0cItK/2zCF09Q0OGovM+li03v8vpdqzzB2yyQ +3iisi7ymM2Xj4Alv/LevfqOni/PTWnz8Xe5wr+z3x+lEXbS3GjxceM8FNAxD +Z82TdVHQr93Os8QF7nwcXV2coovZOpy7VJNcgJQc0DTP0MV7S5uyV7u6QGVO +fUrhRV38uHJyPInDBYrPntbeXqWLHj/8Rm9YOsOZ0DXpOa918Xax/TKTyd3g +bCSNupJ6eOtxfE1mwC5YfLOcr5HQQzPTqKZK+11Q7Dfeby6th9YBrQI9sAu+ +xNccdd6oh6axzWYewrsgpMXm5jEVPRxQi+zSa3KAJOvjkvdM9JAm0yPCkHaA ++7u7/qgF6yF37AMxozE7EA9MqFGq18Mes6zyYJYtpP7bo57coIdZ/hWLxcW2 +wJlhwv7apIcBO26PDaTZwkj10mvFLXro7FsQFnPIFu5znMoReK2HO3/d0ndS +tQXn8zFHZz7rIVkqb+VcswNyao+pP1zFxCcnrXrq821g3coDbCtHJvpUXjpy +RN0SygxPREw4MXF1fcj9MlFLUDmRapjpysRl83v3jv+2AOsJVlevFxOlNV9W +djZYQHz39LzPASbShI5nddhawFxptEFELBOdlPL+FoSaw1vdzNflFUwMf3oy +6m+7Kew9UpZvVsXE2H/nSu1umcJM1R2/URYTh6WLb9bnmoIAo3dWuZqJgR1/ +ND/tMQWL5RK0B/VMlH9eNIKcplD3ptz3dRcT2y7Umrgyt4M5373NYb1MlI0q +Ftwgux16t7fMiPYzsTGz7uJy3u0wdf97ovsHJs44NmeueW8Cm0u23vhvhIlv +Vi+jb4oygbq328LOjjHRRkH+ybU9JmAuZAdbJpjovFEgQ9/GBPYkHHkZOs1E +Y7t3btcJE5iqj88TmWNi0b8bWrErTCBuIdvn/gIT5+LkpgJ/GsNatWuKbotM +ZBu4RB3sN4bCwPvT//4xcYtx4JPEJmP4H40ZNOk= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Ve8fAHChtCgjxMW51yiSsuf1+WRlS0j2TiqUJFFWhYiMZGQnDdK9 +p1KiEioraVgpKhpfIcou9Tu/v87r/Xqd5/Wc53k+4zl07+CdfpwcHBzEEg6O +/z9nBlqaZJLL9PMsst0yRg303xSKHtvWGwdGOdXHZ1zogOteeIv2ZsDLWINz +HS7KELbjeg9XbynQHBNsb7lsA/5xkYz5HhJG+L9eSHSxhcE66+CpngYIUVN8 +/tfZC0xkRt5P9ryCP65X3b7tPgTzPZpZEz2fYPAOzS93Ryw0Gl4pe1n6C+7W +rZi8NJwOtMGaL96Ki8CR2D3LxcwDoQMe13kMuVDYKkv0LncJZCib1Fo7LEeV +H85KZXNl0JeztX5yLS/quD8d2OJ0FZLLol9wrufHjwd4on0LK0Dk/NCZzAJB +XNJ2103frwpEN905NVcuiJ77h/57FFQFYg3x0W4sQRz1dOHVDa8CyQn5Ixsa +BdEwMXCdZHIVyFoe9Kz9Johl2UYrsllVoMq9qDGkKoQZft4xdgtVYBMqPKzS +KoSG/fNyPxJvQoK9mf6rmXV4pHnPNn0zFojd7hDjXCKMQ33JnXFWLKgStJ9V +XiWMxzekhjfasqD7lTsrXUoY7bXO8Ws7s0DGNpRhayqM4wV5rtP7WNBgVbSs +M1cYQy7nc5PJLFg0me54rieCE+3zztqtLEgrj6hYNBHBly7pLhwd1PhlHImb +bUWQrSO6v/ElCyyfrNyW4ieCmV60amYfC/IMiVuWqSLonxg0w/mNBVpokd02 +KII/npBzL7jZcFi7xKMlThStIi8KH9Zlg3kx35TFWVH0nvMZP6nPBgbP8cSO +LFFcmuRtl76NDZ1vdrFfXxXFNOvxppLtbFA6uJproIMaLzpjnGvHhm/lR8t/ +iq3HbBXpx5/2scFVyHpM/NZ6lFoX8nHwAhtUI2tjC+vWo4lkyf64XDas/LRR +mP50PZYSSafo+WyouckFcn3r8WARt49DCRuELWrStv5bj6nZKt2ZFdT8sTJq +xhZiWHfywZ39j9hg9GMhImhIDFcEVJ5PHGbDMdPzCo9HxfCBZrIK+YUNVSWb +3wrOiGG/DT2h9xsbRO09tWuWi6O/0V4H8TE2jN57MsulJI5cy8xTjk2zITMu +LTQ3XBwrjDvLcpaS0NwvLzMaK45DAb3tKTwk/FFrfK2fLI4fr/XfjF5Bwp6v +0yrDBeK4wLfsqhMvCTqWLpNKjeJ491ZswBchEj6tkwtq4qVhtvlIuI80CSLB +jyRERGgIvQlhMrIkWDbvfh5A0FA2fbfaJzkSqiOSFdeo0pDDn/OnnQIJSYMT +I067abh26Fb0WmUSVK7V+v8opWHE1mPa40wSYvVsvcS0JNB56d9FfQcSTN0L +f2oaSCCP3QxX9S4S+GK+n3SwlMCUeGsT+d0k5DeeLk/zlMBDnolx3C4k3DO/ +/33ZGQl8mmY+kuJJwsRu6bBffRL4Ttyce2wfCXcjDvLwD0vg70Z58Y0HSIjK +f5CjNC6BrfP54R6BJKz+4FgbwCmJ3r+mVjQGk7DB/yzHBwVJ9Lx4I9ctlAT3 +I9NJ7ZGSuHP31lUfj5Mgm21AGzktiQO4YfDDCZLa/3M3eNIkkcdt3dL3USRE +/JHvNCiTxMiqXrPWGBKyTrqvq2mXRHmaSXv4KRJcL1eUd3dLYupvLWOX0yQw +ns1pTn2gfMVQWCeeBNbKTOct05IoqPq0cTSBhPb0Z0WXJaRQ5MQzb7lkEjJv +CSk3bpBCdbhHfqfs3OXV8EFZCvcck/e6cZaEb6J/hsVNpDDnSfc72VQSuIq3 +KmQESeEa1/w939NIaH18ovZmuBReqmt+nJlOQtpQq+XzOCl0m5aJ08ogQXKD +X/DybCmcsulTP5pJxUNV7u2oR1IoXO4b25JFglFPx+J4sxQuFmoPWVwgwZqD +e7vHKymU/a9gQxtln51BffBZCodezDrXZ5MQFHmJwRqXwlc0LwuNHBLCy3r3 +E3NSeE1sG/0aZZNIenTMUgKX73CIOZ1LQtuauktaKwkcvcC16gflHWW7mif4 +CAytpEU55JHg8jyZ30uUwGn+s8T6iyQclJq5tG0TgUecjuyPzCdh+lZa8/wW +AuulkqzbKUeYbhpjqxGofEWEECsg4fQhTw2GPoF2t8n0Ssorl/12fmtA4Hsu +K9VJyml5WdEZ2wlUvHLsqUohCXmNrc2ctgSqf6toqqQstdtv7L4DgVcPGCl/ +plw2+o//sDOB5vxZGWJFJCjE5mls8iDQVCngP0vKN9epuwz5ENj17qzGccpq +119EX9xLYPJMe8RVyvf195XZBRI4JzRb/ZIyvOZuWRVCIF963/dZyk3+RWON +YQTmxBmKiReTYPZHW+B4JIE1j7gNdSl3pL3RUIsh0P3d2J7dlO1lg11GTxF4 +X74zPoRyX82KmLIzBFbfOXHpDGV367Iy11QCD5m3PCigPPxJv0Uok0BWYHx3 +FeWAo31j7dkEunieGa+jPL4qVOB0PoFfJa4sa6Z8uJhPk1lC4AeXO1KdlOfU +rrlMX6bWeyZJp4tyVIthzI3rBEp1LDr2UOZyHyjzu0ngy5Vfw7spJ/4Mb5G4 +TeDNHsnCV5T5EgTHu+4R6HwqqrmNcqZ4lUDqAwJNRD7MPaYsyjLVNGkgUM5K +cusdygVGQy5/nxLolyMUfJkyo+9ETHUbgdlEUXUG5auBopeDOgkcf5zHc4Ly +Zs5bLXJdBJKrP3v7UiYvWI0P9BFYaeTaYkpZa9M3gewBAq94DuoqUH7wKE7T +ZojA3hXWtcspG9hLuPJ8I9D2YqLpMHUez77djXk0SmAM/eBwHWXLEzsvH50k +MN/py7kMyo7lCeNfFwj8abRivTrldzoMweJ/1Psfj88toez9ok5zNzcdk5bw +fm+j4ufA3GRMMy8dH9BEeR0p6xzaI/xFgI7BXHu7BSgvH3lbwSVKx4uLYmpt +VHxe7m/s1mfQMe2+KVuZcqi91gHXDXR0Flj3epCKd4PnlUsiFOn48fLXlCTK +Aw+zFO9o0DG01vJ1F5UvlZorG17p0jGH0PIMoxzBinKcQDouj+9PEqQsXOof +t8mCjq7cyx4aUvlmc1q7t8SDjoU1zAeRVL5K/r0R+MiXjktqNJyWUB4NY3C9 +D6CjG4Tln6TyPXHvKiXRUDoGfCiWiKLqQb3F+5OpiXRM/FOnaHGehNQm2/WV +KXRcmvtHppqqL67Mp1UtGXT0UTTrkKA8r3Szj7uAjhHX/2gNUfVJRSB2SySb +jooaZekm50jgSJ5uyqmmY+czmno2Vd86uPY5V9fSUXe6MHM4hYT90ztPTz6h +Y5BSR/wRqh6W9cr0+7+lo860f8DBM9T6iprj7bkYmDN0Tb8tjop/ESYtZDkD +uQ1WK36LpeIjjc0+x8tATyPe/5ZQtonLe9cqwkDXvk09m6Kp9fkdUNmmyEDv +7a1XnSKp7920dmCzAwOT34ZbSB4mYaZALFbVmYFOgVPfeUNImFojK6PtwcDJ +ha2pCwepfPqlvc8ogIGNtfzvW4Oo/lrrM+N8goFuwdnN26l+1Wpxly/xMjVf +++L8LaqfPXvwmJ1ynYG7aJt3hnpQ9WBLu33mTQaeb1ioV3Yn4aHgx7zCGgZe +sX749RLVD8n+lRvuPGcg/7BMtB/VP/P2u8OnaQYqcDgu8bAgIfv93k9fFxh4 +dfa2z6QZCedtDp8e+8dA468KP2NMqfNRTWybWyGNltovc7KNSYj7zXZcIymN ++0NMVS8Btb/JSw/qmUhjmjCrU02VBL2KyuILF6RxiYerv4UoCf1ERZHxRWl8 +PaRbWCZMxdeFa4VTRdIoYKEY/5u6T9yNLc/feU0aNXwHA0v5qfPdXZzDVyeN +m/f9q3uzkgT5pefT4j9K4+35J+7tf6j7k0dkTJiiDAbqWH5ZM8iGSQFzz10N +Mjg2E1qhUMCG3gOMzn3PZNCHs2mwJY8N9U8XILpdBnOyX1TvyWFDWkSF1NVu +GVQ75GqXm8mGrZ9WD86PyOCFGVrIpzNsCGK/cCsQlMX1shcvLw1jw4iNg8uw +rywO3SgezbNkw/BZz10hPHI41xA54vSLBWY/jpp91tiAhYNreJhaLBj1WX74 +dvRGzOLm7+W8VkX9P4hwJjTIo8Jgt3pJYyUIPJdLZf1QwO73W2aNvl4HWuLN +HRoaiviZ1nt+5PVVyNmkvVbQfzNGKql8nRooh1axbeq/0pWwtMjqzuhMGejQ +GtK2dG/B10IPN3lMlAIfV2moV9xW3Jc67nieVgKSsVJ6TnLKSHhqdEkcKoQV +sq7VO58po5JypMHtyTxQYq6/edRNBdPyX7eu/5wNIQMCjeYcqvi8/7rM767z +8OPXWQezHFVMs62Wd9PKgO1bnuaZbVbD5nXpLg2N5+DhL93fsx1quHCgt318 +azIEKaq8femnjsMOUfZ/PBOAOe77xmmFBgqelnTkvncSjGVErXhLNXDl5nT2 +n7sxsDEmKbxBUxPPTARtkzE9Dgp+2o9k32riTJzL0obgo+D3cO+p24e00PzK +RmPZlMPwqPiN7+Q6bYw7G8HkGQuGqav/Zrfc1cbq93y5v/4GwJddJsVnarSx +kjUQ8mAkAHq5U0yHarXxd8nBh+e7A6DWUyz3Qr02DjU6nNtfFQBxouo6iy3a +eHr4o2ONewCsTdx3vPWdNqp0Fia8eLwXFP27OPw4ddDgTVh/dbo/+MhWrMiz +0kEb7zaJ37v8IOKJ+z65HToo0LW56biRH6T5CbSRO3Xw3Tpfw9UqflB3+djZ +NkcdTKnKqrDn9QMhOdM1i146WMhxXT+pyReeyn0W8gzTQdH/Yhxi1X1BYaMU +IVekg23lXcv86T4wqZCpQU7o4Ln3c48dpbygtx2NBX/poL3SqJkQvxfUB43b +hU7roBzXhFI/pxekkmaHNBZ0cItK/2zCF09Q0OGovM+li03v8vpdqzzB2yyQ +3iisi7ymM2Xj4Alv/LevfqOni/PTWnz8Xe5wr+z3x+lEXbS3GjxceM8FNAxD +Z82TdVHQr93Os8QF7nwcXV2coovZOpy7VJNcgJQc0DTP0MV7S5uyV7u6QGVO +fUrhRV38uHJyPInDBYrPntbeXqWLHj/8Rm9YOsOZ0DXpOa918Xax/TKTyd3g +bCSNupJ6eOtxfE1mwC5YfLOcr5HQQzPTqKZK+11Q7Dfeby6th9YBrQI9sAu+ +xNccdd6oh6axzWYewrsgpMXm5jEVPRxQi+zSa3KAJOvjkvdM9JAm0yPCkHaA ++7u7/qgF6yF37AMxozE7EA9MqFGq18Mes6zyYJYtpP7bo57coIdZ/hWLxcW2 +wJlhwv7apIcBO26PDaTZwkj10mvFLXro7FsQFnPIFu5znMoReK2HO3/d0ndS +tQXn8zFHZz7rIVkqb+VcswNyao+pP1zFxCcnrXrq821g3coDbCtHJvpUXjpy +RN0SygxPREw4MXF1fcj9MlFLUDmRapjpysRl83v3jv+2AOsJVlevFxOlNV9W +djZYQHz39LzPASbShI5nddhawFxptEFELBOdlPL+FoSaw1vdzNflFUwMf3oy +6m+7Kew9UpZvVsXE2H/nSu1umcJM1R2/URYTh6WLb9bnmoIAo3dWuZqJgR1/ +ND/tMQWL5RK0B/VMlH9eNIKcplD3ptz3dRcT2y7Umrgyt4M5373NYb1MlI0q +Ftwgux16t7fMiPYzsTGz7uJy3u0wdf97ovsHJs44NmeueW8Cm0u23vhvhIlv +Vi+jb4oygbq328LOjjHRRkH+ybU9JmAuZAdbJpjovFEgQ9/GBPYkHHkZOs1E +Y7t3btcJE5iqj88TmWNi0b8bWrErTCBuIdvn/gIT5+LkpgJ/GsNatWuKbotM +ZBu4RB3sN4bCwPvT//4xcYtx4JPEJmP4H40ZNOk= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07276674173572716}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07276674173572716}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Ve8fAHChtCgjxMW51yiSsuf1+WRlS0j2TiqUJFFWhYiMZGQnDdK9 +p1KiEioraVgpKhpfIcou9Tu/v87r/Xqd5/Wc53k+4zl07+CdfpwcHBzEEg6O +/z9nBlqaZJLL9PMsst0yRg303xSKHtvWGwdGOdXHZ1zogOteeIv2ZsDLWINz +HS7KELbjeg9XbynQHBNsb7lsA/5xkYz5HhJG+L9eSHSxhcE66+CpngYIUVN8 +/tfZC0xkRt5P9ryCP65X3b7tPgTzPZpZEz2fYPAOzS93Ryw0Gl4pe1n6C+7W +rZi8NJwOtMGaL96Ki8CR2D3LxcwDoQMe13kMuVDYKkv0LncJZCib1Fo7LEeV +H85KZXNl0JeztX5yLS/quD8d2OJ0FZLLol9wrufHjwd4on0LK0Dk/NCZzAJB +XNJ2103frwpEN905NVcuiJ77h/57FFQFYg3x0W4sQRz1dOHVDa8CyQn5Ixsa +BdEwMXCdZHIVyFoe9Kz9Johl2UYrsllVoMq9qDGkKoQZft4xdgtVYBMqPKzS +KoSG/fNyPxJvQoK9mf6rmXV4pHnPNn0zFojd7hDjXCKMQ33JnXFWLKgStJ9V +XiWMxzekhjfasqD7lTsrXUoY7bXO8Ws7s0DGNpRhayqM4wV5rtP7WNBgVbSs +M1cYQy7nc5PJLFg0me54rieCE+3zztqtLEgrj6hYNBHBly7pLhwd1PhlHImb +bUWQrSO6v/ElCyyfrNyW4ieCmV60amYfC/IMiVuWqSLonxg0w/mNBVpokd02 +KII/npBzL7jZcFi7xKMlThStIi8KH9Zlg3kx35TFWVH0nvMZP6nPBgbP8cSO +LFFcmuRtl76NDZ1vdrFfXxXFNOvxppLtbFA6uJproIMaLzpjnGvHhm/lR8t/ +iq3HbBXpx5/2scFVyHpM/NZ6lFoX8nHwAhtUI2tjC+vWo4lkyf64XDas/LRR +mP50PZYSSafo+WyouckFcn3r8WARt49DCRuELWrStv5bj6nZKt2ZFdT8sTJq +xhZiWHfywZ39j9hg9GMhImhIDFcEVJ5PHGbDMdPzCo9HxfCBZrIK+YUNVSWb +3wrOiGG/DT2h9xsbRO09tWuWi6O/0V4H8TE2jN57MsulJI5cy8xTjk2zITMu +LTQ3XBwrjDvLcpaS0NwvLzMaK45DAb3tKTwk/FFrfK2fLI4fr/XfjF5Bwp6v +0yrDBeK4wLfsqhMvCTqWLpNKjeJ491ZswBchEj6tkwtq4qVhtvlIuI80CSLB +jyRERGgIvQlhMrIkWDbvfh5A0FA2fbfaJzkSqiOSFdeo0pDDn/OnnQIJSYMT +I067abh26Fb0WmUSVK7V+v8opWHE1mPa40wSYvVsvcS0JNB56d9FfQcSTN0L +f2oaSCCP3QxX9S4S+GK+n3SwlMCUeGsT+d0k5DeeLk/zlMBDnolx3C4k3DO/ +/33ZGQl8mmY+kuJJwsRu6bBffRL4Ttyce2wfCXcjDvLwD0vg70Z58Y0HSIjK +f5CjNC6BrfP54R6BJKz+4FgbwCmJ3r+mVjQGk7DB/yzHBwVJ9Lx4I9ctlAT3 +I9NJ7ZGSuHP31lUfj5Mgm21AGzktiQO4YfDDCZLa/3M3eNIkkcdt3dL3USRE +/JHvNCiTxMiqXrPWGBKyTrqvq2mXRHmaSXv4KRJcL1eUd3dLYupvLWOX0yQw +ns1pTn2gfMVQWCeeBNbKTOct05IoqPq0cTSBhPb0Z0WXJaRQ5MQzb7lkEjJv +CSk3bpBCdbhHfqfs3OXV8EFZCvcck/e6cZaEb6J/hsVNpDDnSfc72VQSuIq3 +KmQESeEa1/w939NIaH18ovZmuBReqmt+nJlOQtpQq+XzOCl0m5aJ08ogQXKD +X/DybCmcsulTP5pJxUNV7u2oR1IoXO4b25JFglFPx+J4sxQuFmoPWVwgwZqD +e7vHKymU/a9gQxtln51BffBZCodezDrXZ5MQFHmJwRqXwlc0LwuNHBLCy3r3 +E3NSeE1sG/0aZZNIenTMUgKX73CIOZ1LQtuauktaKwkcvcC16gflHWW7mif4 +CAytpEU55JHg8jyZ30uUwGn+s8T6iyQclJq5tG0TgUecjuyPzCdh+lZa8/wW +AuulkqzbKUeYbhpjqxGofEWEECsg4fQhTw2GPoF2t8n0Ssorl/12fmtA4Hsu +K9VJyml5WdEZ2wlUvHLsqUohCXmNrc2ctgSqf6toqqQstdtv7L4DgVcPGCl/ +plw2+o//sDOB5vxZGWJFJCjE5mls8iDQVCngP0vKN9epuwz5ENj17qzGccpq +119EX9xLYPJMe8RVyvf195XZBRI4JzRb/ZIyvOZuWRVCIF963/dZyk3+RWON +YQTmxBmKiReTYPZHW+B4JIE1j7gNdSl3pL3RUIsh0P3d2J7dlO1lg11GTxF4 +X74zPoRyX82KmLIzBFbfOXHpDGV367Iy11QCD5m3PCigPPxJv0Uok0BWYHx3 +FeWAo31j7dkEunieGa+jPL4qVOB0PoFfJa4sa6Z8uJhPk1lC4AeXO1KdlOfU +rrlMX6bWeyZJp4tyVIthzI3rBEp1LDr2UOZyHyjzu0ngy5Vfw7spJ/4Mb5G4 +TeDNHsnCV5T5EgTHu+4R6HwqqrmNcqZ4lUDqAwJNRD7MPaYsyjLVNGkgUM5K +cusdygVGQy5/nxLolyMUfJkyo+9ETHUbgdlEUXUG5auBopeDOgkcf5zHc4Ly +Zs5bLXJdBJKrP3v7UiYvWI0P9BFYaeTaYkpZa9M3gewBAq94DuoqUH7wKE7T +ZojA3hXWtcspG9hLuPJ8I9D2YqLpMHUez77djXk0SmAM/eBwHWXLEzsvH50k +MN/py7kMyo7lCeNfFwj8abRivTrldzoMweJ/1Psfj88toez9ok5zNzcdk5bw +fm+j4ufA3GRMMy8dH9BEeR0p6xzaI/xFgI7BXHu7BSgvH3lbwSVKx4uLYmpt +VHxe7m/s1mfQMe2+KVuZcqi91gHXDXR0Flj3epCKd4PnlUsiFOn48fLXlCTK +Aw+zFO9o0DG01vJ1F5UvlZorG17p0jGH0PIMoxzBinKcQDouj+9PEqQsXOof +t8mCjq7cyx4aUvlmc1q7t8SDjoU1zAeRVL5K/r0R+MiXjktqNJyWUB4NY3C9 +D6CjG4Tln6TyPXHvKiXRUDoGfCiWiKLqQb3F+5OpiXRM/FOnaHGehNQm2/WV +KXRcmvtHppqqL67Mp1UtGXT0UTTrkKA8r3Szj7uAjhHX/2gNUfVJRSB2SySb +jooaZekm50jgSJ5uyqmmY+czmno2Vd86uPY5V9fSUXe6MHM4hYT90ztPTz6h +Y5BSR/wRqh6W9cr0+7+lo860f8DBM9T6iprj7bkYmDN0Tb8tjop/ESYtZDkD +uQ1WK36LpeIjjc0+x8tATyPe/5ZQtonLe9cqwkDXvk09m6Kp9fkdUNmmyEDv +7a1XnSKp7920dmCzAwOT34ZbSB4mYaZALFbVmYFOgVPfeUNImFojK6PtwcDJ +ha2pCwepfPqlvc8ogIGNtfzvW4Oo/lrrM+N8goFuwdnN26l+1Wpxly/xMjVf +++L8LaqfPXvwmJ1ynYG7aJt3hnpQ9WBLu33mTQaeb1ioV3Yn4aHgx7zCGgZe +sX749RLVD8n+lRvuPGcg/7BMtB/VP/P2u8OnaQYqcDgu8bAgIfv93k9fFxh4 +dfa2z6QZCedtDp8e+8dA468KP2NMqfNRTWybWyGNltovc7KNSYj7zXZcIymN ++0NMVS8Btb/JSw/qmUhjmjCrU02VBL2KyuILF6RxiYerv4UoCf1ERZHxRWl8 +PaRbWCZMxdeFa4VTRdIoYKEY/5u6T9yNLc/feU0aNXwHA0v5qfPdXZzDVyeN +m/f9q3uzkgT5pefT4j9K4+35J+7tf6j7k0dkTJiiDAbqWH5ZM8iGSQFzz10N +Mjg2E1qhUMCG3gOMzn3PZNCHs2mwJY8N9U8XILpdBnOyX1TvyWFDWkSF1NVu +GVQ75GqXm8mGrZ9WD86PyOCFGVrIpzNsCGK/cCsQlMX1shcvLw1jw4iNg8uw +rywO3SgezbNkw/BZz10hPHI41xA54vSLBWY/jpp91tiAhYNreJhaLBj1WX74 +dvRGzOLm7+W8VkX9P4hwJjTIo8Jgt3pJYyUIPJdLZf1QwO73W2aNvl4HWuLN +HRoaiviZ1nt+5PVVyNmkvVbQfzNGKql8nRooh1axbeq/0pWwtMjqzuhMGejQ +GtK2dG/B10IPN3lMlAIfV2moV9xW3Jc67nieVgKSsVJ6TnLKSHhqdEkcKoQV +sq7VO58po5JypMHtyTxQYq6/edRNBdPyX7eu/5wNIQMCjeYcqvi8/7rM767z +8OPXWQezHFVMs62Wd9PKgO1bnuaZbVbD5nXpLg2N5+DhL93fsx1quHCgt318 +azIEKaq8femnjsMOUfZ/PBOAOe77xmmFBgqelnTkvncSjGVErXhLNXDl5nT2 +n7sxsDEmKbxBUxPPTARtkzE9Dgp+2o9k32riTJzL0obgo+D3cO+p24e00PzK +RmPZlMPwqPiN7+Q6bYw7G8HkGQuGqav/Zrfc1cbq93y5v/4GwJddJsVnarSx +kjUQ8mAkAHq5U0yHarXxd8nBh+e7A6DWUyz3Qr02DjU6nNtfFQBxouo6iy3a +eHr4o2ONewCsTdx3vPWdNqp0Fia8eLwXFP27OPw4ddDgTVh/dbo/+MhWrMiz +0kEb7zaJ37v8IOKJ+z65HToo0LW56biRH6T5CbSRO3Xw3Tpfw9UqflB3+djZ +NkcdTKnKqrDn9QMhOdM1i146WMhxXT+pyReeyn0W8gzTQdH/Yhxi1X1BYaMU +IVekg23lXcv86T4wqZCpQU7o4Ln3c48dpbygtx2NBX/poL3SqJkQvxfUB43b +hU7roBzXhFI/pxekkmaHNBZ0cItK/2zCF09Q0OGovM+li03v8vpdqzzB2yyQ +3iisi7ymM2Xj4Alv/LevfqOni/PTWnz8Xe5wr+z3x+lEXbS3GjxceM8FNAxD +Z82TdVHQr93Os8QF7nwcXV2coovZOpy7VJNcgJQc0DTP0MV7S5uyV7u6QGVO +fUrhRV38uHJyPInDBYrPntbeXqWLHj/8Rm9YOsOZ0DXpOa918Xax/TKTyd3g +bCSNupJ6eOtxfE1mwC5YfLOcr5HQQzPTqKZK+11Q7Dfeby6th9YBrQI9sAu+ +xNccdd6oh6axzWYewrsgpMXm5jEVPRxQi+zSa3KAJOvjkvdM9JAm0yPCkHaA ++7u7/qgF6yF37AMxozE7EA9MqFGq18Mes6zyYJYtpP7bo57coIdZ/hWLxcW2 +wJlhwv7apIcBO26PDaTZwkj10mvFLXro7FsQFnPIFu5znMoReK2HO3/d0ndS +tQXn8zFHZz7rIVkqb+VcswNyao+pP1zFxCcnrXrq821g3coDbCtHJvpUXjpy +RN0SygxPREw4MXF1fcj9MlFLUDmRapjpysRl83v3jv+2AOsJVlevFxOlNV9W +djZYQHz39LzPASbShI5nddhawFxptEFELBOdlPL+FoSaw1vdzNflFUwMf3oy +6m+7Kew9UpZvVsXE2H/nSu1umcJM1R2/URYTh6WLb9bnmoIAo3dWuZqJgR1/ +ND/tMQWL5RK0B/VMlH9eNIKcplD3ptz3dRcT2y7Umrgyt4M5373NYb1MlI0q +Ftwgux16t7fMiPYzsTGz7uJy3u0wdf97ovsHJs44NmeueW8Cm0u23vhvhIlv +Vi+jb4oygbq328LOjjHRRkH+ybU9JmAuZAdbJpjovFEgQ9/GBPYkHHkZOs1E +Y7t3btcJE5iqj88TmWNi0b8bWrErTCBuIdvn/gIT5+LkpgJ/GsNatWuKbotM +ZBu4RB3sN4bCwPvT//4xcYtx4JPEJmP4H40ZNOk= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07276674173572716}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07276674173572716}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943512653102283`*^9, 3.994353627833743*^9}, + CellLabel-> + "Out[167]=",ExpressionUUID->"39234b0d-8791-4c24-9cef-469e7b9f6b9f"] +}, Open ]], Cell[CellGroupData[{ @@ -12699,14 +12913,15 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918501819649506`*^9},ExpressionUUID->"1ec1e156-ca0f-9240-857c-\ -ac86e3a0e3fd"], - -Cell[BoxData["10.362747935330784`"], "Output", - CellChangeTimes->{3.9913453868532257`*^9}, + CellChangeTimes->{3.9918501819649506`*^9}, CellLabel-> - "Out[420]=",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] + "In[168]:=",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], + +Cell[BoxData["10.212089025881244`"], "Output", + CellChangeTimes->{3.9913453868532257`*^9, 3.994351265360991*^9, + 3.994353627884468*^9}, + CellLabel-> + "Out[168]=",ExpressionUUID->"e2d4f93e-1166-4d7c-82cc-195750fdfe5f"] }, Open ]], Cell[CellGroupData[{ @@ -12762,171 +12977,180 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850184857586*^9},ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-\ -da901e49f6f1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 449, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387062414*^9}, + CellChangeTimes->{3.991850184857586*^9}, CellLabel-> - "During evaluation of \ -In[421]:=",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], + "In[169]:=",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 450, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387076412*^9}, - CellLabel-> - "During evaluation of \ -In[421]:=",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.9539380697128215`*^-259\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 421, 451, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387088339*^9}, +\"", 2, 169, 13, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.9943512655013313`*^9, + 3.994353628005474*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], +In[169]:=",ExpressionUUID->"b50c7c97-7864-4120-895a-5a832ca9d48f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7266385596673545`*^-268\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 169, 14, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.9943512655013313`*^9, + 3.994353628013523*^9}, + CellLabel-> + "During evaluation of \ +In[169]:=",ExpressionUUID->"071125d9-04f4-434f-b666-41f1949ce810"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0092563369211032`*^-277\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 169, 15, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.9943512655013313`*^9, + 3.994353628021002*^9}, + CellLabel-> + "During evaluation of \ +In[169]:=",ExpressionUUID->"6fee666f-d988-4a01-b833-6c53ed52fbab"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 421, 452, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913453870973415`*^9}, +during this calculation.\"", 2, 169, 16, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.9943512655013313`*^9, + 3.994353628028532*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], +In[169]:=",ExpressionUUID->"60541522-cc4d-4bde-a14b-c37486a106c6"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VdsbB3BDhZKueXb2MVVCpuTgeF9DypDpogwZEjIXogzXEFLiGiqi +pEKJcLYmUkSESgNlqKQokQyFENdv//7az+fZ+1lr7zV837Xp+0PsvDnY2Ng0 +2NnY/n+dG2h/LJ9WbJDG5Dn24LmxQXeh2DHD3kQYmOf+nqgkCyj8Yr9YbzaI +/LjA7aSkARE2N3o4e6/AQLM6TV/JCPgnRLMXekjYUzbdvl7JDj7WW4XM9DRB +yZAiEbl5P5jKj32Y7nkNSZM7/6hsDIWFnu1np3o+w9VzQ+NCMonQbHyt+NWV +X0AshucRd7NB6mPt1/3Ky8DJbefhE1QAQoHuN7iMOZHj0hF/j9bLkK1uet/K +gRubg0xXvxgsgb48tcbpv9bj0vs1fpvcyiCtOO4Fhzg/uv/LyT5ZWwHmWn4C +wnL8SNxe91u1tQK4H9s5bFThx5BIv8O+rysgaUjhnYUhPzJjuMYejVVAjOyz +r2f8+NHHtrJcSvImBBeJ/adYx4+1620SfaNugu0FlrKFiwB24+wtY81KED0z +dDLnoiCazn69eSO9CsS23E6aLxVEM6GKf81zq0CiKSVuX7Ugan1aTB4qqgKZ +qc1HNjYLYmpqZDnbrSpQsDzkcf+bIB7K2lk70lcFmquWtYc0hVCr7Pq0pkA1 +WIeLDGt0CKGnfF6KkHM12Kz7NpDbJYRNN5tY4W7VYHeltm/pvRDe5yl0fLW/ +Ghxfur5onRTCK7eur4sPqIZ9ylfrnIWFsdhGRrQmphoChrdmJXoIo2T05r0h +hdVwwt7M4PWcMDp0WY8yP1aDxK1OCQ52EQwyVLBIGKqGSkH73+rrRFDxuUdU +40g1vH3tVp1FE8FLoRdBY6oa5G3DZW13ieDV8ByXITYWNO2+tObleRGseWOS +HU1nwbLpbOdzfVGMypyWSHRnQWZpVPmyqSg+NZU/b+DFAvk1bKkqtqK4uS/3 +/ZwPCyxb1hqme4ui9flK0jmYBfnGRI1lhigKsM3kTsawQActcp9+FMUjs8pb +rc6zIIxx2b09UQy3hJ1SGuhkgXkR34zFaTEM7qp88P4VC2S5YlI7z4qh/ceZ +Sz3dLHjZ7cjqui6Grqsk7Zr6WaB6iJdzoFMMIyJSgwO+suBbaWTpTwlxFAh4 +dJ53mQWuQlY/JGvE8cs7lZNpG0nQjL6fUFgvjqdkc9SFlEhY+3mTCL1VHDPY +pVTOK5NQW8UJin3i6BvqL5OnToKIRW2m2oo4fupdnPTTI+FlgrzWDgsJrM7/ +kLjPigSTycWo4CEJtHhQuSPlMAnHdp1RejQugVM8/fv/DSOh8rJKv+CcBK6d +MWM7e4QEMXsPRi23JB5Is3hw9hgJ4/dafnOqSmLJc1ezoAQSchIzw88flcQd +/X4L4ZkktL3bLD+eIIlT5V9NTLNJWNJq7jJIk0TlzFARoTMk+IzMagxflMTB +CavdJbkk6Fq6TKs2S2J6Z6RwYSEJn4UVgx+vl8LYH++DRstJEA1pkBYVlcIf +FcqWx2+SYNm297kfIYURTz3uileRcCcqTXmDphTq2lhr65MknPo4Nea0VwoV +/g4e2nOPBI2y+76TV6Twet8u37FmEnw5HESNKqTQp8939+4WEi64TLSeuS2F +cadN2ipaSVjDR1fUbZNCLkObfzzbSegPTRlO+iGFQ4F5i5c7SUjQt/WU0JHG +jp59lXG9JOxyK/y53UgaaxmZx1v6SOCL/37cwVIaG6PeuHK9o9pvTi7N9JDG +gslzMnEfSLhnXvd9zUlpNGHXmjH4TEJcIFesfI40vj2osXJgiATTDHs+o4vS +uOHqfqETwyR0v5pQi2VJ497peI+GryRM7ZWL+NUnjTH7xM6xfSfhbtQhLv5h +aXQqWOHmGifhnwsP8lQnpPG6dNppnh8k8A7uue/HIYMZhYNtHJMkbPQ9zTao +JINWTdyqrT9JcDsye+pZtAxGbcjwz1ogQSHXSGosWQbvLH/f7bT4//n+9yZX +pgy2xT6xlv5DQtTS5pdGxTL4TeU8eX6JhLPH3YRrn8ng3ddOfAdWSHAtKS99 ++1YGP6lYrfCy1YDsk/ntM4MyeLRPToSkXL02x3nrrAy2CujXTrHXwLOsJ5dK +pGkY/PXTJKyqgZwaIfXmjTSclstX6qDs/MazaVCdhva3h7NtVtfAN7GlYUlT +GuZ9p03ZrqmBKl2zCIYNDRfWrxt5RjnC9RzXHmcapsXGbjDhqgHOIjWl7GAa +viUW5xW5a6DjUez9qqM0XK/MXZ9NOXOow/J5Ig3fqJfcWqQss9E7hDuXhsT5 +IvMGnhr4sotkU7xMw3R+3jHJtTVQ4b+SZVxOw5pqojmcsm7l+Vv/NNDwz6ZA +Rcl1NWDS07k80UbDmy+dirwoW7Gt2un+moZV/Ynd1yl72QX3wRcasj+ZCd7M +WwPB0Vdlqydo+O7q3NsDlI8W9wYQ8zTk7SlZukDZNJoeF7+awG1pJ5I419fA +0w31V3XWEhj3/Ng3dco2xY5tU3wEnhvJW7+P8lud6fHrggQe7mqdSaLs8jyN +31OMwDaPr4VllAc9FbXFpQlM03rH+5Syz1yj8ys6gaZtJ2GU8vdTLnEnFQmM +9evZvoqvBg7R5q4abiFwPePGnCTl2ZrMtoWtVH9KozFqlKN2bfnB0iJwmDPm +qSFltg8t/P4MArVcLYasKScf9tCWNSCwtQBbnCmvXfPHud+IQO4/O0L3U87M +PxuXvZNA9UTT7z6UhbeqFZtbEniQW1X9IOX85o42DlsCnTVHTf5/n7bX+0ed +A4HHIrw3elIuHl/hD3MmMEAgq28vZaWEfO0t7gT6Crm47qZcJbzNZciLwGyH +mmoDylo3XsQVHKTajzrVo0y5zsC/+O8gAvl/vnolShm6VrWvCyXwxWx00Qo1 +Ho99L/1ojiBwd2q0yTBlsyWGQEw0gYJHHj9sodyZ2a2tFU9go7XFX8WU7RVC +XMaTCCwJW60bR7mvlie++CSBgxyj+nsou1kVF7tmEPjry7i4MuXhzwbtQjkE +Lndwv16m5ntiXbhA8gUCVykH9ORSDivi2868TOBIf7GiB+V5rTKX2RICjafe +2ytQ5nQbKPauIlBJaLtdKbW+Un8ebZe+RWCGn53cfsp8JwQn3twj8APLrUeC +slj1ru2mTZTHTcYTqfV70WTI5b9WAucVZKw1KMv2xcbfeUpg7oeveQPU+lfh +qGlXfEPg+5jdX1QoG9lLu3J9I3BL1pPYa9T+evLtbnzDOIFZl0O0DChbxtqV +RE4T2FO0sf8VtR/3lJ6YGFkkcGPAl7lJav8Gzk/Ht62no7hydjYXtb91D/uI +fBWgo+zt/T1RnDXAPdZfzilGR32vJ2ljHDVQ8q75rYEsHX/8vL6rgcqLgYdn +lW9rU88PJOkYUHlTsX1t02s9On5/fI129j8qn6r/2TOFdEylb034tkzVwyu+ +iVss6Jhn9eVeEpVX1smM3svudLw9eIyeQ+WdzH83gxoO0HHS0oSjc57KuwhZ +zg9+dIy3jju4mnLqwXWqYuHU+8QMdPjNkdBo8eF4Riodv3nk8vH8ouqLQMLW +aBYdf06lvrhC5TFb2uzjvDt0dPGbqi4dI6GT09/5zn06quFp1WujJATM2iVP +t9AxUVRtVeEICcW98u98++nonsBm5EXlv8ilthR7TllcVaRtu7ufhIUtfw2o +OMgiz5Sb5g2qXs1dlEjQdJbFu/mdvBaPSZjZoCDPcJfFyTiZl9+aSJj4xfA3 +8ZPFpSd6EpKNVD297zXnHCuLYw/zvzjXkdBhcZcvtUQWzTbHFO+qJCE/wA0+ +z8piJacQjuSQkPvh4OeRRVnEzKM6m6j6fcY6LPnHiixetes296Hqe4Zm6tN5 +HjnsySxo7jtNQuIf1p4NMnL4auymWmEy9X1pqw/pm8rhYkurfWEECfrlFUXn +zsmhkWzmwxRHEt4R5Zd2FMjhg2v8Btn21HydKyucuSSHNowurwI7qp4llF6w +K5PDjA1m10qp84rG3qI8vno5rE8M07hsSsLm1WcyUz7JIS0u4J+N2tR4uUfH +RyjL46euHnqiIAnTAuYejk3yyAlzMnVPWNAbKPvS/4k83ipFa84WFjS2LkLc +M3kUHKET5k3U+TCqnHb9rTw2fM2/8bKeBWqfeT8ujMnjHVX+nEcsFgSzXuy7 +KKiAvOlCOloFLBizdnAZPqCActdu8PoFsmD4tIdjKJciskUNK4dxs8BsMtLs +i/ZGtPvv2ugjRjWMe3GH3YrbhCPD+bsbjldS/yeiHCeaNiP71qMtE8cqQOC5 +Ykb1pBKOB6z0CMfdAKnUKhttbWW0yTo5yGd9HfK2MP4S9FVBzaLH8q3GpdAh +YbjtV5Yqal1I5VExLwZdqabMrW+34q2JiFGfbVeAj/NKuGeiGoZlJMk92FsE +Mgk0fSdFdTSecLmh8/EC8Ci43rF7oo5aJ8P+iLudB1WmeFXkPg3cE/jJNNrx +HIQOCDSbs2niv+mDpqN2OTD567SDWZ4mXnMX7e9/nAk7t7bmm6lo4ZLkzZ3O +HOnw8Jfen9+dWmgZH/nMrDAVgpU1+l95b0MdDlb40+UkYE4c6Hbi0cYy1Xuf +r55KgB3yYrvXX9HGxfjCI0bRsbAp/tTRpu3bUWpBtzbnzlFQ8mY0KPRvR86e +KOsC03Dwfngw6dZhHVz/51nmWOMhmAgai9wRroOD6fURH8hDcFQ6MOBthA6W +hy9Z9xcfglMxIXbz0Tp4rj3pyXTqIajWjSD0U3QwrPuMTq7tIVi6c7y+OV8H +B7gXNoe0h0B2VeHM62Yd3Md5hMNePhgairoPTAszUErkW2AIfwAMWtLdI8QY +6O/9cGPAoj+wLQQ5/ZFgYOVowMXIIX8wsuWyWk0wsLb/d07TbX9oZdfdLq7E +wG6RDWU0F394tv8Sj6EBA7OWAx0mrvtBv7x/ZaYPA/M+69hctDkIM9dXfm+9 +y0B6uoT7zk5v+OpoWnSyloF8Vw+qhNZ7Q++q9F1D9xmoN+p2tuyGN9z3kDh/ +rpGBy47KIgYnvCFRbJvucjsDD84SosvoDX+l+sd0vGdgn/nhpWd3DoCy7xs2 +bw5d/Dfu6uLxci/wUijnyd+ti+s7QsO67npCVIubv6KNLh5Y/j5w85onZHoL +PCXtdPFKylWZs7meUF9y7PTTPbr45vTkwslITxBS3LVh2VMX+RIv6/LqeEKr +4hchjwhdVNcLfxxw3wOUNtEIxUu6WHwy1ObBOXeYVsrRJqd0UWKz0LZ7Uq7Q ++wx3CP7SRTdp9XjxVa7QGDzxd/isLm5TX3yU/t0FMkizw9qLVH+M5IXKOhdQ +0mWrqOPUQ/MbVqOvnVxgv1kQvVlED4OKBb3OFThDt+9O3m59PSy5OJ9aq+wE +94r/fJpN1UMTRsyLyURH0DYO/22epoeiawMkxEMc4fancd6idD0sDRQcsnVx +BFJmYLt5th6uC5VrmdZ0hIq8xvTCAj1MUTEnR784QNHpZMbOSj0MGT58iGXp +ACfDN2Tldelhstq1Qy4K9uBsIod6MvrIPvbhCBu7HSx3c/M1E/o4o8wV5DJp +C0XeE+/M5fTRZm7yZcsHW/iaUhvpvEkfT7vasNrqbCG03brqmIY+osnHs8lH +bOGUVYzMPVPq/pegDa9/2EDd3jdLWiH6CM+WlF++tgbJoBO1qo36uDb+aYmb +kCVkrPhsS2vSx8/cF1nsixbAkW3KGnmsj7pckXN1Hy1g7M7qsqJ2fbTrmx8L +KbeAOrakPIEufZTYJtHwydgCnM/ER8590ccce1+1nqPmkHf/2LaH65hYtlgw +UfBzFwivDWTt3sPEj+Ele0HWFIqNY6OmnJi4Rd4Y49aagkZshnGOKxM7jt9V +evtzB1hNVb/p9WSiiv3zurbmHZDydnbBK5CJ/v0yNx/67ID5K3FGUQlMTH3N +o/ah2gT69XK6SsuZ+CnVdt7TwRgOHim+YFbJxJKMVXf2oTHMVd72Hq9mokSt +qHzwFmMQkO39rX6HieL/OXQ8YzcGC25pqQeNTBztKbGJqzKC+u7SA11vmPjS +lDFfxmcE5nz3VCJ6megQpJf4bdEQene2z4m9Y+KqBvZS3RFDmKn7nuo2yMQ1 +Nf0R4o2GoHJZ7eboGBPt5JwONIQaQn2/YcTpH0wUGmn+nOduCOZCf8PWKSYK +Gm8KT7Y0BJ8TR16FzzIx64VTeq4i1V5jSr7oPBMF/uGYqRc0hMTFXK+6RSbu +u+2yZZbNEP7SKlPet8zEUzlTsjiBUBhUN7uywsSF73s6Lr5D+B9k3pbs "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12940,130 +13164,131 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k4VdsbB3BDhZKueXb2MVVCpuTgeF9DypDpogwZEjIXogzXEFLiGiqi +pEKJcLYmUkSESgNlqKQokQyFENdv//7az+fZ+1lr7zV837Xp+0PsvDnY2Ng0 +2NnY/n+dG2h/LJ9WbJDG5Dn24LmxQXeh2DHD3kQYmOf+nqgkCyj8Yr9YbzaI +/LjA7aSkARE2N3o4e6/AQLM6TV/JCPgnRLMXekjYUzbdvl7JDj7WW4XM9DRB +yZAiEbl5P5jKj32Y7nkNSZM7/6hsDIWFnu1np3o+w9VzQ+NCMonQbHyt+NWV +X0AshucRd7NB6mPt1/3Ky8DJbefhE1QAQoHuN7iMOZHj0hF/j9bLkK1uet/K +gRubg0xXvxgsgb48tcbpv9bj0vs1fpvcyiCtOO4Fhzg/uv/LyT5ZWwHmWn4C +wnL8SNxe91u1tQK4H9s5bFThx5BIv8O+rysgaUjhnYUhPzJjuMYejVVAjOyz +r2f8+NHHtrJcSvImBBeJ/adYx4+1620SfaNugu0FlrKFiwB24+wtY81KED0z +dDLnoiCazn69eSO9CsS23E6aLxVEM6GKf81zq0CiKSVuX7Ugan1aTB4qqgKZ +qc1HNjYLYmpqZDnbrSpQsDzkcf+bIB7K2lk70lcFmquWtYc0hVCr7Pq0pkA1 +WIeLDGt0CKGnfF6KkHM12Kz7NpDbJYRNN5tY4W7VYHeltm/pvRDe5yl0fLW/ +Ghxfur5onRTCK7eur4sPqIZ9ylfrnIWFsdhGRrQmphoChrdmJXoIo2T05r0h +hdVwwt7M4PWcMDp0WY8yP1aDxK1OCQ52EQwyVLBIGKqGSkH73+rrRFDxuUdU +40g1vH3tVp1FE8FLoRdBY6oa5G3DZW13ieDV8ByXITYWNO2+tObleRGseWOS +HU1nwbLpbOdzfVGMypyWSHRnQWZpVPmyqSg+NZU/b+DFAvk1bKkqtqK4uS/3 +/ZwPCyxb1hqme4ui9flK0jmYBfnGRI1lhigKsM3kTsawQActcp9+FMUjs8pb +rc6zIIxx2b09UQy3hJ1SGuhkgXkR34zFaTEM7qp88P4VC2S5YlI7z4qh/ceZ +Sz3dLHjZ7cjqui6Grqsk7Zr6WaB6iJdzoFMMIyJSgwO+suBbaWTpTwlxFAh4 +dJ53mQWuQlY/JGvE8cs7lZNpG0nQjL6fUFgvjqdkc9SFlEhY+3mTCL1VHDPY +pVTOK5NQW8UJin3i6BvqL5OnToKIRW2m2oo4fupdnPTTI+FlgrzWDgsJrM7/ +kLjPigSTycWo4CEJtHhQuSPlMAnHdp1RejQugVM8/fv/DSOh8rJKv+CcBK6d +MWM7e4QEMXsPRi23JB5Is3hw9hgJ4/dafnOqSmLJc1ezoAQSchIzw88flcQd +/X4L4ZkktL3bLD+eIIlT5V9NTLNJWNJq7jJIk0TlzFARoTMk+IzMagxflMTB +CavdJbkk6Fq6TKs2S2J6Z6RwYSEJn4UVgx+vl8LYH++DRstJEA1pkBYVlcIf +FcqWx2+SYNm297kfIYURTz3uileRcCcqTXmDphTq2lhr65MknPo4Nea0VwoV +/g4e2nOPBI2y+76TV6Twet8u37FmEnw5HESNKqTQp8939+4WEi64TLSeuS2F +cadN2ipaSVjDR1fUbZNCLkObfzzbSegPTRlO+iGFQ4F5i5c7SUjQt/WU0JHG +jp59lXG9JOxyK/y53UgaaxmZx1v6SOCL/37cwVIaG6PeuHK9o9pvTi7N9JDG +gslzMnEfSLhnXvd9zUlpNGHXmjH4TEJcIFesfI40vj2osXJgiATTDHs+o4vS +uOHqfqETwyR0v5pQi2VJ497peI+GryRM7ZWL+NUnjTH7xM6xfSfhbtQhLv5h +aXQqWOHmGifhnwsP8lQnpPG6dNppnh8k8A7uue/HIYMZhYNtHJMkbPQ9zTao +JINWTdyqrT9JcDsye+pZtAxGbcjwz1ogQSHXSGosWQbvLH/f7bT4//n+9yZX +pgy2xT6xlv5DQtTS5pdGxTL4TeU8eX6JhLPH3YRrn8ng3ddOfAdWSHAtKS99 ++1YGP6lYrfCy1YDsk/ntM4MyeLRPToSkXL02x3nrrAy2CujXTrHXwLOsJ5dK +pGkY/PXTJKyqgZwaIfXmjTSclstX6qDs/MazaVCdhva3h7NtVtfAN7GlYUlT +GuZ9p03ZrqmBKl2zCIYNDRfWrxt5RjnC9RzXHmcapsXGbjDhqgHOIjWl7GAa +viUW5xW5a6DjUez9qqM0XK/MXZ9NOXOow/J5Ig3fqJfcWqQss9E7hDuXhsT5 +IvMGnhr4sotkU7xMw3R+3jHJtTVQ4b+SZVxOw5pqojmcsm7l+Vv/NNDwz6ZA +Rcl1NWDS07k80UbDmy+dirwoW7Gt2un+moZV/Ynd1yl72QX3wRcasj+ZCd7M +WwPB0Vdlqydo+O7q3NsDlI8W9wYQ8zTk7SlZukDZNJoeF7+awG1pJ5I419fA +0w31V3XWEhj3/Ng3dco2xY5tU3wEnhvJW7+P8lud6fHrggQe7mqdSaLs8jyN +31OMwDaPr4VllAc9FbXFpQlM03rH+5Syz1yj8ys6gaZtJ2GU8vdTLnEnFQmM +9evZvoqvBg7R5q4abiFwPePGnCTl2ZrMtoWtVH9KozFqlKN2bfnB0iJwmDPm +qSFltg8t/P4MArVcLYasKScf9tCWNSCwtQBbnCmvXfPHud+IQO4/O0L3U87M +PxuXvZNA9UTT7z6UhbeqFZtbEniQW1X9IOX85o42DlsCnTVHTf5/n7bX+0ed +A4HHIrw3elIuHl/hD3MmMEAgq28vZaWEfO0t7gT6Crm47qZcJbzNZciLwGyH +mmoDylo3XsQVHKTajzrVo0y5zsC/+O8gAvl/vnolShm6VrWvCyXwxWx00Qo1 +Ho99L/1ojiBwd2q0yTBlsyWGQEw0gYJHHj9sodyZ2a2tFU9go7XFX8WU7RVC +XMaTCCwJW60bR7mvlie++CSBgxyj+nsou1kVF7tmEPjry7i4MuXhzwbtQjkE +Lndwv16m5ntiXbhA8gUCVykH9ORSDivi2868TOBIf7GiB+V5rTKX2RICjafe +2ytQ5nQbKPauIlBJaLtdKbW+Un8ebZe+RWCGn53cfsp8JwQn3twj8APLrUeC +slj1ru2mTZTHTcYTqfV70WTI5b9WAucVZKw1KMv2xcbfeUpg7oeveQPU+lfh +qGlXfEPg+5jdX1QoG9lLu3J9I3BL1pPYa9T+evLtbnzDOIFZl0O0DChbxtqV +RE4T2FO0sf8VtR/3lJ6YGFkkcGPAl7lJav8Gzk/Ht62no7hydjYXtb91D/uI +fBWgo+zt/T1RnDXAPdZfzilGR32vJ2ljHDVQ8q75rYEsHX/8vL6rgcqLgYdn +lW9rU88PJOkYUHlTsX1t02s9On5/fI129j8qn6r/2TOFdEylb034tkzVwyu+ +iVss6Jhn9eVeEpVX1smM3svudLw9eIyeQ+WdzH83gxoO0HHS0oSjc57KuwhZ +zg9+dIy3jju4mnLqwXWqYuHU+8QMdPjNkdBo8eF4Riodv3nk8vH8ouqLQMLW +aBYdf06lvrhC5TFb2uzjvDt0dPGbqi4dI6GT09/5zn06quFp1WujJATM2iVP +t9AxUVRtVeEICcW98u98++nonsBm5EXlv8ilthR7TllcVaRtu7ufhIUtfw2o +OMgiz5Sb5g2qXs1dlEjQdJbFu/mdvBaPSZjZoCDPcJfFyTiZl9+aSJj4xfA3 +8ZPFpSd6EpKNVD297zXnHCuLYw/zvzjXkdBhcZcvtUQWzTbHFO+qJCE/wA0+ +z8piJacQjuSQkPvh4OeRRVnEzKM6m6j6fcY6LPnHiixetes296Hqe4Zm6tN5 +HjnsySxo7jtNQuIf1p4NMnL4auymWmEy9X1pqw/pm8rhYkurfWEECfrlFUXn +zsmhkWzmwxRHEt4R5Zd2FMjhg2v8Btn21HydKyucuSSHNowurwI7qp4llF6w +K5PDjA1m10qp84rG3qI8vno5rE8M07hsSsLm1WcyUz7JIS0u4J+N2tR4uUfH +RyjL46euHnqiIAnTAuYejk3yyAlzMnVPWNAbKPvS/4k83ipFa84WFjS2LkLc +M3kUHKET5k3U+TCqnHb9rTw2fM2/8bKeBWqfeT8ujMnjHVX+nEcsFgSzXuy7 +KKiAvOlCOloFLBizdnAZPqCActdu8PoFsmD4tIdjKJciskUNK4dxs8BsMtLs +i/ZGtPvv2ugjRjWMe3GH3YrbhCPD+bsbjldS/yeiHCeaNiP71qMtE8cqQOC5 +Ykb1pBKOB6z0CMfdAKnUKhttbWW0yTo5yGd9HfK2MP4S9FVBzaLH8q3GpdAh +YbjtV5Yqal1I5VExLwZdqabMrW+34q2JiFGfbVeAj/NKuGeiGoZlJMk92FsE +Mgk0fSdFdTSecLmh8/EC8Ci43rF7oo5aJ8P+iLudB1WmeFXkPg3cE/jJNNrx +HIQOCDSbs2niv+mDpqN2OTD567SDWZ4mXnMX7e9/nAk7t7bmm6lo4ZLkzZ3O +HOnw8Jfen9+dWmgZH/nMrDAVgpU1+l95b0MdDlb40+UkYE4c6Hbi0cYy1Xuf +r55KgB3yYrvXX9HGxfjCI0bRsbAp/tTRpu3bUWpBtzbnzlFQ8mY0KPRvR86e +KOsC03Dwfngw6dZhHVz/51nmWOMhmAgai9wRroOD6fURH8hDcFQ6MOBthA6W +hy9Z9xcfglMxIXbz0Tp4rj3pyXTqIajWjSD0U3QwrPuMTq7tIVi6c7y+OV8H +B7gXNoe0h0B2VeHM62Yd3Md5hMNePhgairoPTAszUErkW2AIfwAMWtLdI8QY +6O/9cGPAoj+wLQQ5/ZFgYOVowMXIIX8wsuWyWk0wsLb/d07TbX9oZdfdLq7E +wG6RDWU0F394tv8Sj6EBA7OWAx0mrvtBv7x/ZaYPA/M+69hctDkIM9dXfm+9 +y0B6uoT7zk5v+OpoWnSyloF8Vw+qhNZ7Q++q9F1D9xmoN+p2tuyGN9z3kDh/ +rpGBy47KIgYnvCFRbJvucjsDD84SosvoDX+l+sd0vGdgn/nhpWd3DoCy7xs2 +bw5d/Dfu6uLxci/wUijnyd+ti+s7QsO67npCVIubv6KNLh5Y/j5w85onZHoL +PCXtdPFKylWZs7meUF9y7PTTPbr45vTkwslITxBS3LVh2VMX+RIv6/LqeEKr +4hchjwhdVNcLfxxw3wOUNtEIxUu6WHwy1ObBOXeYVsrRJqd0UWKz0LZ7Uq7Q ++wx3CP7SRTdp9XjxVa7QGDzxd/isLm5TX3yU/t0FMkizw9qLVH+M5IXKOhdQ +0mWrqOPUQ/MbVqOvnVxgv1kQvVlED4OKBb3OFThDt+9O3m59PSy5OJ9aq+wE +94r/fJpN1UMTRsyLyURH0DYO/22epoeiawMkxEMc4fancd6idD0sDRQcsnVx +BFJmYLt5th6uC5VrmdZ0hIq8xvTCAj1MUTEnR784QNHpZMbOSj0MGT58iGXp +ACfDN2Tldelhstq1Qy4K9uBsIod6MvrIPvbhCBu7HSx3c/M1E/o4o8wV5DJp +C0XeE+/M5fTRZm7yZcsHW/iaUhvpvEkfT7vasNrqbCG03brqmIY+osnHs8lH +bOGUVYzMPVPq/pegDa9/2EDd3jdLWiH6CM+WlF++tgbJoBO1qo36uDb+aYmb +kCVkrPhsS2vSx8/cF1nsixbAkW3KGnmsj7pckXN1Hy1g7M7qsqJ2fbTrmx8L +KbeAOrakPIEufZTYJtHwydgCnM/ER8590ccce1+1nqPmkHf/2LaH65hYtlgw +UfBzFwivDWTt3sPEj+Ele0HWFIqNY6OmnJi4Rd4Y49aagkZshnGOKxM7jt9V +evtzB1hNVb/p9WSiiv3zurbmHZDydnbBK5CJ/v0yNx/67ID5K3FGUQlMTH3N +o/ah2gT69XK6SsuZ+CnVdt7TwRgOHim+YFbJxJKMVXf2oTHMVd72Hq9mokSt +qHzwFmMQkO39rX6HieL/OXQ8YzcGC25pqQeNTBztKbGJqzKC+u7SA11vmPjS +lDFfxmcE5nz3VCJ6megQpJf4bdEQene2z4m9Y+KqBvZS3RFDmKn7nuo2yMQ1 +Nf0R4o2GoHJZ7eboGBPt5JwONIQaQn2/YcTpH0wUGmn+nOduCOZCf8PWKSYK +Gm8KT7Y0BJ8TR16FzzIx64VTeq4i1V5jSr7oPBMF/uGYqRc0hMTFXK+6RSbu +u+2yZZbNEP7SKlPet8zEUzlTsjiBUBhUN7uywsSF73s6Lr5D+B9k3pbs "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.0744385833804998}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13075,19 +13300,19 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.0744385833804998}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13101,129 +13326,130 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k4VdsbB3BDhZKueXb2MVVCpuTgeF9DypDpogwZEjIXogzXEFLiGiqi +pEKJcLYmUkSESgNlqKQokQyFENdv//7az+fZ+1lr7zV837Xp+0PsvDnY2Ng0 +2NnY/n+dG2h/LJ9WbJDG5Dn24LmxQXeh2DHD3kQYmOf+nqgkCyj8Yr9YbzaI +/LjA7aSkARE2N3o4e6/AQLM6TV/JCPgnRLMXekjYUzbdvl7JDj7WW4XM9DRB +yZAiEbl5P5jKj32Y7nkNSZM7/6hsDIWFnu1np3o+w9VzQ+NCMonQbHyt+NWV +X0AshucRd7NB6mPt1/3Ky8DJbefhE1QAQoHuN7iMOZHj0hF/j9bLkK1uet/K +gRubg0xXvxgsgb48tcbpv9bj0vs1fpvcyiCtOO4Fhzg/uv/LyT5ZWwHmWn4C +wnL8SNxe91u1tQK4H9s5bFThx5BIv8O+rysgaUjhnYUhPzJjuMYejVVAjOyz +r2f8+NHHtrJcSvImBBeJ/adYx4+1620SfaNugu0FlrKFiwB24+wtY81KED0z +dDLnoiCazn69eSO9CsS23E6aLxVEM6GKf81zq0CiKSVuX7Ugan1aTB4qqgKZ +qc1HNjYLYmpqZDnbrSpQsDzkcf+bIB7K2lk70lcFmquWtYc0hVCr7Pq0pkA1 +WIeLDGt0CKGnfF6KkHM12Kz7NpDbJYRNN5tY4W7VYHeltm/pvRDe5yl0fLW/ +Ghxfur5onRTCK7eur4sPqIZ9ylfrnIWFsdhGRrQmphoChrdmJXoIo2T05r0h +hdVwwt7M4PWcMDp0WY8yP1aDxK1OCQ52EQwyVLBIGKqGSkH73+rrRFDxuUdU +40g1vH3tVp1FE8FLoRdBY6oa5G3DZW13ieDV8ByXITYWNO2+tObleRGseWOS +HU1nwbLpbOdzfVGMypyWSHRnQWZpVPmyqSg+NZU/b+DFAvk1bKkqtqK4uS/3 +/ZwPCyxb1hqme4ui9flK0jmYBfnGRI1lhigKsM3kTsawQActcp9+FMUjs8pb +rc6zIIxx2b09UQy3hJ1SGuhkgXkR34zFaTEM7qp88P4VC2S5YlI7z4qh/ceZ +Sz3dLHjZ7cjqui6Grqsk7Zr6WaB6iJdzoFMMIyJSgwO+suBbaWTpTwlxFAh4 +dJ53mQWuQlY/JGvE8cs7lZNpG0nQjL6fUFgvjqdkc9SFlEhY+3mTCL1VHDPY +pVTOK5NQW8UJin3i6BvqL5OnToKIRW2m2oo4fupdnPTTI+FlgrzWDgsJrM7/ +kLjPigSTycWo4CEJtHhQuSPlMAnHdp1RejQugVM8/fv/DSOh8rJKv+CcBK6d +MWM7e4QEMXsPRi23JB5Is3hw9hgJ4/dafnOqSmLJc1ezoAQSchIzw88flcQd +/X4L4ZkktL3bLD+eIIlT5V9NTLNJWNJq7jJIk0TlzFARoTMk+IzMagxflMTB +CavdJbkk6Fq6TKs2S2J6Z6RwYSEJn4UVgx+vl8LYH++DRstJEA1pkBYVlcIf +FcqWx2+SYNm297kfIYURTz3uileRcCcqTXmDphTq2lhr65MknPo4Nea0VwoV +/g4e2nOPBI2y+76TV6Twet8u37FmEnw5HESNKqTQp8939+4WEi64TLSeuS2F +cadN2ipaSVjDR1fUbZNCLkObfzzbSegPTRlO+iGFQ4F5i5c7SUjQt/WU0JHG +jp59lXG9JOxyK/y53UgaaxmZx1v6SOCL/37cwVIaG6PeuHK9o9pvTi7N9JDG +gslzMnEfSLhnXvd9zUlpNGHXmjH4TEJcIFesfI40vj2osXJgiATTDHs+o4vS +uOHqfqETwyR0v5pQi2VJ497peI+GryRM7ZWL+NUnjTH7xM6xfSfhbtQhLv5h +aXQqWOHmGifhnwsP8lQnpPG6dNppnh8k8A7uue/HIYMZhYNtHJMkbPQ9zTao +JINWTdyqrT9JcDsye+pZtAxGbcjwz1ogQSHXSGosWQbvLH/f7bT4//n+9yZX +pgy2xT6xlv5DQtTS5pdGxTL4TeU8eX6JhLPH3YRrn8ng3ddOfAdWSHAtKS99 ++1YGP6lYrfCy1YDsk/ntM4MyeLRPToSkXL02x3nrrAy2CujXTrHXwLOsJ5dK +pGkY/PXTJKyqgZwaIfXmjTSclstX6qDs/MazaVCdhva3h7NtVtfAN7GlYUlT +GuZ9p03ZrqmBKl2zCIYNDRfWrxt5RjnC9RzXHmcapsXGbjDhqgHOIjWl7GAa +viUW5xW5a6DjUez9qqM0XK/MXZ9NOXOow/J5Ig3fqJfcWqQss9E7hDuXhsT5 +IvMGnhr4sotkU7xMw3R+3jHJtTVQ4b+SZVxOw5pqojmcsm7l+Vv/NNDwz6ZA +Rcl1NWDS07k80UbDmy+dirwoW7Gt2un+moZV/Ynd1yl72QX3wRcasj+ZCd7M +WwPB0Vdlqydo+O7q3NsDlI8W9wYQ8zTk7SlZukDZNJoeF7+awG1pJ5I419fA +0w31V3XWEhj3/Ng3dco2xY5tU3wEnhvJW7+P8lud6fHrggQe7mqdSaLs8jyN +31OMwDaPr4VllAc9FbXFpQlM03rH+5Syz1yj8ys6gaZtJ2GU8vdTLnEnFQmM +9evZvoqvBg7R5q4abiFwPePGnCTl2ZrMtoWtVH9KozFqlKN2bfnB0iJwmDPm +qSFltg8t/P4MArVcLYasKScf9tCWNSCwtQBbnCmvXfPHud+IQO4/O0L3U87M +PxuXvZNA9UTT7z6UhbeqFZtbEniQW1X9IOX85o42DlsCnTVHTf5/n7bX+0ed +A4HHIrw3elIuHl/hD3MmMEAgq28vZaWEfO0t7gT6Crm47qZcJbzNZciLwGyH +mmoDylo3XsQVHKTajzrVo0y5zsC/+O8gAvl/vnolShm6VrWvCyXwxWx00Qo1 +Ho99L/1ojiBwd2q0yTBlsyWGQEw0gYJHHj9sodyZ2a2tFU9go7XFX8WU7RVC +XMaTCCwJW60bR7mvlie++CSBgxyj+nsou1kVF7tmEPjry7i4MuXhzwbtQjkE +Lndwv16m5ntiXbhA8gUCVykH9ORSDivi2868TOBIf7GiB+V5rTKX2RICjafe +2ytQ5nQbKPauIlBJaLtdKbW+Un8ebZe+RWCGn53cfsp8JwQn3twj8APLrUeC +slj1ru2mTZTHTcYTqfV70WTI5b9WAucVZKw1KMv2xcbfeUpg7oeveQPU+lfh +qGlXfEPg+5jdX1QoG9lLu3J9I3BL1pPYa9T+evLtbnzDOIFZl0O0DChbxtqV +RE4T2FO0sf8VtR/3lJ6YGFkkcGPAl7lJav8Gzk/Ht62no7hydjYXtb91D/uI +fBWgo+zt/T1RnDXAPdZfzilGR32vJ2ljHDVQ8q75rYEsHX/8vL6rgcqLgYdn +lW9rU88PJOkYUHlTsX1t02s9On5/fI129j8qn6r/2TOFdEylb034tkzVwyu+ +iVss6Jhn9eVeEpVX1smM3svudLw9eIyeQ+WdzH83gxoO0HHS0oSjc57KuwhZ +zg9+dIy3jju4mnLqwXWqYuHU+8QMdPjNkdBo8eF4Riodv3nk8vH8ouqLQMLW +aBYdf06lvrhC5TFb2uzjvDt0dPGbqi4dI6GT09/5zn06quFp1WujJATM2iVP +t9AxUVRtVeEICcW98u98++nonsBm5EXlv8ilthR7TllcVaRtu7ufhIUtfw2o +OMgiz5Sb5g2qXs1dlEjQdJbFu/mdvBaPSZjZoCDPcJfFyTiZl9+aSJj4xfA3 +8ZPFpSd6EpKNVD297zXnHCuLYw/zvzjXkdBhcZcvtUQWzTbHFO+qJCE/wA0+ +z8piJacQjuSQkPvh4OeRRVnEzKM6m6j6fcY6LPnHiixetes296Hqe4Zm6tN5 +HjnsySxo7jtNQuIf1p4NMnL4auymWmEy9X1pqw/pm8rhYkurfWEECfrlFUXn +zsmhkWzmwxRHEt4R5Zd2FMjhg2v8Btn21HydKyucuSSHNowurwI7qp4llF6w +K5PDjA1m10qp84rG3qI8vno5rE8M07hsSsLm1WcyUz7JIS0u4J+N2tR4uUfH +RyjL46euHnqiIAnTAuYejk3yyAlzMnVPWNAbKPvS/4k83ipFa84WFjS2LkLc +M3kUHKET5k3U+TCqnHb9rTw2fM2/8bKeBWqfeT8ujMnjHVX+nEcsFgSzXuy7 +KKiAvOlCOloFLBizdnAZPqCActdu8PoFsmD4tIdjKJciskUNK4dxs8BsMtLs +i/ZGtPvv2ugjRjWMe3GH3YrbhCPD+bsbjldS/yeiHCeaNiP71qMtE8cqQOC5 +Ykb1pBKOB6z0CMfdAKnUKhttbWW0yTo5yGd9HfK2MP4S9FVBzaLH8q3GpdAh +YbjtV5Yqal1I5VExLwZdqabMrW+34q2JiFGfbVeAj/NKuGeiGoZlJMk92FsE +Mgk0fSdFdTSecLmh8/EC8Ci43rF7oo5aJ8P+iLudB1WmeFXkPg3cE/jJNNrx +HIQOCDSbs2niv+mDpqN2OTD567SDWZ4mXnMX7e9/nAk7t7bmm6lo4ZLkzZ3O +HOnw8Jfen9+dWmgZH/nMrDAVgpU1+l95b0MdDlb40+UkYE4c6Hbi0cYy1Xuf +r55KgB3yYrvXX9HGxfjCI0bRsbAp/tTRpu3bUWpBtzbnzlFQ8mY0KPRvR86e +KOsC03Dwfngw6dZhHVz/51nmWOMhmAgai9wRroOD6fURH8hDcFQ6MOBthA6W +hy9Z9xcfglMxIXbz0Tp4rj3pyXTqIajWjSD0U3QwrPuMTq7tIVi6c7y+OV8H +B7gXNoe0h0B2VeHM62Yd3Md5hMNePhgairoPTAszUErkW2AIfwAMWtLdI8QY +6O/9cGPAoj+wLQQ5/ZFgYOVowMXIIX8wsuWyWk0wsLb/d07TbX9oZdfdLq7E +wG6RDWU0F394tv8Sj6EBA7OWAx0mrvtBv7x/ZaYPA/M+69hctDkIM9dXfm+9 +y0B6uoT7zk5v+OpoWnSyloF8Vw+qhNZ7Q++q9F1D9xmoN+p2tuyGN9z3kDh/ +rpGBy47KIgYnvCFRbJvucjsDD84SosvoDX+l+sd0vGdgn/nhpWd3DoCy7xs2 +bw5d/Dfu6uLxci/wUijnyd+ti+s7QsO67npCVIubv6KNLh5Y/j5w85onZHoL +PCXtdPFKylWZs7meUF9y7PTTPbr45vTkwslITxBS3LVh2VMX+RIv6/LqeEKr +4hchjwhdVNcLfxxw3wOUNtEIxUu6WHwy1ObBOXeYVsrRJqd0UWKz0LZ7Uq7Q ++wx3CP7SRTdp9XjxVa7QGDzxd/isLm5TX3yU/t0FMkizw9qLVH+M5IXKOhdQ +0mWrqOPUQ/MbVqOvnVxgv1kQvVlED4OKBb3OFThDt+9O3m59PSy5OJ9aq+wE +94r/fJpN1UMTRsyLyURH0DYO/22epoeiawMkxEMc4fancd6idD0sDRQcsnVx +BFJmYLt5th6uC5VrmdZ0hIq8xvTCAj1MUTEnR784QNHpZMbOSj0MGT58iGXp +ACfDN2Tldelhstq1Qy4K9uBsIod6MvrIPvbhCBu7HSx3c/M1E/o4o8wV5DJp +C0XeE+/M5fTRZm7yZcsHW/iaUhvpvEkfT7vasNrqbCG03brqmIY+osnHs8lH +bOGUVYzMPVPq/pegDa9/2EDd3jdLWiH6CM+WlF++tgbJoBO1qo36uDb+aYmb +kCVkrPhsS2vSx8/cF1nsixbAkW3KGnmsj7pckXN1Hy1g7M7qsqJ2fbTrmx8L +KbeAOrakPIEufZTYJtHwydgCnM/ER8590ccce1+1nqPmkHf/2LaH65hYtlgw +UfBzFwivDWTt3sPEj+Ele0HWFIqNY6OmnJi4Rd4Y49aagkZshnGOKxM7jt9V +evtzB1hNVb/p9WSiiv3zurbmHZDydnbBK5CJ/v0yNx/67ID5K3FGUQlMTH3N +o/ah2gT69XK6SsuZ+CnVdt7TwRgOHim+YFbJxJKMVXf2oTHMVd72Hq9mokSt +qHzwFmMQkO39rX6HieL/OXQ8YzcGC25pqQeNTBztKbGJqzKC+u7SA11vmPjS +lDFfxmcE5nz3VCJ6megQpJf4bdEQene2z4m9Y+KqBvZS3RFDmKn7nuo2yMQ1 +Nf0R4o2GoHJZ7eboGBPt5JwONIQaQn2/YcTpH0wUGmn+nOduCOZCf8PWKSYK +Gm8KT7Y0BJ8TR16FzzIx64VTeq4i1V5jSr7oPBMF/uGYqRc0hMTFXK+6RSbu +u+2yZZbNEP7SKlPet8zEUzlTsjiBUBhUN7uywsSF73s6Lr5D+B9k3pbs "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.0744385833804998}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13234,6 +13460,7 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13261,7 +13488,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07335635796919572}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0744385833804998}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13269,9 +13497,10 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913457856953163`*^9}, + CellChangeTimes->{3.9913457856953163`*^9, 3.994352289637529*^9, + 3.994354644716838*^9}, CellLabel-> - "Out[421]=",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] + "Out[169]=",ExpressionUUID->"b7b25a0a-f011-4248-adef-ce72b060bdbd"] }, Open ]], Cell[CellGroupData[{ @@ -13324,66 +13553,78 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[422]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], + "In[170]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 422, 453, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785749161*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.884808547861024`*^-161\\\", \ +RowBox[{\\\"164243120455479739170682508554789627978\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"75\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"4724542670438400000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 170, + 17, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.99435228981658*^9, + 3.9943546448858967`*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], +In[170]:=",ExpressionUUID->"f227eee7-ce4e-4870-bb4e-7b4edeb0f968"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 454, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785759161*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.3827052732035246`*^-163\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 170, + 18, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.99435228981658*^9, + 3.994354644897317*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], +In[170]:=",ExpressionUUID->"8fbdeae9-1ea8-4cc7-bd9c-786991b074ab"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 455, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785767502*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1518458864317433`*^-166\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 170, + 19, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.99435228981658*^9, + 3.994354644911244*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], +In[170]:=",ExpressionUUID->"8f8a7288-8a5a-4e78-8ddb-59daad6a995c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 422, 456, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457857765007`*^9}, +during this calculation.\"", 2, 170, 20, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.99435228981658*^9, + 3.994354644922098*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], +In[170]:=",ExpressionUUID->"ddc8b8b8-7d17-4c57-9e15-636450d036fd"], -Cell[BoxData["10.362747935330768`"], "Output", - CellChangeTimes->{3.991345792196575*^9}, +Cell[BoxData["10.211439200033169`"], "Output", + CellChangeTimes->{3.991345792196575*^9, 3.994352375717607*^9, + 3.994354733340191*^9}, CellLabel-> - "Out[422]=",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] + "Out[170]=",ExpressionUUID->"0b1868eb-9a88-4d1a-a338-bb89e0779ab7"] }, Open ]], Cell[CellGroupData[{ @@ -13450,68 +13691,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918501903071613`*^9, - 3.9918501951272774`*^9}},ExpressionUUID->"0b10f52e-4583-2a4b-993d-\ -96e59dd43e6a"], + CellChangeTimes->{{3.9918501903071613`*^9, 3.9918501951272774`*^9}}, + CellLabel-> + "In[171]:=",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 457, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792232563*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.106038125832353`*^-204\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 171, + 21, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994352375795295*^9, + 3.994354733413806*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], +In[171]:=",ExpressionUUID->"7e6a8551-2377-4e29-be3c-ec2e4a19b406"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 458, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792242544*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.948278080102363`*^-209\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 171, + 22, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994352375795295*^9, + 3.9943547334257174`*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], +In[171]:=",ExpressionUUID->"ccb159d4-9926-4b28-810b-fb6c06718bb8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 459, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922505417`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1626311821085546`*^-213\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 171, + 23, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994352375795295*^9, + 3.994354733436285*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], +In[171]:=",ExpressionUUID->"4a1bd748-6b42-422f-a8d0-bb0b779fb832"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 423, 460, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922595577`*^9}, +during this calculation.\"", 2, 171, 24, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994352375795295*^9, + 3.994354733449724*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], +In[171]:=",ExpressionUUID->"7cb7d44b-8ca9-4e64-9210-c72e72eae3f6"], -Cell[BoxData["0.32136877427435395`"], "Output", - CellChangeTimes->{3.991345799137081*^9}, +Cell[BoxData["0.7856252554973007`"], "Output", + CellChangeTimes->{3.991345799137081*^9, 3.994352387912957*^9, + 3.994354745077639*^9}, CellLabel-> - "Out[423]=",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] + "Out[171]=",ExpressionUUID->"e97fa9e0-5fd3-4250-a9f8-9abbafda7e25"] }, Open ]], Cell[CellGroupData[{ @@ -13532,8 +13785,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13578,68 +13830,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185020477277*^9, - 3.991850207864538*^9}},ExpressionUUID->"a58948c9-6d3d-e847-a269-\ -d2e0cc5d1484"], + CellChangeTimes->{{3.99185020477277*^9, 3.991850207864538*^9}}, + CellLabel-> + "In[172]:=",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 461, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991730843`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.106038125832353`*^-204\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 172, + 25, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994352387979013*^9, + 3.99435474513636*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], +In[172]:=",ExpressionUUID->"f66e58ea-c873-40ef-a37b-8087d6ad590c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 462, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991830807`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.948278080102363`*^-209\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 172, + 26, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994352387979013*^9, + 3.994354745146062*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], +In[172]:=",ExpressionUUID->"0f9ef59c-d99f-4b5a-8494-d8cb9e4126a4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 463, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345799191578*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1626311821085546`*^-213\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 172, + 27, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994352387979013*^9, + 3.9943547451547747`*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], +In[172]:=",ExpressionUUID->"6c69a94a-9cd1-4597-bf5a-0124101caaee"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 424, 464, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457992005787`*^9}, +during this calculation.\"", 2, 172, 28, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994352387979013*^9, + 3.9943547451634607`*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], +In[172]:=",ExpressionUUID->"8adc6ee4-84e5-4ae8-a6c5-a6530733e69e"], -Cell[BoxData["6.886509882261309`"], "Output", - CellChangeTimes->{3.991345804559931*^9}, +Cell[BoxData["29.81968449724553`"], "Output", + CellChangeTimes->{3.991345804559931*^9, 3.9943523986815567`*^9, + 3.994354756028295*^9}, CellLabel-> - "Out[424]=",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] + "Out[172]=",ExpressionUUID->"8fe6b6fe-1d0d-4f9b-9450-bfd6dfc02803"] }, Open ]], Cell[CellGroupData[{ @@ -13660,8 +13924,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13706,68 +13969,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918502122939777`*^9, - 3.991850217343153*^9}},ExpressionUUID->"c817b2d1-7deb-5a45-9938-\ -ca10003188eb"], + CellChangeTimes->{{3.9918502122939777`*^9, 3.991850217343153*^9}}, + CellLabel-> + "In[173]:=",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 465, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046014442`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.106038125832353`*^-204\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 173, + 29, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9943523987576237`*^9, + 3.994354756104068*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], +In[173]:=",ExpressionUUID->"4c039fc4-8c5e-47ef-b184-037de968362c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 466, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046114445`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.948278080102363`*^-209\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 173, + 30, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9943523987576237`*^9, + 3.99435475611462*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], +In[173]:=",ExpressionUUID->"e5f66ba2-3769-486a-bea4-ab21bfdac0b9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 467, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345804619444*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1626311821085546`*^-213\\\", \ +RowBox[{\\\"302788506336550585827101492333375306034\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"37\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8005054611040868761600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 173, + 31, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9943523987576237`*^9, + 3.9943547561251507`*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], +In[173]:=",ExpressionUUID->"a8d14968-7d28-4b59-a6f7-5b085e51d005"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 425, 468, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046274433`*^9}, +during this calculation.\"", 2, 173, 32, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9943523987576237`*^9, + 3.99435475613525*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], +In[173]:=",ExpressionUUID->"0d219fef-8c50-46a5-a695-bd746477fc2b"], -Cell[BoxData["18.478556086442907`"], "Output", - CellChangeTimes->{3.991345807954506*^9}, +Cell[BoxData["5.201715998113613`"], "Output", + CellChangeTimes->{3.991345807954506*^9, 3.994352407737836*^9, + 3.9943547653666897`*^9}, CellLabel-> - "Out[425]=",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] + "Out[173]=",ExpressionUUID->"3a508a12-2aac-4a7d-8b9b-2846ef6515fc"] }, Open ]], Cell[CellGroupData[{ @@ -13776,22 +14051,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991850221900238*^9, - 3.9918502257325497`*^9}},ExpressionUUID->"350334c7-7c47-c24c-8adc-\ -781173809e57"], - -Cell[BoxData["0.028488532115740543`"], "Output", - CellChangeTimes->{3.991345807987507*^9}, + CellChangeTimes->{{3.991850221900238*^9, 3.9918502257325497`*^9}}, CellLabel-> - "Out[426]=",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] + "In[174]:=",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], + +Cell[BoxData["0.06307984183033148`"], "Output", + CellChangeTimes->{3.991345807987507*^9, 3.994352407805419*^9, + 3.99435476541975*^9}, + CellLabel-> + "Out[174]=",ExpressionUUID->"a3e1e882-4bb5-42af-896a-afd0a2b6f723"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991850228782873*^9, 3.991850231287325*^9}, - 3.9919246253575134`*^9},ExpressionUUID->"597921e5-69d3-564d-a8fa-\ -092e912c15e0"], + 3.9919246253575134`*^9}, + CellLabel-> + "In[175]:=",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ @@ -13814,12 +14091,13 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[428]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], + "In[176]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.991345808020666*^9}, +Cell[BoxData["6.144354311111192`"], "Output", + CellChangeTimes->{3.991345808020666*^9, 3.994352407838374*^9, + 3.9943547654451838`*^9}, CellLabel-> - "Out[428]=",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] + "Out[176]=",ExpressionUUID->"0355eda8-2f24-4c07-9952-a7f438372dc3"] }, Open ]], Cell[CellGroupData[{ @@ -13829,12 +14107,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[430]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], + "In[177]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913458080616665`*^9}, +Cell[BoxData["2.561671728757241`"], "Output", + CellChangeTimes->{3.9913458080616665`*^9, 3.994352407860045*^9, + 3.9943547654606867`*^9}, CellLabel-> - "Out[430]=",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] + "Out[177]=",ExpressionUUID->"d8da68eb-2fcf-4514-a7ed-427e1a918776"] }, Open ]], Cell[CellGroupData[{ @@ -13844,12 +14123,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[433]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], + "In[178]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.991345808188246*^9}, +Cell[BoxData["15.739818730241213`"], "Output", + CellChangeTimes->{3.991345808188246*^9, 3.994352407882276*^9, + 3.994354765476411*^9}, CellLabel-> - "Out[433]=",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] + "Out[178]=",ExpressionUUID->"a0b2f278-1f63-423c-bd9c-ab8df61105fb"] }, Open ]], Cell[CellGroupData[{ @@ -14039,12 +14319,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[434]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], + "In[179]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[BoxData["0.04214145338799881`"], "Output", - CellChangeTimes->{3.991345808220566*^9}, +Cell[BoxData["0.007629566817482097`"], "Output", + CellChangeTimes->{3.991345808220566*^9, 3.994352407909597*^9, + 3.994354765495694*^9}, CellLabel-> - "Out[434]=",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] + "Out[179]=",ExpressionUUID->"fdd51f7e-ec60-4490-b719-e0acbfe9d3ab"] }, Open ]], Cell[CellGroupData[{ @@ -14058,12 +14339,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[435]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], + "In[180]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[BoxData["4.317080886816563`"], "Output", - CellChangeTimes->{3.9913458083195686`*^9}, +Cell[BoxData["10.146003324496732`"], "Output", + CellChangeTimes->{3.9913458083195686`*^9, 3.994352408119216*^9, + 3.9943547656825523`*^9}, CellLabel-> - "Out[435]=",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] + "Out[180]=",ExpressionUUID->"f4a9c223-859f-4cc7-9d74-e7419ef62d5e"] }, Open ]], Cell[CellGroupData[{ @@ -14255,12 +14537,13 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[436]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], + "In[181]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[BoxData["0.012862376162526763`"], "Output", - CellChangeTimes->{3.991345808334568*^9}, +Cell[BoxData["0.0611455551573659`"], "Output", + CellChangeTimes->{3.991345808334568*^9, 3.994352408140162*^9, + 3.99435476570138*^9}, CellLabel-> - "Out[436]=",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] + "Out[181]=",ExpressionUUID->"b23d9864-a975-415a-9851-620d95ede675"] }, Open ]], Cell[CellGroupData[{ @@ -14274,12 +14557,13 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[437]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], + "In[182]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[BoxData["7.814196669618258`"], "Output", - CellChangeTimes->{3.991345808432392*^9}, +Cell[BoxData["3.583954557905939`"], "Output", + CellChangeTimes->{3.991345808432392*^9, 3.994352408325137*^9, + 3.9943547659172697`*^9}, CellLabel-> - "Out[437]=",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] + "Out[182]=",ExpressionUUID->"8903c9e3-f933-48be-878b-1fa9852eca76"] }, Open ]], Cell[CellGroupData[{ @@ -14372,12 +14656,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[438]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], + "In[183]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991345808448488*^9}, +Cell[BoxData["0.06803408589806512`"], "Output", + CellChangeTimes->{3.991345808448488*^9, 3.994352408344597*^9, + 3.994354765934173*^9}, CellLabel-> - "Out[438]=",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] + "Out[183]=",ExpressionUUID->"70536232-a51f-42a8-9e51-fb0467b26129"] }, Open ]], Cell[CellGroupData[{ @@ -14467,12 +14752,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[439]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], + "In[184]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913458084773808`*^9}, +Cell[BoxData["0.9319659141019349`"], "Output", + CellChangeTimes->{3.9913458084773808`*^9, 3.994352408385516*^9, + 3.9943547659501657`*^9}, CellLabel-> - "Out[439]=",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] + "Out[184]=",ExpressionUUID->"6f58d183-076a-46e7-a80a-233921c9fdbf"] }, Open ]], Cell[CellGroupData[{ @@ -14595,12 +14881,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[440]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], + "In[185]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913458085134735`*^9}, +Cell[BoxData["0.06340544905407981`"], "Output", + CellChangeTimes->{3.9913458085134735`*^9, 3.994352408437358*^9, + 3.994354765968499*^9}, CellLabel-> - "Out[440]=",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] + "Out[185]=",ExpressionUUID->"f58d3733-cdbc-46f7-a9a3-26a1d866693a"] }, Open ]], Cell[CellGroupData[{ @@ -14662,67 +14949,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185025346871*^9},ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], + CellChangeTimes->{3.99185025346871*^9}, + CellLabel-> + "In[186]:=",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 469, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085463753`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.380381453543516`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 186, + 33, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994352408464962*^9, + 3.994354765989575*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], +In[186]:=",ExpressionUUID->"f9ac70aa-8755-4fe9-bf39-09cc8276fd66"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 470, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085563755`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.601489692752313`*^-212\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 186, + 34, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994352408464962*^9, + 3.994354765999794*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], +In[186]:=",ExpressionUUID->"07f4be32-b6cc-4ccb-a673-89546866c9f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 441, 471, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345808564377*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.099735407201187`*^-217\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 186, + 35, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994352408464962*^9, + 3.9943547660095778`*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], +In[186]:=",ExpressionUUID->"0e3bbfb3-94e9-41c2-8645-69dfc43d3de8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 441, 472, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085733776`*^9}, +during this calculation.\"", 2, 186, 36, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994352408464962*^9, + 3.994354766017428*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], +In[186]:=",ExpressionUUID->"e89b7c3b-bc21-4888-8e5d-e044dcf90f1c"], -Cell[BoxData["4.317080886816564`"], "Output", - CellChangeTimes->{3.9913458125059433`*^9}, +Cell[BoxData["10.146003324496743`"], "Output", + CellChangeTimes->{3.9913458125059433`*^9, 3.9943524162380543`*^9, + 3.994354773903632*^9}, CellLabel-> - "Out[441]=",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] + "Out[186]=",ExpressionUUID->"415c9f31-ebc2-4146-a1fa-9432fa3a7503"] }, Open ]], Cell[CellGroupData[{ @@ -14784,68 +15084,80 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918502579298553`*^9},ExpressionUUID->"baacd3f7-96e4-2949-b9f9-\ -9afb90e551d9"], + CellChangeTimes->{3.9918502579298553`*^9}, + CellLabel-> + "In[187]:=",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 473, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812542961*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.380381453543516`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 187, + 37, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9943524163092537`*^9, + 3.994354773958639*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], +In[187]:=",ExpressionUUID->"39136fa3-295a-464a-8199-467608ccbcfb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 474, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812552984*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.601489692752313`*^-212\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 187, + 38, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9943524163092537`*^9, + 3.9943547739689417`*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], +In[187]:=",ExpressionUUID->"4bea0f1c-ad6f-41ab-9739-19e6f59c4be3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 442, 475, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134581256196*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.099735407201187`*^-217\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 187, + 39, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9943524163092537`*^9, + 3.9943547739780817`*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], +In[187]:=",ExpressionUUID->"962e25de-f479-4c89-8725-3b6b7867cdc3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 442, 476, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812570959*^9}, +during this calculation.\"", 2, 187, 40, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.9943524163092537`*^9, + 3.99435477398586*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], +In[187]:=",ExpressionUUID->"c5c365a2-0fb2-4042-8cc6-a6ebe9d61c8b"], -Cell[BoxData["7.8141966696182585`"], "Output", - CellChangeTimes->{3.991345816415531*^9}, +Cell[BoxData["3.5839545579059413`"], "Output", + CellChangeTimes->{3.991345816415531*^9, 3.9943524238977823`*^9, + 3.9943547819249763`*^9}, CellLabel-> - "Out[442]=",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] + "Out[187]=",ExpressionUUID->"c1ad2105-d6a6-436b-aa12-1918b3c8dc26"] }, Open ]], Cell[CellGroupData[{ @@ -14903,95 +15215,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918502605597496`*^9},ExpressionUUID->"ea08a5a9-d446-9147-ba82-\ -e3924f732df2"], + CellChangeTimes->{3.9918502605597496`*^9}, + CellLabel-> + "In[188]:=",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV03k0VW0bBnCEypQIITIXpXTMGp67zEMllZk4zt4iZMonSaMmlKHifRMK +hcxTilQvyXBCkWSW6Bg6pi0V5Xv8sddev/WsdT33vfa15eknbQguDg4OFn6W +3wHN2zY9bW3eY9JWUVlcw0J72BnadKNcJHVk9/CyB1J1bisZVaFMrnr3Emxr +xjteAc03SLbffkcpdlHouRoeIybSGps8XIZ9vW79q3M571GxUkxDOfaz1oCU +RdpHFHdLI74Ce6yrMfx0ZSdatbUr7zm21LCi0w/DHvR44fqGF9iWk+H6Qcx+ +JMwBfS+xqxfH+ENzBtHenYsz/2F3XJA4U+43hCwLqh3rsNm8RmMUbRhlul4V +a8TmjfZ30JwfQaOWtorN2LJr79cHVLLQxOktlz9gH5D+8YhtOIGuZrD29GCT +aQri6qvYSCCrNWkQ+5zywcgTzEnU9ava+Bt2p0T7juCcaRSblJ80i81w9PZK +iJ5BG9gFe35jTyVzPCj2m0Wa6U91OWtZaJWCuvA0bQ4VoS4FYezbjBpTYbEf +6OaOuXXrseUeO5zbPv8DvUsUd5TD1tt6he1b+RM1d/r07sA+rtPPHDNcRFI9 +nvX22FToKW4+lT9ow8anNh7Y5yv5d6mu+otG+QQ1/LCTQO+JJ3MJkQvMocvY +jMx6o8AcTtgtn7K9HDunLmHggjQXJN9QtKnBnvrmGh4XzQUx/QVvW7HD1eZK +Cv1WgFFA75OJ5XkL5BUnaTxwzTTGfvMbFupqnaj+m84DSrKWonrYcjNPHYXE +eIF/h7C8GXau1oF49XleENAr1PbCrn0WxulTuQr6hcwNC7Dnatr6WYYCcLGE +NWlRx0IiVgLCZ6oFILrJ+YE7tka7EQjqC8IizbM0FNv7a1najm1CUGGAlh5j ++3MxNXYLCIO78d9N/G9ZaFghfzryx1r4uNDwZgibIhtXt2iKwJx9bixHPQtx +PRmRXx8gAn8PqryQwZbT3GiTM47tOWjggO1oGFvcPCAKUR0hDe3YLR6BQRJN +YtBnqKXZ18BCfY9vRrmtEoeq9HsSnI24N+M56dnG4hC8LdlFCZsveKht5ytx +2EjzEvLBNrp8RMutTAL8l7RXcDSx0PMMnbmsVEmomijRN2CyUMbw7xCDYBkQ +eSHRPd/MQmZHr/YF5cmARTq7VbEF59eKmuSNyMCY04C0NbZWxlYxOQdZGCpb +V5SNXUt3LeHZsxGO0Wo73VpZaGZy4H+sS3IQ88NOpv89C4n6GpWW7FcAjneb +wqU/stBIBt9xa28F+DITL2aDXdHTKv39igKEv97AfR3b2crlksorBbDviR6Y +x87YEmLzD00RanO+3P3cge8fezwVIaEEX8Uu/srtZKEjnvzqFoPK4MV5ITGh +h4VQyFGa3R9l8I9JiG7DVotM1WVIqgBJhrWJ9rIQR7rmvohDKlBz5Y3tHey8 +Pie74tcqoLHzqGZyH/4/bXMvSD3cBF7BoUbPBvB8Rvs7xuiqoFX46q3GMAul +H07sno9QBZScOh+GfZM+OMB9TxX61OxOv8FmnD81LtumCo+qrAOdRlhobdV9 +jsOGalAXFWAQ9Q33R5OtVqm4Bf48uqb4e5SFpBVunYv6uhX4WrgcxSZZqOoG +pfqLSx1m8kum/LGdZx3aSXl1OJ1T8Y2JnVKrpLrPVR18M17+iJxiIQXP5x9+ +flKH0KC6pMVpvG/usDLZtA2IJ70TCxQLyUjLknIOGkAGuHbsW2ChrZnBAguI +BjNRMU+nV40iOuPSnPoBGgTz2WS7rB5FSYrxfW7ONFhdzjPZgL3iYUFhXSgN +Cv8ahKTzjaKulLEj8UU0mN4+EOQoMIquJ7ndV1XUhB8yW7Z2rhlFI1FW2+x5 +tcBMjIwTkRhFDwKVrMuY2jBvGk+7pDKKWkOQ7uVMfeApdV8MsxpF8q4fD7j4 +7Ab1OPPhl/8bRcRSeb7MaYAWuU3vT2WOIonxipUS9H2gU9cT0dUzioI1d/XE +qxnBjd7HCrziY4j+fbFedMwY8jVfXFE7PIby9gWtTG0xhQjH2ze33RtDGZT3 +69zb5jCjOpmbMzSGfu5d/672nCWkVW6onNYdR70cK6YH3fcDF4232C12HPlt +OBl7QfEgZDQ8+/D52zjK96p/dSfSGj6n5WassZpAYbOS81u8DsExcfgVmj+B +5ixMbN8es4GMl1rMPbLfkb5T3N7hQ4fhJ+eD/h+x39EHyfvetZpHoHHF6/va +HGwk9ehSVdbmoyAsajWneJaNKgbUrA4I2kL5SFrZtTk2km2f8gz5bgun1Ybe +v/KbRJp34nLTB+yg0Lhg1Ym5SXSfe3ZbfI09nF+3P77FYAqV793eFfnMAfIl +USJxYQol6d5Yu5jjCA12zNOX306hlu7MK5rRTtDYeizBefU0KtufrOR/3hlC +bH47jFhPo2nfwxx+DBeIymMzTyVMozkT1eNsQ1e46Z26QbV9GmV9//wzSOcY +PMmvabCXnEH2DzI9XATc4FBBgkOU/QwqKbY8tuKqG6zkl/WUuTeD9KU//Lr+ +yw2ObfWp5v40gxQHPLvee7lD5qGj/+qumUVf+U8cTB5yB5r4y9BBs1nUevOA +h+lROjhUGt1SPzOLboem8p9qpYPL2ko597xZVFW99MvD3AP2nJQv6vk8i9Y4 +w1XN5x5QtXDIrOjvLJJb97ZlQ5UH1OjZ/2uyNIs0mPvX81Z7gEjBpbhubJtd +Ttmdrz3Aljbmx81JodsbQprONnhAdrHd0KEVFJLqfbKmvtMDDoax73evpJCS +q0SS87wHeD4JLM8WppC+GzsrUosBL4a7Lm6Rp9Cjf6aCDugwoP5B55oH2Ova +ZvZI6DEgPLHGTFyBQmzj+fasnQy41ixTvYSdsYWDk7mPAQx5obJmJQoJza91 +EDnEAOnPdm+cN1Poa4z26lRfBsi/S/mjt51CNyvDvSoeMcA2JYDO3kkhX1qi +fmgWAyKlE25Y7aKQVXbRar0cBtzT03DNweZLHMl+mseA3feyVhK7KRQZaD1W +XsqAi36K9I49FApXVTpR9h8DfG2mVbP3Usg7scmnuI8BLoEvcoVMKWQuNLIr +cIABWkIpW+jYmyM5BGlfGHCDx/tIGfZIoHZe0TADvv++ne5oRiH3A6nfCycY +IKM7pfPAnEL2PEF+Bb8ZUPrxySZZKwqZBkn554oT8G+3zFCHNYX+S71iEb+e +gJk3R4qUD1FoF3NGKVSKgB2ud9cHY2soN302lCVAXZSneI0NhSQ/nTHsViaA +65bSmn2HKTRu0CvOp00AurfPM+EohW5xpb3wPEyArbySPssB779dIGn/UQJk +B8OF1RwpdNkpNFDTjoCQ7c7nTmCHllpvWnIkwJ68qPgd253kjLtLJ6D+8q7L +404U0mykM94EEDByRCql3YVCn+KU+RVjCWgtSZuwc6dQPhI8zooj4OyqNzLX +sS9/p2rzEghgF3fPPMOmmddG6CUS4G9Sc02Kjr8fh8fM/hQChLnK6J+wTU6m +fQ7NJeDUXekGxKCQjMw1nT35eB+ags4JbKrxZMKKQgJMtuab3MV+qIL23ywh +YKFtl8049p/e3lfpzwlYJ3ZFJI6gUKmVdFZzPQGzvWdpTSSFon5z8dxuJEDQ +crF9CpueNebuwCQgIjlNStyTQsLcz6W/thCgNGp06xi2T6X9rV8dBKQKEjJs +bEW1uyFKwwQc9/lf/a/jFPr96Wzb6AgBWgvd/0p6Uag1ktAoYBHQHLtOWB87 +YlBrTH+CAF69yS8h2F1JbS4HZwnwtmpSZWPHr1xrHMZJgpmtjV6TN4WqZnqd +gleQwFidqc3C/tabE+jHQ8LK4qvV3CdwH0qN0uirSejq+xa4C3vELXTBYi0J +gtqRxCNsYStjEWNREv6Jrq9+ib1TV0QViZFw709Qeid2rGCuraYkCes6poRW +++Dz5/1F0vIktFby+jGwyczcejFFElLShRTCsGNjT/evUSYhYLOz+y3sEVJU +kFuVBBVGxYWK5XNR0+MTGiTUfRIw5/Gl0PO/oudGaCSIG3faSmAPjw7cGdDC +9+kwJzdjG7wKq2nXIyGhUK7GAvurT77sCyDBcKPK5DVsIfsz2k/3kfBCrf9o +Ira+oZlVkREJd3izTTOxb0p+OZ1pRsKDKQbzJXYFd0FsqgUJF8RsjjGxhybP +PP7HigR5PZOzndh6dWIfY6zxvPEGjpPY9KIv41dtSPCK0ZH8jR2TXMB18QgJ +m4V2eHD7UehLoLlGiD0JyuJSSRLYgq7ipv6OJFwT4rkkh61nPuTi7UzCS79v +Pzdjx2w8G+XqRoKFbnSkHnYFn8VDezrOq7ZMRst5c+LPbBgkfBtd3G2ynDc4 +1GJFksB7PsXbajmPWThichzv47RdwQab/vTsH/AmIck3n2G3nP/QYt1OH9yH +Kima83J+jMQWbT8STBhBN9yW80O/7t3uT4JM4lNfBrYAo8heNZCEq8kj3Z7Y +ugcjTioGk/D2/VK793K+geUVmRDcn2wuB1/saOX19yVCSfDJY3uexC4XHi5Z +G0bC57AazgDswYWiRv5wErTqzqsELud/ixjkiSBBz0GlY9k6Hyx/Lp0jwV20 +VDgI+//XhPyX "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -15005,107 +15316,106 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV03k0VW0bBnCEypQIITIXpXTMGp67zEMllZk4zt4iZMonSaMmlKHifRMK +hcxTilQvyXBCkWSW6Bg6pi0V5Xv8sddev/WsdT33vfa15eknbQguDg4OFn6W +3wHN2zY9bW3eY9JWUVlcw0J72BnadKNcJHVk9/CyB1J1bisZVaFMrnr3Emxr +xjteAc03SLbffkcpdlHouRoeIybSGps8XIZ9vW79q3M571GxUkxDOfaz1oCU +RdpHFHdLI74Ce6yrMfx0ZSdatbUr7zm21LCi0w/DHvR44fqGF9iWk+H6Qcx+ +JMwBfS+xqxfH+ENzBtHenYsz/2F3XJA4U+43hCwLqh3rsNm8RmMUbRhlul4V +a8TmjfZ30JwfQaOWtorN2LJr79cHVLLQxOktlz9gH5D+8YhtOIGuZrD29GCT +aQri6qvYSCCrNWkQ+5zywcgTzEnU9ava+Bt2p0T7juCcaRSblJ80i81w9PZK +iJ5BG9gFe35jTyVzPCj2m0Wa6U91OWtZaJWCuvA0bQ4VoS4FYezbjBpTYbEf +6OaOuXXrseUeO5zbPv8DvUsUd5TD1tt6he1b+RM1d/r07sA+rtPPHDNcRFI9 +nvX22FToKW4+lT9ow8anNh7Y5yv5d6mu+otG+QQ1/LCTQO+JJ3MJkQvMocvY +jMx6o8AcTtgtn7K9HDunLmHggjQXJN9QtKnBnvrmGh4XzQUx/QVvW7HD1eZK +Cv1WgFFA75OJ5XkL5BUnaTxwzTTGfvMbFupqnaj+m84DSrKWonrYcjNPHYXE +eIF/h7C8GXau1oF49XleENAr1PbCrn0WxulTuQr6hcwNC7Dnatr6WYYCcLGE +NWlRx0IiVgLCZ6oFILrJ+YE7tka7EQjqC8IizbM0FNv7a1najm1CUGGAlh5j ++3MxNXYLCIO78d9N/G9ZaFghfzryx1r4uNDwZgibIhtXt2iKwJx9bixHPQtx +PRmRXx8gAn8PqryQwZbT3GiTM47tOWjggO1oGFvcPCAKUR0hDe3YLR6BQRJN +YtBnqKXZ18BCfY9vRrmtEoeq9HsSnI24N+M56dnG4hC8LdlFCZsveKht5ytx +2EjzEvLBNrp8RMutTAL8l7RXcDSx0PMMnbmsVEmomijRN2CyUMbw7xCDYBkQ +eSHRPd/MQmZHr/YF5cmARTq7VbEF59eKmuSNyMCY04C0NbZWxlYxOQdZGCpb +V5SNXUt3LeHZsxGO0Wo73VpZaGZy4H+sS3IQ88NOpv89C4n6GpWW7FcAjneb +wqU/stBIBt9xa28F+DITL2aDXdHTKv39igKEv97AfR3b2crlksorBbDviR6Y +x87YEmLzD00RanO+3P3cge8fezwVIaEEX8Uu/srtZKEjnvzqFoPK4MV5ITGh +h4VQyFGa3R9l8I9JiG7DVotM1WVIqgBJhrWJ9rIQR7rmvohDKlBz5Y3tHey8 +Pie74tcqoLHzqGZyH/4/bXMvSD3cBF7BoUbPBvB8Rvs7xuiqoFX46q3GMAul +H07sno9QBZScOh+GfZM+OMB9TxX61OxOv8FmnD81LtumCo+qrAOdRlhobdV9 +jsOGalAXFWAQ9Q33R5OtVqm4Bf48uqb4e5SFpBVunYv6uhX4WrgcxSZZqOoG +pfqLSx1m8kum/LGdZx3aSXl1OJ1T8Y2JnVKrpLrPVR18M17+iJxiIQXP5x9+ +flKH0KC6pMVpvG/usDLZtA2IJ70TCxQLyUjLknIOGkAGuHbsW2ChrZnBAguI +BjNRMU+nV40iOuPSnPoBGgTz2WS7rB5FSYrxfW7ONFhdzjPZgL3iYUFhXSgN +Cv8ahKTzjaKulLEj8UU0mN4+EOQoMIquJ7ndV1XUhB8yW7Z2rhlFI1FW2+x5 +tcBMjIwTkRhFDwKVrMuY2jBvGk+7pDKKWkOQ7uVMfeApdV8MsxpF8q4fD7j4 +7Ab1OPPhl/8bRcRSeb7MaYAWuU3vT2WOIonxipUS9H2gU9cT0dUzioI1d/XE +qxnBjd7HCrziY4j+fbFedMwY8jVfXFE7PIby9gWtTG0xhQjH2ze33RtDGZT3 +69zb5jCjOpmbMzSGfu5d/672nCWkVW6onNYdR70cK6YH3fcDF4232C12HPlt +OBl7QfEgZDQ8+/D52zjK96p/dSfSGj6n5WassZpAYbOS81u8DsExcfgVmj+B +5ixMbN8es4GMl1rMPbLfkb5T3N7hQ4fhJ+eD/h+x39EHyfvetZpHoHHF6/va +HGwk9ehSVdbmoyAsajWneJaNKgbUrA4I2kL5SFrZtTk2km2f8gz5bgun1Ybe +v/KbRJp34nLTB+yg0Lhg1Ym5SXSfe3ZbfI09nF+3P77FYAqV793eFfnMAfIl +USJxYQol6d5Yu5jjCA12zNOX306hlu7MK5rRTtDYeizBefU0KtufrOR/3hlC +bH47jFhPo2nfwxx+DBeIymMzTyVMozkT1eNsQ1e46Z26QbV9GmV9//wzSOcY +PMmvabCXnEH2DzI9XATc4FBBgkOU/QwqKbY8tuKqG6zkl/WUuTeD9KU//Lr+ +yw2ObfWp5v40gxQHPLvee7lD5qGj/+qumUVf+U8cTB5yB5r4y9BBs1nUevOA +h+lROjhUGt1SPzOLboem8p9qpYPL2ko597xZVFW99MvD3AP2nJQv6vk8i9Y4 +w1XN5x5QtXDIrOjvLJJb97ZlQ5UH1OjZ/2uyNIs0mPvX81Z7gEjBpbhubJtd +Ttmdrz3Aljbmx81JodsbQprONnhAdrHd0KEVFJLqfbKmvtMDDoax73evpJCS +q0SS87wHeD4JLM8WppC+GzsrUosBL4a7Lm6Rp9Cjf6aCDugwoP5B55oH2Ova +ZvZI6DEgPLHGTFyBQmzj+fasnQy41ixTvYSdsYWDk7mPAQx5obJmJQoJza91 +EDnEAOnPdm+cN1Poa4z26lRfBsi/S/mjt51CNyvDvSoeMcA2JYDO3kkhX1qi +fmgWAyKlE25Y7aKQVXbRar0cBtzT03DNweZLHMl+mseA3feyVhK7KRQZaD1W +XsqAi36K9I49FApXVTpR9h8DfG2mVbP3Usg7scmnuI8BLoEvcoVMKWQuNLIr +cIABWkIpW+jYmyM5BGlfGHCDx/tIGfZIoHZe0TADvv++ne5oRiH3A6nfCycY +IKM7pfPAnEL2PEF+Bb8ZUPrxySZZKwqZBkn554oT8G+3zFCHNYX+S71iEb+e +gJk3R4qUD1FoF3NGKVSKgB2ud9cHY2soN302lCVAXZSneI0NhSQ/nTHsViaA +65bSmn2HKTRu0CvOp00AurfPM+EohW5xpb3wPEyArbySPssB779dIGn/UQJk +B8OF1RwpdNkpNFDTjoCQ7c7nTmCHllpvWnIkwJ68qPgd253kjLtLJ6D+8q7L +404U0mykM94EEDByRCql3YVCn+KU+RVjCWgtSZuwc6dQPhI8zooj4OyqNzLX +sS9/p2rzEghgF3fPPMOmmddG6CUS4G9Sc02Kjr8fh8fM/hQChLnK6J+wTU6m +fQ7NJeDUXekGxKCQjMw1nT35eB+ags4JbKrxZMKKQgJMtuab3MV+qIL23ywh +YKFtl8049p/e3lfpzwlYJ3ZFJI6gUKmVdFZzPQGzvWdpTSSFon5z8dxuJEDQ +crF9CpueNebuwCQgIjlNStyTQsLcz6W/thCgNGp06xi2T6X9rV8dBKQKEjJs +bEW1uyFKwwQc9/lf/a/jFPr96Wzb6AgBWgvd/0p6Uag1ktAoYBHQHLtOWB87 +YlBrTH+CAF69yS8h2F1JbS4HZwnwtmpSZWPHr1xrHMZJgpmtjV6TN4WqZnqd +gleQwFidqc3C/tabE+jHQ8LK4qvV3CdwH0qN0uirSejq+xa4C3vELXTBYi0J +gtqRxCNsYStjEWNREv6Jrq9+ib1TV0QViZFw709Qeid2rGCuraYkCes6poRW +++Dz5/1F0vIktFby+jGwyczcejFFElLShRTCsGNjT/evUSYhYLOz+y3sEVJU +kFuVBBVGxYWK5XNR0+MTGiTUfRIw5/Gl0PO/oudGaCSIG3faSmAPjw7cGdDC +9+kwJzdjG7wKq2nXIyGhUK7GAvurT77sCyDBcKPK5DVsIfsz2k/3kfBCrf9o +Ira+oZlVkREJd3izTTOxb0p+OZ1pRsKDKQbzJXYFd0FsqgUJF8RsjjGxhybP +PP7HigR5PZOzndh6dWIfY6zxvPEGjpPY9KIv41dtSPCK0ZH8jR2TXMB18QgJ +m4V2eHD7UehLoLlGiD0JyuJSSRLYgq7ipv6OJFwT4rkkh61nPuTi7UzCS79v +Pzdjx2w8G+XqRoKFbnSkHnYFn8VDezrOq7ZMRst5c+LPbBgkfBtd3G2ynDc4 +1GJFksB7PsXbajmPWThichzv47RdwQab/vTsH/AmIck3n2G3nP/QYt1OH9yH +Kima83J+jMQWbT8STBhBN9yW80O/7t3uT4JM4lNfBrYAo8heNZCEq8kj3Z7Y +ugcjTioGk/D2/VK793K+geUVmRDcn2wuB1/saOX19yVCSfDJY3uexC4XHi5Z +G0bC57AazgDswYWiRv5wErTqzqsELud/ixjkiSBBz0GlY9k6Hyx/Lp0jwV20 +VDgI+//XhPyX "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, + "PlotRange" -> {{0, 180}, {0.773888937611084, + 1.2769652035214778`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "AxesOrigin" -> {0, 0.7738889376110857}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -15117,21 +15427,20 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.773888937611084, 1.2769652035214778`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7738889376110857}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -15145,105 +15454,104 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV03k0VW0bBnCEypQIITIXpXTMGp67zEMllZk4zt4iZMonSaMmlKHifRMK +hcxTilQvyXBCkWSW6Bg6pi0V5Xv8sddev/WsdT33vfa15eknbQguDg4OFn6W +3wHN2zY9bW3eY9JWUVlcw0J72BnadKNcJHVk9/CyB1J1bisZVaFMrnr3Emxr +xjteAc03SLbffkcpdlHouRoeIybSGps8XIZ9vW79q3M571GxUkxDOfaz1oCU +RdpHFHdLI74Ce6yrMfx0ZSdatbUr7zm21LCi0w/DHvR44fqGF9iWk+H6Qcx+ +JMwBfS+xqxfH+ENzBtHenYsz/2F3XJA4U+43hCwLqh3rsNm8RmMUbRhlul4V +a8TmjfZ30JwfQaOWtorN2LJr79cHVLLQxOktlz9gH5D+8YhtOIGuZrD29GCT +aQri6qvYSCCrNWkQ+5zywcgTzEnU9ava+Bt2p0T7juCcaRSblJ80i81w9PZK +iJ5BG9gFe35jTyVzPCj2m0Wa6U91OWtZaJWCuvA0bQ4VoS4FYezbjBpTYbEf +6OaOuXXrseUeO5zbPv8DvUsUd5TD1tt6he1b+RM1d/r07sA+rtPPHDNcRFI9 +nvX22FToKW4+lT9ow8anNh7Y5yv5d6mu+otG+QQ1/LCTQO+JJ3MJkQvMocvY +jMx6o8AcTtgtn7K9HDunLmHggjQXJN9QtKnBnvrmGh4XzQUx/QVvW7HD1eZK +Cv1WgFFA75OJ5XkL5BUnaTxwzTTGfvMbFupqnaj+m84DSrKWonrYcjNPHYXE +eIF/h7C8GXau1oF49XleENAr1PbCrn0WxulTuQr6hcwNC7Dnatr6WYYCcLGE +NWlRx0IiVgLCZ6oFILrJ+YE7tka7EQjqC8IizbM0FNv7a1najm1CUGGAlh5j ++3MxNXYLCIO78d9N/G9ZaFghfzryx1r4uNDwZgibIhtXt2iKwJx9bixHPQtx +PRmRXx8gAn8PqryQwZbT3GiTM47tOWjggO1oGFvcPCAKUR0hDe3YLR6BQRJN +YtBnqKXZ18BCfY9vRrmtEoeq9HsSnI24N+M56dnG4hC8LdlFCZsveKht5ytx +2EjzEvLBNrp8RMutTAL8l7RXcDSx0PMMnbmsVEmomijRN2CyUMbw7xCDYBkQ +eSHRPd/MQmZHr/YF5cmARTq7VbEF59eKmuSNyMCY04C0NbZWxlYxOQdZGCpb +V5SNXUt3LeHZsxGO0Wo73VpZaGZy4H+sS3IQ88NOpv89C4n6GpWW7FcAjneb +wqU/stBIBt9xa28F+DITL2aDXdHTKv39igKEv97AfR3b2crlksorBbDviR6Y +x87YEmLzD00RanO+3P3cge8fezwVIaEEX8Uu/srtZKEjnvzqFoPK4MV5ITGh +h4VQyFGa3R9l8I9JiG7DVotM1WVIqgBJhrWJ9rIQR7rmvohDKlBz5Y3tHey8 +Pie74tcqoLHzqGZyH/4/bXMvSD3cBF7BoUbPBvB8Rvs7xuiqoFX46q3GMAul +H07sno9QBZScOh+GfZM+OMB9TxX61OxOv8FmnD81LtumCo+qrAOdRlhobdV9 +jsOGalAXFWAQ9Q33R5OtVqm4Bf48uqb4e5SFpBVunYv6uhX4WrgcxSZZqOoG +pfqLSx1m8kum/LGdZx3aSXl1OJ1T8Y2JnVKrpLrPVR18M17+iJxiIQXP5x9+ +flKH0KC6pMVpvG/usDLZtA2IJ70TCxQLyUjLknIOGkAGuHbsW2ChrZnBAguI +BjNRMU+nV40iOuPSnPoBGgTz2WS7rB5FSYrxfW7ONFhdzjPZgL3iYUFhXSgN +Cv8ahKTzjaKulLEj8UU0mN4+EOQoMIquJ7ndV1XUhB8yW7Z2rhlFI1FW2+x5 +tcBMjIwTkRhFDwKVrMuY2jBvGk+7pDKKWkOQ7uVMfeApdV8MsxpF8q4fD7j4 +7Ab1OPPhl/8bRcRSeb7MaYAWuU3vT2WOIonxipUS9H2gU9cT0dUzioI1d/XE +qxnBjd7HCrziY4j+fbFedMwY8jVfXFE7PIby9gWtTG0xhQjH2ze33RtDGZT3 +69zb5jCjOpmbMzSGfu5d/672nCWkVW6onNYdR70cK6YH3fcDF4232C12HPlt +OBl7QfEgZDQ8+/D52zjK96p/dSfSGj6n5WassZpAYbOS81u8DsExcfgVmj+B +5ixMbN8es4GMl1rMPbLfkb5T3N7hQ4fhJ+eD/h+x39EHyfvetZpHoHHF6/va +HGwk9ehSVdbmoyAsajWneJaNKgbUrA4I2kL5SFrZtTk2km2f8gz5bgun1Ybe +v/KbRJp34nLTB+yg0Lhg1Ym5SXSfe3ZbfI09nF+3P77FYAqV793eFfnMAfIl +USJxYQol6d5Yu5jjCA12zNOX306hlu7MK5rRTtDYeizBefU0KtufrOR/3hlC +bH47jFhPo2nfwxx+DBeIymMzTyVMozkT1eNsQ1e46Z26QbV9GmV9//wzSOcY +PMmvabCXnEH2DzI9XATc4FBBgkOU/QwqKbY8tuKqG6zkl/WUuTeD9KU//Lr+ +yw2ObfWp5v40gxQHPLvee7lD5qGj/+qumUVf+U8cTB5yB5r4y9BBs1nUevOA +h+lROjhUGt1SPzOLboem8p9qpYPL2ko597xZVFW99MvD3AP2nJQv6vk8i9Y4 +w1XN5x5QtXDIrOjvLJJb97ZlQ5UH1OjZ/2uyNIs0mPvX81Z7gEjBpbhubJtd +Ttmdrz3Aljbmx81JodsbQprONnhAdrHd0KEVFJLqfbKmvtMDDoax73evpJCS +q0SS87wHeD4JLM8WppC+GzsrUosBL4a7Lm6Rp9Cjf6aCDugwoP5B55oH2Ova +ZvZI6DEgPLHGTFyBQmzj+fasnQy41ixTvYSdsYWDk7mPAQx5obJmJQoJza91 +EDnEAOnPdm+cN1Poa4z26lRfBsi/S/mjt51CNyvDvSoeMcA2JYDO3kkhX1qi +fmgWAyKlE25Y7aKQVXbRar0cBtzT03DNweZLHMl+mseA3feyVhK7KRQZaD1W +XsqAi36K9I49FApXVTpR9h8DfG2mVbP3Usg7scmnuI8BLoEvcoVMKWQuNLIr +cIABWkIpW+jYmyM5BGlfGHCDx/tIGfZIoHZe0TADvv++ne5oRiH3A6nfCycY +IKM7pfPAnEL2PEF+Bb8ZUPrxySZZKwqZBkn554oT8G+3zFCHNYX+S71iEb+e +gJk3R4qUD1FoF3NGKVSKgB2ud9cHY2soN302lCVAXZSneI0NhSQ/nTHsViaA +65bSmn2HKTRu0CvOp00AurfPM+EohW5xpb3wPEyArbySPssB779dIGn/UQJk +B8OF1RwpdNkpNFDTjoCQ7c7nTmCHllpvWnIkwJ68qPgd253kjLtLJ6D+8q7L +404U0mykM94EEDByRCql3YVCn+KU+RVjCWgtSZuwc6dQPhI8zooj4OyqNzLX +sS9/p2rzEghgF3fPPMOmmddG6CUS4G9Sc02Kjr8fh8fM/hQChLnK6J+wTU6m +fQ7NJeDUXekGxKCQjMw1nT35eB+ags4JbKrxZMKKQgJMtuab3MV+qIL23ywh +YKFtl8049p/e3lfpzwlYJ3ZFJI6gUKmVdFZzPQGzvWdpTSSFon5z8dxuJEDQ +crF9CpueNebuwCQgIjlNStyTQsLcz6W/thCgNGp06xi2T6X9rV8dBKQKEjJs +bEW1uyFKwwQc9/lf/a/jFPr96Wzb6AgBWgvd/0p6Uag1ktAoYBHQHLtOWB87 +YlBrTH+CAF69yS8h2F1JbS4HZwnwtmpSZWPHr1xrHMZJgpmtjV6TN4WqZnqd +gleQwFidqc3C/tabE+jHQ8LK4qvV3CdwH0qN0uirSejq+xa4C3vELXTBYi0J +gtqRxCNsYStjEWNREv6Jrq9+ib1TV0QViZFw709Qeid2rGCuraYkCes6poRW +++Dz5/1F0vIktFby+jGwyczcejFFElLShRTCsGNjT/evUSYhYLOz+y3sEVJU +kFuVBBVGxYWK5XNR0+MTGiTUfRIw5/Gl0PO/oudGaCSIG3faSmAPjw7cGdDC +9+kwJzdjG7wKq2nXIyGhUK7GAvurT77sCyDBcKPK5DVsIfsz2k/3kfBCrf9o +Ira+oZlVkREJd3izTTOxb0p+OZ1pRsKDKQbzJXYFd0FsqgUJF8RsjjGxhybP +PP7HigR5PZOzndh6dWIfY6zxvPEGjpPY9KIv41dtSPCK0ZH8jR2TXMB18QgJ +m4V2eHD7UehLoLlGiD0JyuJSSRLYgq7ipv6OJFwT4rkkh61nPuTi7UzCS79v +Pzdjx2w8G+XqRoKFbnSkHnYFn8VDezrOq7ZMRst5c+LPbBgkfBtd3G2ynDc4 +1GJFksB7PsXbajmPWThichzv47RdwQab/vTsH/AmIck3n2G3nP/QYt1OH9yH +Kima83J+jMQWbT8STBhBN9yW80O/7t3uT4JM4lNfBrYAo8heNZCEq8kj3Z7Y +ugcjTioGk/D2/VK793K+geUVmRDcn2wuB1/saOX19yVCSfDJY3uexC4XHi5Z +G0bC57AazgDswYWiRv5wErTqzqsELud/ixjkiSBBz0GlY9k6Hyx/Lp0jwV20 +VDgI+//XhPyX "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.773888937611084, 1.2769652035214778`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7738889376110857}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -15253,7 +15561,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.4834141591801878}, + AxesOrigin->{0, 0.7738889376110857}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -15281,7 +15590,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.773888937611084, 1.2769652035214778`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -15289,9 +15599,9 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913460797739086`*^9}, + CellChangeTimes->{3.9913460797739086`*^9, 3.9943553552692738`*^9}, CellLabel-> - "Out[443]=",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] + "Out[188]=",ExpressionUUID->"12f302ce-a971-449c-917b-b074e805cf48"] }, Open ]], Cell[CellGroupData[{ @@ -15354,207 +15664,178 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918502644064465`*^9, - 3.9918502684162617`*^9}},ExpressionUUID->"42ddbf41-0bd8-b749-bead-\ -56c89a9b7467"], + CellChangeTimes->{{3.9918502644064465`*^9, 3.9918502684162617`*^9}}, + CellLabel-> + "In[189]:=",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7282513679946418`*^-262\\\", \ + "\"\\!\\(\\*FractionBox[\\\"8.416611580525783`*^-273\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 444, - 477, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080016945*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 189, + 41, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994355355470126*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], +In[189]:=",ExpressionUUID->"1c80c11f-c6d2-4136-8a62-1a702d77e4d1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.1421038932835147`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.878686442986763`*^-284\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 444, 478, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080026985*^9}, + 189, 42, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.9943553554777527`*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], +In[189]:=",ExpressionUUID->"2418a4e8-164c-43d4-a860-4959aff579c5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.655058850000931`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7874424142155194`*^-295\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 444, 479, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913460800358925`*^9}, + 2, 189, 43, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994355355486824*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], +In[189]:=",ExpressionUUID->"b86a423f-09a3-4d57-aa59-2f130013e816"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 444, 480, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080043894*^9}, +during this calculation.\"", 2, 189, 44, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994355355495919*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], +In[189]:=",ExpressionUUID->"b2285e05-b89c-44b2-a33c-75fa640b54fd"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4Fe0bB/DzUlkqsh/rWUjZy34Op/u2RLYskaIsIUuWiigqS7ai3mOp +0IIspY0zJxV6qxeJFioqadEbWmWJI4n85vfXXJ9rrpl5nnnu7/3MMLbFeIQI +USgUk78olP8fp951tGrkVK7p/vK5aF7Sdk3PWeo+q940CDJdGOIYygSU69pG +7c2H6Iu3R2ihhhDvdvGlcO85iBJqyBAKtQapEYX8Xy8JMDb/pdi93QP6b62P +mXzZDNrZ1kfMt28DO42vb8dfPgMjnTSx90G74ddLs+NjLz/ApQ1F9w77pEGL +zfnKp+cmIDS/13eRIB9U+hs+btOdgzDxXWkv2k6BbKT/RREbYbR+bc8zmy+H +/NV2Teu9RLH9nszblxrV8Kpo1d3xZUvRK9sk8MDFGsipTO4SUpTCjE+nWy4s +uQKOxuHScupSGJTTbTRLvQKirR5eK/Sk8MIG+qz98iuQPrD8tZOVFD53bctp +51yB/cxHHwvDpbDLPyM0KvoKRJdR/2g2SiG74I2qbecVcD/N03XylcaXsktK +5bOvgkLhwOGCMzKY4razd2CgFqg69enT1TJ4Yp6bmPO9FpSaM5O31smgW7yJ +uO7PWlAb09qzokUGd/53fkpnYR0sd94Z0PRZBpkFTHc9ah0YLZgzHTCSxZDZ +tpAMTh24xskPGj6QxVofdlBWRh24Lf787mS3LM63CuY/H64Dj3MNr2bfyOIp +F2Fh+2N1sPHJlq62UVlckrSVPX2iDrbqVjT6yMmh69iGbQYX6mDHoEFeWoAc +Buzmc8Y66iDL02HNsyk5tI23Km4Q54HStU4lob/ksfPmvtHfEjy4KuP5c/Vi +eazQvTLLkuHBi2d+dXk0efQ+f4Fdo8wDDfc4pvs6eawa7bDw1OVBs0vpoifF +8tgWZCX5xpkHc3aCzseWCrjS9L4F7wgPuNWJl+bsFLDvddWX8GPk9Yso2Xru +Ctic88NOLZ8HzvfErY6GKODU0c2SicU8KLGh852PKWDrM++eufM8MEenkw/7 +FTBKlati2sqDWFa5f0caFat9aJHhv3jgWCYx6ZRLxaBTf48GzvKAKbI/u/M4 +FU9MP67dOM+DJz0bed0XqPgm7q9PxgsJ0N+5RPhdJxUJ6jnD1mUEfK5OqP6h +pIi3u0a89FcQsEV2/XdlviLuCw9rX+1OgFFSU+rZW4ponFjFJDYQIP5hpTyj +TRFp9Qdv628koKFWGDRfKWKG30STii8B8k4N3FXziig4e7HnYTABT1I1jNc6 +KWGEzaEb8QkE2I7OJEYPKKHVUJrnXyUE7FtXqP3vsBJSINyEcpqAq+V6fTJT +SqilUZb5+wwBVM8AVoOoMkbH7Ur6VE7A8M17P4X1lVEsd/ZmYQ0BBWncuOK9 +ypjvT+2zvUlA+2stjeFUZfx1vey7eCMBs8Yt3WtySMvfSXjcRMD2TwLDwTPK +mD0fN25/hwC2s++4fosylqYIZUm3EfBBTjO6dakKjvy7qOzPMwIUYu6oKiio +oFnNcY/cHgKc2zc9Dqer4J/TUofkXxBwPTFHV9JIBROYD/3prwg40j/2dfMm +FTw77y0v3k+AYU1T6Og5FaR1Pv9m8pWAUCEvBevLKljWSDTmfCPgtO9IW2G9 +CqLoO8l3wwQskmBostvJ5z32dd07SkDf7szB9O8qGJD7xPDQJAGplu6BSuaq +qDz0cOnEHAHr/M7+MLNWxel1yje15gmQSPl2yMtZFVONV2zcQuHD6ZaMam6A +Kj62Kd9ZL8SHm46N3xYdVsVZr3MmZiJ8SI4UOaBRoIpb0t0KXUT5YHfMU8L6 +jCr2Z5p99xfjQ8/TkVUHeKp4r1wkb+9iPoxtUo+feKWKaVf8b+6T5MONxJ0i +UoOqaFaeSNm5jA8HT/9TpD+iigKhModtUnxY8t67KVxIDS/05nxgy/BhRWgu +5b22Go7p/GN/S54PfnsERx4lqWF2QPRFiioflp+0VvmaoYY/kmVibpAevvn3 +FRGuGlbc87eJUOND4qzWE+tKNVyZ9K9aK40Pxw/5yTU8UkOTEw1N65h82FJ1 +qfrFCzVkqJZS35Nm3p82m3yvho3lE7mx6nyoEy/wMRCo4VmZoTvHNPjwKO9+ +aZUqDWdXSew4ocmHAr7s6pYVNFxcnFUqsYIPPs8Dm9+vpmHUicyJNNKfqbOD +ynY0NC41++O/kg+1bId4lhsNfz+Zu95OOn7LCRFvHxqqDuwq0NPig3DZKu38 +aBr2SBc3fSP94N8DTbV7aWj7JlxsrTYfuAMPnB+n0ZDyRj25hLTaipAY0ZM0 +tHp86iNLhw9D6wiKZjkNlXpS+g6Rvhwxn2dziYZ09pmZDtLsq8XXDt6h4Wu1 +ly2Ounywfdk5N9JOwz22J8pSSa+nLLD3f0bDunlR3XrSm7RY3K7XNPQ3kAsd +Ih3kEf0KhmhYzy33kNbjQ3RSBbNuhIanbh8ftSC9t7J3B32ahlKr+9ZsI/3v +x0yfdgod8y03WWWQtktiJKcspGOw1MzPStIPJW9VmIvTUbzpYtC/pN0qN7aP +SdAxi7Yxo4/0C/Px4QsydOz+83nrGGnfxzlSgVQ66vxwGxHS58P7QE1TRVU6 +Ru/YbyZNevvUXZ+nDDomXfNhq5H+dsQ3+bAmHXNGXv/UJL2TNlVhpUPHPKnx +nbqkBXxu+y8DOhZ8y6nWJ524Tuc7z5iOQvTSYj3SlLf3pCJYdJRboeakRTpj +V4Apcw35fJe5JgZp8UW/ffqs6UgnVn+XJ80tOZ6cb0/HinW8flHScgarKh2d +6Vj0fHfhT3L8JS0P2oXc6bhjNGrJAGnappDvjV503DNXsu4h6crhealYHzqi +2YRDHWnt1BJTHX86TlbslMonXStn4jsQRMcrihJlO0kbX+xKPhVGx/uW96ec +SDeuiajcEEVH6+QieQ3SraGl31viyflr76t/QK6fwyxLen8SHQv3ZJgWk+7k +9pgap9BRo6IiPZj0qwaxlMrD5Pjp1Nxxsl781ldWbjlGx8NVu+z5pAc/rOmQ +LaBj+p6B7l2kRxbHSWecpuPML7XgIbIeY8skzDjldBTQf4T/vz6njWt8BVV0 +vBs/ZutMWtjvXWVILR3fSh45WE3WN7VunZldMx2vxyirmpB5OGM74PunjY5n +VPS+PCHzw3x1IOX6QzoOZ17LDyetJ8Tv0HxOnl+1KS2PzJ+1p+oWkc/kerVl +jDeR+bz/+UbKnWE6Gol1t60h7XzAoyphnKy39GVpt8k8e1dnjXyaoWOQ6/mr +18i8R06Pp7QvZaDtUOKfJDqZj13b5T9KM3CRICbsFdkvRL/2XRKmMjB77WUz +I9JVr1terGEycI89d/Ebst+8u31ct96UgRtdNtQJKZN5MxNvfmbBQHmRjh02 +SmQ91R30HkMGiqx9cDJFkQ/y50LTdJwY6Jqubj+mwAfXDFZvuT8DG4Y9dKpk +yTz/uRJ1J5iBSsJY0EH2v+F4pvDbcAaOWLASvkrzITtssT41joFP3zAaGGS/ +vOv09tCxbAZy3je6bF/KB0PpVIMkHgMfpsUscFhI1m+OoLXoOgMXhB19a7KA +XG/hCJ/rTQwsSQxxpAnzYYfAI2P8HgNbBS5Dn8j+X9mr8Tq0j4GlnbGObrPk +/lzanukpzES7pcErk38Q8Etn2Ts9LybyNTwlA94QMHVGKdXIh4nzJ0T9vvQR +MCm5XIPlz8TRk2bcGHJ/G5lgRdiGM/FUn2LVbnL/+9AUNOVzgImHjSqbNjwh +4IHTDYnsKiYG3iyYSGshoGSHH3wQMHHClhtVdp6Ak2/DPnyaYeIz74NaHVUE +FLrGZnyfZ6JgsnFmpIKAY0bZD6fF1PElpg6sLiMg7TfPW1JNHZVQ/HdhEQE7 +chbutLRTR7sziy4+zSbA8tLlshMn1DHUiBe4KpSA1/RLpWtPqeOSY509GiEE +JJ6oOTtZqo4h86e+yQcRcCO1+rRHjToGPq4Sm/Qj9+dNZUUSt9Sx0ElVL5/8 +ntFaWMjN/E8de369A/+15PvyT0qJ19VA21UL5O0YBIxLOwZsbNbAA0zXsIJn +POiNZD6JuK+B/bP/2LR08eBu2wwkP9LAqz2f74w9Ir//Ei/RLrzQwIj1xeW2 +93mw6sOS/l9fNVDzVorlkyYeRPO6tp6RWY7TxKfAvZU8+Orq5TsYvBwF/4hT +FON4MJgbsHG3iCbu86SeoizlgcNogsOQ6QrU+9TsfNq8DoaDRGOvJa/Ef7Jk +Dz/bc5X8/1AQymrWwvNxhjrFgZdB+rHmsbpRbXw1V+et7ncRVLJr3UxNdbFj +k7AiTfMCFOmwlsmE6uFWw8xtjbLV8EDJymQiTx9dAn5lxchXAlulmWvwwgBP +Xn4ZSflTDhLC5+IC01Zhf2qAiimtDNRSaZabNVdjhblXhVbEaRBbvuW6x/3V +SCzOXhL7pQj0OYq1CVsNcV/11XSJweOw+510iyPFCH/8+KpYPJgPoxO5Xg5F +Rqg843Hjki8X7A3aShz0jPFRZWbYJ4tcuD1h8ftnpzHOph0Zsv2YBdG6hn1P +Q0wwerKvhuGZDpyR4J7NYqYoQTRTKOMpsFaD6rL0nCkO/Lc4diJkP6xMObK3 +2cwMJcChTeJ2AmiHsO4s7zPD9Pq5CzKRsRByOyz92i5zHDD4+8Bjyk4Yifqa +sDbOHBWbD2n5fYyBvaqRO17Em6OBj8uM8cMYOLI/xmM6yRx7qi5tUj0eA3Xs +eLplpjkmjIa/f6kVA7PXD91qKTFHnDf98HVjNOTXnp181mKORkra/nAnEu6U +9QSPy7Fw8Nd9iYC2cHjvzPCPp7LwhXDvHvW6cKD8itr8W4mF51MMXX8Wh4O1 +u8j6hXQWxj1dbvQkKhza/mKbKWqzUCnRrGGtfDg82lYqZrWGhWcyS7hmEWHQ +pxFxlbudhTItdQUC1VCYvDD/0+AGC/3sPY6/JYLh40a7ssMNLMzb6ufGKw+G +3gVH1w00sdCd0AnK4wZDU4BS8Ym7LKQavY2Njw6GNKoJe66DhS6fBvd3awfD +suyI/Q/esLCp5m/J7qog0A19TgkRYqPV5ZDWG5XbIGj5JbESFzZuds+7dao1 +ABLv+UVourHxZI2ur3J9AHBDpB8SHmzc4bc85XxVANyq2pf70JuNsVVbLYcy +A0BWc53kXCAb9y34USRwCIA2zSHZgHg2Rvgl596r9AftlTS6Zikb03gNWVG9 +W2Fcu8CUGGPjlP7ifLV0H+h9hGtlJti415zYyI30gbvRIxviBGwcLzlyVNbL +B44RDrtMZ9hY3iXJ9NT0AW025XKjsAUStZuKr3Zshm0OUYwWeQuMLr4d3iaz +GXpC7Zf0WFogDN4fNaj3hpuVv/8TZFsgXezpp2htLzC1ifvpmGOB5QK1zEMK +XlD/3/CSsqMW6PmFu/L8Ai8g1N6ZOeZb4O7hd+7K/Z5wueju0bOnLND3mzrt +eqEnlOVmsOyvWiAraMXsZSFPOBwnmVfUbYFL2oSSfL94gI+tOlqoWWKo5x7x +mn43mOsRlWihW2Lf5B/HgU43KAsZee2oboljFaK7dW+7wcfMhgSflZY4G3jc +7ttpN9jd4Vq7z9AShZ8+7FL0dYMj6/er3bSzxMtuLR6B11yhcdPzWeMYS+SI +zUyP33MB5aisBv27lpjXV1vjwHKEY/PbTXKaLTGdcmqzO90RhPLteJ9aLbEr +IiAyWsQRvl5fWFPWYYlyYUFJn587QCMlvUi62xKfc89n9cU6gE9hSsLUkCVW +frnVcIG/Doqa9pncXszBzfE3/dOs7WHJ+s08JQkOOoYsyqTq2kPKe3O9hGUc +NPcuXNEsZw9hC6c1Vslx8IJHZ7nrFzswc42XPafGwTc+Jn3ueXbw4sPuiYzV +HDw+weR/HFwLcuKRPBdvDkYsM8gdKbaFSpsDiWObORh2dCr20CFbMDxwzKZg +CwddBfGR+lG2sH6s7nlvIAeHDkrYtqEtZL4Q/AqK5KBqUWDy7882MH0u2Tox +lYNrUlb27+DYQJ9FQXf1JQ5acYOqBgVWELan8rTDVQ72i9TPKHywgqmr9SHD +dRycH96l4t9pBdLM3p+rr3MwT2Y4eeV5K3ASVVX55y4Hf/NaBqs2W8Gtnurg +7uccPG+ozLFsRnCUuKkX38vBtYo3PCtrEXrtO6aorzn412dLLdoZhMnGb9l+ +7zmYmfyozXkvgl75qitfvnLwbydhkUwDhFt9VvG538n5mZwzT1Ml7ye7AQzG +OFg7O1zBXYywPWvP0zgBB/+z4z6+3wUweTezRGGag7a9epbulwHSZk4GNc5w +sJ2vcuZPNsAy4xrdrXMcfDrg9aQrBOBsVKNgfp6DEs++1LdaA/wPEo+dEQ== + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -15568,166 +15849,133 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwV13k4Fe0bB/DzUlkqsh/rWUjZy34Op/u2RLYskaIsIUuWiigqS7ai3mOp +0IIspY0zJxV6qxeJFioqadEbWmWJI4n85vfXXJ9rrpl5nnnu7/3MMLbFeIQI +USgUk78olP8fp951tGrkVK7p/vK5aF7Sdk3PWeo+q940CDJdGOIYygSU69pG +7c2H6Iu3R2ihhhDvdvGlcO85iBJqyBAKtQapEYX8Xy8JMDb/pdi93QP6b62P +mXzZDNrZ1kfMt28DO42vb8dfPgMjnTSx90G74ddLs+NjLz/ApQ1F9w77pEGL +zfnKp+cmIDS/13eRIB9U+hs+btOdgzDxXWkv2k6BbKT/RREbYbR+bc8zmy+H +/NV2Teu9RLH9nszblxrV8Kpo1d3xZUvRK9sk8MDFGsipTO4SUpTCjE+nWy4s +uQKOxuHScupSGJTTbTRLvQKirR5eK/Sk8MIG+qz98iuQPrD8tZOVFD53bctp +51yB/cxHHwvDpbDLPyM0KvoKRJdR/2g2SiG74I2qbecVcD/N03XylcaXsktK +5bOvgkLhwOGCMzKY4razd2CgFqg69enT1TJ4Yp6bmPO9FpSaM5O31smgW7yJ +uO7PWlAb09qzokUGd/53fkpnYR0sd94Z0PRZBpkFTHc9ah0YLZgzHTCSxZDZ +tpAMTh24xskPGj6QxVofdlBWRh24Lf787mS3LM63CuY/H64Dj3MNr2bfyOIp +F2Fh+2N1sPHJlq62UVlckrSVPX2iDrbqVjT6yMmh69iGbQYX6mDHoEFeWoAc +Buzmc8Y66iDL02HNsyk5tI23Km4Q54HStU4lob/ksfPmvtHfEjy4KuP5c/Vi +eazQvTLLkuHBi2d+dXk0efQ+f4Fdo8wDDfc4pvs6eawa7bDw1OVBs0vpoifF +8tgWZCX5xpkHc3aCzseWCrjS9L4F7wgPuNWJl+bsFLDvddWX8GPk9Yso2Xru +Ctic88NOLZ8HzvfErY6GKODU0c2SicU8KLGh852PKWDrM++eufM8MEenkw/7 +FTBKlati2sqDWFa5f0caFat9aJHhv3jgWCYx6ZRLxaBTf48GzvKAKbI/u/M4 +FU9MP67dOM+DJz0bed0XqPgm7q9PxgsJ0N+5RPhdJxUJ6jnD1mUEfK5OqP6h +pIi3u0a89FcQsEV2/XdlviLuCw9rX+1OgFFSU+rZW4ponFjFJDYQIP5hpTyj +TRFp9Qdv628koKFWGDRfKWKG30STii8B8k4N3FXziig4e7HnYTABT1I1jNc6 +KWGEzaEb8QkE2I7OJEYPKKHVUJrnXyUE7FtXqP3vsBJSINyEcpqAq+V6fTJT +SqilUZb5+wwBVM8AVoOoMkbH7Ur6VE7A8M17P4X1lVEsd/ZmYQ0BBWncuOK9 +ypjvT+2zvUlA+2stjeFUZfx1vey7eCMBs8Yt3WtySMvfSXjcRMD2TwLDwTPK +mD0fN25/hwC2s++4fosylqYIZUm3EfBBTjO6dakKjvy7qOzPMwIUYu6oKiio +oFnNcY/cHgKc2zc9Dqer4J/TUofkXxBwPTFHV9JIBROYD/3prwg40j/2dfMm +FTw77y0v3k+AYU1T6Og5FaR1Pv9m8pWAUCEvBevLKljWSDTmfCPgtO9IW2G9 +CqLoO8l3wwQskmBostvJ5z32dd07SkDf7szB9O8qGJD7xPDQJAGplu6BSuaq +qDz0cOnEHAHr/M7+MLNWxel1yje15gmQSPl2yMtZFVONV2zcQuHD6ZaMam6A +Kj62Kd9ZL8SHm46N3xYdVsVZr3MmZiJ8SI4UOaBRoIpb0t0KXUT5YHfMU8L6 +jCr2Z5p99xfjQ8/TkVUHeKp4r1wkb+9iPoxtUo+feKWKaVf8b+6T5MONxJ0i +UoOqaFaeSNm5jA8HT/9TpD+iigKhModtUnxY8t67KVxIDS/05nxgy/BhRWgu +5b22Go7p/GN/S54PfnsERx4lqWF2QPRFiioflp+0VvmaoYY/kmVibpAevvn3 +FRGuGlbc87eJUOND4qzWE+tKNVyZ9K9aK40Pxw/5yTU8UkOTEw1N65h82FJ1 +qfrFCzVkqJZS35Nm3p82m3yvho3lE7mx6nyoEy/wMRCo4VmZoTvHNPjwKO9+ +aZUqDWdXSew4ocmHAr7s6pYVNFxcnFUqsYIPPs8Dm9+vpmHUicyJNNKfqbOD +ynY0NC41++O/kg+1bId4lhsNfz+Zu95OOn7LCRFvHxqqDuwq0NPig3DZKu38 +aBr2SBc3fSP94N8DTbV7aWj7JlxsrTYfuAMPnB+n0ZDyRj25hLTaipAY0ZM0 +tHp86iNLhw9D6wiKZjkNlXpS+g6Rvhwxn2dziYZ09pmZDtLsq8XXDt6h4Wu1 +ly2Ounywfdk5N9JOwz22J8pSSa+nLLD3f0bDunlR3XrSm7RY3K7XNPQ3kAsd +Ih3kEf0KhmhYzy33kNbjQ3RSBbNuhIanbh8ftSC9t7J3B32ahlKr+9ZsI/3v +x0yfdgod8y03WWWQtktiJKcspGOw1MzPStIPJW9VmIvTUbzpYtC/pN0qN7aP +SdAxi7Yxo4/0C/Px4QsydOz+83nrGGnfxzlSgVQ66vxwGxHS58P7QE1TRVU6 +Ru/YbyZNevvUXZ+nDDomXfNhq5H+dsQ3+bAmHXNGXv/UJL2TNlVhpUPHPKnx +nbqkBXxu+y8DOhZ8y6nWJ524Tuc7z5iOQvTSYj3SlLf3pCJYdJRboeakRTpj +V4Apcw35fJe5JgZp8UW/ffqs6UgnVn+XJ80tOZ6cb0/HinW8flHScgarKh2d +6Vj0fHfhT3L8JS0P2oXc6bhjNGrJAGnappDvjV503DNXsu4h6crhealYHzqi +2YRDHWnt1BJTHX86TlbslMonXStn4jsQRMcrihJlO0kbX+xKPhVGx/uW96ec +SDeuiajcEEVH6+QieQ3SraGl31viyflr76t/QK6fwyxLen8SHQv3ZJgWk+7k +9pgap9BRo6IiPZj0qwaxlMrD5Pjp1Nxxsl781ldWbjlGx8NVu+z5pAc/rOmQ +LaBj+p6B7l2kRxbHSWecpuPML7XgIbIeY8skzDjldBTQf4T/vz6njWt8BVV0 +vBs/ZutMWtjvXWVILR3fSh45WE3WN7VunZldMx2vxyirmpB5OGM74PunjY5n +VPS+PCHzw3x1IOX6QzoOZ17LDyetJ8Tv0HxOnl+1KS2PzJ+1p+oWkc/kerVl +jDeR+bz/+UbKnWE6Gol1t60h7XzAoyphnKy39GVpt8k8e1dnjXyaoWOQ6/mr +18i8R06Pp7QvZaDtUOKfJDqZj13b5T9KM3CRICbsFdkvRL/2XRKmMjB77WUz +I9JVr1terGEycI89d/Ebst+8u31ct96UgRtdNtQJKZN5MxNvfmbBQHmRjh02 +SmQ91R30HkMGiqx9cDJFkQ/y50LTdJwY6Jqubj+mwAfXDFZvuT8DG4Y9dKpk +yTz/uRJ1J5iBSsJY0EH2v+F4pvDbcAaOWLASvkrzITtssT41joFP3zAaGGS/ +vOv09tCxbAZy3je6bF/KB0PpVIMkHgMfpsUscFhI1m+OoLXoOgMXhB19a7KA +XG/hCJ/rTQwsSQxxpAnzYYfAI2P8HgNbBS5Dn8j+X9mr8Tq0j4GlnbGObrPk +/lzanukpzES7pcErk38Q8Etn2Ts9LybyNTwlA94QMHVGKdXIh4nzJ0T9vvQR +MCm5XIPlz8TRk2bcGHJ/G5lgRdiGM/FUn2LVbnL/+9AUNOVzgImHjSqbNjwh +4IHTDYnsKiYG3iyYSGshoGSHH3wQMHHClhtVdp6Ak2/DPnyaYeIz74NaHVUE +FLrGZnyfZ6JgsnFmpIKAY0bZD6fF1PElpg6sLiMg7TfPW1JNHZVQ/HdhEQE7 +chbutLRTR7sziy4+zSbA8tLlshMn1DHUiBe4KpSA1/RLpWtPqeOSY509GiEE +JJ6oOTtZqo4h86e+yQcRcCO1+rRHjToGPq4Sm/Qj9+dNZUUSt9Sx0ElVL5/8 +ntFaWMjN/E8de369A/+15PvyT0qJ19VA21UL5O0YBIxLOwZsbNbAA0zXsIJn +POiNZD6JuK+B/bP/2LR08eBu2wwkP9LAqz2f74w9Ir//Ei/RLrzQwIj1xeW2 +93mw6sOS/l9fNVDzVorlkyYeRPO6tp6RWY7TxKfAvZU8+Orq5TsYvBwF/4hT +FON4MJgbsHG3iCbu86SeoizlgcNogsOQ6QrU+9TsfNq8DoaDRGOvJa/Ef7Jk +Dz/bc5X8/1AQymrWwvNxhjrFgZdB+rHmsbpRbXw1V+et7ncRVLJr3UxNdbFj +k7AiTfMCFOmwlsmE6uFWw8xtjbLV8EDJymQiTx9dAn5lxchXAlulmWvwwgBP +Xn4ZSflTDhLC5+IC01Zhf2qAiimtDNRSaZabNVdjhblXhVbEaRBbvuW6x/3V +SCzOXhL7pQj0OYq1CVsNcV/11XSJweOw+510iyPFCH/8+KpYPJgPoxO5Xg5F +Rqg843Hjki8X7A3aShz0jPFRZWbYJ4tcuD1h8ftnpzHOph0Zsv2YBdG6hn1P +Q0wwerKvhuGZDpyR4J7NYqYoQTRTKOMpsFaD6rL0nCkO/Lc4diJkP6xMObK3 +2cwMJcChTeJ2AmiHsO4s7zPD9Pq5CzKRsRByOyz92i5zHDD4+8Bjyk4Yifqa +sDbOHBWbD2n5fYyBvaqRO17Em6OBj8uM8cMYOLI/xmM6yRx7qi5tUj0eA3Xs +eLplpjkmjIa/f6kVA7PXD91qKTFHnDf98HVjNOTXnp181mKORkra/nAnEu6U +9QSPy7Fw8Nd9iYC2cHjvzPCPp7LwhXDvHvW6cKD8itr8W4mF51MMXX8Wh4O1 +u8j6hXQWxj1dbvQkKhza/mKbKWqzUCnRrGGtfDg82lYqZrWGhWcyS7hmEWHQ +pxFxlbudhTItdQUC1VCYvDD/0+AGC/3sPY6/JYLh40a7ssMNLMzb6ufGKw+G +3gVH1w00sdCd0AnK4wZDU4BS8Ym7LKQavY2Njw6GNKoJe66DhS6fBvd3awfD +suyI/Q/esLCp5m/J7qog0A19TgkRYqPV5ZDWG5XbIGj5JbESFzZuds+7dao1 +ABLv+UVourHxZI2ur3J9AHBDpB8SHmzc4bc85XxVANyq2pf70JuNsVVbLYcy +A0BWc53kXCAb9y34USRwCIA2zSHZgHg2Rvgl596r9AftlTS6Zikb03gNWVG9 +W2Fcu8CUGGPjlP7ifLV0H+h9hGtlJti415zYyI30gbvRIxviBGwcLzlyVNbL +B44RDrtMZ9hY3iXJ9NT0AW025XKjsAUStZuKr3Zshm0OUYwWeQuMLr4d3iaz +GXpC7Zf0WFogDN4fNaj3hpuVv/8TZFsgXezpp2htLzC1ifvpmGOB5QK1zEMK +XlD/3/CSsqMW6PmFu/L8Ai8g1N6ZOeZb4O7hd+7K/Z5wueju0bOnLND3mzrt +eqEnlOVmsOyvWiAraMXsZSFPOBwnmVfUbYFL2oSSfL94gI+tOlqoWWKo5x7x +mn43mOsRlWihW2Lf5B/HgU43KAsZee2oboljFaK7dW+7wcfMhgSflZY4G3jc +7ttpN9jd4Vq7z9AShZ8+7FL0dYMj6/er3bSzxMtuLR6B11yhcdPzWeMYS+SI +zUyP33MB5aisBv27lpjXV1vjwHKEY/PbTXKaLTGdcmqzO90RhPLteJ9aLbEr +IiAyWsQRvl5fWFPWYYlyYUFJn587QCMlvUi62xKfc89n9cU6gE9hSsLUkCVW +frnVcIG/Doqa9pncXszBzfE3/dOs7WHJ+s08JQkOOoYsyqTq2kPKe3O9hGUc +NPcuXNEsZw9hC6c1Vslx8IJHZ7nrFzswc42XPafGwTc+Jn3ueXbw4sPuiYzV +HDw+weR/HFwLcuKRPBdvDkYsM8gdKbaFSpsDiWObORh2dCr20CFbMDxwzKZg +CwddBfGR+lG2sH6s7nlvIAeHDkrYtqEtZL4Q/AqK5KBqUWDy7882MH0u2Tox +lYNrUlb27+DYQJ9FQXf1JQ5acYOqBgVWELan8rTDVQ72i9TPKHywgqmr9SHD +dRycH96l4t9pBdLM3p+rr3MwT2Y4eeV5K3ASVVX55y4Hf/NaBqs2W8Gtnurg +7uccPG+ozLFsRnCUuKkX38vBtYo3PCtrEXrtO6aorzn412dLLdoZhMnGb9l+ +7zmYmfyozXkvgl75qitfvnLwbydhkUwDhFt9VvG538n5mZwzT1Ml7ye7AQzG +OFg7O1zBXYywPWvP0zgBB/+z4z6+3wUweTezRGGag7a9epbulwHSZk4GNc5w +sJ2vcuZPNsAy4xrdrXMcfDrg9aQrBOBsVKNgfp6DEs++1LdaA/wPEo+dEQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0749234348876782}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -15739,19 +15987,19 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0749234348876782}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -15765,165 +16013,132 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwV13k4Fe0bB/DzUlkqsh/rWUjZy34Op/u2RLYskaIsIUuWiigqS7ai3mOp +0IIspY0zJxV6qxeJFioqadEbWmWJI4n85vfXXJ9rrpl5nnnu7/3MMLbFeIQI +USgUk78olP8fp951tGrkVK7p/vK5aF7Sdk3PWeo+q940CDJdGOIYygSU69pG +7c2H6Iu3R2ihhhDvdvGlcO85iBJqyBAKtQapEYX8Xy8JMDb/pdi93QP6b62P +mXzZDNrZ1kfMt28DO42vb8dfPgMjnTSx90G74ddLs+NjLz/ApQ1F9w77pEGL +zfnKp+cmIDS/13eRIB9U+hs+btOdgzDxXWkv2k6BbKT/RREbYbR+bc8zmy+H +/NV2Teu9RLH9nszblxrV8Kpo1d3xZUvRK9sk8MDFGsipTO4SUpTCjE+nWy4s +uQKOxuHScupSGJTTbTRLvQKirR5eK/Sk8MIG+qz98iuQPrD8tZOVFD53bctp +51yB/cxHHwvDpbDLPyM0KvoKRJdR/2g2SiG74I2qbecVcD/N03XylcaXsktK +5bOvgkLhwOGCMzKY4razd2CgFqg69enT1TJ4Yp6bmPO9FpSaM5O31smgW7yJ +uO7PWlAb09qzokUGd/53fkpnYR0sd94Z0PRZBpkFTHc9ah0YLZgzHTCSxZDZ +tpAMTh24xskPGj6QxVofdlBWRh24Lf787mS3LM63CuY/H64Dj3MNr2bfyOIp +F2Fh+2N1sPHJlq62UVlckrSVPX2iDrbqVjT6yMmh69iGbQYX6mDHoEFeWoAc +Buzmc8Y66iDL02HNsyk5tI23Km4Q54HStU4lob/ksfPmvtHfEjy4KuP5c/Vi +eazQvTLLkuHBi2d+dXk0efQ+f4Fdo8wDDfc4pvs6eawa7bDw1OVBs0vpoifF +8tgWZCX5xpkHc3aCzseWCrjS9L4F7wgPuNWJl+bsFLDvddWX8GPk9Yso2Xru +Ctic88NOLZ8HzvfErY6GKODU0c2SicU8KLGh852PKWDrM++eufM8MEenkw/7 +FTBKlati2sqDWFa5f0caFat9aJHhv3jgWCYx6ZRLxaBTf48GzvKAKbI/u/M4 +FU9MP67dOM+DJz0bed0XqPgm7q9PxgsJ0N+5RPhdJxUJ6jnD1mUEfK5OqP6h +pIi3u0a89FcQsEV2/XdlviLuCw9rX+1OgFFSU+rZW4ponFjFJDYQIP5hpTyj +TRFp9Qdv628koKFWGDRfKWKG30STii8B8k4N3FXziig4e7HnYTABT1I1jNc6 +KWGEzaEb8QkE2I7OJEYPKKHVUJrnXyUE7FtXqP3vsBJSINyEcpqAq+V6fTJT +SqilUZb5+wwBVM8AVoOoMkbH7Ur6VE7A8M17P4X1lVEsd/ZmYQ0BBWncuOK9 +ypjvT+2zvUlA+2stjeFUZfx1vey7eCMBs8Yt3WtySMvfSXjcRMD2TwLDwTPK +mD0fN25/hwC2s++4fosylqYIZUm3EfBBTjO6dakKjvy7qOzPMwIUYu6oKiio +oFnNcY/cHgKc2zc9Dqer4J/TUofkXxBwPTFHV9JIBROYD/3prwg40j/2dfMm +FTw77y0v3k+AYU1T6Og5FaR1Pv9m8pWAUCEvBevLKljWSDTmfCPgtO9IW2G9 +CqLoO8l3wwQskmBostvJ5z32dd07SkDf7szB9O8qGJD7xPDQJAGplu6BSuaq +qDz0cOnEHAHr/M7+MLNWxel1yje15gmQSPl2yMtZFVONV2zcQuHD6ZaMam6A +Kj62Kd9ZL8SHm46N3xYdVsVZr3MmZiJ8SI4UOaBRoIpb0t0KXUT5YHfMU8L6 +jCr2Z5p99xfjQ8/TkVUHeKp4r1wkb+9iPoxtUo+feKWKaVf8b+6T5MONxJ0i +UoOqaFaeSNm5jA8HT/9TpD+iigKhModtUnxY8t67KVxIDS/05nxgy/BhRWgu +5b22Go7p/GN/S54PfnsERx4lqWF2QPRFiioflp+0VvmaoYY/kmVibpAevvn3 +FRGuGlbc87eJUOND4qzWE+tKNVyZ9K9aK40Pxw/5yTU8UkOTEw1N65h82FJ1 +qfrFCzVkqJZS35Nm3p82m3yvho3lE7mx6nyoEy/wMRCo4VmZoTvHNPjwKO9+ +aZUqDWdXSew4ocmHAr7s6pYVNFxcnFUqsYIPPs8Dm9+vpmHUicyJNNKfqbOD +ynY0NC41++O/kg+1bId4lhsNfz+Zu95OOn7LCRFvHxqqDuwq0NPig3DZKu38 +aBr2SBc3fSP94N8DTbV7aWj7JlxsrTYfuAMPnB+n0ZDyRj25hLTaipAY0ZM0 +tHp86iNLhw9D6wiKZjkNlXpS+g6Rvhwxn2dziYZ09pmZDtLsq8XXDt6h4Wu1 +ly2Ounywfdk5N9JOwz22J8pSSa+nLLD3f0bDunlR3XrSm7RY3K7XNPQ3kAsd +Ih3kEf0KhmhYzy33kNbjQ3RSBbNuhIanbh8ftSC9t7J3B32ahlKr+9ZsI/3v +x0yfdgod8y03WWWQtktiJKcspGOw1MzPStIPJW9VmIvTUbzpYtC/pN0qN7aP +SdAxi7Yxo4/0C/Px4QsydOz+83nrGGnfxzlSgVQ66vxwGxHS58P7QE1TRVU6 +Ru/YbyZNevvUXZ+nDDomXfNhq5H+dsQ3+bAmHXNGXv/UJL2TNlVhpUPHPKnx +nbqkBXxu+y8DOhZ8y6nWJ524Tuc7z5iOQvTSYj3SlLf3pCJYdJRboeakRTpj +V4Apcw35fJe5JgZp8UW/ffqs6UgnVn+XJ80tOZ6cb0/HinW8flHScgarKh2d +6Vj0fHfhT3L8JS0P2oXc6bhjNGrJAGnappDvjV503DNXsu4h6crhealYHzqi +2YRDHWnt1BJTHX86TlbslMonXStn4jsQRMcrihJlO0kbX+xKPhVGx/uW96ec +SDeuiajcEEVH6+QieQ3SraGl31viyflr76t/QK6fwyxLen8SHQv3ZJgWk+7k +9pgap9BRo6IiPZj0qwaxlMrD5Pjp1Nxxsl781ldWbjlGx8NVu+z5pAc/rOmQ +LaBj+p6B7l2kRxbHSWecpuPML7XgIbIeY8skzDjldBTQf4T/vz6njWt8BVV0 +vBs/ZutMWtjvXWVILR3fSh45WE3WN7VunZldMx2vxyirmpB5OGM74PunjY5n +VPS+PCHzw3x1IOX6QzoOZ17LDyetJ8Tv0HxOnl+1KS2PzJ+1p+oWkc/kerVl +jDeR+bz/+UbKnWE6Gol1t60h7XzAoyphnKy39GVpt8k8e1dnjXyaoWOQ6/mr +18i8R06Pp7QvZaDtUOKfJDqZj13b5T9KM3CRICbsFdkvRL/2XRKmMjB77WUz +I9JVr1terGEycI89d/Ebst+8u31ct96UgRtdNtQJKZN5MxNvfmbBQHmRjh02 +SmQ91R30HkMGiqx9cDJFkQ/y50LTdJwY6Jqubj+mwAfXDFZvuT8DG4Y9dKpk +yTz/uRJ1J5iBSsJY0EH2v+F4pvDbcAaOWLASvkrzITtssT41joFP3zAaGGS/ +vOv09tCxbAZy3je6bF/KB0PpVIMkHgMfpsUscFhI1m+OoLXoOgMXhB19a7KA +XG/hCJ/rTQwsSQxxpAnzYYfAI2P8HgNbBS5Dn8j+X9mr8Tq0j4GlnbGObrPk +/lzanukpzES7pcErk38Q8Etn2Ts9LybyNTwlA94QMHVGKdXIh4nzJ0T9vvQR +MCm5XIPlz8TRk2bcGHJ/G5lgRdiGM/FUn2LVbnL/+9AUNOVzgImHjSqbNjwh +4IHTDYnsKiYG3iyYSGshoGSHH3wQMHHClhtVdp6Ak2/DPnyaYeIz74NaHVUE +FLrGZnyfZ6JgsnFmpIKAY0bZD6fF1PElpg6sLiMg7TfPW1JNHZVQ/HdhEQE7 +chbutLRTR7sziy4+zSbA8tLlshMn1DHUiBe4KpSA1/RLpWtPqeOSY509GiEE +JJ6oOTtZqo4h86e+yQcRcCO1+rRHjToGPq4Sm/Qj9+dNZUUSt9Sx0ElVL5/8 +ntFaWMjN/E8de369A/+15PvyT0qJ19VA21UL5O0YBIxLOwZsbNbAA0zXsIJn +POiNZD6JuK+B/bP/2LR08eBu2wwkP9LAqz2f74w9Ir//Ei/RLrzQwIj1xeW2 +93mw6sOS/l9fNVDzVorlkyYeRPO6tp6RWY7TxKfAvZU8+Orq5TsYvBwF/4hT +FON4MJgbsHG3iCbu86SeoizlgcNogsOQ6QrU+9TsfNq8DoaDRGOvJa/Ef7Jk +Dz/bc5X8/1AQymrWwvNxhjrFgZdB+rHmsbpRbXw1V+et7ncRVLJr3UxNdbFj +k7AiTfMCFOmwlsmE6uFWw8xtjbLV8EDJymQiTx9dAn5lxchXAlulmWvwwgBP +Xn4ZSflTDhLC5+IC01Zhf2qAiimtDNRSaZabNVdjhblXhVbEaRBbvuW6x/3V +SCzOXhL7pQj0OYq1CVsNcV/11XSJweOw+510iyPFCH/8+KpYPJgPoxO5Xg5F +Rqg843Hjki8X7A3aShz0jPFRZWbYJ4tcuD1h8ftnpzHOph0Zsv2YBdG6hn1P +Q0wwerKvhuGZDpyR4J7NYqYoQTRTKOMpsFaD6rL0nCkO/Lc4diJkP6xMObK3 +2cwMJcChTeJ2AmiHsO4s7zPD9Pq5CzKRsRByOyz92i5zHDD4+8Bjyk4Yifqa +sDbOHBWbD2n5fYyBvaqRO17Em6OBj8uM8cMYOLI/xmM6yRx7qi5tUj0eA3Xs +eLplpjkmjIa/f6kVA7PXD91qKTFHnDf98HVjNOTXnp181mKORkra/nAnEu6U +9QSPy7Fw8Nd9iYC2cHjvzPCPp7LwhXDvHvW6cKD8itr8W4mF51MMXX8Wh4O1 +u8j6hXQWxj1dbvQkKhza/mKbKWqzUCnRrGGtfDg82lYqZrWGhWcyS7hmEWHQ +pxFxlbudhTItdQUC1VCYvDD/0+AGC/3sPY6/JYLh40a7ssMNLMzb6ufGKw+G +3gVH1w00sdCd0AnK4wZDU4BS8Ym7LKQavY2Njw6GNKoJe66DhS6fBvd3awfD +suyI/Q/esLCp5m/J7qog0A19TgkRYqPV5ZDWG5XbIGj5JbESFzZuds+7dao1 +ABLv+UVourHxZI2ur3J9AHBDpB8SHmzc4bc85XxVANyq2pf70JuNsVVbLYcy +A0BWc53kXCAb9y34USRwCIA2zSHZgHg2Rvgl596r9AftlTS6Zikb03gNWVG9 +W2Fcu8CUGGPjlP7ifLV0H+h9hGtlJti415zYyI30gbvRIxviBGwcLzlyVNbL +B44RDrtMZ9hY3iXJ9NT0AW025XKjsAUStZuKr3Zshm0OUYwWeQuMLr4d3iaz +GXpC7Zf0WFogDN4fNaj3hpuVv/8TZFsgXezpp2htLzC1ifvpmGOB5QK1zEMK +XlD/3/CSsqMW6PmFu/L8Ai8g1N6ZOeZb4O7hd+7K/Z5wueju0bOnLND3mzrt +eqEnlOVmsOyvWiAraMXsZSFPOBwnmVfUbYFL2oSSfL94gI+tOlqoWWKo5x7x +mn43mOsRlWihW2Lf5B/HgU43KAsZee2oboljFaK7dW+7wcfMhgSflZY4G3jc +7ttpN9jd4Vq7z9AShZ8+7FL0dYMj6/er3bSzxMtuLR6B11yhcdPzWeMYS+SI +zUyP33MB5aisBv27lpjXV1vjwHKEY/PbTXKaLTGdcmqzO90RhPLteJ9aLbEr +IiAyWsQRvl5fWFPWYYlyYUFJn587QCMlvUi62xKfc89n9cU6gE9hSsLUkCVW +frnVcIG/Doqa9pncXszBzfE3/dOs7WHJ+s08JQkOOoYsyqTq2kPKe3O9hGUc +NPcuXNEsZw9hC6c1Vslx8IJHZ7nrFzswc42XPafGwTc+Jn3ueXbw4sPuiYzV +HDw+weR/HFwLcuKRPBdvDkYsM8gdKbaFSpsDiWObORh2dCr20CFbMDxwzKZg +CwddBfGR+lG2sH6s7nlvIAeHDkrYtqEtZL4Q/AqK5KBqUWDy7882MH0u2Tox +lYNrUlb27+DYQJ9FQXf1JQ5acYOqBgVWELan8rTDVQ72i9TPKHywgqmr9SHD +dRycH96l4t9pBdLM3p+rr3MwT2Y4eeV5K3ASVVX55y4Hf/NaBqs2W8Gtnurg +7uccPG+ozLFsRnCUuKkX38vBtYo3PCtrEXrtO6aorzn412dLLdoZhMnGb9l+ +7zmYmfyozXkvgl75qitfvnLwbydhkUwDhFt9VvG538n5mZwzT1Ml7ye7AQzG +OFg7O1zBXYywPWvP0zgBB/+z4z6+3wUweTezRGGag7a9epbulwHSZk4GNc5w +sJ2vcuZPNsAy4xrdrXMcfDrg9aQrBOBsVKNgfp6DEs++1LdaA/wPEo+dEQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.0749234348876782}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -15934,6 +16149,7 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -15961,7 +16177,8 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1760850255633475}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0749234348876782}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -15969,17 +16186,619 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913465524249306`*^9}, + CellChangeTimes->{3.9913465524249306`*^9, 3.99435602889277*^9}, CellLabel-> - "Out[444]=",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] + "Out[189]=",ExpressionUUID->"95df8813-14a6-462c-b0f5-fe4547ddbf36"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6883477e-2a54-0a45-979a-\ -ae60c73e9e82"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[190]:=",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4Fe0bB/DzUlkqsh/rWUjZy34Op/u2RLYskaIsIUuWiigqS7ai3mOp +0IIspY0zJxV6qxeJFioqadEbWmWJI4n85vfXXJ9rrpl5nnnu7/3MMLbFeIQI +USgUk78olP8fp951tGrkVK7p/vK5aF7Sdk3PWeo+q940CDJdGOIYygSU69pG +7c2H6Iu3R2ihhhDvdvGlcO85iBJqyBAKtQapEYX8Xy8JMDb/pdi93QP6b62P +mXzZDNrZ1kfMt28DO42vb8dfPgMjnTSx90G74ddLs+NjLz/ApQ1F9w77pEGL +zfnKp+cmIDS/13eRIB9U+hs+btOdgzDxXWkv2k6BbKT/RREbYbR+bc8zmy+H +/NV2Teu9RLH9nszblxrV8Kpo1d3xZUvRK9sk8MDFGsipTO4SUpTCjE+nWy4s +uQKOxuHScupSGJTTbTRLvQKirR5eK/Sk8MIG+qz98iuQPrD8tZOVFD53bctp +51yB/cxHHwvDpbDLPyM0KvoKRJdR/2g2SiG74I2qbecVcD/N03XylcaXsktK +5bOvgkLhwOGCMzKY4razd2CgFqg69enT1TJ4Yp6bmPO9FpSaM5O31smgW7yJ +uO7PWlAb09qzokUGd/53fkpnYR0sd94Z0PRZBpkFTHc9ah0YLZgzHTCSxZDZ +tpAMTh24xskPGj6QxVofdlBWRh24Lf787mS3LM63CuY/H64Dj3MNr2bfyOIp +F2Fh+2N1sPHJlq62UVlckrSVPX2iDrbqVjT6yMmh69iGbQYX6mDHoEFeWoAc +Buzmc8Y66iDL02HNsyk5tI23Km4Q54HStU4lob/ksfPmvtHfEjy4KuP5c/Vi +eazQvTLLkuHBi2d+dXk0efQ+f4Fdo8wDDfc4pvs6eawa7bDw1OVBs0vpoifF +8tgWZCX5xpkHc3aCzseWCrjS9L4F7wgPuNWJl+bsFLDvddWX8GPk9Yso2Xru +Ctic88NOLZ8HzvfErY6GKODU0c2SicU8KLGh852PKWDrM++eufM8MEenkw/7 +FTBKlati2sqDWFa5f0caFat9aJHhv3jgWCYx6ZRLxaBTf48GzvKAKbI/u/M4 +FU9MP67dOM+DJz0bed0XqPgm7q9PxgsJ0N+5RPhdJxUJ6jnD1mUEfK5OqP6h +pIi3u0a89FcQsEV2/XdlviLuCw9rX+1OgFFSU+rZW4ponFjFJDYQIP5hpTyj +TRFp9Qdv628koKFWGDRfKWKG30STii8B8k4N3FXziig4e7HnYTABT1I1jNc6 +KWGEzaEb8QkE2I7OJEYPKKHVUJrnXyUE7FtXqP3vsBJSINyEcpqAq+V6fTJT +SqilUZb5+wwBVM8AVoOoMkbH7Ur6VE7A8M17P4X1lVEsd/ZmYQ0BBWncuOK9 +ypjvT+2zvUlA+2stjeFUZfx1vey7eCMBs8Yt3WtySMvfSXjcRMD2TwLDwTPK +mD0fN25/hwC2s++4fosylqYIZUm3EfBBTjO6dakKjvy7qOzPMwIUYu6oKiio +oFnNcY/cHgKc2zc9Dqer4J/TUofkXxBwPTFHV9JIBROYD/3prwg40j/2dfMm +FTw77y0v3k+AYU1T6Og5FaR1Pv9m8pWAUCEvBevLKljWSDTmfCPgtO9IW2G9 +CqLoO8l3wwQskmBostvJ5z32dd07SkDf7szB9O8qGJD7xPDQJAGplu6BSuaq +qDz0cOnEHAHr/M7+MLNWxel1yje15gmQSPl2yMtZFVONV2zcQuHD6ZaMam6A +Kj62Kd9ZL8SHm46N3xYdVsVZr3MmZiJ8SI4UOaBRoIpb0t0KXUT5YHfMU8L6 +jCr2Z5p99xfjQ8/TkVUHeKp4r1wkb+9iPoxtUo+feKWKaVf8b+6T5MONxJ0i +UoOqaFaeSNm5jA8HT/9TpD+iigKhModtUnxY8t67KVxIDS/05nxgy/BhRWgu +5b22Go7p/GN/S54PfnsERx4lqWF2QPRFiioflp+0VvmaoYY/kmVibpAevvn3 +FRGuGlbc87eJUOND4qzWE+tKNVyZ9K9aK40Pxw/5yTU8UkOTEw1N65h82FJ1 +qfrFCzVkqJZS35Nm3p82m3yvho3lE7mx6nyoEy/wMRCo4VmZoTvHNPjwKO9+ +aZUqDWdXSew4ocmHAr7s6pYVNFxcnFUqsYIPPs8Dm9+vpmHUicyJNNKfqbOD +ynY0NC41++O/kg+1bId4lhsNfz+Zu95OOn7LCRFvHxqqDuwq0NPig3DZKu38 +aBr2SBc3fSP94N8DTbV7aWj7JlxsrTYfuAMPnB+n0ZDyRj25hLTaipAY0ZM0 +tHp86iNLhw9D6wiKZjkNlXpS+g6Rvhwxn2dziYZ09pmZDtLsq8XXDt6h4Wu1 +ly2Ounywfdk5N9JOwz22J8pSSa+nLLD3f0bDunlR3XrSm7RY3K7XNPQ3kAsd +Ih3kEf0KhmhYzy33kNbjQ3RSBbNuhIanbh8ftSC9t7J3B32ahlKr+9ZsI/3v +x0yfdgod8y03WWWQtktiJKcspGOw1MzPStIPJW9VmIvTUbzpYtC/pN0qN7aP +SdAxi7Yxo4/0C/Px4QsydOz+83nrGGnfxzlSgVQ66vxwGxHS58P7QE1TRVU6 +Ru/YbyZNevvUXZ+nDDomXfNhq5H+dsQ3+bAmHXNGXv/UJL2TNlVhpUPHPKnx +nbqkBXxu+y8DOhZ8y6nWJ524Tuc7z5iOQvTSYj3SlLf3pCJYdJRboeakRTpj +V4Apcw35fJe5JgZp8UW/ffqs6UgnVn+XJ80tOZ6cb0/HinW8flHScgarKh2d +6Vj0fHfhT3L8JS0P2oXc6bhjNGrJAGnappDvjV503DNXsu4h6crhealYHzqi +2YRDHWnt1BJTHX86TlbslMonXStn4jsQRMcrihJlO0kbX+xKPhVGx/uW96ec +SDeuiajcEEVH6+QieQ3SraGl31viyflr76t/QK6fwyxLen8SHQv3ZJgWk+7k +9pgap9BRo6IiPZj0qwaxlMrD5Pjp1Nxxsl781ldWbjlGx8NVu+z5pAc/rOmQ +LaBj+p6B7l2kRxbHSWecpuPML7XgIbIeY8skzDjldBTQf4T/vz6njWt8BVV0 +vBs/ZutMWtjvXWVILR3fSh45WE3WN7VunZldMx2vxyirmpB5OGM74PunjY5n +VPS+PCHzw3x1IOX6QzoOZ17LDyetJ8Tv0HxOnl+1KS2PzJ+1p+oWkc/kerVl +jDeR+bz/+UbKnWE6Gol1t60h7XzAoyphnKy39GVpt8k8e1dnjXyaoWOQ6/mr +18i8R06Pp7QvZaDtUOKfJDqZj13b5T9KM3CRICbsFdkvRL/2XRKmMjB77WUz +I9JVr1terGEycI89d/Ebst+8u31ct96UgRtdNtQJKZN5MxNvfmbBQHmRjh02 +SmQ91R30HkMGiqx9cDJFkQ/y50LTdJwY6Jqubj+mwAfXDFZvuT8DG4Y9dKpk +yTz/uRJ1J5iBSsJY0EH2v+F4pvDbcAaOWLASvkrzITtssT41joFP3zAaGGS/ +vOv09tCxbAZy3je6bF/KB0PpVIMkHgMfpsUscFhI1m+OoLXoOgMXhB19a7KA +XG/hCJ/rTQwsSQxxpAnzYYfAI2P8HgNbBS5Dn8j+X9mr8Tq0j4GlnbGObrPk +/lzanukpzES7pcErk38Q8Etn2Ts9LybyNTwlA94QMHVGKdXIh4nzJ0T9vvQR +MCm5XIPlz8TRk2bcGHJ/G5lgRdiGM/FUn2LVbnL/+9AUNOVzgImHjSqbNjwh +4IHTDYnsKiYG3iyYSGshoGSHH3wQMHHClhtVdp6Ak2/DPnyaYeIz74NaHVUE +FLrGZnyfZ6JgsnFmpIKAY0bZD6fF1PElpg6sLiMg7TfPW1JNHZVQ/HdhEQE7 +chbutLRTR7sziy4+zSbA8tLlshMn1DHUiBe4KpSA1/RLpWtPqeOSY509GiEE +JJ6oOTtZqo4h86e+yQcRcCO1+rRHjToGPq4Sm/Qj9+dNZUUSt9Sx0ElVL5/8 +ntFaWMjN/E8de369A/+15PvyT0qJ19VA21UL5O0YBIxLOwZsbNbAA0zXsIJn +POiNZD6JuK+B/bP/2LR08eBu2wwkP9LAqz2f74w9Ir//Ei/RLrzQwIj1xeW2 +93mw6sOS/l9fNVDzVorlkyYeRPO6tp6RWY7TxKfAvZU8+Orq5TsYvBwF/4hT +FON4MJgbsHG3iCbu86SeoizlgcNogsOQ6QrU+9TsfNq8DoaDRGOvJa/Ef7Jk +Dz/bc5X8/1AQymrWwvNxhjrFgZdB+rHmsbpRbXw1V+et7ncRVLJr3UxNdbFj +k7AiTfMCFOmwlsmE6uFWw8xtjbLV8EDJymQiTx9dAn5lxchXAlulmWvwwgBP +Xn4ZSflTDhLC5+IC01Zhf2qAiimtDNRSaZabNVdjhblXhVbEaRBbvuW6x/3V +SCzOXhL7pQj0OYq1CVsNcV/11XSJweOw+510iyPFCH/8+KpYPJgPoxO5Xg5F +Rqg843Hjki8X7A3aShz0jPFRZWbYJ4tcuD1h8ftnpzHOph0Zsv2YBdG6hn1P +Q0wwerKvhuGZDpyR4J7NYqYoQTRTKOMpsFaD6rL0nCkO/Lc4diJkP6xMObK3 +2cwMJcChTeJ2AmiHsO4s7zPD9Pq5CzKRsRByOyz92i5zHDD4+8Bjyk4Yifqa +sDbOHBWbD2n5fYyBvaqRO17Em6OBj8uM8cMYOLI/xmM6yRx7qi5tUj0eA3Xs +eLplpjkmjIa/f6kVA7PXD91qKTFHnDf98HVjNOTXnp181mKORkra/nAnEu6U +9QSPy7Fw8Nd9iYC2cHjvzPCPp7LwhXDvHvW6cKD8itr8W4mF51MMXX8Wh4O1 +u8j6hXQWxj1dbvQkKhza/mKbKWqzUCnRrGGtfDg82lYqZrWGhWcyS7hmEWHQ +pxFxlbudhTItdQUC1VCYvDD/0+AGC/3sPY6/JYLh40a7ssMNLMzb6ufGKw+G +3gVH1w00sdCd0AnK4wZDU4BS8Ym7LKQavY2Njw6GNKoJe66DhS6fBvd3awfD +suyI/Q/esLCp5m/J7qog0A19TgkRYqPV5ZDWG5XbIGj5JbESFzZuds+7dao1 +ABLv+UVourHxZI2ur3J9AHBDpB8SHmzc4bc85XxVANyq2pf70JuNsVVbLYcy +A0BWc53kXCAb9y34USRwCIA2zSHZgHg2Rvgl596r9AftlTS6Zikb03gNWVG9 +W2Fcu8CUGGPjlP7ifLV0H+h9hGtlJti415zYyI30gbvRIxviBGwcLzlyVNbL +B44RDrtMZ9hY3iXJ9NT0AW025XKjsAUStZuKr3Zshm0OUYwWeQuMLr4d3iaz +GXpC7Zf0WFogDN4fNaj3hpuVv/8TZFsgXezpp2htLzC1ifvpmGOB5QK1zEMK +XlD/3/CSsqMW6PmFu/L8Ai8g1N6ZOeZb4O7hd+7K/Z5wueju0bOnLND3mzrt +eqEnlOVmsOyvWiAraMXsZSFPOBwnmVfUbYFL2oSSfL94gI+tOlqoWWKo5x7x +mn43mOsRlWihW2Lf5B/HgU43KAsZee2oboljFaK7dW+7wcfMhgSflZY4G3jc +7ttpN9jd4Vq7z9AShZ8+7FL0dYMj6/er3bSzxMtuLR6B11yhcdPzWeMYS+SI +zUyP33MB5aisBv27lpjXV1vjwHKEY/PbTXKaLTGdcmqzO90RhPLteJ9aLbEr +IiAyWsQRvl5fWFPWYYlyYUFJn587QCMlvUi62xKfc89n9cU6gE9hSsLUkCVW +frnVcIG/Doqa9pncXszBzfE3/dOs7WHJ+s08JQkOOoYsyqTq2kPKe3O9hGUc +NPcuXNEsZw9hC6c1Vslx8IJHZ7nrFzswc42XPafGwTc+Jn3ueXbw4sPuiYzV +HDw+weR/HFwLcuKRPBdvDkYsM8gdKbaFSpsDiWObORh2dCr20CFbMDxwzKZg +CwddBfGR+lG2sH6s7nlvIAeHDkrYtqEtZL4Q/AqK5KBqUWDy7882MH0u2Tox +lYNrUlb27+DYQJ9FQXf1JQ5acYOqBgVWELan8rTDVQ72i9TPKHywgqmr9SHD +dRycH96l4t9pBdLM3p+rr3MwT2Y4eeV5K3ASVVX55y4Hf/NaBqs2W8Gtnurg +7uccPG+ozLFsRnCUuKkX38vBtYo3PCtrEXrtO6aorzn412dLLdoZhMnGb9l+ +7zmYmfyozXkvgl75qitfvnLwbydhkUwDhFt9VvG538n5mZwzT1Ml7ye7AQzG +OFg7O1zBXYywPWvP0zgBB/+z4z6+3wUweTezRGGag7a9epbulwHSZk4GNc5w +sJ2vcuZPNsAy4xrdrXMcfDrg9aQrBOBsVKNgfp6DEs++1LdaA/wPEo+dEQ== + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4Fe0bB/DzUlkqsh/rWUjZy34Op/u2RLYskaIsIUuWiigqS7ai3mOp +0IIspY0zJxV6qxeJFioqadEbWmWJI4n85vfXXJ9rrpl5nnnu7/3MMLbFeIQI +USgUk78olP8fp951tGrkVK7p/vK5aF7Sdk3PWeo+q940CDJdGOIYygSU69pG +7c2H6Iu3R2ihhhDvdvGlcO85iBJqyBAKtQapEYX8Xy8JMDb/pdi93QP6b62P +mXzZDNrZ1kfMt28DO42vb8dfPgMjnTSx90G74ddLs+NjLz/ApQ1F9w77pEGL +zfnKp+cmIDS/13eRIB9U+hs+btOdgzDxXWkv2k6BbKT/RREbYbR+bc8zmy+H +/NV2Teu9RLH9nszblxrV8Kpo1d3xZUvRK9sk8MDFGsipTO4SUpTCjE+nWy4s +uQKOxuHScupSGJTTbTRLvQKirR5eK/Sk8MIG+qz98iuQPrD8tZOVFD53bctp +51yB/cxHHwvDpbDLPyM0KvoKRJdR/2g2SiG74I2qbecVcD/N03XylcaXsktK +5bOvgkLhwOGCMzKY4razd2CgFqg69enT1TJ4Yp6bmPO9FpSaM5O31smgW7yJ +uO7PWlAb09qzokUGd/53fkpnYR0sd94Z0PRZBpkFTHc9ah0YLZgzHTCSxZDZ +tpAMTh24xskPGj6QxVofdlBWRh24Lf787mS3LM63CuY/H64Dj3MNr2bfyOIp +F2Fh+2N1sPHJlq62UVlckrSVPX2iDrbqVjT6yMmh69iGbQYX6mDHoEFeWoAc +Buzmc8Y66iDL02HNsyk5tI23Km4Q54HStU4lob/ksfPmvtHfEjy4KuP5c/Vi +eazQvTLLkuHBi2d+dXk0efQ+f4Fdo8wDDfc4pvs6eawa7bDw1OVBs0vpoifF +8tgWZCX5xpkHc3aCzseWCrjS9L4F7wgPuNWJl+bsFLDvddWX8GPk9Yso2Xru +Ctic88NOLZ8HzvfErY6GKODU0c2SicU8KLGh852PKWDrM++eufM8MEenkw/7 +FTBKlati2sqDWFa5f0caFat9aJHhv3jgWCYx6ZRLxaBTf48GzvKAKbI/u/M4 +FU9MP67dOM+DJz0bed0XqPgm7q9PxgsJ0N+5RPhdJxUJ6jnD1mUEfK5OqP6h +pIi3u0a89FcQsEV2/XdlviLuCw9rX+1OgFFSU+rZW4ponFjFJDYQIP5hpTyj +TRFp9Qdv628koKFWGDRfKWKG30STii8B8k4N3FXziig4e7HnYTABT1I1jNc6 +KWGEzaEb8QkE2I7OJEYPKKHVUJrnXyUE7FtXqP3vsBJSINyEcpqAq+V6fTJT +SqilUZb5+wwBVM8AVoOoMkbH7Ur6VE7A8M17P4X1lVEsd/ZmYQ0BBWncuOK9 +ypjvT+2zvUlA+2stjeFUZfx1vey7eCMBs8Yt3WtySMvfSXjcRMD2TwLDwTPK +mD0fN25/hwC2s++4fosylqYIZUm3EfBBTjO6dakKjvy7qOzPMwIUYu6oKiio +oFnNcY/cHgKc2zc9Dqer4J/TUofkXxBwPTFHV9JIBROYD/3prwg40j/2dfMm +FTw77y0v3k+AYU1T6Og5FaR1Pv9m8pWAUCEvBevLKljWSDTmfCPgtO9IW2G9 +CqLoO8l3wwQskmBostvJ5z32dd07SkDf7szB9O8qGJD7xPDQJAGplu6BSuaq +qDz0cOnEHAHr/M7+MLNWxel1yje15gmQSPl2yMtZFVONV2zcQuHD6ZaMam6A +Kj62Kd9ZL8SHm46N3xYdVsVZr3MmZiJ8SI4UOaBRoIpb0t0KXUT5YHfMU8L6 +jCr2Z5p99xfjQ8/TkVUHeKp4r1wkb+9iPoxtUo+feKWKaVf8b+6T5MONxJ0i +UoOqaFaeSNm5jA8HT/9TpD+iigKhModtUnxY8t67KVxIDS/05nxgy/BhRWgu +5b22Go7p/GN/S54PfnsERx4lqWF2QPRFiioflp+0VvmaoYY/kmVibpAevvn3 +FRGuGlbc87eJUOND4qzWE+tKNVyZ9K9aK40Pxw/5yTU8UkOTEw1N65h82FJ1 +qfrFCzVkqJZS35Nm3p82m3yvho3lE7mx6nyoEy/wMRCo4VmZoTvHNPjwKO9+ +aZUqDWdXSew4ocmHAr7s6pYVNFxcnFUqsYIPPs8Dm9+vpmHUicyJNNKfqbOD +ynY0NC41++O/kg+1bId4lhsNfz+Zu95OOn7LCRFvHxqqDuwq0NPig3DZKu38 +aBr2SBc3fSP94N8DTbV7aWj7JlxsrTYfuAMPnB+n0ZDyRj25hLTaipAY0ZM0 +tHp86iNLhw9D6wiKZjkNlXpS+g6Rvhwxn2dziYZ09pmZDtLsq8XXDt6h4Wu1 +ly2Ounywfdk5N9JOwz22J8pSSa+nLLD3f0bDunlR3XrSm7RY3K7XNPQ3kAsd +Ih3kEf0KhmhYzy33kNbjQ3RSBbNuhIanbh8ftSC9t7J3B32ahlKr+9ZsI/3v +x0yfdgod8y03WWWQtktiJKcspGOw1MzPStIPJW9VmIvTUbzpYtC/pN0qN7aP +SdAxi7Yxo4/0C/Px4QsydOz+83nrGGnfxzlSgVQ66vxwGxHS58P7QE1TRVU6 +Ru/YbyZNevvUXZ+nDDomXfNhq5H+dsQ3+bAmHXNGXv/UJL2TNlVhpUPHPKnx +nbqkBXxu+y8DOhZ8y6nWJ524Tuc7z5iOQvTSYj3SlLf3pCJYdJRboeakRTpj +V4Apcw35fJe5JgZp8UW/ffqs6UgnVn+XJ80tOZ6cb0/HinW8flHScgarKh2d +6Vj0fHfhT3L8JS0P2oXc6bhjNGrJAGnappDvjV503DNXsu4h6crhealYHzqi +2YRDHWnt1BJTHX86TlbslMonXStn4jsQRMcrihJlO0kbX+xKPhVGx/uW96ec +SDeuiajcEEVH6+QieQ3SraGl31viyflr76t/QK6fwyxLen8SHQv3ZJgWk+7k +9pgap9BRo6IiPZj0qwaxlMrD5Pjp1Nxxsl781ldWbjlGx8NVu+z5pAc/rOmQ +LaBj+p6B7l2kRxbHSWecpuPML7XgIbIeY8skzDjldBTQf4T/vz6njWt8BVV0 +vBs/ZutMWtjvXWVILR3fSh45WE3WN7VunZldMx2vxyirmpB5OGM74PunjY5n +VPS+PCHzw3x1IOX6QzoOZ17LDyetJ8Tv0HxOnl+1KS2PzJ+1p+oWkc/kerVl +jDeR+bz/+UbKnWE6Gol1t60h7XzAoyphnKy39GVpt8k8e1dnjXyaoWOQ6/mr +18i8R06Pp7QvZaDtUOKfJDqZj13b5T9KM3CRICbsFdkvRL/2XRKmMjB77WUz +I9JVr1terGEycI89d/Ebst+8u31ct96UgRtdNtQJKZN5MxNvfmbBQHmRjh02 +SmQ91R30HkMGiqx9cDJFkQ/y50LTdJwY6Jqubj+mwAfXDFZvuT8DG4Y9dKpk +yTz/uRJ1J5iBSsJY0EH2v+F4pvDbcAaOWLASvkrzITtssT41joFP3zAaGGS/ +vOv09tCxbAZy3je6bF/KB0PpVIMkHgMfpsUscFhI1m+OoLXoOgMXhB19a7KA +XG/hCJ/rTQwsSQxxpAnzYYfAI2P8HgNbBS5Dn8j+X9mr8Tq0j4GlnbGObrPk +/lzanukpzES7pcErk38Q8Etn2Ts9LybyNTwlA94QMHVGKdXIh4nzJ0T9vvQR +MCm5XIPlz8TRk2bcGHJ/G5lgRdiGM/FUn2LVbnL/+9AUNOVzgImHjSqbNjwh +4IHTDYnsKiYG3iyYSGshoGSHH3wQMHHClhtVdp6Ak2/DPnyaYeIz74NaHVUE +FLrGZnyfZ6JgsnFmpIKAY0bZD6fF1PElpg6sLiMg7TfPW1JNHZVQ/HdhEQE7 +chbutLRTR7sziy4+zSbA8tLlshMn1DHUiBe4KpSA1/RLpWtPqeOSY509GiEE +JJ6oOTtZqo4h86e+yQcRcCO1+rRHjToGPq4Sm/Qj9+dNZUUSt9Sx0ElVL5/8 +ntFaWMjN/E8de369A/+15PvyT0qJ19VA21UL5O0YBIxLOwZsbNbAA0zXsIJn +POiNZD6JuK+B/bP/2LR08eBu2wwkP9LAqz2f74w9Ir//Ei/RLrzQwIj1xeW2 +93mw6sOS/l9fNVDzVorlkyYeRPO6tp6RWY7TxKfAvZU8+Orq5TsYvBwF/4hT +FON4MJgbsHG3iCbu86SeoizlgcNogsOQ6QrU+9TsfNq8DoaDRGOvJa/Ef7Jk +Dz/bc5X8/1AQymrWwvNxhjrFgZdB+rHmsbpRbXw1V+et7ncRVLJr3UxNdbFj +k7AiTfMCFOmwlsmE6uFWw8xtjbLV8EDJymQiTx9dAn5lxchXAlulmWvwwgBP +Xn4ZSflTDhLC5+IC01Zhf2qAiimtDNRSaZabNVdjhblXhVbEaRBbvuW6x/3V +SCzOXhL7pQj0OYq1CVsNcV/11XSJweOw+510iyPFCH/8+KpYPJgPoxO5Xg5F +Rqg843Hjki8X7A3aShz0jPFRZWbYJ4tcuD1h8ftnpzHOph0Zsv2YBdG6hn1P +Q0wwerKvhuGZDpyR4J7NYqYoQTRTKOMpsFaD6rL0nCkO/Lc4diJkP6xMObK3 +2cwMJcChTeJ2AmiHsO4s7zPD9Pq5CzKRsRByOyz92i5zHDD4+8Bjyk4Yifqa +sDbOHBWbD2n5fYyBvaqRO17Em6OBj8uM8cMYOLI/xmM6yRx7qi5tUj0eA3Xs +eLplpjkmjIa/f6kVA7PXD91qKTFHnDf98HVjNOTXnp181mKORkra/nAnEu6U +9QSPy7Fw8Nd9iYC2cHjvzPCPp7LwhXDvHvW6cKD8itr8W4mF51MMXX8Wh4O1 +u8j6hXQWxj1dbvQkKhza/mKbKWqzUCnRrGGtfDg82lYqZrWGhWcyS7hmEWHQ +pxFxlbudhTItdQUC1VCYvDD/0+AGC/3sPY6/JYLh40a7ssMNLMzb6ufGKw+G +3gVH1w00sdCd0AnK4wZDU4BS8Ym7LKQavY2Njw6GNKoJe66DhS6fBvd3awfD +suyI/Q/esLCp5m/J7qog0A19TgkRYqPV5ZDWG5XbIGj5JbESFzZuds+7dao1 +ABLv+UVourHxZI2ur3J9AHBDpB8SHmzc4bc85XxVANyq2pf70JuNsVVbLYcy +A0BWc53kXCAb9y34USRwCIA2zSHZgHg2Rvgl596r9AftlTS6Zikb03gNWVG9 +W2Fcu8CUGGPjlP7ifLV0H+h9hGtlJti415zYyI30gbvRIxviBGwcLzlyVNbL +B44RDrtMZ9hY3iXJ9NT0AW025XKjsAUStZuKr3Zshm0OUYwWeQuMLr4d3iaz +GXpC7Zf0WFogDN4fNaj3hpuVv/8TZFsgXezpp2htLzC1ifvpmGOB5QK1zEMK +XlD/3/CSsqMW6PmFu/L8Ai8g1N6ZOeZb4O7hd+7K/Z5wueju0bOnLND3mzrt +eqEnlOVmsOyvWiAraMXsZSFPOBwnmVfUbYFL2oSSfL94gI+tOlqoWWKo5x7x +mn43mOsRlWihW2Lf5B/HgU43KAsZee2oboljFaK7dW+7wcfMhgSflZY4G3jc +7ttpN9jd4Vq7z9AShZ8+7FL0dYMj6/er3bSzxMtuLR6B11yhcdPzWeMYS+SI +zUyP33MB5aisBv27lpjXV1vjwHKEY/PbTXKaLTGdcmqzO90RhPLteJ9aLbEr +IiAyWsQRvl5fWFPWYYlyYUFJn587QCMlvUi62xKfc89n9cU6gE9hSsLUkCVW +frnVcIG/Doqa9pncXszBzfE3/dOs7WHJ+s08JQkOOoYsyqTq2kPKe3O9hGUc +NPcuXNEsZw9hC6c1Vslx8IJHZ7nrFzswc42XPafGwTc+Jn3ueXbw4sPuiYzV +HDw+weR/HFwLcuKRPBdvDkYsM8gdKbaFSpsDiWObORh2dCr20CFbMDxwzKZg +CwddBfGR+lG2sH6s7nlvIAeHDkrYtqEtZL4Q/AqK5KBqUWDy7882MH0u2Tox +lYNrUlb27+DYQJ9FQXf1JQ5acYOqBgVWELan8rTDVQ72i9TPKHywgqmr9SHD +dRycH96l4t9pBdLM3p+rr3MwT2Y4eeV5K3ASVVX55y4Hf/NaBqs2W8Gtnurg +7uccPG+ozLFsRnCUuKkX38vBtYo3PCtrEXrtO6aorzn412dLLdoZhMnGb9l+ +7zmYmfyozXkvgl75qitfvnLwbydhkUwDhFt9VvG538n5mZwzT1Ml7ye7AQzG +OFg7O1zBXYywPWvP0zgBB/+z4z6+3wUweTezRGGag7a9epbulwHSZk4GNc5w +sJ2vcuZPNsAy4xrdrXMcfDrg9aQrBOBsVKNgfp6DEs++1LdaA/wPEo+dEQ== + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0749234348876782}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0749234348876782}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4Fe0bB/DzUlkqsh/rWUjZy34Op/u2RLYskaIsIUuWiigqS7ai3mOp +0IIspY0zJxV6qxeJFioqadEbWmWJI4n85vfXXJ9rrpl5nnnu7/3MMLbFeIQI +USgUk78olP8fp951tGrkVK7p/vK5aF7Sdk3PWeo+q940CDJdGOIYygSU69pG +7c2H6Iu3R2ihhhDvdvGlcO85iBJqyBAKtQapEYX8Xy8JMDb/pdi93QP6b62P +mXzZDNrZ1kfMt28DO42vb8dfPgMjnTSx90G74ddLs+NjLz/ApQ1F9w77pEGL +zfnKp+cmIDS/13eRIB9U+hs+btOdgzDxXWkv2k6BbKT/RREbYbR+bc8zmy+H +/NV2Teu9RLH9nszblxrV8Kpo1d3xZUvRK9sk8MDFGsipTO4SUpTCjE+nWy4s +uQKOxuHScupSGJTTbTRLvQKirR5eK/Sk8MIG+qz98iuQPrD8tZOVFD53bctp +51yB/cxHHwvDpbDLPyM0KvoKRJdR/2g2SiG74I2qbecVcD/N03XylcaXsktK +5bOvgkLhwOGCMzKY4razd2CgFqg69enT1TJ4Yp6bmPO9FpSaM5O31smgW7yJ +uO7PWlAb09qzokUGd/53fkpnYR0sd94Z0PRZBpkFTHc9ah0YLZgzHTCSxZDZ +tpAMTh24xskPGj6QxVofdlBWRh24Lf787mS3LM63CuY/H64Dj3MNr2bfyOIp +F2Fh+2N1sPHJlq62UVlckrSVPX2iDrbqVjT6yMmh69iGbQYX6mDHoEFeWoAc +Buzmc8Y66iDL02HNsyk5tI23Km4Q54HStU4lob/ksfPmvtHfEjy4KuP5c/Vi +eazQvTLLkuHBi2d+dXk0efQ+f4Fdo8wDDfc4pvs6eawa7bDw1OVBs0vpoifF +8tgWZCX5xpkHc3aCzseWCrjS9L4F7wgPuNWJl+bsFLDvddWX8GPk9Yso2Xru +Ctic88NOLZ8HzvfErY6GKODU0c2SicU8KLGh852PKWDrM++eufM8MEenkw/7 +FTBKlati2sqDWFa5f0caFat9aJHhv3jgWCYx6ZRLxaBTf48GzvKAKbI/u/M4 +FU9MP67dOM+DJz0bed0XqPgm7q9PxgsJ0N+5RPhdJxUJ6jnD1mUEfK5OqP6h +pIi3u0a89FcQsEV2/XdlviLuCw9rX+1OgFFSU+rZW4ponFjFJDYQIP5hpTyj +TRFp9Qdv628koKFWGDRfKWKG30STii8B8k4N3FXziig4e7HnYTABT1I1jNc6 +KWGEzaEb8QkE2I7OJEYPKKHVUJrnXyUE7FtXqP3vsBJSINyEcpqAq+V6fTJT +SqilUZb5+wwBVM8AVoOoMkbH7Ur6VE7A8M17P4X1lVEsd/ZmYQ0BBWncuOK9 +ypjvT+2zvUlA+2stjeFUZfx1vey7eCMBs8Yt3WtySMvfSXjcRMD2TwLDwTPK +mD0fN25/hwC2s++4fosylqYIZUm3EfBBTjO6dakKjvy7qOzPMwIUYu6oKiio +oFnNcY/cHgKc2zc9Dqer4J/TUofkXxBwPTFHV9JIBROYD/3prwg40j/2dfMm +FTw77y0v3k+AYU1T6Og5FaR1Pv9m8pWAUCEvBevLKljWSDTmfCPgtO9IW2G9 +CqLoO8l3wwQskmBostvJ5z32dd07SkDf7szB9O8qGJD7xPDQJAGplu6BSuaq +qDz0cOnEHAHr/M7+MLNWxel1yje15gmQSPl2yMtZFVONV2zcQuHD6ZaMam6A +Kj62Kd9ZL8SHm46N3xYdVsVZr3MmZiJ8SI4UOaBRoIpb0t0KXUT5YHfMU8L6 +jCr2Z5p99xfjQ8/TkVUHeKp4r1wkb+9iPoxtUo+feKWKaVf8b+6T5MONxJ0i +UoOqaFaeSNm5jA8HT/9TpD+iigKhModtUnxY8t67KVxIDS/05nxgy/BhRWgu +5b22Go7p/GN/S54PfnsERx4lqWF2QPRFiioflp+0VvmaoYY/kmVibpAevvn3 +FRGuGlbc87eJUOND4qzWE+tKNVyZ9K9aK40Pxw/5yTU8UkOTEw1N65h82FJ1 +qfrFCzVkqJZS35Nm3p82m3yvho3lE7mx6nyoEy/wMRCo4VmZoTvHNPjwKO9+ +aZUqDWdXSew4ocmHAr7s6pYVNFxcnFUqsYIPPs8Dm9+vpmHUicyJNNKfqbOD +ynY0NC41++O/kg+1bId4lhsNfz+Zu95OOn7LCRFvHxqqDuwq0NPig3DZKu38 +aBr2SBc3fSP94N8DTbV7aWj7JlxsrTYfuAMPnB+n0ZDyRj25hLTaipAY0ZM0 +tHp86iNLhw9D6wiKZjkNlXpS+g6Rvhwxn2dziYZ09pmZDtLsq8XXDt6h4Wu1 +ly2Ounywfdk5N9JOwz22J8pSSa+nLLD3f0bDunlR3XrSm7RY3K7XNPQ3kAsd +Ih3kEf0KhmhYzy33kNbjQ3RSBbNuhIanbh8ftSC9t7J3B32ahlKr+9ZsI/3v +x0yfdgod8y03WWWQtktiJKcspGOw1MzPStIPJW9VmIvTUbzpYtC/pN0qN7aP +SdAxi7Yxo4/0C/Px4QsydOz+83nrGGnfxzlSgVQ66vxwGxHS58P7QE1TRVU6 +Ru/YbyZNevvUXZ+nDDomXfNhq5H+dsQ3+bAmHXNGXv/UJL2TNlVhpUPHPKnx +nbqkBXxu+y8DOhZ8y6nWJ524Tuc7z5iOQvTSYj3SlLf3pCJYdJRboeakRTpj +V4Apcw35fJe5JgZp8UW/ffqs6UgnVn+XJ80tOZ6cb0/HinW8flHScgarKh2d +6Vj0fHfhT3L8JS0P2oXc6bhjNGrJAGnappDvjV503DNXsu4h6crhealYHzqi +2YRDHWnt1BJTHX86TlbslMonXStn4jsQRMcrihJlO0kbX+xKPhVGx/uW96ec +SDeuiajcEEVH6+QieQ3SraGl31viyflr76t/QK6fwyxLen8SHQv3ZJgWk+7k +9pgap9BRo6IiPZj0qwaxlMrD5Pjp1Nxxsl781ldWbjlGx8NVu+z5pAc/rOmQ +LaBj+p6B7l2kRxbHSWecpuPML7XgIbIeY8skzDjldBTQf4T/vz6njWt8BVV0 +vBs/ZutMWtjvXWVILR3fSh45WE3WN7VunZldMx2vxyirmpB5OGM74PunjY5n +VPS+PCHzw3x1IOX6QzoOZ17LDyetJ8Tv0HxOnl+1KS2PzJ+1p+oWkc/kerVl +jDeR+bz/+UbKnWE6Gol1t60h7XzAoyphnKy39GVpt8k8e1dnjXyaoWOQ6/mr +18i8R06Pp7QvZaDtUOKfJDqZj13b5T9KM3CRICbsFdkvRL/2XRKmMjB77WUz +I9JVr1terGEycI89d/Ebst+8u31ct96UgRtdNtQJKZN5MxNvfmbBQHmRjh02 +SmQ91R30HkMGiqx9cDJFkQ/y50LTdJwY6Jqubj+mwAfXDFZvuT8DG4Y9dKpk +yTz/uRJ1J5iBSsJY0EH2v+F4pvDbcAaOWLASvkrzITtssT41joFP3zAaGGS/ +vOv09tCxbAZy3je6bF/KB0PpVIMkHgMfpsUscFhI1m+OoLXoOgMXhB19a7KA +XG/hCJ/rTQwsSQxxpAnzYYfAI2P8HgNbBS5Dn8j+X9mr8Tq0j4GlnbGObrPk +/lzanukpzES7pcErk38Q8Etn2Ts9LybyNTwlA94QMHVGKdXIh4nzJ0T9vvQR +MCm5XIPlz8TRk2bcGHJ/G5lgRdiGM/FUn2LVbnL/+9AUNOVzgImHjSqbNjwh +4IHTDYnsKiYG3iyYSGshoGSHH3wQMHHClhtVdp6Ak2/DPnyaYeIz74NaHVUE +FLrGZnyfZ6JgsnFmpIKAY0bZD6fF1PElpg6sLiMg7TfPW1JNHZVQ/HdhEQE7 +chbutLRTR7sziy4+zSbA8tLlshMn1DHUiBe4KpSA1/RLpWtPqeOSY509GiEE +JJ6oOTtZqo4h86e+yQcRcCO1+rRHjToGPq4Sm/Qj9+dNZUUSt9Sx0ElVL5/8 +ntFaWMjN/E8de369A/+15PvyT0qJ19VA21UL5O0YBIxLOwZsbNbAA0zXsIJn +POiNZD6JuK+B/bP/2LR08eBu2wwkP9LAqz2f74w9Ir//Ei/RLrzQwIj1xeW2 +93mw6sOS/l9fNVDzVorlkyYeRPO6tp6RWY7TxKfAvZU8+Orq5TsYvBwF/4hT +FON4MJgbsHG3iCbu86SeoizlgcNogsOQ6QrU+9TsfNq8DoaDRGOvJa/Ef7Jk +Dz/bc5X8/1AQymrWwvNxhjrFgZdB+rHmsbpRbXw1V+et7ncRVLJr3UxNdbFj +k7AiTfMCFOmwlsmE6uFWw8xtjbLV8EDJymQiTx9dAn5lxchXAlulmWvwwgBP +Xn4ZSflTDhLC5+IC01Zhf2qAiimtDNRSaZabNVdjhblXhVbEaRBbvuW6x/3V +SCzOXhL7pQj0OYq1CVsNcV/11XSJweOw+510iyPFCH/8+KpYPJgPoxO5Xg5F +Rqg843Hjki8X7A3aShz0jPFRZWbYJ4tcuD1h8ftnpzHOph0Zsv2YBdG6hn1P +Q0wwerKvhuGZDpyR4J7NYqYoQTRTKOMpsFaD6rL0nCkO/Lc4diJkP6xMObK3 +2cwMJcChTeJ2AmiHsO4s7zPD9Pq5CzKRsRByOyz92i5zHDD4+8Bjyk4Yifqa +sDbOHBWbD2n5fYyBvaqRO17Em6OBj8uM8cMYOLI/xmM6yRx7qi5tUj0eA3Xs +eLplpjkmjIa/f6kVA7PXD91qKTFHnDf98HVjNOTXnp181mKORkra/nAnEu6U +9QSPy7Fw8Nd9iYC2cHjvzPCPp7LwhXDvHvW6cKD8itr8W4mF51MMXX8Wh4O1 +u8j6hXQWxj1dbvQkKhza/mKbKWqzUCnRrGGtfDg82lYqZrWGhWcyS7hmEWHQ +pxFxlbudhTItdQUC1VCYvDD/0+AGC/3sPY6/JYLh40a7ssMNLMzb6ufGKw+G +3gVH1w00sdCd0AnK4wZDU4BS8Ym7LKQavY2Njw6GNKoJe66DhS6fBvd3awfD +suyI/Q/esLCp5m/J7qog0A19TgkRYqPV5ZDWG5XbIGj5JbESFzZuds+7dao1 +ABLv+UVourHxZI2ur3J9AHBDpB8SHmzc4bc85XxVANyq2pf70JuNsVVbLYcy +A0BWc53kXCAb9y34USRwCIA2zSHZgHg2Rvgl596r9AftlTS6Zikb03gNWVG9 +W2Fcu8CUGGPjlP7ifLV0H+h9hGtlJti415zYyI30gbvRIxviBGwcLzlyVNbL +B44RDrtMZ9hY3iXJ9NT0AW025XKjsAUStZuKr3Zshm0OUYwWeQuMLr4d3iaz +GXpC7Zf0WFogDN4fNaj3hpuVv/8TZFsgXezpp2htLzC1ifvpmGOB5QK1zEMK +XlD/3/CSsqMW6PmFu/L8Ai8g1N6ZOeZb4O7hd+7K/Z5wueju0bOnLND3mzrt +eqEnlOVmsOyvWiAraMXsZSFPOBwnmVfUbYFL2oSSfL94gI+tOlqoWWKo5x7x +mn43mOsRlWihW2Lf5B/HgU43KAsZee2oboljFaK7dW+7wcfMhgSflZY4G3jc +7ttpN9jd4Vq7z9AShZ8+7FL0dYMj6/er3bSzxMtuLR6B11yhcdPzWeMYS+SI +zUyP33MB5aisBv27lpjXV1vjwHKEY/PbTXKaLTGdcmqzO90RhPLteJ9aLbEr +IiAyWsQRvl5fWFPWYYlyYUFJn587QCMlvUi62xKfc89n9cU6gE9hSsLUkCVW +frnVcIG/Doqa9pncXszBzfE3/dOs7WHJ+s08JQkOOoYsyqTq2kPKe3O9hGUc +NPcuXNEsZw9hC6c1Vslx8IJHZ7nrFzswc42XPafGwTc+Jn3ueXbw4sPuiYzV +HDw+weR/HFwLcuKRPBdvDkYsM8gdKbaFSpsDiWObORh2dCr20CFbMDxwzKZg +CwddBfGR+lG2sH6s7nlvIAeHDkrYtqEtZL4Q/AqK5KBqUWDy7882MH0u2Tox +lYNrUlb27+DYQJ9FQXf1JQ5acYOqBgVWELan8rTDVQ72i9TPKHywgqmr9SHD +dRycH96l4t9pBdLM3p+rr3MwT2Y4eeV5K3ASVVX55y4Hf/NaBqs2W8Gtnurg +7uccPG+ozLFsRnCUuKkX38vBtYo3PCtrEXrtO6aorzn412dLLdoZhMnGb9l+ +7zmYmfyozXkvgl75qitfvnLwbydhkUwDhFt9VvG538n5mZwzT1Ml7ye7AQzG +OFg7O1zBXYywPWvP0zgBB/+z4z6+3wUweTezRGGag7a9epbulwHSZk4GNc5w +sJ2vcuZPNsAy4xrdrXMcfDrg9aQrBOBsVKNgfp6DEs++1LdaA/wPEo+dEQ== + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0749234348876782}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0749234348876782}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994356028980424*^9}, + CellLabel-> + "Out[190]=",ExpressionUUID->"7812efcc-4973-4f01-9733-bdbdc3d14232"] +}, Open ]], Cell[CellGroupData[{ @@ -16031,66 +16850,73 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[448]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], + "In[191]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 448, 489, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347571140808*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.875692056371218`*^-148\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 191, + 45, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.9943560290431128`*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], +In[191]:=",ExpressionUUID->"eb28ef7d-f171-4ed4-900a-fdafea0fb1c3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 448, 490, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711508217`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.7093731291604725`*^-150\\\", \ +RowBox[{\\\"257637673519649270217965438245428568131\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"89\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8303947407360000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 191, + 46, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994356029055191*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], +In[191]:=",ExpressionUUID->"51dfd873-35dc-48b9-ae15-3984f9fbe95b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 448, 491, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711592274`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.992906157552862`*^-153\\\", \ +RowBox[{\\\"990359217009531794717859144615427415897\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"92\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0373833891840000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 191, + 47, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994356029069223*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], +In[191]:=",ExpressionUUID->"8c8a86de-3810-4c80-a36a-16c4a48c5235"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 448, 492, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711683846`*^9}, +during this calculation.\"", 2, 191, 48, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994356029078273*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], +In[191]:=",ExpressionUUID->"399e059b-11da-4e19-a6c5-a24c7858cdc6"], -Cell[BoxData["10.362747935330763`"], "Output", - CellChangeTimes->{3.991347578228073*^9}, +Cell[BoxData["10.200101511881487`"], "Output", + CellChangeTimes->{3.991347578228073*^9, 3.994356126293754*^9}, CellLabel-> - "Out[448]=",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] + "Out[191]=",ExpressionUUID->"d1b50878-95c3-4e69-b818-3e2a46f9d74d"] }, Open ]], Cell[CellGroupData[{ @@ -16157,68 +16983,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918503106317043`*^9, - 3.9918503148567924`*^9}},ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-\ -2a98ba29b602"], + CellChangeTimes->{{3.9918503106317043`*^9, 3.9918503148567924`*^9}}, + CellLabel-> + "In[192]:=",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 493, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578265545*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.380381453543516`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 192, + 49, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356126352455*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], +In[192]:=",ExpressionUUID->"3f49e7b5-4248-4807-8b12-7dbc054a3f83"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 494, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578275551*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.601489692752313`*^-212\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 192, + 50, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356126363577*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], +In[192]:=",ExpressionUUID->"b098ee42-763b-499b-b723-cabff9499074"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 449, 495, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782835484`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.099735407201187`*^-217\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 192, + 51, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356126374351*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], +In[192]:=",ExpressionUUID->"81224e67-5567-4c7d-8e52-e0c650f9c133"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 449, 496, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782930756`*^9}, +during this calculation.\"", 2, 192, 52, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994356126384561*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], +In[192]:=",ExpressionUUID->"3eb02018-3d47-472a-a7e8-e267fafd1c8c"], -Cell[BoxData["1.4359199941844076`"], "Output", - CellChangeTimes->{3.9913475858902473`*^9}, +Cell[BoxData["0.2276415846514853`"], "Output", + CellChangeTimes->{3.9913475858902473`*^9, 3.994356137805148*^9}, CellLabel-> - "Out[449]=",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] + "Out[192]=",ExpressionUUID->"4aa2b360-4e23-4a86-9030-8865be2c593e"] }, Open ]], Cell[CellGroupData[{ @@ -16239,8 +17072,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -16285,68 +17117,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850318596199*^9, - 3.991850321359722*^9}},ExpressionUUID->"edfdd675-c60b-304e-9e16-\ -68452b971319"], + CellChangeTimes->{{3.991850318596199*^9, 3.991850321359722*^9}}, + CellLabel-> + "In[193]:=",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 497, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859272156`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.380381453543516`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 193, + 53, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356137860792*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], +In[193]:=",ExpressionUUID->"741c3221-0b45-4b7f-a4a7-9d4680d05020"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 498, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347585937319*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.601489692752313`*^-212\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 193, + 54, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356137870734*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], +In[193]:=",ExpressionUUID->"8a4fe311-ed46-4d1d-a6e7-d2cd2962c8ef"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 450, 499, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859463177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.099735407201187`*^-217\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 193, + 55, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356137879662*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], +In[193]:=",ExpressionUUID->"729fee61-3c54-472e-afd4-c64d529f3824"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 450, 500, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859543304`*^9}, +during this calculation.\"", 2, 193, 56, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994356137890563*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], +In[193]:=",ExpressionUUID->"8f5da751-c5a0-4e14-8e06-3a78fa58269d"], -Cell[BoxData["5.09241659576143`"], "Output", - CellChangeTimes->{3.9913475931276417`*^9}, +Cell[BoxData["28.127656751209226`"], "Output", + CellChangeTimes->{3.9913475931276417`*^9, 3.9943561487816668`*^9}, CellLabel-> - "Out[450]=",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] + "Out[193]=",ExpressionUUID->"03241197-2902-46ac-965d-6685f7240979"] }, Open ]], Cell[CellGroupData[{ @@ -16367,8 +17206,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -16413,68 +17251,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850325611994*^9, - 3.991850328926569*^9}},ExpressionUUID->"d0469d46-2e74-494a-be85-\ -b41cb2f3fa92"], + CellChangeTimes->{{3.991850325611994*^9, 3.991850328926569*^9}}, + CellLabel-> + "In[194]:=",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 501, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134759316485*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.380381453543516`*^-207\\\", \ +RowBox[{\\\"197404219092301941520573764198405501114\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"24\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7786163203929806995456000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 194, + 57, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356148840302*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], +In[194]:=",ExpressionUUID->"bd592535-e4bc-4f1d-a257-37461114c1d4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 502, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593173849*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.601489692752313`*^-212\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 194, + 58, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356148851158*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], +In[194]:=",ExpressionUUID->"aeb76550-28f9-4f16-a687-0082c4e58673"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 451, 503, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593182852*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.099735407201187`*^-217\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 194, + 59, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.9943561488595457`*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], +In[194]:=",ExpressionUUID->"c39e5e6e-3583-4325-ad5f-cc14a9b38daa"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 451, 504, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475931908703`*^9}, +during this calculation.\"", 2, 194, 60, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994356148868257*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], +In[194]:=",ExpressionUUID->"9293a222-f48d-4e42-a1ff-0c6a5e9a9f07"], -Cell[BoxData["16.684462799943017`"], "Output", - CellChangeTimes->{3.9913475973006153`*^9}, +Cell[BoxData["3.5096882520772943`"], "Output", + CellChangeTimes->{3.9913475973006153`*^9, 3.994356158116329*^9}, CellLabel-> - "Out[451]=",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] + "Out[194]=",ExpressionUUID->"571fecde-b4b7-485f-a035-b2d2f13f8c0b"] }, Open ]], Cell[CellGroupData[{ @@ -16483,22 +17328,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.99185033265069*^9, - 3.9918503366548977`*^9}},ExpressionUUID->"58b5e243-0972-1946-bd17-\ -aca0f3e8a35b"], - -Cell[BoxData["0.15578016747845222`"], "Output", - CellChangeTimes->{3.991347597341627*^9}, + CellChangeTimes->{{3.99185033265069*^9, 3.9918503366548977`*^9}}, CellLabel-> - "Out[452]=",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] + "In[195]:=",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], + +Cell[BoxData["0.022911343277136818`"], "Output", + CellChangeTimes->{3.991347597341627*^9, 3.9943561581722116`*^9}, + CellLabel-> + "Out[195]=",ExpressionUUID->"e5b98dfe-6ccd-4442-ad27-ec6a2f05a20a"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918503408077297`*^9, 3.99185034363356*^9}, - 3.991924645514969*^9},ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-\ -a3711ba632a4"], + 3.991924645514969*^9}, + CellLabel-> + "In[196]:=",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ @@ -16521,12 +17367,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[454]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], + "In[197]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.991347597372614*^9}, +Cell[BoxData["10.032152912597079`"], "Output", + CellChangeTimes->{3.991347597372614*^9, 3.994356158198167*^9}, CellLabel-> - "Out[454]=",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] + "Out[197]=",ExpressionUUID->"84c01c6a-f96e-432c-a3ec-2d67205cf403"] }, Open ]], Cell[CellGroupData[{ @@ -16536,12 +17382,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[456]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], + "In[198]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.991347597428034*^9}, +Cell[BoxData["2.0047698823718987`"], "Output", + CellChangeTimes->{3.991347597428034*^9, 3.994356158214593*^9}, CellLabel-> - "Out[456]=",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] + "Out[198]=",ExpressionUUID->"710b31f7-a4c8-4913-98c5-f8c7184d51ae"] }, Open ]], Cell[CellGroupData[{ @@ -16551,12 +17397,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[459]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], + "In[199]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.9913475974971066`*^9}, +Cell[BoxData["20.112158014524148`"], "Output", + CellChangeTimes->{3.9913475974971066`*^9, 3.9943561582294397`*^9}, CellLabel-> - "Out[459]=",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] + "Out[199]=",ExpressionUUID->"90e504df-c376-4047-b005-84e73339c026"] }, Open ]], Cell[CellGroupData[{ @@ -16746,12 +17592,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[460]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], + "In[200]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[BoxData["0.038908834568544604`"], "Output", - CellChangeTimes->{3.991347597528105*^9}, +Cell[BoxData["0.007383267977037426`"], "Output", + CellChangeTimes->{3.991347597528105*^9, 3.994356158249528*^9}, CellLabel-> - "Out[460]=",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] + "Out[200]=",ExpressionUUID->"14ccd4e2-4ee9-43f8-976e-66b186beba6d"] }, Open ]], Cell[CellGroupData[{ @@ -16765,12 +17611,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[461]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], + "In[201]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[BoxData["4.492838724335521`"], "Output", - CellChangeTimes->{3.9913475976441536`*^9}, +Cell[BoxData["10.31384558272641`"], "Output", + CellChangeTimes->{3.9913475976441536`*^9, 3.9943561584438543`*^9}, CellLabel-> - "Out[461]=",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] + "Out[201]=",ExpressionUUID->"02094abd-713c-483c-9024-c40b07610f32"] }, Open ]], Cell[CellGroupData[{ @@ -16962,12 +17808,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[462]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], + "In[202]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[BoxData["0.012544276227890849`"], "Output", - CellChangeTimes->{3.991347597671173*^9}, +Cell[BoxData["0.04824681260770544`"], "Output", + CellChangeTimes->{3.991347597671173*^9, 3.994356158466107*^9}, CellLabel-> - "Out[462]=",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] + "Out[202]=",ExpressionUUID->"9393edbb-ec53-48d6-af6c-c3475e528fcc"] }, Open ]], Cell[CellGroupData[{ @@ -16981,12 +17827,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[463]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], + "In[203]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[BoxData["7.912653285153153`"], "Output", - CellChangeTimes->{3.9913475977705975`*^9}, +Cell[BoxData["4.034694228409519`"], "Output", + CellChangeTimes->{3.9913475977705975`*^9, 3.994356158659864*^9}, CellLabel-> - "Out[463]=",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] + "Out[203]=",ExpressionUUID->"d6a1eb90-a2e8-400c-ac93-ee5bd6d093bb"] }, Open ]], Cell[CellGroupData[{ @@ -17079,12 +17925,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[464]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], + "In[204]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913475977856007`*^9}, +Cell[BoxData["0.06803408589806512`"], "Output", + CellChangeTimes->{3.9913475977856007`*^9, 3.994356158676388*^9}, CellLabel-> - "Out[464]=",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] + "Out[204]=",ExpressionUUID->"0ddc5a50-9560-414a-85ae-b7090c1b8e6e"] }, Open ]], Cell[CellGroupData[{ @@ -17174,12 +18020,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[465]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], + "In[205]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991347597813669*^9}, +Cell[BoxData["0.9319659141019349`"], "Output", + CellChangeTimes->{3.991347597813669*^9, 3.994356158692594*^9}, CellLabel-> - "Out[465]=",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] + "Out[205]=",ExpressionUUID->"79bfb413-9f4b-4add-8d6c-58589f937fd3"] }, Open ]], Cell[CellGroupData[{ @@ -17302,12 +18148,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[466]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], + "In[206]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913475978426323`*^9}, +Cell[BoxData["0.06340544905407981`"], "Output", + CellChangeTimes->{3.9913475978426323`*^9, 3.994356158712963*^9}, CellLabel-> - "Out[466]=",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] + "Out[206]=",ExpressionUUID->"38dc0049-26f6-4ba4-98cd-d678a9267b90"] }, Open ]], Cell[CellGroupData[{ @@ -17369,68 +18215,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503626529236`*^9},ExpressionUUID->"ba508068-6b78-254c-87d6-\ -cf1adc0753dd"], + CellChangeTimes->{3.9918503626529236`*^9}, + CellLabel-> + "In[207]:=",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 505, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597872814*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4268476583617296`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 207, + 61, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356158733156*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], +In[207]:=",ExpressionUUID->"8c0a031b-c149-4d8f-a2c0-610e052fabd4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 506, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475978828144`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.7355052410342136`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 207, + 62, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356158745541*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], +In[207]:=",ExpressionUUID->"2d072928-a4a5-4deb-876b-780297e6cdda"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 507, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597891815*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2444203695280446`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 207, + 63, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356158757242*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], +In[207]:=",ExpressionUUID->"dcf372b7-6fec-406f-a6b0-835ba7440df5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 467, 508, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597900812*^9}, +during this calculation.\"", 2, 207, 64, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994356158766348*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], +In[207]:=",ExpressionUUID->"02e5aa2d-8351-49ae-9d80-205a5da355ff"], -Cell[BoxData["4.492838724335523`"], "Output", - CellChangeTimes->{3.9913476018505497`*^9}, +Cell[BoxData["10.313845582726424`"], "Output", + CellChangeTimes->{3.9913476018505497`*^9, 3.9943561668019047`*^9}, CellLabel-> - "Out[467]=",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] + "Out[207]=",ExpressionUUID->"c23af0a6-6592-4d4f-a6e1-cf2a58d9a2b9"] }, Open ]], Cell[CellGroupData[{ @@ -17492,68 +18345,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503657638073`*^9},ExpressionUUID->"842e33e4-ae06-f746-ab8b-\ -97489285cc9c"], + CellChangeTimes->{3.9918503657638073`*^9}, + CellLabel-> + "In[208]:=",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 509, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476018885117`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.4268476583617296`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 208, + 65, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994356166859439*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], +In[208]:=",ExpressionUUID->"4da6d97c-01cd-4666-a99f-143a8652a057"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 510, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134760189851*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.7355052410342136`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 208, + 66, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.9943561668683863`*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], +In[208]:=",ExpressionUUID->"0878340e-20db-4e2b-a663-980c4836acbc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 511, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019065113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.2444203695280446`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 208, + 67, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994356166877531*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], +In[208]:=",ExpressionUUID->"753805c7-e53f-4973-837d-19e01026bd8f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 468, 512, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019158936`*^9}, +during this calculation.\"", 2, 208, 68, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.9943561668877707`*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], +In[208]:=",ExpressionUUID->"b687b4d7-fdbb-4c91-ab7b-94738711c11d"], -Cell[BoxData["7.912653285153152`"], "Output", - CellChangeTimes->{3.9913476058912296`*^9}, +Cell[BoxData["4.034694228409522`"], "Output", + CellChangeTimes->{3.9913476058912296`*^9, 3.994356174846141*^9}, CellLabel-> - "Out[468]=",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] + "Out[208]=",ExpressionUUID->"549b345d-3de2-4ad5-a8eb-e1f45abf0c06"] }, Open ]], Cell[CellGroupData[{ @@ -17611,93 +18471,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850369070572*^9},ExpressionUUID->"b2e314f8-a6f0-6942-a94c-\ -5ac1cacd7190"], + CellChangeTimes->{3.991850369070572*^9}, + CellLabel-> + "In[209]:=",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk4VV0XAHBzhCIyRsaKUjJFyV4ZwyVDgzld9x5D5ilRVFLvmzIX3gZl +SjKkpEKiJEnxhWZ1hYNryHSPivJtf5znPL9nP2fttdc+a29leogTk4eLi2sY +P0vvsDeb1z/ofGOyxX2bZ5cxiUwmCvXp5mVI9WBxypJZeQZZaub16KfopEo3 +tgPjtYCI7nOkfVhSrge7KibhGb95Ozp9TCLyHfa/LTKNCaX/Q4o249ofsB91 +hl1b0OlBe77ecPiEzf7Uduxo3Qc0ZrG16wu23KCqO2X2BY2kXn74Ddv2xzGj +iPZvqOQ1i6sfu2GBLRxT2oe+ruIuI7HfnZSOqwnuR0FRC4/Y2BMC5uxZnUHU +JNql+QNb4Hyoq+4cibyp039nsBXFr7aG1Q2jzbRV+r+w7eWp4gmzMZTf8KSN +byeJiOsqUlqCE+ipEktDGDtBfU/S4fYf6GPsl1Fx7A/S3VsjS6eQTZ1/jhI2 +wy3AP/P8NDr16/epDdiTV7hu3A2eQSnf/Dq1sQVVtMSmdDiIFvg50xQ7i/HM +Smw1hdyPs4Ro2Eo3XRO2zFGIV/jZ933YhpvOTATV/UQ7zik/DsD2M/jWzjZb +QDQFW8lc7NmYKL7l6/6gkmVmN4qwT9QJG2sI/kU8Z+XS72LngOFt3/ZFxHPc +P/f1Un5Frebhpdyg7JBGEzQhUWlLJuukPA+8+nJhUhp7csjrWPp5HqgsDZpb +j31Mk3PvTjAvhJzv0bLGzqpUVv2hww8zUY4707A/dY41/C3gh1zhwJ/52ErT +D9xWrBYAd5VAqRrsMj37DK05AZDJU4zrxW5+FMsdWCcIusOuQ9qIRJxnXd+G +zURAtDfXlo29iiYiFtcgApfPmjjxA4m0u81B1EgUQu9ueK2EHTBw//rWzStA +Ia1zrSt2KE+79k4RMZiyO23YgT2oUjGVRIlDv42+4f924foQbUIduqvAxj0z +cQab5zapLBO2CgyOmJtJmeJ8ddc6lY6uApeCgrWe2G5maXffsCTAfVsYbRK7 +wyc8QvrVamia33xkkzmJvt5MSfYWlILy9waC+7HHRksLbllIgW94vugJ7OWR +/V07GqXAIeFWVA+2+em9et73pUH5e3ZtkgWJagsNOCV5smARskx2wZJEhYO/ +o7dHKkDKPfpWsCHR7n1nv0aUK4BbQO7FSOyxZgnLclIBvNjBB29h6xVuWq3k +qgh61vOqkra4nnSve/wma0FS/nHoBPb0D9aR4UQlGDkjJFdjRyKJIPPqe3Yq +MNjpcz/dkURk4XI/hwAVCHMT7XyL/fBLp/z4GRUgjE45SDqRyIPmmbiuUQWQ +WvepHOzCjdFOuTqqIBVgXl7kjOdn35yMl1YD9tp6ua59JNrrK6xl06cOmtdv ++8S6kQhF79M58EcdUtYL3WvB1kzK28aQXQds5zCGhDuJuAp0TeMd18GdBL/x +cuzyr+4H7jatg9B3KjlDHrg/95edlMtfD5b9zk5BB3F+5nbv2HQNONAaTTxl +kKjAOfvzXLwG+KYX/5ZjkiiF3sfiu6wBu8TWTEVgM05EjSp2aYCyHItvPUEi +8fqrXM5mmvDCmK813Rf/P7oTmnWqG+Gk5amGowEkkldJTUge2ATGT9ixmaEk +qj83q/GLRwuYhzePc4Xhesy4dhPKWtB6iNEVjH2tWU3D1EsLlqfenbcNJ5GK +b+3bn++1QGbLhnrhSLzeskF14tVm0IzhXbx+hEQK8oqEkqs2TA573lBJINGm +okiReaQDio4egompJKIzEjla9jqw8g2PHV8a7lfVjK/eHjqw6L1/LgmbN7/y +TkuMDvCqih0/l4777Rp7b0aVDtApBbucTHye5nhf1VDVBff+9TwvsvH+JtM2 +uwjoQY358e7Q6yS6Ea7mcL9dHwadHZupuyTqjEbbThcZwWdXb8erLBIpe/XY +ewbuhN8hMX6dkkOIuVhToXAU4J3PyzgN2hCSHn24TJpuCrJGVXcSU4dQpK7x +lwxNc5D6j+eNa88Qoo8vtEqwLaDA/f0OX6VhVG4asSyvwwrmG4ubrI8Oo8LZ +gKayLGtwqpO9tbtrGP3cJfO6OcEWwnYJuecYj6BeLt6pvkN28DS5eqrv9ggK +XhOSdlJ1D6i12GxpkmOjCv/WxotJDmAi9G644T82ip2Rndvo7whFGw8yomRH +EcfGcv+Lg07wt+t7yeXSUWTknr5r0NEZfg6Ks2ZhDL2VvRrQrLsX+tNTBaS7 +x5BccWJ9yYZ98Hef5urh2HH0kKVJsxfdD3SbO2WmChNIsXvSN3p8PxxKK73j +9HQC6V5MLytgHQCVRG7zS3E/0FW+mc0Zz1ygozt4BVtqEtXs2vIp6ZErFA2/ +H14TO4lytp0TXyh1A7snFk7PeydRx+eiM7rn3eEfemOnl/EUum93RS30hAes +KDnXZ1U4haaCnLmCGZ4gUKApt0xgGnEsNfwmzLygqPf5ByFiGpWMf/wZYXAQ +mpLiNr1+PY1cbhT5eIp4w9o/WmSW1gy6d9f2IO9Zb6g4GfExMXMGGcm//fXv +L2+4cKjBQ2NyBqmyfD/9z/8QqFo9HGFZzaIB4cN7rvQfgpHzYi1V+bOoM8Xe +x2ofHXQvtK+4ND2LsmLyhKM66aBTkN/AMeWg+obFXz7WPiA7d16g5hwHrfSA +s7q1PiD1ymndiRYOUpJ80bGm3gcUiwPMI15wkHa7nYxAgw/8d9Gqm9nKQU7G +7rc+NPnAvzLJu63bOChrTfSr4y99INHn3XGhNxwk13t7ZesHH+Ao1kwG93CQ +mpd0jsecD7RFrClu7+cgI++JkiQ9BojZiku8/MtBxbmTEfYGDGgkI0/+u8hB +kl3TJtKGDFi595m/NReFJizmukt2MEBLLuvmC24Kn19c3O2mDOjYoNP9mI9C +K+bEXVc5MmDCRqQrbTmFBi7oC+UFMWCucDGmE9/DKXXH/B8WMyBpa41xpSaF +gnSyjWJKGLArO43fZiOFaLeqhAxLGSBHPbUYwF6eTd56UM6A8KONG6W1KJQU +7sCuqWbAt0jZ5OgtFDqmoXb4/lMGkKqMBHk9CgVkvwq8+5UBnv+Inf5jTCHr +FaRxOIsBp+Qbec/upNCGJC5Rne8MsGQfnVtpQiEyXL+8apABh7NLtishCh2y +zxu/M8aArJGdWtt3UciFPyK48jcDwo7MljtbUMgqQi60TIoJPYN9R9bYUehp +3hmbDBkmzOTGhF3DNm6fVouRY4L67o9P19pTSFv91UczRSYcGPonUGkPhWTf +x5l9VsdecfmDrCOFRrf3Si3XZ4LBk1fzY3splMpz/bGvMxPUEjIeSHjg9W8R +ybHbx4Tyd/3RJ7BPu8eE6x7A8yc0nxvDjql2WL/oxgT7xz2VTz1x/gR3+iU6 +E+pPl48RBymk20ZnPA9jgrfifoVUOoXep6sLq6YxIbZO/ZmnH4UqkKjfcDoT +Pl7+I1eJfXp8trk8kwmqgjs/L2LrWDfHG2YzYdlcdVaeP94/Lp9pu2tMmDrJ +GnkfQCHLkOsfY8qY8FfVRGxTEIUUFP4xMKlggiYnYygCe7YtJJP3DhPS/jDX +1WHnr0N2KfeYQLN0+GQVTKE/vb2NBbVMCFhskHULoVA1Tb7kTSsTvJ6Xjx4K +o1Dybx7+rDYmaDc06l3HppewD7m24/qaJw30Yovx1coPdDDxeThz5EA4hQLr +XFJ/vWOCtIdKkFkEhVQ1L0WrDTJBMY3v7N9ICv1+f7xrhGRCs+GAvm4UhTqT +mNqVw0xIevHcxhc7vk+PbTTGhFNlRPFr7E85XZ57ZphglLVCLTOaQhnLxC1i +uQmo39OhzR1DofrpXvdIXgLOtrzU2Yo91FsaHsxPwJGX6yO9sY2rza/ThQg4 +QeurrscmvWPmbcQJ6N0loxV4FOdPs1hlIUGAcdf8hkvYO7at0kCrCai2G/d5 +gp0mWrZfV5YA5+y3l1bG4vHab1XyygRsfX7lRzE2UVTWulqVAM2ige9t2Glp +R7+tVCeg2WFScgKbJCRE+TQImPXfqq8Th8clrPzGtAn44XmUWYVd+1cigdQh +YETsj10H9uAI6yJLj4AMboGoMeztjbHPug0JOPU8OV7tGO7nwArFx0BAsXJF +fDL2Cpc4/QemBNi/uOFWgG1ktptWZU5AW/VQZC12iuz3o0W7CeA6uJdBYj/k +q0zLsyHgW3Ko0Tx2/4+4m7k0bNZL2srjFDJsWd1zwYHA963SZn1setX30bNO +BBhFrV6wxL5wpZLn1F4CRH/qCbpgfw+31o52ISAxd+DTEWxRLymrUDcCFMSD +bpxZimfd7xngQUD6RvHirKXv1x5P9vLG65u/5l+B/XC5Tb4LnQBW/KkNtUvx +OFKPnBgEXIIo9edL8fr6O2gEARuvRHp3LMVrv0Na+hFQIR//8cNSfg+O/4EA +Aj4eSU3rW4qfbyO5I5AAkZzipJGl+BekN+oHE2Ca0fRwcil+zMCuLaEEaN3+ +qjGHLcKoctEIx/nuX/iwgL1tT3yIaiQBy/VlW7jjcfzttmcUogm4JqM3xY99 +Xl3mqnQMAeu4aG5C2DVig/fEYwnIkfXmFsHum69qEz5GQGFTCCmKLTIU38cf +T0BqYqzQSmyDt7Y/FxMI8JI9EbDk/wOl9NzU "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -17711,105 +18572,106 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Xk4VV0XAHBzhCIyRsaKUjJFyV4ZwyVDgzld9x5D5ilRVFLvmzIX3gZl +SjKkpEKiJEnxhWZ1hYNryHSPivJtf5znPL9nP2fttdc+a29leogTk4eLi2sY +P0vvsDeb1z/ofGOyxX2bZ5cxiUwmCvXp5mVI9WBxypJZeQZZaub16KfopEo3 +tgPjtYCI7nOkfVhSrge7KibhGb95Ozp9TCLyHfa/LTKNCaX/Q4o249ofsB91 +hl1b0OlBe77ecPiEzf7Uduxo3Qc0ZrG16wu23KCqO2X2BY2kXn74Ddv2xzGj +iPZvqOQ1i6sfu2GBLRxT2oe+ruIuI7HfnZSOqwnuR0FRC4/Y2BMC5uxZnUHU +JNql+QNb4Hyoq+4cibyp039nsBXFr7aG1Q2jzbRV+r+w7eWp4gmzMZTf8KSN +byeJiOsqUlqCE+ipEktDGDtBfU/S4fYf6GPsl1Fx7A/S3VsjS6eQTZ1/jhI2 +wy3AP/P8NDr16/epDdiTV7hu3A2eQSnf/Dq1sQVVtMSmdDiIFvg50xQ7i/HM +Smw1hdyPs4Ro2Eo3XRO2zFGIV/jZ933YhpvOTATV/UQ7zik/DsD2M/jWzjZb +QDQFW8lc7NmYKL7l6/6gkmVmN4qwT9QJG2sI/kU8Z+XS72LngOFt3/ZFxHPc +P/f1Un5Frebhpdyg7JBGEzQhUWlLJuukPA+8+nJhUhp7csjrWPp5HqgsDZpb +j31Mk3PvTjAvhJzv0bLGzqpUVv2hww8zUY4707A/dY41/C3gh1zhwJ/52ErT +D9xWrBYAd5VAqRrsMj37DK05AZDJU4zrxW5+FMsdWCcIusOuQ9qIRJxnXd+G +zURAtDfXlo29iiYiFtcgApfPmjjxA4m0u81B1EgUQu9ueK2EHTBw//rWzStA +Ia1zrSt2KE+79k4RMZiyO23YgT2oUjGVRIlDv42+4f924foQbUIduqvAxj0z +cQab5zapLBO2CgyOmJtJmeJ8ddc6lY6uApeCgrWe2G5maXffsCTAfVsYbRK7 +wyc8QvrVamia33xkkzmJvt5MSfYWlILy9waC+7HHRksLbllIgW94vugJ7OWR +/V07GqXAIeFWVA+2+em9et73pUH5e3ZtkgWJagsNOCV5smARskx2wZJEhYO/ +o7dHKkDKPfpWsCHR7n1nv0aUK4BbQO7FSOyxZgnLclIBvNjBB29h6xVuWq3k +qgh61vOqkra4nnSve/wma0FS/nHoBPb0D9aR4UQlGDkjJFdjRyKJIPPqe3Yq +MNjpcz/dkURk4XI/hwAVCHMT7XyL/fBLp/z4GRUgjE45SDqRyIPmmbiuUQWQ +WvepHOzCjdFOuTqqIBVgXl7kjOdn35yMl1YD9tp6ua59JNrrK6xl06cOmtdv ++8S6kQhF79M58EcdUtYL3WvB1kzK28aQXQds5zCGhDuJuAp0TeMd18GdBL/x +cuzyr+4H7jatg9B3KjlDHrg/95edlMtfD5b9zk5BB3F+5nbv2HQNONAaTTxl +kKjAOfvzXLwG+KYX/5ZjkiiF3sfiu6wBu8TWTEVgM05EjSp2aYCyHItvPUEi +8fqrXM5mmvDCmK813Rf/P7oTmnWqG+Gk5amGowEkkldJTUge2ATGT9ixmaEk +qj83q/GLRwuYhzePc4Xhesy4dhPKWtB6iNEVjH2tWU3D1EsLlqfenbcNJ5GK +b+3bn++1QGbLhnrhSLzeskF14tVm0IzhXbx+hEQK8oqEkqs2TA573lBJINGm +okiReaQDio4egompJKIzEjla9jqw8g2PHV8a7lfVjK/eHjqw6L1/LgmbN7/y +TkuMDvCqih0/l4777Rp7b0aVDtApBbucTHye5nhf1VDVBff+9TwvsvH+JtM2 +uwjoQY358e7Q6yS6Ea7mcL9dHwadHZupuyTqjEbbThcZwWdXb8erLBIpe/XY +ewbuhN8hMX6dkkOIuVhToXAU4J3PyzgN2hCSHn24TJpuCrJGVXcSU4dQpK7x +lwxNc5D6j+eNa88Qoo8vtEqwLaDA/f0OX6VhVG4asSyvwwrmG4ubrI8Oo8LZ +gKayLGtwqpO9tbtrGP3cJfO6OcEWwnYJuecYj6BeLt6pvkN28DS5eqrv9ggK +XhOSdlJ1D6i12GxpkmOjCv/WxotJDmAi9G644T82ip2Rndvo7whFGw8yomRH +EcfGcv+Lg07wt+t7yeXSUWTknr5r0NEZfg6Ks2ZhDL2VvRrQrLsX+tNTBaS7 +x5BccWJ9yYZ98Hef5urh2HH0kKVJsxfdD3SbO2WmChNIsXvSN3p8PxxKK73j +9HQC6V5MLytgHQCVRG7zS3E/0FW+mc0Zz1ygozt4BVtqEtXs2vIp6ZErFA2/ +H14TO4lytp0TXyh1A7snFk7PeydRx+eiM7rn3eEfemOnl/EUum93RS30hAes +KDnXZ1U4haaCnLmCGZ4gUKApt0xgGnEsNfwmzLygqPf5ByFiGpWMf/wZYXAQ +mpLiNr1+PY1cbhT5eIp4w9o/WmSW1gy6d9f2IO9Zb6g4GfExMXMGGcm//fXv +L2+4cKjBQ2NyBqmyfD/9z/8QqFo9HGFZzaIB4cN7rvQfgpHzYi1V+bOoM8Xe +x2ofHXQvtK+4ND2LsmLyhKM66aBTkN/AMeWg+obFXz7WPiA7d16g5hwHrfSA +s7q1PiD1ymndiRYOUpJ80bGm3gcUiwPMI15wkHa7nYxAgw/8d9Gqm9nKQU7G +7rc+NPnAvzLJu63bOChrTfSr4y99INHn3XGhNxwk13t7ZesHH+Ao1kwG93CQ +mpd0jsecD7RFrClu7+cgI++JkiQ9BojZiku8/MtBxbmTEfYGDGgkI0/+u8hB +kl3TJtKGDFi595m/NReFJizmukt2MEBLLuvmC24Kn19c3O2mDOjYoNP9mI9C +K+bEXVc5MmDCRqQrbTmFBi7oC+UFMWCucDGmE9/DKXXH/B8WMyBpa41xpSaF +gnSyjWJKGLArO43fZiOFaLeqhAxLGSBHPbUYwF6eTd56UM6A8KONG6W1KJQU +7sCuqWbAt0jZ5OgtFDqmoXb4/lMGkKqMBHk9CgVkvwq8+5UBnv+Inf5jTCHr +FaRxOIsBp+Qbec/upNCGJC5Rne8MsGQfnVtpQiEyXL+8apABh7NLtishCh2y +zxu/M8aArJGdWtt3UciFPyK48jcDwo7MljtbUMgqQi60TIoJPYN9R9bYUehp +3hmbDBkmzOTGhF3DNm6fVouRY4L67o9P19pTSFv91UczRSYcGPonUGkPhWTf +x5l9VsdecfmDrCOFRrf3Si3XZ4LBk1fzY3splMpz/bGvMxPUEjIeSHjg9W8R +ybHbx4Tyd/3RJ7BPu8eE6x7A8yc0nxvDjql2WL/oxgT7xz2VTz1x/gR3+iU6 +E+pPl48RBymk20ZnPA9jgrfifoVUOoXep6sLq6YxIbZO/ZmnH4UqkKjfcDoT +Pl7+I1eJfXp8trk8kwmqgjs/L2LrWDfHG2YzYdlcdVaeP94/Lp9pu2tMmDrJ +GnkfQCHLkOsfY8qY8FfVRGxTEIUUFP4xMKlggiYnYygCe7YtJJP3DhPS/jDX +1WHnr0N2KfeYQLN0+GQVTKE/vb2NBbVMCFhskHULoVA1Tb7kTSsTvJ6Xjx4K +o1Dybx7+rDYmaDc06l3HppewD7m24/qaJw30Yovx1coPdDDxeThz5EA4hQLr +XFJ/vWOCtIdKkFkEhVQ1L0WrDTJBMY3v7N9ICv1+f7xrhGRCs+GAvm4UhTqT +mNqVw0xIevHcxhc7vk+PbTTGhFNlRPFr7E85XZ57ZphglLVCLTOaQhnLxC1i +uQmo39OhzR1DofrpXvdIXgLOtrzU2Yo91FsaHsxPwJGX6yO9sY2rza/ThQg4 +QeurrscmvWPmbcQJ6N0loxV4FOdPs1hlIUGAcdf8hkvYO7at0kCrCai2G/d5 +gp0mWrZfV5YA5+y3l1bG4vHab1XyygRsfX7lRzE2UVTWulqVAM2ige9t2Glp +R7+tVCeg2WFScgKbJCRE+TQImPXfqq8Th8clrPzGtAn44XmUWYVd+1cigdQh +YETsj10H9uAI6yJLj4AMboGoMeztjbHPug0JOPU8OV7tGO7nwArFx0BAsXJF +fDL2Cpc4/QemBNi/uOFWgG1ktptWZU5AW/VQZC12iuz3o0W7CeA6uJdBYj/k +q0zLsyHgW3Ko0Tx2/4+4m7k0bNZL2srjFDJsWd1zwYHA963SZn1setX30bNO +BBhFrV6wxL5wpZLn1F4CRH/qCbpgfw+31o52ISAxd+DTEWxRLymrUDcCFMSD +bpxZimfd7xngQUD6RvHirKXv1x5P9vLG65u/5l+B/XC5Tb4LnQBW/KkNtUvx +OFKPnBgEXIIo9edL8fr6O2gEARuvRHp3LMVrv0Na+hFQIR//8cNSfg+O/4EA +Aj4eSU3rW4qfbyO5I5AAkZzipJGl+BekN+oHE2Ca0fRwcil+zMCuLaEEaN3+ +qjGHLcKoctEIx/nuX/iwgL1tT3yIaiQBy/VlW7jjcfzttmcUogm4JqM3xY99 +Xl3mqnQMAeu4aG5C2DVig/fEYwnIkfXmFsHum69qEz5GQGFTCCmKLTIU38cf +T0BqYqzQSmyDt7Y/FxMI8JI9EbDk/wOl9NzU "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.694925005019149, + 1.4057764206096048`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.6949250050191506}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -17821,21 +18683,20 @@ wTw= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "PlotRange" -> {{0, 180}, {0.694925005019149, 1.4057764206096048`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6949250050191506}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -17849,103 +18710,104 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Xk4VV0XAHBzhCIyRsaKUjJFyV4ZwyVDgzld9x5D5ilRVFLvmzIX3gZl +SjKkpEKiJEnxhWZ1hYNryHSPivJtf5znPL9nP2fttdc+a29leogTk4eLi2sY +P0vvsDeb1z/ofGOyxX2bZ5cxiUwmCvXp5mVI9WBxypJZeQZZaub16KfopEo3 +tgPjtYCI7nOkfVhSrge7KibhGb95Ozp9TCLyHfa/LTKNCaX/Q4o249ofsB91 +hl1b0OlBe77ecPiEzf7Uduxo3Qc0ZrG16wu23KCqO2X2BY2kXn74Ddv2xzGj +iPZvqOQ1i6sfu2GBLRxT2oe+ruIuI7HfnZSOqwnuR0FRC4/Y2BMC5uxZnUHU +JNql+QNb4Hyoq+4cibyp039nsBXFr7aG1Q2jzbRV+r+w7eWp4gmzMZTf8KSN +byeJiOsqUlqCE+ipEktDGDtBfU/S4fYf6GPsl1Fx7A/S3VsjS6eQTZ1/jhI2 +wy3AP/P8NDr16/epDdiTV7hu3A2eQSnf/Dq1sQVVtMSmdDiIFvg50xQ7i/HM +Smw1hdyPs4Ro2Eo3XRO2zFGIV/jZ933YhpvOTATV/UQ7zik/DsD2M/jWzjZb +QDQFW8lc7NmYKL7l6/6gkmVmN4qwT9QJG2sI/kU8Z+XS72LngOFt3/ZFxHPc +P/f1Un5Frebhpdyg7JBGEzQhUWlLJuukPA+8+nJhUhp7csjrWPp5HqgsDZpb +j31Mk3PvTjAvhJzv0bLGzqpUVv2hww8zUY4707A/dY41/C3gh1zhwJ/52ErT +D9xWrBYAd5VAqRrsMj37DK05AZDJU4zrxW5+FMsdWCcIusOuQ9qIRJxnXd+G +zURAtDfXlo29iiYiFtcgApfPmjjxA4m0u81B1EgUQu9ueK2EHTBw//rWzStA +Ia1zrSt2KE+79k4RMZiyO23YgT2oUjGVRIlDv42+4f924foQbUIduqvAxj0z +cQab5zapLBO2CgyOmJtJmeJ8ddc6lY6uApeCgrWe2G5maXffsCTAfVsYbRK7 +wyc8QvrVamia33xkkzmJvt5MSfYWlILy9waC+7HHRksLbllIgW94vugJ7OWR +/V07GqXAIeFWVA+2+em9et73pUH5e3ZtkgWJagsNOCV5smARskx2wZJEhYO/ +o7dHKkDKPfpWsCHR7n1nv0aUK4BbQO7FSOyxZgnLclIBvNjBB29h6xVuWq3k +qgh61vOqkra4nnSve/wma0FS/nHoBPb0D9aR4UQlGDkjJFdjRyKJIPPqe3Yq +MNjpcz/dkURk4XI/hwAVCHMT7XyL/fBLp/z4GRUgjE45SDqRyIPmmbiuUQWQ +WvepHOzCjdFOuTqqIBVgXl7kjOdn35yMl1YD9tp6ua59JNrrK6xl06cOmtdv ++8S6kQhF79M58EcdUtYL3WvB1kzK28aQXQds5zCGhDuJuAp0TeMd18GdBL/x +cuzyr+4H7jatg9B3KjlDHrg/95edlMtfD5b9zk5BB3F+5nbv2HQNONAaTTxl +kKjAOfvzXLwG+KYX/5ZjkiiF3sfiu6wBu8TWTEVgM05EjSp2aYCyHItvPUEi +8fqrXM5mmvDCmK813Rf/P7oTmnWqG+Gk5amGowEkkldJTUge2ATGT9ixmaEk +qj83q/GLRwuYhzePc4Xhesy4dhPKWtB6iNEVjH2tWU3D1EsLlqfenbcNJ5GK +b+3bn++1QGbLhnrhSLzeskF14tVm0IzhXbx+hEQK8oqEkqs2TA573lBJINGm +okiReaQDio4egompJKIzEjla9jqw8g2PHV8a7lfVjK/eHjqw6L1/LgmbN7/y +TkuMDvCqih0/l4777Rp7b0aVDtApBbucTHye5nhf1VDVBff+9TwvsvH+JtM2 +uwjoQY358e7Q6yS6Ea7mcL9dHwadHZupuyTqjEbbThcZwWdXb8erLBIpe/XY +ewbuhN8hMX6dkkOIuVhToXAU4J3PyzgN2hCSHn24TJpuCrJGVXcSU4dQpK7x +lwxNc5D6j+eNa88Qoo8vtEqwLaDA/f0OX6VhVG4asSyvwwrmG4ubrI8Oo8LZ +gKayLGtwqpO9tbtrGP3cJfO6OcEWwnYJuecYj6BeLt6pvkN28DS5eqrv9ggK +XhOSdlJ1D6i12GxpkmOjCv/WxotJDmAi9G644T82ip2Rndvo7whFGw8yomRH +EcfGcv+Lg07wt+t7yeXSUWTknr5r0NEZfg6Ks2ZhDL2VvRrQrLsX+tNTBaS7 +x5BccWJ9yYZ98Hef5urh2HH0kKVJsxfdD3SbO2WmChNIsXvSN3p8PxxKK73j +9HQC6V5MLytgHQCVRG7zS3E/0FW+mc0Zz1ygozt4BVtqEtXs2vIp6ZErFA2/ +H14TO4lytp0TXyh1A7snFk7PeydRx+eiM7rn3eEfemOnl/EUum93RS30hAes +KDnXZ1U4haaCnLmCGZ4gUKApt0xgGnEsNfwmzLygqPf5ByFiGpWMf/wZYXAQ +mpLiNr1+PY1cbhT5eIp4w9o/WmSW1gy6d9f2IO9Zb6g4GfExMXMGGcm//fXv +L2+4cKjBQ2NyBqmyfD/9z/8QqFo9HGFZzaIB4cN7rvQfgpHzYi1V+bOoM8Xe +x2ofHXQvtK+4ND2LsmLyhKM66aBTkN/AMeWg+obFXz7WPiA7d16g5hwHrfSA +s7q1PiD1ymndiRYOUpJ80bGm3gcUiwPMI15wkHa7nYxAgw/8d9Gqm9nKQU7G +7rc+NPnAvzLJu63bOChrTfSr4y99INHn3XGhNxwk13t7ZesHH+Ao1kwG93CQ +mpd0jsecD7RFrClu7+cgI++JkiQ9BojZiku8/MtBxbmTEfYGDGgkI0/+u8hB +kl3TJtKGDFi595m/NReFJizmukt2MEBLLuvmC24Kn19c3O2mDOjYoNP9mI9C +K+bEXVc5MmDCRqQrbTmFBi7oC+UFMWCucDGmE9/DKXXH/B8WMyBpa41xpSaF +gnSyjWJKGLArO43fZiOFaLeqhAxLGSBHPbUYwF6eTd56UM6A8KONG6W1KJQU +7sCuqWbAt0jZ5OgtFDqmoXb4/lMGkKqMBHk9CgVkvwq8+5UBnv+Inf5jTCHr +FaRxOIsBp+Qbec/upNCGJC5Rne8MsGQfnVtpQiEyXL+8apABh7NLtishCh2y +zxu/M8aArJGdWtt3UciFPyK48jcDwo7MljtbUMgqQi60TIoJPYN9R9bYUehp +3hmbDBkmzOTGhF3DNm6fVouRY4L67o9P19pTSFv91UczRSYcGPonUGkPhWTf +x5l9VsdecfmDrCOFRrf3Si3XZ4LBk1fzY3splMpz/bGvMxPUEjIeSHjg9W8R +ybHbx4Tyd/3RJ7BPu8eE6x7A8yc0nxvDjql2WL/oxgT7xz2VTz1x/gR3+iU6 +E+pPl48RBymk20ZnPA9jgrfifoVUOoXep6sLq6YxIbZO/ZmnH4UqkKjfcDoT +Pl7+I1eJfXp8trk8kwmqgjs/L2LrWDfHG2YzYdlcdVaeP94/Lp9pu2tMmDrJ +GnkfQCHLkOsfY8qY8FfVRGxTEIUUFP4xMKlggiYnYygCe7YtJJP3DhPS/jDX +1WHnr0N2KfeYQLN0+GQVTKE/vb2NBbVMCFhskHULoVA1Tb7kTSsTvJ6Xjx4K +o1Dybx7+rDYmaDc06l3HppewD7m24/qaJw30Yovx1coPdDDxeThz5EA4hQLr +XFJ/vWOCtIdKkFkEhVQ1L0WrDTJBMY3v7N9ICv1+f7xrhGRCs+GAvm4UhTqT +mNqVw0xIevHcxhc7vk+PbTTGhFNlRPFr7E85XZ57ZphglLVCLTOaQhnLxC1i +uQmo39OhzR1DofrpXvdIXgLOtrzU2Yo91FsaHsxPwJGX6yO9sY2rza/ThQg4 +QeurrscmvWPmbcQJ6N0loxV4FOdPs1hlIUGAcdf8hkvYO7at0kCrCai2G/d5 +gp0mWrZfV5YA5+y3l1bG4vHab1XyygRsfX7lRzE2UVTWulqVAM2ige9t2Glp +R7+tVCeg2WFScgKbJCRE+TQImPXfqq8Th8clrPzGtAn44XmUWYVd+1cigdQh +YETsj10H9uAI6yJLj4AMboGoMeztjbHPug0JOPU8OV7tGO7nwArFx0BAsXJF +fDL2Cpc4/QemBNi/uOFWgG1ktptWZU5AW/VQZC12iuz3o0W7CeA6uJdBYj/k +q0zLsyHgW3Ko0Tx2/4+4m7k0bNZL2srjFDJsWd1zwYHA963SZn1setX30bNO +BBhFrV6wxL5wpZLn1F4CRH/qCbpgfw+31o52ISAxd+DTEWxRLymrUDcCFMSD +bpxZimfd7xngQUD6RvHirKXv1x5P9vLG65u/5l+B/XC5Tb4LnQBW/KkNtUvx +OFKPnBgEXIIo9edL8fr6O2gEARuvRHp3LMVrv0Na+hFQIR//8cNSfg+O/4EA +Aj4eSU3rW4qfbyO5I5AAkZzipJGl+BekN+oHE2Ca0fRwcil+zMCuLaEEaN3+ +qjGHLcKoctEIx/nuX/iwgL1tT3yIaiQBy/VlW7jjcfzttmcUogm4JqM3xY99 +Xl3mqnQMAeu4aG5C2DVig/fEYwnIkfXmFsHum69qEz5GQGFTCCmKLTIU38cf +T0BqYqzQSmyDt7Y/FxMI8JI9EbDk/wOl9NzU "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.694925005019149, 1.4057764206096048`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.6949250050191506}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -17955,7 +18817,8 @@ wTw= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5511670383120088}, + AxesOrigin->{0, 0.6949250050191506}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -17983,7 +18846,8 @@ wTw= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.694925005019149, 1.4057764206096048`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -17991,9 +18855,9 @@ wTw= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991347865018469*^9}, + CellChangeTimes->{3.991347865018469*^9, 3.99435676881444*^9}, CellLabel-> - "Out[469]=",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] + "Out[209]=",ExpressionUUID->"7d868138-0e46-4bb6-9b05-7af8cc8ac2cf"] }, Open ]], Cell[CellGroupData[{ @@ -18057,199 +18921,174 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918503718899097`*^9, {3.991850469268881*^9, - 3.9918504694651966`*^9}},ExpressionUUID->"497f9779-a3e4-c84e-a207-\ -0aac70483e3c"], + 3.9918503718899097`*^9, {3.991850469268881*^9, 3.9918504694651966`*^9}}, + CellLabel-> + "In[210]:=",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.458740908982352`*^-268\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.776441560356061`*^-268\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 470, - 513, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652482224`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 210, + 69, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.9943567690073843`*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], +In[210]:=",ExpressionUUID->"2fe38918-74fa-47be-b239-c8ca7938949e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7391049816418008`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.7193256372990942`*^-279\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 470, 514, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652572174`*^9}, + 210, 70, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994356769016404*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], +In[210]:=",ExpressionUUID->"95f55097-f8d8-4a97-bf27-2923e91bb393"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.230095503809359`*^-290\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.958121634742022`*^-290\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 470, 515, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652662163`*^9}, + 2, 210, 71, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994356769025179*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], +In[210]:=",ExpressionUUID->"9b6f4353-b9cd-41ea-b5bc-1d4ed20bb900"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 470, 516, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347865275215*^9}, +during this calculation.\"", 2, 210, 72, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994356769032237*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], +In[210]:=",ExpressionUUID->"99feca30-b70c-444c-baf9-34375316690f"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8Vev3B3BRGZIyZObscwxJ5vngtJZ5zCxCpkKRMRENhttAJKGUBrNf +RZyzS2W4JUrIpQGZ0kDdriQKaZDf/v61X++/9n6etZ7PejY9ONothJuLi0t9 +BRfX/54LY50PFbMqtpT4LR/VCbfY0ndFMslsMB0CsjOZur10wA29wZKDeTC9 +aUxPoFcbElyuv+QZLIMp/qv80z1mIDwtkffjJQknTz9zedDjCq+bnaLnXraC +64BjuFZPEFgrTr6affkcNvi3LS49iYUfLw3Pzrx8BydfLQZBWxq0WfxfxbOy +b9DYvvKTlE8eyL5u+BCstgSEmvv8pw9FILY34DqvBQ+a/9cbPRJTCnna1k1O +nnxYxU7645NcCUPntVpm16/FCkcuM/FPVyGrIqWXW0oYL1ZeuLeGVQP2entE +NigI40rpFcfV7WqA76Gb50Z1YfyjkS1q61kDR8eVRhzMhLHATOxAWGQNHGJ0 +fyjYI4zXxTpVnC/XQFSJ5B/lRmEctHlk1vKrBlwvcdQcfEWQL5lolr55AyQK +xjPzL4ti0B3+bdZr6kByc/3RxSpRDE2+mjckVgfSrcdTdrBFMaLol1yofB3I +z2zav7FNFEvUl2QitOtAyTEmsOmjKBJ9VQWKXnWgu3LJYFxXDJmkdrJHaR04 +x4tP6HSJYd6ohouLJBtc1nwcK3whhjm8gZ03ZNngVtYw9HtUDLNPqw7x0tmw +7alfb/sXMTTPaWvkbGLDDrXyRp8NG/DRbE/SqDEbIiY0z6QHbqDKmpZ5yo8N +Jzzstjxf2IDbT2eD72U2SN/qkeZeIY6E97aLxaVsqBX1+K69RhwX5Xg/vK5k +w8Bzf/YZmjhWzhRZe9SyQdE1nuFqK44qhzxUBe+zoXVr8eqnF8SxtJujefc1 +G5as53v+MZXAK90cxWU5DuRWJVcvWUtgSPJYSwudA4qruTLUXSXQuuS7+REl +Djg+EjA7FSKBQbmmi1NqHCiyIG465kjgVMMJxgUTDhihQ+GT1xIosUnOS82b +A/uYpQGd6ZKokrBwkZXDAfsSoTmHbEl01dpRb3mGAwzeQxk9ZyXR0CmYaVvA +gad92zgvrkpi0zbfNMsiDmjECPKM9Uhi650+YZEqDnysSqz6Ki2FLfqbYcXf +HPATc/osc1MKg/4U+mp95IDuwaa0K81SWC5Y/fHhJAcE3qmI09ulkOxmjnt+ +5kBDHQ8oD0lhvUc8PfIrB8QdGnK1lqVwttniccxv6v1pinpWDtK4tNJivHsd +CZZffiZHjUujpGbgzJAuCUm2BaoPpqQx8Hzl6Kw+CbWl6sOiC9L48bRh0Goj +EiQ9ApkNfDJ4vH2PnpIpCVN3H33n0ZBBiU9+a4wtSchPz42/cEAGre6lP2hx +J6FjZJPiVJoM/s0d41XmScJvvbYXW7Jk0C6g9WSqFwmh/87rTFyWwe7Xy106 +viQYO/rOarTJoMuRxaaoYBLebVCOerhWFsMSF29axpAgEX1fTkJCFl3DKhxn +Yklw7PD+Zw8hi61PejLO7yPhdnKW2jpdWRzttfk8lkDlwuuZye3esrgpqTjO +4jAJOteawr6UyWLw9sanEZkkpJm6BkkbyeH6h/UyrGISbP2vfDU0l8P9WKV4 +oYQEodRPf3k6yuFCw2772VISLrUdq8oNlMORK/JfzlaQcNe+8dPqTDmMLSTZ +7GskzHgrJHwbksPmax031W6ScCc5hld4Qg5LpXaN2d8i4cilv89rTFNOctEO +qSdB8I1X0x5ueVwo2+iec4eEjWHZXG9U5VF/KuQS2USC//75k90H5XEubHje +oo0EpUJz2clj8rh8MIJH6eH/9v/0Dd5cebQa4bfmfkRC8u9NT80r5FH07eNI +TjsJZ//y39DQLY8d4Uv+7zpJ8KusrhoYkMfFgQq1yi4SGI8XDefeyON+zc0G +u56QwBbI99Gcl8fLg+5cL7tJ6D7zuLhSjoZj955mnu6l6ntTTLttIw0DeBWc +9Z6S4NMf1PpGm4a2r2K8+il/lPw9IWNNQ+e4cj3B5yTwlGip5kXRsI+LYbK1 +j4SuB4eb6g7Q8Nuu1Tp9lHPHuxz/SafhQLzjPq9+EuQ3hkTzFdJQS6F90G2A +6ofaC7eO3KehgIqqvdwg1a8ve5amO2jol9xzL4WyE9dKm4DnNGwtcVgeo7zT +LWoI3tOQv3b5Q/4QCVEHyxnsaRp22D89/R/lAxWDEcQiDY2Ub/CaDpNgfZCe +krqKQB/ZjrCXlJ+say43EiCw83iVKzFCgkvFto4ZIQKh59naUMq+/2QJB0kS +GJ3nzfWR8psgZQMpOQJbP/gYKY5S/bzQ4vOMTiC9/bvVDsoxtIVys80Ermvy +ev+I8vzN3I4fmgR+kOs4ME852XbzZ44egaaV6u/pr0jgevVIOJxJ4Nz3wM0O +lI/FBhowthDYnmHiGEtZYPUvn2FzAsmzhbYFlHOLzqbk2RB4YKML/RblDZpa +FfaOBM6sN3v5lHJRW1cHtyuBGdPWEZOUad4hnxs9CSxVgjGuMRIqppaF9/kQ +uHaCV1uMsmpakcHmAALDaam7FCnXbdD3Hd9J4LmCE0nalPWu96Zc3E2g1OM/ +MSaUG7eEV7hHEpjH9djBnDK8WNm5Jo5ACZdWAWvKD8OKP7clEHgz80Xt/2z3 +myly6CC1X1ZjRpaUe3L7DPRSCfR/035tC2UPpWjfqaMEPj4Qx21AeaiBP7Ui +k8D+mXYLVcr+ThUVfjlUvaauR8lQnni3pVMsn8Dcp6uO8lPekzj0ubuQwINt +94/OUeudXhMvcuwSgTuqH8SOUt5XImTIKiVQXGPe4QHlRb1rvvOVBGaxLcXK +KR/ptEi9cZ1AuW0Xn6RR5vEfqwipI3B5eSJuB+WMrwc65W4RWO0otMaAstAJ +0en+uwRi4cqzayhLsm0NrVsJ3LtFOP0GVd/LluO+f9oJNPm16t8kyoyhw6m3 +nxCos/+omQVlde6bncr9BDYEjA93U/1Ents6PTZE4Nel/5M5Rdlo80eRwjEC +992852lP2dxDzo/3I4GT5WRDE9Wvjz/eSb0/RWBXe9L7aMqOh90qE2cJzOkN +FaJT9qo6Mf3vTwL91HJ8k6n+37s4m9qxlo7h+cZ/+KjzYhwbKv5BhI49ikrX +L1H3KL7J4WoeSTomNub1q1GuHGkb2MKgY1X5Up05dR7H7p1VqzegI8GTcM6S +Or81hgKtz03o6FraH9T8gupn9hGvGaSjJ+/YbS3K4mVh6Zsd6Nhfu5ZnHZUH +zseYg6UBdOTaLGNbRuWJ/J8bkfd30dHS+fPRPz1UniUweF7toWPr+w5PL8oZ +u9doSMbT8X3fq7t/qDxqcXj1V04GHVdpJ19TpPJLRyRN8yCHjkr5+gE9VD5y +Zc0/PH+bjvQoqUNzrVR/8YT73G6iY2ZArLkE5Yh5t2Ozj+h4eWH+qVsL1f+D +iiNhw3QU3vpEpqyZ+t7ijuMePAz8ZShXXEbl9YQESzaOj4EK9et/5FN5TuZy +OKfXMvCt0V2RdJJaT3rRaJcEAzn8vSc92NT3huzVMVNjoGLjYv3zahJ+bF4/ +pu7JwKbRy0z9MhIWLkun6fowcNBeRukHNV/m1ikpMgMYqN9SvLKRmj/T35jh +lnsYCDK2lTqXqfnXtHPB5zADJUd4CpYLqfx0uCOUUcnAzGZ2IP8p6nxH+MO7 +eQbyBiyVf4gnofDV7nf//mQgQynwiQM1Dwuc9x37vMzAi/ZOYrXUvMzRzXiy +yK+Ani0V68OjSEj/xfFaJ6+AsUFmo/fDqP3JWhVjaq2APvz6/BPbSTCtrik5 +d04B59J+KEpR836EqC62uqiAAbfcCRtjqt7nrl2ZK1bAjEjn9jjqfnAnreqS +2zUFNE2WlWjTo+rjXXJeqFkB9TpuT9uok7BpVUHu8bcK6JfqkD0uR+13wMHU +BDVFLDlsaBmxxIFZEfvAba2KOIbDNTy3OTC4l/E0/LEiGkjQJuNucqCl/Sek +dCvixod7O16zqftccjXt6oAi2uY/iiKrOaD1TvD1j0lFFK/8kmtSyoEoTu+O +y6JK2HSAp2QsiwOTzp6+E7uUcP5CxsV9ARyYyA7cFserjK3fEjQMuThg9yXR +7r3BRizPlKUrUvfVqZ18+26lqKCtTr2a1rla6n9CgvtE6yZUYghq216qAZF/ +lHPYX1TRTLnwfm3tdZDNqHMxMFDDVUe/DgtkXYXzm5nrRcPUse42YeWRWQVd +0mb6385o4Iqr3b81CyvAWLY1V3NAEzc23Qn1zSgDIZ6y+KB0LWSO2bMc60pA +Po1mul1ZG+vv3t2lnXsZ+JX8brs91sbf1s5BzHVFoMGSqkvcoYO0BsFTEysL +IW5MpM2eSxctS7mLm3/lw5dv2Z5253UxXkLlSGToGbDRbC+yU9fD1XajgnZ6 +OXDvm8mv7z16eFCtzkOsKROi1HSGn4Xo4+D1rnNuq44Da3pX33Z+A6zYrvKS +mZwOVoqSW9eWGSDn1+lGJ/UUUEk9eaDV0BDNxYVKuVjJoBrCvK80bIj/7nVJ +dCneDyH3dh+9FWuE1/+clKPNxsJ05GSiVbwR1lzV7Qt7FwsH5PZGDCQYIV/+ +37WNL2Lh5KFot8WDRvjXLd6mI7djgW2cQJgeN8JPy+WlKYdi4fftv5rbiozw +eK2KbqBALOTVXZl73maEOG24cEA9Bu6X9O2a3cBEEb5E8be0SHjjSA9IkGTi +56heqau8kcD1I3L7L2kmFlUnm6V+2QvmrrxOqwgmuvZwDe28vxfaVxgbSqky +cWpNx8bvAXuhO7iY32wLE8m3IRbWFREwrBhemxvKxFMfu95ZM8Nh7uryd807 +TNQdjljxKi8MPmyzLslsYKLQz1STFalhMLjylO14ExMbPqXE6ESGQVOg9IVz +LUxc1+VZ12QTBumS+sZLnUwc9s/6e/dSKKzPCD/UNcrEzSgouDEiFNTC+rlC +uI0xHQT8VrqEwE6lav6irca4PrVk/jFrJyQ/8g9XdjHGcZM29xK1nZAbIvKE +dDPGpP7tP4/J7ITmyqTsJ17GaFu7iivpRzCIKduuWwoyxtDIRd6l+mBoV34v +FphgjNH8/v/t1w4GVRUaoVxsjGeNh7K/agfBrGq+ATljjDXOS33Ntf4w2I1W +ot+MUVDiq3lcgT+0RE27x88b41ZV82iTZH/IIe1iDX4ao7V23nM+a39QNeaq +aeQxwWIrj7icsR0QbBdJbxM3wRi5uAvGojugL8xGsM/UBKeYk1faTvrC3Ypf +b+czTPCRVZevMNsbDCziv9tnmeCbCF7Xx0XeUP92SrDklAnyO7cfOnXMG0j5 +MUP7PBM0UOt1svf1hprzLaeuXDTBmiTd+0d5vaEk+xjTptYEaXfsZ78Fe0Fm +/Loz51+YYOQD9on9StvAx1IBTeRNUV/wfeX4gDss9fEJtRGm2EUQhaNt7lAS +Mj1ir2CKddyVre/Z7vDheEOij4op9i9/vaCS5Q5xnc51STqmKGbYvjIa3eGk +0yH5u9amuCn+2N25G27Q6N3/Wy/aFLvjcswKClxBJvJEg0aLKWaNrOtPknGG +nOVQ/axWU1QYUD808ccJuPOsOf8+NMWFak5V6DsnmLy96lpJpylK+Hyw4Fxz +gkauo+dFXlDvy3/2fAfTCXwKUhMX3puiuf7C0qodW+F8U5L+vTUszC9P0mDU +O8AGgb2crV4sfJfwPE6h0hYqLA4nz2xnYcCRHJZZli3oHM6xyPdjoc7XNX8l +xtqC0wy7fzCIhcsjwRrqW2zh+MD8j517WZgx8HWocdAGFstSzJPTWNipMGvn +JGIDwyb5L6qqWejiWOfUc84Kdu+vuGRXy8JutcM1/SlWsFBbHzLFZuE/tBG5 +b7utQIQx+F37Ngv/0ymbjTaxAgc+Odm/W1hY1XHML/qtJTT3Ve160c9CR4Mn +gfu1LcFe6K56wiAL6V/io/tlLGHQpnNBcoSFJ+FijP1qS5hr/JTh/4aF49vu +8ewbsQD1Uq0b/02y8Er6lbTm4xbQPGyWkP2ZWo+9lFFrrAXYi7mD5gwLE514 +PUf9LCD0xP5n8fMs1AuSOrxV1wLmWo4XSSyysFGoM6RC3gLSfxbubPzJQl5V +nph1AhawXu+a2o4lFpq+un4yZ94crkQ2zi8vszCLt66C/tYc/h/dqIlo "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -18263,158 +19102,129 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13k8Vev3B3BRGZIyZObscwxJ5vngtJZ5zCxCpkKRMRENhttAJKGUBrNf +RZyzS2W4JUrIpQGZ0kDdriQKaZDf/v61X++/9n6etZ7PejY9ONothJuLi0t9 +BRfX/54LY50PFbMqtpT4LR/VCbfY0ndFMslsMB0CsjOZur10wA29wZKDeTC9 +aUxPoFcbElyuv+QZLIMp/qv80z1mIDwtkffjJQknTz9zedDjCq+bnaLnXraC +64BjuFZPEFgrTr6affkcNvi3LS49iYUfLw3Pzrx8BydfLQZBWxq0WfxfxbOy +b9DYvvKTlE8eyL5u+BCstgSEmvv8pw9FILY34DqvBQ+a/9cbPRJTCnna1k1O +nnxYxU7645NcCUPntVpm16/FCkcuM/FPVyGrIqWXW0oYL1ZeuLeGVQP2entE +NigI40rpFcfV7WqA76Gb50Z1YfyjkS1q61kDR8eVRhzMhLHATOxAWGQNHGJ0 +fyjYI4zXxTpVnC/XQFSJ5B/lRmEctHlk1vKrBlwvcdQcfEWQL5lolr55AyQK +xjPzL4ti0B3+bdZr6kByc/3RxSpRDE2+mjckVgfSrcdTdrBFMaLol1yofB3I +z2zav7FNFEvUl2QitOtAyTEmsOmjKBJ9VQWKXnWgu3LJYFxXDJmkdrJHaR04 +x4tP6HSJYd6ohouLJBtc1nwcK3whhjm8gZ03ZNngVtYw9HtUDLNPqw7x0tmw +7alfb/sXMTTPaWvkbGLDDrXyRp8NG/DRbE/SqDEbIiY0z6QHbqDKmpZ5yo8N +Jzzstjxf2IDbT2eD72U2SN/qkeZeIY6E97aLxaVsqBX1+K69RhwX5Xg/vK5k +w8Bzf/YZmjhWzhRZe9SyQdE1nuFqK44qhzxUBe+zoXVr8eqnF8SxtJujefc1 +G5as53v+MZXAK90cxWU5DuRWJVcvWUtgSPJYSwudA4qruTLUXSXQuuS7+REl +Djg+EjA7FSKBQbmmi1NqHCiyIG465kjgVMMJxgUTDhihQ+GT1xIosUnOS82b +A/uYpQGd6ZKokrBwkZXDAfsSoTmHbEl01dpRb3mGAwzeQxk9ZyXR0CmYaVvA +gad92zgvrkpi0zbfNMsiDmjECPKM9Uhi650+YZEqDnysSqz6Ki2FLfqbYcXf +HPATc/osc1MKg/4U+mp95IDuwaa0K81SWC5Y/fHhJAcE3qmI09ulkOxmjnt+ +5kBDHQ8oD0lhvUc8PfIrB8QdGnK1lqVwttniccxv6v1pinpWDtK4tNJivHsd +CZZffiZHjUujpGbgzJAuCUm2BaoPpqQx8Hzl6Kw+CbWl6sOiC9L48bRh0Goj +EiQ9ApkNfDJ4vH2PnpIpCVN3H33n0ZBBiU9+a4wtSchPz42/cEAGre6lP2hx +J6FjZJPiVJoM/s0d41XmScJvvbYXW7Jk0C6g9WSqFwmh/87rTFyWwe7Xy106 +viQYO/rOarTJoMuRxaaoYBLebVCOerhWFsMSF29axpAgEX1fTkJCFl3DKhxn +Yklw7PD+Zw8hi61PejLO7yPhdnKW2jpdWRzttfk8lkDlwuuZye3esrgpqTjO +4jAJOteawr6UyWLw9sanEZkkpJm6BkkbyeH6h/UyrGISbP2vfDU0l8P9WKV4 +oYQEodRPf3k6yuFCw2772VISLrUdq8oNlMORK/JfzlaQcNe+8dPqTDmMLSTZ +7GskzHgrJHwbksPmax031W6ScCc5hld4Qg5LpXaN2d8i4cilv89rTFNOctEO +qSdB8I1X0x5ueVwo2+iec4eEjWHZXG9U5VF/KuQS2USC//75k90H5XEubHje +oo0EpUJz2clj8rh8MIJH6eH/9v/0Dd5cebQa4bfmfkRC8u9NT80r5FH07eNI +TjsJZ//y39DQLY8d4Uv+7zpJ8KusrhoYkMfFgQq1yi4SGI8XDefeyON+zc0G +u56QwBbI99Gcl8fLg+5cL7tJ6D7zuLhSjoZj955mnu6l6ntTTLttIw0DeBWc +9Z6S4NMf1PpGm4a2r2K8+il/lPw9IWNNQ+e4cj3B5yTwlGip5kXRsI+LYbK1 +j4SuB4eb6g7Q8Nuu1Tp9lHPHuxz/SafhQLzjPq9+EuQ3hkTzFdJQS6F90G2A +6ofaC7eO3KehgIqqvdwg1a8ve5amO2jol9xzL4WyE9dKm4DnNGwtcVgeo7zT +LWoI3tOQv3b5Q/4QCVEHyxnsaRp22D89/R/lAxWDEcQiDY2Ub/CaDpNgfZCe +krqKQB/ZjrCXlJ+say43EiCw83iVKzFCgkvFto4ZIQKh59naUMq+/2QJB0kS +GJ3nzfWR8psgZQMpOQJbP/gYKY5S/bzQ4vOMTiC9/bvVDsoxtIVys80Ermvy +ev+I8vzN3I4fmgR+kOs4ME852XbzZ44egaaV6u/pr0jgevVIOJxJ4Nz3wM0O +lI/FBhowthDYnmHiGEtZYPUvn2FzAsmzhbYFlHOLzqbk2RB4YKML/RblDZpa +FfaOBM6sN3v5lHJRW1cHtyuBGdPWEZOUad4hnxs9CSxVgjGuMRIqppaF9/kQ +uHaCV1uMsmpakcHmAALDaam7FCnXbdD3Hd9J4LmCE0nalPWu96Zc3E2g1OM/ +MSaUG7eEV7hHEpjH9djBnDK8WNm5Jo5ACZdWAWvKD8OKP7clEHgz80Xt/2z3 +myly6CC1X1ZjRpaUe3L7DPRSCfR/035tC2UPpWjfqaMEPj4Qx21AeaiBP7Ui +k8D+mXYLVcr+ThUVfjlUvaauR8lQnni3pVMsn8Dcp6uO8lPekzj0ubuQwINt +94/OUeudXhMvcuwSgTuqH8SOUt5XImTIKiVQXGPe4QHlRb1rvvOVBGaxLcXK +KR/ptEi9cZ1AuW0Xn6RR5vEfqwipI3B5eSJuB+WMrwc65W4RWO0otMaAstAJ +0en+uwRi4cqzayhLsm0NrVsJ3LtFOP0GVd/LluO+f9oJNPm16t8kyoyhw6m3 +nxCos/+omQVlde6bncr9BDYEjA93U/1Ents6PTZE4Nel/5M5Rdlo80eRwjEC +992852lP2dxDzo/3I4GT5WRDE9Wvjz/eSb0/RWBXe9L7aMqOh90qE2cJzOkN +FaJT9qo6Mf3vTwL91HJ8k6n+37s4m9qxlo7h+cZ/+KjzYhwbKv5BhI49ikrX +L1H3KL7J4WoeSTomNub1q1GuHGkb2MKgY1X5Up05dR7H7p1VqzegI8GTcM6S +Or81hgKtz03o6FraH9T8gupn9hGvGaSjJ+/YbS3K4mVh6Zsd6Nhfu5ZnHZUH +zseYg6UBdOTaLGNbRuWJ/J8bkfd30dHS+fPRPz1UniUweF7toWPr+w5PL8oZ +u9doSMbT8X3fq7t/qDxqcXj1V04GHVdpJ19TpPJLRyRN8yCHjkr5+gE9VD5y +Zc0/PH+bjvQoqUNzrVR/8YT73G6iY2ZArLkE5Yh5t2Ozj+h4eWH+qVsL1f+D +iiNhw3QU3vpEpqyZ+t7ijuMePAz8ZShXXEbl9YQESzaOj4EK9et/5FN5TuZy +OKfXMvCt0V2RdJJaT3rRaJcEAzn8vSc92NT3huzVMVNjoGLjYv3zahJ+bF4/ +pu7JwKbRy0z9MhIWLkun6fowcNBeRukHNV/m1ikpMgMYqN9SvLKRmj/T35jh +lnsYCDK2lTqXqfnXtHPB5zADJUd4CpYLqfx0uCOUUcnAzGZ2IP8p6nxH+MO7 +eQbyBiyVf4gnofDV7nf//mQgQynwiQM1Dwuc9x37vMzAi/ZOYrXUvMzRzXiy +yK+Ani0V68OjSEj/xfFaJ6+AsUFmo/fDqP3JWhVjaq2APvz6/BPbSTCtrik5 +d04B59J+KEpR836EqC62uqiAAbfcCRtjqt7nrl2ZK1bAjEjn9jjqfnAnreqS +2zUFNE2WlWjTo+rjXXJeqFkB9TpuT9uok7BpVUHu8bcK6JfqkD0uR+13wMHU +BDVFLDlsaBmxxIFZEfvAba2KOIbDNTy3OTC4l/E0/LEiGkjQJuNucqCl/Sek +dCvixod7O16zqftccjXt6oAi2uY/iiKrOaD1TvD1j0lFFK/8kmtSyoEoTu+O +y6JK2HSAp2QsiwOTzp6+E7uUcP5CxsV9ARyYyA7cFserjK3fEjQMuThg9yXR +7r3BRizPlKUrUvfVqZ18+26lqKCtTr2a1rla6n9CgvtE6yZUYghq216qAZF/ +lHPYX1TRTLnwfm3tdZDNqHMxMFDDVUe/DgtkXYXzm5nrRcPUse42YeWRWQVd +0mb6385o4Iqr3b81CyvAWLY1V3NAEzc23Qn1zSgDIZ6y+KB0LWSO2bMc60pA +Po1mul1ZG+vv3t2lnXsZ+JX8brs91sbf1s5BzHVFoMGSqkvcoYO0BsFTEysL +IW5MpM2eSxctS7mLm3/lw5dv2Z5253UxXkLlSGToGbDRbC+yU9fD1XajgnZ6 +OXDvm8mv7z16eFCtzkOsKROi1HSGn4Xo4+D1rnNuq44Da3pX33Z+A6zYrvKS +mZwOVoqSW9eWGSDn1+lGJ/UUUEk9eaDV0BDNxYVKuVjJoBrCvK80bIj/7nVJ +dCneDyH3dh+9FWuE1/+clKPNxsJ05GSiVbwR1lzV7Qt7FwsH5PZGDCQYIV/+ +37WNL2Lh5KFot8WDRvjXLd6mI7djgW2cQJgeN8JPy+WlKYdi4fftv5rbiozw +eK2KbqBALOTVXZl73maEOG24cEA9Bu6X9O2a3cBEEb5E8be0SHjjSA9IkGTi +56heqau8kcD1I3L7L2kmFlUnm6V+2QvmrrxOqwgmuvZwDe28vxfaVxgbSqky +cWpNx8bvAXuhO7iY32wLE8m3IRbWFREwrBhemxvKxFMfu95ZM8Nh7uryd807 +TNQdjljxKi8MPmyzLslsYKLQz1STFalhMLjylO14ExMbPqXE6ESGQVOg9IVz +LUxc1+VZ12QTBumS+sZLnUwc9s/6e/dSKKzPCD/UNcrEzSgouDEiFNTC+rlC +uI0xHQT8VrqEwE6lav6irca4PrVk/jFrJyQ/8g9XdjHGcZM29xK1nZAbIvKE +dDPGpP7tP4/J7ITmyqTsJ17GaFu7iivpRzCIKduuWwoyxtDIRd6l+mBoV34v +FphgjNH8/v/t1w4GVRUaoVxsjGeNh7K/agfBrGq+ATljjDXOS33Ntf4w2I1W +ot+MUVDiq3lcgT+0RE27x88b41ZV82iTZH/IIe1iDX4ao7V23nM+a39QNeaq +aeQxwWIrj7icsR0QbBdJbxM3wRi5uAvGojugL8xGsM/UBKeYk1faTvrC3Ypf +b+czTPCRVZevMNsbDCziv9tnmeCbCF7Xx0XeUP92SrDklAnyO7cfOnXMG0j5 +MUP7PBM0UOt1svf1hprzLaeuXDTBmiTd+0d5vaEk+xjTptYEaXfsZ78Fe0Fm +/Loz51+YYOQD9on9StvAx1IBTeRNUV/wfeX4gDss9fEJtRGm2EUQhaNt7lAS +Mj1ir2CKddyVre/Z7vDheEOij4op9i9/vaCS5Q5xnc51STqmKGbYvjIa3eGk +0yH5u9amuCn+2N25G27Q6N3/Wy/aFLvjcswKClxBJvJEg0aLKWaNrOtPknGG +nOVQ/axWU1QYUD808ccJuPOsOf8+NMWFak5V6DsnmLy96lpJpylK+Hyw4Fxz +gkauo+dFXlDvy3/2fAfTCXwKUhMX3puiuf7C0qodW+F8U5L+vTUszC9P0mDU +O8AGgb2crV4sfJfwPE6h0hYqLA4nz2xnYcCRHJZZli3oHM6xyPdjoc7XNX8l +xtqC0wy7fzCIhcsjwRrqW2zh+MD8j517WZgx8HWocdAGFstSzJPTWNipMGvn +JGIDwyb5L6qqWejiWOfUc84Kdu+vuGRXy8JutcM1/SlWsFBbHzLFZuE/tBG5 +b7utQIQx+F37Ngv/0ymbjTaxAgc+Odm/W1hY1XHML/qtJTT3Ve160c9CR4Mn +gfu1LcFe6K56wiAL6V/io/tlLGHQpnNBcoSFJ+FijP1qS5hr/JTh/4aF49vu +8ewbsQD1Uq0b/02y8Er6lbTm4xbQPGyWkP2ZWo+9lFFrrAXYi7mD5gwLE514 +PUf9LCD0xP5n8fMs1AuSOrxV1wLmWo4XSSyysFGoM6RC3gLSfxbubPzJQl5V +nph1AhawXu+a2o4lFpq+un4yZ94crkQ2zi8vszCLt66C/tYc/h/dqIlo "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07370416420193386}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -18426,183 +19236,154 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07370416420193386}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, "Meta" -> <| "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> Plot, "GroupHighlight" -> False|>|>], - ImageSizeCache->{{117.9605728938093, - 256.1444167491903}, {-15.489822627663699`, 5.682052372336301}}], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], Selectable->False]}, Annotation[{{{{}, {}, Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13k8Vev3B3BRGZIyZObscwxJ5vngtJZ5zCxCpkKRMRENhttAJKGUBrNf +RZyzS2W4JUrIpQGZ0kDdriQKaZDf/v61X++/9n6etZ7PejY9ONothJuLi0t9 +BRfX/54LY50PFbMqtpT4LR/VCbfY0ndFMslsMB0CsjOZur10wA29wZKDeTC9 +aUxPoFcbElyuv+QZLIMp/qv80z1mIDwtkffjJQknTz9zedDjCq+bnaLnXraC +64BjuFZPEFgrTr6affkcNvi3LS49iYUfLw3Pzrx8BydfLQZBWxq0WfxfxbOy +b9DYvvKTlE8eyL5u+BCstgSEmvv8pw9FILY34DqvBQ+a/9cbPRJTCnna1k1O +nnxYxU7645NcCUPntVpm16/FCkcuM/FPVyGrIqWXW0oYL1ZeuLeGVQP2entE +NigI40rpFcfV7WqA76Gb50Z1YfyjkS1q61kDR8eVRhzMhLHATOxAWGQNHGJ0 +fyjYI4zXxTpVnC/XQFSJ5B/lRmEctHlk1vKrBlwvcdQcfEWQL5lolr55AyQK +xjPzL4ti0B3+bdZr6kByc/3RxSpRDE2+mjckVgfSrcdTdrBFMaLol1yofB3I +z2zav7FNFEvUl2QitOtAyTEmsOmjKBJ9VQWKXnWgu3LJYFxXDJmkdrJHaR04 +x4tP6HSJYd6ohouLJBtc1nwcK3whhjm8gZ03ZNngVtYw9HtUDLNPqw7x0tmw +7alfb/sXMTTPaWvkbGLDDrXyRp8NG/DRbE/SqDEbIiY0z6QHbqDKmpZ5yo8N +Jzzstjxf2IDbT2eD72U2SN/qkeZeIY6E97aLxaVsqBX1+K69RhwX5Xg/vK5k +w8Bzf/YZmjhWzhRZe9SyQdE1nuFqK44qhzxUBe+zoXVr8eqnF8SxtJujefc1 +G5as53v+MZXAK90cxWU5DuRWJVcvWUtgSPJYSwudA4qruTLUXSXQuuS7+REl +Djg+EjA7FSKBQbmmi1NqHCiyIG465kjgVMMJxgUTDhihQ+GT1xIosUnOS82b +A/uYpQGd6ZKokrBwkZXDAfsSoTmHbEl01dpRb3mGAwzeQxk9ZyXR0CmYaVvA +gad92zgvrkpi0zbfNMsiDmjECPKM9Uhi650+YZEqDnysSqz6Ki2FLfqbYcXf +HPATc/osc1MKg/4U+mp95IDuwaa0K81SWC5Y/fHhJAcE3qmI09ulkOxmjnt+ +5kBDHQ8oD0lhvUc8PfIrB8QdGnK1lqVwttniccxv6v1pinpWDtK4tNJivHsd +CZZffiZHjUujpGbgzJAuCUm2BaoPpqQx8Hzl6Kw+CbWl6sOiC9L48bRh0Goj +EiQ9ApkNfDJ4vH2PnpIpCVN3H33n0ZBBiU9+a4wtSchPz42/cEAGre6lP2hx +J6FjZJPiVJoM/s0d41XmScJvvbYXW7Jk0C6g9WSqFwmh/87rTFyWwe7Xy106 +viQYO/rOarTJoMuRxaaoYBLebVCOerhWFsMSF29axpAgEX1fTkJCFl3DKhxn +Yklw7PD+Zw8hi61PejLO7yPhdnKW2jpdWRzttfk8lkDlwuuZye3esrgpqTjO +4jAJOteawr6UyWLw9sanEZkkpJm6BkkbyeH6h/UyrGISbP2vfDU0l8P9WKV4 +oYQEodRPf3k6yuFCw2772VISLrUdq8oNlMORK/JfzlaQcNe+8dPqTDmMLSTZ +7GskzHgrJHwbksPmax031W6ScCc5hld4Qg5LpXaN2d8i4cilv89rTFNOctEO +qSdB8I1X0x5ueVwo2+iec4eEjWHZXG9U5VF/KuQS2USC//75k90H5XEubHje +oo0EpUJz2clj8rh8MIJH6eH/9v/0Dd5cebQa4bfmfkRC8u9NT80r5FH07eNI +TjsJZ//y39DQLY8d4Uv+7zpJ8KusrhoYkMfFgQq1yi4SGI8XDefeyON+zc0G +u56QwBbI99Gcl8fLg+5cL7tJ6D7zuLhSjoZj955mnu6l6ntTTLttIw0DeBWc +9Z6S4NMf1PpGm4a2r2K8+il/lPw9IWNNQ+e4cj3B5yTwlGip5kXRsI+LYbK1 +j4SuB4eb6g7Q8Nuu1Tp9lHPHuxz/SafhQLzjPq9+EuQ3hkTzFdJQS6F90G2A +6ofaC7eO3KehgIqqvdwg1a8ve5amO2jol9xzL4WyE9dKm4DnNGwtcVgeo7zT +LWoI3tOQv3b5Q/4QCVEHyxnsaRp22D89/R/lAxWDEcQiDY2Ub/CaDpNgfZCe +krqKQB/ZjrCXlJ+say43EiCw83iVKzFCgkvFto4ZIQKh59naUMq+/2QJB0kS +GJ3nzfWR8psgZQMpOQJbP/gYKY5S/bzQ4vOMTiC9/bvVDsoxtIVys80Ermvy +ev+I8vzN3I4fmgR+kOs4ME852XbzZ44egaaV6u/pr0jgevVIOJxJ4Nz3wM0O +lI/FBhowthDYnmHiGEtZYPUvn2FzAsmzhbYFlHOLzqbk2RB4YKML/RblDZpa +FfaOBM6sN3v5lHJRW1cHtyuBGdPWEZOUad4hnxs9CSxVgjGuMRIqppaF9/kQ +uHaCV1uMsmpakcHmAALDaam7FCnXbdD3Hd9J4LmCE0nalPWu96Zc3E2g1OM/ +MSaUG7eEV7hHEpjH9djBnDK8WNm5Jo5ACZdWAWvKD8OKP7clEHgz80Xt/2z3 +myly6CC1X1ZjRpaUe3L7DPRSCfR/035tC2UPpWjfqaMEPj4Qx21AeaiBP7Ui +k8D+mXYLVcr+ThUVfjlUvaauR8lQnni3pVMsn8Dcp6uO8lPekzj0ubuQwINt +94/OUeudXhMvcuwSgTuqH8SOUt5XImTIKiVQXGPe4QHlRb1rvvOVBGaxLcXK +KR/ptEi9cZ1AuW0Xn6RR5vEfqwipI3B5eSJuB+WMrwc65W4RWO0otMaAstAJ +0en+uwRi4cqzayhLsm0NrVsJ3LtFOP0GVd/LluO+f9oJNPm16t8kyoyhw6m3 +nxCos/+omQVlde6bncr9BDYEjA93U/1Ents6PTZE4Nel/5M5Rdlo80eRwjEC +992852lP2dxDzo/3I4GT5WRDE9Wvjz/eSb0/RWBXe9L7aMqOh90qE2cJzOkN +FaJT9qo6Mf3vTwL91HJ8k6n+37s4m9qxlo7h+cZ/+KjzYhwbKv5BhI49ikrX +L1H3KL7J4WoeSTomNub1q1GuHGkb2MKgY1X5Up05dR7H7p1VqzegI8GTcM6S +Or81hgKtz03o6FraH9T8gupn9hGvGaSjJ+/YbS3K4mVh6Zsd6Nhfu5ZnHZUH +zseYg6UBdOTaLGNbRuWJ/J8bkfd30dHS+fPRPz1UniUweF7toWPr+w5PL8oZ +u9doSMbT8X3fq7t/qDxqcXj1V04GHVdpJ19TpPJLRyRN8yCHjkr5+gE9VD5y +Zc0/PH+bjvQoqUNzrVR/8YT73G6iY2ZArLkE5Yh5t2Ozj+h4eWH+qVsL1f+D +iiNhw3QU3vpEpqyZ+t7ijuMePAz8ZShXXEbl9YQESzaOj4EK9et/5FN5TuZy +OKfXMvCt0V2RdJJaT3rRaJcEAzn8vSc92NT3huzVMVNjoGLjYv3zahJ+bF4/ +pu7JwKbRy0z9MhIWLkun6fowcNBeRukHNV/m1ikpMgMYqN9SvLKRmj/T35jh +lnsYCDK2lTqXqfnXtHPB5zADJUd4CpYLqfx0uCOUUcnAzGZ2IP8p6nxH+MO7 +eQbyBiyVf4gnofDV7nf//mQgQynwiQM1Dwuc9x37vMzAi/ZOYrXUvMzRzXiy +yK+Ani0V68OjSEj/xfFaJ6+AsUFmo/fDqP3JWhVjaq2APvz6/BPbSTCtrik5 +d04B59J+KEpR836EqC62uqiAAbfcCRtjqt7nrl2ZK1bAjEjn9jjqfnAnreqS +2zUFNE2WlWjTo+rjXXJeqFkB9TpuT9uok7BpVUHu8bcK6JfqkD0uR+13wMHU +BDVFLDlsaBmxxIFZEfvAba2KOIbDNTy3OTC4l/E0/LEiGkjQJuNucqCl/Sek +dCvixod7O16zqftccjXt6oAi2uY/iiKrOaD1TvD1j0lFFK/8kmtSyoEoTu+O +y6JK2HSAp2QsiwOTzp6+E7uUcP5CxsV9ARyYyA7cFserjK3fEjQMuThg9yXR +7r3BRizPlKUrUvfVqZ18+26lqKCtTr2a1rla6n9CgvtE6yZUYghq216qAZF/ +lHPYX1TRTLnwfm3tdZDNqHMxMFDDVUe/DgtkXYXzm5nrRcPUse42YeWRWQVd +0mb6385o4Iqr3b81CyvAWLY1V3NAEzc23Qn1zSgDIZ6y+KB0LWSO2bMc60pA +Po1mul1ZG+vv3t2lnXsZ+JX8brs91sbf1s5BzHVFoMGSqkvcoYO0BsFTEysL +IW5MpM2eSxctS7mLm3/lw5dv2Z5253UxXkLlSGToGbDRbC+yU9fD1XajgnZ6 +OXDvm8mv7z16eFCtzkOsKROi1HSGn4Xo4+D1rnNuq44Da3pX33Z+A6zYrvKS +mZwOVoqSW9eWGSDn1+lGJ/UUUEk9eaDV0BDNxYVKuVjJoBrCvK80bIj/7nVJ +dCneDyH3dh+9FWuE1/+clKPNxsJ05GSiVbwR1lzV7Qt7FwsH5PZGDCQYIV/+ +37WNL2Lh5KFot8WDRvjXLd6mI7djgW2cQJgeN8JPy+WlKYdi4fftv5rbiozw +eK2KbqBALOTVXZl73maEOG24cEA9Bu6X9O2a3cBEEb5E8be0SHjjSA9IkGTi +56heqau8kcD1I3L7L2kmFlUnm6V+2QvmrrxOqwgmuvZwDe28vxfaVxgbSqky +cWpNx8bvAXuhO7iY32wLE8m3IRbWFREwrBhemxvKxFMfu95ZM8Nh7uryd807 +TNQdjljxKi8MPmyzLslsYKLQz1STFalhMLjylO14ExMbPqXE6ESGQVOg9IVz +LUxc1+VZ12QTBumS+sZLnUwc9s/6e/dSKKzPCD/UNcrEzSgouDEiFNTC+rlC +uI0xHQT8VrqEwE6lav6irca4PrVk/jFrJyQ/8g9XdjHGcZM29xK1nZAbIvKE +dDPGpP7tP4/J7ITmyqTsJ17GaFu7iivpRzCIKduuWwoyxtDIRd6l+mBoV34v +FphgjNH8/v/t1w4GVRUaoVxsjGeNh7K/agfBrGq+ATljjDXOS33Ntf4w2I1W +ot+MUVDiq3lcgT+0RE27x88b41ZV82iTZH/IIe1iDX4ao7V23nM+a39QNeaq +aeQxwWIrj7icsR0QbBdJbxM3wRi5uAvGojugL8xGsM/UBKeYk1faTvrC3Ypf +b+czTPCRVZevMNsbDCziv9tnmeCbCF7Xx0XeUP92SrDklAnyO7cfOnXMG0j5 +MUP7PBM0UOt1svf1hprzLaeuXDTBmiTd+0d5vaEk+xjTptYEaXfsZ78Fe0Fm +/Loz51+YYOQD9on9StvAx1IBTeRNUV/wfeX4gDss9fEJtRGm2EUQhaNt7lAS +Mj1ir2CKddyVre/Z7vDheEOij4op9i9/vaCS5Q5xnc51STqmKGbYvjIa3eGk +0yH5u9amuCn+2N25G27Q6N3/Wy/aFLvjcswKClxBJvJEg0aLKWaNrOtPknGG +nOVQ/axWU1QYUD808ccJuPOsOf8+NMWFak5V6DsnmLy96lpJpylK+Hyw4Fxz +gkauo+dFXlDvy3/2fAfTCXwKUhMX3puiuf7C0qodW+F8U5L+vTUszC9P0mDU +O8AGgb2crV4sfJfwPE6h0hYqLA4nz2xnYcCRHJZZli3oHM6xyPdjoc7XNX8l +xtqC0wy7fzCIhcsjwRrqW2zh+MD8j517WZgx8HWocdAGFstSzJPTWNipMGvn +JGIDwyb5L6qqWejiWOfUc84Kdu+vuGRXy8JutcM1/SlWsFBbHzLFZuE/tBG5 +b7utQIQx+F37Ngv/0ymbjTaxAgc+Odm/W1hY1XHML/qtJTT3Ve160c9CR4Mn +gfu1LcFe6K56wiAL6V/io/tlLGHQpnNBcoSFJ+FijP1qS5hr/JTh/4aF49vu +8ewbsQD1Uq0b/02y8Er6lbTm4xbQPGyWkP2ZWo+9lFFrrAXYi7mD5gwLE514 +PUf9LCD0xP5n8fMs1AuSOrxV1wLmWo4XSSyysFGoM6RC3gLSfxbubPzJQl5V +nph1AhawXu+a2o4lFpq+un4yZ94crkQ2zi8vszCLt66C/tYc/h/dqIlo "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07370416420193386}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -18613,6 +19394,7 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -18640,7 +19422,8 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.16919668648256683`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07370416420193386}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -18648,17 +19431,607 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913483238131485`*^9}, + CellChangeTimes->{3.9913483238131485`*^9, 3.994357370819241*^9}, CellLabel-> - "Out[470]=",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] + "Out[210]=",ExpressionUUID->"b86e9daf-08f1-481c-8746-788589707ede"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"54d9c986-d109-3d4c-9ee8-\ -76427bb63659"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[211]:=",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8Vev3B3BRGZIyZObscwxJ5vngtJZ5zCxCpkKRMRENhttAJKGUBrNf +RZyzS2W4JUrIpQGZ0kDdriQKaZDf/v61X++/9n6etZ7PejY9ONothJuLi0t9 +BRfX/54LY50PFbMqtpT4LR/VCbfY0ndFMslsMB0CsjOZur10wA29wZKDeTC9 +aUxPoFcbElyuv+QZLIMp/qv80z1mIDwtkffjJQknTz9zedDjCq+bnaLnXraC +64BjuFZPEFgrTr6affkcNvi3LS49iYUfLw3Pzrx8BydfLQZBWxq0WfxfxbOy +b9DYvvKTlE8eyL5u+BCstgSEmvv8pw9FILY34DqvBQ+a/9cbPRJTCnna1k1O +nnxYxU7645NcCUPntVpm16/FCkcuM/FPVyGrIqWXW0oYL1ZeuLeGVQP2entE +NigI40rpFcfV7WqA76Gb50Z1YfyjkS1q61kDR8eVRhzMhLHATOxAWGQNHGJ0 +fyjYI4zXxTpVnC/XQFSJ5B/lRmEctHlk1vKrBlwvcdQcfEWQL5lolr55AyQK +xjPzL4ti0B3+bdZr6kByc/3RxSpRDE2+mjckVgfSrcdTdrBFMaLol1yofB3I +z2zav7FNFEvUl2QitOtAyTEmsOmjKBJ9VQWKXnWgu3LJYFxXDJmkdrJHaR04 +x4tP6HSJYd6ohouLJBtc1nwcK3whhjm8gZ03ZNngVtYw9HtUDLNPqw7x0tmw +7alfb/sXMTTPaWvkbGLDDrXyRp8NG/DRbE/SqDEbIiY0z6QHbqDKmpZ5yo8N +Jzzstjxf2IDbT2eD72U2SN/qkeZeIY6E97aLxaVsqBX1+K69RhwX5Xg/vK5k +w8Bzf/YZmjhWzhRZe9SyQdE1nuFqK44qhzxUBe+zoXVr8eqnF8SxtJujefc1 +G5as53v+MZXAK90cxWU5DuRWJVcvWUtgSPJYSwudA4qruTLUXSXQuuS7+REl +Djg+EjA7FSKBQbmmi1NqHCiyIG465kjgVMMJxgUTDhihQ+GT1xIosUnOS82b +A/uYpQGd6ZKokrBwkZXDAfsSoTmHbEl01dpRb3mGAwzeQxk9ZyXR0CmYaVvA +gad92zgvrkpi0zbfNMsiDmjECPKM9Uhi650+YZEqDnysSqz6Ki2FLfqbYcXf +HPATc/osc1MKg/4U+mp95IDuwaa0K81SWC5Y/fHhJAcE3qmI09ulkOxmjnt+ +5kBDHQ8oD0lhvUc8PfIrB8QdGnK1lqVwttniccxv6v1pinpWDtK4tNJivHsd +CZZffiZHjUujpGbgzJAuCUm2BaoPpqQx8Hzl6Kw+CbWl6sOiC9L48bRh0Goj +EiQ9ApkNfDJ4vH2PnpIpCVN3H33n0ZBBiU9+a4wtSchPz42/cEAGre6lP2hx +J6FjZJPiVJoM/s0d41XmScJvvbYXW7Jk0C6g9WSqFwmh/87rTFyWwe7Xy106 +viQYO/rOarTJoMuRxaaoYBLebVCOerhWFsMSF29axpAgEX1fTkJCFl3DKhxn +Yklw7PD+Zw8hi61PejLO7yPhdnKW2jpdWRzttfk8lkDlwuuZye3esrgpqTjO +4jAJOteawr6UyWLw9sanEZkkpJm6BkkbyeH6h/UyrGISbP2vfDU0l8P9WKV4 +oYQEodRPf3k6yuFCw2772VISLrUdq8oNlMORK/JfzlaQcNe+8dPqTDmMLSTZ +7GskzHgrJHwbksPmax031W6ScCc5hld4Qg5LpXaN2d8i4cilv89rTFNOctEO +qSdB8I1X0x5ueVwo2+iec4eEjWHZXG9U5VF/KuQS2USC//75k90H5XEubHje +oo0EpUJz2clj8rh8MIJH6eH/9v/0Dd5cebQa4bfmfkRC8u9NT80r5FH07eNI +TjsJZ//y39DQLY8d4Uv+7zpJ8KusrhoYkMfFgQq1yi4SGI8XDefeyON+zc0G +u56QwBbI99Gcl8fLg+5cL7tJ6D7zuLhSjoZj955mnu6l6ntTTLttIw0DeBWc +9Z6S4NMf1PpGm4a2r2K8+il/lPw9IWNNQ+e4cj3B5yTwlGip5kXRsI+LYbK1 +j4SuB4eb6g7Q8Nuu1Tp9lHPHuxz/SafhQLzjPq9+EuQ3hkTzFdJQS6F90G2A +6ofaC7eO3KehgIqqvdwg1a8ve5amO2jol9xzL4WyE9dKm4DnNGwtcVgeo7zT +LWoI3tOQv3b5Q/4QCVEHyxnsaRp22D89/R/lAxWDEcQiDY2Ub/CaDpNgfZCe +krqKQB/ZjrCXlJ+say43EiCw83iVKzFCgkvFto4ZIQKh59naUMq+/2QJB0kS +GJ3nzfWR8psgZQMpOQJbP/gYKY5S/bzQ4vOMTiC9/bvVDsoxtIVys80Ermvy +ev+I8vzN3I4fmgR+kOs4ME852XbzZ44egaaV6u/pr0jgevVIOJxJ4Nz3wM0O +lI/FBhowthDYnmHiGEtZYPUvn2FzAsmzhbYFlHOLzqbk2RB4YKML/RblDZpa +FfaOBM6sN3v5lHJRW1cHtyuBGdPWEZOUad4hnxs9CSxVgjGuMRIqppaF9/kQ +uHaCV1uMsmpakcHmAALDaam7FCnXbdD3Hd9J4LmCE0nalPWu96Zc3E2g1OM/ +MSaUG7eEV7hHEpjH9djBnDK8WNm5Jo5ACZdWAWvKD8OKP7clEHgz80Xt/2z3 +myly6CC1X1ZjRpaUe3L7DPRSCfR/035tC2UPpWjfqaMEPj4Qx21AeaiBP7Ui +k8D+mXYLVcr+ThUVfjlUvaauR8lQnni3pVMsn8Dcp6uO8lPekzj0ubuQwINt +94/OUeudXhMvcuwSgTuqH8SOUt5XImTIKiVQXGPe4QHlRb1rvvOVBGaxLcXK +KR/ptEi9cZ1AuW0Xn6RR5vEfqwipI3B5eSJuB+WMrwc65W4RWO0otMaAstAJ +0en+uwRi4cqzayhLsm0NrVsJ3LtFOP0GVd/LluO+f9oJNPm16t8kyoyhw6m3 +nxCos/+omQVlde6bncr9BDYEjA93U/1Ents6PTZE4Nel/5M5Rdlo80eRwjEC +992852lP2dxDzo/3I4GT5WRDE9Wvjz/eSb0/RWBXe9L7aMqOh90qE2cJzOkN +FaJT9qo6Mf3vTwL91HJ8k6n+37s4m9qxlo7h+cZ/+KjzYhwbKv5BhI49ikrX +L1H3KL7J4WoeSTomNub1q1GuHGkb2MKgY1X5Up05dR7H7p1VqzegI8GTcM6S +Or81hgKtz03o6FraH9T8gupn9hGvGaSjJ+/YbS3K4mVh6Zsd6Nhfu5ZnHZUH +zseYg6UBdOTaLGNbRuWJ/J8bkfd30dHS+fPRPz1UniUweF7toWPr+w5PL8oZ +u9doSMbT8X3fq7t/qDxqcXj1V04GHVdpJ19TpPJLRyRN8yCHjkr5+gE9VD5y +Zc0/PH+bjvQoqUNzrVR/8YT73G6iY2ZArLkE5Yh5t2Ozj+h4eWH+qVsL1f+D +iiNhw3QU3vpEpqyZ+t7ijuMePAz8ZShXXEbl9YQESzaOj4EK9et/5FN5TuZy +OKfXMvCt0V2RdJJaT3rRaJcEAzn8vSc92NT3huzVMVNjoGLjYv3zahJ+bF4/ +pu7JwKbRy0z9MhIWLkun6fowcNBeRukHNV/m1ikpMgMYqN9SvLKRmj/T35jh +lnsYCDK2lTqXqfnXtHPB5zADJUd4CpYLqfx0uCOUUcnAzGZ2IP8p6nxH+MO7 +eQbyBiyVf4gnofDV7nf//mQgQynwiQM1Dwuc9x37vMzAi/ZOYrXUvMzRzXiy +yK+Ani0V68OjSEj/xfFaJ6+AsUFmo/fDqP3JWhVjaq2APvz6/BPbSTCtrik5 +d04B59J+KEpR836EqC62uqiAAbfcCRtjqt7nrl2ZK1bAjEjn9jjqfnAnreqS +2zUFNE2WlWjTo+rjXXJeqFkB9TpuT9uok7BpVUHu8bcK6JfqkD0uR+13wMHU +BDVFLDlsaBmxxIFZEfvAba2KOIbDNTy3OTC4l/E0/LEiGkjQJuNucqCl/Sek +dCvixod7O16zqftccjXt6oAi2uY/iiKrOaD1TvD1j0lFFK/8kmtSyoEoTu+O +y6JK2HSAp2QsiwOTzp6+E7uUcP5CxsV9ARyYyA7cFserjK3fEjQMuThg9yXR +7r3BRizPlKUrUvfVqZ18+26lqKCtTr2a1rla6n9CgvtE6yZUYghq216qAZF/ +lHPYX1TRTLnwfm3tdZDNqHMxMFDDVUe/DgtkXYXzm5nrRcPUse42YeWRWQVd +0mb6385o4Iqr3b81CyvAWLY1V3NAEzc23Qn1zSgDIZ6y+KB0LWSO2bMc60pA +Po1mul1ZG+vv3t2lnXsZ+JX8brs91sbf1s5BzHVFoMGSqkvcoYO0BsFTEysL +IW5MpM2eSxctS7mLm3/lw5dv2Z5253UxXkLlSGToGbDRbC+yU9fD1XajgnZ6 +OXDvm8mv7z16eFCtzkOsKROi1HSGn4Xo4+D1rnNuq44Da3pX33Z+A6zYrvKS +mZwOVoqSW9eWGSDn1+lGJ/UUUEk9eaDV0BDNxYVKuVjJoBrCvK80bIj/7nVJ +dCneDyH3dh+9FWuE1/+clKPNxsJ05GSiVbwR1lzV7Qt7FwsH5PZGDCQYIV/+ +37WNL2Lh5KFot8WDRvjXLd6mI7djgW2cQJgeN8JPy+WlKYdi4fftv5rbiozw +eK2KbqBALOTVXZl73maEOG24cEA9Bu6X9O2a3cBEEb5E8be0SHjjSA9IkGTi +56heqau8kcD1I3L7L2kmFlUnm6V+2QvmrrxOqwgmuvZwDe28vxfaVxgbSqky +cWpNx8bvAXuhO7iY32wLE8m3IRbWFREwrBhemxvKxFMfu95ZM8Nh7uryd807 +TNQdjljxKi8MPmyzLslsYKLQz1STFalhMLjylO14ExMbPqXE6ESGQVOg9IVz +LUxc1+VZ12QTBumS+sZLnUwc9s/6e/dSKKzPCD/UNcrEzSgouDEiFNTC+rlC +uI0xHQT8VrqEwE6lav6irca4PrVk/jFrJyQ/8g9XdjHGcZM29xK1nZAbIvKE +dDPGpP7tP4/J7ITmyqTsJ17GaFu7iivpRzCIKduuWwoyxtDIRd6l+mBoV34v +FphgjNH8/v/t1w4GVRUaoVxsjGeNh7K/agfBrGq+ATljjDXOS33Ntf4w2I1W +ot+MUVDiq3lcgT+0RE27x88b41ZV82iTZH/IIe1iDX4ao7V23nM+a39QNeaq +aeQxwWIrj7icsR0QbBdJbxM3wRi5uAvGojugL8xGsM/UBKeYk1faTvrC3Ypf +b+czTPCRVZevMNsbDCziv9tnmeCbCF7Xx0XeUP92SrDklAnyO7cfOnXMG0j5 +MUP7PBM0UOt1svf1hprzLaeuXDTBmiTd+0d5vaEk+xjTptYEaXfsZ78Fe0Fm +/Loz51+YYOQD9on9StvAx1IBTeRNUV/wfeX4gDss9fEJtRGm2EUQhaNt7lAS +Mj1ir2CKddyVre/Z7vDheEOij4op9i9/vaCS5Q5xnc51STqmKGbYvjIa3eGk +0yH5u9amuCn+2N25G27Q6N3/Wy/aFLvjcswKClxBJvJEg0aLKWaNrOtPknGG +nOVQ/axWU1QYUD808ccJuPOsOf8+NMWFak5V6DsnmLy96lpJpylK+Hyw4Fxz +gkauo+dFXlDvy3/2fAfTCXwKUhMX3puiuf7C0qodW+F8U5L+vTUszC9P0mDU +O8AGgb2crV4sfJfwPE6h0hYqLA4nz2xnYcCRHJZZli3oHM6xyPdjoc7XNX8l +xtqC0wy7fzCIhcsjwRrqW2zh+MD8j517WZgx8HWocdAGFstSzJPTWNipMGvn +JGIDwyb5L6qqWejiWOfUc84Kdu+vuGRXy8JutcM1/SlWsFBbHzLFZuE/tBG5 +b7utQIQx+F37Ngv/0ymbjTaxAgc+Odm/W1hY1XHML/qtJTT3Ve160c9CR4Mn +gfu1LcFe6K56wiAL6V/io/tlLGHQpnNBcoSFJ+FijP1qS5hr/JTh/4aF49vu +8ewbsQD1Uq0b/02y8Er6lbTm4xbQPGyWkP2ZWo+9lFFrrAXYi7mD5gwLE514 +PUf9LCD0xP5n8fMs1AuSOrxV1wLmWo4XSSyysFGoM6RC3gLSfxbubPzJQl5V +nph1AhawXu+a2o4lFpq+un4yZ94crkQ2zi8vszCLt66C/tYc/h/dqIlo + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8Vev3B3BRGZIyZObscwxJ5vngtJZ5zCxCpkKRMRENhttAJKGUBrNf +RZyzS2W4JUrIpQGZ0kDdriQKaZDf/v61X++/9n6etZ7PejY9ONothJuLi0t9 +BRfX/54LY50PFbMqtpT4LR/VCbfY0ndFMslsMB0CsjOZur10wA29wZKDeTC9 +aUxPoFcbElyuv+QZLIMp/qv80z1mIDwtkffjJQknTz9zedDjCq+bnaLnXraC +64BjuFZPEFgrTr6affkcNvi3LS49iYUfLw3Pzrx8BydfLQZBWxq0WfxfxbOy +b9DYvvKTlE8eyL5u+BCstgSEmvv8pw9FILY34DqvBQ+a/9cbPRJTCnna1k1O +nnxYxU7645NcCUPntVpm16/FCkcuM/FPVyGrIqWXW0oYL1ZeuLeGVQP2entE +NigI40rpFcfV7WqA76Gb50Z1YfyjkS1q61kDR8eVRhzMhLHATOxAWGQNHGJ0 +fyjYI4zXxTpVnC/XQFSJ5B/lRmEctHlk1vKrBlwvcdQcfEWQL5lolr55AyQK +xjPzL4ti0B3+bdZr6kByc/3RxSpRDE2+mjckVgfSrcdTdrBFMaLol1yofB3I +z2zav7FNFEvUl2QitOtAyTEmsOmjKBJ9VQWKXnWgu3LJYFxXDJmkdrJHaR04 +x4tP6HSJYd6ohouLJBtc1nwcK3whhjm8gZ03ZNngVtYw9HtUDLNPqw7x0tmw +7alfb/sXMTTPaWvkbGLDDrXyRp8NG/DRbE/SqDEbIiY0z6QHbqDKmpZ5yo8N +Jzzstjxf2IDbT2eD72U2SN/qkeZeIY6E97aLxaVsqBX1+K69RhwX5Xg/vK5k +w8Bzf/YZmjhWzhRZe9SyQdE1nuFqK44qhzxUBe+zoXVr8eqnF8SxtJujefc1 +G5as53v+MZXAK90cxWU5DuRWJVcvWUtgSPJYSwudA4qruTLUXSXQuuS7+REl +Djg+EjA7FSKBQbmmi1NqHCiyIG465kjgVMMJxgUTDhihQ+GT1xIosUnOS82b +A/uYpQGd6ZKokrBwkZXDAfsSoTmHbEl01dpRb3mGAwzeQxk9ZyXR0CmYaVvA +gad92zgvrkpi0zbfNMsiDmjECPKM9Uhi650+YZEqDnysSqz6Ki2FLfqbYcXf +HPATc/osc1MKg/4U+mp95IDuwaa0K81SWC5Y/fHhJAcE3qmI09ulkOxmjnt+ +5kBDHQ8oD0lhvUc8PfIrB8QdGnK1lqVwttniccxv6v1pinpWDtK4tNJivHsd +CZZffiZHjUujpGbgzJAuCUm2BaoPpqQx8Hzl6Kw+CbWl6sOiC9L48bRh0Goj +EiQ9ApkNfDJ4vH2PnpIpCVN3H33n0ZBBiU9+a4wtSchPz42/cEAGre6lP2hx +J6FjZJPiVJoM/s0d41XmScJvvbYXW7Jk0C6g9WSqFwmh/87rTFyWwe7Xy106 +viQYO/rOarTJoMuRxaaoYBLebVCOerhWFsMSF29axpAgEX1fTkJCFl3DKhxn +Yklw7PD+Zw8hi61PejLO7yPhdnKW2jpdWRzttfk8lkDlwuuZye3esrgpqTjO +4jAJOteawr6UyWLw9sanEZkkpJm6BkkbyeH6h/UyrGISbP2vfDU0l8P9WKV4 +oYQEodRPf3k6yuFCw2772VISLrUdq8oNlMORK/JfzlaQcNe+8dPqTDmMLSTZ +7GskzHgrJHwbksPmax031W6ScCc5hld4Qg5LpXaN2d8i4cilv89rTFNOctEO +qSdB8I1X0x5ueVwo2+iec4eEjWHZXG9U5VF/KuQS2USC//75k90H5XEubHje +oo0EpUJz2clj8rh8MIJH6eH/9v/0Dd5cebQa4bfmfkRC8u9NT80r5FH07eNI +TjsJZ//y39DQLY8d4Uv+7zpJ8KusrhoYkMfFgQq1yi4SGI8XDefeyON+zc0G +u56QwBbI99Gcl8fLg+5cL7tJ6D7zuLhSjoZj955mnu6l6ntTTLttIw0DeBWc +9Z6S4NMf1PpGm4a2r2K8+il/lPw9IWNNQ+e4cj3B5yTwlGip5kXRsI+LYbK1 +j4SuB4eb6g7Q8Nuu1Tp9lHPHuxz/SafhQLzjPq9+EuQ3hkTzFdJQS6F90G2A +6ofaC7eO3KehgIqqvdwg1a8ve5amO2jol9xzL4WyE9dKm4DnNGwtcVgeo7zT +LWoI3tOQv3b5Q/4QCVEHyxnsaRp22D89/R/lAxWDEcQiDY2Ub/CaDpNgfZCe +krqKQB/ZjrCXlJ+say43EiCw83iVKzFCgkvFto4ZIQKh59naUMq+/2QJB0kS +GJ3nzfWR8psgZQMpOQJbP/gYKY5S/bzQ4vOMTiC9/bvVDsoxtIVys80Ermvy +ev+I8vzN3I4fmgR+kOs4ME852XbzZ44egaaV6u/pr0jgevVIOJxJ4Nz3wM0O +lI/FBhowthDYnmHiGEtZYPUvn2FzAsmzhbYFlHOLzqbk2RB4YKML/RblDZpa +FfaOBM6sN3v5lHJRW1cHtyuBGdPWEZOUad4hnxs9CSxVgjGuMRIqppaF9/kQ +uHaCV1uMsmpakcHmAALDaam7FCnXbdD3Hd9J4LmCE0nalPWu96Zc3E2g1OM/ +MSaUG7eEV7hHEpjH9djBnDK8WNm5Jo5ACZdWAWvKD8OKP7clEHgz80Xt/2z3 +myly6CC1X1ZjRpaUe3L7DPRSCfR/035tC2UPpWjfqaMEPj4Qx21AeaiBP7Ui +k8D+mXYLVcr+ThUVfjlUvaauR8lQnni3pVMsn8Dcp6uO8lPekzj0ubuQwINt +94/OUeudXhMvcuwSgTuqH8SOUt5XImTIKiVQXGPe4QHlRb1rvvOVBGaxLcXK +KR/ptEi9cZ1AuW0Xn6RR5vEfqwipI3B5eSJuB+WMrwc65W4RWO0otMaAstAJ +0en+uwRi4cqzayhLsm0NrVsJ3LtFOP0GVd/LluO+f9oJNPm16t8kyoyhw6m3 +nxCos/+omQVlde6bncr9BDYEjA93U/1Ents6PTZE4Nel/5M5Rdlo80eRwjEC +992852lP2dxDzo/3I4GT5WRDE9Wvjz/eSb0/RWBXe9L7aMqOh90qE2cJzOkN +FaJT9qo6Mf3vTwL91HJ8k6n+37s4m9qxlo7h+cZ/+KjzYhwbKv5BhI49ikrX +L1H3KL7J4WoeSTomNub1q1GuHGkb2MKgY1X5Up05dR7H7p1VqzegI8GTcM6S +Or81hgKtz03o6FraH9T8gupn9hGvGaSjJ+/YbS3K4mVh6Zsd6Nhfu5ZnHZUH +zseYg6UBdOTaLGNbRuWJ/J8bkfd30dHS+fPRPz1UniUweF7toWPr+w5PL8oZ +u9doSMbT8X3fq7t/qDxqcXj1V04GHVdpJ19TpPJLRyRN8yCHjkr5+gE9VD5y +Zc0/PH+bjvQoqUNzrVR/8YT73G6iY2ZArLkE5Yh5t2Ozj+h4eWH+qVsL1f+D +iiNhw3QU3vpEpqyZ+t7ijuMePAz8ZShXXEbl9YQESzaOj4EK9et/5FN5TuZy +OKfXMvCt0V2RdJJaT3rRaJcEAzn8vSc92NT3huzVMVNjoGLjYv3zahJ+bF4/ +pu7JwKbRy0z9MhIWLkun6fowcNBeRukHNV/m1ikpMgMYqN9SvLKRmj/T35jh +lnsYCDK2lTqXqfnXtHPB5zADJUd4CpYLqfx0uCOUUcnAzGZ2IP8p6nxH+MO7 +eQbyBiyVf4gnofDV7nf//mQgQynwiQM1Dwuc9x37vMzAi/ZOYrXUvMzRzXiy +yK+Ani0V68OjSEj/xfFaJ6+AsUFmo/fDqP3JWhVjaq2APvz6/BPbSTCtrik5 +d04B59J+KEpR836EqC62uqiAAbfcCRtjqt7nrl2ZK1bAjEjn9jjqfnAnreqS +2zUFNE2WlWjTo+rjXXJeqFkB9TpuT9uok7BpVUHu8bcK6JfqkD0uR+13wMHU +BDVFLDlsaBmxxIFZEfvAba2KOIbDNTy3OTC4l/E0/LEiGkjQJuNucqCl/Sek +dCvixod7O16zqftccjXt6oAi2uY/iiKrOaD1TvD1j0lFFK/8kmtSyoEoTu+O +y6JK2HSAp2QsiwOTzp6+E7uUcP5CxsV9ARyYyA7cFserjK3fEjQMuThg9yXR +7r3BRizPlKUrUvfVqZ18+26lqKCtTr2a1rla6n9CgvtE6yZUYghq216qAZF/ +lHPYX1TRTLnwfm3tdZDNqHMxMFDDVUe/DgtkXYXzm5nrRcPUse42YeWRWQVd +0mb6385o4Iqr3b81CyvAWLY1V3NAEzc23Qn1zSgDIZ6y+KB0LWSO2bMc60pA +Po1mul1ZG+vv3t2lnXsZ+JX8brs91sbf1s5BzHVFoMGSqkvcoYO0BsFTEysL +IW5MpM2eSxctS7mLm3/lw5dv2Z5253UxXkLlSGToGbDRbC+yU9fD1XajgnZ6 +OXDvm8mv7z16eFCtzkOsKROi1HSGn4Xo4+D1rnNuq44Da3pX33Z+A6zYrvKS +mZwOVoqSW9eWGSDn1+lGJ/UUUEk9eaDV0BDNxYVKuVjJoBrCvK80bIj/7nVJ +dCneDyH3dh+9FWuE1/+clKPNxsJ05GSiVbwR1lzV7Qt7FwsH5PZGDCQYIV/+ +37WNL2Lh5KFot8WDRvjXLd6mI7djgW2cQJgeN8JPy+WlKYdi4fftv5rbiozw +eK2KbqBALOTVXZl73maEOG24cEA9Bu6X9O2a3cBEEb5E8be0SHjjSA9IkGTi +56heqau8kcD1I3L7L2kmFlUnm6V+2QvmrrxOqwgmuvZwDe28vxfaVxgbSqky +cWpNx8bvAXuhO7iY32wLE8m3IRbWFREwrBhemxvKxFMfu95ZM8Nh7uryd807 +TNQdjljxKi8MPmyzLslsYKLQz1STFalhMLjylO14ExMbPqXE6ESGQVOg9IVz +LUxc1+VZ12QTBumS+sZLnUwc9s/6e/dSKKzPCD/UNcrEzSgouDEiFNTC+rlC +uI0xHQT8VrqEwE6lav6irca4PrVk/jFrJyQ/8g9XdjHGcZM29xK1nZAbIvKE +dDPGpP7tP4/J7ITmyqTsJ17GaFu7iivpRzCIKduuWwoyxtDIRd6l+mBoV34v +FphgjNH8/v/t1w4GVRUaoVxsjGeNh7K/agfBrGq+ATljjDXOS33Ntf4w2I1W +ot+MUVDiq3lcgT+0RE27x88b41ZV82iTZH/IIe1iDX4ao7V23nM+a39QNeaq +aeQxwWIrj7icsR0QbBdJbxM3wRi5uAvGojugL8xGsM/UBKeYk1faTvrC3Ypf +b+czTPCRVZevMNsbDCziv9tnmeCbCF7Xx0XeUP92SrDklAnyO7cfOnXMG0j5 +MUP7PBM0UOt1svf1hprzLaeuXDTBmiTd+0d5vaEk+xjTptYEaXfsZ78Fe0Fm +/Loz51+YYOQD9on9StvAx1IBTeRNUV/wfeX4gDss9fEJtRGm2EUQhaNt7lAS +Mj1ir2CKddyVre/Z7vDheEOij4op9i9/vaCS5Q5xnc51STqmKGbYvjIa3eGk +0yH5u9amuCn+2N25G27Q6N3/Wy/aFLvjcswKClxBJvJEg0aLKWaNrOtPknGG +nOVQ/axWU1QYUD808ccJuPOsOf8+NMWFak5V6DsnmLy96lpJpylK+Hyw4Fxz +gkauo+dFXlDvy3/2fAfTCXwKUhMX3puiuf7C0qodW+F8U5L+vTUszC9P0mDU +O8AGgb2crV4sfJfwPE6h0hYqLA4nz2xnYcCRHJZZli3oHM6xyPdjoc7XNX8l +xtqC0wy7fzCIhcsjwRrqW2zh+MD8j517WZgx8HWocdAGFstSzJPTWNipMGvn +JGIDwyb5L6qqWejiWOfUc84Kdu+vuGRXy8JutcM1/SlWsFBbHzLFZuE/tBG5 +b7utQIQx+F37Ngv/0ymbjTaxAgc+Odm/W1hY1XHML/qtJTT3Ve160c9CR4Mn +gfu1LcFe6K56wiAL6V/io/tlLGHQpnNBcoSFJ+FijP1qS5hr/JTh/4aF49vu +8ewbsQD1Uq0b/02y8Er6lbTm4xbQPGyWkP2ZWo+9lFFrrAXYi7mD5gwLE514 +PUf9LCD0xP5n8fMs1AuSOrxV1wLmWo4XSSyysFGoM6RC3gLSfxbubPzJQl5V +nph1AhawXu+a2o4lFpq+un4yZ94crkQ2zi8vszCLt66C/tYc/h/dqIlo + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07370416420193386}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07370416420193386}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8Vev3B3BRGZIyZObscwxJ5vngtJZ5zCxCpkKRMRENhttAJKGUBrNf +RZyzS2W4JUrIpQGZ0kDdriQKaZDf/v61X++/9n6etZ7PejY9ONothJuLi0t9 +BRfX/54LY50PFbMqtpT4LR/VCbfY0ndFMslsMB0CsjOZur10wA29wZKDeTC9 +aUxPoFcbElyuv+QZLIMp/qv80z1mIDwtkffjJQknTz9zedDjCq+bnaLnXraC +64BjuFZPEFgrTr6affkcNvi3LS49iYUfLw3Pzrx8BydfLQZBWxq0WfxfxbOy +b9DYvvKTlE8eyL5u+BCstgSEmvv8pw9FILY34DqvBQ+a/9cbPRJTCnna1k1O +nnxYxU7645NcCUPntVpm16/FCkcuM/FPVyGrIqWXW0oYL1ZeuLeGVQP2entE +NigI40rpFcfV7WqA76Gb50Z1YfyjkS1q61kDR8eVRhzMhLHATOxAWGQNHGJ0 +fyjYI4zXxTpVnC/XQFSJ5B/lRmEctHlk1vKrBlwvcdQcfEWQL5lolr55AyQK +xjPzL4ti0B3+bdZr6kByc/3RxSpRDE2+mjckVgfSrcdTdrBFMaLol1yofB3I +z2zav7FNFEvUl2QitOtAyTEmsOmjKBJ9VQWKXnWgu3LJYFxXDJmkdrJHaR04 +x4tP6HSJYd6ohouLJBtc1nwcK3whhjm8gZ03ZNngVtYw9HtUDLNPqw7x0tmw +7alfb/sXMTTPaWvkbGLDDrXyRp8NG/DRbE/SqDEbIiY0z6QHbqDKmpZ5yo8N +Jzzstjxf2IDbT2eD72U2SN/qkeZeIY6E97aLxaVsqBX1+K69RhwX5Xg/vK5k +w8Bzf/YZmjhWzhRZe9SyQdE1nuFqK44qhzxUBe+zoXVr8eqnF8SxtJujefc1 +G5as53v+MZXAK90cxWU5DuRWJVcvWUtgSPJYSwudA4qruTLUXSXQuuS7+REl +Djg+EjA7FSKBQbmmi1NqHCiyIG465kjgVMMJxgUTDhihQ+GT1xIosUnOS82b +A/uYpQGd6ZKokrBwkZXDAfsSoTmHbEl01dpRb3mGAwzeQxk9ZyXR0CmYaVvA +gad92zgvrkpi0zbfNMsiDmjECPKM9Uhi650+YZEqDnysSqz6Ki2FLfqbYcXf +HPATc/osc1MKg/4U+mp95IDuwaa0K81SWC5Y/fHhJAcE3qmI09ulkOxmjnt+ +5kBDHQ8oD0lhvUc8PfIrB8QdGnK1lqVwttniccxv6v1pinpWDtK4tNJivHsd +CZZffiZHjUujpGbgzJAuCUm2BaoPpqQx8Hzl6Kw+CbWl6sOiC9L48bRh0Goj +EiQ9ApkNfDJ4vH2PnpIpCVN3H33n0ZBBiU9+a4wtSchPz42/cEAGre6lP2hx +J6FjZJPiVJoM/s0d41XmScJvvbYXW7Jk0C6g9WSqFwmh/87rTFyWwe7Xy106 +viQYO/rOarTJoMuRxaaoYBLebVCOerhWFsMSF29axpAgEX1fTkJCFl3DKhxn +Yklw7PD+Zw8hi61PejLO7yPhdnKW2jpdWRzttfk8lkDlwuuZye3esrgpqTjO +4jAJOteawr6UyWLw9sanEZkkpJm6BkkbyeH6h/UyrGISbP2vfDU0l8P9WKV4 +oYQEodRPf3k6yuFCw2772VISLrUdq8oNlMORK/JfzlaQcNe+8dPqTDmMLSTZ +7GskzHgrJHwbksPmax031W6ScCc5hld4Qg5LpXaN2d8i4cilv89rTFNOctEO +qSdB8I1X0x5ueVwo2+iec4eEjWHZXG9U5VF/KuQS2USC//75k90H5XEubHje +oo0EpUJz2clj8rh8MIJH6eH/9v/0Dd5cebQa4bfmfkRC8u9NT80r5FH07eNI +TjsJZ//y39DQLY8d4Uv+7zpJ8KusrhoYkMfFgQq1yi4SGI8XDefeyON+zc0G +u56QwBbI99Gcl8fLg+5cL7tJ6D7zuLhSjoZj955mnu6l6ntTTLttIw0DeBWc +9Z6S4NMf1PpGm4a2r2K8+il/lPw9IWNNQ+e4cj3B5yTwlGip5kXRsI+LYbK1 +j4SuB4eb6g7Q8Nuu1Tp9lHPHuxz/SafhQLzjPq9+EuQ3hkTzFdJQS6F90G2A +6ofaC7eO3KehgIqqvdwg1a8ve5amO2jol9xzL4WyE9dKm4DnNGwtcVgeo7zT +LWoI3tOQv3b5Q/4QCVEHyxnsaRp22D89/R/lAxWDEcQiDY2Ub/CaDpNgfZCe +krqKQB/ZjrCXlJ+say43EiCw83iVKzFCgkvFto4ZIQKh59naUMq+/2QJB0kS +GJ3nzfWR8psgZQMpOQJbP/gYKY5S/bzQ4vOMTiC9/bvVDsoxtIVys80Ermvy +ev+I8vzN3I4fmgR+kOs4ME852XbzZ44egaaV6u/pr0jgevVIOJxJ4Nz3wM0O +lI/FBhowthDYnmHiGEtZYPUvn2FzAsmzhbYFlHOLzqbk2RB4YKML/RblDZpa +FfaOBM6sN3v5lHJRW1cHtyuBGdPWEZOUad4hnxs9CSxVgjGuMRIqppaF9/kQ +uHaCV1uMsmpakcHmAALDaam7FCnXbdD3Hd9J4LmCE0nalPWu96Zc3E2g1OM/ +MSaUG7eEV7hHEpjH9djBnDK8WNm5Jo5ACZdWAWvKD8OKP7clEHgz80Xt/2z3 +myly6CC1X1ZjRpaUe3L7DPRSCfR/035tC2UPpWjfqaMEPj4Qx21AeaiBP7Ui +k8D+mXYLVcr+ThUVfjlUvaauR8lQnni3pVMsn8Dcp6uO8lPekzj0ubuQwINt +94/OUeudXhMvcuwSgTuqH8SOUt5XImTIKiVQXGPe4QHlRb1rvvOVBGaxLcXK +KR/ptEi9cZ1AuW0Xn6RR5vEfqwipI3B5eSJuB+WMrwc65W4RWO0otMaAstAJ +0en+uwRi4cqzayhLsm0NrVsJ3LtFOP0GVd/LluO+f9oJNPm16t8kyoyhw6m3 +nxCos/+omQVlde6bncr9BDYEjA93U/1Ents6PTZE4Nel/5M5Rdlo80eRwjEC +992852lP2dxDzo/3I4GT5WRDE9Wvjz/eSb0/RWBXe9L7aMqOh90qE2cJzOkN +FaJT9qo6Mf3vTwL91HJ8k6n+37s4m9qxlo7h+cZ/+KjzYhwbKv5BhI49ikrX +L1H3KL7J4WoeSTomNub1q1GuHGkb2MKgY1X5Up05dR7H7p1VqzegI8GTcM6S +Or81hgKtz03o6FraH9T8gupn9hGvGaSjJ+/YbS3K4mVh6Zsd6Nhfu5ZnHZUH +zseYg6UBdOTaLGNbRuWJ/J8bkfd30dHS+fPRPz1UniUweF7toWPr+w5PL8oZ +u9doSMbT8X3fq7t/qDxqcXj1V04GHVdpJ19TpPJLRyRN8yCHjkr5+gE9VD5y +Zc0/PH+bjvQoqUNzrVR/8YT73G6iY2ZArLkE5Yh5t2Ozj+h4eWH+qVsL1f+D +iiNhw3QU3vpEpqyZ+t7ijuMePAz8ZShXXEbl9YQESzaOj4EK9et/5FN5TuZy +OKfXMvCt0V2RdJJaT3rRaJcEAzn8vSc92NT3huzVMVNjoGLjYv3zahJ+bF4/ +pu7JwKbRy0z9MhIWLkun6fowcNBeRukHNV/m1ikpMgMYqN9SvLKRmj/T35jh +lnsYCDK2lTqXqfnXtHPB5zADJUd4CpYLqfx0uCOUUcnAzGZ2IP8p6nxH+MO7 +eQbyBiyVf4gnofDV7nf//mQgQynwiQM1Dwuc9x37vMzAi/ZOYrXUvMzRzXiy +yK+Ani0V68OjSEj/xfFaJ6+AsUFmo/fDqP3JWhVjaq2APvz6/BPbSTCtrik5 +d04B59J+KEpR836EqC62uqiAAbfcCRtjqt7nrl2ZK1bAjEjn9jjqfnAnreqS +2zUFNE2WlWjTo+rjXXJeqFkB9TpuT9uok7BpVUHu8bcK6JfqkD0uR+13wMHU +BDVFLDlsaBmxxIFZEfvAba2KOIbDNTy3OTC4l/E0/LEiGkjQJuNucqCl/Sek +dCvixod7O16zqftccjXt6oAi2uY/iiKrOaD1TvD1j0lFFK/8kmtSyoEoTu+O +y6JK2HSAp2QsiwOTzp6+E7uUcP5CxsV9ARyYyA7cFserjK3fEjQMuThg9yXR +7r3BRizPlKUrUvfVqZ18+26lqKCtTr2a1rla6n9CgvtE6yZUYghq216qAZF/ +lHPYX1TRTLnwfm3tdZDNqHMxMFDDVUe/DgtkXYXzm5nrRcPUse42YeWRWQVd +0mb6385o4Iqr3b81CyvAWLY1V3NAEzc23Qn1zSgDIZ6y+KB0LWSO2bMc60pA +Po1mul1ZG+vv3t2lnXsZ+JX8brs91sbf1s5BzHVFoMGSqkvcoYO0BsFTEysL +IW5MpM2eSxctS7mLm3/lw5dv2Z5253UxXkLlSGToGbDRbC+yU9fD1XajgnZ6 +OXDvm8mv7z16eFCtzkOsKROi1HSGn4Xo4+D1rnNuq44Da3pX33Z+A6zYrvKS +mZwOVoqSW9eWGSDn1+lGJ/UUUEk9eaDV0BDNxYVKuVjJoBrCvK80bIj/7nVJ +dCneDyH3dh+9FWuE1/+clKPNxsJ05GSiVbwR1lzV7Qt7FwsH5PZGDCQYIV/+ +37WNL2Lh5KFot8WDRvjXLd6mI7djgW2cQJgeN8JPy+WlKYdi4fftv5rbiozw +eK2KbqBALOTVXZl73maEOG24cEA9Bu6X9O2a3cBEEb5E8be0SHjjSA9IkGTi +56heqau8kcD1I3L7L2kmFlUnm6V+2QvmrrxOqwgmuvZwDe28vxfaVxgbSqky +cWpNx8bvAXuhO7iY32wLE8m3IRbWFREwrBhemxvKxFMfu95ZM8Nh7uryd807 +TNQdjljxKi8MPmyzLslsYKLQz1STFalhMLjylO14ExMbPqXE6ESGQVOg9IVz +LUxc1+VZ12QTBumS+sZLnUwc9s/6e/dSKKzPCD/UNcrEzSgouDEiFNTC+rlC +uI0xHQT8VrqEwE6lav6irca4PrVk/jFrJyQ/8g9XdjHGcZM29xK1nZAbIvKE +dDPGpP7tP4/J7ITmyqTsJ17GaFu7iivpRzCIKduuWwoyxtDIRd6l+mBoV34v +FphgjNH8/v/t1w4GVRUaoVxsjGeNh7K/agfBrGq+ATljjDXOS33Ntf4w2I1W +ot+MUVDiq3lcgT+0RE27x88b41ZV82iTZH/IIe1iDX4ao7V23nM+a39QNeaq +aeQxwWIrj7icsR0QbBdJbxM3wRi5uAvGojugL8xGsM/UBKeYk1faTvrC3Ypf +b+czTPCRVZevMNsbDCziv9tnmeCbCF7Xx0XeUP92SrDklAnyO7cfOnXMG0j5 +MUP7PBM0UOt1svf1hprzLaeuXDTBmiTd+0d5vaEk+xjTptYEaXfsZ78Fe0Fm +/Loz51+YYOQD9on9StvAx1IBTeRNUV/wfeX4gDss9fEJtRGm2EUQhaNt7lAS +Mj1ir2CKddyVre/Z7vDheEOij4op9i9/vaCS5Q5xnc51STqmKGbYvjIa3eGk +0yH5u9amuCn+2N25G27Q6N3/Wy/aFLvjcswKClxBJvJEg0aLKWaNrOtPknGG +nOVQ/axWU1QYUD808ccJuPOsOf8+NMWFak5V6DsnmLy96lpJpylK+Hyw4Fxz +gkauo+dFXlDvy3/2fAfTCXwKUhMX3puiuf7C0qodW+F8U5L+vTUszC9P0mDU +O8AGgb2crV4sfJfwPE6h0hYqLA4nz2xnYcCRHJZZli3oHM6xyPdjoc7XNX8l +xtqC0wy7fzCIhcsjwRrqW2zh+MD8j517WZgx8HWocdAGFstSzJPTWNipMGvn +JGIDwyb5L6qqWejiWOfUc84Kdu+vuGRXy8JutcM1/SlWsFBbHzLFZuE/tBG5 +b7utQIQx+F37Ngv/0ymbjTaxAgc+Odm/W1hY1XHML/qtJTT3Ve160c9CR4Mn +gfu1LcFe6K56wiAL6V/io/tlLGHQpnNBcoSFJ+FijP1qS5hr/JTh/4aF49vu +8ewbsQD1Uq0b/02y8Er6lbTm4xbQPGyWkP2ZWo+9lFFrrAXYi7mD5gwLE514 +PUf9LCD0xP5n8fMs1AuSOrxV1wLmWo4XSSyysFGoM6RC3gLSfxbubPzJQl5V +nph1AhawXu+a2o4lFpq+un4yZ94crkQ2zi8vszCLt66C/tYc/h/dqIlo + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07370416420193386}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNXWfec2RBYZg/hfbCf/mjVpvddE6B8BocZi2Kk +9n+YBeVzOCR92/R2i+kiKF/AIfil+py7UcugfBGHxAc7vxecXAnlSzhIVLyz +jSlaA+XLOET+FWxj9F4H5Ss4iH8wOuwWuR7KV3KIeDitf8kSGF/FYbeTvE6y +M4yv5rBN91TOBE+Yfg2HvhI2t7hrMPO1HEzjdnnyMK2G8nUcAk6cu33jzQoo +X88hZDlzpP9amHsNHKoenmudGLcEyjd0yMpg3sAoCPOfkcON+Uee+22YD+Ub +O3h9/Mh5s3I2lG/iwHD0xCTLadOhfFMHdb935RpcU6B8M4dZ1R4/7t2Hhae5 +wx77e6vD1HqgfAuH4EmlFru82qF8S4d/6vXf+6SaoXwrB68kz52/ZeqhfGuH ++UU+Yt/lK6F8G4epc+sCxDVLoHxbh1mst2SDeAqgfDuHi+XbN7mkZ9oDABpO +hd4= + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.061803}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07370416420193386}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994357370921466*^9}, + CellLabel-> + "Out[211]=",ExpressionUUID->"dcce8ba9-eb9c-4436-a11a-e84908ccd17a"] +}, Open ]], Cell[CellGroupData[{ @@ -18708,18 +20081,75 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[212]:=",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7749957631735324`*^-155\\\", \ +RowBox[{\\\"552513857212233842570175958778312308519\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"78\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3361543354777600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 212, + 73, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943573709727507`*^9}, + CellLabel-> + "During evaluation of \ +In[212]:=",ExpressionUUID->"59801c17-c1dd-4e9e-8635-85c170cd82a4"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.811360538966727`*^-158\\\", \ +RowBox[{\\\"192330073695578600598678251250730514595\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"82\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1532417980825600000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 212, + 74, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943573709859447`*^9}, + CellLabel-> + "During evaluation of \ +In[212]:=",ExpressionUUID->"4ac5f2a6-b1ae-4edf-b3b3-24f04d707e99"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.183945820817468`*^-161\\\", \ +RowBox[{\\\"692388265304082962155241704502629852543\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"85\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6704730972160000000000000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 212, + 75, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357370993642*^9}, + CellLabel-> + "During evaluation of \ +In[212]:=",ExpressionUUID->"f0ce1932-217e-4219-bd85-5ed22156d939"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 212, 76, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357371001651*^9}, + CellLabel-> + "During evaluation of \ +In[212]:=",ExpressionUUID->"4ecfd86a-d49a-4708-a30d-0a8ee04ea3eb"], + +Cell[BoxData["10.2097469675184`"], "Output", + CellChangeTimes->{3.9943574429824543`*^9}, + CellLabel-> + "Out[212]=",ExpressionUUID->"ef8020dc-932a-4c9d-8906-0a093f3f7891"] }, Open ]], Cell[CellGroupData[{ @@ -18786,27 +20216,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850391956293*^9, - 3.9918503966918755`*^9}},ExpressionUUID->"a3e3d205-e3b4-874a-a36c-\ -53cfa72184b4"], + CellChangeTimes->{{3.991850391956293*^9, 3.9918503966918755`*^9}}, + CellLabel-> + "In[213]:=",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4268476583617296`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 213, + 77, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357443027446*^9}, + CellLabel-> + "During evaluation of \ +In[213]:=",ExpressionUUID->"557f4798-8c19-4bd5-bba1-6930e9ef4e9f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.7355052410342136`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 213, + 78, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357443036559*^9}, + CellLabel-> + "During evaluation of \ +In[213]:=",ExpressionUUID->"03d02e4b-4459-4ed5-95c6-fbde1758a4b9"], -Cell[BoxData["1.0713232818739324`"], "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.2444203695280446`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 213, + 79, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357443045871*^9}, + CellLabel-> + "During evaluation of \ +In[213]:=",ExpressionUUID->"942bf536-7262-487d-bdff-c656e421002e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 213, 80, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943574430548267`*^9}, + CellLabel-> + "During evaluation of \ +In[213]:=",ExpressionUUID->"eea7d010-7d21-4170-be5d-9d2cf9c4a0aa"], + +Cell[BoxData["0.5082539773276198`"], "Output", + CellChangeTimes->{3.9943574525377207`*^9}, + CellLabel-> + "Out[213]=",ExpressionUUID->"fa853b36-eaa4-453e-8ff6-2a13928026ef"] }, Open ]], Cell[CellGroupData[{ @@ -18827,8 +20305,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -18873,27 +20350,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504007528324`*^9, - 3.991850403970867*^9}},ExpressionUUID->"6977f025-454e-0e4a-b118-\ -07bad9ba3e82"], + CellChangeTimes->{{3.9918504007528324`*^9, 3.991850403970867*^9}}, + CellLabel-> + "In[214]:=",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566a849f-fc85-4d42-a545-a46d44cf7346"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4268476583617296`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 214, + 81, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943574525858107`*^9}, + CellLabel-> + "During evaluation of \ +In[214]:=",ExpressionUUID->"c6e7b77d-cf7c-4a90-bd99-520b19145e11"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.7355052410342136`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 214, + 82, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357452595644*^9}, + CellLabel-> + "During evaluation of \ +In[214]:=",ExpressionUUID->"16bec83e-6e4b-4f45-ab50-0d670c0537d4"], -Cell[BoxData["5.515504100347031`"], "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.2444203695280446`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 214, + 83, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943574526036043`*^9}, + CellLabel-> + "During evaluation of \ +In[214]:=",ExpressionUUID->"b96b1d50-6892-4eba-bd1e-2cc4363fd566"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 214, 84, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357452612359*^9}, + CellLabel-> + "During evaluation of \ +In[214]:=",ExpressionUUID->"072e6ff9-bbf5-49b3-ab36-666fccb3f9a3"], + +Cell[BoxData["29.065968791865807`"], "Output", + CellChangeTimes->{3.994357461930583*^9}, + CellLabel-> + "Out[214]=",ExpressionUUID->"09b9cc27-e1c6-4412-b8ee-9b0430ec1853"] }, Open ]], Cell[CellGroupData[{ @@ -18914,8 +20439,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -18960,27 +20484,75 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504078476295`*^9, - 3.9918504110344543`*^9}},ExpressionUUID->"df8ecb01-788a-604d-b773-\ -f29bb610eb30"], + CellChangeTimes->{{3.9918504078476295`*^9, 3.9918504110344543`*^9}}, + CellLabel-> + "In[215]:=",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4268476583617296`*^-203\\\", \ +RowBox[{\\\"365000401101666289871540890002851771561\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"27\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"6615764066213134598144000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 215, + 85, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943574619711227`*^9}, + CellLabel-> + "During evaluation of \ +In[215]:=",ExpressionUUID->"31becd4e-79a3-4d53-b2cd-e701de2214a1"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.7355052410342136`*^-208\\\", \ +RowBox[{\\\"706640776532825937191303163045521029742\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"30\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8119232188628582006784000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 215, + 86, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943574619800797`*^9}, + CellLabel-> + "During evaluation of \ +In[215]:=",ExpressionUUID->"8f32c805-eef6-41a0-9001-ab8038039e4a"], -Cell[BoxData["17.107550304528036`"], "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.2444203695280446`*^-213\\\", \ +RowBox[{\\\"143094757247897252281238890516718008522\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"34\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1445181972878563737600000000000000000000\\\"}]]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 215, + 87, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994357461989256*^9}, + CellLabel-> + "During evaluation of \ +In[215]:=",ExpressionUUID->"d0784183-8422-497a-a689-75301f58a0d7"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 215, 88, 31388289468224403530, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99435746199813*^9}, + CellLabel-> + "During evaluation of \ +In[215]:=",ExpressionUUID->"0a08bb2f-8e66-471b-93cc-7f77002648d3"], + +Cell[BoxData["4.4480002927339015`"], "Output", + CellChangeTimes->{3.994357469043231*^9}, + CellLabel-> + "Out[215]=",ExpressionUUID->"d4310ab0-a9e9-49a5-b66d-b71d714a0f5e"] }, Open ]], Cell[CellGroupData[{ @@ -18989,21 +20561,25 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918504490520267`*^9, - 3.991850453720993*^9}},ExpressionUUID->"54a5e329-20bd-e742-afe8-\ -d2cfa007cfcf"], + CellChangeTimes->{{3.9918504490520267`*^9, 3.991850453720993*^9}}, + CellLabel-> + "In[216]:=",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[BoxData["0.11028946354837708`"], "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[BoxData["0.0446998412598381`"], "Output", + CellChangeTimes->{3.994357469089747*^9}, + CellLabel-> + "Out[216]=",ExpressionUUID->"56a2c805-284c-49e7-a371-337bb3dc5fcf"] }, Open ]], Cell[BoxData[ RowBox[{"NotebookSave", "[", "]"}]], "Input", - CellChangeTimes->{{3.994235690673896*^9, - 3.994235696103387*^9}},ExpressionUUID->"5860aea8-afeb-4d17-a86c-\ -19f24e0a5bcc"] + CellChangeTimes->{{3.994235690673896*^9, 3.994235696103387*^9}}, + CellLabel-> + "In[217]:=",ExpressionUUID->"5860aea8-afeb-4d17-a86c-19f24e0a5bcc"] }, -WindowSize->{714, 288}, -WindowMargins->{{Automatic, 3}, {3, Automatic}}, +Evaluator->"Local", +WindowSize->{714, 141}, +WindowMargins->{{Automatic, 3}, {Automatic, 15}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -19021,869 +20597,898 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 453, 8, 36, "Input",ExpressionUUID->"81b527e9-1a4a-4a72-b90f-3535b7c3d89c"], -Cell[1032, 32, 302, 6, 41, "Output",ExpressionUUID->"07f0787f-581a-4439-9d6d-37f725e93a51"] +Cell[576, 22, 448, 7, 36, "Input",ExpressionUUID->"81b527e9-1a4a-4a72-b90f-3535b7c3d89c"], +Cell[1027, 31, 343, 5, 41, "Output",ExpressionUUID->"ebb6d2d1-c5f1-4848-8545-e642d655304d"] }, Open ]], Cell[CellGroupData[{ -Cell[1371, 43, 255, 5, 36, "Input",ExpressionUUID->"134c5a5b-fb7e-4fc8-b759-5838444ed063"], -Cell[1629, 50, 305, 6, 41, "Output",ExpressionUUID->"c39f08c8-842b-409d-83a7-ee4f988a36de"] +Cell[1407, 41, 250, 4, 36, "Input",ExpressionUUID->"134c5a5b-fb7e-4fc8-b759-5838444ed063"], +Cell[1660, 47, 344, 5, 41, "Output",ExpressionUUID->"b0c6a54a-b0ce-4b45-822b-4eda2e6d3153"] }, Open ]], Cell[CellGroupData[{ -Cell[1971, 61, 226, 5, 36, "Input",ExpressionUUID->"b43c51b8-3564-4e75-973a-9cc22cbf1ac4"], -Cell[2200, 68, 300, 6, 41, "Output",ExpressionUUID->"fbf78345-d43f-497e-9785-8d0970ea6f6b"] +Cell[2041, 57, 221, 4, 36, "Input",ExpressionUUID->"b43c51b8-3564-4e75-973a-9cc22cbf1ac4"], +Cell[2265, 63, 339, 5, 41, "Output",ExpressionUUID->"e154f047-0299-446c-860d-5884f04da558"] }, Open ]], Cell[CellGroupData[{ -Cell[2537, 79, 180, 4, 36, "Input",ExpressionUUID->"5797654b-52b1-44d0-a8d9-179c3e288f61"], -Cell[2720, 85, 303, 6, 41, "Output",ExpressionUUID->"6cbad377-4ab0-4ccc-9211-9dd75f8afb60"] +Cell[2641, 73, 175, 3, 36, "Input",ExpressionUUID->"5797654b-52b1-44d0-a8d9-179c3e288f61"], +Cell[2819, 78, 342, 5, 41, "Output",ExpressionUUID->"3f12a846-9212-4d0b-a71f-bd7884a7ae46"] }, Open ]], Cell[CellGroupData[{ -Cell[3060, 96, 262, 8, 54, "Input",ExpressionUUID->"55247566-8120-4655-a71a-f0839cd707d9"], -Cell[3325, 106, 317, 6, 41, "Output",ExpressionUUID->"442e9716-3d2a-4108-9a0f-d1ac5ab6c9ee"] +Cell[3198, 88, 257, 7, 54, "Input",ExpressionUUID->"55247566-8120-4655-a71a-f0839cd707d9"], +Cell[3458, 97, 356, 5, 41, "Output",ExpressionUUID->"86c8b19c-f491-4e51-adb1-9b1af86c2d41"] }, Open ]], Cell[CellGroupData[{ -Cell[3679, 117, 136, 3, 36, "Input",ExpressionUUID->"9be26ed7-edeb-4da5-a549-86a2c4581309"], -Cell[3818, 122, 309, 6, 41, "Output",ExpressionUUID->"5b996026-7e1d-495a-b544-8cb3b0822826"] +Cell[3851, 107, 131, 2, 36, "Input",ExpressionUUID->"9be26ed7-edeb-4da5-a549-86a2c4581309"], +Cell[3985, 111, 347, 5, 41, "Output",ExpressionUUID->"0f3a791c-bfa6-4a09-8f5d-92a0d530aa8c"] }, Open ]], Cell[CellGroupData[{ -Cell[4164, 133, 281, 7, 36, "Input",ExpressionUUID->"4cbcc918-98e8-460e-9080-638d3804e3f5"], -Cell[4448, 142, 321, 6, 41, "Output",ExpressionUUID->"0efc00a8-ae19-42aa-996a-3bef55caec17"] +Cell[4369, 121, 276, 6, 36, "Input",ExpressionUUID->"4cbcc918-98e8-460e-9080-638d3804e3f5"], +Cell[4648, 129, 360, 5, 41, "Output",ExpressionUUID->"38772d95-6859-44b3-986c-30891b424c88"] }, Open ]], Cell[CellGroupData[{ -Cell[4806, 153, 262, 8, 36, "Input",ExpressionUUID->"22ff34f5-3764-46f1-b790-637cf5aaf7d0"], -Cell[5071, 163, 320, 6, 41, "Output",ExpressionUUID->"2b733097-549c-4317-85bc-0cf633ba2f8e"] +Cell[5045, 139, 257, 7, 36, "Input",ExpressionUUID->"22ff34f5-3764-46f1-b790-637cf5aaf7d0"], +Cell[5305, 148, 359, 5, 41, "Output",ExpressionUUID->"6b321be3-e1c2-4d44-8196-f97d10a007f8"] }, Open ]], Cell[CellGroupData[{ -Cell[5428, 174, 208, 4, 36, "Input",ExpressionUUID->"6834db87-b122-4ba9-8997-2a6808e2a7fa"], -Cell[5639, 180, 288, 5, 41, "Output",ExpressionUUID->"f308de37-a60d-4d54-ba06-dd2efcdbc402"] +Cell[5701, 158, 203, 3, 36, "Input",ExpressionUUID->"6834db87-b122-4ba9-8997-2a6808e2a7fa"], +Cell[5907, 163, 330, 5, 41, "Output",ExpressionUUID->"cc693a85-48d7-40f3-8f7e-b9ba3bea383e"] }, Open ]], Cell[CellGroupData[{ -Cell[5964, 190, 210, 4, 36, "Input",ExpressionUUID->"78c225f3-4236-4030-be10-19a9eb0e8500"], -Cell[6177, 196, 288, 5, 41, "Output",ExpressionUUID->"31a6958c-ca23-41dd-87c2-450329edba5d"] +Cell[6274, 173, 206, 3, 36, "Input",ExpressionUUID->"78c225f3-4236-4030-be10-19a9eb0e8500"], +Cell[6483, 178, 332, 5, 41, "Output",ExpressionUUID->"0c37fc4a-606b-412c-9387-51d1bd415b27"] }, Open ]], Cell[CellGroupData[{ -Cell[6502, 206, 133, 3, 40, "Input",ExpressionUUID->"c954b44c-22ac-4023-bfd3-2d72e9cda875"], -Cell[6638, 211, 300, 6, 45, "Output",ExpressionUUID->"d3894bce-5251-446d-9675-10f0ffe5230f"] +Cell[6852, 188, 129, 2, 36, "Input",ExpressionUUID->"c954b44c-22ac-4023-bfd3-2d72e9cda875"], +Cell[6984, 192, 340, 5, 41, "Output",ExpressionUUID->"2fb0f300-47bc-4227-a1d9-f768f0f482f9"] }, Open ]], Cell[CellGroupData[{ -Cell[6975, 222, 133, 3, 40, "Input",ExpressionUUID->"3f3cd860-e5a5-4f15-a7ef-da034b5da88b"], -Cell[7111, 227, 301, 6, 45, "Output",ExpressionUUID->"0d32f0e0-50c7-4b58-8e3b-bb7c495b5d3c"] +Cell[7361, 202, 129, 2, 36, "Input",ExpressionUUID->"3f3cd860-e5a5-4f15-a7ef-da034b5da88b"], +Cell[7493, 206, 343, 5, 41, "Output",ExpressionUUID->"9dd0594c-8fce-481a-8af2-c5c2465af648"] }, Open ]], Cell[CellGroupData[{ -Cell[7449, 238, 561, 20, 109, "Input",ExpressionUUID->"4ae63ea4-9ceb-446d-85b8-3f2529094ea8"], -Cell[8013, 260, 320, 6, 45, "Output",ExpressionUUID->"f931dc3a-cc55-4dd2-bc48-1dda79a3bded"] +Cell[7873, 216, 557, 19, 100, "Input",ExpressionUUID->"4ae63ea4-9ceb-446d-85b8-3f2529094ea8"], +Cell[8433, 237, 364, 5, 41, "Output",ExpressionUUID->"e49bbfab-0b8c-4e2a-8985-91cedb3150c9"] }, Open ]], Cell[CellGroupData[{ -Cell[8370, 271, 561, 20, 109, "Input",ExpressionUUID->"07a2d665-3e57-46fe-a011-636961fd623b"], -Cell[8934, 293, 317, 6, 45, "Output",ExpressionUUID->"c6ee6a11-2260-4ea7-98e1-b4922dd7d924"] +Cell[8834, 247, 557, 19, 100, "Input",ExpressionUUID->"07a2d665-3e57-46fe-a011-636961fd623b"], +Cell[9394, 268, 357, 5, 41, "Output",ExpressionUUID->"acf334b9-bc87-4f43-933a-9f0aea25a225"] }, Open ]], Cell[CellGroupData[{ -Cell[9288, 304, 1592, 51, 188, "Input",ExpressionUUID->"a1b528f2-606b-46cc-ab92-6f748f78f2ad"], -Cell[10883, 357, 317, 6, 45, "Output",ExpressionUUID->"2b5198b1-074d-4859-b5c7-4baae7a5ff32"] +Cell[9788, 278, 1588, 50, 103, "Input",ExpressionUUID->"a1b528f2-606b-46cc-ab92-6f748f78f2ad"], +Cell[11379, 330, 359, 5, 41, "Output",ExpressionUUID->"67f38f09-fb54-4276-be32-e21fba5706e2"] }, Open ]], Cell[CellGroupData[{ -Cell[11237, 368, 1426, 47, 155, "Input",ExpressionUUID->"0be2b1e0-cb10-4a08-ab94-bf55fd089016"], -Cell[12666, 417, 334, 7, 45, "Output",ExpressionUUID->"c78eec67-2fc1-4d16-a49e-c1de3d508601"] +Cell[11775, 340, 1422, 46, 73, "Input",ExpressionUUID->"0be2b1e0-cb10-4a08-ab94-bf55fd089016"], +Cell[13200, 388, 374, 6, 41, "Output",ExpressionUUID->"11c6615a-b7b1-49ad-b44f-fe1ae2395a03"] }, Open ]], Cell[CellGroupData[{ -Cell[13037, 429, 1426, 47, 155, "Input",ExpressionUUID->"98c397be-c84e-4e6d-b795-6b135f8bf1f7"], -Cell[14466, 478, 341, 7, 45, "Output",ExpressionUUID->"6812a211-e1c4-478a-ab97-09a4444900b3"] +Cell[13611, 399, 1422, 46, 73, "Input",ExpressionUUID->"98c397be-c84e-4e6d-b795-6b135f8bf1f7"], +Cell[15036, 447, 381, 6, 41, "Output",ExpressionUUID->"39d552d3-df35-484d-abcf-ee3832d5974b"] }, Open ]], Cell[CellGroupData[{ -Cell[14844, 490, 1496, 49, 111, "Input",ExpressionUUID->"bc2e9ecb-9f98-4a9d-a794-eed238079895"], -Cell[16343, 541, 318, 6, 45, "Output",ExpressionUUID->"8b8c9dcd-123b-40ff-a496-360706c20e12"] +Cell[15454, 458, 1492, 48, 101, "Input",ExpressionUUID->"bc2e9ecb-9f98-4a9d-a794-eed238079895"], +Cell[16949, 508, 360, 5, 41, "Output",ExpressionUUID->"e326e252-3850-4600-9ba4-56381220ead2"] }, Open ]], Cell[CellGroupData[{ -Cell[16698, 552, 135, 3, 40, "Input",ExpressionUUID->"10ca4ab8-d4d1-4e93-96ba-6d736cbe4e69"], -Cell[16836, 557, 302, 6, 45, "Output",ExpressionUUID->"0d0b47ad-7c92-4ad7-8075-47b9bcb98d7b"] +Cell[17346, 518, 131, 2, 36, "Input",ExpressionUUID->"10ca4ab8-d4d1-4e93-96ba-6d736cbe4e69"], +Cell[17480, 522, 346, 5, 41, "Output",ExpressionUUID->"cda9e7ac-f3df-4442-bee6-79d66d62d268"] }, Open ]], Cell[CellGroupData[{ -Cell[17175, 568, 137, 3, 40, "Input",ExpressionUUID->"7e0d93aa-f871-45de-8331-4f903699483e"], -Cell[17315, 573, 303, 6, 45, "Output",ExpressionUUID->"59f9bf8b-cd38-4c14-b4df-237c8dbd073c"] +Cell[17863, 532, 133, 2, 36, "Input",ExpressionUUID->"7e0d93aa-f871-45de-8331-4f903699483e"], +Cell[17999, 536, 345, 5, 41, "Output",ExpressionUUID->"3ffceaa4-0aaa-4a62-88d1-31ad5ead4f32"] }, Open ]], Cell[CellGroupData[{ -Cell[17655, 584, 138, 3, 40, "Input",ExpressionUUID->"aa33af73-769e-4a25-b7cf-91f1615de0b8"], -Cell[17796, 589, 304, 6, 45, "Output",ExpressionUUID->"eb6413cf-902a-44a2-bb52-7931a4cb1a88"] +Cell[18381, 546, 134, 2, 36, "Input",ExpressionUUID->"aa33af73-769e-4a25-b7cf-91f1615de0b8"], +Cell[18518, 550, 344, 5, 41, "Output",ExpressionUUID->"cd45e1f6-cbba-453a-bed3-97912f06cebe"] }, Open ]], Cell[CellGroupData[{ -Cell[18137, 600, 223, 5, 40, "Input",ExpressionUUID->"d55f4443-2ba8-4c0a-96a1-424b50e81576"], -Cell[18363, 607, 321, 7, 45, "Output",ExpressionUUID->"f7a3dcc3-f3d3-415d-88e8-bf068b3fcd03"] +Cell[18899, 560, 219, 4, 36, "Input",ExpressionUUID->"d55f4443-2ba8-4c0a-96a1-424b50e81576"], +Cell[19121, 566, 361, 6, 41, "Output",ExpressionUUID->"efe55710-4429-4ea6-8746-98f66fb20d85"] }, Open ]], Cell[CellGroupData[{ -Cell[18721, 619, 138, 3, 40, "Input",ExpressionUUID->"52ae6f0b-9fef-418d-b34f-d0156c471818"], -Cell[18862, 624, 303, 6, 45, "Output",ExpressionUUID->"44896276-b91a-483b-aacd-639012eb5a03"] +Cell[19519, 577, 134, 2, 36, "Input",ExpressionUUID->"52ae6f0b-9fef-418d-b34f-d0156c471818"], +Cell[19656, 581, 345, 5, 41, "Output",ExpressionUUID->"487b8ef1-c26c-4ade-b3ef-58b82c314979"] }, Open ]], Cell[CellGroupData[{ -Cell[19202, 635, 326, 6, 40, "Input",ExpressionUUID->"0f22a465-82d4-444b-a05c-243d880f3c9c"], -Cell[19531, 643, 303, 6, 45, "Output",ExpressionUUID->"f7ceba86-6ad8-40a3-9e7c-fa74a2e46f89"] +Cell[20038, 591, 322, 5, 36, "Input",ExpressionUUID->"0f22a465-82d4-444b-a05c-243d880f3c9c"], +Cell[20363, 598, 342, 5, 41, "Output",ExpressionUUID->"690c2146-371d-4649-aed6-8a4e7b9cb729"] }, Open ]], Cell[CellGroupData[{ -Cell[19871, 654, 302, 6, 40, "Input",ExpressionUUID->"674f5b65-3f95-499c-ae0e-149d7ff5bbea"], -Cell[20176, 662, 302, 6, 45, "Output",ExpressionUUID->"d2a06cb7-d102-4bee-b038-393092cf6ff7"] +Cell[20742, 608, 298, 5, 36, "Input",ExpressionUUID->"674f5b65-3f95-499c-ae0e-149d7ff5bbea"], +Cell[21043, 615, 343, 5, 41, "Output",ExpressionUUID->"5190012b-8874-4f37-8ac9-ee23b140c1af"] }, Open ]], Cell[CellGroupData[{ -Cell[20515, 673, 223, 5, 40, "Input",ExpressionUUID->"419fa898-845d-4e55-b445-f18a32d77680"], -Cell[20741, 680, 303, 6, 45, "Output",ExpressionUUID->"fdb2a482-89e7-4e1c-ba40-14f45a3ea955"] +Cell[21423, 625, 219, 4, 36, "Input",ExpressionUUID->"419fa898-845d-4e55-b445-f18a32d77680"], +Cell[21645, 631, 342, 5, 41, "Output",ExpressionUUID->"f8d945fa-2656-41c8-81a8-eceae35072d9"] }, Open ]], Cell[CellGroupData[{ -Cell[21081, 691, 354, 11, 59, "Input",ExpressionUUID->"ba616683-0f1c-4d79-a9fe-9e7bb0668997"], -Cell[21438, 704, 320, 6, 45, "Output",ExpressionUUID->"90712c98-beeb-4a8a-a41c-11095ade9b01"] +Cell[22024, 641, 350, 10, 54, "Input",ExpressionUUID->"ba616683-0f1c-4d79-a9fe-9e7bb0668997"], +Cell[22377, 653, 364, 5, 41, "Output",ExpressionUUID->"ff446f56-7470-4498-9b59-01509bee8776"] }, Open ]], Cell[CellGroupData[{ -Cell[21795, 715, 354, 11, 59, "Input",ExpressionUUID->"a585b481-0438-4e38-a5db-e58c3f347d51"], -Cell[22152, 728, 341, 7, 45, "Output",ExpressionUUID->"56ad2987-614e-4ac2-b3f5-f9ab5b085e41"] +Cell[22778, 663, 350, 10, 54, "Input",ExpressionUUID->"a585b481-0438-4e38-a5db-e58c3f347d51"], +Cell[23131, 675, 381, 6, 41, "Output",ExpressionUUID->"fa13a3d5-78ec-41bd-a3be-7bd02e5fe94d"] }, Open ]], Cell[CellGroupData[{ -Cell[22530, 740, 998, 27, 60, "Input",ExpressionUUID->"9df59fdf-3144-4ce6-ac26-b866533ca4bd"], -Cell[23531, 769, 321, 6, 45, "Output",ExpressionUUID->"78251514-3973-44e8-8212-9aff757fa46a"] +Cell[23549, 686, 994, 26, 55, "Input",ExpressionUUID->"9df59fdf-3144-4ce6-ac26-b866533ca4bd"], +Cell[24546, 714, 360, 5, 41, "Output",ExpressionUUID->"bbae0e40-4147-4242-a4a4-dfa67625f583"] }, Open ]], Cell[CellGroupData[{ -Cell[23889, 780, 203, 4, 40, "Input",ExpressionUUID->"c6804401-99e6-4312-84b8-003a58fc9e74"], -Cell[24095, 786, 301, 6, 45, "Output",ExpressionUUID->"2668198c-24b3-44fe-8bb5-23aee1d84d93"] +Cell[24943, 724, 199, 3, 36, "Input",ExpressionUUID->"c6804401-99e6-4312-84b8-003a58fc9e74"], +Cell[25145, 729, 342, 5, 41, "Output",ExpressionUUID->"a975d77e-98da-4872-b258-2fdfafc13b7f"] }, Open ]], Cell[CellGroupData[{ -Cell[24433, 797, 333, 6, 40, "Input",ExpressionUUID->"abb24b70-6e69-40b5-8e99-1e6fc0f229c6"], -Cell[24769, 805, 276, 5, 45, "Output",ExpressionUUID->"bb84bf09-67d5-4828-ae2e-9bf840698a86"] +Cell[25524, 739, 329, 5, 36, "Input",ExpressionUUID->"abb24b70-6e69-40b5-8e99-1e6fc0f229c6"], +Cell[25856, 746, 320, 5, 41, "Output",ExpressionUUID->"8930c349-c4d8-4954-ac53-30abde326047"] }, Open ]], -Cell[25060, 813, 177, 3, 40, "Input",ExpressionUUID->"2033be30-ce42-461b-9483-9d9fe4970881"], +Cell[26191, 754, 173, 2, 36, "Input",ExpressionUUID->"2033be30-ce42-461b-9483-9d9fe4970881"], Cell[CellGroupData[{ -Cell[25262, 820, 331, 6, 40, "Input",ExpressionUUID->"94550ac3-3438-49b5-b74e-e8d552b88948"], -Cell[25596, 828, 279, 5, 45, "Output",ExpressionUUID->"1df62af1-d286-4890-8f5d-30b72d2daff6"] +Cell[26389, 760, 327, 5, 36, "Input",ExpressionUUID->"94550ac3-3438-49b5-b74e-e8d552b88948"], +Cell[26719, 767, 323, 5, 41, "Output",ExpressionUUID->"0f7682cc-3f1d-41ed-bc76-6e014eb6954a"] }, Open ]], -Cell[25890, 836, 177, 3, 40, "Input",ExpressionUUID->"9e0c9678-3423-4776-87d8-a635992f4d12"], +Cell[27057, 775, 173, 2, 109, "Input",ExpressionUUID->"9e0c9678-3423-4776-87d8-a635992f4d12"], Cell[CellGroupData[{ -Cell[26092, 843, 334, 6, 40, "Input",ExpressionUUID->"51045f82-8d11-44c3-9364-24648a013a2e"], -Cell[26429, 851, 276, 5, 45, "Output",ExpressionUUID->"44f95c9b-18e3-48a0-b3db-0568974168ad"] +Cell[27255, 781, 330, 5, 36, "Input",ExpressionUUID->"51045f82-8d11-44c3-9364-24648a013a2e"], +Cell[27588, 788, 322, 5, 41, "Output",ExpressionUUID->"3e37c264-95cb-4854-be4b-414837fdbf2e"] }, Open ]], -Cell[26720, 859, 177, 3, 40, "Input",ExpressionUUID->"0eb0248c-9222-4513-961b-455d0864b215"], +Cell[27925, 796, 173, 2, 109, "Input",ExpressionUUID->"0eb0248c-9222-4513-961b-455d0864b215"], Cell[CellGroupData[{ -Cell[26922, 866, 358, 6, 40, "Input",ExpressionUUID->"e2d3a0dc-7fed-48de-b89a-2c0157c5fbb3"], -Cell[27283, 874, 278, 5, 45, "Output",ExpressionUUID->"7ff7b5a3-6281-40ae-a27a-2e8606d239c8"] +Cell[28123, 802, 354, 5, 36, "Input",ExpressionUUID->"e2d3a0dc-7fed-48de-b89a-2c0157c5fbb3"], +Cell[28480, 809, 324, 5, 41, "Output",ExpressionUUID->"bb4db495-887f-44d3-86f9-beeeffe39a5d"] }, Open ]], -Cell[27576, 882, 175, 3, 40, "Input",ExpressionUUID->"5ff06203-ae66-4fd9-9d55-92540c3e7ba7"], +Cell[28819, 817, 171, 2, 109, "Input",ExpressionUUID->"5ff06203-ae66-4fd9-9d55-92540c3e7ba7"], Cell[CellGroupData[{ -Cell[27776, 889, 307, 6, 40, "Input",ExpressionUUID->"78d24afd-74f6-40f2-a8d0-785bc780349c"], -Cell[28086, 897, 278, 5, 45, "Output",ExpressionUUID->"529bdeb2-c753-42f1-9090-88df1be4716b"] +Cell[29015, 823, 303, 5, 36, "Input",ExpressionUUID->"78d24afd-74f6-40f2-a8d0-785bc780349c"], +Cell[29321, 830, 321, 5, 41, "Output",ExpressionUUID->"74eb0fa1-0703-4a48-8daf-b26641eeaf6f"] }, Open ]], -Cell[28379, 905, 175, 3, 40, "Input",ExpressionUUID->"f8eaba12-c009-4373-85c6-cc8eb648d821"], +Cell[29657, 838, 171, 2, 109, "Input",ExpressionUUID->"f8eaba12-c009-4373-85c6-cc8eb648d821"], Cell[CellGroupData[{ -Cell[28579, 912, 309, 6, 40, "Input",ExpressionUUID->"9a47dda6-f61c-467d-a2a7-1ad99c2ec831"], -Cell[28891, 920, 279, 5, 45, "Output",ExpressionUUID->"64e2d668-4442-49ad-b2da-b50a933e0d0c"] +Cell[29853, 844, 305, 5, 36, "Input",ExpressionUUID->"9a47dda6-f61c-467d-a2a7-1ad99c2ec831"], +Cell[30161, 851, 323, 5, 41, "Output",ExpressionUUID->"f2e7855d-2a86-4907-80c4-aa2cdcbd8c0a"] }, Open ]], -Cell[29185, 928, 177, 3, 40, "Input",ExpressionUUID->"4ce2f91d-123e-4fd5-9ad4-7c55cfd9f644"], +Cell[30499, 859, 173, 2, 109, "Input",ExpressionUUID->"4ce2f91d-123e-4fd5-9ad4-7c55cfd9f644"], Cell[CellGroupData[{ -Cell[29387, 935, 308, 6, 40, "Input",ExpressionUUID->"00b90950-380c-4ad7-bdb9-9b9016abdda2"], -Cell[29698, 943, 281, 5, 45, "Output",ExpressionUUID->"1bf8ef89-cb3f-48b2-ba4c-976d1a5b2dba"] +Cell[30697, 865, 304, 5, 36, "Input",ExpressionUUID->"00b90950-380c-4ad7-bdb9-9b9016abdda2"], +Cell[31004, 872, 325, 5, 41, "Output",ExpressionUUID->"07c1f823-c508-42e4-bcbb-7894d1bdf835"] }, Open ]], -Cell[29994, 951, 176, 3, 40, "Input",ExpressionUUID->"8f369104-d5c5-476d-8d7a-af83e1b30d17"], +Cell[31344, 880, 172, 2, 109, "Input",ExpressionUUID->"8f369104-d5c5-476d-8d7a-af83e1b30d17"], Cell[CellGroupData[{ -Cell[30195, 958, 279, 5, 40, "Input",ExpressionUUID->"f1ee930f-df89-4ccf-8a09-e2d7b3b8e0b5"], -Cell[30477, 965, 276, 5, 45, "Output",ExpressionUUID->"9d21e662-f4a0-440f-873e-7a28287ce341"] +Cell[31541, 886, 275, 4, 36, "Input",ExpressionUUID->"f1ee930f-df89-4ccf-8a09-e2d7b3b8e0b5"], +Cell[31819, 892, 319, 5, 41, "Output",ExpressionUUID->"64b48ce8-4ec0-4738-8c7b-0a38af2c3f81"] }, Open ]], -Cell[30768, 973, 179, 3, 40, "Input",ExpressionUUID->"86b52cef-b172-4954-b709-1f6c41e2feab"], +Cell[32153, 900, 175, 2, 109, "Input",ExpressionUUID->"86b52cef-b172-4954-b709-1f6c41e2feab"], Cell[CellGroupData[{ -Cell[30972, 980, 19813, 486, 1845, "Input",ExpressionUUID->"761aab7f-a618-4bb2-9981-34a333242c95"], -Cell[50788, 1468, 321, 6, 45, "Output",ExpressionUUID->"da1d140f-d2ea-4b89-a4a0-e015a1955f1b"] +Cell[32353, 906, 19809, 485, 3208, "Input",ExpressionUUID->"761aab7f-a618-4bb2-9981-34a333242c95"], +Cell[52165, 1393, 365, 5, 41, "Output",ExpressionUUID->"d07db094-5fa6-4e14-bcb6-26d444f735cb"] }, Open ]], Cell[CellGroupData[{ -Cell[51146, 1479, 19752, 490, 1859, "Input",ExpressionUUID->"4e5c5ac6-229a-4cbf-84e4-e21aa5975ed7"], -Cell[70901, 1971, 317, 6, 45, "Output",ExpressionUUID->"de40f40d-3522-4fa6-9672-aeed9d5cc67f"] +Cell[52567, 1403, 19748, 489, 3138, "Input",ExpressionUUID->"4e5c5ac6-229a-4cbf-84e4-e21aa5975ed7"], +Cell[72318, 1894, 356, 5, 41, "Output",ExpressionUUID->"91d3eced-055d-4da7-bf06-c8905f829b16"] }, Open ]], Cell[CellGroupData[{ -Cell[71255, 1982, 19752, 484, 1858, "Input",ExpressionUUID->"b6e1c50f-453f-4f08-9bb8-406c60c96df1"], -Cell[91010, 2468, 339, 7, 45, "Output",ExpressionUUID->"ccf5e2ec-b2de-4012-877b-25e7811a88c9"] +Cell[72711, 1904, 19748, 483, 3198, "Input",ExpressionUUID->"b6e1c50f-453f-4f08-9bb8-406c60c96df1"], +Cell[92462, 2389, 379, 6, 41, "Output",ExpressionUUID->"d1ad4db8-94b9-48e6-8ca0-465157e7bc9e"] }, Open ]], Cell[CellGroupData[{ -Cell[91386, 2480, 22538, 554, 2037, "Input",ExpressionUUID->"b1144424-b828-459f-9f8e-0fe461d33ea3"], -Cell[113927, 3036, 335, 7, 45, "Output",ExpressionUUID->"c840fd50-f566-4d91-963d-473db10d95e2"] +Cell[92878, 2400, 22534, 553, 3677, "Input",ExpressionUUID->"b1144424-b828-459f-9f8e-0fe461d33ea3"], +Cell[115415, 2955, 377, 6, 41, "Output",ExpressionUUID->"0f9862f5-61ea-4c9d-953b-2ec5442d8fe2"] }, Open ]], Cell[CellGroupData[{ -Cell[114299, 3048, 22539, 554, 2037, "Input",ExpressionUUID->"fadb9a7b-eff8-44cc-94cc-acd3f21ce013"], -Cell[136841, 3604, 340, 7, 45, "Output",ExpressionUUID->"b1f7ada8-b17f-4a15-9fa6-eec88e63a741"] +Cell[115829, 2966, 22535, 553, 3642, "Input",ExpressionUUID->"fadb9a7b-eff8-44cc-94cc-acd3f21ce013"], +Cell[138367, 3521, 384, 6, 41, "Output",ExpressionUUID->"f99ac96f-5120-4e7d-b36a-b09ba2cd2da9"] }, Open ]], Cell[CellGroupData[{ -Cell[137218, 3616, 25495, 627, 2246, "Input",ExpressionUUID->"356916c3-d654-4d58-8f12-2f430ab9b5c1"], -Cell[162716, 4245, 334, 7, 45, "Output",ExpressionUUID->"1e1312dd-9d34-4d8e-8720-893eac72717e"] +Cell[138788, 3532, 25491, 626, 4121, "Input",ExpressionUUID->"356916c3-d654-4d58-8f12-2f430ab9b5c1"], +Cell[164282, 4160, 376, 6, 41, "Output",ExpressionUUID->"9b76938f-4143-4f57-b185-429a80c0bbeb"] }, Open ]], Cell[CellGroupData[{ -Cell[163087, 4257, 134, 3, 40, "Input",ExpressionUUID->"6fdba6ea-9211-4186-ac47-3f23f522b52a"], -Cell[163224, 4262, 301, 6, 45, "Output",ExpressionUUID->"82a28b28-d91f-4f71-b960-99e442f4f8fe"] +Cell[164695, 4171, 130, 2, 36, "Input",ExpressionUUID->"6fdba6ea-9211-4186-ac47-3f23f522b52a"], +Cell[164828, 4175, 341, 5, 41, "Output",ExpressionUUID->"3006a4df-1b5f-45db-91ce-3ce508e19479"] }, Open ]], Cell[CellGroupData[{ -Cell[163562, 4273, 134, 3, 40, "Input",ExpressionUUID->"ee67e7d8-cb19-4690-bde5-ffd8c12d3af6"], -Cell[163699, 4278, 301, 6, 45, "Output",ExpressionUUID->"dba9ec90-7702-4c85-b569-3be6822db3f8"] +Cell[165206, 4185, 130, 2, 36, "Input",ExpressionUUID->"ee67e7d8-cb19-4690-bde5-ffd8c12d3af6"], +Cell[165339, 4189, 341, 5, 41, "Output",ExpressionUUID->"350d2122-eb03-41d1-a153-dfb4c1fdca01"] }, Open ]], Cell[CellGroupData[{ -Cell[164037, 4289, 1148, 40, 78, "Input",ExpressionUUID->"1182daf8-2f15-4198-b949-2c1fa7a543c4"], -Cell[165188, 4331, 320, 6, 45, "Output",ExpressionUUID->"a6a8d1ea-50f1-4283-aec3-45c24bf2786e"] +Cell[165717, 4199, 1144, 39, 144, "Input",ExpressionUUID->"1182daf8-2f15-4198-b949-2c1fa7a543c4"], +Cell[166864, 4240, 360, 5, 41, "Output",ExpressionUUID->"3af36eac-c7f0-4fd8-a0b6-fe671fb9fbc9"] }, Open ]], Cell[CellGroupData[{ -Cell[165545, 4342, 1045, 36, 78, "Input",ExpressionUUID->"0dcf7a55-ee33-4614-93c0-0e72222bcd7e"], -Cell[166593, 4380, 334, 7, 45, "Output",ExpressionUUID->"9fe7a3dc-e8ab-4b30-9548-af0c3094e4d6"] +Cell[167261, 4250, 1041, 35, 144, "Input",ExpressionUUID->"0dcf7a55-ee33-4614-93c0-0e72222bcd7e"], +Cell[168305, 4287, 374, 6, 41, "Output",ExpressionUUID->"8a9638cc-c447-4078-93fe-074f0b09f870"] }, Open ]], Cell[CellGroupData[{ -Cell[166964, 4392, 1148, 40, 78, "Input",ExpressionUUID->"6e83f30d-8cdb-4e1c-b8a7-c6cb26789aec"], -Cell[168115, 4434, 319, 6, 45, "Output",ExpressionUUID->"2705791c-d2d7-41cd-b9bf-7e8432fcebb5"] +Cell[168716, 4298, 1144, 39, 144, "Input",ExpressionUUID->"6e83f30d-8cdb-4e1c-b8a7-c6cb26789aec"], +Cell[169863, 4339, 361, 5, 41, "Output",ExpressionUUID->"bc4fb844-3efb-4555-bf50-7090706a0374"] }, Open ]], Cell[CellGroupData[{ -Cell[168471, 4445, 112, 2, 40, "Input",ExpressionUUID->"fc4e1618-32ec-4d47-ac59-d1e28e2df293"], -Cell[168586, 4449, 318, 6, 45, "Output",ExpressionUUID->"d985ee92-d209-4cd3-9974-9400d81a5bae"] +Cell[170261, 4349, 108, 1, 36, "Input",ExpressionUUID->"fc4e1618-32ec-4d47-ac59-d1e28e2df293"], +Cell[170372, 4352, 360, 5, 41, "Output",ExpressionUUID->"9b0a899b-326e-4d82-8c42-42933d3a82a5"] }, Open ]], Cell[CellGroupData[{ -Cell[168941, 4460, 112, 2, 40, "Input",ExpressionUUID->"e93313e8-eb83-4efd-aa32-92a2c370bcb9"], -Cell[169056, 4464, 312, 6, 45, "Output",ExpressionUUID->"7fbbb59d-d23e-4283-babb-b90ab7faf890"] +Cell[170769, 4362, 108, 1, 36, "Input",ExpressionUUID->"e93313e8-eb83-4efd-aa32-92a2c370bcb9"], +Cell[170880, 4365, 356, 6, 41, "Output",ExpressionUUID->"18a601c6-b837-4ad8-a14e-ea00e6ea2cbb"] }, Open ]], Cell[CellGroupData[{ -Cell[169405, 4475, 112, 2, 40, "Input",ExpressionUUID->"9aa8886b-58cf-4323-9df2-f08d91b7ab7f"], -Cell[169520, 4479, 306, 6, 45, "Output",ExpressionUUID->"ee0130eb-724e-4293-b231-76ec6c27d217"] +Cell[171273, 4376, 108, 1, 36, "Input",ExpressionUUID->"9aa8886b-58cf-4323-9df2-f08d91b7ab7f"], +Cell[171384, 4379, 350, 6, 41, "Output",ExpressionUUID->"887959fe-f47f-4208-8c9e-8df7db334798"] }, Open ]], Cell[CellGroupData[{ -Cell[169863, 4490, 112, 2, 40, "Input",ExpressionUUID->"bc4d44f9-6286-4fc7-87d7-4a141615ff3c"], -Cell[169978, 4494, 289, 5, 45, "Output",ExpressionUUID->"151187f2-ccbc-4db9-8cc1-5a2100e9a240"] +Cell[171771, 4390, 108, 1, 36, "Input",ExpressionUUID->"bc4d44f9-6286-4fc7-87d7-4a141615ff3c"], +Cell[171882, 4393, 335, 5, 41, "Output",ExpressionUUID->"2dc430b9-6a56-457a-8033-89bfecc7c740"] }, Open ]], Cell[CellGroupData[{ -Cell[170304, 4504, 111, 2, 40, "Input",ExpressionUUID->"67840883-954c-47c3-a8fa-8b687de69b62"], -Cell[170418, 4508, 291, 5, 45, "Output",ExpressionUUID->"a254d151-fb54-4db5-be28-93af222ff9db"] +Cell[172254, 4403, 107, 1, 36, "Input",ExpressionUUID->"67840883-954c-47c3-a8fa-8b687de69b62"], +Cell[172364, 4406, 337, 5, 41, "Output",ExpressionUUID->"326795ec-1f58-4d23-b5e5-8c171cc24e4a"] }, Open ]], Cell[CellGroupData[{ -Cell[170746, 4518, 111, 2, 40, "Input",ExpressionUUID->"a271cd04-ea38-4071-a67e-0c886d87f1e6"], -Cell[170860, 4522, 296, 5, 45, "Output",ExpressionUUID->"a6b2e7bd-0d99-4e97-9f96-93074b1b5d79"] +Cell[172738, 4416, 107, 1, 36, "Input",ExpressionUUID->"a271cd04-ea38-4071-a67e-0c886d87f1e6"], +Cell[172848, 4419, 342, 5, 41, "Output",ExpressionUUID->"2768c09d-fdf1-4a0f-abd6-759ea2658e36"] }, Open ]], Cell[CellGroupData[{ -Cell[171193, 4532, 501, 17, 77, "Input",ExpressionUUID->"b5662b85-47db-436d-a08e-10ba73aa5993"], -Cell[171697, 4551, 307, 6, 45, "Output",ExpressionUUID->"0df25805-9742-4d87-8e1b-eb2d12d70039"] +Cell[173227, 4429, 497, 16, 71, "Input",ExpressionUUID->"b5662b85-47db-436d-a08e-10ba73aa5993"], +Cell[173727, 4447, 351, 6, 41, "Output",ExpressionUUID->"a8714458-22f3-4da7-81f0-39a9f3e10f8b"] }, Open ]], Cell[CellGroupData[{ -Cell[172041, 4562, 501, 17, 77, "Input",ExpressionUUID->"87d968ec-8f4f-4bbe-9075-1707aa31c21b"], -Cell[172545, 4581, 310, 6, 41, "Output",ExpressionUUID->"3258c19d-d6b5-4df2-8018-8ba9e3741593"] +Cell[174115, 4458, 497, 16, 71, "Input",ExpressionUUID->"87d968ec-8f4f-4bbe-9075-1707aa31c21b"], +Cell[174615, 4476, 356, 6, 41, "Output",ExpressionUUID->"5a20de18-9c7d-4589-8f42-8f86e3230624"] }, Open ]], Cell[CellGroupData[{ -Cell[172892, 4592, 1792, 61, 142, "Input",ExpressionUUID->"78cd79c7-7ff2-46f3-8433-a0a081ea00c6"], -Cell[174687, 4655, 291, 5, 41, "Output",ExpressionUUID->"de79af3a-0e3f-4a69-bd57-148e6fec3b57"] +Cell[175008, 4487, 1788, 60, 340, "Input",ExpressionUUID->"78cd79c7-7ff2-46f3-8433-a0a081ea00c6"], +Cell[176799, 4549, 335, 5, 41, "Output",ExpressionUUID->"132aa7b5-a2a6-439a-a802-f7ba9a6ec4e6"] }, Open ]], Cell[CellGroupData[{ -Cell[175015, 4665, 1105, 37, 73, "Input",ExpressionUUID->"74094ace-1086-4ee6-b372-8a4db63634de"], -Cell[176123, 4704, 312, 6, 41, "Output",ExpressionUUID->"c5d0cf6a-eece-4f09-907a-80a09037fb8a"] +Cell[177171, 4559, 1101, 36, 174, "Input",ExpressionUUID->"74094ace-1086-4ee6-b372-8a4db63634de"], +Cell[178275, 4597, 356, 6, 41, "Output",ExpressionUUID->"57f236df-64cb-43b5-976e-c5c823f59ac2"] }, Open ]], Cell[CellGroupData[{ -Cell[176472, 4715, 1822, 62, 144, "Input",ExpressionUUID->"00b1c57a-c808-4661-90df-5cc2c8ce592a"], -Cell[178297, 4779, 292, 5, 41, "Output",ExpressionUUID->"cb6c1c8e-222a-440a-a063-bbff58d14ce9"] +Cell[178668, 4608, 1818, 61, 340, "Input",ExpressionUUID->"00b1c57a-c808-4661-90df-5cc2c8ce592a"], +Cell[180489, 4671, 336, 5, 41, "Output",ExpressionUUID->"3f9b702f-f992-43bb-bc16-8953eb154cda"] }, Open ]], Cell[CellGroupData[{ -Cell[178626, 4789, 1635, 54, 101, "Input",ExpressionUUID->"e4b898ef-b009-4105-ba8b-ae4d254c5c7b"], -Cell[180264, 4845, 291, 5, 41, "Output",ExpressionUUID->"a4427087-22ef-4b60-ac6b-e2bb7ca02b24"] +Cell[180862, 4681, 1631, 53, 208, "Input",ExpressionUUID->"e4b898ef-b009-4105-ba8b-ae4d254c5c7b"], +Cell[182496, 4736, 334, 5, 41, "Output",ExpressionUUID->"8cbb79a5-d21d-4144-88db-cc3e25c801de"] }, Open ]], Cell[CellGroupData[{ -Cell[180592, 4855, 1635, 54, 101, "Input",ExpressionUUID->"90d90135-22e2-4a5c-a5c7-a83223d75bfd"], -Cell[182230, 4911, 289, 5, 41, "Output",ExpressionUUID->"a1bc32c6-af80-4e29-b006-ef19da17b909"] +Cell[182867, 4746, 1631, 53, 208, "Input",ExpressionUUID->"90d90135-22e2-4a5c-a5c7-a83223d75bfd"], +Cell[184501, 4801, 333, 5, 41, "Output",ExpressionUUID->"b4e28596-e807-4358-a982-a06efb70b23f"] }, Open ]], Cell[CellGroupData[{ -Cell[182556, 4921, 453, 8, 36, "Input",ExpressionUUID->"b9510d34-a584-4a0b-98f3-c4e78b02c45f"], -Cell[183012, 4931, 302, 6, 41, "Output",ExpressionUUID->"82a356e3-ceb6-4f2d-8bb2-07b5492c64c8"] +Cell[184871, 4811, 449, 7, 36, "Input",ExpressionUUID->"b9510d34-a584-4a0b-98f3-c4e78b02c45f"], +Cell[185323, 4820, 342, 5, 41, "Output",ExpressionUUID->"b000abb6-3130-48dd-a7e7-47794f080393"] }, Open ]], Cell[CellGroupData[{ -Cell[183351, 4942, 255, 5, 36, "Input",ExpressionUUID->"526bbada-818a-43ae-a5e7-84d27538ffc1"], -Cell[183609, 4949, 305, 6, 41, "Output",ExpressionUUID->"fd0e3e99-c68d-4c0b-9f70-ba55d633f53f"] +Cell[185702, 4830, 251, 4, 36, "Input",ExpressionUUID->"526bbada-818a-43ae-a5e7-84d27538ffc1"], +Cell[185956, 4836, 345, 5, 41, "Output",ExpressionUUID->"b8b5b9e4-0ee1-445c-936e-ebc5ba3b5053"] }, Open ]], Cell[CellGroupData[{ -Cell[183951, 4960, 226, 5, 36, "Input",ExpressionUUID->"1f5d1f43-3157-43e3-8128-9a3651e366c5"], -Cell[184180, 4967, 300, 6, 41, "Output",ExpressionUUID->"15580006-1bcc-41dd-9936-18c1390c439b"] +Cell[186338, 4846, 222, 4, 36, "Input",ExpressionUUID->"1f5d1f43-3157-43e3-8128-9a3651e366c5"], +Cell[186563, 4852, 340, 5, 41, "Output",ExpressionUUID->"5c097751-e181-4392-9808-26f9a6aeae69"] }, Open ]], Cell[CellGroupData[{ -Cell[184517, 4978, 180, 4, 36, "Input",ExpressionUUID->"140ea6ab-fc56-4e96-967f-eba18f9f1627"], -Cell[184700, 4984, 303, 6, 41, "Output",ExpressionUUID->"a49001ba-3592-4437-93c7-87a59dc10ac7"] +Cell[186940, 4862, 176, 3, 36, "Input",ExpressionUUID->"140ea6ab-fc56-4e96-967f-eba18f9f1627"], +Cell[187119, 4867, 343, 5, 41, "Output",ExpressionUUID->"897dc51b-3269-4697-a8d0-807a9eaed3fd"] }, Open ]], Cell[CellGroupData[{ -Cell[185040, 4995, 262, 8, 54, "Input",ExpressionUUID->"f6dcb05c-ce3c-405c-9748-80831769e78f"], -Cell[185305, 5005, 317, 6, 41, "Output",ExpressionUUID->"454198c6-0b9c-4940-a189-c69e444d572a"] +Cell[187499, 4877, 258, 7, 54, "Input",ExpressionUUID->"f6dcb05c-ce3c-405c-9748-80831769e78f"], +Cell[187760, 4886, 361, 5, 41, "Output",ExpressionUUID->"46495c47-bbda-4057-bb94-98d987c791f2"] }, Open ]], Cell[CellGroupData[{ -Cell[185659, 5016, 136, 3, 36, "Input",ExpressionUUID->"da31ac4f-0f16-4a3f-bb1f-5fb7f12aaacd"], -Cell[185798, 5021, 309, 6, 41, "Output",ExpressionUUID->"8c8ed8b4-dd03-49a0-b047-a2b86cfeb51e"] +Cell[188158, 4896, 132, 2, 36, "Input",ExpressionUUID->"da31ac4f-0f16-4a3f-bb1f-5fb7f12aaacd"], +Cell[188293, 4900, 349, 5, 41, "Output",ExpressionUUID->"a6f9860b-2c5c-48ac-b64d-9097b3231035"] }, Open ]], Cell[CellGroupData[{ -Cell[186144, 5032, 281, 7, 36, "Input",ExpressionUUID->"838b680d-23ae-4346-ab5e-25fd8edfcf43"], -Cell[186428, 5041, 321, 6, 41, "Output",ExpressionUUID->"f5c57208-17e6-454a-a1b0-7d2f0d115c57"] +Cell[188679, 4910, 277, 6, 36, "Input",ExpressionUUID->"838b680d-23ae-4346-ab5e-25fd8edfcf43"], +Cell[188959, 4918, 363, 5, 41, "Output",ExpressionUUID->"f91afc1b-8f13-4443-ad16-9270116c770c"] }, Open ]], Cell[CellGroupData[{ -Cell[186786, 5052, 262, 8, 36, "Input",ExpressionUUID->"71d08f20-13be-480f-9ba8-0af2c0cc2b0a"], -Cell[187051, 5062, 320, 6, 41, "Output",ExpressionUUID->"596f584f-d888-4897-9072-2b4e85d7ba27"] +Cell[189359, 4928, 258, 7, 36, "Input",ExpressionUUID->"71d08f20-13be-480f-9ba8-0af2c0cc2b0a"], +Cell[189620, 4937, 360, 5, 41, "Output",ExpressionUUID->"c59f3201-0075-4515-adf6-3dfb335d20a1"] }, Open ]], Cell[CellGroupData[{ -Cell[187408, 5073, 208, 4, 36, "Input",ExpressionUUID->"c0484b17-a8d5-4f1b-8b99-5c87369acd5e"], -Cell[187619, 5079, 288, 5, 41, "Output",ExpressionUUID->"b013be95-433d-45a6-8a88-9b77e78145df"] +Cell[190017, 4947, 204, 3, 36, "Input",ExpressionUUID->"c0484b17-a8d5-4f1b-8b99-5c87369acd5e"], +Cell[190224, 4952, 334, 5, 41, "Output",ExpressionUUID->"1533dd56-a3fc-4e94-afaf-dc5d7449639f"] }, Open ]], Cell[CellGroupData[{ -Cell[187944, 5089, 210, 4, 36, "Input",ExpressionUUID->"bebc8e35-625c-4bfc-9677-12518aef7afb"], -Cell[188157, 5095, 288, 5, 41, "Output",ExpressionUUID->"5c11af60-9064-4c81-8d15-34cf1ff9ae60"] +Cell[190595, 4962, 206, 3, 36, "Input",ExpressionUUID->"bebc8e35-625c-4bfc-9677-12518aef7afb"], +Cell[190804, 4967, 332, 5, 41, "Output",ExpressionUUID->"9b4eea08-43bc-42ee-8937-3c79fb7ecd1e"] }, Open ]], Cell[CellGroupData[{ -Cell[188482, 5105, 133, 3, 36, "Input",ExpressionUUID->"ba4e6e50-3572-45a0-b010-d5c4dfcdd337"], -Cell[188618, 5110, 300, 6, 41, "Output",ExpressionUUID->"ac5acdb4-1361-4fde-aa37-2ecc78c4469b"] +Cell[191173, 4977, 129, 2, 36, "Input",ExpressionUUID->"ba4e6e50-3572-45a0-b010-d5c4dfcdd337"], +Cell[191305, 4981, 340, 5, 41, "Output",ExpressionUUID->"c7ed64d3-1701-417e-8d59-1b264ef48d5c"] }, Open ]], Cell[CellGroupData[{ -Cell[188955, 5121, 133, 3, 36, "Input",ExpressionUUID->"8bac60d8-5432-4304-a48b-bc40990756f8"], -Cell[189091, 5126, 301, 6, 41, "Output",ExpressionUUID->"282ce56f-f060-4c3e-bf5b-ed20d5434266"] +Cell[191682, 4991, 129, 2, 36, "Input",ExpressionUUID->"8bac60d8-5432-4304-a48b-bc40990756f8"], +Cell[191814, 4995, 343, 5, 41, "Output",ExpressionUUID->"43d37a7f-ef9b-4140-b2ea-f2ed51c85733"] }, Open ]], Cell[CellGroupData[{ -Cell[189429, 5137, 561, 20, 100, "Input",ExpressionUUID->"526d508c-9975-40b6-8a6d-1cc4b5a5276d"], -Cell[189993, 5159, 320, 6, 41, "Output",ExpressionUUID->"ddc9739d-40fa-4e39-9801-d85b9d0bcbc4"] +Cell[192194, 5005, 557, 19, 100, "Input",ExpressionUUID->"526d508c-9975-40b6-8a6d-1cc4b5a5276d"], +Cell[192754, 5026, 361, 5, 41, "Output",ExpressionUUID->"9da8d178-3ed5-4e24-ad85-ea734095757a"] }, Open ]], Cell[CellGroupData[{ -Cell[190350, 5170, 561, 20, 100, "Input",ExpressionUUID->"3e891a96-8c59-4f7c-9c3e-990a898f2e20"], -Cell[190914, 5192, 317, 6, 41, "Output",ExpressionUUID->"a2482aad-b112-4d90-a4de-a0b8e20fac00"] +Cell[193152, 5036, 557, 19, 100, "Input",ExpressionUUID->"3e891a96-8c59-4f7c-9c3e-990a898f2e20"], +Cell[193712, 5057, 359, 5, 41, "Output",ExpressionUUID->"e835fbea-a5e6-419c-a5e5-c747ce5b24d7"] }, Open ]], Cell[CellGroupData[{ -Cell[191268, 5203, 1592, 51, 103, "Input",ExpressionUUID->"a37dec1c-59a4-4c51-9022-e4ddc2be01cf"], -Cell[192863, 5256, 317, 6, 41, "Output",ExpressionUUID->"627d1a1d-1f6a-40e9-9386-e4a720261599"] +Cell[194108, 5067, 1588, 50, 215, "Input",ExpressionUUID->"a37dec1c-59a4-4c51-9022-e4ddc2be01cf"], +Cell[195699, 5119, 359, 5, 41, "Output",ExpressionUUID->"8a8ea1d2-6bb1-4867-b737-83dc9dd5515f"] }, Open ]], Cell[CellGroupData[{ -Cell[193217, 5267, 1426, 47, 73, "Input",ExpressionUUID->"87c79552-81b0-401a-90ad-03e92adf048f"], -Cell[194646, 5316, 334, 7, 41, "Output",ExpressionUUID->"2558ad60-6f31-4a85-a918-bec124988945"] +Cell[196095, 5129, 1422, 46, 215, "Input",ExpressionUUID->"87c79552-81b0-401a-90ad-03e92adf048f"], +Cell[197520, 5177, 374, 6, 41, "Output",ExpressionUUID->"2f3c456f-b39a-40ca-8572-48c8e59b53f7"] }, Open ]], Cell[CellGroupData[{ -Cell[195017, 5328, 1426, 47, 73, "Input",ExpressionUUID->"2cdde44d-4a40-4e27-9396-3f09b99ecfb8"], -Cell[196446, 5377, 341, 7, 41, "Output",ExpressionUUID->"73548512-b863-4786-a429-b7d9ae6e1712"] +Cell[197931, 5188, 1422, 46, 215, "Input",ExpressionUUID->"2cdde44d-4a40-4e27-9396-3f09b99ecfb8"], +Cell[199356, 5236, 381, 6, 41, "Output",ExpressionUUID->"05259630-e53b-41e6-8fdb-8f95ab7fb116"] }, Open ]], Cell[CellGroupData[{ -Cell[196824, 5389, 1496, 49, 101, "Input",ExpressionUUID->"c65e3e00-b427-478d-9793-d3efacd1ccc3"], -Cell[198323, 5440, 318, 6, 41, "Output",ExpressionUUID->"0fdfe0e8-1170-4734-92db-737edd725b4f"] +Cell[199774, 5247, 1588, 50, 215, "Input",ExpressionUUID->"c65e3e00-b427-478d-9793-d3efacd1ccc3"], +Cell[201365, 5299, 357, 5, 41, "Output",ExpressionUUID->"e6e9caa4-e850-4570-b104-8901a364250a"] }, Open ]], Cell[CellGroupData[{ -Cell[198678, 5451, 135, 3, 36, "Input",ExpressionUUID->"faec3591-5272-4811-8e51-10325cc5a1e7"], -Cell[198816, 5456, 302, 6, 41, "Output",ExpressionUUID->"3dd75654-1ea8-4b42-9562-4f01be51dd58"] +Cell[201759, 5309, 131, 2, 36, "Input",ExpressionUUID->"faec3591-5272-4811-8e51-10325cc5a1e7"], +Cell[201893, 5313, 341, 5, 41, "Output",ExpressionUUID->"6ac46d9e-bde2-4462-ada5-e2c89b5cb01c"] }, Open ]], Cell[CellGroupData[{ -Cell[199155, 5467, 137, 3, 36, "Input",ExpressionUUID->"dc6187d2-4115-43fe-93bd-75e52bbf170b"], -Cell[199295, 5472, 303, 6, 41, "Output",ExpressionUUID->"c50399a1-ff58-492c-aafc-d2ce340a4bbb"] +Cell[202271, 5323, 133, 2, 36, "Input",ExpressionUUID->"dc6187d2-4115-43fe-93bd-75e52bbf170b"], +Cell[202407, 5327, 345, 5, 41, "Output",ExpressionUUID->"02c559a9-a87c-48ca-b539-6686fdf535cd"] }, Open ]], Cell[CellGroupData[{ -Cell[199635, 5483, 138, 3, 36, "Input",ExpressionUUID->"bcd62977-bb90-4a5d-859e-c6f310ed28dc"], -Cell[199776, 5488, 304, 6, 41, "Output",ExpressionUUID->"0b879a3d-43fd-4295-b00c-0ad6e9bb7923"] +Cell[202789, 5337, 134, 2, 36, "Input",ExpressionUUID->"bcd62977-bb90-4a5d-859e-c6f310ed28dc"], +Cell[202926, 5341, 344, 5, 41, "Output",ExpressionUUID->"d9a0c7c0-9080-4ace-b54c-d04d2fb8e985"] }, Open ]], Cell[CellGroupData[{ -Cell[200117, 5499, 223, 5, 36, "Input",ExpressionUUID->"2730540f-d341-435a-928d-3b1dc9befa4a"], -Cell[200343, 5506, 321, 7, 41, "Output",ExpressionUUID->"93fcfa8f-4160-41e6-b3d3-25792634aef4"] +Cell[203307, 5351, 219, 4, 36, "Input",ExpressionUUID->"2730540f-d341-435a-928d-3b1dc9befa4a"], +Cell[203529, 5357, 363, 6, 41, "Output",ExpressionUUID->"c51f976c-a17f-4732-bdec-8ee33a34bbf4"] }, Open ]], Cell[CellGroupData[{ -Cell[200701, 5518, 138, 3, 36, "Input",ExpressionUUID->"6e143f26-c6bd-44b7-a20a-d9b93450045a"], -Cell[200842, 5523, 303, 6, 41, "Output",ExpressionUUID->"638c0066-2a47-4f7c-8e62-9d97a616f9e3"] +Cell[203929, 5368, 134, 2, 36, "Input",ExpressionUUID->"6e143f26-c6bd-44b7-a20a-d9b93450045a"], +Cell[204066, 5372, 345, 5, 41, "Output",ExpressionUUID->"f8bfbcce-1550-46ad-8b80-6657a57984f8"] }, Open ]], Cell[CellGroupData[{ -Cell[201182, 5534, 326, 6, 36, "Input",ExpressionUUID->"9306094a-05a0-4f8f-a845-c5e177318cbc"], -Cell[201511, 5542, 303, 6, 41, "Output",ExpressionUUID->"0d146129-6fda-469d-aaa6-446ac94d1c2e"] +Cell[204448, 5382, 322, 5, 36, "Input",ExpressionUUID->"9306094a-05a0-4f8f-a845-c5e177318cbc"], +Cell[204773, 5389, 342, 5, 41, "Output",ExpressionUUID->"76092ab3-a136-40e1-a64b-f76a2d489b8a"] }, Open ]], Cell[CellGroupData[{ -Cell[201851, 5553, 302, 6, 36, "Input",ExpressionUUID->"585538e8-f108-4c55-ae2d-a725785abf30"], -Cell[202156, 5561, 302, 6, 41, "Output",ExpressionUUID->"c039b2c0-c1b7-4f4d-ab11-f06f1e8e7c92"] +Cell[205152, 5399, 298, 5, 36, "Input",ExpressionUUID->"585538e8-f108-4c55-ae2d-a725785abf30"], +Cell[205453, 5406, 344, 5, 41, "Output",ExpressionUUID->"b9caa06e-2a56-49d3-99c8-12ee8ef4e5ce"] }, Open ]], Cell[CellGroupData[{ -Cell[202495, 5572, 223, 5, 36, "Input",ExpressionUUID->"97bca7ac-ba3f-42c3-823a-5e52a461adf8"], -Cell[202721, 5579, 303, 6, 41, "Output",ExpressionUUID->"6f07860c-5857-4452-b7cb-d589d7d12517"] +Cell[205834, 5416, 219, 4, 36, "Input",ExpressionUUID->"97bca7ac-ba3f-42c3-823a-5e52a461adf8"], +Cell[206056, 5422, 343, 5, 41, "Output",ExpressionUUID->"935ca77f-5ddc-4196-8265-06489a1dec95"] }, Open ]], Cell[CellGroupData[{ -Cell[203061, 5590, 354, 11, 54, "Input",ExpressionUUID->"5e0f746f-61a4-497b-a535-07508ad6f848"], -Cell[203418, 5603, 320, 6, 41, "Output",ExpressionUUID->"acd501c3-a338-433a-9eea-8d93b27dc7b6"] +Cell[206436, 5432, 350, 10, 54, "Input",ExpressionUUID->"5e0f746f-61a4-497b-a535-07508ad6f848"], +Cell[206789, 5444, 360, 5, 41, "Output",ExpressionUUID->"4e45235f-690b-44ae-afc6-e18ca0fccdd1"] }, Open ]], Cell[CellGroupData[{ -Cell[203775, 5614, 354, 11, 54, "Input",ExpressionUUID->"e2224fe5-7fb9-4e84-b205-303205bdefd4"], -Cell[204132, 5627, 341, 7, 41, "Output",ExpressionUUID->"ffad908c-912a-49e8-90fd-34c352b9c9cb"] +Cell[207186, 5454, 350, 10, 54, "Input",ExpressionUUID->"e2224fe5-7fb9-4e84-b205-303205bdefd4"], +Cell[207539, 5466, 381, 6, 41, "Output",ExpressionUUID->"57f927c0-c5dc-4c02-8fc3-545d08baf8ac"] }, Open ]], Cell[CellGroupData[{ -Cell[204510, 5639, 998, 27, 55, "Input",ExpressionUUID->"15d38e2e-3604-480d-9612-69d8f22a5340"], -Cell[205511, 5668, 321, 6, 41, "Output",ExpressionUUID->"1d0f3d04-7cec-46b2-86c6-fb02e9438d08"] +Cell[207957, 5477, 994, 26, 105, "Input",ExpressionUUID->"15d38e2e-3604-480d-9612-69d8f22a5340"], +Cell[208954, 5505, 363, 5, 41, "Output",ExpressionUUID->"c572c2c1-79c0-4396-bc12-225bb92927fc"] }, Open ]], Cell[CellGroupData[{ -Cell[205869, 5679, 203, 4, 36, "Input",ExpressionUUID->"a2181dac-7825-479f-b3f7-7d4307fe8f3d"], -Cell[206075, 5685, 301, 6, 41, "Output",ExpressionUUID->"45584973-5d3a-4cda-b8f4-c16e0f3b1434"] +Cell[209354, 5515, 203, 4, 36, "Input",ExpressionUUID->"a2181dac-7825-479f-b3f7-7d4307fe8f3d"], +Cell[209560, 5521, 345, 6, 41, "Output",ExpressionUUID->"b874334d-f2d3-48db-a89d-c0baee7cb2e9"] }, Open ]], Cell[CellGroupData[{ -Cell[206413, 5696, 333, 6, 36, "Input",ExpressionUUID->"2bfa74b1-b31e-4d1b-bd69-2b0c4f35294f"], -Cell[206749, 5704, 276, 5, 41, "Output",ExpressionUUID->"7e020882-109d-482d-88f5-78b459c2ac67"] +Cell[209942, 5532, 333, 6, 36, "Input",ExpressionUUID->"2bfa74b1-b31e-4d1b-bd69-2b0c4f35294f"], +Cell[210278, 5540, 324, 6, 41, "Output",ExpressionUUID->"f557cf6e-403b-4445-a276-9abb50166abe"] }, Open ]], -Cell[207040, 5712, 177, 3, 36, "Input",ExpressionUUID->"82f366d1-b423-48e2-8f7f-e260eab3cc90"], +Cell[210617, 5549, 177, 3, 109, "Input",ExpressionUUID->"82f366d1-b423-48e2-8f7f-e260eab3cc90"], Cell[CellGroupData[{ -Cell[207242, 5719, 331, 6, 36, "Input",ExpressionUUID->"6d0c910a-a04a-4526-beb8-a5baa60bc8fa"], -Cell[207576, 5727, 279, 5, 41, "Output",ExpressionUUID->"cd6f236b-43e8-4575-bc66-a686b1bc7b8b"] +Cell[210819, 5556, 331, 6, 36, "Input",ExpressionUUID->"6d0c910a-a04a-4526-beb8-a5baa60bc8fa"], +Cell[211153, 5564, 329, 6, 41, "Output",ExpressionUUID->"d17534d9-c497-454f-becf-cc5d75e09c0c"] }, Open ]], -Cell[207870, 5735, 177, 3, 36, "Input",ExpressionUUID->"b7033cf9-26f0-4f8d-a018-e3f3e0e21657"], +Cell[211497, 5573, 177, 3, 109, "Input",ExpressionUUID->"b7033cf9-26f0-4f8d-a018-e3f3e0e21657"], Cell[CellGroupData[{ -Cell[208072, 5742, 334, 6, 36, "Input",ExpressionUUID->"53284a79-2a40-4ddf-9665-90f2bea0ca7a"], -Cell[208409, 5750, 276, 5, 41, "Output",ExpressionUUID->"5826ca9c-3a2d-433e-b21f-ef0d95635b74"] +Cell[211699, 5580, 334, 6, 36, "Input",ExpressionUUID->"53284a79-2a40-4ddf-9665-90f2bea0ca7a"], +Cell[212036, 5588, 323, 6, 41, "Output",ExpressionUUID->"6e44a19d-b4c7-4c40-9642-8582d9ab7bc7"] }, Open ]], -Cell[208700, 5758, 177, 3, 36, "Input",ExpressionUUID->"35de1d89-3842-4102-8886-8963b779c8f3"], +Cell[212374, 5597, 177, 3, 109, "Input",ExpressionUUID->"35de1d89-3842-4102-8886-8963b779c8f3"], Cell[CellGroupData[{ -Cell[208902, 5765, 358, 6, 36, "Input",ExpressionUUID->"34a03e26-3ef6-4224-91c0-3919b80256a8"], -Cell[209263, 5773, 278, 5, 41, "Output",ExpressionUUID->"4e192d79-d65f-4f2c-8251-6d1e5425dbfd"] +Cell[212576, 5604, 358, 6, 36, "Input",ExpressionUUID->"34a03e26-3ef6-4224-91c0-3919b80256a8"], +Cell[212937, 5612, 328, 6, 41, "Output",ExpressionUUID->"72b29fd7-cb96-4275-958e-525904df4f39"] }, Open ]], -Cell[209556, 5781, 175, 3, 36, "Input",ExpressionUUID->"e5faaea7-83bd-40b1-910e-f91ea67907ba"], +Cell[213280, 5621, 175, 3, 109, "Input",ExpressionUUID->"e5faaea7-83bd-40b1-910e-f91ea67907ba"], Cell[CellGroupData[{ -Cell[209756, 5788, 307, 6, 36, "Input",ExpressionUUID->"71ef7802-0384-44a9-b2f7-055696206568"], -Cell[210066, 5796, 278, 5, 41, "Output",ExpressionUUID->"065dc7d4-fd1e-4162-bb13-31615374f1cf"] +Cell[213480, 5628, 307, 6, 36, "Input",ExpressionUUID->"71ef7802-0384-44a9-b2f7-055696206568"], +Cell[213790, 5636, 326, 6, 41, "Output",ExpressionUUID->"429271e1-7d69-46e9-a4e5-817f633a42f1"] }, Open ]], -Cell[210359, 5804, 175, 3, 36, "Input",ExpressionUUID->"c38a225e-16ac-4173-8b77-ba3fa4a8a6b0"], +Cell[214131, 5645, 175, 3, 109, "Input",ExpressionUUID->"c38a225e-16ac-4173-8b77-ba3fa4a8a6b0"], Cell[CellGroupData[{ -Cell[210559, 5811, 309, 6, 36, "Input",ExpressionUUID->"74130078-2486-4980-9abc-f65d3f8b532e"], -Cell[210871, 5819, 279, 5, 41, "Output",ExpressionUUID->"8d4a7c08-4940-4988-9878-689145082c92"] +Cell[214331, 5652, 309, 6, 36, "Input",ExpressionUUID->"74130078-2486-4980-9abc-f65d3f8b532e"], +Cell[214643, 5660, 327, 6, 41, "Output",ExpressionUUID->"931e5edc-a46b-4cf9-b8b1-c6c8efe0ed31"] }, Open ]], -Cell[211165, 5827, 177, 3, 36, "Input",ExpressionUUID->"8830e9a5-1b52-4167-be80-e38579b52fe2"], +Cell[214985, 5669, 177, 3, 109, "Input",ExpressionUUID->"8830e9a5-1b52-4167-be80-e38579b52fe2"], Cell[CellGroupData[{ -Cell[211367, 5834, 308, 6, 36, "Input",ExpressionUUID->"7ffcde28-2645-4dce-810e-6960d04b5265"], -Cell[211678, 5842, 281, 5, 41, "Output",ExpressionUUID->"34af5f12-6b37-40e2-a51a-80e820da2559"] +Cell[215187, 5676, 308, 6, 36, "Input",ExpressionUUID->"7ffcde28-2645-4dce-810e-6960d04b5265"], +Cell[215498, 5684, 329, 6, 41, "Output",ExpressionUUID->"e9b28100-4af6-46d2-814f-a09aabb1e48a"] }, Open ]], -Cell[211974, 5850, 176, 3, 36, "Input",ExpressionUUID->"534834d7-c99a-4c8b-8bf6-062f6ae916aa"], +Cell[215842, 5693, 176, 3, 109, "Input",ExpressionUUID->"534834d7-c99a-4c8b-8bf6-062f6ae916aa"], Cell[CellGroupData[{ -Cell[212175, 5857, 279, 5, 36, "Input",ExpressionUUID->"135ee35f-8ffd-4924-b26f-b5459b9e110b"], -Cell[212457, 5864, 276, 5, 41, "Output",ExpressionUUID->"ea2d5a72-20f2-40d8-960a-24f2a78badff"] +Cell[216043, 5700, 279, 5, 36, "Input",ExpressionUUID->"135ee35f-8ffd-4924-b26f-b5459b9e110b"], +Cell[216325, 5707, 324, 6, 41, "Output",ExpressionUUID->"e8cab31b-d186-4a99-8767-d43df5610188"] }, Open ]], -Cell[212748, 5872, 179, 3, 36, "Input",ExpressionUUID->"c56c1ddb-b12d-4422-bf29-3b0b01c42f00"], +Cell[216664, 5716, 179, 3, 109, "Input",ExpressionUUID->"c56c1ddb-b12d-4422-bf29-3b0b01c42f00"], Cell[CellGroupData[{ -Cell[212952, 5879, 19813, 486, 1708, "Input",ExpressionUUID->"f68497d7-f76f-494c-8ef6-957d51a34243"], -Cell[232768, 6367, 321, 6, 41, "Output",ExpressionUUID->"a28a9f72-8e9e-47a9-b3f4-bc795be1bf42"] +Cell[216868, 5723, 19813, 486, 3208, "Input",ExpressionUUID->"f68497d7-f76f-494c-8ef6-957d51a34243"], +Cell[236684, 6211, 365, 6, 41, "Output",ExpressionUUID->"01a4906d-a626-4aad-beb4-d8749e96a849"] }, Open ]], Cell[CellGroupData[{ -Cell[233126, 6378, 19752, 490, 1720, "Input",ExpressionUUID->"78d34269-346e-45af-a043-7c2873164ad0"], -Cell[252881, 6870, 317, 6, 41, "Output",ExpressionUUID->"13855b8e-81c8-4d5d-b355-a789b0e64673"] +Cell[237086, 6222, 19752, 490, 3138, "Input",ExpressionUUID->"78d34269-346e-45af-a043-7c2873164ad0"], +Cell[256841, 6714, 359, 6, 41, "Output",ExpressionUUID->"68aba0bd-e6f8-4679-b2af-bfa93e841af7"] }, Open ]], Cell[CellGroupData[{ -Cell[253235, 6881, 19752, 484, 1720, "Input",ExpressionUUID->"1753f734-cfd4-40c6-94a3-98cc442028d6"], -Cell[272990, 7367, 339, 7, 41, "Output",ExpressionUUID->"7cb5d14d-9770-47e2-a6f8-19d4b435743e"] +Cell[257237, 6725, 19752, 484, 3198, "Input",ExpressionUUID->"1753f734-cfd4-40c6-94a3-98cc442028d6"], +Cell[276992, 7211, 385, 7, 41, "Output",ExpressionUUID->"9ae66106-d69c-42a2-8b0c-67ac9f9561f8"] }, Open ]], Cell[CellGroupData[{ -Cell[273366, 7379, 22538, 554, 1885, "Input",ExpressionUUID->"1533e185-520c-4b06-a810-4fff825ed6e3"], -Cell[295907, 7935, 335, 7, 41, "Output",ExpressionUUID->"45c7995d-c0e8-47b6-a4f6-d0e532ba365e"] +Cell[277414, 7223, 22538, 554, 3677, "Input",ExpressionUUID->"1533e185-520c-4b06-a810-4fff825ed6e3"], +Cell[299955, 7779, 379, 7, 41, "Output",ExpressionUUID->"f349aa58-c096-4d0c-a0f7-27e41e3f7ab3"] }, Open ]], Cell[CellGroupData[{ -Cell[296279, 7947, 22539, 554, 1885, "Input",ExpressionUUID->"48f0ab0f-99ff-430c-ae9a-cae1ff11d0d4"], -Cell[318821, 8503, 340, 7, 41, "Output",ExpressionUUID->"90adaa06-9cb2-4c80-84e5-03ac35947e75"] +Cell[300371, 7791, 22539, 554, 3642, "Input",ExpressionUUID->"48f0ab0f-99ff-430c-ae9a-cae1ff11d0d4"], +Cell[322913, 8347, 386, 7, 41, "Output",ExpressionUUID->"629db214-6024-4179-bd73-287d37c8d451"] }, Open ]], Cell[CellGroupData[{ -Cell[319198, 8515, 25495, 627, 2078, "Input",ExpressionUUID->"2e857b96-d62e-443e-96bd-c5f4027b4f4b"], -Cell[344696, 9144, 334, 7, 41, "Output",ExpressionUUID->"344aa463-5250-48bf-a7c9-25db18dc062f"] +Cell[323336, 8359, 25495, 627, 4121, "Input",ExpressionUUID->"2e857b96-d62e-443e-96bd-c5f4027b4f4b"], +Cell[348834, 8988, 380, 7, 41, "Output",ExpressionUUID->"8e7e6484-2994-4b9e-b57d-0d576d614c25"] }, Open ]], Cell[CellGroupData[{ -Cell[345067, 9156, 134, 3, 36, "Input",ExpressionUUID->"b10475d2-3167-4670-99eb-cbdcff897155"], -Cell[345204, 9161, 301, 6, 41, "Output",ExpressionUUID->"48a44076-b792-40d6-94ea-e5e93bd32a46"] +Cell[349251, 9000, 134, 3, 36, "Input",ExpressionUUID->"b10475d2-3167-4670-99eb-cbdcff897155"], +Cell[349388, 9005, 347, 6, 41, "Output",ExpressionUUID->"007a8d9b-4f40-4b58-9aaf-38305a9e1883"] }, Open ]], Cell[CellGroupData[{ -Cell[345542, 9172, 134, 3, 36, "Input",ExpressionUUID->"bb87416f-6346-4cf4-a693-31a8607807dd"], -Cell[345679, 9177, 301, 6, 41, "Output",ExpressionUUID->"30f697c8-90d9-43ec-acde-aca91b3bab9a"] +Cell[349772, 9016, 134, 3, 36, "Input",ExpressionUUID->"bb87416f-6346-4cf4-a693-31a8607807dd"], +Cell[349909, 9021, 347, 6, 41, "Output",ExpressionUUID->"e31e9e06-148f-4453-8369-79dd4bd03ee1"] }, Open ]], Cell[CellGroupData[{ -Cell[346017, 9188, 1148, 40, 73, "Input",ExpressionUUID->"8bd5d07d-3777-48b8-9134-a98d0c5e6a3c"], -Cell[347168, 9230, 320, 6, 41, "Output",ExpressionUUID->"e38fe0b7-4224-47cf-aa68-b513fd72c7f5"] +Cell[350293, 9032, 1148, 40, 144, "Input",ExpressionUUID->"8bd5d07d-3777-48b8-9134-a98d0c5e6a3c"], +Cell[351444, 9074, 366, 6, 41, "Output",ExpressionUUID->"f8646403-4be2-4d01-9d3d-c730abdf3726"] }, Open ]], Cell[CellGroupData[{ -Cell[347525, 9241, 1045, 36, 73, "Input",ExpressionUUID->"21c2ba5f-8c84-456a-866a-d59808603e16"], -Cell[348573, 9279, 334, 7, 41, "Output",ExpressionUUID->"55ce79d7-0043-47a4-b4c8-43064e4fda97"] +Cell[351847, 9085, 1045, 36, 144, "Input",ExpressionUUID->"21c2ba5f-8c84-456a-866a-d59808603e16"], +Cell[352895, 9123, 380, 7, 41, "Output",ExpressionUUID->"86f718dc-c821-47fd-91f1-804d40616291"] }, Open ]], Cell[CellGroupData[{ -Cell[348944, 9291, 1148, 40, 73, "Input",ExpressionUUID->"0d3f7a6f-e62d-4e5d-9bf5-33c7c1aa96fa"], -Cell[350095, 9333, 319, 6, 41, "Output",ExpressionUUID->"5a2a7e66-6a1a-42da-aa4e-82d9cdb3b900"] +Cell[353312, 9135, 1148, 40, 144, "Input",ExpressionUUID->"0d3f7a6f-e62d-4e5d-9bf5-33c7c1aa96fa"], +Cell[354463, 9177, 365, 6, 41, "Output",ExpressionUUID->"0d7c9beb-4850-4aef-8082-999f1ac72f54"] }, Open ]], Cell[CellGroupData[{ -Cell[350451, 9344, 112, 2, 36, "Input",ExpressionUUID->"51091a04-ee5c-44c8-9b87-7f6eab0f54d4"], -Cell[350566, 9348, 318, 6, 41, "Output",ExpressionUUID->"96e0f1e0-ae5f-4aa1-9e87-b05302102c04"] +Cell[354865, 9188, 112, 2, 36, "Input",ExpressionUUID->"51091a04-ee5c-44c8-9b87-7f6eab0f54d4"], +Cell[354980, 9192, 364, 6, 41, "Output",ExpressionUUID->"2fbb416e-7924-4132-9acc-412a2b60c9c3"] }, Open ]], Cell[CellGroupData[{ -Cell[350921, 9359, 112, 2, 36, "Input",ExpressionUUID->"aa8664e9-7a0d-4329-a494-0b9235ba70bd"], -Cell[351036, 9363, 312, 6, 41, "Output",ExpressionUUID->"1fd4dc44-78d3-4bec-88c6-5f3004e320b3"] +Cell[355381, 9203, 112, 2, 36, "Input",ExpressionUUID->"aa8664e9-7a0d-4329-a494-0b9235ba70bd"], +Cell[355496, 9207, 360, 7, 41, "Output",ExpressionUUID->"19e2d04f-25cf-4ae6-a709-1ca46c9d8af8"] }, Open ]], Cell[CellGroupData[{ -Cell[351385, 9374, 112, 2, 36, "Input",ExpressionUUID->"8ad16100-9963-455d-bb4a-18485cc6a462"], -Cell[351500, 9378, 306, 6, 41, "Output",ExpressionUUID->"86fffbfa-5c5d-4ed7-94a2-e95b3eb6a461"] +Cell[355893, 9219, 112, 2, 36, "Input",ExpressionUUID->"8ad16100-9963-455d-bb4a-18485cc6a462"], +Cell[356008, 9223, 353, 7, 41, "Output",ExpressionUUID->"7dbd7165-585f-47bb-9f8f-c89ac977d689"] }, Open ]], Cell[CellGroupData[{ -Cell[351843, 9389, 112, 2, 36, "Input",ExpressionUUID->"5362a78a-eafb-4101-84fc-a110bd990c05"], -Cell[351958, 9393, 289, 5, 41, "Output",ExpressionUUID->"8f9b014e-aa60-4461-9d31-d7c041656133"] +Cell[356398, 9235, 112, 2, 36, "Input",ExpressionUUID->"5362a78a-eafb-4101-84fc-a110bd990c05"], +Cell[356513, 9239, 337, 6, 41, "Output",ExpressionUUID->"3c7b0159-0c32-41f1-ace8-cdb23f3b3190"] }, Open ]], Cell[CellGroupData[{ -Cell[352284, 9403, 111, 2, 36, "Input",ExpressionUUID->"ab8298db-eb89-468c-9f30-8b26a0639fed"], -Cell[352398, 9407, 291, 5, 41, "Output",ExpressionUUID->"d426c2dd-db45-4cde-b59d-cbf17cd96c57"] +Cell[356887, 9250, 111, 2, 36, "Input",ExpressionUUID->"ab8298db-eb89-468c-9f30-8b26a0639fed"], +Cell[357001, 9254, 339, 6, 41, "Output",ExpressionUUID->"e5cd2a7d-da86-4e7b-9b3a-d0ce247d4c7f"] }, Open ]], Cell[CellGroupData[{ -Cell[352726, 9417, 111, 2, 36, "Input",ExpressionUUID->"15afe09a-545b-456c-b862-783499a9aa3e"], -Cell[352840, 9421, 296, 5, 41, "Output",ExpressionUUID->"f554d23f-b187-4b9f-a7d9-ae4231f6c6bd"] +Cell[357377, 9265, 111, 2, 36, "Input",ExpressionUUID->"15afe09a-545b-456c-b862-783499a9aa3e"], +Cell[357491, 9269, 346, 6, 41, "Output",ExpressionUUID->"3f4fd7b7-a700-46df-a6f7-37904032e25e"] }, Open ]], Cell[CellGroupData[{ -Cell[353173, 9431, 501, 17, 71, "Input",ExpressionUUID->"d2cee077-a240-4c98-8e64-6034cd291aad"], -Cell[353677, 9450, 307, 6, 41, "Output",ExpressionUUID->"c73fd9b3-ab13-41b7-98b1-ec37e2936624"] +Cell[357874, 9280, 501, 17, 71, "Input",ExpressionUUID->"d2cee077-a240-4c98-8e64-6034cd291aad"], +Cell[358378, 9299, 355, 7, 41, "Output",ExpressionUUID->"a02a4112-f64a-4ca5-8aae-cb4e8e21fdb3"] }, Open ]], Cell[CellGroupData[{ -Cell[354021, 9461, 501, 17, 71, "Input",ExpressionUUID->"52944921-5af5-4c21-a7ae-13086ddc9cd1"], -Cell[354525, 9480, 310, 6, 41, "Output",ExpressionUUID->"a3630ce9-ef03-450a-8517-62db7645491a"] +Cell[358770, 9311, 501, 17, 71, "Input",ExpressionUUID->"52944921-5af5-4c21-a7ae-13086ddc9cd1"], +Cell[359274, 9330, 358, 7, 41, "Output",ExpressionUUID->"bdb6858a-5b08-4d68-a449-84a33e52f7bb"] }, Open ]], Cell[CellGroupData[{ -Cell[354872, 9491, 1792, 61, 142, "Input",ExpressionUUID->"d5fd357f-fd90-433e-8ded-24de79601f6c"], -Cell[356667, 9554, 291, 5, 41, "Output",ExpressionUUID->"7a5076e9-e527-4503-81c4-86cb6ce0e74c"] +Cell[359669, 9342, 1792, 61, 340, "Input",ExpressionUUID->"d5fd357f-fd90-433e-8ded-24de79601f6c"], +Cell[361464, 9405, 339, 6, 41, "Output",ExpressionUUID->"324bfffa-3b64-43f3-a170-dc5453a6f625"] }, Open ]], Cell[CellGroupData[{ -Cell[356995, 9564, 1105, 37, 73, "Input",ExpressionUUID->"2d3e2067-d5af-489d-ac0b-6d494a615060"], -Cell[358103, 9603, 312, 6, 41, "Output",ExpressionUUID->"6565c76d-b318-481c-95be-db18f4ec6ff7"] +Cell[361840, 9416, 1105, 37, 174, "Input",ExpressionUUID->"2d3e2067-d5af-489d-ac0b-6d494a615060"], +Cell[362948, 9455, 362, 7, 41, "Output",ExpressionUUID->"9cf64d0f-ceaf-41db-8540-f12b158afe42"] }, Open ]], Cell[CellGroupData[{ -Cell[358452, 9614, 1822, 62, 144, "Input",ExpressionUUID->"67723656-50a5-49b8-8d0f-139bec049352"], -Cell[360277, 9678, 292, 5, 41, "Output",ExpressionUUID->"c7a01b89-358f-4ad6-9168-8545a79e20e8"] +Cell[363347, 9467, 1822, 62, 340, "Input",ExpressionUUID->"67723656-50a5-49b8-8d0f-139bec049352"], +Cell[365172, 9531, 342, 6, 41, "Output",ExpressionUUID->"8ab7ebf5-803f-4616-add0-2c8b0d6b3e52"] }, Open ]], Cell[CellGroupData[{ -Cell[360606, 9688, 1635, 54, 101, "Input",ExpressionUUID->"4335829d-0808-4d97-a0f4-f678101e0a58"], -Cell[362244, 9744, 291, 5, 41, "Output",ExpressionUUID->"c02b99d0-639a-4df5-a73a-9065ee8890b7"] +Cell[365551, 9542, 1635, 54, 208, "Input",ExpressionUUID->"4335829d-0808-4d97-a0f4-f678101e0a58"], +Cell[367189, 9598, 343, 6, 41, "Output",ExpressionUUID->"b8d2cfcc-f90c-4601-a7a7-22099a8e3be3"] }, Open ]], Cell[CellGroupData[{ -Cell[362572, 9754, 1635, 54, 101, "Input",ExpressionUUID->"d62b6b99-b96c-485c-87cb-c0a9062a99c6"], -Cell[364210, 9810, 289, 5, 41, "Output",ExpressionUUID->"740b69e0-a972-4090-a479-ecd2691cd4e7"] +Cell[367569, 9609, 1635, 54, 208, "Input",ExpressionUUID->"d62b6b99-b96c-485c-87cb-c0a9062a99c6"], +Cell[369207, 9665, 337, 6, 41, "Output",ExpressionUUID->"b18c63a9-5e8c-4011-aeb3-cd7332bff109"] }, Open ]], -Cell[364514, 9818, 216, 5, 36, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], -Cell[364733, 9825, 154, 3, 36, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], -Cell[364890, 9830, 187, 4, 36, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], -Cell[365080, 9836, 154, 3, 36, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[365259, 9843, 1301, 43, 61, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[366563, 9888, 178, 3, 41, "Output",ExpressionUUID->"d7904bcf-fc55-b844-b4d2-059d830f1317"] +Cell[369581, 9676, 238, 5, 36, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], +Cell[369822, 9683, 188, 3, 41, "Output",ExpressionUUID->"7723de11-30cc-43a0-a485-5d1306fa3ae6"] }, Open ]], +Cell[370025, 9689, 177, 3, 109, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], Cell[CellGroupData[{ -Cell[366778, 9896, 908, 31, 73, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[367689, 9929, 177, 3, 41, "Output",ExpressionUUID->"7c075ec9-a97b-ab47-b241-cc392b585c5e"] +Cell[370227, 9696, 210, 4, 36, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], +Cell[370440, 9702, 189, 3, 41, "Output",ExpressionUUID->"c600809b-b9b9-44a7-821a-e55c75d2ac1a"] }, Open ]], +Cell[370644, 9708, 177, 3, 109, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[367903, 9937, 889, 30, 73, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[368795, 9969, 178, 3, 41, "Output",ExpressionUUID->"ddda4800-8c90-d44b-acfd-6ccb39eee852"] +Cell[370846, 9715, 1301, 43, 174, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], +Cell[372150, 9760, 223, 4, 41, "Output",ExpressionUUID->"966198f8-4cf8-4ba5-8143-f5063637f28c"] }, Open ]], Cell[CellGroupData[{ -Cell[369010, 9977, 558, 19, 66, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[369571, 9998, 172, 3, 41, "Output",ExpressionUUID->"046d7438-d73f-9343-9ae7-b01adfd6d8f5"] +Cell[372410, 9769, 931, 31, 128, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], +Cell[373344, 9802, 226, 4, 41, "Output",ExpressionUUID->"45aa011f-5a96-43fa-95ce-4bdb998dd995"] }, Open ]], Cell[CellGroupData[{ -Cell[369780, 10006, 651, 22, 66, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[370434, 10030, 167, 3, 41, "Output",ExpressionUUID->"d2928e96-58be-3a4f-8bee-5b9e193c2ac6"] +Cell[373607, 9811, 912, 30, 128, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], +Cell[374522, 9843, 225, 4, 41, "Output",ExpressionUUID->"1f126b19-c813-4dcc-8520-d8ff13beab0b"] }, Open ]], Cell[CellGroupData[{ -Cell[370638, 10038, 170, 5, 71, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[370811, 10045, 172, 3, 41, "Output",ExpressionUUID->"bf655ed3-7200-2249-b687-593ee351a598"] +Cell[374784, 9852, 558, 19, 66, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], +Cell[375345, 9873, 222, 4, 41, "Output",ExpressionUUID->"beecb047-ec4b-4e6b-9065-65fbd4ff665f"] }, Open ]], Cell[CellGroupData[{ -Cell[371020, 10053, 170, 5, 69, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[371193, 10060, 173, 3, 41, "Output",ExpressionUUID->"56f5f06b-52e2-6941-b28e-41b961cb42e9"] +Cell[375604, 9882, 651, 22, 66, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], +Cell[376258, 9906, 217, 4, 41, "Output",ExpressionUUID->"5f92bca7-796f-439d-bd28-bf2bd21720a7"] }, Open ]], Cell[CellGroupData[{ -Cell[371403, 10068, 181, 5, 55, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[371587, 10075, 171, 3, 41, "Output",ExpressionUUID->"8c210f75-69a5-5340-94a4-65e97302ca45"] +Cell[376512, 9915, 170, 5, 71, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], +Cell[376685, 9922, 220, 4, 41, "Output",ExpressionUUID->"dc3c3e61-af54-4c14-a201-68ba17cf3623"] }, Open ]], Cell[CellGroupData[{ -Cell[371795, 10083, 181, 5, 55, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[371979, 10090, 172, 3, 41, "Output",ExpressionUUID->"bad7f5b6-1bd3-6b4b-87e4-44aee3a120fc"] +Cell[376942, 9931, 170, 5, 69, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], +Cell[377115, 9938, 219, 4, 41, "Output",ExpressionUUID->"8eccdfdc-f8c6-4ba4-afda-7bb4d2958cb2"] }, Open ]], Cell[CellGroupData[{ -Cell[372188, 10098, 6055, 185, 431, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[378246, 10285, 174, 3, 41, "Output",ExpressionUUID->"ffdf2eb3-13bd-724f-a87b-fb40655ae9c4"] +Cell[377371, 9947, 181, 5, 55, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], +Cell[377555, 9954, 218, 4, 41, "Output",ExpressionUUID->"f084a007-40dd-4e55-af94-d1055ef9d76a"] }, Open ]], Cell[CellGroupData[{ -Cell[378457, 10293, 368, 9, 53, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[378828, 10304, 172, 3, 41, "Output",ExpressionUUID->"609425d6-cf9c-7a45-bc21-030ca3aa1290"] +Cell[377810, 9963, 181, 5, 55, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], +Cell[377994, 9970, 220, 4, 41, "Output",ExpressionUUID->"8f528a8a-3362-4990-b9a6-f46ab8f64c2f"] }, Open ]], Cell[CellGroupData[{ -Cell[379037, 10312, 6122, 187, 431, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[385162, 10501, 175, 3, 41, "Output",ExpressionUUID->"b20cbe94-36a3-8548-a61e-959a25814c62"] +Cell[378251, 9979, 6055, 185, 831, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], +Cell[384309, 10166, 221, 4, 41, "Output",ExpressionUUID->"df30cd95-eaf5-45d3-8153-e8e64b12b03a"] }, Open ]], Cell[CellGroupData[{ -Cell[385374, 10509, 368, 9, 53, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[385745, 10520, 172, 3, 41, "Output",ExpressionUUID->"4fc2e2c1-457d-3d4a-a5b7-180877c6f370"] +Cell[384567, 10175, 368, 9, 53, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], +Cell[384938, 10186, 220, 4, 41, "Output",ExpressionUUID->"71428057-06f8-41ae-8291-5ec6c70a5e78"] }, Open ]], Cell[CellGroupData[{ -Cell[385954, 10528, 2663, 88, 215, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[388620, 10618, 171, 3, 41, "Output",ExpressionUUID->"08fcefa1-a87b-bf4b-998d-0c9017752dd4"] +Cell[385195, 10195, 6122, 187, 900, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], +Cell[391320, 10384, 221, 4, 41, "Output",ExpressionUUID->"8f79555d-2fea-48fa-99c1-a8927a78c6cb"] }, Open ]], Cell[CellGroupData[{ -Cell[388828, 10626, 2603, 85, 215, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[391434, 10713, 173, 3, 41, "Output",ExpressionUUID->"5678b502-e98a-5d4b-9c03-fe98b2cc6f78"] +Cell[391578, 10393, 368, 9, 53, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], +Cell[391949, 10404, 219, 4, 41, "Output",ExpressionUUID->"689f8711-9036-4beb-8b45-c3c0a6d44dba"] }, Open ]], Cell[CellGroupData[{ -Cell[391644, 10721, 3712, 118, 316, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[395359, 10841, 174, 3, 41, "Output",ExpressionUUID->"d74c1470-6eae-4841-b978-069a86bca67d"] +Cell[392205, 10413, 2663, 88, 435, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], +Cell[394871, 10503, 221, 4, 41, "Output",ExpressionUUID->"b2ae10ec-3d3a-4dd7-8e42-34058e45eb89"] }, Open ]], -Cell[395548, 10847, 138, 3, 36, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ -Cell[395711, 10854, 2054, 59, 116, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], -Cell[397768, 10915, 559, 12, 71, "Message",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], -Cell[398330, 10929, 560, 12, 71, "Message",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], -Cell[398893, 10943, 565, 12, 71, "Message",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], -Cell[399461, 10957, 456, 10, 26, "Message",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], -Cell[399920, 10969, 170, 3, 41, "Output",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[395129, 10512, 2603, 85, 435, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], +Cell[397735, 10599, 219, 4, 41, "Output",ExpressionUUID->"322cb07f-73ae-4dc1-990a-67b89d0faf30"] }, Open ]], Cell[CellGroupData[{ -Cell[400127, 10977, 2054, 59, 116, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], -Cell[402184, 11038, 559, 12, 71, "Message",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], -Cell[402746, 11052, 559, 12, 71, "Message",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], -Cell[403308, 11066, 565, 12, 71, "Message",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], -Cell[403876, 11080, 458, 10, 26, "Message",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], -Cell[404337, 11092, 170, 3, 41, "Output",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[397991, 10608, 3712, 118, 575, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], +Cell[401706, 10728, 221, 4, 41, "Output",ExpressionUUID->"1e3ebfac-4839-4a45-a46b-a11fce4b7445"] }, Open ]], +Cell[401942, 10735, 164, 4, 109, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ -Cell[404544, 11100, 1938, 53, 86, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], -Cell[406485, 11155, 20196, 379, 295, "Output",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] +Cell[402131, 10743, 2077, 59, 276, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], +Cell[404211, 10804, 688, 15, 73, "Message",ExpressionUUID->"3f13f16a-5713-42ff-b51b-f4666b0ac007"], +Cell[404902, 10821, 688, 15, 73, "Message",ExpressionUUID->"73f9b6f7-9fd7-4ada-a8bb-20dbb3067edb"], +Cell[405593, 10838, 689, 15, 73, "Message",ExpressionUUID->"df73bc34-fbe8-4289-abbd-f2ee057e5ef5"], +Cell[406285, 10855, 518, 12, 32, "Message",ExpressionUUID->"df0fae3f-68d4-4b37-a7bf-789329a6e407"], +Cell[406806, 10869, 220, 4, 41, "Output",ExpressionUUID->"8f29da31-d224-4676-9917-6dfe5ce36b03"] }, Open ]], Cell[CellGroupData[{ -Cell[426718, 11539, 2094, 60, 116, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], -Cell[428815, 11601, 503, 11, 48, "Message",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], -Cell[429321, 11614, 505, 11, 48, "Message",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], -Cell[429829, 11627, 506, 11, 48, "Message",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], -Cell[430338, 11640, 455, 10, 26, "Message",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], -Cell[430796, 11652, 55770, 961, 290, "Output",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] +Cell[407063, 10878, 2077, 59, 276, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], +Cell[409143, 10939, 688, 15, 73, "Message",ExpressionUUID->"b535ca66-940b-4d5c-8c1e-308e9addd8c8"], +Cell[409834, 10956, 690, 15, 73, "Message",ExpressionUUID->"de96ce64-0a83-413c-b58c-45bc679e4da0"], +Cell[410527, 10973, 689, 15, 73, "Message",ExpressionUUID->"17ff6abb-b73a-4228-907c-767daccf9af8"], +Cell[411219, 10990, 516, 12, 32, "Message",ExpressionUUID->"1f3d4f64-a292-4303-95af-69fa58289e67"], +Cell[411738, 11004, 217, 4, 41, "Output",ExpressionUUID->"656ff11b-5315-417f-b4f8-5b4a68613cc9"] }, Open ]], -Cell[486581, 12616, 2455, 69, 140, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], -Cell[489039, 12687, 209, 5, 36, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], Cell[CellGroupData[{ -Cell[489273, 12696, 217, 7, 61, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[489493, 12705, 173, 3, 41, "Output",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[411992, 11013, 2053, 55, 232, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], +Cell[414048, 11070, 20399, 382, 297, "Output",ExpressionUUID->"81e549d6-8472-4452-8841-3e1dcb569aac"] }, Open ]], Cell[CellGroupData[{ -Cell[489703, 12713, 1814, 53, 116, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], -Cell[491520, 12768, 506, 11, 48, "Message",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], -Cell[492029, 12781, 508, 11, 48, "Message",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], -Cell[492540, 12794, 509, 11, 48, "Message",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], -Cell[493052, 12807, 458, 10, 26, "Message",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], -Cell[493513, 12819, 24818, 454, 290, "Output",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] +Cell[434484, 11457, 2117, 60, 311, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], +Cell[436604, 11519, 560, 13, 71, "Message",ExpressionUUID->"5cbe2213-b0b7-482d-9e4f-3a9d7496e301"], +Cell[437167, 11534, 563, 13, 71, "Message",ExpressionUUID->"f01a1bf3-08a3-401b-ac60-f2bfd79e7557"], +Cell[437733, 11549, 567, 13, 71, "Message",ExpressionUUID->"d2ed7c51-6d50-4f3c-b6d2-e4daa97ddf0e"], +Cell[438303, 11564, 517, 12, 32, "Message",ExpressionUUID->"743348cf-c592-4bcc-8b1a-33f60fb0fb7d"], +Cell[438823, 11578, 24044, 442, 290, "Output",ExpressionUUID->"543d84ea-a273-4643-a3a0-828caf2f38d3"] }, Open ]], Cell[CellGroupData[{ -Cell[518368, 13278, 1616, 48, 86, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], -Cell[519987, 13328, 582, 12, 71, "Message",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], -Cell[520572, 13342, 588, 12, 71, "Message",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], -Cell[521163, 13356, 590, 12, 71, "Message",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], -Cell[521756, 13370, 458, 10, 26, "Message",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], -Cell[522217, 13382, 171, 3, 41, "Output",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] +Cell[462904, 12025, 2481, 70, 296, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], +Cell[465388, 12097, 9517, 223, 298, "Output",ExpressionUUID->"a8ffee24-7cba-47f8-9c23-1ddafa3282b4"] }, Open ]], Cell[CellGroupData[{ -Cell[522425, 13390, 2251, 64, 81, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], -Cell[524679, 13456, 557, 12, 71, "Message",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], -Cell[525239, 13470, 560, 12, 71, "Message",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], -Cell[525802, 13484, 565, 12, 71, "Message",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], -Cell[526370, 13498, 458, 10, 26, "Message",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], -Cell[526831, 13510, 172, 3, 41, "Output",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] +Cell[474942, 12325, 232, 5, 36, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], +Cell[475177, 12332, 30404, 573, 290, "Output",ExpressionUUID->"39234b0d-8791-4c24-9cef-469e7b9f6b9f"] }, Open ]], Cell[CellGroupData[{ -Cell[527040, 13518, 2218, 64, 81, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], -Cell[529261, 13584, 559, 12, 71, "Message",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], -Cell[529823, 13598, 562, 12, 71, "Message",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], -Cell[530388, 13612, 563, 12, 71, "Message",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], -Cell[530954, 13626, 458, 10, 26, "Message",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], -Cell[531415, 13638, 170, 3, 41, "Output",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] +Cell[505618, 12910, 240, 7, 61, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], +Cell[505861, 12919, 220, 4, 41, "Output",ExpressionUUID->"e2d4f93e-1166-4d7c-82cc-195750fdfe5f"] }, Open ]], Cell[CellGroupData[{ -Cell[531622, 13646, 2221, 64, 81, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], -Cell[533846, 13712, 559, 12, 71, "Message",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], -Cell[534408, 13726, 562, 12, 71, "Message",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], -Cell[534973, 13740, 563, 12, 71, "Message",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], -Cell[535539, 13754, 458, 10, 26, "Message",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], -Cell[536000, 13766, 171, 3, 41, "Output",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] +Cell[506118, 12928, 1837, 53, 311, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], +Cell[507958, 12983, 571, 13, 71, "Message",ExpressionUUID->"b50c7c97-7864-4120-895a-5a832ca9d48f"], +Cell[508532, 12998, 574, 13, 71, "Message",ExpressionUUID->"071125d9-04f4-434f-b666-41f1949ce810"], +Cell[509109, 13013, 577, 13, 71, "Message",ExpressionUUID->"6fee666f-d988-4a01-b833-6c53ed52fbab"], +Cell[509689, 13028, 517, 12, 32, "Message",ExpressionUUID->"60541522-cc4d-4bde-a14b-c37486a106c6"], +Cell[510209, 13042, 25187, 460, 290, "Output",ExpressionUUID->"b7b25a0a-f011-4248-adef-ce72b060bdbd"] }, Open ]], Cell[CellGroupData[{ -Cell[536208, 13774, 213, 6, 60, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], -Cell[536424, 13782, 173, 3, 41, "Output",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] +Cell[535433, 13507, 1616, 48, 132, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], +Cell[537052, 13557, 688, 15, 73, "Message",ExpressionUUID->"f227eee7-ce4e-4870-bb4e-7b4edeb0f968"], +Cell[537743, 13574, 687, 15, 73, "Message",ExpressionUUID->"8fbdeae9-1ea8-4cc7-bd9c-786991b074ab"], +Cell[538433, 13591, 687, 15, 73, "Message",ExpressionUUID->"8f8a7288-8a5a-4e78-8ddb-59daad6a995c"], +Cell[539123, 13608, 514, 12, 32, "Message",ExpressionUUID->"ddc8b8b8-7d17-4c57-9e15-636450d036fd"], +Cell[539640, 13622, 218, 4, 41, "Output",ExpressionUUID->"0b1868eb-9a88-4d1a-a338-bb89e0779ab7"] }, Open ]], -Cell[536612, 13788, 245, 5, 36, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[536882, 13797, 558, 19, 66, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[537443, 13818, 170, 3, 41, "Output",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] +Cell[539895, 13631, 2274, 64, 348, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], +Cell[542172, 13697, 687, 15, 73, "Message",ExpressionUUID->"7e6a8551-2377-4e29-be3c-ec2e4a19b406"], +Cell[542862, 13714, 689, 15, 73, "Message",ExpressionUUID->"ccb159d4-9926-4b28-810b-fb6c06718bb8"], +Cell[543554, 13731, 688, 15, 73, "Message",ExpressionUUID->"4a1bd748-6b42-422f-a8d0-bb0b779fb832"], +Cell[544245, 13748, 515, 12, 32, "Message",ExpressionUUID->"7cb7d44b-8ca9-4e64-9210-c72e72eae3f6"], +Cell[544763, 13762, 218, 4, 41, "Output",ExpressionUUID->"e97fa9e0-5fd3-4250-a9f8-9abbafda7e25"] }, Open ]], Cell[CellGroupData[{ -Cell[537650, 13826, 170, 5, 71, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[537823, 13833, 173, 3, 41, "Output",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] +Cell[545018, 13771, 2230, 63, 348, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], +Cell[547251, 13836, 688, 15, 73, "Message",ExpressionUUID->"f66e58ea-c873-40ef-a37b-8087d6ad590c"], +Cell[547942, 13853, 689, 15, 73, "Message",ExpressionUUID->"0f9ef59c-d99f-4b5a-8494-d8cb9e4126a4"], +Cell[548634, 13870, 692, 15, 73, "Message",ExpressionUUID->"6c69a94a-9cd1-4597-bf5a-0124101caaee"], +Cell[549329, 13887, 519, 12, 32, "Message",ExpressionUUID->"8adc6ee4-84e5-4ae8-a6c5-a6530733e69e"], +Cell[549851, 13901, 219, 4, 41, "Output",ExpressionUUID->"8fe6b6fe-1d0d-4f9b-9450-bfd6dfc02803"] }, Open ]], Cell[CellGroupData[{ -Cell[538033, 13841, 181, 5, 55, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[538217, 13848, 171, 3, 41, "Output",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] +Cell[550107, 13910, 2233, 63, 348, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], +Cell[552343, 13975, 691, 15, 73, "Message",ExpressionUUID->"4c039fc4-8c5e-47ef-b184-037de968362c"], +Cell[553037, 13992, 690, 15, 73, "Message",ExpressionUUID->"e5f66ba2-3769-486a-bea4-ab21bfdac0b9"], +Cell[553730, 14009, 694, 15, 73, "Message",ExpressionUUID->"a8d14968-7d28-4b59-a6f7-5b085e51d005"], +Cell[554427, 14026, 518, 12, 32, "Message",ExpressionUUID->"0d219fef-8c50-46a5-a695-bd746477fc2b"], +Cell[554948, 14040, 219, 4, 41, "Output",ExpressionUUID->"3a508a12-2aac-4a7d-8b9b-2846ef6515fc"] }, Open ]], Cell[CellGroupData[{ -Cell[538425, 13856, 6055, 185, 431, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[544483, 14043, 172, 3, 41, "Output",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] +Cell[555204, 14049, 236, 6, 60, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], +Cell[555443, 14057, 218, 4, 41, "Output",ExpressionUUID->"a3e1e882-4bb5-42af-896a-afd0a2b6f723"] }, Open ]], +Cell[555676, 14064, 271, 6, 109, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[544692, 14051, 368, 9, 53, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[545063, 14062, 172, 3, 41, "Output",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] +Cell[555972, 14074, 558, 19, 66, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], +Cell[556533, 14095, 219, 4, 41, "Output",ExpressionUUID->"0355eda8-2f24-4c07-9952-a7f438372dc3"] }, Open ]], Cell[CellGroupData[{ -Cell[545272, 14070, 6122, 187, 431, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[551397, 14259, 173, 3, 41, "Output",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] +Cell[556789, 14104, 170, 5, 71, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], +Cell[556962, 14111, 221, 4, 41, "Output",ExpressionUUID->"d8da68eb-2fcf-4514-a7ed-427e1a918776"] }, Open ]], Cell[CellGroupData[{ -Cell[551607, 14267, 368, 9, 53, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[551978, 14278, 170, 3, 41, "Output",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] +Cell[557220, 14120, 181, 5, 55, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], +Cell[557404, 14127, 218, 4, 41, "Output",ExpressionUUID->"a0b2f278-1f63-423c-bd9c-ab8df61105fb"] }, Open ]], Cell[CellGroupData[{ -Cell[552185, 14286, 2663, 88, 215, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[554851, 14376, 171, 3, 41, "Output",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] +Cell[557659, 14136, 6055, 185, 831, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], +Cell[563717, 14323, 220, 4, 41, "Output",ExpressionUUID->"fdd51f7e-ec60-4490-b719-e0acbfe9d3ab"] }, Open ]], Cell[CellGroupData[{ -Cell[555059, 14384, 2603, 85, 215, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[557665, 14471, 173, 3, 41, "Output",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] +Cell[563974, 14332, 368, 9, 53, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], +Cell[564345, 14343, 222, 4, 41, "Output",ExpressionUUID->"f4a9c223-859f-4cc7-9d74-e7419ef62d5e"] }, Open ]], Cell[CellGroupData[{ -Cell[557875, 14479, 3712, 118, 316, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[561590, 14599, 174, 3, 41, "Output",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] +Cell[564604, 14352, 6122, 187, 900, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], +Cell[570729, 14541, 217, 4, 41, "Output",ExpressionUUID->"b23d9864-a975-415a-9851-620d95ede675"] }, Open ]], Cell[CellGroupData[{ -Cell[561801, 14607, 2049, 58, 116, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], -Cell[563853, 14667, 579, 12, 71, "Message",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], -Cell[564435, 14681, 582, 12, 71, "Message",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], -Cell[565020, 14695, 584, 12, 71, "Message",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], -Cell[565607, 14709, 458, 10, 26, "Message",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], -Cell[566068, 14721, 172, 3, 41, "Output",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] +Cell[570983, 14550, 368, 9, 53, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], +Cell[571354, 14561, 219, 4, 41, "Output",ExpressionUUID->"8903c9e3-f933-48be-878b-1fa9852eca76"] }, Open ]], Cell[CellGroupData[{ -Cell[566277, 14729, 2054, 59, 116, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], -Cell[568334, 14790, 577, 12, 71, "Message",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], -Cell[568914, 14804, 580, 12, 71, "Message",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], -Cell[569497, 14818, 583, 12, 71, "Message",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], -Cell[570083, 14832, 456, 10, 26, "Message",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], -Cell[570542, 14844, 171, 3, 41, "Output",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] +Cell[571610, 14570, 2663, 88, 435, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], +Cell[574276, 14660, 219, 4, 41, "Output",ExpressionUUID->"70536232-a51f-42a8-9e51-fb0467b26129"] }, Open ]], Cell[CellGroupData[{ -Cell[570750, 14852, 2030, 55, 63, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], -Cell[572783, 14909, 20493, 384, 295, "Output",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] +Cell[574532, 14669, 2603, 85, 435, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], +Cell[577138, 14756, 222, 4, 41, "Output",ExpressionUUID->"6f58d183-076a-46e7-a80a-233921c9fdbf"] }, Open ]], Cell[CellGroupData[{ -Cell[593313, 15298, 2120, 60, 116, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], -Cell[595436, 15360, 501, 11, 48, "Message",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], -Cell[595940, 15373, 504, 11, 48, "Message",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], -Cell[596447, 15386, 508, 11, 48, "Message",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], -Cell[596958, 15399, 456, 10, 26, "Message",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], -Cell[597417, 15411, 31462, 562, 290, "Output",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] +Cell[577397, 14765, 3712, 118, 575, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], +Cell[581112, 14885, 221, 4, 41, "Output",ExpressionUUID->"f58d3733-cdbc-46f7-a9a3-26a1d866693a"] }, Open ]], -Cell[628894, 15976, 209, 5, 36, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], Cell[CellGroupData[{ -Cell[629128, 15985, 1616, 48, 86, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], -Cell[630747, 16035, 596, 12, 71, "Message",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], -Cell[631346, 16049, 602, 12, 71, "Message",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], -Cell[631951, 16063, 605, 12, 109, "Message",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], -Cell[632559, 16077, 458, 10, 109, "Message",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], -Cell[633020, 16089, 171, 3, 109, "Output",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] +Cell[581370, 14894, 2074, 59, 276, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], +Cell[583447, 14955, 689, 15, 73, "Message",ExpressionUUID->"f9ac70aa-8755-4fe9-bf39-09cc8276fd66"], +Cell[584139, 14972, 689, 15, 73, "Message",ExpressionUUID->"07f4be32-b6cc-4ccb-a673-89546866c9f0"], +Cell[584831, 14989, 691, 15, 73, "Message",ExpressionUUID->"0e3bbfb3-94e9-41c2-8645-69dfc43d3de8"], +Cell[585525, 15006, 517, 12, 32, "Message",ExpressionUUID->"e89b7c3b-bc21-4888-8e5d-e044dcf90f1c"], +Cell[586045, 15020, 222, 4, 41, "Output",ExpressionUUID->"415c9f31-ebc2-4146-a1fa-9432fa3a7503"] }, Open ]], Cell[CellGroupData[{ -Cell[633228, 16097, 2251, 64, 109, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], -Cell[635482, 16163, 577, 12, 71, "Message",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], -Cell[636062, 16177, 580, 12, 71, "Message",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], -Cell[636645, 16191, 586, 12, 71, "Message",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], -Cell[637234, 16205, 458, 10, 26, "Message",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], -Cell[637695, 16217, 173, 3, 41, "Output",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] +Cell[586304, 15029, 2077, 59, 276, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], +Cell[588384, 15090, 689, 15, 73, "Message",ExpressionUUID->"39136fa3-295a-464a-8199-467608ccbcfb"], +Cell[589076, 15107, 691, 15, 73, "Message",ExpressionUUID->"4bea0f1c-ad6f-41ab-9739-19e6f59c4be3"], +Cell[589770, 15124, 691, 15, 73, "Message",ExpressionUUID->"962e25de-f479-4c89-8725-3b6b7867cdc3"], +Cell[590464, 15141, 516, 12, 32, "Message",ExpressionUUID->"c5c365a2-0fb2-4042-8cc6-a6ebe9d61c8b"], +Cell[590983, 15155, 222, 4, 41, "Output",ExpressionUUID->"c1ad2105-d6a6-436b-aa12-1918b3c8dc26"] }, Open ]], Cell[CellGroupData[{ -Cell[637905, 16225, 2219, 64, 81, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], -Cell[640127, 16291, 579, 12, 71, "Message",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], -Cell[640709, 16305, 580, 12, 71, "Message",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], -Cell[641292, 16319, 586, 12, 71, "Message",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], -Cell[641881, 16333, 458, 10, 26, "Message",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], -Cell[642342, 16345, 171, 3, 41, "Output",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] +Cell[591242, 15164, 2053, 55, 232, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], +Cell[593298, 15221, 20272, 382, 300, "Output",ExpressionUUID->"12f302ce-a971-449c-917b-b074e805cf48"] }, Open ]], Cell[CellGroupData[{ -Cell[642550, 16353, 2219, 64, 81, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], -Cell[644772, 16419, 576, 12, 71, "Message",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], -Cell[645351, 16433, 580, 12, 71, "Message",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], -Cell[645934, 16447, 584, 12, 71, "Message",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], -Cell[646521, 16461, 458, 10, 26, "Message",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], -Cell[646982, 16473, 173, 3, 41, "Output",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] +Cell[613607, 15608, 2143, 60, 311, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], +Cell[615753, 15670, 534, 12, 71, "Message",ExpressionUUID->"1c80c11f-c6d2-4136-8a62-1a702d77e4d1"], +Cell[616290, 15684, 539, 12, 71, "Message",ExpressionUUID->"2418a4e8-164c-43d4-a860-4959aff579c5"], +Cell[616832, 15698, 541, 12, 71, "Message",ExpressionUUID->"b86a423f-09a3-4d57-aa59-2f130013e816"], +Cell[617376, 15712, 490, 11, 32, "Message",ExpressionUUID->"b2285e05-b89c-44b2-a33c-75fa640b54fd"], +Cell[617869, 15725, 25359, 465, 290, "Output",ExpressionUUID->"95df8813-14a6-462c-b0f5-fe4547ddbf36"] }, Open ]], Cell[CellGroupData[{ -Cell[647192, 16481, 212, 6, 60, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], -Cell[647407, 16489, 172, 3, 41, "Output",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] +Cell[643265, 16195, 232, 5, 36, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], +Cell[643500, 16202, 31720, 597, 290, "Output",ExpressionUUID->"7812efcc-4973-4f01-9733-bdbdc3d14232"] }, Open ]], -Cell[647594, 16495, 244, 5, 36, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[647863, 16504, 558, 19, 66, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[648424, 16525, 171, 3, 41, "Output",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] +Cell[675257, 16804, 1616, 48, 132, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], +Cell[676876, 16854, 664, 14, 73, "Message",ExpressionUUID->"eb28ef7d-f171-4ed4-900a-fdafea0fb1c3"], +Cell[677543, 16870, 663, 14, 73, "Message",ExpressionUUID->"51dfd873-35dc-48b9-ae15-3984f9fbe95b"], +Cell[678209, 16886, 662, 14, 73, "Message",ExpressionUUID->"8c8a86de-3810-4c80-a36a-16c4a48c5235"], +Cell[678874, 16902, 490, 11, 32, "Message",ExpressionUUID->"399e059b-11da-4e19-a6c5-a24c7858cdc6"], +Cell[679367, 16915, 193, 3, 41, "Output",ExpressionUUID->"d1b50878-95c3-4e69-b818-3e2a46f9d74d"] }, Open ]], Cell[CellGroupData[{ -Cell[648632, 16533, 170, 5, 71, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[648805, 16540, 171, 3, 41, "Output",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] +Cell[679597, 16923, 2274, 64, 348, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], +Cell[681874, 16989, 662, 14, 73, "Message",ExpressionUUID->"3f49e7b5-4248-4807-8b12-7dbc054a3f83"], +Cell[682539, 17005, 662, 14, 73, "Message",ExpressionUUID->"b098ee42-763b-499b-b723-cabff9499074"], +Cell[683204, 17021, 662, 14, 73, "Message",ExpressionUUID->"81224e67-5567-4c7d-8e52-e0c650f9c133"], +Cell[683869, 17037, 490, 11, 32, "Message",ExpressionUUID->"3eb02018-3d47-472a-a7e8-e267fafd1c8c"], +Cell[684362, 17050, 195, 3, 41, "Output",ExpressionUUID->"4aa2b360-4e23-4a86-9030-8865be2c593e"] }, Open ]], Cell[CellGroupData[{ -Cell[649013, 16548, 181, 5, 55, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[649197, 16555, 173, 3, 41, "Output",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] +Cell[684594, 17058, 2231, 63, 348, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], +Cell[686828, 17123, 664, 14, 73, "Message",ExpressionUUID->"741c3221-0b45-4b7f-a4a7-9d4680d05020"], +Cell[687495, 17139, 664, 14, 73, "Message",ExpressionUUID->"8a4fe311-ed46-4d1d-a6e7-d2cd2962c8ef"], +Cell[688162, 17155, 664, 14, 73, "Message",ExpressionUUID->"729fee61-3c54-472e-afd4-c64d529f3824"], +Cell[688829, 17171, 492, 11, 32, "Message",ExpressionUUID->"8f5da751-c5a0-4e14-8e06-3a78fa58269d"], +Cell[689324, 17184, 197, 3, 41, "Output",ExpressionUUID->"03241197-2902-46ac-965d-6685f7240979"] }, Open ]], Cell[CellGroupData[{ -Cell[649407, 16563, 6055, 185, 431, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[655465, 16750, 173, 3, 41, "Output",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] +Cell[689558, 17192, 2231, 63, 348, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], +Cell[691792, 17257, 661, 14, 73, "Message",ExpressionUUID->"bd592535-e4bc-4f1d-a257-37461114c1d4"], +Cell[692456, 17273, 661, 14, 73, "Message",ExpressionUUID->"aeb76550-28f9-4f16-a687-0082c4e58673"], +Cell[693120, 17289, 663, 14, 73, "Message",ExpressionUUID->"c39e5e6e-3583-4325-ad5f-cc14a9b38daa"], +Cell[693786, 17305, 489, 11, 32, "Message",ExpressionUUID->"9293a222-f48d-4e42-a1ff-0c6a5e9a9f07"], +Cell[694278, 17318, 195, 3, 41, "Output",ExpressionUUID->"571fecde-b4b7-485f-a035-b2d2f13f8c0b"] }, Open ]], Cell[CellGroupData[{ -Cell[655675, 16758, 368, 9, 53, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[656046, 16769, 172, 3, 41, "Output",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] +Cell[694510, 17326, 235, 6, 60, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], +Cell[694748, 17334, 197, 3, 41, "Output",ExpressionUUID->"e5b98dfe-6ccd-4442-ad27-ec6a2f05a20a"] }, Open ]], +Cell[694960, 17340, 270, 6, 109, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[656255, 16777, 6122, 187, 431, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[662380, 16966, 173, 3, 41, "Output",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] +Cell[695255, 17350, 558, 19, 66, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], +Cell[695816, 17371, 193, 3, 41, "Output",ExpressionUUID->"84c01c6a-f96e-432c-a3ec-2d67205cf403"] }, Open ]], Cell[CellGroupData[{ -Cell[662590, 16974, 368, 9, 53, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[662961, 16985, 172, 3, 41, "Output",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] +Cell[696046, 17379, 170, 5, 71, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], +Cell[696219, 17386, 193, 3, 41, "Output",ExpressionUUID->"710b31f7-a4c8-4913-98c5-f8c7184d51ae"] }, Open ]], Cell[CellGroupData[{ -Cell[663170, 16993, 2663, 88, 215, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[665836, 17083, 173, 3, 41, "Output",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] +Cell[696449, 17394, 181, 5, 55, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], +Cell[696633, 17401, 197, 3, 41, "Output",ExpressionUUID->"90e504df-c376-4047-b005-84e73339c026"] }, Open ]], Cell[CellGroupData[{ -Cell[666046, 17091, 2603, 85, 215, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[668652, 17178, 171, 3, 41, "Output",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] +Cell[696867, 17409, 6055, 185, 831, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], +Cell[702925, 17596, 195, 3, 41, "Output",ExpressionUUID->"14ccd4e2-4ee9-43f8-976e-66b186beba6d"] }, Open ]], Cell[CellGroupData[{ -Cell[668860, 17186, 3712, 118, 316, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[672575, 17306, 174, 3, 41, "Output",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] +Cell[703157, 17604, 368, 9, 53, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], +Cell[703528, 17615, 196, 3, 41, "Output",ExpressionUUID->"02094abd-713c-483c-9024-c40b07610f32"] }, Open ]], Cell[CellGroupData[{ -Cell[672786, 17314, 2054, 59, 116, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], -Cell[674843, 17375, 574, 12, 71, "Message",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], -Cell[675420, 17389, 580, 12, 71, "Message",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], -Cell[676003, 17403, 580, 12, 71, "Message",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], -Cell[676586, 17417, 456, 10, 26, "Message",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], -Cell[677045, 17429, 172, 3, 41, "Output",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] +Cell[703761, 17623, 6122, 187, 900, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], +Cell[709886, 17812, 194, 3, 41, "Output",ExpressionUUID->"9393edbb-ec53-48d6-af6c-c3475e528fcc"] }, Open ]], Cell[CellGroupData[{ -Cell[677254, 17437, 2054, 59, 116, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], -Cell[679311, 17498, 576, 12, 71, "Message",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], -Cell[679890, 17512, 577, 12, 71, "Message",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], -Cell[680470, 17526, 582, 12, 71, "Message",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], -Cell[681055, 17540, 458, 10, 26, "Message",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], -Cell[681516, 17552, 172, 3, 41, "Output",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] +Cell[710117, 17820, 368, 9, 53, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], +Cell[710488, 17831, 194, 3, 41, "Output",ExpressionUUID->"d6a1eb90-a2e8-400c-ac93-ee5bd6d093bb"] }, Open ]], Cell[CellGroupData[{ -Cell[681725, 17560, 2028, 55, 63, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], -Cell[683756, 17617, 20021, 378, 295, "Output",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] +Cell[710719, 17839, 2663, 88, 435, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], +Cell[713385, 17929, 196, 3, 41, "Output",ExpressionUUID->"0ddc5a50-9560-414a-85ae-b7090c1b8e6e"] }, Open ]], Cell[CellGroupData[{ -Cell[703814, 18000, 2146, 61, 109, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], -Cell[705963, 18063, 502, 11, 109, "Message",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], -Cell[706468, 18076, 506, 11, 48, "Message",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], -Cell[706977, 18089, 508, 11, 48, "Message",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], -Cell[707488, 18102, 456, 10, 26, "Message",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], -Cell[707947, 18114, 30015, 538, 290, "Output",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] +Cell[713618, 17937, 2603, 85, 435, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], +Cell[716224, 18024, 193, 3, 41, "Output",ExpressionUUID->"79bfb413-9f4b-4add-8d6c-58589f937fd3"] }, Open ]], -Cell[737977, 18655, 209, 5, 36, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], Cell[CellGroupData[{ -Cell[738211, 18664, 1590, 47, 86, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], -Cell[739804, 18713, 342, 6, 26, "Message",ExpressionUUID->"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], -Cell[740149, 18721, 101, 0, 41, "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[716454, 18032, 3712, 118, 575, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], +Cell[720169, 18152, 196, 3, 41, "Output",ExpressionUUID->"38dc0049-26f6-4ba4-98cd-d678a9267b90"] }, Open ]], Cell[CellGroupData[{ -Cell[740287, 18726, 2249, 64, 81, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], -Cell[742539, 18792, 342, 6, 26, "Message",ExpressionUUID->"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], -Cell[742884, 18800, 342, 6, 26, "Message",ExpressionUUID->"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], -Cell[743229, 18808, 101, 0, 41, "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[720402, 18160, 2077, 59, 276, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], +Cell[722482, 18221, 663, 14, 73, "Message",ExpressionUUID->"8c0a031b-c149-4d8f-a2c0-610e052fabd4"], +Cell[723148, 18237, 663, 14, 73, "Message",ExpressionUUID->"2d072928-a4a5-4deb-876b-780297e6cdda"], +Cell[723814, 18253, 663, 14, 73, "Message",ExpressionUUID->"dcf372b7-6fec-406f-a6b0-835ba7440df5"], +Cell[724480, 18269, 490, 11, 32, "Message",ExpressionUUID->"02e5aa2d-8351-49ae-9d80-205a5da355ff"], +Cell[724973, 18282, 197, 3, 41, "Output",ExpressionUUID->"c23af0a6-6592-4d4f-a6e1-cf2a58d9a2b9"] }, Open ]], Cell[CellGroupData[{ -Cell[743367, 18813, 2221, 64, 81, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], -Cell[745591, 18879, 342, 6, 26, "Message",ExpressionUUID->"566a849f-fc85-4d42-a545-a46d44cf7346"], -Cell[745936, 18887, 342, 6, 26, "Message",ExpressionUUID->"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], -Cell[746281, 18895, 100, 0, 41, "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[725207, 18290, 2077, 59, 276, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], +Cell[727287, 18351, 665, 14, 73, "Message",ExpressionUUID->"4da6d97c-01cd-4666-a99f-143a8652a057"], +Cell[727955, 18367, 667, 14, 73, "Message",ExpressionUUID->"0878340e-20db-4e2b-a663-980c4836acbc"], +Cell[728625, 18383, 665, 14, 73, "Message",ExpressionUUID->"753805c7-e53f-4973-837d-19e01026bd8f"], +Cell[729293, 18399, 494, 11, 32, "Message",ExpressionUUID->"b687b4d7-fdbb-4c91-ab7b-94738711c11d"], +Cell[729790, 18412, 194, 3, 41, "Output",ExpressionUUID->"549b345d-3de2-4ad5-a8eb-e1f45abf0c06"] }, Open ]], Cell[CellGroupData[{ -Cell[746418, 18900, 2223, 64, 81, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], -Cell[748644, 18966, 342, 6, 26, "Message",ExpressionUUID->"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], -Cell[748989, 18974, 342, 6, 26, "Message",ExpressionUUID->"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], -Cell[749334, 18982, 101, 0, 41, "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[730021, 18420, 2051, 55, 232, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], +Cell[732075, 18477, 20339, 382, 295, "Output",ExpressionUUID->"7d868138-0e46-4bb6-9b05-7af8cc8ac2cf"] }, Open ]], Cell[CellGroupData[{ -Cell[749472, 18987, 213, 6, 60, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[749688, 18995, 102, 0, 41, "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[752451, 18864, 2168, 61, 311, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], +Cell[754622, 18927, 538, 12, 71, "Message",ExpressionUUID->"2fe38918-74fa-47be-b239-c8ca7938949e"], +Cell[755163, 18941, 540, 12, 71, "Message",ExpressionUUID->"95f55097-f8d8-4a97-bf27-2923e91bb393"], +Cell[755706, 18955, 542, 12, 71, "Message",ExpressionUUID->"9b6f4353-b9cd-41ea-b5bc-1d4ed20bb900"], +Cell[756251, 18969, 492, 11, 32, "Message",ExpressionUUID->"99feca30-b70c-444c-baf9-34375316690f"], +Cell[756746, 18982, 24800, 453, 290, "Output",ExpressionUUID->"b86e9daf-08f1-481c-8746-788589707ede"] }, Open ]], -Cell[749805, 18998, 186, 4, 36, "Input",ExpressionUUID->"5860aea8-afeb-4d17-a86c-19f24e0a5bcc"] +Cell[CellGroupData[{ +Cell[781583, 19440, 232, 5, 36, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], +Cell[781818, 19447, 31160, 585, 290, "Output",ExpressionUUID->"dcce8ba9-eb9c-4436-a11a-e84908ccd17a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[813015, 20037, 1616, 48, 132, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], +Cell[814634, 20087, 643, 14, 73, "Message",ExpressionUUID->"59801c17-c1dd-4e9e-8635-85c170cd82a4"], +Cell[815280, 20103, 642, 14, 73, "Message",ExpressionUUID->"4ac5f2a6-b1ae-4edf-b3b3-24f04d707e99"], +Cell[815925, 20119, 640, 14, 73, "Message",ExpressionUUID->"f0ce1932-217e-4219-bd85-5ed22156d939"], +Cell[816568, 20135, 468, 11, 32, "Message",ExpressionUUID->"4ecfd86a-d49a-4708-a30d-0a8ee04ea3eb"], +Cell[817039, 20148, 171, 3, 41, "Output",ExpressionUUID->"ef8020dc-932a-4c9d-8906-0a093f3f7891"] +}, Open ]], +Cell[CellGroupData[{ +Cell[817247, 20156, 2272, 64, 348, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], +Cell[819522, 20222, 641, 14, 73, "Message",ExpressionUUID->"557f4798-8c19-4bd5-bba1-6930e9ef4e9f"], +Cell[820166, 20238, 641, 14, 73, "Message",ExpressionUUID->"03d02e4b-4459-4ed5-95c6-fbde1758a4b9"], +Cell[820810, 20254, 641, 14, 73, "Message",ExpressionUUID->"942bf536-7262-487d-bdff-c656e421002e"], +Cell[821454, 20270, 470, 11, 32, "Message",ExpressionUUID->"eea7d010-7d21-4170-be5d-9d2cf9c4a0aa"], +Cell[821927, 20283, 173, 3, 41, "Output",ExpressionUUID->"fa853b36-eaa4-453e-8ff6-2a13928026ef"] +}, Open ]], +Cell[CellGroupData[{ +Cell[822137, 20291, 2233, 63, 348, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], +Cell[824373, 20356, 643, 14, 73, "Message",ExpressionUUID->"c6e7b77d-cf7c-4a90-bd99-520b19145e11"], +Cell[825019, 20372, 641, 14, 73, "Message",ExpressionUUID->"16bec83e-6e4b-4f45-ab50-0d670c0537d4"], +Cell[825663, 20388, 643, 14, 73, "Message",ExpressionUUID->"b96b1d50-6892-4eba-bd1e-2cc4363fd566"], +Cell[826309, 20404, 468, 11, 32, "Message",ExpressionUUID->"072e6ff9-bbf5-49b3-ab36-666fccb3f9a3"], +Cell[826780, 20417, 171, 3, 41, "Output",ExpressionUUID->"09b9cc27-e1c6-4412-b8ee-9b0430ec1853"] +}, Open ]], +Cell[CellGroupData[{ +Cell[826988, 20425, 2235, 63, 348, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], +Cell[829226, 20490, 643, 14, 73, "Message",ExpressionUUID->"31becd4e-79a3-4d53-b2cd-e701de2214a1"], +Cell[829872, 20506, 643, 14, 73, "Message",ExpressionUUID->"8f32c805-eef6-41a0-9001-ab8038039e4a"], +Cell[830518, 20522, 641, 14, 73, "Message",ExpressionUUID->"d0784183-8422-497a-a689-75301f58a0d7"], +Cell[831162, 20538, 467, 11, 32, "Message",ExpressionUUID->"0a08bb2f-8e66-471b-93cc-7f77002648d3"], +Cell[831632, 20551, 171, 3, 41, "Output",ExpressionUUID->"d4310ab0-a9e9-49a5-b66d-b71d714a0f5e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[831840, 20559, 236, 6, 60, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], +Cell[832079, 20567, 171, 3, 41, "Output",ExpressionUUID->"56a2c805-284c-49e7-a371-337bb3dc5fcf"] +}, Open ]], +Cell[832265, 20573, 209, 4, 109, "Input",ExpressionUUID->"5860aea8-afeb-4d17-a86c-19f24e0a5bcc"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw1.nb b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw1.nb index f584ead..38f8311 100644 --- a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw1.nb +++ b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 596005, 14521] -NotebookOptionsPosition[ 556964, 13900] -NotebookOutlinePosition[ 557375, 13917] -CellTagsIndexPosition[ 557332, 13914] +NotebookDataLength[ 700900, 16456] +NotebookOptionsPosition[ 660544, 15809] +NotebookOutlinePosition[ 660978, 15827] +CellTagsIndexPosition[ 660935, 15824] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,15 +26,13 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.994074211664226*^9, 3.994074212605893*^9}, { 3.994074246621201*^9, 3.994074265935053*^9}}, - CellLabel-> - "In[304]:=",ExpressionUUID->"ba3c332d-ee0d-459f-8b4f-87a6d15e2660"], + CellLabel->"In[1]:=",ExpressionUUID->"ba3c332d-ee0d-459f-8b4f-87a6d15e2660"], Cell[BoxData["1.95`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.994074196804253*^9, 3.994074214075809*^9}, { - 3.9940742497364883`*^9, 3.9940742697527313`*^9}}, - CellLabel-> - "Out[304]=",ExpressionUUID->"556b2940-a91e-4db9-86ab-2d8d70fc38d8"] + 3.9940742497364883`*^9, 3.9940742697527313`*^9}, 3.9943863354889517`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"1d8bf187-8f28-4338-917a-9ae29b284360"] }, Open ]], Cell[CellGroupData[{ @@ -43,15 +41,13 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940740226123867`*^9, 3.994074030397141*^9}}, - CellLabel-> - "In[305]:=",ExpressionUUID->"114295aa-7299-4e80-acb9-2c2dcad002e2"], + CellLabel->"In[2]:=",ExpressionUUID->"114295aa-7299-4e80-acb9-2c2dcad002e2"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.9940741968744993`*^9, 3.994074214306916*^9}, { - 3.994074249779564*^9, 3.9940742697936697`*^9}}, - CellLabel-> - "Out[305]=",ExpressionUUID->"f4fab3ae-36f6-4243-8835-083571caeba3"] + 3.994074249779564*^9, 3.9940742697936697`*^9}, 3.9943863356050262`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"8072b0a0-77e2-4781-99dc-9d60ab0023fe"] }, Open ]], Cell[CellGroupData[{ @@ -60,15 +56,13 @@ Cell[BoxData[ RowBox[{"A1", "=", "172"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994074027305109*^9, 3.994074028074005*^9}}, - CellLabel-> - "In[306]:=",ExpressionUUID->"95c8a061-4ed7-4547-a690-b7ab673958ae"], + CellLabel->"In[3]:=",ExpressionUUID->"95c8a061-4ed7-4547-a690-b7ab673958ae"], Cell[BoxData["172"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994074196887857*^9, 3.994074214318638*^9}, { - 3.9940742497919416`*^9, 3.9940742698063602`*^9}}, - CellLabel-> - "Out[306]=",ExpressionUUID->"acebbc0a-ef2e-4786-83a9-33d2575ba07a"] + 3.9940742497919416`*^9, 3.9940742698063602`*^9}, 3.994386335631488*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"01427106-8d00-4595-8308-31fb7523a84f"] }, Open ]], Cell[CellGroupData[{ @@ -76,15 +70,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[307]:=",ExpressionUUID->"1cc3e765-6d8e-4d58-8fd0-6c3164091ec9"], + CellLabel->"In[4]:=",ExpressionUUID->"1cc3e765-6d8e-4d58-8fd0-6c3164091ec9"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.9940741969012012`*^9, 3.994074214329146*^9}, { - 3.9940742497961063`*^9, 3.994074269818478*^9}}, - CellLabel-> - "Out[307]=",ExpressionUUID->"8d774961-1cc1-496c-824f-88e29b5272af"] + 3.9940742497961063`*^9, 3.994074269818478*^9}, 3.994386335657626*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"31c7d437-afc6-4a0c-b5bc-57882ce11f83"] }, Open ]], Cell[CellGroupData[{ @@ -96,30 +88,26 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[308]:=",ExpressionUUID->"9570a7a8-b674-476f-afc6-4526d7903be2"], + CellLabel->"In[5]:=",ExpressionUUID->"9570a7a8-b674-476f-afc6-4526d7903be2"], Cell[BoxData["0.5435000000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.9940741969137297`*^9, 3.99407421433959*^9}, { - 3.994074249812704*^9, 3.994074269830806*^9}}, - CellLabel-> - "Out[308]=",ExpressionUUID->"88893293-95b6-42eb-bda9-51c2b0e222ca"] + 3.994074249812704*^9, 3.994074269830806*^9}, 3.994386335685074*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"b359c636-3b10-4bf7-bf2e-1b6bb498fc26"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[309]:=",ExpressionUUID->"41426b9d-711a-4a0d-8329-7566ccf3bb96"], + CellLabel->"In[6]:=",ExpressionUUID->"41426b9d-711a-4a0d-8329-7566ccf3bb96"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.9940741969249763`*^9, 3.994074214349977*^9}, { - 3.99407424982506*^9, 3.994074269834938*^9}}, - CellLabel-> - "Out[309]=",ExpressionUUID->"4ada1cc9-9d92-477d-9fe9-e857d09f27e6"] + 3.99407424982506*^9, 3.994074269834938*^9}, 3.994386335714705*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"402baddb-4fc7-4466-a501-d1367996acaa"] }, Open ]], Cell[CellGroupData[{ @@ -130,15 +118,13 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[310]:=",ExpressionUUID->"66cfa4a3-2d38-425d-9c39-ad913b1b5db7"], + CellLabel->"In[7]:=",ExpressionUUID->"66cfa4a3-2d38-425d-9c39-ad913b1b5db7"], Cell[BoxData["6.451105409164632`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.994074196937035*^9, 3.994074214360525*^9}, { - 3.994074249837967*^9, 3.9940742698497963`*^9}}, - CellLabel-> - "Out[310]=",ExpressionUUID->"231a73cd-ade5-4a8b-a646-12b27390f9c7"] + 3.994074249837967*^9, 3.9940742698497963`*^9}, 3.99438633574197*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"cb9bd002-adff-40bb-b6cb-ac9f24cb0193"] }, Open ]], Cell[CellGroupData[{ @@ -150,15 +136,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[311]:=",ExpressionUUID->"16ae2ad5-24a1-4188-b303-f20f4a7a88a5"], + CellLabel->"In[8]:=",ExpressionUUID->"16ae2ad5-24a1-4188-b303-f20f4a7a88a5"], Cell[BoxData["4.734719918224123`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.9940741969492617`*^9, 3.994074214370586*^9}, { - 3.994074249850299*^9, 3.994074269861824*^9}}, - CellLabel-> - "Out[311]=",ExpressionUUID->"44546f67-77fc-4da4-98f4-7c5c042ff1d0"] + 3.994074249850299*^9, 3.994074269861824*^9}, 3.994386335767865*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"deb38261-d0bf-419a-958c-93bb643ed98c"] }, Open ]], Cell[CellGroupData[{ @@ -166,14 +150,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.852277809"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.9940740415240393`*^9}, - CellLabel-> - "In[312]:=",ExpressionUUID->"fd0d3b24-ec74-46d6-9406-92fc0fc7d6fd"], + CellLabel->"In[9]:=",ExpressionUUID->"fd0d3b24-ec74-46d6-9406-92fc0fc7d6fd"], Cell[BoxData["0.852277809`"], "Output", CellChangeTimes->{{3.994074196961275*^9, 3.994074214380481*^9}, { - 3.994074249862259*^9, 3.994074269873619*^9}}, - CellLabel-> - "Out[312]=",ExpressionUUID->"9ba46232-ffc5-4910-828e-9196c12c545d"] + 3.994074249862259*^9, 3.994074269873619*^9}, 3.994386335794394*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"c48328f7-1c83-4cc8-8f00-d5e03f2b2d18"] }, Open ]], Cell[CellGroupData[{ @@ -181,44 +163,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3903505481"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.99407404519888*^9}, - CellLabel-> - "In[313]:=",ExpressionUUID->"d96413c4-e06e-4060-bad6-4d4931ea412c"], + CellLabel->"In[10]:=",ExpressionUUID->"d96413c4-e06e-4060-bad6-4d4931ea412c"], Cell[BoxData["0.3903505481`"], "Output", CellChangeTimes->{{3.99407419697276*^9, 3.9940742143904543`*^9}, { - 3.99407424987506*^9, 3.994074269885377*^9}}, - CellLabel-> - "Out[313]=",ExpressionUUID->"1817b3cb-73d5-4cd8-825c-1255af3a5d27"] + 3.99407424987506*^9, 3.994074269885377*^9}, 3.99438633582008*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"79005102-7a95-4a3a-b1a1-dfad531891f8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[314]:=",ExpressionUUID->"88b2bca7-4c2a-46fa-9951-a957773a8650"], + CellLabel->"In[11]:=",ExpressionUUID->"88b2bca7-4c2a-46fa-9951-a957773a8650"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.9940741969837933`*^9, 3.994074214400448*^9}, { - 3.994074249886661*^9, 3.994074269897275*^9}}, - CellLabel-> - "Out[314]=",ExpressionUUID->"e315d0ac-64aa-4680-8b80-b0ec912e5eb8"] + 3.994074249886661*^9, 3.994074269897275*^9}, 3.994386335845111*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"dc9d7968-136c-4a5c-9a30-d08c951c5fe2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[315]:=",ExpressionUUID->"1b36c2f9-f078-4c25-b52e-69542e9a07fa"], + CellLabel->"In[12]:=",ExpressionUUID->"1b36c2f9-f078-4c25-b52e-69542e9a07fa"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.9940741969946527`*^9, 3.994074214410337*^9}, { - 3.9940742498968973`*^9, 3.994074269909542*^9}}, - CellLabel-> - "Out[315]=",ExpressionUUID->"c087a469-c67f-44df-8f88-df684276a201"] + 3.9940742498968973`*^9, 3.994074269909542*^9}, 3.994386335871147*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"753f7196-e4f4-4857-913c-dc3462edfbee"] }, Open ]], Cell[CellGroupData[{ @@ -242,15 +218,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"1a41ae46-b75b-404f-ab2b-a579c3f324c8"], + CellLabel->"In[13]:=",ExpressionUUID->"1a41ae46-b75b-404f-ab2b-a579c3f324c8"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.994074197005885*^9, 3.994074214421315*^9}, { - 3.994074249908176*^9, 3.994074269922103*^9}}, - CellLabel-> - "Out[316]=",ExpressionUUID->"f46f1558-8cb9-4ae7-8421-f7d9fb9bbc12"] + 3.994074249908176*^9, 3.994074269922103*^9}, 3.9943863358968*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"67f38851-4346-42dc-bd2f-c27359f12287"] }, Open ]], Cell[CellGroupData[{ @@ -274,15 +248,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[317]:=",ExpressionUUID->"844fe406-8e7c-4a7e-8f2c-db07339e9a90"], + CellLabel->"In[14]:=",ExpressionUUID->"844fe406-8e7c-4a7e-8f2c-db07339e9a90"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.994074197017363*^9, 3.994074214431409*^9}, { - 3.994074249918466*^9, 3.99407426993229*^9}}, - CellLabel-> - "Out[317]=",ExpressionUUID->"de77989e-2e29-4965-9d8a-b3b2bd73c11f"] + 3.994074249918466*^9, 3.99407426993229*^9}, 3.994386335922695*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"acfab881-60f6-47d6-b4a1-4f4f2302678d"] }, Open ]], Cell[CellGroupData[{ @@ -337,15 +309,13 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[318]:=",ExpressionUUID->"e81a24ab-eede-410c-8054-c5feb6edf31a"], + CellLabel->"In[15]:=",ExpressionUUID->"e81a24ab-eede-410c-8054-c5feb6edf31a"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994074197029154*^9, 3.994074214441661*^9}, { - 3.9940742499280653`*^9, 3.994074269943099*^9}}, - CellLabel-> - "Out[318]=",ExpressionUUID->"ad960200-974f-4e00-85ed-1d847ef8e232"] + 3.9940742499280653`*^9, 3.994074269943099*^9}, 3.9943863359512367`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"9b9a4d63-44d7-4c82-bd75-c4dfb33da941"] }, Open ]], Cell[CellGroupData[{ @@ -396,16 +366,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"3a1b178e-5a69-420a-a203-40f73d32c2c3"], + CellLabel->"In[16]:=",ExpressionUUID->"3a1b178e-5a69-420a-a203-40f73d32c2c3"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.9940741970396633`*^9, 3.994074214453579*^9}, { - 3.994074249938612*^9, 3.994074269953534*^9}}, - CellLabel-> - "Out[319]=",ExpressionUUID->"fae3d388-ebfc-4878-9768-53581a7d6979"] + 3.994074249938612*^9, 3.994074269953534*^9}, 3.9943863359794693`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"fbc8f77e-1728-425f-93c6-28658ca0ee82"] }, Open ]], Cell[CellGroupData[{ @@ -456,16 +424,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"c9bdf29a-9fbe-42d9-bc00-7dc8477c3939"], + CellLabel->"In[17]:=",ExpressionUUID->"c9bdf29a-9fbe-42d9-bc00-7dc8477c3939"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.994074197050289*^9, 3.994074214467175*^9}, { - 3.994074249949532*^9, 3.9940742699645767`*^9}}, - CellLabel-> - "Out[320]=",ExpressionUUID->"836d8af8-9e32-43d7-a534-0934a706c992"] + 3.994074249949532*^9, 3.9940742699645767`*^9}, 3.994386336012134*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"e5e23f6f-00cc-49c9-8036-b9f75322f601"] }, Open ]], Cell[CellGroupData[{ @@ -520,60 +486,52 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"e320432c-3c96-402c-9032-e06766716510"], + CellLabel->"In[18]:=",ExpressionUUID->"e320432c-3c96-402c-9032-e06766716510"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994074197062862*^9, 3.99407421448357*^9}, { - 3.9940742499608793`*^9, 3.994074269975973*^9}}, - CellLabel-> - "Out[321]=",ExpressionUUID->"1edad1ba-0974-41c6-ab07-caae3fd74e4b"] + 3.9940742499608793`*^9, 3.994074269975973*^9}, 3.99438633602033*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"5d2fcac9-e0da-473a-b028-6315816b5f76"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"704d957b-d36b-49d9-8ccc-7769aea79ca5"], + CellLabel->"In[19]:=",ExpressionUUID->"704d957b-d36b-49d9-8ccc-7769aea79ca5"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.9940741970755367`*^9, 3.994074214495585*^9}, { - 3.994074249972097*^9, 3.9940742699872303`*^9}}, - CellLabel-> - "Out[322]=",ExpressionUUID->"1ce2e0ac-3643-4d1f-bf80-cd8a58bb5197"] + 3.994074249972097*^9, 3.9940742699872303`*^9}, 3.994386336099381*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"9ef3dfe4-366b-49fd-bb68-20a4910e0d73"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"75876833-cff1-4f75-8397-1ea9b241d52a"], + CellLabel->"In[20]:=",ExpressionUUID->"75876833-cff1-4f75-8397-1ea9b241d52a"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994074197089067*^9, 3.994074214507393*^9}, { - 3.99407424998314*^9, 3.994074269998393*^9}}, - CellLabel-> - "Out[323]=",ExpressionUUID->"9e3bf7e0-db3c-4e80-8a7b-5918c1348e38"] + 3.99407424998314*^9, 3.994074269998393*^9}, 3.994386336118589*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"f8420c0d-2f08-41bd-a674-44cac0649bae"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"b1f4f70a-4b77-4e41-abdc-72f1a88c84f5"], + CellLabel->"In[21]:=",ExpressionUUID->"b1f4f70a-4b77-4e41-abdc-72f1a88c84f5"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940741971016483`*^9, 3.9940742145189466`*^9}, { - 3.994074249994322*^9, 3.994074270009439*^9}}, - CellLabel-> - "Out[324]=",ExpressionUUID->"ba99e333-17f0-4c64-aa64-42bc40397bf1"] + 3.994074249994322*^9, 3.994074270009439*^9}, 3.9943863361290283`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"84bda66c-ee21-4c15-bfcf-70c6a5b593bc"] }, Open ]], Cell[CellGroupData[{ @@ -582,31 +540,27 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[325]:=",ExpressionUUID->"dae0ef62-0e09-49f3-a1fe-ebbbb61fab0c"], + CellLabel->"In[22]:=",ExpressionUUID->"dae0ef62-0e09-49f3-a1fe-ebbbb61fab0c"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.9940741971133337`*^9, 3.99407421453058*^9}, { - 3.994074250005796*^9, 3.994074270020775*^9}}, - CellLabel-> - "Out[325]=",ExpressionUUID->"4540ec32-3056-45e9-a498-525004066f9c"] + 3.994074250005796*^9, 3.994074270020775*^9}, 3.994386336139023*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"437c9181-bafb-4fbc-a350-e7a091b6e2f8"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"8fb4cee8-8821-4a2a-b3f1-9e3451a6453d"], + CellLabel->"In[23]:=",ExpressionUUID->"8fb4cee8-8821-4a2a-b3f1-9e3451a6453d"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994074197124381*^9, 3.994074214542293*^9}, { - 3.994074250017613*^9, 3.9940742700324078`*^9}}, - CellLabel-> - "Out[326]=",ExpressionUUID->"b7e29a91-bd30-4a9b-871d-4e041ddab9a8"] + 3.994074250017613*^9, 3.9940742700324078`*^9}, 3.994386336149414*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"d7fa3bb1-b4ad-433a-9821-dfd68dba000c"] }, Open ]], Cell[CellGroupData[{ @@ -616,15 +570,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994074052479707*^9, 3.9940740526225157`*^9}}, - CellLabel-> - "In[327]:=",ExpressionUUID->"552aa3bd-0fd9-4ece-a039-8e81f92de910"], + CellLabel->"In[24]:=",ExpressionUUID->"552aa3bd-0fd9-4ece-a039-8e81f92de910"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.99407419713608*^9, 3.994074214545911*^9}, { - 3.994074250027919*^9, 3.99407427004285*^9}}, - CellLabel-> - "Out[327]=",ExpressionUUID->"4726da29-02d3-4d46-830d-b36f5252be02"] + 3.994074250027919*^9, 3.99407427004285*^9}, 3.994386336159943*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"2ffe608c-09bf-4ead-8141-7414f93e1b8e"] }, Open ]], Cell[CellGroupData[{ @@ -634,15 +586,13 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.99407405616786*^9, 3.994074056966621*^9}}, - CellLabel-> - "In[328]:=",ExpressionUUID->"4c616ef5-570f-464e-b88f-d1ed7313d51f"], + CellLabel->"In[25]:=",ExpressionUUID->"4c616ef5-570f-464e-b88f-d1ed7313d51f"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.994074197147298*^9, 3.99407421455849*^9}, { - 3.9940742500393*^9, 3.994074270054291*^9}}, - CellLabel-> - "Out[328]=",ExpressionUUID->"e974a83d-f03a-4c70-b462-cdaf9dcb68ab"] + 3.9940742500393*^9, 3.994074270054291*^9}, 3.994386336170678*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"64c27e25-6186-41bb-a857-4c894b5d2430"] }, Open ]], Cell[CellGroupData[{ @@ -651,15 +601,13 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[329]:=",ExpressionUUID->"096a1657-78bc-4752-bb7e-95e56b96cadd"], + CellLabel->"In[26]:=",ExpressionUUID->"096a1657-78bc-4752-bb7e-95e56b96cadd"], Cell[BoxData["68"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.994074197159381*^9, 3.994074214569437*^9}, { - 3.9940742500504293`*^9, 3.9940742700651913`*^9}}, - CellLabel-> - "Out[329]=",ExpressionUUID->"96646b9a-8ac9-4994-898d-f1b8a49ca68e"] + 3.9940742500504293`*^9, 3.9940742700651913`*^9}, 3.994386336180687*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"9cab2579-5841-4a3f-a408-f52fe91d3955"] }, Open ]], Cell[CellGroupData[{ @@ -674,15 +622,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"66cc0c50-eaa8-468c-9d8a-c7cb64a85294"], + CellLabel->"In[27]:=",ExpressionUUID->"66cc0c50-eaa8-468c-9d8a-c7cb64a85294"], Cell[BoxData["0.10723666210670314`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994074197172007*^9, 3.994074214580143*^9}, { - 3.994074250060562*^9, 3.9940742700753593`*^9}}, - CellLabel-> - "Out[330]=",ExpressionUUID->"5a0a951a-a4a0-46c3-be2c-79e557f9aff5"] + 3.994074250060562*^9, 3.9940742700753593`*^9}, 3.994386336191285*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"dc724376-74dd-41d9-b9bd-ae7b17c8c5e7"] }, Open ]], Cell[CellGroupData[{ @@ -697,16 +643,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"6f37de12-b072-4ebb-8bef-d789f5667525"], + CellLabel->"In[28]:=",ExpressionUUID->"6f37de12-b072-4ebb-8bef-d789f5667525"], Cell[BoxData[ RowBox[{"-", "2.5678385772913814`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994074197183957*^9, 3.994074214590371*^9}, { - 3.994074250071249*^9, 3.99407427008554*^9}}, - CellLabel-> - "Out[331]=",ExpressionUUID->"7ec0516d-09fb-4e84-8c23-e9f77fc22b6a"] + 3.994074250071249*^9, 3.99407427008554*^9}, 3.994386338744831*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"4540c923-b072-41a4-b097-5ddf5e721562"] }, Open ]], Cell[CellGroupData[{ @@ -737,15 +681,13 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[332]:=",ExpressionUUID->"3f8bb9eb-ad92-4fa5-ae94-7b654151a7fb"], + CellLabel->"In[29]:=",ExpressionUUID->"3f8bb9eb-ad92-4fa5-ae94-7b654151a7fb"], Cell[BoxData["17.339463280274387`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994074197196582*^9, 3.9940742146010637`*^9}, { - 3.994074250082402*^9, 3.9940742700958967`*^9}}, - CellLabel-> - "Out[332]=",ExpressionUUID->"1313161d-41c4-4295-9655-16fc257d0da7"] + 3.994074250082402*^9, 3.9940742700958967`*^9}, 3.994386339049122*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"19beb336-1236-4ec0-ae46-ce4fcb2fc537"] }, Open ]], Cell[CellGroupData[{ @@ -753,15 +695,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[333]:=",ExpressionUUID->"3f76d94e-bd3a-4ad9-ac4d-3895de751d5c"], + CellLabel->"In[30]:=",ExpressionUUID->"3f76d94e-bd3a-4ad9-ac4d-3895de751d5c"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.9940741972101183`*^9, 3.9940742146122723`*^9}, { - 3.994074250094462*^9, 3.994074270106193*^9}}, - CellLabel-> - "Out[333]=",ExpressionUUID->"d0418020-8543-49da-b390-cdfafc389132"] + 3.994074250094462*^9, 3.994074270106193*^9}, 3.994386339085662*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"8bf7761c-b56f-43cc-98bd-b1007d7eabde"] }, Open ]], Cell[CellGroupData[{ @@ -771,20 +711,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994074073155587*^9, 3.994074075499446*^9}}, - CellLabel-> - "In[334]:=",ExpressionUUID->"c538a944-f1cd-45ec-9213-4ee9ba34888e"], + CellLabel->"In[31]:=",ExpressionUUID->"c538a944-f1cd-45ec-9213-4ee9ba34888e"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{{3.9940741972243557`*^9, 3.994074214623012*^9}, { - 3.994074250106516*^9, 3.9940742701165457`*^9}}, - CellLabel-> - "Out[334]=",ExpressionUUID->"c0d9c95d-f8fd-4353-8a02-0398d945711d"] + 3.994074250106516*^9, 3.9940742701165457`*^9}, 3.994386339102161*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"28ffb486-2916-4aec-ac98-bb484622ef4e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[335]:=",ExpressionUUID->"b6ffd985-f8c0-40ec-8c9a-420755112fa1"], + CellLabel->"In[32]:=",ExpressionUUID->"b6ffd985-f8c0-40ec-8c9a-420755112fa1"], Cell[CellGroupData[{ @@ -793,20 +730,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994074078227497*^9, 3.9940740796275997`*^9}}, - CellLabel-> - "In[336]:=",ExpressionUUID->"8b2be4fe-5abe-41c1-8c2b-308221f789c5"], + CellLabel->"In[33]:=",ExpressionUUID->"8b2be4fe-5abe-41c1-8c2b-308221f789c5"], Cell[BoxData["0.765`"], "Output", CellChangeTimes->{{3.994074197245954*^9, 3.994074214636681*^9}, { - 3.9940742501222553`*^9, 3.99407427012961*^9}}, - CellLabel-> - "Out[336]=",ExpressionUUID->"39d87589-88b5-439a-a5c3-1f92e446f010"] + 3.9940742501222553`*^9, 3.99407427012961*^9}, 3.994386339128929*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"f8c0cfa2-24db-4c24-bc82-10a66dc657b1"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[337]:=",ExpressionUUID->"53a13f5f-e05e-47ca-b734-090c55369ce1"], + CellLabel->"In[34]:=",ExpressionUUID->"53a13f5f-e05e-47ca-b734-090c55369ce1"], Cell[CellGroupData[{ @@ -815,20 +749,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940740824169683`*^9, 3.9940740841708183`*^9}}, - CellLabel-> - "In[338]:=",ExpressionUUID->"cf8cda0c-3bb3-4016-a3f5-9c6926bbc271"], + CellLabel->"In[35]:=",ExpressionUUID->"cf8cda0c-3bb3-4016-a3f5-9c6926bbc271"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{{3.994074197269746*^9, 3.994074214649177*^9}, { - 3.994074250142523*^9, 3.994074270141824*^9}}, - CellLabel-> - "Out[338]=",ExpressionUUID->"ef0435dd-913b-4b7c-89c0-a17719b03d16"] + 3.994074250142523*^9, 3.994074270141824*^9}, 3.994386339157749*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"5a48e183-1220-4bb5-ab95-50c3c08cb6bd"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[339]:=",ExpressionUUID->"36067f20-9256-49cd-b13a-2acfaf085868"], + CellLabel->"In[36]:=",ExpressionUUID->"36067f20-9256-49cd-b13a-2acfaf085868"], Cell[CellGroupData[{ @@ -837,20 +768,17 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994074087466568*^9, 3.9940740892428827`*^9}}, - CellLabel-> - "In[340]:=",ExpressionUUID->"896f3cdf-8d20-4b50-ac74-5fc9cae1e9d4"], + CellLabel->"In[37]:=",ExpressionUUID->"896f3cdf-8d20-4b50-ac74-5fc9cae1e9d4"], Cell[BoxData["1.115`"], "Output", CellChangeTimes->{{3.9940741972942533`*^9, 3.9940742146616087`*^9}, { - 3.994074250166238*^9, 3.9940742701540823`*^9}}, - CellLabel-> - "Out[340]=",ExpressionUUID->"87d8fbc3-8359-4b32-8756-b5cbde25a2fb"] + 3.994074250166238*^9, 3.9940742701540823`*^9}, 3.9943863391844053`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"b8610e09-b6a5-4f50-8ccb-0798c5807542"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[341]:=",ExpressionUUID->"13a887da-fdf1-4555-bdc0-cfce424630d2"], + CellLabel->"In[38]:=",ExpressionUUID->"13a887da-fdf1-4555-bdc0-cfce424630d2"], Cell[CellGroupData[{ @@ -859,20 +787,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994074092127721*^9, 3.994074094282755*^9}}, - CellLabel-> - "In[342]:=",ExpressionUUID->"a6b21d46-0453-469c-8b62-efbaebe4b955"], + CellLabel->"In[39]:=",ExpressionUUID->"a6b21d46-0453-469c-8b62-efbaebe4b955"], Cell[BoxData["1.375`"], "Output", CellChangeTimes->{{3.9940741973176317`*^9, 3.9940742146740303`*^9}, { - 3.994074250185948*^9, 3.9940742701663027`*^9}}, - CellLabel-> - "Out[342]=",ExpressionUUID->"9a8b3fab-d57d-4175-8174-701cc8a73330"] + 3.994074250185948*^9, 3.9940742701663027`*^9}, 3.994386339213272*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"c2782ad5-be2c-4886-9304-b4cb89ba295e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[343]:=",ExpressionUUID->"9eedf60d-53ef-4938-baa6-11e02c29cf8f"], + CellLabel->"In[40]:=",ExpressionUUID->"9eedf60d-53ef-4938-baa6-11e02c29cf8f"], Cell[CellGroupData[{ @@ -881,20 +806,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994074098253368*^9, 3.994074099547431*^9}}, - CellLabel-> - "In[344]:=",ExpressionUUID->"ecd7ca77-2fdc-4a6c-b6f5-709a80e8eb24"], + CellLabel->"In[41]:=",ExpressionUUID->"ecd7ca77-2fdc-4a6c-b6f5-709a80e8eb24"], Cell[BoxData["0.545`"], "Output", CellChangeTimes->{{3.9940741973401327`*^9, 3.994074214686512*^9}, { - 3.994074250207786*^9, 3.994074270178926*^9}}, - CellLabel-> - "Out[344]=",ExpressionUUID->"d8529a53-686a-4e4a-a62b-356a2adc2e55"] + 3.994074250207786*^9, 3.994074270178926*^9}, 3.9943863392420893`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"ad54a316-d93a-4954-8b5d-9892a8e15a80"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[345]:=",ExpressionUUID->"0066d7c9-cbac-458f-a9d8-0f394de6b7d7"], + CellLabel->"In[42]:=",ExpressionUUID->"0066d7c9-cbac-458f-a9d8-0f394de6b7d7"], Cell[CellGroupData[{ @@ -903,20 +825,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994074102320486*^9, 3.9940741031259613`*^9}}, - CellLabel-> - "In[346]:=",ExpressionUUID->"eb555cef-293a-4b3f-a8d4-770f015ea832"], + CellLabel->"In[43]:=",ExpressionUUID->"eb555cef-293a-4b3f-a8d4-770f015ea832"], Cell[BoxData["1.35`"], "Output", CellChangeTimes->{{3.994074197360721*^9, 3.994074214698968*^9}, { - 3.9940742502296133`*^9, 3.994074270190978*^9}}, - CellLabel-> - "Out[346]=",ExpressionUUID->"5fa5fe46-82da-47e3-b06f-c0b1b24ac58f"] + 3.9940742502296133`*^9, 3.994074270190978*^9}, 3.99438633926991*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"a721a2dc-cda8-438d-b15d-5aa969d07241"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[347]:=",ExpressionUUID->"2d6d55d5-526d-4fa4-b318-5bfabd7913e0"], + CellLabel->"In[44]:=",ExpressionUUID->"2d6d55d5-526d-4fa4-b318-5bfabd7913e0"], Cell[CellGroupData[{ @@ -924,20 +843,17 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.655"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994074105268124*^9, 3.994074106561956*^9}}, - CellLabel-> - "In[348]:=",ExpressionUUID->"ce46883d-0875-488c-a662-b1a9828b60a4"], + CellLabel->"In[45]:=",ExpressionUUID->"ce46883d-0875-488c-a662-b1a9828b60a4"], Cell[BoxData["0.655`"], "Output", CellChangeTimes->{{3.994074197383122*^9, 3.994074214711643*^9}, { - 3.994074250250944*^9, 3.994074270203269*^9}}, - CellLabel-> - "Out[348]=",ExpressionUUID->"8198cd7f-c43c-436d-a289-efc2055d75e6"] + 3.994074250250944*^9, 3.994074270203269*^9}, 3.994386339297337*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"89f85754-3c4e-41dd-a732-31bbc2ecc04a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[349]:=",ExpressionUUID->"221b8dcb-f609-494a-b36c-40b6472c10a3"], + CellLabel->"In[46]:=",ExpressionUUID->"221b8dcb-f609-494a-b36c-40b6472c10a3"], Cell[CellGroupData[{ @@ -1426,15 +1342,13 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[350]:=",ExpressionUUID->"e446f4d8-14f5-4096-837e-b38ea645f5b1"], + CellLabel->"In[47]:=",ExpressionUUID->"e446f4d8-14f5-4096-837e-b38ea645f5b1"], Cell[BoxData["0.1542863605960474`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.994074197462419*^9, 3.9940742147508163`*^9}, { - 3.994074250298726*^9, 3.994074270240198*^9}}, - CellLabel-> - "Out[350]=",ExpressionUUID->"782841f2-4225-4aff-9662-b46ab0b98d7a"] + 3.994074250298726*^9, 3.994074270240198*^9}, 3.9943863394438763`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"c9402b73-94e6-46d1-b729-53f45a122764"] }, Open ]], Cell[CellGroupData[{ @@ -1928,15 +1842,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[351]:=",ExpressionUUID->"c754259e-b681-44ec-bc5f-f1002de6b346"], + CellLabel->"In[48]:=",ExpressionUUID->"c754259e-b681-44ec-bc5f-f1002de6b346"], Cell[BoxData["6.986649521084862`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.994074197551347*^9, 3.994074214777306*^9}, { - 3.9940742503242893`*^9, 3.994074270266127*^9}}, - CellLabel-> - "Out[351]=",ExpressionUUID->"e94e89e2-c00f-406b-9e5a-5d750cf4e528"] + 3.9940742503242893`*^9, 3.994074270266127*^9}, 3.9943863395120087`*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"d5c511a2-6358-4333-9ff6-b46e1b237e07"] }, Open ]], Cell[CellGroupData[{ @@ -2424,16 +2336,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[352]:=",ExpressionUUID->"a0d78b9d-da66-4b78-a3d6-d80e8e08266d"], + CellLabel->"In[49]:=",ExpressionUUID->"a0d78b9d-da66-4b78-a3d6-d80e8e08266d"], Cell[BoxData[ RowBox[{"-", "15.225784715275067`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994074197626877*^9, 3.994074214803336*^9}, { - 3.994074250347639*^9, 3.9940742702914057`*^9}}, - CellLabel-> - "Out[352]=",ExpressionUUID->"3677372e-b949-43a1-b9ef-a4fddd71eba0"] + 3.994074250347639*^9, 3.9940742702914057`*^9}, 3.994386339599687*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"fb80b73b-f6f2-424a-a769-cb4ceadfd1ce"] }, Open ]], Cell[CellGroupData[{ @@ -2991,16 +2901,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[353]:=",ExpressionUUID->"29ba86b4-e35f-41cb-bd23-95aa4f58b80c"], + CellLabel->"In[50]:=",ExpressionUUID->"29ba86b4-e35f-41cb-bd23-95aa4f58b80c"], Cell[BoxData[ RowBox[{"-", "19.527743438945258`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.994074197680339*^9, 3.9940742148337717`*^9}, { - 3.994074250376841*^9, 3.9940742703219957`*^9}}, - CellLabel-> - "Out[353]=",ExpressionUUID->"b33ef8da-8a9c-4478-858d-00bd52663baa"] + 3.994074250376841*^9, 3.9940742703219957`*^9}, 3.9943863397059526`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"2eb04cd5-3a83-4d6f-a3a3-6fa6d06e3604"] }, Open ]], Cell[CellGroupData[{ @@ -3558,16 +3466,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[354]:=",ExpressionUUID->"8be7818b-92d5-4578-aa31-e4da70c8e4c5"], + CellLabel->"In[51]:=",ExpressionUUID->"8be7818b-92d5-4578-aa31-e4da70c8e4c5"], Cell[BoxData[ RowBox[{"-", "55.27021800638023`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.9940741977668943`*^9, 3.9940742148649673`*^9}, { - 3.994074250406843*^9, 3.994074270352029*^9}}, - CellLabel-> - "Out[354]=",ExpressionUUID->"1910edf3-acaa-48b3-b89f-4c2225d2bd72"] + 3.994074250406843*^9, 3.994074270352029*^9}, 3.9943863397923717`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"21702119-2152-4d93-9780-06f5f1360f4f"] }, Open ]], Cell[CellGroupData[{ @@ -4198,46 +4104,40 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[355]:=",ExpressionUUID->"64302f58-29a7-49a8-b2e1-fa56c49c4dca"], + CellLabel->"In[52]:=",ExpressionUUID->"64302f58-29a7-49a8-b2e1-fa56c49c4dca"], Cell[BoxData[ RowBox[{"-", "141.4524755079782`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.994074197832451*^9, 3.994074214909892*^9}, { - 3.994074250439662*^9, 3.994074270387487*^9}}, - CellLabel-> - "Out[355]=",ExpressionUUID->"c85322e9-84b9-486b-bb95-5be89728c4bc"] + 3.994074250439662*^9, 3.994074270387487*^9}, 3.994386340006424*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"559ea334-4b49-4962-a2c8-b661d2fd9f89"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[356]:=",ExpressionUUID->"8f7c645d-ec3b-4a9b-9e3f-ed7ed480145a"], + CellLabel->"In[53]:=",ExpressionUUID->"8f7c645d-ec3b-4a9b-9e3f-ed7ed480145a"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994074197929666*^9, 3.994074214922945*^9}, { - 3.994074250452722*^9, 3.994074270403535*^9}}, - CellLabel-> - "Out[356]=",ExpressionUUID->"1b41b77d-0477-4ffa-be10-e2ca605f6e54"] + 3.994074250452722*^9, 3.994074270403535*^9}, 3.99438634002668*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"45ed53e7-5f76-48f6-b694-0120cfd47a26"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[357]:=",ExpressionUUID->"c43bdea7-0906-49ec-8ca6-ef839705fc94"], + CellLabel->"In[54]:=",ExpressionUUID->"c43bdea7-0906-49ec-8ca6-ef839705fc94"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994074197952071*^9, 3.994074214935376*^9}, { - 3.994074250464295*^9, 3.994074270413846*^9}}, - CellLabel-> - "Out[357]=",ExpressionUUID->"209d102e-8b06-49fd-8562-1e9609fb488a"] + 3.994074250464295*^9, 3.994074270413846*^9}, 3.994386340041317*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"accdf51d-26cd-4839-b2f0-24c74da72a91"] }, Open ]], Cell[CellGroupData[{ @@ -4281,15 +4181,13 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[358]:=",ExpressionUUID->"04a502bd-2a13-4818-8add-72d236fb5cef"], + CellLabel->"In[55]:=",ExpressionUUID->"04a502bd-2a13-4818-8add-72d236fb5cef"], Cell[BoxData["111.55440139653717`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940741979658833`*^9, 3.994074214947126*^9}, { - 3.99407425047659*^9, 3.994074270424139*^9}}, - CellLabel-> - "Out[358]=",ExpressionUUID->"cfd7f144-2838-477a-be4a-1c8e8047ef31"] + 3.99407425047659*^9, 3.994074270424139*^9}, 3.9943863400555363`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"5f0644a4-bbfd-4141-b7ec-4afb1cf2660e"] }, Open ]], Cell[CellGroupData[{ @@ -4329,16 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[359]:=",ExpressionUUID->"408a3b04-8641-4ffc-b98c-fca92199312d"], + CellLabel->"In[56]:=",ExpressionUUID->"408a3b04-8641-4ffc-b98c-fca92199312d"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.994074197994025*^9, 3.994074214959611*^9}, { - 3.994074250488699*^9, 3.994074270434445*^9}}, - CellLabel-> - "Out[359]=",ExpressionUUID->"9f36d0ea-beaa-4937-9524-ffd3a9547bfa"] + 3.994074250488699*^9, 3.994074270434445*^9}, 3.9943863400678797`*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"24712f3a-e9e5-4e65-8995-0d7f45d7d73b"] }, Open ]], Cell[CellGroupData[{ @@ -4382,101 +4278,87 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[360]:=",ExpressionUUID->"e0c14472-8fa3-4706-a91e-87b0b649926b"], + CellLabel->"In[57]:=",ExpressionUUID->"e0c14472-8fa3-4706-a91e-87b0b649926b"], Cell[BoxData["113.13286100443031`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994074198004314*^9, 3.994074214972053*^9}, { - 3.994074250500126*^9, 3.99407427044481*^9}}, - CellLabel-> - "Out[360]=",ExpressionUUID->"7473e455-ee7c-440c-9905-7d894df38dd7"] + 3.994074250500126*^9, 3.99407427044481*^9}, 3.994386340082665*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"27059b3f-152d-48c8-99be-8a6747f7a89f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[361]:=",ExpressionUUID->"3361d54a-9fee-4dc7-b0f9-c079ad13bff9"], + CellLabel->"In[58]:=",ExpressionUUID->"3361d54a-9fee-4dc7-b0f9-c079ad13bff9"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.994074198016279*^9, 3.994074214983481*^9}, { - 3.994074250511408*^9, 3.994074270455081*^9}}, - CellLabel-> - "Out[361]=",ExpressionUUID->"fc82e519-98a4-4ec5-abbb-822af7592133"] + 3.994074250511408*^9, 3.994074270455081*^9}, 3.994386340096587*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"2ccc81c4-9797-4cff-9fbc-b6e9d92c5498"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[362]:=",ExpressionUUID->"78afd026-364a-4aa4-9e4b-7291c917c93b"], + CellLabel->"In[59]:=",ExpressionUUID->"78afd026-364a-4aa4-9e4b-7291c917c93b"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.99407419803306*^9, 3.994074214997123*^9}, { - 3.994074250525971*^9, 3.994074270465309*^9}}, - CellLabel-> - "Out[362]=",ExpressionUUID->"b631c807-62d5-49fb-9333-765109003d6f"] + 3.994074250525971*^9, 3.994074270465309*^9}, 3.994386340108255*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"19d8b29c-9a35-42ae-b7c7-963e1b3a9317"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[363]:=",ExpressionUUID->"15a13a1d-3344-451b-bace-62f40125a6ae"], + CellLabel->"In[60]:=",ExpressionUUID->"15a13a1d-3344-451b-bace-62f40125a6ae"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.994074198060273*^9, 3.994074215008013*^9}, { - 3.994074250535656*^9, 3.994074270476778*^9}}, - CellLabel-> - "Out[363]=",ExpressionUUID->"dc76234d-e699-4177-b1bf-67a8d584ffdf"] + 3.994074250535656*^9, 3.994074270476778*^9}, 3.994386340121847*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"0d173de7-a3cd-4355-8cd0-b437c96fd766"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[364]:=",ExpressionUUID->"06631f67-ba6a-4304-a742-be824337daa9"], + CellLabel->"In[61]:=",ExpressionUUID->"06631f67-ba6a-4304-a742-be824337daa9"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.9940741980734253`*^9, 3.994074215018661*^9}, { - 3.994074250546678*^9, 3.9940742704879427`*^9}}, - CellLabel-> - "Out[364]=",ExpressionUUID->"b9d33f70-3d9e-4507-9542-c7565dac6a4a"] + 3.994074250546678*^9, 3.9940742704879427`*^9}, 3.994386340136856*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"9c9ae3f1-19a7-4835-90d2-8a6f123f040d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[365]:=",ExpressionUUID->"94346525-779e-4404-8516-30e7487a8377"], + CellLabel->"In[62]:=",ExpressionUUID->"94346525-779e-4404-8516-30e7487a8377"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994074198087656*^9, 3.9940742150302687`*^9}, { - 3.994074250550354*^9, 3.994074270499359*^9}}, - CellLabel-> - "Out[365]=",ExpressionUUID->"773cf697-359a-4f18-865c-27d836e37315"] + 3.994074250550354*^9, 3.994074270499359*^9}, 3.994386340147687*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"8fe1de57-1892-4507-aef0-7d59aaf331f5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[366]:=",ExpressionUUID->"ebf2bbf4-40de-4f6a-827f-7e8c756e14d7"], + CellLabel->"In[63]:=",ExpressionUUID->"ebf2bbf4-40de-4f6a-827f-7e8c756e14d7"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.994074198096857*^9, 3.994074215043764*^9}, { - 3.994074250564603*^9, 3.994074270511888*^9}}, - CellLabel-> - "Out[366]=",ExpressionUUID->"64c28c6f-8c52-4f26-9dcf-baf817ea4147"] + 3.994074250564603*^9, 3.994074270511888*^9}, 3.994386340161265*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"2227550d-550c-4911-b128-4c27f3332f3c"] }, Open ]], Cell[CellGroupData[{ @@ -4497,16 +4379,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[367]:=",ExpressionUUID->"517d4477-0c6c-48e5-91af-37aa5f87471e"], + CellLabel->"In[64]:=",ExpressionUUID->"517d4477-0c6c-48e5-91af-37aa5f87471e"], Cell[BoxData[ RowBox[{"-", "33.18726375495992`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994074198107793*^9, 3.994074215058444*^9}, { - 3.994074250574132*^9, 3.99407427052425*^9}}, - CellLabel-> - "Out[367]=",ExpressionUUID->"909ea9b0-71b9-4196-9318-eaff211b38d0"] + 3.994074250574132*^9, 3.99407427052425*^9}, 3.9943863401759872`*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"97d9065f-ad0b-4d0e-8b9f-739f97519c3d"] }, Open ]], Cell[CellGroupData[{ @@ -4527,16 +4407,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[368]:=",ExpressionUUID->"6064daa3-6279-4c68-958b-67bad8cf01d5"], + CellLabel->"In[65]:=",ExpressionUUID->"6064daa3-6279-4c68-958b-67bad8cf01d5"], Cell[BoxData[ RowBox[{"-", "6.498883922853802`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994074198134163*^9, 3.994074215071083*^9}, { - 3.994074250583393*^9, 3.994074270535636*^9}}, - CellLabel-> - "Out[368]=",ExpressionUUID->"295b97de-a14e-487b-82ef-b83f9c6dc41f"] + 3.994074250583393*^9, 3.994074270535636*^9}, 3.9943863401876698`*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"e3da3e46-b8af-4a6a-98ac-b42c5aef768a"] }, Open ]], Cell[CellGroupData[{ @@ -4601,15 +4479,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[369]:=",ExpressionUUID->"ef5ef45e-02f1-40e0-98d6-43db39a8a36a"], + CellLabel->"In[66]:=",ExpressionUUID->"ef5ef45e-02f1-40e0-98d6-43db39a8a36a"], Cell[BoxData["78.36713764157724`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.99407419816089*^9, 3.994074215083827*^9}, { - 3.994074250592779*^9, 3.994074270550357*^9}}, - CellLabel-> - "Out[369]=",ExpressionUUID->"d3c5f8a3-eb62-4177-aee4-0ea6043e3985"] + 3.994074250592779*^9, 3.994074270550357*^9}, 3.994386340202755*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"91f7589f-92cc-4aa9-abbb-9a0079e5a27f"] }, Open ]], Cell[CellGroupData[{ @@ -4650,16 +4526,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[370]:=",ExpressionUUID->"0feb24b4-f965-4c9a-892b-0f55af7f3930"], + CellLabel->"In[67]:=",ExpressionUUID->"0feb24b4-f965-4c9a-892b-0f55af7f3930"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994074198173212*^9, 3.9940742151226263`*^9}, { - 3.9940742506018353`*^9, 3.99407427055612*^9}}, - CellLabel-> - "Out[370]=",ExpressionUUID->"e98de81d-3dbf-481e-aa5a-72ff72ee6dc8"] + 3.9940742506018353`*^9, 3.99407427055612*^9}, 3.994386340224448*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"8b6b0721-8f33-4c89-bd88-e8385bc58280"] }, Open ]], Cell[CellGroupData[{ @@ -4725,15 +4599,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[371]:=",ExpressionUUID->"92f48aa9-a01c-431b-ad27-db26cba84490"], + CellLabel->"In[68]:=",ExpressionUUID->"92f48aa9-a01c-431b-ad27-db26cba84490"], Cell[BoxData["106.6339770815765`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994074198185794*^9, 3.994074215135048*^9}, { - 3.994074250611326*^9, 3.994074270578539*^9}}, - CellLabel-> - "Out[371]=",ExpressionUUID->"ca981722-7728-47af-b853-953b186e37c1"] + 3.994074250611326*^9, 3.994074270578539*^9}, 3.994386340238244*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"2f0242f5-d829-4e59-944c-ecbb1e2874a4"] }, Open ]], Cell[CellGroupData[{ @@ -4791,15 +4663,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[372]:=",ExpressionUUID->"4154f56f-4103-4558-b830-6083ff36be8d"], + CellLabel->"In[69]:=",ExpressionUUID->"4154f56f-4103-4558-b830-6083ff36be8d"], Cell[BoxData["51.145215962859936`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994074198196261*^9, 3.9940742151460247`*^9}, { - 3.994074250621415*^9, 3.99407427059237*^9}}, - CellLabel-> - "Out[372]=",ExpressionUUID->"d6ec32d4-207d-4cd8-9eeb-88f97add5e2f"] + 3.994074250621415*^9, 3.99407427059237*^9}, 3.9943863402626247`*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"4762b05b-9d27-4aa6-90a8-4115a34e5329"] }, Open ]], Cell[CellGroupData[{ @@ -4857,30 +4727,42 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[373]:=",ExpressionUUID->"2d5197b2-6c2a-4bb0-bcee-b44c1006a471"], + CellLabel->"In[70]:=",ExpressionUUID->"2d5197b2-6c2a-4bb0-bcee-b44c1006a471"], Cell[BoxData["674.8474263523988`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994074198207098*^9, 3.9940742151610737`*^9}, { - 3.99407425063161*^9, 3.9940742706025248`*^9}}, - CellLabel-> - "Out[373]=",ExpressionUUID->"8a566fda-2491-4f78-88f7-6c8bd7948d76"] + 3.99407425063161*^9, 3.9940742706025248`*^9}, 3.9943863402746773`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"c8643014-afb9-4343-a0cd-defcc8192a91"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.3983268181"}]], "Input", CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{3.991849227197853*^9, 3.99423601235506*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[71]:=",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], + +Cell[BoxData["0.3983268181`"], "Output", + CellChangeTimes->{3.9943863402965*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"9466296d-2972-4091-b37f-519d97158cec"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1140433738"}]], "Input", CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{3.9918492290557346`*^9, 3.994236018233659*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[72]:=",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], + +Cell[BoxData["0.1140433738`"], "Output", + CellChangeTimes->{3.9943863403082314`*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"8a630d76-5aa4-4eae-a545-f01c358b8a2f"] +}, Open ]], Cell[CellGroupData[{ @@ -4926,13 +4808,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[233]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], + CellLabel->"In[73]:=",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913335367025833`*^9}, - CellLabel-> - "Out[233]=",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[BoxData["1.459454531271633`*^-53"], "Output", + CellChangeTimes->{3.9913335367025833`*^9, 3.9943863403200483`*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"27098413-4b16-4e79-b43b-c95fea59107d"] }, Open ]], Cell[CellGroupData[{ @@ -4966,14 +4846,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575926932735`*^9},ExpressionUUID->"e4db2648-4e1a-2c46-83ab-\ -fcd932c3b663"], + CellChangeTimes->{3.9915575926932735`*^9}, + CellLabel->"In[74]:=",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[BoxData["5.020725113795862`*^-55"], "Output", - CellChangeTimes->{3.991333536726557*^9}, - CellLabel-> - "Out[234]=",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[BoxData["5.829838991756193`*^-55"], "Output", + CellChangeTimes->{3.991333536726557*^9, 3.99438634033254*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"74bc4933-be6e-4d5a-89e4-6175fdf8b5af"] }, Open ]], Cell[CellGroupData[{ @@ -5006,14 +4884,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557595005127*^9, - 3.991557596789215*^9}},ExpressionUUID->"e4649c3d-e19e-ca42-95a0-\ -23b66397f1fd"], + CellChangeTimes->{{3.991557595005127*^9, 3.991557596789215*^9}}, + CellLabel->"In[75]:=",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[BoxData["1.871372642785671`*^-54"], "Output", - CellChangeTimes->{3.9913335367515736`*^9}, - CellLabel-> - "Out[235]=",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[BoxData["6.278000809847612`*^-55"], "Output", + CellChangeTimes->{3.9913335367515736`*^9, 3.994386340344161*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"415398c0-0f62-4bcc-9cf4-881ea65fcf5f"] }, Open ]], Cell[CellGroupData[{ @@ -5036,13 +4912,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[236]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], + CellLabel->"In[76]:=",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[BoxData["25.178011816139865`"], "Output", - CellChangeTimes->{3.9913335367605553`*^9}, - CellLabel-> - "Out[236]=",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[BoxData["8.735177801941811`"], "Output", + CellChangeTimes->{3.9913335367605553`*^9, 3.9943863403560257`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"6720e0e1-f94d-43b4-8f3f-dc526fe36abc"] }, Open ]], Cell[CellGroupData[{ @@ -5067,13 +4941,11 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[237]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], + CellLabel->"In[77]:=",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[BoxData["31.32034821453639`"], "Output", - CellChangeTimes->{3.991333536783556*^9}, - CellLabel-> - "Out[237]=",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[BoxData["16.225387272785607`"], "Output", + CellChangeTimes->{3.991333536783556*^9, 3.994386340366765*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"c7c59ae6-11d7-4bc1-b869-8bebb85ed2a5"] }, Open ]], Cell[CellGroupData[{ @@ -5082,13 +4954,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[238]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], + CellLabel->"In[78]:=",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[BoxData["0.7475613664925793`"], "Output", - CellChangeTimes->{3.9913335367915726`*^9}, - CellLabel-> - "Out[238]=",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[BoxData["2.4197284665847705`"], "Output", + CellChangeTimes->{3.9913335367915726`*^9, 3.994386340378499*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"cd9f4344-96e5-4833-b02e-c2d6b3d09544"] }, Open ]], Cell[CellGroupData[{ @@ -5097,13 +4967,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[239]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], + CellLabel->"In[79]:=",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[BoxData["3.5403946764909393`"], "Output", - CellChangeTimes->{3.99133353681583*^9}, - CellLabel-> - "Out[239]=",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[BoxData["6.449191341555901`"], "Output", + CellChangeTimes->{3.99133353681583*^9, 3.994386340390584*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"e97ad6fb-fb2b-4309-bb42-574f1b743592"] }, Open ]], Cell[CellGroupData[{ @@ -5112,13 +4980,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[240]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], + CellLabel->"In[80]:=",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[BoxData["110.88639408458714`"], "Output", - CellChangeTimes->{3.991333536826782*^9}, - CellLabel-> - "Out[240]=",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[BoxData["104.64062711304025`"], "Output", + CellChangeTimes->{3.991333536826782*^9, 3.994386340405553*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"47e1ab68-a28f-40d9-9030-2ad471058563"] }, Open ]], Cell[CellGroupData[{ @@ -5127,13 +4993,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[241]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], + CellLabel->"In[81]:=",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[BoxData["18.822108918839827`"], "Output", - CellChangeTimes->{3.9913335368508377`*^9}, - CellLabel-> - "Out[241]=",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[BoxData["21.136758388037983`"], "Output", + CellChangeTimes->{3.9913335368508377`*^9, 3.9943863404207563`*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"21d65a9f-978a-44e7-a4fa-8ae656ad940a"] }, Open ]], Cell[CellGroupData[{ @@ -5322,13 +5186,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[242]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], + CellLabel->"In[82]:=",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[BoxData["0.042044960793272385`"], "Output", - CellChangeTimes->{3.9913335368758316`*^9}, - CellLabel-> - "Out[242]=",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[BoxData["0.008601474251415416`"], "Output", + CellChangeTimes->{3.9913335368758316`*^9, 3.994386340435747*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"38c65e7f-89b0-453d-8400-aaf19423379e"] }, Open ]], Cell[CellGroupData[{ @@ -5341,13 +5203,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[243]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], + CellLabel->"In[83]:=",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[BoxData["4.322031867849089`"], "Output", - CellChangeTimes->{3.991333536973074*^9}, - CellLabel-> - "Out[243]=",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[BoxData["9.55561170763334`"], "Output", + CellChangeTimes->{3.991333536973074*^9, 3.99438634069902*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"5294c82b-916f-4e0a-8502-c3e1f3f7d114"] }, Open ]], Cell[CellGroupData[{ @@ -5538,13 +5398,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[244]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], + CellLabel->"In[84]:=",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[BoxData["0.011395075201487413`"], "Output", - CellChangeTimes->{3.9913335369870644`*^9}, - CellLabel-> - "Out[244]=",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[BoxData["0.046808484201363076`"], "Output", + CellChangeTimes->{3.9913335369870644`*^9, 3.994386340719092*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"f47ca4b1-3998-456a-befd-3df9b59abb4b"] }, Open ]], Cell[CellGroupData[{ @@ -5557,13 +5415,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[245]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], + CellLabel->"In[85]:=",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[BoxData["8.302069082299768`"], "Output", - CellChangeTimes->{3.9913335370800858`*^9}, - CellLabel-> - "Out[245]=",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[BoxData["4.096214135036129`"], "Output", + CellChangeTimes->{3.9913335370800858`*^9, 3.9943863408119707`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"196c0dab-b578-434f-9a4e-869f6ead7509"] }, Open ]], Cell[CellGroupData[{ @@ -5655,13 +5511,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[246]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], + CellLabel->"In[86]:=",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913335370930634`*^9}, - CellLabel-> - "Out[246]=",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[BoxData["0.046564779467990605`"], "Output", + CellChangeTimes->{3.9913335370930634`*^9, 3.994386340977973*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"c9e209b4-6f0a-4c71-9920-e11ce285c8a2"] }, Open ]], Cell[CellGroupData[{ @@ -5750,13 +5604,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[247]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], + CellLabel->"In[87]:=",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991333537118065*^9}, - CellLabel-> - "Out[247]=",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[BoxData["0.9534352205320095`"], "Output", + CellChangeTimes->{3.991333537118065*^9, 3.994386341005515*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"fcf3e793-b423-4de7-a272-29b1a769c732"] }, Open ]], Cell[CellGroupData[{ @@ -5878,19 +5730,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[248]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], + CellLabel->"In[88]:=",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913335371420746`*^9}, - CellLabel-> - "Out[248]=",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[BoxData["0.04439650078108801`"], "Output", + CellChangeTimes->{3.9913335371420746`*^9, 3.994386341028536*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"2675a6d7-3af3-4ddf-88c2-f039c5d34bdb"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"ba4a3eff-9e3b-\ -5e47-a896-3a959bbbf44d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ @@ -5951,65 +5801,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849241512779*^9},ExpressionUUID->"738a48f3-b38c-f441-aec4-\ -53babaa73a14"], + CellChangeTimes->{3.991849241512779*^9}, + CellLabel->"In[90]:=",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 217, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371540604`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.866194157179425`*^-196\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 90, 1, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994386341071703*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], +In[90]:=",ExpressionUUID->"995abb02-0b4a-45c3-8751-2bd491ec0ea3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 249, 218, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371630745`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0374749655842245`*^-200\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 2, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994386341144459*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], +In[90]:=",ExpressionUUID->"52bf95ee-1c79-4c5b-a68b-7b752df8dbef"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 249, 219, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335371710587`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.767643736709548`*^-205\\\", \ +\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ +4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 90, 3, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994386341150242*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], +In[90]:=",ExpressionUUID->"f7cab255-d9e1-4f68-8dcb-4d43b53e3c5c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 249, 220, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133353717906*^9}, +during this calculation.\"", 2, 90, 4, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335371540604`*^9, 3.994386341155807*^9}, CellLabel-> "During evaluation of \ -In[249]:=",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], +In[90]:=",ExpressionUUID->"939a0624-ac18-4275-b49c-dbea26865175"], -Cell[BoxData["4.322031867849086`"], "Output", - CellChangeTimes->{3.9913335399194164`*^9}, - CellLabel-> - "Out[249]=",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[BoxData["9.555611707633336`"], "Output", + CellChangeTimes->{3.9913335399194164`*^9, 3.994386344165989*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"0e9f5be0-8419-45f4-8ded-758a12495997"] }, Open ]], Cell[CellGroupData[{ @@ -6071,65 +5926,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918492463930817`*^9},ExpressionUUID->"86c33485-ed26-8f49-b3d0-\ -7d040d3b48f0"], + CellChangeTimes->{3.9918492463930817`*^9}, + CellLabel->"In[91]:=",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 221, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399544125`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.866194157179425`*^-196\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 91, 5, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994386344218155*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], +In[91]:=",ExpressionUUID->"68305e45-e3c6-4167-8a84-7e68a0163667"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 250, 222, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335399644184`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0374749655842245`*^-200\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 6, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994386344279705*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], +In[91]:=",ExpressionUUID->"c7b31fb4-4ae1-46c8-acea-0cfa53d1ca2b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 250, 223, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539972414*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.767643736709548`*^-205\\\", \ +\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ +4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 91, 7, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.994386344285779*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], +In[91]:=",ExpressionUUID->"3ca7205a-9551-4ae7-b8d4-f34414dbc698"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 250, 224, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333539979416*^9}, +during this calculation.\"", 2, 91, 8, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335399544125`*^9, 3.9943863442912073`*^9}, CellLabel-> "During evaluation of \ -In[250]:=",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], +In[91]:=",ExpressionUUID->"273e6e53-f85e-44a4-bc9a-570f35141d99"], -Cell[BoxData["8.302069082299772`"], "Output", - CellChangeTimes->{3.991333542631773*^9}, - CellLabel-> - "Out[250]=",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[BoxData["4.096214135036128`"], "Output", + CellChangeTimes->{3.991333542631773*^9, 3.994386347460178*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"9c0985d6-eb3b-47b9-9a4f-f92b4e592f4a"] }, Open ]], Cell[CellGroupData[{ @@ -6185,92 +6045,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492535482903`*^9},ExpressionUUID->"f373fe4f-940c-0842-9236-\ -63ec36d318ad"], + CellChangeTimes->{3.9918492535482903`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VtsXB3ARZSyEIjI0UYa8xpS1DKVM0WQuvd73JNeQIT9RpJKUhBTd +ZKhEMg8lSqI5tzTcuhnCMWaKEE6G3+6P85zn85z9fPfaa+99lNh+O7m8PDw8 +veT58/Z/q7HmfsNb46iFbKnLa2kwHrqlyzbPA59F/DZ/3Jaul7TS/CG0u/aN +/rEd5x8BEdYzmM+ICyUTF4dE1PGb14PBr7CLKcQxz5fWROS+hxFq7em/iR80 ++KdNa/8Lnw/K9KYS9zW+Pna06j9Ild1elU4s26Xi8susGdZnP5q5QWz145hh +YH0rXDA6UnibuHq6Tzgktx0+CR9uyCX+HCkTds+3Aw7tLHAvJB4SMO8b0+6C +jB1a7mXEArGHnVgT3bDE8tfbB8QK4tdf+lf1QlAcT/5jYlu5X7eHzAbg5NaO +e/XEVIaytPrCIdgc8JD+SByxakfUX/U/QNSx6XgT8X8ynzYE5Y5ACv/AvAFi +jrPXoUuxPyHk3re+MeLhVJ7MEt9ReDC61GyWeKGy+uIR7XFwUqVMJFRpSOLU +WSyW+gXdRqE9y4kVs50iNCd+wYFF/02vITZYf2bIp2oSZg8HHgFiT73W+j6z +aThbbZQWSDwWcmS+0OoZ+GpdVB1JfKJKeJPqwlmIXxdkG0+cggZ3D9bPQaz0 +YFUBMSfrpXlA7jx0y6h6O0yc+/xSW6QcLz4/XXuIV43U27PvWEIsL9a+XxG0 +hPiY2nhpkS8f/spq/2xInFSopPJDmx+bL6V/iiFubBionr3Jj/RgcF8aseLP ++85iUgJoZZ/vV0acp2ObqD4hgJpTRi/biJ8+CJ3nXbUQ46L5SozX0TBe97G1 +10wEDydyDy1aT4OEtcjisGoRHBr/8lmdWOuTOYoaiqKlw/YX1sReneUZGzTE +UFFxw4ZY4sO89VqbRRZj2bStqrg6DV3KBSNRv8RRwqQ4j6VB+kO9FnzHkkCf +KGkrZ2Leu91KS/0lMKchzTuSWJG1YmduvwQm3VY2fE/sbBZf8rZNEqX34mSw +Jg3vPAICZd5IYeMjffEmLRq+Zcedd18ojd4zizoEN9Aw0J97884Wabz+TN/A +kFgoqOOjUY00Fhmc9L5KbH56t457uQzqnXSe2a9NQ+UtvfGc9GXYrTlay69D +w60uJnhjkDy29e/5VapPw7Y90d8C8+XRuDqA7wfxwFPJrfnd8hgx6ntKzYAG +nVvrpRSdFLBhXKL5BvFT9r5SfuMVGFzvOZxiSMPPH23/6z2liHcCXXP+NqJB +0se8rNRGGW982+g3BjR03xLytPNSRk0faN2MNFQ0N8gNnlHGAdlrtdHErtZu +p1bXKOOBUM+O5SakvnXBO69qq2DA5vcXrE3J/H3Zw+EyK1E6Nj3miTkNuw8K +q1u2r0J319ubeC1pgOA92g4zq7CiN5PrSKwWla7PWbYaC4z4ZwuIeW6yTMPt +V2Ntv9RxNysa8r+5OJQ8WY2sRx1lj63J/dybFyl7Yw1GtVCLru4g9ZnbfO5j +q2Kz4HBi+h4abu5KbpoIV8W+B5wSvr00xLHb2+ZfU8VRTdrEk5hz4ki/wkdV +sh7RYm0HGsQfXufZZaaGwyNVDfWO5PywhtSqVNbh6s1OstKuNMgpX4w437ke +S8qyZqfZNDw8N6Y6xauOWh/im0M8SD9GnT5RSuq4PFwNxonTnq5UNd2njksm +zib+4NCgfLDyw+QXdXzl2xDQR5H15nWtot5oYKtDkuKUFw3ycgqUopMWJpqO +eYUG0rA+K0jkN2ijhjzPbbEzNLA5p8bVbbWxTkLGL5M4RSXxm7urNh6supuv +E00D343Couch2mi31/e861ly39L6dicWa2OIu9Hr4nPkf5rifl1VhYXrvRRc +Ay6S/T1vreEooIOeBSnC1ldpyAxYaVder4sYKnzSo4CGkm8155c266JUuW+F +ciENtZZuL8L6dVFdkBtGE3cqXzE2FdLDjldG2R7FNKz+uED9nYUelsl/T/Yu +I/eZ1S/4vVYPz66T7U2pJPszVly3/IE+nn9vkerygoaGYNA/nWWIQWtatGNp +GpT2/Wvr5r0ZjxY77Tyh0AHcuXsF8kcR9cabbvrt6wCZ/ooFMmxTvLxcwOZx +XgcEsTY1J6qZY6DrNfa52Q5gD06/lOzbgs0lc4IrHDoh3zRwQfo7C+xdWWY3 +UtMJt8a8nuQlbccv+f+1yqp3waTJ0n+eRljhxEhuwnReF7Tw8I20H7DBa0Jl +Fvm63eC73C8+UmUHJkou3nLkcTcUHHpZcznKDmsSTC5GufdA6OiyiXWH7HGe +gkSPAm8vjFtu3fti/07k029roB/1gqFLgkmX/S6UzPXaf/DUd/iw7LrXU9Zu +VJLJraqw6APZ26ce5qzdgzZaFxynVPuhok3N2lZ0L55nJRgzggOg8Gn4YPDg +Xkwo3xuYMTIArMsJeTfbHDCjVtqUYgbh+vxRjcQ6R8zc3NDze2YI7ploNkY9 +cELHF04bd0gMQ4r+OfHpXGe8UjyZ7XFnGN41ZZ1hxbrggR1aPfeMRqDcJnXl +4ROuGHfWJeJF6wiM+Ozi8eW4oft4mv6+4z9hfKuq55DZPpT4WL7HSm4Ucga/ +Tgbq7ccLVSvOnHs1Co6ZWR5uIu7YHGq/vtpnDEpLrPbzRbujRqCZlrziOBjK +fZiKmXLHuKaCS+eejYNK28HG94cOoGZKJ78S9xd0Cv+1I7XjAJabvksIFJ2A +hjhbD4s9bDTqsYnQuDUBSSHpwkca2Lj4bcl2d+NJeFg9N+Wx3QNX+JutNno9 +CYtcMZpV6YFZSwa12DgFhu5DOVE6HJwQSpWaLJqC21eHA231OJgT+swmrGQK +lnz8aSxjwMHKwLvRM6VTMLRl4lOOEQc9SyTmZu9Nkf8Xz7x6Uw4ucFIaGX84 +BWIT4k4S9hzUvH4ipvTlFHRe0BVM9+FgW6deg1frFMRVHTtUcZuD3nVFSWWC +DPhoJxuG5HDQXsmuf0iIAes7xYIGuRxU07qot1aEAaHk7jv38znY6J5xJ1mM +gagAu757ZRycNFk4dUiSgWOqK/8qr+WgWFrEeNNyBryS33iXfONggYSD3qgG +A9vFujcFtHHQ/3T2aWEtBtZG8Yhq0xx0+Z3/SHkDA90BuvnFXRxUiC4asmEx +cMA2fbBogIP7jnmYJ+sz4Mgf6FvIcNDBQyZ8HBiwCJQ9nCfNxZhoJ91vOxio +TT9jmbiUi6f8MyV67RjYVP9zZYgsF6nQBenD9gxorXrz1UyBi8XujXUzuxhY +9iXMrGkVF8OjPHUWOjLQv7FFWkiXi+0KXzxb9jNwkTfj0cFdXHy9xm3kjC9Z +v6ZIis0eLsrWcaUoPwZOu4QEsBy4WPlf8TezwwyElNmtmXPmYsSesf2//Un9 +1LyEK2wufpd1knI+wgDrNZvzzJ/ML35P7HMYA18SVgmrxHMx/lym1/NoBgpA +1LM3gYv39fY88TlL8gfHnuZf4mLk4zlaMoYB7e1Pww2SubjgVtgZ13MMxPF4 +/LRJI+OXjGxrjWVgq1/G15A8LurwzV3KTWBAXv6snnEBF3mWXT5tnMjA2Gu/ +S3xFXBTvs9/8nvjGarCJK+Xi0phkgdFLDMy0tNTcrOSi0P760TVXGCizlst5 ++5KLYtMvpRz+ZuA8w8uf9JqLynWvjnwhZuf0HXCq52KSWsi1vdcYWDy/Uq7z +HRcVblrp26cy4F3leHHqMxm/pj1PP40BFbUrwSu7uCgadM7/VSYDzJfjH793 +czFK97ec3g0GGqK4WoW9XFRaMxWTSRzertNnOED690SxKOgmA40pH912jHLx +ze13SiJZDCQuEN8SOo9CsXKXyLlsBh7+bHEJ4qOwvJc/mZ3DQE9LboAvP4W7 +4hUVnxJvKjPPYAtSqD4oG3vyDjlv7iG/LcUpVHvl/WIgl9RvvUViiySFj3Na +g8zuMmCkL6EKUhQybyuSUojjRfP2spZReN5LZZ1xHvle2Vosp0RhZ1h6YXA+ +A1RW3kspFQrdtgkM1hDHxx9tXbSKwpzPA9cEC8h8lKTofFUKFyc32Fwhjpe0 +8BzQovDtTd251EIGKmclI7q1KVwS//VZI3HX97bLbToUKiZunJEuYmBjTWjd +JwMKJTVbHp0j7vQuUHiEFNZXck/vL2ZAzDFM974pqWdX4dt4YkOzbdbF5hQ6 +OcrE1BDHLaOPZm0jeQKzNnIlDFTML4xPt6TQ/7WL41bijh9h2VetKWRpXfng +R2zwXOrfC3YUatpypauJ2cV0f/ROCuOyW1pp4guphbwnd1P4onNqqUApA3TA +dq1gRwq3R/d/tSAW3SdtcdiZwv1Sdw5QxAbbO9y8XCnk+9roeIr4worj5/e5 +U/i/OP/LFcQVQpY3HNkUztOua2z4kzcu/WAnh8IYX/bFnj957R3vrCkK5xZY +lE7/yasv6t7qSeHpXYe2Li4j9d0/PoNeFMbr125TJr5ww3KJkTeFfeusKrWJ +Ky7IrNP1pbDAcPZvE2I6pNNE8zCFzr//7bMlFuEUO6oGUFid+s8dZ2L9HeF+ +KkEUKjS1feH8yd9odUY+mMIV/CJHfIhjVy29LhNC+s9YRQYR31vcVSoeSmGm +etr0UeL238WvhY+RfmXw9Bz/k98T3s4fTuFUjz+eINb7YDU5F0HhLdWRhZHE +/wfHkPSJ "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6284,104 +6146,107 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV1Hk4VtsXB3ARZSyEIjI0UYa8xpS1DKVM0WQuvd73JNeQIT9RpJKUhBTd +ZKhEMg8lSqI5tzTcuhnCMWaKEE6G3+6P85zn85z9fPfaa+99lNh+O7m8PDw8 +veT58/Z/q7HmfsNb46iFbKnLa2kwHrqlyzbPA59F/DZ/3Jaul7TS/CG0u/aN +/rEd5x8BEdYzmM+ICyUTF4dE1PGb14PBr7CLKcQxz5fWROS+hxFq7em/iR80 ++KdNa/8Lnw/K9KYS9zW+Pna06j9Ild1elU4s26Xi8susGdZnP5q5QWz145hh +YH0rXDA6UnibuHq6Tzgktx0+CR9uyCX+HCkTds+3Aw7tLHAvJB4SMO8b0+6C +jB1a7mXEArGHnVgT3bDE8tfbB8QK4tdf+lf1QlAcT/5jYlu5X7eHzAbg5NaO +e/XEVIaytPrCIdgc8JD+SByxakfUX/U/QNSx6XgT8X8ynzYE5Y5ACv/AvAFi +jrPXoUuxPyHk3re+MeLhVJ7MEt9ReDC61GyWeKGy+uIR7XFwUqVMJFRpSOLU +WSyW+gXdRqE9y4kVs50iNCd+wYFF/02vITZYf2bIp2oSZg8HHgFiT73W+j6z +aThbbZQWSDwWcmS+0OoZ+GpdVB1JfKJKeJPqwlmIXxdkG0+cggZ3D9bPQaz0 +YFUBMSfrpXlA7jx0y6h6O0yc+/xSW6QcLz4/XXuIV43U27PvWEIsL9a+XxG0 +hPiY2nhpkS8f/spq/2xInFSopPJDmx+bL6V/iiFubBionr3Jj/RgcF8aseLP ++85iUgJoZZ/vV0acp2ObqD4hgJpTRi/biJ8+CJ3nXbUQ46L5SozX0TBe97G1 +10wEDydyDy1aT4OEtcjisGoRHBr/8lmdWOuTOYoaiqKlw/YX1sReneUZGzTE +UFFxw4ZY4sO89VqbRRZj2bStqrg6DV3KBSNRv8RRwqQ4j6VB+kO9FnzHkkCf +KGkrZ2Leu91KS/0lMKchzTuSWJG1YmduvwQm3VY2fE/sbBZf8rZNEqX34mSw +Jg3vPAICZd5IYeMjffEmLRq+Zcedd18ojd4zizoEN9Aw0J97884Wabz+TN/A +kFgoqOOjUY00Fhmc9L5KbH56t457uQzqnXSe2a9NQ+UtvfGc9GXYrTlay69D +w60uJnhjkDy29e/5VapPw7Y90d8C8+XRuDqA7wfxwFPJrfnd8hgx6ntKzYAG +nVvrpRSdFLBhXKL5BvFT9r5SfuMVGFzvOZxiSMPPH23/6z2liHcCXXP+NqJB +0se8rNRGGW982+g3BjR03xLytPNSRk0faN2MNFQ0N8gNnlHGAdlrtdHErtZu +p1bXKOOBUM+O5SakvnXBO69qq2DA5vcXrE3J/H3Zw+EyK1E6Nj3miTkNuw8K +q1u2r0J319ubeC1pgOA92g4zq7CiN5PrSKwWla7PWbYaC4z4ZwuIeW6yTMPt +V2Ntv9RxNysa8r+5OJQ8WY2sRx1lj63J/dybFyl7Yw1GtVCLru4g9ZnbfO5j +q2Kz4HBi+h4abu5KbpoIV8W+B5wSvr00xLHb2+ZfU8VRTdrEk5hz4ki/wkdV +sh7RYm0HGsQfXufZZaaGwyNVDfWO5PywhtSqVNbh6s1OstKuNMgpX4w437ke +S8qyZqfZNDw8N6Y6xauOWh/im0M8SD9GnT5RSuq4PFwNxonTnq5UNd2njksm +zib+4NCgfLDyw+QXdXzl2xDQR5H15nWtot5oYKtDkuKUFw3ycgqUopMWJpqO +eYUG0rA+K0jkN2ijhjzPbbEzNLA5p8bVbbWxTkLGL5M4RSXxm7urNh6supuv +E00D343Couch2mi31/e861ly39L6dicWa2OIu9Hr4nPkf5rifl1VhYXrvRRc +Ay6S/T1vreEooIOeBSnC1ldpyAxYaVder4sYKnzSo4CGkm8155c266JUuW+F +ciENtZZuL8L6dVFdkBtGE3cqXzE2FdLDjldG2R7FNKz+uED9nYUelsl/T/Yu +I/eZ1S/4vVYPz66T7U2pJPszVly3/IE+nn9vkerygoaGYNA/nWWIQWtatGNp +GpT2/Wvr5r0ZjxY77Tyh0AHcuXsF8kcR9cabbvrt6wCZ/ooFMmxTvLxcwOZx +XgcEsTY1J6qZY6DrNfa52Q5gD06/lOzbgs0lc4IrHDoh3zRwQfo7C+xdWWY3 +UtMJt8a8nuQlbccv+f+1yqp3waTJ0n+eRljhxEhuwnReF7Tw8I20H7DBa0Jl +Fvm63eC73C8+UmUHJkou3nLkcTcUHHpZcznKDmsSTC5GufdA6OiyiXWH7HGe +gkSPAm8vjFtu3fti/07k029roB/1gqFLgkmX/S6UzPXaf/DUd/iw7LrXU9Zu +VJLJraqw6APZ26ce5qzdgzZaFxynVPuhok3N2lZ0L55nJRgzggOg8Gn4YPDg +Xkwo3xuYMTIArMsJeTfbHDCjVtqUYgbh+vxRjcQ6R8zc3NDze2YI7ploNkY9 +cELHF04bd0gMQ4r+OfHpXGe8UjyZ7XFnGN41ZZ1hxbrggR1aPfeMRqDcJnXl +4ROuGHfWJeJF6wiM+Ozi8eW4oft4mv6+4z9hfKuq55DZPpT4WL7HSm4Ucga/ +Tgbq7ccLVSvOnHs1Co6ZWR5uIu7YHGq/vtpnDEpLrPbzRbujRqCZlrziOBjK +fZiKmXLHuKaCS+eejYNK28HG94cOoGZKJ78S9xd0Cv+1I7XjAJabvksIFJ2A +hjhbD4s9bDTqsYnQuDUBSSHpwkca2Lj4bcl2d+NJeFg9N+Wx3QNX+JutNno9 +CYtcMZpV6YFZSwa12DgFhu5DOVE6HJwQSpWaLJqC21eHA231OJgT+swmrGQK +lnz8aSxjwMHKwLvRM6VTMLRl4lOOEQc9SyTmZu9Nkf8Xz7x6Uw4ucFIaGX84 +BWIT4k4S9hzUvH4ipvTlFHRe0BVM9+FgW6deg1frFMRVHTtUcZuD3nVFSWWC +DPhoJxuG5HDQXsmuf0iIAes7xYIGuRxU07qot1aEAaHk7jv38znY6J5xJ1mM +gagAu757ZRycNFk4dUiSgWOqK/8qr+WgWFrEeNNyBryS33iXfONggYSD3qgG +A9vFujcFtHHQ/3T2aWEtBtZG8Yhq0xx0+Z3/SHkDA90BuvnFXRxUiC4asmEx +cMA2fbBogIP7jnmYJ+sz4Mgf6FvIcNDBQyZ8HBiwCJQ9nCfNxZhoJ91vOxio +TT9jmbiUi6f8MyV67RjYVP9zZYgsF6nQBenD9gxorXrz1UyBi8XujXUzuxhY +9iXMrGkVF8OjPHUWOjLQv7FFWkiXi+0KXzxb9jNwkTfj0cFdXHy9xm3kjC9Z +v6ZIis0eLsrWcaUoPwZOu4QEsBy4WPlf8TezwwyElNmtmXPmYsSesf2//Un9 +1LyEK2wufpd1knI+wgDrNZvzzJ/ML35P7HMYA18SVgmrxHMx/lym1/NoBgpA +1LM3gYv39fY88TlL8gfHnuZf4mLk4zlaMoYB7e1Pww2SubjgVtgZ13MMxPF4 +/LRJI+OXjGxrjWVgq1/G15A8LurwzV3KTWBAXv6snnEBF3mWXT5tnMjA2Gu/ +S3xFXBTvs9/8nvjGarCJK+Xi0phkgdFLDMy0tNTcrOSi0P760TVXGCizlst5 ++5KLYtMvpRz+ZuA8w8uf9JqLynWvjnwhZuf0HXCq52KSWsi1vdcYWDy/Uq7z +HRcVblrp26cy4F3leHHqMxm/pj1PP40BFbUrwSu7uCgadM7/VSYDzJfjH793 +czFK97ec3g0GGqK4WoW9XFRaMxWTSRzertNnOED690SxKOgmA40pH912jHLx +ze13SiJZDCQuEN8SOo9CsXKXyLlsBh7+bHEJ4qOwvJc/mZ3DQE9LboAvP4W7 +4hUVnxJvKjPPYAtSqD4oG3vyDjlv7iG/LcUpVHvl/WIgl9RvvUViiySFj3Na +g8zuMmCkL6EKUhQybyuSUojjRfP2spZReN5LZZ1xHvle2Vosp0RhZ1h6YXA+ +A1RW3kspFQrdtgkM1hDHxx9tXbSKwpzPA9cEC8h8lKTofFUKFyc32Fwhjpe0 +8BzQovDtTd251EIGKmclI7q1KVwS//VZI3HX97bLbToUKiZunJEuYmBjTWjd +JwMKJTVbHp0j7vQuUHiEFNZXck/vL2ZAzDFM974pqWdX4dt4YkOzbdbF5hQ6 +OcrE1BDHLaOPZm0jeQKzNnIlDFTML4xPt6TQ/7WL41bijh9h2VetKWRpXfng +R2zwXOrfC3YUatpypauJ2cV0f/ROCuOyW1pp4guphbwnd1P4onNqqUApA3TA +dq1gRwq3R/d/tSAW3SdtcdiZwv1Sdw5QxAbbO9y8XCnk+9roeIr4worj5/e5 +U/i/OP/LFcQVQpY3HNkUztOua2z4kzcu/WAnh8IYX/bFnj957R3vrCkK5xZY +lE7/yasv6t7qSeHpXYe2Li4j9d0/PoNeFMbr125TJr5ww3KJkTeFfeusKrWJ +Ky7IrNP1pbDAcPZvE2I6pNNE8zCFzr//7bMlFuEUO6oGUFid+s8dZ2L9HeF+ +KkEUKjS1feH8yd9odUY+mMIV/CJHfIhjVy29LhNC+s9YRQYR31vcVSoeSmGm +etr0UeL238WvhY+RfmXw9Bz/k98T3s4fTuFUjz+eINb7YDU5F0HhLdWRhZHE +/wfHkPSJ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.5674539010654064, + 1.6690683697985174`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.5674539010654076}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6393,21 +6258,21 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, - 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.5674539010654064, + 1.6690683697985174`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.5674539010654076}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6421,102 +6286,105 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k0Vd0bB3BzEjJmCmWqS0qu4YrsJ/ci8yyExD0neZUxr5Ch0qSkUqlX -URKJhChDUnlLUvQSpcgQleneZKrEb5/fH2ed9Vl77ef5rr33Onud1YFhrgQf -Dw/POH6od8Tr9Wvut702j/dMVd14g4PMJ24YBrKKUUqplRrlvhyjTA1WHQo4 -cUKbsjP7lZAo/V+0bdiZQbksNumpIKsF0Z9esqN8/Jl8Q1LRG+SvSrApV7dF -XJ3Xf4vO/Sw/SHmkuzlhf+07NO106CZlxSH17TPMj+jgqs5WynacBJOolk9o -Mvj2AuX6+ZFlsUX96K4WP10fuzNFLr5q7yAy9ewJpTwhxBqZ0h9C7VMmxZSF -ToZ702eH0d8L8t8pq0heaYqo/Yq8wuJM6diOSjM3J5hjSHVfYx9lMldtha7w -BIrjKTE1wE7SdEr9q4WDTPvksim/k+vYGF30HYWmRu8xxGb7hOw+d3ISLUdk -L2VuNs+18r0/UI1Bt7sRtrCarsR3/WmU8WCrqzF2JvuptYTsDHJgMN9TXlXg -nbRhdga97XxEMLAZ645M7KmdQ4bO6LQJdrDRp5YR5jzimnlqmGFPxe4TENH6 -g3gaArooJ9cuM6MJLyBt+fHTm7GzgHF7V8siClRJk0RUvvwmVmQRL7hZfPC0 -wC56dq4vRYkPmIY/DJlU3i/+CWdO8kFlzklFFnaC9nTF3b38kHyTOWVJ5S1d -rc7RF4TcmYZvNtjdbWP1C3mCsFxjcMqWyj9530dcVgh6PI8I2mMXGzie1Z0V -guFTTsaO2I3VcbyhtcJAixn96Io9/bT901emKMi2mOj5YUvZi0rE14vCtP/h -Mn9svQ4WiJmIQVqepUkAdsjnytyN68XhQpeObxB2OF+L3mZRCWj8doizG3tI -7c731BlJMDGzsY+l1odsXtpKlwKJtO8Gcdh8t4dXy0dIgXWpuEYClZeu6lo0 -KgW132/KJmP7MDPKX/dJQ3+WndUx7NagyCi5l7LQ+c6y5xJ2b0F6WoDwCgju -0tbNxh4bLcq7ZbkCrHYcPHQVWyR6sN20YQWkBx9j5mGzDrsbBFTKwWLXqEQJ -ds0No+nCHAXY9vdI32PsG0O/YjZFK4ObyUF3LvZWj6O9USXKEPzLcfMPqn6j -tFXJsDIcza3UmcE2uLFOdpW3Ckx9dVKYp9Yz0L9C0FwVHiZXGAvnc9Akp+/v -r4dWQbu7eMpqbOk9rHsVDmqQffAhywt7+IZIsHOIGtDKQ/q2Yz/42KY0fkQN -mJdvp+zA9rX3O6TVoAbBD750kNg3dGJcL+mrw4A8s34ftsFIATdRTgO+Vrln -Z2K771qma9uvCbbHWYc7sVGMh/62P5qgouxY142tnZpjzFbQgtmG4p+92Dx5 -dItEFy14ZRF8+At2Se/2beWPtWDR/837OWwhz+IUxetrYM9hg8Mrb+J8LIfO -kUAaPJ+MfLsLO8/t4ofZRBocI67dD8VOD+zvE/iHBim5K3MisNnJ+0ZV2mkw -6Dx3IB5bsu4KjxtTG4rqzeJPY4fQJ7Rr1XVgx2B11ANsJbXTSWmf18HSDTE+ -4gUcVHdiivaTTxeCHhn6y2D7/vDuIFfrws48rWBF7KuNGjQLf13Y1nQ5XQtb -bVfNf3NduiCu9lgTYWsXD2mSL9eDd9qthAhsZSUVcpW3HuzT57zoxl6XHy36 -G+lDbY/ai0eFHBTIPjSt66gPD8uzO55hZ6mf7Q3w1Yci4cChV9j810vvPovV -hwNnXq34iN19dcT9bJk+XE9YWT2HfTwr4ApNnQ5x46a/9W/h/U2zX+8lZACm -5w5G3sa+FqnhXNliCMNvjGSKizioLQYZH843gYqZ6jWqJRy02v+to1/oZjBm -d3AHSjmIWKy6o7wf4JvM/t5n5RwkN/pgiVygBZj3cBfMqjgomm728aw2Cwb4 -N5U+rcb5x+ebpEcsIcqlYEnCQ7yfFlFLclqtgRFp3NXyGJ+fqZDHxZk2ECWw -6b3UMw6a2yL/qjHJDpYGqj+dauagHh7+7/07HWBDaPOR360ctHdlWEaKuhOs -M/2g9LGDg+7sbmo4n+oM0r9kuj26OSjuh8Kszm4XcA8au3bpE/5+2Fp5Pt/h -CpmbWQuRQxxksv3MliEXNyh5u9vAeZSD/lO4EtJId4fmII/GXi6+T24eqitc -6wFpCV7dMzP4fPVp2zuKecIv0UCd8nl8H3Rwd8WMewK/cGK6Ni8X0c+fKc7r -2waxshczGQJcdEXgx/qzT71g7a3qZ+JLuKhqy4bu1GpvsK/5fFlRhIuyjE9I -zhf5gDUSShMT46LWD/lH6Ce3g/DtFtPHy7mo0iFbIzzZF6qmb2VdleKi73vc -ePay/cDjzbN/GLJcNG1FC55g+gM79XVimRwXFY6/n4sy2gFk/Htea0Uu8rqW -H+QnGgArKxXmzq/koopyux38RwNAPanSdFaFi0yU/vt5/GcAlJGJWyRWc5F6 -367uN7t3gvWmgooFNS76vOwvp+zBnRCerzbE1eCitnTHIGuPQLgdc0I+W4uL -MmNzlu1rC4RIi863aC0X1dUv/gyyCQK+e+Pb7tC4aLkvHKXXBIGFVI9wtzYX -rZJ53rqyLgiq7KcberH1WhzkheqDwKVwdt8gtqvZ9lvvHgdBjE915xh25sqY -lwdeBMHJD1pRi9iKPbeXN70LAtZlXzkNHS7S8JfL8p0NgtbQNyJ/YZsETBSm -GrChbs2FNA72zUvcKEcjNujUPWL8wJZpnzSXY7Chtk1rcAZ7wnK2o9CUDeap -xRsWsG/o8PC2WLChK/J0geg6LhKflfSWcmFDaWmiFA378ynDpTl72LD1Ktm+ -A9vluXHHrjA2XOe2rAnCrufZlKMXwYa5yN37SexLUeaGT6LZcJfGktmD7eht -vXMong1rveLWxmFXa3hX65xgg5V8TfM57PTahN0PbrJhd4n0dCP2Hv2LJrGF -bPhbqa/vObb9rbKljCI2DG2Ye9GMLXJx+Nb9EjY8yhDJbMNOjXQeqbrHBjOV -iiUfsRNoGn9VPmGDqMdo6CR2yMWXoeW9bGAcatBV1uUiG/Fhs8g+NoS7FD1R -xV6byiOmP8AGZeh2V8MejjQsKRtiw4n3yyLWYO90zBm/O8YGvpSyYxuxvQSj -9pb+wv3dBw0ssa2jFMOLVxDw/FprUgj2k5wjtmflCZik/zseim3WMqkRq0jA -nwtJXmHYepov3zNVCKiXt9CIxlboimd+0CSgQO5n5gHs0U09K0QMCWjYKPzh -NPZpvtyHu9wIePgxea4MW2SDaJaDBwGdEXULFdiHt8dG0rcRwHf+Pm8Vduw9 -5zWLPgTYjY/+qabyk7xnLgQSoPZia+tjbHpzIPvfCAI2y1S8bcPuOqO5TD2D -gLQ3HuFj2HeQWPDXMwQ8Ni6aHKfqj081lpwjIEBUK5KDrW/TmMi4SID61XPB -k9jpPEGTDlcJeFfDpM9hW4Xlvo8tJsBk3SDiX89FysrHjMzvEOCyNS9TAHuq -Oewc/10CdP2ODwtiX9dCDukVBDAUn6cIY//p6WnIqyGAJ03oghj2PXulwtdN -BGjpHjKUw077xSeY2UxAsuAlX3nswMKRnd4tBAhmtCcrYEsI1Ch9biXAJ7yq -QQk7tNbr9M9OAiR9NqqswlbXvhCjMUTADrsxp7XYv7oOtH8bJqC9i2VDw25L -JfRKvxKwuNCAtLET+w1GTMYIEOtV11iH3Z3V7uf0g4AU3bPNG7DPLpG0jOMl -IXqVQLoRdt1kz/ZofhImni6LMMb+0lMUuVeQhIF/UpwZ2Gb3WLmBS0nIu3Zf -YBP2cEDsb1tJEmpV7Sw2U/ntLaUspUlYlfxE2Bzb1FiKhmRJcDlV8JJyhlix -J12BhCdhNVZAjdd8KlNaTYLZXV4pJjaZX9wkq05CYtvnWsoZGfs/LdckwXot -/i2h+pHSYgI0EnRtlG9YUuPS1sFjerjf2NI/1tg1C9JJw/okbA70OLEVe+hb -3/k+AxK4xWIyNtibGuKedjBI0MxsXGmL/Tn0jspDIGEo1ZbfHlvcK97wvgUJ -X+J+R1E2YW61L2ORMP9Dvp9yusLA/vytJGQ6XbrrgP1AoDQjx5aEXavnpRyx -BznxBZfsSZjyeBlBmfFM9u0pZzy/6Y6GE7XfZQOjR11JUPz5JJbyqexSvoPu -JKwJY76gPBBpoxfjRcIx6eM7nLHF/FdYh/uQ8K+hYz5lhs2gX4gvCS9Tk75Q -PqV6IM0/gASTy1o7Xag8IrbXvQJJeOeenUV5YHpFtSubhHJaYgtlsf7BVnuS -hGyZlnnKjJa7w1bBeFzyCM2Vynf/wB8IIcFPudiV8qnrtjKmoSQ4GpjHUn5w -Sk7HcC8JKW5mlykPxH7esiGcBOPYmw8oi7LLvGiRJPDmJrRTNnZKDFOPJqGy -qX7k//U32R1RjiEhhhu6QPmkpvwVuVgSSmSPirthV0kMVUjGkSBhLKZEuf93 -WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= +1:eJwV1Hk4VtsXB3ARZSyEIjI0UYa8xpS1DKVM0WQuvd73JNeQIT9RpJKUhBTd +ZKhEMg8lSqI5tzTcuhnCMWaKEE6G3+6P85zn85z9fPfaa+99lNh+O7m8PDw8 +veT58/Z/q7HmfsNb46iFbKnLa2kwHrqlyzbPA59F/DZ/3Jaul7TS/CG0u/aN +/rEd5x8BEdYzmM+ICyUTF4dE1PGb14PBr7CLKcQxz5fWROS+hxFq7em/iR80 ++KdNa/8Lnw/K9KYS9zW+Pna06j9Ild1elU4s26Xi8susGdZnP5q5QWz145hh +YH0rXDA6UnibuHq6Tzgktx0+CR9uyCX+HCkTds+3Aw7tLHAvJB4SMO8b0+6C +jB1a7mXEArGHnVgT3bDE8tfbB8QK4tdf+lf1QlAcT/5jYlu5X7eHzAbg5NaO +e/XEVIaytPrCIdgc8JD+SByxakfUX/U/QNSx6XgT8X8ynzYE5Y5ACv/AvAFi +jrPXoUuxPyHk3re+MeLhVJ7MEt9ReDC61GyWeKGy+uIR7XFwUqVMJFRpSOLU +WSyW+gXdRqE9y4kVs50iNCd+wYFF/02vITZYf2bIp2oSZg8HHgFiT73W+j6z +aThbbZQWSDwWcmS+0OoZ+GpdVB1JfKJKeJPqwlmIXxdkG0+cggZ3D9bPQaz0 +YFUBMSfrpXlA7jx0y6h6O0yc+/xSW6QcLz4/XXuIV43U27PvWEIsL9a+XxG0 +hPiY2nhpkS8f/spq/2xInFSopPJDmx+bL6V/iiFubBionr3Jj/RgcF8aseLP ++85iUgJoZZ/vV0acp2ObqD4hgJpTRi/biJ8+CJ3nXbUQ46L5SozX0TBe97G1 +10wEDydyDy1aT4OEtcjisGoRHBr/8lmdWOuTOYoaiqKlw/YX1sReneUZGzTE +UFFxw4ZY4sO89VqbRRZj2bStqrg6DV3KBSNRv8RRwqQ4j6VB+kO9FnzHkkCf +KGkrZ2Leu91KS/0lMKchzTuSWJG1YmduvwQm3VY2fE/sbBZf8rZNEqX34mSw +Jg3vPAICZd5IYeMjffEmLRq+Zcedd18ojd4zizoEN9Aw0J97884Wabz+TN/A +kFgoqOOjUY00Fhmc9L5KbH56t457uQzqnXSe2a9NQ+UtvfGc9GXYrTlay69D +w60uJnhjkDy29e/5VapPw7Y90d8C8+XRuDqA7wfxwFPJrfnd8hgx6ntKzYAG +nVvrpRSdFLBhXKL5BvFT9r5SfuMVGFzvOZxiSMPPH23/6z2liHcCXXP+NqJB +0se8rNRGGW982+g3BjR03xLytPNSRk0faN2MNFQ0N8gNnlHGAdlrtdHErtZu +p1bXKOOBUM+O5SakvnXBO69qq2DA5vcXrE3J/H3Zw+EyK1E6Nj3miTkNuw8K +q1u2r0J319ubeC1pgOA92g4zq7CiN5PrSKwWla7PWbYaC4z4ZwuIeW6yTMPt +V2Ntv9RxNysa8r+5OJQ8WY2sRx1lj63J/dybFyl7Yw1GtVCLru4g9ZnbfO5j +q2Kz4HBi+h4abu5KbpoIV8W+B5wSvr00xLHb2+ZfU8VRTdrEk5hz4ki/wkdV +sh7RYm0HGsQfXufZZaaGwyNVDfWO5PywhtSqVNbh6s1OstKuNMgpX4w437ke +S8qyZqfZNDw8N6Y6xauOWh/im0M8SD9GnT5RSuq4PFwNxonTnq5UNd2njksm +zib+4NCgfLDyw+QXdXzl2xDQR5H15nWtot5oYKtDkuKUFw3ycgqUopMWJpqO +eYUG0rA+K0jkN2ijhjzPbbEzNLA5p8bVbbWxTkLGL5M4RSXxm7urNh6supuv +E00D343Couch2mi31/e861ly39L6dicWa2OIu9Hr4nPkf5rifl1VhYXrvRRc +Ay6S/T1vreEooIOeBSnC1ldpyAxYaVder4sYKnzSo4CGkm8155c266JUuW+F +ciENtZZuL8L6dVFdkBtGE3cqXzE2FdLDjldG2R7FNKz+uED9nYUelsl/T/Yu +I/eZ1S/4vVYPz66T7U2pJPszVly3/IE+nn9vkerygoaGYNA/nWWIQWtatGNp +GpT2/Wvr5r0ZjxY77Tyh0AHcuXsF8kcR9cabbvrt6wCZ/ooFMmxTvLxcwOZx +XgcEsTY1J6qZY6DrNfa52Q5gD06/lOzbgs0lc4IrHDoh3zRwQfo7C+xdWWY3 +UtMJt8a8nuQlbccv+f+1yqp3waTJ0n+eRljhxEhuwnReF7Tw8I20H7DBa0Jl +Fvm63eC73C8+UmUHJkou3nLkcTcUHHpZcznKDmsSTC5GufdA6OiyiXWH7HGe +gkSPAm8vjFtu3fti/07k029roB/1gqFLgkmX/S6UzPXaf/DUd/iw7LrXU9Zu +VJLJraqw6APZ26ce5qzdgzZaFxynVPuhok3N2lZ0L55nJRgzggOg8Gn4YPDg +Xkwo3xuYMTIArMsJeTfbHDCjVtqUYgbh+vxRjcQ6R8zc3NDze2YI7ploNkY9 +cELHF04bd0gMQ4r+OfHpXGe8UjyZ7XFnGN41ZZ1hxbrggR1aPfeMRqDcJnXl +4ROuGHfWJeJF6wiM+Ozi8eW4oft4mv6+4z9hfKuq55DZPpT4WL7HSm4Ucga/ +Tgbq7ccLVSvOnHs1Co6ZWR5uIu7YHGq/vtpnDEpLrPbzRbujRqCZlrziOBjK +fZiKmXLHuKaCS+eejYNK28HG94cOoGZKJ78S9xd0Cv+1I7XjAJabvksIFJ2A +hjhbD4s9bDTqsYnQuDUBSSHpwkca2Lj4bcl2d+NJeFg9N+Wx3QNX+JutNno9 +CYtcMZpV6YFZSwa12DgFhu5DOVE6HJwQSpWaLJqC21eHA231OJgT+swmrGQK +lnz8aSxjwMHKwLvRM6VTMLRl4lOOEQc9SyTmZu9Nkf8Xz7x6Uw4ucFIaGX84 +BWIT4k4S9hzUvH4ipvTlFHRe0BVM9+FgW6deg1frFMRVHTtUcZuD3nVFSWWC +DPhoJxuG5HDQXsmuf0iIAes7xYIGuRxU07qot1aEAaHk7jv38znY6J5xJ1mM +gagAu757ZRycNFk4dUiSgWOqK/8qr+WgWFrEeNNyBryS33iXfONggYSD3qgG +A9vFujcFtHHQ/3T2aWEtBtZG8Yhq0xx0+Z3/SHkDA90BuvnFXRxUiC4asmEx +cMA2fbBogIP7jnmYJ+sz4Mgf6FvIcNDBQyZ8HBiwCJQ9nCfNxZhoJ91vOxio +TT9jmbiUi6f8MyV67RjYVP9zZYgsF6nQBenD9gxorXrz1UyBi8XujXUzuxhY +9iXMrGkVF8OjPHUWOjLQv7FFWkiXi+0KXzxb9jNwkTfj0cFdXHy9xm3kjC9Z +v6ZIis0eLsrWcaUoPwZOu4QEsBy4WPlf8TezwwyElNmtmXPmYsSesf2//Un9 +1LyEK2wufpd1knI+wgDrNZvzzJ/ML35P7HMYA18SVgmrxHMx/lym1/NoBgpA +1LM3gYv39fY88TlL8gfHnuZf4mLk4zlaMoYB7e1Pww2SubjgVtgZ13MMxPF4 +/LRJI+OXjGxrjWVgq1/G15A8LurwzV3KTWBAXv6snnEBF3mWXT5tnMjA2Gu/ +S3xFXBTvs9/8nvjGarCJK+Xi0phkgdFLDMy0tNTcrOSi0P760TVXGCizlst5 ++5KLYtMvpRz+ZuA8w8uf9JqLynWvjnwhZuf0HXCq52KSWsi1vdcYWDy/Uq7z +HRcVblrp26cy4F3leHHqMxm/pj1PP40BFbUrwSu7uCgadM7/VSYDzJfjH793 +czFK97ec3g0GGqK4WoW9XFRaMxWTSRzertNnOED690SxKOgmA40pH912jHLx +ze13SiJZDCQuEN8SOo9CsXKXyLlsBh7+bHEJ4qOwvJc/mZ3DQE9LboAvP4W7 +4hUVnxJvKjPPYAtSqD4oG3vyDjlv7iG/LcUpVHvl/WIgl9RvvUViiySFj3Na +g8zuMmCkL6EKUhQybyuSUojjRfP2spZReN5LZZ1xHvle2Vosp0RhZ1h6YXA+ +A1RW3kspFQrdtgkM1hDHxx9tXbSKwpzPA9cEC8h8lKTofFUKFyc32Fwhjpe0 +8BzQovDtTd251EIGKmclI7q1KVwS//VZI3HX97bLbToUKiZunJEuYmBjTWjd +JwMKJTVbHp0j7vQuUHiEFNZXck/vL2ZAzDFM974pqWdX4dt4YkOzbdbF5hQ6 +OcrE1BDHLaOPZm0jeQKzNnIlDFTML4xPt6TQ/7WL41bijh9h2VetKWRpXfng +R2zwXOrfC3YUatpypauJ2cV0f/ROCuOyW1pp4guphbwnd1P4onNqqUApA3TA +dq1gRwq3R/d/tSAW3SdtcdiZwv1Sdw5QxAbbO9y8XCnk+9roeIr4worj5/e5 +U/i/OP/LFcQVQpY3HNkUztOua2z4kzcu/WAnh8IYX/bFnj957R3vrCkK5xZY +lE7/yasv6t7qSeHpXYe2Li4j9d0/PoNeFMbr125TJr5ww3KJkTeFfeusKrWJ +Ky7IrNP1pbDAcPZvE2I6pNNE8zCFzr//7bMlFuEUO6oGUFid+s8dZ2L9HeF+ +KkEUKjS1feH8yd9odUY+mMIV/CJHfIhjVy29LhNC+s9YRQYR31vcVSoeSmGm +etr0UeL238WvhY+RfmXw9Bz/k98T3s4fTuFUjz+eINb7YDU5F0HhLdWRhZHE +/wfHkPSJ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + "PlotRange" -> {{0, 180}, {0.5674539010654064, 1.6690683697985174`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.9887929549829141}, + "AxesOrigin" -> {0, 0.5674539010654076}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6526,7 +6394,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.9887929549829141}, + AxesOrigin->{0, 0.5674539010654076}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6554,7 +6423,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.9887929549829119, 1.0113097844802965`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5674539010654064, 1.6690683697985174`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6562,9 +6432,8 @@ WfOyBBJy3BbVKYt+SewXTCThaogfjbLRf3Zzi0kk5Mav0aH8P/6R9W4= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991333813212965*^9}, - CellLabel-> - "Out[251]=",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] + CellChangeTimes->{3.991333813212965*^9, 3.994386660524967*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"a3250b78-3d52-4921-8d43-9383ac43051f"] }, Open ]], Cell[CellGroupData[{ @@ -6627,372 +6496,183 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849261714945*^9},ExpressionUUID->"24fa5db0-1063-354a-bd60-\ -c117a27ff3e1"], + CellChangeTimes->{3.991849261714945*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.0784227471040894`*^-281\\\", \ -\\\"5919012181389927685417441689600000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 252, 225, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813432829*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.851052244054904`*^-268\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, 93, + 9, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.994386661027526*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], +In[93]:=",ExpressionUUID->"282f2a5d-8408-4d9f-8f16-25ec53740b1d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9214123648785273`*^-295\\\", \ -\\\"2610284371992958109269091785113600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 226, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813442087*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.0569414374490395`*^-278\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 93, 10, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.99438666103434*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], +In[93]:=",ExpressionUUID->"4856b091-062a-416d-a507-2c518575c2e0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*SuperscriptBox[RowBox[{\\\"(\\\", RowBox[{\\\"-\\\", \ -\\\"9.614868462060315`*^-8\\\"}], \\\")\\\"}], \\\"44\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 252, - 227, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813450123*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.294980853084326`*^-289\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 93, 11, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.994386661039822*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], +In[93]:=",ExpressionUUID->"d7374219-f1b2-403a-8025-346698340502"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 252, 228, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333813469118*^9}, +during this calculation.\"", 2, 93, 12, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333813432829*^9, 3.994386661045224*^9}, CellLabel-> "During evaluation of \ -In[252]:=",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], +In[93]:=",ExpressionUUID->"04315fdc-d260-4503-9001-b6e46b42a0b7"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VG8bB3BRIZF9nzF2yZJtMIz7tmethIosWSIVhVSWFJIiESEpkkRK +zEzKEqIklX5lXypZWoTIEkq95/3rXJ+/zn0953t/nyPrE+Lkz87Gxmazio3t +/8+FDy+eKiQXmaT4hC2bXrcy6bwufsK0Nw5S3KkxoQ0KgCJvfMR7L8H6yi1b +zBp0IWLbnR6O3kKI4zrZKtNgAQJTYpeWehhQuIkxO1rvDB/rHEPmepog1IFM +k633AyuF8fczPe8g4LCUr1JtOCz16F+e7hkGfxVhdZv7CdBsfrvobeEsbPaX +/mi08zJIf6z+7KO2ArcTj7G3U/NB+KDXHU5zDvz8rkH2h1oRXNKyqnV04cK8 +JP6Tzx6XQF/O5sYZfl5MHkji4ku/C7kdZRsiFHmxu9faNb/gLrjxKXstG/Ki +nU1dqXLFXRiMJ/1l9+XFC0bRTqQ3d2EoeJ2x8ANenBb3NM1bfw++Wow+pO7m +w9AGG+exM/dgcTr7ftSNDfjyU7JF8pFySC6KfcMuIYA7VawGqaIVYKu7X1BE +XgD/mY4PMqUrgOupk4uyugCGT0koqclXQMKI4oCdqQDqnlC5wLe5AqLlXn3O +3C+A5d/7knNtKiC4QPyvUo0A1m15a9oeVQHb8yrV7NwFsSv5TU3eYAWIZY6c +y7gmhIX2T1quX6wE8U0PEhaLhVDwb/ny+cxKkGxKjPWoEMJ7B5o/hF6pBPL0 +xqPKzUJYU2z4QO9mJSjaH/au/SqEt4/cSzlbVQk6q1eoIzrC2Fm0eNR9sBK2 +houOarcJo5nqjQ1PFBiwjefrh+wOYcxJPeEpt5EBToXVfX8GhdHz5aWtseoM +cP1vz5uWH8L4Qw3E1KgM8FC7WeMmIoL7WSM6260ZcGBUMz3OWwRDxuV8XwQy +4Kyzjcm7BRGUamxaCilhgCSrXZJ9lSju9dhUmH2XAeVCzr+0eESJ78FLqalg +QPc7z4p0GVF8yca4+uMRAxS2h8tt3yKKHw7qX5R+wYAmh/y1/10RRb36TOeT +XxmwYjXf/tpYDCVXttP3yjMhrTiybMVKDE9MpseMKDFBYS1bkvp2MSyZ9crw +VmWC/bN1phf8xdAz0gzttJiQa05h2qeKoVLt2M1hEyYYoF32y49i6EBVb5TY +zYQwwxteL+LEsWjvcY2yc0ywLeCbs0sRx/GsOY5dKUyQ44xOar8sjuuf9nqz +XWTCf52ulR0l4hh424RhnskEjcPrOT60i6PflqLHmdeZ8LX4WPFPSQlsbXB9 +7c1gQgPvGO2oggSu6rth1cJiQla405tf6hLIm1HqoPyQCZZm6ot/UAKl2R6v +HaxlQuH7YRvOAAmkn5rW4n/GhD3CjpNSTAnUSqnsu9nNBJ2o2tPX6yQw0QAC +m3qZsG5YRVS2RQIjT0SlDPYzofo+Byj1SSC5VieH4yMTRO2q0zb/k8C/pIBX +0l+I+U8r6FraSWLmOdFN0QtMsPixHBk8IokRO2PUZgVYcGJLpuqTCUk0cLVq +iBFiQfkN9X6hBUlMlT2rvFqEBeLO3obVXFJodMwoarU4CyYePfvFoSGFpxdt +zTtILMiISwu/clwKK4Zcl0pVWNA6sFFh4rQUPqhB2s+NLPij29xhkiyFhzsO +7qFuYsG+L/Pao9ekcJh2z5qhzgKavfuMRrMUHidx/HdcmwXDIkrBT3mlsbtr +xsPUiAViIQ0kMTFpdM26KbTFmAX2rbte76dII7fNg4e2dBZURSarbdCRRgWd +Q+3mwILzH6fHd++Sxgb5245rzFnQYHA+9+5eaTya+Pzid8Jz6fK2/4Kk0dzA +qeW1BQs8LVxLi2Kk0bncXCzRigXapbUBPwqJ93Wq+LTYsCCA3UXM7K40cr1T +CEyxZUGe+1RL5gNpDGkdC3K0Y8FaPlklWisxT3hUUIs9C/pDE0cTJqXxj1ze +wcStLNjwSiazZ0Eaowo8wtS2scBCsdpclY2EYlEXTrYTLu/5XvhGkISrVikU +r3ViwWnj7XslDUi4GP/JxdqZBVs8r//UNyPhF3WBnl7CfKe+x7vYk5ASEl7p +70LM03ymOM2bhClO3MeOuLLAd+ydfnkQCTU7e/2mCatyUl68DCfhmVKxyqCd +LHhkW/N97TkSVg5sDtq+iwWxBzljFDJIqLO6qu8xYatUZz6zayQ0EWG7p7ib +BZ1vpzbHVJLwF9k24Qvhq7NGTbm1JLx8e1WyqRsLfETO7Xj0jIRk6uRyFuHp +XfIRs30kVB0dktJ1Z8HDyMOcAqMkvKp5700U4ZN5j3M0pkjo2K33s56wZf06 +VftFEnZ2DiWsEF4/tLN2PzsZv7NEzunvYUHHqlv2Z9eTUTWFznaIcK78z/dF +omR8stz0/Rphb0sIaaKQkaYq6NBGWDkghW1IlYwSr3IUfxKeSupLX9El4x3x +lggRDxaw7ijJSwEZS16vM9MlHPUqjGVgQ8Zltb4kR8JmU42WrjvI6Pu7yN6P +MDc/X0+YBxmNY0dSjxL+T8s9MD2AjHKxPNvjCGfvKFkqP0LGCryceZ6w59H5 +86+iiHnPLrulElbMNpMeP0NG3UtVty54/H9/Lt7jTCNjnLRVRBJhZv+giWIu +GVPclNtPEo78s/E/syIyGiz1lR8mbEo+tte7nIyp0h8lPAlz4dOfMY/IeNCz +mt+acPtegYSrTWRUeT2RuYnw5XhPkepXZHQe/3ubh/CeW2XF3d1kdCyNsPtC +nIfc80X9uSEy8gQPnqon/O2r5QuB72Qs56mxSSdcsS7DTXOejGbNube9CB9T +G/pu/4+MPmY8eRsJmziqxwRxy2D/jSsqP4jv9Sr9ef4tkgxuPbqV/xDhDKaw +VrOyDPIq5wYrEnbr2ts0pCWDXNo2B/qIfHwV/zMqZSWDhaqqVrqE79NsIgy3 +yaBv5HnlASJfEXuyOHe6yeDcaNm9GMIcBZtVLwXL4Oof18ofEPlsexJTe/+4 +DK58u61mRzhtpM3+dZwM/mWOuQwS+SYr+4dwZctg77aTFTNE/mnlV1gnG2SQ +//cS8yuxPxY97StTrTLol3bH1p+wI9tqa693Mpha56L8YQexP07BfTAmg8zJ +tY+eEvtoFSUbe2oNBcneS3v8iX19uaHupsE6Cj7yzrN5Suz3tiLX1mk+CrJd +3XhWhrD762SBveIUvLicstzmwILDMgs3TTdRUC0u/Ns80R/zzLTWJU0Kvrjj +laBPOHLLpslKXQpeMfCJOkr0zZkj3lQ5Ewo+mXGJ/2xN5L25rZV9OwWfp7bI +XSP66mlA/mRzBAUDzeGTB9F/Nn8MBaOjKKixaPrNn+jH9rROqu4pYh61AL8g +oj/7qrlPFZ2joN34cnWgIbEPPOGCZ/IoODVdxGOkR/R7xRZ9qyYKfqp+kKWv +xoJrFiPuf1soqOQlFc9J9LVcX8ypqpcUdJC8sNxB9Lk6O/OFUheF6Ou7aT7K +xL44k/ZwfqVgi1xJgqscCw4uzpxq5ZXFbJ6y0Vwx4vyP7BP9LCiLbPnJ8yKi +RH7H+8s4xGWRaftO6IIwC24NNHebyMni2X0Zp0KI++hD/WW1B1RZvD6ivGMN +Dwu2njHsveEli+xrFm9ErDBBW/C0ZlSlLF6bjTU/Sdx3bMnzT3OqZNH1iOPc +yfdMaOcIcquqlcXePN+5qAEmHJh3OjPzTBYHNfrHg3qYUNSrMBDQL4tRb0Mm +pN8Q92V+a6IzhxxKLV6ndDxmwtIm/g/qLnIorZEQmJ3DhIVrkqd13ORwIWD5 +hlYWE+Y2KCoYesnhrZWCi60ZTJiaNQyy2C+H++YHLk6kMmG41nfBLUYOXc2Z +nrxnmNBm95Av6ZYc5qlL8bIOE/8nBzxheF4OQ/f0xRVZMsG47G5BVpY8Pj75 +VuD8ZwYMUMryLa/Ko+WX4tKcEQZEZpVen8uXxytG5IGiIQY8PF2c51QqjxsE +hAWr+hmgvasgh69OHu/qC7DXtTNg45rMtMRP8uiclx65s4oBol5RpyLUFDBi +RHZXXzwDZgRtvV2bFLBxP3v0IXEGjKZ4u4ZyKuEl6wZFpkgl2Pw4ZjNGVcZL +5r6HV/NUwIQvVxgrVgVvXilUNii/R/z/i7GfbdqIAa6MjmCjMhB8rZRa8UMV +yW47SjgmSkA66f42KlUNZboyPSiHiyFnkyG/UIA6Zn/hnwhQL4I2SVO92XQN +HDCQyOvmKQSadFOaZrcmTt1ekxBUlQ98HIXhe+M2o6G7xKDV6FUgn5Yx3q2k +hVzFWTAgkAPcinuqnJ5r4ceip/6qJZmgQZe4f8xDG/nJKyHSrekQ+kGw2ZZN +B4vyO2fZ/16AH7MpLjY5OniwsLjkkP85sNZsybVR10W9m2rzY4fOQP2s0e9f +7bpYjLQDzhWnIVhNu/+tvx7qdByrS/CKAfqUX+dubio+VqGdG+w4BpYK4g68 +hVR0W1ZTbzsaBqzJZ7J+RVRsfPNbUmJfGCg8DFuoKaai5AG50lDXMFht+yY/ +sIyKCyGh6Zb6YdAUkvizmUXFZ6s3/du/FAomtXPZkc+pWD8gXVMSGwpUp7fD +XyaouG31bt2+jCOgcur88SZ9fYwT5+N6yQyBOqNba+xp+ohrP4ipZYfAtl8N +l7qM9bG2+JnszcgQOB48f/erqT66azdOvzMNgdY93p/47PWx3dxV1OBtMAQa +Um3dvfVRRj7ah3fuEJT+/CQ1l6SP7x/7PE22OQiq/oYNiv36CFnvE2S19sNF +Ocfl+EF9zD/aGakptR/mPvroDX/QR8mTHWMOa/ZDvVtK2fURfVz5vWOuti8Q +nLZ9zBab1MeZpakx9/hAOGF05jA3mwHGH5KtKewLgFaBt7KTigbILW5Sz31p +H/jXByawjhhgSsVlb93NfjB1aPyYZbgBPu++KndJ2g+Okw4e6I4wwKLjFrFs +3H5wPjrEaTHKANWiYwb4hn2hghZBMU40wIKWzLHpTF/4UxVf15xrgAfudcc2 +rvjApfvX5941G6DQ+9F6HNgLDQWdfjMihvg0RWVDX6IXDNnLekWIG+KJwJdL +LwK8gG3p0O7fkob4vd+sqWuLF5ht53RcQzFEJ86kAjqPF7SsoulLqBri6JGt +sfbpnvDKJ5/b1MQQz7Ul2LoWekC/QlB52j5DNNJ+IprT4w5zJf9+aT40xMms +Tpnh87vgs6tVwblqQxy7E9ByK2wX9K6+sGWk1hAfDc9+id6zC2q9Ja9kNRoi +NSDc319jF8SJ69FWXhgi/cDya1LHTuBPCopuGzREq30x5ymUnaAW0MXmz07D +OoEjDfytLuCrWMad60DDYFpndpv9Doh85hmktI2G4jURuUcMdkCav+BLhhMN +pWZCGzYp7IC6WydSXu6kYYVJgk7fbycQVtqyYWUvDVu7XKXE7jpBi9KYsHcE +DXv8Hj4R4HcCVRUZilI+Das+S7JdHdsGM6oZVMY0DeHtBsn6sw7Q+wothWZp +mNyFwz37HaAxeGpH+DwNJ9ekDay3d4BUhs0R6jINx3Wz17fyO4Aqje1uDYcR +pvJEi5++ag8+Nodkm0WNcGaHXvz3B3bQGWC9vtPYCHNutlwV+GsDj4p+f5pP +MsJPQeVX7HqsgGoe/ss22Qh5BQSTuBut4MGnifUFF4xwoenV4GCJFTDIH/Rt +LxlhVvRQeHOkFdzNabxw/aoRbs0Sik+VsYKClDOG1uVG+Jr8eifvIUs4F74h +PafDCD/q5YnRxCyASyipeLLLCL97jEQmsFtAYiVbnVmvEZpGtegNT5pDwtTM +54lBIxSMdgjreWoOJwM7jU0/E64mud4OM4fQPVe+fls0wotieXJvOs3AzUIe +jcjGWJ7JrdFZZAornVx8zRRj5K1PMRhMM4UC/6kBW3ljTIvd+HIx2hQ+J1Yf +c1MxxgyOGyYhLqYQ+mLr/RPaxuiyX8p9K6cpnHeMJj+yMka1DsuoV8EINbu6 +/uiGGKOyop9JVI4JeHyraas7YoxjKt+yA46aAFtkQY5FuDFaB9ZnHHcyAaur +B3SdTxjjD+fI75y8JvDu/aqDYfHGyHa+6nBvPB3GfTQGKrON8UZW6Vv548Yg +dehstUajMXp36mw4HUmD1H/79JKbjPHx8ELqGw8asF+yqvzy1Bi5NMrCaaY0 +GK9aU1rwwhgD/3nx+XPRoIYtIUewwxjdLaFlXY4huGWeOrYwZozpNZvfx9UZ +QE7tCb16Hjpuf7FtOUZCH9Y77q6U5KNj+j9rF1U2fTg1ZKB+jJ+Oa0VmpKY/ +UyFwzaLCZhE6asfeSH/OooL+1gjhQjIdI5s1b9/cToXu4dDZM1p07BTgXfxz +UQ9E1h2sdNhJx5BXY/FXybpQZB4TOb2bjkVx/AzmGl3Qjkk1z9hDx01iYxu/ +TuiA43RFV+9eOt6v/BR/q1YHErvnl3wP0vEAjjQHu+nAYmGsWeRpOj6PmOmT +u6YN/UYZHcVldFSTWhW1naoFgUeL8mzK6VjxwZH0mKIFC+UP/Ccq6Oji03bD +lEcLBOV6f2lV0ZEI53jm0Gaw4yJJP26k47P5tRV7UzZDXWexX0cXHeMVov/9 +/k8TbPkeqUf00tExemd7T4km9Fq/WBAfoOM6qj8Mn9KEuZrvSZ5DdAwyybWM +09IE9Rub730bp2MhMzr3W6YG1PWbRqRM0vF0dpuWXrAG2ArvAM1pOub0Pxi/ +Z60B+84efRs+T8crS7arlX6rw1xjYq7YIh09z79bq9ilDnHL2b41y3QcLWEE +b7uvDvy6pWoeK8T5yFrwlpxTh+uHaub//aPjuwlu1iY/dfgfr6sg/A== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7006,331 +6686,139 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwV1nk4VG8bB3BRIZF9nzF2yZJtMIz7tmethIosWSIVhVSWFJIiESEpkkRK +zEzKEqIklX5lXypZWoTIEkq95/3rXJ+/zn0953t/nyPrE+Lkz87Gxmazio3t +/8+FDy+eKiQXmaT4hC2bXrcy6bwufsK0Nw5S3KkxoQ0KgCJvfMR7L8H6yi1b +zBp0IWLbnR6O3kKI4zrZKtNgAQJTYpeWehhQuIkxO1rvDB/rHEPmepog1IFM +k633AyuF8fczPe8g4LCUr1JtOCz16F+e7hkGfxVhdZv7CdBsfrvobeEsbPaX +/mi08zJIf6z+7KO2ArcTj7G3U/NB+KDXHU5zDvz8rkH2h1oRXNKyqnV04cK8 +JP6Tzx6XQF/O5sYZfl5MHkji4ku/C7kdZRsiFHmxu9faNb/gLrjxKXstG/Ki +nU1dqXLFXRiMJ/1l9+XFC0bRTqQ3d2EoeJ2x8ANenBb3NM1bfw++Wow+pO7m +w9AGG+exM/dgcTr7ftSNDfjyU7JF8pFySC6KfcMuIYA7VawGqaIVYKu7X1BE +XgD/mY4PMqUrgOupk4uyugCGT0koqclXQMKI4oCdqQDqnlC5wLe5AqLlXn3O +3C+A5d/7knNtKiC4QPyvUo0A1m15a9oeVQHb8yrV7NwFsSv5TU3eYAWIZY6c +y7gmhIX2T1quX6wE8U0PEhaLhVDwb/ny+cxKkGxKjPWoEMJ7B5o/hF6pBPL0 +xqPKzUJYU2z4QO9mJSjaH/au/SqEt4/cSzlbVQk6q1eoIzrC2Fm0eNR9sBK2 +houOarcJo5nqjQ1PFBiwjefrh+wOYcxJPeEpt5EBToXVfX8GhdHz5aWtseoM +cP1vz5uWH8L4Qw3E1KgM8FC7WeMmIoL7WSM6260ZcGBUMz3OWwRDxuV8XwQy +4Kyzjcm7BRGUamxaCilhgCSrXZJ9lSju9dhUmH2XAeVCzr+0eESJ78FLqalg +QPc7z4p0GVF8yca4+uMRAxS2h8tt3yKKHw7qX5R+wYAmh/y1/10RRb36TOeT +XxmwYjXf/tpYDCVXttP3yjMhrTiybMVKDE9MpseMKDFBYS1bkvp2MSyZ9crw +VmWC/bN1phf8xdAz0gzttJiQa05h2qeKoVLt2M1hEyYYoF32y49i6EBVb5TY +zYQwwxteL+LEsWjvcY2yc0ywLeCbs0sRx/GsOY5dKUyQ44xOar8sjuuf9nqz +XWTCf52ulR0l4hh424RhnskEjcPrOT60i6PflqLHmdeZ8LX4WPFPSQlsbXB9 +7c1gQgPvGO2oggSu6rth1cJiQla405tf6hLIm1HqoPyQCZZm6ot/UAKl2R6v +HaxlQuH7YRvOAAmkn5rW4n/GhD3CjpNSTAnUSqnsu9nNBJ2o2tPX6yQw0QAC +m3qZsG5YRVS2RQIjT0SlDPYzofo+Byj1SSC5VieH4yMTRO2q0zb/k8C/pIBX +0l+I+U8r6FraSWLmOdFN0QtMsPixHBk8IokRO2PUZgVYcGJLpuqTCUk0cLVq +iBFiQfkN9X6hBUlMlT2rvFqEBeLO3obVXFJodMwoarU4CyYePfvFoSGFpxdt +zTtILMiISwu/clwKK4Zcl0pVWNA6sFFh4rQUPqhB2s+NLPij29xhkiyFhzsO +7qFuYsG+L/Pao9ekcJh2z5qhzgKavfuMRrMUHidx/HdcmwXDIkrBT3mlsbtr +xsPUiAViIQ0kMTFpdM26KbTFmAX2rbte76dII7fNg4e2dBZURSarbdCRRgWd +Q+3mwILzH6fHd++Sxgb5245rzFnQYHA+9+5eaTya+Pzid8Jz6fK2/4Kk0dzA +qeW1BQs8LVxLi2Kk0bncXCzRigXapbUBPwqJ93Wq+LTYsCCA3UXM7K40cr1T +CEyxZUGe+1RL5gNpDGkdC3K0Y8FaPlklWisxT3hUUIs9C/pDE0cTJqXxj1ze +wcStLNjwSiazZ0Eaowo8wtS2scBCsdpclY2EYlEXTrYTLu/5XvhGkISrVikU +r3ViwWnj7XslDUi4GP/JxdqZBVs8r//UNyPhF3WBnl7CfKe+x7vYk5ASEl7p +70LM03ymOM2bhClO3MeOuLLAd+ydfnkQCTU7e/2mCatyUl68DCfhmVKxyqCd +LHhkW/N97TkSVg5sDtq+iwWxBzljFDJIqLO6qu8xYatUZz6zayQ0EWG7p7ib +BZ1vpzbHVJLwF9k24Qvhq7NGTbm1JLx8e1WyqRsLfETO7Xj0jIRk6uRyFuHp +XfIRs30kVB0dktJ1Z8HDyMOcAqMkvKp5700U4ZN5j3M0pkjo2K33s56wZf06 +VftFEnZ2DiWsEF4/tLN2PzsZv7NEzunvYUHHqlv2Z9eTUTWFznaIcK78z/dF +omR8stz0/Rphb0sIaaKQkaYq6NBGWDkghW1IlYwSr3IUfxKeSupLX9El4x3x +lggRDxaw7ijJSwEZS16vM9MlHPUqjGVgQ8Zltb4kR8JmU42WrjvI6Pu7yN6P +MDc/X0+YBxmNY0dSjxL+T8s9MD2AjHKxPNvjCGfvKFkqP0LGCryceZ6w59H5 +86+iiHnPLrulElbMNpMeP0NG3UtVty54/H9/Lt7jTCNjnLRVRBJhZv+giWIu +GVPclNtPEo78s/E/syIyGiz1lR8mbEo+tte7nIyp0h8lPAlz4dOfMY/IeNCz +mt+acPtegYSrTWRUeT2RuYnw5XhPkepXZHQe/3ubh/CeW2XF3d1kdCyNsPtC +nIfc80X9uSEy8gQPnqon/O2r5QuB72Qs56mxSSdcsS7DTXOejGbNube9CB9T +G/pu/4+MPmY8eRsJmziqxwRxy2D/jSsqP4jv9Sr9ef4tkgxuPbqV/xDhDKaw +VrOyDPIq5wYrEnbr2ts0pCWDXNo2B/qIfHwV/zMqZSWDhaqqVrqE79NsIgy3 +yaBv5HnlASJfEXuyOHe6yeDcaNm9GMIcBZtVLwXL4Oof18ofEPlsexJTe/+4 +DK58u61mRzhtpM3+dZwM/mWOuQwS+SYr+4dwZctg77aTFTNE/mnlV1gnG2SQ +//cS8yuxPxY97StTrTLol3bH1p+wI9tqa693Mpha56L8YQexP07BfTAmg8zJ +tY+eEvtoFSUbe2oNBcneS3v8iX19uaHupsE6Cj7yzrN5Suz3tiLX1mk+CrJd +3XhWhrD762SBveIUvLicstzmwILDMgs3TTdRUC0u/Ns80R/zzLTWJU0Kvrjj +laBPOHLLpslKXQpeMfCJOkr0zZkj3lQ5Ewo+mXGJ/2xN5L25rZV9OwWfp7bI +XSP66mlA/mRzBAUDzeGTB9F/Nn8MBaOjKKixaPrNn+jH9rROqu4pYh61AL8g +oj/7qrlPFZ2joN34cnWgIbEPPOGCZ/IoODVdxGOkR/R7xRZ9qyYKfqp+kKWv +xoJrFiPuf1soqOQlFc9J9LVcX8ypqpcUdJC8sNxB9Lk6O/OFUheF6Ou7aT7K +xL44k/ZwfqVgi1xJgqscCw4uzpxq5ZXFbJ6y0Vwx4vyP7BP9LCiLbPnJ8yKi +RH7H+8s4xGWRaftO6IIwC24NNHebyMni2X0Zp0KI++hD/WW1B1RZvD6ivGMN +Dwu2njHsveEli+xrFm9ErDBBW/C0ZlSlLF6bjTU/Sdx3bMnzT3OqZNH1iOPc +yfdMaOcIcquqlcXePN+5qAEmHJh3OjPzTBYHNfrHg3qYUNSrMBDQL4tRb0Mm +pN8Q92V+a6IzhxxKLV6ndDxmwtIm/g/qLnIorZEQmJ3DhIVrkqd13ORwIWD5 +hlYWE+Y2KCoYesnhrZWCi60ZTJiaNQyy2C+H++YHLk6kMmG41nfBLUYOXc2Z +nrxnmNBm95Av6ZYc5qlL8bIOE/8nBzxheF4OQ/f0xRVZMsG47G5BVpY8Pj75 +VuD8ZwYMUMryLa/Ko+WX4tKcEQZEZpVen8uXxytG5IGiIQY8PF2c51QqjxsE +hAWr+hmgvasgh69OHu/qC7DXtTNg45rMtMRP8uiclx65s4oBol5RpyLUFDBi +RHZXXzwDZgRtvV2bFLBxP3v0IXEGjKZ4u4ZyKuEl6wZFpkgl2Pw4ZjNGVcZL +5r6HV/NUwIQvVxgrVgVvXilUNii/R/z/i7GfbdqIAa6MjmCjMhB8rZRa8UMV +yW47SjgmSkA66f42KlUNZboyPSiHiyFnkyG/UIA6Zn/hnwhQL4I2SVO92XQN +HDCQyOvmKQSadFOaZrcmTt1ekxBUlQ98HIXhe+M2o6G7xKDV6FUgn5Yx3q2k +hVzFWTAgkAPcinuqnJ5r4ceip/6qJZmgQZe4f8xDG/nJKyHSrekQ+kGw2ZZN +B4vyO2fZ/16AH7MpLjY5OniwsLjkkP85sNZsybVR10W9m2rzY4fOQP2s0e9f +7bpYjLQDzhWnIVhNu/+tvx7qdByrS/CKAfqUX+dubio+VqGdG+w4BpYK4g68 +hVR0W1ZTbzsaBqzJZ7J+RVRsfPNbUmJfGCg8DFuoKaai5AG50lDXMFht+yY/ +sIyKCyGh6Zb6YdAUkvizmUXFZ6s3/du/FAomtXPZkc+pWD8gXVMSGwpUp7fD +XyaouG31bt2+jCOgcur88SZ9fYwT5+N6yQyBOqNba+xp+ohrP4ipZYfAtl8N +l7qM9bG2+JnszcgQOB48f/erqT66azdOvzMNgdY93p/47PWx3dxV1OBtMAQa +Um3dvfVRRj7ah3fuEJT+/CQ1l6SP7x/7PE22OQiq/oYNiv36CFnvE2S19sNF +Ocfl+EF9zD/aGakptR/mPvroDX/QR8mTHWMOa/ZDvVtK2fURfVz5vWOuti8Q +nLZ9zBab1MeZpakx9/hAOGF05jA3mwHGH5KtKewLgFaBt7KTigbILW5Sz31p +H/jXByawjhhgSsVlb93NfjB1aPyYZbgBPu++KndJ2g+Okw4e6I4wwKLjFrFs +3H5wPjrEaTHKANWiYwb4hn2hghZBMU40wIKWzLHpTF/4UxVf15xrgAfudcc2 +rvjApfvX5941G6DQ+9F6HNgLDQWdfjMihvg0RWVDX6IXDNnLekWIG+KJwJdL +LwK8gG3p0O7fkob4vd+sqWuLF5ht53RcQzFEJ86kAjqPF7SsoulLqBri6JGt +sfbpnvDKJ5/b1MQQz7Ul2LoWekC/QlB52j5DNNJ+IprT4w5zJf9+aT40xMms +Tpnh87vgs6tVwblqQxy7E9ByK2wX9K6+sGWk1hAfDc9+id6zC2q9Ja9kNRoi +NSDc319jF8SJ69FWXhgi/cDya1LHTuBPCopuGzREq30x5ymUnaAW0MXmz07D +OoEjDfytLuCrWMad60DDYFpndpv9Doh85hmktI2G4jURuUcMdkCav+BLhhMN +pWZCGzYp7IC6WydSXu6kYYVJgk7fbycQVtqyYWUvDVu7XKXE7jpBi9KYsHcE +DXv8Hj4R4HcCVRUZilI+Das+S7JdHdsGM6oZVMY0DeHtBsn6sw7Q+wothWZp +mNyFwz37HaAxeGpH+DwNJ9ekDay3d4BUhs0R6jINx3Wz17fyO4Aqje1uDYcR +pvJEi5++ag8+Nodkm0WNcGaHXvz3B3bQGWC9vtPYCHNutlwV+GsDj4p+f5pP +MsJPQeVX7HqsgGoe/ss22Qh5BQSTuBut4MGnifUFF4xwoenV4GCJFTDIH/Rt +LxlhVvRQeHOkFdzNabxw/aoRbs0Sik+VsYKClDOG1uVG+Jr8eifvIUs4F74h +PafDCD/q5YnRxCyASyipeLLLCL97jEQmsFtAYiVbnVmvEZpGtegNT5pDwtTM +54lBIxSMdgjreWoOJwM7jU0/E64mud4OM4fQPVe+fls0wotieXJvOs3AzUIe +jcjGWJ7JrdFZZAornVx8zRRj5K1PMRhMM4UC/6kBW3ljTIvd+HIx2hQ+J1Yf +c1MxxgyOGyYhLqYQ+mLr/RPaxuiyX8p9K6cpnHeMJj+yMka1DsuoV8EINbu6 +/uiGGKOyop9JVI4JeHyraas7YoxjKt+yA46aAFtkQY5FuDFaB9ZnHHcyAaur +B3SdTxjjD+fI75y8JvDu/aqDYfHGyHa+6nBvPB3GfTQGKrON8UZW6Vv548Yg +dehstUajMXp36mw4HUmD1H/79JKbjPHx8ELqGw8asF+yqvzy1Bi5NMrCaaY0 +GK9aU1rwwhgD/3nx+XPRoIYtIUewwxjdLaFlXY4huGWeOrYwZozpNZvfx9UZ +QE7tCb16Hjpuf7FtOUZCH9Y77q6U5KNj+j9rF1U2fTg1ZKB+jJ+Oa0VmpKY/ +UyFwzaLCZhE6asfeSH/OooL+1gjhQjIdI5s1b9/cToXu4dDZM1p07BTgXfxz +UQ9E1h2sdNhJx5BXY/FXybpQZB4TOb2bjkVx/AzmGl3Qjkk1z9hDx01iYxu/ +TuiA43RFV+9eOt6v/BR/q1YHErvnl3wP0vEAjjQHu+nAYmGsWeRpOj6PmOmT +u6YN/UYZHcVldFSTWhW1naoFgUeL8mzK6VjxwZH0mKIFC+UP/Ccq6Oji03bD +lEcLBOV6f2lV0ZEI53jm0Gaw4yJJP26k47P5tRV7UzZDXWexX0cXHeMVov/9 +/k8TbPkeqUf00tExemd7T4km9Fq/WBAfoOM6qj8Mn9KEuZrvSZ5DdAwyybWM +09IE9Rub730bp2MhMzr3W6YG1PWbRqRM0vF0dpuWXrAG2ArvAM1pOub0Pxi/ +Z60B+84efRs+T8crS7arlX6rw1xjYq7YIh09z79bq9ilDnHL2b41y3QcLWEE +b7uvDvy6pWoeK8T5yFrwlpxTh+uHaub//aPjuwlu1iY/dfgfr6sg/A== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.07955255242498241}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7342,19 +6830,19 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.07955255242498241}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7368,330 +6856,138 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8Vu8bx2XLnsnK3ns9eJ5z7ouMSEjJqGRkj5CRFQkhhGQlkRGRUJRR -X/MpJYlClDKSEClb6ff8/jqv9+vc576uz+e67nHEXM5Zu1FTUVEF0FBR/f+5 -PtHbLXm1DOfOnGIcL/XB3xXxh+uPxiHTBqPaxw6mCHjfuPCPZqED5icq/R3s -UajVvRGa0TvI9kMNC4uDF+Jc2pe1NdKARrOiz07ZhaPPbRbnVkc60Z3zDCW+ -x5ORseT8p5WRQXSb5nVio0E+2hoh3Pg5MoVcPtsXOf2pRE/UGZ3uyk0jjfKz -61FuVSg0bVTeMXIa7U/R/H2uvwr9MghvfyUygzInKvCR2/fQ/P2WhQq3r+jv -t5alPKhBHy9jBqd/f0OssycH7MIfoHaVg8u9bD/QAwkG0sPJBtR18G7Z2zu/ -EWGnVd6w7wlSTX/wfePFb6SRE1dhvP4EFY0+VhZZ/o0EvxyfkBZtRhf8Xjzx -Jq4iQz/3RzHnm5Fy7vc+mner6IFHlk8afwsqmFdY06JbR2LVYXk/TraigMw6 -owKPTVQuKhgcSn6KJsafpLSnbSKXa41vBxeeosPSHW9mH26iqdYNAQbOZ0i6 -9a29BtUWok371bfu8AyNz/zy68vbQqOz06ZLi8+QsY5Wzm7vNloplnifRtuO -hD43z7oo/kWkM8dimjk6ENXvwLzeo38RYeHvl0DRDjRDL2+mGvYXcRa3feZR -7UD3lQvu/+34i3Y37aIFLDsQfjEiOM92FzlxbLSLp3agM8JE6v64f2hEI4wo -RN2J3ipNpBcuUgHVabv/XD51om5CyzfLf1RQlu/iaDvfiZr0c4CGaw/8jGIj -aG10ogIbi19ehD1Qe7k2uIajC7lEP7MhxO2B6KN1xkkGXehXX5HQ4D5q2NNz -mmG5pAvx+J65x3CQBvReZJpbWXYjeYZSspUtDfRuaE7oOHQjuDM7le9DA9am -pu/p3LqR76ifoGI2DUgP7MyaR3SjbsOoVKuvNECl5Wt+rbQbBQvn++dfoYVW -o6uJ0z+7UcqTjylTN2nh9ulffpzb3aj4mOhdhTpauGOhUypB04P6ku9+fjpK -CzvqzVurPD1Icr3RakqODtZqN88fJvSgof5BdYU+OugsEDfrDe1Bc158lsFf -6ICthmeAdLEH7dI6+DxdpQPdlp/PsxN6kDxxstRSmB52Fm1Ffl3vQXF3l3mC -/emhUWVhzuVBD8oz0FB7GkcP3n2lMduNPaj2U+gR+lx6KOz9/iC0rQeNce8m -5P1HDxYPBNaEenuQeizLRhsHAxQe4iOLTfagQ4JW3PRSDDBj8mR8YrYHOTZd -V7HUZYDMvoj22MUelLIo4DnpzAASWjp85zd60JSd3Ae6hwxwK0dzmIuFjDZ/ -+65ZPGeAq3q7xhscZMR2rY4zb5wBdBDty3ZeMtLrIZjJ0zJCIBMo0hwgoyw1 -41YLG0Ywu6J03liVjFTG7U0wT0bQf9DOzaFJRn3xfkMKkYxAX6WR0EkgI/rR -7AXGEkZg0Ti2O4mTUemlyrCNh4yww67Ib2lARqDQRjNLZoTxXZJMuREZRV6c -FuxaZISMH7tmLOZkxC+7cbf+HyP8d5zpvLAlGTW93atZzMUEa7DbtM+ajH5K -qptH6zCBxORKy3NbMjr7KjaKEM8ER2gZ3vO5kNGekGxG6VwmOHfN82/gWTIq -EqnM5rnHBLNU2zea3MloNPBNzcobJnhnfMHwjzcZhQhO63yZYoKQz+KBf33J -iKtnvbt/jQns4i8Q5/zJ6Ai/yKdqwb0gpXRgNCKIjOY71LwKlPfCDbODneLB -ZJTkY7SWpL8X3hg8CX8UQkZSvPaXwo7vBa+2tr2qYWTU+cyX1d1jL1Cz1l+6 -cYGMznjG5h+P2Av89PsWZsLJ6A9nttTBtL3Q25F5TCSSjLTdWjHRh3shWGTj -uGU0GQ2xvellI+8FwbQ+BpOLZBTwZMrm7+hecFi5+kM2hoxYXdYnFxb2wqee -SO41Ct9j3us/trsXNrOpr1THkpFJo/D2C05maO2qsDG/REYzjmqJjyWZYfgU -W9oIheMYjbgqCMxwcHxX70gcGR1osCvKNmOGe6un/O5TuO2kr/zl08xQ4aqo -vklhB7rYpsAAZhirv5ardJmMNmqvGzhdZoaOPS+qj1A42+5uv0UOM5iNakbb -UViNutUBq2IGr9ljAhYU7q/un1VoYwajwfZMZQr72EwFCbxhhrNUWr+2KPMz -/lvbZZxihkunrpjVUbi8kunqxiozWInXVB2lsIG18L5ZBhYQqngkMkHJ//OO -auk7ARbgEn7zxIbCUeWGKl1KLJDsZnzlCUX/fku71npgAe43l/LpKdy06WNS -fIwFTkzR/kMUv47diRlKd2eBIdlzz89S/P15+PqZ6HAWuLQaSR1C8T9trWLB -J5UF5GWo2wOiyEj+dkuYw20W6Nv6zW5HqdfzQ/00pg0sUNHlSK0QQenHX5PX -CD0sYNrhffc7pd57CtcEpUdZwHfcgT2b0g9FRkyVPAssUOeXaiYfSkYf8lTb -VzhY4Z1FTZTAeTIqGKpmD5VihY4vNQ5WgRS/2WTObOuygn1vxbD/OTLlPBPe -pXZlBdnv+btuPmR061nekSthrHB+5Nd73IuMHLe4bzGnskLOR5o7VB5k9MV/ -L4mnkRW412IDEGV9lFQlXM3rZYUyPvvbbWfIyGWGalxoghVE29oFJU5T+sN+ -I1yKgQ0O7EbY1lDW15zhzGNtezZ4GCRl33CYjKpizjC0+rEBj6RoUNQhMvJu -GTuB4tjghv/hDFXKel5UebtmUs0Grtb6eraU9f9T4JmG/V82YP5s9alYhbL/ -/Mx9EFnCDl2eHTF6bGTUrMD9718jOzTpMCvUMZFRhHu6RfxLdmCJkXDipKOs -j/H4H6m/2aGo2bUvZ6cHxU4/4X0jzgES8Q+C6r71oPj+8mNfgjmA7jmdjxZl -/5zxcY0Uj+EAsbFrNeeaepARk1jp2WQOWMi35cmt60H0hoW/5m5xwMXS4Pb7 -ZT0oqTkrc4XMAbNPk8//vdqDrpbFvKHezwlHFkTbMdseZKbpxcUrwQkV2aqW -YVY9iLHb2kZGiROKfeKPFptS4k9LjR/W54RN2kf7Oog9KEq8bzbbixOkznXH -wYEe5F/MvyvdwgkHTUqbj0x3o6OF9YqHT3LBhEZImoNTN+JQvHnutBsXKDKX -BzbadqP+1viGc+e44FTXAh8N5Tw0G7fVyb7MBfZvBtnDsG5kILB78FM1F8R7 -r1Z27+9GmnlmJ8/94YIEf5hnHehC+7Knk6/f4gYe/r49PJpdiF+hMX6zghss -K/xWKuW7kEBnYszpOm44NLsAWmJdSOSnXIhMFzccpPO30WTrQlLmAU6tc9zw -dXGlpv9bJ9Kg/as9rcEDJSMnyYn5ncgymG9G/SUP/Dw02p630YGuHDfFB9d5 -4Rd9094Xd9rRed2SM71x/BA6FKPuotmKDJe3I/ynBUBuMgiPKG9El0hHnQV0 -hGFn5IPNtdo6dMix6BfBQBg+n+m8E1RQh9hiFy7bmAtD1n5/a9fEOlTYlVCR -4SQMxbdHGfwc69ATs5YF+mRhGLA+ukeCvQ79tJMI/f1BGF5wZd8wnK1FjiFr -KX2RIhB8P/TFyas1SK82/9HF/w7At5oPr94rViLDkf6/Sy8OQJXxFVoqtkpk -QUVrcmbwAHyKDQLD5bvI1dr/A/p6AOqYj7wUaLiLjCPFYmLpRIFEPXycSvcu -CjiwXqqvIArPrwrz1h6uQN0et390hYrCvZ+HOjLiy5DpH12uqEhREG993brj -WYb6M95pa8aKgnHEQFHskTL0oZkptixZFPSfMLGP8pWhJeZgroRCUYDbBMmn -90oRf90hgnGnKHwtfrh9cuQO8t1ciX3BKgZ6xc5iXQdLkF6gO98slxi8DiGN -2MiVIMb5sWoafjG46CvHR89egsrHu4ZxcTFw3/pA899YMZp4dkOxUVsMCCK4 -W+b5YmSZoDtackYMgkekB07a3EbqXJdUIuvFQPrunr73pwoR1dW17rwmMUga -OH5USaUQ9dN4OzS1ioGLqkde255C5LNmnbDSIwbp3LNLl+7eRGWjkuMeY2LA -8SrBqGytAPHdfpF4nEYcOg4K8SsUUu7zChwTSjbiQMUxyGfNmYvWbwlc0nAQ -hxM9z9f5FnLQKruUpO4ZcUhjOejL2pODln7reht6iYO38qPk9PAcyr3Ydd0h -WhwyDVTKPs3cQC8PP2ZLKheHxZK53Gvd2ajAxxFNrYlDgFPXefxuFsr95Dn1 -bVsciJ9eTS0lZqFsy/MJP/6JQ5OtLN7nnoXSNZJebTJJwKWeAhFWmSwUt1Nv -yy4iASwJ6wdLqzKRz1W6AJKxBLA+cPi425SBSNU1xTk5EiCKfoY9nUpD46LV -t41uSoCfzMy8c10aisipKlq9LQGTMynLhy+moceXKgqtqySgya/o3rJAGlK3 -K85ja5MAQpDSgL9tKpKjy85InJSAtd+8gtyfUhDfmcjYUEVJ4KlzDVben4Qa -34XHSKlJAnX6YgnD8hV03OzCxXdakpDF+MBcpOcKytIKiVJHkiAqXbGfJugK -YmU5d2HpqCR8+05/vbQ/EdE2uwS4h0lCRnGpMeP1BLTCZeZ0olMS7msn1VcY -X0ajvuID3s8lITE4zKpT9DJqJ2+jmD5JIL1q/Cu0E4cyIqoPVA5LwtDiM9P0 -ujikOsXyeWteEtp2WkXsROKQf/2b07e4pcC/8sWqId0lNG9pc3LmrBSwb/aX -jP+JRoNVSq82vaSA66jq75r/olELDT2R9ZwUrPl1+n6Pi0bJj5sEtMOl4KGo -a1bJ3mgke4B/7EqaFDjftBvaFYlCHktjdgpNUiBN7P687BCBZlKdTgQxSMPH -czqvRgTDkP+8orgqizS8qFtO0FsKRRsmWz9+cEiD+uaBqIX2ULSXJivBS0Aa -mF/z+Gt7hCLV8K5HTkrS4Ev40HH2cQiKdpPmtjwmDXzZEQLP3YIRH774RuG2 -NCRTe9a+2whExTef3PxeKg1mfNe7tIYCkdxWvMfdSmmg6hm0H60NRKRHwv/E -G6Thn5R1yhf3QOQqb6ks0CMN7Ir/sn99CEB1fA2pjAvSEDglU5KTew6ZLoeZ -ftWWgc2g98zlj32QkJpIIiNJBpTD1bySLvigpaDuTgV9GRhmjNy7oOuDstc5 -SEGHZeDw0Fq7/DNvNPG3SvnfGRnw5nTuj+rzQkEsH7n3J8uA+64GofGfBzK0 -iLMipctAK393rvwLD7QvQzbtzHUZIOiaW3FleqA27hD6ilsy4N/xs05L0gPR -C7JtqTfIQOQ13adNlu6oQA4mzMdl4In885tbLWeRr8+sQMAXGQgkH6/UTTmL -0P1U2+tfZSC0u1noi/1ZNKP6YeDDsgwImI66nN52Rco6QV3utLIwbHXxDh24 -oi7jsspYJVnQyvf9E/jJGS26Mp5/FCMLCe8DZWSeOKKlIsOn/8XLwjEab5Md -f0e0/CGW4VWyLDhXnjTzlXZEvyy3bk5elwWjZbUg0dzTaIM4381WKQsrQqdX -62NOIWqePj6vAVkIpmv1iPd1QLSWjM7B72UhWmlA/46iA6JLMayOGZOFFH2b -osM/7BEj1VOUMyMLBz+JPSMF2CO2xfueXZuywPzjA3NUlB3a332tRVhMDlYH -D8Zdu38CCfx7RSsnLQfnfbqmFkNOICE9RktNBTnI5tJe68FPIJG62GkzLTlQ -/RAQ8O2tDZIsDGS5YEoZjz98//rvcaQafMxxMFAO3vhwPD/tcwwZS+6jvtIp -B2y+zr0xuVbou4tJJfG5HLxumWDwDrBCqSVhFj9fyYHT8gudSlMrNCQyWmD/ -Xg7qnWcWiNuWyGl/vobinByI+o05tb6xQOFsgm5vWeVhYKSx2zLPHAkdOcyc -yCUPPJ+LL3IeN0ftVyPr9fbJg/exLkFPDnNEz/Txb6moPNTkP4x9k3IYZdHc -ygnVkId019VJj0QzVLMp8kLQXh7ohZiN+nIPIUuCpf/AaXn4Q/uIwf7UIfQr -JIYnwUUe0mR9Yr3EDiHd35+dlnzkQe5+bgLnfRNE/lG81X5RHrpn8FHnl8bo -85S4gnuZPPQXnBmTFTJCXK+l0+uW5WH5x8m7/bwGaHdZtfzlqjxoKtww1fmq -j+a5iG0zW/Jgt5kjJtCojzrtLOf5aRWg8xh+yOCEPjo/E2Z8iV8BrNm/P2Qo -AvRu58XuUX0FeO7dT8uegKN2kSFeX2MFsCIEcW+o4ahG/5Ni4mEF0GGd33zw -GUMJV1YcWmwUQN4icDYVw5A2t8BjcW8FSPl5yLOdmoRy5X3O/c5SgN2465fi -6nVR/JGQRNY8BegezPlU4q2LAgJibsncUoCrijxioZK66FDT9Vcn7ypAb87Y -B+0CHbSp3ybT3aoAt/pmZBfTCMjBnvVL9owCMOm99+vN1kJCSQ+stLUVYUck -+xITnzq6V3u/a0tPEVYM7szozqohnffV2k+RInCEcT3+3KSGjotXChmaKoIh -uplxxV4NpbYVzx09pQiZUjffKZSpop2fmbF+cYpwoCR03/BNZZS0L+O36hVF -MOZqoNswVabsZ+nuq1cVoZOhuH96UwmpX00xj7yhCEPY+Uf77ZWQt9Rl/uRK -RfDfcl3vFldEY/bBdWX9itAuO6ea80EOecYGSXgOKULoXZAsvS6H1isCchRG -FeGN38VCJws5xLXqG9UwqQjJ+q+fzvbIIrN0t0Ptq4og8f7M999tMqi588SX -cQElsDm7mfK0VwrlKehycHsogXWC6ADzcXFkc/h1xjMfJfjy5tYTc3FxxOXj -zOkdoATiQWxbzCti6Oq9ZK6OcCXYs/T4K1WGGLooN8ZzLlUJrhPK6sqGRNFZ -mcj9r+qVQO5n8ePWSREkZsJeENqkBHEvJTv/poqgCfdSAfFWJai1NG3bryuC -bCteCYZ3K4GodbjfyHVhZCYlJCIzogSv0q201Y8JITWJp+KX/yiBoOrz9qaN -/WjJ4Gip8h5luE3K8qx9sB/dc/kqMUanDDryErecPfcjyTusUmrsyiDPe7v4 -9zg/4hdzlPkspgxWRgev33i1D+2K/FMgmijDzOPQC/aveNFLAX2t35nKUF8l -NDOhz4UGRB5I0+Yqw2Rx4FAPExcaFhfm5y1UhmVxOXrLQU40Kb+1rV2hDON1 -8576bpxoU6++PaJFGUb8ngaGZXEg6ZNi5tTTynDZ7Oz5WE42pHjmGsY9pwx3 -CzSS2B+xInXXv8qSP5RBIQ4/U2fLijCfD5zGG8qAW9M9ELzDgo5HZo4kM6tA -sc612UMHmVHczT2unJoq8IEhz/TGI0aUdPvccXFdFWiQ7elfcWdE6aWfjDRw -FUjiCqjRFGBE+dXNsjaHVKCySzzW9TIDqmsNXMo7pQL/vY+2EnOiRxPjk+Gi -CSpgMMEyxK5Pi2Y+W/qopajAo7Dt44+oaNH89NNTBtdUgPwiTl6ggwatLeSj -s/kqcHMw2V7MkAax/DlKV3lfBcbPPHs8bU2N9IQ6M1SGVeBATuSh8EwqNCUh -OfF9TAVGEAnvPUOFkhUSFco+q8BGhqR+hTIVGtUzI/N/VwGiuagCTeE/PMx+ -cGfPHxWYo+8pk5fexR0OB2rMc6jC37fvMta9d3BlS3EHE25V8P9r0/Ft3w5O -fWwotoxXFZrozrg979nGqxy0+h0FVEHqahftIcltfNNry3NIQhXcEtZnmBY3 -8ZykS0Vt2qrQERPPcbFsHfdOVe/Zr6sKWYoRFdpn1nE8Y3ohlKgKRTGMDk8E -1vGvuUa6aqAKLC/DUtmy13DNu0zvyk1VIaqU6Pfq2io+2JPJdO2UKqTdsHnU -WfULr+g1UF10VIUlP2LQvoBfeMTr3ydMnVXh31XlIF7CL1zsvU0ZjbsqmH6J -XaJ7voIHzOxHF86pQnjD2Gji0k+cjeZOsHMcJd52fDxb4xJOv/XfsZV4VTCw -vzFlcGQJ3136pH7piircd377uXv2B748tn+lOFUVaI3xjRLhH/hAQ6bflxxV -GICH/x0vWMCzXC65n6mmvKdbXHbqm8NT7G4bLd9XhbJJza2asDk8zuKpZEyd -KlStD/mzSM7h5/W2pooaKXq+oKDNmG/4ca7AMxP/qUJ0RVSNvOEsztfpZHf6 -nSpcNZ0Cw51pnO3JRcKPYVW4x0vbbNE0jdPXFvJFf1CFbiLHP2LQNL6RP/qu -cEIVxjxvbDxcnMJHA62OfpxThb1nBLz6FybxAjEwO/lXFQL99X74cnzBs/Y5 -yi38U4VGNKfwvu4znsIaxRhJrQYcEcl8Rgaf8citx+QCBjVo9xnxD/CawE+9 -VTk4xqkGF7YbhC+8+IiLXDpAspdWg3TNkdC0ng947XlG8U+yapT/pRJrf98P -OO6+wuCsoAar//leDOH5gJ8+3DXkqaoGlW4J3nMeo3ghr4fPBT01EOOJddwV -HMH336styLVQg6zUJ9rbje/wysLcWMGjalBtYRVe4fcO17kW6377mBr8HSYq -Gkq/w+2CrdXv2qlBxU7AhknBEJ6Dr/c2uVA4LeT2gbRBnGcI23ofqgbjm6W0 -t28O4GU90p/tw9WAKfNFCJvzAK7xhL3nU6Qa5bwZjj4oM4Bb35rM+BqrRtkv -pb7N+bzBMz0SZNdS1CCld/f3qSevcbY/fbY8t9VgLYuX4e/1l3jRUiOWV6IG -iYvxFqe0XuLKk0USQmUUvxpqdXZHevEj5IBliSqKH8nnKrZEe/HUDJ4rGg/V -YN+t7JAzHc9xJqlTTdbP1eB0YsjlLJ0e3Hs/MqvuVYNvcm/F3Fa68Zes4hM0 -fWrA9+TuNaHqbjx1/Rtd44AamBJeLSmLdeNsL87b7BtTA0LyNm3uvi6cy+fq -6viiGkDW76cEhQ486Ix/kuYyxd+atZsHVtrxoWNHhdJWKPHy1um7H7fj2aR9 -hvg6xU9XM19dk3Z8H1vp9eJ/atDT+TVW9dMzXKi+Rd2NSx3uM3h3ZbW04lHl -t8hPedRhzn2P3o+Trfin/FgHvn3qkKJa0Be924IXxRnHPRdUhxGO03LqJi24 -6PHBt3JS6hDyZt0jdvYJLrXxPWCJoA7KpaYuN+2b8MSFPloTPXVocEutqmRp -wmc/P8i7TVKHzWt25x61N+KVL0LarfTVYXSVdrlFoRGXL9jD8dBMHZwJhdzK -rI9wZWz/g7DT6vBUeFdAeKcefyjhtUPtpA7Tqo1TAY/rcZ29zSbpLupQPtOU -0BxcjxuM2H0p81CHh928CkK/6vATgXmcg4HqoMVhNJK//ACPKd8XrJioDt/O -0C+etKvBaVM92h8nqYMonY9pw2I1nhL0mOXgVXWIbLq+LyuuGs9GtuX2GeqQ -H6SRM9pwD6/8kDOcWKAOAg8uzC9JVuEDrHy6k7Xq0FY1d+CbWQVus+qW4Fuv -DpPqej+D18rxsbHGtxsP1cHILZwPLynHZ+7aeLM1q8Me2n76wD9l+Kb+jZvE -LnUI907jmG4vxcVCeXZvjFD0+TIYB10swStOnTUTG1MHblfja716JbjiwUc5 -NR/VIYuJd1tosxjX5jiu0jWpDm8PPFO4F1KMm9277vRzQR3MxQ8++rNRhAdN -cHWZUWnA2pawiK/bTfwF+dTTe9QaoP7VRjd7z01c5EHF4710GnBbhUpO8HYB -/jJGr+YlkwacVtfYpzGRj4uLudww49YARz9wZvXNw9+61nuYSWuAoQPbg+rO -G7i0+Y7zPVkN+Dyq9agx6AYepWl0aq+CBpgbuquPS9zAZek+WL1U0YCNQo8M -r+RsPLaCSs9MVwPm314lKDlfx1W/W7KYmWuAydXNW/qQiSe+zae/Z6EBcXaK -4XZUmfjH5mmqvUc1gD5e5Nuxjgw8KSVsrddGA+jks7FFowz8i8LtCdMzGsAz -ZXi3qCEdz/BfqjMN0oBd7jiZHvOr+OwJneqqYA1QTTcd759NwUkorpwpTAMa -TdM8D8Wl4HPsfAW9kRrw9kebYtjTZBzqscumCRrwQGC8jWiYhC//TrUxzdOA -1O7CCttrCfjH0ZITtwo0IJw8VN6BEvCXT5tsVwo1QCidJcdkJR4vu/LFPr9E -A5qWC/jzbONxB0FNx+/3NOBHyiW6GdXLeI/BuHvyUw34AJfSObkv4Q0yPz0+ -/UeJx8zUe3UoFi9mofNS69QA2es9qfPZsXjEsLLPB7IG9P/ysTcViMVVvePO -yQ1owCW6AvI5x4v4zUy5C71TFFalMn6wG4EnheLhwl81oIfrYHB4fgQeevJY -ROA3DZAPu/6yQSsCt5KKjtq/qAFv5suWHYPCcfrmgVivNQ0I2+xs5/kThgd+ -CUtmYtSEiOJynjnzENyxJzXl9F5NuHibUdP/TzBufq/kaj2LJshF2tUI3A/G -pYNfpdlzaoLVf9MRw5zB+EeGA1lVApogoyxs4TMXhJuokAtMlTThn2R+Sic5 -ALejP3R8QEUTSqNdW2MuBeDen3pZbdU1IYhf+etRLABPv/o69ixBE/a8Uvlz -KOAcPvztnXuMviZMv4hRkAj2w+eenRClN9SEeUGtz0zbvvj2jdEPqcaaUE5q -/DN2yRcXNvxoXnBYE1qfdYyI5PrgZ4un1RttNOHWi6pW1xEvPDTMbZFopwkG -invKhny88CSLb+WdDprwi34tdG2PF17zZ55/4Iwm5Hy3T9bU8MR/2/3anffS -hJtiwQE/Kt3xOM49r0QvakIq13Hvf+OuePZcXPzdWE0wmsoXrEpyxSv+o8WV -L2sC+TTr93JtV/ylH2M9MUkTLl0q5InPccE5X7LnnsjShKHZb9lGbs64eEmm -1adsTTCnU4ndFnTGNS9w7z2bqwlv75esjA054XbS+6IDCzWhZWjfNrOJE14c -J+KaWqEJlws6Z1xCHPEG+2Ih7ipNsGH705m8ehrvVhUfzq/WBIajHoEdIafx -uQkp07t1mmDtOplhcPEUrkJUUuls0YSyH7Uf71c44M9+E3c2+jUhw361It/C -Fi/pe+xy7K0mCO4NOjG4cgKPL9d4WTtE0VMfdykw5wRuaquQ7zaqCSd3f3v3 -T9vg71oECEOTmlBrkRMXnH4cf3w9p0h5RhMKN6IuWpOO4wW+XPQps5rwLZCP -59zCMfyMyN73sKAJSRcv+Bw9cgyfv7QVVLuqCaTFHWbSAWv8tUPIGNOGJpjK -DBZeGz6K12ms6LttacJTKT613fSjeMjXOQ6hXU3Qs1zpEaQ5ilOZjtYmM2jB -XGOT/JtlS5yP4/H8WQEtUGzAvgyImuNbc+rW7UJaUGZ7zVnlwWH8Y0dts+AB -Ldi9eXn8MDqMl5yvSBqU0IJjeTLWZWfNcMWRG9KgpAU5Ec8eH+g6hLPXcabf -VNECKLnX1ux4CP+VlLa2rqYFt5g/H/28Y4I/1kvovq+tBSoSOlWNeia4QVGw -iyBogZkIUXy51wiXCvvZG2qgBdN/EiSMAo1wRitftUFDLaB7HT24td8If73n -LFWyKSU/1adm3ucMcTu3Y0Xr1lqwo8Bt9UHuIO6vqD721o0yfuI/g+ZRwEM2 -BLbPeGrBqgfBciEN8KhOGoElby2waDjs4GQI+FW79/Z7A7Rg5uCtp3+8EF4Z -f+GDQYQW3CvnerZ+CMMfWDpvDURpAbX1bwZfMglvEjDbfyZGCzwObh3ZZ0zC -e+oE7SPjtWC8h69j/jARn/r4bPRhuhY8JPezpATo4t/v3t3Uz9SCI2ctfzbs -6uA/gzL4B65rwdcEZb9X6Tr4P0YXu8U8Ldhry3fr3iMCLqRFNypZqgX6dLXL -hnza+Im0wyM3HmvBeo8kg5e8Bn7aTnNDokULCqxdi3aG1PGzEsL7Gtq04NCd -4RSmGHX8fPPSif4OLej22U+8+EENz/iaOUzfpwUfAt5Eit5WxXPrItaz+yn1 -cs64PHVMFS+KdOWTeKsFoeXyB34yqeL3ObVOoGEtiCjM23zwWxl/iY2+D/ui -BTJ8iceSBxTxt4wda3TTWhB1VZql4IgiPjpUxZv9VQvc33nsX+pTwL95RdrU -zVP65UN1oO6gPE6bI/J+blULqJr1M0+sy+LY0tl39kza0P3d/smvQimcr9Xk -ThuzNrx+9a4hGqTwpSvyAQfYtOEiaWol+askXiT2k/krlzZ86bNbZdWUxHeP -Rx4MENKGe0xuagemxPFhMUfOIRFtEJx895ItUxyvXYLPWmKU7880BxzVF8cd -k+gjd6S0weXPjG9LuRj+X2tmQ6KKNpQxylxJjhbF85KCY7+raYORUNPhGG1R -PMDG1sJcUxte+tzLwicP4KLLQvOcutqU/7Xb2zcGRPBY8UqxWwaU/H/K+JT0 -CuH6yc8yHtpoQ1qzY+UN4f24wIkSRz47SvyP17JL6vjxX+LxiuEOlPmVyvQj -jPjxO22mL/Az2nDBSdMxOHgfTv3z3b9eT2249l9UdNcsLz7W9vi1oo82JLCf -vuB7hRdvSC64ec1PGzafXRW8J8eLu0g4EWyCtOEEMdSuN4gH7zqx4P8lUhvo -WuTRNz5uvFCin3TwojYMeRZax3dx4cE/6/ZWxGpDrrN4YXwgFy6ZElrhk6AN -UYbas7lvOfH4p3sm1tO1IWff2oxfCQduJMl/hPWONjiZjyUmrrPgj370iJ0t -0wa+Ssdjt8JZcMnH59dbKrQhr9axsmOXGac1e3Pbs1obHrte9uZkZ8Y7zyX+ -6nqkDaGOr3e+GzPh6rqazwUea8NcQ+bzpA+MeAn11M3AZm2w/OPsuubHiMfe -wIwOPNOG6J530QKFDDjeupob8VwbCh796XzFQo/Xxt/xfdurDfT0xc/Y79Ph -whZW+rJ9lPo129p/t6DD/3ypnn8/oA2qXiWOB3Np8RZ6V0xtTBti3mmtTOrS -4NrWb6e+LWpD8nqkZnYHFV4hGPMYX9aGkbYuYbsLVDjvV8XUGyvacAiqo4+r -UuGrYUlaB9e1QeFb21C3yT+s4RZKKvpH4T+MjdfV/mLiHj9Ore0hQHmeae61 -+j9YpupNNXNaAuju9Gc80PiDBXStj20xEmDUUFtdB9/BVL7fV7LhIkDuEd0P -ET5bWFHDSeoaHgK4y/IKlu9sYmxRTCPU+wjgd0Dk/YO0TWyJzS22TpAAlgdP -O5s83sBqNIWGmKUIYMMRmnbvwDomG5tyoZNAgI7BP/ge9BtrI5bTmesRYFDP -KPL21C/MauO/rPckAmxcMJlduvILu+C/VjOnTwCGp4thcSMr2ItTTpNs5gQw -bCvAapJ/Yqf4I/3zLAiQ/PrhPWq9n9jPoRs7YkcJEJHvzFQ8sozxH37Fq3WC -ABkzBkFed5cwT11ts5NOBFArzj815bGI/Vm1GplxIcB0VLZH1sQCllHnc9bf -jQDiMZW8r2wXsCcyJRcveROgv0Jo/O7ReYyRj+Xh3WAC1D849Oad8xxW9WtS -cDWJAItfOOJfzs9geO2fyuirBNDyOi+0GT+DDXrt02ZIJ4CeAAdxr9gMtv3F -3ErgOgE+nj60t9lxGjN78zgebhHgCK/PhePLk9hEyiDny9sEkG7vvfckdxIL -Mv5RdOwOxf8sQ+P/9Cexgqfize53CVDR+s/pRsEXbL467UdqPQH+XK93UX06 -gV30qIzge0QAdh/FqMvSExiXRBdDcRNFP9utN5VZnzC9gk2xh60EeNFclql1 -/iOWkuR64kMPAQTP5QesHhvD5N10/5MaI4DtMZ/miuRh7Jq4xfbljxS/9O2l -u8WGsdXPLlpTEwS48i1/rbH1PfbMIbW6aJoAp1Wpy9ZX32HWVp9z9/0gwEqd -PAd31BD2mHV1MGSZ0g8rDW5bYkOY0CtGtncrBBAJunYsrHcQmzVSj89YJ8Cv -50d/CQsPYuHEhAAmKh3AV1Xy7IYHsInN/GoPah3IyChXw5IGMIOm2tkeWh24 -zOBsFU8cwFjURk/FMemARuYBq4Pmb7BiaQXTHS4deKj1PmaW9zX2gvOt2A8p -HRirdG5XFurFlN58PXVYVgc4OU7Sr1W8wLJSt3Or5HXAdufY/KDGC+wUgySb -u4oO7Ok9cqLu2HNs+U/o9oSODnhn6tOv3+vBjrdc1cKIOhDqzekYZdSDPQkr -DriJUfgt79ehyW4s7lfvrK2BDhzGJ7iGD3RjfHNCQwOHdcCOZTP7cF0nFlmu -xqZioQN377WzxNh1Yl9cjE3TrHTgrwKnjTF1J3bv07n/TG104D795L5ghw4M -H+qs7nTUgdhIi1NpQu2Y2zPP+EeBOsBOU55E7G7Flvzmw4yCdeAr/1rJPu1W -7IKwr89wKMUfnbojbfdasJSoc9abkTpA/qjMKFfYjNXphYqSEnWAyOjfJVb0 -GNOb3+B+naQDT00XrAYlH2Nd+eEMjld14Em1n9zX+03Y8GbUUkyGDhxJfs1A -87wR+9N0ua2rQAe6pGyqZ7gfYYnudHXHb+nALb5ROZ+ahxg735XSr7cp+qtp -WP8YP8TEQ1JSGMp14IKz6BRPXANmopFpd/iBDtD39JzmYa/Hsh4UrQ526UDv -tYfL7zdrMKEzonOuZB3Y3p6wTHCpwcrZ7oyvvtCB8geXP6m+qcae+JV38vVT -5q/MdNGvv4d9UqjJcBjVASefs0+bcyox93Gl+IUxHWhcKpNp4avEfqY8CIv6 -pAPmyg1pJvl3Mer5BseiKYoe/T0Fw+UVmGxls+LUog5kma9KBoyXYQ22RNHz -yzpw0jZe6JJ/GUZkeMpN+0sH2Ax/Nv9HU4ZZuLdvS21Q9AzrBBVolmLBks9f -eO3RhTZ7LemS2hLsv+J3Z1d4daEzeSbsy/ot7Iu52JlQfl2wm273VDl1C6Pa -8rPfEdCFOqvaI2ndhZjBUQYLOlFdYNyZu6lbdBMj79Ej7JfXhXdJe6qens/H -vt1PVCtS1IWSOPaEheU8jNFhSEFChcI6ywNN/nmYaYOvqJKmLrB5zKysnM/F -+lxuM+njuhClShd36+YN7AfbIg0ZdCHS1oVop3ADY2vV2TU7qAunV/xpLZ9m -Y1bcg7+OH9IFKamZM93frmNDXbQfPa11YTbotWSpTRY2Juldm+GuC68TqFu2 -+a9hOwNNlbxeuvCDev776dB0TCiaprTARxe0iO3qNCNp2On3hbllAbpw3aDg -y2BJKvYl4U3skwhdUOUrfvDmZAq2R10oEovWhXqJW84pb5Mx8QnPkM4YXeDR -Wq9iMUvGzmpTe/fF64L1Qy411YNJ2LdZzWNf0nUh/MqAfeTxRIzx+qUjbpm6 -0OHXyrQ1kYDJon6T+eu6cFh5IeS9TwLmnetBWs3TBRbrrJ6I1HhsyaRAirFU -F/YymQ9pzcVhq5X/NlQe68LJZFcdPqpYbPaEcXFyMyX/PRfLdpxjsFHatEPT -rbpge3f80EvyRazVSSA/p10XuDz+iSjlR2Nx/Fp6f3t1wTe4fyb5TCQWTI6c -OtGnC96+tCVDIxGYe3BnSl2/LsxUbnbUW0dgpgOW465DuiC0IqK2bRmOcSR5 -R738qAvzidz8gR5hGLV2vaTkZ1149b3wPufvUGx1eqMvelIXlKliDedjQ7ER -lCCsNqsLexzOKu8vDcGKNm4/y13Whd8/ntZYUQVjih7vqdyo9eBasX/REG8g -JsIrVPWMVg9WB8rfOrUHYBxdLkf5GfSgT3jrZqZvAPZb5GfJK2Y9qNIQ5Yi+ -fg5rGd57UJ1XD1hrV8OnFf2wmvijC1f36UFwe45mWoEvVqSed/3rfj3YkRiu -YWD2xS6lS83kieiB7r6YWp1Vb+yQMST8k9GDbuFjjcKznpjeaqKSvbweFKvZ -mE54emKKd16/b1DUg43T924wLXlg7LsO0u5qepCeytsY+M8dG24Med6npwdS -F5mzjmBumKtUNVPBET3I+XJ2k1HIBYvocfSWttIDh3dCe8hPnLEMN65XDdZ6 -8GxrKzzf1hlrKw9PfWVLye/HrWHbm04Yj/Qh9r/OegDXm7z4gh0xefLOueSz -ejBdtapW0XcaA/cHA7welPFSay7PZE9jfhV8Wcq+euA9LBOGLZzEyNJfeZxC -9cAj61r6pVx77CM5L2Txgh78Fn/z79Ree+yXu/nwhUg9IHRbG2jF2mEH7j7M -zYzVg+PnknYLg22xCzJxAl0pejCxRhNQfNEGk5c9ICp9m6LX0VZKntkagxeD -sQ0levBH6vJXprtHsROeiZN4mR5gBzirmY2OYpcrf9yxrdKD6JOF70yuWGEf -Zdukkh/qgVk3bceUsQX268W5RN4mPfgq+t/9U0VHMEYviW8lT/Rg6kRHUsCW -OaZVlVLZ8pSi94ox2/6Ww1i6nL3C4nM9iOMcPurpaoqV9bKkXnipBzeKVMhV -7w9hLV7ti7Sv9UBReV5wzewQ9q1KplZ4UA+4eST0PXETDOTXVS0/6kGEpc6H -vSZG2Ir8de2Gn3og8e/62fxBfWy0D4y4f+tBpXblR84Qfazdf+lY8JoeeP1O -mfTdr4+lN5gGam9T6r8af7XMAzB5PaqaFhoiWPsbv9ZUxzHOj/dbBOmJUDx9 -5+vh6xi2GX2yN4qRCF51A/r5GySM3NE0i7MS4b/gyBc3eomYi6mfWBcfEbLf -X77llKmLmS4IqEruJ4KM1RvuoL26mGraCzxBkAjp3xi6UaIOtjsgccpElAhX -ZdstRxMI2E27sZxXckRIs7sQlVSqhb3zMGF5RyLCkaqxemYLdayVaU1ACxFh -Lszi0+yiGnan+o5cjj4Rfpt58j1NU8MClv8a2xkTIVW6Rl/9vSrGGvbo0kdL -IuhkB/Y7ripjq/wuGZg1EbbKopfuWCpjH1vYbxcdJ8JrMT8Xo1ol7N6ud5uT -PRF6/CLMnUIUMeNEsY0ZFyKoqOeJiMjJY0qyb+iM3Sj5sMbZxt2Sw3heRvHc -9SCC2r/QC108ctgU66ialy8RQowLKkqYZbGYG+m+P0KIIMKgpmKwXxp7UrYz -uZZEBKd7YnIFleJY4+QiS3EaEbQGU18SZ8WwBpEJglkWEXZD2I0qFMSwmrz2 -tKKbRIhzT72P5R/Aqt7XPzlUTPHnjueUmqUIVsFVOv2rjAhPtj1dPLiEseLU -BF2TWiKIlaDjl58JYLd6Q8+uNBCBP0dY2K9iP1ZA73nt5mMiHJzKiSzK58ey -Y82+LrcT4YaxxTRXMR+WHMyemTdEBCr8V0+/GDeWWE/VZjBKBNfGdgMnOy4s -fmlldvEjERIWZob353JiFz3fkfRniRDmYNDbqsBBuT/1eCzME+HFt4iPbNTs -2IWppqwby0TQFzP7FdfCigWdyp/7vkkEi6HcjTfWzNi5/BTu7L9E4OLtG76l -thfzHY7EcWoSSDS7rKkJMWHuVo7ZWcwkoCquv9vPxYA5GEoAUYQErH2skuRw -GqzYbWncTIIEbC+kq+3zqbHZxOYwB1kSmP9sC/3SuQcL6rV8EK5OAtN4s7/s -6lTYk3mBw8kEErjl19O9/bFL2mWenc0jkeAyo++2dNJfUopFlMgTYxJ8KdIv -/7ywTeLL5DoxYkWC5ELbQ++SN0l3hirT1h1IUJw7LkJ3ep2kzId6eN1IoPKq -N2nCaZXUYvf+j+Y5EhzLZGZTzfxFMr7po3k8nASndCKEJed/kgY/7fE9f5kE -43/9VgIGlkiOonmlWWkkih/L0f4ci6R5F+Xx+lwSmETs4XFO/04KLe/meltC -gvApaonvht9I1HMOZj+rSSCtTpMtpPKVlC6/com9iQSLY4/now5NkwT9rjQr -t5NArlmFsJQ6SWqhis/jGiJBqGTtbeK5TySH7Niw9a8kWI76pzFWPUrakok+ -MbZJgo2os10nqt+R8lrDtZ4xY2CSx7+5avGWRLAM5bkjgoGSQq3spa0+0vBU -0O8ENQwW+z5Fl2IvSGYh1uemNDA4+nVBJv/Rc9IzBvUFXBuD6/efXElRfk6q -UFyZ2tDDgMz9FTugQCaFhp4b9DLEQHz0u9VJo24S717f+iO2GJR4XCy/uNJO -2rwTYxBxCYOBvsdX7KubSGPE60MV1RicvVOxVm5QS/IMKSs0rcVgeDyPpyv2 -Pmm9ttFtsQ6D8zRe56u6akhc4qMbak0YrHNqepy0rSYdZhQWetpOiZ/rGIE9 -rCS1vas4O/QegxxGsYSz0mUkM7YnSqGjGGhd+aB+rayUNGrSu84/jsGaJL3A -b6lS0mrLQpLjFwyQp7MRn/odklKJ6v3v8xhwOgslNfgVk9rG9ENTf2BwZ3Fn -7ipNMcmM5xhS+YkBtX3pOLfObZL7lZC3wWsYtGjp1blW3SKtticW7NvEIDTi -qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw -18hpWOkpIP0PtXjCHw== +1:eJwV1nk4VG8bB3BRIZF9nzF2yZJtMIz7tmethIosWSIVhVSWFJIiESEpkkRK +zEzKEqIklX5lXypZWoTIEkq95/3rXJ+/zn0953t/nyPrE+Lkz87Gxmazio3t +/8+FDy+eKiQXmaT4hC2bXrcy6bwufsK0Nw5S3KkxoQ0KgCJvfMR7L8H6yi1b +zBp0IWLbnR6O3kKI4zrZKtNgAQJTYpeWehhQuIkxO1rvDB/rHEPmepog1IFM +k633AyuF8fczPe8g4LCUr1JtOCz16F+e7hkGfxVhdZv7CdBsfrvobeEsbPaX +/mi08zJIf6z+7KO2ArcTj7G3U/NB+KDXHU5zDvz8rkH2h1oRXNKyqnV04cK8 +JP6Tzx6XQF/O5sYZfl5MHkji4ku/C7kdZRsiFHmxu9faNb/gLrjxKXstG/Ki +nU1dqXLFXRiMJ/1l9+XFC0bRTqQ3d2EoeJ2x8ANenBb3NM1bfw++Wow+pO7m +w9AGG+exM/dgcTr7ftSNDfjyU7JF8pFySC6KfcMuIYA7VawGqaIVYKu7X1BE +XgD/mY4PMqUrgOupk4uyugCGT0koqclXQMKI4oCdqQDqnlC5wLe5AqLlXn3O +3C+A5d/7knNtKiC4QPyvUo0A1m15a9oeVQHb8yrV7NwFsSv5TU3eYAWIZY6c +y7gmhIX2T1quX6wE8U0PEhaLhVDwb/ny+cxKkGxKjPWoEMJ7B5o/hF6pBPL0 +xqPKzUJYU2z4QO9mJSjaH/au/SqEt4/cSzlbVQk6q1eoIzrC2Fm0eNR9sBK2 +houOarcJo5nqjQ1PFBiwjefrh+wOYcxJPeEpt5EBToXVfX8GhdHz5aWtseoM +cP1vz5uWH8L4Qw3E1KgM8FC7WeMmIoL7WSM6260ZcGBUMz3OWwRDxuV8XwQy +4Kyzjcm7BRGUamxaCilhgCSrXZJ9lSju9dhUmH2XAeVCzr+0eESJ78FLqalg +QPc7z4p0GVF8yca4+uMRAxS2h8tt3yKKHw7qX5R+wYAmh/y1/10RRb36TOeT +XxmwYjXf/tpYDCVXttP3yjMhrTiybMVKDE9MpseMKDFBYS1bkvp2MSyZ9crw +VmWC/bN1phf8xdAz0gzttJiQa05h2qeKoVLt2M1hEyYYoF32y49i6EBVb5TY +zYQwwxteL+LEsWjvcY2yc0ywLeCbs0sRx/GsOY5dKUyQ44xOar8sjuuf9nqz +XWTCf52ulR0l4hh424RhnskEjcPrOT60i6PflqLHmdeZ8LX4WPFPSQlsbXB9 +7c1gQgPvGO2oggSu6rth1cJiQla405tf6hLIm1HqoPyQCZZm6ot/UAKl2R6v +HaxlQuH7YRvOAAmkn5rW4n/GhD3CjpNSTAnUSqnsu9nNBJ2o2tPX6yQw0QAC +m3qZsG5YRVS2RQIjT0SlDPYzofo+Byj1SSC5VieH4yMTRO2q0zb/k8C/pIBX +0l+I+U8r6FraSWLmOdFN0QtMsPixHBk8IokRO2PUZgVYcGJLpuqTCUk0cLVq +iBFiQfkN9X6hBUlMlT2rvFqEBeLO3obVXFJodMwoarU4CyYePfvFoSGFpxdt +zTtILMiISwu/clwKK4Zcl0pVWNA6sFFh4rQUPqhB2s+NLPij29xhkiyFhzsO +7qFuYsG+L/Pao9ekcJh2z5qhzgKavfuMRrMUHidx/HdcmwXDIkrBT3mlsbtr +xsPUiAViIQ0kMTFpdM26KbTFmAX2rbte76dII7fNg4e2dBZURSarbdCRRgWd +Q+3mwILzH6fHd++Sxgb5245rzFnQYHA+9+5eaTya+Pzid8Jz6fK2/4Kk0dzA +qeW1BQs8LVxLi2Kk0bncXCzRigXapbUBPwqJ93Wq+LTYsCCA3UXM7K40cr1T +CEyxZUGe+1RL5gNpDGkdC3K0Y8FaPlklWisxT3hUUIs9C/pDE0cTJqXxj1ze +wcStLNjwSiazZ0Eaowo8wtS2scBCsdpclY2EYlEXTrYTLu/5XvhGkISrVikU +r3ViwWnj7XslDUi4GP/JxdqZBVs8r//UNyPhF3WBnl7CfKe+x7vYk5ASEl7p +70LM03ymOM2bhClO3MeOuLLAd+ydfnkQCTU7e/2mCatyUl68DCfhmVKxyqCd +LHhkW/N97TkSVg5sDtq+iwWxBzljFDJIqLO6qu8xYatUZz6zayQ0EWG7p7ib +BZ1vpzbHVJLwF9k24Qvhq7NGTbm1JLx8e1WyqRsLfETO7Xj0jIRk6uRyFuHp +XfIRs30kVB0dktJ1Z8HDyMOcAqMkvKp5700U4ZN5j3M0pkjo2K33s56wZf06 +VftFEnZ2DiWsEF4/tLN2PzsZv7NEzunvYUHHqlv2Z9eTUTWFznaIcK78z/dF +omR8stz0/Rphb0sIaaKQkaYq6NBGWDkghW1IlYwSr3IUfxKeSupLX9El4x3x +lggRDxaw7ijJSwEZS16vM9MlHPUqjGVgQ8Zltb4kR8JmU42WrjvI6Pu7yN6P +MDc/X0+YBxmNY0dSjxL+T8s9MD2AjHKxPNvjCGfvKFkqP0LGCryceZ6w59H5 +86+iiHnPLrulElbMNpMeP0NG3UtVty54/H9/Lt7jTCNjnLRVRBJhZv+giWIu +GVPclNtPEo78s/E/syIyGiz1lR8mbEo+tte7nIyp0h8lPAlz4dOfMY/IeNCz +mt+acPtegYSrTWRUeT2RuYnw5XhPkepXZHQe/3ubh/CeW2XF3d1kdCyNsPtC +nIfc80X9uSEy8gQPnqon/O2r5QuB72Qs56mxSSdcsS7DTXOejGbNube9CB9T +G/pu/4+MPmY8eRsJmziqxwRxy2D/jSsqP4jv9Sr9ef4tkgxuPbqV/xDhDKaw +VrOyDPIq5wYrEnbr2ts0pCWDXNo2B/qIfHwV/zMqZSWDhaqqVrqE79NsIgy3 +yaBv5HnlASJfEXuyOHe6yeDcaNm9GMIcBZtVLwXL4Oof18ofEPlsexJTe/+4 +DK58u61mRzhtpM3+dZwM/mWOuQwS+SYr+4dwZctg77aTFTNE/mnlV1gnG2SQ +//cS8yuxPxY97StTrTLol3bH1p+wI9tqa693Mpha56L8YQexP07BfTAmg8zJ +tY+eEvtoFSUbe2oNBcneS3v8iX19uaHupsE6Cj7yzrN5Suz3tiLX1mk+CrJd +3XhWhrD762SBveIUvLicstzmwILDMgs3TTdRUC0u/Ns80R/zzLTWJU0Kvrjj +laBPOHLLpslKXQpeMfCJOkr0zZkj3lQ5Ewo+mXGJ/2xN5L25rZV9OwWfp7bI +XSP66mlA/mRzBAUDzeGTB9F/Nn8MBaOjKKixaPrNn+jH9rROqu4pYh61AL8g +oj/7qrlPFZ2joN34cnWgIbEPPOGCZ/IoODVdxGOkR/R7xRZ9qyYKfqp+kKWv +xoJrFiPuf1soqOQlFc9J9LVcX8ypqpcUdJC8sNxB9Lk6O/OFUheF6Ou7aT7K +xL44k/ZwfqVgi1xJgqscCw4uzpxq5ZXFbJ6y0Vwx4vyP7BP9LCiLbPnJ8yKi +RH7H+8s4xGWRaftO6IIwC24NNHebyMni2X0Zp0KI++hD/WW1B1RZvD6ivGMN +Dwu2njHsveEli+xrFm9ErDBBW/C0ZlSlLF6bjTU/Sdx3bMnzT3OqZNH1iOPc +yfdMaOcIcquqlcXePN+5qAEmHJh3OjPzTBYHNfrHg3qYUNSrMBDQL4tRb0Mm +pN8Q92V+a6IzhxxKLV6ndDxmwtIm/g/qLnIorZEQmJ3DhIVrkqd13ORwIWD5 +hlYWE+Y2KCoYesnhrZWCi60ZTJiaNQyy2C+H++YHLk6kMmG41nfBLUYOXc2Z +nrxnmNBm95Av6ZYc5qlL8bIOE/8nBzxheF4OQ/f0xRVZMsG47G5BVpY8Pj75 +VuD8ZwYMUMryLa/Ko+WX4tKcEQZEZpVen8uXxytG5IGiIQY8PF2c51QqjxsE +hAWr+hmgvasgh69OHu/qC7DXtTNg45rMtMRP8uiclx65s4oBol5RpyLUFDBi +RHZXXzwDZgRtvV2bFLBxP3v0IXEGjKZ4u4ZyKuEl6wZFpkgl2Pw4ZjNGVcZL +5r6HV/NUwIQvVxgrVgVvXilUNii/R/z/i7GfbdqIAa6MjmCjMhB8rZRa8UMV +yW47SjgmSkA66f42KlUNZboyPSiHiyFnkyG/UIA6Zn/hnwhQL4I2SVO92XQN +HDCQyOvmKQSadFOaZrcmTt1ekxBUlQ98HIXhe+M2o6G7xKDV6FUgn5Yx3q2k +hVzFWTAgkAPcinuqnJ5r4ceip/6qJZmgQZe4f8xDG/nJKyHSrekQ+kGw2ZZN +B4vyO2fZ/16AH7MpLjY5OniwsLjkkP85sNZsybVR10W9m2rzY4fOQP2s0e9f +7bpYjLQDzhWnIVhNu/+tvx7qdByrS/CKAfqUX+dubio+VqGdG+w4BpYK4g68 +hVR0W1ZTbzsaBqzJZ7J+RVRsfPNbUmJfGCg8DFuoKaai5AG50lDXMFht+yY/ +sIyKCyGh6Zb6YdAUkvizmUXFZ6s3/du/FAomtXPZkc+pWD8gXVMSGwpUp7fD +XyaouG31bt2+jCOgcur88SZ9fYwT5+N6yQyBOqNba+xp+ohrP4ipZYfAtl8N +l7qM9bG2+JnszcgQOB48f/erqT66azdOvzMNgdY93p/47PWx3dxV1OBtMAQa +Um3dvfVRRj7ah3fuEJT+/CQ1l6SP7x/7PE22OQiq/oYNiv36CFnvE2S19sNF +Ocfl+EF9zD/aGakptR/mPvroDX/QR8mTHWMOa/ZDvVtK2fURfVz5vWOuti8Q +nLZ9zBab1MeZpakx9/hAOGF05jA3mwHGH5KtKewLgFaBt7KTigbILW5Sz31p +H/jXByawjhhgSsVlb93NfjB1aPyYZbgBPu++KndJ2g+Okw4e6I4wwKLjFrFs +3H5wPjrEaTHKANWiYwb4hn2hghZBMU40wIKWzLHpTF/4UxVf15xrgAfudcc2 +rvjApfvX5941G6DQ+9F6HNgLDQWdfjMihvg0RWVDX6IXDNnLekWIG+KJwJdL +LwK8gG3p0O7fkob4vd+sqWuLF5ht53RcQzFEJ86kAjqPF7SsoulLqBri6JGt +sfbpnvDKJ5/b1MQQz7Ul2LoWekC/QlB52j5DNNJ+IprT4w5zJf9+aT40xMms +Tpnh87vgs6tVwblqQxy7E9ByK2wX9K6+sGWk1hAfDc9+id6zC2q9Ja9kNRoi +NSDc319jF8SJ69FWXhgi/cDya1LHTuBPCopuGzREq30x5ymUnaAW0MXmz07D +OoEjDfytLuCrWMad60DDYFpndpv9Doh85hmktI2G4jURuUcMdkCav+BLhhMN +pWZCGzYp7IC6WydSXu6kYYVJgk7fbycQVtqyYWUvDVu7XKXE7jpBi9KYsHcE +DXv8Hj4R4HcCVRUZilI+Das+S7JdHdsGM6oZVMY0DeHtBsn6sw7Q+wothWZp +mNyFwz37HaAxeGpH+DwNJ9ekDay3d4BUhs0R6jINx3Wz17fyO4Aqje1uDYcR +pvJEi5++ag8+Nodkm0WNcGaHXvz3B3bQGWC9vtPYCHNutlwV+GsDj4p+f5pP +MsJPQeVX7HqsgGoe/ss22Qh5BQSTuBut4MGnifUFF4xwoenV4GCJFTDIH/Rt +LxlhVvRQeHOkFdzNabxw/aoRbs0Sik+VsYKClDOG1uVG+Jr8eifvIUs4F74h +PafDCD/q5YnRxCyASyipeLLLCL97jEQmsFtAYiVbnVmvEZpGtegNT5pDwtTM +54lBIxSMdgjreWoOJwM7jU0/E64mud4OM4fQPVe+fls0wotieXJvOs3AzUIe +jcjGWJ7JrdFZZAornVx8zRRj5K1PMRhMM4UC/6kBW3ljTIvd+HIx2hQ+J1Yf +c1MxxgyOGyYhLqYQ+mLr/RPaxuiyX8p9K6cpnHeMJj+yMka1DsuoV8EINbu6 +/uiGGKOyop9JVI4JeHyraas7YoxjKt+yA46aAFtkQY5FuDFaB9ZnHHcyAaur +B3SdTxjjD+fI75y8JvDu/aqDYfHGyHa+6nBvPB3GfTQGKrON8UZW6Vv548Yg +dehstUajMXp36mw4HUmD1H/79JKbjPHx8ELqGw8asF+yqvzy1Bi5NMrCaaY0 +GK9aU1rwwhgD/3nx+XPRoIYtIUewwxjdLaFlXY4huGWeOrYwZozpNZvfx9UZ +QE7tCb16Hjpuf7FtOUZCH9Y77q6U5KNj+j9rF1U2fTg1ZKB+jJ+Oa0VmpKY/ +UyFwzaLCZhE6asfeSH/OooL+1gjhQjIdI5s1b9/cToXu4dDZM1p07BTgXfxz +UQ9E1h2sdNhJx5BXY/FXybpQZB4TOb2bjkVx/AzmGl3Qjkk1z9hDx01iYxu/ +TuiA43RFV+9eOt6v/BR/q1YHErvnl3wP0vEAjjQHu+nAYmGsWeRpOj6PmOmT +u6YN/UYZHcVldFSTWhW1naoFgUeL8mzK6VjxwZH0mKIFC+UP/Ccq6Oji03bD +lEcLBOV6f2lV0ZEI53jm0Gaw4yJJP26k47P5tRV7UzZDXWexX0cXHeMVov/9 +/k8TbPkeqUf00tExemd7T4km9Fq/WBAfoOM6qj8Mn9KEuZrvSZ5DdAwyybWM +09IE9Rub730bp2MhMzr3W6YG1PWbRqRM0vF0dpuWXrAG2ArvAM1pOub0Pxi/ +Z60B+84efRs+T8crS7arlX6rw1xjYq7YIh09z79bq9ilDnHL2b41y3QcLWEE +b7uvDvy6pWoeK8T5yFrwlpxTh+uHaub//aPjuwlu1iY/dfgfr6sg/A== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.17588335145564066`}}, + "PlotRange" -> {{0, 30}, {0., 0.07955255242498241}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7702,6 +6998,7 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7729,7 +7026,8 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.17588335145564066`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07955255242498241}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7737,11 +7035,12 @@ qF/Y90JS3Haua8s2Bt9S/5ofVy4kcWhWKZ7+i8EOk4Lqx7CbpCK/lrV//zDw Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991334471589432*^9}, - CellLabel-> - "Out[252]=",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] + CellChangeTimes->{3.991334471589432*^9, 3.994387185128134*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"747e8716-78a7-4209-8445-6a30c13885cb"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7812,15 +7111,858 @@ Cell[BoxData[ CellFrame->{{0, 0}, {0, 0}}, CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, 3.994236222998274*^9}, - Background->RGBColor[ - 0.87, 0.94, 1],ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + Background->RGBColor[0.87, 0.94, 1], + CellLabel->"In[94]:=",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.060662}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387185302085*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"db8e8163-8f5c-444b-a880-eb8ccd5905d3"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6d3700e1-f504-214a-a332-\ -f16397f0b922"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[95]:=",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VG8bB3BRIZF9nzF2yZJtMIz7tmethIosWSIVhVSWFJIiESEpkkRK +zEzKEqIklX5lXypZWoTIEkq95/3rXJ+/zn0953t/nyPrE+Lkz87Gxmazio3t +/8+FDy+eKiQXmaT4hC2bXrcy6bwufsK0Nw5S3KkxoQ0KgCJvfMR7L8H6yi1b +zBp0IWLbnR6O3kKI4zrZKtNgAQJTYpeWehhQuIkxO1rvDB/rHEPmepog1IFM +k633AyuF8fczPe8g4LCUr1JtOCz16F+e7hkGfxVhdZv7CdBsfrvobeEsbPaX +/mi08zJIf6z+7KO2ArcTj7G3U/NB+KDXHU5zDvz8rkH2h1oRXNKyqnV04cK8 +JP6Tzx6XQF/O5sYZfl5MHkji4ku/C7kdZRsiFHmxu9faNb/gLrjxKXstG/Ki +nU1dqXLFXRiMJ/1l9+XFC0bRTqQ3d2EoeJ2x8ANenBb3NM1bfw++Wow+pO7m +w9AGG+exM/dgcTr7ftSNDfjyU7JF8pFySC6KfcMuIYA7VawGqaIVYKu7X1BE +XgD/mY4PMqUrgOupk4uyugCGT0koqclXQMKI4oCdqQDqnlC5wLe5AqLlXn3O +3C+A5d/7knNtKiC4QPyvUo0A1m15a9oeVQHb8yrV7NwFsSv5TU3eYAWIZY6c +y7gmhIX2T1quX6wE8U0PEhaLhVDwb/ny+cxKkGxKjPWoEMJ7B5o/hF6pBPL0 +xqPKzUJYU2z4QO9mJSjaH/au/SqEt4/cSzlbVQk6q1eoIzrC2Fm0eNR9sBK2 +houOarcJo5nqjQ1PFBiwjefrh+wOYcxJPeEpt5EBToXVfX8GhdHz5aWtseoM +cP1vz5uWH8L4Qw3E1KgM8FC7WeMmIoL7WSM6260ZcGBUMz3OWwRDxuV8XwQy +4Kyzjcm7BRGUamxaCilhgCSrXZJ9lSju9dhUmH2XAeVCzr+0eESJ78FLqalg +QPc7z4p0GVF8yca4+uMRAxS2h8tt3yKKHw7qX5R+wYAmh/y1/10RRb36TOeT +XxmwYjXf/tpYDCVXttP3yjMhrTiybMVKDE9MpseMKDFBYS1bkvp2MSyZ9crw +VmWC/bN1phf8xdAz0gzttJiQa05h2qeKoVLt2M1hEyYYoF32y49i6EBVb5TY +zYQwwxteL+LEsWjvcY2yc0ywLeCbs0sRx/GsOY5dKUyQ44xOar8sjuuf9nqz +XWTCf52ulR0l4hh424RhnskEjcPrOT60i6PflqLHmdeZ8LX4WPFPSQlsbXB9 +7c1gQgPvGO2oggSu6rth1cJiQla405tf6hLIm1HqoPyQCZZm6ot/UAKl2R6v +HaxlQuH7YRvOAAmkn5rW4n/GhD3CjpNSTAnUSqnsu9nNBJ2o2tPX6yQw0QAC +m3qZsG5YRVS2RQIjT0SlDPYzofo+Byj1SSC5VieH4yMTRO2q0zb/k8C/pIBX +0l+I+U8r6FraSWLmOdFN0QtMsPixHBk8IokRO2PUZgVYcGJLpuqTCUk0cLVq +iBFiQfkN9X6hBUlMlT2rvFqEBeLO3obVXFJodMwoarU4CyYePfvFoSGFpxdt +zTtILMiISwu/clwKK4Zcl0pVWNA6sFFh4rQUPqhB2s+NLPij29xhkiyFhzsO +7qFuYsG+L/Pao9ekcJh2z5qhzgKavfuMRrMUHidx/HdcmwXDIkrBT3mlsbtr +xsPUiAViIQ0kMTFpdM26KbTFmAX2rbte76dII7fNg4e2dBZURSarbdCRRgWd +Q+3mwILzH6fHd++Sxgb5245rzFnQYHA+9+5eaTya+Pzid8Jz6fK2/4Kk0dzA +qeW1BQs8LVxLi2Kk0bncXCzRigXapbUBPwqJ93Wq+LTYsCCA3UXM7K40cr1T +CEyxZUGe+1RL5gNpDGkdC3K0Y8FaPlklWisxT3hUUIs9C/pDE0cTJqXxj1ze +wcStLNjwSiazZ0Eaowo8wtS2scBCsdpclY2EYlEXTrYTLu/5XvhGkISrVikU +r3ViwWnj7XslDUi4GP/JxdqZBVs8r//UNyPhF3WBnl7CfKe+x7vYk5ASEl7p +70LM03ymOM2bhClO3MeOuLLAd+ydfnkQCTU7e/2mCatyUl68DCfhmVKxyqCd +LHhkW/N97TkSVg5sDtq+iwWxBzljFDJIqLO6qu8xYatUZz6zayQ0EWG7p7ib +BZ1vpzbHVJLwF9k24Qvhq7NGTbm1JLx8e1WyqRsLfETO7Xj0jIRk6uRyFuHp +XfIRs30kVB0dktJ1Z8HDyMOcAqMkvKp5700U4ZN5j3M0pkjo2K33s56wZf06 +VftFEnZ2DiWsEF4/tLN2PzsZv7NEzunvYUHHqlv2Z9eTUTWFznaIcK78z/dF +omR8stz0/Rphb0sIaaKQkaYq6NBGWDkghW1IlYwSr3IUfxKeSupLX9El4x3x +lggRDxaw7ijJSwEZS16vM9MlHPUqjGVgQ8Zltb4kR8JmU42WrjvI6Pu7yN6P +MDc/X0+YBxmNY0dSjxL+T8s9MD2AjHKxPNvjCGfvKFkqP0LGCryceZ6w59H5 +86+iiHnPLrulElbMNpMeP0NG3UtVty54/H9/Lt7jTCNjnLRVRBJhZv+giWIu +GVPclNtPEo78s/E/syIyGiz1lR8mbEo+tte7nIyp0h8lPAlz4dOfMY/IeNCz +mt+acPtegYSrTWRUeT2RuYnw5XhPkepXZHQe/3ubh/CeW2XF3d1kdCyNsPtC +nIfc80X9uSEy8gQPnqon/O2r5QuB72Qs56mxSSdcsS7DTXOejGbNube9CB9T +G/pu/4+MPmY8eRsJmziqxwRxy2D/jSsqP4jv9Sr9ef4tkgxuPbqV/xDhDKaw +VrOyDPIq5wYrEnbr2ts0pCWDXNo2B/qIfHwV/zMqZSWDhaqqVrqE79NsIgy3 +yaBv5HnlASJfEXuyOHe6yeDcaNm9GMIcBZtVLwXL4Oof18ofEPlsexJTe/+4 +DK58u61mRzhtpM3+dZwM/mWOuQwS+SYr+4dwZctg77aTFTNE/mnlV1gnG2SQ +//cS8yuxPxY97StTrTLol3bH1p+wI9tqa693Mpha56L8YQexP07BfTAmg8zJ +tY+eEvtoFSUbe2oNBcneS3v8iX19uaHupsE6Cj7yzrN5Suz3tiLX1mk+CrJd +3XhWhrD762SBveIUvLicstzmwILDMgs3TTdRUC0u/Ns80R/zzLTWJU0Kvrjj +laBPOHLLpslKXQpeMfCJOkr0zZkj3lQ5Ewo+mXGJ/2xN5L25rZV9OwWfp7bI +XSP66mlA/mRzBAUDzeGTB9F/Nn8MBaOjKKixaPrNn+jH9rROqu4pYh61AL8g +oj/7qrlPFZ2joN34cnWgIbEPPOGCZ/IoODVdxGOkR/R7xRZ9qyYKfqp+kKWv +xoJrFiPuf1soqOQlFc9J9LVcX8ypqpcUdJC8sNxB9Lk6O/OFUheF6Ou7aT7K +xL44k/ZwfqVgi1xJgqscCw4uzpxq5ZXFbJ6y0Vwx4vyP7BP9LCiLbPnJ8yKi +RH7H+8s4xGWRaftO6IIwC24NNHebyMni2X0Zp0KI++hD/WW1B1RZvD6ivGMN +Dwu2njHsveEli+xrFm9ErDBBW/C0ZlSlLF6bjTU/Sdx3bMnzT3OqZNH1iOPc +yfdMaOcIcquqlcXePN+5qAEmHJh3OjPzTBYHNfrHg3qYUNSrMBDQL4tRb0Mm +pN8Q92V+a6IzhxxKLV6ndDxmwtIm/g/qLnIorZEQmJ3DhIVrkqd13ORwIWD5 +hlYWE+Y2KCoYesnhrZWCi60ZTJiaNQyy2C+H++YHLk6kMmG41nfBLUYOXc2Z +nrxnmNBm95Av6ZYc5qlL8bIOE/8nBzxheF4OQ/f0xRVZMsG47G5BVpY8Pj75 +VuD8ZwYMUMryLa/Ko+WX4tKcEQZEZpVen8uXxytG5IGiIQY8PF2c51QqjxsE +hAWr+hmgvasgh69OHu/qC7DXtTNg45rMtMRP8uiclx65s4oBol5RpyLUFDBi +RHZXXzwDZgRtvV2bFLBxP3v0IXEGjKZ4u4ZyKuEl6wZFpkgl2Pw4ZjNGVcZL +5r6HV/NUwIQvVxgrVgVvXilUNii/R/z/i7GfbdqIAa6MjmCjMhB8rZRa8UMV +yW47SjgmSkA66f42KlUNZboyPSiHiyFnkyG/UIA6Zn/hnwhQL4I2SVO92XQN +HDCQyOvmKQSadFOaZrcmTt1ekxBUlQ98HIXhe+M2o6G7xKDV6FUgn5Yx3q2k +hVzFWTAgkAPcinuqnJ5r4ceip/6qJZmgQZe4f8xDG/nJKyHSrekQ+kGw2ZZN +B4vyO2fZ/16AH7MpLjY5OniwsLjkkP85sNZsybVR10W9m2rzY4fOQP2s0e9f +7bpYjLQDzhWnIVhNu/+tvx7qdByrS/CKAfqUX+dubio+VqGdG+w4BpYK4g68 +hVR0W1ZTbzsaBqzJZ7J+RVRsfPNbUmJfGCg8DFuoKaai5AG50lDXMFht+yY/ +sIyKCyGh6Zb6YdAUkvizmUXFZ6s3/du/FAomtXPZkc+pWD8gXVMSGwpUp7fD +XyaouG31bt2+jCOgcur88SZ9fYwT5+N6yQyBOqNba+xp+ohrP4ipZYfAtl8N +l7qM9bG2+JnszcgQOB48f/erqT66azdOvzMNgdY93p/47PWx3dxV1OBtMAQa +Um3dvfVRRj7ah3fuEJT+/CQ1l6SP7x/7PE22OQiq/oYNiv36CFnvE2S19sNF +Ocfl+EF9zD/aGakptR/mPvroDX/QR8mTHWMOa/ZDvVtK2fURfVz5vWOuti8Q +nLZ9zBab1MeZpakx9/hAOGF05jA3mwHGH5KtKewLgFaBt7KTigbILW5Sz31p +H/jXByawjhhgSsVlb93NfjB1aPyYZbgBPu++KndJ2g+Okw4e6I4wwKLjFrFs +3H5wPjrEaTHKANWiYwb4hn2hghZBMU40wIKWzLHpTF/4UxVf15xrgAfudcc2 +rvjApfvX5941G6DQ+9F6HNgLDQWdfjMihvg0RWVDX6IXDNnLekWIG+KJwJdL +LwK8gG3p0O7fkob4vd+sqWuLF5ht53RcQzFEJ86kAjqPF7SsoulLqBri6JGt +sfbpnvDKJ5/b1MQQz7Ul2LoWekC/QlB52j5DNNJ+IprT4w5zJf9+aT40xMms +Tpnh87vgs6tVwblqQxy7E9ByK2wX9K6+sGWk1hAfDc9+id6zC2q9Ja9kNRoi +NSDc319jF8SJ69FWXhgi/cDya1LHTuBPCopuGzREq30x5ymUnaAW0MXmz07D +OoEjDfytLuCrWMad60DDYFpndpv9Doh85hmktI2G4jURuUcMdkCav+BLhhMN +pWZCGzYp7IC6WydSXu6kYYVJgk7fbycQVtqyYWUvDVu7XKXE7jpBi9KYsHcE +DXv8Hj4R4HcCVRUZilI+Das+S7JdHdsGM6oZVMY0DeHtBsn6sw7Q+wothWZp +mNyFwz37HaAxeGpH+DwNJ9ekDay3d4BUhs0R6jINx3Wz17fyO4Aqje1uDYcR +pvJEi5++ag8+Nodkm0WNcGaHXvz3B3bQGWC9vtPYCHNutlwV+GsDj4p+f5pP +MsJPQeVX7HqsgGoe/ss22Qh5BQSTuBut4MGnifUFF4xwoenV4GCJFTDIH/Rt +LxlhVvRQeHOkFdzNabxw/aoRbs0Sik+VsYKClDOG1uVG+Jr8eifvIUs4F74h +PafDCD/q5YnRxCyASyipeLLLCL97jEQmsFtAYiVbnVmvEZpGtegNT5pDwtTM +54lBIxSMdgjreWoOJwM7jU0/E64mud4OM4fQPVe+fls0wotieXJvOs3AzUIe +jcjGWJ7JrdFZZAornVx8zRRj5K1PMRhMM4UC/6kBW3ljTIvd+HIx2hQ+J1Yf +c1MxxgyOGyYhLqYQ+mLr/RPaxuiyX8p9K6cpnHeMJj+yMka1DsuoV8EINbu6 +/uiGGKOyop9JVI4JeHyraas7YoxjKt+yA46aAFtkQY5FuDFaB9ZnHHcyAaur +B3SdTxjjD+fI75y8JvDu/aqDYfHGyHa+6nBvPB3GfTQGKrON8UZW6Vv548Yg +dehstUajMXp36mw4HUmD1H/79JKbjPHx8ELqGw8asF+yqvzy1Bi5NMrCaaY0 +GK9aU1rwwhgD/3nx+XPRoIYtIUewwxjdLaFlXY4huGWeOrYwZozpNZvfx9UZ +QE7tCb16Hjpuf7FtOUZCH9Y77q6U5KNj+j9rF1U2fTg1ZKB+jJ+Oa0VmpKY/ +UyFwzaLCZhE6asfeSH/OooL+1gjhQjIdI5s1b9/cToXu4dDZM1p07BTgXfxz +UQ9E1h2sdNhJx5BXY/FXybpQZB4TOb2bjkVx/AzmGl3Qjkk1z9hDx01iYxu/ +TuiA43RFV+9eOt6v/BR/q1YHErvnl3wP0vEAjjQHu+nAYmGsWeRpOj6PmOmT +u6YN/UYZHcVldFSTWhW1naoFgUeL8mzK6VjxwZH0mKIFC+UP/Ccq6Oji03bD +lEcLBOV6f2lV0ZEI53jm0Gaw4yJJP26k47P5tRV7UzZDXWexX0cXHeMVov/9 +/k8TbPkeqUf00tExemd7T4km9Fq/WBAfoOM6qj8Mn9KEuZrvSZ5DdAwyybWM +09IE9Rub730bp2MhMzr3W6YG1PWbRqRM0vF0dpuWXrAG2ArvAM1pOub0Pxi/ +Z60B+84efRs+T8crS7arlX6rw1xjYq7YIh09z79bq9ilDnHL2b41y3QcLWEE +b7uvDvy6pWoeK8T5yFrwlpxTh+uHaub//aPjuwlu1iY/dfgfr6sg/A== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VG8bB3BRIZF9nzF2yZJtMIz7tmethIosWSIVhVSWFJIiESEpkkRK +zEzKEqIklX5lXypZWoTIEkq95/3rXJ+/zn0953t/nyPrE+Lkz87Gxmazio3t +/8+FDy+eKiQXmaT4hC2bXrcy6bwufsK0Nw5S3KkxoQ0KgCJvfMR7L8H6yi1b +zBp0IWLbnR6O3kKI4zrZKtNgAQJTYpeWehhQuIkxO1rvDB/rHEPmepog1IFM +k633AyuF8fczPe8g4LCUr1JtOCz16F+e7hkGfxVhdZv7CdBsfrvobeEsbPaX +/mi08zJIf6z+7KO2ArcTj7G3U/NB+KDXHU5zDvz8rkH2h1oRXNKyqnV04cK8 +JP6Tzx6XQF/O5sYZfl5MHkji4ku/C7kdZRsiFHmxu9faNb/gLrjxKXstG/Ki +nU1dqXLFXRiMJ/1l9+XFC0bRTqQ3d2EoeJ2x8ANenBb3NM1bfw++Wow+pO7m +w9AGG+exM/dgcTr7ftSNDfjyU7JF8pFySC6KfcMuIYA7VawGqaIVYKu7X1BE +XgD/mY4PMqUrgOupk4uyugCGT0koqclXQMKI4oCdqQDqnlC5wLe5AqLlXn3O +3C+A5d/7knNtKiC4QPyvUo0A1m15a9oeVQHb8yrV7NwFsSv5TU3eYAWIZY6c +y7gmhIX2T1quX6wE8U0PEhaLhVDwb/ny+cxKkGxKjPWoEMJ7B5o/hF6pBPL0 +xqPKzUJYU2z4QO9mJSjaH/au/SqEt4/cSzlbVQk6q1eoIzrC2Fm0eNR9sBK2 +houOarcJo5nqjQ1PFBiwjefrh+wOYcxJPeEpt5EBToXVfX8GhdHz5aWtseoM +cP1vz5uWH8L4Qw3E1KgM8FC7WeMmIoL7WSM6260ZcGBUMz3OWwRDxuV8XwQy +4Kyzjcm7BRGUamxaCilhgCSrXZJ9lSju9dhUmH2XAeVCzr+0eESJ78FLqalg +QPc7z4p0GVF8yca4+uMRAxS2h8tt3yKKHw7qX5R+wYAmh/y1/10RRb36TOeT +XxmwYjXf/tpYDCVXttP3yjMhrTiybMVKDE9MpseMKDFBYS1bkvp2MSyZ9crw +VmWC/bN1phf8xdAz0gzttJiQa05h2qeKoVLt2M1hEyYYoF32y49i6EBVb5TY +zYQwwxteL+LEsWjvcY2yc0ywLeCbs0sRx/GsOY5dKUyQ44xOar8sjuuf9nqz +XWTCf52ulR0l4hh424RhnskEjcPrOT60i6PflqLHmdeZ8LX4WPFPSQlsbXB9 +7c1gQgPvGO2oggSu6rth1cJiQla405tf6hLIm1HqoPyQCZZm6ot/UAKl2R6v +HaxlQuH7YRvOAAmkn5rW4n/GhD3CjpNSTAnUSqnsu9nNBJ2o2tPX6yQw0QAC +m3qZsG5YRVS2RQIjT0SlDPYzofo+Byj1SSC5VieH4yMTRO2q0zb/k8C/pIBX +0l+I+U8r6FraSWLmOdFN0QtMsPixHBk8IokRO2PUZgVYcGJLpuqTCUk0cLVq +iBFiQfkN9X6hBUlMlT2rvFqEBeLO3obVXFJodMwoarU4CyYePfvFoSGFpxdt +zTtILMiISwu/clwKK4Zcl0pVWNA6sFFh4rQUPqhB2s+NLPij29xhkiyFhzsO +7qFuYsG+L/Pao9ekcJh2z5qhzgKavfuMRrMUHidx/HdcmwXDIkrBT3mlsbtr +xsPUiAViIQ0kMTFpdM26KbTFmAX2rbte76dII7fNg4e2dBZURSarbdCRRgWd +Q+3mwILzH6fHd++Sxgb5245rzFnQYHA+9+5eaTya+Pzid8Jz6fK2/4Kk0dzA +qeW1BQs8LVxLi2Kk0bncXCzRigXapbUBPwqJ93Wq+LTYsCCA3UXM7K40cr1T +CEyxZUGe+1RL5gNpDGkdC3K0Y8FaPlklWisxT3hUUIs9C/pDE0cTJqXxj1ze +wcStLNjwSiazZ0Eaowo8wtS2scBCsdpclY2EYlEXTrYTLu/5XvhGkISrVikU +r3ViwWnj7XslDUi4GP/JxdqZBVs8r//UNyPhF3WBnl7CfKe+x7vYk5ASEl7p +70LM03ymOM2bhClO3MeOuLLAd+ydfnkQCTU7e/2mCatyUl68DCfhmVKxyqCd +LHhkW/N97TkSVg5sDtq+iwWxBzljFDJIqLO6qu8xYatUZz6zayQ0EWG7p7ib +BZ1vpzbHVJLwF9k24Qvhq7NGTbm1JLx8e1WyqRsLfETO7Xj0jIRk6uRyFuHp +XfIRs30kVB0dktJ1Z8HDyMOcAqMkvKp5700U4ZN5j3M0pkjo2K33s56wZf06 +VftFEnZ2DiWsEF4/tLN2PzsZv7NEzunvYUHHqlv2Z9eTUTWFznaIcK78z/dF +omR8stz0/Rphb0sIaaKQkaYq6NBGWDkghW1IlYwSr3IUfxKeSupLX9El4x3x +lggRDxaw7ijJSwEZS16vM9MlHPUqjGVgQ8Zltb4kR8JmU42WrjvI6Pu7yN6P +MDc/X0+YBxmNY0dSjxL+T8s9MD2AjHKxPNvjCGfvKFkqP0LGCryceZ6w59H5 +86+iiHnPLrulElbMNpMeP0NG3UtVty54/H9/Lt7jTCNjnLRVRBJhZv+giWIu +GVPclNtPEo78s/E/syIyGiz1lR8mbEo+tte7nIyp0h8lPAlz4dOfMY/IeNCz +mt+acPtegYSrTWRUeT2RuYnw5XhPkepXZHQe/3ubh/CeW2XF3d1kdCyNsPtC +nIfc80X9uSEy8gQPnqon/O2r5QuB72Qs56mxSSdcsS7DTXOejGbNube9CB9T +G/pu/4+MPmY8eRsJmziqxwRxy2D/jSsqP4jv9Sr9ef4tkgxuPbqV/xDhDKaw +VrOyDPIq5wYrEnbr2ts0pCWDXNo2B/qIfHwV/zMqZSWDhaqqVrqE79NsIgy3 +yaBv5HnlASJfEXuyOHe6yeDcaNm9GMIcBZtVLwXL4Oof18ofEPlsexJTe/+4 +DK58u61mRzhtpM3+dZwM/mWOuQwS+SYr+4dwZctg77aTFTNE/mnlV1gnG2SQ +//cS8yuxPxY97StTrTLol3bH1p+wI9tqa693Mpha56L8YQexP07BfTAmg8zJ +tY+eEvtoFSUbe2oNBcneS3v8iX19uaHupsE6Cj7yzrN5Suz3tiLX1mk+CrJd +3XhWhrD762SBveIUvLicstzmwILDMgs3TTdRUC0u/Ns80R/zzLTWJU0Kvrjj +laBPOHLLpslKXQpeMfCJOkr0zZkj3lQ5Ewo+mXGJ/2xN5L25rZV9OwWfp7bI +XSP66mlA/mRzBAUDzeGTB9F/Nn8MBaOjKKixaPrNn+jH9rROqu4pYh61AL8g +oj/7qrlPFZ2joN34cnWgIbEPPOGCZ/IoODVdxGOkR/R7xRZ9qyYKfqp+kKWv +xoJrFiPuf1soqOQlFc9J9LVcX8ypqpcUdJC8sNxB9Lk6O/OFUheF6Ou7aT7K +xL44k/ZwfqVgi1xJgqscCw4uzpxq5ZXFbJ6y0Vwx4vyP7BP9LCiLbPnJ8yKi +RH7H+8s4xGWRaftO6IIwC24NNHebyMni2X0Zp0KI++hD/WW1B1RZvD6ivGMN +Dwu2njHsveEli+xrFm9ErDBBW/C0ZlSlLF6bjTU/Sdx3bMnzT3OqZNH1iOPc +yfdMaOcIcquqlcXePN+5qAEmHJh3OjPzTBYHNfrHg3qYUNSrMBDQL4tRb0Mm +pN8Q92V+a6IzhxxKLV6ndDxmwtIm/g/qLnIorZEQmJ3DhIVrkqd13ORwIWD5 +hlYWE+Y2KCoYesnhrZWCi60ZTJiaNQyy2C+H++YHLk6kMmG41nfBLUYOXc2Z +nrxnmNBm95Av6ZYc5qlL8bIOE/8nBzxheF4OQ/f0xRVZMsG47G5BVpY8Pj75 +VuD8ZwYMUMryLa/Ko+WX4tKcEQZEZpVen8uXxytG5IGiIQY8PF2c51QqjxsE +hAWr+hmgvasgh69OHu/qC7DXtTNg45rMtMRP8uiclx65s4oBol5RpyLUFDBi +RHZXXzwDZgRtvV2bFLBxP3v0IXEGjKZ4u4ZyKuEl6wZFpkgl2Pw4ZjNGVcZL +5r6HV/NUwIQvVxgrVgVvXilUNii/R/z/i7GfbdqIAa6MjmCjMhB8rZRa8UMV +yW47SjgmSkA66f42KlUNZboyPSiHiyFnkyG/UIA6Zn/hnwhQL4I2SVO92XQN +HDCQyOvmKQSadFOaZrcmTt1ekxBUlQ98HIXhe+M2o6G7xKDV6FUgn5Yx3q2k +hVzFWTAgkAPcinuqnJ5r4ceip/6qJZmgQZe4f8xDG/nJKyHSrekQ+kGw2ZZN +B4vyO2fZ/16AH7MpLjY5OniwsLjkkP85sNZsybVR10W9m2rzY4fOQP2s0e9f +7bpYjLQDzhWnIVhNu/+tvx7qdByrS/CKAfqUX+dubio+VqGdG+w4BpYK4g68 +hVR0W1ZTbzsaBqzJZ7J+RVRsfPNbUmJfGCg8DFuoKaai5AG50lDXMFht+yY/ +sIyKCyGh6Zb6YdAUkvizmUXFZ6s3/du/FAomtXPZkc+pWD8gXVMSGwpUp7fD +XyaouG31bt2+jCOgcur88SZ9fYwT5+N6yQyBOqNba+xp+ohrP4ipZYfAtl8N +l7qM9bG2+JnszcgQOB48f/erqT66azdOvzMNgdY93p/47PWx3dxV1OBtMAQa +Um3dvfVRRj7ah3fuEJT+/CQ1l6SP7x/7PE22OQiq/oYNiv36CFnvE2S19sNF +Ocfl+EF9zD/aGakptR/mPvroDX/QR8mTHWMOa/ZDvVtK2fURfVz5vWOuti8Q +nLZ9zBab1MeZpakx9/hAOGF05jA3mwHGH5KtKewLgFaBt7KTigbILW5Sz31p +H/jXByawjhhgSsVlb93NfjB1aPyYZbgBPu++KndJ2g+Okw4e6I4wwKLjFrFs +3H5wPjrEaTHKANWiYwb4hn2hghZBMU40wIKWzLHpTF/4UxVf15xrgAfudcc2 +rvjApfvX5941G6DQ+9F6HNgLDQWdfjMihvg0RWVDX6IXDNnLekWIG+KJwJdL +LwK8gG3p0O7fkob4vd+sqWuLF5ht53RcQzFEJ86kAjqPF7SsoulLqBri6JGt +sfbpnvDKJ5/b1MQQz7Ul2LoWekC/QlB52j5DNNJ+IprT4w5zJf9+aT40xMms +Tpnh87vgs6tVwblqQxy7E9ByK2wX9K6+sGWk1hAfDc9+id6zC2q9Ja9kNRoi +NSDc319jF8SJ69FWXhgi/cDya1LHTuBPCopuGzREq30x5ymUnaAW0MXmz07D +OoEjDfytLuCrWMad60DDYFpndpv9Doh85hmktI2G4jURuUcMdkCav+BLhhMN +pWZCGzYp7IC6WydSXu6kYYVJgk7fbycQVtqyYWUvDVu7XKXE7jpBi9KYsHcE +DXv8Hj4R4HcCVRUZilI+Das+S7JdHdsGM6oZVMY0DeHtBsn6sw7Q+wothWZp +mNyFwz37HaAxeGpH+DwNJ9ekDay3d4BUhs0R6jINx3Wz17fyO4Aqje1uDYcR +pvJEi5++ag8+Nodkm0WNcGaHXvz3B3bQGWC9vtPYCHNutlwV+GsDj4p+f5pP +MsJPQeVX7HqsgGoe/ss22Qh5BQSTuBut4MGnifUFF4xwoenV4GCJFTDIH/Rt +LxlhVvRQeHOkFdzNabxw/aoRbs0Sik+VsYKClDOG1uVG+Jr8eifvIUs4F74h +PafDCD/q5YnRxCyASyipeLLLCL97jEQmsFtAYiVbnVmvEZpGtegNT5pDwtTM +54lBIxSMdgjreWoOJwM7jU0/E64mud4OM4fQPVe+fls0wotieXJvOs3AzUIe +jcjGWJ7JrdFZZAornVx8zRRj5K1PMRhMM4UC/6kBW3ljTIvd+HIx2hQ+J1Yf +c1MxxgyOGyYhLqYQ+mLr/RPaxuiyX8p9K6cpnHeMJj+yMka1DsuoV8EINbu6 +/uiGGKOyop9JVI4JeHyraas7YoxjKt+yA46aAFtkQY5FuDFaB9ZnHHcyAaur +B3SdTxjjD+fI75y8JvDu/aqDYfHGyHa+6nBvPB3GfTQGKrON8UZW6Vv548Yg +dehstUajMXp36mw4HUmD1H/79JKbjPHx8ELqGw8asF+yqvzy1Bi5NMrCaaY0 +GK9aU1rwwhgD/3nx+XPRoIYtIUewwxjdLaFlXY4huGWeOrYwZozpNZvfx9UZ +QE7tCb16Hjpuf7FtOUZCH9Y77q6U5KNj+j9rF1U2fTg1ZKB+jJ+Oa0VmpKY/ +UyFwzaLCZhE6asfeSH/OooL+1gjhQjIdI5s1b9/cToXu4dDZM1p07BTgXfxz +UQ9E1h2sdNhJx5BXY/FXybpQZB4TOb2bjkVx/AzmGl3Qjkk1z9hDx01iYxu/ +TuiA43RFV+9eOt6v/BR/q1YHErvnl3wP0vEAjjQHu+nAYmGsWeRpOj6PmOmT +u6YN/UYZHcVldFSTWhW1naoFgUeL8mzK6VjxwZH0mKIFC+UP/Ccq6Oji03bD +lEcLBOV6f2lV0ZEI53jm0Gaw4yJJP26k47P5tRV7UzZDXWexX0cXHeMVov/9 +/k8TbPkeqUf00tExemd7T4km9Fq/WBAfoOM6qj8Mn9KEuZrvSZ5DdAwyybWM +09IE9Rub730bp2MhMzr3W6YG1PWbRqRM0vF0dpuWXrAG2ArvAM1pOub0Pxi/ +Z60B+84efRs+T8crS7arlX6rw1xjYq7YIh09z79bq9ilDnHL2b41y3QcLWEE +b7uvDvy6pWoeK8T5yFrwlpxTh+uHaub//aPjuwlu1iY/dfgfr6sg/A== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07955255242498241}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07955255242498241}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VG8bB3BRIZF9nzF2yZJtMIz7tmethIosWSIVhVSWFJIiESEpkkRK +zEzKEqIklX5lXypZWoTIEkq95/3rXJ+/zn0953t/nyPrE+Lkz87Gxmazio3t +/8+FDy+eKiQXmaT4hC2bXrcy6bwufsK0Nw5S3KkxoQ0KgCJvfMR7L8H6yi1b +zBp0IWLbnR6O3kKI4zrZKtNgAQJTYpeWehhQuIkxO1rvDB/rHEPmepog1IFM +k633AyuF8fczPe8g4LCUr1JtOCz16F+e7hkGfxVhdZv7CdBsfrvobeEsbPaX +/mi08zJIf6z+7KO2ArcTj7G3U/NB+KDXHU5zDvz8rkH2h1oRXNKyqnV04cK8 +JP6Tzx6XQF/O5sYZfl5MHkji4ku/C7kdZRsiFHmxu9faNb/gLrjxKXstG/Ki +nU1dqXLFXRiMJ/1l9+XFC0bRTqQ3d2EoeJ2x8ANenBb3NM1bfw++Wow+pO7m +w9AGG+exM/dgcTr7ftSNDfjyU7JF8pFySC6KfcMuIYA7VawGqaIVYKu7X1BE +XgD/mY4PMqUrgOupk4uyugCGT0koqclXQMKI4oCdqQDqnlC5wLe5AqLlXn3O +3C+A5d/7knNtKiC4QPyvUo0A1m15a9oeVQHb8yrV7NwFsSv5TU3eYAWIZY6c +y7gmhIX2T1quX6wE8U0PEhaLhVDwb/ny+cxKkGxKjPWoEMJ7B5o/hF6pBPL0 +xqPKzUJYU2z4QO9mJSjaH/au/SqEt4/cSzlbVQk6q1eoIzrC2Fm0eNR9sBK2 +houOarcJo5nqjQ1PFBiwjefrh+wOYcxJPeEpt5EBToXVfX8GhdHz5aWtseoM +cP1vz5uWH8L4Qw3E1KgM8FC7WeMmIoL7WSM6260ZcGBUMz3OWwRDxuV8XwQy +4Kyzjcm7BRGUamxaCilhgCSrXZJ9lSju9dhUmH2XAeVCzr+0eESJ78FLqalg +QPc7z4p0GVF8yca4+uMRAxS2h8tt3yKKHw7qX5R+wYAmh/y1/10RRb36TOeT +XxmwYjXf/tpYDCVXttP3yjMhrTiybMVKDE9MpseMKDFBYS1bkvp2MSyZ9crw +VmWC/bN1phf8xdAz0gzttJiQa05h2qeKoVLt2M1hEyYYoF32y49i6EBVb5TY +zYQwwxteL+LEsWjvcY2yc0ywLeCbs0sRx/GsOY5dKUyQ44xOar8sjuuf9nqz +XWTCf52ulR0l4hh424RhnskEjcPrOT60i6PflqLHmdeZ8LX4WPFPSQlsbXB9 +7c1gQgPvGO2oggSu6rth1cJiQla405tf6hLIm1HqoPyQCZZm6ot/UAKl2R6v +HaxlQuH7YRvOAAmkn5rW4n/GhD3CjpNSTAnUSqnsu9nNBJ2o2tPX6yQw0QAC +m3qZsG5YRVS2RQIjT0SlDPYzofo+Byj1SSC5VieH4yMTRO2q0zb/k8C/pIBX +0l+I+U8r6FraSWLmOdFN0QtMsPixHBk8IokRO2PUZgVYcGJLpuqTCUk0cLVq +iBFiQfkN9X6hBUlMlT2rvFqEBeLO3obVXFJodMwoarU4CyYePfvFoSGFpxdt +zTtILMiISwu/clwKK4Zcl0pVWNA6sFFh4rQUPqhB2s+NLPij29xhkiyFhzsO +7qFuYsG+L/Pao9ekcJh2z5qhzgKavfuMRrMUHidx/HdcmwXDIkrBT3mlsbtr +xsPUiAViIQ0kMTFpdM26KbTFmAX2rbte76dII7fNg4e2dBZURSarbdCRRgWd +Q+3mwILzH6fHd++Sxgb5245rzFnQYHA+9+5eaTya+Pzid8Jz6fK2/4Kk0dzA +qeW1BQs8LVxLi2Kk0bncXCzRigXapbUBPwqJ93Wq+LTYsCCA3UXM7K40cr1T +CEyxZUGe+1RL5gNpDGkdC3K0Y8FaPlklWisxT3hUUIs9C/pDE0cTJqXxj1ze +wcStLNjwSiazZ0Eaowo8wtS2scBCsdpclY2EYlEXTrYTLu/5XvhGkISrVikU +r3ViwWnj7XslDUi4GP/JxdqZBVs8r//UNyPhF3WBnl7CfKe+x7vYk5ASEl7p +70LM03ymOM2bhClO3MeOuLLAd+ydfnkQCTU7e/2mCatyUl68DCfhmVKxyqCd +LHhkW/N97TkSVg5sDtq+iwWxBzljFDJIqLO6qu8xYatUZz6zayQ0EWG7p7ib +BZ1vpzbHVJLwF9k24Qvhq7NGTbm1JLx8e1WyqRsLfETO7Xj0jIRk6uRyFuHp +XfIRs30kVB0dktJ1Z8HDyMOcAqMkvKp5700U4ZN5j3M0pkjo2K33s56wZf06 +VftFEnZ2DiWsEF4/tLN2PzsZv7NEzunvYUHHqlv2Z9eTUTWFznaIcK78z/dF +omR8stz0/Rphb0sIaaKQkaYq6NBGWDkghW1IlYwSr3IUfxKeSupLX9El4x3x +lggRDxaw7ijJSwEZS16vM9MlHPUqjGVgQ8Zltb4kR8JmU42WrjvI6Pu7yN6P +MDc/X0+YBxmNY0dSjxL+T8s9MD2AjHKxPNvjCGfvKFkqP0LGCryceZ6w59H5 +86+iiHnPLrulElbMNpMeP0NG3UtVty54/H9/Lt7jTCNjnLRVRBJhZv+giWIu +GVPclNtPEo78s/E/syIyGiz1lR8mbEo+tte7nIyp0h8lPAlz4dOfMY/IeNCz +mt+acPtegYSrTWRUeT2RuYnw5XhPkepXZHQe/3ubh/CeW2XF3d1kdCyNsPtC +nIfc80X9uSEy8gQPnqon/O2r5QuB72Qs56mxSSdcsS7DTXOejGbNube9CB9T +G/pu/4+MPmY8eRsJmziqxwRxy2D/jSsqP4jv9Sr9ef4tkgxuPbqV/xDhDKaw +VrOyDPIq5wYrEnbr2ts0pCWDXNo2B/qIfHwV/zMqZSWDhaqqVrqE79NsIgy3 +yaBv5HnlASJfEXuyOHe6yeDcaNm9GMIcBZtVLwXL4Oof18ofEPlsexJTe/+4 +DK58u61mRzhtpM3+dZwM/mWOuQwS+SYr+4dwZctg77aTFTNE/mnlV1gnG2SQ +//cS8yuxPxY97StTrTLol3bH1p+wI9tqa693Mpha56L8YQexP07BfTAmg8zJ +tY+eEvtoFSUbe2oNBcneS3v8iX19uaHupsE6Cj7yzrN5Suz3tiLX1mk+CrJd +3XhWhrD762SBveIUvLicstzmwILDMgs3TTdRUC0u/Ns80R/zzLTWJU0Kvrjj +laBPOHLLpslKXQpeMfCJOkr0zZkj3lQ5Ewo+mXGJ/2xN5L25rZV9OwWfp7bI +XSP66mlA/mRzBAUDzeGTB9F/Nn8MBaOjKKixaPrNn+jH9rROqu4pYh61AL8g +oj/7qrlPFZ2joN34cnWgIbEPPOGCZ/IoODVdxGOkR/R7xRZ9qyYKfqp+kKWv +xoJrFiPuf1soqOQlFc9J9LVcX8ypqpcUdJC8sNxB9Lk6O/OFUheF6Ou7aT7K +xL44k/ZwfqVgi1xJgqscCw4uzpxq5ZXFbJ6y0Vwx4vyP7BP9LCiLbPnJ8yKi +RH7H+8s4xGWRaftO6IIwC24NNHebyMni2X0Zp0KI++hD/WW1B1RZvD6ivGMN +Dwu2njHsveEli+xrFm9ErDBBW/C0ZlSlLF6bjTU/Sdx3bMnzT3OqZNH1iOPc +yfdMaOcIcquqlcXePN+5qAEmHJh3OjPzTBYHNfrHg3qYUNSrMBDQL4tRb0Mm +pN8Q92V+a6IzhxxKLV6ndDxmwtIm/g/qLnIorZEQmJ3DhIVrkqd13ORwIWD5 +hlYWE+Y2KCoYesnhrZWCi60ZTJiaNQyy2C+H++YHLk6kMmG41nfBLUYOXc2Z +nrxnmNBm95Av6ZYc5qlL8bIOE/8nBzxheF4OQ/f0xRVZMsG47G5BVpY8Pj75 +VuD8ZwYMUMryLa/Ko+WX4tKcEQZEZpVen8uXxytG5IGiIQY8PF2c51QqjxsE +hAWr+hmgvasgh69OHu/qC7DXtTNg45rMtMRP8uiclx65s4oBol5RpyLUFDBi +RHZXXzwDZgRtvV2bFLBxP3v0IXEGjKZ4u4ZyKuEl6wZFpkgl2Pw4ZjNGVcZL +5r6HV/NUwIQvVxgrVgVvXilUNii/R/z/i7GfbdqIAa6MjmCjMhB8rZRa8UMV +yW47SjgmSkA66f42KlUNZboyPSiHiyFnkyG/UIA6Zn/hnwhQL4I2SVO92XQN +HDCQyOvmKQSadFOaZrcmTt1ekxBUlQ98HIXhe+M2o6G7xKDV6FUgn5Yx3q2k +hVzFWTAgkAPcinuqnJ5r4ceip/6qJZmgQZe4f8xDG/nJKyHSrekQ+kGw2ZZN +B4vyO2fZ/16AH7MpLjY5OniwsLjkkP85sNZsybVR10W9m2rzY4fOQP2s0e9f +7bpYjLQDzhWnIVhNu/+tvx7qdByrS/CKAfqUX+dubio+VqGdG+w4BpYK4g68 +hVR0W1ZTbzsaBqzJZ7J+RVRsfPNbUmJfGCg8DFuoKaai5AG50lDXMFht+yY/ +sIyKCyGh6Zb6YdAUkvizmUXFZ6s3/du/FAomtXPZkc+pWD8gXVMSGwpUp7fD +XyaouG31bt2+jCOgcur88SZ9fYwT5+N6yQyBOqNba+xp+ohrP4ipZYfAtl8N +l7qM9bG2+JnszcgQOB48f/erqT66azdOvzMNgdY93p/47PWx3dxV1OBtMAQa +Um3dvfVRRj7ah3fuEJT+/CQ1l6SP7x/7PE22OQiq/oYNiv36CFnvE2S19sNF +Ocfl+EF9zD/aGakptR/mPvroDX/QR8mTHWMOa/ZDvVtK2fURfVz5vWOuti8Q +nLZ9zBab1MeZpakx9/hAOGF05jA3mwHGH5KtKewLgFaBt7KTigbILW5Sz31p +H/jXByawjhhgSsVlb93NfjB1aPyYZbgBPu++KndJ2g+Okw4e6I4wwKLjFrFs +3H5wPjrEaTHKANWiYwb4hn2hghZBMU40wIKWzLHpTF/4UxVf15xrgAfudcc2 +rvjApfvX5941G6DQ+9F6HNgLDQWdfjMihvg0RWVDX6IXDNnLekWIG+KJwJdL +LwK8gG3p0O7fkob4vd+sqWuLF5ht53RcQzFEJ86kAjqPF7SsoulLqBri6JGt +sfbpnvDKJ5/b1MQQz7Ul2LoWekC/QlB52j5DNNJ+IprT4w5zJf9+aT40xMms +Tpnh87vgs6tVwblqQxy7E9ByK2wX9K6+sGWk1hAfDc9+id6zC2q9Ja9kNRoi +NSDc319jF8SJ69FWXhgi/cDya1LHTuBPCopuGzREq30x5ymUnaAW0MXmz07D +OoEjDfytLuCrWMad60DDYFpndpv9Doh85hmktI2G4jURuUcMdkCav+BLhhMN +pWZCGzYp7IC6WydSXu6kYYVJgk7fbycQVtqyYWUvDVu7XKXE7jpBi9KYsHcE +DXv8Hj4R4HcCVRUZilI+Das+S7JdHdsGM6oZVMY0DeHtBsn6sw7Q+wothWZp +mNyFwz37HaAxeGpH+DwNJ9ekDay3d4BUhs0R6jINx3Wz17fyO4Aqje1uDYcR +pvJEi5++ag8+Nodkm0WNcGaHXvz3B3bQGWC9vtPYCHNutlwV+GsDj4p+f5pP +MsJPQeVX7HqsgGoe/ss22Qh5BQSTuBut4MGnifUFF4xwoenV4GCJFTDIH/Rt +LxlhVvRQeHOkFdzNabxw/aoRbs0Sik+VsYKClDOG1uVG+Jr8eifvIUs4F74h +PafDCD/q5YnRxCyASyipeLLLCL97jEQmsFtAYiVbnVmvEZpGtegNT5pDwtTM +54lBIxSMdgjreWoOJwM7jU0/E64mud4OM4fQPVe+fls0wotieXJvOs3AzUIe +jcjGWJ7JrdFZZAornVx8zRRj5K1PMRhMM4UC/6kBW3ljTIvd+HIx2hQ+J1Yf +c1MxxgyOGyYhLqYQ+mLr/RPaxuiyX8p9K6cpnHeMJj+yMka1DsuoV8EINbu6 +/uiGGKOyop9JVI4JeHyraas7YoxjKt+yA46aAFtkQY5FuDFaB9ZnHHcyAaur +B3SdTxjjD+fI75y8JvDu/aqDYfHGyHa+6nBvPB3GfTQGKrON8UZW6Vv548Yg +dehstUajMXp36mw4HUmD1H/79JKbjPHx8ELqGw8asF+yqvzy1Bi5NMrCaaY0 +GK9aU1rwwhgD/3nx+XPRoIYtIUewwxjdLaFlXY4huGWeOrYwZozpNZvfx9UZ +QE7tCb16Hjpuf7FtOUZCH9Y77q6U5KNj+j9rF1U2fTg1ZKB+jJ+Oa0VmpKY/ +UyFwzaLCZhE6asfeSH/OooL+1gjhQjIdI5s1b9/cToXu4dDZM1p07BTgXfxz +UQ9E1h2sdNhJx5BXY/FXybpQZB4TOb2bjkVx/AzmGl3Qjkk1z9hDx01iYxu/ +TuiA43RFV+9eOt6v/BR/q1YHErvnl3wP0vEAjjQHu+nAYmGsWeRpOj6PmOmT +u6YN/UYZHcVldFSTWhW1naoFgUeL8mzK6VjxwZH0mKIFC+UP/Ccq6Oji03bD +lEcLBOV6f2lV0ZEI53jm0Gaw4yJJP26k47P5tRV7UzZDXWexX0cXHeMVov/9 +/k8TbPkeqUf00tExemd7T4km9Fq/WBAfoOM6qj8Mn9KEuZrvSZ5DdAwyybWM +09IE9Rub730bp2MhMzr3W6YG1PWbRqRM0vF0dpuWXrAG2ArvAM1pOub0Pxi/ +Z60B+84efRs+T8crS7arlX6rw1xjYq7YIh09z79bq9ilDnHL2b41y3QcLWEE +b7uvDvy6pWoeK8T5yFrwlpxTh+uHaub//aPjuwlu1iY/dfgfr6sg/A== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07955255242498241}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07955255242498241}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387185338683*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"217e85df-51b8-484d-b9de-63d25edc80fb"] +}, Open ]], Cell[CellGroupData[{ @@ -7829,14 +7971,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918492800964603`*^9},ExpressionUUID->"9051a5e3-bb9f-d941-bcca-\ -598d0b6835be"], + CellChangeTimes->{3.9918492800964603`*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[BoxData["9.33220071900516`"], "Output", - CellChangeTimes->{3.991334803166374*^9}, - CellLabel-> - "Out[254]=",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[BoxData["9.065569830481648`"], "Output", + CellChangeTimes->{3.991334803166374*^9, 3.994387185385509*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"78f323c2-5475-444b-9e52-9522cc95d758"] }, Open ]], Cell[CellGroupData[{ @@ -7892,191 +8032,203 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918492818821335`*^9},ExpressionUUID->"65a995ff-ff3d-634e-9bad-\ -4a8a16073236"], + CellChangeTimes->{3.9918492818821335`*^9}, + CellLabel->"In[97]:=",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.015132160320536`*^-259\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 255, 233, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133480336051*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.373724125922837`*^-256\\\", \ +\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 97, 13, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994387185487097*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], +In[97]:=",ExpressionUUID->"b90ab0b4-e55a-4887-ac15-e79cd764ef4f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.802481548114291`*^-269\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 234, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803369583*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.106761550436651`*^-265\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 97, 14, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994387185495582*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], +In[97]:=",ExpressionUUID->"d895aead-d991-4b76-b6a0-d0a37db477d3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.803946040382125`*^-279\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 255, 235, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803378134*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.138510656098952`*^-274\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 97, 15, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994387185503128*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], +In[97]:=",ExpressionUUID->"4e90beaf-8826-4552-acbe-bf9e24643629"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 255, 236, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991334803386196*^9}, +during this calculation.\"", 2, 97, 16, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133480336051*^9, 3.994387185510071*^9}, CellLabel-> "During evaluation of \ -In[255]:=",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], +In[97]:=",ExpressionUUID->"da8cf610-ca1c-42ea-8d1a-36c0dec1dae5"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c4le8bAHCpvpWVPc/hmMnOOJzlviniJCSbkJGRrEQaVpGkkpTSJJSU +eU5ZyZeUSsrKaJCKEtIXUZHf+/vrvT7Xc13v87z3c4/rVfQNdwjg5eHhSV7G +w/P/58/3Tx+pnCgwxbb16zQUrU27r0rHmfUlQ6T17B09wXWAEi99pfuy4PPC +74e/BYwhxv527/K+fPhb4jXTKbAZRCalsn71VsJVw6u1JwRcYLDeNnymtwmW +df/uyuUPBEuVsXc/ejuh2LM6e2JVLPzqNT431TsMN+7Nhlj/SoXmjTcLOvKn +YeunLFG5uzlAGqwZ8dVahEsvCgymrfJAPNT79qqNyzFzMHFFLbsIsjZY1tk6 +rUYb+vwuBSiB/gt6jT+EBTE0w0sVXcogt6tkbYyqIAZ0Z+q0BJaBu9A67980 +Qfx3huID+8vg7RHyX14/QfxWa6UpdrEMhsL4mOJcQdxAPvfNeKAMvmz6dJ/q +JoQpI88ZNO1ymJ/KKTuYtxZ9v/qLWBWXw4mChJe8MiLYN/hq0CGzAtiGwaIS +yiK491tMFX9OBax+5OC0TlsExwVKPjRcqYCjH1XfbDETwcH8O1biJRVwSKlt +JDtYBO9dsZQ/2FIBYdel/6rViuA/txhvjH9VwLbLFVpbPEQx9JRAT4BnJQhr +XQrfESCKDaw/DYG+ldBed7QyPFwUPyncHvILqgT2GxeT7COiOPL3/hN2dCWY +y/7d+K5EFLsfWgl0nagEwwtsj/AFUTz8o+ZeW00lSGV/PH72ihja//s52Fuk +CqQ1uUfni8Rw8cEJNRvJKpBtSk3YUS6G/MohTwzkqkB+av2+dc1i2NZB4Uyr +VIGqTYRP3RcxDEV1HapJFRisWKR+NBDHv3ant7XsqAK7aMlP+s/EMWU+W5+v +sArs+b+8z+kSx0GNwpcOxVXgkF/Tv/BWHM07uZvP360C51eeLx9/F8c8tGwV +vFcFO7Ru1LpLSKCrwrVVDx9Xwe5PumeSfSQw4ReGaIxWwTFHa9POnxJ4pz4w +XUWFA7KcdlneZZLo0bTnmaQ6B0rFHOc28EvidHvwIq8WB153epWfUZDEJ4UT +zKcGHFDZFq20zUoSrXT3rBPcyIGmrdf+eXVREvntTd5H+XDA+a7Kx6UbkjhG +vhC4wp8DYwK3H+qWSqKp49fR04EcEGnj7D/dJInU74/as8M44MN+Nmb7TRJX +xLaA8yEOLFrOtr9gSmGmQjJ/9XkOZBYdKFm0lMI3ao8Mvl4k9v+HJ017mxTW +z/S5iV/hgE0Ln9nJACn0lMzJc73BgdyNlCqbU1I4/61V52IZB0xwS87zQSnc +u9X50e/HHNhLy/N+miyNm9OKMzf94AD7utDMlgxpXJOx1/zkNAeUVh1Kaz8n +jbEw9+zVLAdedTtXdN2SxlXLlvlZ/eaAToTA8vft0vjlqH/zL14ufCmKLfpP +VgYVJ5mTAWJceCj4mb5PRQav27T7e0pw4Xy0w8s5bRls5XFt2CrFBQtz7fkF +lEGTF8VkRTku5L8btl4VKIO6D/gK05W44CluOyFXJYOiPlaXgvW4YHCwLulq +vQySTPYUC+lzgW9YXVLxsQyy1JpulRpwoaZsOaj1y2BPxYv4QSoXJLfUZOot +Eeujp2+sYHFhokJNtWq1LEbtsXFOMuXCI+nsGiNRWdy8XpD3F3Bh70jYMF1V +Fk/JFVv1m3PhVZKKocUWWcxzFy/bYcWFm1/OtD5xlMV1vaWWldZciLdb8mR7 +yaL21YuDy7ZwQZs8kGIXKYtrTIplsrZyIb36dK9bjiw6ukq9iHHgwqbvvw+E +fSTer+Ch4eDBhTirbI1/x2VxyEdqk4MnF0rztAfEfspi4h39/K07uCDt6EOr +WS2HX4MWdKneXBivbplbriOHAhciK9p9uaAo6n3T2VgOsa9MsNiPC867552L +UQ5D2H734/250EjWvGe7XQ537+qak9vFhbPJmdEX98th85/urfLBXGh9s15l +PEkO3wiXUrsILxg2d5mekENyz/6YIyFc2DU6q//pihz+e+bhUs9uLlzC08PU +m3K45sjdLftDifhcVM86Xi6HP0UjpyX2cIFu4/FDp1kObwqGeWwM40J44cz1 +pDY5pHaqyncRLvh70r67Rw5bR8rMvMK5IFTRWBb3RQ49TluV74rgwrCEWtgj +QRJyf4IdRnFBKvwhWUqKhLvPGzBLCNu0ur4IppAwXoiZLbKXC/cOnNBaa0DC +Ca+n6a8If+tSebuTSULDN1Oa66O5QNFuOMGxIKHPvijWYcLpg1Njbq4kLM/s +vye1j8hPk/TcOztJaJqyR9GL8MwZZfZSCAkZh6qXXSe8/lv9r23RJPzPWcLt +HWGvTc7FBYdJ2BUypC4ZQ8TzynfXuVQSbkqMjWITbv2ZtpqdScLkDprxAcKL +dkrVly+ScOeatP2FhPWL6wK/55NQ3/yRcRvhQF4nKfM7JLy4wiFmkvBlj8nH +2VwSWlieNxKI5UIH51jMaAMJPwfNxagS/kdIUY3eSsIek3cMOmFGYG1PRgcJ +5cfLU9iEIxq3pwwOkFBW8Z2TM+FCmQlD/U8kdHn34u4OwgNRqZ+OTpAwJmPq +lA/htW0K2b0/Sfj6b9VvL8KbVGs2avCQMSMo7T9XwnHxDtOH1pDxH5/BWFvC +pb3f8l+KklHwnWYGEP6ol+KgRCKji/GwnhZh6XR53n2qZDyluj9QnLDNx/sV +T3TI+L3Of8M88X1JzG07ZU3IqLubktlL2Mrr6n/G5mRMf7egUUZYKPHbEScb +Msa7t51LItyTZyKx15mMeaR9nbb/j09zSlGmDxlj6IPD/4+/3+dO49IQ4rwF +M639xP1orKI8fR5Nxm7lvNQcwtXs2m//HCfjg6rYzOWEE0JXHVY5S0bRhOSh +CiIfLE85CplfIaNBx+e1HoS7Oyb1DleQkR11QvwqkU+XphlNuXVkYt7XTxgT +9pU4vr26hYzOO1VL24h8nHJVjpnuJ+PQspPjI5FcuH8gYpXIJzLK3jweFko4 +/vKDCzqTZPSTqB4cJ/JbYMilLphXHpcSqnPeE/nftazQ5piAPPJNnRu2I5yr +/N+7Akl5fCtQr1JP1Mu6wAyeIQ15vKgvkJNC1NdkWv+ZRUN5/L3P7vkwUX+c +22rKciCP7r2CS3TC5pONFs7b5fGruNmet0T9eu2bTW87KI8d7s1XPwZyQTXH +nDSWIo/3UyXWyAT+v5+cvrsqUx6VDl44Yk30hwML61+ZF8jjpm+3Ky4R/ePc +ES+JmjZ5/NtRpb1yJ9GPC0uKXr+Wx4hSfScxHy4oPZk3nhmSxxsnea6SiP5U +znfWXXdWHh2LqZcpRP9qO/PkWiFZAU0XKGmTrkS9VIlvaF6ngFeTFed6XLjg +3rOzaWiDAtasmrlQ7UzMD+mFT3KWCiifN3E43JELy6/raWSFKSCP0BX+Ajui +v5Re5MQ/VMABXnEdDQsiX3vbFydbFXBldEf3u41csOVZsdm7UwEfLHJDTxL9 +288hrB8+K6BPzd7YIaK/Wx5UTEhcScHehVhtZzpRLwo/b5hpUtDMgvsoSYcL +s1WZrb90KVjWPuMzq0XEw0pzosKQgvyDLwUCNLmQEulDVTKl4Nos6Usm6sR9 +NT9r5d1Gwb7J4NZyRWKeBF6baI6hoHdOB2mUmH/WCzTRQwcpeG7W9ApJlAvt +md1Uw0QKRjVwbGyFudBfsyax4DgFs29wsEiAuF/+aNGUyxQUWCfOVV9J1FO5 +lbFlE3Eek+ysOGL+hs7/SGwVVMSPHzsC3Lo4QI/cJTkiqojvbzkpfHnFgdVj +AyXLpRVxIofndlQ7BwrfNL82VVLEy59iWQefcuB9wzktLlURNzX33HR/yAG7 +FFpfnrcifueWfnK8zQF90STdgxWKWHMjkod9mAM8J2YfXbiniI2KnnKuBzjQ +vjzE/V6dImJcgpdvLAd2zzqk/GhRxPWP0oJ2R3KgoE/lTeCAIno37eu3C+CA +5LXWVMflSqg+Hn3N34YDvzSF32s7KeHiOX6/DikO/Lwim2TgroTPq459iRPn +wMxaVRWatxLqUY8LK4hwYHKaFrIpWAmp3cMO3nwcGK7z++l+WAm9+PaN31+o +gmdb7gulFSphT8PxV8+HqiB3txcMzyphqe4z9zNFVcAsuXP9/HllvHcweKvW ++ir4Icr2cW5Swb/kpIMZypXwKcPHOWqVGu6MzC0uGy0H6++x1p+p6/DczXBF +qmsZjPut3stJUMe9hodZL7PuEP8fUrzHmtZj//62r5c6i0H0hdqp8u8aqHFu +Wn3M6iaQ0srsqVQtTEz0WLH7SgFc0KQJiwVq47HC/Z8vMfPhmayZ0fQZHTQ4 +EEdi810HOqkpU/e1Lq675dsgVHwJhJbnR+9M1sNZWfPmmeEckE9SYLqpbcCD ++9jO8RuyYY2q5z2HJxuwNEQoZvd8JuiwZMpid+ijx17DtRl5GRD1XrSZzWOA +vdsulF7LPQbfpzOcrC8Y4NONkjeGTx6BzbqPc621DfEJq4yWq5wIrv9YOb7S +NURhRxPxbxKJEPLuqaCLviHqBio4WqxOhFMnXiT6GxviS+enI5oDCfB6tHtX +gpkhDubGxNiGJYD/9Y/6XCdDNNOSyBbIjYdkkWXPKfGG2OV8jqW/dAgaphl/ +5toNUbZviLn1bxzktd333d5hiDvPWjp/+RIHRwsNnpV2GaLNYtn8ma44sHbR +vBjQZ4i3TcweCBfHQXetrHHXB0McWLk9tc4xDsaSfkWVzhiiS/AApbF0P0gK +3x/zlzVCirL/K6c9sRCmpT/QEWCEMaJHLhuL7YN9c7K/vYOMsNemNvDBUjQc +alouOxlihKOXwtkO49FwwrXHjS/CCCX73A2LW6Lh1tH9/eYHjNCj8e4dvrho +GH7b0Fd1ygi/x7U8yR7eC84nt/Seu2+EUufi6tIbo4A16d/ttoaK6RsWGzWL +IkCybnN+PT8V+yU7H2zMiYDJYxoRCkJUVAxWkAhMi4CrilP8n0Wp6Mz6Xv0y +JAL+Oh7cGEGioqOOo7y6XgQ8rDtTmapLRSGjZPfBuHAwO96QWeVExV+rfrDc +HuwBCxXprYL5VJxmPX0wnRwCnIkWRf8CKuqqLR8dCQkBlft7f9YWUdHH9VHf +uEMIrGC/vBZUQkUt0YVRPeUQaApP/a+ZQ8Un36aiLzwKBtO6mZwDT6h4rX/S +4Q1fMFAdOoZHx6k4k3CT9qEgENQT0/c3GRuj2+kfsUcEAqCeUbjShm6MPVTB +FLU5f7Cfe5jVwzTGTvN14W8/+MP+sNk7X8yMcey/kYLE+/7Q6unzQcjGGKN0 +2xSL/fwhiEZle/gYo33e0ouwh35Q/N8HuZk0Y3yu0nM88qgvaATQHqoOGCNp +yO1RhpkPnFay/X3krTFK6FqsLdjgAzODvkbD740x/Wve6qeKPtDgnlFy9aMx +FtgLDzF4fcDBfjBHasIYI1lt6mnHvCGOkRKxhscE7Qdtw+5keUGrSIfihKoJ +Wv/ZPRlf7wkBDUFHOZEm2MO75Q/b3Q0m94zFWkSb4I238ezLpm6wnxy6+3WM +CaaRmnxXK7tB+qFwh/mDJniC05OjN+4K5fQYCjPVBIN6UqsbElxh4d6R+uZc +Eww/3aLwsMQFssquznQ2m+Bx/oeRDySdgeRN+eL32AQNSov6TP86QaFQ/puZ +VhO8E+Kyu++zE1TvKWySbDfBJJvi5u1cJ3ineSfTvc8EPxzuXBvs5ATqt2q0 +hsdNcFdSZv3CRUd4eL3b/4cEDc+urJJFw+0wZKPoHSNNw9AdYldXKmwHnl97 +3P7I0lCb7i09tGY7mG9bZbuSQsPaSs+SrkEHeLyMbiyjQUP+7E6fqgwHaPO9 +tsbMlIZxm2XeWYxtgwGVkNLMXTQ029o2Bxx7+PPq3i2JYBoaXvordiTPHkiH +l9/I3U1DNw+tNf2n7GFHz+WcgggaqsZlsx4E28NQysvE6gM0fO9+ky+AYg+j +I4bbh07RcORoc5SVkh3M3Fqa071Pw/AWO7+RJRsYcba8fryGhsIpZnNyH2yg +b8VJq491NGzsb5gNa7KBOh/Zi+cbaaifmdwRmmIDydJG9MWnNFRWzt/ZImAD +wmkhh569peH6lIe8PZQtoBXYwxPAS8fnK8L8nu2wBnkJUnHDCjpmln9PTjC3 +BuFm323Sq+iYLZ6gbLfOGqblp/Ke89MxwvzUKdYPK6h9zbdRX4KOI85K1xxT +rcDKElOW1tExSHNHhCt3M/iplqzJ3UrHyxddVlHULOFAi1eImj0d4/yT9Kb5 +LSEzQPR5pQMdzwjluA//sID6wriM5y50LFovYy3eYAHialZrF3fS0XWipbrZ +xQIeq30W94mh49XIhVB65ibQUFegqF2jo/pK7dBe8Y2ArZ2JlXl0VFWzPfFr +0Rycg1I/mBbQcSr+WobhqDkcuTWR71JMuGns9UyNObxVr1c9XkXHvNzO2Us+ +5nBqvZvm+BM6qpwP/xleaQY/NM5SK6foSAu0O3o6EKGvDS3EpuloOc0KmnZE +aAyb3B49S0eRtF8pIeYIpyqtI6m/ifj8+049i4ygQee5U7ucgRGSLez0YgBf +6z2KzZIM7Frb2Od00hS6AzcLdDMZOCz85M1SOBPq1szKGgEDo6rbjRztmJBf +kr/+vBkDeTaPdD/TYULE90VLV0sGVn7j95OfZIBgLCfprR0Diy/xsD3CGGCZ +qjj3yZeB8/GSX4X30aG64M+H2TQGtj1Ym3ku1wSoG6Pn2CcYuONIZXRqvAlw +P4wLXD/JwNe7PG5k+5pApfx7Y3YWA9/kiket1jSBOxcaT169xMBQHZkP7AfG +cD0jhba5lIG8t5eKlUepcDx67ZkLXQx83NW/JczOCFaLpRVN9DDQJOmYaw/V +CFIreOrN+xjIRw2JdJY3gqOTP0bG3zLQ775PQNGEIcQHdTPNRhjI9vEqPnDS +EKI8L375Os/AztvShwY7DMB9kzIy5JnYZ7VZbDZUHxa7Vws1U5ioKioWedlJ +H64HTL5hKzPRNliX19tUH0ZSa2Ld1Zl4YmevjZGwPkQ9tSuL02eiAm0gTJm7 +AdJtD8lXWzJR72nK6YnlG6DWtWfBMJyJ6Z/+mM4F6cKOr7XP6iOZ2MWTlHwL +dYHnwPULm6KZGMQ+GHVcWhcsL+02dIxjIltE7GR/qw50vlsWuvcIE1fyPde8 +q6kDY746bypymOju8vbKz19aILfnWI1OIxPJwrZrGu9rwKmlXUYnmpj49wGv +uFuOBvBmWVaMPmJi3ZfOEMlYDRi7t7L4+lMmuobyhyxSNaCW5+gF0S4mPqI8 +q9xfvR7csxNjf35momTW5tkVTepwoS7OqIGfhd72NSPxk2ogYOtWISvEwgFj +13uenWqQOGSiHSvMQoWKb7Hu99QgaOW8ip4EC7tXX9/KjVcDY7sY8Xx5FoY5 +xlV+ElaD18NR0ykbCNvYMYQYqiDBF1qx1YWFR6ey/isvVIaCjYcPTLmxcKT7 ++/6D6cqgf/jUxrOeLFy0b5wKClcG26nynr6dLHT2fSZyh6YMqa9nf/mFsjBq +Yulu+0slmM9PMD+QxMJHY8NxvrxKMMA421VUwkLrdf4L3AQKBO0ruGxdysKg +M3EtWUEU+FnKDRgvZ2FcZCD35DYKiCr1zW24x8K00ZID75QpsGU1mfSgkTjP +C/Oof88qQH13kX9XD7H+ZGS4lCoPbKFq7Zg+Frr+EPYSEJCHvs1Pf0q/YSHb +w/Nl3gcyzNR+S/MaYuGNec+0vSfJoJ2nd/frGAunt5auLRklQf2AWUzGBAs3 +Hzg/29hAArb4dtCdYuHPHa8bBc6TYNexfR3Rs8T3lamvsLAgwUxjaq7UPLF/ +6NY/emQSJP/O8av9zcLEfyZ7ts3KgbBhsdaORRaiHjjefCEHV/fUzi4tsbD1 +RQ11Q5Ec/A930sh3 "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8090,150 +8242,159 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJwV13c4le8bAHCpvpWVPc/hmMnOOJzlviniJCSbkJGRrEQaVpGkkpTSJJSU +eU5ZyZeUSsrKaJCKEtIXUZHf+/vrvT7Xc13v87z3c4/rVfQNdwjg5eHhSV7G +w/P/58/3Tx+pnCgwxbb16zQUrU27r0rHmfUlQ6T17B09wXWAEi99pfuy4PPC +74e/BYwhxv527/K+fPhb4jXTKbAZRCalsn71VsJVw6u1JwRcYLDeNnymtwmW +df/uyuUPBEuVsXc/ejuh2LM6e2JVLPzqNT431TsMN+7Nhlj/SoXmjTcLOvKn +YeunLFG5uzlAGqwZ8dVahEsvCgymrfJAPNT79qqNyzFzMHFFLbsIsjZY1tk6 +rUYb+vwuBSiB/gt6jT+EBTE0w0sVXcogt6tkbYyqIAZ0Z+q0BJaBu9A67980 +Qfx3huID+8vg7RHyX14/QfxWa6UpdrEMhsL4mOJcQdxAPvfNeKAMvmz6dJ/q +JoQpI88ZNO1ymJ/KKTuYtxZ9v/qLWBWXw4mChJe8MiLYN/hq0CGzAtiGwaIS +yiK491tMFX9OBax+5OC0TlsExwVKPjRcqYCjH1XfbDETwcH8O1biJRVwSKlt +JDtYBO9dsZQ/2FIBYdel/6rViuA/txhvjH9VwLbLFVpbPEQx9JRAT4BnJQhr +XQrfESCKDaw/DYG+ldBed7QyPFwUPyncHvILqgT2GxeT7COiOPL3/hN2dCWY +y/7d+K5EFLsfWgl0nagEwwtsj/AFUTz8o+ZeW00lSGV/PH72ihja//s52Fuk +CqQ1uUfni8Rw8cEJNRvJKpBtSk3YUS6G/MohTwzkqkB+av2+dc1i2NZB4Uyr +VIGqTYRP3RcxDEV1HapJFRisWKR+NBDHv3ant7XsqAK7aMlP+s/EMWU+W5+v +sArs+b+8z+kSx0GNwpcOxVXgkF/Tv/BWHM07uZvP360C51eeLx9/F8c8tGwV +vFcFO7Ru1LpLSKCrwrVVDx9Xwe5PumeSfSQw4ReGaIxWwTFHa9POnxJ4pz4w +XUWFA7KcdlneZZLo0bTnmaQ6B0rFHOc28EvidHvwIq8WB153epWfUZDEJ4UT +zKcGHFDZFq20zUoSrXT3rBPcyIGmrdf+eXVREvntTd5H+XDA+a7Kx6UbkjhG +vhC4wp8DYwK3H+qWSqKp49fR04EcEGnj7D/dJInU74/as8M44MN+Nmb7TRJX +xLaA8yEOLFrOtr9gSmGmQjJ/9XkOZBYdKFm0lMI3ao8Mvl4k9v+HJ017mxTW +z/S5iV/hgE0Ln9nJACn0lMzJc73BgdyNlCqbU1I4/61V52IZB0xwS87zQSnc +u9X50e/HHNhLy/N+miyNm9OKMzf94AD7utDMlgxpXJOx1/zkNAeUVh1Kaz8n +jbEw9+zVLAdedTtXdN2SxlXLlvlZ/eaAToTA8vft0vjlqH/zL14ufCmKLfpP +VgYVJ5mTAWJceCj4mb5PRQav27T7e0pw4Xy0w8s5bRls5XFt2CrFBQtz7fkF +lEGTF8VkRTku5L8btl4VKIO6D/gK05W44CluOyFXJYOiPlaXgvW4YHCwLulq +vQySTPYUC+lzgW9YXVLxsQyy1JpulRpwoaZsOaj1y2BPxYv4QSoXJLfUZOot +Eeujp2+sYHFhokJNtWq1LEbtsXFOMuXCI+nsGiNRWdy8XpD3F3Bh70jYMF1V +Fk/JFVv1m3PhVZKKocUWWcxzFy/bYcWFm1/OtD5xlMV1vaWWldZciLdb8mR7 +yaL21YuDy7ZwQZs8kGIXKYtrTIplsrZyIb36dK9bjiw6ukq9iHHgwqbvvw+E +fSTer+Ch4eDBhTirbI1/x2VxyEdqk4MnF0rztAfEfspi4h39/K07uCDt6EOr +WS2HX4MWdKneXBivbplbriOHAhciK9p9uaAo6n3T2VgOsa9MsNiPC867552L +UQ5D2H734/250EjWvGe7XQ537+qak9vFhbPJmdEX98th85/urfLBXGh9s15l +PEkO3wiXUrsILxg2d5mekENyz/6YIyFc2DU6q//pihz+e+bhUs9uLlzC08PU +m3K45sjdLftDifhcVM86Xi6HP0UjpyX2cIFu4/FDp1kObwqGeWwM40J44cz1 +pDY5pHaqyncRLvh70r67Rw5bR8rMvMK5IFTRWBb3RQ49TluV74rgwrCEWtgj +QRJyf4IdRnFBKvwhWUqKhLvPGzBLCNu0ur4IppAwXoiZLbKXC/cOnNBaa0DC +Ca+n6a8If+tSebuTSULDN1Oa66O5QNFuOMGxIKHPvijWYcLpg1Njbq4kLM/s +vye1j8hPk/TcOztJaJqyR9GL8MwZZfZSCAkZh6qXXSe8/lv9r23RJPzPWcLt +HWGvTc7FBYdJ2BUypC4ZQ8TzynfXuVQSbkqMjWITbv2ZtpqdScLkDprxAcKL +dkrVly+ScOeatP2FhPWL6wK/55NQ3/yRcRvhQF4nKfM7JLy4wiFmkvBlj8nH +2VwSWlieNxKI5UIH51jMaAMJPwfNxagS/kdIUY3eSsIek3cMOmFGYG1PRgcJ +5cfLU9iEIxq3pwwOkFBW8Z2TM+FCmQlD/U8kdHn34u4OwgNRqZ+OTpAwJmPq +lA/htW0K2b0/Sfj6b9VvL8KbVGs2avCQMSMo7T9XwnHxDtOH1pDxH5/BWFvC +pb3f8l+KklHwnWYGEP6ol+KgRCKji/GwnhZh6XR53n2qZDyluj9QnLDNx/sV +T3TI+L3Of8M88X1JzG07ZU3IqLubktlL2Mrr6n/G5mRMf7egUUZYKPHbEScb +Msa7t51LItyTZyKx15mMeaR9nbb/j09zSlGmDxlj6IPD/4+/3+dO49IQ4rwF +M639xP1orKI8fR5Nxm7lvNQcwtXs2m//HCfjg6rYzOWEE0JXHVY5S0bRhOSh +CiIfLE85CplfIaNBx+e1HoS7Oyb1DleQkR11QvwqkU+XphlNuXVkYt7XTxgT +9pU4vr26hYzOO1VL24h8nHJVjpnuJ+PQspPjI5FcuH8gYpXIJzLK3jweFko4 +/vKDCzqTZPSTqB4cJ/JbYMilLphXHpcSqnPeE/nftazQ5piAPPJNnRu2I5yr +/N+7Akl5fCtQr1JP1Mu6wAyeIQ15vKgvkJNC1NdkWv+ZRUN5/L3P7vkwUX+c +22rKciCP7r2CS3TC5pONFs7b5fGruNmet0T9eu2bTW87KI8d7s1XPwZyQTXH +nDSWIo/3UyXWyAT+v5+cvrsqUx6VDl44Yk30hwML61+ZF8jjpm+3Ky4R/ePc +ES+JmjZ5/NtRpb1yJ9GPC0uKXr+Wx4hSfScxHy4oPZk3nhmSxxsnea6SiP5U +znfWXXdWHh2LqZcpRP9qO/PkWiFZAU0XKGmTrkS9VIlvaF6ngFeTFed6XLjg +3rOzaWiDAtasmrlQ7UzMD+mFT3KWCiifN3E43JELy6/raWSFKSCP0BX+Ajui +v5Re5MQ/VMABXnEdDQsiX3vbFydbFXBldEf3u41csOVZsdm7UwEfLHJDTxL9 +288hrB8+K6BPzd7YIaK/Wx5UTEhcScHehVhtZzpRLwo/b5hpUtDMgvsoSYcL +s1WZrb90KVjWPuMzq0XEw0pzosKQgvyDLwUCNLmQEulDVTKl4Nos6Usm6sR9 +NT9r5d1Gwb7J4NZyRWKeBF6baI6hoHdOB2mUmH/WCzTRQwcpeG7W9ApJlAvt +md1Uw0QKRjVwbGyFudBfsyax4DgFs29wsEiAuF/+aNGUyxQUWCfOVV9J1FO5 +lbFlE3Eek+ysOGL+hs7/SGwVVMSPHzsC3Lo4QI/cJTkiqojvbzkpfHnFgdVj +AyXLpRVxIofndlQ7BwrfNL82VVLEy59iWQefcuB9wzktLlURNzX33HR/yAG7 +FFpfnrcifueWfnK8zQF90STdgxWKWHMjkod9mAM8J2YfXbiniI2KnnKuBzjQ +vjzE/V6dImJcgpdvLAd2zzqk/GhRxPWP0oJ2R3KgoE/lTeCAIno37eu3C+CA +5LXWVMflSqg+Hn3N34YDvzSF32s7KeHiOX6/DikO/Lwim2TgroTPq459iRPn +wMxaVRWatxLqUY8LK4hwYHKaFrIpWAmp3cMO3nwcGK7z++l+WAm9+PaN31+o +gmdb7gulFSphT8PxV8+HqiB3txcMzyphqe4z9zNFVcAsuXP9/HllvHcweKvW ++ir4Icr2cW5Swb/kpIMZypXwKcPHOWqVGu6MzC0uGy0H6++x1p+p6/DczXBF +qmsZjPut3stJUMe9hodZL7PuEP8fUrzHmtZj//62r5c6i0H0hdqp8u8aqHFu +Wn3M6iaQ0srsqVQtTEz0WLH7SgFc0KQJiwVq47HC/Z8vMfPhmayZ0fQZHTQ4 +EEdi810HOqkpU/e1Lq675dsgVHwJhJbnR+9M1sNZWfPmmeEckE9SYLqpbcCD ++9jO8RuyYY2q5z2HJxuwNEQoZvd8JuiwZMpid+ijx17DtRl5GRD1XrSZzWOA +vdsulF7LPQbfpzOcrC8Y4NONkjeGTx6BzbqPc621DfEJq4yWq5wIrv9YOb7S +NURhRxPxbxKJEPLuqaCLviHqBio4WqxOhFMnXiT6GxviS+enI5oDCfB6tHtX +gpkhDubGxNiGJYD/9Y/6XCdDNNOSyBbIjYdkkWXPKfGG2OV8jqW/dAgaphl/ +5toNUbZviLn1bxzktd333d5hiDvPWjp/+RIHRwsNnpV2GaLNYtn8ma44sHbR +vBjQZ4i3TcweCBfHQXetrHHXB0McWLk9tc4xDsaSfkWVzhiiS/AApbF0P0gK +3x/zlzVCirL/K6c9sRCmpT/QEWCEMaJHLhuL7YN9c7K/vYOMsNemNvDBUjQc +alouOxlihKOXwtkO49FwwrXHjS/CCCX73A2LW6Lh1tH9/eYHjNCj8e4dvrho +GH7b0Fd1ygi/x7U8yR7eC84nt/Seu2+EUufi6tIbo4A16d/ttoaK6RsWGzWL +IkCybnN+PT8V+yU7H2zMiYDJYxoRCkJUVAxWkAhMi4CrilP8n0Wp6Mz6Xv0y +JAL+Oh7cGEGioqOOo7y6XgQ8rDtTmapLRSGjZPfBuHAwO96QWeVExV+rfrDc +HuwBCxXprYL5VJxmPX0wnRwCnIkWRf8CKuqqLR8dCQkBlft7f9YWUdHH9VHf +uEMIrGC/vBZUQkUt0YVRPeUQaApP/a+ZQ8Un36aiLzwKBtO6mZwDT6h4rX/S +4Q1fMFAdOoZHx6k4k3CT9qEgENQT0/c3GRuj2+kfsUcEAqCeUbjShm6MPVTB +FLU5f7Cfe5jVwzTGTvN14W8/+MP+sNk7X8yMcey/kYLE+/7Q6unzQcjGGKN0 +2xSL/fwhiEZle/gYo33e0ouwh35Q/N8HuZk0Y3yu0nM88qgvaATQHqoOGCNp +yO1RhpkPnFay/X3krTFK6FqsLdjgAzODvkbD740x/Wve6qeKPtDgnlFy9aMx +FtgLDzF4fcDBfjBHasIYI1lt6mnHvCGOkRKxhscE7Qdtw+5keUGrSIfihKoJ +Wv/ZPRlf7wkBDUFHOZEm2MO75Q/b3Q0m94zFWkSb4I238ezLpm6wnxy6+3WM +CaaRmnxXK7tB+qFwh/mDJniC05OjN+4K5fQYCjPVBIN6UqsbElxh4d6R+uZc +Eww/3aLwsMQFssquznQ2m+Bx/oeRDySdgeRN+eL32AQNSov6TP86QaFQ/puZ +VhO8E+Kyu++zE1TvKWySbDfBJJvi5u1cJ3ineSfTvc8EPxzuXBvs5ATqt2q0 +hsdNcFdSZv3CRUd4eL3b/4cEDc+urJJFw+0wZKPoHSNNw9AdYldXKmwHnl97 +3P7I0lCb7i09tGY7mG9bZbuSQsPaSs+SrkEHeLyMbiyjQUP+7E6fqgwHaPO9 +tsbMlIZxm2XeWYxtgwGVkNLMXTQ029o2Bxx7+PPq3i2JYBoaXvordiTPHkiH +l9/I3U1DNw+tNf2n7GFHz+WcgggaqsZlsx4E28NQysvE6gM0fO9+ky+AYg+j +I4bbh07RcORoc5SVkh3M3Fqa071Pw/AWO7+RJRsYcba8fryGhsIpZnNyH2yg +b8VJq491NGzsb5gNa7KBOh/Zi+cbaaifmdwRmmIDydJG9MWnNFRWzt/ZImAD +wmkhh569peH6lIe8PZQtoBXYwxPAS8fnK8L8nu2wBnkJUnHDCjpmln9PTjC3 +BuFm323Sq+iYLZ6gbLfOGqblp/Ke89MxwvzUKdYPK6h9zbdRX4KOI85K1xxT +rcDKElOW1tExSHNHhCt3M/iplqzJ3UrHyxddVlHULOFAi1eImj0d4/yT9Kb5 +LSEzQPR5pQMdzwjluA//sID6wriM5y50LFovYy3eYAHialZrF3fS0XWipbrZ +xQIeq30W94mh49XIhVB65ibQUFegqF2jo/pK7dBe8Y2ArZ2JlXl0VFWzPfFr +0Rycg1I/mBbQcSr+WobhqDkcuTWR71JMuGns9UyNObxVr1c9XkXHvNzO2Us+ +5nBqvZvm+BM6qpwP/xleaQY/NM5SK6foSAu0O3o6EKGvDS3EpuloOc0KmnZE +aAyb3B49S0eRtF8pIeYIpyqtI6m/ifj8+049i4ygQee5U7ucgRGSLez0YgBf +6z2KzZIM7Frb2Od00hS6AzcLdDMZOCz85M1SOBPq1szKGgEDo6rbjRztmJBf +kr/+vBkDeTaPdD/TYULE90VLV0sGVn7j95OfZIBgLCfprR0Diy/xsD3CGGCZ +qjj3yZeB8/GSX4X30aG64M+H2TQGtj1Ym3ku1wSoG6Pn2CcYuONIZXRqvAlw +P4wLXD/JwNe7PG5k+5pApfx7Y3YWA9/kiket1jSBOxcaT169xMBQHZkP7AfG +cD0jhba5lIG8t5eKlUepcDx67ZkLXQx83NW/JczOCFaLpRVN9DDQJOmYaw/V +CFIreOrN+xjIRw2JdJY3gqOTP0bG3zLQ775PQNGEIcQHdTPNRhjI9vEqPnDS +EKI8L375Os/AztvShwY7DMB9kzIy5JnYZ7VZbDZUHxa7Vws1U5ioKioWedlJ +H64HTL5hKzPRNliX19tUH0ZSa2Ld1Zl4YmevjZGwPkQ9tSuL02eiAm0gTJm7 +AdJtD8lXWzJR72nK6YnlG6DWtWfBMJyJ6Z/+mM4F6cKOr7XP6iOZ2MWTlHwL +dYHnwPULm6KZGMQ+GHVcWhcsL+02dIxjIltE7GR/qw50vlsWuvcIE1fyPde8 +q6kDY746bypymOju8vbKz19aILfnWI1OIxPJwrZrGu9rwKmlXUYnmpj49wGv +uFuOBvBmWVaMPmJi3ZfOEMlYDRi7t7L4+lMmuobyhyxSNaCW5+gF0S4mPqI8 +q9xfvR7csxNjf35momTW5tkVTepwoS7OqIGfhd72NSPxk2ogYOtWISvEwgFj +13uenWqQOGSiHSvMQoWKb7Hu99QgaOW8ip4EC7tXX9/KjVcDY7sY8Xx5FoY5 +xlV+ElaD18NR0ykbCNvYMYQYqiDBF1qx1YWFR6ey/isvVIaCjYcPTLmxcKT7 ++/6D6cqgf/jUxrOeLFy0b5wKClcG26nynr6dLHT2fSZyh6YMqa9nf/mFsjBq +Yulu+0slmM9PMD+QxMJHY8NxvrxKMMA421VUwkLrdf4L3AQKBO0ruGxdysKg +M3EtWUEU+FnKDRgvZ2FcZCD35DYKiCr1zW24x8K00ZID75QpsGU1mfSgkTjP +C/Oof88qQH13kX9XD7H+ZGS4lCoPbKFq7Zg+Frr+EPYSEJCHvs1Pf0q/YSHb +w/Nl3gcyzNR+S/MaYuGNec+0vSfJoJ2nd/frGAunt5auLRklQf2AWUzGBAs3 +Hzg/29hAArb4dtCdYuHPHa8bBc6TYNexfR3Rs8T3lamvsLAgwUxjaq7UPLF/ +6NY/emQSJP/O8av9zcLEfyZ7ts3KgbBhsdaORRaiHjjefCEHV/fUzi4tsbD1 +RQ11Q5Ec/A930sh3 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08385280122506508}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8245,19 +8406,19 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08385280122506508}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8271,149 +8432,158 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k0VW8XB3BRKTLPl3vNksxycd1rb0QuMmasTKVBpjIUKlIUSkglFElK -ynRPyVAJlQaROVJIfo00mJLynvevsz5rnbPWeZ699/c8RzEgzCWQm4uLa/cS -Lq7/X2fePm1RSSs2cy3zqGm/s8Gs+5J0jHl/IrxRnBFqa1QFlGgPkO7PgrO9 -ET65jYYQ7XSjj6e/CPYLMHKiGq1AZEIq63dfNejYVMUbNrrBuwaHsKm+JrhN -7SzyeRAI1iqfh370dcLsUKaZdEMU/O4zOvu9bxTkm+lTAhVJ0Gx5rfhV0S9I -q02Q9NpyDuTe1Y4HaP6FL0Gq9boehSAe7HuD15IHHwnX0OQpVyFLz7rewW0F -Vr2t4FD6SuF1jm7jD2EBrNGLQ9entyC3q0woWlUAG69G2Lu+vgXegqt9500E -8C5zIZP96Ra8OUr9x71NAM1uF9dKryyH4VA+pvhtAew91sZvblMOH9eP1dC9 -BNF7/YjTnZZymPt+viLushD+WVmuLHOnAtKK49u5ZUTweGj53GJDJdiu2y0q -oSyCPYcZnAvNlbCixcVttZYIbo+ScdJ+VgnH3qsO2pmLoDK1da1NXyUcVHox -nr1bBE/sN7cx+1EJoYXS/9TqRPDqsm8rDFSqwDm/StNusyiW7rvwnJ5cBcKa -eWFbA0Xxp15+psbJKnhZf6w6LEwUKaevSMpkVYHtoIdx9lFRXOW/1Hv8YhVY -UP5ZDpWJolbJoZvmt6tgXY7t5rAFUfz33rFhfrQKpLLfp5y5KIau+n2T4Yxq -kF57+9hciRjet3+o5AfVQGlKjt9aKYbMew9v2a6vBtr3NVGrm8XQN5TvmYhD -Najah/vVfxTDMRNbwV3+1WCw9C/9vYE47moN9Ft3vBocIyXH9J+JI7dy2C52 -ezU48X98e75LHHmaXdqKuqrBpaj29cIbcTxH0zg8S/aNe8eW9seT4phRUNWU -NVwNWzWv1HlLSODpp4c7Mn5Uw54xncxEPwlkJhp33BDlwPFNbLPOGQlsnBja -6ObMAQrxksK9RBK1d/7s2uXGgXKxTbN6/JLYZCjUFu3Fgd5On8pMeUmcHXKS -TvTngIpzpJKzjSSmSguJue/lQNPGguUdFyTxD/Gi6NdpDvy1nn7ZxpTCvxKr -/i57yoGMktiyv9ZSKHuJWLXrBfn8cq4TWs5SeDXs0ZmWdg7YP+IzPxUohQqm -7itDejmQa6nAsU+XQtF7zLy49xwwRrvzz99J4cHiUzdOL3AgwuSy79NEaXyc -F3vwnAYBtoWCU3YnpTGqay6bokWAEu/BEy/PSmPxne3/XdAhoKPbvarrujR+ -tONipq4jQDt8Fc/bl9Io/Oh4tZ4ZAR9L9pf8pMjgqb/P7POdCHgg8IERpSKD -2rnrLbtdCDgX6dI+qyWDqYs7D/K6EWBloTW3gDLIf02m1teLgKKhUTbvThmM -fZ4S0udPwBZxh2+yHBkcYge5ju0lwCCu/silBhkc+DjX2BFBAN+ouqTiYxk8 -dLU67m4UAbUVPKD2WgY3pR0bjIkhQNKuNkN3UQZ5kwW8WhLI9z+iss7KjoKz -0SVTB9IJuPYxs/XJJgoWCXqkUzIIOOy4uMXWh4JDnsFHajIJ0KIOJDnupaCj -g+D+99kEpN493ed1noIJ10/V8OQRsH5yPjb0PXk/8WrjjhICYmyyNR5+pWB6 -+SvNmmsElF/WGhCboeDFpG+FPKUESG/yM6ldIYuBz3/ZnS4j4OvdR7M82rLI -lfH50d5KAhRFfa+5G8li2EjojoIqAtz3zLmXoiyOhK690lpNQCN17R0HV1nk -t5+dErhNwJnEjMgLB0h3vBLbXktA6+Aala9HZFHp2LLK0DoCFtY1d5mlyeIi -88tkZD0BO/6b1h+7KIv+C8U+kfcIYNhv/qHdLItWyC8GDwkYlVALbRGQQysH -sTtLWwmQCntAlZKSQ6Pbt3iekbZv9WzbrSCHkZ//LU17SsCd2DRNIQM5DLs9 -q8b1nNyfd98/e3nKoYDmt2U1bWT9jVNzb/rLYX/9W0HvlwRMZSrbLgbJ4e4E -we450j7r3UuLD8lhtkzy+TUdBOiX1u+cLJJDjYpyRc9OAnZyu0lZ3JTDojP+ -a1+Tzt888Tj7thxeZ+vOu3URsFxQUY3RKodV6qVfLLoJMN1Z13PylRy25eQK -c0iHN7omvRuQw5Yd9EVaDwED+5LHjn2Tw0fL+Mw+kxZ6IZ/dNyOHkylnMti9 -ZD1Vay01uKjo2BFUVUy6vO9LUbsoFacYRIBDHwHvdZNclOSomOubOJ1PWjqV -xh2lSt5v5b75P9JHmM7+FGMqKm7uKQ7rJ8DG59JPIwsqftXsyK8mLZjw5aib -PRUvBstXfifdc9lYIsKdip+yHYfXvCbX15xUkuFHxZVDE9o+pLd96DQqD6Ki -mdGpi6dIa/AqPH0eSUUPxwatu6R/qId4fzpMRc0UoZEh0ndt674sT6Gi7qJs -7T/S8cG8h1TOUPFLwoEaygAB1umbBC0uUjEp896QHmmByssFvteoaLQjSWs9 -6e5XE7qHqqj4bmzPdWfSeb9Mm3LrqRhTJOjkTTpAIsX17iMq5o+sUvMhvcao -d6ynnYoLGbyaW0l/91SO/vWaXC/78jYP0jWx4bwiY1Rsdzj80p704fx7OdoT -VLyVsj6URdrqPp+G/RwVs1Pz1q8hvWrYo343Nw3VkjVdhUl3Lblqf3wVDYU3 -FeX9JNeTq/xzqFiShsdDSuU7SPtZQViTAg3rvkwOXye9eudJrmENGjonq44c -JD1x4nXm33U0/JH5R9GeNHFDTVkWaJj/T+WqJOm4FxGEMZuGTHf34DdkPSwm -Gq3cXWkoVW8Vc5H0SmHBvoitNGSN32jzIt2ht3lX5k4arlSDPSKkfaKmU1/E -0VD238iJfWT9Vc9byH1OomG20J5Vcn3/n+/Tt3gzaLioIj3cSPZT7MKaDoti -Gn4NGTu8QPafOW2/v185DbmOp248Q3oFtvw8dJeGK4IDIlRJnz3qI1H7gobX -8PFzU7Kft1wtK+ntpWGI04cljWT/Kz2ZM5oapuGe3eRhhXQl3xlvnWlyPekp -I7rkvLzIfFJwlSqPOqIcgzftZF5wxPWaV8ujiM3m06akvXv8m4b15LG9Y9Lj -HDmPH6UXxmSt5fHcB0sjM3J+eQp1NbJC5XG7HifA4xkBzx4eqq84II85/S+9 -ssj5z3j/zL4tUR57Ga0vWsl8oK0ODFtxXh5Pvv5PS/0JmS/lF4jDD+TRU1Ff -tKqZnK++l38nWuVR4sPjvr4mAhy4lm7w7ZTHHfzz9fNk/mxzCX0NH+Qx8Ujy -+LpGsl/jFOMTlimgk/bh77EN5DzLz1wxX6uAHFYgy5EgYJqT0fpbh/SlxjJj -Drm/Nmu/Va1TwNJL3i40Mi+T9vrRlcwUsLWl2+FtBdk/zc9auZ0VcKrmrb4e -mb8tOwu+NUcrIGWTOUXlMgHsBRPRg3EKqHa0rPNVAQEvM7rp6xIUMN7701Dc -JQJe165MKE5RQNn54l8tZP5P8EeKJuUrIO+TCru158g8qLQxsm5SQMPOY1q2 -qQQEz/1IaBVQRL4nQe/ehJH7sXeH5LioIsoNyCn+DCHr/XmgjEdaEbX+Fbjw -BBNwdbC510xJESsnmOkyuwh4e/+s5m26It6fWXJdwo8AxyST/su+iohK+4Mc -HMm8FD2iE1eliLNmoYmd5PebK226JeeOIt5uusAKUiffnyfI+069IrYYHDb4 -p0rAnmmXpB+PFDFr9crXFEUCivtVBncOKGLb3miH1VLk97KgNXkTjxIqXLix -mM5NwO+1wm+13JTQMdcj5QZ5npi5SDli4K2EbO3LdYNdHJgSUlUx8VXCkZcD -2StfcWDil0nQ+t1KOBR1bOPm5xwYrd82431ICXkGc0X6HnDgmV2N4ImrSlj8 -o21a7zp5PtnjA6PTSviAzdOeFM0BZtnNwnPnlFEyz4aiyceBQYWyAqs8ZXyV -YfanbzkHYs+VXpoqUMYjA7MxR3g4UHOkJN+lVBkHXfM92xaqQd+zMEewQRld -Ovg6bSarYc2y7IzkEWV8/l9LeAd53pP0jUuI1lTBARsRpm5eNfwQtfVzb1LB -T9+ZUpeVq2HspJ/7Pl41fP7p64pk3ipgT+5nf6CvxoGSe9rP2irg67YVEUS8 -OiZZXt8caXqL/J+Q4j7etAbLliiN/ii+AaJtaumVkxrIbbJvL4VxHeROVDjR -6ZqorBcYqHntKuSsNREW26mF9x4IrtZzuwLPKOaGvzK1MeV3tCdb4zIw5Joy -dHp1cEhyavTu54sgyFMU6Z+oiy92iAQHUHKBdkSe6aWmh/dcl2cpuJ6Dlapb -7rg80cOZIcNNkgtZoM2Sqdi/VR+Xd5hHvdLPgH1vRZttuQww+U6l5wGBNJj8 -ddKNnWOAFWF1L/ZXJsMGnce5bK11KBBQwZafSYT7v0z/zL5ch9fxRN/N2cMQ -qqk/8CrQEHWbhHDDvhiImqXM++4yxJpGgst8SwwcbOKhTAQZ4kScZZytdQyk -efZ48YUb4jhbOf4kJQauHzvw2iLWELl15T89bz4Ao2/u93PSDZGx6VaCnswB -cD9l13e2xhDjN0eV+rdHA2tie7fXSjp+3LjU/NrOSJCs31DUwE/HvZ3XVFLc -I2HiuEa4vCAdnV3aRfdbRcIlxe/8H0TpmM/PPxOtHAn/NsVZhsvRMUFCUHP5 -cAQ8qM+sTtaho/U2hbktmyPAPOV+BseNjr9Nal0feu8DKxXpjQJFdPRvTG0T -jQsH4tsjxe3FdKysW1QQCgkHlZqImboSOho6DGVL+IbDUtv2gl1ldIznrXmC -luHQFJb8s5mgY3Z36AOhVeFgVj91PvYJHd2uKzlKQhjQXV6N/veVji06khuv -5IWAekLqgSYjIxxbG/Bo+GQQNJheXWbPMMJIK73JvIggcJp9kNXDNMJ56weP -9ngHwYHQ6ZsfzY2Q82vberZ6ELRu8RsRtDdCD/03UvMtu2GXCd12s58RZly4 -ULKaezeU/hyRnTphhNflLJ95pO0EjUCTB6oDRqi+JaXcunc7nFZymD/6xggV -Vm0+qtq8HabeBRiOvjXCVcJG+WKV2+G+98myS++NsJm9KoKauh1cnN6dl/pm -hB2tP4vHzbZDjGlS+EouY9zw39Zi67Jt0CrySvGbqjGqfDmjM58eAIH3dx0j -9hrjmjAdYdUEP5gI+UyWyRj3VG0bZ4b5wQFq8J7eaGMU042e3ObjB6kHw1zm -4owxM/9YyDumH1QyohWYycY4UmTWLDHtCwt3jjY05xrjFonRBdcfPpBVcWmq -s9kYx49cz49Z3AIPCru3/5AwwdDLOTefhnjBsL2ib7S0CXYNOvXscPUCrt8h -Xn8oJpjE186QM/ECC2deh2UKJrixcnBv+1IveLyEYSSjYYKnjxamul30hBcB -BSvNzUwweNpic0enBwyoBJVn7DDBpwGbNLkd3WHq+uKsTo0JDlgXTB074Qrj -7taFKbUm6DFZUcUf5Qr9S0/ZvK83wS+WEg+v+LtCvR/lwrlGE4zNu1LEa+oK -idKGjL9PTfAxpXPpxQkXED4RdPDZGxOUt839+9PTBTR39nAFcjNwZlkB1y8T -Z6BJyJXeX8pA1+RV1mnqziDcHOAszcvADvsRtoGUM/yifb/8nJ+BeoTaluop -J6jr5bPUl2BgxL1Yzz2VTmBjjUmLqxk4XR+sf1/DCbaplq3M3cjA8izjd2vc -HCD2kU+QmhMDAyaOy8QbOEBGoOjzahcG8qjqjk2LOEDD1ZiTzz0Y6HegoGZD -+0YQV7MR+uvPQC/XanqM3UZ4rPZB3C+agZ3+V1/Ns+1BQ11eQa2AgRWh3w3v -+NgCtnYmVF9mYC1zwJDX3BbcdyWPmBUzkHsy1yVa2RaOXv9W5FHKQO0Svpjy -j2x4o96gmsJhoPfPxNyjkWxIX+O19usTBj4xctx3I9MGfmicoVd/Z+BE96iR -8Yg19L9AK7FfDPy2MC3d22oNjaETrpHTDOTLEj+QVmkN6dXsvfR5BopzPfRn -JliDBoPrZh2PKYpMdd4nFKwhgB2i2CxpiolJt29MBFpB984Nq7qZpth3Xo/N -vWQ91K+cphiCKTbpqjYHfbGEorKiNefMTbEicYPPxx5LCJ/8a+1pbYrcCl0V -SmWWILCfOPLG0RRrqoZaM90twTpZcXYswBRDiywtbKss4G7xn5HpE6YY8Oe3 -640oc6BbRs7appni4XHeu1MB5nB75OuqwlOmeGj5sJuzkzlU094a2WaZogLP -GS7zteZwM6fx1KU8U9Qufu87N4JQeDLJZEO5Ke7vb+6vdUFIiRTKzOkyxfSC -DTPMRDNYIXai5FuPKWqp2/mq+ptBchVXg0U/+fxn/nhtNINjEz/Gv74xxZhz -ZeFF/1hweFc303zcFAeW63ILHmLBvi0XPn6aM8WodXcdB+OZ4L1eGU1pTKz4 -XGaZns+Av90rBJsVmEhlFnYOHWRAYeDEoK0yE0/zvRx03MqA8eTa/d7qTDz0 -9FtfLo0B+546VsToM1GIXT/QWmQCqQ4HaXetmWgWGX9oV5Ux1Hn2LKwLY2Jt -voVm3zgdtn6qe9awl4lDc8wzRs/pwBVbmLM+kok0HuH4OxV0sM7bs25TDBNX -rLAMEYqhQ+fQkuCIo0xMV/T11xCgw+cA7cGq80wcnnH/8JlhCLIhx2u1G5l4 -bUsvq63MANIXdximNTEx6eb6fX5nDYA7y7rqvxYmPrItkOePN4DPd5aVFj5l -Yoyt46kSFwOo4zqWI9rFRL2xUedf8/rgnZ2wf+YDE/8uHyx65agPOfUxhvf5 -WdihOTEvwKcHqxy8qiiCLNQtM+DfOaMLCcPGWvuFWWgZfW6me1QXdi2bU9GV -YKEJdZPQZL0uGDlGixfRWJi85IICJUwXekf3/UrSY+G5HHZwVLUOSPAFV230 -YOFlgZUi5ge0oNjyUOx3Lxa+UaDqjzprgf6hdMszW1gosXVwe9VaLXD4XtnT -78/CoT8bjV+/04Tk3unf24JZGHHiuw7bVhPmiuItYo+wcOJ404P41WthwPRM -V0kZaS1m2p8la2BXVHE+u5yFt+497loyog4z5bcDv1ayMO/CNTvdRnUQVeqf -1bvDwi92WdLL4tXBbgVV7l4jC89zHL1T/q2Ghu6S7V09LOS6kFfYu3Q12Are -1YruZ6GmTEWc3bga9G94OiM9yMKPL8/2fHiiBlN1X074DLMQ7T19U9PUQOuy -7q1Pn1lo9eCNVbq4GjQMmEef/MbCe1oXMjVmVcFW3BV0vrPQ0FhP7MtrVdhx -POpV5DQLl1vskewvUIWpxuRcqTmyHuJlG5YeVYXE+fPb6uZZuPrbEsFNO1RB -eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe +1:eJwV13c4le8bAHCpvpWVPc/hmMnOOJzlviniJCSbkJGRrEQaVpGkkpTSJJSU +eU5ZyZeUSsrKaJCKEtIXUZHf+/vrvT7Xc13v87z3c4/rVfQNdwjg5eHhSV7G +w/P/58/3Tx+pnCgwxbb16zQUrU27r0rHmfUlQ6T17B09wXWAEi99pfuy4PPC +74e/BYwhxv527/K+fPhb4jXTKbAZRCalsn71VsJVw6u1JwRcYLDeNnymtwmW +df/uyuUPBEuVsXc/ejuh2LM6e2JVLPzqNT431TsMN+7Nhlj/SoXmjTcLOvKn +YeunLFG5uzlAGqwZ8dVahEsvCgymrfJAPNT79qqNyzFzMHFFLbsIsjZY1tk6 +rUYb+vwuBSiB/gt6jT+EBTE0w0sVXcogt6tkbYyqIAZ0Z+q0BJaBu9A67980 +Qfx3huID+8vg7RHyX14/QfxWa6UpdrEMhsL4mOJcQdxAPvfNeKAMvmz6dJ/q +JoQpI88ZNO1ymJ/KKTuYtxZ9v/qLWBWXw4mChJe8MiLYN/hq0CGzAtiGwaIS +yiK491tMFX9OBax+5OC0TlsExwVKPjRcqYCjH1XfbDETwcH8O1biJRVwSKlt +JDtYBO9dsZQ/2FIBYdel/6rViuA/txhvjH9VwLbLFVpbPEQx9JRAT4BnJQhr +XQrfESCKDaw/DYG+ldBed7QyPFwUPyncHvILqgT2GxeT7COiOPL3/hN2dCWY +y/7d+K5EFLsfWgl0nagEwwtsj/AFUTz8o+ZeW00lSGV/PH72ihja//s52Fuk +CqQ1uUfni8Rw8cEJNRvJKpBtSk3YUS6G/MohTwzkqkB+av2+dc1i2NZB4Uyr +VIGqTYRP3RcxDEV1HapJFRisWKR+NBDHv3ant7XsqAK7aMlP+s/EMWU+W5+v +sArs+b+8z+kSx0GNwpcOxVXgkF/Tv/BWHM07uZvP360C51eeLx9/F8c8tGwV +vFcFO7Ru1LpLSKCrwrVVDx9Xwe5PumeSfSQw4ReGaIxWwTFHa9POnxJ4pz4w +XUWFA7KcdlneZZLo0bTnmaQ6B0rFHOc28EvidHvwIq8WB153epWfUZDEJ4UT +zKcGHFDZFq20zUoSrXT3rBPcyIGmrdf+eXVREvntTd5H+XDA+a7Kx6UbkjhG +vhC4wp8DYwK3H+qWSqKp49fR04EcEGnj7D/dJInU74/as8M44MN+Nmb7TRJX +xLaA8yEOLFrOtr9gSmGmQjJ/9XkOZBYdKFm0lMI3ao8Mvl4k9v+HJ017mxTW +z/S5iV/hgE0Ln9nJACn0lMzJc73BgdyNlCqbU1I4/61V52IZB0xwS87zQSnc +u9X50e/HHNhLy/N+miyNm9OKMzf94AD7utDMlgxpXJOx1/zkNAeUVh1Kaz8n +jbEw9+zVLAdedTtXdN2SxlXLlvlZ/eaAToTA8vft0vjlqH/zL14ufCmKLfpP +VgYVJ5mTAWJceCj4mb5PRQav27T7e0pw4Xy0w8s5bRls5XFt2CrFBQtz7fkF +lEGTF8VkRTku5L8btl4VKIO6D/gK05W44CluOyFXJYOiPlaXgvW4YHCwLulq +vQySTPYUC+lzgW9YXVLxsQyy1JpulRpwoaZsOaj1y2BPxYv4QSoXJLfUZOot +Eeujp2+sYHFhokJNtWq1LEbtsXFOMuXCI+nsGiNRWdy8XpD3F3Bh70jYMF1V +Fk/JFVv1m3PhVZKKocUWWcxzFy/bYcWFm1/OtD5xlMV1vaWWldZciLdb8mR7 +yaL21YuDy7ZwQZs8kGIXKYtrTIplsrZyIb36dK9bjiw6ukq9iHHgwqbvvw+E +fSTer+Ch4eDBhTirbI1/x2VxyEdqk4MnF0rztAfEfspi4h39/K07uCDt6EOr +WS2HX4MWdKneXBivbplbriOHAhciK9p9uaAo6n3T2VgOsa9MsNiPC867552L +UQ5D2H734/250EjWvGe7XQ537+qak9vFhbPJmdEX98th85/urfLBXGh9s15l +PEkO3wiXUrsILxg2d5mekENyz/6YIyFc2DU6q//pihz+e+bhUs9uLlzC08PU +m3K45sjdLftDifhcVM86Xi6HP0UjpyX2cIFu4/FDp1kObwqGeWwM40J44cz1 +pDY5pHaqyncRLvh70r67Rw5bR8rMvMK5IFTRWBb3RQ49TluV74rgwrCEWtgj +QRJyf4IdRnFBKvwhWUqKhLvPGzBLCNu0ur4IppAwXoiZLbKXC/cOnNBaa0DC +Ca+n6a8If+tSebuTSULDN1Oa66O5QNFuOMGxIKHPvijWYcLpg1Njbq4kLM/s +vye1j8hPk/TcOztJaJqyR9GL8MwZZfZSCAkZh6qXXSe8/lv9r23RJPzPWcLt +HWGvTc7FBYdJ2BUypC4ZQ8TzynfXuVQSbkqMjWITbv2ZtpqdScLkDprxAcKL +dkrVly+ScOeatP2FhPWL6wK/55NQ3/yRcRvhQF4nKfM7JLy4wiFmkvBlj8nH +2VwSWlieNxKI5UIH51jMaAMJPwfNxagS/kdIUY3eSsIek3cMOmFGYG1PRgcJ +5cfLU9iEIxq3pwwOkFBW8Z2TM+FCmQlD/U8kdHn34u4OwgNRqZ+OTpAwJmPq +lA/htW0K2b0/Sfj6b9VvL8KbVGs2avCQMSMo7T9XwnHxDtOH1pDxH5/BWFvC +pb3f8l+KklHwnWYGEP6ol+KgRCKji/GwnhZh6XR53n2qZDyluj9QnLDNx/sV +T3TI+L3Of8M88X1JzG07ZU3IqLubktlL2Mrr6n/G5mRMf7egUUZYKPHbEScb +Msa7t51LItyTZyKx15mMeaR9nbb/j09zSlGmDxlj6IPD/4+/3+dO49IQ4rwF +M639xP1orKI8fR5Nxm7lvNQcwtXs2m//HCfjg6rYzOWEE0JXHVY5S0bRhOSh +CiIfLE85CplfIaNBx+e1HoS7Oyb1DleQkR11QvwqkU+XphlNuXVkYt7XTxgT +9pU4vr26hYzOO1VL24h8nHJVjpnuJ+PQspPjI5FcuH8gYpXIJzLK3jweFko4 +/vKDCzqTZPSTqB4cJ/JbYMilLphXHpcSqnPeE/nftazQ5piAPPJNnRu2I5yr +/N+7Akl5fCtQr1JP1Mu6wAyeIQ15vKgvkJNC1NdkWv+ZRUN5/L3P7vkwUX+c +22rKciCP7r2CS3TC5pONFs7b5fGruNmet0T9eu2bTW87KI8d7s1XPwZyQTXH +nDSWIo/3UyXWyAT+v5+cvrsqUx6VDl44Yk30hwML61+ZF8jjpm+3Ky4R/ePc +ES+JmjZ5/NtRpb1yJ9GPC0uKXr+Wx4hSfScxHy4oPZk3nhmSxxsnea6SiP5U +znfWXXdWHh2LqZcpRP9qO/PkWiFZAU0XKGmTrkS9VIlvaF6ngFeTFed6XLjg +3rOzaWiDAtasmrlQ7UzMD+mFT3KWCiifN3E43JELy6/raWSFKSCP0BX+Ajui +v5Re5MQ/VMABXnEdDQsiX3vbFydbFXBldEf3u41csOVZsdm7UwEfLHJDTxL9 +288hrB8+K6BPzd7YIaK/Wx5UTEhcScHehVhtZzpRLwo/b5hpUtDMgvsoSYcL +s1WZrb90KVjWPuMzq0XEw0pzosKQgvyDLwUCNLmQEulDVTKl4Nos6Usm6sR9 +NT9r5d1Gwb7J4NZyRWKeBF6baI6hoHdOB2mUmH/WCzTRQwcpeG7W9ApJlAvt +md1Uw0QKRjVwbGyFudBfsyax4DgFs29wsEiAuF/+aNGUyxQUWCfOVV9J1FO5 +lbFlE3Eek+ysOGL+hs7/SGwVVMSPHzsC3Lo4QI/cJTkiqojvbzkpfHnFgdVj +AyXLpRVxIofndlQ7BwrfNL82VVLEy59iWQefcuB9wzktLlURNzX33HR/yAG7 +FFpfnrcifueWfnK8zQF90STdgxWKWHMjkod9mAM8J2YfXbiniI2KnnKuBzjQ +vjzE/V6dImJcgpdvLAd2zzqk/GhRxPWP0oJ2R3KgoE/lTeCAIno37eu3C+CA +5LXWVMflSqg+Hn3N34YDvzSF32s7KeHiOX6/DikO/Lwim2TgroTPq459iRPn +wMxaVRWatxLqUY8LK4hwYHKaFrIpWAmp3cMO3nwcGK7z++l+WAm9+PaN31+o +gmdb7gulFSphT8PxV8+HqiB3txcMzyphqe4z9zNFVcAsuXP9/HllvHcweKvW ++ir4Icr2cW5Swb/kpIMZypXwKcPHOWqVGu6MzC0uGy0H6++x1p+p6/DczXBF +qmsZjPut3stJUMe9hodZL7PuEP8fUrzHmtZj//62r5c6i0H0hdqp8u8aqHFu +Wn3M6iaQ0srsqVQtTEz0WLH7SgFc0KQJiwVq47HC/Z8vMfPhmayZ0fQZHTQ4 +EEdi810HOqkpU/e1Lq675dsgVHwJhJbnR+9M1sNZWfPmmeEckE9SYLqpbcCD ++9jO8RuyYY2q5z2HJxuwNEQoZvd8JuiwZMpid+ijx17DtRl5GRD1XrSZzWOA +vdsulF7LPQbfpzOcrC8Y4NONkjeGTx6BzbqPc621DfEJq4yWq5wIrv9YOb7S +NURhRxPxbxKJEPLuqaCLviHqBio4WqxOhFMnXiT6GxviS+enI5oDCfB6tHtX +gpkhDubGxNiGJYD/9Y/6XCdDNNOSyBbIjYdkkWXPKfGG2OV8jqW/dAgaphl/ +5toNUbZviLn1bxzktd333d5hiDvPWjp/+RIHRwsNnpV2GaLNYtn8ma44sHbR +vBjQZ4i3TcweCBfHQXetrHHXB0McWLk9tc4xDsaSfkWVzhiiS/AApbF0P0gK +3x/zlzVCirL/K6c9sRCmpT/QEWCEMaJHLhuL7YN9c7K/vYOMsNemNvDBUjQc +alouOxlihKOXwtkO49FwwrXHjS/CCCX73A2LW6Lh1tH9/eYHjNCj8e4dvrho +GH7b0Fd1ygi/x7U8yR7eC84nt/Seu2+EUufi6tIbo4A16d/ttoaK6RsWGzWL +IkCybnN+PT8V+yU7H2zMiYDJYxoRCkJUVAxWkAhMi4CrilP8n0Wp6Mz6Xv0y +JAL+Oh7cGEGioqOOo7y6XgQ8rDtTmapLRSGjZPfBuHAwO96QWeVExV+rfrDc +HuwBCxXprYL5VJxmPX0wnRwCnIkWRf8CKuqqLR8dCQkBlft7f9YWUdHH9VHf +uEMIrGC/vBZUQkUt0YVRPeUQaApP/a+ZQ8Un36aiLzwKBtO6mZwDT6h4rX/S +4Q1fMFAdOoZHx6k4k3CT9qEgENQT0/c3GRuj2+kfsUcEAqCeUbjShm6MPVTB +FLU5f7Cfe5jVwzTGTvN14W8/+MP+sNk7X8yMcey/kYLE+/7Q6unzQcjGGKN0 +2xSL/fwhiEZle/gYo33e0ouwh35Q/N8HuZk0Y3yu0nM88qgvaATQHqoOGCNp +yO1RhpkPnFay/X3krTFK6FqsLdjgAzODvkbD740x/Wve6qeKPtDgnlFy9aMx +FtgLDzF4fcDBfjBHasIYI1lt6mnHvCGOkRKxhscE7Qdtw+5keUGrSIfihKoJ +Wv/ZPRlf7wkBDUFHOZEm2MO75Q/b3Q0m94zFWkSb4I238ezLpm6wnxy6+3WM +CaaRmnxXK7tB+qFwh/mDJniC05OjN+4K5fQYCjPVBIN6UqsbElxh4d6R+uZc +Eww/3aLwsMQFssquznQ2m+Bx/oeRDySdgeRN+eL32AQNSov6TP86QaFQ/puZ +VhO8E+Kyu++zE1TvKWySbDfBJJvi5u1cJ3ineSfTvc8EPxzuXBvs5ATqt2q0 +hsdNcFdSZv3CRUd4eL3b/4cEDc+urJJFw+0wZKPoHSNNw9AdYldXKmwHnl97 +3P7I0lCb7i09tGY7mG9bZbuSQsPaSs+SrkEHeLyMbiyjQUP+7E6fqgwHaPO9 +tsbMlIZxm2XeWYxtgwGVkNLMXTQ029o2Bxx7+PPq3i2JYBoaXvordiTPHkiH +l9/I3U1DNw+tNf2n7GFHz+WcgggaqsZlsx4E28NQysvE6gM0fO9+ky+AYg+j +I4bbh07RcORoc5SVkh3M3Fqa071Pw/AWO7+RJRsYcba8fryGhsIpZnNyH2yg +b8VJq491NGzsb5gNa7KBOh/Zi+cbaaifmdwRmmIDydJG9MWnNFRWzt/ZImAD +wmkhh569peH6lIe8PZQtoBXYwxPAS8fnK8L8nu2wBnkJUnHDCjpmln9PTjC3 +BuFm323Sq+iYLZ6gbLfOGqblp/Ke89MxwvzUKdYPK6h9zbdRX4KOI85K1xxT +rcDKElOW1tExSHNHhCt3M/iplqzJ3UrHyxddVlHULOFAi1eImj0d4/yT9Kb5 +LSEzQPR5pQMdzwjluA//sID6wriM5y50LFovYy3eYAHialZrF3fS0XWipbrZ +xQIeq30W94mh49XIhVB65ibQUFegqF2jo/pK7dBe8Y2ArZ2JlXl0VFWzPfFr +0Rycg1I/mBbQcSr+WobhqDkcuTWR71JMuGns9UyNObxVr1c9XkXHvNzO2Us+ +5nBqvZvm+BM6qpwP/xleaQY/NM5SK6foSAu0O3o6EKGvDS3EpuloOc0KmnZE +aAyb3B49S0eRtF8pIeYIpyqtI6m/ifj8+049i4ygQee5U7ucgRGSLez0YgBf +6z2KzZIM7Frb2Od00hS6AzcLdDMZOCz85M1SOBPq1szKGgEDo6rbjRztmJBf +kr/+vBkDeTaPdD/TYULE90VLV0sGVn7j95OfZIBgLCfprR0Diy/xsD3CGGCZ +qjj3yZeB8/GSX4X30aG64M+H2TQGtj1Ym3ku1wSoG6Pn2CcYuONIZXRqvAlw +P4wLXD/JwNe7PG5k+5pApfx7Y3YWA9/kiket1jSBOxcaT169xMBQHZkP7AfG +cD0jhba5lIG8t5eKlUepcDx67ZkLXQx83NW/JczOCFaLpRVN9DDQJOmYaw/V +CFIreOrN+xjIRw2JdJY3gqOTP0bG3zLQ775PQNGEIcQHdTPNRhjI9vEqPnDS +EKI8L375Os/AztvShwY7DMB9kzIy5JnYZ7VZbDZUHxa7Vws1U5ioKioWedlJ +H64HTL5hKzPRNliX19tUH0ZSa2Ld1Zl4YmevjZGwPkQ9tSuL02eiAm0gTJm7 +AdJtD8lXWzJR72nK6YnlG6DWtWfBMJyJ6Z/+mM4F6cKOr7XP6iOZ2MWTlHwL +dYHnwPULm6KZGMQ+GHVcWhcsL+02dIxjIltE7GR/qw50vlsWuvcIE1fyPde8 +q6kDY746bypymOju8vbKz19aILfnWI1OIxPJwrZrGu9rwKmlXUYnmpj49wGv +uFuOBvBmWVaMPmJi3ZfOEMlYDRi7t7L4+lMmuobyhyxSNaCW5+gF0S4mPqI8 +q9xfvR7csxNjf35momTW5tkVTepwoS7OqIGfhd72NSPxk2ogYOtWISvEwgFj +13uenWqQOGSiHSvMQoWKb7Hu99QgaOW8ip4EC7tXX9/KjVcDY7sY8Xx5FoY5 +xlV+ElaD18NR0ykbCNvYMYQYqiDBF1qx1YWFR6ey/isvVIaCjYcPTLmxcKT7 ++/6D6cqgf/jUxrOeLFy0b5wKClcG26nynr6dLHT2fSZyh6YMqa9nf/mFsjBq +Yulu+0slmM9PMD+QxMJHY8NxvrxKMMA421VUwkLrdf4L3AQKBO0ruGxdysKg +M3EtWUEU+FnKDRgvZ2FcZCD35DYKiCr1zW24x8K00ZID75QpsGU1mfSgkTjP +C/Oof88qQH13kX9XD7H+ZGS4lCoPbKFq7Zg+Frr+EPYSEJCHvs1Pf0q/YSHb +w/Nl3gcyzNR+S/MaYuGNec+0vSfJoJ2nd/frGAunt5auLRklQf2AWUzGBAs3 +Hzg/29hAArb4dtCdYuHPHa8bBc6TYNexfR3Rs8T3lamvsLAgwUxjaq7UPLF/ +6NY/emQSJP/O8av9zcLEfyZ7ts3KgbBhsdaORRaiHjjefCEHV/fUzi4tsbD1 +RQ11Q5Ec/A930sh3 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.08145702771151381}}, + "PlotRange" -> {{0, 30}, {0., 0.08385280122506508}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8424,6 +8594,7 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8451,7 +8622,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.08145702771151381}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08385280122506508}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8459,9 +8631,8 @@ eF2p5ta/LKwLKTR/wlaFSyF104uLLFwq87Zuq5Yq/A+fgSTe Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991335257344549*^9}, - CellLabel-> - "Out[255]=",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] + CellChangeTimes->{3.991335257344549*^9, 3.994388028720188*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"6ad1df3c-6c3a-4dd0-9af4-7242e31b0cf8"] }, Open ]], Cell[CellGroupData[{ @@ -8513,67 +8684,75 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel-> - "In[256]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], + CellLabel->"In[98]:=",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.39639867535232`*^-188\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 237, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257395241*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.822142488175291`*^-157\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 98, 17, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994388028873358*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], +In[98]:=",ExpressionUUID->"0dd122dc-3d7e-44c8-a637-0dd5e9669708"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.342395211692676`*^-192\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 256, - 238, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574052296`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.5915905017385416`*^-159\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 98, 18, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994388028882152*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], +In[98]:=",ExpressionUUID->"e15eec4e-7dd9-420f-8b50-c4d6918c8296"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1800384500947783`*^-195\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 256, 239, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335257413231*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.238448198883763`*^-162\\\", \ +RowBox[{\\\"\ +692388265304082962155241704502629852543932276498796563311324806235240\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8063384494795553340756316369516704730972160000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 98, 19, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.994388028889903*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], +In[98]:=",ExpressionUUID->"0fb44e68-c36b-49d7-8cf1-2d4b2a0b0271"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 256, 240, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352574212303`*^9}, +during this calculation.\"", 2, 98, 20, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335257395241*^9, 3.9943880288971767`*^9}, CellLabel-> "During evaluation of \ -In[256]:=",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], +In[98]:=",ExpressionUUID->"19f8d85c-19e8-483a-bf0f-4161504bd269"], -Cell[BoxData["9.332200719005158`"], "Output", - CellChangeTimes->{3.991335263670042*^9}, - CellLabel-> - "Out[256]=",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[BoxData["9.065361439946585`"], "Output", + CellChangeTimes->{3.991335263670042*^9, 3.994388105086164*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"7f3843c1-47c0-4606-ab74-c5e8eb2e023c"] }, Open ]], Cell[CellGroupData[{ @@ -8640,65 +8819,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849285445259*^9, - 3.991849289419262*^9}},ExpressionUUID->"6f0ad284-4db3-da47-b8dc-\ -45830eedfe9c"], + CellChangeTimes->{{3.991849285445259*^9, 3.991849289419262*^9}}, + CellLabel->"In[99]:=",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 241, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263710146*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.866194157179425`*^-196\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 99, 21, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943881051677513`*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], +In[99]:=",ExpressionUUID->"a8c40b13-b56c-43d5-b863-d5e98e12370d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 257, 242, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637201557`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0374749655842245`*^-200\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 22, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943881051788797`*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], +In[99]:=",ExpressionUUID->"7a543109-1aa2-4101-91ba-a8b5960854f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 257, 243, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335263728153*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.767643736709548`*^-205\\\", \ +\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ +4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 99, + 23, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.9943881051890373`*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], +In[99]:=",ExpressionUUID->"15c8cc39-f277-4763-ab68-2d33bca9c5ad"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 257, 244, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352637361546`*^9}, +during this calculation.\"", 2, 99, 24, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335263710146*^9, 3.994388105197014*^9}, CellLabel-> "During evaluation of \ -In[257]:=",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], +In[99]:=",ExpressionUUID->"46e47fbc-fe92-4ed1-84c0-355da35d1855"], -Cell[BoxData["0.00046079539931050297`"], "Output", - CellChangeTimes->{3.991335268779545*^9}, - CellLabel-> - "Out[257]=",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[BoxData["1.0790045173317475`"], "Output", + CellChangeTimes->{3.991335268779545*^9, 3.9943881146145477`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"b0f4339b-1701-4d58-91f2-bf6b56961500"] }, Open ]], Cell[CellGroupData[{ @@ -8719,8 +8903,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8765,65 +8948,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849293744112*^9, - 3.9918492959939384`*^9}},ExpressionUUID->"b2dda819-6f34-5c49-bc62-\ -303d815946e5"], + CellChangeTimes->{{3.991849293744112*^9, 3.9918492959939384`*^9}}, + CellLabel-> + "In[100]:=",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 245, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268812542*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.866194157179425`*^-196\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 100, 25, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994388114659852*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], +In[100]:=",ExpressionUUID->"f416d52a-203e-476c-afc1-1aefb6a82744"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 258, 246, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268822542*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0374749655842245`*^-200\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 26, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994388114667225*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], +In[100]:=",ExpressionUUID->"0b7f02ae-bfad-49d1-a406-06eb546e5b6b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 258, 247, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335268831545*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.767643736709548`*^-205\\\", \ +\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ +4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 100, + 27, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.994388114674506*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], +In[100]:=",ExpressionUUID->"e21f4868-c10c-45f8-9ebe-126a5fa0f9a6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 258, 248, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352688395576`*^9}, +during this calculation.\"", 2, 100, 28, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335268812542*^9, 3.9943881146823177`*^9}, CellLabel-> "During evaluation of \ -In[258]:=",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], +In[100]:=",ExpressionUUID->"4b57ea90-4d3f-494e-ac7f-7dff787bcea8"], -Cell[BoxData["5.104103620353258`"], "Output", - CellChangeTimes->{3.991335272704685*^9}, +Cell[BoxData["24.949424985750298`"], "Output", + CellChangeTimes->{3.991335272704685*^9, 3.994388124086203*^9}, CellLabel-> - "Out[258]=",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] + "Out[100]=",ExpressionUUID->"7da7022f-5ded-4f22-9c8a-4e5eef4fb072"] }, Open ]], Cell[CellGroupData[{ @@ -8844,8 +9034,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8890,65 +9079,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918492993108063`*^9, - 3.991849303274454*^9}},ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-\ -1a175f609f7d"], + CellChangeTimes->{{3.9918492993108063`*^9, 3.991849303274454*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2914107257951473`*^-244\\\", \ -\\\"69237837345426015193166198943959583654468513190741907865600000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 249, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727386665`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.866194157179425`*^-196\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 101, 29, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994388124179557*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], +In[101]:=",ExpressionUUID->"ae0047a8-4725-4f62-b24c-179a1ea17285"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.101217087106948`*^-252\\\", \ -\\\"75400004869168930545357990649971986599716210864717937665638400000000000000\ -\\\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 259, 250, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727476673`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0374749655842245`*^-200\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 30, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994388124190836*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], +In[101]:=",ExpressionUUID->"f4a9c1af-8ba1-4cb5-a831-7be201e22842"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9939692660683834`*^-259\\\", \ -\\\"87162405628759283710433837191367616509271939759613935941477990400000000000\ -000\\\"]\\) is too small to represent as a normalized machine number; \ -precision may be lost.\"", 2, 259, 251, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727556705`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.767643736709548`*^-205\\\", \ +\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ +4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 31, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994388124200478*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], +In[101]:=",ExpressionUUID->"691da633-304c-418d-b531-4f99dd506652"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 259, 252, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352727636833`*^9}, +during this calculation.\"", 2, 101, 32, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913352727386665`*^9, 3.994388124208456*^9}, CellLabel-> "During evaluation of \ -In[259]:=",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], +In[101]:=",ExpressionUUID->"4db98ed0-de7c-4967-afd8-6de1498c3e4e"], -Cell[BoxData["18.832858301324727`"], "Output", - CellChangeTimes->{3.991335275154251*^9}, +Cell[BoxData["4.584678189521518`"], "Output", + CellChangeTimes->{3.991335275154251*^9, 3.994388130196813*^9}, CellLabel-> - "Out[259]=",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] + "Out[101]=",ExpressionUUID->"b9ab7f84-2d3c-4e24-bddc-6223104e91f2"] }, Open ]], Cell[CellGroupData[{ @@ -8957,22 +9153,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918493065908413`*^9, - 3.9918493103344364`*^9}},ExpressionUUID->"69dd09d9-152e-3e4d-9517-\ -4de4791db2f4"], - -Cell[BoxData["0.00004699917922538678`"], "Output", - CellChangeTimes->{3.991335275186266*^9}, + CellChangeTimes->{{3.9918493065908413`*^9, 3.9918493103344364`*^9}}, CellLabel-> - "Out[260]=",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] + "In[102]:=",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], + +Cell[BoxData["0.10088777963726236`"], "Output", + CellChangeTimes->{3.991335275186266*^9, 3.9943881302449417`*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"23700193-a040-4f3f-9b7a-7905f3d46cc0"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849314761318*^9, 3.9918493173333225`*^9}, - 3.991924798063732*^9},ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-\ -749729cd7104"], + 3.991924798063732*^9}, + CellLabel-> + "In[103]:=",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ @@ -8996,12 +9193,12 @@ Cell[BoxData[ RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellChangeTimes->{{3.99312673568116*^9, 3.993126746164192*^9}}, CellLabel-> - "In[262]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], + "In[104]:=",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[BoxData["5.744985073726737`"], "Output", - CellChangeTimes->{3.9913352752142563`*^9}, +Cell[BoxData["4.386848601294253`"], "Output", + CellChangeTimes->{3.9913352752142563`*^9, 3.994388130276888*^9}, CellLabel-> - "Out[262]=",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] + "Out[104]=",ExpressionUUID->"4ed041b0-8cef-4a27-89ec-68be768d1dff"] }, Open ]], Cell[CellGroupData[{ @@ -9011,12 +9208,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[264]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], + "In[105]:=",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[BoxData["1.564995573098557`"], "Output", - CellChangeTimes->{3.9913352752482567`*^9}, +Cell[BoxData["3.414492673847112`"], "Output", + CellChangeTimes->{3.9913352752482567`*^9, 3.994388130294849*^9}, CellLabel-> - "Out[264]=",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] + "Out[105]=",ExpressionUUID->"5e4a6de7-c0a5-4f3d-939b-d1cd14b85ae5"] }, Open ]], Cell[CellGroupData[{ @@ -9026,12 +9223,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[267]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], + "In[106]:=",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[BoxData["8.990876207899632`"], "Output", - CellChangeTimes->{3.9913352753089123`*^9}, +Cell[BoxData["14.978862410395678`"], "Output", + CellChangeTimes->{3.9913352753089123`*^9, 3.994388130319965*^9}, CellLabel-> - "Out[267]=",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] + "Out[106]=",ExpressionUUID->"2b47b334-eacb-416a-9535-90948a73478a"] }, Open ]], Cell[CellGroupData[{ @@ -9221,12 +9418,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[268]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], + "In[107]:=",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[BoxData["0.07167004636648908`"], "Output", - CellChangeTimes->{3.9913352753341656`*^9}, +Cell[BoxData["0.009082549502837468`"], "Output", + CellChangeTimes->{3.9913352753341656`*^9, 3.994388130345886*^9}, CellLabel-> - "Out[268]=",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] + "Out[107]=",ExpressionUUID->"5e1d48c4-a66c-4b1a-b2d1-a42e4f6a73a0"] }, Open ]], Cell[CellGroupData[{ @@ -9240,12 +9437,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[269]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], + "In[108]:=",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[BoxData["3.3103666491187544`"], "Output", - CellChangeTimes->{3.9913352754296722`*^9}, +Cell[BoxData["9.299102909196485`"], "Output", + CellChangeTimes->{3.9913352754296722`*^9, 3.9943881304705677`*^9}, CellLabel-> - "Out[269]=",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] + "Out[108]=",ExpressionUUID->"07e37f5e-42fd-4e15-8f03-6854b858d636"] }, Open ]], Cell[CellGroupData[{ @@ -9437,12 +9634,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[270]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], + "In[109]:=",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[BoxData["0.012832691268660865`"], "Output", - CellChangeTimes->{3.9913352754426765`*^9}, +Cell[BoxData["0.06576458502530892`"], "Output", + CellChangeTimes->{3.9913352754426765`*^9, 3.994388130491057*^9}, CellLabel-> - "Out[270]=",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] + "Out[109]=",ExpressionUUID->"c6cd5781-4d6a-4846-829c-ca0b4d191d04"] }, Open ]], Cell[CellGroupData[{ @@ -9456,12 +9653,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[271]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], + "In[110]:=",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[BoxData["7.823229443917166`"], "Output", - CellChangeTimes->{3.991335275540678*^9}, +Cell[BoxData["3.4558023741002604`"], "Output", + CellChangeTimes->{3.991335275540678*^9, 3.994388130633986*^9}, CellLabel-> - "Out[271]=",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] + "Out[110]=",ExpressionUUID->"dc820495-cf82-47e3-9b38-ac079599691e"] }, Open ]], Cell[CellGroupData[{ @@ -9554,12 +9751,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[272]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], + "In[111]:=",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913352755566807`*^9}, +Cell[BoxData["0.046564779467990605`"], "Output", + CellChangeTimes->{3.9913352755566807`*^9, 3.994388130652614*^9}, CellLabel-> - "Out[272]=",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] + "Out[111]=",ExpressionUUID->"55dd94e7-d01d-409d-b0b4-81ae8d35b92c"] }, Open ]], Cell[CellGroupData[{ @@ -9649,12 +9846,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[273]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], + "In[112]:=",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991335275581682*^9}, +Cell[BoxData["0.9534352205320095`"], "Output", + CellChangeTimes->{3.991335275581682*^9, 3.994388130669832*^9}, CellLabel-> - "Out[273]=",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] + "Out[112]=",ExpressionUUID->"da38ab10-b92a-40ef-8333-227ddb3d5e8c"] }, Open ]], Cell[CellGroupData[{ @@ -9777,12 +9974,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[274]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], + "In[113]:=",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.9913352756087036`*^9}, +Cell[BoxData["0.04439650078108801`"], "Output", + CellChangeTimes->{3.9913352756087036`*^9, 3.994388130687221*^9}, CellLabel-> - "Out[274]=",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] + "Out[113]=",ExpressionUUID->"edf253c3-478a-46db-ad76-79b31b26edf8"] }, Open ]], Cell[CellGroupData[{ @@ -9844,68 +10041,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849332835844*^9},ExpressionUUID->"d6aa822f-4140-174a-8e29-\ -c889dba5c0d8"], + CellChangeTimes->{3.991849332835844*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.1874333445484133`*^-197\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 114, 33, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994388130708075*^9}, + CellLabel-> + "During evaluation of \ +In[114]:=",ExpressionUUID->"3b850511-cf9a-465e-8c46-b731b913ddbc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2545640906422304`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 114, 34, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.9943881307191553`*^9}, + CellLabel-> + "During evaluation of \ +In[114]:=",ExpressionUUID->"976f3a32-06eb-4f35-b38d-4a3f939ec161"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.798794319266438`*^-206\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 253, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275636673*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 114, + 35, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994388130728972*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 254, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756456738`*^9}, - CellLabel-> - "During evaluation of \ -In[275]:=",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 275, - 255, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352756546745`*^9}, - CellLabel-> - "During evaluation of \ -In[275]:=",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], +In[114]:=",ExpressionUUID->"80e9340c-b321-4c13-903d-0729957eb210"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 275, 256, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335275662676*^9}, +during this calculation.\"", 2, 114, 36, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335275636673*^9, 3.994388130738482*^9}, CellLabel-> "During evaluation of \ -In[275]:=",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], +In[114]:=",ExpressionUUID->"bfda629c-f868-4302-83a1-b5142c156d48"], -Cell[BoxData["3.3103666491187513`"], "Output", - CellChangeTimes->{3.991335279487499*^9}, +Cell[BoxData["9.29910290919648`"], "Output", + CellChangeTimes->{3.991335279487499*^9, 3.994388136260124*^9}, CellLabel-> - "Out[275]=",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] + "Out[114]=",ExpressionUUID->"9652cce2-0b2b-46ba-8d3c-d4f91fb09fc2"] }, Open ]], Cell[CellGroupData[{ @@ -9967,68 +10168,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918493361354027`*^9},ExpressionUUID->"46f3f057-22eb-c143-af7a-\ -23ddab00799c"], + CellChangeTimes->{3.9918493361354027`*^9}, + CellLabel-> + "In[115]:=",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.1874333445484133`*^-197\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 115, 37, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.9943881363164167`*^9}, + CellLabel-> + "During evaluation of \ +In[115]:=",ExpressionUUID->"64a146a2-f6e9-4113-82f3-459790a4f78b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2545640906422304`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 115, 38, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994388136327722*^9}, + CellLabel-> + "During evaluation of \ +In[115]:=",ExpressionUUID->"cc3b1145-17a4-4a16-897a-7e18b8b4cec1"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.798794319266438`*^-206\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 257, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279522499*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 115, + 39, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.9943881363382053`*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 258, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991335279532501*^9}, - CellLabel-> - "During evaluation of \ -In[276]:=",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 276, - 259, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795405006`*^9}, - CellLabel-> - "During evaluation of \ -In[276]:=",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], +In[115]:=",ExpressionUUID->"5e8af567-790b-4393-a8a0-86057f7cd67a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 276, 260, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913352795487957`*^9}, +during this calculation.\"", 2, 115, 40, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991335279522499*^9, 3.994388136347624*^9}, CellLabel-> "During evaluation of \ -In[276]:=",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], +In[115]:=",ExpressionUUID->"7b17ebb7-1565-4cc8-b2fb-a107de9153bb"], -Cell[BoxData["7.82322944391716`"], "Output", - CellChangeTimes->{3.991335283631424*^9}, +Cell[BoxData["3.455802374100258`"], "Output", + CellChangeTimes->{3.991335283631424*^9, 3.994388141454723*^9}, CellLabel-> - "Out[276]=",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] + "Out[115]=",ExpressionUUID->"919c255a-1ce4-4e2e-860c-2a113614bf02"] }, Open ]], Cell[CellGroupData[{ @@ -10086,94 +10291,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918494105860615`*^9},ExpressionUUID->"0137ed47-cd78-284a-910a-\ -31d165f1571c"], + CellChangeTimes->{3.9918494105860615`*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk8VdsXAHCZC2XIHMkUZXrmKXtlSGSWEEncewzJGJmiEq8iIUWlKBQi +yTzU46XykwyhpzJzLyEy3dOg/LY/zud8vp99zjprr73W2eUV5EBlZmJimsbX +xj2kU2V3bXenkQwX3dCWhYaM5gu0vExL0bEu9pANj+ZqZ8qaNqHsNCqPHbYd +5R07t8Yr9MeRmd8euyIy/iWbaQfSlB6Kc8C+/FqkOb6kBx3hYDgexq7vDrm3 +pt6PZvit049gz3xqj41qHEBLzuParthiNBk3hskgmp6rNnXHPrQQqxfWMYKe +zb5pOI79Ym2GK7JkDD0JEbnljf3hvHBMTeAEqsp9NOKDPc9uOrOiTkPrt8JT +A7DZU4JdNUg6Mrt0oTAEW5LvbltI4zSqu9EpewbbRpzxcN5kDvl1yLonYBN5 +0kLKnPNI8pjq9ivY8XK2iSc7FpDTYJRmOvaAcN9fp0sW0ZU7XWV52JSj/n7X +U5ZQvcdn9mLsbzlM958FLiNSSKGtAptTWpl3UX0VsV1PTGjFzqS8NOcVZKDq +1ZtnO7GlHrnGq5IMZJA8MzKArauUNH+q8TsKf+Y6NI/tqz3SMWOyhhJPeTXu +ZKWhlchw1i3yv9H+9mukEva5Ri5DRc4/SDiGOUcfOxt0H/t0rCP/x/USztiU +wjbT0JJNsPlNLOsN7JLX10fPizODo/L4hULsb1MesekpzDBMS/OrwY7ds1r5 +NJAFPFI7gj5iZ5bvkllQZ4Pbxu+Oy7LR0KfuuRd/8tnAruiqlC621FLt0a2C +7IAMciyssEs1bTKUSXbwz3rYF47dWh+9KaCRE8afJXS+w1592TsybcINJds4 +HNLZaYjfips35gU3RNdffF+GrdZnCjx6PBC8o+hdO7b/ZHXeXypb4eP1SQ12 +DhoKZu5Q28fNC+c2OTVfwKZJP1lMZPCBgoripwxOXB+ifXOXBj+sMGey1WIz +P6bvEgnhh8meusefsaU0djqUzPLDke3avvKbaeioSdqzzlEBKFVTeNCC3eUd +Gib8VhBORBmLb+OioeFHqcmenEIQIMq8rI89N1uSX2wmBJUVmWY+2FtOT/Qa +NAvB1qd6bi3YphcPa3pWC0OIatXBGG4aaijQXi3KFYXgbWwq7FtpqID2M0L/ +tARcshpUjeSjoYNOfw+HlUnASr1neDn2XKvAgTK6BMwXqMtPYWsWKAlKuUoC +Efn6f878uJ5eHpVsRjvh5rkJESMBGlpaGD0znSAFhSIlA5KCNCRwyrSq0loa +DpR+nlMTpSF6wRZfO39pMHUic8Ox6wa7xb8mSUOqT/6LBmx3q2MJ8s3S8A9/ +jdEBMZzf3giHW+oyoGHHYekljr8/8+hbnLAszDmHXXsiQUOHfbiULcfkYOKv +H/QsaRpCEU7qzr/lIK4Ywqax9yTm6lBE5YH3ga6PngwNMeVrGMfZy0NkrGnS +IHbZsJvzsxZ5+OUseH+3HJ7PI6XnxR7shl9aS4d6duP8TK0/zHgpgtjdlcuh +yjSU75j1mYxThGbTDL5u7FSvsVHWO4ogUKe3SUUF9/e58FnJXkUYXq8QmcXm +a7rL5GiyBw7V5Sj4q+H+0Zjf0yizF8TMtnTFaNCQuPS1+ORJJRAJJqy+6tFQ +05UVxR/MytD9bO+0pz6ux7JrH7FLGfrU+v/0Yd9rlVU09lCGFFV6zgsDGpL2 +aXj//T9lyHWPzsnah/dbSpMj3qrA9CPLMs/9NCQhLklIuaqBtC5Fy9aChpQK +T3P/QupAUZCYu3eUhrwoCavKNuogGhBwZ7cbnleZjGFPd3VIbHlf8xSb5UH5 +09eR6hAixvir1R3P272ZwxkV6pAfz6//zQP/T7M97yrKaMD05os33L3x+SZb +qbiwa8Kfgz+zkwJo6H6orF11hxakbMr9KHWOhrojkM7FQj04qlR85OxTGtrl +0W9zLGAfXPFlPjs6RUPU9ZonElEAn/uzd1ZL05HwbB2HsJcxsIWkVgf709Fp +DcPBjD2mEHWf8upXFR15fV1rE5gxg4jUn+vmbFOozDiMI7fLHE4yAj/lUaZQ +wYp/S2mmBVzO9wkKeTWFvu8XedcafwjW9aa3CelMoyEmlsWxE9bA7HBtd1b5 +NArcEZR2XsYW3v80bONV+IKe+LU130i0gzFOGUZx5RcUvSxK7vWzh6iOhCV/ +oxm0anngyJvjDvC4Y5ibc3gG6bml76fZO4LjjqEFiYuz6L3oXf9WjcMQ88/N +WsruOST2MKGpSMEJRjoFIomxOVQ3usfKhucIdN5+s+CU9RVJ9n3zifh6BJh/ +nj+taz+PNG6kl+aPOgOtHcqXpRfQXdZllYyXLsC2cPZj79cFVLNf9VNivSuE +hk5Mh/l+Q9k6V/jWSo5CaQrXLdXP31DX58IkjRQ3+MHjKVN7cBFVW+fIBp9z +h5vL76LrWhbR4ilHpkDKMfg8rnVZW3MJrR5Q9J038YCp/YdTrQqXUNHXj9/D +tI9DIM8OER2pZeRyv9D7GLcnDNQYTdpnLKPKZ4eOs/ztCXxNNiFB3CtIT/z9 +j8s/PCFpXLKWM3YFyYz6fOrxOwGhDSP/6tNX0CTXSduciROwdqYot/7wKupO +tfE2d/KCAr7H/JSaVZQZmcsV3u0FlJVVIUFRBmp6sf7D28IbzExM3FJDGGib +O/yt0eAN+t0VYimNDCS1/U3XjiZv2HzQM7K+iYHUOqxF2F94Q49JsyL9OQM5 +GLoVD7R4w/7nCUn7mhkoc0fE27P/84at1Y+kJlsZSGzo8ba2AW9YYTLI4e1k +IFkP4Wx30hvWKH5DkyMMpOc5X5SoSYH7r1adAjaR6OGtb2E22hQYUJO548ZM +ou29S0bCuhSw3y5maMlConkzsq/IgAIdKXlpcmwk/n8xbeowpsCMW1NcHyeJ +tpJ8rvz2FLApmDMV4CXR5FWtzbmnKNC3f01JQJJEqY2xfnUPKZDi1HWSX5dE +p9Sz9CKLKNB/qsS5F9uquGKzbgkFhj90376uR6ItWfTi2jIKXBj3luc3IFFi +qN1MTRUFNBN8bDiMSBSrKHuy+l8cf3NQc48Jifyz3gY8G6ZAY7z2broNiSy2 +0g1DRylQsOhcmW5LIoVEJh71cQpoe0lnGNqRiB6qVVZBo0Cttbx5mj2JTtjk +fn06RwGujxLJqodJ5MIWFlj+kwIqK73u1q4kMg8TCy4VokJLUpARmzeJ/s1N +sswQoQJ7Fpn8CNuwY0k2UowKQVuzOC0oJFKTe/vRRJIKoizxqZepJBL9L8bk +sxwVdqhXtDH5kmhWf0hoixYVhnRU+t8EkOgac95zH0cqmFexWNeG4/2rcmdb +O1FBoGdaE0WQ6KJbZKiGMxXWc1zMX2NHVtntXj9KhbFcx9meMzh/YlP6TS8q +3JvepTQSRSKNdi/KqxAqcPiIhfecJdF/6XJcMmlUEJJ6a7M9kURPEI/vdDoV +ZH5e4IzGvvh1pbXsOhXyt4uwjWCrW7TG6WZR4blgwuuHSfj8mLyXrO/h/R1k +9VW+RKIDQXkfI0up8E9ghIBwMokkJC5pGz2hgtIe2cVg7JX2oOssT6mw5SSV +tx37gTyyTq2kwmiyk0B0Col+Dw015zdQwe7SJ4WeqySqshIv6myjQvyxwAtu +aSRK/snMltlOhSrWguBibK+imROuHVRw7DiUy8DmZW0Qn+yigvvqk+ep6SQK +aHS59uMDFSzUfqxVZ5BIZs/NCFkaFRa2d58ZzSTRz//O9n6hU6HVtZgqfYNE +3YlUtfJpKtw3Wsvwxo4b05zRm6NC98kPjyewP2X3HrNdpkLTr499n26SKIOD +zyx6EwG//K9/L8gmUdPSkNtpFgK0wsW3jWFPDZWEBrIR0FtWo7njFu6HKtM8 +r80ECL2gl17DpntG/rLkI0B8R6ztyds4fyszfjMBAsoyZwZzsQ10+BWRIAHX +fi9F9mKn8ZQe0RAlQOnDrUGdO3i9YaRCfBcBN0+8sVvFJgpL2wRlCEhxTLaX +zsHPp0WNbJMjYMb4nKcNNp0Q4GFVJMAz+l1R/sa6gLnvnBoBvCY1Y8Z3SdTw +RyCerk6AvXWLgy827cvojVFNAhKeF/SkYOs3R7/s08X783r3/T32ZMATyedA +gLZE3qzjPTzvLjFatcYELM4S7SHYeiYHrSpMCXBcel6Tip0qOh5VeJCA8uDf +ta+w61jL03ItCbix9KFjBHtiIebRLSsCuJqlF75j674W7L9qR4CBPMNNIRef +d8X47N8OeH0g+KER9tWccuYLhwnI4zD944g9HmqhFuFCQN3UYH8MNo+HkHnw +UQIYzVlOqdi6FhPH/N0JiPe7MZ678f7Os8kengQs2R6Qbcau22L5wMWLgKev +vw10bsRbFap3oOB6xXXcHtyINzbRZUXg+tb1+33ZiNfxlH7Al4D/fec8sLqR +X+3Z3+BPQAurtypTHo7/wHK7QQABypOjcluw664K79UKJGB4NF5RAHs8cnK/ +ajABzUn79MWxuSkVLoqhBPTnC7tIY+vYxgXJnCbA8CB3ggK2l/6hJIkIAlRe +izYqY6fIidwVjiTgR4URkzp2DS+tki8a99N4lIMW9tivinauWAKkgtordDbi +T8WNscURUF2pKqmHrf3+0Pf1eHweVsVZG/4/fkfY4w== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10187,106 +10392,106 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwV1Hk8VdsXAHCZC2XIHMkUZXrmKXtlSGSWEEncewzJGJmiEq8iIUWlKBQi +yTzU46XykwyhpzJzLyEy3dOg/LY/zud8vp99zjprr73W2eUV5EBlZmJimsbX +xj2kU2V3bXenkQwX3dCWhYaM5gu0vExL0bEu9pANj+ZqZ8qaNqHsNCqPHbYd +5R07t8Yr9MeRmd8euyIy/iWbaQfSlB6Kc8C+/FqkOb6kBx3hYDgexq7vDrm3 +pt6PZvit049gz3xqj41qHEBLzuParthiNBk3hskgmp6rNnXHPrQQqxfWMYKe +zb5pOI79Ym2GK7JkDD0JEbnljf3hvHBMTeAEqsp9NOKDPc9uOrOiTkPrt8JT +A7DZU4JdNUg6Mrt0oTAEW5LvbltI4zSqu9EpewbbRpzxcN5kDvl1yLonYBN5 +0kLKnPNI8pjq9ivY8XK2iSc7FpDTYJRmOvaAcN9fp0sW0ZU7XWV52JSj/n7X +U5ZQvcdn9mLsbzlM958FLiNSSKGtAptTWpl3UX0VsV1PTGjFzqS8NOcVZKDq +1ZtnO7GlHrnGq5IMZJA8MzKArauUNH+q8TsKf+Y6NI/tqz3SMWOyhhJPeTXu +ZKWhlchw1i3yv9H+9mukEva5Ri5DRc4/SDiGOUcfOxt0H/t0rCP/x/USztiU +wjbT0JJNsPlNLOsN7JLX10fPizODo/L4hULsb1MesekpzDBMS/OrwY7ds1r5 +NJAFPFI7gj5iZ5bvkllQZ4Pbxu+Oy7LR0KfuuRd/8tnAruiqlC621FLt0a2C +7IAMciyssEs1bTKUSXbwz3rYF47dWh+9KaCRE8afJXS+w1592TsybcINJds4 +HNLZaYjfips35gU3RNdffF+GrdZnCjx6PBC8o+hdO7b/ZHXeXypb4eP1SQ12 +DhoKZu5Q28fNC+c2OTVfwKZJP1lMZPCBgoripwxOXB+ifXOXBj+sMGey1WIz +P6bvEgnhh8meusefsaU0djqUzPLDke3avvKbaeioSdqzzlEBKFVTeNCC3eUd +Gib8VhBORBmLb+OioeFHqcmenEIQIMq8rI89N1uSX2wmBJUVmWY+2FtOT/Qa +NAvB1qd6bi3YphcPa3pWC0OIatXBGG4aaijQXi3KFYXgbWwq7FtpqID2M0L/ +tARcshpUjeSjoYNOfw+HlUnASr1neDn2XKvAgTK6BMwXqMtPYWsWKAlKuUoC +Efn6f878uJ5eHpVsRjvh5rkJESMBGlpaGD0znSAFhSIlA5KCNCRwyrSq0loa +DpR+nlMTpSF6wRZfO39pMHUic8Ox6wa7xb8mSUOqT/6LBmx3q2MJ8s3S8A9/ +jdEBMZzf3giHW+oyoGHHYekljr8/8+hbnLAszDmHXXsiQUOHfbiULcfkYOKv +H/QsaRpCEU7qzr/lIK4Ywqax9yTm6lBE5YH3ga6PngwNMeVrGMfZy0NkrGnS +IHbZsJvzsxZ5+OUseH+3HJ7PI6XnxR7shl9aS4d6duP8TK0/zHgpgtjdlcuh +yjSU75j1mYxThGbTDL5u7FSvsVHWO4ogUKe3SUUF9/e58FnJXkUYXq8QmcXm +a7rL5GiyBw7V5Sj4q+H+0Zjf0yizF8TMtnTFaNCQuPS1+ORJJRAJJqy+6tFQ +05UVxR/MytD9bO+0pz6ux7JrH7FLGfrU+v/0Yd9rlVU09lCGFFV6zgsDGpL2 +aXj//T9lyHWPzsnah/dbSpMj3qrA9CPLMs/9NCQhLklIuaqBtC5Fy9aChpQK +T3P/QupAUZCYu3eUhrwoCavKNuogGhBwZ7cbnleZjGFPd3VIbHlf8xSb5UH5 +09eR6hAixvir1R3P272ZwxkV6pAfz6//zQP/T7M97yrKaMD05os33L3x+SZb +qbiwa8Kfgz+zkwJo6H6orF11hxakbMr9KHWOhrojkM7FQj04qlR85OxTGtrl +0W9zLGAfXPFlPjs6RUPU9ZonElEAn/uzd1ZL05HwbB2HsJcxsIWkVgf709Fp +DcPBjD2mEHWf8upXFR15fV1rE5gxg4jUn+vmbFOozDiMI7fLHE4yAj/lUaZQ +wYp/S2mmBVzO9wkKeTWFvu8XedcafwjW9aa3CelMoyEmlsWxE9bA7HBtd1b5 +NArcEZR2XsYW3v80bONV+IKe+LU130i0gzFOGUZx5RcUvSxK7vWzh6iOhCV/ +oxm0anngyJvjDvC4Y5ibc3gG6bml76fZO4LjjqEFiYuz6L3oXf9WjcMQ88/N +WsruOST2MKGpSMEJRjoFIomxOVQ3usfKhucIdN5+s+CU9RVJ9n3zifh6BJh/ +nj+taz+PNG6kl+aPOgOtHcqXpRfQXdZllYyXLsC2cPZj79cFVLNf9VNivSuE +hk5Mh/l+Q9k6V/jWSo5CaQrXLdXP31DX58IkjRQ3+MHjKVN7cBFVW+fIBp9z +h5vL76LrWhbR4ilHpkDKMfg8rnVZW3MJrR5Q9J038YCp/YdTrQqXUNHXj9/D +tI9DIM8OER2pZeRyv9D7GLcnDNQYTdpnLKPKZ4eOs/ztCXxNNiFB3CtIT/z9 +j8s/PCFpXLKWM3YFyYz6fOrxOwGhDSP/6tNX0CTXSduciROwdqYot/7wKupO +tfE2d/KCAr7H/JSaVZQZmcsV3u0FlJVVIUFRBmp6sf7D28IbzExM3FJDGGib +O/yt0eAN+t0VYimNDCS1/U3XjiZv2HzQM7K+iYHUOqxF2F94Q49JsyL9OQM5 +GLoVD7R4w/7nCUn7mhkoc0fE27P/84at1Y+kJlsZSGzo8ba2AW9YYTLI4e1k +IFkP4Wx30hvWKH5DkyMMpOc5X5SoSYH7r1adAjaR6OGtb2E22hQYUJO548ZM +ou29S0bCuhSw3y5maMlConkzsq/IgAIdKXlpcmwk/n8xbeowpsCMW1NcHyeJ +tpJ8rvz2FLApmDMV4CXR5FWtzbmnKNC3f01JQJJEqY2xfnUPKZDi1HWSX5dE +p9Sz9CKLKNB/qsS5F9uquGKzbgkFhj90376uR6ItWfTi2jIKXBj3luc3IFFi +qN1MTRUFNBN8bDiMSBSrKHuy+l8cf3NQc48Jifyz3gY8G6ZAY7z2broNiSy2 +0g1DRylQsOhcmW5LIoVEJh71cQpoe0lnGNqRiB6qVVZBo0Cttbx5mj2JTtjk +fn06RwGujxLJqodJ5MIWFlj+kwIqK73u1q4kMg8TCy4VokJLUpARmzeJ/s1N +sswQoQJ7Fpn8CNuwY0k2UowKQVuzOC0oJFKTe/vRRJIKoizxqZepJBL9L8bk +sxwVdqhXtDH5kmhWf0hoixYVhnRU+t8EkOgac95zH0cqmFexWNeG4/2rcmdb +O1FBoGdaE0WQ6KJbZKiGMxXWc1zMX2NHVtntXj9KhbFcx9meMzh/YlP6TS8q +3JvepTQSRSKNdi/KqxAqcPiIhfecJdF/6XJcMmlUEJJ6a7M9kURPEI/vdDoV +ZH5e4IzGvvh1pbXsOhXyt4uwjWCrW7TG6WZR4blgwuuHSfj8mLyXrO/h/R1k +9VW+RKIDQXkfI0up8E9ghIBwMokkJC5pGz2hgtIe2cVg7JX2oOssT6mw5SSV +tx37gTyyTq2kwmiyk0B0Col+Dw015zdQwe7SJ4WeqySqshIv6myjQvyxwAtu +aSRK/snMltlOhSrWguBibK+imROuHVRw7DiUy8DmZW0Qn+yigvvqk+ep6SQK +aHS59uMDFSzUfqxVZ5BIZs/NCFkaFRa2d58ZzSTRz//O9n6hU6HVtZgqfYNE +3YlUtfJpKtw3Wsvwxo4b05zRm6NC98kPjyewP2X3HrNdpkLTr499n26SKIOD +zyx6EwG//K9/L8gmUdPSkNtpFgK0wsW3jWFPDZWEBrIR0FtWo7njFu6HKtM8 +r80ECL2gl17DpntG/rLkI0B8R6ztyds4fyszfjMBAsoyZwZzsQ10+BWRIAHX +fi9F9mKn8ZQe0RAlQOnDrUGdO3i9YaRCfBcBN0+8sVvFJgpL2wRlCEhxTLaX +zsHPp0WNbJMjYMb4nKcNNp0Q4GFVJMAz+l1R/sa6gLnvnBoBvCY1Y8Z3SdTw +RyCerk6AvXWLgy827cvojVFNAhKeF/SkYOs3R7/s08X783r3/T32ZMATyedA +gLZE3qzjPTzvLjFatcYELM4S7SHYeiYHrSpMCXBcel6Tip0qOh5VeJCA8uDf +ta+w61jL03ItCbix9KFjBHtiIebRLSsCuJqlF75j674W7L9qR4CBPMNNIRef +d8X47N8OeH0g+KER9tWccuYLhwnI4zD944g9HmqhFuFCQN3UYH8MNo+HkHnw +UQIYzVlOqdi6FhPH/N0JiPe7MZ678f7Os8kengQs2R6Qbcau22L5wMWLgKev +vw10bsRbFap3oOB6xXXcHtyINzbRZUXg+tb1+33ZiNfxlH7Al4D/fec8sLqR +X+3Z3+BPQAurtypTHo7/wHK7QQABypOjcluw664K79UKJGB4NF5RAHs8cnK/ +ajABzUn79MWxuSkVLoqhBPTnC7tIY+vYxgXJnCbA8CB3ggK2l/6hJIkIAlRe +izYqY6fIidwVjiTgR4URkzp2DS+tki8a99N4lIMW9tivinauWAKkgtordDbi +T8WNscURUF2pKqmHrf3+0Pf1eHweVsVZG/4/fkfY4w== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6566539945054938, + 1.4766174244185029`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6566539945054952}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10298,21 +10503,21 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, - 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6566539945054938, + 1.4766174244185029`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6566539945054952}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10326,104 +10531,104 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8Ffv/B3BryVIkJPvalUj2LZ93iJT9UvZ0nDNKlsLXJeK2SDcppKhf -pYWSfSmyXkVSTpFQKuscS/btMFTX7+OPeczj+ZiZ1+c1n5nPPEaBFuLM4OLg -4BjF29r+1AfN7RVtH8x+GTnQNixTyGwqS49mmY8ii66O8GH3Z+qnKVvWIP9E -17/WYzvS368T1HmNlNSyRHixSyLjGngtmUhRIbqcE/ufpq31cbkfUd3+b4zf -FIUq207d+6XdiaD0tRyFPfb1XUxU9Rc0l2/CmsXeNqTkuWjxHXG9Nisbwz44 -HWMUxuxDdxvargxi1/0aE4jMHUCdhfMnu7G7zkpElweTqObt0yOt2FPrLMcW -tIeQVRrbrRF73ZWT7jpLw8ippdvrBbasyN3mU9Wj6MUx9xN52PZSi4+nLCaQ -1ZRBzlVs4r6iuAbfFLq7crcrFjtOxSH+BHMaZTwv2BSM/UWiY3d47ixKkPn2 -wAab7hFw/PqVOVTayflTD3vmDseD0uB5NOjM8lHA5lPUEJ7VZiMJx1kr9hKF -0ugN1sJii0j4lWpLD7b8E/e4XUuLaOC7hsdrbMOdF6eCqinUmfQ2IwX7mH4f -c8ziF3LKn86QxV6I/B8Pv+pvJJB4PHx1kUJ/VwuYqvH9h4LRhEcfdgYY5vkz -VxETdtrcwaZnN1uG5nJCy7ULefzYuU3X+89KccEpr939JBv3HfGJSbnCBVsO -acjXYMfsYJcVB3PDk9PGr45jpxUpKE1r8wIZwLxWuUChr20Tdf894oW33aLy -idjycxUeG8XWwZPJ1WpP7Hxd+1SNpXXgZ8IWX5mnUGPlac7Aaj6Iksv3UMdm -N3zqG7UQBGPeD8q+sxTabCsoHF0nCC6XOYxlsLU6LEHISAhcODl3d89QKID1 -/P5uzY2wdU91ox32SS6m1h5BYdhv+We82jSFhhQLZ+MXRUD93ubYvAk8P8S7 -Da06m2FkSbbqEDZX3rDC1lObwTPMq5sDW15Hzjl3fDMYt3946TROIQ+L5NIP -/aJwTvrInuEfFGr1Cw2TaBGDIoecxe5hCvU+uZroyycO/QXbQ8OwJ8ZzHz3d -Jw6EaFK7ADZ/OPnJpF4ceNA5c6MhCllecNH1fS4B66tPDV4kKVSVpc/OyZQE -/SAbs8k+CmUNrUQYh8uAeqiz68hnCu13TegNK5CBuO/3OwnsiUZRq4JhGdiS -PkQb6qKQbtZOMXl3WaDxdGT1deL5pPmU8ZrJweeuvrfNnyg0N93/1+h5eSh9 -alse1Eoh0SDLZ2V2ijB5U0+Eu4lCw1n8xxwDFEHl7K0w+msKvfjeJjV5URHO -z4WONDZSyMvW+7xqvSK0uqjwnG/A/dQjnG9pK8G/bRNiC/V4/LEnM7ESypDs -wqp7it9LF38BjQMDKhByrMGRXkwhFOGqffi3CnhIfR7KK6LQjvhMA7qkKng4 -td6eK6QQxyMd81gnVVgdlGacKaBQQa/n4dKXqmCdw/P3pVy8Pg/ln932cDt4 -/J//YngW7mdp1zVGU4P6v07syEmnkJTitbhE1k5wcT5z6lw0hWouL6gtc2mA -c2DIzrjTuP+8ewehoAGGlP3U6SgK3WtUVjP30YD89NmEkL8opOhf1U591gBO -o+RtdmG4X/6QCtGiCS7dtr+6AygkIyVLyLtrwYKfa7mpO4V2ZocL/kTawGtp -0KuvQyEa/Txbw14bgiKcVwS18fpSSu319dIGzWYv+0EtCnE/LCpuitSGuADH -zMuaeH3cG3NJLdGGt5P6Ex/V8Pcvw/eumpIOnH98LdhEHj+PRFtNt3W6sDjH -xRkjSKEHocqOz5l6ADKNKg2DS6gtAhlcyDaCV07q8g2xS0jBp9PeO3APhCid -s5USWUKM1fJCmSiAwE5v9tKDRSQx/mK9BM0cUgsrVbwVFlG4jun31B2WsLtF -8IfKIzaiTf5qFh3bBz4cTSWLimxUYB62PrPVGuprn0g6pC2grIWAl/lpNiDf -oTsoLrSAqL1b3zfGHYRgU/+8s1HzqIeDe3bgqB2Y50/sbh6dQ8HSIclnlRwg -QbLrCIs2hwqPN9ffiHeEtsFdKf9+mkWn5yWX1I87wWK/lR3TcRaxD1gdenPE -GcZTYpSjmmaQkWfK3iGnP6GHVtbWZT6D2iXvBjTquIDYyzuVrhnTaNvj8zU5 -f7hC4qvsmtL7U+hF/w5be6FDoMyUnBZumESyHTP+EZOHgDdUQUJsfgLp3EjJ -f9R/GBJT5eQkpCfQXZ55zdQGNzDUN/BO8R5H5Xt3fY2vdIel9rOSSrfHUIbB -ZZFfuR6gvVegI2joB2r9ln1R54onjDkLxtZb/UDP7e4on/zbC8yq2wdts0fR -bNCfHMF0b6gbCDMnto4itpXasSkLH+DxbOg7kD6Ccia7qTD9I1BRwqgRExtB -bg+y/bwFfeEQcwt3XtYwKis9eIQ7wRdCmpgoTHcYGUm1L/+z7AszNhoxZzuG -kFK//9ePx4/C6z/oGQmxQ4glcMLhDnkUjhsOVErtGEJtV+39rF1p8G3GaPIE -yUJpkZkC/2ujwbmaSMPwTBaqqVtd9rPxgxjlxL+tGCy0yQsSdKr8gK3YpRer -z0LyW960Stf4gYtB1MYGPRbSYtptXVfnB6pvKgL5sJ1NPZ9+eekHC6pkZZoO -zpeOaDnz1g80PyzeKNNioW09eZuav/hBhLqlHb86Cyn7SGR4LflBvhGKlpJn -ISPfqZx4XTpIVhP/vRNgoce3ZsLs9elglhuqZYK95dOcmYQhHabdFDvz+Flo -at9SR44JHVoOuURc3cDC3xsOTqY5HebjDku4r2ehjUsi7pud6OCz4doHbm4W -YiXpbcgMooNyhfto4QqJnN4YdPiH0GHf+v1+Gth1HMaZWqfoEDwn45i/TKJb -YWZ6r8LpcNw2IC6PIpG9u/XRoWg61LN/6BQtkqhS2b1S/TIdPHKrp1vmSHS1 -Oub4i8d0QO3OSR7jJArSTjeKzKGDTCh/7I8xEtk+LdlgmEsHvuz0b5HY/OnD -TysK6DDCluvJ+EGi+FDHsfJndBhLYyz3jJAoRk35xPNXdOh/WJsawyJRQHpL -YGkvHbj87NQEeklks3HYNLQf9xWeynvSQ6I/4jmEtAfpYKXXddsSezhUr6Bk -iA7PrANr476T6Kh95mTxBB3e65uK/fxKIjfesOCiFTpETvQKrPtCIuuwbSfz -xRnwH/PZcmA7iV5lXjyQupUB5uXZzzZhmzLnlCO3McDhSuRU6UcSaam0dFvI -MmD7nZLelTYSSX6OtvimwgD5mdni5FYSjRv3iPPrMWBHQ+PWDiaJrnHdr/X/ -E+d7vvxc+Qbf/y7BDDtXBlzzjiECsS94RobqHGbA9YWUMDnsyGeO21c9GCB4 -s5YvoQn3JzhTbtIYsMrKl/V6TSKddzT661MMuLVSwpZpINHnFBUBpWQGmPS8 -N+D4l0SFSOjYaAoDjPnbHzfV4fzJhcaC6wx4oxB9Pglb26Yx1jAd91MpjZfG -vsrhN2d3jwF7xEIKUC2JrELud0fmM0C6W/jS7WoSychc0jcrZMCXHos2f+yF -dyHXuYsZIGuxGK+H/VAV2V0tYwB/aJtRexWJfvf01D+qYkC2mWyDMPYzW6mc -D80MeMFp7/HwBYkSV7h4094xoLT4dFQENi1n7Kg7kwG3Z3jXHcQW5qmSYrUy -YOcNLX92BYkCq92uLXcxwDb9oY0DttKOmxHKQwwYMwtIkign0crnM59+DDMA -KT85O/ecRG3xDK2iUQa8T1Al32PHDuiOGU0woCpgeDIe+2vGJ2+HeQYsbkaK -P5+RKHW9yL7TnARckFjPu1KG/4PnejzDuQloaBV2/II90pMbGsxLgMF6ZaUK -bNNnlvdpGwgobDhyNAJ72Dfy5wERAj7X/tzzsxT3t923eZ8oAW0J8m97sE0M -NqshMQICtfZ+r8dOFso/pCNJgE93yO1La8er+kqkFAhwOugWIYtNZOc3iykR -EJW+ey/v2vnJUX2bVAiQXlm5PlGCxyNEhXjUCFjOdftYg50san1sQouAmDmp -PD/sqv9E44a1CVhgOz23xx760X+jX5eAOPlga2Ns4/rTDR2GBKjHuXCLYrMC -C2VrgYBekZrud8Uk2ugWrVdhToBZM69SFbaRxX7bEksCJK5pLDzFvio5GJW9 -n4CIVlHNROwXPEXJmQcIEL7TdjMGm5yOfnLLlgBLuWMJwdiGTWKdSY4ESO5V -5nDBppUMjic4E7AYZH3JGjvpThHXORcC2oPMM0ywB0NttCLcCLjuUuuggi3k -I2590oOATh7TpW1reTakd4AXAf3bklVF1q6XO5Po40tApFe59GoR7sN/4KEb -jYCbVxLIRexBtnilM52Af9R3ak9jCw2QrbYEAVIfHvGNYhsyi4etjhEQLjxF -DGDTKs78hgAC5G7y233DTnp4YItJIAGc/MtVnWv5SRLqesE4T7ayuG0tP5K1 -d9dJArySDmgysQXpJW5qoQRkSxToNGMbOMSGKIUTMB7fX9+4lm988KJMBAF8 -OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs -5Y/EDvDGEsAfJRlZja3ffpBajSPghOMu3TX/P3lgJlM= +1:eJwV1Hk8VdsXAHCZC2XIHMkUZXrmKXtlSGSWEEncewzJGJmiEq8iIUWlKBQi +yTzU46XykwyhpzJzLyEy3dOg/LY/zud8vp99zjprr73W2eUV5EBlZmJimsbX +xj2kU2V3bXenkQwX3dCWhYaM5gu0vExL0bEu9pANj+ZqZ8qaNqHsNCqPHbYd +5R07t8Yr9MeRmd8euyIy/iWbaQfSlB6Kc8C+/FqkOb6kBx3hYDgexq7vDrm3 +pt6PZvit049gz3xqj41qHEBLzuParthiNBk3hskgmp6rNnXHPrQQqxfWMYKe +zb5pOI79Ym2GK7JkDD0JEbnljf3hvHBMTeAEqsp9NOKDPc9uOrOiTkPrt8JT +A7DZU4JdNUg6Mrt0oTAEW5LvbltI4zSqu9EpewbbRpzxcN5kDvl1yLonYBN5 +0kLKnPNI8pjq9ivY8XK2iSc7FpDTYJRmOvaAcN9fp0sW0ZU7XWV52JSj/n7X +U5ZQvcdn9mLsbzlM958FLiNSSKGtAptTWpl3UX0VsV1PTGjFzqS8NOcVZKDq +1ZtnO7GlHrnGq5IMZJA8MzKArauUNH+q8TsKf+Y6NI/tqz3SMWOyhhJPeTXu +ZKWhlchw1i3yv9H+9mukEva5Ri5DRc4/SDiGOUcfOxt0H/t0rCP/x/USztiU +wjbT0JJNsPlNLOsN7JLX10fPizODo/L4hULsb1MesekpzDBMS/OrwY7ds1r5 +NJAFPFI7gj5iZ5bvkllQZ4Pbxu+Oy7LR0KfuuRd/8tnAruiqlC621FLt0a2C +7IAMciyssEs1bTKUSXbwz3rYF47dWh+9KaCRE8afJXS+w1592TsybcINJds4 +HNLZaYjfips35gU3RNdffF+GrdZnCjx6PBC8o+hdO7b/ZHXeXypb4eP1SQ12 +DhoKZu5Q28fNC+c2OTVfwKZJP1lMZPCBgoripwxOXB+ifXOXBj+sMGey1WIz +P6bvEgnhh8meusefsaU0djqUzPLDke3avvKbaeioSdqzzlEBKFVTeNCC3eUd +Gib8VhBORBmLb+OioeFHqcmenEIQIMq8rI89N1uSX2wmBJUVmWY+2FtOT/Qa +NAvB1qd6bi3YphcPa3pWC0OIatXBGG4aaijQXi3KFYXgbWwq7FtpqID2M0L/ +tARcshpUjeSjoYNOfw+HlUnASr1neDn2XKvAgTK6BMwXqMtPYWsWKAlKuUoC +Efn6f878uJ5eHpVsRjvh5rkJESMBGlpaGD0znSAFhSIlA5KCNCRwyrSq0loa +DpR+nlMTpSF6wRZfO39pMHUic8Ox6wa7xb8mSUOqT/6LBmx3q2MJ8s3S8A9/ +jdEBMZzf3giHW+oyoGHHYekljr8/8+hbnLAszDmHXXsiQUOHfbiULcfkYOKv +H/QsaRpCEU7qzr/lIK4Ywqax9yTm6lBE5YH3ga6PngwNMeVrGMfZy0NkrGnS +IHbZsJvzsxZ5+OUseH+3HJ7PI6XnxR7shl9aS4d6duP8TK0/zHgpgtjdlcuh +yjSU75j1mYxThGbTDL5u7FSvsVHWO4ogUKe3SUUF9/e58FnJXkUYXq8QmcXm +a7rL5GiyBw7V5Sj4q+H+0Zjf0yizF8TMtnTFaNCQuPS1+ORJJRAJJqy+6tFQ +05UVxR/MytD9bO+0pz6ux7JrH7FLGfrU+v/0Yd9rlVU09lCGFFV6zgsDGpL2 +aXj//T9lyHWPzsnah/dbSpMj3qrA9CPLMs/9NCQhLklIuaqBtC5Fy9aChpQK +T3P/QupAUZCYu3eUhrwoCavKNuogGhBwZ7cbnleZjGFPd3VIbHlf8xSb5UH5 +09eR6hAixvir1R3P272ZwxkV6pAfz6//zQP/T7M97yrKaMD05os33L3x+SZb +qbiwa8Kfgz+zkwJo6H6orF11hxakbMr9KHWOhrojkM7FQj04qlR85OxTGtrl +0W9zLGAfXPFlPjs6RUPU9ZonElEAn/uzd1ZL05HwbB2HsJcxsIWkVgf709Fp +DcPBjD2mEHWf8upXFR15fV1rE5gxg4jUn+vmbFOozDiMI7fLHE4yAj/lUaZQ +wYp/S2mmBVzO9wkKeTWFvu8XedcafwjW9aa3CelMoyEmlsWxE9bA7HBtd1b5 +NArcEZR2XsYW3v80bONV+IKe+LU130i0gzFOGUZx5RcUvSxK7vWzh6iOhCV/ +oxm0anngyJvjDvC4Y5ibc3gG6bml76fZO4LjjqEFiYuz6L3oXf9WjcMQ88/N +WsruOST2MKGpSMEJRjoFIomxOVQ3usfKhucIdN5+s+CU9RVJ9n3zifh6BJh/ +nj+taz+PNG6kl+aPOgOtHcqXpRfQXdZllYyXLsC2cPZj79cFVLNf9VNivSuE +hk5Mh/l+Q9k6V/jWSo5CaQrXLdXP31DX58IkjRQ3+MHjKVN7cBFVW+fIBp9z +h5vL76LrWhbR4ilHpkDKMfg8rnVZW3MJrR5Q9J038YCp/YdTrQqXUNHXj9/D +tI9DIM8OER2pZeRyv9D7GLcnDNQYTdpnLKPKZ4eOs/ztCXxNNiFB3CtIT/z9 +j8s/PCFpXLKWM3YFyYz6fOrxOwGhDSP/6tNX0CTXSduciROwdqYot/7wKupO +tfE2d/KCAr7H/JSaVZQZmcsV3u0FlJVVIUFRBmp6sf7D28IbzExM3FJDGGib +O/yt0eAN+t0VYimNDCS1/U3XjiZv2HzQM7K+iYHUOqxF2F94Q49JsyL9OQM5 +GLoVD7R4w/7nCUn7mhkoc0fE27P/84at1Y+kJlsZSGzo8ba2AW9YYTLI4e1k +IFkP4Wx30hvWKH5DkyMMpOc5X5SoSYH7r1adAjaR6OGtb2E22hQYUJO548ZM +ou29S0bCuhSw3y5maMlConkzsq/IgAIdKXlpcmwk/n8xbeowpsCMW1NcHyeJ +tpJ8rvz2FLApmDMV4CXR5FWtzbmnKNC3f01JQJJEqY2xfnUPKZDi1HWSX5dE +p9Sz9CKLKNB/qsS5F9uquGKzbgkFhj90376uR6ItWfTi2jIKXBj3luc3IFFi +qN1MTRUFNBN8bDiMSBSrKHuy+l8cf3NQc48Jifyz3gY8G6ZAY7z2broNiSy2 +0g1DRylQsOhcmW5LIoVEJh71cQpoe0lnGNqRiB6qVVZBo0Cttbx5mj2JTtjk +fn06RwGujxLJqodJ5MIWFlj+kwIqK73u1q4kMg8TCy4VokJLUpARmzeJ/s1N +sswQoQJ7Fpn8CNuwY0k2UowKQVuzOC0oJFKTe/vRRJIKoizxqZepJBL9L8bk +sxwVdqhXtDH5kmhWf0hoixYVhnRU+t8EkOgac95zH0cqmFexWNeG4/2rcmdb +O1FBoGdaE0WQ6KJbZKiGMxXWc1zMX2NHVtntXj9KhbFcx9meMzh/YlP6TS8q +3JvepTQSRSKNdi/KqxAqcPiIhfecJdF/6XJcMmlUEJJ6a7M9kURPEI/vdDoV +ZH5e4IzGvvh1pbXsOhXyt4uwjWCrW7TG6WZR4blgwuuHSfj8mLyXrO/h/R1k +9VW+RKIDQXkfI0up8E9ghIBwMokkJC5pGz2hgtIe2cVg7JX2oOssT6mw5SSV +tx37gTyyTq2kwmiyk0B0Col+Dw015zdQwe7SJ4WeqySqshIv6myjQvyxwAtu +aSRK/snMltlOhSrWguBibK+imROuHVRw7DiUy8DmZW0Qn+yigvvqk+ep6SQK +aHS59uMDFSzUfqxVZ5BIZs/NCFkaFRa2d58ZzSTRz//O9n6hU6HVtZgqfYNE +3YlUtfJpKtw3Wsvwxo4b05zRm6NC98kPjyewP2X3HrNdpkLTr499n26SKIOD +zyx6EwG//K9/L8gmUdPSkNtpFgK0wsW3jWFPDZWEBrIR0FtWo7njFu6HKtM8 +r80ECL2gl17DpntG/rLkI0B8R6ztyds4fyszfjMBAsoyZwZzsQ10+BWRIAHX +fi9F9mKn8ZQe0RAlQOnDrUGdO3i9YaRCfBcBN0+8sVvFJgpL2wRlCEhxTLaX +zsHPp0WNbJMjYMb4nKcNNp0Q4GFVJMAz+l1R/sa6gLnvnBoBvCY1Y8Z3SdTw +RyCerk6AvXWLgy827cvojVFNAhKeF/SkYOs3R7/s08X783r3/T32ZMATyedA +gLZE3qzjPTzvLjFatcYELM4S7SHYeiYHrSpMCXBcel6Tip0qOh5VeJCA8uDf +ta+w61jL03ItCbix9KFjBHtiIebRLSsCuJqlF75j674W7L9qR4CBPMNNIRef +d8X47N8OeH0g+KER9tWccuYLhwnI4zD944g9HmqhFuFCQN3UYH8MNo+HkHnw +UQIYzVlOqdi6FhPH/N0JiPe7MZ678f7Os8kengQs2R6Qbcau22L5wMWLgKev +vw10bsRbFap3oOB6xXXcHtyINzbRZUXg+tb1+33ZiNfxlH7Al4D/fec8sLqR +X+3Z3+BPQAurtypTHo7/wHK7QQABypOjcluw664K79UKJGB4NF5RAHs8cnK/ +ajABzUn79MWxuSkVLoqhBPTnC7tIY+vYxgXJnCbA8CB3ggK2l/6hJIkIAlRe +izYqY6fIidwVjiTgR4URkzp2DS+tki8a99N4lIMW9tivinauWAKkgtordDbi +T8WNscURUF2pKqmHrf3+0Pf1eHweVsVZG/4/fkfY4w== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + "PlotRange" -> {{0, 180}, {0.6566539945054938, 1.4766174244185029`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6152015704378887}, + "AxesOrigin" -> {0, 0.6566539945054952}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10433,7 +10638,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6152015704378887}, + AxesOrigin->{0, 0.6566539945054952}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10461,7 +10667,8 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6152015704378874, 1.5607999649251942`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6566539945054938, 1.4766174244185029`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10469,11 +10676,13 @@ OazOl9hXVLbelYjE8+laGfovdrnwUJnIaQIqA33Sa7EHfpa8E4jBfTs+WdSs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913355426284504`*^9}, + CellChangeTimes->{3.9913355426284504`*^9, 3.994388522243493*^9}, CellLabel-> - "Out[277]=",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] + "Out[116]=",ExpressionUUID->"058cab14-26dc-41c2-a652-c7888b113ecf"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"x", "=", RowBox[{"Plot", "[", @@ -10533,14 +10742,1242 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918494141657047`*^9, {3.991849451432905*^9, - 3.991849451715925*^9}},ExpressionUUID->"00a32bc3-df79-9e43-8f20-\ -d4884962c12d"], + 3.9918494141657047`*^9, {3.991849451432905*^9, 3.991849451715925*^9}}, + CellLabel-> + "In[117]:=",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.0927339204498366`*^-270\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 117, 41, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943885224209538`*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"22dca5f7-86e3-4016-aa10-addace3841d2"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.416194382861675`*^-281\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 42, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388522429098*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"0fbfeb2f-b452-4de0-acc1-6ec1c139d379"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.576621063697906`*^-292\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 117, 43, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388522435422*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"b27bea86-edcf-48e4-811a-6911aaf0e384"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 44, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388522441577*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"f4b6bf6e-95d3-4daf-b3bf-b4a9d20531d6"], + +Cell[BoxData[ + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV12k8VV8XB3BRIZHM071mMkXiXneyFqIMlZQxooRIhsxKpUIR0ahS5I+S +jPekDEU0qDSZh0oZGhEZC/Wc59X5fF+c89ln77V+e2/lXcEOPrw8PDz+i3h4 +/v+c/vDskVpKnqnOcHS4XP9607ZrMjFmXUdh8P55x2Nf1QElX++S6ToDs6pJ +ZvZfjSHS/lYnX1cunH+tqaTz1RJWjkqf+d1ZATsn0w2/f3GEvtpNwZOdDSDy +2WWj6BcfsFL7/n68swXqRG1+3h+IgN+d9PNjnf2wM+jGj2MdCdBocSPvbe4E +CH/r3Zl1/AIo9FV93qW7AOfOn/pMDc8BiUDPW/wWfGgn7Pzrqmk+nFljVbPJ +UQBbUvmu2/Pegu5Mg/pxUWEc5kSd1v9dDJdbi1ZEqgvj7oFEKRQsATcRTc8/ +DGEMtlx510q2BN4do/zl9RbGNr0dRjRGCXwMWsaWuCOM+7yPlF6NLoGv6wbv +0lxFsKhSgJ4yVQKzYxdLD1xfgeFDBmpPvpRCSt7h17yyK3HjHzd6XEcZ2Bj5 +i0mqrkSzyEA++fdlIPDIwVFTbyXGX3t9nTtQBscH1HttzVYipeeIfftYGRxU +af58zn8l/n7X69CzrByCcmT+alSvxNz/jn74ximHLVnlurbbxXBlWJmRdE45 +iOpeCfbwEcNFfqNCwgXl8KrmeEVwsBi6Pzc+s1BUDja9zibnjonhNz6tm6/u +loO53F+L90VieCFw9UeD1+VglGmzPXheDOXdm+9PzpeD9LmBk2evimPrREtu ++LYKkNG5c3y2QBydN4Z+83atALmGxMMeZeLo8zgwdtOOCqCOaUVoNopjaENS +jOSeClC3C/Gq+SqOw0ZSfQEHKmDt4gXawFoJPOHrPmh4vQI2h0sNGj6XQOOw +LnXjbxVgL/T1w8VWCeTQ7/84NVIBDrlV3fPvJPBIt85Y33gFOL1xf/3kpwRi +YBk36k8FeOj+V+0mKYmPPQQUg4S4sHdQP+OolyRWJXxzi9TlQtI2a9OWaUmM +irbaNxHABTnilRzvIincO+jgyxfMhRLxbTNrhKTwo4dGo3AYFzpadpRlKErh +ZyGNmysPcEFtS7jKlg1SyNIyVupI5kLDxuylby5J4QHxKx1bCrmwYDX16iVb +GvmJeUfJfi6kF8QWLVhJ46GzOnOhQ+T7S3lO6G2RRkoEQ/DZVy7YPV5mluoj +jee1zXf6/uTCZQslrl2aNG5SfrxsxzwXTND24os+adx2pfmSmSQBYYzrns+O +yiDfnZ3v35kTYJMjMml7SgZ9nX+auVkSoMJ/8MSr8zLIYMW3tawn4E2bU3nr +TRmUUX+ccMeOgNUhy/k+vJLB9ws1mmZOBHwtiCr4JSeLczbdn0P3EFAnPMSM +UJPFUa3qfbkBBFwId3g9oyeLPpfqdV4FEmBprjc7j7LY3/54s3QoAbnv+635 +/WRR+foL65AYAtwlNo3Ic2VRcKV/FuckAWsP1MRfq5VFep/JkHIKAcv6V0kp +P5HF5Cm5kEWpBFSV8oFGtyyeuyOyuSKdACnbqnSDf7J4va3fqvciOf54NSNL +Wzl0nXV5aZNPwI2vGU1Pt8mhYd3ScwMFBBza/M/dZoccHk8NLYy6SYAepSdh +c6gcZp0bbMwoIiD53ulO14tyuL8o4HVqOQHrfv6JDRqQw2CHRv6CWgJiNpzT +fjgsh47fkrNG7hNQcl2vR3xaDplVubUGdQTIbPNiVAnII/2cW27hQwKG7z2e +4Vstj82LdlN8nxCgLOZ5w4kuj/1X5TWSnxLgtHfWqRDlUcYv5mFhEwH1FJ3K +TVvlMbt4lNv7nICzR9PDL0XL47KM47nLXhPQ1KulNhwvj3V1mtuF3hAwb9TY +apoij7rp6iX8bwnw/TJlOHhVHu3mNDQnWghg2m0fX90oj7XTNvHnOwgIzp/M +iW+Wx5VLGleFdRKQ9zfVvq1dHgU/FOy36yJApLy+NOarPEbktY+PdxPQL6kR +9EhYASvTZGoE3hMgHVxHkZZWwMylq882krZrcnnpr6SAFfbyUrEfCKiMTdFd +sVYBZX+9VOrpI+ezb+y7q4sCPl2Q2OPbT9aLSfLl2zsVsK3L685f0pMZqjb/ +AhTwZqp15ZkBAnascyrMi1PAFUJBncWDBBgW1vj9zFVA7+bKyrLPBPjxOkqb +31bASM+z9RpfCMjaPvrk3B0F3Dm8KimT9FIRZQ1mkwLOhWlsDv5KAMuvuv3U +WwWcPDTk0EY6pH5rQl+PAobkCskYfyOgZ3/i4PERBdzdYv3jG+kVzYrnOqcV +cCG8cY7znVx/9SoLbR4Kurv5taSSjjnkMHFQkIKHTvuHdJMu6fyR+1qMgrr7 +/nUo/SBgwCDBQUWBgtMXPPl3k5ZJpvJGqFMQ/jzk/Y90PHvLTjkTCtanhnlK +DBOwYce1X3RzCtqd39JjQ1rkyI9jjnYUPJDB8jtIuv26iWSYEwVzbJv4C0ln +NSYUpHtRMHlj+v03pL2HWuglARQU+KiXPEFam1/p2YtwCjoLcoJXjhAwvmqf +27dDFCxL2R6kTfqeTfWPpScpWDqw6qQp6cOB/HFqZynYbmX1cCNpq7RtIuZX +KciX6yTjQlq47Hq25w0Kjlz8e9qDdNvbUYO4cgqePjyotYP0lQlWw+UaChbt +KvviSnqX5Mmt9x5TkDkv9MKetBa9Y7D9NQUHKnPbzUmPuahGTnRT0K9IWdCA +9N3YEP6VgxRUy6b7yZA+lHU/c/UoBeN5z4/Pkf9j+WCZtt0sOf8/fxT2kF7+ +0bnGn5eKRzTHMgjSrYvy7ZKWU1FG3LnoJOnLqr/e50lRkVLXOeNK2ssSghuU +qPisVztGnbSm3ymej9pUXFqzbM0wuR6jJ7ozFoyo2L5prXIJaeKWhqo8ULFZ +c5ftXtLmo/WWTlupWPXnzbZOcr0FRUU6wzyoGKB0jp5I+s2a7Xsy/KiY1Oe9 +3YD0joip5OYDVPywxGxfJFlP6hfNFb4nUHHVpg87xL79Pw9OF/OnU7Fp9EZm +IVmPsfNab8zzqPidMf7jGVm/ZtSonV4lVBTZICy4lbQAPvoVd4+KefvTIjrJ ++j9/bIdkVTMV5d4LrmsZIvMzv6igo4OKhm9uF24grfJ0lj75kYp8Fkt9q8n+ +KVt21k1/ioox9abfT5P91ZzxNDufooj53U3b+D6R+cKVWNOoqYjOQ9J52z4S +4Na+s+HjGkVkxQq4Xif796vM/KC8lSJWt3nO6ZL9zZdjoH0mSBErrq11Fu4l +86XkEnGoThG1847JTbaS/dL5amG0SREfBh9zFya9iWfxes8WRTwt4nVXhcwj +b4egbhhSxMjj1AdmZH5ZHVA+fGSJEhq1jbG3NJP9qTj9n5mOEoo6mO6720jA +FDe96be+Et5aQeU520DO1wadkXIjJexZt+xJAJmvCaFeNBVTJfR3rhwXIfP3 +cuPzJt4tSlgt6zSjVU3AI7/skcZIJfQ+nUq7XUqA9TxD7OABJWz/k/HItoSA +V+ltNKMjSjgr2JTz5TYB3VWCR/JOKqGwaoWNxC2yPoTCxRKylDD+gch5szyy +n8s20K0alND3H6aMkPtN4Oz4kSZhZWzX/u198SA5H6G+Up/FlPGRw6farFhy +/b73FPHJKCNLN27RtWgC8nsbO0xVlDHZRtn5XDgBHx6c171DU8aoylMR9uR+ +uTmB0XXdUxmZOdxUge1k/onF6x8oV8bYJyktJ4wJ4EmZepRZSX7vkS9ddC05 +fr4At8oaZRTTsmk7a0DA3imHhPHHyuiXP1p3WofM9y61Xr8eZSw+zPjPTZnc +L7ObErfxqWBiTVG96XICfuuIftBzVMFjGvrcLX1cmL4qF7/WTQXbtOOu7H/H +hckV6moMTxVcWn9AJ72bC6MTjIB1/iooHC5n97CVC/013tNucSrIWPy9Ze4p +F57b3hU5ka+CJ6Q7RNtKyfPJ3h3QP6WCOQLraSpxXGAX3c65cEEVcYBdel+E +C71KRdmWV1RxqFvay408f8VeKLw2ma2KDRtflE7yc+FufEGWQ6EqLt/WsFZl +ERcMXXIyRWpVUc5YfenOiQrQWnIuPfGTKioLFl8IJu8FUp4HjkTqqqH9ylsx +H65WwLiYjZdTgxpSj60aDlOrgMFTXk77+TVQ+cJNw7jF5WD9M8p6iKaJVzc7 +gsLDUhj2FggjDq9Ck7hOrdBVxeR9Qpo3qUELi1JZtaWnboHYS420sp/auLpo +Y/4A5SYonCi1p9F0sZn13P1eUj5k6jBExf30kKGvwVu69j94LmdmPJGxGm/2 +aX3P5r8OTIWGdP0OfXQySjMuzLsKIny54TuPGuAn0/VRsu2XgBqvyHbVWIM9 +KfVjAqIXQFDdvdLh6RqkFve2Y+0ZWM2RLY3yMETyXPc3deQ07P8g1mjDsxb1 +d3SrPrmWDD8nTjlaZ67Ffl/xOGPbRFiv/+SytZ4Rdvq8uO93+Sg8mGDNzbwy +woNi5md+bTsEQbqGPW99jHFcffdVj/5oiJiR++O5xxhHdMUtbzRHw8EGPrnR +AGMcyJW4wHM3GlJc2l2XhRhjkextif6UaLh5PLrbPNYYp9zTb3rSoqH/3YMu +bpox3uh7tNk0LQqcUm07z981xs6k/PcO1pHAGd3d5ipIw7vy3yLVf4SBVM36 +3FohGpbq1gZu7AmD0STtEEURGvbltbvGPwuDa8pjQkNiNMw7yrtI+GYY/N12 +wCJEgYbLnFLaK3zCoK4moyJRn4bd5r911w7sB7OTD9K5jjTsydp6oPdzKFiq +yWwUzqVh9NzorYgVIUCMPFbenUfDh3V9F8sXhYDa3bDp6gIaPvj9SvHnl2BY +bPM6e08RDZUjFyQtyoOhITjxVyNBw5+8Pao964LBtGbyYuxTGr53rJapCQ4C +msPb/i/DNAzX5p6faw2EVUeSoxvodDyfHbRCrs0faln5S+yYdNzJA6u21viD +/UzdmXY2Hcfcx+/m5PpDdNDU7a9mdAywpPLHhPpDk7vXJxE7OhY/TZ5QEPWH +PQyazXYvOlb5xKVobNkDhb8+yU+eoKP46KGhoU++oO3DqFPvoaPOgM6xTazd +cFpl059j7+gY2rKbcmHVbpjs22Xc/4GO2jxnXgxL7oYHbqeKrg3QceDFY/bT +MW9wsO+7KD1Cx0M1jrv0b3hDDCshRJDHBFfB9LpHUt7QtPKt8oi6CZ62nTl1 +n2cX+DzYc5wINcHPJvrpTXOeMLrve5RluAnue2vg+rDHE6IpgXs7Ik3QZHua +TFeVJyQfDHaYPWCCBSFrlT2jPaGMGanETjTBQ27Bw2+md8B85bHaxssmaHQ5 +VtngtwecKb022dJogqH5+Ystxd2hLqdt97gkA5/6rtHTy3SBj3bKnpEyDOzH +xYsiDrkAz+99rnNyDOQErC5q2+0C5lv4Ny1RYuCFiFsmvWtc4MkiJl1Wm4Eq +cXuN+V46Q/OubEEzUwa+K/9ZX8LvDD1qASXpvgw8W62eNp3qCJM3/83o32Xg +DSHhG3E9DvDZySrnZBUDRYj4o6eeOkDX4tQNAzUMDHkX4HGbcIAaL7lLF+oZ +WL732XvqaQc4KmPMXHjGQPfF17JfrnMA0RMBB5+/YyDfQ4UZK+4W0PVr5/Hh +ZaLgXf0J+yx7oEoqFD5YzMRjCxR9vxR7EG3ctUWGn4mW7LnuU7H2MEEdu/5C +iImiGa52S13tobpjmYWhJBPN/pPZViZlDxusMOGfJhM1iDDJYq3N4K1eJHh5 +IxPj7HMfrzXZCLGPdwRo2DPx8KerognSGyHdR+xFhQMTm0ayGDPTdlCbH3Pq +hTMTa6K+cjmVdiChsWHFwk4mJm2pXmNPs4MnGkMSXpFMdLWee7OfbQvaqxSV +NLJJfz4ZNuppDdjUcqTiOhPll7a/VLewBqc9iZ9M85g4p2qRFathDcdujuQ6 +FzIx3lFH7+DIBni3qlb9JJeJB8eyN7w7uAHStFx1hp8y8Z6//8jvnPUwrn2W +VjHGRJ/DQT1/FiyhqxktxSeY+PFgZrH7Z0uoDxrdGj7FxL1sj/D2V5aQVmEd +SvvDRIcc/tNCOZagzeS5Xc3Hwrdp071JFpawy3qfcqMUC9c7/pEuS1sHbX7r +l7exWcgsVvjIMraAGsEpOWNg4YWTlIPOShaQW5SrdcGMhfdm/lUmCVlAyM8F +KxcrFoZoazWo95uDcBQR/24zCx/+WWLqlG4OVonKM4O7WBg0EBEeM2YG9/Lm +Pk2dYCHfo+J8+zoEmkX4jE0KC8Vph3VYxQh3Pg0vz0llYfeVsgj6FYQK6ge6 +zRkW1lW+kPWJQridWZ967QoLdeVCps4YIOScSmCsL2Fh7Lfq4852ACfDV2Rk +trLQorVqfRuLAwLiJwpG2lmY2ZKQ8FGeA4nlPLXmXSz81+13bfk8G46Pjn8e +fsdCLV3aeGMtGw7taWObfWbhfa0x4dvAhv3ul75+m2Xho9uWf61tWeC2ThVZ +VDaqzFgX/4tmwEKbgEijEhtbF0XyBbsxIMdntNdGlY0l6oP9/1gM+JxYFeW2 +io1/5meqE/6ZwP5nm0tjDNk4T/1iQT1hAsmbDlLvWbGRnlVX4ptNh2qX9nmj +YDbOaj4fjhkyBo9v1c9rQ9l4Tr1F4f1zY+CJzclcF87GlBLzCY8yY7C6stdo +Wwwbh8cKKPcOGEPL+0WBYcfY+GR0wPiFuDF837W6t/wiGx+wKvW3WhuB/L6k +qtX1bDS15EipPzOEtH++xikNbPzNb/whnWsIvGesyr88YuOyvolA8WuG8L1y +SWHOMzZavWw84R5mCNU8xzPFWtm418vTe55qCG7njkRND7Fxeb2ntlfsGsis +iTF+IMTB1r+++ZpmBrB8k2u5nAgH3wZbfrBYbQBHPproRYlyUDVaeFO4vAHs +WTKrZiDJwTEeD0HVYX2gb46UyKVyUMCXd3ekiz509O+fSFjDQY/Buw8iTFaD +5LLA8o3OHDx69W9mi4Qu5FnExY65ctAzguU291MHDOPSLM66c1Dxiskd+xc6 +sGmsrL1rJwc/PR2NOHJUBxI7pn57B3LQ5URhz+gvbZjNPWweG8/B2dvCJ9/3 +akEP62xrQREHacwslwfNmrAnIi/LuoSD76mt/orFmjBdcsdnuIyD/23PcLyR +qgliKl0zayo5qFArKKqzWRNsBSgK9+s5SE1+tXOhVQNq2wp2t7Zz8PElqaSb +g+pgI3JPL7KLHP9Dc3fvp+rQtf7ZtEwvB5vy1gaa31KHyeofJ3Z85KCIwfyl +wBB10LtuUPztOwe3/+B5HPhXDWp7zCJPjXBwjZc4v2W/GthIbAX9MQ4WCSpa +4BM18E2KeBs+xcHvDXlC2WlqMFmfeFl6loO28g+tecPU4Oifi97VfzgoPi83 +lOSsBqJGhboeCxzsGRio1GerwbV91VP//nEwNC8s87eSGvwPtBM6hA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k8VV8XB3BRIZHM071mMkXiXneyFqIMlZQxooRIhsxKpUIR0ahS5I+S +jPekDEU0qDSZh0oZGhEZC/Wc59X5fF+c89ln77V+e2/lXcEOPrw8PDz+i3h4 +/v+c/vDskVpKnqnOcHS4XP9607ZrMjFmXUdh8P55x2Nf1QElX++S6ToDs6pJ +ZvZfjSHS/lYnX1cunH+tqaTz1RJWjkqf+d1ZATsn0w2/f3GEvtpNwZOdDSDy +2WWj6BcfsFL7/n68swXqRG1+3h+IgN+d9PNjnf2wM+jGj2MdCdBocSPvbe4E +CH/r3Zl1/AIo9FV93qW7AOfOn/pMDc8BiUDPW/wWfGgn7Pzrqmk+nFljVbPJ +UQBbUvmu2/Pegu5Mg/pxUWEc5kSd1v9dDJdbi1ZEqgvj7oFEKRQsATcRTc8/ +DGEMtlx510q2BN4do/zl9RbGNr0dRjRGCXwMWsaWuCOM+7yPlF6NLoGv6wbv +0lxFsKhSgJ4yVQKzYxdLD1xfgeFDBmpPvpRCSt7h17yyK3HjHzd6XEcZ2Bj5 +i0mqrkSzyEA++fdlIPDIwVFTbyXGX3t9nTtQBscH1HttzVYipeeIfftYGRxU +af58zn8l/n7X69CzrByCcmT+alSvxNz/jn74ximHLVnlurbbxXBlWJmRdE45 +iOpeCfbwEcNFfqNCwgXl8KrmeEVwsBi6Pzc+s1BUDja9zibnjonhNz6tm6/u +loO53F+L90VieCFw9UeD1+VglGmzPXheDOXdm+9PzpeD9LmBk2evimPrREtu ++LYKkNG5c3y2QBydN4Z+83atALmGxMMeZeLo8zgwdtOOCqCOaUVoNopjaENS +jOSeClC3C/Gq+SqOw0ZSfQEHKmDt4gXawFoJPOHrPmh4vQI2h0sNGj6XQOOw +LnXjbxVgL/T1w8VWCeTQ7/84NVIBDrlV3fPvJPBIt85Y33gFOL1xf/3kpwRi +YBk36k8FeOj+V+0mKYmPPQQUg4S4sHdQP+OolyRWJXxzi9TlQtI2a9OWaUmM +irbaNxHABTnilRzvIincO+jgyxfMhRLxbTNrhKTwo4dGo3AYFzpadpRlKErh +ZyGNmysPcEFtS7jKlg1SyNIyVupI5kLDxuylby5J4QHxKx1bCrmwYDX16iVb +GvmJeUfJfi6kF8QWLVhJ46GzOnOhQ+T7S3lO6G2RRkoEQ/DZVy7YPV5mluoj +jee1zXf6/uTCZQslrl2aNG5SfrxsxzwXTND24os+adx2pfmSmSQBYYzrns+O +yiDfnZ3v35kTYJMjMml7SgZ9nX+auVkSoMJ/8MSr8zLIYMW3tawn4E2bU3nr +TRmUUX+ccMeOgNUhy/k+vJLB9ws1mmZOBHwtiCr4JSeLczbdn0P3EFAnPMSM +UJPFUa3qfbkBBFwId3g9oyeLPpfqdV4FEmBprjc7j7LY3/54s3QoAbnv+635 +/WRR+foL65AYAtwlNo3Ic2VRcKV/FuckAWsP1MRfq5VFep/JkHIKAcv6V0kp +P5HF5Cm5kEWpBFSV8oFGtyyeuyOyuSKdACnbqnSDf7J4va3fqvciOf54NSNL +Wzl0nXV5aZNPwI2vGU1Pt8mhYd3ScwMFBBza/M/dZoccHk8NLYy6SYAepSdh +c6gcZp0bbMwoIiD53ulO14tyuL8o4HVqOQHrfv6JDRqQw2CHRv6CWgJiNpzT +fjgsh47fkrNG7hNQcl2vR3xaDplVubUGdQTIbPNiVAnII/2cW27hQwKG7z2e +4Vstj82LdlN8nxCgLOZ5w4kuj/1X5TWSnxLgtHfWqRDlUcYv5mFhEwH1FJ3K +TVvlMbt4lNv7nICzR9PDL0XL47KM47nLXhPQ1KulNhwvj3V1mtuF3hAwb9TY +apoij7rp6iX8bwnw/TJlOHhVHu3mNDQnWghg2m0fX90oj7XTNvHnOwgIzp/M +iW+Wx5VLGleFdRKQ9zfVvq1dHgU/FOy36yJApLy+NOarPEbktY+PdxPQL6kR +9EhYASvTZGoE3hMgHVxHkZZWwMylq882krZrcnnpr6SAFfbyUrEfCKiMTdFd +sVYBZX+9VOrpI+ezb+y7q4sCPl2Q2OPbT9aLSfLl2zsVsK3L685f0pMZqjb/ +AhTwZqp15ZkBAnascyrMi1PAFUJBncWDBBgW1vj9zFVA7+bKyrLPBPjxOkqb +31bASM+z9RpfCMjaPvrk3B0F3Dm8KimT9FIRZQ1mkwLOhWlsDv5KAMuvuv3U +WwWcPDTk0EY6pH5rQl+PAobkCskYfyOgZ3/i4PERBdzdYv3jG+kVzYrnOqcV +cCG8cY7znVx/9SoLbR4Kurv5taSSjjnkMHFQkIKHTvuHdJMu6fyR+1qMgrr7 +/nUo/SBgwCDBQUWBgtMXPPl3k5ZJpvJGqFMQ/jzk/Y90PHvLTjkTCtanhnlK +DBOwYce1X3RzCtqd39JjQ1rkyI9jjnYUPJDB8jtIuv26iWSYEwVzbJv4C0ln +NSYUpHtRMHlj+v03pL2HWuglARQU+KiXPEFam1/p2YtwCjoLcoJXjhAwvmqf +27dDFCxL2R6kTfqeTfWPpScpWDqw6qQp6cOB/HFqZynYbmX1cCNpq7RtIuZX +KciX6yTjQlq47Hq25w0Kjlz8e9qDdNvbUYO4cgqePjyotYP0lQlWw+UaChbt +KvviSnqX5Mmt9x5TkDkv9MKetBa9Y7D9NQUHKnPbzUmPuahGTnRT0K9IWdCA +9N3YEP6VgxRUy6b7yZA+lHU/c/UoBeN5z4/Pkf9j+WCZtt0sOf8/fxT2kF7+ +0bnGn5eKRzTHMgjSrYvy7ZKWU1FG3LnoJOnLqr/e50lRkVLXOeNK2ssSghuU +qPisVztGnbSm3ymej9pUXFqzbM0wuR6jJ7ozFoyo2L5prXIJaeKWhqo8ULFZ +c5ftXtLmo/WWTlupWPXnzbZOcr0FRUU6wzyoGKB0jp5I+s2a7Xsy/KiY1Oe9 +3YD0joip5OYDVPywxGxfJFlP6hfNFb4nUHHVpg87xL79Pw9OF/OnU7Fp9EZm +IVmPsfNab8zzqPidMf7jGVm/ZtSonV4lVBTZICy4lbQAPvoVd4+KefvTIjrJ ++j9/bIdkVTMV5d4LrmsZIvMzv6igo4OKhm9uF24grfJ0lj75kYp8Fkt9q8n+ +KVt21k1/ioox9abfT5P91ZzxNDufooj53U3b+D6R+cKVWNOoqYjOQ9J52z4S +4Na+s+HjGkVkxQq4Xif796vM/KC8lSJWt3nO6ZL9zZdjoH0mSBErrq11Fu4l +86XkEnGoThG1847JTbaS/dL5amG0SREfBh9zFya9iWfxes8WRTwt4nVXhcwj +b4egbhhSxMjj1AdmZH5ZHVA+fGSJEhq1jbG3NJP9qTj9n5mOEoo6mO6720jA +FDe96be+Et5aQeU520DO1wadkXIjJexZt+xJAJmvCaFeNBVTJfR3rhwXIfP3 +cuPzJt4tSlgt6zSjVU3AI7/skcZIJfQ+nUq7XUqA9TxD7OABJWz/k/HItoSA +V+ltNKMjSjgr2JTz5TYB3VWCR/JOKqGwaoWNxC2yPoTCxRKylDD+gch5szyy +n8s20K0alND3H6aMkPtN4Oz4kSZhZWzX/u198SA5H6G+Up/FlPGRw6farFhy +/b73FPHJKCNLN27RtWgC8nsbO0xVlDHZRtn5XDgBHx6c171DU8aoylMR9uR+ +uTmB0XXdUxmZOdxUge1k/onF6x8oV8bYJyktJ4wJ4EmZepRZSX7vkS9ddC05 +fr4At8oaZRTTsmk7a0DA3imHhPHHyuiXP1p3WofM9y61Xr8eZSw+zPjPTZnc +L7ObErfxqWBiTVG96XICfuuIftBzVMFjGvrcLX1cmL4qF7/WTQXbtOOu7H/H +hckV6moMTxVcWn9AJ72bC6MTjIB1/iooHC5n97CVC/013tNucSrIWPy9Ze4p +F57b3hU5ka+CJ6Q7RNtKyfPJ3h3QP6WCOQLraSpxXGAX3c65cEEVcYBdel+E +C71KRdmWV1RxqFvay408f8VeKLw2ma2KDRtflE7yc+FufEGWQ6EqLt/WsFZl +ERcMXXIyRWpVUc5YfenOiQrQWnIuPfGTKioLFl8IJu8FUp4HjkTqqqH9ylsx +H65WwLiYjZdTgxpSj60aDlOrgMFTXk77+TVQ+cJNw7jF5WD9M8p6iKaJVzc7 +gsLDUhj2FggjDq9Ck7hOrdBVxeR9Qpo3qUELi1JZtaWnboHYS420sp/auLpo +Y/4A5SYonCi1p9F0sZn13P1eUj5k6jBExf30kKGvwVu69j94LmdmPJGxGm/2 +aX3P5r8OTIWGdP0OfXQySjMuzLsKIny54TuPGuAn0/VRsu2XgBqvyHbVWIM9 +KfVjAqIXQFDdvdLh6RqkFve2Y+0ZWM2RLY3yMETyXPc3deQ07P8g1mjDsxb1 +d3SrPrmWDD8nTjlaZ67Ffl/xOGPbRFiv/+SytZ4Rdvq8uO93+Sg8mGDNzbwy +woNi5md+bTsEQbqGPW99jHFcffdVj/5oiJiR++O5xxhHdMUtbzRHw8EGPrnR +AGMcyJW4wHM3GlJc2l2XhRhjkextif6UaLh5PLrbPNYYp9zTb3rSoqH/3YMu +bpox3uh7tNk0LQqcUm07z981xs6k/PcO1pHAGd3d5ipIw7vy3yLVf4SBVM36 +3FohGpbq1gZu7AmD0STtEEURGvbltbvGPwuDa8pjQkNiNMw7yrtI+GYY/N12 +wCJEgYbLnFLaK3zCoK4moyJRn4bd5r911w7sB7OTD9K5jjTsydp6oPdzKFiq +yWwUzqVh9NzorYgVIUCMPFbenUfDh3V9F8sXhYDa3bDp6gIaPvj9SvHnl2BY +bPM6e08RDZUjFyQtyoOhITjxVyNBw5+8Pao964LBtGbyYuxTGr53rJapCQ4C +msPb/i/DNAzX5p6faw2EVUeSoxvodDyfHbRCrs0faln5S+yYdNzJA6u21viD +/UzdmXY2Hcfcx+/m5PpDdNDU7a9mdAywpPLHhPpDk7vXJxE7OhY/TZ5QEPWH +PQyazXYvOlb5xKVobNkDhb8+yU+eoKP46KGhoU++oO3DqFPvoaPOgM6xTazd +cFpl059j7+gY2rKbcmHVbpjs22Xc/4GO2jxnXgxL7oYHbqeKrg3QceDFY/bT +MW9wsO+7KD1Cx0M1jrv0b3hDDCshRJDHBFfB9LpHUt7QtPKt8oi6CZ62nTl1 +n2cX+DzYc5wINcHPJvrpTXOeMLrve5RluAnue2vg+rDHE6IpgXs7Ik3QZHua +TFeVJyQfDHaYPWCCBSFrlT2jPaGMGanETjTBQ27Bw2+md8B85bHaxssmaHQ5 +VtngtwecKb022dJogqH5+Ystxd2hLqdt97gkA5/6rtHTy3SBj3bKnpEyDOzH +xYsiDrkAz+99rnNyDOQErC5q2+0C5lv4Ny1RYuCFiFsmvWtc4MkiJl1Wm4Eq +cXuN+V46Q/OubEEzUwa+K/9ZX8LvDD1qASXpvgw8W62eNp3qCJM3/83o32Xg +DSHhG3E9DvDZySrnZBUDRYj4o6eeOkDX4tQNAzUMDHkX4HGbcIAaL7lLF+oZ +WL732XvqaQc4KmPMXHjGQPfF17JfrnMA0RMBB5+/YyDfQ4UZK+4W0PVr5/Hh +ZaLgXf0J+yx7oEoqFD5YzMRjCxR9vxR7EG3ctUWGn4mW7LnuU7H2MEEdu/5C +iImiGa52S13tobpjmYWhJBPN/pPZViZlDxusMOGfJhM1iDDJYq3N4K1eJHh5 +IxPj7HMfrzXZCLGPdwRo2DPx8KerognSGyHdR+xFhQMTm0ayGDPTdlCbH3Pq +hTMTa6K+cjmVdiChsWHFwk4mJm2pXmNPs4MnGkMSXpFMdLWee7OfbQvaqxSV +NLJJfz4ZNuppDdjUcqTiOhPll7a/VLewBqc9iZ9M85g4p2qRFathDcdujuQ6 +FzIx3lFH7+DIBni3qlb9JJeJB8eyN7w7uAHStFx1hp8y8Z6//8jvnPUwrn2W +VjHGRJ/DQT1/FiyhqxktxSeY+PFgZrH7Z0uoDxrdGj7FxL1sj/D2V5aQVmEd +SvvDRIcc/tNCOZagzeS5Xc3Hwrdp071JFpawy3qfcqMUC9c7/pEuS1sHbX7r +l7exWcgsVvjIMraAGsEpOWNg4YWTlIPOShaQW5SrdcGMhfdm/lUmCVlAyM8F +KxcrFoZoazWo95uDcBQR/24zCx/+WWLqlG4OVonKM4O7WBg0EBEeM2YG9/Lm +Pk2dYCHfo+J8+zoEmkX4jE0KC8Vph3VYxQh3Pg0vz0llYfeVsgj6FYQK6ge6 +zRkW1lW+kPWJQridWZ967QoLdeVCps4YIOScSmCsL2Fh7Lfq4852ACfDV2Rk +trLQorVqfRuLAwLiJwpG2lmY2ZKQ8FGeA4nlPLXmXSz81+13bfk8G46Pjn8e +fsdCLV3aeGMtGw7taWObfWbhfa0x4dvAhv3ul75+m2Xho9uWf61tWeC2ThVZ +VDaqzFgX/4tmwEKbgEijEhtbF0XyBbsxIMdntNdGlY0l6oP9/1gM+JxYFeW2 +io1/5meqE/6ZwP5nm0tjDNk4T/1iQT1hAsmbDlLvWbGRnlVX4ptNh2qX9nmj +YDbOaj4fjhkyBo9v1c9rQ9l4Tr1F4f1zY+CJzclcF87GlBLzCY8yY7C6stdo +Wwwbh8cKKPcOGEPL+0WBYcfY+GR0wPiFuDF837W6t/wiGx+wKvW3WhuB/L6k +qtX1bDS15EipPzOEtH++xikNbPzNb/whnWsIvGesyr88YuOyvolA8WuG8L1y +SWHOMzZavWw84R5mCNU8xzPFWtm418vTe55qCG7njkRND7Fxeb2ntlfsGsis +iTF+IMTB1r+++ZpmBrB8k2u5nAgH3wZbfrBYbQBHPproRYlyUDVaeFO4vAHs +WTKrZiDJwTEeD0HVYX2gb46UyKVyUMCXd3ekiz509O+fSFjDQY/Buw8iTFaD +5LLA8o3OHDx69W9mi4Qu5FnExY65ctAzguU291MHDOPSLM66c1Dxiskd+xc6 +sGmsrL1rJwc/PR2NOHJUBxI7pn57B3LQ5URhz+gvbZjNPWweG8/B2dvCJ9/3 +akEP62xrQREHacwslwfNmrAnIi/LuoSD76mt/orFmjBdcsdnuIyD/23PcLyR +qgliKl0zayo5qFArKKqzWRNsBSgK9+s5SE1+tXOhVQNq2wp2t7Zz8PElqaSb +g+pgI3JPL7KLHP9Dc3fvp+rQtf7ZtEwvB5vy1gaa31KHyeofJ3Z85KCIwfyl +wBB10LtuUPztOwe3/+B5HPhXDWp7zCJPjXBwjZc4v2W/GthIbAX9MQ4WCSpa +4BM18E2KeBs+xcHvDXlC2WlqMFmfeFl6loO28g+tecPU4Oifi97VfzgoPi83 +lOSsBqJGhboeCxzsGRio1GerwbV91VP//nEwNC8s87eSGvwPtBM6hA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08174694559829575}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08174694559829575}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k8VV8XB3BRIZHM071mMkXiXneyFqIMlZQxooRIhsxKpUIR0ahS5I+S +jPekDEU0qDSZh0oZGhEZC/Wc59X5fF+c89ln77V+e2/lXcEOPrw8PDz+i3h4 +/v+c/vDskVpKnqnOcHS4XP9607ZrMjFmXUdh8P55x2Nf1QElX++S6ToDs6pJ +ZvZfjSHS/lYnX1cunH+tqaTz1RJWjkqf+d1ZATsn0w2/f3GEvtpNwZOdDSDy +2WWj6BcfsFL7/n68swXqRG1+3h+IgN+d9PNjnf2wM+jGj2MdCdBocSPvbe4E +CH/r3Zl1/AIo9FV93qW7AOfOn/pMDc8BiUDPW/wWfGgn7Pzrqmk+nFljVbPJ +UQBbUvmu2/Pegu5Mg/pxUWEc5kSd1v9dDJdbi1ZEqgvj7oFEKRQsATcRTc8/ +DGEMtlx510q2BN4do/zl9RbGNr0dRjRGCXwMWsaWuCOM+7yPlF6NLoGv6wbv +0lxFsKhSgJ4yVQKzYxdLD1xfgeFDBmpPvpRCSt7h17yyK3HjHzd6XEcZ2Bj5 +i0mqrkSzyEA++fdlIPDIwVFTbyXGX3t9nTtQBscH1HttzVYipeeIfftYGRxU +af58zn8l/n7X69CzrByCcmT+alSvxNz/jn74ximHLVnlurbbxXBlWJmRdE45 +iOpeCfbwEcNFfqNCwgXl8KrmeEVwsBi6Pzc+s1BUDja9zibnjonhNz6tm6/u +loO53F+L90VieCFw9UeD1+VglGmzPXheDOXdm+9PzpeD9LmBk2evimPrREtu ++LYKkNG5c3y2QBydN4Z+83atALmGxMMeZeLo8zgwdtOOCqCOaUVoNopjaENS +jOSeClC3C/Gq+SqOw0ZSfQEHKmDt4gXawFoJPOHrPmh4vQI2h0sNGj6XQOOw +LnXjbxVgL/T1w8VWCeTQ7/84NVIBDrlV3fPvJPBIt85Y33gFOL1xf/3kpwRi +YBk36k8FeOj+V+0mKYmPPQQUg4S4sHdQP+OolyRWJXxzi9TlQtI2a9OWaUmM +irbaNxHABTnilRzvIincO+jgyxfMhRLxbTNrhKTwo4dGo3AYFzpadpRlKErh +ZyGNmysPcEFtS7jKlg1SyNIyVupI5kLDxuylby5J4QHxKx1bCrmwYDX16iVb +GvmJeUfJfi6kF8QWLVhJ46GzOnOhQ+T7S3lO6G2RRkoEQ/DZVy7YPV5mluoj +jee1zXf6/uTCZQslrl2aNG5SfrxsxzwXTND24os+adx2pfmSmSQBYYzrns+O +yiDfnZ3v35kTYJMjMml7SgZ9nX+auVkSoMJ/8MSr8zLIYMW3tawn4E2bU3nr +TRmUUX+ccMeOgNUhy/k+vJLB9ws1mmZOBHwtiCr4JSeLczbdn0P3EFAnPMSM +UJPFUa3qfbkBBFwId3g9oyeLPpfqdV4FEmBprjc7j7LY3/54s3QoAbnv+635 +/WRR+foL65AYAtwlNo3Ic2VRcKV/FuckAWsP1MRfq5VFep/JkHIKAcv6V0kp +P5HF5Cm5kEWpBFSV8oFGtyyeuyOyuSKdACnbqnSDf7J4va3fqvciOf54NSNL +Wzl0nXV5aZNPwI2vGU1Pt8mhYd3ScwMFBBza/M/dZoccHk8NLYy6SYAepSdh +c6gcZp0bbMwoIiD53ulO14tyuL8o4HVqOQHrfv6JDRqQw2CHRv6CWgJiNpzT +fjgsh47fkrNG7hNQcl2vR3xaDplVubUGdQTIbPNiVAnII/2cW27hQwKG7z2e +4Vstj82LdlN8nxCgLOZ5w4kuj/1X5TWSnxLgtHfWqRDlUcYv5mFhEwH1FJ3K +TVvlMbt4lNv7nICzR9PDL0XL47KM47nLXhPQ1KulNhwvj3V1mtuF3hAwb9TY +apoij7rp6iX8bwnw/TJlOHhVHu3mNDQnWghg2m0fX90oj7XTNvHnOwgIzp/M +iW+Wx5VLGleFdRKQ9zfVvq1dHgU/FOy36yJApLy+NOarPEbktY+PdxPQL6kR +9EhYASvTZGoE3hMgHVxHkZZWwMylq882krZrcnnpr6SAFfbyUrEfCKiMTdFd +sVYBZX+9VOrpI+ezb+y7q4sCPl2Q2OPbT9aLSfLl2zsVsK3L685f0pMZqjb/ +AhTwZqp15ZkBAnascyrMi1PAFUJBncWDBBgW1vj9zFVA7+bKyrLPBPjxOkqb +31bASM+z9RpfCMjaPvrk3B0F3Dm8KimT9FIRZQ1mkwLOhWlsDv5KAMuvuv3U +WwWcPDTk0EY6pH5rQl+PAobkCskYfyOgZ3/i4PERBdzdYv3jG+kVzYrnOqcV +cCG8cY7znVx/9SoLbR4Kurv5taSSjjnkMHFQkIKHTvuHdJMu6fyR+1qMgrr7 +/nUo/SBgwCDBQUWBgtMXPPl3k5ZJpvJGqFMQ/jzk/Y90PHvLTjkTCtanhnlK +DBOwYce1X3RzCtqd39JjQ1rkyI9jjnYUPJDB8jtIuv26iWSYEwVzbJv4C0ln +NSYUpHtRMHlj+v03pL2HWuglARQU+KiXPEFam1/p2YtwCjoLcoJXjhAwvmqf +27dDFCxL2R6kTfqeTfWPpScpWDqw6qQp6cOB/HFqZynYbmX1cCNpq7RtIuZX +KciX6yTjQlq47Hq25w0Kjlz8e9qDdNvbUYO4cgqePjyotYP0lQlWw+UaChbt +KvviSnqX5Mmt9x5TkDkv9MKetBa9Y7D9NQUHKnPbzUmPuahGTnRT0K9IWdCA +9N3YEP6VgxRUy6b7yZA+lHU/c/UoBeN5z4/Pkf9j+WCZtt0sOf8/fxT2kF7+ +0bnGn5eKRzTHMgjSrYvy7ZKWU1FG3LnoJOnLqr/e50lRkVLXOeNK2ssSghuU +qPisVztGnbSm3ymej9pUXFqzbM0wuR6jJ7ozFoyo2L5prXIJaeKWhqo8ULFZ +c5ftXtLmo/WWTlupWPXnzbZOcr0FRUU6wzyoGKB0jp5I+s2a7Xsy/KiY1Oe9 +3YD0joip5OYDVPywxGxfJFlP6hfNFb4nUHHVpg87xL79Pw9OF/OnU7Fp9EZm +IVmPsfNab8zzqPidMf7jGVm/ZtSonV4lVBTZICy4lbQAPvoVd4+KefvTIjrJ ++j9/bIdkVTMV5d4LrmsZIvMzv6igo4OKhm9uF24grfJ0lj75kYp8Fkt9q8n+ +KVt21k1/ioox9abfT5P91ZzxNDufooj53U3b+D6R+cKVWNOoqYjOQ9J52z4S +4Na+s+HjGkVkxQq4Xif796vM/KC8lSJWt3nO6ZL9zZdjoH0mSBErrq11Fu4l +86XkEnGoThG1847JTbaS/dL5amG0SREfBh9zFya9iWfxes8WRTwt4nVXhcwj +b4egbhhSxMjj1AdmZH5ZHVA+fGSJEhq1jbG3NJP9qTj9n5mOEoo6mO6720jA +FDe96be+Et5aQeU520DO1wadkXIjJexZt+xJAJmvCaFeNBVTJfR3rhwXIfP3 +cuPzJt4tSlgt6zSjVU3AI7/skcZIJfQ+nUq7XUqA9TxD7OABJWz/k/HItoSA +V+ltNKMjSjgr2JTz5TYB3VWCR/JOKqGwaoWNxC2yPoTCxRKylDD+gch5szyy +n8s20K0alND3H6aMkPtN4Oz4kSZhZWzX/u198SA5H6G+Up/FlPGRw6farFhy +/b73FPHJKCNLN27RtWgC8nsbO0xVlDHZRtn5XDgBHx6c171DU8aoylMR9uR+ +uTmB0XXdUxmZOdxUge1k/onF6x8oV8bYJyktJ4wJ4EmZepRZSX7vkS9ddC05 +fr4At8oaZRTTsmk7a0DA3imHhPHHyuiXP1p3WofM9y61Xr8eZSw+zPjPTZnc +L7ObErfxqWBiTVG96XICfuuIftBzVMFjGvrcLX1cmL4qF7/WTQXbtOOu7H/H +hckV6moMTxVcWn9AJ72bC6MTjIB1/iooHC5n97CVC/013tNucSrIWPy9Ze4p +F57b3hU5ka+CJ6Q7RNtKyfPJ3h3QP6WCOQLraSpxXGAX3c65cEEVcYBdel+E +C71KRdmWV1RxqFvay408f8VeKLw2ma2KDRtflE7yc+FufEGWQ6EqLt/WsFZl +ERcMXXIyRWpVUc5YfenOiQrQWnIuPfGTKioLFl8IJu8FUp4HjkTqqqH9ylsx +H65WwLiYjZdTgxpSj60aDlOrgMFTXk77+TVQ+cJNw7jF5WD9M8p6iKaJVzc7 +gsLDUhj2FggjDq9Ck7hOrdBVxeR9Qpo3qUELi1JZtaWnboHYS420sp/auLpo +Y/4A5SYonCi1p9F0sZn13P1eUj5k6jBExf30kKGvwVu69j94LmdmPJGxGm/2 +aX3P5r8OTIWGdP0OfXQySjMuzLsKIny54TuPGuAn0/VRsu2XgBqvyHbVWIM9 +KfVjAqIXQFDdvdLh6RqkFve2Y+0ZWM2RLY3yMETyXPc3deQ07P8g1mjDsxb1 +d3SrPrmWDD8nTjlaZ67Ffl/xOGPbRFiv/+SytZ4Rdvq8uO93+Sg8mGDNzbwy +woNi5md+bTsEQbqGPW99jHFcffdVj/5oiJiR++O5xxhHdMUtbzRHw8EGPrnR +AGMcyJW4wHM3GlJc2l2XhRhjkextif6UaLh5PLrbPNYYp9zTb3rSoqH/3YMu +bpox3uh7tNk0LQqcUm07z981xs6k/PcO1pHAGd3d5ipIw7vy3yLVf4SBVM36 +3FohGpbq1gZu7AmD0STtEEURGvbltbvGPwuDa8pjQkNiNMw7yrtI+GYY/N12 +wCJEgYbLnFLaK3zCoK4moyJRn4bd5r911w7sB7OTD9K5jjTsydp6oPdzKFiq +yWwUzqVh9NzorYgVIUCMPFbenUfDh3V9F8sXhYDa3bDp6gIaPvj9SvHnl2BY +bPM6e08RDZUjFyQtyoOhITjxVyNBw5+8Pao964LBtGbyYuxTGr53rJapCQ4C +msPb/i/DNAzX5p6faw2EVUeSoxvodDyfHbRCrs0faln5S+yYdNzJA6u21viD +/UzdmXY2Hcfcx+/m5PpDdNDU7a9mdAywpPLHhPpDk7vXJxE7OhY/TZ5QEPWH +PQyazXYvOlb5xKVobNkDhb8+yU+eoKP46KGhoU++oO3DqFPvoaPOgM6xTazd +cFpl059j7+gY2rKbcmHVbpjs22Xc/4GO2jxnXgxL7oYHbqeKrg3QceDFY/bT +MW9wsO+7KD1Cx0M1jrv0b3hDDCshRJDHBFfB9LpHUt7QtPKt8oi6CZ62nTl1 +n2cX+DzYc5wINcHPJvrpTXOeMLrve5RluAnue2vg+rDHE6IpgXs7Ik3QZHua +TFeVJyQfDHaYPWCCBSFrlT2jPaGMGanETjTBQ27Bw2+md8B85bHaxssmaHQ5 +VtngtwecKb022dJogqH5+Ystxd2hLqdt97gkA5/6rtHTy3SBj3bKnpEyDOzH +xYsiDrkAz+99rnNyDOQErC5q2+0C5lv4Ny1RYuCFiFsmvWtc4MkiJl1Wm4Eq +cXuN+V46Q/OubEEzUwa+K/9ZX8LvDD1qASXpvgw8W62eNp3qCJM3/83o32Xg +DSHhG3E9DvDZySrnZBUDRYj4o6eeOkDX4tQNAzUMDHkX4HGbcIAaL7lLF+oZ +WL732XvqaQc4KmPMXHjGQPfF17JfrnMA0RMBB5+/YyDfQ4UZK+4W0PVr5/Hh +ZaLgXf0J+yx7oEoqFD5YzMRjCxR9vxR7EG3ctUWGn4mW7LnuU7H2MEEdu/5C +iImiGa52S13tobpjmYWhJBPN/pPZViZlDxusMOGfJhM1iDDJYq3N4K1eJHh5 +IxPj7HMfrzXZCLGPdwRo2DPx8KerognSGyHdR+xFhQMTm0ayGDPTdlCbH3Pq +hTMTa6K+cjmVdiChsWHFwk4mJm2pXmNPs4MnGkMSXpFMdLWee7OfbQvaqxSV +NLJJfz4ZNuppDdjUcqTiOhPll7a/VLewBqc9iZ9M85g4p2qRFathDcdujuQ6 +FzIx3lFH7+DIBni3qlb9JJeJB8eyN7w7uAHStFx1hp8y8Z6//8jvnPUwrn2W +VjHGRJ/DQT1/FiyhqxktxSeY+PFgZrH7Z0uoDxrdGj7FxL1sj/D2V5aQVmEd +SvvDRIcc/tNCOZagzeS5Xc3Hwrdp071JFpawy3qfcqMUC9c7/pEuS1sHbX7r +l7exWcgsVvjIMraAGsEpOWNg4YWTlIPOShaQW5SrdcGMhfdm/lUmCVlAyM8F +KxcrFoZoazWo95uDcBQR/24zCx/+WWLqlG4OVonKM4O7WBg0EBEeM2YG9/Lm +Pk2dYCHfo+J8+zoEmkX4jE0KC8Vph3VYxQh3Pg0vz0llYfeVsgj6FYQK6ge6 +zRkW1lW+kPWJQridWZ967QoLdeVCps4YIOScSmCsL2Fh7Lfq4852ACfDV2Rk +trLQorVqfRuLAwLiJwpG2lmY2ZKQ8FGeA4nlPLXmXSz81+13bfk8G46Pjn8e +fsdCLV3aeGMtGw7taWObfWbhfa0x4dvAhv3ul75+m2Xho9uWf61tWeC2ThVZ +VDaqzFgX/4tmwEKbgEijEhtbF0XyBbsxIMdntNdGlY0l6oP9/1gM+JxYFeW2 +io1/5meqE/6ZwP5nm0tjDNk4T/1iQT1hAsmbDlLvWbGRnlVX4ptNh2qX9nmj +YDbOaj4fjhkyBo9v1c9rQ9l4Tr1F4f1zY+CJzclcF87GlBLzCY8yY7C6stdo +Wwwbh8cKKPcOGEPL+0WBYcfY+GR0wPiFuDF837W6t/wiGx+wKvW3WhuB/L6k +qtX1bDS15EipPzOEtH++xikNbPzNb/whnWsIvGesyr88YuOyvolA8WuG8L1y +SWHOMzZavWw84R5mCNU8xzPFWtm418vTe55qCG7njkRND7Fxeb2ntlfsGsis +iTF+IMTB1r+++ZpmBrB8k2u5nAgH3wZbfrBYbQBHPproRYlyUDVaeFO4vAHs +WTKrZiDJwTEeD0HVYX2gb46UyKVyUMCXd3ekiz509O+fSFjDQY/Buw8iTFaD +5LLA8o3OHDx69W9mi4Qu5FnExY65ctAzguU291MHDOPSLM66c1Dxiskd+xc6 +sGmsrL1rJwc/PR2NOHJUBxI7pn57B3LQ5URhz+gvbZjNPWweG8/B2dvCJ9/3 +akEP62xrQREHacwslwfNmrAnIi/LuoSD76mt/orFmjBdcsdnuIyD/23PcLyR +qgliKl0zayo5qFArKKqzWRNsBSgK9+s5SE1+tXOhVQNq2wp2t7Zz8PElqaSb +g+pgI3JPL7KLHP9Dc3fvp+rQtf7ZtEwvB5vy1gaa31KHyeofJ3Z85KCIwfyl +wBB10LtuUPztOwe3/+B5HPhXDWp7zCJPjXBwjZc4v2W/GthIbAX9MQ4WCSpa +4BM18E2KeBs+xcHvDXlC2WlqMFmfeFl6loO28g+tecPU4Oifi97VfzgoPi83 +lOSsBqJGhboeCxzsGRio1GerwbV91VP//nEwNC8s87eSGvwPtBM6hA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08174694559829575}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08174694559829575}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943891063635883`*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"a6ee786c-d135-4464-a747-1715a3fc6bf4"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"344da507-9044-\ -ef47-aa8c-99f282e3d6d3"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[118]:=",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV12k8VV8XB3BRIZHM071mMkXiXneyFqIMlZQxooRIhsxKpUIR0ahS5I+S +jPekDEU0qDSZh0oZGhEZC/Wc59X5fF+c89ln77V+e2/lXcEOPrw8PDz+i3h4 +/v+c/vDskVpKnqnOcHS4XP9607ZrMjFmXUdh8P55x2Nf1QElX++S6ToDs6pJ +ZvZfjSHS/lYnX1cunH+tqaTz1RJWjkqf+d1ZATsn0w2/f3GEvtpNwZOdDSDy +2WWj6BcfsFL7/n68swXqRG1+3h+IgN+d9PNjnf2wM+jGj2MdCdBocSPvbe4E +CH/r3Zl1/AIo9FV93qW7AOfOn/pMDc8BiUDPW/wWfGgn7Pzrqmk+nFljVbPJ +UQBbUvmu2/Pegu5Mg/pxUWEc5kSd1v9dDJdbi1ZEqgvj7oFEKRQsATcRTc8/ +DGEMtlx510q2BN4do/zl9RbGNr0dRjRGCXwMWsaWuCOM+7yPlF6NLoGv6wbv +0lxFsKhSgJ4yVQKzYxdLD1xfgeFDBmpPvpRCSt7h17yyK3HjHzd6XEcZ2Bj5 +i0mqrkSzyEA++fdlIPDIwVFTbyXGX3t9nTtQBscH1HttzVYipeeIfftYGRxU +af58zn8l/n7X69CzrByCcmT+alSvxNz/jn74ximHLVnlurbbxXBlWJmRdE45 +iOpeCfbwEcNFfqNCwgXl8KrmeEVwsBi6Pzc+s1BUDja9zibnjonhNz6tm6/u +loO53F+L90VieCFw9UeD1+VglGmzPXheDOXdm+9PzpeD9LmBk2evimPrREtu ++LYKkNG5c3y2QBydN4Z+83atALmGxMMeZeLo8zgwdtOOCqCOaUVoNopjaENS +jOSeClC3C/Gq+SqOw0ZSfQEHKmDt4gXawFoJPOHrPmh4vQI2h0sNGj6XQOOw +LnXjbxVgL/T1w8VWCeTQ7/84NVIBDrlV3fPvJPBIt85Y33gFOL1xf/3kpwRi +YBk36k8FeOj+V+0mKYmPPQQUg4S4sHdQP+OolyRWJXxzi9TlQtI2a9OWaUmM +irbaNxHABTnilRzvIincO+jgyxfMhRLxbTNrhKTwo4dGo3AYFzpadpRlKErh +ZyGNmysPcEFtS7jKlg1SyNIyVupI5kLDxuylby5J4QHxKx1bCrmwYDX16iVb +GvmJeUfJfi6kF8QWLVhJ46GzOnOhQ+T7S3lO6G2RRkoEQ/DZVy7YPV5mluoj +jee1zXf6/uTCZQslrl2aNG5SfrxsxzwXTND24os+adx2pfmSmSQBYYzrns+O +yiDfnZ3v35kTYJMjMml7SgZ9nX+auVkSoMJ/8MSr8zLIYMW3tawn4E2bU3nr +TRmUUX+ccMeOgNUhy/k+vJLB9ws1mmZOBHwtiCr4JSeLczbdn0P3EFAnPMSM +UJPFUa3qfbkBBFwId3g9oyeLPpfqdV4FEmBprjc7j7LY3/54s3QoAbnv+635 +/WRR+foL65AYAtwlNo3Ic2VRcKV/FuckAWsP1MRfq5VFep/JkHIKAcv6V0kp +P5HF5Cm5kEWpBFSV8oFGtyyeuyOyuSKdACnbqnSDf7J4va3fqvciOf54NSNL +Wzl0nXV5aZNPwI2vGU1Pt8mhYd3ScwMFBBza/M/dZoccHk8NLYy6SYAepSdh +c6gcZp0bbMwoIiD53ulO14tyuL8o4HVqOQHrfv6JDRqQw2CHRv6CWgJiNpzT +fjgsh47fkrNG7hNQcl2vR3xaDplVubUGdQTIbPNiVAnII/2cW27hQwKG7z2e +4Vstj82LdlN8nxCgLOZ5w4kuj/1X5TWSnxLgtHfWqRDlUcYv5mFhEwH1FJ3K +TVvlMbt4lNv7nICzR9PDL0XL47KM47nLXhPQ1KulNhwvj3V1mtuF3hAwb9TY +apoij7rp6iX8bwnw/TJlOHhVHu3mNDQnWghg2m0fX90oj7XTNvHnOwgIzp/M +iW+Wx5VLGleFdRKQ9zfVvq1dHgU/FOy36yJApLy+NOarPEbktY+PdxPQL6kR +9EhYASvTZGoE3hMgHVxHkZZWwMylq882krZrcnnpr6SAFfbyUrEfCKiMTdFd +sVYBZX+9VOrpI+ezb+y7q4sCPl2Q2OPbT9aLSfLl2zsVsK3L685f0pMZqjb/ +AhTwZqp15ZkBAnascyrMi1PAFUJBncWDBBgW1vj9zFVA7+bKyrLPBPjxOkqb +31bASM+z9RpfCMjaPvrk3B0F3Dm8KimT9FIRZQ1mkwLOhWlsDv5KAMuvuv3U +WwWcPDTk0EY6pH5rQl+PAobkCskYfyOgZ3/i4PERBdzdYv3jG+kVzYrnOqcV +cCG8cY7znVx/9SoLbR4Kurv5taSSjjnkMHFQkIKHTvuHdJMu6fyR+1qMgrr7 +/nUo/SBgwCDBQUWBgtMXPPl3k5ZJpvJGqFMQ/jzk/Y90PHvLTjkTCtanhnlK +DBOwYce1X3RzCtqd39JjQ1rkyI9jjnYUPJDB8jtIuv26iWSYEwVzbJv4C0ln +NSYUpHtRMHlj+v03pL2HWuglARQU+KiXPEFam1/p2YtwCjoLcoJXjhAwvmqf +27dDFCxL2R6kTfqeTfWPpScpWDqw6qQp6cOB/HFqZynYbmX1cCNpq7RtIuZX +KciX6yTjQlq47Hq25w0Kjlz8e9qDdNvbUYO4cgqePjyotYP0lQlWw+UaChbt +KvviSnqX5Mmt9x5TkDkv9MKetBa9Y7D9NQUHKnPbzUmPuahGTnRT0K9IWdCA +9N3YEP6VgxRUy6b7yZA+lHU/c/UoBeN5z4/Pkf9j+WCZtt0sOf8/fxT2kF7+ +0bnGn5eKRzTHMgjSrYvy7ZKWU1FG3LnoJOnLqr/e50lRkVLXOeNK2ssSghuU +qPisVztGnbSm3ymej9pUXFqzbM0wuR6jJ7ozFoyo2L5prXIJaeKWhqo8ULFZ +c5ftXtLmo/WWTlupWPXnzbZOcr0FRUU6wzyoGKB0jp5I+s2a7Xsy/KiY1Oe9 +3YD0joip5OYDVPywxGxfJFlP6hfNFb4nUHHVpg87xL79Pw9OF/OnU7Fp9EZm +IVmPsfNab8zzqPidMf7jGVm/ZtSonV4lVBTZICy4lbQAPvoVd4+KefvTIjrJ ++j9/bIdkVTMV5d4LrmsZIvMzv6igo4OKhm9uF24grfJ0lj75kYp8Fkt9q8n+ +KVt21k1/ioox9abfT5P91ZzxNDufooj53U3b+D6R+cKVWNOoqYjOQ9J52z4S +4Na+s+HjGkVkxQq4Xif796vM/KC8lSJWt3nO6ZL9zZdjoH0mSBErrq11Fu4l +86XkEnGoThG1847JTbaS/dL5amG0SREfBh9zFya9iWfxes8WRTwt4nVXhcwj +b4egbhhSxMjj1AdmZH5ZHVA+fGSJEhq1jbG3NJP9qTj9n5mOEoo6mO6720jA +FDe96be+Et5aQeU520DO1wadkXIjJexZt+xJAJmvCaFeNBVTJfR3rhwXIfP3 +cuPzJt4tSlgt6zSjVU3AI7/skcZIJfQ+nUq7XUqA9TxD7OABJWz/k/HItoSA +V+ltNKMjSjgr2JTz5TYB3VWCR/JOKqGwaoWNxC2yPoTCxRKylDD+gch5szyy +n8s20K0alND3H6aMkPtN4Oz4kSZhZWzX/u198SA5H6G+Up/FlPGRw6farFhy +/b73FPHJKCNLN27RtWgC8nsbO0xVlDHZRtn5XDgBHx6c171DU8aoylMR9uR+ +uTmB0XXdUxmZOdxUge1k/onF6x8oV8bYJyktJ4wJ4EmZepRZSX7vkS9ddC05 +fr4At8oaZRTTsmk7a0DA3imHhPHHyuiXP1p3WofM9y61Xr8eZSw+zPjPTZnc +L7ObErfxqWBiTVG96XICfuuIftBzVMFjGvrcLX1cmL4qF7/WTQXbtOOu7H/H +hckV6moMTxVcWn9AJ72bC6MTjIB1/iooHC5n97CVC/013tNucSrIWPy9Ze4p +F57b3hU5ka+CJ6Q7RNtKyfPJ3h3QP6WCOQLraSpxXGAX3c65cEEVcYBdel+E +C71KRdmWV1RxqFvay408f8VeKLw2ma2KDRtflE7yc+FufEGWQ6EqLt/WsFZl +ERcMXXIyRWpVUc5YfenOiQrQWnIuPfGTKioLFl8IJu8FUp4HjkTqqqH9ylsx +H65WwLiYjZdTgxpSj60aDlOrgMFTXk77+TVQ+cJNw7jF5WD9M8p6iKaJVzc7 +gsLDUhj2FggjDq9Ck7hOrdBVxeR9Qpo3qUELi1JZtaWnboHYS420sp/auLpo +Y/4A5SYonCi1p9F0sZn13P1eUj5k6jBExf30kKGvwVu69j94LmdmPJGxGm/2 +aX3P5r8OTIWGdP0OfXQySjMuzLsKIny54TuPGuAn0/VRsu2XgBqvyHbVWIM9 +KfVjAqIXQFDdvdLh6RqkFve2Y+0ZWM2RLY3yMETyXPc3deQ07P8g1mjDsxb1 +d3SrPrmWDD8nTjlaZ67Ffl/xOGPbRFiv/+SytZ4Rdvq8uO93+Sg8mGDNzbwy +woNi5md+bTsEQbqGPW99jHFcffdVj/5oiJiR++O5xxhHdMUtbzRHw8EGPrnR +AGMcyJW4wHM3GlJc2l2XhRhjkextif6UaLh5PLrbPNYYp9zTb3rSoqH/3YMu +bpox3uh7tNk0LQqcUm07z981xs6k/PcO1pHAGd3d5ipIw7vy3yLVf4SBVM36 +3FohGpbq1gZu7AmD0STtEEURGvbltbvGPwuDa8pjQkNiNMw7yrtI+GYY/N12 +wCJEgYbLnFLaK3zCoK4moyJRn4bd5r911w7sB7OTD9K5jjTsydp6oPdzKFiq +yWwUzqVh9NzorYgVIUCMPFbenUfDh3V9F8sXhYDa3bDp6gIaPvj9SvHnl2BY +bPM6e08RDZUjFyQtyoOhITjxVyNBw5+8Pao964LBtGbyYuxTGr53rJapCQ4C +msPb/i/DNAzX5p6faw2EVUeSoxvodDyfHbRCrs0faln5S+yYdNzJA6u21viD +/UzdmXY2Hcfcx+/m5PpDdNDU7a9mdAywpPLHhPpDk7vXJxE7OhY/TZ5QEPWH +PQyazXYvOlb5xKVobNkDhb8+yU+eoKP46KGhoU++oO3DqFPvoaPOgM6xTazd +cFpl059j7+gY2rKbcmHVbpjs22Xc/4GO2jxnXgxL7oYHbqeKrg3QceDFY/bT +MW9wsO+7KD1Cx0M1jrv0b3hDDCshRJDHBFfB9LpHUt7QtPKt8oi6CZ62nTl1 +n2cX+DzYc5wINcHPJvrpTXOeMLrve5RluAnue2vg+rDHE6IpgXs7Ik3QZHua +TFeVJyQfDHaYPWCCBSFrlT2jPaGMGanETjTBQ27Bw2+md8B85bHaxssmaHQ5 +VtngtwecKb022dJogqH5+Ystxd2hLqdt97gkA5/6rtHTy3SBj3bKnpEyDOzH +xYsiDrkAz+99rnNyDOQErC5q2+0C5lv4Ny1RYuCFiFsmvWtc4MkiJl1Wm4Eq +cXuN+V46Q/OubEEzUwa+K/9ZX8LvDD1qASXpvgw8W62eNp3qCJM3/83o32Xg +DSHhG3E9DvDZySrnZBUDRYj4o6eeOkDX4tQNAzUMDHkX4HGbcIAaL7lLF+oZ +WL732XvqaQc4KmPMXHjGQPfF17JfrnMA0RMBB5+/YyDfQ4UZK+4W0PVr5/Hh +ZaLgXf0J+yx7oEoqFD5YzMRjCxR9vxR7EG3ctUWGn4mW7LnuU7H2MEEdu/5C +iImiGa52S13tobpjmYWhJBPN/pPZViZlDxusMOGfJhM1iDDJYq3N4K1eJHh5 +IxPj7HMfrzXZCLGPdwRo2DPx8KerognSGyHdR+xFhQMTm0ayGDPTdlCbH3Pq +hTMTa6K+cjmVdiChsWHFwk4mJm2pXmNPs4MnGkMSXpFMdLWee7OfbQvaqxSV +NLJJfz4ZNuppDdjUcqTiOhPll7a/VLewBqc9iZ9M85g4p2qRFathDcdujuQ6 +FzIx3lFH7+DIBni3qlb9JJeJB8eyN7w7uAHStFx1hp8y8Z6//8jvnPUwrn2W +VjHGRJ/DQT1/FiyhqxktxSeY+PFgZrH7Z0uoDxrdGj7FxL1sj/D2V5aQVmEd +SvvDRIcc/tNCOZagzeS5Xc3Hwrdp071JFpawy3qfcqMUC9c7/pEuS1sHbX7r +l7exWcgsVvjIMraAGsEpOWNg4YWTlIPOShaQW5SrdcGMhfdm/lUmCVlAyM8F +KxcrFoZoazWo95uDcBQR/24zCx/+WWLqlG4OVonKM4O7WBg0EBEeM2YG9/Lm +Pk2dYCHfo+J8+zoEmkX4jE0KC8Vph3VYxQh3Pg0vz0llYfeVsgj6FYQK6ge6 +zRkW1lW+kPWJQridWZ967QoLdeVCps4YIOScSmCsL2Fh7Lfq4852ACfDV2Rk +trLQorVqfRuLAwLiJwpG2lmY2ZKQ8FGeA4nlPLXmXSz81+13bfk8G46Pjn8e +fsdCLV3aeGMtGw7taWObfWbhfa0x4dvAhv3ul75+m2Xho9uWf61tWeC2ThVZ +VDaqzFgX/4tmwEKbgEijEhtbF0XyBbsxIMdntNdGlY0l6oP9/1gM+JxYFeW2 +io1/5meqE/6ZwP5nm0tjDNk4T/1iQT1hAsmbDlLvWbGRnlVX4ptNh2qX9nmj +YDbOaj4fjhkyBo9v1c9rQ9l4Tr1F4f1zY+CJzclcF87GlBLzCY8yY7C6stdo +Wwwbh8cKKPcOGEPL+0WBYcfY+GR0wPiFuDF837W6t/wiGx+wKvW3WhuB/L6k +qtX1bDS15EipPzOEtH++xikNbPzNb/whnWsIvGesyr88YuOyvolA8WuG8L1y +SWHOMzZavWw84R5mCNU8xzPFWtm418vTe55qCG7njkRND7Fxeb2ntlfsGsis +iTF+IMTB1r+++ZpmBrB8k2u5nAgH3wZbfrBYbQBHPproRYlyUDVaeFO4vAHs +WTKrZiDJwTEeD0HVYX2gb46UyKVyUMCXd3ekiz509O+fSFjDQY/Buw8iTFaD +5LLA8o3OHDx69W9mi4Qu5FnExY65ctAzguU291MHDOPSLM66c1Dxiskd+xc6 +sGmsrL1rJwc/PR2NOHJUBxI7pn57B3LQ5URhz+gvbZjNPWweG8/B2dvCJ9/3 +akEP62xrQREHacwslwfNmrAnIi/LuoSD76mt/orFmjBdcsdnuIyD/23PcLyR +qgliKl0zayo5qFArKKqzWRNsBSgK9+s5SE1+tXOhVQNq2wp2t7Zz8PElqaSb +g+pgI3JPL7KLHP9Dc3fvp+rQtf7ZtEwvB5vy1gaa31KHyeofJ3Z85KCIwfyl +wBB10LtuUPztOwe3/+B5HPhXDWp7zCJPjXBwjZc4v2W/GthIbAX9MQ4WCSpa +4BM18E2KeBs+xcHvDXlC2WlqMFmfeFl6loO28g+tecPU4Oifi97VfzgoPi83 +lOSsBqJGhboeCxzsGRio1GerwbV91VP//nEwNC8s87eSGvwPtBM6hA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k8VV8XB3BRIZHM071mMkXiXneyFqIMlZQxooRIhsxKpUIR0ahS5I+S +jPekDEU0qDSZh0oZGhEZC/Wc59X5fF+c89ln77V+e2/lXcEOPrw8PDz+i3h4 +/v+c/vDskVpKnqnOcHS4XP9607ZrMjFmXUdh8P55x2Nf1QElX++S6ToDs6pJ +ZvZfjSHS/lYnX1cunH+tqaTz1RJWjkqf+d1ZATsn0w2/f3GEvtpNwZOdDSDy +2WWj6BcfsFL7/n68swXqRG1+3h+IgN+d9PNjnf2wM+jGj2MdCdBocSPvbe4E +CH/r3Zl1/AIo9FV93qW7AOfOn/pMDc8BiUDPW/wWfGgn7Pzrqmk+nFljVbPJ +UQBbUvmu2/Pegu5Mg/pxUWEc5kSd1v9dDJdbi1ZEqgvj7oFEKRQsATcRTc8/ +DGEMtlx510q2BN4do/zl9RbGNr0dRjRGCXwMWsaWuCOM+7yPlF6NLoGv6wbv +0lxFsKhSgJ4yVQKzYxdLD1xfgeFDBmpPvpRCSt7h17yyK3HjHzd6XEcZ2Bj5 +i0mqrkSzyEA++fdlIPDIwVFTbyXGX3t9nTtQBscH1HttzVYipeeIfftYGRxU +af58zn8l/n7X69CzrByCcmT+alSvxNz/jn74ximHLVnlurbbxXBlWJmRdE45 +iOpeCfbwEcNFfqNCwgXl8KrmeEVwsBi6Pzc+s1BUDja9zibnjonhNz6tm6/u +loO53F+L90VieCFw9UeD1+VglGmzPXheDOXdm+9PzpeD9LmBk2evimPrREtu ++LYKkNG5c3y2QBydN4Z+83atALmGxMMeZeLo8zgwdtOOCqCOaUVoNopjaENS +jOSeClC3C/Gq+SqOw0ZSfQEHKmDt4gXawFoJPOHrPmh4vQI2h0sNGj6XQOOw +LnXjbxVgL/T1w8VWCeTQ7/84NVIBDrlV3fPvJPBIt85Y33gFOL1xf/3kpwRi +YBk36k8FeOj+V+0mKYmPPQQUg4S4sHdQP+OolyRWJXxzi9TlQtI2a9OWaUmM +irbaNxHABTnilRzvIincO+jgyxfMhRLxbTNrhKTwo4dGo3AYFzpadpRlKErh +ZyGNmysPcEFtS7jKlg1SyNIyVupI5kLDxuylby5J4QHxKx1bCrmwYDX16iVb +GvmJeUfJfi6kF8QWLVhJ46GzOnOhQ+T7S3lO6G2RRkoEQ/DZVy7YPV5mluoj +jee1zXf6/uTCZQslrl2aNG5SfrxsxzwXTND24os+adx2pfmSmSQBYYzrns+O +yiDfnZ3v35kTYJMjMml7SgZ9nX+auVkSoMJ/8MSr8zLIYMW3tawn4E2bU3nr +TRmUUX+ccMeOgNUhy/k+vJLB9ws1mmZOBHwtiCr4JSeLczbdn0P3EFAnPMSM +UJPFUa3qfbkBBFwId3g9oyeLPpfqdV4FEmBprjc7j7LY3/54s3QoAbnv+635 +/WRR+foL65AYAtwlNo3Ic2VRcKV/FuckAWsP1MRfq5VFep/JkHIKAcv6V0kp +P5HF5Cm5kEWpBFSV8oFGtyyeuyOyuSKdACnbqnSDf7J4va3fqvciOf54NSNL +Wzl0nXV5aZNPwI2vGU1Pt8mhYd3ScwMFBBza/M/dZoccHk8NLYy6SYAepSdh +c6gcZp0bbMwoIiD53ulO14tyuL8o4HVqOQHrfv6JDRqQw2CHRv6CWgJiNpzT +fjgsh47fkrNG7hNQcl2vR3xaDplVubUGdQTIbPNiVAnII/2cW27hQwKG7z2e +4Vstj82LdlN8nxCgLOZ5w4kuj/1X5TWSnxLgtHfWqRDlUcYv5mFhEwH1FJ3K +TVvlMbt4lNv7nICzR9PDL0XL47KM47nLXhPQ1KulNhwvj3V1mtuF3hAwb9TY +apoij7rp6iX8bwnw/TJlOHhVHu3mNDQnWghg2m0fX90oj7XTNvHnOwgIzp/M +iW+Wx5VLGleFdRKQ9zfVvq1dHgU/FOy36yJApLy+NOarPEbktY+PdxPQL6kR +9EhYASvTZGoE3hMgHVxHkZZWwMylq882krZrcnnpr6SAFfbyUrEfCKiMTdFd +sVYBZX+9VOrpI+ezb+y7q4sCPl2Q2OPbT9aLSfLl2zsVsK3L685f0pMZqjb/ +AhTwZqp15ZkBAnascyrMi1PAFUJBncWDBBgW1vj9zFVA7+bKyrLPBPjxOkqb +31bASM+z9RpfCMjaPvrk3B0F3Dm8KimT9FIRZQ1mkwLOhWlsDv5KAMuvuv3U +WwWcPDTk0EY6pH5rQl+PAobkCskYfyOgZ3/i4PERBdzdYv3jG+kVzYrnOqcV +cCG8cY7znVx/9SoLbR4Kurv5taSSjjnkMHFQkIKHTvuHdJMu6fyR+1qMgrr7 +/nUo/SBgwCDBQUWBgtMXPPl3k5ZJpvJGqFMQ/jzk/Y90PHvLTjkTCtanhnlK +DBOwYce1X3RzCtqd39JjQ1rkyI9jjnYUPJDB8jtIuv26iWSYEwVzbJv4C0ln +NSYUpHtRMHlj+v03pL2HWuglARQU+KiXPEFam1/p2YtwCjoLcoJXjhAwvmqf +27dDFCxL2R6kTfqeTfWPpScpWDqw6qQp6cOB/HFqZynYbmX1cCNpq7RtIuZX +KciX6yTjQlq47Hq25w0Kjlz8e9qDdNvbUYO4cgqePjyotYP0lQlWw+UaChbt +KvviSnqX5Mmt9x5TkDkv9MKetBa9Y7D9NQUHKnPbzUmPuahGTnRT0K9IWdCA +9N3YEP6VgxRUy6b7yZA+lHU/c/UoBeN5z4/Pkf9j+WCZtt0sOf8/fxT2kF7+ +0bnGn5eKRzTHMgjSrYvy7ZKWU1FG3LnoJOnLqr/e50lRkVLXOeNK2ssSghuU +qPisVztGnbSm3ymej9pUXFqzbM0wuR6jJ7ozFoyo2L5prXIJaeKWhqo8ULFZ +c5ftXtLmo/WWTlupWPXnzbZOcr0FRUU6wzyoGKB0jp5I+s2a7Xsy/KiY1Oe9 +3YD0joip5OYDVPywxGxfJFlP6hfNFb4nUHHVpg87xL79Pw9OF/OnU7Fp9EZm +IVmPsfNab8zzqPidMf7jGVm/ZtSonV4lVBTZICy4lbQAPvoVd4+KefvTIjrJ ++j9/bIdkVTMV5d4LrmsZIvMzv6igo4OKhm9uF24grfJ0lj75kYp8Fkt9q8n+ +KVt21k1/ioox9abfT5P91ZzxNDufooj53U3b+D6R+cKVWNOoqYjOQ9J52z4S +4Na+s+HjGkVkxQq4Xif796vM/KC8lSJWt3nO6ZL9zZdjoH0mSBErrq11Fu4l +86XkEnGoThG1847JTbaS/dL5amG0SREfBh9zFya9iWfxes8WRTwt4nVXhcwj +b4egbhhSxMjj1AdmZH5ZHVA+fGSJEhq1jbG3NJP9qTj9n5mOEoo6mO6720jA +FDe96be+Et5aQeU520DO1wadkXIjJexZt+xJAJmvCaFeNBVTJfR3rhwXIfP3 +cuPzJt4tSlgt6zSjVU3AI7/skcZIJfQ+nUq7XUqA9TxD7OABJWz/k/HItoSA +V+ltNKMjSjgr2JTz5TYB3VWCR/JOKqGwaoWNxC2yPoTCxRKylDD+gch5szyy +n8s20K0alND3H6aMkPtN4Oz4kSZhZWzX/u198SA5H6G+Up/FlPGRw6farFhy +/b73FPHJKCNLN27RtWgC8nsbO0xVlDHZRtn5XDgBHx6c171DU8aoylMR9uR+ +uTmB0XXdUxmZOdxUge1k/onF6x8oV8bYJyktJ4wJ4EmZepRZSX7vkS9ddC05 +fr4At8oaZRTTsmk7a0DA3imHhPHHyuiXP1p3WofM9y61Xr8eZSw+zPjPTZnc +L7ObErfxqWBiTVG96XICfuuIftBzVMFjGvrcLX1cmL4qF7/WTQXbtOOu7H/H +hckV6moMTxVcWn9AJ72bC6MTjIB1/iooHC5n97CVC/013tNucSrIWPy9Ze4p +F57b3hU5ka+CJ6Q7RNtKyfPJ3h3QP6WCOQLraSpxXGAX3c65cEEVcYBdel+E +C71KRdmWV1RxqFvay408f8VeKLw2ma2KDRtflE7yc+FufEGWQ6EqLt/WsFZl +ERcMXXIyRWpVUc5YfenOiQrQWnIuPfGTKioLFl8IJu8FUp4HjkTqqqH9ylsx +H65WwLiYjZdTgxpSj60aDlOrgMFTXk77+TVQ+cJNw7jF5WD9M8p6iKaJVzc7 +gsLDUhj2FggjDq9Ck7hOrdBVxeR9Qpo3qUELi1JZtaWnboHYS420sp/auLpo +Y/4A5SYonCi1p9F0sZn13P1eUj5k6jBExf30kKGvwVu69j94LmdmPJGxGm/2 +aX3P5r8OTIWGdP0OfXQySjMuzLsKIny54TuPGuAn0/VRsu2XgBqvyHbVWIM9 +KfVjAqIXQFDdvdLh6RqkFve2Y+0ZWM2RLY3yMETyXPc3deQ07P8g1mjDsxb1 +d3SrPrmWDD8nTjlaZ67Ffl/xOGPbRFiv/+SytZ4Rdvq8uO93+Sg8mGDNzbwy +woNi5md+bTsEQbqGPW99jHFcffdVj/5oiJiR++O5xxhHdMUtbzRHw8EGPrnR +AGMcyJW4wHM3GlJc2l2XhRhjkextif6UaLh5PLrbPNYYp9zTb3rSoqH/3YMu +bpox3uh7tNk0LQqcUm07z981xs6k/PcO1pHAGd3d5ipIw7vy3yLVf4SBVM36 +3FohGpbq1gZu7AmD0STtEEURGvbltbvGPwuDa8pjQkNiNMw7yrtI+GYY/N12 +wCJEgYbLnFLaK3zCoK4moyJRn4bd5r911w7sB7OTD9K5jjTsydp6oPdzKFiq +yWwUzqVh9NzorYgVIUCMPFbenUfDh3V9F8sXhYDa3bDp6gIaPvj9SvHnl2BY +bPM6e08RDZUjFyQtyoOhITjxVyNBw5+8Pao964LBtGbyYuxTGr53rJapCQ4C +msPb/i/DNAzX5p6faw2EVUeSoxvodDyfHbRCrs0faln5S+yYdNzJA6u21viD +/UzdmXY2Hcfcx+/m5PpDdNDU7a9mdAywpPLHhPpDk7vXJxE7OhY/TZ5QEPWH +PQyazXYvOlb5xKVobNkDhb8+yU+eoKP46KGhoU++oO3DqFPvoaPOgM6xTazd +cFpl059j7+gY2rKbcmHVbpjs22Xc/4GO2jxnXgxL7oYHbqeKrg3QceDFY/bT +MW9wsO+7KD1Cx0M1jrv0b3hDDCshRJDHBFfB9LpHUt7QtPKt8oi6CZ62nTl1 +n2cX+DzYc5wINcHPJvrpTXOeMLrve5RluAnue2vg+rDHE6IpgXs7Ik3QZHua +TFeVJyQfDHaYPWCCBSFrlT2jPaGMGanETjTBQ27Bw2+md8B85bHaxssmaHQ5 +VtngtwecKb022dJogqH5+Ystxd2hLqdt97gkA5/6rtHTy3SBj3bKnpEyDOzH +xYsiDrkAz+99rnNyDOQErC5q2+0C5lv4Ny1RYuCFiFsmvWtc4MkiJl1Wm4Eq +cXuN+V46Q/OubEEzUwa+K/9ZX8LvDD1qASXpvgw8W62eNp3qCJM3/83o32Xg +DSHhG3E9DvDZySrnZBUDRYj4o6eeOkDX4tQNAzUMDHkX4HGbcIAaL7lLF+oZ +WL732XvqaQc4KmPMXHjGQPfF17JfrnMA0RMBB5+/YyDfQ4UZK+4W0PVr5/Hh +ZaLgXf0J+yx7oEoqFD5YzMRjCxR9vxR7EG3ctUWGn4mW7LnuU7H2MEEdu/5C +iImiGa52S13tobpjmYWhJBPN/pPZViZlDxusMOGfJhM1iDDJYq3N4K1eJHh5 +IxPj7HMfrzXZCLGPdwRo2DPx8KerognSGyHdR+xFhQMTm0ayGDPTdlCbH3Pq +hTMTa6K+cjmVdiChsWHFwk4mJm2pXmNPs4MnGkMSXpFMdLWee7OfbQvaqxSV +NLJJfz4ZNuppDdjUcqTiOhPll7a/VLewBqc9iZ9M85g4p2qRFathDcdujuQ6 +FzIx3lFH7+DIBni3qlb9JJeJB8eyN7w7uAHStFx1hp8y8Z6//8jvnPUwrn2W +VjHGRJ/DQT1/FiyhqxktxSeY+PFgZrH7Z0uoDxrdGj7FxL1sj/D2V5aQVmEd +SvvDRIcc/tNCOZagzeS5Xc3Hwrdp071JFpawy3qfcqMUC9c7/pEuS1sHbX7r +l7exWcgsVvjIMraAGsEpOWNg4YWTlIPOShaQW5SrdcGMhfdm/lUmCVlAyM8F +KxcrFoZoazWo95uDcBQR/24zCx/+WWLqlG4OVonKM4O7WBg0EBEeM2YG9/Lm +Pk2dYCHfo+J8+zoEmkX4jE0KC8Vph3VYxQh3Pg0vz0llYfeVsgj6FYQK6ge6 +zRkW1lW+kPWJQridWZ967QoLdeVCps4YIOScSmCsL2Fh7Lfq4852ACfDV2Rk +trLQorVqfRuLAwLiJwpG2lmY2ZKQ8FGeA4nlPLXmXSz81+13bfk8G46Pjn8e +fsdCLV3aeGMtGw7taWObfWbhfa0x4dvAhv3ul75+m2Xho9uWf61tWeC2ThVZ +VDaqzFgX/4tmwEKbgEijEhtbF0XyBbsxIMdntNdGlY0l6oP9/1gM+JxYFeW2 +io1/5meqE/6ZwP5nm0tjDNk4T/1iQT1hAsmbDlLvWbGRnlVX4ptNh2qX9nmj +YDbOaj4fjhkyBo9v1c9rQ9l4Tr1F4f1zY+CJzclcF87GlBLzCY8yY7C6stdo +Wwwbh8cKKPcOGEPL+0WBYcfY+GR0wPiFuDF837W6t/wiGx+wKvW3WhuB/L6k +qtX1bDS15EipPzOEtH++xikNbPzNb/whnWsIvGesyr88YuOyvolA8WuG8L1y +SWHOMzZavWw84R5mCNU8xzPFWtm418vTe55qCG7njkRND7Fxeb2ntlfsGsis +iTF+IMTB1r+++ZpmBrB8k2u5nAgH3wZbfrBYbQBHPproRYlyUDVaeFO4vAHs +WTKrZiDJwTEeD0HVYX2gb46UyKVyUMCXd3ekiz509O+fSFjDQY/Buw8iTFaD +5LLA8o3OHDx69W9mi4Qu5FnExY65ctAzguU291MHDOPSLM66c1Dxiskd+xc6 +sGmsrL1rJwc/PR2NOHJUBxI7pn57B3LQ5URhz+gvbZjNPWweG8/B2dvCJ9/3 +akEP62xrQREHacwslwfNmrAnIi/LuoSD76mt/orFmjBdcsdnuIyD/23PcLyR +qgliKl0zayo5qFArKKqzWRNsBSgK9+s5SE1+tXOhVQNq2wp2t7Zz8PElqaSb +g+pgI3JPL7KLHP9Dc3fvp+rQtf7ZtEwvB5vy1gaa31KHyeofJ3Z85KCIwfyl +wBB10LtuUPztOwe3/+B5HPhXDWp7zCJPjXBwjZc4v2W/GthIbAX9MQ4WCSpa +4BM18E2KeBs+xcHvDXlC2WlqMFmfeFl6loO28g+tecPU4Oifi97VfzgoPi83 +lOSsBqJGhboeCxzsGRio1GerwbV91VP//nEwNC8s87eSGvwPtBM6hA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08174694559829575}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08174694559829575}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k8VV8XB3BRIZHM071mMkXiXneyFqIMlZQxooRIhsxKpUIR0ahS5I+S +jPekDEU0qDSZh0oZGhEZC/Wc59X5fF+c89ln77V+e2/lXcEOPrw8PDz+i3h4 +/v+c/vDskVpKnqnOcHS4XP9607ZrMjFmXUdh8P55x2Nf1QElX++S6ToDs6pJ +ZvZfjSHS/lYnX1cunH+tqaTz1RJWjkqf+d1ZATsn0w2/f3GEvtpNwZOdDSDy +2WWj6BcfsFL7/n68swXqRG1+3h+IgN+d9PNjnf2wM+jGj2MdCdBocSPvbe4E +CH/r3Zl1/AIo9FV93qW7AOfOn/pMDc8BiUDPW/wWfGgn7Pzrqmk+nFljVbPJ +UQBbUvmu2/Pegu5Mg/pxUWEc5kSd1v9dDJdbi1ZEqgvj7oFEKRQsATcRTc8/ +DGEMtlx510q2BN4do/zl9RbGNr0dRjRGCXwMWsaWuCOM+7yPlF6NLoGv6wbv +0lxFsKhSgJ4yVQKzYxdLD1xfgeFDBmpPvpRCSt7h17yyK3HjHzd6XEcZ2Bj5 +i0mqrkSzyEA++fdlIPDIwVFTbyXGX3t9nTtQBscH1HttzVYipeeIfftYGRxU +af58zn8l/n7X69CzrByCcmT+alSvxNz/jn74ximHLVnlurbbxXBlWJmRdE45 +iOpeCfbwEcNFfqNCwgXl8KrmeEVwsBi6Pzc+s1BUDja9zibnjonhNz6tm6/u +loO53F+L90VieCFw9UeD1+VglGmzPXheDOXdm+9PzpeD9LmBk2evimPrREtu ++LYKkNG5c3y2QBydN4Z+83atALmGxMMeZeLo8zgwdtOOCqCOaUVoNopjaENS +jOSeClC3C/Gq+SqOw0ZSfQEHKmDt4gXawFoJPOHrPmh4vQI2h0sNGj6XQOOw +LnXjbxVgL/T1w8VWCeTQ7/84NVIBDrlV3fPvJPBIt85Y33gFOL1xf/3kpwRi +YBk36k8FeOj+V+0mKYmPPQQUg4S4sHdQP+OolyRWJXxzi9TlQtI2a9OWaUmM +irbaNxHABTnilRzvIincO+jgyxfMhRLxbTNrhKTwo4dGo3AYFzpadpRlKErh +ZyGNmysPcEFtS7jKlg1SyNIyVupI5kLDxuylby5J4QHxKx1bCrmwYDX16iVb +GvmJeUfJfi6kF8QWLVhJ46GzOnOhQ+T7S3lO6G2RRkoEQ/DZVy7YPV5mluoj +jee1zXf6/uTCZQslrl2aNG5SfrxsxzwXTND24os+adx2pfmSmSQBYYzrns+O +yiDfnZ3v35kTYJMjMml7SgZ9nX+auVkSoMJ/8MSr8zLIYMW3tawn4E2bU3nr +TRmUUX+ccMeOgNUhy/k+vJLB9ws1mmZOBHwtiCr4JSeLczbdn0P3EFAnPMSM +UJPFUa3qfbkBBFwId3g9oyeLPpfqdV4FEmBprjc7j7LY3/54s3QoAbnv+635 +/WRR+foL65AYAtwlNo3Ic2VRcKV/FuckAWsP1MRfq5VFep/JkHIKAcv6V0kp +P5HF5Cm5kEWpBFSV8oFGtyyeuyOyuSKdACnbqnSDf7J4va3fqvciOf54NSNL +Wzl0nXV5aZNPwI2vGU1Pt8mhYd3ScwMFBBza/M/dZoccHk8NLYy6SYAepSdh +c6gcZp0bbMwoIiD53ulO14tyuL8o4HVqOQHrfv6JDRqQw2CHRv6CWgJiNpzT +fjgsh47fkrNG7hNQcl2vR3xaDplVubUGdQTIbPNiVAnII/2cW27hQwKG7z2e +4Vstj82LdlN8nxCgLOZ5w4kuj/1X5TWSnxLgtHfWqRDlUcYv5mFhEwH1FJ3K +TVvlMbt4lNv7nICzR9PDL0XL47KM47nLXhPQ1KulNhwvj3V1mtuF3hAwb9TY +apoij7rp6iX8bwnw/TJlOHhVHu3mNDQnWghg2m0fX90oj7XTNvHnOwgIzp/M +iW+Wx5VLGleFdRKQ9zfVvq1dHgU/FOy36yJApLy+NOarPEbktY+PdxPQL6kR +9EhYASvTZGoE3hMgHVxHkZZWwMylq882krZrcnnpr6SAFfbyUrEfCKiMTdFd +sVYBZX+9VOrpI+ezb+y7q4sCPl2Q2OPbT9aLSfLl2zsVsK3L685f0pMZqjb/ +AhTwZqp15ZkBAnascyrMi1PAFUJBncWDBBgW1vj9zFVA7+bKyrLPBPjxOkqb +31bASM+z9RpfCMjaPvrk3B0F3Dm8KimT9FIRZQ1mkwLOhWlsDv5KAMuvuv3U +WwWcPDTk0EY6pH5rQl+PAobkCskYfyOgZ3/i4PERBdzdYv3jG+kVzYrnOqcV +cCG8cY7znVx/9SoLbR4Kurv5taSSjjnkMHFQkIKHTvuHdJMu6fyR+1qMgrr7 +/nUo/SBgwCDBQUWBgtMXPPl3k5ZJpvJGqFMQ/jzk/Y90PHvLTjkTCtanhnlK +DBOwYce1X3RzCtqd39JjQ1rkyI9jjnYUPJDB8jtIuv26iWSYEwVzbJv4C0ln +NSYUpHtRMHlj+v03pL2HWuglARQU+KiXPEFam1/p2YtwCjoLcoJXjhAwvmqf +27dDFCxL2R6kTfqeTfWPpScpWDqw6qQp6cOB/HFqZynYbmX1cCNpq7RtIuZX +KciX6yTjQlq47Hq25w0Kjlz8e9qDdNvbUYO4cgqePjyotYP0lQlWw+UaChbt +KvviSnqX5Mmt9x5TkDkv9MKetBa9Y7D9NQUHKnPbzUmPuahGTnRT0K9IWdCA +9N3YEP6VgxRUy6b7yZA+lHU/c/UoBeN5z4/Pkf9j+WCZtt0sOf8/fxT2kF7+ +0bnGn5eKRzTHMgjSrYvy7ZKWU1FG3LnoJOnLqr/e50lRkVLXOeNK2ssSghuU +qPisVztGnbSm3ymej9pUXFqzbM0wuR6jJ7ozFoyo2L5prXIJaeKWhqo8ULFZ +c5ftXtLmo/WWTlupWPXnzbZOcr0FRUU6wzyoGKB0jp5I+s2a7Xsy/KiY1Oe9 +3YD0joip5OYDVPywxGxfJFlP6hfNFb4nUHHVpg87xL79Pw9OF/OnU7Fp9EZm +IVmPsfNab8zzqPidMf7jGVm/ZtSonV4lVBTZICy4lbQAPvoVd4+KefvTIjrJ ++j9/bIdkVTMV5d4LrmsZIvMzv6igo4OKhm9uF24grfJ0lj75kYp8Fkt9q8n+ +KVt21k1/ioox9abfT5P91ZzxNDufooj53U3b+D6R+cKVWNOoqYjOQ9J52z4S +4Na+s+HjGkVkxQq4Xif796vM/KC8lSJWt3nO6ZL9zZdjoH0mSBErrq11Fu4l +86XkEnGoThG1847JTbaS/dL5amG0SREfBh9zFya9iWfxes8WRTwt4nVXhcwj +b4egbhhSxMjj1AdmZH5ZHVA+fGSJEhq1jbG3NJP9qTj9n5mOEoo6mO6720jA +FDe96be+Et5aQeU520DO1wadkXIjJexZt+xJAJmvCaFeNBVTJfR3rhwXIfP3 +cuPzJt4tSlgt6zSjVU3AI7/skcZIJfQ+nUq7XUqA9TxD7OABJWz/k/HItoSA +V+ltNKMjSjgr2JTz5TYB3VWCR/JOKqGwaoWNxC2yPoTCxRKylDD+gch5szyy +n8s20K0alND3H6aMkPtN4Oz4kSZhZWzX/u198SA5H6G+Up/FlPGRw6farFhy +/b73FPHJKCNLN27RtWgC8nsbO0xVlDHZRtn5XDgBHx6c171DU8aoylMR9uR+ +uTmB0XXdUxmZOdxUge1k/onF6x8oV8bYJyktJ4wJ4EmZepRZSX7vkS9ddC05 +fr4At8oaZRTTsmk7a0DA3imHhPHHyuiXP1p3WofM9y61Xr8eZSw+zPjPTZnc +L7ObErfxqWBiTVG96XICfuuIftBzVMFjGvrcLX1cmL4qF7/WTQXbtOOu7H/H +hckV6moMTxVcWn9AJ72bC6MTjIB1/iooHC5n97CVC/013tNucSrIWPy9Ze4p +F57b3hU5ka+CJ6Q7RNtKyfPJ3h3QP6WCOQLraSpxXGAX3c65cEEVcYBdel+E +C71KRdmWV1RxqFvay408f8VeKLw2ma2KDRtflE7yc+FufEGWQ6EqLt/WsFZl +ERcMXXIyRWpVUc5YfenOiQrQWnIuPfGTKioLFl8IJu8FUp4HjkTqqqH9ylsx +H65WwLiYjZdTgxpSj60aDlOrgMFTXk77+TVQ+cJNw7jF5WD9M8p6iKaJVzc7 +gsLDUhj2FggjDq9Ck7hOrdBVxeR9Qpo3qUELi1JZtaWnboHYS420sp/auLpo +Y/4A5SYonCi1p9F0sZn13P1eUj5k6jBExf30kKGvwVu69j94LmdmPJGxGm/2 +aX3P5r8OTIWGdP0OfXQySjMuzLsKIny54TuPGuAn0/VRsu2XgBqvyHbVWIM9 +KfVjAqIXQFDdvdLh6RqkFve2Y+0ZWM2RLY3yMETyXPc3deQ07P8g1mjDsxb1 +d3SrPrmWDD8nTjlaZ67Ffl/xOGPbRFiv/+SytZ4Rdvq8uO93+Sg8mGDNzbwy +woNi5md+bTsEQbqGPW99jHFcffdVj/5oiJiR++O5xxhHdMUtbzRHw8EGPrnR +AGMcyJW4wHM3GlJc2l2XhRhjkextif6UaLh5PLrbPNYYp9zTb3rSoqH/3YMu +bpox3uh7tNk0LQqcUm07z981xs6k/PcO1pHAGd3d5ipIw7vy3yLVf4SBVM36 +3FohGpbq1gZu7AmD0STtEEURGvbltbvGPwuDa8pjQkNiNMw7yrtI+GYY/N12 +wCJEgYbLnFLaK3zCoK4moyJRn4bd5r911w7sB7OTD9K5jjTsydp6oPdzKFiq +yWwUzqVh9NzorYgVIUCMPFbenUfDh3V9F8sXhYDa3bDp6gIaPvj9SvHnl2BY +bPM6e08RDZUjFyQtyoOhITjxVyNBw5+8Pao964LBtGbyYuxTGr53rJapCQ4C +msPb/i/DNAzX5p6faw2EVUeSoxvodDyfHbRCrs0faln5S+yYdNzJA6u21viD +/UzdmXY2Hcfcx+/m5PpDdNDU7a9mdAywpPLHhPpDk7vXJxE7OhY/TZ5QEPWH +PQyazXYvOlb5xKVobNkDhb8+yU+eoKP46KGhoU++oO3DqFPvoaPOgM6xTazd +cFpl059j7+gY2rKbcmHVbpjs22Xc/4GO2jxnXgxL7oYHbqeKrg3QceDFY/bT +MW9wsO+7KD1Cx0M1jrv0b3hDDCshRJDHBFfB9LpHUt7QtPKt8oi6CZ62nTl1 +n2cX+DzYc5wINcHPJvrpTXOeMLrve5RluAnue2vg+rDHE6IpgXs7Ik3QZHua +TFeVJyQfDHaYPWCCBSFrlT2jPaGMGanETjTBQ27Bw2+md8B85bHaxssmaHQ5 +VtngtwecKb022dJogqH5+Ystxd2hLqdt97gkA5/6rtHTy3SBj3bKnpEyDOzH +xYsiDrkAz+99rnNyDOQErC5q2+0C5lv4Ny1RYuCFiFsmvWtc4MkiJl1Wm4Eq +cXuN+V46Q/OubEEzUwa+K/9ZX8LvDD1qASXpvgw8W62eNp3qCJM3/83o32Xg +DSHhG3E9DvDZySrnZBUDRYj4o6eeOkDX4tQNAzUMDHkX4HGbcIAaL7lLF+oZ +WL732XvqaQc4KmPMXHjGQPfF17JfrnMA0RMBB5+/YyDfQ4UZK+4W0PVr5/Hh +ZaLgXf0J+yx7oEoqFD5YzMRjCxR9vxR7EG3ctUWGn4mW7LnuU7H2MEEdu/5C +iImiGa52S13tobpjmYWhJBPN/pPZViZlDxusMOGfJhM1iDDJYq3N4K1eJHh5 +IxPj7HMfrzXZCLGPdwRo2DPx8KerognSGyHdR+xFhQMTm0ayGDPTdlCbH3Pq +hTMTa6K+cjmVdiChsWHFwk4mJm2pXmNPs4MnGkMSXpFMdLWee7OfbQvaqxSV +NLJJfz4ZNuppDdjUcqTiOhPll7a/VLewBqc9iZ9M85g4p2qRFathDcdujuQ6 +FzIx3lFH7+DIBni3qlb9JJeJB8eyN7w7uAHStFx1hp8y8Z6//8jvnPUwrn2W +VjHGRJ/DQT1/FiyhqxktxSeY+PFgZrH7Z0uoDxrdGj7FxL1sj/D2V5aQVmEd +SvvDRIcc/tNCOZagzeS5Xc3Hwrdp071JFpawy3qfcqMUC9c7/pEuS1sHbX7r +l7exWcgsVvjIMraAGsEpOWNg4YWTlIPOShaQW5SrdcGMhfdm/lUmCVlAyM8F +KxcrFoZoazWo95uDcBQR/24zCx/+WWLqlG4OVonKM4O7WBg0EBEeM2YG9/Lm +Pk2dYCHfo+J8+zoEmkX4jE0KC8Vph3VYxQh3Pg0vz0llYfeVsgj6FYQK6ge6 +zRkW1lW+kPWJQridWZ967QoLdeVCps4YIOScSmCsL2Fh7Lfq4852ACfDV2Rk +trLQorVqfRuLAwLiJwpG2lmY2ZKQ8FGeA4nlPLXmXSz81+13bfk8G46Pjn8e +fsdCLV3aeGMtGw7taWObfWbhfa0x4dvAhv3ul75+m2Xho9uWf61tWeC2ThVZ +VDaqzFgX/4tmwEKbgEijEhtbF0XyBbsxIMdntNdGlY0l6oP9/1gM+JxYFeW2 +io1/5meqE/6ZwP5nm0tjDNk4T/1iQT1hAsmbDlLvWbGRnlVX4ptNh2qX9nmj +YDbOaj4fjhkyBo9v1c9rQ9l4Tr1F4f1zY+CJzclcF87GlBLzCY8yY7C6stdo +Wwwbh8cKKPcOGEPL+0WBYcfY+GR0wPiFuDF837W6t/wiGx+wKvW3WhuB/L6k +qtX1bDS15EipPzOEtH++xikNbPzNb/whnWsIvGesyr88YuOyvolA8WuG8L1y +SWHOMzZavWw84R5mCNU8xzPFWtm418vTe55qCG7njkRND7Fxeb2ntlfsGsis +iTF+IMTB1r+++ZpmBrB8k2u5nAgH3wZbfrBYbQBHPproRYlyUDVaeFO4vAHs +WTKrZiDJwTEeD0HVYX2gb46UyKVyUMCXd3ekiz509O+fSFjDQY/Buw8iTFaD +5LLA8o3OHDx69W9mi4Qu5FnExY65ctAzguU291MHDOPSLM66c1Dxiskd+xc6 +sGmsrL1rJwc/PR2NOHJUBxI7pn57B3LQ5URhz+gvbZjNPWweG8/B2dvCJ9/3 +akEP62xrQREHacwslwfNmrAnIi/LuoSD76mt/orFmjBdcsdnuIyD/23PcLyR +qgliKl0zayo5qFArKKqzWRNsBSgK9+s5SE1+tXOhVQNq2wp2t7Zz8PElqaSb +g+pgI3JPL7KLHP9Dc3fvp+rQtf7ZtEwvB5vy1gaa31KHyeofJ3Z85KCIwfyl +wBB10LtuUPztOwe3/+B5HPhXDWp7zCJPjXBwjZc4v2W/GthIbAX9MQ4WCSpa +4BM18E2KeBs+xcHvDXlC2WlqMFmfeFl6loO28g+tecPU4Oifi97VfzgoPi83 +lOSsBqJGhboeCxzsGRio1GerwbV91VP//nEwNC8s87eSGvwPtBM6hA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08174694559829575}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08174694559829575}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994389106409238*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"ea97d15b-34a5-421f-b6aa-2f7352de2932"] +}, Open ]], Cell[CellGroupData[{ @@ -10592,66 +12029,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[282]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], + "In[119]:=",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.443621462424051`*^-173\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 282, 273, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269930374*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1617370909730418`*^-146\\\", \ +RowBox[{\\\"\ +257637673519649270217965438245428568131597200085202201208143960400132\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3853705134253980954253210971658303947407360000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 45, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.9943891064370623`*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], +In[119]:=",ExpressionUUID->"1bb3b392-2ce8-45af-97d5-a24921da6a79"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.352709009016139`*^-176\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 282, 274, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699413757`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.706874017706675`*^-149\\\", \ +RowBox[{\\\"\ +990359217009531794717859144615427415897859637127517261444105383778111\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"32\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3642536072302788149342975054520373833891840000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 46, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994389106441688*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], +In[119]:=",ExpressionUUID->"ceb9dbb7-290a-4e8c-b7ce-a06a7fc64cb5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.488155146821548`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 282, 275, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337269949375*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.907028981919306`*^-151\\\", \ +RowBox[{\\\"\ +393073573231083169323518294497863141369860489975911601067165426821532\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"36\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7225670969766164742267991391363746716712960000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 119, 47, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994389106446065*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], +In[119]:=",ExpressionUUID->"dfa168cb-d7dd-4579-b146-67057eddfe94"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 282, 276, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372699573765`*^9}, +during this calculation.\"", 2, 119, 48, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337269930374*^9, 3.994389106449938*^9}, CellLabel-> "During evaluation of \ -In[282]:=",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], +In[119]:=",ExpressionUUID->"50038b18-2660-4621-ab67-edd64a8f8d2d"], -Cell[BoxData["9.332200719005147`"], "Output", - CellChangeTimes->{3.9913372766841774`*^9}, +Cell[BoxData["9.062430849433083`"], "Output", + CellChangeTimes->{3.9913372766841774`*^9, 3.994389152904706*^9}, CellLabel-> - "Out[282]=",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] + "Out[119]=",ExpressionUUID->"b94e01fd-23d4-4e2d-aea0-b232b2f867a0"] }, Open ]], Cell[CellGroupData[{ @@ -10718,68 +12165,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494640512295`*^9, - 3.991849468375696*^9}},ExpressionUUID->"53e25fab-b431-cc42-a467-\ -e4dea0353ed0"], + CellChangeTimes->{{3.9918494640512295`*^9, 3.991849468375696*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.1874333445484133`*^-197\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 120, 49, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994389152933466*^9}, + CellLabel-> + "During evaluation of \ +In[120]:=",ExpressionUUID->"586501ad-704d-40bb-a8f1-0645072ca79c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2545640906422304`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 120, 50, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994389152938355*^9}, + CellLabel-> + "During evaluation of \ +In[120]:=",ExpressionUUID->"cdf66979-c226-4d08-95ab-47f0d890282a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.798794319266438`*^-206\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 277, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767181473`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 120, + 51, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994389152942768*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 278, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767281475`*^9}, - CellLabel-> - "During evaluation of \ -In[283]:=",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 283, - 279, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372767351475`*^9}, - CellLabel-> - "During evaluation of \ -In[283]:=",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], +In[120]:=",ExpressionUUID->"4cd64d31-f2bb-4301-8515-b820c2da2847"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 283, 280, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337276743145*^9}, +during this calculation.\"", 2, 120, 52, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372767181473`*^9, 3.994389152946396*^9}, CellLabel-> "During evaluation of \ -In[283]:=",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], +In[120]:=",ExpressionUUID->"171f61a3-b452-4f70-9a06-c3c2e5b0c937"], -Cell[BoxData["0.5406905105605413`"], "Output", - CellChangeTimes->{3.991337284091696*^9}, +Cell[BoxData["0.5144629511237718`"], "Output", + CellChangeTimes->{3.991337284091696*^9, 3.994389158116341*^9}, CellLabel-> - "Out[283]=",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] + "Out[120]=",ExpressionUUID->"ca17d862-6095-4eb3-947a-a9219a971f0a"] }, Open ]], Cell[CellGroupData[{ @@ -10800,8 +12251,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10846,68 +12296,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918494737320137`*^9, - 3.9918494774550457`*^9}},ExpressionUUID->"b18c819e-620a-d449-97d6-\ -547e3a6fa152"], + CellChangeTimes->{{3.9918494737320137`*^9, 3.9918494774550457`*^9}}, + CellLabel-> + "In[121]:=",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.1874333445484133`*^-197\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 121, 53, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.994389158142581*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"2ceb637f-bd4b-4a86-9d33-c9ad2eb47a37"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2545640906422304`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 121, 54, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.994389158147517*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"de847e63-3822-450b-b3cc-639016dcc92b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.798794319266438`*^-206\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 281, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284131695*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 121, + 55, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.994389158151733*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 282, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284142767*^9}, - CellLabel-> - "During evaluation of \ -In[284]:=",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 284, - 283, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337284150778*^9}, - CellLabel-> - "During evaluation of \ -In[284]:=",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], +In[121]:=",ExpressionUUID->"850db5be-8e39-4954-ac06-0c6f91f0252b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 284, 284, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372841597614`*^9}, +during this calculation.\"", 2, 121, 56, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337284131695*^9, 3.99438915815514*^9}, CellLabel-> "During evaluation of \ -In[284]:=",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], +In[121]:=",ExpressionUUID->"65140845-767d-4216-968e-8d76acb8e086"], -Cell[BoxData["2.9943030245183917`"], "Output", - CellChangeTimes->{3.9913372907074146`*^9}, +Cell[BoxData["23.627929199340777`"], "Output", + CellChangeTimes->{3.9913372907074146`*^9, 3.994389162778165*^9}, CellLabel-> - "Out[284]=",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] + "Out[121]=",ExpressionUUID->"1fcb7694-93bd-46c2-b62e-82d88e470531"] }, Open ]], Cell[CellGroupData[{ @@ -10928,8 +12382,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10974,68 +12427,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849482271084*^9, - 3.9918494852683945`*^9}},ExpressionUUID->"22ab74c7-5916-9440-9d7d-\ -c3e0f6ab8836"], + CellChangeTimes->{{3.991849482271084*^9, 3.9918494852683945`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1126821353218566`*^-190\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.1874333445484133`*^-197\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 57, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994389162805282*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"7873fd01-1eb4-498e-9371-64a39240ad0c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.2545640906422304`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 122, 58, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994389162809963*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"8c004ad2-550c-4796-81da-e5304b78c605"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.798794319266438`*^-206\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 285, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290744484*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 59, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.994389162814705*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0111242895395887`*^-194\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 286, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337290753483*^9}, - CellLabel-> - "During evaluation of \ -In[285]:=",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.188359338592283`*^-199\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 285, - 287, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372907615204`*^9}, - CellLabel-> - "During evaluation of \ -In[285]:=",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], +In[122]:=",ExpressionUUID->"bb1a87f3-dea4-48b0-a400-3f9c20e127ce"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 285, 288, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133729076952*^9}, +during this calculation.\"", 2, 122, 60, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337290744484*^9, 3.9943891628184547`*^9}, CellLabel-> "During evaluation of \ -In[285]:=",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], +In[122]:=",ExpressionUUID->"7ccb5a69-85e2-46ea-ae1b-5e3ecbac6033"], -Cell[BoxData["16.72305770548981`"], "Output", - CellChangeTimes->{3.991337294569908*^9}, +Cell[BoxData["3.2631824031120114`"], "Output", + CellChangeTimes->{3.991337294569908*^9, 3.994389165502412*^9}, CellLabel-> - "Out[285]=",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] + "Out[122]=",ExpressionUUID->"b6c59bcf-deb3-410b-b15b-a0a8fc56e63a"] }, Open ]], Cell[CellGroupData[{ @@ -11044,22 +12501,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918494889040737`*^9, - 3.9918494971484394`*^9}},ExpressionUUID->"f9c66987-c237-7a40-a006-\ -e20e260dbdcb"], - -Cell[BoxData["0.07640873836855284`"], "Output", - CellChangeTimes->{3.9913372946009064`*^9}, + CellChangeTimes->{{3.9918494889040737`*^9, 3.9918494971484394`*^9}}, CellLabel-> - "Out[286]=",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] + "In[123]:=",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], + +Cell[BoxData["0.0585896089085069`"], "Output", + CellChangeTimes->{3.9913372946009064`*^9, 3.994389165527714*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"8577a7be-c0c3-400e-aff7-b94c8cf81af0"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918495000311985`*^9, 3.9918495029810333`*^9}, - 3.9919248636163254`*^9},ExpressionUUID->"770a9ed7-7938-9e48-be64-\ -c31719ef3a6b"], + 3.9919248636163254`*^9}, + CellLabel-> + "In[124]:=",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ @@ -11082,12 +12540,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[288]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], + "In[125]:=",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[BoxData["7.13574266196526`"], "Output", - CellChangeTimes->{3.991337294629921*^9}, +Cell[BoxData["8.135559711361369`"], "Output", + CellChangeTimes->{3.991337294629921*^9, 3.994389165540883*^9}, CellLabel-> - "Out[288]=",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] + "Out[125]=",ExpressionUUID->"8926b0e6-5b7d-4ab9-a992-ef2e3fd6ecc1"] }, Open ]], Cell[CellGroupData[{ @@ -11097,12 +12555,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[290]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], + "In[126]:=",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[BoxData["1.4042291233212119`"], "Output", - CellChangeTimes->{3.9913372946629753`*^9}, +Cell[BoxData["2.507314371100766`"], "Output", + CellChangeTimes->{3.9913372946629753`*^9, 3.994389165549076*^9}, CellLabel-> - "Out[290]=",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] + "Out[126]=",ExpressionUUID->"83952a92-b1ac-49cf-a985-4db1d997fb4f"] }, Open ]], Cell[CellGroupData[{ @@ -11112,12 +12570,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[293]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], + "In[127]:=",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[BoxData["10.020217662457247`"], "Output", - CellChangeTimes->{3.9913372947367725`*^9}, +Cell[BoxData["20.39840578124476`"], "Output", + CellChangeTimes->{3.9913372947367725`*^9, 3.9943891655547333`*^9}, CellLabel-> - "Out[293]=",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] + "Out[127]=",ExpressionUUID->"dfa72d4d-9b94-4d54-8247-e643cea1c00e"] }, Open ]], Cell[CellGroupData[{ @@ -11307,12 +12765,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[294]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], + "In[128]:=",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[BoxData["0.06674599726273667`"], "Output", - CellChangeTimes->{3.9913372947513313`*^9}, +Cell[BoxData["0.008656450685302401`"], "Output", + CellChangeTimes->{3.9913372947513313`*^9, 3.994389165562017*^9}, CellLabel-> - "Out[294]=",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] + "Out[128]=",ExpressionUUID->"f13dddba-d272-4bce-95c9-4a7649e6cd96"] }, Open ]], Cell[CellGroupData[{ @@ -11326,12 +12784,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[295]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], + "In[129]:=",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[BoxData["3.430301770911147`"], "Output", - CellChangeTimes->{3.9913372948636913`*^9}, +Cell[BoxData["9.525219909573966`"], "Output", + CellChangeTimes->{3.9913372948636913`*^9, 3.99438916562775*^9}, CellLabel-> - "Out[295]=",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] + "Out[129]=",ExpressionUUID->"7624ce55-79a0-4d06-97a8-7ec0589a8bdd"] }, Open ]], Cell[CellGroupData[{ @@ -11523,12 +12981,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[296]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], + "In[130]:=",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[BoxData["0.01266539131451536`"], "Output", - CellChangeTimes->{3.991337294877693*^9}, +Cell[BoxData["0.048484153080347765`"], "Output", + CellChangeTimes->{3.991337294877693*^9, 3.994389165636117*^9}, CellLabel-> - "Out[296]=",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] + "Out[130]=",ExpressionUUID->"ca63868e-8c07-4215-a126-619949ea884d"] }, Open ]], Cell[CellGroupData[{ @@ -11542,12 +13000,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[297]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], + "In[131]:=",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[BoxData["7.874729317258519`"], "Output", - CellChangeTimes->{3.991337294976324*^9}, +Cell[BoxData["4.024806760423996`"], "Output", + CellChangeTimes->{3.991337294976324*^9, 3.994389165702285*^9}, CellLabel-> - "Out[297]=",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] + "Out[131]=",ExpressionUUID->"d6a45fd3-8b84-469b-bd64-aae335da121f"] }, Open ]], Cell[CellGroupData[{ @@ -11640,12 +13098,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[298]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], + "In[132]:=",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[BoxData["0.7884625602161153`"], "Output", - CellChangeTimes->{3.9913372950022793`*^9}, +Cell[BoxData["0.046564779467990605`"], "Output", + CellChangeTimes->{3.9913372950022793`*^9, 3.994389165709819*^9}, CellLabel-> - "Out[298]=",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] + "Out[132]=",ExpressionUUID->"618a6c56-67cb-467a-b6f7-81da154ef532"] }, Open ]], Cell[CellGroupData[{ @@ -11735,12 +13193,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[299]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], + "In[133]:=",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[BoxData["0.21153743978388478`"], "Output", - CellChangeTimes->{3.991337295013279*^9}, +Cell[BoxData["0.9534352205320095`"], "Output", + CellChangeTimes->{3.991337295013279*^9, 3.994389165716443*^9}, CellLabel-> - "Out[299]=",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] + "Out[133]=",ExpressionUUID->"cd84ef92-12b5-4d27-935e-e412e0da23d9"] }, Open ]], Cell[CellGroupData[{ @@ -11863,12 +13321,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[300]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], + "In[134]:=",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[BoxData["0.16678935135356415`"], "Output", - CellChangeTimes->{3.991337295041279*^9}, +Cell[BoxData["0.04439650078108801`"], "Output", + CellChangeTimes->{3.991337295041279*^9, 3.994389165722995*^9}, CellLabel-> - "Out[300]=",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] + "Out[134]=",ExpressionUUID->"35ad9d36-8707-49b2-a45d-f537fef8f7e4"] }, Open ]], Cell[CellGroupData[{ @@ -11930,68 +13388,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849517192892*^9},ExpressionUUID->"55d51961-97f2-ed4d-8bf8-\ -8a461d652ab4"], + CellChangeTimes->{3.991849517192892*^9}, + CellLabel-> + "In[135]:=",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.268551942246329`*^-197\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 301, 289, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950662746`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 135, 61, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994389165732003*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], +In[135]:=",ExpressionUUID->"184cc03a-fb2e-4947-a48c-695eba710790"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.9588252435899326`*^-201\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 290, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337295076277*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 62, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.9943891657362328`*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], +In[135]:=",ExpressionUUID->"4f5a5ab6-047d-453e-ba48-000d0d3617b3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.1561787593749197`*^-205\\\", \ \\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ 4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 301, - 291, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950842743`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 135, + 63, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994389165741572*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], +In[135]:=",ExpressionUUID->"2f0dcf74-9ee1-421d-a732-56af57201418"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 301, 292, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372950922775`*^9}, +during this calculation.\"", 2, 135, 64, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372950662746`*^9, 3.994389165746634*^9}, CellLabel-> "During evaluation of \ -In[301]:=",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], +In[135]:=",ExpressionUUID->"5098c9a9-4b43-4fda-bea1-9f309aa03aaf"], -Cell[BoxData["3.430301770911144`"], "Output", - CellChangeTimes->{3.991337298790371*^9}, +Cell[BoxData["9.525219909573961`"], "Output", + CellChangeTimes->{3.991337298790371*^9, 3.99438916824481*^9}, CellLabel-> - "Out[301]=",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] + "Out[135]=",ExpressionUUID->"87b44269-7914-4640-a744-5fb6193518e1"] }, Open ]], Cell[CellGroupData[{ @@ -12053,68 +13515,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849520751028*^9},ExpressionUUID->"9704b9d3-b449-2144-9970-\ -6a7de047241d"], + CellChangeTimes->{3.991849520751028*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.268551942246329`*^-197\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 302, 293, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988243732`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 136, 65, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.99438916827322*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], +In[136]:=",ExpressionUUID->"52f10f9e-aa29-4456-9590-1bbffc6faa17"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.9588252435899326`*^-201\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 294, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988343716`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 66, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994389168279028*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], +In[136]:=",ExpressionUUID->"943bbf9e-2fd2-4a27-bf8d-d0ead4939fb4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.1561787593749197`*^-205\\\", \ \\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ 4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 302, - 295, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988425922`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 136, + 67, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994389168283677*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], +In[136]:=",ExpressionUUID->"1b7d37c9-11e0-4760-bc54-0f09a6603b67"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 302, 296, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913372988505898`*^9}, +during this calculation.\"", 2, 136, 68, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913372988243732`*^9, 3.994389168287339*^9}, CellLabel-> "During evaluation of \ -In[302]:=",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], +In[136]:=",ExpressionUUID->"fffc0238-9e86-4d6d-b491-67a92cda2b3e"], -Cell[BoxData["7.87472931725852`"], "Output", - CellChangeTimes->{3.991337302457178*^9}, +Cell[BoxData["4.024806760423991`"], "Output", + CellChangeTimes->{3.991337302457178*^9, 3.9943891707453547`*^9}, CellLabel-> - "Out[302]=",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] + "Out[136]=",ExpressionUUID->"f8e560dc-85f6-4875-9e86-a4c8ab5514bd"] }, Open ]], Cell[CellGroupData[{ @@ -12172,94 +13638,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849523511486*^9},ExpressionUUID->"0fd90636-7592-fc40-bf9d-\ -ae1cb915c656"], + CellChangeTimes->{3.991849523511486*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk8VdsXAHBjg6GSF0XJWCEN92aqWAsXhSRShki69xiKhCSkJ6lXpEjT +71VkSqaSeXjVi8qTomgkwzGPkfGeot/uj/M5n+9nn7P2XnuvtZXcj9jyhAQE +BHrJ8/t99M261cX1bww/Ninf2+NPg+FwqrY7JxsSFa+3/HZbok6CKqcC6jVG +zuwltuG+niPBfg7qwuv+50CcF3yqUpRTC4dKbBSciM+/WPr0VOZbEN/vILWP +uLT+6J2frPcQK2Ua4Erc/6Um7ET5JzAYkeEcIJbrUnGeNGmGbUpvIrnElt/C +9ANqW6Gq3pvlSfz4Z794cGY7nN0wtPMw8YcI2dAi3w4ICbZv9iMensPpH2d1 +AXSnfDxGPCfGz5E91Q3cfz4ZhRIrSN2uPlreC07m43IRxNbyk+nDJoPwtKht +WSwxlaQsozVvGPysHsFV4lNqO6MO1X4D14lDjbeIP8k2bgzMHAUF5ZsWOcRc +J2+vKzHfQTFKcm0R8cgtgbuPfMfgU+mhsCfE85S1Fo2yJmDf9R6vBuIEbqX5 +oiWT4G49Z24LseI9x1PrpyYhbmyRdB+x3tqzwz7l08DhDR4XCKDBU6e1tt/k +J2woex24iXg8+JiI2KoZUL3oct6Y+M9y8a3q82ZhJqlFYhfxDdTL8qj9BZzU +YrcjxNy0ao5/piAqSzVvySPOfHGlLUJeCCtLJaqfEY/0uIbFxQgh46Nd2Ugc +pjGR/9BXGDtf+89hiBMeKKl8Y4mi/rnSp9sDafhSP/h4NkUUqfAXVa7Eit+L +nRYsmYO3Kht0A4mzN1nHa03NweX/jXknEVeVhggeLp+H72a9RWeJJyobWntN +JPC7tZ3Em2M0LLaSWBT6WAJ5/qJug8QbGjkoqS+JLspmOuJBNHh3FiZtXLcA +zzSHeFsQ+wnVbjCQWIQzvn2jb4i7lHNHoyal0MYuP3zkONkfqmZ+HXsxFq43 ++ykTTINQVrfS0qOLUVH2wk8DYkX2StvMgcUY9mxd1EViJ5PLj960SWOJ38Zi +1gka6g76B8i+WoLx33hJV0NoaLkXG+02TwbP6htaVBEPDmSm3DeVwZVrvgeN +EYsFdjRseSqDgYXTDnahNHDO7N7kViiLJ1IbYVkYDWWpOhMZicuwZ27k3/+c +pCG1iwnaHLgC2cVbkz0jaNhmf64lIGcFZuboh6UQD1ZJm+V0r0DFouzqFuJN +qWuXKDoqoOQnwdI9p8l+urvmixquxObCyinLSBq+f2s73hupiF+KEkYso2iQ +9uEU5O9QxpoTar13z9PQnSrmaeOtjD5j8bIDxCXN9fJDZ5WxZGFf6aYLNOyz +colc9VQZZRT27/2POFUzyPYmSwVzvTompqLJ/P33RsJlVXFlck+VdywNuz3E +tSza1bBgYKo6/QoNEGTP2jujhgEZZak/iTWiEnW5y1ahZ2/gN9sEGgRS2Mbh +u1bhvY/tbwWu0pDT4rz30b+rsG1S/tWBa6Q/92RHyCWvxvQe2St6N8n6ODs+ +9LurYx0/5n/6iTSk2F1vmgpXR3XNPa63iWPd29tE/lbHVY0P4wSTSH3/eWxA +oUEd0Wy9+StiqYrbAnYmGig6RQ8dTCb1wx7WKFfRxP1Ha9ZlptEgr3zpVHTn +Wvwh1Zd6IZuGigvj6nwhLXz8MHPBnByyH2OOjZSSFp5uOfMzgvhOlaq6sasW +LphO4obm0qDsUfZu+qMWWu6w8gh8SPLN7lKjXq1D7/0aBqcKaFghr0ApOm7A +irgA9+kKGtamBUr8ABbGXNvoGVJHgzs3ckLLmoXrZ+USJepJv6rEt7jtY6G3 +U59FIrFw8oOHL4JZOJtlJ/jiLem3O/274/NYGCmn27+0kdynN9xuq6uwsfTC +wvzGT+R8o63WOczZhINnBx1SaRru+qvaFNZq44xFysu0KRoetTyNXtqsjf+N +f2Vxp2l4ZuHyMnRAG/eNfVZX4dPQqXzN0FhMB2eCOOXJDA2rGuZq1ZnrIL1A +0ydjhvQze2B+3zMdZFslyL4R7oCS8bzK5aW6mDSr1nR6UQfUB4HumTR9jGrL +/Zyg2QFKru+tXQ4bYBmqGxh5dADvV1HuihOIjdIGf39N7wDZgZK5su7GeNiQ +Tnk83gGB7K3N8RocvBGTlyxu1gnuQz+rpftNccEPmyzxO52QYxwwN7HOHJUy +W6SWz+2C1HHvf7MTtmO/h6yBj38XTBstfV11yhIrpVrP6Y52wVcB4dH2Azsw +47HS3bvB3eC7/MjlCJWdmF5j6y8s2AO5XtVPr0bZoFhGeLxVUg+EjC2b0vTa +hW8lLq2ZhF6YsDDb83K/Lfb6Ofpv5/eCvnOcUdcuO4wYkTEUreiDd8tue1ex +d+Oh2XJLp5P9IJceWZGxxh5fQk5Tl/MAlLRpWFlL7sEKkzqlcd1BUGgc8Qga +2oPrQxq6t8gPAftqXHZK215UET9qdV9hGG6LjK2Lr3TA5VcLuGnLv0GR0fov +UaWO+LCftRAVRuCG7gWpn5lOuLB0t2li3gjUNaWdZcc4o3F62rAyjkLhjluq +fn/uw6Of3zRmt47CqI+dgC/XBRt4Nr8yg7/DhJm657CJK27zNfd9IjUGGUOf +pwN09qNf6Fqt/WVj4HA37aCLhBu+krW/Kuw4DvmPLPcLn3PDD+y7qxeJToC+ +/Dv+eb4bDon/scQ1dQJU2jy+vPU6gHyPPVfqDSahU/zQzlsdB1BLr8HYu3US +6mOtD5rbu2PT3lCJ/iNTkBCcKH6s3h1FYooKzwlPQ8XjX/yD2w9iskx0lcH5 +aVi4D8+xyw5iz18W9YuZadB3G86I2sRFrkjhyxAeH9JvjgRY63DxR4eQwCDF +hz8avhvK6nHxm80dzj5PPgybTjVmbOHi+b9xVP8Qn9xfAoK1xlysmKx/3efH +hwVTUo6Ld3FxjmCekXwYHzovas9P9OFik4Bu9LM4PsSWh3mVpHMxUDFi3sIy +PviwrusHZ3CRs2Xw7OZyPljdz5uvl8nFbbefi/Iq+CB2vft+cQ4XGxwuCRc/ +5kOUv01/UQEXZ8ZWTllX8iFMXfVQ4TMu6gv+CLWu5YP39VeHH7VwsexG1uT5 +r3zYvqB7q38bF/O8fo0mtPBhTZSAJIvm4gOtuM47rXzo9tfOyevi4t61DrkP +2vlwwDpx6OEgF7s+ddZWdfHBQTTA9wHDxWB5K6ZiiA/mAXJ+2TI89DTqMe34 +yYdniWct4pfysFXe3qdthg9ba7+rBsvxkBb1sGue5cMGtVefTRR4KJm+1ale +gIFlH0NNmtR4uPquhsV9EQYGNn+VEdPm4YMrK/0UJBi4JJT0j4cdD0+fMKyX +lmNAbL3EjR32PCyOa9jcS3zGOdifvZeHmilDTuXyDAQX2Kz+5cRDBdn0MpcV +DBygBOOuufPwcO7YSLwiA+wad+7zozx8npUi8GQVAx/j1MRVLvNwjbnkrDyL +gVyQ9OyN42HNoQksJz4zNF6Vc4XkF3nGxZHNAGt7VbjedR7OE+9Vjt/EQKzA +we877vAwddv8LxM6DJgdSfocnM1D7yetjVFbGFix4i8dw1weZvlY3Fm8lYHx +miNXhB/yUETumeEd4uRVsCM2n4dNHVtFHhkwMPP169OUMh7Gqm+8/QoYKLCS +z3hTzcOMeendL0wYiGaERBNqeNhrYb3QiMOAe0b/AcdaHpZolUmUES8SKZPv +rOOh8z37qAxTBg6XO1zif+BhmfoPr+PmDKhoXAtS7eKhnIpkV7MFA8zHkw19 +3SS//55ZcCwZqI/ibXjQy0PDSk5kJnF4+6Z+/UEyv86WwwFWDHy50eCyc4yH +YqIdclM7GIifK2UaIkjhLf2Shuc2DFR8/+ocKExhSIyZnOouBnq+Zvr7ilLY +aOzX8yfx1gJOkvt8CtPW/rFEx5aBbrfgHxZSFJ4fWVcWa0fWb2W62FSawtnn +aqx24i26i9VhCYWrZ/5dz9rNwGXJ7D3sZRResD9RXke8paw1T16JwvrxHim+ +PQNUWnb1EhUKfSLFCmAP+f7yidaFahRWe818OUPcTUlLiqhTKBEzViS2l4xL +m3sObqDQ0fZmqogDA2Wz0qe6WRTqaeZ7A3FXX9vVtk0U/grsKwgm3vw0pLJR +j8IbZs7vu4k7D+cq/IMUtgUhJ8+RgQUOodrFxhTerV6l3kasb7LNKo9Dofbg +tThJJ1Ivy+gTadsodDF6P3iQuETkweVECwoPSEa1xhB3fAu9d9OKQq22CPsC +Yr0XS95ftKHQPlbz1Syxex49cM6WwkOsxzVKzgxcvPVA6PRuCj/4eu0wIab9 +t28IcqDwiHBTUwSxpKuMuZ8ThVN20T13iPW2d7h476PwntaaoLLf/688Ge3q +RqHGBsHlQ8QlYhbJDu4Uyp/WZIvsI/EmZEptuRRee6DwehmxZHtHnRVFYfLy +hj4tYr3ah91mnuQ88o3OI7F78ckZ9KawufNg1i7ii8kWf2w5TKH7PbbNAeKS +i7Ka2r4UmgRnHT/yO35wp9F6PwoHnV4ohRFLcPMc1P0pVP18yvocse7O8CMq +gRQKCTfOXP4df7Pl2RVBFIocebL+JnGM2tLbssGkXvShM5G4aFFXvlQIhevm +7pJPI27/kVcjHkbiCYw1ZvyO3xPeLhpO4UCjilQWsc47y+lfp8j5ldN1v/1/ +XIf3Dg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12273,106 +13740,107 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwV1Hk8VdsXAHBjg6GSF0XJWCEN92aqWAsXhSRShki69xiKhCSkJ6lXpEjT +71VkSqaSeXjVi8qTomgkwzGPkfGeot/uj/M5n+9nn7P2XnuvtZXcj9jyhAQE +BHrJ8/t99M261cX1bww/Ninf2+NPg+FwqrY7JxsSFa+3/HZbok6CKqcC6jVG +zuwltuG+niPBfg7qwuv+50CcF3yqUpRTC4dKbBSciM+/WPr0VOZbEN/vILWP +uLT+6J2frPcQK2Ua4Erc/6Um7ET5JzAYkeEcIJbrUnGeNGmGbUpvIrnElt/C +9ANqW6Gq3pvlSfz4Z794cGY7nN0wtPMw8YcI2dAi3w4ICbZv9iMensPpH2d1 +AXSnfDxGPCfGz5E91Q3cfz4ZhRIrSN2uPlreC07m43IRxNbyk+nDJoPwtKht +WSwxlaQsozVvGPysHsFV4lNqO6MO1X4D14lDjbeIP8k2bgzMHAUF5ZsWOcRc +J2+vKzHfQTFKcm0R8cgtgbuPfMfgU+mhsCfE85S1Fo2yJmDf9R6vBuIEbqX5 +oiWT4G49Z24LseI9x1PrpyYhbmyRdB+x3tqzwz7l08DhDR4XCKDBU6e1tt/k +J2woex24iXg8+JiI2KoZUL3oct6Y+M9y8a3q82ZhJqlFYhfxDdTL8qj9BZzU +YrcjxNy0ao5/piAqSzVvySPOfHGlLUJeCCtLJaqfEY/0uIbFxQgh46Nd2Ugc +pjGR/9BXGDtf+89hiBMeKKl8Y4mi/rnSp9sDafhSP/h4NkUUqfAXVa7Eit+L +nRYsmYO3Kht0A4mzN1nHa03NweX/jXknEVeVhggeLp+H72a9RWeJJyobWntN +JPC7tZ3Em2M0LLaSWBT6WAJ5/qJug8QbGjkoqS+JLspmOuJBNHh3FiZtXLcA +zzSHeFsQ+wnVbjCQWIQzvn2jb4i7lHNHoyal0MYuP3zkONkfqmZ+HXsxFq43 ++ykTTINQVrfS0qOLUVH2wk8DYkX2StvMgcUY9mxd1EViJ5PLj960SWOJ38Zi +1gka6g76B8i+WoLx33hJV0NoaLkXG+02TwbP6htaVBEPDmSm3DeVwZVrvgeN +EYsFdjRseSqDgYXTDnahNHDO7N7kViiLJ1IbYVkYDWWpOhMZicuwZ27k3/+c +pCG1iwnaHLgC2cVbkz0jaNhmf64lIGcFZuboh6UQD1ZJm+V0r0DFouzqFuJN +qWuXKDoqoOQnwdI9p8l+urvmixquxObCyinLSBq+f2s73hupiF+KEkYso2iQ +9uEU5O9QxpoTar13z9PQnSrmaeOtjD5j8bIDxCXN9fJDZ5WxZGFf6aYLNOyz +colc9VQZZRT27/2POFUzyPYmSwVzvTompqLJ/P33RsJlVXFlck+VdywNuz3E +tSza1bBgYKo6/QoNEGTP2jujhgEZZak/iTWiEnW5y1ahZ2/gN9sEGgRS2Mbh +u1bhvY/tbwWu0pDT4rz30b+rsG1S/tWBa6Q/92RHyCWvxvQe2St6N8n6ODs+ +9LurYx0/5n/6iTSk2F1vmgpXR3XNPa63iWPd29tE/lbHVY0P4wSTSH3/eWxA +oUEd0Wy9+StiqYrbAnYmGig6RQ8dTCb1wx7WKFfRxP1Ha9ZlptEgr3zpVHTn +Wvwh1Zd6IZuGigvj6nwhLXz8MHPBnByyH2OOjZSSFp5uOfMzgvhOlaq6sasW +LphO4obm0qDsUfZu+qMWWu6w8gh8SPLN7lKjXq1D7/0aBqcKaFghr0ApOm7A +irgA9+kKGtamBUr8ABbGXNvoGVJHgzs3ckLLmoXrZ+USJepJv6rEt7jtY6G3 +U59FIrFw8oOHL4JZOJtlJ/jiLem3O/274/NYGCmn27+0kdynN9xuq6uwsfTC +wvzGT+R8o63WOczZhINnBx1SaRru+qvaFNZq44xFysu0KRoetTyNXtqsjf+N +f2Vxp2l4ZuHyMnRAG/eNfVZX4dPQqXzN0FhMB2eCOOXJDA2rGuZq1ZnrIL1A +0ydjhvQze2B+3zMdZFslyL4R7oCS8bzK5aW6mDSr1nR6UQfUB4HumTR9jGrL +/Zyg2QFKru+tXQ4bYBmqGxh5dADvV1HuihOIjdIGf39N7wDZgZK5su7GeNiQ +Tnk83gGB7K3N8RocvBGTlyxu1gnuQz+rpftNccEPmyzxO52QYxwwN7HOHJUy +W6SWz+2C1HHvf7MTtmO/h6yBj38XTBstfV11yhIrpVrP6Y52wVcB4dH2Azsw +47HS3bvB3eC7/MjlCJWdmF5j6y8s2AO5XtVPr0bZoFhGeLxVUg+EjC2b0vTa +hW8lLq2ZhF6YsDDb83K/Lfb6Ofpv5/eCvnOcUdcuO4wYkTEUreiDd8tue1ex +d+Oh2XJLp5P9IJceWZGxxh5fQk5Tl/MAlLRpWFlL7sEKkzqlcd1BUGgc8Qga +2oPrQxq6t8gPAftqXHZK215UET9qdV9hGG6LjK2Lr3TA5VcLuGnLv0GR0fov +UaWO+LCftRAVRuCG7gWpn5lOuLB0t2li3gjUNaWdZcc4o3F62rAyjkLhjluq +fn/uw6Of3zRmt47CqI+dgC/XBRt4Nr8yg7/DhJm657CJK27zNfd9IjUGGUOf +pwN09qNf6Fqt/WVj4HA37aCLhBu+krW/Kuw4DvmPLPcLn3PDD+y7qxeJToC+ +/Dv+eb4bDon/scQ1dQJU2jy+vPU6gHyPPVfqDSahU/zQzlsdB1BLr8HYu3US +6mOtD5rbu2PT3lCJ/iNTkBCcKH6s3h1FYooKzwlPQ8XjX/yD2w9iskx0lcH5 +aVi4D8+xyw5iz18W9YuZadB3G86I2sRFrkjhyxAeH9JvjgRY63DxR4eQwCDF +hz8avhvK6nHxm80dzj5PPgybTjVmbOHi+b9xVP8Qn9xfAoK1xlysmKx/3efH +hwVTUo6Ld3FxjmCekXwYHzovas9P9OFik4Bu9LM4PsSWh3mVpHMxUDFi3sIy +PviwrusHZ3CRs2Xw7OZyPljdz5uvl8nFbbefi/Iq+CB2vft+cQ4XGxwuCRc/ +5kOUv01/UQEXZ8ZWTllX8iFMXfVQ4TMu6gv+CLWu5YP39VeHH7VwsexG1uT5 +r3zYvqB7q38bF/O8fo0mtPBhTZSAJIvm4gOtuM47rXzo9tfOyevi4t61DrkP +2vlwwDpx6OEgF7s+ddZWdfHBQTTA9wHDxWB5K6ZiiA/mAXJ+2TI89DTqMe34 +yYdniWct4pfysFXe3qdthg9ba7+rBsvxkBb1sGue5cMGtVefTRR4KJm+1ale +gIFlH0NNmtR4uPquhsV9EQYGNn+VEdPm4YMrK/0UJBi4JJT0j4cdD0+fMKyX +lmNAbL3EjR32PCyOa9jcS3zGOdifvZeHmilDTuXyDAQX2Kz+5cRDBdn0MpcV +DBygBOOuufPwcO7YSLwiA+wad+7zozx8npUi8GQVAx/j1MRVLvNwjbnkrDyL +gVyQ9OyN42HNoQksJz4zNF6Vc4XkF3nGxZHNAGt7VbjedR7OE+9Vjt/EQKzA +we877vAwddv8LxM6DJgdSfocnM1D7yetjVFbGFix4i8dw1weZvlY3Fm8lYHx +miNXhB/yUETumeEd4uRVsCM2n4dNHVtFHhkwMPP169OUMh7Gqm+8/QoYKLCS +z3hTzcOMeendL0wYiGaERBNqeNhrYb3QiMOAe0b/AcdaHpZolUmUES8SKZPv +rOOh8z37qAxTBg6XO1zif+BhmfoPr+PmDKhoXAtS7eKhnIpkV7MFA8zHkw19 +3SS//55ZcCwZqI/ibXjQy0PDSk5kJnF4+6Z+/UEyv86WwwFWDHy50eCyc4yH +YqIdclM7GIifK2UaIkjhLf2Shuc2DFR8/+ocKExhSIyZnOouBnq+Zvr7ilLY +aOzX8yfx1gJOkvt8CtPW/rFEx5aBbrfgHxZSFJ4fWVcWa0fWb2W62FSawtnn +aqx24i26i9VhCYWrZ/5dz9rNwGXJ7D3sZRResD9RXke8paw1T16JwvrxHim+ +PQNUWnb1EhUKfSLFCmAP+f7yidaFahRWe818OUPcTUlLiqhTKBEzViS2l4xL +m3sObqDQ0fZmqogDA2Wz0qe6WRTqaeZ7A3FXX9vVtk0U/grsKwgm3vw0pLJR +j8IbZs7vu4k7D+cq/IMUtgUhJ8+RgQUOodrFxhTerV6l3kasb7LNKo9Dofbg +tThJJ1Ivy+gTadsodDF6P3iQuETkweVECwoPSEa1xhB3fAu9d9OKQq22CPsC +Yr0XS95ftKHQPlbz1Syxex49cM6WwkOsxzVKzgxcvPVA6PRuCj/4eu0wIab9 +t28IcqDwiHBTUwSxpKuMuZ8ThVN20T13iPW2d7h476PwntaaoLLf/688Ge3q +RqHGBsHlQ8QlYhbJDu4Uyp/WZIvsI/EmZEptuRRee6DwehmxZHtHnRVFYfLy +hj4tYr3ah91mnuQ88o3OI7F78ckZ9KawufNg1i7ii8kWf2w5TKH7PbbNAeKS +i7Ka2r4UmgRnHT/yO35wp9F6PwoHnV4ohRFLcPMc1P0pVP18yvocse7O8CMq +gRQKCTfOXP4df7Pl2RVBFIocebL+JnGM2tLbssGkXvShM5G4aFFXvlQIhevm +7pJPI27/kVcjHkbiCYw1ZvyO3xPeLhpO4UCjilQWsc47y+lfp8j5ldN1v/1/ +XIf3Dg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5764573349359762, + 1.6476247902426095`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.5764573349359775}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12384,21 +13852,21 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, - 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5764573349359762, + 1.6476247902426095`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.5764573349359775}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12412,104 +13880,105 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fe0bB3BE9lKKIrJLZemIKHnu7GSLsi/Hcc5YElmSUqQslSV5FXnL -ViRZQmRPpV5J8SuVlFDm0LFmOae0+D3+mGuuzzUz3/k+91zzyNNCHBg8XFxc -Y/hYPoe+0lB90PPKkEd38MofgoMMp27p0EzKkMDFQb1lD+XpZiqZNKN300z5 -39j29JcrRbSfoqLCBftF7Kqo2Cd8Jl2IwifyjIN94dmGttjS/6GKgq1x89gN -PaG5vylvUZeaw9kZbFZ/56kTTX3obuS55+PYUqSiO9v4E/p5/qETE3v/9Cn9 -8K5B1Heef+sQdutvlnBU6TDqe+ph/AH7XZxkdF3wV7TxQVvh/7CnVpqw5ikk -kv210+I59sqUo67aHCYad27SbsOWXXOjI7RpDC01HmLUYdtKs4unjCeQwuru -nHxsIl9BQl1gCh3Pr87NxI5Vtks43DWNkqJqxpKw+yR7d0SUfkcO05J2Qdh0 -t8CAf1Jm0YeAuMOe2DPXuQqqg+dQ6RfxVzbYAgrqYt8pCyhF7xFjO3Ym/Ym5 -2Ho2atr+NUcKW+62a6wmh40u2RhICGDrbU+cOtL0A3XP3xwcYnCQv+5gF8v4 -N3qS2dZyAXs+6hivkMof5HhlrXIY9pkmYQM1gb8oPu7ha1fsbNC769e1hH6M -GnKrYtOLOkzCSrmhQzz4bj2dg0qf/TMUJ80D7Hgts3+xZ0a9Tl1O4YEbx6JV -T2Of2rpQcy94BfhcaG8xxM6slFecpvABdXFQv8GXg/p7Jlr/3uSDk70Fglex -5WYfuK1avxIolxXlwrDLdtpmqHNWAlgnyG/Bbm84yR3UJAAPL+ZHJtM4aOHJ -m8ExYxHQ9SkL1fThoLXWImLRrSKg9UKr8TeVg7R6TUBUXxRGxAvUnmMHjtTm -79BYBTYdUae9sY/ydGntFREDC9UTi3HeHEQqVHxPYK8BhxYxp1xPPB+iU7Bb -ey14PXwh7oXNc5cpvyF0LcwuuvzchC2nvdmhdHwtRHNtM8j24CA34/TqV0Pi -ULo6tjDenYO6fcPCJV+sh90Ritw6rhz0+XZaMlVAAowshExGXThoYrz05h1T -CRj/9LkyG1so4uubPW0SYEzN4/npzEEm8Qd3UmsloXH27tVKJw5qvKW7UJK3 -EXZJiiXPO3LQLXIxcneEDAR8vAqfbTjI4lDS5/ByGaAtZLacwp5oFzcrZ8rA -ubmEOCnsnbe2r5dzlYVh9SufHa3xPGleNXyGm8FO5NF0ixUHzU4PHR87Jwey -/ulxIeYcJH7E5H6NjQK0hrF5LYGDmLeE/O0DsUc3pfQgDqr/1CM9magAwu2K -ns7YHtae51TaFMDRfPcAzRD32xbpcI2iCPqVfi6hBvj9rNszMZJK0O2i6hCk -x0EH/YTVrYaV4ZPi5/UfNTkIRR6iOP9RBoO7MwO22FsT8nbRN6pAhqDT4iMN -DuK6qW0Uc0AFDq5O0SpW56Dyz+7O1Y9UwKWz+wqxDf+fTmVxUoWqQI095vmf -Cu5nYvOORVMDku99raAMB0krXIpNHtkO15LLs7L5Oaj54rzaTx51sJPeOvt6 -Je4/59pLyKvD2Y97UkSwc9uV1Iy81EFC90PsaV4OUvBrfP3jvTpslt8U6MSN -+5WRysQLDVAPtY4YWWQjGWlZQs5VC1R6H9SETbLR9qIIkV+IApOU8b+0Hjai -0c8tqNtSIOR4j2RsNxtlK2Z8pnpQoKnaODPnFRutKKy89yyKAt9KL9R3d7FR -fy7rYEYVBe4nptdQnrPRhWzqDTVFbTDQbf/34yM2YiZba7is3AmkR0V0YzUb -FYQp2dd26cBEFmWpLoONeiLRrvgifdhsW7itzpSN5L3e2noG7YWgxMVLb2YW -EGOprkLmBADvOMPJLmcBSY7X80vSjMATvUSZOgsoQtvgU8ZWEzC8IFIk9noe -0SZ/d4izTOHkv6pvHYLmUblROH9etzl8I/bvsVicQ7fmAx+VZVrCwR38J6mp -c+jHvg0v22P3w2nDIHRt/Rwa4FrxfdjHBlabfrfckTeLgjeFpMcp2oFo8YRI -l9YsqgjoaLuSYA+toVeU+xq+o5NzGznbAg7AlhhW+1br72jByszpP28HKKo9 -6er3fgbpu1/eRx5whHq2fx3hN4Neb7wR2K59EGocoq/e5Z5BUsXnmku2HIKi -tAXitPo0qh/aam0r6gQ5m3mpdUFTSLZ3xi9y0gl+pJqxsuomkfaVy2U3h5zh -vOILxXU/J9AN3jmNjCcucE34nbSw/QSq26fZn9DgCp39ftGXC8ZR9q6La36X -ugEXwarau8RC3R+LErVT3CFSf9UZZggL1dpcVzp6xgM2LCWSJgPf0PcjjlzB -dE8IYE6oF3l8Qwtmav5Txl4wElj7bS9zDJVMfvgRrusNLINetlXwGHIpKPL1 -FKHC0c5pzf0rx1BN9X7vFUlUIC5mm6/JHUX60q9/XvhJhfTH34zzTUaR4pBf -//8CfMAtx9hm1zwTjQgftrv+1QfCe72O8RYxUU+ara/5IRqo5ai5x9OYKDMq -T/hYDw2YgzGlAQpM1Ny69NPX0hey1GR/BYyTaLUHJGk3+sLfb8+cpR6SSG7d -f92bmn0hwSp63L+VRFpdNhtWtvoC4Zn3+0ELiRwM3O/0PfKFfXdls5ybSZS5 -KfLF6ee+sEPFsex6A4mkBu6u7ujzhRKDAAfD+yRS8pLE26YvuGbX0AfvkEif -OlWSsJMOEUVCAVlXSVR8bSbcVpcOF3fMD6zCXvdm1lBSjw48lX9aE6+QaMqU -01uyhw40XurT45kk3m+4uLuM6FDrP/3FK4NEqzhrXNceoIOhZrnnvjQSjaTq -COYdoUPSuiEd50QSHfhvV69fCB0KD/GqfkogUSvX7jytUDoEOXee88G+Fm6o -8ziCDsG5288ciSeRrau5DxlNB2/W8LmLZ0nUoOTasO0izv/yrqYvhkRpTacC -6ovp4F7cfv3pcRIdoWTpR5XQYWdGl7wbtvWdKkG9UjqM9b8XnY4kkVAW886D -cjpk9IxLSWEnhNmz6u7TIV2kSuBYBIlOqSkdrn1MB9XNPzQNQ0kUmPUiqPoz -HVJmLLNlDpPIchXTIGyIDqeVXnJaA0m0JYFLlPKFDseuzbVQsZlhOuVVJB30 -eDfHFAWQyMc2b/LeBJ5PVcFLbX8SufCFB1cu0iHtxlSxL4NE5uFSR8skGKDb -w60lRiXR47xEq4wNDChmqR194E0ig65ZpSgpBmxUf7jFG1tL+cUHY1kG9JQq -rbjnRaKN76ONPyozYIId7+HsSaLx3QMSQjoMMK6dy212I9ElnvwWP0cGWFLV -bIcP4fVrimTbHGKAfYvu1SzsePeoMG1nBjiqHHKyxY66b6+65MYA04pGw5aD -uD/BffkqjQEDMUOV+Y4k0u6k0Z+GMsBMir4m5gCJ3l9WFlZMZ4DD7bS2DBsS -VSBR/7HLDHhpc2faHTt+cr69/B8GOM+IJiljUyzbY/SycF9axVSDNf5+XL6z -NrkMCDeSKRjdTyKzkPwPUWUMqEo1v+xkRSIZmfO6hhUM+Gi910QFe74z5J8V -9xjwgerrzbYkUaEKskmrYcCF1N2vsrD/DAy03WxkwK2P46mDFiS6by1d8qqD -AfVfpTPPmpMoeZGHL7OTAVlugc9dsGklLB/XLgbQal8TmthivI3SI914/uPj -HwbMSBTU5HLp5zu83sFNBQhbcevVSCWSAd63/KolTEm0+P70m29MBjyaf+g/ -Z0KingSGVuUYA/bPyib1YMcM72TpTzAgLHviVzJ2f/YbT7s5BrxtLXnKj53B -v8b0JDcBQ4ltfWuNSdQ8O+AesYKA13XlzbNGJBodKA0L5iNAV2iLwhtsg/sm -+TRBAmo0HoZewWZSo35ZrSEgRMxJUQ5bzNp0rak4AXf6L4rzYu/ZtVYNrSfA -OMw4YWwfidJFy5y0NxJAbd0zWY29p3GwSlqegIPvt3XbYBNFZR3rFQkQYfu8 -0Fm+P/3E4GplAgy7xS1lsZmEuCivGgEZ/KMdM4Cvi5v7T2gRcFtQu/9f7Ma/ -4rFMCgHSDhpfkrDJb0NXhnYScD8h93AE9u62k0969QgYLO7nscMeCaqQbQEC -ZOvLjYSwV7lE6zwwIsBNxsBpEeH9ydjCusqEAPoX/XEWdtrGLyeKLPB6VOKu -vcSu561Mz7PCfWOfVz/E/jodffuaNQFHx2NsqrH1nq1/m2pPwGOWBv81bFrV -l/EkB/y+M1tUUrFTr1fynD1IgIBG6rM47C9hllqRLgRQxK4mB2GLekmYH3Uj -IDZE/x5tOc/yq2egBwEWe82cXJef33w62YtKQEx1jorFch8hq0IXGgGHy4ft -YTlvQaLBgY7zW9N/6y3nDX/ttiYIeJZzW42ynNd1j2nmT4DpknLftuV+D07/ -gUACBMuEBVSW8wut1u0Jwv0Jlwa55fxUyW06wQQYLApPSC/nR43s0zxKgJGu -Sr4ktgi9ykUtjICC6eK34ti77GJCFCMICORKSxFbzt+9P1EmkoAc84/totgp -yhtuSEYRYHsnLUYYu06MrFlzkoB7q0oaBLGHf1V1Cp8i4BdDNVJgOX80Zpgv -hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc +1:eJwV1Hk8VdsXAHBjg6GSF0XJWCEN92aqWAsXhSRShki69xiKhCSkJ6lXpEjT +71VkSqaSeXjVi8qTomgkwzGPkfGeot/uj/M5n+9nn7P2XnuvtZXcj9jyhAQE +BHrJ8/t99M261cX1bww/Ninf2+NPg+FwqrY7JxsSFa+3/HZbok6CKqcC6jVG +zuwltuG+niPBfg7qwuv+50CcF3yqUpRTC4dKbBSciM+/WPr0VOZbEN/vILWP +uLT+6J2frPcQK2Ua4Erc/6Um7ET5JzAYkeEcIJbrUnGeNGmGbUpvIrnElt/C +9ANqW6Gq3pvlSfz4Z794cGY7nN0wtPMw8YcI2dAi3w4ICbZv9iMensPpH2d1 +AXSnfDxGPCfGz5E91Q3cfz4ZhRIrSN2uPlreC07m43IRxNbyk+nDJoPwtKht +WSwxlaQsozVvGPysHsFV4lNqO6MO1X4D14lDjbeIP8k2bgzMHAUF5ZsWOcRc +J2+vKzHfQTFKcm0R8cgtgbuPfMfgU+mhsCfE85S1Fo2yJmDf9R6vBuIEbqX5 +oiWT4G49Z24LseI9x1PrpyYhbmyRdB+x3tqzwz7l08DhDR4XCKDBU6e1tt/k +J2woex24iXg8+JiI2KoZUL3oct6Y+M9y8a3q82ZhJqlFYhfxDdTL8qj9BZzU +YrcjxNy0ao5/piAqSzVvySPOfHGlLUJeCCtLJaqfEY/0uIbFxQgh46Nd2Ugc +pjGR/9BXGDtf+89hiBMeKKl8Y4mi/rnSp9sDafhSP/h4NkUUqfAXVa7Eit+L +nRYsmYO3Kht0A4mzN1nHa03NweX/jXknEVeVhggeLp+H72a9RWeJJyobWntN +JPC7tZ3Em2M0LLaSWBT6WAJ5/qJug8QbGjkoqS+JLspmOuJBNHh3FiZtXLcA +zzSHeFsQ+wnVbjCQWIQzvn2jb4i7lHNHoyal0MYuP3zkONkfqmZ+HXsxFq43 ++ykTTINQVrfS0qOLUVH2wk8DYkX2StvMgcUY9mxd1EViJ5PLj960SWOJ38Zi +1gka6g76B8i+WoLx33hJV0NoaLkXG+02TwbP6htaVBEPDmSm3DeVwZVrvgeN +EYsFdjRseSqDgYXTDnahNHDO7N7kViiLJ1IbYVkYDWWpOhMZicuwZ27k3/+c +pCG1iwnaHLgC2cVbkz0jaNhmf64lIGcFZuboh6UQD1ZJm+V0r0DFouzqFuJN +qWuXKDoqoOQnwdI9p8l+urvmixquxObCyinLSBq+f2s73hupiF+KEkYso2iQ +9uEU5O9QxpoTar13z9PQnSrmaeOtjD5j8bIDxCXN9fJDZ5WxZGFf6aYLNOyz +colc9VQZZRT27/2POFUzyPYmSwVzvTompqLJ/P33RsJlVXFlck+VdywNuz3E +tSza1bBgYKo6/QoNEGTP2jujhgEZZak/iTWiEnW5y1ahZ2/gN9sEGgRS2Mbh +u1bhvY/tbwWu0pDT4rz30b+rsG1S/tWBa6Q/92RHyCWvxvQe2St6N8n6ODs+ +9LurYx0/5n/6iTSk2F1vmgpXR3XNPa63iWPd29tE/lbHVY0P4wSTSH3/eWxA +oUEd0Wy9+StiqYrbAnYmGig6RQ8dTCb1wx7WKFfRxP1Ha9ZlptEgr3zpVHTn +Wvwh1Zd6IZuGigvj6nwhLXz8MHPBnByyH2OOjZSSFp5uOfMzgvhOlaq6sasW +LphO4obm0qDsUfZu+qMWWu6w8gh8SPLN7lKjXq1D7/0aBqcKaFghr0ApOm7A +irgA9+kKGtamBUr8ABbGXNvoGVJHgzs3ckLLmoXrZ+USJepJv6rEt7jtY6G3 +U59FIrFw8oOHL4JZOJtlJ/jiLem3O/274/NYGCmn27+0kdynN9xuq6uwsfTC +wvzGT+R8o63WOczZhINnBx1SaRru+qvaFNZq44xFysu0KRoetTyNXtqsjf+N +f2Vxp2l4ZuHyMnRAG/eNfVZX4dPQqXzN0FhMB2eCOOXJDA2rGuZq1ZnrIL1A +0ydjhvQze2B+3zMdZFslyL4R7oCS8bzK5aW6mDSr1nR6UQfUB4HumTR9jGrL +/Zyg2QFKru+tXQ4bYBmqGxh5dADvV1HuihOIjdIGf39N7wDZgZK5su7GeNiQ +Tnk83gGB7K3N8RocvBGTlyxu1gnuQz+rpftNccEPmyzxO52QYxwwN7HOHJUy +W6SWz+2C1HHvf7MTtmO/h6yBj38XTBstfV11yhIrpVrP6Y52wVcB4dH2Azsw +47HS3bvB3eC7/MjlCJWdmF5j6y8s2AO5XtVPr0bZoFhGeLxVUg+EjC2b0vTa +hW8lLq2ZhF6YsDDb83K/Lfb6Ofpv5/eCvnOcUdcuO4wYkTEUreiDd8tue1ex +d+Oh2XJLp5P9IJceWZGxxh5fQk5Tl/MAlLRpWFlL7sEKkzqlcd1BUGgc8Qga +2oPrQxq6t8gPAftqXHZK215UET9qdV9hGG6LjK2Lr3TA5VcLuGnLv0GR0fov +UaWO+LCftRAVRuCG7gWpn5lOuLB0t2li3gjUNaWdZcc4o3F62rAyjkLhjluq +fn/uw6Of3zRmt47CqI+dgC/XBRt4Nr8yg7/DhJm657CJK27zNfd9IjUGGUOf +pwN09qNf6Fqt/WVj4HA37aCLhBu+krW/Kuw4DvmPLPcLn3PDD+y7qxeJToC+ +/Dv+eb4bDon/scQ1dQJU2jy+vPU6gHyPPVfqDSahU/zQzlsdB1BLr8HYu3US +6mOtD5rbu2PT3lCJ/iNTkBCcKH6s3h1FYooKzwlPQ8XjX/yD2w9iskx0lcH5 +aVi4D8+xyw5iz18W9YuZadB3G86I2sRFrkjhyxAeH9JvjgRY63DxR4eQwCDF +hz8avhvK6nHxm80dzj5PPgybTjVmbOHi+b9xVP8Qn9xfAoK1xlysmKx/3efH +hwVTUo6Ld3FxjmCekXwYHzovas9P9OFik4Bu9LM4PsSWh3mVpHMxUDFi3sIy +PviwrusHZ3CRs2Xw7OZyPljdz5uvl8nFbbefi/Iq+CB2vft+cQ4XGxwuCRc/ +5kOUv01/UQEXZ8ZWTllX8iFMXfVQ4TMu6gv+CLWu5YP39VeHH7VwsexG1uT5 +r3zYvqB7q38bF/O8fo0mtPBhTZSAJIvm4gOtuM47rXzo9tfOyevi4t61DrkP +2vlwwDpx6OEgF7s+ddZWdfHBQTTA9wHDxWB5K6ZiiA/mAXJ+2TI89DTqMe34 +yYdniWct4pfysFXe3qdthg9ba7+rBsvxkBb1sGue5cMGtVefTRR4KJm+1ale +gIFlH0NNmtR4uPquhsV9EQYGNn+VEdPm4YMrK/0UJBi4JJT0j4cdD0+fMKyX +lmNAbL3EjR32PCyOa9jcS3zGOdifvZeHmilDTuXyDAQX2Kz+5cRDBdn0MpcV +DBygBOOuufPwcO7YSLwiA+wad+7zozx8npUi8GQVAx/j1MRVLvNwjbnkrDyL +gVyQ9OyN42HNoQksJz4zNF6Vc4XkF3nGxZHNAGt7VbjedR7OE+9Vjt/EQKzA +we877vAwddv8LxM6DJgdSfocnM1D7yetjVFbGFix4i8dw1weZvlY3Fm8lYHx +miNXhB/yUETumeEd4uRVsCM2n4dNHVtFHhkwMPP169OUMh7Gqm+8/QoYKLCS +z3hTzcOMeendL0wYiGaERBNqeNhrYb3QiMOAe0b/AcdaHpZolUmUES8SKZPv +rOOh8z37qAxTBg6XO1zif+BhmfoPr+PmDKhoXAtS7eKhnIpkV7MFA8zHkw19 +3SS//55ZcCwZqI/ibXjQy0PDSk5kJnF4+6Z+/UEyv86WwwFWDHy50eCyc4yH +YqIdclM7GIifK2UaIkjhLf2Shuc2DFR8/+ocKExhSIyZnOouBnq+Zvr7ilLY +aOzX8yfx1gJOkvt8CtPW/rFEx5aBbrfgHxZSFJ4fWVcWa0fWb2W62FSawtnn +aqx24i26i9VhCYWrZ/5dz9rNwGXJ7D3sZRResD9RXke8paw1T16JwvrxHim+ +PQNUWnb1EhUKfSLFCmAP+f7yidaFahRWe818OUPcTUlLiqhTKBEzViS2l4xL +m3sObqDQ0fZmqogDA2Wz0qe6WRTqaeZ7A3FXX9vVtk0U/grsKwgm3vw0pLJR +j8IbZs7vu4k7D+cq/IMUtgUhJ8+RgQUOodrFxhTerV6l3kasb7LNKo9Dofbg +tThJJ1Ivy+gTadsodDF6P3iQuETkweVECwoPSEa1xhB3fAu9d9OKQq22CPsC +Yr0XS95ftKHQPlbz1Syxex49cM6WwkOsxzVKzgxcvPVA6PRuCj/4eu0wIab9 +t28IcqDwiHBTUwSxpKuMuZ8ThVN20T13iPW2d7h476PwntaaoLLf/688Ge3q +RqHGBsHlQ8QlYhbJDu4Uyp/WZIvsI/EmZEptuRRee6DwehmxZHtHnRVFYfLy +hj4tYr3ah91mnuQ88o3OI7F78ckZ9KawufNg1i7ii8kWf2w5TKH7PbbNAeKS +i7Ka2r4UmgRnHT/yO35wp9F6PwoHnV4ohRFLcPMc1P0pVP18yvocse7O8CMq +gRQKCTfOXP4df7Pl2RVBFIocebL+JnGM2tLbssGkXvShM5G4aFFXvlQIhevm +7pJPI27/kVcjHkbiCYw1ZvyO3xPeLhpO4UCjilQWsc47y+lfp8j5ldN1v/1/ +XIf3Dg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + "PlotRange" -> {{0, 180}, {0.5764573349359762, 1.6476247902426095`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.663943982390173}, + "AxesOrigin" -> {0, 0.5764573349359775}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12519,7 +13988,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.663943982390173}, + AxesOrigin->{0, 0.5764573349359775}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12547,7 +14017,8 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6639439823901716, 1.4626441816684523`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5764573349359762, 1.6476247902426095`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12555,9 +14026,9 @@ hoDzhSL3+bF1X+//sRRLQH2zc/iy/w/zReCc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991337564416748*^9}, + CellChangeTimes->{3.991337564416748*^9, 3.9943893513557673`*^9}, CellLabel-> - "Out[303]=",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] + "Out[137]=",ExpressionUUID->"93240c60-a868-46d2-961a-523700768120"] }, Open ]], Cell[CellGroupData[{ @@ -12621,252 +14092,185 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918495265156612`*^9, {3.991849580574194*^9, - 3.9918495807911797`*^9}},ExpressionUUID->"90696e8b-5a2d-314c-8d58-\ -ac84cb8f4d66"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.976253354341118`*^-271\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 304, - 297, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991337564646551*^9}, + 3.9918495265156612`*^9, {3.991849580574194*^9, 3.9918495807911797`*^9}}, CellLabel-> - "During evaluation of \ -In[304]:=",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], + "In[138]:=",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.718150004511881`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.900970218747328`*^-268\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 304, 298, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646565304`*^9}, + 138, 69, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.99438935144208*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], +In[138]:=",ExpressionUUID->"9876e5d1-c990-440d-9b49-828dd9fdeb24"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4847193100774497`*^-293\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.2071475568345846`*^-278\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 304, 299, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646656475`*^9}, + 2, 138, 70, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.994389351446618*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], +In[138]:=",ExpressionUUID->"2c724d41-7245-45d2-8886-bff4246c2338"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.469433279534574`*^-289\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 138, 71, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.994389351450066*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"f2b3c8b4-9072-4615-b145-b758ef6deafb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 304, 300, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913375646736584`*^9}, +during this calculation.\"", 2, 138, 72, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991337564646551*^9, 3.9943893514532557`*^9}, CellLabel-> "During evaluation of \ -In[304]:=",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], +In[138]:=",ExpressionUUID->"e8c42279-11b3-4ac5-8b86-76c0725e8d7e"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VG0bB/CJRBLZ1xljj+w0jJlxXYSyJJE1WROVVAiJQimhQmlRoZKn +IjFzWiylaJE2hWwlEiFrlsrD03vev87ne+7zOec+97l+17lVgna7hvBRKBT7 +RRTK/4+z3S+fqmcUWXZ5/tGyqbezbMmX22/VngIy0w/NQnrVAaXfBcm158Dl +rGV3THtNIcblVht/+1UYKeX0iffagPiYbM6fNi78SRjz/9izCb7UOO+ebquD +yFgtvRU9W8FOffjzZNsHCD8scnrZ52j402aWO9H2FaTim/cJvj8C9Wv+KXp/ +dQooheLh3P25oPSlciBIdwEq7zDTw8IKQCrc/5bgGn48wDFRcnAqghwju2pn +dyFcFXTVjL/vBnScN3w8uWI5Ep0vKPuqSiGvuUQsRmM5Ogp9cJZuLAUfUS3/ +OeZyTG9enFbaUQqfDlP/4wtejhI9B0trf5dCT4QwW+rucly2RdgtjnEbBm2+ +3Wd4i2L4nqAmg/Lb8Hvi3J0DV8SwacHJK/9SGWQUHXrHJy+OlcGlf/11y8HB +dLuEtJo4csReLOk1Lgehp67uWnriOMuRs9/CLIcjfRpdjlbi2L02NH6tXTkk +qL4eOLNdHFdti9/11b8cIgrl/tOsEsdl3XoZRjnlsPFSha7jZgmUiFj9Rneq +HGTP9B0/fVkSF6kd8wsorgC5VXeP/C6WxDtDFWbrSypAoe7ooS3lknj6asLd +1eUVQJvQ3qdVT44rNV36U1kBGk57AqoHJfFFdf+y9W8qwGTxAqPPRAoP7HRe +UJmqgA3RMt+MG6WwsPO7dDKLCy7LBrvPNUuhtoHMpV7gguvVyo75T1JoMWlS +ybHhgkeT77vn41JYkrVwb9CJC1t0r1X5SEujJP+OB0v9uLDzm0F2SoA0vi/Z +nht7iAvHNtlbfpiVxmnJRO1FtVxQIN4q8C2SwUMOwtGa9Vwok9z0y2iZDD7Z +ST9m94ILHz/4lWcryyDln51LYt9xQX1jtOrGdTIYYVe47cIXLtStL1jSdEEG +VXju+X3/cWHBbubtG7YsSsaNjpxg8iCrOL5kwU4WG9I0mSIcHqgvoaTpbZTF +HM1U51TkgdMzYasTIbKoGhrUGrqWB3lr6Dynk7KovHTIa2wTD8zR8dyrL7Jo +pS64fdFuHkQxr/i/TJHDudwLPKsCHjgUik47Zsphxoj+7qErPFAVTEh7myuH +/w2O/pNZxIOmFo+K5htyKK4emPPsJg/094jwd7+Vw1D3p+6LCB4MFscW/1SQ +xwsmBpOFL3hQu7zfYp+6PO5VHC6jNPLgbLTru1968kg5smdi82se2Frr/Z5H +eWyefkIReM+Dq5+/2guGymNp+KKtKp088JVyHlXkyaMHN7f48A8emByoTs6v +kceVZd8+XRzlgfDXlTIqz+VR/uSagjvjPDJX/KDZIY9K6+IbX07xQMaxMsvw +rzzeuqXxquFfcv7J6qa2jgr4yCNyYVKYAJvxufiIPgWkUxruz2gQsH/dGZ0n +IwqYdWLpeJwWAWVX9DolZxXQcLvh1K+VBMhtCmBWCiliQ75YyNAqAkYePPvF +r6+I/K6Z/HlGBJxOyYq+EKeIFpWPm43ZBDR0aauPJCvitGK+cRSHgHnT+mbL +DEUM+p66444lAdu+zxh/u6yI2f63wxStCLBw2jypX6+I9nImd5/YEvBVWjPi +6XIljFit67DOmQDZ3bVUWVklnG2SuGy3gQCnBq832+lKWNN+6CO6EHAvPkNX +zEQJU77vp2i7EpD+ZWLY20sJLRXFHBrcCag1T88rDVTCZBWr4eseBExnqzn8 +3aGEAv6mcYc8CfCz8bhZlKiEa+WlAjW9CTC+WR06flUJl/jMJq3xJSCUz13W +ulQJFwuE3qRsIeDS5rHnZ+4qYW+j+otK0ktEVTQtGpQw0C1kQNmfgM7Io9+O +jCrhb8sN76oDCRB7rXymbVYJ5yaiH3oFkeuvUblGh0LFVbT6G5Oky9p+XH0n +QUWi/XO87FYCktkbAxXMqaglE6Vtso2AdX75P82sqTi8PuBEFWnRpB+H3Z2o +2H5Kz5oTSs6nPrU4K4CKl6NqrpmGERDc/8GsbAcVHTfqut0krSNIf/kqmoob +ytq95LcT8MCh6seS41S86eYe/oP0oXDBRPXTVKT39iSs30GA3clNotaXqZi3 +T3noFumW92OGiRVUtP6X0+m5k4CLU6y6vGoqjokPBP5DOkj6uNuDZ1T8Ffve +4SfpCS+1mKkOKn5ZJGUXH07A/fg9guLfqLiRDzffJ33w0sPz+mNULBHybhsn +bftIWMfpNxX5I99Uq+0iQKTHs3o7Hw2/r1ou7Ea6edF1p2MiNBzgHq9PJJ2n +9vNzkQwNfcXvDV0jHWALu+voNFTsXnLwGWmt0ExKjw4N5Vg/k7+SHkvryF4w +pSG1ZXx2jjRxS1NNEWi473Nct2gEAQdeRxHm9jTMkxCyoJG2Hnts6+FGw6+E +/DJt0ktXiLZFbaGhUfoqNwPSTUabw7JDyeu7aiSNSJ9zu/GnbC8NpaKdnfVJ +++2bSX99gIaqBUGLtUhrnLNWGk6l4UGtRDPFiP/n59RtwSwaPnJXGxImzev8 +ZKmRR8NF410Ks+T84ue1m6yLaHjJxODtJ9JWtNjAgDIa3v9cvLiWtBA+/Zn4 +gIb89Le1l0i/DRQ/crGOhu5FRotiSOce9pOufE3DTen+jQ6kfa+XFH/8SEPJ +bd+VFEmrvvhtNt1Dw1eWPnMD5PoPDdq+FP9Bw4gTDlvLSJcLn/YxmKGhB8vJ +dy/pWN2eH05/adhTON1nQNrSWS9xx1JlpB3pnB8iv/fr7BcF16nKOP/r8aAL +6dM8KaN6LWV8ozv7aIGsH5/WwLoeI2XsV/+gW0x6UG7+m6KdMsoo/WodIuvv +joV9DNNFGQVnD0mlko7xPSvo6aOMq+0MJhVJ8xca6uREKKO3WVYGm6znxieJ +1XfilPHjw0yn52T9Z/U1Or1JUcaeFFuuI2maVshuoXPKaH0qK9KezItF2QXi +YK0ydlzwnllB5sum7e3CWIMyJp3tC0sJJsCZsnit/wdl9LzOT50g8xjsGtEB +/cqY3nTC6TGZX7sDKoeSBOiYUvxg3ITM9yuxmmvmwnRkJ3SePOZHgEuRR8OE +KB0Vyqr3t5H9YPObDPFAOTpGbgg2Dyf7xx7l2WtWq+ioskkseTvZX2Z4WQ1/ +DOioJzJ6vcCL/N7rVo1WmNKRC5MqH8h+lLo3gKFqScfNucYaumS/yqtvbODb +SEeao0kyQfa3p6EFo/UxdEzK/PtR1pEA+3mmRMIBOtY0baBKOZD1kNXCME2i +o4eT3QcRewI6KpcmFR2no7egxskpOzIPy6IlUi/Rsfxhc+xZa7K/l68zs6uj +41KeRKgJk4DLNn2b/3tOjhfvWf/LjKyXjsSke6/I96turrrPIECPj/dSs5WO +MzOfDfVNybxsovoKDtJx0qXw7qQ+AeG/J5MalqugQJdfcosauf57t8kMSKig +v2/SWmtVsn6HO0v45VTQL69NppROwPWu+o+WqipYYevcEUUloPtRru5dhgqe +mr+u2SJDwIZUZvsVfxVME80q7xAi+7NEssGBChWUoKvSBYd5QMmYeXr+ngoW +dTtIzH3nwVv+HT73qlWw0OGuy1A/D3bOuKZOPlPBHfkjVTW9PChqV+8K7VRB +I//AZLMO8n9Z0HB0E78qHggdqDlI/r//rFrRreeuitr5+Q7B5H5g9rJCsomP +Ku7UyX4wns+DaTENdaa/KjKHv7fHXeLB2BRzh812VTztbsVMPseDr9XBsz6J +qmjcBMSOEzxodLwvmnZdFf/Ga0VejSP3Jzv94OuMKnalHVUmnHjALiktPHtW +DTXUnnp2/uBCF72kwPaiGgrryfR3DXIh/uzN/OkCNawZdRTp6ufC/eTiS643 +1fCkRL7BB3L/ZOxVeF60Rg3v1h+bv9bMBW2BM1lHe9WQvd/btq2KCzL+B5Ji +dNWxfJOew/FjZJVJOAR41KnjvPY602QFLnzLDPCIFNTEIw/7+7ZKVYD9eKx9 +P0MLG9b1KT5dUg4jwUJRxKGVOHzvGHe24Da5/5flO1anja3Pg3Y5riwBiTea +J8vHdXD+QThXqvUGKKXdcWEwdLFRt6Hqp3sxnF/FXCEZqofzYhbPF4sXQaOC +1eqpbH3sNG2sEBy7AhZKdVkGHw3QQ02y3m5/AYjyX40OTDHE25nZecL/XARa +sjLbW9MIlZNbLj1vPQdLNXzvub4wwoz54p51EWdAnyN/J3aLMfJPdg8IZ2dD +ZLdEvQPFBC1rEx2Z507A+FSmu/15E9S6rvzdZclxWGvwPM9ezxS1FiqTn8qk +wqMp1r+/3pqiwJ5kcYmgZIjQNe58H7IaP1U4D8c2JwBnbGuL91IGrvkZ9pbu +HQu26nLrl19l4LMHT+zChKOAGH2msrWIgawnZ5Mm5yJB/X7UbFUxA5V3LnFM +/REJix3eFYSVMHAw7GjC69eRULf76M96goG+CuMP209FgmX19Ln4FwzUtTqk +9E02Ehiu779+H2HgklKH9CsGe2FlUnpcnZkZijSVCWj/iYAa1nUBJwszJCam +g/5+igCXX7U5rWwztCzXy/rxOALiImZKB63MsM1GVkvgeAQ0+Ab0ijqZoc2r +H19YChEQxmQ4bA4ww8v+FNdS3AU3f/YqTqeZIdXVLRcv7wSdEGatRic5fljz +dmJOGJxSdZ47/MkM01+u/TaWEAbTX4JWf+02w0GW5PY9oWHwyCezJL/PDMtM +50yL2GHg6vLlnOyoGao2Tr148z0U9rNS9yylmONhEc9oulUoNIi/VxnVMMe9 +AdZbkv+GQMijsCPEXnPskBbr0boZDGO7hmNto80xL+pv4EBuMMRRw3d+jDHH +U+8jNtxNCYb0hN2uvw+YY6dcIxzxDYZyixg6+6g5pmrHs/tXBMP8vcM19Xnm +OJJ5vf9mQhDk3Mmf/lBvjnYz/j8n/AOhtrBl66Q0EyWHdXewiv2gx0nFP0aO +iWuPdto3H/MDyp9d3v8qMPHgj7nbqdv9wHqjoLMAnYnHiYv3mXp+8HyRhZm8 +DhMvLj7z6NPdLfA6qGCplSUTz/jprvrvlS90qu8oy9rGxBW5Ql90l22G6Rt/ +fxncZ6Ka382XDu89YcDDrvB4JRO1LrQ+y63yhPbFJ9b1VTMxYu+jn1PXPKE6 +QOHC2cdMvIapN4ZiPCFFbrXFwksmKiheW1pJ9YQVaTsSGj8xsVQpZaArwgN0 +Q1spIXwWeCtKIbeV5g7BGiVL89ZboJdBTMgrrivEP/Pboeligb45ewsm810h +K0SCPG2BhL78LZ0MV6i5vj/zlacFii98m24JdgUpzXViC4EWWKp4t0pIxhWe +a/ZLBcRYoOcH+PUlcSPorFSmaxZY4KWG3pMDPi4wqXOawZ2wwPaOYW7cSSdo +f422klMW2Jspl7F5rxM8jhhzi56xQJ1PtyW8NznBSa79XsacBbr7DnRdU3AC +HQtKaRU/C1+MW4vE3HCEIPtdKvUyLGRciKuZa3CAltC1Ii1sFmq4fbk3q2QP +D4r+7Z1JY+FHSwZ9l4gdMNZE/3LIYOH0G/7R9zO2cLd3RKTwBAsvLhm64/jF +Fri0bjOHHBbOXPZpSeTaQun5xyfyL7LwfnT3405vWyjMTGWuLWNhvZz2mbBS +GzgeLZZ9vpmFzQXB9wID1oCQZFrxaCsL26lvXWyd1sDRCkqNdTsLJ+yb21nm +a+DI2OTAyCcWdnUERQWuWAMHw1rYVgMszBZoop94Yg2RvhcGh36z8KxA2oSX +ljX42Kghi8bG+esNct4UK1hoERKtp7MxhnYl6M8IQmHIWJeDGhuvGejV3u5A +GDhaGeuzko3/rXMJdeUhRL7ccGe/MRtZ29bHHg9FSHdOoD2wY6NfZcVDzj8A +VV6t86a72Whn45nfFsWBLUNVjTV72ZixniHZvpEDlPjC8zbRbLTIitwwb8AB +u4s7TTftZ6NntcKFOyNs+PB5UXjUYTaqLA5teRjKhuEg/a6Kc2xcTIh5+W5l +geKuY5X6j9n4rvQjrS6GCSf/bludUcfG9Nr6K398mMCXY1fx/SkbXZVSO5yA +CcP3BG4WvmTjsNkJATshJlRRjpyXaGbjZt++60kXzcHnTFLsbD8b2+to04te +mMH56v2rHy3jYFT/0zenjBgg4uxdoSDKwSN7khrE5BmQ1GOuF7uCg/f/WZl+ +g8KAMIHf6obSHMx/LrJUvWk1mG2IkbpK4+BVw5g03LMaPn6NnEo14uBxr1j/ +ecIUpIXDK9Z7ctBNYGng0AYTKFqTGD/hzUG5C7QzbWYmYJx4cs1pXw7aJ6e4 +9iqbgPNEeWt7IAdNRM5S1k4Yw9GPM3+Cw8n7hw5JeOUYw++rh6zjkzm4ZV35 +97guI+hknW4uLuFgQ1D45O8kQwjbV3TJvoyDhy8ZvFALN4TZsrshI+XkfPF5 +0zZPQ5BQbf9ldI+DfA3ZCqv1DcFRiKr08DEHTymKn/tSaQA1LcVbm1s5eDAu +d0lWoj44iD7Qi2nnoOejPf0tHvrQvvblrFwXB78nsOXXGurDdNWPNL8e8nk/ +Zh9z+/RA74rh7aFhDtbqXe674qQHNZ1WMZmjHJzgi2Q5aemBg5QbGExwcJ8p +Y7cqnx5sO7bvffQMB5+kr67Y+EAXph8fzZP9zcGgXP3gW6d1IWXuXHDVHAfd +M3PM9XfrwgrTm7pbFjgo4XaT/7ODLuTvqpr5+5eDBtnfzt7T1IX/AVuBKEc= + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12880,211 +14284,140 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwV1nk8VG0bB/CJRBLZ1xljj+w0jJlxXYSyJJE1WROVVAiJQimhQmlRoZKn +IjFzWiylaJE2hWwlEiFrlsrD03vev87ne+7zOec+97l+17lVgna7hvBRKBT7 +RRTK/4+z3S+fqmcUWXZ5/tGyqbezbMmX22/VngIy0w/NQnrVAaXfBcm158Dl +rGV3THtNIcblVht/+1UYKeX0iffagPiYbM6fNi78SRjz/9izCb7UOO+ebquD +yFgtvRU9W8FOffjzZNsHCD8scnrZ52j402aWO9H2FaTim/cJvj8C9Wv+KXp/ +dQooheLh3P25oPSlciBIdwEq7zDTw8IKQCrc/5bgGn48wDFRcnAqghwju2pn +dyFcFXTVjL/vBnScN3w8uWI5Ep0vKPuqSiGvuUQsRmM5Ogp9cJZuLAUfUS3/ +OeZyTG9enFbaUQqfDlP/4wtejhI9B0trf5dCT4QwW+rucly2RdgtjnEbBm2+ +3Wd4i2L4nqAmg/Lb8Hvi3J0DV8SwacHJK/9SGWQUHXrHJy+OlcGlf/11y8HB +dLuEtJo4csReLOk1Lgehp67uWnriOMuRs9/CLIcjfRpdjlbi2L02NH6tXTkk +qL4eOLNdHFdti9/11b8cIgrl/tOsEsdl3XoZRjnlsPFSha7jZgmUiFj9Rneq +HGTP9B0/fVkSF6kd8wsorgC5VXeP/C6WxDtDFWbrSypAoe7ooS3lknj6asLd +1eUVQJvQ3qdVT44rNV36U1kBGk57AqoHJfFFdf+y9W8qwGTxAqPPRAoP7HRe +UJmqgA3RMt+MG6WwsPO7dDKLCy7LBrvPNUuhtoHMpV7gguvVyo75T1JoMWlS +ybHhgkeT77vn41JYkrVwb9CJC1t0r1X5SEujJP+OB0v9uLDzm0F2SoA0vi/Z +nht7iAvHNtlbfpiVxmnJRO1FtVxQIN4q8C2SwUMOwtGa9Vwok9z0y2iZDD7Z +ST9m94ILHz/4lWcryyDln51LYt9xQX1jtOrGdTIYYVe47cIXLtStL1jSdEEG +VXju+X3/cWHBbubtG7YsSsaNjpxg8iCrOL5kwU4WG9I0mSIcHqgvoaTpbZTF +HM1U51TkgdMzYasTIbKoGhrUGrqWB3lr6Dynk7KovHTIa2wTD8zR8dyrL7Jo +pS64fdFuHkQxr/i/TJHDudwLPKsCHjgUik47Zsphxoj+7qErPFAVTEh7myuH +/w2O/pNZxIOmFo+K5htyKK4emPPsJg/094jwd7+Vw1D3p+6LCB4MFscW/1SQ +xwsmBpOFL3hQu7zfYp+6PO5VHC6jNPLgbLTru1968kg5smdi82se2Frr/Z5H +eWyefkIReM+Dq5+/2guGymNp+KKtKp088JVyHlXkyaMHN7f48A8emByoTs6v +kceVZd8+XRzlgfDXlTIqz+VR/uSagjvjPDJX/KDZIY9K6+IbX07xQMaxMsvw +rzzeuqXxquFfcv7J6qa2jgr4yCNyYVKYAJvxufiIPgWkUxruz2gQsH/dGZ0n +IwqYdWLpeJwWAWVX9DolZxXQcLvh1K+VBMhtCmBWCiliQ75YyNAqAkYePPvF +r6+I/K6Z/HlGBJxOyYq+EKeIFpWPm43ZBDR0aauPJCvitGK+cRSHgHnT+mbL +DEUM+p66444lAdu+zxh/u6yI2f63wxStCLBw2jypX6+I9nImd5/YEvBVWjPi +6XIljFit67DOmQDZ3bVUWVklnG2SuGy3gQCnBq832+lKWNN+6CO6EHAvPkNX +zEQJU77vp2i7EpD+ZWLY20sJLRXFHBrcCag1T88rDVTCZBWr4eseBExnqzn8 +3aGEAv6mcYc8CfCz8bhZlKiEa+WlAjW9CTC+WR06flUJl/jMJq3xJSCUz13W +ulQJFwuE3qRsIeDS5rHnZ+4qYW+j+otK0ktEVTQtGpQw0C1kQNmfgM7Io9+O +jCrhb8sN76oDCRB7rXymbVYJ5yaiH3oFkeuvUblGh0LFVbT6G5Oky9p+XH0n +QUWi/XO87FYCktkbAxXMqaglE6Vtso2AdX75P82sqTi8PuBEFWnRpB+H3Z2o +2H5Kz5oTSs6nPrU4K4CKl6NqrpmGERDc/8GsbAcVHTfqut0krSNIf/kqmoob +ytq95LcT8MCh6seS41S86eYe/oP0oXDBRPXTVKT39iSs30GA3clNotaXqZi3 +T3noFumW92OGiRVUtP6X0+m5k4CLU6y6vGoqjokPBP5DOkj6uNuDZ1T8Ffve +4SfpCS+1mKkOKn5ZJGUXH07A/fg9guLfqLiRDzffJ33w0sPz+mNULBHybhsn +bftIWMfpNxX5I99Uq+0iQKTHs3o7Hw2/r1ou7Ea6edF1p2MiNBzgHq9PJJ2n +9vNzkQwNfcXvDV0jHWALu+voNFTsXnLwGWmt0ExKjw4N5Vg/k7+SHkvryF4w +pSG1ZXx2jjRxS1NNEWi473Nct2gEAQdeRxHm9jTMkxCyoJG2Hnts6+FGw6+E +/DJt0ktXiLZFbaGhUfoqNwPSTUabw7JDyeu7aiSNSJ9zu/GnbC8NpaKdnfVJ +++2bSX99gIaqBUGLtUhrnLNWGk6l4UGtRDPFiP/n59RtwSwaPnJXGxImzev8 +ZKmRR8NF410Ks+T84ue1m6yLaHjJxODtJ9JWtNjAgDIa3v9cvLiWtBA+/Zn4 +gIb89Le1l0i/DRQ/crGOhu5FRotiSOce9pOufE3DTen+jQ6kfa+XFH/8SEPJ +bd+VFEmrvvhtNt1Dw1eWPnMD5PoPDdq+FP9Bw4gTDlvLSJcLn/YxmKGhB8vJ +dy/pWN2eH05/adhTON1nQNrSWS9xx1JlpB3pnB8iv/fr7BcF16nKOP/r8aAL +6dM8KaN6LWV8ozv7aIGsH5/WwLoeI2XsV/+gW0x6UG7+m6KdMsoo/WodIuvv +joV9DNNFGQVnD0mlko7xPSvo6aOMq+0MJhVJ8xca6uREKKO3WVYGm6znxieJ +1XfilPHjw0yn52T9Z/U1Or1JUcaeFFuuI2maVshuoXPKaH0qK9KezItF2QXi +YK0ydlzwnllB5sum7e3CWIMyJp3tC0sJJsCZsnit/wdl9LzOT50g8xjsGtEB +/cqY3nTC6TGZX7sDKoeSBOiYUvxg3ITM9yuxmmvmwnRkJ3SePOZHgEuRR8OE +KB0Vyqr3t5H9YPObDPFAOTpGbgg2Dyf7xx7l2WtWq+ioskkseTvZX2Z4WQ1/ +DOioJzJ6vcCL/N7rVo1WmNKRC5MqH8h+lLo3gKFqScfNucYaumS/yqtvbODb +SEeao0kyQfa3p6EFo/UxdEzK/PtR1pEA+3mmRMIBOtY0baBKOZD1kNXCME2i +o4eT3QcRewI6KpcmFR2no7egxskpOzIPy6IlUi/Rsfxhc+xZa7K/l68zs6uj +41KeRKgJk4DLNn2b/3tOjhfvWf/LjKyXjsSke6/I96turrrPIECPj/dSs5WO +MzOfDfVNybxsovoKDtJx0qXw7qQ+AeG/J5MalqugQJdfcosauf57t8kMSKig +v2/SWmtVsn6HO0v45VTQL69NppROwPWu+o+WqipYYevcEUUloPtRru5dhgqe +mr+u2SJDwIZUZvsVfxVME80q7xAi+7NEssGBChWUoKvSBYd5QMmYeXr+ngoW +dTtIzH3nwVv+HT73qlWw0OGuy1A/D3bOuKZOPlPBHfkjVTW9PChqV+8K7VRB +I//AZLMO8n9Z0HB0E78qHggdqDlI/r//rFrRreeuitr5+Q7B5H5g9rJCsomP +Ku7UyX4wns+DaTENdaa/KjKHv7fHXeLB2BRzh812VTztbsVMPseDr9XBsz6J +qmjcBMSOEzxodLwvmnZdFf/Ga0VejSP3Jzv94OuMKnalHVUmnHjALiktPHtW +DTXUnnp2/uBCF72kwPaiGgrryfR3DXIh/uzN/OkCNawZdRTp6ufC/eTiS643 +1fCkRL7BB3L/ZOxVeF60Rg3v1h+bv9bMBW2BM1lHe9WQvd/btq2KCzL+B5Ji +dNWxfJOew/FjZJVJOAR41KnjvPY602QFLnzLDPCIFNTEIw/7+7ZKVYD9eKx9 +P0MLG9b1KT5dUg4jwUJRxKGVOHzvGHe24Da5/5flO1anja3Pg3Y5riwBiTea +J8vHdXD+QThXqvUGKKXdcWEwdLFRt6Hqp3sxnF/FXCEZqofzYhbPF4sXQaOC +1eqpbH3sNG2sEBy7AhZKdVkGHw3QQ02y3m5/AYjyX40OTDHE25nZecL/XARa +sjLbW9MIlZNbLj1vPQdLNXzvub4wwoz54p51EWdAnyN/J3aLMfJPdg8IZ2dD +ZLdEvQPFBC1rEx2Z507A+FSmu/15E9S6rvzdZclxWGvwPM9ezxS1FiqTn8qk +wqMp1r+/3pqiwJ5kcYmgZIjQNe58H7IaP1U4D8c2JwBnbGuL91IGrvkZ9pbu +HQu26nLrl19l4LMHT+zChKOAGH2msrWIgawnZ5Mm5yJB/X7UbFUxA5V3LnFM +/REJix3eFYSVMHAw7GjC69eRULf76M96goG+CuMP209FgmX19Ln4FwzUtTqk +9E02Ehiu779+H2HgklKH9CsGe2FlUnpcnZkZijSVCWj/iYAa1nUBJwszJCam +g/5+igCXX7U5rWwztCzXy/rxOALiImZKB63MsM1GVkvgeAQ0+Ab0ijqZoc2r +H19YChEQxmQ4bA4ww8v+FNdS3AU3f/YqTqeZIdXVLRcv7wSdEGatRic5fljz +dmJOGJxSdZ47/MkM01+u/TaWEAbTX4JWf+02w0GW5PY9oWHwyCezJL/PDMtM +50yL2GHg6vLlnOyoGao2Tr148z0U9rNS9yylmONhEc9oulUoNIi/VxnVMMe9 +AdZbkv+GQMijsCPEXnPskBbr0boZDGO7hmNto80xL+pv4EBuMMRRw3d+jDHH +U+8jNtxNCYb0hN2uvw+YY6dcIxzxDYZyixg6+6g5pmrHs/tXBMP8vcM19Xnm +OJJ5vf9mQhDk3Mmf/lBvjnYz/j8n/AOhtrBl66Q0EyWHdXewiv2gx0nFP0aO +iWuPdto3H/MDyp9d3v8qMPHgj7nbqdv9wHqjoLMAnYnHiYv3mXp+8HyRhZm8 +DhMvLj7z6NPdLfA6qGCplSUTz/jprvrvlS90qu8oy9rGxBW5Ql90l22G6Rt/ +fxncZ6Ka382XDu89YcDDrvB4JRO1LrQ+y63yhPbFJ9b1VTMxYu+jn1PXPKE6 +QOHC2cdMvIapN4ZiPCFFbrXFwksmKiheW1pJ9YQVaTsSGj8xsVQpZaArwgN0 +Q1spIXwWeCtKIbeV5g7BGiVL89ZboJdBTMgrrivEP/Pboeligb45ewsm810h +K0SCPG2BhL78LZ0MV6i5vj/zlacFii98m24JdgUpzXViC4EWWKp4t0pIxhWe +a/ZLBcRYoOcH+PUlcSPorFSmaxZY4KWG3pMDPi4wqXOawZ2wwPaOYW7cSSdo +f422klMW2Jspl7F5rxM8jhhzi56xQJ1PtyW8NznBSa79XsacBbr7DnRdU3AC +HQtKaRU/C1+MW4vE3HCEIPtdKvUyLGRciKuZa3CAltC1Ii1sFmq4fbk3q2QP +D4r+7Z1JY+FHSwZ9l4gdMNZE/3LIYOH0G/7R9zO2cLd3RKTwBAsvLhm64/jF +Fri0bjOHHBbOXPZpSeTaQun5xyfyL7LwfnT3405vWyjMTGWuLWNhvZz2mbBS +GzgeLZZ9vpmFzQXB9wID1oCQZFrxaCsL26lvXWyd1sDRCkqNdTsLJ+yb21nm +a+DI2OTAyCcWdnUERQWuWAMHw1rYVgMszBZoop94Yg2RvhcGh36z8KxA2oSX +ljX42Kghi8bG+esNct4UK1hoERKtp7MxhnYl6M8IQmHIWJeDGhuvGejV3u5A +GDhaGeuzko3/rXMJdeUhRL7ccGe/MRtZ29bHHg9FSHdOoD2wY6NfZcVDzj8A +VV6t86a72Whn45nfFsWBLUNVjTV72ZixniHZvpEDlPjC8zbRbLTIitwwb8AB +u4s7TTftZ6NntcKFOyNs+PB5UXjUYTaqLA5teRjKhuEg/a6Kc2xcTIh5+W5l +geKuY5X6j9n4rvQjrS6GCSf/bludUcfG9Nr6K398mMCXY1fx/SkbXZVSO5yA +CcP3BG4WvmTjsNkJATshJlRRjpyXaGbjZt++60kXzcHnTFLsbD8b2+to04te +mMH56v2rHy3jYFT/0zenjBgg4uxdoSDKwSN7khrE5BmQ1GOuF7uCg/f/WZl+ +g8KAMIHf6obSHMx/LrJUvWk1mG2IkbpK4+BVw5g03LMaPn6NnEo14uBxr1j/ +ecIUpIXDK9Z7ctBNYGng0AYTKFqTGD/hzUG5C7QzbWYmYJx4cs1pXw7aJ6e4 +9iqbgPNEeWt7IAdNRM5S1k4Yw9GPM3+Cw8n7hw5JeOUYw++rh6zjkzm4ZV35 +97guI+hknW4uLuFgQ1D45O8kQwjbV3TJvoyDhy8ZvFALN4TZsrshI+XkfPF5 +0zZPQ5BQbf9ldI+DfA3ZCqv1DcFRiKr08DEHTymKn/tSaQA1LcVbm1s5eDAu +d0lWoj44iD7Qi2nnoOejPf0tHvrQvvblrFwXB78nsOXXGurDdNWPNL8e8nk/ +Zh9z+/RA74rh7aFhDtbqXe674qQHNZ1WMZmjHJzgi2Q5aemBg5QbGExwcJ8p +Y7cqnx5sO7bvffQMB5+kr67Y+EAXph8fzZP9zcGgXP3gW6d1IWXuXHDVHAfd +M3PM9XfrwgrTm7pbFjgo4XaT/7ODLuTvqpr5+5eDBtnfzt7T1IX/AVuBKEc= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.07980639202001641}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13096,19 +14429,19 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.07980639202001641}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13122,210 +14455,139 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c8le8bx+0ZSUj2djjnlBDfpOe6VJSREKIoFdKw9whJyqiIIkrIqJRo -yIoi85yQUUK2QlkZoeJ3fv88z+v9ul/381yfzzVe9y170t3CiYWJiUmE8fj/ -e7Gv8b1CbBJRJG772nXGiehIFw3U6/ICbZsK0j/pvYDCLSdFuyJg0nOtkCZt -CX5mjz+zdt2ELbImTvelHWHD1Kaby5+z4H2pDfNOaR/orzB1n//8HJrNEr+1 -SEaCgcLE19nP1dBxIyVPWzQJlj9r35r53AZHFZ7WTDNnQ82evOyPWcOQlWDr -J+z9EiT6S7+dpEzC+waZItvANyB0/vhjzj1zYHZNzDL4STWocj6oMzs8BwsX -du+0qKgGzPo2dOfcHLwQuN0jSa+G812u4pSkOfjy7gQp8Uc1vN8bEmc2Ogch -VZ6bF1RqwEfyjtudK/Nwq0e0+EZ2DbQ3t6mT6QuQBXSJyfj3MHZG5KDPwALU -v7/RanL/PayyHTn3Zn4BNr+Ltsl4+h5Udw4+OCi5CD4Zt2hyTe8hIm9ayMdt -EeIudl9LYqkF9fB1vysEfsO56GmSkmct3NxmUG5qtQQWqVKnvuytg609tvt2 -uSzBVbVXpR/M6oAe6dpODl6C8029XcV2dcDRlfSDK3MJgq9znjjtUwfBocPi -NT+XQPrfL7LegzpwpIWHaEcuA8VOxrFjtQ60nMp3ybxYgeBT+rwnntZDO39L -I3/dClTb/wj4/roePEqGrP51rcDx+wd3n6yuh8e8PG7dqytwz1Dtq+bnepB+ -bpOeZPQHdPw9vh9gagCutYVVrqE/oMDyle+AWQN8SVF7OyvwDyQORCW4f2+A -1Pb89X6K/yDW47AOMdsAR/iVj6/s+AdOuyyHV1caoPeS5CrLqX9Qtz6fas3f -CANuPLpCr/7B6t8UVzvNRhjbO/Jay3YV6kQUNtZdaISlmeRnwZlr0Lfpth0b -RxOUkjeurb1agw+hD3gF+JsgyPm6aWTTGgzLk27yiTTB357Iybi5Ndi32iHf -p9gE4cMlwi1yTBhhRjXr3NsEkc05hwZ8mPCHxNlH4uFNEJsd1sKymRmXjgs1 -c/9sAiPNM4LC8szILxFipvGrCbjeW1gpU5nRXDBR6+ASY/+wYo+xHjMqv1vY -doyNBiFy9G9JZ5jxozo/+xdxGrhliK4qlTHj7Y4Punv204CixqK34z0z8lrm -Xks8QIOJqh+XjJuZMSKh6fAnCxqc7q/k9hhixpWHPcc07GngIOUkXMrDgtn8 -784ae9LA/G4RxfgoC77pebVt4TYNBChp7vZOLFjAY/vXNY0GzeWRz93dWVBw -+0uHL/dpYNRz+L+kSyyY/FaK6epDGuwWW93zNZ8FPxT39+0tpYFmitFR978s -GKxY6AxdNPilrJl+kYMVX9reYxruoUHha8nBRAFWtH0pfjywnwbUzzPOJQqs -uK91xDf0Gw2URJK9mA+wYtHWyBMTczTYlDQcnXiPFZ0iSFwm6+ggSn4VuZTL -iuZW9ocn+ekgVh0VZl/IipTBabNLG+ggNaPiq1zDirPei6bXROigaOLhUD7G -ihHpt5o2y9BBaVjvqMwvVnyUkfDWQY4OpKCN1pf/sOKvqe2BdxXoQHlYbHyQ -nw3VwuThF4kOGmz/tIY12DBgttl/0zY6aKY1b9u/iw1L7US/smnQQUs9g/LU -gA0lb26S/q5JBx2HPXL+tmy4PeydQcx/dNCriObjDWPDfhuuy8ZAh92HjnJ5 -XGXD3FYhtQGkw94JCmtnAhu2sdxtP7ObDvtFW5fSs9mQazlE0E6fDgd9REbU -m9hQ2fdpZ4URHcx4x/qS29lwTOTy42VjOlhklX7528uGYVz7b5EP0MG61a6l -bpoN5UPfl7sdpIPN6S1N5GU2fB5IWgszo8OR1bX38Szs2JpHPx1lTgd7yoOy -I8LsuHWjZ4nXITocq/F5VSXFjjbzpg9tLOngcMSgUIHEjsf2kD5oWNHB8ep4 -zpQOO5qOf6httKaDs3R5xqG97Di4/3Fm5GE6uBTHpZUcYEde8axqTRs6nBvZ -mhDhwI4z0ftHfGzpcD6YOe77GXY81PTfJNsROrgJtkeZeLNjz+t64xgGezzK -vlgUwo59nops7Efp4IV+ISJR7KhGvirmy2Cfz/v8g2+wY6U8JbGbwX5um70G -UtiRK+uQ13Y7OgSw/zivn8WOr38aVFxmcODditOP89lRea+lL43BQRrXT65/ -xY7feloyOezpENJ03N6nkh01OjYaaDM49MQ2my/17OinEe5sz+DwJZZDxEd2 -fNMfxBnI4IgbHQcedLOjeoo7NYbBkUq5+7lG2DFsqqU3nsFRb/z3uE6yozFu -FLvG4CuWhkTbIjveKSweD2Ww2MtmMRZmDhQZ1605xeCCjZa/t/FyoN5Si6Mu -g3d7f2k/IcyBrJ+hg4vBn9qOFSZIc2CqheOmRkb8Z9VH4t6pcOB7FknNCwz+ -l3DmzKwGB94CczVFBsfPTunLEhx4Y9PMhncMfxTMfeTM93NgpP5MnxmDSwqX -V8MtGOtKZvc6GH6bCIT1FNpx4OIz4UMmDB5wZysZcObA9U6mHCWMfHm3RCcJ -eHKg8oH1bzYxmGPrek8M5kDzcZ8L5xj5Tb2edMDjMgfuVn1w4AUj/9UH7nO0 -3uFAO1N+LWlGfVg/VRhee8CBlqOvj+xh1M/EusdVWwsYen1YHx5l1NcG+suA -G9UcuK7mUaeLBR2yyTpWVXQOpIvlV9sz6vO/2Kpt05848OHltFkDRv06GDVN -mP5g7B8c2bLIqPf5RwfrQxcY8bBJGlWYMPzm7nxQsMaBfjEs7/wY/VHQ0G/H -L8SJ3YEDPQ37GX4ZLDR/0OVElcSiC0OMfovPDcr/Z8CJFc2TVBM9hl8cTFep -5pxoZnTP7TGjX01qefSuOXHiWo12xV5dht49Mi9MrnOi16E5/VlGv295kHMj -JIUTC8o1tJkY86CahXz+SRYnBjRZTLMy5sX4u+2K615z4k/ZnpZxCkMPGifT -+jnxzXF1YTXGvKHfb/X+M86JM3G2TN9kGfrWrMzI85z4Wf3oRLw0Q0+lA3cs -FxdWCh/7XCvGqAddv2CjbVy4M7Ls6xMBRn52ZB5vjODCwi+Gs74rjPmcwT9v -HMeFxdfbx4t+00COM+Rq8y0uNOcQLxyZp0Frh3VR+0MuFPqmWLllmgZbPNax -9jVz4U+N7hirYRqM5frn/hLjxoCnjfvnGmlQxTeq46vAjdcT/v5Nr6PBbR+L -lt9UbqTlPh/Uq6GB/m7q0l/kRqLqi5VrBQ2yvg4Zcp7mRlWfLalHC2hgJ2Q6 -Kf6CG7t8aUpp8TTQCC6/mF7BjSJLS18r4mjAM0QSka3jRh2tX+RPV2lQ+owV -lL5w410dw9zpcBqIGJfGq61xY5/CDlqlByP+iwqa+sY86Pqe/1a7KQ32Tq8E -uQ3z4I9zpk/Z2WkQuD9J9d1PHmSb5swGJhoUZFK7Ny7y4O2BrRZef5pA1NJh -RykXL74yCZl6N9sEP0tqf7Nu4cWp1P09PH1NkBgR73MngBf9GhKphq+aYEhY -ye093zqMKZQ3zDnWBBd1zU+I/ceHofnnCZP0Rth/LP2X9m4+5Kx2V7dLbgT+ -8B+XrEz4cM8z10in+Ea4W3M5N96BDyf2Rzs6RjRCiVHZD45oPox7kcYm5NwI -MzbyfnNf+LBRshh2UxrhmO9CDD2YH++++hgi8rIBdAruvAytWo8XKFauwS/q -4fzSbHgD3wb0Zn6Xo55XC8tkgT6qlSD++D0XUaZfA7r5TzJu396I4+ZpVZxD -b2FW0MjBuloIlw6f1VU8+QZG4hysvThF8LVzloJxTwkYTvsbjmptQpfzllY+ -sy/h5yku75dhomhQOpBZJFnEOD9vYrlSvRnX0uaTSzPzQfCD0vXCaTH05bCU -0zmYC6vTajlN82I4//h837cduTAhuLNiZFkMw460nsxSyIVqm4MTomzi6MnK -VqK/kgPeI/4GF0XF0X/5u86u3Bzo+NOwaq4njkHBZ8p/MuVAsuo597mbjPXv -vTma7x6AxNVnZlpaEvj4x7Xay+cz4XHB05plHQn8dfjTq7mjmfBfZ77WG5BA -0urWbFfjTLCUeyix11ACcwebz15WzYS4iowxczsJdMtpoOwdz4A/MwnhrhES -2POi/euKSwZ02/oUZjcz1oNudtkPpUMKeYfAxtOSaKgfcOnsvjSwMv4QX3lO -EtX9EqejKWkgeO7EhrMekvjL3G9n5YY0iH0cLfguUBKdnU4fcOpNhVCVbiH3 -OEn8bE23fOKVCo7KwZtpRZK4+QWWCT+4A9vk38hd+iuJ991/WW7cmAJNYnrb -5xKkkPe0QGgq9Ra0Sj1TYkuWwqFMXfMm4VvwSU5SVPiuFHJPDXatX02CQdXl -Fa1cKVzb6tTW05wESzpFb4PKpFBoNJzTzzMJlI7KmrAMS6HPm5VdD8sSISKN -+dQGTWm0uj3y8pHdTdCRqI7f+kka7f7mCKSV3IAheYW+8W5p9A/TsIq9dQOi -yVHk7H5plGxkpad53YAuHaM60XFprNw991eCegP8bdv+MP+VRj0OUEh/cB2O -GHtqTAjI4JNGN4vo29fg9lVGe2vJ4K80kohXYiycjVOv3bxDBs8nCrugTywQ -8cM//HbKoMhDdmuKVSyMJuvv2IYyuBQm9NJuUyxo5nF35BjKIPtUn67kvRho -q03gvmEng/tqZZ/xFkQDP2uWz4kIGXQqcL0gMHoFOJarDs1GyqDi0Vku8for -sDr1Vf3iFRk0ri86pf/oCkx3b57NiJPBZwoDssuuV6D1eYLrwG0Z9P/pvfZl -KQpunrzofDxfBlMfGpmeE4oCkWoHG/sOGTzwIN5T6mQk8JeEak9+kkEJN7Ob -v/ZFAkfBXZELX2QwYmj32WFqJPy+09Vxt08GxUJl+8VWLkGXp5l575gM+r1N -1OlLvASpsmh09J8MehpAfSY9AqQuSuvaKsli9vWxWj+Li1DgzSX3lSSLM7bB -w5K6F4FwnuU8QZZFFopT11fFi2BvXNPuoiaLnbfKZ/OWw+Gu8OlzATqy6LQg -d+VkVjhsflyQmmwqi6KCdVxvZsJAqH3XcqefLNqPZdlXnLsA2bVK/baBsvgw -7Cl5au8F0ChZX/s1WBaflrq5mEhdAIt7g/Gj4bKoKVcVe+1jCCScvkxaiJHF -XjlRfimdEOD/Sz8sdF8W00R6piw3BgO3ol2xRb0sSpMtSRyjAXB2MxjlN8oi -teWgb2ltADTxyfWx0mUxwPSh8o3cAIhb/M7+qlUWF8v79TJdAoC/wdtqUzeD -A40X7ab8Gf0UO9/zUxb1ot5938TkDxJFZepOgnIYGniihbbTF0Jy7tW9EZLD -wREsTpDxha93wo+IbJJDnY9xB/3YfSE9wiCiXlwOZQ8XKKe1+ICMZdtHFUU5 -HPrcZWXm5AOKv8c9prTlsC1pi5zZbW/YsmvzM397OewYERwZ4fOCF/Jn/rA4 -yOHj2ojDpvOe8B9P6b7rJ+Vwa+RKz+duT9j92WYg+7QcfomxuWn00BOsPVM2 -tHnK4T73OMH8vZ4QlrPJhxIlhwktYvd3XvKAVj6RHYMFcqhpZl3qTXUDq3mn -y+eL5FDl+grzB2Y36O5+9fH3Czn8947sfuyTK4zkWZ3lL5XD1A/b35PCXWFJ -71bazho5/HXKo9Ly03mQ9RNavfVZDp1kpis6486BV59gjRGTPAbKrc0My5yB -hjq7N49Z5HH9sxh//VUXkHqW+5qHXR6Z9yekf+xxgaYwnSdN3PL4nSdR/Eyy -C8jJnrxltFEeD1i8/H1DwAU+nio6baQkj3KPPn29zXMa1MYPrjMykcdYttgC -ewkniPp4h+OxqTym26eeqlp1hN7SYSYec3lc7Y87bTDoCFdj/BcareRxpLW/ -rCbXEQbI9/sMj8vjDP8S1V/DEeLdpgoNveQx+2nio/RDp2B6Ls7KMEUeX+n9 -1zf49AT0dmVa30uVx2LntAaZWyeg6U3x4dm78vglXmsuNOQEZF8ZsL2TKY8H -7TLCU4xPwBFxzWPjj+XR0zW0XveHA9Tu7nGOfsPQVy1URVFzgLQElYDGIXl0 -32MsHnffHq76EYGSo/IYRN0lfMTXHvyOHgry/C6PLatH/I4Z24OZ4oWQzT/l -Ud+kPJB7yQ44SlvDzyww/JGMGBo8ZAeeA/7R3FwK2Oi1r+e08FHYt7Uu1ZCq -gAk+s95qlTZgw7HfsnWrAlaMRJqaJtvA2a+NfIfVFfDCqsvTBx42cD32Q7ij -tgIeb5UdmpO3gU/fO5zD9BTwykzbXblrh8ExY1j9lZUC6jDxTVw4Yw0RG5hp -MqEKmHbb4emx/ZaQNBYRmReugDH3k2/8ULaE3Co2YsslBRwDuaY8TktocuUq -2nlVAR99MbV8Wn8INjStT7a+qYCCehwy3wwPQUaE1Km4XAVkCzcP77a2gMq5 -nX9+NytgvKlriU6CGWTSX5889FEBg9LvX+YPMIPIHI2mgnYFVBb0P8R+3AwM -D5PvOHUpYN9Ptb1HqWbQUSam3T6ogP4bS2/uSz4IExeXvQrmFbCNZ22ATdIU -RAReTziKKWJioYH0MxtjWB5Tt3groYiPrG8M+m4xht53BaXi0oqo/435QgCb -MWR6515tk1fEL8f8BdSKjIDy+ZYSUhXxnvqklwOfEexO9zkpjoqo8NUs4HLr -fnCjqHd/dFLEzh/y+j/CDMD3t9jKcRdF/E95cVu+rQGEVLOKTZ1VxL3GRqu5 -GgYQa9Npy+OhiE+9yKNmY/rwMDLgy+4gRfxr2dniaKkPQ72VXS+uK6LD90/h -+tp7wfqa8edbrxXRUe9I2jvF3WBvo/lbvkwRLw7Lfj3BsRsc5SU3Pa9QxDc3 -PbU0v+uBd+mUdfM7RZSCPevdHulB/GjCJw66Ip44diVmi5oeNO3q6vQfUMRN -MeLmOQYIu6YcO2y5lZBeM2MuR94FIuX7sip4lTCOONSOf3Rh6oqqhzS/EtY8 -75Z6SNOFdNkZ3lFBJUx0uXDpoKsurFoG7/GQUMKuXKe8xRc7oao84XnUViXc -5+PAYm6qA3rRlfEvrJQwxP8/0QcvtUHMOvOYiI0SuoaoHJO9pg2/5CIpgUeU -UNBt4n2vkzZkVRg2EMeVkF934C63qDawzHSsNboo4X8ivxXVw7SgxvqH20Cw -El7lm3X3tdkO+gqiB/iylJDn7rXAeE0NeDlZK+uYzYj3feyZYiENUHjtvViW -q4THX8xE8C2oA5tRy32XfCXMnf4lYVqsDtXuUb9qXiphq2Ob64ad6kCUzycH -1Sshp4pIqtOBbaBl8XHo+08l1Nm1/dUfpa2QKx72mphWQrns9cw3f20B4VFK -3K1ZJRz+/DYuqHILzPtf3b5nUQkPB32LwcNb4Pk9uJq+poSLC0zWiXFU2Dr+ -lHE8VkaXgcCCaXYKkMJjAqq1lfH10wXHC2oqULEzh91ERxkNys88HmBWAbPf -VTc7dZUxTC33RlI7CQLcFp6M6SljeZzQjp/+JGiwcxjkN1HGgIweyoH3yuCy -Q8voqIMyGt9tX3fmnBI8+jUoPn9VGWWbh1kbpuWBKPj78EKsMnIp1opaNslD -25lNWpzXlfGLfJiIXI48rAyYmIklKuNC9rRMxFF5MGp5HYn3lFHI6s+QAU0O -JvKvTcYVKaNYZufdq8WyoOq0o0qxW5lx3/MYcfOShhtypiuXepVRXQ1f++pI -w3z/ye1DfcrooPGHv5tFGiqPxOWnDzP0ED68pUlSYGHWn7xpUhkj3ximvK2Q -hMCdlz24mUi4ppgSGywpAQ0bPspOKpLQtXq6YF5yM1BbRu2MSSRsowa9yJoR -hZtxK8mPVEkY1tCZfq9GFOw4FfidtzJ4ebtBwFlRmP7rt9L3HwmzXduqX5Rv -ApExifZWYxKK3a1d6T0nAk6VLpEvPUnItn/L+W9rG2HKdcJf34eErLlqNIOu -jRAgef7cJz8SNjlGSc8WboSYEHeLpWASjk1K5sme2giFOn4yulEkfFY4aT3S -JAh/iy9V1KSScPLS4OSlvA0Q5cxeaHmPhPq1Z2QMIzfAepErD0bvk5Ae+vue -2YkNIOcbE8OZQ0KS3vdHChIbYJ9Ggo3xMxJqrbGFdCQJwM1n6fNtNSSsc+ig -DMmvB4njMmOn6ki4VCghZjLKDzn8WT3zDSQUbdn8lpLHDyWuOdUizST84sE7 -bUrhh6/kJ/FHukgoPjyixqTLB6SHpZShnyRcl/fK0MmDF6oyOhxnhVXwP+89 -3+eUuWDARPa4n6gKNu1ZCkz7zQlMy662f8RUMGVH1pX0ek7Ybc5pyi6jgoEe -etdeunBCHbOO9mZVFfxUtkLnf8YB9JP3ufUIFdxiHVE7Z8wOk/w/WetQBWfk -om25ZdmBv/y/VaM9KpjB41PtscgGZhvbflnuV8Fjr3xp6lls0F7D1utioYIe -tXPL3v9YoVvhbEG8swrWtbs0ulezwJ/W4ofCZ1TQoqBJ3eEuC0hcYH2Qek4F -X1vzvrnjxwL2nXeTsz1UsCNeWekbmQUGLreElwSp4Mt/TqKf7jDD92+ahwau -q6DjMDnvQQQTzD9c+731tQpeDsvlsuD+R3yzNsiILlXBDYXJQWkf/xJdbNf2 -D5eroIHxk4NGqX+JcgexO7ffquCCJZN7J+UvESG6XedfowpKW5m2Xrf+Qwhc -PRvS1KuCqeyi//6ULxOU051MTiyq2KkWK+LYtEhICUs8qmRTxYm9MXxS6YuE -QM1Jc1FOVcyT1Hip4rVIzEnNZNJ4VZE3eeWLhvgiUfaJZ4+6sCq2p3vtZPNc -IPYb4OU1ZVV8tprRLkmeJ04p5nOnHlBFUwWBkOzOWSKo9thZJTNVXHzKaprx -bJaIdxKkPbdQxaTptW3j0bNERU5gHO2wKhosvh0+DrOEkNL+9f9OqKKR7bYN -H5/OEHVKo0IOfqpoV/lu4JraNNFbl+L7M0AVV1xTubMmp4hfziafAoJVsTY0 -sZvInyKk814kJ4Sr4sI6ki0/aYoIUI4Qq4lRxbToBNcx5UlClSQto3RfFcmU -K8xP4AeBDW3hzzNVcZRTitzO9oOwdokaJLJV0TJi1N67aYK49HAy6/AjVQw2 -mNQQPzxB9JIqFKNfqKI6z6LZtO84cV3FlvyzXhXfjHuLjTR8J2ZVE7Wez6gi -z7Y8YVLlCNFFR/2Nc6poY7T4pz5xhHjrNnXIZ0EVZUXn3MvOjBDXnxt6aq2o -YryPSmaSyAihqsP0pIyVjK+DBGv4fIaJk4ausjUiZIzdtVk2cdcQYfhDTE1h -Mxk/hvVXiIgOEWrXGojL4mR8IVbUPfxrkFhtlbfbJ0PGL6cNgm0eDRJpNt23 -aSpkrNa5nXZ38yDRcXrfug5dMhaH2udLcg4Q5dwLYtuBjCfd6bRFWj+RlZ+l -cluPjD2jAeu2x/QTHtP/DGwMyGhUHyKtxdVP8Pm/vNh7kIyTpdHb1Hj6CIMo -2d8jJ8lom6dxTUuxlyjJ/jO4cJWM0vwx3V5FXYTWHp/fRrFk9FX7ltMS2kW8 -Gvy5LuMaGdfnpjy/YdJFPJfq0za6SUa1yQsFWuOfiScpb6+lp5Hxt/GS8Trl -z0RG3OUd+wrI+HyulHXny05CirxqereQjA11k+wBVzqJe41+jrPPyTivHWTO -d7STSOVwuZH2moxTG3jUCNZOIincaHT6LRmpT1x18g53ENE+6xNS2sm4c/Da -A16BdoJr49XcyU4yfr8sKhsx1kZEFTFV7O5i/E/jm/C+d21E5NTst5+9ZKxM -VRQp824jQl06dPW+MfLT4hiu2fuR8LK7Mza+xPArvfvNalkrcWSvPO6UouDl -kQP1XjYfiH8dXPw1MhSUT9pCKhL+QGQ4TfUYyVMweX0408V2OvEtqtT/CImC -H+een2w1oxNejQefBapTUETkVAifBY2IMQ2RKjGg4KEO6c9sbo0Etf/ETzCk -4F9dA9U2jUai1X1fWb0xBTXHbilIrzQQIgmC1p/NKGhEezeqcbWByGp/eG3x -CAXP6ClNkR/XE2U2nX813SmMeVm+25+tjrAfL2uq8KSgcJu9Y93HWoIpKCNl -rw8F/cWW3S/fryUM0s5pWgZSUDurNOWgbi3R9pX5vPclCm6/m9i/EvSemDi5 -pacomfH9iJvxY7w1hLjrldItbyk4Yusraun3lri+5rw9tpqCpXXd+Vcs3hIs -Nw2Kvr9n6PuCy+xb3xITxeyPMhop+GKrSP/bj1VEGVNkimA7Bf12ycYuV1US -R5LC/RdHKbhRyO3bk+IKolnJYc5ijII9OoanR/wriN2l4P5sgoKn5IIr7++o -IFT7Vp1dphl+JUi13qssJ5aVL1h3L1EQ+/XXpzWXESnlgdsreakoxNlRXMFe -SqwztS0S46ciP29zb2lzCRE+8B/VX4CKbfEeWuSUEsKFfUlBTZiKDVUCvc6U -EkL7oJ9QlhQVjex4i0lHXhOfhrzmLm+jYvExndOCTa8IYZ7zRQcOU/FxqF1o -0cJzInvPhaAZWyoe7fEzKah7TqhfuL4n0Y6Klbt7tMRTnhOmM4WdXSeoOFbm -cEpP9zkR9Wlh+dR5Kh7z7c97EF1ELGWF7Q66SMVl2zPyP7QLiajeeF7JSCru -YJM467e+kBASyeqoiqKiTLLErdrmZ4Ra9Htn9jhG/M4sFcVqz4gz7tyx8bep -KBxpWXH631Oie2die24+FXWWq64nlOQTLr7Zdw0LqCgQOwUs3vnEYsErp5+F -VJyI8FoS25JPCMp1/d5WTMUzPIfdidzHhDGXpMSbt1QsHIp8I5/+iKjoyHVs -76Ri5o1tbxXy8wgj/hKqXxcVW5NGq5zd84iufY2Loj1UfF9V/2eHZh4xX/bj -6rEBKibuVxq8XpVLUDPVno5PULF6mSbU3JtDVHTr+cVNUpEyfj3RNyeHMBI6 -BFtnqBigeZ832y2HcL7i+9FngYqXhNr/xLPkEPNvo1I3LVGxPHSU7cCHbCJi -JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT -/wN9xxCi +1:eJwV1nk8VG0bB/CJRBLZ1xljj+w0jJlxXYSyJJE1WROVVAiJQimhQmlRoZKn +IjFzWiylaJE2hWwlEiFrlsrD03vev87ne+7zOec+97l+17lVgna7hvBRKBT7 +RRTK/4+z3S+fqmcUWXZ5/tGyqbezbMmX22/VngIy0w/NQnrVAaXfBcm158Dl +rGV3THtNIcblVht/+1UYKeX0iffagPiYbM6fNi78SRjz/9izCb7UOO+ebquD +yFgtvRU9W8FOffjzZNsHCD8scnrZ52j402aWO9H2FaTim/cJvj8C9Wv+KXp/ +dQooheLh3P25oPSlciBIdwEq7zDTw8IKQCrc/5bgGn48wDFRcnAqghwju2pn +dyFcFXTVjL/vBnScN3w8uWI5Ep0vKPuqSiGvuUQsRmM5Ogp9cJZuLAUfUS3/ +OeZyTG9enFbaUQqfDlP/4wtejhI9B0trf5dCT4QwW+rucly2RdgtjnEbBm2+ +3Wd4i2L4nqAmg/Lb8Hvi3J0DV8SwacHJK/9SGWQUHXrHJy+OlcGlf/11y8HB +dLuEtJo4csReLOk1Lgehp67uWnriOMuRs9/CLIcjfRpdjlbi2L02NH6tXTkk +qL4eOLNdHFdti9/11b8cIgrl/tOsEsdl3XoZRjnlsPFSha7jZgmUiFj9Rneq +HGTP9B0/fVkSF6kd8wsorgC5VXeP/C6WxDtDFWbrSypAoe7ooS3lknj6asLd +1eUVQJvQ3qdVT44rNV36U1kBGk57AqoHJfFFdf+y9W8qwGTxAqPPRAoP7HRe +UJmqgA3RMt+MG6WwsPO7dDKLCy7LBrvPNUuhtoHMpV7gguvVyo75T1JoMWlS +ybHhgkeT77vn41JYkrVwb9CJC1t0r1X5SEujJP+OB0v9uLDzm0F2SoA0vi/Z +nht7iAvHNtlbfpiVxmnJRO1FtVxQIN4q8C2SwUMOwtGa9Vwok9z0y2iZDD7Z +ST9m94ILHz/4lWcryyDln51LYt9xQX1jtOrGdTIYYVe47cIXLtStL1jSdEEG +VXju+X3/cWHBbubtG7YsSsaNjpxg8iCrOL5kwU4WG9I0mSIcHqgvoaTpbZTF +HM1U51TkgdMzYasTIbKoGhrUGrqWB3lr6Dynk7KovHTIa2wTD8zR8dyrL7Jo +pS64fdFuHkQxr/i/TJHDudwLPKsCHjgUik47Zsphxoj+7qErPFAVTEh7myuH +/w2O/pNZxIOmFo+K5htyKK4emPPsJg/094jwd7+Vw1D3p+6LCB4MFscW/1SQ +xwsmBpOFL3hQu7zfYp+6PO5VHC6jNPLgbLTru1968kg5smdi82se2Frr/Z5H +eWyefkIReM+Dq5+/2guGymNp+KKtKp088JVyHlXkyaMHN7f48A8emByoTs6v +kceVZd8+XRzlgfDXlTIqz+VR/uSagjvjPDJX/KDZIY9K6+IbX07xQMaxMsvw +rzzeuqXxquFfcv7J6qa2jgr4yCNyYVKYAJvxufiIPgWkUxruz2gQsH/dGZ0n +IwqYdWLpeJwWAWVX9DolZxXQcLvh1K+VBMhtCmBWCiliQ75YyNAqAkYePPvF +r6+I/K6Z/HlGBJxOyYq+EKeIFpWPm43ZBDR0aauPJCvitGK+cRSHgHnT+mbL +DEUM+p66444lAdu+zxh/u6yI2f63wxStCLBw2jypX6+I9nImd5/YEvBVWjPi +6XIljFit67DOmQDZ3bVUWVklnG2SuGy3gQCnBq832+lKWNN+6CO6EHAvPkNX +zEQJU77vp2i7EpD+ZWLY20sJLRXFHBrcCag1T88rDVTCZBWr4eseBExnqzn8 +3aGEAv6mcYc8CfCz8bhZlKiEa+WlAjW9CTC+WR06flUJl/jMJq3xJSCUz13W +ulQJFwuE3qRsIeDS5rHnZ+4qYW+j+otK0ktEVTQtGpQw0C1kQNmfgM7Io9+O +jCrhb8sN76oDCRB7rXymbVYJ5yaiH3oFkeuvUblGh0LFVbT6G5Oky9p+XH0n +QUWi/XO87FYCktkbAxXMqaglE6Vtso2AdX75P82sqTi8PuBEFWnRpB+H3Z2o +2H5Kz5oTSs6nPrU4K4CKl6NqrpmGERDc/8GsbAcVHTfqut0krSNIf/kqmoob +ytq95LcT8MCh6seS41S86eYe/oP0oXDBRPXTVKT39iSs30GA3clNotaXqZi3 +T3noFumW92OGiRVUtP6X0+m5k4CLU6y6vGoqjokPBP5DOkj6uNuDZ1T8Ffve +4SfpCS+1mKkOKn5ZJGUXH07A/fg9guLfqLiRDzffJ33w0sPz+mNULBHybhsn +bftIWMfpNxX5I99Uq+0iQKTHs3o7Hw2/r1ou7Ea6edF1p2MiNBzgHq9PJJ2n +9vNzkQwNfcXvDV0jHWALu+voNFTsXnLwGWmt0ExKjw4N5Vg/k7+SHkvryF4w +pSG1ZXx2jjRxS1NNEWi473Nct2gEAQdeRxHm9jTMkxCyoJG2Hnts6+FGw6+E +/DJt0ktXiLZFbaGhUfoqNwPSTUabw7JDyeu7aiSNSJ9zu/GnbC8NpaKdnfVJ +++2bSX99gIaqBUGLtUhrnLNWGk6l4UGtRDPFiP/n59RtwSwaPnJXGxImzev8 +ZKmRR8NF410Ks+T84ue1m6yLaHjJxODtJ9JWtNjAgDIa3v9cvLiWtBA+/Zn4 +gIb89Le1l0i/DRQ/crGOhu5FRotiSOce9pOufE3DTen+jQ6kfa+XFH/8SEPJ +bd+VFEmrvvhtNt1Dw1eWPnMD5PoPDdq+FP9Bw4gTDlvLSJcLn/YxmKGhB8vJ +dy/pWN2eH05/adhTON1nQNrSWS9xx1JlpB3pnB8iv/fr7BcF16nKOP/r8aAL +6dM8KaN6LWV8ozv7aIGsH5/WwLoeI2XsV/+gW0x6UG7+m6KdMsoo/WodIuvv +joV9DNNFGQVnD0mlko7xPSvo6aOMq+0MJhVJ8xca6uREKKO3WVYGm6znxieJ +1XfilPHjw0yn52T9Z/U1Or1JUcaeFFuuI2maVshuoXPKaH0qK9KezItF2QXi +YK0ydlzwnllB5sum7e3CWIMyJp3tC0sJJsCZsnit/wdl9LzOT50g8xjsGtEB +/cqY3nTC6TGZX7sDKoeSBOiYUvxg3ITM9yuxmmvmwnRkJ3SePOZHgEuRR8OE +KB0Vyqr3t5H9YPObDPFAOTpGbgg2Dyf7xx7l2WtWq+ioskkseTvZX2Z4WQ1/ +DOioJzJ6vcCL/N7rVo1WmNKRC5MqH8h+lLo3gKFqScfNucYaumS/yqtvbODb +SEeao0kyQfa3p6EFo/UxdEzK/PtR1pEA+3mmRMIBOtY0baBKOZD1kNXCME2i +o4eT3QcRewI6KpcmFR2no7egxskpOzIPy6IlUi/Rsfxhc+xZa7K/l68zs6uj +41KeRKgJk4DLNn2b/3tOjhfvWf/LjKyXjsSke6/I96turrrPIECPj/dSs5WO +MzOfDfVNybxsovoKDtJx0qXw7qQ+AeG/J5MalqugQJdfcosauf57t8kMSKig +v2/SWmtVsn6HO0v45VTQL69NppROwPWu+o+WqipYYevcEUUloPtRru5dhgqe +mr+u2SJDwIZUZvsVfxVME80q7xAi+7NEssGBChWUoKvSBYd5QMmYeXr+ngoW +dTtIzH3nwVv+HT73qlWw0OGuy1A/D3bOuKZOPlPBHfkjVTW9PChqV+8K7VRB +I//AZLMO8n9Z0HB0E78qHggdqDlI/r//rFrRreeuitr5+Q7B5H5g9rJCsomP +Ku7UyX4wns+DaTENdaa/KjKHv7fHXeLB2BRzh812VTztbsVMPseDr9XBsz6J +qmjcBMSOEzxodLwvmnZdFf/Ga0VejSP3Jzv94OuMKnalHVUmnHjALiktPHtW +DTXUnnp2/uBCF72kwPaiGgrryfR3DXIh/uzN/OkCNawZdRTp6ufC/eTiS643 +1fCkRL7BB3L/ZOxVeF60Rg3v1h+bv9bMBW2BM1lHe9WQvd/btq2KCzL+B5Ji +dNWxfJOew/FjZJVJOAR41KnjvPY602QFLnzLDPCIFNTEIw/7+7ZKVYD9eKx9 +P0MLG9b1KT5dUg4jwUJRxKGVOHzvGHe24Da5/5flO1anja3Pg3Y5riwBiTea +J8vHdXD+QThXqvUGKKXdcWEwdLFRt6Hqp3sxnF/FXCEZqofzYhbPF4sXQaOC +1eqpbH3sNG2sEBy7AhZKdVkGHw3QQ02y3m5/AYjyX40OTDHE25nZecL/XARa +sjLbW9MIlZNbLj1vPQdLNXzvub4wwoz54p51EWdAnyN/J3aLMfJPdg8IZ2dD +ZLdEvQPFBC1rEx2Z507A+FSmu/15E9S6rvzdZclxWGvwPM9ezxS1FiqTn8qk +wqMp1r+/3pqiwJ5kcYmgZIjQNe58H7IaP1U4D8c2JwBnbGuL91IGrvkZ9pbu +HQu26nLrl19l4LMHT+zChKOAGH2msrWIgawnZ5Mm5yJB/X7UbFUxA5V3LnFM +/REJix3eFYSVMHAw7GjC69eRULf76M96goG+CuMP209FgmX19Ln4FwzUtTqk +9E02Ehiu779+H2HgklKH9CsGe2FlUnpcnZkZijSVCWj/iYAa1nUBJwszJCam +g/5+igCXX7U5rWwztCzXy/rxOALiImZKB63MsM1GVkvgeAQ0+Ab0ijqZoc2r +H19YChEQxmQ4bA4ww8v+FNdS3AU3f/YqTqeZIdXVLRcv7wSdEGatRic5fljz +dmJOGJxSdZ47/MkM01+u/TaWEAbTX4JWf+02w0GW5PY9oWHwyCezJL/PDMtM +50yL2GHg6vLlnOyoGao2Tr148z0U9rNS9yylmONhEc9oulUoNIi/VxnVMMe9 +AdZbkv+GQMijsCPEXnPskBbr0boZDGO7hmNto80xL+pv4EBuMMRRw3d+jDHH +U+8jNtxNCYb0hN2uvw+YY6dcIxzxDYZyixg6+6g5pmrHs/tXBMP8vcM19Xnm +OJJ5vf9mQhDk3Mmf/lBvjnYz/j8n/AOhtrBl66Q0EyWHdXewiv2gx0nFP0aO +iWuPdto3H/MDyp9d3v8qMPHgj7nbqdv9wHqjoLMAnYnHiYv3mXp+8HyRhZm8 +DhMvLj7z6NPdLfA6qGCplSUTz/jprvrvlS90qu8oy9rGxBW5Ql90l22G6Rt/ +fxncZ6Ka382XDu89YcDDrvB4JRO1LrQ+y63yhPbFJ9b1VTMxYu+jn1PXPKE6 +QOHC2cdMvIapN4ZiPCFFbrXFwksmKiheW1pJ9YQVaTsSGj8xsVQpZaArwgN0 +Q1spIXwWeCtKIbeV5g7BGiVL89ZboJdBTMgrrivEP/Pboeligb45ewsm810h +K0SCPG2BhL78LZ0MV6i5vj/zlacFii98m24JdgUpzXViC4EWWKp4t0pIxhWe +a/ZLBcRYoOcH+PUlcSPorFSmaxZY4KWG3pMDPi4wqXOawZ2wwPaOYW7cSSdo +f422klMW2Jspl7F5rxM8jhhzi56xQJ1PtyW8NznBSa79XsacBbr7DnRdU3AC +HQtKaRU/C1+MW4vE3HCEIPtdKvUyLGRciKuZa3CAltC1Ii1sFmq4fbk3q2QP +D4r+7Z1JY+FHSwZ9l4gdMNZE/3LIYOH0G/7R9zO2cLd3RKTwBAsvLhm64/jF +Fri0bjOHHBbOXPZpSeTaQun5xyfyL7LwfnT3405vWyjMTGWuLWNhvZz2mbBS +GzgeLZZ9vpmFzQXB9wID1oCQZFrxaCsL26lvXWyd1sDRCkqNdTsLJ+yb21nm +a+DI2OTAyCcWdnUERQWuWAMHw1rYVgMszBZoop94Yg2RvhcGh36z8KxA2oSX +ljX42Kghi8bG+esNct4UK1hoERKtp7MxhnYl6M8IQmHIWJeDGhuvGejV3u5A +GDhaGeuzko3/rXMJdeUhRL7ccGe/MRtZ29bHHg9FSHdOoD2wY6NfZcVDzj8A +VV6t86a72Whn45nfFsWBLUNVjTV72ZixniHZvpEDlPjC8zbRbLTIitwwb8AB +u4s7TTftZ6NntcKFOyNs+PB5UXjUYTaqLA5teRjKhuEg/a6Kc2xcTIh5+W5l +geKuY5X6j9n4rvQjrS6GCSf/bludUcfG9Nr6K398mMCXY1fx/SkbXZVSO5yA +CcP3BG4WvmTjsNkJATshJlRRjpyXaGbjZt++60kXzcHnTFLsbD8b2+to04te +mMH56v2rHy3jYFT/0zenjBgg4uxdoSDKwSN7khrE5BmQ1GOuF7uCg/f/WZl+ +g8KAMIHf6obSHMx/LrJUvWk1mG2IkbpK4+BVw5g03LMaPn6NnEo14uBxr1j/ +ecIUpIXDK9Z7ctBNYGng0AYTKFqTGD/hzUG5C7QzbWYmYJx4cs1pXw7aJ6e4 +9iqbgPNEeWt7IAdNRM5S1k4Yw9GPM3+Cw8n7hw5JeOUYw++rh6zjkzm4ZV35 +97guI+hknW4uLuFgQ1D45O8kQwjbV3TJvoyDhy8ZvFALN4TZsrshI+XkfPF5 +0zZPQ5BQbf9ldI+DfA3ZCqv1DcFRiKr08DEHTymKn/tSaQA1LcVbm1s5eDAu +d0lWoj44iD7Qi2nnoOejPf0tHvrQvvblrFwXB78nsOXXGurDdNWPNL8e8nk/ +Zh9z+/RA74rh7aFhDtbqXe674qQHNZ1WMZmjHJzgi2Q5aemBg5QbGExwcJ8p +Y7cqnx5sO7bvffQMB5+kr67Y+EAXph8fzZP9zcGgXP3gW6d1IWXuXHDVHAfd +M3PM9XfrwgrTm7pbFjgo4XaT/7ODLuTvqpr5+5eDBtnfzt7T1IX/AVuBKEc= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.22160540372702894`}}, + "PlotRange" -> {{0, 30}, {0., 0.07980639202001641}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13336,6 +14598,7 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13363,7 +14626,8 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.22160540372702894`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07980639202001641}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13371,17 +14635,640 @@ JflU2QoVzzttUolNySYENB9R7P9R8WDMfW0jx2wi3bVsYW2NigdO2bNEq2UT Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913381496467495`*^9}, + CellChangeTimes->{3.9913381496467495`*^9, 3.994389619299356*^9}, CellLabel-> - "Out[304]=",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] + "Out[138]=",ExpressionUUID->"ca47d1df-ed9c-48a5-80a0-9e1eb864064a"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ea848967-083d-ea47-bce0-\ -5c3b93725916"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[139]:=",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VG0bB/CJRBLZ1xljj+w0jJlxXYSyJJE1WROVVAiJQimhQmlRoZKn +IjFzWiylaJE2hWwlEiFrlsrD03vev87ne+7zOec+97l+17lVgna7hvBRKBT7 +RRTK/4+z3S+fqmcUWXZ5/tGyqbezbMmX22/VngIy0w/NQnrVAaXfBcm158Dl +rGV3THtNIcblVht/+1UYKeX0iffagPiYbM6fNi78SRjz/9izCb7UOO+ebquD +yFgtvRU9W8FOffjzZNsHCD8scnrZ52j402aWO9H2FaTim/cJvj8C9Wv+KXp/ +dQooheLh3P25oPSlciBIdwEq7zDTw8IKQCrc/5bgGn48wDFRcnAqghwju2pn +dyFcFXTVjL/vBnScN3w8uWI5Ep0vKPuqSiGvuUQsRmM5Ogp9cJZuLAUfUS3/ +OeZyTG9enFbaUQqfDlP/4wtejhI9B0trf5dCT4QwW+rucly2RdgtjnEbBm2+ +3Wd4i2L4nqAmg/Lb8Hvi3J0DV8SwacHJK/9SGWQUHXrHJy+OlcGlf/11y8HB +dLuEtJo4csReLOk1Lgehp67uWnriOMuRs9/CLIcjfRpdjlbi2L02NH6tXTkk +qL4eOLNdHFdti9/11b8cIgrl/tOsEsdl3XoZRjnlsPFSha7jZgmUiFj9Rneq +HGTP9B0/fVkSF6kd8wsorgC5VXeP/C6WxDtDFWbrSypAoe7ooS3lknj6asLd +1eUVQJvQ3qdVT44rNV36U1kBGk57AqoHJfFFdf+y9W8qwGTxAqPPRAoP7HRe +UJmqgA3RMt+MG6WwsPO7dDKLCy7LBrvPNUuhtoHMpV7gguvVyo75T1JoMWlS +ybHhgkeT77vn41JYkrVwb9CJC1t0r1X5SEujJP+OB0v9uLDzm0F2SoA0vi/Z +nht7iAvHNtlbfpiVxmnJRO1FtVxQIN4q8C2SwUMOwtGa9Vwok9z0y2iZDD7Z +ST9m94ILHz/4lWcryyDln51LYt9xQX1jtOrGdTIYYVe47cIXLtStL1jSdEEG +VXju+X3/cWHBbubtG7YsSsaNjpxg8iCrOL5kwU4WG9I0mSIcHqgvoaTpbZTF +HM1U51TkgdMzYasTIbKoGhrUGrqWB3lr6Dynk7KovHTIa2wTD8zR8dyrL7Jo +pS64fdFuHkQxr/i/TJHDudwLPKsCHjgUik47Zsphxoj+7qErPFAVTEh7myuH +/w2O/pNZxIOmFo+K5htyKK4emPPsJg/094jwd7+Vw1D3p+6LCB4MFscW/1SQ +xwsmBpOFL3hQu7zfYp+6PO5VHC6jNPLgbLTru1968kg5smdi82se2Frr/Z5H +eWyefkIReM+Dq5+/2guGymNp+KKtKp088JVyHlXkyaMHN7f48A8emByoTs6v +kceVZd8+XRzlgfDXlTIqz+VR/uSagjvjPDJX/KDZIY9K6+IbX07xQMaxMsvw +rzzeuqXxquFfcv7J6qa2jgr4yCNyYVKYAJvxufiIPgWkUxruz2gQsH/dGZ0n +IwqYdWLpeJwWAWVX9DolZxXQcLvh1K+VBMhtCmBWCiliQ75YyNAqAkYePPvF +r6+I/K6Z/HlGBJxOyYq+EKeIFpWPm43ZBDR0aauPJCvitGK+cRSHgHnT+mbL +DEUM+p66444lAdu+zxh/u6yI2f63wxStCLBw2jypX6+I9nImd5/YEvBVWjPi +6XIljFit67DOmQDZ3bVUWVklnG2SuGy3gQCnBq832+lKWNN+6CO6EHAvPkNX +zEQJU77vp2i7EpD+ZWLY20sJLRXFHBrcCag1T88rDVTCZBWr4eseBExnqzn8 +3aGEAv6mcYc8CfCz8bhZlKiEa+WlAjW9CTC+WR06flUJl/jMJq3xJSCUz13W +ulQJFwuE3qRsIeDS5rHnZ+4qYW+j+otK0ktEVTQtGpQw0C1kQNmfgM7Io9+O +jCrhb8sN76oDCRB7rXymbVYJ5yaiH3oFkeuvUblGh0LFVbT6G5Oky9p+XH0n +QUWi/XO87FYCktkbAxXMqaglE6Vtso2AdX75P82sqTi8PuBEFWnRpB+H3Z2o +2H5Kz5oTSs6nPrU4K4CKl6NqrpmGERDc/8GsbAcVHTfqut0krSNIf/kqmoob +ytq95LcT8MCh6seS41S86eYe/oP0oXDBRPXTVKT39iSs30GA3clNotaXqZi3 +T3noFumW92OGiRVUtP6X0+m5k4CLU6y6vGoqjokPBP5DOkj6uNuDZ1T8Ffve +4SfpCS+1mKkOKn5ZJGUXH07A/fg9guLfqLiRDzffJ33w0sPz+mNULBHybhsn +bftIWMfpNxX5I99Uq+0iQKTHs3o7Hw2/r1ou7Ea6edF1p2MiNBzgHq9PJJ2n +9vNzkQwNfcXvDV0jHWALu+voNFTsXnLwGWmt0ExKjw4N5Vg/k7+SHkvryF4w +pSG1ZXx2jjRxS1NNEWi473Nct2gEAQdeRxHm9jTMkxCyoJG2Hnts6+FGw6+E +/DJt0ktXiLZFbaGhUfoqNwPSTUabw7JDyeu7aiSNSJ9zu/GnbC8NpaKdnfVJ +++2bSX99gIaqBUGLtUhrnLNWGk6l4UGtRDPFiP/n59RtwSwaPnJXGxImzev8 +ZKmRR8NF410Ks+T84ue1m6yLaHjJxODtJ9JWtNjAgDIa3v9cvLiWtBA+/Zn4 +gIb89Le1l0i/DRQ/crGOhu5FRotiSOce9pOufE3DTen+jQ6kfa+XFH/8SEPJ +bd+VFEmrvvhtNt1Dw1eWPnMD5PoPDdq+FP9Bw4gTDlvLSJcLn/YxmKGhB8vJ +dy/pWN2eH05/adhTON1nQNrSWS9xx1JlpB3pnB8iv/fr7BcF16nKOP/r8aAL +6dM8KaN6LWV8ozv7aIGsH5/WwLoeI2XsV/+gW0x6UG7+m6KdMsoo/WodIuvv +joV9DNNFGQVnD0mlko7xPSvo6aOMq+0MJhVJ8xca6uREKKO3WVYGm6znxieJ +1XfilPHjw0yn52T9Z/U1Or1JUcaeFFuuI2maVshuoXPKaH0qK9KezItF2QXi +YK0ydlzwnllB5sum7e3CWIMyJp3tC0sJJsCZsnit/wdl9LzOT50g8xjsGtEB +/cqY3nTC6TGZX7sDKoeSBOiYUvxg3ITM9yuxmmvmwnRkJ3SePOZHgEuRR8OE +KB0Vyqr3t5H9YPObDPFAOTpGbgg2Dyf7xx7l2WtWq+ioskkseTvZX2Z4WQ1/ +DOioJzJ6vcCL/N7rVo1WmNKRC5MqH8h+lLo3gKFqScfNucYaumS/yqtvbODb +SEeao0kyQfa3p6EFo/UxdEzK/PtR1pEA+3mmRMIBOtY0baBKOZD1kNXCME2i +o4eT3QcRewI6KpcmFR2no7egxskpOzIPy6IlUi/Rsfxhc+xZa7K/l68zs6uj +41KeRKgJk4DLNn2b/3tOjhfvWf/LjKyXjsSke6/I96turrrPIECPj/dSs5WO +MzOfDfVNybxsovoKDtJx0qXw7qQ+AeG/J5MalqugQJdfcosauf57t8kMSKig +v2/SWmtVsn6HO0v45VTQL69NppROwPWu+o+WqipYYevcEUUloPtRru5dhgqe +mr+u2SJDwIZUZvsVfxVME80q7xAi+7NEssGBChWUoKvSBYd5QMmYeXr+ngoW +dTtIzH3nwVv+HT73qlWw0OGuy1A/D3bOuKZOPlPBHfkjVTW9PChqV+8K7VRB +I//AZLMO8n9Z0HB0E78qHggdqDlI/r//rFrRreeuitr5+Q7B5H5g9rJCsomP +Ku7UyX4wns+DaTENdaa/KjKHv7fHXeLB2BRzh812VTztbsVMPseDr9XBsz6J +qmjcBMSOEzxodLwvmnZdFf/Ga0VejSP3Jzv94OuMKnalHVUmnHjALiktPHtW +DTXUnnp2/uBCF72kwPaiGgrryfR3DXIh/uzN/OkCNawZdRTp6ufC/eTiS643 +1fCkRL7BB3L/ZOxVeF60Rg3v1h+bv9bMBW2BM1lHe9WQvd/btq2KCzL+B5Ji +dNWxfJOew/FjZJVJOAR41KnjvPY602QFLnzLDPCIFNTEIw/7+7ZKVYD9eKx9 +P0MLG9b1KT5dUg4jwUJRxKGVOHzvGHe24Da5/5flO1anja3Pg3Y5riwBiTea +J8vHdXD+QThXqvUGKKXdcWEwdLFRt6Hqp3sxnF/FXCEZqofzYhbPF4sXQaOC +1eqpbH3sNG2sEBy7AhZKdVkGHw3QQ02y3m5/AYjyX40OTDHE25nZecL/XARa +sjLbW9MIlZNbLj1vPQdLNXzvub4wwoz54p51EWdAnyN/J3aLMfJPdg8IZ2dD +ZLdEvQPFBC1rEx2Z507A+FSmu/15E9S6rvzdZclxWGvwPM9ezxS1FiqTn8qk +wqMp1r+/3pqiwJ5kcYmgZIjQNe58H7IaP1U4D8c2JwBnbGuL91IGrvkZ9pbu +HQu26nLrl19l4LMHT+zChKOAGH2msrWIgawnZ5Mm5yJB/X7UbFUxA5V3LnFM +/REJix3eFYSVMHAw7GjC69eRULf76M96goG+CuMP209FgmX19Ln4FwzUtTqk +9E02Ehiu779+H2HgklKH9CsGe2FlUnpcnZkZijSVCWj/iYAa1nUBJwszJCam +g/5+igCXX7U5rWwztCzXy/rxOALiImZKB63MsM1GVkvgeAQ0+Ab0ijqZoc2r +H19YChEQxmQ4bA4ww8v+FNdS3AU3f/YqTqeZIdXVLRcv7wSdEGatRic5fljz +dmJOGJxSdZ47/MkM01+u/TaWEAbTX4JWf+02w0GW5PY9oWHwyCezJL/PDMtM +50yL2GHg6vLlnOyoGao2Tr148z0U9rNS9yylmONhEc9oulUoNIi/VxnVMMe9 +AdZbkv+GQMijsCPEXnPskBbr0boZDGO7hmNto80xL+pv4EBuMMRRw3d+jDHH +U+8jNtxNCYb0hN2uvw+YY6dcIxzxDYZyixg6+6g5pmrHs/tXBMP8vcM19Xnm +OJJ5vf9mQhDk3Mmf/lBvjnYz/j8n/AOhtrBl66Q0EyWHdXewiv2gx0nFP0aO +iWuPdto3H/MDyp9d3v8qMPHgj7nbqdv9wHqjoLMAnYnHiYv3mXp+8HyRhZm8 +DhMvLj7z6NPdLfA6qGCplSUTz/jprvrvlS90qu8oy9rGxBW5Ql90l22G6Rt/ +fxncZ6Ka382XDu89YcDDrvB4JRO1LrQ+y63yhPbFJ9b1VTMxYu+jn1PXPKE6 +QOHC2cdMvIapN4ZiPCFFbrXFwksmKiheW1pJ9YQVaTsSGj8xsVQpZaArwgN0 +Q1spIXwWeCtKIbeV5g7BGiVL89ZboJdBTMgrrivEP/Pboeligb45ewsm810h +K0SCPG2BhL78LZ0MV6i5vj/zlacFii98m24JdgUpzXViC4EWWKp4t0pIxhWe +a/ZLBcRYoOcH+PUlcSPorFSmaxZY4KWG3pMDPi4wqXOawZ2wwPaOYW7cSSdo +f422klMW2Jspl7F5rxM8jhhzi56xQJ1PtyW8NznBSa79XsacBbr7DnRdU3AC +HQtKaRU/C1+MW4vE3HCEIPtdKvUyLGRciKuZa3CAltC1Ii1sFmq4fbk3q2QP +D4r+7Z1JY+FHSwZ9l4gdMNZE/3LIYOH0G/7R9zO2cLd3RKTwBAsvLhm64/jF +Fri0bjOHHBbOXPZpSeTaQun5xyfyL7LwfnT3405vWyjMTGWuLWNhvZz2mbBS +GzgeLZZ9vpmFzQXB9wID1oCQZFrxaCsL26lvXWyd1sDRCkqNdTsLJ+yb21nm +a+DI2OTAyCcWdnUERQWuWAMHw1rYVgMszBZoop94Yg2RvhcGh36z8KxA2oSX +ljX42Kghi8bG+esNct4UK1hoERKtp7MxhnYl6M8IQmHIWJeDGhuvGejV3u5A +GDhaGeuzko3/rXMJdeUhRL7ccGe/MRtZ29bHHg9FSHdOoD2wY6NfZcVDzj8A +VV6t86a72Whn45nfFsWBLUNVjTV72ZixniHZvpEDlPjC8zbRbLTIitwwb8AB +u4s7TTftZ6NntcKFOyNs+PB5UXjUYTaqLA5teRjKhuEg/a6Kc2xcTIh5+W5l +geKuY5X6j9n4rvQjrS6GCSf/bludUcfG9Nr6K398mMCXY1fx/SkbXZVSO5yA +CcP3BG4WvmTjsNkJATshJlRRjpyXaGbjZt++60kXzcHnTFLsbD8b2+to04te +mMH56v2rHy3jYFT/0zenjBgg4uxdoSDKwSN7khrE5BmQ1GOuF7uCg/f/WZl+ +g8KAMIHf6obSHMx/LrJUvWk1mG2IkbpK4+BVw5g03LMaPn6NnEo14uBxr1j/ +ecIUpIXDK9Z7ctBNYGng0AYTKFqTGD/hzUG5C7QzbWYmYJx4cs1pXw7aJ6e4 +9iqbgPNEeWt7IAdNRM5S1k4Yw9GPM3+Cw8n7hw5JeOUYw++rh6zjkzm4ZV35 +97guI+hknW4uLuFgQ1D45O8kQwjbV3TJvoyDhy8ZvFALN4TZsrshI+XkfPF5 +0zZPQ5BQbf9ldI+DfA3ZCqv1DcFRiKr08DEHTymKn/tSaQA1LcVbm1s5eDAu +d0lWoj44iD7Qi2nnoOejPf0tHvrQvvblrFwXB78nsOXXGurDdNWPNL8e8nk/ +Zh9z+/RA74rh7aFhDtbqXe674qQHNZ1WMZmjHJzgi2Q5aemBg5QbGExwcJ8p +Y7cqnx5sO7bvffQMB5+kr67Y+EAXph8fzZP9zcGgXP3gW6d1IWXuXHDVHAfd +M3PM9XfrwgrTm7pbFjgo4XaT/7ODLuTvqpr5+5eDBtnfzt7T1IX/AVuBKEc= + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VG0bB/CJRBLZ1xljj+w0jJlxXYSyJJE1WROVVAiJQimhQmlRoZKn +IjFzWiylaJE2hWwlEiFrlsrD03vev87ne+7zOec+97l+17lVgna7hvBRKBT7 +RRTK/4+z3S+fqmcUWXZ5/tGyqbezbMmX22/VngIy0w/NQnrVAaXfBcm158Dl +rGV3THtNIcblVht/+1UYKeX0iffagPiYbM6fNi78SRjz/9izCb7UOO+ebquD +yFgtvRU9W8FOffjzZNsHCD8scnrZ52j402aWO9H2FaTim/cJvj8C9Wv+KXp/ +dQooheLh3P25oPSlciBIdwEq7zDTw8IKQCrc/5bgGn48wDFRcnAqghwju2pn +dyFcFXTVjL/vBnScN3w8uWI5Ep0vKPuqSiGvuUQsRmM5Ogp9cJZuLAUfUS3/ +OeZyTG9enFbaUQqfDlP/4wtejhI9B0trf5dCT4QwW+rucly2RdgtjnEbBm2+ +3Wd4i2L4nqAmg/Lb8Hvi3J0DV8SwacHJK/9SGWQUHXrHJy+OlcGlf/11y8HB +dLuEtJo4csReLOk1Lgehp67uWnriOMuRs9/CLIcjfRpdjlbi2L02NH6tXTkk +qL4eOLNdHFdti9/11b8cIgrl/tOsEsdl3XoZRjnlsPFSha7jZgmUiFj9Rneq +HGTP9B0/fVkSF6kd8wsorgC5VXeP/C6WxDtDFWbrSypAoe7ooS3lknj6asLd +1eUVQJvQ3qdVT44rNV36U1kBGk57AqoHJfFFdf+y9W8qwGTxAqPPRAoP7HRe +UJmqgA3RMt+MG6WwsPO7dDKLCy7LBrvPNUuhtoHMpV7gguvVyo75T1JoMWlS +ybHhgkeT77vn41JYkrVwb9CJC1t0r1X5SEujJP+OB0v9uLDzm0F2SoA0vi/Z +nht7iAvHNtlbfpiVxmnJRO1FtVxQIN4q8C2SwUMOwtGa9Vwok9z0y2iZDD7Z +ST9m94ILHz/4lWcryyDln51LYt9xQX1jtOrGdTIYYVe47cIXLtStL1jSdEEG +VXju+X3/cWHBbubtG7YsSsaNjpxg8iCrOL5kwU4WG9I0mSIcHqgvoaTpbZTF +HM1U51TkgdMzYasTIbKoGhrUGrqWB3lr6Dynk7KovHTIa2wTD8zR8dyrL7Jo +pS64fdFuHkQxr/i/TJHDudwLPKsCHjgUik47Zsphxoj+7qErPFAVTEh7myuH +/w2O/pNZxIOmFo+K5htyKK4emPPsJg/094jwd7+Vw1D3p+6LCB4MFscW/1SQ +xwsmBpOFL3hQu7zfYp+6PO5VHC6jNPLgbLTru1968kg5smdi82se2Frr/Z5H +eWyefkIReM+Dq5+/2guGymNp+KKtKp088JVyHlXkyaMHN7f48A8emByoTs6v +kceVZd8+XRzlgfDXlTIqz+VR/uSagjvjPDJX/KDZIY9K6+IbX07xQMaxMsvw +rzzeuqXxquFfcv7J6qa2jgr4yCNyYVKYAJvxufiIPgWkUxruz2gQsH/dGZ0n +IwqYdWLpeJwWAWVX9DolZxXQcLvh1K+VBMhtCmBWCiliQ75YyNAqAkYePPvF +r6+I/K6Z/HlGBJxOyYq+EKeIFpWPm43ZBDR0aauPJCvitGK+cRSHgHnT+mbL +DEUM+p66444lAdu+zxh/u6yI2f63wxStCLBw2jypX6+I9nImd5/YEvBVWjPi +6XIljFit67DOmQDZ3bVUWVklnG2SuGy3gQCnBq832+lKWNN+6CO6EHAvPkNX +zEQJU77vp2i7EpD+ZWLY20sJLRXFHBrcCag1T88rDVTCZBWr4eseBExnqzn8 +3aGEAv6mcYc8CfCz8bhZlKiEa+WlAjW9CTC+WR06flUJl/jMJq3xJSCUz13W +ulQJFwuE3qRsIeDS5rHnZ+4qYW+j+otK0ktEVTQtGpQw0C1kQNmfgM7Io9+O +jCrhb8sN76oDCRB7rXymbVYJ5yaiH3oFkeuvUblGh0LFVbT6G5Oky9p+XH0n +QUWi/XO87FYCktkbAxXMqaglE6Vtso2AdX75P82sqTi8PuBEFWnRpB+H3Z2o +2H5Kz5oTSs6nPrU4K4CKl6NqrpmGERDc/8GsbAcVHTfqut0krSNIf/kqmoob +ytq95LcT8MCh6seS41S86eYe/oP0oXDBRPXTVKT39iSs30GA3clNotaXqZi3 +T3noFumW92OGiRVUtP6X0+m5k4CLU6y6vGoqjokPBP5DOkj6uNuDZ1T8Ffve +4SfpCS+1mKkOKn5ZJGUXH07A/fg9guLfqLiRDzffJ33w0sPz+mNULBHybhsn +bftIWMfpNxX5I99Uq+0iQKTHs3o7Hw2/r1ou7Ea6edF1p2MiNBzgHq9PJJ2n +9vNzkQwNfcXvDV0jHWALu+voNFTsXnLwGWmt0ExKjw4N5Vg/k7+SHkvryF4w +pSG1ZXx2jjRxS1NNEWi473Nct2gEAQdeRxHm9jTMkxCyoJG2Hnts6+FGw6+E +/DJt0ktXiLZFbaGhUfoqNwPSTUabw7JDyeu7aiSNSJ9zu/GnbC8NpaKdnfVJ +++2bSX99gIaqBUGLtUhrnLNWGk6l4UGtRDPFiP/n59RtwSwaPnJXGxImzev8 +ZKmRR8NF410Ks+T84ue1m6yLaHjJxODtJ9JWtNjAgDIa3v9cvLiWtBA+/Zn4 +gIb89Le1l0i/DRQ/crGOhu5FRotiSOce9pOufE3DTen+jQ6kfa+XFH/8SEPJ +bd+VFEmrvvhtNt1Dw1eWPnMD5PoPDdq+FP9Bw4gTDlvLSJcLn/YxmKGhB8vJ +dy/pWN2eH05/adhTON1nQNrSWS9xx1JlpB3pnB8iv/fr7BcF16nKOP/r8aAL +6dM8KaN6LWV8ozv7aIGsH5/WwLoeI2XsV/+gW0x6UG7+m6KdMsoo/WodIuvv +joV9DNNFGQVnD0mlko7xPSvo6aOMq+0MJhVJ8xca6uREKKO3WVYGm6znxieJ +1XfilPHjw0yn52T9Z/U1Or1JUcaeFFuuI2maVshuoXPKaH0qK9KezItF2QXi +YK0ydlzwnllB5sum7e3CWIMyJp3tC0sJJsCZsnit/wdl9LzOT50g8xjsGtEB +/cqY3nTC6TGZX7sDKoeSBOiYUvxg3ITM9yuxmmvmwnRkJ3SePOZHgEuRR8OE +KB0Vyqr3t5H9YPObDPFAOTpGbgg2Dyf7xx7l2WtWq+ioskkseTvZX2Z4WQ1/ +DOioJzJ6vcCL/N7rVo1WmNKRC5MqH8h+lLo3gKFqScfNucYaumS/yqtvbODb +SEeao0kyQfa3p6EFo/UxdEzK/PtR1pEA+3mmRMIBOtY0baBKOZD1kNXCME2i +o4eT3QcRewI6KpcmFR2no7egxskpOzIPy6IlUi/Rsfxhc+xZa7K/l68zs6uj +41KeRKgJk4DLNn2b/3tOjhfvWf/LjKyXjsSke6/I96turrrPIECPj/dSs5WO +MzOfDfVNybxsovoKDtJx0qXw7qQ+AeG/J5MalqugQJdfcosauf57t8kMSKig +v2/SWmtVsn6HO0v45VTQL69NppROwPWu+o+WqipYYevcEUUloPtRru5dhgqe +mr+u2SJDwIZUZvsVfxVME80q7xAi+7NEssGBChWUoKvSBYd5QMmYeXr+ngoW +dTtIzH3nwVv+HT73qlWw0OGuy1A/D3bOuKZOPlPBHfkjVTW9PChqV+8K7VRB +I//AZLMO8n9Z0HB0E78qHggdqDlI/r//rFrRreeuitr5+Q7B5H5g9rJCsomP +Ku7UyX4wns+DaTENdaa/KjKHv7fHXeLB2BRzh812VTztbsVMPseDr9XBsz6J +qmjcBMSOEzxodLwvmnZdFf/Ga0VejSP3Jzv94OuMKnalHVUmnHjALiktPHtW +DTXUnnp2/uBCF72kwPaiGgrryfR3DXIh/uzN/OkCNawZdRTp6ufC/eTiS643 +1fCkRL7BB3L/ZOxVeF60Rg3v1h+bv9bMBW2BM1lHe9WQvd/btq2KCzL+B5Ji +dNWxfJOew/FjZJVJOAR41KnjvPY602QFLnzLDPCIFNTEIw/7+7ZKVYD9eKx9 +P0MLG9b1KT5dUg4jwUJRxKGVOHzvGHe24Da5/5flO1anja3Pg3Y5riwBiTea +J8vHdXD+QThXqvUGKKXdcWEwdLFRt6Hqp3sxnF/FXCEZqofzYhbPF4sXQaOC +1eqpbH3sNG2sEBy7AhZKdVkGHw3QQ02y3m5/AYjyX40OTDHE25nZecL/XARa +sjLbW9MIlZNbLj1vPQdLNXzvub4wwoz54p51EWdAnyN/J3aLMfJPdg8IZ2dD +ZLdEvQPFBC1rEx2Z507A+FSmu/15E9S6rvzdZclxWGvwPM9ezxS1FiqTn8qk +wqMp1r+/3pqiwJ5kcYmgZIjQNe58H7IaP1U4D8c2JwBnbGuL91IGrvkZ9pbu +HQu26nLrl19l4LMHT+zChKOAGH2msrWIgawnZ5Mm5yJB/X7UbFUxA5V3LnFM +/REJix3eFYSVMHAw7GjC69eRULf76M96goG+CuMP209FgmX19Ln4FwzUtTqk +9E02Ehiu779+H2HgklKH9CsGe2FlUnpcnZkZijSVCWj/iYAa1nUBJwszJCam +g/5+igCXX7U5rWwztCzXy/rxOALiImZKB63MsM1GVkvgeAQ0+Ab0ijqZoc2r +H19YChEQxmQ4bA4ww8v+FNdS3AU3f/YqTqeZIdXVLRcv7wSdEGatRic5fljz +dmJOGJxSdZ47/MkM01+u/TaWEAbTX4JWf+02w0GW5PY9oWHwyCezJL/PDMtM +50yL2GHg6vLlnOyoGao2Tr148z0U9rNS9yylmONhEc9oulUoNIi/VxnVMMe9 +AdZbkv+GQMijsCPEXnPskBbr0boZDGO7hmNto80xL+pv4EBuMMRRw3d+jDHH +U+8jNtxNCYb0hN2uvw+YY6dcIxzxDYZyixg6+6g5pmrHs/tXBMP8vcM19Xnm +OJJ5vf9mQhDk3Mmf/lBvjnYz/j8n/AOhtrBl66Q0EyWHdXewiv2gx0nFP0aO +iWuPdto3H/MDyp9d3v8qMPHgj7nbqdv9wHqjoLMAnYnHiYv3mXp+8HyRhZm8 +DhMvLj7z6NPdLfA6qGCplSUTz/jprvrvlS90qu8oy9rGxBW5Ql90l22G6Rt/ +fxncZ6Ka382XDu89YcDDrvB4JRO1LrQ+y63yhPbFJ9b1VTMxYu+jn1PXPKE6 +QOHC2cdMvIapN4ZiPCFFbrXFwksmKiheW1pJ9YQVaTsSGj8xsVQpZaArwgN0 +Q1spIXwWeCtKIbeV5g7BGiVL89ZboJdBTMgrrivEP/Pboeligb45ewsm810h +K0SCPG2BhL78LZ0MV6i5vj/zlacFii98m24JdgUpzXViC4EWWKp4t0pIxhWe +a/ZLBcRYoOcH+PUlcSPorFSmaxZY4KWG3pMDPi4wqXOawZ2wwPaOYW7cSSdo +f422klMW2Jspl7F5rxM8jhhzi56xQJ1PtyW8NznBSa79XsacBbr7DnRdU3AC +HQtKaRU/C1+MW4vE3HCEIPtdKvUyLGRciKuZa3CAltC1Ii1sFmq4fbk3q2QP +D4r+7Z1JY+FHSwZ9l4gdMNZE/3LIYOH0G/7R9zO2cLd3RKTwBAsvLhm64/jF +Fri0bjOHHBbOXPZpSeTaQun5xyfyL7LwfnT3405vWyjMTGWuLWNhvZz2mbBS +GzgeLZZ9vpmFzQXB9wID1oCQZFrxaCsL26lvXWyd1sDRCkqNdTsLJ+yb21nm +a+DI2OTAyCcWdnUERQWuWAMHw1rYVgMszBZoop94Yg2RvhcGh36z8KxA2oSX +ljX42Kghi8bG+esNct4UK1hoERKtp7MxhnYl6M8IQmHIWJeDGhuvGejV3u5A +GDhaGeuzko3/rXMJdeUhRL7ccGe/MRtZ29bHHg9FSHdOoD2wY6NfZcVDzj8A +VV6t86a72Whn45nfFsWBLUNVjTV72ZixniHZvpEDlPjC8zbRbLTIitwwb8AB +u4s7TTftZ6NntcKFOyNs+PB5UXjUYTaqLA5teRjKhuEg/a6Kc2xcTIh5+W5l +geKuY5X6j9n4rvQjrS6GCSf/bludUcfG9Nr6K398mMCXY1fx/SkbXZVSO5yA +CcP3BG4WvmTjsNkJATshJlRRjpyXaGbjZt++60kXzcHnTFLsbD8b2+to04te +mMH56v2rHy3jYFT/0zenjBgg4uxdoSDKwSN7khrE5BmQ1GOuF7uCg/f/WZl+ +g8KAMIHf6obSHMx/LrJUvWk1mG2IkbpK4+BVw5g03LMaPn6NnEo14uBxr1j/ +ecIUpIXDK9Z7ctBNYGng0AYTKFqTGD/hzUG5C7QzbWYmYJx4cs1pXw7aJ6e4 +9iqbgPNEeWt7IAdNRM5S1k4Yw9GPM3+Cw8n7hw5JeOUYw++rh6zjkzm4ZV35 +97guI+hknW4uLuFgQ1D45O8kQwjbV3TJvoyDhy8ZvFALN4TZsrshI+XkfPF5 +0zZPQ5BQbf9ldI+DfA3ZCqv1DcFRiKr08DEHTymKn/tSaQA1LcVbm1s5eDAu +d0lWoj44iD7Qi2nnoOejPf0tHvrQvvblrFwXB78nsOXXGurDdNWPNL8e8nk/ +Zh9z+/RA74rh7aFhDtbqXe674qQHNZ1WMZmjHJzgi2Q5aemBg5QbGExwcJ8p +Y7cqnx5sO7bvffQMB5+kr67Y+EAXph8fzZP9zcGgXP3gW6d1IWXuXHDVHAfd +M3PM9XfrwgrTm7pbFjgo4XaT/7ODLuTvqpr5+5eDBtnfzt7T1IX/AVuBKEc= + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07980639202001641}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07980639202001641}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VG0bB/CJRBLZ1xljj+w0jJlxXYSyJJE1WROVVAiJQimhQmlRoZKn +IjFzWiylaJE2hWwlEiFrlsrD03vev87ne+7zOec+97l+17lVgna7hvBRKBT7 +RRTK/4+z3S+fqmcUWXZ5/tGyqbezbMmX22/VngIy0w/NQnrVAaXfBcm158Dl +rGV3THtNIcblVht/+1UYKeX0iffagPiYbM6fNi78SRjz/9izCb7UOO+ebquD +yFgtvRU9W8FOffjzZNsHCD8scnrZ52j402aWO9H2FaTim/cJvj8C9Wv+KXp/ +dQooheLh3P25oPSlciBIdwEq7zDTw8IKQCrc/5bgGn48wDFRcnAqghwju2pn +dyFcFXTVjL/vBnScN3w8uWI5Ep0vKPuqSiGvuUQsRmM5Ogp9cJZuLAUfUS3/ +OeZyTG9enFbaUQqfDlP/4wtejhI9B0trf5dCT4QwW+rucly2RdgtjnEbBm2+ +3Wd4i2L4nqAmg/Lb8Hvi3J0DV8SwacHJK/9SGWQUHXrHJy+OlcGlf/11y8HB +dLuEtJo4csReLOk1Lgehp67uWnriOMuRs9/CLIcjfRpdjlbi2L02NH6tXTkk +qL4eOLNdHFdti9/11b8cIgrl/tOsEsdl3XoZRjnlsPFSha7jZgmUiFj9Rneq +HGTP9B0/fVkSF6kd8wsorgC5VXeP/C6WxDtDFWbrSypAoe7ooS3lknj6asLd +1eUVQJvQ3qdVT44rNV36U1kBGk57AqoHJfFFdf+y9W8qwGTxAqPPRAoP7HRe +UJmqgA3RMt+MG6WwsPO7dDKLCy7LBrvPNUuhtoHMpV7gguvVyo75T1JoMWlS +ybHhgkeT77vn41JYkrVwb9CJC1t0r1X5SEujJP+OB0v9uLDzm0F2SoA0vi/Z +nht7iAvHNtlbfpiVxmnJRO1FtVxQIN4q8C2SwUMOwtGa9Vwok9z0y2iZDD7Z +ST9m94ILHz/4lWcryyDln51LYt9xQX1jtOrGdTIYYVe47cIXLtStL1jSdEEG +VXju+X3/cWHBbubtG7YsSsaNjpxg8iCrOL5kwU4WG9I0mSIcHqgvoaTpbZTF +HM1U51TkgdMzYasTIbKoGhrUGrqWB3lr6Dynk7KovHTIa2wTD8zR8dyrL7Jo +pS64fdFuHkQxr/i/TJHDudwLPKsCHjgUik47Zsphxoj+7qErPFAVTEh7myuH +/w2O/pNZxIOmFo+K5htyKK4emPPsJg/094jwd7+Vw1D3p+6LCB4MFscW/1SQ +xwsmBpOFL3hQu7zfYp+6PO5VHC6jNPLgbLTru1968kg5smdi82se2Frr/Z5H +eWyefkIReM+Dq5+/2guGymNp+KKtKp088JVyHlXkyaMHN7f48A8emByoTs6v +kceVZd8+XRzlgfDXlTIqz+VR/uSagjvjPDJX/KDZIY9K6+IbX07xQMaxMsvw +rzzeuqXxquFfcv7J6qa2jgr4yCNyYVKYAJvxufiIPgWkUxruz2gQsH/dGZ0n +IwqYdWLpeJwWAWVX9DolZxXQcLvh1K+VBMhtCmBWCiliQ75YyNAqAkYePPvF +r6+I/K6Z/HlGBJxOyYq+EKeIFpWPm43ZBDR0aauPJCvitGK+cRSHgHnT+mbL +DEUM+p66444lAdu+zxh/u6yI2f63wxStCLBw2jypX6+I9nImd5/YEvBVWjPi +6XIljFit67DOmQDZ3bVUWVklnG2SuGy3gQCnBq832+lKWNN+6CO6EHAvPkNX +zEQJU77vp2i7EpD+ZWLY20sJLRXFHBrcCag1T88rDVTCZBWr4eseBExnqzn8 +3aGEAv6mcYc8CfCz8bhZlKiEa+WlAjW9CTC+WR06flUJl/jMJq3xJSCUz13W +ulQJFwuE3qRsIeDS5rHnZ+4qYW+j+otK0ktEVTQtGpQw0C1kQNmfgM7Io9+O +jCrhb8sN76oDCRB7rXymbVYJ5yaiH3oFkeuvUblGh0LFVbT6G5Oky9p+XH0n +QUWi/XO87FYCktkbAxXMqaglE6Vtso2AdX75P82sqTi8PuBEFWnRpB+H3Z2o +2H5Kz5oTSs6nPrU4K4CKl6NqrpmGERDc/8GsbAcVHTfqut0krSNIf/kqmoob +ytq95LcT8MCh6seS41S86eYe/oP0oXDBRPXTVKT39iSs30GA3clNotaXqZi3 +T3noFumW92OGiRVUtP6X0+m5k4CLU6y6vGoqjokPBP5DOkj6uNuDZ1T8Ffve +4SfpCS+1mKkOKn5ZJGUXH07A/fg9guLfqLiRDzffJ33w0sPz+mNULBHybhsn +bftIWMfpNxX5I99Uq+0iQKTHs3o7Hw2/r1ou7Ea6edF1p2MiNBzgHq9PJJ2n +9vNzkQwNfcXvDV0jHWALu+voNFTsXnLwGWmt0ExKjw4N5Vg/k7+SHkvryF4w +pSG1ZXx2jjRxS1NNEWi473Nct2gEAQdeRxHm9jTMkxCyoJG2Hnts6+FGw6+E +/DJt0ktXiLZFbaGhUfoqNwPSTUabw7JDyeu7aiSNSJ9zu/GnbC8NpaKdnfVJ +++2bSX99gIaqBUGLtUhrnLNWGk6l4UGtRDPFiP/n59RtwSwaPnJXGxImzev8 +ZKmRR8NF410Ks+T84ue1m6yLaHjJxODtJ9JWtNjAgDIa3v9cvLiWtBA+/Zn4 +gIb89Le1l0i/DRQ/crGOhu5FRotiSOce9pOufE3DTen+jQ6kfa+XFH/8SEPJ +bd+VFEmrvvhtNt1Dw1eWPnMD5PoPDdq+FP9Bw4gTDlvLSJcLn/YxmKGhB8vJ +dy/pWN2eH05/adhTON1nQNrSWS9xx1JlpB3pnB8iv/fr7BcF16nKOP/r8aAL +6dM8KaN6LWV8ozv7aIGsH5/WwLoeI2XsV/+gW0x6UG7+m6KdMsoo/WodIuvv +joV9DNNFGQVnD0mlko7xPSvo6aOMq+0MJhVJ8xca6uREKKO3WVYGm6znxieJ +1XfilPHjw0yn52T9Z/U1Or1JUcaeFFuuI2maVshuoXPKaH0qK9KezItF2QXi +YK0ydlzwnllB5sum7e3CWIMyJp3tC0sJJsCZsnit/wdl9LzOT50g8xjsGtEB +/cqY3nTC6TGZX7sDKoeSBOiYUvxg3ITM9yuxmmvmwnRkJ3SePOZHgEuRR8OE +KB0Vyqr3t5H9YPObDPFAOTpGbgg2Dyf7xx7l2WtWq+ioskkseTvZX2Z4WQ1/ +DOioJzJ6vcCL/N7rVo1WmNKRC5MqH8h+lLo3gKFqScfNucYaumS/yqtvbODb +SEeao0kyQfa3p6EFo/UxdEzK/PtR1pEA+3mmRMIBOtY0baBKOZD1kNXCME2i +o4eT3QcRewI6KpcmFR2no7egxskpOzIPy6IlUi/Rsfxhc+xZa7K/l68zs6uj +41KeRKgJk4DLNn2b/3tOjhfvWf/LjKyXjsSke6/I96turrrPIECPj/dSs5WO +MzOfDfVNybxsovoKDtJx0qXw7qQ+AeG/J5MalqugQJdfcosauf57t8kMSKig +v2/SWmtVsn6HO0v45VTQL69NppROwPWu+o+WqipYYevcEUUloPtRru5dhgqe +mr+u2SJDwIZUZvsVfxVME80q7xAi+7NEssGBChWUoKvSBYd5QMmYeXr+ngoW +dTtIzH3nwVv+HT73qlWw0OGuy1A/D3bOuKZOPlPBHfkjVTW9PChqV+8K7VRB +I//AZLMO8n9Z0HB0E78qHggdqDlI/r//rFrRreeuitr5+Q7B5H5g9rJCsomP +Ku7UyX4wns+DaTENdaa/KjKHv7fHXeLB2BRzh812VTztbsVMPseDr9XBsz6J +qmjcBMSOEzxodLwvmnZdFf/Ga0VejSP3Jzv94OuMKnalHVUmnHjALiktPHtW +DTXUnnp2/uBCF72kwPaiGgrryfR3DXIh/uzN/OkCNawZdRTp6ufC/eTiS643 +1fCkRL7BB3L/ZOxVeF60Rg3v1h+bv9bMBW2BM1lHe9WQvd/btq2KCzL+B5Ji +dNWxfJOew/FjZJVJOAR41KnjvPY602QFLnzLDPCIFNTEIw/7+7ZKVYD9eKx9 +P0MLG9b1KT5dUg4jwUJRxKGVOHzvGHe24Da5/5flO1anja3Pg3Y5riwBiTea +J8vHdXD+QThXqvUGKKXdcWEwdLFRt6Hqp3sxnF/FXCEZqofzYhbPF4sXQaOC +1eqpbH3sNG2sEBy7AhZKdVkGHw3QQ02y3m5/AYjyX40OTDHE25nZecL/XARa +sjLbW9MIlZNbLj1vPQdLNXzvub4wwoz54p51EWdAnyN/J3aLMfJPdg8IZ2dD +ZLdEvQPFBC1rEx2Z507A+FSmu/15E9S6rvzdZclxWGvwPM9ezxS1FiqTn8qk +wqMp1r+/3pqiwJ5kcYmgZIjQNe58H7IaP1U4D8c2JwBnbGuL91IGrvkZ9pbu +HQu26nLrl19l4LMHT+zChKOAGH2msrWIgawnZ5Mm5yJB/X7UbFUxA5V3LnFM +/REJix3eFYSVMHAw7GjC69eRULf76M96goG+CuMP209FgmX19Ln4FwzUtTqk +9E02Ehiu779+H2HgklKH9CsGe2FlUnpcnZkZijSVCWj/iYAa1nUBJwszJCam +g/5+igCXX7U5rWwztCzXy/rxOALiImZKB63MsM1GVkvgeAQ0+Ab0ijqZoc2r +H19YChEQxmQ4bA4ww8v+FNdS3AU3f/YqTqeZIdXVLRcv7wSdEGatRic5fljz +dmJOGJxSdZ47/MkM01+u/TaWEAbTX4JWf+02w0GW5PY9oWHwyCezJL/PDMtM +50yL2GHg6vLlnOyoGao2Tr148z0U9rNS9yylmONhEc9oulUoNIi/VxnVMMe9 +AdZbkv+GQMijsCPEXnPskBbr0boZDGO7hmNto80xL+pv4EBuMMRRw3d+jDHH +U+8jNtxNCYb0hN2uvw+YY6dcIxzxDYZyixg6+6g5pmrHs/tXBMP8vcM19Xnm +OJJ5vf9mQhDk3Mmf/lBvjnYz/j8n/AOhtrBl66Q0EyWHdXewiv2gx0nFP0aO +iWuPdto3H/MDyp9d3v8qMPHgj7nbqdv9wHqjoLMAnYnHiYv3mXp+8HyRhZm8 +DhMvLj7z6NPdLfA6qGCplSUTz/jprvrvlS90qu8oy9rGxBW5Ql90l22G6Rt/ +fxncZ6Ka382XDu89YcDDrvB4JRO1LrQ+y63yhPbFJ9b1VTMxYu+jn1PXPKE6 +QOHC2cdMvIapN4ZiPCFFbrXFwksmKiheW1pJ9YQVaTsSGj8xsVQpZaArwgN0 +Q1spIXwWeCtKIbeV5g7BGiVL89ZboJdBTMgrrivEP/Pboeligb45ewsm810h +K0SCPG2BhL78LZ0MV6i5vj/zlacFii98m24JdgUpzXViC4EWWKp4t0pIxhWe +a/ZLBcRYoOcH+PUlcSPorFSmaxZY4KWG3pMDPi4wqXOawZ2wwPaOYW7cSSdo +f422klMW2Jspl7F5rxM8jhhzi56xQJ1PtyW8NznBSa79XsacBbr7DnRdU3AC +HQtKaRU/C1+MW4vE3HCEIPtdKvUyLGRciKuZa3CAltC1Ii1sFmq4fbk3q2QP +D4r+7Z1JY+FHSwZ9l4gdMNZE/3LIYOH0G/7R9zO2cLd3RKTwBAsvLhm64/jF +Fri0bjOHHBbOXPZpSeTaQun5xyfyL7LwfnT3405vWyjMTGWuLWNhvZz2mbBS +GzgeLZZ9vpmFzQXB9wID1oCQZFrxaCsL26lvXWyd1sDRCkqNdTsLJ+yb21nm +a+DI2OTAyCcWdnUERQWuWAMHw1rYVgMszBZoop94Yg2RvhcGh36z8KxA2oSX +ljX42Kghi8bG+esNct4UK1hoERKtp7MxhnYl6M8IQmHIWJeDGhuvGejV3u5A +GDhaGeuzko3/rXMJdeUhRL7ccGe/MRtZ29bHHg9FSHdOoD2wY6NfZcVDzj8A +VV6t86a72Whn45nfFsWBLUNVjTV72ZixniHZvpEDlPjC8zbRbLTIitwwb8AB +u4s7TTftZ6NntcKFOyNs+PB5UXjUYTaqLA5teRjKhuEg/a6Kc2xcTIh5+W5l +geKuY5X6j9n4rvQjrS6GCSf/bludUcfG9Nr6K398mMCXY1fx/SkbXZVSO5yA +CcP3BG4WvmTjsNkJATshJlRRjpyXaGbjZt++60kXzcHnTFLsbD8b2+to04te +mMH56v2rHy3jYFT/0zenjBgg4uxdoSDKwSN7khrE5BmQ1GOuF7uCg/f/WZl+ +g8KAMIHf6obSHMx/LrJUvWk1mG2IkbpK4+BVw5g03LMaPn6NnEo14uBxr1j/ +ecIUpIXDK9Z7ctBNYGng0AYTKFqTGD/hzUG5C7QzbWYmYJx4cs1pXw7aJ6e4 +9iqbgPNEeWt7IAdNRM5S1k4Yw9GPM3+Cw8n7hw5JeOUYw++rh6zjkzm4ZV35 +97guI+hknW4uLuFgQ1D45O8kQwjbV3TJvoyDhy8ZvFALN4TZsrshI+XkfPF5 +0zZPQ5BQbf9ldI+DfA3ZCqv1DcFRiKr08DEHTymKn/tSaQA1LcVbm1s5eDAu +d0lWoj44iD7Qi2nnoOejPf0tHvrQvvblrFwXB78nsOXXGurDdNWPNL8e8nk/ +Zh9z+/RA74rh7aFhDtbqXe674qQHNZ1WMZmjHJzgi2Q5aemBg5QbGExwcJ8p +Y7cqnx5sO7bvffQMB5+kr67Y+EAXph8fzZP9zcGgXP3gW6d1IWXuXHDVHAfd +M3PM9XfrwgrTm7pbFjgo4XaT/7ODLuTvqpr5+5eDBtnfzt7T1IX/AVuBKEc= + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07980639202001641}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07980639202001641}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994389619334571*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"81d1d258-b04d-4289-84bf-e6c9c7571581"] +}, Open ]], Cell[CellGroupData[{ @@ -13433,66 +15320,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[308]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], + "In[140]:=",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.611115182999938`*^-175\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 308, 309, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133920579224*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.837442785685962`*^-155\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 73, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994389619356894*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], +In[140]:=",ExpressionUUID->"425885fd-0b72-4fde-9600-d699dfcda3df"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5007447195984937`*^-178\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 308, 310, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058022385`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.0568315495830883`*^-157\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 74, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.9943896193603086`*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], +In[140]:=",ExpressionUUID->"b7b44169-ee0e-49d6-920a-22bfab9e9ca4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.1145242877114216`*^-181\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 308, 311, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339205811241*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.308849889654692`*^-160\\\", \ +RowBox[{\\\"\ +692388265304082962155241704502629852543932276498796563311324806235240\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8063384494795553340756316369516704730972160000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 140, 75, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.994389619363505*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], +In[140]:=",ExpressionUUID->"0fb48cf4-a37d-47a5-8a5e-cc908d0af506"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 308, 312, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392058197193`*^9}, +during this calculation.\"", 2, 140, 76, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99133920579224*^9, 3.9943896193665123`*^9}, CellLabel-> "During evaluation of \ -In[308]:=",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], +In[140]:=",ExpressionUUID->"efde1bac-8fca-4887-a7ad-1cf177fdb71b"], -Cell[BoxData["9.33220071900515`"], "Output", - CellChangeTimes->{3.9913392124888554`*^9}, +Cell[BoxData["9.065269083108408`"], "Output", + CellChangeTimes->{3.9913392124888554`*^9, 3.9943896481925087`*^9}, CellLabel-> - "Out[308]=",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] + "Out[140]=",ExpressionUUID->"5508a200-fda5-4000-933c-9e04ad15f7ce"] }, Open ]], Cell[CellGroupData[{ @@ -13559,68 +15456,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849547748472*^9, - 3.9918495528702526`*^9}},ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-\ -0895c02ffd8f"], + CellChangeTimes->{{3.991849547748472*^9, 3.9918495528702526`*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.268551942246329`*^-197\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 309, 313, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125258827`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 141, 77, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994389648226884*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], +In[141]:=",ExpressionUUID->"a047e245-e9a7-4b43-a4d7-4fb4a5b8aa0f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.9588252435899326`*^-201\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 314, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339212535879*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 78, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994389648230585*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], +In[141]:=",ExpressionUUID->"4fe7da3c-23ba-42cf-a4d9-6b79465dd573"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.1561787593749197`*^-205\\\", \ \\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ 4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 309, - 315, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125438805`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 141, + 79, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994389648234157*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], +In[141]:=",ExpressionUUID->"a3a5df99-a476-4dcf-8ae8-ded7f5e27343"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 309, 316, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392125518837`*^9}, +during this calculation.\"", 2, 141, 80, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392125258827`*^9, 3.994389648236895*^9}, CellLabel-> "During evaluation of \ -In[309]:=",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], +In[141]:=",ExpressionUUID->"e2a082d9-d48f-4cd3-9d89-f9a9ea7627a8"], -Cell[BoxData["0.41157157699018565`"], "Output", - CellChangeTimes->{3.9913392196090164`*^9}, +Cell[BoxData["1.0048594273164821`"], "Output", + CellChangeTimes->{3.9913392196090164`*^9, 3.994389652358309*^9}, CellLabel-> - "Out[309]=",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] + "Out[141]=",ExpressionUUID->"aabce8d6-dee0-42d3-8a03-ab18d0e5fa6d"] }, Open ]], Cell[CellGroupData[{ @@ -13641,8 +15542,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13687,68 +15587,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918495568340263`*^9, - 3.991849559359928*^9}},ExpressionUUID->"57976ffc-56f1-604b-8519-\ -bead95265db8"], + CellChangeTimes->{{3.9918495568340263`*^9, 3.991849559359928*^9}}, + CellLabel-> + "In[142]:=",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.268551942246329`*^-197\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 310, 317, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196440163`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 142, 81, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994389652406054*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], +In[142]:=",ExpressionUUID->"67a4bc3d-01d0-4fa4-8910-98079c0d9eb3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.9588252435899326`*^-201\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 318, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392196535416`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 82, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994389652410232*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], +In[142]:=",ExpressionUUID->"bb181fd7-589e-40b9-819d-f97ca4a0c8d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.1561787593749197`*^-205\\\", \ \\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ 4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 310, - 319, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219661541*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 142, + 83, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.99438965241348*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], +In[142]:=",ExpressionUUID->"cf75c52c-ee96-4130-88bc-4102d997303f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 310, 320, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339219670542*^9}, +during this calculation.\"", 2, 142, 84, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392196440163`*^9, 3.994389652416073*^9}, CellLabel-> "During evaluation of \ -In[310]:=",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], +In[142]:=",ExpressionUUID->"0425cd19-5de3-4316-b2de-0d6bc3746f99"], -Cell[BoxData["3.215201591157595`"], "Output", - CellChangeTimes->{3.9913392268711624`*^9}, +Cell[BoxData["24.790973160272213`"], "Output", + CellChangeTimes->{3.9913392268711624`*^9, 3.994389656610334*^9}, CellLabel-> - "Out[310]=",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] + "Out[142]=",ExpressionUUID->"83976781-58f7-4a96-b648-62e6c85f4455"] }, Open ]], Cell[CellGroupData[{ @@ -13769,8 +15673,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13815,68 +15718,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849563755764*^9, - 3.991849566543682*^9}},ExpressionUUID->"cfa37210-3ae7-3f49-b290-\ -f19508c6d2f1"], + CellChangeTimes->{{3.991849563755764*^9, 3.991849566543682*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5023512908051311`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"7.268551942246329`*^-197\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 311, 321, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226907137*^9}, +as a normalized machine number; precision may be lost.\"", 2, 143, 85, + 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.9943896566644173`*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], +In[143]:=",ExpressionUUID->"876472a7-8390-44b0-bce1-a4e7158d9450"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.739446301903759`*^-200\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.9588252435899326`*^-201\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 322, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339226917137*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 86, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994389656669059*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], +In[143]:=",ExpressionUUID->"0c5939b1-73ac-438f-88e5-0688937ce555"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.083892304770298`*^-204\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.1561787593749197`*^-205\\\", \ \\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ 4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 311, - 323, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269251385`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 87, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994389656671999*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], +In[143]:=",ExpressionUUID->"736a5f93-1e8d-4985-a6e2-cd6fab741aca"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 311, 324, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392269341373`*^9}, +during this calculation.\"", 2, 143, 88, 25994214369367126382, "kernel 1"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339226907137*^9, 3.994389656674837*^9}, CellLabel-> "During evaluation of \ -In[311]:=",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], +In[143]:=",ExpressionUUID->"68759dc9-25e0-4d44-96bd-7442a7311760"], -Cell[BoxData["16.94395627212904`"], "Output", - CellChangeTimes->{3.9913392304284153`*^9}, +Cell[BoxData["4.426226364043411`"], "Output", + CellChangeTimes->{3.9913392304284153`*^9, 3.9943896592749577`*^9}, CellLabel-> - "Out[311]=",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] + "Out[143]=",ExpressionUUID->"a7fe8473-5b42-4c83-9382-3ae94e36ad69"] }, Open ]], Cell[CellGroupData[{ @@ -13885,21 +15792,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849569404436*^9, - 3.991849573855135*^9}},ExpressionUUID->"7457b456-6d32-5b44-9679-\ -346c5f5ac532"], - -Cell[BoxData["0.05576142449710889`"], "Output", - CellChangeTimes->{3.9913392304624157`*^9}, + CellChangeTimes->{{3.991849569404436*^9, 3.991849573855135*^9}}, CellLabel-> - "Out[312]=",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] + "In[144]:=",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], + +Cell[BoxData["0.09592718791121356`"], "Output", + CellChangeTimes->{3.9913392304624157`*^9, 3.99438965933426*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"b3042dd6-27cd-4567-a623-8a3f25f2819d"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"60c63353-4bae-43d1-a5cd-279e942e44ea"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[145]:=",ExpressionUUID->"60c63353-4bae-43d1-a5cd-279e942e44ea"] }, -WindowSize->{714, 435}, -WindowMargins->{{Automatic, 3}, {Automatic, 15}}, +Evaluator->"kernel 1", +WindowSize->{1440, 792}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -13917,613 +15827,640 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 354, 7, 66, "Input",ExpressionUUID->"ba3c332d-ee0d-459f-8b4f-87a6d15e2660"], -Cell[933, 31, 260, 5, 41, "Output",ExpressionUUID->"556b2940-a91e-4db9-86ab-2d8d70fc38d8"] +Cell[576, 22, 349, 6, 29, "Input",ExpressionUUID->"ba3c332d-ee0d-459f-8b4f-87a6d15e2660"], +Cell[928, 30, 279, 4, 33, "Output",ExpressionUUID->"1d8bf187-8f28-4338-917a-9ae29b284360"] }, Open ]], Cell[CellGroupData[{ -Cell[1230, 41, 253, 5, 36, "Input",ExpressionUUID->"114295aa-7299-4e80-acb9-2c2dcad002e2"], -Cell[1486, 48, 260, 5, 41, "Output",ExpressionUUID->"f4fab3ae-36f6-4243-8835-083571caeba3"] +Cell[1244, 39, 248, 4, 29, "Input",ExpressionUUID->"114295aa-7299-4e80-acb9-2c2dcad002e2"], +Cell[1495, 45, 279, 4, 33, "Output",ExpressionUUID->"8072b0a0-77e2-4781-99dc-9d60ab0023fe"] }, Open ]], Cell[CellGroupData[{ -Cell[1783, 58, 226, 5, 36, "Input",ExpressionUUID->"95c8a061-4ed7-4547-a690-b7ab673958ae"], -Cell[2012, 65, 260, 5, 41, "Output",ExpressionUUID->"acebbc0a-ef2e-4786-83a9-33d2575ba07a"] +Cell[1811, 54, 221, 4, 29, "Input",ExpressionUUID->"95c8a061-4ed7-4547-a690-b7ab673958ae"], +Cell[2035, 60, 277, 4, 33, "Output",ExpressionUUID->"01427106-8d00-4595-8308-31fb7523a84f"] }, Open ]], Cell[CellGroupData[{ -Cell[2309, 75, 180, 4, 36, "Input",ExpressionUUID->"1cc3e765-6d8e-4d58-8fd0-6c3164091ec9"], -Cell[2492, 81, 260, 5, 41, "Output",ExpressionUUID->"8d774961-1cc1-496c-824f-88e29b5272af"] +Cell[2349, 69, 175, 3, 29, "Input",ExpressionUUID->"1cc3e765-6d8e-4d58-8fd0-6c3164091ec9"], +Cell[2527, 74, 277, 4, 33, "Output",ExpressionUUID->"31c7d437-afc6-4a0c-b5bc-57882ce11f83"] }, Open ]], Cell[CellGroupData[{ -Cell[2789, 91, 262, 8, 54, "Input",ExpressionUUID->"9570a7a8-b674-476f-afc6-4526d7903be2"], -Cell[3054, 101, 273, 5, 62, "Output",ExpressionUUID->"88893293-95b6-42eb-bda9-51c2b0e222ca"] +Cell[2841, 83, 257, 7, 42, "Input",ExpressionUUID->"9570a7a8-b674-476f-afc6-4526d7903be2"], +Cell[3101, 92, 290, 4, 33, "Output",ExpressionUUID->"b359c636-3b10-4bf7-bf2e-1b6bb498fc26"] }, Open ]], Cell[CellGroupData[{ -Cell[3364, 111, 136, 3, 55, "Input",ExpressionUUID->"41426b9d-711a-4a0d-8329-7566ccf3bb96"], -Cell[3503, 116, 259, 5, 62, "Output",ExpressionUUID->"4ada1cc9-9d92-477d-9fe9-e857d09f27e6"] +Cell[3428, 101, 131, 2, 29, "Input",ExpressionUUID->"41426b9d-711a-4a0d-8329-7566ccf3bb96"], +Cell[3562, 105, 276, 4, 33, "Output",ExpressionUUID->"402baddb-4fc7-4466-a501-d1367996acaa"] }, Open ]], Cell[CellGroupData[{ -Cell[3799, 126, 281, 7, 55, "Input",ExpressionUUID->"66cfa4a3-2d38-425d-9c39-ad913b1b5db7"], -Cell[4083, 135, 273, 5, 62, "Output",ExpressionUUID->"231a73cd-ade5-4a8b-a646-12b27390f9c7"] +Cell[3875, 114, 276, 6, 29, "Input",ExpressionUUID->"66cfa4a3-2d38-425d-9c39-ad913b1b5db7"], +Cell[4154, 122, 289, 4, 33, "Output",ExpressionUUID->"cb9bd002-adff-40bb-b6cb-ac9f24cb0193"] }, Open ]], Cell[CellGroupData[{ -Cell[4393, 145, 262, 8, 55, "Input",ExpressionUUID->"16ae2ad5-24a1-4188-b303-f20f4a7a88a5"], -Cell[4658, 155, 273, 5, 62, "Output",ExpressionUUID->"44546f67-77fc-4da4-98f4-7c5c042ff1d0"] +Cell[4480, 131, 257, 7, 29, "Input",ExpressionUUID->"16ae2ad5-24a1-4188-b303-f20f4a7a88a5"], +Cell[4740, 140, 290, 4, 33, "Output",ExpressionUUID->"deb38261-d0bf-419a-958c-93bb643ed98c"] }, Open ]], Cell[CellGroupData[{ -Cell[4968, 165, 209, 4, 55, "Input",ExpressionUUID->"fd0d3b24-ec74-46d6-9406-92fc0fc7d6fd"], -Cell[5180, 171, 237, 4, 62, "Output",ExpressionUUID->"9ba46232-ffc5-4910-828e-9196c12c545d"] +Cell[5067, 149, 204, 3, 29, "Input",ExpressionUUID->"fd0d3b24-ec74-46d6-9406-92fc0fc7d6fd"], +Cell[5274, 154, 255, 3, 33, "Output",ExpressionUUID->"c48328f7-1c83-4cc8-8f00-d5e03f2b2d18"] }, Open ]], Cell[CellGroupData[{ -Cell[5454, 180, 207, 4, 55, "Input",ExpressionUUID->"d96413c4-e06e-4060-bad6-4d4931ea412c"], -Cell[5664, 186, 238, 4, 62, "Output",ExpressionUUID->"1817b3cb-73d5-4cd8-825c-1255af3a5d27"] +Cell[5566, 162, 203, 3, 29, "Input",ExpressionUUID->"d96413c4-e06e-4060-bad6-4d4931ea412c"], +Cell[5772, 167, 256, 3, 33, "Output",ExpressionUUID->"79005102-7a95-4a3a-b1a1-dfad531891f8"] }, Open ]], Cell[CellGroupData[{ -Cell[5939, 195, 133, 3, 55, "Input",ExpressionUUID->"88b2bca7-4c2a-46fa-9951-a957773a8650"], -Cell[6075, 200, 256, 5, 62, "Output",ExpressionUUID->"e315d0ac-64aa-4680-8b80-b0ec912e5eb8"] +Cell[6065, 175, 129, 2, 29, "Input",ExpressionUUID->"88b2bca7-4c2a-46fa-9951-a957773a8650"], +Cell[6197, 179, 274, 4, 33, "Output",ExpressionUUID->"dc9d7968-136c-4a5c-9a30-d08c951c5fe2"] }, Open ]], Cell[CellGroupData[{ -Cell[6368, 210, 133, 3, 55, "Input",ExpressionUUID->"1b36c2f9-f078-4c25-b52e-69542e9a07fa"], -Cell[6504, 215, 258, 5, 62, "Output",ExpressionUUID->"c087a469-c67f-44df-8f88-df684276a201"] +Cell[6508, 188, 129, 2, 29, "Input",ExpressionUUID->"1b36c2f9-f078-4c25-b52e-69542e9a07fa"], +Cell[6640, 192, 276, 4, 33, "Output",ExpressionUUID->"753f7196-e4f4-4857-913c-dc3462edfbee"] }, Open ]], Cell[CellGroupData[{ -Cell[6799, 225, 561, 20, 148, "Input",ExpressionUUID->"1a41ae46-b75b-404f-ab2b-a579c3f324c8"], -Cell[7363, 247, 270, 5, 62, "Output",ExpressionUUID->"f46f1558-8cb9-4ae7-8421-f7d9fb9bbc12"] +Cell[6953, 201, 557, 19, 79, "Input",ExpressionUUID->"1a41ae46-b75b-404f-ab2b-a579c3f324c8"], +Cell[7513, 222, 286, 4, 33, "Output",ExpressionUUID->"67f38851-4346-42dc-bd2f-c27359f12287"] }, Open ]], Cell[CellGroupData[{ -Cell[7670, 257, 561, 20, 148, "Input",ExpressionUUID->"844fe406-8e7c-4a7e-8f2c-db07339e9a90"], -Cell[8234, 279, 271, 5, 62, "Output",ExpressionUUID->"de77989e-2e29-4965-9d8a-b3b2bd73c11f"] +Cell[7836, 231, 557, 19, 79, "Input",ExpressionUUID->"844fe406-8e7c-4a7e-8f2c-db07339e9a90"], +Cell[8396, 252, 289, 4, 33, "Output",ExpressionUUID->"acfab881-60f6-47d6-b4a1-4f4f2302678d"] }, Open ]], Cell[CellGroupData[{ -Cell[8542, 289, 1592, 51, 211, "Input",ExpressionUUID->"e81a24ab-eede-410c-8054-c5feb6edf31a"], -Cell[10137, 342, 272, 5, 62, "Output",ExpressionUUID->"ad960200-974f-4e00-85ed-1d847ef8e232"] +Cell[8722, 261, 1588, 50, 55, "Input",ExpressionUUID->"e81a24ab-eede-410c-8054-c5feb6edf31a"], +Cell[10313, 313, 292, 4, 33, "Output",ExpressionUUID->"9b9a4d63-44d7-4c82-bd75-c4dfb33da941"] }, Open ]], Cell[CellGroupData[{ -Cell[10446, 352, 1426, 47, 211, "Input",ExpressionUUID->"3a1b178e-5a69-420a-a203-40f73d32c2c3"], -Cell[11875, 401, 290, 6, 62, "Output",ExpressionUUID->"fae3d388-ebfc-4878-9768-53581a7d6979"] +Cell[10642, 322, 1422, 46, 55, "Input",ExpressionUUID->"3a1b178e-5a69-420a-a203-40f73d32c2c3"], +Cell[12067, 370, 310, 5, 33, "Output",ExpressionUUID->"fbc8f77e-1728-425f-93c6-28658ca0ee82"] }, Open ]], Cell[CellGroupData[{ -Cell[12202, 412, 1426, 47, 211, "Input",ExpressionUUID->"c9bdf29a-9fbe-42d9-bc00-7dc8477c3939"], -Cell[13631, 461, 291, 6, 62, "Output",ExpressionUUID->"836d8af8-9e32-43d7-a534-0934a706c992"] +Cell[12414, 380, 1422, 46, 55, "Input",ExpressionUUID->"c9bdf29a-9fbe-42d9-bc00-7dc8477c3939"], +Cell[13839, 428, 309, 5, 33, "Output",ExpressionUUID->"e5e23f6f-00cc-49c9-8036-b9f75322f601"] }, Open ]], Cell[CellGroupData[{ -Cell[13959, 472, 1592, 51, 211, "Input",ExpressionUUID->"e320432c-3c96-402c-9032-e06766716510"], -Cell[15554, 525, 269, 5, 62, "Output",ExpressionUUID->"1edad1ba-0974-41c6-ab07-caae3fd74e4b"] +Cell[14185, 438, 1588, 50, 55, "Input",ExpressionUUID->"e320432c-3c96-402c-9032-e06766716510"], +Cell[15776, 490, 286, 4, 33, "Output",ExpressionUUID->"5d2fcac9-e0da-473a-b028-6315816b5f76"] }, Open ]], Cell[CellGroupData[{ -Cell[15860, 535, 135, 3, 55, "Input",ExpressionUUID->"704d957b-d36b-49d9-8ccc-7769aea79ca5"], -Cell[15998, 540, 258, 5, 62, "Output",ExpressionUUID->"1ce2e0ac-3643-4d1f-bf80-cd8a58bb5197"] +Cell[16099, 499, 131, 2, 29, "Input",ExpressionUUID->"704d957b-d36b-49d9-8ccc-7769aea79ca5"], +Cell[16233, 503, 276, 4, 33, "Output",ExpressionUUID->"9ef3dfe4-366b-49fd-bb68-20a4910e0d73"] }, Open ]], Cell[CellGroupData[{ -Cell[16293, 550, 137, 3, 55, "Input",ExpressionUUID->"75876833-cff1-4f75-8397-1ea9b241d52a"], -Cell[16433, 555, 255, 5, 62, "Output",ExpressionUUID->"9e3bf7e0-db3c-4e80-8a7b-5918c1348e38"] +Cell[16546, 512, 133, 2, 29, "Input",ExpressionUUID->"75876833-cff1-4f75-8397-1ea9b241d52a"], +Cell[16682, 516, 273, 4, 33, "Output",ExpressionUUID->"f8420c0d-2f08-41bd-a674-44cac0649bae"] }, Open ]], Cell[CellGroupData[{ -Cell[16725, 565, 138, 3, 55, "Input",ExpressionUUID->"b1f4f70a-4b77-4e41-abdc-72f1a88c84f5"], -Cell[16866, 570, 262, 5, 62, "Output",ExpressionUUID->"ba99e333-17f0-4c64-aa64-42bc40397bf1"] +Cell[16992, 525, 134, 2, 29, "Input",ExpressionUUID->"b1f4f70a-4b77-4e41-abdc-72f1a88c84f5"], +Cell[17129, 529, 282, 4, 33, "Output",ExpressionUUID->"84bda66c-ee21-4c15-bfcf-70c6a5b593bc"] }, Open ]], Cell[CellGroupData[{ -Cell[17165, 580, 223, 5, 55, "Input",ExpressionUUID->"dae0ef62-0e09-49f3-a1fe-ebbbb61fab0c"], -Cell[17391, 587, 272, 6, 62, "Output",ExpressionUUID->"4540ec32-3056-45e9-a498-525004066f9c"] +Cell[17448, 538, 219, 4, 29, "Input",ExpressionUUID->"dae0ef62-0e09-49f3-a1fe-ebbbb61fab0c"], +Cell[17670, 544, 290, 5, 33, "Output",ExpressionUUID->"437c9181-bafb-4fbc-a350-e7a091b6e2f8"] }, Open ]], Cell[CellGroupData[{ -Cell[17700, 598, 138, 3, 55, "Input",ExpressionUUID->"8fb4cee8-8821-4a2a-b3f1-9e3451a6453d"], -Cell[17841, 603, 260, 5, 62, "Output",ExpressionUUID->"b7e29a91-bd30-4a9b-871d-4e041ddab9a8"] +Cell[17997, 554, 134, 2, 29, "Input",ExpressionUUID->"8fb4cee8-8821-4a2a-b3f1-9e3451a6453d"], +Cell[18134, 558, 278, 4, 33, "Output",ExpressionUUID->"d7fa3bb1-b4ad-433a-9821-dfd68dba000c"] }, Open ]], Cell[CellGroupData[{ -Cell[18138, 613, 328, 6, 55, "Input",ExpressionUUID->"552aa3bd-0fd9-4ece-a039-8e81f92de910"], -Cell[18469, 621, 253, 5, 62, "Output",ExpressionUUID->"4726da29-02d3-4d46-830d-b36f5252be02"] +Cell[18449, 567, 324, 5, 29, "Input",ExpressionUUID->"552aa3bd-0fd9-4ece-a039-8e81f92de910"], +Cell[18776, 574, 271, 4, 33, "Output",ExpressionUUID->"2ffe608c-09bf-4ead-8141-7414f93e1b8e"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 631, 299, 6, 55, "Input",ExpressionUUID->"4c616ef5-570f-464e-b88f-d1ed7313d51f"], -Cell[19061, 639, 252, 5, 62, "Output",ExpressionUUID->"e974a83d-f03a-4c70-b462-cdaf9dcb68ab"] +Cell[19084, 583, 295, 5, 29, "Input",ExpressionUUID->"4c616ef5-570f-464e-b88f-d1ed7313d51f"], +Cell[19382, 590, 270, 4, 33, "Output",ExpressionUUID->"64c27e25-6186-41bb-a857-4c894b5d2430"] }, Open ]], Cell[CellGroupData[{ -Cell[19350, 649, 223, 5, 55, "Input",ExpressionUUID->"096a1657-78bc-4752-bb7e-95e56b96cadd"], -Cell[19576, 656, 257, 5, 62, "Output",ExpressionUUID->"96646b9a-8ac9-4994-898d-f1b8a49ca68e"] +Cell[19689, 599, 219, 4, 29, "Input",ExpressionUUID->"096a1657-78bc-4752-bb7e-95e56b96cadd"], +Cell[19911, 605, 275, 4, 33, "Output",ExpressionUUID->"9cab2579-5841-4a3f-a408-f52fe91d3955"] }, Open ]], Cell[CellGroupData[{ -Cell[19870, 666, 354, 11, 81, "Input",ExpressionUUID->"66cc0c50-eaa8-468c-9d8a-c7cb64a85294"], -Cell[20227, 679, 275, 5, 62, "Output",ExpressionUUID->"5a0a951a-a4a0-46c3-be2c-79e557f9aff5"] +Cell[20223, 614, 350, 10, 42, "Input",ExpressionUUID->"66cc0c50-eaa8-468c-9d8a-c7cb64a85294"], +Cell[20576, 626, 293, 4, 33, "Output",ExpressionUUID->"dc724376-74dd-41d9-b9bd-ae7b17c8c5e7"] }, Open ]], Cell[CellGroupData[{ -Cell[20539, 689, 354, 11, 81, "Input",ExpressionUUID->"6f37de12-b072-4ebb-8bef-d789f5667525"], -Cell[20896, 702, 288, 6, 62, "Output",ExpressionUUID->"7ec0516d-09fb-4e84-8c23-e9f77fc22b6a"] +Cell[20906, 635, 350, 10, 42, "Input",ExpressionUUID->"6f37de12-b072-4ebb-8bef-d789f5667525"], +Cell[21259, 647, 306, 5, 33, "Output",ExpressionUUID->"4540c923-b072-41a4-b097-5ddf5e721562"] }, Open ]], Cell[CellGroupData[{ -Cell[21221, 713, 998, 27, 154, "Input",ExpressionUUID->"3f8bb9eb-ad92-4fa5-ae94-7b654151a7fb"], -Cell[22222, 742, 276, 5, 62, "Output",ExpressionUUID->"1313161d-41c4-4295-9655-16fc257d0da7"] +Cell[21602, 657, 994, 26, 43, "Input",ExpressionUUID->"3f8bb9eb-ad92-4fa5-ae94-7b654151a7fb"], +Cell[22599, 685, 294, 4, 33, "Output",ExpressionUUID->"19beb336-1236-4ec0-ae46-ce4fcb2fc537"] }, Open ]], Cell[CellGroupData[{ -Cell[22535, 752, 203, 4, 55, "Input",ExpressionUUID->"3f76d94e-bd3a-4ad9-ac4d-3895de751d5c"], -Cell[22741, 758, 258, 5, 62, "Output",ExpressionUUID->"d0418020-8543-49da-b390-cdfafc389132"] +Cell[22930, 694, 199, 3, 29, "Input",ExpressionUUID->"3f76d94e-bd3a-4ad9-ac4d-3895de751d5c"], +Cell[23132, 699, 276, 4, 33, "Output",ExpressionUUID->"8bf7761c-b56f-43cc-98bd-b1007d7eabde"] }, Open ]], Cell[CellGroupData[{ -Cell[23036, 768, 331, 6, 55, "Input",ExpressionUUID->"c538a944-f1cd-45ec-9213-4ee9ba34888e"], -Cell[23370, 776, 235, 4, 62, "Output",ExpressionUUID->"c0d9c95d-f8fd-4353-8a02-0398d945711d"] +Cell[23445, 708, 327, 5, 29, "Input",ExpressionUUID->"c538a944-f1cd-45ec-9213-4ee9ba34888e"], +Cell[23775, 715, 254, 3, 33, "Output",ExpressionUUID->"28ffb486-2916-4aec-ac98-bb484622ef4e"] }, Open ]], -Cell[23620, 783, 177, 3, 55, "Input",ExpressionUUID->"b6ffd985-f8c0-40ec-8c9a-420755112fa1"], +Cell[24044, 721, 173, 2, 29, "Input",ExpressionUUID->"b6ffd985-f8c0-40ec-8c9a-420755112fa1"], Cell[CellGroupData[{ -Cell[23822, 790, 333, 6, 55, "Input",ExpressionUUID->"8b2be4fe-5abe-41c1-8c2b-308221f789c5"], -Cell[24158, 798, 232, 4, 62, "Output",ExpressionUUID->"39d87589-88b5-439a-a5c3-1f92e446f010"] +Cell[24242, 727, 329, 5, 29, "Input",ExpressionUUID->"8b2be4fe-5abe-41c1-8c2b-308221f789c5"], +Cell[24574, 734, 251, 3, 33, "Output",ExpressionUUID->"f8c0cfa2-24db-4c24-bc82-10a66dc657b1"] }, Open ]], -Cell[24405, 805, 177, 3, 55, "Input",ExpressionUUID->"53a13f5f-e05e-47ca-b734-090c55369ce1"], +Cell[24840, 740, 173, 2, 29, "Input",ExpressionUUID->"53a13f5f-e05e-47ca-b734-090c55369ce1"], Cell[CellGroupData[{ -Cell[24607, 812, 336, 6, 55, "Input",ExpressionUUID->"cf8cda0c-3bb3-4016-a3f5-9c6926bbc271"], -Cell[24946, 820, 231, 4, 62, "Output",ExpressionUUID->"ef0435dd-913b-4b7c-89c0-a17719b03d16"] +Cell[25038, 746, 332, 5, 29, "Input",ExpressionUUID->"cf8cda0c-3bb3-4016-a3f5-9c6926bbc271"], +Cell[25373, 753, 250, 3, 33, "Output",ExpressionUUID->"5a48e183-1220-4bb5-ab95-50c3c08cb6bd"] }, Open ]], -Cell[25192, 827, 177, 3, 55, "Input",ExpressionUUID->"36067f20-9256-49cd-b13a-2acfaf085868"], +Cell[25638, 759, 173, 2, 29, "Input",ExpressionUUID->"36067f20-9256-49cd-b13a-2acfaf085868"], Cell[CellGroupData[{ -Cell[25394, 834, 358, 6, 55, "Input",ExpressionUUID->"896f3cdf-8d20-4b50-ac74-5fc9cae1e9d4"], -Cell[25755, 842, 237, 4, 62, "Output",ExpressionUUID->"87d8fbc3-8359-4b32-8756-b5cbde25a2fb"] +Cell[25836, 765, 354, 5, 29, "Input",ExpressionUUID->"896f3cdf-8d20-4b50-ac74-5fc9cae1e9d4"], +Cell[26193, 772, 258, 3, 33, "Output",ExpressionUUID->"b8610e09-b6a5-4f50-8ccb-0798c5807542"] }, Open ]], -Cell[26007, 849, 175, 3, 55, "Input",ExpressionUUID->"13a887da-fdf1-4555-bdc0-cfce424630d2"], +Cell[26466, 778, 171, 2, 29, "Input",ExpressionUUID->"13a887da-fdf1-4555-bdc0-cfce424630d2"], Cell[CellGroupData[{ -Cell[26207, 856, 303, 6, 55, "Input",ExpressionUUID->"a6b21d46-0453-469c-8b62-efbaebe4b955"], -Cell[26513, 864, 237, 4, 62, "Output",ExpressionUUID->"9a8b3fab-d57d-4175-8174-701cc8a73330"] +Cell[26662, 784, 299, 5, 29, "Input",ExpressionUUID->"a6b21d46-0453-469c-8b62-efbaebe4b955"], +Cell[26964, 791, 256, 3, 33, "Output",ExpressionUUID->"c2782ad5-be2c-4886-9304-b4cb89ba295e"] }, Open ]], -Cell[26765, 871, 175, 3, 55, "Input",ExpressionUUID->"9eedf60d-53ef-4938-baa6-11e02c29cf8f"], +Cell[27235, 797, 171, 2, 29, "Input",ExpressionUUID->"9eedf60d-53ef-4938-baa6-11e02c29cf8f"], Cell[CellGroupData[{ -Cell[26965, 878, 307, 6, 55, "Input",ExpressionUUID->"ecd7ca77-2fdc-4a6c-b6f5-709a80e8eb24"], -Cell[27275, 886, 233, 4, 62, "Output",ExpressionUUID->"d8529a53-686a-4e4a-a62b-356a2adc2e55"] +Cell[27431, 803, 303, 5, 29, "Input",ExpressionUUID->"ecd7ca77-2fdc-4a6c-b6f5-709a80e8eb24"], +Cell[27737, 810, 254, 3, 33, "Output",ExpressionUUID->"ad54a316-d93a-4954-8b5d-9892a8e15a80"] }, Open ]], -Cell[27523, 893, 177, 3, 55, "Input",ExpressionUUID->"0066d7c9-cbac-458f-a9d8-0f394de6b7d7"], +Cell[28006, 816, 173, 2, 29, "Input",ExpressionUUID->"0066d7c9-cbac-458f-a9d8-0f394de6b7d7"], Cell[CellGroupData[{ -Cell[27725, 900, 311, 6, 55, "Input",ExpressionUUID->"eb555cef-293a-4b3f-a8d4-770f015ea832"], -Cell[28039, 908, 232, 4, 62, "Output",ExpressionUUID->"5fa5fe46-82da-47e3-b06f-c0b1b24ac58f"] +Cell[28204, 822, 307, 5, 29, "Input",ExpressionUUID->"eb555cef-293a-4b3f-a8d4-770f015ea832"], +Cell[28514, 829, 250, 3, 33, "Output",ExpressionUUID->"a721a2dc-cda8-438d-b15d-5aa969d07241"] }, Open ]], -Cell[28286, 915, 176, 3, 55, "Input",ExpressionUUID->"2d6d55d5-526d-4fa4-b318-5bfabd7913e0"], +Cell[28779, 835, 172, 2, 29, "Input",ExpressionUUID->"2d6d55d5-526d-4fa4-b318-5bfabd7913e0"], Cell[CellGroupData[{ -Cell[28487, 922, 279, 5, 55, "Input",ExpressionUUID->"ce46883d-0875-488c-a662-b1a9828b60a4"], -Cell[28769, 929, 231, 4, 62, "Output",ExpressionUUID->"8198cd7f-c43c-436d-a289-efc2055d75e6"] +Cell[28976, 841, 275, 4, 29, "Input",ExpressionUUID->"ce46883d-0875-488c-a662-b1a9828b60a4"], +Cell[29254, 847, 250, 3, 33, "Output",ExpressionUUID->"89f85754-3c4e-41dd-a732-31bbc2ecc04a"] }, Open ]], -Cell[29015, 936, 179, 3, 55, "Input",ExpressionUUID->"221b8dcb-f609-494a-b36c-40b6472c10a3"], +Cell[29519, 853, 175, 2, 29, "Input",ExpressionUUID->"221b8dcb-f609-494a-b36c-40b6472c10a3"], Cell[CellGroupData[{ -Cell[29219, 943, 19813, 486, 3214, "Input",ExpressionUUID->"e446f4d8-14f5-4096-837e-b38ea645f5b1"], -Cell[49035, 1431, 272, 5, 62, "Output",ExpressionUUID->"782841f2-4225-4aff-9662-b46ab0b98d7a"] +Cell[29719, 859, 19809, 485, 1100, "Input",ExpressionUUID->"e446f4d8-14f5-4096-837e-b38ea645f5b1"], +Cell[49531, 1346, 292, 4, 33, "Output",ExpressionUUID->"c9402b73-94e6-46d1-b729-53f45a122764"] }, Open ]], Cell[CellGroupData[{ -Cell[49344, 1441, 19752, 490, 3214, "Input",ExpressionUUID->"c754259e-b681-44ec-bc5f-f1002de6b346"], -Cell[69099, 1933, 271, 5, 62, "Output",ExpressionUUID->"e94e89e2-c00f-406b-9e5a-5d750cf4e528"] +Cell[49860, 1355, 19748, 489, 1100, "Input",ExpressionUUID->"c754259e-b681-44ec-bc5f-f1002de6b346"], +Cell[69611, 1846, 291, 4, 33, "Output",ExpressionUUID->"d5c511a2-6358-4333-9ff6-b46e1b237e07"] }, Open ]], Cell[CellGroupData[{ -Cell[69407, 1943, 19752, 484, 3213, "Input",ExpressionUUID->"a0d78b9d-da66-4b78-a3d6-d80e8e08266d"], -Cell[89162, 2429, 289, 6, 62, "Output",ExpressionUUID->"3677372e-b949-43a1-b9ef-a4fddd71eba0"] +Cell[69939, 1855, 19748, 483, 1099, "Input",ExpressionUUID->"a0d78b9d-da66-4b78-a3d6-d80e8e08266d"], +Cell[89690, 2340, 307, 5, 33, "Output",ExpressionUUID->"fb80b73b-f6f2-424a-a769-cb4ceadfd1ce"] }, Open ]], Cell[CellGroupData[{ -Cell[89488, 2440, 22538, 554, 3639, "Input",ExpressionUUID->"29ba86b4-e35f-41cb-bd23-95aa4f58b80c"], -Cell[112029, 2996, 291, 6, 62, "Output",ExpressionUUID->"b33ef8da-8a9c-4478-858d-00bd52663baa"] +Cell[90034, 2350, 22534, 553, 1235, "Input",ExpressionUUID->"29ba86b4-e35f-41cb-bd23-95aa4f58b80c"], +Cell[112571, 2905, 311, 5, 33, "Output",ExpressionUUID->"2eb04cd5-3a83-4d6f-a3a3-6fa6d06e3604"] }, Open ]], Cell[CellGroupData[{ -Cell[112357, 3007, 22539, 554, 3639, "Input",ExpressionUUID->"8be7818b-92d5-4578-aa31-e4da70c8e4c5"], -Cell[134899, 3563, 292, 6, 62, "Output",ExpressionUUID->"1910edf3-acaa-48b3-b89f-4c2225d2bd72"] +Cell[112919, 2915, 22535, 553, 1235, "Input",ExpressionUUID->"8be7818b-92d5-4578-aa31-e4da70c8e4c5"], +Cell[135457, 3470, 312, 5, 33, "Output",ExpressionUUID->"21702119-2152-4d93-9780-06f5f1360f4f"] }, Open ]], Cell[CellGroupData[{ -Cell[135228, 3574, 25495, 627, 4065, "Input",ExpressionUUID->"64302f58-29a7-49a8-b2e1-fa56c49c4dca"], -Cell[160726, 4203, 286, 6, 62, "Output",ExpressionUUID->"c85322e9-84b9-486b-bb95-5be89728c4bc"] +Cell[135806, 3480, 25491, 626, 1350, "Input",ExpressionUUID->"64302f58-29a7-49a8-b2e1-fa56c49c4dca"], +Cell[161300, 4108, 304, 5, 33, "Output",ExpressionUUID->"559ea334-4b49-4962-a2c8-b661d2fd9f89"] }, Open ]], Cell[CellGroupData[{ -Cell[161049, 4214, 134, 3, 55, "Input",ExpressionUUID->"8f7c645d-ec3b-4a9b-9e3f-ed7ed480145a"], -Cell[161186, 4219, 254, 5, 62, "Output",ExpressionUUID->"1b41b77d-0477-4ffa-be10-e2ca605f6e54"] +Cell[161641, 4118, 130, 2, 29, "Input",ExpressionUUID->"8f7c645d-ec3b-4a9b-9e3f-ed7ed480145a"], +Cell[161774, 4122, 271, 4, 33, "Output",ExpressionUUID->"45ed53e7-5f76-48f6-b694-0120cfd47a26"] }, Open ]], Cell[CellGroupData[{ -Cell[161477, 4229, 134, 3, 55, "Input",ExpressionUUID->"c43bdea7-0906-49ec-8ca6-ef839705fc94"], -Cell[161614, 4234, 254, 5, 62, "Output",ExpressionUUID->"209d102e-8b06-49fd-8562-1e9609fb488a"] +Cell[162082, 4131, 130, 2, 29, "Input",ExpressionUUID->"c43bdea7-0906-49ec-8ca6-ef839705fc94"], +Cell[162215, 4135, 272, 4, 33, "Output",ExpressionUUID->"accdf51d-26cd-4839-b2f0-24c74da72a91"] }, Open ]], Cell[CellGroupData[{ -Cell[161905, 4244, 1148, 40, 211, "Input",ExpressionUUID->"04a502bd-2a13-4818-8add-72d236fb5cef"], -Cell[163056, 4286, 271, 5, 62, "Output",ExpressionUUID->"cfd7f144-2838-477a-be4a-1c8e8047ef31"] +Cell[162524, 4144, 1144, 39, 55, "Input",ExpressionUUID->"04a502bd-2a13-4818-8add-72d236fb5cef"], +Cell[163671, 4185, 291, 4, 33, "Output",ExpressionUUID->"5f0644a4-bbfd-4141-b7ec-4afb1cf2660e"] }, Open ]], Cell[CellGroupData[{ -Cell[163364, 4296, 1045, 36, 211, "Input",ExpressionUUID->"408a3b04-8641-4ffc-b98c-fca92199312d"], -Cell[164412, 4334, 286, 6, 62, "Output",ExpressionUUID->"9f36d0ea-beaa-4937-9524-ffd3a9547bfa"] +Cell[163999, 4194, 1041, 35, 55, "Input",ExpressionUUID->"408a3b04-8641-4ffc-b98c-fca92199312d"], +Cell[165043, 4231, 306, 5, 33, "Output",ExpressionUUID->"24712f3a-e9e5-4e65-8995-0d7f45d7d73b"] }, Open ]], Cell[CellGroupData[{ -Cell[164735, 4345, 1148, 40, 211, "Input",ExpressionUUID->"e0c14472-8fa3-4706-a91e-87b0b649926b"], -Cell[165886, 4387, 271, 5, 62, "Output",ExpressionUUID->"7473e455-ee7c-440c-9905-7d894df38dd7"] +Cell[165386, 4241, 1144, 39, 55, "Input",ExpressionUUID->"e0c14472-8fa3-4706-a91e-87b0b649926b"], +Cell[166533, 4282, 289, 4, 33, "Output",ExpressionUUID->"27059b3f-152d-48c8-99be-8a6747f7a89f"] }, Open ]], Cell[CellGroupData[{ -Cell[166194, 4397, 112, 2, 55, "Input",ExpressionUUID->"3361d54a-9fee-4dc7-b0f9-c079ad13bff9"], -Cell[166309, 4401, 272, 5, 62, "Output",ExpressionUUID->"fc82e519-98a4-4ec5-abbb-822af7592133"] +Cell[166859, 4291, 108, 1, 29, "Input",ExpressionUUID->"3361d54a-9fee-4dc7-b0f9-c079ad13bff9"], +Cell[166970, 4294, 290, 4, 33, "Output",ExpressionUUID->"2ccc81c4-9797-4cff-9fbc-b6e9d92c5498"] }, Open ]], Cell[CellGroupData[{ -Cell[166618, 4411, 112, 2, 55, "Input",ExpressionUUID->"78afd026-364a-4aa4-9e4b-7291c917c93b"], -Cell[166733, 4415, 289, 6, 62, "Output",ExpressionUUID->"b631c807-62d5-49fb-9333-765109003d6f"] +Cell[167297, 4303, 108, 1, 29, "Input",ExpressionUUID->"78afd026-364a-4aa4-9e4b-7291c917c93b"], +Cell[167408, 4306, 307, 5, 33, "Output",ExpressionUUID->"19d8b29c-9a35-42ae-b7c7-963e1b3a9317"] }, Open ]], Cell[CellGroupData[{ -Cell[167059, 4426, 112, 2, 55, "Input",ExpressionUUID->"15a13a1d-3344-451b-bace-62f40125a6ae"], -Cell[167174, 4430, 287, 6, 62, "Output",ExpressionUUID->"dc76234d-e699-4177-b1bf-67a8d584ffdf"] +Cell[167752, 4316, 108, 1, 29, "Input",ExpressionUUID->"15a13a1d-3344-451b-bace-62f40125a6ae"], +Cell[167863, 4319, 305, 5, 33, "Output",ExpressionUUID->"0d173de7-a3cd-4355-8cd0-b437c96fd766"] }, Open ]], Cell[CellGroupData[{ -Cell[167498, 4441, 112, 2, 55, "Input",ExpressionUUID->"06631f67-ba6a-4304-a742-be824337daa9"], -Cell[167613, 4445, 274, 5, 62, "Output",ExpressionUUID->"b9d33f70-3d9e-4507-9542-c7565dac6a4a"] +Cell[168205, 4329, 108, 1, 29, "Input",ExpressionUUID->"06631f67-ba6a-4304-a742-be824337daa9"], +Cell[168316, 4332, 292, 4, 33, "Output",ExpressionUUID->"9c9ae3f1-19a7-4835-90d2-8a6f123f040d"] }, Open ]], Cell[CellGroupData[{ -Cell[167924, 4455, 111, 2, 55, "Input",ExpressionUUID->"94346525-779e-4404-8516-30e7487a8377"], -Cell[168038, 4459, 272, 5, 62, "Output",ExpressionUUID->"773cf697-359a-4f18-865c-27d836e37315"] +Cell[168645, 4341, 107, 1, 29, "Input",ExpressionUUID->"94346525-779e-4404-8516-30e7487a8377"], +Cell[168755, 4344, 290, 4, 33, "Output",ExpressionUUID->"8fe1de57-1892-4507-aef0-7d59aaf331f5"] }, Open ]], Cell[CellGroupData[{ -Cell[168347, 4469, 111, 2, 55, "Input",ExpressionUUID->"ebf2bbf4-40de-4f6a-827f-7e8c756e14d7"], -Cell[168461, 4473, 272, 5, 62, "Output",ExpressionUUID->"64c28c6f-8c52-4f26-9dcf-baf817ea4147"] +Cell[169082, 4353, 107, 1, 29, "Input",ExpressionUUID->"ebf2bbf4-40de-4f6a-827f-7e8c756e14d7"], +Cell[169192, 4356, 290, 4, 33, "Output",ExpressionUUID->"2227550d-550c-4911-b128-4c27f3332f3c"] }, Open ]], Cell[CellGroupData[{ -Cell[168770, 4483, 501, 17, 105, "Input",ExpressionUUID->"517d4477-0c6c-48e5-91af-37aa5f87471e"], -Cell[169274, 4502, 287, 6, 62, "Output",ExpressionUUID->"909ea9b0-71b9-4196-9318-eaff211b38d0"] +Cell[169519, 4365, 497, 16, 55, "Input",ExpressionUUID->"517d4477-0c6c-48e5-91af-37aa5f87471e"], +Cell[170019, 4383, 307, 5, 33, "Output",ExpressionUUID->"97d9065f-ad0b-4d0e-8b9f-739f97519c3d"] }, Open ]], Cell[CellGroupData[{ -Cell[169598, 4513, 501, 17, 105, "Input",ExpressionUUID->"6064daa3-6279-4c68-958b-67bad8cf01d5"], -Cell[170102, 4532, 286, 6, 62, "Output",ExpressionUUID->"295b97de-a14e-487b-82ef-b83f9c6dc41f"] +Cell[170363, 4393, 497, 16, 55, "Input",ExpressionUUID->"6064daa3-6279-4c68-958b-67bad8cf01d5"], +Cell[170863, 4411, 306, 5, 33, "Output",ExpressionUUID->"e3da3e46-b8af-4a6a-98ac-b42c5aef768a"] }, Open ]], Cell[CellGroupData[{ -Cell[170425, 4543, 1792, 61, 358, "Input",ExpressionUUID->"ef5ef45e-02f1-40e0-98d6-43db39a8a36a"], -Cell[172220, 4606, 270, 5, 62, "Output",ExpressionUUID->"d3c5f8a3-eb62-4177-aee4-0ea6043e3985"] +Cell[171206, 4421, 1788, 60, 55, "Input",ExpressionUUID->"ef5ef45e-02f1-40e0-98d6-43db39a8a36a"], +Cell[172997, 4483, 288, 4, 33, "Output",ExpressionUUID->"91f7589f-92cc-4aa9-abbb-9a0079e5a27f"] }, Open ]], Cell[CellGroupData[{ -Cell[172527, 4616, 1105, 37, 256, "Input",ExpressionUUID->"0feb24b4-f965-4c9a-892b-0f55af7f3930"], -Cell[173635, 4655, 291, 6, 62, "Output",ExpressionUUID->"e98de81d-3dbf-481e-aa5a-72ff72ee6dc8"] +Cell[173322, 4492, 1101, 36, 55, "Input",ExpressionUUID->"0feb24b4-f965-4c9a-892b-0f55af7f3930"], +Cell[174426, 4530, 309, 5, 33, "Output",ExpressionUUID->"8b6b0721-8f33-4c89-bd88-e8385bc58280"] }, Open ]], Cell[CellGroupData[{ -Cell[173963, 4666, 1822, 62, 313, "Input",ExpressionUUID->"92f48aa9-a01c-431b-ad27-db26cba84490"], -Cell[175788, 4730, 269, 5, 62, "Output",ExpressionUUID->"ca981722-7728-47af-b853-953b186e37c1"] +Cell[174772, 4540, 1818, 61, 107, "Input",ExpressionUUID->"92f48aa9-a01c-431b-ad27-db26cba84490"], +Cell[176593, 4603, 287, 4, 33, "Output",ExpressionUUID->"2f0242f5-d829-4e59-944c-ecbb1e2874a4"] }, Open ]], Cell[CellGroupData[{ -Cell[176094, 4740, 1635, 54, 208, "Input",ExpressionUUID->"4154f56f-4103-4558-b830-6083ff36be8d"], -Cell[177732, 4796, 273, 5, 41, "Output",ExpressionUUID->"d6ec32d4-207d-4cd8-9eeb-88f97add5e2f"] +Cell[176917, 4612, 1631, 53, 79, "Input",ExpressionUUID->"4154f56f-4103-4558-b830-6083ff36be8d"], +Cell[178551, 4667, 293, 4, 33, "Output",ExpressionUUID->"4762b05b-9d27-4aa6-90a8-4115a34e5329"] }, Open ]], Cell[CellGroupData[{ -Cell[178042, 4806, 1635, 54, 208, "Input",ExpressionUUID->"2d5197b2-6c2a-4bb0-bcee-b44c1006a471"], -Cell[179680, 4862, 272, 5, 41, "Output",ExpressionUUID->"8a566fda-2491-4f78-88f7-6c8bd7948d76"] +Cell[178881, 4676, 1631, 53, 79, "Input",ExpressionUUID->"2d5197b2-6c2a-4bb0-bcee-b44c1006a471"], +Cell[180515, 4731, 292, 4, 33, "Output",ExpressionUUID->"c8643014-afb9-4343-a0cd-defcc8192a91"] }, Open ]], -Cell[179967, 4870, 250, 5, 56, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], -Cell[180220, 4877, 253, 5, 56, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], Cell[CellGroupData[{ -Cell[180498, 4886, 1301, 43, 174, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], -Cell[181802, 4931, 178, 3, 41, "Output",ExpressionUUID->"1db85c02-7ca3-154e-854d-2c36f89709c4"] +Cell[180844, 4740, 271, 5, 45, "Input",ExpressionUUID->"c5bb4ac7-6666-c043-9d96-2dda1d801f63"], +Cell[181118, 4747, 159, 2, 33, "Output",ExpressionUUID->"9466296d-2972-4091-b37f-519d97158cec"] }, Open ]], Cell[CellGroupData[{ -Cell[182017, 4939, 910, 31, 128, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], -Cell[182930, 4972, 175, 3, 41, "Output",ExpressionUUID->"78ed190c-23cd-4d45-867a-2b08174b715f"] +Cell[181314, 4754, 274, 5, 45, "Input",ExpressionUUID->"1dc76a14-b094-5f49-81bb-fc37192f9bb8"], +Cell[181591, 4761, 163, 2, 33, "Output",ExpressionUUID->"8a630d76-5aa4-4eae-a545-f01c358b8a2f"] }, Open ]], Cell[CellGroupData[{ -Cell[183142, 4980, 885, 30, 128, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], -Cell[184030, 5012, 177, 3, 41, "Output",ExpressionUUID->"82ec2512-4fcb-ba44-b472-bb3a66bb622e"] +Cell[181791, 4768, 1297, 42, 47, "Input",ExpressionUUID->"5e48fe0c-b3e8-2b40-82cb-716b23b2f326"], +Cell[183091, 4812, 197, 2, 33, "Output",ExpressionUUID->"27098413-4b16-4e79-b43b-c95fea59107d"] }, Open ]], Cell[CellGroupData[{ -Cell[184244, 5020, 558, 19, 66, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], -Cell[184805, 5041, 173, 3, 41, "Output",ExpressionUUID->"9d53fa4a-be54-7b42-83bd-0a5560193c0f"] +Cell[183325, 4819, 929, 30, 55, "Input",ExpressionUUID->"e4db2648-4e1a-2c46-83ab-fcd932c3b663"], +Cell[184257, 4851, 192, 2, 33, "Output",ExpressionUUID->"74bc4933-be6e-4d5a-89e4-6175fdf8b5af"] }, Open ]], Cell[CellGroupData[{ -Cell[185015, 5049, 623, 21, 66, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], -Cell[185641, 5072, 170, 3, 41, "Output",ExpressionUUID->"4107fa63-a138-df48-a95c-ec944a983800"] +Cell[184486, 4858, 904, 29, 55, "Input",ExpressionUUID->"e4649c3d-e19e-ca42-95a0-23b66397f1fd"], +Cell[185393, 4889, 195, 2, 33, "Output",ExpressionUUID->"415398c0-0f62-4bcc-9cf4-881ea65fcf5f"] }, Open ]], Cell[CellGroupData[{ -Cell[185848, 5080, 170, 5, 71, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], -Cell[186021, 5087, 173, 3, 41, "Output",ExpressionUUID->"f894fb1d-1550-5146-a259-dfa871655c2a"] +Cell[185625, 4896, 554, 18, 51, "Input",ExpressionUUID->"4fce6da4-52eb-2241-95d7-07a3b02da5a3"], +Cell[186182, 4916, 192, 2, 33, "Output",ExpressionUUID->"6720e0e1-f94d-43b4-8f3f-dc526fe36abc"] }, Open ]], Cell[CellGroupData[{ -Cell[186231, 5095, 170, 5, 69, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], -Cell[186404, 5102, 170, 3, 41, "Output",ExpressionUUID->"8d5b13a4-8c75-0f48-ab21-9720bb8c0cbc"] +Cell[186411, 4923, 619, 20, 51, "Input",ExpressionUUID->"3d3ac48f-4615-f84c-a7f7-5378c3c65118"], +Cell[187033, 4945, 189, 2, 33, "Output",ExpressionUUID->"c7c59ae6-11d7-4bc1-b869-8bebb85ed2a5"] }, Open ]], Cell[CellGroupData[{ -Cell[186611, 5110, 181, 5, 55, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], -Cell[186795, 5117, 171, 3, 41, "Output",ExpressionUUID->"4d4b493f-9f2d-1e41-979f-fb4d58d0e93a"] +Cell[187259, 4952, 166, 4, 55, "Input",ExpressionUUID->"2286abae-ff28-304a-8f7b-c48840716d4d"], +Cell[187428, 4958, 191, 2, 33, "Output",ExpressionUUID->"cd9f4344-96e5-4833-b02e-c2d6b3d09544"] }, Open ]], Cell[CellGroupData[{ -Cell[187003, 5125, 181, 5, 55, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], -Cell[187187, 5132, 173, 3, 41, "Output",ExpressionUUID->"e40db20b-c65e-4a45-ba96-abcb59b0d0ac"] +Cell[187656, 4965, 166, 4, 54, "Input",ExpressionUUID->"373925b1-ddd5-2947-b051-4d47d7cbfb42"], +Cell[187825, 4971, 187, 2, 33, "Output",ExpressionUUID->"e97ad6fb-fb2b-4309-bb42-574f1b743592"] }, Open ]], Cell[CellGroupData[{ -Cell[187397, 5140, 6055, 185, 831, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], -Cell[193455, 5327, 175, 3, 41, "Output",ExpressionUUID->"cdf81fea-e12a-2b44-81a8-222b4bbf8a86"] +Cell[188049, 4978, 177, 4, 43, "Input",ExpressionUUID->"797e30a2-55b1-ab41-8ec1-6f1890b0cafa"], +Cell[188229, 4984, 189, 2, 33, "Output",ExpressionUUID->"47e1ab68-a28f-40d9-9030-2ad471058563"] }, Open ]], Cell[CellGroupData[{ -Cell[193667, 5335, 368, 9, 53, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], -Cell[194038, 5346, 170, 3, 41, "Output",ExpressionUUID->"181dc1c8-632b-4b43-91c4-d3626d65bfc7"] +Cell[188455, 4991, 177, 4, 43, "Input",ExpressionUUID->"b6758968-60a5-bf4f-af97-c0234fd45ae7"], +Cell[188635, 4997, 193, 2, 33, "Output",ExpressionUUID->"21d65a9f-978a-44e7-a4fa-8ae656ad940a"] }, Open ]], Cell[CellGroupData[{ -Cell[194245, 5354, 6122, 187, 900, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], -Cell[200370, 5543, 175, 3, 41, "Output",ExpressionUUID->"c7d972b4-764c-954a-8260-240d49cfcff6"] +Cell[188865, 5004, 6051, 184, 183, "Input",ExpressionUUID->"3c10b649-f7fb-634c-9567-a2802f1a91e4"], +Cell[194919, 5190, 193, 2, 33, "Output",ExpressionUUID->"38c65e7f-89b0-453d-8400-aaf19423379e"] }, Open ]], Cell[CellGroupData[{ -Cell[200582, 5551, 368, 9, 53, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], -Cell[200953, 5562, 172, 3, 41, "Output",ExpressionUUID->"c285a758-c3ad-974b-93c3-4cb0d4bdd2ae"] +Cell[195149, 5197, 364, 8, 41, "Input",ExpressionUUID->"3d9772dc-d09e-7e42-a8c3-34b35177c0b5"], +Cell[195516, 5207, 186, 2, 33, "Output",ExpressionUUID->"5294c82b-916f-4e0a-8502-c3e1f3f7d114"] }, Open ]], Cell[CellGroupData[{ -Cell[201162, 5570, 2663, 88, 435, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], -Cell[203828, 5660, 173, 3, 41, "Output",ExpressionUUID->"5dc957f4-8f84-c54c-80a3-c76f756c5df4"] +Cell[195739, 5214, 6118, 186, 183, "Input",ExpressionUUID->"69710763-10b6-9e4b-a03e-04503cc982f3"], +Cell[201860, 5402, 193, 2, 33, "Output",ExpressionUUID->"f47ca4b1-3998-456a-befd-3df9b59abb4b"] }, Open ]], Cell[CellGroupData[{ -Cell[204038, 5668, 2603, 85, 435, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], -Cell[206644, 5755, 172, 3, 41, "Output",ExpressionUUID->"b4ee01d5-3415-494b-b28a-4587c8d8bb90"] +Cell[202090, 5409, 364, 8, 41, "Input",ExpressionUUID->"21d4dc0d-49aa-e14b-a672-a791a49cb67d"], +Cell[202457, 5419, 192, 2, 33, "Output",ExpressionUUID->"196c0dab-b578-434f-9a4e-869f6ead7509"] }, Open ]], Cell[CellGroupData[{ -Cell[206853, 5763, 3712, 118, 575, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], -Cell[210568, 5883, 174, 3, 41, "Output",ExpressionUUID->"20c44e64-7085-8e4d-a9d6-f80b5532826e"] +Cell[202686, 5426, 2659, 87, 107, "Input",ExpressionUUID->"53b2f62f-bbcf-e747-be67-34e0ed52cc11"], +Cell[205348, 5515, 193, 2, 33, "Output",ExpressionUUID->"c9e209b4-6f0a-4c71-9920-e11ce285c8a2"] }, Open ]], -Cell[210757, 5889, 138, 3, 36, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ -Cell[210920, 5896, 2052, 59, 276, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], -Cell[212975, 5957, 524, 11, 98, "Message",ExpressionUUID->"bd0a7da1-672e-6b4e-afbd-4af379292e8d"], -Cell[213502, 5970, 526, 11, 98, "Message",ExpressionUUID->"9a8837e4-2afa-d145-83db-a88ef0e502bc"], -Cell[214031, 5983, 530, 11, 98, "Message",ExpressionUUID->"0aa4ed5d-b925-834d-b53a-95c75c4ff982"], -Cell[214564, 5996, 455, 10, 32, "Message",ExpressionUUID->"2742a735-9c26-7640-8a81-3e30eaffa353"], -Cell[215022, 6008, 172, 3, 41, "Output",ExpressionUUID->"d91a6bca-04d7-b84b-93cf-0695498dc4de"] +Cell[205578, 5522, 2599, 84, 107, "Input",ExpressionUUID->"42f082eb-e223-114c-bb63-6a16bba4880c"], +Cell[208180, 5608, 189, 2, 33, "Output",ExpressionUUID->"fcf3e793-b423-4de7-a272-29b1a769c732"] }, Open ]], Cell[CellGroupData[{ -Cell[215231, 6016, 2054, 59, 276, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], -Cell[217288, 6077, 524, 11, 98, "Message",ExpressionUUID->"2c553d54-16ec-9646-b6d7-75da3c367575"], -Cell[217815, 6090, 526, 11, 98, "Message",ExpressionUUID->"1c597fdf-5631-a84c-9feb-152df3629d86"], -Cell[218344, 6103, 528, 11, 98, "Message",ExpressionUUID->"48439b56-7b7d-fa4d-a4e2-5db2bbda0c77"], -Cell[218875, 6116, 456, 10, 32, "Message",ExpressionUUID->"66ce390f-34a9-df4d-9875-a339943ada86"], -Cell[219334, 6128, 170, 3, 41, "Output",ExpressionUUID->"2e46fa54-fabe-5040-8f8c-6829b7c76136"] +Cell[208406, 5615, 3708, 117, 160, "Input",ExpressionUUID->"22ca5bb0-8415-2146-b64e-353a4dc8c0e5"], +Cell[212117, 5734, 192, 2, 33, "Output",ExpressionUUID->"2675a6d7-3af3-4ddf-88c2-f039c5d34bdb"] }, Open ]], +Cell[212324, 5739, 160, 3, 29, "Input",ExpressionUUID->"ba4a3eff-9e3b-5e47-a896-3a959bbbf44d"], Cell[CellGroupData[{ -Cell[219541, 6136, 1938, 53, 232, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], -Cell[221482, 6191, 19994, 375, 285, "Output",ExpressionUUID->"fdd0f260-414f-a94a-8f26-cd86e676700c"] +Cell[212509, 5746, 2071, 58, 99, "Input",ExpressionUUID->"738a48f3-b38c-f441-aec4-53babaa73a14"], +Cell[214583, 5806, 606, 13, 27, "Message",ExpressionUUID->"995abb02-0b4a-45c3-8751-2bd491ec0ea3"], +Cell[215192, 5821, 610, 13, 27, "Message",ExpressionUUID->"52bf95ee-1c79-4c5b-a68b-7b752df8dbef"], +Cell[215805, 5836, 613, 13, 27, "Message",ExpressionUUID->"f7cab255-d9e1-4f68-8dcb-4d43b53e3c5c"], +Cell[216421, 5851, 492, 11, 26, "Message",ExpressionUUID->"939a0624-ac18-4275-b49c-dbea26865175"], +Cell[216916, 5864, 190, 2, 33, "Output",ExpressionUUID->"0e9f5be0-8419-45f4-8ded-758a12495997"] }, Open ]], Cell[CellGroupData[{ -Cell[241513, 6571, 2092, 60, 311, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], -Cell[243608, 6633, 490, 11, 71, "Message",ExpressionUUID->"546a9ea9-5939-f84a-87c6-58844f58f330"], -Cell[244101, 6646, 493, 11, 71, "Message",ExpressionUUID->"b36bffd7-1c84-5c45-a847-b2c31968f579"], -Cell[244597, 6659, 508, 11, 56, "Message",ExpressionUUID->"c864bef7-fc73-d94b-8cde-14570cba8095"], -Cell[245108, 6672, 456, 10, 32, "Message",ExpressionUUID->"a2e62375-acd2-6740-bfd7-026877c5bd7b"], -Cell[245567, 6684, 61603, 1057, 290, "Output",ExpressionUUID->"d4eecdc9-263c-5b43-bb29-cd0ac1286793"] +Cell[217143, 5871, 2073, 58, 99, "Input",ExpressionUUID->"86c33485-ed26-8f49-b3d0-7d040d3b48f0"], +Cell[219219, 5931, 606, 13, 27, "Message",ExpressionUUID->"68305e45-e3c6-4167-8a84-7e68a0163667"], +Cell[219828, 5946, 610, 13, 27, "Message",ExpressionUUID->"c7b31fb4-4ae1-46c8-acea-0cfa53d1ca2b"], +Cell[220441, 5961, 613, 13, 27, "Message",ExpressionUUID->"3ca7205a-9551-4ae7-b8d4-f34414dbc698"], +Cell[221057, 5976, 494, 11, 26, "Message",ExpressionUUID->"273e6e53-f85e-44a4-bc9a-570f35141d99"], +Cell[221554, 5989, 188, 2, 33, "Output",ExpressionUUID->"9c0985d6-eb3b-47b9-9a4f-f92b4e592f4a"] }, Open ]], -Cell[307185, 7744, 2524, 71, 316, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], -Cell[309712, 7817, 209, 5, 36, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], Cell[CellGroupData[{ -Cell[309946, 7826, 217, 7, 61, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], -Cell[310166, 7835, 169, 3, 41, "Output",ExpressionUUID->"07374b0a-4615-bf46-ab49-be8623cec410"] +Cell[221779, 5996, 1957, 52, 70, "Input",ExpressionUUID->"f373fe4f-940c-0842-9236-63ec36d318ad"], +Cell[223739, 6050, 20452, 385, 236, "Output",ExpressionUUID->"a3250b78-3d52-4921-8d43-9383ac43051f"] }, Open ]], Cell[CellGroupData[{ -Cell[310372, 7843, 1816, 53, 311, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], -Cell[312191, 7898, 502, 11, 71, "Message",ExpressionUUID->"c1f83af1-416a-6240-b3fd-c1bfcc643459"], -Cell[312696, 7911, 506, 11, 71, "Message",ExpressionUUID->"5cfd3c4b-6190-2c4d-8479-b4ccd7090f94"], -Cell[313205, 7924, 509, 11, 71, "Message",ExpressionUUID->"288fc6c7-a3fe-9b48-9c0d-bba2713f7084"], -Cell[313717, 7937, 456, 10, 32, "Message",ExpressionUUID->"09478fd5-b212-2347-91e7-b9097bd6d61d"], -Cell[314176, 7949, 28560, 514, 290, "Output",ExpressionUUID->"f7784347-2042-c042-8970-b060f9535d9e"] +Cell[244228, 6440, 2111, 59, 99, "Input",ExpressionUUID->"24fa5db0-1063-354a-bd60-c117a27ff3e1"], +Cell[246342, 6501, 537, 12, 38, "Message",ExpressionUUID->"282f2a5d-8408-4d9f-8f16-25ec53740b1d"], +Cell[246882, 6515, 541, 12, 38, "Message",ExpressionUUID->"4856b091-062a-416d-a507-2c518575c2e0"], +Cell[247426, 6529, 544, 12, 38, "Message",ExpressionUUID->"d7374219-f1b2-403a-8025-346698340502"], +Cell[247973, 6543, 491, 11, 26, "Message",ExpressionUUID->"04315fdc-d260-4503-9001-b6e46b42a0b7"], +Cell[248467, 6556, 26624, 482, 232, "Output",ExpressionUUID->"747e8716-78a7-4209-8445-6a30c13885cb"] }, Open ]], Cell[CellGroupData[{ -Cell[342773, 8468, 1616, 48, 132, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], -Cell[344392, 8518, 576, 12, 98, "Message",ExpressionUUID->"0a4bed5c-621d-a546-88e9-ce7d779c106a"], -Cell[344971, 8532, 582, 12, 98, "Message",ExpressionUUID->"80e3943d-459b-8b41-9869-50a6cf829ef8"], -Cell[345556, 8546, 584, 12, 118, "Message",ExpressionUUID->"36529169-7f05-ee43-8080-ce8fdd404b8d"], -Cell[346143, 8560, 458, 10, 32, "Message",ExpressionUUID->"a6c5f0ff-3356-4c42-b883-ce45e5cc4f41"], -Cell[346604, 8572, 170, 3, 41, "Output",ExpressionUUID->"546f133a-4a8e-8d44-937d-5fc3ea2401d8"] +Cell[275128, 7043, 2545, 71, 105, "Input",ExpressionUUID->"2d9f4f9c-fc8b-b74d-9e49-a8e133e7a081"], +Cell[277676, 7116, 9516, 222, 239, "Output",ExpressionUUID->"db8e8163-8f5c-444b-a880-eb8ccd5905d3"] }, Open ]], Cell[CellGroupData[{ -Cell[346811, 8580, 2247, 64, 348, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], -Cell[349061, 8646, 522, 11, 98, "Message",ExpressionUUID->"2e7d173d-070f-de49-a3c2-9964fb888ede"], -Cell[349586, 8659, 526, 11, 98, "Message",ExpressionUUID->"04b23985-5685-d344-a2ed-9886796baf32"], -Cell[350115, 8672, 528, 11, 98, "Message",ExpressionUUID->"ccdd27f2-bd64-f442-a708-cfb1052c7f86"], -Cell[350646, 8685, 458, 10, 32, "Message",ExpressionUUID->"384ce3fd-4914-6b49-b10c-84d885ed65d6"], -Cell[351107, 8697, 175, 3, 41, "Output",ExpressionUUID->"8865a4e5-7fd3-3c49-a115-94c8c5479389"] +Cell[287229, 7343, 228, 4, 29, "Input",ExpressionUUID->"6d3700e1-f504-214a-a332-f16397f0b922"], +Cell[287460, 7349, 33010, 614, 232, "Output",ExpressionUUID->"217e85df-51b8-484d-b9de-63d25edc80fb"] }, Open ]], Cell[CellGroupData[{ -Cell[351319, 8705, 2221, 64, 348, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], -Cell[353543, 8771, 522, 11, 98, "Message",ExpressionUUID->"958049e8-43e1-cc46-81fb-5b3fe1a5d9ee"], -Cell[354068, 8784, 524, 11, 98, "Message",ExpressionUUID->"6ed73f20-f975-a34c-a5a3-af58e9ecd7ed"], -Cell[354595, 8797, 528, 11, 98, "Message",ExpressionUUID->"4ce11323-2f48-da4f-84f8-593751381024"], -Cell[355126, 8810, 458, 10, 32, "Message",ExpressionUUID->"330905cd-5b42-604b-aaf8-fbac43108165"], -Cell[355587, 8822, 170, 3, 41, "Output",ExpressionUUID->"020ade62-ec43-7549-8079-7ac012e004c4"] +Cell[320507, 7968, 236, 6, 47, "Input",ExpressionUUID->"9051a5e3-bb9f-d941-bcca-598d0b6835be"], +Cell[320746, 7976, 188, 2, 33, "Output",ExpressionUUID->"78f323c2-5475-444b-9e52-9522cc95d758"] }, Open ]], Cell[CellGroupData[{ -Cell[355794, 8830, 2221, 64, 348, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], -Cell[358018, 8896, 524, 11, 98, "Message",ExpressionUUID->"9a8eff2d-0d97-2e45-a2f3-ce0634115f7d"], -Cell[358545, 8909, 526, 11, 98, "Message",ExpressionUUID->"7dd7e17e-c74e-7145-b6ae-77a0f02c67f1"], -Cell[359074, 8922, 530, 11, 98, "Message",ExpressionUUID->"311ddb21-a730-0b41-b633-2d3bac87be85"], -Cell[359607, 8935, 458, 10, 32, "Message",ExpressionUUID->"ecdc16e1-316d-b342-a60b-0f3075607709"], -Cell[360068, 8947, 171, 3, 41, "Output",ExpressionUUID->"a7fc6f95-4067-504b-8754-5086d2659934"] +Cell[320971, 7983, 1835, 52, 99, "Input",ExpressionUUID->"65a995ff-ff3d-634e-9bad-4a8a16073236"], +Cell[322809, 8037, 543, 12, 38, "Message",ExpressionUUID->"b90ab0b4-e55a-4887-ac15-e79cd764ef4f"], +Cell[323355, 8051, 546, 12, 38, "Message",ExpressionUUID->"d895aead-d991-4b76-b6a0-d0a37db477d3"], +Cell[323904, 8065, 549, 12, 38, "Message",ExpressionUUID->"4e90beaf-8826-4552-acbe-bf9e24643629"], +Cell[324456, 8079, 490, 11, 26, "Message",ExpressionUUID->"da8cf610-ca1c-42ea-8d1a-36c0dec1dae5"], +Cell[324949, 8092, 30164, 542, 232, "Output",ExpressionUUID->"6ad1df3c-6c3a-4dd0-9af4-7242e31b0cf8"] }, Open ]], Cell[CellGroupData[{ -Cell[360276, 8955, 215, 6, 60, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], -Cell[360494, 8963, 175, 3, 41, "Output",ExpressionUUID->"96bb6c6a-f128-024e-85ce-f8a6083a68c6"] +Cell[355150, 8639, 1612, 47, 71, "Input",ExpressionUUID->"86381d88-1537-a242-9cff-0b432b61d63d"], +Cell[356765, 8688, 723, 15, 45, "Message",ExpressionUUID->"0dd122dc-3d7e-44c8-a637-0dd5e9669708"], +Cell[357491, 8705, 724, 15, 45, "Message",ExpressionUUID->"e15eec4e-7dd9-420f-8b50-c4d6918c8296"], +Cell[358218, 8722, 723, 15, 45, "Message",ExpressionUUID->"0fb44e68-c36b-49d7-8cf1-2d4b2a0b0271"], +Cell[358944, 8739, 493, 11, 26, "Message",ExpressionUUID->"19f8d85c-19e8-483a-bf0f-4161504bd269"], +Cell[359440, 8752, 188, 2, 33, "Output",ExpressionUUID->"7f3843c1-47c0-4606-ab74-c5e8eb2e023c"] }, Open ]], -Cell[360684, 8969, 245, 5, 36, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ -Cell[360954, 8978, 623, 20, 66, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], -Cell[361580, 9000, 172, 3, 41, "Output",ExpressionUUID->"fecac54e-ac70-c448-b60d-60e5d8aa9072"] +Cell[359665, 8759, 2266, 63, 64, "Input",ExpressionUUID->"6f0ad284-4db3-da47-b8dc-45830eedfe9c"], +Cell[361934, 8824, 607, 13, 27, "Message",ExpressionUUID->"a8c40b13-b56c-43d5-b863-d5e98e12370d"], +Cell[362544, 8839, 611, 13, 27, "Message",ExpressionUUID->"7a543109-1aa2-4101-91ba-a8b5960854f4"], +Cell[363158, 8854, 614, 13, 27, "Message",ExpressionUUID->"15c8cc39-f277-4763-ab68-2d33bca9c5ad"], +Cell[363775, 8869, 491, 11, 26, "Message",ExpressionUUID->"46e47fbc-fe92-4ed1-84c0-355da35d1855"], +Cell[364269, 8882, 191, 2, 33, "Output",ExpressionUUID->"b0f4339b-1701-4d58-91f2-bf6b56961500"] }, Open ]], Cell[CellGroupData[{ -Cell[361789, 9008, 170, 5, 71, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], -Cell[361962, 9015, 172, 3, 41, "Output",ExpressionUUID->"31e41e93-aaef-1b4f-a5e6-3cad86684dfc"] +Cell[364497, 8889, 2233, 63, 64, "Input",ExpressionUUID->"b2dda819-6f34-5c49-bc62-303d815946e5"], +Cell[366733, 8954, 607, 13, 27, "Message",ExpressionUUID->"f416d52a-203e-476c-afc1-1aefb6a82744"], +Cell[367343, 8969, 611, 13, 27, "Message",ExpressionUUID->"0b7f02ae-bfad-49d1-a406-06eb546e5b6b"], +Cell[367957, 8984, 614, 13, 27, "Message",ExpressionUUID->"e21f4868-c10c-45f8-9ebe-126a5fa0f9a6"], +Cell[368574, 8999, 495, 11, 26, "Message",ExpressionUUID->"4b57ea90-4d3f-494e-ac7f-7dff787bcea8"], +Cell[369072, 9012, 193, 3, 33, "Output",ExpressionUUID->"7da7022f-5ded-4f22-9c8a-4e5eef4fb072"] }, Open ]], Cell[CellGroupData[{ -Cell[362171, 9023, 181, 5, 55, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], -Cell[362355, 9030, 172, 3, 41, "Output",ExpressionUUID->"d20f2acf-afe0-0844-b0cd-0cdce2394573"] +Cell[369302, 9020, 2233, 63, 64, "Input",ExpressionUUID->"76a9e77d-1f4c-bb4a-bb13-1a175f609f7d"], +Cell[371538, 9085, 609, 13, 27, "Message",ExpressionUUID->"ae0047a8-4725-4f62-b24c-179a1ea17285"], +Cell[372150, 9100, 613, 13, 27, "Message",ExpressionUUID->"f4a9c1af-8ba1-4cb5-a831-7be201e22842"], +Cell[372766, 9115, 616, 13, 27, "Message",ExpressionUUID->"691da633-304c-418d-b531-4f99dd506652"], +Cell[373385, 9130, 495, 11, 26, "Message",ExpressionUUID->"4db98ed0-de7c-4967-afd8-6de1498c3e4e"], +Cell[373883, 9143, 192, 3, 33, "Output",ExpressionUUID->"b9ab7f84-2d3c-4e24-bddc-6223104e91f2"] }, Open ]], Cell[CellGroupData[{ -Cell[362564, 9038, 6055, 185, 831, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], -Cell[368622, 9225, 174, 3, 41, "Output",ExpressionUUID->"ec544098-6efd-4845-b84f-33e39ead67c9"] +Cell[374112, 9151, 238, 6, 46, "Input",ExpressionUUID->"69dd09d9-152e-3e4d-9517-4de4791db2f4"], +Cell[374353, 9159, 196, 3, 33, "Output",ExpressionUUID->"23700193-a040-4f3f-9b7a-7905f3d46cc0"] }, Open ]], +Cell[374564, 9165, 271, 6, 29, "Input",ExpressionUUID->"6ecc7e8c-a7c5-354e-b168-749729cd7104"], Cell[CellGroupData[{ -Cell[368833, 9233, 368, 9, 53, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], -Cell[369204, 9244, 173, 3, 41, "Output",ExpressionUUID->"85f4fe6d-1167-7a40-b761-0a55e5251875"] +Cell[374860, 9175, 623, 20, 51, "Input",ExpressionUUID->"00610596-56e0-594e-b937-45ba84f4314c"], +Cell[375486, 9197, 194, 3, 33, "Output",ExpressionUUID->"4ed041b0-8cef-4a27-89ec-68be768d1dff"] }, Open ]], Cell[CellGroupData[{ -Cell[369414, 9252, 6122, 187, 900, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], -Cell[375539, 9441, 175, 3, 41, "Output",ExpressionUUID->"53db8250-199b-594a-8ebd-fc9cc43217e3"] +Cell[375717, 9205, 170, 5, 55, "Input",ExpressionUUID->"80807e8a-63b3-1643-8686-477edee068f5"], +Cell[375890, 9212, 194, 3, 33, "Output",ExpressionUUID->"5e4a6de7-c0a5-4f3d-939b-d1cd14b85ae5"] }, Open ]], Cell[CellGroupData[{ -Cell[375751, 9449, 368, 9, 53, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], -Cell[376122, 9460, 170, 3, 41, "Output",ExpressionUUID->"0013bb3e-54d0-e343-9869-cf63da2eecbd"] +Cell[376121, 9220, 181, 5, 43, "Input",ExpressionUUID->"e12cfe3a-1a80-7c46-b652-b33c70f4712b"], +Cell[376305, 9227, 195, 3, 33, "Output",ExpressionUUID->"2b47b334-eacb-416a-9535-90948a73478a"] }, Open ]], Cell[CellGroupData[{ -Cell[376329, 9468, 2663, 88, 435, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], -Cell[378995, 9558, 173, 3, 41, "Output",ExpressionUUID->"96d8705a-f744-d447-bad0-55fe1d703f38"] +Cell[376537, 9235, 6055, 185, 183, "Input",ExpressionUUID->"a58543a2-e013-da4f-b49d-4bc1fd782c5d"], +Cell[382595, 9422, 197, 3, 33, "Output",ExpressionUUID->"5e1d48c4-a66c-4b1a-b2d1-a42e4f6a73a0"] }, Open ]], Cell[CellGroupData[{ -Cell[379205, 9566, 2603, 85, 435, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], -Cell[381811, 9653, 172, 3, 41, "Output",ExpressionUUID->"bad41b21-8b15-a74b-a641-622c6584a958"] +Cell[382829, 9430, 368, 9, 41, "Input",ExpressionUUID->"11aa7f22-15dc-394f-8119-3706466553f3"], +Cell[383200, 9441, 196, 3, 33, "Output",ExpressionUUID->"07e37f5e-42fd-4e15-8f03-6854b858d636"] }, Open ]], Cell[CellGroupData[{ -Cell[382020, 9661, 3712, 118, 575, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], -Cell[385735, 9781, 174, 3, 41, "Output",ExpressionUUID->"a42f993d-5633-3546-ae09-6931972f9312"] +Cell[383433, 9449, 6122, 187, 183, "Input",ExpressionUUID->"be01a209-5a51-bb44-a959-dbe1c172fe42"], +Cell[389558, 9638, 196, 3, 33, "Output",ExpressionUUID->"c6cd5781-4d6a-4846-829c-ca0b4d191d04"] }, Open ]], Cell[CellGroupData[{ -Cell[385946, 9789, 2052, 59, 276, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], -Cell[388001, 9850, 574, 12, 98, "Message",ExpressionUUID->"91f9ae14-8766-3848-9c79-ec46ad6af7ea"], -Cell[388578, 9864, 580, 12, 98, "Message",ExpressionUUID->"2440fadc-b12b-424f-a600-97a0a8c9f031"], -Cell[389161, 9878, 582, 12, 98, "Message",ExpressionUUID->"d4d1d26f-ac2b-a949-95b4-8d60af02cc4b"], -Cell[389746, 9892, 456, 10, 32, "Message",ExpressionUUID->"0cb59396-7a19-6b43-af2b-0a0ce0427b94"], -Cell[390205, 9904, 171, 3, 41, "Output",ExpressionUUID->"3ceb430a-d440-e040-b6a8-a18a3884b326"] +Cell[389791, 9646, 368, 9, 41, "Input",ExpressionUUID->"80039b80-2557-414c-8242-b722596e9d96"], +Cell[390162, 9657, 193, 3, 33, "Output",ExpressionUUID->"dc820495-cf82-47e3-9b38-ac079599691e"] }, Open ]], Cell[CellGroupData[{ -Cell[390413, 9912, 2054, 59, 276, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], -Cell[392470, 9973, 574, 12, 98, "Message",ExpressionUUID->"ccb81c35-09e9-854b-9187-d46e8624546d"], -Cell[393047, 9987, 578, 12, 98, "Message",ExpressionUUID->"6dff6307-9a24-c74d-90d8-2f18b14858dc"], -Cell[393628, 10001, 582, 12, 98, "Message",ExpressionUUID->"11045565-b757-154a-b614-eb73b2dcbc5f"], -Cell[394213, 10015, 458, 10, 32, "Message",ExpressionUUID->"af9dd0c6-d446-9940-b908-9b52fbb611cb"], -Cell[394674, 10027, 169, 3, 41, "Output",ExpressionUUID->"d39c46b4-75c6-f741-b7fd-1a1fdbe4155f"] +Cell[390392, 9665, 2663, 88, 107, "Input",ExpressionUUID->"b340c733-2100-9c4f-86ba-d9dc18c9dfa6"], +Cell[393058, 9755, 197, 3, 33, "Output",ExpressionUUID->"55dd94e7-d01d-409d-b0b4-81ae8d35b92c"] }, Open ]], Cell[CellGroupData[{ -Cell[394880, 10035, 2030, 55, 232, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], -Cell[396913, 10092, 20326, 381, 299, "Output",ExpressionUUID->"5f98f6f4-700b-0a4b-af1c-32125fed3e6a"] +Cell[393292, 9763, 2603, 85, 107, "Input",ExpressionUUID->"dbf44a5f-8dbc-3049-99ca-3aff4a181e3f"], +Cell[395898, 9850, 193, 3, 33, "Output",ExpressionUUID->"da38ab10-b92a-40ef-8333-227ddb3d5e8c"] }, Open ]], -Cell[417254, 10476, 2144, 61, 311, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], -Cell[419401, 10539, 138, 3, 36, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], Cell[CellGroupData[{ -Cell[419564, 10546, 1616, 48, 132, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], -Cell[421183, 10596, 592, 12, 118, "Message",ExpressionUUID->"318da404-8df4-c540-9269-2b249c7e148e"], -Cell[421778, 10610, 597, 12, 118, "Message",ExpressionUUID->"42939765-c33b-c147-a25b-bfa31c71a3cb"], -Cell[422378, 10624, 599, 12, 118, "Message",ExpressionUUID->"63b912c5-afab-654e-9609-c4b849e9abfe"], -Cell[422980, 10638, 458, 10, 32, "Message",ExpressionUUID->"2c8999d2-d9b5-ef4e-a59d-c314a02b2b2a"], -Cell[423441, 10650, 172, 3, 41, "Output",ExpressionUUID->"52013fca-4692-bf47-a0cf-880d71f10fc1"] +Cell[396128, 9858, 3712, 118, 160, "Input",ExpressionUUID->"b393ebfa-9cda-f24a-8039-95e547cb8787"], +Cell[399843, 9978, 196, 3, 33, "Output",ExpressionUUID->"edf253c3-478a-46db-ad76-79b31b26edf8"] }, Open ]], Cell[CellGroupData[{ -Cell[423650, 10658, 2249, 64, 348, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], -Cell[425902, 10724, 576, 12, 98, "Message",ExpressionUUID->"285f997a-25b4-f647-9523-e0dd05446bae"], -Cell[426481, 10738, 580, 12, 98, "Message",ExpressionUUID->"b1d2a50d-b27b-ca46-afcb-af9e8d59323e"], -Cell[427064, 10752, 582, 12, 98, "Message",ExpressionUUID->"a36c085c-b95e-724c-a04e-30924ab7ac52"], -Cell[427649, 10766, 456, 10, 32, "Message",ExpressionUUID->"976edb68-80f3-5a4d-a255-2f217ec84bfa"], -Cell[428108, 10778, 171, 3, 41, "Output",ExpressionUUID->"b7107287-e519-1249-9ef0-b745347bdb78"] +Cell[400076, 9986, 2075, 59, 99, "Input",ExpressionUUID->"d6aa822f-4140-174a-8e29-c889dba5c0d8"], +Cell[402154, 10047, 605, 13, 27, "Message",ExpressionUUID->"3b850511-cf9a-465e-8c46-b731b913ddbc"], +Cell[402762, 10062, 610, 13, 27, "Message",ExpressionUUID->"976f3a32-06eb-4f35-b38d-4a3f939ec161"], +Cell[403375, 10077, 610, 13, 27, "Message",ExpressionUUID->"80e9340c-b321-4c13-903d-0729957eb210"], +Cell[403988, 10092, 493, 11, 26, "Message",ExpressionUUID->"bfda629c-f868-4302-83a1-b5142c156d48"], +Cell[404484, 10105, 191, 3, 33, "Output",ExpressionUUID->"9652cce2-0b2b-46ba-8d3c-d4f91fb09fc2"] }, Open ]], Cell[CellGroupData[{ -Cell[428316, 10786, 2223, 64, 348, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], -Cell[430542, 10852, 574, 12, 98, "Message",ExpressionUUID->"2877ed71-3ee8-8044-94b0-c606083c07b7"], -Cell[431119, 10866, 578, 12, 98, "Message",ExpressionUUID->"34cfc5a5-16b6-f24f-acdf-b4e2d29b1bef"], -Cell[431700, 10880, 580, 12, 98, "Message",ExpressionUUID->"7fe7bdbe-3892-5043-b38d-13721c83d41a"], -Cell[432283, 10894, 458, 10, 32, "Message",ExpressionUUID->"93dfb0cd-55fb-1b4a-b671-37d180b9d444"], -Cell[432744, 10906, 173, 3, 41, "Output",ExpressionUUID->"372279b5-5e4a-b545-a159-384b26aa5ab4"] +Cell[404712, 10113, 2077, 59, 99, "Input",ExpressionUUID->"46f3f057-22eb-c143-af7a-23ddab00799c"], +Cell[406792, 10174, 607, 13, 27, "Message",ExpressionUUID->"64a146a2-f6e9-4113-82f3-459790a4f78b"], +Cell[407402, 10189, 608, 13, 27, "Message",ExpressionUUID->"cc3b1145-17a4-4a16-897a-7e18b8b4cec1"], +Cell[408013, 10204, 612, 13, 27, "Message",ExpressionUUID->"5e8af567-790b-4393-a8a0-86057f7cd67a"], +Cell[408628, 10219, 493, 11, 26, "Message",ExpressionUUID->"7b17ebb7-1565-4cc8-b2fb-a107de9153bb"], +Cell[409124, 10232, 192, 3, 33, "Output",ExpressionUUID->"919c255a-1ce4-4e2e-860c-2a113614bf02"] }, Open ]], Cell[CellGroupData[{ -Cell[432954, 10914, 2221, 64, 348, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], -Cell[435178, 10980, 574, 12, 98, "Message",ExpressionUUID->"c14c35e1-e487-c742-a0da-128fdb9754d4"], -Cell[435755, 10994, 578, 12, 98, "Message",ExpressionUUID->"4396ed61-4d7e-6144-80f0-6d5649cfcb04"], -Cell[436336, 11008, 582, 12, 98, "Message",ExpressionUUID->"00fa2dcd-bc0b-9e44-9f00-15116f344aca"], -Cell[436921, 11022, 455, 10, 32, "Message",ExpressionUUID->"78b12bf1-7793-9341-ad5f-c7be406b8be6"], -Cell[437379, 11034, 170, 3, 41, "Output",ExpressionUUID->"9454fa52-ff74-094b-8081-2fc86cf96043"] +Cell[409353, 10240, 2053, 55, 53, "Input",ExpressionUUID->"0137ed47-cd78-284a-910a-31d165f1571c"], +Cell[411409, 10297, 20383, 383, 236, "Output",ExpressionUUID->"058cab14-26dc-41c2-a652-c7888b113ecf"] }, Open ]], Cell[CellGroupData[{ -Cell[437586, 11042, 215, 6, 60, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], -Cell[437804, 11050, 174, 3, 41, "Output",ExpressionUUID->"175eda7e-c091-3e4f-86ac-3148f0a9e904"] +Cell[431829, 10685, 2166, 61, 99, "Input",ExpressionUUID->"00a32bc3-df79-9e43-8f20-d4884962c12d"], +Cell[433998, 10748, 521, 12, 38, "Message",ExpressionUUID->"22dca5f7-86e3-4016-aa10-addace3841d2"], +Cell[434522, 10762, 521, 12, 38, "Message",ExpressionUUID->"0fbfeb2f-b452-4de0-acc1-6ec1c139d379"], +Cell[435046, 10776, 524, 12, 38, "Message",ExpressionUUID->"b27bea86-edcf-48e4-811a-6911aaf0e384"], +Cell[435573, 10790, 471, 11, 26, "Message",ExpressionUUID->"f4b6bf6e-95d3-4daf-b3bf-b4a9d20531d6"], +Cell[436047, 10803, 28621, 516, 232, "Output",ExpressionUUID->"a6ee786c-d135-4464-a747-1715a3fc6bf4"] }, Open ]], -Cell[437993, 11056, 249, 5, 36, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ -Cell[438267, 11065, 558, 19, 66, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], -Cell[438828, 11086, 169, 3, 41, "Output",ExpressionUUID->"e757c22c-d836-6c4a-a9f7-93553c4bb232"] +Cell[464705, 11324, 164, 4, 29, "Input",ExpressionUUID->"344da507-9044-ef47-aa8c-99f282e3d6d3"], +Cell[464872, 11330, 35027, 648, 232, "Output",ExpressionUUID->"ea97d15b-34a5-421f-b6aa-2f7352de2932"] }, Open ]], Cell[CellGroupData[{ -Cell[439034, 11094, 170, 5, 71, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], -Cell[439207, 11101, 173, 3, 41, "Output",ExpressionUUID->"7f3ee547-87eb-d74d-8f21-a8d42f1dde52"] +Cell[499936, 11983, 1616, 48, 71, "Input",ExpressionUUID->"f13d1bd8-d153-ae43-b041-68b993e77854"], +Cell[501555, 12033, 728, 15, 45, "Message",ExpressionUUID->"1bb3b392-2ce8-45af-97d5-a24921da6a79"], +Cell[502286, 12050, 725, 15, 45, "Message",ExpressionUUID->"ceb9dbb7-290a-4e8c-b7ce-a06a7fc64cb5"], +Cell[503014, 12067, 725, 15, 45, "Message",ExpressionUUID->"dfa168cb-d7dd-4579-b146-67057eddfe94"], +Cell[503742, 12084, 493, 11, 26, "Message",ExpressionUUID->"50038b18-2660-4621-ab67-edd64a8f8d2d"], +Cell[504238, 12097, 194, 3, 33, "Output",ExpressionUUID->"b94e01fd-23d4-4e2d-aea0-b232b2f867a0"] }, Open ]], Cell[CellGroupData[{ -Cell[439417, 11109, 181, 5, 55, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], -Cell[439601, 11116, 173, 3, 41, "Output",ExpressionUUID->"0603b6e6-a8b7-1e45-9b15-2769b7fbc373"] +Cell[504469, 12105, 2272, 64, 64, "Input",ExpressionUUID->"53e25fab-b431-cc42-a467-e4dea0353ed0"], +Cell[506744, 12171, 607, 13, 27, "Message",ExpressionUUID->"586501ad-704d-40bb-a8f1-0645072ca79c"], +Cell[507354, 12186, 610, 13, 27, "Message",ExpressionUUID->"cdf66979-c226-4d08-95ab-47f0d890282a"], +Cell[507967, 12201, 612, 13, 27, "Message",ExpressionUUID->"4cd64d31-f2bb-4301-8515-b820c2da2847"], +Cell[508582, 12216, 495, 11, 26, "Message",ExpressionUUID->"171f61a3-b452-4f70-9a06-c3c2e5b0c937"], +Cell[509080, 12229, 193, 3, 33, "Output",ExpressionUUID->"ca17d862-6095-4eb3-947a-a9219a971f0a"] }, Open ]], Cell[CellGroupData[{ -Cell[439811, 11124, 6055, 185, 831, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], -Cell[445869, 11311, 174, 3, 41, "Output",ExpressionUUID->"8b7a346f-cdda-e24e-b924-d6cfb1b3119a"] +Cell[509310, 12237, 2235, 63, 64, "Input",ExpressionUUID->"b18c819e-620a-d449-97d6-547e3a6fa152"], +Cell[511548, 12302, 605, 13, 27, "Message",ExpressionUUID->"2ceb637f-bd4b-4a86-9d33-c9ad2eb47a37"], +Cell[512156, 12317, 608, 13, 27, "Message",ExpressionUUID->"de847e63-3822-450b-b3cc-639016dcc92b"], +Cell[512767, 12332, 610, 13, 27, "Message",ExpressionUUID->"850db5be-8e39-4954-ac06-0c6f91f0252b"], +Cell[513380, 12347, 492, 11, 26, "Message",ExpressionUUID->"65140845-767d-4216-968e-8d76acb8e086"], +Cell[513875, 12360, 195, 3, 33, "Output",ExpressionUUID->"1fcb7694-93bd-46c2-b62e-82d88e470531"] }, Open ]], Cell[CellGroupData[{ -Cell[446080, 11319, 368, 9, 53, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], -Cell[446451, 11330, 172, 3, 41, "Output",ExpressionUUID->"3354b35a-acef-b846-b770-8d2e77b8f68b"] +Cell[514107, 12368, 2233, 63, 64, "Input",ExpressionUUID->"22ab74c7-5916-9440-9d7d-c3e0f6ab8836"], +Cell[516343, 12433, 605, 13, 27, "Message",ExpressionUUID->"7873fd01-1eb4-498e-9371-64a39240ad0c"], +Cell[516951, 12448, 608, 13, 27, "Message",ExpressionUUID->"8c004ad2-550c-4796-81da-e5304b78c605"], +Cell[517562, 12463, 610, 13, 27, "Message",ExpressionUUID->"bb1a87f3-dea4-48b0-a400-3f9c20e127ce"], +Cell[518175, 12478, 495, 11, 26, "Message",ExpressionUUID->"7ccb5a69-85e2-46ea-ae1b-5e3ecbac6033"], +Cell[518673, 12491, 193, 3, 33, "Output",ExpressionUUID->"b6c59bcf-deb3-410b-b15b-a0a8fc56e63a"] }, Open ]], Cell[CellGroupData[{ -Cell[446660, 11338, 6122, 187, 900, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], -Cell[452785, 11527, 172, 3, 41, "Output",ExpressionUUID->"7b76721b-3d4c-c544-9113-83ba4f36ae7f"] +Cell[518903, 12499, 238, 6, 46, "Input",ExpressionUUID->"f9c66987-c237-7a40-a006-e20e260dbdcb"], +Cell[519144, 12507, 195, 3, 33, "Output",ExpressionUUID->"8577a7be-c0c3-400e-aff7-b94c8cf81af0"] }, Open ]], +Cell[519354, 12513, 275, 6, 29, "Input",ExpressionUUID->"770a9ed7-7938-9e48-be64-c31719ef3a6b"], Cell[CellGroupData[{ -Cell[452994, 11535, 368, 9, 53, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], -Cell[453365, 11546, 170, 3, 41, "Output",ExpressionUUID->"e9346704-c478-364d-b5eb-0aabe0e2e350"] +Cell[519654, 12523, 558, 19, 51, "Input",ExpressionUUID->"a401ff2f-0c49-174e-9005-1c04f93e9e0d"], +Cell[520215, 12544, 192, 3, 33, "Output",ExpressionUUID->"8926b0e6-5b7d-4ab9-a992-ef2e3fd6ecc1"] }, Open ]], Cell[CellGroupData[{ -Cell[453572, 11554, 2663, 88, 435, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], -Cell[456238, 11644, 173, 3, 41, "Output",ExpressionUUID->"33b7f444-6995-e54b-a2a6-ad09016b1850"] +Cell[520444, 12552, 170, 5, 55, "Input",ExpressionUUID->"f96fdb9e-e8d1-c74d-a973-e9d03a063710"], +Cell[520617, 12559, 194, 3, 33, "Output",ExpressionUUID->"83952a92-b1ac-49cf-a985-4db1d997fb4f"] }, Open ]], Cell[CellGroupData[{ -Cell[456448, 11652, 2603, 85, 435, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], -Cell[459054, 11739, 172, 3, 41, "Output",ExpressionUUID->"76ba8e46-11c7-f54d-bfb2-cca1b455c838"] +Cell[520848, 12567, 181, 5, 43, "Input",ExpressionUUID->"199c667f-be6b-fd40-bac5-bf87b109f4eb"], +Cell[521032, 12574, 196, 3, 33, "Output",ExpressionUUID->"dfa72d4d-9b94-4d54-8247-e643cea1c00e"] }, Open ]], Cell[CellGroupData[{ -Cell[459263, 11747, 3712, 118, 575, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], -Cell[462978, 11867, 172, 3, 41, "Output",ExpressionUUID->"f7c29774-2634-5546-ab63-4d3ac6889f79"] +Cell[521265, 12582, 6055, 185, 183, "Input",ExpressionUUID->"8666e95e-b2e9-2e4d-af31-7c0466f6da3f"], +Cell[527323, 12769, 197, 3, 33, "Output",ExpressionUUID->"f13dddba-d272-4bce-95c9-4a7649e6cd96"] }, Open ]], Cell[CellGroupData[{ -Cell[463187, 11875, 2052, 59, 276, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], -Cell[465242, 11936, 573, 12, 98, "Message",ExpressionUUID->"3d5a1265-fb27-0b41-a549-5e326650d270"], -Cell[465818, 11950, 573, 12, 98, "Message",ExpressionUUID->"0726d23e-32d7-7a41-8d7f-0b62fec75437"], -Cell[466394, 11964, 579, 12, 98, "Message",ExpressionUUID->"b47482ef-bec0-234f-aeb7-9009a378a36d"], -Cell[466976, 11978, 458, 10, 32, "Message",ExpressionUUID->"e5e35e3a-0e40-c249-b6f3-c2a6a5a48740"], -Cell[467437, 11990, 170, 3, 41, "Output",ExpressionUUID->"b33776d0-2a41-694b-9af8-c4d483383e7c"] +Cell[527557, 12777, 368, 9, 41, "Input",ExpressionUUID->"3f821f99-4c61-8244-9f39-b02a8247a19c"], +Cell[527928, 12788, 193, 3, 33, "Output",ExpressionUUID->"7624ce55-79a0-4d06-97a8-7ec0589a8bdd"] }, Open ]], Cell[CellGroupData[{ -Cell[467644, 11998, 2052, 59, 276, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], -Cell[469699, 12059, 573, 12, 98, "Message",ExpressionUUID->"ffb6a3c0-c488-cd48-870e-d66051362026"], -Cell[470275, 12073, 575, 12, 98, "Message",ExpressionUUID->"ca3fb11a-47f9-c542-a5c9-6e0087e110b9"], -Cell[470853, 12087, 579, 12, 98, "Message",ExpressionUUID->"7e4a0639-38a1-f74e-ab8e-5264cad2d48c"], -Cell[471435, 12101, 458, 10, 32, "Message",ExpressionUUID->"101eaea3-75b1-d942-9914-a0fe8a6e2f65"], -Cell[471896, 12113, 169, 3, 41, "Output",ExpressionUUID->"921a9c76-dcb9-484a-bc19-88ddead9467a"] +Cell[528158, 12796, 6122, 187, 183, "Input",ExpressionUUID->"95ae37d9-e738-da42-9bae-a0a492fc5380"], +Cell[534283, 12985, 195, 3, 33, "Output",ExpressionUUID->"ca63868e-8c07-4215-a126-619949ea884d"] }, Open ]], Cell[CellGroupData[{ -Cell[472102, 12121, 2028, 55, 232, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], -Cell[474133, 12178, 20296, 381, 295, "Output",ExpressionUUID->"09d149ec-0259-a345-a282-743f783e7913"] +Cell[534515, 12993, 368, 9, 41, "Input",ExpressionUUID->"41f5782d-0fa9-2547-95fe-d8b549105a42"], +Cell[534886, 13004, 192, 3, 33, "Output",ExpressionUUID->"d6a45fd3-8b84-469b-bd64-aae335da121f"] }, Open ]], Cell[CellGroupData[{ -Cell[494466, 12564, 2146, 61, 311, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], -Cell[496615, 12627, 500, 11, 71, "Message",ExpressionUUID->"526ffad5-83ae-c149-9912-e494135b3fca"], -Cell[497118, 12640, 505, 11, 71, "Message",ExpressionUUID->"1adb1680-bdf2-4144-bcc9-7270c61e97b7"], -Cell[497626, 12653, 509, 11, 71, "Message",ExpressionUUID->"9e5d82d5-642b-cb46-8232-be5a5ca7050d"], -Cell[498138, 12666, 458, 10, 32, "Message",ExpressionUUID->"ef931413-f964-5b45-a755-76cab1ab5309"], -Cell[498599, 12678, 39609, 697, 290, "Output",ExpressionUUID->"23497d29-f516-664b-9ee0-ea8f6d88359c"] +Cell[535115, 13012, 2663, 88, 107, "Input",ExpressionUUID->"d97cbadb-6f95-5a47-9617-8d40bcea10e8"], +Cell[537781, 13102, 197, 3, 33, "Output",ExpressionUUID->"618a6c56-67cb-467a-b6f7-81da154ef532"] }, Open ]], -Cell[538223, 13378, 209, 5, 36, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], Cell[CellGroupData[{ -Cell[538457, 13387, 1616, 48, 132, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], -Cell[540076, 13437, 589, 12, 118, "Message",ExpressionUUID->"100796fd-6fde-3c41-9088-c2d3ae2f8aeb"], -Cell[540668, 13451, 595, 12, 118, "Message",ExpressionUUID->"c91e75b4-9e2b-1e49-a5d5-453d5f87b5e3"], -Cell[541266, 13465, 596, 12, 118, "Message",ExpressionUUID->"5d8ad6a4-5b83-df49-8c4d-081081895528"], -Cell[541865, 13479, 458, 10, 32, "Message",ExpressionUUID->"26eed7af-5e0a-e840-9956-caca06166010"], -Cell[542326, 13491, 171, 3, 41, "Output",ExpressionUUID->"e4e35b92-e786-3044-bf1d-9c587b1357a2"] +Cell[538015, 13110, 2603, 85, 107, "Input",ExpressionUUID->"af5cf9f8-9590-ff48-8848-9396d3323464"], +Cell[540621, 13197, 193, 3, 33, "Output",ExpressionUUID->"cd84ef92-12b5-4d27-935e-e412e0da23d9"] }, Open ]], Cell[CellGroupData[{ -Cell[542534, 13499, 2249, 64, 348, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], -Cell[544786, 13565, 573, 12, 98, "Message",ExpressionUUID->"6b65fc2b-3e1d-714d-aeb9-43978836a621"], -Cell[545362, 13579, 573, 12, 98, "Message",ExpressionUUID->"c4736a05-b0e1-5e49-b581-f3ce4c83fe21"], -Cell[545938, 13593, 579, 12, 98, "Message",ExpressionUUID->"ae8eb83c-0205-8046-8445-e249896b7ee5"], -Cell[546520, 13607, 458, 10, 32, "Message",ExpressionUUID->"5072d590-62c3-7a47-ae1b-6dd617a0b9dc"], -Cell[546981, 13619, 174, 3, 41, "Output",ExpressionUUID->"8dd7e1f9-bbea-d84b-ad0e-8922158aee9e"] +Cell[540851, 13205, 3712, 118, 160, "Input",ExpressionUUID->"bf95ea83-581e-f54f-a48e-b93e8f63083a"], +Cell[544566, 13325, 194, 3, 33, "Output",ExpressionUUID->"35ad9d36-8707-49b2-a45d-f537fef8f7e4"] }, Open ]], Cell[CellGroupData[{ -Cell[547192, 13627, 2221, 64, 348, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], -Cell[549416, 13693, 573, 12, 98, "Message",ExpressionUUID->"7ab877ea-0e4b-f948-97c2-7ebafb7901b1"], -Cell[549992, 13707, 575, 12, 98, "Message",ExpressionUUID->"a87a57c5-24bc-dc4a-888a-b3c0095c10c4"], -Cell[550570, 13721, 577, 12, 98, "Message",ExpressionUUID->"d8af7fb1-1d43-664e-ae2d-698eaa818746"], -Cell[551150, 13735, 456, 10, 32, "Message",ExpressionUUID->"7abec434-52e8-c64c-ac86-90da0b27b8aa"], -Cell[551609, 13747, 172, 3, 41, "Output",ExpressionUUID->"164a4c34-f121-a445-b434-e34aa59666ab"] +Cell[544797, 13333, 2075, 59, 99, "Input",ExpressionUUID->"55d51961-97f2-ed4d-8bf8-8a461d652ab4"], +Cell[546875, 13394, 609, 13, 27, "Message",ExpressionUUID->"184cc03a-fb2e-4947-a48c-695eba710790"], +Cell[547487, 13409, 615, 13, 27, "Message",ExpressionUUID->"4f5a5ab6-047d-453e-ba48-000d0d3617b3"], +Cell[548105, 13424, 617, 13, 27, "Message",ExpressionUUID->"2f0dcf74-9ee1-421d-a732-56af57201418"], +Cell[548725, 13439, 495, 11, 26, "Message",ExpressionUUID->"5098c9a9-4b43-4fda-bea1-9f309aa03aaf"], +Cell[549223, 13452, 191, 3, 33, "Output",ExpressionUUID->"87b44269-7914-4640-a744-5fb6193518e1"] }, Open ]], Cell[CellGroupData[{ -Cell[551818, 13755, 2219, 64, 348, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], -Cell[554040, 13821, 571, 12, 98, "Message",ExpressionUUID->"92295db4-13f0-284e-8173-df7f8dd20dcf"], -Cell[554614, 13835, 573, 12, 98, "Message",ExpressionUUID->"c6280e41-1347-0f47-81a9-bcd3687b7b73"], -Cell[555190, 13849, 579, 12, 98, "Message",ExpressionUUID->"2aa0f4b1-01ca-4644-884e-b759d4a75412"], -Cell[555772, 13863, 458, 10, 32, "Message",ExpressionUUID->"ab3c3bff-179e-9f4e-b56a-87d1b4f6fc04"], -Cell[556233, 13875, 172, 3, 41, "Output",ExpressionUUID->"f5b8154f-e61e-6a4e-b068-b6c1916773ef"] +Cell[549451, 13460, 2075, 59, 99, "Input",ExpressionUUID->"9704b9d3-b449-2144-9970-6a7de047241d"], +Cell[551529, 13521, 608, 13, 27, "Message",ExpressionUUID->"52f10f9e-aa29-4456-9590-1bbffc6faa17"], +Cell[552140, 13536, 613, 13, 27, "Message",ExpressionUUID->"943bbf9e-2fd2-4a27-bf8d-d0ead4939fb4"], +Cell[552756, 13551, 617, 13, 27, "Message",ExpressionUUID->"1b7d37c9-11e0-4760-bc54-0f09a6603b67"], +Cell[553376, 13566, 495, 11, 26, "Message",ExpressionUUID->"fffc0238-9e86-4d6d-b491-67a92cda2b3e"], +Cell[553874, 13579, 194, 3, 33, "Output",ExpressionUUID->"f8e560dc-85f6-4875-9e86-a4c8ab5514bd"] }, Open ]], Cell[CellGroupData[{ -Cell[556442, 13883, 211, 6, 60, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], -Cell[556656, 13891, 174, 3, 41, "Output",ExpressionUUID->"14434839-d5cf-b844-b849-b3b3102df434"] +Cell[554105, 13587, 2051, 55, 53, "Input",ExpressionUUID->"0fd90636-7592-fc40-bf9d-ae1cb915c656"], +Cell[556159, 13644, 20458, 386, 236, "Output",ExpressionUUID->"93240c60-a868-46d2-961a-523700768120"] }, Open ]], -Cell[556845, 13897, 115, 1, 36, "Input",ExpressionUUID->"60c63353-4bae-43d1-a5cd-279e942e44ea"] +Cell[CellGroupData[{ +Cell[576654, 14035, 2168, 61, 99, "Input",ExpressionUUID->"90696e8b-5a2d-314c-8d58-ac84cb8f4d66"], +Cell[578825, 14098, 539, 12, 38, "Message",ExpressionUUID->"9876e5d1-c990-440d-9b49-828dd9fdeb24"], +Cell[579367, 14112, 544, 12, 38, "Message",ExpressionUUID->"2c724d41-7245-45d2-8886-bff4246c2338"], +Cell[579914, 14126, 546, 12, 38, "Message",ExpressionUUID->"f2b3c8b4-9072-4615-b145-b758ef6deafb"], +Cell[580463, 14140, 495, 11, 26, "Message",ExpressionUUID->"e8c42279-11b3-4ac5-8b86-76c0725e8d7e"], +Cell[580961, 14153, 26645, 486, 232, "Output",ExpressionUUID->"ca47d1df-ed9c-48a5-80a0-9e1eb864064a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[607643, 14644, 232, 5, 29, "Input",ExpressionUUID->"ea848967-083d-ea47-bce0-5c3b93725916"], +Cell[607878, 14651, 33029, 618, 232, "Output",ExpressionUUID->"81d1d258-b04d-4289-84bf-e6c9c7571581"] +}, Open ]], +Cell[CellGroupData[{ +Cell[640944, 15274, 1616, 48, 71, "Input",ExpressionUUID->"cee00bc1-3ccc-914d-8ba9-008ac67b1c9c"], +Cell[642563, 15324, 724, 15, 45, "Message",ExpressionUUID->"425885fd-0b72-4fde-9600-d699dfcda3df"], +Cell[643290, 15341, 727, 15, 45, "Message",ExpressionUUID->"b7b44169-ee0e-49d6-920a-22bfab9e9ca4"], +Cell[644020, 15358, 724, 15, 45, "Message",ExpressionUUID->"0fb48cf4-a37d-47a5-8a5e-cc908d0af506"], +Cell[644747, 15375, 494, 11, 26, "Message",ExpressionUUID->"efde1bac-8fca-4887-a7ad-1cf177fdb71b"], +Cell[645244, 15388, 196, 3, 33, "Output",ExpressionUUID->"5508a200-fda5-4000-933c-9e04ad15f7ce"] +}, Open ]], +Cell[CellGroupData[{ +Cell[645477, 15396, 2272, 64, 64, "Input",ExpressionUUID->"80bba3bc-d8f7-1c4b-9262-0895c02ffd8f"], +Cell[647752, 15462, 609, 13, 38, "Message",ExpressionUUID->"a047e245-e9a7-4b43-a4d7-4fb4a5b8aa0f"], +Cell[648364, 15477, 613, 13, 38, "Message",ExpressionUUID->"4fe7da3c-23ba-42cf-a4d9-6b79465dd573"], +Cell[648980, 15492, 617, 13, 38, "Message",ExpressionUUID->"a3a5df99-a476-4dcf-8ae8-ded7f5e27343"], +Cell[649600, 15507, 495, 11, 26, "Message",ExpressionUUID->"e2a082d9-d48f-4cd3-9d89-f9a9ea7627a8"], +Cell[650098, 15520, 195, 3, 33, "Output",ExpressionUUID->"aabce8d6-dee0-42d3-8a03-ab18d0e5fa6d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[650330, 15528, 2233, 63, 64, "Input",ExpressionUUID->"57976ffc-56f1-604b-8519-bead95265db8"], +Cell[652566, 15593, 609, 13, 38, "Message",ExpressionUUID->"67a4bc3d-01d0-4fa4-8910-98079c0d9eb3"], +Cell[653178, 15608, 613, 13, 38, "Message",ExpressionUUID->"bb181fd7-589e-40b9-819d-f97ca4a0c8d7"], +Cell[653794, 15623, 616, 13, 38, "Message",ExpressionUUID->"cf75c52c-ee96-4130-88bc-4102d997303f"], +Cell[654413, 15638, 495, 11, 26, "Message",ExpressionUUID->"0425cd19-5de3-4316-b2de-0d6bc3746f99"], +Cell[654911, 15651, 195, 3, 33, "Output",ExpressionUUID->"83976781-58f7-4a96-b648-62e6c85f4455"] +}, Open ]], +Cell[CellGroupData[{ +Cell[655143, 15659, 2231, 63, 64, "Input",ExpressionUUID->"cfa37210-3ae7-3f49-b290-f19508c6d2f1"], +Cell[657377, 15724, 609, 13, 38, "Message",ExpressionUUID->"876472a7-8390-44b0-bce1-a4e7158d9450"], +Cell[657989, 15739, 611, 13, 38, "Message",ExpressionUUID->"0c5939b1-73ac-438f-88e5-0688937ce555"], +Cell[658603, 15754, 615, 13, 38, "Message",ExpressionUUID->"736a5f93-1e8d-4985-a6e2-cd6fab741aca"], +Cell[659221, 15769, 493, 11, 26, "Message",ExpressionUUID->"68759dc9-25e0-4d44-96bd-7442a7311760"], +Cell[659717, 15782, 196, 3, 33, "Output",ExpressionUUID->"a7fe8473-5b42-4c83-9382-3ae94e36ad69"] +}, Open ]], +Cell[CellGroupData[{ +Cell[659950, 15790, 234, 6, 46, "Input",ExpressionUUID->"7457b456-6d32-5b44-9679-346c5f5ac532"], +Cell[660187, 15798, 195, 3, 33, "Output",ExpressionUUID->"b3042dd6-27cd-4567-a623-8a3f25f2819d"] +}, Open ]], +Cell[660397, 15804, 143, 3, 29, "Input",ExpressionUUID->"60c63353-4bae-43d1-a5cd-279e942e44ea"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw2.nb b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw2.nb index d33b6a1..0d46984 100644 --- a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw2.nb +++ b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_gid_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 435199, 13004] -NotebookOptionsPosition[ 396907, 12388] -NotebookOutlinePosition[ 397318, 12405] -CellTagsIndexPosition[ 397275, 12402] +NotebookDataLength[ 688645, 16312] +NotebookOptionsPosition[ 648099, 15663] +NotebookOutlinePosition[ 648533, 15681] +CellTagsIndexPosition[ 648490, 15678] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,15 +26,13 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.994074211664226*^9, 3.994074212605893*^9}, { 3.994074246621201*^9, 3.994074265935053*^9}}, - CellLabel-> - "In[304]:=",ExpressionUUID->"3943730d-9530-43b8-bf39-19784136256b"], + CellLabel->"In[1]:=",ExpressionUUID->"3943730d-9530-43b8-bf39-19784136256b"], Cell[BoxData["1.95`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.994074196804253*^9, 3.994074214075809*^9}, { - 3.9940742497364883`*^9, 3.9940742697527313`*^9}}, - CellLabel-> - "Out[304]=",ExpressionUUID->"499a6fc7-b1e5-48d6-b79b-db1dd4a5b79b"] + 3.9940742497364883`*^9, 3.9940742697527313`*^9}, 3.994386340491984*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"ab73da10-0365-4cc4-8a8f-43724816bc2e"] }, Open ]], Cell[CellGroupData[{ @@ -43,15 +41,13 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940740226123867`*^9, 3.994074030397141*^9}}, - CellLabel-> - "In[305]:=",ExpressionUUID->"daae7706-fca6-4e7a-9954-4fe79beca5c2"], + CellLabel->"In[2]:=",ExpressionUUID->"daae7706-fca6-4e7a-9954-4fe79beca5c2"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.9940741968744993`*^9, 3.994074214306916*^9}, { - 3.994074249779564*^9, 3.9940742697936697`*^9}}, - CellLabel-> - "Out[305]=",ExpressionUUID->"c7716299-8dfe-4fe4-85d3-b5caadb02ba2"] + 3.994074249779564*^9, 3.9940742697936697`*^9}, 3.9943863405840273`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"4575a8d6-9dfa-46ec-8ad9-8d3cf624f559"] }, Open ]], Cell[CellGroupData[{ @@ -60,15 +56,13 @@ Cell[BoxData[ RowBox[{"A1", "=", "172"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994074027305109*^9, 3.994074028074005*^9}}, - CellLabel-> - "In[306]:=",ExpressionUUID->"d74a31de-003c-48e3-bd39-989b5d6e0b39"], + CellLabel->"In[3]:=",ExpressionUUID->"d74a31de-003c-48e3-bd39-989b5d6e0b39"], Cell[BoxData["172"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994074196887857*^9, 3.994074214318638*^9}, { - 3.9940742497919416`*^9, 3.9940742698063602`*^9}}, - CellLabel-> - "Out[306]=",ExpressionUUID->"801e168a-e06e-491d-98b0-151f04a299ab"] + 3.9940742497919416`*^9, 3.9940742698063602`*^9}, 3.994386340595578*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"7c501d52-ee4e-4d12-a067-7b5cea0a20d2"] }, Open ]], Cell[CellGroupData[{ @@ -76,15 +70,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[307]:=",ExpressionUUID->"1c44b317-519b-49c8-8702-e2d9d929601d"], + CellLabel->"In[4]:=",ExpressionUUID->"1c44b317-519b-49c8-8702-e2d9d929601d"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.9940741969012012`*^9, 3.994074214329146*^9}, { - 3.9940742497961063`*^9, 3.994074269818478*^9}}, - CellLabel-> - "Out[307]=",ExpressionUUID->"da50ec22-f880-4086-95ca-25b5f93bce82"] + 3.9940742497961063`*^9, 3.994074269818478*^9}, 3.994386340608073*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"41b8c006-8b92-443f-a8fc-85536b13baa2"] }, Open ]], Cell[CellGroupData[{ @@ -96,30 +88,26 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[308]:=",ExpressionUUID->"3f66c609-61b6-4f6f-ba97-9d8451a7ad83"], + CellLabel->"In[5]:=",ExpressionUUID->"3f66c609-61b6-4f6f-ba97-9d8451a7ad83"], Cell[BoxData["0.5435000000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.9940741969137297`*^9, 3.99407421433959*^9}, { - 3.994074249812704*^9, 3.994074269830806*^9}}, - CellLabel-> - "Out[308]=",ExpressionUUID->"c03047fc-49e4-4b00-b56f-5501fb6aa2ca"] + 3.994074249812704*^9, 3.994074269830806*^9}, 3.9943863406214247`*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"431e2abf-55b2-4f40-bcce-81706ab63b6d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[309]:=",ExpressionUUID->"ff44fa1f-89eb-4ba4-b609-646ee4da5423"], + CellLabel->"In[6]:=",ExpressionUUID->"ff44fa1f-89eb-4ba4-b609-646ee4da5423"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.9940741969249763`*^9, 3.994074214349977*^9}, { - 3.99407424982506*^9, 3.994074269834938*^9}}, - CellLabel-> - "Out[309]=",ExpressionUUID->"9edf3971-4c57-4fa1-b8df-861f940ee735"] + 3.99407424982506*^9, 3.994074269834938*^9}, 3.99438634063363*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"7d31de18-83d4-4734-be62-77a7a251bde6"] }, Open ]], Cell[CellGroupData[{ @@ -130,15 +118,13 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[310]:=",ExpressionUUID->"94581f7f-892d-4c5a-bc76-6a965728ccb3"], + CellLabel->"In[7]:=",ExpressionUUID->"94581f7f-892d-4c5a-bc76-6a965728ccb3"], Cell[BoxData["6.451105409164632`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.994074196937035*^9, 3.994074214360525*^9}, { - 3.994074249837967*^9, 3.9940742698497963`*^9}}, - CellLabel-> - "Out[310]=",ExpressionUUID->"4312da58-abfb-4481-90d4-32ab1f884412"] + 3.994074249837967*^9, 3.9940742698497963`*^9}, 3.994386340646266*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"ae826447-e707-4593-80fa-27fe695aa5b9"] }, Open ]], Cell[CellGroupData[{ @@ -150,15 +136,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[311]:=",ExpressionUUID->"64734b62-ad52-4430-8a27-dca2156ea9db"], + CellLabel->"In[8]:=",ExpressionUUID->"64734b62-ad52-4430-8a27-dca2156ea9db"], Cell[BoxData["4.734719918224123`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.9940741969492617`*^9, 3.994074214370586*^9}, { - 3.994074249850299*^9, 3.994074269861824*^9}}, - CellLabel-> - "Out[311]=",ExpressionUUID->"bd1056d7-4cba-43b2-bde1-b8d57dfd7dc5"] + 3.994074249850299*^9, 3.994074269861824*^9}, 3.994386340657978*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"92109bd3-a35f-4c97-86ff-5b458ddffb78"] }, Open ]], Cell[CellGroupData[{ @@ -166,14 +150,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.852277809"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.9940740415240393`*^9}, - CellLabel-> - "In[312]:=",ExpressionUUID->"6b321ac0-44f1-4881-9cd1-4a4b52e97f45"], + CellLabel->"In[9]:=",ExpressionUUID->"6b321ac0-44f1-4881-9cd1-4a4b52e97f45"], Cell[BoxData["0.852277809`"], "Output", CellChangeTimes->{{3.994074196961275*^9, 3.994074214380481*^9}, { - 3.994074249862259*^9, 3.994074269873619*^9}}, - CellLabel-> - "Out[312]=",ExpressionUUID->"6af075ab-3e00-4497-bdd8-ab4377b90b38"] + 3.994074249862259*^9, 3.994074269873619*^9}, 3.994386340669428*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"f37eb077-f831-4ee0-a6a2-9cb3b3dc359c"] }, Open ]], Cell[CellGroupData[{ @@ -181,44 +163,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3903505481"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.99407404519888*^9}, - CellLabel-> - "In[313]:=",ExpressionUUID->"44eaa458-26da-4c2c-9c5b-de663afd33a3"], + CellLabel->"In[10]:=",ExpressionUUID->"44eaa458-26da-4c2c-9c5b-de663afd33a3"], Cell[BoxData["0.3903505481`"], "Output", CellChangeTimes->{{3.99407419697276*^9, 3.9940742143904543`*^9}, { - 3.99407424987506*^9, 3.994074269885377*^9}}, - CellLabel-> - "Out[313]=",ExpressionUUID->"42257ab3-e7f0-4b2d-accc-c7d4960d77bd"] + 3.99407424987506*^9, 3.994074269885377*^9}, 3.994386340681375*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"fa024d3c-15bb-45e3-b2ac-a3d4640cf736"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[314]:=",ExpressionUUID->"08e8b451-72ed-4e4f-816e-862c4275c518"], + CellLabel->"In[11]:=",ExpressionUUID->"08e8b451-72ed-4e4f-816e-862c4275c518"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.9940741969837933`*^9, 3.994074214400448*^9}, { - 3.994074249886661*^9, 3.994074269897275*^9}}, - CellLabel-> - "Out[314]=",ExpressionUUID->"08042680-84e3-4953-9097-8b4b2329c8a9"] + 3.994074249886661*^9, 3.994074269897275*^9}, 3.994386340694186*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"4f97339f-aece-468f-806a-f72c897fd005"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[315]:=",ExpressionUUID->"ebc894a3-b30c-4783-b098-44e1acfb02e2"], + CellLabel->"In[12]:=",ExpressionUUID->"ebc894a3-b30c-4783-b098-44e1acfb02e2"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.9940741969946527`*^9, 3.994074214410337*^9}, { - 3.9940742498968973`*^9, 3.994074269909542*^9}}, - CellLabel-> - "Out[315]=",ExpressionUUID->"197384c7-5cbd-4da5-af81-56243f0ddbb4"] + 3.9940742498968973`*^9, 3.994074269909542*^9}, 3.994386340714179*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"ba344957-5ede-4ff0-b767-af6895d66110"] }, Open ]], Cell[CellGroupData[{ @@ -242,15 +218,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"94884653-9926-43f0-a4e4-c8a218730d65"], + CellLabel->"In[13]:=",ExpressionUUID->"94884653-9926-43f0-a4e4-c8a218730d65"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.994074197005885*^9, 3.994074214421315*^9}, { - 3.994074249908176*^9, 3.994074269922103*^9}}, - CellLabel-> - "Out[316]=",ExpressionUUID->"b0418ee4-11ae-4236-8758-d1177d1d5715"] + 3.994074249908176*^9, 3.994074269922103*^9}, 3.994386340733624*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"1265a925-286a-47f0-8b82-2bc7cbd3e5b6"] }, Open ]], Cell[CellGroupData[{ @@ -274,15 +248,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[317]:=",ExpressionUUID->"6175cef8-34fe-4c75-a9f1-e60f3bbaacfe"], + CellLabel->"In[14]:=",ExpressionUUID->"6175cef8-34fe-4c75-a9f1-e60f3bbaacfe"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.994074197017363*^9, 3.994074214431409*^9}, { - 3.994074249918466*^9, 3.99407426993229*^9}}, - CellLabel-> - "Out[317]=",ExpressionUUID->"ae4c8c55-8eef-4563-96cb-21d8ba0414f4"] + 3.994074249918466*^9, 3.99407426993229*^9}, 3.9943863407461367`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"6421bcad-bc0d-429d-ad9f-73f1a48e2263"] }, Open ]], Cell[CellGroupData[{ @@ -337,15 +309,13 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[318]:=",ExpressionUUID->"bb0f74ec-aec0-425a-9079-bf958f539559"], + CellLabel->"In[15]:=",ExpressionUUID->"bb0f74ec-aec0-425a-9079-bf958f539559"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994074197029154*^9, 3.994074214441661*^9}, { - 3.9940742499280653`*^9, 3.994074269943099*^9}}, - CellLabel-> - "Out[318]=",ExpressionUUID->"4e9cf17c-c086-4207-93a2-1c9be79bec5f"] + 3.9940742499280653`*^9, 3.994074269943099*^9}, 3.994386340762937*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"6d8139b4-d327-4aef-a741-038c40e55ba3"] }, Open ]], Cell[CellGroupData[{ @@ -396,16 +366,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"c33dcea4-9866-4fe5-a912-90d5431107fd"], + CellLabel->"In[16]:=",ExpressionUUID->"c33dcea4-9866-4fe5-a912-90d5431107fd"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.9940741970396633`*^9, 3.994074214453579*^9}, { - 3.994074249938612*^9, 3.994074269953534*^9}}, - CellLabel-> - "Out[319]=",ExpressionUUID->"91e07067-ff11-4791-90c4-12c7b6c0218a"] + 3.994074249938612*^9, 3.994074269953534*^9}, 3.9943863407749443`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"f0ea87e2-2d8d-4017-b474-0110ffc40b41"] }, Open ]], Cell[CellGroupData[{ @@ -456,16 +424,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"9522d922-0771-4bfc-b71d-52614048d630"], + CellLabel->"In[17]:=",ExpressionUUID->"9522d922-0771-4bfc-b71d-52614048d630"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.994074197050289*^9, 3.994074214467175*^9}, { - 3.994074249949532*^9, 3.9940742699645767`*^9}}, - CellLabel-> - "Out[320]=",ExpressionUUID->"4b5ccc44-874a-4062-a2ee-585fdf588efa"] + 3.994074249949532*^9, 3.9940742699645767`*^9}, 3.994386340788218*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"3bacb9f7-95ca-443f-b18b-40d33aea88a8"] }, Open ]], Cell[CellGroupData[{ @@ -520,60 +486,52 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"e032899b-6b0b-4998-81de-c470b48600d6"], + CellLabel->"In[18]:=",ExpressionUUID->"e032899b-6b0b-4998-81de-c470b48600d6"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994074197062862*^9, 3.99407421448357*^9}, { - 3.9940742499608793`*^9, 3.994074269975973*^9}}, - CellLabel-> - "Out[321]=",ExpressionUUID->"8e3fce66-1bea-4515-a6be-08ab330f5a8e"] + 3.9940742499608793`*^9, 3.994074269975973*^9}, 3.994386340800983*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"1a4efbc4-f2e6-42b8-8f6d-c48acb3fd6ba"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"216606c7-6dad-4aa1-a3b7-4830abc566c0"], + CellLabel->"In[19]:=",ExpressionUUID->"216606c7-6dad-4aa1-a3b7-4830abc566c0"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.9940741970755367`*^9, 3.994074214495585*^9}, { - 3.994074249972097*^9, 3.9940742699872303`*^9}}, - CellLabel-> - "Out[322]=",ExpressionUUID->"620aadf4-3b24-41bd-90a9-2a851d458f72"] + 3.994074249972097*^9, 3.9940742699872303`*^9}, 3.994386340817396*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"4e38ebbe-6707-42fc-9537-466390f7388b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"57a3072b-f902-4e31-89a5-b16ef3c9230d"], + CellLabel->"In[20]:=",ExpressionUUID->"57a3072b-f902-4e31-89a5-b16ef3c9230d"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994074197089067*^9, 3.994074214507393*^9}, { - 3.99407424998314*^9, 3.994074269998393*^9}}, - CellLabel-> - "Out[323]=",ExpressionUUID->"9cec912c-4b48-4158-97f3-06ff6968be02"] + 3.99407424998314*^9, 3.994074269998393*^9}, 3.994386340832396*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"a080c2fc-5094-4941-b8ef-777a5f9cd0e2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"1ceb69c9-9fc5-40b6-ab8e-c8e59d88e8de"], + CellLabel->"In[21]:=",ExpressionUUID->"1ceb69c9-9fc5-40b6-ab8e-c8e59d88e8de"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940741971016483`*^9, 3.9940742145189466`*^9}, { - 3.994074249994322*^9, 3.994074270009439*^9}}, - CellLabel-> - "Out[324]=",ExpressionUUID->"7bc279d0-7531-4399-a25c-56f639440104"] + 3.994074249994322*^9, 3.994074270009439*^9}, 3.9943863408445807`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"dd2e574e-ab5c-40de-9981-7ed9be88e08e"] }, Open ]], Cell[CellGroupData[{ @@ -582,31 +540,27 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[325]:=",ExpressionUUID->"9f3f8bb1-d0e8-48d7-a0d2-d236e125b8df"], + CellLabel->"In[22]:=",ExpressionUUID->"9f3f8bb1-d0e8-48d7-a0d2-d236e125b8df"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.9940741971133337`*^9, 3.99407421453058*^9}, { - 3.994074250005796*^9, 3.994074270020775*^9}}, - CellLabel-> - "Out[325]=",ExpressionUUID->"9beed3d8-5c86-4f06-a197-c30484e3cd35"] + 3.994074250005796*^9, 3.994074270020775*^9}, 3.9943863408560867`*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"1f0bf986-d1a7-4ca2-b60b-090d911565fa"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"7852062e-9d9c-4d72-b668-53029692efc7"], + CellLabel->"In[23]:=",ExpressionUUID->"7852062e-9d9c-4d72-b668-53029692efc7"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994074197124381*^9, 3.994074214542293*^9}, { - 3.994074250017613*^9, 3.9940742700324078`*^9}}, - CellLabel-> - "Out[326]=",ExpressionUUID->"b71a3c77-d52d-412d-a545-2e790ba7d27a"] + 3.994074250017613*^9, 3.9940742700324078`*^9}, 3.994386340867186*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"9746ca51-a9c6-4614-b045-9ca8af064919"] }, Open ]], Cell[CellGroupData[{ @@ -616,15 +570,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994074052479707*^9, 3.9940740526225157`*^9}}, - CellLabel-> - "In[327]:=",ExpressionUUID->"4238e547-04b4-4cc2-a364-96e360fd1095"], + CellLabel->"In[24]:=",ExpressionUUID->"4238e547-04b4-4cc2-a364-96e360fd1095"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.99407419713608*^9, 3.994074214545911*^9}, { - 3.994074250027919*^9, 3.99407427004285*^9}}, - CellLabel-> - "Out[327]=",ExpressionUUID->"c22508b0-e128-4d8f-a35a-f1274e6790ab"] + 3.994074250027919*^9, 3.99407427004285*^9}, 3.994386340940474*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"82103c4e-a1c2-494e-8371-652f412c415c"] }, Open ]], Cell[CellGroupData[{ @@ -634,15 +586,13 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.99407405616786*^9, 3.994074056966621*^9}}, - CellLabel-> - "In[328]:=",ExpressionUUID->"40cfdd4f-d522-4cf4-bb3f-ddf87ddd0049"], + CellLabel->"In[25]:=",ExpressionUUID->"40cfdd4f-d522-4cf4-bb3f-ddf87ddd0049"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.994074197147298*^9, 3.99407421455849*^9}, { - 3.9940742500393*^9, 3.994074270054291*^9}}, - CellLabel-> - "Out[328]=",ExpressionUUID->"b5c3d90a-a29c-4803-9477-07294e73f107"] + 3.9940742500393*^9, 3.994074270054291*^9}, 3.994386340987855*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"c0868be3-62bf-47ac-b3ee-92d341658feb"] }, Open ]], Cell[CellGroupData[{ @@ -651,15 +601,13 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[329]:=",ExpressionUUID->"d5cc82e8-3bb4-461d-8af2-e917834817a0"], + CellLabel->"In[26]:=",ExpressionUUID->"d5cc82e8-3bb4-461d-8af2-e917834817a0"], Cell[BoxData["68"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.994074197159381*^9, 3.994074214569437*^9}, { - 3.9940742500504293`*^9, 3.9940742700651913`*^9}}, - CellLabel-> - "Out[329]=",ExpressionUUID->"f0373de4-4109-4341-b94a-96998235c1fa"] + 3.9940742500504293`*^9, 3.9940742700651913`*^9}, 3.994386344820252*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"e42befc8-07a5-4f18-885c-092302b8dc44"] }, Open ]], Cell[CellGroupData[{ @@ -674,15 +622,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"1521e7a7-457f-4c43-92d7-83c8a29470ee"], + CellLabel->"In[27]:=",ExpressionUUID->"1521e7a7-457f-4c43-92d7-83c8a29470ee"], Cell[BoxData["0.10723666210670314`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994074197172007*^9, 3.994074214580143*^9}, { - 3.994074250060562*^9, 3.9940742700753593`*^9}}, - CellLabel-> - "Out[330]=",ExpressionUUID->"3801847b-4dc3-4ee5-a7d6-c282eef96ffc"] + 3.994074250060562*^9, 3.9940742700753593`*^9}, 3.994386345205544*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"53c3f735-c58e-4cc9-ac85-03bbb15e4716"] }, Open ]], Cell[CellGroupData[{ @@ -697,16 +643,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"bb70a224-c72c-4ce1-a572-c1a6982f5e64"], + CellLabel->"In[28]:=",ExpressionUUID->"bb70a224-c72c-4ce1-a572-c1a6982f5e64"], Cell[BoxData[ RowBox[{"-", "2.5678385772913814`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994074197183957*^9, 3.994074214590371*^9}, { - 3.994074250071249*^9, 3.99407427008554*^9}}, - CellLabel-> - "Out[331]=",ExpressionUUID->"102a79da-360d-4383-af2e-636189646b64"] + 3.994074250071249*^9, 3.99407427008554*^9}, 3.9943863452205133`*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"32df478c-5dbd-4629-b5f4-61d155c03a9d"] }, Open ]], Cell[CellGroupData[{ @@ -737,15 +681,13 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[332]:=",ExpressionUUID->"d228318d-7be6-4ab9-995e-a12ebb7925bf"], + CellLabel->"In[29]:=",ExpressionUUID->"d228318d-7be6-4ab9-995e-a12ebb7925bf"], Cell[BoxData["17.339463280274387`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994074197196582*^9, 3.9940742146010637`*^9}, { - 3.994074250082402*^9, 3.9940742700958967`*^9}}, - CellLabel-> - "Out[332]=",ExpressionUUID->"9eecf493-829a-43f0-8011-7f8ff37b9cf1"] + 3.994074250082402*^9, 3.9940742700958967`*^9}, 3.994386345236019*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"a8a980b4-7fe1-44bb-82a4-ab9814cebd7d"] }, Open ]], Cell[CellGroupData[{ @@ -753,15 +695,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[333]:=",ExpressionUUID->"1c644334-4034-4175-b519-5173e387509e"], + CellLabel->"In[30]:=",ExpressionUUID->"1c644334-4034-4175-b519-5173e387509e"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.9940741972101183`*^9, 3.9940742146122723`*^9}, { - 3.994074250094462*^9, 3.994074270106193*^9}}, - CellLabel-> - "Out[333]=",ExpressionUUID->"da8ac628-9b2b-46f0-a295-be6729651dc8"] + 3.994074250094462*^9, 3.994074270106193*^9}, 3.9943863452494698`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"9fba1196-d452-4f3b-b0d4-9e5c2e76ff5c"] }, Open ]], Cell[CellGroupData[{ @@ -771,20 +711,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994074073155587*^9, 3.994074075499446*^9}}, - CellLabel-> - "In[334]:=",ExpressionUUID->"6ed480b8-b627-490d-a1bd-b6b2cc1dc50d"], + CellLabel->"In[31]:=",ExpressionUUID->"6ed480b8-b627-490d-a1bd-b6b2cc1dc50d"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{{3.9940741972243557`*^9, 3.994074214623012*^9}, { - 3.994074250106516*^9, 3.9940742701165457`*^9}}, - CellLabel-> - "Out[334]=",ExpressionUUID->"13e60e75-e971-4310-8d1d-659942245f47"] + 3.994074250106516*^9, 3.9940742701165457`*^9}, 3.994386345265081*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"06f93ab3-6f97-47ca-824c-b0a4d3fb99a9"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[335]:=",ExpressionUUID->"82ed6860-a721-4fa4-bc9a-b8b91ebd31e8"], + CellLabel->"In[32]:=",ExpressionUUID->"82ed6860-a721-4fa4-bc9a-b8b91ebd31e8"], Cell[CellGroupData[{ @@ -793,20 +730,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994074078227497*^9, 3.9940740796275997`*^9}}, - CellLabel-> - "In[336]:=",ExpressionUUID->"c9346430-f3f7-4030-ae91-c2d23857a67f"], + CellLabel->"In[33]:=",ExpressionUUID->"c9346430-f3f7-4030-ae91-c2d23857a67f"], Cell[BoxData["0.765`"], "Output", CellChangeTimes->{{3.994074197245954*^9, 3.994074214636681*^9}, { - 3.9940742501222553`*^9, 3.99407427012961*^9}}, - CellLabel-> - "Out[336]=",ExpressionUUID->"9f7fbcdf-43fd-411d-9e20-64c878a946b1"] + 3.9940742501222553`*^9, 3.99407427012961*^9}, 3.9943863453376713`*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"f95c4646-f86b-42e5-a3f2-bf887e47fbc6"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[337]:=",ExpressionUUID->"028b0534-2c4c-4cf2-905d-4552f7ca54c2"], + CellLabel->"In[34]:=",ExpressionUUID->"028b0534-2c4c-4cf2-905d-4552f7ca54c2"], Cell[CellGroupData[{ @@ -815,20 +749,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940740824169683`*^9, 3.9940740841708183`*^9}}, - CellLabel-> - "In[338]:=",ExpressionUUID->"85518522-1b80-432e-a966-1cf53b275711"], + CellLabel->"In[35]:=",ExpressionUUID->"85518522-1b80-432e-a966-1cf53b275711"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{{3.994074197269746*^9, 3.994074214649177*^9}, { - 3.994074250142523*^9, 3.994074270141824*^9}}, - CellLabel-> - "Out[338]=",ExpressionUUID->"c5465443-2cda-4f7f-875b-ee3debb90888"] + 3.994074250142523*^9, 3.994074270141824*^9}, 3.994386345385433*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"70b15f46-77a7-484a-9f5b-453d3127199f"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[339]:=",ExpressionUUID->"cc4b9fe1-a96b-491e-b02e-437a97b451dc"], + CellLabel->"In[36]:=",ExpressionUUID->"cc4b9fe1-a96b-491e-b02e-437a97b451dc"], Cell[CellGroupData[{ @@ -837,20 +768,17 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994074087466568*^9, 3.9940740892428827`*^9}}, - CellLabel-> - "In[340]:=",ExpressionUUID->"2761b0bd-c8fe-43b1-8339-b663fa070bea"], + CellLabel->"In[37]:=",ExpressionUUID->"2761b0bd-c8fe-43b1-8339-b663fa070bea"], Cell[BoxData["1.115`"], "Output", CellChangeTimes->{{3.9940741972942533`*^9, 3.9940742146616087`*^9}, { - 3.994074250166238*^9, 3.9940742701540823`*^9}}, - CellLabel-> - "Out[340]=",ExpressionUUID->"b077b6db-214d-44be-a4f1-66b324d689e7"] + 3.994074250166238*^9, 3.9940742701540823`*^9}, 3.994386345405794*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"f1ccd2a3-2037-4b6e-82f0-11e423d2dbcb"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[341]:=",ExpressionUUID->"55690335-bd9f-438d-a21e-b3c436e73a36"], + CellLabel->"In[38]:=",ExpressionUUID->"55690335-bd9f-438d-a21e-b3c436e73a36"], Cell[CellGroupData[{ @@ -859,20 +787,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994074092127721*^9, 3.994074094282755*^9}}, - CellLabel-> - "In[342]:=",ExpressionUUID->"6cb5e4b9-f971-48f9-8193-9d4d80826f60"], + CellLabel->"In[39]:=",ExpressionUUID->"6cb5e4b9-f971-48f9-8193-9d4d80826f60"], Cell[BoxData["1.375`"], "Output", CellChangeTimes->{{3.9940741973176317`*^9, 3.9940742146740303`*^9}, { - 3.994074250185948*^9, 3.9940742701663027`*^9}}, - CellLabel-> - "Out[342]=",ExpressionUUID->"91182982-aab4-4f88-bafb-142295944784"] + 3.994074250185948*^9, 3.9940742701663027`*^9}, 3.994386345426753*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"bafb356b-a588-4884-9398-e955984a145a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[343]:=",ExpressionUUID->"0aea4f91-16f1-4379-a384-c8f1d75b1b6a"], + CellLabel->"In[40]:=",ExpressionUUID->"0aea4f91-16f1-4379-a384-c8f1d75b1b6a"], Cell[CellGroupData[{ @@ -881,20 +806,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994074098253368*^9, 3.994074099547431*^9}}, - CellLabel-> - "In[344]:=",ExpressionUUID->"890b4fc3-cf88-4785-8657-54e7da4c1174"], + CellLabel->"In[41]:=",ExpressionUUID->"890b4fc3-cf88-4785-8657-54e7da4c1174"], Cell[BoxData["0.545`"], "Output", CellChangeTimes->{{3.9940741973401327`*^9, 3.994074214686512*^9}, { - 3.994074250207786*^9, 3.994074270178926*^9}}, - CellLabel-> - "Out[344]=",ExpressionUUID->"dc4cd8fc-4e63-43a6-aa6f-66c7d88b4769"] + 3.994074250207786*^9, 3.994074270178926*^9}, 3.9943863455541286`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"fdf2541d-08c4-4d43-b58a-230b3d065dab"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[345]:=",ExpressionUUID->"e0b260f2-8d3f-43a5-8613-1e9fcf0a277c"], + CellLabel->"In[42]:=",ExpressionUUID->"e0b260f2-8d3f-43a5-8613-1e9fcf0a277c"], Cell[CellGroupData[{ @@ -903,20 +825,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994074102320486*^9, 3.9940741031259613`*^9}}, - CellLabel-> - "In[346]:=",ExpressionUUID->"55c819a6-052f-42dc-b827-ee064f89cfb9"], + CellLabel->"In[43]:=",ExpressionUUID->"55c819a6-052f-42dc-b827-ee064f89cfb9"], Cell[BoxData["1.35`"], "Output", CellChangeTimes->{{3.994074197360721*^9, 3.994074214698968*^9}, { - 3.9940742502296133`*^9, 3.994074270190978*^9}}, - CellLabel-> - "Out[346]=",ExpressionUUID->"38998a46-4472-476c-b152-eb30354e583b"] + 3.9940742502296133`*^9, 3.994074270190978*^9}, 3.9943863455907183`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"c70ea79c-e430-4a7f-b628-6c44e2a51de9"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[347]:=",ExpressionUUID->"2f642cd5-77a3-49e8-be27-8d513a09080a"], + CellLabel->"In[44]:=",ExpressionUUID->"2f642cd5-77a3-49e8-be27-8d513a09080a"], Cell[CellGroupData[{ @@ -924,20 +843,17 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.655"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994074105268124*^9, 3.994074106561956*^9}}, - CellLabel-> - "In[348]:=",ExpressionUUID->"4669ad9d-ec53-4c97-9513-e1af6420e80e"], + CellLabel->"In[45]:=",ExpressionUUID->"4669ad9d-ec53-4c97-9513-e1af6420e80e"], Cell[BoxData["0.655`"], "Output", CellChangeTimes->{{3.994074197383122*^9, 3.994074214711643*^9}, { - 3.994074250250944*^9, 3.994074270203269*^9}}, - CellLabel-> - "Out[348]=",ExpressionUUID->"87a6042c-1df3-42c3-b80f-bd1eee62fc2f"] + 3.994074250250944*^9, 3.994074270203269*^9}, 3.99438634562607*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"5dc1bdf1-5c72-4b78-8f93-4c429c072955"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[349]:=",ExpressionUUID->"be32d0fb-a27a-438c-a76f-2201d8c0fbac"], + CellLabel->"In[46]:=",ExpressionUUID->"be32d0fb-a27a-438c-a76f-2201d8c0fbac"], Cell[CellGroupData[{ @@ -1426,15 +1342,13 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[350]:=",ExpressionUUID->"0ccb87c5-597e-48f2-8a09-eab3df7ef3f1"], + CellLabel->"In[47]:=",ExpressionUUID->"0ccb87c5-597e-48f2-8a09-eab3df7ef3f1"], Cell[BoxData["0.1542863605960474`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.994074197462419*^9, 3.9940742147508163`*^9}, { - 3.994074250298726*^9, 3.994074270240198*^9}}, - CellLabel-> - "Out[350]=",ExpressionUUID->"9f4dee7c-b3b0-40ee-a29b-041a2e275078"] + 3.994074250298726*^9, 3.994074270240198*^9}, 3.994386345800856*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"ea61208a-4ae8-4a8d-940c-4f5430cb990a"] }, Open ]], Cell[CellGroupData[{ @@ -1928,15 +1842,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[351]:=",ExpressionUUID->"ef40558d-9877-413e-ad39-31919e60aa22"], + CellLabel->"In[48]:=",ExpressionUUID->"ef40558d-9877-413e-ad39-31919e60aa22"], Cell[BoxData["6.986649521084862`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.994074197551347*^9, 3.994074214777306*^9}, { - 3.9940742503242893`*^9, 3.994074270266127*^9}}, - CellLabel-> - "Out[351]=",ExpressionUUID->"d9512901-9110-4a08-834b-e31a77481e83"] + 3.9940742503242893`*^9, 3.994074270266127*^9}, 3.994386345879839*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"eae59e8e-62ac-4f13-935f-895659428572"] }, Open ]], Cell[CellGroupData[{ @@ -2424,16 +2336,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[352]:=",ExpressionUUID->"ad8b4a8d-aa5a-47cb-9231-3882aa3aa636"], + CellLabel->"In[49]:=",ExpressionUUID->"ad8b4a8d-aa5a-47cb-9231-3882aa3aa636"], Cell[BoxData[ RowBox[{"-", "15.225784715275067`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994074197626877*^9, 3.994074214803336*^9}, { - 3.994074250347639*^9, 3.9940742702914057`*^9}}, - CellLabel-> - "Out[352]=",ExpressionUUID->"6376cc57-a6ec-48c2-9ea3-e9896c20d1fd"] + 3.994074250347639*^9, 3.9940742702914057`*^9}, 3.994386346004472*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"817e0142-ff2f-447c-abbe-a2bca2bf1e9f"] }, Open ]], Cell[CellGroupData[{ @@ -2991,16 +2901,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[353]:=",ExpressionUUID->"f6417cb4-7895-4e62-b55f-b938a0d2d12a"], + CellLabel->"In[50]:=",ExpressionUUID->"f6417cb4-7895-4e62-b55f-b938a0d2d12a"], Cell[BoxData[ RowBox[{"-", "19.527743438945258`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.994074197680339*^9, 3.9940742148337717`*^9}, { - 3.994074250376841*^9, 3.9940742703219957`*^9}}, - CellLabel-> - "Out[353]=",ExpressionUUID->"957d529d-ef4f-4bea-92fe-f59636cd901d"] + 3.994074250376841*^9, 3.9940742703219957`*^9}, 3.9943863460912323`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"e510eb07-2a01-4ca7-b1db-169c4ad6cb0a"] }, Open ]], Cell[CellGroupData[{ @@ -3558,16 +3466,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[354]:=",ExpressionUUID->"17b000e1-6a35-4a6c-ae53-b8c939e69c93"], + CellLabel->"In[51]:=",ExpressionUUID->"17b000e1-6a35-4a6c-ae53-b8c939e69c93"], Cell[BoxData[ RowBox[{"-", "55.27021800638023`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.9940741977668943`*^9, 3.9940742148649673`*^9}, { - 3.994074250406843*^9, 3.994074270352029*^9}}, - CellLabel-> - "Out[354]=",ExpressionUUID->"fa67b965-6ac0-445d-b326-8c89a66a42a9"] + 3.994074250406843*^9, 3.994074270352029*^9}, 3.994386346175292*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"e79b2a21-078e-4072-a0ab-7ce2ae40339b"] }, Open ]], Cell[CellGroupData[{ @@ -4198,46 +4104,40 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[355]:=",ExpressionUUID->"fffad2cc-5fdd-4f36-9123-f758e64cf42d"], + CellLabel->"In[52]:=",ExpressionUUID->"fffad2cc-5fdd-4f36-9123-f758e64cf42d"], Cell[BoxData[ RowBox[{"-", "141.4524755079782`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.994074197832451*^9, 3.994074214909892*^9}, { - 3.994074250439662*^9, 3.994074270387487*^9}}, - CellLabel-> - "Out[355]=",ExpressionUUID->"60b1eb9b-8c32-4cca-8d6f-d4ac8f942bf9"] + 3.994074250439662*^9, 3.994074270387487*^9}, 3.9943863462938347`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"d730774c-f47c-47c0-8d74-42ce162c2ac5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[356]:=",ExpressionUUID->"95fe90eb-9c3b-42b7-b53c-7ec3fd3c9dc5"], + CellLabel->"In[53]:=",ExpressionUUID->"95fe90eb-9c3b-42b7-b53c-7ec3fd3c9dc5"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994074197929666*^9, 3.994074214922945*^9}, { - 3.994074250452722*^9, 3.994074270403535*^9}}, - CellLabel-> - "Out[356]=",ExpressionUUID->"f84a4360-eaad-40da-97ef-0ba357d9630e"] + 3.994074250452722*^9, 3.994074270403535*^9}, 3.994386346317356*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"8749418d-814b-4af9-b8ec-ee421076c576"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[357]:=",ExpressionUUID->"a374712d-25bb-4ed3-8dad-1eacd03e8b74"], + CellLabel->"In[54]:=",ExpressionUUID->"a374712d-25bb-4ed3-8dad-1eacd03e8b74"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994074197952071*^9, 3.994074214935376*^9}, { - 3.994074250464295*^9, 3.994074270413846*^9}}, - CellLabel-> - "Out[357]=",ExpressionUUID->"76a5733c-2c44-40f0-9ad2-abd82107af80"] + 3.994074250464295*^9, 3.994074270413846*^9}, 3.9943863463818808`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"720a6e26-587c-4b81-b93c-a555c1c775e0"] }, Open ]], Cell[CellGroupData[{ @@ -4281,15 +4181,13 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[358]:=",ExpressionUUID->"f9220ace-6a6a-4409-8c96-26d769144f34"], + CellLabel->"In[55]:=",ExpressionUUID->"f9220ace-6a6a-4409-8c96-26d769144f34"], Cell[BoxData["111.55440139653717`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940741979658833`*^9, 3.994074214947126*^9}, { - 3.99407425047659*^9, 3.994074270424139*^9}}, - CellLabel-> - "Out[358]=",ExpressionUUID->"ec2d7bfb-a523-4ac7-9513-614b1c4cc249"] + 3.99407425047659*^9, 3.994074270424139*^9}, 3.994386346409151*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"535a093b-9c5b-41b7-bc66-733fe51bc572"] }, Open ]], Cell[CellGroupData[{ @@ -4329,16 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[359]:=",ExpressionUUID->"ea1c2514-c7ba-4fd2-b739-a8ed8b506983"], + CellLabel->"In[56]:=",ExpressionUUID->"ea1c2514-c7ba-4fd2-b739-a8ed8b506983"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.994074197994025*^9, 3.994074214959611*^9}, { - 3.994074250488699*^9, 3.994074270434445*^9}}, - CellLabel-> - "Out[359]=",ExpressionUUID->"9da40605-f57f-4ab0-8533-3883ab18cdd9"] + 3.994074250488699*^9, 3.994074270434445*^9}, 3.9943863464448233`*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"72d1e269-8456-4baa-b821-48912ae5c62a"] }, Open ]], Cell[CellGroupData[{ @@ -4382,101 +4278,87 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[360]:=",ExpressionUUID->"7fedfd99-5ba8-4e99-bf55-2415856ffce2"], + CellLabel->"In[57]:=",ExpressionUUID->"7fedfd99-5ba8-4e99-bf55-2415856ffce2"], Cell[BoxData["113.13286100443031`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994074198004314*^9, 3.994074214972053*^9}, { - 3.994074250500126*^9, 3.99407427044481*^9}}, - CellLabel-> - "Out[360]=",ExpressionUUID->"c050c737-e662-4f27-bf0e-107c1a1f8b18"] + 3.994074250500126*^9, 3.99407427044481*^9}, 3.99438634646395*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"08b285ca-92b6-4cd0-a5ef-1a4f84542aca"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[361]:=",ExpressionUUID->"a9c445c1-eed1-48ab-a9df-f883e3c6dd49"], + CellLabel->"In[58]:=",ExpressionUUID->"a9c445c1-eed1-48ab-a9df-f883e3c6dd49"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.994074198016279*^9, 3.994074214983481*^9}, { - 3.994074250511408*^9, 3.994074270455081*^9}}, - CellLabel-> - "Out[361]=",ExpressionUUID->"a7cd8413-3f9c-444e-8af4-1c0527655f38"] + 3.994074250511408*^9, 3.994074270455081*^9}, 3.994386346496168*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"80cd7b08-7da5-4e60-b04b-d5498062d377"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[362]:=",ExpressionUUID->"9fac5d2e-d0ad-417f-83ba-a1df7e4069ab"], + CellLabel->"In[59]:=",ExpressionUUID->"9fac5d2e-d0ad-417f-83ba-a1df7e4069ab"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.99407419803306*^9, 3.994074214997123*^9}, { - 3.994074250525971*^9, 3.994074270465309*^9}}, - CellLabel-> - "Out[362]=",ExpressionUUID->"45f5d4c4-0903-49ba-ab5a-1d97f15a0313"] + 3.994074250525971*^9, 3.994074270465309*^9}, 3.994386346512581*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"ed883b2b-a3ab-413d-8195-a69672278364"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[363]:=",ExpressionUUID->"4400a4ff-4a9c-4af6-b342-b122489ac5be"], + CellLabel->"In[60]:=",ExpressionUUID->"4400a4ff-4a9c-4af6-b342-b122489ac5be"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.994074198060273*^9, 3.994074215008013*^9}, { - 3.994074250535656*^9, 3.994074270476778*^9}}, - CellLabel-> - "Out[363]=",ExpressionUUID->"a2ccd06d-586e-4d52-af8c-5dd770595030"] + 3.994074250535656*^9, 3.994074270476778*^9}, 3.9943863465414953`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"8af14ec6-590a-492e-ad32-3d41f7a80d63"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[364]:=",ExpressionUUID->"6be331a8-113b-4a43-97d5-7058a5132475"], + CellLabel->"In[61]:=",ExpressionUUID->"6be331a8-113b-4a43-97d5-7058a5132475"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.9940741980734253`*^9, 3.994074215018661*^9}, { - 3.994074250546678*^9, 3.9940742704879427`*^9}}, - CellLabel-> - "Out[364]=",ExpressionUUID->"fb009e1d-546a-4c59-813a-ef4408993780"] + 3.994074250546678*^9, 3.9940742704879427`*^9}, 3.994386346563539*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"7928ca01-416a-43d3-92b9-91a9561ee4c5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[365]:=",ExpressionUUID->"8b321167-e5bd-4895-930a-f1c4c2e27fe0"], + CellLabel->"In[62]:=",ExpressionUUID->"8b321167-e5bd-4895-930a-f1c4c2e27fe0"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994074198087656*^9, 3.9940742150302687`*^9}, { - 3.994074250550354*^9, 3.994074270499359*^9}}, - CellLabel-> - "Out[365]=",ExpressionUUID->"4eebef00-7095-403f-912c-0fb326e5e131"] + 3.994074250550354*^9, 3.994074270499359*^9}, 3.994386346585443*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"5c57d881-c10f-4f82-8641-69077856c71f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[366]:=",ExpressionUUID->"780e69f3-32cb-477f-be6d-06854098aab7"], + CellLabel->"In[63]:=",ExpressionUUID->"780e69f3-32cb-477f-be6d-06854098aab7"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.994074198096857*^9, 3.994074215043764*^9}, { - 3.994074250564603*^9, 3.994074270511888*^9}}, - CellLabel-> - "Out[366]=",ExpressionUUID->"b394dcfe-94d4-4a0f-a227-01400baa41c7"] + 3.994074250564603*^9, 3.994074270511888*^9}, 3.994386346606979*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"d966b531-b27e-4d8f-b3b2-628857de51d0"] }, Open ]], Cell[CellGroupData[{ @@ -4497,16 +4379,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[367]:=",ExpressionUUID->"ee2c157f-c2e4-4e6e-a76a-b6444c0b4980"], + CellLabel->"In[64]:=",ExpressionUUID->"ee2c157f-c2e4-4e6e-a76a-b6444c0b4980"], Cell[BoxData[ RowBox[{"-", "33.18726375495992`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994074198107793*^9, 3.994074215058444*^9}, { - 3.994074250574132*^9, 3.99407427052425*^9}}, - CellLabel-> - "Out[367]=",ExpressionUUID->"b4455df1-1462-41b7-ab31-110a7ad06705"] + 3.994074250574132*^9, 3.99407427052425*^9}, 3.994386346631764*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"454852aa-9281-47cc-a415-5c498520e117"] }, Open ]], Cell[CellGroupData[{ @@ -4527,16 +4407,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[368]:=",ExpressionUUID->"0d157823-9a51-4684-8434-84a3c4faa864"], + CellLabel->"In[65]:=",ExpressionUUID->"0d157823-9a51-4684-8434-84a3c4faa864"], Cell[BoxData[ RowBox[{"-", "6.498883922853802`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994074198134163*^9, 3.994074215071083*^9}, { - 3.994074250583393*^9, 3.994074270535636*^9}}, - CellLabel-> - "Out[368]=",ExpressionUUID->"85cb3be1-0ccb-4107-9c3a-a5ac787672e1"] + 3.994074250583393*^9, 3.994074270535636*^9}, 3.994386346654293*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"fccd3433-098e-439b-ba41-94f69a8c5483"] }, Open ]], Cell[CellGroupData[{ @@ -4601,15 +4479,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[369]:=",ExpressionUUID->"7dea769f-37e3-4c1a-a621-9da816094e65"], + CellLabel->"In[66]:=",ExpressionUUID->"7dea769f-37e3-4c1a-a621-9da816094e65"], Cell[BoxData["78.36713764157724`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.99407419816089*^9, 3.994074215083827*^9}, { - 3.994074250592779*^9, 3.994074270550357*^9}}, - CellLabel-> - "Out[369]=",ExpressionUUID->"fa756504-b278-4356-a18c-99660bc53f6c"] + 3.994074250592779*^9, 3.994074270550357*^9}, 3.9943863466709623`*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"db7db63a-b448-4f6d-8b13-46b486294cb0"] }, Open ]], Cell[CellGroupData[{ @@ -4650,16 +4526,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[370]:=",ExpressionUUID->"20d1ef7b-f49b-40d4-8f50-9611fcfa7243"], + CellLabel->"In[67]:=",ExpressionUUID->"20d1ef7b-f49b-40d4-8f50-9611fcfa7243"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994074198173212*^9, 3.9940742151226263`*^9}, { - 3.9940742506018353`*^9, 3.99407427055612*^9}}, - CellLabel-> - "Out[370]=",ExpressionUUID->"ed55d506-0729-4a36-8914-2992e565f7a3"] + 3.9940742506018353`*^9, 3.99407427055612*^9}, 3.9943863466903677`*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"8f8bf60e-62c4-40ed-a7b2-c466e4afd192"] }, Open ]], Cell[CellGroupData[{ @@ -4725,15 +4599,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[371]:=",ExpressionUUID->"4f78fd37-fcc1-4fac-9190-460b93233bfb"], + CellLabel->"In[68]:=",ExpressionUUID->"4f78fd37-fcc1-4fac-9190-460b93233bfb"], Cell[BoxData["106.6339770815765`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994074198185794*^9, 3.994074215135048*^9}, { - 3.994074250611326*^9, 3.994074270578539*^9}}, - CellLabel-> - "Out[371]=",ExpressionUUID->"dfda7e2b-ea7c-4936-8882-f8bccf88173b"] + 3.994074250611326*^9, 3.994074270578539*^9}, 3.9943863467114487`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"e99602a7-3915-40db-ab0c-0dcca4ae0985"] }, Open ]], Cell[CellGroupData[{ @@ -4791,15 +4663,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[372]:=",ExpressionUUID->"e5221a03-e942-4167-90f2-a148298a34bf"], + CellLabel->"In[69]:=",ExpressionUUID->"e5221a03-e942-4167-90f2-a148298a34bf"], Cell[BoxData["51.145215962859936`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994074198196261*^9, 3.9940742151460247`*^9}, { - 3.994074250621415*^9, 3.99407427059237*^9}}, - CellLabel-> - "Out[372]=",ExpressionUUID->"98638f7d-9775-482d-976a-cc30f73a745a"] + 3.994074250621415*^9, 3.99407427059237*^9}, 3.994386346727906*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"21bc6762-39c8-4fa0-8009-30379c912e40"] }, Open ]], Cell[CellGroupData[{ @@ -4857,36 +4727,46 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[373]:=",ExpressionUUID->"55053f2f-a87c-49b6-b5f3-b1ad3a8687cd"], + CellLabel->"In[70]:=",ExpressionUUID->"55053f2f-a87c-49b6-b5f3-b1ad3a8687cd"], Cell[BoxData["674.8474263523988`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994074198207098*^9, 3.9940742151610737`*^9}, { - 3.99407425063161*^9, 3.9940742706025248`*^9}}, - CellLabel-> - "Out[373]=",ExpressionUUID->"7ddf38de-738b-4105-ab5d-7edef50340a0"] + 3.99407425063161*^9, 3.9940742706025248`*^9}, 3.994386346745544*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"6bd71693-85d5-4569-8a27-bf0666f0b522"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.3983268181"}]], "Input", - CellChangeTimes->{3.9918505481678543`*^9, - 3.99423609080558*^9},ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], + CellChangeTimes->{3.9918505481678543`*^9, 3.99423609080558*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], + +Cell[BoxData["0.3983268181`"], "Output", + CellChangeTimes->{3.9943863467604628`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"3e1681e1-bd22-4109-a012-babcee96bb5e"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991850549355442*^9, - 3.991850549360302*^9}},ExpressionUUID->"7730e455-e5f4-194b-b761-\ -e7a6896afd10"], + CellChangeTimes->{{3.991850549355442*^9, 3.991850549360302*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.1140433738"}]], "Input", - CellChangeTimes->{3.991850550777445*^9, - 3.99423609529844*^9},ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], + CellChangeTimes->{3.991850550777445*^9, 3.99423609529844*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], + +Cell[BoxData["0.1140433738`"], "Output", + CellChangeTimes->{3.994386346797429*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"63cdf459-b739-4761-b54c-04687872e607"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918505524437046`*^9, - 3.991850552447544*^9}},ExpressionUUID->"86df0a71-aa65-aa41-b8f1-\ -8c5c5be10fe8"], + CellChangeTimes->{{3.9918505524437046`*^9, 3.991850552447544*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ @@ -4931,9 +4811,12 @@ Cell[BoxData[ RowBox[{"1.16", "*", SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], - ")"}]}]], "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], + ")"}]}]], "Input", + CellLabel->"In[75]:=",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[BoxData["2.3793916761039806`*^-53"], "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[BoxData["1.459454531271633`*^-53"], "Output", + CellChangeTimes->{3.994386346821665*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"2d2e5b83-06d4-4c44-a60a-27995d42df8f"] }, Open ]], Cell[CellGroupData[{ @@ -4967,11 +4850,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915577064670105`*^9},ExpressionUUID->"c16f367e-d189-2745-b3b8-\ -a9b137c5e3b6"], + CellChangeTimes->{3.9915577064670105`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[BoxData["5.0207251137958644`*^-55"], "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[BoxData["5.829838991756193`*^-55"], "Output", + CellChangeTimes->{3.994386346835829*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"51de74d9-9160-4944-8dc7-0b0842d2d624"] }, Open ]], Cell[CellGroupData[{ @@ -5004,11 +4888,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557709328657*^9, - 3.991557711123291*^9}},ExpressionUUID->"b7d001ae-480c-4b41-8df9-\ -8010347227f7"], + CellChangeTimes->{{3.991557709328657*^9, 3.991557711123291*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[BoxData["1.8713726427856714`*^-54"], "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[BoxData["6.278000809847612`*^-55"], "Output", + CellChangeTimes->{3.9943863468499193`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"280d82a6-af39-4acc-b427-e9fdcea63657"] }, Open ]], Cell[CellGroupData[{ @@ -5030,10 +4915,12 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ih", "*", "Ir"}], - RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"d15e5e59-9ad8-\ -e247-a132-b43b2736212a"], + RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", + CellLabel->"In[78]:=",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[BoxData["25.178011816139865`"], "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[BoxData["8.735177801941811`"], "Output", + CellChangeTimes->{3.9943863468648043`*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"bfd3376a-9fbf-497a-9cb4-74ff6faaa712"] }, Open ]], Cell[CellGroupData[{ @@ -5058,10 +4945,12 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", - RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input",Expre\ -ssionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], + RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", + CellLabel->"In[79]:=",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[BoxData["37.88040277230648`"], "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[BoxData["19.029221876791865`"], "Output", + CellChangeTimes->{3.994386346878813*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"31b4b29d-2eb5-4449-873f-6f61f820957a"] }, Open ]], Cell[CellGroupData[{ @@ -5069,10 +4958,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb3"]]}]], "Input",ExpressionUUID->"906db7f6-73f3-8a4e-\ -88a4-7c75445a4f32"], + FractionBox["Kb", "Qb3"]]}]], "Input", + CellLabel->"In[80]:=",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[BoxData["0.7475613664924765`"], "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[BoxData["2.4197284665847705`"], "Output", + CellChangeTimes->{3.994386346893406*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"f835e9ff-77f0-4bc9-8d06-1c3fb714c65f"] }, Open ]], Cell[CellGroupData[{ @@ -5080,10 +4971,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ - FractionBox["Kw", "Qw3"]]}]], "Input",ExpressionUUID->"731b68b1-c44a-6c4a-\ -a9f8-bc957ede9a68"], + FractionBox["Kw", "Qw3"]]}]], "Input", + CellLabel->"In[81]:=",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[BoxData["3.219272026986442`"], "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[BoxData["5.955144212473676`"], "Output", + CellChangeTimes->{3.994386346906953*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"4d0402b1-7ed3-4809-b410-8cb9108edb6a"] }, Open ]], Cell[CellGroupData[{ @@ -5091,10 +4984,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ - RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input",ExpressionUUID->"71af6813-\ -eb8f-4944-8d03-7bcd77a7b4b4"], + RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", + CellLabel->"In[82]:=",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[BoxData["121.94732101586592`"], "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[BoxData["113.32176052745453`"], "Output", + CellChangeTimes->{3.994386346935601*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"b7b522d4-244a-4ac6-9c24-3f02f5439b1b"] }, Open ]], Cell[CellGroupData[{ @@ -5102,10 +4997,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"28815b73-\ -08dc-e64f-8823-2a55ad6b8ca8"], + RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", + CellLabel->"In[83]:=",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[BoxData["18.822108918837237`"], "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[BoxData["21.136758388037983`"], "Output", + CellChangeTimes->{3.994386346948616*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"c5a48ea8-aaef-4e02-807e-2f1330dc5ec7"] }, Open ]], Cell[CellGroupData[{ @@ -5293,10 +5190,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"137e8d46-8eff-3c47-\ -bf8f-1350d0b8a0bb"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[84]:=",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[BoxData["0.04118782656518991`"], "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[BoxData["0.00805473180610516`"], "Output", + CellChangeTimes->{3.99438634696443*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"9ee44f9b-5b5a-4824-89fa-84de7bf170c2"] }, Open ]], Cell[CellGroupData[{ @@ -5308,18 +5207,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"65edd566-\ -4493-2440-9c51-9fca28ce324b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[85]:=",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], - -Cell[BoxData["4.366771860185336`"], "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[BoxData["9.874597411340009`"], "Output", + CellChangeTimes->{3.9943863472137623`*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"451eb074-2b7a-4d54-82fd-1d4e2df143b9"] }, Open ]], Cell[CellGroupData[{ @@ -5509,10 +5402,12 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"d808e80b-1928-8046-\ -afec-31463f4946cd"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel->"In[86]:=",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[BoxData["0.010567083454288358`"], "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[BoxData["0.04676727841501387`"], "Output", + CellChangeTimes->{3.994386347230775*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"d7c23da4-59c1-4173-b1a5-1e7b5bd4abcc"] }, Open ]], Cell[CellGroupData[{ @@ -5524,18 +5419,12 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"56b1717f-\ -bc75-4047-98f0-7a0dede3f8a9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel->"In[87]:=",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], - -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[BoxData["4.098018287080469`"], "Output", + CellChangeTimes->{3.994386347467279*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"464aee4a-9652-48ff-88ce-9a05caffcf1e"] }, Open ]], Cell[CellGroupData[{ @@ -5626,10 +5515,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-\ -f74418e31aeb"], + ")"}]}]}]], "Input", + CellLabel->"In[88]:=",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[BoxData["0.046564779467990605`"], "Output", + CellChangeTimes->{3.994386347489985*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"df74ea0b-f6ee-4175-bd63-2a63a4e5682a"] }, Open ]], Cell[CellGroupData[{ @@ -5717,10 +5608,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-\ -91d5391478d5"], + ")"}]}]}]], "Input", + CellLabel->"In[89]:=",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[BoxData["0.9534352205320095`"], "Output", + CellChangeTimes->{3.994386347523623*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"f3f1a969-5cb4-416f-8db6-da57c3fadec9"] }, Open ]], Cell[CellGroupData[{ @@ -5841,16 +5734,18 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"bea639c9-f172-\ -ef4e-9454-9d4e027f5fa2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel->"In[90]:=",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[BoxData["0.04439650078108801`"], "Output", + CellChangeTimes->{3.994386347548924*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"c275be10-dff7-498a-bc01-65780aa13d5c"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"752e2dd5-bee6-\ -2048-8697-fe84d79611fa"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ @@ -5911,27 +5806,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918505674491863`*^9},ExpressionUUID->"f8b12d93-5bd9-8641-aa98-\ -3d78ebb0f21b"], + CellChangeTimes->{3.9918505674491863`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.0650390507166364`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 92, 1, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386347600691*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"725a15f6-3540-4cfc-be1c-17f41fbe9812"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"42c1a263-2456-664a-bb33-c5fe841cb412"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.385766778768389`*^-200\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 92, 2, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943863476747427`*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"cb22a17c-a89e-465b-b73b-f13c92ea5b12"], -Cell[BoxData["4.366771860185332`"], "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.265334742437035`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386347680806*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"ed9aef12-f086-4c18-9141-93e76716e6d1"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 92, 4, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386347686111*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"1a00fea7-ea30-4c22-a711-28f6daee0f51"], + +Cell[BoxData["9.874597411340003`"], "Output", + CellChangeTimes->{3.99438635085919*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"3770d99a-9a1c-4990-bb40-aefa30bc28ec"] }, Open ]], Cell[CellGroupData[{ @@ -5993,26 +5931,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185057022003*^9},ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], + CellChangeTimes->{3.99185057022003*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"be4d7bfb-c18e-564a-93ce-3f42607886e7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.0650390507166364`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 93, 5, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386351018018*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"41521927-570c-42b3-8448-1f30671c5845"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.385766778768389`*^-200\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 93, 6, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943863510271893`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"02a5dd61-93a4-45a6-9864-b892c7c793ae"], -Cell[BoxData["8.621193087541219`"], "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.265334742437035`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943863510392942`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"740dcc1b-abfa-48fd-af93-2e6f26bdda07"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 93, 8, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386351045364*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"e087c9da-596e-4b69-8d09-5f325448d0ac"], + +Cell[BoxData["4.098018287080467`"], "Output", + CellChangeTimes->{3.99438635438618*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"adaee3eb-f1cd-41d2-a2d6-ddf8dd97bad7"] }, Open ]], Cell[CellGroupData[{ @@ -6068,357 +6050,392 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505747312756`*^9},ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-\ -12d8b19f0936"], + CellChangeTimes->{3.9918505747312756`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d3cb6fbc-3803-0541-80d1-8cab47341c44"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d8687e0f-2f42-0543-a749-78a1ff3c9572"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -2.67879 2.97603 [ -[.15608 .28474 -6 -9 ] -[.15608 .28474 6 0 ] -[.28836 .28474 -6 -9 ] -[.28836 .28474 6 0 ] -[.42063 .28474 -6 -9 ] -[.42063 .28474 6 0 ] -[.55291 .28474 -9 -9 ] -[.55291 .28474 9 0 ] -[.68519 .28474 -9 -9 ] -[.68519 .28474 9 0 ] -[.81746 .28474 -9 -9 ] -[.81746 .28474 9 0 ] -[.94974 .28474 -9 -9 ] -[.94974 .28474 9 0 ] -[.01131 .14844 -24 -4.5 ] -[.01131 .14844 0 4.5 ] -[.01131 .44604 -24 -4.5 ] -[.01131 .44604 0 4.5 ] -[.01131 .59484 -18 -4.5 ] -[.01131 .59484 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 -.15608 .29724 m -.15608 .30349 L -s -[(25)] .15608 .28474 0 1 Mshowa -.28836 .29724 m -.28836 .30349 L -s -[(50)] .28836 .28474 0 1 Mshowa -.42063 .29724 m -.42063 .30349 L -s -[(75)] .42063 .28474 0 1 Mshowa -.55291 .29724 m -.55291 .30349 L -s -[(100)] .55291 .28474 0 1 Mshowa -.68519 .29724 m -.68519 .30349 L -s -[(125)] .68519 .28474 0 1 Mshowa -.81746 .29724 m -.81746 .30349 L -s -[(150)] .81746 .28474 0 1 Mshowa -.94974 .29724 m -.94974 .30349 L -s -[(175)] .94974 .28474 0 1 Mshowa -.125 Mabswid -.05026 .29724 m -.05026 .30099 L -s -.07672 .29724 m -.07672 .30099 L -s -.10317 .29724 m -.10317 .30099 L -s -.12963 .29724 m -.12963 .30099 L -s -.18254 .29724 m -.18254 .30099 L -s -.20899 .29724 m -.20899 .30099 L -s -.23545 .29724 m -.23545 .30099 L -s -.2619 .29724 m -.2619 .30099 L -s -.31481 .29724 m -.31481 .30099 L -s -.34127 .29724 m -.34127 .30099 L -s -.36772 .29724 m -.36772 .30099 L -s -.39418 .29724 m -.39418 .30099 L -s -.44709 .29724 m -.44709 .30099 L -s -.47354 .29724 m -.47354 .30099 L -s -.5 .29724 m -.5 .30099 L -s -.52646 .29724 m -.52646 .30099 L -s -.57937 .29724 m -.57937 .30099 L -s -.60582 .29724 m -.60582 .30099 L -s -.63228 .29724 m -.63228 .30099 L -s -.65873 .29724 m -.65873 .30099 L -s -.71164 .29724 m -.71164 .30099 L -s -.7381 .29724 m -.7381 .30099 L -s -.76455 .29724 m -.76455 .30099 L -s -.79101 .29724 m -.79101 .30099 L -s -.84392 .29724 m -.84392 .30099 L -s -.87037 .29724 m -.87037 .30099 L -s -.89683 .29724 m -.89683 .30099 L -s -.92328 .29724 m -.92328 .30099 L -s -.97619 .29724 m -.97619 .30099 L -s -.25 Mabswid -0 .29724 m -1 .29724 L -s -.02381 .14844 m -.03006 .14844 L -s -[(0.95)] .01131 .14844 1 0 Mshowa -.02381 .44604 m -.03006 .44604 L -s -[(1.05)] .01131 .44604 1 0 Mshowa -.02381 .59484 m -.03006 .59484 L -s -[(1.1)] .01131 .59484 1 0 Mshowa -.125 Mabswid -.02381 .02939 m -.02756 .02939 L -s -.02381 .05915 m -.02756 .05915 L -s -.02381 .08892 m -.02756 .08892 L -s -.02381 .11868 m -.02756 .11868 L -s -.02381 .1782 m -.02756 .1782 L -s -.02381 .20796 m -.02756 .20796 L -s -.02381 .23772 m -.02756 .23772 L -s -.02381 .26748 m -.02756 .26748 L -s -.02381 .327 m -.02756 .327 L -s -.02381 .35676 m -.02756 .35676 L -s -.02381 .38652 m -.02756 .38652 L -s -.02381 .41628 m -.02756 .41628 L -s -.02381 .4758 m -.02756 .4758 L -s -.02381 .50556 m -.02756 .50556 L -s -.02381 .53532 m -.02756 .53532 L -s -.02381 .56508 m -.02756 .56508 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 -.5 Mabswid -.02381 .01472 m -.02499 .01472 L -.02605 .01472 L -.02729 .01473 L -.02846 .01474 L -.03053 .01478 L -.03279 .01482 L -.03527 .01489 L -.0379 .01499 L -.04262 .0152 L -.04749 .01548 L -.05205 .0158 L -.06244 .01675 L -.07305 .01801 L -.08274 .01944 L -.10458 .02358 L -.12357 .02821 L -.14429 .03435 L -.18493 .04963 L -.22406 .06826 L -.26565 .09204 L -.30571 .11858 L -.34426 .14717 L -.38527 .1805 L -.42475 .215 L -.46273 .24996 L -.50315 .28853 L -.54206 .3264 L -.58342 .36674 L -.62326 .40497 L -.66159 .44044 L -.70238 .47601 L -.74164 .50741 L -.77939 .53432 L -.8196 .55879 L -.85828 .57771 L -.87793 .58543 L -.89942 .59234 L -.91995 .59741 L -.92911 .59917 L -.93905 .60073 L -.94426 .60141 L -.94906 .60194 L -.95356 .60236 L -.95851 .60273 L -.96295 .60299 L -.9671 .60316 L -.96939 .60323 L -.97148 .60328 L -.97264 .6033 L -Mistroke -.9739 .60331 L -.97509 .60332 L -.97619 .60332 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-19.402618477936908, \ -0.8923747627909967, 0.7099700316630947, \ -0.001262238128389079}},ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-\ -c578eb57eb6a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VVsbAHCzMnSTzFHGIkoOosF6jZEhRWWO45ytVOZkiFLRJxFSuBEV +kRApmW4Rt4QQSgk555jnmR1X3+qP/ezn96y93/Wud62115aleh+jc7CxsQ3j +68/dt3nX9tetzXq5m++/9m9mIr3JLC2qUT7qs/4w+cd9GdpJCkZV6D9j06QA +bGvaJx4Byr/IflU69wJ2cdDlWm6jJtQWYapyETv6vXj15bzPqGbkg2Qwdnmr +74NVjS9I3jItOBR7tKvhUnDlN+TT8K9JOLbkgLzjomE3Ko80uhqBbT51Sde/ +6Se6kiuuGon9ZnWUPyiPgfrdDIyisb9GiIWWerFQ5mBNQyz2JI/R6LzGAOrw +SX6biM1zy8eesjSI9KFWLgVbRii93rdyGOn8bTyfjm0ltfhk0nAc3ZI5wszD +JjLlRNXWTSL1qa9rxdiXFY9Enm2aQlP3SqPLsb+JdewJyJtB+xfCRz9i0xw8 +z9y5NYvcw09Xt2FPp7E9fOE1hxjXnnF1Y6+TU9s4o7GARAfRtynsJFrtoY0i +i6haP9HjF/a2HPvLu5cWUZEY0LlbmEhHNWryfOUy0jpf9GwL9mntn02jhqvI +IWGeZo09H3SBi0/pP9TuSfFwwb5SyX9Aed0a8qxr6zyHnQI6zzyafiPpfi2u +GGxadr2RXx47PIx4HN2Enff+Tl+EFAdwMlbWerCnh1wuJdzigM3Klcwp7Esq +CyVFXpxwbaPfwuZWnO9zWfkpDW5g1vw4RMPuah1/s/aYG/zrItWDsbfNvnbY +IMIDhSEPbsRh52taJaot8cCeo9siKrDrykPYz1WugwnOyIdin5loobb957Ch +AMik/UwZxN5kIbAx9I0AJD6eq+NqYyL1DiMQ1BWEiaIRP3lsz/5XmXt2bYAr +ctdsqdg+HE3qBwU2QsFUxq5B7AG5wpnIRSFwrtEDng5cH6JhfQtlE4QLOceo +YnM8G5QV990EZ2bD7Gywt1G2Hssb2wQzSa1Bj7AdDONfNPcJQ53FymeTL0zU +4u7nL9YoAh+kbg/nfGWi3py4GNd1orD4mrT9ij0+lvf4qbEoXN9825C7k4n4 +Aljt+6tFwVrJOIeGbXTdVtP1lRjM/lKLVv7GRBVZ2gu5GRLwfjyyvPE7E2UN +/ArcFyANOh9Dmb49TGR6/Eavf4E0nFjb7pWPPV4nbFIwKA17HuWdHcLWzFIV +2WYvA9+PoyqXXlxPqksJt95W2BK3WnLsJxPNTvVdHL62DTSP3GSzZjCR8Hmj +lyWWclDqaqiYOcBEg1l8p6095WBIkm92GLusu1VqIkoOCDPhPRqDTORk4XxN +qVoO0nlXud9jZ+0MPJaqIQ83ziTwzw3h/kdzpsPFFODdmz3R1FEmsvXgVzvM +UIS0+BzP5CkmQoHHNU7+pwhaEYzWcWyVyIy9NAklWI09m20wzURsjykG4UeV +4NX3K6lT2AW9jidf1CgB3Xd7odUs3p8n8iMkH20HVsfuWNkFnJ+R5ddRqjLU +LqbrS64w0WOb5B9L4crgLnk2JAw7jsro47qvDPWEhBwDm3blwphMuzII/FZ9 +83SViYSq0tlsDFWggixXhjW8fiiTKpXyO6Giq6Etgp2FpORuX47pVwUh+e54 +u3UsVHVzXpnkUAMjAszbsZ3m7DsIWTVgT2f8z2o9Cz2oU1A2cFGDq5SlWBM+ +FpLzqGhb7lSDsLfa1QcEWEglf0CRaNwFf8s4N+pvZCFpKRlim706NLX4FxWK +s5BqdoDACtKA0jleb5GdLESlXVtQs9KAZsVbjU+wU+QTe12dNGBmq2SajioL +cT56XvQ+CD9v7ZPqrMZCXQ9GbROLNcBk82fugt0sFJ3imq4sT4HGG5+fuWmy +0GCMxS47Hk24IHHSTU6PhR76KVi/atKCJoebOzhtWOhFb3WMeLcWFPZe9KjG +fnfY+UPomBYEcP5WD7dloX65e3oGfNpg0c1NWznOQkrtvGoth7RBSV7ZfNWO +hfIpY+tH3uH2xaDt4qdYqGy+uHZL+V7oDzjpUXaWhVoD0d7r2bpgnMRISo9i +IVmXL1bO5w5CYldNF6OGhei/SwulgwGafRc0edn7kdhYGa8Y1QDqGB+OmFv1 +owDKge5EFSMYz2tzH3rQj6gTq/XCo8YgNKq0IL7YjwoM/HkzWg6B4W7jTBmX +AZQ171mTn2QGfGM/GkzrB9CyvvinusvmsDje6ZtqPIh62DhnGG6WgMJmyi0b +B5HXFu/4CPkjQOPimms7OoQKz9RX3420hkXZ15nvJodQyJzE0s4zR6F05NQZ +RswwWjhscuLDqWMgaPq/z9wGI0jXMUF/4KgNiGhVOyqyj6I2iXTPOoot1JZW +VWW+GUWST65V5e44Dh78wq2eKWOorE/FwkrwBAyP7Nzh7T2OZDqmPQInToDj +j1puFcsJRLmbkP+47yT8iLzwu8NsEqVzze1KrLWD6eGDAXUwhUr1d3dFltsD +MuBo+0t1GqXsvSm0mucA0gqKqc0V06jlR3YU5ZYjbNBbGLlrNINeWaYp+Fxx +ApOuPWWRvTNo5rwNmxfNGRJf8Xt9951FCybKpycNXWB+6egyyTWHcie+L/tr +nwLhHSW6ZU/mkN3DbHdnAVeY/Vly8K7ePCp5YX6K84YrSDQ0HJtjziNdqTYy +mnQFO1JbuTNkAcn3eXR9PuMGQTVhPH0Ci6if/+yRNJYbPAicfEh9soha46zc +Dx2nAuPTY5XTu5dQUlAG/4VWKowv3KIoVS6hqje/SXczd7gV+PphlO4y+ssJ +blAq3MFu9RNwZy0jXdfJ3EhNGtRSzn00Wk+iJ6nT/lbaNKB8887M5CPR5vZZ +PTEdGtwo9olf4SfRpPFSR+5+Gkzbbqgo3EDi7xcbe5MBDSpP66vwbSbRhiUh ++01HaZA960i5K0Oi/lit9RnnaXAr7F4KqUGiuMpLZ8qe0GBltLd1xI5E5zWS +dYNyaVDxqquE04FEFk+L1+vk0SCpwil7iyOJ+JIHn74uoMHykR8vzJ1JFOln +PVr6kgYHNiv6PHAj0SVlhbOv3uH4Tnl7RT1J5JnceO5FLw3YJz3kLUNIZLZh +8IBfHw0CytxsTENJtCOSTVCDSQOdw1HRBpdINOinVVA8QAOukmO8muEkcrPK +mCgap4F2tIQB/1US2XH7ez3/hfvfIhd+M5pEh/wlffJF6SA+KebZkEyidxlR +hxPF6cB8HnK1LIVEB5pmFYIk6TDMu3g2O5VE6oqN3w1l6PB9Qrw49D6JJDpD +DX8o0qFIw2ZVIoNEY/t6RPm06JDV9cle+gmJbnNk/uNhQ4eqWFWngyV4/LsF +UiyP02E3LUuY+yWJrjsG+VFO0qG6cPxOI3bQS+vtvx3oYP90dcK2FOdPsCfc +o9KhVDWe3b6cRJQGKu1fXzoMVLj4K70lUWeCIr98PB1OHldf6fhIokIkeHo4 +gQ7O7N6Fng04/sR8XcEdOuyY+sfiN7aGWV24TjId7rhNmCk24fljc5+1fECH +ZxKmBrRmEpl4Z34PyqdDbVHk+sI2EklL/09br5AOB4JKHTXaSTTf4H2HswiP +P+b+vVfYj5SQZVwJrl/cwr9lHST6r6en+nEFHf5ukOZ98ZVELy2kcpvr6eCq +07ng3UWimF8c3EkNdLjK7VLLxKbmjrrZN9Hh4qmoi7Y/SLSRq0Kqv4UOXar6 +dzS7SXSu0u42+ZUOmTkid4d6SCSvci9QYYAOt/NZueIMEv3qDGsfGaRDTlFN +WzB2ayRd/fkwHdZzBDO+Y4czNEd1x+kQVM9fcI9Joq6Uducjc3TYJ75KcvST +KJFXyDiEnYDzKW3HnwySqGq2xzGAkwApla6xNeyhnjw/L24CpmpVt54Ywuvh +pVEmdT0BQ9EHndmG8XpzDVo5LESAVfU0xWgE529hvMlYmIC/X6oXJ2Dv37tJ +GYkQoPK2u6EHO14w/wRFgsD/e5vafUdxe8XPYilZAkwDQDN6jEREdn69iDwB +V94qJzZix8cH//xLkQBp4TcxAuO4P0JYkEuZgGLN+KM3seOFD50eVyeg0/62 +4oUJElWsCV8e1CBAMuWqSz72wEjf3T5NAtK6wjSY2PuqQ2o7dAhw7TZ8ZjaJ +9/O5Qpl/gIANVqq9vFN4v9uFar02IECpJ2SCgq1raGpRjA/3dfcskl2w4ySY +wdmmBNhsgorn2GVcz+MzDhMgZm5C+YrNmgrNSbUgwC8lxWQFW+e9yJdYawLY +Eqb260/j+S5mjt04RoBnaLc0FTs27TnHVVsC1pYHUiOwmX5m6oF2BExTFVyr +sAVdRA/5OOD87Y3zOrF1zFjOnk4EcC47xM38eX9rWIyLK56fIH0F2RmcD9/h +R3ZUAt7s4fiqjc1cEC0/RiNgXC9Z1hxbkMFqsSAIuFdJ8rhg6zQVDZqcJiD4 +gHyUNzb1ddh/4EnAfItgxmXs2EeHN+8/R8DGtZKjcX/ix4rt1PIi4Eb9xgf3 +/8QP6tff7UPAP3lbr+dgC9CK7ZT9CPiS2s35AnvvkXBv+QACnnAZSVf+ib/P +PEo6kIB37cda32HfUhRPFwsiwPcMj/RH7NKNAyVCIQS0PHTibMZmrBQ38F8i +4FmbzbXPf+IPhTO4wwlIbhxNa8fWbjNf/n2ZgP4v26w7sP8PUew3WA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VVsbAHCzMnSTzFHGIkoOosF6jZEhRWWO45ytVOZkiFLRJxFSuBEV +kRApmW4Rt4QQSgk555jnmR1X3+qP/ezn96y93/Wud62115aleh+jc7CxsQ3j +68/dt3nX9tetzXq5m++/9m9mIr3JLC2qUT7qs/4w+cd9GdpJCkZV6D9j06QA +bGvaJx4Byr/IflU69wJ2cdDlWm6jJtQWYapyETv6vXj15bzPqGbkg2Qwdnmr +74NVjS9I3jItOBR7tKvhUnDlN+TT8K9JOLbkgLzjomE3Ko80uhqBbT51Sde/ +6Se6kiuuGon9ZnWUPyiPgfrdDIyisb9GiIWWerFQ5mBNQyz2JI/R6LzGAOrw +SX6biM1zy8eesjSI9KFWLgVbRii93rdyGOn8bTyfjm0ltfhk0nAc3ZI5wszD +JjLlRNXWTSL1qa9rxdiXFY9Enm2aQlP3SqPLsb+JdewJyJtB+xfCRz9i0xw8 +z9y5NYvcw09Xt2FPp7E9fOE1hxjXnnF1Y6+TU9s4o7GARAfRtynsJFrtoY0i +i6haP9HjF/a2HPvLu5cWUZEY0LlbmEhHNWryfOUy0jpf9GwL9mntn02jhqvI +IWGeZo09H3SBi0/pP9TuSfFwwb5SyX9Aed0a8qxr6zyHnQI6zzyafiPpfi2u +GGxadr2RXx47PIx4HN2Enff+Tl+EFAdwMlbWerCnh1wuJdzigM3Klcwp7Esq +CyVFXpxwbaPfwuZWnO9zWfkpDW5g1vw4RMPuah1/s/aYG/zrItWDsbfNvnbY +IMIDhSEPbsRh52taJaot8cCeo9siKrDrykPYz1WugwnOyIdin5loobb957Ch +AMik/UwZxN5kIbAx9I0AJD6eq+NqYyL1DiMQ1BWEiaIRP3lsz/5XmXt2bYAr +ctdsqdg+HE3qBwU2QsFUxq5B7AG5wpnIRSFwrtEDng5cH6JhfQtlE4QLOceo +YnM8G5QV990EZ2bD7Gywt1G2Hssb2wQzSa1Bj7AdDONfNPcJQ53FymeTL0zU +4u7nL9YoAh+kbg/nfGWi3py4GNd1orD4mrT9ij0+lvf4qbEoXN9825C7k4n4 +Aljt+6tFwVrJOIeGbXTdVtP1lRjM/lKLVv7GRBVZ2gu5GRLwfjyyvPE7E2UN +/ArcFyANOh9Dmb49TGR6/Eavf4E0nFjb7pWPPV4nbFIwKA17HuWdHcLWzFIV +2WYvA9+PoyqXXlxPqksJt95W2BK3WnLsJxPNTvVdHL62DTSP3GSzZjCR8Hmj +lyWWclDqaqiYOcBEg1l8p6095WBIkm92GLusu1VqIkoOCDPhPRqDTORk4XxN +qVoO0nlXud9jZ+0MPJaqIQ83ziTwzw3h/kdzpsPFFODdmz3R1FEmsvXgVzvM +UIS0+BzP5CkmQoHHNU7+pwhaEYzWcWyVyIy9NAklWI09m20wzURsjykG4UeV +4NX3K6lT2AW9jidf1CgB3Xd7odUs3p8n8iMkH20HVsfuWNkFnJ+R5ddRqjLU +LqbrS64w0WOb5B9L4crgLnk2JAw7jsro47qvDPWEhBwDm3blwphMuzII/FZ9 +83SViYSq0tlsDFWggixXhjW8fiiTKpXyO6Giq6Etgp2FpORuX47pVwUh+e54 +u3UsVHVzXpnkUAMjAszbsZ3m7DsIWTVgT2f8z2o9Cz2oU1A2cFGDq5SlWBM+ +FpLzqGhb7lSDsLfa1QcEWEglf0CRaNwFf8s4N+pvZCFpKRlim706NLX4FxWK +s5BqdoDACtKA0jleb5GdLESlXVtQs9KAZsVbjU+wU+QTe12dNGBmq2SajioL +cT56XvQ+CD9v7ZPqrMZCXQ9GbROLNcBk82fugt0sFJ3imq4sT4HGG5+fuWmy +0GCMxS47Hk24IHHSTU6PhR76KVi/atKCJoebOzhtWOhFb3WMeLcWFPZe9KjG +fnfY+UPomBYEcP5WD7dloX65e3oGfNpg0c1NWznOQkrtvGoth7RBSV7ZfNWO +hfIpY+tH3uH2xaDt4qdYqGy+uHZL+V7oDzjpUXaWhVoD0d7r2bpgnMRISo9i +IVmXL1bO5w5CYldNF6OGhei/SwulgwGafRc0edn7kdhYGa8Y1QDqGB+OmFv1 +owDKge5EFSMYz2tzH3rQj6gTq/XCo8YgNKq0IL7YjwoM/HkzWg6B4W7jTBmX +AZQ171mTn2QGfGM/GkzrB9CyvvinusvmsDje6ZtqPIh62DhnGG6WgMJmyi0b +B5HXFu/4CPkjQOPimms7OoQKz9RX3420hkXZ15nvJodQyJzE0s4zR6F05NQZ +RswwWjhscuLDqWMgaPq/z9wGI0jXMUF/4KgNiGhVOyqyj6I2iXTPOoot1JZW +VWW+GUWST65V5e44Dh78wq2eKWOorE/FwkrwBAyP7Nzh7T2OZDqmPQInToDj +j1puFcsJRLmbkP+47yT8iLzwu8NsEqVzze1KrLWD6eGDAXUwhUr1d3dFltsD +MuBo+0t1GqXsvSm0mucA0gqKqc0V06jlR3YU5ZYjbNBbGLlrNINeWaYp+Fxx +ApOuPWWRvTNo5rwNmxfNGRJf8Xt9951FCybKpycNXWB+6egyyTWHcie+L/tr +nwLhHSW6ZU/mkN3DbHdnAVeY/Vly8K7ePCp5YX6K84YrSDQ0HJtjziNdqTYy +mnQFO1JbuTNkAcn3eXR9PuMGQTVhPH0Ci6if/+yRNJYbPAicfEh9soha46zc +Dx2nAuPTY5XTu5dQUlAG/4VWKowv3KIoVS6hqje/SXczd7gV+PphlO4y+ssJ +blAq3MFu9RNwZy0jXdfJ3EhNGtRSzn00Wk+iJ6nT/lbaNKB8887M5CPR5vZZ +PTEdGtwo9olf4SfRpPFSR+5+Gkzbbqgo3EDi7xcbe5MBDSpP66vwbSbRhiUh ++01HaZA960i5K0Oi/lit9RnnaXAr7F4KqUGiuMpLZ8qe0GBltLd1xI5E5zWS +dYNyaVDxqquE04FEFk+L1+vk0SCpwil7iyOJ+JIHn74uoMHykR8vzJ1JFOln +PVr6kgYHNiv6PHAj0SVlhbOv3uH4Tnl7RT1J5JnceO5FLw3YJz3kLUNIZLZh +8IBfHw0CytxsTENJtCOSTVCDSQOdw1HRBpdINOinVVA8QAOukmO8muEkcrPK +mCgap4F2tIQB/1US2XH7ez3/hfvfIhd+M5pEh/wlffJF6SA+KebZkEyidxlR +hxPF6cB8HnK1LIVEB5pmFYIk6TDMu3g2O5VE6oqN3w1l6PB9Qrw49D6JJDpD +DX8o0qFIw2ZVIoNEY/t6RPm06JDV9cle+gmJbnNk/uNhQ4eqWFWngyV4/LsF +UiyP02E3LUuY+yWJrjsG+VFO0qG6cPxOI3bQS+vtvx3oYP90dcK2FOdPsCfc +o9KhVDWe3b6cRJQGKu1fXzoMVLj4K70lUWeCIr98PB1OHldf6fhIokIkeHo4 +gQ7O7N6Fng04/sR8XcEdOuyY+sfiN7aGWV24TjId7rhNmCk24fljc5+1fECH +ZxKmBrRmEpl4Z34PyqdDbVHk+sI2EklL/09br5AOB4JKHTXaSTTf4H2HswiP +P+b+vVfYj5SQZVwJrl/cwr9lHST6r6en+nEFHf5ukOZ98ZVELy2kcpvr6eCq +07ng3UWimF8c3EkNdLjK7VLLxKbmjrrZN9Hh4qmoi7Y/SLSRq0Kqv4UOXar6 +dzS7SXSu0u42+ZUOmTkid4d6SCSvci9QYYAOt/NZueIMEv3qDGsfGaRDTlFN +WzB2ayRd/fkwHdZzBDO+Y4czNEd1x+kQVM9fcI9Joq6Uducjc3TYJ75KcvST +KJFXyDiEnYDzKW3HnwySqGq2xzGAkwApla6xNeyhnjw/L24CpmpVt54Ywuvh +pVEmdT0BQ9EHndmG8XpzDVo5LESAVfU0xWgE529hvMlYmIC/X6oXJ2Dv37tJ +GYkQoPK2u6EHO14w/wRFgsD/e5vafUdxe8XPYilZAkwDQDN6jEREdn69iDwB +V94qJzZix8cH//xLkQBp4TcxAuO4P0JYkEuZgGLN+KM3seOFD50eVyeg0/62 +4oUJElWsCV8e1CBAMuWqSz72wEjf3T5NAtK6wjSY2PuqQ2o7dAhw7TZ8ZjaJ +9/O5Qpl/gIANVqq9vFN4v9uFar02IECpJ2SCgq1raGpRjA/3dfcskl2w4ySY +wdmmBNhsgorn2GVcz+MzDhMgZm5C+YrNmgrNSbUgwC8lxWQFW+e9yJdYawLY +Eqb260/j+S5mjt04RoBnaLc0FTs27TnHVVsC1pYHUiOwmX5m6oF2BExTFVyr +sAVdRA/5OOD87Y3zOrF1zFjOnk4EcC47xM38eX9rWIyLK56fIH0F2RmcD9/h +R3ZUAt7s4fiqjc1cEC0/RiNgXC9Z1hxbkMFqsSAIuFdJ8rhg6zQVDZqcJiD4 +gHyUNzb1ddh/4EnAfItgxmXs2EeHN+8/R8DGtZKjcX/ix4rt1PIi4Eb9xgf3 +/8QP6tff7UPAP3lbr+dgC9CK7ZT9CPiS2s35AnvvkXBv+QACnnAZSVf+ib/P +PEo6kIB37cda32HfUhRPFwsiwPcMj/RH7NKNAyVCIQS0PHTibMZmrBQ38F8i +4FmbzbXPf+IPhTO4wwlIbhxNa8fWbjNf/n2ZgP4v26w7sP8PUew3WA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.5877016626406162, + 1.6215403680811216`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5877016626406175}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.5877016626406162, + 1.6215403680811216`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5877016626406175}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VVsbAHCzMnSTzFHGIkoOosF6jZEhRWWO45ytVOZkiFLRJxFSuBEV +kRApmW4Rt4QQSgk555jnmR1X3+qP/ezn96y93/Wud62115aleh+jc7CxsQ3j +68/dt3nX9tetzXq5m++/9m9mIr3JLC2qUT7qs/4w+cd9GdpJCkZV6D9j06QA +bGvaJx4Byr/IflU69wJ2cdDlWm6jJtQWYapyETv6vXj15bzPqGbkg2Qwdnmr +74NVjS9I3jItOBR7tKvhUnDlN+TT8K9JOLbkgLzjomE3Ko80uhqBbT51Sde/ +6Se6kiuuGon9ZnWUPyiPgfrdDIyisb9GiIWWerFQ5mBNQyz2JI/R6LzGAOrw +SX6biM1zy8eesjSI9KFWLgVbRii93rdyGOn8bTyfjm0ltfhk0nAc3ZI5wszD +JjLlRNXWTSL1qa9rxdiXFY9Enm2aQlP3SqPLsb+JdewJyJtB+xfCRz9i0xw8 +z9y5NYvcw09Xt2FPp7E9fOE1hxjXnnF1Y6+TU9s4o7GARAfRtynsJFrtoY0i +i6haP9HjF/a2HPvLu5cWUZEY0LlbmEhHNWryfOUy0jpf9GwL9mntn02jhqvI +IWGeZo09H3SBi0/pP9TuSfFwwb5SyX9Aed0a8qxr6zyHnQI6zzyafiPpfi2u +GGxadr2RXx47PIx4HN2Enff+Tl+EFAdwMlbWerCnh1wuJdzigM3Klcwp7Esq +CyVFXpxwbaPfwuZWnO9zWfkpDW5g1vw4RMPuah1/s/aYG/zrItWDsbfNvnbY +IMIDhSEPbsRh52taJaot8cCeo9siKrDrykPYz1WugwnOyIdin5loobb957Ch +AMik/UwZxN5kIbAx9I0AJD6eq+NqYyL1DiMQ1BWEiaIRP3lsz/5XmXt2bYAr +ctdsqdg+HE3qBwU2QsFUxq5B7AG5wpnIRSFwrtEDng5cH6JhfQtlE4QLOceo +YnM8G5QV990EZ2bD7Gywt1G2Hssb2wQzSa1Bj7AdDONfNPcJQ53FymeTL0zU +4u7nL9YoAh+kbg/nfGWi3py4GNd1orD4mrT9ij0+lvf4qbEoXN9825C7k4n4 +Aljt+6tFwVrJOIeGbXTdVtP1lRjM/lKLVv7GRBVZ2gu5GRLwfjyyvPE7E2UN +/ArcFyANOh9Dmb49TGR6/Eavf4E0nFjb7pWPPV4nbFIwKA17HuWdHcLWzFIV +2WYvA9+PoyqXXlxPqksJt95W2BK3WnLsJxPNTvVdHL62DTSP3GSzZjCR8Hmj +lyWWclDqaqiYOcBEg1l8p6095WBIkm92GLusu1VqIkoOCDPhPRqDTORk4XxN +qVoO0nlXud9jZ+0MPJaqIQ83ziTwzw3h/kdzpsPFFODdmz3R1FEmsvXgVzvM +UIS0+BzP5CkmQoHHNU7+pwhaEYzWcWyVyIy9NAklWI09m20wzURsjykG4UeV +4NX3K6lT2AW9jidf1CgB3Xd7odUs3p8n8iMkH20HVsfuWNkFnJ+R5ddRqjLU +LqbrS64w0WOb5B9L4crgLnk2JAw7jsro47qvDPWEhBwDm3blwphMuzII/FZ9 +83SViYSq0tlsDFWggixXhjW8fiiTKpXyO6Giq6Etgp2FpORuX47pVwUh+e54 +u3UsVHVzXpnkUAMjAszbsZ3m7DsIWTVgT2f8z2o9Cz2oU1A2cFGDq5SlWBM+ +FpLzqGhb7lSDsLfa1QcEWEglf0CRaNwFf8s4N+pvZCFpKRlim706NLX4FxWK +s5BqdoDACtKA0jleb5GdLESlXVtQs9KAZsVbjU+wU+QTe12dNGBmq2SajioL +cT56XvQ+CD9v7ZPqrMZCXQ9GbROLNcBk82fugt0sFJ3imq4sT4HGG5+fuWmy +0GCMxS47Hk24IHHSTU6PhR76KVi/atKCJoebOzhtWOhFb3WMeLcWFPZe9KjG +fnfY+UPomBYEcP5WD7dloX65e3oGfNpg0c1NWznOQkrtvGoth7RBSV7ZfNWO +hfIpY+tH3uH2xaDt4qdYqGy+uHZL+V7oDzjpUXaWhVoD0d7r2bpgnMRISo9i +IVmXL1bO5w5CYldNF6OGhei/SwulgwGafRc0edn7kdhYGa8Y1QDqGB+OmFv1 +owDKge5EFSMYz2tzH3rQj6gTq/XCo8YgNKq0IL7YjwoM/HkzWg6B4W7jTBmX +AZQ171mTn2QGfGM/GkzrB9CyvvinusvmsDje6ZtqPIh62DhnGG6WgMJmyi0b +B5HXFu/4CPkjQOPimms7OoQKz9RX3420hkXZ15nvJodQyJzE0s4zR6F05NQZ +RswwWjhscuLDqWMgaPq/z9wGI0jXMUF/4KgNiGhVOyqyj6I2iXTPOoot1JZW +VWW+GUWST65V5e44Dh78wq2eKWOorE/FwkrwBAyP7Nzh7T2OZDqmPQInToDj +j1puFcsJRLmbkP+47yT8iLzwu8NsEqVzze1KrLWD6eGDAXUwhUr1d3dFltsD +MuBo+0t1GqXsvSm0mucA0gqKqc0V06jlR3YU5ZYjbNBbGLlrNINeWaYp+Fxx +ApOuPWWRvTNo5rwNmxfNGRJf8Xt9951FCybKpycNXWB+6egyyTWHcie+L/tr +nwLhHSW6ZU/mkN3DbHdnAVeY/Vly8K7ePCp5YX6K84YrSDQ0HJtjziNdqTYy +mnQFO1JbuTNkAcn3eXR9PuMGQTVhPH0Ci6if/+yRNJYbPAicfEh9soha46zc +Dx2nAuPTY5XTu5dQUlAG/4VWKowv3KIoVS6hqje/SXczd7gV+PphlO4y+ssJ +blAq3MFu9RNwZy0jXdfJ3EhNGtRSzn00Wk+iJ6nT/lbaNKB8887M5CPR5vZZ +PTEdGtwo9olf4SfRpPFSR+5+Gkzbbqgo3EDi7xcbe5MBDSpP66vwbSbRhiUh ++01HaZA960i5K0Oi/lit9RnnaXAr7F4KqUGiuMpLZ8qe0GBltLd1xI5E5zWS +dYNyaVDxqquE04FEFk+L1+vk0SCpwil7iyOJ+JIHn74uoMHykR8vzJ1JFOln +PVr6kgYHNiv6PHAj0SVlhbOv3uH4Tnl7RT1J5JnceO5FLw3YJz3kLUNIZLZh +8IBfHw0CytxsTENJtCOSTVCDSQOdw1HRBpdINOinVVA8QAOukmO8muEkcrPK +mCgap4F2tIQB/1US2XH7ez3/hfvfIhd+M5pEh/wlffJF6SA+KebZkEyidxlR +hxPF6cB8HnK1LIVEB5pmFYIk6TDMu3g2O5VE6oqN3w1l6PB9Qrw49D6JJDpD +DX8o0qFIw2ZVIoNEY/t6RPm06JDV9cle+gmJbnNk/uNhQ4eqWFWngyV4/LsF +UiyP02E3LUuY+yWJrjsG+VFO0qG6cPxOI3bQS+vtvx3oYP90dcK2FOdPsCfc +o9KhVDWe3b6cRJQGKu1fXzoMVLj4K70lUWeCIr98PB1OHldf6fhIokIkeHo4 +gQ7O7N6Fng04/sR8XcEdOuyY+sfiN7aGWV24TjId7rhNmCk24fljc5+1fECH +ZxKmBrRmEpl4Z34PyqdDbVHk+sI2EklL/09br5AOB4JKHTXaSTTf4H2HswiP +P+b+vVfYj5SQZVwJrl/cwr9lHST6r6en+nEFHf5ukOZ98ZVELy2kcpvr6eCq +07ng3UWimF8c3EkNdLjK7VLLxKbmjrrZN9Hh4qmoi7Y/SLSRq0Kqv4UOXar6 +dzS7SXSu0u42+ZUOmTkid4d6SCSvci9QYYAOt/NZueIMEv3qDGsfGaRDTlFN +WzB2ayRd/fkwHdZzBDO+Y4czNEd1x+kQVM9fcI9Joq6Uducjc3TYJ75KcvST +KJFXyDiEnYDzKW3HnwySqGq2xzGAkwApla6xNeyhnjw/L24CpmpVt54Ywuvh +pVEmdT0BQ9EHndmG8XpzDVo5LESAVfU0xWgE529hvMlYmIC/X6oXJ2Dv37tJ +GYkQoPK2u6EHO14w/wRFgsD/e5vafUdxe8XPYilZAkwDQDN6jEREdn69iDwB +V94qJzZix8cH//xLkQBp4TcxAuO4P0JYkEuZgGLN+KM3seOFD50eVyeg0/62 +4oUJElWsCV8e1CBAMuWqSz72wEjf3T5NAtK6wjSY2PuqQ2o7dAhw7TZ8ZjaJ +9/O5Qpl/gIANVqq9vFN4v9uFar02IECpJ2SCgq1raGpRjA/3dfcskl2w4ySY +wdmmBNhsgorn2GVcz+MzDhMgZm5C+YrNmgrNSbUgwC8lxWQFW+e9yJdYawLY +Eqb260/j+S5mjt04RoBnaLc0FTs27TnHVVsC1pYHUiOwmX5m6oF2BExTFVyr +sAVdRA/5OOD87Y3zOrF1zFjOnk4EcC47xM38eX9rWIyLK56fIH0F2RmcD9/h +R3ZUAt7s4fiqjc1cEC0/RiNgXC9Z1hxbkMFqsSAIuFdJ8rhg6zQVDZqcJiD4 +gHyUNzb1ddh/4EnAfItgxmXs2EeHN+8/R8DGtZKjcX/ix4rt1PIi4Eb9xgf3 +/8QP6tff7UPAP3lbr+dgC9CK7ZT9CPiS2s35AnvvkXBv+QACnnAZSVf+ib/P +PEo6kIB37cda32HfUhRPFwsiwPcMj/RH7NKNAyVCIQS0PHTibMZmrBQ38F8i +4FmbzbXPf+IPhTO4wwlIbhxNa8fWbjNf/n2ZgP4v26w7sP8PUew3WA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.5877016626406162, 1.6215403680811216`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5877016626406175}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.5877016626406175}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5877016626406162, 1.6215403680811216`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994386669675047*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"3558119f-de61-481a-bd62-cade371e4f86"] }, Open ]], Cell[CellGroupData[{ @@ -6481,444 +6498,536 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918505781608486`*^9},ExpressionUUID->"4b73592e-b155-8f42-b33d-\ -562f8b3faecd"], + CellChangeTimes->{3.9918505781608486`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.614562860923712`*^-270\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 9, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943866701171913`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"7cf26463-2ddd-48da-a231-8ea90b9701ed"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"a2ecd22c-b766-5347-9e03-9d459620be75"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.53429502737323`*^-281\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 10, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386670125944*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"6bca4345-da61-4fbc-8fa7-e3ba94ca5ffa"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.6190535918951046`*^-291\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 11, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943866701327763`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"8ea79e0d-e2e6-48d5-a38c-9cde182c8703"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 6.72103 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .14914 -24 -4.5 ] -[.01131 .14914 0 4.5 ] -[.01131 .28356 -24 -4.5 ] -[.01131 .28356 0 4.5 ] -[.01131 .41798 -24 -4.5 ] -[.01131 .41798 0 4.5 ] -[.01131 .5524 -24 -4.5 ] -[.01131 .5524 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .14914 m -.03006 .14914 L -s -[(0.02)] .01131 .14914 1 0 Mshowa -.02381 .28356 m -.03006 .28356 L -s -[(0.04)] .01131 .28356 1 0 Mshowa -.02381 .41798 m -.03006 .41798 L -s -[(0.06)] .01131 .41798 1 0 Mshowa -.02381 .5524 m -.03006 .5524 L -s -[(0.08)] .01131 .5524 1 0 Mshowa -.125 Mabswid -.02381 .04832 m -.02756 .04832 L -s -.02381 .08193 m -.02756 .08193 L -s -.02381 .11553 m -.02756 .11553 L -s -.02381 .18274 m -.02756 .18274 L -s -.02381 .21635 m -.02756 .21635 L -s -.02381 .24995 m -.02756 .24995 L -s -.02381 .31716 m -.02756 .31716 L -s -.02381 .35077 m -.02756 .35077 L -s -.02381 .38437 m -.02756 .38437 L -s -.02381 .45158 m -.02756 .45158 L -s -.02381 .48519 m -.02756 .48519 L -s -.02381 .51879 m -.02756 .51879 L -s -.02381 .586 m -.02756 .586 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 -.5 Mabswid -.02381 .01472 m -.06244 .18263 L -.10458 .34796 L -.12507 .41668 L -.14415 .47199 L -.16371 .51906 L -.18221 .55405 L -.192 .56876 L -.20263 .58172 L -.21228 .59082 L -.2212 .59698 L -.22586 .59936 L -.22843 .60043 L -.23087 .60129 L -.23313 .60195 L -.2356 .60252 L -.23669 .60272 L -.23784 .6029 L -.23886 .60304 L -.23993 .60315 L -.24059 .6032 L -.24132 .60325 L -.2426 .60331 L -.24332 .60332 L -.2441 .60332 L -.24483 .6033 L -.2455 .60328 L -.24679 .6032 L -.24752 .60314 L -.24819 .60307 L -.25074 .60272 L -.253 .60228 L -.2555 .60165 L -.26055 .59995 L -.26547 .59774 L -.27064 .59486 L -.2799 .58832 L -.30075 .56765 L -.3205 .54159 L -.33886 .51282 L -.37791 .44198 L -.41941 .36071 L -.45939 .28487 L -.49785 .21945 L -.53877 .16105 L -.57818 .1166 L -.61606 .08416 L -.63714 .07001 L -.6564 .05921 L -.69523 .04269 L -Mistroke -.71425 .03672 L -.73499 .0315 L -.7547 .02757 L -.77569 .0243 L -.79714 .02174 L -.81732 .01991 L -.83744 .01853 L -.85592 .01756 L -.87479 .01681 L -.89546 .0162 L -.91501 .01578 L -.93594 .01545 L -.95662 .01522 L -.97619 .01507 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJzVXGmUFEUSbug5kEFuQRiRWxgYDmFmGJiBEVRuWFhwXcHHcx6HKCCzAquy -gLq8VZBBDmVRkFMRlCcCgoAil7sIrByK3Mdws3LfN+R2RFdFVZaRmd1t43N/ -TE9VVHzxfRmZlVUZVd3tsgf27tkve+Bz3bMrtHgxO6f3c90HVGje/8WAyZ/P -58t3IPCXVMEXE9gWPp/0MUbcFgfhI7AtxB1xED7C3+6P/+LFnt17xPPPPy9q -1KghqlWrJurUqSMGDhworl+77stAn1hx+NBhkZKSgn/gV6xYMV9+2PP5xVsj -3wIv9Mxv+Y8dMxZjVa9eHWPfuX3Hl2qMVdAdS6crDUP5Rc+ePUXJkiUtIcHP -hIQEcevmLcvDJIeLkeCOYZJixYkX27dtR58GDRqIevXqoe/wvw8XN2/cDChQ -64iVe2Pvnr1i0ReLxNUrV5E6ABfDhg0TTz31lK+JJXnL5i2ic+fOVlD4jBPL -li4TrVq1EpcvXUZMnz59xMgRI9MZSEwIVHaGDx08JOrWrSsWLlhoZdMv0tPT -KcP59fSpyjAJ7jD4p5NjJzlvf57YtXMXYS6cv4BJzsnJsZqllGLleZClCNSA -KtjL1OS1RYsWaHczVqpUictrQSa0nYATP58QqampYtrUaVbO/GLM24GT+NZt -KY8KurQQw8QzEmypN67fEJUrV3adGEo6T64CPSBWfLNCmasYywa9mZiYiMPa -HiyZmZli546duJemSZqbw/Y7e+YsjpLcUblWf5g5UhlsAsNhZ2XCuxNE69at -XZ1g5vDL6alVqxYOTFN6Tp44iR3jhPCLbt26ieVfLzemx83RwLJBZzVs2FCM -Hzc+bA43luNIs5TDbFWiRAnRrFkzGFD+EGmsDOVYw2zUW6PEvr37cIjBUH39 -tddF+/btufnMbggIAYFuht69e4v5n89XJitWT9fIgpw/dx7b+s3ybyi0ia4B -g43R09kj7NLFS2LEmyNgwg+5dZ78wfWmefPm+D8pKQldAz2oy9+pk6fYHgoI -N+ZPQZdhQTas34BXOfcpY6JLZ7B+PZ3dXVlZWXTmhUon5S948lpTnK9pBBOY -dcnRJE3myLIm4+LFi0Msml5N8e0B4cJRk93xG1u2AQMGiI9nfRzS5GVzaFKT -ZSXDyrbdzDirn1q2bCk2b9pMrYE5pEqVKmk6lExgt2/j9xvxsu3WffrU6V9c -nhSMqWGF4VP37LPPisWLFodCF6vOWBNrCMB4bNSokejUqZOYPm06tN9np+2r -ZV/h8L544SJeg+HGb3Tu6FQjlMtd8D6zbNmyGBZmG7jQdezYEWYhmpG0lKGE -kKnTLdwPW37AO6uDB3AJIbb9tE1UrVoV8CZqTw7hBjg5ORn+Aj0Hn35MgM1o -TzVrVq/BqzMkJd5K2Lix45AVLk39+vXDgd6A8Y8LkSvVUr5p4ya8HypTpgze -vMN9VSB2rIY2TQ+NCVFBikUx99O5onHjxniBgfwHJkurFTy9lVTVAq+WRQ9r -RpsKPxf8fxyvFLQGDq+Aj3w6K8bKD4ZCTNSEcGxOFOXWvb+W47ew/U7Vx7ht -8FcODPdoFSd4O/kx2nqcIXqUsT3G2HCWKQamxnebqj58FgJTjCoKT48OLeGj -IOw+wx5vBh8FYLe367ifjuNUHg+7L/Cnns/2xKk+DvYHGDxx0oqF/ZcNnnXJ -c4jbM8btSVKT4QMPvWZ2rk6Rh/PONgA2HqLIb5idK5PzSJdzLB2vQAnOZY8/ -SMffdpPFege/k6VEYhwbIqIMcbwTIqI0ISaoUyCNrBKkaiLfy7CXn7HhZ1EK -NikCdGFSOzkCdCFCTzGgndYmEGZayJiCtDtDjfGrVMYR48wI0LHE/ZEB7eiN -IcZZIWOc3dkujF81nd2ho3NCcb9N0T9VK+KAtwg41wBEp5u09ZnaPZaxXSPg -vPCAVwn4eXjAKwScbwCik+OuubVy3C/T1kK1exxjO0/AReEBzxFwsQGITo77 -l6G4n6WtJWr3eMZ2ioBLwwOeJOAy7wjn3H8m968NPOjkuC9XuxdgbMcZm4aR -C3GMsYWp4ijJX2EAopPjvjIU9yO0tUrtfg9jO0jA1eEBDxBwjQGITo77t6G4 -59HWv4LuumdowbkiBlfWGRkZUJ2A52n2IhHKX7B4rF27Ni7CT/x8gi4eR48c -RQWBYz77WRksKIcMGaI8bQsytn2MzWpocAirHsCQeCjRwBM2iLDuu3V21fHY -0WO4SgahEGb2x7NhLW9P/IEIuMa+dPESXfSXLlkatv69jM3KfDBX9kMRYrEe -ilg5DtpArF1Rs21vvvEmdhrsuat28mODOPH+e+9j8RcqP8C3Y/sOKEVxEwfX -gD00YNaSbNMTC3tRDE2zKlwkERL43sT3rM4J2j6c+SH2xZHDR9hTwrnpcdR8 -R2pMTwdsNTVr1hTnzp6T1EydMpW61E7snNlz0BeGM04EeEPK5WYnqVlHavL2 -62vttpry5cvDA11JDTDn5Nhl+KDtg8kfiKZNm2KuuT7jlr47SNd60mWqYdu6 -oB+4LA0dOhT3bA1Q91ry5RLlycDp2k66NhjHkj3cbV2uaqk0lmB4u3WNzh1N -VVqlLtTgqPmPdEJaTNIJCTMf7NnFDHjCAmU378m3e9duyQYlc+thDdn69+8v -ZkyfEYLCbbT1vTTlKaqevsJWzOPHjuMItiunsz6aJdq1a2c/ic/OzhZdu3bF -EwcOQzfC3Hzm9Bl2iHE1rq2MzUqjfUXhaohFrGPwXBRGGqiEfAekUE0XRgT0 -IJwhFStWFG3atIHRwF37OWU/UtI2BvVwF0Sn2OO4bwrF/Qfa2qx250pemxmb -hpELsYm4t4QH3CjL1wBdiZCPahgLq4aCk9/QgRsIuNUFRB+lOzcANIzOBIRb -P4Xivl4+J3n3IoxtLQG3RwD02EzczmUat3ao3Ysytm8JuDMCIHcJCj3EGuLe -ZQA6d8a4tVvtXoyxrWJsGkYuxErGFqaKFSR/rwHorGtwa5/avThjW87Y3Ix4 -hAN+TYz7w2P8ioB5BqBrfSof1TCWYGxLKdiBCIAem0Y0F2IJcWuegZUgJ8f9 -kNq9JGNbzNg0jFyIRcR9OAKgx2aS79RsnDU0734fY1tAwKMRAD22MLnnE/cx -A9BV/2LqEe4TrBTjNI9CHFfzKIEem0ZqKeLhgCZup3rpFIp499KMbS5j+294 -IT4l7hMGoKsuKx81iXYqwbh1Uu1+P2ObTcBTEQA9NhO3UxLHrdNB9ygXcOxj -8NoUvDNdtGhR9Bk8eDC7OPAo8xy1snJXSjX2gqBDhw7iQF5w9ucUlmFsH5Hq -M5bCaBdj4twVEfxbtXIVvGqFr8sGIEWKFMG3N1566aWQZX9Iss+S7MiLMfHu -Ygz+wcIfOvvqlauUgpDS63oqJB910hutMo2dXqjQWUtw/LN0OhUbZ2Q6aTtH -cvKiVKex5Vy5fAWbB+9feuV4clKWsc1gbE4fR6t4Y39DYeI/J2IJwyWUra1z -SqdTMs8bx2C4RRxbH0wOaWlp+P6rUZ/raah81OlssESjrBNjfUJBBd67NXUy -SnMSdkGaDSOs4sRZGuCNzSZNmuCfQkMiY5vK2KyOjLRwY88KXyz8AsOqeouT -M4WSczEogrv6JZITp/5CKECH55La/QHGNpmxaaRyISYR92UDEJ04RpNo11sP -8lENYznGNpGCXY0A6LFdcYXAI+UousNzTc3zIGObwNg0UrkQ7xL39QiAHptJ -PvI4jDfU7uUZ23jGphHNhRhH3DcjAHpsJvnI4zDeUrtXYGxjGJtGNBfibeK+ -HQHQYzPJRx6H8Y7avSJjy2VsGtFciFHELbynWkU65HHKZ6BwMJ6jQg2sxNhG -yLT5I0BzAjTyKxGjh9uvxlRmbG+ouDVt4OL8Q1YRY0Cjp5Jb04YqjG24zB0b -AZpToWlDFWL0cMeFjOEYNcqrMrbXZO74CNCcCncb8HBV4vEwFvB6PsTEHKbi -0ejl4gyVue8xoNFTyV1Aja7G2P4mcxeMAM2p0LSBizNYVpFgQKOnklvThuqM -7WWZu1AEaE6Fpg3VidHDfa8ak8TY/qrittoQ5ZKS/Z0W+Ipw27ZtMRys7lat -XMWuEzjJg+QGB9dId/MVoHiMBM2AdRocztufh9kI/GcLIUkkUZlfq598d/fN -H9s25YMpYtCgQZJt/Ljx4tVXX7Uy8EuZNRjbADn3RagR0XoPyLbBGIOXrNy2 -BfMXiO7duzuCsbbDDZEBqqwXJsHRrUH5cYTDCyduG9RackflcoIxh55sFiVx -ML6iV5GKx7eGYLzC1/ygKgXfP4TvKsL357jxW0OWyGXS6fpoVaTs8hl08eRJ -k/HlGCg7d+nSBV6c4aaHmowtR05qMeMQDbcyZdtmzphJw5F7xakmCfmLKolO -j4M5mm8bXbt6DSffQOJYccmM7QU5c8Utcb+qRGXPuzAYoDPhdzYC2rhX+5SS -uMxZ3Rppncq+RsF8D+8/wVwLf4Gxxp4QyZQaT5KCz4Lp1tn1nWt2TuUuy31V -bbQ6gMNwtj6yspIGNHoquUuo0bUZ23OqOBoVXJzechtKGdDoqeS+T42uw9h6 -ydylXWh0VGI47lIsGqN7eO5Xq6zL2HqoGEuHF6e7rKKMAY2eSm5NGx5mbNky -d9nw0M/I6EQDGj2zVco13PUYWzeZ+4EI0JwKTRvqEaOHu5waU5+xPa3i1rSh -PjE+LXM/qMakMLYuKm5NG1KIsYvMXd57ZqUy6D+rGDXKuThPquKUN8RBvU/K -yiuqMWmM7QkVdwVDHGR8QuaupMY0YGydVNyaNnBx/iirqGxAo6eSW9OGdMbW -QeauYkCjZ0cVt0Z5Q8bWXuauakCjpwfzUMgYTq+GsRFjayNzVzOg0bOtitut -HA9nMJ6tZMbqasYM8vRgktSYTMbWQqVXw51JjC1k7hpqTGPG9piMrmlAoyf3 -rX8TdxPG1kzmTjag0ZP7dQGT8izG9ogqjkZFFql4RFZeW43heLhc4GcwwN0q -bUHVAlZksNqBN6cmvT+JLW05jWsiNzN4n3l3C1rr163Hw9ZP9eHbFfA1nsB6 -nF3/NCWJmbLYupbY36aM1atXL/HJnE8kG/jA7+0F260Y/soJFPcfpkZEu4z1 -yiuvYOrdNvgRJMBrBaM4bqb2ZD26Zax4sfXHrViQtZfxgIERHljOBwcGlrC4 -nDoXcNyvRxLz9kenmGW/EQSVCL/fjwMrPj4eapjsCeb8tolHWn2SFt3SVTwW -R8AXuhy2V69ajfPA/n372dOK+8GWFFlsinFsRlq/ggb07dtXskGd2G4UNzad -6xh3t+zJLpijWdN6Z/w7+KqV2zbvs3miR48eSsGPk2BuUSRlOCpfqIPXI+Gn -BOE3ZeEwjDC4gATOR3YENGdszoIb94Nrg4hLXfZ1ae2/1+ILYvBjh3CGB+ZR -9rRpTuweHcH7e/by69wc1ZYx6WpMS/JMljEN1ZhWjC1JRjcyoNHTg8lQY1qT -ZzUZk6nGODfTVWVMYzWmLXlWljFN1Jh25FlRxmS5MAhxlhblZc9H1NH/QJ7l -ZExTNcZZciXKmGZqTEfyvJ/04pFH1ZhOhLlP5nlcjelM0YvJPM3VmD+RJ06u -MYRpqcZg6QF/CimGtvBIGzWmK3wWIM/2ak/8/J38TJ7pOG4bfgvel+9/Sn8S -OQ==\ -\>", "ImageResolution" -> 96., "LightDark" -> \ -"Light"],ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-3.233775858153751, \ --0.007969775184554129, 0.11832856225129938, \ -0.0005589111396958131}},ExpressionUUID->"06204099-db57-8e4e-bcc4-\ -fa1ae37c0063"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 95, 12, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994386670139036*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"d34e984c-f2fe-4f79-8bb2-d79503da68e6"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-\ -04dec8739bf5"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8FW0bB3CSJXlk352NtFhD5zjHOa4L2YWQSiWSSKQiSWRLKZKQpCwV +SvYzpaRFlCztFFESnuqpiOyi3nn/ms/3n5n53Pfv+t0z9O0hrn4LBAQEOIIC +Av+/Tva2PNJMLjRrf9c0ZaxnZdaRp3TIvCse3ufNfe4I1gCUf7FdqSsd3r5+ ++PNqsBGEu1zvFOq6DMl5vh5JwZYgPayYPtPJB4Uji2Tdg93g412nkPHOBrjg +56FyLcgXrDW/fRjtfA3unknT4oGhMNPJOjvS2Q+J/EdGV7YlQKPl1cJXl8dA +fXA7T18gE9Q+1n7erjMPdlnxykdsc0EuaNt1UUshNFqr4DA3dhnSV1nXOa0X +Q+OfaxXQ7iq8yzaoH5X6ByVmF/q/HL0OyYUxLxYoS2PUj4dXXfdUgL3xLhl5 +DWkscP9dMh5ZAWKPXNcv05VGX2MD89TjFXB0YGmPg7k0Ft/+rXmtoAKiGE8/ +Z+6Sxqyz8zHhrytgT4HSH6070hg6ERlz2LgS1l2s1nHYLIM2Q4FOir8qQTFz +4ERGriy6ZmYxMkuqQEn75tHpYln0sWJWHqioApWGYzFbq2TxCvv3FjeiCigj +Kw4sa5TFlY1XlYXuVcFSx73edV9lccKpQdT4ZRUYLZxnDhjJoWB2Oq9nogqc +wxQGDVvlsDdFPt3UrBpcFn/tPdcuh8pL/5gXWFSD6+Xad3Pv5dD20QEhQZtq +8Hi55UXTTzm09I2vrXGuhq06V+54ysvjROOBL7+8q2H3oP6ZeG95dJV4MFse +Xw3H3e3MXk/KY13q0zadxmpQufFcZYGgAp6wlVzi/6QaKmTdp1YtVsAqZvTV +i23VZA68qs5QFdBj3Zu3M+3VoLkujLHOVgEH/eOWRw1WQ8PafJGX5xXwyprx +nQUL+TBvPfH8GVcRe08FGO4050NacWTpvLUi0uj598Wt+KApIpCku04RQ4V3 +XrhuywfHx+Lmp/wU0br1rPV7Zz7kWNIIx1RFlOHF+4p68cEEHc61fVREIoR6 +P+oQH0LZl7a1xCuhufL7tMEyPtgXSI47pCjhDb5HyINKPjBEo5Ken1VCNLEz +zeLz4WWHR3X7NSWUp7teZN3mg95eCaHe50pYURCQZNfIh6/FB4t/qSijibMw ++3oXH7bIOQ2pEsr4UiGpxVuAAKPDdXF5d5VxBVfqWe0CAsT7lyvQm5Tx1Gxx +k6QwAbWVQqD1Thm5UvtyyxYRoOBQm2bwVxnjjnQP3JIh4GWcprGVgwrOV+Zo +/6NJwJqfs5F7BlTQ1HPu+k1LAg7ZZq58+EMFv6jVzB61IqDikm637KQKTumv +D3exIUDJ3ZtdK6aKHSzzsR57An7cfjwlpKeK3cYiMo/XEZARnxZ2PkIVszr7 +N/Z5EdDcs0LzR5wq1gobFe33JmDOuLHdLFkVI99+Xyq4nYCdXyYMB3NV0e37 +pyYZPwI4jptH9RpVcSBP+5zYbgL65bX2PPpHDQUFA6fMwglQDHmgrqiohtON +wa8yDxLg2Lzx2S6aGhZ/S/7vcwQBNZHJOkuM1LDZpextzGECTn4c+bZpoxo+ +/Pai5mgsAYYldf4/L6thEg5r9pwgwH/BekWLMjVMXrLTYOIkARc3Dzdl3lTD +2Y0vji5OIUBEkq7FaVbDS+5ui3VTCejef2zw6JAavknfdcUynYA47jofFRN1 +3CFfXvTgPAG2Xnm/WBbqODv+0Ls6hwDJ2O8J6x3VUd5ja2veBfL+jYnFad7q +mH16RXlQLgG37e98Fzmhjqgc8ayjgICYINFozQx13NupoFx4iQDrVHdJi1x1 +fMzaqRpymYCOV8MG0dXq+K3cxnb6CgEjGzXCx96p44b5Ou/OYgJuRe4VlR5U +xwfLo2KOXiXgyMV72XrD6mguHLZV9xoBEn0b6nYtoOCX+F2b95cQ0C5Y5Hhc +goIjIjnRktcJyNH49aFQgYLP//r7FpNe5p8i0LeSgrsz1h1pKSVgOOndmXlj +Cs45l950LyPgxnUtDVWgoFQj5WYPaYvheisPNwrW+/RKfSgnwOvAxMmnhykY +NNu7ubySgKXnLNS+JVJQjKE6rlD1//ycLhdNo+DYbOnWKNKRcyteWhRSkMdM +KOFUE2BOOejjXUHB+RvLUzNIi+GjX9G3KXhf9ZPtV9JnE7zka59S8HDhBqtE +PgFbikqL376l4Mb8mBPPSDOeTLPG+yg4sCr1mjRBwH9frVqkv1NQ/0LdlXWk +q8QzPPUnKHghyDzqFOmDOn3fHf9S8HOSp9Fj0mZOutGBi6gormHZOk1aeG+k +ZJIsFXn3TCyW3yDg6Zkn+UXqVOxdFnnRjXQGIbeqcRkVg2JtuiNJe77xaehb +RcUQg/65XNL0qQq3P6ZUDP2RInyP9FeluUFVayqO8ZMnOklXcuzC2S5UdG7T +eD5MOnxLlugGTypWPbqQJniTAO6RgeywHVQUPWBqJkVaqMBgZfoeKo5OOXSp +kG59GF1XGUHF0nJFbzrptIFWx2fxVPzD/vZWg/QGYaXebylUXJ4gZcYgTVnm +FyJ2jopvq7qy1Ej/a8sX0LpERWHt9H4Z0mWBf89YllJxOPsUQ5h0aIqjhs9N +Ki7sU9s4Rr4fp+L8jSMPqNjAyDj6gfSazufzw81UTDi1/ehj0k4CC222vabi +d9WZBddJb1zBTnvRQ0VzZrBgMmlf1z3v4F8qTq96GxtAes/hK4yqYSqOuzjG +W5COKOzaTZum4p36ryLKpK0P02NihWno2TufW0fuR9uSu1dMxGl4OrKcf5y0 +S6FH84gkDessRp1cSG9+lizto0TDYr1yRieZhz4fLaayOg1FYny3nCW9c7Le +8xWdtNtKhgvpvdTJK+baNBy5FeJRR+ZrgkhrntGn4fscoye7SUfaag9VG9Pw +6ZX0ZiXSifu8mQwzGjLja+ICyPyKi/z27LagoXDNE9PFpNNyzsak29Dwb6tE +8nUy/zmNrc0L1tFw8X8dQ70VBFA3+g3dWU9DwrJUKIx04Y+/0qGeNFSkbyGE +SVfKr9484EvD1Ij5QQo5T4/884caw2l4v8mMv5ycR7s5tkzUYRqmbRu4dZmc +1+dpHUzjWBpmXe3yVib9rnZRbOEJGnLtYi/NkfM/vDhMJvEiDduXxfzNIfsi +tECSxbtEQ4dbXuazRQRMG5dsniii4cfNHAMP0kJevYV+leR6Lm5TXlhI9n+V +Lcu6gYbPvzeYmZD9lLtmYPOfJhpe9BoWjyb7i/EuOramjYbbfoyfup9PgO4C +okXrDQ073py5x8oj+8FdfYvoVxrK3NT+vIDsw6Dp0djmf+go+zUgYj6DzNO+ +nQqfZeh4y5S6ZJbsV7Fv3aVCSnQciEv49OsMAUU9jW/NGHRMWT0C704T0Hv/ +rM5NJh3vbWiVPpRMgHMiu+vSNjquzeLGisST+f5THvxgBx3X5f46/4Ts/x/h +DKEPu+ionL5KPDGGgKSAxXpKYXT8tIcxMR5FQL3Dh4TUJDpm1v3QLCHPF0OZ +OP3D1XSUtBLauyOIAIHkiUfZNXSsCI95+D2QXG+hQM+aOjraijslhuwiYPeE +a+LoYzre3D0WGLST3M8uzR7/bjp++SncZ0qefwr5zcfchRi4S5EtaORGwIy2 +VK/uegauWGHeksokYDJXJc7Ik4H/ZVx+UWVMwPiSpZrsbQw0cmBfemFI7t8Y +O3DNLgZWPpYtF9Inz8c630nPaAYyX85lWy0j59/hlmRSEQO/cMqcDRXJvO32 +gv4JBirtdm+uG+fDuQ8B/V9mGdjw1aE08hcfMp1DE4f+MrAnWiSDOcKHVKOk +tulFGlh2XTWi6Dsf4n9Xb1hC0cAuhvnTbf182J0svJdrrYEaW7+ybV/wgVta +VpCVpYEJyTp6E8V86KGV5ltd0MAV8Yt3JxbyITKrJG88XwOFxtssZS/z4VZc +8UXXEg18vlLmxbJcPhhuLMiWvKuBhq4lB40z+LBCODPt2CcNrLx7cteHI+R3 +/bbDseE6mrjPQedShDsfRmXsvT0aNDHUzTVLe6YaBlO8PfaLamFZyFKhDKVq +sPt50O5f5jIEw+nRMe0q+OErFnojZjk2ezNWZ2pXkP8DiguON6zAz6nltqo/ +SkHmmVZq1c+VKHPK/+XWxyWgllTpwmTqYHe92ZRh8FXI1mZLyfrr4snCvuo2 +yyJoVTFfPXZGD/vOJogWGV0BjlpDmv5bfby73ilGTPISSApdDvOJN8Ca3MeL ++13ygBJH5W7SWoU9w/d+dETkwKKlW2pcn5CmPqAY/8kCPZ5y5cGthmgQVvdh +RjgT9vfKNNoLGOGBf3yEElTPwM+xlPV22Ub4hpBxdPA4BTb6TTl2usbYIvD9 +yqD0Cbg/Zvp76rkxvtA60KE1fxT26Bh2v/JbjQ2nFUysrscBb3hHx6ZFTBQ9 +ZPRNTTkarDSV1v5zmYkDj7deE1SPgOWxJyMaWCw8qviaHjYcCndNi4QdOSxM +mNhuc+9DKLhMPUh/w2XhV7+fWjLPQiFiz0TZV3MWpp/nzPWWhkLzFu9Pko4s +/DibsGkh+X8VwGbab/ZmYVZWf1XE1/1Q8uuT6ngSC39bvUrrHdoHK/3YD5Z2 +s7B18hx3o/JeOM1wmk14z0KFPPvHzhJ7Yfzj9tX9vSwcND0SV/AnBO57ppTm +DbBwX8rP2c7WEHB1+XhOcYiF99vtVdR2hMAh08S9iwRMMIVjJTh6fg80S7+i +Dy01wdVZeamnZILB737A0Rv7TFA2WLz4/OpAGA7+dtAqzATXTeXMf1YPhAj1 +oN1vw03w9wGPGmuRQDgZFeI6fdgErdYupfI6d0EVJ5zGPWaC95c9PL8wchfM +1STcbcwxwaoC2oXxhgBIr8wbf91ogtZlwU0S2/3hQUHHjlF5NmpIFpq2vN4B +fY70beFKbGxPlCm98WAHCMwEb/qtwsbNsYWWlWU7wGKdqJMwjY0ZF9+1vDq2 +A5oEOSzllWwsTPhIaTPdAU+35y8yN2NjPfSfP3bNF7o1AyvSdrIxX36/yMeU +7TB+7e+U/i02pjq+8ZKN8YbPHtYFJ2rZ+FDpmGPyXm/oWnjKdqCOje7b/uyR +3O4Ndd4q57Pq2bilT4PJtPKGeKXVnPkWNlpozogtlvAGqaTAqNb3bNQ++9H5 +OGsb6Pi/EfBbwMGd+kPMuGNbwXdp6aKctRyMvpvB7/fxhMjHXoFaLhxsCp7b +9NfGE9L8ZNr4rhzMfpESZKjnCXeLDqW0beBgotfL9J7ZTSCnZbtk3oeDmsnr +NUzOboImrX/lvMM56DHDCpR4vhFWLqfStPI5OPfFt59w3gCjKzOY/BEOKjnJ +8EpPu0PXU7SSHePg6VVxnnZR7lC/Z9gtbIJ8/mKD21MB7pDKt9vHnOWgXq2/ +SKKFO6zkCJTdETJFyn/mFd6TbrDdLpjeqGCKs1IrQMbHDTr8bSQ6uKY4X3eX +JWXhCrcLf3+aSDLFuScGa5QNXIBpGTZln2yKxIzc/gc0F7j56YdEwSlTvEbk +X9sv7QJ8Si/LPt0UH1EaZQU+O0NZdv2pvAumqNaapr072BkKUhLZNhWmWGt/ +wE00zglOhC05k91uirrjshKddxzBc40GmlK4uLrN4PVomB3Md4hJNtK4mHN1 +QE/V0w4K/IZ77DW4aPVOVswL7ODzsdqDnsu5qLlo03t9cTvY3+JceciQi3MB +Pk2Cl2zhpFMU5bY1F99LVl9wbLeBOxvfzBmHcLGZeqh3xM4aVIOP1+rVc/HU ++B8to8OWkPp35+rkBi6qvXA8fdzfEhakW1d/ecTFrnHbySE3S/hWI1xS0MLF +f6jtx0Z0LOGOwNFsmXYuCip9prd9tADPzNiDk/9y8VzJZE+LrQVk1x1afX8x +DwVjf6mnLDMHCadN1SqSPNzqEmkorGAOsX0mugeleKi3yyE5daE5BAhPaxrI +85Aa+abj1ScElnO43GUKD2vWtHgo5yK87d8/lriKhylSH8oKFBDkxYOq127g +oXIJhbNnpRkUWkZHjmziYc+j8rECUTMwjE61zNjCw6LsCN70IA+cRqredPnw +0PdW0KxsAQ+OvZ2Y8Q3i4QclRtCcIg+mL8dYRMbxML0kWD5MkgvdphntxaU8 +PG+j9q+KPAcCDhRetKvgYf7Ez5n8STZMVtz0+1HFw/XV5zOtutggw+iaWlXD +wxmL3L7RC2xwEFNXu1fPwzMOQ1Ftmmy421G8o/0NDyNK0nwCuCZgL3lbN7yL +hxdvvin4QjWBLpuWSaUeHqY9i0lMFDKB8Tvfk7z6eHg4kdGq1sYC3UsG5f99 +42E3ZMnWbGbB3W7z8JQhHrKr3VyWIQvs5dxAf4SHioukHWo0WbDz+IFXYRM8 +3FF4Wkx3mAnj9cdyFKfJ9bBPSZdrZ0L87DnfO7M8LIz/G6B8mwlSxiU6W+d5 +uHBRfYhpLhPygu9M/P3Lw3m3upOR8Uz4H5a21lY= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8FW0bB3CSJXlk352NtFhD5zjHOa4L2YWQSiWSSKQiSWRLKZKQpCwV +SvYzpaRFlCztFFESnuqpiOyi3nn/ms/3n5n53Pfv+t0z9O0hrn4LBAQEOIIC +Av+/Tva2PNJMLjRrf9c0ZaxnZdaRp3TIvCse3ufNfe4I1gCUf7FdqSsd3r5+ ++PNqsBGEu1zvFOq6DMl5vh5JwZYgPayYPtPJB4Uji2Tdg93g412nkPHOBrjg +56FyLcgXrDW/fRjtfA3unknT4oGhMNPJOjvS2Q+J/EdGV7YlQKPl1cJXl8dA +fXA7T18gE9Q+1n7erjMPdlnxykdsc0EuaNt1UUshNFqr4DA3dhnSV1nXOa0X +Q+OfaxXQ7iq8yzaoH5X6ByVmF/q/HL0OyYUxLxYoS2PUj4dXXfdUgL3xLhl5 +DWkscP9dMh5ZAWKPXNcv05VGX2MD89TjFXB0YGmPg7k0Ft/+rXmtoAKiGE8/ +Z+6Sxqyz8zHhrytgT4HSH6070hg6ERlz2LgS1l2s1nHYLIM2Q4FOir8qQTFz +4ERGriy6ZmYxMkuqQEn75tHpYln0sWJWHqioApWGYzFbq2TxCvv3FjeiCigj +Kw4sa5TFlY1XlYXuVcFSx73edV9lccKpQdT4ZRUYLZxnDhjJoWB2Oq9nogqc +wxQGDVvlsDdFPt3UrBpcFn/tPdcuh8pL/5gXWFSD6+Xad3Pv5dD20QEhQZtq +8Hi55UXTTzm09I2vrXGuhq06V+54ysvjROOBL7+8q2H3oP6ZeG95dJV4MFse +Xw3H3e3MXk/KY13q0zadxmpQufFcZYGgAp6wlVzi/6QaKmTdp1YtVsAqZvTV +i23VZA68qs5QFdBj3Zu3M+3VoLkujLHOVgEH/eOWRw1WQ8PafJGX5xXwyprx +nQUL+TBvPfH8GVcRe08FGO4050NacWTpvLUi0uj598Wt+KApIpCku04RQ4V3 +XrhuywfHx+Lmp/wU0br1rPV7Zz7kWNIIx1RFlOHF+4p68cEEHc61fVREIoR6 +P+oQH0LZl7a1xCuhufL7tMEyPtgXSI47pCjhDb5HyINKPjBEo5Ken1VCNLEz +zeLz4WWHR3X7NSWUp7teZN3mg95eCaHe50pYURCQZNfIh6/FB4t/qSijibMw ++3oXH7bIOQ2pEsr4UiGpxVuAAKPDdXF5d5VxBVfqWe0CAsT7lyvQm5Tx1Gxx +k6QwAbWVQqD1Thm5UvtyyxYRoOBQm2bwVxnjjnQP3JIh4GWcprGVgwrOV+Zo +/6NJwJqfs5F7BlTQ1HPu+k1LAg7ZZq58+EMFv6jVzB61IqDikm637KQKTumv +D3exIUDJ3ZtdK6aKHSzzsR57An7cfjwlpKeK3cYiMo/XEZARnxZ2PkIVszr7 +N/Z5EdDcs0LzR5wq1gobFe33JmDOuLHdLFkVI99+Xyq4nYCdXyYMB3NV0e37 +pyYZPwI4jptH9RpVcSBP+5zYbgL65bX2PPpHDQUFA6fMwglQDHmgrqiohtON +wa8yDxLg2Lzx2S6aGhZ/S/7vcwQBNZHJOkuM1LDZpextzGECTn4c+bZpoxo+ +/Pai5mgsAYYldf4/L6thEg5r9pwgwH/BekWLMjVMXrLTYOIkARc3Dzdl3lTD +2Y0vji5OIUBEkq7FaVbDS+5ui3VTCejef2zw6JAavknfdcUynYA47jofFRN1 +3CFfXvTgPAG2Xnm/WBbqODv+0Ls6hwDJ2O8J6x3VUd5ja2veBfL+jYnFad7q +mH16RXlQLgG37e98Fzmhjqgc8ayjgICYINFozQx13NupoFx4iQDrVHdJi1x1 +fMzaqRpymYCOV8MG0dXq+K3cxnb6CgEjGzXCx96p44b5Ou/OYgJuRe4VlR5U +xwfLo2KOXiXgyMV72XrD6mguHLZV9xoBEn0b6nYtoOCX+F2b95cQ0C5Y5Hhc +goIjIjnRktcJyNH49aFQgYLP//r7FpNe5p8i0LeSgrsz1h1pKSVgOOndmXlj +Cs45l950LyPgxnUtDVWgoFQj5WYPaYvheisPNwrW+/RKfSgnwOvAxMmnhykY +NNu7ubySgKXnLNS+JVJQjKE6rlD1//ycLhdNo+DYbOnWKNKRcyteWhRSkMdM +KOFUE2BOOejjXUHB+RvLUzNIi+GjX9G3KXhf9ZPtV9JnE7zka59S8HDhBqtE +PgFbikqL376l4Mb8mBPPSDOeTLPG+yg4sCr1mjRBwH9frVqkv1NQ/0LdlXWk +q8QzPPUnKHghyDzqFOmDOn3fHf9S8HOSp9Fj0mZOutGBi6gormHZOk1aeG+k +ZJIsFXn3TCyW3yDg6Zkn+UXqVOxdFnnRjXQGIbeqcRkVg2JtuiNJe77xaehb +RcUQg/65XNL0qQq3P6ZUDP2RInyP9FeluUFVayqO8ZMnOklXcuzC2S5UdG7T +eD5MOnxLlugGTypWPbqQJniTAO6RgeywHVQUPWBqJkVaqMBgZfoeKo5OOXSp +kG59GF1XGUHF0nJFbzrptIFWx2fxVPzD/vZWg/QGYaXebylUXJ4gZcYgTVnm +FyJ2jopvq7qy1Ej/a8sX0LpERWHt9H4Z0mWBf89YllJxOPsUQ5h0aIqjhs9N +Ki7sU9s4Rr4fp+L8jSMPqNjAyDj6gfSazufzw81UTDi1/ehj0k4CC222vabi +d9WZBddJb1zBTnvRQ0VzZrBgMmlf1z3v4F8qTq96GxtAes/hK4yqYSqOuzjG +W5COKOzaTZum4p36ryLKpK0P02NihWno2TufW0fuR9uSu1dMxGl4OrKcf5y0 +S6FH84gkDessRp1cSG9+lizto0TDYr1yRieZhz4fLaayOg1FYny3nCW9c7Le +8xWdtNtKhgvpvdTJK+baNBy5FeJRR+ZrgkhrntGn4fscoye7SUfaag9VG9Pw +6ZX0ZiXSifu8mQwzGjLja+ICyPyKi/z27LagoXDNE9PFpNNyzsak29Dwb6tE +8nUy/zmNrc0L1tFw8X8dQ70VBFA3+g3dWU9DwrJUKIx04Y+/0qGeNFSkbyGE +SVfKr9484EvD1Ij5QQo5T4/884caw2l4v8mMv5ycR7s5tkzUYRqmbRu4dZmc +1+dpHUzjWBpmXe3yVib9rnZRbOEJGnLtYi/NkfM/vDhMJvEiDduXxfzNIfsi +tECSxbtEQ4dbXuazRQRMG5dsniii4cfNHAMP0kJevYV+leR6Lm5TXlhI9n+V +Lcu6gYbPvzeYmZD9lLtmYPOfJhpe9BoWjyb7i/EuOramjYbbfoyfup9PgO4C +okXrDQ073py5x8oj+8FdfYvoVxrK3NT+vIDsw6Dp0djmf+go+zUgYj6DzNO+ +nQqfZeh4y5S6ZJbsV7Fv3aVCSnQciEv49OsMAUU9jW/NGHRMWT0C704T0Hv/ +rM5NJh3vbWiVPpRMgHMiu+vSNjquzeLGisST+f5THvxgBx3X5f46/4Ts/x/h +DKEPu+ionL5KPDGGgKSAxXpKYXT8tIcxMR5FQL3Dh4TUJDpm1v3QLCHPF0OZ +OP3D1XSUtBLauyOIAIHkiUfZNXSsCI95+D2QXG+hQM+aOjraijslhuwiYPeE +a+LoYzre3D0WGLST3M8uzR7/bjp++SncZ0qefwr5zcfchRi4S5EtaORGwIy2 +VK/uegauWGHeksokYDJXJc7Ik4H/ZVx+UWVMwPiSpZrsbQw0cmBfemFI7t8Y +O3DNLgZWPpYtF9Inz8c630nPaAYyX85lWy0j59/hlmRSEQO/cMqcDRXJvO32 +gv4JBirtdm+uG+fDuQ8B/V9mGdjw1aE08hcfMp1DE4f+MrAnWiSDOcKHVKOk +tulFGlh2XTWi6Dsf4n9Xb1hC0cAuhvnTbf182J0svJdrrYEaW7+ybV/wgVta +VpCVpYEJyTp6E8V86KGV5ltd0MAV8Yt3JxbyITKrJG88XwOFxtssZS/z4VZc +8UXXEg18vlLmxbJcPhhuLMiWvKuBhq4lB40z+LBCODPt2CcNrLx7cteHI+R3 +/bbDseE6mrjPQedShDsfRmXsvT0aNDHUzTVLe6YaBlO8PfaLamFZyFKhDKVq +sPt50O5f5jIEw+nRMe0q+OErFnojZjk2ezNWZ2pXkP8DiguON6zAz6nltqo/ +SkHmmVZq1c+VKHPK/+XWxyWgllTpwmTqYHe92ZRh8FXI1mZLyfrr4snCvuo2 +yyJoVTFfPXZGD/vOJogWGV0BjlpDmv5bfby73ilGTPISSApdDvOJN8Ca3MeL ++13ygBJH5W7SWoU9w/d+dETkwKKlW2pcn5CmPqAY/8kCPZ5y5cGthmgQVvdh +RjgT9vfKNNoLGOGBf3yEElTPwM+xlPV22Ub4hpBxdPA4BTb6TTl2usbYIvD9 +yqD0Cbg/Zvp76rkxvtA60KE1fxT26Bh2v/JbjQ2nFUysrscBb3hHx6ZFTBQ9 +ZPRNTTkarDSV1v5zmYkDj7deE1SPgOWxJyMaWCw8qviaHjYcCndNi4QdOSxM +mNhuc+9DKLhMPUh/w2XhV7+fWjLPQiFiz0TZV3MWpp/nzPWWhkLzFu9Pko4s +/DibsGkh+X8VwGbab/ZmYVZWf1XE1/1Q8uuT6ngSC39bvUrrHdoHK/3YD5Z2 +s7B18hx3o/JeOM1wmk14z0KFPPvHzhJ7Yfzj9tX9vSwcND0SV/AnBO57ppTm +DbBwX8rP2c7WEHB1+XhOcYiF99vtVdR2hMAh08S9iwRMMIVjJTh6fg80S7+i +Dy01wdVZeamnZILB737A0Rv7TFA2WLz4/OpAGA7+dtAqzATXTeXMf1YPhAj1 +oN1vw03w9wGPGmuRQDgZFeI6fdgErdYupfI6d0EVJ5zGPWaC95c9PL8wchfM +1STcbcwxwaoC2oXxhgBIr8wbf91ogtZlwU0S2/3hQUHHjlF5NmpIFpq2vN4B +fY70beFKbGxPlCm98WAHCMwEb/qtwsbNsYWWlWU7wGKdqJMwjY0ZF9+1vDq2 +A5oEOSzllWwsTPhIaTPdAU+35y8yN2NjPfSfP3bNF7o1AyvSdrIxX36/yMeU +7TB+7e+U/i02pjq+8ZKN8YbPHtYFJ2rZ+FDpmGPyXm/oWnjKdqCOje7b/uyR +3O4Ndd4q57Pq2bilT4PJtPKGeKXVnPkWNlpozogtlvAGqaTAqNb3bNQ++9H5 +OGsb6Pi/EfBbwMGd+kPMuGNbwXdp6aKctRyMvpvB7/fxhMjHXoFaLhxsCp7b +9NfGE9L8ZNr4rhzMfpESZKjnCXeLDqW0beBgotfL9J7ZTSCnZbtk3oeDmsnr +NUzOboImrX/lvMM56DHDCpR4vhFWLqfStPI5OPfFt59w3gCjKzOY/BEOKjnJ +8EpPu0PXU7SSHePg6VVxnnZR7lC/Z9gtbIJ8/mKD21MB7pDKt9vHnOWgXq2/ +SKKFO6zkCJTdETJFyn/mFd6TbrDdLpjeqGCKs1IrQMbHDTr8bSQ6uKY4X3eX +JWXhCrcLf3+aSDLFuScGa5QNXIBpGTZln2yKxIzc/gc0F7j56YdEwSlTvEbk +X9sv7QJ8Si/LPt0UH1EaZQU+O0NZdv2pvAumqNaapr072BkKUhLZNhWmWGt/ +wE00zglOhC05k91uirrjshKddxzBc40GmlK4uLrN4PVomB3Md4hJNtK4mHN1 +QE/V0w4K/IZ77DW4aPVOVswL7ODzsdqDnsu5qLlo03t9cTvY3+JceciQi3MB +Pk2Cl2zhpFMU5bY1F99LVl9wbLeBOxvfzBmHcLGZeqh3xM4aVIOP1+rVc/HU ++B8to8OWkPp35+rkBi6qvXA8fdzfEhakW1d/ecTFrnHbySE3S/hWI1xS0MLF +f6jtx0Z0LOGOwNFsmXYuCip9prd9tADPzNiDk/9y8VzJZE+LrQVk1x1afX8x +DwVjf6mnLDMHCadN1SqSPNzqEmkorGAOsX0mugeleKi3yyE5daE5BAhPaxrI +85Aa+abj1ScElnO43GUKD2vWtHgo5yK87d8/lriKhylSH8oKFBDkxYOq127g +oXIJhbNnpRkUWkZHjmziYc+j8rECUTMwjE61zNjCw6LsCN70IA+cRqredPnw +0PdW0KxsAQ+OvZ2Y8Q3i4QclRtCcIg+mL8dYRMbxML0kWD5MkgvdphntxaU8 +PG+j9q+KPAcCDhRetKvgYf7Ez5n8STZMVtz0+1HFw/XV5zOtutggw+iaWlXD +wxmL3L7RC2xwEFNXu1fPwzMOQ1Ftmmy421G8o/0NDyNK0nwCuCZgL3lbN7yL +hxdvvin4QjWBLpuWSaUeHqY9i0lMFDKB8Tvfk7z6eHg4kdGq1sYC3UsG5f99 +42E3ZMnWbGbB3W7z8JQhHrKr3VyWIQvs5dxAf4SHioukHWo0WbDz+IFXYRM8 +3FF4Wkx3mAnj9cdyFKfJ9bBPSZdrZ0L87DnfO7M8LIz/G6B8mwlSxiU6W+d5 +uHBRfYhpLhPygu9M/P3Lw3m3upOR8Uz4H5a21lY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698272702166517}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698272702166517}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8FW0bB3CSJXlk352NtFhD5zjHOa4L2YWQSiWSSKQiSWRLKZKQpCwV +SvYzpaRFlCztFFESnuqpiOyi3nn/ms/3n5n53Pfv+t0z9O0hrn4LBAQEOIIC +Av+/Tva2PNJMLjRrf9c0ZaxnZdaRp3TIvCse3ufNfe4I1gCUf7FdqSsd3r5+ ++PNqsBGEu1zvFOq6DMl5vh5JwZYgPayYPtPJB4Uji2Tdg93g412nkPHOBrjg +56FyLcgXrDW/fRjtfA3unknT4oGhMNPJOjvS2Q+J/EdGV7YlQKPl1cJXl8dA +fXA7T18gE9Q+1n7erjMPdlnxykdsc0EuaNt1UUshNFqr4DA3dhnSV1nXOa0X +Q+OfaxXQ7iq8yzaoH5X6ByVmF/q/HL0OyYUxLxYoS2PUj4dXXfdUgL3xLhl5 +DWkscP9dMh5ZAWKPXNcv05VGX2MD89TjFXB0YGmPg7k0Ft/+rXmtoAKiGE8/ +Z+6Sxqyz8zHhrytgT4HSH6070hg6ERlz2LgS1l2s1nHYLIM2Q4FOir8qQTFz +4ERGriy6ZmYxMkuqQEn75tHpYln0sWJWHqioApWGYzFbq2TxCvv3FjeiCigj +Kw4sa5TFlY1XlYXuVcFSx73edV9lccKpQdT4ZRUYLZxnDhjJoWB2Oq9nogqc +wxQGDVvlsDdFPt3UrBpcFn/tPdcuh8pL/5gXWFSD6+Xad3Pv5dD20QEhQZtq +8Hi55UXTTzm09I2vrXGuhq06V+54ysvjROOBL7+8q2H3oP6ZeG95dJV4MFse +Xw3H3e3MXk/KY13q0zadxmpQufFcZYGgAp6wlVzi/6QaKmTdp1YtVsAqZvTV +i23VZA68qs5QFdBj3Zu3M+3VoLkujLHOVgEH/eOWRw1WQ8PafJGX5xXwyprx +nQUL+TBvPfH8GVcRe08FGO4050NacWTpvLUi0uj598Wt+KApIpCku04RQ4V3 +XrhuywfHx+Lmp/wU0br1rPV7Zz7kWNIIx1RFlOHF+4p68cEEHc61fVREIoR6 +P+oQH0LZl7a1xCuhufL7tMEyPtgXSI47pCjhDb5HyINKPjBEo5Ken1VCNLEz +zeLz4WWHR3X7NSWUp7teZN3mg95eCaHe50pYURCQZNfIh6/FB4t/qSijibMw ++3oXH7bIOQ2pEsr4UiGpxVuAAKPDdXF5d5VxBVfqWe0CAsT7lyvQm5Tx1Gxx +k6QwAbWVQqD1Thm5UvtyyxYRoOBQm2bwVxnjjnQP3JIh4GWcprGVgwrOV+Zo +/6NJwJqfs5F7BlTQ1HPu+k1LAg7ZZq58+EMFv6jVzB61IqDikm637KQKTumv +D3exIUDJ3ZtdK6aKHSzzsR57An7cfjwlpKeK3cYiMo/XEZARnxZ2PkIVszr7 +N/Z5EdDcs0LzR5wq1gobFe33JmDOuLHdLFkVI99+Xyq4nYCdXyYMB3NV0e37 +pyYZPwI4jptH9RpVcSBP+5zYbgL65bX2PPpHDQUFA6fMwglQDHmgrqiohtON +wa8yDxLg2Lzx2S6aGhZ/S/7vcwQBNZHJOkuM1LDZpextzGECTn4c+bZpoxo+ +/Pai5mgsAYYldf4/L6thEg5r9pwgwH/BekWLMjVMXrLTYOIkARc3Dzdl3lTD +2Y0vji5OIUBEkq7FaVbDS+5ui3VTCejef2zw6JAavknfdcUynYA47jofFRN1 +3CFfXvTgPAG2Xnm/WBbqODv+0Ls6hwDJ2O8J6x3VUd5ja2veBfL+jYnFad7q +mH16RXlQLgG37e98Fzmhjqgc8ayjgICYINFozQx13NupoFx4iQDrVHdJi1x1 +fMzaqRpymYCOV8MG0dXq+K3cxnb6CgEjGzXCx96p44b5Ou/OYgJuRe4VlR5U +xwfLo2KOXiXgyMV72XrD6mguHLZV9xoBEn0b6nYtoOCX+F2b95cQ0C5Y5Hhc +goIjIjnRktcJyNH49aFQgYLP//r7FpNe5p8i0LeSgrsz1h1pKSVgOOndmXlj +Cs45l950LyPgxnUtDVWgoFQj5WYPaYvheisPNwrW+/RKfSgnwOvAxMmnhykY +NNu7ubySgKXnLNS+JVJQjKE6rlD1//ycLhdNo+DYbOnWKNKRcyteWhRSkMdM +KOFUE2BOOejjXUHB+RvLUzNIi+GjX9G3KXhf9ZPtV9JnE7zka59S8HDhBqtE +PgFbikqL376l4Mb8mBPPSDOeTLPG+yg4sCr1mjRBwH9frVqkv1NQ/0LdlXWk +q8QzPPUnKHghyDzqFOmDOn3fHf9S8HOSp9Fj0mZOutGBi6gormHZOk1aeG+k +ZJIsFXn3TCyW3yDg6Zkn+UXqVOxdFnnRjXQGIbeqcRkVg2JtuiNJe77xaehb +RcUQg/65XNL0qQq3P6ZUDP2RInyP9FeluUFVayqO8ZMnOklXcuzC2S5UdG7T +eD5MOnxLlugGTypWPbqQJniTAO6RgeywHVQUPWBqJkVaqMBgZfoeKo5OOXSp +kG59GF1XGUHF0nJFbzrptIFWx2fxVPzD/vZWg/QGYaXebylUXJ4gZcYgTVnm +FyJ2jopvq7qy1Ej/a8sX0LpERWHt9H4Z0mWBf89YllJxOPsUQ5h0aIqjhs9N +Ki7sU9s4Rr4fp+L8jSMPqNjAyDj6gfSazufzw81UTDi1/ehj0k4CC222vabi +d9WZBddJb1zBTnvRQ0VzZrBgMmlf1z3v4F8qTq96GxtAes/hK4yqYSqOuzjG +W5COKOzaTZum4p36ryLKpK0P02NihWno2TufW0fuR9uSu1dMxGl4OrKcf5y0 +S6FH84gkDessRp1cSG9+lizto0TDYr1yRieZhz4fLaayOg1FYny3nCW9c7Le +8xWdtNtKhgvpvdTJK+baNBy5FeJRR+ZrgkhrntGn4fscoye7SUfaag9VG9Pw +6ZX0ZiXSifu8mQwzGjLja+ICyPyKi/z27LagoXDNE9PFpNNyzsak29Dwb6tE +8nUy/zmNrc0L1tFw8X8dQ70VBFA3+g3dWU9DwrJUKIx04Y+/0qGeNFSkbyGE +SVfKr9484EvD1Ij5QQo5T4/884caw2l4v8mMv5ycR7s5tkzUYRqmbRu4dZmc +1+dpHUzjWBpmXe3yVib9rnZRbOEJGnLtYi/NkfM/vDhMJvEiDduXxfzNIfsi +tECSxbtEQ4dbXuazRQRMG5dsniii4cfNHAMP0kJevYV+leR6Lm5TXlhI9n+V +Lcu6gYbPvzeYmZD9lLtmYPOfJhpe9BoWjyb7i/EuOramjYbbfoyfup9PgO4C +okXrDQ073py5x8oj+8FdfYvoVxrK3NT+vIDsw6Dp0djmf+go+zUgYj6DzNO+ +nQqfZeh4y5S6ZJbsV7Fv3aVCSnQciEv49OsMAUU9jW/NGHRMWT0C704T0Hv/ +rM5NJh3vbWiVPpRMgHMiu+vSNjquzeLGisST+f5THvxgBx3X5f46/4Ts/x/h +DKEPu+ionL5KPDGGgKSAxXpKYXT8tIcxMR5FQL3Dh4TUJDpm1v3QLCHPF0OZ +OP3D1XSUtBLauyOIAIHkiUfZNXSsCI95+D2QXG+hQM+aOjraijslhuwiYPeE +a+LoYzre3D0WGLST3M8uzR7/bjp++SncZ0qefwr5zcfchRi4S5EtaORGwIy2 +VK/uegauWGHeksokYDJXJc7Ik4H/ZVx+UWVMwPiSpZrsbQw0cmBfemFI7t8Y +O3DNLgZWPpYtF9Inz8c630nPaAYyX85lWy0j59/hlmRSEQO/cMqcDRXJvO32 +gv4JBirtdm+uG+fDuQ8B/V9mGdjw1aE08hcfMp1DE4f+MrAnWiSDOcKHVKOk +tulFGlh2XTWi6Dsf4n9Xb1hC0cAuhvnTbf182J0svJdrrYEaW7+ybV/wgVta +VpCVpYEJyTp6E8V86KGV5ltd0MAV8Yt3JxbyITKrJG88XwOFxtssZS/z4VZc +8UXXEg18vlLmxbJcPhhuLMiWvKuBhq4lB40z+LBCODPt2CcNrLx7cteHI+R3 +/bbDseE6mrjPQedShDsfRmXsvT0aNDHUzTVLe6YaBlO8PfaLamFZyFKhDKVq +sPt50O5f5jIEw+nRMe0q+OErFnojZjk2ezNWZ2pXkP8DiguON6zAz6nltqo/ +SkHmmVZq1c+VKHPK/+XWxyWgllTpwmTqYHe92ZRh8FXI1mZLyfrr4snCvuo2 +yyJoVTFfPXZGD/vOJogWGV0BjlpDmv5bfby73ilGTPISSApdDvOJN8Ca3MeL ++13ygBJH5W7SWoU9w/d+dETkwKKlW2pcn5CmPqAY/8kCPZ5y5cGthmgQVvdh +RjgT9vfKNNoLGOGBf3yEElTPwM+xlPV22Ub4hpBxdPA4BTb6TTl2usbYIvD9 +yqD0Cbg/Zvp76rkxvtA60KE1fxT26Bh2v/JbjQ2nFUysrscBb3hHx6ZFTBQ9 +ZPRNTTkarDSV1v5zmYkDj7deE1SPgOWxJyMaWCw8qviaHjYcCndNi4QdOSxM +mNhuc+9DKLhMPUh/w2XhV7+fWjLPQiFiz0TZV3MWpp/nzPWWhkLzFu9Pko4s +/DibsGkh+X8VwGbab/ZmYVZWf1XE1/1Q8uuT6ngSC39bvUrrHdoHK/3YD5Z2 +s7B18hx3o/JeOM1wmk14z0KFPPvHzhJ7Yfzj9tX9vSwcND0SV/AnBO57ppTm +DbBwX8rP2c7WEHB1+XhOcYiF99vtVdR2hMAh08S9iwRMMIVjJTh6fg80S7+i +Dy01wdVZeamnZILB737A0Rv7TFA2WLz4/OpAGA7+dtAqzATXTeXMf1YPhAj1 +oN1vw03w9wGPGmuRQDgZFeI6fdgErdYupfI6d0EVJ5zGPWaC95c9PL8wchfM +1STcbcwxwaoC2oXxhgBIr8wbf91ogtZlwU0S2/3hQUHHjlF5NmpIFpq2vN4B +fY70beFKbGxPlCm98WAHCMwEb/qtwsbNsYWWlWU7wGKdqJMwjY0ZF9+1vDq2 +A5oEOSzllWwsTPhIaTPdAU+35y8yN2NjPfSfP3bNF7o1AyvSdrIxX36/yMeU +7TB+7e+U/i02pjq+8ZKN8YbPHtYFJ2rZ+FDpmGPyXm/oWnjKdqCOje7b/uyR +3O4Ndd4q57Pq2bilT4PJtPKGeKXVnPkWNlpozogtlvAGqaTAqNb3bNQ++9H5 +OGsb6Pi/EfBbwMGd+kPMuGNbwXdp6aKctRyMvpvB7/fxhMjHXoFaLhxsCp7b +9NfGE9L8ZNr4rhzMfpESZKjnCXeLDqW0beBgotfL9J7ZTSCnZbtk3oeDmsnr +NUzOboImrX/lvMM56DHDCpR4vhFWLqfStPI5OPfFt59w3gCjKzOY/BEOKjnJ +8EpPu0PXU7SSHePg6VVxnnZR7lC/Z9gtbIJ8/mKD21MB7pDKt9vHnOWgXq2/ +SKKFO6zkCJTdETJFyn/mFd6TbrDdLpjeqGCKs1IrQMbHDTr8bSQ6uKY4X3eX +JWXhCrcLf3+aSDLFuScGa5QNXIBpGTZln2yKxIzc/gc0F7j56YdEwSlTvEbk +X9sv7QJ8Si/LPt0UH1EaZQU+O0NZdv2pvAumqNaapr072BkKUhLZNhWmWGt/ +wE00zglOhC05k91uirrjshKddxzBc40GmlK4uLrN4PVomB3Md4hJNtK4mHN1 +QE/V0w4K/IZ77DW4aPVOVswL7ODzsdqDnsu5qLlo03t9cTvY3+JceciQi3MB +Pk2Cl2zhpFMU5bY1F99LVl9wbLeBOxvfzBmHcLGZeqh3xM4aVIOP1+rVc/HU ++B8to8OWkPp35+rkBi6qvXA8fdzfEhakW1d/ecTFrnHbySE3S/hWI1xS0MLF +f6jtx0Z0LOGOwNFsmXYuCip9prd9tADPzNiDk/9y8VzJZE+LrQVk1x1afX8x +DwVjf6mnLDMHCadN1SqSPNzqEmkorGAOsX0mugeleKi3yyE5daE5BAhPaxrI +85Aa+abj1ScElnO43GUKD2vWtHgo5yK87d8/lriKhylSH8oKFBDkxYOq127g +oXIJhbNnpRkUWkZHjmziYc+j8rECUTMwjE61zNjCw6LsCN70IA+cRqredPnw +0PdW0KxsAQ+OvZ2Y8Q3i4QclRtCcIg+mL8dYRMbxML0kWD5MkgvdphntxaU8 +PG+j9q+KPAcCDhRetKvgYf7Ez5n8STZMVtz0+1HFw/XV5zOtutggw+iaWlXD +wxmL3L7RC2xwEFNXu1fPwzMOQ1Ftmmy421G8o/0NDyNK0nwCuCZgL3lbN7yL +hxdvvin4QjWBLpuWSaUeHqY9i0lMFDKB8Tvfk7z6eHg4kdGq1sYC3UsG5f99 +42E3ZMnWbGbB3W7z8JQhHrKr3VyWIQvs5dxAf4SHioukHWo0WbDz+IFXYRM8 +3FF4Wkx3mAnj9cdyFKfJ9bBPSZdrZ0L87DnfO7M8LIz/G6B8mwlSxiU6W+d5 +uHBRfYhpLhPygu9M/P3Lw3m3upOR8Uz4H5a21lY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698272702166517}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07698272702166517}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387169384502*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"59209cc5-e9f9-4ed2-9ce8-96ed431496a3"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -6987,15 +7096,843 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003512"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994236201388714*^9},ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-\ -5e6c7b4b5678"], + 3.994236201388714*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.060662}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943871696106586`*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"1b69cc14-8952-4ee1-9ead-1258572fe618"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"cd9a8165-891b-9245-aca1-\ -3f60fcfd9a79"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8FW0bB3CSJXlk352NtFhD5zjHOa4L2YWQSiWSSKQiSWRLKZKQpCwV +SvYzpaRFlCztFFESnuqpiOyi3nn/ms/3n5n53Pfv+t0z9O0hrn4LBAQEOIIC +Av+/Tva2PNJMLjRrf9c0ZaxnZdaRp3TIvCse3ufNfe4I1gCUf7FdqSsd3r5+ ++PNqsBGEu1zvFOq6DMl5vh5JwZYgPayYPtPJB4Uji2Tdg93g412nkPHOBrjg +56FyLcgXrDW/fRjtfA3unknT4oGhMNPJOjvS2Q+J/EdGV7YlQKPl1cJXl8dA +fXA7T18gE9Q+1n7erjMPdlnxykdsc0EuaNt1UUshNFqr4DA3dhnSV1nXOa0X +Q+OfaxXQ7iq8yzaoH5X6ByVmF/q/HL0OyYUxLxYoS2PUj4dXXfdUgL3xLhl5 +DWkscP9dMh5ZAWKPXNcv05VGX2MD89TjFXB0YGmPg7k0Ft/+rXmtoAKiGE8/ +Z+6Sxqyz8zHhrytgT4HSH6070hg6ERlz2LgS1l2s1nHYLIM2Q4FOir8qQTFz +4ERGriy6ZmYxMkuqQEn75tHpYln0sWJWHqioApWGYzFbq2TxCvv3FjeiCigj +Kw4sa5TFlY1XlYXuVcFSx73edV9lccKpQdT4ZRUYLZxnDhjJoWB2Oq9nogqc +wxQGDVvlsDdFPt3UrBpcFn/tPdcuh8pL/5gXWFSD6+Xad3Pv5dD20QEhQZtq +8Hi55UXTTzm09I2vrXGuhq06V+54ysvjROOBL7+8q2H3oP6ZeG95dJV4MFse +Xw3H3e3MXk/KY13q0zadxmpQufFcZYGgAp6wlVzi/6QaKmTdp1YtVsAqZvTV +i23VZA68qs5QFdBj3Zu3M+3VoLkujLHOVgEH/eOWRw1WQ8PafJGX5xXwyprx +nQUL+TBvPfH8GVcRe08FGO4050NacWTpvLUi0uj598Wt+KApIpCku04RQ4V3 +XrhuywfHx+Lmp/wU0br1rPV7Zz7kWNIIx1RFlOHF+4p68cEEHc61fVREIoR6 +P+oQH0LZl7a1xCuhufL7tMEyPtgXSI47pCjhDb5HyINKPjBEo5Ken1VCNLEz +zeLz4WWHR3X7NSWUp7teZN3mg95eCaHe50pYURCQZNfIh6/FB4t/qSijibMw ++3oXH7bIOQ2pEsr4UiGpxVuAAKPDdXF5d5VxBVfqWe0CAsT7lyvQm5Tx1Gxx +k6QwAbWVQqD1Thm5UvtyyxYRoOBQm2bwVxnjjnQP3JIh4GWcprGVgwrOV+Zo +/6NJwJqfs5F7BlTQ1HPu+k1LAg7ZZq58+EMFv6jVzB61IqDikm637KQKTumv +D3exIUDJ3ZtdK6aKHSzzsR57An7cfjwlpKeK3cYiMo/XEZARnxZ2PkIVszr7 +N/Z5EdDcs0LzR5wq1gobFe33JmDOuLHdLFkVI99+Xyq4nYCdXyYMB3NV0e37 +pyYZPwI4jptH9RpVcSBP+5zYbgL65bX2PPpHDQUFA6fMwglQDHmgrqiohtON +wa8yDxLg2Lzx2S6aGhZ/S/7vcwQBNZHJOkuM1LDZpextzGECTn4c+bZpoxo+ +/Pai5mgsAYYldf4/L6thEg5r9pwgwH/BekWLMjVMXrLTYOIkARc3Dzdl3lTD +2Y0vji5OIUBEkq7FaVbDS+5ui3VTCejef2zw6JAavknfdcUynYA47jofFRN1 +3CFfXvTgPAG2Xnm/WBbqODv+0Ls6hwDJ2O8J6x3VUd5ja2veBfL+jYnFad7q +mH16RXlQLgG37e98Fzmhjqgc8ayjgICYINFozQx13NupoFx4iQDrVHdJi1x1 +fMzaqRpymYCOV8MG0dXq+K3cxnb6CgEjGzXCx96p44b5Ou/OYgJuRe4VlR5U +xwfLo2KOXiXgyMV72XrD6mguHLZV9xoBEn0b6nYtoOCX+F2b95cQ0C5Y5Hhc +goIjIjnRktcJyNH49aFQgYLP//r7FpNe5p8i0LeSgrsz1h1pKSVgOOndmXlj +Cs45l950LyPgxnUtDVWgoFQj5WYPaYvheisPNwrW+/RKfSgnwOvAxMmnhykY +NNu7ubySgKXnLNS+JVJQjKE6rlD1//ycLhdNo+DYbOnWKNKRcyteWhRSkMdM +KOFUE2BOOejjXUHB+RvLUzNIi+GjX9G3KXhf9ZPtV9JnE7zka59S8HDhBqtE +PgFbikqL376l4Mb8mBPPSDOeTLPG+yg4sCr1mjRBwH9frVqkv1NQ/0LdlXWk +q8QzPPUnKHghyDzqFOmDOn3fHf9S8HOSp9Fj0mZOutGBi6gormHZOk1aeG+k +ZJIsFXn3TCyW3yDg6Zkn+UXqVOxdFnnRjXQGIbeqcRkVg2JtuiNJe77xaehb +RcUQg/65XNL0qQq3P6ZUDP2RInyP9FeluUFVayqO8ZMnOklXcuzC2S5UdG7T +eD5MOnxLlugGTypWPbqQJniTAO6RgeywHVQUPWBqJkVaqMBgZfoeKo5OOXSp +kG59GF1XGUHF0nJFbzrptIFWx2fxVPzD/vZWg/QGYaXebylUXJ4gZcYgTVnm +FyJ2jopvq7qy1Ej/a8sX0LpERWHt9H4Z0mWBf89YllJxOPsUQ5h0aIqjhs9N +Ki7sU9s4Rr4fp+L8jSMPqNjAyDj6gfSazufzw81UTDi1/ehj0k4CC222vabi +d9WZBddJb1zBTnvRQ0VzZrBgMmlf1z3v4F8qTq96GxtAes/hK4yqYSqOuzjG +W5COKOzaTZum4p36ryLKpK0P02NihWno2TufW0fuR9uSu1dMxGl4OrKcf5y0 +S6FH84gkDessRp1cSG9+lizto0TDYr1yRieZhz4fLaayOg1FYny3nCW9c7Le +8xWdtNtKhgvpvdTJK+baNBy5FeJRR+ZrgkhrntGn4fscoye7SUfaag9VG9Pw +6ZX0ZiXSifu8mQwzGjLja+ICyPyKi/z27LagoXDNE9PFpNNyzsak29Dwb6tE +8nUy/zmNrc0L1tFw8X8dQ70VBFA3+g3dWU9DwrJUKIx04Y+/0qGeNFSkbyGE +SVfKr9484EvD1Ij5QQo5T4/884caw2l4v8mMv5ycR7s5tkzUYRqmbRu4dZmc +1+dpHUzjWBpmXe3yVib9rnZRbOEJGnLtYi/NkfM/vDhMJvEiDduXxfzNIfsi +tECSxbtEQ4dbXuazRQRMG5dsniii4cfNHAMP0kJevYV+leR6Lm5TXlhI9n+V +Lcu6gYbPvzeYmZD9lLtmYPOfJhpe9BoWjyb7i/EuOramjYbbfoyfup9PgO4C +okXrDQ073py5x8oj+8FdfYvoVxrK3NT+vIDsw6Dp0djmf+go+zUgYj6DzNO+ +nQqfZeh4y5S6ZJbsV7Fv3aVCSnQciEv49OsMAUU9jW/NGHRMWT0C704T0Hv/ +rM5NJh3vbWiVPpRMgHMiu+vSNjquzeLGisST+f5THvxgBx3X5f46/4Ts/x/h +DKEPu+ionL5KPDGGgKSAxXpKYXT8tIcxMR5FQL3Dh4TUJDpm1v3QLCHPF0OZ +OP3D1XSUtBLauyOIAIHkiUfZNXSsCI95+D2QXG+hQM+aOjraijslhuwiYPeE +a+LoYzre3D0WGLST3M8uzR7/bjp++SncZ0qefwr5zcfchRi4S5EtaORGwIy2 +VK/uegauWGHeksokYDJXJc7Ik4H/ZVx+UWVMwPiSpZrsbQw0cmBfemFI7t8Y +O3DNLgZWPpYtF9Inz8c630nPaAYyX85lWy0j59/hlmRSEQO/cMqcDRXJvO32 +gv4JBirtdm+uG+fDuQ8B/V9mGdjw1aE08hcfMp1DE4f+MrAnWiSDOcKHVKOk +tulFGlh2XTWi6Dsf4n9Xb1hC0cAuhvnTbf182J0svJdrrYEaW7+ybV/wgVta +VpCVpYEJyTp6E8V86KGV5ltd0MAV8Yt3JxbyITKrJG88XwOFxtssZS/z4VZc +8UXXEg18vlLmxbJcPhhuLMiWvKuBhq4lB40z+LBCODPt2CcNrLx7cteHI+R3 +/bbDseE6mrjPQedShDsfRmXsvT0aNDHUzTVLe6YaBlO8PfaLamFZyFKhDKVq +sPt50O5f5jIEw+nRMe0q+OErFnojZjk2ezNWZ2pXkP8DiguON6zAz6nltqo/ +SkHmmVZq1c+VKHPK/+XWxyWgllTpwmTqYHe92ZRh8FXI1mZLyfrr4snCvuo2 +yyJoVTFfPXZGD/vOJogWGV0BjlpDmv5bfby73ilGTPISSApdDvOJN8Ca3MeL ++13ygBJH5W7SWoU9w/d+dETkwKKlW2pcn5CmPqAY/8kCPZ5y5cGthmgQVvdh +RjgT9vfKNNoLGOGBf3yEElTPwM+xlPV22Ub4hpBxdPA4BTb6TTl2usbYIvD9 +yqD0Cbg/Zvp76rkxvtA60KE1fxT26Bh2v/JbjQ2nFUysrscBb3hHx6ZFTBQ9 +ZPRNTTkarDSV1v5zmYkDj7deE1SPgOWxJyMaWCw8qviaHjYcCndNi4QdOSxM +mNhuc+9DKLhMPUh/w2XhV7+fWjLPQiFiz0TZV3MWpp/nzPWWhkLzFu9Pko4s +/DibsGkh+X8VwGbab/ZmYVZWf1XE1/1Q8uuT6ngSC39bvUrrHdoHK/3YD5Z2 +s7B18hx3o/JeOM1wmk14z0KFPPvHzhJ7Yfzj9tX9vSwcND0SV/AnBO57ppTm +DbBwX8rP2c7WEHB1+XhOcYiF99vtVdR2hMAh08S9iwRMMIVjJTh6fg80S7+i +Dy01wdVZeamnZILB737A0Rv7TFA2WLz4/OpAGA7+dtAqzATXTeXMf1YPhAj1 +oN1vw03w9wGPGmuRQDgZFeI6fdgErdYupfI6d0EVJ5zGPWaC95c9PL8wchfM +1STcbcwxwaoC2oXxhgBIr8wbf91ogtZlwU0S2/3hQUHHjlF5NmpIFpq2vN4B +fY70beFKbGxPlCm98WAHCMwEb/qtwsbNsYWWlWU7wGKdqJMwjY0ZF9+1vDq2 +A5oEOSzllWwsTPhIaTPdAU+35y8yN2NjPfSfP3bNF7o1AyvSdrIxX36/yMeU +7TB+7e+U/i02pjq+8ZKN8YbPHtYFJ2rZ+FDpmGPyXm/oWnjKdqCOje7b/uyR +3O4Ndd4q57Pq2bilT4PJtPKGeKXVnPkWNlpozogtlvAGqaTAqNb3bNQ++9H5 +OGsb6Pi/EfBbwMGd+kPMuGNbwXdp6aKctRyMvpvB7/fxhMjHXoFaLhxsCp7b +9NfGE9L8ZNr4rhzMfpESZKjnCXeLDqW0beBgotfL9J7ZTSCnZbtk3oeDmsnr +NUzOboImrX/lvMM56DHDCpR4vhFWLqfStPI5OPfFt59w3gCjKzOY/BEOKjnJ +8EpPu0PXU7SSHePg6VVxnnZR7lC/Z9gtbIJ8/mKD21MB7pDKt9vHnOWgXq2/ +SKKFO6zkCJTdETJFyn/mFd6TbrDdLpjeqGCKs1IrQMbHDTr8bSQ6uKY4X3eX +JWXhCrcLf3+aSDLFuScGa5QNXIBpGTZln2yKxIzc/gc0F7j56YdEwSlTvEbk +X9sv7QJ8Si/LPt0UH1EaZQU+O0NZdv2pvAumqNaapr072BkKUhLZNhWmWGt/ +wE00zglOhC05k91uirrjshKddxzBc40GmlK4uLrN4PVomB3Md4hJNtK4mHN1 +QE/V0w4K/IZ77DW4aPVOVswL7ODzsdqDnsu5qLlo03t9cTvY3+JceciQi3MB +Pk2Cl2zhpFMU5bY1F99LVl9wbLeBOxvfzBmHcLGZeqh3xM4aVIOP1+rVc/HU ++B8to8OWkPp35+rkBi6qvXA8fdzfEhakW1d/ecTFrnHbySE3S/hWI1xS0MLF +f6jtx0Z0LOGOwNFsmXYuCip9prd9tADPzNiDk/9y8VzJZE+LrQVk1x1afX8x +DwVjf6mnLDMHCadN1SqSPNzqEmkorGAOsX0mugeleKi3yyE5daE5BAhPaxrI +85Aa+abj1ScElnO43GUKD2vWtHgo5yK87d8/lriKhylSH8oKFBDkxYOq127g +oXIJhbNnpRkUWkZHjmziYc+j8rECUTMwjE61zNjCw6LsCN70IA+cRqredPnw +0PdW0KxsAQ+OvZ2Y8Q3i4QclRtCcIg+mL8dYRMbxML0kWD5MkgvdphntxaU8 +PG+j9q+KPAcCDhRetKvgYf7Ez5n8STZMVtz0+1HFw/XV5zOtutggw+iaWlXD +wxmL3L7RC2xwEFNXu1fPwzMOQ1Ftmmy421G8o/0NDyNK0nwCuCZgL3lbN7yL +hxdvvin4QjWBLpuWSaUeHqY9i0lMFDKB8Tvfk7z6eHg4kdGq1sYC3UsG5f99 +42E3ZMnWbGbB3W7z8JQhHrKr3VyWIQvs5dxAf4SHioukHWo0WbDz+IFXYRM8 +3FF4Wkx3mAnj9cdyFKfJ9bBPSZdrZ0L87DnfO7M8LIz/G6B8mwlSxiU6W+d5 +uHBRfYhpLhPygu9M/P3Lw3m3upOR8Uz4H5a21lY= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8FW0bB3CSJXlk352NtFhD5zjHOa4L2YWQSiWSSKQiSWRLKZKQpCwV +SvYzpaRFlCztFFESnuqpiOyi3nn/ms/3n5n53Pfv+t0z9O0hrn4LBAQEOIIC +Av+/Tva2PNJMLjRrf9c0ZaxnZdaRp3TIvCse3ufNfe4I1gCUf7FdqSsd3r5+ ++PNqsBGEu1zvFOq6DMl5vh5JwZYgPayYPtPJB4Uji2Tdg93g412nkPHOBrjg +56FyLcgXrDW/fRjtfA3unknT4oGhMNPJOjvS2Q+J/EdGV7YlQKPl1cJXl8dA +fXA7T18gE9Q+1n7erjMPdlnxykdsc0EuaNt1UUshNFqr4DA3dhnSV1nXOa0X +Q+OfaxXQ7iq8yzaoH5X6ByVmF/q/HL0OyYUxLxYoS2PUj4dXXfdUgL3xLhl5 +DWkscP9dMh5ZAWKPXNcv05VGX2MD89TjFXB0YGmPg7k0Ft/+rXmtoAKiGE8/ +Z+6Sxqyz8zHhrytgT4HSH6070hg6ERlz2LgS1l2s1nHYLIM2Q4FOir8qQTFz +4ERGriy6ZmYxMkuqQEn75tHpYln0sWJWHqioApWGYzFbq2TxCvv3FjeiCigj +Kw4sa5TFlY1XlYXuVcFSx73edV9lccKpQdT4ZRUYLZxnDhjJoWB2Oq9nogqc +wxQGDVvlsDdFPt3UrBpcFn/tPdcuh8pL/5gXWFSD6+Xad3Pv5dD20QEhQZtq +8Hi55UXTTzm09I2vrXGuhq06V+54ysvjROOBL7+8q2H3oP6ZeG95dJV4MFse +Xw3H3e3MXk/KY13q0zadxmpQufFcZYGgAp6wlVzi/6QaKmTdp1YtVsAqZvTV +i23VZA68qs5QFdBj3Zu3M+3VoLkujLHOVgEH/eOWRw1WQ8PafJGX5xXwyprx +nQUL+TBvPfH8GVcRe08FGO4050NacWTpvLUi0uj598Wt+KApIpCku04RQ4V3 +XrhuywfHx+Lmp/wU0br1rPV7Zz7kWNIIx1RFlOHF+4p68cEEHc61fVREIoR6 +P+oQH0LZl7a1xCuhufL7tMEyPtgXSI47pCjhDb5HyINKPjBEo5Ken1VCNLEz +zeLz4WWHR3X7NSWUp7teZN3mg95eCaHe50pYURCQZNfIh6/FB4t/qSijibMw ++3oXH7bIOQ2pEsr4UiGpxVuAAKPDdXF5d5VxBVfqWe0CAsT7lyvQm5Tx1Gxx +k6QwAbWVQqD1Thm5UvtyyxYRoOBQm2bwVxnjjnQP3JIh4GWcprGVgwrOV+Zo +/6NJwJqfs5F7BlTQ1HPu+k1LAg7ZZq58+EMFv6jVzB61IqDikm637KQKTumv +D3exIUDJ3ZtdK6aKHSzzsR57An7cfjwlpKeK3cYiMo/XEZARnxZ2PkIVszr7 +N/Z5EdDcs0LzR5wq1gobFe33JmDOuLHdLFkVI99+Xyq4nYCdXyYMB3NV0e37 +pyYZPwI4jptH9RpVcSBP+5zYbgL65bX2PPpHDQUFA6fMwglQDHmgrqiohtON +wa8yDxLg2Lzx2S6aGhZ/S/7vcwQBNZHJOkuM1LDZpextzGECTn4c+bZpoxo+ +/Pai5mgsAYYldf4/L6thEg5r9pwgwH/BekWLMjVMXrLTYOIkARc3Dzdl3lTD +2Y0vji5OIUBEkq7FaVbDS+5ui3VTCejef2zw6JAavknfdcUynYA47jofFRN1 +3CFfXvTgPAG2Xnm/WBbqODv+0Ls6hwDJ2O8J6x3VUd5ja2veBfL+jYnFad7q +mH16RXlQLgG37e98Fzmhjqgc8ayjgICYINFozQx13NupoFx4iQDrVHdJi1x1 +fMzaqRpymYCOV8MG0dXq+K3cxnb6CgEjGzXCx96p44b5Ou/OYgJuRe4VlR5U +xwfLo2KOXiXgyMV72XrD6mguHLZV9xoBEn0b6nYtoOCX+F2b95cQ0C5Y5Hhc +goIjIjnRktcJyNH49aFQgYLP//r7FpNe5p8i0LeSgrsz1h1pKSVgOOndmXlj +Cs45l950LyPgxnUtDVWgoFQj5WYPaYvheisPNwrW+/RKfSgnwOvAxMmnhykY +NNu7ubySgKXnLNS+JVJQjKE6rlD1//ycLhdNo+DYbOnWKNKRcyteWhRSkMdM +KOFUE2BOOejjXUHB+RvLUzNIi+GjX9G3KXhf9ZPtV9JnE7zka59S8HDhBqtE +PgFbikqL376l4Mb8mBPPSDOeTLPG+yg4sCr1mjRBwH9frVqkv1NQ/0LdlXWk +q8QzPPUnKHghyDzqFOmDOn3fHf9S8HOSp9Fj0mZOutGBi6gormHZOk1aeG+k +ZJIsFXn3TCyW3yDg6Zkn+UXqVOxdFnnRjXQGIbeqcRkVg2JtuiNJe77xaehb +RcUQg/65XNL0qQq3P6ZUDP2RInyP9FeluUFVayqO8ZMnOklXcuzC2S5UdG7T +eD5MOnxLlugGTypWPbqQJniTAO6RgeywHVQUPWBqJkVaqMBgZfoeKo5OOXSp +kG59GF1XGUHF0nJFbzrptIFWx2fxVPzD/vZWg/QGYaXebylUXJ4gZcYgTVnm +FyJ2jopvq7qy1Ej/a8sX0LpERWHt9H4Z0mWBf89YllJxOPsUQ5h0aIqjhs9N +Ki7sU9s4Rr4fp+L8jSMPqNjAyDj6gfSazufzw81UTDi1/ehj0k4CC222vabi +d9WZBddJb1zBTnvRQ0VzZrBgMmlf1z3v4F8qTq96GxtAes/hK4yqYSqOuzjG +W5COKOzaTZum4p36ryLKpK0P02NihWno2TufW0fuR9uSu1dMxGl4OrKcf5y0 +S6FH84gkDessRp1cSG9+lizto0TDYr1yRieZhz4fLaayOg1FYny3nCW9c7Le +8xWdtNtKhgvpvdTJK+baNBy5FeJRR+ZrgkhrntGn4fscoye7SUfaag9VG9Pw +6ZX0ZiXSifu8mQwzGjLja+ICyPyKi/z27LagoXDNE9PFpNNyzsak29Dwb6tE +8nUy/zmNrc0L1tFw8X8dQ70VBFA3+g3dWU9DwrJUKIx04Y+/0qGeNFSkbyGE +SVfKr9484EvD1Ij5QQo5T4/884caw2l4v8mMv5ycR7s5tkzUYRqmbRu4dZmc +1+dpHUzjWBpmXe3yVib9rnZRbOEJGnLtYi/NkfM/vDhMJvEiDduXxfzNIfsi +tECSxbtEQ4dbXuazRQRMG5dsniii4cfNHAMP0kJevYV+leR6Lm5TXlhI9n+V +Lcu6gYbPvzeYmZD9lLtmYPOfJhpe9BoWjyb7i/EuOramjYbbfoyfup9PgO4C +okXrDQ073py5x8oj+8FdfYvoVxrK3NT+vIDsw6Dp0djmf+go+zUgYj6DzNO+ +nQqfZeh4y5S6ZJbsV7Fv3aVCSnQciEv49OsMAUU9jW/NGHRMWT0C704T0Hv/ +rM5NJh3vbWiVPpRMgHMiu+vSNjquzeLGisST+f5THvxgBx3X5f46/4Ts/x/h +DKEPu+ionL5KPDGGgKSAxXpKYXT8tIcxMR5FQL3Dh4TUJDpm1v3QLCHPF0OZ +OP3D1XSUtBLauyOIAIHkiUfZNXSsCI95+D2QXG+hQM+aOjraijslhuwiYPeE +a+LoYzre3D0WGLST3M8uzR7/bjp++SncZ0qefwr5zcfchRi4S5EtaORGwIy2 +VK/uegauWGHeksokYDJXJc7Ik4H/ZVx+UWVMwPiSpZrsbQw0cmBfemFI7t8Y +O3DNLgZWPpYtF9Inz8c630nPaAYyX85lWy0j59/hlmRSEQO/cMqcDRXJvO32 +gv4JBirtdm+uG+fDuQ8B/V9mGdjw1aE08hcfMp1DE4f+MrAnWiSDOcKHVKOk +tulFGlh2XTWi6Dsf4n9Xb1hC0cAuhvnTbf182J0svJdrrYEaW7+ybV/wgVta +VpCVpYEJyTp6E8V86KGV5ltd0MAV8Yt3JxbyITKrJG88XwOFxtssZS/z4VZc +8UXXEg18vlLmxbJcPhhuLMiWvKuBhq4lB40z+LBCODPt2CcNrLx7cteHI+R3 +/bbDseE6mrjPQedShDsfRmXsvT0aNDHUzTVLe6YaBlO8PfaLamFZyFKhDKVq +sPt50O5f5jIEw+nRMe0q+OErFnojZjk2ezNWZ2pXkP8DiguON6zAz6nltqo/ +SkHmmVZq1c+VKHPK/+XWxyWgllTpwmTqYHe92ZRh8FXI1mZLyfrr4snCvuo2 +yyJoVTFfPXZGD/vOJogWGV0BjlpDmv5bfby73ilGTPISSApdDvOJN8Ca3MeL ++13ygBJH5W7SWoU9w/d+dETkwKKlW2pcn5CmPqAY/8kCPZ5y5cGthmgQVvdh +RjgT9vfKNNoLGOGBf3yEElTPwM+xlPV22Ub4hpBxdPA4BTb6TTl2usbYIvD9 +yqD0Cbg/Zvp76rkxvtA60KE1fxT26Bh2v/JbjQ2nFUysrscBb3hHx6ZFTBQ9 +ZPRNTTkarDSV1v5zmYkDj7deE1SPgOWxJyMaWCw8qviaHjYcCndNi4QdOSxM +mNhuc+9DKLhMPUh/w2XhV7+fWjLPQiFiz0TZV3MWpp/nzPWWhkLzFu9Pko4s +/DibsGkh+X8VwGbab/ZmYVZWf1XE1/1Q8uuT6ngSC39bvUrrHdoHK/3YD5Z2 +s7B18hx3o/JeOM1wmk14z0KFPPvHzhJ7Yfzj9tX9vSwcND0SV/AnBO57ppTm +DbBwX8rP2c7WEHB1+XhOcYiF99vtVdR2hMAh08S9iwRMMIVjJTh6fg80S7+i +Dy01wdVZeamnZILB737A0Rv7TFA2WLz4/OpAGA7+dtAqzATXTeXMf1YPhAj1 +oN1vw03w9wGPGmuRQDgZFeI6fdgErdYupfI6d0EVJ5zGPWaC95c9PL8wchfM +1STcbcwxwaoC2oXxhgBIr8wbf91ogtZlwU0S2/3hQUHHjlF5NmpIFpq2vN4B +fY70beFKbGxPlCm98WAHCMwEb/qtwsbNsYWWlWU7wGKdqJMwjY0ZF9+1vDq2 +A5oEOSzllWwsTPhIaTPdAU+35y8yN2NjPfSfP3bNF7o1AyvSdrIxX36/yMeU +7TB+7e+U/i02pjq+8ZKN8YbPHtYFJ2rZ+FDpmGPyXm/oWnjKdqCOje7b/uyR +3O4Ndd4q57Pq2bilT4PJtPKGeKXVnPkWNlpozogtlvAGqaTAqNb3bNQ++9H5 +OGsb6Pi/EfBbwMGd+kPMuGNbwXdp6aKctRyMvpvB7/fxhMjHXoFaLhxsCp7b +9NfGE9L8ZNr4rhzMfpESZKjnCXeLDqW0beBgotfL9J7ZTSCnZbtk3oeDmsnr +NUzOboImrX/lvMM56DHDCpR4vhFWLqfStPI5OPfFt59w3gCjKzOY/BEOKjnJ +8EpPu0PXU7SSHePg6VVxnnZR7lC/Z9gtbIJ8/mKD21MB7pDKt9vHnOWgXq2/ +SKKFO6zkCJTdETJFyn/mFd6TbrDdLpjeqGCKs1IrQMbHDTr8bSQ6uKY4X3eX +JWXhCrcLf3+aSDLFuScGa5QNXIBpGTZln2yKxIzc/gc0F7j56YdEwSlTvEbk +X9sv7QJ8Si/LPt0UH1EaZQU+O0NZdv2pvAumqNaapr072BkKUhLZNhWmWGt/ +wE00zglOhC05k91uirrjshKddxzBc40GmlK4uLrN4PVomB3Md4hJNtK4mHN1 +QE/V0w4K/IZ77DW4aPVOVswL7ODzsdqDnsu5qLlo03t9cTvY3+JceciQi3MB +Pk2Cl2zhpFMU5bY1F99LVl9wbLeBOxvfzBmHcLGZeqh3xM4aVIOP1+rVc/HU ++B8to8OWkPp35+rkBi6qvXA8fdzfEhakW1d/ecTFrnHbySE3S/hWI1xS0MLF +f6jtx0Z0LOGOwNFsmXYuCip9prd9tADPzNiDk/9y8VzJZE+LrQVk1x1afX8x +DwVjf6mnLDMHCadN1SqSPNzqEmkorGAOsX0mugeleKi3yyE5daE5BAhPaxrI +85Aa+abj1ScElnO43GUKD2vWtHgo5yK87d8/lriKhylSH8oKFBDkxYOq127g +oXIJhbNnpRkUWkZHjmziYc+j8rECUTMwjE61zNjCw6LsCN70IA+cRqredPnw +0PdW0KxsAQ+OvZ2Y8Q3i4QclRtCcIg+mL8dYRMbxML0kWD5MkgvdphntxaU8 +PG+j9q+KPAcCDhRetKvgYf7Ez5n8STZMVtz0+1HFw/XV5zOtutggw+iaWlXD +wxmL3L7RC2xwEFNXu1fPwzMOQ1Ftmmy421G8o/0NDyNK0nwCuCZgL3lbN7yL +hxdvvin4QjWBLpuWSaUeHqY9i0lMFDKB8Tvfk7z6eHg4kdGq1sYC3UsG5f99 +42E3ZMnWbGbB3W7z8JQhHrKr3VyWIQvs5dxAf4SHioukHWo0WbDz+IFXYRM8 +3FF4Wkx3mAnj9cdyFKfJ9bBPSZdrZ0L87DnfO7M8LIz/G6B8mwlSxiU6W+d5 +uHBRfYhpLhPygu9M/P3Lw3m3upOR8Uz4H5a21lY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698272702166517}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698272702166517}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8FW0bB3CSJXlk352NtFhD5zjHOa4L2YWQSiWSSKQiSWRLKZKQpCwV +SvYzpaRFlCztFFESnuqpiOyi3nn/ms/3n5n53Pfv+t0z9O0hrn4LBAQEOIIC +Av+/Tva2PNJMLjRrf9c0ZaxnZdaRp3TIvCse3ufNfe4I1gCUf7FdqSsd3r5+ ++PNqsBGEu1zvFOq6DMl5vh5JwZYgPayYPtPJB4Uji2Tdg93g412nkPHOBrjg +56FyLcgXrDW/fRjtfA3unknT4oGhMNPJOjvS2Q+J/EdGV7YlQKPl1cJXl8dA +fXA7T18gE9Q+1n7erjMPdlnxykdsc0EuaNt1UUshNFqr4DA3dhnSV1nXOa0X +Q+OfaxXQ7iq8yzaoH5X6ByVmF/q/HL0OyYUxLxYoS2PUj4dXXfdUgL3xLhl5 +DWkscP9dMh5ZAWKPXNcv05VGX2MD89TjFXB0YGmPg7k0Ft/+rXmtoAKiGE8/ +Z+6Sxqyz8zHhrytgT4HSH6070hg6ERlz2LgS1l2s1nHYLIM2Q4FOir8qQTFz +4ERGriy6ZmYxMkuqQEn75tHpYln0sWJWHqioApWGYzFbq2TxCvv3FjeiCigj +Kw4sa5TFlY1XlYXuVcFSx73edV9lccKpQdT4ZRUYLZxnDhjJoWB2Oq9nogqc +wxQGDVvlsDdFPt3UrBpcFn/tPdcuh8pL/5gXWFSD6+Xad3Pv5dD20QEhQZtq +8Hi55UXTTzm09I2vrXGuhq06V+54ysvjROOBL7+8q2H3oP6ZeG95dJV4MFse +Xw3H3e3MXk/KY13q0zadxmpQufFcZYGgAp6wlVzi/6QaKmTdp1YtVsAqZvTV +i23VZA68qs5QFdBj3Zu3M+3VoLkujLHOVgEH/eOWRw1WQ8PafJGX5xXwyprx +nQUL+TBvPfH8GVcRe08FGO4050NacWTpvLUi0uj598Wt+KApIpCku04RQ4V3 +XrhuywfHx+Lmp/wU0br1rPV7Zz7kWNIIx1RFlOHF+4p68cEEHc61fVREIoR6 +P+oQH0LZl7a1xCuhufL7tMEyPtgXSI47pCjhDb5HyINKPjBEo5Ken1VCNLEz +zeLz4WWHR3X7NSWUp7teZN3mg95eCaHe50pYURCQZNfIh6/FB4t/qSijibMw ++3oXH7bIOQ2pEsr4UiGpxVuAAKPDdXF5d5VxBVfqWe0CAsT7lyvQm5Tx1Gxx +k6QwAbWVQqD1Thm5UvtyyxYRoOBQm2bwVxnjjnQP3JIh4GWcprGVgwrOV+Zo +/6NJwJqfs5F7BlTQ1HPu+k1LAg7ZZq58+EMFv6jVzB61IqDikm637KQKTumv +D3exIUDJ3ZtdK6aKHSzzsR57An7cfjwlpKeK3cYiMo/XEZARnxZ2PkIVszr7 +N/Z5EdDcs0LzR5wq1gobFe33JmDOuLHdLFkVI99+Xyq4nYCdXyYMB3NV0e37 +pyYZPwI4jptH9RpVcSBP+5zYbgL65bX2PPpHDQUFA6fMwglQDHmgrqiohtON +wa8yDxLg2Lzx2S6aGhZ/S/7vcwQBNZHJOkuM1LDZpextzGECTn4c+bZpoxo+ +/Pai5mgsAYYldf4/L6thEg5r9pwgwH/BekWLMjVMXrLTYOIkARc3Dzdl3lTD +2Y0vji5OIUBEkq7FaVbDS+5ui3VTCejef2zw6JAavknfdcUynYA47jofFRN1 +3CFfXvTgPAG2Xnm/WBbqODv+0Ls6hwDJ2O8J6x3VUd5ja2veBfL+jYnFad7q +mH16RXlQLgG37e98Fzmhjqgc8ayjgICYINFozQx13NupoFx4iQDrVHdJi1x1 +fMzaqRpymYCOV8MG0dXq+K3cxnb6CgEjGzXCx96p44b5Ou/OYgJuRe4VlR5U +xwfLo2KOXiXgyMV72XrD6mguHLZV9xoBEn0b6nYtoOCX+F2b95cQ0C5Y5Hhc +goIjIjnRktcJyNH49aFQgYLP//r7FpNe5p8i0LeSgrsz1h1pKSVgOOndmXlj +Cs45l950LyPgxnUtDVWgoFQj5WYPaYvheisPNwrW+/RKfSgnwOvAxMmnhykY +NNu7ubySgKXnLNS+JVJQjKE6rlD1//ycLhdNo+DYbOnWKNKRcyteWhRSkMdM +KOFUE2BOOejjXUHB+RvLUzNIi+GjX9G3KXhf9ZPtV9JnE7zka59S8HDhBqtE +PgFbikqL376l4Mb8mBPPSDOeTLPG+yg4sCr1mjRBwH9frVqkv1NQ/0LdlXWk +q8QzPPUnKHghyDzqFOmDOn3fHf9S8HOSp9Fj0mZOutGBi6gormHZOk1aeG+k +ZJIsFXn3TCyW3yDg6Zkn+UXqVOxdFnnRjXQGIbeqcRkVg2JtuiNJe77xaehb +RcUQg/65XNL0qQq3P6ZUDP2RInyP9FeluUFVayqO8ZMnOklXcuzC2S5UdG7T +eD5MOnxLlugGTypWPbqQJniTAO6RgeywHVQUPWBqJkVaqMBgZfoeKo5OOXSp +kG59GF1XGUHF0nJFbzrptIFWx2fxVPzD/vZWg/QGYaXebylUXJ4gZcYgTVnm +FyJ2jopvq7qy1Ej/a8sX0LpERWHt9H4Z0mWBf89YllJxOPsUQ5h0aIqjhs9N +Ki7sU9s4Rr4fp+L8jSMPqNjAyDj6gfSazufzw81UTDi1/ehj0k4CC222vabi +d9WZBddJb1zBTnvRQ0VzZrBgMmlf1z3v4F8qTq96GxtAes/hK4yqYSqOuzjG +W5COKOzaTZum4p36ryLKpK0P02NihWno2TufW0fuR9uSu1dMxGl4OrKcf5y0 +S6FH84gkDessRp1cSG9+lizto0TDYr1yRieZhz4fLaayOg1FYny3nCW9c7Le +8xWdtNtKhgvpvdTJK+baNBy5FeJRR+ZrgkhrntGn4fscoye7SUfaag9VG9Pw +6ZX0ZiXSifu8mQwzGjLja+ICyPyKi/z27LagoXDNE9PFpNNyzsak29Dwb6tE +8nUy/zmNrc0L1tFw8X8dQ70VBFA3+g3dWU9DwrJUKIx04Y+/0qGeNFSkbyGE +SVfKr9484EvD1Ij5QQo5T4/884caw2l4v8mMv5ycR7s5tkzUYRqmbRu4dZmc +1+dpHUzjWBpmXe3yVib9rnZRbOEJGnLtYi/NkfM/vDhMJvEiDduXxfzNIfsi +tECSxbtEQ4dbXuazRQRMG5dsniii4cfNHAMP0kJevYV+leR6Lm5TXlhI9n+V +Lcu6gYbPvzeYmZD9lLtmYPOfJhpe9BoWjyb7i/EuOramjYbbfoyfup9PgO4C +okXrDQ073py5x8oj+8FdfYvoVxrK3NT+vIDsw6Dp0djmf+go+zUgYj6DzNO+ +nQqfZeh4y5S6ZJbsV7Fv3aVCSnQciEv49OsMAUU9jW/NGHRMWT0C704T0Hv/ +rM5NJh3vbWiVPpRMgHMiu+vSNjquzeLGisST+f5THvxgBx3X5f46/4Ts/x/h +DKEPu+ionL5KPDGGgKSAxXpKYXT8tIcxMR5FQL3Dh4TUJDpm1v3QLCHPF0OZ +OP3D1XSUtBLauyOIAIHkiUfZNXSsCI95+D2QXG+hQM+aOjraijslhuwiYPeE +a+LoYzre3D0WGLST3M8uzR7/bjp++SncZ0qefwr5zcfchRi4S5EtaORGwIy2 +VK/uegauWGHeksokYDJXJc7Ik4H/ZVx+UWVMwPiSpZrsbQw0cmBfemFI7t8Y +O3DNLgZWPpYtF9Inz8c630nPaAYyX85lWy0j59/hlmRSEQO/cMqcDRXJvO32 +gv4JBirtdm+uG+fDuQ8B/V9mGdjw1aE08hcfMp1DE4f+MrAnWiSDOcKHVKOk +tulFGlh2XTWi6Dsf4n9Xb1hC0cAuhvnTbf182J0svJdrrYEaW7+ybV/wgVta +VpCVpYEJyTp6E8V86KGV5ltd0MAV8Yt3JxbyITKrJG88XwOFxtssZS/z4VZc +8UXXEg18vlLmxbJcPhhuLMiWvKuBhq4lB40z+LBCODPt2CcNrLx7cteHI+R3 +/bbDseE6mrjPQedShDsfRmXsvT0aNDHUzTVLe6YaBlO8PfaLamFZyFKhDKVq +sPt50O5f5jIEw+nRMe0q+OErFnojZjk2ezNWZ2pXkP8DiguON6zAz6nltqo/ +SkHmmVZq1c+VKHPK/+XWxyWgllTpwmTqYHe92ZRh8FXI1mZLyfrr4snCvuo2 +yyJoVTFfPXZGD/vOJogWGV0BjlpDmv5bfby73ilGTPISSApdDvOJN8Ca3MeL ++13ygBJH5W7SWoU9w/d+dETkwKKlW2pcn5CmPqAY/8kCPZ5y5cGthmgQVvdh +RjgT9vfKNNoLGOGBf3yEElTPwM+xlPV22Ub4hpBxdPA4BTb6TTl2usbYIvD9 +yqD0Cbg/Zvp76rkxvtA60KE1fxT26Bh2v/JbjQ2nFUysrscBb3hHx6ZFTBQ9 +ZPRNTTkarDSV1v5zmYkDj7deE1SPgOWxJyMaWCw8qviaHjYcCndNi4QdOSxM +mNhuc+9DKLhMPUh/w2XhV7+fWjLPQiFiz0TZV3MWpp/nzPWWhkLzFu9Pko4s +/DibsGkh+X8VwGbab/ZmYVZWf1XE1/1Q8uuT6ngSC39bvUrrHdoHK/3YD5Z2 +s7B18hx3o/JeOM1wmk14z0KFPPvHzhJ7Yfzj9tX9vSwcND0SV/AnBO57ppTm +DbBwX8rP2c7WEHB1+XhOcYiF99vtVdR2hMAh08S9iwRMMIVjJTh6fg80S7+i +Dy01wdVZeamnZILB737A0Rv7TFA2WLz4/OpAGA7+dtAqzATXTeXMf1YPhAj1 +oN1vw03w9wGPGmuRQDgZFeI6fdgErdYupfI6d0EVJ5zGPWaC95c9PL8wchfM +1STcbcwxwaoC2oXxhgBIr8wbf91ogtZlwU0S2/3hQUHHjlF5NmpIFpq2vN4B +fY70beFKbGxPlCm98WAHCMwEb/qtwsbNsYWWlWU7wGKdqJMwjY0ZF9+1vDq2 +A5oEOSzllWwsTPhIaTPdAU+35y8yN2NjPfSfP3bNF7o1AyvSdrIxX36/yMeU +7TB+7e+U/i02pjq+8ZKN8YbPHtYFJ2rZ+FDpmGPyXm/oWnjKdqCOje7b/uyR +3O4Ndd4q57Pq2bilT4PJtPKGeKXVnPkWNlpozogtlvAGqaTAqNb3bNQ++9H5 +OGsb6Pi/EfBbwMGd+kPMuGNbwXdp6aKctRyMvpvB7/fxhMjHXoFaLhxsCp7b +9NfGE9L8ZNr4rhzMfpESZKjnCXeLDqW0beBgotfL9J7ZTSCnZbtk3oeDmsnr +NUzOboImrX/lvMM56DHDCpR4vhFWLqfStPI5OPfFt59w3gCjKzOY/BEOKjnJ +8EpPu0PXU7SSHePg6VVxnnZR7lC/Z9gtbIJ8/mKD21MB7pDKt9vHnOWgXq2/ +SKKFO6zkCJTdETJFyn/mFd6TbrDdLpjeqGCKs1IrQMbHDTr8bSQ6uKY4X3eX +JWXhCrcLf3+aSDLFuScGa5QNXIBpGTZln2yKxIzc/gc0F7j56YdEwSlTvEbk +X9sv7QJ8Si/LPt0UH1EaZQU+O0NZdv2pvAumqNaapr072BkKUhLZNhWmWGt/ +wE00zglOhC05k91uirrjshKddxzBc40GmlK4uLrN4PVomB3Md4hJNtK4mHN1 +QE/V0w4K/IZ77DW4aPVOVswL7ODzsdqDnsu5qLlo03t9cTvY3+JceciQi3MB +Pk2Cl2zhpFMU5bY1F99LVl9wbLeBOxvfzBmHcLGZeqh3xM4aVIOP1+rVc/HU ++B8to8OWkPp35+rkBi6qvXA8fdzfEhakW1d/ecTFrnHbySE3S/hWI1xS0MLF +f6jtx0Z0LOGOwNFsmXYuCip9prd9tADPzNiDk/9y8VzJZE+LrQVk1x1afX8x +DwVjf6mnLDMHCadN1SqSPNzqEmkorGAOsX0mugeleKi3yyE5daE5BAhPaxrI +85Aa+abj1ScElnO43GUKD2vWtHgo5yK87d8/lriKhylSH8oKFBDkxYOq127g +oXIJhbNnpRkUWkZHjmziYc+j8rECUTMwjE61zNjCw6LsCN70IA+cRqredPnw +0PdW0KxsAQ+OvZ2Y8Q3i4QclRtCcIg+mL8dYRMbxML0kWD5MkgvdphntxaU8 +PG+j9q+KPAcCDhRetKvgYf7Ez5n8STZMVtz0+1HFw/XV5zOtutggw+iaWlXD +wxmL3L7RC2xwEFNXu1fPwzMOQ1Ftmmy421G8o/0NDyNK0nwCuCZgL3lbN7yL +hxdvvin4QjWBLpuWSaUeHqY9i0lMFDKB8Tvfk7z6eHg4kdGq1sYC3UsG5f99 +42E3ZMnWbGbB3W7z8JQhHrKr3VyWIQvs5dxAf4SHioukHWo0WbDz+IFXYRM8 +3FF4Wkx3mAnj9cdyFKfJ9bBPSZdrZ0L87DnfO7M8LIz/G6B8mwlSxiU6W+d5 +uHBRfYhpLhPygu9M/P3Lw3m3upOR8Uz4H5a21lY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07698272702166517}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07698272702166517}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387169648367*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"169ff6c8-8f75-45a0-86e0-8d73d6d031ab"] +}, Open ]], Cell[CellGroupData[{ @@ -7004,11 +7941,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.991850610344879*^9},ExpressionUUID->"c213919d-017d-a948-8e46-\ -fe19384187c3"], + CellChangeTimes->{3.991850610344879*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[BoxData["9.786582751762749`"], "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[BoxData["9.434124368017853`"], "Output", + CellChangeTimes->{3.994387169693954*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"f095c77f-7ab2-47cb-bc92-072f209b9ed6"] }, Open ]], Cell[CellGroupData[{ @@ -7064,355 +8002,580 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850612616415*^9},ExpressionUUID->"3764dfb4-9656-4349-b0a1-\ -77ebd1a3e048"], + CellChangeTimes->{3.991850612616415*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.373724125922837`*^-256\\\", \ +\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 13, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994387169788775*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"d7c5e15d-8bfa-4a14-837c-6121011d8006"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"05911c33-7605-8b49-a7ba-7fc8c8f30741"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.106761550436651`*^-265\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 14, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943871697950687`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"4d28bc1a-0ebc-454e-849d-bd7d8c2b552f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.138510656098952`*^-274\\\", \ +\\\"70359079638545882374689246780656119576032161719910400000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 99, 15, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994387169800344*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"1d6c1e6e-7a70-4b30-b6fe-0caf8aa173ec"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.031746 0.0147151 12.2218 [ -[.18254 .00222 -3 -9 ] -[.18254 .00222 3 0 ] -[.34127 .00222 -6 -9 ] -[.34127 .00222 6 0 ] -[.5 .00222 -6 -9 ] -[.5 .00222 6 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.81746 .00222 -6 -9 ] -[.81746 .00222 6 0 ] -[.97619 .00222 -6 -9 ] -[.97619 .00222 6 0 ] -[.01131 .13693 -24 -4.5 ] -[.01131 .13693 0 4.5 ] -[.01131 .25915 -24 -4.5 ] -[.01131 .25915 0 4.5 ] -[.01131 .38137 -24 -4.5 ] -[.01131 .38137 0 4.5 ] -[.01131 .50359 -24 -4.5 ] -[.01131 .50359 0 4.5 ] -[ 0 0 0 0 ] -[ 1 .61803 0 0 ] -] MathScale -% Start of Graphics -1 setlinecap -1 setlinejoin -newpath -0 g -.25 Mabswid -[ ] 0 setdash -.18254 .01472 m -.18254 .02097 L -s -[(5)] .18254 .00222 0 1 Mshowa -.34127 .01472 m -.34127 .02097 L -s -[(10)] .34127 .00222 0 1 Mshowa -.5 .01472 m -.5 .02097 L -s -[(15)] .5 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(20)] .65873 .00222 0 1 Mshowa -.81746 .01472 m -.81746 .02097 L -s -[(25)] .81746 .00222 0 1 Mshowa -.97619 .01472 m -.97619 .02097 L -s -[(30)] .97619 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.15079 .01472 m -.15079 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.27778 .01472 m -.27778 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.40476 .01472 m -.40476 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.53175 .01472 m -.53175 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.78571 .01472 m -.78571 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.9127 .01472 m -.9127 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .13693 m -.03006 .13693 L -s -[(0.01)] .01131 .13693 1 0 Mshowa -.02381 .25915 m -.03006 .25915 L -s -[(0.02)] .01131 .25915 1 0 Mshowa -.02381 .38137 m -.03006 .38137 L -s -[(0.03)] .01131 .38137 1 0 Mshowa -.02381 .50359 m -.03006 .50359 L -s -[(0.04)] .01131 .50359 1 0 Mshowa -.125 Mabswid -.02381 .03916 m -.02756 .03916 L -s -.02381 .0636 m -.02756 .0636 L -s -.02381 .08805 m -.02756 .08805 L -s -.02381 .11249 m -.02756 .11249 L -s -.02381 .16138 m -.02756 .16138 L -s -.02381 .18582 m -.02756 .18582 L -s -.02381 .21026 m -.02756 .21026 L -s -.02381 .23471 m -.02756 .23471 L -s -.02381 .2836 m -.02756 .2836 L -s -.02381 .30804 m -.02756 .30804 L -s -.02381 .33248 m -.02756 .33248 L -s -.02381 .35693 m -.02756 .35693 L -s -.02381 .40581 m -.02756 .40581 L -s -.02381 .43026 m -.02756 .43026 L -s -.02381 .4547 m -.02756 .4547 L -s -.02381 .47914 m -.02756 .47914 L -s -.02381 .52803 m -.02756 .52803 L -s -.02381 .55248 m -.02756 .55248 L -s -.02381 .57692 m -.02756 .57692 L -s -.02381 .60136 m -.02756 .60136 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 -.5 Mabswid -.02381 .01472 m -.06244 .10806 L -.10458 .20681 L -.14415 .29388 L -.18221 .37017 L -.22272 .44131 L -.26171 .49847 L -.30316 .54591 L -.32392 .56431 L -.34309 .5781 L -.36173 .58858 L -.37125 .59283 L -.3815 .59658 L -.3917 .59947 L -.40103 .60141 L -.40552 .6021 L -.40789 .6024 L -.41042 .60267 L -.41284 .60289 L -.41504 .60305 L -.41725 .60317 L -.41834 .60322 L -.41933 .60325 L -.4205 .60328 L -.42174 .60331 L -.4229 .60332 L -.42399 .60332 L -.42526 .60331 L -.42644 .60329 L -.42773 .60326 L -.4291 .60321 L -.43163 .60308 L -.434 .60293 L -.43941 .60241 L -.44405 .60181 L -.4483 .60112 L -.45788 .59913 L -.46769 .59645 L -.47681 .59341 L -.49751 .58461 L -.53655 .56157 L -.57805 .52937 L -.61803 .49268 L -.6565 .45377 L -.69742 .4102 L -.73682 .36757 L -.77471 .32713 L -.81505 .2857 L -.85387 .24819 L -.89515 .21147 L -Mistroke -.93491 .17954 L -.97316 .15219 L -.97619 .15016 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageRangeCache->{{{0., 359.}, {221., 0.}} -> {-3.233775858153751, \ --0.0043827503402644324, 0.11832856225129938, \ -0.0003073572253865838}},ExpressionUUID->"899e43aa-c372-6647-a3e4-\ -4952f308ab17"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 99, 16, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994387169805593*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"37c1fe75-4681-4a7f-816e-b52faed9e022"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-\ -baecb9a57d9b"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VN8bAHClkrJl32aMtYjsw8wY74vIGsmusoVCoWyhskSJCi0kZUlK +yjZXZSmiRQtSQqKINkrKEn2p3/39dZ/Pc8997rnnXc658r6hjv5Lubi4di/h +4vr/dfbdkwdK6SXGXcZ3/dz0Nhl3X5I8YNKXBH88C4vkrJQBxTp9JfuyQdYt +R3LCUh+iHK73cvcVg9W7Rd+nluawZkIie763BtZstXuQYekM7xs3h073tsBh +UBu7t8kfLJTGBn/2voRHcEsqf2MkzPcanJ3s/QAX+73OyRmmQKvZ1ZKu4ilo +Cc5MnP1wFmTf133yVV+EuV/WWW//FYBoiNd1HjNunP/A/v67vASytS0aNjuv +xLby+JaTTmXwJler+acQP4r+Db6daXgT8l6VC0Yp82P5+zLKDsub4CGw1usP +gx8fvzSkKLjdhIFkyt+lfvz44sepvhPRN2Fo7yoj0Vp+7MxTeTVVexO+bBy9 +TXcXwNaJgoRZrQqYm8ypjCsSxEbM57srVwnpJYc7l0qtQXbOC7knoVVgrbdb +WExxDZaa7VziElUFKx84Oq/VWIO9A2tnBuOr4MiI8lsbkzVYNWss8D6tCuIV +nn86s3sNEnfoo1cuV8HeQsm/KvVrcKrsioh5TxVsya9Wt/EUxskZasl9g2oQ +Ur8Qut1fGHfkCJ2sYFdDR8ORmtBQYTTxHQo4Z1YN1m9dDc8kC+OfGadhF/tq +MJX+azZYLoz6h2vf5wVUg16utWfogjBWxCSzNpypBokzI2mnL4rgW9dl9fHj +1SC5vvbIXKkIul/8IBw8WQ3SLamHt1eJYHXgwjenmWqgTqpGrm0VwYmILgWZ +f9WgbBvm3fBFBP0e/EwNF64B3WWL9BFdUTy39vIjc8MasI8QH9V5KorjcmXa +aQk14LD6y7ucV6J4v/NG96cjNeBYXPdmYUAUL0uOjUNaDbi82Nb56IcoOhZ+ +ixzNqoHt6pfrPcTEMI8dNTlbXAPBo5pZSd5i+OlKs6XJgxo46mRl/HJWDA95 +/9gQxM0BaaJDeukScXy24W/1UR4OVIg4/dZeLY4hATOvC1ZzoOfljqosOXGs +5NvC1SzCAaUtEQpbLMWx4abuYJMiB1rsCla8OC+Odz7v49w15cCixUxHu5EE +0qOWaNfEcyCzNLZ80UIC+Ze19CsmkM+v4DqmsUUCu57cXpuZzAHbh6tMTvhL +ICGkecPtOAfyzGgc25MSWDFnEVCWwwFDtMl59l4Cs542vbOq5sB+RpHXkyRJ +FNsz4Z42xAHrQoFpmwxJ/LLt5R/aCAcUeOKPdZyVRNaJi/Ocjxx40e1S/eqa +JHpP5ws/H+PAhjA+7ncdkmgyefTeg2kOfCmNLv0lLYX3V/7x7+MhoIn/IzNS +SQrrjn6RUVlFwLkIx87fGlKYnbjVIJSPAHNTjbkFlMJxiebCKSECigc/WPEE +SqH3L6bdQykCtolu/i7DkcKCvVEZGWoE6MY1JF5qlMIzTScGM9UJWPVhnbj8 +Iym85bX7YuYGAuoquUHljRQyX84HJ+kQIG5Tl6n1TwrdTlS7aDIJeJGopGdu +I43cjOD5CksCrn7JanvsJI3P5i+kBlkTcMj+3zbrHdL4ourwCXlbAjQo/Sn2 +4dLoauO0OsmegON3TvW650ij+iXGAJ8LARt//IndOyKNTSk7E6x9CThgeUbt +/jdptB9uaL7lR0BFkUa/yKw0flj8zqH6EyDp5M2oWymDRU28t4YDCfh25+Fv +7g0yKK6RBHp7CDidlBlxPkYG2UM6cnzRBLS9VVX6liiDnvHNE7oxBCzotb4y +TpdBAd6gQ64HCAj4PKMzelEGl2tmD2fFEcC09fy5oVUGV/vwvXh1mIAPYip7 +H/DLYsejLskTRwmQCG2iSEjI4vouSZfwYwTYtrm176bJ4poFqu+WNAJuxaar +C+rKYuwVHFuWTn7v+8kxdzdZDBJZ3cM4ScbT8HjeDR9Z3JSzv2SB9HSWovW/ +IFmMiN5j1XCKgB0bXcpKDsrijKuEjHoWATplDYE/imVRNDdv/u1pAgKXOkuY +3pDF7u63uQfPEJDvOfHoTC05P9VucZmzBKwQkFdhtsli9k4xjtU5AliB9a8z +umRRiBL9qp90WPPWlPf9suiRdb8nMIeA/n2po0e+y6IOOhyPzCVA8Lncmd5Z +Wfy8+7bRLOmNynVmalwU5FG369l3noxH73hxpzAFt1DdWr3yCEg02uIjbUjB +j29iL6/MJ8Byx6VfBqYUNK8avBpGWiBhPNnZloI5I4sjr0jnt6aUZnpTMCtV +izfjIgF+H18aVARRcBSUZoZIq/HQnjyLoGDXpxyq9iUC7ljXj69Io+D+v680 +W0kfDuE5qHSagkul0qWXFxBgcdJJwPQiBefDCyxNSfNXFRV4XaWgW2JGQyzp +7q4JrYPVFNTc2RlRQfrCFKslr4GCO99+ihwk7SuWtvXOQwqqWW9t5ikkQNWg +Z/R1JwXvEOecNUhPuilGTb2h4Id7egabSd+ODeNZM0rBous1AUGkD+Xfzd0w +QcFnLjkfE0mb31ulZjtHwQx2cO0Z0nxDrg27l1JRY/+d3mLSr5ZcsT3KR8Xg +klWbb5DOU/w1WCJORXexH1LVpL3NIbSFRsXGgmmj/3ttYAbXkBoVn1eX3/n/ ++Iljb7IW9ahYbFt68jJp4rqKogxQcXFpTPNZ0nHP9xOGVlQs+11rn0zadKLZ +3GUrFQ0HZtkhpHmFBHr3b6figR8vMxxIv9D23JUVSEW9hRG2FumcrdfmK8Kp +GOH60HE16R2RM8efx1Ex+r1I+zC5Xso5prJjKVRc+mdPBafg//V36iZPJhV/ +ZO+fSyDN6R8wVs6j4qj0oxtWpGMXVF+YllCxJWVlOz9pE2q0j3cFFV2t3nu0 +k/FciQ9+HbxDxVuek67HSJ9N3iFW95yKb+55l06S+bDtSnlpTw8Vx8NE/rtI +WuHxnMH0EBWTtK8+tCBdteq0h+YMFfvfr2s9TuZXtPrQuO0/KsJc5LwyaePN +GgeDeOUwNtz3RuMFAp5nPS64QpHD+v7PJwfI/D3NEdVuXSuH4pnj9/1Je7z2 +aRnSlkOZDTtjxsh8/yK5MCpjIYe795yP+kTWA3ehllr2Xjk8b3XtyzWynp7e +P9hQGSOHD9IHAwVIZ448tW1PksOEH1ExoWQ9Utf6h67MkcOvel+clMh6ZVac +Jw41yeEqhUx1d7K+N/Z2LE60yaFEm5/xtUwCNnMt2+T1Ug6H6ZyEKbIf+Dnu +fQMf5VC7qDT/ENkvLOLkDycsp+Fuc/QMJPvLM8HGy4araHi4ykY69zgBDiUu +bZMCNBQ3rxR7SPYjz/b0NT6SNOwbPvxYhOxXYXKzl03W07Bu9RGTI0cImOFk +ts1r0tB86VH+nGQyXpbrv1fr0TBQc1G+NImAlHBvuoIxDRf6fNXqEsh8bX3a +tnQLDfUuKI/WxBPwILDge2sUDfkaFVxn9xNgtcAQjo+j4XDdH7+OfQR0ZHbT +9RJoGJak+bI4nIA3dbwJJWk0vOrA+wZDyXxeHSGckk/Dt1cV724JIvt7laWB +RQsNa5V/WrR5ERAy9zOhjV8ed5rEPBch9xtmeID4J2F5tLMfrnKzIPNnrL+c +W1Ieq8TY2ec3EnDlbWuPsYI8stoCnQRNCHh376x6LV0eD3j8E37GIMA+hdFX +5CWPgb+VvFPI/VBHOFEzrloeA/KIy6K8BHClzzzIvSWPknzv/QZXkPPnDvK4 +1SCPetFXAouXERA845jy86E83uSIm8lzEVDSp/Q2sF8eVV3Wp/2a5YB4QVuq +E7cCmq24veUjuf/Prxd6p+GsgMFnA+dkGjgwe1E6UddDAfNrbtAO3eHAtKCy +EsNLAfd+3Ds7UMuBiSlG0MbdCvhmlxMns4oDHxr8Zj0OKuC5wHXVL65w4KnN +bYFjVxSQ1T5UQ5wizyfBO+DDjAJWel7OlfXhgFH5jcJz5xQxcVfBzfE/NfCW +Vl5gfkERZ65H7H74uwZiz5Vdmi5QxIH7ic350zVwO7E037FMEZ/3dGzaOFED +Om6FuQKNiiihzT8ZNVwDqsvPZKYOK+IbW9fNIY9rQNwrLiFKXQlFJ2ySSsjz +3U9ha2+XFiXkVi9aUStXA6MZ3i77eFSwLVJaZatgNVj9iLb6SF+Lb7T3XD/z +sxK++a3cTxxeh7aFfH84+26S/xMSS4+2qCKv4Letod+ug3C7ysmqH2qow9Fr +mDlxDWSPVTrQ6ep4srmCy255KeSuZwiJBGpgdrKg2d+6y/BU2kR/KmsD2jTk +9S4/XQRM2ZZMzR5N/O+goolH0yUQ4C6O8EnSwrzVrCdR3/OAmihn5K6ijfzO +zypcaDnAq7ztluNjbdQzLa0Xbj4NG9hSldHbdXA+t0GjfTwT9r0TbrXm0kX/ +5O6X7X4Z8GMqw9kqVxcbtorL3xk7Cps0H+VZaejhNhONS00iR+DeFOu/3x16 ++MVGrFIzNgH2quv0d/nr41RB58gj/TiI/C39x2uXPq6/O7einRoH8S3c0hNB ++nih+5nQCE8cpLu9dl8Vpo/zJi31xv2xcO1IzBvTWH306l+XyzkcCx8G7vVx +TupjjJTvn4z2A+Bywqb37G19vOknEPQ0IgbYEzu73XnpKDH9S67rRySIN2wq +blxNx3Rjc4WBwUiYOKoWJidAxzyffP+pZ5FwSX5y9UdhOrrrH8ixuBYJf53i +zMJk6VjaO8l12CcSmhqyalI16VinrFKr0xMBJmn3MjnOdBwqFJSJb9sP5kqS +dvzFdPSs/ORu1xkOxPeH8jtL6BhPnbmc0hwOSrf3z9aX0pEVtcm2rToclll3 +FuwqpyMteE1xyJlwaAlN/dVK0LFX4+tTLY9wMG6Yzol9TMfNp6o9ij+HAd2x +68Pnb3Ts1KXNLlsVBusSjse0GBigo3GsHfaGQCPrynJbpgGeni8LjGwMAYff +TdmvjQxQa9qtvakoBGL2ztz4YmKA7fK0TWdCQqBtm/ewgK0BprIvHWNyh8Au +Bt3a09sALYcKf4XpBUPZr2GZ6WMGaFK/pGp96W5Q82c0Kfcb4MGfr4ckHwTA +KYXNf5IHDPDvKO/R6soAmH7vq//hnQEK8HVyeVwIgHseGeWXRgzQ6/hay/59 +AeDo8D5H4rsBvr+XIZ6jEAAHWClhvFyGeHfK32T+iD+0remS/65siIZaXEso +zjvB/96uI0S4IQZL9e/opfnCxJ6xaPMIQ2R0jl0nBHwhhhIS3BNliGGBZV1F +Cz5wPD7UcS7OENUmTZPK+3ygihlFM0o1RHePo/S4LB9YuJXc2JpniA4NItpL +V/hAduWl6Zethvg9iduxddoLmgq7d/4UY2BhXsBdBdltMGQr7xUlycDEkVvO +V/95Atf8Hvf/pBnoH6nvaz7iCaZbeDYvpzEwY11URvt1T3i0hGkgpcZA3SIN +KT6WJzz3LeA1MWag1cDG59reHtCvFFSRGcDAPm5Ft4JGN5i+9u+35m0GHnyc +v4dW7wyfXCwK0+oYSNDOS86XOEPfshOWIw0MlLrQJTJ6yhkavKXPn2tmYGr6 +uYeT/s6QJKnPXHzCQPdaz+IRYWcQOhYU/3SAgW+PRt9WDHMC9cDXXP5LmZi9 +qB5TY7AVqGKyZfeWMdHh5f3XDUpbQajVd4skDxML51Z+er1mK0xRJ4uerWbi +J/5X31jfHKG+Z5WZjhgTtXYMGnQUOYKlBab8W8tElkTLXy4hR/BTLufNs2Mi +e9upLOs5B4h9uCNIxYGJ+QtvaB8/OkCmv/CzGkcmmnJvSc965QCNVw5kPHNl +Yq5l3i25SgcQVbEUXPRhYqDToaeCgQ7wSOWjqHcUE8evBFjvJOxBbZ0cTaWA +idEQNknPswNse5lQU8TEsN/Bn68fsAOXXanDxiVMDOdxXg7udpB87XuxaxkT +M9IfWz6WtIOBdY3KaRwmdl5ZMet03hZOqrqv//aYiTa7ff3sCm3gp9ppes0k +E2/XZs/NP7CCvudoLjLFxIQ1v+pVrltB896JrREzTFTOYpaFnLKCkzVW4fQ/ +TDxF6btt5mEFakyuG/XcLBQ67rZT9qcl+FrtkW8VZ2FrRcX2AEVL6A7cxNdt +xMLxOLXMl+ctoIF3RlofWFibtlv3b6IFFJcXq54zYaHe5RsnMMgCwn4sWrhZ +sDD60rQML8sC+KOJxAF7Fl4WZ5++OmgOFqnyv0d9WRjBP17Du9Yc7pT8Nzxz +jIWDS632jDwxA7pZxG/rdBZGxnBS1GvNoHb4G1/hCRaeVics0grNoIb6zsA6 +m4UBdmaJB6PN4EZu84lLF1goX5UmbK9iBoUZKYxNFSzcKfgz99hRU0iLEMzK +fcVCu3+Syz67msBKkWOl31+zUDVpzj/V3ARSq7kaTftY+EbQLs5A1wSOTPz8 +9G2AhSdzI490CJjAoV3dRiafyPXRGwvteISwb9v5L1/nWHj2sfOjlUwEj42K +yKIaoWGG371lHsaw2L1SoJVmhMlmqodr6cZQ6D/x1lqRvJ+/qTJdxBg+pdZF +e6wzQi72ya6r7WzY98S+8oCOEfp4aThcMGPD8c3x1DsWRkgflKdsoRtBvdvr +Bb1QIzTdwFvER2fC9q/1TxvDyfGJTyNUJZjAFVuYuzHCCPds3n88cI4BFheC +9ZwOGGEKnFuwaGDAy8ElIfuTjbCgxy/tlCkDxnw3vK3OMULNvv1L1F0NQWbP +0boNzUbYmGPkfTeHDif/Beintxjhjzsb4k8fosPSbIvqzw+M8MWo4cZkfzqM +3VpeVvjECMUVveIqdelQz3UkV/iVEX5a2LZo0KUPHmcSomc/GqHAmgjzGSF9 +yG04oH9vNRtvDlxVOlKsC3yb3aulBdj45ITwV78MXUgYMtSIFmKjTJNqlkeU +LuxaPqekJcZGXt1HBhnWumBgHyVaTGVjzDvd7L9TOtDzYd9UijYbjRMf2/Hb +6IDYqpBqO1c2fn3+sGUjrzaUmB2MnXRno+GjOffcKS3QOXjS7PQ2NsqfOmG/ +/J0WbJ6set3nw0b1Q4HjahwtSO2ZmfcLYaN36/CS4h1aMFd82DQ2kY3t1pGV +WyI0oZ91+lVpORtXsjpqO5ZrwK7IknyrCjbSjSK7dg+pw2xFrf+3KjZutHfy +1G5QB2GFvt/at9jodqrpv43h6mCzkiJ7t5mNF8YWLA68Xw+N3aU7X71mY3xG +l+P3VjWwFrijEdXHRsWE8F2MIjXo2/RkVvItG1mGszyVh9Rgun782I4hcj10 +QrTFmWqgUaR18+sYG/1ifRw6a1Shsd8kKuM7G+G5a49vlipYi24FzUk2rvjv +azI1TBUCjkZ2Rcyw0T6t4yr/BlWYbk7Nk5gj37/v4GPkV4WkPzl+9X/YKCKY +6HPh2zoQ0itT377Ixnq379aU5+vg0p76mX//2Hjw/l+3R+Xr4H+49zHk + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VN8bAHClkrJl32aMtYjsw8wY74vIGsmusoVCoWyhskSJCi0kZUlK +yjZXZSmiRQtSQqKINkrKEn2p3/39dZ/Pc8997rnnXc658r6hjv5Lubi4di/h +4vr/dfbdkwdK6SXGXcZ3/dz0Nhl3X5I8YNKXBH88C4vkrJQBxTp9JfuyQdYt +R3LCUh+iHK73cvcVg9W7Rd+nluawZkIie763BtZstXuQYekM7xs3h073tsBh +UBu7t8kfLJTGBn/2voRHcEsqf2MkzPcanJ3s/QAX+73OyRmmQKvZ1ZKu4ilo +Cc5MnP1wFmTf133yVV+EuV/WWW//FYBoiNd1HjNunP/A/v67vASytS0aNjuv +xLby+JaTTmXwJler+acQP4r+Db6daXgT8l6VC0Yp82P5+zLKDsub4CGw1usP +gx8fvzSkKLjdhIFkyt+lfvz44sepvhPRN2Fo7yoj0Vp+7MxTeTVVexO+bBy9 +TXcXwNaJgoRZrQqYm8ypjCsSxEbM57srVwnpJYc7l0qtQXbOC7knoVVgrbdb +WExxDZaa7VziElUFKx84Oq/VWIO9A2tnBuOr4MiI8lsbkzVYNWss8D6tCuIV +nn86s3sNEnfoo1cuV8HeQsm/KvVrcKrsioh5TxVsya9Wt/EUxskZasl9g2oQ +Ur8Qut1fGHfkCJ2sYFdDR8ORmtBQYTTxHQo4Z1YN1m9dDc8kC+OfGadhF/tq +MJX+azZYLoz6h2vf5wVUg16utWfogjBWxCSzNpypBokzI2mnL4rgW9dl9fHj +1SC5vvbIXKkIul/8IBw8WQ3SLamHt1eJYHXgwjenmWqgTqpGrm0VwYmILgWZ +f9WgbBvm3fBFBP0e/EwNF64B3WWL9BFdUTy39vIjc8MasI8QH9V5KorjcmXa +aQk14LD6y7ucV6J4v/NG96cjNeBYXPdmYUAUL0uOjUNaDbi82Nb56IcoOhZ+ +ixzNqoHt6pfrPcTEMI8dNTlbXAPBo5pZSd5i+OlKs6XJgxo46mRl/HJWDA95 +/9gQxM0BaaJDeukScXy24W/1UR4OVIg4/dZeLY4hATOvC1ZzoOfljqosOXGs +5NvC1SzCAaUtEQpbLMWx4abuYJMiB1rsCla8OC+Odz7v49w15cCixUxHu5EE +0qOWaNfEcyCzNLZ80UIC+Ze19CsmkM+v4DqmsUUCu57cXpuZzAHbh6tMTvhL +ICGkecPtOAfyzGgc25MSWDFnEVCWwwFDtMl59l4Cs542vbOq5sB+RpHXkyRJ +FNsz4Z42xAHrQoFpmwxJ/LLt5R/aCAcUeOKPdZyVRNaJi/Ocjxx40e1S/eqa +JHpP5ws/H+PAhjA+7ncdkmgyefTeg2kOfCmNLv0lLYX3V/7x7+MhoIn/IzNS +SQrrjn6RUVlFwLkIx87fGlKYnbjVIJSPAHNTjbkFlMJxiebCKSECigc/WPEE +SqH3L6bdQykCtolu/i7DkcKCvVEZGWoE6MY1JF5qlMIzTScGM9UJWPVhnbj8 +Iym85bX7YuYGAuoquUHljRQyX84HJ+kQIG5Tl6n1TwrdTlS7aDIJeJGopGdu +I43cjOD5CksCrn7JanvsJI3P5i+kBlkTcMj+3zbrHdL4ourwCXlbAjQo/Sn2 +4dLoauO0OsmegON3TvW650ij+iXGAJ8LARt//IndOyKNTSk7E6x9CThgeUbt +/jdptB9uaL7lR0BFkUa/yKw0flj8zqH6EyDp5M2oWymDRU28t4YDCfh25+Fv +7g0yKK6RBHp7CDidlBlxPkYG2UM6cnzRBLS9VVX6liiDnvHNE7oxBCzotb4y +TpdBAd6gQ64HCAj4PKMzelEGl2tmD2fFEcC09fy5oVUGV/vwvXh1mIAPYip7 +H/DLYsejLskTRwmQCG2iSEjI4vouSZfwYwTYtrm176bJ4poFqu+WNAJuxaar +C+rKYuwVHFuWTn7v+8kxdzdZDBJZ3cM4ScbT8HjeDR9Z3JSzv2SB9HSWovW/ +IFmMiN5j1XCKgB0bXcpKDsrijKuEjHoWATplDYE/imVRNDdv/u1pAgKXOkuY +3pDF7u63uQfPEJDvOfHoTC05P9VucZmzBKwQkFdhtsli9k4xjtU5AliB9a8z +umRRiBL9qp90WPPWlPf9suiRdb8nMIeA/n2po0e+y6IOOhyPzCVA8Lncmd5Z +Wfy8+7bRLOmNynVmalwU5FG369l3noxH73hxpzAFt1DdWr3yCEg02uIjbUjB +j29iL6/MJ8Byx6VfBqYUNK8avBpGWiBhPNnZloI5I4sjr0jnt6aUZnpTMCtV +izfjIgF+H18aVARRcBSUZoZIq/HQnjyLoGDXpxyq9iUC7ljXj69Io+D+v680 +W0kfDuE5qHSagkul0qWXFxBgcdJJwPQiBefDCyxNSfNXFRV4XaWgW2JGQyzp +7q4JrYPVFNTc2RlRQfrCFKslr4GCO99+ihwk7SuWtvXOQwqqWW9t5ikkQNWg +Z/R1JwXvEOecNUhPuilGTb2h4Id7egabSd+ODeNZM0rBous1AUGkD+Xfzd0w +QcFnLjkfE0mb31ulZjtHwQx2cO0Z0nxDrg27l1JRY/+d3mLSr5ZcsT3KR8Xg +klWbb5DOU/w1WCJORXexH1LVpL3NIbSFRsXGgmmj/3ttYAbXkBoVn1eX3/n/ ++Iljb7IW9ahYbFt68jJp4rqKogxQcXFpTPNZ0nHP9xOGVlQs+11rn0zadKLZ +3GUrFQ0HZtkhpHmFBHr3b6figR8vMxxIv9D23JUVSEW9hRG2FumcrdfmK8Kp +GOH60HE16R2RM8efx1Ex+r1I+zC5Xso5prJjKVRc+mdPBafg//V36iZPJhV/ +ZO+fSyDN6R8wVs6j4qj0oxtWpGMXVF+YllCxJWVlOz9pE2q0j3cFFV2t3nu0 +k/FciQ9+HbxDxVuek67HSJ9N3iFW95yKb+55l06S+bDtSnlpTw8Vx8NE/rtI +WuHxnMH0EBWTtK8+tCBdteq0h+YMFfvfr2s9TuZXtPrQuO0/KsJc5LwyaePN +GgeDeOUwNtz3RuMFAp5nPS64QpHD+v7PJwfI/D3NEdVuXSuH4pnj9/1Je7z2 +aRnSlkOZDTtjxsh8/yK5MCpjIYe795yP+kTWA3ehllr2Xjk8b3XtyzWynp7e +P9hQGSOHD9IHAwVIZ448tW1PksOEH1ExoWQ9Utf6h67MkcOvel+clMh6ZVac +Jw41yeEqhUx1d7K+N/Z2LE60yaFEm5/xtUwCNnMt2+T1Ug6H6ZyEKbIf+Dnu +fQMf5VC7qDT/ENkvLOLkDycsp+Fuc/QMJPvLM8HGy4araHi4ykY69zgBDiUu +bZMCNBQ3rxR7SPYjz/b0NT6SNOwbPvxYhOxXYXKzl03W07Bu9RGTI0cImOFk +ts1r0tB86VH+nGQyXpbrv1fr0TBQc1G+NImAlHBvuoIxDRf6fNXqEsh8bX3a +tnQLDfUuKI/WxBPwILDge2sUDfkaFVxn9xNgtcAQjo+j4XDdH7+OfQR0ZHbT +9RJoGJak+bI4nIA3dbwJJWk0vOrA+wZDyXxeHSGckk/Dt1cV724JIvt7laWB +RQsNa5V/WrR5ERAy9zOhjV8ed5rEPBch9xtmeID4J2F5tLMfrnKzIPNnrL+c +W1Ieq8TY2ec3EnDlbWuPsYI8stoCnQRNCHh376x6LV0eD3j8E37GIMA+hdFX +5CWPgb+VvFPI/VBHOFEzrloeA/KIy6K8BHClzzzIvSWPknzv/QZXkPPnDvK4 +1SCPetFXAouXERA845jy86E83uSIm8lzEVDSp/Q2sF8eVV3Wp/2a5YB4QVuq +E7cCmq24veUjuf/Prxd6p+GsgMFnA+dkGjgwe1E6UddDAfNrbtAO3eHAtKCy +EsNLAfd+3Ds7UMuBiSlG0MbdCvhmlxMns4oDHxr8Zj0OKuC5wHXVL65w4KnN +bYFjVxSQ1T5UQ5wizyfBO+DDjAJWel7OlfXhgFH5jcJz5xQxcVfBzfE/NfCW +Vl5gfkERZ65H7H74uwZiz5Vdmi5QxIH7ic350zVwO7E037FMEZ/3dGzaOFED +Om6FuQKNiiihzT8ZNVwDqsvPZKYOK+IbW9fNIY9rQNwrLiFKXQlFJ2ySSsjz +3U9ha2+XFiXkVi9aUStXA6MZ3i77eFSwLVJaZatgNVj9iLb6SF+Lb7T3XD/z +sxK++a3cTxxeh7aFfH84+26S/xMSS4+2qCKv4Letod+ug3C7ysmqH2qow9Fr +mDlxDWSPVTrQ6ep4srmCy255KeSuZwiJBGpgdrKg2d+6y/BU2kR/KmsD2jTk +9S4/XQRM2ZZMzR5N/O+goolH0yUQ4C6O8EnSwrzVrCdR3/OAmihn5K6ijfzO +zypcaDnAq7ztluNjbdQzLa0Xbj4NG9hSldHbdXA+t0GjfTwT9r0TbrXm0kX/ +5O6X7X4Z8GMqw9kqVxcbtorL3xk7Cps0H+VZaejhNhONS00iR+DeFOu/3x16 ++MVGrFIzNgH2quv0d/nr41RB58gj/TiI/C39x2uXPq6/O7einRoH8S3c0hNB ++nih+5nQCE8cpLu9dl8Vpo/zJi31xv2xcO1IzBvTWH306l+XyzkcCx8G7vVx +TupjjJTvn4z2A+Bywqb37G19vOknEPQ0IgbYEzu73XnpKDH9S67rRySIN2wq +blxNx3Rjc4WBwUiYOKoWJidAxzyffP+pZ5FwSX5y9UdhOrrrH8ixuBYJf53i +zMJk6VjaO8l12CcSmhqyalI16VinrFKr0xMBJmn3MjnOdBwqFJSJb9sP5kqS +dvzFdPSs/ORu1xkOxPeH8jtL6BhPnbmc0hwOSrf3z9aX0pEVtcm2rToclll3 +FuwqpyMteE1xyJlwaAlN/dVK0LFX4+tTLY9wMG6Yzol9TMfNp6o9ij+HAd2x +68Pnb3Ts1KXNLlsVBusSjse0GBigo3GsHfaGQCPrynJbpgGeni8LjGwMAYff +TdmvjQxQa9qtvakoBGL2ztz4YmKA7fK0TWdCQqBtm/ewgK0BprIvHWNyh8Au +Bt3a09sALYcKf4XpBUPZr2GZ6WMGaFK/pGp96W5Q82c0Kfcb4MGfr4ckHwTA +KYXNf5IHDPDvKO/R6soAmH7vq//hnQEK8HVyeVwIgHseGeWXRgzQ6/hay/59 +AeDo8D5H4rsBvr+XIZ6jEAAHWClhvFyGeHfK32T+iD+0remS/65siIZaXEso +zjvB/96uI0S4IQZL9e/opfnCxJ6xaPMIQ2R0jl0nBHwhhhIS3BNliGGBZV1F +Cz5wPD7UcS7OENUmTZPK+3ygihlFM0o1RHePo/S4LB9YuJXc2JpniA4NItpL +V/hAduWl6Zethvg9iduxddoLmgq7d/4UY2BhXsBdBdltMGQr7xUlycDEkVvO +V/95Atf8Hvf/pBnoH6nvaz7iCaZbeDYvpzEwY11URvt1T3i0hGkgpcZA3SIN +KT6WJzz3LeA1MWag1cDG59reHtCvFFSRGcDAPm5Ft4JGN5i+9u+35m0GHnyc +v4dW7wyfXCwK0+oYSNDOS86XOEPfshOWIw0MlLrQJTJ6yhkavKXPn2tmYGr6 +uYeT/s6QJKnPXHzCQPdaz+IRYWcQOhYU/3SAgW+PRt9WDHMC9cDXXP5LmZi9 +qB5TY7AVqGKyZfeWMdHh5f3XDUpbQajVd4skDxML51Z+er1mK0xRJ4uerWbi +J/5X31jfHKG+Z5WZjhgTtXYMGnQUOYKlBab8W8tElkTLXy4hR/BTLufNs2Mi +e9upLOs5B4h9uCNIxYGJ+QtvaB8/OkCmv/CzGkcmmnJvSc965QCNVw5kPHNl +Yq5l3i25SgcQVbEUXPRhYqDToaeCgQ7wSOWjqHcUE8evBFjvJOxBbZ0cTaWA +idEQNknPswNse5lQU8TEsN/Bn68fsAOXXanDxiVMDOdxXg7udpB87XuxaxkT +M9IfWz6WtIOBdY3KaRwmdl5ZMet03hZOqrqv//aYiTa7ff3sCm3gp9ppes0k +E2/XZs/NP7CCvudoLjLFxIQ1v+pVrltB896JrREzTFTOYpaFnLKCkzVW4fQ/ +TDxF6btt5mEFakyuG/XcLBQ67rZT9qcl+FrtkW8VZ2FrRcX2AEVL6A7cxNdt +xMLxOLXMl+ctoIF3RlofWFibtlv3b6IFFJcXq54zYaHe5RsnMMgCwn4sWrhZ +sDD60rQML8sC+KOJxAF7Fl4WZ5++OmgOFqnyv0d9WRjBP17Du9Yc7pT8Nzxz +jIWDS632jDwxA7pZxG/rdBZGxnBS1GvNoHb4G1/hCRaeVics0grNoIb6zsA6 +m4UBdmaJB6PN4EZu84lLF1goX5UmbK9iBoUZKYxNFSzcKfgz99hRU0iLEMzK +fcVCu3+Syz67msBKkWOl31+zUDVpzj/V3ARSq7kaTftY+EbQLs5A1wSOTPz8 +9G2AhSdzI490CJjAoV3dRiafyPXRGwvteISwb9v5L1/nWHj2sfOjlUwEj42K +yKIaoWGG371lHsaw2L1SoJVmhMlmqodr6cZQ6D/x1lqRvJ+/qTJdxBg+pdZF +e6wzQi72ya6r7WzY98S+8oCOEfp4aThcMGPD8c3x1DsWRkgflKdsoRtBvdvr +Bb1QIzTdwFvER2fC9q/1TxvDyfGJTyNUJZjAFVuYuzHCCPds3n88cI4BFheC +9ZwOGGEKnFuwaGDAy8ElIfuTjbCgxy/tlCkDxnw3vK3OMULNvv1L1F0NQWbP +0boNzUbYmGPkfTeHDif/Beintxjhjzsb4k8fosPSbIvqzw+M8MWo4cZkfzqM +3VpeVvjECMUVveIqdelQz3UkV/iVEX5a2LZo0KUPHmcSomc/GqHAmgjzGSF9 +yG04oH9vNRtvDlxVOlKsC3yb3aulBdj45ITwV78MXUgYMtSIFmKjTJNqlkeU +LuxaPqekJcZGXt1HBhnWumBgHyVaTGVjzDvd7L9TOtDzYd9UijYbjRMf2/Hb +6IDYqpBqO1c2fn3+sGUjrzaUmB2MnXRno+GjOffcKS3QOXjS7PQ2NsqfOmG/ +/J0WbJ6set3nw0b1Q4HjahwtSO2ZmfcLYaN36/CS4h1aMFd82DQ2kY3t1pGV +WyI0oZ91+lVpORtXsjpqO5ZrwK7IknyrCjbSjSK7dg+pw2xFrf+3KjZutHfy +1G5QB2GFvt/at9jodqrpv43h6mCzkiJ7t5mNF8YWLA68Xw+N3aU7X71mY3xG +l+P3VjWwFrijEdXHRsWE8F2MIjXo2/RkVvItG1mGszyVh9Rgun782I4hcj10 +QrTFmWqgUaR18+sYG/1ifRw6a1Shsd8kKuM7G+G5a49vlipYi24FzUk2rvjv +azI1TBUCjkZ2Rcyw0T6t4yr/BlWYbk7Nk5gj37/v4GPkV4WkPzl+9X/YKCKY +6HPh2zoQ0itT377Ixnq379aU5+vg0p76mX//2Hjw/l+3R+Xr4H+49zHk + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08057697046444806}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08057697046444806}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VN8bAHClkrJl32aMtYjsw8wY74vIGsmusoVCoWyhskSJCi0kZUlK +yjZXZSmiRQtSQqKINkrKEn2p3/39dZ/Pc8997rnnXc658r6hjv5Lubi4di/h +4vr/dfbdkwdK6SXGXcZ3/dz0Nhl3X5I8YNKXBH88C4vkrJQBxTp9JfuyQdYt +R3LCUh+iHK73cvcVg9W7Rd+nluawZkIie763BtZstXuQYekM7xs3h073tsBh +UBu7t8kfLJTGBn/2voRHcEsqf2MkzPcanJ3s/QAX+73OyRmmQKvZ1ZKu4ilo +Cc5MnP1wFmTf133yVV+EuV/WWW//FYBoiNd1HjNunP/A/v67vASytS0aNjuv +xLby+JaTTmXwJler+acQP4r+Db6daXgT8l6VC0Yp82P5+zLKDsub4CGw1usP +gx8fvzSkKLjdhIFkyt+lfvz44sepvhPRN2Fo7yoj0Vp+7MxTeTVVexO+bBy9 +TXcXwNaJgoRZrQqYm8ypjCsSxEbM57srVwnpJYc7l0qtQXbOC7knoVVgrbdb +WExxDZaa7VziElUFKx84Oq/VWIO9A2tnBuOr4MiI8lsbkzVYNWss8D6tCuIV +nn86s3sNEnfoo1cuV8HeQsm/KvVrcKrsioh5TxVsya9Wt/EUxskZasl9g2oQ +Ur8Qut1fGHfkCJ2sYFdDR8ORmtBQYTTxHQo4Z1YN1m9dDc8kC+OfGadhF/tq +MJX+azZYLoz6h2vf5wVUg16utWfogjBWxCSzNpypBokzI2mnL4rgW9dl9fHj +1SC5vvbIXKkIul/8IBw8WQ3SLamHt1eJYHXgwjenmWqgTqpGrm0VwYmILgWZ +f9WgbBvm3fBFBP0e/EwNF64B3WWL9BFdUTy39vIjc8MasI8QH9V5KorjcmXa +aQk14LD6y7ucV6J4v/NG96cjNeBYXPdmYUAUL0uOjUNaDbi82Nb56IcoOhZ+ +ixzNqoHt6pfrPcTEMI8dNTlbXAPBo5pZSd5i+OlKs6XJgxo46mRl/HJWDA95 +/9gQxM0BaaJDeukScXy24W/1UR4OVIg4/dZeLY4hATOvC1ZzoOfljqosOXGs +5NvC1SzCAaUtEQpbLMWx4abuYJMiB1rsCla8OC+Odz7v49w15cCixUxHu5EE +0qOWaNfEcyCzNLZ80UIC+Ze19CsmkM+v4DqmsUUCu57cXpuZzAHbh6tMTvhL +ICGkecPtOAfyzGgc25MSWDFnEVCWwwFDtMl59l4Cs542vbOq5sB+RpHXkyRJ +FNsz4Z42xAHrQoFpmwxJ/LLt5R/aCAcUeOKPdZyVRNaJi/Ocjxx40e1S/eqa +JHpP5ws/H+PAhjA+7ncdkmgyefTeg2kOfCmNLv0lLYX3V/7x7+MhoIn/IzNS +SQrrjn6RUVlFwLkIx87fGlKYnbjVIJSPAHNTjbkFlMJxiebCKSECigc/WPEE +SqH3L6bdQykCtolu/i7DkcKCvVEZGWoE6MY1JF5qlMIzTScGM9UJWPVhnbj8 +Iym85bX7YuYGAuoquUHljRQyX84HJ+kQIG5Tl6n1TwrdTlS7aDIJeJGopGdu +I43cjOD5CksCrn7JanvsJI3P5i+kBlkTcMj+3zbrHdL4ourwCXlbAjQo/Sn2 +4dLoauO0OsmegON3TvW650ij+iXGAJ8LARt//IndOyKNTSk7E6x9CThgeUbt +/jdptB9uaL7lR0BFkUa/yKw0flj8zqH6EyDp5M2oWymDRU28t4YDCfh25+Fv +7g0yKK6RBHp7CDidlBlxPkYG2UM6cnzRBLS9VVX6liiDnvHNE7oxBCzotb4y +TpdBAd6gQ64HCAj4PKMzelEGl2tmD2fFEcC09fy5oVUGV/vwvXh1mIAPYip7 +H/DLYsejLskTRwmQCG2iSEjI4vouSZfwYwTYtrm176bJ4poFqu+WNAJuxaar +C+rKYuwVHFuWTn7v+8kxdzdZDBJZ3cM4ScbT8HjeDR9Z3JSzv2SB9HSWovW/ +IFmMiN5j1XCKgB0bXcpKDsrijKuEjHoWATplDYE/imVRNDdv/u1pAgKXOkuY +3pDF7u63uQfPEJDvOfHoTC05P9VucZmzBKwQkFdhtsli9k4xjtU5AliB9a8z +umRRiBL9qp90WPPWlPf9suiRdb8nMIeA/n2po0e+y6IOOhyPzCVA8Lncmd5Z +Wfy8+7bRLOmNynVmalwU5FG369l3noxH73hxpzAFt1DdWr3yCEg02uIjbUjB +j29iL6/MJ8Byx6VfBqYUNK8avBpGWiBhPNnZloI5I4sjr0jnt6aUZnpTMCtV +izfjIgF+H18aVARRcBSUZoZIq/HQnjyLoGDXpxyq9iUC7ljXj69Io+D+v680 +W0kfDuE5qHSagkul0qWXFxBgcdJJwPQiBefDCyxNSfNXFRV4XaWgW2JGQyzp +7q4JrYPVFNTc2RlRQfrCFKslr4GCO99+ihwk7SuWtvXOQwqqWW9t5ikkQNWg +Z/R1JwXvEOecNUhPuilGTb2h4Id7egabSd+ODeNZM0rBous1AUGkD+Xfzd0w +QcFnLjkfE0mb31ulZjtHwQx2cO0Z0nxDrg27l1JRY/+d3mLSr5ZcsT3KR8Xg +klWbb5DOU/w1WCJORXexH1LVpL3NIbSFRsXGgmmj/3ttYAbXkBoVn1eX3/n/ ++Iljb7IW9ahYbFt68jJp4rqKogxQcXFpTPNZ0nHP9xOGVlQs+11rn0zadKLZ +3GUrFQ0HZtkhpHmFBHr3b6figR8vMxxIv9D23JUVSEW9hRG2FumcrdfmK8Kp +GOH60HE16R2RM8efx1Ex+r1I+zC5Xso5prJjKVRc+mdPBafg//V36iZPJhV/ +ZO+fSyDN6R8wVs6j4qj0oxtWpGMXVF+YllCxJWVlOz9pE2q0j3cFFV2t3nu0 +k/FciQ9+HbxDxVuek67HSJ9N3iFW95yKb+55l06S+bDtSnlpTw8Vx8NE/rtI +WuHxnMH0EBWTtK8+tCBdteq0h+YMFfvfr2s9TuZXtPrQuO0/KsJc5LwyaePN +GgeDeOUwNtz3RuMFAp5nPS64QpHD+v7PJwfI/D3NEdVuXSuH4pnj9/1Je7z2 +aRnSlkOZDTtjxsh8/yK5MCpjIYe795yP+kTWA3ehllr2Xjk8b3XtyzWynp7e +P9hQGSOHD9IHAwVIZ448tW1PksOEH1ExoWQ9Utf6h67MkcOvel+clMh6ZVac +Jw41yeEqhUx1d7K+N/Z2LE60yaFEm5/xtUwCNnMt2+T1Ug6H6ZyEKbIf+Dnu +fQMf5VC7qDT/ENkvLOLkDycsp+Fuc/QMJPvLM8HGy4araHi4ykY69zgBDiUu +bZMCNBQ3rxR7SPYjz/b0NT6SNOwbPvxYhOxXYXKzl03W07Bu9RGTI0cImOFk +ts1r0tB86VH+nGQyXpbrv1fr0TBQc1G+NImAlHBvuoIxDRf6fNXqEsh8bX3a +tnQLDfUuKI/WxBPwILDge2sUDfkaFVxn9xNgtcAQjo+j4XDdH7+OfQR0ZHbT +9RJoGJak+bI4nIA3dbwJJWk0vOrA+wZDyXxeHSGckk/Dt1cV724JIvt7laWB +RQsNa5V/WrR5ERAy9zOhjV8ed5rEPBch9xtmeID4J2F5tLMfrnKzIPNnrL+c +W1Ieq8TY2ec3EnDlbWuPsYI8stoCnQRNCHh376x6LV0eD3j8E37GIMA+hdFX +5CWPgb+VvFPI/VBHOFEzrloeA/KIy6K8BHClzzzIvSWPknzv/QZXkPPnDvK4 +1SCPetFXAouXERA845jy86E83uSIm8lzEVDSp/Q2sF8eVV3Wp/2a5YB4QVuq +E7cCmq24veUjuf/Prxd6p+GsgMFnA+dkGjgwe1E6UddDAfNrbtAO3eHAtKCy +EsNLAfd+3Ds7UMuBiSlG0MbdCvhmlxMns4oDHxr8Zj0OKuC5wHXVL65w4KnN +bYFjVxSQ1T5UQ5wizyfBO+DDjAJWel7OlfXhgFH5jcJz5xQxcVfBzfE/NfCW +Vl5gfkERZ65H7H74uwZiz5Vdmi5QxIH7ic350zVwO7E037FMEZ/3dGzaOFED +Om6FuQKNiiihzT8ZNVwDqsvPZKYOK+IbW9fNIY9rQNwrLiFKXQlFJ2ySSsjz +3U9ha2+XFiXkVi9aUStXA6MZ3i77eFSwLVJaZatgNVj9iLb6SF+Lb7T3XD/z +sxK++a3cTxxeh7aFfH84+26S/xMSS4+2qCKv4Letod+ug3C7ysmqH2qow9Fr +mDlxDWSPVTrQ6ep4srmCy255KeSuZwiJBGpgdrKg2d+6y/BU2kR/KmsD2jTk +9S4/XQRM2ZZMzR5N/O+goolH0yUQ4C6O8EnSwrzVrCdR3/OAmihn5K6ijfzO +zypcaDnAq7ztluNjbdQzLa0Xbj4NG9hSldHbdXA+t0GjfTwT9r0TbrXm0kX/ +5O6X7X4Z8GMqw9kqVxcbtorL3xk7Cps0H+VZaejhNhONS00iR+DeFOu/3x16 ++MVGrFIzNgH2quv0d/nr41RB58gj/TiI/C39x2uXPq6/O7einRoH8S3c0hNB ++nih+5nQCE8cpLu9dl8Vpo/zJi31xv2xcO1IzBvTWH306l+XyzkcCx8G7vVx +TupjjJTvn4z2A+Bywqb37G19vOknEPQ0IgbYEzu73XnpKDH9S67rRySIN2wq +blxNx3Rjc4WBwUiYOKoWJidAxzyffP+pZ5FwSX5y9UdhOrrrH8ixuBYJf53i +zMJk6VjaO8l12CcSmhqyalI16VinrFKr0xMBJmn3MjnOdBwqFJSJb9sP5kqS +dvzFdPSs/ORu1xkOxPeH8jtL6BhPnbmc0hwOSrf3z9aX0pEVtcm2rToclll3 +FuwqpyMteE1xyJlwaAlN/dVK0LFX4+tTLY9wMG6Yzol9TMfNp6o9ij+HAd2x +68Pnb3Ts1KXNLlsVBusSjse0GBigo3GsHfaGQCPrynJbpgGeni8LjGwMAYff +TdmvjQxQa9qtvakoBGL2ztz4YmKA7fK0TWdCQqBtm/ewgK0BprIvHWNyh8Au +Bt3a09sALYcKf4XpBUPZr2GZ6WMGaFK/pGp96W5Q82c0Kfcb4MGfr4ckHwTA +KYXNf5IHDPDvKO/R6soAmH7vq//hnQEK8HVyeVwIgHseGeWXRgzQ6/hay/59 +AeDo8D5H4rsBvr+XIZ6jEAAHWClhvFyGeHfK32T+iD+0remS/65siIZaXEso +zjvB/96uI0S4IQZL9e/opfnCxJ6xaPMIQ2R0jl0nBHwhhhIS3BNliGGBZV1F +Cz5wPD7UcS7OENUmTZPK+3ygihlFM0o1RHePo/S4LB9YuJXc2JpniA4NItpL +V/hAduWl6Zethvg9iduxddoLmgq7d/4UY2BhXsBdBdltMGQr7xUlycDEkVvO +V/95Atf8Hvf/pBnoH6nvaz7iCaZbeDYvpzEwY11URvt1T3i0hGkgpcZA3SIN +KT6WJzz3LeA1MWag1cDG59reHtCvFFSRGcDAPm5Ft4JGN5i+9u+35m0GHnyc +v4dW7wyfXCwK0+oYSNDOS86XOEPfshOWIw0MlLrQJTJ6yhkavKXPn2tmYGr6 +uYeT/s6QJKnPXHzCQPdaz+IRYWcQOhYU/3SAgW+PRt9WDHMC9cDXXP5LmZi9 +qB5TY7AVqGKyZfeWMdHh5f3XDUpbQajVd4skDxML51Z+er1mK0xRJ4uerWbi +J/5X31jfHKG+Z5WZjhgTtXYMGnQUOYKlBab8W8tElkTLXy4hR/BTLufNs2Mi +e9upLOs5B4h9uCNIxYGJ+QtvaB8/OkCmv/CzGkcmmnJvSc965QCNVw5kPHNl +Yq5l3i25SgcQVbEUXPRhYqDToaeCgQ7wSOWjqHcUE8evBFjvJOxBbZ0cTaWA +idEQNknPswNse5lQU8TEsN/Bn68fsAOXXanDxiVMDOdxXg7udpB87XuxaxkT +M9IfWz6WtIOBdY3KaRwmdl5ZMet03hZOqrqv//aYiTa7ff3sCm3gp9ppes0k +E2/XZs/NP7CCvudoLjLFxIQ1v+pVrltB896JrREzTFTOYpaFnLKCkzVW4fQ/ +TDxF6btt5mEFakyuG/XcLBQ67rZT9qcl+FrtkW8VZ2FrRcX2AEVL6A7cxNdt +xMLxOLXMl+ctoIF3RlofWFibtlv3b6IFFJcXq54zYaHe5RsnMMgCwn4sWrhZ +sDD60rQML8sC+KOJxAF7Fl4WZ5++OmgOFqnyv0d9WRjBP17Du9Yc7pT8Nzxz +jIWDS632jDwxA7pZxG/rdBZGxnBS1GvNoHb4G1/hCRaeVics0grNoIb6zsA6 +m4UBdmaJB6PN4EZu84lLF1goX5UmbK9iBoUZKYxNFSzcKfgz99hRU0iLEMzK +fcVCu3+Syz67msBKkWOl31+zUDVpzj/V3ARSq7kaTftY+EbQLs5A1wSOTPz8 +9G2AhSdzI490CJjAoV3dRiafyPXRGwvteISwb9v5L1/nWHj2sfOjlUwEj42K +yKIaoWGG371lHsaw2L1SoJVmhMlmqodr6cZQ6D/x1lqRvJ+/qTJdxBg+pdZF +e6wzQi72ya6r7WzY98S+8oCOEfp4aThcMGPD8c3x1DsWRkgflKdsoRtBvdvr +Bb1QIzTdwFvER2fC9q/1TxvDyfGJTyNUJZjAFVuYuzHCCPds3n88cI4BFheC +9ZwOGGEKnFuwaGDAy8ElIfuTjbCgxy/tlCkDxnw3vK3OMULNvv1L1F0NQWbP +0boNzUbYmGPkfTeHDif/Beintxjhjzsb4k8fosPSbIvqzw+M8MWo4cZkfzqM +3VpeVvjECMUVveIqdelQz3UkV/iVEX5a2LZo0KUPHmcSomc/GqHAmgjzGSF9 +yG04oH9vNRtvDlxVOlKsC3yb3aulBdj45ITwV78MXUgYMtSIFmKjTJNqlkeU +LuxaPqekJcZGXt1HBhnWumBgHyVaTGVjzDvd7L9TOtDzYd9UijYbjRMf2/Hb +6IDYqpBqO1c2fn3+sGUjrzaUmB2MnXRno+GjOffcKS3QOXjS7PQ2NsqfOmG/ +/J0WbJ6set3nw0b1Q4HjahwtSO2ZmfcLYaN36/CS4h1aMFd82DQ2kY3t1pGV +WyI0oZ91+lVpORtXsjpqO5ZrwK7IknyrCjbSjSK7dg+pw2xFrf+3KjZutHfy +1G5QB2GFvt/at9jodqrpv43h6mCzkiJ7t5mNF8YWLA68Xw+N3aU7X71mY3xG +l+P3VjWwFrijEdXHRsWE8F2MIjXo2/RkVvItG1mGszyVh9Rgun782I4hcj10 +QrTFmWqgUaR18+sYG/1ifRw6a1Shsd8kKuM7G+G5a49vlipYi24FzUk2rvjv +azI1TBUCjkZ2Rcyw0T6t4yr/BlWYbk7Nk5gj37/v4GPkV4WkPzl+9X/YKCKY +6HPh2zoQ0itT377Ixnq379aU5+vg0p76mX//2Hjw/l+3R+Xr4H+49zHk + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.08057697046444806}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.08057697046444806}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943879545992403`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"5f35bf86-50aa-4fe1-94e5-c5d31d26940c"] }, Open ]], Cell[CellGroupData[{ @@ -7463,18 +8626,78 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[100]:=",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.822142488175291`*^-157\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 17, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943879547717543`*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"b4a29c52-b2aa-4cee-9cc1-aca69f1d61e3"], -Cell[BoxData["15.784298544249623`"], "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5915905017385416`*^-159\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 18, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438795478321*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"bee68e55-5fe5-43bc-9333-e1f2175dbfbc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.238448198883763`*^-162\\\", \ +RowBox[{\\\"\ +692388265304082962155241704502629852543932276498796563311324806235240\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8063384494795553340756316369516704730972160000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 19, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943879547929363`*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"b8c67ce0-c1d4-47c5-b1ff-bb163a91a5ee"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 100, 20, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943879548021517`*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"8cbcd7cf-8bd2-47ba-af16-8f33f79012c0"], + +Cell[BoxData["9.43363727156243`"], "Output", + CellChangeTimes->{3.994388027340173*^9}, + CellLabel-> + "Out[100]=",ExpressionUUID->"d5774c3e-0213-4907-96c5-17a7baf56645"] }, Open ]], Cell[CellGroupData[{ @@ -7541,27 +8764,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850595832054*^9, - 3.991850600247154*^9}},ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-\ -8e83e9537fdc"], + CellChangeTimes->{{3.991850595832054*^9, 3.991850600247154*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56921c73-2b67-0e4a-9808-5f61de992c7e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.0650390507166364`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 101, 21, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388027438898*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"942cfce7-cc18-48cf-a5c7-68b89f19a2c8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.385766778768389`*^-200\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 101, 22, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388027446842*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"62b41d40-5d85-4171-8519-a08b49816c07"], -Cell[BoxData["0.009432406283458074`"], "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.265334742437035`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 23, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943880274541607`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"a7bf4c84-c5d6-44a9-9883-e44b5686c002"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 101, 24, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388027461376*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"5485ac45-eff3-41fc-a9b1-80da10b3acbc"], + +Cell[BoxData["0.9947069856504154`"], "Output", + CellChangeTimes->{3.994388036864729*^9}, + CellLabel-> + "Out[101]=",ExpressionUUID->"2219005a-6edc-453b-ac8b-311d508254b7"] }, Open ]], Cell[CellGroupData[{ @@ -7582,8 +8850,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7628,27 +8895,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850617546938*^9, - 3.991850621692934*^9}},ExpressionUUID->"ccaee6a3-c390-0444-bf16-\ -3471356a3614"], + CellChangeTimes->{{3.991850617546938*^9, 3.991850621692934*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"1795c3b9-0182-224c-b986-6414d6712c04"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.0650390507166364`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 102, 25, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388036914806*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"4e05e032-4c40-4514-b7a3-2dd1eb41053a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c3b31753-a67f-9b45-b822-068e1df11f68"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.385766778768389`*^-200\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 102, 26, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388036922682*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"696dfee8-46b3-48de-84a7-e56162cb1f93"], -Cell[BoxData["5.210321944589433`"], "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.265334742437035`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 27, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438803693009*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"849bfae8-31fb-4dd3-972d-00d72d8fb551"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 102, 28, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388036938798*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"deba9a21-6602-4462-86d8-410f881e1f1f"], + +Cell[BoxData["26.642952461792998`"], "Output", + CellChangeTimes->{3.994388046035265*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"234a3c41-319b-4e11-9813-85ddeb29fdd6"] }, Open ]], Cell[CellGroupData[{ @@ -7669,8 +8981,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -7715,27 +9026,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918506254460773`*^9, - 3.991850628958872*^9}},ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-\ -286954db37c5"], + CellChangeTimes->{{3.9918506254460773`*^9, 3.991850628958872*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.0650390507166364`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 103, 29, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388046131187*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"d77598c3-fe82-4015-ab8f-40ea9bc6db2f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4e2b22f2-1724-7649-93fc-33cd27bb415e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.385766778768389`*^-200\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 103, 30, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388046139573*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"d75b3189-478e-4416-8eec-db5ebd911ed5"], -Cell[BoxData["20.308521034293705`"], "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.265334742437035`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 31, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943880461467524`*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"338fe361-bbf3-4a81-afd3-181570e5c1b4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 103, 32, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388046153104*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"59fea593-4a05-41c3-bc0e-391e8e696e65"], + +Cell[BoxData["4.588717664906014`"], "Output", + CellChangeTimes->{3.99438805261178*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"aefd43d8-ec90-41dd-bc0e-b9d40f287e1e"] }, Open ]], Cell[CellGroupData[{ @@ -7744,19 +9100,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918506775260105`*^9, - 3.9918506840946693`*^9}},ExpressionUUID->"7ec678fd-8398-414a-aeba-\ -20e078d734cd"], + CellChangeTimes->{{3.9918506775260105`*^9, 3.9918506840946693`*^9}}, + CellLabel-> + "In[104]:=",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[BoxData["0.0009169614351270098`"], "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[BoxData["0.08996183893386754`"], "Output", + CellChangeTimes->{3.994388052655326*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"dcb80a5b-deba-426e-a850-61125a787fee"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918506873951664`*^9, 3.991850690050791*^9}, - 3.9919245116307106`*^9},ExpressionUUID->"ca329276-48d7-8943-8408-\ -dd2997d3499c"], + 3.9919245116307106`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ @@ -7777,10 +9137,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Il", "*", "Ih"}], - RowBox[{"Il", "+", "Ih"}]]}]}]], "Input",ExpressionUUID->"681c316f-cd82-\ -ae4b-824f-5eb2b3081f6d"], + RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", + CellLabel-> + "In[106]:=",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[BoxData["5.744985073726742`"], "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[BoxData["4.386848601294253`"], "Output", + CellChangeTimes->{3.994388052681229*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"bb467a78-d345-498c-b4a9-cff617e9d33c"] }, Open ]], Cell[CellGroupData[{ @@ -7788,10 +9152,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb2"]]}]], "Input",ExpressionUUID->"11e77a67-96b2-a645-\ -89cd-559587f30b91"], + FractionBox["Kb", "Qb2"]]}]], "Input", + CellLabel-> + "In[107]:=",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[BoxData["1.564995573098341`"], "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[BoxData["3.414492673847112`"], "Output", + CellChangeTimes->{3.9943880526996727`*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"1a1af0e3-0575-4dad-8340-47745fd660b1"] }, Open ]], Cell[CellGroupData[{ @@ -7799,10 +9167,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"3c5f43e9-\ -afc4-be40-8f37-0116656ecd38"], + RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[108]:=",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[BoxData["8.990876207898397`"], "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[BoxData["14.978862410395678`"], "Output", + CellChangeTimes->{3.994388052722533*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"1fb13ad2-a2a6-4f3e-a047-6068f0f85699"] }, Open ]], Cell[CellGroupData[{ @@ -7990,10 +9362,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"f07a8476-d7bc-1049-\ -82a6-7cf06f61e28f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[109]:=",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[BoxData["0.06921475857237179`"], "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[BoxData["0.00847509838607268`"], "Output", + CellChangeTimes->{3.994388052746891*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"e74951b8-2072-4a2b-8645-389ed0b20278"] }, Open ]], Cell[CellGroupData[{ @@ -8005,18 +9381,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"b88b1a94-\ -22d7-2843-88e3-f607b95c8af9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[110]:=",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"def6b331-c871-b04d-a16e-4fc00b03d009"], - -Cell[BoxData["3.36857007702114`"], "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[BoxData["9.626592016119194`"], "Output", + CellChangeTimes->{3.994388052878261*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"12bea102-f1d7-4052-9168-2fe42cfd4cdd"] }, Open ]], Cell[CellGroupData[{ @@ -8206,10 +9578,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"9d771aab-c0b4-f24c-\ -9b53-9472e00c4d82"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[111]:=",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[BoxData["0.01179213875658184`"], "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[BoxData["0.0656832760624467`"], "Output", + CellChangeTimes->{3.99438805290368*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"7e666f7e-3106-4e85-8a8b-939f1e43c039"] }, Open ]], Cell[CellGroupData[{ @@ -8221,18 +9597,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"47e2a8e8-\ -6af3-374f-9eea-9c2b6faaaf4a"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[112]:=",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c6c8676e-4601-144e-b83c-769e22949175"], - -Cell[BoxData["8.161099076568318`"], "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[BoxData["3.457940671846922`"], "Output", + CellChangeTimes->{3.994388053039722*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"4b5a6e2e-9dbf-49c2-a73f-0e5df8601a67"] }, Open ]], Cell[CellGroupData[{ @@ -8323,10 +9695,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-\ -6b0985b9b3bc"], + ")"}]}]}]], "Input", + CellLabel-> + "In[113]:=",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[BoxData["0.046564779467990605`"], "Output", + CellChangeTimes->{3.994388053056429*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"6126ca83-a6e6-471b-b472-8adf8657e473"] }, Open ]], Cell[CellGroupData[{ @@ -8414,10 +9790,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-\ -4868d83e9702"], + ")"}]}]}]], "Input", + CellLabel-> + "In[114]:=",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[BoxData["0.9534352205320095`"], "Output", + CellChangeTimes->{3.9943880530729923`*^9}, + CellLabel-> + "Out[114]=",ExpressionUUID->"2c22c5d9-6cc2-4b2a-be43-3a2b1b3ea199"] }, Open ]], Cell[CellGroupData[{ @@ -8538,10 +9918,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"5caf1614-7e5c-\ -9940-98cd-9460e2c074b2"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[115]:=",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[BoxData["0.04439650078108801`"], "Output", + CellChangeTimes->{3.994388053093801*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"19d176ab-5fdc-4589-9387-baaf10590448"] }, Open ]], Cell[CellGroupData[{ @@ -8603,27 +9987,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991850710120125*^9},ExpressionUUID->"db0784f6-51d0-fd44-b0e8-\ -05d6af1a6e52"], + CellChangeTimes->{3.991850710120125*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7fd60dea-f794-4744-8801-bfb1a50a0e07"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3002717161310517`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 116, 33, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388053120034*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"ebb280e0-a734-46ce-a65e-38470603f9a3"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0b8c0718-41d2-4542-8afe-212a15805650"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.465823354307541`*^-206\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 116, 34, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388053131226*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"ef4ebf34-c499-4216-bfab-d396a0722711"], -Cell[BoxData["3.3685700770211437`"], "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5338008190488537`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 116, + 35, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388053141635*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"57df9818-4d73-4a6a-8e26-62f433da44c5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 116, 36, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943880531515083`*^9}, + CellLabel-> + "During evaluation of \ +In[116]:=",ExpressionUUID->"3cc9c56e-249f-4564-9189-47562795f8c8"], + +Cell[BoxData["9.626592016119199`"], "Output", + CellChangeTimes->{3.994388058671475*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"96748466-65e7-41d8-abfb-9b96c055642a"] }, Open ]], Cell[CellGroupData[{ @@ -8685,27 +10114,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507152152424`*^9},ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-\ -f69c33a31448"], + CellChangeTimes->{3.9918507152152424`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b6f0ccc2-ff83-124b-a341-e143319c7670"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3002717161310517`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 117, 37, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388058732749*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"c9e9a9e2-a746-4ba6-bde4-db8e78ece41d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.465823354307541`*^-206\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 117, 38, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438805874096*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"ad0fbcf9-ad6f-4fb7-b654-45ccd6958da6"], -Cell[BoxData["8.161099076568323`"], "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5338008190488537`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 117, + 39, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388058748495*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"ba98fa87-abc4-466e-843e-5a74d3022f61"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 117, 40, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388058755476*^9}, + CellLabel-> + "During evaluation of \ +In[117]:=",ExpressionUUID->"92a511ed-a706-4538-a015-5e2ea09272a0"], + +Cell[BoxData["3.4579406718469197`"], "Output", + CellChangeTimes->{3.9943880641524563`*^9}, + CellLabel-> + "Out[117]=",ExpressionUUID->"4b5c9290-2807-4197-bb8b-0a48e456960e"] }, Open ]], Cell[CellGroupData[{ @@ -8763,489 +10237,394 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507183992805`*^9},ExpressionUUID->"611f92ea-b199-2643-9788-\ -194fae57c34e"], + CellChangeTimes->{3.9918507183992805`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7797a546-4085-124a-83da-5f3c472cdc4c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"ca7472ca-7b27-a54a-84a1-e603fa592207"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-\ -49e8ffb5e8c8"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4VVsfB3ARZSpDZpkpQjon5aDWr4gGQySZKh3n7OTKcLgSSikNbzKU +LsqU4SZjxmQoRUiSSKIU5Rwc87RVV3mXP/azn8+z9/Pd37X2WvvZqnRfeyYv +Dw/PMD6Wz/5t+hset7ft/OG22Tm9mI12TmQZ0s3zUdnjoRvL7k/bFq9hXoPK +HUQ17mMfZLwREKG+RPJG6aoZ2MXB4fX85q1ozan0y5nY1xtl68Jz3yG3aVHr +bOwn7f6pi5QulN83HPIAm9vbEna2+iM6s2PLmlxseba6K2n2Ga1THxIowD4w +GUYLaP2KbmcKMR9hP13kCgfnDiDuh3sby7A/XJQJrfD5jl5237WrxJ4QMOfO +Udiorn5Vfw22QJSfM3WBg3ZVf+t8jq0kntLsXz2MfAY26TVh2yiQ/06YjaFg +B0GxTmwiXU1ab/UE6p1PSerBDte0jfyrdRLV+Ny/1o/9Ueb9lsDcadRZOP/P +JDbDxevU7agZtHrAomIBeyqZ536JzyxKrVtlwlPCRqvV9MSmKfPoSVhPoAR2 +PKPeUkyKRLW9XG1FbJUHzuGbF0jEO+JtroVtpHtl4nT1D4SMGh6aYHtu+9rK +NVtEBzY1G/6FPRf890ohrd/ox8WT0sHYF6qFTbVX/0FZUiFukdiJYJR3snUJ +PfX9JXsfm5HdbM7KXQEFE6xDfdi5jbf7Lyrwgrvc4+Pj2FNDx8Liongh47n/ +u9/YYTrzpY98+CDV3YqtXIr7FqmqT1L4Ydgqq80Tu7d97OmfTH5weflQIAxb +ZeaxyxopASgu0s6Kwc7fanNLb0EAPAXvra3EbngSssK7ejXYVR3KES1jo/n6 +zq/DZiJgGp098BpbwkpELPSpCFy6lZc8hG3w3hxEaaIwvYL3LV85G3kNlqdv +0V8DvB2ZSTuw/XhbDXaIiIFdb1djBTZbrXA6khSHMMeui88q8PwQLYJvqRIg +e9ep5Bs2bx5HVdZfAiiNpi4Cj3FfqrJ97qgELJ7TFbPFdjGLLWnrlwTvty3r +ONhvPVgBMq+lgFUsH6HzhI2+PIi+4b5aGmwmkPZh7LHR3MyHe6QhwqvX8gK2 +UOD3TpM6aaDVBo52Y5tfdtjqXi4DKkNEa1QVG1VlbZvPSZODdWXRpEgNG2Wx +fwUZB64HMa7yAvGMjfYevvoloGA9hO5UrE7GHmuQtCjgrAdPZ++hDuytWbpS +Ks5KYL8kehbq8HzSj5Xy71SG+0ERF1Ses9HMZP+Z4UsqUN8Rrzr3go0kT5uX +lVqrgVKVQuVIIxtxsoQ8D3qpgfVSzXXdJjaq/NyuMH5FDWJODtf7YrtZHb2k +VacGdZvY/gvYWZuC7JMo6hA5llcm/Ao/n/tg6ryMBlz8rtZt+ZqNHE4K6+0f +0ATdE5Mpa9rZCAUdphz5rQlr+vxn3LB1ItO2M+S0oJcsyMvD5smk7j5vpwWK +LFer/e/YqOCL65GS51pQLNdkEdWB96dj/kX5jA2QoNeoqt6F+5lbf+DStaEh +UfxCci8bZR5K+LRwXhtUIkT9FrCj6QP9K+9pg7+z8Ev7T3h9X/h7VKlTG75F +SqcKfWYj8ZoUnkNmOuBtWyQS3ofXD3VCp1p9E2zNk/4S0s9GCmox4TcGdaGr +N83jKYeNav43p/2TVw9EtnEb9IfwfMw6vydU9YDR5JeShp3aoKG9+5gebLgK +ZRHDbKR2sqrjR7ce1EpZn7Xh4vHmszWJ1/pg7GrMWBxno/UKSoSKswEInZbq +Lp5nI93sQJH/EAUCJA0ELwtwEJ1xaV7PhgKzovB+9SoOSlS/9cXdjQLZVnyr +o7H5MooeNQZT4GNK8cOk1RzUm8p1uFVMgQuWYh/KhTjoeqJ7irY6FYwPzHat +WMtBnBtW+k4CWyGmrvLGsAwH3WdpHCxvNQT/21oZ0zoc1B6Etl/OpkHSizS+ +AWcOUj3WZXPUewesCdD4cieGg5hLFYXrzwK4baizv93MQTKjlatk6Lshaoav +bVF0CAVSTT/f0jGH+XN32lc5DiH6+GKzJHcPmCo4c65lDqGC3QGr0t5aQkv0 +IxOfpSGUNef1PD9+H5R2vetKcBtGP3bJvmkIPwCHytvLXrwaRn08fNMDJ6zh +TGZ0gNWOEeSj6Bt7Ud0WSjLCbtx5NIIKTzXX3Yk8CE+3b1EbNOSikFm5hU2n +7GDvqUVHuSoumt9v4dh03B6akOGxTrtRRHON28W2OwQ/U8drrSdHUYdcilcD +1QEGaPFXn1wfQ/L/XqrJ2XgYjrcUherSxlFlv46VjagjHGE589gMjiOl91Mn +g8YdoXvUipJ3awJR78TlZ/YfgXMxwgKdjpMoZeWs/q16J4iWNNRZEpxCFbs2 +90Y+cYYpqurHawFTKHH7/8QXc11gclF9S1ffFHr7KfsKNcoV6ooF4hZ3T6Ny +62QNvwtuEPdq0tO9ZBpNnz7E48M4CqFLHJnTCjNo3kLbc8LsGOisyzH5HDGD +csZ7fgRsOw7zIV1xYzMzyOl+tsdREXdYpIXrprnMotKSA8f5rrpDs8hIL3o1 +i2gKHT+v/3SHpjcTYYL6c0i9/2Tvu1MnwPmyfn3ezTk0KPyXbfL3E/D1REIC +e2oOtUfbeFgepoMpO6f46N55FB+cJvx3Ox2swxXFrqXPo5qnSz899nlAqllf +xInJebTWDa5SqzzAalOftMEWEqmsa3qrWOMBp/zm+kwoJDJotZYVeOoBFv8b +FbSkksje1PXhx+ceoNwYH+NqSKJ4xaDX5155QFJq0oFzNBLJ9+Wtbf7oAbGb +Zhwyd5FI45hMotuCB9CE3bWC7UhEc5/IidzKAN3+2hEjXxL9mzQVYLONAT21 +nzRE/Ui0rnNmp4wRAzZmir7px57Ys/A+x4QB1qFCjCssEn+/eFa07maAltOP +By1/k2jNgrizhB0DNE4HMLaHkWjwpqFg2mkG6Bw8cS/9Gomiq8NOVf7LACJo +sOhhGolOUxJowTkMsHg2cMshnURWD4sFjXIZwH2V8vUPtlAC5+HjAgYE9rWX +22WQKJJ1kFtRxoA7hWl2U1kkCtPW+Kv8BQPmE+U3ieeSyCvhtXfJFwYojddE +9ZeSaN8ajimrnwGuggNewWUk2hjJI0r5xoC+0tHCteUk4rAM8W8PA9qKwNO0 +gkQnbNLGH40xwEirPjm6kkRO/AE+Rb8YMHbp0JxULYksA+T98qWZYKGcmVz0 +kkQv0q7svyXLBKqiJQ01ksi0dUYjWJ4J7zTPK7ZhG2i+7jFTYoITTb1ipIlE +ct2hZp80mWAsV0+RbSHRqHGftJAhE2rpeYb2bSSK4U2vPXkI5+37E0X7gMe/ +WSTR+jATJt7MPSvGvuwazKIeYUL81SpD7W4SBZcd3LDkwgS14T0jUh9xf2JF +3D90JpwuZJ7m9JCI2kJnvPRngsFkSodHH4m64zSF1WOZwGO8z/3tdxIVIlHP +4Tgm3M1ItNUexPnjcw0Ft5nw+9uZhAhsyr6G80YJTKCLpxpQ2fj98XjMWKcy +wfNk0pUoDoksfNN7gvOZkJ9mXKI8QqL1669t21nIhCaWu5ov9lyL722+R0x4 +VcHPrcXO0ELW0aVMUF4ZE+7MJdHvvr66zComBG4cen5tlERlVgo5bc1MED7s ++0/TOIlu/OLlj29hwm3x42dEJkhEz+GecG5lQiH6WngQW2xllcLgWyY8aXVW +7cb2rnaK+fmBCRGytRKfJ0mkrvNPkAabCfWu3QqN0yT61X2uc4TDhHNmqcd5 +ZkjUHsk0KBpmwh3Wxp807PMDW7m0MSa84XfSy8PuTew8ajvLhF5pdmLkLIlu +rRLfE7KCgJe6BgHy8ySqmelzDeQjYEJ9e5Qt9lBfLsuHn4Av98zbL2Gblpmn +0wUJ6LHa2TOCzXEP/m+/OAEHNliO55G4v9UeiT2SBDSrKhztxTbZLqGNpAgI +j45bWIX/U2NF8x2pcgR0lm3Pd8c2qfparKBKQOUTiuTqHyQisvObpdQJWLL7 +9mEzdmzs2a9rNQlgvehrcMTmEJKiK7UJ0O+PVc5Yvi5p6TlmQMDn9v42/Z8k +qvojGc6hEODA4ny3xWaP9N/p34r7d0yo+WEb14XUvzciwGXfkFIh9qB3oVIt +EPDeIE1U5Rfe706hho93E/A1cMDfGJtmtteq2JwAHy536RB2tNy3s9l7CXiU +S0u6jF25sig2bT8BV1JYWfewv0+GPkiyImCLhEtPMbZRo1TXzYME7NigVPcJ +m178bfSqPQF1alP+k9g3k4t4IxxwX0dXa97/SPSNtc8gyImAUBb3gia26DFp +Sz8XAi6d4u8xxDba9/2olxsBieUPXPZg31Q+d+OYO+5fx+o9gV0ptD/DiU6A +2u74jz7LefPST+wZBHQl6/OELucNfH9rRRCwtWqn3ZXlvNZHHAtPAgSrnr+O +xaY/PvcbvAh4MFPme3c5P2P/OhNvAvqnpHZkLufflNlk6IPvD/5GzVvODx7c +tdmPgD8XZR1KsEUYxU7aLAJUUEVKJfZ22/O+6oEE0KWrxJ4u5xsfuLI+iIBt +2WoFL7CjNGVTZIIJuPtsgtWIXSHGLhUPIUDRbz39FfbAf8UtwmEEtCwUhLxe +zh86P8B/Hq+3trSaVuxtHQd+LIUT0Hp/ZsMb7P8Drgo5yg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VVsfB3ARZSpDZpkpQjon5aDWr4gGQySZKh3n7OTKcLgSSikNbzKU +LsqU4SZjxmQoRUiSSKIU5Rwc87RVV3mXP/azn8+z9/Pd37X2WvvZqnRfeyYv +Dw/PMD6Wz/5t+hset7ft/OG22Tm9mI12TmQZ0s3zUdnjoRvL7k/bFq9hXoPK +HUQ17mMfZLwREKG+RPJG6aoZ2MXB4fX85q1ozan0y5nY1xtl68Jz3yG3aVHr +bOwn7f6pi5QulN83HPIAm9vbEna2+iM6s2PLmlxseba6K2n2Ga1THxIowD4w +GUYLaP2KbmcKMR9hP13kCgfnDiDuh3sby7A/XJQJrfD5jl5237WrxJ4QMOfO +Udiorn5Vfw22QJSfM3WBg3ZVf+t8jq0kntLsXz2MfAY26TVh2yiQ/06YjaFg +B0GxTmwiXU1ab/UE6p1PSerBDte0jfyrdRLV+Ny/1o/9Ueb9lsDcadRZOP/P +JDbDxevU7agZtHrAomIBeyqZ536JzyxKrVtlwlPCRqvV9MSmKfPoSVhPoAR2 +PKPeUkyKRLW9XG1FbJUHzuGbF0jEO+JtroVtpHtl4nT1D4SMGh6aYHtu+9rK +NVtEBzY1G/6FPRf890ohrd/ox8WT0sHYF6qFTbVX/0FZUiFukdiJYJR3snUJ +PfX9JXsfm5HdbM7KXQEFE6xDfdi5jbf7Lyrwgrvc4+Pj2FNDx8Liongh47n/ +u9/YYTrzpY98+CDV3YqtXIr7FqmqT1L4Ydgqq80Tu7d97OmfTH5weflQIAxb +ZeaxyxopASgu0s6Kwc7fanNLb0EAPAXvra3EbngSssK7ejXYVR3KES1jo/n6 +zq/DZiJgGp098BpbwkpELPSpCFy6lZc8hG3w3hxEaaIwvYL3LV85G3kNlqdv +0V8DvB2ZSTuw/XhbDXaIiIFdb1djBTZbrXA6khSHMMeui88q8PwQLYJvqRIg +e9ep5Bs2bx5HVdZfAiiNpi4Cj3FfqrJ97qgELJ7TFbPFdjGLLWnrlwTvty3r +ONhvPVgBMq+lgFUsH6HzhI2+PIi+4b5aGmwmkPZh7LHR3MyHe6QhwqvX8gK2 +UOD3TpM6aaDVBo52Y5tfdtjqXi4DKkNEa1QVG1VlbZvPSZODdWXRpEgNG2Wx +fwUZB64HMa7yAvGMjfYevvoloGA9hO5UrE7GHmuQtCjgrAdPZ++hDuytWbpS +Ks5KYL8kehbq8HzSj5Xy71SG+0ERF1Ses9HMZP+Z4UsqUN8Rrzr3go0kT5uX +lVqrgVKVQuVIIxtxsoQ8D3qpgfVSzXXdJjaq/NyuMH5FDWJODtf7YrtZHb2k +VacGdZvY/gvYWZuC7JMo6hA5llcm/Ao/n/tg6ryMBlz8rtZt+ZqNHE4K6+0f +0ATdE5Mpa9rZCAUdphz5rQlr+vxn3LB1ItO2M+S0oJcsyMvD5smk7j5vpwWK +LFer/e/YqOCL65GS51pQLNdkEdWB96dj/kX5jA2QoNeoqt6F+5lbf+DStaEh +UfxCci8bZR5K+LRwXhtUIkT9FrCj6QP9K+9pg7+z8Ev7T3h9X/h7VKlTG75F +SqcKfWYj8ZoUnkNmOuBtWyQS3ofXD3VCp1p9E2zNk/4S0s9GCmox4TcGdaGr +N83jKYeNav43p/2TVw9EtnEb9IfwfMw6vydU9YDR5JeShp3aoKG9+5gebLgK +ZRHDbKR2sqrjR7ce1EpZn7Xh4vHmszWJ1/pg7GrMWBxno/UKSoSKswEInZbq +Lp5nI93sQJH/EAUCJA0ELwtwEJ1xaV7PhgKzovB+9SoOSlS/9cXdjQLZVnyr +o7H5MooeNQZT4GNK8cOk1RzUm8p1uFVMgQuWYh/KhTjoeqJ7irY6FYwPzHat +WMtBnBtW+k4CWyGmrvLGsAwH3WdpHCxvNQT/21oZ0zoc1B6Etl/OpkHSizS+ +AWcOUj3WZXPUewesCdD4cieGg5hLFYXrzwK4baizv93MQTKjlatk6Lshaoav +bVF0CAVSTT/f0jGH+XN32lc5DiH6+GKzJHcPmCo4c65lDqGC3QGr0t5aQkv0 +IxOfpSGUNef1PD9+H5R2vetKcBtGP3bJvmkIPwCHytvLXrwaRn08fNMDJ6zh +TGZ0gNWOEeSj6Bt7Ud0WSjLCbtx5NIIKTzXX3Yk8CE+3b1EbNOSikFm5hU2n +7GDvqUVHuSoumt9v4dh03B6akOGxTrtRRHON28W2OwQ/U8drrSdHUYdcilcD +1QEGaPFXn1wfQ/L/XqrJ2XgYjrcUherSxlFlv46VjagjHGE589gMjiOl91Mn +g8YdoXvUipJ3awJR78TlZ/YfgXMxwgKdjpMoZeWs/q16J4iWNNRZEpxCFbs2 +90Y+cYYpqurHawFTKHH7/8QXc11gclF9S1ffFHr7KfsKNcoV6ooF4hZ3T6Ny +62QNvwtuEPdq0tO9ZBpNnz7E48M4CqFLHJnTCjNo3kLbc8LsGOisyzH5HDGD +csZ7fgRsOw7zIV1xYzMzyOl+tsdREXdYpIXrprnMotKSA8f5rrpDs8hIL3o1 +i2gKHT+v/3SHpjcTYYL6c0i9/2Tvu1MnwPmyfn3ezTk0KPyXbfL3E/D1REIC +e2oOtUfbeFgepoMpO6f46N55FB+cJvx3Ox2swxXFrqXPo5qnSz899nlAqllf +xInJebTWDa5SqzzAalOftMEWEqmsa3qrWOMBp/zm+kwoJDJotZYVeOoBFv8b +FbSkksje1PXhx+ceoNwYH+NqSKJ4xaDX5155QFJq0oFzNBLJ9+Wtbf7oAbGb +Zhwyd5FI45hMotuCB9CE3bWC7UhEc5/IidzKAN3+2hEjXxL9mzQVYLONAT21 +nzRE/Ui0rnNmp4wRAzZmir7px57Ys/A+x4QB1qFCjCssEn+/eFa07maAltOP +By1/k2jNgrizhB0DNE4HMLaHkWjwpqFg2mkG6Bw8cS/9Gomiq8NOVf7LACJo +sOhhGolOUxJowTkMsHg2cMshnURWD4sFjXIZwH2V8vUPtlAC5+HjAgYE9rWX +22WQKJJ1kFtRxoA7hWl2U1kkCtPW+Kv8BQPmE+U3ieeSyCvhtXfJFwYojddE +9ZeSaN8ajimrnwGuggNewWUk2hjJI0r5xoC+0tHCteUk4rAM8W8PA9qKwNO0 +gkQnbNLGH40xwEirPjm6kkRO/AE+Rb8YMHbp0JxULYksA+T98qWZYKGcmVz0 +kkQv0q7svyXLBKqiJQ01ksi0dUYjWJ4J7zTPK7ZhG2i+7jFTYoITTb1ipIlE +ct2hZp80mWAsV0+RbSHRqHGftJAhE2rpeYb2bSSK4U2vPXkI5+37E0X7gMe/ +WSTR+jATJt7MPSvGvuwazKIeYUL81SpD7W4SBZcd3LDkwgS14T0jUh9xf2JF +3D90JpwuZJ7m9JCI2kJnvPRngsFkSodHH4m64zSF1WOZwGO8z/3tdxIVIlHP +4Tgm3M1ItNUexPnjcw0Ft5nw+9uZhAhsyr6G80YJTKCLpxpQ2fj98XjMWKcy +wfNk0pUoDoksfNN7gvOZkJ9mXKI8QqL1669t21nIhCaWu5ov9lyL722+R0x4 +VcHPrcXO0ELW0aVMUF4ZE+7MJdHvvr66zComBG4cen5tlERlVgo5bc1MED7s ++0/TOIlu/OLlj29hwm3x42dEJkhEz+GecG5lQiH6WngQW2xllcLgWyY8aXVW +7cb2rnaK+fmBCRGytRKfJ0mkrvNPkAabCfWu3QqN0yT61X2uc4TDhHNmqcd5 +ZkjUHsk0KBpmwh3Wxp807PMDW7m0MSa84XfSy8PuTew8ajvLhF5pdmLkLIlu +rRLfE7KCgJe6BgHy8ySqmelzDeQjYEJ9e5Qt9lBfLsuHn4Av98zbL2Gblpmn +0wUJ6LHa2TOCzXEP/m+/OAEHNliO55G4v9UeiT2SBDSrKhztxTbZLqGNpAgI +j45bWIX/U2NF8x2pcgR0lm3Pd8c2qfparKBKQOUTiuTqHyQisvObpdQJWLL7 +9mEzdmzs2a9rNQlgvehrcMTmEJKiK7UJ0O+PVc5Yvi5p6TlmQMDn9v42/Z8k +qvojGc6hEODA4ny3xWaP9N/p34r7d0yo+WEb14XUvzciwGXfkFIh9qB3oVIt +EPDeIE1U5Rfe706hho93E/A1cMDfGJtmtteq2JwAHy536RB2tNy3s9l7CXiU +S0u6jF25sig2bT8BV1JYWfewv0+GPkiyImCLhEtPMbZRo1TXzYME7NigVPcJ +m178bfSqPQF1alP+k9g3k4t4IxxwX0dXa97/SPSNtc8gyImAUBb3gia26DFp +Sz8XAi6d4u8xxDba9/2olxsBieUPXPZg31Q+d+OYO+5fx+o9gV0ptD/DiU6A +2u74jz7LefPST+wZBHQl6/OELucNfH9rRRCwtWqn3ZXlvNZHHAtPAgSrnr+O +xaY/PvcbvAh4MFPme3c5P2P/OhNvAvqnpHZkLufflNlk6IPvD/5GzVvODx7c +tdmPgD8XZR1KsEUYxU7aLAJUUEVKJfZ22/O+6oEE0KWrxJ4u5xsfuLI+iIBt +2WoFL7CjNGVTZIIJuPtsgtWIXSHGLhUPIUDRbz39FfbAf8UtwmEEtCwUhLxe +zh86P8B/Hq+3trSaVuxtHQd+LIUT0Hp/ZsMb7P8Drgo5yg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6779329053778431, + 1.4364749489269455`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6779329053778447}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6779329053778431, + 1.4364749489269455`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6779329053778447}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk4VVsfB3ARZSpDZpkpQjon5aDWr4gGQySZKh3n7OTKcLgSSikNbzKU +LsqU4SZjxmQoRUiSSKIU5Rwc87RVV3mXP/azn8+z9/Pd37X2WvvZqnRfeyYv +Dw/PMD6Wz/5t+hset7ft/OG22Tm9mI12TmQZ0s3zUdnjoRvL7k/bFq9hXoPK +HUQ17mMfZLwREKG+RPJG6aoZ2MXB4fX85q1ozan0y5nY1xtl68Jz3yG3aVHr +bOwn7f6pi5QulN83HPIAm9vbEna2+iM6s2PLmlxseba6K2n2Ga1THxIowD4w +GUYLaP2KbmcKMR9hP13kCgfnDiDuh3sby7A/XJQJrfD5jl5237WrxJ4QMOfO +Udiorn5Vfw22QJSfM3WBg3ZVf+t8jq0kntLsXz2MfAY26TVh2yiQ/06YjaFg +B0GxTmwiXU1ab/UE6p1PSerBDte0jfyrdRLV+Ny/1o/9Ueb9lsDcadRZOP/P +JDbDxevU7agZtHrAomIBeyqZ536JzyxKrVtlwlPCRqvV9MSmKfPoSVhPoAR2 +PKPeUkyKRLW9XG1FbJUHzuGbF0jEO+JtroVtpHtl4nT1D4SMGh6aYHtu+9rK +NVtEBzY1G/6FPRf890ohrd/ox8WT0sHYF6qFTbVX/0FZUiFukdiJYJR3snUJ +PfX9JXsfm5HdbM7KXQEFE6xDfdi5jbf7Lyrwgrvc4+Pj2FNDx8Liongh47n/ +u9/YYTrzpY98+CDV3YqtXIr7FqmqT1L4Ydgqq80Tu7d97OmfTH5weflQIAxb +ZeaxyxopASgu0s6Kwc7fanNLb0EAPAXvra3EbngSssK7ejXYVR3KES1jo/n6 +zq/DZiJgGp098BpbwkpELPSpCFy6lZc8hG3w3hxEaaIwvYL3LV85G3kNlqdv +0V8DvB2ZSTuw/XhbDXaIiIFdb1djBTZbrXA6khSHMMeui88q8PwQLYJvqRIg +e9ep5Bs2bx5HVdZfAiiNpi4Cj3FfqrJ97qgELJ7TFbPFdjGLLWnrlwTvty3r +ONhvPVgBMq+lgFUsH6HzhI2+PIi+4b5aGmwmkPZh7LHR3MyHe6QhwqvX8gK2 +UOD3TpM6aaDVBo52Y5tfdtjqXi4DKkNEa1QVG1VlbZvPSZODdWXRpEgNG2Wx +fwUZB64HMa7yAvGMjfYevvoloGA9hO5UrE7GHmuQtCjgrAdPZ++hDuytWbpS +Ks5KYL8kehbq8HzSj5Xy71SG+0ERF1Ses9HMZP+Z4UsqUN8Rrzr3go0kT5uX +lVqrgVKVQuVIIxtxsoQ8D3qpgfVSzXXdJjaq/NyuMH5FDWJODtf7YrtZHb2k +VacGdZvY/gvYWZuC7JMo6hA5llcm/Ao/n/tg6ryMBlz8rtZt+ZqNHE4K6+0f +0ATdE5Mpa9rZCAUdphz5rQlr+vxn3LB1ItO2M+S0oJcsyMvD5smk7j5vpwWK +LFer/e/YqOCL65GS51pQLNdkEdWB96dj/kX5jA2QoNeoqt6F+5lbf+DStaEh +UfxCci8bZR5K+LRwXhtUIkT9FrCj6QP9K+9pg7+z8Ev7T3h9X/h7VKlTG75F +SqcKfWYj8ZoUnkNmOuBtWyQS3ofXD3VCp1p9E2zNk/4S0s9GCmox4TcGdaGr +N83jKYeNav43p/2TVw9EtnEb9IfwfMw6vydU9YDR5JeShp3aoKG9+5gebLgK +ZRHDbKR2sqrjR7ce1EpZn7Xh4vHmszWJ1/pg7GrMWBxno/UKSoSKswEInZbq +Lp5nI93sQJH/EAUCJA0ELwtwEJ1xaV7PhgKzovB+9SoOSlS/9cXdjQLZVnyr +o7H5MooeNQZT4GNK8cOk1RzUm8p1uFVMgQuWYh/KhTjoeqJ7irY6FYwPzHat +WMtBnBtW+k4CWyGmrvLGsAwH3WdpHCxvNQT/21oZ0zoc1B6Etl/OpkHSizS+ +AWcOUj3WZXPUewesCdD4cieGg5hLFYXrzwK4baizv93MQTKjlatk6Lshaoav +bVF0CAVSTT/f0jGH+XN32lc5DiH6+GKzJHcPmCo4c65lDqGC3QGr0t5aQkv0 +IxOfpSGUNef1PD9+H5R2vetKcBtGP3bJvmkIPwCHytvLXrwaRn08fNMDJ6zh +TGZ0gNWOEeSj6Bt7Ud0WSjLCbtx5NIIKTzXX3Yk8CE+3b1EbNOSikFm5hU2n +7GDvqUVHuSoumt9v4dh03B6akOGxTrtRRHON28W2OwQ/U8drrSdHUYdcilcD +1QEGaPFXn1wfQ/L/XqrJ2XgYjrcUherSxlFlv46VjagjHGE589gMjiOl91Mn +g8YdoXvUipJ3awJR78TlZ/YfgXMxwgKdjpMoZeWs/q16J4iWNNRZEpxCFbs2 +90Y+cYYpqurHawFTKHH7/8QXc11gclF9S1ffFHr7KfsKNcoV6ooF4hZ3T6Ny +62QNvwtuEPdq0tO9ZBpNnz7E48M4CqFLHJnTCjNo3kLbc8LsGOisyzH5HDGD +csZ7fgRsOw7zIV1xYzMzyOl+tsdREXdYpIXrprnMotKSA8f5rrpDs8hIL3o1 +i2gKHT+v/3SHpjcTYYL6c0i9/2Tvu1MnwPmyfn3ezTk0KPyXbfL3E/D1REIC +e2oOtUfbeFgepoMpO6f46N55FB+cJvx3Ox2swxXFrqXPo5qnSz899nlAqllf +xInJebTWDa5SqzzAalOftMEWEqmsa3qrWOMBp/zm+kwoJDJotZYVeOoBFv8b +FbSkksje1PXhx+ceoNwYH+NqSKJ4xaDX5155QFJq0oFzNBLJ9+Wtbf7oAbGb +Zhwyd5FI45hMotuCB9CE3bWC7UhEc5/IidzKAN3+2hEjXxL9mzQVYLONAT21 +nzRE/Ui0rnNmp4wRAzZmir7px57Ys/A+x4QB1qFCjCssEn+/eFa07maAltOP +By1/k2jNgrizhB0DNE4HMLaHkWjwpqFg2mkG6Bw8cS/9Gomiq8NOVf7LACJo +sOhhGolOUxJowTkMsHg2cMshnURWD4sFjXIZwH2V8vUPtlAC5+HjAgYE9rWX +22WQKJJ1kFtRxoA7hWl2U1kkCtPW+Kv8BQPmE+U3ieeSyCvhtXfJFwYojddE +9ZeSaN8ajimrnwGuggNewWUk2hjJI0r5xoC+0tHCteUk4rAM8W8PA9qKwNO0 +gkQnbNLGH40xwEirPjm6kkRO/AE+Rb8YMHbp0JxULYksA+T98qWZYKGcmVz0 +kkQv0q7svyXLBKqiJQ01ksi0dUYjWJ4J7zTPK7ZhG2i+7jFTYoITTb1ipIlE +ct2hZp80mWAsV0+RbSHRqHGftJAhE2rpeYb2bSSK4U2vPXkI5+37E0X7gMe/ +WSTR+jATJt7MPSvGvuwazKIeYUL81SpD7W4SBZcd3LDkwgS14T0jUh9xf2JF +3D90JpwuZJ7m9JCI2kJnvPRngsFkSodHH4m64zSF1WOZwGO8z/3tdxIVIlHP +4Tgm3M1ItNUexPnjcw0Ft5nw+9uZhAhsyr6G80YJTKCLpxpQ2fj98XjMWKcy +wfNk0pUoDoksfNN7gvOZkJ9mXKI8QqL1669t21nIhCaWu5ov9lyL722+R0x4 +VcHPrcXO0ELW0aVMUF4ZE+7MJdHvvr66zComBG4cen5tlERlVgo5bc1MED7s ++0/TOIlu/OLlj29hwm3x42dEJkhEz+GecG5lQiH6WngQW2xllcLgWyY8aXVW +7cb2rnaK+fmBCRGytRKfJ0mkrvNPkAabCfWu3QqN0yT61X2uc4TDhHNmqcd5 +ZkjUHsk0KBpmwh3Wxp807PMDW7m0MSa84XfSy8PuTew8ajvLhF5pdmLkLIlu +rRLfE7KCgJe6BgHy8ySqmelzDeQjYEJ9e5Qt9lBfLsuHn4Av98zbL2Gblpmn +0wUJ6LHa2TOCzXEP/m+/OAEHNliO55G4v9UeiT2SBDSrKhztxTbZLqGNpAgI +j45bWIX/U2NF8x2pcgR0lm3Pd8c2qfparKBKQOUTiuTqHyQisvObpdQJWLL7 +9mEzdmzs2a9rNQlgvehrcMTmEJKiK7UJ0O+PVc5Yvi5p6TlmQMDn9v42/Z8k +qvojGc6hEODA4ny3xWaP9N/p34r7d0yo+WEb14XUvzciwGXfkFIh9qB3oVIt +EPDeIE1U5Rfe706hho93E/A1cMDfGJtmtteq2JwAHy536RB2tNy3s9l7CXiU +S0u6jF25sig2bT8BV1JYWfewv0+GPkiyImCLhEtPMbZRo1TXzYME7NigVPcJ +m178bfSqPQF1alP+k9g3k4t4IxxwX0dXa97/SPSNtc8gyImAUBb3gia26DFp +Sz8XAi6d4u8xxDba9/2olxsBieUPXPZg31Q+d+OYO+5fx+o9gV0ptD/DiU6A +2u74jz7LefPST+wZBHQl6/OELucNfH9rRRCwtWqn3ZXlvNZHHAtPAgSrnr+O +xaY/PvcbvAh4MFPme3c5P2P/OhNvAvqnpHZkLufflNlk6IPvD/5GzVvODx7c +tdmPgD8XZR1KsEUYxU7aLAJUUEVKJfZ22/O+6oEE0KWrxJ4u5xsfuLI+iIBt +2WoFL7CjNGVTZIIJuPtsgtWIXSHGLhUPIUDRbz39FfbAf8UtwmEEtCwUhLxe +zh86P8B/Hq+3trSaVuxtHQd+LIUT0Hp/ZsMb7P8Drgo5yg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.6779329053778431, 1.4364749489269455`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6779329053778447}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.6779329053778447}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6779329053778431, 1.4364749489269455`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994388443813424*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"80e0dbd2-1ada-4397-8c2b-020f67804198"] }, Open ]], Cell[CellGroupData[{ @@ -9308,427 +10687,1195 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918507211663303`*^9, - 3.991850725479061*^9}},ExpressionUUID->"f4c3d53a-1214-a145-beb0-\ -494cdae35e56"], + CellChangeTimes->{{3.9918507211663303`*^9, 3.991850725479061*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b9265795-17b8-4e47-bd29-fee31586537e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.508813785349558`*^-262\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943884440089273`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"cd8a28fe-5a32-4aef-b723-a3e3e9c5e31c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"072fb53f-7116-0f41-a298-6891351a3192"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.816319143381828`*^-273\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 119, 42, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943884440199747`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"3e657710-d6d4-4ff7-abe4-38826ed1c7ae"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"7.502986370293668`*^-284\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 119, 43, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994388444029726*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"05b68f00-16a8-4ab8-bc33-d7757aca078d"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 119, 44, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943884440383873`*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"e5117841-ad95-4655-a29e-20c7972218e9"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-\ -87bc9c72594a"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VO8bAHBR2UL2fRZbkj2MMTM9jzV7kbJlKyJFtiiSCKlUaCGlVPKt +yDIzyZYKFZISIkqKFoqSvVK/+/vrns+5533fe+59tkvdtsc1iJeHh2fDEh6e +/19nB1ub1Y4XrVM893CXnp3Nuu5LcvvN+1KAd8ZwMCRSDVD6+Ta5vhw4lZO3 +kx5pBLEbb/Xy9V2FYsO8XNlIKxCfkM1Z6GVDqoj+xsEIN3hX77xnurcR3Gzl +aJSIQLBRG3s72fsSHvhdOMMIi4GFXtrZH70fQGvK6E1VQCo0Wf5X1Hl1CqwO +cYoX+c+C0ruaT9u0F+GI4+DtO82XQGq33y1+Sz5kni/1ezJyDXIMbOqcNwtg +oef4Db6QG/A6T//B5EoR1ElgN1wzKIX8rhKxWHXCq4WUJMxLwUt0ld8vugjW +n79dF7exFN4cVv7Lu10E33Y9Z2vuKYWhcCGm1B0RzI63kaOWlsIXq5G7Jp6i +2CD4KzNE7TbM/8gtT7gihtVno2PoomVwvCjpOa+8OC7PzpbQeVwO9kY7JaRV +xbGM9naZVFc5CDS7bl6lI45v1fSeTL4rh9Rh9QEHc8InxG5lL5TDAZX2T2d2 +iqNwW/gWA5kKCC+U+6tRK45OCkueqtpWgMvFSm0HbwmE+Rul6TcqQPbM8NHT +BZJoualZXcS7EuTW3EmdL5bE9AXp03N+laDQmJ7kUyGJ+lsn294GVgLpx+q9 +q5ok0aNFMq8gvBLUHSP8675IYnCq0Pmx5EpYu3TRZHitFI6k+zTV/FcJG2Jk +RgzbpLBoxbWDq39UwkbhL4O5XVK4ODHsmDldCa5Xa17/eSOFuyfdesfmK2HL +i63PH3+XwnsGu8kXlrDBR/tarZe0NKa8do5ukWDDrhG97BR/aSz76vppsxEb +jrjZrXs5K43aqx+vNYthgwK3Q4F3iQy+8pae3bGPDWWSbnMGwjJorJtZcvIA +G1699K3IJsug8Hur7x2pbFBziVFxsZXBdquyHomzbGh0urz8xXkZPFWsuvQG +lw2LNjMdz5iyyDfudpz/BxuyiuNLFm1k8aHh86M5U8T65TwZOi6yeNLUI15u +jg2Oj4TMTwTJ4jkpAUPpv2zIt6RwHE/KYnpdzL9OYQ6YokPu03ey6H/U08RT +gwPR9Ct+rSly2Gb5ruiyOwfsC0WnHTLlkCL+6727FwdU+A9kdJyVw/JmkQZh +Hw686N5S2XVDDvkqvd12bOOAbsQKvsEOORwcPcH7eTcHvhTHFf9UkMfiqGC2 +TDIH7ot8NNurJo8SY378Rw9z4FyM6/M5HXmkSizwzKVxwNpCZ/4PymP6f2XD +j45x4OrbD3b8wfLY3vspSu8MB7ZKOY8rcuRxR8p1RcNiDqxNqEu+VC+PCZGP +J3xvcEDog6YM9bE89qk+DDtyiwM15Xyg8VoejQVsI5+WcUDGoSZL/588jheL +FpDvEs+frGZk7aCAqyvEeBYec8Dq+6/48GEFjCnX5I8Z5sB+2zNaD78pYMHe +XSZiHzlQdkWnX3JWAS+KTjoXf+KAnJs/vUZAEbeu9F3XMsqBb9WP5vh0FVFQ +jbF64DsHTqdkxZzfp4iOF42fsH5zoGVgtdq3ZEX0GvYayP3DgT9GTV3rjiui +TcDD4fFFDuz4PGM4UqCIrnbQfYKHC2aO3pO6TYo439lkW7CMCx+kNcKbRZRw +4aWd1m9RLsjuua8sK6uEMUfn3kit5IJji8eznRQlFCzRy9IS50JV/HFtsbVK +aPtf4m87SS4ce/djzNNDCYMDj//xkOXCfdNj+aUBSpiffbDNVY4L09mq9v9C +ldDF7fxlW3ku+FptuVmUqIQfc0u2aSpywfBmXfD3q0r43tMlsJrEhWDezbIW +pUqYO5B+OIfMhYveE4/P3FHCqqznFSEULiwXpWqYtSjhqa2r6IIqXOiPSh9J +HVfCNdMrFBTVuSDWTj7TO6uESgo/GnsIW6nXWGrxKGOTIDk5U4MLZb1frz6X +UMbbspLmE6u4kMx0CVAwVcZgr/2jKVpcsPW99JNmoYyPNpj7rVnDBdFDXw9v +dlRGPbtT5s8JX2xKK87yV8aTGv9tFNThwvaPL2lloco4MTOadJmwFj+l9WmM +Mg4WFFEMdLlQbV/7dflRZVzRkFpno8eFpN38iWqnlVGiTa+6jbDNSTdRiwJl +HOnyWWOvz4Xuzgn9xEpl9LLyi2cYcOHCFKMxv04ZfR82e9wmvE366KbqR8p4 +akcnW8GQCz88VGOnXivjQx/pd58J342P4BcfUcarKl8569dy4eDFe3m6E8rI +N1UkeI3wiiH3up28JHwZLsFyNOJC15LrjkdWkHBtU4RyPuF81Z9vi2RImBkl +kDpMeFVwJs+QFglvd9qNhhhzYSLjdfaiEQkf0W+NFRHm3tJQVQQSLtlVGfeG +cEJ7NNfUjoT5BxqyxUy4YDHxwHrLJhKeW2Joto6w4ErR3mgfEubyh0eFEH5h +4B2SHUxY+hXjJOHcTTcWyiJJWK/1PLecsO/emWPtCSRcfu/+kXbC6rkWSmNp +JNSsFhP5SPhb9anb/FkktDiguXqBMKf/zTr1fBJefhPzVoDGhfg/q19YFJHw +IClgjRRhc1JcgH8ZCV/NeUkpEhbA5p+J1SQUPNl5XplwR4B46oVGEtbEGN/7 +//2zh32la9pJGFU6nyRNeOv1kuJXr4j9rpwcFiKs8mSeNj1EwtNau0d/E+eP +frFuFf9KwsIj/Ke/EK4QOu2lN0PCA/59718QjtMe+ur4j4RlTe69XMLrnHUS +QwXJqKXOs/cM4WUR8aIZkmRc5uNUv4dwe/aTy9eVycgqri+zIXyaI2XQtIqM +QQXtTvKEvXoCGocMyBgJi/mfifdPnSvb9JdB3P/yPLeS8Be5PyOKNmSUcn1i +HUe43Mwulr6RjF05wcWmhGO3nuN39yIjKJnUzRDfm69QXysnnIwiWfH82wm3 +PUysK99HRn8FXgtJwlnDbY7PUsh4U2vA5D4RT6RVQXsEcsmITzmbhQh/tGXz +aFwho/7V5yk3iXgsDf2XbVlCxo6jeyOsCJuVnecevE/G0RPFp8OIeLbq7Vic +aCHjtY06x/kIO/MsXe/3koxu3U49Z4l82O4a/ho+kpHBm76j/P/5kkBNOrSM +gt8u6F6pIvLtqVj9NVMhCoat7nPRI7yxaEvLD1EKygdn+BVpc8H72XHxADkK ++hdY5x4m8jeCPHvNfA0F+0IDC2RWc2GGk9WyoEfBKvNw7yhNIl5s14xXGlFw +NlUzuY2oD2mR/iYq6ygY3S0lGEHUj/ymthZeFwoe2fpMP0uVC83Bl8ebYin4 +7nWNhIYyF+z+0CUOJFDw7+7b322ViHjK6jYxOkRBkd5N9iFEvXtdI3io6CgF +abkeBy8S9XBCOEYi7SIFj+97JjAgzQW5CluaTSMFEzelf6oU4UKB1bD338cU +XCyTtitYQcTb68RDVU8paMNDwzRhLujwclo1eiiYsGzpT3tBIt/clLfyf6Gg +WGlT5u2lXNg9P3moRYSKXaMOoy9+ccAscofMJwkqhvSXeocucEBgrL+ET46K +vwNCPv6b48D1gaZX61SoGBd+wYY8w4HBhrPad0yomPT03V49ov9sSKP3XfGj +ovCOPLPcDxwg/b0ddj+Qijo+w0JTQ0S/ilXhe7uTih4fSsUd3nEgI0RYVy6G +iolQ3PZ9gAMPHN4ePplBxdZzL6grejhgKJGsl1BJxas3JtRyiH7Jc3ymOa+K +iss3pzqymznQwRfqVVVHxf7WkraORg7smnFNm3xERSHvrpd/GjhQ1Kc2ENxP +xWtDtxx0iP4rc7kl3Y1PBbvfbC55T/TzhTUrB3U2q2BZtNetYmI+mC1QSF7r +pYI0Lb1Uf2J+mBZTV6P7qWA9mS0jm8SBiSl6qNVOFcw/8iIsPp4DH+q2z3ol +quCH6EklhUgOtDncFc24roLUv01W94l5JX+XL3yYUUGlaz/5y404wCwpLTx3 +ThU5QzNBea/ZMEApuWx9QRVz6Mxfza/YEH/u5qXpy6qoWPJh1fcuNtxNLr7o +elMVo/Yab2F2sMHQozBPtF4Vff9Z69U2smH1sjNZ6e9VMUXQc4t1CRtk/BIO +xWqrYdCC2MXr8WyYlLD339KohgqCa/O/E/PjSKb/lih+DawVdwpcJlcJdt/j +7D6arMJSfx8vLakK+LZdIJqbpIkPJCKEPj+7TfxfyPIeaVyNHJeRyowdJSDx +TONkxXctXON2aosw5SYoZZRvNDHRRqGzx2r6S4ohbw19pWSwDh5bpb8mMrwI +2hTMjaeydfFzsuM+n41XwUypMUvvlR4ajA7zV1MLQZTvakxAij7ONIz9+Rp5 +EUjJZKanhgEOZTcfZhbkgaD61irXJwYYml3h8EL3LOiy5MvjfAyxH57pHbPN +gahBiSZ7nrU4vmrfS/+Jk/B9KnOzXd5a9P/ZKxtidQzW6z3Ot9MxQq2QpIIS +s3RomGL8nuswwv92NvM9CEmBcG3D/s4gYyx3xLzAWweBNRHY7SlogkZjWjzX +ZveBtZqck8hVE2y/s0T7XUwMcMcfUQOLTJDD2mtXHBgDanejZ2uLTbDiv4nV ++9xiYKn988shJSaY2epOZhrFQOOe9J9NXBN01/ziYDUdDevqpnPjn5igTK23 +jktsNJi4dn74/M0EPyk9N6enRIHmoWP7Gmk0vMi49kyjOgLqGdeXOZrRUNJB +ycj5ZgRsnLuf08OkYVBtx+ND+RGwL3ym9Is5DTP8brjzJ0ZAy1b/96KONFzH +8yf2vEUEhNBN7L39aeieXOubd3kP3Pz5XnE6g4YD6U5DSSNhoBVEv6/eT8NN +Fk1REqWhcErF+dfhNzRs8OncRzsbCtPvthl/GKThhiBJp7CDodDglVlyaZiG +T868pwu7hILrxne5suM0rKIJyIvN7YT9jLQIQR5TtDv16ryuzU5oEe+kjqub +Ip+6xOVjP4IhqCEklRtpigb6p4wqooNgImwszjrGFMcav5O1/IJgn/LuXa9i +TdHP64L4HfsgOHZgj+t8gimm+g33L1KDoMIslsJMN0V3ev5Tz85A+FN1uL4p +nzhvo1awwdpAyCm/NP2yyRQPHrySIMG3He4XdgdOStPxWuxEokWnPww5Uv1i +5ej4s/Je0cwDf+BZCPP8rUBH0YH1V6oq/MHChd95GYWOR9ucZgKy/OHxEjOa +vBYdW1zc/27d6A/t2y4Lmq+j4/1tR/Oqr/tBv1poWdYOOq52vTh1oMkHpm/8 +m9O7S0f3IHavpr0XfNpiU3i0ho6pm9QTSgy8oG/pCdvhOjqunwi2tpD3gjp/ +hfPnHtDx304n2dIvnpAiZ2y22ErH8kNX9fdkeMLKjNADbW/oWNTotOG/px6g +HdzDE8Rrhhlu45bJ/u6wXb1EMN/JDM8shFYteegG8Y98QzU2mqFaV9fs/hI3 +yAqSeMp2NUOtwkLZ5efcoP76/syn7mZo6pxe77nLDaQ0bMUWA8xQYNF15JuM +GzzW+CjlH2uGjh4RG+5EbgItTTJF47IZTt6dPhBk7AqTWqdN2D/M0Fgxe6Xu +yAboa0drySkzDNzldym4eQM8CJ/YFDNjhpt6bmTeK9oAJ9l2kSa/zFDK/M/a +hqANoGXGU1rLx0DyznMuK0edYZtdGLVJhoFreM+If5x2gu7g9Su6mQxcOhWQ +dI/iCNVFv9/PZDBQbv2npJpmWzCxjJmzP87Az24p6Z9LbOHO+28rCk8wMF5q +ze81p22BTRqk2ecw0Job/2UuwBZK8x6cuHSBgXRXz7HzPLZQmJlGX1/GwBUd +t0PmzNfD0Rix7LwuBp6Ht2FXuq1BQDKjeLyHgezotGUHGqwhvZKn3qKPgZpU +34nQG9aQOjH56dsbBorgk6i0A9ZwMKSbaf6JgftOt6SUqFtD1NbzX0bnGZjg +1910O8EKvKxUkUFiovwe/aXKJpaw2C0g2kRh4tpz6QtVFEsoDJoYsFdlYp/F +9PEdwpbwKb0mzkuTie2zDxnL31tAVOuG8v2GTMyX7eFYn7CAY84HSNU2THxw +uz2XO2oOtR49f4z2MPGI0t2DnZUIPqO1bfWRxH5xY0q/LyHwxBfmWcUw8Vzg +KjHTTASbC7uM3PYz0apD5NbXHQgv3y7ZHX2YiYfJmd00ZYSxbboDlblMrJuJ +/nNTAUAx7EiN7gMmvus6ddZrlgkn/+0wPt7IxEAe2sPYXibw5thUfm5mYmpk +zmxFNRPGqpbdLGxlYpeLjWxSAhNqeVLzJLqYaDbcvC2JlwleZw7FzX5kYuv0 +t4kFaQbk1e03bhBm4b+RnJ+arnRY4exZqSDKwhBL4bs9JnQ4NGSqE7eShRda +0sILFOkQsmxeTV+ahYoZ6z0SP5oCbUOs1FUSC+dOaR85EG8Krz5ETaUZsHD5 +E54VgTdpIC20u9LJnYWfnTOmTBVMoMgyMf6HJwvdL1q9sf9nDIaJJy1Pb2Xh +m1ulXfEjxuD8o6KnL4BYv04hzqjcGNJfzSxs383CiEQ5V2EbY5i/mmQRn8zC +Ue9Nd3X2G0E/43RXcQkLneLSjBOnDSFkb9FFuzIWzqc2TMi9NYTZsjtB3ypY +qK6xROv5I0OQUOmbM6hi4WK9bd2xXENwEFBWuveAhR73YnwZTEOo7y4O7Oph +YVfy/KVdxwzAXrRaJ7aPhUNFZZLXYgygb33rrNwAC19+8wue8jWA6dqvGb5D +LMzavcxmcK0B6FzRvz06xkJxhz3K/YP6UN9vHps5zkLb8L2Pe1r1wV5qE+j9 +YGHlX/e0Ua4+7DiytzNmhoWvWpveexzXh+kH6fmy8ywUEVrhzI3Vh5Rfudtr +f7Fw0/WysFXb9GGl0U1tn0UWUgzMNdlO+nAprHbm3z8Wvm4ND3Kj68P/AJzv +Q/c= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHBR2UL2fRZbkj2MMTM9jzV7kbJlKyJFtiiSCKlUaCGlVPKt +yDIzyZYKFZISIkqKFoqSvVK/+/vrns+5533fe+59tkvdtsc1iJeHh2fDEh6e +/19nB1ub1Y4XrVM893CXnp3Nuu5LcvvN+1KAd8ZwMCRSDVD6+Ta5vhw4lZO3 +kx5pBLEbb/Xy9V2FYsO8XNlIKxCfkM1Z6GVDqoj+xsEIN3hX77xnurcR3Gzl +aJSIQLBRG3s72fsSHvhdOMMIi4GFXtrZH70fQGvK6E1VQCo0Wf5X1Hl1CqwO +cYoX+c+C0ruaT9u0F+GI4+DtO82XQGq33y1+Sz5kni/1ezJyDXIMbOqcNwtg +oef4Db6QG/A6T//B5EoR1ElgN1wzKIX8rhKxWHXCq4WUJMxLwUt0ld8vugjW +n79dF7exFN4cVv7Lu10E33Y9Z2vuKYWhcCGm1B0RzI63kaOWlsIXq5G7Jp6i +2CD4KzNE7TbM/8gtT7gihtVno2PoomVwvCjpOa+8OC7PzpbQeVwO9kY7JaRV +xbGM9naZVFc5CDS7bl6lI45v1fSeTL4rh9Rh9QEHc8InxG5lL5TDAZX2T2d2 +iqNwW/gWA5kKCC+U+6tRK45OCkueqtpWgMvFSm0HbwmE+Rul6TcqQPbM8NHT +BZJoualZXcS7EuTW3EmdL5bE9AXp03N+laDQmJ7kUyGJ+lsn294GVgLpx+q9 +q5ok0aNFMq8gvBLUHSP8675IYnCq0Pmx5EpYu3TRZHitFI6k+zTV/FcJG2Jk +RgzbpLBoxbWDq39UwkbhL4O5XVK4ODHsmDldCa5Xa17/eSOFuyfdesfmK2HL +i63PH3+XwnsGu8kXlrDBR/tarZe0NKa8do5ukWDDrhG97BR/aSz76vppsxEb +jrjZrXs5K43aqx+vNYthgwK3Q4F3iQy+8pae3bGPDWWSbnMGwjJorJtZcvIA +G1699K3IJsug8Hur7x2pbFBziVFxsZXBdquyHomzbGh0urz8xXkZPFWsuvQG +lw2LNjMdz5iyyDfudpz/BxuyiuNLFm1k8aHh86M5U8T65TwZOi6yeNLUI15u +jg2Oj4TMTwTJ4jkpAUPpv2zIt6RwHE/KYnpdzL9OYQ6YokPu03ey6H/U08RT +gwPR9Ct+rSly2Gb5ruiyOwfsC0WnHTLlkCL+6727FwdU+A9kdJyVw/JmkQZh +Hw686N5S2XVDDvkqvd12bOOAbsQKvsEOORwcPcH7eTcHvhTHFf9UkMfiqGC2 +TDIH7ot8NNurJo8SY378Rw9z4FyM6/M5HXmkSizwzKVxwNpCZ/4PymP6f2XD +j45x4OrbD3b8wfLY3vspSu8MB7ZKOY8rcuRxR8p1RcNiDqxNqEu+VC+PCZGP +J3xvcEDog6YM9bE89qk+DDtyiwM15Xyg8VoejQVsI5+WcUDGoSZL/588jheL +FpDvEs+frGZk7aCAqyvEeBYec8Dq+6/48GEFjCnX5I8Z5sB+2zNaD78pYMHe +XSZiHzlQdkWnX3JWAS+KTjoXf+KAnJs/vUZAEbeu9F3XMsqBb9WP5vh0FVFQ +jbF64DsHTqdkxZzfp4iOF42fsH5zoGVgtdq3ZEX0GvYayP3DgT9GTV3rjiui +TcDD4fFFDuz4PGM4UqCIrnbQfYKHC2aO3pO6TYo439lkW7CMCx+kNcKbRZRw +4aWd1m9RLsjuua8sK6uEMUfn3kit5IJji8eznRQlFCzRy9IS50JV/HFtsbVK +aPtf4m87SS4ce/djzNNDCYMDj//xkOXCfdNj+aUBSpiffbDNVY4L09mq9v9C +ldDF7fxlW3ku+FptuVmUqIQfc0u2aSpywfBmXfD3q0r43tMlsJrEhWDezbIW +pUqYO5B+OIfMhYveE4/P3FHCqqznFSEULiwXpWqYtSjhqa2r6IIqXOiPSh9J +HVfCNdMrFBTVuSDWTj7TO6uESgo/GnsIW6nXWGrxKGOTIDk5U4MLZb1frz6X +UMbbspLmE6u4kMx0CVAwVcZgr/2jKVpcsPW99JNmoYyPNpj7rVnDBdFDXw9v +dlRGPbtT5s8JX2xKK87yV8aTGv9tFNThwvaPL2lloco4MTOadJmwFj+l9WmM +Mg4WFFEMdLlQbV/7dflRZVzRkFpno8eFpN38iWqnlVGiTa+6jbDNSTdRiwJl +HOnyWWOvz4Xuzgn9xEpl9LLyi2cYcOHCFKMxv04ZfR82e9wmvE366KbqR8p4 +akcnW8GQCz88VGOnXivjQx/pd58J342P4BcfUcarKl8569dy4eDFe3m6E8rI +N1UkeI3wiiH3up28JHwZLsFyNOJC15LrjkdWkHBtU4RyPuF81Z9vi2RImBkl +kDpMeFVwJs+QFglvd9qNhhhzYSLjdfaiEQkf0W+NFRHm3tJQVQQSLtlVGfeG +cEJ7NNfUjoT5BxqyxUy4YDHxwHrLJhKeW2Joto6w4ErR3mgfEubyh0eFEH5h +4B2SHUxY+hXjJOHcTTcWyiJJWK/1PLecsO/emWPtCSRcfu/+kXbC6rkWSmNp +JNSsFhP5SPhb9anb/FkktDiguXqBMKf/zTr1fBJefhPzVoDGhfg/q19YFJHw +IClgjRRhc1JcgH8ZCV/NeUkpEhbA5p+J1SQUPNl5XplwR4B46oVGEtbEGN/7 +//2zh32la9pJGFU6nyRNeOv1kuJXr4j9rpwcFiKs8mSeNj1EwtNau0d/E+eP +frFuFf9KwsIj/Ke/EK4QOu2lN0PCA/59718QjtMe+ur4j4RlTe69XMLrnHUS +QwXJqKXOs/cM4WUR8aIZkmRc5uNUv4dwe/aTy9eVycgqri+zIXyaI2XQtIqM +QQXtTvKEvXoCGocMyBgJi/mfifdPnSvb9JdB3P/yPLeS8Be5PyOKNmSUcn1i +HUe43Mwulr6RjF05wcWmhGO3nuN39yIjKJnUzRDfm69QXysnnIwiWfH82wm3 +PUysK99HRn8FXgtJwlnDbY7PUsh4U2vA5D4RT6RVQXsEcsmITzmbhQh/tGXz +aFwho/7V5yk3iXgsDf2XbVlCxo6jeyOsCJuVnecevE/G0RPFp8OIeLbq7Vic +aCHjtY06x/kIO/MsXe/3koxu3U49Z4l82O4a/ho+kpHBm76j/P/5kkBNOrSM +gt8u6F6pIvLtqVj9NVMhCoat7nPRI7yxaEvLD1EKygdn+BVpc8H72XHxADkK ++hdY5x4m8jeCPHvNfA0F+0IDC2RWc2GGk9WyoEfBKvNw7yhNIl5s14xXGlFw +NlUzuY2oD2mR/iYq6ygY3S0lGEHUj/ymthZeFwoe2fpMP0uVC83Bl8ebYin4 +7nWNhIYyF+z+0CUOJFDw7+7b322ViHjK6jYxOkRBkd5N9iFEvXtdI3io6CgF +abkeBy8S9XBCOEYi7SIFj+97JjAgzQW5CluaTSMFEzelf6oU4UKB1bD338cU +XCyTtitYQcTb68RDVU8paMNDwzRhLujwclo1eiiYsGzpT3tBIt/clLfyf6Gg +WGlT5u2lXNg9P3moRYSKXaMOoy9+ccAscofMJwkqhvSXeocucEBgrL+ET46K +vwNCPv6b48D1gaZX61SoGBd+wYY8w4HBhrPad0yomPT03V49ov9sSKP3XfGj +ovCOPLPcDxwg/b0ddj+Qijo+w0JTQ0S/ilXhe7uTih4fSsUd3nEgI0RYVy6G +iolQ3PZ9gAMPHN4ePplBxdZzL6grejhgKJGsl1BJxas3JtRyiH7Jc3ymOa+K +iss3pzqymznQwRfqVVVHxf7WkraORg7smnFNm3xERSHvrpd/GjhQ1Kc2ENxP +xWtDtxx0iP4rc7kl3Y1PBbvfbC55T/TzhTUrB3U2q2BZtNetYmI+mC1QSF7r +pYI0Lb1Uf2J+mBZTV6P7qWA9mS0jm8SBiSl6qNVOFcw/8iIsPp4DH+q2z3ol +quCH6EklhUgOtDncFc24roLUv01W94l5JX+XL3yYUUGlaz/5y404wCwpLTx3 +ThU5QzNBea/ZMEApuWx9QRVz6Mxfza/YEH/u5qXpy6qoWPJh1fcuNtxNLr7o +elMVo/Yab2F2sMHQozBPtF4Vff9Z69U2smH1sjNZ6e9VMUXQc4t1CRtk/BIO +xWqrYdCC2MXr8WyYlLD339KohgqCa/O/E/PjSKb/lih+DawVdwpcJlcJdt/j +7D6arMJSfx8vLakK+LZdIJqbpIkPJCKEPj+7TfxfyPIeaVyNHJeRyowdJSDx +TONkxXctXON2aosw5SYoZZRvNDHRRqGzx2r6S4ohbw19pWSwDh5bpb8mMrwI +2hTMjaeydfFzsuM+n41XwUypMUvvlR4ajA7zV1MLQZTvakxAij7ONIz9+Rp5 +EUjJZKanhgEOZTcfZhbkgaD61irXJwYYml3h8EL3LOiy5MvjfAyxH57pHbPN +gahBiSZ7nrU4vmrfS/+Jk/B9KnOzXd5a9P/ZKxtidQzW6z3Ot9MxQq2QpIIS +s3RomGL8nuswwv92NvM9CEmBcG3D/s4gYyx3xLzAWweBNRHY7SlogkZjWjzX +ZveBtZqck8hVE2y/s0T7XUwMcMcfUQOLTJDD2mtXHBgDanejZ2uLTbDiv4nV ++9xiYKn988shJSaY2epOZhrFQOOe9J9NXBN01/ziYDUdDevqpnPjn5igTK23 +jktsNJi4dn74/M0EPyk9N6enRIHmoWP7Gmk0vMi49kyjOgLqGdeXOZrRUNJB +ycj5ZgRsnLuf08OkYVBtx+ND+RGwL3ym9Is5DTP8brjzJ0ZAy1b/96KONFzH +8yf2vEUEhNBN7L39aeieXOubd3kP3Pz5XnE6g4YD6U5DSSNhoBVEv6/eT8NN +Fk1REqWhcErF+dfhNzRs8OncRzsbCtPvthl/GKThhiBJp7CDodDglVlyaZiG +T868pwu7hILrxne5suM0rKIJyIvN7YT9jLQIQR5TtDv16ryuzU5oEe+kjqub +Ip+6xOVjP4IhqCEklRtpigb6p4wqooNgImwszjrGFMcav5O1/IJgn/LuXa9i +TdHP64L4HfsgOHZgj+t8gimm+g33L1KDoMIslsJMN0V3ev5Tz85A+FN1uL4p +nzhvo1awwdpAyCm/NP2yyRQPHrySIMG3He4XdgdOStPxWuxEokWnPww5Uv1i +5ej4s/Je0cwDf+BZCPP8rUBH0YH1V6oq/MHChd95GYWOR9ucZgKy/OHxEjOa +vBYdW1zc/27d6A/t2y4Lmq+j4/1tR/Oqr/tBv1poWdYOOq52vTh1oMkHpm/8 +m9O7S0f3IHavpr0XfNpiU3i0ho6pm9QTSgy8oG/pCdvhOjqunwi2tpD3gjp/ +hfPnHtDx304n2dIvnpAiZ2y22ErH8kNX9fdkeMLKjNADbW/oWNTotOG/px6g +HdzDE8Rrhhlu45bJ/u6wXb1EMN/JDM8shFYteegG8Y98QzU2mqFaV9fs/hI3 +yAqSeMp2NUOtwkLZ5efcoP76/syn7mZo6pxe77nLDaQ0bMUWA8xQYNF15JuM +GzzW+CjlH2uGjh4RG+5EbgItTTJF47IZTt6dPhBk7AqTWqdN2D/M0Fgxe6Xu +yAboa0drySkzDNzldym4eQM8CJ/YFDNjhpt6bmTeK9oAJ9l2kSa/zFDK/M/a +hqANoGXGU1rLx0DyznMuK0edYZtdGLVJhoFreM+If5x2gu7g9Su6mQxcOhWQ +dI/iCNVFv9/PZDBQbv2npJpmWzCxjJmzP87Az24p6Z9LbOHO+28rCk8wMF5q +ze81p22BTRqk2ecw0Job/2UuwBZK8x6cuHSBgXRXz7HzPLZQmJlGX1/GwBUd +t0PmzNfD0Rix7LwuBp6Ht2FXuq1BQDKjeLyHgezotGUHGqwhvZKn3qKPgZpU +34nQG9aQOjH56dsbBorgk6i0A9ZwMKSbaf6JgftOt6SUqFtD1NbzX0bnGZjg +1910O8EKvKxUkUFiovwe/aXKJpaw2C0g2kRh4tpz6QtVFEsoDJoYsFdlYp/F +9PEdwpbwKb0mzkuTie2zDxnL31tAVOuG8v2GTMyX7eFYn7CAY84HSNU2THxw +uz2XO2oOtR49f4z2MPGI0t2DnZUIPqO1bfWRxH5xY0q/LyHwxBfmWcUw8Vzg +KjHTTASbC7uM3PYz0apD5NbXHQgv3y7ZHX2YiYfJmd00ZYSxbboDlblMrJuJ +/nNTAUAx7EiN7gMmvus6ddZrlgkn/+0wPt7IxEAe2sPYXibw5thUfm5mYmpk +zmxFNRPGqpbdLGxlYpeLjWxSAhNqeVLzJLqYaDbcvC2JlwleZw7FzX5kYuv0 +t4kFaQbk1e03bhBm4b+RnJ+arnRY4exZqSDKwhBL4bs9JnQ4NGSqE7eShRda +0sILFOkQsmxeTV+ahYoZ6z0SP5oCbUOs1FUSC+dOaR85EG8Krz5ETaUZsHD5 +E54VgTdpIC20u9LJnYWfnTOmTBVMoMgyMf6HJwvdL1q9sf9nDIaJJy1Pb2Xh +m1ulXfEjxuD8o6KnL4BYv04hzqjcGNJfzSxs383CiEQ5V2EbY5i/mmQRn8zC +Ue9Nd3X2G0E/43RXcQkLneLSjBOnDSFkb9FFuzIWzqc2TMi9NYTZsjtB3ypY +qK6xROv5I0OQUOmbM6hi4WK9bd2xXENwEFBWuveAhR73YnwZTEOo7y4O7Oph +YVfy/KVdxwzAXrRaJ7aPhUNFZZLXYgygb33rrNwAC19+8wue8jWA6dqvGb5D +LMzavcxmcK0B6FzRvz06xkJxhz3K/YP6UN9vHps5zkLb8L2Pe1r1wV5qE+j9 +YGHlX/e0Ua4+7DiytzNmhoWvWpveexzXh+kH6fmy8ywUEVrhzI3Vh5Rfudtr +f7Fw0/WysFXb9GGl0U1tn0UWUgzMNdlO+nAprHbm3z8Wvm4ND3Kj68P/AJzv +Q/c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07896599774681347}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07896599774681347}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHBR2UL2fRZbkj2MMTM9jzV7kbJlKyJFtiiSCKlUaCGlVPKt +yDIzyZYKFZISIkqKFoqSvVK/+/vrns+5533fe+59tkvdtsc1iJeHh2fDEh6e +/19nB1ub1Y4XrVM893CXnp3Nuu5LcvvN+1KAd8ZwMCRSDVD6+Ta5vhw4lZO3 +kx5pBLEbb/Xy9V2FYsO8XNlIKxCfkM1Z6GVDqoj+xsEIN3hX77xnurcR3Gzl +aJSIQLBRG3s72fsSHvhdOMMIi4GFXtrZH70fQGvK6E1VQCo0Wf5X1Hl1CqwO +cYoX+c+C0ruaT9u0F+GI4+DtO82XQGq33y1+Sz5kni/1ezJyDXIMbOqcNwtg +oef4Db6QG/A6T//B5EoR1ElgN1wzKIX8rhKxWHXCq4WUJMxLwUt0ld8vugjW +n79dF7exFN4cVv7Lu10E33Y9Z2vuKYWhcCGm1B0RzI63kaOWlsIXq5G7Jp6i +2CD4KzNE7TbM/8gtT7gihtVno2PoomVwvCjpOa+8OC7PzpbQeVwO9kY7JaRV +xbGM9naZVFc5CDS7bl6lI45v1fSeTL4rh9Rh9QEHc8InxG5lL5TDAZX2T2d2 +iqNwW/gWA5kKCC+U+6tRK45OCkueqtpWgMvFSm0HbwmE+Rul6TcqQPbM8NHT +BZJoualZXcS7EuTW3EmdL5bE9AXp03N+laDQmJ7kUyGJ+lsn294GVgLpx+q9 +q5ok0aNFMq8gvBLUHSP8675IYnCq0Pmx5EpYu3TRZHitFI6k+zTV/FcJG2Jk +RgzbpLBoxbWDq39UwkbhL4O5XVK4ODHsmDldCa5Xa17/eSOFuyfdesfmK2HL +i63PH3+XwnsGu8kXlrDBR/tarZe0NKa8do5ukWDDrhG97BR/aSz76vppsxEb +jrjZrXs5K43aqx+vNYthgwK3Q4F3iQy+8pae3bGPDWWSbnMGwjJorJtZcvIA +G1699K3IJsug8Hur7x2pbFBziVFxsZXBdquyHomzbGh0urz8xXkZPFWsuvQG +lw2LNjMdz5iyyDfudpz/BxuyiuNLFm1k8aHh86M5U8T65TwZOi6yeNLUI15u +jg2Oj4TMTwTJ4jkpAUPpv2zIt6RwHE/KYnpdzL9OYQ6YokPu03ey6H/U08RT +gwPR9Ct+rSly2Gb5ruiyOwfsC0WnHTLlkCL+6727FwdU+A9kdJyVw/JmkQZh +Hw686N5S2XVDDvkqvd12bOOAbsQKvsEOORwcPcH7eTcHvhTHFf9UkMfiqGC2 +TDIH7ot8NNurJo8SY378Rw9z4FyM6/M5HXmkSizwzKVxwNpCZ/4PymP6f2XD +j45x4OrbD3b8wfLY3vspSu8MB7ZKOY8rcuRxR8p1RcNiDqxNqEu+VC+PCZGP +J3xvcEDog6YM9bE89qk+DDtyiwM15Xyg8VoejQVsI5+WcUDGoSZL/588jheL +FpDvEs+frGZk7aCAqyvEeBYec8Dq+6/48GEFjCnX5I8Z5sB+2zNaD78pYMHe +XSZiHzlQdkWnX3JWAS+KTjoXf+KAnJs/vUZAEbeu9F3XMsqBb9WP5vh0FVFQ +jbF64DsHTqdkxZzfp4iOF42fsH5zoGVgtdq3ZEX0GvYayP3DgT9GTV3rjiui +TcDD4fFFDuz4PGM4UqCIrnbQfYKHC2aO3pO6TYo439lkW7CMCx+kNcKbRZRw +4aWd1m9RLsjuua8sK6uEMUfn3kit5IJji8eznRQlFCzRy9IS50JV/HFtsbVK +aPtf4m87SS4ce/djzNNDCYMDj//xkOXCfdNj+aUBSpiffbDNVY4L09mq9v9C +ldDF7fxlW3ku+FptuVmUqIQfc0u2aSpywfBmXfD3q0r43tMlsJrEhWDezbIW +pUqYO5B+OIfMhYveE4/P3FHCqqznFSEULiwXpWqYtSjhqa2r6IIqXOiPSh9J +HVfCNdMrFBTVuSDWTj7TO6uESgo/GnsIW6nXWGrxKGOTIDk5U4MLZb1frz6X +UMbbspLmE6u4kMx0CVAwVcZgr/2jKVpcsPW99JNmoYyPNpj7rVnDBdFDXw9v +dlRGPbtT5s8JX2xKK87yV8aTGv9tFNThwvaPL2lloco4MTOadJmwFj+l9WmM +Mg4WFFEMdLlQbV/7dflRZVzRkFpno8eFpN38iWqnlVGiTa+6jbDNSTdRiwJl +HOnyWWOvz4Xuzgn9xEpl9LLyi2cYcOHCFKMxv04ZfR82e9wmvE366KbqR8p4 +akcnW8GQCz88VGOnXivjQx/pd58J342P4BcfUcarKl8569dy4eDFe3m6E8rI +N1UkeI3wiiH3up28JHwZLsFyNOJC15LrjkdWkHBtU4RyPuF81Z9vi2RImBkl +kDpMeFVwJs+QFglvd9qNhhhzYSLjdfaiEQkf0W+NFRHm3tJQVQQSLtlVGfeG +cEJ7NNfUjoT5BxqyxUy4YDHxwHrLJhKeW2Joto6w4ErR3mgfEubyh0eFEH5h +4B2SHUxY+hXjJOHcTTcWyiJJWK/1PLecsO/emWPtCSRcfu/+kXbC6rkWSmNp +JNSsFhP5SPhb9anb/FkktDiguXqBMKf/zTr1fBJefhPzVoDGhfg/q19YFJHw +IClgjRRhc1JcgH8ZCV/NeUkpEhbA5p+J1SQUPNl5XplwR4B46oVGEtbEGN/7 +//2zh32la9pJGFU6nyRNeOv1kuJXr4j9rpwcFiKs8mSeNj1EwtNau0d/E+eP +frFuFf9KwsIj/Ke/EK4QOu2lN0PCA/59718QjtMe+ur4j4RlTe69XMLrnHUS +QwXJqKXOs/cM4WUR8aIZkmRc5uNUv4dwe/aTy9eVycgqri+zIXyaI2XQtIqM +QQXtTvKEvXoCGocMyBgJi/mfifdPnSvb9JdB3P/yPLeS8Be5PyOKNmSUcn1i +HUe43Mwulr6RjF05wcWmhGO3nuN39yIjKJnUzRDfm69QXysnnIwiWfH82wm3 +PUysK99HRn8FXgtJwlnDbY7PUsh4U2vA5D4RT6RVQXsEcsmITzmbhQh/tGXz +aFwho/7V5yk3iXgsDf2XbVlCxo6jeyOsCJuVnecevE/G0RPFp8OIeLbq7Vic +aCHjtY06x/kIO/MsXe/3koxu3U49Z4l82O4a/ho+kpHBm76j/P/5kkBNOrSM +gt8u6F6pIvLtqVj9NVMhCoat7nPRI7yxaEvLD1EKygdn+BVpc8H72XHxADkK ++hdY5x4m8jeCPHvNfA0F+0IDC2RWc2GGk9WyoEfBKvNw7yhNIl5s14xXGlFw +NlUzuY2oD2mR/iYq6ygY3S0lGEHUj/ymthZeFwoe2fpMP0uVC83Bl8ebYin4 +7nWNhIYyF+z+0CUOJFDw7+7b322ViHjK6jYxOkRBkd5N9iFEvXtdI3io6CgF +abkeBy8S9XBCOEYi7SIFj+97JjAgzQW5CluaTSMFEzelf6oU4UKB1bD338cU +XCyTtitYQcTb68RDVU8paMNDwzRhLujwclo1eiiYsGzpT3tBIt/clLfyf6Gg +WGlT5u2lXNg9P3moRYSKXaMOoy9+ccAscofMJwkqhvSXeocucEBgrL+ET46K +vwNCPv6b48D1gaZX61SoGBd+wYY8w4HBhrPad0yomPT03V49ov9sSKP3XfGj +ovCOPLPcDxwg/b0ddj+Qijo+w0JTQ0S/ilXhe7uTih4fSsUd3nEgI0RYVy6G +iolQ3PZ9gAMPHN4ePplBxdZzL6grejhgKJGsl1BJxas3JtRyiH7Jc3ymOa+K +iss3pzqymznQwRfqVVVHxf7WkraORg7smnFNm3xERSHvrpd/GjhQ1Kc2ENxP +xWtDtxx0iP4rc7kl3Y1PBbvfbC55T/TzhTUrB3U2q2BZtNetYmI+mC1QSF7r +pYI0Lb1Uf2J+mBZTV6P7qWA9mS0jm8SBiSl6qNVOFcw/8iIsPp4DH+q2z3ol +quCH6EklhUgOtDncFc24roLUv01W94l5JX+XL3yYUUGlaz/5y404wCwpLTx3 +ThU5QzNBea/ZMEApuWx9QRVz6Mxfza/YEH/u5qXpy6qoWPJh1fcuNtxNLr7o +elMVo/Yab2F2sMHQozBPtF4Vff9Z69U2smH1sjNZ6e9VMUXQc4t1CRtk/BIO +xWqrYdCC2MXr8WyYlLD339KohgqCa/O/E/PjSKb/lih+DawVdwpcJlcJdt/j +7D6arMJSfx8vLakK+LZdIJqbpIkPJCKEPj+7TfxfyPIeaVyNHJeRyowdJSDx +TONkxXctXON2aosw5SYoZZRvNDHRRqGzx2r6S4ohbw19pWSwDh5bpb8mMrwI +2hTMjaeydfFzsuM+n41XwUypMUvvlR4ajA7zV1MLQZTvakxAij7ONIz9+Rp5 +EUjJZKanhgEOZTcfZhbkgaD61irXJwYYml3h8EL3LOiy5MvjfAyxH57pHbPN +gahBiSZ7nrU4vmrfS/+Jk/B9KnOzXd5a9P/ZKxtidQzW6z3Ot9MxQq2QpIIS +s3RomGL8nuswwv92NvM9CEmBcG3D/s4gYyx3xLzAWweBNRHY7SlogkZjWjzX +ZveBtZqck8hVE2y/s0T7XUwMcMcfUQOLTJDD2mtXHBgDanejZ2uLTbDiv4nV ++9xiYKn988shJSaY2epOZhrFQOOe9J9NXBN01/ziYDUdDevqpnPjn5igTK23 +jktsNJi4dn74/M0EPyk9N6enRIHmoWP7Gmk0vMi49kyjOgLqGdeXOZrRUNJB +ycj5ZgRsnLuf08OkYVBtx+ND+RGwL3ym9Is5DTP8brjzJ0ZAy1b/96KONFzH +8yf2vEUEhNBN7L39aeieXOubd3kP3Pz5XnE6g4YD6U5DSSNhoBVEv6/eT8NN +Fk1REqWhcErF+dfhNzRs8OncRzsbCtPvthl/GKThhiBJp7CDodDglVlyaZiG +T868pwu7hILrxne5suM0rKIJyIvN7YT9jLQIQR5TtDv16ryuzU5oEe+kjqub +Ip+6xOVjP4IhqCEklRtpigb6p4wqooNgImwszjrGFMcav5O1/IJgn/LuXa9i +TdHP64L4HfsgOHZgj+t8gimm+g33L1KDoMIslsJMN0V3ev5Tz85A+FN1uL4p +nzhvo1awwdpAyCm/NP2yyRQPHrySIMG3He4XdgdOStPxWuxEokWnPww5Uv1i +5ej4s/Je0cwDf+BZCPP8rUBH0YH1V6oq/MHChd95GYWOR9ucZgKy/OHxEjOa +vBYdW1zc/27d6A/t2y4Lmq+j4/1tR/Oqr/tBv1poWdYOOq52vTh1oMkHpm/8 +m9O7S0f3IHavpr0XfNpiU3i0ho6pm9QTSgy8oG/pCdvhOjqunwi2tpD3gjp/ +hfPnHtDx304n2dIvnpAiZ2y22ErH8kNX9fdkeMLKjNADbW/oWNTotOG/px6g +HdzDE8Rrhhlu45bJ/u6wXb1EMN/JDM8shFYteegG8Y98QzU2mqFaV9fs/hI3 +yAqSeMp2NUOtwkLZ5efcoP76/syn7mZo6pxe77nLDaQ0bMUWA8xQYNF15JuM +GzzW+CjlH2uGjh4RG+5EbgItTTJF47IZTt6dPhBk7AqTWqdN2D/M0Fgxe6Xu +yAboa0drySkzDNzldym4eQM8CJ/YFDNjhpt6bmTeK9oAJ9l2kSa/zFDK/M/a +hqANoGXGU1rLx0DyznMuK0edYZtdGLVJhoFreM+If5x2gu7g9Su6mQxcOhWQ +dI/iCNVFv9/PZDBQbv2npJpmWzCxjJmzP87Az24p6Z9LbOHO+28rCk8wMF5q +ze81p22BTRqk2ecw0Job/2UuwBZK8x6cuHSBgXRXz7HzPLZQmJlGX1/GwBUd +t0PmzNfD0Rix7LwuBp6Ht2FXuq1BQDKjeLyHgezotGUHGqwhvZKn3qKPgZpU +34nQG9aQOjH56dsbBorgk6i0A9ZwMKSbaf6JgftOt6SUqFtD1NbzX0bnGZjg +1910O8EKvKxUkUFiovwe/aXKJpaw2C0g2kRh4tpz6QtVFEsoDJoYsFdlYp/F +9PEdwpbwKb0mzkuTie2zDxnL31tAVOuG8v2GTMyX7eFYn7CAY84HSNU2THxw +uz2XO2oOtR49f4z2MPGI0t2DnZUIPqO1bfWRxH5xY0q/LyHwxBfmWcUw8Vzg +KjHTTASbC7uM3PYz0apD5NbXHQgv3y7ZHX2YiYfJmd00ZYSxbboDlblMrJuJ +/nNTAUAx7EiN7gMmvus6ddZrlgkn/+0wPt7IxEAe2sPYXibw5thUfm5mYmpk +zmxFNRPGqpbdLGxlYpeLjWxSAhNqeVLzJLqYaDbcvC2JlwleZw7FzX5kYuv0 +t4kFaQbk1e03bhBm4b+RnJ+arnRY4exZqSDKwhBL4bs9JnQ4NGSqE7eShRda +0sILFOkQsmxeTV+ahYoZ6z0SP5oCbUOs1FUSC+dOaR85EG8Krz5ETaUZsHD5 +E54VgTdpIC20u9LJnYWfnTOmTBVMoMgyMf6HJwvdL1q9sf9nDIaJJy1Pb2Xh +m1ulXfEjxuD8o6KnL4BYv04hzqjcGNJfzSxs383CiEQ5V2EbY5i/mmQRn8zC +Ue9Nd3X2G0E/43RXcQkLneLSjBOnDSFkb9FFuzIWzqc2TMi9NYTZsjtB3ypY +qK6xROv5I0OQUOmbM6hi4WK9bd2xXENwEFBWuveAhR73YnwZTEOo7y4O7Oph +YVfy/KVdxwzAXrRaJ7aPhUNFZZLXYgygb33rrNwAC19+8wue8jWA6dqvGb5D +LMzavcxmcK0B6FzRvz06xkJxhz3K/YP6UN9vHps5zkLb8L2Pe1r1wV5qE+j9 +YGHlX/e0Ua4+7DiytzNmhoWvWpveexzXh+kH6fmy8ywUEVrhzI3Vh5Rfudtr +f7Fw0/WysFXb9GGl0U1tn0UWUgzMNdlO+nAprHbm3z8Wvm4ND3Kj68P/AJzv +Q/c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07896599774681347}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07896599774681347}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943890227785177`*^9}, + CellLabel-> + "Out[119]=",ExpressionUUID->"9ce652f2-6bed-4b8b-9f51-557e8a96965c"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"2335a158-7588-4c40-bdb5-\ -53b7ef04b97c"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VO8bAHBR2UL2fRZbkj2MMTM9jzV7kbJlKyJFtiiSCKlUaCGlVPKt +yDIzyZYKFZISIkqKFoqSvVK/+/vrns+5533fe+59tkvdtsc1iJeHh2fDEh6e +/19nB1ub1Y4XrVM893CXnp3Nuu5LcvvN+1KAd8ZwMCRSDVD6+Ta5vhw4lZO3 +kx5pBLEbb/Xy9V2FYsO8XNlIKxCfkM1Z6GVDqoj+xsEIN3hX77xnurcR3Gzl +aJSIQLBRG3s72fsSHvhdOMMIi4GFXtrZH70fQGvK6E1VQCo0Wf5X1Hl1CqwO +cYoX+c+C0ruaT9u0F+GI4+DtO82XQGq33y1+Sz5kni/1ezJyDXIMbOqcNwtg +oef4Db6QG/A6T//B5EoR1ElgN1wzKIX8rhKxWHXCq4WUJMxLwUt0ld8vugjW +n79dF7exFN4cVv7Lu10E33Y9Z2vuKYWhcCGm1B0RzI63kaOWlsIXq5G7Jp6i +2CD4KzNE7TbM/8gtT7gihtVno2PoomVwvCjpOa+8OC7PzpbQeVwO9kY7JaRV +xbGM9naZVFc5CDS7bl6lI45v1fSeTL4rh9Rh9QEHc8InxG5lL5TDAZX2T2d2 +iqNwW/gWA5kKCC+U+6tRK45OCkueqtpWgMvFSm0HbwmE+Rul6TcqQPbM8NHT +BZJoualZXcS7EuTW3EmdL5bE9AXp03N+laDQmJ7kUyGJ+lsn294GVgLpx+q9 +q5ok0aNFMq8gvBLUHSP8675IYnCq0Pmx5EpYu3TRZHitFI6k+zTV/FcJG2Jk +RgzbpLBoxbWDq39UwkbhL4O5XVK4ODHsmDldCa5Xa17/eSOFuyfdesfmK2HL +i63PH3+XwnsGu8kXlrDBR/tarZe0NKa8do5ukWDDrhG97BR/aSz76vppsxEb +jrjZrXs5K43aqx+vNYthgwK3Q4F3iQy+8pae3bGPDWWSbnMGwjJorJtZcvIA +G1699K3IJsug8Hur7x2pbFBziVFxsZXBdquyHomzbGh0urz8xXkZPFWsuvQG +lw2LNjMdz5iyyDfudpz/BxuyiuNLFm1k8aHh86M5U8T65TwZOi6yeNLUI15u +jg2Oj4TMTwTJ4jkpAUPpv2zIt6RwHE/KYnpdzL9OYQ6YokPu03ey6H/U08RT +gwPR9Ct+rSly2Gb5ruiyOwfsC0WnHTLlkCL+6727FwdU+A9kdJyVw/JmkQZh +Hw686N5S2XVDDvkqvd12bOOAbsQKvsEOORwcPcH7eTcHvhTHFf9UkMfiqGC2 +TDIH7ot8NNurJo8SY378Rw9z4FyM6/M5HXmkSizwzKVxwNpCZ/4PymP6f2XD +j45x4OrbD3b8wfLY3vspSu8MB7ZKOY8rcuRxR8p1RcNiDqxNqEu+VC+PCZGP +J3xvcEDog6YM9bE89qk+DDtyiwM15Xyg8VoejQVsI5+WcUDGoSZL/588jheL +FpDvEs+frGZk7aCAqyvEeBYec8Dq+6/48GEFjCnX5I8Z5sB+2zNaD78pYMHe +XSZiHzlQdkWnX3JWAS+KTjoXf+KAnJs/vUZAEbeu9F3XMsqBb9WP5vh0FVFQ +jbF64DsHTqdkxZzfp4iOF42fsH5zoGVgtdq3ZEX0GvYayP3DgT9GTV3rjiui +TcDD4fFFDuz4PGM4UqCIrnbQfYKHC2aO3pO6TYo439lkW7CMCx+kNcKbRZRw +4aWd1m9RLsjuua8sK6uEMUfn3kit5IJji8eznRQlFCzRy9IS50JV/HFtsbVK +aPtf4m87SS4ce/djzNNDCYMDj//xkOXCfdNj+aUBSpiffbDNVY4L09mq9v9C +ldDF7fxlW3ku+FptuVmUqIQfc0u2aSpywfBmXfD3q0r43tMlsJrEhWDezbIW +pUqYO5B+OIfMhYveE4/P3FHCqqznFSEULiwXpWqYtSjhqa2r6IIqXOiPSh9J +HVfCNdMrFBTVuSDWTj7TO6uESgo/GnsIW6nXWGrxKGOTIDk5U4MLZb1frz6X +UMbbspLmE6u4kMx0CVAwVcZgr/2jKVpcsPW99JNmoYyPNpj7rVnDBdFDXw9v +dlRGPbtT5s8JX2xKK87yV8aTGv9tFNThwvaPL2lloco4MTOadJmwFj+l9WmM +Mg4WFFEMdLlQbV/7dflRZVzRkFpno8eFpN38iWqnlVGiTa+6jbDNSTdRiwJl +HOnyWWOvz4Xuzgn9xEpl9LLyi2cYcOHCFKMxv04ZfR82e9wmvE366KbqR8p4 +akcnW8GQCz88VGOnXivjQx/pd58J342P4BcfUcarKl8569dy4eDFe3m6E8rI +N1UkeI3wiiH3up28JHwZLsFyNOJC15LrjkdWkHBtU4RyPuF81Z9vi2RImBkl +kDpMeFVwJs+QFglvd9qNhhhzYSLjdfaiEQkf0W+NFRHm3tJQVQQSLtlVGfeG +cEJ7NNfUjoT5BxqyxUy4YDHxwHrLJhKeW2Joto6w4ErR3mgfEubyh0eFEH5h +4B2SHUxY+hXjJOHcTTcWyiJJWK/1PLecsO/emWPtCSRcfu/+kXbC6rkWSmNp +JNSsFhP5SPhb9anb/FkktDiguXqBMKf/zTr1fBJefhPzVoDGhfg/q19YFJHw +IClgjRRhc1JcgH8ZCV/NeUkpEhbA5p+J1SQUPNl5XplwR4B46oVGEtbEGN/7 +//2zh32la9pJGFU6nyRNeOv1kuJXr4j9rpwcFiKs8mSeNj1EwtNau0d/E+eP +frFuFf9KwsIj/Ke/EK4QOu2lN0PCA/59718QjtMe+ur4j4RlTe69XMLrnHUS +QwXJqKXOs/cM4WUR8aIZkmRc5uNUv4dwe/aTy9eVycgqri+zIXyaI2XQtIqM +QQXtTvKEvXoCGocMyBgJi/mfifdPnSvb9JdB3P/yPLeS8Be5PyOKNmSUcn1i +HUe43Mwulr6RjF05wcWmhGO3nuN39yIjKJnUzRDfm69QXysnnIwiWfH82wm3 +PUysK99HRn8FXgtJwlnDbY7PUsh4U2vA5D4RT6RVQXsEcsmITzmbhQh/tGXz +aFwho/7V5yk3iXgsDf2XbVlCxo6jeyOsCJuVnecevE/G0RPFp8OIeLbq7Vic +aCHjtY06x/kIO/MsXe/3koxu3U49Z4l82O4a/ho+kpHBm76j/P/5kkBNOrSM +gt8u6F6pIvLtqVj9NVMhCoat7nPRI7yxaEvLD1EKygdn+BVpc8H72XHxADkK ++hdY5x4m8jeCPHvNfA0F+0IDC2RWc2GGk9WyoEfBKvNw7yhNIl5s14xXGlFw +NlUzuY2oD2mR/iYq6ygY3S0lGEHUj/ymthZeFwoe2fpMP0uVC83Bl8ebYin4 +7nWNhIYyF+z+0CUOJFDw7+7b322ViHjK6jYxOkRBkd5N9iFEvXtdI3io6CgF +abkeBy8S9XBCOEYi7SIFj+97JjAgzQW5CluaTSMFEzelf6oU4UKB1bD338cU +XCyTtitYQcTb68RDVU8paMNDwzRhLujwclo1eiiYsGzpT3tBIt/clLfyf6Gg +WGlT5u2lXNg9P3moRYSKXaMOoy9+ccAscofMJwkqhvSXeocucEBgrL+ET46K +vwNCPv6b48D1gaZX61SoGBd+wYY8w4HBhrPad0yomPT03V49ov9sSKP3XfGj +ovCOPLPcDxwg/b0ddj+Qijo+w0JTQ0S/ilXhe7uTih4fSsUd3nEgI0RYVy6G +iolQ3PZ9gAMPHN4ePplBxdZzL6grejhgKJGsl1BJxas3JtRyiH7Jc3ymOa+K +iss3pzqymznQwRfqVVVHxf7WkraORg7smnFNm3xERSHvrpd/GjhQ1Kc2ENxP +xWtDtxx0iP4rc7kl3Y1PBbvfbC55T/TzhTUrB3U2q2BZtNetYmI+mC1QSF7r +pYI0Lb1Uf2J+mBZTV6P7qWA9mS0jm8SBiSl6qNVOFcw/8iIsPp4DH+q2z3ol +quCH6EklhUgOtDncFc24roLUv01W94l5JX+XL3yYUUGlaz/5y404wCwpLTx3 +ThU5QzNBea/ZMEApuWx9QRVz6Mxfza/YEH/u5qXpy6qoWPJh1fcuNtxNLr7o +elMVo/Yab2F2sMHQozBPtF4Vff9Z69U2smH1sjNZ6e9VMUXQc4t1CRtk/BIO +xWqrYdCC2MXr8WyYlLD339KohgqCa/O/E/PjSKb/lih+DawVdwpcJlcJdt/j +7D6arMJSfx8vLakK+LZdIJqbpIkPJCKEPj+7TfxfyPIeaVyNHJeRyowdJSDx +TONkxXctXON2aosw5SYoZZRvNDHRRqGzx2r6S4ohbw19pWSwDh5bpb8mMrwI +2hTMjaeydfFzsuM+n41XwUypMUvvlR4ajA7zV1MLQZTvakxAij7ONIz9+Rp5 +EUjJZKanhgEOZTcfZhbkgaD61irXJwYYml3h8EL3LOiy5MvjfAyxH57pHbPN +gahBiSZ7nrU4vmrfS/+Jk/B9KnOzXd5a9P/ZKxtidQzW6z3Ot9MxQq2QpIIS +s3RomGL8nuswwv92NvM9CEmBcG3D/s4gYyx3xLzAWweBNRHY7SlogkZjWjzX +ZveBtZqck8hVE2y/s0T7XUwMcMcfUQOLTJDD2mtXHBgDanejZ2uLTbDiv4nV ++9xiYKn988shJSaY2epOZhrFQOOe9J9NXBN01/ziYDUdDevqpnPjn5igTK23 +jktsNJi4dn74/M0EPyk9N6enRIHmoWP7Gmk0vMi49kyjOgLqGdeXOZrRUNJB +ycj5ZgRsnLuf08OkYVBtx+ND+RGwL3ym9Is5DTP8brjzJ0ZAy1b/96KONFzH +8yf2vEUEhNBN7L39aeieXOubd3kP3Pz5XnE6g4YD6U5DSSNhoBVEv6/eT8NN +Fk1REqWhcErF+dfhNzRs8OncRzsbCtPvthl/GKThhiBJp7CDodDglVlyaZiG +T868pwu7hILrxne5suM0rKIJyIvN7YT9jLQIQR5TtDv16ryuzU5oEe+kjqub +Ip+6xOVjP4IhqCEklRtpigb6p4wqooNgImwszjrGFMcav5O1/IJgn/LuXa9i +TdHP64L4HfsgOHZgj+t8gimm+g33L1KDoMIslsJMN0V3ev5Tz85A+FN1uL4p +nzhvo1awwdpAyCm/NP2yyRQPHrySIMG3He4XdgdOStPxWuxEokWnPww5Uv1i +5ej4s/Je0cwDf+BZCPP8rUBH0YH1V6oq/MHChd95GYWOR9ucZgKy/OHxEjOa +vBYdW1zc/27d6A/t2y4Lmq+j4/1tR/Oqr/tBv1poWdYOOq52vTh1oMkHpm/8 +m9O7S0f3IHavpr0XfNpiU3i0ho6pm9QTSgy8oG/pCdvhOjqunwi2tpD3gjp/ +hfPnHtDx304n2dIvnpAiZ2y22ErH8kNX9fdkeMLKjNADbW/oWNTotOG/px6g +HdzDE8Rrhhlu45bJ/u6wXb1EMN/JDM8shFYteegG8Y98QzU2mqFaV9fs/hI3 +yAqSeMp2NUOtwkLZ5efcoP76/syn7mZo6pxe77nLDaQ0bMUWA8xQYNF15JuM +GzzW+CjlH2uGjh4RG+5EbgItTTJF47IZTt6dPhBk7AqTWqdN2D/M0Fgxe6Xu +yAboa0drySkzDNzldym4eQM8CJ/YFDNjhpt6bmTeK9oAJ9l2kSa/zFDK/M/a +hqANoGXGU1rLx0DyznMuK0edYZtdGLVJhoFreM+If5x2gu7g9Su6mQxcOhWQ +dI/iCNVFv9/PZDBQbv2npJpmWzCxjJmzP87Az24p6Z9LbOHO+28rCk8wMF5q +ze81p22BTRqk2ecw0Job/2UuwBZK8x6cuHSBgXRXz7HzPLZQmJlGX1/GwBUd +t0PmzNfD0Rix7LwuBp6Ht2FXuq1BQDKjeLyHgezotGUHGqwhvZKn3qKPgZpU +34nQG9aQOjH56dsbBorgk6i0A9ZwMKSbaf6JgftOt6SUqFtD1NbzX0bnGZjg +1910O8EKvKxUkUFiovwe/aXKJpaw2C0g2kRh4tpz6QtVFEsoDJoYsFdlYp/F +9PEdwpbwKb0mzkuTie2zDxnL31tAVOuG8v2GTMyX7eFYn7CAY84HSNU2THxw +uz2XO2oOtR49f4z2MPGI0t2DnZUIPqO1bfWRxH5xY0q/LyHwxBfmWcUw8Vzg +KjHTTASbC7uM3PYz0apD5NbXHQgv3y7ZHX2YiYfJmd00ZYSxbboDlblMrJuJ +/nNTAUAx7EiN7gMmvus6ddZrlgkn/+0wPt7IxEAe2sPYXibw5thUfm5mYmpk +zmxFNRPGqpbdLGxlYpeLjWxSAhNqeVLzJLqYaDbcvC2JlwleZw7FzX5kYuv0 +t4kFaQbk1e03bhBm4b+RnJ+arnRY4exZqSDKwhBL4bs9JnQ4NGSqE7eShRda +0sILFOkQsmxeTV+ahYoZ6z0SP5oCbUOs1FUSC+dOaR85EG8Krz5ETaUZsHD5 +E54VgTdpIC20u9LJnYWfnTOmTBVMoMgyMf6HJwvdL1q9sf9nDIaJJy1Pb2Xh +m1ulXfEjxuD8o6KnL4BYv04hzqjcGNJfzSxs383CiEQ5V2EbY5i/mmQRn8zC +Ue9Nd3X2G0E/43RXcQkLneLSjBOnDSFkb9FFuzIWzqc2TMi9NYTZsjtB3ypY +qK6xROv5I0OQUOmbM6hi4WK9bd2xXENwEFBWuveAhR73YnwZTEOo7y4O7Oph +YVfy/KVdxwzAXrRaJ7aPhUNFZZLXYgygb33rrNwAC19+8wue8jWA6dqvGb5D +LMzavcxmcK0B6FzRvz06xkJxhz3K/YP6UN9vHps5zkLb8L2Pe1r1wV5qE+j9 +YGHlX/e0Ua4+7DiytzNmhoWvWpveexzXh+kH6fmy8ywUEVrhzI3Vh5Rfudtr +f7Fw0/WysFXb9GGl0U1tn0UWUgzMNdlO+nAprHbm3z8Wvm4ND3Kj68P/AJzv +Q/c= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHBR2UL2fRZbkj2MMTM9jzV7kbJlKyJFtiiSCKlUaCGlVPKt +yDIzyZYKFZISIkqKFoqSvVK/+/vrns+5533fe+59tkvdtsc1iJeHh2fDEh6e +/19nB1ub1Y4XrVM893CXnp3Nuu5LcvvN+1KAd8ZwMCRSDVD6+Ta5vhw4lZO3 +kx5pBLEbb/Xy9V2FYsO8XNlIKxCfkM1Z6GVDqoj+xsEIN3hX77xnurcR3Gzl +aJSIQLBRG3s72fsSHvhdOMMIi4GFXtrZH70fQGvK6E1VQCo0Wf5X1Hl1CqwO +cYoX+c+C0ruaT9u0F+GI4+DtO82XQGq33y1+Sz5kni/1ezJyDXIMbOqcNwtg +oef4Db6QG/A6T//B5EoR1ElgN1wzKIX8rhKxWHXCq4WUJMxLwUt0ld8vugjW +n79dF7exFN4cVv7Lu10E33Y9Z2vuKYWhcCGm1B0RzI63kaOWlsIXq5G7Jp6i +2CD4KzNE7TbM/8gtT7gihtVno2PoomVwvCjpOa+8OC7PzpbQeVwO9kY7JaRV +xbGM9naZVFc5CDS7bl6lI45v1fSeTL4rh9Rh9QEHc8InxG5lL5TDAZX2T2d2 +iqNwW/gWA5kKCC+U+6tRK45OCkueqtpWgMvFSm0HbwmE+Rul6TcqQPbM8NHT +BZJoualZXcS7EuTW3EmdL5bE9AXp03N+laDQmJ7kUyGJ+lsn294GVgLpx+q9 +q5ok0aNFMq8gvBLUHSP8675IYnCq0Pmx5EpYu3TRZHitFI6k+zTV/FcJG2Jk +RgzbpLBoxbWDq39UwkbhL4O5XVK4ODHsmDldCa5Xa17/eSOFuyfdesfmK2HL +i63PH3+XwnsGu8kXlrDBR/tarZe0NKa8do5ukWDDrhG97BR/aSz76vppsxEb +jrjZrXs5K43aqx+vNYthgwK3Q4F3iQy+8pae3bGPDWWSbnMGwjJorJtZcvIA +G1699K3IJsug8Hur7x2pbFBziVFxsZXBdquyHomzbGh0urz8xXkZPFWsuvQG +lw2LNjMdz5iyyDfudpz/BxuyiuNLFm1k8aHh86M5U8T65TwZOi6yeNLUI15u +jg2Oj4TMTwTJ4jkpAUPpv2zIt6RwHE/KYnpdzL9OYQ6YokPu03ey6H/U08RT +gwPR9Ct+rSly2Gb5ruiyOwfsC0WnHTLlkCL+6727FwdU+A9kdJyVw/JmkQZh +Hw686N5S2XVDDvkqvd12bOOAbsQKvsEOORwcPcH7eTcHvhTHFf9UkMfiqGC2 +TDIH7ot8NNurJo8SY378Rw9z4FyM6/M5HXmkSizwzKVxwNpCZ/4PymP6f2XD +j45x4OrbD3b8wfLY3vspSu8MB7ZKOY8rcuRxR8p1RcNiDqxNqEu+VC+PCZGP +J3xvcEDog6YM9bE89qk+DDtyiwM15Xyg8VoejQVsI5+WcUDGoSZL/588jheL +FpDvEs+frGZk7aCAqyvEeBYec8Dq+6/48GEFjCnX5I8Z5sB+2zNaD78pYMHe +XSZiHzlQdkWnX3JWAS+KTjoXf+KAnJs/vUZAEbeu9F3XMsqBb9WP5vh0FVFQ +jbF64DsHTqdkxZzfp4iOF42fsH5zoGVgtdq3ZEX0GvYayP3DgT9GTV3rjiui +TcDD4fFFDuz4PGM4UqCIrnbQfYKHC2aO3pO6TYo439lkW7CMCx+kNcKbRZRw +4aWd1m9RLsjuua8sK6uEMUfn3kit5IJji8eznRQlFCzRy9IS50JV/HFtsbVK +aPtf4m87SS4ce/djzNNDCYMDj//xkOXCfdNj+aUBSpiffbDNVY4L09mq9v9C +ldDF7fxlW3ku+FptuVmUqIQfc0u2aSpywfBmXfD3q0r43tMlsJrEhWDezbIW +pUqYO5B+OIfMhYveE4/P3FHCqqznFSEULiwXpWqYtSjhqa2r6IIqXOiPSh9J +HVfCNdMrFBTVuSDWTj7TO6uESgo/GnsIW6nXWGrxKGOTIDk5U4MLZb1frz6X +UMbbspLmE6u4kMx0CVAwVcZgr/2jKVpcsPW99JNmoYyPNpj7rVnDBdFDXw9v +dlRGPbtT5s8JX2xKK87yV8aTGv9tFNThwvaPL2lloco4MTOadJmwFj+l9WmM +Mg4WFFEMdLlQbV/7dflRZVzRkFpno8eFpN38iWqnlVGiTa+6jbDNSTdRiwJl +HOnyWWOvz4Xuzgn9xEpl9LLyi2cYcOHCFKMxv04ZfR82e9wmvE366KbqR8p4 +akcnW8GQCz88VGOnXivjQx/pd58J342P4BcfUcarKl8569dy4eDFe3m6E8rI +N1UkeI3wiiH3up28JHwZLsFyNOJC15LrjkdWkHBtU4RyPuF81Z9vi2RImBkl +kDpMeFVwJs+QFglvd9qNhhhzYSLjdfaiEQkf0W+NFRHm3tJQVQQSLtlVGfeG +cEJ7NNfUjoT5BxqyxUy4YDHxwHrLJhKeW2Joto6w4ErR3mgfEubyh0eFEH5h +4B2SHUxY+hXjJOHcTTcWyiJJWK/1PLecsO/emWPtCSRcfu/+kXbC6rkWSmNp +JNSsFhP5SPhb9anb/FkktDiguXqBMKf/zTr1fBJefhPzVoDGhfg/q19YFJHw +IClgjRRhc1JcgH8ZCV/NeUkpEhbA5p+J1SQUPNl5XplwR4B46oVGEtbEGN/7 +//2zh32la9pJGFU6nyRNeOv1kuJXr4j9rpwcFiKs8mSeNj1EwtNau0d/E+eP +frFuFf9KwsIj/Ke/EK4QOu2lN0PCA/59718QjtMe+ur4j4RlTe69XMLrnHUS +QwXJqKXOs/cM4WUR8aIZkmRc5uNUv4dwe/aTy9eVycgqri+zIXyaI2XQtIqM +QQXtTvKEvXoCGocMyBgJi/mfifdPnSvb9JdB3P/yPLeS8Be5PyOKNmSUcn1i +HUe43Mwulr6RjF05wcWmhGO3nuN39yIjKJnUzRDfm69QXysnnIwiWfH82wm3 +PUysK99HRn8FXgtJwlnDbY7PUsh4U2vA5D4RT6RVQXsEcsmITzmbhQh/tGXz +aFwho/7V5yk3iXgsDf2XbVlCxo6jeyOsCJuVnecevE/G0RPFp8OIeLbq7Vic +aCHjtY06x/kIO/MsXe/3koxu3U49Z4l82O4a/ho+kpHBm76j/P/5kkBNOrSM +gt8u6F6pIvLtqVj9NVMhCoat7nPRI7yxaEvLD1EKygdn+BVpc8H72XHxADkK ++hdY5x4m8jeCPHvNfA0F+0IDC2RWc2GGk9WyoEfBKvNw7yhNIl5s14xXGlFw +NlUzuY2oD2mR/iYq6ygY3S0lGEHUj/ymthZeFwoe2fpMP0uVC83Bl8ebYin4 +7nWNhIYyF+z+0CUOJFDw7+7b322ViHjK6jYxOkRBkd5N9iFEvXtdI3io6CgF +abkeBy8S9XBCOEYi7SIFj+97JjAgzQW5CluaTSMFEzelf6oU4UKB1bD338cU +XCyTtitYQcTb68RDVU8paMNDwzRhLujwclo1eiiYsGzpT3tBIt/clLfyf6Gg +WGlT5u2lXNg9P3moRYSKXaMOoy9+ccAscofMJwkqhvSXeocucEBgrL+ET46K +vwNCPv6b48D1gaZX61SoGBd+wYY8w4HBhrPad0yomPT03V49ov9sSKP3XfGj +ovCOPLPcDxwg/b0ddj+Qijo+w0JTQ0S/ilXhe7uTih4fSsUd3nEgI0RYVy6G +iolQ3PZ9gAMPHN4ePplBxdZzL6grejhgKJGsl1BJxas3JtRyiH7Jc3ymOa+K +iss3pzqymznQwRfqVVVHxf7WkraORg7smnFNm3xERSHvrpd/GjhQ1Kc2ENxP +xWtDtxx0iP4rc7kl3Y1PBbvfbC55T/TzhTUrB3U2q2BZtNetYmI+mC1QSF7r +pYI0Lb1Uf2J+mBZTV6P7qWA9mS0jm8SBiSl6qNVOFcw/8iIsPp4DH+q2z3ol +quCH6EklhUgOtDncFc24roLUv01W94l5JX+XL3yYUUGlaz/5y404wCwpLTx3 +ThU5QzNBea/ZMEApuWx9QRVz6Mxfza/YEH/u5qXpy6qoWPJh1fcuNtxNLr7o +elMVo/Yab2F2sMHQozBPtF4Vff9Z69U2smH1sjNZ6e9VMUXQc4t1CRtk/BIO +xWqrYdCC2MXr8WyYlLD339KohgqCa/O/E/PjSKb/lih+DawVdwpcJlcJdt/j +7D6arMJSfx8vLakK+LZdIJqbpIkPJCKEPj+7TfxfyPIeaVyNHJeRyowdJSDx +TONkxXctXON2aosw5SYoZZRvNDHRRqGzx2r6S4ohbw19pWSwDh5bpb8mMrwI +2hTMjaeydfFzsuM+n41XwUypMUvvlR4ajA7zV1MLQZTvakxAij7ONIz9+Rp5 +EUjJZKanhgEOZTcfZhbkgaD61irXJwYYml3h8EL3LOiy5MvjfAyxH57pHbPN +gahBiSZ7nrU4vmrfS/+Jk/B9KnOzXd5a9P/ZKxtidQzW6z3Ot9MxQq2QpIIS +s3RomGL8nuswwv92NvM9CEmBcG3D/s4gYyx3xLzAWweBNRHY7SlogkZjWjzX +ZveBtZqck8hVE2y/s0T7XUwMcMcfUQOLTJDD2mtXHBgDanejZ2uLTbDiv4nV ++9xiYKn988shJSaY2epOZhrFQOOe9J9NXBN01/ziYDUdDevqpnPjn5igTK23 +jktsNJi4dn74/M0EPyk9N6enRIHmoWP7Gmk0vMi49kyjOgLqGdeXOZrRUNJB +ycj5ZgRsnLuf08OkYVBtx+ND+RGwL3ym9Is5DTP8brjzJ0ZAy1b/96KONFzH +8yf2vEUEhNBN7L39aeieXOubd3kP3Pz5XnE6g4YD6U5DSSNhoBVEv6/eT8NN +Fk1REqWhcErF+dfhNzRs8OncRzsbCtPvthl/GKThhiBJp7CDodDglVlyaZiG +T868pwu7hILrxne5suM0rKIJyIvN7YT9jLQIQR5TtDv16ryuzU5oEe+kjqub +Ip+6xOVjP4IhqCEklRtpigb6p4wqooNgImwszjrGFMcav5O1/IJgn/LuXa9i +TdHP64L4HfsgOHZgj+t8gimm+g33L1KDoMIslsJMN0V3ev5Tz85A+FN1uL4p +nzhvo1awwdpAyCm/NP2yyRQPHrySIMG3He4XdgdOStPxWuxEokWnPww5Uv1i +5ej4s/Je0cwDf+BZCPP8rUBH0YH1V6oq/MHChd95GYWOR9ucZgKy/OHxEjOa +vBYdW1zc/27d6A/t2y4Lmq+j4/1tR/Oqr/tBv1poWdYOOq52vTh1oMkHpm/8 +m9O7S0f3IHavpr0XfNpiU3i0ho6pm9QTSgy8oG/pCdvhOjqunwi2tpD3gjp/ +hfPnHtDx304n2dIvnpAiZ2y22ErH8kNX9fdkeMLKjNADbW/oWNTotOG/px6g +HdzDE8Rrhhlu45bJ/u6wXb1EMN/JDM8shFYteegG8Y98QzU2mqFaV9fs/hI3 +yAqSeMp2NUOtwkLZ5efcoP76/syn7mZo6pxe77nLDaQ0bMUWA8xQYNF15JuM +GzzW+CjlH2uGjh4RG+5EbgItTTJF47IZTt6dPhBk7AqTWqdN2D/M0Fgxe6Xu +yAboa0drySkzDNzldym4eQM8CJ/YFDNjhpt6bmTeK9oAJ9l2kSa/zFDK/M/a +hqANoGXGU1rLx0DyznMuK0edYZtdGLVJhoFreM+If5x2gu7g9Su6mQxcOhWQ +dI/iCNVFv9/PZDBQbv2npJpmWzCxjJmzP87Az24p6Z9LbOHO+28rCk8wMF5q +ze81p22BTRqk2ecw0Job/2UuwBZK8x6cuHSBgXRXz7HzPLZQmJlGX1/GwBUd +t0PmzNfD0Rix7LwuBp6Ht2FXuq1BQDKjeLyHgezotGUHGqwhvZKn3qKPgZpU +34nQG9aQOjH56dsbBorgk6i0A9ZwMKSbaf6JgftOt6SUqFtD1NbzX0bnGZjg +1910O8EKvKxUkUFiovwe/aXKJpaw2C0g2kRh4tpz6QtVFEsoDJoYsFdlYp/F +9PEdwpbwKb0mzkuTie2zDxnL31tAVOuG8v2GTMyX7eFYn7CAY84HSNU2THxw +uz2XO2oOtR49f4z2MPGI0t2DnZUIPqO1bfWRxH5xY0q/LyHwxBfmWcUw8Vzg +KjHTTASbC7uM3PYz0apD5NbXHQgv3y7ZHX2YiYfJmd00ZYSxbboDlblMrJuJ +/nNTAUAx7EiN7gMmvus6ddZrlgkn/+0wPt7IxEAe2sPYXibw5thUfm5mYmpk +zmxFNRPGqpbdLGxlYpeLjWxSAhNqeVLzJLqYaDbcvC2JlwleZw7FzX5kYuv0 +t4kFaQbk1e03bhBm4b+RnJ+arnRY4exZqSDKwhBL4bs9JnQ4NGSqE7eShRda +0sILFOkQsmxeTV+ahYoZ6z0SP5oCbUOs1FUSC+dOaR85EG8Krz5ETaUZsHD5 +E54VgTdpIC20u9LJnYWfnTOmTBVMoMgyMf6HJwvdL1q9sf9nDIaJJy1Pb2Xh +m1ulXfEjxuD8o6KnL4BYv04hzqjcGNJfzSxs383CiEQ5V2EbY5i/mmQRn8zC +Ue9Nd3X2G0E/43RXcQkLneLSjBOnDSFkb9FFuzIWzqc2TMi9NYTZsjtB3ypY +qK6xROv5I0OQUOmbM6hi4WK9bd2xXENwEFBWuveAhR73YnwZTEOo7y4O7Oph +YVfy/KVdxwzAXrRaJ7aPhUNFZZLXYgygb33rrNwAC19+8wue8jWA6dqvGb5D +LMzavcxmcK0B6FzRvz06xkJxhz3K/YP6UN9vHps5zkLb8L2Pe1r1wV5qE+j9 +YGHlX/e0Ua4+7DiytzNmhoWvWpveexzXh+kH6fmy8ywUEVrhzI3Vh5Rfudtr +f7Fw0/WysFXb9GGl0U1tn0UWUgzMNdlO+nAprHbm3z8Wvm4ND3Kj68P/AJzv +Q/c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07896599774681347}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07896599774681347}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VO8bAHBR2UL2fRZbkj2MMTM9jzV7kbJlKyJFtiiSCKlUaCGlVPKt +yDIzyZYKFZISIkqKFoqSvVK/+/vrns+5533fe+59tkvdtsc1iJeHh2fDEh6e +/19nB1ub1Y4XrVM893CXnp3Nuu5LcvvN+1KAd8ZwMCRSDVD6+Ta5vhw4lZO3 +kx5pBLEbb/Xy9V2FYsO8XNlIKxCfkM1Z6GVDqoj+xsEIN3hX77xnurcR3Gzl +aJSIQLBRG3s72fsSHvhdOMMIi4GFXtrZH70fQGvK6E1VQCo0Wf5X1Hl1CqwO +cYoX+c+C0ruaT9u0F+GI4+DtO82XQGq33y1+Sz5kni/1ezJyDXIMbOqcNwtg +oef4Db6QG/A6T//B5EoR1ElgN1wzKIX8rhKxWHXCq4WUJMxLwUt0ld8vugjW +n79dF7exFN4cVv7Lu10E33Y9Z2vuKYWhcCGm1B0RzI63kaOWlsIXq5G7Jp6i +2CD4KzNE7TbM/8gtT7gihtVno2PoomVwvCjpOa+8OC7PzpbQeVwO9kY7JaRV +xbGM9naZVFc5CDS7bl6lI45v1fSeTL4rh9Rh9QEHc8InxG5lL5TDAZX2T2d2 +iqNwW/gWA5kKCC+U+6tRK45OCkueqtpWgMvFSm0HbwmE+Rul6TcqQPbM8NHT +BZJoualZXcS7EuTW3EmdL5bE9AXp03N+laDQmJ7kUyGJ+lsn294GVgLpx+q9 +q5ok0aNFMq8gvBLUHSP8675IYnCq0Pmx5EpYu3TRZHitFI6k+zTV/FcJG2Jk +RgzbpLBoxbWDq39UwkbhL4O5XVK4ODHsmDldCa5Xa17/eSOFuyfdesfmK2HL +i63PH3+XwnsGu8kXlrDBR/tarZe0NKa8do5ukWDDrhG97BR/aSz76vppsxEb +jrjZrXs5K43aqx+vNYthgwK3Q4F3iQy+8pae3bGPDWWSbnMGwjJorJtZcvIA +G1699K3IJsug8Hur7x2pbFBziVFxsZXBdquyHomzbGh0urz8xXkZPFWsuvQG +lw2LNjMdz5iyyDfudpz/BxuyiuNLFm1k8aHh86M5U8T65TwZOi6yeNLUI15u +jg2Oj4TMTwTJ4jkpAUPpv2zIt6RwHE/KYnpdzL9OYQ6YokPu03ey6H/U08RT +gwPR9Ct+rSly2Gb5ruiyOwfsC0WnHTLlkCL+6727FwdU+A9kdJyVw/JmkQZh +Hw686N5S2XVDDvkqvd12bOOAbsQKvsEOORwcPcH7eTcHvhTHFf9UkMfiqGC2 +TDIH7ot8NNurJo8SY378Rw9z4FyM6/M5HXmkSizwzKVxwNpCZ/4PymP6f2XD +j45x4OrbD3b8wfLY3vspSu8MB7ZKOY8rcuRxR8p1RcNiDqxNqEu+VC+PCZGP +J3xvcEDog6YM9bE89qk+DDtyiwM15Xyg8VoejQVsI5+WcUDGoSZL/588jheL +FpDvEs+frGZk7aCAqyvEeBYec8Dq+6/48GEFjCnX5I8Z5sB+2zNaD78pYMHe +XSZiHzlQdkWnX3JWAS+KTjoXf+KAnJs/vUZAEbeu9F3XMsqBb9WP5vh0FVFQ +jbF64DsHTqdkxZzfp4iOF42fsH5zoGVgtdq3ZEX0GvYayP3DgT9GTV3rjiui +TcDD4fFFDuz4PGM4UqCIrnbQfYKHC2aO3pO6TYo439lkW7CMCx+kNcKbRZRw +4aWd1m9RLsjuua8sK6uEMUfn3kit5IJji8eznRQlFCzRy9IS50JV/HFtsbVK +aPtf4m87SS4ce/djzNNDCYMDj//xkOXCfdNj+aUBSpiffbDNVY4L09mq9v9C +ldDF7fxlW3ku+FptuVmUqIQfc0u2aSpywfBmXfD3q0r43tMlsJrEhWDezbIW +pUqYO5B+OIfMhYveE4/P3FHCqqznFSEULiwXpWqYtSjhqa2r6IIqXOiPSh9J +HVfCNdMrFBTVuSDWTj7TO6uESgo/GnsIW6nXWGrxKGOTIDk5U4MLZb1frz6X +UMbbspLmE6u4kMx0CVAwVcZgr/2jKVpcsPW99JNmoYyPNpj7rVnDBdFDXw9v +dlRGPbtT5s8JX2xKK87yV8aTGv9tFNThwvaPL2lloco4MTOadJmwFj+l9WmM +Mg4WFFEMdLlQbV/7dflRZVzRkFpno8eFpN38iWqnlVGiTa+6jbDNSTdRiwJl +HOnyWWOvz4Xuzgn9xEpl9LLyi2cYcOHCFKMxv04ZfR82e9wmvE366KbqR8p4 +akcnW8GQCz88VGOnXivjQx/pd58J342P4BcfUcarKl8569dy4eDFe3m6E8rI +N1UkeI3wiiH3up28JHwZLsFyNOJC15LrjkdWkHBtU4RyPuF81Z9vi2RImBkl +kDpMeFVwJs+QFglvd9qNhhhzYSLjdfaiEQkf0W+NFRHm3tJQVQQSLtlVGfeG +cEJ7NNfUjoT5BxqyxUy4YDHxwHrLJhKeW2Joto6w4ErR3mgfEubyh0eFEH5h +4B2SHUxY+hXjJOHcTTcWyiJJWK/1PLecsO/emWPtCSRcfu/+kXbC6rkWSmNp +JNSsFhP5SPhb9anb/FkktDiguXqBMKf/zTr1fBJefhPzVoDGhfg/q19YFJHw +IClgjRRhc1JcgH8ZCV/NeUkpEhbA5p+J1SQUPNl5XplwR4B46oVGEtbEGN/7 +//2zh32la9pJGFU6nyRNeOv1kuJXr4j9rpwcFiKs8mSeNj1EwtNau0d/E+eP +frFuFf9KwsIj/Ke/EK4QOu2lN0PCA/59718QjtMe+ur4j4RlTe69XMLrnHUS +QwXJqKXOs/cM4WUR8aIZkmRc5uNUv4dwe/aTy9eVycgqri+zIXyaI2XQtIqM +QQXtTvKEvXoCGocMyBgJi/mfifdPnSvb9JdB3P/yPLeS8Be5PyOKNmSUcn1i +HUe43Mwulr6RjF05wcWmhGO3nuN39yIjKJnUzRDfm69QXysnnIwiWfH82wm3 +PUysK99HRn8FXgtJwlnDbY7PUsh4U2vA5D4RT6RVQXsEcsmITzmbhQh/tGXz +aFwho/7V5yk3iXgsDf2XbVlCxo6jeyOsCJuVnecevE/G0RPFp8OIeLbq7Vic +aCHjtY06x/kIO/MsXe/3koxu3U49Z4l82O4a/ho+kpHBm76j/P/5kkBNOrSM +gt8u6F6pIvLtqVj9NVMhCoat7nPRI7yxaEvLD1EKygdn+BVpc8H72XHxADkK ++hdY5x4m8jeCPHvNfA0F+0IDC2RWc2GGk9WyoEfBKvNw7yhNIl5s14xXGlFw +NlUzuY2oD2mR/iYq6ygY3S0lGEHUj/ymthZeFwoe2fpMP0uVC83Bl8ebYin4 +7nWNhIYyF+z+0CUOJFDw7+7b322ViHjK6jYxOkRBkd5N9iFEvXtdI3io6CgF +abkeBy8S9XBCOEYi7SIFj+97JjAgzQW5CluaTSMFEzelf6oU4UKB1bD338cU +XCyTtitYQcTb68RDVU8paMNDwzRhLujwclo1eiiYsGzpT3tBIt/clLfyf6Gg +WGlT5u2lXNg9P3moRYSKXaMOoy9+ccAscofMJwkqhvSXeocucEBgrL+ET46K +vwNCPv6b48D1gaZX61SoGBd+wYY8w4HBhrPad0yomPT03V49ov9sSKP3XfGj +ovCOPLPcDxwg/b0ddj+Qijo+w0JTQ0S/ilXhe7uTih4fSsUd3nEgI0RYVy6G +iolQ3PZ9gAMPHN4ePplBxdZzL6grejhgKJGsl1BJxas3JtRyiH7Jc3ymOa+K +iss3pzqymznQwRfqVVVHxf7WkraORg7smnFNm3xERSHvrpd/GjhQ1Kc2ENxP +xWtDtxx0iP4rc7kl3Y1PBbvfbC55T/TzhTUrB3U2q2BZtNetYmI+mC1QSF7r +pYI0Lb1Uf2J+mBZTV6P7qWA9mS0jm8SBiSl6qNVOFcw/8iIsPp4DH+q2z3ol +quCH6EklhUgOtDncFc24roLUv01W94l5JX+XL3yYUUGlaz/5y404wCwpLTx3 +ThU5QzNBea/ZMEApuWx9QRVz6Mxfza/YEH/u5qXpy6qoWPJh1fcuNtxNLr7o +elMVo/Yab2F2sMHQozBPtF4Vff9Z69U2smH1sjNZ6e9VMUXQc4t1CRtk/BIO +xWqrYdCC2MXr8WyYlLD339KohgqCa/O/E/PjSKb/lih+DawVdwpcJlcJdt/j +7D6arMJSfx8vLakK+LZdIJqbpIkPJCKEPj+7TfxfyPIeaVyNHJeRyowdJSDx +TONkxXctXON2aosw5SYoZZRvNDHRRqGzx2r6S4ohbw19pWSwDh5bpb8mMrwI +2hTMjaeydfFzsuM+n41XwUypMUvvlR4ajA7zV1MLQZTvakxAij7ONIz9+Rp5 +EUjJZKanhgEOZTcfZhbkgaD61irXJwYYml3h8EL3LOiy5MvjfAyxH57pHbPN +gahBiSZ7nrU4vmrfS/+Jk/B9KnOzXd5a9P/ZKxtidQzW6z3Ot9MxQq2QpIIS +s3RomGL8nuswwv92NvM9CEmBcG3D/s4gYyx3xLzAWweBNRHY7SlogkZjWjzX +ZveBtZqck8hVE2y/s0T7XUwMcMcfUQOLTJDD2mtXHBgDanejZ2uLTbDiv4nV ++9xiYKn988shJSaY2epOZhrFQOOe9J9NXBN01/ziYDUdDevqpnPjn5igTK23 +jktsNJi4dn74/M0EPyk9N6enRIHmoWP7Gmk0vMi49kyjOgLqGdeXOZrRUNJB +ycj5ZgRsnLuf08OkYVBtx+ND+RGwL3ym9Is5DTP8brjzJ0ZAy1b/96KONFzH +8yf2vEUEhNBN7L39aeieXOubd3kP3Pz5XnE6g4YD6U5DSSNhoBVEv6/eT8NN +Fk1REqWhcErF+dfhNzRs8OncRzsbCtPvthl/GKThhiBJp7CDodDglVlyaZiG +T868pwu7hILrxne5suM0rKIJyIvN7YT9jLQIQR5TtDv16ryuzU5oEe+kjqub +Ip+6xOVjP4IhqCEklRtpigb6p4wqooNgImwszjrGFMcav5O1/IJgn/LuXa9i +TdHP64L4HfsgOHZgj+t8gimm+g33L1KDoMIslsJMN0V3ev5Tz85A+FN1uL4p +nzhvo1awwdpAyCm/NP2yyRQPHrySIMG3He4XdgdOStPxWuxEokWnPww5Uv1i +5ej4s/Je0cwDf+BZCPP8rUBH0YH1V6oq/MHChd95GYWOR9ucZgKy/OHxEjOa +vBYdW1zc/27d6A/t2y4Lmq+j4/1tR/Oqr/tBv1poWdYOOq52vTh1oMkHpm/8 +m9O7S0f3IHavpr0XfNpiU3i0ho6pm9QTSgy8oG/pCdvhOjqunwi2tpD3gjp/ +hfPnHtDx304n2dIvnpAiZ2y22ErH8kNX9fdkeMLKjNADbW/oWNTotOG/px6g +HdzDE8Rrhhlu45bJ/u6wXb1EMN/JDM8shFYteegG8Y98QzU2mqFaV9fs/hI3 +yAqSeMp2NUOtwkLZ5efcoP76/syn7mZo6pxe77nLDaQ0bMUWA8xQYNF15JuM +GzzW+CjlH2uGjh4RG+5EbgItTTJF47IZTt6dPhBk7AqTWqdN2D/M0Fgxe6Xu +yAboa0drySkzDNzldym4eQM8CJ/YFDNjhpt6bmTeK9oAJ9l2kSa/zFDK/M/a +hqANoGXGU1rLx0DyznMuK0edYZtdGLVJhoFreM+If5x2gu7g9Su6mQxcOhWQ +dI/iCNVFv9/PZDBQbv2npJpmWzCxjJmzP87Az24p6Z9LbOHO+28rCk8wMF5q +ze81p22BTRqk2ecw0Job/2UuwBZK8x6cuHSBgXRXz7HzPLZQmJlGX1/GwBUd +t0PmzNfD0Rix7LwuBp6Ht2FXuq1BQDKjeLyHgezotGUHGqwhvZKn3qKPgZpU +34nQG9aQOjH56dsbBorgk6i0A9ZwMKSbaf6JgftOt6SUqFtD1NbzX0bnGZjg +1910O8EKvKxUkUFiovwe/aXKJpaw2C0g2kRh4tpz6QtVFEsoDJoYsFdlYp/F +9PEdwpbwKb0mzkuTie2zDxnL31tAVOuG8v2GTMyX7eFYn7CAY84HSNU2THxw +uz2XO2oOtR49f4z2MPGI0t2DnZUIPqO1bfWRxH5xY0q/LyHwxBfmWcUw8Vzg +KjHTTASbC7uM3PYz0apD5NbXHQgv3y7ZHX2YiYfJmd00ZYSxbboDlblMrJuJ +/nNTAUAx7EiN7gMmvus6ddZrlgkn/+0wPt7IxEAe2sPYXibw5thUfm5mYmpk +zmxFNRPGqpbdLGxlYpeLjWxSAhNqeVLzJLqYaDbcvC2JlwleZw7FzX5kYuv0 +t4kFaQbk1e03bhBm4b+RnJ+arnRY4exZqSDKwhBL4bs9JnQ4NGSqE7eShRda +0sILFOkQsmxeTV+ahYoZ6z0SP5oCbUOs1FUSC+dOaR85EG8Krz5ETaUZsHD5 +E54VgTdpIC20u9LJnYWfnTOmTBVMoMgyMf6HJwvdL1q9sf9nDIaJJy1Pb2Xh +m1ulXfEjxuD8o6KnL4BYv04hzqjcGNJfzSxs383CiEQ5V2EbY5i/mmQRn8zC +Ue9Nd3X2G0E/43RXcQkLneLSjBOnDSFkb9FFuzIWzqc2TMi9NYTZsjtB3ypY +qK6xROv5I0OQUOmbM6hi4WK9bd2xXENwEFBWuveAhR73YnwZTEOo7y4O7Oph +YVfy/KVdxwzAXrRaJ7aPhUNFZZLXYgygb33rrNwAC19+8wue8jWA6dqvGb5D +LMzavcxmcK0B6FzRvz06xkJxhz3K/YP6UN9vHps5zkLb8L2Pe1r1wV5qE+j9 +YGHlX/e0Ua4+7DiytzNmhoWvWpveexzXh+kH6fmy8ywUEVrhzI3Vh5Rfudtr +f7Fw0/WysFXb9GGl0U1tn0UWUgzMNdlO+nAprHbm3z8Wvm4ND3Kj68P/AJzv +Q/c= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07896599774681347}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07896599774681347}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943890228243647`*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"3dfa03de-536c-457f-85a5-1dd047df89ec"] +}, Open ]], Cell[CellGroupData[{ @@ -9778,18 +11925,78 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"01995149-3665-fe4e-b326-b20429031afd"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[121]:=",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"52cff8eb-0c77-c944-a54f-e282b00ce766"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1617370909730418`*^-146\\\", \ +RowBox[{\\\"\ +257637673519649270217965438245428568131597200085202201208143960400132\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3853705134253980954253210971658303947407360000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 45, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438902285198*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"174557d7-ad01-42ae-a139-136e631ad858"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.706874017706675`*^-149\\\", \ +RowBox[{\\\"\ +990359217009531794717859144615427415897859637127517261444105383778111\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"32\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3642536072302788149342975054520373833891840000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 46, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389022856757*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"3035b7ac-838d-4528-9e90-07973bc81102"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.907028981919306`*^-151\\\", \ +RowBox[{\\\"\ +393073573231083169323518294497863141369860489975911601067165426821532\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"36\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"7225670969766164742267991391363746716712960000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 47, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389022861205*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"0758b314-0868-4bc0-86d5-c91b90e4d028"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 121, 48, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389022865427*^9}, + CellLabel-> + "During evaluation of \ +In[121]:=",ExpressionUUID->"609b02c3-7436-4312-b30b-17e14a94154b"], + +Cell[BoxData["9.42799254342534`"], "Output", + CellChangeTimes->{3.994389068934609*^9}, + CellLabel-> + "Out[121]=",ExpressionUUID->"bca0f5be-1386-418b-b65f-84f22242aa31"] }, Open ]], Cell[CellGroupData[{ @@ -9856,27 +12063,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507468132763`*^9, - 3.9918507511809216`*^9}},ExpressionUUID->"11b1e372-f457-5a4d-bcee-\ -062a3c04ed96"], + CellChangeTimes->{{3.9918507468132763`*^9, 3.9918507511809216`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cb5a1193-7562-6446-a279-d9f6295d156e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3002717161310517`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 49, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943890689640293`*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"4aaa7b61-6aca-4e8e-8d8a-0dc84a94073d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566b0ad4-7f4e-b04f-8294-646ce1913fac"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.465823354307541`*^-206\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 122, 50, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389068968585*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"94e463fd-8dfb-4e79-9d08-866e3ab71d93"], -Cell[BoxData["0.7273353591556563`"], "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5338008190488537`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 122, + 51, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389068972885*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"259c1a28-fd7c-4c19-af8d-3e1d5a1f518c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 122, 52, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389068976617*^9}, + CellLabel-> + "During evaluation of \ +In[122]:=",ExpressionUUID->"e5ff499a-0ff2-4247-b28c-8b04abbbdb73"], + +Cell[BoxData["0.46003941670843607`"], "Output", + CellChangeTimes->{3.994389074548545*^9}, + CellLabel-> + "Out[122]=",ExpressionUUID->"109bb898-4322-45af-ad19-477cc55f3e93"] }, Open ]], Cell[CellGroupData[{ @@ -9897,8 +12149,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -9943,27 +12194,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185075434021*^9, - 3.9918507570104733`*^9}},ExpressionUUID->"8cb4e371-90a5-d347-adec-\ -3382e7679ba8"], + CellChangeTimes->{{3.99185075434021*^9, 3.9918507570104733`*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4cd45900-7eb0-6b4b-830a-a339e8117392"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3002717161310517`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 123, 53, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389074588076*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"d12285cf-68d0-4f32-9007-d1abd37c95ed"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.465823354307541`*^-206\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 123, 54, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943890745949173`*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"d1f9539e-d5b4-4868-ac14-63b053cf8450"], -Cell[BoxData["3.1005213487548544`"], "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5338008190488537`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 123, + 55, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389074601321*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"bfce10aa-6d74-42a3-9a07-82487b5023fa"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 123, 56, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389074605941*^9}, + CellLabel-> + "During evaluation of \ +In[123]:=",ExpressionUUID->"8dcece3a-589c-4612-b3ec-27aab465e012"], + +Cell[BoxData["25.32145667538348`"], "Output", + CellChangeTimes->{3.9943890803580923`*^9}, + CellLabel-> + "Out[123]=",ExpressionUUID->"1cb9f09e-0e92-4aac-95f2-ecf0618fc6f1"] }, Open ]], Cell[CellGroupData[{ @@ -9984,8 +12280,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10030,27 +12325,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918507598219967`*^9, - 3.9918507622107697`*^9}},ExpressionUUID->"732b358a-c98a-0347-8b16-\ -2462b23d6249"], + CellChangeTimes->{{3.9918507598219967`*^9, 3.9918507622107697`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.3002717161310517`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 124, 57, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438908039397*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"31bba6ee-9de3-4658-a7fe-36bfe48882f2"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"61220452-df6a-154e-8b5c-fecd0ab287a1"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.465823354307541`*^-206\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 124, 58, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389080401189*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"002ecfd1-faac-4cab-8528-b90e868459f7"], -Cell[BoxData["18.198720438459198`"], "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.5338008190488537`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 124, + 59, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389080407021*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"c087a887-3088-40d7-bdc1-378a2930e78c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 124, 60, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389080412278*^9}, + CellLabel-> + "During evaluation of \ +In[124]:=",ExpressionUUID->"1983b15a-69ee-4188-854b-6797c34d2cb7"], + +Cell[BoxData["3.267221878496501`"], "Output", + CellChangeTimes->{3.994389083683869*^9}, + CellLabel-> + "Out[124]=",ExpressionUUID->"3c03ea08-6ac9-4c2c-939f-098b06ac09df"] }, Open ]], Cell[CellGroupData[{ @@ -10059,19 +12399,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918507652122154`*^9, - 3.9918507685850487`*^9}},ExpressionUUID->"3d20548b-905d-0343-8df1-\ -168ec8f367e1"], + CellChangeTimes->{{3.9918507652122154`*^9, 3.9918507685850487`*^9}}, + CellLabel-> + "In[125]:=",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[BoxData["0.09682709699983048`"], "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[BoxData["0.05057796911512835`"], "Output", + CellChangeTimes->{3.9943890837121*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"f4bc35aa-e89e-4f12-80af-d45f54fa302b"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918507716362114`*^9, 3.991850773604473*^9}, - 3.9919245563167305`*^9},ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-\ -e661a25a7ba1"], + 3.9919245563167305`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ @@ -10092,10 +12436,14 @@ Cell[BoxData[ RowBox[{"-", "1"}]], "*", FractionBox[ RowBox[{"Ir", "*", "Il"}], - RowBox[{"Il", "+", "Ir"}]]}]}]], "Input",ExpressionUUID->"601c24ee-3f7b-\ -c74d-891b-10a6d009e34b"], + RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", + CellLabel-> + "In[127]:=",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[BoxData["7.1357426619652635`"], "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[BoxData["8.135559711361369`"], "Output", + CellChangeTimes->{3.99438908372509*^9}, + CellLabel-> + "Out[127]=",ExpressionUUID->"a8962665-46b6-435a-bc6d-5604af67ec12"] }, Open ]], Cell[CellGroupData[{ @@ -10103,10 +12451,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ - FractionBox["Kb", "Qb1"]]}]], "Input",ExpressionUUID->"05949206-8ee0-5646-\ -bb01-e9142212274d"], + FractionBox["Kb", "Qb1"]]}]], "Input", + CellLabel-> + "In[128]:=",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[BoxData["1.4042291233210182`"], "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[BoxData["2.507314371100766`"], "Output", + CellChangeTimes->{3.9943890837325783`*^9}, + CellLabel-> + "Out[128]=",ExpressionUUID->"b4176540-d2ef-465d-9a3e-c749035de883"] }, Open ]], Cell[CellGroupData[{ @@ -10114,10 +12466,14 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ - RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input",ExpressionUUID->"25a02cc2-\ -cb9a-bc4b-93f0-a7873f982a23"], + RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", + CellLabel-> + "In[129]:=",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[BoxData["10.02021766245587`"], "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[BoxData["20.39840578124476`"], "Output", + CellChangeTimes->{3.994389083740201*^9}, + CellLabel-> + "Out[129]=",ExpressionUUID->"24c2e1c2-8718-44ac-af5a-1ee4b786db6f"] }, Open ]], Cell[CellGroupData[{ @@ -10305,10 +12661,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"df51ca6a-83a1-6340-\ -b13c-0185de64c37f"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[130]:=",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[BoxData["0.06461147402889976`"], "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[BoxData["0.008102921763542529`"], "Output", + CellChangeTimes->{3.9943890837517157`*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"3c73ed62-f7e6-48f4-9458-53a775a74ba7"] }, Open ]], Cell[CellGroupData[{ @@ -10320,18 +12680,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"731f0e35-\ -7798-8b45-a769-075ac4b3983f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[131]:=",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], - -Cell[BoxData["3.486503585502317`"], "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[BoxData["9.845190361528195`"], "Output", + CellChangeTimes->{3.994389083823148*^9}, + CellLabel-> + "Out[131]=",ExpressionUUID->"0e36d606-4de8-4b5a-ad6a-dddaf29376b7"] }, Open ]], Cell[CellGroupData[{ @@ -10521,10 +12877,14 @@ Cell[BoxData[ RowBox[{"1.6", "*", SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], - RowBox[{"-", "2"}]]}]}]], "Input",ExpressionUUID->"413c8e7d-149c-5d4a-\ -9ccb-23aebae2e6d5"], + RowBox[{"-", "2"}]]}]}]], "Input", + CellLabel-> + "In[132]:=",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[BoxData["0.01165072070943232`"], "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[BoxData["0.04843994567835326`"], "Output", + CellChangeTimes->{3.994389083835444*^9}, + CellLabel-> + "Out[132]=",ExpressionUUID->"26ffcee4-1d05-4cbb-921a-e380eaa5c79b"] }, Open ]], Cell[CellGroupData[{ @@ -10536,18 +12896,14 @@ Cell[BoxData[ SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], - RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",ExpressionUUID->"e11d7eb8-\ -00a8-f540-98a0-89164ac4bae9"], + RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", + CellLabel-> + "In[133]:=",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], - -Cell[BoxData["8.21047995098231`"], "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[BoxData["4.026642906930141`"], "Output", + CellChangeTimes->{3.994389083922963*^9}, + CellLabel-> + "Out[133]=",ExpressionUUID->"5e88bc25-d1b3-409e-a855-a593656b3eab"] }, Open ]], Cell[CellGroupData[{ @@ -10638,10 +12994,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-\ -1ee89e798d8f"], + ")"}]}]}]], "Input", + CellLabel-> + "In[134]:=",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[BoxData["0.7884625602161152`"], "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[BoxData["0.046564779467990605`"], "Output", + CellChangeTimes->{3.994389083933671*^9}, + CellLabel-> + "Out[134]=",ExpressionUUID->"27934525-3ac4-448a-9a5c-5bb5217a54e5"] }, Open ]], Cell[CellGroupData[{ @@ -10729,10 +13089,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], - ")"}]}]}]], "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-\ -f30d036fcdd2"], + ")"}]}]}]], "Input", + CellLabel-> + "In[135]:=",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[BoxData["0.21153743978388476`"], "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[BoxData["0.9534352205320095`"], "Output", + CellChangeTimes->{3.9943890839420013`*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"57780930-acff-4f53-bcd2-6f3376a5980d"] }, Open ]], Cell[CellGroupData[{ @@ -10853,10 +13217,14 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", - "f2"}]}], ")"}], "2"]}]}]], "Input",ExpressionUUID->"46af1283-32d6-\ -7240-acd2-307af56b44db"], + "f2"}]}], ")"}], "2"]}]}]], "Input", + CellLabel-> + "In[136]:=",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[BoxData["0.16678935135356407`"], "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[BoxData["0.04439650078108801`"], "Output", + CellChangeTimes->{3.994389083951339*^9}, + CellLabel-> + "Out[136]=",ExpressionUUID->"b5cfd34b-98f4-47d3-9a72-cb21c91b02a6"] }, Open ]], Cell[CellGroupData[{ @@ -10918,27 +13286,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507910247746`*^9},ExpressionUUID->"cd516020-ac7f-224d-b1ff-\ -af0307420662"], + CellChangeTimes->{3.9918507910247746`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"b82c1933-5313-1d4c-a858-68be8f118333"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1014474085009798`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 137, 61, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943890839637136`*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"9c0d1c8c-87d8-4e93-9c12-c3f7bb3bcf4f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.8678897996576535`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 137, 62, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943890839687567`*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"54c48724-4f8b-465f-9473-8022c454cc5a"], -Cell[BoxData["3.486503585502321`"], "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1513828911596143`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 63, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943890839732637`*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"3c9dbbe1-7deb-41dd-a0da-283b0efec52c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 137, 64, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389083977874*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"4b7e8b54-66d5-4859-94e7-e4e68488c028"], + +Cell[BoxData["9.84519036152819`"], "Output", + CellChangeTimes->{3.994389087054151*^9}, + CellLabel-> + "Out[137]=",ExpressionUUID->"f238d632-881d-483b-bc4e-046fcbd6317b"] }, Open ]], Cell[CellGroupData[{ @@ -11000,27 +13413,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918507936164455`*^9},ExpressionUUID->"a9d0e817-a1c8-6546-a901-\ -34313c6ec04d"], + CellChangeTimes->{3.9918507936164455`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1014474085009798`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 138, 65, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389087093524*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"ea5cc08e-2c9d-495b-a919-9db97dc22f5e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"56712e4d-1aa7-524a-8254-bcfd8978eea0"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.8678897996576535`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 138, 66, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389087100588*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"5bb536ec-069e-4418-9f9e-21253d96b298"], -Cell[BoxData["8.210479950982325`"], "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1513828911596143`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 67, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438908710658*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"07f43ec4-d1c6-4b2f-89a8-d3fa800fabeb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 138, 68, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389087112063*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"0c5f7e84-2513-42cb-9d26-3f78e742618f"], + +Cell[BoxData["4.026642906930141`"], "Output", + CellChangeTimes->{3.994389090127531*^9}, + CellLabel-> + "Out[138]=",ExpressionUUID->"9ad1aa3a-c548-4289-8e48-1db227cebe42"] }, Open ]], Cell[CellGroupData[{ @@ -11078,489 +13536,394 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918507961174965`*^9},ExpressionUUID->"f68960b0-cff6-3245-b906-\ -ad38cf07d634"], + CellChangeTimes->{3.9918507961174965`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9c6ce535-b42f-3c43-a89e-eda48c04121e"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], - -Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.00529101 -0.551091 0.817918 [ -[.15608 .25433 -6 -9 ] -[.15608 .25433 6 0 ] -[.28836 .25433 -6 -9 ] -[.28836 .25433 6 0 ] -[.42063 .25433 -6 -9 ] -[.42063 .25433 6 0 ] -[.55291 .25433 -9 -9 ] -[.55291 .25433 9 0 ] -[.68519 .25433 -9 -9 ] -[.68519 .25433 9 0 ] -[.81746 .25433 -9 -9 ] -[.81746 .25433 9 0 ] -[.94974 .25433 -9 -9 ] -[.94974 .25433 9 0 ] -[.01131 .02145 -18 -4.5 ] -[.01131 .02145 0 4.5 ] -[.01131 .10324 -18 -4.5 ] -[.01131 .10324 0 4.5 ] -[.01131 .18504 -18 -4.5 ] -[.01131 .18504 0 4.5 ] -[.01131 .34862 -18 -4.5 ] -[.01131 .34862 0 4.5 ] -[.01131 .43041 -18 -4.5 ] -[.01131 .43041 0 4.5 ] -[.01131 .5122 -18 -4.5 ] -[.01131 .5122 0 4.5 ] -[.01131 .59399 -18 -4.5 ] -[.01131 .59399 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 -.15608 .26683 m -.15608 .27308 L -s -[(25)] .15608 .25433 0 1 Mshowa -.28836 .26683 m -.28836 .27308 L -s -[(50)] .28836 .25433 0 1 Mshowa -.42063 .26683 m -.42063 .27308 L -s -[(75)] .42063 .25433 0 1 Mshowa -.55291 .26683 m -.55291 .27308 L -s -[(100)] .55291 .25433 0 1 Mshowa -.68519 .26683 m -.68519 .27308 L -s -[(125)] .68519 .25433 0 1 Mshowa -.81746 .26683 m -.81746 .27308 L -s -[(150)] .81746 .25433 0 1 Mshowa -.94974 .26683 m -.94974 .27308 L -s -[(175)] .94974 .25433 0 1 Mshowa -.125 Mabswid -.05026 .26683 m -.05026 .27058 L -s -.07672 .26683 m -.07672 .27058 L -s -.10317 .26683 m -.10317 .27058 L -s -.12963 .26683 m -.12963 .27058 L -s -.18254 .26683 m -.18254 .27058 L -s -.20899 .26683 m -.20899 .27058 L -s -.23545 .26683 m -.23545 .27058 L -s -.2619 .26683 m -.2619 .27058 L -s -.31481 .26683 m -.31481 .27058 L -s -.34127 .26683 m -.34127 .27058 L -s -.36772 .26683 m -.36772 .27058 L -s -.39418 .26683 m -.39418 .27058 L -s -.44709 .26683 m -.44709 .27058 L -s -.47354 .26683 m -.47354 .27058 L -s -.5 .26683 m -.5 .27058 L -s -.52646 .26683 m -.52646 .27058 L -s -.57937 .26683 m -.57937 .27058 L -s -.60582 .26683 m -.60582 .27058 L -s -.63228 .26683 m -.63228 .27058 L -s -.65873 .26683 m -.65873 .27058 L -s -.71164 .26683 m -.71164 .27058 L -s -.7381 .26683 m -.7381 .27058 L -s -.76455 .26683 m -.76455 .27058 L -s -.79101 .26683 m -.79101 .27058 L -s -.84392 .26683 m -.84392 .27058 L -s -.87037 .26683 m -.87037 .27058 L -s -.89683 .26683 m -.89683 .27058 L -s -.92328 .26683 m -.92328 .27058 L -s -.97619 .26683 m -.97619 .27058 L -s -.25 Mabswid -0 .26683 m -1 .26683 L -s -.02381 .02145 m -.03006 .02145 L -s -[(0.7)] .01131 .02145 1 0 Mshowa -.02381 .10324 m -.03006 .10324 L -s -[(0.8)] .01131 .10324 1 0 Mshowa -.02381 .18504 m -.03006 .18504 L -s -[(0.9)] .01131 .18504 1 0 Mshowa -.02381 .34862 m -.03006 .34862 L -s -[(1.1)] .01131 .34862 1 0 Mshowa -.02381 .43041 m -.03006 .43041 L -s -[(1.2)] .01131 .43041 1 0 Mshowa -.02381 .5122 m -.03006 .5122 L -s -[(1.3)] .01131 .5122 1 0 Mshowa -.02381 .59399 m -.03006 .59399 L -s -[(1.4)] .01131 .59399 1 0 Mshowa -.125 Mabswid -.02381 .03781 m -.02756 .03781 L -s -.02381 .05417 m -.02756 .05417 L -s -.02381 .07053 m -.02756 .07053 L -s -.02381 .08689 m -.02756 .08689 L -s -.02381 .1196 m -.02756 .1196 L -s -.02381 .13596 m -.02756 .13596 L -s -.02381 .15232 m -.02756 .15232 L -s -.02381 .16868 m -.02756 .16868 L -s -.02381 .20139 m -.02756 .20139 L -s -.02381 .21775 m -.02756 .21775 L -s -.02381 .23411 m -.02756 .23411 L -s -.02381 .25047 m -.02756 .25047 L -s -.02381 .28319 m -.02756 .28319 L -s -.02381 .29954 m -.02756 .29954 L -s -.02381 .3159 m -.02756 .3159 L -s -.02381 .33226 m -.02756 .33226 L -s -.02381 .36498 m -.02756 .36498 L -s -.02381 .38134 m -.02756 .38134 L -s -.02381 .39769 m -.02756 .39769 L -s -.02381 .41405 m -.02756 .41405 L -s -.02381 .44677 m -.02756 .44677 L -s -.02381 .46313 m -.02756 .46313 L -s -.02381 .47949 m -.02756 .47949 L -s -.02381 .49584 m -.02756 .49584 L -s -.02381 .52856 m -.02756 .52856 L -s -.02381 .54492 m -.02756 .54492 L -s -.02381 .56128 m -.02756 .56128 L -s -.02381 .57764 m -.02756 .57764 L -s -.02381 .00509 m -.02756 .00509 L -s -.02381 .61035 m -.02756 .61035 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 -.5 Mabswid -.02381 .60332 m -.02499 .60331 L -.02605 .6033 L -.02729 .60328 L -.02846 .60326 L -.03053 .60319 L -.03279 .60309 L -.03527 .60295 L -.0379 .60276 L -.04262 .60232 L -.04749 .60174 L -.05205 .60108 L -.06244 .59913 L -.07305 .59653 L -.08274 .59362 L -.10458 .58527 L -.14429 .56405 L -.18248 .53718 L -.22313 .50297 L -.26226 .46595 L -.30384 .4238 L -.34391 .38185 L -.38246 .3414 L -.42346 .29931 L -.46295 .26047 L -.50092 .22522 L -.54134 .19038 L -.58025 .1597 L -.62161 .13033 L -.66146 .10526 L -.69979 .08415 L -.74057 .06487 L -.77984 .04937 L -.81759 .03723 L -.85779 .02721 L -.87627 .0236 L -.89648 .02036 L -.91652 .01788 L -.92745 .01682 L -.93762 .01604 L -.9426 .01572 L -.94801 .01542 L -.95278 .0152 L -.95783 .01501 L -.96238 .01488 L -.96496 .01483 L -.96738 .01478 L -.9696 .01475 L -.97163 .01473 L -.97275 .01473 L -Mistroke -.97397 .01472 L -.97512 .01472 L -.97619 .01472 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztXAmQHFUZ7uzM7JnsJhCSEI5sYpLdHCQhESODQSHRcFSioIgiIEvIkmAC -MQTQgMilIiIZLxQNXmhUrOIsxyqPKkBULMqrBAGnKEGMIIgRBBFBxnlH//O6 -5/vem55dKE05yfROf/393//3/16/9/r1sWpoy7q1G4e2rF8z1L9y89CmdevX -nN3/prM216DcmCgac1Pt290fqd/VKIoX1dr/6s1qoZDWf/frP7nIiFbNVy2v -yrC9zcRV+7VtFFU929v0n0JUrZSj4WJkPsXhqFzRqLYtD1u4VI7aLVatlKJi -sRRVamudzMf5atGl4G7jzVKr1UpUsk70unZeW69W88Bnh8VKxWJUsiYdzOdG -tehV8J7WZ85sVIrDZbuWiyqlYk28otfGAYw6OF0t2hU8PeEgNo4dxA5dB27W -tIOclPe71aJTrQ40LdsLEtPO4j5eHCzM7MBNDHVwjCRmaUPmXQeuWC9IDHWw -WjK2zDrI16vTsDZuk+qja5Ne6xasnqU2gBWY36PF7xtSB021rHMfHzRKaWyq -Akc6D2Y5XK6Kcp55W6kWeQUvDxzCKySulbAJOVy2HxVQWiY+VwWYBwvzmADz -IGEeF2AuljjfGWAukh08Ee7xAlE6OaA0TwyHAsw5wlwTYM4W72sDzJmiuS7A -nCHMMwLMeio2wNxMk9UzA0r7CnNTgDlVmJsDzCnC3BJgThLmuQHmRGG+L8Dc -Q5hbYW4myOoFAaVeYV4YYI4V5kWGmbWrLVh+RbWfUfwx7RXtnbrF6yXGa2td -rsE6TNtd6wwqsQ/d1JqWjrbTnRLDZTaGcBfcDbA2J7C46aSNdLs4/XDCqa97 -63awosVip26fWpADW6/nxdXlTbvqiQuzVHNVk1b/VP7VftHCbBNHV2TcJyWp -CriULLmaQ28Pq31d2VBorPdO5C9job0EsNhzhm69IzF0kJodGR7a0RdlR7el -jkvQm4+Lt7nHoN2Giu0FgHlG8v8CWCndQj0vvz7FlZ4DmIf+rGhezUnPAMxD -f1o0r+GkpwDmoe8Sze3ptOwC9O1c6UmAXcvpT4ifL3PS4wDz0B8Tzes46VGA -eeg7RXNHOkE7AX0HV3oEYN/g9IfFz/Wc9BDAPPTfA+zbnP6ghHBDet8fBPQb -uFIFYDdy+gPi5xZDytq15yG/1iPUtqGz6fsBZl231r+boNqjSkyvfdW5UGQa -UtRu3gewW20M4f69zwkixlC3cK+ktpzQ9nV5fS5WLFHtewDWvJcem7J0V1Au -6/5Hp0xr/wa4+W7TbhL9txrtlStSoCVbQqh4fi2J+15DoTTTf0ep8Y/qVoc9 -BfUrgMWeM52Wuzsa8yq1nJY9p+W/BNj3U4dis725GoiRQdgvAPYD3iz8HGA/ -5PS7pcRuc0gauBvQb+NKPwPY7Zx+F8Du4PSfAuxHnP4TgN3J6T+mmJOPO+XX -XVzpDrqrkH47TSSkz01UV/PRsxtRV2JeR33LpXT9qkSDtu6hbbg7MI35HOd4 -jIe5BY/WVBB7fAhVnUmpnI09bgvkC2Lwxbc/1c472jpnhQzp4rKNIWdNKdfO -JbTbMqa+h9eeeVHcABblfNrI9yTOlPTuaE5J+mbVGCpXiqOnmGptlY/TZjme -IYHUKvcsN9eE9hSwb10eLV8MzcTZT7VHnkuuPfL8Iu32Fv1182o132J6isiG -gjr1uXEADqa/Zh2NDQYB1gmkJ4GwuumeorFGe8JHIKxpQDrfZBaQbWf2zCCZ -9iaz1cXL8gBpbVQ1MtJdQIKVpXWN8jwo0o0X7VzeXiCsHk9ZNk7WZQoLJbLQ -ZBaylGXGEHyXOFlZ6rHJQklORQuqgzc2VAd43DDFJehigThRe90BpCeCEhwL -bF/GEmxvMgu+EsyQGSTju2DsSnuOxnpZ1uuhJMgZAkr/X6oM+DfzlOOihkWD -pdFxOw7k4GUs9Y7s+ZpOIxxxDn0RZshrkwO6uDrFA4P0IMSom4FB8jQiOUuN -ptHdaNGpQBvQmwziRbcK5Khf3CUXcQGgZOdaTM9MX5gtpMxbVQNp7A2Vvr32 -ENWlzbDNrf1JSW/p16dLIjRfMstJafI2ho4Elk4pGqCZLqEgIyY19xKnKE/j -6UjEY77+mPcN+smew+lNxZ49v+FYs+feU4Xmu+6k1THzVMkabz56hKE1GqtE -iOebExuQXas3fibSAjhK6yfKrr6egNWOx+v1vE62OUXWySl4Ash7tk3zy40k -d/th6fwopJREnZ6HbyXTnhFLGWD3cPp3AHavQ9c7jUi/5Zq3Auw+Tr8FYPdz -+s0Ae4DTbwLY7zj9RoCZPsS0oPpm0c+rxRgugiaR0fWckWCvhI9Xzm8+gdU+ -6NrG/8au7M7F9P/aPso+1Gd3yd/uVUawqi8ZAdYFsIFR9rEnD/16gD3E6d8C -2MOc/k2A/cGh62EEIj3CNXcA7I+c/nWA7eT0rwHsT5x+HcAe5fSvAuwxTv8K -wP6cTh8iPc41vwSwJzj9iwD7C6dfC7AnOX07wP7K6V8A2K50PhDpb1zzGoA9 -xemfA9jTnP5ZgP2d068G2DOc/hmAPcvpnwbYP9LpQ6TnuOYnAfZPTv8EwJ43 -9Mi5TSiKr57jS66NN0uFL9eiJypKADM3XQodXX1o5emjbQB7gbvqa1L2KoC9 -OHLZjwPs3y3IaoUrgdhLI4/xYwCrjlz2CiZrT+zsKQiYB4rvH0JTRGhA8VHm -yVRzW9sbJgp6MYw8XM485PgR+hFmk3dsdEtBmQWu/iFm085tLmM2HdzmUmbj -GcVdwmw80yoXMxvPZfmLmI17QcF5NAQwx3L1C5nNOG7zAWbjmaG8gNn0cZvz -mc14brOV2UzgNu9nNnukM0yZniHzecxm4ujanMts9uI25zCbSdxmC7OZnM4W -ZU7h6puZzd7c5r3MZiq32cRs9jE2LQ4v0IRxbBt6YPMsFpK5mND0GMO9vpC8 -pSn8IM2ZLIb9eAzywLNzxww6Td3ItPfn2vVHeutXgnWbrGU2MMVpXFHu73bu -KEAd+3uYdj/XHu+WvsXRFOQZTHs6164/Cpy+CBou1fXM3wxb2QODFP91NbSH -65jHVxmP3sEKvhaDCul05mYmP/KHmc0sx0a3X1R9Fldfy2xmc5vTmM0At1nD -bAa5zanMZg63GWI2c7nNKcxmXjrDlDmfq5/MbA7gNicxmwXc5kRms5DbvIvZ -LOI2JzCbA9PZoszFXP0dzGYJtzme2bya2xwnUer1pZz5NqbusXkrs3kttzmW -2RyczitlFrn6W5jNIdzmzczmdcamxTEHvYu8ZocazdUsDPsijGzjDHMLTuKx -bnuXvIob9Q2rmP9Duf8JFnPvy0I93dHJangYV5S+uuLvq49i0Xq05ZxbJpnU -E0nV+hzHkUz08CYD9nS9RzDt5eH0hgYSK5n2CluDwwMJU1vkPvfQQOKNyQK1 -7yYJDh9K9ec0PI9krWC7474CJbV9ObM5wrHRAVPmkVz9MGbjeenK65Mp8rx0 -5VCm7rFZxmxWc5tDkhF5Xu5SZOquTZspRcI8lqsvTcbheXXMa5i6x+YgZvN2 -brMkGZHnFTWLmbrH5kBmc0I6m4uScZzENRcwTY/N/KT6KZw5N8k8lTMHk8zT -OHN2kjmc3vdZye2el+bMSDI9L83pTzI3cKY+kc4J074+p8Wu37SYBXt6Vv+o -Bg+1pvskwzQTJ013+J0OFvcSyMveSS9ncy/jm1ScnFQ8hyvGp8nqvt34k7PL -hgkYvWFiskDOC2nbu9ud++hs9KiH0bMNBRHfysXlcoAK3I5w4rQgZT37mxfl -D4aVzYyHGZf5lLVGhyhfamso7dr7Yis7R1As1tNRl7EvnSE9twxubH3zvsnm -v/odiPr3KLwBMhrzH2bRmaY=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-14.8518, 0.65382, 0.693802, \ -0.00448812}},ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], - -Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-\ -8b4ad9ffca61"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk4VF0YAHBrKUsihmxZiyjNIKLOW3YhoexLY+aSkL0JoUQrifZCQkkk +ElkqReWTomhTCWOQnWxX6Dv9cZ/7/J7znPe85z2bIv2gPZOHi4urH3///iHv +NqytaHm3Lbz19TFJaTbaNpKrSzcpRD8T7lf+c2eW3gUVkxqk2+7pScG2Y7xd +IkR7iTw6vgRLYZew4ur4TZpQeobsuDT2qVdStXEF7xFNQ+OnDHZlS0jmPPUj +ErnBbSiPPdDeGHO4+gsSEc3hU8RezVF2mzb+juLzRYxUsHeOxhiENf1E3WdN +utZiP50fEGQVdCHxAZPJ9difjlKiy4Nwv4kVEdrYI0tMBiapHOT8Pc9HF3vJ +2WAX2kwvYnKW1G7Bll+Z0RBS3Y/W7qKdBmxbmenbI8ZDqIQY9bXBJm4qSWoJ +jKDrpXHRjthxqrsSDzSNorjr3+fdsL9Q2jaFF4yjkKoFiwBshqv//vSzE6jp +8QvxCOyxG1zZpUG/UWXPHutYbAElLdFx6hR6c65/SRr2BUaduajENArh/nXy +BvaaOy5xG2em0YXEStYdbH3NpJHA6lm0vacp+ym2n97PpgHjeeQ21yQ9gT3J +iuBbrraA/Ns9lnOtZqP4akEjdYFF1Jhe5yeCfQX07/k2/UU9LqIHNbEZeQ0m +oQXccK65LjsQu+BVeudRGR74MLaCOw57rM8z5vxZHgjh3fwuFTtGY+rhgyBe +aA6QLn2EfaFYUXmUyg/zJyxu8smwUXvL0NPFHH6YNksMksZeM1HhKiKxBI55 +5xZswC7UsU3TmlkCXdXJAa7Y9ZVR3AHVAlDTp0GpwJ6qa/3ZbywEtmSKQKIs +G4lZC4lGPxWCdqsAkRxs7TYTEDYQBr1TiRefY/v3PLq5aYMILC0PXcslx0bB +PE3aW4VEIee//a4J2Byl++OJ0yth7mjoYrY8rg/RuKyZJga3BYelGrB57vUq +SoWIwbGwF2Uj2GtoCvYFg2LgdyUpeKsCG7kap5a+6xQHj/7S2U7sZp/QMMob +CZDhuWsDimzUcSfljLeAJCg698YGYQ8NFuTcNZWExOe5mzKwl4ezWw1rJSHF +pVhmHtvkuKOO9yMK8PCb89QqsVFVrt5UfpY0SJn/lvFWYaNczlzklnA5mF/l +eIl7HRtZ7DnREVYkB+fjH3wyxB6qFzcr6pWDoHmrk5HYOrmaEmtc5IH/nika +xq6nez7k36YA4c9z5n+qs9HEaOeh/oQ1kN6UU9G+no3EA03KHtooAcr9ZqKq +zUa9ucv97PyV4EPrdGkg9uPvLTLDSUog+aQ8rRzb3dojQa1WCQq4aXcsN+H8 +1kfaX6Uqg6LfMZUIKh5/4M5YLEUFLthVhHXpsJGjr6CWVZcqSKkGxa3YwkYo +cg/VaUEVFH+qRDCwNRKzNjOk1WDqffKXSmyuHNqO2N1qUO+b1M80ZKOiDjen +0udqoJ2WoFVnhM/n3sKjq2+tha0Mi11pCOdnYvNpgK4O/ru+rEgwZaMch8vf +ZmLVQerjTB0HO4Xe1cl3XR1s9jr0Wpjh/R0fMSjfqg7721oiRM3ZaGVNBpeD +sQbYX/arzbXA+4c2olGtvB4K91MFuneykYzSubgzPZqgnXnweLE9G9WcnlQn +ebSgNmn0sroDrsdvlzZCUQt2SnZq5WJn1quo7/DUAnuBDV3XHNlIybfqw+xn +Lfj7eguRshfPt5CjSrzZAO7tq8eSXdlITkaeWOOiDdb/HdIZpbORZl640B9E +hWuthkpGEWxEZyRMadlS4V764QdN2FeU0zq83anA7zlb4hHJRry3ih+8YlFh +e0SbyNFD+LxlDjimlVBh7cnX2m8P4/v0ineGujINxjgPZKJj8fqesd7gvEQH +0ipcn2mdZKPsUBW7R026wHop/WP0BhuVdtSekfquC2R+Nk9hBhu9sPJ4HT2o +C07rH5f4ZbJRj9KlbTuW64EUs6qQncVGaq1LtZrN9SAsQ4/SeQufZ9rgsl8v +9GDOzuj1RD5en8mSOtnKzdA06dQR94iNWiLR5uN5BpDCs2avYQsbKXp+tPUI +2Aqrny0yFAR7EPNv+X25wwCx5pXPPlv2IMrg46UU+g5otp4JTL7Ug8JpRt/T +NExgL7nO43RvD6IPzzeID5jC10bdat6tHFS0I2xpVrM5fN9g6iWXy0G5k/7P +Cy9YQu0B1xMmwr1odrvU2/q4nfBRP5tifaoX/eDiHe/aZwN3dptlJgr3oSDZ +g6lHlXfB+ohaCEnrQ/f3N9ReTLSDczI0ay+tfhT1W3pm/f7d4M41dHNPQz+a +sjLb+9rLHrjjAswao38hA7fz2zm7HcBz+xul7s0D6IN0hn89zRFs2nyT1SYG +0OrbCTX56/ZA7G+O9sLrQfS4U8PaVngviFbsXvX52hCSbxvzjRzeC5RVtiFc +4cOIdvF8YU6nE/hqyiQpHhhBGXy/N6TVOcP1O+bldu6jqHz7xvbEShfYN8Vr +R9cbQ1c2n145X+AKSmp+wj7Px1Dzt7wk2lk3oM8rFLmYj6NHNjdUguPdoWHt +y5LG7+NoPNCBK4jhAauOZM9dOjCBpszU/UaMPWHxuOZrkpxA+cNfZ8P0vACt +SFLacek3cs7O8/EQ8gYXk11tL9ZNooelO714T3jD+ZNC2uKvJ5GBzAfyFOkN +9XcHNFVcppByp2/7+/37YGhjoIQXZwr1CB7YdYO9D1q6FZ+msqZRS4qtj/ke +Okj0fCLr/uB3jZUlGNFCBwVZrV+MozOo5ulf0sfSB79HBtyUuRm0wh1O0Kp8 +QPKRUE6x1ywy8B7JT9RhwMisNO/G2ll0++pYmK0eA6J4z3hFPZ9Fq1ontlH0 +GRAQ1d5R/2IWjZjOtOUbMsBX7IOJ08tZfH9xcTftYEB5r2teSOMsEplZ6SK2 +mwFcVEpYTNss6knWXZYVyADBTEfZ/r5ZlFIds//xbQZc1RSRWCpEokDqZQNW +PgNWPX/rLy5MIuu7Jcv0CxggVLTwVV6ERMsv996tKGKAhcQ9XpooiRJD7QbK +yxhw7+SGI3arSBSjrnLg0QsGBOYLvveSJZH/5TcBpR0McDOaMH+3nkSWIr1G +oZ0MeBJTtvuJJonWJXIJU7sZsM5QI/CeFol6Q3WLSjgMOPzH9MvxjSTaZ5s1 +/GCIATUXu1maNBI584cFFc9hk7EltltIZB62OrhQkgmtbf8d/mFOohdZSVZp +UkzodXVafGZBIqOmCRXWaiaIiWyhZ1uSSFv1zVdjeSZIdE2/8t5JIunP0cbf +VJlQVaC28N6WRINbfkgu12XC30zVniN7SHSO5+YTXwcmuNvtGCT34flvFLpi +s4cJJiG+nRV0Eh13Y4XSnJgQ529QFO5DIlaZ3dq/rkzo2Mr3doCB8ye4z1+i +MyFSWkPhP18S0RrpjJchTLj4+2CHTSCJPp9XFVROZUKwiLR35CES3UfCfv3n +mRDPo1nNx8Lxhyfri9KZwD35UCQNm2pZH6t/mQmzT89l3j1MohQunwmbTCYY +iMd7NEWTyOzgza+sQibQxfwMOuNIJCd3Um/bfSZ4bpMW9Iwn0WTjwXTeB0xI +Yq1sbce+pYZsUh4ygd3iaPr+KIkWfvyozanC4y3mFZckkKjMWib/XQMTFnQs +4+EEic7M8fBfaMT1HXp4pwibnj+wz6WJCXkx0XXSJ0kkylcl09PMhICp4s8j +2AHVzufIT0zIUMw7ePY0iZQ1LkWqcJjA0Xc1u5hMornPR1p/9TIh3bDj9jh2 +SyJTu7gfj/dMes46hUSxXToDBkNMiI1xYnGdI1H7lVaPXb+ZEOXs+d41lURp +S1eaRnETUBPP1/09jUQ1Ez/cwnkJSDv1SnpTOon6fhSEBvETYEcFruPYRmUm +N+nLCFDrGv6iegHvN2/WH6uVBHRRHcpdLuL8rU3FTMUJsKoc9c7BNtwspo4k +CKgViKwcxE4VLtxLkybgrllXGOsSbq/6WSKjSECdxUPBY5dJROQVNkgoE3BW +Tlb5OXZq6uGfK1QJ+BRX07eI3UuIC/OpE1Av4MCKvILbxc39hrSxDSvL9lwl +UdWieFwvlYDPCU9op7E5vzovduoQMNVO93qCvaU2qq5Nn4CySpsahWsk6gm4 +L/8ECKA86jvdhi3iHK1bsQPPh6MTuIhtYGxhXWJCwN/4/D9q1/F+ke4+nGdB +wIfht7Lh2I/5ilOzrAjg2BPFV7DZo9F3rloTIGE5MVyNrf9K4mOyHQFRHeVB +i9j0ku7BE/YEBKd+fSB3g0TJN4p5jjni8cm6TEPs7lBL7UhnApx6Go6EYQt7 +SpoHu+J6z7UEJWPrW7I9/N0JEBmOFrz9r7/CkTOe3gTo0q+Zt2I/Xm51y5lO +wOjsYm/fv3hTkpX2DAI+Xuzf9OdfvC52szVBQMU3u3XCGThe04NeMz9cjx+b +GuWw6RVHFsCfAH2FJIoWdvItq1WGAQRMpluIGmI/Tqas1w3C8bPCy8yxu1k9 +2zcGE5BCWcLngC3EKHFWDyUgEZGL7tibd8UeVA4noLfJKo/5L/6WnUlykQSs +5cxMB2CfVZXKoLAIkJVf/B2KXS7KebgyioDxI243DmF3/SlpFIwhwDpaZCzq +X/y+2C7+WNx/QWI0Blvvw87Zv3F4vVxDrh7B/h/+tOHV + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk4VF0YAHBrKUsihmxZiyjNIKLOW3YhoexLY+aSkL0JoUQrifZCQkkk +ElkqReWTomhTCWOQnWxX6Dv9cZ/7/J7znPe85z2bIv2gPZOHi4urH3///iHv +NqytaHm3Lbz19TFJaTbaNpKrSzcpRD8T7lf+c2eW3gUVkxqk2+7pScG2Y7xd +IkR7iTw6vgRLYZew4ur4TZpQeobsuDT2qVdStXEF7xFNQ+OnDHZlS0jmPPUj +ErnBbSiPPdDeGHO4+gsSEc3hU8RezVF2mzb+juLzRYxUsHeOxhiENf1E3WdN +utZiP50fEGQVdCHxAZPJ9difjlKiy4Nwv4kVEdrYI0tMBiapHOT8Pc9HF3vJ +2WAX2kwvYnKW1G7Bll+Z0RBS3Y/W7qKdBmxbmenbI8ZDqIQY9bXBJm4qSWoJ +jKDrpXHRjthxqrsSDzSNorjr3+fdsL9Q2jaFF4yjkKoFiwBshqv//vSzE6jp +8QvxCOyxG1zZpUG/UWXPHutYbAElLdFx6hR6c65/SRr2BUaduajENArh/nXy +BvaaOy5xG2em0YXEStYdbH3NpJHA6lm0vacp+ym2n97PpgHjeeQ21yQ9gT3J +iuBbrraA/Ns9lnOtZqP4akEjdYFF1Jhe5yeCfQX07/k2/UU9LqIHNbEZeQ0m +oQXccK65LjsQu+BVeudRGR74MLaCOw57rM8z5vxZHgjh3fwuFTtGY+rhgyBe +aA6QLn2EfaFYUXmUyg/zJyxu8smwUXvL0NPFHH6YNksMksZeM1HhKiKxBI55 +5xZswC7UsU3TmlkCXdXJAa7Y9ZVR3AHVAlDTp0GpwJ6qa/3ZbywEtmSKQKIs +G4lZC4lGPxWCdqsAkRxs7TYTEDYQBr1TiRefY/v3PLq5aYMILC0PXcslx0bB +PE3aW4VEIee//a4J2Byl++OJ0yth7mjoYrY8rg/RuKyZJga3BYelGrB57vUq +SoWIwbGwF2Uj2GtoCvYFg2LgdyUpeKsCG7kap5a+6xQHj/7S2U7sZp/QMMob +CZDhuWsDimzUcSfljLeAJCg698YGYQ8NFuTcNZWExOe5mzKwl4ezWw1rJSHF +pVhmHtvkuKOO9yMK8PCb89QqsVFVrt5UfpY0SJn/lvFWYaNczlzklnA5mF/l +eIl7HRtZ7DnREVYkB+fjH3wyxB6qFzcr6pWDoHmrk5HYOrmaEmtc5IH/nika +xq6nez7k36YA4c9z5n+qs9HEaOeh/oQ1kN6UU9G+no3EA03KHtooAcr9ZqKq +zUa9ucv97PyV4EPrdGkg9uPvLTLDSUog+aQ8rRzb3dojQa1WCQq4aXcsN+H8 +1kfaX6Uqg6LfMZUIKh5/4M5YLEUFLthVhHXpsJGjr6CWVZcqSKkGxa3YwkYo +cg/VaUEVFH+qRDCwNRKzNjOk1WDqffKXSmyuHNqO2N1qUO+b1M80ZKOiDjen +0udqoJ2WoFVnhM/n3sKjq2+tha0Mi11pCOdnYvNpgK4O/ru+rEgwZaMch8vf +ZmLVQerjTB0HO4Xe1cl3XR1s9jr0Wpjh/R0fMSjfqg7721oiRM3ZaGVNBpeD +sQbYX/arzbXA+4c2olGtvB4K91MFuneykYzSubgzPZqgnXnweLE9G9WcnlQn +ebSgNmn0sroDrsdvlzZCUQt2SnZq5WJn1quo7/DUAnuBDV3XHNlIybfqw+xn +Lfj7eguRshfPt5CjSrzZAO7tq8eSXdlITkaeWOOiDdb/HdIZpbORZl640B9E +hWuthkpGEWxEZyRMadlS4V764QdN2FeU0zq83anA7zlb4hHJRry3ih+8YlFh +e0SbyNFD+LxlDjimlVBh7cnX2m8P4/v0ineGujINxjgPZKJj8fqesd7gvEQH +0ipcn2mdZKPsUBW7R026wHop/WP0BhuVdtSekfquC2R+Nk9hBhu9sPJ4HT2o +C07rH5f4ZbJRj9KlbTuW64EUs6qQncVGaq1LtZrN9SAsQ4/SeQufZ9rgsl8v +9GDOzuj1RD5en8mSOtnKzdA06dQR94iNWiLR5uN5BpDCs2avYQsbKXp+tPUI +2Aqrny0yFAR7EPNv+X25wwCx5pXPPlv2IMrg46UU+g5otp4JTL7Ug8JpRt/T +NExgL7nO43RvD6IPzzeID5jC10bdat6tHFS0I2xpVrM5fN9g6iWXy0G5k/7P +Cy9YQu0B1xMmwr1odrvU2/q4nfBRP5tifaoX/eDiHe/aZwN3dptlJgr3oSDZ +g6lHlXfB+ohaCEnrQ/f3N9ReTLSDczI0ay+tfhT1W3pm/f7d4M41dHNPQz+a +sjLb+9rLHrjjAswao38hA7fz2zm7HcBz+xul7s0D6IN0hn89zRFs2nyT1SYG +0OrbCTX56/ZA7G+O9sLrQfS4U8PaVngviFbsXvX52hCSbxvzjRzeC5RVtiFc +4cOIdvF8YU6nE/hqyiQpHhhBGXy/N6TVOcP1O+bldu6jqHz7xvbEShfYN8Vr +R9cbQ1c2n145X+AKSmp+wj7Px1Dzt7wk2lk3oM8rFLmYj6NHNjdUguPdoWHt +y5LG7+NoPNCBK4jhAauOZM9dOjCBpszU/UaMPWHxuOZrkpxA+cNfZ8P0vACt +SFLacek3cs7O8/EQ8gYXk11tL9ZNooelO714T3jD+ZNC2uKvJ5GBzAfyFOkN +9XcHNFVcppByp2/7+/37YGhjoIQXZwr1CB7YdYO9D1q6FZ+msqZRS4qtj/ke +Okj0fCLr/uB3jZUlGNFCBwVZrV+MozOo5ulf0sfSB79HBtyUuRm0wh1O0Kp8 +QPKRUE6x1ywy8B7JT9RhwMisNO/G2ll0++pYmK0eA6J4z3hFPZ9Fq1ontlH0 +GRAQ1d5R/2IWjZjOtOUbMsBX7IOJ08tZfH9xcTftYEB5r2teSOMsEplZ6SK2 +mwFcVEpYTNss6knWXZYVyADBTEfZ/r5ZlFIds//xbQZc1RSRWCpEokDqZQNW +PgNWPX/rLy5MIuu7Jcv0CxggVLTwVV6ERMsv996tKGKAhcQ9XpooiRJD7QbK +yxhw7+SGI3arSBSjrnLg0QsGBOYLvveSJZH/5TcBpR0McDOaMH+3nkSWIr1G +oZ0MeBJTtvuJJonWJXIJU7sZsM5QI/CeFol6Q3WLSjgMOPzH9MvxjSTaZ5s1 +/GCIATUXu1maNBI584cFFc9hk7EltltIZB62OrhQkgmtbf8d/mFOohdZSVZp +UkzodXVafGZBIqOmCRXWaiaIiWyhZ1uSSFv1zVdjeSZIdE2/8t5JIunP0cbf +VJlQVaC28N6WRINbfkgu12XC30zVniN7SHSO5+YTXwcmuNvtGCT34flvFLpi +s4cJJiG+nRV0Eh13Y4XSnJgQ529QFO5DIlaZ3dq/rkzo2Mr3doCB8ye4z1+i +MyFSWkPhP18S0RrpjJchTLj4+2CHTSCJPp9XFVROZUKwiLR35CES3UfCfv3n +mRDPo1nNx8Lxhyfri9KZwD35UCQNm2pZH6t/mQmzT89l3j1MohQunwmbTCYY +iMd7NEWTyOzgza+sQibQxfwMOuNIJCd3Um/bfSZ4bpMW9Iwn0WTjwXTeB0xI +Yq1sbce+pYZsUh4ygd3iaPr+KIkWfvyozanC4y3mFZckkKjMWib/XQMTFnQs +4+EEic7M8fBfaMT1HXp4pwibnj+wz6WJCXkx0XXSJ0kkylcl09PMhICp4s8j +2AHVzufIT0zIUMw7ePY0iZQ1LkWqcJjA0Xc1u5hMornPR1p/9TIh3bDj9jh2 +SyJTu7gfj/dMes46hUSxXToDBkNMiI1xYnGdI1H7lVaPXb+ZEOXs+d41lURp +S1eaRnETUBPP1/09jUQ1Ez/cwnkJSDv1SnpTOon6fhSEBvETYEcFruPYRmUm +N+nLCFDrGv6iegHvN2/WH6uVBHRRHcpdLuL8rU3FTMUJsKoc9c7BNtwspo4k +CKgViKwcxE4VLtxLkybgrllXGOsSbq/6WSKjSECdxUPBY5dJROQVNkgoE3BW +Tlb5OXZq6uGfK1QJ+BRX07eI3UuIC/OpE1Av4MCKvILbxc39hrSxDSvL9lwl +UdWieFwvlYDPCU9op7E5vzovduoQMNVO93qCvaU2qq5Nn4CySpsahWsk6gm4 +L/8ECKA86jvdhi3iHK1bsQPPh6MTuIhtYGxhXWJCwN/4/D9q1/F+ke4+nGdB +wIfht7Lh2I/5ilOzrAjg2BPFV7DZo9F3rloTIGE5MVyNrf9K4mOyHQFRHeVB +i9j0ku7BE/YEBKd+fSB3g0TJN4p5jjni8cm6TEPs7lBL7UhnApx6Go6EYQt7 +SpoHu+J6z7UEJWPrW7I9/N0JEBmOFrz9r7/CkTOe3gTo0q+Zt2I/Xm51y5lO +wOjsYm/fv3hTkpX2DAI+Xuzf9OdfvC52szVBQMU3u3XCGThe04NeMz9cjx+b +GuWw6RVHFsCfAH2FJIoWdvItq1WGAQRMpluIGmI/Tqas1w3C8bPCy8yxu1k9 +2zcGE5BCWcLngC3EKHFWDyUgEZGL7tibd8UeVA4noLfJKo/5L/6WnUlykQSs +5cxMB2CfVZXKoLAIkJVf/B2KXS7KebgyioDxI243DmF3/SlpFIwhwDpaZCzq +X/y+2C7+WNx/QWI0Blvvw87Zv3F4vVxDrh7B/h/+tOHV + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.5968124918277753, + 1.6009498590334987`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5968124918277766}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.5968124918277753, + 1.6009498590334987`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5968124918277766}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1Xk4VF0YAHBrKUsihmxZiyjNIKLOW3YhoexLY+aSkL0JoUQrifZCQkkk +ElkqReWTomhTCWOQnWxX6Dv9cZ/7/J7znPe85z2bIv2gPZOHi4urH3///iHv +NqytaHm3Lbz19TFJaTbaNpKrSzcpRD8T7lf+c2eW3gUVkxqk2+7pScG2Y7xd +IkR7iTw6vgRLYZew4ur4TZpQeobsuDT2qVdStXEF7xFNQ+OnDHZlS0jmPPUj +ErnBbSiPPdDeGHO4+gsSEc3hU8RezVF2mzb+juLzRYxUsHeOxhiENf1E3WdN +utZiP50fEGQVdCHxAZPJ9difjlKiy4Nwv4kVEdrYI0tMBiapHOT8Pc9HF3vJ +2WAX2kwvYnKW1G7Bll+Z0RBS3Y/W7qKdBmxbmenbI8ZDqIQY9bXBJm4qSWoJ +jKDrpXHRjthxqrsSDzSNorjr3+fdsL9Q2jaFF4yjkKoFiwBshqv//vSzE6jp +8QvxCOyxG1zZpUG/UWXPHutYbAElLdFx6hR6c65/SRr2BUaduajENArh/nXy +BvaaOy5xG2em0YXEStYdbH3NpJHA6lm0vacp+ym2n97PpgHjeeQ21yQ9gT3J +iuBbrraA/Ns9lnOtZqP4akEjdYFF1Jhe5yeCfQX07/k2/UU9LqIHNbEZeQ0m +oQXccK65LjsQu+BVeudRGR74MLaCOw57rM8z5vxZHgjh3fwuFTtGY+rhgyBe +aA6QLn2EfaFYUXmUyg/zJyxu8smwUXvL0NPFHH6YNksMksZeM1HhKiKxBI55 +5xZswC7UsU3TmlkCXdXJAa7Y9ZVR3AHVAlDTp0GpwJ6qa/3ZbywEtmSKQKIs +G4lZC4lGPxWCdqsAkRxs7TYTEDYQBr1TiRefY/v3PLq5aYMILC0PXcslx0bB +PE3aW4VEIee//a4J2Byl++OJ0yth7mjoYrY8rg/RuKyZJga3BYelGrB57vUq +SoWIwbGwF2Uj2GtoCvYFg2LgdyUpeKsCG7kap5a+6xQHj/7S2U7sZp/QMMob +CZDhuWsDimzUcSfljLeAJCg698YGYQ8NFuTcNZWExOe5mzKwl4ezWw1rJSHF +pVhmHtvkuKOO9yMK8PCb89QqsVFVrt5UfpY0SJn/lvFWYaNczlzklnA5mF/l +eIl7HRtZ7DnREVYkB+fjH3wyxB6qFzcr6pWDoHmrk5HYOrmaEmtc5IH/nika +xq6nez7k36YA4c9z5n+qs9HEaOeh/oQ1kN6UU9G+no3EA03KHtooAcr9ZqKq +zUa9ucv97PyV4EPrdGkg9uPvLTLDSUog+aQ8rRzb3dojQa1WCQq4aXcsN+H8 +1kfaX6Uqg6LfMZUIKh5/4M5YLEUFLthVhHXpsJGjr6CWVZcqSKkGxa3YwkYo +cg/VaUEVFH+qRDCwNRKzNjOk1WDqffKXSmyuHNqO2N1qUO+b1M80ZKOiDjen +0udqoJ2WoFVnhM/n3sKjq2+tha0Mi11pCOdnYvNpgK4O/ru+rEgwZaMch8vf +ZmLVQerjTB0HO4Xe1cl3XR1s9jr0Wpjh/R0fMSjfqg7721oiRM3ZaGVNBpeD +sQbYX/arzbXA+4c2olGtvB4K91MFuneykYzSubgzPZqgnXnweLE9G9WcnlQn +ebSgNmn0sroDrsdvlzZCUQt2SnZq5WJn1quo7/DUAnuBDV3XHNlIybfqw+xn +Lfj7eguRshfPt5CjSrzZAO7tq8eSXdlITkaeWOOiDdb/HdIZpbORZl640B9E +hWuthkpGEWxEZyRMadlS4V764QdN2FeU0zq83anA7zlb4hHJRry3ih+8YlFh +e0SbyNFD+LxlDjimlVBh7cnX2m8P4/v0ineGujINxjgPZKJj8fqesd7gvEQH +0ipcn2mdZKPsUBW7R026wHop/WP0BhuVdtSekfquC2R+Nk9hBhu9sPJ4HT2o +C07rH5f4ZbJRj9KlbTuW64EUs6qQncVGaq1LtZrN9SAsQ4/SeQufZ9rgsl8v +9GDOzuj1RD5en8mSOtnKzdA06dQR94iNWiLR5uN5BpDCs2avYQsbKXp+tPUI +2Aqrny0yFAR7EPNv+X25wwCx5pXPPlv2IMrg46UU+g5otp4JTL7Ug8JpRt/T +NExgL7nO43RvD6IPzzeID5jC10bdat6tHFS0I2xpVrM5fN9g6iWXy0G5k/7P +Cy9YQu0B1xMmwr1odrvU2/q4nfBRP5tifaoX/eDiHe/aZwN3dptlJgr3oSDZ +g6lHlXfB+ohaCEnrQ/f3N9ReTLSDczI0ay+tfhT1W3pm/f7d4M41dHNPQz+a +sjLb+9rLHrjjAswao38hA7fz2zm7HcBz+xul7s0D6IN0hn89zRFs2nyT1SYG +0OrbCTX56/ZA7G+O9sLrQfS4U8PaVngviFbsXvX52hCSbxvzjRzeC5RVtiFc +4cOIdvF8YU6nE/hqyiQpHhhBGXy/N6TVOcP1O+bldu6jqHz7xvbEShfYN8Vr +R9cbQ1c2n145X+AKSmp+wj7Px1Dzt7wk2lk3oM8rFLmYj6NHNjdUguPdoWHt +y5LG7+NoPNCBK4jhAauOZM9dOjCBpszU/UaMPWHxuOZrkpxA+cNfZ8P0vACt +SFLacek3cs7O8/EQ8gYXk11tL9ZNooelO714T3jD+ZNC2uKvJ5GBzAfyFOkN +9XcHNFVcppByp2/7+/37YGhjoIQXZwr1CB7YdYO9D1q6FZ+msqZRS4qtj/ke +Okj0fCLr/uB3jZUlGNFCBwVZrV+MozOo5ulf0sfSB79HBtyUuRm0wh1O0Kp8 +QPKRUE6x1ywy8B7JT9RhwMisNO/G2ll0++pYmK0eA6J4z3hFPZ9Fq1ontlH0 +GRAQ1d5R/2IWjZjOtOUbMsBX7IOJ08tZfH9xcTftYEB5r2teSOMsEplZ6SK2 +mwFcVEpYTNss6knWXZYVyADBTEfZ/r5ZlFIds//xbQZc1RSRWCpEokDqZQNW +PgNWPX/rLy5MIuu7Jcv0CxggVLTwVV6ERMsv996tKGKAhcQ9XpooiRJD7QbK +yxhw7+SGI3arSBSjrnLg0QsGBOYLvveSJZH/5TcBpR0McDOaMH+3nkSWIr1G +oZ0MeBJTtvuJJonWJXIJU7sZsM5QI/CeFol6Q3WLSjgMOPzH9MvxjSTaZ5s1 +/GCIATUXu1maNBI584cFFc9hk7EltltIZB62OrhQkgmtbf8d/mFOohdZSVZp +UkzodXVafGZBIqOmCRXWaiaIiWyhZ1uSSFv1zVdjeSZIdE2/8t5JIunP0cbf +VJlQVaC28N6WRINbfkgu12XC30zVniN7SHSO5+YTXwcmuNvtGCT34flvFLpi +s4cJJiG+nRV0Eh13Y4XSnJgQ529QFO5DIlaZ3dq/rkzo2Mr3doCB8ye4z1+i +MyFSWkPhP18S0RrpjJchTLj4+2CHTSCJPp9XFVROZUKwiLR35CES3UfCfv3n +mRDPo1nNx8Lxhyfri9KZwD35UCQNm2pZH6t/mQmzT89l3j1MohQunwmbTCYY +iMd7NEWTyOzgza+sQibQxfwMOuNIJCd3Um/bfSZ4bpMW9Iwn0WTjwXTeB0xI +Yq1sbce+pYZsUh4ygd3iaPr+KIkWfvyozanC4y3mFZckkKjMWib/XQMTFnQs +4+EEic7M8fBfaMT1HXp4pwibnj+wz6WJCXkx0XXSJ0kkylcl09PMhICp4s8j +2AHVzufIT0zIUMw7ePY0iZQ1LkWqcJjA0Xc1u5hMornPR1p/9TIh3bDj9jh2 +SyJTu7gfj/dMes46hUSxXToDBkNMiI1xYnGdI1H7lVaPXb+ZEOXs+d41lURp +S1eaRnETUBPP1/09jUQ1Ez/cwnkJSDv1SnpTOon6fhSEBvETYEcFruPYRmUm +N+nLCFDrGv6iegHvN2/WH6uVBHRRHcpdLuL8rU3FTMUJsKoc9c7BNtwspo4k +CKgViKwcxE4VLtxLkybgrllXGOsSbq/6WSKjSECdxUPBY5dJROQVNkgoE3BW +Tlb5OXZq6uGfK1QJ+BRX07eI3UuIC/OpE1Av4MCKvILbxc39hrSxDSvL9lwl +UdWieFwvlYDPCU9op7E5vzovduoQMNVO93qCvaU2qq5Nn4CySpsahWsk6gm4 +L/8ECKA86jvdhi3iHK1bsQPPh6MTuIhtYGxhXWJCwN/4/D9q1/F+ke4+nGdB +wIfht7Lh2I/5ilOzrAjg2BPFV7DZo9F3rloTIGE5MVyNrf9K4mOyHQFRHeVB +i9j0ku7BE/YEBKd+fSB3g0TJN4p5jjni8cm6TEPs7lBL7UhnApx6Go6EYQt7 +SpoHu+J6z7UEJWPrW7I9/N0JEBmOFrz9r7/CkTOe3gTo0q+Zt2I/Xm51y5lO +wOjsYm/fv3hTkpX2DAI+Xuzf9OdfvC52szVBQMU3u3XCGThe04NeMz9cjx+b +GuWw6RVHFsCfAH2FJIoWdvItq1WGAQRMpluIGmI/Tqas1w3C8bPCy8yxu1k9 +2zcGE5BCWcLngC3EKHFWDyUgEZGL7tibd8UeVA4noLfJKo/5L/6WnUlykQSs +5cxMB2CfVZXKoLAIkJVf/B2KXS7KebgyioDxI243DmF3/SlpFIwhwDpaZCzq +X/y+2C7+WNx/QWI0Blvvw87Zv3F4vVxDrh7B/h/+tOHV + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 180}, {0.5968124918277753, 1.6009498590334987`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5968124918277766}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0.5968124918277766}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5968124918277753, 1.6009498590334987`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943892810074997`*^9}, + CellLabel-> + "Out[139]=",ExpressionUUID->"d02af03f-e6bf-4209-893b-adfb4a6f6c7a"] }, Open ]], Cell[CellGroupData[{ @@ -11624,425 +13987,1146 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.99185079904813*^9, {3.9918508647235966`*^9, - 3.991850864992861*^9}},ExpressionUUID->"d43bf17b-b492-0e4a-af4a-\ -6a3bc399953c"], + 3.99185079904813*^9, {3.9918508647235966`*^9, 3.991850864992861*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.179705679965974`*^-270\\\", \ +\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ +to represent as a normalized machine number; precision may be lost.\"", 2, + 140, 69, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943892811303368`*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"c72362ce-857e-4be7-adba-79674697b21a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"71d4e039-c2b8-d74d-819a-80d2051e4273"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.278158158263269`*^-281\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 140, 70, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943892811353416`*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"b1dc634b-d75f-4ee5-9968-9c44b534997e"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"63625e13-15ef-1f45-89dc-998a1b63a626"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.76148812110787`*^-292\\\", \ +\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 140, 71, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389281139451*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"b1d54fa9-eeee-42cf-b408-13a3f0cc258e"], Cell[BoxData[ - RowBox[{ - RowBox[{"General", "::", "\<\"stop\"\>"}], ":", - " ", "\<\"Further output of \\!\\(Integrate :: \\\"gener\\\"\\) will be \ -suppressed during this calculation. \ -\\!\\(\\*ButtonBox[\\\"More\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\ -\\\", ButtonFrame->None, ButtonData:>\\\"General::stop\\\"]\\)\"\>"}]], \ -"Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], - -Cell[GraphicsData["PostScript", "\<\ -%! -%%Creator: Mathematica -%%AspectRatio: .61803 -MathPictureStart -/Mabs { -Mgmatrix idtransform -Mtmatrix dtransform -} bind def -/Mabsadd { Mabs -3 -1 roll add -3 1 roll add -exch } bind def -%% Graphics -%%IncludeResource: font Courier -%%IncludeFont: Courier -/Courier findfont 10 scalefont setfont -% Scaling calculations -0.0238095 0.0634921 0.0147151 5.37313 [ -[.15079 .00222 -3 -9 ] -[.15079 .00222 3 0 ] -[.27778 .00222 -3 -9 ] -[.27778 .00222 3 0 ] -[.40476 .00222 -3 -9 ] -[.40476 .00222 3 0 ] -[.53175 .00222 -3 -9 ] -[.53175 .00222 3 0 ] -[.65873 .00222 -6 -9 ] -[.65873 .00222 6 0 ] -[.78571 .00222 -6 -9 ] -[.78571 .00222 6 0 ] -[.9127 .00222 -6 -9 ] -[.9127 .00222 6 0 ] -[.01131 .12218 -24 -4.5 ] -[.01131 .12218 0 4.5 ] -[.01131 .22964 -24 -4.5 ] -[.01131 .22964 0 4.5 ] -[.01131 .3371 -24 -4.5 ] -[.01131 .3371 0 4.5 ] -[.01131 .44457 -24 -4.5 ] -[.01131 .44457 0 4.5 ] -[.01131 .55203 -18 -4.5 ] -[.01131 .55203 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 -.15079 .01472 m -.15079 .02097 L -s -[(2)] .15079 .00222 0 1 Mshowa -.27778 .01472 m -.27778 .02097 L -s -[(4)] .27778 .00222 0 1 Mshowa -.40476 .01472 m -.40476 .02097 L -s -[(6)] .40476 .00222 0 1 Mshowa -.53175 .01472 m -.53175 .02097 L -s -[(8)] .53175 .00222 0 1 Mshowa -.65873 .01472 m -.65873 .02097 L -s -[(10)] .65873 .00222 0 1 Mshowa -.78571 .01472 m -.78571 .02097 L -s -[(12)] .78571 .00222 0 1 Mshowa -.9127 .01472 m -.9127 .02097 L -s -[(14)] .9127 .00222 0 1 Mshowa -.125 Mabswid -.05556 .01472 m -.05556 .01847 L -s -.0873 .01472 m -.0873 .01847 L -s -.11905 .01472 m -.11905 .01847 L -s -.18254 .01472 m -.18254 .01847 L -s -.21429 .01472 m -.21429 .01847 L -s -.24603 .01472 m -.24603 .01847 L -s -.30952 .01472 m -.30952 .01847 L -s -.34127 .01472 m -.34127 .01847 L -s -.37302 .01472 m -.37302 .01847 L -s -.43651 .01472 m -.43651 .01847 L -s -.46825 .01472 m -.46825 .01847 L -s -.5 .01472 m -.5 .01847 L -s -.56349 .01472 m -.56349 .01847 L -s -.59524 .01472 m -.59524 .01847 L -s -.62698 .01472 m -.62698 .01847 L -s -.69048 .01472 m -.69048 .01847 L -s -.72222 .01472 m -.72222 .01847 L -s -.75397 .01472 m -.75397 .01847 L -s -.81746 .01472 m -.81746 .01847 L -s -.84921 .01472 m -.84921 .01847 L -s -.88095 .01472 m -.88095 .01847 L -s -.94444 .01472 m -.94444 .01847 L -s -.97619 .01472 m -.97619 .01847 L -s -.25 Mabswid -0 .01472 m -1 .01472 L -s -.02381 .12218 m -.03006 .12218 L -s -[(0.02)] .01131 .12218 1 0 Mshowa -.02381 .22964 m -.03006 .22964 L -s -[(0.04)] .01131 .22964 1 0 Mshowa -.02381 .3371 m -.03006 .3371 L -s -[(0.06)] .01131 .3371 1 0 Mshowa -.02381 .44457 m -.03006 .44457 L -s -[(0.08)] .01131 .44457 1 0 Mshowa -.02381 .55203 m -.03006 .55203 L -s -[(0.1)] .01131 .55203 1 0 Mshowa -.125 Mabswid -.02381 .04158 m -.02756 .04158 L -s -.02381 .06845 m -.02756 .06845 L -s -.02381 .09531 m -.02756 .09531 L -s -.02381 .14904 m -.02756 .14904 L -s -.02381 .17591 m -.02756 .17591 L -s -.02381 .20277 m -.02756 .20277 L -s -.02381 .25651 m -.02756 .25651 L -s -.02381 .28337 m -.02756 .28337 L -s -.02381 .31024 m -.02756 .31024 L -s -.02381 .36397 m -.02756 .36397 L -s -.02381 .39083 m -.02756 .39083 L -s -.02381 .4177 m -.02756 .4177 L -s -.02381 .47143 m -.02756 .47143 L -s -.02381 .4983 m -.02756 .4983 L -s -.02381 .52516 m -.02756 .52516 L -s -.02381 .57889 m -.02756 .57889 L -s -.02381 .60576 m -.02756 .60576 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 -.5 Mabswid -.02381 .01472 m -.06244 .12073 L -.10458 .23188 L -.14415 .32802 L -.18221 .40977 L -.22272 .48259 L -.26171 .53704 L -.28302 .55995 L -.30316 .57709 L -.31285 .58377 L -.32313 .58977 L -.33276 .59437 L -.34157 .59772 L -.35098 .60043 L -.35617 .60154 L -.3611 .60234 L -.3633 .60262 L -.36564 .60287 L -.36785 .60305 L -.36985 .60318 L -.37108 .60323 L -.37222 .60327 L -.37346 .6033 L -.37477 .60332 L -.37591 .60332 L -.37698 .60331 L -.37815 .60328 L -.3794 .60324 L -.38062 .60319 L -.38197 .60311 L -.38469 .60291 L -.38721 .60266 L -.38958 .60237 L -.3949 .60153 L -.40064 .60035 L -.41114 .59744 L -.42077 .59396 L -.43969 .58496 L -.46039 .57209 L -.50095 .53905 L -.54 .49958 L -.58149 .45213 L -.62148 .40358 L -.65994 .3563 L -.70086 .30723 L -.74026 .26259 L -.77815 .22302 L -.81849 .18514 L -.85731 .15313 L -.89859 .12393 L -Mistroke -.93835 .10033 L -.97619 .08171 L -Mfstroke -% End of Graphics -MathPictureEnd -\ -\>"], "Graphics", - ImageSize->{288, 177.938}, - ImageMargins->{{43, 0}, {0, 0}}, - ImageRegion->{{0, 1}, {0, - 1}},ImageCache->GraphicsData["CompressedBitmap", "\<\ -eJztnAuQHEUZx+fudu/gQhAJIkZiLsAl5HJ3gRheC+EVTAgkBAiSXB6Ey2PJ -GfLgEt6PBCQgCLgRBBR8CyoIBpAVBEEEXwglUuJrkZJCpaSU8lFqaanrTvdM -b8/s75vdmd1NYhVXucnc/+vv319/801P9zfdM2dw46qVawY3Di0f7Jo5PLh+ -1dDyDV0z1g2XoLYWx2nZVvrt7HLc86Lj+Idi6V/xAffgItXP56v/2krHvJN1 -9E9KHducbF6VVL+T1DHtFAs5J+OUf9wy/Z4sn7UkmZxTKKF9nqyQz1p6GSdX -KDoH+nXns0bSpo67ltQLpm71WyjZ5xNksk6+pH+AqJ+y9FW70tCkcaJ6W6D6 -1oim76u9uMCjcj2QyeZVy1sN5phq+wHTHmp3Cjmt61erPJbN96o/OpSVPrUu -UnBy2axyZI9Hm8tox/qXVOm55TyHlR1Z+rt0Pl7Uq96UbtDtgHKehwY8kWqV -Z84UKN4biEdN3Wpjpbgqx2Ob9pp3scjMiRFNLOqCAV2bj5qYgnZQHRGuWOhX -r66EVumzqg/Hoh2zPVY0lOpX7ijYV7bUnF6reZlQ82wTo1xDbrXdRa5JQ7sO -rFJHVFtHa3ctMkoFReMW6fXuGX3r6mB2Ec/bfb6X3DvWDRir88lkQx1Tzr2Q -pdY6GXVfuPSTGuyZdmjCBLEOsVljtEMWB24Hrd1rWpMxlvih12eX91gPMkGq -b6lAr1LyQqEY1ask80IH2E09UCqiLWMq+1s/ZOjuN08t1SxHmezL7b7Yb8pk -+9apo1cJ61brVdpqbI/cI3EbA+7y7genrFrIl//u88m8Mhnl/GK/qUOPD9Qj -oeDB5TvMxE+hHGMT/OvodZW5fMEYnjLNdp9iudBTphz5+1XliG7V/hH67dxi -z2cDtqYZt+jnrR0m/khgsnUZAgOhksP8vqYIXBONg0t6bl+kLU8burwy2Fbp -jlYhiwWVDmiI135pwOj36O6P31Or4zX/H/Kx7n9qrLzVPbTIWp11YLu+pbtd -dHcmW2rV3cUKuVZXMGInN/gt3Z3LlsSBdjAUOqhGbHIduoSNCxun4Gst1FIw -cqGTZ3kqUKFfZEvji6QDRQIGXW2V8yc5pkDRezR9MAFZyJ2tgKnjlY3VaZN0 -Nu94nZSks2nH66QlnSvCAVJTyZC8XdK5fMfrdEg6lyXQWe8eVHfRmUB7rdHe -TdbeRdJebbR3T6A9ZLT3kLWpZ1fHrNHeMxwvos4Ko7NXghqXGe29ZW166qjj -UqO9TwLtJUZ7dALtxSCI4KHRlzoOGCvGJNCeb7THytq7SdrvB4HHU05HV2bE -/b7Dz2hncnknHVE+kFn1RJT9p95YtH2eabmevTveTRGRiU6B3WZ6H5HALqcM -opPV1GOL9p8OAr8l2hF+pouyYX5YVksuG8xKJFPnMVIyc65xc3fAOL8SynJ3 -RhhilzO6VipX9aoqOETPzTEmTWi4SYGMkZdDpceR6K/ZIGi8mSYJbiU56Ym+ -u2TmLOPDnoqYs42TYi5oXHugnPvrpRjLGcfou0S080QQ+Banyve7zu1Ras8Y -XZECHBEop+95OcVH3n2bZPUMEOgkcblfhYzbyAiZSVdD2o0CVLTtBHPldXYV -nxii9nQQRPDsIfEca6w4OIH2MSBIwjPNWDFV1n67pH0kCGweJRG1MyA4RLZi -T4nnMNOGwxNoHwqCJDyHgOAImWeUxDPFtOaoBNqUeYjg2UvioSzEtAQ8/SA4 -OgFPr/HKcbL2OyTtHhAk4ZkIguPD8S5qU1XTZSv2lni6jS9mJNA+AAQRPO+U -ePYDwcwEPONAcGICni4QzJJ59pF43gOCkxLwjAHByTLPuySed4NgdgKe0SCY -E45dUZsEp8hWUGXqSJdvbgIeCu9TZR5yojpSh3NaAh7qkE9PwEOPl3kyz74S -Dz3wz0jAQ8MgPWdu6Py4LKtc+kXjTtFeGkafqe1t3uy43dLzx/hkNXUJ6kgT -vfme1Y2bCafrNZNyMAsCZiab2aUD5XweWkqoeNXcWDSSEm0DDTCys8JIYfUQ -zUXooaKOlIlY2ABrKRp4pU8scynju6giUONPn4WogJU2ZO5YyVyK7sWeuXXO -nYPldGsrlrjEMpayAku0sUmnzGY9nLXshGyisZM60purs7RN9BgReVpAsFTm -oTHhfwE7Ox7FfwAbjEfxb8CWyRQ0SP4XYMstCiUhxX8CtkKue3/A/gHYyngU -fwcsG4/ib4CdI1PQjOWvgK2KR/EXwIZkim7A/gTYB5pKMR6wNwFbHY/ij4Cd -G4/iD4CtCYf1BCj0BmBr5bqJ4veArZMpCHsdsPXxKH4H2HkyBSUTfgPY8Han -eA2wDTIFZVdeBWxjPIpfA3a+TDEJsFcAuyAck6T4K8AujFf3y4BdJFP0Alao -n+KXgF0sU/QB9nPALolH8TPALpUpKGn4EmARCxtiUjRjLku7tGhASqb+BDBv -6UfzprH+rghhgxTZTmniFwHzltQ49UxmOypesVXbu0QjarL4x4BtClicbBI2 -gqeMwnYi5V81tyUbfwTY5ubYGLGZh2KAFh02y9qOSmutzTY09acXIs8DdmVF -hDZmFhvc90LTfbLwOcCu8ixs6MS11dwogW0nNM+fAtizgHmLLJPOWcsbMir3 -d1D4kVk/ACxiTed7Aft+/RTfA2xLPIrvAhax/2IqYM8AJqz+lSieBuxDFoWS -0PvPpwC7Tq67ART0NvdJwK6PR/EEYB+WKQ4D7HHAbohH8RhgN8oUhwP2KGA3 -bXeKRwD7iExxBGB5wHLxKB4GbGs4rGmRwkOAfVSumygeBOxmmYIWWjxQP8U2 -wG6RKY4C7H7APhaP4j7AbpUppgF2L2C3xaO4B7DbZYqjAfsSYB9vLIWSHAOF -7gbsE3LdRHEXYHfIFMcC9nnA7oxH8TnAPilTHAfYZwD7VFMpjheLB7FPyxS0 -ruxO0bKGzlhxZZ2TEVfWkal3APZZbWqzlyVHf7ODxowniHcZxWJ909bKlaHe -37WuDCVjbxfvvfrmV+04Yy251qep2BCvJqxk4m1NMlF6s1n5dQkK3fcBditg -X2iApTC1jvgKBMUpraK9BbC7KuK0ESuYvTK1xikZezNgd3vGNmfxsvCNBPLu -TMC2AvZFbXC965bpowQUomRWDjA9VMBnCa0ZvwmwL8sUswC7sX6KGwC7R6Y4 -CbDrAbs3HsV1gH3FolCSk6HQtYDdJ9dNFNcAdr9MQbspttRPcTVgX5Up5gB2 -FWDbZIpTANsMWMTnL4hiE2APyhRzAbscsIdkilMBuywexWmAXQLY18IxSYoX -A/awXDfturoQsLxMMQ+w8wH7ukxxBmAbAHskHsUwYI/KFLT7bz1g35ApzgRs -LWCPxaNYA9jjMsV8wFYD9k2ZYgFgQ4A9IVMMAHYOYE+Gw5oUs4B9S657IWAr -AHtKplgE2DLAvi1T0JbYswF7Oh7FUsCekSmW1Ih9R6Y4q0b/6AS1tzu39tmo -2WRY5ZOQtB+WnEEBpNPv3ggyeh5J80//FQh9X67a5VV3tNqh8axtRPUluiNr -rHQQMOoPQ9VXm03VUz09FH7YoOrVJJMqpefhc81p83LAaDTxfOUVj3pLWGv1 -1JfNNmH2QqjSKm/9Or3blb7WRq/+VgJG4+oXQr2BOFMSP5Bms9ETgGY2+vU9 -dmP09KF56osyxSrAphvHvyQrlj9EQdnBCEV6cFOu+KcyxbmAHWns+YWsSOMO -endiUygJjXkONTW+LNe4zhSaas5ekYufBxitQIigGDb19JuzV+XiG02hHnP2 -mlz8AlNovDn7rVz8IuPBLnP2ulz8UlNI7chSHeMbcvErTPFR5uxNubhaBDHK -Rf4cvr6qwE7yacFqcnVe5XvcTsv/APllRnA=\ -\>", "ImageResolution" -> 72.],ImageRangeCache->{{{0., 258.6}, {159.525, 0.}} -> \ -{-1.61617, -0.0100934, 0.0591342, \ -0.000698765}},ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 140, 72, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389281142701*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"0881685d-ece8-446e-adc8-f0baa4a81a0a"], Cell[BoxData[ - TagBox[ - RowBox[{"\[SkeletonIndicator]", "Graphics", "\[SkeletonIndicator]"}], - False, - Editable->False]], "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-\ -1872f77ea023"] + GraphicsBox[ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Ve0XB3CRDJXMs3uvsZKhTNfl3vYmRGQsUxIhQ0UipJQhMiVDb0nJ +EApluKdBVIQKSSljg2ToVaGUOd5+5/fXWZ911nnWs86z93c/8vuD7H04OTg4 +9FdwcPz/OTvQ2qyUUrS1bgNfXrG16daua5LHjfpigWV4pfNiiiKg2Kv9kn2Z +UHP4VIZ/ijaE2Zb1cvUVgo7s7fsWKdtAaFIic6GXDeLuwiOiKQ7w6aF10HRv +IxzW0B4+kOwFZkrfPk71voGOcpnHT86GwEIv/Z+fvUMgzB3PbxAVB03bbhR1 +Fv6GdtbU1WDKBZD99ODLfrVlGD0bEaoQmguih/aV8WzjwpiOdRkl665D5haz +OuvdvGjH6OLbGnAD+rM3N0wJrsX/3O/7l4uXQ0rR6VecUkJ42Ilxk/diBezQ +8RcWUxRCAdOaFURhBfA22+9ery6E39Sr+ndVVsCZYeX3lkZCWG4e/OdUSwWc +VGj/csFfCJm5g02HFisgMF/yP5VaIewbvLj/llsl2F2tVrPcI4xJVwoNHddW +gcSF4aSsXBHUN/n7h/a4CiQ33T0zXyKCRo+0W7maqkC6MeH03ioRDBaruT30 +vAooPzceW98kgt+f+dRe6KwCZasjHnVjIhigm/emdaQKtFcu6w1ri6L/jbb4 +cP5qsAkVH9FqE8XpK/OnP9pXg+3qsYFLb0VxviCIbuxUDfaFD/qXPojiF7f6 +2cI91eD42u3Vsx+iWJLpnuLsXQ171a7XuoqJobfyes4Lx6rh4IhmRqyHGIb8 +ovVaXqqGs7sstr6ZFcPNir9nH/ZWg/SdDmnOFeL4btWW6Zn31VAhsmtuy2px +VFkXZKg6WA09b9yrMqjiaOI7VnJmrBqU7EIV7MzFMYKh9p1joRoad+aten1Z +HE374hbFpdiwbDbT8ZIpgXFD/JtqdrMhvSSyfNlMAovaRIVcXdigtIojUd1O +Ajcof2bOubHB6im/0TkfCRyaqPdR9GZDzjYaYZUmgdLrl5aMj7JBHy0vvfgk +gYYEzTLvHBtCGAX7WmMlccH2q/TLBjbsyBeYtkyVxJbCkyZFTWxQ4DmZ2PGP +JJ4+c9Y+/BkbXnc5Vr+9KYlaXS9lhdrZoHFkDddAhyRO6P0OEiHreKwkvOSX +tBRy80uaOIyzwU3UekKGkML3/iIpT0QI0D5RF3PtoRR29JU2iIkTwD+0QVz+ +mRTqmj8d9pEk4EElF6j0S6HfzOrpBVkCxC0fpG/+K4VFtre2TykT8DpGScfU +Uhrjdx4Ql6MTYPJjMTJwWBqD+QJCDjkScNz8guqTcWlM5E3m03MmoKJA/Z3I +rDSus/7Y9MeFAMldHowHvDL4KFPtxom9BIzXPJ3j0pDBn8PS9J3eBGTFpode +jpDBF+VXZ+jBBLS836g0HiODWp5665qPErCk0/R2a4oMZgi377YKJeDAvzNa +I7kyuKdx+yG7cAIMrPZMaTTJ4B9fi1fqUQQMiakENq+VxdRneXOaiQRIBNXL +SUjIYpI3qJ5OIsCqxfmlP00WV/h1Z7UlE3AvMkVtnbYsTimmCjieIyD5089v +Ls6ymHV94Q5kEqBVWuf7o1AWX1egh/sVAnw5d0sY35LFczvNdwVfJeDqnsln +F+7K4mdp/+ToXAJWCcirGLTI4nzKl/qsPALeHU0YOTMhi4FQ4H3uOgExTDtP +aX05fORjCB1lBJi7X/tFN5bDlVr/vr1fToBA9Pe43VZyyJPiuy73Frl+U3xJ +uoccTrivOO1aQUDNjtrvq5LkEHfc3ltQTcDpQzxRSllyGFuzysyPTYBZ2i4B +41w53I+ZH1UJAro6JzdHVcuhnFcy5fodAn46K4b97pfD8aU9qzzuE3A/8giP +0Igcts9lJ6ysIeDU1UfZGpNyOOfe9LiI9JpBpzp/TgqOx7rs6XtAwNsVxVZn +11BQxpW78WAtATmKvz4WiVPQ9TVldJH0et9UjkFVCqYEqvqseUjAZGJ/xrIO +BTN4/ZrTSN8pU1GUAQo2KZaNrHlEgPFkg6mjAwV36gwdWiLtfmwmuf0EBavW +Lz28WU+A8iVj2W/xFDyzV8OUr+H/9XP+Nk86BXMGui/5kI5c2vjauIiCUo5O +BUJPCDCihHt6VFCw679cV0/SvNj8K6qGgp67tYdvkf4nzl3sQTsFFV20fOmN +BLgVl5f09FBwMlnEJ4y0wvN5+vQgBbODtejVpL+OmbYKfadg4YaOgX9JV/Fn +uWrOUDCBtn6vdBMB4WqD363+UjBf7jRhTnqrtXpUAB8VFehSw0dJcx+JFEgU +oeJ8N2Mim3R7xvO8YjkqPiFU3taSziJEtzStp+LdfpWLfaRduz0bB7dQMSkv +lv6LtPxchcN/hlQ8WBZXw9NMwJjk0oiMGRUHv4dKS5GuNLAIY9hSsTK/0F2F +dJjbRR4nVyr22LgmaJJmnhrODvWmonfrt0wd0lz5m1UzA6kYpFwUr0u67UlU +XWUEFacbe/dpkU4fbrN6GUvFp2Z9CptIO3FLDnxLpWJgzsIrKmnKep8g3ktU +FP6e7idIetSczaFSQL6/OT2xRO73VsDfjG3lVCyJO+k5Sjok1UrR8y4VNQJj +mltJG1RcvnOqnor3svdKlpE26e1Ynmyh4rJn+1AiaWuOldv3vaHi+ObnKt6k +nTcy0l+9pyKvRsCoIWkv+8B+GKVi6pE3VEHSgSeuK1RNUrFiWa53kDyfiKK+ +g7R5Kj5/fnBNBWmzE/Kno7lpGHE8bYZF+sW6h9f1+Wl4erC4nIO0bZFjy08B +GvbHmIzUk/Wx52WKkKckDU2jSj5rkx70VNGTkqNhQj5xc4ystwOzDa6d8jTs +SXs/e5n0EersdaNNNOTcLqX+i6zXGSK9ZUGThg780RKXSUeab5qo1qGhYPL1 +c0zS8cEeegpbaXg9rF3++GOyf5raWjjtaNhmm8TfSvYH1dlnonY3DU/wEyG7 +SBeN/xUKcaXhuRqeox/qyPMW090z7EXDO8kLWkNkvzX75k00hdHwlnDRv81k +v1osMYRPnqChZmCzjC7pjvQuPZ1oGsYI3p0sIPu9/wFfdFESDb90fT0WfI/s +z9WhwvFXaagTxak2RuZFSL4AnVVAQ39bjuMs0vM6pXtmiml4Rb808DyZL1zu +A0U+lTR01F1w3kjmj2SVOd2skYaRHqVWumQ+5ZoM7/nvGQ19yoQ4j9wm+6k/ +KvreCxraVWsH3CDzTJ2TaFXppmGlQ53TGjLvjHfJufGM0fDu6oIXFTcIODQ/ +Fd2yVh5FdVLpTvlkvQQfEP8iLI86kp8um5N5yvvtXTmXpDyO1oRp610joPh9 +U89WBXksklUXWUXm8cDjf9Tu6skj3+ISEXGJAJt4Rl/BPnnccvLyfBmZ75T/ +bh+u95bH4V0/czxSyTwJU+D66C+PlTmfzwunEJDot1pDMlQe9XYlRxwk50eD +5ce4tER5LIsaOzYVS84D4RjNE9XyGFsbXG5Dzh+OlJnm7HvyWGxitOPFMfJ/ +cwW43quTx6yaH07byHl1cMY+fuqpPDrrST3fQM63oj6l977v5HFrrez61gBy +3ua1JOziUsBsjfNnPMn5uLBJcEB9twKqiVhdWAYCZnOlY7RdFdD9y58Gka0E +TK9TVmLsU8BbopH3VJjk+f1mBJj4K6Bd+mqubfrk/KvzmnWNItcTfrlr92ay +vy3vCyQWK2DcG+WgISpZbwfdYWhGAdWHTIzKl9hw6aPf0L+LCvio98pq90U2 +XLAJiZ/4q4BGnjr9a+fZkKad+GKeTxGnrHLjvX+zIfZPtdM6iiIO/DzvNPmV +DQdTuI8wzRTxherFuGM9bGCW38q/eFERQ7JaNu+7zYb3tPI80yuK2N8cwz1S +xobIi6XXpvMUkXbl/LEDN9lwP6bkqn2pIqoED6p7X2eDlnN+tsBDRVxjM6a6 +7TIbNnJfSE/4rIjyy9NE+hny3r7vRHSYmhK+3p+/EErex6aEd3g4Niphb6F9 +Te1SNYykejge5VHBUIuCAQmparD4EW4xqrcei+/krHi6sQrGvXhD7pzegJfO +eU12yFeQ930JzrONG3HDp5FjuR/LQfilSlrVD1V0ttkfLkKUgmxipa2enhqG +bXrCjnG6AdmbGIIivuqYZTKelrepGNqkjXR/Z2jg9H/Ub1VS18FAtjFds0cT +h5YzVvf/ygcBrsJQz9jNqD8QWnFE6hpQYqhMF5Ut6Pbt0c1AoxzgU3a7Z/98 +CzrpCNaMPb8IGiypyvC9Wpjc+VE5tjMLjg4IN+3g0Mam8Z2SD76mw4/fqbst +srUxU+N49/35VNiu+SzHQl0Hk/cSRR9qE+Hxb8M/cx062BPstqXi9hkIVNN6 +1+mji/MJiUpr9scAa9K7y4VPD38pNxq5Zp8EUyXJnWsL9fC04hvB+LJw2BCd +HNFIp2PjmzsTrkkh8NCwmNvKgI5aJ9kpHyJCwHauPrObSUff30+7/P1CICJw +5taYER1blwxtb2wPgRY3j88CVnQklqdNbq8KAT+G3o49HnTUtRSc+JRwFEp/ +fZaZTiS/PxxdfO98MKj6MOqV39FRiHiq+SQuCM4rWC/GfaBjpONjMeGAIJj+ +tF93aICOEVXdjaG2QfDYNbX82jAdZbWNdgbJBYG97adLEhN0NAq7TtWvCYTj +hvFH+Dj00WabZong1GFoEeqUn1DWx87uSp7coEPg89jvzJ1gfbza1jS84Zo/ +TB7+Fm4aqo/xBvVFvQn+ECF36GBPmD4m1FvlZwf5Q/LJIPv5E/oozP9G2s7I +H6oMwmjMBH1cpaE3ljPqB0v34h425ejj8qp408QtfpBZeW36TZM+Rt1reRXV +cwDq87u8p8QYGGn1wP+UvTcMWsnvC5Nk4CWR7M568AaOhcMuf6QZGPhZgSmo +7g3GdjzW3DQGmlp8+PWRxxuerTCgS6kysEeE//2mx17Qvj+Pz2grAxtF2rYl +qXvBO6WAivQDDDz6N6eYV2I/TN/8O6d5n4Ffx2qPSYh4wBdHs/ykBwy8qxt4 +rWelB/StPGc+XMfAJyNGd40m9kGdh/Tliw0MjDv7YejWnX0QK6lrsNzKwLWZ +e0uTTfaBYGLAybYPDDQqUr/v5OcOar7dHD6cBthcP1PSW+8GXsrlfDk7DfBX +22xpdLkLRD51D1CxNcBTZmpLypkukO4j/IJtb4DDEy8Of45wgYfFx1NfOBlg +3S/NoBwzFxBVMV+37GmAPzfkbhIZdoZnKqOiHmEGeEPHuEKI5gyqG6g0lTwD +nL85mttd6ghTqll67J8GODYoVLtxwQH62tFU5LcB6usc2ar3xQEaAicdQmcM +UFNwpNn+rQOksS2C9RYNcD3dv6zutgOoGnDcquUyRM8rjZctvRxgv8Vh+SZx +Q1TollZz7bSHLt/ta7qYhnice/PBkRo7qCn683km0RDnYjTESg7YgN620Lkd +KYYYNVATc9vcBu5+Hl+Tf84QL1p3pXeo2gCbMkDfkWmI4i+aLPf+sIZb2Q3n +rl0xxBq52Y3lx60hPzWesb3CEIM6T+yez9wJSaHrMrLfGuIVg+/zfb2W4Gqi +iIYUJq5dHD/fX2IOy128Ak00JhqeEJWqTjWHfJ/J9zsUmbgrsOFGwVFz+JLw +INx1AxP1KwZiX241h6OtNpXHtZj40fj+j5192yHZ+iSlxoyJpyw52j+t2w61 +zt1LOkFMLLPgTqlLNwWZw2cfaDQwcXksfViu2xjS/h7QTWlk4v1XI+mLT4yB +M9Os+t9mJhpwXh0cqzCGb/e4S/NbmVjzxkdjMdEYajnOZAu/ZeIKrZa5CZYx +uF6IDp8dJdcv5OESKDeC7Lrjuo9Xs9BldNXIqwyENdYu1dICLFxeal/1LBoh +elBfPVyQhQdHR8TbgxD8uOeVNouxUBQb2nisEeg2YaKFFBbe1l0txlyN0DN0 +9Hf8FhY+GU/5JCUEIMZ/qHqnEwv/slyaJmVZULQtKvKnCwt1WEkS8n+YoBWV +ti3LjYUnNI5uDu9ngvXPqu4+Txbqyk6qpl1kQkLPzILXIRZaMkoLvISZMF94 +2jgyhoUzOoND5wUN4Z1h1tuSchYyKj3N1qowwO9Y0VWLChZOXO0+cJyXAbMV +d33Gq1j4w1bKlvu7Pggr9M1tucdCCyrvypNV+mDJKyf7qIGFadfO3fjM1IeH +XSXeb7tZmDHT8z5kDx12CNSoh/Wx8B+5npQOoEPf9tZZyfcs/JVut2m7Eh2m +a78nug+yUPFG/tOMCT1QL9h8++s3FjrDV7OkGD14+M4oLHWChXFcwXavD+jB +DlEH0PxJ7mfFP746Vnpw4OyxztAZFlJ9wswcJPRguiEhR2KeheoqNr1rl3Uh +dvGSV+0iC2n1i1yjQ7ogqFOqtneZhesL66v6WnTh2uHamb9/Wag0sPhkrEIX +/gciFdz1 + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Ve0XB3CRDJXMs3uvsZKhTNfl3vYmRGQsUxIhQ0UipJQhMiVDb0nJ +EApluKdBVIQKSSljg2ToVaGUOd5+5/fXWZ911nnWs86z93c/8vuD7H04OTg4 +9FdwcPz/OTvQ2qyUUrS1bgNfXrG16daua5LHjfpigWV4pfNiiiKg2Kv9kn2Z +UHP4VIZ/ijaE2Zb1cvUVgo7s7fsWKdtAaFIic6GXDeLuwiOiKQ7w6aF10HRv +IxzW0B4+kOwFZkrfPk71voGOcpnHT86GwEIv/Z+fvUMgzB3PbxAVB03bbhR1 +Fv6GdtbU1WDKBZD99ODLfrVlGD0bEaoQmguih/aV8WzjwpiOdRkl665D5haz +OuvdvGjH6OLbGnAD+rM3N0wJrsX/3O/7l4uXQ0rR6VecUkJ42Ilxk/diBezQ +8RcWUxRCAdOaFURhBfA22+9ery6E39Sr+ndVVsCZYeX3lkZCWG4e/OdUSwWc +VGj/csFfCJm5g02HFisgMF/yP5VaIewbvLj/llsl2F2tVrPcI4xJVwoNHddW +gcSF4aSsXBHUN/n7h/a4CiQ33T0zXyKCRo+0W7maqkC6MeH03ioRDBaruT30 +vAooPzceW98kgt+f+dRe6KwCZasjHnVjIhigm/emdaQKtFcu6w1ri6L/jbb4 +cP5qsAkVH9FqE8XpK/OnP9pXg+3qsYFLb0VxviCIbuxUDfaFD/qXPojiF7f6 +2cI91eD42u3Vsx+iWJLpnuLsXQ171a7XuoqJobfyes4Lx6rh4IhmRqyHGIb8 +ovVaXqqGs7sstr6ZFcPNir9nH/ZWg/SdDmnOFeL4btWW6Zn31VAhsmtuy2px +VFkXZKg6WA09b9yrMqjiaOI7VnJmrBqU7EIV7MzFMYKh9p1joRoad+aten1Z +HE374hbFpdiwbDbT8ZIpgXFD/JtqdrMhvSSyfNlMAovaRIVcXdigtIojUd1O +Ajcof2bOubHB6im/0TkfCRyaqPdR9GZDzjYaYZUmgdLrl5aMj7JBHy0vvfgk +gYYEzTLvHBtCGAX7WmMlccH2q/TLBjbsyBeYtkyVxJbCkyZFTWxQ4DmZ2PGP +JJ4+c9Y+/BkbXnc5Vr+9KYlaXS9lhdrZoHFkDddAhyRO6P0OEiHreKwkvOSX +tBRy80uaOIyzwU3UekKGkML3/iIpT0QI0D5RF3PtoRR29JU2iIkTwD+0QVz+ +mRTqmj8d9pEk4EElF6j0S6HfzOrpBVkCxC0fpG/+K4VFtre2TykT8DpGScfU +Uhrjdx4Ql6MTYPJjMTJwWBqD+QJCDjkScNz8guqTcWlM5E3m03MmoKJA/Z3I +rDSus/7Y9MeFAMldHowHvDL4KFPtxom9BIzXPJ3j0pDBn8PS9J3eBGTFpode +jpDBF+VXZ+jBBLS836g0HiODWp5665qPErCk0/R2a4oMZgi377YKJeDAvzNa +I7kyuKdx+yG7cAIMrPZMaTTJ4B9fi1fqUQQMiakENq+VxdRneXOaiQRIBNXL +SUjIYpI3qJ5OIsCqxfmlP00WV/h1Z7UlE3AvMkVtnbYsTimmCjieIyD5089v +Ls6ymHV94Q5kEqBVWuf7o1AWX1egh/sVAnw5d0sY35LFczvNdwVfJeDqnsln +F+7K4mdp/+ToXAJWCcirGLTI4nzKl/qsPALeHU0YOTMhi4FQ4H3uOgExTDtP +aX05fORjCB1lBJi7X/tFN5bDlVr/vr1fToBA9Pe43VZyyJPiuy73Frl+U3xJ +uoccTrivOO1aQUDNjtrvq5LkEHfc3ltQTcDpQzxRSllyGFuzysyPTYBZ2i4B +41w53I+ZH1UJAro6JzdHVcuhnFcy5fodAn46K4b97pfD8aU9qzzuE3A/8giP +0Igcts9lJ6ysIeDU1UfZGpNyOOfe9LiI9JpBpzp/TgqOx7rs6XtAwNsVxVZn +11BQxpW78WAtATmKvz4WiVPQ9TVldJH0et9UjkFVCqYEqvqseUjAZGJ/xrIO +BTN4/ZrTSN8pU1GUAQo2KZaNrHlEgPFkg6mjAwV36gwdWiLtfmwmuf0EBavW +Lz28WU+A8iVj2W/xFDyzV8OUr+H/9XP+Nk86BXMGui/5kI5c2vjauIiCUo5O +BUJPCDCihHt6VFCw679cV0/SvNj8K6qGgp67tYdvkf4nzl3sQTsFFV20fOmN +BLgVl5f09FBwMlnEJ4y0wvN5+vQgBbODtejVpL+OmbYKfadg4YaOgX9JV/Fn +uWrOUDCBtn6vdBMB4WqD363+UjBf7jRhTnqrtXpUAB8VFehSw0dJcx+JFEgU +oeJ8N2Mim3R7xvO8YjkqPiFU3taSziJEtzStp+LdfpWLfaRduz0bB7dQMSkv +lv6LtPxchcN/hlQ8WBZXw9NMwJjk0oiMGRUHv4dKS5GuNLAIY9hSsTK/0F2F +dJjbRR4nVyr22LgmaJJmnhrODvWmonfrt0wd0lz5m1UzA6kYpFwUr0u67UlU +XWUEFacbe/dpkU4fbrN6GUvFp2Z9CptIO3FLDnxLpWJgzsIrKmnKep8g3ktU +FP6e7idIetSczaFSQL6/OT2xRO73VsDfjG3lVCyJO+k5Sjok1UrR8y4VNQJj +mltJG1RcvnOqnor3svdKlpE26e1Ynmyh4rJn+1AiaWuOldv3vaHi+ObnKt6k +nTcy0l+9pyKvRsCoIWkv+8B+GKVi6pE3VEHSgSeuK1RNUrFiWa53kDyfiKK+ +g7R5Kj5/fnBNBWmzE/Kno7lpGHE8bYZF+sW6h9f1+Wl4erC4nIO0bZFjy08B +GvbHmIzUk/Wx52WKkKckDU2jSj5rkx70VNGTkqNhQj5xc4ystwOzDa6d8jTs +SXs/e5n0EersdaNNNOTcLqX+i6zXGSK9ZUGThg780RKXSUeab5qo1qGhYPL1 +c0zS8cEeegpbaXg9rF3++GOyf5raWjjtaNhmm8TfSvYH1dlnonY3DU/wEyG7 +SBeN/xUKcaXhuRqeox/qyPMW090z7EXDO8kLWkNkvzX75k00hdHwlnDRv81k +v1osMYRPnqChZmCzjC7pjvQuPZ1oGsYI3p0sIPu9/wFfdFESDb90fT0WfI/s +z9WhwvFXaagTxak2RuZFSL4AnVVAQ39bjuMs0vM6pXtmiml4Rb808DyZL1zu +A0U+lTR01F1w3kjmj2SVOd2skYaRHqVWumQ+5ZoM7/nvGQ19yoQ4j9wm+6k/ +KvreCxraVWsH3CDzTJ2TaFXppmGlQ53TGjLvjHfJufGM0fDu6oIXFTcIODQ/ +Fd2yVh5FdVLpTvlkvQQfEP8iLI86kp8um5N5yvvtXTmXpDyO1oRp610joPh9 +U89WBXksklUXWUXm8cDjf9Tu6skj3+ISEXGJAJt4Rl/BPnnccvLyfBmZ75T/ +bh+u95bH4V0/czxSyTwJU+D66C+PlTmfzwunEJDot1pDMlQe9XYlRxwk50eD +5ce4tER5LIsaOzYVS84D4RjNE9XyGFsbXG5Dzh+OlJnm7HvyWGxitOPFMfJ/ +cwW43quTx6yaH07byHl1cMY+fuqpPDrrST3fQM63oj6l977v5HFrrez61gBy +3ua1JOziUsBsjfNnPMn5uLBJcEB9twKqiVhdWAYCZnOlY7RdFdD9y58Gka0E +TK9TVmLsU8BbopH3VJjk+f1mBJj4K6Bd+mqubfrk/KvzmnWNItcTfrlr92ay +vy3vCyQWK2DcG+WgISpZbwfdYWhGAdWHTIzKl9hw6aPf0L+LCvio98pq90U2 +XLAJiZ/4q4BGnjr9a+fZkKad+GKeTxGnrHLjvX+zIfZPtdM6iiIO/DzvNPmV +DQdTuI8wzRTxherFuGM9bGCW38q/eFERQ7JaNu+7zYb3tPI80yuK2N8cwz1S +xobIi6XXpvMUkXbl/LEDN9lwP6bkqn2pIqoED6p7X2eDlnN+tsBDRVxjM6a6 +7TIbNnJfSE/4rIjyy9NE+hny3r7vRHSYmhK+3p+/EErex6aEd3g4Niphb6F9 +Te1SNYykejge5VHBUIuCAQmparD4EW4xqrcei+/krHi6sQrGvXhD7pzegJfO +eU12yFeQ930JzrONG3HDp5FjuR/LQfilSlrVD1V0ttkfLkKUgmxipa2enhqG +bXrCjnG6AdmbGIIivuqYZTKelrepGNqkjXR/Z2jg9H/Ub1VS18FAtjFds0cT +h5YzVvf/ygcBrsJQz9jNqD8QWnFE6hpQYqhMF5Ut6Pbt0c1AoxzgU3a7Z/98 +CzrpCNaMPb8IGiypyvC9Wpjc+VE5tjMLjg4IN+3g0Mam8Z2SD76mw4/fqbst +srUxU+N49/35VNiu+SzHQl0Hk/cSRR9qE+Hxb8M/cx062BPstqXi9hkIVNN6 +1+mji/MJiUpr9scAa9K7y4VPD38pNxq5Zp8EUyXJnWsL9fC04hvB+LJw2BCd +HNFIp2PjmzsTrkkh8NCwmNvKgI5aJ9kpHyJCwHauPrObSUff30+7/P1CICJw +5taYER1blwxtb2wPgRY3j88CVnQklqdNbq8KAT+G3o49HnTUtRSc+JRwFEp/ +fZaZTiS/PxxdfO98MKj6MOqV39FRiHiq+SQuCM4rWC/GfaBjpONjMeGAIJj+ +tF93aICOEVXdjaG2QfDYNbX82jAdZbWNdgbJBYG97adLEhN0NAq7TtWvCYTj +hvFH+Dj00WabZong1GFoEeqUn1DWx87uSp7coEPg89jvzJ1gfbza1jS84Zo/ +TB7+Fm4aqo/xBvVFvQn+ECF36GBPmD4m1FvlZwf5Q/LJIPv5E/oozP9G2s7I +H6oMwmjMBH1cpaE3ljPqB0v34h425ejj8qp408QtfpBZeW36TZM+Rt1reRXV +cwDq87u8p8QYGGn1wP+UvTcMWsnvC5Nk4CWR7M568AaOhcMuf6QZGPhZgSmo +7g3GdjzW3DQGmlp8+PWRxxuerTCgS6kysEeE//2mx17Qvj+Pz2grAxtF2rYl +qXvBO6WAivQDDDz6N6eYV2I/TN/8O6d5n4Ffx2qPSYh4wBdHs/ykBwy8qxt4 +rWelB/StPGc+XMfAJyNGd40m9kGdh/Tliw0MjDv7YejWnX0QK6lrsNzKwLWZ +e0uTTfaBYGLAybYPDDQqUr/v5OcOar7dHD6cBthcP1PSW+8GXsrlfDk7DfBX +22xpdLkLRD51D1CxNcBTZmpLypkukO4j/IJtb4DDEy8Of45wgYfFx1NfOBlg +3S/NoBwzFxBVMV+37GmAPzfkbhIZdoZnKqOiHmEGeEPHuEKI5gyqG6g0lTwD +nL85mttd6ghTqll67J8GODYoVLtxwQH62tFU5LcB6usc2ar3xQEaAicdQmcM +UFNwpNn+rQOksS2C9RYNcD3dv6zutgOoGnDcquUyRM8rjZctvRxgv8Vh+SZx +Q1TollZz7bSHLt/ta7qYhnice/PBkRo7qCn683km0RDnYjTESg7YgN620Lkd +KYYYNVATc9vcBu5+Hl+Tf84QL1p3pXeo2gCbMkDfkWmI4i+aLPf+sIZb2Q3n +rl0xxBq52Y3lx60hPzWesb3CEIM6T+yez9wJSaHrMrLfGuIVg+/zfb2W4Gqi +iIYUJq5dHD/fX2IOy128Ak00JhqeEJWqTjWHfJ/J9zsUmbgrsOFGwVFz+JLw +INx1AxP1KwZiX241h6OtNpXHtZj40fj+j5192yHZ+iSlxoyJpyw52j+t2w61 +zt1LOkFMLLPgTqlLNwWZw2cfaDQwcXksfViu2xjS/h7QTWlk4v1XI+mLT4yB +M9Os+t9mJhpwXh0cqzCGb/e4S/NbmVjzxkdjMdEYajnOZAu/ZeIKrZa5CZYx +uF6IDp8dJdcv5OESKDeC7Lrjuo9Xs9BldNXIqwyENdYu1dICLFxeal/1LBoh +elBfPVyQhQdHR8TbgxD8uOeVNouxUBQb2nisEeg2YaKFFBbe1l0txlyN0DN0 +9Hf8FhY+GU/5JCUEIMZ/qHqnEwv/slyaJmVZULQtKvKnCwt1WEkS8n+YoBWV +ti3LjYUnNI5uDu9ngvXPqu4+Txbqyk6qpl1kQkLPzILXIRZaMkoLvISZMF94 +2jgyhoUzOoND5wUN4Z1h1tuSchYyKj3N1qowwO9Y0VWLChZOXO0+cJyXAbMV +d33Gq1j4w1bKlvu7Pggr9M1tucdCCyrvypNV+mDJKyf7qIGFadfO3fjM1IeH +XSXeb7tZmDHT8z5kDx12CNSoh/Wx8B+5npQOoEPf9tZZyfcs/JVut2m7Eh2m +a78nug+yUPFG/tOMCT1QL9h8++s3FjrDV7OkGD14+M4oLHWChXFcwXavD+jB +DlEH0PxJ7mfFP746Vnpw4OyxztAZFlJ9wswcJPRguiEhR2KeheoqNr1rl3Uh +dvGSV+0iC2n1i1yjQ7ogqFOqtneZhesL66v6WnTh2uHamb9/Wag0sPhkrEIX +/gciFdz1 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07721266281818882}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07721266281818882}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Ve0XB3CRDJXMs3uvsZKhTNfl3vYmRGQsUxIhQ0UipJQhMiVDb0nJ +EApluKdBVIQKSSljg2ToVaGUOd5+5/fXWZ911nnWs86z93c/8vuD7H04OTg4 +9FdwcPz/OTvQ2qyUUrS1bgNfXrG16daua5LHjfpigWV4pfNiiiKg2Kv9kn2Z +UHP4VIZ/ijaE2Zb1cvUVgo7s7fsWKdtAaFIic6GXDeLuwiOiKQ7w6aF10HRv +IxzW0B4+kOwFZkrfPk71voGOcpnHT86GwEIv/Z+fvUMgzB3PbxAVB03bbhR1 +Fv6GdtbU1WDKBZD99ODLfrVlGD0bEaoQmguih/aV8WzjwpiOdRkl665D5haz +OuvdvGjH6OLbGnAD+rM3N0wJrsX/3O/7l4uXQ0rR6VecUkJ42Ilxk/diBezQ +8RcWUxRCAdOaFURhBfA22+9ery6E39Sr+ndVVsCZYeX3lkZCWG4e/OdUSwWc +VGj/csFfCJm5g02HFisgMF/yP5VaIewbvLj/llsl2F2tVrPcI4xJVwoNHddW +gcSF4aSsXBHUN/n7h/a4CiQ33T0zXyKCRo+0W7maqkC6MeH03ioRDBaruT30 +vAooPzceW98kgt+f+dRe6KwCZasjHnVjIhigm/emdaQKtFcu6w1ri6L/jbb4 +cP5qsAkVH9FqE8XpK/OnP9pXg+3qsYFLb0VxviCIbuxUDfaFD/qXPojiF7f6 +2cI91eD42u3Vsx+iWJLpnuLsXQ171a7XuoqJobfyes4Lx6rh4IhmRqyHGIb8 +ovVaXqqGs7sstr6ZFcPNir9nH/ZWg/SdDmnOFeL4btWW6Zn31VAhsmtuy2px +VFkXZKg6WA09b9yrMqjiaOI7VnJmrBqU7EIV7MzFMYKh9p1joRoad+aten1Z +HE374hbFpdiwbDbT8ZIpgXFD/JtqdrMhvSSyfNlMAovaRIVcXdigtIojUd1O +Ajcof2bOubHB6im/0TkfCRyaqPdR9GZDzjYaYZUmgdLrl5aMj7JBHy0vvfgk +gYYEzTLvHBtCGAX7WmMlccH2q/TLBjbsyBeYtkyVxJbCkyZFTWxQ4DmZ2PGP +JJ4+c9Y+/BkbXnc5Vr+9KYlaXS9lhdrZoHFkDddAhyRO6P0OEiHreKwkvOSX +tBRy80uaOIyzwU3UekKGkML3/iIpT0QI0D5RF3PtoRR29JU2iIkTwD+0QVz+ +mRTqmj8d9pEk4EElF6j0S6HfzOrpBVkCxC0fpG/+K4VFtre2TykT8DpGScfU +Uhrjdx4Ql6MTYPJjMTJwWBqD+QJCDjkScNz8guqTcWlM5E3m03MmoKJA/Z3I +rDSus/7Y9MeFAMldHowHvDL4KFPtxom9BIzXPJ3j0pDBn8PS9J3eBGTFpode +jpDBF+VXZ+jBBLS836g0HiODWp5665qPErCk0/R2a4oMZgi377YKJeDAvzNa +I7kyuKdx+yG7cAIMrPZMaTTJ4B9fi1fqUQQMiakENq+VxdRneXOaiQRIBNXL +SUjIYpI3qJ5OIsCqxfmlP00WV/h1Z7UlE3AvMkVtnbYsTimmCjieIyD5089v +Ls6ymHV94Q5kEqBVWuf7o1AWX1egh/sVAnw5d0sY35LFczvNdwVfJeDqnsln +F+7K4mdp/+ToXAJWCcirGLTI4nzKl/qsPALeHU0YOTMhi4FQ4H3uOgExTDtP +aX05fORjCB1lBJi7X/tFN5bDlVr/vr1fToBA9Pe43VZyyJPiuy73Frl+U3xJ +uoccTrivOO1aQUDNjtrvq5LkEHfc3ltQTcDpQzxRSllyGFuzysyPTYBZ2i4B +41w53I+ZH1UJAro6JzdHVcuhnFcy5fodAn46K4b97pfD8aU9qzzuE3A/8giP +0Igcts9lJ6ysIeDU1UfZGpNyOOfe9LiI9JpBpzp/TgqOx7rs6XtAwNsVxVZn +11BQxpW78WAtATmKvz4WiVPQ9TVldJH0et9UjkFVCqYEqvqseUjAZGJ/xrIO +BTN4/ZrTSN8pU1GUAQo2KZaNrHlEgPFkg6mjAwV36gwdWiLtfmwmuf0EBavW +Lz28WU+A8iVj2W/xFDyzV8OUr+H/9XP+Nk86BXMGui/5kI5c2vjauIiCUo5O +BUJPCDCihHt6VFCw679cV0/SvNj8K6qGgp67tYdvkf4nzl3sQTsFFV20fOmN +BLgVl5f09FBwMlnEJ4y0wvN5+vQgBbODtejVpL+OmbYKfadg4YaOgX9JV/Fn +uWrOUDCBtn6vdBMB4WqD363+UjBf7jRhTnqrtXpUAB8VFehSw0dJcx+JFEgU +oeJ8N2Mim3R7xvO8YjkqPiFU3taSziJEtzStp+LdfpWLfaRduz0bB7dQMSkv +lv6LtPxchcN/hlQ8WBZXw9NMwJjk0oiMGRUHv4dKS5GuNLAIY9hSsTK/0F2F +dJjbRR4nVyr22LgmaJJmnhrODvWmonfrt0wd0lz5m1UzA6kYpFwUr0u67UlU +XWUEFacbe/dpkU4fbrN6GUvFp2Z9CptIO3FLDnxLpWJgzsIrKmnKep8g3ktU +FP6e7idIetSczaFSQL6/OT2xRO73VsDfjG3lVCyJO+k5Sjok1UrR8y4VNQJj +mltJG1RcvnOqnor3svdKlpE26e1Ynmyh4rJn+1AiaWuOldv3vaHi+ObnKt6k +nTcy0l+9pyKvRsCoIWkv+8B+GKVi6pE3VEHSgSeuK1RNUrFiWa53kDyfiKK+ +g7R5Kj5/fnBNBWmzE/Kno7lpGHE8bYZF+sW6h9f1+Wl4erC4nIO0bZFjy08B +GvbHmIzUk/Wx52WKkKckDU2jSj5rkx70VNGTkqNhQj5xc4ystwOzDa6d8jTs +SXs/e5n0EersdaNNNOTcLqX+i6zXGSK9ZUGThg780RKXSUeab5qo1qGhYPL1 +c0zS8cEeegpbaXg9rF3++GOyf5raWjjtaNhmm8TfSvYH1dlnonY3DU/wEyG7 +SBeN/xUKcaXhuRqeox/qyPMW090z7EXDO8kLWkNkvzX75k00hdHwlnDRv81k +v1osMYRPnqChZmCzjC7pjvQuPZ1oGsYI3p0sIPu9/wFfdFESDb90fT0WfI/s +z9WhwvFXaagTxak2RuZFSL4AnVVAQ39bjuMs0vM6pXtmiml4Rb808DyZL1zu +A0U+lTR01F1w3kjmj2SVOd2skYaRHqVWumQ+5ZoM7/nvGQ19yoQ4j9wm+6k/ +KvreCxraVWsH3CDzTJ2TaFXppmGlQ53TGjLvjHfJufGM0fDu6oIXFTcIODQ/ +Fd2yVh5FdVLpTvlkvQQfEP8iLI86kp8um5N5yvvtXTmXpDyO1oRp610joPh9 +U89WBXksklUXWUXm8cDjf9Tu6skj3+ISEXGJAJt4Rl/BPnnccvLyfBmZ75T/ +bh+u95bH4V0/czxSyTwJU+D66C+PlTmfzwunEJDot1pDMlQe9XYlRxwk50eD +5ce4tER5LIsaOzYVS84D4RjNE9XyGFsbXG5Dzh+OlJnm7HvyWGxitOPFMfJ/ +cwW43quTx6yaH07byHl1cMY+fuqpPDrrST3fQM63oj6l977v5HFrrez61gBy +3ua1JOziUsBsjfNnPMn5uLBJcEB9twKqiVhdWAYCZnOlY7RdFdD9y58Gka0E +TK9TVmLsU8BbopH3VJjk+f1mBJj4K6Bd+mqubfrk/KvzmnWNItcTfrlr92ay +vy3vCyQWK2DcG+WgISpZbwfdYWhGAdWHTIzKl9hw6aPf0L+LCvio98pq90U2 +XLAJiZ/4q4BGnjr9a+fZkKad+GKeTxGnrHLjvX+zIfZPtdM6iiIO/DzvNPmV +DQdTuI8wzRTxherFuGM9bGCW38q/eFERQ7JaNu+7zYb3tPI80yuK2N8cwz1S +xobIi6XXpvMUkXbl/LEDN9lwP6bkqn2pIqoED6p7X2eDlnN+tsBDRVxjM6a6 +7TIbNnJfSE/4rIjyy9NE+hny3r7vRHSYmhK+3p+/EErex6aEd3g4Niphb6F9 +Te1SNYykejge5VHBUIuCAQmparD4EW4xqrcei+/krHi6sQrGvXhD7pzegJfO +eU12yFeQ930JzrONG3HDp5FjuR/LQfilSlrVD1V0ttkfLkKUgmxipa2enhqG +bXrCjnG6AdmbGIIivuqYZTKelrepGNqkjXR/Z2jg9H/Ub1VS18FAtjFds0cT +h5YzVvf/ygcBrsJQz9jNqD8QWnFE6hpQYqhMF5Ut6Pbt0c1AoxzgU3a7Z/98 +CzrpCNaMPb8IGiypyvC9Wpjc+VE5tjMLjg4IN+3g0Mam8Z2SD76mw4/fqbst +srUxU+N49/35VNiu+SzHQl0Hk/cSRR9qE+Hxb8M/cx062BPstqXi9hkIVNN6 +1+mji/MJiUpr9scAa9K7y4VPD38pNxq5Zp8EUyXJnWsL9fC04hvB+LJw2BCd +HNFIp2PjmzsTrkkh8NCwmNvKgI5aJ9kpHyJCwHauPrObSUff30+7/P1CICJw +5taYER1blwxtb2wPgRY3j88CVnQklqdNbq8KAT+G3o49HnTUtRSc+JRwFEp/ +fZaZTiS/PxxdfO98MKj6MOqV39FRiHiq+SQuCM4rWC/GfaBjpONjMeGAIJj+ +tF93aICOEVXdjaG2QfDYNbX82jAdZbWNdgbJBYG97adLEhN0NAq7TtWvCYTj +hvFH+Dj00WabZong1GFoEeqUn1DWx87uSp7coEPg89jvzJ1gfbza1jS84Zo/ +TB7+Fm4aqo/xBvVFvQn+ECF36GBPmD4m1FvlZwf5Q/LJIPv5E/oozP9G2s7I +H6oMwmjMBH1cpaE3ljPqB0v34h425ejj8qp408QtfpBZeW36TZM+Rt1reRXV +cwDq87u8p8QYGGn1wP+UvTcMWsnvC5Nk4CWR7M568AaOhcMuf6QZGPhZgSmo +7g3GdjzW3DQGmlp8+PWRxxuerTCgS6kysEeE//2mx17Qvj+Pz2grAxtF2rYl +qXvBO6WAivQDDDz6N6eYV2I/TN/8O6d5n4Ffx2qPSYh4wBdHs/ykBwy8qxt4 +rWelB/StPGc+XMfAJyNGd40m9kGdh/Tliw0MjDv7YejWnX0QK6lrsNzKwLWZ +e0uTTfaBYGLAybYPDDQqUr/v5OcOar7dHD6cBthcP1PSW+8GXsrlfDk7DfBX +22xpdLkLRD51D1CxNcBTZmpLypkukO4j/IJtb4DDEy8Of45wgYfFx1NfOBlg +3S/NoBwzFxBVMV+37GmAPzfkbhIZdoZnKqOiHmEGeEPHuEKI5gyqG6g0lTwD +nL85mttd6ghTqll67J8GODYoVLtxwQH62tFU5LcB6usc2ar3xQEaAicdQmcM +UFNwpNn+rQOksS2C9RYNcD3dv6zutgOoGnDcquUyRM8rjZctvRxgv8Vh+SZx +Q1TollZz7bSHLt/ta7qYhnice/PBkRo7qCn683km0RDnYjTESg7YgN620Lkd +KYYYNVATc9vcBu5+Hl+Tf84QL1p3pXeo2gCbMkDfkWmI4i+aLPf+sIZb2Q3n +rl0xxBq52Y3lx60hPzWesb3CEIM6T+yez9wJSaHrMrLfGuIVg+/zfb2W4Gqi +iIYUJq5dHD/fX2IOy128Ak00JhqeEJWqTjWHfJ/J9zsUmbgrsOFGwVFz+JLw +INx1AxP1KwZiX241h6OtNpXHtZj40fj+j5192yHZ+iSlxoyJpyw52j+t2w61 +zt1LOkFMLLPgTqlLNwWZw2cfaDQwcXksfViu2xjS/h7QTWlk4v1XI+mLT4yB +M9Os+t9mJhpwXh0cqzCGb/e4S/NbmVjzxkdjMdEYajnOZAu/ZeIKrZa5CZYx +uF6IDp8dJdcv5OESKDeC7Lrjuo9Xs9BldNXIqwyENdYu1dICLFxeal/1LBoh +elBfPVyQhQdHR8TbgxD8uOeVNouxUBQb2nisEeg2YaKFFBbe1l0txlyN0DN0 +9Hf8FhY+GU/5JCUEIMZ/qHqnEwv/slyaJmVZULQtKvKnCwt1WEkS8n+YoBWV +ti3LjYUnNI5uDu9ngvXPqu4+Txbqyk6qpl1kQkLPzILXIRZaMkoLvISZMF94 +2jgyhoUzOoND5wUN4Z1h1tuSchYyKj3N1qowwO9Y0VWLChZOXO0+cJyXAbMV +d33Gq1j4w1bKlvu7Pggr9M1tucdCCyrvypNV+mDJKyf7qIGFadfO3fjM1IeH +XSXeb7tZmDHT8z5kDx12CNSoh/Wx8B+5npQOoEPf9tZZyfcs/JVut2m7Eh2m +a78nug+yUPFG/tOMCT1QL9h8++s3FjrDV7OkGD14+M4oLHWChXFcwXavD+jB +DlEH0PxJ7mfFP746Vnpw4OyxztAZFlJ9wswcJPRguiEhR2KeheoqNr1rl3Uh +dvGSV+0iC2n1i1yjQ7ogqFOqtneZhesL66v6WnTh2uHamb9/Wag0sPhkrEIX +/gciFdz1 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07721266281818882}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, + "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07721266281818882}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994389538592507*^9}, + CellLabel-> + "Out[140]=",ExpressionUUID->"37a88678-8020-47a7-a030-2a0caad915e4"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", - RowBox[{"x", ",", "xx"}], "]"}]], "Input",ExpressionUUID->"4ad58a38-0776-\ -5240-aa41-ba7c8ff64fb9"], + RowBox[{"x", ",", "xx"}], "]"}]], "Input", + CellLabel-> + "In[141]:=",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Ve0XB3CRDJXMs3uvsZKhTNfl3vYmRGQsUxIhQ0UipJQhMiVDb0nJ +EApluKdBVIQKSSljg2ToVaGUOd5+5/fXWZ911nnWs86z93c/8vuD7H04OTg4 +9FdwcPz/OTvQ2qyUUrS1bgNfXrG16daua5LHjfpigWV4pfNiiiKg2Kv9kn2Z +UHP4VIZ/ijaE2Zb1cvUVgo7s7fsWKdtAaFIic6GXDeLuwiOiKQ7w6aF10HRv +IxzW0B4+kOwFZkrfPk71voGOcpnHT86GwEIv/Z+fvUMgzB3PbxAVB03bbhR1 +Fv6GdtbU1WDKBZD99ODLfrVlGD0bEaoQmguih/aV8WzjwpiOdRkl665D5haz +OuvdvGjH6OLbGnAD+rM3N0wJrsX/3O/7l4uXQ0rR6VecUkJ42Ilxk/diBezQ +8RcWUxRCAdOaFURhBfA22+9ery6E39Sr+ndVVsCZYeX3lkZCWG4e/OdUSwWc +VGj/csFfCJm5g02HFisgMF/yP5VaIewbvLj/llsl2F2tVrPcI4xJVwoNHddW +gcSF4aSsXBHUN/n7h/a4CiQ33T0zXyKCRo+0W7maqkC6MeH03ioRDBaruT30 +vAooPzceW98kgt+f+dRe6KwCZasjHnVjIhigm/emdaQKtFcu6w1ri6L/jbb4 +cP5qsAkVH9FqE8XpK/OnP9pXg+3qsYFLb0VxviCIbuxUDfaFD/qXPojiF7f6 +2cI91eD42u3Vsx+iWJLpnuLsXQ171a7XuoqJobfyes4Lx6rh4IhmRqyHGIb8 +ovVaXqqGs7sstr6ZFcPNir9nH/ZWg/SdDmnOFeL4btWW6Zn31VAhsmtuy2px +VFkXZKg6WA09b9yrMqjiaOI7VnJmrBqU7EIV7MzFMYKh9p1joRoad+aten1Z +HE374hbFpdiwbDbT8ZIpgXFD/JtqdrMhvSSyfNlMAovaRIVcXdigtIojUd1O +Ajcof2bOubHB6im/0TkfCRyaqPdR9GZDzjYaYZUmgdLrl5aMj7JBHy0vvfgk +gYYEzTLvHBtCGAX7WmMlccH2q/TLBjbsyBeYtkyVxJbCkyZFTWxQ4DmZ2PGP +JJ4+c9Y+/BkbXnc5Vr+9KYlaXS9lhdrZoHFkDddAhyRO6P0OEiHreKwkvOSX +tBRy80uaOIyzwU3UekKGkML3/iIpT0QI0D5RF3PtoRR29JU2iIkTwD+0QVz+ +mRTqmj8d9pEk4EElF6j0S6HfzOrpBVkCxC0fpG/+K4VFtre2TykT8DpGScfU +Uhrjdx4Ql6MTYPJjMTJwWBqD+QJCDjkScNz8guqTcWlM5E3m03MmoKJA/Z3I +rDSus/7Y9MeFAMldHowHvDL4KFPtxom9BIzXPJ3j0pDBn8PS9J3eBGTFpode +jpDBF+VXZ+jBBLS836g0HiODWp5665qPErCk0/R2a4oMZgi377YKJeDAvzNa +I7kyuKdx+yG7cAIMrPZMaTTJ4B9fi1fqUQQMiakENq+VxdRneXOaiQRIBNXL +SUjIYpI3qJ5OIsCqxfmlP00WV/h1Z7UlE3AvMkVtnbYsTimmCjieIyD5089v +Ls6ymHV94Q5kEqBVWuf7o1AWX1egh/sVAnw5d0sY35LFczvNdwVfJeDqnsln +F+7K4mdp/+ToXAJWCcirGLTI4nzKl/qsPALeHU0YOTMhi4FQ4H3uOgExTDtP +aX05fORjCB1lBJi7X/tFN5bDlVr/vr1fToBA9Pe43VZyyJPiuy73Frl+U3xJ +uoccTrivOO1aQUDNjtrvq5LkEHfc3ltQTcDpQzxRSllyGFuzysyPTYBZ2i4B +41w53I+ZH1UJAro6JzdHVcuhnFcy5fodAn46K4b97pfD8aU9qzzuE3A/8giP +0Igcts9lJ6ysIeDU1UfZGpNyOOfe9LiI9JpBpzp/TgqOx7rs6XtAwNsVxVZn +11BQxpW78WAtATmKvz4WiVPQ9TVldJH0et9UjkFVCqYEqvqseUjAZGJ/xrIO +BTN4/ZrTSN8pU1GUAQo2KZaNrHlEgPFkg6mjAwV36gwdWiLtfmwmuf0EBavW +Lz28WU+A8iVj2W/xFDyzV8OUr+H/9XP+Nk86BXMGui/5kI5c2vjauIiCUo5O +BUJPCDCihHt6VFCw679cV0/SvNj8K6qGgp67tYdvkf4nzl3sQTsFFV20fOmN +BLgVl5f09FBwMlnEJ4y0wvN5+vQgBbODtejVpL+OmbYKfadg4YaOgX9JV/Fn +uWrOUDCBtn6vdBMB4WqD363+UjBf7jRhTnqrtXpUAB8VFehSw0dJcx+JFEgU +oeJ8N2Mim3R7xvO8YjkqPiFU3taSziJEtzStp+LdfpWLfaRduz0bB7dQMSkv +lv6LtPxchcN/hlQ8WBZXw9NMwJjk0oiMGRUHv4dKS5GuNLAIY9hSsTK/0F2F +dJjbRR4nVyr22LgmaJJmnhrODvWmonfrt0wd0lz5m1UzA6kYpFwUr0u67UlU +XWUEFacbe/dpkU4fbrN6GUvFp2Z9CptIO3FLDnxLpWJgzsIrKmnKep8g3ktU +FP6e7idIetSczaFSQL6/OT2xRO73VsDfjG3lVCyJO+k5Sjok1UrR8y4VNQJj +mltJG1RcvnOqnor3svdKlpE26e1Ynmyh4rJn+1AiaWuOldv3vaHi+ObnKt6k +nTcy0l+9pyKvRsCoIWkv+8B+GKVi6pE3VEHSgSeuK1RNUrFiWa53kDyfiKK+ +g7R5Kj5/fnBNBWmzE/Kno7lpGHE8bYZF+sW6h9f1+Wl4erC4nIO0bZFjy08B +GvbHmIzUk/Wx52WKkKckDU2jSj5rkx70VNGTkqNhQj5xc4ystwOzDa6d8jTs +SXs/e5n0EersdaNNNOTcLqX+i6zXGSK9ZUGThg780RKXSUeab5qo1qGhYPL1 +c0zS8cEeegpbaXg9rF3++GOyf5raWjjtaNhmm8TfSvYH1dlnonY3DU/wEyG7 +SBeN/xUKcaXhuRqeox/qyPMW090z7EXDO8kLWkNkvzX75k00hdHwlnDRv81k +v1osMYRPnqChZmCzjC7pjvQuPZ1oGsYI3p0sIPu9/wFfdFESDb90fT0WfI/s +z9WhwvFXaagTxak2RuZFSL4AnVVAQ39bjuMs0vM6pXtmiml4Rb808DyZL1zu +A0U+lTR01F1w3kjmj2SVOd2skYaRHqVWumQ+5ZoM7/nvGQ19yoQ4j9wm+6k/ +KvreCxraVWsH3CDzTJ2TaFXppmGlQ53TGjLvjHfJufGM0fDu6oIXFTcIODQ/ +Fd2yVh5FdVLpTvlkvQQfEP8iLI86kp8um5N5yvvtXTmXpDyO1oRp610joPh9 +U89WBXksklUXWUXm8cDjf9Tu6skj3+ISEXGJAJt4Rl/BPnnccvLyfBmZ75T/ +bh+u95bH4V0/czxSyTwJU+D66C+PlTmfzwunEJDot1pDMlQe9XYlRxwk50eD +5ce4tER5LIsaOzYVS84D4RjNE9XyGFsbXG5Dzh+OlJnm7HvyWGxitOPFMfJ/ +cwW43quTx6yaH07byHl1cMY+fuqpPDrrST3fQM63oj6l977v5HFrrez61gBy +3ua1JOziUsBsjfNnPMn5uLBJcEB9twKqiVhdWAYCZnOlY7RdFdD9y58Gka0E +TK9TVmLsU8BbopH3VJjk+f1mBJj4K6Bd+mqubfrk/KvzmnWNItcTfrlr92ay +vy3vCyQWK2DcG+WgISpZbwfdYWhGAdWHTIzKl9hw6aPf0L+LCvio98pq90U2 +XLAJiZ/4q4BGnjr9a+fZkKad+GKeTxGnrHLjvX+zIfZPtdM6iiIO/DzvNPmV +DQdTuI8wzRTxherFuGM9bGCW38q/eFERQ7JaNu+7zYb3tPI80yuK2N8cwz1S +xobIi6XXpvMUkXbl/LEDN9lwP6bkqn2pIqoED6p7X2eDlnN+tsBDRVxjM6a6 +7TIbNnJfSE/4rIjyy9NE+hny3r7vRHSYmhK+3p+/EErex6aEd3g4Niphb6F9 +Te1SNYykejge5VHBUIuCAQmparD4EW4xqrcei+/krHi6sQrGvXhD7pzegJfO +eU12yFeQ930JzrONG3HDp5FjuR/LQfilSlrVD1V0ttkfLkKUgmxipa2enhqG +bXrCjnG6AdmbGIIivuqYZTKelrepGNqkjXR/Z2jg9H/Ub1VS18FAtjFds0cT +h5YzVvf/ygcBrsJQz9jNqD8QWnFE6hpQYqhMF5Ut6Pbt0c1AoxzgU3a7Z/98 +CzrpCNaMPb8IGiypyvC9Wpjc+VE5tjMLjg4IN+3g0Mam8Z2SD76mw4/fqbst +srUxU+N49/35VNiu+SzHQl0Hk/cSRR9qE+Hxb8M/cx062BPstqXi9hkIVNN6 +1+mji/MJiUpr9scAa9K7y4VPD38pNxq5Zp8EUyXJnWsL9fC04hvB+LJw2BCd +HNFIp2PjmzsTrkkh8NCwmNvKgI5aJ9kpHyJCwHauPrObSUff30+7/P1CICJw +5taYER1blwxtb2wPgRY3j88CVnQklqdNbq8KAT+G3o49HnTUtRSc+JRwFEp/ +fZaZTiS/PxxdfO98MKj6MOqV39FRiHiq+SQuCM4rWC/GfaBjpONjMeGAIJj+ +tF93aICOEVXdjaG2QfDYNbX82jAdZbWNdgbJBYG97adLEhN0NAq7TtWvCYTj +hvFH+Dj00WabZong1GFoEeqUn1DWx87uSp7coEPg89jvzJ1gfbza1jS84Zo/ +TB7+Fm4aqo/xBvVFvQn+ECF36GBPmD4m1FvlZwf5Q/LJIPv5E/oozP9G2s7I +H6oMwmjMBH1cpaE3ljPqB0v34h425ejj8qp408QtfpBZeW36TZM+Rt1reRXV +cwDq87u8p8QYGGn1wP+UvTcMWsnvC5Nk4CWR7M568AaOhcMuf6QZGPhZgSmo +7g3GdjzW3DQGmlp8+PWRxxuerTCgS6kysEeE//2mx17Qvj+Pz2grAxtF2rYl +qXvBO6WAivQDDDz6N6eYV2I/TN/8O6d5n4Ffx2qPSYh4wBdHs/ykBwy8qxt4 +rWelB/StPGc+XMfAJyNGd40m9kGdh/Tliw0MjDv7YejWnX0QK6lrsNzKwLWZ +e0uTTfaBYGLAybYPDDQqUr/v5OcOar7dHD6cBthcP1PSW+8GXsrlfDk7DfBX +22xpdLkLRD51D1CxNcBTZmpLypkukO4j/IJtb4DDEy8Of45wgYfFx1NfOBlg +3S/NoBwzFxBVMV+37GmAPzfkbhIZdoZnKqOiHmEGeEPHuEKI5gyqG6g0lTwD +nL85mttd6ghTqll67J8GODYoVLtxwQH62tFU5LcB6usc2ar3xQEaAicdQmcM +UFNwpNn+rQOksS2C9RYNcD3dv6zutgOoGnDcquUyRM8rjZctvRxgv8Vh+SZx +Q1TollZz7bSHLt/ta7qYhnice/PBkRo7qCn683km0RDnYjTESg7YgN620Lkd +KYYYNVATc9vcBu5+Hl+Tf84QL1p3pXeo2gCbMkDfkWmI4i+aLPf+sIZb2Q3n +rl0xxBq52Y3lx60hPzWesb3CEIM6T+yez9wJSaHrMrLfGuIVg+/zfb2W4Gqi +iIYUJq5dHD/fX2IOy128Ak00JhqeEJWqTjWHfJ/J9zsUmbgrsOFGwVFz+JLw +INx1AxP1KwZiX241h6OtNpXHtZj40fj+j5192yHZ+iSlxoyJpyw52j+t2w61 +zt1LOkFMLLPgTqlLNwWZw2cfaDQwcXksfViu2xjS/h7QTWlk4v1XI+mLT4yB +M9Os+t9mJhpwXh0cqzCGb/e4S/NbmVjzxkdjMdEYajnOZAu/ZeIKrZa5CZYx +uF6IDp8dJdcv5OESKDeC7Lrjuo9Xs9BldNXIqwyENdYu1dICLFxeal/1LBoh +elBfPVyQhQdHR8TbgxD8uOeVNouxUBQb2nisEeg2YaKFFBbe1l0txlyN0DN0 +9Hf8FhY+GU/5JCUEIMZ/qHqnEwv/slyaJmVZULQtKvKnCwt1WEkS8n+YoBWV +ti3LjYUnNI5uDu9ngvXPqu4+Txbqyk6qpl1kQkLPzILXIRZaMkoLvISZMF94 +2jgyhoUzOoND5wUN4Z1h1tuSchYyKj3N1qowwO9Y0VWLChZOXO0+cJyXAbMV +d33Gq1j4w1bKlvu7Pggr9M1tucdCCyrvypNV+mDJKyf7qIGFadfO3fjM1IeH +XSXeb7tZmDHT8z5kDx12CNSoh/Wx8B+5npQOoEPf9tZZyfcs/JVut2m7Eh2m +a78nug+yUPFG/tOMCT1QL9h8++s3FjrDV7OkGD14+M4oLHWChXFcwXavD+jB +DlEH0PxJ7mfFP746Vnpw4OyxztAZFlJ9wswcJPRguiEhR2KeheoqNr1rl3Uh +dvGSV+0iC2n1i1yjQ7ogqFOqtneZhesL66v6WnTh2uHamb9/Wag0sPhkrEIX +/gciFdz1 + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Ve0XB3CRDJXMs3uvsZKhTNfl3vYmRGQsUxIhQ0UipJQhMiVDb0nJ +EApluKdBVIQKSSljg2ToVaGUOd5+5/fXWZ911nnWs86z93c/8vuD7H04OTg4 +9FdwcPz/OTvQ2qyUUrS1bgNfXrG16daua5LHjfpigWV4pfNiiiKg2Kv9kn2Z +UHP4VIZ/ijaE2Zb1cvUVgo7s7fsWKdtAaFIic6GXDeLuwiOiKQ7w6aF10HRv +IxzW0B4+kOwFZkrfPk71voGOcpnHT86GwEIv/Z+fvUMgzB3PbxAVB03bbhR1 +Fv6GdtbU1WDKBZD99ODLfrVlGD0bEaoQmguih/aV8WzjwpiOdRkl665D5haz +OuvdvGjH6OLbGnAD+rM3N0wJrsX/3O/7l4uXQ0rR6VecUkJ42Ilxk/diBezQ +8RcWUxRCAdOaFURhBfA22+9ery6E39Sr+ndVVsCZYeX3lkZCWG4e/OdUSwWc +VGj/csFfCJm5g02HFisgMF/yP5VaIewbvLj/llsl2F2tVrPcI4xJVwoNHddW +gcSF4aSsXBHUN/n7h/a4CiQ33T0zXyKCRo+0W7maqkC6MeH03ioRDBaruT30 +vAooPzceW98kgt+f+dRe6KwCZasjHnVjIhigm/emdaQKtFcu6w1ri6L/jbb4 +cP5qsAkVH9FqE8XpK/OnP9pXg+3qsYFLb0VxviCIbuxUDfaFD/qXPojiF7f6 +2cI91eD42u3Vsx+iWJLpnuLsXQ171a7XuoqJobfyes4Lx6rh4IhmRqyHGIb8 +ovVaXqqGs7sstr6ZFcPNir9nH/ZWg/SdDmnOFeL4btWW6Zn31VAhsmtuy2px +VFkXZKg6WA09b9yrMqjiaOI7VnJmrBqU7EIV7MzFMYKh9p1joRoad+aten1Z +HE374hbFpdiwbDbT8ZIpgXFD/JtqdrMhvSSyfNlMAovaRIVcXdigtIojUd1O +Ajcof2bOubHB6im/0TkfCRyaqPdR9GZDzjYaYZUmgdLrl5aMj7JBHy0vvfgk +gYYEzTLvHBtCGAX7WmMlccH2q/TLBjbsyBeYtkyVxJbCkyZFTWxQ4DmZ2PGP +JJ4+c9Y+/BkbXnc5Vr+9KYlaXS9lhdrZoHFkDddAhyRO6P0OEiHreKwkvOSX +tBRy80uaOIyzwU3UekKGkML3/iIpT0QI0D5RF3PtoRR29JU2iIkTwD+0QVz+ +mRTqmj8d9pEk4EElF6j0S6HfzOrpBVkCxC0fpG/+K4VFtre2TykT8DpGScfU +Uhrjdx4Ql6MTYPJjMTJwWBqD+QJCDjkScNz8guqTcWlM5E3m03MmoKJA/Z3I +rDSus/7Y9MeFAMldHowHvDL4KFPtxom9BIzXPJ3j0pDBn8PS9J3eBGTFpode +jpDBF+VXZ+jBBLS836g0HiODWp5665qPErCk0/R2a4oMZgi377YKJeDAvzNa +I7kyuKdx+yG7cAIMrPZMaTTJ4B9fi1fqUQQMiakENq+VxdRneXOaiQRIBNXL +SUjIYpI3qJ5OIsCqxfmlP00WV/h1Z7UlE3AvMkVtnbYsTimmCjieIyD5089v +Ls6ymHV94Q5kEqBVWuf7o1AWX1egh/sVAnw5d0sY35LFczvNdwVfJeDqnsln +F+7K4mdp/+ToXAJWCcirGLTI4nzKl/qsPALeHU0YOTMhi4FQ4H3uOgExTDtP +aX05fORjCB1lBJi7X/tFN5bDlVr/vr1fToBA9Pe43VZyyJPiuy73Frl+U3xJ +uoccTrivOO1aQUDNjtrvq5LkEHfc3ltQTcDpQzxRSllyGFuzysyPTYBZ2i4B +41w53I+ZH1UJAro6JzdHVcuhnFcy5fodAn46K4b97pfD8aU9qzzuE3A/8giP +0Igcts9lJ6ysIeDU1UfZGpNyOOfe9LiI9JpBpzp/TgqOx7rs6XtAwNsVxVZn +11BQxpW78WAtATmKvz4WiVPQ9TVldJH0et9UjkFVCqYEqvqseUjAZGJ/xrIO +BTN4/ZrTSN8pU1GUAQo2KZaNrHlEgPFkg6mjAwV36gwdWiLtfmwmuf0EBavW +Lz28WU+A8iVj2W/xFDyzV8OUr+H/9XP+Nk86BXMGui/5kI5c2vjauIiCUo5O +BUJPCDCihHt6VFCw679cV0/SvNj8K6qGgp67tYdvkf4nzl3sQTsFFV20fOmN +BLgVl5f09FBwMlnEJ4y0wvN5+vQgBbODtejVpL+OmbYKfadg4YaOgX9JV/Fn +uWrOUDCBtn6vdBMB4WqD363+UjBf7jRhTnqrtXpUAB8VFehSw0dJcx+JFEgU +oeJ8N2Mim3R7xvO8YjkqPiFU3taSziJEtzStp+LdfpWLfaRduz0bB7dQMSkv +lv6LtPxchcN/hlQ8WBZXw9NMwJjk0oiMGRUHv4dKS5GuNLAIY9hSsTK/0F2F +dJjbRR4nVyr22LgmaJJmnhrODvWmonfrt0wd0lz5m1UzA6kYpFwUr0u67UlU +XWUEFacbe/dpkU4fbrN6GUvFp2Z9CptIO3FLDnxLpWJgzsIrKmnKep8g3ktU +FP6e7idIetSczaFSQL6/OT2xRO73VsDfjG3lVCyJO+k5Sjok1UrR8y4VNQJj +mltJG1RcvnOqnor3svdKlpE26e1Ynmyh4rJn+1AiaWuOldv3vaHi+ObnKt6k +nTcy0l+9pyKvRsCoIWkv+8B+GKVi6pE3VEHSgSeuK1RNUrFiWa53kDyfiKK+ +g7R5Kj5/fnBNBWmzE/Kno7lpGHE8bYZF+sW6h9f1+Wl4erC4nIO0bZFjy08B +GvbHmIzUk/Wx52WKkKckDU2jSj5rkx70VNGTkqNhQj5xc4ystwOzDa6d8jTs +SXs/e5n0EersdaNNNOTcLqX+i6zXGSK9ZUGThg780RKXSUeab5qo1qGhYPL1 +c0zS8cEeegpbaXg9rF3++GOyf5raWjjtaNhmm8TfSvYH1dlnonY3DU/wEyG7 +SBeN/xUKcaXhuRqeox/qyPMW090z7EXDO8kLWkNkvzX75k00hdHwlnDRv81k +v1osMYRPnqChZmCzjC7pjvQuPZ1oGsYI3p0sIPu9/wFfdFESDb90fT0WfI/s +z9WhwvFXaagTxak2RuZFSL4AnVVAQ39bjuMs0vM6pXtmiml4Rb808DyZL1zu +A0U+lTR01F1w3kjmj2SVOd2skYaRHqVWumQ+5ZoM7/nvGQ19yoQ4j9wm+6k/ +KvreCxraVWsH3CDzTJ2TaFXppmGlQ53TGjLvjHfJufGM0fDu6oIXFTcIODQ/ +Fd2yVh5FdVLpTvlkvQQfEP8iLI86kp8um5N5yvvtXTmXpDyO1oRp610joPh9 +U89WBXksklUXWUXm8cDjf9Tu6skj3+ISEXGJAJt4Rl/BPnnccvLyfBmZ75T/ +bh+u95bH4V0/czxSyTwJU+D66C+PlTmfzwunEJDot1pDMlQe9XYlRxwk50eD +5ce4tER5LIsaOzYVS84D4RjNE9XyGFsbXG5Dzh+OlJnm7HvyWGxitOPFMfJ/ +cwW43quTx6yaH07byHl1cMY+fuqpPDrrST3fQM63oj6l977v5HFrrez61gBy +3ua1JOziUsBsjfNnPMn5uLBJcEB9twKqiVhdWAYCZnOlY7RdFdD9y58Gka0E +TK9TVmLsU8BbopH3VJjk+f1mBJj4K6Bd+mqubfrk/KvzmnWNItcTfrlr92ay +vy3vCyQWK2DcG+WgISpZbwfdYWhGAdWHTIzKl9hw6aPf0L+LCvio98pq90U2 +XLAJiZ/4q4BGnjr9a+fZkKad+GKeTxGnrHLjvX+zIfZPtdM6iiIO/DzvNPmV +DQdTuI8wzRTxherFuGM9bGCW38q/eFERQ7JaNu+7zYb3tPI80yuK2N8cwz1S +xobIi6XXpvMUkXbl/LEDN9lwP6bkqn2pIqoED6p7X2eDlnN+tsBDRVxjM6a6 +7TIbNnJfSE/4rIjyy9NE+hny3r7vRHSYmhK+3p+/EErex6aEd3g4Niphb6F9 +Te1SNYykejge5VHBUIuCAQmparD4EW4xqrcei+/krHi6sQrGvXhD7pzegJfO +eU12yFeQ930JzrONG3HDp5FjuR/LQfilSlrVD1V0ttkfLkKUgmxipa2enhqG +bXrCjnG6AdmbGIIivuqYZTKelrepGNqkjXR/Z2jg9H/Ub1VS18FAtjFds0cT +h5YzVvf/ygcBrsJQz9jNqD8QWnFE6hpQYqhMF5Ut6Pbt0c1AoxzgU3a7Z/98 +CzrpCNaMPb8IGiypyvC9Wpjc+VE5tjMLjg4IN+3g0Mam8Z2SD76mw4/fqbst +srUxU+N49/35VNiu+SzHQl0Hk/cSRR9qE+Hxb8M/cx062BPstqXi9hkIVNN6 +1+mji/MJiUpr9scAa9K7y4VPD38pNxq5Zp8EUyXJnWsL9fC04hvB+LJw2BCd +HNFIp2PjmzsTrkkh8NCwmNvKgI5aJ9kpHyJCwHauPrObSUff30+7/P1CICJw +5taYER1blwxtb2wPgRY3j88CVnQklqdNbq8KAT+G3o49HnTUtRSc+JRwFEp/ +fZaZTiS/PxxdfO98MKj6MOqV39FRiHiq+SQuCM4rWC/GfaBjpONjMeGAIJj+ +tF93aICOEVXdjaG2QfDYNbX82jAdZbWNdgbJBYG97adLEhN0NAq7TtWvCYTj +hvFH+Dj00WabZong1GFoEeqUn1DWx87uSp7coEPg89jvzJ1gfbza1jS84Zo/ +TB7+Fm4aqo/xBvVFvQn+ECF36GBPmD4m1FvlZwf5Q/LJIPv5E/oozP9G2s7I +H6oMwmjMBH1cpaE3ljPqB0v34h425ejj8qp408QtfpBZeW36TZM+Rt1reRXV +cwDq87u8p8QYGGn1wP+UvTcMWsnvC5Nk4CWR7M568AaOhcMuf6QZGPhZgSmo +7g3GdjzW3DQGmlp8+PWRxxuerTCgS6kysEeE//2mx17Qvj+Pz2grAxtF2rYl +qXvBO6WAivQDDDz6N6eYV2I/TN/8O6d5n4Ffx2qPSYh4wBdHs/ykBwy8qxt4 +rWelB/StPGc+XMfAJyNGd40m9kGdh/Tliw0MjDv7YejWnX0QK6lrsNzKwLWZ +e0uTTfaBYGLAybYPDDQqUr/v5OcOar7dHD6cBthcP1PSW+8GXsrlfDk7DfBX +22xpdLkLRD51D1CxNcBTZmpLypkukO4j/IJtb4DDEy8Of45wgYfFx1NfOBlg +3S/NoBwzFxBVMV+37GmAPzfkbhIZdoZnKqOiHmEGeEPHuEKI5gyqG6g0lTwD +nL85mttd6ghTqll67J8GODYoVLtxwQH62tFU5LcB6usc2ar3xQEaAicdQmcM +UFNwpNn+rQOksS2C9RYNcD3dv6zutgOoGnDcquUyRM8rjZctvRxgv8Vh+SZx +Q1TollZz7bSHLt/ta7qYhnice/PBkRo7qCn683km0RDnYjTESg7YgN620Lkd +KYYYNVATc9vcBu5+Hl+Tf84QL1p3pXeo2gCbMkDfkWmI4i+aLPf+sIZb2Q3n +rl0xxBq52Y3lx60hPzWesb3CEIM6T+yez9wJSaHrMrLfGuIVg+/zfb2W4Gqi +iIYUJq5dHD/fX2IOy128Ak00JhqeEJWqTjWHfJ/J9zsUmbgrsOFGwVFz+JLw +INx1AxP1KwZiX241h6OtNpXHtZj40fj+j5192yHZ+iSlxoyJpyw52j+t2w61 +zt1LOkFMLLPgTqlLNwWZw2cfaDQwcXksfViu2xjS/h7QTWlk4v1XI+mLT4yB +M9Os+t9mJhpwXh0cqzCGb/e4S/NbmVjzxkdjMdEYajnOZAu/ZeIKrZa5CZYx +uF6IDp8dJdcv5OESKDeC7Lrjuo9Xs9BldNXIqwyENdYu1dICLFxeal/1LBoh +elBfPVyQhQdHR8TbgxD8uOeVNouxUBQb2nisEeg2YaKFFBbe1l0txlyN0DN0 +9Hf8FhY+GU/5JCUEIMZ/qHqnEwv/slyaJmVZULQtKvKnCwt1WEkS8n+YoBWV +ti3LjYUnNI5uDu9ngvXPqu4+Txbqyk6qpl1kQkLPzILXIRZaMkoLvISZMF94 +2jgyhoUzOoND5wUN4Z1h1tuSchYyKj3N1qowwO9Y0VWLChZOXO0+cJyXAbMV +d33Gq1j4w1bKlvu7Pggr9M1tucdCCyrvypNV+mDJKyf7qIGFadfO3fjM1IeH +XSXeb7tZmDHT8z5kDx12CNSoh/Wx8B+5npQOoEPf9tZZyfcs/JVut2m7Eh2m +a78nug+yUPFG/tOMCT1QL9h8++s3FjrDV7OkGD14+M4oLHWChXFcwXavD+jB +DlEH0PxJ7mfFP746Vnpw4OyxztAZFlJ9wswcJPRguiEhR2KeheoqNr1rl3Uh +dvGSV+0iC2n1i1yjQ7ogqFOqtneZhesL66v6WnTh2uHamb9/Wag0sPhkrEIX +/gciFdz1 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07721266281818882}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07721266281818882}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk0Ve0XB3CRDJXMs3uvsZKhTNfl3vYmRGQsUxIhQ0UipJQhMiVDb0nJ +EApluKdBVIQKSSljg2ToVaGUOd5+5/fXWZ911nnWs86z93c/8vuD7H04OTg4 +9FdwcPz/OTvQ2qyUUrS1bgNfXrG16daua5LHjfpigWV4pfNiiiKg2Kv9kn2Z +UHP4VIZ/ijaE2Zb1cvUVgo7s7fsWKdtAaFIic6GXDeLuwiOiKQ7w6aF10HRv +IxzW0B4+kOwFZkrfPk71voGOcpnHT86GwEIv/Z+fvUMgzB3PbxAVB03bbhR1 +Fv6GdtbU1WDKBZD99ODLfrVlGD0bEaoQmguih/aV8WzjwpiOdRkl665D5haz +OuvdvGjH6OLbGnAD+rM3N0wJrsX/3O/7l4uXQ0rR6VecUkJ42Ilxk/diBezQ +8RcWUxRCAdOaFURhBfA22+9ery6E39Sr+ndVVsCZYeX3lkZCWG4e/OdUSwWc +VGj/csFfCJm5g02HFisgMF/yP5VaIewbvLj/llsl2F2tVrPcI4xJVwoNHddW +gcSF4aSsXBHUN/n7h/a4CiQ33T0zXyKCRo+0W7maqkC6MeH03ioRDBaruT30 +vAooPzceW98kgt+f+dRe6KwCZasjHnVjIhigm/emdaQKtFcu6w1ri6L/jbb4 +cP5qsAkVH9FqE8XpK/OnP9pXg+3qsYFLb0VxviCIbuxUDfaFD/qXPojiF7f6 +2cI91eD42u3Vsx+iWJLpnuLsXQ171a7XuoqJobfyes4Lx6rh4IhmRqyHGIb8 +ovVaXqqGs7sstr6ZFcPNir9nH/ZWg/SdDmnOFeL4btWW6Zn31VAhsmtuy2px +VFkXZKg6WA09b9yrMqjiaOI7VnJmrBqU7EIV7MzFMYKh9p1joRoad+aten1Z +HE374hbFpdiwbDbT8ZIpgXFD/JtqdrMhvSSyfNlMAovaRIVcXdigtIojUd1O +Ajcof2bOubHB6im/0TkfCRyaqPdR9GZDzjYaYZUmgdLrl5aMj7JBHy0vvfgk +gYYEzTLvHBtCGAX7WmMlccH2q/TLBjbsyBeYtkyVxJbCkyZFTWxQ4DmZ2PGP +JJ4+c9Y+/BkbXnc5Vr+9KYlaXS9lhdrZoHFkDddAhyRO6P0OEiHreKwkvOSX +tBRy80uaOIyzwU3UekKGkML3/iIpT0QI0D5RF3PtoRR29JU2iIkTwD+0QVz+ +mRTqmj8d9pEk4EElF6j0S6HfzOrpBVkCxC0fpG/+K4VFtre2TykT8DpGScfU +Uhrjdx4Ql6MTYPJjMTJwWBqD+QJCDjkScNz8guqTcWlM5E3m03MmoKJA/Z3I +rDSus/7Y9MeFAMldHowHvDL4KFPtxom9BIzXPJ3j0pDBn8PS9J3eBGTFpode +jpDBF+VXZ+jBBLS836g0HiODWp5665qPErCk0/R2a4oMZgi377YKJeDAvzNa +I7kyuKdx+yG7cAIMrPZMaTTJ4B9fi1fqUQQMiakENq+VxdRneXOaiQRIBNXL +SUjIYpI3qJ5OIsCqxfmlP00WV/h1Z7UlE3AvMkVtnbYsTimmCjieIyD5089v +Ls6ymHV94Q5kEqBVWuf7o1AWX1egh/sVAnw5d0sY35LFczvNdwVfJeDqnsln +F+7K4mdp/+ToXAJWCcirGLTI4nzKl/qsPALeHU0YOTMhi4FQ4H3uOgExTDtP +aX05fORjCB1lBJi7X/tFN5bDlVr/vr1fToBA9Pe43VZyyJPiuy73Frl+U3xJ +uoccTrivOO1aQUDNjtrvq5LkEHfc3ltQTcDpQzxRSllyGFuzysyPTYBZ2i4B +41w53I+ZH1UJAro6JzdHVcuhnFcy5fodAn46K4b97pfD8aU9qzzuE3A/8giP +0Igcts9lJ6ysIeDU1UfZGpNyOOfe9LiI9JpBpzp/TgqOx7rs6XtAwNsVxVZn +11BQxpW78WAtATmKvz4WiVPQ9TVldJH0et9UjkFVCqYEqvqseUjAZGJ/xrIO +BTN4/ZrTSN8pU1GUAQo2KZaNrHlEgPFkg6mjAwV36gwdWiLtfmwmuf0EBavW +Lz28WU+A8iVj2W/xFDyzV8OUr+H/9XP+Nk86BXMGui/5kI5c2vjauIiCUo5O +BUJPCDCihHt6VFCw679cV0/SvNj8K6qGgp67tYdvkf4nzl3sQTsFFV20fOmN +BLgVl5f09FBwMlnEJ4y0wvN5+vQgBbODtejVpL+OmbYKfadg4YaOgX9JV/Fn +uWrOUDCBtn6vdBMB4WqD363+UjBf7jRhTnqrtXpUAB8VFehSw0dJcx+JFEgU +oeJ8N2Mim3R7xvO8YjkqPiFU3taSziJEtzStp+LdfpWLfaRduz0bB7dQMSkv +lv6LtPxchcN/hlQ8WBZXw9NMwJjk0oiMGRUHv4dKS5GuNLAIY9hSsTK/0F2F +dJjbRR4nVyr22LgmaJJmnhrODvWmonfrt0wd0lz5m1UzA6kYpFwUr0u67UlU +XWUEFacbe/dpkU4fbrN6GUvFp2Z9CptIO3FLDnxLpWJgzsIrKmnKep8g3ktU +FP6e7idIetSczaFSQL6/OT2xRO73VsDfjG3lVCyJO+k5Sjok1UrR8y4VNQJj +mltJG1RcvnOqnor3svdKlpE26e1Ynmyh4rJn+1AiaWuOldv3vaHi+ObnKt6k +nTcy0l+9pyKvRsCoIWkv+8B+GKVi6pE3VEHSgSeuK1RNUrFiWa53kDyfiKK+ +g7R5Kj5/fnBNBWmzE/Kno7lpGHE8bYZF+sW6h9f1+Wl4erC4nIO0bZFjy08B +GvbHmIzUk/Wx52WKkKckDU2jSj5rkx70VNGTkqNhQj5xc4ystwOzDa6d8jTs +SXs/e5n0EersdaNNNOTcLqX+i6zXGSK9ZUGThg780RKXSUeab5qo1qGhYPL1 +c0zS8cEeegpbaXg9rF3++GOyf5raWjjtaNhmm8TfSvYH1dlnonY3DU/wEyG7 +SBeN/xUKcaXhuRqeox/qyPMW090z7EXDO8kLWkNkvzX75k00hdHwlnDRv81k +v1osMYRPnqChZmCzjC7pjvQuPZ1oGsYI3p0sIPu9/wFfdFESDb90fT0WfI/s +z9WhwvFXaagTxak2RuZFSL4AnVVAQ39bjuMs0vM6pXtmiml4Rb808DyZL1zu +A0U+lTR01F1w3kjmj2SVOd2skYaRHqVWumQ+5ZoM7/nvGQ19yoQ4j9wm+6k/ +KvreCxraVWsH3CDzTJ2TaFXppmGlQ53TGjLvjHfJufGM0fDu6oIXFTcIODQ/ +Fd2yVh5FdVLpTvlkvQQfEP8iLI86kp8um5N5yvvtXTmXpDyO1oRp610joPh9 +U89WBXksklUXWUXm8cDjf9Tu6skj3+ISEXGJAJt4Rl/BPnnccvLyfBmZ75T/ +bh+u95bH4V0/czxSyTwJU+D66C+PlTmfzwunEJDot1pDMlQe9XYlRxwk50eD +5ce4tER5LIsaOzYVS84D4RjNE9XyGFsbXG5Dzh+OlJnm7HvyWGxitOPFMfJ/ +cwW43quTx6yaH07byHl1cMY+fuqpPDrrST3fQM63oj6l977v5HFrrez61gBy +3ua1JOziUsBsjfNnPMn5uLBJcEB9twKqiVhdWAYCZnOlY7RdFdD9y58Gka0E +TK9TVmLsU8BbopH3VJjk+f1mBJj4K6Bd+mqubfrk/KvzmnWNItcTfrlr92ay +vy3vCyQWK2DcG+WgISpZbwfdYWhGAdWHTIzKl9hw6aPf0L+LCvio98pq90U2 +XLAJiZ/4q4BGnjr9a+fZkKad+GKeTxGnrHLjvX+zIfZPtdM6iiIO/DzvNPmV +DQdTuI8wzRTxherFuGM9bGCW38q/eFERQ7JaNu+7zYb3tPI80yuK2N8cwz1S +xobIi6XXpvMUkXbl/LEDN9lwP6bkqn2pIqoED6p7X2eDlnN+tsBDRVxjM6a6 +7TIbNnJfSE/4rIjyy9NE+hny3r7vRHSYmhK+3p+/EErex6aEd3g4Niphb6F9 +Te1SNYykejge5VHBUIuCAQmparD4EW4xqrcei+/krHi6sQrGvXhD7pzegJfO +eU12yFeQ930JzrONG3HDp5FjuR/LQfilSlrVD1V0ttkfLkKUgmxipa2enhqG +bXrCjnG6AdmbGIIivuqYZTKelrepGNqkjXR/Z2jg9H/Ub1VS18FAtjFds0cT +h5YzVvf/ygcBrsJQz9jNqD8QWnFE6hpQYqhMF5Ut6Pbt0c1AoxzgU3a7Z/98 +CzrpCNaMPb8IGiypyvC9Wpjc+VE5tjMLjg4IN+3g0Mam8Z2SD76mw4/fqbst +srUxU+N49/35VNiu+SzHQl0Hk/cSRR9qE+Hxb8M/cx062BPstqXi9hkIVNN6 +1+mji/MJiUpr9scAa9K7y4VPD38pNxq5Zp8EUyXJnWsL9fC04hvB+LJw2BCd +HNFIp2PjmzsTrkkh8NCwmNvKgI5aJ9kpHyJCwHauPrObSUff30+7/P1CICJw +5taYER1blwxtb2wPgRY3j88CVnQklqdNbq8KAT+G3o49HnTUtRSc+JRwFEp/ +fZaZTiS/PxxdfO98MKj6MOqV39FRiHiq+SQuCM4rWC/GfaBjpONjMeGAIJj+ +tF93aICOEVXdjaG2QfDYNbX82jAdZbWNdgbJBYG97adLEhN0NAq7TtWvCYTj +hvFH+Dj00WabZong1GFoEeqUn1DWx87uSp7coEPg89jvzJ1gfbza1jS84Zo/ +TB7+Fm4aqo/xBvVFvQn+ECF36GBPmD4m1FvlZwf5Q/LJIPv5E/oozP9G2s7I +H6oMwmjMBH1cpaE3ljPqB0v34h425ejj8qp408QtfpBZeW36TZM+Rt1reRXV +cwDq87u8p8QYGGn1wP+UvTcMWsnvC5Nk4CWR7M568AaOhcMuf6QZGPhZgSmo +7g3GdjzW3DQGmlp8+PWRxxuerTCgS6kysEeE//2mx17Qvj+Pz2grAxtF2rYl +qXvBO6WAivQDDDz6N6eYV2I/TN/8O6d5n4Ffx2qPSYh4wBdHs/ykBwy8qxt4 +rWelB/StPGc+XMfAJyNGd40m9kGdh/Tliw0MjDv7YejWnX0QK6lrsNzKwLWZ +e0uTTfaBYGLAybYPDDQqUr/v5OcOar7dHD6cBthcP1PSW+8GXsrlfDk7DfBX +22xpdLkLRD51D1CxNcBTZmpLypkukO4j/IJtb4DDEy8Of45wgYfFx1NfOBlg +3S/NoBwzFxBVMV+37GmAPzfkbhIZdoZnKqOiHmEGeEPHuEKI5gyqG6g0lTwD +nL85mttd6ghTqll67J8GODYoVLtxwQH62tFU5LcB6usc2ar3xQEaAicdQmcM +UFNwpNn+rQOksS2C9RYNcD3dv6zutgOoGnDcquUyRM8rjZctvRxgv8Vh+SZx +Q1TollZz7bSHLt/ta7qYhnice/PBkRo7qCn683km0RDnYjTESg7YgN620Lkd +KYYYNVATc9vcBu5+Hl+Tf84QL1p3pXeo2gCbMkDfkWmI4i+aLPf+sIZb2Q3n +rl0xxBq52Y3lx60hPzWesb3CEIM6T+yez9wJSaHrMrLfGuIVg+/zfb2W4Gqi +iIYUJq5dHD/fX2IOy128Ak00JhqeEJWqTjWHfJ/J9zsUmbgrsOFGwVFz+JLw +INx1AxP1KwZiX241h6OtNpXHtZj40fj+j5192yHZ+iSlxoyJpyw52j+t2w61 +zt1LOkFMLLPgTqlLNwWZw2cfaDQwcXksfViu2xjS/h7QTWlk4v1XI+mLT4yB +M9Os+t9mJhpwXh0cqzCGb/e4S/NbmVjzxkdjMdEYajnOZAu/ZeIKrZa5CZYx +uF6IDp8dJdcv5OESKDeC7Lrjuo9Xs9BldNXIqwyENdYu1dICLFxeal/1LBoh +elBfPVyQhQdHR8TbgxD8uOeVNouxUBQb2nisEeg2YaKFFBbe1l0txlyN0DN0 +9Hf8FhY+GU/5JCUEIMZ/qHqnEwv/slyaJmVZULQtKvKnCwt1WEkS8n+YoBWV +ti3LjYUnNI5uDu9ngvXPqu4+Txbqyk6qpl1kQkLPzILXIRZaMkoLvISZMF94 +2jgyhoUzOoND5wUN4Z1h1tuSchYyKj3N1qowwO9Y0VWLChZOXO0+cJyXAbMV +d33Gq1j4w1bKlvu7Pggr9M1tucdCCyrvypNV+mDJKyf7qIGFadfO3fjM1IeH +XSXeb7tZmDHT8z5kDx12CNSoh/Wx8B+5npQOoEPf9tZZyfcs/JVut2m7Eh2m +a78nug+yUPFG/tOMCT1QL9h8++s3FjrDV7OkGD14+M4oLHWChXFcwXavD+jB +DlEH0PxJ7mfFP746Vnpw4OyxztAZFlJ9wswcJPRguiEhR2KeheoqNr1rl3Uh +dvGSV+0iC2n1i1yjQ7ogqFOqtneZhesL66v6WnTh2uHamb9/Wag0sPhkrEIX +/gciFdz1 + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07721266281818882}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07721266281818882}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994389538646233*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"679db77d-5c53-4ddd-8f22-44a591feb25e"] +}, Open ]], Cell[CellGroupData[{ @@ -12092,18 +15176,73 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.837442785685962`*^-155\\\", \ +\\\"55251385721223384257017595877831230851920926018927875395905136314216899591\ +246686283304515832126834071064186180009540933615433547776000000000000000000000\ +00000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 142, 73, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389538681469*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"5defc323-a81e-4192-b773-231b9c153f6d"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.0568315495830883`*^-157\\\", \ +\\\"19233007369557860059867825125073051459553674347188793425314577950978902747\ +712971495218301961163350940137443209261321198991532417980825600000000000000000\ +000000000\\\"]\\) is too small to represent as a normalized machine number; \ +precision may be lost.\"", 2, 142, 74, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943895386861143`*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"7c35e482-0a16-44ce-9a95-efddc6711ddb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.308849889654692`*^-160\\\", \ +\\\"69238826530408296215524170450262985254393227649879656331132480623524049891\ +766697382785887060188063384494795553340756316369516704730972160000000000000000\ +000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 142, 75, 25994214395587227365, + "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389538689603*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"eddaee02-721e-430b-ab55-fa81944502f4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 142, 76, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943895386933126`*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"2368c2f4-3dff-412f-b1a6-4bca404c5ef3"], + +Cell[BoxData["9.43343689786828`"], "Output", + CellChangeTimes->{3.9943895676066504`*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"f86f88de-199a-4909-8214-c6a7695be5e9"] }, Open ]], Cell[CellGroupData[{ @@ -12170,27 +15309,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850818889292*^9, - 3.9918508230677433`*^9}},ExpressionUUID->"d2148290-3e90-8347-bddd-\ -5dd8190b0268"], + CellChangeTimes->{{3.991850818889292*^9, 3.9918508230677433`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"905b237c-0e51-ab4b-895d-05994c6f1d5f"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1014474085009798`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 143, 77, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389567635257*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"87c56015-6a2f-43c5-9608-b4f1f09ead1c"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ad8c79e-9570-a44d-b593-07aa87056e21"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.8678897996576535`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 143, 78, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389567639497*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"e0cd0fdf-9388-4186-be7d-e57ac227363a"], -Cell[BoxData["0.576602516746911`"], "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1513828911596143`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 79, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389567643024*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"8ed9a9f9-1737-4944-bf0b-707b3a2dae1a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 80, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389567646453*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"1d331a41-dfb7-4a18-bfd7-6b2ddbb82097"], + +Cell[BoxData["0.9240967911370157`"], "Output", + CellChangeTimes->{3.9943895718453074`*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"0c630e09-bf43-4ad9-bcd2-ca522d415f74"] }, Open ]], Cell[CellGroupData[{ @@ -12211,8 +15395,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -12257,27 +15440,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850826380268*^9, - 3.991850829169306*^9}},ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-\ -98d71f8a8458"], + CellChangeTimes->{{3.991850826380268*^9, 3.991850829169306*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"c516c31a-74b4-f24d-a16a-678221cde87e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1014474085009798`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 144, 81, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389571874914*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"f37e1a58-8585-409d-80a9-cf4b78eaf5b3"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"5c50b555-9ebe-f94d-801f-34634555f622"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.8678897996576535`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 144, 82, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389571879447*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"880eb781-457c-47e8-81a8-041fbe6f7092"], -Cell[BoxData["3.32141991539404`"], "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1513828911596143`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 83, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438957188335*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"556ae829-4358-4786-9a22-09d41678da7b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 84, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99438957188643*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"dd7da6a9-b950-4fcd-998c-145bed2fdbde"], + +Cell[BoxData["26.484500636314902`"], "Output", + CellChangeTimes->{3.994389576090847*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"37b02ba7-c080-41dd-ad52-aab451c49214"] }, Open ]], Cell[CellGroupData[{ @@ -12298,8 +15526,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -12344,27 +15571,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918508329145336`*^9, - 3.991850837197098*^9}},ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-\ -57c1fe1d0585"], + CellChangeTimes->{{3.9918508329145336`*^9, 3.991850837197098*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"7ca591cf-a5ce-ce41-8101-8edfca50e890"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.1014474085009798`*^-196\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 145, 85, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389576122608*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"4bb0a18d-21db-4caf-92fa-04b25da063ca"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"cbafd11a-4be0-b541-81e4-e62191ae7695"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.8678897996576535`*^-201\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 145, 86, + 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389576126563*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"b7a5e039-e702-4551-b160-9e58df41ec4a"], -Cell[BoxData["18.419619005098298`"], "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1513828911596143`*^-205\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 87, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389576130637*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"b0de82c5-10fa-4afe-9abe-60f4e8314eb8"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 88, 25994214395587227365, "kernel 2"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943895761343727`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"b39cd8ee-bd41-42d0-99dc-1b66577757a0"], + +Cell[BoxData["4.430265839427906`"], "Output", + CellChangeTimes->{3.994389578730007*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"8faeeed7-be5e-4731-a7fd-e333a7191609"] }, Open ]], Cell[CellGroupData[{ @@ -12373,20 +15645,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918508397421246`*^9, - 3.9918508449867363`*^9}},ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-\ -1ca469b254bd"], + CellChangeTimes->{{3.9918508397421246`*^9, 3.9918508449867363`*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[BoxData["0.07371813161570438`"], "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[BoxData["0.08531132247328632`"], "Output", + CellChangeTimes->{3.994389578766308*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"02dc2a7d-c533-48ca-87a7-b1623b713f21"] }, Open ]], Cell[BoxData[ RowBox[{"NotebookSave", "[", "]"}]], "Input", - CellChangeTimes->{{3.994236307856925*^9, - 3.9942363154318037`*^9}},ExpressionUUID->"a3233522-e327-40d5-8d4e-\ -9bd748a0a988"] + CellChangeTimes->{{3.994236307856925*^9, 3.9942363154318037`*^9}}, + CellLabel-> + "In[147]:=",ExpressionUUID->"a3233522-e327-40d5-8d4e-9bd748a0a988"] }, -WindowSize->{1440, 882}, +Evaluator->"kernel 2", +WindowSize->{1440, 792}, WindowMargins->{{0, Automatic}, {0, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", @@ -12405,608 +15681,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 354, 7, 66, "Input",ExpressionUUID->"3943730d-9530-43b8-bf39-19784136256b"], -Cell[933, 31, 260, 5, 41, "Output",ExpressionUUID->"499a6fc7-b1e5-48d6-b79b-db1dd4a5b79b"] +Cell[576, 22, 349, 6, 29, "Input",ExpressionUUID->"3943730d-9530-43b8-bf39-19784136256b"], +Cell[928, 30, 277, 4, 33, "Output",ExpressionUUID->"ab73da10-0365-4cc4-8a8f-43724816bc2e"] }, Open ]], Cell[CellGroupData[{ -Cell[1230, 41, 253, 5, 36, "Input",ExpressionUUID->"daae7706-fca6-4e7a-9954-4fe79beca5c2"], -Cell[1486, 48, 260, 5, 41, "Output",ExpressionUUID->"c7716299-8dfe-4fe4-85d3-b5caadb02ba2"] +Cell[1242, 39, 248, 4, 29, "Input",ExpressionUUID->"daae7706-fca6-4e7a-9954-4fe79beca5c2"], +Cell[1493, 45, 279, 4, 33, "Output",ExpressionUUID->"4575a8d6-9dfa-46ec-8ad9-8d3cf624f559"] }, Open ]], Cell[CellGroupData[{ -Cell[1783, 58, 226, 5, 36, "Input",ExpressionUUID->"d74a31de-003c-48e3-bd39-989b5d6e0b39"], -Cell[2012, 65, 260, 5, 41, "Output",ExpressionUUID->"801e168a-e06e-491d-98b0-151f04a299ab"] +Cell[1809, 54, 221, 4, 29, "Input",ExpressionUUID->"d74a31de-003c-48e3-bd39-989b5d6e0b39"], +Cell[2033, 60, 277, 4, 33, "Output",ExpressionUUID->"7c501d52-ee4e-4d12-a067-7b5cea0a20d2"] }, Open ]], Cell[CellGroupData[{ -Cell[2309, 75, 180, 4, 36, "Input",ExpressionUUID->"1c44b317-519b-49c8-8702-e2d9d929601d"], -Cell[2492, 81, 260, 5, 41, "Output",ExpressionUUID->"da50ec22-f880-4086-95ca-25b5f93bce82"] +Cell[2347, 69, 175, 3, 29, "Input",ExpressionUUID->"1c44b317-519b-49c8-8702-e2d9d929601d"], +Cell[2525, 74, 277, 4, 33, "Output",ExpressionUUID->"41b8c006-8b92-443f-a8fc-85536b13baa2"] }, Open ]], Cell[CellGroupData[{ -Cell[2789, 91, 262, 8, 54, "Input",ExpressionUUID->"3f66c609-61b6-4f6f-ba97-9d8451a7ad83"], -Cell[3054, 101, 273, 5, 41, "Output",ExpressionUUID->"c03047fc-49e4-4b00-b56f-5501fb6aa2ca"] +Cell[2839, 83, 257, 7, 42, "Input",ExpressionUUID->"3f66c609-61b6-4f6f-ba97-9d8451a7ad83"], +Cell[3099, 92, 292, 4, 33, "Output",ExpressionUUID->"431e2abf-55b2-4f40-bcce-81706ab63b6d"] }, Open ]], Cell[CellGroupData[{ -Cell[3364, 111, 136, 3, 36, "Input",ExpressionUUID->"ff44fa1f-89eb-4ba4-b609-646ee4da5423"], -Cell[3503, 116, 259, 5, 41, "Output",ExpressionUUID->"9edf3971-4c57-4fa1-b8df-861f940ee735"] +Cell[3428, 101, 131, 2, 29, "Input",ExpressionUUID->"ff44fa1f-89eb-4ba4-b609-646ee4da5423"], +Cell[3562, 105, 275, 4, 33, "Output",ExpressionUUID->"7d31de18-83d4-4734-be62-77a7a251bde6"] }, Open ]], Cell[CellGroupData[{ -Cell[3799, 126, 281, 7, 36, "Input",ExpressionUUID->"94581f7f-892d-4c5a-bc76-6a965728ccb3"], -Cell[4083, 135, 273, 5, 41, "Output",ExpressionUUID->"4312da58-abfb-4481-90d4-32ab1f884412"] +Cell[3874, 114, 276, 6, 29, "Input",ExpressionUUID->"94581f7f-892d-4c5a-bc76-6a965728ccb3"], +Cell[4153, 122, 290, 4, 33, "Output",ExpressionUUID->"ae826447-e707-4593-80fa-27fe695aa5b9"] }, Open ]], Cell[CellGroupData[{ -Cell[4393, 145, 262, 8, 36, "Input",ExpressionUUID->"64734b62-ad52-4430-8a27-dca2156ea9db"], -Cell[4658, 155, 273, 5, 41, "Output",ExpressionUUID->"bd1056d7-4cba-43b2-bde1-b8d57dfd7dc5"] +Cell[4480, 131, 257, 7, 29, "Input",ExpressionUUID->"64734b62-ad52-4430-8a27-dca2156ea9db"], +Cell[4740, 140, 290, 4, 33, "Output",ExpressionUUID->"92109bd3-a35f-4c97-86ff-5b458ddffb78"] }, Open ]], Cell[CellGroupData[{ -Cell[4968, 165, 209, 4, 36, "Input",ExpressionUUID->"6b321ac0-44f1-4881-9cd1-4a4b52e97f45"], -Cell[5180, 171, 237, 4, 41, "Output",ExpressionUUID->"6af075ab-3e00-4497-bdd8-ab4377b90b38"] +Cell[5067, 149, 204, 3, 29, "Input",ExpressionUUID->"6b321ac0-44f1-4881-9cd1-4a4b52e97f45"], +Cell[5274, 154, 255, 3, 33, "Output",ExpressionUUID->"f37eb077-f831-4ee0-a6a2-9cb3b3dc359c"] }, Open ]], Cell[CellGroupData[{ -Cell[5454, 180, 207, 4, 36, "Input",ExpressionUUID->"44eaa458-26da-4c2c-9c5b-de663afd33a3"], -Cell[5664, 186, 238, 4, 62, "Output",ExpressionUUID->"42257ab3-e7f0-4b2d-accc-c7d4960d77bd"] +Cell[5566, 162, 203, 3, 29, "Input",ExpressionUUID->"44eaa458-26da-4c2c-9c5b-de663afd33a3"], +Cell[5772, 167, 257, 3, 33, "Output",ExpressionUUID->"fa024d3c-15bb-45e3-b2ac-a3d4640cf736"] }, Open ]], Cell[CellGroupData[{ -Cell[5939, 195, 133, 3, 55, "Input",ExpressionUUID->"08e8b451-72ed-4e4f-816e-862c4275c518"], -Cell[6075, 200, 256, 5, 62, "Output",ExpressionUUID->"08042680-84e3-4953-9097-8b4b2329c8a9"] +Cell[6066, 175, 129, 2, 29, "Input",ExpressionUUID->"08e8b451-72ed-4e4f-816e-862c4275c518"], +Cell[6198, 179, 274, 4, 33, "Output",ExpressionUUID->"4f97339f-aece-468f-806a-f72c897fd005"] }, Open ]], Cell[CellGroupData[{ -Cell[6368, 210, 133, 3, 55, "Input",ExpressionUUID->"ebc894a3-b30c-4783-b098-44e1acfb02e2"], -Cell[6504, 215, 258, 5, 62, "Output",ExpressionUUID->"197384c7-5cbd-4da5-af81-56243f0ddbb4"] +Cell[6509, 188, 129, 2, 29, "Input",ExpressionUUID->"ebc894a3-b30c-4783-b098-44e1acfb02e2"], +Cell[6641, 192, 276, 4, 33, "Output",ExpressionUUID->"ba344957-5ede-4ff0-b767-af6895d66110"] }, Open ]], Cell[CellGroupData[{ -Cell[6799, 225, 561, 20, 148, "Input",ExpressionUUID->"94884653-9926-43f0-a4e4-c8a218730d65"], -Cell[7363, 247, 270, 5, 62, "Output",ExpressionUUID->"b0418ee4-11ae-4236-8758-d1177d1d5715"] +Cell[6954, 201, 557, 19, 79, "Input",ExpressionUUID->"94884653-9926-43f0-a4e4-c8a218730d65"], +Cell[7514, 222, 288, 4, 33, "Output",ExpressionUUID->"1265a925-286a-47f0-8b82-2bc7cbd3e5b6"] }, Open ]], Cell[CellGroupData[{ -Cell[7670, 257, 561, 20, 148, "Input",ExpressionUUID->"6175cef8-34fe-4c75-a9f1-e60f3bbaacfe"], -Cell[8234, 279, 271, 5, 62, "Output",ExpressionUUID->"ae4c8c55-8eef-4563-96cb-21d8ba0414f4"] +Cell[7839, 231, 557, 19, 79, "Input",ExpressionUUID->"6175cef8-34fe-4c75-a9f1-e60f3bbaacfe"], +Cell[8399, 252, 291, 4, 33, "Output",ExpressionUUID->"6421bcad-bc0d-429d-ad9f-73f1a48e2263"] }, Open ]], Cell[CellGroupData[{ -Cell[8542, 289, 1592, 51, 211, "Input",ExpressionUUID->"bb0f74ec-aec0-425a-9079-bf958f539559"], -Cell[10137, 342, 272, 5, 62, "Output",ExpressionUUID->"4e9cf17c-c086-4207-93a2-1c9be79bec5f"] +Cell[8727, 261, 1588, 50, 55, "Input",ExpressionUUID->"bb0f74ec-aec0-425a-9079-bf958f539559"], +Cell[10318, 313, 290, 4, 33, "Output",ExpressionUUID->"6d8139b4-d327-4aef-a741-038c40e55ba3"] }, Open ]], Cell[CellGroupData[{ -Cell[10446, 352, 1426, 47, 211, "Input",ExpressionUUID->"c33dcea4-9866-4fe5-a912-90d5431107fd"], -Cell[11875, 401, 290, 6, 62, "Output",ExpressionUUID->"91e07067-ff11-4791-90c4-12c7b6c0218a"] +Cell[10645, 322, 1422, 46, 55, "Input",ExpressionUUID->"c33dcea4-9866-4fe5-a912-90d5431107fd"], +Cell[12070, 370, 310, 5, 33, "Output",ExpressionUUID->"f0ea87e2-2d8d-4017-b474-0110ffc40b41"] }, Open ]], Cell[CellGroupData[{ -Cell[12202, 412, 1426, 47, 211, "Input",ExpressionUUID->"9522d922-0771-4bfc-b71d-52614048d630"], -Cell[13631, 461, 291, 6, 62, "Output",ExpressionUUID->"4b5ccc44-874a-4062-a2ee-585fdf588efa"] +Cell[12417, 380, 1422, 46, 55, "Input",ExpressionUUID->"9522d922-0771-4bfc-b71d-52614048d630"], +Cell[13842, 428, 309, 5, 33, "Output",ExpressionUUID->"3bacb9f7-95ca-443f-b18b-40d33aea88a8"] }, Open ]], Cell[CellGroupData[{ -Cell[13959, 472, 1592, 51, 211, "Input",ExpressionUUID->"e032899b-6b0b-4998-81de-c470b48600d6"], -Cell[15554, 525, 269, 5, 62, "Output",ExpressionUUID->"8e3fce66-1bea-4515-a6be-08ab330f5a8e"] +Cell[14188, 438, 1588, 50, 55, "Input",ExpressionUUID->"e032899b-6b0b-4998-81de-c470b48600d6"], +Cell[15779, 490, 287, 4, 33, "Output",ExpressionUUID->"1a4efbc4-f2e6-42b8-8f6d-c48acb3fd6ba"] }, Open ]], Cell[CellGroupData[{ -Cell[15860, 535, 135, 3, 55, "Input",ExpressionUUID->"216606c7-6dad-4aa1-a3b7-4830abc566c0"], -Cell[15998, 540, 258, 5, 62, "Output",ExpressionUUID->"620aadf4-3b24-41bd-90a9-2a851d458f72"] +Cell[16103, 499, 131, 2, 29, "Input",ExpressionUUID->"216606c7-6dad-4aa1-a3b7-4830abc566c0"], +Cell[16237, 503, 276, 4, 33, "Output",ExpressionUUID->"4e38ebbe-6707-42fc-9537-466390f7388b"] }, Open ]], Cell[CellGroupData[{ -Cell[16293, 550, 137, 3, 55, "Input",ExpressionUUID->"57a3072b-f902-4e31-89a5-b16ef3c9230d"], -Cell[16433, 555, 255, 5, 62, "Output",ExpressionUUID->"9cec912c-4b48-4158-97f3-06ff6968be02"] +Cell[16550, 512, 133, 2, 29, "Input",ExpressionUUID->"57a3072b-f902-4e31-89a5-b16ef3c9230d"], +Cell[16686, 516, 273, 4, 33, "Output",ExpressionUUID->"a080c2fc-5094-4941-b8ef-777a5f9cd0e2"] }, Open ]], Cell[CellGroupData[{ -Cell[16725, 565, 138, 3, 55, "Input",ExpressionUUID->"1ceb69c9-9fc5-40b6-ab8e-c8e59d88e8de"], -Cell[16866, 570, 262, 5, 62, "Output",ExpressionUUID->"7bc279d0-7531-4399-a25c-56f639440104"] +Cell[16996, 525, 134, 2, 29, "Input",ExpressionUUID->"1ceb69c9-9fc5-40b6-ab8e-c8e59d88e8de"], +Cell[17133, 529, 282, 4, 33, "Output",ExpressionUUID->"dd2e574e-ab5c-40de-9981-7ed9be88e08e"] }, Open ]], Cell[CellGroupData[{ -Cell[17165, 580, 223, 5, 55, "Input",ExpressionUUID->"9f3f8bb1-d0e8-48d7-a0d2-d236e125b8df"], -Cell[17391, 587, 272, 6, 62, "Output",ExpressionUUID->"9beed3d8-5c86-4f06-a197-c30484e3cd35"] +Cell[17452, 538, 219, 4, 29, "Input",ExpressionUUID->"9f3f8bb1-d0e8-48d7-a0d2-d236e125b8df"], +Cell[17674, 544, 292, 5, 33, "Output",ExpressionUUID->"1f0bf986-d1a7-4ca2-b60b-090d911565fa"] }, Open ]], Cell[CellGroupData[{ -Cell[17700, 598, 138, 3, 55, "Input",ExpressionUUID->"7852062e-9d9c-4d72-b668-53029692efc7"], -Cell[17841, 603, 260, 5, 62, "Output",ExpressionUUID->"b71a3c77-d52d-412d-a545-2e790ba7d27a"] +Cell[18003, 554, 134, 2, 29, "Input",ExpressionUUID->"7852062e-9d9c-4d72-b668-53029692efc7"], +Cell[18140, 558, 278, 4, 33, "Output",ExpressionUUID->"9746ca51-a9c6-4614-b045-9ca8af064919"] }, Open ]], Cell[CellGroupData[{ -Cell[18138, 613, 328, 6, 55, "Input",ExpressionUUID->"4238e547-04b4-4cc2-a364-96e360fd1095"], -Cell[18469, 621, 253, 5, 62, "Output",ExpressionUUID->"c22508b0-e128-4d8f-a35a-f1274e6790ab"] +Cell[18455, 567, 324, 5, 29, "Input",ExpressionUUID->"4238e547-04b4-4cc2-a364-96e360fd1095"], +Cell[18782, 574, 271, 4, 33, "Output",ExpressionUUID->"82103c4e-a1c2-494e-8371-652f412c415c"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 631, 299, 6, 55, "Input",ExpressionUUID->"40cfdd4f-d522-4cf4-bb3f-ddf87ddd0049"], -Cell[19061, 639, 252, 5, 62, "Output",ExpressionUUID->"b5c3d90a-a29c-4803-9477-07294e73f107"] +Cell[19090, 583, 295, 5, 29, "Input",ExpressionUUID->"40cfdd4f-d522-4cf4-bb3f-ddf87ddd0049"], +Cell[19388, 590, 270, 4, 33, "Output",ExpressionUUID->"c0868be3-62bf-47ac-b3ee-92d341658feb"] }, Open ]], Cell[CellGroupData[{ -Cell[19350, 649, 223, 5, 55, "Input",ExpressionUUID->"d5cc82e8-3bb4-461d-8af2-e917834817a0"], -Cell[19576, 656, 257, 5, 62, "Output",ExpressionUUID->"f0373de4-4109-4341-b94a-96998235c1fa"] +Cell[19695, 599, 219, 4, 29, "Input",ExpressionUUID->"d5cc82e8-3bb4-461d-8af2-e917834817a0"], +Cell[19917, 605, 275, 4, 33, "Output",ExpressionUUID->"e42befc8-07a5-4f18-885c-092302b8dc44"] }, Open ]], Cell[CellGroupData[{ -Cell[19870, 666, 354, 11, 81, "Input",ExpressionUUID->"1521e7a7-457f-4c43-92d7-83c8a29470ee"], -Cell[20227, 679, 275, 5, 62, "Output",ExpressionUUID->"3801847b-4dc3-4ee5-a7d6-c282eef96ffc"] +Cell[20229, 614, 350, 10, 42, "Input",ExpressionUUID->"1521e7a7-457f-4c43-92d7-83c8a29470ee"], +Cell[20582, 626, 293, 4, 33, "Output",ExpressionUUID->"53c3f735-c58e-4cc9-ac85-03bbb15e4716"] }, Open ]], Cell[CellGroupData[{ -Cell[20539, 689, 354, 11, 81, "Input",ExpressionUUID->"bb70a224-c72c-4ce1-a572-c1a6982f5e64"], -Cell[20896, 702, 288, 6, 62, "Output",ExpressionUUID->"102a79da-360d-4383-af2e-636189646b64"] +Cell[20912, 635, 350, 10, 42, "Input",ExpressionUUID->"bb70a224-c72c-4ce1-a572-c1a6982f5e64"], +Cell[21265, 647, 308, 5, 33, "Output",ExpressionUUID->"32df478c-5dbd-4629-b5f4-61d155c03a9d"] }, Open ]], Cell[CellGroupData[{ -Cell[21221, 713, 998, 27, 154, "Input",ExpressionUUID->"d228318d-7be6-4ab9-995e-a12ebb7925bf"], -Cell[22222, 742, 276, 5, 62, "Output",ExpressionUUID->"9eecf493-829a-43f0-8011-7f8ff37b9cf1"] +Cell[21610, 657, 994, 26, 43, "Input",ExpressionUUID->"d228318d-7be6-4ab9-995e-a12ebb7925bf"], +Cell[22607, 685, 294, 4, 33, "Output",ExpressionUUID->"a8a980b4-7fe1-44bb-82a4-ab9814cebd7d"] }, Open ]], Cell[CellGroupData[{ -Cell[22535, 752, 203, 4, 55, "Input",ExpressionUUID->"1c644334-4034-4175-b519-5173e387509e"], -Cell[22741, 758, 258, 5, 62, "Output",ExpressionUUID->"da8ac628-9b2b-46f0-a295-be6729651dc8"] +Cell[22938, 694, 199, 3, 29, "Input",ExpressionUUID->"1c644334-4034-4175-b519-5173e387509e"], +Cell[23140, 699, 278, 4, 33, "Output",ExpressionUUID->"9fba1196-d452-4f3b-b0d4-9e5c2e76ff5c"] }, Open ]], Cell[CellGroupData[{ -Cell[23036, 768, 331, 6, 55, "Input",ExpressionUUID->"6ed480b8-b627-490d-a1bd-b6b2cc1dc50d"], -Cell[23370, 776, 235, 4, 62, "Output",ExpressionUUID->"13e60e75-e971-4310-8d1d-659942245f47"] +Cell[23455, 708, 327, 5, 29, "Input",ExpressionUUID->"6ed480b8-b627-490d-a1bd-b6b2cc1dc50d"], +Cell[23785, 715, 254, 3, 33, "Output",ExpressionUUID->"06f93ab3-6f97-47ca-824c-b0a4d3fb99a9"] }, Open ]], -Cell[23620, 783, 177, 3, 55, "Input",ExpressionUUID->"82ed6860-a721-4fa4-bc9a-b8b91ebd31e8"], +Cell[24054, 721, 173, 2, 29, "Input",ExpressionUUID->"82ed6860-a721-4fa4-bc9a-b8b91ebd31e8"], Cell[CellGroupData[{ -Cell[23822, 790, 333, 6, 55, "Input",ExpressionUUID->"c9346430-f3f7-4030-ae91-c2d23857a67f"], -Cell[24158, 798, 232, 4, 62, "Output",ExpressionUUID->"9f7fbcdf-43fd-411d-9e20-64c878a946b1"] +Cell[24252, 727, 329, 5, 29, "Input",ExpressionUUID->"c9346430-f3f7-4030-ae91-c2d23857a67f"], +Cell[24584, 734, 253, 3, 33, "Output",ExpressionUUID->"f95c4646-f86b-42e5-a3f2-bf887e47fbc6"] }, Open ]], -Cell[24405, 805, 177, 3, 55, "Input",ExpressionUUID->"028b0534-2c4c-4cf2-905d-4552f7ca54c2"], +Cell[24852, 740, 173, 2, 29, "Input",ExpressionUUID->"028b0534-2c4c-4cf2-905d-4552f7ca54c2"], Cell[CellGroupData[{ -Cell[24607, 812, 336, 6, 55, "Input",ExpressionUUID->"85518522-1b80-432e-a966-1cf53b275711"], -Cell[24946, 820, 231, 4, 62, "Output",ExpressionUUID->"c5465443-2cda-4f7f-875b-ee3debb90888"] +Cell[25050, 746, 332, 5, 29, "Input",ExpressionUUID->"85518522-1b80-432e-a966-1cf53b275711"], +Cell[25385, 753, 250, 3, 33, "Output",ExpressionUUID->"70b15f46-77a7-484a-9f5b-453d3127199f"] }, Open ]], -Cell[25192, 827, 177, 3, 55, "Input",ExpressionUUID->"cc4b9fe1-a96b-491e-b02e-437a97b451dc"], +Cell[25650, 759, 173, 2, 29, "Input",ExpressionUUID->"cc4b9fe1-a96b-491e-b02e-437a97b451dc"], Cell[CellGroupData[{ -Cell[25394, 834, 358, 6, 55, "Input",ExpressionUUID->"2761b0bd-c8fe-43b1-8339-b663fa070bea"], -Cell[25755, 842, 237, 4, 62, "Output",ExpressionUUID->"b077b6db-214d-44be-a4f1-66b324d689e7"] +Cell[25848, 765, 354, 5, 29, "Input",ExpressionUUID->"2761b0bd-c8fe-43b1-8339-b663fa070bea"], +Cell[26205, 772, 256, 3, 33, "Output",ExpressionUUID->"f1ccd2a3-2037-4b6e-82f0-11e423d2dbcb"] }, Open ]], -Cell[26007, 849, 175, 3, 55, "Input",ExpressionUUID->"55690335-bd9f-438d-a21e-b3c436e73a36"], +Cell[26476, 778, 171, 2, 29, "Input",ExpressionUUID->"55690335-bd9f-438d-a21e-b3c436e73a36"], Cell[CellGroupData[{ -Cell[26207, 856, 303, 6, 55, "Input",ExpressionUUID->"6cb5e4b9-f971-48f9-8193-9d4d80826f60"], -Cell[26513, 864, 237, 4, 62, "Output",ExpressionUUID->"91182982-aab4-4f88-bafb-142295944784"] +Cell[26672, 784, 299, 5, 29, "Input",ExpressionUUID->"6cb5e4b9-f971-48f9-8193-9d4d80826f60"], +Cell[26974, 791, 256, 3, 33, "Output",ExpressionUUID->"bafb356b-a588-4884-9398-e955984a145a"] }, Open ]], -Cell[26765, 871, 175, 3, 55, "Input",ExpressionUUID->"0aea4f91-16f1-4379-a384-c8f1d75b1b6a"], +Cell[27245, 797, 171, 2, 29, "Input",ExpressionUUID->"0aea4f91-16f1-4379-a384-c8f1d75b1b6a"], Cell[CellGroupData[{ -Cell[26965, 878, 307, 6, 55, "Input",ExpressionUUID->"890b4fc3-cf88-4785-8657-54e7da4c1174"], -Cell[27275, 886, 233, 4, 62, "Output",ExpressionUUID->"dc4cd8fc-4e63-43a6-aa6f-66c7d88b4769"] +Cell[27441, 803, 303, 5, 29, "Input",ExpressionUUID->"890b4fc3-cf88-4785-8657-54e7da4c1174"], +Cell[27747, 810, 254, 3, 33, "Output",ExpressionUUID->"fdf2541d-08c4-4d43-b58a-230b3d065dab"] }, Open ]], -Cell[27523, 893, 177, 3, 55, "Input",ExpressionUUID->"e0b260f2-8d3f-43a5-8613-1e9fcf0a277c"], +Cell[28016, 816, 173, 2, 29, "Input",ExpressionUUID->"e0b260f2-8d3f-43a5-8613-1e9fcf0a277c"], Cell[CellGroupData[{ -Cell[27725, 900, 311, 6, 55, "Input",ExpressionUUID->"55c819a6-052f-42dc-b827-ee064f89cfb9"], -Cell[28039, 908, 232, 4, 62, "Output",ExpressionUUID->"38998a46-4472-476c-b152-eb30354e583b"] +Cell[28214, 822, 307, 5, 29, "Input",ExpressionUUID->"55c819a6-052f-42dc-b827-ee064f89cfb9"], +Cell[28524, 829, 253, 3, 33, "Output",ExpressionUUID->"c70ea79c-e430-4a7f-b628-6c44e2a51de9"] }, Open ]], -Cell[28286, 915, 176, 3, 55, "Input",ExpressionUUID->"2f642cd5-77a3-49e8-be27-8d513a09080a"], +Cell[28792, 835, 172, 2, 29, "Input",ExpressionUUID->"2f642cd5-77a3-49e8-be27-8d513a09080a"], Cell[CellGroupData[{ -Cell[28487, 922, 279, 5, 55, "Input",ExpressionUUID->"4669ad9d-ec53-4c97-9513-e1af6420e80e"], -Cell[28769, 929, 231, 4, 62, "Output",ExpressionUUID->"87a6042c-1df3-42c3-b80f-bd1eee62fc2f"] +Cell[28989, 841, 275, 4, 29, "Input",ExpressionUUID->"4669ad9d-ec53-4c97-9513-e1af6420e80e"], +Cell[29267, 847, 249, 3, 33, "Output",ExpressionUUID->"5dc1bdf1-5c72-4b78-8f93-4c429c072955"] }, Open ]], -Cell[29015, 936, 179, 3, 55, "Input",ExpressionUUID->"be32d0fb-a27a-438c-a76f-2201d8c0fbac"], +Cell[29531, 853, 175, 2, 29, "Input",ExpressionUUID->"be32d0fb-a27a-438c-a76f-2201d8c0fbac"], Cell[CellGroupData[{ -Cell[29219, 943, 19813, 486, 3214, "Input",ExpressionUUID->"0ccb87c5-597e-48f2-8a09-eab3df7ef3f1"], -Cell[49035, 1431, 272, 5, 62, "Output",ExpressionUUID->"9f4dee7c-b3b0-40ee-a29b-041a2e275078"] +Cell[29731, 859, 19809, 485, 1100, "Input",ExpressionUUID->"0ccb87c5-597e-48f2-8a09-eab3df7ef3f1"], +Cell[49543, 1346, 290, 4, 33, "Output",ExpressionUUID->"ea61208a-4ae8-4a8d-940c-4f5430cb990a"] }, Open ]], Cell[CellGroupData[{ -Cell[49344, 1441, 19752, 490, 3214, "Input",ExpressionUUID->"ef40558d-9877-413e-ad39-31919e60aa22"], -Cell[69099, 1933, 271, 5, 62, "Output",ExpressionUUID->"d9512901-9110-4a08-834b-e31a77481e83"] +Cell[49870, 1355, 19748, 489, 1100, "Input",ExpressionUUID->"ef40558d-9877-413e-ad39-31919e60aa22"], +Cell[69621, 1846, 289, 4, 33, "Output",ExpressionUUID->"eae59e8e-62ac-4f13-935f-895659428572"] }, Open ]], Cell[CellGroupData[{ -Cell[69407, 1943, 19752, 484, 3213, "Input",ExpressionUUID->"ad8b4a8d-aa5a-47cb-9231-3882aa3aa636"], -Cell[89162, 2429, 289, 6, 62, "Output",ExpressionUUID->"6376cc57-a6ec-48c2-9ea3-e9896c20d1fd"] +Cell[69947, 1855, 19748, 483, 1099, "Input",ExpressionUUID->"ad8b4a8d-aa5a-47cb-9231-3882aa3aa636"], +Cell[89698, 2340, 307, 5, 33, "Output",ExpressionUUID->"817e0142-ff2f-447c-abbe-a2bca2bf1e9f"] }, Open ]], Cell[CellGroupData[{ -Cell[89488, 2440, 22538, 554, 3639, "Input",ExpressionUUID->"f6417cb4-7895-4e62-b55f-b938a0d2d12a"], -Cell[112029, 2996, 291, 6, 62, "Output",ExpressionUUID->"957d529d-ef4f-4bea-92fe-f59636cd901d"] +Cell[90042, 2350, 22534, 553, 1235, "Input",ExpressionUUID->"f6417cb4-7895-4e62-b55f-b938a0d2d12a"], +Cell[112579, 2905, 311, 5, 33, "Output",ExpressionUUID->"e510eb07-2a01-4ca7-b1db-169c4ad6cb0a"] }, Open ]], Cell[CellGroupData[{ -Cell[112357, 3007, 22539, 554, 3639, "Input",ExpressionUUID->"17b000e1-6a35-4a6c-ae53-b8c939e69c93"], -Cell[134899, 3563, 292, 6, 62, "Output",ExpressionUUID->"fa67b965-6ac0-445d-b326-8c89a66a42a9"] +Cell[112927, 2915, 22535, 553, 1235, "Input",ExpressionUUID->"17b000e1-6a35-4a6c-ae53-b8c939e69c93"], +Cell[135465, 3470, 310, 5, 33, "Output",ExpressionUUID->"e79b2a21-078e-4072-a0ab-7ce2ae40339b"] }, Open ]], Cell[CellGroupData[{ -Cell[135228, 3574, 25495, 627, 4065, "Input",ExpressionUUID->"fffad2cc-5fdd-4f36-9123-f758e64cf42d"], -Cell[160726, 4203, 286, 6, 62, "Output",ExpressionUUID->"60b1eb9b-8c32-4cca-8d6f-d4ac8f942bf9"] +Cell[135812, 3480, 25491, 626, 1350, "Input",ExpressionUUID->"fffad2cc-5fdd-4f36-9123-f758e64cf42d"], +Cell[161306, 4108, 306, 5, 33, "Output",ExpressionUUID->"d730774c-f47c-47c0-8d74-42ce162c2ac5"] }, Open ]], Cell[CellGroupData[{ -Cell[161049, 4214, 134, 3, 55, "Input",ExpressionUUID->"95fe90eb-9c3b-42b7-b53c-7ec3fd3c9dc5"], -Cell[161186, 4219, 254, 5, 62, "Output",ExpressionUUID->"f84a4360-eaad-40da-97ef-0ba357d9630e"] +Cell[161649, 4118, 130, 2, 29, "Input",ExpressionUUID->"95fe90eb-9c3b-42b7-b53c-7ec3fd3c9dc5"], +Cell[161782, 4122, 272, 4, 33, "Output",ExpressionUUID->"8749418d-814b-4af9-b8ec-ee421076c576"] }, Open ]], Cell[CellGroupData[{ -Cell[161477, 4229, 134, 3, 55, "Input",ExpressionUUID->"a374712d-25bb-4ed3-8dad-1eacd03e8b74"], -Cell[161614, 4234, 254, 5, 62, "Output",ExpressionUUID->"76a5733c-2c44-40f0-9ad2-abd82107af80"] +Cell[162091, 4131, 130, 2, 29, "Input",ExpressionUUID->"a374712d-25bb-4ed3-8dad-1eacd03e8b74"], +Cell[162224, 4135, 274, 4, 33, "Output",ExpressionUUID->"720a6e26-587c-4b81-b93c-a555c1c775e0"] }, Open ]], Cell[CellGroupData[{ -Cell[161905, 4244, 1148, 40, 211, "Input",ExpressionUUID->"f9220ace-6a6a-4409-8c96-26d769144f34"], -Cell[163056, 4286, 271, 5, 62, "Output",ExpressionUUID->"ec2d7bfb-a523-4ac7-9513-614b1c4cc249"] +Cell[162535, 4144, 1144, 39, 55, "Input",ExpressionUUID->"f9220ace-6a6a-4409-8c96-26d769144f34"], +Cell[163682, 4185, 289, 4, 33, "Output",ExpressionUUID->"535a093b-9c5b-41b7-bc66-733fe51bc572"] }, Open ]], Cell[CellGroupData[{ -Cell[163364, 4296, 1045, 36, 211, "Input",ExpressionUUID->"ea1c2514-c7ba-4fd2-b739-a8ed8b506983"], -Cell[164412, 4334, 286, 6, 62, "Output",ExpressionUUID->"9da40605-f57f-4ab0-8533-3883ab18cdd9"] +Cell[164008, 4194, 1041, 35, 55, "Input",ExpressionUUID->"ea1c2514-c7ba-4fd2-b739-a8ed8b506983"], +Cell[165052, 4231, 306, 5, 33, "Output",ExpressionUUID->"72d1e269-8456-4baa-b821-48912ae5c62a"] }, Open ]], Cell[CellGroupData[{ -Cell[164735, 4345, 1148, 40, 211, "Input",ExpressionUUID->"7fedfd99-5ba8-4e99-bf55-2415856ffce2"], -Cell[165886, 4387, 271, 5, 62, "Output",ExpressionUUID->"c050c737-e662-4f27-bf0e-107c1a1f8b18"] +Cell[165395, 4241, 1144, 39, 55, "Input",ExpressionUUID->"7fedfd99-5ba8-4e99-bf55-2415856ffce2"], +Cell[166542, 4282, 288, 4, 33, "Output",ExpressionUUID->"08b285ca-92b6-4cd0-a5ef-1a4f84542aca"] }, Open ]], Cell[CellGroupData[{ -Cell[166194, 4397, 112, 2, 55, "Input",ExpressionUUID->"a9c445c1-eed1-48ab-a9df-f883e3c6dd49"], -Cell[166309, 4401, 272, 5, 62, "Output",ExpressionUUID->"a7cd8413-3f9c-444e-8af4-1c0527655f38"] +Cell[166867, 4291, 108, 1, 29, "Input",ExpressionUUID->"a9c445c1-eed1-48ab-a9df-f883e3c6dd49"], +Cell[166978, 4294, 290, 4, 33, "Output",ExpressionUUID->"80cd7b08-7da5-4e60-b04b-d5498062d377"] }, Open ]], Cell[CellGroupData[{ -Cell[166618, 4411, 112, 2, 55, "Input",ExpressionUUID->"9fac5d2e-d0ad-417f-83ba-a1df7e4069ab"], -Cell[166733, 4415, 289, 6, 62, "Output",ExpressionUUID->"45f5d4c4-0903-49ba-ab5a-1d97f15a0313"] +Cell[167305, 4303, 108, 1, 29, "Input",ExpressionUUID->"9fac5d2e-d0ad-417f-83ba-a1df7e4069ab"], +Cell[167416, 4306, 307, 5, 33, "Output",ExpressionUUID->"ed883b2b-a3ab-413d-8195-a69672278364"] }, Open ]], Cell[CellGroupData[{ -Cell[167059, 4426, 112, 2, 55, "Input",ExpressionUUID->"4400a4ff-4a9c-4af6-b342-b122489ac5be"], -Cell[167174, 4430, 287, 6, 62, "Output",ExpressionUUID->"a2ccd06d-586e-4d52-af8c-5dd770595030"] +Cell[167760, 4316, 108, 1, 29, "Input",ExpressionUUID->"4400a4ff-4a9c-4af6-b342-b122489ac5be"], +Cell[167871, 4319, 307, 5, 33, "Output",ExpressionUUID->"8af14ec6-590a-492e-ad32-3d41f7a80d63"] }, Open ]], Cell[CellGroupData[{ -Cell[167498, 4441, 112, 2, 55, "Input",ExpressionUUID->"6be331a8-113b-4a43-97d5-7058a5132475"], -Cell[167613, 4445, 274, 5, 62, "Output",ExpressionUUID->"fb009e1d-546a-4c59-813a-ef4408993780"] +Cell[168215, 4329, 108, 1, 29, "Input",ExpressionUUID->"6be331a8-113b-4a43-97d5-7058a5132475"], +Cell[168326, 4332, 292, 4, 33, "Output",ExpressionUUID->"7928ca01-416a-43d3-92b9-91a9561ee4c5"] }, Open ]], Cell[CellGroupData[{ -Cell[167924, 4455, 111, 2, 55, "Input",ExpressionUUID->"8b321167-e5bd-4895-930a-f1c4c2e27fe0"], -Cell[168038, 4459, 272, 5, 62, "Output",ExpressionUUID->"4eebef00-7095-403f-912c-0fb326e5e131"] +Cell[168655, 4341, 107, 1, 29, "Input",ExpressionUUID->"8b321167-e5bd-4895-930a-f1c4c2e27fe0"], +Cell[168765, 4344, 290, 4, 33, "Output",ExpressionUUID->"5c57d881-c10f-4f82-8641-69077856c71f"] }, Open ]], Cell[CellGroupData[{ -Cell[168347, 4469, 111, 2, 55, "Input",ExpressionUUID->"780e69f3-32cb-477f-be6d-06854098aab7"], -Cell[168461, 4473, 272, 5, 62, "Output",ExpressionUUID->"b394dcfe-94d4-4a0f-a227-01400baa41c7"] +Cell[169092, 4353, 107, 1, 29, "Input",ExpressionUUID->"780e69f3-32cb-477f-be6d-06854098aab7"], +Cell[169202, 4356, 290, 4, 33, "Output",ExpressionUUID->"d966b531-b27e-4d8f-b3b2-628857de51d0"] }, Open ]], Cell[CellGroupData[{ -Cell[168770, 4483, 501, 17, 105, "Input",ExpressionUUID->"ee2c157f-c2e4-4e6e-a76a-b6444c0b4980"], -Cell[169274, 4502, 287, 6, 62, "Output",ExpressionUUID->"b4455df1-1462-41b7-ab31-110a7ad06705"] +Cell[169529, 4365, 497, 16, 55, "Input",ExpressionUUID->"ee2c157f-c2e4-4e6e-a76a-b6444c0b4980"], +Cell[170029, 4383, 305, 5, 33, "Output",ExpressionUUID->"454852aa-9281-47cc-a415-5c498520e117"] }, Open ]], Cell[CellGroupData[{ -Cell[169598, 4513, 501, 17, 105, "Input",ExpressionUUID->"0d157823-9a51-4684-8434-84a3c4faa864"], -Cell[170102, 4532, 286, 6, 41, "Output",ExpressionUUID->"85cb3be1-0ccb-4107-9c3a-a5ac787672e1"] +Cell[170371, 4393, 497, 16, 55, "Input",ExpressionUUID->"0d157823-9a51-4684-8434-84a3c4faa864"], +Cell[170871, 4411, 304, 5, 33, "Output",ExpressionUUID->"fccd3433-098e-439b-ba41-94f69a8c5483"] }, Open ]], Cell[CellGroupData[{ -Cell[170425, 4543, 1792, 61, 142, "Input",ExpressionUUID->"7dea769f-37e3-4c1a-a621-9da816094e65"], -Cell[172220, 4606, 270, 5, 41, "Output",ExpressionUUID->"fa756504-b278-4356-a18c-99660bc53f6c"] +Cell[171212, 4421, 1788, 60, 55, "Input",ExpressionUUID->"7dea769f-37e3-4c1a-a621-9da816094e65"], +Cell[173003, 4483, 290, 4, 33, "Output",ExpressionUUID->"db7db63a-b448-4f6d-8b13-46b486294cb0"] }, Open ]], Cell[CellGroupData[{ -Cell[172527, 4616, 1105, 37, 73, "Input",ExpressionUUID->"20d1ef7b-f49b-40d4-8f50-9611fcfa7243"], -Cell[173635, 4655, 291, 6, 41, "Output",ExpressionUUID->"ed55d506-0729-4a36-8914-2992e565f7a3"] +Cell[173330, 4492, 1101, 36, 55, "Input",ExpressionUUID->"20d1ef7b-f49b-40d4-8f50-9611fcfa7243"], +Cell[174434, 4530, 311, 5, 33, "Output",ExpressionUUID->"8f8bf60e-62c4-40ed-a7b2-c466e4afd192"] }, Open ]], Cell[CellGroupData[{ -Cell[173963, 4666, 1822, 62, 144, "Input",ExpressionUUID->"4f78fd37-fcc1-4fac-9190-460b93233bfb"], -Cell[175788, 4730, 269, 5, 41, "Output",ExpressionUUID->"dfda7e2b-ea7c-4936-8882-f8bccf88173b"] +Cell[174782, 4540, 1818, 61, 107, "Input",ExpressionUUID->"4f78fd37-fcc1-4fac-9190-460b93233bfb"], +Cell[176603, 4603, 289, 4, 33, "Output",ExpressionUUID->"e99602a7-3915-40db-ab0c-0dcca4ae0985"] }, Open ]], Cell[CellGroupData[{ -Cell[176094, 4740, 1635, 54, 101, "Input",ExpressionUUID->"e5221a03-e942-4167-90f2-a148298a34bf"], -Cell[177732, 4796, 273, 5, 41, "Output",ExpressionUUID->"98638f7d-9775-482d-976a-cc30f73a745a"] +Cell[176929, 4612, 1631, 53, 79, "Input",ExpressionUUID->"e5221a03-e942-4167-90f2-a148298a34bf"], +Cell[178563, 4667, 291, 4, 33, "Output",ExpressionUUID->"21bc6762-39c8-4fa0-8009-30379c912e40"] }, Open ]], Cell[CellGroupData[{ -Cell[178042, 4806, 1635, 54, 101, "Input",ExpressionUUID->"55053f2f-a87c-49b6-b5f3-b1ad3a8687cd"], -Cell[179680, 4862, 272, 5, 41, "Output",ExpressionUUID->"7ddf38de-738b-4105-ab5d-7edef50340a0"] +Cell[178891, 4676, 1631, 53, 79, "Input",ExpressionUUID->"55053f2f-a87c-49b6-b5f3-b1ad3a8687cd"], +Cell[180525, 4731, 290, 4, 33, "Output",ExpressionUUID->"6bd71693-85d5-4569-8a27-bf0666f0b522"] }, Open ]], -Cell[179967, 4870, 184, 3, 36, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], -Cell[180154, 4875, 152, 3, 36, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], -Cell[180309, 4880, 182, 3, 36, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], -Cell[180494, 4885, 154, 3, 36, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[180673, 4892, 1273, 41, 61, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], -Cell[181949, 4935, 106, 0, 41, "Output",ExpressionUUID->"cbffa725-bd15-2049-b55f-318286f23572"] +Cell[180852, 4740, 205, 3, 29, "Input",ExpressionUUID->"83cccf0d-dccb-fb42-a058-5e950c758893"], +Cell[181060, 4745, 163, 2, 33, "Output",ExpressionUUID->"3e1681e1-bd22-4109-a012-babcee96bb5e"] }, Open ]], +Cell[181238, 4750, 171, 2, 29, "Input",ExpressionUUID->"7730e455-e5f4-194b-b761-e7a6896afd10"], Cell[CellGroupData[{ -Cell[182092, 4940, 910, 31, 73, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], -Cell[183005, 4973, 106, 0, 41, "Output",ExpressionUUID->"ccc498a0-28db-294f-9612-85d9a5c6b1f9"] +Cell[181434, 4756, 203, 3, 29, "Input",ExpressionUUID->"b70cfd2b-21a1-8344-9518-5e27a96171a9"], +Cell[181640, 4761, 161, 2, 33, "Output",ExpressionUUID->"63cdf459-b739-4761-b54c-04687872e607"] }, Open ]], +Cell[181816, 4766, 173, 2, 29, "Input",ExpressionUUID->"86df0a71-aa65-aa41-b8f1-8c5c5be10fe8"], Cell[CellGroupData[{ -Cell[183148, 4978, 885, 30, 73, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], -Cell[184036, 5010, 106, 0, 41, "Output",ExpressionUUID->"0586a11a-38a6-a040-a172-aaeab8c90dd8"] +Cell[182014, 4772, 1297, 42, 47, "Input",ExpressionUUID->"951271b1-84a5-6246-9288-ba8a419078ee"], +Cell[183314, 4816, 171, 2, 33, "Output",ExpressionUUID->"2d2e5b83-06d4-4c44-a60a-27995d42df8f"] }, Open ]], Cell[CellGroupData[{ -Cell[184179, 5015, 532, 18, 66, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], -Cell[184714, 5035, 101, 0, 41, "Output",ExpressionUUID->"c25fd138-6ebd-9549-9de5-30353d068c14"] +Cell[183522, 4823, 929, 30, 55, "Input",ExpressionUUID->"c16f367e-d189-2745-b3b8-a9b137c5e3b6"], +Cell[184454, 4855, 171, 2, 33, "Output",ExpressionUUID->"51de74d9-9160-4944-8dc7-0b0842d2d624"] }, Open ]], Cell[CellGroupData[{ -Cell[184852, 5040, 625, 21, 66, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], -Cell[185480, 5063, 100, 0, 41, "Output",ExpressionUUID->"8c8a87e7-f604-4044-b4ce-b17ddc0907b3"] +Cell[184662, 4862, 904, 29, 55, "Input",ExpressionUUID->"b7d001ae-480c-4b41-8df9-8010347227f7"], +Cell[185569, 4893, 173, 2, 33, "Output",ExpressionUUID->"280d82a6-af39-4acc-b427-e9fdcea63657"] }, Open ]], Cell[CellGroupData[{ -Cell[185617, 5068, 144, 4, 71, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], -Cell[185764, 5074, 101, 0, 41, "Output",ExpressionUUID->"fa0bea71-615d-2d4d-8b39-59994ce24952"] +Cell[185779, 4900, 554, 18, 51, "Input",ExpressionUUID->"d15e5e59-9ad8-e247-a132-b43b2736212a"], +Cell[186336, 4920, 168, 2, 33, "Output",ExpressionUUID->"bfd3376a-9fbf-497a-9cb4-74ff6faaa712"] }, Open ]], Cell[CellGroupData[{ -Cell[185902, 5079, 144, 4, 69, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], -Cell[186049, 5085, 100, 0, 41, "Output",ExpressionUUID->"d3e4fece-e329-2041-9645-50ae8ca1c91c"] +Cell[186541, 4927, 647, 21, 51, "Input",ExpressionUUID->"1febc1d5-a69f-f14b-ba9a-c014b901cc8c"], +Cell[187191, 4950, 167, 2, 33, "Output",ExpressionUUID->"31b4b29d-2eb5-4449-873f-6f61f820957a"] }, Open ]], Cell[CellGroupData[{ -Cell[186186, 5090, 155, 4, 55, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], -Cell[186344, 5096, 101, 0, 41, "Output",ExpressionUUID->"8db6732d-a570-734c-94eb-cb35afdbb155"] +Cell[187395, 4957, 166, 4, 55, "Input",ExpressionUUID->"906db7f6-73f3-8a4e-88a4-7c75445a4f32"], +Cell[187564, 4963, 167, 2, 33, "Output",ExpressionUUID->"f835e9ff-77f0-4bc9-8d06-1c3fb714c65f"] }, Open ]], Cell[CellGroupData[{ -Cell[186482, 5101, 155, 4, 55, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], -Cell[186640, 5107, 101, 0, 41, "Output",ExpressionUUID->"06581e5e-cb29-0446-9bb7-b3bb2156a7c7"] +Cell[187768, 4970, 166, 4, 54, "Input",ExpressionUUID->"731b68b1-c44a-6c4a-a9f8-bc957ede9a68"], +Cell[187937, 4976, 166, 2, 33, "Output",ExpressionUUID->"4d0402b1-7ed3-4809-b410-8cb9108edb6a"] }, Open ]], Cell[CellGroupData[{ -Cell[186778, 5112, 6029, 184, 431, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], -Cell[192810, 5298, 102, 0, 41, "Output",ExpressionUUID->"000a1d2e-b429-4a45-b9a2-ccba4bf718eb"] +Cell[188140, 4983, 177, 4, 43, "Input",ExpressionUUID->"71af6813-eb8f-4944-8d03-7bcd77a7b4b4"], +Cell[188320, 4989, 167, 2, 33, "Output",ExpressionUUID->"b7b522d4-244a-4ac6-9c24-3f02f5439b1b"] }, Open ]], Cell[CellGroupData[{ -Cell[192949, 5303, 342, 8, 53, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], -Cell[193294, 5313, 342, 6, 26, "Message",ExpressionUUID->"b04cf5cc-6c74-f842-9fba-c737c46f5a7b"], -Cell[193639, 5321, 100, 0, 41, "Output",ExpressionUUID->"32922499-707a-964c-90f0-b2630d16ee29"] +Cell[188524, 4996, 177, 4, 43, "Input",ExpressionUUID->"28815b73-08dc-e64f-8823-2a55ad6b8ca8"], +Cell[188704, 5002, 167, 2, 33, "Output",ExpressionUUID->"c5a48ea8-aaef-4e02-807e-2f1330dc5ec7"] }, Open ]], Cell[CellGroupData[{ -Cell[193776, 5326, 6096, 186, 431, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], -Cell[199875, 5514, 103, 0, 41, "Output",ExpressionUUID->"17720629-0c4f-744e-a447-06cd4a4f0034"] +Cell[188908, 5009, 6051, 184, 183, "Input",ExpressionUUID->"137e8d46-8eff-3c47-bf8f-1350d0b8a0bb"], +Cell[194962, 5195, 167, 2, 33, "Output",ExpressionUUID->"9ee44f9b-5b5a-4824-89fa-84de7bf170c2"] }, Open ]], Cell[CellGroupData[{ -Cell[200015, 5519, 342, 8, 53, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], -Cell[200360, 5529, 342, 6, 26, "Message",ExpressionUUID->"6f900e99-9e38-fb4c-84fd-e99588ed1cc5"], -Cell[200705, 5537, 100, 0, 41, "Output",ExpressionUUID->"e5a93687-7c76-eb48-a79a-098cbe08792a"] +Cell[195166, 5202, 364, 8, 41, "Input",ExpressionUUID->"65edd566-4493-2440-9c51-9fca28ce324b"], +Cell[195533, 5212, 168, 2, 33, "Output",ExpressionUUID->"451eb074-2b7a-4d54-82fd-1d4e2df143b9"] }, Open ]], Cell[CellGroupData[{ -Cell[200842, 5542, 2637, 87, 215, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], -Cell[203482, 5631, 101, 0, 41, "Output",ExpressionUUID->"a53e2e6d-ca02-5d40-9088-48aa754351ec"] +Cell[195738, 5219, 6118, 186, 183, "Input",ExpressionUUID->"d808e80b-1928-8046-afec-31463f4946cd"], +Cell[201859, 5407, 168, 2, 33, "Output",ExpressionUUID->"d7c23da4-59c1-4173-b1a5-1e7b5bd4abcc"] }, Open ]], Cell[CellGroupData[{ -Cell[203620, 5636, 2577, 84, 215, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], -Cell[206200, 5722, 102, 0, 41, "Output",ExpressionUUID->"5ca04a2b-633e-1547-b10d-b4f00d8b3fcb"] +Cell[202064, 5414, 364, 8, 41, "Input",ExpressionUUID->"56b1717f-bc75-4047-98f0-7a0dede3f8a9"], +Cell[202431, 5424, 166, 2, 33, "Output",ExpressionUUID->"464aee4a-9652-48ff-88ce-9a05caffcf1e"] }, Open ]], Cell[CellGroupData[{ -Cell[206339, 5727, 3686, 117, 316, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], -Cell[210028, 5846, 102, 0, 41, "Output",ExpressionUUID->"af769b0f-0bd4-194f-bc02-90651fd30541"] +Cell[202634, 5431, 2659, 87, 107, "Input",ExpressionUUID->"fa1a14b9-08cc-2e4f-b2af-f74418e31aeb"], +Cell[205296, 5520, 169, 2, 33, "Output",ExpressionUUID->"df74ea0b-f6ee-4175-bd63-2a63a4e5682a"] }, Open ]], -Cell[210145, 5849, 138, 3, 36, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ -Cell[210308, 5856, 2054, 59, 116, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], -Cell[212365, 5917, 342, 6, 26, "Message",ExpressionUUID->"4105bae1-ec8c-fc46-bc8a-9d70c37ec32c"], -Cell[212710, 5925, 342, 6, 26, "Message",ExpressionUUID->"42c1a263-2456-664a-bb33-c5fe841cb412"], -Cell[213055, 5933, 100, 0, 41, "Output",ExpressionUUID->"1c49befc-babf-0743-9739-e64b536d1c51"] +Cell[205502, 5527, 2599, 84, 107, "Input",ExpressionUUID->"0285ae9a-ab88-cb46-ba56-91d5391478d5"], +Cell[208104, 5613, 167, 2, 33, "Output",ExpressionUUID->"f3f1a969-5cb4-416f-8db6-da57c3fadec9"] }, Open ]], Cell[CellGroupData[{ -Cell[213192, 5938, 2049, 58, 116, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], -Cell[215244, 5998, 342, 6, 26, "Message",ExpressionUUID->"be4d7bfb-c18e-564a-93ce-3f42607886e7"], -Cell[215589, 6006, 342, 6, 26, "Message",ExpressionUUID->"b768ca5f-6b93-1f43-97bf-08f74ea2facd"], -Cell[215934, 6014, 100, 0, 41, "Output",ExpressionUUID->"6af143a4-6ae5-fb45-8cd1-6940f2290ff9"] +Cell[208308, 5620, 3708, 117, 160, "Input",ExpressionUUID->"bea639c9-f172-ef4e-9454-9d4e027f5fa2"], +Cell[212019, 5739, 168, 2, 33, "Output",ExpressionUUID->"c275be10-dff7-498a-bc01-65780aa13d5c"] }, Open ]], +Cell[212202, 5744, 160, 3, 29, "Input",ExpressionUUID->"752e2dd5-bee6-2048-8697-fe84d79611fa"], Cell[CellGroupData[{ -Cell[216071, 6019, 1938, 53, 86, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], -Cell[218012, 6074, 342, 6, 26, "Message",ExpressionUUID->"d3cb6fbc-3803-0541-80d1-8cab47341c44"], -Cell[218357, 6082, 342, 6, 26, "Message",ExpressionUUID->"635ef23c-be29-f947-b49d-c0d2f59f2ba8"], -Cell[218702, 6090, 342, 6, 26, "Message",ExpressionUUID->"d8687e0f-2f42-0543-a749-78a1ff3c9572"], -Cell[219047, 6098, 407, 7, 26, "Message",ExpressionUUID->"b055d243-2255-1f40-80bd-55bc54524667"], -Cell[219457, 6107, 4518, 306, 232, "Graphics",ExpressionUUID->"8a200671-82f1-364d-8dba-8342607ad7b7"], -Cell[223978, 6415, 191, 5, 41, "Output",ExpressionUUID->"e49c1b8d-fabe-b944-a6dd-c578eb57eb6a"] +Cell[212387, 5751, 2073, 58, 99, "Input",ExpressionUUID->"f8b12d93-5bd9-8641-aa98-3d78ebb0f21b"], +Cell[214463, 5811, 580, 13, 27, "Message",ExpressionUUID->"725a15f6-3540-4cfc-be1c-17f41fbe9812"], +Cell[215046, 5826, 584, 13, 27, "Message",ExpressionUUID->"cb22a17c-a89e-465b-b73b-f13c92ea5b12"], +Cell[215633, 5841, 585, 13, 27, "Message",ExpressionUUID->"ed9aef12-f086-4c18-9141-93e76716e6d1"], +Cell[216221, 5856, 468, 11, 26, "Message",ExpressionUUID->"1a00fea7-ea30-4c22-a711-28f6daee0f51"], +Cell[216692, 5869, 165, 2, 33, "Output",ExpressionUUID->"3770d99a-9a1c-4990-bb40-aefa30bc28ec"] }, Open ]], Cell[CellGroupData[{ -Cell[224206, 6425, 2094, 60, 116, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], -Cell[226303, 6487, 342, 6, 26, "Message",ExpressionUUID->"9f5fa53c-8bea-a349-9c29-e4614f56cc98"], -Cell[226648, 6495, 342, 6, 26, "Message",ExpressionUUID->"a2ecd22c-b766-5347-9e03-9d459620be75"], -Cell[226993, 6503, 342, 6, 26, "Message",ExpressionUUID->"45a49c2b-98f0-ca4e-ab79-bb0334e26ffd"], -Cell[227338, 6511, 407, 7, 26, "Message",ExpressionUUID->"258782e2-0da4-1143-8b36-76da0d2ac6df"], -Cell[227748, 6520, 10253, 391, 232, 4113, 287, "GraphicsData", "PostScript", "Graphics",ExpressionUUID->"06204099-db57-8e4e-bcc4-fa1ae37c0063"], -Cell[238004, 6913, 191, 5, 41, "Output",ExpressionUUID->"8efa1c1f-552a-d042-8a05-04dec8739bf5"] +Cell[216894, 5876, 2070, 58, 99, "Input",ExpressionUUID->"cbefe077-df46-c24c-b854-69741ca50d38"], +Cell[218967, 5936, 580, 13, 27, "Message",ExpressionUUID->"41521927-570c-42b3-8448-1f30671c5845"], +Cell[219550, 5951, 584, 13, 27, "Message",ExpressionUUID->"02a5dd61-93a4-45a6-9864-b892c7c793ae"], +Cell[220137, 5966, 587, 13, 27, "Message",ExpressionUUID->"740dcc1b-abfa-48fd-af93-2e6f26bdda07"], +Cell[220727, 5981, 468, 11, 26, "Message",ExpressionUUID->"e087c9da-596e-4b69-8d09-5f325448d0ac"], +Cell[221198, 5994, 165, 2, 33, "Output",ExpressionUUID->"adaee3eb-f1cd-41d2-a2d6-ddf8dd97bad7"] }, Open ]], -Cell[238210, 6921, 2455, 69, 140, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], -Cell[240668, 6992, 209, 5, 36, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], Cell[CellGroupData[{ -Cell[240902, 7001, 215, 7, 61, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], -Cell[241120, 7010, 100, 0, 41, "Output",ExpressionUUID->"38d25667-6c7c-094b-b4ad-180d70233424"] +Cell[221400, 6001, 1957, 52, 70, "Input",ExpressionUUID->"b9a7e2d9-7e48-cb4c-89bc-12d8b19f0936"], +Cell[223360, 6055, 20391, 382, 236, "Output",ExpressionUUID->"3558119f-de61-481a-bd62-cade371e4f86"] }, Open ]], Cell[CellGroupData[{ -Cell[241257, 7015, 1814, 53, 116, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], -Cell[243074, 7070, 342, 6, 26, "Message",ExpressionUUID->"12d513db-13cc-bc48-b9a3-22b17d8aeb9a"], -Cell[243419, 7078, 342, 6, 26, "Message",ExpressionUUID->"05911c33-7605-8b49-a7ba-7fc8c8f30741"], -Cell[243764, 7086, 342, 6, 26, "Message",ExpressionUUID->"2192e048-2875-9f4a-aa0c-9cbbd447dfe1"], -Cell[244109, 7094, 407, 7, 26, "Message",ExpressionUUID->"b6990f5f-359f-464b-ac16-44cdfeae3c8e"], -Cell[244519, 7103, 4480, 304, 232, "Graphics",ExpressionUUID->"899e43aa-c372-6647-a3e4-4952f308ab17"], -Cell[249002, 7409, 191, 5, 41, "Output",ExpressionUUID->"65116f16-0f68-7e4d-af2e-baecb9a57d9b"] +Cell[243788, 6442, 2113, 59, 99, "Input",ExpressionUUID->"4b73592e-b155-8f42-b33d-562f8b3faecd"], +Cell[245904, 6503, 517, 12, 38, "Message",ExpressionUUID->"7cf26463-2ddd-48da-a231-8ea90b9701ed"], +Cell[246424, 6517, 518, 12, 38, "Message",ExpressionUUID->"6bca4345-da61-4fbc-8fa7-e3ba94ca5ffa"], +Cell[246945, 6531, 525, 12, 38, "Message",ExpressionUUID->"8ea79e0d-e2e6-48d5-a38c-9cde182c8703"], +Cell[247473, 6545, 469, 11, 26, "Message",ExpressionUUID->"d34e984c-f2fe-4f79-8bb2-d79503da68e6"], +Cell[247945, 6558, 25639, 467, 234, "Output",ExpressionUUID->"59209cc5-e9f9-4ed2-9ce8-96ed431496a3"] }, Open ]], Cell[CellGroupData[{ -Cell[249230, 7419, 1590, 47, 86, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], -Cell[250823, 7468, 342, 6, 26, "Message",ExpressionUUID->"d7dfab56-fefd-0149-8a26-6ee16f94ab37"], -Cell[251168, 7476, 101, 0, 41, "Output",ExpressionUUID->"43ddf880-80a2-b142-8665-3b95395a9831"] +Cell[273621, 7030, 2477, 69, 69, "Input",ExpressionUUID->"d9c090bb-80bf-6c4b-b8e9-5e6c7b4b5678"], +Cell[276101, 7101, 9518, 222, 239, "Output",ExpressionUUID->"1b69cc14-8952-4ee1-9ead-1258572fe618"] }, Open ]], Cell[CellGroupData[{ -Cell[251306, 7481, 2247, 64, 81, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], -Cell[253556, 7547, 342, 6, 26, "Message",ExpressionUUID->"56921c73-2b67-0e4a-9808-5f61de992c7e"], -Cell[253901, 7555, 342, 6, 26, "Message",ExpressionUUID->"8ae663ad-3729-254b-9ec7-7f5d00ef81af"], -Cell[254246, 7563, 103, 0, 41, "Output",ExpressionUUID->"42e3f6c5-e95f-4040-9e12-cbd48f821f10"] +Cell[285656, 7328, 228, 4, 29, "Input",ExpressionUUID->"cd9a8165-891b-9245-aca1-3f60fcfd9a79"], +Cell[285887, 7334, 32047, 599, 234, "Output",ExpressionUUID->"169ff6c8-8f75-45a0-86e0-8d73d6d031ab"] }, Open ]], Cell[CellGroupData[{ -Cell[254386, 7568, 2219, 64, 81, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], -Cell[256608, 7634, 342, 6, 26, "Message",ExpressionUUID->"1795c3b9-0182-224c-b986-6414d6712c04"], -Cell[256953, 7642, 342, 6, 26, "Message",ExpressionUUID->"c3b31753-a67f-9b45-b822-068e1df11f68"], -Cell[257298, 7650, 100, 0, 41, "Output",ExpressionUUID->"7f3b68f0-36cd-5749-996b-97ffcb02c6cf"] +Cell[317971, 7938, 234, 6, 47, "Input",ExpressionUUID->"c213919d-017d-a948-8e46-fe19384187c3"], +Cell[318208, 7946, 166, 2, 33, "Output",ExpressionUUID->"f095c77f-7ab2-47cb-bc92-072f209b9ed6"] }, Open ]], Cell[CellGroupData[{ -Cell[257435, 7655, 2221, 64, 81, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], -Cell[259659, 7721, 342, 6, 26, "Message",ExpressionUUID->"32db1bf6-ba11-cb4a-955a-52e174a44e5f"], -Cell[260004, 7729, 342, 6, 26, "Message",ExpressionUUID->"4e2b22f2-1724-7649-93fc-33cd27bb415e"], -Cell[260349, 7737, 101, 0, 41, "Output",ExpressionUUID->"34543184-0f68-7449-9af8-306cfc525771"] +Cell[318411, 7953, 1833, 52, 99, "Input",ExpressionUUID->"3764dfb4-9656-4349-b0a1-77ebd1a3e048"], +Cell[320247, 8007, 522, 12, 38, "Message",ExpressionUUID->"d7c5e15d-8bfa-4a14-837c-6121011d8006"], +Cell[320772, 8021, 527, 12, 38, "Message",ExpressionUUID->"4d28bc1a-0ebc-454e-849d-bd7d8c2b552f"], +Cell[321302, 8035, 528, 12, 38, "Message",ExpressionUUID->"1d6c1e6e-7a70-4b30-b6fe-0caf8aa173ec"], +Cell[321833, 8049, 469, 11, 26, "Message",ExpressionUUID->"37c1fe75-4681-4a7f-816e-b52faed9e022"], +Cell[322305, 8062, 28617, 515, 232, "Output",ExpressionUUID->"5f35bf86-50aa-4fe1-94e5-c5d31d26940c"] }, Open ]], Cell[CellGroupData[{ -Cell[260487, 7742, 215, 6, 60, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], -Cell[260705, 7750, 104, 0, 41, "Output",ExpressionUUID->"ca67de9f-825c-f641-9d0a-229375d081b1"] +Cell[350959, 8582, 1616, 48, 71, "Input",ExpressionUUID->"7899a8a7-561e-a946-a6c9-870ef14ce01b"], +Cell[352578, 8632, 705, 15, 45, "Message",ExpressionUUID->"b4a29c52-b2aa-4cee-9cc1-aca69f1d61e3"], +Cell[353286, 8649, 703, 15, 45, "Message",ExpressionUUID->"bee68e55-5fe5-43bc-9333-e1f2175dbfbc"], +Cell[353992, 8666, 705, 15, 45, "Message",ExpressionUUID->"b8c67ce0-c1d4-47c5-b1ff-bb163a91a5ee"], +Cell[354700, 8683, 473, 11, 26, "Message",ExpressionUUID->"8cbcd7cf-8bd2-47ba-af16-8f33f79012c0"], +Cell[355176, 8696, 169, 3, 33, "Output",ExpressionUUID->"d5774c3e-0213-4907-96c5-17a7baf56645"] }, Open ]], -Cell[260824, 7753, 247, 5, 36, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ -Cell[261096, 7762, 532, 18, 66, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], -Cell[261631, 7782, 100, 0, 41, "Output",ExpressionUUID->"9cf6d8e0-9f1b-734e-b42f-ef77566b5546"] +Cell[355382, 8704, 2270, 64, 64, "Input",ExpressionUUID->"6fd9b05c-8008-7b42-b1b4-8e83e9537fdc"], +Cell[357655, 8770, 583, 13, 27, "Message",ExpressionUUID->"942cfce7-cc18-48cf-a5c7-68b89f19a2c8"], +Cell[358241, 8785, 585, 13, 27, "Message",ExpressionUUID->"62b41d40-5d85-4171-8519-a08b49816c07"], +Cell[358829, 8800, 590, 13, 27, "Message",ExpressionUUID->"a7bf4c84-c5d6-44a9-9883-e44b5686c002"], +Cell[359422, 8815, 471, 11, 26, "Message",ExpressionUUID->"5485ac45-eff3-41fc-a9b1-80da10b3acbc"], +Cell[359896, 8828, 171, 3, 33, "Output",ExpressionUUID->"2219005a-6edc-453b-ac8b-311d508254b7"] }, Open ]], Cell[CellGroupData[{ -Cell[261768, 7787, 144, 4, 71, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], -Cell[261915, 7793, 100, 0, 41, "Output",ExpressionUUID->"c5ed49bf-8480-c447-a0ac-ef7c5fcad104"] +Cell[360104, 8836, 2231, 63, 64, "Input",ExpressionUUID->"ccaee6a3-c390-0444-bf16-3471356a3614"], +Cell[362338, 8901, 583, 13, 27, "Message",ExpressionUUID->"4e05e032-4c40-4514-b7a3-2dd1eb41053a"], +Cell[362924, 8916, 585, 13, 27, "Message",ExpressionUUID->"696dfee8-46b3-48de-84a7-e56162cb1f93"], +Cell[363512, 8931, 587, 13, 27, "Message",ExpressionUUID->"849bfae8-31fb-4dd3-972d-00d72d8fb551"], +Cell[364102, 8946, 471, 11, 26, "Message",ExpressionUUID->"deba9a21-6602-4462-86d8-410f881e1f1f"], +Cell[364576, 8959, 171, 3, 33, "Output",ExpressionUUID->"234a3c41-319b-4e11-9813-85ddeb29fdd6"] }, Open ]], Cell[CellGroupData[{ -Cell[262052, 7798, 155, 4, 109, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], -Cell[262210, 7804, 100, 0, 109, "Output",ExpressionUUID->"8a551ee1-59e8-d74e-b2fe-ad1527aaef53"] +Cell[364784, 8967, 2233, 63, 64, "Input",ExpressionUUID->"ca0cc669-d7ba-5b4a-b58b-286954db37c5"], +Cell[367020, 9032, 583, 13, 27, "Message",ExpressionUUID->"d77598c3-fe82-4015-ab8f-40ea9bc6db2f"], +Cell[367606, 9047, 585, 13, 27, "Message",ExpressionUUID->"d75b3189-478e-4416-8eec-db5ebd911ed5"], +Cell[368194, 9062, 590, 13, 27, "Message",ExpressionUUID->"338fe361-bbf3-4a81-afd3-181570e5c1b4"], +Cell[368787, 9077, 471, 11, 26, "Message",ExpressionUUID->"59fea593-4a05-41c3-bc0e-391e8e696e65"], +Cell[369261, 9090, 169, 3, 33, "Output",ExpressionUUID->"aefd43d8-ec90-41dd-bc0e-b9d40f287e1e"] }, Open ]], Cell[CellGroupData[{ -Cell[262347, 7809, 6029, 184, 109, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], -Cell[268379, 7995, 102, 0, 109, "Output",ExpressionUUID->"6efee3b5-10d6-d642-9cf2-dd8d3fe591e1"] +Cell[369467, 9098, 238, 6, 46, "Input",ExpressionUUID->"7ec678fd-8398-414a-aeba-20e078d734cd"], +Cell[369708, 9106, 172, 3, 33, "Output",ExpressionUUID->"dcb80a5b-deba-426e-a850-61125a787fee"] }, Open ]], +Cell[369895, 9112, 273, 6, 29, "Input",ExpressionUUID->"ca329276-48d7-8943-8408-dd2997d3499c"], Cell[CellGroupData[{ -Cell[268518, 8000, 342, 8, 53, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], -Cell[268863, 8010, 342, 6, 26, "Message",ExpressionUUID->"def6b331-c871-b04d-a16e-4fc00b03d009"], -Cell[269208, 8018, 99, 0, 41, "Output",ExpressionUUID->"332f8da7-4eec-ed47-b124-edf7e2bf43d7"] +Cell[370193, 9122, 558, 19, 51, "Input",ExpressionUUID->"681c316f-cd82-ae4b-824f-5eb2b3081f6d"], +Cell[370754, 9143, 170, 3, 33, "Output",ExpressionUUID->"bb467a78-d345-498c-b4a9-cff617e9d33c"] }, Open ]], Cell[CellGroupData[{ -Cell[269344, 8023, 6096, 186, 431, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], -Cell[275443, 8211, 102, 0, 41, "Output",ExpressionUUID->"0f048ce5-7f5e-0a41-a634-6908b289becd"] +Cell[370961, 9151, 170, 5, 55, "Input",ExpressionUUID->"11e77a67-96b2-a645-89cd-559587f30b91"], +Cell[371134, 9158, 172, 3, 33, "Output",ExpressionUUID->"1a1af0e3-0575-4dad-8340-47745fd660b1"] }, Open ]], Cell[CellGroupData[{ -Cell[275582, 8216, 342, 8, 53, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], -Cell[275927, 8226, 342, 6, 26, "Message",ExpressionUUID->"c6c8676e-4601-144e-b83c-769e22949175"], -Cell[276272, 8234, 100, 0, 41, "Output",ExpressionUUID->"bd9f2dfb-0880-624c-8a61-fa3104084faf"] +Cell[371343, 9166, 181, 5, 43, "Input",ExpressionUUID->"3c5f43e9-afc4-be40-8f37-0116656ecd38"], +Cell[371527, 9173, 171, 3, 33, "Output",ExpressionUUID->"1fb13ad2-a2a6-4f3e-a047-6068f0f85699"] }, Open ]], Cell[CellGroupData[{ -Cell[276409, 8239, 2637, 87, 215, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], -Cell[279049, 8328, 101, 0, 41, "Output",ExpressionUUID->"6edb9332-f61a-1c4a-ad7b-c9d3e77138f1"] +Cell[371735, 9181, 6055, 185, 183, "Input",ExpressionUUID->"f07a8476-d7bc-1049-82a6-7cf06f61e28f"], +Cell[377793, 9368, 172, 3, 33, "Output",ExpressionUUID->"e74951b8-2072-4a2b-8645-389ed0b20278"] }, Open ]], Cell[CellGroupData[{ -Cell[279187, 8333, 2577, 84, 215, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], -Cell[281767, 8419, 102, 0, 41, "Output",ExpressionUUID->"5f6645b8-6ac5-6148-a1e1-5f2ee5f21bdd"] +Cell[378002, 9376, 368, 9, 41, "Input",ExpressionUUID->"b88b1a94-22d7-2843-88e3-f607b95c8af9"], +Cell[378373, 9387, 170, 3, 33, "Output",ExpressionUUID->"12bea102-f1d7-4052-9168-2fe42cfd4cdd"] }, Open ]], Cell[CellGroupData[{ -Cell[281906, 8424, 3686, 117, 316, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], -Cell[285595, 8543, 102, 0, 41, "Output",ExpressionUUID->"9de56db9-9853-1748-aca6-5103b9dea11d"] +Cell[378580, 9395, 6122, 187, 183, "Input",ExpressionUUID->"9d771aab-c0b4-f24c-9b53-9472e00c4d82"], +Cell[384705, 9584, 170, 3, 33, "Output",ExpressionUUID->"7e666f7e-3106-4e85-8a8b-939f1e43c039"] }, Open ]], Cell[CellGroupData[{ -Cell[285734, 8548, 2052, 59, 116, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], -Cell[287789, 8609, 342, 6, 26, "Message",ExpressionUUID->"7fd60dea-f794-4744-8801-bfb1a50a0e07"], -Cell[288134, 8617, 342, 6, 26, "Message",ExpressionUUID->"0b8c0718-41d2-4542-8afe-212a15805650"], -Cell[288479, 8625, 101, 0, 41, "Output",ExpressionUUID->"a8a97847-bb08-1e4d-8ab6-1eb11a1cda8f"] +Cell[384912, 9592, 368, 9, 41, "Input",ExpressionUUID->"47e2a8e8-6af3-374f-9eea-9c2b6faaaf4a"], +Cell[385283, 9603, 170, 3, 33, "Output",ExpressionUUID->"4b5a6e2e-9dbf-49c2-a73f-0e5df8601a67"] }, Open ]], Cell[CellGroupData[{ -Cell[288617, 8630, 2054, 59, 116, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], -Cell[290674, 8691, 342, 6, 26, "Message",ExpressionUUID->"b6f0ccc2-ff83-124b-a341-e143319c7670"], -Cell[291019, 8699, 342, 6, 26, "Message",ExpressionUUID->"d4b50e17-5ee4-384c-b81f-c2a36a80320e"], -Cell[291364, 8707, 100, 0, 41, "Output",ExpressionUUID->"f80834f1-cc9f-1c44-a97c-64c50ba97b67"] +Cell[385490, 9611, 2663, 88, 107, "Input",ExpressionUUID->"d8757b1c-19d9-d548-8de4-6b0985b9b3bc"], +Cell[388156, 9701, 173, 3, 33, "Output",ExpressionUUID->"6126ca83-a6e6-471b-b472-8adf8657e473"] }, Open ]], Cell[CellGroupData[{ -Cell[291501, 8712, 2030, 55, 63, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], -Cell[293534, 8769, 342, 6, 26, "Message",ExpressionUUID->"7797a546-4085-124a-83da-5f3c472cdc4c"], -Cell[293879, 8777, 342, 6, 26, "Message",ExpressionUUID->"bf75ebeb-fc95-1d45-8487-ceed40ec633c"], -Cell[294224, 8785, 342, 6, 26, "Message",ExpressionUUID->"ca7472ca-7b27-a54a-84a1-e603fa592207"], -Cell[294569, 8793, 407, 7, 26, "Message",ExpressionUUID->"86b3b7d9-f0e9-0a4b-9079-b341ca597ab4"], -Cell[294979, 8802, 9432, 438, 232, "Graphics",ExpressionUUID->"f3c0c3aa-fd64-8e41-bc0a-ae36b33a37ec"], -Cell[304414, 9242, 191, 5, 109, "Output",ExpressionUUID->"23cfff6f-2c67-ce46-9cc6-49e8ffb5e8c8"] +Cell[388366, 9709, 2603, 85, 107, "Input",ExpressionUUID->"58b59182-fae5-674d-b49e-4868d83e9702"], +Cell[390972, 9796, 173, 3, 33, "Output",ExpressionUUID->"2c22c5d9-6cc2-4b2a-be43-3a2b1b3ea199"] }, Open ]], Cell[CellGroupData[{ -Cell[304642, 9252, 2118, 60, 109, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], -Cell[306763, 9314, 342, 6, 109, "Message",ExpressionUUID->"b9265795-17b8-4e47-bd29-fee31586537e"], -Cell[307108, 9322, 342, 6, 26, "Message",ExpressionUUID->"072fb53f-7116-0f41-a298-6891351a3192"], -Cell[307453, 9330, 342, 6, 26, "Message",ExpressionUUID->"7f686ca7-db7f-0b40-bbd8-c08a80d2c198"], -Cell[307798, 9338, 407, 7, 26, "Message",ExpressionUUID->"3aaeaf29-5b60-ab47-b674-24d071c511f8"], -Cell[308208, 9347, 8546, 368, 232, "Graphics",ExpressionUUID->"fb5ee406-78d5-a849-9c81-3ea500ee883f"], -Cell[316757, 9717, 191, 5, 41, "Output",ExpressionUUID->"637816d3-cc2d-bb4a-991c-87bc9c72594a"] +Cell[391182, 9804, 3712, 118, 160, "Input",ExpressionUUID->"5caf1614-7e5c-9940-98cd-9460e2c074b2"], +Cell[394897, 9924, 172, 3, 33, "Output",ExpressionUUID->"19d176ab-5fdc-4589-9387-baaf10590448"] }, Open ]], -Cell[316963, 9725, 209, 5, 36, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], Cell[CellGroupData[{ -Cell[317197, 9734, 1590, 47, 86, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], -Cell[318790, 9783, 342, 6, 26, "Message",ExpressionUUID->"52cff8eb-0c77-c944-a54f-e282b00ce766"], -Cell[319135, 9791, 101, 0, 41, "Output",ExpressionUUID->"51c9eb8e-8429-9440-b4d1-8a2a914a816b"] +Cell[395106, 9932, 2075, 59, 99, "Input",ExpressionUUID->"db0784f6-51d0-fd44-b0e8-05d6af1a6e52"], +Cell[397184, 9993, 583, 13, 27, "Message",ExpressionUUID->"ebb280e0-a734-46ce-a65e-38470603f9a3"], +Cell[397770, 10008, 585, 13, 27, "Message",ExpressionUUID->"ef4ebf34-c499-4216-bfab-d396a0722711"], +Cell[398358, 10023, 589, 13, 27, "Message",ExpressionUUID->"57df9818-4d73-4a6a-8e26-62f433da44c5"], +Cell[398950, 10038, 473, 11, 26, "Message",ExpressionUUID->"3cc9c56e-249f-4564-9189-47562795f8c8"], +Cell[399426, 10051, 170, 3, 33, "Output",ExpressionUUID->"96748466-65e7-41d8-abfb-9b96c055642a"] }, Open ]], Cell[CellGroupData[{ -Cell[319273, 9796, 2251, 64, 81, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], -Cell[321527, 9862, 342, 6, 26, "Message",ExpressionUUID->"cb5a1193-7562-6446-a279-d9f6295d156e"], -Cell[321872, 9870, 342, 6, 26, "Message",ExpressionUUID->"566b0ad4-7f4e-b04f-8294-646ce1913fac"], -Cell[322217, 9878, 101, 0, 41, "Output",ExpressionUUID->"9a717f6e-3c47-7d43-93ae-4bf4814b6aa7"] +Cell[399633, 10059, 2077, 59, 99, "Input",ExpressionUUID->"7ca6aa7a-7318-6f41-95dc-f69c33a31448"], +Cell[401713, 10120, 583, 13, 27, "Message",ExpressionUUID->"c9e9a9e2-a746-4ba6-bde4-db8e78ece41d"], +Cell[402299, 10135, 584, 13, 27, "Message",ExpressionUUID->"ad0fbcf9-ad6f-4fb7-b654-45ccd6958da6"], +Cell[402886, 10150, 589, 13, 27, "Message",ExpressionUUID->"ba98fa87-abc4-466e-843e-5a74d3022f61"], +Cell[403478, 10165, 471, 11, 26, "Message",ExpressionUUID->"92a511ed-a706-4538-a015-5e2ea09272a0"], +Cell[403952, 10178, 173, 3, 33, "Output",ExpressionUUID->"4b5c9290-2807-4197-bb8b-0a48e456960e"] }, Open ]], Cell[CellGroupData[{ -Cell[322355, 9883, 2220, 64, 81, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], -Cell[324578, 9949, 342, 6, 26, "Message",ExpressionUUID->"4cd45900-7eb0-6b4b-830a-a339e8117392"], -Cell[324923, 9957, 342, 6, 26, "Message",ExpressionUUID->"0ddcf174-f6c5-2546-b6d3-f17f46d6e8a3"], -Cell[325268, 9965, 101, 0, 41, "Output",ExpressionUUID->"3e9bc444-276c-294e-8c8d-12ef37255e0d"] +Cell[404162, 10186, 2053, 55, 53, "Input",ExpressionUUID->"611f92ea-b199-2643-9788-194fae57c34e"], +Cell[406218, 10243, 20371, 383, 236, "Output",ExpressionUUID->"80e0dbd2-1ada-4397-8c2b-020f67804198"] }, Open ]], Cell[CellGroupData[{ -Cell[325406, 9970, 2223, 64, 81, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], -Cell[327632, 10036, 342, 6, 26, "Message",ExpressionUUID->"f702ec8b-e3a1-2f4f-bfef-4278a2688935"], -Cell[327977, 10044, 342, 6, 26, "Message",ExpressionUUID->"61220452-df6a-154e-8b5c-fecd0ab287a1"], -Cell[328322, 10052, 101, 0, 41, "Output",ExpressionUUID->"d8ce023f-3349-8348-844a-2526397581d1"] +Cell[426626, 10631, 2141, 60, 99, "Input",ExpressionUUID->"f4c3d53a-1214-a145-beb0-494cdae35e56"], +Cell[428770, 10693, 517, 12, 38, "Message",ExpressionUUID->"cd8a28fe-5a32-4aef-b723-a3e3e9c5e31c"], +Cell[429290, 10707, 520, 12, 38, "Message",ExpressionUUID->"3e657710-d6d4-4ff7-abe4-38826ed1c7ae"], +Cell[429813, 10721, 521, 12, 38, "Message",ExpressionUUID->"05b68f00-16a8-4ab8-bc33-d7757aca078d"], +Cell[430337, 10735, 473, 11, 26, "Message",ExpressionUUID->"e5117841-ad95-4655-a29e-20c7972218e9"], +Cell[430813, 10748, 27001, 492, 232, "Output",ExpressionUUID->"9ce652f2-6bed-4b8b-9f51-557e8a96965c"] }, Open ]], Cell[CellGroupData[{ -Cell[328460, 10057, 215, 6, 60, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], -Cell[328678, 10065, 102, 0, 41, "Output",ExpressionUUID->"b33ad8ed-51f6-a045-9dc5-33a5696fd31e"] +Cell[457851, 11245, 232, 5, 29, "Input",ExpressionUUID->"2335a158-7588-4c40-bdb5-53b7ef04b97c"], +Cell[458086, 11252, 33409, 624, 232, "Output",ExpressionUUID->"3dfa03de-536c-457f-85a5-1dd047df89ec"] }, Open ]], -Cell[328795, 10068, 247, 5, 36, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ -Cell[329067, 10077, 532, 18, 66, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], -Cell[329602, 10097, 101, 0, 41, "Output",ExpressionUUID->"f1ecc2fd-4cd6-5249-8977-1cc4a714ca85"] +Cell[491532, 11881, 1616, 48, 71, "Input",ExpressionUUID->"01995149-3665-fe4e-b326-b20429031afd"], +Cell[493151, 11931, 703, 15, 45, "Message",ExpressionUUID->"174557d7-ad01-42ae-a139-136e631ad858"], +Cell[493857, 11948, 703, 15, 45, "Message",ExpressionUUID->"3035b7ac-838d-4528-9e90-07973bc81102"], +Cell[494563, 11965, 703, 15, 45, "Message",ExpressionUUID->"0758b314-0868-4bc0-86d5-c91b90e4d028"], +Cell[495269, 11982, 471, 11, 26, "Message",ExpressionUUID->"609b02c3-7436-4312-b30b-17e14a94154b"], +Cell[495743, 11995, 169, 3, 33, "Output",ExpressionUUID->"bca0f5be-1386-418b-b65f-84f22242aa31"] }, Open ]], Cell[CellGroupData[{ -Cell[329740, 10102, 144, 4, 71, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], -Cell[329887, 10108, 101, 0, 41, "Output",ExpressionUUID->"0b6f2dc1-dd2d-e341-8cc9-32a5777d3dad"] +Cell[495949, 12003, 2274, 64, 64, "Input",ExpressionUUID->"11b1e372-f457-5a4d-bcee-062a3c04ed96"], +Cell[498226, 12069, 585, 13, 27, "Message",ExpressionUUID->"4aaa7b61-6aca-4e8e-8d8a-0dc84a94073d"], +Cell[498814, 12084, 585, 13, 27, "Message",ExpressionUUID->"94e463fd-8dfb-4e79-9d08-866e3ab71d93"], +Cell[499402, 12099, 589, 13, 27, "Message",ExpressionUUID->"259c1a28-fd7c-4c19-af8d-3e1d5a1f518c"], +Cell[499994, 12114, 471, 11, 26, "Message",ExpressionUUID->"e5ff499a-0ff2-4247-b28c-8b04abbbdb73"], +Cell[500468, 12127, 172, 3, 33, "Output",ExpressionUUID->"109bb898-4322-45af-ad19-477cc55f3e93"] }, Open ]], Cell[CellGroupData[{ -Cell[330025, 10113, 155, 4, 55, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], -Cell[330183, 10119, 100, 0, 109, "Output",ExpressionUUID->"b4c0b4dc-7ff0-3246-8607-df7a1b97c52c"] +Cell[500677, 12135, 2232, 63, 64, "Input",ExpressionUUID->"8cb4e371-90a5-d347-adec-3382e7679ba8"], +Cell[502912, 12200, 583, 13, 27, "Message",ExpressionUUID->"d12285cf-68d0-4f32-9007-d1abd37c95ed"], +Cell[503498, 12215, 587, 13, 27, "Message",ExpressionUUID->"d1f9539e-d5b4-4868-ac14-63b053cf8450"], +Cell[504088, 12230, 589, 13, 27, "Message",ExpressionUUID->"bfce10aa-6d74-42a3-9a07-82487b5023fa"], +Cell[504680, 12245, 471, 11, 26, "Message",ExpressionUUID->"8dcece3a-589c-4612-b3ec-27aab465e012"], +Cell[505154, 12258, 172, 3, 33, "Output",ExpressionUUID->"1cb9f09e-0e92-4aac-95f2-ecf0618fc6f1"] }, Open ]], Cell[CellGroupData[{ -Cell[330320, 10124, 6029, 184, 109, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], -Cell[336352, 10310, 102, 0, 109, "Output",ExpressionUUID->"c326471e-e866-ed4e-b72f-a7b5b42c78d0"] +Cell[505363, 12266, 2235, 63, 64, "Input",ExpressionUUID->"732b358a-c98a-0347-8b16-2462b23d6249"], +Cell[507601, 12331, 582, 13, 27, "Message",ExpressionUUID->"31bba6ee-9de3-4658-a7fe-36bfe48882f2"], +Cell[508186, 12346, 585, 13, 27, "Message",ExpressionUUID->"002ecfd1-faac-4cab-8528-b90e868459f7"], +Cell[508774, 12361, 589, 13, 27, "Message",ExpressionUUID->"c087a887-3088-40d7-bdc1-378a2930e78c"], +Cell[509366, 12376, 471, 11, 26, "Message",ExpressionUUID->"1983b15a-69ee-4188-854b-6797c34d2cb7"], +Cell[509840, 12389, 170, 3, 33, "Output",ExpressionUUID->"3c03ea08-6ac9-4c2c-939f-098b06ac09df"] }, Open ]], Cell[CellGroupData[{ -Cell[336491, 10315, 342, 8, 109, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], -Cell[336836, 10325, 342, 6, 109, "Message",ExpressionUUID->"4870a5d4-b6fc-9044-ae55-fcbd2b9d41eb"], -Cell[337181, 10333, 100, 0, 41, "Output",ExpressionUUID->"4263cd25-e2b6-5c4b-8834-28c6ca12b863"] +Cell[510047, 12397, 238, 6, 46, "Input",ExpressionUUID->"3d20548b-905d-0343-8df1-168ec8f367e1"], +Cell[510288, 12405, 170, 3, 33, "Output",ExpressionUUID->"f4bc35aa-e89e-4f12-80af-d45f54fa302b"] }, Open ]], +Cell[510473, 12411, 273, 6, 29, "Input",ExpressionUUID->"ca34450b-ff3b-f34a-a2ed-e661a25a7ba1"], Cell[CellGroupData[{ -Cell[337318, 10338, 6096, 186, 431, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], -Cell[343417, 10526, 102, 0, 41, "Output",ExpressionUUID->"ad614c41-0fc1-a542-b7a8-b8207b3c6926"] +Cell[510771, 12421, 558, 19, 51, "Input",ExpressionUUID->"601c24ee-3f7b-c74d-891b-10a6d009e34b"], +Cell[511332, 12442, 169, 3, 33, "Output",ExpressionUUID->"a8962665-46b6-435a-bc6d-5604af67ec12"] }, Open ]], Cell[CellGroupData[{ -Cell[343556, 10531, 342, 8, 53, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], -Cell[343901, 10541, 342, 6, 26, "Message",ExpressionUUID->"d6f4e6b1-3d45-7649-b7dd-944c4a1de3e4"], -Cell[344246, 10549, 99, 0, 41, "Output",ExpressionUUID->"27fdf87b-577e-d74b-99f1-6a0486be19bc"] +Cell[511538, 12450, 170, 5, 55, "Input",ExpressionUUID->"05949206-8ee0-5646-bb01-e9142212274d"], +Cell[511711, 12457, 172, 3, 33, "Output",ExpressionUUID->"b4176540-d2ef-465d-9a3e-c749035de883"] }, Open ]], Cell[CellGroupData[{ -Cell[344382, 10554, 2637, 87, 215, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], -Cell[347022, 10643, 101, 0, 41, "Output",ExpressionUUID->"c5362b47-cc2f-ba44-9fef-3c67d726a6cb"] +Cell[511920, 12465, 181, 5, 43, "Input",ExpressionUUID->"25a02cc2-cb9a-bc4b-93f0-a7873f982a23"], +Cell[512104, 12472, 170, 3, 33, "Output",ExpressionUUID->"24c2e1c2-8718-44ac-af5a-1ee4b786db6f"] }, Open ]], Cell[CellGroupData[{ -Cell[347160, 10648, 2577, 84, 215, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], -Cell[349740, 10734, 102, 0, 41, "Output",ExpressionUUID->"677f20c9-f9ab-dc41-bd69-627a1665b370"] +Cell[512311, 12480, 6055, 185, 183, "Input",ExpressionUUID->"df51ca6a-83a1-6340-b13c-0185de64c37f"], +Cell[518369, 12667, 175, 3, 33, "Output",ExpressionUUID->"3c73ed62-f7e6-48f4-9458-53a775a74ba7"] }, Open ]], Cell[CellGroupData[{ -Cell[349879, 10739, 3686, 117, 316, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], -Cell[353568, 10858, 102, 0, 41, "Output",ExpressionUUID->"eb28891c-1746-424b-aa98-1266448f9a3e"] +Cell[518581, 12675, 368, 9, 41, "Input",ExpressionUUID->"731f0e35-7798-8b45-a769-075ac4b3983f"], +Cell[518952, 12686, 170, 3, 33, "Output",ExpressionUUID->"0e36d606-4de8-4b5a-ad6a-dddaf29376b7"] }, Open ]], Cell[CellGroupData[{ -Cell[353707, 10863, 2054, 59, 116, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], -Cell[355764, 10924, 342, 6, 26, "Message",ExpressionUUID->"b82c1933-5313-1d4c-a858-68be8f118333"], -Cell[356109, 10932, 342, 6, 26, "Message",ExpressionUUID->"3b3475f7-7db7-054a-b7f5-20d8f7d491bf"], -Cell[356454, 10940, 100, 0, 41, "Output",ExpressionUUID->"dfa1aa9c-9811-0d49-a9f3-e5e1bcdf702f"] +Cell[519159, 12694, 6122, 187, 183, "Input",ExpressionUUID->"413c8e7d-149c-5d4a-9ccb-23aebae2e6d5"], +Cell[525284, 12883, 172, 3, 33, "Output",ExpressionUUID->"26ffcee4-1d05-4cbb-921a-e380eaa5c79b"] }, Open ]], Cell[CellGroupData[{ -Cell[356591, 10945, 2054, 59, 116, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], -Cell[358648, 11006, 342, 6, 26, "Message",ExpressionUUID->"9e0b92f8-7fe2-e84e-89cd-c02c9da3e5b7"], -Cell[358993, 11014, 342, 6, 26, "Message",ExpressionUUID->"56712e4d-1aa7-524a-8254-bcfd8978eea0"], -Cell[359338, 11022, 100, 0, 41, "Output",ExpressionUUID->"b342636b-f081-cc49-b1ae-5647aa39d6ab"] +Cell[525493, 12891, 368, 9, 41, "Input",ExpressionUUID->"e11d7eb8-00a8-f540-98a0-89164ac4bae9"], +Cell[525864, 12902, 170, 3, 33, "Output",ExpressionUUID->"5e88bc25-d1b3-409e-a855-a593656b3eab"] }, Open ]], Cell[CellGroupData[{ -Cell[359475, 11027, 2030, 55, 63, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], -Cell[361508, 11084, 342, 6, 26, "Message",ExpressionUUID->"9c6ce535-b42f-3c43-a89e-eda48c04121e"], -Cell[361853, 11092, 342, 6, 26, "Message",ExpressionUUID->"e2ce6bda-7d9b-6149-bf5b-dd4c91908e28"], -Cell[362198, 11100, 342, 6, 26, "Message",ExpressionUUID->"2bed6df2-09cb-4d4d-b247-4fe79fd38fd6"], -Cell[362543, 11108, 407, 7, 26, "Message",ExpressionUUID->"64a64e18-e609-d54b-8225-64fa7909a948"], -Cell[362953, 11117, 9432, 438, 232, "Graphics",ExpressionUUID->"7758daab-adf8-2a49-9166-50457409d355"], -Cell[372388, 11557, 191, 5, 41, "Output",ExpressionUUID->"4f7705b8-e954-b341-ab6d-8b4ad9ffca61"] +Cell[526071, 12910, 2663, 88, 107, "Input",ExpressionUUID->"08e21b26-8d64-ea4e-8647-1ee89e798d8f"], +Cell[528737, 13000, 173, 3, 33, "Output",ExpressionUUID->"27934525-3ac4-448a-9a5c-5bb5217a54e5"] }, Open ]], Cell[CellGroupData[{ -Cell[372616, 11567, 2143, 61, 116, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], -Cell[374762, 11630, 342, 6, 26, "Message",ExpressionUUID->"2059be4f-bbb2-da49-9e23-3fc4d150d7a8"], -Cell[375107, 11638, 342, 6, 26, "Message",ExpressionUUID->"71d4e039-c2b8-d74d-819a-80d2051e4273"], -Cell[375452, 11646, 342, 6, 26, "Message",ExpressionUUID->"63625e13-15ef-1f45-89dc-998a1b63a626"], -Cell[375797, 11654, 407, 7, 26, "Message",ExpressionUUID->"ff96fc2b-5ddb-2142-a985-58ccc6f07e00"], -Cell[376207, 11663, 8546, 368, 232, "Graphics",ExpressionUUID->"a63f48d3-505f-0a45-b944-e872edd94d6c"], -Cell[384756, 12033, 191, 5, 41, "Output",ExpressionUUID->"be4328c1-f4b7-a444-b59f-1872f77ea023"] +Cell[528947, 13008, 2603, 85, 107, "Input",ExpressionUUID->"ae5c0a90-3245-6943-a137-f30d036fcdd2"], +Cell[531553, 13095, 173, 3, 33, "Output",ExpressionUUID->"57780930-acff-4f53-bcd2-6f3376a5980d"] }, Open ]], -Cell[384962, 12041, 138, 3, 36, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], Cell[CellGroupData[{ -Cell[385125, 12048, 1590, 47, 86, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], -Cell[386718, 12097, 342, 6, 26, "Message",ExpressionUUID->"2b38d1a8-4a7e-7b4f-8cdd-5298fced63d9"], -Cell[387063, 12105, 101, 0, 41, "Output",ExpressionUUID->"6941b2ce-51d7-0b43-b524-1e41573ef5f9"] +Cell[531763, 13103, 3712, 118, 160, "Input",ExpressionUUID->"46af1283-32d6-7240-acd2-307af56b44db"], +Cell[535478, 13223, 172, 3, 33, "Output",ExpressionUUID->"b5cfd34b-98f4-47d3-9a72-cb21c91b02a6"] }, Open ]], Cell[CellGroupData[{ -Cell[387201, 12110, 2249, 64, 81, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], -Cell[389453, 12176, 342, 6, 26, "Message",ExpressionUUID->"905b237c-0e51-ab4b-895d-05994c6f1d5f"], -Cell[389798, 12184, 342, 6, 26, "Message",ExpressionUUID->"7ad8c79e-9570-a44d-b593-07aa87056e21"], -Cell[390143, 12192, 100, 0, 41, "Output",ExpressionUUID->"7a6165f1-f4e7-1f40-9890-5c13218f6833"] +Cell[535687, 13231, 2077, 59, 99, "Input",ExpressionUUID->"cd516020-ac7f-224d-b1ff-af0307420662"], +Cell[537767, 13292, 585, 13, 27, "Message",ExpressionUUID->"9c0d1c8c-87d8-4e93-9c12-c3f7bb3bcf4f"], +Cell[538355, 13307, 588, 13, 27, "Message",ExpressionUUID->"54c48724-4f8b-465f-9473-8022c454cc5a"], +Cell[538946, 13322, 591, 13, 27, "Message",ExpressionUUID->"3c9dbbe1-7deb-41dd-a0da-283b0efec52c"], +Cell[539540, 13337, 471, 11, 26, "Message",ExpressionUUID->"4b7e8b54-66d5-4859-94e7-e4e68488c028"], +Cell[540014, 13350, 169, 3, 33, "Output",ExpressionUUID->"f238d632-881d-483b-bc4e-046fcbd6317b"] }, Open ]], Cell[CellGroupData[{ -Cell[390280, 12197, 2219, 64, 81, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], -Cell[392502, 12263, 342, 6, 26, "Message",ExpressionUUID->"c516c31a-74b4-f24d-a16a-678221cde87e"], -Cell[392847, 12271, 342, 6, 26, "Message",ExpressionUUID->"5c50b555-9ebe-f94d-801f-34634555f622"], -Cell[393192, 12279, 99, 0, 41, "Output",ExpressionUUID->"c7a13a95-1179-054f-9108-fe96e6564880"] +Cell[540220, 13358, 2077, 59, 99, "Input",ExpressionUUID->"a9d0e817-a1c8-6546-a901-34313c6ec04d"], +Cell[542300, 13419, 583, 13, 27, "Message",ExpressionUUID->"ea5cc08e-2c9d-495b-a919-9db97dc22f5e"], +Cell[542886, 13434, 586, 13, 27, "Message",ExpressionUUID->"5bb536ec-069e-4418-9f9e-21253d96b298"], +Cell[543475, 13449, 588, 13, 27, "Message",ExpressionUUID->"07f43ec4-d1c6-4b2f-89a8-d3fa800fabeb"], +Cell[544066, 13464, 471, 11, 26, "Message",ExpressionUUID->"0c5f7e84-2513-42cb-9d26-3f78e742618f"], +Cell[544540, 13477, 170, 3, 33, "Output",ExpressionUUID->"9ad1aa3a-c548-4289-8e48-1db227cebe42"] }, Open ]], Cell[CellGroupData[{ -Cell[393328, 12284, 2221, 64, 81, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], -Cell[395552, 12350, 342, 6, 26, "Message",ExpressionUUID->"7ca591cf-a5ce-ce41-8101-8edfca50e890"], -Cell[395897, 12358, 342, 6, 26, "Message",ExpressionUUID->"cbafd11a-4be0-b541-81e4-e62191ae7695"], -Cell[396242, 12366, 101, 0, 41, "Output",ExpressionUUID->"7d22c643-14ba-7245-8972-7de9bf840536"] +Cell[544747, 13485, 2053, 55, 53, "Input",ExpressionUUID->"f68960b0-cff6-3245-b906-ad38cf07d634"], +Cell[546803, 13542, 20361, 383, 236, "Output",ExpressionUUID->"d02af03f-e6bf-4209-893b-adfb4a6f6c7a"] }, Open ]], Cell[CellGroupData[{ -Cell[396380, 12371, 215, 6, 60, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], -Cell[396598, 12379, 102, 0, 41, "Output",ExpressionUUID->"d15888a7-bf5a-b54e-a332-976645c927ce"] +Cell[567201, 13930, 2165, 61, 99, "Input",ExpressionUUID->"d43bf17b-b492-0e4a-af4a-6a3bc399953c"], +Cell[569369, 13993, 520, 12, 38, "Message",ExpressionUUID->"c72362ce-857e-4be7-adba-79674697b21a"], +Cell[569892, 14007, 523, 12, 38, "Message",ExpressionUUID->"b1dc634b-d75f-4ee5-9968-9c44b534997e"], +Cell[570418, 14021, 523, 12, 38, "Message",ExpressionUUID->"b1d54fa9-eeee-42cf-b408-13a3f0cc258e"], +Cell[570944, 14035, 471, 11, 26, "Message",ExpressionUUID->"0881685d-ece8-446e-adc8-f0baa4a81a0a"], +Cell[571418, 14048, 25547, 468, 234, "Output",ExpressionUUID->"37a88678-8020-47a7-a030-2a0caad915e4"] }, Open ]], -Cell[396715, 12382, 188, 4, 36, "Input",ExpressionUUID->"a3233522-e327-40d5-8d4e-9bd748a0a988"] +Cell[CellGroupData[{ +Cell[597002, 14521, 164, 4, 29, "Input",ExpressionUUID->"4ad58a38-0776-5240-aa41-ba7c8ff64fb9"], +Cell[597169, 14527, 31955, 600, 234, "Output",ExpressionUUID->"679db77d-5c53-4ddd-8f22-44a591feb25e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[629161, 15132, 1616, 48, 71, "Input",ExpressionUUID->"3edaf53b-bb09-6646-b79e-9350413e0b42"], +Cell[630780, 15182, 624, 13, 38, "Message",ExpressionUUID->"5defc323-a81e-4192-b773-231b9c153f6d"], +Cell[631407, 15197, 631, 13, 57, "Message",ExpressionUUID->"7c35e482-0a16-44ce-9a95-efddc6711ddb"], +Cell[632041, 15212, 635, 14, 58, "Message",ExpressionUUID->"eddaee02-721e-430b-ab55-fa81944502f4"], +Cell[632679, 15228, 473, 11, 26, "Message",ExpressionUUID->"2368c2f4-3dff-412f-b1a6-4bca404c5ef3"], +Cell[633155, 15241, 171, 3, 33, "Output",ExpressionUUID->"f86f88de-199a-4909-8214-c6a7695be5e9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[633363, 15249, 2272, 64, 64, "Input",ExpressionUUID->"d2148290-3e90-8347-bddd-5dd8190b0268"], +Cell[635638, 15315, 583, 13, 38, "Message",ExpressionUUID->"87c56015-6a2f-43c5-9608-b4f1f09ead1c"], +Cell[636224, 15330, 586, 13, 38, "Message",ExpressionUUID->"e0cd0fdf-9388-4186-be7d-e57ac227363a"], +Cell[636813, 15345, 589, 13, 38, "Message",ExpressionUUID->"8ed9a9f9-1737-4944-bf0b-707b3a2dae1a"], +Cell[637405, 15360, 471, 11, 26, "Message",ExpressionUUID->"1d331a41-dfb7-4a18-bfd7-6b2ddbb82097"], +Cell[637879, 15373, 173, 3, 33, "Output",ExpressionUUID->"0c630e09-bf43-4ad9-bcd2-ca522d415f74"] +}, Open ]], +Cell[CellGroupData[{ +Cell[638089, 15381, 2231, 63, 64, "Input",ExpressionUUID->"3cdd2064-36e7-b44d-bb0f-98d71f8a8458"], +Cell[640323, 15446, 583, 13, 38, "Message",ExpressionUUID->"f37e1a58-8585-409d-80a9-cf4b78eaf5b3"], +Cell[640909, 15461, 586, 13, 38, "Message",ExpressionUUID->"880eb781-457c-47e8-81a8-041fbe6f7092"], +Cell[641498, 15476, 588, 13, 38, "Message",ExpressionUUID->"556ae829-4358-4786-9a22-09d41678da7b"], +Cell[642089, 15491, 470, 11, 26, "Message",ExpressionUUID->"dd7da6a9-b950-4fcd-998c-145bed2fdbde"], +Cell[642562, 15504, 171, 3, 33, "Output",ExpressionUUID->"37b02ba7-c080-41dd-ad52-aab451c49214"] +}, Open ]], +Cell[CellGroupData[{ +Cell[642770, 15512, 2233, 63, 64, "Input",ExpressionUUID->"c1d3ae3d-f5ac-b04d-af0f-57c1fe1d0585"], +Cell[645006, 15577, 583, 13, 38, "Message",ExpressionUUID->"4bb0a18d-21db-4caf-92fa-04b25da063ca"], +Cell[645592, 15592, 586, 13, 38, "Message",ExpressionUUID->"b7a5e039-e702-4551-b160-9e58df41ec4a"], +Cell[646181, 15607, 589, 13, 38, "Message",ExpressionUUID->"b0de82c5-10fa-4afe-9abe-60f4e8314eb8"], +Cell[646773, 15622, 473, 11, 26, "Message",ExpressionUUID->"b39cd8ee-bd41-42d0-99dc-1b66577757a0"], +Cell[647249, 15635, 170, 3, 33, "Output",ExpressionUUID->"8faeeed7-be5e-4731-a7fd-e333a7191609"] +}, Open ]], +Cell[CellGroupData[{ +Cell[647456, 15643, 238, 6, 46, "Input",ExpressionUUID->"cf5cb343-c1ea-5f41-82ed-1ca469b254bd"], +Cell[647697, 15651, 172, 3, 33, "Output",ExpressionUUID->"02dc2a7d-c533-48ca-87a7-b1623b713f21"] +}, Open ]], +Cell[647884, 15657, 211, 4, 29, "Input",ExpressionUUID->"a3233522-e327-40d5-8d4e-9bd748a0a988"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw1.nb b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw1.nb index 21817a3..ca2ae4d 100644 --- a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw1.nb +++ b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 604121, 14937] -NotebookOptionsPosition[ 561779, 14264] -NotebookOutlinePosition[ 562213, 14282] -CellTagsIndexPosition[ 562170, 14279] +NotebookDataLength[ 689021, 16484] +NotebookOptionsPosition[ 646003, 15794] +NotebookOutlinePosition[ 646460, 15813] +CellTagsIndexPosition[ 646417, 15810] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,15 +26,13 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.994074211664226*^9, 3.994074212605893*^9}, { 3.994074246621201*^9, 3.994074265935053*^9}}, - CellLabel-> - "In[304]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], + CellLabel->"In[1]:=",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], Cell[BoxData["1.95`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.994074196804253*^9, 3.994074214075809*^9}, { - 3.9940742497364883`*^9, 3.9940742697527313`*^9}}, - CellLabel-> - "Out[304]=",ExpressionUUID->"f9762e12-9267-47fa-8806-6002245e3fc8"] + 3.9940742497364883`*^9, 3.9940742697527313`*^9}, 3.9943863425162163`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"70aa6b06-9673-4377-855c-d53c427d0e17"] }, Open ]], Cell[CellGroupData[{ @@ -43,15 +41,13 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940740226123867`*^9, 3.994074030397141*^9}}, - CellLabel-> - "In[305]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], + CellLabel->"In[2]:=",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.9940741968744993`*^9, 3.994074214306916*^9}, { - 3.994074249779564*^9, 3.9940742697936697`*^9}}, - CellLabel-> - "Out[305]=",ExpressionUUID->"9df34e1f-52ce-4cb7-89e2-b1ed3fd66791"] + 3.994074249779564*^9, 3.9940742697936697`*^9}, 3.994386342621073*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"d284b26c-5293-42a5-82d8-8f10998a90a0"] }, Open ]], Cell[CellGroupData[{ @@ -60,15 +56,13 @@ Cell[BoxData[ RowBox[{"A1", "=", "172"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994074027305109*^9, 3.994074028074005*^9}}, - CellLabel-> - "In[306]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], + CellLabel->"In[3]:=",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], Cell[BoxData["172"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994074196887857*^9, 3.994074214318638*^9}, { - 3.9940742497919416`*^9, 3.9940742698063602`*^9}}, - CellLabel-> - "Out[306]=",ExpressionUUID->"3e4b3a96-72b8-4abf-aeab-219b4c959203"] + 3.9940742497919416`*^9, 3.9940742698063602`*^9}, 3.994386342640971*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"21b16b5e-b643-47bf-b5e7-da02785f2ca4"] }, Open ]], Cell[CellGroupData[{ @@ -76,15 +70,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[307]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], + CellLabel->"In[4]:=",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.9940741969012012`*^9, 3.994074214329146*^9}, { - 3.9940742497961063`*^9, 3.994074269818478*^9}}, - CellLabel-> - "Out[307]=",ExpressionUUID->"fc1febad-9fb8-4c03-a36a-50afa9cc7108"] + 3.9940742497961063`*^9, 3.994074269818478*^9}, 3.9943863426614103`*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"d3865f87-12d7-4407-b487-c0c38670347a"] }, Open ]], Cell[CellGroupData[{ @@ -96,30 +88,26 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[308]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], + CellLabel->"In[5]:=",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], Cell[BoxData["0.5435000000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.9940741969137297`*^9, 3.99407421433959*^9}, { - 3.994074249812704*^9, 3.994074269830806*^9}}, - CellLabel-> - "Out[308]=",ExpressionUUID->"089a5bc6-3818-49b5-8294-c6294311a0c2"] + 3.994074249812704*^9, 3.994074269830806*^9}, 3.994386342683523*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"59b2d59f-4b14-4fe3-912b-2d59efb82c53"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[309]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], + CellLabel->"In[6]:=",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.9940741969249763`*^9, 3.994074214349977*^9}, { - 3.99407424982506*^9, 3.994074269834938*^9}}, - CellLabel-> - "Out[309]=",ExpressionUUID->"f1ccd887-b52c-43c9-89b1-9239e5430c65"] + 3.99407424982506*^9, 3.994074269834938*^9}, 3.9943863427029867`*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"49203eaa-e359-4d79-88a5-7e17f0487dc2"] }, Open ]], Cell[CellGroupData[{ @@ -130,15 +118,13 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[310]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], + CellLabel->"In[7]:=",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], Cell[BoxData["6.451105409164632`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.994074196937035*^9, 3.994074214360525*^9}, { - 3.994074249837967*^9, 3.9940742698497963`*^9}}, - CellLabel-> - "Out[310]=",ExpressionUUID->"e11cbca4-2937-4fb2-a2eb-3c7299ba1fe6"] + 3.994074249837967*^9, 3.9940742698497963`*^9}, 3.994386342724472*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"21817df2-910c-4c6b-9c44-3e5d1df81a8c"] }, Open ]], Cell[CellGroupData[{ @@ -150,15 +136,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[311]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], + CellLabel->"In[8]:=",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], Cell[BoxData["4.734719918224123`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.9940741969492617`*^9, 3.994074214370586*^9}, { - 3.994074249850299*^9, 3.994074269861824*^9}}, - CellLabel-> - "Out[311]=",ExpressionUUID->"d4e2a5d8-a7a2-475b-9487-873406d22677"] + 3.994074249850299*^9, 3.994074269861824*^9}, 3.994386342744341*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"40da0957-b654-477a-b49f-24b2ade98872"] }, Open ]], Cell[CellGroupData[{ @@ -166,14 +150,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.852277809"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.9940740415240393`*^9}, - CellLabel-> - "In[312]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], + CellLabel->"In[9]:=",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], Cell[BoxData["0.852277809`"], "Output", CellChangeTimes->{{3.994074196961275*^9, 3.994074214380481*^9}, { - 3.994074249862259*^9, 3.994074269873619*^9}}, - CellLabel-> - "Out[312]=",ExpressionUUID->"5f151c0b-3551-4b0f-b0eb-a401e41c9fc2"] + 3.994074249862259*^9, 3.994074269873619*^9}, 3.994386342764366*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"32db85e2-3048-4b3d-8daf-6ea9756ae57a"] }, Open ]], Cell[CellGroupData[{ @@ -181,44 +163,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3903505481"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.99407404519888*^9}, - CellLabel-> - "In[313]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], + CellLabel->"In[10]:=",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], Cell[BoxData["0.3903505481`"], "Output", CellChangeTimes->{{3.99407419697276*^9, 3.9940742143904543`*^9}, { - 3.99407424987506*^9, 3.994074269885377*^9}}, - CellLabel-> - "Out[313]=",ExpressionUUID->"02059a2f-554c-4b90-9964-b6ffed1c19a1"] + 3.99407424987506*^9, 3.994074269885377*^9}, 3.9943863427803793`*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"6ff2fff1-afc5-4cff-9304-6eb1384c6b14"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[314]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], + CellLabel->"In[11]:=",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.9940741969837933`*^9, 3.994074214400448*^9}, { - 3.994074249886661*^9, 3.994074269897275*^9}}, - CellLabel-> - "Out[314]=",ExpressionUUID->"31c9ef03-a8d5-419e-bdc4-a3c74cc03bc4"] + 3.994074249886661*^9, 3.994074269897275*^9}, 3.9943863427996883`*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"3d728542-3056-4291-80bd-72ed2de38e07"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[315]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], + CellLabel->"In[12]:=",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.9940741969946527`*^9, 3.994074214410337*^9}, { - 3.9940742498968973`*^9, 3.994074269909542*^9}}, - CellLabel-> - "Out[315]=",ExpressionUUID->"56b1ba07-dcd1-4dff-80a6-e2b24b5b2901"] + 3.9940742498968973`*^9, 3.994074269909542*^9}, 3.994386342818535*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"b6e3429d-6d4c-45be-83db-63064bffe35b"] }, Open ]], Cell[CellGroupData[{ @@ -242,15 +218,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], + CellLabel->"In[13]:=",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.994074197005885*^9, 3.994074214421315*^9}, { - 3.994074249908176*^9, 3.994074269922103*^9}}, - CellLabel-> - "Out[316]=",ExpressionUUID->"6dc056c6-e85c-41c4-8d0a-5d8b9ddae7d2"] + 3.994074249908176*^9, 3.994074269922103*^9}, 3.994386342839373*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"324c9846-0a06-4724-a62c-7670f52e1cc6"] }, Open ]], Cell[CellGroupData[{ @@ -274,15 +248,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[317]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], + CellLabel->"In[14]:=",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.994074197017363*^9, 3.994074214431409*^9}, { - 3.994074249918466*^9, 3.99407426993229*^9}}, - CellLabel-> - "Out[317]=",ExpressionUUID->"5971dfaa-c94c-45df-8971-a09869eb43d1"] + 3.994074249918466*^9, 3.99407426993229*^9}, 3.99438634285858*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"b1641e69-405e-4489-9a7b-6aed62f08eb6"] }, Open ]], Cell[CellGroupData[{ @@ -337,15 +309,13 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[318]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], + CellLabel->"In[15]:=",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994074197029154*^9, 3.994074214441661*^9}, { - 3.9940742499280653`*^9, 3.994074269943099*^9}}, - CellLabel-> - "Out[318]=",ExpressionUUID->"f1a06989-a7de-46c4-b03d-9a750dcf58c8"] + 3.9940742499280653`*^9, 3.994074269943099*^9}, 3.994386342879174*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"206e5343-045e-4b84-b0fe-479087bf96e1"] }, Open ]], Cell[CellGroupData[{ @@ -396,16 +366,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], + CellLabel->"In[16]:=",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.9940741970396633`*^9, 3.994074214453579*^9}, { - 3.994074249938612*^9, 3.994074269953534*^9}}, - CellLabel-> - "Out[319]=",ExpressionUUID->"5504cb81-c891-481c-8e7a-a777b4cf5f7d"] + 3.994074249938612*^9, 3.994074269953534*^9}, 3.99438634290036*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"09bc8fd4-546c-46e1-874d-6d47d91ff4ce"] }, Open ]], Cell[CellGroupData[{ @@ -456,16 +424,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], + CellLabel->"In[17]:=",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.994074197050289*^9, 3.994074214467175*^9}, { - 3.994074249949532*^9, 3.9940742699645767`*^9}}, - CellLabel-> - "Out[320]=",ExpressionUUID->"f6642a88-88c6-46c5-8405-2b16fe6405a5"] + 3.994074249949532*^9, 3.9940742699645767`*^9}, 3.99438634292203*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"07200346-8850-46f4-935f-2c7b045a1827"] }, Open ]], Cell[CellGroupData[{ @@ -520,60 +486,52 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], + CellLabel->"In[18]:=",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994074197062862*^9, 3.99407421448357*^9}, { - 3.9940742499608793`*^9, 3.994074269975973*^9}}, - CellLabel-> - "Out[321]=",ExpressionUUID->"e792967f-1e94-4818-8464-1d5064316cbc"] + 3.9940742499608793`*^9, 3.994074269975973*^9}, 3.9943863429415197`*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"55843a10-093b-4d4b-a186-af068324996a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], + CellLabel->"In[19]:=",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.9940741970755367`*^9, 3.994074214495585*^9}, { - 3.994074249972097*^9, 3.9940742699872303`*^9}}, - CellLabel-> - "Out[322]=",ExpressionUUID->"693d205b-3ef2-4518-88fa-84bc7cf50447"] + 3.994074249972097*^9, 3.9940742699872303`*^9}, 3.994386342959805*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"4918bb51-a939-4e77-a7b4-65c6d28fcd5f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], + CellLabel->"In[20]:=",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994074197089067*^9, 3.994074214507393*^9}, { - 3.99407424998314*^9, 3.994074269998393*^9}}, - CellLabel-> - "Out[323]=",ExpressionUUID->"a7c39232-9068-448e-ad6a-4f30f2f26e89"] + 3.99407424998314*^9, 3.994074269998393*^9}, 3.9943863429778757`*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"07349ef6-c6af-41f8-9f09-61507a67ee50"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], + CellLabel->"In[21]:=",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940741971016483`*^9, 3.9940742145189466`*^9}, { - 3.994074249994322*^9, 3.994074270009439*^9}}, - CellLabel-> - "Out[324]=",ExpressionUUID->"a55ae702-b51d-4113-be61-6345ce492dc4"] + 3.994074249994322*^9, 3.994074270009439*^9}, 3.994386342995997*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"75363fa9-9aa4-4e6f-a9d9-39030392d1e0"] }, Open ]], Cell[CellGroupData[{ @@ -582,31 +540,27 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[325]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], + CellLabel->"In[22]:=",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.9940741971133337`*^9, 3.99407421453058*^9}, { - 3.994074250005796*^9, 3.994074270020775*^9}}, - CellLabel-> - "Out[325]=",ExpressionUUID->"7957c0c3-24f6-449d-8a3e-badebf9dbf51"] + 3.994074250005796*^9, 3.994074270020775*^9}, 3.99438634301644*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"3e3ebe99-4cf7-419f-ab3c-d75fc0d65526"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], + CellLabel->"In[23]:=",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994074197124381*^9, 3.994074214542293*^9}, { - 3.994074250017613*^9, 3.9940742700324078`*^9}}, - CellLabel-> - "Out[326]=",ExpressionUUID->"5efdd1cf-c8d8-4e12-b3a7-5766434c2c05"] + 3.994074250017613*^9, 3.9940742700324078`*^9}, 3.9943863430427723`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"8e0fee91-c425-40f9-b657-0c5492aa8ff5"] }, Open ]], Cell[CellGroupData[{ @@ -616,15 +570,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994074052479707*^9, 3.9940740526225157`*^9}}, - CellLabel-> - "In[327]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], + CellLabel->"In[24]:=",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.99407419713608*^9, 3.994074214545911*^9}, { - 3.994074250027919*^9, 3.99407427004285*^9}}, - CellLabel-> - "Out[327]=",ExpressionUUID->"b084d395-d063-4ba6-9417-3466190acb62"] + 3.994074250027919*^9, 3.99407427004285*^9}, 3.9943863431378202`*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"f6fd6002-3d38-474e-989d-70baa8763238"] }, Open ]], Cell[CellGroupData[{ @@ -634,15 +586,13 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.99407405616786*^9, 3.994074056966621*^9}}, - CellLabel-> - "In[328]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], + CellLabel->"In[25]:=",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.994074197147298*^9, 3.99407421455849*^9}, { - 3.9940742500393*^9, 3.994074270054291*^9}}, - CellLabel-> - "Out[328]=",ExpressionUUID->"c765c8df-63cc-42f0-a521-78ad287ccf02"] + 3.9940742500393*^9, 3.994074270054291*^9}, 3.9943863471435003`*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"9b317086-0758-4cd2-9d59-f2652872315b"] }, Open ]], Cell[CellGroupData[{ @@ -651,15 +601,13 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[329]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], + CellLabel->"In[26]:=",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], Cell[BoxData["68"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.994074197159381*^9, 3.994074214569437*^9}, { - 3.9940742500504293`*^9, 3.9940742700651913`*^9}}, - CellLabel-> - "Out[329]=",ExpressionUUID->"3386464b-a6af-492c-af10-1c78731e4151"] + 3.9940742500504293`*^9, 3.9940742700651913`*^9}, 3.994386347501108*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"5e6f4508-347f-48ee-bc96-7126e62e8e9e"] }, Open ]], Cell[CellGroupData[{ @@ -674,15 +622,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], + CellLabel->"In[27]:=",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], Cell[BoxData["0.10723666210670314`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994074197172007*^9, 3.994074214580143*^9}, { - 3.994074250060562*^9, 3.9940742700753593`*^9}}, - CellLabel-> - "Out[330]=",ExpressionUUID->"94bfc6db-9198-49f1-a9f3-94ba6ed8e927"] + 3.994074250060562*^9, 3.9940742700753593`*^9}, 3.994386347534034*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"434da526-e348-4caf-b1cf-690ec69d0c6d"] }, Open ]], Cell[CellGroupData[{ @@ -697,16 +643,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], + CellLabel->"In[28]:=",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], Cell[BoxData[ RowBox[{"-", "2.5678385772913814`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994074197183957*^9, 3.994074214590371*^9}, { - 3.994074250071249*^9, 3.99407427008554*^9}}, - CellLabel-> - "Out[331]=",ExpressionUUID->"7df2e02d-ceb9-4e02-b431-c4e3dc07a1ae"] + 3.994074250071249*^9, 3.99407427008554*^9}, 3.9943863475566683`*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"de676fc9-d1fc-4513-a4d5-1d3816689bfe"] }, Open ]], Cell[CellGroupData[{ @@ -737,15 +681,13 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[332]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], + CellLabel->"In[29]:=",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], Cell[BoxData["17.339463280274387`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994074197196582*^9, 3.9940742146010637`*^9}, { - 3.994074250082402*^9, 3.9940742700958967`*^9}}, - CellLabel-> - "Out[332]=",ExpressionUUID->"c90de278-6f4b-43a0-84bb-271f080c496b"] + 3.994074250082402*^9, 3.9940742700958967`*^9}, 3.994386347581161*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"3e2737e7-70fa-4c87-9f91-90483c7f68ee"] }, Open ]], Cell[CellGroupData[{ @@ -753,15 +695,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[333]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], + CellLabel->"In[30]:=",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.9940741972101183`*^9, 3.9940742146122723`*^9}, { - 3.994074250094462*^9, 3.994074270106193*^9}}, - CellLabel-> - "Out[333]=",ExpressionUUID->"f548e84f-605f-4274-97e2-3ddbb7d20a31"] + 3.994074250094462*^9, 3.994074270106193*^9}, 3.9943863476916523`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"9bbfd4c8-4321-4e1e-a8aa-175253823bcf"] }, Open ]], Cell[CellGroupData[{ @@ -771,20 +711,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994074073155587*^9, 3.994074075499446*^9}}, - CellLabel-> - "In[334]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], + CellLabel->"In[31]:=",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{{3.9940741972243557`*^9, 3.994074214623012*^9}, { - 3.994074250106516*^9, 3.9940742701165457`*^9}}, - CellLabel-> - "Out[334]=",ExpressionUUID->"0e689e33-997a-4bfb-bde3-b7ebe94d83f2"] + 3.994074250106516*^9, 3.9940742701165457`*^9}, 3.994386347717894*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"e7a09ff1-ac27-4d33-8b58-7080d85420c5"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[335]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], + CellLabel->"In[32]:=",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ @@ -793,20 +730,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994074078227497*^9, 3.9940740796275997`*^9}}, - CellLabel-> - "In[336]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], + CellLabel->"In[33]:=",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], Cell[BoxData["0.765`"], "Output", CellChangeTimes->{{3.994074197245954*^9, 3.994074214636681*^9}, { - 3.9940742501222553`*^9, 3.99407427012961*^9}}, - CellLabel-> - "Out[336]=",ExpressionUUID->"23abc775-7d15-4b54-956b-f4b88dbdb298"] + 3.9940742501222553`*^9, 3.99407427012961*^9}, 3.9943863477432823`*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"b0e42072-1ace-4f76-b2dd-7ceb494c7351"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[337]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], + CellLabel->"In[34]:=",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ @@ -815,20 +749,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940740824169683`*^9, 3.9940740841708183`*^9}}, - CellLabel-> - "In[338]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], + CellLabel->"In[35]:=",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{{3.994074197269746*^9, 3.994074214649177*^9}, { - 3.994074250142523*^9, 3.994074270141824*^9}}, - CellLabel-> - "Out[338]=",ExpressionUUID->"285f7f9a-06e2-417c-b156-5d97ac66c414"] + 3.994074250142523*^9, 3.994074270141824*^9}, 3.994386347766817*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"9f6b6502-3e62-4658-8ed2-2f91eadd42ef"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[339]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], + CellLabel->"In[36]:=",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ @@ -837,20 +768,17 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994074087466568*^9, 3.9940740892428827`*^9}}, - CellLabel-> - "In[340]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], + CellLabel->"In[37]:=",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], Cell[BoxData["1.115`"], "Output", CellChangeTimes->{{3.9940741972942533`*^9, 3.9940742146616087`*^9}, { - 3.994074250166238*^9, 3.9940742701540823`*^9}}, - CellLabel-> - "Out[340]=",ExpressionUUID->"67719885-cd0e-433e-88e0-39f4ff4f62f3"] + 3.994074250166238*^9, 3.9940742701540823`*^9}, 3.994386347792694*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"c2ca9bfc-32f4-42f8-b982-f70d688e23f8"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[341]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], + CellLabel->"In[38]:=",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ @@ -859,20 +787,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994074092127721*^9, 3.994074094282755*^9}}, - CellLabel-> - "In[342]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], + CellLabel->"In[39]:=",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], Cell[BoxData["1.375`"], "Output", CellChangeTimes->{{3.9940741973176317`*^9, 3.9940742146740303`*^9}, { - 3.994074250185948*^9, 3.9940742701663027`*^9}}, - CellLabel-> - "Out[342]=",ExpressionUUID->"28680976-e45d-497a-9c9f-9733bd0bae2a"] + 3.994074250185948*^9, 3.9940742701663027`*^9}, 3.994386347812752*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"d72ea51c-7056-4acb-8520-938ff2092ed5"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[343]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], + CellLabel->"In[40]:=",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ @@ -881,20 +806,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994074098253368*^9, 3.994074099547431*^9}}, - CellLabel-> - "In[344]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], + CellLabel->"In[41]:=",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], Cell[BoxData["0.545`"], "Output", CellChangeTimes->{{3.9940741973401327`*^9, 3.994074214686512*^9}, { - 3.994074250207786*^9, 3.994074270178926*^9}}, - CellLabel-> - "Out[344]=",ExpressionUUID->"32be1364-5fd4-4df3-9515-955ffc31a2d9"] + 3.994074250207786*^9, 3.994074270178926*^9}, 3.994386347832631*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"42976ed4-03d6-40c5-b3db-23e8ff87da34"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[345]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], + CellLabel->"In[42]:=",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ @@ -903,20 +825,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994074102320486*^9, 3.9940741031259613`*^9}}, - CellLabel-> - "In[346]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], + CellLabel->"In[43]:=",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], Cell[BoxData["1.35`"], "Output", CellChangeTimes->{{3.994074197360721*^9, 3.994074214698968*^9}, { - 3.9940742502296133`*^9, 3.994074270190978*^9}}, - CellLabel-> - "Out[346]=",ExpressionUUID->"0926821a-87af-4ceb-9932-a1ebc88c972b"] + 3.9940742502296133`*^9, 3.994074270190978*^9}, 3.994386347851632*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"a68ca493-6345-4a8f-a66c-945e4c67880e"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[347]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], + CellLabel->"In[44]:=",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ @@ -924,20 +843,17 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.655"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994074105268124*^9, 3.994074106561956*^9}}, - CellLabel-> - "In[348]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], + CellLabel->"In[45]:=",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], Cell[BoxData["0.655`"], "Output", CellChangeTimes->{{3.994074197383122*^9, 3.994074214711643*^9}, { - 3.994074250250944*^9, 3.994074270203269*^9}}, - CellLabel-> - "Out[348]=",ExpressionUUID->"63fcce57-2676-49ff-a853-6e78541ed516"] + 3.994074250250944*^9, 3.994074270203269*^9}, 3.994386347870986*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"240be5f5-9eef-40ac-8a60-666b510531ca"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[349]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], + CellLabel->"In[46]:=",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ @@ -1426,15 +1342,13 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[350]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], + CellLabel->"In[47]:=",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], Cell[BoxData["0.1542863605960474`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.994074197462419*^9, 3.9940742147508163`*^9}, { - 3.994074250298726*^9, 3.994074270240198*^9}}, - CellLabel-> - "Out[350]=",ExpressionUUID->"411a5131-3b33-45a0-894b-111161436c1a"] + 3.994074250298726*^9, 3.994074270240198*^9}, 3.9943863480299797`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"dea40bcc-8df4-4a19-92f5-f81dcbc65fdd"] }, Open ]], Cell[CellGroupData[{ @@ -1928,15 +1842,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[351]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], + CellLabel->"In[48]:=",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], Cell[BoxData["6.986649521084862`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.994074197551347*^9, 3.994074214777306*^9}, { - 3.9940742503242893`*^9, 3.994074270266127*^9}}, - CellLabel-> - "Out[351]=",ExpressionUUID->"7a2946b6-15b0-4efc-891d-59318f57e0a0"] + 3.9940742503242893`*^9, 3.994074270266127*^9}, 3.994386348125682*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"eb41bc74-2b00-4708-93aa-eeadb8a10f48"] }, Open ]], Cell[CellGroupData[{ @@ -2424,16 +2336,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[352]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], + CellLabel->"In[49]:=",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], Cell[BoxData[ RowBox[{"-", "15.225784715275067`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994074197626877*^9, 3.994074214803336*^9}, { - 3.994074250347639*^9, 3.9940742702914057`*^9}}, - CellLabel-> - "Out[352]=",ExpressionUUID->"d3db5732-abdb-4f42-bb8e-c94398a97284"] + 3.994074250347639*^9, 3.9940742702914057`*^9}, 3.994386348209079*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"b94fc00e-43dc-4cc0-90b4-e28b53690d96"] }, Open ]], Cell[CellGroupData[{ @@ -2991,16 +2901,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[353]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], + CellLabel->"In[50]:=",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], Cell[BoxData[ RowBox[{"-", "19.527743438945258`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.994074197680339*^9, 3.9940742148337717`*^9}, { - 3.994074250376841*^9, 3.9940742703219957`*^9}}, - CellLabel-> - "Out[353]=",ExpressionUUID->"e04073d8-5cd1-4a34-a275-873f38cb9eae"] + 3.994074250376841*^9, 3.9940742703219957`*^9}, 3.994386348357098*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"30fc042d-0d40-4824-a040-93177903cbfe"] }, Open ]], Cell[CellGroupData[{ @@ -3558,16 +3466,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[354]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], + CellLabel->"In[51]:=",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], Cell[BoxData[ RowBox[{"-", "55.27021800638023`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.9940741977668943`*^9, 3.9940742148649673`*^9}, { - 3.994074250406843*^9, 3.994074270352029*^9}}, - CellLabel-> - "Out[354]=",ExpressionUUID->"ef0001a9-8dc6-4a72-936d-29f33ed46a0c"] + 3.994074250406843*^9, 3.994074270352029*^9}, 3.994386348443715*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"80656afd-7008-4edb-9980-4cd07c126403"] }, Open ]], Cell[CellGroupData[{ @@ -4198,46 +4104,40 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[355]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], + CellLabel->"In[52]:=",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], Cell[BoxData[ RowBox[{"-", "141.4524755079782`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.994074197832451*^9, 3.994074214909892*^9}, { - 3.994074250439662*^9, 3.994074270387487*^9}}, - CellLabel-> - "Out[355]=",ExpressionUUID->"ada8cea0-0dc8-40e0-96d3-6bceecba2f99"] + 3.994074250439662*^9, 3.994074270387487*^9}, 3.994386348544277*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"7a4ba24e-a6d2-446d-a87e-0e6340bb060a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[356]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], + CellLabel->"In[53]:=",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994074197929666*^9, 3.994074214922945*^9}, { - 3.994074250452722*^9, 3.994074270403535*^9}}, - CellLabel-> - "Out[356]=",ExpressionUUID->"9ede69e9-fdd8-41d0-960e-c87c01875323"] + 3.994074250452722*^9, 3.994074270403535*^9}, 3.994386348565402*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"023293c0-cbc1-4ca4-8909-cea6651f44d7"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[357]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], + CellLabel->"In[54]:=",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994074197952071*^9, 3.994074214935376*^9}, { - 3.994074250464295*^9, 3.994074270413846*^9}}, - CellLabel-> - "Out[357]=",ExpressionUUID->"bf992dd7-dd94-4316-9009-1e7e45b14028"] + 3.994074250464295*^9, 3.994074270413846*^9}, 3.9943863485770483`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"7a40204f-5e69-43ec-bfc0-826b2be29718"] }, Open ]], Cell[CellGroupData[{ @@ -4281,15 +4181,13 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[358]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], + CellLabel->"In[55]:=",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], Cell[BoxData["111.55440139653717`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940741979658833`*^9, 3.994074214947126*^9}, { - 3.99407425047659*^9, 3.994074270424139*^9}}, - CellLabel-> - "Out[358]=",ExpressionUUID->"21ada3b5-49c8-4841-bda5-7066b8a0a78e"] + 3.99407425047659*^9, 3.994074270424139*^9}, 3.994386348587886*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"96140589-9830-455a-ae26-15d459230a24"] }, Open ]], Cell[CellGroupData[{ @@ -4329,16 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[359]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], + CellLabel->"In[56]:=",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.994074197994025*^9, 3.994074214959611*^9}, { - 3.994074250488699*^9, 3.994074270434445*^9}}, - CellLabel-> - "Out[359]=",ExpressionUUID->"7c1e8e4b-9f34-48ad-86dd-7d5290ebb334"] + 3.994074250488699*^9, 3.994074270434445*^9}, 3.994386348597825*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"4471007f-15f7-4300-b874-29924e891df2"] }, Open ]], Cell[CellGroupData[{ @@ -4382,101 +4278,87 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[360]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], + CellLabel->"In[57]:=",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], Cell[BoxData["113.13286100443031`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994074198004314*^9, 3.994074214972053*^9}, { - 3.994074250500126*^9, 3.99407427044481*^9}}, - CellLabel-> - "Out[360]=",ExpressionUUID->"5fbe48ec-cfd4-4745-8e9b-ea52d9558406"] + 3.994074250500126*^9, 3.99407427044481*^9}, 3.99438634861049*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"68e0a8ba-51eb-4f21-a316-d385c9ce469d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[361]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], + CellLabel->"In[58]:=",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.994074198016279*^9, 3.994074214983481*^9}, { - 3.994074250511408*^9, 3.994074270455081*^9}}, - CellLabel-> - "Out[361]=",ExpressionUUID->"6e05ceff-ecc7-46a8-a998-a315e70bb1bf"] + 3.994074250511408*^9, 3.994074270455081*^9}, 3.994386348621874*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"981e019d-ae45-4804-b682-e1848a5636a2"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[362]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], + CellLabel->"In[59]:=",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.99407419803306*^9, 3.994074214997123*^9}, { - 3.994074250525971*^9, 3.994074270465309*^9}}, - CellLabel-> - "Out[362]=",ExpressionUUID->"9b647d4e-3178-40c7-a764-c7add69147ac"] + 3.994074250525971*^9, 3.994074270465309*^9}, 3.994386348632534*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"1156ddbd-9b01-4062-a6b4-68c27bee3bb0"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[363]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], + CellLabel->"In[60]:=",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.994074198060273*^9, 3.994074215008013*^9}, { - 3.994074250535656*^9, 3.994074270476778*^9}}, - CellLabel-> - "Out[363]=",ExpressionUUID->"2ea5813a-34db-4ff4-a493-8d80ec769f79"] + 3.994074250535656*^9, 3.994074270476778*^9}, 3.99438634864517*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"6e9902e9-7e21-4a15-a580-21a1a3e92932"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[364]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], + CellLabel->"In[61]:=",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.9940741980734253`*^9, 3.994074215018661*^9}, { - 3.994074250546678*^9, 3.9940742704879427`*^9}}, - CellLabel-> - "Out[364]=",ExpressionUUID->"78a7daac-e478-4758-acf9-1c6c23757080"] + 3.994074250546678*^9, 3.9940742704879427`*^9}, 3.994386348655167*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"bd237753-364b-4491-b9d5-2e6425e6d062"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[365]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], + CellLabel->"In[62]:=",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994074198087656*^9, 3.9940742150302687`*^9}, { - 3.994074250550354*^9, 3.994074270499359*^9}}, - CellLabel-> - "Out[365]=",ExpressionUUID->"678c88f3-334b-4dce-b98a-c9d90c2c4491"] + 3.994074250550354*^9, 3.994074270499359*^9}, 3.994386348665152*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"ea34a845-f1bc-4c7c-bac8-5277be925f45"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[366]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], + CellLabel->"In[63]:=",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.994074198096857*^9, 3.994074215043764*^9}, { - 3.994074250564603*^9, 3.994074270511888*^9}}, - CellLabel-> - "Out[366]=",ExpressionUUID->"b60f3e52-d975-4951-bcab-04f0c8b38840"] + 3.994074250564603*^9, 3.994074270511888*^9}, 3.9943863486750727`*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"71141a03-9d75-44ca-88df-1f8b3238e1f3"] }, Open ]], Cell[CellGroupData[{ @@ -4497,16 +4379,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[367]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], + CellLabel->"In[64]:=",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], Cell[BoxData[ RowBox[{"-", "33.18726375495992`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994074198107793*^9, 3.994074215058444*^9}, { - 3.994074250574132*^9, 3.99407427052425*^9}}, - CellLabel-> - "Out[367]=",ExpressionUUID->"28130a5d-291f-4965-a76d-c2462d9c33db"] + 3.994074250574132*^9, 3.99407427052425*^9}, 3.994386348684359*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"de0f1265-d9d0-4c7e-aca0-2a7371373f13"] }, Open ]], Cell[CellGroupData[{ @@ -4527,16 +4407,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[368]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], + CellLabel->"In[65]:=",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], Cell[BoxData[ RowBox[{"-", "6.498883922853802`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994074198134163*^9, 3.994074215071083*^9}, { - 3.994074250583393*^9, 3.994074270535636*^9}}, - CellLabel-> - "Out[368]=",ExpressionUUID->"08e67a85-9b14-40f9-847b-4fb28eca4378"] + 3.994074250583393*^9, 3.994074270535636*^9}, 3.9943863486940536`*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"75bf9de7-dc86-447f-a54d-21211906796c"] }, Open ]], Cell[CellGroupData[{ @@ -4601,15 +4479,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[369]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], + CellLabel->"In[66]:=",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], Cell[BoxData["78.36713764157724`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.99407419816089*^9, 3.994074215083827*^9}, { - 3.994074250592779*^9, 3.994074270550357*^9}}, - CellLabel-> - "Out[369]=",ExpressionUUID->"fc4c009b-4226-4193-8c5c-2b3c3c1cb35b"] + 3.994074250592779*^9, 3.994074270550357*^9}, 3.9943863487050867`*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"d53b77d0-0c91-42e9-a5fe-7d6eb6fc7c9e"] }, Open ]], Cell[CellGroupData[{ @@ -4650,16 +4526,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[370]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], + CellLabel->"In[67]:=",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994074198173212*^9, 3.9940742151226263`*^9}, { - 3.9940742506018353`*^9, 3.99407427055612*^9}}, - CellLabel-> - "Out[370]=",ExpressionUUID->"619b4bd1-7791-42f4-a5c9-213f0712b905"] + 3.9940742506018353`*^9, 3.99407427055612*^9}, 3.994386348715591*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"d292dd90-20d8-4de1-96dc-5fcfc4637879"] }, Open ]], Cell[CellGroupData[{ @@ -4725,15 +4599,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[371]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], + CellLabel->"In[68]:=",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], Cell[BoxData["106.6339770815765`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994074198185794*^9, 3.994074215135048*^9}, { - 3.994074250611326*^9, 3.994074270578539*^9}}, - CellLabel-> - "Out[371]=",ExpressionUUID->"fce4da0b-4d58-49d8-bfa1-3aa854f17c16"] + 3.994074250611326*^9, 3.994074270578539*^9}, 3.994386348726935*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"fa97b1bd-17e7-459f-9d2e-9145fa3d72ae"] }, Open ]], Cell[CellGroupData[{ @@ -4791,15 +4663,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[372]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], + CellLabel->"In[69]:=",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], Cell[BoxData["51.145215962859936`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994074198196261*^9, 3.9940742151460247`*^9}, { - 3.994074250621415*^9, 3.99407427059237*^9}}, - CellLabel-> - "Out[372]=",ExpressionUUID->"caf71c16-6c0a-4583-8266-aa02b4b5b181"] + 3.994074250621415*^9, 3.99407427059237*^9}, 3.994386348737904*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"3918579b-1889-4ace-88b7-95cdca6bf2dd"] }, Open ]], Cell[CellGroupData[{ @@ -4857,15 +4727,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[373]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], + CellLabel->"In[70]:=",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], Cell[BoxData["674.8474263523988`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994074198207098*^9, 3.9940742151610737`*^9}, { - 3.99407425063161*^9, 3.9940742706025248`*^9}}, - CellLabel-> - "Out[373]=",ExpressionUUID->"be7fc9b0-8863-48a4-9c93-e6fa73bf15df"] + 3.99407425063161*^9, 3.9940742706025248`*^9}, 3.9943863487489367`*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"4a7f6d12-1e92-4831-8a21-91a8adee4c53"] }, Open ]], Cell[CellGroupData[{ @@ -4873,40 +4741,34 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f1", "=", "0.8651148068"}]], "Input", CellChangeTimes->{3.991799412462593*^9, 3.9940741242012*^9}, - CellLabel-> - "In[374]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], + CellLabel->"In[71]:=",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], Cell[BoxData["0.8651148068`"], "Output", CellChangeTimes->{{3.994074198219789*^9, 3.994074215171755*^9}, { - 3.994074250641361*^9, 3.994074270614637*^9}}, - CellLabel-> - "Out[374]=",ExpressionUUID->"0bd94ba6-1cac-4885-9c50-f0aaea4b607a"] + 3.994074250641361*^9, 3.994074270614637*^9}, 3.994386348760734*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"15e0180c-17d4-4a6b-a444-7effee57c677"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184866880085*^9, 3.9918486688048573`*^9}}, - CellLabel-> - "In[375]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], + CellLabel->"In[72]:=",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.5059509024"}]], "Input", CellChangeTimes->{3.991799414288656*^9, 3.9940741307863007`*^9}, - CellLabel-> - "In[376]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], + CellLabel->"In[73]:=",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], Cell[BoxData["0.5059509024`"], "Output", CellChangeTimes->{{3.994074198240467*^9, 3.994074215185959*^9}, { - 3.994074250653763*^9, 3.994074270636191*^9}}, - CellLabel-> - "Out[376]=",ExpressionUUID->"d6386bd1-b2d0-4b17-ab3b-701bcc9a5f2f"] + 3.994074250653763*^9, 3.994074270636191*^9}, 3.994386348782077*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"fed6557e-0b1d-472c-9190-6868484bc7ca"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848669922333*^9, 3.9918486699293537`*^9}}, - CellLabel-> - "In[377]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], + CellLabel->"In[74]:=",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ @@ -4952,15 +4814,13 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[378]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], + CellLabel->"In[75]:=",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], Cell[BoxData["1.459454531271633`*^-53"], "Output", CellChangeTimes->{ 3.99132042156752*^9, {3.994074198263475*^9, 3.9940742151977797`*^9}, { - 3.994074250665307*^9, 3.994074270658412*^9}}, - CellLabel-> - "Out[378]=",ExpressionUUID->"5667e4df-77af-465e-9a0c-eec33bd9d257"] + 3.994074250665307*^9, 3.994074270658412*^9}, 3.9943863488097467`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"7617e2be-e320-4a86-8e19-20c7df31c189"] }, Open ]], Cell[CellGroupData[{ @@ -4995,15 +4855,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", CellChangeTimes->{3.991557471461853*^9}, - CellLabel-> - "In[379]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], + CellLabel->"In[76]:=",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], Cell[BoxData["1.2661663246992573`*^-54"], "Output", CellChangeTimes->{ 3.99132042159643*^9, {3.994074198275263*^9, 3.994074215207182*^9}, { - 3.9940742506747217`*^9, 3.9940742706684837`*^9}}, - CellLabel-> - "Out[379]=",ExpressionUUID->"765d9cd9-e681-4321-872e-28ffe14fdf9d"] + 3.9940742506747217`*^9, 3.9940742706684837`*^9}, 3.994386348824342*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"61721127-d43e-4e67-a44c-4f164e7da237"] }, Open ]], Cell[CellGroupData[{ @@ -5037,15 +4895,13 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", CellChangeTimes->{{3.991557474366678*^9, 3.99155747655138*^9}}, - CellLabel-> - "In[380]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], + CellLabel->"In[77]:=",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], Cell[BoxData["2.785221156803702`*^-54"], "Output", CellChangeTimes->{ 3.9913204216085243`*^9, {3.994074198287849*^9, 3.9940742152168703`*^9}, { - 3.994074250683793*^9, 3.994074270679707*^9}}, - CellLabel-> - "Out[380]=",ExpressionUUID->"51642a1c-b675-49b6-ad25-93eee018f740"] + 3.994074250683793*^9, 3.994074270679707*^9}, 3.9943863488365383`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"a954e458-183f-467f-b57b-7fe30fa3c249"] }, Open ]], Cell[CellGroupData[{ @@ -5068,8 +4924,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel-> - "In[381]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], + CellLabel->"In[78]:=",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], Cell[BoxData["12.632463348937872`"], "Output", CellChangeTimes->{ @@ -5079,9 +4934,9 @@ Cell[BoxData["12.632463348937872`"], "Output", 3.99208680410137*^9}, 3.992091247458048*^9, {3.992091392660454*^9, 3.992091446805294*^9}, {3.9920915031404457`*^9, 3.992091522601553*^9}, { 3.9920915619364376`*^9, 3.9920915885645847`*^9}, {3.994074198297542*^9, - 3.994074215226124*^9}, {3.9940742506926928`*^9, 3.994074270691636*^9}}, - CellLabel-> - "Out[381]=",ExpressionUUID->"34db26c6-a7d2-4daa-aea1-acf0cc18ab73"] + 3.994074215226124*^9}, {3.9940742506926928`*^9, 3.994074270691636*^9}, + 3.9943863488472433`*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"23887d1b-486b-41f6-aef6-2516c04fcad0"] }, Open ]], Cell[CellGroupData[{ @@ -5107,8 +4962,7 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", CellChangeTimes->{3.992086162437586*^9}, - CellLabel-> - "In[382]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], + CellLabel->"In[79]:=",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], Cell[BoxData["46.0205305394253`"], "Output", CellChangeTimes->{ @@ -5118,9 +4972,8 @@ Cell[BoxData["46.0205305394253`"], "Output", 3.992091247484524*^9, {3.9920913926676064`*^9, 3.9920914468313007`*^9}, { 3.9920915031479607`*^9, 3.9920915226223583`*^9}, {3.9920915619450817`*^9, 3.992091588571615*^9}, {3.994074198309195*^9, 3.994074215235482*^9}, { - 3.994074250701788*^9, 3.994074270702826*^9}}, - CellLabel-> - "Out[382]=",ExpressionUUID->"3776b6d2-04a0-4f5b-9f42-27d25693c208"] + 3.994074250701788*^9, 3.994074270702826*^9}, 3.994386348859054*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"2f7c45d6-e556-4eab-add8-4a4174ac7a5c"] }, Open ]], Cell[CellGroupData[{ @@ -5129,8 +4982,7 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel-> - "In[383]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], + CellLabel->"In[80]:=",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], Cell[BoxData["2.012141345084185`"], "Output", CellChangeTimes->{ @@ -5140,9 +4992,9 @@ Cell[BoxData["2.012141345084185`"], "Output", 3.9920868041580334`*^9}, 3.9920912474925404`*^9, {3.9920913926935654`*^9, 3.992091446837303*^9}, {3.9920915031795254`*^9, 3.992091522629343*^9}, { 3.9920915619686337`*^9, 3.992091588596325*^9}, {3.9940741983220673`*^9, - 3.9940742152447433`*^9}, {3.994074250713139*^9, 3.994074270714025*^9}}, - CellLabel-> - "Out[383]=",ExpressionUUID->"b11af5e8-41fc-4e30-8c08-2e5d3ad1622a"] + 3.9940742152447433`*^9}, {3.994074250713139*^9, 3.994074270714025*^9}, + 3.994386348870071*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"f83e1211-06b3-4e1b-a01c-2c6363780a48"] }, Open ]], Cell[CellGroupData[{ @@ -5152,8 +5004,7 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kw", "Qw2"]]}]], "Input", CellChangeTimes->{{3.992086303949501*^9, 3.992086304210249*^9}}, - CellLabel-> - "In[384]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], + CellLabel->"In[81]:=",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], Cell[BoxData["3.8293669742119554`"], "Output", CellChangeTimes->{ @@ -5163,9 +5014,8 @@ Cell[BoxData["3.8293669742119554`"], "Output", 3.992091392715067*^9, 3.9920914468593006`*^9}, {3.992091503202347*^9, 3.992091522636343*^9}, {3.992091561975609*^9, 3.99209158860334*^9}, { 3.994074198333413*^9, 3.9940742152536077`*^9}, {3.994074250722889*^9, - 3.9940742707261477`*^9}}, - CellLabel-> - "Out[384]=",ExpressionUUID->"de6823e9-192e-4070-8385-ab226f9ac981"] + 3.9940742707261477`*^9}, 3.994386348880869*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"6a3b0c30-a712-465c-b495-a21e9fdd1729"] }, Open ]], Cell[CellGroupData[{ @@ -5175,8 +5025,7 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qw2", "*", "hw"}], "1"]}]], "Input", CellChangeTimes->{3.992086167409481*^9}, - CellLabel-> - "In[385]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], + CellLabel->"In[82]:=",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], Cell[BoxData["176.22949978338795`"], "Output", CellChangeTimes->{ @@ -5186,9 +5035,8 @@ Cell[BoxData["176.22949978338795`"], "Output", 3.992091247547844*^9, {3.9920913927375374`*^9, 3.992091446867302*^9}, { 3.992091503209553*^9, 3.992091522657341*^9}, {3.992091561999613*^9, 3.9920915886284447`*^9}, {3.9940741983455667`*^9, 3.994074215264226*^9}, { - 3.994074250732257*^9, 3.994074270737913*^9}}, - CellLabel-> - "Out[385]=",ExpressionUUID->"1f9e653c-8f4d-4a2b-924d-7a72848bfea2"] + 3.994074250732257*^9, 3.994074270737913*^9}, 3.994386348891617*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"c389c1e5-3646-408d-ba2b-a702fbda76fd"] }, Open ]], Cell[CellGroupData[{ @@ -5197,8 +5045,7 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[386]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], + CellLabel->"In[83]:=",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], Cell[BoxData["25.418301794658518`"], "Output", CellChangeTimes->{ @@ -5208,9 +5055,9 @@ Cell[BoxData["25.418301794658518`"], "Output", 3.992086804192051*^9}, 3.9920912475547256`*^9, {3.9920913927436028`*^9, 3.992091446891386*^9}, {3.9920915032325726`*^9, 3.992091522664852*^9}, { 3.992091562006651*^9, 3.992091588636162*^9}, {3.994074198358532*^9, - 3.994074215274107*^9}, {3.994074250741933*^9, 3.994074270749449*^9}}, - CellLabel-> - "Out[386]=",ExpressionUUID->"46c51d08-5cc2-4704-9167-2f2e09ec67b9"] + 3.994074215274107*^9}, {3.994074250741933*^9, 3.994074270749449*^9}, + 3.994386348902238*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"76053966-36c7-476a-8487-37a613cdb53f"] }, Open ]], Cell[CellGroupData[{ @@ -5399,8 +5246,7 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[387]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], + CellLabel->"In[84]:=",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], Cell[BoxData["0.0058436734394963046`"], "Output", CellChangeTimes->{ @@ -5410,9 +5256,8 @@ Cell[BoxData["0.0058436734394963046`"], "Output", 3.992091247578861*^9, {3.9920913927664986`*^9, 3.992091446900387*^9}, { 3.992091503241564*^9, 3.9920915226853714`*^9}, {3.9920915620301514`*^9, 3.992091588657053*^9}, {3.994074198368806*^9, 3.994074215286108*^9}, { - 3.9940742507589617`*^9, 3.994074270762773*^9}}, - CellLabel-> - "Out[387]=",ExpressionUUID->"af68c21a-f82e-436e-af66-2a931b1fbb72"] + 3.9940742507589617`*^9, 3.994074270762773*^9}, 3.994386348918174*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"0f18b1f6-e042-4606-b91a-4ffb47e87049"] }, Open ]], Cell[CellGroupData[{ @@ -5425,8 +5270,7 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[388]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], + CellLabel->"In[85]:=",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], Cell[BoxData["11.59316378490898`"], "Output", CellChangeTimes->{ @@ -5436,9 +5280,8 @@ Cell[BoxData["11.59316378490898`"], "Output", 3.9920913928462048`*^9, 3.9920914469749584`*^9}, {3.992091503316616*^9, 3.9920915227624416`*^9}, {3.9920915621031647`*^9, 3.9920915887305927`*^9}, {3.9940741995880957`*^9, 3.994074215326008*^9}, { - 3.994074250810184*^9, 3.9940742708370953`*^9}}, - CellLabel-> - "Out[388]=",ExpressionUUID->"df4c5a65-2b0a-47de-af2c-e628799ca0bc"] + 3.994074250810184*^9, 3.9940742708370953`*^9}, 3.994386349253685*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"b56a289b-a05a-4d69-a2ae-c275fb760bfc"] }, Open ]], Cell[BoxData[ @@ -5450,8 +5293,7 @@ Cell[BoxData[ 3.992086184000986*^9, 3.9920862197077847`*^9}, {3.99208635879986*^9, 3.9920863634349823`*^9}, {3.9920864985362244`*^9, 3.992086501430176*^9}, { 3.9920869541635437`*^9, 3.992086954848522*^9}}, - CellLabel-> - "In[389]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], + CellLabel->"In[86]:=",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ @@ -5473,15 +5315,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[390]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], + CellLabel->"In[87]:=",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], Cell[BoxData["33.94280293120764`"], "Output", CellChangeTimes->{ 3.991320421637537*^9, {3.994074199680632*^9, 3.994074215339795*^9}, { - 3.9940742508320227`*^9, 3.994074270855418*^9}}, - CellLabel-> - "Out[390]=",ExpressionUUID->"384d3d6c-f2c0-49d4-9ac7-c502c9c74a33"] + 3.9940742508320227`*^9, 3.994074270855418*^9}, 3.99438634939334*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"999a27e3-02fb-43b8-bb33-d59a12138ac1"] }, Open ]], Cell[CellGroupData[{ @@ -5506,15 +5346,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[391]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], + CellLabel->"In[88]:=",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], Cell[BoxData["46.0205305394253`"], "Output", CellChangeTimes->{ 3.9913204216685333`*^9, {3.994074199693596*^9, 3.9940742153485193`*^9}, { - 3.9940742508424683`*^9, 3.99407427086861*^9}}, - CellLabel-> - "Out[391]=",ExpressionUUID->"1af4f503-8568-4897-982b-064d336e29a1"] + 3.9940742508424683`*^9, 3.99407427086861*^9}, 3.994386349409181*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"618171b2-1c89-491b-bf2a-86818a73f9e7"] }, Open ]], Cell[CellGroupData[{ @@ -5523,15 +5361,13 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[392]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], + CellLabel->"In[89]:=",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], Cell[BoxData["1.227520226789017`"], "Output", CellChangeTimes->{ 3.991320421698473*^9, {3.9940741997057457`*^9, 3.994074215357786*^9}, { - 3.994074250853683*^9, 3.994074270879434*^9}}, - CellLabel-> - "Out[392]=",ExpressionUUID->"dea3b074-5a73-4b50-8ca4-db6f0bfbb8f0"] + 3.994074250853683*^9, 3.994074270879434*^9}, 3.9943863494314413`*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"19900af5-7869-4d31-9543-488534ea2e25"] }, Open ]], Cell[CellGroupData[{ @@ -5540,15 +5376,13 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[393]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], + CellLabel->"In[90]:=",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], Cell[BoxData["3.8293669742119554`"], "Output", CellChangeTimes->{ 3.991320421726494*^9, {3.9940741997182503`*^9, 3.99407421536747*^9}, { - 3.994074250864511*^9, 3.9940742708905907`*^9}}, - CellLabel-> - "Out[393]=",ExpressionUUID->"c7ff1ef9-6135-47ae-96c7-6a73f9ca9a32"] + 3.994074250864511*^9, 3.9940742708905907`*^9}, 3.994386349470066*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"a27efada-ddc2-4f5c-ac3b-feb6af5f48a4"] }, Open ]], Cell[CellGroupData[{ @@ -5557,15 +5391,13 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[394]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], + CellLabel->"In[91]:=",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], Cell[BoxData["176.22949978338795`"], "Output", CellChangeTimes->{ 3.9913204217554817`*^9, {3.994074199730392*^9, 3.994074215377249*^9}, { - 3.994074250874675*^9, 3.994074270900147*^9}}, - CellLabel-> - "Out[394]=",ExpressionUUID->"a5b97bab-2804-4112-ac62-af681ab40920"] + 3.994074250874675*^9, 3.994074270900147*^9}, 3.99438634948321*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"23df231b-b3b5-49db-a62e-90d744226c19"] }, Open ]], Cell[CellGroupData[{ @@ -5574,15 +5406,13 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[395]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], + CellLabel->"In[92]:=",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], Cell[BoxData["41.66547715197091`"], "Output", CellChangeTimes->{ 3.9913204217855225`*^9, {3.994074199741832*^9, 3.994074215387385*^9}, { - 3.994074250886279*^9, 3.994074270909623*^9}}, - CellLabel-> - "Out[395]=",ExpressionUUID->"80e5fffc-1bbb-46db-a342-5d70545f8ca3"] + 3.994074250886279*^9, 3.994074270909623*^9}, 3.994386349493537*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"f446a13c-b8fd-4c61-bc36-9d0bc530d5f7"] }, Open ]], Cell[CellGroupData[{ @@ -5771,15 +5601,13 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[396]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], + CellLabel->"In[93]:=",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], Cell[BoxData["0.005336964975288699`"], "Output", CellChangeTimes->{ 3.9913204218154297`*^9, {3.9940741997561007`*^9, 3.994074215400733*^9}, { - 3.9940742508962*^9, 3.994074270920444*^9}}, - CellLabel-> - "Out[396]=",ExpressionUUID->"a4495230-3d33-4920-8527-ece80fea158d"] + 3.9940742508962*^9, 3.994074270920444*^9}, 3.994386349507876*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"5bae857d-8217-44f8-b553-da6b5d8b4c36"] }, Open ]], Cell[CellGroupData[{ @@ -5793,16 +5621,14 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", Background->RGBColor[0.4, 0.6, 1, 0.33], - CellLabel-> - "In[397]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], + CellLabel->"In[94]:=",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], Cell[BoxData["12.131032446982994`"], "Output", CellChangeTimes->{ 3.991320422776104*^9, {3.994074200886825*^9, 3.994074215448633*^9}, { - 3.994074250935944*^9, 3.9940742709616203`*^9}}, + 3.994074250935944*^9, 3.9940742709616203`*^9}, 3.994386349636746*^9}, Background->RGBColor[0.14, 0.8, 0.14, 0.33], - CellLabel-> - "Out[397]=",ExpressionUUID->"38fbeeef-09af-4e17-b2ce-56357eaa0c05"] + CellLabel->"Out[94]=",ExpressionUUID->"6ed7ba44-7260-475a-a154-966fe2963890"] }, Open ]], Cell[CellGroupData[{ @@ -5993,15 +5819,13 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[398]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], + CellLabel->"In[95]:=",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], Cell[BoxData["0.02319343186714865`"], "Output", CellChangeTimes->{ 3.9913204229248886`*^9, {3.994074200919361*^9, 3.9940742154600782`*^9}, { - 3.9940742509467087`*^9, 3.994074270975938*^9}}, - CellLabel-> - "Out[398]=",ExpressionUUID->"43ffb152-05c4-4d7a-85e8-9f5c899c8cb6"] + 3.9940742509467087`*^9, 3.994074270975938*^9}, 3.994386349652143*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"92d91281-2cc5-480f-97bf-b9410716e5a4"] }, Open ]], Cell[CellGroupData[{ @@ -6014,15 +5838,13 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[399]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], + CellLabel->"In[96]:=",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], Cell[BoxData["5.819188605423421`"], "Output", CellChangeTimes->{ 3.9913204230053368`*^9, {3.994074201992614*^9, 3.994074215499655*^9}, { - 3.994074250986095*^9, 3.9940742710175953`*^9}}, - CellLabel-> - "Out[399]=",ExpressionUUID->"1dfa5f9c-5715-4737-a920-5b4f3ffdc16f"] + 3.994074250986095*^9, 3.9940742710175953`*^9}, 3.994386349749453*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"223bd091-8087-4aab-a1b5-bbfd9c9ea1c9"] }, Open ]], Cell[CellGroupData[{ @@ -6114,15 +5936,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[400]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], + CellLabel->"In[97]:=",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], Cell[BoxData["0.09071336685848984`"], "Output", CellChangeTimes->{ 3.9913204230393543`*^9, {3.994074202010682*^9, 3.994074215510565*^9}, { - 3.994074250997757*^9, 3.994074271032035*^9}}, - CellLabel-> - "Out[400]=",ExpressionUUID->"61500c6b-fd21-429f-a8d7-8f81dcf3b6c5"] + 3.994074250997757*^9, 3.994074271032035*^9}, 3.994386349762567*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"dd828fc4-6d42-4d45-a130-55f0119605cc"] }, Open ]], Cell[CellGroupData[{ @@ -6211,15 +6031,13 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[401]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], + CellLabel->"In[98]:=",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], Cell[BoxData["0.9092866331415103`"], "Output", CellChangeTimes->{ 3.9913204230728855`*^9, {3.9940742020198917`*^9, 3.994074215521675*^9}, { - 3.9940742510100594`*^9, 3.994074271043561*^9}}, - CellLabel-> - "Out[401]=",ExpressionUUID->"26a10b34-a614-4bc7-ac45-b38f6f4a1eff"] + 3.9940742510100594`*^9, 3.994074271043561*^9}, 3.9943863497783957`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"8e1688b4-a15c-4198-b7c6-002bfb9d6330"] }, Open ]], Cell[CellGroupData[{ @@ -6341,22 +6159,20 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[402]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], + CellLabel->"In[99]:=",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], Cell[BoxData["0.08248445193168688`"], "Output", CellChangeTimes->{ 3.9913204231038837`*^9, {3.994074202029213*^9, 3.994074215534404*^9}, { - 3.994074251022365*^9, 3.994074271056501*^9}}, - CellLabel-> - "Out[402]=",ExpressionUUID->"46490ee9-2e34-4a9b-b167-aec1b8012b07"] + 3.994074251022365*^9, 3.994074271056501*^9}, 3.9943863497920628`*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"5f6bbb97-6edb-4a12-9e78-23f5b435cc1b"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"x", ",", "y"}], "]"}]], "Input", CellLabel-> - "In[403]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], + "In[100]:=",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ @@ -6370,7 +6186,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -6392,8 +6210,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6419,83 +6236,80 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{3.991799443370365*^9}, CellLabel-> - "In[404]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], + "In[101]:=",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"6.48886173732191`*^-210\\\", \ -RowBox[{\\\"365000401101666289871540890002851771561345\\\", RowBox[{\\\"\ -\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"776615764066213134598144000000000000000000\\\"}]]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 404, - 13, 31386465561875806036, "kernel 2"}, +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 101, 1, 25994214408697082910, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994074202050344*^9, 3.994074215550412*^9}, { - 3.9940742510399227`*^9, 3.994074271078269*^9}}, + 3.9940742510399227`*^9, 3.994074271078269*^9}, 3.994386349837714*^9}, CellLabel-> "During evaluation of \ -In[404]:=",ExpressionUUID->"8fa45948-8bf7-4a54-9ea4-632fb5f04040"], +In[101]:=",ExpressionUUID->"40073f25-fd28-4ea5-8d74-a85cf002d6a5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"8.857990908815061`*^-215\\\", \ -RowBox[{\\\"706640776532825937191303163045521029742764\\\", RowBox[{\\\"\ -\[LeftSkeleton]\\\", \\\"25\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"528119232188628582006784000000000000000000\\\"}]]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 404, - 14, 31386465561875806036, "kernel 2"}, +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 101, 2, 25994214408697082910, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994074202050344*^9, 3.994074215550412*^9}, { - 3.9940742510399227`*^9, 3.994074271082623*^9}}, + 3.9940742510399227`*^9, 3.994074271078269*^9}, 3.9943863499217463`*^9}, CellLabel-> "During evaluation of \ -In[404]:=",ExpressionUUID->"397cbaa6-1abf-4588-a667-04d7dcafa3b3"], +In[101]:=",ExpressionUUID->"bfe17939-4746-4d97-9a13-9c047212eb25"], Cell[BoxData[ TemplateBox[{ "General", "munfl", "\"\\!\\(\\*FractionBox[\\\"1.2092105844904933`*^-219\\\", \ -RowBox[{\\\"143094757247897252281238890516718008522909\\\", RowBox[{\\\"\ -\[LeftSkeleton]\\\", \\\"29\\\", \\\"\[RightSkeleton]\\\"}], \ -\\\"441445181972878563737600000000000000000000\\\"}]]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 404, - 15, 31386465561875806036, "kernel 2"}, +RowBox[{\\\"1430947572478972522812388\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"62\\\", \\\"\[RightSkeleton]\\\"}], \\\"63737600000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 101, 3, 25994214408697082910, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994074202050344*^9, 3.994074215550412*^9}, { - 3.9940742510399227`*^9, 3.994074271085034*^9}}, + 3.9940742510399227`*^9, 3.994074271078269*^9}, 3.994386349928977*^9}, CellLabel-> "During evaluation of \ -In[404]:=",ExpressionUUID->"5d56125c-00bf-46a9-87f3-526de5a7aaa6"], +In[101]:=",ExpressionUUID->"57c2c5d8-a96b-49a1-892e-7b374b589b57"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 404, 16, 31386465561875806036, "kernel 2"}, +during this calculation.\"", 2, 101, 4, 25994214408697082910, "kernel 3"}, "MessageTemplate", BaseStyle->"MSG"]], "Message", CellChangeTimes->{ 3.9913204231548862`*^9, {3.994074202050344*^9, 3.994074215550412*^9}, { - 3.9940742510399227`*^9, 3.99407427108718*^9}}, + 3.9940742510399227`*^9, 3.994074271078269*^9}, 3.994386349934215*^9}, CellLabel-> "During evaluation of \ -In[404]:=",ExpressionUUID->"b95cdd48-c445-42e3-a155-55465a58e2f0"], +In[101]:=",ExpressionUUID->"9d84aa26-ff5e-46d3-a7b3-90085662923e"], -Cell[BoxData["$Aborted"], "Output", +Cell[BoxData["12.131032446983008`"], "Output", CellChangeTimes->{ 3.9913204260017204`*^9, {3.994074202828598*^9, 3.994074216751202*^9}, { - 3.994074251569977*^9, 3.9940742721299953`*^9}}, + 3.994074251569977*^9, 3.9940742721299953`*^9}, 3.994386352890416*^9}, CellLabel-> - "Out[404]=",ExpressionUUID->"368bd8e6-f2da-4484-ba61-814264e48140"] + "Out[101]=",ExpressionUUID->"3b9314e0-8aa1-49d6-8c81-358f1e890ffe"] }, Open ]], Cell[CellGroupData[{ @@ -6510,7 +6324,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -6532,8 +6348,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -6557,67 +6372,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917994459475594`*^9},ExpressionUUID->"0f581ffd-dfa8-e845-a733-\ -ca6cc08b08a0"], + CellChangeTimes->{3.9917994459475594`*^9}, + CellLabel-> + "In[102]:=",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 84, 5, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913204262354183`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.48886173732191`*^-210\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 102, 5, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913204262354183`*^9, 3.99438635294278*^9}, CellLabel-> "During evaluation of \ -In[84]:=",ExpressionUUID->"365becfb-66c2-b442-8b7b-c6077e53a212"], +In[102]:=",ExpressionUUID->"73878d0c-d137-42cf-a231-e2fd77089327"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 84, 6, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132042625132*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.857990908815061`*^-215\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 102, 6, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913204262354183`*^9, 3.994386352948957*^9}, CellLabel-> "During evaluation of \ -In[84]:=",ExpressionUUID->"2b170196-02e0-d544-a5a5-d90722dc10dc"], +In[102]:=",ExpressionUUID->"c80d2861-3611-4992-9b4c-8712a20de629"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 84, 7, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320426261322*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2092105844904933`*^-219\\\", \ +RowBox[{\\\"1430947572478972522812388\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"62\\\", \\\"\[RightSkeleton]\\\"}], \\\"63737600000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 102, 7, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913204262354183`*^9, 3.994386352954157*^9}, CellLabel-> "During evaluation of \ -In[84]:=",ExpressionUUID->"02967e8e-3430-cf4f-b706-b82af40300a2"], +In[102]:=",ExpressionUUID->"4fe05996-2323-48fe-8eed-83338adb74b8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 84, 8, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320426270418*^9}, +during this calculation.\"", 2, 102, 8, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913204262354183`*^9, 3.994386352959257*^9}, CellLabel-> "During evaluation of \ -In[84]:=",ExpressionUUID->"a8933e75-6bbd-684a-8439-656414d7fe5d"], +In[102]:=",ExpressionUUID->"22fece90-de38-43d7-b98e-c99403df6f59"], -Cell[BoxData["8.233206772574558`"], "Output", - CellChangeTimes->{3.991320428882721*^9}, - CellLabel->"Out[84]=",ExpressionUUID->"0790c690-9267-6441-bc9c-d353ab16b428"] +Cell[BoxData["5.819188605423418`"], "Output", + CellChangeTimes->{3.991320428882721*^9, 3.994386355879487*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"a566684d-ca30-4210-82ab-946a9823e156"] }, Open ]], Cell[CellGroupData[{ @@ -6627,140 +6447,142 @@ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ - FractionBox[ - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox["1", "1"], + RowBox[{"(", RowBox[{ - RowBox[{"(", - RowBox[{ - SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + RowBox[{"(", RowBox[{ - FractionBox[ - RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{"2", - RowBox[{"(", - RowBox[{ - RowBox[{"-", - FractionBox["1", "Cw"]}], "+", - FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", - RowBox[{"Cos", "[", - FractionBox[ - RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - SuperscriptBox[ - RowBox[{"(", "x", ")"}], "2"], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "x", "*", "y", "*", "\[Pi]"}], + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox["1", "Cw"]}], "+", + FractionBox["h3", "Cb"]}], ")"}], "*", "x", "*", "y", "*", + RowBox[{"Cos", "[", FractionBox[ - RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", - SuperscriptBox["\[ExponentialE]", - RowBox[{ - RowBox[{"-", - FractionBox[ - RowBox[{"y", "*", "y"}], "1"]}], - RowBox[{"(", - RowBox[{ - FractionBox["1", "Cw"], "+", + RowBox[{"z", "*", "\[Pi]"}], "180"], "]"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", FractionBox[ - RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], - RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], - RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", + SuperscriptBox[ + RowBox[{"(", "x", ")"}], "2"], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h1", "*", "h1"}], "Cb"]}], ")"}]}]], "*", + SuperscriptBox["\[ExponentialE]", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"y", "*", "y"}], "1"]}], + RowBox[{"(", + RowBox[{ + FractionBox["1", "Cw"], "+", + FractionBox[ + RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], + RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], + RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917994505623856`*^9},ExpressionUUID->"1834f328-2171-004d-99c2-\ -8b70b5354bda"], + CellChangeTimes->{3.9917994505623856`*^9}, + CellLabel-> + "In[103]:=",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk0VlsfB3BzGRvMROZSmYdosH8ZMo+lzOlxnmMqRLmKDAm3awi5pVGF -kgyZmpRX6UookiJFxueR4TGekPBuf5x11mftc77nu/Zee68jTwt2onOwsbEN -42v1fuKD+pYnrR+MDHnrTapmKWTEytOjmRYhxNm3XIndm6OfpWT6AnmW6muu -2oF4zyOg8x/q1H7bUY5dFhFTx23ajD41ZVKPsC/US9TGFH5Elh+vXijBftZ6 -4tYf7c9oTcX3Sw+xR7oao05Xd6I3C+4iBdhSQ4ruv0y+o5X9Evx52NYTUYZh -zT+QhPPGiBzsmj8j/BGFfchyzsr9GvaXOPHIx0ED6IZkXWUWNovHdGRWewix -vYo8n4bNkxLiqjPHQGr84Y1J2LIbbjacqB5Gr9UrEmOx7aR/3WOZjKE0l8Wj -IdjkbQUxtbUspGjBG+eLHaNsnxDYPIHeDxwR88LuFG/XOlk4hTQ5WbmW2IRb -gP+llGnUr696wwh78gbbnfKgGXQjvJJPB3utgtr6KW0KiSTXWUlhZxF15utF -fyHnL9abBLHl7rvGaMz9QjlSasTKDIUMdiSyjlfPI+0UrsP92H76P5pHTP6g -9hCnd3ewZyNOcfGpLCE73XHbdOzYav49qmuXkfSJOYto7GwweOjbvIISj/ve -dcEm8htMQwvZwS9KbIAHu7D+Um+cNAfk+6ZKT03jvkyvqIwUDog9m97YhR21 -jap4FMQJVYetU4qws0rlFSe0uYEVxpdjid3VOlaznMsNS5UuKRrYctNP3IRE -eUCa7dCkCHaRrl2m2hwP6C+EbOqZotCbZ2fYj1WvBbEXldwB2FTdpx/DJgKg -F6ki7zdJoY02AusjawRgYDkj2Rhbs90UBA0F4T2dw3kTdsBg1W0tdSGwcdrI -/WGCQiEczZp7BdaDJHztUsUeUiiZSvi1AXaqvCXqxvH8kI28LTobwSgjq+4S -NsdDhrzEiY1wgWM+zgdbTmezU+HoRhD5/kCGHdvNJL38Q68wvFvp+ag7RqEW -n9Aw8SZRmMxV3Rk9QqGe+2nJ3mvFIPCyb5Yp9thoYe4DMzEQs2U58mHznRz4 -tLtWDCb2r2Fd+kkh0/MHdb2rxEH5xNuHOcMUep6nTxXkSIJkxrjFVQaF8oZ+ -h+86KQPr7JcCRfspZOGc1BNWLAPX9uwWed+H898I7y9myIBIV732eWzdvB2i -cq6y4Jr+p22yF88nzauC22gzLO71vFP3g0LTE71/DcfLwY562XP23RQSPm5a -WWGrAK7KS8/YOinEyOPzcwhQgFtncszvd1Do6fdW6fFEBTAj/G1tsT1sPONV -ahWgIL7q1ZUvuN/2cKer2orQJ7xip/IZf3/k/mS0uBIExajwb2uj0EFffjWr -PmUwKRRNaG6iEAp31j68pAym9kYOBPa2hJydhKQKeEXOX1tspBBbro5xtKMK -ZBkElG7FLu5xP1z+SgXCr5h9iWrA+/NQUZzU3S3AXqazQ/A/3M/U9ssITRUW -i37FfHhJIWmFizHJgztgeLrHuLOYQi/+mVVd4FADY8HCtWbYHjOu7aS8GvC/ -C95bVkShW2+UVI291KCQhzab9JBCCr7P2+Y71KDv8pbr6g9wv6IhZbJJHZby -XjK88ygkIy1LyrlqAqdZnr3bNQrtyD8psIi0QWP93r/vn6cQjYin1Oy0IU1p -u+FSPN5fipk93h7acHl0PNQJm/Nu6aP6CG24G0DGLcbh/XFr5GBmmTZ0jbkI -WsTg8y/b+6aqog6Efd222Hgar0eyjboLjy7Euhuwnw6i0J1QJYeqZj2Q4Ow4 -F3WIQq3haOf5fEOQXFeben0TheS9Ptt5HtsLH9vctWK/zyL6yuMSmdMA65Jc -z7dfm0Xio0/XiNOMIVXyvuWU7Sw6qbPne+Y2U7iYxBOfyD6LaON/GoRHzCC6 -Vjp2tHwGFRuHrclpMYfpu0mWu9xmUN5swKuiLEvIyS2omuKaQfP7JN6/ibGG -hKTU7afvTaNuNs6pvqO28Gl3Ce9Ri2kUtCk4PU7RHtbYRZWwT06hEv+G2n8T -HGBCrENROH0KnZmRnNvu7whj1rLnKP0pRFntP/T2iBNY+0+wHemYRIbuGfuG -HA/AvWv1YQtnJlGb5M2ANzoHgZnomx+iMomk7sW/KNjqDO/UZa0YVyfQ095t -NnaCh2C75LCF/xwLybZP+oaPHwKDBGmRQQ8W0vk3oyi39zB4VyzZrqkeRze5 -ZtQz61wgyluQ95nqOHq8T6Mr4ZkrBNaYfmrOHEPZO//Z8KfQDYJ4NqvGc4+h -lm/5iTop7tBoMr/M+/coqrK9oRQS6wFmkb79izyjaOr4AbYgwhNMzEcPafw7 -gqj9qn4sEy84FkiPZ20fQQXjX+fD9I+AV+dNqqX2J3K5k+/jKeANm6OfDiT5 -/EQV5dZHOJO8oX45+NoD7p/IULpt4cKCN5yz6R1srhxGir2+XR/9j0Jh7EvP -b4HDaJA/0P7GwFH4KiSv1aA4jFrT7HzMnWlw9tjtV6JMJsqKyOE/1UqD6Usz -pwKLmOhFzcqCj6UPtKZnr587zUTrPCBJ57kPDGvpnd7tyERyIm9bNr3wgSP9 -WruyHZhIs9lWgqfGB3pf+R2n7JnIaY/7g85XPlCyErGtzA7nbwpvOvvOB9po -LctqNkwk1f1wXUOnDzCGngjuNWciJS/xbI85H7BxZJQ+2stEht6sggRdArTK -d5Pj25no3tXJMDt9Apr0r6cFY4t8mjYSNyBg5umY5PQ2JmKZzbUX7Cbguaan -67wqE583bOzNxgSwZxhE8m5lIqG5Da4bHQlQy+KwNFJiosFUPd6c4wQoDoUv -T21iIse3O9t9gwkYHBCKi8WuYduVo3mCgA+Wh8l12FfDjPRenyTA+NSUi7o0 -E9m5mh8diiTA6LVIT4gkEz1Tcn22/R8CivN9ybViTJRWHeX/9B4BXfuFaHHr -mOi49hXDiAICkK2+jiy2zYMyXoNCAuSvLtGqhZiI7wrjwZNiAg44+PT8EmSi -hFCHkceVBJSXeZiGCjBRlKpSYNVrAmgJV5rO8DJRwJWmY+U9BGRML1S3cTKR -pRBjT2gvAYvBTM9I7K0JbILa/QRku+/zUsJmhOoVlw0RAPG6Z/7iYKKjdjnj -j8YImE9mySqwM5ELd1hQ6W8CCLEAqQvLDGQeJhVSJEaH1tCMlpsLDPQ6J9Eq -U4IOaz5u+myNvad5WilCig6jxdmWv+cZSFO56auJLB0G9NxjXLAlOyJNvinT -IVG3W0YK/yeN7uoW49Ojg8pFf+XyWQa6yHH7pe8BOjjXPz2gN8lAfBoC2bbO -dNgyj3SnJhjovHtEqM5hOvBaJ8YXY0dUOmxZcaPD5mdWQVuwj5LsGZdpdDg4 -nXxSjsVAOo004r8TdHD7WWu8ZYyBOjKU+RXT6SAkNvU9aZiBSpCg33AGHXoM -6zSdsc+Pz74pvkSHA7K9gwrY2pZvog2u0MEi9tfx/zEZKI3NZ9r2Fh3e+kdx -LjEYaH/w7a8RRXRo+2vr7n+GGEhG5m99oxI6LPvsueSJPdsYfInzER2CdFKt -tbDvqiDbtAo6mEP/96+DDLTU3V2b+5wOGm0m5zSwK22kCz400CEzyqBjrJ+B -kn9zcGc10qFA56V2PTatYOSoazMdmu6HsnKw13M9lx5soYPJ72OJB7GPVbtc -XPhChyLBFIPXfQykuO1yuNIQHTZ8+JFX2stAvzvOfvrJoMNVxmbOi9itCXTN -0mE6BDsmvgrCju7THTEcowOtts5LA7sr+5On/Qwd2tsnpap+MFDmmg1mZ9hJ -WKuQfbWth4FeTHe7n+QkIZD3IrMSm9ldGBrETULideviK9h7Kk1v03hJ+Cgs -fNsLm+EdsWi1gYQvOu8UprtxfxuzjWbCJDCMvql3Yu/euVEViZJA9heX12Cn -CxYd0pEkIeJmpnzq6vjzH2XS8iRwbbW6oYFN5hc1iCqS0LbFkZRcfT799I91 -yiRc8xAp4MRmkMKCXKokfPd9n/n1Ox4XNvcb0ySBVfKHKxn7+bJwDEObhCOs -jpQI7KGfvf/26pIwWxKYQmLvqj1T125AQqdg9bQJ9uCxEtmXQILfQZY7F7aQ -S6TeE2MSHl4/d4f6xkCGJhY2ZaYkCHk3ezGx0yT7T+dbkBC9MQaasZ9ylabn -WJGQ5c0k/oc9MBF5/6oN7j/KyV6BbVAv+jnVgQSU7XL7OjatrH80yYmEUxrp -uenYqTdKOc4dxPM1cUY2Ebs/1FIz3IUEmTm/yFBsQS8x8xA3EqbfBXr6r+ZZ -DngGeJBg3iP3xHv1/c1nk728Sehhv/PRYbUPn9VdFxoJtIrATMvVPErsmRNB -QukIs9F4Na9voMWGJKEuRjRyz2pe8yPGfj8S6Lazd/VX+z05uwQBJKzROm+s -tZp/10pk9zHcj+8/1x2r+ani2/WCSJCteTy8ZTU/YnCfRggJbpquE4rYAkSZ -i2ooCUZWRcflsHfaRwcrnsR5c6U+Mqv5u6wTZcJJqFEiPkphpyhL3BSPIGH3 -m4bHEtiP1w9VbDhDgui7bmFx7L7Fskb+KBIyVXOHRVfzmdF93NEkTPRI6K1a -v816fiUGr+eg0YII9v8BEOUgTQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk0Fm0bAHBZSsKLQhRZK4pkF5/7smQnqWSPx8zYokIlaypaLCGiIm1K +D5JEWepVUpKiaE9hPPLad8+0+e7+mDPnd+bMdV/nWm5F1h4XkpeHh2cAP3/f ++15prrnX/sqUVtTvNtlII9PRa3osy1Ikr84v/T/s7kL9bBXLenTqZHDdXzsT +LxcK6zShXuugl6bYFVEJjQKWrcgwnMcRsE8+Xd6QwH6N0mW1Nplj17Tvu/hL ++y3a4sbNtsQe/NQSe6juAxqxdve2xpblKHvOWnxBKku2nbHDth+LNYpo/Yaa +mjn6TtgPfw0uiWL3oOFScRsX7HeJ0jHVYTRqHnj31BV7dKHl4LQ2B729o1fp +ib0wda+7zlw/umSlKeKHLS9e0LyvbgAxfQ2dFLbTitnroxbDaKtPVWkENnVJ +SUpDcBS1dEo/iMZOUN2SFNI6hh6nShofwf4g3bkxkj2BtDf2JWRhEx7BQWdS +J9GF3iqrC9jj+TyX74RNId9dKjHXsAWVNMQmtGfQ17iP6+9jZxON1mKSs4hH +VJH9GFvhhnvChrlZ5Ga1KOcltuH65NHQOi6ybaqo7MMO1P/WOmjxC3VWpy9b +rk2j6aj9/EKrf6MK+c9/VLEP1y0xURP8g350t7jqYueBYUlA6zw6qJW7xQWb +KGq2DGcvAMp0jjiDzX56pjtxBS88zAuvv4Y9/t0nNjOVF3bZ5yZWY8eqz1Te +DuODMdnu7Z+xs8sVlce0BeCo5olV6jo0+tQ+/PDPVQFInqT6TLEVJu95iEou +BHW3Want2KW6Tlkacwsh/p91TQnYT2qiF+yuE4TniYutvmDPNHZ8G7AQhh6R +s59u6tJIwkFYLOahMLTGD7x5hq3VaQkiRiLQImzi0I8d3Fd1aaOmKFy3H3mk +okejvbytWv8TFoPrB2/W3MDmKN2aSJoVByNxtS9N+rg+VMviNh0J6JwP4Axh +85b0Ky7fJwGxB5/ukTDA+eqscmEPSYBh7uAiP2wPi4w7r7qXwiZjESt+Qxq1 ++YdHSL+QhA/5DT9ZRjT6eiM9xVdQCs57CS7PxB4eYl+9uVkKGvRyqv7FFoqk +O4wbpMAo60Sk/CYaWR7brutbJQ1myxR4e7Frr+nPFBfKgGFRtE+iCY2ucX4c +2BQpB4nBuVqKQCObHce/RpTJQX+fg6sn9vCTpVZl/XLQVCk0koOte229pIK7 +PIxdYYcKm+F6snwqBUxXgbNZa90f7Mmx7oMDRxWgXXR9OteCRktDLe9WOirB +4ICqopkNjfqvCQU6ByvBDXZz6Ens+1/aV4wkK0F3yYd1b7C9HLyPrm5QghMR +Tr8IW5zfugMu57SVYVnk9OhpO3z+4I3xeGkVePDMVf6nA422ByzRsOtRBefo +qX9Xu9AIHdihvfO3KlwsHE2LwVZPKjQgZFbDUCHxvB2b56qOefzW1VA53n4i +dhuNyr567rzzaDUQCrLqH7fj/XQtTZS9sgZsCIa5vhPnZ+n4bpClBv+wLIez +vWl0dVvu57l4NTjfkbdvDjud1dPNf0ENlI6NER4+eL4P7x+S71AD049VOYq7 +aCReX8CzzUId3g6sVqjyxfOjM6pep7wOPoSUfxn3p9EKpdMJKX3rISaYV6ou +mEb1p6bVGF4N4BOqH9UNwfWYcu+kFDUgT7XQthz74hMVNXMfDajW/5VUtJtG +SgG1b7jvNcCFr1UmD9876qUcVeqFJoimsytzwmkkt0KeUnDXAhMtwZ7JaBqt +L4oU/om0ITro8AP9NBqxiKMzGk7acGnYk+8Zdp5y1ldfL/xdUqd+ZzqN+K6U +334apQ1iaCw5+jTet4uD27MqtCHE0yuxKRPfp3m+BWrKOpB/UkBs31nc3xQH +TbeFulDffKhJ/hKNLoerOFe16sG/xQlr392l0Z2vDSnLv+gB74viocwqGj22 +834WM6QHsgP8hk7VNOpTOmtqLqQPEuz43c33aLS6Y5FGm7U+UEM5mxtr8T7r +DC3+77E+nD3i+uhNA+7PdEXjyhoDyGo9v9b9JY3aDyCDY0VGsNX+l/TCARop ++rx18t79P2Bqjj5sVupD5Hz1LblDAP3vn4R4+vUh6aH7i6RZ5lBi1CrdXdaH +InVMvmSpWwLfao2j13/3IdbIr+alg5vh57Is4Z5tHFRmHrGosM0axmJkk9m1 +HHRtOvhRabYtHG5ZJhGt3I+4ZstfPkmwBw5R2ihR2I+6ePgmevwcIcZfT+ul +0ncUtnJPRqLyFpis+9G14cZ3dCuouSEnyRm+Nh19HG42gKKnZObWBW0FQUeb +gorPA2jGzsr12S4XELR0yzZP/w8ZeWaacbZug8xgvYMetoPojUxB8BOd7XDX +ZsXyDN4hJHv9aH3x2h0gwLvym+z7IXS/W93BScQVzN3evMotHkbyneMBB0Zc +YRfpG21xeATp5GSWXu3eCU2R6NfZ/aOogH9KM6vRDcoZWmaAGEPVZhs+JdW4 +g4PnxubTRuMoz+CU+C+2B5zI8Z7zaBxHbZ+LknVSPSGzweCBlM0EqnLMV9l7 +2Av6e0svS36ZQBOh23jCCG8ofSTzMTRoEs1YqQWOWvjA1jevZ+1nJ1HxyEdu +hP4u4LbHXHibMYXcLhf5ewv7QtmX2puXFKdR5R37XXzHfeFAT9cLvofTyGjF +G+Yk4wvoVJu+sdMMUu4O+PQ6yA9MP/NOXPwwg/qWhGzJp/3gfYh/U3vQLGpP +d/K33sGCnSGOizWGZlF2VOGS/e0saI2uk+8Om0P1D+cZf1t/6D8pxTzjzKF/ +vOC4Tq0/6DMVP97acpGR72hxki4BgTntwu+Luej6ufEIJ30ClG6/NZZjc9Gy +jklTaUMCavI/ZLBKuGh081xnsTEBucIFJYNlXHx/8SxoNSeg1jjtwvgdLhKd +E3eX2ErA2amfCh31XNSXpre4MJQAf5FA9ngbF6XXxQbdv05ApPjetLgpLgrV +zjWKKiag8ITUlaRpLnK4WbHYkE2A9qWCjtQZLhLK7b95r4yAvXnOqXlzXJQU +7jxYfZeAajLQsegnF8WqqYRUPSZg0n7y/Rk+BgXnvth95ysBGcwCslGCQbai +/Sbh3QQsVKi6eGspg9Ym8Yho9xJg21s/kreMQf3hemUVHAJ+tnNagqUY5OdU +OHJ7mIBH9UExfLIMchOICCv/QYACZX1MUJFB1hGye0ulSHgUnH1/lyaDHhcm +22UtJyE91e6C6QYGmbROqkTJkrA+sc1vpRaDtFRffLSQJ0HUz/Jc50YGybyP +sfisSkL/xm62gR6DhjZ1SQnpkXB8QlSp2ZhBp3kvPQjYRgJp8bRGzIZBQhuE +8xx3kOA171r4AvuYZ1S4zk4Sgr2RX5Itg6LuOq+Z9yDhI9fk0Iwdzp9akHmW +RcIxl0XTzxwZpNPCIpr2keDd/rhfbxuD3meqLlHOIKF6l4qfrjeDbiGRwIFM +EhYYXA9rwD42Mv2k7AwJysteR9n7MEjb9km8YS4Jz09kHfHZxaB0Hv9Jx4sk +KGh+D4jyY5DVnksfo0pJ6Jpp9IwhGSQnd0Lf9BYJL19nKM9hT7fsOcN3m4Tk +gX7OPopBV1Yjx/RKEixflbsTAQz63dXVcLWWhKH1dj9Mghh012FF8atmEppr +1wo82M2glB+8AtktJHw9uzFgbSiDWMWDfu6tJFgNcR5lYYvx167oayOhvLzX +lwhj0O46t9PMOxI2mBmY/9zDIGX1swdUOCSovIiPmQtn0I/3cR3/9ZOgXdPl +6RLBoPYkUqt8gITGI446pdjxPbqDRsMkXLTmfeYVyaBPeR3eW6ZIEO42S6jY +z6CsReKboxdQUMHlU1CLYlD9ZJdnJB8FF0sNmBjs713s8DABClwKziW/xDa5 +a3mJtZgC6mD8g92H8Lz5Rv20E6fgzNb5vAvROH+HzRKbl1KgZ/5WrA/b2EBC +DUlSkPZRzGRdDIMyREpddWQo8CjxKq3CNq79VrFCkYLL+h8mamMZRBWVNksq +U+DwLIiXwc7IOPTtH1UKnJwrm/Ti8HnUUhF+NQo0o1YRJdgZS60Dh7UouLvI +4U9yPINq/yxN6NemgO106kotNue/7pxuXQo430e4w9ibGqIbOw0peNFC1zkm +MKhv9y35B0DBH/WPefPYom4xevfMKeDjpLWuPcwgIwsbhwpLCtT3jFc4Y6fL +9B4qsqEgySolMx/7Pn95RqEdBcdeslMasOmxmBvnHCiwz7MyoLENn0q+TXOm +YM3Kp1dUEnG/K3qHjrvgehzMZllgp+WX8x7ZTgHhebfDF7s33FbrgBsFnRWP +n+dii/hIWe/1oMBCq9CpAtvQlvYO9qLgk9PNY8///r8qLsXHl4K1+mv4Z7Hv +C9ldcWNRILk/1VHoCI43I1XjQlCQC7w2ctgiPXSbA0XBBvLIlCa2YevtfqtA +CtpXLnJG2Kx7cb8hmIKnoineTthpV+yWGe+moHvL4pVe2PfTpNfpheF5YMWl +BP6NH9VntmEvrqceXRKBLUxUuKmFUxC5xiAuDttgS/we5UgK5hYcmE/6G3+T +fbLcAQpCfudrp2Gnqi4vkI6iIO7fm1JnsKvFOJXi0RTs9Dxfkovd87OiZUks +zn9r6MT5v/G/x/cIxFMQkaE4kI+t/8aeO59AQUFE9ekC7P8DmuHzsQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6774,105 +6596,106 @@ v816fiUGr+eg0YII9v8BEOUgTQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0VlsfB3BzGRvMROZSmYdosH8ZMo+lzOlxnmMqRLmKDAm3awi5pVGF -kgyZmpRX6UookiJFxueR4TGekPBuf5x11mftc77nu/Zee68jTwt2onOwsbEN -42v1fuKD+pYnrR+MDHnrTapmKWTEytOjmRYhxNm3XIndm6OfpWT6AnmW6muu -2oF4zyOg8x/q1H7bUY5dFhFTx23ajD41ZVKPsC/US9TGFH5Elh+vXijBftZ6 -4tYf7c9oTcX3Sw+xR7oao05Xd6I3C+4iBdhSQ4ruv0y+o5X9Evx52NYTUYZh -zT+QhPPGiBzsmj8j/BGFfchyzsr9GvaXOPHIx0ED6IZkXWUWNovHdGRWewix -vYo8n4bNkxLiqjPHQGr84Y1J2LIbbjacqB5Gr9UrEmOx7aR/3WOZjKE0l8Wj -IdjkbQUxtbUspGjBG+eLHaNsnxDYPIHeDxwR88LuFG/XOlk4hTQ5WbmW2IRb -gP+llGnUr696wwh78gbbnfKgGXQjvJJPB3utgtr6KW0KiSTXWUlhZxF15utF -fyHnL9abBLHl7rvGaMz9QjlSasTKDIUMdiSyjlfPI+0UrsP92H76P5pHTP6g -9hCnd3ewZyNOcfGpLCE73XHbdOzYav49qmuXkfSJOYto7GwweOjbvIISj/ve -dcEm8htMQwvZwS9KbIAHu7D+Um+cNAfk+6ZKT03jvkyvqIwUDog9m97YhR21 -jap4FMQJVYetU4qws0rlFSe0uYEVxpdjid3VOlaznMsNS5UuKRrYctNP3IRE -eUCa7dCkCHaRrl2m2hwP6C+EbOqZotCbZ2fYj1WvBbEXldwB2FTdpx/DJgKg -F6ki7zdJoY02AusjawRgYDkj2Rhbs90UBA0F4T2dw3kTdsBg1W0tdSGwcdrI -/WGCQiEczZp7BdaDJHztUsUeUiiZSvi1AXaqvCXqxvH8kI28LTobwSgjq+4S -NsdDhrzEiY1wgWM+zgdbTmezU+HoRhD5/kCGHdvNJL38Q68wvFvp+ag7RqEW -n9Aw8SZRmMxV3Rk9QqGe+2nJ3mvFIPCyb5Yp9thoYe4DMzEQs2U58mHznRz4 -tLtWDCb2r2Fd+kkh0/MHdb2rxEH5xNuHOcMUep6nTxXkSIJkxrjFVQaF8oZ+ -h+86KQPr7JcCRfspZOGc1BNWLAPX9uwWed+H898I7y9myIBIV732eWzdvB2i -cq6y4Jr+p22yF88nzauC22gzLO71vFP3g0LTE71/DcfLwY562XP23RQSPm5a -WWGrAK7KS8/YOinEyOPzcwhQgFtncszvd1Do6fdW6fFEBTAj/G1tsT1sPONV -ahWgIL7q1ZUvuN/2cKer2orQJ7xip/IZf3/k/mS0uBIExajwb2uj0EFffjWr -PmUwKRRNaG6iEAp31j68pAym9kYOBPa2hJydhKQKeEXOX1tspBBbro5xtKMK -ZBkElG7FLu5xP1z+SgXCr5h9iWrA+/NQUZzU3S3AXqazQ/A/3M/U9ssITRUW -i37FfHhJIWmFizHJgztgeLrHuLOYQi/+mVVd4FADY8HCtWbYHjOu7aS8GvC/ -C95bVkShW2+UVI291KCQhzab9JBCCr7P2+Y71KDv8pbr6g9wv6IhZbJJHZby -XjK88ygkIy1LyrlqAqdZnr3bNQrtyD8psIi0QWP93r/vn6cQjYin1Oy0IU1p -u+FSPN5fipk93h7acHl0PNQJm/Nu6aP6CG24G0DGLcbh/XFr5GBmmTZ0jbkI -WsTg8y/b+6aqog6Efd222Hgar0eyjboLjy7Euhuwnw6i0J1QJYeqZj2Q4Ow4 -F3WIQq3haOf5fEOQXFeben0TheS9Ptt5HtsLH9vctWK/zyL6yuMSmdMA65Jc -z7dfm0Xio0/XiNOMIVXyvuWU7Sw6qbPne+Y2U7iYxBOfyD6LaON/GoRHzCC6 -Vjp2tHwGFRuHrclpMYfpu0mWu9xmUN5swKuiLEvIyS2omuKaQfP7JN6/ibGG -hKTU7afvTaNuNs6pvqO28Gl3Ce9Ri2kUtCk4PU7RHtbYRZWwT06hEv+G2n8T -HGBCrENROH0KnZmRnNvu7whj1rLnKP0pRFntP/T2iBNY+0+wHemYRIbuGfuG -HA/AvWv1YQtnJlGb5M2ANzoHgZnomx+iMomk7sW/KNjqDO/UZa0YVyfQ095t -NnaCh2C75LCF/xwLybZP+oaPHwKDBGmRQQ8W0vk3oyi39zB4VyzZrqkeRze5 -ZtQz61wgyluQ95nqOHq8T6Mr4ZkrBNaYfmrOHEPZO//Z8KfQDYJ4NqvGc4+h -lm/5iTop7tBoMr/M+/coqrK9oRQS6wFmkb79izyjaOr4AbYgwhNMzEcPafw7 -gqj9qn4sEy84FkiPZ20fQQXjX+fD9I+AV+dNqqX2J3K5k+/jKeANm6OfDiT5 -/EQV5dZHOJO8oX45+NoD7p/IULpt4cKCN5yz6R1srhxGir2+XR/9j0Jh7EvP -b4HDaJA/0P7GwFH4KiSv1aA4jFrT7HzMnWlw9tjtV6JMJsqKyOE/1UqD6Usz -pwKLmOhFzcqCj6UPtKZnr587zUTrPCBJ57kPDGvpnd7tyERyIm9bNr3wgSP9 -WruyHZhIs9lWgqfGB3pf+R2n7JnIaY/7g85XPlCyErGtzA7nbwpvOvvOB9po -LctqNkwk1f1wXUOnDzCGngjuNWciJS/xbI85H7BxZJQ+2stEht6sggRdArTK -d5Pj25no3tXJMDt9Apr0r6cFY4t8mjYSNyBg5umY5PQ2JmKZzbUX7Cbguaan -67wqE583bOzNxgSwZxhE8m5lIqG5Da4bHQlQy+KwNFJiosFUPd6c4wQoDoUv -T21iIse3O9t9gwkYHBCKi8WuYduVo3mCgA+Wh8l12FfDjPRenyTA+NSUi7o0 -E9m5mh8diiTA6LVIT4gkEz1Tcn22/R8CivN9ybViTJRWHeX/9B4BXfuFaHHr -mOi49hXDiAICkK2+jiy2zYMyXoNCAuSvLtGqhZiI7wrjwZNiAg44+PT8EmSi -hFCHkceVBJSXeZiGCjBRlKpSYNVrAmgJV5rO8DJRwJWmY+U9BGRML1S3cTKR -pRBjT2gvAYvBTM9I7K0JbILa/QRku+/zUsJmhOoVlw0RAPG6Z/7iYKKjdjnj -j8YImE9mySqwM5ELd1hQ6W8CCLEAqQvLDGQeJhVSJEaH1tCMlpsLDPQ6J9Eq -U4IOaz5u+myNvad5WilCig6jxdmWv+cZSFO56auJLB0G9NxjXLAlOyJNvinT -IVG3W0YK/yeN7uoW49Ojg8pFf+XyWQa6yHH7pe8BOjjXPz2gN8lAfBoC2bbO -dNgyj3SnJhjovHtEqM5hOvBaJ8YXY0dUOmxZcaPD5mdWQVuwj5LsGZdpdDg4 -nXxSjsVAOo004r8TdHD7WWu8ZYyBOjKU+RXT6SAkNvU9aZiBSpCg33AGHXoM -6zSdsc+Pz74pvkSHA7K9gwrY2pZvog2u0MEi9tfx/zEZKI3NZ9r2Fh3e+kdx -LjEYaH/w7a8RRXRo+2vr7n+GGEhG5m99oxI6LPvsueSJPdsYfInzER2CdFKt -tbDvqiDbtAo6mEP/96+DDLTU3V2b+5wOGm0m5zSwK22kCz400CEzyqBjrJ+B -kn9zcGc10qFA56V2PTatYOSoazMdmu6HsnKw13M9lx5soYPJ72OJB7GPVbtc -XPhChyLBFIPXfQykuO1yuNIQHTZ8+JFX2stAvzvOfvrJoMNVxmbOi9itCXTN -0mE6BDsmvgrCju7THTEcowOtts5LA7sr+5On/Qwd2tsnpap+MFDmmg1mZ9hJ -WKuQfbWth4FeTHe7n+QkIZD3IrMSm9ldGBrETULideviK9h7Kk1v03hJ+Cgs -fNsLm+EdsWi1gYQvOu8UprtxfxuzjWbCJDCMvql3Yu/euVEViZJA9heX12Cn -CxYd0pEkIeJmpnzq6vjzH2XS8iRwbbW6oYFN5hc1iCqS0LbFkZRcfT799I91 -yiRc8xAp4MRmkMKCXKokfPd9n/n1Ox4XNvcb0ySBVfKHKxn7+bJwDEObhCOs -jpQI7KGfvf/26pIwWxKYQmLvqj1T125AQqdg9bQJ9uCxEtmXQILfQZY7F7aQ -S6TeE2MSHl4/d4f6xkCGJhY2ZaYkCHk3ezGx0yT7T+dbkBC9MQaasZ9ylabn -WJGQ5c0k/oc9MBF5/6oN7j/KyV6BbVAv+jnVgQSU7XL7OjatrH80yYmEUxrp -uenYqTdKOc4dxPM1cUY2Ebs/1FIz3IUEmTm/yFBsQS8x8xA3EqbfBXr6r+ZZ -DngGeJBg3iP3xHv1/c1nk728Sehhv/PRYbUPn9VdFxoJtIrATMvVPErsmRNB -QukIs9F4Na9voMWGJKEuRjRyz2pe8yPGfj8S6Lazd/VX+z05uwQBJKzROm+s -tZp/10pk9zHcj+8/1x2r+ani2/WCSJCteTy8ZTU/YnCfRggJbpquE4rYAkSZ -i2ooCUZWRcflsHfaRwcrnsR5c6U+Mqv5u6wTZcJJqFEiPkphpyhL3BSPIGH3 -m4bHEtiP1w9VbDhDgui7bmFx7L7Fskb+KBIyVXOHRVfzmdF93NEkTPRI6K1a -v816fiUGr+eg0YII9v8BEOUgTQ== +1:eJwV1Hk0Fm0bAHBZSsKLQhRZK4pkF5/7smQnqWSPx8zYokIlaypaLCGiIm1K +D5JEWepVUpKiaE9hPPLad8+0+e7+mDPnd+bMdV/nWm5F1h4XkpeHh2cAP3/f ++15prrnX/sqUVtTvNtlII9PRa3osy1Ikr84v/T/s7kL9bBXLenTqZHDdXzsT +LxcK6zShXuugl6bYFVEJjQKWrcgwnMcRsE8+Xd6QwH6N0mW1Nplj17Tvu/hL ++y3a4sbNtsQe/NQSe6juAxqxdve2xpblKHvOWnxBKku2nbHDth+LNYpo/Yaa +mjn6TtgPfw0uiWL3oOFScRsX7HeJ0jHVYTRqHnj31BV7dKHl4LQ2B729o1fp +ib0wda+7zlw/umSlKeKHLS9e0LyvbgAxfQ2dFLbTitnroxbDaKtPVWkENnVJ +SUpDcBS1dEo/iMZOUN2SFNI6hh6nShofwf4g3bkxkj2BtDf2JWRhEx7BQWdS +J9GF3iqrC9jj+TyX74RNId9dKjHXsAWVNMQmtGfQ17iP6+9jZxON1mKSs4hH +VJH9GFvhhnvChrlZ5Ga1KOcltuH65NHQOi6ybaqo7MMO1P/WOmjxC3VWpy9b +rk2j6aj9/EKrf6MK+c9/VLEP1y0xURP8g350t7jqYueBYUlA6zw6qJW7xQWb +KGq2DGcvAMp0jjiDzX56pjtxBS88zAuvv4Y9/t0nNjOVF3bZ5yZWY8eqz1Te +DuODMdnu7Z+xs8sVlce0BeCo5olV6jo0+tQ+/PDPVQFInqT6TLEVJu95iEou +BHW3Want2KW6Tlkacwsh/p91TQnYT2qiF+yuE4TniYutvmDPNHZ8G7AQhh6R +s59u6tJIwkFYLOahMLTGD7x5hq3VaQkiRiLQImzi0I8d3Fd1aaOmKFy3H3mk +okejvbytWv8TFoPrB2/W3MDmKN2aSJoVByNxtS9N+rg+VMviNh0J6JwP4Axh +85b0Ky7fJwGxB5/ukTDA+eqscmEPSYBh7uAiP2wPi4w7r7qXwiZjESt+Qxq1 ++YdHSL+QhA/5DT9ZRjT6eiM9xVdQCs57CS7PxB4eYl+9uVkKGvRyqv7FFoqk +O4wbpMAo60Sk/CYaWR7brutbJQ1myxR4e7Frr+nPFBfKgGFRtE+iCY2ucX4c +2BQpB4nBuVqKQCObHce/RpTJQX+fg6sn9vCTpVZl/XLQVCk0koOte229pIK7 +PIxdYYcKm+F6snwqBUxXgbNZa90f7Mmx7oMDRxWgXXR9OteCRktDLe9WOirB +4ICqopkNjfqvCQU6ByvBDXZz6Ens+1/aV4wkK0F3yYd1b7C9HLyPrm5QghMR +Tr8IW5zfugMu57SVYVnk9OhpO3z+4I3xeGkVePDMVf6nA422ByzRsOtRBefo +qX9Xu9AIHdihvfO3KlwsHE2LwVZPKjQgZFbDUCHxvB2b56qOefzW1VA53n4i +dhuNyr567rzzaDUQCrLqH7fj/XQtTZS9sgZsCIa5vhPnZ+n4bpClBv+wLIez +vWl0dVvu57l4NTjfkbdvDjud1dPNf0ENlI6NER4+eL4P7x+S71AD049VOYq7 +aCReX8CzzUId3g6sVqjyxfOjM6pep7wOPoSUfxn3p9EKpdMJKX3rISaYV6ou +mEb1p6bVGF4N4BOqH9UNwfWYcu+kFDUgT7XQthz74hMVNXMfDajW/5VUtJtG +SgG1b7jvNcCFr1UmD9876qUcVeqFJoimsytzwmkkt0KeUnDXAhMtwZ7JaBqt +L4oU/om0ITro8AP9NBqxiKMzGk7acGnYk+8Zdp5y1ldfL/xdUqd+ZzqN+K6U +334apQ1iaCw5+jTet4uD27MqtCHE0yuxKRPfp3m+BWrKOpB/UkBs31nc3xQH +TbeFulDffKhJ/hKNLoerOFe16sG/xQlr392l0Z2vDSnLv+gB74viocwqGj22 +834WM6QHsgP8hk7VNOpTOmtqLqQPEuz43c33aLS6Y5FGm7U+UEM5mxtr8T7r +DC3+77E+nD3i+uhNA+7PdEXjyhoDyGo9v9b9JY3aDyCDY0VGsNX+l/TCARop ++rx18t79P2Bqjj5sVupD5Hz1LblDAP3vn4R4+vUh6aH7i6RZ5lBi1CrdXdaH +InVMvmSpWwLfao2j13/3IdbIr+alg5vh57Is4Z5tHFRmHrGosM0axmJkk9m1 +HHRtOvhRabYtHG5ZJhGt3I+4ZstfPkmwBw5R2ihR2I+6ePgmevwcIcZfT+ul +0ncUtnJPRqLyFpis+9G14cZ3dCuouSEnyRm+Nh19HG42gKKnZObWBW0FQUeb +gorPA2jGzsr12S4XELR0yzZP/w8ZeWaacbZug8xgvYMetoPojUxB8BOd7XDX +ZsXyDN4hJHv9aH3x2h0gwLvym+z7IXS/W93BScQVzN3evMotHkbyneMBB0Zc +YRfpG21xeATp5GSWXu3eCU2R6NfZ/aOogH9KM6vRDcoZWmaAGEPVZhs+JdW4 +g4PnxubTRuMoz+CU+C+2B5zI8Z7zaBxHbZ+LknVSPSGzweCBlM0EqnLMV9l7 +2Av6e0svS36ZQBOh23jCCG8ofSTzMTRoEs1YqQWOWvjA1jevZ+1nJ1HxyEdu +hP4u4LbHXHibMYXcLhf5ewv7QtmX2puXFKdR5R37XXzHfeFAT9cLvofTyGjF +G+Yk4wvoVJu+sdMMUu4O+PQ6yA9MP/NOXPwwg/qWhGzJp/3gfYh/U3vQLGpP +d/K33sGCnSGOizWGZlF2VOGS/e0saI2uk+8Om0P1D+cZf1t/6D8pxTzjzKF/ +vOC4Tq0/6DMVP97acpGR72hxki4BgTntwu+Luej6ufEIJ30ClG6/NZZjc9Gy +jklTaUMCavI/ZLBKuGh081xnsTEBucIFJYNlXHx/8SxoNSeg1jjtwvgdLhKd +E3eX2ErA2amfCh31XNSXpre4MJQAf5FA9ngbF6XXxQbdv05ApPjetLgpLgrV +zjWKKiag8ITUlaRpLnK4WbHYkE2A9qWCjtQZLhLK7b95r4yAvXnOqXlzXJQU +7jxYfZeAajLQsegnF8WqqYRUPSZg0n7y/Rk+BgXnvth95ysBGcwCslGCQbai +/Sbh3QQsVKi6eGspg9Ym8Yho9xJg21s/kreMQf3hemUVHAJ+tnNagqUY5OdU +OHJ7mIBH9UExfLIMchOICCv/QYACZX1MUJFB1hGye0ulSHgUnH1/lyaDHhcm +22UtJyE91e6C6QYGmbROqkTJkrA+sc1vpRaDtFRffLSQJ0HUz/Jc50YGybyP +sfisSkL/xm62gR6DhjZ1SQnpkXB8QlSp2ZhBp3kvPQjYRgJp8bRGzIZBQhuE +8xx3kOA171r4AvuYZ1S4zk4Sgr2RX5Itg6LuOq+Z9yDhI9fk0Iwdzp9akHmW +RcIxl0XTzxwZpNPCIpr2keDd/rhfbxuD3meqLlHOIKF6l4qfrjeDbiGRwIFM +EhYYXA9rwD42Mv2k7AwJysteR9n7MEjb9km8YS4Jz09kHfHZxaB0Hv9Jx4sk +KGh+D4jyY5DVnksfo0pJ6Jpp9IwhGSQnd0Lf9BYJL19nKM9hT7fsOcN3m4Tk +gX7OPopBV1Yjx/RKEixflbsTAQz63dXVcLWWhKH1dj9Mghh012FF8atmEppr +1wo82M2glB+8AtktJHw9uzFgbSiDWMWDfu6tJFgNcR5lYYvx167oayOhvLzX +lwhj0O46t9PMOxI2mBmY/9zDIGX1swdUOCSovIiPmQtn0I/3cR3/9ZOgXdPl +6RLBoPYkUqt8gITGI446pdjxPbqDRsMkXLTmfeYVyaBPeR3eW6ZIEO42S6jY +z6CsReKboxdQUMHlU1CLYlD9ZJdnJB8FF0sNmBjs713s8DABClwKziW/xDa5 +a3mJtZgC6mD8g92H8Lz5Rv20E6fgzNb5vAvROH+HzRKbl1KgZ/5WrA/b2EBC +DUlSkPZRzGRdDIMyREpddWQo8CjxKq3CNq79VrFCkYLL+h8mamMZRBWVNksq +U+DwLIiXwc7IOPTtH1UKnJwrm/Ti8HnUUhF+NQo0o1YRJdgZS60Dh7UouLvI +4U9yPINq/yxN6NemgO106kotNue/7pxuXQo430e4w9ibGqIbOw0peNFC1zkm +MKhv9y35B0DBH/WPefPYom4xevfMKeDjpLWuPcwgIwsbhwpLCtT3jFc4Y6fL +9B4qsqEgySolMx/7Pn95RqEdBcdeslMasOmxmBvnHCiwz7MyoLENn0q+TXOm +YM3Kp1dUEnG/K3qHjrvgehzMZllgp+WX8x7ZTgHhebfDF7s33FbrgBsFnRWP +n+dii/hIWe/1oMBCq9CpAtvQlvYO9qLgk9PNY8///r8qLsXHl4K1+mv4Z7Hv +C9ldcWNRILk/1VHoCI43I1XjQlCQC7w2ctgiPXSbA0XBBvLIlCa2YevtfqtA +CtpXLnJG2Kx7cb8hmIKnoineTthpV+yWGe+moHvL4pVe2PfTpNfpheF5YMWl +BP6NH9VntmEvrqceXRKBLUxUuKmFUxC5xiAuDttgS/we5UgK5hYcmE/6G3+T +fbLcAQpCfudrp2Gnqi4vkI6iIO7fm1JnsKvFOJXi0RTs9Dxfkovd87OiZUks +zn9r6MT5v/G/x/cIxFMQkaE4kI+t/8aeO59AQUFE9ekC7P8DmuHzsQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7142433994369197, 1.372243180027523}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7142433994369213}, + "PlotRange" -> {{0, 180}, {0.5997604731683704, + 1.5943885434892089`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.5997604731683718}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6884,20 +6707,21 @@ v816fiUGr+eg0YII9v8BEOUgTQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7142433994369197, 1.372243180027523}}, + "PlotRange" -> {{0, 180}, {0.5997604731683704, + 1.5943885434892089`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7142433994369213}, + "AxesOrigin" -> {0, 0.5997604731683718}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6911,104 +6735,104 @@ v816fiUGr+eg0YII9v8BEOUgTQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0VlsfB3BzGRvMROZSmYdosH8ZMo+lzOlxnmMqRLmKDAm3awi5pVGF -kgyZmpRX6UookiJFxueR4TGekPBuf5x11mftc77nu/Zee68jTwt2onOwsbEN -42v1fuKD+pYnrR+MDHnrTapmKWTEytOjmRYhxNm3XIndm6OfpWT6AnmW6muu -2oF4zyOg8x/q1H7bUY5dFhFTx23ajD41ZVKPsC/US9TGFH5Elh+vXijBftZ6 -4tYf7c9oTcX3Sw+xR7oao05Xd6I3C+4iBdhSQ4ruv0y+o5X9Evx52NYTUYZh -zT+QhPPGiBzsmj8j/BGFfchyzsr9GvaXOPHIx0ED6IZkXWUWNovHdGRWewix -vYo8n4bNkxLiqjPHQGr84Y1J2LIbbjacqB5Gr9UrEmOx7aR/3WOZjKE0l8Wj -IdjkbQUxtbUspGjBG+eLHaNsnxDYPIHeDxwR88LuFG/XOlk4hTQ5WbmW2IRb -gP+llGnUr696wwh78gbbnfKgGXQjvJJPB3utgtr6KW0KiSTXWUlhZxF15utF -fyHnL9abBLHl7rvGaMz9QjlSasTKDIUMdiSyjlfPI+0UrsP92H76P5pHTP6g -9hCnd3ewZyNOcfGpLCE73XHbdOzYav49qmuXkfSJOYto7GwweOjbvIISj/ve -dcEm8htMQwvZwS9KbIAHu7D+Um+cNAfk+6ZKT03jvkyvqIwUDog9m97YhR21 -jap4FMQJVYetU4qws0rlFSe0uYEVxpdjid3VOlaznMsNS5UuKRrYctNP3IRE -eUCa7dCkCHaRrl2m2hwP6C+EbOqZotCbZ2fYj1WvBbEXldwB2FTdpx/DJgKg -F6ki7zdJoY02AusjawRgYDkj2Rhbs90UBA0F4T2dw3kTdsBg1W0tdSGwcdrI -/WGCQiEczZp7BdaDJHztUsUeUiiZSvi1AXaqvCXqxvH8kI28LTobwSgjq+4S -NsdDhrzEiY1wgWM+zgdbTmezU+HoRhD5/kCGHdvNJL38Q68wvFvp+ag7RqEW -n9Aw8SZRmMxV3Rk9QqGe+2nJ3mvFIPCyb5Yp9thoYe4DMzEQs2U58mHznRz4 -tLtWDCb2r2Fd+kkh0/MHdb2rxEH5xNuHOcMUep6nTxXkSIJkxrjFVQaF8oZ+ -h+86KQPr7JcCRfspZOGc1BNWLAPX9uwWed+H898I7y9myIBIV732eWzdvB2i -cq6y4Jr+p22yF88nzauC22gzLO71vFP3g0LTE71/DcfLwY562XP23RQSPm5a -WWGrAK7KS8/YOinEyOPzcwhQgFtncszvd1Do6fdW6fFEBTAj/G1tsT1sPONV -ahWgIL7q1ZUvuN/2cKer2orQJ7xip/IZf3/k/mS0uBIExajwb2uj0EFffjWr -PmUwKRRNaG6iEAp31j68pAym9kYOBPa2hJydhKQKeEXOX1tspBBbro5xtKMK -ZBkElG7FLu5xP1z+SgXCr5h9iWrA+/NQUZzU3S3AXqazQ/A/3M/U9ssITRUW -i37FfHhJIWmFizHJgztgeLrHuLOYQi/+mVVd4FADY8HCtWbYHjOu7aS8GvC/ -C95bVkShW2+UVI291KCQhzab9JBCCr7P2+Y71KDv8pbr6g9wv6IhZbJJHZby -XjK88ygkIy1LyrlqAqdZnr3bNQrtyD8psIi0QWP93r/vn6cQjYin1Oy0IU1p -u+FSPN5fipk93h7acHl0PNQJm/Nu6aP6CG24G0DGLcbh/XFr5GBmmTZ0jbkI -WsTg8y/b+6aqog6Efd222Hgar0eyjboLjy7Euhuwnw6i0J1QJYeqZj2Q4Ow4 -F3WIQq3haOf5fEOQXFeben0TheS9Ptt5HtsLH9vctWK/zyL6yuMSmdMA65Jc -z7dfm0Xio0/XiNOMIVXyvuWU7Sw6qbPne+Y2U7iYxBOfyD6LaON/GoRHzCC6 -Vjp2tHwGFRuHrclpMYfpu0mWu9xmUN5swKuiLEvIyS2omuKaQfP7JN6/ibGG -hKTU7afvTaNuNs6pvqO28Gl3Ce9Ri2kUtCk4PU7RHtbYRZWwT06hEv+G2n8T -HGBCrENROH0KnZmRnNvu7whj1rLnKP0pRFntP/T2iBNY+0+wHemYRIbuGfuG -HA/AvWv1YQtnJlGb5M2ANzoHgZnomx+iMomk7sW/KNjqDO/UZa0YVyfQ095t -NnaCh2C75LCF/xwLybZP+oaPHwKDBGmRQQ8W0vk3oyi39zB4VyzZrqkeRze5 -ZtQz61wgyluQ95nqOHq8T6Mr4ZkrBNaYfmrOHEPZO//Z8KfQDYJ4NqvGc4+h -lm/5iTop7tBoMr/M+/coqrK9oRQS6wFmkb79izyjaOr4AbYgwhNMzEcPafw7 -gqj9qn4sEy84FkiPZ20fQQXjX+fD9I+AV+dNqqX2J3K5k+/jKeANm6OfDiT5 -/EQV5dZHOJO8oX45+NoD7p/IULpt4cKCN5yz6R1srhxGir2+XR/9j0Jh7EvP -b4HDaJA/0P7GwFH4KiSv1aA4jFrT7HzMnWlw9tjtV6JMJsqKyOE/1UqD6Usz -pwKLmOhFzcqCj6UPtKZnr587zUTrPCBJ57kPDGvpnd7tyERyIm9bNr3wgSP9 -WruyHZhIs9lWgqfGB3pf+R2n7JnIaY/7g85XPlCyErGtzA7nbwpvOvvOB9po -LctqNkwk1f1wXUOnDzCGngjuNWciJS/xbI85H7BxZJQ+2stEht6sggRdArTK -d5Pj25no3tXJMDt9Apr0r6cFY4t8mjYSNyBg5umY5PQ2JmKZzbUX7Cbguaan -67wqE583bOzNxgSwZxhE8m5lIqG5Da4bHQlQy+KwNFJiosFUPd6c4wQoDoUv -T21iIse3O9t9gwkYHBCKi8WuYduVo3mCgA+Wh8l12FfDjPRenyTA+NSUi7o0 -E9m5mh8diiTA6LVIT4gkEz1Tcn22/R8CivN9ybViTJRWHeX/9B4BXfuFaHHr -mOi49hXDiAICkK2+jiy2zYMyXoNCAuSvLtGqhZiI7wrjwZNiAg44+PT8EmSi -hFCHkceVBJSXeZiGCjBRlKpSYNVrAmgJV5rO8DJRwJWmY+U9BGRML1S3cTKR -pRBjT2gvAYvBTM9I7K0JbILa/QRku+/zUsJmhOoVlw0RAPG6Z/7iYKKjdjnj -j8YImE9mySqwM5ELd1hQ6W8CCLEAqQvLDGQeJhVSJEaH1tCMlpsLDPQ6J9Eq -U4IOaz5u+myNvad5WilCig6jxdmWv+cZSFO56auJLB0G9NxjXLAlOyJNvinT -IVG3W0YK/yeN7uoW49Ojg8pFf+XyWQa6yHH7pe8BOjjXPz2gN8lAfBoC2bbO -dNgyj3SnJhjovHtEqM5hOvBaJ8YXY0dUOmxZcaPD5mdWQVuwj5LsGZdpdDg4 -nXxSjsVAOo004r8TdHD7WWu8ZYyBOjKU+RXT6SAkNvU9aZiBSpCg33AGHXoM -6zSdsc+Pz74pvkSHA7K9gwrY2pZvog2u0MEi9tfx/zEZKI3NZ9r2Fh3e+kdx -LjEYaH/w7a8RRXRo+2vr7n+GGEhG5m99oxI6LPvsueSJPdsYfInzER2CdFKt -tbDvqiDbtAo6mEP/96+DDLTU3V2b+5wOGm0m5zSwK22kCz400CEzyqBjrJ+B -kn9zcGc10qFA56V2PTatYOSoazMdmu6HsnKw13M9lx5soYPJ72OJB7GPVbtc -XPhChyLBFIPXfQykuO1yuNIQHTZ8+JFX2stAvzvOfvrJoMNVxmbOi9itCXTN -0mE6BDsmvgrCju7THTEcowOtts5LA7sr+5On/Qwd2tsnpap+MFDmmg1mZ9hJ -WKuQfbWth4FeTHe7n+QkIZD3IrMSm9ldGBrETULideviK9h7Kk1v03hJ+Cgs -fNsLm+EdsWi1gYQvOu8UprtxfxuzjWbCJDCMvql3Yu/euVEViZJA9heX12Cn -CxYd0pEkIeJmpnzq6vjzH2XS8iRwbbW6oYFN5hc1iCqS0LbFkZRcfT799I91 -yiRc8xAp4MRmkMKCXKokfPd9n/n1Ox4XNvcb0ySBVfKHKxn7+bJwDEObhCOs -jpQI7KGfvf/26pIwWxKYQmLvqj1T125AQqdg9bQJ9uCxEtmXQILfQZY7F7aQ -S6TeE2MSHl4/d4f6xkCGJhY2ZaYkCHk3ezGx0yT7T+dbkBC9MQaasZ9ylabn -WJGQ5c0k/oc9MBF5/6oN7j/KyV6BbVAv+jnVgQSU7XL7OjatrH80yYmEUxrp -uenYqTdKOc4dxPM1cUY2Ebs/1FIz3IUEmTm/yFBsQS8x8xA3EqbfBXr6r+ZZ -DngGeJBg3iP3xHv1/c1nk728Sehhv/PRYbUPn9VdFxoJtIrATMvVPErsmRNB -QukIs9F4Na9voMWGJKEuRjRyz2pe8yPGfj8S6Lazd/VX+z05uwQBJKzROm+s -tZp/10pk9zHcj+8/1x2r+ani2/WCSJCteTy8ZTU/YnCfRggJbpquE4rYAkSZ -i2ooCUZWRcflsHfaRwcrnsR5c6U+Mqv5u6wTZcJJqFEiPkphpyhL3BSPIGH3 -m4bHEtiP1w9VbDhDgui7bmFx7L7Fskb+KBIyVXOHRVfzmdF93NEkTPRI6K1a -v816fiUGr+eg0YII9v8BEOUgTQ== +1:eJwV1Hk0Fm0bAHBZSsKLQhRZK4pkF5/7smQnqWSPx8zYokIlaypaLCGiIm1K +D5JEWepVUpKiaE9hPPLad8+0+e7+mDPnd+bMdV/nWm5F1h4XkpeHh2cAP3/f ++15prrnX/sqUVtTvNtlII9PRa3osy1Ikr84v/T/s7kL9bBXLenTqZHDdXzsT +LxcK6zShXuugl6bYFVEJjQKWrcgwnMcRsE8+Xd6QwH6N0mW1Nplj17Tvu/hL ++y3a4sbNtsQe/NQSe6juAxqxdve2xpblKHvOWnxBKku2nbHDth+LNYpo/Yaa +mjn6TtgPfw0uiWL3oOFScRsX7HeJ0jHVYTRqHnj31BV7dKHl4LQ2B729o1fp +ib0wda+7zlw/umSlKeKHLS9e0LyvbgAxfQ2dFLbTitnroxbDaKtPVWkENnVJ +SUpDcBS1dEo/iMZOUN2SFNI6hh6nShofwf4g3bkxkj2BtDf2JWRhEx7BQWdS +J9GF3iqrC9jj+TyX74RNId9dKjHXsAWVNMQmtGfQ17iP6+9jZxON1mKSs4hH +VJH9GFvhhnvChrlZ5Ga1KOcltuH65NHQOi6ybaqo7MMO1P/WOmjxC3VWpy9b +rk2j6aj9/EKrf6MK+c9/VLEP1y0xURP8g350t7jqYueBYUlA6zw6qJW7xQWb +KGq2DGcvAMp0jjiDzX56pjtxBS88zAuvv4Y9/t0nNjOVF3bZ5yZWY8eqz1Te +DuODMdnu7Z+xs8sVlce0BeCo5olV6jo0+tQ+/PDPVQFInqT6TLEVJu95iEou +BHW3Want2KW6Tlkacwsh/p91TQnYT2qiF+yuE4TniYutvmDPNHZ8G7AQhh6R +s59u6tJIwkFYLOahMLTGD7x5hq3VaQkiRiLQImzi0I8d3Fd1aaOmKFy3H3mk +okejvbytWv8TFoPrB2/W3MDmKN2aSJoVByNxtS9N+rg+VMviNh0J6JwP4Axh +85b0Ky7fJwGxB5/ukTDA+eqscmEPSYBh7uAiP2wPi4w7r7qXwiZjESt+Qxq1 ++YdHSL+QhA/5DT9ZRjT6eiM9xVdQCs57CS7PxB4eYl+9uVkKGvRyqv7FFoqk +O4wbpMAo60Sk/CYaWR7brutbJQ1myxR4e7Frr+nPFBfKgGFRtE+iCY2ucX4c +2BQpB4nBuVqKQCObHce/RpTJQX+fg6sn9vCTpVZl/XLQVCk0koOte229pIK7 +PIxdYYcKm+F6snwqBUxXgbNZa90f7Mmx7oMDRxWgXXR9OteCRktDLe9WOirB +4ICqopkNjfqvCQU6ByvBDXZz6Ens+1/aV4wkK0F3yYd1b7C9HLyPrm5QghMR +Tr8IW5zfugMu57SVYVnk9OhpO3z+4I3xeGkVePDMVf6nA422ByzRsOtRBefo +qX9Xu9AIHdihvfO3KlwsHE2LwVZPKjQgZFbDUCHxvB2b56qOefzW1VA53n4i +dhuNyr567rzzaDUQCrLqH7fj/XQtTZS9sgZsCIa5vhPnZ+n4bpClBv+wLIez +vWl0dVvu57l4NTjfkbdvDjud1dPNf0ENlI6NER4+eL4P7x+S71AD049VOYq7 +aCReX8CzzUId3g6sVqjyxfOjM6pep7wOPoSUfxn3p9EKpdMJKX3rISaYV6ou +mEb1p6bVGF4N4BOqH9UNwfWYcu+kFDUgT7XQthz74hMVNXMfDajW/5VUtJtG +SgG1b7jvNcCFr1UmD9876qUcVeqFJoimsytzwmkkt0KeUnDXAhMtwZ7JaBqt +L4oU/om0ITro8AP9NBqxiKMzGk7acGnYk+8Zdp5y1ldfL/xdUqd+ZzqN+K6U +334apQ1iaCw5+jTet4uD27MqtCHE0yuxKRPfp3m+BWrKOpB/UkBs31nc3xQH +TbeFulDffKhJ/hKNLoerOFe16sG/xQlr392l0Z2vDSnLv+gB74viocwqGj22 +834WM6QHsgP8hk7VNOpTOmtqLqQPEuz43c33aLS6Y5FGm7U+UEM5mxtr8T7r +DC3+77E+nD3i+uhNA+7PdEXjyhoDyGo9v9b9JY3aDyCDY0VGsNX+l/TCARop ++rx18t79P2Bqjj5sVupD5Hz1LblDAP3vn4R4+vUh6aH7i6RZ5lBi1CrdXdaH +InVMvmSpWwLfao2j13/3IdbIr+alg5vh57Is4Z5tHFRmHrGosM0axmJkk9m1 +HHRtOvhRabYtHG5ZJhGt3I+4ZstfPkmwBw5R2ihR2I+6ePgmevwcIcZfT+ul +0ncUtnJPRqLyFpis+9G14cZ3dCuouSEnyRm+Nh19HG42gKKnZObWBW0FQUeb +gorPA2jGzsr12S4XELR0yzZP/w8ZeWaacbZug8xgvYMetoPojUxB8BOd7XDX +ZsXyDN4hJHv9aH3x2h0gwLvym+z7IXS/W93BScQVzN3evMotHkbyneMBB0Zc +YRfpG21xeATp5GSWXu3eCU2R6NfZ/aOogH9KM6vRDcoZWmaAGEPVZhs+JdW4 +g4PnxubTRuMoz+CU+C+2B5zI8Z7zaBxHbZ+LknVSPSGzweCBlM0EqnLMV9l7 +2Av6e0svS36ZQBOh23jCCG8ofSTzMTRoEs1YqQWOWvjA1jevZ+1nJ1HxyEdu +hP4u4LbHXHibMYXcLhf5ewv7QtmX2puXFKdR5R37XXzHfeFAT9cLvofTyGjF +G+Yk4wvoVJu+sdMMUu4O+PQ6yA9MP/NOXPwwg/qWhGzJp/3gfYh/U3vQLGpP +d/K33sGCnSGOizWGZlF2VOGS/e0saI2uk+8Om0P1D+cZf1t/6D8pxTzjzKF/ +vOC4Tq0/6DMVP97acpGR72hxki4BgTntwu+Luej6ufEIJ30ClG6/NZZjc9Gy +jklTaUMCavI/ZLBKuGh081xnsTEBucIFJYNlXHx/8SxoNSeg1jjtwvgdLhKd +E3eX2ErA2amfCh31XNSXpre4MJQAf5FA9ngbF6XXxQbdv05ApPjetLgpLgrV +zjWKKiag8ITUlaRpLnK4WbHYkE2A9qWCjtQZLhLK7b95r4yAvXnOqXlzXJQU +7jxYfZeAajLQsegnF8WqqYRUPSZg0n7y/Rk+BgXnvth95ysBGcwCslGCQbai +/Sbh3QQsVKi6eGspg9Ym8Yho9xJg21s/kreMQf3hemUVHAJ+tnNagqUY5OdU +OHJ7mIBH9UExfLIMchOICCv/QYACZX1MUJFB1hGye0ulSHgUnH1/lyaDHhcm +22UtJyE91e6C6QYGmbROqkTJkrA+sc1vpRaDtFRffLSQJ0HUz/Jc50YGybyP +sfisSkL/xm62gR6DhjZ1SQnpkXB8QlSp2ZhBp3kvPQjYRgJp8bRGzIZBQhuE +8xx3kOA171r4AvuYZ1S4zk4Sgr2RX5Itg6LuOq+Z9yDhI9fk0Iwdzp9akHmW +RcIxl0XTzxwZpNPCIpr2keDd/rhfbxuD3meqLlHOIKF6l4qfrjeDbiGRwIFM +EhYYXA9rwD42Mv2k7AwJysteR9n7MEjb9km8YS4Jz09kHfHZxaB0Hv9Jx4sk +KGh+D4jyY5DVnksfo0pJ6Jpp9IwhGSQnd0Lf9BYJL19nKM9hT7fsOcN3m4Tk +gX7OPopBV1Yjx/RKEixflbsTAQz63dXVcLWWhKH1dj9Mghh012FF8atmEppr +1wo82M2glB+8AtktJHw9uzFgbSiDWMWDfu6tJFgNcR5lYYvx167oayOhvLzX +lwhj0O46t9PMOxI2mBmY/9zDIGX1swdUOCSovIiPmQtn0I/3cR3/9ZOgXdPl +6RLBoPYkUqt8gITGI446pdjxPbqDRsMkXLTmfeYVyaBPeR3eW6ZIEO42S6jY +z6CsReKboxdQUMHlU1CLYlD9ZJdnJB8FF0sNmBjs713s8DABClwKziW/xDa5 +a3mJtZgC6mD8g92H8Lz5Rv20E6fgzNb5vAvROH+HzRKbl1KgZ/5WrA/b2EBC +DUlSkPZRzGRdDIMyREpddWQo8CjxKq3CNq79VrFCkYLL+h8mamMZRBWVNksq +U+DwLIiXwc7IOPTtH1UKnJwrm/Ti8HnUUhF+NQo0o1YRJdgZS60Dh7UouLvI +4U9yPINq/yxN6NemgO106kotNue/7pxuXQo430e4w9ibGqIbOw0peNFC1zkm +MKhv9y35B0DBH/WPefPYom4xevfMKeDjpLWuPcwgIwsbhwpLCtT3jFc4Y6fL +9B4qsqEgySolMx/7Pn95RqEdBcdeslMasOmxmBvnHCiwz7MyoLENn0q+TXOm +YM3Kp1dUEnG/K3qHjrvgehzMZllgp+WX8x7ZTgHhebfDF7s33FbrgBsFnRWP +n+dii/hIWe/1oMBCq9CpAtvQlvYO9qLgk9PNY8///r8qLsXHl4K1+mv4Z7Hv +C9ldcWNRILk/1VHoCI43I1XjQlCQC7w2ctgiPXSbA0XBBvLIlCa2YevtfqtA +CtpXLnJG2Kx7cb8hmIKnoineTthpV+yWGe+moHvL4pVe2PfTpNfpheF5YMWl +BP6NH9VntmEvrqceXRKBLUxUuKmFUxC5xiAuDttgS/we5UgK5hYcmE/6G3+T +fbLcAQpCfudrp2Gnqi4vkI6iIO7fm1JnsKvFOJXi0RTs9Dxfkovd87OiZUks +zn9r6MT5v/G/x/cIxFMQkaE4kI+t/8aeO59AQUFE9ekC7P8DmuHzsQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7142433994369197, 1.372243180027523}}, + "PlotRange" -> {{0, 180}, {0.5997604731683704, 1.5943885434892089`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7142433994369213}, + "AxesOrigin" -> {0, 0.5997604731683718}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7018,7 +6842,8 @@ v816fiUGr+eg0YII9v8BEOUgTQ== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.7142433994369213}, + AxesOrigin->{0, 0.5997604731683718}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7046,7 +6871,8 @@ v816fiUGr+eg0YII9v8BEOUgTQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.7142433994369197, 1.372243180027523}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5997604731683704, 1.5943885434892089`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7054,8 +6880,9 @@ v816fiUGr+eg0YII9v8BEOUgTQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913206956809444`*^9}, - CellLabel->"Out[85]=",ExpressionUUID->"5d2ddb35-b7b8-514c-917f-fcc77dc8600c"] + CellChangeTimes->{3.9913206956809444`*^9, 3.994386668209601*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"326ad758-5744-4ac6-bc14-ac8919876727"] }, Open ]], Cell[CellGroupData[{ @@ -7070,7 +6897,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -7092,8 +6921,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -7118,274 +6946,159 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917994543716736`*^9},ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-\ -9aed2c391662"], + CellChangeTimes->{3.9917994543716736`*^9}, + CellLabel-> + "In[104]:=",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3559275616020787`*^-274\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.0895449167582945`*^-271\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 86, 9, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696298666*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 104, + 9, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994386668639089*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], +In[104]:=",ExpressionUUID->"ca3ef160-b1b9-497d-a983-52e7a10cbc1a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7743624682465165`*^-285\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.586378440538607`*^-283\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 86, - 10, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696309664*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, + 104, 10, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994386668646545*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], +In[104]:=",ExpressionUUID->"c5887d97-1fe1-4779-acf7-28a9bd01964d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.227765210043865`*^-297\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.864280636888849`*^-294\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 86, 11, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991320696318653*^9}, + 2, 104, 11, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994386668653631*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], +In[104]:=",ExpressionUUID->"528b13be-3393-4efc-9601-b41c3d226866"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 86, 12, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913206963286114`*^9}, +during this calculation.\"", 2, 104, 12, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991320696298666*^9, 3.994386668659009*^9}, CellLabel-> "During evaluation of \ -In[86]:=",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], +In[104]:=",ExpressionUUID->"c6870cc8-4bf1-4853-bc1e-72440e39dbdb"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV12k8VV0XAHBFQlSmDJnuPfea54qUa61UCqGkQU9FcQ2FVJKUTJkyJDSZ +p2S8BxmKogxp0iBFRNFs9ph58J73fDm//5e99zp777XWoR0/Zc1eykU9S7i4 +/v+e7H7RwIjMNmLc9kuzEzY0ak2VvLClPQj2vOrgXVcrBSj+9rhkexz8WEhO +nK5RAe/d+W3c7ZkwQtg6fKgxAOEhibiZtlKoe2Vfn15jCl8fWZ4ab6sDhRtG +jstrbMGE0dc12tYCLFO+21XVrjDTpn9jpK0Xbo4UVN4ovQD1W+9lv88cg0Th +qNfTyVdB5uvDX8fV54Fx4uIB1YR4EHOzy1++lRvNGl69/Bh8B+J0TKot9/Hh +rMjobHt2Gny+rf1kdLUQJrTUyh0KzITIbP+3S6WEcXqxZUO09l2QSPgeEZ8i +inVJmfIn4+5BmI2pUcukOAofZyQci8qDswYZdi+CJNHOacdOXZcCMEtfOW4e +JYm7HjvtvuZRAPTll8Lf3JDEplPVK/54FcC71v0lH3Il0VJSJjEqsAA0PQW5 +u99IoopUEl9mYgH8yTmf86+0FLYObmqaf1UAh8UsB9fel0JBrqKOc2qFsG14 +1tfjuzSqlp/1tekqhAs7E1SfDkhjpgXzQUBvIXAyNDpEJ6WxT+9nTe7vQpC0 +sTd4yLcWxxqaFQdGC2HgQeMUt+ZavN+s+g/yFkF8UKzXHZ+1WFWXry2nWQS9 +4ooeDUIyaBGpeZvjWwQSp2plJSRkUC/rVuFe/yLY9fxgs6uCDCb6/g4ZDy6C +Ct9I9VXrZLDXfiZUJboIrn4d6bM9KINKTlZP7dOKQDev2nk4Uwat71kK8dQX +QaDhnmPSG2UR4jl9sss5sPNo6r/6xpS/2A8mrODAyoD+4H27ZPH8y9fjvKs5 +kFwfkhNrL4uPr8mJfJHkwAOzqn7eCFnc83ZVhJkqB0YOEt5jn2Vx2rHWf+Mu +Dhw9N3H19UU53DUwF2cbxQHmLWOZvhA5dN7jelInlkPFf61oeawcxl8LsuBJ +4IDvfyrvjLPlUGgbqZWUxIEbwUfFH76WQ8dtM2ei8znw+npT2l1ZeYxzfqdz +pYkDmzh3yi7XymNrs9mDR/Mc2Nb2Zn7ouTz+nXAxquUiwZKLZ4ddizxWe9pe +fMxNgoO1x2f4KY8fby5IF/GTYHKR5h+wTAGfXC6YPShOgqf8ZNYWNQW00tsc +8V2NhAbntMF6bwXs7poKfLaPBNP/DEQuXVTArMa0G3iQhDexrXrrAxTQRNXK +reIQCZ8f8gdkRyig/84Ixxt2JAyt8BIJSVbAN5Jc0QquJEgW79Q3qVNAUd1U +pttFEtymRwOeC9HwYxyjtzOZhE2nndb8EqHhOaNUrplUEvj6Ogq4JWkYSs7q +CWeQcLez/pMRnYaXVLWGdO+S0F1zQ71cj4Y/22ITNxeRYBVi0J5hR8OXu72v +HX9EgtxCkXutIw2rQm2DdWpIGPCmc3e50nBOfypxrpaEcJcVmpJeNORjB24M +rCfhiXlXcEw4DZe8GDS2fkmCrkig1sUSar7CLlPBNhK4IicablfQMDDD73N0 +OxU/94lDFdU0tBT+ckegg4STE9Yho400fH2DVTzxhYTsdkancwcN9WXvm8f1 +knBmzx3PkK80/NJ29MLgdxLwpRBv1g8a6nY/6N76k4Su6knt7iEajoovs+n9 +TcKatOehNtx0lM+QWvprgIQfEiyZM3x0PGVhzrt2iITS2JKSa0J0dGo4bmo+ +TMUflPjlpQQdL7ePXUsZpeJju+luUafjs7MlG/knSZhRW92tsY+O3WENr+fn +SZhMkQ5cd4iOPerRk70LJIyvYjIM7OhI1i5LrF+k9m/M4MQ2Vzrmj/fmVnMV +Q2+1w+QhPzqaLfG1sllaDF81PO7YB9HRyGNvexnlL2k+hk5hdNR8+44myl0M +n4Kjg05fp6NKcc70c8ovzStXht+lI0+rY73UsmJoevy0JDqfjkePctm5UG7Q +em0TT9Kxsk+1toxyjWhPYupDOs7kqb014S2G6pB+VnYNHSWPLA2IovxgauJb +Xj31fURcp95SLu0UUCpvpuOd8oHNu5cXA2kh/rKqhY5L+4UEoikX1sq7P2mj +4z2yKb2Jck7W+vuveugoliSiqsdXDFnisP/9LzqaPiuQPUE5Pcx05lM/HSfD +BzuTKCeePAq9E3Q8POVfNU35VpdL7+9ZOqb/86WT4C+GBKuzIYOLdOxvmn6x +i/L1p37KYzwEdZ4Ph5ylHLMu/NU0P4FX9WJW3qYceTfOY2ElgXrJa5yqKIdL +pAjziBE4+9YvqoNy0FzJgVVyBDq7CO4UEygGf/dHs2IEgY/em3RrUL709VmK +tDKBI8Kh27dTvrDnPSpoEMh+ZXP5EGXv+s7vTF0CtUSNItwpn93wK1RNn8Dn +ns1Olyl73htR0TEksKorRiKasofU3Gu9LQQeb1yZfIfyychlnoYmBN7k6RjP +ouwyv0rU2JxAu79+9ELKTqekK3bsJjBbN5xZStmhh2FrsY/AyVVhC+WU7fdq +/Wd9iMC1NH5OJeUjjQZpB+0I/HkuZf3/fUh/m/FRRwI/Rn+IK6N8IM/yp4Mr +gS8ObH5BUrZZaxvu6kFgjQ67PZfynmgHtVNnCTzzp+dJGmXLRfc3Xj4EMiuN +gxMom5/2Oe3rR6DRDimFMMo7vweJBQQRyF88des85e37oitDwgh09PbsZ1M2 +brp1KDKKQM+oNWutKYNB5nzsdQKN9/gpGVI2LChMv3mTwKTYjcIMyp0KBWnb +kwiMjznCWUHZ92Ze6ngaga9OcJ8epfarMjAn2TqPwIex5S6VlPdPZSct4RDY +HVOWeovyuFtWYnEpgZwPUv+do6x7MP32ykcEtolwaWlQft+ceuvxEwI/m3gv +46XsuTXlplsjgcfWs5Z1UeeNo5mY8PINgWflCoJCKKssS4gN7SGQVn0n6Al1 +np/7xl3b8Itaj4RiyVXKTiOxMT/6CNw790twL+Xszugo43ECUXjBopu6Lwql +YeELvAzsjjjI85W6b7VKoWFFKxg4LHA0P5Hy0ZQroYdXM9Dk+LVAG8pJ4YFX +qqQYWDro3VjHUwxr7C4GeKszcFvw2ZII6n6Xt17wZ+owsCN/eEiPso2Zz+XW +DQx048881kvlh7gN5y7pAgMd1Mv+rKMsJHjKZ2gPA8uD/kY+pfJLYaD7+ZT9 +DFR+5xloT9ls6qT3rn8YOJV3036OykfhvS5e+Y4MhN9rfdhUvuJ5eNzT6TwD +2yterF81R0KW5rFT4pcY2HPeqEV7lgTjbDuPhgAGrud+0Gc5Q4L/tcNu9KsM +vA5jsQFTJMyy97t0JzNQJJ717uEYCaMiZvb76xj42D2EP6SfhHY3+rsTTQys +TNJlHuij6sOzWfB/zcAWx+06zL8kxPoWyOd+osZ3UFco/0WCdq/g15k+Bg48 +lAnI7iHBo+TtkRRRJm7aVx9c94mE/Stym0skmZgaom9p85EEI3YA65ksE1PM +cuR7P5AgJKUjO6zEREUDna7RdyQUBsR9QUMmqrGs+3uoetRnte+fH45MfJSV +fnsZVc9a8jReTbsy8SP/4YCDVL2r4ubdLHSKiQLa+0PvVZEQUVkhrXeBie5F +Q/8aVJKgLC/ZERbNROMkNR/tYhKchzoOqlUwcZ/X4wA2VV9/RNnvP7NcEVfc +j5SaDaDW36dO1xZUxNhvBr7Tl0mY2jEzOLhaEROPGWWNXSJBgDsuxFVaEc1u +7Nv7zYeK/0J9mb2GIoon0a3iPUnwYyuKWu1VxHMNNe/tqX5gjdHAW7U0RXye +o/Jf5iYS0pMeJP3NUkQbvbJvhhtJUJm54nwvVxGbo0oqPmwgwbBMdpFeqoi/ +vbcYTmtT/YuqlaZ0oyIuXPBqkVEioXhNaRRfvyIuHWBZfxSh+pPh86Y/9ZTw +wsSTv4J/OCCjIxfKZ6iERzo86II/OTB0pqFObYsS5iQfm1zey4GEydWGZ8yV +UEJkwnuikwPd83mai3ZKGN+4bEXuWw6cEfwiKhWhhDE5eUvcKziQqILduzqV +sC01cW9QINW/OfCdLfNXxqRz1fOGK6nxU7c9rr2ijNHrOoODBDgw/Dlg+asI +ZWwWVtNp5OXAv1YzST3xyripQpnPeLEIpjb3NazMVUbDP9vbpEaKYKnY6zWu +75SRYb/EZ+v7IpBquFYlS1PBBLO/j65eL6L+PySWhtWp4B6GSLqpQBGINCvG +FA+r4pvUC3NF4wUgE07u1tNTx62vmkSkcvPhtprBalFnDUzsnzNYsM2Dl9Jb +Noxd18Reg78fu5fkwiaZulitT1oYn3I/7Jt/DqzkzvQ6FqSNd83/3T+2+i7I +Bcob2irqoLnZpxCLwCzgZx6usG7SQcM3dTqf5jJAkyVFnj+iiwkPtk8t3EyH +M90i9WZc63DLcUU9E1YqDI9F7TO9vQ699nJy1G4nwQ6tZ4mmGuvRskBub7bM +HagZ2zw39WY9JuWP8pyMuQke6rod79kbMKOO8avdKgFYQ46ttvx6uNuoxZJP +IA62MyQthDL1cLSy5b61SCwoB1z1qdPXx4Gzub9r46NAlW1Qy+zQxzUxxtox +fBHArnG5UnZ6I4r8kRskeEOhNr3VcVTcAHecF7OIEQ2G8dzFKa1KA7xZPrB+ +x6UAcGAW8CdabELph7vvLt69BKOq8XqlI5vwhbNWRv1FH3iQPdczEb4Zy0em +Q7sEz8GhbQRuljNEl9YErx+iZ2Cte9hDzSeGuKl20rM4yAPEBdxKLA6wsG35 +KDE46ArZW/18R2xZmLb1e+nXDlfQ9YvZGn+YhZXTPER3kytYjhR/bD/Gwvx7 +kbELGa4Q+mlixsGNhQJiH3ma97vCdKa/sW8gC3X7T51PqnOBjs3xH3IKWOh+ +YPhPW6YzuJzLTjblsPBkWeSvzdedYZJTzh4oZmHiBFO8wN8ZROjtUzoVLNQs +Sx7OP+wM5nyyMo+fsNA868MSbQlneNSa4/jhIwuNwbfHLMYJzFY+0PBuZ6Fh +DreTnZ8TtO94MSnZyUL9AcPGy25OMF7VH370Gwulsw8sdJk5gUaGdtHfPhau +j81olOVzgkcdW7yjBlnY+l7savgUG8zE9oLWCAvLIq8uzP9ig1PYufdeEyxM +sIVevmdsGH8SmigxTc1f2GuSWs6GoNlbDlWzLMTJ3SZGd9mwen2e+pF5Fham +Q+efBDakuldNLC6y8IcTmyv1Chv+B6JrSX8= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7399,233 +7112,114 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV12k8VV0XAHBFQlSmDJnuPfea54qUa61UCqGkQU9FcQ2FVJKUTJkyJDSZ +p2S8BxmKogxp0iBFRNFs9ph58J73fDm//5e99zp777XWoR0/Zc1eykU9S7i4 +/v+e7H7RwIjMNmLc9kuzEzY0ak2VvLClPQj2vOrgXVcrBSj+9rhkexz8WEhO +nK5RAe/d+W3c7ZkwQtg6fKgxAOEhibiZtlKoe2Vfn15jCl8fWZ4ab6sDhRtG +jstrbMGE0dc12tYCLFO+21XVrjDTpn9jpK0Xbo4UVN4ovQD1W+9lv88cg0Th +qNfTyVdB5uvDX8fV54Fx4uIB1YR4EHOzy1++lRvNGl69/Bh8B+J0TKot9/Hh +rMjobHt2Gny+rf1kdLUQJrTUyh0KzITIbP+3S6WEcXqxZUO09l2QSPgeEZ8i +inVJmfIn4+5BmI2pUcukOAofZyQci8qDswYZdi+CJNHOacdOXZcCMEtfOW4e +JYm7HjvtvuZRAPTll8Lf3JDEplPVK/54FcC71v0lH3Il0VJSJjEqsAA0PQW5 +u99IoopUEl9mYgH8yTmf86+0FLYObmqaf1UAh8UsB9fel0JBrqKOc2qFsG14 +1tfjuzSqlp/1tekqhAs7E1SfDkhjpgXzQUBvIXAyNDpEJ6WxT+9nTe7vQpC0 +sTd4yLcWxxqaFQdGC2HgQeMUt+ZavN+s+g/yFkF8UKzXHZ+1WFWXry2nWQS9 +4ooeDUIyaBGpeZvjWwQSp2plJSRkUC/rVuFe/yLY9fxgs6uCDCb6/g4ZDy6C +Ct9I9VXrZLDXfiZUJboIrn4d6bM9KINKTlZP7dOKQDev2nk4Uwat71kK8dQX +QaDhnmPSG2UR4jl9sss5sPNo6r/6xpS/2A8mrODAyoD+4H27ZPH8y9fjvKs5 +kFwfkhNrL4uPr8mJfJHkwAOzqn7eCFnc83ZVhJkqB0YOEt5jn2Vx2rHWf+Mu +Dhw9N3H19UU53DUwF2cbxQHmLWOZvhA5dN7jelInlkPFf61oeawcxl8LsuBJ +4IDvfyrvjLPlUGgbqZWUxIEbwUfFH76WQ8dtM2ei8znw+npT2l1ZeYxzfqdz +pYkDmzh3yi7XymNrs9mDR/Mc2Nb2Zn7ouTz+nXAxquUiwZKLZ4ddizxWe9pe +fMxNgoO1x2f4KY8fby5IF/GTYHKR5h+wTAGfXC6YPShOgqf8ZNYWNQW00tsc +8V2NhAbntMF6bwXs7poKfLaPBNP/DEQuXVTArMa0G3iQhDexrXrrAxTQRNXK +reIQCZ8f8gdkRyig/84Ixxt2JAyt8BIJSVbAN5Jc0QquJEgW79Q3qVNAUd1U +pttFEtymRwOeC9HwYxyjtzOZhE2nndb8EqHhOaNUrplUEvj6Ogq4JWkYSs7q +CWeQcLez/pMRnYaXVLWGdO+S0F1zQ71cj4Y/22ITNxeRYBVi0J5hR8OXu72v +HX9EgtxCkXutIw2rQm2DdWpIGPCmc3e50nBOfypxrpaEcJcVmpJeNORjB24M +rCfhiXlXcEw4DZe8GDS2fkmCrkig1sUSar7CLlPBNhK4IicablfQMDDD73N0 +OxU/94lDFdU0tBT+ckegg4STE9Yho400fH2DVTzxhYTsdkancwcN9WXvm8f1 +knBmzx3PkK80/NJ29MLgdxLwpRBv1g8a6nY/6N76k4Su6knt7iEajoovs+n9 +TcKatOehNtx0lM+QWvprgIQfEiyZM3x0PGVhzrt2iITS2JKSa0J0dGo4bmo+ +TMUflPjlpQQdL7ePXUsZpeJju+luUafjs7MlG/knSZhRW92tsY+O3WENr+fn +SZhMkQ5cd4iOPerRk70LJIyvYjIM7OhI1i5LrF+k9m/M4MQ2Vzrmj/fmVnMV +Q2+1w+QhPzqaLfG1sllaDF81PO7YB9HRyGNvexnlL2k+hk5hdNR8+44myl0M +n4Kjg05fp6NKcc70c8ovzStXht+lI0+rY73UsmJoevy0JDqfjkePctm5UG7Q +em0TT9Kxsk+1toxyjWhPYupDOs7kqb014S2G6pB+VnYNHSWPLA2IovxgauJb +Xj31fURcp95SLu0UUCpvpuOd8oHNu5cXA2kh/rKqhY5L+4UEoikX1sq7P2mj +4z2yKb2Jck7W+vuveugoliSiqsdXDFnisP/9LzqaPiuQPUE5Pcx05lM/HSfD +BzuTKCeePAq9E3Q8POVfNU35VpdL7+9ZOqb/86WT4C+GBKuzIYOLdOxvmn6x +i/L1p37KYzwEdZ4Ph5ylHLMu/NU0P4FX9WJW3qYceTfOY2ElgXrJa5yqKIdL +pAjziBE4+9YvqoNy0FzJgVVyBDq7CO4UEygGf/dHs2IEgY/em3RrUL709VmK +tDKBI8Kh27dTvrDnPSpoEMh+ZXP5EGXv+s7vTF0CtUSNItwpn93wK1RNn8Dn +ns1Olyl73htR0TEksKorRiKasofU3Gu9LQQeb1yZfIfyychlnoYmBN7k6RjP +ouwyv0rU2JxAu79+9ELKTqekK3bsJjBbN5xZStmhh2FrsY/AyVVhC+WU7fdq +/Wd9iMC1NH5OJeUjjQZpB+0I/HkuZf3/fUh/m/FRRwI/Rn+IK6N8IM/yp4Mr +gS8ObH5BUrZZaxvu6kFgjQ67PZfynmgHtVNnCTzzp+dJGmXLRfc3Xj4EMiuN +gxMom5/2Oe3rR6DRDimFMMo7vweJBQQRyF88des85e37oitDwgh09PbsZ1M2 +brp1KDKKQM+oNWutKYNB5nzsdQKN9/gpGVI2LChMv3mTwKTYjcIMyp0KBWnb +kwiMjznCWUHZ92Ze6ngaga9OcJ8epfarMjAn2TqPwIex5S6VlPdPZSct4RDY +HVOWeovyuFtWYnEpgZwPUv+do6x7MP32ykcEtolwaWlQft+ceuvxEwI/m3gv +46XsuTXlplsjgcfWs5Z1UeeNo5mY8PINgWflCoJCKKssS4gN7SGQVn0n6Al1 +np/7xl3b8Itaj4RiyVXKTiOxMT/6CNw790twL+Xszugo43ECUXjBopu6Lwql +YeELvAzsjjjI85W6b7VKoWFFKxg4LHA0P5Hy0ZQroYdXM9Dk+LVAG8pJ4YFX +qqQYWDro3VjHUwxr7C4GeKszcFvw2ZII6n6Xt17wZ+owsCN/eEiPso2Zz+XW +DQx048881kvlh7gN5y7pAgMd1Mv+rKMsJHjKZ2gPA8uD/kY+pfJLYaD7+ZT9 +DFR+5xloT9ls6qT3rn8YOJV3036OykfhvS5e+Y4MhN9rfdhUvuJ5eNzT6TwD +2yterF81R0KW5rFT4pcY2HPeqEV7lgTjbDuPhgAGrud+0Gc5Q4L/tcNu9KsM +vA5jsQFTJMyy97t0JzNQJJ717uEYCaMiZvb76xj42D2EP6SfhHY3+rsTTQys +TNJlHuij6sOzWfB/zcAWx+06zL8kxPoWyOd+osZ3UFco/0WCdq/g15k+Bg48 +lAnI7iHBo+TtkRRRJm7aVx9c94mE/Stym0skmZgaom9p85EEI3YA65ksE1PM +cuR7P5AgJKUjO6zEREUDna7RdyQUBsR9QUMmqrGs+3uoetRnte+fH45MfJSV +fnsZVc9a8jReTbsy8SP/4YCDVL2r4ubdLHSKiQLa+0PvVZEQUVkhrXeBie5F +Q/8aVJKgLC/ZERbNROMkNR/tYhKchzoOqlUwcZ/X4wA2VV9/RNnvP7NcEVfc +j5SaDaDW36dO1xZUxNhvBr7Tl0mY2jEzOLhaEROPGWWNXSJBgDsuxFVaEc1u +7Nv7zYeK/0J9mb2GIoon0a3iPUnwYyuKWu1VxHMNNe/tqX5gjdHAW7U0RXye +o/Jf5iYS0pMeJP3NUkQbvbJvhhtJUJm54nwvVxGbo0oqPmwgwbBMdpFeqoi/ +vbcYTmtT/YuqlaZ0oyIuXPBqkVEioXhNaRRfvyIuHWBZfxSh+pPh86Y/9ZTw +wsSTv4J/OCCjIxfKZ6iERzo86II/OTB0pqFObYsS5iQfm1zey4GEydWGZ8yV +UEJkwnuikwPd83mai3ZKGN+4bEXuWw6cEfwiKhWhhDE5eUvcKziQqILduzqV +sC01cW9QINW/OfCdLfNXxqRz1fOGK6nxU7c9rr2ijNHrOoODBDgw/Dlg+asI +ZWwWVtNp5OXAv1YzST3xyripQpnPeLEIpjb3NazMVUbDP9vbpEaKYKnY6zWu +75SRYb/EZ+v7IpBquFYlS1PBBLO/j65eL6L+PySWhtWp4B6GSLqpQBGINCvG +FA+r4pvUC3NF4wUgE07u1tNTx62vmkSkcvPhtprBalFnDUzsnzNYsM2Dl9Jb +Noxd18Reg78fu5fkwiaZulitT1oYn3I/7Jt/DqzkzvQ6FqSNd83/3T+2+i7I +Bcob2irqoLnZpxCLwCzgZx6usG7SQcM3dTqf5jJAkyVFnj+iiwkPtk8t3EyH +M90i9WZc63DLcUU9E1YqDI9F7TO9vQ699nJy1G4nwQ6tZ4mmGuvRskBub7bM +HagZ2zw39WY9JuWP8pyMuQke6rod79kbMKOO8avdKgFYQ46ttvx6uNuoxZJP +IA62MyQthDL1cLSy5b61SCwoB1z1qdPXx4Gzub9r46NAlW1Qy+zQxzUxxtox +fBHArnG5UnZ6I4r8kRskeEOhNr3VcVTcAHecF7OIEQ2G8dzFKa1KA7xZPrB+ +x6UAcGAW8CdabELph7vvLt69BKOq8XqlI5vwhbNWRv1FH3iQPdczEb4Zy0em +Q7sEz8GhbQRuljNEl9YErx+iZ2Cte9hDzSeGuKl20rM4yAPEBdxKLA6wsG35 +KDE46ArZW/18R2xZmLb1e+nXDlfQ9YvZGn+YhZXTPER3kytYjhR/bD/Gwvx7 +kbELGa4Q+mlixsGNhQJiH3ma97vCdKa/sW8gC3X7T51PqnOBjs3xH3IKWOh+ +YPhPW6YzuJzLTjblsPBkWeSvzdedYZJTzh4oZmHiBFO8wN8ZROjtUzoVLNQs +Sx7OP+wM5nyyMo+fsNA868MSbQlneNSa4/jhIwuNwbfHLMYJzFY+0PBuZ6Fh +DreTnZ8TtO94MSnZyUL9AcPGy25OMF7VH370Gwulsw8sdJk5gUaGdtHfPhau +j81olOVzgkcdW7yjBlnY+l7savgUG8zE9oLWCAvLIq8uzP9ig1PYufdeEyxM +sIVevmdsGH8SmigxTc1f2GuSWs6GoNlbDlWzLMTJ3SZGd9mwen2e+pF5Fham +Q+efBDakuldNLC6y8IcTmyv1Chv+B6JrSX8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06266353606145396}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7637,19 +7231,19 @@ HbLGog== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06266353606145396}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7663,232 +7257,113 @@ HbLGog== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVmHk4VV8Xx0XGMs9jppCZy3WvYe+lAVEoGdOPZCoylMxFkiEyVkKZMqUS -ShnvFVFUkjmEioyRIhR67/vPOc/nWfvsdfZa37X3OkfKxfeoGz0dHZ017fL/ -++/R9peyCYWo9o3zk23jDqg3RyjEcDAKV7/iO81bQsLA/95FaDANO976fqCv -2AQHWpYNMAwWYB6P5o+3i+0w94Jg2vpAFS7yCdRjLPbEYw3mvssDzXjDfGVq -8l4wNpKd/bQ00I2rp05PX86Ow+sDOjd/DHzBSqcapUVCb+OWfSWFHwp+4W0i -l2uqp0ux2FjtNxflTfyxRT1csrcS0/3yv91+ZBMnBScMDU1V4gkmRVP1oE3M -P5neGv+3Ej9SzXq0+WITR3Ew8rdKV2F0KTTgtu0WfsYeeqrCrwo7ievRd0b9 -w+STMzqWbE/wB5XRpDvzdLBctb7LS+sp5vN2KmPexwCn5ed6504+w4rM99os -bRmg1ziTcfz8MwwF375kejGA8eaT2Zarz7D34FlR5RsM4M1DKnO4/wy/3B+e -aDnJALJOrHPNi89wgHimT2bsdviBjIQDQ57jns5uTaW3jBC5OO+tEFmDp08L -WASMM0LELmfjbSk1eGu7g1fjMiOY/5fR8Dq3Bivqfb5nIc4EgQMe9jLUGhxV -ssgX4MMEk4z3kpk2a7Bm5M7VBi5msJ1y6Lh0oRanaRjVm1uzwMNT+cms9nVY -bdje2MCTBZr3B+Y3udXht9Fne5TCWCCj+uaox7k6zDR4Y44lnwW0ROs7YhLq -cNilr6It8yzw3gFtMTbWYdc3keE60ayAn6YUMInXY6JbvYHkEzb4eUMi609X -Pe7heN/O0cYGJZUFkRXD9div5ov15iAb+JKi1G2+1eOyHWw+Q1tsELqsOOH3 -tx7vqrLLuWG6AwYOe7l9lW3ALP9Wtli+7ICzQ8XH6gMa8Mfb6k1LXOzA6HBL -W5WlEWf1POAM3M0OvP1V2encjdiBQ97pD5kdtHf0v50UacQjV8S36E+xw5rW -zWRLlUY87sOmz1fNDrsT9TPwkUY8vX/iOdGeA3hKvi5fudmI70c4Mdef5YD5 -PcMyz+424jN1QzY0sUA9XYNsX1Ejnlf7sGL8gAPKXOrzPlY34h8iFIL9JgfI -KBUWbfQ24rUfGY/D8jkhWtth/0NOCq5V4v33r5oTSofT9z4UoOBQ9yTz6A5O -SGB6o5IpTsEbw9HfE39xAuFKWS9ZiYIjv9bwv5fmgneODWW3DlBwdGeR1XgA -F3gW0883BVLwhNepMOkILsj0MNlKCafgA6xS91zjueBSiZKyeRQFM+2/83P6 -LhesTu2cSb5OwXG1aalLbVxQelnKQuMeBScURrynF+YGkS93TBY7KNhU6zQP -vww3+NRseV58T8EsL49ay6tww8ST5rT1Hpr/r7uHzQy5oY1vP1/DCAWHS7/9 -duM0N2imp1qc+U7BulXVe0rOc8PjuGXd00sUvGaY6117kRvU/u20tlmh4Asn -z/38lMoNoIv3/N2gYJ88oS25Otp4ettx3x1UrKxOb0h+yQ0Ck/nvxzmoeJY6 -d8WskxtUtJkEgYeKPcYorH5fuOHL5t+WdiEqdpZw469l44FkOU0C224qlig3 -t3vDxwOl4BuxIE/FIwak7E8SPJB9TOLIC0UqtjuxQ4qewANCHEV3NNWp+Mid -SmWz4zww5XP20n5dKuZSzvY94cYD+Vvfcu/qU3FnfXSVry8P7M2nD55EVGw6 -bEu6cYUHrjzsczPcR8UsXoZhxdd54PtEYpz1ASpu+6NIqcnggYWKyTA7Yyre -K7K179MDHhA0FV9UNKNiurKpmMVqHjBQ8A//c4iKKeQP7duaeCDzjuVKjTkV -69kXWsj18oCSs14r/VEq/jN9PY00ygM3dqgpJllRcU1wUJ/pNA90TV66xWJN -xVq3TY/7bvDAeZG8/A5bKv4pr5VzmYkXJiXemPPYU3HFc/HP6Vy8sHiVUfKg -AxX7GDPLFovwAvPOXDHf41SsMvDDvUaWF64arZhFO1LxvPvQ/Q5VXnBNP18d -d4KKy363zI+QeKGPJd05/D8qlhPIOLftMC+kb3zK1HCm4omiyGpeW15QfIh1 -ftG4QPvM2u6TvPC2tVyr8CQtP61WeiQvXtDcNp2534WWH2uDS6YXeIHOq9qn -l8YjE3IvHCN4YcFqoc7qFBVnBXBt943nBR4Iimmmsd32P0aX03lhe7/hR0lX -Kha88TU+/S4vMHYeqvehsZBSdfRaMS8cFgq6VUpjkeaYiBMVvKASraTRS2Mx -e7vQ5lpeGHvEmLZEY4kfey7It/BCz0QZlc6NiiVj//omvuWFuF0dTdtoLC3x -7sxSHy/cXBS9s0wbL1ud42YzxgveF1zsPtJ49yE/5/ppXtA/dnrjMY3lvhoe -l/zJC+1FjMnBNFYI5bW5+pcX5Bf4BQk0VuSetJzdzgfJnFHZY7T1KJc+M7Pg -4ANmpCdzicaqOM7oqSAfqP7Sq+agsXq/vaGwFB8Mfo61S6XFR/Oskv4lRT5o -mlHiY6IxYfsm8SuBD4g70KI3Lb5a2Z0aJgZ8kOnw6UcrLf5EzTzlR0Z8wLas -IclNY1K7vzyPJR8sL3hHmztRsa7zPukgez5IP/Ja9hItn/qrfOIjLnwQuD2W -JY+Wb5T0TdDQmw/o25aJT2l6MGyIZ98RwQcelqTUJzT97LU6zuIXR/N/9MOb -HJq+9s8qM/Sl8sF/9bk+4XZUbCLUtZZTyAeybM1snDZUbBEgMKHZwQe1dAZ+ -aZZUbLljejSjhw8qFd2o3BZUfLSg9uPGCB9Qr3s+uXKYim26HN+3LfIBX9ZS -KTal4hPK9+oc+PkhS9O9UIhWb/+1BFRTJfhh98fYZRVDmr4cjCpkFfiBoYeo -QMRU7Bo3U7Sgyw8SX5UcdulRsdeEWmqUMz+w0T1ot9akYu+wbYlTp/nh/jRJ -kIFW/z48PTGHzvODZdda3D0VKj4HgeECMfxw1HZxvVGBikPuNHiUPeAHimbA -ur0EFcceO4i6f/PDUL7kS21mmt6edorQbxMAwc32sD4GKi7nPbaqsUMApNlF -nrrTUXF/938VqbsEoKmzt/vEOgXLHgmQPmIiAPn3q//lzlJw8+Fcpq5MAQi8 -kj13kbb/2jyS/frvngBM+u+f122j4NmdZVS1cgFo7+OXnn1BwdxvnwYnNwvA -rwT/47tqKdjZtGPWfE4AWvWDTL8VU/Cm0UrnO31B8Oj3OvEjgoJTikMfbBoJ -wmBPolJ/KM0/E12cyhFBiFhVmiu/QMGHWtkMr7sJwvXH333IXhSctU/yyaEk -QdjZu3voiTUFk8As482YIGj9mho3UaDg8+R8p/YoIbjmuPrt4MtGbJrHsWyW -KAQ53VqLApRGLM0cHtd5UwggjX3h4/NG3NVrU9lTKgR37d+sGT5oxKp+OxlG -O4XAP6LuVHYq7bwtDir+KSIMmRMfC8IdG7Ejn/l30SfC8KjF+pvhXAPev/gn -1OerCKjYCTySW6zHISY3FF/Mi0BG1jgs0PqF8nyVId7fIlAgwFpTPlqPhY45 -k2tZRGFjuDBYpLMez9e0rjKoioLYjUOOOQ/rcXpUSkBmsCgYU/8LdPasx1/4 -5XxesovBKaM4cb7hOnxZ/8hJEZI4KLPdeOv+uBbrlmc+vUTdBRdLjG8oz9H6 -t7WlyNfsUqB7IPW+sfpTvK7ENapiLQ0F52Q9KKRKrP/gYd6tWzKwShkuqhl6 -iJd4TJ1tmmUB3hxS1mEsxROJzjbnmOVA7XfOXX2Le/jgYtDBSaI89O7+HsG+ -lIPFNCRiWPTl4YhJXi65OwcvnHvZrGQoD1bjtx+FPsnBN35z6Z8zk4fsjJxU -vcAcPLp5X/WfkzyQmiRcajbu4nM7R3iF4+WhhaIreZf9Ls7aA6OHhuVhI8qh -kgln4/lTLOefRijAFwG+2edjGXghZ38jNVoBzPNsuK+2ZeDFj5HMb+IVILbx -Yanbowz802I9+3O6AvQpFfOeDMvAq3qzLzlKFUBJy+wQCGVger63Aqe7aCzJ -WpptfQsLv0yuE5faA8UBn51zRm/Q+ndB+tjmPSAW8mjOVyENz7gYl+q92gOM -1MtbB/nTcGJ+kPmPN3sgtu3OTQJ9Gu6RGMyy79sDmaOJOtojqdhZOJOgPL0H -1sb2ZS6lpOIQDlG3D+yKUN4wrHNwMwU/XJN4LWqvCE3FxyoSmpOxhY6FT9cJ -RUj/OFbHnJeMf16I4LvqoghaKW1y+ReTMfnXmPOClyIwbwnPKZGTcdv3vPWm -S4pg1sqbm1uZhMe+SCu5FyqCbfdxl18l1zHPO7mkikVFYGRlU5q+n4C3FtWL -OpYVwavz/neHuAQ8y6PXMLGuCHutiGIL7gm42c5iVmi7EtwTuOt/QTYBn58I -MrospAQCa4VzjPnXcO/f11tHDJUg4HN3gHhePM5Q9PL9laYEL0yRWV51LI4+ -fCGG/bYSHDvXEPY3Ixb7+UXclb+rBPsPsFQEhMZik2fpb46XKEGjamVfE46l -9VcN8i/rlcBvj9iPxjcx2MGeffzGhBJMLxWp6M5cxWJxjy2JRGWQdOd+XEGO -xmXlj1rWdZUBFCHNSSoak/oeEBuxMtiM2YTKsUbjY9KlYvsPKoNwRp3QxuAV -nNiQN33EURm+kbo7XoZcwX9/pEaejVKGV8Te6UZqFB6yD6go7FQGEr2w9ajj -ZewZeU7Gs0cZHnwsy/Uxvox/F/vdUhpUhoZrTvN8mpcxz7J3eNVnZfB4oX3o -HvNlbJrkZtK0rAxtacrurU8icW2zzfiwiAoEnqnm5OaKxLeVyFy8HiqgsY9k -U15xEVubvUuheKlA7LXC+M6Ei5jH6yT3GT8VyEgrMeD3uIgTyuJ5XoSoQK5C -ZSW/xEV8ac8Qn2+iCgj6S6WPXQ/HrvJhwm8qVUCMPTbnYkAY1pBplL6yoQL1 -LOU3BE+E4IW9R+6pblMFOQrZ9b1+CC5zmZQZYlQFpeIk/jKxECxbwL5bg1MV -Pv5iffhqJBgLSf0nPyalCpUFecl5/wXjLYl/SnrGqnDB8EVihWcQ7hAx1P6V -qgrnr1+zj7l5AXdJPJbbnqEKBqmagfRBF3C/tLgQ/x1V2Dv9Lvae3QX8WXH9 -D7GYZs+i/LMSu4DXdCubQutUoclLPeJMUQCWOy51iP6rKhiVOAxYUM7jqOxt -p7i11KDaeFKHi+0cjsv1PSZNVoOzHxQOzCz646R7nw4QkBqU/+cs8LXPH2c+ -qFWwNlGDFVOJK6QCf1xR779w21EN4o7+3HLX98ejw59DJK+qQdJXhqvPAv2w -rlhzilq/Gvw8UBYbu90Hf5GRHZ0ZUgPBoYSS6aGzOF4pRqlwTA3cX4ztDK88 -iwd1TduEZtQg7EXMBMnpLA6y7/67bUMN0neMBDI2emMHM3/CLJc6/DHdpGu6 -7IVvxV3OaSCqg3ghMdVX9TQ+k6jZKkxWh/3cp5Ya2E5jlPJ1LlBPHXxtNp4S -pzzxZMYBsgaoQ/4RnqryPE+sVcLaW3RQHRTbn2c/4PfE3a2prMmO6qD2dNSi -itkDczAUBJyMUocq69HkZjY3zLROtVqKVofGwwrrdTOueGvhk+blWHVwYnaV -//zaFS8OCS/lJdKeV71E9yzWFXdVpZ4dv6UO8RVsi2HMrjjN5bK70wN1uP3f -rZtmnKewQLOz3Yledag99+dEJjqJOWou6XzvV4eZv1YPp6RPYqbyOwIXP6rD -YnDHxRPMJ/Fq5mDvnVF1cNj9bJ7S5YwH/S2PjEyrw2N7mX4rN2ecJQWmxzfV -IVmEJVBXyQlLXN6lby+nATc1i9K/Sjvi8vMs0p8UNODO3qipmJXjGLkvMZ9U -0gC2cPObXq+P4xNmLT2e6hrA9LKGsupzHN/h9/AK1tUA4yWeTB6qAxYuK8/K -MNcAgvK1UXYve8zXY7DeF6gBL78kKzD+sMGFrXJj9iG0+d7s24U6bDChhrP1 -U5gG1J9M/VNeaIOP3v2cMhmpAZm7tvbqONjgVI+rCivXNMCqOtp96JU15th4 -a8uXqwFXZA10VB8dw6y7HZ8dfUV733efGLVyjuIzwtj0QbsGbA816duKPIo7 -2KVHGd5qQL/L422/Th3Fib+nGKu7NMA237PYRvEo5nh93lpwiGY3FLjLWHuE -Vu8Jy8PzGpCzRHnb/8kSi1XWabrxaMIxjWnBmVhzHF50t62RTxPOi90PELI1 -x58yIx0EBDXhmrdlepKcOc6JMop6JaoJ75oZKw63HcaSx7o/7NmtCbuH6B6z -sx7Gu1dn/BZ0NEG9V1fFJNsMqxoIPw46oQn5mnm9x36Y4Ccyp//SO2tCReHU -DtOXJpjEVmuc5KIJwxfqOGNum+C9A3bjhR6a4COcPN9laIJt/G9zd/trwoPL -hlIlGcY4okgwQDlGEwK6CTJ0lka4i12A/LlcEw54tAp9+LEPWy+7XfWu1ISf -oHDs29t9eGio+sPqE00owzsqiPf34YkS6zMctZrgMXXaL9ZlH23/v5mt16IJ -hGaFhrGBvVgqkG/r5oAmpGUcFJZ+Z4jPjfK0mNIRgEe6QMyXivHrNsfGMnoC -fI+esqeLx1jicfFzNkYCLBNKtKaOYtwRofuwg5UAhX+tvjyZQlhayuWmKS8B -7m81ierzI/zhVKWHqRwBPAY4mvIj9LH6jMVO00ME0C/7PvIgiYxjPmQylZkT -4Kmemj+PCxmP1H6lYztCgFC/iZImbTKOuxa00m5NgAgtduefn0h4XCl39KAT -AdTNhztzNUg4xWeh4uA5Arg3R4x2TBLx4q9E64O3CfDOPuJxwyUtPDKYb3M3 -iwCHBm1ecB7Xwh2Nz2yX7hAg0XZO4Y6OFi6MHbfPzCfAgpnSI6clAnYQ1fpv -powACcVjCXEeBNy6d9g9vpEABwSubhP9TxNnp+4Jbv9CABmKqJX0OXUcF4hC -xCcJQLik9pzJWh0HHrcK9Z8iwLE6ifciJHVsuftiuPA8AapLf2/lb6phptqu -yNMrBOCz3O8/LKaG/ceD4llZtIB0ivTBzlsFG6u1ZR1U0YIr2cr2Y2aK2I7J -5FiXmhbsFD2zkSikiM98ame31dQC6fKu3IzJPTgp4V2kq44WQOa+qBeRe3D/ -VK97hKEWnKS4y9rWK2DXvK+a1dZa8Pj38V0shvI4invbG8lLWtBnL3Mp55os -vjEdFV0SqQXZjRxqPSdlcTF1O1K9ogUzgc7mVmRZ3HGWpVIvTguo2X1DhBkZ -zN3BmWGTpgWNln/dPQ/J4LwoiVOJxVpwwdY1jSApjSm/9P6udmpBoaHEEcLy -Lpz/9rmL1QctOO/LorTyfBeOLiJ0lPdoQZzcKTap8F34oK1SptugFhz+z0Dl -KeMu3FsnotPzWQuKf/JFV4tL4NnL6+fKl7Xg6XHXm+nOYliA6/msq4g2mEeN -nHdXEcbr05pHm8S0YfuImpraphAeeVFeK7pLG2rSTCzM3wnh/PPFcd0y2hBH -JkRf9xHCygM35UBFGybbPxynqxbEe3MCXERBG0psngI+IoB9lDWHPrhpg1Do -338xLbz4wqrIHydPbZBiunZrLJMXhzcziCyc0YYDFgyR1/x4cYJdnz2bnzag -+t2/eiV4cWl08Me9odqQF6wmqxzBg7+MUAafJGkDnfhjMTdzbjxTUrJmmKoN -yxaTwTl7uPGPcylCXenawPmXQJBi5Mb/WFzs5m9rg7X1j0K6Ri4sps04KHtP -G7AQ2xchdS5sc91s4OZzGudqRocYceATdlqrMnXa8DJTvfkOIwd2lREXrGrQ -hj++s1l7W9nx+doFm84X2rBIV2HOY8SOUyZT+5neasOLa/uDSw7vxB0Gg31B -49rw1Kmmdfg8GzZYcO21ZyXC1/D4R1YCzFig3rigYQcRdqY7tzpPMeGFWEW/ -XRxEYCm3ev2qhgnnSP3YMclDhNHRTs58Rya8dSxsn58YERKMo518SxkxtT61 -KkaNCMkfXgkuW2zHt+MCImc0iKDu1b1uI7cd+1nbmh/SIgJHXZ8u2yYDllwU -m+UmE2Gu0fG20wMGHCldKnV3LxFecO5XeraDARvGU1KeWBNhml55/fbQNixi -k/+fgB0RuHz3MzRVb8M/paOVQxyIUK557b1q6jZc0HDwNXIiwts04eLPJtsw -/Y/ef+2eRPhC9xEl1dPhFps5n/EwIojyownF4//QAVmhw+wFRGD//qpWPeov -evq9Vcq1kGY3U2quPvgXyT4//7uumAj8FVGnS7n/ou2m73M9HxDBZjQ1tKfg -D2r2jfnZ8pQI6WE7tJU61hGqX84IfUWEhld375OV11B5dIH3h3YiPD3bqoD+ -rCJxc0tDhbdEsFw74Fv4ehVtjD+Y7esigkwqITbdfRXVMZ0y0Bgigu3VklvT -xb8R8eiHL1PzRAhYvpw1QFpBxaIRz9EiEZgWh+VKdq4g/knlxJtLRHCbV+95 -N76MloPitPf9JoIL4zCLxLVlVHUXx+X8IwLlsFVyzfgvpDbzSMWaRwckv7RU -mN/9iRQirwU36+iAs5Kz77rFD9SgV8R4SFcH7qp5OeUr/kCWq9S0Pn0duBg+ -5prF+AMF+6w8nDbUgbIwZ50/wYvotaPzZ45DOvD9u8Snb8cXkCeZaHrcWQe2 -TMmBmmgebSxbDky46EDIeog65+YcSqnwcvVx0wHPyT1XQxvmUI18/qXLZ3Tg -ukLy6TX9OcQisPNJSYAOFDDbXfPfP4vu//wsuhynA3hKJu6U9zRC5RulFxN0 -YJErf7WQMI26TwsSmZN0AIwuFJ/6O4X+jB+yFEnXgfXExapjiVPI9P3zaLir -A03O/+JnnnxDsw+uf0+s1IEjTjPx24UnkaIbmbp7SAfuvVe/nab1BSVLm/+5 -MqIDQiNFNy/v/IKWx1y0v4zqgFv2pZCXE58RxSHxQc5XHZC3Cflv363P6Kjl -WIbgdx1w3N/cxrs5jkL0rvqx0pGgNsTqyHTVGBpdy3zgQU+ClrLvbx56j6G9 -z8q/tW4nwY0EOz9G+TG0U2PQMYqVBEZFK9k+d0dRnpzSwb88JCjWWK6jS/2E -XnN/kPq+mwQMfVp9ymnDSOX9pKOZAgmKAphly48No7TEPxn3FUmwmfhbukpw -GDkyy3K4q5Gg4P1nIZQ7hBY3Av+MkkiQZyJQfPDpRyQwLdbTZUaifd8xBVit -DCA3imf0U38SpM3qp1e+7UULZ2eDDgSQILnb4nprZi8KFvf26g8kgateRail -Ry+6Fu57dC2MBMQPI3yvGHpRhW6gpH4MCe5nrDCI7u1BG8+uNLRkkUAyqD48 -qucDinFnrDh2lwSZJoTRpJIPiFMg9t5kLgn69BKf04d/QNIXrl1jLiLB81V5 -krjcB2RMSLUze0wCxrmlou0RXSjtcc5ydwsJlM8V19Re7URiTpLTp9pIMES9 -wrlE7kRFHAXDy69JENO5rDqy8A7VnC1qFugkwUAFIfiVwzv0SelhisMgCVIv -ODe36b5FCqW1yl/mSdB1idNYUKQDUfN6XZf4yeCgE1kjcqgNjR+ScgoUIsPw -cVbBTb42RLd+1v6vCBkyJtzenRxtRXuPMJszSpIhQESw4tG5VtS2TVdHWJEM -yOLCR7X8l+itSy6rIaLZhSjvZ/ha0HeOeYY2IENDKOny2clmxFFP2jLdR4bd -+05ZuTxrRpa83T+PmZBhJf6sQ7Z9M+pp2T7ieZQMaWb1PmpFL9CQ7JnyFHcy -RDYG27JZNqG/Xc9K+U+TQSy2NkhZvgmJXWS4l+VFhjnO18dOblLRib47GYV+ -ZMhb10x9foKKxq++j6wJJcPhe821B+UpaOqbltV4EhkG+3/tSBmpR8ul/1bV -ntPWvyrlW/3yOfpmY5QXX0uGsDderJ6Jz9Hg9usmX+vJILV6KSHr2HNU7yyS -eauJDK1EppXQb89QlJC27mY7GbSkNrN2cD1DXHFnwjtGyFB2tE3xashTRE+s -lJUdI0Ove++uWpOnaPnr6tuLn8lgUD750FHoKRrAV8U1vpGh2GJHy0LNE5Sz -mkvJWCTDtnqfGtl/VUjZo4/OjV4Xeqi73u/MrUQS/GL3Kdt1YfpV5tG3AZWI -q8XliBCzLpgc7Rb+blqJfkn8yH+zQxd2ZopLWKxVoLp+tn2a/LowEijJesm2 -ApkYwdV/8rpQwyuaUna4HJ3a/YA167AuxEVyXrJnKUOhrf+dkbPUBbfN+b3j -LfdRihvPm6qjujA0nCTJF3kfNRSFJL6x1QXxivN54X9KEZ+cCefmSV3AFWbD -MqslqE1uks85UBcqZX6d9OMoRiNtty/MB+uCTT/jjZ29Rein+6H+4DBdOJDz -/bRBVhHaVfIkIzVSF1y0Ax1tFYpQsHyUSMs12nwsDSkHzAqRosIuSblcXfB+ -cVh7rKwAwevuyKp8Xfg47T4rHVKAbDxjPqNCXeiUrhL7ZlyArpR+L7C9rwtn -HhoKffuWj0YUGnbHP9GFRSfHyTLFfJS0x15p/pUu3EhmdopPyUVLiunEqh+6 -kNU1EHikNAsNvoUDvL90QX4Ansi6ZaEmnwWrgBVdGHgxspIlnYWSqg76E//o -woXZlXtncjORoi7dwzoGPXBbZ/t9Nu82cjl4VqpFQA+Impln2ym30ME5EXVZ -YT1w+Pj7gPTVW0j9+mt0VVQPLIPG55gP3UJbXTKOxpJ6sL9hLixg+CbKthu6 -9WaPHnDufHH4Md1N1OthvLNXXw+MQ8RGM0+lo3rWFRFtrAccXPv5lTTTUcGD -gj23DPVgY0O0XXtbOvJb3DSyM9KDzXms9iQvDbEHPb08YqEHisQlPbXJVGQU -I7U64aIH6k4TMehKCqop/Pt5JU4PzAV+W8cLJyLivoBV0wQ9OO1omB7WnYCq -P8/vzLuuByfymxVEExNQlcSojmmaHpQfb2dy3JaAHt5uup6TrQf24VsbNb/i -UV7iVbJxuR78ZpWLSfodiySUtszvVOjBquclt9zaWHS3PdB1qUoPcvCb7gMX -Y1EWk2dy9nM9yOxnGjjMFItuRJpOLjbpwc9KjkrZXTEoPoAz9XaPHlwWlPj0 -+kw0YuGNK/7epwep7/b0pxOjUUwlXcPeQT14x1P1bIw+GkUvLH2bH9GDZxPX -PFfuXEGXPHv1Db/pwUnBMMpqfxQ655g5PbNGi6/SWyOHk5eRw34Z0JPQB7cA -HdFjKRfRZi8LR4ukPkxw2ST5GlxEeW4Lw6Yy+hBycSPHay4cfYupDXJQ0Icd -RS2BGwfD0bl2i8chmvrAMtljvpc7DF0zD5eoMdKH2BA2mbC2YKQydnIeH9SH -xGs+05mRwajL17julZk+aE5eNwjSC0YCqTw2A5b6wMv2tN3tSRAq6Cm9/ttB -Hw4yUj+NPAhEdXZ9G1q++pB+Q1biVmMAOjFT19Hgrw9yNYuPG6MCEF1o3u39 -AfrQHeVAiTEJQEbZXlrHQvRBsnOp9HffedT9aZv3+Sv6sMdDnlly7RyadVEd -rszQByn+J10kO38keja2VrVJH6YqfuXf+uONkv65ayc068PLhbVdPx56I/o0 -o8qpl/rA/uY9E6+zN5p9xng/r10f7o6PEh699kJ1dNG3eXr04RVnAt9mwRnk -cCMy6PekPmTMeSidCfVEnXLOv45O64MqcYM1mOSJ9tZi38ez+jAX/uKnxqoH -Uhzdcvdc1AfMe0L6XqAHWpe/aDO0pg+z6RczD110R7frQ7QpOwxAw8Shx7rU -Fe00t68U4TCAqZ3Zmyf9XFHkOEkliMvg//8HftORXZEn45qsOr8B1LrUxS+9 -OYV0LAL5CiQM4DtQT15Yc0H9X879uqphAHspwtG9Z04ifjbvysO2BmCiUdaz -aXsCFe67GPrD3gAejhv5O205Is2LSfvSHQ0g/B2rW0eRIzL/UdE3eNIArOzO -h1asHkcx/Svrp7wNICwj/4h3iQNaK4jYG3rZAGJ0mOm1tOxQzEjKDvFoA1A5 -c8t7cMYW8QkU9FJjDGD31CdnhzxbpB7/0p0x0QDkfk4vz3PaotO+rAkptwyA -73NkOcu6NRrSS+8pfmAAMlY3DDiXrJDnhcI7B8sNQDpZo8X3iRX6XV7tNl9h -AOJHJZjjA60Qj/TgqsYzA6DLGfD7tHUUmbGIizU2GcD8x6C8XsGjqKG32LWn -jxavQ1PnDpy2RKYcNSqBgwbwwitYbB/REg0at/8WGjaArHOHi4YYLNFy3Vzc -f+MG0G/BXJZnaIFU8tUfzcwagN+GUOShlsOoYcgwMPG7ASRKUUuuuh9GpnxW -WO2HAbwR/xM/wHYYucde+BCwQuOYqPIam0NouSkmS3DNANzDk3MNt8xQ1J+M -U3V/DCDfNaK0v9gMcWndVz6xaQBXhz8+C7A0Qzln61b+/aPli3GwSeivKfof -HbLGog== +1:eJwV12k8VV0XAHBFQlSmDJnuPfea54qUa61UCqGkQU9FcQ2FVJKUTJkyJDSZ +p2S8BxmKogxp0iBFRNFs9ph58J73fDm//5e99zp777XWoR0/Zc1eykU9S7i4 +/v+e7H7RwIjMNmLc9kuzEzY0ak2VvLClPQj2vOrgXVcrBSj+9rhkexz8WEhO +nK5RAe/d+W3c7ZkwQtg6fKgxAOEhibiZtlKoe2Vfn15jCl8fWZ4ab6sDhRtG +jstrbMGE0dc12tYCLFO+21XVrjDTpn9jpK0Xbo4UVN4ovQD1W+9lv88cg0Th +qNfTyVdB5uvDX8fV54Fx4uIB1YR4EHOzy1++lRvNGl69/Bh8B+J0TKot9/Hh +rMjobHt2Gny+rf1kdLUQJrTUyh0KzITIbP+3S6WEcXqxZUO09l2QSPgeEZ8i +inVJmfIn4+5BmI2pUcukOAofZyQci8qDswYZdi+CJNHOacdOXZcCMEtfOW4e +JYm7HjvtvuZRAPTll8Lf3JDEplPVK/54FcC71v0lH3Il0VJSJjEqsAA0PQW5 +u99IoopUEl9mYgH8yTmf86+0FLYObmqaf1UAh8UsB9fel0JBrqKOc2qFsG14 +1tfjuzSqlp/1tekqhAs7E1SfDkhjpgXzQUBvIXAyNDpEJ6WxT+9nTe7vQpC0 +sTd4yLcWxxqaFQdGC2HgQeMUt+ZavN+s+g/yFkF8UKzXHZ+1WFWXry2nWQS9 +4ooeDUIyaBGpeZvjWwQSp2plJSRkUC/rVuFe/yLY9fxgs6uCDCb6/g4ZDy6C +Ct9I9VXrZLDXfiZUJboIrn4d6bM9KINKTlZP7dOKQDev2nk4Uwat71kK8dQX +QaDhnmPSG2UR4jl9sss5sPNo6r/6xpS/2A8mrODAyoD+4H27ZPH8y9fjvKs5 +kFwfkhNrL4uPr8mJfJHkwAOzqn7eCFnc83ZVhJkqB0YOEt5jn2Vx2rHWf+Mu +Dhw9N3H19UU53DUwF2cbxQHmLWOZvhA5dN7jelInlkPFf61oeawcxl8LsuBJ +4IDvfyrvjLPlUGgbqZWUxIEbwUfFH76WQ8dtM2ei8znw+npT2l1ZeYxzfqdz +pYkDmzh3yi7XymNrs9mDR/Mc2Nb2Zn7ouTz+nXAxquUiwZKLZ4ddizxWe9pe +fMxNgoO1x2f4KY8fby5IF/GTYHKR5h+wTAGfXC6YPShOgqf8ZNYWNQW00tsc +8V2NhAbntMF6bwXs7poKfLaPBNP/DEQuXVTArMa0G3iQhDexrXrrAxTQRNXK +reIQCZ8f8gdkRyig/84Ixxt2JAyt8BIJSVbAN5Jc0QquJEgW79Q3qVNAUd1U +pttFEtymRwOeC9HwYxyjtzOZhE2nndb8EqHhOaNUrplUEvj6Ogq4JWkYSs7q +CWeQcLez/pMRnYaXVLWGdO+S0F1zQ71cj4Y/22ITNxeRYBVi0J5hR8OXu72v +HX9EgtxCkXutIw2rQm2DdWpIGPCmc3e50nBOfypxrpaEcJcVmpJeNORjB24M +rCfhiXlXcEw4DZe8GDS2fkmCrkig1sUSar7CLlPBNhK4IicablfQMDDD73N0 +OxU/94lDFdU0tBT+ckegg4STE9Yho400fH2DVTzxhYTsdkancwcN9WXvm8f1 +knBmzx3PkK80/NJ29MLgdxLwpRBv1g8a6nY/6N76k4Su6knt7iEajoovs+n9 +TcKatOehNtx0lM+QWvprgIQfEiyZM3x0PGVhzrt2iITS2JKSa0J0dGo4bmo+ +TMUflPjlpQQdL7ePXUsZpeJju+luUafjs7MlG/knSZhRW92tsY+O3WENr+fn +SZhMkQ5cd4iOPerRk70LJIyvYjIM7OhI1i5LrF+k9m/M4MQ2Vzrmj/fmVnMV +Q2+1w+QhPzqaLfG1sllaDF81PO7YB9HRyGNvexnlL2k+hk5hdNR8+44myl0M +n4Kjg05fp6NKcc70c8ovzStXht+lI0+rY73UsmJoevy0JDqfjkePctm5UG7Q +em0TT9Kxsk+1toxyjWhPYupDOs7kqb014S2G6pB+VnYNHSWPLA2IovxgauJb +Xj31fURcp95SLu0UUCpvpuOd8oHNu5cXA2kh/rKqhY5L+4UEoikX1sq7P2mj +4z2yKb2Jck7W+vuveugoliSiqsdXDFnisP/9LzqaPiuQPUE5Pcx05lM/HSfD +BzuTKCeePAq9E3Q8POVfNU35VpdL7+9ZOqb/86WT4C+GBKuzIYOLdOxvmn6x +i/L1p37KYzwEdZ4Ph5ylHLMu/NU0P4FX9WJW3qYceTfOY2ElgXrJa5yqKIdL +pAjziBE4+9YvqoNy0FzJgVVyBDq7CO4UEygGf/dHs2IEgY/em3RrUL709VmK +tDKBI8Kh27dTvrDnPSpoEMh+ZXP5EGXv+s7vTF0CtUSNItwpn93wK1RNn8Dn +ns1Olyl73htR0TEksKorRiKasofU3Gu9LQQeb1yZfIfyychlnoYmBN7k6RjP +ouwyv0rU2JxAu79+9ELKTqekK3bsJjBbN5xZStmhh2FrsY/AyVVhC+WU7fdq +/Wd9iMC1NH5OJeUjjQZpB+0I/HkuZf3/fUh/m/FRRwI/Rn+IK6N8IM/yp4Mr +gS8ObH5BUrZZaxvu6kFgjQ67PZfynmgHtVNnCTzzp+dJGmXLRfc3Xj4EMiuN +gxMom5/2Oe3rR6DRDimFMMo7vweJBQQRyF88des85e37oitDwgh09PbsZ1M2 +brp1KDKKQM+oNWutKYNB5nzsdQKN9/gpGVI2LChMv3mTwKTYjcIMyp0KBWnb +kwiMjznCWUHZ92Ze6ngaga9OcJ8epfarMjAn2TqPwIex5S6VlPdPZSct4RDY +HVOWeovyuFtWYnEpgZwPUv+do6x7MP32ykcEtolwaWlQft+ceuvxEwI/m3gv +46XsuTXlplsjgcfWs5Z1UeeNo5mY8PINgWflCoJCKKssS4gN7SGQVn0n6Al1 +np/7xl3b8Itaj4RiyVXKTiOxMT/6CNw790twL+Xszugo43ECUXjBopu6Lwql +YeELvAzsjjjI85W6b7VKoWFFKxg4LHA0P5Hy0ZQroYdXM9Dk+LVAG8pJ4YFX +qqQYWDro3VjHUwxr7C4GeKszcFvw2ZII6n6Xt17wZ+owsCN/eEiPso2Zz+XW +DQx048881kvlh7gN5y7pAgMd1Mv+rKMsJHjKZ2gPA8uD/kY+pfJLYaD7+ZT9 +DFR+5xloT9ls6qT3rn8YOJV3036OykfhvS5e+Y4MhN9rfdhUvuJ5eNzT6TwD +2yterF81R0KW5rFT4pcY2HPeqEV7lgTjbDuPhgAGrud+0Gc5Q4L/tcNu9KsM +vA5jsQFTJMyy97t0JzNQJJ717uEYCaMiZvb76xj42D2EP6SfhHY3+rsTTQys +TNJlHuij6sOzWfB/zcAWx+06zL8kxPoWyOd+osZ3UFco/0WCdq/g15k+Bg48 +lAnI7iHBo+TtkRRRJm7aVx9c94mE/Stym0skmZgaom9p85EEI3YA65ksE1PM +cuR7P5AgJKUjO6zEREUDna7RdyQUBsR9QUMmqrGs+3uoetRnte+fH45MfJSV +fnsZVc9a8jReTbsy8SP/4YCDVL2r4ubdLHSKiQLa+0PvVZEQUVkhrXeBie5F +Q/8aVJKgLC/ZERbNROMkNR/tYhKchzoOqlUwcZ/X4wA2VV9/RNnvP7NcEVfc +j5SaDaDW36dO1xZUxNhvBr7Tl0mY2jEzOLhaEROPGWWNXSJBgDsuxFVaEc1u +7Nv7zYeK/0J9mb2GIoon0a3iPUnwYyuKWu1VxHMNNe/tqX5gjdHAW7U0RXye +o/Jf5iYS0pMeJP3NUkQbvbJvhhtJUJm54nwvVxGbo0oqPmwgwbBMdpFeqoi/ +vbcYTmtT/YuqlaZ0oyIuXPBqkVEioXhNaRRfvyIuHWBZfxSh+pPh86Y/9ZTw +wsSTv4J/OCCjIxfKZ6iERzo86II/OTB0pqFObYsS5iQfm1zey4GEydWGZ8yV +UEJkwnuikwPd83mai3ZKGN+4bEXuWw6cEfwiKhWhhDE5eUvcKziQqILduzqV +sC01cW9QINW/OfCdLfNXxqRz1fOGK6nxU7c9rr2ijNHrOoODBDgw/Dlg+asI +ZWwWVtNp5OXAv1YzST3xyripQpnPeLEIpjb3NazMVUbDP9vbpEaKYKnY6zWu +75SRYb/EZ+v7IpBquFYlS1PBBLO/j65eL6L+PySWhtWp4B6GSLqpQBGINCvG +FA+r4pvUC3NF4wUgE07u1tNTx62vmkSkcvPhtprBalFnDUzsnzNYsM2Dl9Jb +Noxd18Reg78fu5fkwiaZulitT1oYn3I/7Jt/DqzkzvQ6FqSNd83/3T+2+i7I +Bcob2irqoLnZpxCLwCzgZx6usG7SQcM3dTqf5jJAkyVFnj+iiwkPtk8t3EyH +M90i9WZc63DLcUU9E1YqDI9F7TO9vQ699nJy1G4nwQ6tZ4mmGuvRskBub7bM +HagZ2zw39WY9JuWP8pyMuQke6rod79kbMKOO8avdKgFYQ46ttvx6uNuoxZJP +IA62MyQthDL1cLSy5b61SCwoB1z1qdPXx4Gzub9r46NAlW1Qy+zQxzUxxtox +fBHArnG5UnZ6I4r8kRskeEOhNr3VcVTcAHecF7OIEQ2G8dzFKa1KA7xZPrB+ +x6UAcGAW8CdabELph7vvLt69BKOq8XqlI5vwhbNWRv1FH3iQPdczEb4Zy0em +Q7sEz8GhbQRuljNEl9YErx+iZ2Cte9hDzSeGuKl20rM4yAPEBdxKLA6wsG35 +KDE46ArZW/18R2xZmLb1e+nXDlfQ9YvZGn+YhZXTPER3kytYjhR/bD/Gwvx7 +kbELGa4Q+mlixsGNhQJiH3ma97vCdKa/sW8gC3X7T51PqnOBjs3xH3IKWOh+ +YPhPW6YzuJzLTjblsPBkWeSvzdedYZJTzh4oZmHiBFO8wN8ZROjtUzoVLNQs +Sx7OP+wM5nyyMo+fsNA868MSbQlneNSa4/jhIwuNwbfHLMYJzFY+0PBuZ6Fh +DreTnZ8TtO94MSnZyUL9AcPGy25OMF7VH370Gwulsw8sdJk5gUaGdtHfPhau +j81olOVzgkcdW7yjBlnY+l7savgUG8zE9oLWCAvLIq8uzP9ig1PYufdeEyxM +sIVevmdsGH8SmigxTc1f2GuSWs6GoNlbDlWzLMTJ3SZGd9mwen2e+pF5Fham +Q+efBDakuldNLC6y8IcTmyv1Chv+B6JrSX8= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.12263499218727081`}}, + "PlotRange" -> {{0, 30}, {0., 0.06266353606145396}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7899,6 +7374,7 @@ HbLGog== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7926,7 +7402,8 @@ HbLGog== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.12263499218727081`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06266353606145396}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7934,10 +7411,13 @@ HbLGog== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913218813523655`*^9}, - CellLabel->"Out[86]=",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] + CellChangeTimes->{3.9913218813523655`*^9, 3.994387031244979*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"a2d350c9-e604-4c74-8411-2678fec16978"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -8006,15 +7486,787 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003512"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994236230518815*^9},ExpressionUUID->"d9d63445-4981-8f49-b88b-\ -9e93d345c648"], + 3.994236230518815*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.060662}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387031468721*^9}, + CellLabel-> + "Out[105]=",ExpressionUUID->"1a1272da-e3ce-4301-ae29-ddedc86c36c1"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"39000a9e-1f94-0640-8925-\ -ec28b28907cc"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV12k8VV0XAHBFQlSmDJnuPfea54qUa61UCqGkQU9FcQ2FVJKUTJkyJDSZ +p2S8BxmKogxp0iBFRNFs9ph58J73fDm//5e99zp777XWoR0/Zc1eykU9S7i4 +/v+e7H7RwIjMNmLc9kuzEzY0ak2VvLClPQj2vOrgXVcrBSj+9rhkexz8WEhO +nK5RAe/d+W3c7ZkwQtg6fKgxAOEhibiZtlKoe2Vfn15jCl8fWZ4ab6sDhRtG +jstrbMGE0dc12tYCLFO+21XVrjDTpn9jpK0Xbo4UVN4ovQD1W+9lv88cg0Th +qNfTyVdB5uvDX8fV54Fx4uIB1YR4EHOzy1++lRvNGl69/Bh8B+J0TKot9/Hh +rMjobHt2Gny+rf1kdLUQJrTUyh0KzITIbP+3S6WEcXqxZUO09l2QSPgeEZ8i +inVJmfIn4+5BmI2pUcukOAofZyQci8qDswYZdi+CJNHOacdOXZcCMEtfOW4e +JYm7HjvtvuZRAPTll8Lf3JDEplPVK/54FcC71v0lH3Il0VJSJjEqsAA0PQW5 +u99IoopUEl9mYgH8yTmf86+0FLYObmqaf1UAh8UsB9fel0JBrqKOc2qFsG14 +1tfjuzSqlp/1tekqhAs7E1SfDkhjpgXzQUBvIXAyNDpEJ6WxT+9nTe7vQpC0 +sTd4yLcWxxqaFQdGC2HgQeMUt+ZavN+s+g/yFkF8UKzXHZ+1WFWXry2nWQS9 +4ooeDUIyaBGpeZvjWwQSp2plJSRkUC/rVuFe/yLY9fxgs6uCDCb6/g4ZDy6C +Ct9I9VXrZLDXfiZUJboIrn4d6bM9KINKTlZP7dOKQDev2nk4Uwat71kK8dQX +QaDhnmPSG2UR4jl9sss5sPNo6r/6xpS/2A8mrODAyoD+4H27ZPH8y9fjvKs5 +kFwfkhNrL4uPr8mJfJHkwAOzqn7eCFnc83ZVhJkqB0YOEt5jn2Vx2rHWf+Mu +Dhw9N3H19UU53DUwF2cbxQHmLWOZvhA5dN7jelInlkPFf61oeawcxl8LsuBJ +4IDvfyrvjLPlUGgbqZWUxIEbwUfFH76WQ8dtM2ei8znw+npT2l1ZeYxzfqdz +pYkDmzh3yi7XymNrs9mDR/Mc2Nb2Zn7ouTz+nXAxquUiwZKLZ4ddizxWe9pe +fMxNgoO1x2f4KY8fby5IF/GTYHKR5h+wTAGfXC6YPShOgqf8ZNYWNQW00tsc +8V2NhAbntMF6bwXs7poKfLaPBNP/DEQuXVTArMa0G3iQhDexrXrrAxTQRNXK +reIQCZ8f8gdkRyig/84Ixxt2JAyt8BIJSVbAN5Jc0QquJEgW79Q3qVNAUd1U +pttFEtymRwOeC9HwYxyjtzOZhE2nndb8EqHhOaNUrplUEvj6Ogq4JWkYSs7q +CWeQcLez/pMRnYaXVLWGdO+S0F1zQ71cj4Y/22ITNxeRYBVi0J5hR8OXu72v +HX9EgtxCkXutIw2rQm2DdWpIGPCmc3e50nBOfypxrpaEcJcVmpJeNORjB24M +rCfhiXlXcEw4DZe8GDS2fkmCrkig1sUSar7CLlPBNhK4IicablfQMDDD73N0 +OxU/94lDFdU0tBT+ckegg4STE9Yho400fH2DVTzxhYTsdkancwcN9WXvm8f1 +knBmzx3PkK80/NJ29MLgdxLwpRBv1g8a6nY/6N76k4Su6knt7iEajoovs+n9 +TcKatOehNtx0lM+QWvprgIQfEiyZM3x0PGVhzrt2iITS2JKSa0J0dGo4bmo+ +TMUflPjlpQQdL7ePXUsZpeJju+luUafjs7MlG/knSZhRW92tsY+O3WENr+fn +SZhMkQ5cd4iOPerRk70LJIyvYjIM7OhI1i5LrF+k9m/M4MQ2Vzrmj/fmVnMV +Q2+1w+QhPzqaLfG1sllaDF81PO7YB9HRyGNvexnlL2k+hk5hdNR8+44myl0M +n4Kjg05fp6NKcc70c8ovzStXht+lI0+rY73UsmJoevy0JDqfjkePctm5UG7Q +em0TT9Kxsk+1toxyjWhPYupDOs7kqb014S2G6pB+VnYNHSWPLA2IovxgauJb +Xj31fURcp95SLu0UUCpvpuOd8oHNu5cXA2kh/rKqhY5L+4UEoikX1sq7P2mj +4z2yKb2Jck7W+vuveugoliSiqsdXDFnisP/9LzqaPiuQPUE5Pcx05lM/HSfD +BzuTKCeePAq9E3Q8POVfNU35VpdL7+9ZOqb/86WT4C+GBKuzIYOLdOxvmn6x +i/L1p37KYzwEdZ4Ph5ylHLMu/NU0P4FX9WJW3qYceTfOY2ElgXrJa5yqKIdL +pAjziBE4+9YvqoNy0FzJgVVyBDq7CO4UEygGf/dHs2IEgY/em3RrUL709VmK +tDKBI8Kh27dTvrDnPSpoEMh+ZXP5EGXv+s7vTF0CtUSNItwpn93wK1RNn8Dn +ns1Olyl73htR0TEksKorRiKasofU3Gu9LQQeb1yZfIfyychlnoYmBN7k6RjP +ouwyv0rU2JxAu79+9ELKTqekK3bsJjBbN5xZStmhh2FrsY/AyVVhC+WU7fdq +/Wd9iMC1NH5OJeUjjQZpB+0I/HkuZf3/fUh/m/FRRwI/Rn+IK6N8IM/yp4Mr +gS8ObH5BUrZZaxvu6kFgjQ67PZfynmgHtVNnCTzzp+dJGmXLRfc3Xj4EMiuN +gxMom5/2Oe3rR6DRDimFMMo7vweJBQQRyF88des85e37oitDwgh09PbsZ1M2 +brp1KDKKQM+oNWutKYNB5nzsdQKN9/gpGVI2LChMv3mTwKTYjcIMyp0KBWnb +kwiMjznCWUHZ92Ze6ngaga9OcJ8epfarMjAn2TqPwIex5S6VlPdPZSct4RDY +HVOWeovyuFtWYnEpgZwPUv+do6x7MP32ykcEtolwaWlQft+ceuvxEwI/m3gv +46XsuTXlplsjgcfWs5Z1UeeNo5mY8PINgWflCoJCKKssS4gN7SGQVn0n6Al1 +np/7xl3b8Itaj4RiyVXKTiOxMT/6CNw790twL+Xszugo43ECUXjBopu6Lwql +YeELvAzsjjjI85W6b7VKoWFFKxg4LHA0P5Hy0ZQroYdXM9Dk+LVAG8pJ4YFX +qqQYWDro3VjHUwxr7C4GeKszcFvw2ZII6n6Xt17wZ+owsCN/eEiPso2Zz+XW +DQx048881kvlh7gN5y7pAgMd1Mv+rKMsJHjKZ2gPA8uD/kY+pfJLYaD7+ZT9 +DFR+5xloT9ls6qT3rn8YOJV3036OykfhvS5e+Y4MhN9rfdhUvuJ5eNzT6TwD +2yterF81R0KW5rFT4pcY2HPeqEV7lgTjbDuPhgAGrud+0Gc5Q4L/tcNu9KsM +vA5jsQFTJMyy97t0JzNQJJ717uEYCaMiZvb76xj42D2EP6SfhHY3+rsTTQys +TNJlHuij6sOzWfB/zcAWx+06zL8kxPoWyOd+osZ3UFco/0WCdq/g15k+Bg48 +lAnI7iHBo+TtkRRRJm7aVx9c94mE/Stym0skmZgaom9p85EEI3YA65ksE1PM +cuR7P5AgJKUjO6zEREUDna7RdyQUBsR9QUMmqrGs+3uoetRnte+fH45MfJSV +fnsZVc9a8jReTbsy8SP/4YCDVL2r4ubdLHSKiQLa+0PvVZEQUVkhrXeBie5F +Q/8aVJKgLC/ZERbNROMkNR/tYhKchzoOqlUwcZ/X4wA2VV9/RNnvP7NcEVfc +j5SaDaDW36dO1xZUxNhvBr7Tl0mY2jEzOLhaEROPGWWNXSJBgDsuxFVaEc1u +7Nv7zYeK/0J9mb2GIoon0a3iPUnwYyuKWu1VxHMNNe/tqX5gjdHAW7U0RXye +o/Jf5iYS0pMeJP3NUkQbvbJvhhtJUJm54nwvVxGbo0oqPmwgwbBMdpFeqoi/ +vbcYTmtT/YuqlaZ0oyIuXPBqkVEioXhNaRRfvyIuHWBZfxSh+pPh86Y/9ZTw +wsSTv4J/OCCjIxfKZ6iERzo86II/OTB0pqFObYsS5iQfm1zey4GEydWGZ8yV +UEJkwnuikwPd83mai3ZKGN+4bEXuWw6cEfwiKhWhhDE5eUvcKziQqILduzqV +sC01cW9QINW/OfCdLfNXxqRz1fOGK6nxU7c9rr2ijNHrOoODBDgw/Dlg+asI +ZWwWVtNp5OXAv1YzST3xyripQpnPeLEIpjb3NazMVUbDP9vbpEaKYKnY6zWu +75SRYb/EZ+v7IpBquFYlS1PBBLO/j65eL6L+PySWhtWp4B6GSLqpQBGINCvG +FA+r4pvUC3NF4wUgE07u1tNTx62vmkSkcvPhtprBalFnDUzsnzNYsM2Dl9Jb +Noxd18Reg78fu5fkwiaZulitT1oYn3I/7Jt/DqzkzvQ6FqSNd83/3T+2+i7I +Bcob2irqoLnZpxCLwCzgZx6usG7SQcM3dTqf5jJAkyVFnj+iiwkPtk8t3EyH +M90i9WZc63DLcUU9E1YqDI9F7TO9vQ699nJy1G4nwQ6tZ4mmGuvRskBub7bM +HagZ2zw39WY9JuWP8pyMuQke6rod79kbMKOO8avdKgFYQ46ttvx6uNuoxZJP +IA62MyQthDL1cLSy5b61SCwoB1z1qdPXx4Gzub9r46NAlW1Qy+zQxzUxxtox +fBHArnG5UnZ6I4r8kRskeEOhNr3VcVTcAHecF7OIEQ2G8dzFKa1KA7xZPrB+ +x6UAcGAW8CdabELph7vvLt69BKOq8XqlI5vwhbNWRv1FH3iQPdczEb4Zy0em +Q7sEz8GhbQRuljNEl9YErx+iZ2Cte9hDzSeGuKl20rM4yAPEBdxKLA6wsG35 +KDE46ArZW/18R2xZmLb1e+nXDlfQ9YvZGn+YhZXTPER3kytYjhR/bD/Gwvx7 +kbELGa4Q+mlixsGNhQJiH3ma97vCdKa/sW8gC3X7T51PqnOBjs3xH3IKWOh+ +YPhPW6YzuJzLTjblsPBkWeSvzdedYZJTzh4oZmHiBFO8wN8ZROjtUzoVLNQs +Sx7OP+wM5nyyMo+fsNA868MSbQlneNSa4/jhIwuNwbfHLMYJzFY+0PBuZ6Fh +DreTnZ8TtO94MSnZyUL9AcPGy25OMF7VH370Gwulsw8sdJk5gUaGdtHfPhau +j81olOVzgkcdW7yjBlnY+l7savgUG8zE9oLWCAvLIq8uzP9ig1PYufdeEyxM +sIVevmdsGH8SmigxTc1f2GuSWs6GoNlbDlWzLMTJ3SZGd9mwen2e+pF5Fham +Q+efBDakuldNLC6y8IcTmyv1Chv+B6JrSX8= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k8VV0XAHBFQlSmDJnuPfea54qUa61UCqGkQU9FcQ2FVJKUTJkyJDSZ +p2S8BxmKogxp0iBFRNFs9ph58J73fDm//5e99zp777XWoR0/Zc1eykU9S7i4 +/v+e7H7RwIjMNmLc9kuzEzY0ak2VvLClPQj2vOrgXVcrBSj+9rhkexz8WEhO +nK5RAe/d+W3c7ZkwQtg6fKgxAOEhibiZtlKoe2Vfn15jCl8fWZ4ab6sDhRtG +jstrbMGE0dc12tYCLFO+21XVrjDTpn9jpK0Xbo4UVN4ovQD1W+9lv88cg0Th +qNfTyVdB5uvDX8fV54Fx4uIB1YR4EHOzy1++lRvNGl69/Bh8B+J0TKot9/Hh +rMjobHt2Gny+rf1kdLUQJrTUyh0KzITIbP+3S6WEcXqxZUO09l2QSPgeEZ8i +inVJmfIn4+5BmI2pUcukOAofZyQci8qDswYZdi+CJNHOacdOXZcCMEtfOW4e +JYm7HjvtvuZRAPTll8Lf3JDEplPVK/54FcC71v0lH3Il0VJSJjEqsAA0PQW5 +u99IoopUEl9mYgH8yTmf86+0FLYObmqaf1UAh8UsB9fel0JBrqKOc2qFsG14 +1tfjuzSqlp/1tekqhAs7E1SfDkhjpgXzQUBvIXAyNDpEJ6WxT+9nTe7vQpC0 +sTd4yLcWxxqaFQdGC2HgQeMUt+ZavN+s+g/yFkF8UKzXHZ+1WFWXry2nWQS9 +4ooeDUIyaBGpeZvjWwQSp2plJSRkUC/rVuFe/yLY9fxgs6uCDCb6/g4ZDy6C +Ct9I9VXrZLDXfiZUJboIrn4d6bM9KINKTlZP7dOKQDev2nk4Uwat71kK8dQX +QaDhnmPSG2UR4jl9sss5sPNo6r/6xpS/2A8mrODAyoD+4H27ZPH8y9fjvKs5 +kFwfkhNrL4uPr8mJfJHkwAOzqn7eCFnc83ZVhJkqB0YOEt5jn2Vx2rHWf+Mu +Dhw9N3H19UU53DUwF2cbxQHmLWOZvhA5dN7jelInlkPFf61oeawcxl8LsuBJ +4IDvfyrvjLPlUGgbqZWUxIEbwUfFH76WQ8dtM2ei8znw+npT2l1ZeYxzfqdz +pYkDmzh3yi7XymNrs9mDR/Mc2Nb2Zn7ouTz+nXAxquUiwZKLZ4ddizxWe9pe +fMxNgoO1x2f4KY8fby5IF/GTYHKR5h+wTAGfXC6YPShOgqf8ZNYWNQW00tsc +8V2NhAbntMF6bwXs7poKfLaPBNP/DEQuXVTArMa0G3iQhDexrXrrAxTQRNXK +reIQCZ8f8gdkRyig/84Ixxt2JAyt8BIJSVbAN5Jc0QquJEgW79Q3qVNAUd1U +pttFEtymRwOeC9HwYxyjtzOZhE2nndb8EqHhOaNUrplUEvj6Ogq4JWkYSs7q +CWeQcLez/pMRnYaXVLWGdO+S0F1zQ71cj4Y/22ITNxeRYBVi0J5hR8OXu72v +HX9EgtxCkXutIw2rQm2DdWpIGPCmc3e50nBOfypxrpaEcJcVmpJeNORjB24M +rCfhiXlXcEw4DZe8GDS2fkmCrkig1sUSar7CLlPBNhK4IicablfQMDDD73N0 +OxU/94lDFdU0tBT+ckegg4STE9Yho400fH2DVTzxhYTsdkancwcN9WXvm8f1 +knBmzx3PkK80/NJ29MLgdxLwpRBv1g8a6nY/6N76k4Su6knt7iEajoovs+n9 +TcKatOehNtx0lM+QWvprgIQfEiyZM3x0PGVhzrt2iITS2JKSa0J0dGo4bmo+ +TMUflPjlpQQdL7ePXUsZpeJju+luUafjs7MlG/knSZhRW92tsY+O3WENr+fn +SZhMkQ5cd4iOPerRk70LJIyvYjIM7OhI1i5LrF+k9m/M4MQ2Vzrmj/fmVnMV +Q2+1w+QhPzqaLfG1sllaDF81PO7YB9HRyGNvexnlL2k+hk5hdNR8+44myl0M +n4Kjg05fp6NKcc70c8ovzStXht+lI0+rY73UsmJoevy0JDqfjkePctm5UG7Q +em0TT9Kxsk+1toxyjWhPYupDOs7kqb014S2G6pB+VnYNHSWPLA2IovxgauJb +Xj31fURcp95SLu0UUCpvpuOd8oHNu5cXA2kh/rKqhY5L+4UEoikX1sq7P2mj +4z2yKb2Jck7W+vuveugoliSiqsdXDFnisP/9LzqaPiuQPUE5Pcx05lM/HSfD +BzuTKCeePAq9E3Q8POVfNU35VpdL7+9ZOqb/86WT4C+GBKuzIYOLdOxvmn6x +i/L1p37KYzwEdZ4Ph5ylHLMu/NU0P4FX9WJW3qYceTfOY2ElgXrJa5yqKIdL +pAjziBE4+9YvqoNy0FzJgVVyBDq7CO4UEygGf/dHs2IEgY/em3RrUL709VmK +tDKBI8Kh27dTvrDnPSpoEMh+ZXP5EGXv+s7vTF0CtUSNItwpn93wK1RNn8Dn +ns1Olyl73htR0TEksKorRiKasofU3Gu9LQQeb1yZfIfyychlnoYmBN7k6RjP +ouwyv0rU2JxAu79+9ELKTqekK3bsJjBbN5xZStmhh2FrsY/AyVVhC+WU7fdq +/Wd9iMC1NH5OJeUjjQZpB+0I/HkuZf3/fUh/m/FRRwI/Rn+IK6N8IM/yp4Mr +gS8ObH5BUrZZaxvu6kFgjQ67PZfynmgHtVNnCTzzp+dJGmXLRfc3Xj4EMiuN +gxMom5/2Oe3rR6DRDimFMMo7vweJBQQRyF88des85e37oitDwgh09PbsZ1M2 +brp1KDKKQM+oNWutKYNB5nzsdQKN9/gpGVI2LChMv3mTwKTYjcIMyp0KBWnb +kwiMjznCWUHZ92Ze6ngaga9OcJ8epfarMjAn2TqPwIex5S6VlPdPZSct4RDY +HVOWeovyuFtWYnEpgZwPUv+do6x7MP32ykcEtolwaWlQft+ceuvxEwI/m3gv +46XsuTXlplsjgcfWs5Z1UeeNo5mY8PINgWflCoJCKKssS4gN7SGQVn0n6Al1 +np/7xl3b8Itaj4RiyVXKTiOxMT/6CNw790twL+Xszugo43ECUXjBopu6Lwql +YeELvAzsjjjI85W6b7VKoWFFKxg4LHA0P5Hy0ZQroYdXM9Dk+LVAG8pJ4YFX +qqQYWDro3VjHUwxr7C4GeKszcFvw2ZII6n6Xt17wZ+owsCN/eEiPso2Zz+XW +DQx048881kvlh7gN5y7pAgMd1Mv+rKMsJHjKZ2gPA8uD/kY+pfJLYaD7+ZT9 +DFR+5xloT9ls6qT3rn8YOJV3036OykfhvS5e+Y4MhN9rfdhUvuJ5eNzT6TwD +2yterF81R0KW5rFT4pcY2HPeqEV7lgTjbDuPhgAGrud+0Gc5Q4L/tcNu9KsM +vA5jsQFTJMyy97t0JzNQJJ717uEYCaMiZvb76xj42D2EP6SfhHY3+rsTTQys +TNJlHuij6sOzWfB/zcAWx+06zL8kxPoWyOd+osZ3UFco/0WCdq/g15k+Bg48 +lAnI7iHBo+TtkRRRJm7aVx9c94mE/Stym0skmZgaom9p85EEI3YA65ksE1PM +cuR7P5AgJKUjO6zEREUDna7RdyQUBsR9QUMmqrGs+3uoetRnte+fH45MfJSV +fnsZVc9a8jReTbsy8SP/4YCDVL2r4ubdLHSKiQLa+0PvVZEQUVkhrXeBie5F +Q/8aVJKgLC/ZERbNROMkNR/tYhKchzoOqlUwcZ/X4wA2VV9/RNnvP7NcEVfc +j5SaDaDW36dO1xZUxNhvBr7Tl0mY2jEzOLhaEROPGWWNXSJBgDsuxFVaEc1u +7Nv7zYeK/0J9mb2GIoon0a3iPUnwYyuKWu1VxHMNNe/tqX5gjdHAW7U0RXye +o/Jf5iYS0pMeJP3NUkQbvbJvhhtJUJm54nwvVxGbo0oqPmwgwbBMdpFeqoi/ +vbcYTmtT/YuqlaZ0oyIuXPBqkVEioXhNaRRfvyIuHWBZfxSh+pPh86Y/9ZTw +wsSTv4J/OCCjIxfKZ6iERzo86II/OTB0pqFObYsS5iQfm1zey4GEydWGZ8yV +UEJkwnuikwPd83mai3ZKGN+4bEXuWw6cEfwiKhWhhDE5eUvcKziQqILduzqV +sC01cW9QINW/OfCdLfNXxqRz1fOGK6nxU7c9rr2ijNHrOoODBDgw/Dlg+asI +ZWwWVtNp5OXAv1YzST3xyripQpnPeLEIpjb3NazMVUbDP9vbpEaKYKnY6zWu +75SRYb/EZ+v7IpBquFYlS1PBBLO/j65eL6L+PySWhtWp4B6GSLqpQBGINCvG +FA+r4pvUC3NF4wUgE07u1tNTx62vmkSkcvPhtprBalFnDUzsnzNYsM2Dl9Jb +Noxd18Reg78fu5fkwiaZulitT1oYn3I/7Jt/DqzkzvQ6FqSNd83/3T+2+i7I +Bcob2irqoLnZpxCLwCzgZx6usG7SQcM3dTqf5jJAkyVFnj+iiwkPtk8t3EyH +M90i9WZc63DLcUU9E1YqDI9F7TO9vQ699nJy1G4nwQ6tZ4mmGuvRskBub7bM +HagZ2zw39WY9JuWP8pyMuQke6rod79kbMKOO8avdKgFYQ46ttvx6uNuoxZJP +IA62MyQthDL1cLSy5b61SCwoB1z1qdPXx4Gzub9r46NAlW1Qy+zQxzUxxtox +fBHArnG5UnZ6I4r8kRskeEOhNr3VcVTcAHecF7OIEQ2G8dzFKa1KA7xZPrB+ +x6UAcGAW8CdabELph7vvLt69BKOq8XqlI5vwhbNWRv1FH3iQPdczEb4Zy0em +Q7sEz8GhbQRuljNEl9YErx+iZ2Cte9hDzSeGuKl20rM4yAPEBdxKLA6wsG35 +KDE46ArZW/18R2xZmLb1e+nXDlfQ9YvZGn+YhZXTPER3kytYjhR/bD/Gwvx7 +kbELGa4Q+mlixsGNhQJiH3ma97vCdKa/sW8gC3X7T51PqnOBjs3xH3IKWOh+ +YPhPW6YzuJzLTjblsPBkWeSvzdedYZJTzh4oZmHiBFO8wN8ZROjtUzoVLNQs +Sx7OP+wM5nyyMo+fsNA868MSbQlneNSa4/jhIwuNwbfHLMYJzFY+0PBuZ6Fh +DreTnZ8TtO94MSnZyUL9AcPGy25OMF7VH370Gwulsw8sdJk5gUaGdtHfPhau +j81olOVzgkcdW7yjBlnY+l7savgUG8zE9oLWCAvLIq8uzP9ig1PYufdeEyxM +sIVevmdsGH8SmigxTc1f2GuSWs6GoNlbDlWzLMTJ3SZGd9mwen2e+pF5Fham +Q+efBDakuldNLC6y8IcTmyv1Chv+B6JrSX8= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06266353606145396}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06266353606145396}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV12k8VV0XAHBFQlSmDJnuPfea54qUa61UCqGkQU9FcQ2FVJKUTJkyJDSZ +p2S8BxmKogxp0iBFRNFs9ph58J73fDm//5e99zp777XWoR0/Zc1eykU9S7i4 +/v+e7H7RwIjMNmLc9kuzEzY0ak2VvLClPQj2vOrgXVcrBSj+9rhkexz8WEhO +nK5RAe/d+W3c7ZkwQtg6fKgxAOEhibiZtlKoe2Vfn15jCl8fWZ4ab6sDhRtG +jstrbMGE0dc12tYCLFO+21XVrjDTpn9jpK0Xbo4UVN4ovQD1W+9lv88cg0Th +qNfTyVdB5uvDX8fV54Fx4uIB1YR4EHOzy1++lRvNGl69/Bh8B+J0TKot9/Hh +rMjobHt2Gny+rf1kdLUQJrTUyh0KzITIbP+3S6WEcXqxZUO09l2QSPgeEZ8i +inVJmfIn4+5BmI2pUcukOAofZyQci8qDswYZdi+CJNHOacdOXZcCMEtfOW4e +JYm7HjvtvuZRAPTll8Lf3JDEplPVK/54FcC71v0lH3Il0VJSJjEqsAA0PQW5 +u99IoopUEl9mYgH8yTmf86+0FLYObmqaf1UAh8UsB9fel0JBrqKOc2qFsG14 +1tfjuzSqlp/1tekqhAs7E1SfDkhjpgXzQUBvIXAyNDpEJ6WxT+9nTe7vQpC0 +sTd4yLcWxxqaFQdGC2HgQeMUt+ZavN+s+g/yFkF8UKzXHZ+1WFWXry2nWQS9 +4ooeDUIyaBGpeZvjWwQSp2plJSRkUC/rVuFe/yLY9fxgs6uCDCb6/g4ZDy6C +Ct9I9VXrZLDXfiZUJboIrn4d6bM9KINKTlZP7dOKQDev2nk4Uwat71kK8dQX +QaDhnmPSG2UR4jl9sss5sPNo6r/6xpS/2A8mrODAyoD+4H27ZPH8y9fjvKs5 +kFwfkhNrL4uPr8mJfJHkwAOzqn7eCFnc83ZVhJkqB0YOEt5jn2Vx2rHWf+Mu +Dhw9N3H19UU53DUwF2cbxQHmLWOZvhA5dN7jelInlkPFf61oeawcxl8LsuBJ +4IDvfyrvjLPlUGgbqZWUxIEbwUfFH76WQ8dtM2ei8znw+npT2l1ZeYxzfqdz +pYkDmzh3yi7XymNrs9mDR/Mc2Nb2Zn7ouTz+nXAxquUiwZKLZ4ddizxWe9pe +fMxNgoO1x2f4KY8fby5IF/GTYHKR5h+wTAGfXC6YPShOgqf8ZNYWNQW00tsc +8V2NhAbntMF6bwXs7poKfLaPBNP/DEQuXVTArMa0G3iQhDexrXrrAxTQRNXK +reIQCZ8f8gdkRyig/84Ixxt2JAyt8BIJSVbAN5Jc0QquJEgW79Q3qVNAUd1U +pttFEtymRwOeC9HwYxyjtzOZhE2nndb8EqHhOaNUrplUEvj6Ogq4JWkYSs7q +CWeQcLez/pMRnYaXVLWGdO+S0F1zQ71cj4Y/22ITNxeRYBVi0J5hR8OXu72v +HX9EgtxCkXutIw2rQm2DdWpIGPCmc3e50nBOfypxrpaEcJcVmpJeNORjB24M +rCfhiXlXcEw4DZe8GDS2fkmCrkig1sUSar7CLlPBNhK4IicablfQMDDD73N0 +OxU/94lDFdU0tBT+ckegg4STE9Yho400fH2DVTzxhYTsdkancwcN9WXvm8f1 +knBmzx3PkK80/NJ29MLgdxLwpRBv1g8a6nY/6N76k4Su6knt7iEajoovs+n9 +TcKatOehNtx0lM+QWvprgIQfEiyZM3x0PGVhzrt2iITS2JKSa0J0dGo4bmo+ +TMUflPjlpQQdL7ePXUsZpeJju+luUafjs7MlG/knSZhRW92tsY+O3WENr+fn +SZhMkQ5cd4iOPerRk70LJIyvYjIM7OhI1i5LrF+k9m/M4MQ2Vzrmj/fmVnMV +Q2+1w+QhPzqaLfG1sllaDF81PO7YB9HRyGNvexnlL2k+hk5hdNR8+44myl0M +n4Kjg05fp6NKcc70c8ovzStXht+lI0+rY73UsmJoevy0JDqfjkePctm5UG7Q +em0TT9Kxsk+1toxyjWhPYupDOs7kqb014S2G6pB+VnYNHSWPLA2IovxgauJb +Xj31fURcp95SLu0UUCpvpuOd8oHNu5cXA2kh/rKqhY5L+4UEoikX1sq7P2mj +4z2yKb2Jck7W+vuveugoliSiqsdXDFnisP/9LzqaPiuQPUE5Pcx05lM/HSfD +BzuTKCeePAq9E3Q8POVfNU35VpdL7+9ZOqb/86WT4C+GBKuzIYOLdOxvmn6x +i/L1p37KYzwEdZ4Ph5ylHLMu/NU0P4FX9WJW3qYceTfOY2ElgXrJa5yqKIdL +pAjziBE4+9YvqoNy0FzJgVVyBDq7CO4UEygGf/dHs2IEgY/em3RrUL709VmK +tDKBI8Kh27dTvrDnPSpoEMh+ZXP5EGXv+s7vTF0CtUSNItwpn93wK1RNn8Dn +ns1Olyl73htR0TEksKorRiKasofU3Gu9LQQeb1yZfIfyychlnoYmBN7k6RjP +ouwyv0rU2JxAu79+9ELKTqekK3bsJjBbN5xZStmhh2FrsY/AyVVhC+WU7fdq +/Wd9iMC1NH5OJeUjjQZpB+0I/HkuZf3/fUh/m/FRRwI/Rn+IK6N8IM/yp4Mr +gS8ObH5BUrZZaxvu6kFgjQ67PZfynmgHtVNnCTzzp+dJGmXLRfc3Xj4EMiuN +gxMom5/2Oe3rR6DRDimFMMo7vweJBQQRyF88des85e37oitDwgh09PbsZ1M2 +brp1KDKKQM+oNWutKYNB5nzsdQKN9/gpGVI2LChMv3mTwKTYjcIMyp0KBWnb +kwiMjznCWUHZ92Ze6ngaga9OcJ8epfarMjAn2TqPwIex5S6VlPdPZSct4RDY +HVOWeovyuFtWYnEpgZwPUv+do6x7MP32ykcEtolwaWlQft+ceuvxEwI/m3gv +46XsuTXlplsjgcfWs5Z1UeeNo5mY8PINgWflCoJCKKssS4gN7SGQVn0n6Al1 +np/7xl3b8Itaj4RiyVXKTiOxMT/6CNw790twL+Xszugo43ECUXjBopu6Lwql +YeELvAzsjjjI85W6b7VKoWFFKxg4LHA0P5Hy0ZQroYdXM9Dk+LVAG8pJ4YFX +qqQYWDro3VjHUwxr7C4GeKszcFvw2ZII6n6Xt17wZ+owsCN/eEiPso2Zz+XW +DQx048881kvlh7gN5y7pAgMd1Mv+rKMsJHjKZ2gPA8uD/kY+pfJLYaD7+ZT9 +DFR+5xloT9ls6qT3rn8YOJV3036OykfhvS5e+Y4MhN9rfdhUvuJ5eNzT6TwD +2yterF81R0KW5rFT4pcY2HPeqEV7lgTjbDuPhgAGrud+0Gc5Q4L/tcNu9KsM +vA5jsQFTJMyy97t0JzNQJJ717uEYCaMiZvb76xj42D2EP6SfhHY3+rsTTQys +TNJlHuij6sOzWfB/zcAWx+06zL8kxPoWyOd+osZ3UFco/0WCdq/g15k+Bg48 +lAnI7iHBo+TtkRRRJm7aVx9c94mE/Stym0skmZgaom9p85EEI3YA65ksE1PM +cuR7P5AgJKUjO6zEREUDna7RdyQUBsR9QUMmqrGs+3uoetRnte+fH45MfJSV +fnsZVc9a8jReTbsy8SP/4YCDVL2r4ubdLHSKiQLa+0PvVZEQUVkhrXeBie5F +Q/8aVJKgLC/ZERbNROMkNR/tYhKchzoOqlUwcZ/X4wA2VV9/RNnvP7NcEVfc +j5SaDaDW36dO1xZUxNhvBr7Tl0mY2jEzOLhaEROPGWWNXSJBgDsuxFVaEc1u +7Nv7zYeK/0J9mb2GIoon0a3iPUnwYyuKWu1VxHMNNe/tqX5gjdHAW7U0RXye +o/Jf5iYS0pMeJP3NUkQbvbJvhhtJUJm54nwvVxGbo0oqPmwgwbBMdpFeqoi/ +vbcYTmtT/YuqlaZ0oyIuXPBqkVEioXhNaRRfvyIuHWBZfxSh+pPh86Y/9ZTw +wsSTv4J/OCCjIxfKZ6iERzo86II/OTB0pqFObYsS5iQfm1zey4GEydWGZ8yV +UEJkwnuikwPd83mai3ZKGN+4bEXuWw6cEfwiKhWhhDE5eUvcKziQqILduzqV +sC01cW9QINW/OfCdLfNXxqRz1fOGK6nxU7c9rr2ijNHrOoODBDgw/Dlg+asI +ZWwWVtNp5OXAv1YzST3xyripQpnPeLEIpjb3NazMVUbDP9vbpEaKYKnY6zWu +75SRYb/EZ+v7IpBquFYlS1PBBLO/j65eL6L+PySWhtWp4B6GSLqpQBGINCvG +FA+r4pvUC3NF4wUgE07u1tNTx62vmkSkcvPhtprBalFnDUzsnzNYsM2Dl9Jb +Noxd18Reg78fu5fkwiaZulitT1oYn3I/7Jt/DqzkzvQ6FqSNd83/3T+2+i7I +Bcob2irqoLnZpxCLwCzgZx6usG7SQcM3dTqf5jJAkyVFnj+iiwkPtk8t3EyH +M90i9WZc63DLcUU9E1YqDI9F7TO9vQ699nJy1G4nwQ6tZ4mmGuvRskBub7bM +HagZ2zw39WY9JuWP8pyMuQke6rod79kbMKOO8avdKgFYQ46ttvx6uNuoxZJP +IA62MyQthDL1cLSy5b61SCwoB1z1qdPXx4Gzub9r46NAlW1Qy+zQxzUxxtox +fBHArnG5UnZ6I4r8kRskeEOhNr3VcVTcAHecF7OIEQ2G8dzFKa1KA7xZPrB+ +x6UAcGAW8CdabELph7vvLt69BKOq8XqlI5vwhbNWRv1FH3iQPdczEb4Zy0em +Q7sEz8GhbQRuljNEl9YErx+iZ2Cte9hDzSeGuKl20rM4yAPEBdxKLA6wsG35 +KDE46ArZW/18R2xZmLb1e+nXDlfQ9YvZGn+YhZXTPER3kytYjhR/bD/Gwvx7 +kbELGa4Q+mlixsGNhQJiH3ma97vCdKa/sW8gC3X7T51PqnOBjs3xH3IKWOh+ +YPhPW6YzuJzLTjblsPBkWeSvzdedYZJTzh4oZmHiBFO8wN8ZROjtUzoVLNQs +Sx7OP+wM5nyyMo+fsNA868MSbQlneNSa4/jhIwuNwbfHLMYJzFY+0PBuZ6Fh +DreTnZ8TtO94MSnZyUL9AcPGy25OMF7VH370Gwulsw8sdJk5gUaGdtHfPhau +j81olOVzgkcdW7yjBlnY+l7savgUG8zE9oLWCAvLIq8uzP9ig1PYufdeEyxM +sIVevmdsGH8SmigxTc1f2GuSWs6GoNlbDlWzLMTJ3SZGd9mwen2e+pF5Fham +Q+efBDakuldNLC6y8IcTmyv1Chv+B6JrSX8= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06266353606145396}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06266353606145396}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943870315045424`*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"b57c1e45-c3b3-45b9-af44-854f9f2af9bf"] +}, Open ]], Cell[CellGroupData[{ @@ -8023,12 +8275,14 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.99179966106703*^9},ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], + CellChangeTimes->{3.99179966106703*^9}, + CellLabel-> + "In[107]:=",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[BoxData["11.27534350842078`"], "Output", - CellChangeTimes->{3.9913229040054893`*^9}, - CellLabel->"Out[88]=",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[BoxData["11.764791773181704`"], "Output", + CellChangeTimes->{3.9913229040054893`*^9, 3.994387031549697*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"f1fe6041-0297-4f4b-9d7d-1c8958ca9e22"] }, Open ]], Cell[CellGroupData[{ @@ -8084,158 +8338,165 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991799666995865*^9},ExpressionUUID->"7116d4f3-8ab8-b741-8264-\ -0a5eeac170a0"], + CellChangeTimes->{3.991799666995865*^9}, + CellLabel-> + "In[108]:=",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 17, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042538757`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.596594096165593`*^-264\\\", \ +RowBox[{\\\"11856747790825406662563134\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"5\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"19254518349824000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 108, 13, + 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.9943870316392193`*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], +In[108]:=",ExpressionUUID->"fe468f00-c903-41f1-a57d-3d6e0d3d9833"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ -\\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 89, 18, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042728806`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1800140011156678`*^-273\\\", \ +RowBox[{\\\"92956902680071188234494975\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"7\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"95542386262016000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 108, 14, + 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994387031646429*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], +In[108]:=",ExpressionUUID->"dbdc370f-7aea-4f57-8fc0-3c4cfc042f60"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ -\\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 89, 19, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229042938766`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.1108363233056726`*^-283\\\", \ +RowBox[{\\\"78176755153939869305210274\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"10\\\", \\\"\[RightSkeleton]\\\"}], \\\"51146846355456000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 108, 15, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994387031652903*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], +In[108]:=",ExpressionUUID->"b5e928e3-b273-4c36-9629-4df5a1f5b98f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 89, 20, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913229043127804`*^9}, +during this calculation.\"", 2, 108, 16, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913229042538757`*^9, 3.994387031658462*^9}, CellLabel-> "During evaluation of \ -In[89]:=",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], +In[108]:=",ExpressionUUID->"2be1b5fe-bc06-4b95-b084-ea7412480453"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k41F0UB3AhJUuy78xvhpItsiTGOVHZK6XVMtbKK0uRhMqSkJJWSSKh +hJmfFEqLaKVF8iJrpVTEK0Io3tsf88zzeWbm3nvO87vfe4fhHbzej5+Pj49/ +FnmR97Gu549YKXmWb/H86bIWtmXTJfn9K1rjoPJhhfYoRwlQ5rW3fOsp0HEK +6S3naEP4uustAq25cCnWpSKVYw4LBuVOTbTcAFF+vaBNHAfovrsm+GdLDVQd +fpdQ6OEKq1l9nT9aGmFm+VwtCbcAmGgxPTvU8hHkGDImd5yjoNb6at6b3BG4 +GVUVK2l7DJS7b/d66/yBpK26AUr1Z0B6F+f6HGsBbG6dDl0plQmnDFZXrdk4 +Fx9UHV2i9DgH3p1fUv1DQgxNFf3WxZ67Ail5h17zKyxA8y0ajXK+BSB3pif5 +dJYU7vGcVafScQ0SXewsG8dkcLqp+ltiz3VQvPlKkX+WLOqJzva/3X8duFIu +4wYisvht/bW8zyPXobnRgz6pJouy7fpOeoJFwHIOo5xtZfHqx4u2MawiqHHK +FmrIkMWDM5sVNH2L4M/q0VcvLeRw/XHzmT3dRRBqdpnzPE4e3+aIc3ofF4N9 +jvhPh2PymHf0kJjji2Kg5kQnvTorj1s9bKaKG4uhoWlT6dtr8ph2RfG0Z3cx +6IWICnS9ksd0quFq6q9i+Fqwr2BYUQH9IiqEhRaXgJv0mgGlMgUsG14ow0ku +gaWkj5fuKmCcnN2A9okSmPdxkSzjiQLyaetOjJwpgds8AdB8p4BCpYyivTkl +IOtwO23JjALO6bAIgYoSaIhlGa1yUEShnN0233tKYOV/k5FBPYrIjfLiFppx +Yb/tmcUPvysi5c37p8aSC9zLum1SY4r44ZHv4WZrLsi7eJrdnquEE0KnXw85 +ceF75eNxAT0lrHyuUDPgxYXTcWlhGRFK2KoWKyiczIWPMppBj8SUcY7/15xH +b7kgF/xARU5OGXeIu3y1beWC47MtL/3VldGRU5vyrIML5ZEpOvOXKuMT/5e9 +tz9z4Wj3UN/WLcr4LKt00HecC4aFVTv+y1XGfwIT13co8CDWwtlLcZkKrrWV +FnV25YGtx6VhUysVvKhpH3KOwwPxmP74jY4qyCwo82r24cHF2oSCNE8V3Ltf +YGDVLh5U2t/pF0pWwan3CsU90TwY2sIMH3mngmL1OFsxiwcee0ePvohSRfZj +NYuwdzzQSLdS7ktQxRdC0w0inTxS/4mSOWmqOGMl+CfrPQ8if2s1WOWpYnyZ +tvKNLzw4G+8hc/uFKvaHcuMyRnnw4uTT7HwVNayZqi80nEvDcm7GzYMP1DBY +nGU8qU7DypZXfwafqeFufs+JTRQNa/gEbTiNargTC/xLmTT4rA96B5/VkPFl +9VqOJg2roxiHYmaroxB/sXG2Ng0hamNXVmir49Mxj6s8YxpGy9KeTeir48nX +CvZfTGiItNUeKDVSx1uzhy8qL6MhYbenCWWpjgX/LnCJWU7Dhdq6Z/zO6mgb +9Hq+DtDwaEf2QG04+bx36re0LQ12v80ko6PUUULbrXahHQ2v0ppMjGLU0SYg +1HKZPQ3vbgvH5CWrY4nbzIb1jjQMioRJJlxUxxpJ49kB62iQp21NV9eoo1m4 +wFO9LTRkrexxnX6ijoKiMdPKW2mg3h2IKa9XR8m4hv/mbqNBl7/suea/6vjl +y6pZba40WLmouM35qo5q/qLfPDk07Pr1I+aZGANXJo4p8G8n/dy9XbZXkoFJ +HqUjHcRz+9qKBOQZaMERWHRrBw357bXNlhQDo5Mcc939aei6f1bnlgkD3VPL ++1J30VBsOq+m0ZyBoQv8C1wCSb/og5uHkIFR2+Or5YJokM3dEaftwMCBkE8L +zgXTsDbBrPUyh4GxZvqmoXtoUJ0uCXzgy0DZruERZigN38MpgU5/Bi5dqiDV +SJy0U0RPPoyBbQ/SIzX30lDt0BmfmsTASuvHv3n7aDCUjNWPKmVg52tr69XR +NPCljD46X87AjOgS35fErwT+2VZexUDHgP4h5wM0BIyuT/jxmIFrMmUdNxyk +Ia+V1b6jjYFGc3nKpjE07HHOCEnoZuBiyjyvkBjrxISufGLgzEOJTIVYGjqr +xpZ0DTLw8nBX6w9i2exnR1wEKHwzLpMfH0/DJzm28p65FDo2/Cr/QHwjrbT0 +hBiFIvUPLdiHSf1xFzrq5CjMmOQUfCdWnRLf81WZwooMnxRMIPWHxs8Roiic +0rvee5I4yW+X4QodClXzffh1j9Cwqev9Uw8DCqMrhB+FE7M2b3SPNqFwObV1 ++h5xta1lUgVSWPXFs3tlIg2pD2+o/LuKQiF958TDxG7LF5YN2xNf3Xb9IfGE +tkSX7kay3r36vkZJNIxlKcYu3UZh3rDCHH/in/M1WGYcCl+WtltmEg+OmP2z +0p/CFGGr4F/E/X4rxeyDKHSJl/VnJtPwtWUNvTaUwnQ+atKB+GOVz9i2AxT6 +FFh/OkvcrRuU4RlH4eDwccsK4o7sCIvtiRR6Ht1n2Ez8bkF8d8AxCp82ZFYP +EzfHH4/bfZLCOvrcN9GjNLwdTdfYd47MlynIZRE37Mh9Fp1JIZUYJ76c+OW7 +4oC4HAr3D5WIOBHXOVSIJ+VTWN/KKnAnfnrvYenx66TeJwldAcSP9F+4nOZR +mF8bfGsf8cPLzePnb1J4jBOnHUt8X+rDhUu3KYwodl+RRFyV0M/Ou0+hMeaO +HyOuHB99X1hL4cmlP9acIL7lz3eY94zCn4zvNn99o33ewlsvKZTWMu75+32e +k0zdnUYKk78GMf6OV/xALbC6hcKDsRYCf+crNFgs8aSDwpXnViT/XU/BFaOy ++g8UCthTN/+u94oMbHrTS+rH+MN/68lJtJto7qew76LwlCNx1sSGix1DFC4V +cJX/248LAR7wcZTC/rMqnX/7ld658+OXSQrbxsbtxIjPrA1NGJihcPvqk5wR +0u+TDw8sGhFkoiHzpGoLcerSpPpfwkysLcxOrCROyT8VNC3ORIMwv8x04iS5 +rAWC0ky8lpGyLYw4bqp083xVJmrXZHdqEh8KvDspzWTiAu+Pub/J8xLd/SRL +cRETBc/pyTYQh9e292gYMvGe1SnhEOJQ494j2qZMbDHkT7EgDrk6pGVgwcTO +PJ17QsQBKbNDLFYzsd98h8kZ8vzu/DNfysqBiQ0Fbw9uJt4erFhus46JF1XL +IuWJPTfo/16/jYnNg0knTpP94aK0Nck/iIk317ZhENlfzsd9tINDmfhcUnOZ +GvGamcBXYRFM9AvZ9fUl2Z+2PXHSMXFMTD9yK5xFbFFUnHPuHBMTg/rcy+No +aFcvyl6VycSSSa/XrsSR5wov/cxmopXEZfsZkg8VsQUX1xcyMSrziScSG27J +OS9+l4n7to4rFR2i4c3LS+n3qpnInBjqR+IQ66xzux4z0cnNra6J5BNX78KZ +uldMPN7Sc3OM5JfW7DNpRz4w8UeXjTOT5NuzyFMnjHtJ/xM5+YVRpP6htNRP +fUw0sr4mqkec1378mNVPJtbfN5QziKRB/UZi0rQQC/VMhXTVI0h+caJiwnVY +2JUb35NL8vZW0/5DGgYsHOezKptH7GIfcbDJmIV9GgPZISSvTxnvjTYEFk7G +xTea7KZBTDQ4YtCZhWIFMtxikveCt71Dtu9j4X6ZkTpLcl78kLT33FTDws9r +Z0RmudPQuotq+OcpC58f5qtSciN59WQSDr1g4VL+ajsjcl6lRRapXWtmYc+G +N8Iccr4t+SjaPdFHfh9crp25kYag0tfuWVIa6BeUUMZ1oqFv7UbXT74a6KyY +/9LWgobGQt36X/4auOt3ugLDnIY7AkLmYsEaaCtxw3PcjIbkinJFk/0a6HSo +uyfLlIZFavJticc10E2xvrnRkIYdg21btMs10NXY1rhzEcnzY56b9szRxJS6 +p3KRUmT+Ph1qiagmTp/atldbkoZxm4mBAQlNzBbK0GqXoGGewKkEf0VN7O2V +zDAWJ+vfX3vTU1cT35xqv9ZM7i8H/DSl1m7QxJOszu1npngga/n9tXa2Jp5o +Fo349YIHdv/ts/tsshDXW/I3BW7ngbKB6pG5Fgvxa4zrrAfePBjc86hGe8VC +bI/QqRIl97UzYxIWexwW4nxPo46szTzo+lOoN8NZiJvSvoik2/Jgj2iHlELy +QtT54NLTq8WDC1rY5di+EIXa3qTO6yP3UZ+5oTcPLcJLmz3y33pyyf8TOf7E +Gi2c7rHxFjQsAcmXmqn0f4tx4NsyNb/RIlBO4q0zMdFBq+GMzO0x1+G8tpmE +1A5dFBb7OYtvfiHUKa4wHjmph1obdkRKpV+F5co1afrN+hi52+GVzlg+iAvk +hnnFLUGvIa0q2aA8UI1Vs9iqaYBy8xjHdj7NBWENt/L1Tw2wsY6zpFz/Muix +FXj73A3xks48jyNR2bCnS7LWnm8prtaZfTw3/CL8N3Jso935pRipL39F6kkG +2Og/uWCna4TLuIm6NavS4f6I+dT4KyNU65no/VZ5BoJ0DNve+Bmj2YwPl4o9 +BexB36atwibIa5Be1GOTBqtY8k5iuSZYL/hWTbr6GCyKORpRY2qKcRtTRzNc +kmGxn9kDjTZT/HK9iS9xPAH87u88fHP3Mlwscit1khkPD3KafH/ImGGHiJdf +//YY+HltZly/wgzf8uTerBOJBh+NIuELTsvR9H6ruoJqBPxYfNrkxtBy/HDr +MyfEMwwq86Y+jCaZo8/GrcoGLrth20ommqtaoLJUpVV8SCAoBSbe1qu2wBXr +ZnUrpOwEmXm7Sp02s7HvvfaBlZd8Ic/6QOTQVjbarZJ3F0n1BcMDqdan3dh4 +5P7nZZ0HfGHNEP1vqxcb/7z49uKyuy8caR6d8NnFRsdk10clKr7wK/eQVWQs +G5sDDnyqz/aBNvPTbwuK2Hj5i2/XryJv2Lk376Idl42BnGoF6SxvGOPe8vtO +s/FNvNsFs1RvkKRaxw3K2ajHP+pyJcQbHOaqKN+rZmNamKvUD2NvuNtU4Pv2 +XzYucvNoDanxAnvxSt3wVjZ+udtXr3vTC1ptno/Jt7Nxs8NU0c98L/h5pz/J +4z0bw0MrlHKSvUD38pKSb31s9BfyUw909oK7bSvCjw2Q9R1+3RVhTcaT3gD6 +Q2zUihT2SDX2gu2Je9+EjbLxrOvS5GYFMl71kQtyv9i4KsVhsbCoF8RNpvvc +mWTj8J348FXTniBhVKjj/oeN84+G7UwZ8oRLgXdGZ2bYuM6vcrLtoyf8D+Fx +RgY= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8249,117 +8510,115 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwV13k41F0UB3AhJUuy78xvhpItsiTGOVHZK6XVMtbKK0uRhMqSkJJWSSKh +hJmfFEqLaKVF8iJrpVTEK0Io3tsf88zzeWbm3nvO87vfe4fhHbzej5+Pj49/ +FnmR97Gu549YKXmWb/H86bIWtmXTJfn9K1rjoPJhhfYoRwlQ5rW3fOsp0HEK +6S3naEP4uustAq25cCnWpSKVYw4LBuVOTbTcAFF+vaBNHAfovrsm+GdLDVQd +fpdQ6OEKq1l9nT9aGmFm+VwtCbcAmGgxPTvU8hHkGDImd5yjoNb6at6b3BG4 +GVUVK2l7DJS7b/d66/yBpK26AUr1Z0B6F+f6HGsBbG6dDl0plQmnDFZXrdk4 +Fx9UHV2i9DgH3p1fUv1DQgxNFf3WxZ67Ail5h17zKyxA8y0ajXK+BSB3pif5 +dJYU7vGcVafScQ0SXewsG8dkcLqp+ltiz3VQvPlKkX+WLOqJzva/3X8duFIu +4wYisvht/bW8zyPXobnRgz6pJouy7fpOeoJFwHIOo5xtZfHqx4u2MawiqHHK +FmrIkMWDM5sVNH2L4M/q0VcvLeRw/XHzmT3dRRBqdpnzPE4e3+aIc3ofF4N9 +jvhPh2PymHf0kJjji2Kg5kQnvTorj1s9bKaKG4uhoWlT6dtr8ph2RfG0Z3cx +6IWICnS9ksd0quFq6q9i+Fqwr2BYUQH9IiqEhRaXgJv0mgGlMgUsG14ow0ku +gaWkj5fuKmCcnN2A9okSmPdxkSzjiQLyaetOjJwpgds8AdB8p4BCpYyivTkl +IOtwO23JjALO6bAIgYoSaIhlGa1yUEShnN0233tKYOV/k5FBPYrIjfLiFppx +Yb/tmcUPvysi5c37p8aSC9zLum1SY4r44ZHv4WZrLsi7eJrdnquEE0KnXw85 +ceF75eNxAT0lrHyuUDPgxYXTcWlhGRFK2KoWKyiczIWPMppBj8SUcY7/15xH +b7kgF/xARU5OGXeIu3y1beWC47MtL/3VldGRU5vyrIML5ZEpOvOXKuMT/5e9 +tz9z4Wj3UN/WLcr4LKt00HecC4aFVTv+y1XGfwIT13co8CDWwtlLcZkKrrWV +FnV25YGtx6VhUysVvKhpH3KOwwPxmP74jY4qyCwo82r24cHF2oSCNE8V3Ltf +YGDVLh5U2t/pF0pWwan3CsU90TwY2sIMH3mngmL1OFsxiwcee0ePvohSRfZj +NYuwdzzQSLdS7ktQxRdC0w0inTxS/4mSOWmqOGMl+CfrPQ8if2s1WOWpYnyZ +tvKNLzw4G+8hc/uFKvaHcuMyRnnw4uTT7HwVNayZqi80nEvDcm7GzYMP1DBY +nGU8qU7DypZXfwafqeFufs+JTRQNa/gEbTiNargTC/xLmTT4rA96B5/VkPFl +9VqOJg2roxiHYmaroxB/sXG2Ng0hamNXVmir49Mxj6s8YxpGy9KeTeir48nX +CvZfTGiItNUeKDVSx1uzhy8qL6MhYbenCWWpjgX/LnCJWU7Dhdq6Z/zO6mgb +9Hq+DtDwaEf2QG04+bx36re0LQ12v80ko6PUUULbrXahHQ2v0ppMjGLU0SYg +1HKZPQ3vbgvH5CWrY4nbzIb1jjQMioRJJlxUxxpJ49kB62iQp21NV9eoo1m4 +wFO9LTRkrexxnX6ijoKiMdPKW2mg3h2IKa9XR8m4hv/mbqNBl7/suea/6vjl +y6pZba40WLmouM35qo5q/qLfPDk07Pr1I+aZGANXJo4p8G8n/dy9XbZXkoFJ +HqUjHcRz+9qKBOQZaMERWHRrBw357bXNlhQDo5Mcc939aei6f1bnlgkD3VPL ++1J30VBsOq+m0ZyBoQv8C1wCSb/og5uHkIFR2+Or5YJokM3dEaftwMCBkE8L +zgXTsDbBrPUyh4GxZvqmoXtoUJ0uCXzgy0DZruERZigN38MpgU5/Bi5dqiDV +SJy0U0RPPoyBbQ/SIzX30lDt0BmfmsTASuvHv3n7aDCUjNWPKmVg52tr69XR +NPCljD46X87AjOgS35fErwT+2VZexUDHgP4h5wM0BIyuT/jxmIFrMmUdNxyk +Ia+V1b6jjYFGc3nKpjE07HHOCEnoZuBiyjyvkBjrxISufGLgzEOJTIVYGjqr +xpZ0DTLw8nBX6w9i2exnR1wEKHwzLpMfH0/DJzm28p65FDo2/Cr/QHwjrbT0 +hBiFIvUPLdiHSf1xFzrq5CjMmOQUfCdWnRLf81WZwooMnxRMIPWHxs8Roiic +0rvee5I4yW+X4QodClXzffh1j9Cwqev9Uw8DCqMrhB+FE7M2b3SPNqFwObV1 ++h5xta1lUgVSWPXFs3tlIg2pD2+o/LuKQiF958TDxG7LF5YN2xNf3Xb9IfGE +tkSX7kay3r36vkZJNIxlKcYu3UZh3rDCHH/in/M1WGYcCl+WtltmEg+OmP2z +0p/CFGGr4F/E/X4rxeyDKHSJl/VnJtPwtWUNvTaUwnQ+atKB+GOVz9i2AxT6 +FFh/OkvcrRuU4RlH4eDwccsK4o7sCIvtiRR6Ht1n2Ez8bkF8d8AxCp82ZFYP +EzfHH4/bfZLCOvrcN9GjNLwdTdfYd47MlynIZRE37Mh9Fp1JIZUYJ76c+OW7 +4oC4HAr3D5WIOBHXOVSIJ+VTWN/KKnAnfnrvYenx66TeJwldAcSP9F+4nOZR +mF8bfGsf8cPLzePnb1J4jBOnHUt8X+rDhUu3KYwodl+RRFyV0M/Ou0+hMeaO +HyOuHB99X1hL4cmlP9acIL7lz3eY94zCn4zvNn99o33ewlsvKZTWMu75+32e +k0zdnUYKk78GMf6OV/xALbC6hcKDsRYCf+crNFgs8aSDwpXnViT/XU/BFaOy ++g8UCthTN/+u94oMbHrTS+rH+MN/68lJtJto7qew76LwlCNx1sSGix1DFC4V +cJX/248LAR7wcZTC/rMqnX/7ld658+OXSQrbxsbtxIjPrA1NGJihcPvqk5wR +0u+TDw8sGhFkoiHzpGoLcerSpPpfwkysLcxOrCROyT8VNC3ORIMwv8x04iS5 +rAWC0ky8lpGyLYw4bqp083xVJmrXZHdqEh8KvDspzWTiAu+Pub/J8xLd/SRL +cRETBc/pyTYQh9e292gYMvGe1SnhEOJQ494j2qZMbDHkT7EgDrk6pGVgwcTO +PJ17QsQBKbNDLFYzsd98h8kZ8vzu/DNfysqBiQ0Fbw9uJt4erFhus46JF1XL +IuWJPTfo/16/jYnNg0knTpP94aK0Nck/iIk317ZhENlfzsd9tINDmfhcUnOZ +GvGamcBXYRFM9AvZ9fUl2Z+2PXHSMXFMTD9yK5xFbFFUnHPuHBMTg/rcy+No +aFcvyl6VycSSSa/XrsSR5wov/cxmopXEZfsZkg8VsQUX1xcyMSrziScSG27J +OS9+l4n7to4rFR2i4c3LS+n3qpnInBjqR+IQ66xzux4z0cnNra6J5BNX78KZ +uldMPN7Sc3OM5JfW7DNpRz4w8UeXjTOT5NuzyFMnjHtJ/xM5+YVRpP6htNRP +fUw0sr4mqkec1378mNVPJtbfN5QziKRB/UZi0rQQC/VMhXTVI0h+caJiwnVY +2JUb35NL8vZW0/5DGgYsHOezKptH7GIfcbDJmIV9GgPZISSvTxnvjTYEFk7G +xTea7KZBTDQ4YtCZhWIFMtxikveCt71Dtu9j4X6ZkTpLcl78kLT33FTDws9r +Z0RmudPQuotq+OcpC58f5qtSciN59WQSDr1g4VL+ajsjcl6lRRapXWtmYc+G +N8Iccr4t+SjaPdFHfh9crp25kYag0tfuWVIa6BeUUMZ1oqFv7UbXT74a6KyY +/9LWgobGQt36X/4auOt3ugLDnIY7AkLmYsEaaCtxw3PcjIbkinJFk/0a6HSo +uyfLlIZFavJticc10E2xvrnRkIYdg21btMs10NXY1rhzEcnzY56b9szRxJS6 +p3KRUmT+Ph1qiagmTp/atldbkoZxm4mBAQlNzBbK0GqXoGGewKkEf0VN7O2V +zDAWJ+vfX3vTU1cT35xqv9ZM7i8H/DSl1m7QxJOszu1npngga/n9tXa2Jp5o +Fo349YIHdv/ts/tsshDXW/I3BW7ngbKB6pG5Fgvxa4zrrAfePBjc86hGe8VC +bI/QqRIl97UzYxIWexwW4nxPo46szTzo+lOoN8NZiJvSvoik2/Jgj2iHlELy +QtT54NLTq8WDC1rY5di+EIXa3qTO6yP3UZ+5oTcPLcJLmz3y33pyyf8TOf7E +Gi2c7rHxFjQsAcmXmqn0f4tx4NsyNb/RIlBO4q0zMdFBq+GMzO0x1+G8tpmE +1A5dFBb7OYtvfiHUKa4wHjmph1obdkRKpV+F5co1afrN+hi52+GVzlg+iAvk +hnnFLUGvIa0q2aA8UI1Vs9iqaYBy8xjHdj7NBWENt/L1Tw2wsY6zpFz/Muix +FXj73A3xks48jyNR2bCnS7LWnm8prtaZfTw3/CL8N3Jso935pRipL39F6kkG +2Og/uWCna4TLuIm6NavS4f6I+dT4KyNU65no/VZ5BoJ0DNve+Bmj2YwPl4o9 +BexB36atwibIa5Be1GOTBqtY8k5iuSZYL/hWTbr6GCyKORpRY2qKcRtTRzNc +kmGxn9kDjTZT/HK9iS9xPAH87u88fHP3Mlwscit1khkPD3KafH/ImGGHiJdf +//YY+HltZly/wgzf8uTerBOJBh+NIuELTsvR9H6ruoJqBPxYfNrkxtBy/HDr +MyfEMwwq86Y+jCaZo8/GrcoGLrth20ommqtaoLJUpVV8SCAoBSbe1qu2wBXr +ZnUrpOwEmXm7Sp02s7HvvfaBlZd8Ic/6QOTQVjbarZJ3F0n1BcMDqdan3dh4 +5P7nZZ0HfGHNEP1vqxcb/7z49uKyuy8caR6d8NnFRsdk10clKr7wK/eQVWQs +G5sDDnyqz/aBNvPTbwuK2Hj5i2/XryJv2Lk376Idl42BnGoF6SxvGOPe8vtO +s/FNvNsFs1RvkKRaxw3K2ajHP+pyJcQbHOaqKN+rZmNamKvUD2NvuNtU4Pv2 +XzYucvNoDanxAnvxSt3wVjZ+udtXr3vTC1ptno/Jt7Nxs8NU0c98L/h5pz/J +4z0bw0MrlHKSvUD38pKSb31s9BfyUw909oK7bSvCjw2Q9R1+3RVhTcaT3gD6 +Q2zUihT2SDX2gu2Je9+EjbLxrOvS5GYFMl71kQtyv9i4KsVhsbCoF8RNpvvc +mWTj8J348FXTniBhVKjj/oeN84+G7UwZ8oRLgXdGZ2bYuM6vcrLtoyf8D+Fx +RgY= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06461425473498951}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8371,19 +8630,19 @@ U0FU/w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06461425473498951}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8397,116 +8656,114 @@ U0FU/w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwd13k4VV0XAHAvoQlFpmu699xrKHOmDNdaSQNKJUUy9SpTUhkzlKGEiqQU -RSKUTOeUlChCIqE3MyXRIMlQKE2+0/fXeX7PGfZea++19z6sfw/Y7OXl4eER -/IeH5+91pr+xjnMqx9RRIPNqkSmatl+RClndHQ0VmTo7zzXLAYq3/ivVnQwp -zr82bW5Wh6AtN7v4urNBga8ykWjmwtIxyeTZrlsg0vVmw5tnm+B1pfWBqa4a -OLHVe4n4MydYxxl5Ndn1AngyD7fyNO6H2S6DlImuQaj0EVnxqPII1K65nvNf -9lfIvXvcw7ouEWRfl7//V+03iK7O0ryQdgGW+bjcFFzDhwnHlG9L7cmAZO11 -Fdbb56PnhY3lK9WyoSdVq3pyiRCuWrH4saJmLpzKiWjllV6Kgal9/V7KN0Dy -/FD8uQwxdDhUObTmwU2ItbUwfTEjjr4p71S5HYXAKG1h8P4jgWf8h3SuvCqE -YjHbb9qLJPDW4hqV2XeF0PnCmTyrIIG+t7Z0pM8UAmdrALF1gwQWfwtQuCxZ -BDWbMgWep0mgv9KLQj/7Ivi9brql2UQS7cjzNbEdReBvmOXSGC2FusYHw1kP -isHyqvCU1WkptD8+EHisthgIwfC4lhQp7BJX//26sRiet++g2m5IYfG8mdtx -ncWgcXAxX3+LFL5wf3kvdbwYhvOC874wpNHZr7PnFrMEHJdZf5a5LY1TDxUv -NR8tAZ2wiqgrldKoXv5PdeTxElg4qCLBqpfGRL1z+zROlkB5CR8o9UjjwWmj -bSEpJSBhVZ6kNSeN5im3XJsLSuB5FEd3rRUD+WLmOfh2lYD5+I9Q3yEG3tdu -yLYQJyFkw/kVj0YZmKziOvBQkoTiLPVesRkGHu80CNNmkCBl62pYPl8G5w2W -NwgrkDB67/E3Pg0Z1H9zrzZfhYRz0UkBaYdl0Hf24OrdxiQMiiv51gnJYkxZ -/8NOZxIkD1TJSUrK4msZmYpvriRsbLBv9mLKInNpnISEGwlloafURHRk8YK4 -6ydLDxJOvp4Y2Wkvi9Wk4pKUAySszK/wGM+Wxdlktd0FESREmWzdzVglh2ue -9ci9ySBhg/OVLwZmcpgqeX97RyYJwpGfjm3fKIelTqJh9VkkpNfG5CW5yqF8 -M/tMZi4J9yzvfxKIl8NXgs+G1IpImLBnB33tkcPrhSahpRUk3A09KLj0rRwe -bS24EfyAhKPpD1I1xuSQX22gwaCKhMUDdhVevPLYHdz0uriGBGWP0zwDK+Rx -G2l28HAjCc6B0yefhcljbt5Wt5BOEhQvmsmOxMhjqONQ26Luv/k7UySYJI+p -v32ML/eQEPpr+XOzHHl8fLJtgnxJQsoxZ/HyZ/J4cb/I3N1BEp6dfZKZK6eA -rWEqv3XHSDAqTis9WqWAMv9pbvzMS4F5V8vvsQYF9K8UmV04jwJrnnnrXV4o -YPB06WIlfgrcbHx74J0Cpg+1eNkKUrAujBURyc/E988G+JMXUXBQYebaalUm -flGIlz0rRsH07aSGWU0mMtp+usUsoyB0g+pnSpeJOdtCpYLFKYg55KpPmDKR -Nbn6qY0kBZdqnzbwbmWirhLp+IlBQZ1H5ufaICaehfz0LBYFFr8MRcPDmLjD -4NYHH4KClqR2fd1IJu6ZzM/TY1PQU74gMieeiaWOOtFVHArGFgWIxqQzEWd8 -K0uVKfC/KmzAzWJi9YObt/epUPBdN3/XdC4Tn/yIIJjLKeBz7s/ZW8JEJZsu -z6gVFEiRGwzW1TBx0udIrqI6BRnmQ7v+1DPRrKrOvYE20XMksqyJidHnA695 -alCgznu7UamDiRm1AmezNCkws5VzFBxmYhGj0HJamwKf75ORDUIstO4VuMHR -p8DokLvEe1EW8o3zn86nPX+kt4BPioVOairHVQ0oyO2r7TQlWLh+LuK20ioK -+h+mqN3RZ+Gq2o2sH4YUFBosrHlhzELxMM1yDyM6v+RRuwlk4c7udO8XtCWy -PaJVrVg4crFHNtOYgs0xht1ZLizMTNz2QpxLgfyfov1Ve1jYnvTHwof2aBDB -98qLhWIPmwaqaMd5LtKQCmChp1eer7MpBTveRNTqhbDQLIfwyKfNcZiy33aU -hRXRV6ImaVdbvTqWGMfCBzdCFUKAgsS6rdKFCSzcE7E55x5tR259cWMyCz9K -CFlP057VKOmZl8HCkhQdMXekoOE6+wCRzcKUFgmtS7QvMFPn4XUWZnl3BTTR -XikapRlGsdB/w+fDiqsp4Dk1XZdaxsLDiTWG1rRb+LwdyirofECgYgDt9PD+ -8bZqFuozn5hcpL1v2iZm8jEL0wpCI+/SNvJ9whBpYqGl8LbJdtrzPxiTas9Z -uFxlWdI47U4Xcq1lBwtdTkU7CZpRkNPN6fPoZeGHMDcHWdp+W9MOxrxm4Z+x -8FgN2vhUSODaWxbeOZnyjktbeE305eqP9HjkBgRa0n5VMaPVP8ZC/rWDBra0 -C3X31f/8ykIhhevqu2iHFr3eJT3LwoSLp+1caG9Qsp3U/8PCjmrHMlfaEpkN -J2z5CJxyGLT8e/+tJFfWbz6BGm3D4n/fv5VEUWeECAxZYyL19/uRC5TWF4kS -+P1Qvs3f9jdHX3r5VJLAI89/P/7bP/mfwn7DsgTOhQn6/+3/qP8xQQGCQBmT -lP/Hd3/0WzpbmcD46KAjf+OP2+uzcrUageneYS//5mdH/8ATZ20Cq+4FHO6g -zbHb7hSuT+Bkj47NPdpfWhu/pBkTqDV00juVdvUG07i7SODSsxtrAmknProl -17GWQOb6jQ5baDsaKd/+Ykmgt4izjgrtWdUl/erbCWSYLCpspcd/JoMRpeNA -oKTgfP2rtKdEFDmGLnS8RbVyvrTHvhp6m3sRaPMgbwEv7U97zYUsfennjTxE -Guj5NtxlTW72J3D0rlTQKdqDFW4zDkfo+LfHei2k/VrdN801msCPxoPfHtPz -+WXmYRP3WALXF3mNHKXdeSwh+tBZAqVZODdM18dTq7vCcbkEiovN/skwoeDJ -g0dUwk0Cg+ZnPzanXaf5zPZcCYH3tiz8NkzX30OxN5eulBPYtHB/xnLat/oW -Kt9pJnDPwAeR03Q9l2wSf3r/BYEc7ak18n/ru0phf3UXgdYVQR+L6PrPu6Z7 -u+kNgUp+5qcf0+vDpX3OMDhNYELJyIZOPQouvvIc/PCDwAy9BKYt7fOb/WM+ -zxHowxN5sFWXzrdOXNP3BWy0z24Of6hDQfRPyk5Eno2/A71cjtLr075T/AdN -1rHxob7z0hNqFHj+FhEzs2JjbM6yrj5VCtwPMMrWb2Gj2YguW5O26zbNXzYO -bMywtrJpoddPW5mdcV6+bIy5Kq44rkSBSUHh1QsX2HjPYtyzgklBH7Mgc+1l -NnLWGK/8rkDP9wv5V6Yy2ajuIfNmJe27UXnpNvlsXHHv8pcsObre7a+mCley -UVW4cdad3g+W859POvGGjU+Ou65JoPeXhtDkM3rv2egzJfrohijdv4mkxLcj -bBxXSNKqWUrXa1/CabMpNoaYzhseE6GAeSs27o8AB0300lo0F9P15BIWGaTG -wYTkO8u30PvdnfaQCEVtDrZOV7Os+Oh4LA8fbdfjYPMqtpQ5vT8m6wWGrwQO -Xk1g8GnxUCC0+MDhsa0c1BJePjz+k4R55f8edA/mYKewd/aSryRMilq67qjh -oPVKleN9r0no9iGeez/hINVp7hzeT0J1/Q+IeMbByk/NPxivSEgKLVC40clB -9yNuEVt7SdAaXPx6doSD0mZu7dfaSfClWp0yxBRRi5+R0d9Awsjm7bve7lFE -Sftr+qUlJLzIV2/67qWIciK8/iLFJNznEzAWOqCI/M7u5z0LSYi/W8bQD1HE -jBM3Ti7LJ0FFQao3NkERG2d59mzLJsFjrNdetUwRz7/fW7P/PAlvT7vu8BNU -wveTN+Zkg+n2R9QIrcVKeCx3faBdIAnf1s9+/rxECS8Jhegm+ZOwkC85xouh -hJ991p77RZ+3tEJqS13VlfDOJs/Rak8SjuxVEtu8TQndso6//L6TBAnT0VbV -TCXs2vjTUI0+71mMB1u801fG5xGCRMFkCchqy5+Yb6JMny+GT86MlsCYX12N -6mpl/P6sP8x0uATOzywx8bNSRiWf2rna/hLo/52vMeeijEnhKW25TSXgt/il -mHS8Mn7aZtZcn1MCl5Zj/8Y+ZXywtIJ1xrYERt3m+5dGqGC9p158zc1i+n9E -kje2ZjmKvQ3MYHOLQLRZKZEcX4FFU1F/7BsKQDauZIu+vhqab5KctWTchFRV -wyViHuoI5o9aiMM34Cljtd7Xsxpo2OS5bltHHhjJ1iRpdmqilOTm/MlFuSDM -lx2wO1oLWaSR1bI910A+SsFkp5I25rW9Gc3LyoIFio5lNk+0MatRmTE8kgka -XOmSYKeV2N0mo+Q7mg5+/aK1ljw6qLvU+nhNZxqMfz293SJVB88oNF/kYV2E -9Zr1lyzUdXG2q7E5MOc8PPxq/PNbiy5qcKEgnJMMvmore//bq4eafO5OaXNn -gDu2p33nAn0UPEMFW9SegrUcqU1C2fqoG/9Bp1EzDlQiTx6uMTBAw7XhCYoC -MbBir2GVYq8BrswKsuuejoK9Dz2Plx5ahad/nXJZ1HsUqq6275kUN8S8n9ae -1+eFwtSNuW+adw1Rbt6aiVVDgeCmWLDg0iYjLKJ4huTj/WByxTn9WxNGmH85 -JSjsqS/cy/n5ZjrOGL98GmoRqPUCB3M2GsuboLBXe6dF7F6Q2R9brlFtglYL -h2xMr+6GxDl3vVM1JrhrOX/gaPJu4E1eR32oM0H2cJnttZjdMFLGn3+10QSD -eYONVPfthvs8x1NF20xQ8VSowjX93eBwPjJ45p0JinDbbTVbXSG1IkTv4SIu -igZuHkoTcAXxhT7UJjsuSrwrWh4p4wQ5a46ETuzkojcr9NYOXidYeSRxzTlH -LuqtP2uOHx3BeoLs6N7NxWPR9ds33nWEE53Ts24+XJQWdH63ztYRvmdHmIVG -cfFoz/KzFWd3Qa/xuba8Ai4mwsRzG4YDeAbmpFsUc/HPeo0VAXwOMFN8Z+8o -ycV4/T7566M7QZTo/qZdxsVlTf8Ur67aCVbz5WQfVHOxff9C9Q17d0Jle96e -tg4uWkS2Ljhbag+WwvfUg7q5KH6obrT+ij10r2+ckerjYkj4xgqheHuYuv8p -znmAi1u968abnexBPUur6OMIF8sNiTjJ+fZQ2bs66PRnLjqFOqW1fbEDy2Xb -QHOCi60DfHj1lR24xwb+FzDNxX383cS+23YwVX3ikuR3LjbGl1p4XbGD6B8X -3e7/4GJ29c6+4Hg7WKKbr+b0m4vaAyuaLwTYwZX996fn5rgY1XNmWb2LHfwP -U0FU/w== +1:eJwV13k41F0UB3AhJUuy78xvhpItsiTGOVHZK6XVMtbKK0uRhMqSkJJWSSKh +hJmfFEqLaKVF8iJrpVTEK0Io3tsf88zzeWbm3nvO87vfe4fhHbzej5+Pj49/ +FnmR97Gu549YKXmWb/H86bIWtmXTJfn9K1rjoPJhhfYoRwlQ5rW3fOsp0HEK +6S3naEP4uustAq25cCnWpSKVYw4LBuVOTbTcAFF+vaBNHAfovrsm+GdLDVQd +fpdQ6OEKq1l9nT9aGmFm+VwtCbcAmGgxPTvU8hHkGDImd5yjoNb6at6b3BG4 +GVUVK2l7DJS7b/d66/yBpK26AUr1Z0B6F+f6HGsBbG6dDl0plQmnDFZXrdk4 +Fx9UHV2i9DgH3p1fUv1DQgxNFf3WxZ67Ail5h17zKyxA8y0ajXK+BSB3pif5 +dJYU7vGcVafScQ0SXewsG8dkcLqp+ltiz3VQvPlKkX+WLOqJzva/3X8duFIu +4wYisvht/bW8zyPXobnRgz6pJouy7fpOeoJFwHIOo5xtZfHqx4u2MawiqHHK +FmrIkMWDM5sVNH2L4M/q0VcvLeRw/XHzmT3dRRBqdpnzPE4e3+aIc3ofF4N9 +jvhPh2PymHf0kJjji2Kg5kQnvTorj1s9bKaKG4uhoWlT6dtr8ph2RfG0Z3cx +6IWICnS9ksd0quFq6q9i+Fqwr2BYUQH9IiqEhRaXgJv0mgGlMgUsG14ow0ku +gaWkj5fuKmCcnN2A9okSmPdxkSzjiQLyaetOjJwpgds8AdB8p4BCpYyivTkl +IOtwO23JjALO6bAIgYoSaIhlGa1yUEShnN0233tKYOV/k5FBPYrIjfLiFppx +Yb/tmcUPvysi5c37p8aSC9zLum1SY4r44ZHv4WZrLsi7eJrdnquEE0KnXw85 +ceF75eNxAT0lrHyuUDPgxYXTcWlhGRFK2KoWKyiczIWPMppBj8SUcY7/15xH +b7kgF/xARU5OGXeIu3y1beWC47MtL/3VldGRU5vyrIML5ZEpOvOXKuMT/5e9 +tz9z4Wj3UN/WLcr4LKt00HecC4aFVTv+y1XGfwIT13co8CDWwtlLcZkKrrWV +FnV25YGtx6VhUysVvKhpH3KOwwPxmP74jY4qyCwo82r24cHF2oSCNE8V3Ltf +YGDVLh5U2t/pF0pWwan3CsU90TwY2sIMH3mngmL1OFsxiwcee0ePvohSRfZj +NYuwdzzQSLdS7ktQxRdC0w0inTxS/4mSOWmqOGMl+CfrPQ8if2s1WOWpYnyZ +tvKNLzw4G+8hc/uFKvaHcuMyRnnw4uTT7HwVNayZqi80nEvDcm7GzYMP1DBY +nGU8qU7DypZXfwafqeFufs+JTRQNa/gEbTiNargTC/xLmTT4rA96B5/VkPFl +9VqOJg2roxiHYmaroxB/sXG2Ng0hamNXVmir49Mxj6s8YxpGy9KeTeir48nX +CvZfTGiItNUeKDVSx1uzhy8qL6MhYbenCWWpjgX/LnCJWU7Dhdq6Z/zO6mgb +9Hq+DtDwaEf2QG04+bx36re0LQ12v80ko6PUUULbrXahHQ2v0ppMjGLU0SYg +1HKZPQ3vbgvH5CWrY4nbzIb1jjQMioRJJlxUxxpJ49kB62iQp21NV9eoo1m4 +wFO9LTRkrexxnX6ijoKiMdPKW2mg3h2IKa9XR8m4hv/mbqNBl7/suea/6vjl +y6pZba40WLmouM35qo5q/qLfPDk07Pr1I+aZGANXJo4p8G8n/dy9XbZXkoFJ +HqUjHcRz+9qKBOQZaMERWHRrBw357bXNlhQDo5Mcc939aei6f1bnlgkD3VPL ++1J30VBsOq+m0ZyBoQv8C1wCSb/og5uHkIFR2+Or5YJokM3dEaftwMCBkE8L +zgXTsDbBrPUyh4GxZvqmoXtoUJ0uCXzgy0DZruERZigN38MpgU5/Bi5dqiDV +SJy0U0RPPoyBbQ/SIzX30lDt0BmfmsTASuvHv3n7aDCUjNWPKmVg52tr69XR +NPCljD46X87AjOgS35fErwT+2VZexUDHgP4h5wM0BIyuT/jxmIFrMmUdNxyk +Ia+V1b6jjYFGc3nKpjE07HHOCEnoZuBiyjyvkBjrxISufGLgzEOJTIVYGjqr +xpZ0DTLw8nBX6w9i2exnR1wEKHwzLpMfH0/DJzm28p65FDo2/Cr/QHwjrbT0 +hBiFIvUPLdiHSf1xFzrq5CjMmOQUfCdWnRLf81WZwooMnxRMIPWHxs8Roiic +0rvee5I4yW+X4QodClXzffh1j9Cwqev9Uw8DCqMrhB+FE7M2b3SPNqFwObV1 ++h5xta1lUgVSWPXFs3tlIg2pD2+o/LuKQiF958TDxG7LF5YN2xNf3Xb9IfGE +tkSX7kay3r36vkZJNIxlKcYu3UZh3rDCHH/in/M1WGYcCl+WtltmEg+OmP2z +0p/CFGGr4F/E/X4rxeyDKHSJl/VnJtPwtWUNvTaUwnQ+atKB+GOVz9i2AxT6 +FFh/OkvcrRuU4RlH4eDwccsK4o7sCIvtiRR6Ht1n2Ez8bkF8d8AxCp82ZFYP +EzfHH4/bfZLCOvrcN9GjNLwdTdfYd47MlynIZRE37Mh9Fp1JIZUYJ76c+OW7 +4oC4HAr3D5WIOBHXOVSIJ+VTWN/KKnAnfnrvYenx66TeJwldAcSP9F+4nOZR +mF8bfGsf8cPLzePnb1J4jBOnHUt8X+rDhUu3KYwodl+RRFyV0M/Ou0+hMeaO +HyOuHB99X1hL4cmlP9acIL7lz3eY94zCn4zvNn99o33ewlsvKZTWMu75+32e +k0zdnUYKk78GMf6OV/xALbC6hcKDsRYCf+crNFgs8aSDwpXnViT/XU/BFaOy ++g8UCthTN/+u94oMbHrTS+rH+MN/68lJtJto7qew76LwlCNx1sSGix1DFC4V +cJX/248LAR7wcZTC/rMqnX/7ld658+OXSQrbxsbtxIjPrA1NGJihcPvqk5wR +0u+TDw8sGhFkoiHzpGoLcerSpPpfwkysLcxOrCROyT8VNC3ORIMwv8x04iS5 +rAWC0ky8lpGyLYw4bqp083xVJmrXZHdqEh8KvDspzWTiAu+Pub/J8xLd/SRL +cRETBc/pyTYQh9e292gYMvGe1SnhEOJQ494j2qZMbDHkT7EgDrk6pGVgwcTO +PJ17QsQBKbNDLFYzsd98h8kZ8vzu/DNfysqBiQ0Fbw9uJt4erFhus46JF1XL +IuWJPTfo/16/jYnNg0knTpP94aK0Nck/iIk317ZhENlfzsd9tINDmfhcUnOZ +GvGamcBXYRFM9AvZ9fUl2Z+2PXHSMXFMTD9yK5xFbFFUnHPuHBMTg/rcy+No +aFcvyl6VycSSSa/XrsSR5wov/cxmopXEZfsZkg8VsQUX1xcyMSrziScSG27J +OS9+l4n7to4rFR2i4c3LS+n3qpnInBjqR+IQ66xzux4z0cnNra6J5BNX78KZ +uldMPN7Sc3OM5JfW7DNpRz4w8UeXjTOT5NuzyFMnjHtJ/xM5+YVRpP6htNRP +fUw0sr4mqkec1378mNVPJtbfN5QziKRB/UZi0rQQC/VMhXTVI0h+caJiwnVY +2JUb35NL8vZW0/5DGgYsHOezKptH7GIfcbDJmIV9GgPZISSvTxnvjTYEFk7G +xTea7KZBTDQ4YtCZhWIFMtxikveCt71Dtu9j4X6ZkTpLcl78kLT33FTDws9r +Z0RmudPQuotq+OcpC58f5qtSciN59WQSDr1g4VL+ajsjcl6lRRapXWtmYc+G +N8Iccr4t+SjaPdFHfh9crp25kYag0tfuWVIa6BeUUMZ1oqFv7UbXT74a6KyY +/9LWgobGQt36X/4auOt3ugLDnIY7AkLmYsEaaCtxw3PcjIbkinJFk/0a6HSo +uyfLlIZFavJticc10E2xvrnRkIYdg21btMs10NXY1rhzEcnzY56b9szRxJS6 +p3KRUmT+Ph1qiagmTp/atldbkoZxm4mBAQlNzBbK0GqXoGGewKkEf0VN7O2V +zDAWJ+vfX3vTU1cT35xqv9ZM7i8H/DSl1m7QxJOszu1npngga/n9tXa2Jp5o +Fo349YIHdv/ts/tsshDXW/I3BW7ngbKB6pG5Fgvxa4zrrAfePBjc86hGe8VC +bI/QqRIl97UzYxIWexwW4nxPo46szTzo+lOoN8NZiJvSvoik2/Jgj2iHlELy +QtT54NLTq8WDC1rY5di+EIXa3qTO6yP3UZ+5oTcPLcJLmz3y33pyyf8TOf7E +Gi2c7rHxFjQsAcmXmqn0f4tx4NsyNb/RIlBO4q0zMdFBq+GMzO0x1+G8tpmE +1A5dFBb7OYtvfiHUKa4wHjmph1obdkRKpV+F5co1afrN+hi52+GVzlg+iAvk +hnnFLUGvIa0q2aA8UI1Vs9iqaYBy8xjHdj7NBWENt/L1Tw2wsY6zpFz/Muix +FXj73A3xks48jyNR2bCnS7LWnm8prtaZfTw3/CL8N3Jso935pRipL39F6kkG +2Og/uWCna4TLuIm6NavS4f6I+dT4KyNU65no/VZ5BoJ0DNve+Bmj2YwPl4o9 +BexB36atwibIa5Be1GOTBqtY8k5iuSZYL/hWTbr6GCyKORpRY2qKcRtTRzNc +kmGxn9kDjTZT/HK9iS9xPAH87u88fHP3Mlwscit1khkPD3KafH/ImGGHiJdf +//YY+HltZly/wgzf8uTerBOJBh+NIuELTsvR9H6ruoJqBPxYfNrkxtBy/HDr +MyfEMwwq86Y+jCaZo8/GrcoGLrth20ommqtaoLJUpVV8SCAoBSbe1qu2wBXr +ZnUrpOwEmXm7Sp02s7HvvfaBlZd8Ic/6QOTQVjbarZJ3F0n1BcMDqdan3dh4 +5P7nZZ0HfGHNEP1vqxcb/7z49uKyuy8caR6d8NnFRsdk10clKr7wK/eQVWQs +G5sDDnyqz/aBNvPTbwuK2Hj5i2/XryJv2Lk376Idl42BnGoF6SxvGOPe8vtO +s/FNvNsFs1RvkKRaxw3K2ajHP+pyJcQbHOaqKN+rZmNamKvUD2NvuNtU4Pv2 +XzYucvNoDanxAnvxSt3wVjZ+udtXr3vTC1ptno/Jt7Nxs8NU0c98L/h5pz/J +4z0bw0MrlHKSvUD38pKSb31s9BfyUw909oK7bSvCjw2Q9R1+3RVhTcaT3gD6 +Q2zUihT2SDX2gu2Je9+EjbLxrOvS5GYFMl71kQtyv9i4KsVhsbCoF8RNpvvc +mWTj8J348FXTniBhVKjj/oeN84+G7UwZ8oRLgXdGZ2bYuM6vcrLtoyf8D+Fx +RgY= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.06741909458355917}}, + "PlotRange" -> {{0, 30}, {0., 0.06461425473498951}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8517,6 +8774,7 @@ U0FU/w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8544,7 +8802,8 @@ U0FU/w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.06741909458355917}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06461425473498951}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8552,8 +8811,9 @@ U0FU/w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913236646248627`*^9}, - CellLabel->"Out[89]=",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] + CellChangeTimes->{3.9913236646248627`*^9, 3.994387493292275*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"ad375ed3-6bba-4b53-a08e-29f24038db3b"] }, Open ]], Cell[CellGroupData[{ @@ -8605,65 +8865,71 @@ Cell[BoxData[ FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", - CellLabel->"In[90]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], + CellLabel-> + "In[109]:=",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, 90, - 21, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323664732767*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.7706898613503373`*^-173\\\", \ +RowBox[{\\\"6505741221906667575245316\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"85\\\", \\\"\[RightSkeleton]\\\"}], \\\"76000000000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 109, 17, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994387493434458*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], +In[109]:=",ExpressionUUID->"1faefb82-6601-4543-acb6-573ccee34d8e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 22, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132366476486*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.433180480105247`*^-177\\\", \ +RowBox[{\\\"1827462709233582921886409\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"89\\\", \\\"\[RightSkeleton]\\\"}], \\\"84000000000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 109, 18, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.99438749344188*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], +In[109]:=",ExpressionUUID->"22db697d-1520-4609-aaab-096553c7016e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 90, 23, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236647877655`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.016430802613442`*^-180\\\", \ +RowBox[{\\\"5328881260125127800220770\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"92\\\", \\\"\[RightSkeleton]\\\"}], \\\"44000000000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 109, 19, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994387493448511*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], +In[109]:=",ExpressionUUID->"db6614dd-827e-4c25-b9f9-989147267f0c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 90, 24, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236648078594`*^9}, +during this calculation.\"", 2, 109, 20, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323664732767*^9, 3.994387493454941*^9}, CellLabel-> "During evaluation of \ -In[90]:=",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], +In[109]:=",ExpressionUUID->"4a606ff2-b5e1-45f8-963e-62109d68b397"], -Cell[BoxData["11.275343508420768`"], "Output", - CellChangeTimes->{3.9913236764669056`*^9}, - CellLabel->"Out[90]=",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[BoxData["11.76473140565987`"], "Output", + CellChangeTimes->{3.9913236764669056`*^9, 3.994387541765923*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"7ff76059-a051-431a-8459-4e643757ffce"] }, Open ]], Cell[CellGroupData[{ @@ -8730,67 +8996,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917996753598194`*^9, - 3.991799698091812*^9}},ExpressionUUID->"18d0289f-01fd-a740-8fac-\ -540622282b2c"], + CellChangeTimes->{{3.9917996753598194`*^9, 3.991799698091812*^9}}, + CellLabel-> + "In[110]:=",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 25, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765399036`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.48886173732191`*^-210\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 110, 21, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994387541832527*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], +In[110]:=",ExpressionUUID->"23410df7-0029-4151-8a36-ef490d7cc9d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 26, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236765679016`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.857990908815061`*^-215\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 110, 22, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994387541841194*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], +In[110]:=",ExpressionUUID->"c05d1bff-68d1-4525-ae00-7250e61d427b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 91, 27, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323676587904*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2092105844904933`*^-219\\\", \ +RowBox[{\\\"1430947572478972522812388\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"62\\\", \\\"\[RightSkeleton]\\\"}], \\\"63737600000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 110, 23, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.994387541848371*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], +In[110]:=",ExpressionUUID->"fe172c89-1b0a-4ec5-92e5-652f4a474831"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 91, 28, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236766039066`*^9}, +during this calculation.\"", 2, 110, 24, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913236765399036`*^9, 3.9943875418557587`*^9}, CellLabel-> "During evaluation of \ -In[91]:=",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], +In[110]:=",ExpressionUUID->"aaa381b2-d866-47d4-aaa0-8eb45e127f9a"], -Cell[BoxData["0.5376063675902706`"], "Output", - CellChangeTimes->{3.9913236883162384`*^9}, - CellLabel->"Out[91]=",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[BoxData["1.6171866844930975`"], "Output", + CellChangeTimes->{3.9913236883162384`*^9, 3.994387549982263*^9}, + CellLabel-> + "Out[110]=",ExpressionUUID->"ddf4dcd7-606c-4221-bfcf-805950c715e4"] }, Open ]], Cell[CellGroupData[{ @@ -8811,8 +9082,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8857,67 +9127,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997261183853`*^9, - 3.991799730012718*^9}},ExpressionUUID->"33f25e29-8e2f-5249-9603-\ -4bb381db84df"], + CellChangeTimes->{{3.9917997261183853`*^9, 3.991799730012718*^9}}, + CellLabel-> + "In[111]:=",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 29, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132368839011*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.48886173732191`*^-210\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 111, 25, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994387550023164*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], +In[111]:=",ExpressionUUID->"94e3f0f3-09b0-4a73-a645-59bdb5b713ee"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 30, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884141064`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.857990908815061`*^-215\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 111, 26, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994387550029737*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], +In[111]:=",ExpressionUUID->"4d49f1b4-2d66-4615-ad3c-662beddd2038"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 92, 31, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323688443001*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2092105844904933`*^-219\\\", \ +RowBox[{\\\"1430947572478972522812388\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"62\\\", \\\"\[RightSkeleton]\\\"}], \\\"63737600000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 111, 27, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.994387550035531*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], +In[111]:=",ExpressionUUID->"7c2cbd82-0f19-437f-9f1a-8aba01e85d76"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 92, 32, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913236884570007`*^9}, +during this calculation.\"", 2, 111, 28, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99132368839011*^9, 3.99438755004068*^9}, CellLabel-> "During evaluation of \ -In[92]:=",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], +In[111]:=",ExpressionUUID->"d053d440-7870-4dc7-8e1e-ca91f6a44b16"], -Cell[BoxData["10.498798062085507`"], "Output", - CellChangeTimes->{3.9913236988049507`*^9}, - CellLabel->"Out[92]=",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[BoxData["40.21046373663764`"], "Output", + CellChangeTimes->{3.9913236988049507`*^9, 3.994387557815331*^9}, + CellLabel-> + "Out[111]=",ExpressionUUID->"4eaaca82-f516-454a-affa-5110b95e433a"] }, Open ]], Cell[CellGroupData[{ @@ -8938,8 +9213,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8984,67 +9258,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917997336698074`*^9, - 3.9917997367747993`*^9}},ExpressionUUID->"88e14da9-8532-e842-b722-\ -1b0781de8eeb"], + CellChangeTimes->{{3.9917997336698074`*^9, 3.9917997367747993`*^9}}, + CellLabel-> + "In[112]:=",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0214398527195236`*^-209\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 33, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698915848*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.48886173732191`*^-210\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 112, 29, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.99438755787399*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], +In[112]:=",ExpressionUUID->"5305e3a9-3266-424d-94ad-7ad825f55c89"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2768543829593313`*^-214\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 34, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698943981*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.857990908815061`*^-215\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 112, 30, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994387557882162*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], +In[112]:=",ExpressionUUID->"abe5fa9b-2cdd-45fd-b9d0-9c4516532c7e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.553860136403171`*^-219\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 93, 35, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698971981*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2092105844904933`*^-219\\\", \ +RowBox[{\\\"1430947572478972522812388\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"62\\\", \\\"\[RightSkeleton]\\\"}], \\\"63737600000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 112, 31, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994387557888804*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], +In[112]:=",ExpressionUUID->"ec681cf7-b46e-4ca1-be50-1bf093ff06bc"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 93, 36, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323698986994*^9}, +during this calculation.\"", 2, 112, 32, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991323698915848*^9, 3.994387557894734*^9}, CellLabel-> "During evaluation of \ -In[93]:=",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], +In[112]:=",ExpressionUUID->"112d048b-0acc-45bc-a9a7-5930219cdae2"], -Cell[BoxData["18.521732102530788`"], "Output", - CellChangeTimes->{3.991323706795576*^9}, - CellLabel->"Out[93]=",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[BoxData["9.25269868779167`"], "Output", + CellChangeTimes->{3.991323706795576*^9, 3.994387562764077*^9}, + CellLabel-> + "Out[112]=",ExpressionUUID->"7a797a0b-50cc-40d7-aa7c-937ae4f5aa7e"] }, Open ]], Cell[CellGroupData[{ @@ -9053,21 +9332,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991799742384985*^9, - 3.9917997459840527`*^9}},ExpressionUUID->"fcd1131c-ba92-0b46-817b-\ -e5f89f4ec38f"], + CellChangeTimes->{{3.991799742384985*^9, 3.9917997459840527`*^9}}, + CellLabel-> + "In[113]:=",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[BoxData["0.038552612544494616`"], "Output", - CellChangeTimes->{3.991323706858589*^9}, - CellLabel->"Out[94]=",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[BoxData["0.08384099159178479`"], "Output", + CellChangeTimes->{3.991323706858589*^9, 3.994387562808198*^9}, + CellLabel-> + "Out[113]=",ExpressionUUID->"21f11299-c27c-4675-b7d8-af640bb11685"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9917997487290344`*^9, 3.991799750684988*^9}, - 3.9919243164025135`*^9},ExpressionUUID->"c771f2bd-f081-e54a-b4e5-\ -bf0dbc996ac3"], + 3.9919243164025135`*^9}, + CellLabel-> + "In[114]:=",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ @@ -9089,11 +9370,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", - CellLabel->"In[96]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], + CellLabel-> + "In[115]:=",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.991323706886154*^9}, - CellLabel->"Out[96]=",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[BoxData["12.632463348937872`"], "Output", + CellChangeTimes->{3.991323706886154*^9, 3.994387562829825*^9}, + CellLabel-> + "Out[115]=",ExpressionUUID->"d9ab5e69-3e53-4913-a76d-a4095592599e"] }, Open ]], Cell[CellGroupData[{ @@ -9102,11 +9385,13 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", - CellLabel->"In[98]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], + CellLabel-> + "In[116]:=",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.9913237069236546`*^9}, - CellLabel->"Out[98]=",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[BoxData["2.012141345084185`"], "Output", + CellChangeTimes->{3.9913237069236546`*^9, 3.9943875628437357`*^9}, + CellLabel-> + "Out[116]=",ExpressionUUID->"d8031aa6-d13c-4f3c-8792-bffd8331e51f"] }, Open ]], Cell[CellGroupData[{ @@ -9116,12 +9401,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[101]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], + "In[117]:=",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913237069753113`*^9}, +Cell[BoxData["25.418301794658518`"], "Output", + CellChangeTimes->{3.9913237069753113`*^9, 3.994387562856401*^9}, CellLabel-> - "Out[101]=",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] + "Out[117]=",ExpressionUUID->"e70fb350-4681-4893-91c7-9b066f73f8b7"] }, Open ]], Cell[CellGroupData[{ @@ -9311,12 +9596,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[102]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], + "In[118]:=",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[BoxData["0.02467166981689615`"], "Output", - CellChangeTimes->{3.991323707000412*^9}, +Cell[BoxData["0.0058436734394963046`"], "Output", + CellChangeTimes->{3.991323707000412*^9, 3.994387562872581*^9}, CellLabel-> - "Out[102]=",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] + "Out[118]=",ExpressionUUID->"a047b5cc-f929-4f2b-8eb5-ae5a7a5d9123"] }, Open ]], Cell[CellGroupData[{ @@ -9330,12 +9615,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[103]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], + "In[119]:=",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[BoxData["5.642163519289108`"], "Output", - CellChangeTimes->{3.991323707203314*^9}, +Cell[BoxData["11.59316378490898`"], "Output", + CellChangeTimes->{3.991323707203314*^9, 3.994387562999401*^9}, CellLabel-> - "Out[103]=",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] + "Out[119]=",ExpressionUUID->"d1a9c811-6774-4640-86d7-21c7cb76743f"] }, Open ]], Cell[CellGroupData[{ @@ -9527,12 +9812,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[104]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], + "In[120]:=",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[BoxData["0.012834083028601704`"], "Output", - CellChangeTimes->{3.9913237072224197`*^9}, +Cell[BoxData["0.03721833255806647`"], "Output", + CellChangeTimes->{3.9913237072224197`*^9, 3.9943875630204353`*^9}, CellLabel-> - "Out[104]=",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] + "Out[120]=",ExpressionUUID->"3a10831d-4465-483f-bbe5-3ff326d14f13"] }, Open ]], Cell[CellGroupData[{ @@ -9546,12 +9831,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[105]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], + "In[121]:=",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[BoxData["7.82280524717004`"], "Output", - CellChangeTimes->{3.991323707432623*^9}, +Cell[BoxData["4.593740778435407`"], "Output", + CellChangeTimes->{3.991323707432623*^9, 3.9943875631526337`*^9}, CellLabel-> - "Out[105]=",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] + "Out[121]=",ExpressionUUID->"c0728b17-d740-45db-8492-49e51ee903a2"] }, Open ]], Cell[CellGroupData[{ @@ -9644,12 +9929,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[106]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], + "In[122]:=",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913237074497375`*^9}, +Cell[BoxData["0.09071336685848984`"], "Output", + CellChangeTimes->{3.9913237074497375`*^9, 3.994387563173959*^9}, CellLabel-> - "Out[106]=",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] + "Out[122]=",ExpressionUUID->"0c821ee6-2917-4ce0-a4e6-7d32b46e9269"] }, Open ]], Cell[CellGroupData[{ @@ -9739,12 +10024,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[107]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], + "In[123]:=",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991323707467621*^9}, +Cell[BoxData["0.9092866331415103`"], "Output", + CellChangeTimes->{3.991323707467621*^9, 3.994387563195848*^9}, CellLabel-> - "Out[107]=",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] + "Out[123]=",ExpressionUUID->"ab2b268f-c09a-4173-bd36-39de8b437e1b"] }, Open ]], Cell[CellGroupData[{ @@ -9867,12 +10152,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[108]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], + "In[124]:=",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991323707488617*^9}, +Cell[BoxData["0.08248445193168688`"], "Output", + CellChangeTimes->{3.991323707488617*^9, 3.9943875632144938`*^9}, CellLabel-> - "Out[108]=",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] + "Out[124]=",ExpressionUUID->"1ea4d3f2-a6f1-4d9a-ba4b-785158ddd882"] }, Open ]], Cell[CellGroupData[{ @@ -9887,7 +10172,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -9909,8 +10196,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -9934,68 +10220,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799766323864*^9},ExpressionUUID->"ee2d2671-1677-5943-bf7a-\ -6ffa36275fe8"], + CellChangeTimes->{3.991799766323864*^9}, + CellLabel-> + "In[125]:=",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 109, 37, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075117207`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.0738721444752064`*^-215\\\", \ +RowBox[{\\\"1119071536804432775059941\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \\\"31183104000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 125, 33, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.99438756323491*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], +In[125]:=",ExpressionUUID->"5daadfcd-bc43-4090-9233-b77d0cc7dcf8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 38, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323707545618*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4042697096500825`*^-220\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 125, 34, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943875632431307`*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], +In[125]:=",ExpressionUUID->"39e5b1aa-4003-4a53-a914-562f2c7b5e93"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 109, - 39, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075757256`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.418923479122964`*^-225\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 125, 35, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.994387563249329*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], +In[125]:=",ExpressionUUID->"39f84487-6876-43a9-9a09-c222db4319c1"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 109, 40, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237075926247`*^9}, +during this calculation.\"", 2, 125, 36, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237075117207`*^9, 3.9943875632562923`*^9}, CellLabel-> "During evaluation of \ -In[109]:=",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], +In[125]:=",ExpressionUUID->"581a1270-7cce-4594-aec8-9dc060081bdd"], -Cell[BoxData["5.642163519289105`"], "Output", - CellChangeTimes->{3.9913237161181736`*^9}, +Cell[BoxData["11.593163784908977`"], "Output", + CellChangeTimes->{3.9913237161181736`*^9, 3.994387567165864*^9}, CellLabel-> - "Out[109]=",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] + "Out[125]=",ExpressionUUID->"cde749da-9f94-419f-b71e-93e0a763fc74"] }, Open ]], Cell[CellGroupData[{ @@ -10010,7 +10300,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -10032,8 +10324,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -10057,68 +10348,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917997699328365`*^9},ExpressionUUID->"b0b1035a-0fdf-b146-a71f-\ -1ab9142a9a90"], + CellChangeTimes->{3.9917997699328365`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 110, 41, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237161871567`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.0738721444752064`*^-215\\\", \ +RowBox[{\\\"1119071536804432775059941\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \\\"31183104000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 126, 37, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994387567206353*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], +In[126]:=",ExpressionUUID->"b951e4d3-26a3-4f27-becb-b87c88f34c79"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 42, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162070637`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4042697096500825`*^-220\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 126, 38, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.994387567213121*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], +In[126]:=",ExpressionUUID->"8c989dab-93ba-44e8-8464-9b9ffa5daab4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 110, - 43, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991323716227171*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.418923479122964`*^-225\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 126, 39, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.9943875672190742`*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], +In[126]:=",ExpressionUUID->"73e5d9d0-024e-4be9-bacf-5d2fa8f7d80b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 110, 44, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913237162481613`*^9}, +during this calculation.\"", 2, 126, 40, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913237161871567`*^9, 3.9943875672241364`*^9}, CellLabel-> "During evaluation of \ -In[110]:=",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], +In[126]:=",ExpressionUUID->"135c14e2-6d90-483b-b6ef-e4e2dbfd0e23"], -Cell[BoxData["7.822805247170038`"], "Output", - CellChangeTimes->{3.991323724852854*^9}, +Cell[BoxData["4.593740778435407`"], "Output", + CellChangeTimes->{3.991323724852854*^9, 3.9943875710926933`*^9}, CellLabel-> - "Out[110]=",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] + "Out[126]=",ExpressionUUID->"0900db3f-1783-4e63-a733-36e521d95e83"] }, Open ]], Cell[CellGroupData[{ @@ -10176,95 +10471,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917997843341885`*^9},ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-\ -ff25938e6592"], + CellChangeTimes->{3.9917997843341885`*^9}, + CellLabel-> + "In[127]:=",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VdsbB3BJknnIfMlcFOmQIrVeQ5FQCRlPOsMOIZk6SVy30EQylLoZ +CpGOKcmsgcqvhBtJShlPxzxtoclv+WM/+/k87/N833ftvdZSpZ1wYPLy8PBw +8bP8Ptmit76irWVXU0WjdEgBF+2ayNlKs2Qj8ZE8tOzeTKMUDctaFHjPvm7Z +Bxhv+YUNXiC/8cqEUOxSVlTDKstmVP6EUxaGffGl3NOogv+Ql3LXJhZ2VdvJ +jF+U9+iRYPziaeyR7tcRp2u6ECN2lUIEtsKQuvt3i8/IIdksIRJ732SEcXDz +V9RoYOYcjV3/a0SIVdCHLH35gs5jd0bLnnkcMIBSjS/3xWFP8FuOkJQhtJjz +PucyNv+VQFeDeQ56XjxQcxVbWSK96WQNntOzXCsF217x+70JizFkUZY9n45N +ZKnJ6ApMoG76U89s7CjN/THHmydRyP+yZO9jd8l2bAkpmEatTezYcmyGm69P +8pUZ1OLftaMWe+o2z52HAbPI58srywZsATVd8WnKHLIwnTn4DjuF0WAlLv0d +rd+m69yNrZLnGrV5/jsi5TYV9WNv3xQ74V+zgNaWhLqS2N5GX5tHLH4hhqRx +uuIDLiJZoXyCWr8RQzsFaWH/XSNkqi3wB633K9u6BTsNtj841ryERm/vUrLG +ZuQ2WQYVrADrjgsfT2MXvEzujVbkhY8n+BXisKe+USOuXeGFpgTrohTsCJ25 +spKAleBwQeFdCXZKsar6JGUV6LV/5x/H7m4bq/+TvQryp28O/cJWmalwE5Xm +h8e/V8iJsLmIbWifpDvPDxHyqiw97Maq8BV+NQJQtCZdMxR7rqH9K9dCGMLE +b22VLOQiSVth8TP1wvAXrUdBG1u/wxJEjEVg0uw6DbB9B8uztuiJAk3URz4Q +O5C3WX+nsDjkZKRqdGAPqRVNx3yXgOM8aqVFRfj7EK/XtBpIwueo13VvsHkf +cFTlTkqCh/nIpmFsFYN1DgWjkvBQMJGiWcxFbhaJD1t6pWBBhvXpDnYrPShY +9o00hD3rzC4s4aIveQmXvQRkwDuet6sNe2y0IPv+bhlgl+QFkNiCIQPtO57K +gPBVaoNpKRdZnnc09CqXhcHqfwTfYVfnGM3lZ8rD65CXYmJlXJQz9CPMJEQJ +OuPc5t+Vc5G1U9yX4EIloIz3HVzCHmuU2lPIUYJ7tda8mx5zkWHOJmkVV2XY +bFDOiMVupFHLVu1aB4O1IvqogotmJntPcc+pgNvs196nlVwk5W/5qMxODcqU +dNh8tVzEyRH0PuCrBqetx5/vwK783KY4HqsGcmtTNwdje9h6ntN6qgbB5smC +A9g5G8McblLUARbsX72sw/1H8qYiZTVA1XrMPeMJFzkeE9K16dOEXf8Tmo1v +4CIU5kQ5/FsT+lzczrRg68RkbmPIa4GK7E5nsUYu4sk2MI88qAUxX56sTMIu +/OJ++OEzLaB2Ptn57wt8Pp3Z0Qp318OzF+26da/wfJZ2nSM0bTgTkbO0q5mL +sg/d+DQfqQ2Ucx+6L2In0Pp6+f7VBh1OjsB7bMbfoaPK7dpwKV7Mw+8tF0nU +pvMcstAB3Z/a/RkteP8YTOjUqG+EdS5Zx6X+4yJFtatRlwc3QZ79nxCTTi6q +vURqL/Lqgory4tfr2B6zrh2Eqi54ndFjz2JnNGpom1N14dzoXu+iD1ykdqz6 +3cIHXdiwaHNiw0e8XvaQJvFGD4xiSyr1PnORkqIyoeKqD+OxX0zO93PRptwQ +4Z+IAptLkdChKS6iMc7N6dpToCL3+uIT7DT1pC9eHhTYovDAVHeai1beLS55 +yaJApI3IM4EZfN4yRhyTSikgblj7vGEW36dpXuna6gYgMz9xf+88/r+XbfVc ++A2BXU4KpP7hojtBGgfKm7eC+aSWlI7oMGoLQ9vO5xrD5pvNZhGGw0iV+t7e +028nXN09VaDtNYyYS4+LlE4DpDsWl+1PGEayo5WrZWnm4OklcHPXy2EUYmD6 +OUnHElQuTFz/uTSMaOO/mqRGdsOGpIGQ+p0jqNA8eHVmqxV8s/TUjI4dQTmk +7zN2yl449630/LPWEbRgJve2MWofzHFkTGY0RlEPz8rpvqN24LHRt8AjchQF +/HUiMVp9P2xUdPzU0TmKinyanqbGHIAWK5ckI9MxFD4rP7/R5yCEHTE80pI5 +huZs9ji/OuIAjkYsmBMfR8bu18yGDh6CosPjOmox4+idfLpvo4EjUI06LnfM +jSOFe+dq8zc4gdyPNfyBIROoslfH1l7EGQr99UQjJyaQcsfUsbBx7LrsSX+f +SWSQeo2d3XsYVNaJINGZSZTON6uX1OAC6t2qL2RMptBjs83dMVWuMNW5kPE8 +egqlbbsk8avADa6eFdb43TSFWj/lxhpcccfzTJ7iCE2jcrvbGoF/e0DfYZSV +5TiNpv0P8QQwPMHnU5WVQ9o0mtuj7T1hQYWscCsVre5plD/+cSHY6Agk19c7 +XlOZQS53cumewl7gfOsGY8RrBpU93HdkZZwXjFCPrKvKmUHGiu8WLy56wV1K +u3hD3wxS7z3W/Z/PUcion6ELKc6iQaHj+28PHAV3eWpLp9Msakuwp1s50WDN +P5VB6hdnUQorUyi0jQaGx5Wb3GpnUW390iJ9Lx18p2xvPhmeRWIeEGdQTQeD +qF9Rh8VIpLL2VetftXRonh0Zn8TWb7aT46+ngzPbZClOnEQOpu73u57RwZpz +S6hCgkQpf4W9Ofs/OvzSYzeJryWRQs8DsaYuOojcuF//UI5EGlTZNI95OrjP +hU4Xq5LI2GsiP8aQAdJOYa6XKCS6d3Mq2N6IASdoHCqvAYnWts/skt3OgIN2 +yaLh2BO75zvydzAgzILq521I4vuLZ0WzOa5/7FhnZkQi0XkJV8mDDFhba3O4 +35hEg/Fb12T6M0CvqCdpAEiUUBPhU3mPAaoP2h732JHIn3LDmJXPgB8Suj07 +7Ulke790zfYCBjzpsypMxxa8wblfUYjrHv/YeOwnUUzQgZHHjxigUZB46v0B +EkVoaxwvf86AT7eOJVYcIpHvjTd+D78w4MG/q2kmriTaK8oxDeplwHvb8ntX +sTfE8IhQ+hlAvXA+eRCbE7S1sHSIAZdkDjPj3Uh01D5zvGSMAf3BZ7jd7iRy +WRUcUPyDAcA+QmNSSWQVrBDIlmGCQvPKjm10Ej3PjLVJkmNCWmLe/gvYps0z +GiwFJngP6tK6sPU133y0UGaCvyB73ykGieQ/nLH4pMmE4IbveiVMEo2a9MgI +bmXCHT7zjaLeJLrKm1V37BAT3DOV74b74fVvFk6zc2KCxx3Fvjrs8+6sIIPD +TMip8y3n8ScR69GB9UtuTFBt/k8pBvsoseLadRoTrrVfGLsQQCKD1zTGi5NM +mDq1ghURSKIP1zSF1BOZUPntz2/JEBIVIRFv7jUmvBHxNN2NfX6cbCxMxv22 +VP11CpuytzFy+w0m/Hxu1/ARO4GHPmOXwYRPDop5t0JJtOdE1kcWmwlWN8Qa +BE+RSEnpgtGuIiaov51U2oZNvj6RvLKECb1XPBXo2He1kF1CGRPeB72ar8L+ +3dPzNLuaCf00FUs6i0SPbBXzW5qYUDMXqJRzmkSXf/CuSnnNhJ3bDBNeY9Py +R466NjNBMVwtawpbnK9acbAV97P1ydsRTiK/Gperi51M+KzLZ/EWW13nepjG +EBNcouvufzlDoh8fzrYPc5hwMShHZwm7LYapX8xlwqtvR23XRZAoss9wxHiM +CTa6dkFU7O60ds/9s0xw4hy16sJOWi2xO3wFAZ/z0ySrz5KodqbHPWQlAW8n +F4o+YH/rKQgKWEUA//njHSS26SPLLNoaAh72n6zWjcT7zYv100aCgKyQwJmb +2OK2uyV3SxHwLba1swx7xzZJbSSN85/LWr7FThRhOxvIE6D85kDVn+V69ddS +RVUCWFFDIh5RJCJy2U3S6gQcuidiHISdmHj6q5gmAcPUn2Nx2BxCSoRPm4DI +I7KTpct1KSvvMX0CckOG3Hn+JlH1H6koDgXPT3/bLIk9NNyb2mtIgMBnj5ca +2CZPwxs6thOQJMg8ZIU96FekXAcEaJQ/64jFFnU5s7XCnABu7pVLqdjGFta2 +pZYEhN7nNGVjJ8j3n861JuCd086v9diVfMWJmTYEcMYMK95gD0yeybtpS4Br +cKlsF/b2l9Lv4w8QcE1FP2gSm1baPxrnQMARrq7fD+z428W8/zgSkNqXN8EX +TaL+oL36YS4EqGYJxMthi1BlrALdCHCvGs1Xxd6+d8DT14OA+gcWdjrY8evO +XqZ6EfCiat9mE+xKQZu7LjQCTD8v+Jkt583JVDkwCIgbWmtgvZzXN9BqSxDw +KzEj2n45r7mEs8ebAOeSFBdHbFrF2d/gS0DNxu8Vrsv5d23W7vAj4N6K55nU +5fx42Y1bAwiY3zMvRl/OZw2abQ4kYFErVeAYtjCj1EU7iACngVsXfbG37Y88 +oR5CgGzH6mT/5XyTfbFKYQSUHvukEYh9RVMuXZZFwB81aRSE/Vh8qEwinAC9 +O4/6grH7fpa+FoogYCS5Sjh0Of9bZN+qSAI2Nqg/XbbRu30LS1EE0EVmfy77 +/7JNDyU= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10278,107 +10572,106 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1Hk4VdsbB3BJknnIfMlcFOmQIrVeQ5FQCRlPOsMOIZk6SVy30EQylLoZ +CpGOKcmsgcqvhBtJShlPxzxtoclv+WM/+/k87/N833ftvdZSpZ1wYPLy8PBw +8bP8Ptmit76irWVXU0WjdEgBF+2ayNlKs2Qj8ZE8tOzeTKMUDctaFHjPvm7Z +Bxhv+YUNXiC/8cqEUOxSVlTDKstmVP6EUxaGffGl3NOogv+Ql3LXJhZ2VdvJ +jF+U9+iRYPziaeyR7tcRp2u6ECN2lUIEtsKQuvt3i8/IIdksIRJ732SEcXDz +V9RoYOYcjV3/a0SIVdCHLH35gs5jd0bLnnkcMIBSjS/3xWFP8FuOkJQhtJjz +PucyNv+VQFeDeQ56XjxQcxVbWSK96WQNntOzXCsF217x+70JizFkUZY9n45N +ZKnJ6ApMoG76U89s7CjN/THHmydRyP+yZO9jd8l2bAkpmEatTezYcmyGm69P +8pUZ1OLftaMWe+o2z52HAbPI58srywZsATVd8WnKHLIwnTn4DjuF0WAlLv0d +rd+m69yNrZLnGrV5/jsi5TYV9WNv3xQ74V+zgNaWhLqS2N5GX5tHLH4hhqRx +uuIDLiJZoXyCWr8RQzsFaWH/XSNkqi3wB633K9u6BTsNtj841ryERm/vUrLG +ZuQ2WQYVrADrjgsfT2MXvEzujVbkhY8n+BXisKe+USOuXeGFpgTrohTsCJ25 +spKAleBwQeFdCXZKsar6JGUV6LV/5x/H7m4bq/+TvQryp28O/cJWmalwE5Xm +h8e/V8iJsLmIbWifpDvPDxHyqiw97Maq8BV+NQJQtCZdMxR7rqH9K9dCGMLE +b22VLOQiSVth8TP1wvAXrUdBG1u/wxJEjEVg0uw6DbB9B8uztuiJAk3URz4Q +O5C3WX+nsDjkZKRqdGAPqRVNx3yXgOM8aqVFRfj7EK/XtBpIwueo13VvsHkf +cFTlTkqCh/nIpmFsFYN1DgWjkvBQMJGiWcxFbhaJD1t6pWBBhvXpDnYrPShY +9o00hD3rzC4s4aIveQmXvQRkwDuet6sNe2y0IPv+bhlgl+QFkNiCIQPtO57K +gPBVaoNpKRdZnnc09CqXhcHqfwTfYVfnGM3lZ8rD65CXYmJlXJQz9CPMJEQJ +OuPc5t+Vc5G1U9yX4EIloIz3HVzCHmuU2lPIUYJ7tda8mx5zkWHOJmkVV2XY +bFDOiMVupFHLVu1aB4O1IvqogotmJntPcc+pgNvs196nlVwk5W/5qMxODcqU +dNh8tVzEyRH0PuCrBqetx5/vwK783KY4HqsGcmtTNwdje9h6ntN6qgbB5smC +A9g5G8McblLUARbsX72sw/1H8qYiZTVA1XrMPeMJFzkeE9K16dOEXf8Tmo1v +4CIU5kQ5/FsT+lzczrRg68RkbmPIa4GK7E5nsUYu4sk2MI88qAUxX56sTMIu +/OJ++OEzLaB2Ptn57wt8Pp3Z0Qp318OzF+26da/wfJZ2nSM0bTgTkbO0q5mL +sg/d+DQfqQ2Ucx+6L2In0Pp6+f7VBh1OjsB7bMbfoaPK7dpwKV7Mw+8tF0nU +pvMcstAB3Z/a/RkteP8YTOjUqG+EdS5Zx6X+4yJFtatRlwc3QZ79nxCTTi6q +vURqL/Lqgory4tfr2B6zrh2Eqi54ndFjz2JnNGpom1N14dzoXu+iD1ykdqz6 +3cIHXdiwaHNiw0e8XvaQJvFGD4xiSyr1PnORkqIyoeKqD+OxX0zO93PRptwQ +4Z+IAptLkdChKS6iMc7N6dpToCL3+uIT7DT1pC9eHhTYovDAVHeai1beLS55 +yaJApI3IM4EZfN4yRhyTSikgblj7vGEW36dpXuna6gYgMz9xf+88/r+XbfVc ++A2BXU4KpP7hojtBGgfKm7eC+aSWlI7oMGoLQ9vO5xrD5pvNZhGGw0iV+t7e +028nXN09VaDtNYyYS4+LlE4DpDsWl+1PGEayo5WrZWnm4OklcHPXy2EUYmD6 +OUnHElQuTFz/uTSMaOO/mqRGdsOGpIGQ+p0jqNA8eHVmqxV8s/TUjI4dQTmk +7zN2yl449630/LPWEbRgJve2MWofzHFkTGY0RlEPz8rpvqN24LHRt8AjchQF +/HUiMVp9P2xUdPzU0TmKinyanqbGHIAWK5ckI9MxFD4rP7/R5yCEHTE80pI5 +huZs9ji/OuIAjkYsmBMfR8bu18yGDh6CosPjOmox4+idfLpvo4EjUI06LnfM +jSOFe+dq8zc4gdyPNfyBIROoslfH1l7EGQr99UQjJyaQcsfUsbBx7LrsSX+f +SWSQeo2d3XsYVNaJINGZSZTON6uX1OAC6t2qL2RMptBjs83dMVWuMNW5kPE8 +egqlbbsk8avADa6eFdb43TSFWj/lxhpcccfzTJ7iCE2jcrvbGoF/e0DfYZSV +5TiNpv0P8QQwPMHnU5WVQ9o0mtuj7T1hQYWscCsVre5plD/+cSHY6Agk19c7 +XlOZQS53cumewl7gfOsGY8RrBpU93HdkZZwXjFCPrKvKmUHGiu8WLy56wV1K +u3hD3wxS7z3W/Z/PUcion6ELKc6iQaHj+28PHAV3eWpLp9Msakuwp1s50WDN +P5VB6hdnUQorUyi0jQaGx5Wb3GpnUW390iJ9Lx18p2xvPhmeRWIeEGdQTQeD +qF9Rh8VIpLL2VetftXRonh0Zn8TWb7aT46+ngzPbZClOnEQOpu73u57RwZpz +S6hCgkQpf4W9Ofs/OvzSYzeJryWRQs8DsaYuOojcuF//UI5EGlTZNI95OrjP +hU4Xq5LI2GsiP8aQAdJOYa6XKCS6d3Mq2N6IASdoHCqvAYnWts/skt3OgIN2 +yaLh2BO75zvydzAgzILq521I4vuLZ0WzOa5/7FhnZkQi0XkJV8mDDFhba3O4 +35hEg/Fb12T6M0CvqCdpAEiUUBPhU3mPAaoP2h732JHIn3LDmJXPgB8Suj07 +7Ulke790zfYCBjzpsypMxxa8wblfUYjrHv/YeOwnUUzQgZHHjxigUZB46v0B +EkVoaxwvf86AT7eOJVYcIpHvjTd+D78w4MG/q2kmriTaK8oxDeplwHvb8ntX +sTfE8IhQ+hlAvXA+eRCbE7S1sHSIAZdkDjPj3Uh01D5zvGSMAf3BZ7jd7iRy +WRUcUPyDAcA+QmNSSWQVrBDIlmGCQvPKjm10Ej3PjLVJkmNCWmLe/gvYps0z +GiwFJngP6tK6sPU133y0UGaCvyB73ykGieQ/nLH4pMmE4IbveiVMEo2a9MgI +bmXCHT7zjaLeJLrKm1V37BAT3DOV74b74fVvFk6zc2KCxx3Fvjrs8+6sIIPD +TMip8y3n8ScR69GB9UtuTFBt/k8pBvsoseLadRoTrrVfGLsQQCKD1zTGi5NM +mDq1ghURSKIP1zSF1BOZUPntz2/JEBIVIRFv7jUmvBHxNN2NfX6cbCxMxv22 +VP11CpuytzFy+w0m/Hxu1/ARO4GHPmOXwYRPDop5t0JJtOdE1kcWmwlWN8Qa +BE+RSEnpgtGuIiaov51U2oZNvj6RvLKECb1XPBXo2He1kF1CGRPeB72ar8L+ +3dPzNLuaCf00FUs6i0SPbBXzW5qYUDMXqJRzmkSXf/CuSnnNhJ3bDBNeY9Py +R466NjNBMVwtawpbnK9acbAV97P1ydsRTiK/Gperi51M+KzLZ/EWW13nepjG +EBNcouvufzlDoh8fzrYPc5hwMShHZwm7LYapX8xlwqtvR23XRZAoss9wxHiM +CTa6dkFU7O60ds/9s0xw4hy16sJOWi2xO3wFAZ/z0ySrz5KodqbHPWQlAW8n +F4o+YH/rKQgKWEUA//njHSS26SPLLNoaAh72n6zWjcT7zYv100aCgKyQwJmb +2OK2uyV3SxHwLba1swx7xzZJbSSN85/LWr7FThRhOxvIE6D85kDVn+V69ddS +RVUCWFFDIh5RJCJy2U3S6gQcuidiHISdmHj6q5gmAcPUn2Nx2BxCSoRPm4DI +I7KTpct1KSvvMX0CckOG3Hn+JlH1H6koDgXPT3/bLIk9NNyb2mtIgMBnj5ca +2CZPwxs6thOQJMg8ZIU96FekXAcEaJQ/64jFFnU5s7XCnABu7pVLqdjGFta2 +pZYEhN7nNGVjJ8j3n861JuCd086v9diVfMWJmTYEcMYMK95gD0yeybtpS4Br +cKlsF/b2l9Lv4w8QcE1FP2gSm1baPxrnQMARrq7fD+z428W8/zgSkNqXN8EX +TaL+oL36YS4EqGYJxMthi1BlrALdCHCvGs1Xxd6+d8DT14OA+gcWdjrY8evO +XqZ6EfCiat9mE+xKQZu7LjQCTD8v+Jkt583JVDkwCIgbWmtgvZzXN9BqSxDw +KzEj2n45r7mEs8ebAOeSFBdHbFrF2d/gS0DNxu8Vrsv5d23W7vAj4N6K55nU +5fx42Y1bAwiY3zMvRl/OZw2abQ4kYFErVeAYtjCj1EU7iACngVsXfbG37Y88 +oR5CgGzH6mT/5XyTfbFKYQSUHvukEYh9RVMuXZZFwB81aRSE/Vh8qEwinAC9 +O4/6grH7fpa+FoogYCS5Sjh0Of9bZN+qSAI2Nqg/XbbRu30LS1EE0EVmfy77 +/7JNDyU= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.7708073067822108, + 1.2816066591047608`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.7708073067822124}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10390,21 +10683,21 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, - 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.7708073067822108, + 1.2816066591047608`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.7708073067822124}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10418,105 +10711,104 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk0VesbB3ARGYvckKkIhURm5XqeMmVMInOGc842JOqQUNFEk0TDTfcq -kgoZkiTykyKJUxTNqW2sZJ6rc/J7/bHXXp/1rP3d3/d913pVgiJdWfx8fHzf -yDP33v1izcqK1hcWf2Lzgtx0eWAxlGsUZFUI8cfcjm4lprOMz6tZVUOjRsh3 -F2IX5nMhcYMncG5DT7ojcWlsYp2gFQdk/JsO2BCfaJCrTSx4CS9yFIssiCtb -d1/h6r+GJk7HMiPi/g9N++MevIN4M6k3msTyvSt8piw/QX1nVYsiscPwfrMo -zhfo9v4ivpC4htsvFlvQCclvjpzmreHBm0Oy++5FdMNt1eItP4iHhKz6J/R7 -oSmf6fWWWChll5fBdB+cZxfnPiJWlrrcuPvBN5Bcfs6ggNhZYerGkOUA5D52 -VowhprJVZXSEh0BTzDTGizhRfXPSDs4wqHyhpdcTv5NtXxtdMAquyZnyP3V4 -wPQOCz2XMgYOqQ1HXhOPZPJdvRMxDlqnPuvdJhZW1ZEc1Z+E84ckPAKIzzPr -bCWXTIFoGrYaES+/6ZWoOz0F8v+7dFqE2HR18tDOBzNwdjOv/dZqHoQYf+H0 -W3JBOYKR8VGbBxOxe+aLavDgis1lw2vEBx+ImWsK/wGthpNLQokz0PRWMGcW -gkXarg9rkX7XG63YBfPQszae/5smDwoaztGHFPgx83ZJw1Xika/b96en8OOF -PMdWL+L9WpNltyMEMDpA7W79KtK3RGXFsL4grv3X8FHSSh58aB2o+XNNEH8b -nSlbS7x8rMJ74RIhZA+uHvhIehUaOp/VmRZCl6ICPW3i+sr4eeEPhDFIYrlo -uRoPJuvavnyzFMdUzUjFGBUeLHYUl9xXI46cYQMx3nIe6LVboYSZBCrP8548 -RBzWU569ds1C/Bp+oTppGQ928XP0/haXxKsGxxT3KPGgV7V4NGlKCkeHx13H -5cj+UE0iLQaL8USku5Q3Mf+tPhW53YuRW5j7okaW9DVY5lrwYzFGjInZHpbh -gbdl2p0XtDQOPV9pPCrNgxYGO0q2eQn6aZ2wi1zIg883U08FCMvg3/0MmXsS -PBj4UXAt31oGc14f6/slzgPR6O629bUyGDLZkZ4gxgOro26GAeWy+Etkq1KE -MA+qco0n87KWYkkH23loHg9ye3/FrItWwrxz8/ftGefCJvdjn6OKlLCj89Lr -02NcGKiXtinqU8KxDfYJuaNcMMxdvWS5lzIWq9o84AxzoT5oe5mgxTJcU9Ey -IDzAhbFheu+3I8txrZ1enF4PF6R3Wt0tc1LFxXoVhRZtXOjLFQ1xCVPFXH+l -PSqvuHD/U6vCYLIqshbN/sP/kgu+jn5HNGpV0bfoybeHL7iQqx3jekl/BSqM -sFs0msj/+2+OJMiq4eujOQI3arngFiymY9+pjnZyvpPhhVyAGHd9D546tord -9Fa9xQWtpCwT5lIN/GzUZvwmnwt81ww2JmzRQKxNdje7yYWizz4edx5p4H9y -caaDV7kgtK3wkHzOShR7Oj0ldpH0s3J60x+kiR49owdXHeSCguqZxFM9qzG9 -0v3wjBMXqk9OaP7k18ErHoPa2o6k/7hXO6Wig8VOFtq+9ly4Uq+muXG7Dk5s -rNeptOGCanDVq5m3OiiYcdTdH0i/wl51qnkNLin6t8lXjwtKCsrUci89FFrx -zzoVKS6svh4t/hv0MVTOUvvn899wla3mUs4xQquEvWELN/yG1hgwOXrdDN0U -oVnh/C9Q2f7a2S/8b6ytLdL9+/1PYM3eK1aKQzTs7i6sU/4Jsj/uL5AN2ojG -0lsuZdjPQLSB+aezWlb4y661VDphGoIGuY3S/dboXDHJlLwzBUUboxZktdii -9liN+ta2ScidCHtUeN4OXUoDLjvPn4SZDXLP6xMd0N/aquedxgR08AmMdgY6 -oUZep4ua6zhEKEamHVqxGa0/lSWuSx+D4tDG2gtJLlhT1jkl+HQU4seXTmuH -bsEDi/4TzJUahUl7m21P/V2xPVCJVeE+AmY+6Rt6t2xF3/yXD/Mdh+HV0sth -9QZuCD2RFUoyQyB/40h13ip3XHM6xa3u7QDcp7UcnSW2YUBd5qLihz9AuX0k -OGZwG+ZUJR8cr+4HgwvphddoD7RI8q/JKf8Ol+ePrzlb54k3P/zSqWv5Bvc2 -6H5IqvTC2FTPC65fv0KGyUkpboE3bhw6HseQ/gotH68nG6T4IPues8h1nz4o -d8pU23XQF+vTQncM5vTC6M6tfBFMP+xxVxROFeiFSRvNkCHL7Sj3ZGSBQFQP -5A2+n4ky9kf87Fd5q6sbPK9eZ/iJB+Cd6ANqhsHdUHbHwV/gWAAmqsVXCwx2 -gZnCq58nfgagVrhgSGBSF6yggz+8DA3EGQlRFy3NLugR27E5szsQIz6vFjBp -6YTWVGeGrXsQzr+abuJ9tBPOx2aJ7WkNwjvPnug+Nu+E6prZnww7BhpcmFr9 -dJaGtY8MTVc6MNAdgssm/tBwoy40pt+RgZL//ilXJU5vbBvb5cLAkZAQ3YNc -GqhXN38c8GBg4I7/RvEnDVJ9mzsussj8v7U334+RuUR2bfMhBlqw/GKC+2hY -5IvHDKoYyF9qWjn6goblfz1tUaxmoFW7S9UaYj2Ok5xQDQPfF8TZhT+nwdXc -J//dIwaeV38o9b2ZhvOKMc0HnjGQkx+86XsjDfIdtxY1vmPgXvkGnF9Hg9p2 -2QzfaQYeF7s/ca2CBrOAobwkQyZ2mZRbH8sh67k0EuVszMTx25Wjo1dp+Ktt -zELWlImx+2Jl/IiHrKfb89Yz8bv972eG2TS5b/jmcTYycXv6+Nvvl2lYOC3l -tXgLE5O4Fclhl2joOW0kkrWTiZlLznx/kkbDlqcm7cGRTOwfs7oExDV867L0 -djPx8Zq9tZVnaLgUZWH0OJqJWnrae0pSaXD2sg3s3cfEMW1OTHYKDZVqXpXa -J5nIaeh+lXGchtQH+0Pv32CiRk9+SddBGnbqXzSLzWOi2G+3CzuJHfNLRUwL -mLharH5gJpEG0Yt9+RVFTBS68GJEkjiJ7dJ/7y4TFcOrHG0O0LBfU21H+WMm -mgvpOjXE0RB2sTn8zmcmrlugZa4QRYPdwj5zNs1EWuCqw102DauS+CT0u5iY -EjLU7ETcxzYqKu1lYsjdEeXDu2kIdM4avD3ARAHhNomRSBo8BaMiSn4xUVlQ -XaQznAbbKPldhTIszHhnsUk2mIbHWcn2Z+VYGDNDd9yjaDDnjKnFyrNwm0Dg -9DZiPfXm95bKLHzj8qk8g0XD0rf7LD+qszB464C/KpOGH+s6ZESNWOh4ZCbQ -OZCGM/zZ/wveykJ+SfkBYV+yfl3xDCd3Fgr7Rw/f96HhqE8s28CDhZ+MOHtC -iWPvuqyc9WahiqaPGMeb9Kfmpf8TxCLnYet10YsGg6Yg5pPdLBQ15t9n40HD -23R1sRVpLOTWxRUJbaWhGCRCvqWzMKejZmOzK8kfnKgvOsfCqpIouzRifbv6 -BNOLLOxapnhLgTiVjzHmdIWFD7yma0y20GATmf0+tpCFus5h6kmbaVBSOm5s -UczCsA2tLS7EE02R5wRus1BmQcgPReIcDXBKLWOh2zXlmHvONPA6OmqvVZG+ -otbvh5xouOuokPeikYXVhXvboh1pOPWLX/B8Ewu9hX3O2BIH5fUHenFYeEF7 -XbU8seT8KoWeFhaOeX4JeexAQ/gDzzM/37CweCpSQpZ4hdY/MWq9LIw1WXro -tR0Nv94eaPvex0JjbTeHEuLWJJZeyTcWnrnrm3yCOKHTsN9sgKxXguMMxB8y -2vw2j7Mwbv2nVbc30XB2gZR1/DwKM9dnzd6wpaF6rMMnWoBCt6BZ86PEXzsK -2BGCFJ48XisURGx+1yo7SITCAX5vWEbcFxD7216KwsO5l6yybUh/R+vF1tIU -agWX9hwiXm+yWBOWUOhXLy3FJE6TKNxmsJTCHv7ihVpz86ovpQoqFGasGs+s -tib30fXCxiUrKCzll8/KIU5Li/uySJ3CbYqxOieI+yhpifmaFNbavhzymJtL -24YM6FHIrKwW4FrRUPVHOrFPn0KbPUHBfcS93+kLtCGFe5fperwkXlcbX9du -SiE/z+hjHnFPeLHy/5BCjfvPorcTL/TcZ1SxkUKpnTFmTsRmlpscS60oTGs0 -P2lOnLq0K+76JrL+cslWReL780vSsuwpvHJM4YkEcffwvpuXHCmMTlxnM2tJ -g2nDktenXSjM6ysZ6CYOKu36ccyVwokpgcVviU9nlvAfdqPQOjK4rom4i22n -F+NJYby/Z1MZscR2Gdtd3sTvu5flz+XZdfuF+VJ442H8vKy575cdOLU9gEIH -76chKcT3Re1zPIMoXMTeN3RkLm9SptKVSSG72oRv/1xeZ3eLI0X6nfh9OXou -j3O7zyaEQmOjhqc75/pVHOBhGIXDKy8eCJ7Lz7H/a304hSJvdj4MnMs/Latt -FEH2r9butO9cfmzPBt1dFKawtb56EIszSz012eR/yYuebyU22ZwQuSKanGf2 -jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc -+bu0SWw/hdXtDxNs5/K/JnQKJlB4L7Cy0IbY+JXDzGwihXdellNz/j8009f0 - +1:eJwV1Hk4VdsbB3BJknnIfMlcFOmQIrVeQ5FQCRlPOsMOIZk6SVy30EQylLoZ +CpGOKcmsgcqvhBtJShlPxzxtoclv+WM/+/k87/N833ftvdZSpZ1wYPLy8PBw +8bP8Ptmit76irWVXU0WjdEgBF+2ayNlKs2Qj8ZE8tOzeTKMUDctaFHjPvm7Z +Bxhv+YUNXiC/8cqEUOxSVlTDKstmVP6EUxaGffGl3NOogv+Ql3LXJhZ2VdvJ +jF+U9+iRYPziaeyR7tcRp2u6ECN2lUIEtsKQuvt3i8/IIdksIRJ732SEcXDz +V9RoYOYcjV3/a0SIVdCHLH35gs5jd0bLnnkcMIBSjS/3xWFP8FuOkJQhtJjz +PucyNv+VQFeDeQ56XjxQcxVbWSK96WQNntOzXCsF217x+70JizFkUZY9n45N +ZKnJ6ApMoG76U89s7CjN/THHmydRyP+yZO9jd8l2bAkpmEatTezYcmyGm69P +8pUZ1OLftaMWe+o2z52HAbPI58srywZsATVd8WnKHLIwnTn4DjuF0WAlLv0d +rd+m69yNrZLnGrV5/jsi5TYV9WNv3xQ74V+zgNaWhLqS2N5GX5tHLH4hhqRx +uuIDLiJZoXyCWr8RQzsFaWH/XSNkqi3wB633K9u6BTsNtj841ryERm/vUrLG +ZuQ2WQYVrADrjgsfT2MXvEzujVbkhY8n+BXisKe+USOuXeGFpgTrohTsCJ25 +spKAleBwQeFdCXZKsar6JGUV6LV/5x/H7m4bq/+TvQryp28O/cJWmalwE5Xm +h8e/V8iJsLmIbWifpDvPDxHyqiw97Maq8BV+NQJQtCZdMxR7rqH9K9dCGMLE +b22VLOQiSVth8TP1wvAXrUdBG1u/wxJEjEVg0uw6DbB9B8uztuiJAk3URz4Q +O5C3WX+nsDjkZKRqdGAPqRVNx3yXgOM8aqVFRfj7EK/XtBpIwueo13VvsHkf +cFTlTkqCh/nIpmFsFYN1DgWjkvBQMJGiWcxFbhaJD1t6pWBBhvXpDnYrPShY +9o00hD3rzC4s4aIveQmXvQRkwDuet6sNe2y0IPv+bhlgl+QFkNiCIQPtO57K +gPBVaoNpKRdZnnc09CqXhcHqfwTfYVfnGM3lZ8rD65CXYmJlXJQz9CPMJEQJ +OuPc5t+Vc5G1U9yX4EIloIz3HVzCHmuU2lPIUYJ7tda8mx5zkWHOJmkVV2XY +bFDOiMVupFHLVu1aB4O1IvqogotmJntPcc+pgNvs196nlVwk5W/5qMxODcqU +dNh8tVzEyRH0PuCrBqetx5/vwK783KY4HqsGcmtTNwdje9h6ntN6qgbB5smC +A9g5G8McblLUARbsX72sw/1H8qYiZTVA1XrMPeMJFzkeE9K16dOEXf8Tmo1v +4CIU5kQ5/FsT+lzczrRg68RkbmPIa4GK7E5nsUYu4sk2MI88qAUxX56sTMIu +/OJ++OEzLaB2Ptn57wt8Pp3Z0Qp318OzF+26da/wfJZ2nSM0bTgTkbO0q5mL +sg/d+DQfqQ2Ucx+6L2In0Pp6+f7VBh1OjsB7bMbfoaPK7dpwKV7Mw+8tF0nU +pvMcstAB3Z/a/RkteP8YTOjUqG+EdS5Zx6X+4yJFtatRlwc3QZ79nxCTTi6q +vURqL/Lqgory4tfr2B6zrh2Eqi54ndFjz2JnNGpom1N14dzoXu+iD1ykdqz6 +3cIHXdiwaHNiw0e8XvaQJvFGD4xiSyr1PnORkqIyoeKqD+OxX0zO93PRptwQ +4Z+IAptLkdChKS6iMc7N6dpToCL3+uIT7DT1pC9eHhTYovDAVHeai1beLS55 +yaJApI3IM4EZfN4yRhyTSikgblj7vGEW36dpXuna6gYgMz9xf+88/r+XbfVc ++A2BXU4KpP7hojtBGgfKm7eC+aSWlI7oMGoLQ9vO5xrD5pvNZhGGw0iV+t7e +028nXN09VaDtNYyYS4+LlE4DpDsWl+1PGEayo5WrZWnm4OklcHPXy2EUYmD6 +OUnHElQuTFz/uTSMaOO/mqRGdsOGpIGQ+p0jqNA8eHVmqxV8s/TUjI4dQTmk +7zN2yl449630/LPWEbRgJve2MWofzHFkTGY0RlEPz8rpvqN24LHRt8AjchQF +/HUiMVp9P2xUdPzU0TmKinyanqbGHIAWK5ckI9MxFD4rP7/R5yCEHTE80pI5 +huZs9ji/OuIAjkYsmBMfR8bu18yGDh6CosPjOmox4+idfLpvo4EjUI06LnfM +jSOFe+dq8zc4gdyPNfyBIROoslfH1l7EGQr99UQjJyaQcsfUsbBx7LrsSX+f +SWSQeo2d3XsYVNaJINGZSZTON6uX1OAC6t2qL2RMptBjs83dMVWuMNW5kPE8 +egqlbbsk8avADa6eFdb43TSFWj/lxhpcccfzTJ7iCE2jcrvbGoF/e0DfYZSV +5TiNpv0P8QQwPMHnU5WVQ9o0mtuj7T1hQYWscCsVre5plD/+cSHY6Agk19c7 +XlOZQS53cumewl7gfOsGY8RrBpU93HdkZZwXjFCPrKvKmUHGiu8WLy56wV1K +u3hD3wxS7z3W/Z/PUcion6ELKc6iQaHj+28PHAV3eWpLp9Msakuwp1s50WDN +P5VB6hdnUQorUyi0jQaGx5Wb3GpnUW390iJ9Lx18p2xvPhmeRWIeEGdQTQeD +qF9Rh8VIpLL2VetftXRonh0Zn8TWb7aT46+ngzPbZClOnEQOpu73u57RwZpz +S6hCgkQpf4W9Ofs/OvzSYzeJryWRQs8DsaYuOojcuF//UI5EGlTZNI95OrjP +hU4Xq5LI2GsiP8aQAdJOYa6XKCS6d3Mq2N6IASdoHCqvAYnWts/skt3OgIN2 +yaLh2BO75zvydzAgzILq521I4vuLZ0WzOa5/7FhnZkQi0XkJV8mDDFhba3O4 +35hEg/Fb12T6M0CvqCdpAEiUUBPhU3mPAaoP2h732JHIn3LDmJXPgB8Suj07 +7Ulke790zfYCBjzpsypMxxa8wblfUYjrHv/YeOwnUUzQgZHHjxigUZB46v0B +EkVoaxwvf86AT7eOJVYcIpHvjTd+D78w4MG/q2kmriTaK8oxDeplwHvb8ntX +sTfE8IhQ+hlAvXA+eRCbE7S1sHSIAZdkDjPj3Uh01D5zvGSMAf3BZ7jd7iRy +WRUcUPyDAcA+QmNSSWQVrBDIlmGCQvPKjm10Ej3PjLVJkmNCWmLe/gvYps0z +GiwFJngP6tK6sPU133y0UGaCvyB73ykGieQ/nLH4pMmE4IbveiVMEo2a9MgI +bmXCHT7zjaLeJLrKm1V37BAT3DOV74b74fVvFk6zc2KCxx3Fvjrs8+6sIIPD +TMip8y3n8ScR69GB9UtuTFBt/k8pBvsoseLadRoTrrVfGLsQQCKD1zTGi5NM +mDq1ghURSKIP1zSF1BOZUPntz2/JEBIVIRFv7jUmvBHxNN2NfX6cbCxMxv22 +VP11CpuytzFy+w0m/Hxu1/ARO4GHPmOXwYRPDop5t0JJtOdE1kcWmwlWN8Qa +BE+RSEnpgtGuIiaov51U2oZNvj6RvLKECb1XPBXo2He1kF1CGRPeB72ar8L+ +3dPzNLuaCf00FUs6i0SPbBXzW5qYUDMXqJRzmkSXf/CuSnnNhJ3bDBNeY9Py +R466NjNBMVwtawpbnK9acbAV97P1ydsRTiK/Gperi51M+KzLZ/EWW13nepjG +EBNcouvufzlDoh8fzrYPc5hwMShHZwm7LYapX8xlwqtvR23XRZAoss9wxHiM +CTa6dkFU7O60ds/9s0xw4hy16sJOWi2xO3wFAZ/z0ySrz5KodqbHPWQlAW8n +F4o+YH/rKQgKWEUA//njHSS26SPLLNoaAh72n6zWjcT7zYv100aCgKyQwJmb +2OK2uyV3SxHwLba1swx7xzZJbSSN85/LWr7FThRhOxvIE6D85kDVn+V69ddS +RVUCWFFDIh5RJCJy2U3S6gQcuidiHISdmHj6q5gmAcPUn2Nx2BxCSoRPm4DI +I7KTpct1KSvvMX0CckOG3Hn+JlH1H6koDgXPT3/bLIk9NNyb2mtIgMBnj5ca +2CZPwxs6thOQJMg8ZIU96FekXAcEaJQ/64jFFnU5s7XCnABu7pVLqdjGFta2 +pZYEhN7nNGVjJ8j3n861JuCd086v9diVfMWJmTYEcMYMK95gD0yeybtpS4Br +cKlsF/b2l9Lv4w8QcE1FP2gSm1baPxrnQMARrq7fD+z428W8/zgSkNqXN8EX +TaL+oL36YS4EqGYJxMthi1BlrALdCHCvGs1Xxd6+d8DT14OA+gcWdjrY8evO +XqZ6EfCiat9mE+xKQZu7LjQCTD8v+Jkt583JVDkwCIgbWmtgvZzXN9BqSxDw +KzEj2n45r7mEs8ebAOeSFBdHbFrF2d/gS0DNxu8Vrsv5d23W7vAj4N6K55nU +5fx42Y1bAwiY3zMvRl/OZw2abQ4kYFErVeAYtjCj1EU7iACngVsXfbG37Y88 +oR5CgGzH6mT/5XyTfbFKYQSUHvukEYh9RVMuXZZFwB81aRSE/Vh8qEwinAC9 +O4/6grH7fpa+FoogYCS5Sjh0Of9bZN+qSAI2Nqg/XbbRu30LS1EE0EVmfy77 +/7JNDyU= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + "PlotRange" -> {{0, 180}, {0.7708073067822108, 1.2816066591047608`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5082122808512888}, + "AxesOrigin" -> {0, 0.7708073067822124}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10526,7 +10818,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5082122808512888}, + AxesOrigin->{0, 0.7708073067822124}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10554,7 +10847,8 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5082122808512877, 1.8240550855476267`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7708073067822108, 1.2816066591047608`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10562,9 +10856,9 @@ jIXLXP46h2SlGApd2b3mTsQp6nKXZWMpzL7/usGe+J5kb5lUPIXfzJ992kTc Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913242457281837`*^9}, + CellChangeTimes->{3.9913242457281837`*^9, 3.994387900784828*^9}, CellLabel-> - "Out[111]=",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] + "Out[127]=",ExpressionUUID->"02e1ac46-404a-4ddc-8675-6efa6320e7b9"] }, Open ]], Cell[CellGroupData[{ @@ -10579,7 +10873,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -10601,8 +10897,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -10627,158 +10922,158 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9917997871187477`*^9, - 3.991799792469698*^9}},ExpressionUUID->"8faa67fd-f295-ea48-b116-\ -d12d9d52c36b"], + CellChangeTimes->{{3.9917997871187477`*^9, 3.991799792469698*^9}}, + CellLabel-> + "In[128]:=",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.955409411483839`*^-270\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 112, - 45, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246104725*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.932412539665217`*^-269\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 41, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994387900998365*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], +In[128]:=",ExpressionUUID->"85542901-5e74-49a4-9601-e4c46857d67b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.877419838456823`*^-281\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.9799903199485118`*^-280\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 128, + 42, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994387901006248*^9}, + CellLabel-> + "During evaluation of \ +In[128]:=",ExpressionUUID->"b998683e-d2b4-4613-b415-c84d2858b78b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.38891693557712`*^-292\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 112, 46, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461217346`*^9}, + 128, 43, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994387901012619*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.990320554242227`*^-292\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 112, 47, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913242461427383`*^9}, - CellLabel-> - "During evaluation of \ -In[112]:=",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], +In[128]:=",ExpressionUUID->"03682d3d-bc57-43fc-984d-e1e35d07e559"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 112, 48, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991324246159645*^9}, +during this calculation.\"", 2, 128, 44, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991324246104725*^9, 3.994387901018999*^9}, CellLabel-> "During evaluation of \ -In[112]:=",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], +In[128]:=",ExpressionUUID->"0ee55a6c-8b6b-4d57-a01a-8b5589f0bc59"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VVscB3BRGkRK5unecy8qs2Qo1++XZl4qaTYnUjIliQZDRIaUpEGm +pIR7j8iYIbOSoWR8hjQjQ0Wp1Nvvj7PO+qxz1j57//be370O08Hd4hA/Hx/f +X3L9f5/qa6hmR6QZB6gKOMeWGBu3JUqdWtsZBB9yzIVntOQAxZsdpDqvQMwr +3c7HWmrgs/1Bh0BnKgw0jLFjtYxg8ajklemOhxDFX/xxj9Y/0P/Y3P1bRyVU +qGpWJWtawUb2UO9ExwuQehtp1K/mCtMd+nHjHYOQ/+8D+MQ8DVXr7qW1pn6F +aNcgM4ZCFMj1F713UJuBS+tTLjc6xcFSV9sHc9cJ4AemYRZ/zy24or2xxHzX +PPyUpTLEMU6BrutaFROiwmiqa7QgipEGEWnnmvmlF2Pi0OfDHb/TQfLqm/DY +22IYxU3WtDiXARcstxi/mBJH9Sz+ZdWRmSCT1yTDP0sC1eOnqubGZQJXzPK7 +tpAEijzx69hwOxPaX9jQlxUlMF1qj31Odiawd3hTOzZL4OYHpe82NGVC5dYk +wZYbEljDMxg8KJIFMxsnm54bSaJyAuPKsYtZcNwwxbYhSAqnM5ZKRXlmg2my +yDezSCm8W9Ke9/VkNlBzT4c1xUlhStbLXbvOZkNL2+6cl/fJ+2c7UudHZIOG +x0KBviYppNtqrPXSsuFj+sn0LzLS+LK3Ylbyq2ywWmr+WTZXGvu9Pibm6HJh +pX9JYOJjaXz23EPUdzUXFgwuk2DWSmPo6RR/Q+RCEU8AlLukcaBxjnG2GRck +zIpitP5KY2yhq+teBy60BLJ1N5jJYEpvNZZGc2H92E8/tzcy+GxRWXz5Gy6c +2nx1xZMRGbT3OSjw7CMXuCnq3WJTMjjqMBTX+pkLUpZ2hkXzZPHVk72aLd+5 +MFJY811AQxZ12xk6sUI8iA2K8b7hK4trKovctHR4MCiu7FYtLIedcYXldf48 +kHQvl5eUlEPB6qkZ/QAe/FO/97kLQw6twrcfvHOeB/l+EWqLVsph8wr6ztEo +HlzsHx/at1cOWWNtM08SeaCTUeI8liqHKfW7tEMreBBotMNexkAe9xbmtujx +0bDZJvGLvok8Kg6YyZnx0yASMBy86x95DM71j7GaTUNCVUh6jJ08bszlfPWZ +R0OhafGwYLg8LpYtTA8XpWF8L8vna5c8nmXcGFZm0GBzYvJio78C+u/4scmE +Q4NSvIncUIgCJp0RnvXbmCbjv5Q9N0YBi7IVPj1EGvx+L28xSVNAyd96m6TW +0xAXbCNe1KiA2xx9TZ6Y0tB4uS7prrwiRu++5hm5h4bV3Bt5Z8sV8UPt9dL5 +7jSs72iaGa1XRO0p2tnCgwZzvtmbbF8o4rKO7enXPWk4aOHWBe8U8T5386C8 +Nw0b/ZnnAuYw0Npb0VroFA0eilN31qoysEbyVLJXEA2TuTH105oMPPxQPP9q +MOnfZtXPOboMNLL665h3noYQTzs9ypiBoVV/Lo2E0nCz6mk9/w4GqjF4LIyg +odo56XOVDwPLfmdHeMfSsOW34ZLT/gz03Glh7XGVhqaYNj3dAAaqC8U/d4mj +oatofkBaOAN/BbhE7IqnYVTIe0lIAgNTB1RCRW/RIEVv1t9YycDWAZ+Gpak0 +3F7/5sCfWgamfHehh4iprjMB+c8YuHFWz5qyOzSo8+c2KL9iYH53xVqbuzSY +WMpbzf3IwDiPs0uD7tPg+mMioF6YiT8wUmMfl9TT00ni/RIm2u1xRSkeDfOG +ujMFpJi42qT0ahvx3Z6qdmOKibn1rYIbcmjoK4tTe6THxDHdJsU5eTRk6S+o +fLGGiRcTDCy5xH702T3jyMTLzk7Nlo9okEh1DlI1Y6JjsknCjXwatoUYdqbY +MtHEPSWJv4gGhT/Zx8odmWg/XCN9jXjEhxLodWGiWaxav3IxDWGHhTSkvJlo +W7HQHEtoqDDrDY4OY+Jgt2WjRSkN0dU7pLOimJjAqaRbiK04tdyGK0xcNkfu +nVkZDdMavK7Zt5kYd30KVpfToLMkUNM/h4nDjdLNUxU08EVMVl/PZ2Lw3YJ1 +tk/I/Agc2Z9fQvpfISFcQ3x00iJkooaJPfcvJYdVknq51cksesbEE5Hvj74n +nvdhDa3WQsbX5xu9toqGtE52j3M3aU+2tWeM2GvHDY+Qfiamm3bNXVdNAz4V +Frzzlonq7ilRscS9JVNafaNMrNCcua9WQ+qVVB9qKUBhgVOHFtTS8FaSI+c1 +j0KfG81GZ4gfxuTkXBKmMPIk714h8bagm/8+lSTPF9UmqNSRev4S8fooR2HA +RvNlB4hHjgfPFaQoPEbZi0cShx1y1VmrRmH2rRaJ98S7+wbqbLQpPM0NVltU +TwN7zy7r03oUmm53S19F/KW54cuNNRTO3cgJ2Udcsdk4rAApvDRxu8GPOPrJ +Q/lXGyjk7DD2vkFstVol94sphb5/G0MeEa/IvbVZdDuF/+hM/2kinlYV7VPf +RSFfidfAO+Kp2zKBK/dT2EUNtE4Tf1ukxDa0pfCQ7fR6oQYaJgI164wdKWzx +d1otQzz61fDIehcK2xe3PFQmHj60XtjUjcLDW/q5WsQfO8zpbccpXN/J0TQg +frdl385dvhTGzLqmyyEeLDk4tf8MhR5xV8qBuF/d7YZdEIWZ430t//vfJF8j +pwsUrvut7PL/+12Lg/uPRlI4W10y/P/22oOjgjwvU6gTbKWtTfxyMl7p5DUK +xS6mOagQtzin1p++Reqz57a8LPHzrqyjQckUvoiYdFhI/NSsQCTsLoUvt1ut +/EXGW1f6JCfqAYX8+wMvfSCu1my0jOVR2PFmqW8r8ZOU9u/X88j85dZ9LiQu +E3t9M7GIQjkJs4nbxCUhw5y0MgolXm8PDiAu/D45kFFF4Q+PiDQ74oc9C1Qe +Pacw59uReGli3lbxp8UvKNy37uSRL2T+s8oVj1V0UPhI6EJzPXH6Hd3cZ68p +zDgTYuFGfEccdre+p9A1u9+TQ5x8Yct0+zCFng5LlRcQ3zxqA4OTFG4TH9qW +QNZjfO/hwQ8/KSwv+FlrT3x12/GQz38pbFOpecUmjl4Z9uzHfBa+t3QtvUPW +e8TdK25/RFg4WPc43pY4TPL24tlLWZhznLtQmjjoV86eRQosjDvi0HCe7Jdz +xx7/XMpi4Yx7whJ94tP9tbdllrFwPuU8/Z7sN5+qnjdKOiw8f/JOKhAfjZjj +YbSRhaYjIb5tZD8fnlkkZmLGwlkDi6qOEzu5y+Rv2s7CXilmjiix3U7N3xb7 +WZjwptdvHckHS9l9YS5uLDzi/6srkuSJUWZW8rVrLATGCi8eyaceRmbShlss +3J2455gOsd+1jMRvSSzM0z1yKJfkWUFgeoJFBgvbvRvMeYUkf/YmXxd5zEKm +4DapSyQPl8+5GhP6moVOdeESYyRf6/2uXFr1noWJ03zqFsRO4zHRb4dY2PqY +Z5pLk3zpiYo0+cbCfAPLRHeSz4yHF8L+CLIxTVC9qCWL5Ietf4CPGhuTo5/t +WHWPhkdtp84pabPRW01D9VQ6GY+p79m2VWz0DHeTKCHnw5VVJ07rABvF5nOU +DNNoEF7o7ju6g42lPxbrK6TQMLvIwcPpJBu1ViRXR94k+3GJqd3uSjY6vR+2 +4YukodOVajlSx8Y3PnaZXy6SfKj9Ceca2RjvU9o4GE5DjF+m4v12Nu598PLy +4ws0aA0u7J8eYmPg2LTxbnK+uuU0W98WU8Lxa/e/UH40DG3bdeCtoxLm3f3C +WeZEw4sM9Wc/XJTwjxh7ot2RhmIBwTXC7kqo0jcrPvggDeEF+TJ6p5RQ1Oty +WbsdDcsUpbovRCmhUmxxvOMBGpxHu/eq5ithRrrgFsXtJE8j7XZ7zVXGmmMp +xyQNyPeH1CithcqofrxCLkWPhu+bpj9/FlXGiSYt+eWraFggcCXERUYZFeYY +ievqkP6fqsqzU1fGcN75H6vUaDhzSFls205lPDJRgUOKpP7GI82qScootDs8 +TEaQnP9jJ7e801NBpY4DwjG3eCCnrRA6z0gFB76mWIbH82DUq7pSda0K7swO +Z5+L5cHVKVEjLzMVVDzW4mQXwYO+mQyNv7Yq+GKWec60Hw+8Fv4rJh2ugvr6 +SRC+jwc3l2PfPz0q+IslYK26lAcjB+cdzzu3DB+kbzKaPMcl/xuS/Bcql6O5 +Ztnn9jXZsOS5cjQ9tgLjivMaBEcyQS6Mt11PTw2VGW0HHA4+gOuqhqJizuq4 +fTS8Uuj1fXgqs3bV18saWLC+r0ts/z1YLVcZo9muifPluOJND+6CiECqt32Q +Fho02/xaJ5kGCoGKRvuUtdFBTIffwSkV5itZ5VvUaWOpfwoM1yaDBkead9Ja +Bz1mwgIdkhLBq29JlSnfSjR480lZJfYWjH2N3LXl+kqctDKv3tt/HTZp1t7c +oq6LZhUyEuM216Ds65pf35t0sZlvC5/Uq1hwU9Ppbj20CgVShi/fS70MnFHH +tn3z9XCQf0ZX9E00bGBLbRVO1cOItPMUpRwBywIu+lbq6+PmW07Lc5ovwIpD +huVK3fp4D/xnEiLOw6Gyw+fzPA2Q7+Y7g6qWQChPbnOcEDfEp2ExYxE2Z+Hb +/b/fNQsM8UDLgH/Mi1NwUClz/s2tq1H2k/Wnu5I+MLEiVu/h+GrcbG5ev/CS +FxSm/Xo9GbaG5MuVjymO7rB/PQvXKBjhaO9bG92QIyB77EKRRoURunwRmy6Y +PgTiC1xztu7hYPj5bzkP9jtA2rozfuP7OGinlfyjzMwBdM5Er4u14qDIZEF5 +r5EDmI/TrzrtOTjytLhgtaIDhLZPTh905aA8v32m51t7+JF6zsQvkIMn7whd +bPKwh+41sS/TMzl4bkNci+xlOzh8Ii1hC5eDT1Br1DvYDqa4jw6N0By8d3Rv +W8cJO1hCdX7XzufgwMP2N8X77cBsnrxcaQUHU6bvek2y7eBxW7rjy1ccTHWp +6nXzsQVTkUJ1n04OXhUyHbW0soXOTQ1TUj0c7Dz9sXeriS18Kx4Osxng4LD0 +SQ1fEVtQT9HK/jTEwZlBfofsezbwuHutT+RnDvpV7jRYHm0Dpkt3guY4ByOG +Da4VeNuA04UTrd6THFRwNi0VMrGBbxWhNyV/cNDrY41H6zIbCPoZf7D4JwdD +l3gHZCyyAVHdDDXrGfI8LPR17JQ1JB4rnvz7l4OsrzrhMb3W8B+xTmBC "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10792,117 +11087,113 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwV13k0VVscB3BRGkRK5unecy8qs2Qo1++XZl4qaTYnUjIliQZDRIaUpEGm +pIR7j8iYIbOSoWR8hjQjQ0Wp1Nvvj7PO+qxz1j57//be370O08Hd4hA/Hx/f +X3L9f5/qa6hmR6QZB6gKOMeWGBu3JUqdWtsZBB9yzIVntOQAxZsdpDqvQMwr +3c7HWmrgs/1Bh0BnKgw0jLFjtYxg8ajklemOhxDFX/xxj9Y/0P/Y3P1bRyVU +qGpWJWtawUb2UO9ExwuQehtp1K/mCtMd+nHjHYOQ/+8D+MQ8DVXr7qW1pn6F +aNcgM4ZCFMj1F713UJuBS+tTLjc6xcFSV9sHc9cJ4AemYRZ/zy24or2xxHzX +PPyUpTLEMU6BrutaFROiwmiqa7QgipEGEWnnmvmlF2Pi0OfDHb/TQfLqm/DY +22IYxU3WtDiXARcstxi/mBJH9Sz+ZdWRmSCT1yTDP0sC1eOnqubGZQJXzPK7 +tpAEijzx69hwOxPaX9jQlxUlMF1qj31Odiawd3hTOzZL4OYHpe82NGVC5dYk +wZYbEljDMxg8KJIFMxsnm54bSaJyAuPKsYtZcNwwxbYhSAqnM5ZKRXlmg2my +yDezSCm8W9Ke9/VkNlBzT4c1xUlhStbLXbvOZkNL2+6cl/fJ+2c7UudHZIOG +x0KBviYppNtqrPXSsuFj+sn0LzLS+LK3Ylbyq2ywWmr+WTZXGvu9Pibm6HJh +pX9JYOJjaXz23EPUdzUXFgwuk2DWSmPo6RR/Q+RCEU8AlLukcaBxjnG2GRck +zIpitP5KY2yhq+teBy60BLJ1N5jJYEpvNZZGc2H92E8/tzcy+GxRWXz5Gy6c +2nx1xZMRGbT3OSjw7CMXuCnq3WJTMjjqMBTX+pkLUpZ2hkXzZPHVk72aLd+5 +MFJY811AQxZ12xk6sUI8iA2K8b7hK4trKovctHR4MCiu7FYtLIedcYXldf48 +kHQvl5eUlEPB6qkZ/QAe/FO/97kLQw6twrcfvHOeB/l+EWqLVsph8wr6ztEo +HlzsHx/at1cOWWNtM08SeaCTUeI8liqHKfW7tEMreBBotMNexkAe9xbmtujx +0bDZJvGLvok8Kg6YyZnx0yASMBy86x95DM71j7GaTUNCVUh6jJ08bszlfPWZ +R0OhafGwYLg8LpYtTA8XpWF8L8vna5c8nmXcGFZm0GBzYvJio78C+u/4scmE +Q4NSvIncUIgCJp0RnvXbmCbjv5Q9N0YBi7IVPj1EGvx+L28xSVNAyd96m6TW +0xAXbCNe1KiA2xx9TZ6Y0tB4uS7prrwiRu++5hm5h4bV3Bt5Z8sV8UPt9dL5 +7jSs72iaGa1XRO0p2tnCgwZzvtmbbF8o4rKO7enXPWk4aOHWBe8U8T5386C8 +Nw0b/ZnnAuYw0Npb0VroFA0eilN31qoysEbyVLJXEA2TuTH105oMPPxQPP9q +MOnfZtXPOboMNLL665h3noYQTzs9ypiBoVV/Lo2E0nCz6mk9/w4GqjF4LIyg +odo56XOVDwPLfmdHeMfSsOW34ZLT/gz03Glh7XGVhqaYNj3dAAaqC8U/d4mj +oatofkBaOAN/BbhE7IqnYVTIe0lIAgNTB1RCRW/RIEVv1t9YycDWAZ+Gpak0 +3F7/5sCfWgamfHehh4iprjMB+c8YuHFWz5qyOzSo8+c2KL9iYH53xVqbuzSY +WMpbzf3IwDiPs0uD7tPg+mMioF6YiT8wUmMfl9TT00ni/RIm2u1xRSkeDfOG +ujMFpJi42qT0ahvx3Z6qdmOKibn1rYIbcmjoK4tTe6THxDHdJsU5eTRk6S+o +fLGGiRcTDCy5xH702T3jyMTLzk7Nlo9okEh1DlI1Y6JjsknCjXwatoUYdqbY +MtHEPSWJv4gGhT/Zx8odmWg/XCN9jXjEhxLodWGiWaxav3IxDWGHhTSkvJlo +W7HQHEtoqDDrDY4OY+Jgt2WjRSkN0dU7pLOimJjAqaRbiK04tdyGK0xcNkfu +nVkZDdMavK7Zt5kYd30KVpfToLMkUNM/h4nDjdLNUxU08EVMVl/PZ2Lw3YJ1 +tk/I/Agc2Z9fQvpfISFcQ3x00iJkooaJPfcvJYdVknq51cksesbEE5Hvj74n +nvdhDa3WQsbX5xu9toqGtE52j3M3aU+2tWeM2GvHDY+Qfiamm3bNXVdNAz4V +Frzzlonq7ilRscS9JVNafaNMrNCcua9WQ+qVVB9qKUBhgVOHFtTS8FaSI+c1 +j0KfG81GZ4gfxuTkXBKmMPIk714h8bagm/8+lSTPF9UmqNSRev4S8fooR2HA +RvNlB4hHjgfPFaQoPEbZi0cShx1y1VmrRmH2rRaJ98S7+wbqbLQpPM0NVltU +TwN7zy7r03oUmm53S19F/KW54cuNNRTO3cgJ2Udcsdk4rAApvDRxu8GPOPrJ +Q/lXGyjk7DD2vkFstVol94sphb5/G0MeEa/IvbVZdDuF/+hM/2kinlYV7VPf +RSFfidfAO+Kp2zKBK/dT2EUNtE4Tf1ukxDa0pfCQ7fR6oQYaJgI164wdKWzx +d1otQzz61fDIehcK2xe3PFQmHj60XtjUjcLDW/q5WsQfO8zpbccpXN/J0TQg +frdl385dvhTGzLqmyyEeLDk4tf8MhR5xV8qBuF/d7YZdEIWZ430t//vfJF8j +pwsUrvut7PL/+12Lg/uPRlI4W10y/P/22oOjgjwvU6gTbKWtTfxyMl7p5DUK +xS6mOagQtzin1p++Reqz57a8LPHzrqyjQckUvoiYdFhI/NSsQCTsLoUvt1ut +/EXGW1f6JCfqAYX8+wMvfSCu1my0jOVR2PFmqW8r8ZOU9u/X88j85dZ9LiQu +E3t9M7GIQjkJs4nbxCUhw5y0MgolXm8PDiAu/D45kFFF4Q+PiDQ74oc9C1Qe +Pacw59uReGli3lbxp8UvKNy37uSRL2T+s8oVj1V0UPhI6EJzPXH6Hd3cZ68p +zDgTYuFGfEccdre+p9A1u9+TQ5x8Yct0+zCFng5LlRcQ3zxqA4OTFG4TH9qW +QNZjfO/hwQ8/KSwv+FlrT3x12/GQz38pbFOpecUmjl4Z9uzHfBa+t3QtvUPW +e8TdK25/RFg4WPc43pY4TPL24tlLWZhznLtQmjjoV86eRQosjDvi0HCe7Jdz +xx7/XMpi4Yx7whJ94tP9tbdllrFwPuU8/Z7sN5+qnjdKOiw8f/JOKhAfjZjj +YbSRhaYjIb5tZD8fnlkkZmLGwlkDi6qOEzu5y+Rv2s7CXilmjiix3U7N3xb7 +WZjwptdvHckHS9l9YS5uLDzi/6srkuSJUWZW8rVrLATGCi8eyaceRmbShlss +3J2455gOsd+1jMRvSSzM0z1yKJfkWUFgeoJFBgvbvRvMeYUkf/YmXxd5zEKm +4DapSyQPl8+5GhP6moVOdeESYyRf6/2uXFr1noWJ03zqFsRO4zHRb4dY2PqY +Z5pLk3zpiYo0+cbCfAPLRHeSz4yHF8L+CLIxTVC9qCWL5Ietf4CPGhuTo5/t +WHWPhkdtp84pabPRW01D9VQ6GY+p79m2VWz0DHeTKCHnw5VVJ07rABvF5nOU +DNNoEF7o7ju6g42lPxbrK6TQMLvIwcPpJBu1ViRXR94k+3GJqd3uSjY6vR+2 +4YukodOVajlSx8Y3PnaZXy6SfKj9Ceca2RjvU9o4GE5DjF+m4v12Nu598PLy +4ws0aA0u7J8eYmPg2LTxbnK+uuU0W98WU8Lxa/e/UH40DG3bdeCtoxLm3f3C +WeZEw4sM9Wc/XJTwjxh7ot2RhmIBwTXC7kqo0jcrPvggDeEF+TJ6p5RQ1Oty +WbsdDcsUpbovRCmhUmxxvOMBGpxHu/eq5ithRrrgFsXtJE8j7XZ7zVXGmmMp +xyQNyPeH1CithcqofrxCLkWPhu+bpj9/FlXGiSYt+eWraFggcCXERUYZFeYY +ievqkP6fqsqzU1fGcN75H6vUaDhzSFls205lPDJRgUOKpP7GI82qScootDs8 +TEaQnP9jJ7e801NBpY4DwjG3eCCnrRA6z0gFB76mWIbH82DUq7pSda0K7swO +Z5+L5cHVKVEjLzMVVDzW4mQXwYO+mQyNv7Yq+GKWec60Hw+8Fv4rJh2ugvr6 +SRC+jwc3l2PfPz0q+IslYK26lAcjB+cdzzu3DB+kbzKaPMcl/xuS/Bcql6O5 +Ztnn9jXZsOS5cjQ9tgLjivMaBEcyQS6Mt11PTw2VGW0HHA4+gOuqhqJizuq4 +fTS8Uuj1fXgqs3bV18saWLC+r0ts/z1YLVcZo9muifPluOJND+6CiECqt32Q +Fho02/xaJ5kGCoGKRvuUtdFBTIffwSkV5itZ5VvUaWOpfwoM1yaDBkead9Ja +Bz1mwgIdkhLBq29JlSnfSjR480lZJfYWjH2N3LXl+kqctDKv3tt/HTZp1t7c +oq6LZhUyEuM216Ds65pf35t0sZlvC5/Uq1hwU9Ppbj20CgVShi/fS70MnFHH +tn3z9XCQf0ZX9E00bGBLbRVO1cOItPMUpRwBywIu+lbq6+PmW07Lc5ovwIpD +huVK3fp4D/xnEiLOw6Gyw+fzPA2Q7+Y7g6qWQChPbnOcEDfEp2ExYxE2Z+Hb +/b/fNQsM8UDLgH/Mi1NwUClz/s2tq1H2k/Wnu5I+MLEiVu/h+GrcbG5ev/CS +FxSm/Xo9GbaG5MuVjymO7rB/PQvXKBjhaO9bG92QIyB77EKRRoURunwRmy6Y +PgTiC1xztu7hYPj5bzkP9jtA2rozfuP7OGinlfyjzMwBdM5Er4u14qDIZEF5 +r5EDmI/TrzrtOTjytLhgtaIDhLZPTh905aA8v32m51t7+JF6zsQvkIMn7whd +bPKwh+41sS/TMzl4bkNci+xlOzh8Ii1hC5eDT1Br1DvYDqa4jw6N0By8d3Rv +W8cJO1hCdX7XzufgwMP2N8X77cBsnrxcaQUHU6bvek2y7eBxW7rjy1ccTHWp +6nXzsQVTkUJ1n04OXhUyHbW0soXOTQ1TUj0c7Dz9sXeriS18Kx4Osxng4LD0 +SQ1fEVtQT9HK/jTEwZlBfofsezbwuHutT+RnDvpV7jRYHm0Dpkt3guY4ByOG +Da4VeNuA04UTrd6THFRwNi0VMrGBbxWhNyV/cNDrY41H6zIbCPoZf7D4JwdD +l3gHZCyyAVHdDDXrGfI8LPR17JQ1JB4rnvz7l4OsrzrhMb3W8B+xTmBC "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06557082032572008}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10914,19 +11205,19 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06557082032572008}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10940,116 +11231,112 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k8VN0bAHBRGIyZuYNBlrIWBsmSyPNUUtImFUlota+lQmXpJRUlbVIh -pCRb9v2OvFkSZcuWNuWNbFlKJb/7++t+vp977znnc86z3Lv0oM/OI/x8fHxC -C/j4/n+d6W+oVbl03Wynho8eY9UOs/ZE6cC1Xf6wYH1tiTePCyjZclC6Kxwe -hEY0avDWwIkdj98IdMXBYr4zSn/JrcAa5cTNvkmB3W1aopXkfnhXsc1n6s1T -4E/IDpio9gILlaG3E29qYMOj5oJ3FWdg9o3RjfE3rcCwpQk+zo2BZ+sfpr1O -+QSqTsD4VJwIcu9KvxzUGoG0VL1VV2PTQcLT6bHQ+knIThTPjLbLgrgVFuXb -dv+EQHr4ASPVp9Adr0tOMOfA1NqCsUq9EC6lhbTwyyzAfw6scs9WKAHO9U8X -rt0TwJxmMvZPfhmc32Vp1jqzCAenaHJZLypAtqBZln+BIH5Xun+Y3l4B2exd -P1aICuIXM5NEl74K6Gx1zL2qKIh6g+nvaSMVoGJ9XMl6kyAaeUhHLRKvhJqt -SYKvbgvisLzuza5tlTBnMd380lQI3//DrB18UQnHjO87NYQL47ONSpNh+VWw -OVl8yipaGEPGHLUHSqtASeh0VPMNYbS1+P0LySp41b4nr+2RMI7XDFsMNVWB -tq+YQH+zMLYnrkj+/bkK/ks/mf5dloZuWRksGU41OEhsG1mcT8PZhVfoawKq -YWVweVhiBQ2Lu04OjAdVg8jHZVJLn9OwnhthnhRaDaU5AqDWTUPXJ95Jw5eq -QcqqNFZ3noaX5M9UrEuphldhKvobrEQwzCDx1NDLajAf+xXk/UkEs1N3ll5h -khC46boG75sIZpxvDF/EJiH7PreHPSOC14cXZ56SJEF6l7NxqbAo6gvul7aV -JeFbyb8/BLRF8eKFP0emlEm4Fh57/PYpUWz7s7gj15CEj5Jq3rV0MVwrW3xw -hT0JHJ9qeQ5HDDOnNeVtHEjYUm/30m2JGC5c67DK35GEoqBLWoyVYigVvffq -o4MkXHw3PrTXTgx/dXS8mnYnQS+j3GUsRQx1fCOTiWASwkytD8iuoqPX35Lg -PbdJ2OSY+N1oHR3tP4YWWd0hQTx0+NzuLXQcNj7zfs09Eu4+i0iPdaZjqjlN -QOY+CSWby4YFL9DRuXnfhcePSBi3Uz4x2U3H1tItHauLSSgO8hViDdAxisNS -mi8h4ezdynjtUTrq06wOkmUkiL23LXfjF0cBr+1VxlUkqLtE873XEMd7p2VH -hP4lwTFg+mJTsDhaTKR5Eq0kqN5aJzcUIY7d2npS6W3/378rWUKx4ijWZ19i -2EFC0J/lr9aliWMT+WVwWxcJN845SpY2iaOv6OScfT8JTVfrkh7IM3AkQGjv -x68krM6+XXC2moFSo+5Xc/+SYP6meW60noE3FbOutsyTsI1v4UanVgbe7qT9 -GubjwaGd3t3wmYE+J68slBfggUXw0pDQRUysndgj6izEA1/FmdS1mkxsW2Zq -6M7gwXR+bP2sDhMfBYl+cWLyIGiT5kiePhMZvToLbVg8iPBzNlQyY6LU2OKY -FWweJDxrrOe3ZqJX8JK3LVI8qHVJGnl2gon7aC3tV+V5YPnHmDgdzMQ4W8+7 -jgo8aI5tN9QPZeJuC4PuZYo86C6lhaZdYOLcZYmCwiU8GBU9TkTcZeLNmPzf -uco8OJYsbrTmPhM/BO0KdFPhwU/9jH3TD5i47vC/PoqqPBBw7E87ksPEn8en -6s+p8UA6d5ORRQ0TPUQKjbWX8+Ce+ad9f58zURvmL7ZSVuo+E1r0gol36Z/s -jmvwgMuf36DWwUQHfRfPXE0erNsl7yD0HxMjnjFCRbR54PlzIrSezsJV0doN -Fno8WO13VOoLwcKwaIFjLykLD/VkCkiz8HGwtZ71Sh486H3WaabEQnw+N7ld -nwf9VTe0Cg1ZWDNreVPDkAdPjERqWk1Y6Mx/7e9tykG5Z23HkYWZI/lhgkY8 -kEpxCde0YqGuvklvJ+XtEcZd951YePlp6eguYx4o/M3yqj7MwhxSam0W5W8n -lATeurFwf1xPPv9qHkS5impLH2fh82mPuTTKez6EPDMIZOFiqfSOCcoq9lN2 -NmdZaCq15LWJCQ9Iq7fnLkex0K6tQL+O8uVaa5knMSzkjK5NFDblgcOa59kN -cSxcljrJ3Uh5Vjune+E9FvqH59WUU65/qOyjlMLCngaDhgnKN5fEL8SHLJwa -aP6psoYHekSYTnAeCyMfGHWGU+a7NF0bX8TCek5ERBblZgF3+6JyFprPfHTu -oHz3dP9YG8nCTUMst1+UPaZ3Rkz8y8KYHW2JcmbU/nvXyTJesLBu1Vd+U8rC -gya5Wq+o9R6RumlHudMpd8PmDhYmWCrs9aec1qXS69LDwrei/265QNnf+rZv -xDsWOoS3+N2jjI10wdQBForoCzRkUxZfH36H/MrCWls1m0rKb8tndPtHWdjb -Ns9soPxE3+P570kWnltjK9BKOSjr3T6ZWRYe7ZrS6KK8SW3XhOFfFrJu3o/q -pSyVVB+5S4DA45Lq8n2UBzhr5PyFCXRN2f61m/LT2Ly8K3QClQy+jLRTDqWp -bcwiCKzwK9J8SXl7eEJfI4fA1IfRqTWUFX6L+/8nR6Dia4M9hZS/HTsnJKhE -YEtciPkDymXfftxVVqfum6zyiaMcdcRTb60WgS942m9OU97T/77OcQWBdnV6 -Zw5TVrHdvf+0IYFXrksctKT8vaXh+20TAmdlHkRqUiY3mUUVI4HOY4XDIpQv -857Kd2wgcJ2NTNwgdT4Oq9Xzv28mcKdGShCP8qwms5+7m8AUvmOSXpRn7smG -rbQn8HXEoUdAeYqhqmLsRKDTACeBQXl00tjd3I3AHv4fdx9S8TN8xJy+2ZvA -vIclOT6U/3uzLXf7MQLLRj1UDCh/LD80Y3+GQPXUXsMSKl7fcb1vO4cT+P7B -ys4Ayn1Jp0yPnicw8nhBjy7lznMx4X5XCdRZ4C2VRMV/o1WxeNQDAqd6rvg4 -UPlTV8nLi3lMYLXO7LZFlGt1mnZdyyGwzkoyIXMVD6rYHxISSwl0Ty48MU7l -49NeEfXCl9T8EQPO+6j8zdkq2VjWSmDlILdwzICKj2pFL/INNZ5CV3AY5fRU -/fwXHwicu5J76B5VDxI8HOHjNHW+j1YXFlH149Zb14+DvwgsndteYEj5+vZj -ESPzBJpuvaVVsILa75VRL37S2MhI045+qMuD8N95tgwFNt7ZylP0peqTx6VF -vqYWbOTvN3S4QNU31zkGe50V9bzt9J4Py3hw1Ee2aOMONpoEjHQZUna20fmz -056NxDGFEz1Uvdy1eG+Umzcb/1v8WHshVV9NM58k37zJxu781Yc+UvW7d0lm -0oY7bDx4mr1xKeWgmxmJU0lsvHZZleUox4PisPS7OzPYeMp72v61LJXvdsnx -4hVs1Jrf05PI4cHyRddjIz+wcUnD2xWdVD+pD4q7YvCFjcrv+NonqX5zdDz2 -8sAQG78oRrgyKKf1xkSvm2KjvnCdB9J5sOTp+ai/ghJI29E3foFG5ZNTcOgJ -LQnkM6pKLV/Ag8L2wBDVFRL4pUWvoYTqd7s2nzrbbiCBu+cjRvKpfhhnEHBa -D6j3U78bpM2RQBfzOTVqLYGP2hX7PGdJWFh60PfoSQnsO5ysmzROwgSx2XlP -jQSutjmRHPOWhC5PpVfudRIYeeD+oG4fCeTzXxDSJIGF7YUTr3tIiA3KVHzU -KYER1u076VT/1v0o9m52SALthmOOulH93zuvZf89tiQqle2sKX5OwtD23fsG -Dktiyu7VrwqySGjN4L746SaJq+8InCeekFAmIGhC95HEdF0NZe/HJFwoLpI1 -DJRES59JhuJDEpYpSvecj5FE/YH1PS7JJLiM9thpFkmin7nZ8ptxJAxEO+/x -F5LCiUOmQV4B1PxDWkq6YlJo/Ul90+NjJPzYODsywpTCxKxWp89+JIgIxEW4 -yUrh2kG27x5vav2BzwqcuVJIW8LQVnEh4cwRNfZ2Gyk0etww6m1HgpTZtxbN -JClM6mjnrzcmwXLspOVnQw726du0B45Vg9wKhUhhUw5Wrvxg3zhUDaP+tTWa -azm4RO6oG+dLNVyfYZr6W3HwvYvgsod91dA/l6E978RB95kLPvcaqsFfrI8t -c4GDBbEJGwep79eE5di/pZeDLxwbVBfYVMO3Q8LHCkKksd/qkmNnRhX1P8Lh -P18jgxlDd6Y811QC8VLtcu6YLE4O/dYoaCgHuaicHYaGcpiYtGhhqVwZxGsa -M9ku8rhyyDD0VHAJNMquNZi8qoAy6+3j/bqLYLVcTaxOpyIKKaXkNDALQVwg -5fiB8CX4OSrzeJBbPiiEKZruVVuKESNmX/55mAc0VYeinXVLUWii2tPqRw5o -r5HJOblfCe2yJwtXzj4B/37i2WY+ZXwQ2/m6+FMGjE1G77aMV0ahxmaDce5D -2KjzPMGSq4JMtR2LDPPSoGrS5PePZhWMuSI39V43Bby19HpeH1HF3PUd1uWi -ybBm9HD7Xpoa6jV+HxvrvgMbVKS30lPUsGU20FV1QzwsC714qsZIHUVvSFoq -y94AjSPG1ao96vhDXVp3o3AcHKly/afAbxnaaLaIjf++DNXJ7YcnJJfjxYMt -r2yUL8LUo/kfOsXLkfs7Wb3pbwQcUs2kJWzVQLPvoSOD98NhQuOa4dNxDfSb -32q7ZeYslKT9/jAdpYl6pdpXmr4Ggr25MpooaGGwsLR7QEYALPY6X6pNauF+ -lyyPtko/uDx/1OBSjRZmDtSa+eX6AX+cRd5grRY2tB/r4KT6wVDRoozkBi3M -D7IwCYnygzK+f+KJNi2sE2p3LbLxA/vroSdnPmvh8oXjO2qGfSG+PNCgSpSL -QYUCTbpKviAp4pm31ZaLRIzK2w/bvCBt/Zmg8b1cJM2F9t0y8AK9M5fXX3Pg -YqKs1oSTnBdsG8/t6DrAxQ+6jkYaQ54Q2Tk9e8iTi9UM24H7kZ7wMyVkXVAY -F5v8zt5iP/OAHpNrbemZXJQwXMDItXQH14C0u5bZXES/JuOneu4wk1145Fsu -Fw/cey3+fLE7EEpdP1YUcbGijf+S0qgbWAnLy1WSXOTfa3sj65obVLSnH27r -4OKNwhEr/o+usFm8hHuii4vivubfZJpcoWtjw4x0Lxf3ifdGrityhamy4SjH -99T6TbxDnl90Be593ayvQ1wcpJPb4/VdoaJn7YnoEep+StQ1Q0VqPAkb0Bnn -4qiSXfBnmiscPR/w+vg0F6NHN4kFvHOBKTIygfOTix4REsm7G10g/NetQ2W/ -uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs - +1:eJwV13k0VVscB3BRGkRK5unecy8qs2Qo1++XZl4qaTYnUjIliQZDRIaUpEGm +pIR7j8iYIbOSoWR8hjQjQ0Wp1Nvvj7PO+qxz1j57//be370O08Hd4hA/Hx/f +X3L9f5/qa6hmR6QZB6gKOMeWGBu3JUqdWtsZBB9yzIVntOQAxZsdpDqvQMwr +3c7HWmrgs/1Bh0BnKgw0jLFjtYxg8ajklemOhxDFX/xxj9Y/0P/Y3P1bRyVU +qGpWJWtawUb2UO9ExwuQehtp1K/mCtMd+nHjHYOQ/+8D+MQ8DVXr7qW1pn6F +aNcgM4ZCFMj1F713UJuBS+tTLjc6xcFSV9sHc9cJ4AemYRZ/zy24or2xxHzX +PPyUpTLEMU6BrutaFROiwmiqa7QgipEGEWnnmvmlF2Pi0OfDHb/TQfLqm/DY +22IYxU3WtDiXARcstxi/mBJH9Sz+ZdWRmSCT1yTDP0sC1eOnqubGZQJXzPK7 +tpAEijzx69hwOxPaX9jQlxUlMF1qj31Odiawd3hTOzZL4OYHpe82NGVC5dYk +wZYbEljDMxg8KJIFMxsnm54bSaJyAuPKsYtZcNwwxbYhSAqnM5ZKRXlmg2my +yDezSCm8W9Ke9/VkNlBzT4c1xUlhStbLXbvOZkNL2+6cl/fJ+2c7UudHZIOG +x0KBviYppNtqrPXSsuFj+sn0LzLS+LK3Ylbyq2ywWmr+WTZXGvu9Pibm6HJh +pX9JYOJjaXz23EPUdzUXFgwuk2DWSmPo6RR/Q+RCEU8AlLukcaBxjnG2GRck +zIpitP5KY2yhq+teBy60BLJ1N5jJYEpvNZZGc2H92E8/tzcy+GxRWXz5Gy6c +2nx1xZMRGbT3OSjw7CMXuCnq3WJTMjjqMBTX+pkLUpZ2hkXzZPHVk72aLd+5 +MFJY811AQxZ12xk6sUI8iA2K8b7hK4trKovctHR4MCiu7FYtLIedcYXldf48 +kHQvl5eUlEPB6qkZ/QAe/FO/97kLQw6twrcfvHOeB/l+EWqLVsph8wr6ztEo +HlzsHx/at1cOWWNtM08SeaCTUeI8liqHKfW7tEMreBBotMNexkAe9xbmtujx +0bDZJvGLvok8Kg6YyZnx0yASMBy86x95DM71j7GaTUNCVUh6jJ08bszlfPWZ +R0OhafGwYLg8LpYtTA8XpWF8L8vna5c8nmXcGFZm0GBzYvJio78C+u/4scmE +Q4NSvIncUIgCJp0RnvXbmCbjv5Q9N0YBi7IVPj1EGvx+L28xSVNAyd96m6TW +0xAXbCNe1KiA2xx9TZ6Y0tB4uS7prrwiRu++5hm5h4bV3Bt5Z8sV8UPt9dL5 +7jSs72iaGa1XRO0p2tnCgwZzvtmbbF8o4rKO7enXPWk4aOHWBe8U8T5386C8 +Nw0b/ZnnAuYw0Npb0VroFA0eilN31qoysEbyVLJXEA2TuTH105oMPPxQPP9q +MOnfZtXPOboMNLL665h3noYQTzs9ypiBoVV/Lo2E0nCz6mk9/w4GqjF4LIyg +odo56XOVDwPLfmdHeMfSsOW34ZLT/gz03Glh7XGVhqaYNj3dAAaqC8U/d4mj +oatofkBaOAN/BbhE7IqnYVTIe0lIAgNTB1RCRW/RIEVv1t9YycDWAZ+Gpak0 +3F7/5sCfWgamfHehh4iprjMB+c8YuHFWz5qyOzSo8+c2KL9iYH53xVqbuzSY +WMpbzf3IwDiPs0uD7tPg+mMioF6YiT8wUmMfl9TT00ni/RIm2u1xRSkeDfOG +ujMFpJi42qT0ahvx3Z6qdmOKibn1rYIbcmjoK4tTe6THxDHdJsU5eTRk6S+o +fLGGiRcTDCy5xH702T3jyMTLzk7Nlo9okEh1DlI1Y6JjsknCjXwatoUYdqbY +MtHEPSWJv4gGhT/Zx8odmWg/XCN9jXjEhxLodWGiWaxav3IxDWGHhTSkvJlo +W7HQHEtoqDDrDY4OY+Jgt2WjRSkN0dU7pLOimJjAqaRbiK04tdyGK0xcNkfu +nVkZDdMavK7Zt5kYd30KVpfToLMkUNM/h4nDjdLNUxU08EVMVl/PZ2Lw3YJ1 +tk/I/Agc2Z9fQvpfISFcQ3x00iJkooaJPfcvJYdVknq51cksesbEE5Hvj74n +nvdhDa3WQsbX5xu9toqGtE52j3M3aU+2tWeM2GvHDY+Qfiamm3bNXVdNAz4V +Frzzlonq7ilRscS9JVNafaNMrNCcua9WQ+qVVB9qKUBhgVOHFtTS8FaSI+c1 +j0KfG81GZ4gfxuTkXBKmMPIk714h8bagm/8+lSTPF9UmqNSRev4S8fooR2HA +RvNlB4hHjgfPFaQoPEbZi0cShx1y1VmrRmH2rRaJ98S7+wbqbLQpPM0NVltU +TwN7zy7r03oUmm53S19F/KW54cuNNRTO3cgJ2Udcsdk4rAApvDRxu8GPOPrJ +Q/lXGyjk7DD2vkFstVol94sphb5/G0MeEa/IvbVZdDuF/+hM/2kinlYV7VPf +RSFfidfAO+Kp2zKBK/dT2EUNtE4Tf1ukxDa0pfCQ7fR6oQYaJgI164wdKWzx +d1otQzz61fDIehcK2xe3PFQmHj60XtjUjcLDW/q5WsQfO8zpbccpXN/J0TQg +frdl385dvhTGzLqmyyEeLDk4tf8MhR5xV8qBuF/d7YZdEIWZ430t//vfJF8j +pwsUrvut7PL/+12Lg/uPRlI4W10y/P/22oOjgjwvU6gTbKWtTfxyMl7p5DUK +xS6mOagQtzin1p++Reqz57a8LPHzrqyjQckUvoiYdFhI/NSsQCTsLoUvt1ut +/EXGW1f6JCfqAYX8+wMvfSCu1my0jOVR2PFmqW8r8ZOU9u/X88j85dZ9LiQu +E3t9M7GIQjkJs4nbxCUhw5y0MgolXm8PDiAu/D45kFFF4Q+PiDQ74oc9C1Qe +Pacw59uReGli3lbxp8UvKNy37uSRL2T+s8oVj1V0UPhI6EJzPXH6Hd3cZ68p +zDgTYuFGfEccdre+p9A1u9+TQ5x8Yct0+zCFng5LlRcQ3zxqA4OTFG4TH9qW +QNZjfO/hwQ8/KSwv+FlrT3x12/GQz38pbFOpecUmjl4Z9uzHfBa+t3QtvUPW +e8TdK25/RFg4WPc43pY4TPL24tlLWZhznLtQmjjoV86eRQosjDvi0HCe7Jdz +xx7/XMpi4Yx7whJ94tP9tbdllrFwPuU8/Z7sN5+qnjdKOiw8f/JOKhAfjZjj +YbSRhaYjIb5tZD8fnlkkZmLGwlkDi6qOEzu5y+Rv2s7CXilmjiix3U7N3xb7 +WZjwptdvHckHS9l9YS5uLDzi/6srkuSJUWZW8rVrLATGCi8eyaceRmbShlss +3J2455gOsd+1jMRvSSzM0z1yKJfkWUFgeoJFBgvbvRvMeYUkf/YmXxd5zEKm +4DapSyQPl8+5GhP6moVOdeESYyRf6/2uXFr1noWJ03zqFsRO4zHRb4dY2PqY +Z5pLk3zpiYo0+cbCfAPLRHeSz4yHF8L+CLIxTVC9qCWL5Ietf4CPGhuTo5/t +WHWPhkdtp84pabPRW01D9VQ6GY+p79m2VWz0DHeTKCHnw5VVJ07rABvF5nOU +DNNoEF7o7ju6g42lPxbrK6TQMLvIwcPpJBu1ViRXR94k+3GJqd3uSjY6vR+2 +4YukodOVajlSx8Y3PnaZXy6SfKj9Ceca2RjvU9o4GE5DjF+m4v12Nu598PLy +4ws0aA0u7J8eYmPg2LTxbnK+uuU0W98WU8Lxa/e/UH40DG3bdeCtoxLm3f3C +WeZEw4sM9Wc/XJTwjxh7ot2RhmIBwTXC7kqo0jcrPvggDeEF+TJ6p5RQ1Oty +WbsdDcsUpbovRCmhUmxxvOMBGpxHu/eq5ithRrrgFsXtJE8j7XZ7zVXGmmMp +xyQNyPeH1CithcqofrxCLkWPhu+bpj9/FlXGiSYt+eWraFggcCXERUYZFeYY +ievqkP6fqsqzU1fGcN75H6vUaDhzSFls205lPDJRgUOKpP7GI82qScootDs8 +TEaQnP9jJ7e801NBpY4DwjG3eCCnrRA6z0gFB76mWIbH82DUq7pSda0K7swO +Z5+L5cHVKVEjLzMVVDzW4mQXwYO+mQyNv7Yq+GKWec60Hw+8Fv4rJh2ugvr6 +SRC+jwc3l2PfPz0q+IslYK26lAcjB+cdzzu3DB+kbzKaPMcl/xuS/Bcql6O5 +Ztnn9jXZsOS5cjQ9tgLjivMaBEcyQS6Mt11PTw2VGW0HHA4+gOuqhqJizuq4 +fTS8Uuj1fXgqs3bV18saWLC+r0ts/z1YLVcZo9muifPluOJND+6CiECqt32Q +Fho02/xaJ5kGCoGKRvuUtdFBTIffwSkV5itZ5VvUaWOpfwoM1yaDBkead9Ja +Bz1mwgIdkhLBq29JlSnfSjR480lZJfYWjH2N3LXl+kqctDKv3tt/HTZp1t7c +oq6LZhUyEuM216Ds65pf35t0sZlvC5/Uq1hwU9Ppbj20CgVShi/fS70MnFHH +tn3z9XCQf0ZX9E00bGBLbRVO1cOItPMUpRwBywIu+lbq6+PmW07Lc5ovwIpD +huVK3fp4D/xnEiLOw6Gyw+fzPA2Q7+Y7g6qWQChPbnOcEDfEp2ExYxE2Z+Hb +/b/fNQsM8UDLgH/Mi1NwUClz/s2tq1H2k/Wnu5I+MLEiVu/h+GrcbG5ev/CS +FxSm/Xo9GbaG5MuVjymO7rB/PQvXKBjhaO9bG92QIyB77EKRRoURunwRmy6Y +PgTiC1xztu7hYPj5bzkP9jtA2rozfuP7OGinlfyjzMwBdM5Er4u14qDIZEF5 +r5EDmI/TrzrtOTjytLhgtaIDhLZPTh905aA8v32m51t7+JF6zsQvkIMn7whd +bPKwh+41sS/TMzl4bkNci+xlOzh8Ii1hC5eDT1Br1DvYDqa4jw6N0By8d3Rv +W8cJO1hCdX7XzufgwMP2N8X77cBsnrxcaQUHU6bvek2y7eBxW7rjy1ccTHWp +6nXzsQVTkUJ1n04OXhUyHbW0soXOTQ1TUj0c7Dz9sXeriS18Kx4Osxng4LD0 +SQ1fEVtQT9HK/jTEwZlBfofsezbwuHutT+RnDvpV7jRYHm0Dpkt3guY4ByOG +Da4VeNuA04UTrd6THFRwNi0VMrGBbxWhNyV/cNDrY41H6zIbCPoZf7D4JwdD +l3gHZCyyAVHdDDXrGfI8LPR17JQ1JB4rnvz7l4OsrzrhMb3W8B+xTmBC "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.13473082946272152`}}, + "PlotRange" -> {{0, 30}, {0., 0.06557082032572008}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11060,6 +11347,7 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11087,7 +11375,8 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.13473082946272152`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06557082032572008}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11095,22 +11384,565 @@ uDiUaJJlUegCTP0Mrf1zXDRZprh8U7ILJHqVTc/Pc/FsrQrN/pIL/A8dEWBs Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991324915847246*^9}, + CellChangeTimes->{3.991324915847246*^9, 3.99438832154889*^9}, CellLabel-> - "Out[112]=",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] + "Out[128]=",ExpressionUUID->"a5264b59-2248-48d8-b9ce-ee622a7ea2d3"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{3.991799816909994*^9, 3.9918001103050213`*^9, - 3.991924419552084*^9},ExpressionUUID->"c5eb8b00-da53-e74c-9781-\ -4f98a6653ef7"], + 3.991924419552084*^9}, + CellLabel-> + "In[129]:=",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799819852022*^9, - 3.9917998213158054`*^9}},ExpressionUUID->"05df483d-64d7-9449-845e-\ -6e6b94590d4b"], + CellChangeTimes->{{3.991799819852022*^9, 3.9917998213158054`*^9}}, + CellLabel-> + "In[130]:=",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VVscB3BRGkRK5unecy8qs2Qo1++XZl4qaTYnUjIliQZDRIaUpEGm +pIR7j8iYIbOSoWR8hjQjQ0Wp1Nvvj7PO+qxz1j57//be370O08Hd4hA/Hx/f +X3L9f5/qa6hmR6QZB6gKOMeWGBu3JUqdWtsZBB9yzIVntOQAxZsdpDqvQMwr +3c7HWmrgs/1Bh0BnKgw0jLFjtYxg8ajklemOhxDFX/xxj9Y/0P/Y3P1bRyVU +qGpWJWtawUb2UO9ExwuQehtp1K/mCtMd+nHjHYOQ/+8D+MQ8DVXr7qW1pn6F +aNcgM4ZCFMj1F713UJuBS+tTLjc6xcFSV9sHc9cJ4AemYRZ/zy24or2xxHzX +PPyUpTLEMU6BrutaFROiwmiqa7QgipEGEWnnmvmlF2Pi0OfDHb/TQfLqm/DY +22IYxU3WtDiXARcstxi/mBJH9Sz+ZdWRmSCT1yTDP0sC1eOnqubGZQJXzPK7 +tpAEijzx69hwOxPaX9jQlxUlMF1qj31Odiawd3hTOzZL4OYHpe82NGVC5dYk +wZYbEljDMxg8KJIFMxsnm54bSaJyAuPKsYtZcNwwxbYhSAqnM5ZKRXlmg2my +yDezSCm8W9Ke9/VkNlBzT4c1xUlhStbLXbvOZkNL2+6cl/fJ+2c7UudHZIOG +x0KBviYppNtqrPXSsuFj+sn0LzLS+LK3Ylbyq2ywWmr+WTZXGvu9Pibm6HJh +pX9JYOJjaXz23EPUdzUXFgwuk2DWSmPo6RR/Q+RCEU8AlLukcaBxjnG2GRck +zIpitP5KY2yhq+teBy60BLJ1N5jJYEpvNZZGc2H92E8/tzcy+GxRWXz5Gy6c +2nx1xZMRGbT3OSjw7CMXuCnq3WJTMjjqMBTX+pkLUpZ2hkXzZPHVk72aLd+5 +MFJY811AQxZ12xk6sUI8iA2K8b7hK4trKovctHR4MCiu7FYtLIedcYXldf48 +kHQvl5eUlEPB6qkZ/QAe/FO/97kLQw6twrcfvHOeB/l+EWqLVsph8wr6ztEo +HlzsHx/at1cOWWNtM08SeaCTUeI8liqHKfW7tEMreBBotMNexkAe9xbmtujx +0bDZJvGLvok8Kg6YyZnx0yASMBy86x95DM71j7GaTUNCVUh6jJ08bszlfPWZ +R0OhafGwYLg8LpYtTA8XpWF8L8vna5c8nmXcGFZm0GBzYvJio78C+u/4scmE +Q4NSvIncUIgCJp0RnvXbmCbjv5Q9N0YBi7IVPj1EGvx+L28xSVNAyd96m6TW +0xAXbCNe1KiA2xx9TZ6Y0tB4uS7prrwiRu++5hm5h4bV3Bt5Z8sV8UPt9dL5 +7jSs72iaGa1XRO0p2tnCgwZzvtmbbF8o4rKO7enXPWk4aOHWBe8U8T5386C8 +Nw0b/ZnnAuYw0Npb0VroFA0eilN31qoysEbyVLJXEA2TuTH105oMPPxQPP9q +MOnfZtXPOboMNLL665h3noYQTzs9ypiBoVV/Lo2E0nCz6mk9/w4GqjF4LIyg +odo56XOVDwPLfmdHeMfSsOW34ZLT/gz03Glh7XGVhqaYNj3dAAaqC8U/d4mj +oatofkBaOAN/BbhE7IqnYVTIe0lIAgNTB1RCRW/RIEVv1t9YycDWAZ+Gpak0 +3F7/5sCfWgamfHehh4iprjMB+c8YuHFWz5qyOzSo8+c2KL9iYH53xVqbuzSY +WMpbzf3IwDiPs0uD7tPg+mMioF6YiT8wUmMfl9TT00ni/RIm2u1xRSkeDfOG +ujMFpJi42qT0ahvx3Z6qdmOKibn1rYIbcmjoK4tTe6THxDHdJsU5eTRk6S+o +fLGGiRcTDCy5xH702T3jyMTLzk7Nlo9okEh1DlI1Y6JjsknCjXwatoUYdqbY +MtHEPSWJv4gGhT/Zx8odmWg/XCN9jXjEhxLodWGiWaxav3IxDWGHhTSkvJlo +W7HQHEtoqDDrDY4OY+Jgt2WjRSkN0dU7pLOimJjAqaRbiK04tdyGK0xcNkfu +nVkZDdMavK7Zt5kYd30KVpfToLMkUNM/h4nDjdLNUxU08EVMVl/PZ2Lw3YJ1 +tk/I/Agc2Z9fQvpfISFcQ3x00iJkooaJPfcvJYdVknq51cksesbEE5Hvj74n +nvdhDa3WQsbX5xu9toqGtE52j3M3aU+2tWeM2GvHDY+Qfiamm3bNXVdNAz4V +Frzzlonq7ilRscS9JVNafaNMrNCcua9WQ+qVVB9qKUBhgVOHFtTS8FaSI+c1 +j0KfG81GZ4gfxuTkXBKmMPIk714h8bagm/8+lSTPF9UmqNSRev4S8fooR2HA +RvNlB4hHjgfPFaQoPEbZi0cShx1y1VmrRmH2rRaJ98S7+wbqbLQpPM0NVltU +TwN7zy7r03oUmm53S19F/KW54cuNNRTO3cgJ2Udcsdk4rAApvDRxu8GPOPrJ +Q/lXGyjk7DD2vkFstVol94sphb5/G0MeEa/IvbVZdDuF/+hM/2kinlYV7VPf +RSFfidfAO+Kp2zKBK/dT2EUNtE4Tf1ukxDa0pfCQ7fR6oQYaJgI164wdKWzx +d1otQzz61fDIehcK2xe3PFQmHj60XtjUjcLDW/q5WsQfO8zpbccpXN/J0TQg +frdl385dvhTGzLqmyyEeLDk4tf8MhR5xV8qBuF/d7YZdEIWZ430t//vfJF8j +pwsUrvut7PL/+12Lg/uPRlI4W10y/P/22oOjgjwvU6gTbKWtTfxyMl7p5DUK +xS6mOagQtzin1p++Reqz57a8LPHzrqyjQckUvoiYdFhI/NSsQCTsLoUvt1ut +/EXGW1f6JCfqAYX8+wMvfSCu1my0jOVR2PFmqW8r8ZOU9u/X88j85dZ9LiQu +E3t9M7GIQjkJs4nbxCUhw5y0MgolXm8PDiAu/D45kFFF4Q+PiDQ74oc9C1Qe +Pacw59uReGli3lbxp8UvKNy37uSRL2T+s8oVj1V0UPhI6EJzPXH6Hd3cZ68p +zDgTYuFGfEccdre+p9A1u9+TQ5x8Yct0+zCFng5LlRcQ3zxqA4OTFG4TH9qW +QNZjfO/hwQ8/KSwv+FlrT3x12/GQz38pbFOpecUmjl4Z9uzHfBa+t3QtvUPW +e8TdK25/RFg4WPc43pY4TPL24tlLWZhznLtQmjjoV86eRQosjDvi0HCe7Jdz +xx7/XMpi4Yx7whJ94tP9tbdllrFwPuU8/Z7sN5+qnjdKOiw8f/JOKhAfjZjj +YbSRhaYjIb5tZD8fnlkkZmLGwlkDi6qOEzu5y+Rv2s7CXilmjiix3U7N3xb7 +WZjwptdvHckHS9l9YS5uLDzi/6srkuSJUWZW8rVrLATGCi8eyaceRmbShlss +3J2455gOsd+1jMRvSSzM0z1yKJfkWUFgeoJFBgvbvRvMeYUkf/YmXxd5zEKm +4DapSyQPl8+5GhP6moVOdeESYyRf6/2uXFr1noWJ03zqFsRO4zHRb4dY2PqY +Z5pLk3zpiYo0+cbCfAPLRHeSz4yHF8L+CLIxTVC9qCWL5Ietf4CPGhuTo5/t +WHWPhkdtp84pabPRW01D9VQ6GY+p79m2VWz0DHeTKCHnw5VVJ07rABvF5nOU +DNNoEF7o7ju6g42lPxbrK6TQMLvIwcPpJBu1ViRXR94k+3GJqd3uSjY6vR+2 +4YukodOVajlSx8Y3PnaZXy6SfKj9Ceca2RjvU9o4GE5DjF+m4v12Nu598PLy +4ws0aA0u7J8eYmPg2LTxbnK+uuU0W98WU8Lxa/e/UH40DG3bdeCtoxLm3f3C +WeZEw4sM9Wc/XJTwjxh7ot2RhmIBwTXC7kqo0jcrPvggDeEF+TJ6p5RQ1Oty +WbsdDcsUpbovRCmhUmxxvOMBGpxHu/eq5ithRrrgFsXtJE8j7XZ7zVXGmmMp +xyQNyPeH1CithcqofrxCLkWPhu+bpj9/FlXGiSYt+eWraFggcCXERUYZFeYY +ievqkP6fqsqzU1fGcN75H6vUaDhzSFls205lPDJRgUOKpP7GI82qScootDs8 +TEaQnP9jJ7e801NBpY4DwjG3eCCnrRA6z0gFB76mWIbH82DUq7pSda0K7swO +Z5+L5cHVKVEjLzMVVDzW4mQXwYO+mQyNv7Yq+GKWec60Hw+8Fv4rJh2ugvr6 +SRC+jwc3l2PfPz0q+IslYK26lAcjB+cdzzu3DB+kbzKaPMcl/xuS/Bcql6O5 +Ztnn9jXZsOS5cjQ9tgLjivMaBEcyQS6Mt11PTw2VGW0HHA4+gOuqhqJizuq4 +fTS8Uuj1fXgqs3bV18saWLC+r0ts/z1YLVcZo9muifPluOJND+6CiECqt32Q +Fho02/xaJ5kGCoGKRvuUtdFBTIffwSkV5itZ5VvUaWOpfwoM1yaDBkead9Ja +Bz1mwgIdkhLBq29JlSnfSjR480lZJfYWjH2N3LXl+kqctDKv3tt/HTZp1t7c +oq6LZhUyEuM216Ds65pf35t0sZlvC5/Uq1hwU9Ppbj20CgVShi/fS70MnFHH +tn3z9XCQf0ZX9E00bGBLbRVO1cOItPMUpRwBywIu+lbq6+PmW07Lc5ovwIpD +huVK3fp4D/xnEiLOw6Gyw+fzPA2Q7+Y7g6qWQChPbnOcEDfEp2ExYxE2Z+Hb +/b/fNQsM8UDLgH/Mi1NwUClz/s2tq1H2k/Wnu5I+MLEiVu/h+GrcbG5ev/CS +FxSm/Xo9GbaG5MuVjymO7rB/PQvXKBjhaO9bG92QIyB77EKRRoURunwRmy6Y +PgTiC1xztu7hYPj5bzkP9jtA2rozfuP7OGinlfyjzMwBdM5Er4u14qDIZEF5 +r5EDmI/TrzrtOTjytLhgtaIDhLZPTh905aA8v32m51t7+JF6zsQvkIMn7whd +bPKwh+41sS/TMzl4bkNci+xlOzh8Ii1hC5eDT1Br1DvYDqa4jw6N0By8d3Rv +W8cJO1hCdX7XzufgwMP2N8X77cBsnrxcaQUHU6bvek2y7eBxW7rjy1ccTHWp +6nXzsQVTkUJ1n04OXhUyHbW0soXOTQ1TUj0c7Dz9sXeriS18Kx4Osxng4LD0 +SQ1fEVtQT9HK/jTEwZlBfofsezbwuHutT+RnDvpV7jRYHm0Dpkt3guY4ByOG +Da4VeNuA04UTrd6THFRwNi0VMrGBbxWhNyV/cNDrY41H6zIbCPoZf7D4JwdD +l3gHZCyyAVHdDDXrGfI8LPR17JQ1JB4rnvz7l4OsrzrhMb3W8B+xTmBC + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VVscB3BRGkRK5unecy8qs2Qo1++XZl4qaTYnUjIliQZDRIaUpEGm +pIR7j8iYIbOSoWR8hjQjQ0Wp1Nvvj7PO+qxz1j57//be370O08Hd4hA/Hx/f +X3L9f5/qa6hmR6QZB6gKOMeWGBu3JUqdWtsZBB9yzIVntOQAxZsdpDqvQMwr +3c7HWmrgs/1Bh0BnKgw0jLFjtYxg8ajklemOhxDFX/xxj9Y/0P/Y3P1bRyVU +qGpWJWtawUb2UO9ExwuQehtp1K/mCtMd+nHjHYOQ/+8D+MQ8DVXr7qW1pn6F +aNcgM4ZCFMj1F713UJuBS+tTLjc6xcFSV9sHc9cJ4AemYRZ/zy24or2xxHzX +PPyUpTLEMU6BrutaFROiwmiqa7QgipEGEWnnmvmlF2Pi0OfDHb/TQfLqm/DY +22IYxU3WtDiXARcstxi/mBJH9Sz+ZdWRmSCT1yTDP0sC1eOnqubGZQJXzPK7 +tpAEijzx69hwOxPaX9jQlxUlMF1qj31Odiawd3hTOzZL4OYHpe82NGVC5dYk +wZYbEljDMxg8KJIFMxsnm54bSaJyAuPKsYtZcNwwxbYhSAqnM5ZKRXlmg2my +yDezSCm8W9Ke9/VkNlBzT4c1xUlhStbLXbvOZkNL2+6cl/fJ+2c7UudHZIOG +x0KBviYppNtqrPXSsuFj+sn0LzLS+LK3Ylbyq2ywWmr+WTZXGvu9Pibm6HJh +pX9JYOJjaXz23EPUdzUXFgwuk2DWSmPo6RR/Q+RCEU8AlLukcaBxjnG2GRck +zIpitP5KY2yhq+teBy60BLJ1N5jJYEpvNZZGc2H92E8/tzcy+GxRWXz5Gy6c +2nx1xZMRGbT3OSjw7CMXuCnq3WJTMjjqMBTX+pkLUpZ2hkXzZPHVk72aLd+5 +MFJY811AQxZ12xk6sUI8iA2K8b7hK4trKovctHR4MCiu7FYtLIedcYXldf48 +kHQvl5eUlEPB6qkZ/QAe/FO/97kLQw6twrcfvHOeB/l+EWqLVsph8wr6ztEo +HlzsHx/at1cOWWNtM08SeaCTUeI8liqHKfW7tEMreBBotMNexkAe9xbmtujx +0bDZJvGLvok8Kg6YyZnx0yASMBy86x95DM71j7GaTUNCVUh6jJ08bszlfPWZ +R0OhafGwYLg8LpYtTA8XpWF8L8vna5c8nmXcGFZm0GBzYvJio78C+u/4scmE +Q4NSvIncUIgCJp0RnvXbmCbjv5Q9N0YBi7IVPj1EGvx+L28xSVNAyd96m6TW +0xAXbCNe1KiA2xx9TZ6Y0tB4uS7prrwiRu++5hm5h4bV3Bt5Z8sV8UPt9dL5 +7jSs72iaGa1XRO0p2tnCgwZzvtmbbF8o4rKO7enXPWk4aOHWBe8U8T5386C8 +Nw0b/ZnnAuYw0Npb0VroFA0eilN31qoysEbyVLJXEA2TuTH105oMPPxQPP9q +MOnfZtXPOboMNLL665h3noYQTzs9ypiBoVV/Lo2E0nCz6mk9/w4GqjF4LIyg +odo56XOVDwPLfmdHeMfSsOW34ZLT/gz03Glh7XGVhqaYNj3dAAaqC8U/d4mj +oatofkBaOAN/BbhE7IqnYVTIe0lIAgNTB1RCRW/RIEVv1t9YycDWAZ+Gpak0 +3F7/5sCfWgamfHehh4iprjMB+c8YuHFWz5qyOzSo8+c2KL9iYH53xVqbuzSY +WMpbzf3IwDiPs0uD7tPg+mMioF6YiT8wUmMfl9TT00ni/RIm2u1xRSkeDfOG +ujMFpJi42qT0ahvx3Z6qdmOKibn1rYIbcmjoK4tTe6THxDHdJsU5eTRk6S+o +fLGGiRcTDCy5xH702T3jyMTLzk7Nlo9okEh1DlI1Y6JjsknCjXwatoUYdqbY +MtHEPSWJv4gGhT/Zx8odmWg/XCN9jXjEhxLodWGiWaxav3IxDWGHhTSkvJlo +W7HQHEtoqDDrDY4OY+Jgt2WjRSkN0dU7pLOimJjAqaRbiK04tdyGK0xcNkfu +nVkZDdMavK7Zt5kYd30KVpfToLMkUNM/h4nDjdLNUxU08EVMVl/PZ2Lw3YJ1 +tk/I/Agc2Z9fQvpfISFcQ3x00iJkooaJPfcvJYdVknq51cksesbEE5Hvj74n +nvdhDa3WQsbX5xu9toqGtE52j3M3aU+2tWeM2GvHDY+Qfiamm3bNXVdNAz4V +Frzzlonq7ilRscS9JVNafaNMrNCcua9WQ+qVVB9qKUBhgVOHFtTS8FaSI+c1 +j0KfG81GZ4gfxuTkXBKmMPIk714h8bagm/8+lSTPF9UmqNSRev4S8fooR2HA +RvNlB4hHjgfPFaQoPEbZi0cShx1y1VmrRmH2rRaJ98S7+wbqbLQpPM0NVltU +TwN7zy7r03oUmm53S19F/KW54cuNNRTO3cgJ2Udcsdk4rAApvDRxu8GPOPrJ +Q/lXGyjk7DD2vkFstVol94sphb5/G0MeEa/IvbVZdDuF/+hM/2kinlYV7VPf +RSFfidfAO+Kp2zKBK/dT2EUNtE4Tf1ukxDa0pfCQ7fR6oQYaJgI164wdKWzx +d1otQzz61fDIehcK2xe3PFQmHj60XtjUjcLDW/q5WsQfO8zpbccpXN/J0TQg +frdl385dvhTGzLqmyyEeLDk4tf8MhR5xV8qBuF/d7YZdEIWZ430t//vfJF8j +pwsUrvut7PL/+12Lg/uPRlI4W10y/P/22oOjgjwvU6gTbKWtTfxyMl7p5DUK +xS6mOagQtzin1p++Reqz57a8LPHzrqyjQckUvoiYdFhI/NSsQCTsLoUvt1ut +/EXGW1f6JCfqAYX8+wMvfSCu1my0jOVR2PFmqW8r8ZOU9u/X88j85dZ9LiQu +E3t9M7GIQjkJs4nbxCUhw5y0MgolXm8PDiAu/D45kFFF4Q+PiDQ74oc9C1Qe +Pacw59uReGli3lbxp8UvKNy37uSRL2T+s8oVj1V0UPhI6EJzPXH6Hd3cZ68p +zDgTYuFGfEccdre+p9A1u9+TQ5x8Yct0+zCFng5LlRcQ3zxqA4OTFG4TH9qW +QNZjfO/hwQ8/KSwv+FlrT3x12/GQz38pbFOpecUmjl4Z9uzHfBa+t3QtvUPW +e8TdK25/RFg4WPc43pY4TPL24tlLWZhznLtQmjjoV86eRQosjDvi0HCe7Jdz +xx7/XMpi4Yx7whJ94tP9tbdllrFwPuU8/Z7sN5+qnjdKOiw8f/JOKhAfjZjj +YbSRhaYjIb5tZD8fnlkkZmLGwlkDi6qOEzu5y+Rv2s7CXilmjiix3U7N3xb7 +WZjwptdvHckHS9l9YS5uLDzi/6srkuSJUWZW8rVrLATGCi8eyaceRmbShlss +3J2455gOsd+1jMRvSSzM0z1yKJfkWUFgeoJFBgvbvRvMeYUkf/YmXxd5zEKm +4DapSyQPl8+5GhP6moVOdeESYyRf6/2uXFr1noWJ03zqFsRO4zHRb4dY2PqY +Z5pLk3zpiYo0+cbCfAPLRHeSz4yHF8L+CLIxTVC9qCWL5Ietf4CPGhuTo5/t +WHWPhkdtp84pabPRW01D9VQ6GY+p79m2VWz0DHeTKCHnw5VVJ07rABvF5nOU +DNNoEF7o7ju6g42lPxbrK6TQMLvIwcPpJBu1ViRXR94k+3GJqd3uSjY6vR+2 +4YukodOVajlSx8Y3PnaZXy6SfKj9Ceca2RjvU9o4GE5DjF+m4v12Nu598PLy +4ws0aA0u7J8eYmPg2LTxbnK+uuU0W98WU8Lxa/e/UH40DG3bdeCtoxLm3f3C +WeZEw4sM9Wc/XJTwjxh7ot2RhmIBwTXC7kqo0jcrPvggDeEF+TJ6p5RQ1Oty +WbsdDcsUpbovRCmhUmxxvOMBGpxHu/eq5ithRrrgFsXtJE8j7XZ7zVXGmmMp +xyQNyPeH1CithcqofrxCLkWPhu+bpj9/FlXGiSYt+eWraFggcCXERUYZFeYY +ievqkP6fqsqzU1fGcN75H6vUaDhzSFls205lPDJRgUOKpP7GI82qScootDs8 +TEaQnP9jJ7e801NBpY4DwjG3eCCnrRA6z0gFB76mWIbH82DUq7pSda0K7swO +Z5+L5cHVKVEjLzMVVDzW4mQXwYO+mQyNv7Yq+GKWec60Hw+8Fv4rJh2ugvr6 +SRC+jwc3l2PfPz0q+IslYK26lAcjB+cdzzu3DB+kbzKaPMcl/xuS/Bcql6O5 +Ztnn9jXZsOS5cjQ9tgLjivMaBEcyQS6Mt11PTw2VGW0HHA4+gOuqhqJizuq4 +fTS8Uuj1fXgqs3bV18saWLC+r0ts/z1YLVcZo9muifPluOJND+6CiECqt32Q +Fho02/xaJ5kGCoGKRvuUtdFBTIffwSkV5itZ5VvUaWOpfwoM1yaDBkead9Ja +Bz1mwgIdkhLBq29JlSnfSjR480lZJfYWjH2N3LXl+kqctDKv3tt/HTZp1t7c +oq6LZhUyEuM216Ds65pf35t0sZlvC5/Uq1hwU9Ppbj20CgVShi/fS70MnFHH +tn3z9XCQf0ZX9E00bGBLbRVO1cOItPMUpRwBywIu+lbq6+PmW07Lc5ovwIpD +huVK3fp4D/xnEiLOw6Gyw+fzPA2Q7+Y7g6qWQChPbnOcEDfEp2ExYxE2Z+Hb +/b/fNQsM8UDLgH/Mi1NwUClz/s2tq1H2k/Wnu5I+MLEiVu/h+GrcbG5ev/CS +FxSm/Xo9GbaG5MuVjymO7rB/PQvXKBjhaO9bG92QIyB77EKRRoURunwRmy6Y +PgTiC1xztu7hYPj5bzkP9jtA2rozfuP7OGinlfyjzMwBdM5Er4u14qDIZEF5 +r5EDmI/TrzrtOTjytLhgtaIDhLZPTh905aA8v32m51t7+JF6zsQvkIMn7whd +bPKwh+41sS/TMzl4bkNci+xlOzh8Ii1hC5eDT1Br1DvYDqa4jw6N0By8d3Rv +W8cJO1hCdX7XzufgwMP2N8X77cBsnrxcaQUHU6bvek2y7eBxW7rjy1ccTHWp +6nXzsQVTkUJ1n04OXhUyHbW0soXOTQ1TUj0c7Dz9sXeriS18Kx4Osxng4LD0 +SQ1fEVtQT9HK/jTEwZlBfofsezbwuHutT+RnDvpV7jRYHm0Dpkt3guY4ByOG +Da4VeNuA04UTrd6THFRwNi0VMrGBbxWhNyV/cNDrY41H6zIbCPoZf7D4JwdD +l3gHZCyyAVHdDDXrGfI8LPR17JQ1JB4rnvz7l4OsrzrhMb3W8B+xTmBC + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06557082032572008}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06557082032572008}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VVscB3BRGkRK5unecy8qs2Qo1++XZl4qaTYnUjIliQZDRIaUpEGm +pIR7j8iYIbOSoWR8hjQjQ0Wp1Nvvj7PO+qxz1j57//be370O08Hd4hA/Hx/f +X3L9f5/qa6hmR6QZB6gKOMeWGBu3JUqdWtsZBB9yzIVntOQAxZsdpDqvQMwr +3c7HWmrgs/1Bh0BnKgw0jLFjtYxg8ajklemOhxDFX/xxj9Y/0P/Y3P1bRyVU +qGpWJWtawUb2UO9ExwuQehtp1K/mCtMd+nHjHYOQ/+8D+MQ8DVXr7qW1pn6F +aNcgM4ZCFMj1F713UJuBS+tTLjc6xcFSV9sHc9cJ4AemYRZ/zy24or2xxHzX +PPyUpTLEMU6BrutaFROiwmiqa7QgipEGEWnnmvmlF2Pi0OfDHb/TQfLqm/DY +22IYxU3WtDiXARcstxi/mBJH9Sz+ZdWRmSCT1yTDP0sC1eOnqubGZQJXzPK7 +tpAEijzx69hwOxPaX9jQlxUlMF1qj31Odiawd3hTOzZL4OYHpe82NGVC5dYk +wZYbEljDMxg8KJIFMxsnm54bSaJyAuPKsYtZcNwwxbYhSAqnM5ZKRXlmg2my +yDezSCm8W9Ke9/VkNlBzT4c1xUlhStbLXbvOZkNL2+6cl/fJ+2c7UudHZIOG +x0KBviYppNtqrPXSsuFj+sn0LzLS+LK3Ylbyq2ywWmr+WTZXGvu9Pibm6HJh +pX9JYOJjaXz23EPUdzUXFgwuk2DWSmPo6RR/Q+RCEU8AlLukcaBxjnG2GRck +zIpitP5KY2yhq+teBy60BLJ1N5jJYEpvNZZGc2H92E8/tzcy+GxRWXz5Gy6c +2nx1xZMRGbT3OSjw7CMXuCnq3WJTMjjqMBTX+pkLUpZ2hkXzZPHVk72aLd+5 +MFJY811AQxZ12xk6sUI8iA2K8b7hK4trKovctHR4MCiu7FYtLIedcYXldf48 +kHQvl5eUlEPB6qkZ/QAe/FO/97kLQw6twrcfvHOeB/l+EWqLVsph8wr6ztEo +HlzsHx/at1cOWWNtM08SeaCTUeI8liqHKfW7tEMreBBotMNexkAe9xbmtujx +0bDZJvGLvok8Kg6YyZnx0yASMBy86x95DM71j7GaTUNCVUh6jJ08bszlfPWZ +R0OhafGwYLg8LpYtTA8XpWF8L8vna5c8nmXcGFZm0GBzYvJio78C+u/4scmE +Q4NSvIncUIgCJp0RnvXbmCbjv5Q9N0YBi7IVPj1EGvx+L28xSVNAyd96m6TW +0xAXbCNe1KiA2xx9TZ6Y0tB4uS7prrwiRu++5hm5h4bV3Bt5Z8sV8UPt9dL5 +7jSs72iaGa1XRO0p2tnCgwZzvtmbbF8o4rKO7enXPWk4aOHWBe8U8T5386C8 +Nw0b/ZnnAuYw0Npb0VroFA0eilN31qoysEbyVLJXEA2TuTH105oMPPxQPP9q +MOnfZtXPOboMNLL665h3noYQTzs9ypiBoVV/Lo2E0nCz6mk9/w4GqjF4LIyg +odo56XOVDwPLfmdHeMfSsOW34ZLT/gz03Glh7XGVhqaYNj3dAAaqC8U/d4mj +oatofkBaOAN/BbhE7IqnYVTIe0lIAgNTB1RCRW/RIEVv1t9YycDWAZ+Gpak0 +3F7/5sCfWgamfHehh4iprjMB+c8YuHFWz5qyOzSo8+c2KL9iYH53xVqbuzSY +WMpbzf3IwDiPs0uD7tPg+mMioF6YiT8wUmMfl9TT00ni/RIm2u1xRSkeDfOG +ujMFpJi42qT0ahvx3Z6qdmOKibn1rYIbcmjoK4tTe6THxDHdJsU5eTRk6S+o +fLGGiRcTDCy5xH702T3jyMTLzk7Nlo9okEh1DlI1Y6JjsknCjXwatoUYdqbY +MtHEPSWJv4gGhT/Zx8odmWg/XCN9jXjEhxLodWGiWaxav3IxDWGHhTSkvJlo +W7HQHEtoqDDrDY4OY+Jgt2WjRSkN0dU7pLOimJjAqaRbiK04tdyGK0xcNkfu +nVkZDdMavK7Zt5kYd30KVpfToLMkUNM/h4nDjdLNUxU08EVMVl/PZ2Lw3YJ1 +tk/I/Agc2Z9fQvpfISFcQ3x00iJkooaJPfcvJYdVknq51cksesbEE5Hvj74n +nvdhDa3WQsbX5xu9toqGtE52j3M3aU+2tWeM2GvHDY+Qfiamm3bNXVdNAz4V +Frzzlonq7ilRscS9JVNafaNMrNCcua9WQ+qVVB9qKUBhgVOHFtTS8FaSI+c1 +j0KfG81GZ4gfxuTkXBKmMPIk714h8bagm/8+lSTPF9UmqNSRev4S8fooR2HA +RvNlB4hHjgfPFaQoPEbZi0cShx1y1VmrRmH2rRaJ98S7+wbqbLQpPM0NVltU +TwN7zy7r03oUmm53S19F/KW54cuNNRTO3cgJ2Udcsdk4rAApvDRxu8GPOPrJ +Q/lXGyjk7DD2vkFstVol94sphb5/G0MeEa/IvbVZdDuF/+hM/2kinlYV7VPf +RSFfidfAO+Kp2zKBK/dT2EUNtE4Tf1ukxDa0pfCQ7fR6oQYaJgI164wdKWzx +d1otQzz61fDIehcK2xe3PFQmHj60XtjUjcLDW/q5WsQfO8zpbccpXN/J0TQg +frdl385dvhTGzLqmyyEeLDk4tf8MhR5xV8qBuF/d7YZdEIWZ430t//vfJF8j +pwsUrvut7PL/+12Lg/uPRlI4W10y/P/22oOjgjwvU6gTbKWtTfxyMl7p5DUK +xS6mOagQtzin1p++Reqz57a8LPHzrqyjQckUvoiYdFhI/NSsQCTsLoUvt1ut +/EXGW1f6JCfqAYX8+wMvfSCu1my0jOVR2PFmqW8r8ZOU9u/X88j85dZ9LiQu +E3t9M7GIQjkJs4nbxCUhw5y0MgolXm8PDiAu/D45kFFF4Q+PiDQ74oc9C1Qe +Pacw59uReGli3lbxp8UvKNy37uSRL2T+s8oVj1V0UPhI6EJzPXH6Hd3cZ68p +zDgTYuFGfEccdre+p9A1u9+TQ5x8Yct0+zCFng5LlRcQ3zxqA4OTFG4TH9qW +QNZjfO/hwQ8/KSwv+FlrT3x12/GQz38pbFOpecUmjl4Z9uzHfBa+t3QtvUPW +e8TdK25/RFg4WPc43pY4TPL24tlLWZhznLtQmjjoV86eRQosjDvi0HCe7Jdz +xx7/XMpi4Yx7whJ94tP9tbdllrFwPuU8/Z7sN5+qnjdKOiw8f/JOKhAfjZjj +YbSRhaYjIb5tZD8fnlkkZmLGwlkDi6qOEzu5y+Rv2s7CXilmjiix3U7N3xb7 +WZjwptdvHckHS9l9YS5uLDzi/6srkuSJUWZW8rVrLATGCi8eyaceRmbShlss +3J2455gOsd+1jMRvSSzM0z1yKJfkWUFgeoJFBgvbvRvMeYUkf/YmXxd5zEKm +4DapSyQPl8+5GhP6moVOdeESYyRf6/2uXFr1noWJ03zqFsRO4zHRb4dY2PqY +Z5pLk3zpiYo0+cbCfAPLRHeSz4yHF8L+CLIxTVC9qCWL5Ietf4CPGhuTo5/t +WHWPhkdtp84pabPRW01D9VQ6GY+p79m2VWz0DHeTKCHnw5VVJ07rABvF5nOU +DNNoEF7o7ju6g42lPxbrK6TQMLvIwcPpJBu1ViRXR94k+3GJqd3uSjY6vR+2 +4YukodOVajlSx8Y3PnaZXy6SfKj9Ceca2RjvU9o4GE5DjF+m4v12Nu598PLy +4ws0aA0u7J8eYmPg2LTxbnK+uuU0W98WU8Lxa/e/UH40DG3bdeCtoxLm3f3C +WeZEw4sM9Wc/XJTwjxh7ot2RhmIBwTXC7kqo0jcrPvggDeEF+TJ6p5RQ1Oty +WbsdDcsUpbovRCmhUmxxvOMBGpxHu/eq5ithRrrgFsXtJE8j7XZ7zVXGmmMp +xyQNyPeH1CithcqofrxCLkWPhu+bpj9/FlXGiSYt+eWraFggcCXERUYZFeYY +ievqkP6fqsqzU1fGcN75H6vUaDhzSFls205lPDJRgUOKpP7GI82qScootDs8 +TEaQnP9jJ7e801NBpY4DwjG3eCCnrRA6z0gFB76mWIbH82DUq7pSda0K7swO +Z5+L5cHVKVEjLzMVVDzW4mQXwYO+mQyNv7Yq+GKWec60Hw+8Fv4rJh2ugvr6 +SRC+jwc3l2PfPz0q+IslYK26lAcjB+cdzzu3DB+kbzKaPMcl/xuS/Bcql6O5 +Ztnn9jXZsOS5cjQ9tgLjivMaBEcyQS6Mt11PTw2VGW0HHA4+gOuqhqJizuq4 +fTS8Uuj1fXgqs3bV18saWLC+r0ts/z1YLVcZo9muifPluOJND+6CiECqt32Q +Fho02/xaJ5kGCoGKRvuUtdFBTIffwSkV5itZ5VvUaWOpfwoM1yaDBkead9Ja +Bz1mwgIdkhLBq29JlSnfSjR480lZJfYWjH2N3LXl+kqctDKv3tt/HTZp1t7c +oq6LZhUyEuM216Ds65pf35t0sZlvC5/Uq1hwU9Ppbj20CgVShi/fS70MnFHH +tn3z9XCQf0ZX9E00bGBLbRVO1cOItPMUpRwBywIu+lbq6+PmW07Lc5ovwIpD +huVK3fp4D/xnEiLOw6Gyw+fzPA2Q7+Y7g6qWQChPbnOcEDfEp2ExYxE2Z+Hb +/b/fNQsM8UDLgH/Mi1NwUClz/s2tq1H2k/Wnu5I+MLEiVu/h+GrcbG5ev/CS +FxSm/Xo9GbaG5MuVjymO7rB/PQvXKBjhaO9bG92QIyB77EKRRoURunwRmy6Y +PgTiC1xztu7hYPj5bzkP9jtA2rozfuP7OGinlfyjzMwBdM5Er4u14qDIZEF5 +r5EDmI/TrzrtOTjytLhgtaIDhLZPTh905aA8v32m51t7+JF6zsQvkIMn7whd +bPKwh+41sS/TMzl4bkNci+xlOzh8Ii1hC5eDT1Br1DvYDqa4jw6N0By8d3Rv +W8cJO1hCdX7XzufgwMP2N8X77cBsnrxcaQUHU6bvek2y7eBxW7rjy1ccTHWp +6nXzsQVTkUJ1n04OXhUyHbW0soXOTQ1TUj0c7Dz9sXeriS18Kx4Osxng4LD0 +SQ1fEVtQT9HK/jTEwZlBfofsezbwuHutT+RnDvpV7jRYHm0Dpkt3guY4ByOG +Da4VeNuA04UTrd6THFRwNi0VMrGBbxWhNyV/cNDrY41H6zIbCPoZf7D4JwdD +l3gHZCyyAVHdDDXrGfI8LPR17JQ1JB4rnvz7l4OsrzrhMb3W8B+xTmBC + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06557082032572008}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06557082032572008}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994388321633326*^9}, + CellLabel-> + "Out[130]=",ExpressionUUID->"13402e58-ceba-4a83-a058-bef199c3e87c"] +}, Open ]], Cell[CellGroupData[{ @@ -11162,66 +11994,72 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[116]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], + "In[131]:=",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 116, 57, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068365192`*^9}, - CellLabel-> - "During evaluation of \ -In[116]:=",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 116, 58, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506846985*^9}, - CellLabel-> - "During evaluation of \ -In[116]:=",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ + "\"\\!\\(\\*FractionBox[\\\"9.955860475326287`*^-163\\\", \ +RowBox[{\\\"5055189918605101236401431\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"99\\\", \\\"\[RightSkeleton]\\\"}], \\\"00000000000000000000000000\\\"}]]\ \\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 116, 59, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326506856045*^9}, +be lost.\"", 2, 131, 45, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.99438832168301*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], +In[131]:=",ExpressionUUID->"730095fe-1ec2-4916-9cec-223c8f279800"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2740525800370812`*^-165\\\", \ +RowBox[{\\\"1642431204554797391706825\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"00000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 131, 46, + 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.994388321690404*^9}, + CellLabel-> + "During evaluation of \ +In[131]:=",ExpressionUUID->"b0924c03-541a-4add-8efe-d78d39b35ea5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.6304065135524555`*^-168\\\", \ +RowBox[{\\\"5525138572122338425701759\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"106\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"00000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 131, 47, + 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.99438832169722*^9}, + CellLabel-> + "During evaluation of \ +In[131]:=",ExpressionUUID->"acfecf6a-1c90-407f-930f-c8fe8297b248"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 116, 60, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265068640423`*^9}, +during this calculation.\"", 2, 131, 48, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265068365192`*^9, 3.994388321703713*^9}, CellLabel-> "During evaluation of \ -In[116]:=",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], +In[131]:=",ExpressionUUID->"29d7287d-15d0-41ed-ac26-101449afe5d4"], -Cell[BoxData["11.275343508404701`"], "Output", - CellChangeTimes->{3.991326513010317*^9}, +Cell[BoxData["11.761136227368302`"], "Output", + CellChangeTimes->{3.991326513010317*^9, 3.994388386326877*^9}, CellLabel-> - "Out[116]=",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] + "Out[131]=",ExpressionUUID->"59f4129a-8651-4f1c-be3b-7e2c5ddaad3d"] }, Open ]], Cell[CellGroupData[{ @@ -11288,68 +12126,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998502248*^9, - 3.9917998584727135`*^9}},ExpressionUUID->"df92a918-12ed-ff47-a8a8-\ -122296a3d634"], + CellChangeTimes->{{3.9917998502248*^9, 3.9917998584727135`*^9}}, + CellLabel-> + "In[132]:=",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 117, 61, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130447063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.0738721444752064`*^-215\\\", \ +RowBox[{\\\"1119071536804432775059941\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \\\"31183104000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 132, 49, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994388386375723*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], +In[132]:=",ExpressionUUID->"d0872fa3-c177-4e81-be0e-35a30f3c68a4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 62, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513053705*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4042697096500825`*^-220\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 132, 50, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.9943883863834753`*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], +In[132]:=",ExpressionUUID->"4fdc27b2-d437-4d8b-9d7d-c48b2acb4bb5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 117, - 63, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265130617065`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.418923479122964`*^-225\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 132, 51, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.994388386389967*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], +In[132]:=",ExpressionUUID->"93bb5553-147d-48a8-ac63-f03180caad63"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 117, 64, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326513069849*^9}, +during this calculation.\"", 2, 132, 52, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265130447063`*^9, 3.9943883863959913`*^9}, CellLabel-> "During evaluation of \ -In[117]:=",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], +In[132]:=",ExpressionUUID->"79f3fc42-7f44-4fdc-b9c9-15b97086f6f1"], -Cell[BoxData["1.662840304462236`"], "Output", - CellChangeTimes->{3.9913265201819115`*^9}, +Cell[BoxData["0.34346339160768197`"], "Output", + CellChangeTimes->{3.9913265201819115`*^9, 3.994388395470065*^9}, CellLabel-> - "Out[117]=",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] + "Out[132]=",ExpressionUUID->"19c2225c-ea4b-410d-86c6-b4cdcea9736d"] }, Open ]], Cell[CellGroupData[{ @@ -11370,8 +12212,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11416,68 +12257,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9917998626681576`*^9, - 3.991799866004116*^9}},ExpressionUUID->"1990573a-00f1-b54c-9d39-\ -9c68738afe07"], + CellChangeTimes->{{3.9917998626681576`*^9, 3.991799866004116*^9}}, + CellLabel-> + "In[133]:=",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 118, 65, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520216116*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.0738721444752064`*^-215\\\", \ +RowBox[{\\\"1119071536804432775059941\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \\\"31183104000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 133, 53, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.994388395515287*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], +In[133]:=",ExpressionUUID->"d39cbd63-a077-4981-89a4-4ee3a4ec42ce"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 66, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520226103*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4042697096500825`*^-220\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 133, 54, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.99438839552458*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], +In[133]:=",ExpressionUUID->"5ccb67e2-0ce7-4d95-be35-e90f2c41f6e8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 118, - 67, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265202341022`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.418923479122964`*^-225\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 133, 55, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.994388395532104*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], +In[133]:=",ExpressionUUID->"b029023c-b28d-41b5-89f5-518be0deb88f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 118, 68, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326520242243*^9}, +during this calculation.\"", 2, 133, 56, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326520216116*^9, 3.9943883955393667`*^9}, CellLabel-> "During evaluation of \ -In[118]:=",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], +In[133]:=",ExpressionUUID->"2b9250e0-6c85-48a2-a343-eb96265c753b"], -Cell[BoxData["8.698310175000124`"], "Output", - CellChangeTimes->{3.9913265264075394`*^9}, +Cell[BoxData["36.7237900653548`"], "Output", + CellChangeTimes->{3.9913265264075394`*^9, 3.994388404297997*^9}, CellLabel-> - "Out[118]=",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] + "Out[133]=",ExpressionUUID->"d8fc4b68-c28e-45bb-8a1c-88b43cca8f0c"] }, Open ]], Cell[CellGroupData[{ @@ -11498,8 +12343,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11544,68 +12388,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799871682028*^9, - 3.9917998792226925`*^9}},ExpressionUUID->"586f2005-dac7-8547-be11-\ -766f96e6af5d"], + CellChangeTimes->{{3.991799871682028*^9, 3.9917998792226925`*^9}}, + CellLabel-> + "In[134]:=",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.0477424193919687`*^-193\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 119, 69, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264435444`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.0738721444752064`*^-215\\\", \ +RowBox[{\\\"1119071536804432775059941\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"49\\\", \\\"\[RightSkeleton]\\\"}], \\\"31183104000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 134, 57, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.9943884043534184`*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], +In[134]:=",ExpressionUUID->"cc3fb95f-c505-4107-9b01-ad889f88c297"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.9899737716109268`*^-197\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 70, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264535427`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.4042697096500825`*^-220\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 134, 58, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.99438840436467*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], +In[134]:=",ExpressionUUID->"481873f6-6e4e-4d32-b33d-480ec58b4b2b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.299320961805375`*^-201\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 119, - 71, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265264615555`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.418923479122964`*^-225\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 134, 59, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.9943884043749228`*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], +In[134]:=",ExpressionUUID->"dbeaa8ec-6050-41a9-97ca-c372c015171d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 119, 72, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326526468542*^9}, +during this calculation.\"", 2, 134, 60, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265264435444`*^9, 3.994388404382885*^9}, CellLabel-> "During evaluation of \ -In[119]:=",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], +In[134]:=",ExpressionUUID->"c1b4bda4-4fb6-4c43-83d5-a9d81c0a7156"], -Cell[BoxData["16.721244215445346`"], "Output", - CellChangeTimes->{3.9913265299431496`*^9}, +Cell[BoxData["5.766025016508726`"], "Output", + CellChangeTimes->{3.9913265299431496`*^9, 3.99438841014756*^9}, CellLabel-> - "Out[119]=",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] + "Out[134]=",ExpressionUUID->"12f0aa8e-d529-41ce-a9f2-aeca7e84d5b3"] }, Open ]], Cell[CellGroupData[{ @@ -11614,22 +12462,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9917998836260815`*^9, - 3.991799887334032*^9}},ExpressionUUID->"363f609f-6fd9-cc4c-924f-\ -14ef82ef0962"], - -Cell[BoxData["0.13787921511838797`"], "Output", - CellChangeTimes->{3.991326529975149*^9}, + CellChangeTimes->{{3.9917998836260815`*^9, 3.991799887334032*^9}}, CellLabel-> - "Out[120]=",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] + "In[135]:=",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], + +Cell[BoxData["0.023603067314995646`"], "Output", + CellChangeTimes->{3.991326529975149*^9, 3.994388410198718*^9}, + CellLabel-> + "Out[135]=",ExpressionUUID->"f3463b68-71ba-4721-be39-88fe0a25ce95"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991799895862177*^9, 3.9917998977747803`*^9}, - 3.991924340381132*^9},ExpressionUUID->"32c57f0b-017d-d340-92c6-\ -0f56a212e9c3"], + 3.991924340381132*^9}, + CellLabel-> + "In[136]:=",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ @@ -11652,12 +12501,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[122]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], + "In[137]:=",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913265300040226`*^9}, +Cell[BoxData["16.90830383010544`"], "Output", + CellChangeTimes->{3.9913265300040226`*^9, 3.9943884102257433`*^9}, CellLabel-> - "Out[122]=",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] + "Out[137]=",ExpressionUUID->"11bfa5a1-787d-4420-85e6-dde3ffdbbc4d"] }, Open ]], Cell[CellGroupData[{ @@ -11667,12 +12516,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[124]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], + "In[138]:=",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.991326530052025*^9}, +Cell[BoxData["1.739211854028872`"], "Output", + CellChangeTimes->{3.991326530052025*^9, 3.9943884102420397`*^9}, CellLabel-> - "Out[124]=",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] + "Out[138]=",ExpressionUUID->"2b263374-1041-4889-b22b-77047f886dde"] }, Open ]], Cell[CellGroupData[{ @@ -11682,12 +12531,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[127]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], + "In[139]:=",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913265300922585`*^9}, +Cell[BoxData["29.407122452841158`"], "Output", + CellChangeTimes->{3.9913265300922585`*^9, 3.9943884102610292`*^9}, CellLabel-> - "Out[127]=",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] + "Out[139]=",ExpressionUUID->"1313c548-fb04-4482-bec4-faddcd7f39b2"] }, Open ]], Cell[CellGroupData[{ @@ -11877,12 +12726,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[128]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], + "In[140]:=",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[BoxData["0.022635100966331548`"], "Output", - CellChangeTimes->{3.9913265301172295`*^9}, +Cell[BoxData["0.0057105638211202014`"], "Output", + CellChangeTimes->{3.9913265301172295`*^9, 3.994388410288616*^9}, CellLabel-> - "Out[128]=",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] + "Out[140]=",ExpressionUUID->"917fd644-2980-4ba0-ae48-8c5a48319ffd"] }, Open ]], Cell[CellGroupData[{ @@ -11896,12 +12745,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[129]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], + "In[141]:=",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[BoxData["5.890521190513567`"], "Output", - CellChangeTimes->{3.991326530210228*^9}, +Cell[BoxData["11.727500115659074`"], "Output", + CellChangeTimes->{3.991326530210228*^9, 3.994388410423504*^9}, CellLabel-> - "Out[129]=",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] + "Out[141]=",ExpressionUUID->"3d6036df-b30f-4593-ae1e-4580845beeb0"] }, Open ]], Cell[CellGroupData[{ @@ -12093,12 +12942,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[130]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], + "In[142]:=",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[BoxData["0.012260254107801566`"], "Output", - CellChangeTimes->{3.9913265302252293`*^9}, +Cell[BoxData["0.03240724235566243`"], "Output", + CellChangeTimes->{3.9913265302252293`*^9, 3.994388410447258*^9}, CellLabel-> - "Out[130]=",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] + "Out[142]=",ExpressionUUID->"d1332e51-6a1d-432b-8057-9b2658bf81ba"] }, Open ]], Cell[CellGroupData[{ @@ -12112,12 +12961,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[131]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], + "In[143]:=",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[BoxData["8.003781147223087`"], "Output", - CellChangeTimes->{3.9913265303172264`*^9}, +Cell[BoxData["4.922932739589153`"], "Output", + CellChangeTimes->{3.9913265303172264`*^9, 3.9943884105990562`*^9}, CellLabel-> - "Out[131]=",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] + "Out[143]=",ExpressionUUID->"2283fcae-d895-4cc6-a959-36e4d985c4ff"] }, Open ]], Cell[CellGroupData[{ @@ -12210,12 +13059,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[132]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], + "In[144]:=",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.9913265303292294`*^9}, +Cell[BoxData["0.09071336685848984`"], "Output", + CellChangeTimes->{3.9913265303292294`*^9, 3.994388410618157*^9}, CellLabel-> - "Out[132]=",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] + "Out[144]=",ExpressionUUID->"1b822ff3-bb78-48f4-bb9f-bd992c10fe43"] }, Open ]], Cell[CellGroupData[{ @@ -12305,12 +13154,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[133]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], + "In[145]:=",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991326530340416*^9}, +Cell[BoxData["0.9092866331415103`"], "Output", + CellChangeTimes->{3.991326530340416*^9, 3.9943884106372137`*^9}, CellLabel-> - "Out[133]=",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] + "Out[145]=",ExpressionUUID->"1f4b116a-edc9-4ef8-8fab-a3cb026c6577"] }, Open ]], Cell[CellGroupData[{ @@ -12433,12 +13282,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[134]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], + "In[146]:=",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991326530367384*^9}, +Cell[BoxData["0.08248445193168688`"], "Output", + CellChangeTimes->{3.991326530367384*^9, 3.994388410659745*^9}, CellLabel-> - "Out[134]=",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] + "Out[146]=",ExpressionUUID->"f39b6f3d-9389-49c5-82cb-69bfc19903c4"] }, Open ]], Cell[CellGroupData[{ @@ -12453,7 +13302,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -12475,8 +13326,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12500,68 +13350,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991799912745739*^9},ExpressionUUID->"c3883d3a-8a99-644a-9175-\ -a97b5c6c44f4"], + CellChangeTimes->{3.991799912745739*^9}, + CellLabel-> + "In[147]:=",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 135, 73, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265303923836`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8561707149711427`*^-214\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 147, 61, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.99438841068788*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], +In[147]:=",ExpressionUUID->"c4dcaecb-8a7c-4c62-a410-583880f9ad3a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 135, 74, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304013824`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3517874610793157`*^-219\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 147, 62, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994388410695702*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], +In[147]:=",ExpressionUUID->"40eb5020-c506-49b2-b97a-e0f282f246e3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 135, - 75, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304095325`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.936475377013931`*^-224\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 147, 63, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994388410705133*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], +In[147]:=",ExpressionUUID->"0f5f225b-4529-4dc6-8544-fdd988d0f447"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 135, 76, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265304175396`*^9}, +during this calculation.\"", 2, 147, 64, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265303923836`*^9, 3.994388410713829*^9}, CellLabel-> "During evaluation of \ -In[135]:=",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], +In[147]:=",ExpressionUUID->"3af87198-8ab6-4aa0-8e95-47d24b65ed55"], -Cell[BoxData["5.890521190513565`"], "Output", - CellChangeTimes->{3.9913265339749985`*^9}, +Cell[BoxData["11.727500115659058`"], "Output", + CellChangeTimes->{3.9913265339749985`*^9, 3.994388415868772*^9}, CellLabel-> - "Out[135]=",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] + "Out[147]=",ExpressionUUID->"c63cc4d9-106d-4287-8f82-a3d8cf791642"] }, Open ]], Cell[CellGroupData[{ @@ -12576,7 +13430,9 @@ Cell[BoxData[ RowBox[{ SubsuperscriptBox["\[Integral]", "0", "\[Infinity]"], RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -12598,8 +13454,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -12623,68 +13478,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9917999175346184`*^9},ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-\ -bed1f30b804b"], + CellChangeTimes->{3.9917999175346184`*^9}, + CellLabel-> + "In[148]:=",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 136, 77, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340092525`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8561707149711427`*^-214\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 148, 65, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994388415931972*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], +In[148]:=",ExpressionUUID->"b3128f8a-bf63-4eed-b3df-242555f00a77"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 136, 78, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340202503`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3517874610793157`*^-219\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 148, 66, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994388415942391*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], +In[148]:=",ExpressionUUID->"8375104a-cc7b-4c4c-8b4b-d932b4dc6116"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 136, - 79, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340282536`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.936475377013931`*^-224\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 148, 67, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994388415951941*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], +In[148]:=",ExpressionUUID->"30c73665-1c96-4b77-9542-3dd4c12cfde0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 136, 80, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913265340354958`*^9}, +during this calculation.\"", 2, 148, 68, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913265340092525`*^9, 3.994388415960968*^9}, CellLabel-> "During evaluation of \ -In[136]:=",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], +In[148]:=",ExpressionUUID->"24a76da2-b0b1-4728-a5b9-37bfe8757cbe"], -Cell[BoxData["8.00378114722308`"], "Output", - CellChangeTimes->{3.9913265375649567`*^9}, +Cell[BoxData["4.922932739589154`"], "Output", + CellChangeTimes->{3.9913265375649567`*^9, 3.994388421122089*^9}, CellLabel-> - "Out[136]=",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] + "Out[148]=",ExpressionUUID->"5d68dd9a-c96a-42c7-bf9b-feecc83c72db"] }, Open ]], Cell[CellGroupData[{ @@ -12742,92 +13601,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9917999220519733`*^9},ExpressionUUID->"d5c5d0e8-862b-f245-8b21-\ -eac61b5b75d3"], + CellChangeTimes->{3.9917999220519733`*^9}, + CellLabel-> + "In[149]:=",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4Vs0bB3AhlShkTWQvimSXZe7sa0llV5bnOSRJyO8pogVtEuJFiLJk +L2RXKfSqvJGlRJYWz7EnHKTkN/4411yfa2bu+c7MdUbS47QtnZWFhWUEf6vt +mXdKO6ra3+krcN+YvDXPRPpT2eoeRkXIOXidWAz2UIZGgoxRPQoJDi1ctQ3t +Pw4u1WbEzTOafBu7lBHeuNaoFe0xtR6Oxb7+SrghvOA9eimZHxuPXdN+5t4f +lW5k+fDP3QTssd43oefqetD3IVP2JOytw9LO84afUfCnG60p2JY/QrUDWweR +b3rzbBr2sz9jGxkFXxCLzuK5TOwPl4RCKv2+oYUXUsezsac4jMbmVIbRiKFx +Vh42R7S/o+oCzt153KQYW5w3veVM3Qh6FxVgVoZ9QHQ+d8pwAnGXXjzxFJvI +lBJUXD+FbJxCrzVih8sejDzZ+gNF3vDneIPdI9S1N6jgJ+qmDLb3YNOcfE7c +iZ5Bh/0lawexp9NY7pf5zSKz6cVyEnu9lCLPTxUKZcXdaVrETqA1mvIIzKOq +Fbu+NTiXxEPH8D0L8yici//QRmyt3VFTp+oW0d/iEMft2N4ag61jhn+QgzjH +gCX2HOMsO6fcMpqISJ2wx75Yt1FXfv1flMC124mGnQxahV6tK0jEDdmGYdNy +WowCCtbAWIp6ZSV2was7Q5dEWUH5YkF9M/Y0eSw0LpoVDIO2SXVjhypQ5Y/9 +2GAkdXEDhZ3wSFL6h8paGBlIsdZeZKLe9olnf7PWgpv4iqUltsRMldMmAQ5I +eumZ74pdpHYgXnGBA7Qidl+6gt1Uc36Nb9168D/anN2JTTV2Do4YcsFXJq0+ +8hcT8Vlx8YQ84wIHrYSyDGzlLiPg1uaGln1nhGuxfb5XZO5V2gS8FzVUp7H9 +WVuV9bh4AL1dznZfYqJhqZKfkfO8wNrGft7xNz4f4s2GNlU+WNI9evI8Nmsh +U1L4DB/MiLi2pmJLqG63LRjng6jBxP5BbCfD2LJ3Q1uAefC57qk/TNTmGRAo +9FYAxgf+mUpbZqKBhzE33dYLgrpxRV8T9sR4QVa+sSAcEk3SmsTmDPrWqdMg +CFJE3n70l4mMIo6ouVUIQZmoSNwIdm22BpWXIQIh0QuyNiwkyh5eCt4XJAaq +KfuVAtlIZHb06kBgsRj8p/AwPAd7ommLSTFTDNQZySo92GrZuwUkHMVhsV/y +qT47iZo8jpWv1d8Ovo6jNJ61JJr5MfS/kSsS0HF/G8srDhJtOWX0pNxaCjze +Lpw8z0kiZjant42PFPzILZ2uxq7+3C46GSUFGtJCHxewXaxcr8g1SIG592hL +8Eacb1ewbYqKNPR5vYFzXHj9sYfTYUIykP7gwuXYTSQ64rVR0eKLLLAGLR5d +v4VEKPioiv2yLMiLKNw9hK0QmaFJE5EDhzE33VRslixVg7BDcuCx9PXuHn4S +FQ8425e9kINnl50bXARIxGFXdGnrgx3gHK5V0iKE8xlZfxjzkIfK0Ofi5DYS +ZR1O6lsIk4f7T/nkdMVIFOPxZYg9VR4YSok347BpF8+Oi3fi8fqKZ/TEScRb +n85y2FABAp+/z03ZTiIf1SmFOuldYLCg+NRTikSiUrfDb37fDSYPr2Xq7yRR +/Y05+V+sihBtfCv/IbbLrGMXIakIBzPTJXnlSXSvSUbe4JgizCaOHhvGlvKq +7Vj8qAgb1L023dmF91s0LEu8VYK41iYDtj0kEhMVJyQclUExs3GzpgaJducE +cf1GKpA66Fg5YUwiD9oVSvGACmzNGyv1NiFRsnT8gJuLCpS6Pto0jM324NHj +VwwVsA39PD5gSqLee2NH4ktVIFt/We2jOYmuJ7uly0urgmnQVvZea3y/N62U +HDjUoCeYO3unHYnuB8jYVLSqQwjR7jbmRaL2YKQZkaMN5/7d7pp7h0SSx7oP +uPrqweXUcKu0ZhLRVypLxM4B+CYKhFxdIpHQePU6IQ8DGC65bv9p3wgKUtX9 +HK9gBBwSTuOBF0aQx+Sfli1jxmB5VyZmqmkEFRsErstoM4VgoYz2QJFRlD3n +86IowRwu/s20/+o3ihb3C//XFG4JT/nG6ws7RlE/C9vPL+7WEMNeyT2iM4b8 +tp2OvSR9EErHImnXssdQyYmWhsRIGxCzC1fnEhtH52dFFnadOARyhZmF/Anj +iLIwsfv3uC2cKNIoEd42gbSd4/YPHzoMLaKNZGreBOoQSfdpUj0CDIMkr4a9 +k2hr7pX6vJ1HoUc6lbutdRJVDylYHeC2g803WzTNPKeQeNe0V/CkHVTu4E7s ++j2FVBPjirKG7OGkpr3ctdwfKJ19Vim+0QGyPzNOSchOo8r9e3ojaxyBmwg2 +mQufRsmaN3j/FDjBfDTP7+HeadTWlxOlGu0M3PHSr2eUf6IK6zQZ/4suIF0W +3L3z9k/089RhFj+aK1zd0dlzgfyJKBN57ynDY9Ae0t38W28G5U1+WgzUOI7f +26vC8qkzyOF+jqcrlxuQ+psLh6dnUHmZ5XG2q27QK8BT3Wc5i7RFO35d/+UG +grSqTWb3ZpH0kFfv+xPu8KlviBKZmEXfN548mPbNHVqnGiUDdedQe8wBT9Oj +HpCA7s3PXJ5DCYyMjWfbPeBQ85G08tdzqP7Zyi9Pc0+gN4RyV6+n0GYXuKpa +6wk8zOZECT0KSfD/27at3hP07AfCKGzlVmthjmeecLC7f/S1PoVsdZ3ze154 +gvbID6MzQKGEbcFvL7z2hImd85y1hhTa2l+4uaXHE25fZZSrWlBI5phQsssC +Hn+k1f2VHYW03abyItVocNb9eYebH4VyU6YDD2jQAPx1eTacphB/54y+kBYN +BHff+PgYe8p4oStPhwYGTBm2FX8Kv18sa1oNaNDSq/k2MZBCmxZ4HfkO0YDP +h5ejmEGh77fUN2ScokHcGkXapcsUiqkLPVGdS4OSBoPxugQKnVJJ0mbk0WBK +vZHXMJFCVvmlG7QKaMB77XDDa2zOJGZ+VTEN5CzNK7r/oVBkgM1Y5RMaHOfl +/0MmUyhUXuZkxUsaHGmpGaXSKOST9Na3bIAGQf/VFFdmU8h8E1M3YIgGoZzN +hUo5FNoZycKt8pUGe9WU9+RiMwPUi0uHcT2b7uY7uRRyP5Ax+XiCBv9j3al8 +Io9CDmsD/R4t0aAB7pJ/CilkGrjVv0iQDh3rhJz/LaPQy4woi3hhOjzLCajV +KqeQbuuMDGMrHcw0c6PysZVl334yFKeDUvQ++vUnFBL5GGLYJ0uHDzeztAwq +KTS+r1+QU50OPr7Kssk1FLrNmvnU6zAd9OoGL3Y9x/vfw5VsfZQOc5I+h1Qb +KBThzAhQtacDb4VidBw244nNjhUnOoSK8YPVC5yfWBP3jwcd0mMPZNS+pJDq +Gw9a8xk6jGQf3xXSTKGPcbIbpWPpwBKjuXLjDYVKELf3SBwdSJ2Y7++xIybn +morv0CGqMcVY+C2FVMybwrSS6JByMf18FnYMi+eM9T06TGaslJS3UsjkdOYn +RhEdwrJqNOreUUhM7JqGfgnOH1Hx/hf23JvTd9ge4/la+aRmG4UeyCHrmHI6 +eHNYRZRhL/f3N2TV0oGr+mD4/XYKPbESzXvXQgdJJYlAooNCN5dY1ya8oUOE +UEZ1GrZH3pi7YyteT8Cf0YHNw14r+r2NDs/5vxK6nRTyrXO4/esD3n/JyvKG +LgpJK/wTLDNMBxU9He7obgotfbzQOcqkg3VA3GwNdnskXfnRCB12RxUeJrHD +vqiNaU/QQWyJ8xJ8oFBvcqfrwVk66AjevT2BHb+O1/j8GgJMvI6f3dVDofqZ +fucgNgJsti+ZHsUm+wsC/NYSYKdXGxCGrfvEKNNjAwEGElHt77CZbozfFrwE +7O45UuT1Cee3MuYz3kJALJ8UisbW0eSTRwIELNLa5B9jx3IX2amKEGB/uoBj +frW/drBUVJIAIf6b/ed6KUTkFLUISBPgy3ZJKQU7Nvbc4GZZAix4RT9WYTOJ +Ldzs8gTctZXYM7vav8XUe0KZgGTpml/ufRSq/bslnKlCgFqN8LpQ7OHRocQh +NQLa2kZPJmLvazjf2KVFwNKv1zqvsL/7log/BQJ42yZmt3/G/7tDiHqVAQHz +M/vr1bC1Dc2sSo0IyHQZ7DPDjhH5ei7HjABK8YvEaexq9kexGRYE8HHqmVzC +/vYj5GGKFQED/O0v47G1Xgl037Ih4Kxe9ItybI/Sr+NXbQkY+1Ns2Ih9K+0R +6+UjBLgoLW7rwP4aYK4c7EDAcsti1yQ29zFBU38nAozX5JcvrdYz/+bq40LA +S/Ozoxz9eP72CzePuRGAzOydxLCrOS0eOHgQsLLklbgD+yslWGNLI+BU1Y0d +e7G5v3xrsyIIUHd6yrMPW6v1MdPEm4D64WUbA2yPqgvL4EOA3GWLEfPV+g8s ++HV8CbC9cP+DzWr9W0K71P0I6LRYs81+tT7j+/49/gRwRXhXu2Bz0Uod5APw +eYx0F7pjax4MOy0dRECVs9k8fbX+PssosWB8f6PPkk5gR8sKpwsxCNj0UivW +F7uSZ7ic9zwBijoVg37YX36XvtkYitdrV43yX61Phn1ZG0ZAosyTK2ewNTos +F1fCCfiwrN6z6v8DXDAlcg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12841,104 +13702,106 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV1Hk4Vs0bB3AhlShkTWQvimSXZe7sa0llV5bnOSRJyO8pogVtEuJFiLJk +L2RXKfSqvJGlRJYWz7EnHKTkN/4411yfa2bu+c7MdUbS47QtnZWFhWUEf6vt +mXdKO6ra3+krcN+YvDXPRPpT2eoeRkXIOXidWAz2UIZGgoxRPQoJDi1ctQ3t +Pw4u1WbEzTOafBu7lBHeuNaoFe0xtR6Oxb7+SrghvOA9eimZHxuPXdN+5t4f +lW5k+fDP3QTssd43oefqetD3IVP2JOytw9LO84afUfCnG60p2JY/QrUDWweR +b3rzbBr2sz9jGxkFXxCLzuK5TOwPl4RCKv2+oYUXUsezsac4jMbmVIbRiKFx +Vh42R7S/o+oCzt153KQYW5w3veVM3Qh6FxVgVoZ9QHQ+d8pwAnGXXjzxFJvI +lBJUXD+FbJxCrzVih8sejDzZ+gNF3vDneIPdI9S1N6jgJ+qmDLb3YNOcfE7c +iZ5Bh/0lawexp9NY7pf5zSKz6cVyEnu9lCLPTxUKZcXdaVrETqA1mvIIzKOq +Fbu+NTiXxEPH8D0L8yici//QRmyt3VFTp+oW0d/iEMft2N4ag61jhn+QgzjH +gCX2HOMsO6fcMpqISJ2wx75Yt1FXfv1flMC124mGnQxahV6tK0jEDdmGYdNy +WowCCtbAWIp6ZSV2was7Q5dEWUH5YkF9M/Y0eSw0LpoVDIO2SXVjhypQ5Y/9 +2GAkdXEDhZ3wSFL6h8paGBlIsdZeZKLe9olnf7PWgpv4iqUltsRMldMmAQ5I +eumZ74pdpHYgXnGBA7Qidl+6gt1Uc36Nb9168D/anN2JTTV2Do4YcsFXJq0+ +8hcT8Vlx8YQ84wIHrYSyDGzlLiPg1uaGln1nhGuxfb5XZO5V2gS8FzVUp7H9 +WVuV9bh4AL1dznZfYqJhqZKfkfO8wNrGft7xNz4f4s2GNlU+WNI9evI8Nmsh +U1L4DB/MiLi2pmJLqG63LRjng6jBxP5BbCfD2LJ3Q1uAefC57qk/TNTmGRAo +9FYAxgf+mUpbZqKBhzE33dYLgrpxRV8T9sR4QVa+sSAcEk3SmsTmDPrWqdMg +CFJE3n70l4mMIo6ouVUIQZmoSNwIdm22BpWXIQIh0QuyNiwkyh5eCt4XJAaq +KfuVAtlIZHb06kBgsRj8p/AwPAd7ommLSTFTDNQZySo92GrZuwUkHMVhsV/y +qT47iZo8jpWv1d8Ovo6jNJ61JJr5MfS/kSsS0HF/G8srDhJtOWX0pNxaCjze +Lpw8z0kiZjant42PFPzILZ2uxq7+3C46GSUFGtJCHxewXaxcr8g1SIG592hL +8Eacb1ewbYqKNPR5vYFzXHj9sYfTYUIykP7gwuXYTSQ64rVR0eKLLLAGLR5d +v4VEKPioiv2yLMiLKNw9hK0QmaFJE5EDhzE33VRslixVg7BDcuCx9PXuHn4S +FQ8425e9kINnl50bXARIxGFXdGnrgx3gHK5V0iKE8xlZfxjzkIfK0Ofi5DYS +ZR1O6lsIk4f7T/nkdMVIFOPxZYg9VR4YSok347BpF8+Oi3fi8fqKZ/TEScRb +n85y2FABAp+/z03ZTiIf1SmFOuldYLCg+NRTikSiUrfDb37fDSYPr2Xq7yRR +/Y05+V+sihBtfCv/IbbLrGMXIakIBzPTJXnlSXSvSUbe4JgizCaOHhvGlvKq +7Vj8qAgb1L023dmF91s0LEu8VYK41iYDtj0kEhMVJyQclUExs3GzpgaJducE +cf1GKpA66Fg5YUwiD9oVSvGACmzNGyv1NiFRsnT8gJuLCpS6Pto0jM324NHj +VwwVsA39PD5gSqLee2NH4ktVIFt/We2jOYmuJ7uly0urgmnQVvZea3y/N62U +HDjUoCeYO3unHYnuB8jYVLSqQwjR7jbmRaL2YKQZkaMN5/7d7pp7h0SSx7oP +uPrqweXUcKu0ZhLRVypLxM4B+CYKhFxdIpHQePU6IQ8DGC65bv9p3wgKUtX9 +HK9gBBwSTuOBF0aQx+Sfli1jxmB5VyZmqmkEFRsErstoM4VgoYz2QJFRlD3n +86IowRwu/s20/+o3ihb3C//XFG4JT/nG6ws7RlE/C9vPL+7WEMNeyT2iM4b8 +tp2OvSR9EErHImnXssdQyYmWhsRIGxCzC1fnEhtH52dFFnadOARyhZmF/Anj +iLIwsfv3uC2cKNIoEd42gbSd4/YPHzoMLaKNZGreBOoQSfdpUj0CDIMkr4a9 +k2hr7pX6vJ1HoUc6lbutdRJVDylYHeC2g803WzTNPKeQeNe0V/CkHVTu4E7s ++j2FVBPjirKG7OGkpr3ctdwfKJ19Vim+0QGyPzNOSchOo8r9e3ojaxyBmwg2 +mQufRsmaN3j/FDjBfDTP7+HeadTWlxOlGu0M3PHSr2eUf6IK6zQZ/4suIF0W +3L3z9k/089RhFj+aK1zd0dlzgfyJKBN57ynDY9Ae0t38W28G5U1+WgzUOI7f +26vC8qkzyOF+jqcrlxuQ+psLh6dnUHmZ5XG2q27QK8BT3Wc5i7RFO35d/+UG +grSqTWb3ZpH0kFfv+xPu8KlviBKZmEXfN548mPbNHVqnGiUDdedQe8wBT9Oj +HpCA7s3PXJ5DCYyMjWfbPeBQ85G08tdzqP7Zyi9Pc0+gN4RyV6+n0GYXuKpa +6wk8zOZECT0KSfD/27at3hP07AfCKGzlVmthjmeecLC7f/S1PoVsdZ3ze154 +gvbID6MzQKGEbcFvL7z2hImd85y1hhTa2l+4uaXHE25fZZSrWlBI5phQsssC +Hn+k1f2VHYW03abyItVocNb9eYebH4VyU6YDD2jQAPx1eTacphB/54y+kBYN +BHff+PgYe8p4oStPhwYGTBm2FX8Kv18sa1oNaNDSq/k2MZBCmxZ4HfkO0YDP +h5ejmEGh77fUN2ScokHcGkXapcsUiqkLPVGdS4OSBoPxugQKnVJJ0mbk0WBK +vZHXMJFCVvmlG7QKaMB77XDDa2zOJGZ+VTEN5CzNK7r/oVBkgM1Y5RMaHOfl +/0MmUyhUXuZkxUsaHGmpGaXSKOST9Na3bIAGQf/VFFdmU8h8E1M3YIgGoZzN +hUo5FNoZycKt8pUGe9WU9+RiMwPUi0uHcT2b7uY7uRRyP5Ax+XiCBv9j3al8 +Io9CDmsD/R4t0aAB7pJ/CilkGrjVv0iQDh3rhJz/LaPQy4woi3hhOjzLCajV +KqeQbuuMDGMrHcw0c6PysZVl334yFKeDUvQ++vUnFBL5GGLYJ0uHDzeztAwq +KTS+r1+QU50OPr7Kssk1FLrNmvnU6zAd9OoGL3Y9x/vfw5VsfZQOc5I+h1Qb +KBThzAhQtacDb4VidBw244nNjhUnOoSK8YPVC5yfWBP3jwcd0mMPZNS+pJDq +Gw9a8xk6jGQf3xXSTKGPcbIbpWPpwBKjuXLjDYVKELf3SBwdSJ2Y7++xIybn +morv0CGqMcVY+C2FVMybwrSS6JByMf18FnYMi+eM9T06TGaslJS3UsjkdOYn +RhEdwrJqNOreUUhM7JqGfgnOH1Hx/hf23JvTd9ge4/la+aRmG4UeyCHrmHI6 +eHNYRZRhL/f3N2TV0oGr+mD4/XYKPbESzXvXQgdJJYlAooNCN5dY1ya8oUOE +UEZ1GrZH3pi7YyteT8Cf0YHNw14r+r2NDs/5vxK6nRTyrXO4/esD3n/JyvKG +LgpJK/wTLDNMBxU9He7obgotfbzQOcqkg3VA3GwNdnskXfnRCB12RxUeJrHD +vqiNaU/QQWyJ8xJ8oFBvcqfrwVk66AjevT2BHb+O1/j8GgJMvI6f3dVDofqZ +fucgNgJsti+ZHsUm+wsC/NYSYKdXGxCGrfvEKNNjAwEGElHt77CZbozfFrwE +7O45UuT1Cee3MuYz3kJALJ8UisbW0eSTRwIELNLa5B9jx3IX2amKEGB/uoBj +frW/drBUVJIAIf6b/ed6KUTkFLUISBPgy3ZJKQU7Nvbc4GZZAix4RT9WYTOJ +Ldzs8gTctZXYM7vav8XUe0KZgGTpml/ufRSq/bslnKlCgFqN8LpQ7OHRocQh +NQLa2kZPJmLvazjf2KVFwNKv1zqvsL/7log/BQJ42yZmt3/G/7tDiHqVAQHz +M/vr1bC1Dc2sSo0IyHQZ7DPDjhH5ei7HjABK8YvEaexq9kexGRYE8HHqmVzC +/vYj5GGKFQED/O0v47G1Xgl037Ih4Kxe9ItybI/Sr+NXbQkY+1Ns2Ih9K+0R +6+UjBLgoLW7rwP4aYK4c7EDAcsti1yQ29zFBU38nAozX5JcvrdYz/+bq40LA +S/Ozoxz9eP72CzePuRGAzOydxLCrOS0eOHgQsLLklbgD+yslWGNLI+BU1Y0d +e7G5v3xrsyIIUHd6yrMPW6v1MdPEm4D64WUbA2yPqgvL4EOA3GWLEfPV+g8s ++HV8CbC9cP+DzWr9W0K71P0I6LRYs81+tT7j+/49/gRwRXhXu2Bz0Uod5APw +eYx0F7pjax4MOy0dRECVs9k8fbX+PssosWB8f6PPkk5gR8sKpwsxCNj0UivW +F7uSZ7ic9zwBijoVg37YX36XvtkYitdrV43yX61Phn1ZG0ZAosyTK2ewNTos +F1fCCfiwrN6z6v8DXDAlcg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7175969733656633, + 1.3665636487711388`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7175969733656649}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12950,21 +13813,21 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, - 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7175969733656633, + 1.3665636487711388`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7175969733656649}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12978,102 +13841,104 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VdsbB3AJUYiEEJmLKJFZ1qvjUEKKMibOOXuThEy5iNzS7SZdStOT -UklJKHPhijQoR4RSfly0OeZ5OkfUb/ljP/v5PO/a3/XutZ69nq3CCD5I8PPx -8f3A1/L95Kdtm8uaPllWXpsxpP/BQ5ZjDw0Z1rnoWRbnuTV2d4ZRmrp1Jfog -/E6Fhu3EahASNXiLvmhevQDYBVHxtYLWbNSR69hngf33uw3V8Tmf0YZknrEJ -9sumk3cX9b+gX7/SzuhjD7V/jP2j4hvSild9tRVbvk/Nc47WgSIaM6fVsPeN -x5qGsbvQjzl5JQXsqsWhNVE5Pei51UVLSeyvCbIxpUEU2mU14yKEPSZkPTSj -34fU2Z6+C1E8JHQpxN1gnoNUf9UyR7GVJO/UnawYQPImel5d2I4Kc4/GaCMo -8r7a9mps8p6qjK7wGPIbKRR5hh2vsT/xOHschUcebk/H/ibbuiM8ZxI5nBo9 -EoHN8gg4dvXSFMrUH5bwwZ5I57tfGDSNhEsly/diC6vqSkzqz6KeaxNjcthp -rFpbCek5xDhaEs2HrfzYPX77/BwSqq9Y7DvFQyY658dOVHDRKo8nVB62v1EX -e4i2iL5pft+1A3smKkJgteYS2jIWHbsW+0zFGgst4V9o08/0gpFIHroJJk/9 -2L/Rgsv535nYrKw669CcFSCxaVFbCDvn3dXuBAV+kN2Tq9QRgfvt945NvcQP -7qk6IgXYsdqzRc+DVsKLpI+vXbHTnqmojesLAtfl3Yeb4TzU3jRS9StTEOZa -UASJrTxV5iEuLQS9UUOyBti5Ox2v6M4LgUyDMO1DGA+9eRm9IrBCGD5Xj+8Y -DOWh2dqWrgGaKNwYOxU/H8JD6+xFJWKqRGGFlRkvH1uv1RrETMVAspKyILAD -ekvu7dgmDmXeNqqfgnkohJ+tt0tUAij9r36pQTzUp5o/mTgnCVXnC6Y7j+P1 -IT+KNBqsA4FmU9k/sfmfclQ2nFwHZ49aCGlgKxtsOpgzvA6Kq1Rs/QJ4yIOW -UvipWwrqjdNdO/15qJEZGiZbLw2Lq2ca/iF46L/Hl5N8hGXAjaZTpow9MpyT -+YQuA9lRn048Z/HQ6nCqxbxaBpjO32lsJg9Zn3PZ6VMiCy5C367P+vJQ+UOj -2ewMObhsqcgV9+ahh30LkWbhiuAtyio7coiH9hz667+wPEWIed+T0OyC899I -2eRxFGEOedNtsHc+1JFWdleChTZOmbYzXk+Gd5Gg5SZwRQ77+514aGq8+9TA -WWWwDVvy327PQ1InrIuLHFSB9abDd9GKhzgPV/s7BahCbFDMTSfsFx1NCqPn -VUG2eEdDJvCQl/2Rs5rVqpCsfGuHLcL9bY08eEtfDSQaHIYTLPD8Q48n4mTV -oZs+YffeiIdc/Nbo2vVoAOPpguhVbR5CkYf0XZc0oOLeVWa9Fg9pJ2YYs+Q0 -YX6LWh0/Nl+mwe64A5pwtXqkImgzD+X95+laWKMJsQ1Zzubq+Ps8nJsg/2Az -+HRahTxWxP1ZO3wdYmgBEfGtgb2WhxRU/4lP6tWBhMbbdLdJLqq8OKPF49cF -doxnI5rgIq9p91ZSRRfyVNvtNce56O4bda3d3rqw3cFFfWKEi1T9ypu5bbog -My3ieGqAi7Rz+zTI+m1QrPOqxbmLixQVlEhldz1Aiinjtmwu0skKF/2J9KH7 -bc/x7ZlcdD9U3amEbQiB+0fOONlzUVMkMj6XZQobuzdFxXXPIxXvL45HAnfB -ibfpwqcC5hHxuzRf8Q+Ai1Inz4pPzyHZ4RerZBm7IWS9fOnmY3Mo3MCi44q2 -NfgkMZfkfswixuhindQQHWLehRaZu8+ivN1hqzIabaFvpkuKVjODHs4E1OSm -7YWOba/1k3fMIK7VhoY38ftA0lRyYP21adTJt3Kyx9cBjtbKla9anEJBG4NT -EtT2AxH2ef590BTKP1ZXfS3RCXwn/xeo9m0SRU/LzW89dgAKhk8I5ThOolk7 -m8Pvjx6EE6rsXPa/E8jUM9Wq74Az+Cf1PbHdOYGa5e4EvDFwAZnHO6/onBxH -8o/OVmZvOQSWox1VmcFj6EW3tr2j2GFQZETVPf57FCm1TvhFjh6GGib5kF44 -ggyupeZmdrvC9KOzN9a3DqM7AtPbrtS6Af9ZR76UtcOo1Gp7e+JLd1grbmzh -ZTOEbhpflFzM8YCafOmy7EuDqPF/WecNLnmC1xvzzV2DA6jEIV095IwXvJ6d -rDljPYAmTzjzBbGOwGf7WLpfcT+atdHyH6N5Q9uh4yNJev0oe/Q7N8zoKBwf -O/P736cc5HY/i3lE1AceXfgqZGbKQUWF+46u/MsHTt1ukBF934dMFZp5f/N8 -YFLwu+YFog+pdfu1fz7mCytmztDMxftQ75rj+9MpXzDWO2N3/UUvarrsyLQ9 -xIBEbm74eEgvSovKWBPRxADfjAK6rE4vqqz6zWPuZcIVCZt0g0kKrfWCvwzK -mZDYrN3ZVUMh5fXvGzdWMqHHwzVNFVuP7bBBqIoJ2zyFWohqCh208HzyrYYJ -Z/prOaNVFErbGFl/+gMT2m49JgUqKSTf+XRt3TcmTNCiX9mVUkjdW/am1zwT -jKRGUy2eUsjUZyw7cScLmlbXFhdep9CjWxNhjkYs6Ahvd1HBXt8yZSlrwoLP -79ceS7lGoTH6fGu2OQu8lF6OBqdR+DzgW8HezYJg0s5v5xUKic9Luq87wALH -mevSLckU6k02FMk4wQKXWd8dfokUOvDeuNUvGNej4/b0nqNQFZ9Zht5JFiwd -HWr2xb4VZmn4OpwFJl9uWHmfpZCju61vXwwLfqKMRK8ECr1Ud3+59SILBFo2 -ZQadptDlithjLx6xYNWn2dWDERQ6oX/DNCqbBb0O4x8ise2fFIiY5LDAzF94 -XgB79Q3Ok7I8FlQ2nrutGk6hxFCnodJiFtzTkRVjhlIoVkv9eMlrFnAETC5z -8X9DwI36wML/WMB/X4YT4U+hveIci9BuFpTEMY5KYm9J5BPT/8GCw1b6Nnl+ -FOKEGuYV9LEgYfc+Lw5JIV/HjNHnIywI6O59coSgkJtgWNCzBZzX2vLOh0Eh -2zD5kFwZAoZa/h584UWh1xnn7a5sICBm/n2+B7YFe0o9Sp6AosuOM4ueeP81 -6r/TlAjI5yrz0bDl2mJo/9MgIN5tv/wXdwoNm3XKrDYkYIaZ7CLpSqF/+O/9 -6+dMgHD9x1eDB/D7bxe96XCIAKPetnO3sc95RoUauBLQ7nHrgwN2VLHT5t8e -BGg/3NJc5IT7J1ekXmcQ4LYg0JW4n0IGHxmstycJaEvX7bVyoFBbqsYatRQC -7o0FJMjtpVA+EvMfSCVgXceIZ9cenD868ybvKgFr6o2zsrD1976JM7lBgOsX -xXMG2Jf5mFMOdwm40NwV6mJLIZvge9+jcgkYVJmTfEqnkKLiBSPLfALMzza0 -ncKe+Rh8deVzAuo6rEXp2A80kcPlIgI0hkVquq0ptNTZWZ1ZTkD/y6fuitjF -9grZn+oI+EI/QH+6m0JJC/yCaR8JcHZZPxOHzcge8nVnE/AgzlnSGVtCoFyh -t5GAid5dNxatKBRY4fYP7ysBBo4Xm1yw1bSvR6r3EXDaxmFeDii00Ha6ZZBD -wOKGvksziEJNiYTeswG8X+7tKY3YcT07h0xHCBDV+0qdx26/2XJk/zQBNbeo -kgVLCl1ZJUmPXkHCndJB4fldFKqc6vQMX0mCzmmRX63Y/Z05oUGCJFy6lxJb -hG1RbH2PIYLrag3Sodgcn6ifdpIk5PV8eDFrgfu3p6+jS5GwtGmc24ZtbrxO -C0mT8Kwt8HU5dopY7mEDORJq2wMmE5br5V0FCiokRAvTXslgk1m5ddJqJGws -XNq7ZI7Hp/zRtVaDhDVzK717sTmklJiAFgm3I0dVipfrUrb+I3okKNLE5Dyw -y39JxXP0SbAMXhq1xu4b7L7WvZMENc9t9nrYZtXRta0mJDDuOjwUxu4NzFf6 -F3A/9b61r8zw+eEWY1i2G+eXGv/Ixzal7bEvsCbBL4l+8S72Zbkff2TtISFc -RTAyHvuFwLOUDDsSdMVLXoZgU+Mxj2/Zk1Blfus8A9vknfSXZCcSdov8rLDF -ZhT8GP7rIAkHpE+pm2Mnpz/j/9OFhMNm6jLbsX+E7tWLdCMhgm/ttQ3YYt4y -tiEeJBg67lMVX87bSx0J8CLBQ7zURGD5+U2nk7x9SJC4uX7FlCnuZ7XdAzcG -CQOOq4oGsX/Myrw8yCKBfVBzrAdbrIdqtCdJuLDtZGE7tgn7OcfGn4T1Ef2/ -W7AZZaeXIIAEn5oLXxuwkx/YrTcPJCGr1MWobjk/WXarYRAJk7/tNtUu50f1 -Wm0PISHZ6XhqFbYoq8BNKxTPxyy5VI5tvD8uWC0c7+fSFsmy5XyzfecVI0no -73+rVIx9SWPDHdkoPH4+qaQAu1Sir0gymoQA4Zgvz7B7fhZ8XBNLwp9LV+Ly -l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx +1:eJwV1Hk4Vs0bB3AhlShkTWQvimSXZe7sa0llV5bnOSRJyO8pogVtEuJFiLJk +L2RXKfSqvJGlRJYWz7EnHKTkN/4411yfa2bu+c7MdUbS47QtnZWFhWUEf6vt +mXdKO6ra3+krcN+YvDXPRPpT2eoeRkXIOXidWAz2UIZGgoxRPQoJDi1ctQ3t +Pw4u1WbEzTOafBu7lBHeuNaoFe0xtR6Oxb7+SrghvOA9eimZHxuPXdN+5t4f +lW5k+fDP3QTssd43oefqetD3IVP2JOytw9LO84afUfCnG60p2JY/QrUDWweR +b3rzbBr2sz9jGxkFXxCLzuK5TOwPl4RCKv2+oYUXUsezsac4jMbmVIbRiKFx +Vh42R7S/o+oCzt153KQYW5w3veVM3Qh6FxVgVoZ9QHQ+d8pwAnGXXjzxFJvI +lBJUXD+FbJxCrzVih8sejDzZ+gNF3vDneIPdI9S1N6jgJ+qmDLb3YNOcfE7c +iZ5Bh/0lawexp9NY7pf5zSKz6cVyEnu9lCLPTxUKZcXdaVrETqA1mvIIzKOq +Fbu+NTiXxEPH8D0L8yici//QRmyt3VFTp+oW0d/iEMft2N4ag61jhn+QgzjH +gCX2HOMsO6fcMpqISJ2wx75Yt1FXfv1flMC124mGnQxahV6tK0jEDdmGYdNy +WowCCtbAWIp6ZSV2was7Q5dEWUH5YkF9M/Y0eSw0LpoVDIO2SXVjhypQ5Y/9 +2GAkdXEDhZ3wSFL6h8paGBlIsdZeZKLe9olnf7PWgpv4iqUltsRMldMmAQ5I +eumZ74pdpHYgXnGBA7Qidl+6gt1Uc36Nb9168D/anN2JTTV2Do4YcsFXJq0+ +8hcT8Vlx8YQ84wIHrYSyDGzlLiPg1uaGln1nhGuxfb5XZO5V2gS8FzVUp7H9 +WVuV9bh4AL1dznZfYqJhqZKfkfO8wNrGft7xNz4f4s2GNlU+WNI9evI8Nmsh +U1L4DB/MiLi2pmJLqG63LRjng6jBxP5BbCfD2LJ3Q1uAefC57qk/TNTmGRAo +9FYAxgf+mUpbZqKBhzE33dYLgrpxRV8T9sR4QVa+sSAcEk3SmsTmDPrWqdMg +CFJE3n70l4mMIo6ouVUIQZmoSNwIdm22BpWXIQIh0QuyNiwkyh5eCt4XJAaq +KfuVAtlIZHb06kBgsRj8p/AwPAd7ommLSTFTDNQZySo92GrZuwUkHMVhsV/y +qT47iZo8jpWv1d8Ovo6jNJ61JJr5MfS/kSsS0HF/G8srDhJtOWX0pNxaCjze +Lpw8z0kiZjant42PFPzILZ2uxq7+3C46GSUFGtJCHxewXaxcr8g1SIG592hL +8Eacb1ewbYqKNPR5vYFzXHj9sYfTYUIykP7gwuXYTSQ64rVR0eKLLLAGLR5d +v4VEKPioiv2yLMiLKNw9hK0QmaFJE5EDhzE33VRslixVg7BDcuCx9PXuHn4S +FQ8425e9kINnl50bXARIxGFXdGnrgx3gHK5V0iKE8xlZfxjzkIfK0Ofi5DYS +ZR1O6lsIk4f7T/nkdMVIFOPxZYg9VR4YSok347BpF8+Oi3fi8fqKZ/TEScRb +n85y2FABAp+/z03ZTiIf1SmFOuldYLCg+NRTikSiUrfDb37fDSYPr2Xq7yRR +/Y05+V+sihBtfCv/IbbLrGMXIakIBzPTJXnlSXSvSUbe4JgizCaOHhvGlvKq +7Vj8qAgb1L023dmF91s0LEu8VYK41iYDtj0kEhMVJyQclUExs3GzpgaJducE +cf1GKpA66Fg5YUwiD9oVSvGACmzNGyv1NiFRsnT8gJuLCpS6Pto0jM324NHj +VwwVsA39PD5gSqLee2NH4ktVIFt/We2jOYmuJ7uly0urgmnQVvZea3y/N62U +HDjUoCeYO3unHYnuB8jYVLSqQwjR7jbmRaL2YKQZkaMN5/7d7pp7h0SSx7oP +uPrqweXUcKu0ZhLRVypLxM4B+CYKhFxdIpHQePU6IQ8DGC65bv9p3wgKUtX9 +HK9gBBwSTuOBF0aQx+Sfli1jxmB5VyZmqmkEFRsErstoM4VgoYz2QJFRlD3n +86IowRwu/s20/+o3ihb3C//XFG4JT/nG6ws7RlE/C9vPL+7WEMNeyT2iM4b8 +tp2OvSR9EErHImnXssdQyYmWhsRIGxCzC1fnEhtH52dFFnadOARyhZmF/Anj +iLIwsfv3uC2cKNIoEd42gbSd4/YPHzoMLaKNZGreBOoQSfdpUj0CDIMkr4a9 +k2hr7pX6vJ1HoUc6lbutdRJVDylYHeC2g803WzTNPKeQeNe0V/CkHVTu4E7s ++j2FVBPjirKG7OGkpr3ctdwfKJ19Vim+0QGyPzNOSchOo8r9e3ojaxyBmwg2 +mQufRsmaN3j/FDjBfDTP7+HeadTWlxOlGu0M3PHSr2eUf6IK6zQZ/4suIF0W +3L3z9k/089RhFj+aK1zd0dlzgfyJKBN57ynDY9Ae0t38W28G5U1+WgzUOI7f +26vC8qkzyOF+jqcrlxuQ+psLh6dnUHmZ5XG2q27QK8BT3Wc5i7RFO35d/+UG +grSqTWb3ZpH0kFfv+xPu8KlviBKZmEXfN548mPbNHVqnGiUDdedQe8wBT9Oj +HpCA7s3PXJ5DCYyMjWfbPeBQ85G08tdzqP7Zyi9Pc0+gN4RyV6+n0GYXuKpa +6wk8zOZECT0KSfD/27at3hP07AfCKGzlVmthjmeecLC7f/S1PoVsdZ3ze154 +gvbID6MzQKGEbcFvL7z2hImd85y1hhTa2l+4uaXHE25fZZSrWlBI5phQsssC +Hn+k1f2VHYW03abyItVocNb9eYebH4VyU6YDD2jQAPx1eTacphB/54y+kBYN +BHff+PgYe8p4oStPhwYGTBm2FX8Kv18sa1oNaNDSq/k2MZBCmxZ4HfkO0YDP +h5ejmEGh77fUN2ScokHcGkXapcsUiqkLPVGdS4OSBoPxugQKnVJJ0mbk0WBK +vZHXMJFCVvmlG7QKaMB77XDDa2zOJGZ+VTEN5CzNK7r/oVBkgM1Y5RMaHOfl +/0MmUyhUXuZkxUsaHGmpGaXSKOST9Na3bIAGQf/VFFdmU8h8E1M3YIgGoZzN +hUo5FNoZycKt8pUGe9WU9+RiMwPUi0uHcT2b7uY7uRRyP5Ax+XiCBv9j3al8 +Io9CDmsD/R4t0aAB7pJ/CilkGrjVv0iQDh3rhJz/LaPQy4woi3hhOjzLCajV +KqeQbuuMDGMrHcw0c6PysZVl334yFKeDUvQ++vUnFBL5GGLYJ0uHDzeztAwq +KTS+r1+QU50OPr7Kssk1FLrNmvnU6zAd9OoGL3Y9x/vfw5VsfZQOc5I+h1Qb +KBThzAhQtacDb4VidBw244nNjhUnOoSK8YPVC5yfWBP3jwcd0mMPZNS+pJDq +Gw9a8xk6jGQf3xXSTKGPcbIbpWPpwBKjuXLjDYVKELf3SBwdSJ2Y7++xIybn +morv0CGqMcVY+C2FVMybwrSS6JByMf18FnYMi+eM9T06TGaslJS3UsjkdOYn +RhEdwrJqNOreUUhM7JqGfgnOH1Hx/hf23JvTd9ge4/la+aRmG4UeyCHrmHI6 +eHNYRZRhL/f3N2TV0oGr+mD4/XYKPbESzXvXQgdJJYlAooNCN5dY1ya8oUOE +UEZ1GrZH3pi7YyteT8Cf0YHNw14r+r2NDs/5vxK6nRTyrXO4/esD3n/JyvKG +LgpJK/wTLDNMBxU9He7obgotfbzQOcqkg3VA3GwNdnskXfnRCB12RxUeJrHD +vqiNaU/QQWyJ8xJ8oFBvcqfrwVk66AjevT2BHb+O1/j8GgJMvI6f3dVDofqZ +fucgNgJsti+ZHsUm+wsC/NYSYKdXGxCGrfvEKNNjAwEGElHt77CZbozfFrwE +7O45UuT1Cee3MuYz3kJALJ8UisbW0eSTRwIELNLa5B9jx3IX2amKEGB/uoBj +frW/drBUVJIAIf6b/ed6KUTkFLUISBPgy3ZJKQU7Nvbc4GZZAix4RT9WYTOJ +Ldzs8gTctZXYM7vav8XUe0KZgGTpml/ufRSq/bslnKlCgFqN8LpQ7OHRocQh +NQLa2kZPJmLvazjf2KVFwNKv1zqvsL/7log/BQJ42yZmt3/G/7tDiHqVAQHz +M/vr1bC1Dc2sSo0IyHQZ7DPDjhH5ei7HjABK8YvEaexq9kexGRYE8HHqmVzC +/vYj5GGKFQED/O0v47G1Xgl037Ih4Kxe9ItybI/Sr+NXbQkY+1Ns2Ih9K+0R +6+UjBLgoLW7rwP4aYK4c7EDAcsti1yQ29zFBU38nAozX5JcvrdYz/+bq40LA +S/Ozoxz9eP72CzePuRGAzOydxLCrOS0eOHgQsLLklbgD+yslWGNLI+BU1Y0d +e7G5v3xrsyIIUHd6yrMPW6v1MdPEm4D64WUbA2yPqgvL4EOA3GWLEfPV+g8s ++HV8CbC9cP+DzWr9W0K71P0I6LRYs81+tT7j+/49/gRwRXhXu2Bz0Uod5APw +eYx0F7pjax4MOy0dRECVs9k8fbX+PssosWB8f6PPkk5gR8sKpwsxCNj0UivW +F7uSZ7ic9zwBijoVg37YX36XvtkYitdrV43yX61Phn1ZG0ZAosyTK2ewNTos +F1fCCfiwrN6z6v8DXDAlcg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + "PlotRange" -> {{0, 180}, {0.7175969733656633, 1.3665636487711388`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6007907022525477}, + "AxesOrigin" -> {0, 0.7175969733656649}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13083,7 +13948,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6007907022525477}, + AxesOrigin->{0, 0.7175969733656649}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13111,7 +13977,8 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6007907022525464, 1.5921070201523966`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.7175969733656633, 1.3665636487711388`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13119,9 +13986,9 @@ l/P743oE40hoft3yPA/bqHkf93c8CXT7XYHL/j+lP8Cx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913267728125134`*^9}, + CellChangeTimes->{3.9913267728125134`*^9, 3.9943888022012653`*^9}, CellLabel-> - "Out[137]=",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] + "Out[149]=",ExpressionUUID->"8d21e2e1-d98b-4a43-925d-67979b99cd9e"] }, Open ]], Cell[CellGroupData[{ @@ -13136,7 +14003,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"(", RowBox[{ - FractionBox[ + RowBox[{ + FractionBox["1", + RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], RowBox[{"4", "x", "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ @@ -13158,8 +14027,7 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", RowBox[{"Factorial", "[", "n", "]"}]], ")"}], "2"]}]}], - ")"}]}], - RowBox[{"\[Pi]", "*", "Cw", "*", "Cb"}]], "*", + ")"}]}]}], "*", SuperscriptBox["\[ExponentialE]", RowBox[{ RowBox[{"-", @@ -13184,154 +14052,158 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991799933259697*^9, - 3.9917999365172615`*^9}},ExpressionUUID->"201ddeed-58e9-7047-8ad4-\ -c179c9adcae7"], + CellChangeTimes->{{3.991799933259697*^9, 3.9917999365172615`*^9}}, + CellLabel-> + "In[150]:=",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.962223088138177`*^-266\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.8951583269832898`*^-265\\\", \ \\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 81, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773051552*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 150, + 69, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994388802361905*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], +In[150]:=",ExpressionUUID->"be7176db-1dcb-4a79-9a29-e26370231d4e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.450949205829742`*^-278\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.861083532140868`*^-277\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 138, - 82, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730605392`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 150, + 70, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994388802370839*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], +In[150]:=",ExpressionUUID->"f28afd21-934f-487e-9ba8-6284570e975b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4109778485455803`*^-289\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.812634843306986`*^-288\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 138, 83, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913267730685368`*^9}, + 150, 71, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994388802377759*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], +In[150]:=",ExpressionUUID->"9f572793-e25b-4fc0-8205-8b9a6ee1cd92"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 138, 84, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991326773076536*^9}, +during this calculation.\"", 2, 150, 72, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991326773051552*^9, 3.994388802384074*^9}, CellLabel-> "During evaluation of \ -In[138]:=",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], +In[150]:=",ExpressionUUID->"41a1914c-1d0f-4371-b8c2-5dfd983fd7f8"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VGsYB/BuSiokZF9mzsyQImtKGs8TyXYjQipZQ8pS9ogY2xSVUCQi +W8kyh0pRSSjaXKlsFUVaZL1ZUsk994/zOZ/vH+/yvMvv89Ld/G08Fi5YsGCO ++v7/T/c+bmImFRr49Yt77xMwMHh1Seroli4OrPiw+3Vmsizgqn/cpLpSwcnE +TGlP8loI2XGtk68rHwLEKgo1k/Vh5ahk6mxnFQRVvrvzI8kC+u5a+k92NsBB +QalrZkl7YRtz6N1EZzvst+tuv8I9BLOdG86Nd/aD8I4YSY2oCGg0ulL4Iv87 +bCloJZ4GJ4NcX80nN9U5uMWofOc0nA7iPs7XlhjxYXMUc3SSfRFSNbfdsbQT +wB4+b4GFfXnQnalRPyEihNxZE+FlNwogqfD4PwulV2KliJrQs7hikEwfOJGW +I4ZX+pT4JeevQqKtmUH79Cq8lm0k8HpJKcjcaJVZ+JcEEm289GUipVAhZjuj +uVwCTRz7WjdJlUJHuxN5VlEC17eXmiatLgWmdRBhbSqBFfE2G4ZNS6Fhey5/ +2wUJ/FplplnOLYW5bVOtzzdL4r4XiSGsRWUQqHfZ+TFHCntDckcah8rAPE94 +0iJZCj8Lb5xXmSgDYskxbus5KfTinDNKmimDtlf2lS+vSmE2fcANFpXDusOC +fL2tUhj8aGzMV74cvhSHFv8rI41mmju+DliWg6O45YjsdWk0th9/rFFRDtoR +d2Iu3ZVGa+vB4N/Xy2FZ/2oJ+iNp7OcHs8aacqjh8YFStzSqzC/3MHxYDhIW +NSka89LI8Gry5n9bDm0xTB1jCxnMUaw6UiRQAVvHfob7Dchgxc/gFQZOFXDU +NH3Ng2EZTM8uZ9m6V0DFZbUesWkZJIorTnkcqAApWxe9GgFZ5KQX2IQHVMDw +7YczfOtk0cGzpvxQQgWkcVKCLoTJ4o/a4Azf8groX6Xk1yQkh0v7G0ZGZipA +0v++vKSkHHoVWNL8flfA3y0Oz71pcnho8bmCrwt4UB2epLpCWw7jnkZmty/l +wcm+8aHdDnI40qmz20eWB1old7zG8uWwTrxU6D6bBzGbrV1lNsrjWLyLTH8U +D0ydLv27wVAes0IEz9BjeSAc/S3W7m95zKiXidubyIPsxvjiFBd5NOqyHq87 +w4Pb5rXf+E/II91NpcsojwfjDoyQ793y6LzqFLGtngdOwVMnn0UoYK2ly5t1 +v3nAyjCUG4pXQNOSQ2N18zyq/jPlS1IUMPKzZnPhXySE/1ZpMyxUQL5nBzYo +LybhXKzTqppnCrjM6bfbckESnp1tzi2SV8R6g1gZa2kSNlVcuBF1XxEHJVlt +LzVJ2NrZOjfaooi90xw3VW0SLBcsMnFuV0TB2g8XOTokuNv4dcOgIurb5C1a +vYGEbRH049GLacj6rnPTfjMJhxWnC7aspeFeednnRttImLqe0jKrTsPFzcGj +ISbU/EzXjlTq0LAqcemdK6YkxB9x0SUMaDgmPWe/0IKErMYnLQutafjuoWT+ +RSsSmryocx1CQyPu+CMnBxLMfuuJHoug4Zejz+p8dpPQmvJKVyeahr9eX/YM +20NCd83S6MITNPRTi2jmOpIwujxIND6bhpyR1x2nXEiQIk03bGugYYGlabDK +ARJytg7s/fOIhr0iaWmi3iQQ3ZHR1U9p6G0n5zVLWW3h9cdKr2loGbldvf4Q +CYa28o5LvtBQV/73di1/Enx+TES3CNEx69w98ZJgaj2PeEp8EqWjiYqldFQI +CQJDPaV8UnRscNwauCOUhKI3jR0GBB3DnliqjISR0Ft3TvWmLh11LkaW8h8j +oWzDsoZ2fTp6mHQdeEQ5nIzaNY50LHaNOx4bSYJEvhdnrQUd56Je1k5FkWAV +r9d12ZmOT9/GhdbGkKDwp9z3/n46xj7LEfLgkDAcQvC986ZjYY7CX0KxJHAP +LF8nFUSNl+u/0C6OhHqLd7GnuXRc/lA68mECCVqiMeoRlXSM+ML3dHUSCQuS +ppoyq+k4VF8bWkK5le/gnuo7dPQ/HHtSOZmEQ1M28RMP6bhJM+mj7CkSCruY +b7x66Hg7al/44GkSAqwvHI7voyN9MNHL+gwJ+ESIv+AjHdtU7e/XUn53Z1qj +d5SOfgbalfEpVH25LQm2fASeFdtf8fssCR8l2XIBAgTmt8v/ZZtKQlVKZeUZ +IQJRa33jVcpWnKy3TyQJNLYZzDBPo+r/JRzwRY5Ah47rpRmUhwNjl/ATBHJj +LDT7KXM9fLS2qBL4IdQ03T+dBPve981OmgSmOnwJqKLM3GW375gugZUnHz38 +l3K9qQH3FhIYnVfz5NA5Ek4/qJJ/bUygap9QVCFlx03K1/81JzCMqXi1h/Ls +WpFeNTsCv87OucF5EqZzZGK09xDofe0tzZfy5AoWU8+ZwMJNvv6ZlCdi1JsN +9hP43sHc6gHl0e96B7d6E/iLveLBZ8rfPLYKmfsR+Lts18PlGSR86bQkrQIJ +bPr3vqMa5f477tN7IglcOuhu4k25T83vgguHQMXunouxlN/mhm32TCTQV+tL +/EXK3Stj+w4lExj/dQ1/JeWO2FOcI2cJzIwylG+i/HIqgxV6nmo/2/r0FeU2 +r/yWYxcJjPt8WHSA8vPuskOcPGp9nB5PjFJ+YnFLmFtE4PPZowd/UG6+96Dy +1DUCm7uZkfOUm9Sf2abxCFxc5LNmUSYJDy53zGTeIPBPwmQAP+U6sQ9Zl2oI +7Fd32fW/78R/YxfWEaj/amcXH+XbM1PvSxoJTFQNmv5D9XfTe0Ecr4VaryDP +qhnKVW+WKd98TmCeT5vg//PhbV/1pLadwFk7B/5+ymX3FX3rOwnMnirMfUm5 +RHONyKO3BO5K3dfdQLm4QOf60w8E3ptUucGjXLAK7F98IrDas0oji3Jeotls +xzcCN17PteJQzpndmf12nKqXdXHlAcpZh5ygf4rArSctQy0oZ7w70P/5J4E2 +qvtjVCmnWwXGj8wTyOxM0Ph//05rc5/+WMpA1lhe9P/7nVSU6vdHmIFdPuPE +BcpcyZyVi8QZmCk25+NHmfOrctcKBQa2ePD9Wkn5uO/dn+IMBl4X3o3vqfN2 +rO9RjsxqBg72MDTKKIc0vhlgaTHwk3rHSjblQ0mLD2/exsCs5dPjhtR5PjC3 +QszQgoEhxXo5f6j74OkvU22yg4G98Udnb1F22an+22YPAxsqapsYlG1ld3O9 +/RhYjVM1fdR9tD7lvtY/kOrP+Mksl7LlvG9rUBgDlSZxTJ2y6QBHPJrDQM/2 +0bkQ6j5vLi3LO3+egbOvPOu+Unnwhlaaa3yRgSMiywcTKYefL7k0mcvAC25X +RJmUb8UUZ9uUMLATWPH2VJ5oOeRlCt9lIPvcy84CKn9UFqenJHxg4ME3C2rf +J5LQEp56Zv0nBjqK3stwpuw5nnL64xADrUeWJ7yl8qzwzalkw0kGSl97eb4t +ngRaVSL3Dz8T333Vz7pM5aGEc0R0iCoTFYb+VH2m8vTmq6PHWZpM3Nk1PGBC +2dY8LOrVeiYOHN+jXkzlb+r64GNawEQbOX2pfVQ+Cwn6h41aM3HY67nRjaMk +LKpxO+wZysSgXJGzAkHU/RY1d7FvYOLQXji53YuELh+i7WAz1f7bpSvOnlS+ +PPoJx58xcWP0rnx/DxJSwksVr3YwUZiur33CnQSNfsG+2SEmFjXe6Ml3JsGv +8p99OWIsNPn8ecGRXSQMWdnt/bifhXdHMuujjEloL1F7+sObhdKlM+stt5JQ +y8evL+TPwpyyjEJZIxJO3KqW0T3KQl1x9SMkkrBaUaon8RQLr9t3vH+gT4LX +aI/D2moWDv7pH4ij3gMfk13sA5Yo4aPhvM6zstT4Q6qEhqASCgQONG6SIWHG +ZHZkREQJl0RkLu6XImEZX2q8t4wSJnS6JK+VoOZ/tPGGi5oS9noU3b0mQkKk +h5KY1U4lPHg+1GYP9T6RMBj+Z22uEqZJD7suecMDs7FQs0FdZcyujA2wC+CB +nKZCgsBmZVSYcH+f5seD0YCmhrVblHF7dnV360EepE+LbA6wUMaxAy9CNrnz +oHeuZN28M9U+sjHty04eBAi+FZM+oYwX2gdp+To8yFLB3r/fKONG+Z6ezO/U ++9FdIPDG8dV4pUXCWIB6X25jSi5MbFBBx/HWW1d1ykH0udJpcmwN7jjxfcfQ +91KQ4/J26OqqYvjHRA0y/BpkrtUTEfNSwzK3WxvzFpfAE5kt67+fXYfbzpwf +8j95BTbJNaSod6ijFVed5fWpCIT58oNcORrosmb76ta9haAQo7h5t5ImSpgZ +zvRW5cNSlmO1TbMm8uSzOIelL8M6tjQvdJ8W7mVcPXfu71wI6BVtNF+gjQGy +nAezxtkw9j3ZzixTG+caU9vPp18AE/VHWWZqOvjHKu4pTTwD6r7r/5pp1UEV +5c/WzxPTwU9Vq+eFx3r8S9dWScQ6Fdij+1/tXqqLxN0lL4OkU8CYKbVdKF8X +hUtGj4t7JcPq6JNhDRs24J0/t1t+zXNhjYfefVbPBix6HVi3+mo8eNQdiLtx +ZCNij5Pc624O3M97tX9ilR7OHbOJyCeiYfLq/Iz6LT18HrFb1PN0BLizSpdm +bd+En7c4MGZLQ2FiTZpu1fgmFAzcsbBuNhBuF/76MMXVR2fPn0JNM4dhz1YG +6itsRjI0tKTziQ/I+ibWrKvfjOefH06c/+EFq5b5VG7fxcYwyz29TPn9UGgU +GT6+m42xfxsX6AjtB63I00Zpjmz8Gb/C3GrOHSzHydddrmw03PODVfTOHRI6 +pmbdfdjoe/poUPsld/iRf9wwPIaNFQrNjusY7tCjn/ayuJSNU7q1eo3abnAg +uDDbrIKNo98SxJgsN5iuuOkxTLIxO1xb6oyEG4gSXTOa1Wxc//tBUuysK1gI +yMvdq2djc6Hm8cH7rnD3VfH+l6/ZaJGvUsO1dAVz4dtqIV1sjEvaVHgCXaHL +5PG01Bs23jPe6Zqu5QqTtd+4Tu/ZKHWiSL9ZwhXULmuUfx1i40mB4M7LfS5w +t2dLSPIIG8PDnWvGX7iAufhOUB9no+CvtC1mTS7gmRj8ImiKjadlFdUlS1xg +sj4hS/IHG0Wtsk8kX3QBzs8M99qfbDSqIYOWn3YBEZ0S1X1zbJyAyaG0aBe4 +5Fs7NT/PxrLLCz6zAl3gPzW6RM0= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13345,113 +14217,113 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV1nk8VGsYB/BuSiokZF9mzsyQImtKGs8TyXYjQipZQ8pS9ogY2xSVUCQi +W8kyh0pRSSjaXKlsFUVaZL1ZUsk994/zOZ/vH+/yvMvv89Ld/G08Fi5YsGCO ++v7/T/c+bmImFRr49Yt77xMwMHh1Seroli4OrPiw+3Vmsizgqn/cpLpSwcnE +TGlP8loI2XGtk68rHwLEKgo1k/Vh5ahk6mxnFQRVvrvzI8kC+u5a+k92NsBB +QalrZkl7YRtz6N1EZzvst+tuv8I9BLOdG86Nd/aD8I4YSY2oCGg0ulL4Iv87 +bCloJZ4GJ4NcX80nN9U5uMWofOc0nA7iPs7XlhjxYXMUc3SSfRFSNbfdsbQT +wB4+b4GFfXnQnalRPyEihNxZE+FlNwogqfD4PwulV2KliJrQs7hikEwfOJGW +I4ZX+pT4JeevQqKtmUH79Cq8lm0k8HpJKcjcaJVZ+JcEEm289GUipVAhZjuj +uVwCTRz7WjdJlUJHuxN5VlEC17eXmiatLgWmdRBhbSqBFfE2G4ZNS6Fhey5/ +2wUJ/FplplnOLYW5bVOtzzdL4r4XiSGsRWUQqHfZ+TFHCntDckcah8rAPE94 +0iJZCj8Lb5xXmSgDYskxbus5KfTinDNKmimDtlf2lS+vSmE2fcANFpXDusOC +fL2tUhj8aGzMV74cvhSHFv8rI41mmju+DliWg6O45YjsdWk0th9/rFFRDtoR +d2Iu3ZVGa+vB4N/Xy2FZ/2oJ+iNp7OcHs8aacqjh8YFStzSqzC/3MHxYDhIW +NSka89LI8Gry5n9bDm0xTB1jCxnMUaw6UiRQAVvHfob7Dchgxc/gFQZOFXDU +NH3Ng2EZTM8uZ9m6V0DFZbUesWkZJIorTnkcqAApWxe9GgFZ5KQX2IQHVMDw +7YczfOtk0cGzpvxQQgWkcVKCLoTJ4o/a4Azf8groX6Xk1yQkh0v7G0ZGZipA +0v++vKSkHHoVWNL8flfA3y0Oz71pcnho8bmCrwt4UB2epLpCWw7jnkZmty/l +wcm+8aHdDnI40qmz20eWB1old7zG8uWwTrxU6D6bBzGbrV1lNsrjWLyLTH8U +D0ydLv27wVAes0IEz9BjeSAc/S3W7m95zKiXidubyIPsxvjiFBd5NOqyHq87 +w4Pb5rXf+E/II91NpcsojwfjDoyQ793y6LzqFLGtngdOwVMnn0UoYK2ly5t1 +v3nAyjCUG4pXQNOSQ2N18zyq/jPlS1IUMPKzZnPhXySE/1ZpMyxUQL5nBzYo +LybhXKzTqppnCrjM6bfbckESnp1tzi2SV8R6g1gZa2kSNlVcuBF1XxEHJVlt +LzVJ2NrZOjfaooi90xw3VW0SLBcsMnFuV0TB2g8XOTokuNv4dcOgIurb5C1a +vYGEbRH049GLacj6rnPTfjMJhxWnC7aspeFeednnRttImLqe0jKrTsPFzcGj +ISbU/EzXjlTq0LAqcemdK6YkxB9x0SUMaDgmPWe/0IKErMYnLQutafjuoWT+ +RSsSmryocx1CQyPu+CMnBxLMfuuJHoug4Zejz+p8dpPQmvJKVyeahr9eX/YM +20NCd83S6MITNPRTi2jmOpIwujxIND6bhpyR1x2nXEiQIk03bGugYYGlabDK +ARJytg7s/fOIhr0iaWmi3iQQ3ZHR1U9p6G0n5zVLWW3h9cdKr2loGbldvf4Q +CYa28o5LvtBQV/73di1/Enx+TES3CNEx69w98ZJgaj2PeEp8EqWjiYqldFQI +CQJDPaV8UnRscNwauCOUhKI3jR0GBB3DnliqjISR0Ft3TvWmLh11LkaW8h8j +oWzDsoZ2fTp6mHQdeEQ5nIzaNY50LHaNOx4bSYJEvhdnrQUd56Je1k5FkWAV +r9d12ZmOT9/GhdbGkKDwp9z3/n46xj7LEfLgkDAcQvC986ZjYY7CX0KxJHAP +LF8nFUSNl+u/0C6OhHqLd7GnuXRc/lA68mECCVqiMeoRlXSM+ML3dHUSCQuS +ppoyq+k4VF8bWkK5le/gnuo7dPQ/HHtSOZmEQ1M28RMP6bhJM+mj7CkSCruY +b7x66Hg7al/44GkSAqwvHI7voyN9MNHL+gwJ+ESIv+AjHdtU7e/XUn53Z1qj +d5SOfgbalfEpVH25LQm2fASeFdtf8fssCR8l2XIBAgTmt8v/ZZtKQlVKZeUZ +IQJRa33jVcpWnKy3TyQJNLYZzDBPo+r/JRzwRY5Ah47rpRmUhwNjl/ATBHJj +LDT7KXM9fLS2qBL4IdQ03T+dBPve981OmgSmOnwJqKLM3GW375gugZUnHz38 +l3K9qQH3FhIYnVfz5NA5Ek4/qJJ/bUygap9QVCFlx03K1/81JzCMqXi1h/Ls +WpFeNTsCv87OucF5EqZzZGK09xDofe0tzZfy5AoWU8+ZwMJNvv6ZlCdi1JsN +9hP43sHc6gHl0e96B7d6E/iLveLBZ8rfPLYKmfsR+Lts18PlGSR86bQkrQIJ +bPr3vqMa5f477tN7IglcOuhu4k25T83vgguHQMXunouxlN/mhm32TCTQV+tL +/EXK3Stj+w4lExj/dQ1/JeWO2FOcI2cJzIwylG+i/HIqgxV6nmo/2/r0FeU2 +r/yWYxcJjPt8WHSA8vPuskOcPGp9nB5PjFJ+YnFLmFtE4PPZowd/UG6+96Dy +1DUCm7uZkfOUm9Sf2abxCFxc5LNmUSYJDy53zGTeIPBPwmQAP+U6sQ9Zl2oI +7Fd32fW/78R/YxfWEaj/amcXH+XbM1PvSxoJTFQNmv5D9XfTe0Ecr4VaryDP +qhnKVW+WKd98TmCeT5vg//PhbV/1pLadwFk7B/5+ymX3FX3rOwnMnirMfUm5 +RHONyKO3BO5K3dfdQLm4QOf60w8E3ptUucGjXLAK7F98IrDas0oji3Jeotls +xzcCN17PteJQzpndmf12nKqXdXHlAcpZh5ygf4rArSctQy0oZ7w70P/5J4E2 +qvtjVCmnWwXGj8wTyOxM0Ph//05rc5/+WMpA1lhe9P/7nVSU6vdHmIFdPuPE +BcpcyZyVi8QZmCk25+NHmfOrctcKBQa2ePD9Wkn5uO/dn+IMBl4X3o3vqfN2 +rO9RjsxqBg72MDTKKIc0vhlgaTHwk3rHSjblQ0mLD2/exsCs5dPjhtR5PjC3 +QszQgoEhxXo5f6j74OkvU22yg4G98Udnb1F22an+22YPAxsqapsYlG1ld3O9 +/RhYjVM1fdR9tD7lvtY/kOrP+Mksl7LlvG9rUBgDlSZxTJ2y6QBHPJrDQM/2 +0bkQ6j5vLi3LO3+egbOvPOu+Unnwhlaaa3yRgSMiywcTKYefL7k0mcvAC25X +RJmUb8UUZ9uUMLATWPH2VJ5oOeRlCt9lIPvcy84CKn9UFqenJHxg4ME3C2rf +J5LQEp56Zv0nBjqK3stwpuw5nnL64xADrUeWJ7yl8qzwzalkw0kGSl97eb4t +ngRaVSL3Dz8T333Vz7pM5aGEc0R0iCoTFYb+VH2m8vTmq6PHWZpM3Nk1PGBC +2dY8LOrVeiYOHN+jXkzlb+r64GNawEQbOX2pfVQ+Cwn6h41aM3HY67nRjaMk +LKpxO+wZysSgXJGzAkHU/RY1d7FvYOLQXji53YuELh+i7WAz1f7bpSvOnlS+ +PPoJx58xcWP0rnx/DxJSwksVr3YwUZiur33CnQSNfsG+2SEmFjXe6Ml3JsGv +8p99OWIsNPn8ecGRXSQMWdnt/bifhXdHMuujjEloL1F7+sObhdKlM+stt5JQ +y8evL+TPwpyyjEJZIxJO3KqW0T3KQl1x9SMkkrBaUaon8RQLr9t3vH+gT4LX +aI/D2moWDv7pH4ij3gMfk13sA5Yo4aPhvM6zstT4Q6qEhqASCgQONG6SIWHG +ZHZkREQJl0RkLu6XImEZX2q8t4wSJnS6JK+VoOZ/tPGGi5oS9noU3b0mQkKk +h5KY1U4lPHg+1GYP9T6RMBj+Z22uEqZJD7suecMDs7FQs0FdZcyujA2wC+CB +nKZCgsBmZVSYcH+f5seD0YCmhrVblHF7dnV360EepE+LbA6wUMaxAy9CNrnz +oHeuZN28M9U+sjHty04eBAi+FZM+oYwX2gdp+To8yFLB3r/fKONG+Z6ezO/U ++9FdIPDG8dV4pUXCWIB6X25jSi5MbFBBx/HWW1d1ykH0udJpcmwN7jjxfcfQ +91KQ4/J26OqqYvjHRA0y/BpkrtUTEfNSwzK3WxvzFpfAE5kt67+fXYfbzpwf +8j95BTbJNaSod6ijFVed5fWpCIT58oNcORrosmb76ta9haAQo7h5t5ImSpgZ +zvRW5cNSlmO1TbMm8uSzOIelL8M6tjQvdJ8W7mVcPXfu71wI6BVtNF+gjQGy +nAezxtkw9j3ZzixTG+caU9vPp18AE/VHWWZqOvjHKu4pTTwD6r7r/5pp1UEV +5c/WzxPTwU9Vq+eFx3r8S9dWScQ6Fdij+1/tXqqLxN0lL4OkU8CYKbVdKF8X +hUtGj4t7JcPq6JNhDRs24J0/t1t+zXNhjYfefVbPBix6HVi3+mo8eNQdiLtx +ZCNij5Pc624O3M97tX9ilR7OHbOJyCeiYfLq/Iz6LT18HrFb1PN0BLizSpdm +bd+En7c4MGZLQ2FiTZpu1fgmFAzcsbBuNhBuF/76MMXVR2fPn0JNM4dhz1YG +6itsRjI0tKTziQ/I+ibWrKvfjOefH06c/+EFq5b5VG7fxcYwyz29TPn9UGgU +GT6+m42xfxsX6AjtB63I00Zpjmz8Gb/C3GrOHSzHydddrmw03PODVfTOHRI6 +pmbdfdjoe/poUPsld/iRf9wwPIaNFQrNjusY7tCjn/ayuJSNU7q1eo3abnAg +uDDbrIKNo98SxJgsN5iuuOkxTLIxO1xb6oyEG4gSXTOa1Wxc//tBUuysK1gI +yMvdq2djc6Hm8cH7rnD3VfH+l6/ZaJGvUsO1dAVz4dtqIV1sjEvaVHgCXaHL +5PG01Bs23jPe6Zqu5QqTtd+4Tu/ZKHWiSL9ZwhXULmuUfx1i40mB4M7LfS5w +t2dLSPIIG8PDnWvGX7iAufhOUB9no+CvtC1mTS7gmRj8ImiKjadlFdUlS1xg +sj4hS/IHG0Wtsk8kX3QBzs8M99qfbDSqIYOWn3YBEZ0S1X1zbJyAyaG0aBe4 +5Fs7NT/PxrLLCz6zAl3gPzW6RM0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.06481972033045832}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13463,19 +14335,19 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.06481972033045832}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13489,112 +14361,112 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Ff37B3DlCVnPmTkciZQsiUOWlJL7DslSspfKUtkLWQsVkciWUpG0 -SYtSUZYsnTPhKVFEQhSV6mlB+trS5vf5/THXXK9r5vrMfLb3PbNge4ijz0wh -IaE/5Pj/80Tf4wbVtBOmK2Pimy7VrTftOCcfvbo7DKxWS8CldVqAsq3b5bsT -QNQlRcNn3UqIsr/eJdx9HMRFWIqr1tkCe5h7fKqrALqvCLiz1m2B/lq7kLGu -O2Dp/U7JzXYnWKp+ef29qw7UGG3/eqtYmOpadnKkqx2EZlsL7zNNg3rzq4Vt -BQMQe87M3sowHxT7qz5u1x6CWar3LMprC4Gzy/O6qPkozK+gVB4L3YDjepY1 -di4/wCm4YmigqgRe5i5hvrP+wIuXfcUVR+5CWmFc68w5M9Do89Prgy4VwD0x -cCT7rDCWbWzNGX9yD5KdrU3bJ2bh8k0fBpqeV4NCWYvCzBkiKHbYKe9nbzXc -op0n9SREsDojhFZ7Xw2d7R4lx5RFcNmKF9aBY9Wg6hCh4mAlgi/gTnE5pwbq -1p8XeXZaBCMOzY3d4FwDfyzHW56aiKJh87DckdYaCDe+6Pk4QQzDPXrvfyqv -BZsL0mO26WL4IcDA2K62FlRE96W0nBTDhnb7qVt1tfCsw7X0+TUxvOQtb7m9 -tRZ0dksK97WIoduM5llZn2rh05U9V/6nMBsPme95IKpwH7Zy7Ibm3p2NiTeH -U32i74PFt58xwQPieLvz5tnHmnyItjqx+MGgOF5t/Rs1oMOHWxd5PfSEOEqa -3b/zw4AP8s5exlViEmiTKOEga8qHwXv/TgrrSOD1ikE1riMfshOyIk7vlUCu -wSHFVdF8eCerHtwgJYmyct5d7AY+cEMESlyuJMYqRfTkNPJhXeOmpwHzJXEk -M8B0zlM+VMSkacsYSKKJ7HxN6U4+pPaPfHHbJIkeddWpzH980C+q8ftWIIkf -9jmmrhUXwEETh20Ky6VwKseJ7rcVgJXHuf8tM5PCN3qd0+r2ApCO/5rosk4K -jRPk4wKcBZBfn3Qly0sKpasqjPq2CuCeTfVXkSNSWP73atbhIAGMbFoYNfpS -ChvFW9SfZwjAI3I89UmsNGb0DXx0bxKAWo6Z4pckaVzEflj646mA9P/oTdEs -aSxRUZyT2SaAmN+az8wKpVHUic+/1i2Ak4keslVPpDF9nW/o2Y8CeHLs0fnL -SjL4/H5FYJ0QAytunS47IJDB3OLhqKtzGLDoavkz3CiDnsZXRUXmMmAn9M9a -z3YZVGrItdyuyMAOx+CX8EEGB1bIP6OVGbCMXRAXP4uFRdtQfosqA7uVJy6t -1mKhnUtpWYwOA+N3sxqndFlYUORuWabLQIyV1lCpIQv1NSxTvy5hICnUy0jF -lIXWXX2aTgYM5NU3Nc50YCG0tLeKLGegwe/8UH0UC8WkcsankQHr38bUvlgW -9v92e8IxY6Alq8PIMJ6FjYrv3DTMGXhZNTu+8AgLd/Oi8tasYWBYIoJKymdh -cfuyal9rBuRLrJZZ1rHws61i9UoHBs5aDGz5+5CFCls8VLQdGVB5uT++opmF -SatDLRWcGODNvPtY/QULv4t61H9zZsDMWWmr6CcWvvHmn47bxMCuH9/jG6XY -6H/k6CwDTzKeob5yHyk2Xu5V38byYkDsS88NYXk2Ulan5nwlvtxb32mqwsYx -h66C3O0M9PFPapcbsXHw+O+FHT4MFC8Tr2tfycbs0MDwfF8yXiUHNo4gG5ld -kQu3+zEgV+CXoGXLxqwHDlc/+DOwIcm4+6InG4vq2myf7mRg3t+bQQJvNvY9 -arsZv4uBwSgV4dcBbHz83T1CL4iBFH8JHfkINganzdNLC2aAsX2dmJnCRp4g -bo9yKAP61EHd2FI2qk+23WiOZEAobbwht4KNoRc2n3CJIuMtHLi5ooaNa5sa -P78i3jnumPT9XzbOE014PbCHgcJu1V6/HjaKCh5MtkczEOZwendSPxt/XW52 -tYphAJukRC69Z6PGxEKNGuLXNRNL+obZ2DQ5rXQ6lvTvfONhZ2EKVxRZRRjt -Z+A9d5VimBiF3ysKg3KI72SVlh6VopCx7H81TrwhIe9VE5fCk2HmyjcOkP7/ -kg77pEjhE/vc0RlxpP/hiaIiKhRWG6qgK3GKzy791doUGs7Xt5gkdu1788hD -j8Jw7U+/zeMZUN3o4r7PiEJ6rcGSTGLGyjSlEimM1PkmNvcgA1NarD6eC4Us -m8FsuQQGJs4qHDTYTKHsry86dsRjMmqqxp4UbkzI9EokHh41DrQIoFBOZm7q -R+KvPhZSNsEUrvu0JJGTyMCnLruSDeEURpuukUXidzU7Jjbvp9D0XaNIFnE/ -L/i0VwKFqWYBfmXEr87vNfFNpvCwReCOTuKX7MT+nekUBtX5/Bon7kzMSAg9 -RmGu4oQufYiB5+M5antOUahuXDFDh/iZX0HjvjMU5ieSBU789GXxzoQLFGYN -GsRtJW6yrZROuUyh9WdN7d3Ej+4/KM24TmFwOLP3IHGD7hPn7NsU5omd9Mki -fnCxczK3jELq+prRfGI+/TbvXBWFnq92q1wlrkn6uqqQT+HPK+Wjt4jvTY6/ -Kaqn8FP2Xb8y4vIAoUO3Gyn0uy0eV0l8p1dco/wphenJW1bcI769Xrapup3c -r7U2r4K4WKAcxHRRqMcLOX+HuEhvMevhKwrf5UfaFBNfuWR4t/ktha8k/5y5 -RHxJFlzbPpL5OnrtRC7xhWTrqc6vFCqUz12aRnx2yin/1QhZX0d/7o8lztvp -Ae/GKTxw+3NIAHHOa/93//2kcI1KpoQL8YkN4UlD0xSKR2Y4mBIfe7B/0eg/ -NAbeyTBTI840SGn+MZvG9O1L+2cTp10+HvxXmsb7qVqLBsn8pHDPsv/h0Chx -kzvvCXHCr9KNMvOIXcPoJOK4oNqfnIU0xq/X53gQ7+t/eFZhEY3vldMaDImj -6nsH1PRpFEu4bdRL1lP40o+HtZbRyNv8bOo68e6rI5p6JjTanjUM2Uu8M23W -bhNLGmcv2RMuSez/R4Y2s6Xxc/Yt4edkPfuGKFSstacxMrXXKofYy0n3t+Nm -GksSno7JE7v/a3x+kyeN+Zu+be0k+2HzMgszD28ap/yZfceInee6pQQE09j8 -S+ejELFDxg6tkHAaC0V4euVkf9lNB7VE7KVxcssZIz9iq4EETnwCjXyho+EN -ZL+a3Ci+cOoUjf7uro93kP3cO//G+TVnaHRUf+wpSRxzqujc2HkatbesmnF3 -HwOVB6/kOxbRKJwe6feT5IX+pgu50rU07txh1RZK8qTt6bmc+wyNRsn/tYoT -7zY/e2rXvzTOadbou0jy6JZO3ommFhr/dL7VatrLgOasE1mH35Lra4ryhUl+ -NcYcP7r0I43eXrWLMki++Y5kZb7/QmOGm9pjDnFhb0a62RiNyT5u1vNIPs6/ -k5zyV4SDP4ymNyqEk/zyjI2P0uZgUOeYYSXJ1/KO6Dg1PQ5WLNhqp0LsbLP3 -QMdSDirxBUlpJI+PL43cpw8cfOc0Yr+J5LWUZMjeYQcOqlUaBfYGMPBP1fbd -vns4aF9nb5DizcB3ysbLtY6DUvWNh+NJ/enepfIs8BEHBxXLPp3bSPLq4U+I -e8LBWUWBWjWuDGTF3FC+1snB/J9HXIdI/VryTrJ/6gt5v8KezctJ/QsubXU/ -S8ti56hpVwCpj182uGx57y2LFsoHM5DU3/YiXvOPAFk0Fi66rriMgWphkZVS -IbK4UL2lfmIpA0cqKxSMomXxplDGUCGp34uU5XuSM2RxoGzTss+k/vsN92zS -qpDFv8USAZQayfN0L9cwUTlc1NYVOyRDnv9FW2WJpByy1m2LK5BmYHLt1NAQ -Sw5XBS3ocZFiQFz4eFKAghzG0ytyK8XJ+0fXl3nx5HDaPtnWbxYD+33U6Q1O -crjngmzgyJgA5EwHW7XOy+GKBpFLTQ8FYP1tj/UHIy5manT46GwTgKLevMNi -Jlw0D9S5newugOGwhjqt1VwEjZik124CODHBMgmz5WLl1q43BxwF0PenSGfa -k4tCp11Sc80FECb5ip5zhIurbD/5aqoJIE8T+9b1cjGr4JBt6wfyPbpDLLws -Th6d7tp15bvzyf8Ed2Zy3Rz0tblV/WjJfaCeqmeWfFPAib935P83XgOKKbft -jYwUcdv2w8pNCdWQq2XMov2UsHXEbu4vqgqaFFYvHT02D0uWeyfF5FfCCsW6 -LN1OZXRSdmO+/y4HaeGCiG0J8/GFkuODscgymHdQ2cRNfQGaKVVmmj+7A7PV -tlY4PlqAAZ2/yp2NS0Fn1Zzbe9xV8N7qf+c+P3obwvqoehuhhXgtf/HGsrRi -+Daa7mKduxDrUpQUk3uLYK3uwzxrniqO3awattlyFfijK39NtqhixZOG06Yt -hRCsrd/T5qOG9pmm98VOFcCqYe8Ot9nqmHjtwzHu1guwRlV+vVSBOpqkC+3u -+pgPi+JT99Yt00BGX1Z8f/RpWOxjLFDr0UA4vuPYIoVT4MP3P1QWughpHZ05 -Wy2yQXChw/u7rCZ6fZgx2HAoC8auTU/qVmqiyRE1manV6bBD7cbsvPWLcWLL -gwHaPgW+L842ujOyGJtiOAqRGYfgXuGvt+MpWvhcXesRf99B2GyxEFfO08bo -ee1/Lar2w9yg5CodRhtzzPy0nZv3gqz4rtL1G3lodMaoSrYrAgrN98eMuPFw -yWh5fe3DCNDfn2mevZWHUuqWL4IrIsBupORF9zYedqn5ToyejIDDneNTO3bx -0P9YXuZBlwj4URBnFnOQh/t9+yUud4ZDz8rs51du8HA9dC3/8CYM/CML861v -8VDyv3rRd21hMHGr3GewhIdnGu00PteFAaXSPalXwUPdk29Xy10OA1sxJcX7 -DA9NRputvgaEQW3HFe/nL3gYuuHtg9jxULCRvseL6uah4RrraYX/QqF77eMJ -+V4eGiheNGzoDoWx6q8pHm94OFCpF2pYGwq8i0tufv7Cw+V/S3PTEkOhtmd1 -VPoQD0u4/r+jI0l7HCfQHeHhXXcP7TC/UPBNjmyLGOfhTgWX3jhb0h5zOI/7 -g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx -6WkevnFqfy3DCYX/A6WEJbo= +1:eJwV1nk8VGsYB/BuSiokZF9mzsyQImtKGs8TyXYjQipZQ8pS9ogY2xSVUCQi +W8kyh0pRSSjaXKlsFUVaZL1ZUsk994/zOZ/vH+/yvMvv89Ld/G08Fi5YsGCO ++v7/T/c+bmImFRr49Yt77xMwMHh1Seroli4OrPiw+3Vmsizgqn/cpLpSwcnE +TGlP8loI2XGtk68rHwLEKgo1k/Vh5ahk6mxnFQRVvrvzI8kC+u5a+k92NsBB +QalrZkl7YRtz6N1EZzvst+tuv8I9BLOdG86Nd/aD8I4YSY2oCGg0ulL4Iv87 +bCloJZ4GJ4NcX80nN9U5uMWofOc0nA7iPs7XlhjxYXMUc3SSfRFSNbfdsbQT +wB4+b4GFfXnQnalRPyEihNxZE+FlNwogqfD4PwulV2KliJrQs7hikEwfOJGW +I4ZX+pT4JeevQqKtmUH79Cq8lm0k8HpJKcjcaJVZ+JcEEm289GUipVAhZjuj +uVwCTRz7WjdJlUJHuxN5VlEC17eXmiatLgWmdRBhbSqBFfE2G4ZNS6Fhey5/ +2wUJ/FplplnOLYW5bVOtzzdL4r4XiSGsRWUQqHfZ+TFHCntDckcah8rAPE94 +0iJZCj8Lb5xXmSgDYskxbus5KfTinDNKmimDtlf2lS+vSmE2fcANFpXDusOC +fL2tUhj8aGzMV74cvhSHFv8rI41mmju+DliWg6O45YjsdWk0th9/rFFRDtoR +d2Iu3ZVGa+vB4N/Xy2FZ/2oJ+iNp7OcHs8aacqjh8YFStzSqzC/3MHxYDhIW +NSka89LI8Gry5n9bDm0xTB1jCxnMUaw6UiRQAVvHfob7Dchgxc/gFQZOFXDU +NH3Ng2EZTM8uZ9m6V0DFZbUesWkZJIorTnkcqAApWxe9GgFZ5KQX2IQHVMDw +7YczfOtk0cGzpvxQQgWkcVKCLoTJ4o/a4Azf8groX6Xk1yQkh0v7G0ZGZipA +0v++vKSkHHoVWNL8flfA3y0Oz71pcnho8bmCrwt4UB2epLpCWw7jnkZmty/l +wcm+8aHdDnI40qmz20eWB1old7zG8uWwTrxU6D6bBzGbrV1lNsrjWLyLTH8U +D0ydLv27wVAes0IEz9BjeSAc/S3W7m95zKiXidubyIPsxvjiFBd5NOqyHq87 +w4Pb5rXf+E/II91NpcsojwfjDoyQ793y6LzqFLGtngdOwVMnn0UoYK2ly5t1 +v3nAyjCUG4pXQNOSQ2N18zyq/jPlS1IUMPKzZnPhXySE/1ZpMyxUQL5nBzYo +LybhXKzTqppnCrjM6bfbckESnp1tzi2SV8R6g1gZa2kSNlVcuBF1XxEHJVlt +LzVJ2NrZOjfaooi90xw3VW0SLBcsMnFuV0TB2g8XOTokuNv4dcOgIurb5C1a +vYGEbRH049GLacj6rnPTfjMJhxWnC7aspeFeednnRttImLqe0jKrTsPFzcGj +ISbU/EzXjlTq0LAqcemdK6YkxB9x0SUMaDgmPWe/0IKErMYnLQutafjuoWT+ +RSsSmryocx1CQyPu+CMnBxLMfuuJHoug4Zejz+p8dpPQmvJKVyeahr9eX/YM +20NCd83S6MITNPRTi2jmOpIwujxIND6bhpyR1x2nXEiQIk03bGugYYGlabDK +ARJytg7s/fOIhr0iaWmi3iQQ3ZHR1U9p6G0n5zVLWW3h9cdKr2loGbldvf4Q +CYa28o5LvtBQV/73di1/Enx+TES3CNEx69w98ZJgaj2PeEp8EqWjiYqldFQI +CQJDPaV8UnRscNwauCOUhKI3jR0GBB3DnliqjISR0Ft3TvWmLh11LkaW8h8j +oWzDsoZ2fTp6mHQdeEQ5nIzaNY50LHaNOx4bSYJEvhdnrQUd56Je1k5FkWAV +r9d12ZmOT9/GhdbGkKDwp9z3/n46xj7LEfLgkDAcQvC986ZjYY7CX0KxJHAP +LF8nFUSNl+u/0C6OhHqLd7GnuXRc/lA68mECCVqiMeoRlXSM+ML3dHUSCQuS +ppoyq+k4VF8bWkK5le/gnuo7dPQ/HHtSOZmEQ1M28RMP6bhJM+mj7CkSCruY +b7x66Hg7al/44GkSAqwvHI7voyN9MNHL+gwJ+ESIv+AjHdtU7e/XUn53Z1qj +d5SOfgbalfEpVH25LQm2fASeFdtf8fssCR8l2XIBAgTmt8v/ZZtKQlVKZeUZ +IQJRa33jVcpWnKy3TyQJNLYZzDBPo+r/JRzwRY5Ah47rpRmUhwNjl/ATBHJj +LDT7KXM9fLS2qBL4IdQ03T+dBPve981OmgSmOnwJqKLM3GW375gugZUnHz38 +l3K9qQH3FhIYnVfz5NA5Ek4/qJJ/bUygap9QVCFlx03K1/81JzCMqXi1h/Ls +WpFeNTsCv87OucF5EqZzZGK09xDofe0tzZfy5AoWU8+ZwMJNvv6ZlCdi1JsN +9hP43sHc6gHl0e96B7d6E/iLveLBZ8rfPLYKmfsR+Lts18PlGSR86bQkrQIJ +bPr3vqMa5f477tN7IglcOuhu4k25T83vgguHQMXunouxlN/mhm32TCTQV+tL +/EXK3Stj+w4lExj/dQ1/JeWO2FOcI2cJzIwylG+i/HIqgxV6nmo/2/r0FeU2 +r/yWYxcJjPt8WHSA8vPuskOcPGp9nB5PjFJ+YnFLmFtE4PPZowd/UG6+96Dy +1DUCm7uZkfOUm9Sf2abxCFxc5LNmUSYJDy53zGTeIPBPwmQAP+U6sQ9Zl2oI +7Fd32fW/78R/YxfWEaj/amcXH+XbM1PvSxoJTFQNmv5D9XfTe0Ecr4VaryDP +qhnKVW+WKd98TmCeT5vg//PhbV/1pLadwFk7B/5+ymX3FX3rOwnMnirMfUm5 +RHONyKO3BO5K3dfdQLm4QOf60w8E3ptUucGjXLAK7F98IrDas0oji3Jeotls +xzcCN17PteJQzpndmf12nKqXdXHlAcpZh5ygf4rArSctQy0oZ7w70P/5J4E2 +qvtjVCmnWwXGj8wTyOxM0Ph//05rc5/+WMpA1lhe9P/7nVSU6vdHmIFdPuPE +BcpcyZyVi8QZmCk25+NHmfOrctcKBQa2ePD9Wkn5uO/dn+IMBl4X3o3vqfN2 +rO9RjsxqBg72MDTKKIc0vhlgaTHwk3rHSjblQ0mLD2/exsCs5dPjhtR5PjC3 +QszQgoEhxXo5f6j74OkvU22yg4G98Udnb1F22an+22YPAxsqapsYlG1ld3O9 +/RhYjVM1fdR9tD7lvtY/kOrP+Mksl7LlvG9rUBgDlSZxTJ2y6QBHPJrDQM/2 +0bkQ6j5vLi3LO3+egbOvPOu+Unnwhlaaa3yRgSMiywcTKYefL7k0mcvAC25X +RJmUb8UUZ9uUMLATWPH2VJ5oOeRlCt9lIPvcy84CKn9UFqenJHxg4ME3C2rf +J5LQEp56Zv0nBjqK3stwpuw5nnL64xADrUeWJ7yl8qzwzalkw0kGSl97eb4t +ngRaVSL3Dz8T333Vz7pM5aGEc0R0iCoTFYb+VH2m8vTmq6PHWZpM3Nk1PGBC +2dY8LOrVeiYOHN+jXkzlb+r64GNawEQbOX2pfVQ+Cwn6h41aM3HY67nRjaMk +LKpxO+wZysSgXJGzAkHU/RY1d7FvYOLQXji53YuELh+i7WAz1f7bpSvOnlS+ +PPoJx58xcWP0rnx/DxJSwksVr3YwUZiur33CnQSNfsG+2SEmFjXe6Ml3JsGv +8p99OWIsNPn8ecGRXSQMWdnt/bifhXdHMuujjEloL1F7+sObhdKlM+stt5JQ +y8evL+TPwpyyjEJZIxJO3KqW0T3KQl1x9SMkkrBaUaon8RQLr9t3vH+gT4LX +aI/D2moWDv7pH4ij3gMfk13sA5Yo4aPhvM6zstT4Q6qEhqASCgQONG6SIWHG +ZHZkREQJl0RkLu6XImEZX2q8t4wSJnS6JK+VoOZ/tPGGi5oS9noU3b0mQkKk +h5KY1U4lPHg+1GYP9T6RMBj+Z22uEqZJD7suecMDs7FQs0FdZcyujA2wC+CB +nKZCgsBmZVSYcH+f5seD0YCmhrVblHF7dnV360EepE+LbA6wUMaxAy9CNrnz +oHeuZN28M9U+sjHty04eBAi+FZM+oYwX2gdp+To8yFLB3r/fKONG+Z6ezO/U ++9FdIPDG8dV4pUXCWIB6X25jSi5MbFBBx/HWW1d1ykH0udJpcmwN7jjxfcfQ +91KQ4/J26OqqYvjHRA0y/BpkrtUTEfNSwzK3WxvzFpfAE5kt67+fXYfbzpwf +8j95BTbJNaSod6ijFVed5fWpCIT58oNcORrosmb76ta9haAQo7h5t5ImSpgZ +zvRW5cNSlmO1TbMm8uSzOIelL8M6tjQvdJ8W7mVcPXfu71wI6BVtNF+gjQGy +nAezxtkw9j3ZzixTG+caU9vPp18AE/VHWWZqOvjHKu4pTTwD6r7r/5pp1UEV +5c/WzxPTwU9Vq+eFx3r8S9dWScQ6Fdij+1/tXqqLxN0lL4OkU8CYKbVdKF8X +hUtGj4t7JcPq6JNhDRs24J0/t1t+zXNhjYfefVbPBix6HVi3+mo8eNQdiLtx +ZCNij5Pc624O3M97tX9ilR7OHbOJyCeiYfLq/Iz6LT18HrFb1PN0BLizSpdm +bd+En7c4MGZLQ2FiTZpu1fgmFAzcsbBuNhBuF/76MMXVR2fPn0JNM4dhz1YG +6itsRjI0tKTziQ/I+ibWrKvfjOefH06c/+EFq5b5VG7fxcYwyz29TPn9UGgU +GT6+m42xfxsX6AjtB63I00Zpjmz8Gb/C3GrOHSzHydddrmw03PODVfTOHRI6 +pmbdfdjoe/poUPsld/iRf9wwPIaNFQrNjusY7tCjn/ayuJSNU7q1eo3abnAg +uDDbrIKNo98SxJgsN5iuuOkxTLIxO1xb6oyEG4gSXTOa1Wxc//tBUuysK1gI +yMvdq2djc6Hm8cH7rnD3VfH+l6/ZaJGvUsO1dAVz4dtqIV1sjEvaVHgCXaHL +5PG01Bs23jPe6Zqu5QqTtd+4Tu/ZKHWiSL9ZwhXULmuUfx1i40mB4M7LfS5w +t2dLSPIIG8PDnWvGX7iAufhOUB9no+CvtC1mTS7gmRj8ImiKjadlFdUlS1xg +sj4hS/IHG0Wtsk8kX3QBzs8M99qfbDSqIYOWn3YBEZ0S1X1zbJyAyaG0aBe4 +5Fs7NT/PxrLLCz6zAl3gPzW6RM0= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12905028199662316`}}, + "PlotRange" -> {{0, 30}, {0., 0.06481972033045832}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13605,6 +14477,7 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13632,7 +14505,8 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12905028199662316`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06481972033045832}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13640,22 +14514,565 @@ g4c9HQc2nFwVCgk/c3ZU/+ThRouVMWW6ocAyLNJ2/8NDp9iFrq8XhMK5oOrx Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991327033758711*^9}, + CellChangeTimes->{3.991327033758711*^9, 3.994389108464744*^9}, CellLabel-> - "Out[138]=",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] + "Out[150]=",ExpressionUUID->"be651c65-3c01-4b17-9a4c-2f38697ef9f4"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9917999433700733`*^9, 3.9917999479698143`*^9}, - 3.9919244033659534`*^9},ExpressionUUID->"d48877eb-e0f2-d842-b248-\ -ea3fc2b4c4a8"], + 3.9919244033659534`*^9}, + CellLabel-> + "In[151]:=",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.991799951845436*^9, - 3.991799954096182*^9}},ExpressionUUID->"eae5aeae-3f12-2d4a-842b-\ -85a3484011b6"], + CellChangeTimes->{{3.991799951845436*^9, 3.991799954096182*^9}}, + CellLabel-> + "In[152]:=",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VGsYB/BuSiokZF9mzsyQImtKGs8TyXYjQipZQ8pS9ogY2xSVUCQi +W8kyh0pRSSjaXKlsFUVaZL1ZUsk994/zOZ/vH+/yvMvv89Ld/G08Fi5YsGCO ++v7/T/c+bmImFRr49Yt77xMwMHh1Seroli4OrPiw+3Vmsizgqn/cpLpSwcnE +TGlP8loI2XGtk68rHwLEKgo1k/Vh5ahk6mxnFQRVvrvzI8kC+u5a+k92NsBB +QalrZkl7YRtz6N1EZzvst+tuv8I9BLOdG86Nd/aD8I4YSY2oCGg0ulL4Iv87 +bCloJZ4GJ4NcX80nN9U5uMWofOc0nA7iPs7XlhjxYXMUc3SSfRFSNbfdsbQT +wB4+b4GFfXnQnalRPyEihNxZE+FlNwogqfD4PwulV2KliJrQs7hikEwfOJGW +I4ZX+pT4JeevQqKtmUH79Cq8lm0k8HpJKcjcaJVZ+JcEEm289GUipVAhZjuj +uVwCTRz7WjdJlUJHuxN5VlEC17eXmiatLgWmdRBhbSqBFfE2G4ZNS6Fhey5/ +2wUJ/FplplnOLYW5bVOtzzdL4r4XiSGsRWUQqHfZ+TFHCntDckcah8rAPE94 +0iJZCj8Lb5xXmSgDYskxbus5KfTinDNKmimDtlf2lS+vSmE2fcANFpXDusOC +fL2tUhj8aGzMV74cvhSHFv8rI41mmju+DliWg6O45YjsdWk0th9/rFFRDtoR +d2Iu3ZVGa+vB4N/Xy2FZ/2oJ+iNp7OcHs8aacqjh8YFStzSqzC/3MHxYDhIW +NSka89LI8Gry5n9bDm0xTB1jCxnMUaw6UiRQAVvHfob7Dchgxc/gFQZOFXDU +NH3Ng2EZTM8uZ9m6V0DFZbUesWkZJIorTnkcqAApWxe9GgFZ5KQX2IQHVMDw +7YczfOtk0cGzpvxQQgWkcVKCLoTJ4o/a4Azf8groX6Xk1yQkh0v7G0ZGZipA +0v++vKSkHHoVWNL8flfA3y0Oz71pcnho8bmCrwt4UB2epLpCWw7jnkZmty/l +wcm+8aHdDnI40qmz20eWB1old7zG8uWwTrxU6D6bBzGbrV1lNsrjWLyLTH8U +D0ydLv27wVAes0IEz9BjeSAc/S3W7m95zKiXidubyIPsxvjiFBd5NOqyHq87 +w4Pb5rXf+E/II91NpcsojwfjDoyQ793y6LzqFLGtngdOwVMnn0UoYK2ly5t1 +v3nAyjCUG4pXQNOSQ2N18zyq/jPlS1IUMPKzZnPhXySE/1ZpMyxUQL5nBzYo +LybhXKzTqppnCrjM6bfbckESnp1tzi2SV8R6g1gZa2kSNlVcuBF1XxEHJVlt +LzVJ2NrZOjfaooi90xw3VW0SLBcsMnFuV0TB2g8XOTokuNv4dcOgIurb5C1a +vYGEbRH049GLacj6rnPTfjMJhxWnC7aspeFeednnRttImLqe0jKrTsPFzcGj +ISbU/EzXjlTq0LAqcemdK6YkxB9x0SUMaDgmPWe/0IKErMYnLQutafjuoWT+ +RSsSmryocx1CQyPu+CMnBxLMfuuJHoug4Zejz+p8dpPQmvJKVyeahr9eX/YM +20NCd83S6MITNPRTi2jmOpIwujxIND6bhpyR1x2nXEiQIk03bGugYYGlabDK +ARJytg7s/fOIhr0iaWmi3iQQ3ZHR1U9p6G0n5zVLWW3h9cdKr2loGbldvf4Q +CYa28o5LvtBQV/73di1/Enx+TES3CNEx69w98ZJgaj2PeEp8EqWjiYqldFQI +CQJDPaV8UnRscNwauCOUhKI3jR0GBB3DnliqjISR0Ft3TvWmLh11LkaW8h8j +oWzDsoZ2fTp6mHQdeEQ5nIzaNY50LHaNOx4bSYJEvhdnrQUd56Je1k5FkWAV +r9d12ZmOT9/GhdbGkKDwp9z3/n46xj7LEfLgkDAcQvC986ZjYY7CX0KxJHAP +LF8nFUSNl+u/0C6OhHqLd7GnuXRc/lA68mECCVqiMeoRlXSM+ML3dHUSCQuS +ppoyq+k4VF8bWkK5le/gnuo7dPQ/HHtSOZmEQ1M28RMP6bhJM+mj7CkSCruY +b7x66Hg7al/44GkSAqwvHI7voyN9MNHL+gwJ+ESIv+AjHdtU7e/XUn53Z1qj +d5SOfgbalfEpVH25LQm2fASeFdtf8fssCR8l2XIBAgTmt8v/ZZtKQlVKZeUZ +IQJRa33jVcpWnKy3TyQJNLYZzDBPo+r/JRzwRY5Ah47rpRmUhwNjl/ATBHJj +LDT7KXM9fLS2qBL4IdQ03T+dBPve981OmgSmOnwJqKLM3GW375gugZUnHz38 +l3K9qQH3FhIYnVfz5NA5Ek4/qJJ/bUygap9QVCFlx03K1/81JzCMqXi1h/Ls +WpFeNTsCv87OucF5EqZzZGK09xDofe0tzZfy5AoWU8+ZwMJNvv6ZlCdi1JsN +9hP43sHc6gHl0e96B7d6E/iLveLBZ8rfPLYKmfsR+Lts18PlGSR86bQkrQIJ +bPr3vqMa5f477tN7IglcOuhu4k25T83vgguHQMXunouxlN/mhm32TCTQV+tL +/EXK3Stj+w4lExj/dQ1/JeWO2FOcI2cJzIwylG+i/HIqgxV6nmo/2/r0FeU2 +r/yWYxcJjPt8WHSA8vPuskOcPGp9nB5PjFJ+YnFLmFtE4PPZowd/UG6+96Dy +1DUCm7uZkfOUm9Sf2abxCFxc5LNmUSYJDy53zGTeIPBPwmQAP+U6sQ9Zl2oI +7Fd32fW/78R/YxfWEaj/amcXH+XbM1PvSxoJTFQNmv5D9XfTe0Ecr4VaryDP +qhnKVW+WKd98TmCeT5vg//PhbV/1pLadwFk7B/5+ymX3FX3rOwnMnirMfUm5 +RHONyKO3BO5K3dfdQLm4QOf60w8E3ptUucGjXLAK7F98IrDas0oji3Jeotls +xzcCN17PteJQzpndmf12nKqXdXHlAcpZh5ygf4rArSctQy0oZ7w70P/5J4E2 +qvtjVCmnWwXGj8wTyOxM0Ph//05rc5/+WMpA1lhe9P/7nVSU6vdHmIFdPuPE +BcpcyZyVi8QZmCk25+NHmfOrctcKBQa2ePD9Wkn5uO/dn+IMBl4X3o3vqfN2 +rO9RjsxqBg72MDTKKIc0vhlgaTHwk3rHSjblQ0mLD2/exsCs5dPjhtR5PjC3 +QszQgoEhxXo5f6j74OkvU22yg4G98Udnb1F22an+22YPAxsqapsYlG1ld3O9 +/RhYjVM1fdR9tD7lvtY/kOrP+Mksl7LlvG9rUBgDlSZxTJ2y6QBHPJrDQM/2 +0bkQ6j5vLi3LO3+egbOvPOu+Unnwhlaaa3yRgSMiywcTKYefL7k0mcvAC25X +RJmUb8UUZ9uUMLATWPH2VJ5oOeRlCt9lIPvcy84CKn9UFqenJHxg4ME3C2rf +J5LQEp56Zv0nBjqK3stwpuw5nnL64xADrUeWJ7yl8qzwzalkw0kGSl97eb4t +ngRaVSL3Dz8T333Vz7pM5aGEc0R0iCoTFYb+VH2m8vTmq6PHWZpM3Nk1PGBC +2dY8LOrVeiYOHN+jXkzlb+r64GNawEQbOX2pfVQ+Cwn6h41aM3HY67nRjaMk +LKpxO+wZysSgXJGzAkHU/RY1d7FvYOLQXji53YuELh+i7WAz1f7bpSvOnlS+ +PPoJx58xcWP0rnx/DxJSwksVr3YwUZiur33CnQSNfsG+2SEmFjXe6Ml3JsGv +8p99OWIsNPn8ecGRXSQMWdnt/bifhXdHMuujjEloL1F7+sObhdKlM+stt5JQ +y8evL+TPwpyyjEJZIxJO3KqW0T3KQl1x9SMkkrBaUaon8RQLr9t3vH+gT4LX +aI/D2moWDv7pH4ij3gMfk13sA5Yo4aPhvM6zstT4Q6qEhqASCgQONG6SIWHG +ZHZkREQJl0RkLu6XImEZX2q8t4wSJnS6JK+VoOZ/tPGGi5oS9noU3b0mQkKk +h5KY1U4lPHg+1GYP9T6RMBj+Z22uEqZJD7suecMDs7FQs0FdZcyujA2wC+CB +nKZCgsBmZVSYcH+f5seD0YCmhrVblHF7dnV360EepE+LbA6wUMaxAy9CNrnz +oHeuZN28M9U+sjHty04eBAi+FZM+oYwX2gdp+To8yFLB3r/fKONG+Z6ezO/U ++9FdIPDG8dV4pUXCWIB6X25jSi5MbFBBx/HWW1d1ykH0udJpcmwN7jjxfcfQ +91KQ4/J26OqqYvjHRA0y/BpkrtUTEfNSwzK3WxvzFpfAE5kt67+fXYfbzpwf +8j95BTbJNaSod6ijFVed5fWpCIT58oNcORrosmb76ta9haAQo7h5t5ImSpgZ +zvRW5cNSlmO1TbMm8uSzOIelL8M6tjQvdJ8W7mVcPXfu71wI6BVtNF+gjQGy +nAezxtkw9j3ZzixTG+caU9vPp18AE/VHWWZqOvjHKu4pTTwD6r7r/5pp1UEV +5c/WzxPTwU9Vq+eFx3r8S9dWScQ6Fdij+1/tXqqLxN0lL4OkU8CYKbVdKF8X +hUtGj4t7JcPq6JNhDRs24J0/t1t+zXNhjYfefVbPBix6HVi3+mo8eNQdiLtx +ZCNij5Pc624O3M97tX9ilR7OHbOJyCeiYfLq/Iz6LT18HrFb1PN0BLizSpdm +bd+En7c4MGZLQ2FiTZpu1fgmFAzcsbBuNhBuF/76MMXVR2fPn0JNM4dhz1YG +6itsRjI0tKTziQ/I+ibWrKvfjOefH06c/+EFq5b5VG7fxcYwyz29TPn9UGgU +GT6+m42xfxsX6AjtB63I00Zpjmz8Gb/C3GrOHSzHydddrmw03PODVfTOHRI6 +pmbdfdjoe/poUPsld/iRf9wwPIaNFQrNjusY7tCjn/ayuJSNU7q1eo3abnAg +uDDbrIKNo98SxJgsN5iuuOkxTLIxO1xb6oyEG4gSXTOa1Wxc//tBUuysK1gI +yMvdq2djc6Hm8cH7rnD3VfH+l6/ZaJGvUsO1dAVz4dtqIV1sjEvaVHgCXaHL +5PG01Bs23jPe6Zqu5QqTtd+4Tu/ZKHWiSL9ZwhXULmuUfx1i40mB4M7LfS5w +t2dLSPIIG8PDnWvGX7iAufhOUB9no+CvtC1mTS7gmRj8ImiKjadlFdUlS1xg +sj4hS/IHG0Wtsk8kX3QBzs8M99qfbDSqIYOWn3YBEZ0S1X1zbJyAyaG0aBe4 +5Fs7NT/PxrLLCz6zAl3gPzW6RM0= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VGsYB/BuSiokZF9mzsyQImtKGs8TyXYjQipZQ8pS9ogY2xSVUCQi +W8kyh0pRSSjaXKlsFUVaZL1ZUsk994/zOZ/vH+/yvMvv89Ld/G08Fi5YsGCO ++v7/T/c+bmImFRr49Yt77xMwMHh1Seroli4OrPiw+3Vmsizgqn/cpLpSwcnE +TGlP8loI2XGtk68rHwLEKgo1k/Vh5ahk6mxnFQRVvrvzI8kC+u5a+k92NsBB +QalrZkl7YRtz6N1EZzvst+tuv8I9BLOdG86Nd/aD8I4YSY2oCGg0ulL4Iv87 +bCloJZ4GJ4NcX80nN9U5uMWofOc0nA7iPs7XlhjxYXMUc3SSfRFSNbfdsbQT +wB4+b4GFfXnQnalRPyEihNxZE+FlNwogqfD4PwulV2KliJrQs7hikEwfOJGW +I4ZX+pT4JeevQqKtmUH79Cq8lm0k8HpJKcjcaJVZ+JcEEm289GUipVAhZjuj +uVwCTRz7WjdJlUJHuxN5VlEC17eXmiatLgWmdRBhbSqBFfE2G4ZNS6Fhey5/ +2wUJ/FplplnOLYW5bVOtzzdL4r4XiSGsRWUQqHfZ+TFHCntDckcah8rAPE94 +0iJZCj8Lb5xXmSgDYskxbus5KfTinDNKmimDtlf2lS+vSmE2fcANFpXDusOC +fL2tUhj8aGzMV74cvhSHFv8rI41mmju+DliWg6O45YjsdWk0th9/rFFRDtoR +d2Iu3ZVGa+vB4N/Xy2FZ/2oJ+iNp7OcHs8aacqjh8YFStzSqzC/3MHxYDhIW +NSka89LI8Gry5n9bDm0xTB1jCxnMUaw6UiRQAVvHfob7Dchgxc/gFQZOFXDU +NH3Ng2EZTM8uZ9m6V0DFZbUesWkZJIorTnkcqAApWxe9GgFZ5KQX2IQHVMDw +7YczfOtk0cGzpvxQQgWkcVKCLoTJ4o/a4Azf8groX6Xk1yQkh0v7G0ZGZipA +0v++vKSkHHoVWNL8flfA3y0Oz71pcnho8bmCrwt4UB2epLpCWw7jnkZmty/l +wcm+8aHdDnI40qmz20eWB1old7zG8uWwTrxU6D6bBzGbrV1lNsrjWLyLTH8U +D0ydLv27wVAes0IEz9BjeSAc/S3W7m95zKiXidubyIPsxvjiFBd5NOqyHq87 +w4Pb5rXf+E/II91NpcsojwfjDoyQ793y6LzqFLGtngdOwVMnn0UoYK2ly5t1 +v3nAyjCUG4pXQNOSQ2N18zyq/jPlS1IUMPKzZnPhXySE/1ZpMyxUQL5nBzYo +LybhXKzTqppnCrjM6bfbckESnp1tzi2SV8R6g1gZa2kSNlVcuBF1XxEHJVlt +LzVJ2NrZOjfaooi90xw3VW0SLBcsMnFuV0TB2g8XOTokuNv4dcOgIurb5C1a +vYGEbRH049GLacj6rnPTfjMJhxWnC7aspeFeednnRttImLqe0jKrTsPFzcGj +ISbU/EzXjlTq0LAqcemdK6YkxB9x0SUMaDgmPWe/0IKErMYnLQutafjuoWT+ +RSsSmryocx1CQyPu+CMnBxLMfuuJHoug4Zejz+p8dpPQmvJKVyeahr9eX/YM +20NCd83S6MITNPRTi2jmOpIwujxIND6bhpyR1x2nXEiQIk03bGugYYGlabDK +ARJytg7s/fOIhr0iaWmi3iQQ3ZHR1U9p6G0n5zVLWW3h9cdKr2loGbldvf4Q +CYa28o5LvtBQV/73di1/Enx+TES3CNEx69w98ZJgaj2PeEp8EqWjiYqldFQI +CQJDPaV8UnRscNwauCOUhKI3jR0GBB3DnliqjISR0Ft3TvWmLh11LkaW8h8j +oWzDsoZ2fTp6mHQdeEQ5nIzaNY50LHaNOx4bSYJEvhdnrQUd56Je1k5FkWAV +r9d12ZmOT9/GhdbGkKDwp9z3/n46xj7LEfLgkDAcQvC986ZjYY7CX0KxJHAP +LF8nFUSNl+u/0C6OhHqLd7GnuXRc/lA68mECCVqiMeoRlXSM+ML3dHUSCQuS +ppoyq+k4VF8bWkK5le/gnuo7dPQ/HHtSOZmEQ1M28RMP6bhJM+mj7CkSCruY +b7x66Hg7al/44GkSAqwvHI7voyN9MNHL+gwJ+ESIv+AjHdtU7e/XUn53Z1qj +d5SOfgbalfEpVH25LQm2fASeFdtf8fssCR8l2XIBAgTmt8v/ZZtKQlVKZeUZ +IQJRa33jVcpWnKy3TyQJNLYZzDBPo+r/JRzwRY5Ah47rpRmUhwNjl/ATBHJj +LDT7KXM9fLS2qBL4IdQ03T+dBPve981OmgSmOnwJqKLM3GW375gugZUnHz38 +l3K9qQH3FhIYnVfz5NA5Ek4/qJJ/bUygap9QVCFlx03K1/81JzCMqXi1h/Ls +WpFeNTsCv87OucF5EqZzZGK09xDofe0tzZfy5AoWU8+ZwMJNvv6ZlCdi1JsN +9hP43sHc6gHl0e96B7d6E/iLveLBZ8rfPLYKmfsR+Lts18PlGSR86bQkrQIJ +bPr3vqMa5f477tN7IglcOuhu4k25T83vgguHQMXunouxlN/mhm32TCTQV+tL +/EXK3Stj+w4lExj/dQ1/JeWO2FOcI2cJzIwylG+i/HIqgxV6nmo/2/r0FeU2 +r/yWYxcJjPt8WHSA8vPuskOcPGp9nB5PjFJ+YnFLmFtE4PPZowd/UG6+96Dy +1DUCm7uZkfOUm9Sf2abxCFxc5LNmUSYJDy53zGTeIPBPwmQAP+U6sQ9Zl2oI +7Fd32fW/78R/YxfWEaj/amcXH+XbM1PvSxoJTFQNmv5D9XfTe0Ecr4VaryDP +qhnKVW+WKd98TmCeT5vg//PhbV/1pLadwFk7B/5+ymX3FX3rOwnMnirMfUm5 +RHONyKO3BO5K3dfdQLm4QOf60w8E3ptUucGjXLAK7F98IrDas0oji3Jeotls +xzcCN17PteJQzpndmf12nKqXdXHlAcpZh5ygf4rArSctQy0oZ7w70P/5J4E2 +qvtjVCmnWwXGj8wTyOxM0Ph//05rc5/+WMpA1lhe9P/7nVSU6vdHmIFdPuPE +BcpcyZyVi8QZmCk25+NHmfOrctcKBQa2ePD9Wkn5uO/dn+IMBl4X3o3vqfN2 +rO9RjsxqBg72MDTKKIc0vhlgaTHwk3rHSjblQ0mLD2/exsCs5dPjhtR5PjC3 +QszQgoEhxXo5f6j74OkvU22yg4G98Udnb1F22an+22YPAxsqapsYlG1ld3O9 +/RhYjVM1fdR9tD7lvtY/kOrP+Mksl7LlvG9rUBgDlSZxTJ2y6QBHPJrDQM/2 +0bkQ6j5vLi3LO3+egbOvPOu+Unnwhlaaa3yRgSMiywcTKYefL7k0mcvAC25X +RJmUb8UUZ9uUMLATWPH2VJ5oOeRlCt9lIPvcy84CKn9UFqenJHxg4ME3C2rf +J5LQEp56Zv0nBjqK3stwpuw5nnL64xADrUeWJ7yl8qzwzalkw0kGSl97eb4t +ngRaVSL3Dz8T333Vz7pM5aGEc0R0iCoTFYb+VH2m8vTmq6PHWZpM3Nk1PGBC +2dY8LOrVeiYOHN+jXkzlb+r64GNawEQbOX2pfVQ+Cwn6h41aM3HY67nRjaMk +LKpxO+wZysSgXJGzAkHU/RY1d7FvYOLQXji53YuELh+i7WAz1f7bpSvOnlS+ +PPoJx58xcWP0rnx/DxJSwksVr3YwUZiur33CnQSNfsG+2SEmFjXe6Ml3JsGv +8p99OWIsNPn8ecGRXSQMWdnt/bifhXdHMuujjEloL1F7+sObhdKlM+stt5JQ +y8evL+TPwpyyjEJZIxJO3KqW0T3KQl1x9SMkkrBaUaon8RQLr9t3vH+gT4LX +aI/D2moWDv7pH4ij3gMfk13sA5Yo4aPhvM6zstT4Q6qEhqASCgQONG6SIWHG +ZHZkREQJl0RkLu6XImEZX2q8t4wSJnS6JK+VoOZ/tPGGi5oS9noU3b0mQkKk +h5KY1U4lPHg+1GYP9T6RMBj+Z22uEqZJD7suecMDs7FQs0FdZcyujA2wC+CB +nKZCgsBmZVSYcH+f5seD0YCmhrVblHF7dnV360EepE+LbA6wUMaxAy9CNrnz +oHeuZN28M9U+sjHty04eBAi+FZM+oYwX2gdp+To8yFLB3r/fKONG+Z6ezO/U ++9FdIPDG8dV4pUXCWIB6X25jSi5MbFBBx/HWW1d1ykH0udJpcmwN7jjxfcfQ +91KQ4/J26OqqYvjHRA0y/BpkrtUTEfNSwzK3WxvzFpfAE5kt67+fXYfbzpwf +8j95BTbJNaSod6ijFVed5fWpCIT58oNcORrosmb76ta9haAQo7h5t5ImSpgZ +zvRW5cNSlmO1TbMm8uSzOIelL8M6tjQvdJ8W7mVcPXfu71wI6BVtNF+gjQGy +nAezxtkw9j3ZzixTG+caU9vPp18AE/VHWWZqOvjHKu4pTTwD6r7r/5pp1UEV +5c/WzxPTwU9Vq+eFx3r8S9dWScQ6Fdij+1/tXqqLxN0lL4OkU8CYKbVdKF8X +hUtGj4t7JcPq6JNhDRs24J0/t1t+zXNhjYfefVbPBix6HVi3+mo8eNQdiLtx +ZCNij5Pc624O3M97tX9ilR7OHbOJyCeiYfLq/Iz6LT18HrFb1PN0BLizSpdm +bd+En7c4MGZLQ2FiTZpu1fgmFAzcsbBuNhBuF/76MMXVR2fPn0JNM4dhz1YG +6itsRjI0tKTziQ/I+ibWrKvfjOefH06c/+EFq5b5VG7fxcYwyz29TPn9UGgU +GT6+m42xfxsX6AjtB63I00Zpjmz8Gb/C3GrOHSzHydddrmw03PODVfTOHRI6 +pmbdfdjoe/poUPsld/iRf9wwPIaNFQrNjusY7tCjn/ayuJSNU7q1eo3abnAg +uDDbrIKNo98SxJgsN5iuuOkxTLIxO1xb6oyEG4gSXTOa1Wxc//tBUuysK1gI +yMvdq2djc6Hm8cH7rnD3VfH+l6/ZaJGvUsO1dAVz4dtqIV1sjEvaVHgCXaHL +5PG01Bs23jPe6Zqu5QqTtd+4Tu/ZKHWiSL9ZwhXULmuUfx1i40mB4M7LfS5w +t2dLSPIIG8PDnWvGX7iAufhOUB9no+CvtC1mTS7gmRj8ImiKjadlFdUlS1xg +sj4hS/IHG0Wtsk8kX3QBzs8M99qfbDSqIYOWn3YBEZ0S1X1zbJyAyaG0aBe4 +5Fs7NT/PxrLLCz6zAl3gPzW6RM0= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06481972033045832}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06481972033045832}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VGsYB/BuSiokZF9mzsyQImtKGs8TyXYjQipZQ8pS9ogY2xSVUCQi +W8kyh0pRSSjaXKlsFUVaZL1ZUsk994/zOZ/vH+/yvMvv89Ld/G08Fi5YsGCO ++v7/T/c+bmImFRr49Yt77xMwMHh1Seroli4OrPiw+3Vmsizgqn/cpLpSwcnE +TGlP8loI2XGtk68rHwLEKgo1k/Vh5ahk6mxnFQRVvrvzI8kC+u5a+k92NsBB +QalrZkl7YRtz6N1EZzvst+tuv8I9BLOdG86Nd/aD8I4YSY2oCGg0ulL4Iv87 +bCloJZ4GJ4NcX80nN9U5uMWofOc0nA7iPs7XlhjxYXMUc3SSfRFSNbfdsbQT +wB4+b4GFfXnQnalRPyEihNxZE+FlNwogqfD4PwulV2KliJrQs7hikEwfOJGW +I4ZX+pT4JeevQqKtmUH79Cq8lm0k8HpJKcjcaJVZ+JcEEm289GUipVAhZjuj +uVwCTRz7WjdJlUJHuxN5VlEC17eXmiatLgWmdRBhbSqBFfE2G4ZNS6Fhey5/ +2wUJ/FplplnOLYW5bVOtzzdL4r4XiSGsRWUQqHfZ+TFHCntDckcah8rAPE94 +0iJZCj8Lb5xXmSgDYskxbus5KfTinDNKmimDtlf2lS+vSmE2fcANFpXDusOC +fL2tUhj8aGzMV74cvhSHFv8rI41mmju+DliWg6O45YjsdWk0th9/rFFRDtoR +d2Iu3ZVGa+vB4N/Xy2FZ/2oJ+iNp7OcHs8aacqjh8YFStzSqzC/3MHxYDhIW +NSka89LI8Gry5n9bDm0xTB1jCxnMUaw6UiRQAVvHfob7Dchgxc/gFQZOFXDU +NH3Ng2EZTM8uZ9m6V0DFZbUesWkZJIorTnkcqAApWxe9GgFZ5KQX2IQHVMDw +7YczfOtk0cGzpvxQQgWkcVKCLoTJ4o/a4Azf8groX6Xk1yQkh0v7G0ZGZipA +0v++vKSkHHoVWNL8flfA3y0Oz71pcnho8bmCrwt4UB2epLpCWw7jnkZmty/l +wcm+8aHdDnI40qmz20eWB1old7zG8uWwTrxU6D6bBzGbrV1lNsrjWLyLTH8U +D0ydLv27wVAes0IEz9BjeSAc/S3W7m95zKiXidubyIPsxvjiFBd5NOqyHq87 +w4Pb5rXf+E/II91NpcsojwfjDoyQ793y6LzqFLGtngdOwVMnn0UoYK2ly5t1 +v3nAyjCUG4pXQNOSQ2N18zyq/jPlS1IUMPKzZnPhXySE/1ZpMyxUQL5nBzYo +LybhXKzTqppnCrjM6bfbckESnp1tzi2SV8R6g1gZa2kSNlVcuBF1XxEHJVlt +LzVJ2NrZOjfaooi90xw3VW0SLBcsMnFuV0TB2g8XOTokuNv4dcOgIurb5C1a +vYGEbRH049GLacj6rnPTfjMJhxWnC7aspeFeednnRttImLqe0jKrTsPFzcGj +ISbU/EzXjlTq0LAqcemdK6YkxB9x0SUMaDgmPWe/0IKErMYnLQutafjuoWT+ +RSsSmryocx1CQyPu+CMnBxLMfuuJHoug4Zejz+p8dpPQmvJKVyeahr9eX/YM +20NCd83S6MITNPRTi2jmOpIwujxIND6bhpyR1x2nXEiQIk03bGugYYGlabDK +ARJytg7s/fOIhr0iaWmi3iQQ3ZHR1U9p6G0n5zVLWW3h9cdKr2loGbldvf4Q +CYa28o5LvtBQV/73di1/Enx+TES3CNEx69w98ZJgaj2PeEp8EqWjiYqldFQI +CQJDPaV8UnRscNwauCOUhKI3jR0GBB3DnliqjISR0Ft3TvWmLh11LkaW8h8j +oWzDsoZ2fTp6mHQdeEQ5nIzaNY50LHaNOx4bSYJEvhdnrQUd56Je1k5FkWAV +r9d12ZmOT9/GhdbGkKDwp9z3/n46xj7LEfLgkDAcQvC986ZjYY7CX0KxJHAP +LF8nFUSNl+u/0C6OhHqLd7GnuXRc/lA68mECCVqiMeoRlXSM+ML3dHUSCQuS +ppoyq+k4VF8bWkK5le/gnuo7dPQ/HHtSOZmEQ1M28RMP6bhJM+mj7CkSCruY +b7x66Hg7al/44GkSAqwvHI7voyN9MNHL+gwJ+ESIv+AjHdtU7e/XUn53Z1qj +d5SOfgbalfEpVH25LQm2fASeFdtf8fssCR8l2XIBAgTmt8v/ZZtKQlVKZeUZ +IQJRa33jVcpWnKy3TyQJNLYZzDBPo+r/JRzwRY5Ah47rpRmUhwNjl/ATBHJj +LDT7KXM9fLS2qBL4IdQ03T+dBPve981OmgSmOnwJqKLM3GW375gugZUnHz38 +l3K9qQH3FhIYnVfz5NA5Ek4/qJJ/bUygap9QVCFlx03K1/81JzCMqXi1h/Ls +WpFeNTsCv87OucF5EqZzZGK09xDofe0tzZfy5AoWU8+ZwMJNvv6ZlCdi1JsN +9hP43sHc6gHl0e96B7d6E/iLveLBZ8rfPLYKmfsR+Lts18PlGSR86bQkrQIJ +bPr3vqMa5f477tN7IglcOuhu4k25T83vgguHQMXunouxlN/mhm32TCTQV+tL +/EXK3Stj+w4lExj/dQ1/JeWO2FOcI2cJzIwylG+i/HIqgxV6nmo/2/r0FeU2 +r/yWYxcJjPt8WHSA8vPuskOcPGp9nB5PjFJ+YnFLmFtE4PPZowd/UG6+96Dy +1DUCm7uZkfOUm9Sf2abxCFxc5LNmUSYJDy53zGTeIPBPwmQAP+U6sQ9Zl2oI +7Fd32fW/78R/YxfWEaj/amcXH+XbM1PvSxoJTFQNmv5D9XfTe0Ecr4VaryDP +qhnKVW+WKd98TmCeT5vg//PhbV/1pLadwFk7B/5+ymX3FX3rOwnMnirMfUm5 +RHONyKO3BO5K3dfdQLm4QOf60w8E3ptUucGjXLAK7F98IrDas0oji3Jeotls +xzcCN17PteJQzpndmf12nKqXdXHlAcpZh5ygf4rArSctQy0oZ7w70P/5J4E2 +qvtjVCmnWwXGj8wTyOxM0Ph//05rc5/+WMpA1lhe9P/7nVSU6vdHmIFdPuPE +BcpcyZyVi8QZmCk25+NHmfOrctcKBQa2ePD9Wkn5uO/dn+IMBl4X3o3vqfN2 +rO9RjsxqBg72MDTKKIc0vhlgaTHwk3rHSjblQ0mLD2/exsCs5dPjhtR5PjC3 +QszQgoEhxXo5f6j74OkvU22yg4G98Udnb1F22an+22YPAxsqapsYlG1ld3O9 +/RhYjVM1fdR9tD7lvtY/kOrP+Mksl7LlvG9rUBgDlSZxTJ2y6QBHPJrDQM/2 +0bkQ6j5vLi3LO3+egbOvPOu+Unnwhlaaa3yRgSMiywcTKYefL7k0mcvAC25X +RJmUb8UUZ9uUMLATWPH2VJ5oOeRlCt9lIPvcy84CKn9UFqenJHxg4ME3C2rf +J5LQEp56Zv0nBjqK3stwpuw5nnL64xADrUeWJ7yl8qzwzalkw0kGSl97eb4t +ngRaVSL3Dz8T333Vz7pM5aGEc0R0iCoTFYb+VH2m8vTmq6PHWZpM3Nk1PGBC +2dY8LOrVeiYOHN+jXkzlb+r64GNawEQbOX2pfVQ+Cwn6h41aM3HY67nRjaMk +LKpxO+wZysSgXJGzAkHU/RY1d7FvYOLQXji53YuELh+i7WAz1f7bpSvOnlS+ +PPoJx58xcWP0rnx/DxJSwksVr3YwUZiur33CnQSNfsG+2SEmFjXe6Ml3JsGv +8p99OWIsNPn8ecGRXSQMWdnt/bifhXdHMuujjEloL1F7+sObhdKlM+stt5JQ +y8evL+TPwpyyjEJZIxJO3KqW0T3KQl1x9SMkkrBaUaon8RQLr9t3vH+gT4LX +aI/D2moWDv7pH4ij3gMfk13sA5Yo4aPhvM6zstT4Q6qEhqASCgQONG6SIWHG +ZHZkREQJl0RkLu6XImEZX2q8t4wSJnS6JK+VoOZ/tPGGi5oS9noU3b0mQkKk +h5KY1U4lPHg+1GYP9T6RMBj+Z22uEqZJD7suecMDs7FQs0FdZcyujA2wC+CB +nKZCgsBmZVSYcH+f5seD0YCmhrVblHF7dnV360EepE+LbA6wUMaxAy9CNrnz +oHeuZN28M9U+sjHty04eBAi+FZM+oYwX2gdp+To8yFLB3r/fKONG+Z6ezO/U ++9FdIPDG8dV4pUXCWIB6X25jSi5MbFBBx/HWW1d1ykH0udJpcmwN7jjxfcfQ +91KQ4/J26OqqYvjHRA0y/BpkrtUTEfNSwzK3WxvzFpfAE5kt67+fXYfbzpwf +8j95BTbJNaSod6ijFVed5fWpCIT58oNcORrosmb76ta9haAQo7h5t5ImSpgZ +zvRW5cNSlmO1TbMm8uSzOIelL8M6tjQvdJ8W7mVcPXfu71wI6BVtNF+gjQGy +nAezxtkw9j3ZzixTG+caU9vPp18AE/VHWWZqOvjHKu4pTTwD6r7r/5pp1UEV +5c/WzxPTwU9Vq+eFx3r8S9dWScQ6Fdij+1/tXqqLxN0lL4OkU8CYKbVdKF8X +hUtGj4t7JcPq6JNhDRs24J0/t1t+zXNhjYfefVbPBix6HVi3+mo8eNQdiLtx +ZCNij5Pc624O3M97tX9ilR7OHbOJyCeiYfLq/Iz6LT18HrFb1PN0BLizSpdm +bd+En7c4MGZLQ2FiTZpu1fgmFAzcsbBuNhBuF/76MMXVR2fPn0JNM4dhz1YG +6itsRjI0tKTziQ/I+ibWrKvfjOefH06c/+EFq5b5VG7fxcYwyz29TPn9UGgU +GT6+m42xfxsX6AjtB63I00Zpjmz8Gb/C3GrOHSzHydddrmw03PODVfTOHRI6 +pmbdfdjoe/poUPsld/iRf9wwPIaNFQrNjusY7tCjn/ayuJSNU7q1eo3abnAg +uDDbrIKNo98SxJgsN5iuuOkxTLIxO1xb6oyEG4gSXTOa1Wxc//tBUuysK1gI +yMvdq2djc6Hm8cH7rnD3VfH+l6/ZaJGvUsO1dAVz4dtqIV1sjEvaVHgCXaHL +5PG01Bs23jPe6Zqu5QqTtd+4Tu/ZKHWiSL9ZwhXULmuUfx1i40mB4M7LfS5w +t2dLSPIIG8PDnWvGX7iAufhOUB9no+CvtC1mTS7gmRj8ImiKjadlFdUlS1xg +sj4hS/IHG0Wtsk8kX3QBzs8M99qfbDSqIYOWn3YBEZ0S1X1zbJyAyaG0aBe4 +5Fs7NT/PxrLLCz6zAl3gPzW6RM0= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.06481972033045832}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.06481972033045832}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.99438910852194*^9}, + CellLabel-> + "Out[152]=",ExpressionUUID->"ef71c4c3-e96b-435a-93e0-5bf454398217"] +}, Open ]], Cell[CellGroupData[{ @@ -13707,66 +15124,71 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[142]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], + "In[153]:=",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 93, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097599506`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.458833069611031`*^-167\\\", \ +RowBox[{\\\"1611986581187851159566782\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"96\\\", \\\"\[RightSkeleton]\\\"}], \\\"00000000000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 153, 73, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994389108557766*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], +In[153]:=",ExpressionUUID->"747dbb6e-0330-4fcd-80da-640560294c5e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 142, 94, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909769953*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.08736432986246`*^-170\\\", \ +RowBox[{\\\"5055189918605101236401431\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"99\\\", \\\"\[RightSkeleton]\\\"}], \\\"00000000000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 153, 74, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994389108563169*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], +In[153]:=",ExpressionUUID->"476f3a25-7205-4501-92e8-0a872714f547"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 142, 95, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279097784023`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.732208599659627`*^-173\\\", \ +RowBox[{\\\"1642431204554797391706825\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"103\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"00000000000000000000000000\\\"}]]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 153, 75, + 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994389108567024*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], +In[153]:=",ExpressionUUID->"744ae8b1-f29c-4f6a-b131-8d871d13f3d5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 142, 96, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327909786396*^9}, +during this calculation.\"", 2, 153, 76, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279097599506`*^9, 3.994389108571455*^9}, CellLabel-> "During evaluation of \ -In[142]:=",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], +In[153]:=",ExpressionUUID->"29af5e3a-1a88-4992-baa7-d04db85701ec"], -Cell[BoxData["11.275343508420296`"], "Output", - CellChangeTimes->{3.9913279159698696`*^9}, +Cell[BoxData["11.763581372359896`"], "Output", + CellChangeTimes->{3.9913279159698696`*^9, 3.9943891433570127`*^9}, CellLabel-> - "Out[142]=",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] + "Out[153]=",ExpressionUUID->"4055bc0b-4a13-4ea4-8fb2-94ed45b57eb6"] }, Open ]], Cell[CellGroupData[{ @@ -13833,68 +15255,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99179998339209*^9, - 3.991799988637089*^9}},ExpressionUUID->"a5e0631c-6c6c-a045-8418-\ -22c641e38d86"], + CellChangeTimes->{{3.99179998339209*^9, 3.991799988637089*^9}}, + CellLabel-> + "In[154]:=",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 143, 97, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916008396*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8561707149711427`*^-214\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 154, 77, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.994389143393077*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], +In[154]:=",ExpressionUUID->"d990a596-0787-4369-861c-fa919bb4ce83"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 143, 98, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916018362*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3517874610793157`*^-219\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 154, 78, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.994389143397818*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], +In[154]:=",ExpressionUUID->"f364237b-f4f2-4a7e-83fb-afaaafa9eafa"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 143, - 99, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279160263577`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.936475377013931`*^-224\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 154, 79, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.9943891434019413`*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], +In[154]:=",ExpressionUUID->"319cc9ce-f0bd-45f6-9f3f-9e9f2bac014c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 143, 100, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327916034359*^9}, +during this calculation.\"", 2, 154, 80, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327916008396*^9, 3.9943891434069643`*^9}, CellLabel-> "During evaluation of \ -In[143]:=",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], +In[154]:=",ExpressionUUID->"4a939fb7-5251-48a9-a3ac-1352141cb4fe"], -Cell[BoxData["1.0734937398087425`"], "Output", - CellChangeTimes->{3.991327922931429*^9}, +Cell[BoxData["0.5922261472767102`"], "Output", + CellChangeTimes->{3.991327922931429*^9, 3.994389148415606*^9}, CellLabel-> - "Out[143]=",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] + "Out[154]=",ExpressionUUID->"cc31fd0c-3d72-4054-9df6-bbc8d2c6d99c"] }, Open ]], Cell[CellGroupData[{ @@ -13915,8 +15341,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13961,68 +15386,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991799991275097*^9, - 3.9917999948700333`*^9}},ExpressionUUID->"4b6c44e4-d946-0c4d-9992-\ -4f0fc7048689"], + CellChangeTimes->{{3.991799991275097*^9, 3.9917999948700333`*^9}}, + CellLabel-> + "In[155]:=",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 144, 101, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229664307`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8561707149711427`*^-214\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 155, 81, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994389148447217*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], +In[155]:=",ExpressionUUID->"c71ac18c-7a27-4072-8fc6-3b76966a620a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 144, 102, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327922975607*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3517874610793157`*^-219\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 155, 82, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.99438914845216*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], +In[155]:=",ExpressionUUID->"92cd59cf-d60a-4ef4-9288-1fc8960ea9a7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 144, - 103, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229836063`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.936475377013931`*^-224\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 155, 83, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.9943891484559097`*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], +In[155]:=",ExpressionUUID->"044811f3-2471-4d9d-98ca-3180321310c0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 144, 104, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279229916077`*^9}, +during this calculation.\"", 2, 155, 84, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279229664307`*^9, 3.994389148459682*^9}, CellLabel-> "During evaluation of \ -In[144]:=",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], +In[155]:=",ExpressionUUID->"3f22e4bb-7941-4ff0-a9ea-2dcd628f9310"], -Cell[BoxData["9.48093127226425`"], "Output", - CellChangeTimes->{3.9913279288200035`*^9}, +Cell[BoxData["37.579798304479056`"], "Output", + CellChangeTimes->{3.9913279288200035`*^9, 3.994389153133793*^9}, CellLabel-> - "Out[144]=",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] + "Out[155]=",ExpressionUUID->"46940de6-7bfc-4b44-9041-91a4355c9a1b"] }, Open ]], Cell[CellGroupData[{ @@ -14043,8 +15472,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14089,68 +15517,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918000011431293`*^9, - 3.9918000068677616`*^9}},ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-\ -32244819d42b"], + CellChangeTimes->{{3.9918000011431293`*^9, 3.9918000068677616`*^9}}, + CellLabel-> + "In[156]:=",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.227748797408391`*^-204\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 145, 105, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928854006*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8561707149711427`*^-214\\\", \ +RowBox[{\\\"1974042190923019415205737\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"52\\\", \\\"\[RightSkeleton]\\\"}], \\\"06995456000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 156, 85, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994389153162772*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], +In[156]:=",ExpressionUUID->"7b4fe58c-53a6-49ee-a01b-635ffd200c1e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5883416585192085`*^-208\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 145, 106, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928864023*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.3517874610793157`*^-219\\\", \ +RowBox[{\\\"3650004011016662898715408\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"55\\\", \\\"\[RightSkeleton]\\\"}], \\\"34598144000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 156, 86, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.994389153167708*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], +In[156]:=",ExpressionUUID->"b34895c2-d99a-46b4-b7ba-a08074164a9e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.825842483935378`*^-213\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 145, - 107, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928871004*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.936475377013931`*^-224\\\", \ +RowBox[{\\\"7066407765328259371913031\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"58\\\", \\\"\[RightSkeleton]\\\"}], \\\"82006784000000000000000000\\\"}]]\ +\\) is too small to represent as a normalized machine number; precision may \ +be lost.\"", 2, 156, 87, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.9943891531720552`*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], +In[156]:=",ExpressionUUID->"8131f8e9-337b-45b7-a93f-5f411bc58c01"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 145, 108, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327928878006*^9}, +during this calculation.\"", 2, 156, 88, 25994214408697082910, "kernel 3"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327928854006*^9, 3.9943891531759357`*^9}, CellLabel-> "During evaluation of \ -In[145]:=",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], +In[156]:=",ExpressionUUID->"ed83acd1-8cd7-42c3-95b8-6a032920d3e5"], -Cell[BoxData["17.503865312709518`"], "Output", - CellChangeTimes->{3.9913279320131683`*^9}, +Cell[BoxData["6.622033255632885`"], "Output", + CellChangeTimes->{3.9913279320131683`*^9, 3.994389156127512*^9}, CellLabel-> - "Out[145]=",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] + "Out[156]=",ExpressionUUID->"7694bf80-4cff-45a2-8aaa-76c0eaa92f80"] }, Open ]], Cell[CellGroupData[{ @@ -14159,18 +15591,22 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991800029528055*^9, - 3.991800041720209*^9}},ExpressionUUID->"99da2760-e71e-1246-8cc9-\ -f0a7464dc747"], - -Cell[BoxData["0.08333108480569339`"], "Output", - CellChangeTimes->{3.9913279320452003`*^9}, + CellChangeTimes->{{3.991800029528055*^9, 3.991800041720209*^9}}, CellLabel-> - "Out[146]=",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] + "In[157]:=",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], + +Cell[BoxData["0.03754176413336719`"], "Output", + CellChangeTimes->{3.9913279320452003`*^9, 3.994389156153309*^9}, + CellLabel-> + "Out[157]=",ExpressionUUID->"01e5395b-253f-42ae-bd58-13e5a4cba754"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"68695c7d-ff3e-440c-830c-d4e196fe93e9"], + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[158]:=",ExpressionUUID->"68695c7d-ff3e-440c-830c-d4e196fe93e9"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ @@ -14260,12 +15696,107 @@ Cell[BoxData[ RowBox[{"FrameMargins", "->", "10"}]}], "]"}], ",", "\"\\""}], "]"}], "]"}], "\n"}]], "Input", CellChangeTimes->{{3.9943043996512623`*^9, 3.994304399651291*^9}}, - CellLabel->"In[1]:=",ExpressionUUID->"7fb8cc28-1127-4f1a-ae07-82272a37010d"] + CellLabel-> + "In[159]:=",ExpressionUUID->"7fb8cc28-1127-4f1a-ae07-82272a37010d"], + +Cell[BoxData[ + PanelBox[ + TemplateBox[{ + StyleBox[ + "\"\:0423\:043f\:0440\:0430\:0432\:043b\:0435\:043d\:0438\:0435 \:043a\ +\:044d\:0448\:0435\:043c \:0433\:0440\:0430\:0444\:0438\:043a\:0430: \"", + Bold, StripOnInput -> False], + ButtonBox[ + "\"\:0421\:0434\:0435\:043b\:0430\:0442\:044c \:0442\:0430\:0431\:043b\ +\:0438\:0446\:0443 (\:041b\:0438\:043d\:0438\:044f 1)\"", ButtonFunction :> + Module[{$CellContext`cell, $CellContext`pts}, $CellContext`cell = + NotebookRead[ + EvaluationNotebook[]]; $CellContext`pts = + Cases[$CellContext`cell, Line[ + Pattern[$CellContext`p, + Blank[]]] :> $CellContext`p, Infinity]; + If[Length[$CellContext`pts] > + 0, $CellContext`plotX = + Part[$CellContext`pts, 1]; $CellContext`fInterp = + Interpolation[$CellContext`plotX]; $CellContext`dataX = + Table[{$CellContext`x, + $CellContext`fInterp[$CellContext`x]}, {$CellContext`x, 0, 30, + 1}]; SelectionMove[ + EvaluationNotebook[], After, Cell]; CellPrint[ + Cell[ + BoxData[ + ToBoxes[ + TableForm[$CellContext`dataX]]], "Output"]], + MessageDialog[ + "\:041e\:0448\:0438\:0431\:043a\:0430: \ +\:0421\:043d\:0430\:0447\:0430\:043b\:0430 \:0432\:044b\:0434\:0435\:043b\ +\:0438\:0442\:0435 \:043d\:0443\:0436\:043d\:044b\:0439 \:0433\:0440\:0430\ +\:0444\:0438\:043a (\:043a\:043b\:0438\:043a\:043d\:0438\:0442\:0435 \:043f\ +\:043e \:0435\:0433\:043e \:044f\:0447\:0435\:0439\:043a\:0435 \:0441\:043f\ +\:0440\:0430\:0432\:0430)!", WindowFloating -> True]]], Background -> + RGBColor[0.9, 0.95, 1], ImageSize -> {180, 25}, Appearance -> Automatic, + Evaluator -> Automatic, Method -> "Preemptive"]}, + "RowDefault"], + Background->GrayLevel[0.95], + FrameMargins->10]], "Output", + CellChangeTimes->{ + 3.994389156265181*^9},ExpressionUUID->"f6ead6f3-0d88-44bc-ae15-\ +2a665d64757a"], + +Cell[BoxData[ + TagBox[GridBox[{ + {"0", + RowBox[{"-", "4.0657581468206416`*^-20"}]}, + {"1", "0.010617142968433425`"}, + {"2", "0.02089687141760944`"}, + {"3", "0.030520017100302412`"}, + {"4", "0.039200980528489374`"}, + {"5", "0.046703346085971986`"}, + {"6", "0.05284870006318852`"}, + {"7", "0.05752405341515641`"}, + {"8", "0.060684001618552856`"}, + {"9", "0.06234819546021937`"}, + {"10", "0.0625954699659348`"}, + {"11", "0.06155473789857569`"}, + {"12", "0.05939369160912797`"}, + {"13", "0.05630631094414842`"}, + {"14", "0.052500189200203315`"}, + {"15", "0.04818455199787628`"}, + {"16", "0.04355963058231394`"}, + {"17", "0.038808395915712175`"}, + {"18", "0.03408992575776725`"}, + {"19", "0.029535678115093562`"}, + {"20", "0.025248158363960133`"}, + {"21", "0.02130045035798853`"}, + {"22", "0.01773883921350438`"}, + {"23", "0.01458578006944465`"}, + {"24", "0.011843373637174144`"}, + {"25", "0.009497973765650352`"}, + {"26", "0.007524123439861234`"}, + {"27", "0.005888456490367327`"}, + {"28", "0.004553190132416297`"}, + {"29", "0.0034788887752378213`"}, + {"30", "0.0026267129068330316`"} + }, + GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[2.0999999999999996`]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], + Function[BoxForm`e$, + TableForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{ + 3.99438999092943*^9},ExpressionUUID->"b65b0d64-a198-48cc-9a81-2a659cad36f1"] +}, Open ]] }, +Evaluator->"kernel 3", WindowSize->{1440, 882}, WindowMargins->{{0, Automatic}, {0, 18}}, CellContext->Notebook, -Magnification:>1.5 Inherited, +Magnification:>0.6 Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", ExpressionUUID->"8af74bcb-cc50-f64a-8d83-c4bf7188d038" @@ -14282,663 +15813,679 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 354, 7, 55, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], -Cell[933, 31, 260, 5, 62, "Output",ExpressionUUID->"f9762e12-9267-47fa-8806-6002245e3fc8"] +Cell[576, 22, 349, 6, 39, "Input",ExpressionUUID->"351bbc0d-9f60-fb44-a3dd-8326f7c1a9b1"], +Cell[928, 30, 279, 4, 24, "Output",ExpressionUUID->"70aa6b06-9673-4377-855c-d53c427d0e17"] }, Open ]], Cell[CellGroupData[{ -Cell[1230, 41, 253, 5, 55, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], -Cell[1486, 48, 260, 5, 62, "Output",ExpressionUUID->"9df34e1f-52ce-4cb7-89e2-b1ed3fd66791"] +Cell[1244, 39, 248, 4, 21, "Input",ExpressionUUID->"40a7803b-9334-ef42-a720-539edfcf67a8"], +Cell[1495, 45, 277, 4, 24, "Output",ExpressionUUID->"d284b26c-5293-42a5-82d8-8f10998a90a0"] }, Open ]], Cell[CellGroupData[{ -Cell[1783, 58, 226, 5, 55, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], -Cell[2012, 65, 260, 5, 62, "Output",ExpressionUUID->"3e4b3a96-72b8-4abf-aeab-219b4c959203"] +Cell[1809, 54, 221, 4, 21, "Input",ExpressionUUID->"410ced47-4e2a-4e45-9091-53970f892dbb"], +Cell[2033, 60, 277, 4, 24, "Output",ExpressionUUID->"21b16b5e-b643-47bf-b5e7-da02785f2ca4"] }, Open ]], Cell[CellGroupData[{ -Cell[2309, 75, 180, 4, 55, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], -Cell[2492, 81, 260, 5, 62, "Output",ExpressionUUID->"fc1febad-9fb8-4c03-a36a-50afa9cc7108"] +Cell[2347, 69, 175, 3, 21, "Input",ExpressionUUID->"4c6dd23e-75ed-ae4a-acf9-56591f5025df"], +Cell[2525, 74, 279, 4, 24, "Output",ExpressionUUID->"d3865f87-12d7-4407-b487-c0c38670347a"] }, Open ]], Cell[CellGroupData[{ -Cell[2789, 91, 262, 8, 81, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], -Cell[3054, 101, 273, 5, 62, "Output",ExpressionUUID->"089a5bc6-3818-49b5-8294-c6294311a0c2"] +Cell[2841, 83, 257, 7, 31, "Input",ExpressionUUID->"3b0b73a0-2c54-5344-b35f-f9d9ee0b6951"], +Cell[3101, 92, 290, 4, 24, "Output",ExpressionUUID->"59b2d59f-4b14-4fe3-912b-2d59efb82c53"] }, Open ]], Cell[CellGroupData[{ -Cell[3364, 111, 136, 3, 55, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], -Cell[3503, 116, 259, 5, 62, "Output",ExpressionUUID->"f1ccd887-b52c-43c9-89b1-9239e5430c65"] +Cell[3428, 101, 131, 2, 21, "Input",ExpressionUUID->"4393e437-4418-924d-8d4c-7809bc31bb88"], +Cell[3562, 105, 278, 4, 24, "Output",ExpressionUUID->"49203eaa-e359-4d79-88a5-7e17f0487dc2"] }, Open ]], Cell[CellGroupData[{ -Cell[3799, 126, 281, 7, 55, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], -Cell[4083, 135, 273, 5, 62, "Output",ExpressionUUID->"e11cbca4-2937-4fb2-a2eb-3c7299ba1fe6"] +Cell[3877, 114, 276, 6, 21, "Input",ExpressionUUID->"a5385d3b-a023-cd44-b749-4735260b7b95"], +Cell[4156, 122, 290, 4, 24, "Output",ExpressionUUID->"21817df2-910c-4c6b-9c44-3e5d1df81a8c"] }, Open ]], Cell[CellGroupData[{ -Cell[4393, 145, 262, 8, 55, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], -Cell[4658, 155, 273, 5, 62, "Output",ExpressionUUID->"d4e2a5d8-a7a2-475b-9487-873406d22677"] +Cell[4483, 131, 257, 7, 21, "Input",ExpressionUUID->"0a74b7f9-6989-9540-ac07-501b8e8d8162"], +Cell[4743, 140, 290, 4, 25, "Output",ExpressionUUID->"40da0957-b654-477a-b49f-24b2ade98872"] }, Open ]], Cell[CellGroupData[{ -Cell[4968, 165, 209, 4, 55, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], -Cell[5180, 171, 237, 4, 62, "Output",ExpressionUUID->"5f151c0b-3551-4b0f-b0eb-a401e41c9fc2"] +Cell[5070, 149, 204, 3, 22, "Input",ExpressionUUID->"3b44378c-91de-5d4a-a244-b3f5cb1cffbb"], +Cell[5277, 154, 255, 3, 25, "Output",ExpressionUUID->"32db85e2-3048-4b3d-8daf-6ea9756ae57a"] }, Open ]], Cell[CellGroupData[{ -Cell[5454, 180, 207, 4, 55, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], -Cell[5664, 186, 238, 4, 62, "Output",ExpressionUUID->"02059a2f-554c-4b90-9964-b6ffed1c19a1"] +Cell[5569, 162, 203, 3, 22, "Input",ExpressionUUID->"c984ea2d-3d65-1d43-b11d-50fde111107a"], +Cell[5775, 167, 259, 3, 25, "Output",ExpressionUUID->"6ff2fff1-afc5-4cff-9304-6eb1384c6b14"] }, Open ]], Cell[CellGroupData[{ -Cell[5939, 195, 133, 3, 55, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], -Cell[6075, 200, 256, 5, 62, "Output",ExpressionUUID->"31c9ef03-a8d5-419e-bdc4-a3c74cc03bc4"] +Cell[6071, 175, 129, 2, 22, "Input",ExpressionUUID->"75d8f264-5e37-1044-a1c6-061fc9b997d0"], +Cell[6203, 179, 276, 4, 25, "Output",ExpressionUUID->"3d728542-3056-4291-80bd-72ed2de38e07"] }, Open ]], Cell[CellGroupData[{ -Cell[6368, 210, 133, 3, 55, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], -Cell[6504, 215, 258, 5, 62, "Output",ExpressionUUID->"56b1ba07-dcd1-4dff-80a6-e2b24b5b2901"] +Cell[6516, 188, 129, 2, 22, "Input",ExpressionUUID->"8e1bd683-55de-244c-b403-3e685a9f8251"], +Cell[6648, 192, 276, 4, 25, "Output",ExpressionUUID->"b6e3429d-6d4c-45be-83db-63064bffe35b"] }, Open ]], Cell[CellGroupData[{ -Cell[6799, 225, 561, 20, 148, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], -Cell[7363, 247, 270, 5, 62, "Output",ExpressionUUID->"6dc056c6-e85c-41c4-8d0a-5d8b9ddae7d2"] +Cell[6961, 201, 557, 19, 59, "Input",ExpressionUUID->"cc598f43-7215-144d-8c66-c2ede0ad5bde"], +Cell[7521, 222, 288, 4, 25, "Output",ExpressionUUID->"324c9846-0a06-4724-a62c-7670f52e1cc6"] }, Open ]], Cell[CellGroupData[{ -Cell[7670, 257, 561, 20, 148, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], -Cell[8234, 279, 271, 5, 62, "Output",ExpressionUUID->"5971dfaa-c94c-45df-8971-a09869eb43d1"] +Cell[7846, 231, 557, 19, 59, "Input",ExpressionUUID->"5250e8ec-d471-e940-b083-114175ffd792"], +Cell[8406, 252, 288, 4, 25, "Output",ExpressionUUID->"b1641e69-405e-4489-9a7b-6aed62f08eb6"] }, Open ]], Cell[CellGroupData[{ -Cell[8542, 289, 1592, 51, 211, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], -Cell[10137, 342, 272, 5, 62, "Output",ExpressionUUID->"f1a06989-a7de-46c4-b03d-9a750dcf58c8"] +Cell[8731, 261, 1588, 50, 84, "Input",ExpressionUUID->"d47cc9a8-08a4-8645-9d02-c9ac151b001f"], +Cell[10322, 313, 290, 4, 25, "Output",ExpressionUUID->"206e5343-045e-4b84-b0fe-479087bf96e1"] }, Open ]], Cell[CellGroupData[{ -Cell[10446, 352, 1426, 47, 211, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], -Cell[11875, 401, 290, 6, 62, "Output",ExpressionUUID->"5504cb81-c891-481c-8e7a-a777b4cf5f7d"] +Cell[10649, 322, 1422, 46, 84, "Input",ExpressionUUID->"173d41f5-2f55-8540-9f84-3fa71a960dd9"], +Cell[12074, 370, 307, 5, 25, "Output",ExpressionUUID->"09bc8fd4-546c-46e1-874d-6d47d91ff4ce"] }, Open ]], Cell[CellGroupData[{ -Cell[12202, 412, 1426, 47, 211, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], -Cell[13631, 461, 291, 6, 62, "Output",ExpressionUUID->"f6642a88-88c6-46c5-8405-2b16fe6405a5"] +Cell[12418, 380, 1422, 46, 84, "Input",ExpressionUUID->"1a0365c8-da51-384e-a9af-9acfff34d31e"], +Cell[13843, 428, 308, 5, 25, "Output",ExpressionUUID->"07200346-8850-46f4-935f-2c7b045a1827"] }, Open ]], Cell[CellGroupData[{ -Cell[13959, 472, 1592, 51, 211, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], -Cell[15554, 525, 269, 5, 62, "Output",ExpressionUUID->"e792967f-1e94-4818-8464-1d5064316cbc"] +Cell[14188, 438, 1588, 50, 84, "Input",ExpressionUUID->"c4f93205-e8b5-4545-b925-7a3667f2b8dc"], +Cell[15779, 490, 289, 4, 25, "Output",ExpressionUUID->"55843a10-093b-4d4b-a186-af068324996a"] }, Open ]], Cell[CellGroupData[{ -Cell[15860, 535, 135, 3, 55, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], -Cell[15998, 540, 258, 5, 62, "Output",ExpressionUUID->"693d205b-3ef2-4518-88fa-84bc7cf50447"] +Cell[16105, 499, 131, 2, 22, "Input",ExpressionUUID->"1ed671ea-8189-3149-a8ce-72bd20eeb073"], +Cell[16239, 503, 276, 4, 25, "Output",ExpressionUUID->"4918bb51-a939-4e77-a7b4-65c6d28fcd5f"] }, Open ]], Cell[CellGroupData[{ -Cell[16293, 550, 137, 3, 55, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], -Cell[16433, 555, 255, 5, 62, "Output",ExpressionUUID->"a7c39232-9068-448e-ad6a-4f30f2f26e89"] +Cell[16552, 512, 133, 2, 22, "Input",ExpressionUUID->"70475143-92e0-6e44-8a83-18cdd4a8c535"], +Cell[16688, 516, 275, 4, 25, "Output",ExpressionUUID->"07349ef6-c6af-41f8-9f09-61507a67ee50"] }, Open ]], Cell[CellGroupData[{ -Cell[16725, 565, 138, 3, 55, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], -Cell[16866, 570, 262, 5, 62, "Output",ExpressionUUID->"a55ae702-b51d-4113-be61-6345ce492dc4"] +Cell[17000, 525, 134, 2, 22, "Input",ExpressionUUID->"2462dcb2-0cb8-e248-aa5d-f9a9cd16feb3"], +Cell[17137, 529, 280, 4, 25, "Output",ExpressionUUID->"75363fa9-9aa4-4e6f-a9d9-39030392d1e0"] }, Open ]], Cell[CellGroupData[{ -Cell[17165, 580, 223, 5, 55, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], -Cell[17391, 587, 272, 6, 62, "Output",ExpressionUUID->"7957c0c3-24f6-449d-8a3e-badebf9dbf51"] +Cell[17454, 538, 219, 4, 22, "Input",ExpressionUUID->"06c5a55e-2df6-ad42-b792-346d68f826dc"], +Cell[17676, 544, 289, 5, 25, "Output",ExpressionUUID->"3e3ebe99-4cf7-419f-ab3c-d75fc0d65526"] }, Open ]], Cell[CellGroupData[{ -Cell[17700, 598, 138, 3, 55, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], -Cell[17841, 603, 260, 5, 62, "Output",ExpressionUUID->"5efdd1cf-c8d8-4e12-b3a7-5766434c2c05"] +Cell[18002, 554, 134, 2, 22, "Input",ExpressionUUID->"7a73cda7-5988-ca4e-b1d4-9678ae3b25bc"], +Cell[18139, 558, 280, 4, 25, "Output",ExpressionUUID->"8e0fee91-c425-40f9-b657-0c5492aa8ff5"] }, Open ]], Cell[CellGroupData[{ -Cell[18138, 613, 328, 6, 55, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], -Cell[18469, 621, 253, 5, 62, "Output",ExpressionUUID->"b084d395-d063-4ba6-9417-3466190acb62"] +Cell[18456, 567, 324, 5, 22, "Input",ExpressionUUID->"50acb4f0-66e7-924a-841b-56c0ae53ef15"], +Cell[18783, 574, 273, 4, 25, "Output",ExpressionUUID->"f6fd6002-3d38-474e-989d-70baa8763238"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 631, 299, 6, 55, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], -Cell[19061, 639, 252, 5, 62, "Output",ExpressionUUID->"c765c8df-63cc-42f0-a521-78ad287ccf02"] +Cell[19093, 583, 295, 5, 22, "Input",ExpressionUUID->"4451fdbc-8b04-2c43-a6db-990caacde85d"], +Cell[19391, 590, 272, 4, 25, "Output",ExpressionUUID->"9b317086-0758-4cd2-9d59-f2652872315b"] }, Open ]], Cell[CellGroupData[{ -Cell[19350, 649, 223, 5, 55, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], -Cell[19576, 656, 257, 5, 62, "Output",ExpressionUUID->"3386464b-a6af-492c-af10-1c78731e4151"] +Cell[19700, 599, 219, 4, 22, "Input",ExpressionUUID->"054b1b4f-0e8a-0845-baa0-2842a740e988"], +Cell[19922, 605, 275, 4, 25, "Output",ExpressionUUID->"5e6f4508-347f-48ee-bc96-7126e62e8e9e"] }, Open ]], Cell[CellGroupData[{ -Cell[19870, 666, 354, 11, 81, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], -Cell[20227, 679, 275, 5, 62, "Output",ExpressionUUID->"94bfc6db-9198-49f1-a9f3-94ba6ed8e927"] +Cell[20234, 614, 350, 10, 32, "Input",ExpressionUUID->"d5f2edc1-8551-7648-9dc8-cd367297c908"], +Cell[20587, 626, 293, 4, 25, "Output",ExpressionUUID->"434da526-e348-4caf-b1cf-690ec69d0c6d"] }, Open ]], Cell[CellGroupData[{ -Cell[20539, 689, 354, 11, 81, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], -Cell[20896, 702, 288, 6, 62, "Output",ExpressionUUID->"7df2e02d-ceb9-4e02-b431-c4e3dc07a1ae"] +Cell[20917, 635, 350, 10, 32, "Input",ExpressionUUID->"01eb3c5e-aadf-9d41-ba4e-940b4b61c6c8"], +Cell[21270, 647, 308, 5, 25, "Output",ExpressionUUID->"de676fc9-d1fc-4513-a4d5-1d3816689bfe"] }, Open ]], Cell[CellGroupData[{ -Cell[21221, 713, 998, 27, 154, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], -Cell[22222, 742, 276, 5, 62, "Output",ExpressionUUID->"c90de278-6f4b-43a0-84bb-271f080c496b"] +Cell[21615, 657, 994, 26, 61, "Input",ExpressionUUID->"957e37d7-d728-e448-9a63-f9d65131b81c"], +Cell[22612, 685, 294, 4, 25, "Output",ExpressionUUID->"3e2737e7-70fa-4c87-9f91-90483c7f68ee"] }, Open ]], Cell[CellGroupData[{ -Cell[22535, 752, 203, 4, 55, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], -Cell[22741, 758, 258, 5, 62, "Output",ExpressionUUID->"f548e84f-605f-4274-97e2-3ddbb7d20a31"] +Cell[22943, 694, 199, 3, 22, "Input",ExpressionUUID->"38330a7d-57e4-8f49-a9b3-c77bde88f24f"], +Cell[23145, 699, 278, 4, 25, "Output",ExpressionUUID->"9bbfd4c8-4321-4e1e-a8aa-175253823bcf"] }, Open ]], Cell[CellGroupData[{ -Cell[23036, 768, 331, 6, 55, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], -Cell[23370, 776, 235, 4, 62, "Output",ExpressionUUID->"0e689e33-997a-4bfb-bde3-b7ebe94d83f2"] +Cell[23460, 708, 327, 5, 22, "Input",ExpressionUUID->"477d69f3-81a2-6d40-bff8-58a9467eced9"], +Cell[23790, 715, 254, 3, 25, "Output",ExpressionUUID->"e7a09ff1-ac27-4d33-8b58-7080d85420c5"] }, Open ]], -Cell[23620, 783, 177, 3, 55, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], +Cell[24059, 721, 173, 2, 22, "Input",ExpressionUUID->"6a2dd87e-b2f5-1d41-b680-bb644ea0ddfa"], Cell[CellGroupData[{ -Cell[23822, 790, 333, 6, 55, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], -Cell[24158, 798, 232, 4, 62, "Output",ExpressionUUID->"23abc775-7d15-4b54-956b-f4b88dbdb298"] +Cell[24257, 727, 329, 5, 22, "Input",ExpressionUUID->"a9223860-e2cf-2047-9a01-b6480cd2846d"], +Cell[24589, 734, 253, 3, 25, "Output",ExpressionUUID->"b0e42072-1ace-4f76-b2dd-7ceb494c7351"] }, Open ]], -Cell[24405, 805, 177, 3, 55, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], +Cell[24857, 740, 173, 2, 22, "Input",ExpressionUUID->"d35f11fe-a53c-8943-ac4f-07cc8884f5b8"], Cell[CellGroupData[{ -Cell[24607, 812, 336, 6, 55, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], -Cell[24946, 820, 231, 4, 62, "Output",ExpressionUUID->"285f7f9a-06e2-417c-b156-5d97ac66c414"] +Cell[25055, 746, 332, 5, 22, "Input",ExpressionUUID->"afeba878-eb4d-ef43-8941-b46079e5a618"], +Cell[25390, 753, 250, 3, 25, "Output",ExpressionUUID->"9f6b6502-3e62-4658-8ed2-2f91eadd42ef"] }, Open ]], -Cell[25192, 827, 177, 3, 55, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], +Cell[25655, 759, 173, 2, 22, "Input",ExpressionUUID->"12665172-e21c-4e44-b1fc-e81404b2a0db"], Cell[CellGroupData[{ -Cell[25394, 834, 358, 6, 55, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], -Cell[25755, 842, 237, 4, 62, "Output",ExpressionUUID->"67719885-cd0e-433e-88e0-39f4ff4f62f3"] +Cell[25853, 765, 354, 5, 22, "Input",ExpressionUUID->"81b490c7-39d4-f348-8914-f54b23f74296"], +Cell[26210, 772, 256, 3, 25, "Output",ExpressionUUID->"c2ca9bfc-32f4-42f8-b982-f70d688e23f8"] }, Open ]], -Cell[26007, 849, 175, 3, 55, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], +Cell[26481, 778, 171, 2, 22, "Input",ExpressionUUID->"78f54ff3-2505-5940-9b78-ccc2627a783c"], Cell[CellGroupData[{ -Cell[26207, 856, 303, 6, 55, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], -Cell[26513, 864, 237, 4, 62, "Output",ExpressionUUID->"28680976-e45d-497a-9c9f-9733bd0bae2a"] +Cell[26677, 784, 299, 5, 22, "Input",ExpressionUUID->"17c8b6b3-c729-7c42-8964-e70aa92597e4"], +Cell[26979, 791, 256, 3, 25, "Output",ExpressionUUID->"d72ea51c-7056-4acb-8520-938ff2092ed5"] }, Open ]], -Cell[26765, 871, 175, 3, 55, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], +Cell[27250, 797, 171, 2, 22, "Input",ExpressionUUID->"3908ad8b-9aa1-4d42-954c-a3b9eef1576d"], Cell[CellGroupData[{ -Cell[26965, 878, 307, 6, 55, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], -Cell[27275, 886, 233, 4, 62, "Output",ExpressionUUID->"32be1364-5fd4-4df3-9515-955ffc31a2d9"] +Cell[27446, 803, 303, 5, 22, "Input",ExpressionUUID->"92080e53-e7ee-a444-8071-b94745a1c38a"], +Cell[27752, 810, 252, 3, 25, "Output",ExpressionUUID->"42976ed4-03d6-40c5-b3db-23e8ff87da34"] }, Open ]], -Cell[27523, 893, 177, 3, 55, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], +Cell[28019, 816, 173, 2, 22, "Input",ExpressionUUID->"b1e9f36c-5bc2-0c4d-92a1-7d827c4ef6de"], Cell[CellGroupData[{ -Cell[27725, 900, 311, 6, 55, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], -Cell[28039, 908, 232, 4, 62, "Output",ExpressionUUID->"0926821a-87af-4ceb-9932-a1ebc88c972b"] +Cell[28217, 822, 307, 5, 22, "Input",ExpressionUUID->"d8094a6a-d67c-3d48-bcaa-264265a5c2d2"], +Cell[28527, 829, 251, 3, 25, "Output",ExpressionUUID->"a68ca493-6345-4a8f-a66c-945e4c67880e"] }, Open ]], -Cell[28286, 915, 176, 3, 55, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], +Cell[28793, 835, 172, 2, 22, "Input",ExpressionUUID->"cc794a1b-7691-8f4d-a4bc-01ae055dd38b"], Cell[CellGroupData[{ -Cell[28487, 922, 279, 5, 55, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], -Cell[28769, 929, 231, 4, 62, "Output",ExpressionUUID->"63fcce57-2676-49ff-a853-6e78541ed516"] +Cell[28990, 841, 275, 4, 22, "Input",ExpressionUUID->"0efd73e6-d1c0-4449-a060-0fd7b04115ca"], +Cell[29268, 847, 250, 3, 25, "Output",ExpressionUUID->"240be5f5-9eef-40ac-8a60-666b510531ca"] }, Open ]], -Cell[29015, 936, 179, 3, 55, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], +Cell[29533, 853, 175, 2, 22, "Input",ExpressionUUID->"cc8697be-e0d9-6944-bb0c-e22b0839e976"], Cell[CellGroupData[{ -Cell[29219, 943, 19813, 486, 3214, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], -Cell[49035, 1431, 272, 5, 62, "Output",ExpressionUUID->"411a5131-3b33-45a0-894b-111161436c1a"] +Cell[29733, 859, 19809, 485, 1285, "Input",ExpressionUUID->"f88ffeec-96f4-c047-a5a9-6451a0605337"], +Cell[49545, 1346, 292, 4, 25, "Output",ExpressionUUID->"dea40bcc-8df4-4a19-92f5-f81dcbc65fdd"] }, Open ]], Cell[CellGroupData[{ -Cell[49344, 1441, 19752, 490, 3214, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], -Cell[69099, 1933, 271, 5, 62, "Output",ExpressionUUID->"7a2946b6-15b0-4efc-891d-59318f57e0a0"] +Cell[49874, 1355, 19748, 489, 1285, "Input",ExpressionUUID->"9591c53c-0076-6843-b513-d92cafe6e7a1"], +Cell[69625, 1846, 289, 4, 25, "Output",ExpressionUUID->"eb41bc74-2b00-4708-93aa-eeadb8a10f48"] }, Open ]], Cell[CellGroupData[{ -Cell[69407, 1943, 19752, 484, 3213, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], -Cell[89162, 2429, 289, 6, 62, "Output",ExpressionUUID->"d3db5732-abdb-4f42-bb8e-c94398a97284"] +Cell[69951, 1855, 19748, 483, 1285, "Input",ExpressionUUID->"8502aa34-e91a-9048-ac4e-0c1d99702bcf"], +Cell[89702, 2340, 307, 5, 25, "Output",ExpressionUUID->"b94fc00e-43dc-4cc0-90b4-e28b53690d96"] }, Open ]], Cell[CellGroupData[{ -Cell[89488, 2440, 22538, 554, 3639, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], -Cell[112029, 2996, 291, 6, 62, "Output",ExpressionUUID->"e04073d8-5cd1-4a34-a275-873f38cb9eae"] +Cell[90046, 2350, 22534, 553, 1455, "Input",ExpressionUUID->"6ad63411-c9d6-5a4a-84d0-dc66849392ef"], +Cell[112583, 2905, 309, 5, 25, "Output",ExpressionUUID->"30fc042d-0d40-4824-a040-93177903cbfe"] }, Open ]], Cell[CellGroupData[{ -Cell[112357, 3007, 22539, 554, 3639, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], -Cell[134899, 3563, 292, 6, 62, "Output",ExpressionUUID->"ef0001a9-8dc6-4a72-936d-29f33ed46a0c"] +Cell[112929, 2915, 22535, 553, 1455, "Input",ExpressionUUID->"30036f36-0c55-214a-92c3-79cfd2a0c67a"], +Cell[135467, 3470, 310, 5, 25, "Output",ExpressionUUID->"80656afd-7008-4edb-9980-4cd07c126403"] }, Open ]], Cell[CellGroupData[{ -Cell[135228, 3574, 25495, 627, 4065, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], -Cell[160726, 4203, 286, 6, 62, "Output",ExpressionUUID->"ada8cea0-0dc8-40e0-96d3-6bceecba2f99"] +Cell[135814, 3480, 25491, 626, 1626, "Input",ExpressionUUID->"549a1778-a43a-4e45-9a11-32d9c77fa33e"], +Cell[161308, 4108, 304, 5, 25, "Output",ExpressionUUID->"7a4ba24e-a6d2-446d-a87e-0e6340bb060a"] }, Open ]], Cell[CellGroupData[{ -Cell[161049, 4214, 134, 3, 55, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], -Cell[161186, 4219, 254, 5, 62, "Output",ExpressionUUID->"9ede69e9-fdd8-41d0-960e-c87c01875323"] +Cell[161649, 4118, 130, 2, 22, "Input",ExpressionUUID->"1de05a27-91fb-374c-9bf4-36eb924ab119"], +Cell[161782, 4122, 272, 4, 25, "Output",ExpressionUUID->"023293c0-cbc1-4ca4-8909-cea6651f44d7"] }, Open ]], Cell[CellGroupData[{ -Cell[161477, 4229, 134, 3, 55, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], -Cell[161614, 4234, 254, 5, 62, "Output",ExpressionUUID->"bf992dd7-dd94-4316-9009-1e7e45b14028"] +Cell[162091, 4131, 130, 2, 22, "Input",ExpressionUUID->"697de377-c4a3-6a42-abd6-fdfc5aa82b17"], +Cell[162224, 4135, 274, 4, 25, "Output",ExpressionUUID->"7a40204f-5e69-43ec-bfc0-826b2be29718"] }, Open ]], Cell[CellGroupData[{ -Cell[161905, 4244, 1148, 40, 211, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], -Cell[163056, 4286, 271, 5, 62, "Output",ExpressionUUID->"21ada3b5-49c8-4841-bda5-7066b8a0a78e"] +Cell[162535, 4144, 1144, 39, 84, "Input",ExpressionUUID->"94ea3d4e-e0b2-bc43-9598-11f2ab415b83"], +Cell[163682, 4185, 289, 4, 25, "Output",ExpressionUUID->"96140589-9830-455a-ae26-15d459230a24"] }, Open ]], Cell[CellGroupData[{ -Cell[163364, 4296, 1045, 36, 211, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], -Cell[164412, 4334, 286, 6, 62, "Output",ExpressionUUID->"7c1e8e4b-9f34-48ad-86dd-7d5290ebb334"] +Cell[164008, 4194, 1041, 35, 84, "Input",ExpressionUUID->"2492a1fb-0cde-0f4b-8029-0c1ad31ae0ff"], +Cell[165052, 4231, 304, 5, 25, "Output",ExpressionUUID->"4471007f-15f7-4300-b874-29924e891df2"] }, Open ]], Cell[CellGroupData[{ -Cell[164735, 4345, 1148, 40, 211, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], -Cell[165886, 4387, 271, 5, 62, "Output",ExpressionUUID->"5fbe48ec-cfd4-4745-8e9b-ea52d9558406"] +Cell[165393, 4241, 1144, 39, 84, "Input",ExpressionUUID->"43ac9026-ad7b-984c-bdea-7f5728138bc4"], +Cell[166540, 4282, 288, 4, 25, "Output",ExpressionUUID->"68e0a8ba-51eb-4f21-a316-d385c9ce469d"] }, Open ]], Cell[CellGroupData[{ -Cell[166194, 4397, 112, 2, 55, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], -Cell[166309, 4401, 272, 5, 62, "Output",ExpressionUUID->"6e05ceff-ecc7-46a8-a998-a315e70bb1bf"] +Cell[166865, 4291, 108, 1, 22, "Input",ExpressionUUID->"c9b84954-5fec-7d49-9262-9c2a3c4ce713"], +Cell[166976, 4294, 290, 4, 25, "Output",ExpressionUUID->"981e019d-ae45-4804-b682-e1848a5636a2"] }, Open ]], Cell[CellGroupData[{ -Cell[166618, 4411, 112, 2, 55, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], -Cell[166733, 4415, 289, 6, 62, "Output",ExpressionUUID->"9b647d4e-3178-40c7-a764-c7add69147ac"] +Cell[167303, 4303, 108, 1, 22, "Input",ExpressionUUID->"1c75f6b7-d1c2-4b41-abdb-2201a28b86e3"], +Cell[167414, 4306, 307, 5, 25, "Output",ExpressionUUID->"1156ddbd-9b01-4062-a6b4-68c27bee3bb0"] }, Open ]], Cell[CellGroupData[{ -Cell[167059, 4426, 112, 2, 55, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], -Cell[167174, 4430, 287, 6, 62, "Output",ExpressionUUID->"2ea5813a-34db-4ff4-a493-8d80ec769f79"] +Cell[167758, 4316, 108, 1, 22, "Input",ExpressionUUID->"4faecd3f-a48f-a345-a962-630b0b0387c6"], +Cell[167869, 4319, 304, 5, 25, "Output",ExpressionUUID->"6e9902e9-7e21-4a15-a580-21a1a3e92932"] }, Open ]], Cell[CellGroupData[{ -Cell[167498, 4441, 112, 2, 55, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], -Cell[167613, 4445, 274, 5, 62, "Output",ExpressionUUID->"78a7daac-e478-4758-acf9-1c6c23757080"] +Cell[168210, 4329, 108, 1, 22, "Input",ExpressionUUID->"4e39798e-d021-5445-8896-673aeaee51b1"], +Cell[168321, 4332, 292, 4, 25, "Output",ExpressionUUID->"bd237753-364b-4491-b9d5-2e6425e6d062"] }, Open ]], Cell[CellGroupData[{ -Cell[167924, 4455, 111, 2, 55, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], -Cell[168038, 4459, 272, 5, 62, "Output",ExpressionUUID->"678c88f3-334b-4dce-b98a-c9d90c2c4491"] +Cell[168650, 4341, 107, 1, 22, "Input",ExpressionUUID->"18acb8af-3ba3-704e-b004-19ebda7db232"], +Cell[168760, 4344, 290, 4, 25, "Output",ExpressionUUID->"ea34a845-f1bc-4c7c-bac8-5277be925f45"] }, Open ]], Cell[CellGroupData[{ -Cell[168347, 4469, 111, 2, 55, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], -Cell[168461, 4473, 272, 5, 62, "Output",ExpressionUUID->"b60f3e52-d975-4951-bcab-04f0c8b38840"] +Cell[169087, 4353, 107, 1, 22, "Input",ExpressionUUID->"03f4f06b-f87b-184d-9748-965db47fceb7"], +Cell[169197, 4356, 292, 4, 25, "Output",ExpressionUUID->"71141a03-9d75-44ca-88df-1f8b3238e1f3"] }, Open ]], Cell[CellGroupData[{ -Cell[168770, 4483, 501, 17, 105, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], -Cell[169274, 4502, 287, 6, 62, "Output",ExpressionUUID->"28130a5d-291f-4965-a76d-c2462d9c33db"] +Cell[169526, 4365, 497, 16, 42, "Input",ExpressionUUID->"4810f0aa-dabf-a247-9e90-3e224a24b9c4"], +Cell[170026, 4383, 305, 5, 25, "Output",ExpressionUUID->"de0f1265-d9d0-4c7e-aca0-2a7371373f13"] }, Open ]], Cell[CellGroupData[{ -Cell[169598, 4513, 501, 17, 105, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], -Cell[170102, 4532, 286, 6, 62, "Output",ExpressionUUID->"08e67a85-9b14-40f9-847b-4fb28eca4378"] +Cell[170368, 4393, 497, 16, 42, "Input",ExpressionUUID->"fbd88556-f41b-4042-9336-97ea03c08800"], +Cell[170868, 4411, 306, 5, 25, "Output",ExpressionUUID->"75bf9de7-dc86-447f-a54d-21211906796c"] }, Open ]], Cell[CellGroupData[{ -Cell[170425, 4543, 1792, 61, 358, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], -Cell[172220, 4606, 270, 5, 62, "Output",ExpressionUUID->"fc4c009b-4226-4193-8c5c-2b3c3c1cb35b"] +Cell[171211, 4421, 1788, 60, 143, "Input",ExpressionUUID->"bcdd28c4-9a78-2a44-b854-ef88bbc17e46"], +Cell[173002, 4483, 290, 4, 25, "Output",ExpressionUUID->"d53b77d0-0c91-42e9-a5fe-7d6eb6fc7c9e"] }, Open ]], Cell[CellGroupData[{ -Cell[172527, 4616, 1105, 37, 256, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], -Cell[173635, 4655, 291, 6, 62, "Output",ExpressionUUID->"619b4bd1-7791-42f4-a5c9-213f0712b905"] +Cell[173329, 4492, 1101, 36, 102, "Input",ExpressionUUID->"cb449bf0-0225-b74b-a7eb-da633694c642"], +Cell[174433, 4530, 309, 5, 25, "Output",ExpressionUUID->"d292dd90-20d8-4de1-96dc-5fcfc4637879"] }, Open ]], Cell[CellGroupData[{ -Cell[173963, 4666, 1822, 62, 313, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], -Cell[175788, 4730, 269, 5, 62, "Output",ExpressionUUID->"fce4da0b-4d58-49d8-bfa1-3aa854f17c16"] +Cell[174779, 4540, 1818, 61, 125, "Input",ExpressionUUID->"499f7984-fdca-3841-a79e-5312624ba7d1"], +Cell[176600, 4603, 287, 4, 25, "Output",ExpressionUUID->"fa97b1bd-17e7-459f-9d2e-9145fa3d72ae"] }, Open ]], Cell[CellGroupData[{ -Cell[176094, 4740, 1635, 54, 310, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], -Cell[177732, 4796, 273, 5, 62, "Output",ExpressionUUID->"caf71c16-6c0a-4583-8266-aa02b4b5b181"] +Cell[176924, 4612, 1631, 53, 124, "Input",ExpressionUUID->"a89765b9-ecae-b94a-b52d-9e09b94eaec7"], +Cell[178558, 4667, 291, 4, 25, "Output",ExpressionUUID->"3918579b-1889-4ace-88b7-95cdca6bf2dd"] }, Open ]], Cell[CellGroupData[{ -Cell[178042, 4806, 1635, 54, 310, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], -Cell[179680, 4862, 272, 5, 62, "Output",ExpressionUUID->"be7fc9b0-8863-48a4-9c93-e6fa73bf15df"] +Cell[178886, 4676, 1631, 53, 124, "Input",ExpressionUUID->"75a4e593-60a4-d44b-ba89-8ad9cf15c456"], +Cell[180520, 4731, 292, 4, 25, "Output",ExpressionUUID->"4a7f6d12-1e92-4831-8a21-91a8adee4c53"] }, Open ]], Cell[CellGroupData[{ -Cell[179989, 4872, 206, 4, 55, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], -Cell[180198, 4878, 238, 4, 62, "Output",ExpressionUUID->"0bd94ba6-1cac-4885-9c50-f0aaea4b607a"] +Cell[180849, 4740, 202, 3, 22, "Input",ExpressionUUID->"8ee71d5b-854f-5949-88a2-843ffd08641f"], +Cell[181054, 4745, 257, 3, 25, "Output",ExpressionUUID->"15e0180c-17d4-4a6b-a444-7effee57c677"] }, Open ]], -Cell[180451, 4885, 176, 3, 55, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], +Cell[181326, 4751, 172, 2, 22, "Input",ExpressionUUID->"13f65097-48a8-0b48-8f26-bfa63ff56738"], Cell[CellGroupData[{ -Cell[180652, 4892, 210, 4, 55, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], -Cell[180865, 4898, 238, 4, 62, "Output",ExpressionUUID->"d6386bd1-b2d0-4b17-ab3b-701bcc9a5f2f"] +Cell[181523, 4757, 206, 3, 22, "Input",ExpressionUUID->"6c8cc5df-ad31-9945-825b-23c469148e55"], +Cell[181732, 4762, 257, 3, 25, "Output",ExpressionUUID->"fed6557e-0b1d-472c-9190-6868484bc7ca"] }, Open ]], -Cell[181118, 4905, 177, 3, 55, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], +Cell[182004, 4768, 173, 2, 22, "Input",ExpressionUUID->"f01796a4-39d7-3b4e-ae8e-049e50ab8a2a"], Cell[CellGroupData[{ -Cell[181320, 4912, 1301, 43, 217, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], -Cell[182624, 4957, 275, 5, 62, "Output",ExpressionUUID->"5667e4df-77af-465e-9a0c-eec33bd9d257"] +Cell[182202, 4774, 1297, 42, 86, "Input",ExpressionUUID->"eb49a904-abe3-7c49-91ca-3a700617f3d2"], +Cell[183502, 4818, 295, 4, 25, "Output",ExpressionUUID->"7617e2be-e320-4a86-8e19-20c7df31c189"] }, Open ]], Cell[CellGroupData[{ -Cell[182936, 4967, 931, 31, 107, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], -Cell[183870, 5000, 278, 5, 62, "Output",ExpressionUUID->"765d9cd9-e681-4321-872e-28ffe14fdf9d"] +Cell[183834, 4827, 927, 30, 42, "Input",ExpressionUUID->"4237f61c-7340-ae4e-a030-5501c3a85c24"], +Cell[184764, 4859, 296, 4, 25, "Output",ExpressionUUID->"61721127-d43e-4e67-a44c-4f164e7da237"] }, Open ]], Cell[CellGroupData[{ -Cell[184185, 5010, 907, 30, 107, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], -Cell[185095, 5042, 278, 5, 62, "Output",ExpressionUUID->"51642a1c-b675-49b6-ad25-93eee018f740"] +Cell[185097, 4868, 903, 29, 42, "Input",ExpressionUUID->"8a758118-d07d-d243-b7d7-f8e668175458"], +Cell[186003, 4899, 298, 4, 25, "Output",ExpressionUUID->"a954e458-183f-467f-b57b-7fe30fa3c249"] }, Open ]], Cell[CellGroupData[{ -Cell[185410, 5052, 558, 19, 100, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], -Cell[185971, 5073, 665, 10, 62, "Output",ExpressionUUID->"34db26c6-a7d2-4daa-aea1-acf0cc18ab73"] +Cell[186338, 4908, 554, 18, 40, "Input",ExpressionUUID->"fa4828cd-ca53-074e-a881-e8b97209c63d"], +Cell[186895, 4928, 689, 10, 25, "Output",ExpressionUUID->"23887d1b-486b-41f6-aef6-2516c04fcad0"] }, Open ]], Cell[CellGroupData[{ -Cell[186673, 5088, 665, 22, 100, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], -Cell[187341, 5112, 648, 10, 62, "Output",ExpressionUUID->"3776b6d2-04a0-4f5b-9f42-27d25693c208"] +Cell[187621, 4943, 661, 21, 40, "Input",ExpressionUUID->"c31de419-8a61-354a-89bd-271da8be58af"], +Cell[188285, 4966, 666, 9, 25, "Output",ExpressionUUID->"2f7c45d6-e556-4eab-add8-4a4174ac7a5c"] }, Open ]], Cell[CellGroupData[{ -Cell[188026, 5127, 170, 5, 105, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], -Cell[188199, 5134, 677, 10, 62, "Output",ExpressionUUID->"b11af5e8-41fc-4e30-8c08-2e5d3ad1622a"] +Cell[188988, 4980, 166, 4, 42, "Input",ExpressionUUID->"61341448-f30f-cf4c-b0f6-8a340beb6317"], +Cell[189157, 4986, 699, 10, 25, "Output",ExpressionUUID->"f83e1211-06b3-4e1b-a01c-2c6363780a48"] }, Open ]], Cell[CellGroupData[{ -Cell[188913, 5149, 236, 6, 104, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], -Cell[189152, 5157, 620, 10, 62, "Output",ExpressionUUID->"de6823e9-192e-4070-8385-ab226f9ac981"] +Cell[189893, 5001, 232, 5, 41, "Input",ExpressionUUID->"f1b527d7-bbe1-994e-ac10-637b882b6707"], +Cell[190128, 5008, 638, 9, 25, "Output",ExpressionUUID->"6a3b0c30-a712-465c-b495-a21e9fdd1729"] }, Open ]], Cell[CellGroupData[{ -Cell[189809, 5172, 223, 6, 81, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], -Cell[190035, 5180, 648, 10, 62, "Output",ExpressionUUID->"1f9e653c-8f4d-4a2b-924d-7a72848bfea2"] +Cell[190803, 5022, 219, 5, 32, "Input",ExpressionUUID->"d26a0647-1a99-f244-9355-6f61fd9791ee"], +Cell[191025, 5029, 666, 9, 25, "Output",ExpressionUUID->"c389c1e5-3646-408d-ba2b-a702fbda76fd"] }, Open ]], Cell[CellGroupData[{ -Cell[190720, 5195, 181, 5, 81, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], -Cell[190904, 5202, 664, 10, 62, "Output",ExpressionUUID->"46c51d08-5cc2-4704-9167-2f2e09ec67b9"] +Cell[191728, 5043, 177, 4, 32, "Input",ExpressionUUID->"b0d0ac9b-39f3-4b4b-b52c-a1e650a8f586"], +Cell[191908, 5049, 686, 10, 25, "Output",ExpressionUUID->"76053966-36c7-476a-8487-37a613cdb53f"] }, Open ]], Cell[CellGroupData[{ -Cell[191605, 5217, 6055, 185, 933, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], -Cell[197663, 5404, 647, 10, 62, "Output",ExpressionUUID->"af68c21a-f82e-436e-af66-2a931b1fbb72"] +Cell[192631, 5064, 6051, 184, 373, "Input",ExpressionUUID->"2a846e87-22f9-6748-92c3-410b79cd4168"], +Cell[198685, 5250, 665, 9, 25, "Output",ExpressionUUID->"0f18b1f6-e042-4606-b91a-4ffb47e87049"] }, Open ]], Cell[CellGroupData[{ -Cell[198347, 5419, 368, 9, 79, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], -Cell[198718, 5430, 624, 10, 62, "Output",ExpressionUUID->"df4c5a65-2b0a-47de-af2c-e628799ca0bc"] +Cell[199387, 5264, 364, 8, 31, "Input",ExpressionUUID->"7e54765c-ed38-c54f-8cf0-2d431ca0d8f5"], +Cell[199754, 5274, 642, 9, 25, "Output",ExpressionUUID->"b56a289b-a05a-4d69-a2ae-c275fb760bfc"] }, Open ]], -Cell[199357, 5443, 492, 10, 55, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], +Cell[200411, 5286, 488, 9, 22, "Input",ExpressionUUID->"c71820da-1361-0745-a79a-f4315ad9d1d8"], Cell[CellGroupData[{ -Cell[199874, 5457, 558, 19, 100, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], -Cell[200435, 5478, 271, 5, 62, "Output",ExpressionUUID->"384d3d6c-f2c0-49d4-9ac7-c502c9c74a33"] +Cell[200924, 5299, 554, 18, 40, "Input",ExpressionUUID->"41122921-df43-7745-9c83-a32ede989593"], +Cell[201481, 5319, 288, 4, 25, "Output",ExpressionUUID->"999a27e3-02fb-43b8-bb33-d59a12138ac1"] }, Open ]], Cell[CellGroupData[{ -Cell[200743, 5488, 623, 21, 100, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], -Cell[201369, 5511, 273, 5, 62, "Output",ExpressionUUID->"1af4f503-8568-4897-982b-064d336e29a1"] +Cell[201806, 5328, 619, 20, 40, "Input",ExpressionUUID->"669c27bc-dd4c-6c44-9db2-2e5f84247972"], +Cell[202428, 5350, 291, 4, 25, "Output",ExpressionUUID->"618171b2-1c89-491b-bf2a-86818a73f9e7"] }, Open ]], Cell[CellGroupData[{ -Cell[201679, 5521, 170, 5, 105, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], -Cell[201852, 5528, 271, 5, 62, "Output",ExpressionUUID->"dea3b074-5a73-4b50-8ca4-db6f0bfbb8f0"] +Cell[202756, 5359, 166, 4, 42, "Input",ExpressionUUID->"0caad06a-e763-ed40-8f23-6acc9d03327f"], +Cell[202925, 5365, 291, 4, 25, "Output",ExpressionUUID->"19900af5-7869-4d31-9543-488534ea2e25"] }, Open ]], Cell[CellGroupData[{ -Cell[202160, 5538, 170, 5, 104, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], -Cell[202333, 5545, 273, 5, 62, "Output",ExpressionUUID->"c7ff1ef9-6135-47ae-96c7-6a73f9ca9a32"] +Cell[203253, 5374, 166, 4, 41, "Input",ExpressionUUID->"7ed978b9-9ced-bc41-928c-5cd0fd4609a2"], +Cell[203422, 5380, 291, 4, 24, "Output",ExpressionUUID->"a27efada-ddc2-4f5c-ac3b-feb6af5f48a4"] }, Open ]], Cell[CellGroupData[{ -Cell[202643, 5555, 181, 5, 81, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], -Cell[202827, 5562, 272, 5, 62, "Output",ExpressionUUID->"a5b97bab-2804-4112-ac62-af681ab40920"] +Cell[203750, 5389, 177, 4, 32, "Input",ExpressionUUID->"62a9c49b-67cf-f94a-b42f-048d396b9ef9"], +Cell[203930, 5395, 289, 4, 24, "Output",ExpressionUUID->"23df231b-b3b5-49db-a62e-90d744226c19"] }, Open ]], Cell[CellGroupData[{ -Cell[203136, 5572, 181, 5, 81, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], -Cell[203320, 5579, 271, 5, 62, "Output",ExpressionUUID->"80e5fffc-1bbb-46db-a342-5d70545f8ca3"] +Cell[204256, 5404, 177, 4, 32, "Input",ExpressionUUID->"3bf1c992-ca95-0840-b09f-adb82f719a7c"], +Cell[204436, 5410, 289, 4, 24, "Output",ExpressionUUID->"f446a13c-b8fd-4c61-bc36-9d0bc530d5f7"] }, Open ]], Cell[CellGroupData[{ -Cell[203628, 5589, 6055, 185, 933, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], -Cell[209686, 5776, 274, 5, 62, "Output",ExpressionUUID->"a4495230-3d33-4920-8527-ece80fea158d"] +Cell[204762, 5419, 6051, 184, 284, "Input",ExpressionUUID->"f0ee6503-462a-8e43-9c68-aa20666fdb61"], +Cell[210816, 5605, 292, 4, 24, "Output",ExpressionUUID->"5bae857d-8217-44f8-b553-da6b5d8b4c36"] }, Open ]], Cell[CellGroupData[{ -Cell[209997, 5786, 410, 10, 109, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], -Cell[210410, 5798, 318, 6, 92, "Output",ExpressionUUID->"38fbeeef-09af-4e17-b2ce-56357eaa0c05"] +Cell[211145, 5614, 406, 9, 43, "Input",ExpressionUUID->"25ca2884-0dbe-144c-96cc-2a4d1e92f199"], +Cell[211554, 5625, 336, 5, 36, "Output",ExpressionUUID->"6ed7ba44-7260-475a-a154-966fe2963890"] }, Open ]], Cell[CellGroupData[{ -Cell[210765, 5809, 6122, 187, 976, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], -Cell[216890, 5998, 277, 5, 62, "Output",ExpressionUUID->"43ffb152-05c4-4d7a-85e8-9f5c899c8cb6"] +Cell[211927, 5635, 6118, 186, 323, "Input",ExpressionUUID->"34ae97e2-3a1e-e741-af74-2f3c81915900"], +Cell[218048, 5823, 295, 4, 24, "Output",ExpressionUUID->"92d91281-2cc5-480f-97bf-b9410716e5a4"] }, Open ]], Cell[CellGroupData[{ -Cell[217204, 6008, 368, 9, 79, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], -Cell[217575, 6019, 273, 5, 62, "Output",ExpressionUUID->"1dfa5f9c-5715-4737-a920-5b4f3ffdc16f"] +Cell[218380, 5832, 364, 8, 31, "Input",ExpressionUUID->"721f8d78-4352-d846-b1aa-d74212b54a59"], +Cell[218747, 5842, 291, 4, 24, "Output",ExpressionUUID->"223bd091-8087-4aab-a1b5-bbfd9c9ea1c9"] }, Open ]], Cell[CellGroupData[{ -Cell[217885, 6029, 2663, 88, 315, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], -Cell[220551, 6119, 273, 5, 62, "Output",ExpressionUUID->"61500c6b-fd21-429f-a8d7-8f81dcf3b6c5"] +Cell[219075, 5851, 2659, 87, 123, "Input",ExpressionUUID->"fb930c1f-5172-4e4e-8627-5b438aae1c06"], +Cell[221737, 5940, 291, 4, 24, "Output",ExpressionUUID->"dd828fc4-6d42-4d45-a130-55f0119605cc"] }, Open ]], Cell[CellGroupData[{ -Cell[220861, 6129, 2603, 85, 315, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], -Cell[223467, 6216, 276, 5, 62, "Output",ExpressionUUID->"26a10b34-a614-4bc7-ac45-b38f6f4a1eff"] +Cell[222065, 5949, 2599, 84, 123, "Input",ExpressionUUID->"4585ec75-2d4f-b84a-b605-f090f6c3c5a2"], +Cell[224667, 6035, 296, 4, 24, "Output",ExpressionUUID->"8e1688b4-a15c-4198-b7c6-002bfb9d6330"] }, Open ]], Cell[CellGroupData[{ -Cell[223780, 6226, 3712, 118, 464, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], -Cell[227495, 6346, 273, 5, 62, "Output",ExpressionUUID->"46490ee9-2e34-4a9b-b167-aec1b8012b07"] +Cell[225000, 6044, 3708, 117, 181, "Input",ExpressionUUID->"eb4fb471-42c6-494f-9edf-c7b1cc74dfd7"], +Cell[228711, 6163, 293, 4, 24, "Output",ExpressionUUID->"5f6bbb97-6edb-4a12-9e78-23f5b435cc1b"] }, Open ]], -Cell[227783, 6354, 164, 4, 55, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], +Cell[229019, 6170, 164, 4, 21, "Input",ExpressionUUID->"1cc34a71-05ee-424c-ba53-995669bbcd65"], Cell[CellGroupData[{ -Cell[227972, 6362, 2075, 59, 409, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], -Cell[230050, 6423, 750, 16, 109, "Message",ExpressionUUID->"8fa45948-8bf7-4a54-9ea4-632fb5f04040"], -Cell[230803, 6441, 751, 16, 109, "Message",ExpressionUUID->"397cbaa6-1abf-4588-a667-04d7dcafa3b3"], -Cell[231557, 6459, 752, 16, 109, "Message",ExpressionUUID->"5d56125c-00bf-46a9-87f3-526de5a7aaa6"], -Cell[232312, 6477, 573, 13, 48, "Message",ExpressionUUID->"b95cdd48-c445-42e3-a155-55465a58e2f0"], -Cell[232888, 6492, 263, 5, 62, "Output",ExpressionUUID->"368bd8e6-f2da-4484-ba61-814264e48140"] +Cell[229208, 6178, 2101, 60, 112, "Input",ExpressionUUID->"a98d80d1-1ce4-a541-8ba1-3a94fbdbad18"], +Cell[231312, 6240, 734, 15, 43, "Message",ExpressionUUID->"40073f25-fd28-4ea5-8d74-a85cf002d6a5"], +Cell[232049, 6257, 737, 15, 43, "Message",ExpressionUUID->"bfe17939-4746-4d97-9a13-9c047212eb25"], +Cell[232789, 6274, 736, 15, 43, "Message",ExpressionUUID->"57c2c5d8-a96b-49a1-892e-7b374b589b57"], +Cell[233528, 6291, 595, 13, 19, "Message",ExpressionUUID->"9d84aa26-ff5e-46d3-a7b3-90085662923e"], +Cell[234126, 6306, 296, 5, 24, "Output",ExpressionUUID->"3b9314e0-8aa1-49d6-8c81-358f1e890ffe"] }, Open ]], Cell[CellGroupData[{ -Cell[233188, 6502, 2054, 59, 409, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], -Cell[235245, 6563, 556, 12, 119, "Message",ExpressionUUID->"365becfb-66c2-b442-8b7b-c6077e53a212"], -Cell[235804, 6577, 556, 12, 119, "Message",ExpressionUUID->"2b170196-02e0-d544-a5a5-d90722dc10dc"], -Cell[236363, 6591, 559, 12, 109, "Message",ExpressionUUID->"02967e8e-3430-cf4f-b706-b82af40300a2"], -Cell[236925, 6605, 452, 10, 109, "Message",ExpressionUUID->"a8933e75-6bbd-684a-8439-656414d7fe5d"], -Cell[237380, 6617, 166, 2, 109, "Output",ExpressionUUID->"0790c690-9267-6441-bc9c-d353ab16b428"] +Cell[234459, 6316, 2103, 60, 112, "Input",ExpressionUUID->"0f581ffd-dfa8-e845-a733-ca6cc08b08a0"], +Cell[236565, 6378, 632, 13, 43, "Message",ExpressionUUID->"73878d0c-d137-42cf-a231-e2fd77089327"], +Cell[237200, 6393, 634, 13, 43, "Message",ExpressionUUID->"c80d2861-3611-4992-9b4c-8712a20de629"], +Cell[237837, 6408, 635, 13, 43, "Message",ExpressionUUID->"4fe05996-2323-48fe-8eed-83338adb74b8"], +Cell[238475, 6423, 494, 11, 19, "Message",ExpressionUUID->"22fece90-de38-43d7-b98e-c99403df6f59"], +Cell[238972, 6436, 192, 3, 24, "Output",ExpressionUUID->"a566684d-ca30-4210-82ab-946a9823e156"] }, Open ]], Cell[CellGroupData[{ -Cell[237583, 6624, 1938, 53, 109, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], -Cell[239524, 6679, 20239, 378, 448, "Output",ExpressionUUID->"5d2ddb35-b7b8-514c-917f-fcc77dc8600c"] +Cell[239201, 6444, 2053, 55, 37, "Input",ExpressionUUID->"1834f328-2171-004d-99c2-8b70b5354bda"], +Cell[241257, 6501, 20419, 383, 177, "Output",ExpressionUUID->"326ad758-5744-4ac6-bc14-ac8919876727"] }, Open ]], Cell[CellGroupData[{ -Cell[259800, 7062, 2094, 60, 344, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], -Cell[261897, 7124, 497, 11, 109, "Message",ExpressionUUID->"cb33453f-b5ca-e14d-a319-662822d35ed2"], -Cell[262397, 7137, 501, 11, 109, "Message",ExpressionUUID->"aa5fb574-aeea-7141-9d86-babfa2192485"], -Cell[262901, 7150, 503, 11, 109, "Message",ExpressionUUID->"dec65c86-5426-6949-9e38-c5bc3eb7722e"], -Cell[263407, 7163, 455, 10, 48, "Message",ExpressionUUID->"32a908f1-0097-2943-9511-bd82e083c1e0"], -Cell[263865, 7175, 43631, 762, 436, "Output",ExpressionUUID->"704b46fd-7ca5-4147-bbb4-19991a3778e5"] +Cell[261713, 6889, 2144, 61, 109, "Input",ExpressionUUID->"2a70f76a-58a3-cb47-ac3c-9aed2c391662"], +Cell[263860, 6952, 537, 12, 29, "Message",ExpressionUUID->"ca3ef160-b1b9-497d-a983-52e7a10cbc1a"], +Cell[264400, 6966, 540, 12, 29, "Message",ExpressionUUID->"c5887d97-1fe1-4779-acf7-28a9bd01964d"], +Cell[264943, 6980, 543, 12, 43, "Message",ExpressionUUID->"528b13be-3393-4efc-9601-b41c3d226866"], +Cell[265489, 6994, 493, 11, 19, "Message",ExpressionUUID->"c6870cc8-4bf1-4853-bc1e-72440e39dbdb"], +Cell[265985, 7007, 21995, 408, 174, "Output",ExpressionUUID->"a2d350c9-e604-4c74-8411-2678fec16978"] }, Open ]], -Cell[307511, 7940, 2455, 69, 109, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], -Cell[309969, 8011, 209, 5, 55, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], Cell[CellGroupData[{ -Cell[310203, 8020, 212, 6, 90, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], -Cell[310418, 8028, 168, 2, 62, "Output",ExpressionUUID->"1f95faab-1b52-5440-9bc8-bbd29c090294"] +Cell[288017, 7420, 2481, 70, 98, "Input",ExpressionUUID->"d9d63445-4981-8f49-b88b-9e93d345c648"], +Cell[290501, 7492, 9520, 223, 179, "Output",ExpressionUUID->"1a1272da-e3ce-4301-ae29-ddedc86c36c1"] }, Open ]], Cell[CellGroupData[{ -Cell[310623, 8035, 1814, 53, 238, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], -Cell[312440, 8090, 505, 11, 109, "Message",ExpressionUUID->"34609962-a5ff-c943-bd24-1be35ec9ac87"], -Cell[312948, 8103, 509, 11, 109, "Message",ExpressionUUID->"1fdfd709-87fa-2d47-912a-2bb16540a45a"], -Cell[313460, 8116, 508, 11, 109, "Message",ExpressionUUID->"02f7e2ed-ac22-9d4d-8071-ab116260ee28"], -Cell[313971, 8129, 455, 10, 48, "Message",ExpressionUUID->"7db76209-a5a6-1947-80c1-912d214b981c"], -Cell[314429, 8141, 22399, 414, 439, "Output",ExpressionUUID->"b5f713da-fcb5-f640-b2b9-a3f5b5d5c325"] +Cell[300058, 7720, 232, 5, 22, "Input",ExpressionUUID->"39000a9e-1f94-0640-8925-ec28b28907cc"], +Cell[300293, 7727, 28381, 540, 174, "Output",ExpressionUUID->"b57c1e45-c3b3-45b9-af44-854f9f2af9bf"] }, Open ]], Cell[CellGroupData[{ -Cell[336865, 8560, 1612, 47, 128, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], -Cell[338480, 8609, 581, 12, 150, "Message",ExpressionUUID->"e283daf4-b253-944e-a35b-b9d739b4810d"], -Cell[339064, 8623, 584, 12, 150, "Message",ExpressionUUID->"45f4fe27-f32a-9441-bd55-e0801ff04328"], -Cell[339651, 8637, 590, 12, 150, "Message",ExpressionUUID->"8fffabed-e171-5e42-9ba8-fd51ae8f5dd5"], -Cell[340244, 8651, 455, 10, 48, "Message",ExpressionUUID->"8b648472-e40f-a549-a057-c6eeb9f14028"], -Cell[340702, 8663, 169, 2, 62, "Output",ExpressionUUID->"c7b55151-fc31-d94c-8a4e-01b34fb0adaf"] +Cell[328711, 8272, 237, 7, 38, "Input",ExpressionUUID->"90780efc-4769-7b47-9fbb-9166c67c2a66"], +Cell[328951, 8281, 195, 3, 25, "Output",ExpressionUUID->"f1fe6041-0297-4f4b-9d7d-1c8958ca9e22"] }, Open ]], Cell[CellGroupData[{ -Cell[340908, 8670, 2249, 64, 399, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], -Cell[343160, 8736, 557, 12, 109, "Message",ExpressionUUID->"3632efc4-f65f-2f41-a6ff-4f71c0ebce84"], -Cell[343720, 8750, 560, 12, 109, "Message",ExpressionUUID->"779c5516-83d5-5d41-8a7a-6b58e876b564"], -Cell[344283, 8764, 560, 12, 109, "Message",ExpressionUUID->"8e3711bd-8e48-2e4f-9802-ad11f73b56ef"], -Cell[344846, 8778, 455, 10, 48, "Message",ExpressionUUID->"f612a69b-4740-9240-9908-d284159fa285"], -Cell[345304, 8790, 169, 2, 62, "Output",ExpressionUUID->"bfa217e6-2060-bc4b-b710-35d6c4ca9627"] +Cell[329183, 8289, 1837, 53, 80, "Input",ExpressionUUID->"7116d4f3-8ab8-b741-8264-0a5eeac170a0"], +Cell[331023, 8344, 641, 14, 32, "Message",ExpressionUUID->"fe468f00-c903-41f1-a57d-3d6e0d3d9833"], +Cell[331667, 8360, 640, 14, 32, "Message",ExpressionUUID->"dbdc370f-7aea-4f57-8fc0-3c4cfc042f60"], +Cell[332310, 8376, 637, 13, 32, "Message",ExpressionUUID->"b5e928e3-b273-4c36-9629-4df5a1f5b98f"], +Cell[332950, 8391, 495, 11, 19, "Message",ExpressionUUID->"2be1b5fe-bc06-4b95-b084-ea7412480453"], +Cell[333448, 8404, 22082, 411, 174, "Output",ExpressionUUID->"ad375ed3-6bba-4b53-a08e-29f24038db3b"] }, Open ]], Cell[CellGroupData[{ -Cell[345510, 8797, 2221, 64, 283, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], -Cell[347734, 8863, 554, 12, 119, "Message",ExpressionUUID->"3ebcf84a-7882-bd47-b9c8-0657501c09d4"], -Cell[348291, 8877, 560, 12, 119, "Message",ExpressionUUID->"5ba908af-818e-5d45-9b4d-c738ed936632"], -Cell[348854, 8891, 560, 12, 119, "Message",ExpressionUUID->"b25ed3b8-96c0-f246-8b73-bf5dca1bf3be"], -Cell[349417, 8905, 455, 10, 48, "Message",ExpressionUUID->"4d7ee3e1-e220-9e46-b1cc-01012021a276"], -Cell[349875, 8917, 169, 2, 62, "Output",ExpressionUUID->"f21819b7-4040-3a47-b212-dc05454fc812"] +Cell[355567, 8820, 1616, 48, 58, "Input",ExpressionUUID->"5530f28a-0194-494d-ad73-c38d245a1f1d"], +Cell[357186, 8870, 634, 13, 32, "Message",ExpressionUUID->"1faefb82-6601-4543-acb6-573ccee34d8e"], +Cell[357823, 8885, 632, 13, 32, "Message",ExpressionUUID->"22db697d-1520-4609-aaab-096553c7016e"], +Cell[358458, 8900, 633, 13, 32, "Message",ExpressionUUID->"db6614dd-827e-4c25-b9f9-989147267f0c"], +Cell[359094, 8915, 493, 11, 19, "Message",ExpressionUUID->"4a606ff2-b5e1-45f8-963e-62109d68b397"], +Cell[359590, 8928, 194, 3, 25, "Output",ExpressionUUID->"7ff76059-a051-431a-8459-4e643757ffce"] }, Open ]], Cell[CellGroupData[{ -Cell[350081, 8924, 2223, 64, 283, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], -Cell[352307, 8990, 555, 12, 119, "Message",ExpressionUUID->"abd6af2a-56b2-2644-a5c5-5aa91718971c"], -Cell[352865, 9004, 558, 12, 119, "Message",ExpressionUUID->"31d8f902-5be7-c54f-8e99-429decd85903"], -Cell[353426, 9018, 560, 12, 119, "Message",ExpressionUUID->"666728b2-41bd-114c-ad81-a56ae7cb85e9"], -Cell[353989, 9032, 453, 10, 48, "Message",ExpressionUUID->"7a1ee219-911f-6846-82f7-c389bec607c2"], -Cell[354445, 9044, 167, 2, 62, "Output",ExpressionUUID->"f40d5525-ccff-eb4c-a859-e6917373a7f1"] +Cell[359821, 8936, 2272, 64, 50, "Input",ExpressionUUID->"18d0289f-01fd-a740-8fac-540622282b2c"], +Cell[362096, 9002, 634, 13, 32, "Message",ExpressionUUID->"23410df7-0029-4151-8a36-ef490d7cc9d2"], +Cell[362733, 9017, 635, 13, 32, "Message",ExpressionUUID->"c05d1bff-68d1-4525-ae00-7250e61d427b"], +Cell[363371, 9032, 636, 13, 32, "Message",ExpressionUUID->"fe172c89-1b0a-4ec5-92e5-652f4a474831"], +Cell[364010, 9047, 497, 11, 19, "Message",ExpressionUUID->"aaa381b2-d866-47d4-aaa0-8eb45e127f9a"], +Cell[364510, 9060, 195, 3, 25, "Output",ExpressionUUID->"ddf4dcd7-606c-4221-bfcf-805950c715e4"] }, Open ]], Cell[CellGroupData[{ -Cell[354649, 9051, 213, 6, 88, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], -Cell[354865, 9059, 169, 2, 62, "Output",ExpressionUUID->"3749f94f-79b1-2342-af7e-bc4d815737fe"] +Cell[364742, 9068, 2233, 63, 50, "Input",ExpressionUUID->"33f25e29-8e2f-5249-9603-4bb381db84df"], +Cell[366978, 9133, 631, 13, 32, "Message",ExpressionUUID->"94e3f0f3-09b0-4a73-a645-59bdb5b713ee"], +Cell[367612, 9148, 632, 13, 32, "Message",ExpressionUUID->"4d49f1b4-2d66-4615-ad3c-662beddd2038"], +Cell[368247, 9163, 633, 13, 32, "Message",ExpressionUUID->"7c2cbd82-0f19-437f-9f1a-8aba01e85d76"], +Cell[368883, 9178, 491, 11, 19, "Message",ExpressionUUID->"d053d440-7870-4dc7-8e1e-ca91f6a44b16"], +Cell[369377, 9191, 194, 3, 25, "Output",ExpressionUUID->"4eaaca82-f516-454a-affa-5110b95e433a"] }, Open ]], -Cell[355049, 9064, 247, 5, 55, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[355321, 9073, 554, 18, 100, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], -Cell[355878, 9093, 167, 2, 62, "Output",ExpressionUUID->"aad53d59-da78-9348-9ac4-1e0902e814d3"] +Cell[369608, 9199, 2235, 63, 50, "Input",ExpressionUUID->"88e14da9-8532-e842-b722-1b0781de8eeb"], +Cell[371846, 9264, 631, 13, 32, "Message",ExpressionUUID->"5305e3a9-3266-424d-94ad-7ad825f55c89"], +Cell[372480, 9279, 633, 13, 32, "Message",ExpressionUUID->"abe5fa9b-2cdd-45fd-b9d0-9c4516532c7e"], +Cell[373116, 9294, 634, 13, 32, "Message",ExpressionUUID->"ec681cf7-b46e-4ca1-be50-1bf093ff06bc"], +Cell[373753, 9309, 493, 11, 19, "Message",ExpressionUUID->"112d048b-0acc-45bc-a9a7-5930219cdae2"], +Cell[374249, 9322, 191, 3, 25, "Output",ExpressionUUID->"7a797a0b-50cc-40d7-aa7c-937ae4f5aa7e"] }, Open ]], Cell[CellGroupData[{ -Cell[356082, 9100, 166, 4, 105, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], -Cell[356251, 9106, 169, 2, 62, "Output",ExpressionUUID->"4fef6a46-506a-e14c-9df4-f75ab9f6cdb2"] +Cell[374477, 9330, 236, 6, 38, "Input",ExpressionUUID->"fcd1131c-ba92-0b46-817b-e5f89f4ec38f"], +Cell[374716, 9338, 194, 3, 25, "Output",ExpressionUUID->"21f11299-c27c-4675-b7d8-af640bb11685"] }, Open ]], +Cell[374925, 9344, 273, 6, 22, "Input",ExpressionUUID->"c771f2bd-f081-e54a-b4e5-bf0dbc996ac3"], Cell[CellGroupData[{ -Cell[356457, 9113, 181, 5, 81, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], -Cell[356641, 9120, 173, 3, 62, "Output",ExpressionUUID->"f46a3dc4-a4b4-034f-91be-6596e81ebf6d"] +Cell[375223, 9354, 558, 19, 40, "Input",ExpressionUUID->"e251726d-e169-d945-ab4a-5d2f25930fef"], +Cell[375784, 9375, 193, 3, 25, "Output",ExpressionUUID->"d9ab5e69-3e53-4913-a76d-a4095592599e"] }, Open ]], Cell[CellGroupData[{ -Cell[356851, 9128, 6055, 185, 933, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], -Cell[362909, 9315, 172, 3, 62, "Output",ExpressionUUID->"ccd4df45-d425-704c-b4a9-648b41b92e77"] +Cell[376014, 9383, 170, 5, 44, "Input",ExpressionUUID->"327a1255-f251-984f-8923-c0274c3b49ff"], +Cell[376187, 9390, 196, 3, 25, "Output",ExpressionUUID->"d8031aa6-d13c-4f3c-8792-bffd8331e51f"] }, Open ]], Cell[CellGroupData[{ -Cell[363118, 9323, 368, 9, 79, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], -Cell[363489, 9334, 170, 3, 62, "Output",ExpressionUUID->"1ebb6633-805d-cf47-abbc-564ac9bf2374"] +Cell[376420, 9398, 181, 5, 35, "Input",ExpressionUUID->"34b5c282-9128-3243-a083-2a0ba15e1c1e"], +Cell[376604, 9405, 195, 3, 25, "Output",ExpressionUUID->"e70fb350-4681-4893-91c7-9b066f73f8b7"] }, Open ]], Cell[CellGroupData[{ -Cell[363696, 9342, 6122, 187, 976, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], -Cell[369821, 9531, 175, 3, 62, "Output",ExpressionUUID->"a3a95ff2-cddf-6a4c-ac06-8cc3fd5707bc"] +Cell[376836, 9413, 6055, 185, 153, "Input",ExpressionUUID->"f3a277aa-056d-d149-8885-d2d3d2344155"], +Cell[382894, 9600, 196, 3, 25, "Output",ExpressionUUID->"a047b5cc-f929-4f2b-8eb5-ae5a7a5d9123"] }, Open ]], Cell[CellGroupData[{ -Cell[370033, 9539, 368, 9, 79, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], -Cell[370404, 9550, 169, 3, 62, "Output",ExpressionUUID->"53071608-cf53-7441-9033-6c9cf2e7fa8e"] +Cell[383127, 9608, 368, 9, 31, "Input",ExpressionUUID->"0fa06165-8277-0942-9840-e7939e39e8bc"], +Cell[383498, 9619, 192, 3, 25, "Output",ExpressionUUID->"d1a9c811-6774-4640-86d7-21c7cb76743f"] }, Open ]], Cell[CellGroupData[{ -Cell[370610, 9558, 2663, 88, 315, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], -Cell[373276, 9648, 173, 3, 62, "Output",ExpressionUUID->"547b87cc-d628-4d49-8e04-72542aa7650e"] +Cell[383727, 9627, 6122, 187, 153, "Input",ExpressionUUID->"1b1171a5-5779-4b4d-9d05-b0c2eafb2db5"], +Cell[389852, 9816, 198, 3, 25, "Output",ExpressionUUID->"3a10831d-4465-483f-bbe5-3ff326d14f13"] }, Open ]], Cell[CellGroupData[{ -Cell[373486, 9656, 2603, 85, 315, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], -Cell[376092, 9743, 171, 3, 62, "Output",ExpressionUUID->"a8edf49c-9c61-9e4b-9fa8-4de409daba96"] +Cell[390087, 9824, 368, 9, 31, "Input",ExpressionUUID->"6c245ddb-5918-924a-9203-1fedb54d4a87"], +Cell[390458, 9835, 194, 3, 25, "Output",ExpressionUUID->"c0728b17-d740-45db-8492-49e51ee903a2"] }, Open ]], Cell[CellGroupData[{ -Cell[376300, 9751, 3712, 118, 464, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], -Cell[380015, 9871, 171, 3, 62, "Output",ExpressionUUID->"3584cc50-41a2-ae4b-af54-859d095b0154"] +Cell[390689, 9843, 2663, 88, 90, "Input",ExpressionUUID->"653c5092-298f-db49-b06e-e3478aa9b1d6"], +Cell[393355, 9933, 196, 3, 25, "Output",ExpressionUUID->"0c821ee6-2917-4ce0-a4e6-7d32b46e9269"] }, Open ]], Cell[CellGroupData[{ -Cell[380223, 9879, 2052, 59, 409, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], -Cell[382278, 9940, 572, 12, 119, "Message",ExpressionUUID->"d59869d2-8577-0547-8448-230bc5a4ac5e"], -Cell[382853, 9954, 573, 12, 150, "Message",ExpressionUUID->"844f4204-3100-6d45-b5d2-238cc22b8006"], -Cell[383429, 9968, 578, 12, 150, "Message",ExpressionUUID->"f91c55eb-7b3d-3340-b869-4269b99a071c"], -Cell[384010, 9982, 457, 10, 48, "Message",ExpressionUUID->"efd89e15-8a66-4047-aee7-4fb3607a30a7"], -Cell[384470, 9994, 172, 3, 62, "Output",ExpressionUUID->"e68f2098-b3f7-6745-819f-009e252dd442"] +Cell[393588, 9941, 2603, 85, 45, "Input",ExpressionUUID->"14be274c-57f4-d247-984a-05fe7f5796d8"], +Cell[396194, 10028, 193, 3, 25, "Output",ExpressionUUID->"ab2b268f-c09a-4173-bd36-39de8b437e1b"] }, Open ]], Cell[CellGroupData[{ -Cell[384679, 10002, 2054, 59, 409, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], -Cell[386736, 10063, 572, 12, 119, "Message",ExpressionUUID->"feb3ed0a-8d45-dd4c-a945-407106f88295"], -Cell[387311, 10077, 575, 12, 150, "Message",ExpressionUUID->"d5a6c2e7-2143-1843-8d40-686107f6aa27"], -Cell[387889, 10091, 576, 12, 150, "Message",ExpressionUUID->"a15d89dd-0dfc-c845-aec3-fe7d60156e1f"], -Cell[388468, 10105, 457, 10, 48, "Message",ExpressionUUID->"0f9408e4-b654-4a40-9b38-655b18398efc"], -Cell[388928, 10117, 170, 3, 62, "Output",ExpressionUUID->"f72e3d82-4d19-7143-9513-38a15cee4d51"] +Cell[396424, 10036, 3712, 118, 135, "Input",ExpressionUUID->"b50305da-a32c-4d4f-98ec-1a42d89ff35c"], +Cell[400139, 10156, 196, 3, 25, "Output",ExpressionUUID->"1ea4d3f2-a6f1-4d9a-ba4b-785158ddd882"] }, Open ]], Cell[CellGroupData[{ -Cell[389135, 10125, 2030, 55, 149, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], -Cell[391168, 10182, 20377, 384, 443, "Output",ExpressionUUID->"02187549-f2f0-9c4d-81fc-d12919ea7802"] +Cell[400372, 10164, 2101, 60, 50, "Input",ExpressionUUID->"ee2d2671-1677-5943-bf7a-6ffa36275fe8"], +Cell[402476, 10226, 635, 13, 32, "Message",ExpressionUUID->"5daadfcd-bc43-4090-9233-b77d0cc7dcf8"], +Cell[403114, 10241, 638, 13, 32, "Message",ExpressionUUID->"39e5b1aa-4003-4a53-a914-562f2c7b5e93"], +Cell[403755, 10256, 635, 13, 32, "Message",ExpressionUUID->"39f84487-6876-43a9-9a09-c222db4319c1"], +Cell[404393, 10271, 497, 11, 19, "Message",ExpressionUUID->"581a1270-7cce-4594-aec8-9dc060081bdd"], +Cell[404893, 10284, 195, 3, 25, "Output",ExpressionUUID->"cde749da-9f94-419f-b71e-93e0a763fc74"] }, Open ]], Cell[CellGroupData[{ -Cell[411582, 10571, 2118, 60, 344, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], -Cell[413703, 10633, 499, 11, 109, "Message",ExpressionUUID->"75033ea5-32d5-4445-bfb0-a981507a2e9a"], -Cell[414205, 10646, 504, 11, 109, "Message",ExpressionUUID->"bc53c85b-e7c9-be4a-8ed4-30975f08af5c"], -Cell[414712, 10659, 507, 11, 109, "Message",ExpressionUUID->"e09d101b-c5d3-424f-aab9-c5788f3b9ef6"], -Cell[415222, 10672, 455, 10, 48, "Message",ExpressionUUID->"28f777a6-eb27-df49-a698-bd7806baa94c"], -Cell[415680, 10684, 22381, 415, 440, "Output",ExpressionUUID->"cd997d80-b342-8b4c-95c9-b33408882f73"] +Cell[405125, 10292, 2103, 60, 50, "Input",ExpressionUUID->"b0b1035a-0fdf-b146-a71f-1ab9142a9a90"], +Cell[407231, 10354, 636, 13, 32, "Message",ExpressionUUID->"b951e4d3-26a3-4f27-becb-b87c88f34c79"], +Cell[407870, 10369, 636, 13, 32, "Message",ExpressionUUID->"8c989dab-93ba-44e8-8464-9b9ffa5daab4"], +Cell[408509, 10384, 637, 13, 32, "Message",ExpressionUUID->"73e5d9d0-024e-4be9-bacf-5d2fa8f7d80b"], +Cell[409149, 10399, 497, 11, 19, "Message",ExpressionUUID->"135c14e2-6d90-483b-b6ef-e4e2dbfd0e23"], +Cell[409649, 10412, 194, 3, 25, "Output",ExpressionUUID->"0900db3f-1783-4e63-a733-36e521d95e83"] }, Open ]], -Cell[438076, 11102, 174, 3, 55, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], -Cell[438253, 11107, 209, 5, 55, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], Cell[CellGroupData[{ -Cell[438487, 11116, 1616, 48, 128, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], -Cell[440106, 11166, 594, 12, 150, "Message",ExpressionUUID->"96d01a47-7c9a-1944-8904-f1788b2f0a8a"], -Cell[440703, 11180, 594, 12, 150, "Message",ExpressionUUID->"fee09e7b-7835-394b-93fe-35ddd26f69d1"], -Cell[441300, 11194, 598, 12, 150, "Message",ExpressionUUID->"fc12fc14-afc1-0a48-8829-94d858477ec4"], -Cell[441901, 11208, 457, 10, 48, "Message",ExpressionUUID->"41b1346d-6d7d-5d4d-9b1a-88cde3361cf3"], -Cell[442361, 11220, 171, 3, 62, "Output",ExpressionUUID->"0bbffe2c-809c-1149-a08f-e3342cda31a0"] +Cell[409880, 10420, 2053, 55, 42, "Input",ExpressionUUID->"f6fa9d80-fa6d-8c4a-8fee-ff25938e6592"], +Cell[411936, 10477, 20275, 383, 178, "Output",ExpressionUUID->"02e1ac46-404a-4ddc-8675-6efa6320e7b9"] }, Open ]], Cell[CellGroupData[{ -Cell[442569, 11228, 2247, 64, 399, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], -Cell[444819, 11294, 572, 12, 119, "Message",ExpressionUUID->"922f5f31-888f-7340-96cd-65ecb8ea2e84"], -Cell[445394, 11308, 573, 12, 150, "Message",ExpressionUUID->"287b836d-7493-d44f-85b0-183d2793165c"], -Cell[445970, 11322, 578, 12, 150, "Message",ExpressionUUID->"962d88f7-2937-fe4b-ba97-3fe8099808d5"], -Cell[446551, 11336, 455, 10, 48, "Message",ExpressionUUID->"2ec951f6-2332-9241-84af-c7ac25232c2e"], -Cell[447009, 11348, 172, 3, 62, "Output",ExpressionUUID->"3eb28fb3-5fd6-4240-b231-e1f0fa53f4dc"] +Cell[432248, 10865, 2168, 61, 50, "Input",ExpressionUUID->"8faa67fd-f295-ea48-b116-d12d9d52c36b"], +Cell[434419, 10928, 534, 12, 32, "Message",ExpressionUUID->"85542901-5e74-49a4-9601-e4c46857d67b"], +Cell[434956, 10942, 538, 12, 32, "Message",ExpressionUUID->"b998683e-d2b4-4613-b415-c84d2858b78b"], +Cell[435497, 10956, 539, 12, 32, "Message",ExpressionUUID->"03682d3d-bc57-43fc-984d-e1e35d07e559"], +Cell[436039, 10970, 493, 11, 19, "Message",ExpressionUUID->"0ee55a6c-8b6b-4d57-a01a-8b5589f0bc59"], +Cell[436535, 10983, 21869, 405, 174, "Output",ExpressionUUID->"a5264b59-2248-48d8-b9ce-ee622a7ea2d3"] }, Open ]], +Cell[458419, 11391, 200, 4, 22, "Input",ExpressionUUID->"c5eb8b00-da53-e74c-9781-4f98a6653ef7"], Cell[CellGroupData[{ -Cell[447218, 11356, 2221, 64, 283, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], -Cell[449442, 11422, 570, 12, 119, "Message",ExpressionUUID->"8fc71a81-55ed-5940-a6a0-1fa4e0c6425a"], -Cell[450015, 11436, 573, 12, 150, "Message",ExpressionUUID->"001b2f06-491c-6c4f-881b-1d7c12c1b14f"], -Cell[450591, 11450, 578, 12, 150, "Message",ExpressionUUID->"865c0491-32b6-3549-83ec-bdf42c3a31aa"], -Cell[451172, 11464, 455, 10, 48, "Message",ExpressionUUID->"3566013f-7b44-504c-95a5-32d3ac2ece3d"], -Cell[451630, 11476, 172, 3, 62, "Output",ExpressionUUID->"9cc3c720-52c0-b040-a0b4-75ff2aab4396"] +Cell[458644, 11399, 232, 5, 22, "Input",ExpressionUUID->"05df483d-64d7-9449-845e-6e6b94590d4b"], +Cell[458879, 11406, 28256, 537, 174, "Output",ExpressionUUID->"13402e58-ceba-4a83-a058-bef199c3e87c"] }, Open ]], Cell[CellGroupData[{ -Cell[451839, 11484, 2221, 64, 283, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], -Cell[454063, 11550, 572, 12, 119, "Message",ExpressionUUID->"bc9996c1-a929-5b41-9541-f607e96932b8"], -Cell[454638, 11564, 575, 12, 150, "Message",ExpressionUUID->"eb28c83b-0aac-8d4e-a729-f978b41e689a"], -Cell[455216, 11578, 578, 12, 150, "Message",ExpressionUUID->"70b030cf-db8c-c440-8526-b10f71bb72b3"], -Cell[455797, 11592, 455, 10, 48, "Message",ExpressionUUID->"4d72b001-01d6-d944-9c97-6d0d7d2eccbb"], -Cell[456255, 11604, 173, 3, 62, "Output",ExpressionUUID->"c15d23fa-1bed-9640-940a-c33e3a830230"] +Cell[487172, 11948, 1616, 48, 58, "Input",ExpressionUUID->"f695fa87-ec11-e544-beb4-27e0ec1d6164"], +Cell[488791, 11998, 634, 13, 32, "Message",ExpressionUUID->"730095fe-1ec2-4916-9cec-223c8f279800"], +Cell[489428, 12013, 641, 14, 32, "Message",ExpressionUUID->"b0924c03-541a-4add-8efe-d78d39b35ea5"], +Cell[490072, 12029, 640, 14, 32, "Message",ExpressionUUID->"acfecf6a-1c90-407f-930f-c8fe8297b248"], +Cell[490715, 12045, 495, 11, 19, "Message",ExpressionUUID->"29d7287d-15d0-41ed-ac26-101449afe5d4"], +Cell[491213, 12058, 193, 3, 25, "Output",ExpressionUUID->"59f4129a-8651-4f1c-be3b-7e2c5ddaad3d"] }, Open ]], Cell[CellGroupData[{ -Cell[456465, 11612, 213, 6, 88, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], -Cell[456681, 11620, 172, 3, 62, "Output",ExpressionUUID->"2d0467ed-c049-384d-ae20-12fc79688cfb"] +Cell[491443, 12066, 2270, 64, 50, "Input",ExpressionUUID->"df92a918-12ed-ff47-a8a8-122296a3d634"], +Cell[493716, 12132, 636, 13, 32, "Message",ExpressionUUID->"d0872fa3-c177-4e81-be0e-35a30f3c68a4"], +Cell[494355, 12147, 638, 13, 32, "Message",ExpressionUUID->"4fdc27b2-d437-4d8b-9d7d-c48b2acb4bb5"], +Cell[494996, 12162, 635, 13, 32, "Message",ExpressionUUID->"93bb5553-147d-48a8-ac63-f03180caad63"], +Cell[495634, 12177, 497, 11, 19, "Message",ExpressionUUID->"79f3fc42-7f44-4fdc-b9c9-15b97086f6f1"], +Cell[496134, 12190, 196, 3, 25, "Output",ExpressionUUID->"19c2225c-ea4b-410d-86c6-b4cdcea9736d"] }, Open ]], -Cell[456868, 11626, 245, 5, 55, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[457138, 11635, 558, 19, 100, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], -Cell[457699, 11656, 173, 3, 62, "Output",ExpressionUUID->"26c56722-6e97-cb4f-b35b-a00d42f1d8f6"] +Cell[496367, 12198, 2233, 63, 50, "Input",ExpressionUUID->"1990573a-00f1-b54c-9d39-9c68738afe07"], +Cell[498603, 12263, 634, 13, 32, "Message",ExpressionUUID->"d39cbd63-a077-4981-89a4-4ee3a4ec42ce"], +Cell[499240, 12278, 633, 13, 32, "Message",ExpressionUUID->"5ccb67e2-0ce7-4d95-be35-e90f2c41f6e8"], +Cell[499876, 12293, 633, 13, 32, "Message",ExpressionUUID->"b029023c-b28d-41b5-89f5-518be0deb88f"], +Cell[500512, 12308, 495, 11, 19, "Message",ExpressionUUID->"2b9250e0-6c85-48a2-a343-eb96265c753b"], +Cell[501010, 12321, 193, 3, 25, "Output",ExpressionUUID->"d8fc4b68-c28e-45bb-8a1c-88b43cca8f0c"] }, Open ]], Cell[CellGroupData[{ -Cell[457909, 11664, 170, 5, 105, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], -Cell[458082, 11671, 171, 3, 62, "Output",ExpressionUUID->"7e7edb0d-1306-d742-8b32-e7c6dc694892"] +Cell[501240, 12329, 2233, 63, 50, "Input",ExpressionUUID->"586f2005-dac7-8547-be11-766f96e6af5d"], +Cell[503476, 12394, 638, 13, 32, "Message",ExpressionUUID->"cc3fb95f-c505-4107-9b01-ad889f88c297"], +Cell[504117, 12409, 635, 13, 32, "Message",ExpressionUUID->"481873f6-6e4e-4d32-b33d-480ec58b4b2b"], +Cell[504755, 12424, 637, 13, 32, "Message",ExpressionUUID->"dbeaa8ec-6050-41a9-97ca-c372c015171d"], +Cell[505395, 12439, 495, 11, 19, "Message",ExpressionUUID->"c1b4bda4-4fb6-4c43-83d5-a9d81c0a7156"], +Cell[505893, 12452, 193, 3, 25, "Output",ExpressionUUID->"12f0aa8e-d529-41ce-a9f2-aeca7e84d5b3"] }, Open ]], Cell[CellGroupData[{ -Cell[458290, 11679, 181, 5, 81, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], -Cell[458474, 11686, 173, 3, 62, "Output",ExpressionUUID->"e5353287-a717-554a-9c6b-1021438b30ff"] +Cell[506123, 12460, 236, 6, 38, "Input",ExpressionUUID->"363f609f-6fd9-cc4c-924f-14ef82ef0962"], +Cell[506362, 12468, 195, 3, 25, "Output",ExpressionUUID->"f3463b68-71ba-4721-be39-88fe0a25ce95"] }, Open ]], +Cell[506572, 12474, 271, 6, 22, "Input",ExpressionUUID->"32c57f0b-017d-d340-92c6-0f56a212e9c3"], Cell[CellGroupData[{ -Cell[458684, 11694, 6055, 185, 933, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], -Cell[464742, 11881, 175, 3, 62, "Output",ExpressionUUID->"ed4bd4f3-e1cc-fa47-b5b5-475b6e581b1f"] +Cell[506868, 12484, 558, 19, 40, "Input",ExpressionUUID->"23ef3b07-8332-a240-a444-e47c812f31a5"], +Cell[507429, 12505, 196, 3, 25, "Output",ExpressionUUID->"11bfa5a1-787d-4420-85e6-dde3ffdbbc4d"] }, Open ]], Cell[CellGroupData[{ -Cell[464954, 11889, 368, 9, 79, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], -Cell[465325, 11900, 170, 3, 62, "Output",ExpressionUUID->"0c9f07a0-dfdf-6e41-964a-0bcdc0cbcb45"] +Cell[507662, 12513, 170, 5, 44, "Input",ExpressionUUID->"f26a947c-19fb-f94f-8174-f7b0fc5540e9"], +Cell[507835, 12520, 194, 3, 25, "Output",ExpressionUUID->"2b263374-1041-4889-b22b-77047f886dde"] }, Open ]], Cell[CellGroupData[{ -Cell[465532, 11908, 6122, 187, 976, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], -Cell[471657, 12097, 175, 3, 62, "Output",ExpressionUUID->"579eace1-979d-7347-a36f-c1fefbf459f5"] +Cell[508066, 12528, 181, 5, 35, "Input",ExpressionUUID->"3a8bf436-5a5b-e94e-9ccf-34fc2d8727ed"], +Cell[508250, 12535, 197, 3, 25, "Output",ExpressionUUID->"1313c548-fb04-4482-bec4-faddcd7f39b2"] }, Open ]], Cell[CellGroupData[{ -Cell[471869, 12105, 368, 9, 79, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], -Cell[472240, 12116, 172, 3, 62, "Output",ExpressionUUID->"0225baf1-4541-ed4d-8528-13926fef86cd"] +Cell[508484, 12543, 6055, 185, 153, "Input",ExpressionUUID->"cd677593-fddd-ff4c-acc1-d2c088f83196"], +Cell[514542, 12730, 198, 3, 25, "Output",ExpressionUUID->"917fd644-2980-4ba0-ae48-8c5a48319ffd"] }, Open ]], Cell[CellGroupData[{ -Cell[472449, 12124, 2663, 88, 315, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], -Cell[475115, 12214, 173, 3, 62, "Output",ExpressionUUID->"f7c789e7-838d-b443-a597-00e69e7c3611"] +Cell[514777, 12738, 368, 9, 31, "Input",ExpressionUUID->"25feb7d7-e47e-c542-a706-b4e7f7c6867a"], +Cell[515148, 12749, 193, 3, 25, "Output",ExpressionUUID->"3d6036df-b30f-4593-ae1e-4580845beeb0"] }, Open ]], Cell[CellGroupData[{ -Cell[475325, 12222, 2603, 85, 315, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], -Cell[477931, 12309, 171, 3, 62, "Output",ExpressionUUID->"fc2bf760-d110-cb46-bd02-e934de9fd4f9"] +Cell[515378, 12757, 6122, 187, 153, "Input",ExpressionUUID->"af4d7b87-8410-9444-80c4-518657f4dbc4"], +Cell[521503, 12946, 196, 3, 25, "Output",ExpressionUUID->"d1332e51-6a1d-432b-8057-9b2658bf81ba"] }, Open ]], Cell[CellGroupData[{ -Cell[478139, 12317, 3712, 118, 464, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], -Cell[481854, 12437, 171, 3, 62, "Output",ExpressionUUID->"4304216c-b250-ab48-915e-b844e71a70f1"] +Cell[521736, 12954, 368, 9, 31, "Input",ExpressionUUID->"5585f354-37e2-3347-ab68-323b66c21230"], +Cell[522107, 12965, 196, 3, 25, "Output",ExpressionUUID->"2283fcae-d895-4cc6-a959-36e4d985c4ff"] }, Open ]], Cell[CellGroupData[{ -Cell[482062, 12445, 2052, 59, 409, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], -Cell[484117, 12506, 568, 12, 119, "Message",ExpressionUUID->"ef0dcda5-4eb3-fb4f-a7ba-cf9592c754fd"], -Cell[484688, 12520, 572, 12, 119, "Message",ExpressionUUID->"516128bc-41b4-3d49-8276-2fe73d5d437e"], -Cell[485263, 12534, 574, 12, 150, "Message",ExpressionUUID->"83555127-edb0-f34d-bade-abdcd60ad387"], -Cell[485840, 12548, 457, 10, 48, "Message",ExpressionUUID->"f8efe38f-0b83-4645-b574-b25c08902457"], -Cell[486300, 12560, 172, 3, 62, "Output",ExpressionUUID->"de5933f0-d736-3443-950a-4744d8abefe5"] +Cell[522340, 12973, 2663, 88, 90, "Input",ExpressionUUID->"6fc082ae-2060-6449-a16f-e00d1080fd55"], +Cell[525006, 13063, 196, 3, 25, "Output",ExpressionUUID->"1b822ff3-bb78-48f4-bb9f-bd992c10fe43"] }, Open ]], Cell[CellGroupData[{ -Cell[486509, 12568, 2054, 59, 409, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], -Cell[488566, 12629, 568, 12, 119, "Message",ExpressionUUID->"d0c389d2-1c6b-3a44-bd00-6e54df438015"], -Cell[489137, 12643, 572, 12, 119, "Message",ExpressionUUID->"3f819d0b-3458-d54e-bb8e-ed758b92949a"], -Cell[489712, 12657, 574, 12, 150, "Message",ExpressionUUID->"7403c575-bafd-2049-8d02-89293c73f7f1"], -Cell[490289, 12671, 457, 10, 48, "Message",ExpressionUUID->"29512b1b-8a2c-1740-986b-fb78e7d2ec89"], -Cell[490749, 12683, 171, 3, 62, "Output",ExpressionUUID->"686785b6-8c83-3e43-88fb-689383b13a2d"] +Cell[525239, 13071, 2603, 85, 45, "Input",ExpressionUUID->"3fe1a7bc-c02a-f74a-84f9-d1c0141923f0"], +Cell[527845, 13158, 195, 3, 25, "Output",ExpressionUUID->"1f4b116a-edc9-4ef8-8fab-a3cb026c6577"] }, Open ]], Cell[CellGroupData[{ -Cell[490957, 12691, 2030, 55, 149, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], -Cell[492990, 12748, 19960, 375, 443, "Output",ExpressionUUID->"9eb47740-dc4f-3248-80e4-ef19d916a0ad"] +Cell[528077, 13166, 3712, 118, 135, "Input",ExpressionUUID->"56c6644a-7186-bc4d-adf7-2597c52fe0c9"], +Cell[531792, 13286, 194, 3, 25, "Output",ExpressionUUID->"f39b6f3d-9389-49c5-82cb-69bfc19903c4"] }, Open ]], Cell[CellGroupData[{ -Cell[512987, 13128, 2118, 60, 344, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], -Cell[515108, 13190, 496, 11, 109, "Message",ExpressionUUID->"6bc1b8c6-3100-6640-9985-3abfd43de799"], -Cell[515607, 13203, 501, 11, 109, "Message",ExpressionUUID->"82e13dda-210b-a94d-9e1d-a821db42ab6b"], -Cell[516111, 13216, 505, 11, 109, "Message",ExpressionUUID->"9d37688a-c69d-ed49-bce7-cf0090e0ecb8"], -Cell[516619, 13229, 455, 10, 48, "Message",ExpressionUUID->"4e87d0d8-b47a-ef47-85af-16467b219f50"], -Cell[517077, 13241, 21721, 403, 436, "Output",ExpressionUUID->"6974e3c4-9b35-2f4b-97bf-745f60f533f8"] +Cell[532023, 13294, 2101, 60, 50, "Input",ExpressionUUID->"c3883d3a-8a99-644a-9175-a97b5c6c44f4"], +Cell[534127, 13356, 635, 13, 32, "Message",ExpressionUUID->"c4dcaecb-8a7c-4c62-a410-583880f9ad3a"], +Cell[534765, 13371, 636, 13, 32, "Message",ExpressionUUID->"40eb5020-c506-49b2-b97a-e0f282f246e3"], +Cell[535404, 13386, 635, 13, 32, "Message",ExpressionUUID->"0f5f225b-4529-4dc6-8544-fdd988d0f447"], +Cell[536042, 13401, 495, 11, 19, "Message",ExpressionUUID->"3af87198-8ab6-4aa0-8e95-47d24b65ed55"], +Cell[536540, 13414, 195, 3, 25, "Output",ExpressionUUID->"c63cc4d9-106d-4287-8f82-a3d8cf791642"] }, Open ]], -Cell[538813, 13647, 181, 3, 55, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], -Cell[538997, 13652, 207, 5, 55, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], Cell[CellGroupData[{ -Cell[539229, 13661, 1616, 48, 128, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], -Cell[540848, 13711, 589, 12, 150, "Message",ExpressionUUID->"8906bbab-e37b-4b4c-898f-52bfc96dde7b"], -Cell[541440, 13725, 588, 12, 150, "Message",ExpressionUUID->"6ae14bce-ec42-7f4d-9914-0630eea4cdf9"], -Cell[542031, 13739, 594, 12, 150, "Message",ExpressionUUID->"7e98a506-896d-0d47-8502-b83685d9a60c"], -Cell[542628, 13753, 455, 10, 48, "Message",ExpressionUUID->"400e66c2-06b5-814e-a2be-19c4c75ccbf0"], -Cell[543086, 13765, 173, 3, 62, "Output",ExpressionUUID->"f202ab02-e319-144b-97e8-ae603395b346"] +Cell[536772, 13422, 2103, 60, 50, "Input",ExpressionUUID->"e98b6a97-f2bb-1949-8aa2-bed1f30b804b"], +Cell[538878, 13484, 636, 13, 32, "Message",ExpressionUUID->"b3128f8a-bf63-4eed-b3df-242555f00a77"], +Cell[539517, 13499, 636, 13, 32, "Message",ExpressionUUID->"8375104a-cc7b-4c4c-8b4b-d932b4dc6116"], +Cell[540156, 13514, 635, 13, 32, "Message",ExpressionUUID->"30c73665-1c96-4b77-9542-3dd4c12cfde0"], +Cell[540794, 13529, 495, 11, 19, "Message",ExpressionUUID->"24a76da2-b0b1-4728-a5b9-37bfe8757cbe"], +Cell[541292, 13542, 194, 3, 25, "Output",ExpressionUUID->"5d68dd9a-c96a-42c7-bf9b-feecc83c72db"] }, Open ]], Cell[CellGroupData[{ -Cell[543296, 13773, 2246, 64, 399, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], -Cell[545545, 13839, 566, 12, 119, "Message",ExpressionUUID->"2d7e67d1-8691-e348-9ca8-caa63b533102"], -Cell[546114, 13853, 570, 12, 119, "Message",ExpressionUUID->"f0eb6f1d-f621-8647-b6a6-8bf673e41ebb"], -Cell[546687, 13867, 574, 12, 150, "Message",ExpressionUUID->"64fda82a-0f74-2743-89a8-afd600de203a"], -Cell[547264, 13881, 456, 10, 48, "Message",ExpressionUUID->"971a319d-8ab4-464d-a08e-f97fe8d4c0e1"], -Cell[547723, 13893, 171, 3, 62, "Output",ExpressionUUID->"b3c37f48-9827-884f-94d9-1f76aed7bfaa"] +Cell[541523, 13550, 2053, 55, 42, "Input",ExpressionUUID->"d5c5d0e8-862b-f245-8b21-eac61b5b75d3"], +Cell[543579, 13607, 20325, 383, 180, "Output",ExpressionUUID->"8d21e2e1-d98b-4a43-925d-67979b99cd9e"] }, Open ]], Cell[CellGroupData[{ -Cell[547931, 13901, 2221, 64, 283, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], -Cell[550155, 13967, 569, 12, 119, "Message",ExpressionUUID->"1040ba10-c733-df44-b556-0998dc0163c9"], -Cell[550727, 13981, 571, 12, 119, "Message",ExpressionUUID->"e451b852-84c2-a941-b1d7-812ecad4750e"], -Cell[551301, 13995, 575, 12, 150, "Message",ExpressionUUID->"a15e0c9d-d634-6e47-94c5-2ce40fcb4d52"], -Cell[551879, 14009, 458, 10, 48, "Message",ExpressionUUID->"a3ddc92b-b5c9-5e46-be44-6165430ec35f"], -Cell[552340, 14021, 171, 3, 62, "Output",ExpressionUUID->"978bf39b-9d1f-a54f-a6de-a2e3d269e126"] +Cell[563941, 13995, 2168, 61, 50, "Input",ExpressionUUID->"201ddeed-58e9-7047-8ad4-c179c9adcae7"], +Cell[566112, 14058, 535, 12, 32, "Message",ExpressionUUID->"be7176db-1dcb-4a79-9a29-e26370231d4e"], +Cell[566650, 14072, 537, 12, 32, "Message",ExpressionUUID->"f28afd21-934f-487e-9ba8-6284570e975b"], +Cell[567190, 14086, 540, 12, 32, "Message",ExpressionUUID->"9f572793-e25b-4fc0-8205-8b9a6ee1cd92"], +Cell[567733, 14100, 493, 11, 19, "Message",ExpressionUUID->"41a1914c-1d0f-4371-b8c2-5dfd983fd7f8"], +Cell[568229, 14113, 21786, 405, 174, "Output",ExpressionUUID->"be651c65-3c01-4b17-9a4c-2f38697ef9f4"] }, Open ]], +Cell[590030, 14521, 207, 4, 22, "Input",ExpressionUUID->"d48877eb-e0f2-d842-b248-ea3fc2b4c4a8"], Cell[CellGroupData[{ -Cell[552548, 14029, 2223, 64, 283, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], -Cell[554774, 14095, 567, 12, 119, "Message",ExpressionUUID->"57c74c2a-63a6-9846-b3f7-1a08cebb8172"], -Cell[555344, 14109, 571, 12, 119, "Message",ExpressionUUID->"2e606101-b73e-f443-8324-5b1c64dcaa7f"], -Cell[555918, 14123, 573, 12, 150, "Message",ExpressionUUID->"4da9173d-4ced-1e49-83f6-426d72ec8cf3"], -Cell[556494, 14137, 456, 10, 48, "Message",ExpressionUUID->"a2dba8d9-69c9-cb46-bbb4-f7192fe3e138"], -Cell[556953, 14149, 173, 3, 62, "Output",ExpressionUUID->"12fa1803-dc21-9349-8d62-d5d5f0fa85c6"] +Cell[590262, 14529, 230, 5, 22, "Input",ExpressionUUID->"eae5aeae-3f12-2d4a-842b-85a3484011b6"], +Cell[590495, 14536, 28171, 537, 174, "Output",ExpressionUUID->"ef71c4c3-e96b-435a-93e0-5bf454398217"] }, Open ]], Cell[CellGroupData[{ -Cell[557163, 14157, 211, 6, 88, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], -Cell[557377, 14165, 174, 3, 62, "Output",ExpressionUUID->"02a25981-0c7b-de47-b9f0-48bc3149aa69"] +Cell[618703, 15078, 1616, 48, 58, "Input",ExpressionUUID->"80872b10-ba88-3a42-8416-8287bf76d77e"], +Cell[620322, 15128, 635, 13, 32, "Message",ExpressionUUID->"747dbb6e-0330-4fcd-80da-640560294c5e"], +Cell[620960, 15143, 634, 13, 32, "Message",ExpressionUUID->"476f3a25-7205-4501-92e8-0a872714f547"], +Cell[621597, 15158, 640, 14, 32, "Message",ExpressionUUID->"744ae8b1-f29c-4f6a-b131-8d871d13f3d5"], +Cell[622240, 15174, 495, 11, 19, "Message",ExpressionUUID->"29af5e3a-1a88-4992-baa7-d04db85701ec"], +Cell[622738, 15187, 197, 3, 25, "Output",ExpressionUUID->"4055bc0b-4a13-4ea4-8fb2-94ed45b57eb6"] }, Open ]], -Cell[557566, 14171, 115, 1, 55, "Input",ExpressionUUID->"68695c7d-ff3e-440c-830c-d4e196fe93e9"], -Cell[557684, 14174, 4091, 88, 677, "Input",ExpressionUUID->"7fb8cc28-1127-4f1a-ae07-82272a37010d"] +Cell[CellGroupData[{ +Cell[622972, 15195, 2269, 64, 50, "Input",ExpressionUUID->"a5e0631c-6c6c-a045-8418-22c641e38d86"], +Cell[625244, 15261, 634, 13, 32, "Message",ExpressionUUID->"d990a596-0787-4369-861c-fa919bb4ce83"], +Cell[625881, 15276, 634, 13, 32, "Message",ExpressionUUID->"f364237b-f4f2-4a7e-83fb-afaaafa9eafa"], +Cell[626518, 15291, 635, 13, 32, "Message",ExpressionUUID->"319cc9ce-f0bd-45f6-9f3f-9e9f2bac014c"], +Cell[627156, 15306, 495, 11, 19, "Message",ExpressionUUID->"4a939fb7-5251-48a9-a3ac-1352141cb4fe"], +Cell[627654, 15319, 193, 3, 25, "Output",ExpressionUUID->"cc31fd0c-3d72-4054-9df6-bbc8d2c6d99c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[627884, 15327, 2233, 63, 50, "Input",ExpressionUUID->"4b6c44e4-d946-0c4d-9992-4f0fc7048689"], +Cell[630120, 15392, 636, 13, 32, "Message",ExpressionUUID->"c71ac18c-7a27-4072-8fc6-3b76966a620a"], +Cell[630759, 15407, 635, 13, 32, "Message",ExpressionUUID->"92cd59cf-d60a-4ef4-9288-1fc8960ea9a7"], +Cell[631397, 15422, 637, 13, 32, "Message",ExpressionUUID->"044811f3-2471-4d9d-98ca-3180321310c0"], +Cell[632037, 15437, 495, 11, 19, "Message",ExpressionUUID->"3f22e4bb-7941-4ff0-a9ea-2dcd628f9310"], +Cell[632535, 15450, 195, 3, 25, "Output",ExpressionUUID->"46940de6-7bfc-4b44-9041-91a4355c9a1b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[632767, 15458, 2235, 63, 50, "Input",ExpressionUUID->"b1f27f7a-2c76-6d46-97b3-32244819d42b"], +Cell[635005, 15523, 634, 13, 32, "Message",ExpressionUUID->"7b4fe58c-53a6-49ee-a01b-635ffd200c1e"], +Cell[635642, 15538, 634, 13, 32, "Message",ExpressionUUID->"b34895c2-d99a-46b4-b7ba-a08074164a9e"], +Cell[636279, 15553, 635, 13, 32, "Message",ExpressionUUID->"8131f8e9-337b-45b7-a93f-5f411bc58c01"], +Cell[636917, 15568, 495, 11, 19, "Message",ExpressionUUID->"ed83acd1-8cd7-42c3-95b8-6a032920d3e5"], +Cell[637415, 15581, 194, 3, 25, "Output",ExpressionUUID->"7694bf80-4cff-45a2-8aaa-76c0eaa92f80"] +}, Open ]], +Cell[CellGroupData[{ +Cell[637646, 15589, 234, 6, 38, "Input",ExpressionUUID->"99da2760-e71e-1246-8cc9-f0a7464dc747"], +Cell[637883, 15597, 196, 3, 25, "Output",ExpressionUUID->"01e5395b-253f-42ae-bd58-13e5a4cba754"] +}, Open ]], +Cell[638094, 15603, 143, 3, 22, "Input",ExpressionUUID->"68695c7d-ff3e-440c-830c-d4e196fe93e9"], +Cell[CellGroupData[{ +Cell[638262, 15610, 4096, 89, 154, "Input",ExpressionUUID->"7fb8cc28-1127-4f1a-ae07-82272a37010d"], +Cell[642361, 15701, 1975, 42, 50, "Output",ExpressionUUID->"f6ead6f3-0d88-44bc-ae15-2a665d64757a"], +Cell[644339, 15745, 1648, 46, 433, "Output",ExpressionUUID->"b65b0d64-a198-48cc-9a81-2a659cad36f1"] +}, Open ]] } ] *) diff --git a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw2.nb b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw2.nb index ac9befd..b8f86fc 100644 --- a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw2.nb +++ b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_osc_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 578227, 14303] -NotebookOptionsPosition[ 538450, 13673] -NotebookOutlinePosition[ 538861, 13690] -CellTagsIndexPosition[ 538818, 13687] +NotebookDataLength[ 660607, 15805] +NotebookOptionsPosition[ 620033, 15156] +NotebookOutlinePosition[ 620468, 15174] +CellTagsIndexPosition[ 620425, 15171] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,15 +26,13 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.994074211664226*^9, 3.994074212605893*^9}, { 3.994074246621201*^9, 3.994074265935053*^9}}, - CellLabel-> - "In[304]:=",ExpressionUUID->"d0fce16a-d28b-48d0-a068-990bc837b8ee"], + CellLabel->"In[1]:=",ExpressionUUID->"d0fce16a-d28b-48d0-a068-990bc837b8ee"], Cell[BoxData["1.95`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.994074196804253*^9, 3.994074214075809*^9}, { - 3.9940742497364883`*^9, 3.9940742697527313`*^9}}, - CellLabel-> - "Out[304]=",ExpressionUUID->"b5701890-ff21-47c2-98ec-49b95c26dc1f"] + 3.9940742497364883`*^9, 3.9940742697527313`*^9}, 3.994386344338962*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"91382974-450e-4af5-90ab-6c0cf3a26a97"] }, Open ]], Cell[CellGroupData[{ @@ -43,15 +41,13 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940740226123867`*^9, 3.994074030397141*^9}}, - CellLabel-> - "In[305]:=",ExpressionUUID->"97fe636e-3b82-4bab-a660-e8e84adf2f95"], + CellLabel->"In[2]:=",ExpressionUUID->"97fe636e-3b82-4bab-a660-e8e84adf2f95"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.9940741968744993`*^9, 3.994074214306916*^9}, { - 3.994074249779564*^9, 3.9940742697936697`*^9}}, - CellLabel-> - "Out[305]=",ExpressionUUID->"c1c29771-1e27-4c48-981d-145120476ad5"] + 3.994074249779564*^9, 3.9940742697936697`*^9}, 3.994386344448264*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"83f78bd4-3bc3-4838-99b6-7e2cbcc6da97"] }, Open ]], Cell[CellGroupData[{ @@ -60,15 +56,13 @@ Cell[BoxData[ RowBox[{"A1", "=", "172"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994074027305109*^9, 3.994074028074005*^9}}, - CellLabel-> - "In[306]:=",ExpressionUUID->"320bdf43-2d74-4dd3-a9bb-ce43eac99810"], + CellLabel->"In[3]:=",ExpressionUUID->"320bdf43-2d74-4dd3-a9bb-ce43eac99810"], Cell[BoxData["172"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994074196887857*^9, 3.994074214318638*^9}, { - 3.9940742497919416`*^9, 3.9940742698063602`*^9}}, - CellLabel-> - "Out[306]=",ExpressionUUID->"c8c4e33f-8c58-4fc0-a23f-2a0555d0c4ce"] + 3.9940742497919416`*^9, 3.9940742698063602`*^9}, 3.994386344460644*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"1c4d71a9-0252-4ad7-b31e-656e6b39c963"] }, Open ]], Cell[CellGroupData[{ @@ -76,15 +70,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[307]:=",ExpressionUUID->"110c44a8-9e3f-4093-ac7c-51f18bc8c05a"], + CellLabel->"In[4]:=",ExpressionUUID->"110c44a8-9e3f-4093-ac7c-51f18bc8c05a"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.9940741969012012`*^9, 3.994074214329146*^9}, { - 3.9940742497961063`*^9, 3.994074269818478*^9}}, - CellLabel-> - "Out[307]=",ExpressionUUID->"13119321-0551-49b0-92c5-6c2a0e76649c"] + 3.9940742497961063`*^9, 3.994074269818478*^9}, 3.9943863444695873`*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"45c7bc4b-0dea-4fc1-b008-420519294ee2"] }, Open ]], Cell[CellGroupData[{ @@ -96,30 +88,26 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[308]:=",ExpressionUUID->"9397356f-bd8a-4bc9-846e-371b61ea7a15"], + CellLabel->"In[5]:=",ExpressionUUID->"9397356f-bd8a-4bc9-846e-371b61ea7a15"], Cell[BoxData["0.5435000000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.9940741969137297`*^9, 3.99407421433959*^9}, { - 3.994074249812704*^9, 3.994074269830806*^9}}, - CellLabel-> - "Out[308]=",ExpressionUUID->"396dde9d-6eb2-4677-b100-44297ab30a93"] + 3.994074249812704*^9, 3.994074269830806*^9}, 3.994386344482111*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"79ecf823-05f0-4e61-99a4-2ca6de40f800"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[309]:=",ExpressionUUID->"4d91404d-f53a-436d-8fc6-3dd403167c29"], + CellLabel->"In[6]:=",ExpressionUUID->"4d91404d-f53a-436d-8fc6-3dd403167c29"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.9940741969249763`*^9, 3.994074214349977*^9}, { - 3.99407424982506*^9, 3.994074269834938*^9}}, - CellLabel-> - "Out[309]=",ExpressionUUID->"51933d89-5305-4e42-88f8-8a6625bcf4fd"] + 3.99407424982506*^9, 3.994074269834938*^9}, 3.994386344493897*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"bc9dfa31-4441-4882-a422-594ba905aa76"] }, Open ]], Cell[CellGroupData[{ @@ -130,15 +118,13 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[310]:=",ExpressionUUID->"57c762ad-3720-469b-a01d-f497d3d0d576"], + CellLabel->"In[7]:=",ExpressionUUID->"57c762ad-3720-469b-a01d-f497d3d0d576"], Cell[BoxData["6.451105409164632`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.994074196937035*^9, 3.994074214360525*^9}, { - 3.994074249837967*^9, 3.9940742698497963`*^9}}, - CellLabel-> - "Out[310]=",ExpressionUUID->"53ccdf26-a6ab-4171-b54a-de95ffcb3dbe"] + 3.994074249837967*^9, 3.9940742698497963`*^9}, 3.9943863445052347`*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"dc29e0e2-4287-4cac-a031-7f14673a96db"] }, Open ]], Cell[CellGroupData[{ @@ -150,15 +136,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[311]:=",ExpressionUUID->"92b24fef-3e27-40eb-a59c-c349caf5101c"], + CellLabel->"In[8]:=",ExpressionUUID->"92b24fef-3e27-40eb-a59c-c349caf5101c"], Cell[BoxData["4.734719918224123`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.9940741969492617`*^9, 3.994074214370586*^9}, { - 3.994074249850299*^9, 3.994074269861824*^9}}, - CellLabel-> - "Out[311]=",ExpressionUUID->"b992a87c-29d4-4e04-bbd8-89ac47689c19"] + 3.994074249850299*^9, 3.994074269861824*^9}, 3.994386344517623*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"c8a34148-f5f5-44ca-b8bb-5f106918121a"] }, Open ]], Cell[CellGroupData[{ @@ -166,14 +150,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.852277809"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.9940740415240393`*^9}, - CellLabel-> - "In[312]:=",ExpressionUUID->"fb1bf236-910b-499f-873e-8222508bb1a9"], + CellLabel->"In[9]:=",ExpressionUUID->"fb1bf236-910b-499f-873e-8222508bb1a9"], Cell[BoxData["0.852277809`"], "Output", CellChangeTimes->{{3.994074196961275*^9, 3.994074214380481*^9}, { - 3.994074249862259*^9, 3.994074269873619*^9}}, - CellLabel-> - "Out[312]=",ExpressionUUID->"ad63c035-e071-4857-8cc3-3a9fc5a73c32"] + 3.994074249862259*^9, 3.994074269873619*^9}, 3.994386344530648*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"6cba2e83-2fe1-4ab7-9118-06e08f87f42a"] }, Open ]], Cell[CellGroupData[{ @@ -181,44 +163,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3903505481"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.99407404519888*^9}, - CellLabel-> - "In[313]:=",ExpressionUUID->"ec881fe1-855f-49f3-9c83-8d9494589304"], + CellLabel->"In[10]:=",ExpressionUUID->"ec881fe1-855f-49f3-9c83-8d9494589304"], Cell[BoxData["0.3903505481`"], "Output", CellChangeTimes->{{3.99407419697276*^9, 3.9940742143904543`*^9}, { - 3.99407424987506*^9, 3.994074269885377*^9}}, - CellLabel-> - "Out[313]=",ExpressionUUID->"688a1d0f-5581-4346-a04d-8645202b571e"] + 3.99407424987506*^9, 3.994074269885377*^9}, 3.994386344544466*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"3feb484c-518e-4fe9-9ed1-a79ecbaa0443"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[314]:=",ExpressionUUID->"c76a7ba9-c342-4338-aa53-78ecb103d085"], + CellLabel->"In[11]:=",ExpressionUUID->"c76a7ba9-c342-4338-aa53-78ecb103d085"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.9940741969837933`*^9, 3.994074214400448*^9}, { - 3.994074249886661*^9, 3.994074269897275*^9}}, - CellLabel-> - "Out[314]=",ExpressionUUID->"5bac045b-fe52-4f4e-a0a4-7cb8ff9ba94d"] + 3.994074249886661*^9, 3.994074269897275*^9}, 3.994386344591593*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"df6b187f-52bc-440c-a738-a960ce15ea0c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[315]:=",ExpressionUUID->"a3a5acac-9744-430a-8c34-debd7d6cbdfa"], + CellLabel->"In[12]:=",ExpressionUUID->"a3a5acac-9744-430a-8c34-debd7d6cbdfa"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.9940741969946527`*^9, 3.994074214410337*^9}, { - 3.9940742498968973`*^9, 3.994074269909542*^9}}, - CellLabel-> - "Out[315]=",ExpressionUUID->"1b903cc7-0ed4-475f-afca-47a39dc08f4b"] + 3.9940742498968973`*^9, 3.994074269909542*^9}, 3.994386344607501*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"06006092-37a9-4c32-b8ba-9db6dcf4236c"] }, Open ]], Cell[CellGroupData[{ @@ -242,15 +218,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"d2ece78d-47c2-4e41-8ac7-bc58c0e2994f"], + CellLabel->"In[13]:=",ExpressionUUID->"d2ece78d-47c2-4e41-8ac7-bc58c0e2994f"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.994074197005885*^9, 3.994074214421315*^9}, { - 3.994074249908176*^9, 3.994074269922103*^9}}, - CellLabel-> - "Out[316]=",ExpressionUUID->"76b4c6b6-c81c-4592-b6c7-e3454d6cc083"] + 3.994074249908176*^9, 3.994074269922103*^9}, 3.994386344621126*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"dc89df44-1d9f-4a89-a015-7ada9a656f4c"] }, Open ]], Cell[CellGroupData[{ @@ -274,15 +248,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[317]:=",ExpressionUUID->"217e69ea-e85c-4564-852d-ecb839dadc8f"], + CellLabel->"In[14]:=",ExpressionUUID->"217e69ea-e85c-4564-852d-ecb839dadc8f"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.994074197017363*^9, 3.994074214431409*^9}, { - 3.994074249918466*^9, 3.99407426993229*^9}}, - CellLabel-> - "Out[317]=",ExpressionUUID->"224310d5-c3cc-417b-a8ce-b17f2e2cb8f7"] + 3.994074249918466*^9, 3.99407426993229*^9}, 3.9943863446352367`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"8e8c5e46-436f-436a-a1d9-d5d967eeb506"] }, Open ]], Cell[CellGroupData[{ @@ -337,15 +309,13 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[318]:=",ExpressionUUID->"b72dd73d-44b6-4389-8ee2-0978dddf497d"], + CellLabel->"In[15]:=",ExpressionUUID->"b72dd73d-44b6-4389-8ee2-0978dddf497d"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994074197029154*^9, 3.994074214441661*^9}, { - 3.9940742499280653`*^9, 3.994074269943099*^9}}, - CellLabel-> - "Out[318]=",ExpressionUUID->"207cf5ca-b170-446a-a1b0-aed6add52331"] + 3.9940742499280653`*^9, 3.994074269943099*^9}, 3.9943863446495667`*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"bb8e879f-5aaf-4e82-a5d9-187f0ec32475"] }, Open ]], Cell[CellGroupData[{ @@ -396,16 +366,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"0c41b06a-21b8-42a6-98ae-52296023ce7d"], + CellLabel->"In[16]:=",ExpressionUUID->"0c41b06a-21b8-42a6-98ae-52296023ce7d"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.9940741970396633`*^9, 3.994074214453579*^9}, { - 3.994074249938612*^9, 3.994074269953534*^9}}, - CellLabel-> - "Out[319]=",ExpressionUUID->"f3f17d18-7db4-4055-a1be-f51da3b40b34"] + 3.994074249938612*^9, 3.994074269953534*^9}, 3.994386344665844*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"3f8d7db1-f3f3-4a18-9e45-e88ffc8a5e21"] }, Open ]], Cell[CellGroupData[{ @@ -456,16 +424,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"8f27d46b-71d0-4c68-b9f1-8eeacce5195e"], + CellLabel->"In[17]:=",ExpressionUUID->"8f27d46b-71d0-4c68-b9f1-8eeacce5195e"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.994074197050289*^9, 3.994074214467175*^9}, { - 3.994074249949532*^9, 3.9940742699645767`*^9}}, - CellLabel-> - "Out[320]=",ExpressionUUID->"90dd7a72-170d-48c1-b08e-ba4e55b18049"] + 3.994074249949532*^9, 3.9940742699645767`*^9}, 3.9943863446799917`*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"8d6abde1-02d7-41f4-88e6-e9451045463a"] }, Open ]], Cell[CellGroupData[{ @@ -520,60 +486,52 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"36bb4534-ce1a-4f21-bf00-be22db858676"], + CellLabel->"In[18]:=",ExpressionUUID->"36bb4534-ce1a-4f21-bf00-be22db858676"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994074197062862*^9, 3.99407421448357*^9}, { - 3.9940742499608793`*^9, 3.994074269975973*^9}}, - CellLabel-> - "Out[321]=",ExpressionUUID->"a3367550-ed46-40ad-9965-41e7a5dfe2a3"] + 3.9940742499608793`*^9, 3.994074269975973*^9}, 3.994386344694776*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"611deaee-fc26-4132-be69-9226acf60c9b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"c41c6c2e-1a24-42bb-8921-91eeae2dc792"], + CellLabel->"In[19]:=",ExpressionUUID->"c41c6c2e-1a24-42bb-8921-91eeae2dc792"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.9940741970755367`*^9, 3.994074214495585*^9}, { - 3.994074249972097*^9, 3.9940742699872303`*^9}}, - CellLabel-> - "Out[322]=",ExpressionUUID->"65bf6c02-c887-4c4d-99e9-17bd12520c97"] + 3.994074249972097*^9, 3.9940742699872303`*^9}, 3.994386344707374*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"23b13f0e-1a7a-4721-9fe6-408727a07251"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"aca6d8bd-73ab-4ebb-9452-86c7192e3567"], + CellLabel->"In[20]:=",ExpressionUUID->"aca6d8bd-73ab-4ebb-9452-86c7192e3567"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994074197089067*^9, 3.994074214507393*^9}, { - 3.99407424998314*^9, 3.994074269998393*^9}}, - CellLabel-> - "Out[323]=",ExpressionUUID->"840463d2-b76f-47b1-a89c-88b9495e553d"] + 3.99407424998314*^9, 3.994074269998393*^9}, 3.994386344719462*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"54b7a6bd-35ee-4696-967e-bb043a7cc6a6"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"9f899060-24a7-42ab-acc5-bdeea6b2db86"], + CellLabel->"In[21]:=",ExpressionUUID->"9f899060-24a7-42ab-acc5-bdeea6b2db86"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940741971016483`*^9, 3.9940742145189466`*^9}, { - 3.994074249994322*^9, 3.994074270009439*^9}}, - CellLabel-> - "Out[324]=",ExpressionUUID->"7db31020-9169-41d4-8cff-3cbc4003ee30"] + 3.994074249994322*^9, 3.994074270009439*^9}, 3.994386344731429*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"5dfbfc98-4b8a-4694-8b9f-bd0bbba0d421"] }, Open ]], Cell[CellGroupData[{ @@ -582,31 +540,27 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[325]:=",ExpressionUUID->"609eaf04-589c-450f-8ccf-da73c88208fe"], + CellLabel->"In[22]:=",ExpressionUUID->"609eaf04-589c-450f-8ccf-da73c88208fe"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.9940741971133337`*^9, 3.99407421453058*^9}, { - 3.994074250005796*^9, 3.994074270020775*^9}}, - CellLabel-> - "Out[325]=",ExpressionUUID->"2162dd1e-e379-4c6a-9bb3-94985117cfbd"] + 3.994074250005796*^9, 3.994074270020775*^9}, 3.994386344742609*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"2808996d-a1cc-4ba2-afd8-ec2756657a9d"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"30d8c756-9cca-4154-8ea0-52f9ee42d4b0"], + CellLabel->"In[23]:=",ExpressionUUID->"30d8c756-9cca-4154-8ea0-52f9ee42d4b0"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994074197124381*^9, 3.994074214542293*^9}, { - 3.994074250017613*^9, 3.9940742700324078`*^9}}, - CellLabel-> - "Out[326]=",ExpressionUUID->"d70e2bd6-fa13-4f24-b01c-297c4f87f602"] + 3.994074250017613*^9, 3.9940742700324078`*^9}, 3.9943863447547073`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"84acefbe-acab-41b8-999a-d065f75e2941"] }, Open ]], Cell[CellGroupData[{ @@ -616,15 +570,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994074052479707*^9, 3.9940740526225157`*^9}}, - CellLabel-> - "In[327]:=",ExpressionUUID->"ac998e07-a5e5-4677-8445-cec941de9c09"], + CellLabel->"In[24]:=",ExpressionUUID->"ac998e07-a5e5-4677-8445-cec941de9c09"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.99407419713608*^9, 3.994074214545911*^9}, { - 3.994074250027919*^9, 3.99407427004285*^9}}, - CellLabel-> - "Out[327]=",ExpressionUUID->"485f5926-3f5a-481d-9d86-347c7b4f9225"] + 3.994074250027919*^9, 3.99407427004285*^9}, 3.994386344766903*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"58891e4b-942b-4594-92d5-47129c2ce9e0"] }, Open ]], Cell[CellGroupData[{ @@ -634,15 +586,13 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.99407405616786*^9, 3.994074056966621*^9}}, - CellLabel-> - "In[328]:=",ExpressionUUID->"32a1cb53-2bff-493e-8a41-7a0bcf58a48c"], + CellLabel->"In[25]:=",ExpressionUUID->"32a1cb53-2bff-493e-8a41-7a0bcf58a48c"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.994074197147298*^9, 3.99407421455849*^9}, { - 3.9940742500393*^9, 3.994074270054291*^9}}, - CellLabel-> - "Out[328]=",ExpressionUUID->"5b328257-3574-4f96-91f6-b6d6857e9758"] + 3.9940742500393*^9, 3.994074270054291*^9}, 3.994386344780261*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"1956577d-ba16-43cf-89ef-406c2b896768"] }, Open ]], Cell[CellGroupData[{ @@ -651,15 +601,13 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[329]:=",ExpressionUUID->"635f422b-96f4-4bcb-9bc2-9a63861bc9fa"], + CellLabel->"In[26]:=",ExpressionUUID->"635f422b-96f4-4bcb-9bc2-9a63861bc9fa"], Cell[BoxData["68"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.994074197159381*^9, 3.994074214569437*^9}, { - 3.9940742500504293`*^9, 3.9940742700651913`*^9}}, - CellLabel-> - "Out[329]=",ExpressionUUID->"873a9e90-9550-47de-997a-de87b3e6ba8e"] + 3.9940742500504293`*^9, 3.9940742700651913`*^9}, 3.994386344794239*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"f1371135-aea9-4efd-aaed-23814271c784"] }, Open ]], Cell[CellGroupData[{ @@ -674,15 +622,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"9617e290-cf96-4ee0-8690-32a65f056f14"], + CellLabel->"In[27]:=",ExpressionUUID->"9617e290-cf96-4ee0-8690-32a65f056f14"], Cell[BoxData["0.10723666210670314`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994074197172007*^9, 3.994074214580143*^9}, { - 3.994074250060562*^9, 3.9940742700753593`*^9}}, - CellLabel-> - "Out[330]=",ExpressionUUID->"b6c18108-7589-49ea-8f29-be9e345bb899"] + 3.994074250060562*^9, 3.9940742700753593`*^9}, 3.994386344807029*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"d0034ff3-8966-44b0-b60a-a3dc72fa5840"] }, Open ]], Cell[CellGroupData[{ @@ -697,16 +643,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"ef9f3d10-7255-45e4-923c-33bee2d6603a"], + CellLabel->"In[28]:=",ExpressionUUID->"ef9f3d10-7255-45e4-923c-33bee2d6603a"], Cell[BoxData[ RowBox[{"-", "2.5678385772913814`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994074197183957*^9, 3.994074214590371*^9}, { - 3.994074250071249*^9, 3.99407427008554*^9}}, - CellLabel-> - "Out[331]=",ExpressionUUID->"ad4bd6de-9a0d-4611-8395-d08fd82c5d3b"] + 3.994074250071249*^9, 3.99407427008554*^9}, 3.99438634482691*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"fe71ffa4-2952-4094-bc76-c8c4aab59b55"] }, Open ]], Cell[CellGroupData[{ @@ -737,15 +681,13 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[332]:=",ExpressionUUID->"fef4bf97-b50d-45d1-9e97-29afb98df7f6"], + CellLabel->"In[29]:=",ExpressionUUID->"fef4bf97-b50d-45d1-9e97-29afb98df7f6"], Cell[BoxData["17.339463280274387`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994074197196582*^9, 3.9940742146010637`*^9}, { - 3.994074250082402*^9, 3.9940742700958967`*^9}}, - CellLabel-> - "Out[332]=",ExpressionUUID->"c79e582a-6c9a-423d-b117-c6208829cc42"] + 3.994074250082402*^9, 3.9940742700958967`*^9}, 3.994386344843829*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"f55b573e-9fdb-4e91-b016-231e0c2e7b9a"] }, Open ]], Cell[CellGroupData[{ @@ -753,15 +695,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[333]:=",ExpressionUUID->"07ad6710-3311-467f-bb58-450e14a448d8"], + CellLabel->"In[30]:=",ExpressionUUID->"07ad6710-3311-467f-bb58-450e14a448d8"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.9940741972101183`*^9, 3.9940742146122723`*^9}, { - 3.994074250094462*^9, 3.994074270106193*^9}}, - CellLabel-> - "Out[333]=",ExpressionUUID->"8e348639-9ea5-4d31-83f0-da1fa0227efc"] + 3.994074250094462*^9, 3.994074270106193*^9}, 3.994386348790106*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"129002cb-213c-4425-9cba-639bf20d0bf2"] }, Open ]], Cell[CellGroupData[{ @@ -771,20 +711,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994074073155587*^9, 3.994074075499446*^9}}, - CellLabel-> - "In[334]:=",ExpressionUUID->"1d5aa18b-6c5c-4689-85a5-7aa675922a71"], + CellLabel->"In[31]:=",ExpressionUUID->"1d5aa18b-6c5c-4689-85a5-7aa675922a71"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{{3.9940741972243557`*^9, 3.994074214623012*^9}, { - 3.994074250106516*^9, 3.9940742701165457`*^9}}, - CellLabel-> - "Out[334]=",ExpressionUUID->"3afefb20-5b9e-408a-a06c-b8a4fe7f8d2a"] + 3.994074250106516*^9, 3.9940742701165457`*^9}, 3.994386349213695*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"34f821b3-45e3-40c2-874e-30f6491f21f8"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[335]:=",ExpressionUUID->"51c642df-f1cc-40d1-a20d-a6c09882d0b0"], + CellLabel->"In[32]:=",ExpressionUUID->"51c642df-f1cc-40d1-a20d-a6c09882d0b0"], Cell[CellGroupData[{ @@ -793,20 +730,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994074078227497*^9, 3.9940740796275997`*^9}}, - CellLabel-> - "In[336]:=",ExpressionUUID->"9d515c53-1514-4786-b6ef-bcdc2f2f37f4"], + CellLabel->"In[33]:=",ExpressionUUID->"9d515c53-1514-4786-b6ef-bcdc2f2f37f4"], Cell[BoxData["0.765`"], "Output", CellChangeTimes->{{3.994074197245954*^9, 3.994074214636681*^9}, { - 3.9940742501222553`*^9, 3.99407427012961*^9}}, - CellLabel-> - "Out[336]=",ExpressionUUID->"8840a114-a05f-41e1-9029-0282c16582bf"] + 3.9940742501222553`*^9, 3.99407427012961*^9}, 3.994386349233799*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"f7702f73-4cc2-4d62-aca4-66ee8efde0f0"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[337]:=",ExpressionUUID->"48ac36dc-0695-4eb8-af9e-d13b075538d1"], + CellLabel->"In[34]:=",ExpressionUUID->"48ac36dc-0695-4eb8-af9e-d13b075538d1"], Cell[CellGroupData[{ @@ -815,20 +749,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940740824169683`*^9, 3.9940740841708183`*^9}}, - CellLabel-> - "In[338]:=",ExpressionUUID->"ec198863-d0ca-4a85-b141-0b58696c2357"], + CellLabel->"In[35]:=",ExpressionUUID->"ec198863-d0ca-4a85-b141-0b58696c2357"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{{3.994074197269746*^9, 3.994074214649177*^9}, { - 3.994074250142523*^9, 3.994074270141824*^9}}, - CellLabel-> - "Out[338]=",ExpressionUUID->"109b716d-f56f-4603-bebd-8e5c4951f800"] + 3.994074250142523*^9, 3.994074270141824*^9}, 3.994386349259204*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"e339f40c-5676-4aee-ac0a-6cd13d1ae1dd"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[339]:=",ExpressionUUID->"a72c6b62-e186-429f-bc5c-7d41ab6e6ab7"], + CellLabel->"In[36]:=",ExpressionUUID->"a72c6b62-e186-429f-bc5c-7d41ab6e6ab7"], Cell[CellGroupData[{ @@ -837,20 +768,17 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994074087466568*^9, 3.9940740892428827`*^9}}, - CellLabel-> - "In[340]:=",ExpressionUUID->"eab55f4c-317e-4299-a951-ff360a60197f"], + CellLabel->"In[37]:=",ExpressionUUID->"eab55f4c-317e-4299-a951-ff360a60197f"], Cell[BoxData["1.115`"], "Output", CellChangeTimes->{{3.9940741972942533`*^9, 3.9940742146616087`*^9}, { - 3.994074250166238*^9, 3.9940742701540823`*^9}}, - CellLabel-> - "Out[340]=",ExpressionUUID->"7746bdcc-56a4-4143-b901-2496bcf1eac3"] + 3.994074250166238*^9, 3.9940742701540823`*^9}, 3.9943863492778387`*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"ff20ed37-7fa9-45f5-895f-4802a3da478d"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[341]:=",ExpressionUUID->"f2d6365f-000a-44d6-8019-84a057844408"], + CellLabel->"In[38]:=",ExpressionUUID->"f2d6365f-000a-44d6-8019-84a057844408"], Cell[CellGroupData[{ @@ -859,20 +787,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994074092127721*^9, 3.994074094282755*^9}}, - CellLabel-> - "In[342]:=",ExpressionUUID->"5e1e34e6-5254-456b-a631-e2c0c9cd797f"], + CellLabel->"In[39]:=",ExpressionUUID->"5e1e34e6-5254-456b-a631-e2c0c9cd797f"], Cell[BoxData["1.375`"], "Output", CellChangeTimes->{{3.9940741973176317`*^9, 3.9940742146740303`*^9}, { - 3.994074250185948*^9, 3.9940742701663027`*^9}}, - CellLabel-> - "Out[342]=",ExpressionUUID->"707e1789-812f-4f3a-8e4a-fca91d16f638"] + 3.994074250185948*^9, 3.9940742701663027`*^9}, 3.994386349296639*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"ff43c433-b1cb-4bbe-96ff-660fd90c9409"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[343]:=",ExpressionUUID->"d8944063-490f-492e-8b1e-26d9491303e7"], + CellLabel->"In[40]:=",ExpressionUUID->"d8944063-490f-492e-8b1e-26d9491303e7"], Cell[CellGroupData[{ @@ -881,20 +806,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994074098253368*^9, 3.994074099547431*^9}}, - CellLabel-> - "In[344]:=",ExpressionUUID->"dc693c57-954c-404d-8fe9-6aee60d11f0a"], + CellLabel->"In[41]:=",ExpressionUUID->"dc693c57-954c-404d-8fe9-6aee60d11f0a"], Cell[BoxData["0.545`"], "Output", CellChangeTimes->{{3.9940741973401327`*^9, 3.994074214686512*^9}, { - 3.994074250207786*^9, 3.994074270178926*^9}}, - CellLabel-> - "Out[344]=",ExpressionUUID->"9e492a9b-08ea-40b6-9084-ac8a9ff06ad6"] + 3.994074250207786*^9, 3.994074270178926*^9}, 3.9943863493147297`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"86d08306-6649-429a-bd6d-aa4e62b46ef0"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[345]:=",ExpressionUUID->"08142cbf-2624-4ff1-8177-2a4d86e07c5c"], + CellLabel->"In[42]:=",ExpressionUUID->"08142cbf-2624-4ff1-8177-2a4d86e07c5c"], Cell[CellGroupData[{ @@ -903,20 +825,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994074102320486*^9, 3.9940741031259613`*^9}}, - CellLabel-> - "In[346]:=",ExpressionUUID->"ed66637b-3cd2-4522-9714-6f979e0f0bed"], + CellLabel->"In[43]:=",ExpressionUUID->"ed66637b-3cd2-4522-9714-6f979e0f0bed"], Cell[BoxData["1.35`"], "Output", CellChangeTimes->{{3.994074197360721*^9, 3.994074214698968*^9}, { - 3.9940742502296133`*^9, 3.994074270190978*^9}}, - CellLabel-> - "Out[346]=",ExpressionUUID->"29c269cf-5e67-49f5-88c1-f24ee7f7bc58"] + 3.9940742502296133`*^9, 3.994074270190978*^9}, 3.994386349382485*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"2a685dbc-a7d2-4a13-8b1a-5ab158de6bde"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[347]:=",ExpressionUUID->"19cc1f35-920c-4c38-a51b-0da0dda8709a"], + CellLabel->"In[44]:=",ExpressionUUID->"19cc1f35-920c-4c38-a51b-0da0dda8709a"], Cell[CellGroupData[{ @@ -924,20 +843,17 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.655"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994074105268124*^9, 3.994074106561956*^9}}, - CellLabel-> - "In[348]:=",ExpressionUUID->"68023da3-fb3d-4827-b8c2-a48fc79816ba"], + CellLabel->"In[45]:=",ExpressionUUID->"68023da3-fb3d-4827-b8c2-a48fc79816ba"], Cell[BoxData["0.655`"], "Output", CellChangeTimes->{{3.994074197383122*^9, 3.994074214711643*^9}, { - 3.994074250250944*^9, 3.994074270203269*^9}}, - CellLabel-> - "Out[348]=",ExpressionUUID->"8cac775a-cfdf-4fff-afdf-f2f6c7199d28"] + 3.994074250250944*^9, 3.994074270203269*^9}, 3.994386349417577*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"0e8ff53c-6b58-480d-acb9-346b0b1b1a77"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[349]:=",ExpressionUUID->"f5012502-4c83-4da7-84cb-365cccec2fb0"], + CellLabel->"In[46]:=",ExpressionUUID->"f5012502-4c83-4da7-84cb-365cccec2fb0"], Cell[CellGroupData[{ @@ -1426,15 +1342,13 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[350]:=",ExpressionUUID->"255b0557-487f-4c75-90c3-fabaf8decb21"], + CellLabel->"In[47]:=",ExpressionUUID->"255b0557-487f-4c75-90c3-fabaf8decb21"], Cell[BoxData["0.1542863605960474`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.994074197462419*^9, 3.9940742147508163`*^9}, { - 3.994074250298726*^9, 3.994074270240198*^9}}, - CellLabel-> - "Out[350]=",ExpressionUUID->"8e7b0382-75bd-47d7-8790-124f40401a04"] + 3.994074250298726*^9, 3.994074270240198*^9}, 3.9943863496069803`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"5cd6f6e9-342d-4fb5-86b8-6c92376a3ced"] }, Open ]], Cell[CellGroupData[{ @@ -1928,15 +1842,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[351]:=",ExpressionUUID->"e27de1c0-75ef-4325-aac1-4865a7cf805e"], + CellLabel->"In[48]:=",ExpressionUUID->"e27de1c0-75ef-4325-aac1-4865a7cf805e"], Cell[BoxData["6.986649521084862`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.994074197551347*^9, 3.994074214777306*^9}, { - 3.9940742503242893`*^9, 3.994074270266127*^9}}, - CellLabel-> - "Out[351]=",ExpressionUUID->"0682c40a-680e-419d-95cd-43bf213814e0"] + 3.9940742503242893`*^9, 3.994074270266127*^9}, 3.9943863496885138`*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"4c2bbed7-b600-4ee5-9de7-0e71f7b63a08"] }, Open ]], Cell[CellGroupData[{ @@ -2424,16 +2336,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[352]:=",ExpressionUUID->"82be9e96-1071-4755-8750-e63efdc9c206"], + CellLabel->"In[49]:=",ExpressionUUID->"82be9e96-1071-4755-8750-e63efdc9c206"], Cell[BoxData[ RowBox[{"-", "15.225784715275067`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994074197626877*^9, 3.994074214803336*^9}, { - 3.994074250347639*^9, 3.9940742702914057`*^9}}, - CellLabel-> - "Out[352]=",ExpressionUUID->"6a0305b5-343d-477f-a3dc-f410064ef405"] + 3.994074250347639*^9, 3.9940742702914057`*^9}, 3.9943863497976*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"67dc6ca5-3b61-41b7-aeac-58def50eec15"] }, Open ]], Cell[CellGroupData[{ @@ -2991,16 +2901,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[353]:=",ExpressionUUID->"2207db8d-453c-4514-9663-5f9edff29c1f"], + CellLabel->"In[50]:=",ExpressionUUID->"2207db8d-453c-4514-9663-5f9edff29c1f"], Cell[BoxData[ RowBox[{"-", "19.527743438945258`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.994074197680339*^9, 3.9940742148337717`*^9}, { - 3.994074250376841*^9, 3.9940742703219957`*^9}}, - CellLabel-> - "Out[353]=",ExpressionUUID->"9b904686-401f-428e-98a9-48171f4231aa"] + 3.994074250376841*^9, 3.9940742703219957`*^9}, 3.9943863500407267`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"7f22b4db-872f-40ac-94e1-5b9fd501e7df"] }, Open ]], Cell[CellGroupData[{ @@ -3558,16 +3466,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[354]:=",ExpressionUUID->"7c9c561c-6778-484b-81ea-6331fe6ac37e"], + CellLabel->"In[51]:=",ExpressionUUID->"7c9c561c-6778-484b-81ea-6331fe6ac37e"], Cell[BoxData[ RowBox[{"-", "55.27021800638023`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.9940741977668943`*^9, 3.9940742148649673`*^9}, { - 3.994074250406843*^9, 3.994074270352029*^9}}, - CellLabel-> - "Out[354]=",ExpressionUUID->"5e6881ec-291a-412e-a39c-5ed360be1754"] + 3.994074250406843*^9, 3.994074270352029*^9}, 3.994386350119066*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"4c169cd8-14f6-4351-80ed-27c596a010df"] }, Open ]], Cell[CellGroupData[{ @@ -4198,46 +4104,40 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[355]:=",ExpressionUUID->"916584db-f151-4a1c-bc04-8f37e2df2749"], + CellLabel->"In[52]:=",ExpressionUUID->"916584db-f151-4a1c-bc04-8f37e2df2749"], Cell[BoxData[ RowBox[{"-", "141.4524755079782`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.994074197832451*^9, 3.994074214909892*^9}, { - 3.994074250439662*^9, 3.994074270387487*^9}}, - CellLabel-> - "Out[355]=",ExpressionUUID->"8e6ae17b-724f-4a8e-8c3b-0f0ae15447e2"] + 3.994074250439662*^9, 3.994074270387487*^9}, 3.9943863502542963`*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"1bf59dfe-09b0-43f4-81fd-3021c05cfc4e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[356]:=",ExpressionUUID->"00da972e-b24c-4767-96c7-28ece24fb860"], + CellLabel->"In[53]:=",ExpressionUUID->"00da972e-b24c-4767-96c7-28ece24fb860"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994074197929666*^9, 3.994074214922945*^9}, { - 3.994074250452722*^9, 3.994074270403535*^9}}, - CellLabel-> - "Out[356]=",ExpressionUUID->"326a5d2a-1f1c-4e1e-a6a9-0ea662740529"] + 3.994074250452722*^9, 3.994074270403535*^9}, 3.994386350272113*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"b181bbab-abe6-4b14-a57a-4c6644e5886a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[357]:=",ExpressionUUID->"48b20279-38e3-424f-a9b1-603e3283ab38"], + CellLabel->"In[54]:=",ExpressionUUID->"48b20279-38e3-424f-a9b1-603e3283ab38"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994074197952071*^9, 3.994074214935376*^9}, { - 3.994074250464295*^9, 3.994074270413846*^9}}, - CellLabel-> - "Out[357]=",ExpressionUUID->"e2621c33-f530-4da7-95af-e1b890276315"] + 3.994074250464295*^9, 3.994074270413846*^9}, 3.994386350281467*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"7f25ade8-256c-4189-a724-9dd124bd0626"] }, Open ]], Cell[CellGroupData[{ @@ -4281,15 +4181,13 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[358]:=",ExpressionUUID->"f4ffbd23-ffc7-40f7-9d83-f23668e0722d"], + CellLabel->"In[55]:=",ExpressionUUID->"f4ffbd23-ffc7-40f7-9d83-f23668e0722d"], Cell[BoxData["111.55440139653717`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940741979658833`*^9, 3.994074214947126*^9}, { - 3.99407425047659*^9, 3.994074270424139*^9}}, - CellLabel-> - "Out[358]=",ExpressionUUID->"ca0e3882-4b0c-4168-8b81-11fdff3f069a"] + 3.99407425047659*^9, 3.994074270424139*^9}, 3.994386350291902*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"09cb8772-6adc-4bf3-8dfd-38865e145764"] }, Open ]], Cell[CellGroupData[{ @@ -4329,16 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[359]:=",ExpressionUUID->"b813fa2b-7f6b-48fe-b0eb-3d48f2415243"], + CellLabel->"In[56]:=",ExpressionUUID->"b813fa2b-7f6b-48fe-b0eb-3d48f2415243"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.994074197994025*^9, 3.994074214959611*^9}, { - 3.994074250488699*^9, 3.994074270434445*^9}}, - CellLabel-> - "Out[359]=",ExpressionUUID->"b88e647b-08d0-4bd3-92a1-8044405ae9b8"] + 3.994074250488699*^9, 3.994074270434445*^9}, 3.994386350301649*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"acb7efd5-ba8b-4685-be6c-91cce455d1f7"] }, Open ]], Cell[CellGroupData[{ @@ -4382,101 +4278,87 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[360]:=",ExpressionUUID->"2181d355-ae5d-4740-a17c-1a647683d440"], + CellLabel->"In[57]:=",ExpressionUUID->"2181d355-ae5d-4740-a17c-1a647683d440"], Cell[BoxData["113.13286100443031`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994074198004314*^9, 3.994074214972053*^9}, { - 3.994074250500126*^9, 3.99407427044481*^9}}, - CellLabel-> - "Out[360]=",ExpressionUUID->"11bebf72-f501-4df5-af46-0cc361ad9e16"] + 3.994074250500126*^9, 3.99407427044481*^9}, 3.99438635031212*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"e2fe2477-bd21-4bdb-a470-accc7d84bd67"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[361]:=",ExpressionUUID->"33ede34f-74c0-40af-887e-870f4dc25eaa"], + CellLabel->"In[58]:=",ExpressionUUID->"33ede34f-74c0-40af-887e-870f4dc25eaa"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.994074198016279*^9, 3.994074214983481*^9}, { - 3.994074250511408*^9, 3.994074270455081*^9}}, - CellLabel-> - "Out[361]=",ExpressionUUID->"c0843b92-41a1-43b7-a3c7-b3aba792b2aa"] + 3.994074250511408*^9, 3.994074270455081*^9}, 3.994386350321447*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"77b0d7a8-1a48-4969-b5fb-86890e73c3ad"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[362]:=",ExpressionUUID->"f88a66fe-e6e3-49d8-a85e-d42aa561f095"], + CellLabel->"In[59]:=",ExpressionUUID->"f88a66fe-e6e3-49d8-a85e-d42aa561f095"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.99407419803306*^9, 3.994074214997123*^9}, { - 3.994074250525971*^9, 3.994074270465309*^9}}, - CellLabel-> - "Out[362]=",ExpressionUUID->"ded1a4af-9ccf-4e1b-96e5-bea3a3aaa98e"] + 3.994074250525971*^9, 3.994074270465309*^9}, 3.994386350331066*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"c4eac282-cbf7-4e47-a543-7d663bb3c826"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[363]:=",ExpressionUUID->"903538a6-524f-4139-989a-4e54127ac332"], + CellLabel->"In[60]:=",ExpressionUUID->"903538a6-524f-4139-989a-4e54127ac332"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.994074198060273*^9, 3.994074215008013*^9}, { - 3.994074250535656*^9, 3.994074270476778*^9}}, - CellLabel-> - "Out[363]=",ExpressionUUID->"1a4f47df-1e52-4776-ad82-e26cdb132d91"] + 3.994074250535656*^9, 3.994074270476778*^9}, 3.9943863503410263`*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"f8a61419-cca5-4d18-b0f5-85c73eaf755b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[364]:=",ExpressionUUID->"eb72b9d6-5cb5-46da-b11a-0e5cc5f0353e"], + CellLabel->"In[61]:=",ExpressionUUID->"eb72b9d6-5cb5-46da-b11a-0e5cc5f0353e"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.9940741980734253`*^9, 3.994074215018661*^9}, { - 3.994074250546678*^9, 3.9940742704879427`*^9}}, - CellLabel-> - "Out[364]=",ExpressionUUID->"ea2ae609-1e74-4ce2-a7ce-95a232d9b86d"] + 3.994074250546678*^9, 3.9940742704879427`*^9}, 3.994386350351966*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"f9a87c4a-6808-4676-8cb1-fdb931da6509"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[365]:=",ExpressionUUID->"ec68fe5b-8545-46c9-a36a-45a6e91b65ab"], + CellLabel->"In[62]:=",ExpressionUUID->"ec68fe5b-8545-46c9-a36a-45a6e91b65ab"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994074198087656*^9, 3.9940742150302687`*^9}, { - 3.994074250550354*^9, 3.994074270499359*^9}}, - CellLabel-> - "Out[365]=",ExpressionUUID->"ae83ae9a-04b5-49f9-ac79-02f44d87f93d"] + 3.994074250550354*^9, 3.994074270499359*^9}, 3.994386350364215*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"66cef165-f97d-4d9a-8721-553f4140ddd5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[366]:=",ExpressionUUID->"4ddfdd68-b3a0-413a-895a-8ecb9f65ae99"], + CellLabel->"In[63]:=",ExpressionUUID->"4ddfdd68-b3a0-413a-895a-8ecb9f65ae99"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.994074198096857*^9, 3.994074215043764*^9}, { - 3.994074250564603*^9, 3.994074270511888*^9}}, - CellLabel-> - "Out[366]=",ExpressionUUID->"40a928e7-88af-4d2f-b809-ca0087f9387b"] + 3.994074250564603*^9, 3.994074270511888*^9}, 3.99438635037617*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"97cddd40-2f24-47fd-a498-13a6c1973950"] }, Open ]], Cell[CellGroupData[{ @@ -4497,16 +4379,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[367]:=",ExpressionUUID->"01d54fcc-1571-4645-8b1d-8109e2f6b24b"], + CellLabel->"In[64]:=",ExpressionUUID->"01d54fcc-1571-4645-8b1d-8109e2f6b24b"], Cell[BoxData[ RowBox[{"-", "33.18726375495992`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994074198107793*^9, 3.994074215058444*^9}, { - 3.994074250574132*^9, 3.99407427052425*^9}}, - CellLabel-> - "Out[367]=",ExpressionUUID->"bc70972f-1c08-4fac-9024-a4951c9c3830"] + 3.994074250574132*^9, 3.99407427052425*^9}, 3.9943863503887663`*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"5f3f2b4b-f7df-4757-9c6c-54adbfeb6c38"] }, Open ]], Cell[CellGroupData[{ @@ -4527,16 +4407,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[368]:=",ExpressionUUID->"d4a340a7-f80a-4e75-8029-3c3eba8d8ea5"], + CellLabel->"In[65]:=",ExpressionUUID->"d4a340a7-f80a-4e75-8029-3c3eba8d8ea5"], Cell[BoxData[ RowBox[{"-", "6.498883922853802`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994074198134163*^9, 3.994074215071083*^9}, { - 3.994074250583393*^9, 3.994074270535636*^9}}, - CellLabel-> - "Out[368]=",ExpressionUUID->"1cff94b9-ad3c-4f4f-88e4-329ececd9b7e"] + 3.994074250583393*^9, 3.994074270535636*^9}, 3.994386350401354*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"a5026b5b-c9da-460e-971e-a3f7de2529b4"] }, Open ]], Cell[CellGroupData[{ @@ -4601,15 +4479,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[369]:=",ExpressionUUID->"2d1ec0e4-c548-4b4a-91f6-7020410792ff"], + CellLabel->"In[66]:=",ExpressionUUID->"2d1ec0e4-c548-4b4a-91f6-7020410792ff"], Cell[BoxData["78.36713764157724`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.99407419816089*^9, 3.994074215083827*^9}, { - 3.994074250592779*^9, 3.994074270550357*^9}}, - CellLabel-> - "Out[369]=",ExpressionUUID->"cacd0cc8-5e05-4d5a-9bb5-8d0115b1b3dd"] + 3.994074250592779*^9, 3.994074270550357*^9}, 3.994386350414765*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"dcf5fb65-42ab-4c30-a22a-6534993f6533"] }, Open ]], Cell[CellGroupData[{ @@ -4650,16 +4526,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[370]:=",ExpressionUUID->"6bd53917-47d8-4609-a0d4-eeb5075a9c37"], + CellLabel->"In[67]:=",ExpressionUUID->"6bd53917-47d8-4609-a0d4-eeb5075a9c37"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994074198173212*^9, 3.9940742151226263`*^9}, { - 3.9940742506018353`*^9, 3.99407427055612*^9}}, - CellLabel-> - "Out[370]=",ExpressionUUID->"30d58fe4-c61a-4ae0-83ea-5d7d9a236450"] + 3.9940742506018353`*^9, 3.99407427055612*^9}, 3.9943863504243317`*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"b8f70d82-1a4d-4860-9a56-1b3a54a169c8"] }, Open ]], Cell[CellGroupData[{ @@ -4725,15 +4599,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[371]:=",ExpressionUUID->"cdc124db-06b0-47c8-965e-8753854d459b"], + CellLabel->"In[68]:=",ExpressionUUID->"cdc124db-06b0-47c8-965e-8753854d459b"], Cell[BoxData["106.6339770815765`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994074198185794*^9, 3.994074215135048*^9}, { - 3.994074250611326*^9, 3.994074270578539*^9}}, - CellLabel-> - "Out[371]=",ExpressionUUID->"2a472b03-a6a5-4cae-9df9-6493884ee7bd"] + 3.994074250611326*^9, 3.994074270578539*^9}, 3.994386350435195*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"46d5ef6c-93d7-4cae-ae43-b582a1292f58"] }, Open ]], Cell[CellGroupData[{ @@ -4791,15 +4663,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[372]:=",ExpressionUUID->"403bbcd2-32f8-4fd3-9111-27be8d1a0e01"], + CellLabel->"In[69]:=",ExpressionUUID->"403bbcd2-32f8-4fd3-9111-27be8d1a0e01"], Cell[BoxData["51.145215962859936`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994074198196261*^9, 3.9940742151460247`*^9}, { - 3.994074250621415*^9, 3.99407427059237*^9}}, - CellLabel-> - "Out[372]=",ExpressionUUID->"d89ae800-f426-4b15-bd04-1fecacd1fb03"] + 3.994074250621415*^9, 3.99407427059237*^9}, 3.994386350444745*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"0ba7319f-0051-460d-8af9-efcb9de62f17"] }, Open ]], Cell[CellGroupData[{ @@ -4857,38 +4727,46 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[373]:=",ExpressionUUID->"390ebd15-4abb-4559-a4e3-5a87823fdb20"], + CellLabel->"In[70]:=",ExpressionUUID->"390ebd15-4abb-4559-a4e3-5a87823fdb20"], Cell[BoxData["674.8474263523988`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994074198207098*^9, 3.9940742151610737`*^9}, { - 3.99407425063161*^9, 3.9940742706025248`*^9}}, - CellLabel-> - "Out[373]=",ExpressionUUID->"e1e82d17-d41d-41d7-8163-9aa0bb32bb4d"] + 3.99407425063161*^9, 3.9940742706025248`*^9}, 3.994386350454599*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"de7b137c-4783-440f-a517-8edcd93b765b"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.8651148068"}]], "Input", - CellChangeTimes->{3.9918496921150837`*^9, - 3.994236067138493*^9},ExpressionUUID->"ede64bc2-06f7-8743-a0a6-\ -6f058773310c"], + CellChangeTimes->{3.9918496921150837`*^9, 3.994236067138493*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], + +Cell[BoxData["0.8651148068`"], "Output", + CellChangeTimes->{3.994386350463736*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"042e66e0-6f92-4a45-8808-e9df5ef319cd"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918496892276516`*^9, - 3.9918496892324924`*^9}},ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-\ -c82e80965ca9"], + CellChangeTimes->{{3.9918496892276516`*^9, 3.9918496892324924`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.5059509024"}]], "Input", - CellChangeTimes->{3.991849690724144*^9, - 3.994236074350758*^9},ExpressionUUID->"328429c4-9130-334e-ba7f-\ -7dc8ec78e5b4"], + CellChangeTimes->{3.991849690724144*^9, 3.994236074350758*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], + +Cell[BoxData["0.5059509024`"], "Output", + CellChangeTimes->{3.994386350479624*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"b2b12073-18e7-4c2e-be1f-b500200f19db"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991849693382303*^9, - 3.991849693386299*^9}},ExpressionUUID->"b3364ab6-86a4-7a46-ae33-\ -623392314869"], + CellChangeTimes->{{3.991849693382303*^9, 3.991849693386299*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ @@ -4934,13 +4812,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], + CellLabel->"In[75]:=",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.991339230528511*^9}, - CellLabel-> - "Out[316]=",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[BoxData["1.459454531271633`*^-53"], "Output", + CellChangeTimes->{3.991339230528511*^9, 3.9943863504959993`*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"ba28c925-245f-41c0-a22a-252d537d1d8c"] }, Open ]], Cell[CellGroupData[{ @@ -4974,14 +4850,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557615205345*^9},ExpressionUUID->"35e76fc7-2f05-694a-b379-\ -67189aa511ad"], + CellChangeTimes->{3.991557615205345*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[BoxData["2.192147584896785`*^-54"], "Output", - CellChangeTimes->{3.991339230554512*^9}, - CellLabel-> - "Out[317]=",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[BoxData["1.2661663246992573`*^-54"], "Output", + CellChangeTimes->{3.991339230554512*^9, 3.9943863505059767`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"e6a6d97d-53c1-4c1f-afe6-109fcf018ee5"] }, Open ]], Cell[CellGroupData[{ @@ -5014,14 +4888,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.991557618917984*^9, - 3.9915576208320503`*^9}},ExpressionUUID->"a10e19cd-f567-6b4d-a841-\ -5f01117db38b"], + CellChangeTimes->{{3.991557618917984*^9, 3.9915576208320503`*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[BoxData["3.508823705223133`*^-54"], "Output", - CellChangeTimes->{3.9913392305796223`*^9}, - CellLabel-> - "Out[318]=",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[BoxData["2.785221156803702`*^-54"], "Output", + CellChangeTimes->{3.9913392305796223`*^9, 3.9943863505159597`*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"0a87cc08-66d4-4d62-a13a-579630b81df0"] }, Open ]], Cell[CellGroupData[{ @@ -5044,13 +4916,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], + CellLabel->"In[78]:=",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[BoxData["44.37747929594205`"], "Output", - CellChangeTimes->{3.9913392305906105`*^9}, - CellLabel-> - "Out[319]=",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[BoxData["33.94280293120764`"], "Output", + CellChangeTimes->{3.9913392305906105`*^9, 3.994386350525516*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"1266301c-1915-4d48-b8a4-56e631a9a128"] }, Open ]], Cell[CellGroupData[{ @@ -5076,13 +4946,11 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], + CellLabel->"In[79]:=",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[BoxData["102.55835649176893`"], "Output", - CellChangeTimes->{3.99133923061561*^9}, - CellLabel-> - "Out[320]=",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[BoxData["75.11708246013382`"], "Output", + CellChangeTimes->{3.99133923061561*^9, 3.994386350535234*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"5d1ef96f-8045-4631-bed7-8c8a101a0f12"] }, Open ]], Cell[CellGroupData[{ @@ -5091,13 +4959,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], + CellLabel->"In[80]:=",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[BoxData["0.5630879721742558`"], "Output", - CellChangeTimes->{3.9913392306426105`*^9}, - CellLabel-> - "Out[321]=",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[BoxData["1.227520226789017`"], "Output", + CellChangeTimes->{3.9913392306426105`*^9, 3.9943863505464973`*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"6685ae2e-cce1-4ed9-9cef-2baf80f8520c"] }, Open ]], Cell[CellGroupData[{ @@ -5106,13 +4972,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], + CellLabel->"In[81]:=",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[BoxData["1.956498159343112`"], "Output", - CellChangeTimes->{3.99133923065361*^9}, - CellLabel-> - "Out[322]=",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[BoxData["2.997322281537047`"], "Output", + CellChangeTimes->{3.99133923065361*^9, 3.994386350557732*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"adc859c5-69c9-42c3-be4c-f60c58b854b1"] }, Open ]], Cell[CellGroupData[{ @@ -5121,13 +4985,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], + CellLabel->"In[82]:=",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[BoxData["200.65523570140064`"], "Output", - CellChangeTimes->{3.9913392306776104`*^9}, - CellLabel-> - "Out[323]=",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[BoxData["225.1501049818148`"], "Output", + CellChangeTimes->{3.9913392306776104`*^9, 3.994386350570273*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"86cecec2-10da-45f4-ac8c-ac3c2a1f479d"] }, Open ]], Cell[CellGroupData[{ @@ -5136,13 +4998,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], + CellLabel->"In[83]:=",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[BoxData["24.98842482695703`"], "Output", - CellChangeTimes->{3.991339230703802*^9}, - CellLabel-> - "Out[324]=",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[BoxData["41.66547715197091`"], "Output", + CellChangeTimes->{3.991339230703802*^9, 3.994386350581442*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"1c0456e6-e61b-43f6-8cb6-54f159a00593"] }, Open ]], Cell[CellGroupData[{ @@ -5331,13 +5191,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[325]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], + CellLabel->"In[84]:=",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[BoxData["0.01829601703069907`"], "Output", - CellChangeTimes->{3.9913392307297993`*^9}, - CellLabel-> - "Out[325]=",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[BoxData["0.004389428805947358`"], "Output", + CellChangeTimes->{3.9913392307297993`*^9, 3.994386350592963*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"fac9f162-38c1-4d98-9514-6e8518fa9c81"] }, Open ]], Cell[CellGroupData[{ @@ -5350,13 +5208,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], + CellLabel->"In[85]:=",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.991339230837267*^9}, - CellLabel-> - "Out[326]=",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[BoxData["13.37645201575423`"], "Output", + CellChangeTimes->{3.991339230837267*^9, 3.994386350834928*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"2da0cce7-0dba-4bd2-96d8-2d8711707b7b"] }, Open ]], Cell[CellGroupData[{ @@ -5547,13 +5403,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[327]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], + CellLabel->"In[86]:=",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[BoxData["0.00990105610750653`"], "Output", - CellChangeTimes->{3.9913392308522797`*^9}, - CellLabel-> - "Out[327]=",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[BoxData["0.022978881973913724`"], "Output", + CellChangeTimes->{3.9913392308522797`*^9, 3.994386351051271*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"2bb9be76-d87c-42c1-b023-24196ee1db51"] }, Open ]], Cell[CellGroupData[{ @@ -5566,13 +5420,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[328]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], + CellLabel->"In[87]:=",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[BoxData["8.906440683949702`"], "Output", - CellChangeTimes->{3.991339230966341*^9}, - CellLabel-> - "Out[328]=",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[BoxData["5.846291872438565`"], "Output", + CellChangeTimes->{3.991339230966341*^9, 3.99438635115898*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"2f0e0bc2-043b-4013-9ace-d3d900ec321d"] }, Open ]], Cell[CellGroupData[{ @@ -5664,13 +5516,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[329]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], + CellLabel->"In[88]:=",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991339230988348*^9}, - CellLabel-> - "Out[329]=",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[BoxData["0.09071336685848984`"], "Output", + CellChangeTimes->{3.991339230988348*^9, 3.99438635117129*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"0907e28e-b0fa-42fd-9a17-588accbe45e8"] }, Open ]], Cell[CellGroupData[{ @@ -5759,13 +5609,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], + CellLabel->"In[89]:=",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991339231030445*^9}, - CellLabel-> - "Out[330]=",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[BoxData["0.9092866331415103`"], "Output", + CellChangeTimes->{3.991339231030445*^9, 3.994386351182425*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"436237dc-637f-489f-9589-c3b30d27c6fe"] }, Open ]], Cell[CellGroupData[{ @@ -5887,19 +5735,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], + CellLabel->"In[90]:=",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.991339231060343*^9}, - CellLabel-> - "Out[331]=",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[BoxData["0.08248445193168688`"], "Output", + CellChangeTimes->{3.991339231060343*^9, 3.9943863511941853`*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"e20b7a18-223a-4389-a5d7-05ce44b26584"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"0055f95b-c532-\ -e24d-bdc4-544ea2d2fbd9"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ @@ -5960,68 +5806,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918497046469917`*^9},ExpressionUUID->"574b810b-aa4a-d545-b080-\ -c44fbe83a713"], + CellChangeTimes->{3.9918497046469917`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 332, 325, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310873375`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2097574392304192`*^-214\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 92, 1, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.994386351234522*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], +In[92]:=",ExpressionUUID->"5758e053-cc8a-4484-9ded-8eec68d6f9e5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 332, 326, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392310973415`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.331673865865766`*^-220\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 92, 2, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.994386351256811*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], +In[92]:=",ExpressionUUID->"efd960cf-d749-490d-a776-9b432b3e53d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 332, 327, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339231105339*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.443323920340099`*^-225\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 92, 3, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.994386351264492*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], +In[92]:=",ExpressionUUID->"494ad4e9-51f2-43f3-a50e-f7ccca4d7c8d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 332, 328, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913392311143417`*^9}, +during this calculation.\"", 2, 92, 4, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913392310873375`*^9, 3.9943863512713947`*^9}, CellLabel-> "During evaluation of \ -In[332]:=",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], +In[92]:=",ExpressionUUID->"43504d4a-64cf-4719-a15e-8d13de8d3a9e"], -Cell[BoxData["6.551890985609901`"], "Output", - CellChangeTimes->{3.9913392346332226`*^9}, - CellLabel-> - "Out[332]=",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[BoxData["13.376452015754248`"], "Output", + CellChangeTimes->{3.9913392346332226`*^9, 3.994386354134008*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"25b3e0ff-14e9-4072-9f7c-0b1ae1b23c7a"] }, Open ]], Cell[CellGroupData[{ @@ -6083,68 +5931,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849710877041*^9},ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-\ -656c90598e75"], + CellChangeTimes->{3.991849710877041*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 333, 329, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234667631*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2097574392304192`*^-214\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 93, 5, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994386354180718*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], +In[93]:=",ExpressionUUID->"79415b2a-6ddf-4634-9297-78ebb4b78dad"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 333, 330, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234676628*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.331673865865766`*^-220\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 93, 6, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994386354186984*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], +In[93]:=",ExpressionUUID->"36434ad9-a613-44d8-8771-c0896e83e2d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 333, 331, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339234685627*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.443323920340099`*^-225\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 93, 7, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994386354192604*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], +In[93]:=",ExpressionUUID->"7b03d8a1-ef28-4bd0-91b2-037fcef7d3e7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 333, 332, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133923469363*^9}, +during this calculation.\"", 2, 93, 8, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339234667631*^9, 3.994386354197754*^9}, CellLabel-> "During evaluation of \ -In[333]:=",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], +In[93]:=",ExpressionUUID->"8da97de6-a835-4217-8c2d-be12dc13422f"], -Cell[BoxData["8.906440683949707`"], "Output", - CellChangeTimes->{3.99133923819088*^9}, - CellLabel-> - "Out[333]=",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[BoxData["5.846291872438568`"], "Output", + CellChangeTimes->{3.99133923819088*^9, 3.994386357042479*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"4299eff8-76ea-4bc5-9344-4d211b33e8f1"] }, Open ]], Cell[CellGroupData[{ @@ -6200,92 +6050,93 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849713921898*^9},ExpressionUUID->"9c540ba7-8bb4-ef46-919c-\ -62296271f174"], + CellChangeTimes->{3.991849713921898*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk0Vd0bB3BDJEOR1ywZ8xLSNVfsp5ASKlSmpOueQ4oyJGSoRMkQUqmf +KREZQlRCGqhXEjJEhoz3JnPiKJHf9sdZZ33WXuv7PGc/Z58jRz9tTXCwsbGN +4Gvl7t2oofysudGo0XEi9U8DExlNZunQTQpQ0Khb84r703WTFE2qkKdym9si +9gHGR25+rbeoXJTGWMIuCQir4TJpQNteXnz7FzvqnfirsLxPyFa1JprtIxM9 +b/ZOW6S1IzsG9ZQDe7SrPjiwshPJB0uZcWFLMhUcKeMedCKctoMHe99UsIFv +Qx8Kitt+iw+7enGULyBvAPmX6R5ah/35otj5p15DSGmdYqAw9iS3yegsjYmW +Kzg5xLG5Y87Ya82zkElH+5Q0toxQap135Qgaj7i7Sx7bSop6MGk8jgq3LIpq +YJMZ8qLqPJNIM/hOsjZ2mNL+iJMNU2hhSSVsO3anWNtWv7wfSIiudN4cm+Hg +ceJGzAy6lR8fb409ncJ277HXT5T7a4rXEZtHXl3wB20OFUdFa3hiJzFqzARF +KHTHvK7DH1s2xz5syzyF6ngWmBew9dUiJz0rf6GKJMOtt7DddfsaRo0X0X/K +luFvsWcDzq7i3bSE1JYMbFuwL1Ty7VDh+Yvumspc68NOBv18t4Zl1JbaqPhn +pb/sOhOfPHZYXP1FRK+RifLe3ei/KMUBD/9GrzXDnv7mHJwQwwG3og1OHcEO +Vp0rLfbiBJZa5OFA7KQiOYUpGhcsX51hvcbuah6v/nufC7ZIXFndji0788xh +rQg38ApKxo5gF2hbJarPc8N1S8P/BJuYqPZ5EPupSh547HJ1nsCeq2ntGzHm +B8v4sj0KzUy03oJf8Hw1Pxzp6R8wwtZsMwEBAwHwdv7wwwHbY/hJxlaNtdCZ ++PVsEvYZjgZNQ35ByPISWyfwiYmY8o9+RFBC4FddEPlPC94fsn5Nk9Z68KzV +iNHD5shnyYl7rwf9kVAeR2xZrY3WeWPrQZUrjriP7WAc/7ixXxhm6q6UGLQy +UZOrj6/YBxHQNp5PCG5joq85cdEuPKJQ7PR9VQ72+Fje/YemoiBNezH5CZvX +b6h1+ytRWBW0TlmlnYlMLttquzwRAzm1CNVe7Ios3bncdAlQzKFCHDuYKIu5 +4L/NbwMsp748XtLFRHsOXfnqW7gBqntKhljY47XCuwtZG8Aw9+xH6W4m0s5S +E5G1lwGD+nOdUdi1dOdSLqONUCUW3+Dew0QzU/3nRsJlYd0Xd41tX5lI2NOk +rNRSHmyH+IZVB5mIlcXrfsBDHkYajFw9sct7mqUmIuXhWOE582JsJ4uj4Zte +yYNxMsdBvSHc32Z/6zs0BUi7UWxkPozrj+ZMh4opwp9lobRwFhPZuvGpmw8o +QZRWRpDJGBMh/0O0I0tK8E76r2citmpEuh5DYhOE2yS97cdmu6+1K/TgJvB4 +730vdJyJCr86Hnn8ehOI7FTlfzmBz+fhgouSmcow/p5RZD2N+zOx/DxKV4Hu +ZOkdb+eY6L7N7e75UBUQ1sys2EgxURx9oH/V/1SgqSY7NQibceHsmEyrCkhs +00zYOs9EQlWpbDbGqpDlkKSR9Qu/P1qTqpUKm8FQosQk5Q8TSclfD4seVgPb +sXNTHewsVHVtVuU3hzp4yCTWmHGwkNNP+zZSTh1MyvauLcdOq1VU2eWsDs9C +01bf5WQhebeKll8d6uAUYXjNlYuFVAuYSuQHDbhRZNPCv4aFNkjJkLL2muB2 +OiWyXJCF1LL9+P8gGizaTO4/K8dCdEb4nLoVDV7Gq3j/xk5WSPzq4kQDVkrE +Qog8C3FmFhW/C6CBbWah6VUFFupKG7VNLKFBlIN09T0lFopKdklVUdAC2mvf +bSMqLMSKttCw49aGxtGgwBoaC93zUTzwpEEHFpbKuktNWajZH+ldzjaAT4O9 +2wk/FpJzbrc6esoQPg/f3f7pIQsRy08fbQgE+PnWTDVskIXExspXi9F3QY/S ++ueXlb8hP60dPYmqJpCbkxyoePobok8s1gmPmkK358Z/Naq+ocJdvqvTm8yA +9k0m9oLYCMqa9XhdkLQXAj5t3rPObwT92in+sTZsH1hwuSmH9I+gXjbOHwPH +LaFbJEJU1+Y78pI+HX9RYT9EXeAYyn77HT06UffqZsQB6KcJqUzuHUVBPyXm +N584CAJ06rbwx1E0Z7778H/HrOGc+qMbV1zHkIFjwk7mQRtQiuctTl8eQy0S +qR61WrYgz7MxKiN5HEk+CK/K/fcQbNqUcYexewKV96taWAkchlr7p5xNUxNI +pm3azX/iMCiVBfXap0wirZsJBff7j4Dt9Qsezs5TKHXVT43EGjsIpQSelfBP +o6c7t3RFPLeHS98szv3xm0bJeteEFvMcgDg6NDXfO42aurMjtWIc4YVgrXjr +zh/oiWWK4pkLTsBaOsNTWfQD/fC0YfNiHAWhnhpeW7EZNLdbxX3S2Bn0OXoy +94TMoNyJL798dY+B6ERJX/HYDLK7l+16lN8FbMPMdBoP/kSlj/cd47ziAmIJ +bGtLqn8iA6mW31G/XcBw5ndIp9wsUuh36/p04jjMy770HgqbRcN8J/enDB0H +7qSm7ycHZlFznJWr2SE68Dea/nXSm0NJAel8Z5vpEBv+58Vs7Byqql7+7brX +FTrzO6edu+fQOie4olXhCu4Vv7vnpCgk+89/TdJVriA8q5u9KE0hzQZLce5q +V6jaMdbOIUMh6x2ODztfu0Ios+uUgCyFkqT9P4S8dwUnx/ceUooUkuzNX1fX +6QqzN+v9JdUopOgsluw07wrND9ps7m+nkIHLZG6ENgN2ieukttlR6MGdaV8r +XQac63Rrz7Kn0D+tM0Zi+gwwdjEN8XOg0KTpfFvudgZUE3Sp9U4U/n6xsTfs +YkBLeVvM7mMUWjsvZL/+IAMMOU7KJxEUGo7VWZPuyQD1kXd8r70pFFcZfKL8 +AQOcyu1q7K9SyJN22yAglwG3M1Po7FEUsnhYskY/jwHH+I555WLz3mY9fFbI +gJrWgfrZaxSK8Dkw+rSMAbMS/kmRsRQKVlE8+eQNA5bEhqziEinkcfvDqcdf +GaD83C5OPYVCe9eydvj0MyC/OezSG+x/I9gEaIMM+Pv9RN/hVAqxfHQKS5gM +GA8XbQ1Jo9Bxq/SJ4nEG2LW/SavNoJAdl69X0QIDepr3FelkU8jMV/JMgSgB +96brf2cVUuhNeqR5ojgBSVymLVsfUWhHw4xigCQB53IbZ19gayp9+GIsQ4Dg +nkSxtiIKSXScN+5WIkAbnW6eL6HQ2LZeUV4dAkyqM2eln1LoOkfGCzcbAvTa +pfR7X+Dn38KfbHmIgKtnjcRtqil02THAR+sIAfd3vzeqww4oO6C87EBA55pC +5+KXuH+SPeEWnQCNwQbWudcU0qqnM956E5B5YoZ9uJZCHQlKfArxBEQ/O1m+ +5QOFHiEB95EEAtJEXL5fwb48MVtbeIMA1feS/n3YtL21ofq3CfAPSs2MacDz +Y3OdsUwjYIFv3rTvI4V2n874ElCA6wc75RDNFNqw4aqu0SMCfpp/jCnFnq0/ +fYOzmIDzSosNbJ8olLkJWcaVEnDnyOGjd7CXentf3a8g8P/dtupNC4XKLKRy +G+sI2J+XQlJtFIpe4OBKqifg+Nj8tEE7hei5o8ftGwjId1RpD8YWXFUhNdxE +QMa+L3lsnyl0qtLu+u/PBPyr/DeKrYNCCqq3/BWZeD79lvwDnRRa6Ahp/c4i +wCmYT0PyC4WaIwjNohECBFBnrjV26ID2qME4AbpL3g9fY3cltx7d/5MA+tKZ +9ttdFEpcLWQaxE6CxMFjTYo9FKqa6XX04yShKJTZZ4f9rTfPx4uLBLpq0sYY +7B1lJhn0NSS4N+mpTWOzXAL+mAuRYBRoGPioF/dvYbreVJiEq4fy2Xuwt+ut +V0EiJPwvo7+c5yuF4gUKDmtJkHC2y6/0GPb2ir4SKTkSbItEOzn7KERmF9SJ +KJDwlUxoV8WOjw/sW6dEwqXoMPaD2CxSWGCVCgkjS9eH766sC5u5j2uS4KZ+ +6bNiP4Uq/gqHsWgk8EXc3m2Kzfzef7Nfm4SS41+GGdjbXgXVtOmT0CdVk38P +e/jUI5kXQMKPrUfpQgP4vNud13m2iwThfk7jzdgGxnssSkxI6LVKPWiCHScx +GJi9h4RSv+u/fLHLVxXFp5vj/aL1xF/DHpo6n3PHgoQtLzmPZGDrvxNpjz2A +129+PPUem14yOHbFmoTYGKKqBzs2pYjjki0Jhfk1BlPYgz57Nf3tSBBkf/VC +aJBCAs6iZmccSAi6dqhWDlt/79BRDycSLg+m/9LEjt0YEu3sQkLHd+NRC+xy +XvNMOzoJzMRbOfbYg3Oiz60ZJKj+vZ5IrOQNDDVZkLiemnr+mZW8hmLWbncS +LG1P/gjCpj8LWQIPEpr6zIjLK/mZ5v9sP0VCl9cr7tiV/FixzTpeJEy0t7Qn +reQHDO/ccgbPUyak5X/Y/IwSOxUfEl5Hvli8h623P/S0gh8JHJcSbXNW8rft +i9zgT4JN+cKXfOwYJfFUsQA8H+65mCLsp4LMUqEgErjDLng+xh74U1LPF0yC +nHvK+bKV/G+hA1yhJFQa7nn2BFu3Zd+v5TBcvzhc9in2/wFoxzU1 "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6299,104 +6150,106 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwV1Xk0Vd0bB3BDJEOR1ywZ8xLSNVfsp5ASKlSmpOueQ4oyJGSoRMkQUqmf +KREZQlRCGqhXEjJEhoz3JnPiKJHf9sdZZ33WXuv7PGc/Z58jRz9tTXCwsbGN +4Gvl7t2oofysudGo0XEi9U8DExlNZunQTQpQ0Khb84r703WTFE2qkKdym9si +9gHGR25+rbeoXJTGWMIuCQir4TJpQNteXnz7FzvqnfirsLxPyFa1JprtIxM9 +b/ZOW6S1IzsG9ZQDe7SrPjiwshPJB0uZcWFLMhUcKeMedCKctoMHe99UsIFv +Qx8Kitt+iw+7enGULyBvAPmX6R5ah/35otj5p15DSGmdYqAw9iS3yegsjYmW +Kzg5xLG5Y87Ya82zkElH+5Q0toxQap135Qgaj7i7Sx7bSop6MGk8jgq3LIpq +YJMZ8qLqPJNIM/hOsjZ2mNL+iJMNU2hhSSVsO3anWNtWv7wfSIiudN4cm+Hg +ceJGzAy6lR8fb409ncJ277HXT5T7a4rXEZtHXl3wB20OFUdFa3hiJzFqzARF +KHTHvK7DH1s2xz5syzyF6ngWmBew9dUiJz0rf6GKJMOtt7DddfsaRo0X0X/K +luFvsWcDzq7i3bSE1JYMbFuwL1Ty7VDh+Yvumspc68NOBv18t4Zl1JbaqPhn +pb/sOhOfPHZYXP1FRK+RifLe3ei/KMUBD/9GrzXDnv7mHJwQwwG3og1OHcEO +Vp0rLfbiBJZa5OFA7KQiOYUpGhcsX51hvcbuah6v/nufC7ZIXFndji0788xh +rQg38ApKxo5gF2hbJarPc8N1S8P/BJuYqPZ5EPupSh547HJ1nsCeq2ntGzHm +B8v4sj0KzUy03oJf8Hw1Pxzp6R8wwtZsMwEBAwHwdv7wwwHbY/hJxlaNtdCZ ++PVsEvYZjgZNQ35ByPISWyfwiYmY8o9+RFBC4FddEPlPC94fsn5Nk9Z68KzV +iNHD5shnyYl7rwf9kVAeR2xZrY3WeWPrQZUrjriP7WAc/7ixXxhm6q6UGLQy +UZOrj6/YBxHQNp5PCG5joq85cdEuPKJQ7PR9VQ72+Fje/YemoiBNezH5CZvX +b6h1+ytRWBW0TlmlnYlMLttquzwRAzm1CNVe7Ios3bncdAlQzKFCHDuYKIu5 +4L/NbwMsp748XtLFRHsOXfnqW7gBqntKhljY47XCuwtZG8Aw9+xH6W4m0s5S +E5G1lwGD+nOdUdi1dOdSLqONUCUW3+Dew0QzU/3nRsJlYd0Xd41tX5lI2NOk +rNRSHmyH+IZVB5mIlcXrfsBDHkYajFw9sct7mqUmIuXhWOE582JsJ4uj4Zte +yYNxMsdBvSHc32Z/6zs0BUi7UWxkPozrj+ZMh4opwp9lobRwFhPZuvGpmw8o +QZRWRpDJGBMh/0O0I0tK8E76r2citmpEuh5DYhOE2yS97cdmu6+1K/TgJvB4 +730vdJyJCr86Hnn8ehOI7FTlfzmBz+fhgouSmcow/p5RZD2N+zOx/DxKV4Hu +ZOkdb+eY6L7N7e75UBUQ1sys2EgxURx9oH/V/1SgqSY7NQibceHsmEyrCkhs +00zYOs9EQlWpbDbGqpDlkKSR9Qu/P1qTqpUKm8FQosQk5Q8TSclfD4seVgPb +sXNTHewsVHVtVuU3hzp4yCTWmHGwkNNP+zZSTh1MyvauLcdOq1VU2eWsDs9C +01bf5WQhebeKll8d6uAUYXjNlYuFVAuYSuQHDbhRZNPCv4aFNkjJkLL2muB2 +OiWyXJCF1LL9+P8gGizaTO4/K8dCdEb4nLoVDV7Gq3j/xk5WSPzq4kQDVkrE +Qog8C3FmFhW/C6CBbWah6VUFFupKG7VNLKFBlIN09T0lFopKdklVUdAC2mvf +bSMqLMSKttCw49aGxtGgwBoaC93zUTzwpEEHFpbKuktNWajZH+ldzjaAT4O9 +2wk/FpJzbrc6esoQPg/f3f7pIQsRy08fbQgE+PnWTDVskIXExspXi9F3QY/S ++ueXlb8hP60dPYmqJpCbkxyoePobok8s1gmPmkK358Z/Naq+ocJdvqvTm8yA +9k0m9oLYCMqa9XhdkLQXAj5t3rPObwT92in+sTZsH1hwuSmH9I+gXjbOHwPH +LaFbJEJU1+Y78pI+HX9RYT9EXeAYyn77HT06UffqZsQB6KcJqUzuHUVBPyXm +N584CAJ06rbwx1E0Z7778H/HrOGc+qMbV1zHkIFjwk7mQRtQiuctTl8eQy0S +qR61WrYgz7MxKiN5HEk+CK/K/fcQbNqUcYexewKV96taWAkchlr7p5xNUxNI +pm3azX/iMCiVBfXap0wirZsJBff7j4Dt9Qsezs5TKHXVT43EGjsIpQSelfBP +o6c7t3RFPLeHS98szv3xm0bJeteEFvMcgDg6NDXfO42aurMjtWIc4YVgrXjr +zh/oiWWK4pkLTsBaOsNTWfQD/fC0YfNiHAWhnhpeW7EZNLdbxX3S2Bn0OXoy +94TMoNyJL798dY+B6ERJX/HYDLK7l+16lN8FbMPMdBoP/kSlj/cd47ziAmIJ +bGtLqn8iA6mW31G/XcBw5ndIp9wsUuh36/p04jjMy770HgqbRcN8J/enDB0H +7qSm7ycHZlFznJWr2SE68Dea/nXSm0NJAel8Z5vpEBv+58Vs7Byqql7+7brX +FTrzO6edu+fQOie4olXhCu4Vv7vnpCgk+89/TdJVriA8q5u9KE0hzQZLce5q +V6jaMdbOIUMh6x2ODztfu0Ios+uUgCyFkqT9P4S8dwUnx/ceUooUkuzNX1fX +6QqzN+v9JdUopOgsluw07wrND9ps7m+nkIHLZG6ENgN2ieukttlR6MGdaV8r +XQac63Rrz7Kn0D+tM0Zi+gwwdjEN8XOg0KTpfFvudgZUE3Sp9U4U/n6xsTfs +YkBLeVvM7mMUWjsvZL/+IAMMOU7KJxEUGo7VWZPuyQD1kXd8r70pFFcZfKL8 +AQOcyu1q7K9SyJN22yAglwG3M1Po7FEUsnhYskY/jwHH+I555WLz3mY9fFbI +gJrWgfrZaxSK8Dkw+rSMAbMS/kmRsRQKVlE8+eQNA5bEhqziEinkcfvDqcdf +GaD83C5OPYVCe9eydvj0MyC/OezSG+x/I9gEaIMM+Pv9RN/hVAqxfHQKS5gM +GA8XbQ1Jo9Bxq/SJ4nEG2LW/SavNoJAdl69X0QIDepr3FelkU8jMV/JMgSgB +96brf2cVUuhNeqR5ojgBSVymLVsfUWhHw4xigCQB53IbZ19gayp9+GIsQ4Dg +nkSxtiIKSXScN+5WIkAbnW6eL6HQ2LZeUV4dAkyqM2eln1LoOkfGCzcbAvTa +pfR7X+Dn38KfbHmIgKtnjcRtqil02THAR+sIAfd3vzeqww4oO6C87EBA55pC +5+KXuH+SPeEWnQCNwQbWudcU0qqnM956E5B5YoZ9uJZCHQlKfArxBEQ/O1m+ +5QOFHiEB95EEAtJEXL5fwb48MVtbeIMA1feS/n3YtL21ofq3CfAPSs2MacDz +Y3OdsUwjYIFv3rTvI4V2n874ElCA6wc75RDNFNqw4aqu0SMCfpp/jCnFnq0/ +fYOzmIDzSosNbJ8olLkJWcaVEnDnyOGjd7CXentf3a8g8P/dtupNC4XKLKRy +G+sI2J+XQlJtFIpe4OBKqifg+Nj8tEE7hei5o8ftGwjId1RpD8YWXFUhNdxE +QMa+L3lsnyl0qtLu+u/PBPyr/DeKrYNCCqq3/BWZeD79lvwDnRRa6Ahp/c4i +wCmYT0PyC4WaIwjNohECBFBnrjV26ID2qME4AbpL3g9fY3cltx7d/5MA+tKZ +9ttdFEpcLWQaxE6CxMFjTYo9FKqa6XX04yShKJTZZ4f9rTfPx4uLBLpq0sYY +7B1lJhn0NSS4N+mpTWOzXAL+mAuRYBRoGPioF/dvYbreVJiEq4fy2Xuwt+ut +V0EiJPwvo7+c5yuF4gUKDmtJkHC2y6/0GPb2ir4SKTkSbItEOzn7KERmF9SJ +KJDwlUxoV8WOjw/sW6dEwqXoMPaD2CxSWGCVCgkjS9eH766sC5u5j2uS4KZ+ +6bNiP4Uq/gqHsWgk8EXc3m2Kzfzef7Nfm4SS41+GGdjbXgXVtOmT0CdVk38P +e/jUI5kXQMKPrUfpQgP4vNud13m2iwThfk7jzdgGxnssSkxI6LVKPWiCHScx +GJi9h4RSv+u/fLHLVxXFp5vj/aL1xF/DHpo6n3PHgoQtLzmPZGDrvxNpjz2A +129+PPUem14yOHbFmoTYGKKqBzs2pYjjki0Jhfk1BlPYgz57Nf3tSBBkf/VC +aJBCAs6iZmccSAi6dqhWDlt/79BRDycSLg+m/9LEjt0YEu3sQkLHd+NRC+xy +XvNMOzoJzMRbOfbYg3Oiz60ZJKj+vZ5IrOQNDDVZkLiemnr+mZW8hmLWbncS +LG1P/gjCpj8LWQIPEpr6zIjLK/mZ5v9sP0VCl9cr7tiV/FixzTpeJEy0t7Qn +reQHDO/ccgbPUyak5X/Y/IwSOxUfEl5Hvli8h623P/S0gh8JHJcSbXNW8rft +i9zgT4JN+cKXfOwYJfFUsQA8H+65mCLsp4LMUqEgErjDLng+xh74U1LPF0yC +nHvK+bKV/G+hA1yhJFQa7nn2BFu3Zd+v5TBcvzhc9in2/wFoxzU1 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.6812723240390086, + 1.4303494711012068`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.6812723240390102}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6408,21 +6261,21 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, - 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.6812723240390086, + 1.4303494711012068`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.6812723240390102}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6436,102 +6289,104 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hc8V2scB3CzslqyR1mFUrJXvt+QvcnM/v0OSXauSkkZDZWk0iQJyUhK -Vm7DvakUUXTJyEEys/2a9/HHeZ3X+/W8ns/5PM9zzpHxD3NkcrCxsfWRa/Ee -8XbzhkfNbw3F+g5WN6SywHA8V9PfpAisL7eqL7o3SytD3qQW6pf3Z/1LbM94 -s4Rf/R+wLir+/Zy4LDb+ObdJI2jLbrV/QnziX9En8YXvwDswLKOGuKo54sZP -tQ8gV7X79UPi4Y5XcftrPgJ1VWa2hFh8QM5zzvgTXPqYuSqf2GoiTjeqsQey -E96tu0Fc93OYL7bwM4yMvZHNIG5LEDlYEUpDZE2ayAni8SUmwzNqA5D9VvJP -HPGS1HB39flB8HTc918YsfSq6w0RNUOwvPJ6nh+xrcRc3rjxKHjb7RUzIqay -ZYVVlo2DeL3k36rE8Qp2SXsaJ2DlzSJXaeKPIu+3RhdOwrt1CX5zp1jA8Aje -fT51CnT0mlt6ib9dY7t5P3Qa+O+s0X5FvExWZeWk2ixkHrjw8TJxBuO52Uqh -OWBL6RY6Qrwu3z1+y/wcbDbQMmUS62xKHt9bswA/WCpHNhEHafU0Dhv/hM3n -13iUnGTBTOw+Lt71v8D8ZZ5qKvGRGj4DpWW/wf1Qyvcg4kzUuRvY+AdWHHEP -WkvMuN1gElnIjiabnIrjT7Cg8N/zvQkSHMh2K3jtTuJvX7zjzqVy4Lt5mSQl -4jjl2fJ7oZz4l/SNjU3HSd9SGbkJNW6U7ZEcFCDuaB6t+32LG593Jsx1pJD+ -U488lgstwR0Xvn7PIy7SsE1XmV+CTZ/me/SJ66sOsIfULMPdNtcl3ZNZMPu8 -tWfImB83H9y11y+RBaut+VcerOPHbdFNS0WJVd+boICuAK4diwh6c4wFwf0P -s7duXo7K5jfjNIjDORpVt/GvxJ6B7dPTCSwYkC2ZTJpbheJKSVt04sn+UK94 -mtRXo1DpAZ3OwyzguDsoIxqxGjlj9XgOEa9TX+tYOLIa5WJTOR4fYoGHcdr9 -t72CuN+p0nVzHAuaAiKjRF4L4UC3c35bLAu688+c8l0mjDrZhvoU8ehI4a07 -O4Qx7cVI5sxfLOCNplv1nwhjkqvEfQFik0RnDd+HIlihWeazdR8LqnO1Zguy -xFBCc/aFYQQLcge+x+hFS2El68bnyCAWmO9M6Y4qlkKDL7Xsg4Ekv17QtHhQ -Cv2O/y3iRqyRu0lonbs0ekryrNelyH76e5dzG65FH7q9aTyABVMTvX8NHVuH -N70yDij6sEBwr8mDchtZXNnRYNXmzILBXN4g+2BZ9DDVilEkrvzULDGWLIsv -mquu7ndiwS5rr2Prn8iie2n1R1FH0m9jjONlNTms/OfhWis78vzh/G+HReTR -gWuON96CBc6BfCqWnxVQNexdicI2FkDMTjXXXwrYHzSS52nAAuWkLG2G2Ho0 -99IoTNNnAdstdaPDDusxvlKqdV6XBcXdnq73n67HWPH+8mot8n26FCWI52zA -+m153atVST8Tm7ZhfyW80HvCbrksCyRkz8af6t+E5Z1HOA05WVB7ckaJxaGC -ulcajWQ5SP9p9/eUjAoe0+mN5GZnwY16eSUjbxXc15mb1/B7AWQDq1sW2lVQ -7c0VptH3BVAuGlCgXm/G83KvT3BOLoCUhDS1zl0V+9glHtd1LcCm29H8P0AN -v07dUd70YAFuRsrbP2zUxAMn5I7b7lqA5hjQTrytizL3I66YTsyDjPcHW6+Q -bdhzVWZ4+q95YP6pKJHaj/jsyKlmkz9zIDJSuVTE3wgH3mZlTUTNQbS6wad0 -ZROUz0r0SB6ZBf+xnw2Cwzuwis3M0clvFoqNopZmNZlh8csS9vEXM5A7E/y0 -KMMCA565ZI5qzcDCdtE39fFW+EquWEf88jR0sXFOfvazQUWTltKXv6cgVDIs -LUHODg/9ODETEj4FJbsbnlxIskduY/6uvI+TcGBabH7jbgfM7/ljp2Y7CbOW -pi4vfBxR2t+e5V77DXQ9z20fcHDCNme7d9Nbv0GL2PXgenVnTO/Sn+DeMwHi -ecdqCxR3It/x0CGuoHGo7FW2thVwwT/Hl55tPDIG0u+/BcaMueDeZR08TgWj -oH7hXNGtXleU6LktIfhyBK5zTW9Of+6GY8uknxZzjkDF9i0dSVXuyLU6Zm+O -7jBkap9c9bPQAxuNohU1479CU+ftZPVUTxT6rWfV2jkED22uyYcf2YXO6mlu -/ZpDMLnXiS2U4YUckoVOO29/gVlTpaBxY2+8l/zBS0jmCxSM/bcQpeWDw9Gf -OoeuDoLbzdsBXvy+KJfu1iyqNAjl9618OFN8Md/utHRuxQDoSrSwTrB8sWk4 -8u0X5wGQ6w3seLfbDzPemNza86sf+vn22F2j/TC9j1fvan4/NJ+xDTDb6Y9a -z6ttWnz6ISM2i29fsz+u5X9t1yneD7V1f1gBFgHoE1PW3N1Dw4pdmKJeHYD8 -P3llYu/RsG7NiybJ2gAUVXE4U11Kg2qjjeiSugDMNPI69quEBkcDzzsfnwbg -g/IbXEnFNGRIxrw+9DIAO22K/a8U0iDedXdFw8cAXLbdJLE7lwZ5b5HMXfMB -KC20QqzxMg26vuMFSRoMtKhri9NLoiHv8rcoWy0GpvJWDxYk0rCmdcpQRIeM -y0zUixCP75h/X6DPQDZz9e65ozT5H7CxNxoxsLyFcaz6CA3L51e5r3ZgoHHx -8XTXOBr6T2vyZO1lYInz8wtDUTQ4vNB+HxjGQPl/fsYxievY9LJUIxjoUlvR -3hdJw+UoQ81n0Qz0iz7/pTuCBlt3M7+Bgwx0zTcO/xRGQ5W8e9XGkwwM26Ky -bmwPDWdq4nZX5jHwrs+dZgaDhr1ql3RjCxj4LSyNmgqgwfpOGY9OIQML2eqD -jxDzXhq886iYgZzPfjy+7k9DUqT9cMUDBn65I3m2y5eGOCX5PQ+fMZBpcrc9 -wouG4EuvQ+53M1BIRKtn1IUGi+WDBpG9DBzFUY3jxIpJbAJqfQx8qeqwIEc8 -GKlZXDbAwKjpNQ27dtLgZ5s1dm+UgeEruE61OtHgxh0VWvqdgcFi5658sKfB -LEo8vEiYiRcvjD7daEXDs6xky3RRJl5LMqbeWNJg0DglHyvOxI/2gqfCiFUV -Xv9nLM3EPBEel4cWNIi1HzTuVGCih/6Tb6bmNIzodQnzajLxxU8ezaM7aDjL -kf040ImJ9/Z8andDsv4t/Jk2O5nYwD6ZwEuc6Bkbqe7KxIXYobu1QEPsA/sN -fzzIfJGweFliP4r93EV/JvJNMeVnttGg/sqf8U8EE/tSAv1L9WloP6fAJ5fG -xDnLs+eTtGkoAYGgoXNMfNur52FFnDg2U198nomqt9rOriJWs6g/rHOJiRvu -t5plaZHzYwuYsrlBbJg5/LcmDaZh2f/FFjHxWNDvBSENGqSkjmsZljBRRTG0 -uE+dhplXYec57zERk3ObS4lz1oPNmXImVkZ4BlgR/+rqenKrmonmMaVVKWo0 -PLCWKHjbwMSCydENQltpOPWdgzvjFRMtzEtfDKnS4F8w7OfeyESTMcG2WuKV -XNUS/U1MHPunxpAiDqlxO8tqY6KWgzXUbaFBTvlijPwAE3m4H/04upmG7+2H -Wr8OMjHbuiTRi7g5ialaOsTEjS2KcTrEhz9rDOuOMvHNyeyKCRUaOjJbveym -mTh8NNg9gDh96aodB9gpDHdYcPbZREPtVJdnNCeF6ldyDLcRf+kqjAzlplBy -vq9MgtjggUm2Pw+FwSwpzY6N5H3zjf1huYrCIUOzEi/ildY7Vu8QpFBqeUg/ -EOtrr1YCIQoVu0VyZYnTBIpc1MUodEn/9fdXZTJe3VMmIUNh+tmW3YeJqdtF -DUJyFLaFs40yiNPS9vesUKDwpGXBvBXxICUowKVEofFvn7sSi+OCZkGjqhSu -bTFLfKpEQ/VvwfhBNQrLC6Qci4gHvvZe6NWg0O6A/51LxHpPDjx/r0MhY6PG -TBhxf0iJ9GOkcJNr+/f1xMvdDmo+MqLQ1IdrjTCxrrG5dZkJhbbhlyq4ic+I -9e2/bU6hb9PIpUFFGiq5StOyLCnkMr7b1k5MTxzMv2xNYQ3vmxsviXX+Ffpw -2p7CBH2N1yXE/mV9IymOFF7ni92SQ3z6WinHUWcK63+JS10k7ou0UI1xo9A7 -/GBGPLGAt7BZuAeFBpe1pfct5lnQXsG7KJTWtN+6Z3H+2kOnvH0pzAjPmHZb -7MNrmePmTyH/97oc+8W8WeEqRwaF+Mq403wx7zPdZE1ReDpY9vr2xbzGe4Om -QRQmh3gM6S32e3ToFwZT2LF7pFZjMT/Hco1+CIUXuT6Ib1nMPy2yUTOUwieD -whzKi/mx/du3hJP1PLsXqUDMzyhzU4qk8L5jTogMsbbd4TC5aAqz3UcmpBbz -9aySpWIoVM059VOcOFVB9LpILIWhf46mixJXrBwoX3WAwhTrd2XCxJ9/lL3i -i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== +1:eJwV1Xk0Vd0bB3BDJEOR1ywZ8xLSNVfsp5ASKlSmpOueQ4oyJGSoRMkQUqmf +KREZQlRCGqhXEjJEhoz3JnPiKJHf9sdZZ33WXuv7PGc/Z58jRz9tTXCwsbGN +4Gvl7t2oofysudGo0XEi9U8DExlNZunQTQpQ0Khb84r703WTFE2qkKdym9si +9gHGR25+rbeoXJTGWMIuCQir4TJpQNteXnz7FzvqnfirsLxPyFa1JprtIxM9 +b/ZOW6S1IzsG9ZQDe7SrPjiwshPJB0uZcWFLMhUcKeMedCKctoMHe99UsIFv +Qx8Kitt+iw+7enGULyBvAPmX6R5ah/35otj5p15DSGmdYqAw9iS3yegsjYmW +Kzg5xLG5Y87Ya82zkElH+5Q0toxQap135Qgaj7i7Sx7bSop6MGk8jgq3LIpq +YJMZ8qLqPJNIM/hOsjZ2mNL+iJMNU2hhSSVsO3anWNtWv7wfSIiudN4cm+Hg +ceJGzAy6lR8fb409ncJ277HXT5T7a4rXEZtHXl3wB20OFUdFa3hiJzFqzARF +KHTHvK7DH1s2xz5syzyF6ngWmBew9dUiJz0rf6GKJMOtt7DddfsaRo0X0X/K +luFvsWcDzq7i3bSE1JYMbFuwL1Ty7VDh+Yvumspc68NOBv18t4Zl1JbaqPhn +pb/sOhOfPHZYXP1FRK+RifLe3ei/KMUBD/9GrzXDnv7mHJwQwwG3og1OHcEO +Vp0rLfbiBJZa5OFA7KQiOYUpGhcsX51hvcbuah6v/nufC7ZIXFndji0788xh +rQg38ApKxo5gF2hbJarPc8N1S8P/BJuYqPZ5EPupSh547HJ1nsCeq2ntGzHm +B8v4sj0KzUy03oJf8Hw1Pxzp6R8wwtZsMwEBAwHwdv7wwwHbY/hJxlaNtdCZ ++PVsEvYZjgZNQ35ByPISWyfwiYmY8o9+RFBC4FddEPlPC94fsn5Nk9Z68KzV +iNHD5shnyYl7rwf9kVAeR2xZrY3WeWPrQZUrjriP7WAc/7ixXxhm6q6UGLQy +UZOrj6/YBxHQNp5PCG5joq85cdEuPKJQ7PR9VQ72+Fje/YemoiBNezH5CZvX +b6h1+ytRWBW0TlmlnYlMLttquzwRAzm1CNVe7Ios3bncdAlQzKFCHDuYKIu5 +4L/NbwMsp748XtLFRHsOXfnqW7gBqntKhljY47XCuwtZG8Aw9+xH6W4m0s5S +E5G1lwGD+nOdUdi1dOdSLqONUCUW3+Dew0QzU/3nRsJlYd0Xd41tX5lI2NOk +rNRSHmyH+IZVB5mIlcXrfsBDHkYajFw9sct7mqUmIuXhWOE582JsJ4uj4Zte +yYNxMsdBvSHc32Z/6zs0BUi7UWxkPozrj+ZMh4opwp9lobRwFhPZuvGpmw8o +QZRWRpDJGBMh/0O0I0tK8E76r2citmpEuh5DYhOE2yS97cdmu6+1K/TgJvB4 +730vdJyJCr86Hnn8ehOI7FTlfzmBz+fhgouSmcow/p5RZD2N+zOx/DxKV4Hu +ZOkdb+eY6L7N7e75UBUQ1sys2EgxURx9oH/V/1SgqSY7NQibceHsmEyrCkhs +00zYOs9EQlWpbDbGqpDlkKSR9Qu/P1qTqpUKm8FQosQk5Q8TSclfD4seVgPb +sXNTHewsVHVtVuU3hzp4yCTWmHGwkNNP+zZSTh1MyvauLcdOq1VU2eWsDs9C +01bf5WQhebeKll8d6uAUYXjNlYuFVAuYSuQHDbhRZNPCv4aFNkjJkLL2muB2 +OiWyXJCF1LL9+P8gGizaTO4/K8dCdEb4nLoVDV7Gq3j/xk5WSPzq4kQDVkrE +Qog8C3FmFhW/C6CBbWah6VUFFupKG7VNLKFBlIN09T0lFopKdklVUdAC2mvf +bSMqLMSKttCw49aGxtGgwBoaC93zUTzwpEEHFpbKuktNWajZH+ldzjaAT4O9 +2wk/FpJzbrc6esoQPg/f3f7pIQsRy08fbQgE+PnWTDVskIXExspXi9F3QY/S ++ueXlb8hP60dPYmqJpCbkxyoePobok8s1gmPmkK358Z/Naq+ocJdvqvTm8yA +9k0m9oLYCMqa9XhdkLQXAj5t3rPObwT92in+sTZsH1hwuSmH9I+gXjbOHwPH +LaFbJEJU1+Y78pI+HX9RYT9EXeAYyn77HT06UffqZsQB6KcJqUzuHUVBPyXm +N584CAJ06rbwx1E0Z7778H/HrOGc+qMbV1zHkIFjwk7mQRtQiuctTl8eQy0S +qR61WrYgz7MxKiN5HEk+CK/K/fcQbNqUcYexewKV96taWAkchlr7p5xNUxNI +pm3azX/iMCiVBfXap0wirZsJBff7j4Dt9Qsezs5TKHXVT43EGjsIpQSelfBP +o6c7t3RFPLeHS98szv3xm0bJeteEFvMcgDg6NDXfO42aurMjtWIc4YVgrXjr +zh/oiWWK4pkLTsBaOsNTWfQD/fC0YfNiHAWhnhpeW7EZNLdbxX3S2Bn0OXoy +94TMoNyJL798dY+B6ERJX/HYDLK7l+16lN8FbMPMdBoP/kSlj/cd47ziAmIJ +bGtLqn8iA6mW31G/XcBw5ndIp9wsUuh36/p04jjMy770HgqbRcN8J/enDB0H +7qSm7ycHZlFznJWr2SE68Dea/nXSm0NJAel8Z5vpEBv+58Vs7Byqql7+7brX +FTrzO6edu+fQOie4olXhCu4Vv7vnpCgk+89/TdJVriA8q5u9KE0hzQZLce5q +V6jaMdbOIUMh6x2ODztfu0Ios+uUgCyFkqT9P4S8dwUnx/ceUooUkuzNX1fX +6QqzN+v9JdUopOgsluw07wrND9ps7m+nkIHLZG6ENgN2ieukttlR6MGdaV8r +XQac63Rrz7Kn0D+tM0Zi+gwwdjEN8XOg0KTpfFvudgZUE3Sp9U4U/n6xsTfs +YkBLeVvM7mMUWjsvZL/+IAMMOU7KJxEUGo7VWZPuyQD1kXd8r70pFFcZfKL8 +AQOcyu1q7K9SyJN22yAglwG3M1Po7FEUsnhYskY/jwHH+I555WLz3mY9fFbI +gJrWgfrZaxSK8Dkw+rSMAbMS/kmRsRQKVlE8+eQNA5bEhqziEinkcfvDqcdf +GaD83C5OPYVCe9eydvj0MyC/OezSG+x/I9gEaIMM+Pv9RN/hVAqxfHQKS5gM +GA8XbQ1Jo9Bxq/SJ4nEG2LW/SavNoJAdl69X0QIDepr3FelkU8jMV/JMgSgB +96brf2cVUuhNeqR5ojgBSVymLVsfUWhHw4xigCQB53IbZ19gayp9+GIsQ4Dg +nkSxtiIKSXScN+5WIkAbnW6eL6HQ2LZeUV4dAkyqM2eln1LoOkfGCzcbAvTa +pfR7X+Dn38KfbHmIgKtnjcRtqil02THAR+sIAfd3vzeqww4oO6C87EBA55pC +5+KXuH+SPeEWnQCNwQbWudcU0qqnM956E5B5YoZ9uJZCHQlKfArxBEQ/O1m+ +5QOFHiEB95EEAtJEXL5fwb48MVtbeIMA1feS/n3YtL21ofq3CfAPSs2MacDz +Y3OdsUwjYIFv3rTvI4V2n874ElCA6wc75RDNFNqw4aqu0SMCfpp/jCnFnq0/ +fYOzmIDzSosNbJ8olLkJWcaVEnDnyOGjd7CXentf3a8g8P/dtupNC4XKLKRy +G+sI2J+XQlJtFIpe4OBKqifg+Nj8tEE7hei5o8ftGwjId1RpD8YWXFUhNdxE +QMa+L3lsnyl0qtLu+u/PBPyr/DeKrYNCCqq3/BWZeD79lvwDnRRa6Ahp/c4i +wCmYT0PyC4WaIwjNohECBFBnrjV26ID2qME4AbpL3g9fY3cltx7d/5MA+tKZ +9ttdFEpcLWQaxE6CxMFjTYo9FKqa6XX04yShKJTZZ4f9rTfPx4uLBLpq0sYY +7B1lJhn0NSS4N+mpTWOzXAL+mAuRYBRoGPioF/dvYbreVJiEq4fy2Xuwt+ut +V0EiJPwvo7+c5yuF4gUKDmtJkHC2y6/0GPb2ir4SKTkSbItEOzn7KERmF9SJ +KJDwlUxoV8WOjw/sW6dEwqXoMPaD2CxSWGCVCgkjS9eH766sC5u5j2uS4KZ+ +6bNiP4Uq/gqHsWgk8EXc3m2Kzfzef7Nfm4SS41+GGdjbXgXVtOmT0CdVk38P +e/jUI5kXQMKPrUfpQgP4vNud13m2iwThfk7jzdgGxnssSkxI6LVKPWiCHScx +GJi9h4RSv+u/fLHLVxXFp5vj/aL1xF/DHpo6n3PHgoQtLzmPZGDrvxNpjz2A +129+PPUem14yOHbFmoTYGKKqBzs2pYjjki0Jhfk1BlPYgz57Nf3tSBBkf/VC +aJBCAs6iZmccSAi6dqhWDlt/79BRDycSLg+m/9LEjt0YEu3sQkLHd+NRC+xy +XvNMOzoJzMRbOfbYg3Oiz60ZJKj+vZ5IrOQNDDVZkLiemnr+mZW8hmLWbncS +LG1P/gjCpj8LWQIPEpr6zIjLK/mZ5v9sP0VCl9cr7tiV/FixzTpeJEy0t7Qn +reQHDO/ccgbPUyak5X/Y/IwSOxUfEl5Hvli8h623P/S0gh8JHJcSbXNW8rft +i9zgT4JN+cKXfOwYJfFUsQA8H+65mCLsp4LMUqEgErjDLng+xh74U1LPF0yC +nHvK+bKV/G+hA1yhJFQa7nn2BFu3Zd+v5TBcvzhc9in2/wFoxzU1 "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + "PlotRange" -> {{0, 180}, {0.6812723240390086, 1.4303494711012068`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5986424829233548}, + "AxesOrigin" -> {0, 0.6812723240390102}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6541,7 +6396,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5986424829233548}, + AxesOrigin->{0, 0.6812723240390102}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6569,7 +6425,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5986424829233534, 1.5968711170700145`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6812723240390086, 1.4303494711012068`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6577,9 +6434,8 @@ i6OwPSTGQ2gx/8vhz9yHKRy3ikxdQ6zVYrXwJ57076o3W/T/ejWvbA== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991339493274267*^9}, - CellLabel-> - "Out[334]=",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] + CellChangeTimes->{3.991339493274267*^9, 3.994386673477832*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"57c52c80-c7de-4a9c-b8fc-e9fa1cd60b6e"] }, Open ]], Cell[CellGroupData[{ @@ -6642,262 +6498,159 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849724783457*^9},ExpressionUUID->"6e33cb28-ef1e-1547-b52d-\ -2171e7786920"], + CellChangeTimes->{3.991849724783457*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2261575897868585`*^-267\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.6448899308982694`*^-268\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.99438667394075*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"7d49d1c0-55a3-41c6-bf5b-e7c73bee2a3a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.7442098639012736`*^-280\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 335, - 333, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493498577*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994386673947969*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], +In[95]:=",ExpressionUUID->"84c3ed7b-ac39-4c80-9171-fece47e8772b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.273330099721687`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"8.522824075699592`*^-292\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 335, 334, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493508564*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 11, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.9943866739534483`*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.013344112917215`*^-290\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 335, 335, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493517563*^9}, - CellLabel-> - "During evaluation of \ -In[335]:=",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], +In[95]:=",ExpressionUUID->"059aa262-451e-4428-a63e-9d37589e6824"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 335, 336, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991339493525564*^9}, +during this calculation.\"", 2, 95, 12, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991339493498577*^9, 3.994386673958993*^9}, CellLabel-> "During evaluation of \ -In[335]:=",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], +In[95]:=",ExpressionUUID->"dc98de0d-1593-4530-9dda-d7e3820e59be"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwN1nk4VVsUAHBRhkJFypDpuucaupkyZLitRR6PBhGKBp4QhUqGDBWSuchc +IXPce27RaKqEhycvKSFK0vBK5jkl7/xxvvP9vvN9e++z115rbUXXE7buvDw8 +PLzLqId6z/b/00hPKNoW1nrsEVtCf1tnrmSwSU8k6FyuHP/JlACUaHeV7EmB +nSYOBm1MAgL3sLv5egpgpjd66hZTF9aObkj50X0Hpr7tKI1n/gHva3efmO6u +hy9GBYOKTHswpw+9m+h+CbfdTq1NVXOHH9366ePdg7BXgi54hB4ADdtvFnUU +TMHrfxzPun6/CBvfV31xZS7CwSxviV3KybDO25ktsJ0Pw3+Zjj6RSocULfOa +3faC+J7fssPM5Bq8ydKsm1gjgoSXUUzey1xIKDrfziu1FlNmY4RcavJhQ9rH +uNQccXz9W/LiqdeFEGNnue3lrAT26Gd+l7hRDKcN8p3/iZTEwPpFsdgDN8Fs +bCHE96M03js2L2PeXArBf6apPR2WxtcGw+dOt5XCrfzNveKz0vgtmf95Tkcp +SNq5GFQJyuAWFR+Nb32lMFz59xyfugwKXHCcdRovhdTIZP+rZ2QwMjfMhi1Z +BoMSDN9GkY14uvC42axHGUQY2/wlvVUWq53mPHUXyuDPw7mT+qay6NNufuDn +7zIQDf9+wX6nLF77Tzv7ER8bshsuliS7yOK32+JC+iJsqLSq/s4fJ4ub8uLj +FuXZML5fKXDqjSy+76r81WPGhsMBM/FtoXL4syAsrSWBDUSm6cahi3Ko5agi +IJnMptabxBVIlsOh+dKGI2lsCPml+sK0SA4F9P+RGs9mQ/qFwxJVbXJ4bMWG +rW+5bGi70nyjWFYe33oZMnnb2WB46+q9c0/kcZwZczVKlANm3c8XR1vkMSHP +3k1GjAO7eZZbOL+UR/Vv5OQtCQ4csfV9A5/lsf7wkmPbRg6YhyqeD1+hgO4T +WXsH1DhwUn620GSTAtaL9sx5m3Og8eiNkYZABZwS0LeWCuWA5S8DsbBQBdz3 +NO76n+c48Dy5U08nXAF5dw+S/hEceFMlFF4Up4Atar/lGmI4MLrKX+xitgJO ++/tvN0jjgGT5n/rm9QpYG/GzMJ7kgPf8RHiLiCK6ySdm1fdywPCUx/ovYor4 +vdnatekdBwSHejl8kopoTlvt3jTAgeK+hq5tNEVkmDmsr/nCgf7H6cz7eooY +NSykHjTJAeuLBj35zop4xaHHzVCIBG2xCI3QCkUc2p9WMbqFBJ6EmcasB4q4 +43nJ2hA9Ep7zHXN6UKOID+XH7iwzIOH4jO3Fib8VsfXZ4eoV20go6qH3He1V +RDYt/fOABQnrb7RE2/HR8OTt9tmPTiT82LSmf7M9DUtTvILlz5EwmyMdscWJ +hgfa1GZVw0mYXk3QDZxpqNM98EEzkoTRKYNjZl40pHs8ENCJJmGw5sis01ka +Cjj8ylx9mYTWHQ9FY4tpeLxymL4xh4TmR08rLrFpuNRUWzeSS0KjRptd6m0a +HiaXOmrySHgs/uFabhUNvVdkOOwqIuFO30rl+//S0EZcZ/oPDgnXjh+GwRka +Tn2a/HSpkoTMd56D/y3Q0ERgXFi5moQ069MXR5ZoGL8luaK2hoTLW2KfzQsp +IZeT4/fuMQmRPyv2rZZTQk0x6w/TjdT+JKw4aWyuhKWBNv2hL0jwXFwtbrpD +CYVnsle+6yDB44T0A4s9SpiZ5VVj+IoEl70av2ydlHCFVjr5/TUJdjKOsV6+ +Snizub5PqY8EYw6Zl5GhhK7PBT6NfCKhT4Fz44/rSth837SQ7wsJIRlludM3 +lFAq/6zr+v9IeBhRkm1bpoQREXWD2t+o+O7PyxKtVcLGS5pzFiMkqK5IS47+ +oIRjtTzdg9MktISkJOl+UcJJHtN/W2ao9Y0nX/40pIRxhmOtnFkqvn2XEk2n +lZBpEdzvOU+Cwp2Y2N/8dNxr1XP6yU8q3s6h4YFMOjo2lf/dv4wL9zuDzxNa +dJz2tPJJ5+WCndWZc526dEy116Vb8nEhRTcgTBvoOFkiWH9zORdEhE+cGbWh +o7EEb5uJABfICJ+gHAc6fn94/tcAZau544E7D9Ax6qkPnhXkQuygpz/bjY4k +3l3OFeLC8irXkx5BdExvKLn0bRUXCtX/OiERRke/7Uc9TwlzwbTI2bcxnI43 +93Y6zVI+n3TQmxZPx+G63tg5ES4suDt49mfTMYunTrJ7NReu9tkdvZRPRxMx +oTqLNVzYarPXw7iE+n5m34X7lAON97hdu03H3JUGLrFruTAhZuXiUE/HAbwa +uUqcCz3etBfHmunYF2iU6E25rmkBzrfR8Z0bV6eVcnIIR760i46j8h/dQtdx +4UznhaTaPjomNkmNPqfson5w6cUAHa92r5CSl+CC5qDw+x9DdJwLGHK4T1nS ++PNu0XE6umQ7Hf9JmSfj0WPaDB1rD5+gb1vPha9j6er6C3Qs5/0SeZZyu6Vv +7o4lOkq6hcVUUX5QaC7qspxA7vS49iTl3EW5c/5CBN6p4Y1W3sAF34r2Qzni +BEZP/SJiKTusKv23QpLAnQc8/O9S3uYezmqSJbD6i69PH2XGk/3cXhqBpy/0 +rOWRpOIppSU7pkxg5B13V0XK035Cl/g2E8gX+8YZKL9t+/BrgzaBr9lzK50o +NzKqvZn6BG6yi3I7RZkMT3mLxtR81mY+Fymn9R7baW9CoMyPX0QG5TCd7bVe +5gT2gn9SIWW3yzLMczsIrCg4yeZS3vF16nrKHgL9tKqC7lHWNm1bddOeQPVE +ifmHlKWzi0JrnAh8ObiLWUmZdzbse7szgZ+n1STuUx6ytj/wyY2ab23g3VuU +X5ZtfjbvReD0uh8CxZSr+fiNRE4QGOh9TjyLcsGhfraiP4FP13Z0xVCOe/hA +Wi+YwMrEWlt/yifXJsVbnSOQnBSOPUR5//GjC4cvEDj7+XLQdsr4Nxw7HUtg +TvpqGoOyirxkb8wlApc/Ohi7gvKa4HHL7BQCYwvNOB+o/Z5/2VJVnkmg5MaM +hGrKA8x81b+zqfVFKaglU26JDr76Jp/Arc13Y1wplw/YCI2WUPF0UCjWopxl +qBbMSxJYpal/YZGK/9HR3v2bHhD4yIcdlUB59593W6CGwFehnLJdlPUKErba +1RF4VS0vRZgyv4Ox5NlWAvHG3bvh1Pkbvb0u9ko7gXZ7Q0d0KXcJjcwVdxJY +fiF29D/qPJc8yul+3k+g4fJnlqaUL28ItPj4kcC3wdziISofAk/tfjj3lcC5 ++xptSZT/IJYyFKYIXIg/HfZCjAufEl0c/AQYqD55P2ITlW++Q0yapjADJ6tK +Rp9S+Thn8WNkZA0DX737lG5PeSVfykUvaQZG8Epk+FP5rBnccM9lMwP7W4dP +XqHyvborKVxOm4F/NY80rKW8Xefgzrd6DHzEeeeQRNUHh7Hpj/uQgajhCpFU +PTnrzhC33svATJuf6hZUveFvmOwX3s9Ah3W+6RVUPUpWeMJuPchAm7g4EynK +RX37TM09GJgXleszwM+FVpu4U6xgBv5mXVHdTdW79duG2zfdYODLE3s6b/4m +Ie965fVvhQx8UN48/GWRqs8/oo7eLGWgW0++gxJl43uyS7Q7DBRcCFZMo+rt +ETVrdem/GbgkzCm1p+px+fo7iYLfGch/6inhOEGCof+5/U1jDNRtvXTLZ5yE +hg4retQ0A63fdaSdHyOhK/FjzdIiA6dcXoZdp/rBL16J77NrlFFmAl7cpfqF +5ViQ5Wc9ZTQ7Y6x99AMJG7XkogWNlfGlgmWx4QDVn/0a6zeZKGPdqmWrV72n ++uPsGmO/HcookOzfWvCWhP7FMvUlZ2W01Upe5HaT4Cf8VlwqThnvVuro6/xL +9VtV7N/Zp4wly8yUBB6Q4H38i/TJAWVM0qtxC71HAnAT96V+VsYNFTWPhu+Q +8EnzzYs3Y8oYE5RU3XSbBPWtfg0ey1UwdFFycV8Z9X/mRaXhm1VQPoGdOn6d +hOEjgqfvnVfBZyP88cvOU+vNNXv0JEoFORMBFUpnSRh7Ey7wLE4FE4cCmNtD +SZi0/nH9Q6oKTr2zUQwJImHOaKhRtFQFA7dylFpOkMC7rm291wsVFPc6FfDZ +mQSpxqRqWUVVzOQ7UsGk7j/m9A28MfWquKQxkqE6xYFvrhalRs2qWG7GXdM5 +zoHE/KDd489U0U77sl/YKAdeyfVcc3ytimtfWU02feOAi9TVLcyvquggPLhg +St3fgkVl3DtE1DDn882F7jYOkPNyLTKOargy7YlIWBEHxP5lXC4fU8OGTxKN +73dxYGPs7T16ekzsPtrVIRDMhqxNBmvEj27G1vf/jXVllEGrtInu1BV1LM4U +2MkqLAXDjfXJGl0a2PvVvLIz+iaI8hX4/xWpibVWNh5hviUgFyFv7MjQwk0P +SzTZ2sUgRBx8YNushdw0R+Wc6UJQZ0ndDjqkjeYnGBXbWwrAr1+swYpnCy4u +FbvMR+TD2FSivWXWFlwmuxhYtTcPLDSarllu1sFOjXVHJV1y4fGU0c+55zr4 +jK8jffPsdfBlavd2uOui+lypcV7zVWCNunU6CulhysWJMNuITPiDLrlLpEAP +pzNetIqGpINKePyZen191FsdmT2Qngpq7gZPiF59FNYXOaZacgXcH3tG3Tu1 +FbVjN61w+JoET/I63SYkDHCd16HrrqGJMF26NKfx0ABh9IKusHMcHCE4Qtd2 +GeL1hG1SLhXRMKGWqndn3BDlaXZdM/xRUFn088NMrBE2d4/9DngaAU5mSmgk +Z4wH328smvE7DzI+MVXqdca44q2Sb3JAKEis9K7YtY+FbUILIW4yZ6Bo+9mQ +cUcWvrEfUdUROQPaZy9vTz3IwlUYE79yKQh2j5e/7vmLhZez+vc/GwyC6K6Z +H0e8WejH2D+VzQ6C+YLzpiERLPzc5el5zigIeo1SX5VwWGjftyuR6RoIngFF +2Za3WPjy1dv853aBMHvrvvtwOQsrHq5UC7IIBDFaz5zWAxaqb7GN72MGwg5B +2Y2P6lj4jBixnZgLgNrOErdXr1no8DjL3DopAKxEKzcH9rDQdpdv5r7IAOix ++GdWso+F/GqCRh4BATBd/T328AALFUcS/DIOBMDmfE3utyEW3s0bOGaqQo3X +axKYOMJC7vMvUmdlqPHW7QWNcRbuv3B31WPRAPCICejwn2Gha3vubdsZf5iu +i762YZ6Fo7q1h0q++kPkQuaR6gUWztXnmPO89Yc1OmXMQ4ssZMSZerq0+0Ou +T/XM0hIL94SU1TXV+8P/+vFjtg== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6911,221 +6664,115 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwN1nk4VVsUAHBRhkJFypDpuucaupkyZLitRR6PBhGKBp4QhUqGDBWSuchc +IXPce27RaKqEhycvKSFK0vBK5jkl7/xxvvP9vvN9e++z115rbUXXE7buvDw8 +PLzLqId6z/b/00hPKNoW1nrsEVtCf1tnrmSwSU8k6FyuHP/JlACUaHeV7EmB +nSYOBm1MAgL3sLv5egpgpjd66hZTF9aObkj50X0Hpr7tKI1n/gHva3efmO6u +hy9GBYOKTHswpw+9m+h+CbfdTq1NVXOHH9366ePdg7BXgi54hB4ADdtvFnUU +TMHrfxzPun6/CBvfV31xZS7CwSxviV3KybDO25ktsJ0Pw3+Zjj6RSocULfOa +3faC+J7fssPM5Bq8ydKsm1gjgoSXUUzey1xIKDrfziu1FlNmY4RcavJhQ9rH +uNQccXz9W/LiqdeFEGNnue3lrAT26Gd+l7hRDKcN8p3/iZTEwPpFsdgDN8Fs +bCHE96M03js2L2PeXArBf6apPR2WxtcGw+dOt5XCrfzNveKz0vgtmf95Tkcp +SNq5GFQJyuAWFR+Nb32lMFz59xyfugwKXHCcdRovhdTIZP+rZ2QwMjfMhi1Z +BoMSDN9GkY14uvC42axHGUQY2/wlvVUWq53mPHUXyuDPw7mT+qay6NNufuDn +7zIQDf9+wX6nLF77Tzv7ER8bshsuliS7yOK32+JC+iJsqLSq/s4fJ4ub8uLj +FuXZML5fKXDqjSy+76r81WPGhsMBM/FtoXL4syAsrSWBDUSm6cahi3Ko5agi +IJnMptabxBVIlsOh+dKGI2lsCPml+sK0SA4F9P+RGs9mQ/qFwxJVbXJ4bMWG +rW+5bGi70nyjWFYe33oZMnnb2WB46+q9c0/kcZwZczVKlANm3c8XR1vkMSHP +3k1GjAO7eZZbOL+UR/Vv5OQtCQ4csfV9A5/lsf7wkmPbRg6YhyqeD1+hgO4T +WXsH1DhwUn620GSTAtaL9sx5m3Og8eiNkYZABZwS0LeWCuWA5S8DsbBQBdz3 +NO76n+c48Dy5U08nXAF5dw+S/hEceFMlFF4Up4Atar/lGmI4MLrKX+xitgJO ++/tvN0jjgGT5n/rm9QpYG/GzMJ7kgPf8RHiLiCK6ySdm1fdywPCUx/ovYor4 +vdnatekdBwSHejl8kopoTlvt3jTAgeK+hq5tNEVkmDmsr/nCgf7H6cz7eooY +NSykHjTJAeuLBj35zop4xaHHzVCIBG2xCI3QCkUc2p9WMbqFBJ6EmcasB4q4 +43nJ2hA9Ep7zHXN6UKOID+XH7iwzIOH4jO3Fib8VsfXZ4eoV20go6qH3He1V +RDYt/fOABQnrb7RE2/HR8OTt9tmPTiT82LSmf7M9DUtTvILlz5EwmyMdscWJ +hgfa1GZVw0mYXk3QDZxpqNM98EEzkoTRKYNjZl40pHs8ENCJJmGw5sis01ka +Cjj8ylx9mYTWHQ9FY4tpeLxymL4xh4TmR08rLrFpuNRUWzeSS0KjRptd6m0a +HiaXOmrySHgs/uFabhUNvVdkOOwqIuFO30rl+//S0EZcZ/oPDgnXjh+GwRka +Tn2a/HSpkoTMd56D/y3Q0ERgXFi5moQ069MXR5ZoGL8luaK2hoTLW2KfzQsp +IZeT4/fuMQmRPyv2rZZTQk0x6w/TjdT+JKw4aWyuhKWBNv2hL0jwXFwtbrpD +CYVnsle+6yDB44T0A4s9SpiZ5VVj+IoEl70av2ydlHCFVjr5/TUJdjKOsV6+ +Snizub5PqY8EYw6Zl5GhhK7PBT6NfCKhT4Fz44/rSth837SQ7wsJIRlludM3 +lFAq/6zr+v9IeBhRkm1bpoQREXWD2t+o+O7PyxKtVcLGS5pzFiMkqK5IS47+ +oIRjtTzdg9MktISkJOl+UcJJHtN/W2ao9Y0nX/40pIRxhmOtnFkqvn2XEk2n +lZBpEdzvOU+Cwp2Y2N/8dNxr1XP6yU8q3s6h4YFMOjo2lf/dv4wL9zuDzxNa +dJz2tPJJ5+WCndWZc526dEy116Vb8nEhRTcgTBvoOFkiWH9zORdEhE+cGbWh +o7EEb5uJABfICJ+gHAc6fn94/tcAZau544E7D9Ax6qkPnhXkQuygpz/bjY4k +3l3OFeLC8irXkx5BdExvKLn0bRUXCtX/OiERRke/7Uc9TwlzwbTI2bcxnI43 +93Y6zVI+n3TQmxZPx+G63tg5ES4suDt49mfTMYunTrJ7NReu9tkdvZRPRxMx +oTqLNVzYarPXw7iE+n5m34X7lAON97hdu03H3JUGLrFruTAhZuXiUE/HAbwa +uUqcCz3etBfHmunYF2iU6E25rmkBzrfR8Z0bV6eVcnIIR760i46j8h/dQtdx +4UznhaTaPjomNkmNPqfson5w6cUAHa92r5CSl+CC5qDw+x9DdJwLGHK4T1nS ++PNu0XE6umQ7Hf9JmSfj0WPaDB1rD5+gb1vPha9j6er6C3Qs5/0SeZZyu6Vv +7o4lOkq6hcVUUX5QaC7qspxA7vS49iTl3EW5c/5CBN6p4Y1W3sAF34r2Qzni +BEZP/SJiKTusKv23QpLAnQc8/O9S3uYezmqSJbD6i69PH2XGk/3cXhqBpy/0 +rOWRpOIppSU7pkxg5B13V0XK035Cl/g2E8gX+8YZKL9t+/BrgzaBr9lzK50o +NzKqvZn6BG6yi3I7RZkMT3mLxtR81mY+Fymn9R7baW9CoMyPX0QG5TCd7bVe +5gT2gn9SIWW3yzLMczsIrCg4yeZS3vF16nrKHgL9tKqC7lHWNm1bddOeQPVE +ifmHlKWzi0JrnAh8ObiLWUmZdzbse7szgZ+n1STuUx6ytj/wyY2ab23g3VuU +X5ZtfjbvReD0uh8CxZSr+fiNRE4QGOh9TjyLcsGhfraiP4FP13Z0xVCOe/hA +Wi+YwMrEWlt/yifXJsVbnSOQnBSOPUR5//GjC4cvEDj7+XLQdsr4Nxw7HUtg +TvpqGoOyirxkb8wlApc/Ohi7gvKa4HHL7BQCYwvNOB+o/Z5/2VJVnkmg5MaM +hGrKA8x81b+zqfVFKaglU26JDr76Jp/Arc13Y1wplw/YCI2WUPF0UCjWopxl +qBbMSxJYpal/YZGK/9HR3v2bHhD4yIcdlUB59593W6CGwFehnLJdlPUKErba +1RF4VS0vRZgyv4Ox5NlWAvHG3bvh1Pkbvb0u9ko7gXZ7Q0d0KXcJjcwVdxJY +fiF29D/qPJc8yul+3k+g4fJnlqaUL28ItPj4kcC3wdziISofAk/tfjj3lcC5 ++xptSZT/IJYyFKYIXIg/HfZCjAufEl0c/AQYqD55P2ITlW++Q0yapjADJ6tK +Rp9S+Thn8WNkZA0DX737lG5PeSVfykUvaQZG8Epk+FP5rBnccM9lMwP7W4dP +XqHyvborKVxOm4F/NY80rKW8Xefgzrd6DHzEeeeQRNUHh7Hpj/uQgajhCpFU +PTnrzhC33svATJuf6hZUveFvmOwX3s9Ah3W+6RVUPUpWeMJuPchAm7g4EynK +RX37TM09GJgXleszwM+FVpu4U6xgBv5mXVHdTdW79duG2zfdYODLE3s6b/4m +Ie965fVvhQx8UN48/GWRqs8/oo7eLGWgW0++gxJl43uyS7Q7DBRcCFZMo+rt +ETVrdem/GbgkzCm1p+px+fo7iYLfGch/6inhOEGCof+5/U1jDNRtvXTLZ5yE +hg4retQ0A63fdaSdHyOhK/FjzdIiA6dcXoZdp/rBL16J77NrlFFmAl7cpfqF +5ViQ5Wc9ZTQ7Y6x99AMJG7XkogWNlfGlgmWx4QDVn/0a6zeZKGPdqmWrV72n ++uPsGmO/HcookOzfWvCWhP7FMvUlZ2W01Upe5HaT4Cf8VlwqThnvVuro6/xL +9VtV7N/Zp4wly8yUBB6Q4H38i/TJAWVM0qtxC71HAnAT96V+VsYNFTWPhu+Q +8EnzzYs3Y8oYE5RU3XSbBPWtfg0ey1UwdFFycV8Z9X/mRaXhm1VQPoGdOn6d +hOEjgqfvnVfBZyP88cvOU+vNNXv0JEoFORMBFUpnSRh7Ey7wLE4FE4cCmNtD +SZi0/nH9Q6oKTr2zUQwJImHOaKhRtFQFA7dylFpOkMC7rm291wsVFPc6FfDZ +mQSpxqRqWUVVzOQ7UsGk7j/m9A28MfWquKQxkqE6xYFvrhalRs2qWG7GXdM5 +zoHE/KDd489U0U77sl/YKAdeyfVcc3ytimtfWU02feOAi9TVLcyvquggPLhg +St3fgkVl3DtE1DDn882F7jYOkPNyLTKOargy7YlIWBEHxP5lXC4fU8OGTxKN +73dxYGPs7T16ekzsPtrVIRDMhqxNBmvEj27G1vf/jXVllEGrtInu1BV1LM4U +2MkqLAXDjfXJGl0a2PvVvLIz+iaI8hX4/xWpibVWNh5hviUgFyFv7MjQwk0P +SzTZ2sUgRBx8YNushdw0R+Wc6UJQZ0ndDjqkjeYnGBXbWwrAr1+swYpnCy4u +FbvMR+TD2FSivWXWFlwmuxhYtTcPLDSarllu1sFOjXVHJV1y4fGU0c+55zr4 +jK8jffPsdfBlavd2uOui+lypcV7zVWCNunU6CulhysWJMNuITPiDLrlLpEAP +pzNetIqGpINKePyZen191FsdmT2Qngpq7gZPiF59FNYXOaZacgXcH3tG3Tu1 +FbVjN61w+JoET/I63SYkDHCd16HrrqGJMF26NKfx0ABh9IKusHMcHCE4Qtd2 +GeL1hG1SLhXRMKGWqndn3BDlaXZdM/xRUFn088NMrBE2d4/9DngaAU5mSmgk +Z4wH328smvE7DzI+MVXqdca44q2Sb3JAKEis9K7YtY+FbUILIW4yZ6Bo+9mQ +cUcWvrEfUdUROQPaZy9vTz3IwlUYE79yKQh2j5e/7vmLhZez+vc/GwyC6K6Z +H0e8WejH2D+VzQ6C+YLzpiERLPzc5el5zigIeo1SX5VwWGjftyuR6RoIngFF +2Za3WPjy1dv853aBMHvrvvtwOQsrHq5UC7IIBDFaz5zWAxaqb7GN72MGwg5B +2Y2P6lj4jBixnZgLgNrOErdXr1no8DjL3DopAKxEKzcH9rDQdpdv5r7IAOix ++GdWso+F/GqCRh4BATBd/T328AALFUcS/DIOBMDmfE3utyEW3s0bOGaqQo3X +axKYOMJC7vMvUmdlqPHW7QWNcRbuv3B31WPRAPCICejwn2Gha3vubdsZf5iu +i762YZ6Fo7q1h0q++kPkQuaR6gUWztXnmPO89Yc1OmXMQ4ssZMSZerq0+0Ou +T/XM0hIL94SU1TXV+8P/+vFjtg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.056829219253761956`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7137,19 +6784,19 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.056829219253761956`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7163,220 +6810,114 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVlnk8lN8Xxy2FKFlmxi5blH0dZsY894hkiaQICSlSIrssZZciSYsl2b5S -UUj2MYgoJUsoIbuiZMmSJfrN75/neb1f97nPOedzlnslnS9ZurAwMTFpMR7/ -f68Mtb6Wic/DWPAdogrcNlhPpmCQXl8kEgjo2DHLQ0SA73AW7EtGI4uYViWP -IQqwKPjM2peLbjQHGUbzWCPeWYHktc+lSPpaVd1OHlc0XGt+aelzIyqiD32w -4Q5AhjI/vi58/ojYYMAxiz0WrX3Wvjf/eQwZX7NK65u5h5r0H+d15S6iqTaF -SBmHfCQ6XP3NWXET9Y/NhobxlSCmRe/U1qObqHatYfddmRI0wSZvohq4iXxC -tGyziCXouXL6881Xm+hEWMaPNLsShF0N9ks9sYWGwgNZxXNLkKMYhaU98h8S -r2rgslN5gbqUhhIzZpjg5HS++ZkDpQh30bGAXZ8VhsYc2qaMypA8+38tFidY -IXX35K8K2zIEud/G0txZgdPTuSrwQhm62OchoniXFRz3s+/tii9Drw1CEywm -WUHqfdz5sQ9lyE8szTPt2jbg0RXSDDxSjrrbP6ortG0H9oGEMDWjCjR1nnDE -b2Q7PJocazY4UYG2ttm505e2g7bG3Upj1wokTxn974gYG4ywGEbsi65AkY/n -cH6ebKD+amZWp74CqYfv/FPLww4+Wp0eWeqVKFnNkGZuxQHNjRKrJ7irkMqA -7SGqGweYcSSXlgpXobZoj26FEA7I3ylrwiRXhdj67v7kyOEANacLTH6oCoVc -HRdpmuGApvYpIfqlKnT2fXiodvQO6C/vLfz4oQoRXWhUiZecYLVDBrcYVo26 -uTtauVs4ofdRmGfujWrkVTVmtdnHCTzf9MkG96pRARenZ/8WJ7yzKhRxLKhG -e0ptMu+acMHXu7wNC93ViOPf8hbHGBc4S23FxsnUoC+pqg0LPLvAP0tKx5NW -g9K7C3cH7N0FjcXRlnLNNciOW85xnbQLXtGnSJ3tNWgwSmyL5cwu+KTBe2Fh -tAaNeHLq4sp3we3aYQVvdhqaMpioJNpyQ4TUsLHLERp6GubITvPgBlX5vc+E -bWjoQk2/NYrkBoFGQlu9Ew3NqHQtHyrkBofXx/S/eNPQvHCdhu0mN6SFcLIb -36Gh1fmU4pCc3eCJcnpFummoWoH/37/y3aBGPcv8oZ+Ggl0TzaPf7YaYNtOf -HmM09Hcg+lfC4m749/PNxtUFGgofr8J3SPEAm2ii1BB3LYpuf3RsxI8H3opf -sLxtWIvi88I6WIR44Xx4dnHP01pkonmeDy/NCwd+K0a7FNcijteWVnJKvOC8 -fr7/Wxlj//jeAVM9XoAPCnhafS0KlWr7dvc8L8Rs02Ev6KlFntmCW7I1vKA1 -4C2Tt1GLFFVZ9EiveeHUr3V9jImOftT/jDJt54Ufa3w8rdvo6Nxw3Q6vMV5Q -bfOpKdlFR07iLvhqTj5IDbMufStOR0czXiianuSDWtcGBXGMjngUH1w65cIH -czd35r/Wo6N2WnTppUt8MEiv3mZ/kI5MBk7o3I3igzDR8aunDtPRAeEt/a+F -fDBf3fup0JaOmAq+x86V80GMnPbEF3s6qiN1tTI38EH9n1srq450RLHNOyLb -wwd2NFsKpysdaaaanLz0lw906kwagrzp6LecZmYEGz9M+e/2UvWjo5JKsdE7 -PPxwZMzFqC+AjpQ+z7tWyfDDObp/zEYIHckSUnyYzfhh8MaliqQYOpp4FF7O -f4IfTofSVbqu0VGu1oXVvaf54Waj7CrLDToSt6JeNfHnB/WECzfIiXQkcHf8 -+p2H/DBez2Wwfo+OBBXKo1fz+UFI5tuJxyl0JNwYG3aqhB/MYoTeHEpj7J/f -7y/XxA+y3VtvnTPoSOLaxqWENn6odQg7+/UhHUmJf7iw0MsPpviVi6ZZdLT3 -sJcTbYof2Kh1n5hzGf6O652U+M0PtCMSeib/0dG+YH7rmA1+ONOQJh+bR0eK -TypMj3DjgDnV7GZfPh0pozjDMgEcDGR/2T33mI5UP9nqCUniQJwiIbP2hI40 -tm0SxzVwYJneh5sqYOj5oF3NiIoD3N+B9bZCOiKqZys+N8SBiyA95tEzOtJp -9Zbjs8CBYLBNjfdzOiI76UsF2uJgMSL5oVoRHen+wYkNOuMg1OGE5iSDscRv -AnoXceDK+iAqoZiOYG8VX74/DuwlbZPkSuhIr/b6Lq4wHASJ3XOsYPCBYyc5 -vOJwMMlht6Lzgo4Mfiiy9t7GwanUGttiBhtGbG2SHuCgTqQrUaiUjowEO1cz -83Dg4V+fHshgk+KcRdYiHLDwFUe2Mviwoe+sWyUOQoY7TXe/pCPzrwbTHxpw -sGRwasOIwUf8CBPq73DQKXT3fgCDLbimhlK6cXDoYa1UKoMtc6u//B3EAd1j -76PnDD5Oiu85/Q0HfOEy0pUMtu6072iZw8EuAYHcMgbbnFN+p7CGg/s1p+Xy -GWy39e91Egse+FW8quIZbH+vq36ZCw/5F8vtXBh8SvG/Gjs8HvzvF/JrMNih -ya+8XhwPUwvdU0sM/53sDEtk9uGh/2vFcAGDnRcECq+r4WGgdXzzOIPPxk0/ -miXjwVZpwWiRoY/rHlr2MQM8vL4a2hLDYLeKhAdVZniok5cP3cngC2YO98VO -4MEo/tGlawy93SdUbkc6Mb4fys5fYeTnYghzwvfzeFBAvbJ2DPbk64497IsH -vjSWlReMfPpAQCghFg8m3edTMUb+/T4fCgy5hYcI24OBvoz6CPAU8hlJxQMT -/6naDEb9BGXUnisoxEPquw9JbU/pKFgj0Xl3OR6YH24qdDPqL/Sd4ym/OjxY -kgQOtjPqM3yV5RjWhQcDk02O3Ed0dO24MfZxBQ8dN1+GN2Qz+qmsXZiFmQC5 -O55eMmf0RxH/8T9qXASwiCHzdDD659NHh5LbewhgxN8c8ySdjmSO+kkdNSLA -OYlTkvQ7dFRVsrYVbkkAt5z+kNHbjPrgCRsosSdAv/fKm9VbdOTbcf0ujzcB -POIeWzEl0FGjWRZbZxoB3vlzKPlFMfL9XGb8338E2NZ5Yl01gjEvdxbUqxQR -4OgZy42Rq3TE21Z2+VYjAViaJ6qFgxn5M3n3w/wnAZjFLxBWLtHRpuFy+wdd -ASiIetV2jDHvkvKDCzcNBYBn82rPIWuGv2xMcUpHBUDY40WayjGGf82cejdd -BOBe7khYP2NeputLvDycKAD7aV1lmYjRj2Ca8n5YAMIz2nOmpOioLavTd2Na -AHTdxMpF9zDs/7OyUFgSgMHnUYSDIgw965x2xHMIwoha2pQPP0Mv3YAQEzVB -SNDXa9dnZcRPynFsjRSEfI7vPY0jjPMmm3vJNEEQroSzU28O1iIp9tC49nuC -EPXo3opZXy3q7LF+0f1EEIoC1a+UdtQiZa+drEPtgoCmm19y1NWiqfzA/N/C -QvC6jO35fGotsseZ/xJ5KQRwZEfVt0O1SCOEFpFZKwSpoerFNw7UIs6xfQTJ -FiHgd92+updai6qLWZHsFyFItr+cdUC9FhFMq5NU/wnBT5sOBbwow36EjOZB -U2HIM2Xyk52lIYO59WDPcWEok7zFrJlAQ0FGd+VfzQiDYSL4/Y6hoaIcpX7+ -FWGQLtS/9TSMhgSPO5GqOURgQR43xOzLOO+rmv+wKouAzL4V+klbGroTmeSX -dlkEzvYQomgyNDSGl/V8vUsU3v6x0zxTUYMidI+eFtYRA+ef22zxb6qRkUPm -b+0DYpAol7sjua4acYf/jLI6LAYnFGd9OCqqUUZTTH6SkxhodIeljuVVoyqT -mp9s18XgYnGLmVlkNZq3kQ5Y/CIGz1PSzbfrViMH/+UbbSHiwLes0GJYWIXI -RWllV+v3wA2Fziq9kEp0cXUh/O0uSVjzfgj54uVoTYFnSMlKCq5vFztz0r8U -6RY+y75/Xxrey2oVTFQXowU+EyfrRhnAi95zLCAUookEJ2sfdlkY27M15+2e -j4znAo0niXKwp+RM4/3QXDRzhsO3LGwfhFiULPCHPGTc1wVYrjXuB9nyOu0b -6ilo2vnQE8qb/ZBa9n47XiwFJeQEms+/3w/lH09hRewpqFu8L922dz+8P8s3 -zvX1PnISStNQnNoPru2Leb5x91EQt4hL1y55GDbI0fs9eg89WxV/K2IrDzTC -rY07WXcR3wfZxJI5eZjwod9INkhGW3Oqj94tyYODF3VWUC0Z/eCj1E6syQNn -uL14sVgyarQ58kNwmwIMXvFs4/xzG/lOBBpGCCrA/BhLxdWC26hn4+3WUT0F -cDh91uYY7jZKkXe/tJisAByXH0eyfb+FROOKLYhERTCrq1LhpMejgqLnTWtk -RbhywrmmMCse6fQWEhmnLNxXkhh2iYxHx6WeiBoYK0JO26sWaaN4lFCbPXXU -XhHcRVprX/fcQBvzt8M9IhWBLYs5L+n3ddRv61eS164InJ8PnFlHcShVgcTD -f04JJkRpAzZ7YpCV6YekOnclyLbcN6zFEYP43E/zXvBSgmdP6mLkFqJRfMF1 -vldBSqDK9iveqCkaXd3fj7uUoATP99L3hbtFo7NyIULvXyjBRqfzNlpFFFKT -pktF/VWCsjAzaU7nSDR74Oh/yszKsOFBYz5rFokKnCel+7crQ6sK2urUiUQy -ubv2qu1WhvcmgxITuyORoKSD3LCkMsj97Kr8VReBtsT/KVAOKcPokcrrURIR -6J2wntbibWVw2umZ1zoWhjrFi2W3pSjDh8kV0npNGPokJSaIz1AGr1pu3eN3 -wtCo/No6MV8Zblxk5oo2CEOr5BcNwTWM/y1mXe54chXJnpQ8zDKuDO1Z3q3r -l6+gyAfMZ3g1VcDndLxyOzEExWVdOi5FUoEah0wioyBR4n9fD2pgKiC0S2WY -tBCM0gqr91kZqYCvsGg65VkwKqF5z6baqwB+RdV3UzoYDQ2MBknEqMDcumuR -k3AQIos2Jql8UgGVA9tZPksGojFpmaHpfhWYvq1kFbI9EF1XiFXIG1aB854Z -FOp0AOojm7QITqtACLn/rNCLABRo+3GD+a8K9Dr4ZageCEB2pt4aP3hUYVDO -wKblvD+6H8cYb0RV8JpziJn94IsuJKg3C5FUYbj5UYZguS/CksZ/BlBUQfTz -hPupDF80mXKQpAaqkP6H+oXo7os0H+/oeWSsCteceSJlOX3Rx+bbO27Zq4L/ -y7OvJg/7IG7WXL/TkaqwXIzPM530Qmxr9ccWolUhVyE06+MHL7Q1+1U94poq -XBmPafOv8EJz/UIL2Qmq4CAea8ET54U6S297jNxXhZM7gwl3FL1QsnOEq2Oh -KmTeklv1WvZEhEYnm1M9qpBcZpuQZnURcVdd1f71SRWIz8g+5koXEVtRBuHK -F0Y843P6Wtsvoj9pfT0ZQ6qQc6BzPKXcHfV5WxwdnFKFp90rBYWC7ihdEkxO -bqpC58HPbmPfzyPxiD26trJqkKrOnUJ5eg4V+XJIfd2nBvPXPI95XTuHMNcF -9tMKaiC98NKtw+UcOmXa1O2mqgZNq67zXNLnUAb+nPtlshrcea1cG5TlioQK -itJTzNVg4ZfIBEu2C8J1U9d6A9Tg3oP2kPy6MyivWXbYNkgNIv1U/XtyziCN -qt3NX0PUIPzXrTtyMWeQ5cPRpMlwNThKj8vWPXwG3T4Xs2/5hhoMrmYVMC62 -iPtv2wlclhrszKbYpbE4ox177Sss36hB+udYjovnndAFIWRS2Mrwp57TOtXS -Cb3bJTXE2qYGFjXETyMUJ5Sw8n17eacacPHfX2vmdkLcb32tBPrVgCRgQ6W5 -OzL6PX5pYEYNxOvXAy35HJDoixp1Fz51kKz9ju+PPYlCHz1soePUwaRkx+Eu -x5Poa1q4HUFAHfSNH/5c0zmJMiMNI9+IqEP/4Z/JQz/tkMTxj13796qDwUv1 -urljdmjvn2mvWW11SMpGi6xKtkiZKlQceEod9kfs+3KL+QR6KX1+g8VJHXbM -EpqivlojHc7qQ4nO6oz7aqF1QbU1OvDZZiTvnDqMzv+OTfSxRtbeqbwfvdVh -7nesx7NvVijskYCfYqw6tPVyCHD2HUeduwik0SJ1sM8YOVnx1RJZLbnEXHyh -Du+CG0Nv1lui/v7yrj8v1cHpmSNfUo4lmnhsdYG7Wh1+HTnXRHC1RKt69x5Q -mtTB423UKZmFo0gyALd177M63OIJ28u3+yjyGeJrMmHSAN3IrqTsLnP0tsWe -XsCiAQtiGUcrc82ReHF+Jed2DVDRel7J7WeO3oWRn73boQGjYmrUqwLmSErS -+Z4JvwZMh217deK0Geo68+KciawGSIf3kUqZDiPV6SM7TQ5rQJwVlwvTRWMU -25XGVmCuAQ9bXo2kGxijwepxJs6jGvDf+tcvF8WMUdyNwOVWKw3oZ9tQq+gw -QiMKWUPGjhrgTOrh+Ew0QkmesyXGPhpwubKkgLD7EJpbTLAyTtWAd20Rri2T -BmiwL8f6YboGPEjQ9gxoNkDv6BUnFjI0QCzSd8fxRwYo79qIbVqOBgj0ugmk -uBggOxFNh+kCDYieiXUjTumj5gMDrtfpjHjGhG2eLh9AD27vv9w6pgEUot3k -dxU9FBeABYlNakCF8ffMEZweCjh5LNj7uwaYmakC0zogi71XQoVmNGBH/rrP -y9eA2Ko7w88va4DFAlVz4iQg75HA6zs4NMGB473ldSmEDqm0pBsraQJX5lk9 -LyVdZMNmdLxTRROeHVmUSvpLQRe+tu46oa4JO+MoQ5vvKSgx/kP4WW1N8H+4 -IfvKnYI+fe9xDdPTBK0HScwDRWR0NntcvdxKE0653r+1eYCEInmZ30tc1YT1 -rj06stlEdHcqMvpxuCZwEn3OaF4movz6bZhylCbM/nf0WpQFEb3z4HhBidOE -AltZ6jgzEfG+251inawJTo/UhDPPaaHsSPEzCfmaEH7v4XgJponqFikbf9o1 -QYeX6/qgoDrKaat0PtalCR1uqdTYdTUU/UjjXVG3Jjie2b7gMKiGjE8opLn0 -aULZUIlZRrYa6qkR1u4e1QQNqmADUlBDPyLWfIqWNGHlmk/agpEqIvBU/jgr -rAX+6kENuUZKaG1K3bJBVAtiJ1YbGglKaPBVUbXIHi1QdfIPVJtURDm++XEf -pbXg8EdOg7VIRaT4+Z4sKGlBZ97KftlGBXQg089ZBLRgD/2P8z1zeeSpqN7f -5aIFf8efSX/PkEP+f4TXHd204Bvx3ECOlxwKbWQVnr2gBT6+p4ufGsiheJte -W04vLTA9p9mU+UsWPYm+/OVAsBbcyPc5zasvi8YG6/peJmrBb+tLfSUbMsj6 -punne5VasMw7o0LPlkKnbDT/SNdoQUqbRD/5ihQ6Ky0mUFqrBfVKprf/2Eoh -3+pZ6/ZXjHhO2txUxEmhpMnbn9jatOBsivOzoHhJ9I7a1xs4ogU7b46OGsdI -IOrs2R7bHUSwsDxdd8xQDBFoh3JruYiwc5Y3yJZXDM1ek/faw00EUXvL6qpB -UZQpOc81yUeEOtz1rAg/UbR1PETfS5QIIfjZf0pPRFA97XZprAoR2HvzXUL2 -CCO963VJL62IEMlkTThtIoCErXMcCDZESFJ+fil1jwD6LRWtGGRHhCh5Syuh -ZQLKrTV+izkSgaIlu7ScTUAs8z3/Wt2IIN/l/2PXXzxqsv7pORJChJ/Z26St -63HooIyg2a5cIhC9pC4cC+RDZb+aJc/mEWFL8sFwshUfkqn0XanJJwJzhq3K -Tk0+tM2kI8utkBGPUNxcwQIvarwU+7upjAjOEXY7b13iRRhtKSX4DRF+t7Ar -5PnzIKJl19j3GSLUiPpYOhzdhfJFwiqxOYZ/a3IfWEV2IfykYsK9BSJQj95Z -YZ/ciZYC47T0VxhM+Px7f/BOVPoQxWX+I4JUyRz36ydcSGX6uZIVnzZsY953 -t4PAifaF37jcqK0NURNRLi7q7KiW8mj7YbI2+Fg4NwmzsiOLP/XJvbraILb3 -wYR8Dxu67Ln8bEpPG06KeP2wCWRDb+2dRrkPa8PCT3Ji/6vtyI1ENDnppA0a -+b2ffrpuQ3+XLD5POGvDTPjfKlbqNpRU4n7W00UbnGMWKi/yb0NVcjlXIy4w -7Gv891rlFSviIOx8+dhPGwLEWW0uSLCip79HRZbitCFzp74T8Rczwor+PrkS -rw37m1OTxd4yo4/nBYjsiYx43lKVzP5jRusjhy2E72hDoqTDzSg7ZmTSURkN -D7UhcNvOFqyNCf0ovPkr4YU2cE72hjMF/cPkXUj1e/u1YYspabw5bQO7JWW+ -HjWoDQf/46h/emYDWxp21hob0oYQ2YpPC0obWJ1dQmHmuDbkv3y+/VnTOmZp -MZwi8EsbOLx3F5YvrmFBlBivHUw6YJWU1Rnvsoq95e2S/LVXB65P4oe+xS9j -Sh2T9qb7dKCpr0mCcHoZS05YT3kqrwPc2XLT94jLmD27DLerig7EPL7bEz22 -hM39DVgf0tGBM28a3vFgSxhhSrS701QH3EgxtedZFzGXOrfoMm/Guo9jWFLT -PDbr8SPwoJ8O3FnNMdjKnMcui110/xSgA9KvZwoqg+exG6GXLFdDdOCf80ke -Lo15rIQcIKEbqwMtgy4jRuZz2N+KqNqmdB3YRdGvOEz6hcW6bi85/pBhzzRE -TmBtBttNuPbfZJYObJtI9zpXPYNJ+d+4wf5IB64yZfveo8xghzRu25gW68Cz -8CesXIY/seTizKWPTTowcdTPN9xnGhN1lJg606ID7C/2B6qRp7FH3LkDS291 -wJ5P6a0NyzRW5fGokdCuA4f8PZ6x3Z3Cvio8S7Lr0wFW04PHWmq/Y/ueVCuO -zehAyt2BPbzS37D67J6zC3gSyM4VibBTx7GRw5KOAYIkEBUZN8vjG8eY1jxs -N4RJkHbY3Sx9agw7cJTdfLsECbYui6zevDeGtTCTtYXkSTDHdkckYnEUa3PO -2qGHkcDVOeQha/0I9ot7hrUFSMAvrrdnKG0E46bpbJnokyBhOImT3X8Es+D/ -+Pu4EQn808WK9BRHsO6mbYNuliQ4JWJalqw7jPXLXChKciUB1z7PAUziK7bR -WfEEf54EHbwngzSGBzHRK6z/pbuTIHgwwb00cxA71ZuRkudFgvkR9T8mewax -kZiO8KpgEpSnbDS/lR3Avn/TPDaSSIIJP6G73OZfsKUn//6oVJIAb/JMe3Sl -F/tmbZh9vZoE6qsPv11924v1bbtpNE4jQVVG2mZQei9GcxJOu99AAiGLyYwY -1ItFCmqRN1tJ8PXj8YDhmz0YT9yF0HeDJBhQ1tTmoHRjLMQXMjLDJLAs9chU -4OvGlsb/tF0ZJcG2DfxQzvRH7DOKEVP7RoK11Mvu0Wkfscw/WXUpcwz7ZfKZ -PJtdmOK5XiYXFjKIqNN/13/sxMTxok/rtpFhrHL85duiToynyfmoIDsZJl8d -HxKO78QWxedz3nOR4WLpb+00g06s5hOnvjqeDF26Tm5f/TswI0OI+SdHhunY -RS+u8x+wM3sLd6SbkaGxhU2+urgVC252uCBrQQbJCfekIN9WLMmF732pJRma -X7bufKXditU+Ckp4f4IMVRSP9yOv3mI4WaPdm6fJIDdlFmQw+AZrkZ3EOQWQ -IWuy4tqzfS3YYEuq/8xlMgxr7bewX2rGfrse/nQ5hAx1blfIkQ3N2J7HL1Nu -h5PhXPBouKJdM3ZZLlK46QYZ3hu6pQ4nv8bk9+2RkM0iA87PznNGsAmDtx/D -S3PIoDR7tTX+ZyNm7RY7iuUx7CWPWSfXNWJRT37lnnhKhp+cQTe7XBqxwX21 -e6+/JIN03D4vpupXWOJ+W4WZN2RYT+mYcPFuwBbk7xBL58kgHvny4lPjWqyv -DQ7yLzL+99o7A89ZizV4zh7zW2asL9lVcr6nYYmlxt7EdTL40cPN4s1pmDyZ -6VkNKwWqT+5ofXOyBnM29pBsIlBgTjpCTT+xCjP+KawqI0QBQhDhb511FaZ6 -8y0WI0IBp/qLIi/3VGFbndL2hyQo0DW3Fsj0shJ7YNN///1+ChQ128zhhiuw -nnOHdvboUoBFWULA6nA5RtuxLKyFKHBCTrRyUqQcyy3M3X9fjwLhWyNbwz/L -MK+5TUMbQwp8uQOC3DfLsF2BZRGDRyjw5NCLLp2el5hhrOSfCWcKvIioovH4 -l2JVeRujy3EUcO96ala/UowR9f3+mMRTwLH7cOSjomKsfHRmZ/ZNCnCfJo3I -nSvGSsWHtE2SKVAnGsz990sR9iy14WbmAwrgH86F1Lc8x7ITYkiHihh62LuW -59EKMXGFLfOMEgoYKEk400ILsYetAWcXSilwLCZK7iRWiKWzud16UEmB86op -cWpNBdjdcJPJuQYKCEdkLQl3P8Wu++2+ndpNgdf2GX8XOJ9gHPxx+b96KfDy -la2gUM9jLPYFU+2BPgosd7T7VT18jEXPLnybGaRAjmwks736Y+yqW4+u3jcK -eAv7Woqczsd87NOmplcpULmkbfmkOw+zM5AGirgukGXeyrxhy8U2ezi4myR0 -ocL3+PLzLzlYtsvsgIm0LhzhTbZgfp6DfYutDrTbpwvj9zcapo/nYD6tR4qD -1HWBdNG1PP9pNnbDPFS8ylAXyuwICixtmZjS8OkZZKwL976md4ZdzcQ6Lx2q -eWOqCy962HSq1TIxwm0+688WurBbtCbCJv0hltv95OaKnS40Vx47KOyXgdXY -9P7VvKQLxvlHM8EoHTs1XfOu1lsXjE6MKlVsT8eYgrNTDfx0IStf8c+HpjTM -8IG75vEgXfgrzWQ+pJeGffzKfNE3ShfsymbP2h5MxX44Kw+8SNEF1VU+j6tu -9zERj2vVyg26MMH31PMw4Q6W+M9VK75RF+axvkNPppIxlmTDF99f68JaVeJR -D1oy9qNi+9PsVl0we89ireKcjNUwRafydetC1Mx/+4PLbmN2d8MDVyZ1gecK -06Hz7klYu6zTouWULhj07dOa00/CDlSjS8U/dOE2T/vjTtEkTH5oy9VtThde -JXENHMy6ha3JXbHuX9UFH6sC8pBPIpZKC9Kq46KCersi6xopAdtpbvtCmJsK -7fWkF/TleCx8REcpkIcKetT0IMnSeMxt+6qMKp4KzNj3dw2K8Zj2kQBcrjgV -dj2SUtXZfwP7NOazGKNGhRxaYOgoNQ7Dc158YXaCCvfNhj+d/xCN5elfCZ63 -pYIT1+PzZXejMfUrifp37KnwlDtL9659NGY+X9Lbd5oKWeVj9btmo7DYT8tr -Zy5S4b2R/vt6gShsNTfsQHAEFZh+P6n5Hh2BxQ4mcYlFU+EyeaV/8HgEhiPk -9tTHUqFW7Ajl6N4ITPX6a9ftCVSI3q5aVPomHDt/aUd80n0qzLIH5WvxhWP9 -lDvd+YVUeLMZN+4YfAVz88/LMC6iQuXQ/UO791/BVorKXWZKqBAqfO5CSl8o -xifV90etggptahp6+8mhmCmHmCi9gaEXZe25AHsIVtuTf7a7lwpNS20ax1su -YybcVUoBfVSY97FWuh9xmZH11hXBASqk289eT6JexpZqfsY5jFAh1TznX35l -IKaUo/p8+gcVVpHQhFxZAFbbrxeQ8IsKho8NB9f8AjAT3DGkMk8F6tusbn9i -AOZ6zb/Lb5kKjYGpo2dp/thSQ2y6wCoV9sq8utNz1R+LXE85U7NOBVoaf+j3 -A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== +1:eJwN1nk4VVsUAHBRhkJFypDpuucaupkyZLitRR6PBhGKBp4QhUqGDBWSuchc +IXPce27RaKqEhycvKSFK0vBK5jkl7/xxvvP9vvN9e++z115rbUXXE7buvDw8 +PLzLqId6z/b/00hPKNoW1nrsEVtCf1tnrmSwSU8k6FyuHP/JlACUaHeV7EmB +nSYOBm1MAgL3sLv5egpgpjd66hZTF9aObkj50X0Hpr7tKI1n/gHva3efmO6u +hy9GBYOKTHswpw+9m+h+CbfdTq1NVXOHH9366ePdg7BXgi54hB4ADdtvFnUU +TMHrfxzPun6/CBvfV31xZS7CwSxviV3KybDO25ktsJ0Pw3+Zjj6RSocULfOa +3faC+J7fssPM5Bq8ydKsm1gjgoSXUUzey1xIKDrfziu1FlNmY4RcavJhQ9rH +uNQccXz9W/LiqdeFEGNnue3lrAT26Gd+l7hRDKcN8p3/iZTEwPpFsdgDN8Fs +bCHE96M03js2L2PeXArBf6apPR2WxtcGw+dOt5XCrfzNveKz0vgtmf95Tkcp +SNq5GFQJyuAWFR+Nb32lMFz59xyfugwKXHCcdRovhdTIZP+rZ2QwMjfMhi1Z +BoMSDN9GkY14uvC42axHGUQY2/wlvVUWq53mPHUXyuDPw7mT+qay6NNufuDn +7zIQDf9+wX6nLF77Tzv7ER8bshsuliS7yOK32+JC+iJsqLSq/s4fJ4ub8uLj +FuXZML5fKXDqjSy+76r81WPGhsMBM/FtoXL4syAsrSWBDUSm6cahi3Ko5agi +IJnMptabxBVIlsOh+dKGI2lsCPml+sK0SA4F9P+RGs9mQ/qFwxJVbXJ4bMWG +rW+5bGi70nyjWFYe33oZMnnb2WB46+q9c0/kcZwZczVKlANm3c8XR1vkMSHP +3k1GjAO7eZZbOL+UR/Vv5OQtCQ4csfV9A5/lsf7wkmPbRg6YhyqeD1+hgO4T +WXsH1DhwUn620GSTAtaL9sx5m3Og8eiNkYZABZwS0LeWCuWA5S8DsbBQBdz3 +NO76n+c48Dy5U08nXAF5dw+S/hEceFMlFF4Up4Atar/lGmI4MLrKX+xitgJO ++/tvN0jjgGT5n/rm9QpYG/GzMJ7kgPf8RHiLiCK6ySdm1fdywPCUx/ovYor4 +vdnatekdBwSHejl8kopoTlvt3jTAgeK+hq5tNEVkmDmsr/nCgf7H6cz7eooY +NSykHjTJAeuLBj35zop4xaHHzVCIBG2xCI3QCkUc2p9WMbqFBJ6EmcasB4q4 +43nJ2hA9Ep7zHXN6UKOID+XH7iwzIOH4jO3Fib8VsfXZ4eoV20go6qH3He1V +RDYt/fOABQnrb7RE2/HR8OTt9tmPTiT82LSmf7M9DUtTvILlz5EwmyMdscWJ +hgfa1GZVw0mYXk3QDZxpqNM98EEzkoTRKYNjZl40pHs8ENCJJmGw5sis01ka +Cjj8ylx9mYTWHQ9FY4tpeLxymL4xh4TmR08rLrFpuNRUWzeSS0KjRptd6m0a +HiaXOmrySHgs/uFabhUNvVdkOOwqIuFO30rl+//S0EZcZ/oPDgnXjh+GwRka +Tn2a/HSpkoTMd56D/y3Q0ERgXFi5moQ069MXR5ZoGL8luaK2hoTLW2KfzQsp +IZeT4/fuMQmRPyv2rZZTQk0x6w/TjdT+JKw4aWyuhKWBNv2hL0jwXFwtbrpD +CYVnsle+6yDB44T0A4s9SpiZ5VVj+IoEl70av2ydlHCFVjr5/TUJdjKOsV6+ +Snizub5PqY8EYw6Zl5GhhK7PBT6NfCKhT4Fz44/rSth837SQ7wsJIRlludM3 +lFAq/6zr+v9IeBhRkm1bpoQREXWD2t+o+O7PyxKtVcLGS5pzFiMkqK5IS47+ +oIRjtTzdg9MktISkJOl+UcJJHtN/W2ao9Y0nX/40pIRxhmOtnFkqvn2XEk2n +lZBpEdzvOU+Cwp2Y2N/8dNxr1XP6yU8q3s6h4YFMOjo2lf/dv4wL9zuDzxNa +dJz2tPJJ5+WCndWZc526dEy116Vb8nEhRTcgTBvoOFkiWH9zORdEhE+cGbWh +o7EEb5uJABfICJ+gHAc6fn94/tcAZau544E7D9Ax6qkPnhXkQuygpz/bjY4k +3l3OFeLC8irXkx5BdExvKLn0bRUXCtX/OiERRke/7Uc9TwlzwbTI2bcxnI43 +93Y6zVI+n3TQmxZPx+G63tg5ES4suDt49mfTMYunTrJ7NReu9tkdvZRPRxMx +oTqLNVzYarPXw7iE+n5m34X7lAON97hdu03H3JUGLrFruTAhZuXiUE/HAbwa +uUqcCz3etBfHmunYF2iU6E25rmkBzrfR8Z0bV6eVcnIIR760i46j8h/dQtdx +4UznhaTaPjomNkmNPqfson5w6cUAHa92r5CSl+CC5qDw+x9DdJwLGHK4T1nS ++PNu0XE6umQ7Hf9JmSfj0WPaDB1rD5+gb1vPha9j6er6C3Qs5/0SeZZyu6Vv +7o4lOkq6hcVUUX5QaC7qspxA7vS49iTl3EW5c/5CBN6p4Y1W3sAF34r2Qzni +BEZP/SJiKTusKv23QpLAnQc8/O9S3uYezmqSJbD6i69PH2XGk/3cXhqBpy/0 +rOWRpOIppSU7pkxg5B13V0XK035Cl/g2E8gX+8YZKL9t+/BrgzaBr9lzK50o +NzKqvZn6BG6yi3I7RZkMT3mLxtR81mY+Fymn9R7baW9CoMyPX0QG5TCd7bVe +5gT2gn9SIWW3yzLMczsIrCg4yeZS3vF16nrKHgL9tKqC7lHWNm1bddOeQPVE +ifmHlKWzi0JrnAh8ObiLWUmZdzbse7szgZ+n1STuUx6ytj/wyY2ab23g3VuU +X5ZtfjbvReD0uh8CxZSr+fiNRE4QGOh9TjyLcsGhfraiP4FP13Z0xVCOe/hA +Wi+YwMrEWlt/yifXJsVbnSOQnBSOPUR5//GjC4cvEDj7+XLQdsr4Nxw7HUtg +TvpqGoOyirxkb8wlApc/Ohi7gvKa4HHL7BQCYwvNOB+o/Z5/2VJVnkmg5MaM +hGrKA8x81b+zqfVFKaglU26JDr76Jp/Arc13Y1wplw/YCI2WUPF0UCjWopxl +qBbMSxJYpal/YZGK/9HR3v2bHhD4yIcdlUB59593W6CGwFehnLJdlPUKErba +1RF4VS0vRZgyv4Ox5NlWAvHG3bvh1Pkbvb0u9ko7gXZ7Q0d0KXcJjcwVdxJY +fiF29D/qPJc8yul+3k+g4fJnlqaUL28ItPj4kcC3wdziISofAk/tfjj3lcC5 ++xptSZT/IJYyFKYIXIg/HfZCjAufEl0c/AQYqD55P2ITlW++Q0yapjADJ6tK +Rp9S+Thn8WNkZA0DX737lG5PeSVfykUvaQZG8Epk+FP5rBnccM9lMwP7W4dP +XqHyvborKVxOm4F/NY80rKW8Xefgzrd6DHzEeeeQRNUHh7Hpj/uQgajhCpFU +PTnrzhC33svATJuf6hZUveFvmOwX3s9Ah3W+6RVUPUpWeMJuPchAm7g4EynK +RX37TM09GJgXleszwM+FVpu4U6xgBv5mXVHdTdW79duG2zfdYODLE3s6b/4m +Ie965fVvhQx8UN48/GWRqs8/oo7eLGWgW0++gxJl43uyS7Q7DBRcCFZMo+rt +ETVrdem/GbgkzCm1p+px+fo7iYLfGch/6inhOEGCof+5/U1jDNRtvXTLZ5yE +hg4retQ0A63fdaSdHyOhK/FjzdIiA6dcXoZdp/rBL16J77NrlFFmAl7cpfqF +5ViQ5Wc9ZTQ7Y6x99AMJG7XkogWNlfGlgmWx4QDVn/0a6zeZKGPdqmWrV72n ++uPsGmO/HcookOzfWvCWhP7FMvUlZ2W01Upe5HaT4Cf8VlwqThnvVuro6/xL +9VtV7N/Zp4wly8yUBB6Q4H38i/TJAWVM0qtxC71HAnAT96V+VsYNFTWPhu+Q +8EnzzYs3Y8oYE5RU3XSbBPWtfg0ey1UwdFFycV8Z9X/mRaXhm1VQPoGdOn6d +hOEjgqfvnVfBZyP88cvOU+vNNXv0JEoFORMBFUpnSRh7Ey7wLE4FE4cCmNtD +SZi0/nH9Q6oKTr2zUQwJImHOaKhRtFQFA7dylFpOkMC7rm291wsVFPc6FfDZ +mQSpxqRqWUVVzOQ7UsGk7j/m9A28MfWquKQxkqE6xYFvrhalRs2qWG7GXdM5 +zoHE/KDd489U0U77sl/YKAdeyfVcc3ytimtfWU02feOAi9TVLcyvquggPLhg +St3fgkVl3DtE1DDn882F7jYOkPNyLTKOargy7YlIWBEHxP5lXC4fU8OGTxKN +73dxYGPs7T16ekzsPtrVIRDMhqxNBmvEj27G1vf/jXVllEGrtInu1BV1LM4U +2MkqLAXDjfXJGl0a2PvVvLIz+iaI8hX4/xWpibVWNh5hviUgFyFv7MjQwk0P +SzTZ2sUgRBx8YNushdw0R+Wc6UJQZ0ndDjqkjeYnGBXbWwrAr1+swYpnCy4u +FbvMR+TD2FSivWXWFlwmuxhYtTcPLDSarllu1sFOjXVHJV1y4fGU0c+55zr4 +jK8jffPsdfBlavd2uOui+lypcV7zVWCNunU6CulhysWJMNuITPiDLrlLpEAP +pzNetIqGpINKePyZen191FsdmT2Qngpq7gZPiF59FNYXOaZacgXcH3tG3Tu1 +FbVjN61w+JoET/I63SYkDHCd16HrrqGJMF26NKfx0ABh9IKusHMcHCE4Qtd2 +GeL1hG1SLhXRMKGWqndn3BDlaXZdM/xRUFn088NMrBE2d4/9DngaAU5mSmgk +Z4wH328smvE7DzI+MVXqdca44q2Sb3JAKEis9K7YtY+FbUILIW4yZ6Bo+9mQ +cUcWvrEfUdUROQPaZy9vTz3IwlUYE79yKQh2j5e/7vmLhZez+vc/GwyC6K6Z +H0e8WejH2D+VzQ6C+YLzpiERLPzc5el5zigIeo1SX5VwWGjftyuR6RoIngFF +2Za3WPjy1dv853aBMHvrvvtwOQsrHq5UC7IIBDFaz5zWAxaqb7GN72MGwg5B +2Y2P6lj4jBixnZgLgNrOErdXr1no8DjL3DopAKxEKzcH9rDQdpdv5r7IAOix ++GdWso+F/GqCRh4BATBd/T328AALFUcS/DIOBMDmfE3utyEW3s0bOGaqQo3X +axKYOMJC7vMvUmdlqPHW7QWNcRbuv3B31WPRAPCICejwn2Gha3vubdsZf5iu +i762YZ6Fo7q1h0q++kPkQuaR6gUWztXnmPO89Yc1OmXMQ4ssZMSZerq0+0Ou +T/XM0hIL94SU1TXV+8P/+vFjtg== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.11602348907445073`}}, + "PlotRange" -> {{0, 30}, {0., 0.056829219253761956`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7387,6 +6928,7 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7414,7 +6956,8 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.11602348907445073`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.056829219253761956`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7422,11 +6965,12 @@ A/4Yj+ZTxVObVPB/2v77Abs/lulRs/zvHxUuqFscn2/zw/4Hhp/tww== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991340117671425*^9}, - CellLabel-> - "Out[335]=",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] + CellChangeTimes->{3.991340117671425*^9, 3.994387024280944*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"de4a9cd5-6f43-498e-967c-c0973da42c19"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7495,15 +7039,786 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003512"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.99423619203867*^9},ExpressionUUID->"2d5a8299-5376-9747-8056-\ -2bd9764114a1"], + 3.99423619203867*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.060662}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387024496004*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"a75c526e-2351-43cd-9077-1eed4195181d"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-\ -0ac982b58a3a"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwN1nk4VVsUAHBRhkJFypDpuucaupkyZLitRR6PBhGKBp4QhUqGDBWSuchc +IXPce27RaKqEhycvKSFK0vBK5jkl7/xxvvP9vvN9e++z115rbUXXE7buvDw8 +PLzLqId6z/b/00hPKNoW1nrsEVtCf1tnrmSwSU8k6FyuHP/JlACUaHeV7EmB +nSYOBm1MAgL3sLv5egpgpjd66hZTF9aObkj50X0Hpr7tKI1n/gHva3efmO6u +hy9GBYOKTHswpw+9m+h+CbfdTq1NVXOHH9366ePdg7BXgi54hB4ADdtvFnUU +TMHrfxzPun6/CBvfV31xZS7CwSxviV3KybDO25ktsJ0Pw3+Zjj6RSocULfOa +3faC+J7fssPM5Bq8ydKsm1gjgoSXUUzey1xIKDrfziu1FlNmY4RcavJhQ9rH +uNQccXz9W/LiqdeFEGNnue3lrAT26Gd+l7hRDKcN8p3/iZTEwPpFsdgDN8Fs +bCHE96M03js2L2PeXArBf6apPR2WxtcGw+dOt5XCrfzNveKz0vgtmf95Tkcp +SNq5GFQJyuAWFR+Nb32lMFz59xyfugwKXHCcdRovhdTIZP+rZ2QwMjfMhi1Z +BoMSDN9GkY14uvC42axHGUQY2/wlvVUWq53mPHUXyuDPw7mT+qay6NNufuDn +7zIQDf9+wX6nLF77Tzv7ER8bshsuliS7yOK32+JC+iJsqLSq/s4fJ4ub8uLj +FuXZML5fKXDqjSy+76r81WPGhsMBM/FtoXL4syAsrSWBDUSm6cahi3Ko5agi +IJnMptabxBVIlsOh+dKGI2lsCPml+sK0SA4F9P+RGs9mQ/qFwxJVbXJ4bMWG +rW+5bGi70nyjWFYe33oZMnnb2WB46+q9c0/kcZwZczVKlANm3c8XR1vkMSHP +3k1GjAO7eZZbOL+UR/Vv5OQtCQ4csfV9A5/lsf7wkmPbRg6YhyqeD1+hgO4T +WXsH1DhwUn620GSTAtaL9sx5m3Og8eiNkYZABZwS0LeWCuWA5S8DsbBQBdz3 +NO76n+c48Dy5U08nXAF5dw+S/hEceFMlFF4Up4Atar/lGmI4MLrKX+xitgJO ++/tvN0jjgGT5n/rm9QpYG/GzMJ7kgPf8RHiLiCK6ySdm1fdywPCUx/ovYor4 +vdnatekdBwSHejl8kopoTlvt3jTAgeK+hq5tNEVkmDmsr/nCgf7H6cz7eooY +NSykHjTJAeuLBj35zop4xaHHzVCIBG2xCI3QCkUc2p9WMbqFBJ6EmcasB4q4 +43nJ2hA9Ep7zHXN6UKOID+XH7iwzIOH4jO3Fib8VsfXZ4eoV20go6qH3He1V +RDYt/fOABQnrb7RE2/HR8OTt9tmPTiT82LSmf7M9DUtTvILlz5EwmyMdscWJ +hgfa1GZVw0mYXk3QDZxpqNM98EEzkoTRKYNjZl40pHs8ENCJJmGw5sis01ka +Cjj8ylx9mYTWHQ9FY4tpeLxymL4xh4TmR08rLrFpuNRUWzeSS0KjRptd6m0a +HiaXOmrySHgs/uFabhUNvVdkOOwqIuFO30rl+//S0EZcZ/oPDgnXjh+GwRka +Tn2a/HSpkoTMd56D/y3Q0ERgXFi5moQ069MXR5ZoGL8luaK2hoTLW2KfzQsp +IZeT4/fuMQmRPyv2rZZTQk0x6w/TjdT+JKw4aWyuhKWBNv2hL0jwXFwtbrpD +CYVnsle+6yDB44T0A4s9SpiZ5VVj+IoEl70av2ydlHCFVjr5/TUJdjKOsV6+ +Snizub5PqY8EYw6Zl5GhhK7PBT6NfCKhT4Fz44/rSth837SQ7wsJIRlludM3 +lFAq/6zr+v9IeBhRkm1bpoQREXWD2t+o+O7PyxKtVcLGS5pzFiMkqK5IS47+ +oIRjtTzdg9MktISkJOl+UcJJHtN/W2ao9Y0nX/40pIRxhmOtnFkqvn2XEk2n +lZBpEdzvOU+Cwp2Y2N/8dNxr1XP6yU8q3s6h4YFMOjo2lf/dv4wL9zuDzxNa +dJz2tPJJ5+WCndWZc526dEy116Vb8nEhRTcgTBvoOFkiWH9zORdEhE+cGbWh +o7EEb5uJABfICJ+gHAc6fn94/tcAZau544E7D9Ax6qkPnhXkQuygpz/bjY4k +3l3OFeLC8irXkx5BdExvKLn0bRUXCtX/OiERRke/7Uc9TwlzwbTI2bcxnI43 +93Y6zVI+n3TQmxZPx+G63tg5ES4suDt49mfTMYunTrJ7NReu9tkdvZRPRxMx +oTqLNVzYarPXw7iE+n5m34X7lAON97hdu03H3JUGLrFruTAhZuXiUE/HAbwa +uUqcCz3etBfHmunYF2iU6E25rmkBzrfR8Z0bV6eVcnIIR760i46j8h/dQtdx +4UznhaTaPjomNkmNPqfson5w6cUAHa92r5CSl+CC5qDw+x9DdJwLGHK4T1nS ++PNu0XE6umQ7Hf9JmSfj0WPaDB1rD5+gb1vPha9j6er6C3Qs5/0SeZZyu6Vv +7o4lOkq6hcVUUX5QaC7qspxA7vS49iTl3EW5c/5CBN6p4Y1W3sAF34r2Qzni +BEZP/SJiKTusKv23QpLAnQc8/O9S3uYezmqSJbD6i69PH2XGk/3cXhqBpy/0 +rOWRpOIppSU7pkxg5B13V0XK035Cl/g2E8gX+8YZKL9t+/BrgzaBr9lzK50o +NzKqvZn6BG6yi3I7RZkMT3mLxtR81mY+Fymn9R7baW9CoMyPX0QG5TCd7bVe +5gT2gn9SIWW3yzLMczsIrCg4yeZS3vF16nrKHgL9tKqC7lHWNm1bddOeQPVE +ifmHlKWzi0JrnAh8ObiLWUmZdzbse7szgZ+n1STuUx6ytj/wyY2ab23g3VuU +X5ZtfjbvReD0uh8CxZSr+fiNRE4QGOh9TjyLcsGhfraiP4FP13Z0xVCOe/hA +Wi+YwMrEWlt/yifXJsVbnSOQnBSOPUR5//GjC4cvEDj7+XLQdsr4Nxw7HUtg +TvpqGoOyirxkb8wlApc/Ohi7gvKa4HHL7BQCYwvNOB+o/Z5/2VJVnkmg5MaM +hGrKA8x81b+zqfVFKaglU26JDr76Jp/Arc13Y1wplw/YCI2WUPF0UCjWopxl +qBbMSxJYpal/YZGK/9HR3v2bHhD4yIcdlUB59593W6CGwFehnLJdlPUKErba +1RF4VS0vRZgyv4Ox5NlWAvHG3bvh1Pkbvb0u9ko7gXZ7Q0d0KXcJjcwVdxJY +fiF29D/qPJc8yul+3k+g4fJnlqaUL28ItPj4kcC3wdziISofAk/tfjj3lcC5 ++xptSZT/IJYyFKYIXIg/HfZCjAufEl0c/AQYqD55P2ITlW++Q0yapjADJ6tK +Rp9S+Thn8WNkZA0DX737lG5PeSVfykUvaQZG8Epk+FP5rBnccM9lMwP7W4dP +XqHyvborKVxOm4F/NY80rKW8Xefgzrd6DHzEeeeQRNUHh7Hpj/uQgajhCpFU +PTnrzhC33svATJuf6hZUveFvmOwX3s9Ah3W+6RVUPUpWeMJuPchAm7g4EynK +RX37TM09GJgXleszwM+FVpu4U6xgBv5mXVHdTdW79duG2zfdYODLE3s6b/4m +Ie965fVvhQx8UN48/GWRqs8/oo7eLGWgW0++gxJl43uyS7Q7DBRcCFZMo+rt +ETVrdem/GbgkzCm1p+px+fo7iYLfGch/6inhOEGCof+5/U1jDNRtvXTLZ5yE +hg4retQ0A63fdaSdHyOhK/FjzdIiA6dcXoZdp/rBL16J77NrlFFmAl7cpfqF +5ViQ5Wc9ZTQ7Y6x99AMJG7XkogWNlfGlgmWx4QDVn/0a6zeZKGPdqmWrV72n ++uPsGmO/HcookOzfWvCWhP7FMvUlZ2W01Upe5HaT4Cf8VlwqThnvVuro6/xL +9VtV7N/Zp4wly8yUBB6Q4H38i/TJAWVM0qtxC71HAnAT96V+VsYNFTWPhu+Q +8EnzzYs3Y8oYE5RU3XSbBPWtfg0ey1UwdFFycV8Z9X/mRaXhm1VQPoGdOn6d +hOEjgqfvnVfBZyP88cvOU+vNNXv0JEoFORMBFUpnSRh7Ey7wLE4FE4cCmNtD +SZi0/nH9Q6oKTr2zUQwJImHOaKhRtFQFA7dylFpOkMC7rm291wsVFPc6FfDZ +mQSpxqRqWUVVzOQ7UsGk7j/m9A28MfWquKQxkqE6xYFvrhalRs2qWG7GXdM5 +zoHE/KDd489U0U77sl/YKAdeyfVcc3ytimtfWU02feOAi9TVLcyvquggPLhg +St3fgkVl3DtE1DDn882F7jYOkPNyLTKOargy7YlIWBEHxP5lXC4fU8OGTxKN +73dxYGPs7T16ekzsPtrVIRDMhqxNBmvEj27G1vf/jXVllEGrtInu1BV1LM4U +2MkqLAXDjfXJGl0a2PvVvLIz+iaI8hX4/xWpibVWNh5hviUgFyFv7MjQwk0P +SzTZ2sUgRBx8YNushdw0R+Wc6UJQZ0ndDjqkjeYnGBXbWwrAr1+swYpnCy4u +FbvMR+TD2FSivWXWFlwmuxhYtTcPLDSarllu1sFOjXVHJV1y4fGU0c+55zr4 +jK8jffPsdfBlavd2uOui+lypcV7zVWCNunU6CulhysWJMNuITPiDLrlLpEAP +pzNetIqGpINKePyZen191FsdmT2Qngpq7gZPiF59FNYXOaZacgXcH3tG3Tu1 +FbVjN61w+JoET/I63SYkDHCd16HrrqGJMF26NKfx0ABh9IKusHMcHCE4Qtd2 +GeL1hG1SLhXRMKGWqndn3BDlaXZdM/xRUFn088NMrBE2d4/9DngaAU5mSmgk +Z4wH328smvE7DzI+MVXqdca44q2Sb3JAKEis9K7YtY+FbUILIW4yZ6Bo+9mQ +cUcWvrEfUdUROQPaZy9vTz3IwlUYE79yKQh2j5e/7vmLhZez+vc/GwyC6K6Z +H0e8WejH2D+VzQ6C+YLzpiERLPzc5el5zigIeo1SX5VwWGjftyuR6RoIngFF +2Za3WPjy1dv853aBMHvrvvtwOQsrHq5UC7IIBDFaz5zWAxaqb7GN72MGwg5B +2Y2P6lj4jBixnZgLgNrOErdXr1no8DjL3DopAKxEKzcH9rDQdpdv5r7IAOix ++GdWso+F/GqCRh4BATBd/T328AALFUcS/DIOBMDmfE3utyEW3s0bOGaqQo3X +axKYOMJC7vMvUmdlqPHW7QWNcRbuv3B31WPRAPCICejwn2Gha3vubdsZf5iu +i762YZ6Fo7q1h0q++kPkQuaR6gUWztXnmPO89Yc1OmXMQ4ssZMSZerq0+0Ou +T/XM0hIL94SU1TXV+8P/+vFjtg== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwN1nk4VVsUAHBRhkJFypDpuucaupkyZLitRR6PBhGKBp4QhUqGDBWSuchc +IXPce27RaKqEhycvKSFK0vBK5jkl7/xxvvP9vvN9e++z115rbUXXE7buvDw8 +PLzLqId6z/b/00hPKNoW1nrsEVtCf1tnrmSwSU8k6FyuHP/JlACUaHeV7EmB +nSYOBm1MAgL3sLv5egpgpjd66hZTF9aObkj50X0Hpr7tKI1n/gHva3efmO6u +hy9GBYOKTHswpw+9m+h+CbfdTq1NVXOHH9366ePdg7BXgi54hB4ADdtvFnUU +TMHrfxzPun6/CBvfV31xZS7CwSxviV3KybDO25ktsJ0Pw3+Zjj6RSocULfOa +3faC+J7fssPM5Bq8ydKsm1gjgoSXUUzey1xIKDrfziu1FlNmY4RcavJhQ9rH +uNQccXz9W/LiqdeFEGNnue3lrAT26Gd+l7hRDKcN8p3/iZTEwPpFsdgDN8Fs +bCHE96M03js2L2PeXArBf6apPR2WxtcGw+dOt5XCrfzNveKz0vgtmf95Tkcp +SNq5GFQJyuAWFR+Nb32lMFz59xyfugwKXHCcdRovhdTIZP+rZ2QwMjfMhi1Z +BoMSDN9GkY14uvC42axHGUQY2/wlvVUWq53mPHUXyuDPw7mT+qay6NNufuDn +7zIQDf9+wX6nLF77Tzv7ER8bshsuliS7yOK32+JC+iJsqLSq/s4fJ4ub8uLj +FuXZML5fKXDqjSy+76r81WPGhsMBM/FtoXL4syAsrSWBDUSm6cahi3Ko5agi +IJnMptabxBVIlsOh+dKGI2lsCPml+sK0SA4F9P+RGs9mQ/qFwxJVbXJ4bMWG +rW+5bGi70nyjWFYe33oZMnnb2WB46+q9c0/kcZwZczVKlANm3c8XR1vkMSHP +3k1GjAO7eZZbOL+UR/Vv5OQtCQ4csfV9A5/lsf7wkmPbRg6YhyqeD1+hgO4T +WXsH1DhwUn620GSTAtaL9sx5m3Og8eiNkYZABZwS0LeWCuWA5S8DsbBQBdz3 +NO76n+c48Dy5U08nXAF5dw+S/hEceFMlFF4Up4Atar/lGmI4MLrKX+xitgJO ++/tvN0jjgGT5n/rm9QpYG/GzMJ7kgPf8RHiLiCK6ySdm1fdywPCUx/ovYor4 +vdnatekdBwSHejl8kopoTlvt3jTAgeK+hq5tNEVkmDmsr/nCgf7H6cz7eooY +NSykHjTJAeuLBj35zop4xaHHzVCIBG2xCI3QCkUc2p9WMbqFBJ6EmcasB4q4 +43nJ2hA9Ep7zHXN6UKOID+XH7iwzIOH4jO3Fib8VsfXZ4eoV20go6qH3He1V +RDYt/fOABQnrb7RE2/HR8OTt9tmPTiT82LSmf7M9DUtTvILlz5EwmyMdscWJ +hgfa1GZVw0mYXk3QDZxpqNM98EEzkoTRKYNjZl40pHs8ENCJJmGw5sis01ka +Cjj8ylx9mYTWHQ9FY4tpeLxymL4xh4TmR08rLrFpuNRUWzeSS0KjRptd6m0a +HiaXOmrySHgs/uFabhUNvVdkOOwqIuFO30rl+//S0EZcZ/oPDgnXjh+GwRka +Tn2a/HSpkoTMd56D/y3Q0ERgXFi5moQ069MXR5ZoGL8luaK2hoTLW2KfzQsp +IZeT4/fuMQmRPyv2rZZTQk0x6w/TjdT+JKw4aWyuhKWBNv2hL0jwXFwtbrpD +CYVnsle+6yDB44T0A4s9SpiZ5VVj+IoEl70av2ydlHCFVjr5/TUJdjKOsV6+ +Snizub5PqY8EYw6Zl5GhhK7PBT6NfCKhT4Fz44/rSth837SQ7wsJIRlludM3 +lFAq/6zr+v9IeBhRkm1bpoQREXWD2t+o+O7PyxKtVcLGS5pzFiMkqK5IS47+ +oIRjtTzdg9MktISkJOl+UcJJHtN/W2ao9Y0nX/40pIRxhmOtnFkqvn2XEk2n +lZBpEdzvOU+Cwp2Y2N/8dNxr1XP6yU8q3s6h4YFMOjo2lf/dv4wL9zuDzxNa +dJz2tPJJ5+WCndWZc526dEy116Vb8nEhRTcgTBvoOFkiWH9zORdEhE+cGbWh +o7EEb5uJABfICJ+gHAc6fn94/tcAZau544E7D9Ax6qkPnhXkQuygpz/bjY4k +3l3OFeLC8irXkx5BdExvKLn0bRUXCtX/OiERRke/7Uc9TwlzwbTI2bcxnI43 +93Y6zVI+n3TQmxZPx+G63tg5ES4suDt49mfTMYunTrJ7NReu9tkdvZRPRxMx +oTqLNVzYarPXw7iE+n5m34X7lAON97hdu03H3JUGLrFruTAhZuXiUE/HAbwa +uUqcCz3etBfHmunYF2iU6E25rmkBzrfR8Z0bV6eVcnIIR760i46j8h/dQtdx +4UznhaTaPjomNkmNPqfson5w6cUAHa92r5CSl+CC5qDw+x9DdJwLGHK4T1nS ++PNu0XE6umQ7Hf9JmSfj0WPaDB1rD5+gb1vPha9j6er6C3Qs5/0SeZZyu6Vv +7o4lOkq6hcVUUX5QaC7qspxA7vS49iTl3EW5c/5CBN6p4Y1W3sAF34r2Qzni +BEZP/SJiKTusKv23QpLAnQc8/O9S3uYezmqSJbD6i69PH2XGk/3cXhqBpy/0 +rOWRpOIppSU7pkxg5B13V0XK035Cl/g2E8gX+8YZKL9t+/BrgzaBr9lzK50o +NzKqvZn6BG6yi3I7RZkMT3mLxtR81mY+Fymn9R7baW9CoMyPX0QG5TCd7bVe +5gT2gn9SIWW3yzLMczsIrCg4yeZS3vF16nrKHgL9tKqC7lHWNm1bddOeQPVE +ifmHlKWzi0JrnAh8ObiLWUmZdzbse7szgZ+n1STuUx6ytj/wyY2ab23g3VuU +X5ZtfjbvReD0uh8CxZSr+fiNRE4QGOh9TjyLcsGhfraiP4FP13Z0xVCOe/hA +Wi+YwMrEWlt/yifXJsVbnSOQnBSOPUR5//GjC4cvEDj7+XLQdsr4Nxw7HUtg +TvpqGoOyirxkb8wlApc/Ohi7gvKa4HHL7BQCYwvNOB+o/Z5/2VJVnkmg5MaM +hGrKA8x81b+zqfVFKaglU26JDr76Jp/Arc13Y1wplw/YCI2WUPF0UCjWopxl +qBbMSxJYpal/YZGK/9HR3v2bHhD4yIcdlUB59593W6CGwFehnLJdlPUKErba +1RF4VS0vRZgyv4Ox5NlWAvHG3bvh1Pkbvb0u9ko7gXZ7Q0d0KXcJjcwVdxJY +fiF29D/qPJc8yul+3k+g4fJnlqaUL28ItPj4kcC3wdziISofAk/tfjj3lcC5 ++xptSZT/IJYyFKYIXIg/HfZCjAufEl0c/AQYqD55P2ITlW++Q0yapjADJ6tK +Rp9S+Thn8WNkZA0DX737lG5PeSVfykUvaQZG8Epk+FP5rBnccM9lMwP7W4dP +XqHyvborKVxOm4F/NY80rKW8Xefgzrd6DHzEeeeQRNUHh7Hpj/uQgajhCpFU +PTnrzhC33svATJuf6hZUveFvmOwX3s9Ah3W+6RVUPUpWeMJuPchAm7g4EynK +RX37TM09GJgXleszwM+FVpu4U6xgBv5mXVHdTdW79duG2zfdYODLE3s6b/4m +Ie965fVvhQx8UN48/GWRqs8/oo7eLGWgW0++gxJl43uyS7Q7DBRcCFZMo+rt +ETVrdem/GbgkzCm1p+px+fo7iYLfGch/6inhOEGCof+5/U1jDNRtvXTLZ5yE +hg4retQ0A63fdaSdHyOhK/FjzdIiA6dcXoZdp/rBL16J77NrlFFmAl7cpfqF +5ViQ5Wc9ZTQ7Y6x99AMJG7XkogWNlfGlgmWx4QDVn/0a6zeZKGPdqmWrV72n ++uPsGmO/HcookOzfWvCWhP7FMvUlZ2W01Upe5HaT4Cf8VlwqThnvVuro6/xL +9VtV7N/Zp4wly8yUBB6Q4H38i/TJAWVM0qtxC71HAnAT96V+VsYNFTWPhu+Q +8EnzzYs3Y8oYE5RU3XSbBPWtfg0ey1UwdFFycV8Z9X/mRaXhm1VQPoGdOn6d +hOEjgqfvnVfBZyP88cvOU+vNNXv0JEoFORMBFUpnSRh7Ey7wLE4FE4cCmNtD +SZi0/nH9Q6oKTr2zUQwJImHOaKhRtFQFA7dylFpOkMC7rm291wsVFPc6FfDZ +mQSpxqRqWUVVzOQ7UsGk7j/m9A28MfWquKQxkqE6xYFvrhalRs2qWG7GXdM5 +zoHE/KDd489U0U77sl/YKAdeyfVcc3ytimtfWU02feOAi9TVLcyvquggPLhg +St3fgkVl3DtE1DDn882F7jYOkPNyLTKOargy7YlIWBEHxP5lXC4fU8OGTxKN +73dxYGPs7T16ekzsPtrVIRDMhqxNBmvEj27G1vf/jXVllEGrtInu1BV1LM4U +2MkqLAXDjfXJGl0a2PvVvLIz+iaI8hX4/xWpibVWNh5hviUgFyFv7MjQwk0P +SzTZ2sUgRBx8YNushdw0R+Wc6UJQZ0ndDjqkjeYnGBXbWwrAr1+swYpnCy4u +FbvMR+TD2FSivWXWFlwmuxhYtTcPLDSarllu1sFOjXVHJV1y4fGU0c+55zr4 +jK8jffPsdfBlavd2uOui+lypcV7zVWCNunU6CulhysWJMNuITPiDLrlLpEAP +pzNetIqGpINKePyZen191FsdmT2Qngpq7gZPiF59FNYXOaZacgXcH3tG3Tu1 +FbVjN61w+JoET/I63SYkDHCd16HrrqGJMF26NKfx0ABh9IKusHMcHCE4Qtd2 +GeL1hG1SLhXRMKGWqndn3BDlaXZdM/xRUFn088NMrBE2d4/9DngaAU5mSmgk +Z4wH328smvE7DzI+MVXqdca44q2Sb3JAKEis9K7YtY+FbUILIW4yZ6Bo+9mQ +cUcWvrEfUdUROQPaZy9vTz3IwlUYE79yKQh2j5e/7vmLhZez+vc/GwyC6K6Z +H0e8WejH2D+VzQ6C+YLzpiERLPzc5el5zigIeo1SX5VwWGjftyuR6RoIngFF +2Za3WPjy1dv853aBMHvrvvtwOQsrHq5UC7IIBDFaz5zWAxaqb7GN72MGwg5B +2Y2P6lj4jBixnZgLgNrOErdXr1no8DjL3DopAKxEKzcH9rDQdpdv5r7IAOix ++GdWso+F/GqCRh4BATBd/T328AALFUcS/DIOBMDmfE3utyEW3s0bOGaqQo3X +axKYOMJC7vMvUmdlqPHW7QWNcRbuv3B31WPRAPCICejwn2Gha3vubdsZf5iu +i762YZ6Fo7q1h0q++kPkQuaR6gUWztXnmPO89Yc1OmXMQ4ssZMSZerq0+0Ou +T/XM0hIL94SU1TXV+8P/+vFjtg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.056829219253761956`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.056829219253761956`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwN1nk4VVsUAHBRhkJFypDpuucaupkyZLitRR6PBhGKBp4QhUqGDBWSuchc +IXPce27RaKqEhycvKSFK0vBK5jkl7/xxvvP9vvN9e++z115rbUXXE7buvDw8 +PLzLqId6z/b/00hPKNoW1nrsEVtCf1tnrmSwSU8k6FyuHP/JlACUaHeV7EmB +nSYOBm1MAgL3sLv5egpgpjd66hZTF9aObkj50X0Hpr7tKI1n/gHva3efmO6u +hy9GBYOKTHswpw+9m+h+CbfdTq1NVXOHH9366ePdg7BXgi54hB4ADdtvFnUU +TMHrfxzPun6/CBvfV31xZS7CwSxviV3KybDO25ktsJ0Pw3+Zjj6RSocULfOa +3faC+J7fssPM5Bq8ydKsm1gjgoSXUUzey1xIKDrfziu1FlNmY4RcavJhQ9rH +uNQccXz9W/LiqdeFEGNnue3lrAT26Gd+l7hRDKcN8p3/iZTEwPpFsdgDN8Fs +bCHE96M03js2L2PeXArBf6apPR2WxtcGw+dOt5XCrfzNveKz0vgtmf95Tkcp +SNq5GFQJyuAWFR+Nb32lMFz59xyfugwKXHCcdRovhdTIZP+rZ2QwMjfMhi1Z +BoMSDN9GkY14uvC42axHGUQY2/wlvVUWq53mPHUXyuDPw7mT+qay6NNufuDn +7zIQDf9+wX6nLF77Tzv7ER8bshsuliS7yOK32+JC+iJsqLSq/s4fJ4ub8uLj +FuXZML5fKXDqjSy+76r81WPGhsMBM/FtoXL4syAsrSWBDUSm6cahi3Ko5agi +IJnMptabxBVIlsOh+dKGI2lsCPml+sK0SA4F9P+RGs9mQ/qFwxJVbXJ4bMWG +rW+5bGi70nyjWFYe33oZMnnb2WB46+q9c0/kcZwZczVKlANm3c8XR1vkMSHP +3k1GjAO7eZZbOL+UR/Vv5OQtCQ4csfV9A5/lsf7wkmPbRg6YhyqeD1+hgO4T +WXsH1DhwUn620GSTAtaL9sx5m3Og8eiNkYZABZwS0LeWCuWA5S8DsbBQBdz3 +NO76n+c48Dy5U08nXAF5dw+S/hEceFMlFF4Up4Atar/lGmI4MLrKX+xitgJO ++/tvN0jjgGT5n/rm9QpYG/GzMJ7kgPf8RHiLiCK6ySdm1fdywPCUx/ovYor4 +vdnatekdBwSHejl8kopoTlvt3jTAgeK+hq5tNEVkmDmsr/nCgf7H6cz7eooY +NSykHjTJAeuLBj35zop4xaHHzVCIBG2xCI3QCkUc2p9WMbqFBJ6EmcasB4q4 +43nJ2hA9Ep7zHXN6UKOID+XH7iwzIOH4jO3Fib8VsfXZ4eoV20go6qH3He1V +RDYt/fOABQnrb7RE2/HR8OTt9tmPTiT82LSmf7M9DUtTvILlz5EwmyMdscWJ +hgfa1GZVw0mYXk3QDZxpqNM98EEzkoTRKYNjZl40pHs8ENCJJmGw5sis01ka +Cjj8ylx9mYTWHQ9FY4tpeLxymL4xh4TmR08rLrFpuNRUWzeSS0KjRptd6m0a +HiaXOmrySHgs/uFabhUNvVdkOOwqIuFO30rl+//S0EZcZ/oPDgnXjh+GwRka +Tn2a/HSpkoTMd56D/y3Q0ERgXFi5moQ069MXR5ZoGL8luaK2hoTLW2KfzQsp +IZeT4/fuMQmRPyv2rZZTQk0x6w/TjdT+JKw4aWyuhKWBNv2hL0jwXFwtbrpD +CYVnsle+6yDB44T0A4s9SpiZ5VVj+IoEl70av2ydlHCFVjr5/TUJdjKOsV6+ +Snizub5PqY8EYw6Zl5GhhK7PBT6NfCKhT4Fz44/rSth837SQ7wsJIRlludM3 +lFAq/6zr+v9IeBhRkm1bpoQREXWD2t+o+O7PyxKtVcLGS5pzFiMkqK5IS47+ +oIRjtTzdg9MktISkJOl+UcJJHtN/W2ao9Y0nX/40pIRxhmOtnFkqvn2XEk2n +lZBpEdzvOU+Cwp2Y2N/8dNxr1XP6yU8q3s6h4YFMOjo2lf/dv4wL9zuDzxNa +dJz2tPJJ5+WCndWZc526dEy116Vb8nEhRTcgTBvoOFkiWH9zORdEhE+cGbWh +o7EEb5uJABfICJ+gHAc6fn94/tcAZau544E7D9Ax6qkPnhXkQuygpz/bjY4k +3l3OFeLC8irXkx5BdExvKLn0bRUXCtX/OiERRke/7Uc9TwlzwbTI2bcxnI43 +93Y6zVI+n3TQmxZPx+G63tg5ES4suDt49mfTMYunTrJ7NReu9tkdvZRPRxMx +oTqLNVzYarPXw7iE+n5m34X7lAON97hdu03H3JUGLrFruTAhZuXiUE/HAbwa +uUqcCz3etBfHmunYF2iU6E25rmkBzrfR8Z0bV6eVcnIIR760i46j8h/dQtdx +4UznhaTaPjomNkmNPqfson5w6cUAHa92r5CSl+CC5qDw+x9DdJwLGHK4T1nS ++PNu0XE6umQ7Hf9JmSfj0WPaDB1rD5+gb1vPha9j6er6C3Qs5/0SeZZyu6Vv +7o4lOkq6hcVUUX5QaC7qspxA7vS49iTl3EW5c/5CBN6p4Y1W3sAF34r2Qzni +BEZP/SJiKTusKv23QpLAnQc8/O9S3uYezmqSJbD6i69PH2XGk/3cXhqBpy/0 +rOWRpOIppSU7pkxg5B13V0XK035Cl/g2E8gX+8YZKL9t+/BrgzaBr9lzK50o +NzKqvZn6BG6yi3I7RZkMT3mLxtR81mY+Fymn9R7baW9CoMyPX0QG5TCd7bVe +5gT2gn9SIWW3yzLMczsIrCg4yeZS3vF16nrKHgL9tKqC7lHWNm1bddOeQPVE +ifmHlKWzi0JrnAh8ObiLWUmZdzbse7szgZ+n1STuUx6ytj/wyY2ab23g3VuU +X5ZtfjbvReD0uh8CxZSr+fiNRE4QGOh9TjyLcsGhfraiP4FP13Z0xVCOe/hA +Wi+YwMrEWlt/yifXJsVbnSOQnBSOPUR5//GjC4cvEDj7+XLQdsr4Nxw7HUtg +TvpqGoOyirxkb8wlApc/Ohi7gvKa4HHL7BQCYwvNOB+o/Z5/2VJVnkmg5MaM +hGrKA8x81b+zqfVFKaglU26JDr76Jp/Arc13Y1wplw/YCI2WUPF0UCjWopxl +qBbMSxJYpal/YZGK/9HR3v2bHhD4yIcdlUB59593W6CGwFehnLJdlPUKErba +1RF4VS0vRZgyv4Ox5NlWAvHG3bvh1Pkbvb0u9ko7gXZ7Q0d0KXcJjcwVdxJY +fiF29D/qPJc8yul+3k+g4fJnlqaUL28ItPj4kcC3wdziISofAk/tfjj3lcC5 ++xptSZT/IJYyFKYIXIg/HfZCjAufEl0c/AQYqD55P2ITlW++Q0yapjADJ6tK +Rp9S+Thn8WNkZA0DX737lG5PeSVfykUvaQZG8Epk+FP5rBnccM9lMwP7W4dP +XqHyvborKVxOm4F/NY80rKW8Xefgzrd6DHzEeeeQRNUHh7Hpj/uQgajhCpFU +PTnrzhC33svATJuf6hZUveFvmOwX3s9Ah3W+6RVUPUpWeMJuPchAm7g4EynK +RX37TM09GJgXleszwM+FVpu4U6xgBv5mXVHdTdW79duG2zfdYODLE3s6b/4m +Ie965fVvhQx8UN48/GWRqs8/oo7eLGWgW0++gxJl43uyS7Q7DBRcCFZMo+rt +ETVrdem/GbgkzCm1p+px+fo7iYLfGch/6inhOEGCof+5/U1jDNRtvXTLZ5yE +hg4retQ0A63fdaSdHyOhK/FjzdIiA6dcXoZdp/rBL16J77NrlFFmAl7cpfqF +5ViQ5Wc9ZTQ7Y6x99AMJG7XkogWNlfGlgmWx4QDVn/0a6zeZKGPdqmWrV72n ++uPsGmO/HcookOzfWvCWhP7FMvUlZ2W01Upe5HaT4Cf8VlwqThnvVuro6/xL +9VtV7N/Zp4wly8yUBB6Q4H38i/TJAWVM0qtxC71HAnAT96V+VsYNFTWPhu+Q +8EnzzYs3Y8oYE5RU3XSbBPWtfg0ey1UwdFFycV8Z9X/mRaXhm1VQPoGdOn6d +hOEjgqfvnVfBZyP88cvOU+vNNXv0JEoFORMBFUpnSRh7Ey7wLE4FE4cCmNtD +SZi0/nH9Q6oKTr2zUQwJImHOaKhRtFQFA7dylFpOkMC7rm291wsVFPc6FfDZ +mQSpxqRqWUVVzOQ7UsGk7j/m9A28MfWquKQxkqE6xYFvrhalRs2qWG7GXdM5 +zoHE/KDd489U0U77sl/YKAdeyfVcc3ytimtfWU02feOAi9TVLcyvquggPLhg +St3fgkVl3DtE1DDn882F7jYOkPNyLTKOargy7YlIWBEHxP5lXC4fU8OGTxKN +73dxYGPs7T16ekzsPtrVIRDMhqxNBmvEj27G1vf/jXVllEGrtInu1BV1LM4U +2MkqLAXDjfXJGl0a2PvVvLIz+iaI8hX4/xWpibVWNh5hviUgFyFv7MjQwk0P +SzTZ2sUgRBx8YNushdw0R+Wc6UJQZ0ndDjqkjeYnGBXbWwrAr1+swYpnCy4u +FbvMR+TD2FSivWXWFlwmuxhYtTcPLDSarllu1sFOjXVHJV1y4fGU0c+55zr4 +jK8jffPsdfBlavd2uOui+lypcV7zVWCNunU6CulhysWJMNuITPiDLrlLpEAP +pzNetIqGpINKePyZen191FsdmT2Qngpq7gZPiF59FNYXOaZacgXcH3tG3Tu1 +FbVjN61w+JoET/I63SYkDHCd16HrrqGJMF26NKfx0ABh9IKusHMcHCE4Qtd2 +GeL1hG1SLhXRMKGWqndn3BDlaXZdM/xRUFn088NMrBE2d4/9DngaAU5mSmgk +Z4wH328smvE7DzI+MVXqdca44q2Sb3JAKEis9K7YtY+FbUILIW4yZ6Bo+9mQ +cUcWvrEfUdUROQPaZy9vTz3IwlUYE79yKQh2j5e/7vmLhZez+vc/GwyC6K6Z +H0e8WejH2D+VzQ6C+YLzpiERLPzc5el5zigIeo1SX5VwWGjftyuR6RoIngFF +2Za3WPjy1dv853aBMHvrvvtwOQsrHq5UC7IIBDFaz5zWAxaqb7GN72MGwg5B +2Y2P6lj4jBixnZgLgNrOErdXr1no8DjL3DopAKxEKzcH9rDQdpdv5r7IAOix ++GdWso+F/GqCRh4BATBd/T328AALFUcS/DIOBMDmfE3utyEW3s0bOGaqQo3X +axKYOMJC7vMvUmdlqPHW7QWNcRbuv3B31WPRAPCICejwn2Gha3vubdsZf5iu +i762YZ6Fo7q1h0q++kPkQuaR6gUWztXnmPO89Yc1OmXMQ4ssZMSZerq0+0Ou +T/XM0hIL94SU1TXV+8P/+vFjtg== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.056829219253761956`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.056829219253761956`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387024535329*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"30b20195-ccc7-4301-892b-52e1af436590"] +}, Open ]], Cell[CellGroupData[{ @@ -7512,14 +7827,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918497405884743`*^9},ExpressionUUID->"650e43f8-1352-de46-8137-\ -52adca93b0cf"], + CellChangeTimes->{3.9918497405884743`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[BoxData["12.55365498952246`"], "Output", - CellChangeTimes->{3.991340544411957*^9}, - CellLabel-> - "Out[337]=",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[BoxData["13.297837378365703`"], "Output", + CellChangeTimes->{3.991340544411957*^9, 3.994387024571891*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"04e01e11-5810-4901-8c3e-2ca8f8ffd915"] }, Open ]], Cell[CellGroupData[{ @@ -7575,157 +7888,157 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849742961588*^9},ExpressionUUID->"9ad75b45-8f6d-114b-80bd-\ -d2b12a49fd20"], + CellChangeTimes->{3.991849742961588*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.744035802858657`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 341, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544611845*^9}, - CellLabel-> - "During evaluation of \ -In[338]:=",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.2192044618644736`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"6.596594096165593`*^-264\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 338, 342, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913405446218624`*^9}, + 2, 99, 13, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994387024673511*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], +In[99]:=",ExpressionUUID->"1c9a22de-ed2a-4513-89d2-f122af04cb51"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.752435063894365`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1800140011156678`*^-273\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 338, 343, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544630844*^9}, +\"", 2, 99, 14, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994387024682364*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], +In[99]:=",ExpressionUUID->"b76f993f-8efc-43cf-87e6-bda9c6e9376b"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.1108363233056726`*^-283\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 15, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994387024689353*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"6e72dfe7-e0ae-4061-a5e1-1a0635e55d62"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 338, 344, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340544639845*^9}, +during this calculation.\"", 2, 99, 16, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340544611845*^9, 3.994387024695545*^9}, CellLabel-> "During evaluation of \ -In[338]:=",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], +In[99]:=",ExpressionUUID->"af7b5707-eaaf-4550-88cf-5c637672d635"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk0Vd8XAHAlScVXSXgyvffuI5nL7NmbUCQkc4VMJTJlViElGpChwVQi +4d33TSWVlAxFRaOMJVR+JWNm5ed3f3/cdddnrbvOOXefs/c+ch6Btt5LeXh4 +Fqjn/+/pnhcNzLNFhjofC5xr9mgbtuaLRxl1nIDH7D2LJodFAUXfeIh3pMOr +5r131h0mINymrJ234zrcjOTyzPhrwpoRsfS59jtQZGjw552/KXyptgqcbK+D +b+q+jT7+9mDGHPw83v4e9kqkxLw+5A1z7dpZY+398OcvtzzSKwzqt94send9 +AiJaP+fHKCfChi8PBzyUFqDsanFFnmMarPN3K+PfyospGj0BCk5ZkK5u9sjK +fgU2PJ8XvHs+Gzovqz0dFxZEGr/AXKXiVThbFPtmqcQarNCWmGgbKgCxzK/J +GXkiWK4xs0tvVRGctjM3fD8tijuUOz6Ptd+AI7oFbi9OiKPqz8cu1y7eBJPR ++eiArzR89kXm/SHeUojanqlYO0TDXIF9NtkrSuHfAuUukWkaBjyy4TwXLAVx +O3fdhysk8exNqWlR8VIYevBshldFEi+l1LSlKJVCxom00CuRkvhAsDX+p10p +9IuyAhoENyBLvyUFC0sh3mDXfpqOFPK6tcoc1CqD7a75v7WNpbCTmaSppF8G +QnG/EuwtpfB2jmTSEJRBbv2p4jR3KZzvkP6637wMHlhU/VqeLIUKbaF+MnvL +YMyJET7RKYU8NJ2r3+PKwDVs6kxzjDQGXNJKy2ssA+KS8YbBU9LoWaM7+eNV +GbXeVC5/mjTKLLuXpva2DKL/bnxrXCSNtJrakIqOMshKcBV92CyNL1qIzpSf +ZdB8ofHqDSkZvL/khFzKSg7o/Xul4niNDK58sW9/pTkHTNpfL4w0yWDYEtJz +204OWPEs2+b2Xgb53FpoH2044Gkb0AnfZdDH9trNAUcOmMXIxcbxyaJyu4VB +vzcHgmSmC402yWJWy4izfjwHGg5cHa4Pl8Wdf8Reht3jgPlf3bVHY2QxbTPP +8bwHHHid1qq1JU4W7W5yftQ+4kDnQ4G4omRZhCX3+nnqODCyKnTtqVxZ7JBK +93d8zQHx8u3aZnWyeF3+3LjPAAf8Z8fjmgTlsPzs+jvC60jQC/ZZP7BWDods +nJxXipGwYrCLwysuh448gRt5aCTc6K5vM6TLoVjRctNeGRJ6nmQp3dOSQ0+x +2KCQTSRYn9LtKHCTw0YLl7c9RiRorI1Xjbkth68CBvI6/UjgOTvVcLlSDgdq +qvucAkh4zXvIpfKRHHL09zm2BpHgN2V7avyZHK5ste2sCSOhqIPZfaBLDguk +rhj5xpKw/mpToh0vHa23xv/mSydhbpNwj7I9HQOakiN8K0iYzqPFb3ahY0vZ +CR2fShIm/yGYum501LJ2cXF7QMLIhO4hE186XnS3qDOrJqH/kee0yzE6ZnR/ +VBmsJ+HljvtCSTfoaFis15XwnoTGx7W3z5fRMU5/oNuslYQG1Wa7jFt09LRz +MF3eRsITkb7s/Id0VL/gsCu6k4Q73Svl77XQscT3qYt2LwnZfq7QP0XH3zkf +cvmGSbj0+WD/f+bpGFH+wzZ1hIRM6yOnhhfpaMrnGik6RkLK5qRXswIMDPpw +UERsgoQTf247/iPNwPYgucujs1R8zvIFGZgxUJY8Yj3Ny4WDC/+IGO9gYI71 +f3S28XHBJ5BWuc2GgUsDVmRnLueC+27Vv7YuDMxnH3/GFOCCnaRzkm8AA93q +z76lCXHBgENeu3iRgR22C5tdxbjQLcu5aprDwMOzywS9xLkQfbE0f/IqA+te +bOv2keDC/fjiXNtSBvLEejp7SnJBw+naZaFqBtLarH5qy3BhI19mWmIfA33L +AxusWVxoik5P1RxgYITQrCIhT61vLC3l2yADUz8lpsxQLuo+f854koGVNx5Z +ZWzkguyd00n/Xc7EJwP3a4uVuLDeLSYuXImJTg0G39kaXLjXGhVLqDOR0Zvn +/JWynUXk8VZNJr6ysPxwajMX0jXDjmoAExV33+2o3cIFwdWBkSO7mPjCuEJv +vTYXyPjDEXkOTBS6mvijkLLFjF+45R4mGk5OX1XR4UJS/8HQMi8m6nP7lfV1 +ubDsoUeQTwQTA0ScPqrpc6FQZX+g6FEmOlckfSmmbFzkFtAQx0SNhGczEgZc +iE3d608/w8TGoEK7GcrSfHv83qUwMSTTO3s/mwvV0c6H4jKYmD4aNtZEed7b +4WBPLhOHLZvepBhy4Uq33YHzBUxUH1VxGaass2u3j0ExE8NXKM9sBy6EG9h4 +Zd9i4plmtt8M5fG1Fu4OdUzMejq8Q92ICx3+9LeHGpl4YOGr63HKT5/PQ2wz +Ew9OvOZropwWzZEpaWMiKyRx7S5jLkS2JqRWdzPRX6MtKo2yu8rexbe9TDSi +yUU2U1brX/1lbpCJLkfuGeht5YK4wXcroTEm2o0kLvOnzHPx8RP6FBNvFHr6 +ZFP+MZqloj3PxJn1azyfUX5jHpC/Y5GJQV72f4YoVxaaCbkvI9AGZ1TXmHAh +f0H6eKgAgeemHy/RoJzoODOcJET5UHCwNeWA22/25YkQWLq+K9aXssOqkpbb +4gTOrqpVjqNs6B3Hfi5FYO34aEwGZVaNE7eLTuB2PnW/QsqCEupSo/IE7pGw +/nuL8mSIwHleZQLnskTVHlL+1Nz3V0yDwJkIG/4ayg2sKn8lbQJTbJpP1FIm +49I/oQGBqqYOhU8pZ3YdsrQ3IrBbqNq3mvLRLVurfc0IlJ1/1VZB2StFUun4 +DgKtBux+lVLe8WMiJ92GwKOmrJIcyhrGzatu2lPzSQoLnaFMyy2KeeRC4OfF +fqkwykunj/5640bgkHhQx17Kg9b2e755Edgnk2xoRPl9qfKrWV8CPV15dtEp +V/Eu1xcMpOb7t0SYh/L1fT1lcqEE3o2yP95FxTv5fiVNK4pAxaqu7NuUg9ak +nrE4TmDu7OoDpyg7+R2Yd00gsNey9qs9ZQUZ8a7T5wkEV/7fQ9T+C0eNmeem +E8hca3bqLuXZ900Pyy8RmN/k3hxOuSkx6kpnAYHPDc5ETVDnq7x3l8BIMYFB +zhZ9JOXLeopRS0kCpzTNeTwpHxjpctpUSWDPsN+BZ8gFq+13m+ARgTEnTW8H +U9a6flbH7imBF2xe3KNRXu5gIH7sJYHBY/jbgzrvxY/z2l/3EPhGXmFXM5U/ +KWLh275+JTAh+nSSK+XwYKv7Mz8I9KuMjx+m8s+UWLwoO0Egv9OLR0sofzvn +7hDCz8L4a7sP8epR52tQia62moXS4zqDJ6l8n9k2NzwszEK3yle5vJRX8qaf +8qWxUOFkX+4sVS/Uouor3JVZaGSgL1WrScW/LTVOWoOFtiemzZQob92y1/KT +FgvVpHRLM6n64zA6+dURWdhyYTttH1WfjnmzRKx3U98n765vVqP+r/53z2on +Fj7tEHguRzlNtqbs5V4WnuzS5Q9V/X99dDQ282FhuAX/dmEVLrzclRzMjmLh +Ov7ADvlNVH00HHqz6SoLN71z7/nA5MK1nAc5PwtZ2Mkfx1hgUPV47uSBmyUs +9B83ucugbFAhtUi/w8L5pPZ7B+W44KlorUJ7xsJG586976Wo/Vt/59yKXyz8 +NG3cx1zPBfPRCPPvWvL4j6frzuZlXNigLp24wkAe2+/qwGmq/4yENNRtMpJH +p+F+WVhK5ce0sEHIDnns47bcv7FI3Q8WSlUW3eSxRZSxy2qehJDVn0QkkuUx +cE/QBqFRqj9uxB7LbnlU8p+Js6b6qb/fAC2oVx6TW3Iiyqh+C9xzjhnf5dGE +uS5u6QcSvql1vu0clcelsZ9elr4hQUUnpN5nmQIqaXv5fGwiod6sqCROWQHl +ftpyCqpIGPJccaQiVgF16OZq63Op/p9v8rjmpAKK9833SmeTMNoZx/8qWQEH +7Dt6mZdJ+G09l9OXoYBv9TzeK2SSMKM/2CBUooDPTduyhc+RsHRd83rftwo4 +eMXjrnsMCRINqVVSchvxlvjtwpVOJHXfF1t6um4jfhFSDqwXIOGnx7YS/caN ++Pl8prs9PwnnCiKsxl5txNE0eZ3vy0j4IN2R7fxxI053JuT9d5ED7hJXNiv9 +2Ih/E1fsEZ/mQJSQpPc7QUX8OuUW/KOPA+SsdJOksyI+V1TNXELd/9a2sFLK +RxXxyC+TAEtXDmxIumWjpaWEa0VlvB+fKIPLm3SFRQ4o4/u/CXWu2aXwkmak +OXFBBR1FeDS/XSsBvQ11aaptqti6OpXtc/wmCPFeD91/Qg1JetqTKvdikI6X +MXBmqeM3r9Pdl2RugACxt9K2UR13flsYbf9UCCpsiVsR+zRw/O3JdXnkdQjp +WVtvwbMZi6YKn9zyKIDRiXP25pc3o/7vLMNs9WuwTfV5trnyFjzqNxG5Wywf +nkzo/5l5vQXVNrwqLSrNgQAlja533prYq7PwJC/yCrBHvFqdBbRwbquHTIXa +JTBliu8UvK6FkeHtL3oVskAh7kxknbY2Hkpnz02aZICit24N0aWNPwZcSxwc +LoD3k4MnK4J18MVUj6WYZSrUXGv1GhfVxbOa+3aKfzsLkyWLM6r3dZGmsUXr +TksSeBIcgeydepgwdOUfR1YijCtmaN0Z08N1st8+H05IgAdFf/qmkvRR71Hd +KQ/TeHAxYaC+tAHW8Zt4zicfB8nDpx+qPDVAG+3dx1zzokF0pf/tnY5svOG/ +buuQbQQUbT0WPebMxm5JnpklphGgcSxla8ZeNt5cfsxZWjsCrMbKP3bsZ6Ou +iRjdTzICEtum5jz92fh3XjvZ7ls4zF6PNY6OZ+MmtfKfXhHh0KWf8aGYw0Zf +lapHh6+HwcGwolzzf9mYb76w2z4rDKb/vec9VM7GS4ONzluTwmAtvWNGvZKN +Ij7PbmgEhMGOFVIbHj9lo06vyHJXvTCobi32+vCRjTxqolIDH0LBQuiBcngH +G623rLm8uTEUOra9mBbvZuOWdS/dTleFwmTVryTXXjbqCeq3GBWEgnKBGvfn +IBu9V6cNLAkMheouo/Bzw2w8MvbzfLwHNd663aA6xsYcidRgfodQ8Dkd9i50 +io2u4XHfCTY13tPEbLFZNg6uuhX8RC0UTsxf8qyaZ6MlZ1h9HzMUhLeUKu1b +YKOmpTJzqXgo5B+umlpcpOLxztWMuyoU/gdTExct "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7739,116 +8052,113 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwV1nk0Vd8XAHAlScVXSXgyvffuI5nL7NmbUCQkc4VMJTJlViElGpChwVQi +4d33TSWVlAxFRaOMJVR+JWNm5ed3f3/cdddnrbvOOXefs/c+ch6Btt5LeXh4 +Fqjn/+/pnhcNzLNFhjofC5xr9mgbtuaLRxl1nIDH7D2LJodFAUXfeIh3pMOr +5r131h0mINymrJ234zrcjOTyzPhrwpoRsfS59jtQZGjw552/KXyptgqcbK+D +b+q+jT7+9mDGHPw83v4e9kqkxLw+5A1z7dpZY+398OcvtzzSKwzqt94send9 +AiJaP+fHKCfChi8PBzyUFqDsanFFnmMarPN3K+PfyospGj0BCk5ZkK5u9sjK +fgU2PJ8XvHs+Gzovqz0dFxZEGr/AXKXiVThbFPtmqcQarNCWmGgbKgCxzK/J +GXkiWK4xs0tvVRGctjM3fD8tijuUOz6Ptd+AI7oFbi9OiKPqz8cu1y7eBJPR ++eiArzR89kXm/SHeUojanqlYO0TDXIF9NtkrSuHfAuUukWkaBjyy4TwXLAVx +O3fdhysk8exNqWlR8VIYevBshldFEi+l1LSlKJVCxom00CuRkvhAsDX+p10p +9IuyAhoENyBLvyUFC0sh3mDXfpqOFPK6tcoc1CqD7a75v7WNpbCTmaSppF8G +QnG/EuwtpfB2jmTSEJRBbv2p4jR3KZzvkP6637wMHlhU/VqeLIUKbaF+MnvL +YMyJET7RKYU8NJ2r3+PKwDVs6kxzjDQGXNJKy2ssA+KS8YbBU9LoWaM7+eNV +GbXeVC5/mjTKLLuXpva2DKL/bnxrXCSNtJrakIqOMshKcBV92CyNL1qIzpSf +ZdB8ofHqDSkZvL/khFzKSg7o/Xul4niNDK58sW9/pTkHTNpfL4w0yWDYEtJz +204OWPEs2+b2Xgb53FpoH2044Gkb0AnfZdDH9trNAUcOmMXIxcbxyaJyu4VB +vzcHgmSmC402yWJWy4izfjwHGg5cHa4Pl8Wdf8Reht3jgPlf3bVHY2QxbTPP +8bwHHHid1qq1JU4W7W5yftQ+4kDnQ4G4omRZhCX3+nnqODCyKnTtqVxZ7JBK +93d8zQHx8u3aZnWyeF3+3LjPAAf8Z8fjmgTlsPzs+jvC60jQC/ZZP7BWDods +nJxXipGwYrCLwysuh448gRt5aCTc6K5vM6TLoVjRctNeGRJ6nmQp3dOSQ0+x +2KCQTSRYn9LtKHCTw0YLl7c9RiRorI1Xjbkth68CBvI6/UjgOTvVcLlSDgdq +qvucAkh4zXvIpfKRHHL09zm2BpHgN2V7avyZHK5ste2sCSOhqIPZfaBLDguk +rhj5xpKw/mpToh0vHa23xv/mSydhbpNwj7I9HQOakiN8K0iYzqPFb3ahY0vZ +CR2fShIm/yGYum501LJ2cXF7QMLIhO4hE186XnS3qDOrJqH/kee0yzE6ZnR/ +VBmsJ+HljvtCSTfoaFis15XwnoTGx7W3z5fRMU5/oNuslYQG1Wa7jFt09LRz +MF3eRsITkb7s/Id0VL/gsCu6k4Q73Svl77XQscT3qYt2LwnZfq7QP0XH3zkf +cvmGSbj0+WD/f+bpGFH+wzZ1hIRM6yOnhhfpaMrnGik6RkLK5qRXswIMDPpw +UERsgoQTf247/iPNwPYgucujs1R8zvIFGZgxUJY8Yj3Ny4WDC/+IGO9gYI71 +f3S28XHBJ5BWuc2GgUsDVmRnLueC+27Vv7YuDMxnH3/GFOCCnaRzkm8AA93q +z76lCXHBgENeu3iRgR22C5tdxbjQLcu5aprDwMOzywS9xLkQfbE0f/IqA+te +bOv2keDC/fjiXNtSBvLEejp7SnJBw+naZaFqBtLarH5qy3BhI19mWmIfA33L +AxusWVxoik5P1RxgYITQrCIhT61vLC3l2yADUz8lpsxQLuo+f854koGVNx5Z +ZWzkguyd00n/Xc7EJwP3a4uVuLDeLSYuXImJTg0G39kaXLjXGhVLqDOR0Zvn +/JWynUXk8VZNJr6ysPxwajMX0jXDjmoAExV33+2o3cIFwdWBkSO7mPjCuEJv +vTYXyPjDEXkOTBS6mvijkLLFjF+45R4mGk5OX1XR4UJS/8HQMi8m6nP7lfV1 +ubDsoUeQTwQTA0ScPqrpc6FQZX+g6FEmOlckfSmmbFzkFtAQx0SNhGczEgZc +iE3d608/w8TGoEK7GcrSfHv83qUwMSTTO3s/mwvV0c6H4jKYmD4aNtZEed7b +4WBPLhOHLZvepBhy4Uq33YHzBUxUH1VxGaass2u3j0ExE8NXKM9sBy6EG9h4 +Zd9i4plmtt8M5fG1Fu4OdUzMejq8Q92ICx3+9LeHGpl4YOGr63HKT5/PQ2wz +Ew9OvOZropwWzZEpaWMiKyRx7S5jLkS2JqRWdzPRX6MtKo2yu8rexbe9TDSi +yUU2U1brX/1lbpCJLkfuGeht5YK4wXcroTEm2o0kLvOnzHPx8RP6FBNvFHr6 +ZFP+MZqloj3PxJn1azyfUX5jHpC/Y5GJQV72f4YoVxaaCbkvI9AGZ1TXmHAh +f0H6eKgAgeemHy/RoJzoODOcJET5UHCwNeWA22/25YkQWLq+K9aXssOqkpbb +4gTOrqpVjqNs6B3Hfi5FYO34aEwGZVaNE7eLTuB2PnW/QsqCEupSo/IE7pGw +/nuL8mSIwHleZQLnskTVHlL+1Nz3V0yDwJkIG/4ayg2sKn8lbQJTbJpP1FIm +49I/oQGBqqYOhU8pZ3YdsrQ3IrBbqNq3mvLRLVurfc0IlJ1/1VZB2StFUun4 +DgKtBux+lVLe8WMiJ92GwKOmrJIcyhrGzatu2lPzSQoLnaFMyy2KeeRC4OfF +fqkwykunj/5640bgkHhQx17Kg9b2e755Edgnk2xoRPl9qfKrWV8CPV15dtEp +V/Eu1xcMpOb7t0SYh/L1fT1lcqEE3o2yP95FxTv5fiVNK4pAxaqu7NuUg9ak +nrE4TmDu7OoDpyg7+R2Yd00gsNey9qs9ZQUZ8a7T5wkEV/7fQ9T+C0eNmeem +E8hca3bqLuXZ900Pyy8RmN/k3hxOuSkx6kpnAYHPDc5ETVDnq7x3l8BIMYFB +zhZ9JOXLeopRS0kCpzTNeTwpHxjpctpUSWDPsN+BZ8gFq+13m+ARgTEnTW8H +U9a6flbH7imBF2xe3KNRXu5gIH7sJYHBY/jbgzrvxY/z2l/3EPhGXmFXM5U/ +KWLh275+JTAh+nSSK+XwYKv7Mz8I9KuMjx+m8s+UWLwoO0Egv9OLR0sofzvn +7hDCz8L4a7sP8epR52tQia62moXS4zqDJ6l8n9k2NzwszEK3yle5vJRX8qaf +8qWxUOFkX+4sVS/Uouor3JVZaGSgL1WrScW/LTVOWoOFtiemzZQob92y1/KT +FgvVpHRLM6n64zA6+dURWdhyYTttH1WfjnmzRKx3U98n765vVqP+r/53z2on +Fj7tEHguRzlNtqbs5V4WnuzS5Q9V/X99dDQ282FhuAX/dmEVLrzclRzMjmLh +Ov7ADvlNVH00HHqz6SoLN71z7/nA5MK1nAc5PwtZ2Mkfx1hgUPV47uSBmyUs +9B83ucugbFAhtUi/w8L5pPZ7B+W44KlorUJ7xsJG586976Wo/Vt/59yKXyz8 +NG3cx1zPBfPRCPPvWvL4j6frzuZlXNigLp24wkAe2+/qwGmq/4yENNRtMpJH +p+F+WVhK5ce0sEHIDnns47bcv7FI3Q8WSlUW3eSxRZSxy2qehJDVn0QkkuUx +cE/QBqFRqj9uxB7LbnlU8p+Js6b6qb/fAC2oVx6TW3Iiyqh+C9xzjhnf5dGE +uS5u6QcSvql1vu0clcelsZ9elr4hQUUnpN5nmQIqaXv5fGwiod6sqCROWQHl +ftpyCqpIGPJccaQiVgF16OZq63Op/p9v8rjmpAKK9833SmeTMNoZx/8qWQEH +7Dt6mZdJ+G09l9OXoYBv9TzeK2SSMKM/2CBUooDPTduyhc+RsHRd83rftwo4 +eMXjrnsMCRINqVVSchvxlvjtwpVOJHXfF1t6um4jfhFSDqwXIOGnx7YS/caN ++Pl8prs9PwnnCiKsxl5txNE0eZ3vy0j4IN2R7fxxI053JuT9d5ED7hJXNiv9 +2Ih/E1fsEZ/mQJSQpPc7QUX8OuUW/KOPA+SsdJOksyI+V1TNXELd/9a2sFLK +RxXxyC+TAEtXDmxIumWjpaWEa0VlvB+fKIPLm3SFRQ4o4/u/CXWu2aXwkmak +OXFBBR1FeDS/XSsBvQ11aaptqti6OpXtc/wmCPFeD91/Qg1JetqTKvdikI6X +MXBmqeM3r9Pdl2RugACxt9K2UR13flsYbf9UCCpsiVsR+zRw/O3JdXnkdQjp +WVtvwbMZi6YKn9zyKIDRiXP25pc3o/7vLMNs9WuwTfV5trnyFjzqNxG5Wywf +nkzo/5l5vQXVNrwqLSrNgQAlja533prYq7PwJC/yCrBHvFqdBbRwbquHTIXa +JTBliu8UvK6FkeHtL3oVskAh7kxknbY2Hkpnz02aZICit24N0aWNPwZcSxwc +LoD3k4MnK4J18MVUj6WYZSrUXGv1GhfVxbOa+3aKfzsLkyWLM6r3dZGmsUXr +TksSeBIcgeydepgwdOUfR1YijCtmaN0Z08N1st8+H05IgAdFf/qmkvRR71Hd +KQ/TeHAxYaC+tAHW8Zt4zicfB8nDpx+qPDVAG+3dx1zzokF0pf/tnY5svOG/ +buuQbQQUbT0WPebMxm5JnpklphGgcSxla8ZeNt5cfsxZWjsCrMbKP3bsZ6Ou +iRjdTzICEtum5jz92fh3XjvZ7ls4zF6PNY6OZ+MmtfKfXhHh0KWf8aGYw0Zf +lapHh6+HwcGwolzzf9mYb76w2z4rDKb/vec9VM7GS4ONzluTwmAtvWNGvZKN +Ij7PbmgEhMGOFVIbHj9lo06vyHJXvTCobi32+vCRjTxqolIDH0LBQuiBcngH +G623rLm8uTEUOra9mBbvZuOWdS/dTleFwmTVryTXXjbqCeq3GBWEgnKBGvfn +IBu9V6cNLAkMheouo/Bzw2w8MvbzfLwHNd663aA6xsYcidRgfodQ8Dkd9i50 +io2u4XHfCTY13tPEbLFZNg6uuhX8RC0UTsxf8qyaZ6MlZ1h9HzMUhLeUKu1b +YKOmpTJzqXgo5B+umlpcpOLxztWMuyoU/gdTExct "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.057165190903249216`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7860,19 +8170,19 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.057165190903249216`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7886,115 +8196,112 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk8VV0XB3DxZCrykFwz956LypAGwr2thSaKSpSoKENkDClDGTIPGZNk -DpnuiRJpQFFpkoqI8ChNZpmi5D3vX+fz/ePsc/Zee6/fVjzuYebAzcXFxbuE -i+v/z5neZ01EbMEW27f5d+9s0t3Slk3z0+8MhctpKYf6BWmA4q+P0zqTYdv3 -tLFSQRXw3VvawdOZDwEWTfVRgpvh31GJ5LmOm6De+eC+teBO6Ltv6jHV8QhM -NVIT2wUsYTsx2DPR8RayYsZ/vONzgrkO7UvjHZ+g8Z6cR9fiGWg0vF7wJn8S -RuqCS617okCmr/brcdUFSOkR7egzSYaVrjalfIY8aL9b2may7zIka26/Z2rB -j0eW6fMcLsyCD+nrGiZEhPA/6X/Pux/Og9iCoNfckv+iRrJBuuHgNZBI/Ryd -kiWG1R2GC/wbiiDS3GjL2xlxPNkgPdomUwzeOnk2z0JpuNS2KZo1VgLGucJT -u+JoWGt4JyRiugTofIFRLZdoKHBqLv/l7xJobTtQ+a6YhgHjx21M+EtB3XM5 -T28LDS34uG8qKJbC96IzRT+lJLF2nGu/sFkpHF5pOiJ9SxKtJh4f4q4sha1j -8/7un6VwR1y3nrZdGfjtTF3zcFgKW0QPeLo5lQGZp9YlNiOFgSKFH3PcyoBm -bqtTyy+N10bqrOfOlMHwncezPOrSuL6Ib+R8XBmkhCb6XDkrjWG8P5Tbqsrg -k7iSe5OQDGpGVscWcpeDhEe9rISEDD6d1TQ9zlcOu5stXzkryKDuLgkD6eXl -UO0fq7pigwxutI19ECJeDjF944OHLGWwha63qKBSDutL7p0Yy5dBEamEpOLd -5RDC2ndMarMssuZ52d3J5bDzaPZPbQNZdEh3CfK/XA7CwUMXLHbLYjBr1EA8 -sxwyG8OLEm1lsdxbyoRdWA53jO8O8UbLova+H64Ha8ph3JLhO/lBFjeK/227 -1VUOR09Px7wMkEOxc4SlkBwHmJcNZAbD5ZBnQfeeDJ1DzT+Bw5coh7bKvLnK -Shzw/7O61aBADrfESI5pqHPg0oWj4rUv5XA/r1CR4BYOvEx6mlMoK4+HnTOS -vh/mgC55pep8vTxKiCW57bjMga0dLQujzfK4JvdZQGwGB0y5/tlh81YeuzzH -Cl5kccDOzP0DfJHHIb3GnVjAge0BikHBSxWwxvtP93wFBzzlZ67pr1XAgx9+ -Hr39jANNJ3JGGn0VcMJ+1Fv/FweM/uiIBgYo4DO16N0CvznQktimtTFYAbuL -C3a8WuDAh1qB4IJoBdwbHFFkxEPC6DIf0fBMBQQxXLFSmARaxU7t7Y8UkJYf -8GaMToLrr4ngZiFFXK6z5uRjIxJ0Tzmu+iqqiPr9L3wMd5PAP9hVxkNTRKu6 -oCUPTEko7G58v4WuiNc/0q7l7yeht+6S6m0tRfwRoiy++QgJe8J1OvNsFPHT -7QGVOA8S5P5y3OrtFdHehZ386BQJw750nh5nRWzuEYqY8iYhymmZOs1HETuW -mK/YdZaEhl09Fy5GKeL2mGN3HgWTsF40RCOgUhG1nm779jGRBK7Y6ab0akW8 -6hDKfplMQgvPSavqe4poeaRIuSaVBJdps/CJx4p4doFxNyidhIJOovtEFzXe -8vIf3TkkrMppjjDnoWPAoSGehxwSBiTYMl78dDR/ef2L8w0SbiZWViYI0dE3 -us5BuJKaT2jGx+cSdHzsdNfQuIr6XwfX9fqqdOR1sImJv0vC3FqRXjULOoY9 -0eg3eELCTJZUyAYrOo5BWVTOUxKmVjAJHRs6pq9U4f7VTNVjUufkVmc60kTm -3TJfkPDpnt2M1Tk6TpT8Zd1qJaFPzf2KbSgdE6TPR42+IeFjzlmWYyQdLx6v -K2O+I+H9hfjQU0l0jOk/FRjZTsLzXTXCUYV05CQ4WUt2kfD0wcPK+FI6RviU -+23oJqFJ46V5yg06frxRfNroIwl1Yv0Z2bV09Dz8XsC5l5pvt6Dy7Vd03LMY -e8f3EwkZLkfh0zQdS60se1/+IOFyj9Onb/N0bETzTYWDJKTu8Q4fWaSjg1im -r98QCRc3RL34JcDA03377omPkBD6u/LgCjkGjuta2MuOkxDkdn9+JYOBg+9K -iHbKgX1PsqRUGPilYKA9aoIE38buz8z1DJypdRYe+EnVL3apJ2s7Aw0mnMac -p0lwWlghZrCLgQ+f55oumSHB0UOqesdeBtIz4wtTKdvu1/hjZsXAN1/+sG/M -knDksU6OpQ0DfepZIVq/SLDS3mpw1J6B183K62spm0sfinJ2Z6D3+mzNqjkS -9sXbrfXwZuARgwHHtfMkmC66tficZWBKErVOlHd+Dl0ZHMrAr6uTuf1+k8Aq -K89NS2Og7sz3Hwt/SOhWKMvZdpWBW4L9XfcskOCfVpI9lcPAV4OhflmUa0KK -Ms1KGHjMfHyTxl8SDswWXF1CMtCk8e1XL8pTrtcyKm4ysH9CiXmL8nrL3HTh -+wzsbmearF4k4c2r7MsPGhi4N99ssw1lT8OsNNfH1PjW07eSKK+ovXpJ+jkD -LYJaGxook+oZqc9bGMiQvW4zTNmkID3F7x0DD3ayklZy3YBhycvJKp0MDPlq -cUCHckzCpaSOjwx0WlFzw4ry6qWpiRH9DCwsZ2afpdzsn5yw6Sv1fskJegpl -x/HEiwODDCwNMWSXUl7qmBCfMsbAWwbBYw8oF3THxxlMMfBb9BedFsqG++Ji -J35R6xemJ9tN+dOTmJjcBQYKTRhnDFAOYUVH7+EmkC7dUzlIWeFmZNRfXgKX -9d2zH6FcrxwRyVlGoPX1ylvDlI9mhUUcFiGQ5had853yH9EL4cvECdSvEV7d -T/lqVEjYXUkCkzKE9r2nrPs36IKzHIEytWa0Zsqd3udDaQwCB/XLgqopn/kR -GPJUmcCq8YHIPMqrbAKCfVUJDBFq0YymfLvNL4ipSaCB66bzbpTNjc+eb9tE -YLTroJsp5cl633MXdAlUmru/RJVy8qbTgeuBwPbIc7q8lDXLvAP6DQnsoC3Q -eqh6tCp4+SfuJPCallB2BWWh5R5nR/cR6D2pnGNCuTzE7UzWAQL1DnbKSFA2 -nnXx3W1NIKfVfmsPtT+iPjn5lNoTGOhml2pDWdnyhPchZwKVrwTVSVN+8srB -i9+dQLfBF5faqP33T+1xT8czBG7oNd3DonxN/ZiHeCCBOg83bBii9q9BgY17 -UzCB2saFT9MoByUcdqXHEGiVkLh0gNrvckutXd5cJPDrnfsV4ZTv+x86GZxC -4PnjXSsIyvMOB5x6MwlUfWg+coA6L1e6zU/E5xGouNTJbYg6X5v37XdkFVH+ -+qEgkLIva699xg0Ch9i72Zeo8zghamx74BFVn+FS1RzqPHe60ltPPiXQsc9d -UJhyw5N5CHpJ4KrUJDE/qh8k+pfJF78nMC/YvdxwioR1n5b3zQ0SaHdpGa2M -6ic01hdT4XECP3zf5vmb6jdcaQ/q6NMETm7/9mcH5ddG7tm7FgnkUhuvaR8l -wb3y9ZEsMSZaOmm3N1L97MCy4leVNCauk300Pk31uy0OwewnskyMM/5mRFAW -ktSUHVNm4t+D12tPf6fqFZz8EVlMbH5B3hgaIGFwj4X1gD0TZYXOLxA9JLwt -UXvxy5mJ4cvCgqSp/nuXh1dPyIOJnif5zYSp/hxdUy2l5Ud938V65HsnCSry -tK7IeCZ+4J6V82oj4cRol+XaaiZqGZ083/6c6k87bzXDPWp8if4rSc9I0MqP -3WzewMQ/MYckjal84T3Aop17zkS20jajisckFD3I6mjpZWKE4n8J+xqovIuz -PeDFp4TnFlpbv1N55j6oSl+3XAlDTt/XD79FwuyOuZERESUcjpfLkbtJgiBP -crizlBJWBbsydlL5uM6vscpWTQlzBvZ4+JaQcM5BSWzPfiUMHUn6i1lUvm4Z -fr02RwnTl/5jdymUhNyrd67+uKaE1k7PXN9Qeb56LuzE9WIl9C/8FSYYRPXT -KtlF+k0llP82POAdQILdmj3qUo+VkJVaGsLwIaFi1c04/iElrLfKYMzak2A0 -dsboi5YyHq2+33RmKwkymnIR/CxlrPm2i7nGgMpXr6ZHa/WVUfBPg+4HoPJq -RoTltUsZ5YelY9T0qPvKQon6oo0yPqJ9+0RqkuC1/KOYZLQy6i950SAuR+Xf -auzd3a2MJ49r2Z2fou6HdvzeVUEqODG7cZ1wOgdGs7c+qA9TQUlFnzq+SxwY -+xDM9yJaBaW3xQb8TeLAzz1zV/tTVJAeJRD1OZYDs3qDTcLFKtgj9Uo0LogD -3CtfrnJuVcG/x0M3WjpyQLIp4a6s4mr8HbGy96smdR8kJLgjH63G4iOhause -loPoK6WLFWNr8KPNcRft9jKQibqxV0tLFXOzzop4VpVC+lodEbETakgPkM+G -+BJ4LqW/aTJJHQU3rj7bblkMujKPEjXea2D1LztBk/kiEObJ9zkWug5zzQcu -LhQXglyIPOuQkibqKWUqm28qAAHm4Wqzp5q4f3X9f3NP8kGdLXnjzJH16Da/ -KqXWOw+8ekUbjbk2IMcs05IhmAtjk3EWRukb0MiF7/BAaBbs0HiSYaS2ESMv -7jYvF7sKdZN6v2dbNqJHWovU6dh0cFdd3/XGYRNuFOvrWrs7Ddij9m2HBLSw -ksNdcHIxBbYRNBOhfC3kFTD+V+VPEqgEx5x9pK2N/fMNZ/YTibDGQaee2aWN -RRpbOhJS48Chzims6tRmzJJzTT3oGA31uW32E+I6WC9rIktCBEwVL85q1Ohg -k4e2wAqvC2DHLBPIMNHFDx5h7fYrQ2BiTYrWzXFdnJgUL4yLPQd3Cn73T0fp -oUUptLRW+oHVVgbqybHwdpF/rLiZL0i7RdaqN7DwRz1HOU/MG8QFXStNDrKx -8Zha708nTygwPOc/foiNVbRAoWdHPGH9uYuGKYfZmNP6NqnQzBNMxyvaO4+x -UV3IIuEUyxMi3k/P2bmy8T+lz+IWIp7wKz/IwD+EjZlpW5UTvTygSy/lXVEZ -GxcHlny9LO8OTqcLMo1INk4F9We/FnSHGfK2w3AFG8060o6KzbiBKL1zVrOa -jeec9XvrXrrBLn5ZmQcNbGwWHt9b6O8G99uK7N+1s/EdLTe9rNMVjIXvqPl2 -svHt9kjbvCZX6NzxbIbWzcZX89G9+RWuMHV3KOrof2zcO/n8e3OUK6jlreP8 -GGSj6JWHJbk6rnC/S983boSN9sm8aZNMaryV+0FjnI3ikbtEzERdwTHy9Buf -aTZ+PtieoTnkAlMNERkSv9gYzyeTd7PDBULnL9vdnWdjj7WjIjS5gMjGEtUj -C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== +1:eJwV1nk0Vd8XAHAlScVXSXgyvffuI5nL7NmbUCQkc4VMJTJlViElGpChwVQi +4d33TSWVlAxFRaOMJVR+JWNm5ed3f3/cdddnrbvOOXefs/c+ch6Btt5LeXh4 +Fqjn/+/pnhcNzLNFhjofC5xr9mgbtuaLRxl1nIDH7D2LJodFAUXfeIh3pMOr +5r131h0mINymrJ234zrcjOTyzPhrwpoRsfS59jtQZGjw552/KXyptgqcbK+D +b+q+jT7+9mDGHPw83v4e9kqkxLw+5A1z7dpZY+398OcvtzzSKwzqt94send9 +AiJaP+fHKCfChi8PBzyUFqDsanFFnmMarPN3K+PfyospGj0BCk5ZkK5u9sjK +fgU2PJ8XvHs+Gzovqz0dFxZEGr/AXKXiVThbFPtmqcQarNCWmGgbKgCxzK/J +GXkiWK4xs0tvVRGctjM3fD8tijuUOz6Ptd+AI7oFbi9OiKPqz8cu1y7eBJPR ++eiArzR89kXm/SHeUojanqlYO0TDXIF9NtkrSuHfAuUukWkaBjyy4TwXLAVx +O3fdhysk8exNqWlR8VIYevBshldFEi+l1LSlKJVCxom00CuRkvhAsDX+p10p +9IuyAhoENyBLvyUFC0sh3mDXfpqOFPK6tcoc1CqD7a75v7WNpbCTmaSppF8G +QnG/EuwtpfB2jmTSEJRBbv2p4jR3KZzvkP6637wMHlhU/VqeLIUKbaF+MnvL +YMyJET7RKYU8NJ2r3+PKwDVs6kxzjDQGXNJKy2ssA+KS8YbBU9LoWaM7+eNV +GbXeVC5/mjTKLLuXpva2DKL/bnxrXCSNtJrakIqOMshKcBV92CyNL1qIzpSf +ZdB8ofHqDSkZvL/khFzKSg7o/Xul4niNDK58sW9/pTkHTNpfL4w0yWDYEtJz +204OWPEs2+b2Xgb53FpoH2044Gkb0AnfZdDH9trNAUcOmMXIxcbxyaJyu4VB +vzcHgmSmC402yWJWy4izfjwHGg5cHa4Pl8Wdf8Reht3jgPlf3bVHY2QxbTPP +8bwHHHid1qq1JU4W7W5yftQ+4kDnQ4G4omRZhCX3+nnqODCyKnTtqVxZ7JBK +93d8zQHx8u3aZnWyeF3+3LjPAAf8Z8fjmgTlsPzs+jvC60jQC/ZZP7BWDods +nJxXipGwYrCLwysuh448gRt5aCTc6K5vM6TLoVjRctNeGRJ6nmQp3dOSQ0+x +2KCQTSRYn9LtKHCTw0YLl7c9RiRorI1Xjbkth68CBvI6/UjgOTvVcLlSDgdq +qvucAkh4zXvIpfKRHHL09zm2BpHgN2V7avyZHK5ste2sCSOhqIPZfaBLDguk +rhj5xpKw/mpToh0vHa23xv/mSydhbpNwj7I9HQOakiN8K0iYzqPFb3ahY0vZ +CR2fShIm/yGYum501LJ2cXF7QMLIhO4hE186XnS3qDOrJqH/kee0yzE6ZnR/ +VBmsJ+HljvtCSTfoaFis15XwnoTGx7W3z5fRMU5/oNuslYQG1Wa7jFt09LRz +MF3eRsITkb7s/Id0VL/gsCu6k4Q73Svl77XQscT3qYt2LwnZfq7QP0XH3zkf +cvmGSbj0+WD/f+bpGFH+wzZ1hIRM6yOnhhfpaMrnGik6RkLK5qRXswIMDPpw +UERsgoQTf247/iPNwPYgucujs1R8zvIFGZgxUJY8Yj3Ny4WDC/+IGO9gYI71 +f3S28XHBJ5BWuc2GgUsDVmRnLueC+27Vv7YuDMxnH3/GFOCCnaRzkm8AA93q +z76lCXHBgENeu3iRgR22C5tdxbjQLcu5aprDwMOzywS9xLkQfbE0f/IqA+te +bOv2keDC/fjiXNtSBvLEejp7SnJBw+naZaFqBtLarH5qy3BhI19mWmIfA33L +AxusWVxoik5P1RxgYITQrCIhT61vLC3l2yADUz8lpsxQLuo+f854koGVNx5Z +ZWzkguyd00n/Xc7EJwP3a4uVuLDeLSYuXImJTg0G39kaXLjXGhVLqDOR0Zvn +/JWynUXk8VZNJr6ysPxwajMX0jXDjmoAExV33+2o3cIFwdWBkSO7mPjCuEJv +vTYXyPjDEXkOTBS6mvijkLLFjF+45R4mGk5OX1XR4UJS/8HQMi8m6nP7lfV1 +ubDsoUeQTwQTA0ScPqrpc6FQZX+g6FEmOlckfSmmbFzkFtAQx0SNhGczEgZc +iE3d608/w8TGoEK7GcrSfHv83qUwMSTTO3s/mwvV0c6H4jKYmD4aNtZEed7b +4WBPLhOHLZvepBhy4Uq33YHzBUxUH1VxGaass2u3j0ExE8NXKM9sBy6EG9h4 +Zd9i4plmtt8M5fG1Fu4OdUzMejq8Q92ICx3+9LeHGpl4YOGr63HKT5/PQ2wz +Ew9OvOZropwWzZEpaWMiKyRx7S5jLkS2JqRWdzPRX6MtKo2yu8rexbe9TDSi +yUU2U1brX/1lbpCJLkfuGeht5YK4wXcroTEm2o0kLvOnzHPx8RP6FBNvFHr6 +ZFP+MZqloj3PxJn1azyfUX5jHpC/Y5GJQV72f4YoVxaaCbkvI9AGZ1TXmHAh +f0H6eKgAgeemHy/RoJzoODOcJET5UHCwNeWA22/25YkQWLq+K9aXssOqkpbb +4gTOrqpVjqNs6B3Hfi5FYO34aEwGZVaNE7eLTuB2PnW/QsqCEupSo/IE7pGw +/nuL8mSIwHleZQLnskTVHlL+1Nz3V0yDwJkIG/4ayg2sKn8lbQJTbJpP1FIm +49I/oQGBqqYOhU8pZ3YdsrQ3IrBbqNq3mvLRLVurfc0IlJ1/1VZB2StFUun4 +DgKtBux+lVLe8WMiJ92GwKOmrJIcyhrGzatu2lPzSQoLnaFMyy2KeeRC4OfF +fqkwykunj/5640bgkHhQx17Kg9b2e755Edgnk2xoRPl9qfKrWV8CPV15dtEp +V/Eu1xcMpOb7t0SYh/L1fT1lcqEE3o2yP95FxTv5fiVNK4pAxaqu7NuUg9ak +nrE4TmDu7OoDpyg7+R2Yd00gsNey9qs9ZQUZ8a7T5wkEV/7fQ9T+C0eNmeem +E8hca3bqLuXZ900Pyy8RmN/k3hxOuSkx6kpnAYHPDc5ETVDnq7x3l8BIMYFB +zhZ9JOXLeopRS0kCpzTNeTwpHxjpctpUSWDPsN+BZ8gFq+13m+ARgTEnTW8H +U9a6flbH7imBF2xe3KNRXu5gIH7sJYHBY/jbgzrvxY/z2l/3EPhGXmFXM5U/ +KWLh275+JTAh+nSSK+XwYKv7Mz8I9KuMjx+m8s+UWLwoO0Egv9OLR0sofzvn +7hDCz8L4a7sP8epR52tQia62moXS4zqDJ6l8n9k2NzwszEK3yle5vJRX8qaf +8qWxUOFkX+4sVS/Uouor3JVZaGSgL1WrScW/LTVOWoOFtiemzZQob92y1/KT +FgvVpHRLM6n64zA6+dURWdhyYTttH1WfjnmzRKx3U98n765vVqP+r/53z2on +Fj7tEHguRzlNtqbs5V4WnuzS5Q9V/X99dDQ282FhuAX/dmEVLrzclRzMjmLh +Ov7ADvlNVH00HHqz6SoLN71z7/nA5MK1nAc5PwtZ2Mkfx1hgUPV47uSBmyUs +9B83ucugbFAhtUi/w8L5pPZ7B+W44KlorUJ7xsJG586976Wo/Vt/59yKXyz8 +NG3cx1zPBfPRCPPvWvL4j6frzuZlXNigLp24wkAe2+/qwGmq/4yENNRtMpJH +p+F+WVhK5ce0sEHIDnns47bcv7FI3Q8WSlUW3eSxRZSxy2qehJDVn0QkkuUx +cE/QBqFRqj9uxB7LbnlU8p+Js6b6qb/fAC2oVx6TW3Iiyqh+C9xzjhnf5dGE +uS5u6QcSvql1vu0clcelsZ9elr4hQUUnpN5nmQIqaXv5fGwiod6sqCROWQHl +ftpyCqpIGPJccaQiVgF16OZq63Op/p9v8rjmpAKK9833SmeTMNoZx/8qWQEH +7Dt6mZdJ+G09l9OXoYBv9TzeK2SSMKM/2CBUooDPTduyhc+RsHRd83rftwo4 +eMXjrnsMCRINqVVSchvxlvjtwpVOJHXfF1t6um4jfhFSDqwXIOGnx7YS/caN ++Pl8prs9PwnnCiKsxl5txNE0eZ3vy0j4IN2R7fxxI053JuT9d5ED7hJXNiv9 +2Ih/E1fsEZ/mQJSQpPc7QUX8OuUW/KOPA+SsdJOksyI+V1TNXELd/9a2sFLK +RxXxyC+TAEtXDmxIumWjpaWEa0VlvB+fKIPLm3SFRQ4o4/u/CXWu2aXwkmak +OXFBBR1FeDS/XSsBvQ11aaptqti6OpXtc/wmCPFeD91/Qg1JetqTKvdikI6X +MXBmqeM3r9Pdl2RugACxt9K2UR13flsYbf9UCCpsiVsR+zRw/O3JdXnkdQjp +WVtvwbMZi6YKn9zyKIDRiXP25pc3o/7vLMNs9WuwTfV5trnyFjzqNxG5Wywf +nkzo/5l5vQXVNrwqLSrNgQAlja533prYq7PwJC/yCrBHvFqdBbRwbquHTIXa +JTBliu8UvK6FkeHtL3oVskAh7kxknbY2Hkpnz02aZICit24N0aWNPwZcSxwc +LoD3k4MnK4J18MVUj6WYZSrUXGv1GhfVxbOa+3aKfzsLkyWLM6r3dZGmsUXr +TksSeBIcgeydepgwdOUfR1YijCtmaN0Z08N1st8+H05IgAdFf/qmkvRR71Hd +KQ/TeHAxYaC+tAHW8Zt4zicfB8nDpx+qPDVAG+3dx1zzokF0pf/tnY5svOG/ +buuQbQQUbT0WPebMxm5JnpklphGgcSxla8ZeNt5cfsxZWjsCrMbKP3bsZ6Ou +iRjdTzICEtum5jz92fh3XjvZ7ls4zF6PNY6OZ+MmtfKfXhHh0KWf8aGYw0Zf +lapHh6+HwcGwolzzf9mYb76w2z4rDKb/vec9VM7GS4ONzluTwmAtvWNGvZKN +Ij7PbmgEhMGOFVIbHj9lo06vyHJXvTCobi32+vCRjTxqolIDH0LBQuiBcngH +G623rLm8uTEUOra9mBbvZuOWdS/dTleFwmTVryTXXjbqCeq3GBWEgnKBGvfn +IBu9V6cNLAkMheouo/Bzw2w8MvbzfLwHNd663aA6xsYcidRgfodQ8Dkd9i50 +io2u4XHfCTY13tPEbLFZNg6uuhX8RC0UTsxf8qyaZ6MlZ1h9HzMUhLeUKu1b +YKOmpTJzqXgo5B+umlpcpOLxztWMuyoU/gdTExct "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.060553949877372025`}}, + "PlotRange" -> {{0, 30}, {0., 0.057165190903249216`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8005,6 +8312,7 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8032,7 +8340,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.060553949877372025`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.057165190903249216`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8040,9 +8349,8 @@ C2xMl6lZ1VHhAtlud6cXF9kY/vbfQP8sF/gfJ46Kpg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913408819317417`*^9}, - CellLabel-> - "Out[338]=",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] + CellChangeTimes->{3.9913408819317417`*^9, 3.994387486958562*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"1e9e9190-aecc-4b37-a7f2-80dd4af81c70"] }, Open ]], Cell[CellGroupData[{ @@ -8095,66 +8403,70 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[339]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], + "In[100]:=",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.2264340105931995`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 339, 345, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881982744*^9}, - CellLabel-> - "During evaluation of \ -In[339]:=",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2375694519917973`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 346, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340881991743*^9}, - CellLabel-> - "During evaluation of \ -In[339]:=",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.9304457788981872`*^-189\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7706898613503373`*^-173\\\", \ \\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ 54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 339, 347, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882000746*^9}, + 2, 100, 17, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.9943874871180153`*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], +In[100]:=",ExpressionUUID->"c53b2227-3368-4c40-a367-d1ca719997e0"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"8.433180480105247`*^-177\\\", \ +\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ +734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 100, 18, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994387487128158*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"9df087bd-ad46-4cc0-abd6-2b56c562ae7d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.016430802613442`*^-180\\\", \ +\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ +116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ +is too small to represent as a normalized machine number; precision may be \ +lost.\"", 2, 100, 19, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.9943874871369658`*^9}, + CellLabel-> + "During evaluation of \ +In[100]:=",ExpressionUUID->"bbd889da-6139-41ab-8c5c-6c377cd9c585"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 339, 348, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340882008745*^9}, +during this calculation.\"", 2, 100, 20, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340881982744*^9, 3.994387487145545*^9}, CellLabel-> "During evaluation of \ -In[339]:=",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], +In[100]:=",ExpressionUUID->"0318533f-c3f1-4d7e-b47a-38d9e066c6f9"], -Cell[BoxData["12.553654989521348`"], "Output", - CellChangeTimes->{3.9913408882266617`*^9}, +Cell[BoxData["13.296932853286101`"], "Output", + CellChangeTimes->{3.9913408882266617`*^9, 3.994387535327139*^9}, CellLabel-> - "Out[339]=",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] + "Out[100]=",ExpressionUUID->"09664f8f-d286-4de1-8b0c-e0d59ec9cc62"] }, Open ]], Cell[CellGroupData[{ @@ -8222,68 +8534,72 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", CellChangeTimes->{ - 3.9918497473740044`*^9, {3.99184977815234*^9, - 3.991849780845421*^9}},ExpressionUUID->"1d118f77-7d68-dd41-b0af-\ -09454f88e7f1"], + 3.9918497473740044`*^9, {3.99184977815234*^9, 3.991849780845421*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 340, 349, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882626343`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2097574392304192`*^-214\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 101, 21, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994387535393011*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], +In[101]:=",ExpressionUUID->"b8b759a2-3c96-48c5-b784-208f4ad91338"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 340, 350, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882726326`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.331673865865766`*^-220\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 101, 22, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.9943875353998203`*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], +In[101]:=",ExpressionUUID->"2afa0d55-4ad1-4a7c-8a58-96b4169842d5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 340, 351, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882816315`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.443323920340099`*^-225\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 101, 23, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.9943875354075336`*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], +In[101]:=",ExpressionUUID->"5801d7fc-1374-48a3-bc3a-6d80b0eef5ab"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 340, 352, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913408882906322`*^9}, +during this calculation.\"", 2, 101, 24, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913408882626343`*^9, 3.994387535415208*^9}, CellLabel-> "During evaluation of \ -In[340]:=",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], +In[101]:=",ExpressionUUID->"a2851864-d097-4c1d-bf33-8f7688b87a13"], -Cell[BoxData["1.3456729512531673`"], "Output", - CellChangeTimes->{3.991340895263792*^9}, +Cell[BoxData["1.0553048130025338`"], "Output", + CellChangeTimes->{3.991340895263792*^9, 3.994387542917704*^9}, CellLabel-> - "Out[340]=",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] + "Out[101]=",ExpressionUUID->"52fda936-b9ac-4141-b4ca-ae7d01402555"] }, Open ]], Cell[CellGroupData[{ @@ -8304,8 +8620,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8350,68 +8665,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497892022038`*^9, - 3.991849792285101*^9}},ExpressionUUID->"c8039063-5f4d-134a-b6ba-\ -e19335f7a9f6"], + CellChangeTimes->{{3.9918497892022038`*^9, 3.991849792285101*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 341, 353, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895297941*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2097574392304192`*^-214\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 102, 25, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.994387542971712*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], +In[102]:=",ExpressionUUID->"2f4063e6-7eff-4a2a-81ed-2ee49c54910b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 341, 354, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895308939*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.331673865865766`*^-220\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 102, 26, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.9943875429783583`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], +In[102]:=",ExpressionUUID->"030d98dc-6d77-4957-84c4-cccfaa9c5728"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 341, 355, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895316965*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.443323920340099`*^-225\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 102, 27, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.9943875429850273`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], +In[102]:=",ExpressionUUID->"16e01190-e176-410f-b21e-cab0defcbd1a"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 341, 356, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340895324953*^9}, +during this calculation.\"", 2, 102, 28, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340895297941*^9, 3.9943875429913197`*^9}, CellLabel-> "During evaluation of \ -In[341]:=",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], +In[102]:=",ExpressionUUID->"8ef7ae27-4ee2-45d5-a208-55b2ac0d2afc"], -Cell[BoxData["11.729429210875175`"], "Output", - CellChangeTimes->{3.9913409010488796`*^9}, +Cell[BoxData["48.890606520780324`"], "Output", + CellChangeTimes->{3.9913409010488796`*^9, 3.994387550761585*^9}, CellLabel-> - "Out[341]=",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] + "Out[102]=",ExpressionUUID->"0d49227f-a139-4710-be02-41b75ed584f5"] }, Open ]], Cell[CellGroupData[{ @@ -8432,8 +8751,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8478,68 +8796,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918497964884186`*^9, - 3.9918497998504505`*^9}},ExpressionUUID->"a474307a-af78-3040-90ec-\ -fb8d284b16bb"], + CellChangeTimes->{{3.9918497964884186`*^9, 3.9918497998504505`*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3698490023224742`*^-207\\\", \ -\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ -32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 342, 357, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010848827`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2097574392304192`*^-214\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 103, 29, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994387550821603*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], +In[103]:=",ExpressionUUID->"c86649c1-b5ea-4e38-9571-23da2a52a4b3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.771902919888384`*^-212\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 342, 358, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409010938797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.331673865865766`*^-220\\\", \ +\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ +29806995456000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 103, 30, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994387550828463*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], +In[103]:=",ExpressionUUID->"d6be977f-7887-4659-9e7c-6d15a45fa945"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.608653316951178`*^-217\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 342, 359, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340901101883*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.443323920340099`*^-225\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 103, 31, + 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.994387550834835*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], +In[103]:=",ExpressionUUID->"cc18792c-2d5c-4dda-b2d0-ad98db3af010"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 342, 360, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409011098804`*^9}, +during this calculation.\"", 2, 103, 32, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913409010848827`*^9, 3.9943875508415747`*^9}, CellLabel-> "During evaluation of \ -In[342]:=",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], +In[103]:=",ExpressionUUID->"34eb282f-a311-4808-a6d3-bdcd1a6d0e5d"], -Cell[BoxData["21.67464099510054`"], "Output", - CellChangeTimes->{3.991340904517517*^9}, +Cell[BoxData["9.339089553885753`"], "Output", + CellChangeTimes->{3.991340904517517*^9, 3.994387555315209*^9}, CellLabel-> - "Out[342]=",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] + "Out[103]=",ExpressionUUID->"a7dec832-9073-40e8-b807-55605d8ed563"] }, Open ]], Cell[CellGroupData[{ @@ -8548,22 +8870,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849803549658*^9, - 3.9918498086143265`*^9}},ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-\ -f67bfdbd9bc7"], - -Cell[BoxData["0.0843966342510027`"], "Output", - CellChangeTimes->{3.991340904549515*^9}, + CellChangeTimes->{{3.991849803549658*^9, 3.9918498086143265`*^9}}, CellLabel-> - "Out[343]=",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] + "In[104]:=",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], + +Cell[BoxData["0.0493870330380266`"], "Output", + CellChangeTimes->{3.991340904549515*^9, 3.994387555355526*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"a4746040-5720-480b-8b3d-4ecdd8aab95a"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918501018852215`*^9, 3.991850105557743*^9}, - 3.99192470649716*^9},ExpressionUUID->"d104d373-080a-854b-92ff-\ -e87abbd4c41c"], + 3.99192470649716*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ @@ -8586,12 +8909,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[345]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], + "In[106]:=",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[BoxData["19.580504093356314`"], "Output", - CellChangeTimes->{3.9913409045775146`*^9}, +Cell[BoxData["12.632463348937872`"], "Output", + CellChangeTimes->{3.9913409045775146`*^9, 3.994387555377936*^9}, CellLabel-> - "Out[345]=",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] + "Out[106]=",ExpressionUUID->"cf91ca65-592d-4ab7-804a-aa0c0debef9e"] }, Open ]], Cell[CellGroupData[{ @@ -8601,12 +8924,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[347]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], + "In[107]:=",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[BoxData["0.8477067309358528`"], "Output", - CellChangeTimes->{3.991340904625164*^9}, +Cell[BoxData["2.012141345084185`"], "Output", + CellChangeTimes->{3.991340904625164*^9, 3.994387555391885*^9}, CellLabel-> - "Out[347]=",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] + "Out[107]=",ExpressionUUID->"2869f2c4-c691-47bf-aeba-59512323cb55"] }, Open ]], Cell[CellGroupData[{ @@ -8616,12 +8939,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[350]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], + "In[108]:=",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[BoxData["16.598525115055164`"], "Output", - CellChangeTimes->{3.9913409046880226`*^9}, +Cell[BoxData["25.418301794658518`"], "Output", + CellChangeTimes->{3.9913409046880226`*^9, 3.994387555406517*^9}, CellLabel-> - "Out[350]=",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] + "Out[108]=",ExpressionUUID->"196a1afd-04d5-4976-b70f-97a6f7499106"] }, Open ]], Cell[CellGroupData[{ @@ -8811,12 +9134,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[351]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], + "In[109]:=",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[BoxData["0.021613768236132463`"], "Output", - CellChangeTimes->{3.9913409047132187`*^9}, +Cell[BoxData["0.004726503259396098`"], "Output", + CellChangeTimes->{3.9913409047132187`*^9, 3.9943875554245996`*^9}, CellLabel-> - "Out[351]=",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] + "Out[109]=",ExpressionUUID->"87314af0-4267-47c5-8cdb-832cbcf845cf"] }, Open ]], Cell[CellGroupData[{ @@ -8830,12 +9153,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[352]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], + "In[110]:=",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[BoxData["6.028089553291302`"], "Output", - CellChangeTimes->{3.9913409048112164`*^9}, +Cell[BoxData["12.890654244209085`"], "Output", + CellChangeTimes->{3.9913409048112164`*^9, 3.994387555559451*^9}, CellLabel-> - "Out[352]=",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] + "Out[110]=",ExpressionUUID->"10d9edf0-1e84-4be7-b219-de507a1c644b"] }, Open ]], Cell[CellGroupData[{ @@ -9027,12 +9350,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[353]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], + "In[111]:=",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[BoxData["0.010798036798660033`"], "Output", - CellChangeTimes->{3.991340904825058*^9}, +Cell[BoxData["0.036668931413518985`"], "Output", + CellChangeTimes->{3.991340904825058*^9, 3.994387555586349*^9}, CellLabel-> - "Out[353]=",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] + "Out[111]=",ExpressionUUID->"ddeed96a-75f3-49a8-bd04-db6e0847fb94"] }, Open ]], Cell[CellGroupData[{ @@ -9046,12 +9369,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[354]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], + "In[112]:=",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[BoxData["8.5284977476633`"], "Output", - CellChangeTimes->{3.9913409049303207`*^9}, +Cell[BoxData["4.628026250110496`"], "Output", + CellChangeTimes->{3.9913409049303207`*^9, 3.994387555699424*^9}, CellLabel-> - "Out[354]=",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] + "Out[112]=",ExpressionUUID->"ef414277-15a3-4878-9be0-d5a5b2f0c2fc"] }, Open ]], Cell[CellGroupData[{ @@ -9144,12 +9467,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[355]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], + "In[113]:=",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991340904948307*^9}, +Cell[BoxData["0.09071336685848984`"], "Output", + CellChangeTimes->{3.991340904948307*^9, 3.9943875557236767`*^9}, CellLabel-> - "Out[355]=",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] + "Out[113]=",ExpressionUUID->"14e52b48-8e20-4e9d-bba1-15d993fa5fc6"] }, Open ]], Cell[CellGroupData[{ @@ -9239,12 +9562,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[356]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], + "In[114]:=",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.991340904981308*^9}, +Cell[BoxData["0.9092866331415103`"], "Output", + CellChangeTimes->{3.991340904981308*^9, 3.9943875557459497`*^9}, CellLabel-> - "Out[356]=",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] + "Out[114]=",ExpressionUUID->"df779e29-3a3e-45ee-b445-9c17d29afa9a"] }, Open ]], Cell[CellGroupData[{ @@ -9367,12 +9690,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[357]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], + "In[115]:=",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.99134090500931*^9}, +Cell[BoxData["0.08248445193168688`"], "Output", + CellChangeTimes->{3.99134090500931*^9, 3.994387555766068*^9}, CellLabel-> - "Out[357]=",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] + "Out[115]=",ExpressionUUID->"97326dbd-8b5d-4505-934a-70ab07cc266d"] }, Open ]], Cell[CellGroupData[{ @@ -9434,68 +9757,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849824909197*^9},ExpressionUUID->"486d514f-ec65-1e4e-b780-\ -7e9487f745c3"], + CellChangeTimes->{3.991849824909197*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 361, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905038307*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.291121814952863`*^-223\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 116, 33, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994387555785405*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], +In[116]:=",ExpressionUUID->"1ba7e1da-d206-4187-befd-b22c7a27bd33"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 362, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905047306*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1867692294716364`*^-228\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 116, 34, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994387555792273*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], +In[116]:=",ExpressionUUID->"e3c1d2fb-63db-4331-84bb-b488a72c46a0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 358, - 363, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905056307*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.698710060538059`*^-234\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 116, 35, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994387555799058*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], +In[116]:=",ExpressionUUID->"12bbad55-7ee4-46ae-bd6d-22b7750b59e8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 358, 364, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340905064308*^9}, +during this calculation.\"", 2, 116, 36, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340905038307*^9, 3.994387555804905*^9}, CellLabel-> "During evaluation of \ -In[358]:=",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], +In[116]:=",ExpressionUUID->"60af078e-d1fe-4bb3-8339-f7f9e5ffb564"], -Cell[BoxData["6.028089553291301`"], "Output", - CellChangeTimes->{3.991340908920454*^9}, +Cell[BoxData["12.890654244209086`"], "Output", + CellChangeTimes->{3.991340908920454*^9, 3.99438755978869*^9}, CellLabel-> - "Out[358]=",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] + "Out[116]=",ExpressionUUID->"06326600-4328-428f-8563-43c3046d03cd"] }, Open ]], Cell[CellGroupData[{ @@ -9557,68 +9884,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918498299076843`*^9},ExpressionUUID->"c7144ce5-8356-d548-8854-\ -18c538c3321c"], + CellChangeTimes->{3.9918498299076843`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 365, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908954941*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.291121814952863`*^-223\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 117, 37, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.9943875598395243`*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], +In[117]:=",ExpressionUUID->"4d791d4f-970d-4381-a730-81f86f03e21b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 366, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908964924*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1867692294716364`*^-228\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 117, 38, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994387559848454*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], +In[117]:=",ExpressionUUID->"ca7625db-5289-4c95-a1ba-d702d8533006"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 359, - 367, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913409089739246`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.698710060538059`*^-234\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 117, 39, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.9943875598558826`*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], +In[117]:=",ExpressionUUID->"64e17706-c4d2-4914-a789-45330c2a4c4d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 359, 368, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991340908981924*^9}, +during this calculation.\"", 2, 117, 40, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991340908954941*^9, 3.994387559862898*^9}, CellLabel-> "During evaluation of \ -In[359]:=",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], +In[117]:=",ExpressionUUID->"a66a4b11-5332-476e-bae7-419d1d9f4c0b"], -Cell[BoxData["8.528497747663296`"], "Output", - CellChangeTimes->{3.991340912767397*^9}, +Cell[BoxData["4.6280262501104925`"], "Output", + CellChangeTimes->{3.991340912767397*^9, 3.994387563722012*^9}, CellLabel-> - "Out[359]=",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] + "Out[117]=",ExpressionUUID->"d8b6a1fd-eca4-4edc-934b-69c1a4ef0359"] }, Open ]], Cell[CellGroupData[{ @@ -9676,95 +10007,95 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849833066021*^9},ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-\ -a45df2eabf0c"], + CellChangeTimes->{3.991849833066021*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4Ft0bB3ApLZayvB6VlL3sXluUOrc9u4Tsy+OZEcmeVJY2JUpIL/VL +lpCEEtkjkSRboZ0oS3msY63E7zx/zDXX5zrnfO/7zMwZMbq/NcHOxsY2ji/W +PbBdcWd5Z/v+rxFDPw3KmGj/RLY6Xb8AyZ3/y2GI3Z+ukSypX4Ni8vQcWbZi +tK3lVn2BepjlwywXh0U1cOi3IlETxwdG2JebNj+Lyn+DNtbJ5h3AruwMvLOk +0oOa9GV6jbFHP7WEn6z+gK5325qYYm8dknCa1/uChMhHk2bYppPhWsGtX5HE +lGabBXbt0ihXWP4AqvCa/GaF/e6s0Okyv+9Isb5L+RD2xFr90VmVIaQzOVRm +i732SoCD6sIwsvkuddweeztfWnNg9Q80fPX6USdsC+H53Am9MSRdv8BGxyYz +xGkK6yeQkOREOoEdJWUZfbR1EvFRfCe8sT8Idf8bkj+NKo8PtAViMxx9vK9f +oVDjnyvmodhTt9kyH/vNIKmrBMdp7PXiCrzTKnNoF5EmEo2dzGgw4hWcRwOB +SxGx2KL3HKKUFuZRIC2GloCtKX9x4lj1IorPkZz6H/YRja+to3pLSJ7L36AM +ezbs+BpO6b8oY6OS11PsM9Vc2jLrl9Gui1vrG7FTQfOBV+sKYtsVLNLN6i+n +WT8ofxXMmUqHzWHnN13vPyvMDtUb9zkts/odcQ1PvMIOHm8iQteVM1G47FzJ +I7/VcOZCuO1W7OSHYhKTKhyQcPvIE13sT51jtct3OeAu/ZWDObYoVe64UXAt +VHhaa9hjF6hZJCksrIWMbV9S/LAbK0+t8q1eD6tNXi6lYc81dH39occNGsF1 +5usqmIjfjJv3dC03JJ1ru0fDVu7WBx4tHthX/k5PGttn8EnGv4obQfjnBx1D +7AD2VuV93LxwKzzB9jL2kHjRdPQ8H/Rye30WrsTPh2zZ0KHKD1f3UzZK2OwP +hsU2B/KDnWIgrx62qOoO63wmPxT8e8D8KLajXsLj9n4BaH9u2leL3eEZFCz0 +WhDm5eVcgqqYqO9efJz7ehosjz6cu4w9xsy/e9+ABspoR2cmNmfI9669z2iw +JFZt8hZb/4KNmvsTIRCu6rHTqGaiqmyNubz0LbCYs/KKs4aJsod+h+4JEQF1 +mqDQ0FMmOmB7qS+4UAQSM+Pa2GtxfqOAYeGwCIx0EU9FsdWy5QVFHbbDHVLX +2AW7ke5awrF/B7Scj+H7iE1N9p/4cV4U7svken6uYyKBY/qlJebi4DX9ej3X +cyYazuY8YuUjDj4CBqNK2BVfOoXHL4qDxPoNHLbYzmYu56WfiUPszLHhdOxs +uVDrmyoSEHngur1mA64/em8qUkgSfgud/xXcyEQ2XlwKJgNS4LLstZP2kolQ +qK3K4b9ScNbzhbUOtmx0+m7GFmnIKKE98cVmu6uqG3lQGnbKJm5vxC7sczr8 +uF4aNtW+unC8GZ9Pu4KzW7N2QniBV9q3V7g/ffN3o3QZ4LqxenGolYnuHkr5 +vBApA0ty/StCbUwUTx/oX/M/GWjqjd9vgs04c5y5vUsGdrK5uj/E5qtJYzuk +Jwu1i1nq4e34+1GdkK2WkAPHXfVSop1MJCx+LSpuUB5ExboFEruYqCZ2VuYX +uwJ4Kag3t2M7zzh0k2IKULpqtIa7m4nuNErK6LoqgIH1Aa/L2OJeVW8X3yuA +2eG8uugevN+CISnytSIcHTseEfueiUSEt5OiDsqgvX1QtPEzE8nnhHD/QSqQ +J1yStjDIRHTG+TkFCxVAOuXSMITPq0RSn7uzCjhdtB+JwV6d9fBRU5gKnAg4 +ukl4GJ+3O6M2ScUqkBCW+VtnBP9PU93TZCRUgXND3d5bP/H7jTNTtF+rBv6m +804hE0yUGSRp9aRVHQpDV91vX2SizlC0+0KOFiTON6eq8I8hMdceCxffffCg +pExzjdIYIlbKikROAjw//vTTIfMxJMSsWCdE14VdofY+/YFjKERV+0uSrD7M +xBj+8UwZQ/TxpWaBUQMY5qWlGNWNoULd4HXpHUaQwTvTOjc+hrJnfeoLko2h +ZkXL4c62cbSos7mtMcoUemreHQ61Hke9bKunBzzM4VJeUUdU7Djy2+afcFbC +EvZwueuG1Y+jIu/mZzeiraDhdfS3wZVxdGpmy4Kc90G4N5hYlKU9geZMDO1e +ulkDqs5tmTszgbScEnWGDh4CFe/MDJemCfR2S5pPo6oNnLq2JW5p/STamnu+ +Jm+XLThXWJxec2gSVfTLmlnw2EFnGn/jfzcn0fbuKa/QcTuYl0nVHfo6iVRv +JBbc7T8MFTs8chNpUyhtzYxiUoM9zHz0ixnbM4XKdJQ+RVc6gOJItMgZ+hRK +3R3Lt5TvCIcrTNwdL0+hjs85F1WvOIGLJOONb+EUemJ+WzLgjDOcr25pk++e +QtPHDrH5MVwgiPkfR9fCFJozlDkyoecKsjmzV7dtnUZ54x8XgzXc4M4fvRj6 +/mlkn5nj6cLtDhk7jm+Sd5tGJY9N3VZfcoecz3c6nM5OIy3ht78u/3IHzdKb +XW/Sp5FEv9enN94e4Lcwv0uyZhoNch21vP3dA6J61ZupD9OoM97C08iWDm2D +Mtl909MoOSyd63gnHVbpi4vHc1Kopnbll6exJ/A6P+IwFKXQJme4pFrlCXcK +qQQpFQqJ/vOyY1uNJwSub+k6hq3car55ba0nqATw/nyCba3tdP9DvScEfX4Z +a6BKoeRtoa8jXnlCvc/Ufboahbb2PtjU/METXu8osUzWoJCkq1Cq84In7LZ0 +We7eQyEt94m8aDUGvBjkl2zRpVDuzalgCw0GzFsO1bDrUeifLmq/kCYDzoro +yu/FnjBY6M7bywC5v+fiH2Bny7GtatVlgMOF0+6x+hTauMDnwH+QAZoL4upg +SKHBq+ob0o8xQC+b7eQVYwodfLm728ufAcf+/fK+DruWbU+6ciADrNjiuGew +bwbvV38ewoDZm2YL9iYUsnAw8hg6zYBa2eY34qYUqpR0qJSLZYC+AXWjyIxC +8dXh3hW5DDjHflYj15JCx1RStMLyGPDKWcq1C9vsfvEGzXwGPH+d6cxmRSHO +lOH75YUMOHGUt88BOzrIarSslAHjSvoU50EKhctIHn3ynAGp4pucCWsK+aS8 +9n3cx4DifhvaHxsKGW8c1g7qZ8DInA2vhC2FdkWz8ah8Y4A2b2a/CfZwkHph +8RAD6ka419zC9rBIH380xoD8f+ptNewoZM8R7PfwNwMEqzeLeR2mkFHw1oAC +GgHBs2ba9x0o9Dz9oknSZgKaXl352Y6t3UpJhm0lwA1JErPYylKvP+ptJ4Cj +2ejlfkcKbXl/Wu+zFAEBDd803mAz9/TSONUJmL1wqW7MiULX2DOeeh0iIDG+ +1n7ZBe9fiTvV3JaAyQOxzSKuFLrgFBakepiAlRHptfuww0qtdq44EuBwrWH0 +FLYHuSrxPzoB12ZEHWaxVVvojBeBBExEqL7sdaPQ+0QpLokEArwjVDpjPShU +hHiO/EgkoLbJ2zAL+8L4bGPhdQIc78cnVGKrGDdGaqYQ0GmSkjGCHc/mSZnf +IaA01O2hDp1Chv4ZH8MKCDgVUxY9ji0iEqOxv4iA5b+5WuyeFJpt8b+++hEB +qb5u9TTsLGlkHl9CwO+AHWYI+29v77O7VQTw1KdbxGOXmgnntTcT8EKnnUOS +QaG43+wcyS0ExHLqzKlj0/NGPRxaCWjrdawwwuZdUyU82EGAIk94pQ+2b7X9 +tV/vCBA6CfeKsCVk/wuVHMJ59qCkSFDo9/uIrp/DeD7T2H4fdmc0ofzwBwF8 +1n02ZtiRA2qjWmME5KtnNntjf0rtcrGcIWBXjOetLOykdXwGp1aR4JQUN8RF +4v8B1esUspoE+K1eugV7pDc/yI+DBEays+lObO1S/Qz6BhJMJYS6dLCH3cP+ +mPCRYJPDeyAEm9fMgN9AgAQZ4qjjGey9u/llkCAJZ9PV1K9gJ/AU2KluIaFM +jVv/Lmu86muxsBi2XU5TOzaZU9AsKEHCOXnjbR9Z8xNOft0kRUJEuuWe76x6 +pADPGhkS7P9EdsyzxgWMjowpk9ATqecq7EWhqmWBqGEVEsjl9/MS2EM/+2/0 +q5Ews/nFYXnsPc9ONXRrkiD2IDtIG3vQt2j7UyBBsNKJ2xF7o/1p9XJdEpoP +poy4Y2vpHTAr1idByE0izgs7fsu3kzkHcL8HZeRCsCvWPExINyGh6mLmzlPY +3ydP37tpRkJ9BzkWha3ZJNhz1YoExWs97bHY9OJvzEvWJHxMiBi7hn319kP2 +czYk0J76v03G/hZkrBxqj+v/VVpIw+ZxpRkFOJKw7eOSehYrz/i7i48zCXW+ +fPtyWet3RMS5upPw+Pam7EJWP5wmWfZ0Es7vXVxdzMqbo1VaM0hIS5GWL2Xl +DXzvMCNJGNa/ta2cldf6aNjwCF7fZ91TyeqvPOIv+JDQsc7KroaVn2Xyz15f +Ek74JKbXsvKvCsmp+5HgVkErfsbKDxvUUQog4VH+19jn2NyMYnuZIBI42Mfk +G7F3W0b6S4SQEHRxb8oLVv4e04sioSRErmt/1YR9RWpzmlAYCeLOdxtfYpfx +DpXwncL16dWXmrEH/hS3cIWT4L+KJvCKlT8SOcARSYKjVAnJssZb08WVKBI8 +GpLOsfx/8NYj9g== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -9778,106 +10109,106 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1Hk4Ft0bB3ApLZayvB6VlL3sXluUOrc9u4Tsy+OZEcmeVJY2JUpIL/VL +lpCEEtkjkSRboZ0oS3msY63E7zx/zDXX5zrnfO/7zMwZMbq/NcHOxsY2ji/W +PbBdcWd5Z/v+rxFDPw3KmGj/RLY6Xb8AyZ3/y2GI3Z+ukSypX4Ni8vQcWbZi +tK3lVn2BepjlwywXh0U1cOi3IlETxwdG2JebNj+Lyn+DNtbJ5h3AruwMvLOk +0oOa9GV6jbFHP7WEn6z+gK5325qYYm8dknCa1/uChMhHk2bYppPhWsGtX5HE +lGabBXbt0ihXWP4AqvCa/GaF/e6s0Okyv+9Isb5L+RD2xFr90VmVIaQzOVRm +i732SoCD6sIwsvkuddweeztfWnNg9Q80fPX6USdsC+H53Am9MSRdv8BGxyYz +xGkK6yeQkOREOoEdJWUZfbR1EvFRfCe8sT8Idf8bkj+NKo8PtAViMxx9vK9f +oVDjnyvmodhTt9kyH/vNIKmrBMdp7PXiCrzTKnNoF5EmEo2dzGgw4hWcRwOB +SxGx2KL3HKKUFuZRIC2GloCtKX9x4lj1IorPkZz6H/YRja+to3pLSJ7L36AM +ezbs+BpO6b8oY6OS11PsM9Vc2jLrl9Gui1vrG7FTQfOBV+sKYtsVLNLN6i+n +WT8ofxXMmUqHzWHnN13vPyvMDtUb9zkts/odcQ1PvMIOHm8iQteVM1G47FzJ +I7/VcOZCuO1W7OSHYhKTKhyQcPvIE13sT51jtct3OeAu/ZWDObYoVe64UXAt +VHhaa9hjF6hZJCksrIWMbV9S/LAbK0+t8q1eD6tNXi6lYc81dH39occNGsF1 +5usqmIjfjJv3dC03JJ1ru0fDVu7WBx4tHthX/k5PGttn8EnGv4obQfjnBx1D +7AD2VuV93LxwKzzB9jL2kHjRdPQ8H/Rye30WrsTPh2zZ0KHKD1f3UzZK2OwP +hsU2B/KDnWIgrx62qOoO63wmPxT8e8D8KLajXsLj9n4BaH9u2leL3eEZFCz0 +WhDm5eVcgqqYqO9efJz7ehosjz6cu4w9xsy/e9+ABspoR2cmNmfI9669z2iw +JFZt8hZb/4KNmvsTIRCu6rHTqGaiqmyNubz0LbCYs/KKs4aJsod+h+4JEQF1 +mqDQ0FMmOmB7qS+4UAQSM+Pa2GtxfqOAYeGwCIx0EU9FsdWy5QVFHbbDHVLX +2AW7ke5awrF/B7Scj+H7iE1N9p/4cV4U7svken6uYyKBY/qlJebi4DX9ej3X +cyYazuY8YuUjDj4CBqNK2BVfOoXHL4qDxPoNHLbYzmYu56WfiUPszLHhdOxs +uVDrmyoSEHngur1mA64/em8qUkgSfgud/xXcyEQ2XlwKJgNS4LLstZP2kolQ +qK3K4b9ScNbzhbUOtmx0+m7GFmnIKKE98cVmu6uqG3lQGnbKJm5vxC7sczr8 +uF4aNtW+unC8GZ9Pu4KzW7N2QniBV9q3V7g/ffN3o3QZ4LqxenGolYnuHkr5 +vBApA0ty/StCbUwUTx/oX/M/GWjqjd9vgs04c5y5vUsGdrK5uj/E5qtJYzuk +Jwu1i1nq4e34+1GdkK2WkAPHXfVSop1MJCx+LSpuUB5ExboFEruYqCZ2VuYX +uwJ4Kag3t2M7zzh0k2IKULpqtIa7m4nuNErK6LoqgIH1Aa/L2OJeVW8X3yuA +2eG8uugevN+CISnytSIcHTseEfueiUSEt5OiDsqgvX1QtPEzE8nnhHD/QSqQ +J1yStjDIRHTG+TkFCxVAOuXSMITPq0RSn7uzCjhdtB+JwV6d9fBRU5gKnAg4 +ukl4GJ+3O6M2ScUqkBCW+VtnBP9PU93TZCRUgXND3d5bP/H7jTNTtF+rBv6m +804hE0yUGSRp9aRVHQpDV91vX2SizlC0+0KOFiTON6eq8I8hMdceCxffffCg +pExzjdIYIlbKikROAjw//vTTIfMxJMSsWCdE14VdofY+/YFjKERV+0uSrD7M +xBj+8UwZQ/TxpWaBUQMY5qWlGNWNoULd4HXpHUaQwTvTOjc+hrJnfeoLko2h +ZkXL4c62cbSos7mtMcoUemreHQ61Hke9bKunBzzM4VJeUUdU7Djy2+afcFbC +EvZwueuG1Y+jIu/mZzeiraDhdfS3wZVxdGpmy4Kc90G4N5hYlKU9geZMDO1e +ulkDqs5tmTszgbScEnWGDh4CFe/MDJemCfR2S5pPo6oNnLq2JW5p/STamnu+ +Jm+XLThXWJxec2gSVfTLmlnw2EFnGn/jfzcn0fbuKa/QcTuYl0nVHfo6iVRv +JBbc7T8MFTs8chNpUyhtzYxiUoM9zHz0ixnbM4XKdJQ+RVc6gOJItMgZ+hRK +3R3Lt5TvCIcrTNwdL0+hjs85F1WvOIGLJOONb+EUemJ+WzLgjDOcr25pk++e +QtPHDrH5MVwgiPkfR9fCFJozlDkyoecKsjmzV7dtnUZ54x8XgzXc4M4fvRj6 +/mlkn5nj6cLtDhk7jm+Sd5tGJY9N3VZfcoecz3c6nM5OIy3ht78u/3IHzdKb +XW/Sp5FEv9enN94e4Lcwv0uyZhoNch21vP3dA6J61ZupD9OoM97C08iWDm2D +Mtl909MoOSyd63gnHVbpi4vHc1Kopnbll6exJ/A6P+IwFKXQJme4pFrlCXcK +qQQpFQqJ/vOyY1uNJwSub+k6hq3car55ba0nqATw/nyCba3tdP9DvScEfX4Z +a6BKoeRtoa8jXnlCvc/Ufboahbb2PtjU/METXu8osUzWoJCkq1Cq84In7LZ0 +We7eQyEt94m8aDUGvBjkl2zRpVDuzalgCw0GzFsO1bDrUeifLmq/kCYDzoro +yu/FnjBY6M7bywC5v+fiH2Bny7GtatVlgMOF0+6x+hTauMDnwH+QAZoL4upg +SKHBq+ob0o8xQC+b7eQVYwodfLm728ufAcf+/fK+DruWbU+6ciADrNjiuGew +bwbvV38ewoDZm2YL9iYUsnAw8hg6zYBa2eY34qYUqpR0qJSLZYC+AXWjyIxC +8dXh3hW5DDjHflYj15JCx1RStMLyGPDKWcq1C9vsfvEGzXwGPH+d6cxmRSHO +lOH75YUMOHGUt88BOzrIarSslAHjSvoU50EKhctIHn3ynAGp4pucCWsK+aS8 +9n3cx4DifhvaHxsKGW8c1g7qZ8DInA2vhC2FdkWz8ah8Y4A2b2a/CfZwkHph +8RAD6ka419zC9rBIH380xoD8f+ptNewoZM8R7PfwNwMEqzeLeR2mkFHw1oAC +GgHBs2ba9x0o9Dz9oknSZgKaXl352Y6t3UpJhm0lwA1JErPYylKvP+ptJ4Cj +2ejlfkcKbXl/Wu+zFAEBDd803mAz9/TSONUJmL1wqW7MiULX2DOeeh0iIDG+ +1n7ZBe9fiTvV3JaAyQOxzSKuFLrgFBakepiAlRHptfuww0qtdq44EuBwrWH0 +FLYHuSrxPzoB12ZEHWaxVVvojBeBBExEqL7sdaPQ+0QpLokEArwjVDpjPShU +hHiO/EgkoLbJ2zAL+8L4bGPhdQIc78cnVGKrGDdGaqYQ0GmSkjGCHc/mSZnf +IaA01O2hDp1Chv4ZH8MKCDgVUxY9ji0iEqOxv4iA5b+5WuyeFJpt8b+++hEB +qb5u9TTsLGlkHl9CwO+AHWYI+29v77O7VQTw1KdbxGOXmgnntTcT8EKnnUOS +QaG43+wcyS0ExHLqzKlj0/NGPRxaCWjrdawwwuZdUyU82EGAIk94pQ+2b7X9 +tV/vCBA6CfeKsCVk/wuVHMJ59qCkSFDo9/uIrp/DeD7T2H4fdmc0ofzwBwF8 +1n02ZtiRA2qjWmME5KtnNntjf0rtcrGcIWBXjOetLOykdXwGp1aR4JQUN8RF +4v8B1esUspoE+K1eugV7pDc/yI+DBEays+lObO1S/Qz6BhJMJYS6dLCH3cP+ +mPCRYJPDeyAEm9fMgN9AgAQZ4qjjGey9u/llkCAJZ9PV1K9gJ/AU2KluIaFM +jVv/Lmu86muxsBi2XU5TOzaZU9AsKEHCOXnjbR9Z8xNOft0kRUJEuuWe76x6 +pADPGhkS7P9EdsyzxgWMjowpk9ATqecq7EWhqmWBqGEVEsjl9/MS2EM/+2/0 +q5Ews/nFYXnsPc9ONXRrkiD2IDtIG3vQt2j7UyBBsNKJ2xF7o/1p9XJdEpoP +poy4Y2vpHTAr1idByE0izgs7fsu3kzkHcL8HZeRCsCvWPExINyGh6mLmzlPY +3ydP37tpRkJ9BzkWha3ZJNhz1YoExWs97bHY9OJvzEvWJHxMiBi7hn319kP2 +czYk0J76v03G/hZkrBxqj+v/VVpIw+ZxpRkFOJKw7eOSehYrz/i7i48zCXW+ +fPtyWet3RMS5upPw+Pam7EJWP5wmWfZ0Es7vXVxdzMqbo1VaM0hIS5GWL2Xl +DXzvMCNJGNa/ta2cldf6aNjwCF7fZ91TyeqvPOIv+JDQsc7KroaVn2Xyz15f +Ek74JKbXsvKvCsmp+5HgVkErfsbKDxvUUQog4VH+19jn2NyMYnuZIBI42Mfk +G7F3W0b6S4SQEHRxb8oLVv4e04sioSRErmt/1YR9RWpzmlAYCeLOdxtfYpfx +DpXwncL16dWXmrEH/hS3cIWT4L+KJvCKlT8SOcARSYKjVAnJssZb08WVKBI8 +GpLOsfx/8NYj9g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.8660001343050076, 1.150338659336022}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.8660001343050094}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -9889,20 +10220,20 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.8660001343050076, 1.150338659336022}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.8660001343050094}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -9916,105 +10247,105 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1XdcT98fB/ArSpOGlgZaRJGWCp23hqSpr3Zan8+9KZWWNGVlfBGpfqFo -kIY2aaAtSd+KsrqftEN7KVH6HX/cx308H+dx3ud13ueOTe7HrUg2giC+4evv -3b9l++bSthbdDTd5I+M7CNAdf6DhbpCLJs8mvYrD7knRjJczeI4+r7bOjMW2 -ZP7Hwav2EoXK6EjGYBeFRNWxGzQj89OmCpexLzeIVUflvEVRYTEvz2KXt/nf -W1R9j2aEV/4Kwx7ubIoIffYJua7Mr/PHXj8o6zinz0ISKXEyHtgmExHagc3d -SG+qTMQRu3JxmCckpxfF5smmmmF/OCMa/tS3H/mpdVbqYo9zGAzPqg6igWv9 -AduxOa762avND6GEQKPnktjSAncb/Z99Qw/3r0niwjaXmHs4rj+KLBO/i3W3 -E0Clyogoc46jUlXBslfYUfIW0ceaJ9D6+Zej+difRDt2BuVMocS4PyKh2EwH -L8+4q9Po0EAyrxP2ZDKRVuw7g6QtFhL3YnPKKPNPqf5A7FUKfovvCIhn1hnx -C8+hygSRF5+xN2baR+2Yn0PFimypJdhaShfGfZ79ROfOC2zxxD6q2d08rL+I -QveI61e9JWA25MQqboUltHBheF8s9ulnPHsUOf8g9Nnqoxv2LdB65NG8jJq7 -9Rr+tOF8GY0GATkrQKpgb+lm7JyGuJ4zEmww/9rFZ7wV5/3qHBF7lQ1Sa79U -PMaO2PrjcaHvSvBpcZfUwY4v2CQ7ocoOHO+fLGq0ENDZNlr55z47sNcM+039 -h/NPlzqsEeaARyU+kY+wc9XNbyrPc8D7Q90uEtj15WErvJ9xgoaBpvnwGwJ+ -1LV3f9PnheG9xJTBawIETXn5wyt5wVB3TL+vkQCVDgPg0+aDixcHpyOxvQZK -UnduXwNVsR/IwlcE+LE1q+zl5QdUw/ZwRQMBgzL5U9FzArAYUlBvXYv7QzVx -taoJQt9t3dlPNQSwPRraJOYvCItkxTkH7I1qG6xyRgRBROl6nV01AQ76N4pb -eoSAdfJ0y75KAloZAYGib4RhrHXaqqGcgC+ZMVdcOUXgJU/b/R3YoyM597MN -ReDEJkf7xDICuIP623dXi8BNldczbqUEGJw/rO5aIgoqhXYT/U8IqHig+SMr -RRzi9DPNkwoIeDD4K1gnSArKL5QZdN4n4ID1xS+BeVLwcVRFTxp7tF5of96Q -FGzlON/vmk6A+gMl4Y320vCsdoNQXyrup7vzY3bdDeC0vE6l4y4B0xM9J7+d -2wi8zgrFJxMJEPIxePLYTAaMeQWiKi8TMPSA+6illwwoI5nCj5cIKGO1SYxd -kAGNMZvYiYsEOJkeOadQLQMF7z+TEhdwvm3BVrdVZcF153YG4yxefzhz8pSo -HGw/tJ6/JIyAwx48ygd75aHFeL2tuxcBKNha1XZJHpLH1KptPQnYGp2yiymu -AFUW1KzJUQKI+2p6pw4pgNiW4SoVioC8L462xTUKEH/QfnLEDb+fNrln1qdv -Bp3Q+xsU7XE+A7MPw+6KoK8vKFy7nwAJmetRVwaUQMnkY/K/0gQ8/3dWcYFN -GbYXBbaIS+H8M/Yd1CZlSNvwvSJTgoB79XKKes7KcHhG41WVGAEyHhXvfn5U -BslOy5oeQZwvd1CeerMddhQ3sYY4CJCSkKY22qvAJGNtugBrGSllBPH+Rqog -f5X7e5L/MkoLkLMsadaAnI57XDbxf1BbMNp1PkMbaklO54xLS2iT83vzI957 -YWbWOknBexGRy0/zpUIBchnHW8StfyPRkbLVou56UJGVXE9J/UJBantYN7ca -gMq4SHbx3E/kPrbYKDRsCBOeSXWGH+ZRnl7g6pRWI9gaVZeclDaHHsx61eTG -G8MXeU2z8Es/0M99Yv/VR5lAiXjw3ia3WdRFrJzqdTMDiwsJu66ZziBfyeM3 -zshawKU/+0rmrKdRvmdjdUK0JTiF1HQz7aZQ2Iz4/DbPQ/icbs4ohE6iHwf3 -27xysYI7Db95uZUmkLZj7L7BQ/+Asf0uzswrY+id+F2verXDkCJ6+tqaTaNo -/cNzz7O2WENfi/b1nY+HUVnPVlNzPhv44VF/RCn4O5LumPQIHrOBt5HsrbbW -35BaQmzu/R5byJyweGet9hXdXTWz/WadHaxRUEwntYfQ0307OqPL7UHxnv75 -cjSIbu36V2AxxwEUAvhiqpwHUCudcUHtqiNwjbTHVt/tRyVmyXJ+p50gXK/2 -SGZXH5ry+YfwZR6BstZTf4K0+9CP/YpHx/Wd4f6SoEpDRi/KGvv8M1DTBcou -N4iHCPUiu7QMxhFeV3DonBKDxB70uNjEZeVFV2BVcg5ukepB2hLvFi4vuEJH -oQHPJe9uJNvj0fnW0w0OOMMx36df0ADPMYvkfjdYDnIRLWf/gtpizBlG1u4Q -u/ripF1gF4oPSeE50eYOUJt1deYrCz2vXF5gGDNAyVHlTK4/C+2sUdfabMKA -22ENy+v8WOhhnWfwsCkDpI4UBZ7yZaHYxvZpP0sGhHDP6hw+xkLUu8yRSFsG -DO7W0uchWUhgyKIrkWRAZJCzRKYdHudLrX5zhgE9kZUz8cBCa53goloFAwq0 -sz7vE2KhjetetUo+Z4BXgKz7awEWUmk2E+OoZEBTgcIKK34WstrjmP2phgHV -dZvPUnwsFC8Z/CbyNQNEbzdfSV7NQuu7Hq1t/MQAAd76pD2LNJJzFr3lNM+A -+fTLGSZDNNJ2Hc+KVmcCoSgXevcFjR7engw012TCtmKukcjnNFrXPq0rqsUE -x4FvRi7PaDRuON+RtZsJIqXbauXKafRgG7GiWY8JKfMjJRVPaLRmXsBe8BAT -ZNoHzgnm0vg/rsGV4sOE1vex3P5JNDr0aleHx3EmpGWn5PjeoVEloZOi4s8E -2/+uqPrcptHtQF2N2iAmhKunLXgn0sjc3shtMJwJH8PV3U/G0ahczr58279M -OHup71LpFRrFPIvwLHvIhNzKvusDETTyUU3UDsliwhXJn6dXYptmF3Fp5TCh -sVPHXDacRtyJQ9mleUy4yvUrggylUXSA5fDTJ0wo9tJVnD1BowhFuWMltXg/ -CWK5Osdp5JX4xrv4CxOO5LV/OuZOI+M1Q3sCepgwwcm+7aEbjbZEE3yqfUzQ -2yxs2+tKo6EAjbyiQSYweq/ucXChkZt5yljhKBO2Ti/q2DjRyI490LfgF+5f -pNp8sA2NjALX++WKkCA5eu63gwmNalMuHLwpRsLraIu5tIM02tM8LReyngTf -/J0T341ppCL/5rO+NAmF3OOdEQdoJP4xXJ+WJ8FYd/etfEMajeh0iXBrkPCI -Z+OdfUCj62ypLzz+IUFYTB3kNfH+d/DeMrMmoThTir6iQaPzjiEBarYkeNyc -9p9Rp1HIE8vNyw4kuA9uiHuphvNTK2L/507CdZlPaSd20kityZ350p8EVZnY -/lXKNPoYK88jewPn5+aI75ajUT7iO/otloT5s0uFPtjnx2br8+JIMNv4KnNR -lkaqxvWntBJJWPDIkpHCjiEY02b3SGhuump6dBON9h9P/RySi+v1eB7dLE0j -KalLmrr5JFQXTErVSdFotul43MpCEtzmC3NdsNMVkFnMYxLO+VRYJ0nSaKmr -q/p+BQkP8hY7JCVo9MRUIqulkYQVvKzTB8RodOUXG3t8E+7PyYWXU6I0cs8a -drNvJmG//Jv+JGz+VRUSA60knE71zp4WoZH3M7vrCx9ISGt+75gjTCPZrf8L -lhsk4bvhuI2eEI1+fYxs/z5EwvKFHtkFQRq1RZMqBd9IsN0t/LoQ+1Sv+rD2 -KAkFKkrJMtidt9qPWMyQ4PTNhckvQKObqwUMw1ZQsJZ15+S6tTR6Pt3lGLSS -gkeX4vverqHR166cAF92CnYejne4gb3niUGqOxcFeTsv+/NjD7mG/D4oQIH+ -77M6Unw4v6mhoKEQBSY1X3n7eWm0e5egIhKmgBEtMZqNfYMv10ZNnIKxwg9t -On/HK7qLJDZREFkzqerJQyMqI7dRWJaC/nebju3CvnEjtHutPAUCaLqAA3uI -EuJbpUhBTYyjSxY3HhcyOjqqQgGbV9Xhn1w0qvgjFDWkSsGKL/ZTLdiD33sS -etQpUIw+duchtk51WF2HFgXesX0C9tgD3vnSL4CCbqXshCZO/P2wC9co1aPg -2kx0Qja2tv4B0yIDvD6Up13GjhHvC804gPtlKtxtil22quBGykG8vtEufhXs -/onwzNumFNzVTTdbh63VIPz+miUFL/r3j3Wvxudd1Ddy0YqC0mdhFq+wryUX -sJ09TEHY4MiLAuy+AGOVYDsKRt+EV53D5nMWMfJzoMAgPcHqOLaWcf8RLycK -Qpb6phz/zt8QecXZlQKPyrXWWthl3AfT7dwpiFcaEdvyt94PkXIrJgWtKtPf -xP7W6+1vNaUoWBKXfcn9t15z4dD+oxTMHY7IW+LA+Uojl8CLAtJ7MW0K+1r6 -wXW7vSno4UxPH8Iuuya6TcOXgpbJYwUs7L6QgX07/Cjw57RvbMfmZRbZKQZQ -IGl1dOwN9i6LU8dlgyhIG7sl/fJvfR2TC1LBFPwRG3aswr4qL3ZXNISCiR2O -GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia -70x+Lkfh53XZ2uCv/w8uxqIW +1:eJwV1Hk4Ft0bB3ApLZayvB6VlL3sXluUOrc9u4Tsy+OZEcmeVJY2JUpIL/VL +lpCEEtkjkSRboZ0oS3msY63E7zx/zDXX5zrnfO/7zMwZMbq/NcHOxsY2ji/W +PbBdcWd5Z/v+rxFDPw3KmGj/RLY6Xb8AyZ3/y2GI3Z+ukSypX4Ni8vQcWbZi +tK3lVn2BepjlwywXh0U1cOi3IlETxwdG2JebNj+Lyn+DNtbJ5h3AruwMvLOk +0oOa9GV6jbFHP7WEn6z+gK5325qYYm8dknCa1/uChMhHk2bYppPhWsGtX5HE +lGabBXbt0ihXWP4AqvCa/GaF/e6s0Okyv+9Isb5L+RD2xFr90VmVIaQzOVRm +i732SoCD6sIwsvkuddweeztfWnNg9Q80fPX6USdsC+H53Am9MSRdv8BGxyYz +xGkK6yeQkOREOoEdJWUZfbR1EvFRfCe8sT8Idf8bkj+NKo8PtAViMxx9vK9f +oVDjnyvmodhTt9kyH/vNIKmrBMdp7PXiCrzTKnNoF5EmEo2dzGgw4hWcRwOB +SxGx2KL3HKKUFuZRIC2GloCtKX9x4lj1IorPkZz6H/YRja+to3pLSJ7L36AM +ezbs+BpO6b8oY6OS11PsM9Vc2jLrl9Gui1vrG7FTQfOBV+sKYtsVLNLN6i+n +WT8ofxXMmUqHzWHnN13vPyvMDtUb9zkts/odcQ1PvMIOHm8iQteVM1G47FzJ +I7/VcOZCuO1W7OSHYhKTKhyQcPvIE13sT51jtct3OeAu/ZWDObYoVe64UXAt +VHhaa9hjF6hZJCksrIWMbV9S/LAbK0+t8q1eD6tNXi6lYc81dH39occNGsF1 +5usqmIjfjJv3dC03JJ1ru0fDVu7WBx4tHthX/k5PGttn8EnGv4obQfjnBx1D +7AD2VuV93LxwKzzB9jL2kHjRdPQ8H/Rye30WrsTPh2zZ0KHKD1f3UzZK2OwP +hsU2B/KDnWIgrx62qOoO63wmPxT8e8D8KLajXsLj9n4BaH9u2leL3eEZFCz0 +WhDm5eVcgqqYqO9efJz7ehosjz6cu4w9xsy/e9+ABspoR2cmNmfI9669z2iw +JFZt8hZb/4KNmvsTIRCu6rHTqGaiqmyNubz0LbCYs/KKs4aJsod+h+4JEQF1 +mqDQ0FMmOmB7qS+4UAQSM+Pa2GtxfqOAYeGwCIx0EU9FsdWy5QVFHbbDHVLX +2AW7ke5awrF/B7Scj+H7iE1N9p/4cV4U7svken6uYyKBY/qlJebi4DX9ej3X +cyYazuY8YuUjDj4CBqNK2BVfOoXHL4qDxPoNHLbYzmYu56WfiUPszLHhdOxs +uVDrmyoSEHngur1mA64/em8qUkgSfgud/xXcyEQ2XlwKJgNS4LLstZP2kolQ +qK3K4b9ScNbzhbUOtmx0+m7GFmnIKKE98cVmu6uqG3lQGnbKJm5vxC7sczr8 +uF4aNtW+unC8GZ9Pu4KzW7N2QniBV9q3V7g/ffN3o3QZ4LqxenGolYnuHkr5 +vBApA0ty/StCbUwUTx/oX/M/GWjqjd9vgs04c5y5vUsGdrK5uj/E5qtJYzuk +Jwu1i1nq4e34+1GdkK2WkAPHXfVSop1MJCx+LSpuUB5ExboFEruYqCZ2VuYX +uwJ4Kag3t2M7zzh0k2IKULpqtIa7m4nuNErK6LoqgIH1Aa/L2OJeVW8X3yuA +2eG8uugevN+CISnytSIcHTseEfueiUSEt5OiDsqgvX1QtPEzE8nnhHD/QSqQ +J1yStjDIRHTG+TkFCxVAOuXSMITPq0RSn7uzCjhdtB+JwV6d9fBRU5gKnAg4 +ukl4GJ+3O6M2ScUqkBCW+VtnBP9PU93TZCRUgXND3d5bP/H7jTNTtF+rBv6m +804hE0yUGSRp9aRVHQpDV91vX2SizlC0+0KOFiTON6eq8I8hMdceCxffffCg +pExzjdIYIlbKikROAjw//vTTIfMxJMSsWCdE14VdofY+/YFjKERV+0uSrD7M +xBj+8UwZQ/TxpWaBUQMY5qWlGNWNoULd4HXpHUaQwTvTOjc+hrJnfeoLko2h +ZkXL4c62cbSos7mtMcoUemreHQ61Hke9bKunBzzM4VJeUUdU7Djy2+afcFbC +EvZwueuG1Y+jIu/mZzeiraDhdfS3wZVxdGpmy4Kc90G4N5hYlKU9geZMDO1e +ulkDqs5tmTszgbScEnWGDh4CFe/MDJemCfR2S5pPo6oNnLq2JW5p/STamnu+ +Jm+XLThXWJxec2gSVfTLmlnw2EFnGn/jfzcn0fbuKa/QcTuYl0nVHfo6iVRv +JBbc7T8MFTs8chNpUyhtzYxiUoM9zHz0ixnbM4XKdJQ+RVc6gOJItMgZ+hRK +3R3Lt5TvCIcrTNwdL0+hjs85F1WvOIGLJOONb+EUemJ+WzLgjDOcr25pk++e +QtPHDrH5MVwgiPkfR9fCFJozlDkyoecKsjmzV7dtnUZ54x8XgzXc4M4fvRj6 +/mlkn5nj6cLtDhk7jm+Sd5tGJY9N3VZfcoecz3c6nM5OIy3ht78u/3IHzdKb +XW/Sp5FEv9enN94e4Lcwv0uyZhoNch21vP3dA6J61ZupD9OoM97C08iWDm2D +Mtl909MoOSyd63gnHVbpi4vHc1Kopnbll6exJ/A6P+IwFKXQJme4pFrlCXcK +qQQpFQqJ/vOyY1uNJwSub+k6hq3car55ba0nqATw/nyCba3tdP9DvScEfX4Z +a6BKoeRtoa8jXnlCvc/Ufboahbb2PtjU/METXu8osUzWoJCkq1Cq84In7LZ0 +We7eQyEt94m8aDUGvBjkl2zRpVDuzalgCw0GzFsO1bDrUeifLmq/kCYDzoro +yu/FnjBY6M7bywC5v+fiH2Bny7GtatVlgMOF0+6x+hTauMDnwH+QAZoL4upg +SKHBq+ob0o8xQC+b7eQVYwodfLm728ufAcf+/fK+DruWbU+6ciADrNjiuGew +bwbvV38ewoDZm2YL9iYUsnAw8hg6zYBa2eY34qYUqpR0qJSLZYC+AXWjyIxC +8dXh3hW5DDjHflYj15JCx1RStMLyGPDKWcq1C9vsfvEGzXwGPH+d6cxmRSHO +lOH75YUMOHGUt88BOzrIarSslAHjSvoU50EKhctIHn3ynAGp4pucCWsK+aS8 +9n3cx4DifhvaHxsKGW8c1g7qZ8DInA2vhC2FdkWz8ah8Y4A2b2a/CfZwkHph +8RAD6ka419zC9rBIH380xoD8f+ptNewoZM8R7PfwNwMEqzeLeR2mkFHw1oAC +GgHBs2ba9x0o9Dz9oknSZgKaXl352Y6t3UpJhm0lwA1JErPYylKvP+ptJ4Cj +2ejlfkcKbXl/Wu+zFAEBDd803mAz9/TSONUJmL1wqW7MiULX2DOeeh0iIDG+ +1n7ZBe9fiTvV3JaAyQOxzSKuFLrgFBakepiAlRHptfuww0qtdq44EuBwrWH0 +FLYHuSrxPzoB12ZEHWaxVVvojBeBBExEqL7sdaPQ+0QpLokEArwjVDpjPShU +hHiO/EgkoLbJ2zAL+8L4bGPhdQIc78cnVGKrGDdGaqYQ0GmSkjGCHc/mSZnf +IaA01O2hDp1Chv4ZH8MKCDgVUxY9ji0iEqOxv4iA5b+5WuyeFJpt8b+++hEB +qb5u9TTsLGlkHl9CwO+AHWYI+29v77O7VQTw1KdbxGOXmgnntTcT8EKnnUOS +QaG43+wcyS0ExHLqzKlj0/NGPRxaCWjrdawwwuZdUyU82EGAIk94pQ+2b7X9 +tV/vCBA6CfeKsCVk/wuVHMJ59qCkSFDo9/uIrp/DeD7T2H4fdmc0ofzwBwF8 +1n02ZtiRA2qjWmME5KtnNntjf0rtcrGcIWBXjOetLOykdXwGp1aR4JQUN8RF +4v8B1esUspoE+K1eugV7pDc/yI+DBEays+lObO1S/Qz6BhJMJYS6dLCH3cP+ +mPCRYJPDeyAEm9fMgN9AgAQZ4qjjGey9u/llkCAJZ9PV1K9gJ/AU2KluIaFM +jVv/Lmu86muxsBi2XU5TOzaZU9AsKEHCOXnjbR9Z8xNOft0kRUJEuuWe76x6 +pADPGhkS7P9EdsyzxgWMjowpk9ATqecq7EWhqmWBqGEVEsjl9/MS2EM/+2/0 +q5Ews/nFYXnsPc9ONXRrkiD2IDtIG3vQt2j7UyBBsNKJ2xF7o/1p9XJdEpoP +poy4Y2vpHTAr1idByE0izgs7fsu3kzkHcL8HZeRCsCvWPExINyGh6mLmzlPY +3ydP37tpRkJ9BzkWha3ZJNhz1YoExWs97bHY9OJvzEvWJHxMiBi7hn319kP2 +czYk0J76v03G/hZkrBxqj+v/VVpIw+ZxpRkFOJKw7eOSehYrz/i7i48zCXW+ +fPtyWet3RMS5upPw+Pam7EJWP5wmWfZ0Es7vXVxdzMqbo1VaM0hIS5GWL2Xl +DXzvMCNJGNa/ta2cldf6aNjwCF7fZ91TyeqvPOIv+JDQsc7KroaVn2Xyz15f +Ek74JKbXsvKvCsmp+5HgVkErfsbKDxvUUQog4VH+19jn2NyMYnuZIBI42Mfk +G7F3W0b6S4SQEHRxb8oLVv4e04sioSRErmt/1YR9RWpzmlAYCeLOdxtfYpfx +DpXwncL16dWXmrEH/hS3cIWT4L+KJvCKlT8SOcARSYKjVAnJssZb08WVKBI8 +GpLOsfx/8NYj9g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.4222837130873766, 2.103798844286089}}, + "PlotRange" -> {{0, 180}, {0.8660001343050076, 1.150338659336022}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.42228371308737755`}, + "AxesOrigin" -> {0, 0.8660001343050094}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10024,7 +10355,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.42228371308737755`}, + AxesOrigin->{0, 0.8660001343050094}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10052,7 +10384,8 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.4222837130873766, 2.103798844286089}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.8660001343050076, 1.150338659336022}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10060,9 +10393,9 @@ GRXYT/kHHwuEUSCUO/LrKXbv76Imngh8PnJJTk/+1v96qpf9FAUFFp5Nxdia Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913411752988663`*^9}, + CellChangeTimes->{3.9913411752988663`*^9, 3.994387902758127*^9}, CellLabel-> - "Out[360]=",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] + "Out[118]=",ExpressionUUID->"a9638e74-5a0b-4265-b3ca-84e7eac3d699"] }, Open ]], Cell[CellGroupData[{ @@ -10125,157 +10458,161 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918498397477245`*^9, - 3.9918498435341415`*^9}},ExpressionUUID->"92d458c4-bfde-c447-a06c-\ -70a15768b745"], + CellChangeTimes->{{3.9918498397477245`*^9, 3.9918498435341415`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.939746899581406`*^-267\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1759062208041434`*^-270\\\", \ +\\\"1263377636044591724886240423994982400000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994387902933174*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"d6ceb698-c8f5-4541-86bd-2cf9baf8a661"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"6.3218498061069315`*^-283\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 42, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994387902940477*^9}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"6ae788b3-1111-4de6-8f85-dfc74c734b7e"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"3.398722131399534`*^-295\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 361, - 369, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755393047`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 43, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994387902946594*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7974258435449576`*^-278\\\", \ -\\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 361, 370, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755492897`*^9}, - CellLabel-> - "During evaluation of \ -In[361]:=",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.87479384448772`*^-289\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 361, 371, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991341175557289*^9}, - CellLabel-> - "During evaluation of \ -In[361]:=",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], +In[119]:=",ExpressionUUID->"fde237c2-b11e-4a70-b249-ec3ce51e8e08"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 361, 372, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913411755664787`*^9}, +during this calculation.\"", 2, 119, 44, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913411755393047`*^9, 3.994387902952457*^9}, CellLabel-> "During evaluation of \ -In[361]:=",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], +In[119]:=",ExpressionUUID->"25e804c7-6db3-44ce-92ea-adea27fdb6d0"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VP0XB3AlpVKJlJ2ZuTOD7EXEdE4UBlFSUlmylbWxh2QpW0miLIUk +WedO6pEkRWghqaQoJUn1aLEkhSf53d9f9/X+497X93vv+X7OuTS3g3aec4WE +hObPERL6//VXX2sLcaJ4w4G70UNRvQYbugqkIzb2xENvTxTd7PFKQKknbtI9 +GaCTuqVQ4jELwrZWdAv3FIFsm2jOj3Z9WD68KmOq+xpkbXUKb203g3f1Ngd/ +djfB82W8sK3tO8GM+PJ2rLsTkty6ufFtXjDVve7saPcAHHY4+H5Hcxg0m5YW +PysaB0uzLMH67CSQf3fzk5v6DFxunZvxzuU0rPBzqVhgKowXu59p6ZFZkKFj +dstmhyhev+y8sV8zD17laDeOiS/BDd1u4n4JhXCiOObJXJnl6DPzVfvnVBGs +OvMhJTNfEmc6uQn6WpchyZ67ofOXFH7Kjq7qW1wKwYYXXVrjpdFY1+blrRdl +sGlkOjLggyz++bNxHWFeAREWZ9TufpPFkNKMkt3WFSC4qPFa8pcs/h18lHdy +WwVI27sa3hSVw5zULvmhPRXwrfbeb2FNOZwU4bmH8SogMz49JPeQHD6sfNEx +lFMBA1KsgJYl8lhwhOal+7kC4oy37ZM1UMBBlUkriKgEC+eCH+tMFBBaLn4Z +j66EpbFfj+6wVkDtCgmP4vhKyGtOKEl3VcBA7qNPkycqoday7uv8FAWc/9RB +hVdQCaO7GGHjrxSwUcwgIbupEpxDJ463RylisocDq3UBH5jZJvJfEhTRofrS ++ORiPrXeU+SCdEXMqr2SS4jzIfKP6lOTYkU05C/kHZTmw9mjzlI32xXRc/Fy +s+cqfGg//eDCZQUl/H1kRf5zCz6sF+RWH2lQwuDl/rtuJPBhU3fHzPBDJVzS +J1fASOGDjdA8c5dOJUxZ1m6emsoHd7uAV/BRCROKch/YZfLBLIoWEyuijI3L +fkRVF/KBp/Tr0sbVyjgyYNHZVseHlv0XvjeHKePntHKdTd/4wP1jKHE4Shkz +E60NOCN86Ejv0l8bq4yxZy+U6v7gw6ubC2OLU5SxPEP+rsQkH4YXh0gk5Cmj +aqLox1JhEqSrLNaZNSmj/+EaJZYsCX6TY7EPl9Cwstfkb/AmEtYHeq38JEHD +J1JeZdrmJIh+eV0pLE3DpQ3mjCEuCZd7m19uoNPQdcuN1C22JPTdOat+XZ+G +sxmZBoOOJNgmGPZcdKGhWmsLlxtAguJf0r/Bg4aHM0U0mnkkfAujC7/1pqGT +wbrPBsEkJB9YrCkdQsP53bIDqw6R0Gj19mhaMg3N9vXMXIojQVciTivqKg1T +BB+1JjJJEDox0ZJTQ8Nhvbga9SwSOoR9dtfcomGbsI6caw4JvhN2CWP3aGjb +UBNbl0dCcQ/Ru/81Dbm6I62cyySsvPAw0V6YjqF4o+XIdRKmVov3aeyg45Vm +EB3uJOFXvmzcmt10rLQ773yui4Sfy5iEoQsdzd+2tJq8JGF43NBnkzcd+71u +9ye9ImHglvuv3dF0FF8vQfvwjoQ2qxtLky/TMeeEi1/fVxIe3L579WQFHXN7 +wN76OwktWu32mVfo2JlhuLtmmIQ7ku/PFdyk4z2Zf5uOjJFwrXcR+/pjOk6z +PKXf/yLhnK8zDEzQsffUMtdvQgLIfntg4PM0HWnn6SHycwVwxjY44fssHR1k +PKsshAWQtib50eRCBrZLyRSfFRFA/H9XHZYpMvDxsfbjcxYJIMa/fnoFg4GO +hh9/SCwWwOF39/NlVRhYfzI+WVlMAGHNvR+YugwsU5wH2ksF4HtChGdsxsCN +jnu/0SQEcGBmmaSJFQPj9Tqer5AUgNdB2RrzrQyM2245LLxCAK7btf7Y7Wbg +P866DS+lBGAv55jsHcDAY8eLBm1kBGBcyS/MymJg2NnQdylKAuhVrryw+TwD +F7UeUl6rLIDIrPKCnxcYeFfEUqGX8o24kjy7cga66t2zVqILQHdXYc7Segae +ljU9E0sI4NnjguzbjQyU4nW3iDMFwDPNz/K7x8C1isyafMoCzXNn2joYmOLr +95ZkCUBV5Ex64nsG0iQstpaqCOBhZMYpvU8M9LiCOQqq1H5G09MGvzCwZLtQ +STrl4t6TqSY/GeiT7ynlryYA022pJ8YmGbhm0Y5DLykP3D9+vHCGgd8XX7hk +vFoAyteSkv/OJ3CY9mbHLOUGdmISuZjAnZoKfXvUBeCcfyxxrziBrg32Otcp +n0+OO1YnQ6CpNNfIWUMA6//GHPVWJPDvrMM4Sbkn+Ei8NIPA1Mo5EdOUV7pE +xYapEzhr+GQkRVMA17siYpg6BO7Zwx1op2xveehIlx6B4/WLLotpCSBDL/Sw +LhCo6iRVEE9ZpzI46r0pgeRI7Ytayk+VgyLTLQg8472r/yvlJWIHDw1vI3Cx +zeZAC20B8OP8w/N3EnhJemwykLLlb98w6z0ESh3fsTOH8pCfT+h/LgT2SjKO +36KcPHAgpMKDwMTSRWd7KbN37Q929CbQo+Z2+CTl+489g0QDCNykM6wroSMA +T1OPwBtBBBLJNg9UKM+76cbzCifwQ/lpPWPKlzT3HZQ6TODceb5HrCmbFLsE +tMQSaBmfVuRIuV/G2T84gcCUtKoid8oxp/b60Y8TyBVPjPGhrCiyx/dZGoGx +fi2GAZTrIx19YjMJNEmgdf7fe0YdvLVyCIy6uZ3rR3nac+eBvjwCiweXF3pR +zu2133/yIoE8Z8luJ8oG27Z7GZcQmDa9bGQb5e772zy/VlDPE23814RymPFW +j3NXCOTYvWnRpix1zcadW02ggaLiMTnK1ewtbpO1BArUgS1M2S7fal/pbQJP +1U4JPlPvZ0zC0nVnE4FTYaLyrZR7/OhPfR4QWCqyL7CYcuP9aYhpJ/D+xFXa +Ycplys+vZD4jcLPHV42tlNMjK5XKXlL7kfqbpUz5UNfRU/W9BJ4I6XX6Tn1f +V829s0/7CVyRGXq0hrL2gNi7qS8ERmRUDnMoSxt/tFk6Su2/U1P/D1VPQlm3 +79AnqHo7xemvofyEG1BgNUvgArvnLjTKNZfMlrrOY6Jbt9m6Z1R9FswoHglZ +yET/14qh0ZQDrj5xypdk4qJdb9iPqHrfubjs8VVpJqp5/VPgR3mDZyznvgIT +2dKdMYsoL5HRURhhM/FD+NNjRtT54cdmvEFjJm6I3309iDqPZ177WO/YyETN +4vHc39T5PbzWtN7bjIlV12pHD1G2+nf8fMZWJs4LbJnksQXwxXbHnkEPJp4+ +PZGmT+VBZ7nGo0lvJq4b+qN8gcqPOuH5RksOMvEwaaQxj3LKjRpZ/QgmKpK8 +2mYqb1SUpF8nnaTu17KrkabySDxilJuXwcTdLhX6nlR+TXY+vFmVzcR7930N +BYpUniRG5L66yES+tU2bnoIA9g+/3rW6hokljCv6crICsLH45yHcYmL9R+/P +VlQe6hedMLBvZKLvgo/0CGkBzN9pLB3dxkSH93YbWlcKoOR2fndHHxO7+ssJ +pPJ2MNV1Z9ACFgb9M7cghcrvgC/qdG0xFg4ftRM7S+X7b/Op79/FWVhwBhPz +FwpgkXBGgrcsCxVmYwsvL6C+d0RztasGC5Vj/ZIyqH4R7cmStN3Owrxesc/v +pkmY3/yjT2wXC+PvrI2snyIhXbmhom0vC5VKbdlZk1Q/7XUwMfNioXnanOdI +9ae2bSmBnAgWjgf1pwRT/Wvlhm9PVl9gocCQZmr7mYTC87Xnhy6x8M6g84eZ +jySoTh3bX1rGwgM95vzyQRKMqxVm6ddYWN/w8tbkexLc1Ww1Ze+x0HuB3LeQ +NyRUrbyWKvqVhYzlQh6fnpLAHQnnftRno3NUh2P1DRLkdRQTRY3ZuCp8J+0T +1c+Hg1qaVm9kY+i+ZzUrqkk480vcOMiKjUlF2VsPVFHzyky55qwLG88t2eQ2 +VEZCkNgbSZkUNv60jl5pn0v1W1Xss+5lY+d/jee7wqn5yPeTLK+fjdZr604X +hZIAZKpD5kc2vm/SPeJPzS+D2q+evhph45dDHTBNzTuaBkHNXvNUsO/iTMqI +JwnNZsVlsRoqqNPU52S5nZp/3EWDq2NU0PxF9Zq21dR6CzbdbjimgvuXZ0Vv +ViVh5FXsgkcpKlhYmTb3DouEH7ZT599nqmDc8xdNJTQSfht9aVlapoJ5m43Q +YRUJc1e0r/R+qoKDzjZWenNJkGk5VadAU8WjBb45wy+o+ZJYNTepSRXv6g6c +Lgjlw5CbeZnRA1X0KnOxLQ/iQ+rFcJvRR6oYVCb27epBPjxX7Dnn+EIV9QpM +HtR788FVJneN+r+qGMI1Zdx04kPEUjnPZ0vU0OqOuvuWzXzgTyo+lHNUQ8cn +d85+leAD9Y+UVjWiRu3f9qZRWSXIJ1/Zqq+vjst8ODnLyyogZ7WhuOR+Ddyh +cjHdvKAc2mQ36o2f1sQfVoVxGxPKYL18U7rWSy3UfaYnc8CkFJYKF4Xsi9fG +/C5S/apoCSjGKRk7snSQ73Gw7l1lMSxk7q2xe6CDex4xD05vvQSaHJkr4U66 +mDVlGSe/pAiC+iSaLYXWoHdW9CDzaiGMjKfu4OasQTHXzz3FgwVgrnX/HFdj +LcYwvRtPH82DO+NG//3uWIv/uF9bwBQ5BwHquq+feeohbcMmO7m2bOAMe3Q5 +LtRH4kHy7PLos7CZkN6ypEgfHd33qfiEZoJK7PFDTevW4WWnHz97z54GNU/D +BubrdWj8w3ncwvUUeN45cKw60ACfCDkFyKxKhYbCLo8xKUMsaI7yJDuS4WfZ +7G+tG4YoEmlS5PEmAdyZlQvPbVmPObuq9Li7j8KYWqb+tdH1uCYy+9P5gVio +Lf7v/USyEc4J9w/xy4+G3ZsYaKRojHmrwstkxiJAzj/ppmajMWp1Dg/xXcNA +apHf1S0OHGT259sf8w2GYtPoyFFHDnZH7c2VdAkG3eg008y9HHRrCfIutwsG +m9GqFz37OJh727roX8NgSHw5MeXux8G8eyZ610WDYbIoxiQyjoM37lzoOlYa +BK+NMp+XVHLw4+Dl/O9DgXAgtDiPK+Ag28/oPrcvEH4Jrnt+q+Lg0/n7tfid +gSBB7/mtU8NB6YHVdUdvBYKVqIL87UYOTi+n8aJPBkJ9V4nH8xccNG69uj1X +NxAsl9ZqhPVwsNltzH8XOxB6zFt/SfdycKFG7CUF+UD4Wfc12bmfWm8ax6FO +JBA0LmqTQ184eD1UsdD4FQ/qX28MS/3OwbSy29vVO3hguWI7aI1y8PMfSXF6 +Mw+8kkKfhUxw0OdKXq4SyYOfjYnnVk1ycF2jmhu7iAfx09nuddMcXOXIVtPL +5oH42nJ1pxlqfTU4YpHKgwL/uonZWQ5mGjOvuMXx4H+WjlmF "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10289,116 +10626,116 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV13k8VP0XB3AlpVKJlJ2ZuTOD7EXEdE4UBlFSUlmylbWxh2QpW0miLIUk +WedO6pEkRWghqaQoJUn1aLEkhSf53d9f9/X+497X93vv+X7OuTS3g3aec4WE +hObPERL6//VXX2sLcaJ4w4G70UNRvQYbugqkIzb2xENvTxTd7PFKQKknbtI9 +GaCTuqVQ4jELwrZWdAv3FIFsm2jOj3Z9WD68KmOq+xpkbXUKb203g3f1Ngd/ +djfB82W8sK3tO8GM+PJ2rLsTkty6ufFtXjDVve7saPcAHHY4+H5Hcxg0m5YW +PysaB0uzLMH67CSQf3fzk5v6DFxunZvxzuU0rPBzqVhgKowXu59p6ZFZkKFj +dstmhyhev+y8sV8zD17laDeOiS/BDd1u4n4JhXCiOObJXJnl6DPzVfvnVBGs +OvMhJTNfEmc6uQn6WpchyZ67ofOXFH7Kjq7qW1wKwYYXXVrjpdFY1+blrRdl +sGlkOjLggyz++bNxHWFeAREWZ9TufpPFkNKMkt3WFSC4qPFa8pcs/h18lHdy +WwVI27sa3hSVw5zULvmhPRXwrfbeb2FNOZwU4bmH8SogMz49JPeQHD6sfNEx +lFMBA1KsgJYl8lhwhOal+7kC4oy37ZM1UMBBlUkriKgEC+eCH+tMFBBaLn4Z +j66EpbFfj+6wVkDtCgmP4vhKyGtOKEl3VcBA7qNPkycqoday7uv8FAWc/9RB +hVdQCaO7GGHjrxSwUcwgIbupEpxDJ463RylisocDq3UBH5jZJvJfEhTRofrS ++ORiPrXeU+SCdEXMqr2SS4jzIfKP6lOTYkU05C/kHZTmw9mjzlI32xXRc/Fy +s+cqfGg//eDCZQUl/H1kRf5zCz6sF+RWH2lQwuDl/rtuJPBhU3fHzPBDJVzS +J1fASOGDjdA8c5dOJUxZ1m6emsoHd7uAV/BRCROKch/YZfLBLIoWEyuijI3L +fkRVF/KBp/Tr0sbVyjgyYNHZVseHlv0XvjeHKePntHKdTd/4wP1jKHE4Shkz +E60NOCN86Ejv0l8bq4yxZy+U6v7gw6ubC2OLU5SxPEP+rsQkH4YXh0gk5Cmj +aqLox1JhEqSrLNaZNSmj/+EaJZYsCX6TY7EPl9Cwstfkb/AmEtYHeq38JEHD +J1JeZdrmJIh+eV0pLE3DpQ3mjCEuCZd7m19uoNPQdcuN1C22JPTdOat+XZ+G +sxmZBoOOJNgmGPZcdKGhWmsLlxtAguJf0r/Bg4aHM0U0mnkkfAujC7/1pqGT +wbrPBsEkJB9YrCkdQsP53bIDqw6R0Gj19mhaMg3N9vXMXIojQVciTivqKg1T +BB+1JjJJEDox0ZJTQ8Nhvbga9SwSOoR9dtfcomGbsI6caw4JvhN2CWP3aGjb +UBNbl0dCcQ/Ru/81Dbm6I62cyySsvPAw0V6YjqF4o+XIdRKmVov3aeyg45Vm +EB3uJOFXvmzcmt10rLQ773yui4Sfy5iEoQsdzd+2tJq8JGF43NBnkzcd+71u +9ye9ImHglvuv3dF0FF8vQfvwjoQ2qxtLky/TMeeEi1/fVxIe3L579WQFHXN7 +wN76OwktWu32mVfo2JlhuLtmmIQ7ku/PFdyk4z2Zf5uOjJFwrXcR+/pjOk6z +PKXf/yLhnK8zDEzQsffUMtdvQgLIfntg4PM0HWnn6SHycwVwxjY44fssHR1k +PKsshAWQtib50eRCBrZLyRSfFRFA/H9XHZYpMvDxsfbjcxYJIMa/fnoFg4GO +hh9/SCwWwOF39/NlVRhYfzI+WVlMAGHNvR+YugwsU5wH2ksF4HtChGdsxsCN +jnu/0SQEcGBmmaSJFQPj9Tqer5AUgNdB2RrzrQyM2245LLxCAK7btf7Y7Wbg +P866DS+lBGAv55jsHcDAY8eLBm1kBGBcyS/MymJg2NnQdylKAuhVrryw+TwD +F7UeUl6rLIDIrPKCnxcYeFfEUqGX8o24kjy7cga66t2zVqILQHdXYc7Segae +ljU9E0sI4NnjguzbjQyU4nW3iDMFwDPNz/K7x8C1isyafMoCzXNn2joYmOLr +95ZkCUBV5Ex64nsG0iQstpaqCOBhZMYpvU8M9LiCOQqq1H5G09MGvzCwZLtQ +STrl4t6TqSY/GeiT7ynlryYA022pJ8YmGbhm0Y5DLykP3D9+vHCGgd8XX7hk +vFoAyteSkv/OJ3CY9mbHLOUGdmISuZjAnZoKfXvUBeCcfyxxrziBrg32Otcp +n0+OO1YnQ6CpNNfIWUMA6//GHPVWJPDvrMM4Sbkn+Ei8NIPA1Mo5EdOUV7pE +xYapEzhr+GQkRVMA17siYpg6BO7Zwx1op2xveehIlx6B4/WLLotpCSBDL/Sw +LhCo6iRVEE9ZpzI46r0pgeRI7Ytayk+VgyLTLQg8472r/yvlJWIHDw1vI3Cx +zeZAC20B8OP8w/N3EnhJemwykLLlb98w6z0ESh3fsTOH8pCfT+h/LgT2SjKO +36KcPHAgpMKDwMTSRWd7KbN37Q929CbQo+Z2+CTl+489g0QDCNykM6wroSMA +T1OPwBtBBBLJNg9UKM+76cbzCifwQ/lpPWPKlzT3HZQ6TODceb5HrCmbFLsE +tMQSaBmfVuRIuV/G2T84gcCUtKoid8oxp/b60Y8TyBVPjPGhrCiyx/dZGoGx +fi2GAZTrIx19YjMJNEmgdf7fe0YdvLVyCIy6uZ3rR3nac+eBvjwCiweXF3pR +zu2133/yIoE8Z8luJ8oG27Z7GZcQmDa9bGQb5e772zy/VlDPE23814RymPFW +j3NXCOTYvWnRpix1zcadW02ggaLiMTnK1ewtbpO1BArUgS1M2S7fal/pbQJP +1U4JPlPvZ0zC0nVnE4FTYaLyrZR7/OhPfR4QWCqyL7CYcuP9aYhpJ/D+xFXa +Ycplys+vZD4jcLPHV42tlNMjK5XKXlL7kfqbpUz5UNfRU/W9BJ4I6XX6Tn1f +V829s0/7CVyRGXq0hrL2gNi7qS8ERmRUDnMoSxt/tFk6Su2/U1P/D1VPQlm3 +79AnqHo7xemvofyEG1BgNUvgArvnLjTKNZfMlrrOY6Jbt9m6Z1R9FswoHglZ +yET/14qh0ZQDrj5xypdk4qJdb9iPqHrfubjs8VVpJqp5/VPgR3mDZyznvgIT +2dKdMYsoL5HRURhhM/FD+NNjRtT54cdmvEFjJm6I3309iDqPZ177WO/YyETN +4vHc39T5PbzWtN7bjIlV12pHD1G2+nf8fMZWJs4LbJnksQXwxXbHnkEPJp4+ +PZGmT+VBZ7nGo0lvJq4b+qN8gcqPOuH5RksOMvEwaaQxj3LKjRpZ/QgmKpK8 +2mYqb1SUpF8nnaTu17KrkabySDxilJuXwcTdLhX6nlR+TXY+vFmVzcR7930N +BYpUniRG5L66yES+tU2bnoIA9g+/3rW6hokljCv6crICsLH45yHcYmL9R+/P +VlQe6hedMLBvZKLvgo/0CGkBzN9pLB3dxkSH93YbWlcKoOR2fndHHxO7+ssJ +pPJ2MNV1Z9ACFgb9M7cghcrvgC/qdG0xFg4ftRM7S+X7b/Op79/FWVhwBhPz +FwpgkXBGgrcsCxVmYwsvL6C+d0RztasGC5Vj/ZIyqH4R7cmStN3Owrxesc/v +pkmY3/yjT2wXC+PvrI2snyIhXbmhom0vC5VKbdlZk1Q/7XUwMfNioXnanOdI +9ae2bSmBnAgWjgf1pwRT/Wvlhm9PVl9gocCQZmr7mYTC87Xnhy6x8M6g84eZ +jySoTh3bX1rGwgM95vzyQRKMqxVm6ddYWN/w8tbkexLc1Ww1Ze+x0HuB3LeQ +NyRUrbyWKvqVhYzlQh6fnpLAHQnnftRno3NUh2P1DRLkdRQTRY3ZuCp8J+0T +1c+Hg1qaVm9kY+i+ZzUrqkk480vcOMiKjUlF2VsPVFHzyky55qwLG88t2eQ2 +VEZCkNgbSZkUNv60jl5pn0v1W1Xss+5lY+d/jee7wqn5yPeTLK+fjdZr604X +hZIAZKpD5kc2vm/SPeJPzS+D2q+evhph45dDHTBNzTuaBkHNXvNUsO/iTMqI +JwnNZsVlsRoqqNPU52S5nZp/3EWDq2NU0PxF9Zq21dR6CzbdbjimgvuXZ0Vv +ViVh5FXsgkcpKlhYmTb3DouEH7ZT599nqmDc8xdNJTQSfht9aVlapoJ5m43Q +YRUJc1e0r/R+qoKDzjZWenNJkGk5VadAU8WjBb45wy+o+ZJYNTepSRXv6g6c +Lgjlw5CbeZnRA1X0KnOxLQ/iQ+rFcJvRR6oYVCb27epBPjxX7Dnn+EIV9QpM +HtR788FVJneN+r+qGMI1Zdx04kPEUjnPZ0vU0OqOuvuWzXzgTyo+lHNUQ8cn +d85+leAD9Y+UVjWiRu3f9qZRWSXIJ1/Zqq+vjst8ODnLyyogZ7WhuOR+Ddyh +cjHdvKAc2mQ36o2f1sQfVoVxGxPKYL18U7rWSy3UfaYnc8CkFJYKF4Xsi9fG +/C5S/apoCSjGKRk7snSQ73Gw7l1lMSxk7q2xe6CDex4xD05vvQSaHJkr4U66 +mDVlGSe/pAiC+iSaLYXWoHdW9CDzaiGMjKfu4OasQTHXzz3FgwVgrnX/HFdj +LcYwvRtPH82DO+NG//3uWIv/uF9bwBQ5BwHquq+feeohbcMmO7m2bOAMe3Q5 +LtRH4kHy7PLos7CZkN6ypEgfHd33qfiEZoJK7PFDTevW4WWnHz97z54GNU/D +BubrdWj8w3ncwvUUeN45cKw60ACfCDkFyKxKhYbCLo8xKUMsaI7yJDuS4WfZ +7G+tG4YoEmlS5PEmAdyZlQvPbVmPObuq9Li7j8KYWqb+tdH1uCYy+9P5gVio +Lf7v/USyEc4J9w/xy4+G3ZsYaKRojHmrwstkxiJAzj/ppmajMWp1Dg/xXcNA +apHf1S0OHGT259sf8w2GYtPoyFFHDnZH7c2VdAkG3eg008y9HHRrCfIutwsG +m9GqFz37OJh727roX8NgSHw5MeXux8G8eyZ610WDYbIoxiQyjoM37lzoOlYa +BK+NMp+XVHLw4+Dl/O9DgXAgtDiPK+Ag28/oPrcvEH4Jrnt+q+Lg0/n7tfid +gSBB7/mtU8NB6YHVdUdvBYKVqIL87UYOTi+n8aJPBkJ9V4nH8xccNG69uj1X +NxAsl9ZqhPVwsNltzH8XOxB6zFt/SfdycKFG7CUF+UD4Wfc12bmfWm8ax6FO +JBA0LmqTQ184eD1UsdD4FQ/qX28MS/3OwbSy29vVO3hguWI7aI1y8PMfSXF6 +Mw+8kkKfhUxw0OdKXq4SyYOfjYnnVk1ycF2jmhu7iAfx09nuddMcXOXIVtPL +5oH42nJ1pxlqfTU4YpHKgwL/uonZWQ5mGjOvuMXx4H+WjlmF "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.058970893049954856`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10410,19 +10747,19 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.058970893049954856`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10436,115 +10773,115 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4Fe0bB3BLZHfOmXOOpWSX4ljatOC+lRJCSqUSlZCSSki0IKIkokUK -FVleJeQl25mTpZCUJaGy11uUlKW0+T2/v+b6XHPNXPPM9Xy/c4/67oMbPESE -hITEhYWE/n+c7K6v0Yq5ZB7C8Wvr2bfOvC1V8ZhFhx94DayLX8ecD8h5vlux -IxyWBuzazWQuh8D1/7wS7UiAOKWPV4YZNsAcUUiYenUbagt39ZQwtkFPhf3B -8VeFsMq2lK/M2AdrtIbefn1VBQt1p1bQssEw9crk8uirFnhpa1fhNuMcVK/K -ymi+PQCmfzRLtb4mw+ye0ve79T/DvlDDB8ea04Ht4/bPzFVjYOGlWn6nJQcS -jNeU22/6Abaf4ku3ieRDZ5KR4CvjDyjc9DOZ+7AQYjJOPRdREsYah4rfRw78 -CwqXBs4mpoiirEhhb0trCUQ5WZu3TIqhuXP/P1delIJyUZOyiLA4hiQ8Tczs -KIU8yum7sbQ4dgxJ3ynoLYX2Ftf8i6ri2LCGNi0dLQUtR38Nx7XiuFApXOcC -owyq7NLEX1wTx7yuMba9Qxn8WTPR9Mx0Js53i1yqVl8GR5bdcqsPl8DH1+55 -9t0rB5ubcuO25yVQPmbZWywqB42Zx6ObLktgxOWdo9fLyuFF2+aC1mwJjLuV -MmT5pBwMDsmIdjdJ4LFTA+q7e8vhQ+bRzG/KkmhzpNeknlkBLmz7z7MeSKL3 -h0ZVq8MVYPnlZ7DvgBQulBiIG9GohGNrL81/9EkKY/KKSxR0KyHvFq+LmpTC -Mt2IRFNeJSg67VxWKiGN1Glnz2MmlfDpYe13UQNpLHZb5E/bVkJieLz/tSBp -9FM9L3fiSCX0c3R8a2RlcPFE0u5KuhIUDtIqCgoy2Mz4WetSUwnr6pyfeavJ -oFD+3c7vdZVQHByjL79QBu+tbmeqt1TCuZ7Roa3OMigToVEDg5WwIKfc68tt -GWz4ulAvbyYfwkwddykvlcWHqhxZB1s+rHVN/WayUhYfta1Sr3Tgg1zo8OlN -62TRzzlHQ8eJDzeqIzPjd8pinkTY5w8ufHhoUzYsflYWdcXPZRr78mHUWTNw -rFMW6xP41c/j+OAaMHGuMUQO37T59MJzPmhfXTl7KFIOPS72/Cfdyifrj7s3 -M14Oo6c8+1va+RD8e96LlRlyqLe2ocCxmw+XT7tyShvlUFjr6SPWZz40XnyS -dkdFHn28tgzdlqRhed61opO0PFo7zhH8MafB8lXTn5E6eWyqrb/7zYIGe6EZ -Vm4t8vgsMcpswJIG9w2+nfBOHjXuZ6wrsaFhTYj6qVAxBlK5EXp6m2k4pDqZ -bqHHwHErKVzpQ0ONV9rn6kAGNlhCktFlGqx/L2MdD2FgUa9sffJVGpri25Ys -CmUgS14pVyiZhs5SydCMsww0Um+IoFNpGJH2Z0XeYGCcj9wNyWwaFPPXmqyp -YiBD40Pd81IafH58Da2TZaKpfELV3C6ynsOe3PcsJm76xF1v/IYGiaGuXFFF -Jgpvb+5b3E3DndfV7eYaTHQNeM826qehm39Z/98lTFTTa2368JEGh8hlHbfc -mHg7pJbcm4Y5f+8doPcwcXpc5YDOTxo+BWqIvvVmYmqJSe7rXzRE75U2UPRn -Iu3028VkmgaB7dvTF6KZaFDEftUpIoAFrDDDkAImPjk7tbtXQgBCMRM1ScVM -PLfj8IIrkgJoEt23rbiciTmi8y5aSwlg/8SGyK+1THTkav3NlhZARofWa68u -4r7p2zZyAvBzvHYosoeJiY90pz4RY4OsePogEzVZy/rPywvgbfmkUfcIEy1K -R3xrGQLgptWdcRJlYfTw4CklSgCDCmaz/SRYKFA8HpxNXBhfUBAny8LVvY+l -F7MF4BCe/KZBgYWFUnvH13AEEO3hs8BCn4XqhbHDdgoC2Nzd+8TVmIXnMv1y -6om1tmzacXwJC4/Z/RJepSgAwVrz6BJkIWX1M8JASQBTeoxu3iYW6pf09H5Q -FsBkinLYwm0sNPtdkeIwSwDj8tpay9xYGGriLl9EPDK2bJ+lNwuf9gtTgbMF -0F/uPrntBAvnOnvldKsIoIfne21nODnP2qu8cI4A3qQFmXpGsXB6D88ykrj9 -dGz44YssPCkvW6OhKoAG2xK56DssdH7ke3qlmgCeVD4qiP2HhfFiPXURxDWG -jU6J91kkv4ZPa4j5VF9yaikLbxdHSpirC6A8ctgsg8/C4Y4ky6PED79P9OZU -s/DSrDuQR1z4Wmruv89Y+ODKE3+OhgDu23EaylpYeM125P5q4ru06gHBKxbq -KhnePUKcmb7owdM+Fu5bqD1UR5zOgc3N71lYVz+iP0p8M8p6qn2Yhaelfy3g -aAogeb8r9E+w0GmjZIwz8dW3e/v/+8nCWE/N7kDiSw5HIj9Pk/dhnj+ZQHzx -0QndsRkUWsiavbxLfGFh9NMfkhRKBG8JriGOuZPg+1eOwtb02PedxNEKKcwZ -bAqTVH2VPxNHns0qklSi0PZHFPcvcfivgi3ycyiMztv3WkZLAKcOVPxka1K4 -emmmtxLx8Z7HKcq6FJ4RevpIk/iYYzOq8SiU+s97UI84sPr1gPYCCn8Cu8WY -+Mji92f0TCi80bo9ZjHxoazRecamFIp1tzBMiH2VfjUusaCwRk7GfQnx/hix -Q6ZrKLwSnRy+kHjvH3lqpS2F7D7mIQNiz4PKxVbrKdylJq4/l9i9T2ur3SYK -ewXSJSrEOzca/t6wjcI3eSVMFvGO2mVpzm4UrlibZjqDeJuJ5UrXPRQauDgv -HSfr3ZJj/87dm8K++cfE+omdZm2N9valUNMjKeMZsWOsu97BIxSq6ttxS4jt -pw80+QdRKMk03J5KbHs46HDwCQofsduPnCZeOxDODg2nMDGra6cn8epNsSWR -URS+zX6pYUW88snVbTHnKSz13FmmTWyae/fmlSsURgSd93lD9sNrtdy01dcp -/Og6Zl1CHHwlJ3U8jcKuL4ZW8cQlYZk3NuRQuDVVI92UePP3jOvCeRRSL16K -MIjHfdKT8wspXNPmHNFH9usC55tJchUUxgs1jpwkbn6WerVSQKFzQ3mHDfGh -VSlXfGopPJUT/J5NnGeQfKmhidhj78F0ko95Ypfiz/RRuOCy7up/SL7qghPi -Fr8nz5f4YLsXsedo/IXBIQpzLWcl/z9/Ga9jz68cp3Duodj4RJJPtcKo6L/i -bHQQ8/JzI3mm556JuifNxuBQaJcldk2JOOPCYCPO5HqWkfxfjw6LKFNi44ys -Vmk5Yq5bSGigPhu3T5ufTCN98m/bsVPaxmwUOfdgPRA72QSdbFvMxu+CbRvf -kv5JWBxwfAGwMU1z1zBFLCtzMGjEkY1CWWYB+0l/zSjdfcjzKBtzf2TtrSF9 -mG6w6yDnOBtl5NNOWhGvzHDzrQllY4bsvmd1LLL/41x8NM6xcZ1wnsJjpgB+ -emze232DjRv+uvjmkv79yrLZubmKjdKdJTfVSX93+Gi82PeEjfsTe06EkH4X -PP4JpxrZKByrYt9K+j8+OFc1u508/wTdcJx8H4z6ZXqmhth4d+zT2hIxkoeC -5ztSKA4mfpGfuky+L5uls58VKHLwebVorcRfGsw9Qs0eq3Cw9e2lC0d/0yCr -ZKzyZS4Hg1JPq1lP0XA3NOENmnKw++Y+74pvNAw5bNo+uIeD+p72vYODNLTk -8J7+8ObgU6f5yxUHaCgTFV8he5CDgY41OVZ9NJwtKVZecoyDaqmOL5Lf0qCr -qtgVFcvB2eufe7DaafAa6XLWK+Ygo9tJZu1jGgbP79zsN5OL4kbhJh3pNPgO -6WsYyXDRs7AUHt6i4bvV1OfPDC56u7hJXU6jQUo0IdJbmYvvlvM+WV6nwehY -ddFOHhezPvqJn0yg4YSHDuWwkYtiV36Vbw6lgWv+6bleGhdFIkL8crfScPP6 -w+sf07nYvXX5Fp0tNMybivDKyuZi2NmPuqlONJgWqUxrFHKxbmd4UoQDmV/m -Oxgo13LR9VRik/5qGvK5heclhrl41F74ybAhmU++HLV+t0QBw6f/C+WJ0jDb -eM4ZCVMFvOq/KUVKiMwjfjVVehYKePiFi+Pgbz5cmmSY+tkqoNXu9VGxk3zo -/pNjMO2mgKKc0y4lH/ngJ/OGUjqrgBevzVqxj8xvyfOwe91rBWxNjnDamkTm -N3eJI0WnFFFsu753lRofRlItK+kIRWw72znxbjYfvnSGznx6VhGVXgbkiCvx -4ZvD1PW+REXcYBNyHph8+L5iqEYuWxF/r37kFyfMBxF2I9f7hSLqVDCtc/oq -QakmrkxFXQlnbfXyaU6rJP83CiJRVUqYvGvHyc3sSmA907mQ/0UZ269H35ya -LIfZ0ffXL1kyG59OVlU43C6DJL1lDMpLhdzvd4qSXSk0KFssHrs4B/9sYWhF -jZTA8tlV8Ybtqqh4Mcx8iWcxyIne9t8VroZ9j6Ufcb4VwZwwVdOtOuo4Gjxm -m7LjAUhquxRveKKOy5UMnVa1FYCBmdL9ozs0MNvssF+cTz74dbOqbYQ0MVS8 -d13rwD34MnZ+k3WSJg7JB2QNrcgFK8PHydY8LUw/bHRyhJ8N/LEVv743aaGX -WRc70CgTfPUXdDV7aGNWc558w7d0MBvZ07ZVUgdvatucnHn/FqzWUrSTva2D -0SLbgkz800A39FxQlclc/LF0/zetoesw32MZrd01Fz1S/lRc9EoCD/7eiKLD -uljZxh9g+l4G+mbbnq+ceSjcaXHheWQCjGdPfzcsmYf1O5pz5n6LA3ftXMlk -u/loZbFBO/FBDHydn7ikcHQ+dju0Cn1JjYKHGb/6JqL1cGi7fMyLVRGwzVIT -V8zRx6S6NVW3doTBrANRpQYCfbzkl2+va3YCOFI+BXZbeOh27kpafUMQZKw6 -ETy6lYcWDRFijg+DYMGJC6sSXXh43/Wx+uCdILAfzX/ZsYuHHgNlnrywIDjT -PjHl7sPDdpfRCNulQfDj9qmVwWE8tB6tnl+QfRS6ViS2ZuaS6x1kVH9dDIS9 -ARk3rPN4aFx79PhIaCBM5v3r8Smfh4vTHbo/HQwElkbHd+NiHu5p2nFNyj4Q -bCVUZlcKeJjQM7KxXioQKtoy97S+5OG3E5oKDmcCwEbuIS+wg4edtDxvNCAA -OqzqJxVf83CNiffodY8AGC8bjnbt5WHA/VZvanUA8G4Z3fs4xMMZNQPxYTMC -oKLLIvD8Zx7qy8WGHB33Bxv2RjAc5aHl6awPRwf9wTMqoNl/gocTIY2Lkmr8 -YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL -/pB6oGxiepqHr5IOTG+K9If/AYSbTVQ= +1:eJwV13k8VP0XB3AlpVKJlJ2ZuTOD7EXEdE4UBlFSUlmylbWxh2QpW0miLIUk +WedO6pEkRWghqaQoJUn1aLEkhSf53d9f9/X+497X93vv+X7OuTS3g3aec4WE +hObPERL6//VXX2sLcaJ4w4G70UNRvQYbugqkIzb2xENvTxTd7PFKQKknbtI9 +GaCTuqVQ4jELwrZWdAv3FIFsm2jOj3Z9WD68KmOq+xpkbXUKb203g3f1Ngd/ +djfB82W8sK3tO8GM+PJ2rLsTkty6ufFtXjDVve7saPcAHHY4+H5Hcxg0m5YW +PysaB0uzLMH67CSQf3fzk5v6DFxunZvxzuU0rPBzqVhgKowXu59p6ZFZkKFj +dstmhyhev+y8sV8zD17laDeOiS/BDd1u4n4JhXCiOObJXJnl6DPzVfvnVBGs +OvMhJTNfEmc6uQn6WpchyZ67ofOXFH7Kjq7qW1wKwYYXXVrjpdFY1+blrRdl +sGlkOjLggyz++bNxHWFeAREWZ9TufpPFkNKMkt3WFSC4qPFa8pcs/h18lHdy +WwVI27sa3hSVw5zULvmhPRXwrfbeb2FNOZwU4bmH8SogMz49JPeQHD6sfNEx +lFMBA1KsgJYl8lhwhOal+7kC4oy37ZM1UMBBlUkriKgEC+eCH+tMFBBaLn4Z +j66EpbFfj+6wVkDtCgmP4vhKyGtOKEl3VcBA7qNPkycqoday7uv8FAWc/9RB +hVdQCaO7GGHjrxSwUcwgIbupEpxDJ463RylisocDq3UBH5jZJvJfEhTRofrS ++ORiPrXeU+SCdEXMqr2SS4jzIfKP6lOTYkU05C/kHZTmw9mjzlI32xXRc/Fy +s+cqfGg//eDCZQUl/H1kRf5zCz6sF+RWH2lQwuDl/rtuJPBhU3fHzPBDJVzS +J1fASOGDjdA8c5dOJUxZ1m6emsoHd7uAV/BRCROKch/YZfLBLIoWEyuijI3L +fkRVF/KBp/Tr0sbVyjgyYNHZVseHlv0XvjeHKePntHKdTd/4wP1jKHE4Shkz +E60NOCN86Ejv0l8bq4yxZy+U6v7gw6ubC2OLU5SxPEP+rsQkH4YXh0gk5Cmj +aqLox1JhEqSrLNaZNSmj/+EaJZYsCX6TY7EPl9Cwstfkb/AmEtYHeq38JEHD +J1JeZdrmJIh+eV0pLE3DpQ3mjCEuCZd7m19uoNPQdcuN1C22JPTdOat+XZ+G +sxmZBoOOJNgmGPZcdKGhWmsLlxtAguJf0r/Bg4aHM0U0mnkkfAujC7/1pqGT +wbrPBsEkJB9YrCkdQsP53bIDqw6R0Gj19mhaMg3N9vXMXIojQVciTivqKg1T +BB+1JjJJEDox0ZJTQ8Nhvbga9SwSOoR9dtfcomGbsI6caw4JvhN2CWP3aGjb +UBNbl0dCcQ/Ru/81Dbm6I62cyySsvPAw0V6YjqF4o+XIdRKmVov3aeyg45Vm +EB3uJOFXvmzcmt10rLQ773yui4Sfy5iEoQsdzd+2tJq8JGF43NBnkzcd+71u +9ye9ImHglvuv3dF0FF8vQfvwjoQ2qxtLky/TMeeEi1/fVxIe3L579WQFHXN7 +wN76OwktWu32mVfo2JlhuLtmmIQ7ku/PFdyk4z2Zf5uOjJFwrXcR+/pjOk6z +PKXf/yLhnK8zDEzQsffUMtdvQgLIfntg4PM0HWnn6SHycwVwxjY44fssHR1k +PKsshAWQtib50eRCBrZLyRSfFRFA/H9XHZYpMvDxsfbjcxYJIMa/fnoFg4GO +hh9/SCwWwOF39/NlVRhYfzI+WVlMAGHNvR+YugwsU5wH2ksF4HtChGdsxsCN +jnu/0SQEcGBmmaSJFQPj9Tqer5AUgNdB2RrzrQyM2245LLxCAK7btf7Y7Wbg +P866DS+lBGAv55jsHcDAY8eLBm1kBGBcyS/MymJg2NnQdylKAuhVrryw+TwD +F7UeUl6rLIDIrPKCnxcYeFfEUqGX8o24kjy7cga66t2zVqILQHdXYc7Segae +ljU9E0sI4NnjguzbjQyU4nW3iDMFwDPNz/K7x8C1isyafMoCzXNn2joYmOLr +95ZkCUBV5Ex64nsG0iQstpaqCOBhZMYpvU8M9LiCOQqq1H5G09MGvzCwZLtQ +STrl4t6TqSY/GeiT7ynlryYA022pJ8YmGbhm0Y5DLykP3D9+vHCGgd8XX7hk +vFoAyteSkv/OJ3CY9mbHLOUGdmISuZjAnZoKfXvUBeCcfyxxrziBrg32Otcp +n0+OO1YnQ6CpNNfIWUMA6//GHPVWJPDvrMM4Sbkn+Ei8NIPA1Mo5EdOUV7pE +xYapEzhr+GQkRVMA17siYpg6BO7Zwx1op2xveehIlx6B4/WLLotpCSBDL/Sw +LhCo6iRVEE9ZpzI46r0pgeRI7Ytayk+VgyLTLQg8472r/yvlJWIHDw1vI3Cx +zeZAC20B8OP8w/N3EnhJemwykLLlb98w6z0ESh3fsTOH8pCfT+h/LgT2SjKO +36KcPHAgpMKDwMTSRWd7KbN37Q929CbQo+Z2+CTl+489g0QDCNykM6wroSMA +T1OPwBtBBBLJNg9UKM+76cbzCifwQ/lpPWPKlzT3HZQ6TODceb5HrCmbFLsE +tMQSaBmfVuRIuV/G2T84gcCUtKoid8oxp/b60Y8TyBVPjPGhrCiyx/dZGoGx +fi2GAZTrIx19YjMJNEmgdf7fe0YdvLVyCIy6uZ3rR3nac+eBvjwCiweXF3pR +zu2133/yIoE8Z8luJ8oG27Z7GZcQmDa9bGQb5e772zy/VlDPE23814RymPFW +j3NXCOTYvWnRpix1zcadW02ggaLiMTnK1ewtbpO1BArUgS1M2S7fal/pbQJP +1U4JPlPvZ0zC0nVnE4FTYaLyrZR7/OhPfR4QWCqyL7CYcuP9aYhpJ/D+xFXa +Ycplys+vZD4jcLPHV42tlNMjK5XKXlL7kfqbpUz5UNfRU/W9BJ4I6XX6Tn1f +V829s0/7CVyRGXq0hrL2gNi7qS8ERmRUDnMoSxt/tFk6Su2/U1P/D1VPQlm3 +79AnqHo7xemvofyEG1BgNUvgArvnLjTKNZfMlrrOY6Jbt9m6Z1R9FswoHglZ +yET/14qh0ZQDrj5xypdk4qJdb9iPqHrfubjs8VVpJqp5/VPgR3mDZyznvgIT +2dKdMYsoL5HRURhhM/FD+NNjRtT54cdmvEFjJm6I3309iDqPZ177WO/YyETN +4vHc39T5PbzWtN7bjIlV12pHD1G2+nf8fMZWJs4LbJnksQXwxXbHnkEPJp4+ +PZGmT+VBZ7nGo0lvJq4b+qN8gcqPOuH5RksOMvEwaaQxj3LKjRpZ/QgmKpK8 +2mYqb1SUpF8nnaTu17KrkabySDxilJuXwcTdLhX6nlR+TXY+vFmVzcR7930N +BYpUniRG5L66yES+tU2bnoIA9g+/3rW6hokljCv6crICsLH45yHcYmL9R+/P +VlQe6hedMLBvZKLvgo/0CGkBzN9pLB3dxkSH93YbWlcKoOR2fndHHxO7+ssJ +pPJ2MNV1Z9ACFgb9M7cghcrvgC/qdG0xFg4ftRM7S+X7b/Op79/FWVhwBhPz +FwpgkXBGgrcsCxVmYwsvL6C+d0RztasGC5Vj/ZIyqH4R7cmStN3Owrxesc/v +pkmY3/yjT2wXC+PvrI2snyIhXbmhom0vC5VKbdlZk1Q/7XUwMfNioXnanOdI +9ae2bSmBnAgWjgf1pwRT/Wvlhm9PVl9gocCQZmr7mYTC87Xnhy6x8M6g84eZ +jySoTh3bX1rGwgM95vzyQRKMqxVm6ddYWN/w8tbkexLc1Ww1Ze+x0HuB3LeQ +NyRUrbyWKvqVhYzlQh6fnpLAHQnnftRno3NUh2P1DRLkdRQTRY3ZuCp8J+0T +1c+Hg1qaVm9kY+i+ZzUrqkk480vcOMiKjUlF2VsPVFHzyky55qwLG88t2eQ2 +VEZCkNgbSZkUNv60jl5pn0v1W1Xss+5lY+d/jee7wqn5yPeTLK+fjdZr604X +hZIAZKpD5kc2vm/SPeJPzS+D2q+evhph45dDHTBNzTuaBkHNXvNUsO/iTMqI +JwnNZsVlsRoqqNPU52S5nZp/3EWDq2NU0PxF9Zq21dR6CzbdbjimgvuXZ0Vv +ViVh5FXsgkcpKlhYmTb3DouEH7ZT599nqmDc8xdNJTQSfht9aVlapoJ5m43Q +YRUJc1e0r/R+qoKDzjZWenNJkGk5VadAU8WjBb45wy+o+ZJYNTepSRXv6g6c +Lgjlw5CbeZnRA1X0KnOxLQ/iQ+rFcJvRR6oYVCb27epBPjxX7Dnn+EIV9QpM +HtR788FVJneN+r+qGMI1Zdx04kPEUjnPZ0vU0OqOuvuWzXzgTyo+lHNUQ8cn +d85+leAD9Y+UVjWiRu3f9qZRWSXIJ1/Zqq+vjst8ODnLyyogZ7WhuOR+Ddyh +cjHdvKAc2mQ36o2f1sQfVoVxGxPKYL18U7rWSy3UfaYnc8CkFJYKF4Xsi9fG +/C5S/apoCSjGKRk7snSQ73Gw7l1lMSxk7q2xe6CDex4xD05vvQSaHJkr4U66 +mDVlGSe/pAiC+iSaLYXWoHdW9CDzaiGMjKfu4OasQTHXzz3FgwVgrnX/HFdj +LcYwvRtPH82DO+NG//3uWIv/uF9bwBQ5BwHquq+feeohbcMmO7m2bOAMe3Q5 +LtRH4kHy7PLos7CZkN6ypEgfHd33qfiEZoJK7PFDTevW4WWnHz97z54GNU/D +BubrdWj8w3ncwvUUeN45cKw60ACfCDkFyKxKhYbCLo8xKUMsaI7yJDuS4WfZ +7G+tG4YoEmlS5PEmAdyZlQvPbVmPObuq9Li7j8KYWqb+tdH1uCYy+9P5gVio +Lf7v/USyEc4J9w/xy4+G3ZsYaKRojHmrwstkxiJAzj/ppmajMWp1Dg/xXcNA +apHf1S0OHGT259sf8w2GYtPoyFFHDnZH7c2VdAkG3eg008y9HHRrCfIutwsG +m9GqFz37OJh727roX8NgSHw5MeXux8G8eyZ610WDYbIoxiQyjoM37lzoOlYa +BK+NMp+XVHLw4+Dl/O9DgXAgtDiPK+Ag28/oPrcvEH4Jrnt+q+Lg0/n7tfid +gSBB7/mtU8NB6YHVdUdvBYKVqIL87UYOTi+n8aJPBkJ9V4nH8xccNG69uj1X +NxAsl9ZqhPVwsNltzH8XOxB6zFt/SfdycKFG7CUF+UD4Wfc12bmfWm8ax6FO +JBA0LmqTQ184eD1UsdD4FQ/qX28MS/3OwbSy29vVO3hguWI7aI1y8PMfSXF6 +Mw+8kkKfhUxw0OdKXq4SyYOfjYnnVk1ycF2jmhu7iAfx09nuddMcXOXIVtPL +5oH42nJ1pxlqfTU4YpHKgwL/uonZWQ5mGjOvuMXx4H+WjlmF "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1261051971575712}}, + "PlotRange" -> {{0, 30}, {0., 0.058970893049954856`}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10555,6 +10892,7 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10582,7 +10920,8 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1261051971575712}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.058970893049954856`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10590,17 +10929,568 @@ YVxwJlnhBw/fNepKPizyh/CfV93LfvJwdPCaTX+GPzAW5ejv+MPDukWNY9zL Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913414579436264`*^9}, + CellChangeTimes->{3.9913414579436264`*^9, 3.994388321784185*^9}, CellLabel-> - "Out[361]=",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] + "Out[119]=",ExpressionUUID->"8092dc47-7944-4661-8879-e7ea13a7bb57"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"e1c8585a-8b57-f841-82e1-\ -8e8787fb2589"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8VP0XB3AlpVKJlJ2ZuTOD7EXEdE4UBlFSUlmylbWxh2QpW0miLIUk +WedO6pEkRWghqaQoJUn1aLEkhSf53d9f9/X+497X93vv+X7OuTS3g3aec4WE +hObPERL6//VXX2sLcaJ4w4G70UNRvQYbugqkIzb2xENvTxTd7PFKQKknbtI9 +GaCTuqVQ4jELwrZWdAv3FIFsm2jOj3Z9WD68KmOq+xpkbXUKb203g3f1Ngd/ +djfB82W8sK3tO8GM+PJ2rLsTkty6ufFtXjDVve7saPcAHHY4+H5Hcxg0m5YW +PysaB0uzLMH67CSQf3fzk5v6DFxunZvxzuU0rPBzqVhgKowXu59p6ZFZkKFj +dstmhyhev+y8sV8zD17laDeOiS/BDd1u4n4JhXCiOObJXJnl6DPzVfvnVBGs +OvMhJTNfEmc6uQn6WpchyZ67ofOXFH7Kjq7qW1wKwYYXXVrjpdFY1+blrRdl +sGlkOjLggyz++bNxHWFeAREWZ9TufpPFkNKMkt3WFSC4qPFa8pcs/h18lHdy +WwVI27sa3hSVw5zULvmhPRXwrfbeb2FNOZwU4bmH8SogMz49JPeQHD6sfNEx +lFMBA1KsgJYl8lhwhOal+7kC4oy37ZM1UMBBlUkriKgEC+eCH+tMFBBaLn4Z +j66EpbFfj+6wVkDtCgmP4vhKyGtOKEl3VcBA7qNPkycqoday7uv8FAWc/9RB +hVdQCaO7GGHjrxSwUcwgIbupEpxDJ463RylisocDq3UBH5jZJvJfEhTRofrS ++ORiPrXeU+SCdEXMqr2SS4jzIfKP6lOTYkU05C/kHZTmw9mjzlI32xXRc/Fy +s+cqfGg//eDCZQUl/H1kRf5zCz6sF+RWH2lQwuDl/rtuJPBhU3fHzPBDJVzS +J1fASOGDjdA8c5dOJUxZ1m6emsoHd7uAV/BRCROKch/YZfLBLIoWEyuijI3L +fkRVF/KBp/Tr0sbVyjgyYNHZVseHlv0XvjeHKePntHKdTd/4wP1jKHE4Shkz +E60NOCN86Ejv0l8bq4yxZy+U6v7gw6ubC2OLU5SxPEP+rsQkH4YXh0gk5Cmj +aqLox1JhEqSrLNaZNSmj/+EaJZYsCX6TY7EPl9Cwstfkb/AmEtYHeq38JEHD +J1JeZdrmJIh+eV0pLE3DpQ3mjCEuCZd7m19uoNPQdcuN1C22JPTdOat+XZ+G +sxmZBoOOJNgmGPZcdKGhWmsLlxtAguJf0r/Bg4aHM0U0mnkkfAujC7/1pqGT +wbrPBsEkJB9YrCkdQsP53bIDqw6R0Gj19mhaMg3N9vXMXIojQVciTivqKg1T +BB+1JjJJEDox0ZJTQ8Nhvbga9SwSOoR9dtfcomGbsI6caw4JvhN2CWP3aGjb +UBNbl0dCcQ/Ru/81Dbm6I62cyySsvPAw0V6YjqF4o+XIdRKmVov3aeyg45Vm +EB3uJOFXvmzcmt10rLQ773yui4Sfy5iEoQsdzd+2tJq8JGF43NBnkzcd+71u +9ye9ImHglvuv3dF0FF8vQfvwjoQ2qxtLky/TMeeEi1/fVxIe3L579WQFHXN7 +wN76OwktWu32mVfo2JlhuLtmmIQ7ku/PFdyk4z2Zf5uOjJFwrXcR+/pjOk6z +PKXf/yLhnK8zDEzQsffUMtdvQgLIfntg4PM0HWnn6SHycwVwxjY44fssHR1k +PKsshAWQtib50eRCBrZLyRSfFRFA/H9XHZYpMvDxsfbjcxYJIMa/fnoFg4GO +hh9/SCwWwOF39/NlVRhYfzI+WVlMAGHNvR+YugwsU5wH2ksF4HtChGdsxsCN +jnu/0SQEcGBmmaSJFQPj9Tqer5AUgNdB2RrzrQyM2245LLxCAK7btf7Y7Wbg +P866DS+lBGAv55jsHcDAY8eLBm1kBGBcyS/MymJg2NnQdylKAuhVrryw+TwD +F7UeUl6rLIDIrPKCnxcYeFfEUqGX8o24kjy7cga66t2zVqILQHdXYc7Segae +ljU9E0sI4NnjguzbjQyU4nW3iDMFwDPNz/K7x8C1isyafMoCzXNn2joYmOLr +95ZkCUBV5Ex64nsG0iQstpaqCOBhZMYpvU8M9LiCOQqq1H5G09MGvzCwZLtQ +STrl4t6TqSY/GeiT7ynlryYA022pJ8YmGbhm0Y5DLykP3D9+vHCGgd8XX7hk +vFoAyteSkv/OJ3CY9mbHLOUGdmISuZjAnZoKfXvUBeCcfyxxrziBrg32Otcp +n0+OO1YnQ6CpNNfIWUMA6//GHPVWJPDvrMM4Sbkn+Ei8NIPA1Mo5EdOUV7pE +xYapEzhr+GQkRVMA17siYpg6BO7Zwx1op2xveehIlx6B4/WLLotpCSBDL/Sw +LhCo6iRVEE9ZpzI46r0pgeRI7Ytayk+VgyLTLQg8472r/yvlJWIHDw1vI3Cx +zeZAC20B8OP8w/N3EnhJemwykLLlb98w6z0ESh3fsTOH8pCfT+h/LgT2SjKO +36KcPHAgpMKDwMTSRWd7KbN37Q929CbQo+Z2+CTl+489g0QDCNykM6wroSMA +T1OPwBtBBBLJNg9UKM+76cbzCifwQ/lpPWPKlzT3HZQ6TODceb5HrCmbFLsE +tMQSaBmfVuRIuV/G2T84gcCUtKoid8oxp/b60Y8TyBVPjPGhrCiyx/dZGoGx +fi2GAZTrIx19YjMJNEmgdf7fe0YdvLVyCIy6uZ3rR3nac+eBvjwCiweXF3pR +zu2133/yIoE8Z8luJ8oG27Z7GZcQmDa9bGQb5e772zy/VlDPE23814RymPFW +j3NXCOTYvWnRpix1zcadW02ggaLiMTnK1ewtbpO1BArUgS1M2S7fal/pbQJP +1U4JPlPvZ0zC0nVnE4FTYaLyrZR7/OhPfR4QWCqyL7CYcuP9aYhpJ/D+xFXa +Ycplys+vZD4jcLPHV42tlNMjK5XKXlL7kfqbpUz5UNfRU/W9BJ4I6XX6Tn1f +V829s0/7CVyRGXq0hrL2gNi7qS8ERmRUDnMoSxt/tFk6Su2/U1P/D1VPQlm3 +79AnqHo7xemvofyEG1BgNUvgArvnLjTKNZfMlrrOY6Jbt9m6Z1R9FswoHglZ +yET/14qh0ZQDrj5xypdk4qJdb9iPqHrfubjs8VVpJqp5/VPgR3mDZyznvgIT +2dKdMYsoL5HRURhhM/FD+NNjRtT54cdmvEFjJm6I3309iDqPZ177WO/YyETN +4vHc39T5PbzWtN7bjIlV12pHD1G2+nf8fMZWJs4LbJnksQXwxXbHnkEPJp4+ +PZGmT+VBZ7nGo0lvJq4b+qN8gcqPOuH5RksOMvEwaaQxj3LKjRpZ/QgmKpK8 +2mYqb1SUpF8nnaTu17KrkabySDxilJuXwcTdLhX6nlR+TXY+vFmVzcR7930N +BYpUniRG5L66yES+tU2bnoIA9g+/3rW6hokljCv6crICsLH45yHcYmL9R+/P +VlQe6hedMLBvZKLvgo/0CGkBzN9pLB3dxkSH93YbWlcKoOR2fndHHxO7+ssJ +pPJ2MNV1Z9ACFgb9M7cghcrvgC/qdG0xFg4ftRM7S+X7b/Op79/FWVhwBhPz +FwpgkXBGgrcsCxVmYwsvL6C+d0RztasGC5Vj/ZIyqH4R7cmStN3Owrxesc/v +pkmY3/yjT2wXC+PvrI2snyIhXbmhom0vC5VKbdlZk1Q/7XUwMfNioXnanOdI +9ae2bSmBnAgWjgf1pwRT/Wvlhm9PVl9gocCQZmr7mYTC87Xnhy6x8M6g84eZ +jySoTh3bX1rGwgM95vzyQRKMqxVm6ddYWN/w8tbkexLc1Ww1Ze+x0HuB3LeQ +NyRUrbyWKvqVhYzlQh6fnpLAHQnnftRno3NUh2P1DRLkdRQTRY3ZuCp8J+0T +1c+Hg1qaVm9kY+i+ZzUrqkk480vcOMiKjUlF2VsPVFHzyky55qwLG88t2eQ2 +VEZCkNgbSZkUNv60jl5pn0v1W1Xss+5lY+d/jee7wqn5yPeTLK+fjdZr604X +hZIAZKpD5kc2vm/SPeJPzS+D2q+evhph45dDHTBNzTuaBkHNXvNUsO/iTMqI +JwnNZsVlsRoqqNPU52S5nZp/3EWDq2NU0PxF9Zq21dR6CzbdbjimgvuXZ0Vv +ViVh5FXsgkcpKlhYmTb3DouEH7ZT599nqmDc8xdNJTQSfht9aVlapoJ5m43Q +YRUJc1e0r/R+qoKDzjZWenNJkGk5VadAU8WjBb45wy+o+ZJYNTepSRXv6g6c +Lgjlw5CbeZnRA1X0KnOxLQ/iQ+rFcJvRR6oYVCb27epBPjxX7Dnn+EIV9QpM +HtR788FVJneN+r+qGMI1Zdx04kPEUjnPZ0vU0OqOuvuWzXzgTyo+lHNUQ8cn +d85+leAD9Y+UVjWiRu3f9qZRWSXIJ1/Zqq+vjst8ODnLyyogZ7WhuOR+Ddyh +cjHdvKAc2mQ36o2f1sQfVoVxGxPKYL18U7rWSy3UfaYnc8CkFJYKF4Xsi9fG +/C5S/apoCSjGKRk7snSQ73Gw7l1lMSxk7q2xe6CDex4xD05vvQSaHJkr4U66 +mDVlGSe/pAiC+iSaLYXWoHdW9CDzaiGMjKfu4OasQTHXzz3FgwVgrnX/HFdj +LcYwvRtPH82DO+NG//3uWIv/uF9bwBQ5BwHquq+feeohbcMmO7m2bOAMe3Q5 +LtRH4kHy7PLos7CZkN6ypEgfHd33qfiEZoJK7PFDTevW4WWnHz97z54GNU/D +BubrdWj8w3ncwvUUeN45cKw60ACfCDkFyKxKhYbCLo8xKUMsaI7yJDuS4WfZ +7G+tG4YoEmlS5PEmAdyZlQvPbVmPObuq9Li7j8KYWqb+tdH1uCYy+9P5gVio +Lf7v/USyEc4J9w/xy4+G3ZsYaKRojHmrwstkxiJAzj/ppmajMWp1Dg/xXcNA +apHf1S0OHGT259sf8w2GYtPoyFFHDnZH7c2VdAkG3eg008y9HHRrCfIutwsG +m9GqFz37OJh727roX8NgSHw5MeXux8G8eyZ610WDYbIoxiQyjoM37lzoOlYa +BK+NMp+XVHLw4+Dl/O9DgXAgtDiPK+Ag28/oPrcvEH4Jrnt+q+Lg0/n7tfid +gSBB7/mtU8NB6YHVdUdvBYKVqIL87UYOTi+n8aJPBkJ9V4nH8xccNG69uj1X +NxAsl9ZqhPVwsNltzH8XOxB6zFt/SfdycKFG7CUF+UD4Wfc12bmfWm8ax6FO +JBA0LmqTQ184eD1UsdD4FQ/qX28MS/3OwbSy29vVO3hguWI7aI1y8PMfSXF6 +Mw+8kkKfhUxw0OdKXq4SyYOfjYnnVk1ycF2jmhu7iAfx09nuddMcXOXIVtPL +5oH42nJ1pxlqfTU4YpHKgwL/uonZWQ5mGjOvuMXx4H+WjlmF + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VP0XB3AlpVKJlJ2ZuTOD7EXEdE4UBlFSUlmylbWxh2QpW0miLIUk +WedO6pEkRWghqaQoJUn1aLEkhSf53d9f9/X+497X93vv+X7OuTS3g3aec4WE +hObPERL6//VXX2sLcaJ4w4G70UNRvQYbugqkIzb2xENvTxTd7PFKQKknbtI9 +GaCTuqVQ4jELwrZWdAv3FIFsm2jOj3Z9WD68KmOq+xpkbXUKb203g3f1Ngd/ +djfB82W8sK3tO8GM+PJ2rLsTkty6ufFtXjDVve7saPcAHHY4+H5Hcxg0m5YW +PysaB0uzLMH67CSQf3fzk5v6DFxunZvxzuU0rPBzqVhgKowXu59p6ZFZkKFj +dstmhyhev+y8sV8zD17laDeOiS/BDd1u4n4JhXCiOObJXJnl6DPzVfvnVBGs +OvMhJTNfEmc6uQn6WpchyZ67ofOXFH7Kjq7qW1wKwYYXXVrjpdFY1+blrRdl +sGlkOjLggyz++bNxHWFeAREWZ9TufpPFkNKMkt3WFSC4qPFa8pcs/h18lHdy +WwVI27sa3hSVw5zULvmhPRXwrfbeb2FNOZwU4bmH8SogMz49JPeQHD6sfNEx +lFMBA1KsgJYl8lhwhOal+7kC4oy37ZM1UMBBlUkriKgEC+eCH+tMFBBaLn4Z +j66EpbFfj+6wVkDtCgmP4vhKyGtOKEl3VcBA7qNPkycqoday7uv8FAWc/9RB +hVdQCaO7GGHjrxSwUcwgIbupEpxDJ463RylisocDq3UBH5jZJvJfEhTRofrS ++ORiPrXeU+SCdEXMqr2SS4jzIfKP6lOTYkU05C/kHZTmw9mjzlI32xXRc/Fy +s+cqfGg//eDCZQUl/H1kRf5zCz6sF+RWH2lQwuDl/rtuJPBhU3fHzPBDJVzS +J1fASOGDjdA8c5dOJUxZ1m6emsoHd7uAV/BRCROKch/YZfLBLIoWEyuijI3L +fkRVF/KBp/Tr0sbVyjgyYNHZVseHlv0XvjeHKePntHKdTd/4wP1jKHE4Shkz +E60NOCN86Ejv0l8bq4yxZy+U6v7gw6ubC2OLU5SxPEP+rsQkH4YXh0gk5Cmj +aqLox1JhEqSrLNaZNSmj/+EaJZYsCX6TY7EPl9Cwstfkb/AmEtYHeq38JEHD +J1JeZdrmJIh+eV0pLE3DpQ3mjCEuCZd7m19uoNPQdcuN1C22JPTdOat+XZ+G +sxmZBoOOJNgmGPZcdKGhWmsLlxtAguJf0r/Bg4aHM0U0mnkkfAujC7/1pqGT +wbrPBsEkJB9YrCkdQsP53bIDqw6R0Gj19mhaMg3N9vXMXIojQVciTivqKg1T +BB+1JjJJEDox0ZJTQ8Nhvbga9SwSOoR9dtfcomGbsI6caw4JvhN2CWP3aGjb +UBNbl0dCcQ/Ru/81Dbm6I62cyySsvPAw0V6YjqF4o+XIdRKmVov3aeyg45Vm +EB3uJOFXvmzcmt10rLQ773yui4Sfy5iEoQsdzd+2tJq8JGF43NBnkzcd+71u +9ye9ImHglvuv3dF0FF8vQfvwjoQ2qxtLky/TMeeEi1/fVxIe3L579WQFHXN7 +wN76OwktWu32mVfo2JlhuLtmmIQ7ku/PFdyk4z2Zf5uOjJFwrXcR+/pjOk6z +PKXf/yLhnK8zDEzQsffUMtdvQgLIfntg4PM0HWnn6SHycwVwxjY44fssHR1k +PKsshAWQtib50eRCBrZLyRSfFRFA/H9XHZYpMvDxsfbjcxYJIMa/fnoFg4GO +hh9/SCwWwOF39/NlVRhYfzI+WVlMAGHNvR+YugwsU5wH2ksF4HtChGdsxsCN +jnu/0SQEcGBmmaSJFQPj9Tqer5AUgNdB2RrzrQyM2245LLxCAK7btf7Y7Wbg +P866DS+lBGAv55jsHcDAY8eLBm1kBGBcyS/MymJg2NnQdylKAuhVrryw+TwD +F7UeUl6rLIDIrPKCnxcYeFfEUqGX8o24kjy7cga66t2zVqILQHdXYc7Segae +ljU9E0sI4NnjguzbjQyU4nW3iDMFwDPNz/K7x8C1isyafMoCzXNn2joYmOLr +95ZkCUBV5Ex64nsG0iQstpaqCOBhZMYpvU8M9LiCOQqq1H5G09MGvzCwZLtQ +STrl4t6TqSY/GeiT7ynlryYA022pJ8YmGbhm0Y5DLykP3D9+vHCGgd8XX7hk +vFoAyteSkv/OJ3CY9mbHLOUGdmISuZjAnZoKfXvUBeCcfyxxrziBrg32Otcp +n0+OO1YnQ6CpNNfIWUMA6//GHPVWJPDvrMM4Sbkn+Ei8NIPA1Mo5EdOUV7pE +xYapEzhr+GQkRVMA17siYpg6BO7Zwx1op2xveehIlx6B4/WLLotpCSBDL/Sw +LhCo6iRVEE9ZpzI46r0pgeRI7Ytayk+VgyLTLQg8472r/yvlJWIHDw1vI3Cx +zeZAC20B8OP8w/N3EnhJemwykLLlb98w6z0ESh3fsTOH8pCfT+h/LgT2SjKO +36KcPHAgpMKDwMTSRWd7KbN37Q929CbQo+Z2+CTl+489g0QDCNykM6wroSMA +T1OPwBtBBBLJNg9UKM+76cbzCifwQ/lpPWPKlzT3HZQ6TODceb5HrCmbFLsE +tMQSaBmfVuRIuV/G2T84gcCUtKoid8oxp/b60Y8TyBVPjPGhrCiyx/dZGoGx +fi2GAZTrIx19YjMJNEmgdf7fe0YdvLVyCIy6uZ3rR3nac+eBvjwCiweXF3pR +zu2133/yIoE8Z8luJ8oG27Z7GZcQmDa9bGQb5e772zy/VlDPE23814RymPFW +j3NXCOTYvWnRpix1zcadW02ggaLiMTnK1ewtbpO1BArUgS1M2S7fal/pbQJP +1U4JPlPvZ0zC0nVnE4FTYaLyrZR7/OhPfR4QWCqyL7CYcuP9aYhpJ/D+xFXa +Ycplys+vZD4jcLPHV42tlNMjK5XKXlL7kfqbpUz5UNfRU/W9BJ4I6XX6Tn1f +V829s0/7CVyRGXq0hrL2gNi7qS8ERmRUDnMoSxt/tFk6Su2/U1P/D1VPQlm3 +79AnqHo7xemvofyEG1BgNUvgArvnLjTKNZfMlrrOY6Jbt9m6Z1R9FswoHglZ +yET/14qh0ZQDrj5xypdk4qJdb9iPqHrfubjs8VVpJqp5/VPgR3mDZyznvgIT +2dKdMYsoL5HRURhhM/FD+NNjRtT54cdmvEFjJm6I3309iDqPZ177WO/YyETN +4vHc39T5PbzWtN7bjIlV12pHD1G2+nf8fMZWJs4LbJnksQXwxXbHnkEPJp4+ +PZGmT+VBZ7nGo0lvJq4b+qN8gcqPOuH5RksOMvEwaaQxj3LKjRpZ/QgmKpK8 +2mYqb1SUpF8nnaTu17KrkabySDxilJuXwcTdLhX6nlR+TXY+vFmVzcR7930N +BYpUniRG5L66yES+tU2bnoIA9g+/3rW6hokljCv6crICsLH45yHcYmL9R+/P +VlQe6hedMLBvZKLvgo/0CGkBzN9pLB3dxkSH93YbWlcKoOR2fndHHxO7+ssJ +pPJ2MNV1Z9ACFgb9M7cghcrvgC/qdG0xFg4ftRM7S+X7b/Op79/FWVhwBhPz +FwpgkXBGgrcsCxVmYwsvL6C+d0RztasGC5Vj/ZIyqH4R7cmStN3Owrxesc/v +pkmY3/yjT2wXC+PvrI2snyIhXbmhom0vC5VKbdlZk1Q/7XUwMfNioXnanOdI +9ae2bSmBnAgWjgf1pwRT/Wvlhm9PVl9gocCQZmr7mYTC87Xnhy6x8M6g84eZ +jySoTh3bX1rGwgM95vzyQRKMqxVm6ddYWN/w8tbkexLc1Ww1Ze+x0HuB3LeQ +NyRUrbyWKvqVhYzlQh6fnpLAHQnnftRno3NUh2P1DRLkdRQTRY3ZuCp8J+0T +1c+Hg1qaVm9kY+i+ZzUrqkk480vcOMiKjUlF2VsPVFHzyky55qwLG88t2eQ2 +VEZCkNgbSZkUNv60jl5pn0v1W1Xss+5lY+d/jee7wqn5yPeTLK+fjdZr604X +hZIAZKpD5kc2vm/SPeJPzS+D2q+evhph45dDHTBNzTuaBkHNXvNUsO/iTMqI +JwnNZsVlsRoqqNPU52S5nZp/3EWDq2NU0PxF9Zq21dR6CzbdbjimgvuXZ0Vv +ViVh5FXsgkcpKlhYmTb3DouEH7ZT599nqmDc8xdNJTQSfht9aVlapoJ5m43Q +YRUJc1e0r/R+qoKDzjZWenNJkGk5VadAU8WjBb45wy+o+ZJYNTepSRXv6g6c +Lgjlw5CbeZnRA1X0KnOxLQ/iQ+rFcJvRR6oYVCb27epBPjxX7Dnn+EIV9QpM +HtR788FVJneN+r+qGMI1Zdx04kPEUjnPZ0vU0OqOuvuWzXzgTyo+lHNUQ8cn +d85+leAD9Y+UVjWiRu3f9qZRWSXIJ1/Zqq+vjst8ODnLyyogZ7WhuOR+Ddyh +cjHdvKAc2mQ36o2f1sQfVoVxGxPKYL18U7rWSy3UfaYnc8CkFJYKF4Xsi9fG +/C5S/apoCSjGKRk7snSQ73Gw7l1lMSxk7q2xe6CDex4xD05vvQSaHJkr4U66 +mDVlGSe/pAiC+iSaLYXWoHdW9CDzaiGMjKfu4OasQTHXzz3FgwVgrnX/HFdj +LcYwvRtPH82DO+NG//3uWIv/uF9bwBQ5BwHquq+feeohbcMmO7m2bOAMe3Q5 +LtRH4kHy7PLos7CZkN6ypEgfHd33qfiEZoJK7PFDTevW4WWnHz97z54GNU/D +BubrdWj8w3ncwvUUeN45cKw60ACfCDkFyKxKhYbCLo8xKUMsaI7yJDuS4WfZ +7G+tG4YoEmlS5PEmAdyZlQvPbVmPObuq9Li7j8KYWqb+tdH1uCYy+9P5gVio +Lf7v/USyEc4J9w/xy4+G3ZsYaKRojHmrwstkxiJAzj/ppmajMWp1Dg/xXcNA +apHf1S0OHGT259sf8w2GYtPoyFFHDnZH7c2VdAkG3eg008y9HHRrCfIutwsG +m9GqFz37OJh727roX8NgSHw5MeXux8G8eyZ610WDYbIoxiQyjoM37lzoOlYa +BK+NMp+XVHLw4+Dl/O9DgXAgtDiPK+Ag28/oPrcvEH4Jrnt+q+Lg0/n7tfid +gSBB7/mtU8NB6YHVdUdvBYKVqIL87UYOTi+n8aJPBkJ9V4nH8xccNG69uj1X +NxAsl9ZqhPVwsNltzH8XOxB6zFt/SfdycKFG7CUF+UD4Wfc12bmfWm8ax6FO +JBA0LmqTQ184eD1UsdD4FQ/qX28MS/3OwbSy29vVO3hguWI7aI1y8PMfSXF6 +Mw+8kkKfhUxw0OdKXq4SyYOfjYnnVk1ycF2jmhu7iAfx09nuddMcXOXIVtPL +5oH42nJ1pxlqfTU4YpHKgwL/uonZWQ5mGjOvuMXx4H+WjlmF + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.058970893049954856`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.058970893049954856`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8VP0XB3AlpVKJlJ2ZuTOD7EXEdE4UBlFSUlmylbWxh2QpW0miLIUk +WedO6pEkRWghqaQoJUn1aLEkhSf53d9f9/X+497X93vv+X7OuTS3g3aec4WE +hObPERL6//VXX2sLcaJ4w4G70UNRvQYbugqkIzb2xENvTxTd7PFKQKknbtI9 +GaCTuqVQ4jELwrZWdAv3FIFsm2jOj3Z9WD68KmOq+xpkbXUKb203g3f1Ngd/ +djfB82W8sK3tO8GM+PJ2rLsTkty6ufFtXjDVve7saPcAHHY4+H5Hcxg0m5YW +PysaB0uzLMH67CSQf3fzk5v6DFxunZvxzuU0rPBzqVhgKowXu59p6ZFZkKFj +dstmhyhev+y8sV8zD17laDeOiS/BDd1u4n4JhXCiOObJXJnl6DPzVfvnVBGs +OvMhJTNfEmc6uQn6WpchyZ67ofOXFH7Kjq7qW1wKwYYXXVrjpdFY1+blrRdl +sGlkOjLggyz++bNxHWFeAREWZ9TufpPFkNKMkt3WFSC4qPFa8pcs/h18lHdy +WwVI27sa3hSVw5zULvmhPRXwrfbeb2FNOZwU4bmH8SogMz49JPeQHD6sfNEx +lFMBA1KsgJYl8lhwhOal+7kC4oy37ZM1UMBBlUkriKgEC+eCH+tMFBBaLn4Z +j66EpbFfj+6wVkDtCgmP4vhKyGtOKEl3VcBA7qNPkycqoday7uv8FAWc/9RB +hVdQCaO7GGHjrxSwUcwgIbupEpxDJ463RylisocDq3UBH5jZJvJfEhTRofrS ++ORiPrXeU+SCdEXMqr2SS4jzIfKP6lOTYkU05C/kHZTmw9mjzlI32xXRc/Fy +s+cqfGg//eDCZQUl/H1kRf5zCz6sF+RWH2lQwuDl/rtuJPBhU3fHzPBDJVzS +J1fASOGDjdA8c5dOJUxZ1m6emsoHd7uAV/BRCROKch/YZfLBLIoWEyuijI3L +fkRVF/KBp/Tr0sbVyjgyYNHZVseHlv0XvjeHKePntHKdTd/4wP1jKHE4Shkz +E60NOCN86Ejv0l8bq4yxZy+U6v7gw6ubC2OLU5SxPEP+rsQkH4YXh0gk5Cmj +aqLox1JhEqSrLNaZNSmj/+EaJZYsCX6TY7EPl9Cwstfkb/AmEtYHeq38JEHD +J1JeZdrmJIh+eV0pLE3DpQ3mjCEuCZd7m19uoNPQdcuN1C22JPTdOat+XZ+G +sxmZBoOOJNgmGPZcdKGhWmsLlxtAguJf0r/Bg4aHM0U0mnkkfAujC7/1pqGT +wbrPBsEkJB9YrCkdQsP53bIDqw6R0Gj19mhaMg3N9vXMXIojQVciTivqKg1T +BB+1JjJJEDox0ZJTQ8Nhvbga9SwSOoR9dtfcomGbsI6caw4JvhN2CWP3aGjb +UBNbl0dCcQ/Ru/81Dbm6I62cyySsvPAw0V6YjqF4o+XIdRKmVov3aeyg45Vm +EB3uJOFXvmzcmt10rLQ773yui4Sfy5iEoQsdzd+2tJq8JGF43NBnkzcd+71u +9ye9ImHglvuv3dF0FF8vQfvwjoQ2qxtLky/TMeeEi1/fVxIe3L579WQFHXN7 +wN76OwktWu32mVfo2JlhuLtmmIQ7ku/PFdyk4z2Zf5uOjJFwrXcR+/pjOk6z +PKXf/yLhnK8zDEzQsffUMtdvQgLIfntg4PM0HWnn6SHycwVwxjY44fssHR1k +PKsshAWQtib50eRCBrZLyRSfFRFA/H9XHZYpMvDxsfbjcxYJIMa/fnoFg4GO +hh9/SCwWwOF39/NlVRhYfzI+WVlMAGHNvR+YugwsU5wH2ksF4HtChGdsxsCN +jnu/0SQEcGBmmaSJFQPj9Tqer5AUgNdB2RrzrQyM2245LLxCAK7btf7Y7Wbg +P866DS+lBGAv55jsHcDAY8eLBm1kBGBcyS/MymJg2NnQdylKAuhVrryw+TwD +F7UeUl6rLIDIrPKCnxcYeFfEUqGX8o24kjy7cga66t2zVqILQHdXYc7Segae +ljU9E0sI4NnjguzbjQyU4nW3iDMFwDPNz/K7x8C1isyafMoCzXNn2joYmOLr +95ZkCUBV5Ex64nsG0iQstpaqCOBhZMYpvU8M9LiCOQqq1H5G09MGvzCwZLtQ +STrl4t6TqSY/GeiT7ynlryYA022pJ8YmGbhm0Y5DLykP3D9+vHCGgd8XX7hk +vFoAyteSkv/OJ3CY9mbHLOUGdmISuZjAnZoKfXvUBeCcfyxxrziBrg32Otcp +n0+OO1YnQ6CpNNfIWUMA6//GHPVWJPDvrMM4Sbkn+Ei8NIPA1Mo5EdOUV7pE +xYapEzhr+GQkRVMA17siYpg6BO7Zwx1op2xveehIlx6B4/WLLotpCSBDL/Sw +LhCo6iRVEE9ZpzI46r0pgeRI7Ytayk+VgyLTLQg8472r/yvlJWIHDw1vI3Cx +zeZAC20B8OP8w/N3EnhJemwykLLlb98w6z0ESh3fsTOH8pCfT+h/LgT2SjKO +36KcPHAgpMKDwMTSRWd7KbN37Q929CbQo+Z2+CTl+489g0QDCNykM6wroSMA +T1OPwBtBBBLJNg9UKM+76cbzCifwQ/lpPWPKlzT3HZQ6TODceb5HrCmbFLsE +tMQSaBmfVuRIuV/G2T84gcCUtKoid8oxp/b60Y8TyBVPjPGhrCiyx/dZGoGx +fi2GAZTrIx19YjMJNEmgdf7fe0YdvLVyCIy6uZ3rR3nac+eBvjwCiweXF3pR +zu2133/yIoE8Z8luJ8oG27Z7GZcQmDa9bGQb5e772zy/VlDPE23814RymPFW +j3NXCOTYvWnRpix1zcadW02ggaLiMTnK1ewtbpO1BArUgS1M2S7fal/pbQJP +1U4JPlPvZ0zC0nVnE4FTYaLyrZR7/OhPfR4QWCqyL7CYcuP9aYhpJ/D+xFXa +Ycplys+vZD4jcLPHV42tlNMjK5XKXlL7kfqbpUz5UNfRU/W9BJ4I6XX6Tn1f +V829s0/7CVyRGXq0hrL2gNi7qS8ERmRUDnMoSxt/tFk6Su2/U1P/D1VPQlm3 +79AnqHo7xemvofyEG1BgNUvgArvnLjTKNZfMlrrOY6Jbt9m6Z1R9FswoHglZ +yET/14qh0ZQDrj5xypdk4qJdb9iPqHrfubjs8VVpJqp5/VPgR3mDZyznvgIT +2dKdMYsoL5HRURhhM/FD+NNjRtT54cdmvEFjJm6I3309iDqPZ177WO/YyETN +4vHc39T5PbzWtN7bjIlV12pHD1G2+nf8fMZWJs4LbJnksQXwxXbHnkEPJp4+ +PZGmT+VBZ7nGo0lvJq4b+qN8gcqPOuH5RksOMvEwaaQxj3LKjRpZ/QgmKpK8 +2mYqb1SUpF8nnaTu17KrkabySDxilJuXwcTdLhX6nlR+TXY+vFmVzcR7930N +BYpUniRG5L66yES+tU2bnoIA9g+/3rW6hokljCv6crICsLH45yHcYmL9R+/P +VlQe6hedMLBvZKLvgo/0CGkBzN9pLB3dxkSH93YbWlcKoOR2fndHHxO7+ssJ +pPJ2MNV1Z9ACFgb9M7cghcrvgC/qdG0xFg4ftRM7S+X7b/Op79/FWVhwBhPz +FwpgkXBGgrcsCxVmYwsvL6C+d0RztasGC5Vj/ZIyqH4R7cmStN3Owrxesc/v +pkmY3/yjT2wXC+PvrI2snyIhXbmhom0vC5VKbdlZk1Q/7XUwMfNioXnanOdI +9ae2bSmBnAgWjgf1pwRT/Wvlhm9PVl9gocCQZmr7mYTC87Xnhy6x8M6g84eZ +jySoTh3bX1rGwgM95vzyQRKMqxVm6ddYWN/w8tbkexLc1Ww1Ze+x0HuB3LeQ +NyRUrbyWKvqVhYzlQh6fnpLAHQnnftRno3NUh2P1DRLkdRQTRY3ZuCp8J+0T +1c+Hg1qaVm9kY+i+ZzUrqkk480vcOMiKjUlF2VsPVFHzyky55qwLG88t2eQ2 +VEZCkNgbSZkUNv60jl5pn0v1W1Xss+5lY+d/jee7wqn5yPeTLK+fjdZr604X +hZIAZKpD5kc2vm/SPeJPzS+D2q+evhph45dDHTBNzTuaBkHNXvNUsO/iTMqI +JwnNZsVlsRoqqNPU52S5nZp/3EWDq2NU0PxF9Zq21dR6CzbdbjimgvuXZ0Vv +ViVh5FXsgkcpKlhYmTb3DouEH7ZT599nqmDc8xdNJTQSfht9aVlapoJ5m43Q +YRUJc1e0r/R+qoKDzjZWenNJkGk5VadAU8WjBb45wy+o+ZJYNTepSRXv6g6c +Lgjlw5CbeZnRA1X0KnOxLQ/iQ+rFcJvRR6oYVCb27epBPjxX7Dnn+EIV9QpM +HtR788FVJneN+r+qGMI1Zdx04kPEUjnPZ0vU0OqOuvuWzXzgTyo+lHNUQ8cn +d85+leAD9Y+UVjWiRu3f9qZRWSXIJ1/Zqq+vjst8ODnLyyogZ7WhuOR+Ddyh +cjHdvKAc2mQ36o2f1sQfVoVxGxPKYL18U7rWSy3UfaYnc8CkFJYKF4Xsi9fG +/C5S/apoCSjGKRk7snSQ73Gw7l1lMSxk7q2xe6CDex4xD05vvQSaHJkr4U66 +mDVlGSe/pAiC+iSaLYXWoHdW9CDzaiGMjKfu4OasQTHXzz3FgwVgrnX/HFdj +LcYwvRtPH82DO+NG//3uWIv/uF9bwBQ5BwHquq+feeohbcMmO7m2bOAMe3Q5 +LtRH4kHy7PLos7CZkN6ypEgfHd33qfiEZoJK7PFDTevW4WWnHz97z54GNU/D +BubrdWj8w3ncwvUUeN45cKw60ACfCDkFyKxKhYbCLo8xKUMsaI7yJDuS4WfZ +7G+tG4YoEmlS5PEmAdyZlQvPbVmPObuq9Li7j8KYWqb+tdH1uCYy+9P5gVio +Lf7v/USyEc4J9w/xy4+G3ZsYaKRojHmrwstkxiJAzj/ppmajMWp1Dg/xXcNA +apHf1S0OHGT259sf8w2GYtPoyFFHDnZH7c2VdAkG3eg008y9HHRrCfIutwsG +m9GqFz37OJh727roX8NgSHw5MeXux8G8eyZ610WDYbIoxiQyjoM37lzoOlYa +BK+NMp+XVHLw4+Dl/O9DgXAgtDiPK+Ag28/oPrcvEH4Jrnt+q+Lg0/n7tfid +gSBB7/mtU8NB6YHVdUdvBYKVqIL87UYOTi+n8aJPBkJ9V4nH8xccNG69uj1X +NxAsl9ZqhPVwsNltzH8XOxB6zFt/SfdycKFG7CUF+UD4Wfc12bmfWm8ax6FO +JBA0LmqTQ184eD1UsdD4FQ/qX28MS/3OwbSy29vVO3hguWI7aI1y8PMfSXF6 +Mw+8kkKfhUxw0OdKXq4SyYOfjYnnVk1ycF2jmhu7iAfx09nuddMcXOXIVtPL +5oH42nJ1pxlqfTU4YpHKgwL/uonZWQ5mGjOvuMXx4H+WjlmF + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.058970893049954856`}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.058970893049954856`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994388321873219*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"cdd9aa82-1d5e-4038-a7ad-3d5af6cd5db0"] +}, Open ]], Cell[CellGroupData[{ @@ -10652,66 +11542,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[365]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], + "In[121]:=",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7233721930057495`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 365, 381, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423358439445`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.955860475326287`*^-163\\\", \ +RowBox[{\\\"\ +505518991860510123640143147290826802026352259296904996615670790081361\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"11\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0136605792106222330469781300859512072804761600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 45, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994388321926779*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], +In[121]:=",ExpressionUUID->"fd7b4cf0-3233-4644-aa5a-098b7c77fdc5"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.534866194708534`*^-177\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 365, 382, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335853943*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2740525800370812`*^-165\\\", \ +RowBox[{\\\"\ +164243120455479739170682508554789627978361849045564433400431439697434\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3832218553116351696319446492554724542670438400000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 46, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994388321935266*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], +In[121]:=",ExpressionUUID->"ef556910-5c48-41bf-99ba-49897f77360c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.360372708843676`*^-180\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 365, 383, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335861944*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.6304065135524555`*^-168\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 47, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994388321943516*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], +In[121]:=",ExpressionUUID->"6d2f8575-512b-45a5-a109-5d22a62163c8"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 365, 384, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342335870945*^9}, +during this calculation.\"", 2, 121, 48, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423358439445`*^9, 3.994388321951355*^9}, CellLabel-> "During evaluation of \ -In[365]:=",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], +In[121]:=",ExpressionUUID->"86115c22-cd5f-474f-8431-eae5e759b8be"], -Cell[BoxData["12.5536549879565`"], "Output", - CellChangeTimes->{3.9913423425170345`*^9}, +Cell[BoxData["13.272645059609827`"], "Output", + CellChangeTimes->{3.9913423425170345`*^9, 3.994388388600699*^9}, CellLabel-> - "Out[365]=",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] + "Out[121]=",ExpressionUUID->"5a8645ec-88e7-4827-a6b0-2dd1c72f19f0"] }, Open ]], Cell[CellGroupData[{ @@ -10778,68 +11678,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99184987967128*^9, - 3.9918498857615337`*^9}},ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-\ -30286a178ca1"], + CellChangeTimes->{{3.99184987967128*^9, 3.9918498857615337`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 385, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425545177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.291121814952863`*^-223\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 122, 49, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.994388388653694*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], +In[122]:=",ExpressionUUID->"20c2b733-ce3c-4ce5-b2e4-81fc9be75446"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 386, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342342564516*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1867692294716364`*^-228\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 122, 50, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.9943883886627007`*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], +In[122]:=",ExpressionUUID->"79f8a3d4-d492-4161-958b-71305e67cfa0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 366, - 387, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425725136`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.698710060538059`*^-234\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 122, 51, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.9943883886699123`*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], +In[122]:=",ExpressionUUID->"e93981a9-cd3c-4582-8be9-d1009226da24"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 366, 388, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423425815163`*^9}, +during this calculation.\"", 2, 122, 52, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423425545177`*^9, 3.9943883886768637`*^9}, CellLabel-> "During evaluation of \ -In[366]:=",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], +In[122]:=",ExpressionUUID->"f373df2b-e909-4a30-8e95-d656981d1fcc"], -Cell[BoxData["2.904399821349581`"], "Output", - CellChangeTimes->{3.9913423499055786`*^9}, +Cell[BoxData["0.1212440086076462`"], "Output", + CellChangeTimes->{3.9913423499055786`*^9, 3.994388397637589*^9}, CellLabel-> - "Out[366]=",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] + "Out[122]=",ExpressionUUID->"f377595c-a478-4aa5-9811-83df0af9d8b8"] }, Open ]], Cell[CellGroupData[{ @@ -10860,8 +11764,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -10906,67 +11809,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849890499424*^9, - 3.9918498944226*^9}},ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], + CellChangeTimes->{{3.991849890499424*^9, 3.9918498944226*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 389, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499435787`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.291121814952863`*^-223\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 123, 53, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.9943883976934958`*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], +In[123]:=",ExpressionUUID->"f89fa426-4284-448c-a1e0-55ecb1d7e0d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 390, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342349953579*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1867692294716364`*^-228\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 123, 54, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.994388397701721*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], +In[123]:=",ExpressionUUID->"54c8f531-f71b-4f71-bef6-bf5dfcaa69de"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 367, - 391, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499625797`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.698710060538059`*^-234\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 123, 55, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.9943883977091293`*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], +In[123]:=",ExpressionUUID->"41614a05-0907-47a1-980d-868672ef0cb6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 367, 392, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423499715805`*^9}, +during this calculation.\"", 2, 123, 56, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913423499435787`*^9, 3.994388397716404*^9}, CellLabel-> "During evaluation of \ -In[367]:=",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], +In[123]:=",ExpressionUUID->"01d8e406-c052-4a41-ad88-5072f3e70442"], -Cell[BoxData["9.928941323789857`"], "Output", - CellChangeTimes->{3.991342356382967*^9}, +Cell[BoxData["45.403932849497636`"], "Output", + CellChangeTimes->{3.991342356382967*^9, 3.9943884060785503`*^9}, CellLabel-> - "Out[367]=",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] + "Out[123]=",ExpressionUUID->"326ae4f6-5dc6-4d90-9f61-42e6506aef0c"] }, Open ]], Cell[CellGroupData[{ @@ -10987,8 +11895,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11033,68 +11940,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499002266407`*^9, - 3.9918499040814323`*^9}},ExpressionUUID->"935796a8-6280-564a-b4d0-\ -fc6fb6cd41f8"], + CellChangeTimes->{{3.9918499002266407`*^9, 3.9918499040814323`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.420646512054882`*^-192\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 393, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356420965*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.291121814952863`*^-223\\\", \ +\\\"27355265838161455835337350607112740319954040039721559090737412135918239744\ +0000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 124, 57, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994388406129046*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], +In[124]:=",ExpressionUUID->"535d6794-44d7-42d8-bee0-2f1c6bda7ca6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.243146251073813`*^-196\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 394, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356431965*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1867692294716364`*^-228\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 124, 58, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994388406137013*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], +In[124]:=",ExpressionUUID->"d312e438-9f68-41a3-9f84-be640ec2b1be"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.230301621061892`*^-200\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 368, - 395, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356441965*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.698710060538059`*^-234\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 124, 59, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994388406143917*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], +In[124]:=",ExpressionUUID->"3517a885-2d7b-4579-81df-ed709265d372"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 368, 396, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342356450968*^9}, +during this calculation.\"", 2, 124, 60, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342356420965*^9, 3.994388406150732*^9}, CellLabel-> "During evaluation of \ -In[368]:=",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], +In[124]:=",ExpressionUUID->"4261dea9-a99b-4703-97b5-83952dee26a0"], -Cell[BoxData["19.874153108015193`"], "Output", - CellChangeTimes->{3.9913423600715523`*^9}, +Cell[BoxData["5.8524158826027985`"], "Output", + CellChangeTimes->{3.9913423600715523`*^9, 3.9943884114034433`*^9}, CellLabel-> - "Out[368]=",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] + "Out[124]=",ExpressionUUID->"806e48d6-8fae-45f0-81f2-09e08c46e4b8"] }, Open ]], Cell[CellGroupData[{ @@ -11103,22 +12014,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991849908545643*^9, - 3.9918499133398113`*^9}},ExpressionUUID->"ee52036b-90c5-e14a-aed9-\ -684ff23ed035"], - -Cell[BoxData["0.2067571864462191`"], "Output", - CellChangeTimes->{3.9913423601046352`*^9}, + CellChangeTimes->{{3.991849908545643*^9, 3.9918499133398113`*^9}}, CellLabel-> - "Out[369]=",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] + "In[125]:=",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], + +Cell[BoxData["0.00743782507435956`"], "Output", + CellChangeTimes->{3.9913423601046352`*^9, 3.994388411455441*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"0c659b60-f2b7-4d2f-9c9c-632625041f7f"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991849916273302*^9, 3.9918499185334816`*^9}, - 3.9919247506818066`*^9},ExpressionUUID->"c6d4a146-4cca-7e4e-b483-\ -85227a6e6b51"], + 3.9919247506818066`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ @@ -11141,12 +12053,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[371]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], + "In[127]:=",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[BoxData["29.129739599983825`"], "Output", - CellChangeTimes->{3.9913423601345863`*^9}, +Cell[BoxData["16.90830383010544`"], "Output", + CellChangeTimes->{3.9913423601345863`*^9, 3.994388411489069*^9}, CellLabel-> - "Out[371]=",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] + "Out[127]=",ExpressionUUID->"42314251-e6dc-4645-a0cd-96bb491e0d85"] }, Open ]], Cell[CellGroupData[{ @@ -11156,12 +12068,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[373]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], + "In[128]:=",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[BoxData["0.6950071373045505`"], "Output", - CellChangeTimes->{3.9913423601709976`*^9}, +Cell[BoxData["1.739211854028872`"], "Output", + CellChangeTimes->{3.9913423601709976`*^9, 3.99438841151311*^9}, CellLabel-> - "Out[373]=",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] + "Out[128]=",ExpressionUUID->"eab6c997-3811-4514-a47b-ef56ccd94fb2"] }, Open ]], Cell[CellGroupData[{ @@ -11171,12 +12083,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[376]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], + "In[129]:=",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[BoxData["20.245376929811762`"], "Output", - CellChangeTimes->{3.9913423602320137`*^9}, +Cell[BoxData["29.407122452841158`"], "Output", + CellChangeTimes->{3.9913423602320137`*^9, 3.994388411530734*^9}, CellLabel-> - "Out[376]=",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] + "Out[129]=",ExpressionUUID->"60feb359-e98b-4419-b53a-ee880d652e63"] }, Open ]], Cell[CellGroupData[{ @@ -11366,12 +12278,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[377]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], + "In[130]:=",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[BoxData["0.02003459702393596`"], "Output", - CellChangeTimes->{3.991342360260002*^9}, +Cell[BoxData["0.004639042583115955`"], "Output", + CellChangeTimes->{3.991342360260002*^9, 3.994388411549718*^9}, CellLabel-> - "Out[377]=",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] + "Out[130]=",ExpressionUUID->"4373a55b-95b1-4732-8407-8ba99b0b4154"] }, Open ]], Cell[CellGroupData[{ @@ -11385,12 +12297,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[378]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], + "In[131]:=",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[BoxData["6.261157591052328`"], "Output", - CellChangeTimes->{3.9913423603598785`*^9}, +Cell[BoxData["13.011601717805712`"], "Output", + CellChangeTimes->{3.9913423603598785`*^9, 3.9943884117045717`*^9}, CellLabel-> - "Out[378]=",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] + "Out[131]=",ExpressionUUID->"bf18d633-c3c6-42b5-b58f-6cd53f1f3f80"] }, Open ]], Cell[CellGroupData[{ @@ -11582,12 +12494,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[379]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], + "In[132]:=",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[BoxData["0.010388932679900494`"], "Output", - CellChangeTimes->{3.991342360375868*^9}, +Cell[BoxData["0.03198990295015887`"], "Output", + CellChangeTimes->{3.991342360375868*^9, 3.994388411725603*^9}, CellLabel-> - "Out[379]=",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] + "Out[132]=",ExpressionUUID->"cb3b1aa4-b8b0-4b79-a67b-1579519a821c"] }, Open ]], Cell[CellGroupData[{ @@ -11601,12 +12513,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[380]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], + "In[133]:=",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[BoxData["8.694797556550151`"], "Output", - CellChangeTimes->{3.991342360471882*^9}, +Cell[BoxData["4.954940906889832`"], "Output", + CellChangeTimes->{3.991342360471882*^9, 3.99438841190244*^9}, CellLabel-> - "Out[380]=",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] + "Out[133]=",ExpressionUUID->"9d8e94cb-6f60-40ab-aec4-8a26dc7017a9"] }, Open ]], Cell[CellGroupData[{ @@ -11699,12 +12611,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[381]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], + "In[134]:=",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[BoxData["0.6154782275967796`"], "Output", - CellChangeTimes->{3.991342360486868*^9}, +Cell[BoxData["0.09071336685848984`"], "Output", + CellChangeTimes->{3.991342360486868*^9, 3.994388411923833*^9}, CellLabel-> - "Out[381]=",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] + "Out[134]=",ExpressionUUID->"b7f034eb-77b2-40bf-8c12-1bca8be59ecf"] }, Open ]], Cell[CellGroupData[{ @@ -11794,12 +12706,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[382]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], + "In[135]:=",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[BoxData["0.3845217724032204`"], "Output", - CellChangeTimes->{3.9913423605138645`*^9}, +Cell[BoxData["0.9092866331415103`"], "Output", + CellChangeTimes->{3.9913423605138645`*^9, 3.994388411942543*^9}, CellLabel-> - "Out[382]=",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] + "Out[135]=",ExpressionUUID->"cd410458-3a26-47dd-8f23-2623fc376223"] }, Open ]], Cell[CellGroupData[{ @@ -11922,12 +12834,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[383]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], + "In[136]:=",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[BoxData["0.2366647789511063`"], "Output", - CellChangeTimes->{3.9913423605448647`*^9}, +Cell[BoxData["0.08248445193168688`"], "Output", + CellChangeTimes->{3.9913423605448647`*^9, 3.994388411961954*^9}, CellLabel-> - "Out[383]=",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] + "Out[136]=",ExpressionUUID->"24986dd5-cbb7-4888-a18f-e214dbe07c5a"] }, Open ]], Cell[CellGroupData[{ @@ -11989,68 +12901,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849936863495*^9},ExpressionUUID->"6b25ec99-ae49-ec4d-9652-\ -65328572e509"], + CellChangeTimes->{3.991849936863495*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 384, 397, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342360571863*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.862300827865261`*^-218\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 137, 61, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994388411980391*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], +In[137]:=",ExpressionUUID->"94789dc9-ef0e-47dc-a03c-16570220cbc1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 384, 398, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605818653`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.302295572310418`*^-223\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 137, 62, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994388411987385*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], +In[137]:=",ExpressionUUID->"5e5a36ea-c056-446a-a243-e0d9df7e8d42"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 384, - 399, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605898647`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.4880066406831464`*^-229\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 137, 63, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.9943884119938726`*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], +In[137]:=",ExpressionUUID->"78d1801c-4097-46a0-9833-27dcf26ef6f6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 384, 400, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423605988636`*^9}, +during this calculation.\"", 2, 137, 64, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342360571863*^9, 3.994388412000654*^9}, CellLabel-> "During evaluation of \ -In[384]:=",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], +In[137]:=",ExpressionUUID->"7973d7e7-016c-4208-990a-d09ad441b4ff"], -Cell[BoxData["6.261157591052324`"], "Output", - CellChangeTimes->{3.9913423642473736`*^9}, +Cell[BoxData["13.011601717805696`"], "Output", + CellChangeTimes->{3.9913423642473736`*^9, 3.994388416977888*^9}, CellLabel-> - "Out[384]=",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] + "Out[137]=",ExpressionUUID->"12c2ca10-44d0-4225-a7da-f19c26c9c565"] }, Open ]], Cell[CellGroupData[{ @@ -12112,68 +13028,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991849940282545*^9},ExpressionUUID->"3e2baf62-fab9-eb41-8de7-\ -aa229443ac14"], + CellChangeTimes->{3.991849940282545*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 385, 401, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364284378*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.862300827865261`*^-218\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 138, 65, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.99438841703837*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], +In[138]:=",ExpressionUUID->"f79ffd36-8579-4e4b-abcc-a5e41058556b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 385, 402, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423642935734`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.302295572310418`*^-223\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 138, 66, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.994388417047365*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], +In[138]:=",ExpressionUUID->"8233adbd-36ad-43d4-bf51-2ea3c8f03518"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 385, - 403, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342364302574*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.4880066406831464`*^-229\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 138, 67, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.9943884170544453`*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], +In[138]:=",ExpressionUUID->"f246a0d8-e5d7-4842-88bc-d352d9a4954c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 385, 404, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913423643105717`*^9}, +during this calculation.\"", 2, 138, 68, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991342364284378*^9, 3.99438841706321*^9}, CellLabel-> "During evaluation of \ -In[385]:=",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], +In[138]:=",ExpressionUUID->"c2bdf3b1-e8ff-46a9-9d24-ea8bce5466e3"], -Cell[BoxData["8.694797556550144`"], "Output", - CellChangeTimes->{3.9913423679416714`*^9}, +Cell[BoxData["4.9549409068898305`"], "Output", + CellChangeTimes->{3.9913423679416714`*^9, 3.9943884220153427`*^9}, CellLabel-> - "Out[385]=",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] + "Out[138]=",ExpressionUUID->"5bf9c1c9-5511-4967-ac10-1e8969af9ad6"] }, Open ]], Cell[CellGroupData[{ @@ -12231,95 +13151,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991849946138607*^9},ExpressionUUID->"725c3011-bda9-4c42-96ce-\ -9a77a5dc787c"], + CellChangeTimes->{3.991849946138607*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk4Fd8fB/CbItmXLJF96wpZi4rzKVuEJIpIljsjSwhJZamEViHttiyR +tCgi5KdvUklfW99IZSf3XuudrKl+xx/zzPN6zsz7eZ95zpkZJZ8QJ4KLRqON +4GPpfORfHY2Kln/N2NlvaZ+7mchsPN/Ix6IE5et9VFtyb/bGdFWLGtTt9TV9 +yY6MjzwCBm/QoBbHvgO7NCruNbdFEzqULrq7E/t8g3RdXHEr+nzNJOsL9ouW +I1mL+v+hAZ0Ao6/YrK7G6OPVnWjeI0/yO7bMkIr7jPk31LN2aFsP9s6JaJPw +ph40H7Chog+7dpHFH1Xch3TNz0QOYn8+LXXyefAA6s35HvcDe5zHgvVTfwh1 +x25rZ2HzXAp1M5gdRs86HoaOY8uLZr47Uj2CDAqUXTnYDrIz98bNR9G1eDXu +X9hkjrKkNu84mkt41vgXO05tV0Jg0wT62mPTtaKHiTqlPulFFE+h5mNXOoSx +GfsD/K9e4qDAPLM3EtiTGbS7T4Mp9HDZzKIsNq+ytsiU/jR6uz7Glo6dznht +LSIxgyz67Lx0sRUL3eI2zM6gkgzVuk3YxlqJ44er55AExT5gjX1oY08Ty3wR +Xc3vFA3A/hl1dAWf+m/UJfbjWDj2qWr+rXTeP0ha8rdGDPZNMH7g1/QXCd9G +ZOpSv4J3FmHFy2Drk7XuL7GLG672npblgrZ+QvT9Ut8fntGpl7jAROa56H/Y +0ZrTz54ELwdHq8DJsaW+j5VUJvS54aOpurpKLxN1tYzW/snjBk/LAi09bEVO +xX4hCR7QytWMQdglhg5p2rM84LFgveiBXf/ixLKgal4w824Mu4M9/bq9Z8Rc +AI7YfAb1PiYSsxMQOVkrABKnnkRvxtb9ZAGCJoJgLHJeeBd2wGB5jp6OEPjd +NNx8HDuUq0nXVEAEmnJC81qxh5QfTSXMiAK/oMubtH78fMjGVc0GYnBegXak +BJvrwbCS9BExkCq6F96ArWig4FTMFoNg26GYX9j7zVOe/tsrDl84yvf8B5io +2TcsXOqDBBDRwZZ7B5mouzD5ohevJMRSz72OYo+yi/PuW0pCqM1sWzo2X8RA ++5Y6SRhP86z5hG1x1tnQq1wKtGPqcl2HmKgqf+N0UfYa0HC6/jJ0mInyhxYi +N0fIgULTOXr/CBPtcEnqDn8oBz2nj7uuYuL8enGrh8NyQHIM23WxDfO1JBTd +5EFphK/kFHa9j+czbjMFqNq+nq3CYiLORO+xkXhFiC9fzIpiM5H4YYuyZ/bK +UN1e3bV/nImG8/kOOQYowx0i5MxF7MpvLbJjicrQWT5wtAbbw+5AvHqdMuTR +BUFhAvdbH+l0S18FUvzcvEewDVmFk7FSqpAfk9BxboqJnP34tW371CDCO+YK +1zQToUgX/X2/1QCZzpzfgq2ZkL2JsUYdAi/rf4zApuUZbI/drQ60UUp7BPth +t/u+p6/UgVqX7No2g/fn3pLTMrkaUN/xz+6yOdzPwv4zy4cOwc7yrY8WmShv +z42vs7F08DbVG5jETvbp611xhw4Wx+ZNDX7j9X3qKFu+nQ4FE4UfK7FFazJp +e8w1wdsqxOXtH7x+DMY1q1XWQwmvMQ+HxkKyylfiLg5qQemgGDOGm4VqLvyk +z3Npg4dEX1gztgfl9olU0oaaJrqTEg8LZdWr0rd7akM5U0O0AVvZr6ptrkMb +/N3/SRHnZSHNkiE18oMODHa/u1bLx0JysvKkopsuVKx8VOoswkJaBRECv5A+ +6AVxcZ1ey0I+jPhpbQd9qHZ4s7wP+6ZKWreXhz6YajXt2ibHQstzHz9piNKH +npzcBi55FurKYjmnlepDd7X7hvMKLHT+plcmXcUAajSsRvOUWWj4op2OK48h +sLtXConSWehumKpjeZMRFNom177fyEItkWjT2QITEOljaMS5spCS538OB4JM +YX05/WlXLAsRf58/kjsOkCafvHtXIQtJsStXSvlshxhGX6RZJwtFGGz9lqZp +Ac4Prk3k87GRz9jiO3GWJfC6HxAMBjZ6uD18ZXazNdjrv3mTE8dG+T8DXpWk +20Cs/ZpIsf+x0dw26Y/1cTvBKcD42F3eUfSdtnyqz9seqOoJo3SXURS8NiTl +tMouaN0qZB1xdxQ98n9Xdy3BETIiROSk5kbRCWrN7Hr/3bBP5qNYr90Ymra1 +2vv2oBO88O5vaC0ZQybuqduGdu8BmWh56xGhcdS2JjOg3sAZKhky84WHx5HM +vfiaonUu8Ep9QS23YxxV9mraOQjuBbZ/Wuxe0wkk/2nSL3JsL/Qf5RHYkzeB +DK6lluT17oNAuTGOKN8kylxB6aS9dgXexcKq82gSPd+2oSvhhRu4tdRHaJyY +RDc3XRBdLN4Ph26dZsuVTaLmrwWJBpfcgUvKmO7AmkTl9hmqoac84GwC6wZb +dQpNHd5DC2YcgK4Y3hOb3KfQtBX90Li5JzxIVuxsuDKFisa+zIVvPAhfz15J +r307hVzvFvgeEPACy3EDgaKFKfTs6c6Dy5O8YJ3TV7aoLgeZyLbNn5/3AjO/ +7KOcgxyk0uvX1ervDb5qjkJl+Ls0yB+4K2PAG3oUJC4dq+KglmQHX2sXH3Dq +jKFt6+eg9Khs/qMtPrA1/7V55yoK1dT+nfe18YULFhah7VoUEvaAJIMqX9CO +sxKqtKGQ4uq3zWtrfEFI9b6Iti2FdJvspXlqfcFEu6XxLrbTVvf7na984Uyr +BnlhJ4XS10Z+iHnvCztU1De52lNI5vsD4XedvnBk1WuDYUcKqXpK3fSY9YUg +s0TVD/soZOI1XpRgyICoS6WB5QwK3bs1Ge6wkQEZOg9cRQkKrW7nmEkZM2BW +avvyw9jjlrOfirYwYMtt6VQVksLvL9qypu0MaFipmHzZj0JCs6JuYrsZ4JUZ +stwlgEKDl41WZR9mQPS+gIulIRRKro72r7zHAMYlgUdZxyl0WP+GSVQRA/ic +WvRGsO3ul64yLmaARqpOuN4JCvHdGL5f8ZABZ+qu6bzGTghzZD0vY8CaWOGk +gZMUiqarBpb/w4Dbps3PpWIpFHDjQ9DTbgZc8pf+ZH+GQjZCw1vDehlw8P7M +fDL2ugSaoH4/A7IqXL81Yw+HGT0sHWKAdGLSZ8d4Cnk7ZI89GWWAUV5J9q6z +FHLlDg9+vMAAnniJWEikkHW4TGiJJAHhbVJGE+cp9E92om2aNAHaO3jva12g +0NYmjmqUDAFqvmSTP7au2ocv5vIEKAhbKw1gr+k4af5VjYDyqEyutosUYm/+ +LslnRIB/Q/ednMsUusKV89JvDwEzbPkxWiqe/waBm/YuBEx1zJgaYp91jwoz +2EfARr4Npn7YUWWOGn/3E5BZeteqCdubXJZ63YeA1Oqas2lpFDJo9GG8OUKA +ReneQuF0CnWkqvGrpBCQorPo3HSdQo+Q4KGRVAJWmeUUcrDPjv2sf3iVgM79 +R55K36CQvk19rPENPJ+WxElf7GSaL8c+i4BPW6YFZ7GtQnK+RJUQ8N702Xvh +WxSSkzu30ewRAacqhzL0sH82hlxd/oQA8t28xh7sXHVkn/yMgG6RcuIa9u/v +3+vyqgiY0/sbK3mbQmV2skX/viPAe3qTGv8dCl1c4OJObySgJikpYh22TxHL +262JAMPrkSctsUVWVMkONhNAY6s8icUOqna9Mv+ZAONup7IxbBXN65GqQwTs +2flNtTaDQgsdMe3MYQJeKgaPfsZuSSB0H48Q8LSRDJzAju0zZJmMEuBXG3dF +IZNCXTfbD+yiCFCnz4VEY6etFLU8sYwEMsjnyrosvH85390jlpNwlv1CCWH/ ++F4cFsxNgm+rp5sL9tYyixyfVSRYW5+pPIU97BX1y1aUBDPnj0bt2CJ2lmKW +4iT+H9TmDGNv2SRGRxIkUGW1exawUwRL9hqsIUGtKoBHMRuPV/WUyiqRUB2X +QvfDJgtK3kmokPD+7zrhKOyUlOM9wmoktJ74eusc9jApLriCTsLKlPisoqVx +cetDo7oknKm9wRjErvojHjesT8JOo4owDvYQs/daryEJd5K+qdFyKLS57sTr +T8YkVDZuOCmDPRj0SP4lkNDm+7LPFlvI9aRRxXYSZoabpfZim5jvsCu1IMG4 +v4PjhZ28pv94wQ4S7q1/deModuWKxynZtiRErs72jsMemDhZeMuOhIriwJZz +2MYNEv9ddsT9XjRm3Mb2Ke1nJzmRcNRi/0Iu9uWMx1xnnEkovdu2WIzdH2aj +G+lKQnpG1OQLbEFPSevQ/STE1Of11S3l2QwcCPAgYX3702Nvl+5XiLno6UWC +pmdUWvtSHz7bXFcfEjK/aUl9WcqblnzhxCBB1uoVdC/l9Q0025H4/leGwgNL +eU1Phq0OkeAan3jmx1K/ipjfEECCemv5bfZSfq7t6i1BJCj8ebVvYin/stR6 +o2AS6oKKX3CW8qMGt20IJSElObhuGluAUepKDyNBeFAwaA57067YEJUIfP1i +Us3CUv7mnYlykSQoH/tWuoh9SU06UyqKhHIav90f7OciQ89ET5Dwy0X84l/s +vl+ljfzRJERsnw6m3cX5P2L7uGNJyM55MrvkjW075/7GkbDgZqm2DPv/2q4a +0g== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12333,107 +13252,106 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV1nk4Fd8fB/CbItmXLJF96wpZi4rzKVuEJIpIljsjSwhJZamEViHttiyR +tCgi5KdvUklfW99IZSf3XuudrKl+xx/zzPN6zsz7eZ95zpkZJZ8QJ4KLRqON +4GPpfORfHY2Kln/N2NlvaZ+7mchsPN/Ix6IE5et9VFtyb/bGdFWLGtTt9TV9 +yY6MjzwCBm/QoBbHvgO7NCruNbdFEzqULrq7E/t8g3RdXHEr+nzNJOsL9ouW +I1mL+v+hAZ0Ao6/YrK7G6OPVnWjeI0/yO7bMkIr7jPk31LN2aFsP9s6JaJPw +ph40H7Chog+7dpHFH1Xch3TNz0QOYn8+LXXyefAA6s35HvcDe5zHgvVTfwh1 +x25rZ2HzXAp1M5gdRs86HoaOY8uLZr47Uj2CDAqUXTnYDrIz98bNR9G1eDXu +X9hkjrKkNu84mkt41vgXO05tV0Jg0wT62mPTtaKHiTqlPulFFE+h5mNXOoSx +GfsD/K9e4qDAPLM3EtiTGbS7T4Mp9HDZzKIsNq+ytsiU/jR6uz7Glo6dznht +LSIxgyz67Lx0sRUL3eI2zM6gkgzVuk3YxlqJ44er55AExT5gjX1oY08Ty3wR +Xc3vFA3A/hl1dAWf+m/UJfbjWDj2qWr+rXTeP0ha8rdGDPZNMH7g1/QXCd9G +ZOpSv4J3FmHFy2Drk7XuL7GLG672npblgrZ+QvT9Ut8fntGpl7jAROa56H/Y +0ZrTz54ELwdHq8DJsaW+j5VUJvS54aOpurpKLxN1tYzW/snjBk/LAi09bEVO +xX4hCR7QytWMQdglhg5p2rM84LFgveiBXf/ixLKgal4w824Mu4M9/bq9Z8Rc +AI7YfAb1PiYSsxMQOVkrABKnnkRvxtb9ZAGCJoJgLHJeeBd2wGB5jp6OEPjd +NNx8HDuUq0nXVEAEmnJC81qxh5QfTSXMiAK/oMubtH78fMjGVc0GYnBegXak +BJvrwbCS9BExkCq6F96ArWig4FTMFoNg26GYX9j7zVOe/tsrDl84yvf8B5io +2TcsXOqDBBDRwZZ7B5mouzD5ohevJMRSz72OYo+yi/PuW0pCqM1sWzo2X8RA ++5Y6SRhP86z5hG1x1tnQq1wKtGPqcl2HmKgqf+N0UfYa0HC6/jJ0mInyhxYi +N0fIgULTOXr/CBPtcEnqDn8oBz2nj7uuYuL8enGrh8NyQHIM23WxDfO1JBTd +5EFphK/kFHa9j+czbjMFqNq+nq3CYiLORO+xkXhFiC9fzIpiM5H4YYuyZ/bK +UN1e3bV/nImG8/kOOQYowx0i5MxF7MpvLbJjicrQWT5wtAbbw+5AvHqdMuTR +BUFhAvdbH+l0S18FUvzcvEewDVmFk7FSqpAfk9BxboqJnP34tW371CDCO+YK +1zQToUgX/X2/1QCZzpzfgq2ZkL2JsUYdAi/rf4zApuUZbI/drQ60UUp7BPth +t/u+p6/UgVqX7No2g/fn3pLTMrkaUN/xz+6yOdzPwv4zy4cOwc7yrY8WmShv +z42vs7F08DbVG5jETvbp611xhw4Wx+ZNDX7j9X3qKFu+nQ4FE4UfK7FFazJp +e8w1wdsqxOXtH7x+DMY1q1XWQwmvMQ+HxkKyylfiLg5qQemgGDOGm4VqLvyk +z3Npg4dEX1gztgfl9olU0oaaJrqTEg8LZdWr0rd7akM5U0O0AVvZr6ptrkMb +/N3/SRHnZSHNkiE18oMODHa/u1bLx0JysvKkopsuVKx8VOoswkJaBRECv5A+ +6AVxcZ1ey0I+jPhpbQd9qHZ4s7wP+6ZKWreXhz6YajXt2ibHQstzHz9piNKH +npzcBi55FurKYjmnlepDd7X7hvMKLHT+plcmXcUAajSsRvOUWWj4op2OK48h +sLtXConSWehumKpjeZMRFNom177fyEItkWjT2QITEOljaMS5spCS538OB4JM +YX05/WlXLAsRf58/kjsOkCafvHtXIQtJsStXSvlshxhGX6RZJwtFGGz9lqZp +Ac4Prk3k87GRz9jiO3GWJfC6HxAMBjZ6uD18ZXazNdjrv3mTE8dG+T8DXpWk +20Cs/ZpIsf+x0dw26Y/1cTvBKcD42F3eUfSdtnyqz9seqOoJo3SXURS8NiTl +tMouaN0qZB1xdxQ98n9Xdy3BETIiROSk5kbRCWrN7Hr/3bBP5qNYr90Ymra1 +2vv2oBO88O5vaC0ZQybuqduGdu8BmWh56xGhcdS2JjOg3sAZKhky84WHx5HM +vfiaonUu8Ep9QS23YxxV9mraOQjuBbZ/Wuxe0wkk/2nSL3JsL/Qf5RHYkzeB +DK6lluT17oNAuTGOKN8kylxB6aS9dgXexcKq82gSPd+2oSvhhRu4tdRHaJyY +RDc3XRBdLN4Ph26dZsuVTaLmrwWJBpfcgUvKmO7AmkTl9hmqoac84GwC6wZb +dQpNHd5DC2YcgK4Y3hOb3KfQtBX90Li5JzxIVuxsuDKFisa+zIVvPAhfz15J +r307hVzvFvgeEPACy3EDgaKFKfTs6c6Dy5O8YJ3TV7aoLgeZyLbNn5/3AjO/ +7KOcgxyk0uvX1ervDb5qjkJl+Ls0yB+4K2PAG3oUJC4dq+KglmQHX2sXH3Dq +jKFt6+eg9Khs/qMtPrA1/7V55yoK1dT+nfe18YULFhah7VoUEvaAJIMqX9CO +sxKqtKGQ4uq3zWtrfEFI9b6Iti2FdJvspXlqfcFEu6XxLrbTVvf7na984Uyr +BnlhJ4XS10Z+iHnvCztU1De52lNI5vsD4XedvnBk1WuDYUcKqXpK3fSY9YUg +s0TVD/soZOI1XpRgyICoS6WB5QwK3bs1Ge6wkQEZOg9cRQkKrW7nmEkZM2BW +avvyw9jjlrOfirYwYMtt6VQVksLvL9qypu0MaFipmHzZj0JCs6JuYrsZ4JUZ +stwlgEKDl41WZR9mQPS+gIulIRRKro72r7zHAMYlgUdZxyl0WP+GSVQRA/ic +WvRGsO3ul64yLmaARqpOuN4JCvHdGL5f8ZABZ+qu6bzGTghzZD0vY8CaWOGk +gZMUiqarBpb/w4Dbps3PpWIpFHDjQ9DTbgZc8pf+ZH+GQjZCw1vDehlw8P7M +fDL2ugSaoH4/A7IqXL81Yw+HGT0sHWKAdGLSZ8d4Cnk7ZI89GWWAUV5J9q6z +FHLlDg9+vMAAnniJWEikkHW4TGiJJAHhbVJGE+cp9E92om2aNAHaO3jva12g +0NYmjmqUDAFqvmSTP7au2ocv5vIEKAhbKw1gr+k4af5VjYDyqEyutosUYm/+ +LslnRIB/Q/ednMsUusKV89JvDwEzbPkxWiqe/waBm/YuBEx1zJgaYp91jwoz +2EfARr4Npn7YUWWOGn/3E5BZeteqCdubXJZ63YeA1Oqas2lpFDJo9GG8OUKA +ReneQuF0CnWkqvGrpBCQorPo3HSdQo+Q4KGRVAJWmeUUcrDPjv2sf3iVgM79 +R55K36CQvk19rPENPJ+WxElf7GSaL8c+i4BPW6YFZ7GtQnK+RJUQ8N702Xvh +WxSSkzu30ewRAacqhzL0sH82hlxd/oQA8t28xh7sXHVkn/yMgG6RcuIa9u/v +3+vyqgiY0/sbK3mbQmV2skX/viPAe3qTGv8dCl1c4OJObySgJikpYh22TxHL +262JAMPrkSctsUVWVMkONhNAY6s8icUOqna9Mv+ZAONup7IxbBXN65GqQwTs +2flNtTaDQgsdMe3MYQJeKgaPfsZuSSB0H48Q8LSRDJzAju0zZJmMEuBXG3dF +IZNCXTfbD+yiCFCnz4VEY6etFLU8sYwEMsjnyrosvH85390jlpNwlv1CCWH/ ++F4cFsxNgm+rp5sL9tYyixyfVSRYW5+pPIU97BX1y1aUBDPnj0bt2CJ2lmKW +4iT+H9TmDGNv2SRGRxIkUGW1exawUwRL9hqsIUGtKoBHMRuPV/WUyiqRUB2X +QvfDJgtK3kmokPD+7zrhKOyUlOM9wmoktJ74eusc9jApLriCTsLKlPisoqVx +cetDo7oknKm9wRjErvojHjesT8JOo4owDvYQs/daryEJd5K+qdFyKLS57sTr +T8YkVDZuOCmDPRj0SP4lkNDm+7LPFlvI9aRRxXYSZoabpfZim5jvsCu1IMG4 +v4PjhZ28pv94wQ4S7q1/deModuWKxynZtiRErs72jsMemDhZeMuOhIriwJZz +2MYNEv9ddsT9XjRm3Mb2Ke1nJzmRcNRi/0Iu9uWMx1xnnEkovdu2WIzdH2aj +G+lKQnpG1OQLbEFPSevQ/STE1Of11S3l2QwcCPAgYX3702Nvl+5XiLno6UWC +pmdUWvtSHz7bXFcfEjK/aUl9WcqblnzhxCBB1uoVdC/l9Q0025H4/leGwgNL +eU1Phq0OkeAan3jmx1K/ipjfEECCemv5bfZSfq7t6i1BJCj8ebVvYin/stR6 +o2AS6oKKX3CW8qMGt20IJSElObhuGluAUepKDyNBeFAwaA57067YEJUIfP1i +Us3CUv7mnYlykSQoH/tWuoh9SU06UyqKhHIav90f7OciQ89ET5Dwy0X84l/s +vl+ljfzRJERsnw6m3cX5P2L7uGNJyM55MrvkjW075/7GkbDgZqm2DPv/2q4a +0g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.8084516539793162, + 1.2268077331442542`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.808451653979318}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12445,21 +13363,21 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, - 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.8084516539793162, + 1.2268077331442542`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.808451653979318}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12473,105 +13391,104 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1HlUTesbB/BEaaSBRkMaqGjQaZaep5lmaSJSp3N2A5JK0ihUxiRR7k9C -qaRQKpRLKXQr6iIRsRulSRqVc26/tz/22uuz3rW/7/d591rvGuYBFzYvDw9P -P3nm3wffaK572PLG9GV4T75BAhdMR3L1mJZFYB5ZU61PTGfrpytbPgHzSwHC -usTOrNf8IowXcOJFe7IWcUlkfC2fZRPo35bVVyM+9VKmOr7wX5BKXie1hvhx -y8FrHJ1WMLFfrCpNPNDeEHOk6iNYnX2yV5hYrlfJa8riC5gl2HVyj3LB7meM -UVjTNygXfnxyhPgpZ0A4srATDpcKMTuIPyRIR1cEd8PHm9b7G4hH+C0HJnR6 -4eT9sMJyYv6zITsY030Q73ZFNpt4lXhW/cGqflAqfVaZROwoP5U3YjEEutt1 -LjoTU9cVpTQERuCldFqDDnG8ilPi3qafoJAuqytJ/FH6/cbwwl8Q8vF11pt4 -LrB2BgVePDsGXdskr90mHr3Kc6M0eBz+9Ja0HCMWUNQQ+6UzCdHdOq+1iNNZ -tTZiy6cgXJORsZBYIX9HvNb0FMh41F9sjeOC4Yakkf1Vv+Ef5QnlcOIA/W9N -AxYceKpme/t/sVyYiDy0SGgtFxKdewV9iY9WCZuoCfwHwSN3spSJM9Hwjn/T -HIgoS+7JiyH9btVbhhYuwPSCt3bp0VwofHmRTpDnRQ1dxy12xKPfvWMunOVF -K+XySB7iGPXJB/eDF6I9u+QQO4r0vbdG6acOH5a+iemWPcKF9pahp//l8GGj -T8Cx55Gk/9jDnUuW82NWiKp7IHGRrmOaxjQ/VtTlXS05zIW6x1EL9lUJ4GIt -q9sbIrgwWfvuW7+FCJamB9BNoVyQsBcRi34qgq3SAvxOxNrvLVHUSBTp1+US -zQe5ENRTfn2j5hL8aLisqz6ECyG8TdqbRcSw8P5v75xgLvQq3v2VOCWOXtPS -fBOB5HyoBsFmhgTSP2srXIl57/StkTkogSeTLLc/CCB9GatdCgclUCbwnUOQ -Pxd2WqSWvqElsW3xK+dnLC40+4WGSTcux+H9ja/59nDha37KGR8BKeRXYTpa -eXNhaLAw57aVFK4dOPD02G4uCIV3v9tULYXWvfrB015csDzhqutTLo1ml84t -r/fkQmWu/mRBtiyqnBh/w+/Chdze2Qjj8JX4UbMmnGPOhS1uyV/Dilei6uGB -R8LEQ3WS1sV9K5FX5bixrBkXdHM3LFfYsQqPhvhOawI5T6b3Az7T1cj8dNrX -ahMXxn7Sh/uPK+BLQRebVQwuSO63LHvgoIj97+jJY2u40JcrFOAcpIh7g9dk -7VTgwqMvLfLDSYr4bPGPc9qrubDLfvfxtdWKOCjy0KFtBem3PsLlio4SHv4i -4SImQ/YfyB+Nk1ZGM62619pLuODqL6xh26mCXWc/F2vOcAAi3HQ8uCpYEDpr -1jbNAfXEbAOW7FqcosNM46Y4wJPDMI/btha91beGvhrnQPFXL4/SmrWoJLbr -rfUIB/jdixLkbq5DMeX8LzNdHHhk6fBhgKmGAaH7InQbOSCveD7+TM8GjHGd -lpfJ4MCT0xNqM7wa+PVz3nqjSxzYNb7jPbVGA9c7bjzmeZED1+qU1cy9NVBc -8DF/2nkOKPpXvv3dpoFrZeiE0WTSr6hXhWrURI3h3B6vSA6slF9FKezQxmJd -VsYvDw5suBUu8gd0cPb0khWWEhy4EarsXN6kh6tMHPLXHf0DLRFgcOKWEZpX -lXXxvp6FNd6tjrv3bUbz3YmX7wjPAnuu4u7KI4gKsksTf9vOgPTgo8XSTHMc -2qLpvyDkN4QzTL6kqVti/k/PZKOsaWAOc+olB6yQecmkEBunoNg8bHF2sw0K -BSlEufdNQu5EUE1R+lZM6q+t6BGfhN9mMq/r4u3w1L0Et2nNCejgWfir09cB -GSnH8z3cxiF4xYHUBCUnlE9I4zdLHYO7gfXVlxKdUaEsq2265hdEjctOrw/c -hlOSm89pCf6CSVtr91d7XDA2VCyXx3YUjLwumPVu244CV6NP52r9hLeyWUF1 -DFfMagmMPTMxDHJ5x58UqLrhs3+Oig+VDMEjWt3eUdQd4Uym4N7Lg7Dq/ah/ -xLA7fpc89645dQAYly4U5dAe+DTZMP1T0g/IWjSumVbriYOR8h191/qhwkyr -PfHxDrxhbSOUUfYdMg1Oi3MKd2KDHNqu/dYHzZ9vJTHOemH1bHaa2do+KHe4 -qhxydBd+eyshfHJfL/zav50nmLUbpbS+Lghs6oFJa7WAEQtvVCqM2LB1Uw8U -DH/6Haa/BwdHDTQPFXaD541bfrtFfNBVW1M2T7MbHpTa7VmY7IMxfxnnaJd1 -gZH825lTMz6op34lyde+C5Ro//Z/A30xNfaZg+hoJ/QI73W62u2Lf/WrMhdf -7oSWFEc/GzcmhjiqHle064T0yGzhQy1MLJXbI3dqYSc8eTo347fVDz8s/dR6 -4SUNG2t0DdfZ+SE9qXLw2Qsa8moDIwbs/TDOuPbkcB0NF+rfjYU4+6F3aNkG -u1oaqLf5g7Eefmh7uN1KpJoG8T6njgy2H/qsz7h/6zFZF71e3Zjgh4OsrEV6 -xTQs3YXJjEo/pA5eLHh+iQaFZa+aVzzxQ57O/Pq5dBq0mxxk+J/6oelgT8Rm -YhcTr9sfa/zwzUxmbGUaDekrIhpj//HDgLwNOlXnaZDruLO0/iPZf9xSve0U -Dcre0pm7pv0QRfIGIuNoMPIZKUjUZWGeQE+4TyCZ58pomKM+C42GXmJjAA3L -3o2ZShuycLCMnahPPGI1/b5gEwtLTIoil/jT5L7hWdBkzsLZSQZ/HYuGJdPi -OyS2sZB9k6fMyoeGnnN6gtn7WRg81y2R40HDtlcG7/0PsLCdxehaQfyUxzhb -+yALU7VnVDPcabgSZqr3PJyFxkk1K8650eC4w8a3N5qF461GV+O20/BYecfj -9adZKGBzeuywEw0pVTGBj/JYWCwf+qTWhob9OhlGkQUsbOmZeOZIbH+7RNCw -kIWmCVp67dY0CGX03X5YzMKUqTvhY1Y0JIY6D1SUsXB1W6e1qiUNMWrKe8uf -sxA3em28jTQEZTTuK/3KwqLEwf45Ixq2LukzCaVZqKLgvewKsWoij6hOFwvz -oy/d1yHuC9UrLullYfcK/U3+hjT4OmYP3x9iIccuKrNVnwZPvrDge7MszBpb -sP8VgwabMLmQIik2SsiYO81p0PA8O8k2TYaNCX4nebKJTZrGlCPl2LhfP00P -iLVVGj9ZrGKjgMG/6gkbaJBti7b4rMLGFE9lM+H1NAwad0gJ6bHRtTteylCV -hvO81//2385GvhiLjROKZH4tkUwHNzZOvc6xzyU+4RUZyvBg40b1rgFX4sgy -53VzO9kotfLbvYdrSH9qwYXLTNJvwTqv4wo0MBqYrBcH2RizM2ojYxUNbRdU -hJVS2Vj0qvLBhCwNd0E0oP8CGyMDErweE58YnqgrvsjG7TWZ4XHEOlvr4gwz -2Kj+rWBWkDiFx2/M4RobM/d9diN3PFgfuP4psoiNlw0FrcKlaFi58qS+6V02 -ViyYmgPiiYYDFxfeZ+MSo4n1IsQ314JDygM2WhtJtd1aTgO3o6M6p5L00Tlz -5OsyGsrs5Qve1LPx5bTqEEuShjOzvHzpDWxsuHS8woCYWTDgu6OJzOP76JcQ -sdiiSvmeZjamN+RUlkrQsK/K8/zMBza23lS/vJhYSf1yhHIvGwcqPA++FKNh -ti323Y8+0m/7D5vrxC2JbO17/WS9W/l8FHFcp+6A0RAb81XTDmgTt2e+2+00 -TuYT4hy+sZSGtMXiVlELKDQp78jNXELDk7EOr/CFFK4PSxk+RPy9ozA0mI/C -zMmw59uJTcosrzMFKdTW/VdMnLjPJ/KPrTiF9+uOQZoo6W9vJWElSeHpmOQf -YcSbDCTUYDmF1ssKV7sTp4oWuTNkKdyy21R7xfx65bcS+TUUejB3dd0VIffR -raL65UoUGjQLDKcTp6Ye+bZUhcJ7Ls+ORxP3UZKii9Qo1Lhl5mY7vy5pEzCk -TeFdvz0nR4RpqPxPMr5Ph8I7cgrjH4l7f9CXaF0KNxi3/6glNq6Oqn1vSOEZ -G0b0/4h79t1d9TdS+J5to7GNeIlntN5Dcwrz3t2YBmIjiy32JZYUFkr1O2gR -p8h2Hbm1hULKVOfaUuJHi+6lZtuSebYzMnmIu39G51+xp/BqltyqMSEaDF8u -bz3nTM6v6vLrD8TMkq7BZBcKSxXVpv8hPnf1Hu8xVwo1+64W/U3cFbpVO8KT -wg8blavyiEW9pWxCdlL4/L7esqvzeVu7dwftovDaEeWZC/Pfr4494+1Dof6e -y1Q88SMh25ueTAonWqV/RsznTUo9dmFR+MI2bOGB+bzO7mZ7isJKwYIc//m8 -pvt91gEU4t7yZp/5fg9juRhE/u/7v5J3zufftF22aR+FHeUeja7z+eek1+sF -U7goZfAvp/n8yB4zrRAKi/rcpmyJRVglnmqhFO53v9xhTWzgFHdAKZyc/9Ei -Z4v5fGO7pJURFBpKZjoh8VkVmSzpSAqZjZ7tm4krxHofiEdR+DRkZHQTceef -kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= - +1:eJwV1nk4Fd8fB/CbItmXLJF96wpZi4rzKVuEJIpIljsjSwhJZamEViHttiyR +tCgi5KdvUklfW99IZSf3XuudrKl+xx/zzPN6zsz7eZ95zpkZJZ8QJ4KLRqON +4GPpfORfHY2Kln/N2NlvaZ+7mchsPN/Ix6IE5et9VFtyb/bGdFWLGtTt9TV9 +yY6MjzwCBm/QoBbHvgO7NCruNbdFEzqULrq7E/t8g3RdXHEr+nzNJOsL9ouW +I1mL+v+hAZ0Ao6/YrK7G6OPVnWjeI0/yO7bMkIr7jPk31LN2aFsP9s6JaJPw +ph40H7Chog+7dpHFH1Xch3TNz0QOYn8+LXXyefAA6s35HvcDe5zHgvVTfwh1 +x25rZ2HzXAp1M5gdRs86HoaOY8uLZr47Uj2CDAqUXTnYDrIz98bNR9G1eDXu +X9hkjrKkNu84mkt41vgXO05tV0Jg0wT62mPTtaKHiTqlPulFFE+h5mNXOoSx +GfsD/K9e4qDAPLM3EtiTGbS7T4Mp9HDZzKIsNq+ytsiU/jR6uz7Glo6dznht +LSIxgyz67Lx0sRUL3eI2zM6gkgzVuk3YxlqJ44er55AExT5gjX1oY08Ty3wR +Xc3vFA3A/hl1dAWf+m/UJfbjWDj2qWr+rXTeP0ha8rdGDPZNMH7g1/QXCd9G +ZOpSv4J3FmHFy2Drk7XuL7GLG672npblgrZ+QvT9Ut8fntGpl7jAROa56H/Y +0ZrTz54ELwdHq8DJsaW+j5VUJvS54aOpurpKLxN1tYzW/snjBk/LAi09bEVO +xX4hCR7QytWMQdglhg5p2rM84LFgveiBXf/ixLKgal4w824Mu4M9/bq9Z8Rc +AI7YfAb1PiYSsxMQOVkrABKnnkRvxtb9ZAGCJoJgLHJeeBd2wGB5jp6OEPjd +NNx8HDuUq0nXVEAEmnJC81qxh5QfTSXMiAK/oMubtH78fMjGVc0GYnBegXak +BJvrwbCS9BExkCq6F96ArWig4FTMFoNg26GYX9j7zVOe/tsrDl84yvf8B5io +2TcsXOqDBBDRwZZ7B5mouzD5ohevJMRSz72OYo+yi/PuW0pCqM1sWzo2X8RA ++5Y6SRhP86z5hG1x1tnQq1wKtGPqcl2HmKgqf+N0UfYa0HC6/jJ0mInyhxYi +N0fIgULTOXr/CBPtcEnqDn8oBz2nj7uuYuL8enGrh8NyQHIM23WxDfO1JBTd +5EFphK/kFHa9j+czbjMFqNq+nq3CYiLORO+xkXhFiC9fzIpiM5H4YYuyZ/bK +UN1e3bV/nImG8/kOOQYowx0i5MxF7MpvLbJjicrQWT5wtAbbw+5AvHqdMuTR +BUFhAvdbH+l0S18FUvzcvEewDVmFk7FSqpAfk9BxboqJnP34tW371CDCO+YK +1zQToUgX/X2/1QCZzpzfgq2ZkL2JsUYdAi/rf4zApuUZbI/drQ60UUp7BPth +t/u+p6/UgVqX7No2g/fn3pLTMrkaUN/xz+6yOdzPwv4zy4cOwc7yrY8WmShv +z42vs7F08DbVG5jETvbp611xhw4Wx+ZNDX7j9X3qKFu+nQ4FE4UfK7FFazJp +e8w1wdsqxOXtH7x+DMY1q1XWQwmvMQ+HxkKyylfiLg5qQemgGDOGm4VqLvyk +z3Npg4dEX1gztgfl9olU0oaaJrqTEg8LZdWr0rd7akM5U0O0AVvZr6ptrkMb +/N3/SRHnZSHNkiE18oMODHa/u1bLx0JysvKkopsuVKx8VOoswkJaBRECv5A+ +6AVxcZ1ey0I+jPhpbQd9qHZ4s7wP+6ZKWreXhz6YajXt2ibHQstzHz9piNKH +npzcBi55FurKYjmnlepDd7X7hvMKLHT+plcmXcUAajSsRvOUWWj4op2OK48h +sLtXConSWehumKpjeZMRFNom177fyEItkWjT2QITEOljaMS5spCS538OB4JM +YX05/WlXLAsRf58/kjsOkCafvHtXIQtJsStXSvlshxhGX6RZJwtFGGz9lqZp +Ac4Prk3k87GRz9jiO3GWJfC6HxAMBjZ6uD18ZXazNdjrv3mTE8dG+T8DXpWk +20Cs/ZpIsf+x0dw26Y/1cTvBKcD42F3eUfSdtnyqz9seqOoJo3SXURS8NiTl +tMouaN0qZB1xdxQ98n9Xdy3BETIiROSk5kbRCWrN7Hr/3bBP5qNYr90Ymra1 +2vv2oBO88O5vaC0ZQybuqduGdu8BmWh56xGhcdS2JjOg3sAZKhky84WHx5HM +vfiaonUu8Ep9QS23YxxV9mraOQjuBbZ/Wuxe0wkk/2nSL3JsL/Qf5RHYkzeB +DK6lluT17oNAuTGOKN8kylxB6aS9dgXexcKq82gSPd+2oSvhhRu4tdRHaJyY +RDc3XRBdLN4Ph26dZsuVTaLmrwWJBpfcgUvKmO7AmkTl9hmqoac84GwC6wZb +dQpNHd5DC2YcgK4Y3hOb3KfQtBX90Li5JzxIVuxsuDKFisa+zIVvPAhfz15J +r307hVzvFvgeEPACy3EDgaKFKfTs6c6Dy5O8YJ3TV7aoLgeZyLbNn5/3AjO/ +7KOcgxyk0uvX1ervDb5qjkJl+Ls0yB+4K2PAG3oUJC4dq+KglmQHX2sXH3Dq +jKFt6+eg9Khs/qMtPrA1/7V55yoK1dT+nfe18YULFhah7VoUEvaAJIMqX9CO +sxKqtKGQ4uq3zWtrfEFI9b6Iti2FdJvspXlqfcFEu6XxLrbTVvf7na984Uyr +BnlhJ4XS10Z+iHnvCztU1De52lNI5vsD4XedvnBk1WuDYUcKqXpK3fSY9YUg +s0TVD/soZOI1XpRgyICoS6WB5QwK3bs1Ge6wkQEZOg9cRQkKrW7nmEkZM2BW +avvyw9jjlrOfirYwYMtt6VQVksLvL9qypu0MaFipmHzZj0JCs6JuYrsZ4JUZ +stwlgEKDl41WZR9mQPS+gIulIRRKro72r7zHAMYlgUdZxyl0WP+GSVQRA/ic +WvRGsO3ul64yLmaARqpOuN4JCvHdGL5f8ZABZ+qu6bzGTghzZD0vY8CaWOGk +gZMUiqarBpb/w4Dbps3PpWIpFHDjQ9DTbgZc8pf+ZH+GQjZCw1vDehlw8P7M +fDL2ugSaoH4/A7IqXL81Yw+HGT0sHWKAdGLSZ8d4Cnk7ZI89GWWAUV5J9q6z +FHLlDg9+vMAAnniJWEikkHW4TGiJJAHhbVJGE+cp9E92om2aNAHaO3jva12g +0NYmjmqUDAFqvmSTP7au2ocv5vIEKAhbKw1gr+k4af5VjYDyqEyutosUYm/+ +LslnRIB/Q/ednMsUusKV89JvDwEzbPkxWiqe/waBm/YuBEx1zJgaYp91jwoz +2EfARr4Npn7YUWWOGn/3E5BZeteqCdubXJZ63YeA1Oqas2lpFDJo9GG8OUKA +ReneQuF0CnWkqvGrpBCQorPo3HSdQo+Q4KGRVAJWmeUUcrDPjv2sf3iVgM79 +R55K36CQvk19rPENPJ+WxElf7GSaL8c+i4BPW6YFZ7GtQnK+RJUQ8N702Xvh +WxSSkzu30ewRAacqhzL0sH82hlxd/oQA8t28xh7sXHVkn/yMgG6RcuIa9u/v +3+vyqgiY0/sbK3mbQmV2skX/viPAe3qTGv8dCl1c4OJObySgJikpYh22TxHL +262JAMPrkSctsUVWVMkONhNAY6s8icUOqna9Mv+ZAONup7IxbBXN65GqQwTs +2flNtTaDQgsdMe3MYQJeKgaPfsZuSSB0H48Q8LSRDJzAju0zZJmMEuBXG3dF +IZNCXTfbD+yiCFCnz4VEY6etFLU8sYwEMsjnyrosvH85390jlpNwlv1CCWH/ ++F4cFsxNgm+rp5sL9tYyixyfVSRYW5+pPIU97BX1y1aUBDPnj0bt2CJ2lmKW +4iT+H9TmDGNv2SRGRxIkUGW1exawUwRL9hqsIUGtKoBHMRuPV/WUyiqRUB2X +QvfDJgtK3kmokPD+7zrhKOyUlOM9wmoktJ74eusc9jApLriCTsLKlPisoqVx +cetDo7oknKm9wRjErvojHjesT8JOo4owDvYQs/daryEJd5K+qdFyKLS57sTr +T8YkVDZuOCmDPRj0SP4lkNDm+7LPFlvI9aRRxXYSZoabpfZim5jvsCu1IMG4 +v4PjhZ28pv94wQ4S7q1/deModuWKxynZtiRErs72jsMemDhZeMuOhIriwJZz +2MYNEv9ddsT9XjRm3Mb2Ke1nJzmRcNRi/0Iu9uWMx1xnnEkovdu2WIzdH2aj +G+lKQnpG1OQLbEFPSevQ/STE1Of11S3l2QwcCPAgYX3702Nvl+5XiLno6UWC +pmdUWvtSHz7bXFcfEjK/aUl9WcqblnzhxCBB1uoVdC/l9Q0025H4/leGwgNL +eU1Phq0OkeAan3jmx1K/ipjfEECCemv5bfZSfq7t6i1BJCj8ebVvYin/stR6 +o2AS6oKKX3CW8qMGt20IJSElObhuGluAUepKDyNBeFAwaA57067YEJUIfP1i +Us3CUv7mnYlykSQoH/tWuoh9SU06UyqKhHIav90f7OciQ89ET5Dwy0X84l/s +vl+ljfzRJERsnw6m3cX5P2L7uGNJyM55MrvkjW075/7GkbDgZqm2DPv/2q4a +0g== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + "PlotRange" -> {{0, 180}, {0.8084516539793162, 1.2268077331442542`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5012481131960849}, + "AxesOrigin" -> {0, 0.808451653979318}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12581,7 +13498,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5012481131960849}, + AxesOrigin->{0, 0.808451653979318}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -12609,7 +13527,8 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5012481131960838, 1.8440472181603567`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.8084516539793162, 1.2268077331442542`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -12617,9 +13536,9 @@ kgbhGApH2zwvGs/nf4/r5IujsKczo8aIWP+t3e+5eAr/i74TPe//A96dwq8= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991342629715925*^9}, + CellChangeTimes->{3.991342629715925*^9, 3.994388806485463*^9}, CellLabel-> - "Out[386]=",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] + "Out[139]=",ExpressionUUID->"d3acdaf8-fd6d-46b7-b6f7-9e169620789b"] }, Open ]], Cell[CellGroupData[{ @@ -12682,156 +13601,158 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991849950722357*^9, - 3.9918499540026855`*^9}},ExpressionUUID->"1ea503b1-33a1-2744-a92d-\ -2e1269faf5ed"], + CellChangeTimes->{{3.991849950722357*^9, 3.9918499540026855`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.03396961278019`*^-273\\\", \ -\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 387, - 405, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299467087`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1467892128270659`*^-276\\\", \ +\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994388806660965*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], +In[140]:=",ExpressionUUID->"80ea7954-ac51-4fb7-a741-ed7e13dfbc39"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.366286872093514`*^-285\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1536387693447625`*^-288\\\", \ +\\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 70, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994388806668644*^9}, + CellLabel-> + "During evaluation of \ +In[140]:=",ExpressionUUID->"9bffbeda-1183-4300-b270-bab2b98b14dd"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.160529236976694`*^-300\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 387, 406, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629956772*^9}, + 140, 71, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994388806675275*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.843812508005402`*^-296\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 387, 407, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991342629966284*^9}, - CellLabel-> - "During evaluation of \ -In[387]:=",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], +In[140]:=",ExpressionUUID->"e92b4dde-6486-451a-ac5e-d1951a03480e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 387, 408, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913426299753895`*^9}, +during this calculation.\"", 2, 140, 72, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913426299467087`*^9, 3.994388806681535*^9}, CellLabel-> "During evaluation of \ -In[387]:=",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], +In[140]:=",ExpressionUUID->"5ac7e860-cfa7-42df-a602-42cea5b9f6d2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VdsXAHC/PEVFiAwZ7z33GkKoZLqtFZIplSiVECEl5RIhdZU5JISU +WcK9JxkaJClUKlTK/FJEA0KvjOX5nffH+ZzP94+zz95rr73WVnY7buexiI+P +b556/ntP9T1vJC4UbhJZKPWt8dDf9C5bOnhz1znQKo1zNTm4ClDylZt0VzII +11X2rDjIhMAdpZ38XfnQwYm5MOGqB2JjUsmznRVgJKhY2eRqDh8e2B7/1VkP +nbPiAvauu8GcGH7/o7MNJnXv1qQ5e8Js58bLE50DoPpt6RVyTyA0mN4ofJP/ +E3Sdl9FMVKNB7kP1ZzeNedgtkBjXIXIJJHxcSpeY8mOY9Fkx0iwNknXMa2wd +BHFH3lcZ2bKr0J2h/eiHqDDajYaG/TLKhQuFZ18tkhHDaM3ugrIb+SCV+ik2 +JWslOjrMGYp1FEK0veWmtilJXNzY/PIPWQT+Bnkuz89JY+3RqINZAcVgNj4X +4vtJFqfNQve1DpZAsEWq+uNRWfyy5now/3AJ3MzT7Fk5JYs9SmaGG8ZLQNre +1aBacDUa21RlJ86WwOi9J9P8WqvRttZ6VFqkFFLOJQVcObUaxQcZThf0SmFA +kunbKCyHrxTb64ciSiHceOdBWX15rPVaWXpIigsWztn/bDSRR07ewpSCHBdE +OCPnHWzk8YnGlHG7EheuNUQWJbnKo0KaT+UGdS7cs7o/sjhWHke1ss2fGnNh +wpEe+LNbHokz5sOMg1xwPjkZ1xyqgHnADu0r4gIj3URuOFIBVxgXVEpxudR8 +L5JLkhSwPE54wKaMCyF/1F6bFCrg3/8EKHPvcuHyeWfJ6mYFJLIk1Dc2caH5 +0rOc6/KKeERp5GDCVy4Y3rxSdaZOEcU06jJ0mTww62ydH2tSRPWYDiGuGg9s ++f7a6tKmiAKHn0wravLA3c63G4YUsaI3yGphHQ/MQ5XPcgSUMPxCSEvKZh6c +UJwq2LxGCUuYBc4STjxo9Mr53hCohM3+U0EBiTyw/GMgfjpUCX9+NLh7+hIP +WpPe6a3nKKFrs0JQeCoPuquFOIWxShi7+WQwJ5MHY8sCxCOvKeFpV4kE+yIe +SN+y2Gher4QvRp2kHWp54DPzg9MkrIyf8ghG9VceGPp5rvosrozVotJnYkd4 +IDjcw+WXVsaNvrX1DmM8uN7b0LGJpozNL91FB37yoO/hZY3besrYWmH09Pm/ +PNgeadCV56KMJbmLvravJEFXPHxtaLky3tXfmPLJkAS+C5ONGXeUcehbopgu +i4RW/iP77tQoY75mZPRpIOHopF3kjyfKuMV9iZOAGQmFXUSvV48ySn0rqfxs +Q8KqnKYoe34aDldFn/t6gITZNaJ9mg40dCRSJkdOkzCVJRu+bh8N1bau+1R+ +hoRfKxiEgQsN1zxs+OPPIWHsp8ERM28aKj17dHv0PAkDNe5T+8JomCh0fdut +OBJeWN8ViblOwzbtgAucdBKe1T4uTyilYe1BgSChKyQ0rm22Tymj4VC7cHpi +JgkPV/ZnZlfT0MLucWBCFgkVvUtVbrfQ0OtHVOOBAhIyjzrDwCQNz//vpqzl +TRLS3x8e+DJHw3tRnsmXy0hI3e4f+X2BhpUJ/Vv7bpGQuC7m5YwQHbduifc9 +VEnCud/le1Yo0FFgprvG9B4VnwsCJ4zN6cgQmui3fUzC4fkVK02s6WgtQ+e4 +1JPgeVz2ztYddNzQQ/P0aSDBddfaP3b76KiUSCwPfUKC/eq9Md6+dAzlz247 ++pwEYy4vNy2Njgkpmh+uviahV4mbs+UqHW1s8gXc35AQklaS/SuHjnGTBrPM +NhLuhhddsyuho0uthNX1t9T+OuZmiDygY5/x4fzQDhLetGSn1z6iY1HPx81q +nSScMM1K83lCx0bvFZVvKd/Uykx90UpH347+5YrdJKgJpCZF9dNxle/jmxd7 +SWgKSb644TMdiRPWo/S/qfVMJCUODtPxci/w3aZc2JsQb/KLjqvnX5It70lQ +qoiO+XcxgT8irbS7P5BQpxIVTS4jUMhuXsf+IwnOWRFRTqIE/p4YF2mmfDUm +POK+DIGJi4UOVPRT+eQSygnUINDY22H/3k8k3H4XfJahQ2CYlK1FDWV7q1Nn +3m0gcIXPaUnZQRKSN5w8rQsE3vH/166Vsg7XP7TflEC/zMuN9CESXiuxQ5Is +CDSw/SYdSFl4+fFTYzsJ/F5l5yP2mQRe+LGgrN0ELrSW+eyjbDV9NNBmP4Ef +TR3tcinHDBwOKD1EIMNP8TXtCwkqjl7+e70JPBMa6+1C+WmLB1vQl0DJiPbh +DMp/Vbud8AwisCK+7MairyQUaB08LnmawFeP4gd1KZsUuvg2cgh8vm94mSvl +jzLOx/wjCWSq+SnEUT570cmHFkfg1pMv5MopKwjsP/omkUAWf+6SdsoPQvYe +4aQQ6CZ27cMk5f0Te7zXZhCo5uh9feU3EuY8dh/uu0bgS6HKvVqUr/TaeyXk +EbisjZjfQll/5y5P4yKCOi9HkvZR7ny602OklMAtlToSPpQDjXccyiwjsJPD +jA2hLFlh625ZReC1lqnxSMpVKtvcZu4RWJ+7wzKRsl2W9cEbtQTuDB64nEL5 +h7iV6+566vtt+zsuU+7yob0+8oxAp/+d60il/OjpHJxtJrBgcYlJEuVipbdl +KW8I9A8oXx1DOSmEq1jcQaCXQJjbacqn3p2/+KCXwMtSY1LHKLtqOS28/kig +KO+L8X/zt4hZf3xoiMAIz21tppS1B5Z/mB0msCmev1uNsrTxkK3IBIHsxeM7 +l1PmS6t9SJsk0NdpkjVCxe/r+GWtjXMExtz7k/WU8itL32zrBQLFh0bY2ZTv +FJiLuP7FQBeb0lo25ex5hTMBQgz0mFE8a0rZt/zVgayVDCTc3nn3UPu/e1lx +S7k0A+VsP6fmUt7kwWE9lWfgqR4HQ3fKwjI68uMqDMSZuen3VH79Ygsl8Gsy +8FuBoHga5b+b+/9I6TIwhk6UWv2Xn5zkv9GYgbejjRxLqPxN7Tli47CZgdWH +JE7sonx6vekDb3MGvhS4LTRH5b/1159Xk3cwsJYp8tSY8vB2h/2DhxgY7x0Z +ljFAQluJ5ssZbwYaVM7XMinf519sJHycmt/h1uhy6vzF3r0jqxfMwJxim5oH +1PlUVZTuiU5goOOWogclfSSIBk9YXktmoGDSMzc5yjNtTdW30hmokzp95QJ1 +/puigq905zFwctS7zoWqD15jPY5r7jDwd/eiRR+o+mJrUdkENQzc3M9no0dZ +L/+Cvv0jBq65+1UrrouExbuNpcNeUONL+DaoUPWpqDars7WPgRtu6psaviNh +MN51N3sJE+d+DZ2pbaHiP6xB017OxEWnvB59byZheuvs9++iTMwVF5BZTXkp +f3KktywTn9BHxI+9oPIjuKHKVZOJNnadOPaUhDAP5srtu5gYd4Ju4llH/b/h +n77ljkyMveSy7/BDKh+V6kpfODFRGDDdq/a/erfHxNyTiSHLXc4dqKH6085Y +P1YwE10C9fRU7lL1a9PoqzU5THS/WdqhS/WX3Kv3rn4rYGLaffG8JSRVX2cj +vG4UMzHHcWl2N5eq91XyC7QKJgYJaq87WUKCu/p2LdknTBSpVvwUV0jCrVUV +8YIj1HrTxJR1qP5mOR5kOaSngtunKtyPU/1STkchStBYBVMWbal/GU71U3Zj +/ZrNKvhn07kZguqvqVOixmxrFbzhUDXRQvXjvvkSrQUXFdyss1Rn7iQJ7OV/ +r5SJVUE7/qjfD7yo/qiGfTa9Kvih00PhlwUJPkc/y574qILmnpX1381JADJ+ +T8qQCp4u0PAYpO4Dg9rdr7vHVdDtREJJE5Kgpc9u8PxLFdkV8XbH9EloMC8s +5miqoo1/v6GqCgmj7oL+VWdV0VdFmH5sETXfbLPaughVRO3byhJ8JIx3c5a8 +jFVFi4VB13vzPPhn++zV/hRVPFF48/rMDA+mjYYbRYpV0fpx7RHHcR4skmhe +5f1aFWmzLv9c7uWBTOPF+/LKaghsw/NiFdR9jpBaFF2vhtu6Uz9t38ODb25b +i42eqaFXdK1xhD0P4vOCbCdeqiFHMjHwzk4evFXoytzbroa082ZJEjY8cJW5 +sk7jqxrOX+o7dRd5ECyy2uONsDo+/fJH4Ap1n+TNKDSt3quOFeFxO9pmuSDe +wky8Na6Ow+nkCsdULsjFlO3Q09Og6p9lmEtOKWSsMRBd6aWJme1u8Y9zSuCF +7OYNPy9pYZZ+1jfLpGIwlKtPWtuxFm3eqF7S3nMDRPjzAw6e08ZnRi2SHxlF +oBCuaLyXqYMh9KrrVm8KQYjhdMfumQ6KPtSpiAgrAC2WTFnQAV1UFbKQc4d8 +YPeJN1jxrUOH20b2uV9zYfxnvINlxjoMskqaOLQ/B7aufZppqbkeeZZXrmvz +ZcHDn0a/p1vXY33zQLp+VCb4auj2vPHYgL4ZCcP52zKANXbo3V4hPRTPaLOK ++V8abCGktwnn62HDiX4hs9kUUOXEnarfuBF/Cpr1vZdKBnUPgzpGz0YMHfwR +/l0rCTweHo6o8tPHqYirRreWJ0Bd7rtDPyQN0KuDnt5ZHQu/ihem1941wFQ1 +Pq3BmihwZ3CFMrcZot+/66LHNCPgh3qKXsWEIfqzl+4oKQ6He4W/+ydjjNDt +4vvnlivOwj4zOhopGOMBy5r5AYtQWH0sulrrkTF+O8DO2ngtCCSX+pRv28PC +IKd9v1cnBEChaVjIxF4WyuQ8rNPnBIBuWKJpihML8/ud5Z38A8B24lZ710EW +2nB2X72zNwCiOiZn3X1YeEZ/nft9ZgDM5J81CQln4cPFY+q/H/tDj1HK2yIu +C5MujnTvnGfD4ZOF1yxvstCrTOEI6wcbpm7e9hi9xcLK+xes1w6xQZzWNa1z +h4W8+2KzjBY2WAvKy9U+YmGr2OM65yw2PHhXdOhtOwtvpO/n/7OJDVYi9zQD +u1gYHreQYb2ODV1bn09J97KwLKFrf54KG37dH4lx/kiN167m6iLKBs08bfLb +MAtVpmwIxoAfPOjZHBj/nYX6edcGr3f4gZXELlg7wcL3fPRHGi/9wDP65JuA +SSo+39vrbKr84NejqEypGRZOl5//MFTsB+fm0t3vz7Ew7OoRscgsPxBdX6Jx +YJ6F6aesd6kn+0H2sfuTCwss3KX5Jb89yg/+D6TBV08= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12845,115 +13766,113 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nk8VdsXAHC/PEVFiAwZ7z33GkKoZLqtFZIplSiVECEl5RIhdZU5JISU +WcK9JxkaJClUKlTK/FJEA0KvjOX5nffH+ZzP94+zz95rr73WVnY7buexiI+P +b556/ntP9T1vJC4UbhJZKPWt8dDf9C5bOnhz1znQKo1zNTm4ClDylZt0VzII +11X2rDjIhMAdpZ38XfnQwYm5MOGqB2JjUsmznRVgJKhY2eRqDh8e2B7/1VkP +nbPiAvauu8GcGH7/o7MNJnXv1qQ5e8Js58bLE50DoPpt6RVyTyA0mN4ofJP/ +E3Sdl9FMVKNB7kP1ZzeNedgtkBjXIXIJJHxcSpeY8mOY9Fkx0iwNknXMa2wd +BHFH3lcZ2bKr0J2h/eiHqDDajYaG/TLKhQuFZ18tkhHDaM3ugrIb+SCV+ik2 +JWslOjrMGYp1FEK0veWmtilJXNzY/PIPWQT+Bnkuz89JY+3RqINZAcVgNj4X +4vtJFqfNQve1DpZAsEWq+uNRWfyy5now/3AJ3MzT7Fk5JYs9SmaGG8ZLQNre +1aBacDUa21RlJ86WwOi9J9P8WqvRttZ6VFqkFFLOJQVcObUaxQcZThf0SmFA +kunbKCyHrxTb64ciSiHceOdBWX15rPVaWXpIigsWztn/bDSRR07ewpSCHBdE +OCPnHWzk8YnGlHG7EheuNUQWJbnKo0KaT+UGdS7cs7o/sjhWHke1ss2fGnNh +wpEe+LNbHokz5sOMg1xwPjkZ1xyqgHnADu0r4gIj3URuOFIBVxgXVEpxudR8 +L5JLkhSwPE54wKaMCyF/1F6bFCrg3/8EKHPvcuHyeWfJ6mYFJLIk1Dc2caH5 +0rOc6/KKeERp5GDCVy4Y3rxSdaZOEcU06jJ0mTww62ydH2tSRPWYDiGuGg9s ++f7a6tKmiAKHn0wravLA3c63G4YUsaI3yGphHQ/MQ5XPcgSUMPxCSEvKZh6c +UJwq2LxGCUuYBc4STjxo9Mr53hCohM3+U0EBiTyw/GMgfjpUCX9+NLh7+hIP +WpPe6a3nKKFrs0JQeCoPuquFOIWxShi7+WQwJ5MHY8sCxCOvKeFpV4kE+yIe +SN+y2Gher4QvRp2kHWp54DPzg9MkrIyf8ghG9VceGPp5rvosrozVotJnYkd4 +IDjcw+WXVsaNvrX1DmM8uN7b0LGJpozNL91FB37yoO/hZY3besrYWmH09Pm/ +PNgeadCV56KMJbmLvravJEFXPHxtaLky3tXfmPLJkAS+C5ONGXeUcehbopgu +i4RW/iP77tQoY75mZPRpIOHopF3kjyfKuMV9iZOAGQmFXUSvV48ySn0rqfxs +Q8KqnKYoe34aDldFn/t6gITZNaJ9mg40dCRSJkdOkzCVJRu+bh8N1bau+1R+ +hoRfKxiEgQsN1zxs+OPPIWHsp8ERM28aKj17dHv0PAkDNe5T+8JomCh0fdut +OBJeWN8ViblOwzbtgAucdBKe1T4uTyilYe1BgSChKyQ0rm22Tymj4VC7cHpi +JgkPV/ZnZlfT0MLucWBCFgkVvUtVbrfQ0OtHVOOBAhIyjzrDwCQNz//vpqzl +TRLS3x8e+DJHw3tRnsmXy0hI3e4f+X2BhpUJ/Vv7bpGQuC7m5YwQHbduifc9 +VEnCud/le1Yo0FFgprvG9B4VnwsCJ4zN6cgQmui3fUzC4fkVK02s6WgtQ+e4 +1JPgeVz2ztYddNzQQ/P0aSDBddfaP3b76KiUSCwPfUKC/eq9Md6+dAzlz247 ++pwEYy4vNy2Njgkpmh+uviahV4mbs+UqHW1s8gXc35AQklaS/SuHjnGTBrPM +NhLuhhddsyuho0uthNX1t9T+OuZmiDygY5/x4fzQDhLetGSn1z6iY1HPx81q +nSScMM1K83lCx0bvFZVvKd/Uykx90UpH347+5YrdJKgJpCZF9dNxle/jmxd7 +SWgKSb644TMdiRPWo/S/qfVMJCUODtPxci/w3aZc2JsQb/KLjqvnX5It70lQ +qoiO+XcxgT8irbS7P5BQpxIVTS4jUMhuXsf+IwnOWRFRTqIE/p4YF2mmfDUm +POK+DIGJi4UOVPRT+eQSygnUINDY22H/3k8k3H4XfJahQ2CYlK1FDWV7q1Nn +3m0gcIXPaUnZQRKSN5w8rQsE3vH/166Vsg7XP7TflEC/zMuN9CESXiuxQ5Is +CDSw/SYdSFl4+fFTYzsJ/F5l5yP2mQRe+LGgrN0ELrSW+eyjbDV9NNBmP4Ef +TR3tcinHDBwOKD1EIMNP8TXtCwkqjl7+e70JPBMa6+1C+WmLB1vQl0DJiPbh +DMp/Vbud8AwisCK+7MairyQUaB08LnmawFeP4gd1KZsUuvg2cgh8vm94mSvl +jzLOx/wjCWSq+SnEUT570cmHFkfg1pMv5MopKwjsP/omkUAWf+6SdsoPQvYe +4aQQ6CZ27cMk5f0Te7zXZhCo5uh9feU3EuY8dh/uu0bgS6HKvVqUr/TaeyXk +EbisjZjfQll/5y5P4yKCOi9HkvZR7ny602OklMAtlToSPpQDjXccyiwjsJPD +jA2hLFlh625ZReC1lqnxSMpVKtvcZu4RWJ+7wzKRsl2W9cEbtQTuDB64nEL5 +h7iV6+566vtt+zsuU+7yob0+8oxAp/+d60il/OjpHJxtJrBgcYlJEuVipbdl +KW8I9A8oXx1DOSmEq1jcQaCXQJjbacqn3p2/+KCXwMtSY1LHKLtqOS28/kig +KO+L8X/zt4hZf3xoiMAIz21tppS1B5Z/mB0msCmev1uNsrTxkK3IBIHsxeM7 +l1PmS6t9SJsk0NdpkjVCxe/r+GWtjXMExtz7k/WU8itL32zrBQLFh0bY2ZTv +FJiLuP7FQBeb0lo25ex5hTMBQgz0mFE8a0rZt/zVgayVDCTc3nn3UPu/e1lx +S7k0A+VsP6fmUt7kwWE9lWfgqR4HQ3fKwjI68uMqDMSZuen3VH79Ygsl8Gsy +8FuBoHga5b+b+/9I6TIwhk6UWv2Xn5zkv9GYgbejjRxLqPxN7Tli47CZgdWH +JE7sonx6vekDb3MGvhS4LTRH5b/1159Xk3cwsJYp8tSY8vB2h/2DhxgY7x0Z +ljFAQluJ5ssZbwYaVM7XMinf519sJHycmt/h1uhy6vzF3r0jqxfMwJxim5oH +1PlUVZTuiU5goOOWogclfSSIBk9YXktmoGDSMzc5yjNtTdW30hmokzp95QJ1 +/puigq905zFwctS7zoWqD15jPY5r7jDwd/eiRR+o+mJrUdkENQzc3M9no0dZ +L/+Cvv0jBq65+1UrrouExbuNpcNeUONL+DaoUPWpqDars7WPgRtu6psaviNh +MN51N3sJE+d+DZ2pbaHiP6xB017OxEWnvB59byZheuvs9++iTMwVF5BZTXkp +f3KktywTn9BHxI+9oPIjuKHKVZOJNnadOPaUhDAP5srtu5gYd4Ju4llH/b/h +n77ljkyMveSy7/BDKh+V6kpfODFRGDDdq/a/erfHxNyTiSHLXc4dqKH6085Y +P1YwE10C9fRU7lL1a9PoqzU5THS/WdqhS/WX3Kv3rn4rYGLaffG8JSRVX2cj +vG4UMzHHcWl2N5eq91XyC7QKJgYJaq87WUKCu/p2LdknTBSpVvwUV0jCrVUV +8YIj1HrTxJR1qP5mOR5kOaSngtunKtyPU/1STkchStBYBVMWbal/GU71U3Zj +/ZrNKvhn07kZguqvqVOixmxrFbzhUDXRQvXjvvkSrQUXFdyss1Rn7iQJ7OV/ +r5SJVUE7/qjfD7yo/qiGfTa9Kvih00PhlwUJPkc/y574qILmnpX1381JADJ+ +T8qQCp4u0PAYpO4Dg9rdr7vHVdDtREJJE5Kgpc9u8PxLFdkV8XbH9EloMC8s +5miqoo1/v6GqCgmj7oL+VWdV0VdFmH5sETXfbLPaughVRO3byhJ8JIx3c5a8 +jFVFi4VB13vzPPhn++zV/hRVPFF48/rMDA+mjYYbRYpV0fpx7RHHcR4skmhe +5f1aFWmzLv9c7uWBTOPF+/LKaghsw/NiFdR9jpBaFF2vhtu6Uz9t38ODb25b +i42eqaFXdK1xhD0P4vOCbCdeqiFHMjHwzk4evFXoytzbroa082ZJEjY8cJW5 +sk7jqxrOX+o7dRd5ECyy2uONsDo+/fJH4Ap1n+TNKDSt3quOFeFxO9pmuSDe +wky8Na6Ow+nkCsdULsjFlO3Q09Og6p9lmEtOKWSsMRBd6aWJme1u8Y9zSuCF +7OYNPy9pYZZ+1jfLpGIwlKtPWtuxFm3eqF7S3nMDRPjzAw6e08ZnRi2SHxlF +oBCuaLyXqYMh9KrrVm8KQYjhdMfumQ6KPtSpiAgrAC2WTFnQAV1UFbKQc4d8 +YPeJN1jxrUOH20b2uV9zYfxnvINlxjoMskqaOLQ/B7aufZppqbkeeZZXrmvz +ZcHDn0a/p1vXY33zQLp+VCb4auj2vPHYgL4ZCcP52zKANXbo3V4hPRTPaLOK ++V8abCGktwnn62HDiX4hs9kUUOXEnarfuBF/Cpr1vZdKBnUPgzpGz0YMHfwR +/l0rCTweHo6o8tPHqYirRreWJ0Bd7rtDPyQN0KuDnt5ZHQu/ihem1941wFQ1 +Pq3BmihwZ3CFMrcZot+/66LHNCPgh3qKXsWEIfqzl+4oKQ6He4W/+ydjjNDt +4vvnlivOwj4zOhopGOMBy5r5AYtQWH0sulrrkTF+O8DO2ngtCCSX+pRv28PC +IKd9v1cnBEChaVjIxF4WyuQ8rNPnBIBuWKJpihML8/ud5Z38A8B24lZ710EW +2nB2X72zNwCiOiZn3X1YeEZ/nft9ZgDM5J81CQln4cPFY+q/H/tDj1HK2yIu +C5MujnTvnGfD4ZOF1yxvstCrTOEI6wcbpm7e9hi9xcLK+xes1w6xQZzWNa1z +h4W8+2KzjBY2WAvKy9U+YmGr2OM65yw2PHhXdOhtOwtvpO/n/7OJDVYi9zQD +u1gYHreQYb2ODV1bn09J97KwLKFrf54KG37dH4lx/kiN167m6iLKBs08bfLb +MAtVpmwIxoAfPOjZHBj/nYX6edcGr3f4gZXELlg7wcL3fPRHGi/9wDP65JuA +SSo+39vrbKr84NejqEypGRZOl5//MFTsB+fm0t3vz7Ew7OoRscgsPxBdX6Jx +YJ6F6aesd6kn+0H2sfuTCwss3KX5Jb89yg/+D6TBV08= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.05842273942621617}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12965,19 +13884,19 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.05842273942621617}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12991,114 +13910,112 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VP0XAHBSIgwzdwYJyZplVCpS6hyUskRKUm/RYi1LUcSQLWtIiexL -FCWhV9aZO4oiKS0qUmlf7GVXXr/7++s+n+fe57n3fM/3nPO9yw777HSZJyAg -ICQoIPD/68T7h82q5y5tWlBabbp3j8WmzlzZQOMuX/hxWEq4XnM5IKvjsGxX -BARur9wVqbkO/HfceC3UdRE+SdUNHtTcBvQhmYvTr6+ASMKTmNWaDtDLtfYZ -e30bHj4eW3RzuTuYqfa9+/X6HqSKu8BV9dMw/dogdeT1cyjYImB2WTEWmkyL -i55d+QyN5y1a5s+mg3xv3bfDOoPQsvtF+aTzFWB6Ot1YaDoKwuauVpWzxXBx -lVmD9e4pcIswnCp4WAbd6Ssbf0nNQkBKce2GE5Vwrii0Y95iQdRWe7QqSLAK -ZC59jkvJEUKtP+F20lbVEGNnvun5xAK0iLlJX2xQC36GBU4PI0TQinfUxXhR -PVjk08YsE0QwZSKFlihVD8oLg2OfpIog62RHV6d0PTzttK98USKCnYUhTxxU -6kH3uLjQ+yci2PZ5aKWeUT38uBZw7becKGodF3LT8qqH/UzrwSX/iuIildbj -7PZ62Dw8E+T9eRHmGR5973amAQK3XdK6O7AI3afMGnIiG+BWAfsNMbEI13zQ -b+2IbQBZu4OGdSJiyA7ZeWJ5SgMM1N6fFNIVww3P6qZLixsgJSL5ZMZpMTT5 -uLziT0cDfGKpezdLiGNu9d+tXAUuyPjwFWRkxNGhmMcNUOaCVavDYw8lcQzr -tPhnhQYXqoPO6UiuFsfutvWslJVciO8d6dvrII57z9Sc1jHlgt71BrfhK+JY -sFD98zU3LoQb2R6SWyeBUVm1mXVlXNjmmPvbwEQCd7xV87K/zQVaWH/kbisJ -FBEaqRmq5kJ2U9S15IMSGC90vJreyIVai/p+4TgJlDdabb/sORdGHFT8R7sl -UDPYSMFtnAuOp8bj2zk0THIe+Jmwjgdql03k+6JoaOYo8zDdiEfFf75sYTIN -L2wJWZaPPAj6q/nUpIiGkeWHNxVs40FqpCOrrp2GKwMrtb0ceNB+oSXvqoIk -3hJY8Es7gAfrb2VUneFLogz/j5lZJQ82v34yO9QqiQ6Xd7Ciq3hgLTB/q9Nz -SXRNCZq8W8ODIzu9u+GrJP49IzPFJnlgxlkWGrZACj0a1EdetfHg+NKJQmNt -KRTf/qXf8zMPmt3yBpv8pTCp5ib/Bp0E87+GjGCOFCZ8mAr0YpLwJLlTf00Y -9fz8PzY6MiR014mGFcVJ4Rqw25ErT8KQ2ElGVLYU6gwM3NilQYJsxTYDs3tS -GPxyiDbfiATPqV9hrRJ0nLz3czzkMAnrT7hKf2PQMfrsu8RxZxJE+t6UCsnS -cZPT9nx3NxKu9jS92qRMx9pjN/SNPUl4T6bq3NGno+3qlwbcUyTYRBl2FTjR -kfi8VehNDAmK/5V58Z3p+NHbJEI0noQBf2Whdx50NO52OLsmgYRYdzFd2ZN0 -tFmnzgxJJqHR8l1kUiwdG9ak+3alk6DHCF/BqaRjZVV/RW0JCQLnxpvTq+n4 -SvdpSf4NKn6ho/uqG+gY+TSYffYmCcfGd0b9uk/Hb6W83o0VJBR1qfa4vaFj -Ro3ADKeGBOm81mg7IQY+qZvIULlPwheZjfK+IgxMWr2xrPkBCbeTKyvPSzDw -KHd2z6FWKp6IzLdtMgxsOMf1T3xEfa+Lp56xDgMzYlmDFc9ImNaWes/ezcDx -jSlOau9ImMiRC1+9j4FbFSRHA9+TMCappmroxECDi1o723qpfIwaHt3swcBB -dVV/x08kfGo4MrEvhIFrnc572H0noZftnXEwgoGEsI93zA8S3uadNnKNYaA6 -PN5c/ZOEV5GJEScuMNCIu8Bj4QAJbZY1tNirDBT0yCwKGCGhhXe3MvEGAycm -syzifpHQvKLdLqWcgZVJq1vTfpNAEh8zc+sYOKlkvP3qGBVvzyKNO48ZuMet -/VLyFAmZxxzh0zgDw+9rtufPkXD5nfun7zMMNJO4anFcgA+XbPyiBucY2L70 -XNkGQT4krY59NCVKoHh8n8qDeXyI+FO5R1KRQP8Ej77rC/gQ6sWdYaoQ+Mqx -pNBBmA/BvQ9y5JYTOOEvsU1oIR/8m3o+q+kRaDZVs9tKhA/Hzi04bmRGoEpT -fXbZIj64z0oSJpYEzgXvbNkgxgdXH7nqrTsIXNQu8OU+5YO7VvzduY/ATe3L -Jx+L8+HAfcM8BycCv+9yH7aU4MM+g80mjs4E3pe3eHefst2SvbEe3gTmT8Xm -lNH4YJt4RNvHj3q/ze0TSyT5YD3n9eTkaQKDvKQhivK2zxHMsAgC91qtfGgl -xYctuxNromIIDLlVG3ODsknL5X3nEgg0kFtmOp/OB6PSm/lpaQReEcCqUso9 -SqV5W7IIbPJaZTNGOSjteu5YHoF69b98DBl8kBUvySksIlBqg4kMh3JN+LXs -ndcJdHr7ZUsdZfvJoizBWwQWK2X/HaU85lmYWXGbwAIlbSNtgg96DvnpNC6B -Bwp7Hc5TfvY49zKvkUAX0yQDLuXjpjlpnvcJHOtSv/KVsmRdVuqSNgJDXX0y -xJh8uKWbeantCYF5EbqKupS3F6WnBL4gsHSP9qrtlAcWX764vItAj0L2C3fK -8edTL7x+S+Ct6tn54ZQ1F1xKjv5I4IJTzi2plFuDLp5f+41ARzvtJcWUXUeS -k770EVi+X17wDuUFrucTU4YJTNGYF8SnXNSTmGAyRuW3tzj6AWVT24Rzv6YI -fG/crdFG+dOD+Pj8WQLrMw47/t/hRnFxNvOY6Nwspd1CWel2TOx/wkxM161M -aqTM14iOKRNjYnYnPb6asmPO2ej9Ukz8YyyoeJ3yX0ZklBiLiRIXrC3TKWfF -hp+tX8zEhqMPGWcpr/8vNNJDkYkiwianPCl3+Z2JkFVhYqtGnJ8t5YCfweEt -GkzcpnyctpqytBMnzF+HiR87W83olO90BoaqrWJiZamLwgC13nYWp890rmXi -mrzFKU2UR/n+IZHrmTi0urbkMuWLa08F6wEThYNYTu6UV5X6cT6aMnFOXLhm -LeWnSr5ByduYaEY4Vc5R+ZcQ9zk9ZMtE1daC5DjKN8O9AnLsmagZsC7AnLLF -5DF/q3+YmJtxQUiYcuwn95M3nKl4lvVLnaL2n4aDm99eDybWdGSnaFB+8NjF -V8SbiSln/fivqP08v+7wcdcAJjYem2JpUy7UPeTDCmbiRbX9Jk+pejApcvJu -DmPim1GbJb6UQ8/v91SOZ2JAkcOrUqqeZlzs3d9nM3H26LK4SaoeM3rs3BIL -mLhzxVq9CMrrbHe5Gl1j4tv1rUmilP2NdjhnllM+P+hCo+r5F8PioP09Jirl -9xSNUP2gy1P56dEWJhqraN+xo9z4YAZC26n10fIeqKL6R3JQ6dKSV0zUf7m/ -04PqLys/ifdO9zExPvnr9atCVH0ZfbWmjTDxgd1Lej/VnwTSeKTyOHU/7dt1 -Hcod5t65lnNUfiLoPkVUf/Ou7DiQQ7BQbJWWt+ssCfZiJY8rZVnI2XMvIPEv -CZtcwjY+UGBhkNnL+oo/JEgsXqUwrMHC0/dUf/dPk3Az7OJbNGKhQ2Oe2doJ -Evpsdv/zxZmF62ueX2QOkfD8OvvRlAcL1TvUmuao/l0vJLxBwoeFdi0q+L2f -hLiaajn9QBZGpM9TK6X6/fKlsm9iEllob5DLFf5KgtvQGwftahYas74Y0Hqo -+ZVw0N53oTQahb5UdmsmwbtPR3mluDSeaszMmLpHwuTW6cFBKWlM/iE8E32X -hEVCF6M85CgHiwZnkiSsDGyqOsiWxonxLVeya0kIcVEnbHZJY8YqdxcaNU+l -Nw10aOdJo5pvu3k5NZ/zs2qzfhZKo8xl2sIPSSRoTp91Ky6RxpN+7k8lEkkw -qlKYU74tjZ83Pjp3MI6EI1o2unL3pVFHxLD5UzgJFdK3E0T6pbF71nTNP77U -eWY4wPyrvgw6Dk1+V7ElQX6VYrSIkQwKTo/efWhNzUvf5nvaxjLI7S239rQi -4dKElJGvpQyWbFofXbyVOn/MXtedc5LB337+aRMbSfAVf0ssjpPBsN6eyClN -ap5p4nurHhm0sXftS52jzntHRPyqQmXRiabzPb6AB0O5m3n8s7I4Jri7NSCX -B8PdYQsfxckif77v60NZPPhtM531MUUWa04djmKn8mByQ18zrUQW7+5XMS+M -5cE8Zru0x1NZtBTRrRP14cHi5vP1CssW45Kd+5PbDanznarMvJh7lPtuBoS0 -cIHxWD2pYlgOOYq9vkldDSAfW75DX18ef24rTy6sqod0bUMpwk0Bq7Ikcgrj -66BNznjt6AVF/Dc841HerlpYL38vecWrpch+rj/B+V0NNKErJw9FKKGlgmr3 -VO4dUAxfarRXfRlOJ8hVrdasAlG1/dU7W5Zhe9ruGaLuNuhuXFwecEAZ69US -FPycK8H3PaPJQkAFlTvsvfeMlsPwaMJu83QVTHOkPTE/WAZbVzzINGerYpvh -kqTh4RtAjm74M/lEFU+IcjIXuJWAt47em2cuanhSL1UjQeMabBxy7twrqo78 -2B3fxHoKYYuq7HaJK+r4znX4nVtXASwPiz99z0ADfwRs8T0jmA9aLoZ8tTca -+FDCcBnHNhtcSPezVSeWo83zpiAl9Qzg53c6/2JpYuCfKonxeWkwVjI3uaJG -E7NFjO0lDFPgiFqpaOZ2Lbxx5ZmdcG8y/NJK0b89ooXnHvgNfVueCLVFfz6O -x2rjtXHFH/ft42DfZhXcoKiD9Gew2/u/KFjiFVOn26iDU5vaejpaIoC1yLNy -+x42/lhhvXelahgUmYYEjexlY29G6mG1xWGgF5JkmrKfjYHsm/VKtDCwHql4 -2XWIjVbEhwy7kVCIfjU+fcSTjXpp847QM0Jh6kqoSVA4G8vWGfh+GDgDbzak -vLhWysYDZ6qjK3JCwP1UUbb5LTbO/Fm7SzUuBCZu3XEZqGBjjOWEbNHJEGAo -d02uqmbj6+xXnBbLELAUUZDnNbJRwDZWKmcmGLid15xfvGSj6b+RQqH7gsGC -Vsv272Kj693vghVmwdC19eGEbA8be4ptSwb0gmGsvj/W8QMb6ywFu2PFgoFd -sLLsZx8b5/eHG1nxOMB9Y+yfMMjGxkt3B7uvc8CCuQtWjLBRenO5ol8aB1xj -Tj07OU7FYxvQ3+LDgbHG6EzqTwZLfm8OidzPgYiZy0fqZ9j4Tak4yMKcA1Jr -ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== +1:eJwV1nk8VdsXAHC/PEVFiAwZ7z33GkKoZLqtFZIplSiVECEl5RIhdZU5JISU +WcK9JxkaJClUKlTK/FJEA0KvjOX5nffH+ZzP94+zz95rr73WVnY7buexiI+P +b556/ntP9T1vJC4UbhJZKPWt8dDf9C5bOnhz1znQKo1zNTm4ClDylZt0VzII +11X2rDjIhMAdpZ38XfnQwYm5MOGqB2JjUsmznRVgJKhY2eRqDh8e2B7/1VkP +nbPiAvauu8GcGH7/o7MNJnXv1qQ5e8Js58bLE50DoPpt6RVyTyA0mN4ofJP/ +E3Sdl9FMVKNB7kP1ZzeNedgtkBjXIXIJJHxcSpeY8mOY9Fkx0iwNknXMa2wd +BHFH3lcZ2bKr0J2h/eiHqDDajYaG/TLKhQuFZ18tkhHDaM3ugrIb+SCV+ik2 +JWslOjrMGYp1FEK0veWmtilJXNzY/PIPWQT+Bnkuz89JY+3RqINZAcVgNj4X +4vtJFqfNQve1DpZAsEWq+uNRWfyy5now/3AJ3MzT7Fk5JYs9SmaGG8ZLQNre +1aBacDUa21RlJ86WwOi9J9P8WqvRttZ6VFqkFFLOJQVcObUaxQcZThf0SmFA +kunbKCyHrxTb64ciSiHceOdBWX15rPVaWXpIigsWztn/bDSRR07ewpSCHBdE +OCPnHWzk8YnGlHG7EheuNUQWJbnKo0KaT+UGdS7cs7o/sjhWHke1ss2fGnNh +wpEe+LNbHokz5sOMg1xwPjkZ1xyqgHnADu0r4gIj3URuOFIBVxgXVEpxudR8 +L5JLkhSwPE54wKaMCyF/1F6bFCrg3/8EKHPvcuHyeWfJ6mYFJLIk1Dc2caH5 +0rOc6/KKeERp5GDCVy4Y3rxSdaZOEcU06jJ0mTww62ydH2tSRPWYDiGuGg9s ++f7a6tKmiAKHn0wravLA3c63G4YUsaI3yGphHQ/MQ5XPcgSUMPxCSEvKZh6c +UJwq2LxGCUuYBc4STjxo9Mr53hCohM3+U0EBiTyw/GMgfjpUCX9+NLh7+hIP +WpPe6a3nKKFrs0JQeCoPuquFOIWxShi7+WQwJ5MHY8sCxCOvKeFpV4kE+yIe +SN+y2Gher4QvRp2kHWp54DPzg9MkrIyf8ghG9VceGPp5rvosrozVotJnYkd4 +IDjcw+WXVsaNvrX1DmM8uN7b0LGJpozNL91FB37yoO/hZY3besrYWmH09Pm/ +PNgeadCV56KMJbmLvravJEFXPHxtaLky3tXfmPLJkAS+C5ONGXeUcehbopgu +i4RW/iP77tQoY75mZPRpIOHopF3kjyfKuMV9iZOAGQmFXUSvV48ySn0rqfxs +Q8KqnKYoe34aDldFn/t6gITZNaJ9mg40dCRSJkdOkzCVJRu+bh8N1bau+1R+ +hoRfKxiEgQsN1zxs+OPPIWHsp8ERM28aKj17dHv0PAkDNe5T+8JomCh0fdut +OBJeWN8ViblOwzbtgAucdBKe1T4uTyilYe1BgSChKyQ0rm22Tymj4VC7cHpi +JgkPV/ZnZlfT0MLucWBCFgkVvUtVbrfQ0OtHVOOBAhIyjzrDwCQNz//vpqzl +TRLS3x8e+DJHw3tRnsmXy0hI3e4f+X2BhpUJ/Vv7bpGQuC7m5YwQHbduifc9 +VEnCud/le1Yo0FFgprvG9B4VnwsCJ4zN6cgQmui3fUzC4fkVK02s6WgtQ+e4 +1JPgeVz2ztYddNzQQ/P0aSDBddfaP3b76KiUSCwPfUKC/eq9Md6+dAzlz247 ++pwEYy4vNy2Njgkpmh+uviahV4mbs+UqHW1s8gXc35AQklaS/SuHjnGTBrPM +NhLuhhddsyuho0uthNX1t9T+OuZmiDygY5/x4fzQDhLetGSn1z6iY1HPx81q +nSScMM1K83lCx0bvFZVvKd/Uykx90UpH347+5YrdJKgJpCZF9dNxle/jmxd7 +SWgKSb644TMdiRPWo/S/qfVMJCUODtPxci/w3aZc2JsQb/KLjqvnX5It70lQ +qoiO+XcxgT8irbS7P5BQpxIVTS4jUMhuXsf+IwnOWRFRTqIE/p4YF2mmfDUm +POK+DIGJi4UOVPRT+eQSygnUINDY22H/3k8k3H4XfJahQ2CYlK1FDWV7q1Nn +3m0gcIXPaUnZQRKSN5w8rQsE3vH/166Vsg7XP7TflEC/zMuN9CESXiuxQ5Is +CDSw/SYdSFl4+fFTYzsJ/F5l5yP2mQRe+LGgrN0ELrSW+eyjbDV9NNBmP4Ef +TR3tcinHDBwOKD1EIMNP8TXtCwkqjl7+e70JPBMa6+1C+WmLB1vQl0DJiPbh +DMp/Vbud8AwisCK+7MairyQUaB08LnmawFeP4gd1KZsUuvg2cgh8vm94mSvl +jzLOx/wjCWSq+SnEUT570cmHFkfg1pMv5MopKwjsP/omkUAWf+6SdsoPQvYe +4aQQ6CZ27cMk5f0Te7zXZhCo5uh9feU3EuY8dh/uu0bgS6HKvVqUr/TaeyXk +EbisjZjfQll/5y5P4yKCOi9HkvZR7ny602OklMAtlToSPpQDjXccyiwjsJPD +jA2hLFlh625ZReC1lqnxSMpVKtvcZu4RWJ+7wzKRsl2W9cEbtQTuDB64nEL5 +h7iV6+566vtt+zsuU+7yob0+8oxAp/+d60il/OjpHJxtJrBgcYlJEuVipbdl +KW8I9A8oXx1DOSmEq1jcQaCXQJjbacqn3p2/+KCXwMtSY1LHKLtqOS28/kig +KO+L8X/zt4hZf3xoiMAIz21tppS1B5Z/mB0msCmev1uNsrTxkK3IBIHsxeM7 +l1PmS6t9SJsk0NdpkjVCxe/r+GWtjXMExtz7k/WU8itL32zrBQLFh0bY2ZTv +FJiLuP7FQBeb0lo25ex5hTMBQgz0mFE8a0rZt/zVgayVDCTc3nn3UPu/e1lx +S7k0A+VsP6fmUt7kwWE9lWfgqR4HQ3fKwjI68uMqDMSZuen3VH79Ygsl8Gsy +8FuBoHga5b+b+/9I6TIwhk6UWv2Xn5zkv9GYgbejjRxLqPxN7Tli47CZgdWH +JE7sonx6vekDb3MGvhS4LTRH5b/1159Xk3cwsJYp8tSY8vB2h/2DhxgY7x0Z +ljFAQluJ5ssZbwYaVM7XMinf519sJHycmt/h1uhy6vzF3r0jqxfMwJxim5oH +1PlUVZTuiU5goOOWogclfSSIBk9YXktmoGDSMzc5yjNtTdW30hmokzp95QJ1 +/puigq905zFwctS7zoWqD15jPY5r7jDwd/eiRR+o+mJrUdkENQzc3M9no0dZ +L/+Cvv0jBq65+1UrrouExbuNpcNeUONL+DaoUPWpqDars7WPgRtu6psaviNh +MN51N3sJE+d+DZ2pbaHiP6xB017OxEWnvB59byZheuvs9++iTMwVF5BZTXkp +f3KktywTn9BHxI+9oPIjuKHKVZOJNnadOPaUhDAP5srtu5gYd4Ju4llH/b/h +n77ljkyMveSy7/BDKh+V6kpfODFRGDDdq/a/erfHxNyTiSHLXc4dqKH6085Y +P1YwE10C9fRU7lL1a9PoqzU5THS/WdqhS/WX3Kv3rn4rYGLaffG8JSRVX2cj +vG4UMzHHcWl2N5eq91XyC7QKJgYJaq87WUKCu/p2LdknTBSpVvwUV0jCrVUV +8YIj1HrTxJR1qP5mOR5kOaSngtunKtyPU/1STkchStBYBVMWbal/GU71U3Zj +/ZrNKvhn07kZguqvqVOixmxrFbzhUDXRQvXjvvkSrQUXFdyss1Rn7iQJ7OV/ +r5SJVUE7/qjfD7yo/qiGfTa9Kvih00PhlwUJPkc/y574qILmnpX1381JADJ+ +T8qQCp4u0PAYpO4Dg9rdr7vHVdDtREJJE5Kgpc9u8PxLFdkV8XbH9EloMC8s +5miqoo1/v6GqCgmj7oL+VWdV0VdFmH5sETXfbLPaughVRO3byhJ8JIx3c5a8 +jFVFi4VB13vzPPhn++zV/hRVPFF48/rMDA+mjYYbRYpV0fpx7RHHcR4skmhe +5f1aFWmzLv9c7uWBTOPF+/LKaghsw/NiFdR9jpBaFF2vhtu6Uz9t38ODb25b +i42eqaFXdK1xhD0P4vOCbCdeqiFHMjHwzk4evFXoytzbroa082ZJEjY8cJW5 +sk7jqxrOX+o7dRd5ECyy2uONsDo+/fJH4Ap1n+TNKDSt3quOFeFxO9pmuSDe +wky8Na6Ow+nkCsdULsjFlO3Q09Og6p9lmEtOKWSsMRBd6aWJme1u8Y9zSuCF +7OYNPy9pYZZ+1jfLpGIwlKtPWtuxFm3eqF7S3nMDRPjzAw6e08ZnRi2SHxlF +oBCuaLyXqYMh9KrrVm8KQYjhdMfumQ6KPtSpiAgrAC2WTFnQAV1UFbKQc4d8 +YPeJN1jxrUOH20b2uV9zYfxnvINlxjoMskqaOLQ/B7aufZppqbkeeZZXrmvz +ZcHDn0a/p1vXY33zQLp+VCb4auj2vPHYgL4ZCcP52zKANXbo3V4hPRTPaLOK ++V8abCGktwnn62HDiX4hs9kUUOXEnarfuBF/Cpr1vZdKBnUPgzpGz0YMHfwR +/l0rCTweHo6o8tPHqYirRreWJ0Bd7rtDPyQN0KuDnt5ZHQu/ihem1941wFQ1 +Pq3BmihwZ3CFMrcZot+/66LHNCPgh3qKXsWEIfqzl+4oKQ6He4W/+ydjjNDt +4vvnlivOwj4zOhopGOMBy5r5AYtQWH0sulrrkTF+O8DO2ngtCCSX+pRv28PC +IKd9v1cnBEChaVjIxF4WyuQ8rNPnBIBuWKJpihML8/ud5Z38A8B24lZ710EW +2nB2X72zNwCiOiZn3X1YeEZ/nft9ZgDM5J81CQln4cPFY+q/H/tDj1HK2yIu +C5MujnTvnGfD4ZOF1yxvstCrTOEI6wcbpm7e9hi9xcLK+xes1w6xQZzWNa1z +h4W8+2KzjBY2WAvKy9U+YmGr2OM65yw2PHhXdOhtOwtvpO/n/7OJDVYi9zQD +u1gYHreQYb2ODV1bn09J97KwLKFrf54KG37dH4lx/kiN167m6iLKBs08bfLb +MAtVpmwIxoAfPOjZHBj/nYX6edcGr3f4gZXELlg7wcL3fPRHGi/9wDP65JuA +SSo+39vrbKr84NejqEypGRZOl5//MFTsB+fm0t3vz7Ew7OoRscgsPxBdX6Jx +YJ6F6aesd6kn+0H2sfuTCwss3KX5Jb89yg/+D6TBV08= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.12141098789525176`}}, + "PlotRange" -> {{0, 30}, {0., 0.05842273942621617}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13109,6 +14026,7 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13136,7 +14054,8 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.12141098789525176`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.05842273942621617}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13144,17 +14063,559 @@ ruscmGUjxz/jvbw+B3K96sfn5thosVe2aEaZA/8DYWA86w== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913429049348164`*^9}, + CellChangeTimes->{3.9913429049348164`*^9, 3.9943890945820427`*^9}, CellLabel-> - "Out[387]=",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] + "Out[140]=",ExpressionUUID->"3adb5e8b-80d0-41ae-8e26-6ea52c6cb310"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"b530b35f-2a32-0145-82a7-\ -25a7a01bdd8f"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VdsXAHC/PEVFiAwZ7z33GkKoZLqtFZIplSiVECEl5RIhdZU5JISU +WcK9JxkaJClUKlTK/FJEA0KvjOX5nffH+ZzP94+zz95rr73WVnY7buexiI+P +b556/ntP9T1vJC4UbhJZKPWt8dDf9C5bOnhz1znQKo1zNTm4ClDylZt0VzII +11X2rDjIhMAdpZ38XfnQwYm5MOGqB2JjUsmznRVgJKhY2eRqDh8e2B7/1VkP +nbPiAvauu8GcGH7/o7MNJnXv1qQ5e8Js58bLE50DoPpt6RVyTyA0mN4ofJP/ +E3Sdl9FMVKNB7kP1ZzeNedgtkBjXIXIJJHxcSpeY8mOY9Fkx0iwNknXMa2wd +BHFH3lcZ2bKr0J2h/eiHqDDajYaG/TLKhQuFZ18tkhHDaM3ugrIb+SCV+ik2 +JWslOjrMGYp1FEK0veWmtilJXNzY/PIPWQT+Bnkuz89JY+3RqINZAcVgNj4X +4vtJFqfNQve1DpZAsEWq+uNRWfyy5now/3AJ3MzT7Fk5JYs9SmaGG8ZLQNre +1aBacDUa21RlJ86WwOi9J9P8WqvRttZ6VFqkFFLOJQVcObUaxQcZThf0SmFA +kunbKCyHrxTb64ciSiHceOdBWX15rPVaWXpIigsWztn/bDSRR07ewpSCHBdE +OCPnHWzk8YnGlHG7EheuNUQWJbnKo0KaT+UGdS7cs7o/sjhWHke1ss2fGnNh +wpEe+LNbHokz5sOMg1xwPjkZ1xyqgHnADu0r4gIj3URuOFIBVxgXVEpxudR8 +L5JLkhSwPE54wKaMCyF/1F6bFCrg3/8EKHPvcuHyeWfJ6mYFJLIk1Dc2caH5 +0rOc6/KKeERp5GDCVy4Y3rxSdaZOEcU06jJ0mTww62ydH2tSRPWYDiGuGg9s ++f7a6tKmiAKHn0wravLA3c63G4YUsaI3yGphHQ/MQ5XPcgSUMPxCSEvKZh6c +UJwq2LxGCUuYBc4STjxo9Mr53hCohM3+U0EBiTyw/GMgfjpUCX9+NLh7+hIP +WpPe6a3nKKFrs0JQeCoPuquFOIWxShi7+WQwJ5MHY8sCxCOvKeFpV4kE+yIe +SN+y2Gher4QvRp2kHWp54DPzg9MkrIyf8ghG9VceGPp5rvosrozVotJnYkd4 +IDjcw+WXVsaNvrX1DmM8uN7b0LGJpozNL91FB37yoO/hZY3besrYWmH09Pm/ +PNgeadCV56KMJbmLvravJEFXPHxtaLky3tXfmPLJkAS+C5ONGXeUcehbopgu +i4RW/iP77tQoY75mZPRpIOHopF3kjyfKuMV9iZOAGQmFXUSvV48ySn0rqfxs +Q8KqnKYoe34aDldFn/t6gITZNaJ9mg40dCRSJkdOkzCVJRu+bh8N1bau+1R+ +hoRfKxiEgQsN1zxs+OPPIWHsp8ERM28aKj17dHv0PAkDNe5T+8JomCh0fdut +OBJeWN8ViblOwzbtgAucdBKe1T4uTyilYe1BgSChKyQ0rm22Tymj4VC7cHpi +JgkPV/ZnZlfT0MLucWBCFgkVvUtVbrfQ0OtHVOOBAhIyjzrDwCQNz//vpqzl +TRLS3x8e+DJHw3tRnsmXy0hI3e4f+X2BhpUJ/Vv7bpGQuC7m5YwQHbduifc9 +VEnCud/le1Yo0FFgprvG9B4VnwsCJ4zN6cgQmui3fUzC4fkVK02s6WgtQ+e4 +1JPgeVz2ztYddNzQQ/P0aSDBddfaP3b76KiUSCwPfUKC/eq9Md6+dAzlz247 ++pwEYy4vNy2Njgkpmh+uviahV4mbs+UqHW1s8gXc35AQklaS/SuHjnGTBrPM +NhLuhhddsyuho0uthNX1t9T+OuZmiDygY5/x4fzQDhLetGSn1z6iY1HPx81q +nSScMM1K83lCx0bvFZVvKd/Uykx90UpH347+5YrdJKgJpCZF9dNxle/jmxd7 +SWgKSb644TMdiRPWo/S/qfVMJCUODtPxci/w3aZc2JsQb/KLjqvnX5It70lQ +qoiO+XcxgT8irbS7P5BQpxIVTS4jUMhuXsf+IwnOWRFRTqIE/p4YF2mmfDUm +POK+DIGJi4UOVPRT+eQSygnUINDY22H/3k8k3H4XfJahQ2CYlK1FDWV7q1Nn +3m0gcIXPaUnZQRKSN5w8rQsE3vH/166Vsg7XP7TflEC/zMuN9CESXiuxQ5Is +CDSw/SYdSFl4+fFTYzsJ/F5l5yP2mQRe+LGgrN0ELrSW+eyjbDV9NNBmP4Ef +TR3tcinHDBwOKD1EIMNP8TXtCwkqjl7+e70JPBMa6+1C+WmLB1vQl0DJiPbh +DMp/Vbud8AwisCK+7MairyQUaB08LnmawFeP4gd1KZsUuvg2cgh8vm94mSvl +jzLOx/wjCWSq+SnEUT570cmHFkfg1pMv5MopKwjsP/omkUAWf+6SdsoPQvYe +4aQQ6CZ27cMk5f0Te7zXZhCo5uh9feU3EuY8dh/uu0bgS6HKvVqUr/TaeyXk +EbisjZjfQll/5y5P4yKCOi9HkvZR7ny602OklMAtlToSPpQDjXccyiwjsJPD +jA2hLFlh625ZReC1lqnxSMpVKtvcZu4RWJ+7wzKRsl2W9cEbtQTuDB64nEL5 +h7iV6+566vtt+zsuU+7yob0+8oxAp/+d60il/OjpHJxtJrBgcYlJEuVipbdl +KW8I9A8oXx1DOSmEq1jcQaCXQJjbacqn3p2/+KCXwMtSY1LHKLtqOS28/kig +KO+L8X/zt4hZf3xoiMAIz21tppS1B5Z/mB0msCmev1uNsrTxkK3IBIHsxeM7 +l1PmS6t9SJsk0NdpkjVCxe/r+GWtjXMExtz7k/WU8itL32zrBQLFh0bY2ZTv +FJiLuP7FQBeb0lo25ex5hTMBQgz0mFE8a0rZt/zVgayVDCTc3nn3UPu/e1lx +S7k0A+VsP6fmUt7kwWE9lWfgqR4HQ3fKwjI68uMqDMSZuen3VH79Ygsl8Gsy +8FuBoHga5b+b+/9I6TIwhk6UWv2Xn5zkv9GYgbejjRxLqPxN7Tli47CZgdWH +JE7sonx6vekDb3MGvhS4LTRH5b/1159Xk3cwsJYp8tSY8vB2h/2DhxgY7x0Z +ljFAQluJ5ssZbwYaVM7XMinf519sJHycmt/h1uhy6vzF3r0jqxfMwJxim5oH +1PlUVZTuiU5goOOWogclfSSIBk9YXktmoGDSMzc5yjNtTdW30hmokzp95QJ1 +/puigq905zFwctS7zoWqD15jPY5r7jDwd/eiRR+o+mJrUdkENQzc3M9no0dZ +L/+Cvv0jBq65+1UrrouExbuNpcNeUONL+DaoUPWpqDars7WPgRtu6psaviNh +MN51N3sJE+d+DZ2pbaHiP6xB017OxEWnvB59byZheuvs9++iTMwVF5BZTXkp +f3KktywTn9BHxI+9oPIjuKHKVZOJNnadOPaUhDAP5srtu5gYd4Ju4llH/b/h +n77ljkyMveSy7/BDKh+V6kpfODFRGDDdq/a/erfHxNyTiSHLXc4dqKH6085Y +P1YwE10C9fRU7lL1a9PoqzU5THS/WdqhS/WX3Kv3rn4rYGLaffG8JSRVX2cj +vG4UMzHHcWl2N5eq91XyC7QKJgYJaq87WUKCu/p2LdknTBSpVvwUV0jCrVUV +8YIj1HrTxJR1qP5mOR5kOaSngtunKtyPU/1STkchStBYBVMWbal/GU71U3Zj +/ZrNKvhn07kZguqvqVOixmxrFbzhUDXRQvXjvvkSrQUXFdyss1Rn7iQJ7OV/ +r5SJVUE7/qjfD7yo/qiGfTa9Kvih00PhlwUJPkc/y574qILmnpX1381JADJ+ +T8qQCp4u0PAYpO4Dg9rdr7vHVdDtREJJE5Kgpc9u8PxLFdkV8XbH9EloMC8s +5miqoo1/v6GqCgmj7oL+VWdV0VdFmH5sETXfbLPaughVRO3byhJ8JIx3c5a8 +jFVFi4VB13vzPPhn++zV/hRVPFF48/rMDA+mjYYbRYpV0fpx7RHHcR4skmhe +5f1aFWmzLv9c7uWBTOPF+/LKaghsw/NiFdR9jpBaFF2vhtu6Uz9t38ODb25b +i42eqaFXdK1xhD0P4vOCbCdeqiFHMjHwzk4evFXoytzbroa082ZJEjY8cJW5 +sk7jqxrOX+o7dRd5ECyy2uONsDo+/fJH4Ap1n+TNKDSt3quOFeFxO9pmuSDe +wky8Na6Ow+nkCsdULsjFlO3Q09Og6p9lmEtOKWSsMRBd6aWJme1u8Y9zSuCF +7OYNPy9pYZZ+1jfLpGIwlKtPWtuxFm3eqF7S3nMDRPjzAw6e08ZnRi2SHxlF +oBCuaLyXqYMh9KrrVm8KQYjhdMfumQ6KPtSpiAgrAC2WTFnQAV1UFbKQc4d8 +YPeJN1jxrUOH20b2uV9zYfxnvINlxjoMskqaOLQ/B7aufZppqbkeeZZXrmvz +ZcHDn0a/p1vXY33zQLp+VCb4auj2vPHYgL4ZCcP52zKANXbo3V4hPRTPaLOK ++V8abCGktwnn62HDiX4hs9kUUOXEnarfuBF/Cpr1vZdKBnUPgzpGz0YMHfwR +/l0rCTweHo6o8tPHqYirRreWJ0Bd7rtDPyQN0KuDnt5ZHQu/ihem1941wFQ1 +Pq3BmihwZ3CFMrcZot+/66LHNCPgh3qKXsWEIfqzl+4oKQ6He4W/+ydjjNDt +4vvnlivOwj4zOhopGOMBy5r5AYtQWH0sulrrkTF+O8DO2ngtCCSX+pRv28PC +IKd9v1cnBEChaVjIxF4WyuQ8rNPnBIBuWKJpihML8/ud5Z38A8B24lZ710EW +2nB2X72zNwCiOiZn3X1YeEZ/nft9ZgDM5J81CQln4cPFY+q/H/tDj1HK2yIu +C5MujnTvnGfD4ZOF1yxvstCrTOEI6wcbpm7e9hi9xcLK+xes1w6xQZzWNa1z +h4W8+2KzjBY2WAvKy9U+YmGr2OM65yw2PHhXdOhtOwtvpO/n/7OJDVYi9zQD +u1gYHreQYb2ODV1bn09J97KwLKFrf54KG37dH4lx/kiN167m6iLKBs08bfLb +MAtVpmwIxoAfPOjZHBj/nYX6edcGr3f4gZXELlg7wcL3fPRHGi/9wDP65JuA +SSo+39vrbKr84NejqEypGRZOl5//MFTsB+fm0t3vz7Ew7OoRscgsPxBdX6Jx +YJ6F6aesd6kn+0H2sfuTCwss3KX5Jb89yg/+D6TBV08= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VdsXAHC/PEVFiAwZ7z33GkKoZLqtFZIplSiVECEl5RIhdZU5JISU +WcK9JxkaJClUKlTK/FJEA0KvjOX5nffH+ZzP94+zz95rr73WVnY7buexiI+P +b556/ntP9T1vJC4UbhJZKPWt8dDf9C5bOnhz1znQKo1zNTm4ClDylZt0VzII +11X2rDjIhMAdpZ38XfnQwYm5MOGqB2JjUsmznRVgJKhY2eRqDh8e2B7/1VkP +nbPiAvauu8GcGH7/o7MNJnXv1qQ5e8Js58bLE50DoPpt6RVyTyA0mN4ofJP/ +E3Sdl9FMVKNB7kP1ZzeNedgtkBjXIXIJJHxcSpeY8mOY9Fkx0iwNknXMa2wd +BHFH3lcZ2bKr0J2h/eiHqDDajYaG/TLKhQuFZ18tkhHDaM3ugrIb+SCV+ik2 +JWslOjrMGYp1FEK0veWmtilJXNzY/PIPWQT+Bnkuz89JY+3RqINZAcVgNj4X +4vtJFqfNQve1DpZAsEWq+uNRWfyy5now/3AJ3MzT7Fk5JYs9SmaGG8ZLQNre +1aBacDUa21RlJ86WwOi9J9P8WqvRttZ6VFqkFFLOJQVcObUaxQcZThf0SmFA +kunbKCyHrxTb64ciSiHceOdBWX15rPVaWXpIigsWztn/bDSRR07ewpSCHBdE +OCPnHWzk8YnGlHG7EheuNUQWJbnKo0KaT+UGdS7cs7o/sjhWHke1ss2fGnNh +wpEe+LNbHokz5sOMg1xwPjkZ1xyqgHnADu0r4gIj3URuOFIBVxgXVEpxudR8 +L5JLkhSwPE54wKaMCyF/1F6bFCrg3/8EKHPvcuHyeWfJ6mYFJLIk1Dc2caH5 +0rOc6/KKeERp5GDCVy4Y3rxSdaZOEcU06jJ0mTww62ydH2tSRPWYDiGuGg9s ++f7a6tKmiAKHn0wravLA3c63G4YUsaI3yGphHQ/MQ5XPcgSUMPxCSEvKZh6c +UJwq2LxGCUuYBc4STjxo9Mr53hCohM3+U0EBiTyw/GMgfjpUCX9+NLh7+hIP +WpPe6a3nKKFrs0JQeCoPuquFOIWxShi7+WQwJ5MHY8sCxCOvKeFpV4kE+yIe +SN+y2Gher4QvRp2kHWp54DPzg9MkrIyf8ghG9VceGPp5rvosrozVotJnYkd4 +IDjcw+WXVsaNvrX1DmM8uN7b0LGJpozNL91FB37yoO/hZY3besrYWmH09Pm/ +PNgeadCV56KMJbmLvravJEFXPHxtaLky3tXfmPLJkAS+C5ONGXeUcehbopgu +i4RW/iP77tQoY75mZPRpIOHopF3kjyfKuMV9iZOAGQmFXUSvV48ySn0rqfxs +Q8KqnKYoe34aDldFn/t6gITZNaJ9mg40dCRSJkdOkzCVJRu+bh8N1bau+1R+ +hoRfKxiEgQsN1zxs+OPPIWHsp8ERM28aKj17dHv0PAkDNe5T+8JomCh0fdut +OBJeWN8ViblOwzbtgAucdBKe1T4uTyilYe1BgSChKyQ0rm22Tymj4VC7cHpi +JgkPV/ZnZlfT0MLucWBCFgkVvUtVbrfQ0OtHVOOBAhIyjzrDwCQNz//vpqzl +TRLS3x8e+DJHw3tRnsmXy0hI3e4f+X2BhpUJ/Vv7bpGQuC7m5YwQHbduifc9 +VEnCud/le1Yo0FFgprvG9B4VnwsCJ4zN6cgQmui3fUzC4fkVK02s6WgtQ+e4 +1JPgeVz2ztYddNzQQ/P0aSDBddfaP3b76KiUSCwPfUKC/eq9Md6+dAzlz247 ++pwEYy4vNy2Njgkpmh+uviahV4mbs+UqHW1s8gXc35AQklaS/SuHjnGTBrPM +NhLuhhddsyuho0uthNX1t9T+OuZmiDygY5/x4fzQDhLetGSn1z6iY1HPx81q +nSScMM1K83lCx0bvFZVvKd/Uykx90UpH347+5YrdJKgJpCZF9dNxle/jmxd7 +SWgKSb644TMdiRPWo/S/qfVMJCUODtPxci/w3aZc2JsQb/KLjqvnX5It70lQ +qoiO+XcxgT8irbS7P5BQpxIVTS4jUMhuXsf+IwnOWRFRTqIE/p4YF2mmfDUm +POK+DIGJi4UOVPRT+eQSygnUINDY22H/3k8k3H4XfJahQ2CYlK1FDWV7q1Nn +3m0gcIXPaUnZQRKSN5w8rQsE3vH/166Vsg7XP7TflEC/zMuN9CESXiuxQ5Is +CDSw/SYdSFl4+fFTYzsJ/F5l5yP2mQRe+LGgrN0ELrSW+eyjbDV9NNBmP4Ef +TR3tcinHDBwOKD1EIMNP8TXtCwkqjl7+e70JPBMa6+1C+WmLB1vQl0DJiPbh +DMp/Vbud8AwisCK+7MairyQUaB08LnmawFeP4gd1KZsUuvg2cgh8vm94mSvl +jzLOx/wjCWSq+SnEUT570cmHFkfg1pMv5MopKwjsP/omkUAWf+6SdsoPQvYe +4aQQ6CZ27cMk5f0Te7zXZhCo5uh9feU3EuY8dh/uu0bgS6HKvVqUr/TaeyXk +EbisjZjfQll/5y5P4yKCOi9HkvZR7ny602OklMAtlToSPpQDjXccyiwjsJPD +jA2hLFlh625ZReC1lqnxSMpVKtvcZu4RWJ+7wzKRsl2W9cEbtQTuDB64nEL5 +h7iV6+566vtt+zsuU+7yob0+8oxAp/+d60il/OjpHJxtJrBgcYlJEuVipbdl +KW8I9A8oXx1DOSmEq1jcQaCXQJjbacqn3p2/+KCXwMtSY1LHKLtqOS28/kig +KO+L8X/zt4hZf3xoiMAIz21tppS1B5Z/mB0msCmev1uNsrTxkK3IBIHsxeM7 +l1PmS6t9SJsk0NdpkjVCxe/r+GWtjXMExtz7k/WU8itL32zrBQLFh0bY2ZTv +FJiLuP7FQBeb0lo25ex5hTMBQgz0mFE8a0rZt/zVgayVDCTc3nn3UPu/e1lx +S7k0A+VsP6fmUt7kwWE9lWfgqR4HQ3fKwjI68uMqDMSZuen3VH79Ygsl8Gsy +8FuBoHga5b+b+/9I6TIwhk6UWv2Xn5zkv9GYgbejjRxLqPxN7Tli47CZgdWH +JE7sonx6vekDb3MGvhS4LTRH5b/1159Xk3cwsJYp8tSY8vB2h/2DhxgY7x0Z +ljFAQluJ5ssZbwYaVM7XMinf519sJHycmt/h1uhy6vzF3r0jqxfMwJxim5oH +1PlUVZTuiU5goOOWogclfSSIBk9YXktmoGDSMzc5yjNtTdW30hmokzp95QJ1 +/puigq905zFwctS7zoWqD15jPY5r7jDwd/eiRR+o+mJrUdkENQzc3M9no0dZ +L/+Cvv0jBq65+1UrrouExbuNpcNeUONL+DaoUPWpqDars7WPgRtu6psaviNh +MN51N3sJE+d+DZ2pbaHiP6xB017OxEWnvB59byZheuvs9++iTMwVF5BZTXkp +f3KktywTn9BHxI+9oPIjuKHKVZOJNnadOPaUhDAP5srtu5gYd4Ju4llH/b/h +n77ljkyMveSy7/BDKh+V6kpfODFRGDDdq/a/erfHxNyTiSHLXc4dqKH6085Y +P1YwE10C9fRU7lL1a9PoqzU5THS/WdqhS/WX3Kv3rn4rYGLaffG8JSRVX2cj +vG4UMzHHcWl2N5eq91XyC7QKJgYJaq87WUKCu/p2LdknTBSpVvwUV0jCrVUV +8YIj1HrTxJR1qP5mOR5kOaSngtunKtyPU/1STkchStBYBVMWbal/GU71U3Zj +/ZrNKvhn07kZguqvqVOixmxrFbzhUDXRQvXjvvkSrQUXFdyss1Rn7iQJ7OV/ +r5SJVUE7/qjfD7yo/qiGfTa9Kvih00PhlwUJPkc/y574qILmnpX1381JADJ+ +T8qQCp4u0PAYpO4Dg9rdr7vHVdDtREJJE5Kgpc9u8PxLFdkV8XbH9EloMC8s +5miqoo1/v6GqCgmj7oL+VWdV0VdFmH5sETXfbLPaughVRO3byhJ8JIx3c5a8 +jFVFi4VB13vzPPhn++zV/hRVPFF48/rMDA+mjYYbRYpV0fpx7RHHcR4skmhe +5f1aFWmzLv9c7uWBTOPF+/LKaghsw/NiFdR9jpBaFF2vhtu6Uz9t38ODb25b +i42eqaFXdK1xhD0P4vOCbCdeqiFHMjHwzk4evFXoytzbroa082ZJEjY8cJW5 +sk7jqxrOX+o7dRd5ECyy2uONsDo+/fJH4Ap1n+TNKDSt3quOFeFxO9pmuSDe +wky8Na6Ow+nkCsdULsjFlO3Q09Og6p9lmEtOKWSsMRBd6aWJme1u8Y9zSuCF +7OYNPy9pYZZ+1jfLpGIwlKtPWtuxFm3eqF7S3nMDRPjzAw6e08ZnRi2SHxlF +oBCuaLyXqYMh9KrrVm8KQYjhdMfumQ6KPtSpiAgrAC2WTFnQAV1UFbKQc4d8 +YPeJN1jxrUOH20b2uV9zYfxnvINlxjoMskqaOLQ/B7aufZppqbkeeZZXrmvz +ZcHDn0a/p1vXY33zQLp+VCb4auj2vPHYgL4ZCcP52zKANXbo3V4hPRTPaLOK ++V8abCGktwnn62HDiX4hs9kUUOXEnarfuBF/Cpr1vZdKBnUPgzpGz0YMHfwR +/l0rCTweHo6o8tPHqYirRreWJ0Bd7rtDPyQN0KuDnt5ZHQu/ihem1941wFQ1 +Pq3BmihwZ3CFMrcZot+/66LHNCPgh3qKXsWEIfqzl+4oKQ6He4W/+ydjjNDt +4vvnlivOwj4zOhopGOMBy5r5AYtQWH0sulrrkTF+O8DO2ngtCCSX+pRv28PC +IKd9v1cnBEChaVjIxF4WyuQ8rNPnBIBuWKJpihML8/ud5Z38A8B24lZ710EW +2nB2X72zNwCiOiZn3X1YeEZ/nft9ZgDM5J81CQln4cPFY+q/H/tDj1HK2yIu +C5MujnTvnGfD4ZOF1yxvstCrTOEI6wcbpm7e9hi9xcLK+xes1w6xQZzWNa1z +h4W8+2KzjBY2WAvKy9U+YmGr2OM65yw2PHhXdOhtOwtvpO/n/7OJDVYi9zQD +u1gYHreQYb2ODV1bn09J97KwLKFrf54KG37dH4lx/kiN167m6iLKBs08bfLb +MAtVpmwIxoAfPOjZHBj/nYX6edcGr3f4gZXELlg7wcL3fPRHGi/9wDP65JuA +SSo+39vrbKr84NejqEypGRZOl5//MFTsB+fm0t3vz7Ew7OoRscgsPxBdX6Jx +YJ6F6aesd6kn+0H2sfuTCwss3KX5Jb89yg/+D6TBV08= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05842273942621617}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05842273942621617}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV1nk8VdsXAHC/PEVFiAwZ7z33GkKoZLqtFZIplSiVECEl5RIhdZU5JISU +WcK9JxkaJClUKlTK/FJEA0KvjOX5nffH+ZzP94+zz95rr73WVnY7buexiI+P +b556/ntP9T1vJC4UbhJZKPWt8dDf9C5bOnhz1znQKo1zNTm4ClDylZt0VzII +11X2rDjIhMAdpZ38XfnQwYm5MOGqB2JjUsmznRVgJKhY2eRqDh8e2B7/1VkP +nbPiAvauu8GcGH7/o7MNJnXv1qQ5e8Js58bLE50DoPpt6RVyTyA0mN4ofJP/ +E3Sdl9FMVKNB7kP1ZzeNedgtkBjXIXIJJHxcSpeY8mOY9Fkx0iwNknXMa2wd +BHFH3lcZ2bKr0J2h/eiHqDDajYaG/TLKhQuFZ18tkhHDaM3ugrIb+SCV+ik2 +JWslOjrMGYp1FEK0veWmtilJXNzY/PIPWQT+Bnkuz89JY+3RqINZAcVgNj4X +4vtJFqfNQve1DpZAsEWq+uNRWfyy5now/3AJ3MzT7Fk5JYs9SmaGG8ZLQNre +1aBacDUa21RlJ86WwOi9J9P8WqvRttZ6VFqkFFLOJQVcObUaxQcZThf0SmFA +kunbKCyHrxTb64ciSiHceOdBWX15rPVaWXpIigsWztn/bDSRR07ewpSCHBdE +OCPnHWzk8YnGlHG7EheuNUQWJbnKo0KaT+UGdS7cs7o/sjhWHke1ss2fGnNh +wpEe+LNbHokz5sOMg1xwPjkZ1xyqgHnADu0r4gIj3URuOFIBVxgXVEpxudR8 +L5JLkhSwPE54wKaMCyF/1F6bFCrg3/8EKHPvcuHyeWfJ6mYFJLIk1Dc2caH5 +0rOc6/KKeERp5GDCVy4Y3rxSdaZOEcU06jJ0mTww62ydH2tSRPWYDiGuGg9s ++f7a6tKmiAKHn0wravLA3c63G4YUsaI3yGphHQ/MQ5XPcgSUMPxCSEvKZh6c +UJwq2LxGCUuYBc4STjxo9Mr53hCohM3+U0EBiTyw/GMgfjpUCX9+NLh7+hIP +WpPe6a3nKKFrs0JQeCoPuquFOIWxShi7+WQwJ5MHY8sCxCOvKeFpV4kE+yIe +SN+y2Gher4QvRp2kHWp54DPzg9MkrIyf8ghG9VceGPp5rvosrozVotJnYkd4 +IDjcw+WXVsaNvrX1DmM8uN7b0LGJpozNL91FB37yoO/hZY3besrYWmH09Pm/ +PNgeadCV56KMJbmLvravJEFXPHxtaLky3tXfmPLJkAS+C5ONGXeUcehbopgu +i4RW/iP77tQoY75mZPRpIOHopF3kjyfKuMV9iZOAGQmFXUSvV48ySn0rqfxs +Q8KqnKYoe34aDldFn/t6gITZNaJ9mg40dCRSJkdOkzCVJRu+bh8N1bau+1R+ +hoRfKxiEgQsN1zxs+OPPIWHsp8ERM28aKj17dHv0PAkDNe5T+8JomCh0fdut +OBJeWN8ViblOwzbtgAucdBKe1T4uTyilYe1BgSChKyQ0rm22Tymj4VC7cHpi +JgkPV/ZnZlfT0MLucWBCFgkVvUtVbrfQ0OtHVOOBAhIyjzrDwCQNz//vpqzl +TRLS3x8e+DJHw3tRnsmXy0hI3e4f+X2BhpUJ/Vv7bpGQuC7m5YwQHbduifc9 +VEnCud/le1Yo0FFgprvG9B4VnwsCJ4zN6cgQmui3fUzC4fkVK02s6WgtQ+e4 +1JPgeVz2ztYddNzQQ/P0aSDBddfaP3b76KiUSCwPfUKC/eq9Md6+dAzlz247 ++pwEYy4vNy2Njgkpmh+uviahV4mbs+UqHW1s8gXc35AQklaS/SuHjnGTBrPM +NhLuhhddsyuho0uthNX1t9T+OuZmiDygY5/x4fzQDhLetGSn1z6iY1HPx81q +nSScMM1K83lCx0bvFZVvKd/Uykx90UpH347+5YrdJKgJpCZF9dNxle/jmxd7 +SWgKSb644TMdiRPWo/S/qfVMJCUODtPxci/w3aZc2JsQb/KLjqvnX5It70lQ +qoiO+XcxgT8irbS7P5BQpxIVTS4jUMhuXsf+IwnOWRFRTqIE/p4YF2mmfDUm +POK+DIGJi4UOVPRT+eQSygnUINDY22H/3k8k3H4XfJahQ2CYlK1FDWV7q1Nn +3m0gcIXPaUnZQRKSN5w8rQsE3vH/166Vsg7XP7TflEC/zMuN9CESXiuxQ5Is +CDSw/SYdSFl4+fFTYzsJ/F5l5yP2mQRe+LGgrN0ELrSW+eyjbDV9NNBmP4Ef +TR3tcinHDBwOKD1EIMNP8TXtCwkqjl7+e70JPBMa6+1C+WmLB1vQl0DJiPbh +DMp/Vbud8AwisCK+7MairyQUaB08LnmawFeP4gd1KZsUuvg2cgh8vm94mSvl +jzLOx/wjCWSq+SnEUT570cmHFkfg1pMv5MopKwjsP/omkUAWf+6SdsoPQvYe +4aQQ6CZ27cMk5f0Te7zXZhCo5uh9feU3EuY8dh/uu0bgS6HKvVqUr/TaeyXk +EbisjZjfQll/5y5P4yKCOi9HkvZR7ny602OklMAtlToSPpQDjXccyiwjsJPD +jA2hLFlh625ZReC1lqnxSMpVKtvcZu4RWJ+7wzKRsl2W9cEbtQTuDB64nEL5 +h7iV6+566vtt+zsuU+7yob0+8oxAp/+d60il/OjpHJxtJrBgcYlJEuVipbdl +KW8I9A8oXx1DOSmEq1jcQaCXQJjbacqn3p2/+KCXwMtSY1LHKLtqOS28/kig +KO+L8X/zt4hZf3xoiMAIz21tppS1B5Z/mB0msCmev1uNsrTxkK3IBIHsxeM7 +l1PmS6t9SJsk0NdpkjVCxe/r+GWtjXMExtz7k/WU8itL32zrBQLFh0bY2ZTv +FJiLuP7FQBeb0lo25ex5hTMBQgz0mFE8a0rZt/zVgayVDCTc3nn3UPu/e1lx +S7k0A+VsP6fmUt7kwWE9lWfgqR4HQ3fKwjI68uMqDMSZuen3VH79Ygsl8Gsy +8FuBoHga5b+b+/9I6TIwhk6UWv2Xn5zkv9GYgbejjRxLqPxN7Tli47CZgdWH +JE7sonx6vekDb3MGvhS4LTRH5b/1159Xk3cwsJYp8tSY8vB2h/2DhxgY7x0Z +ljFAQluJ5ssZbwYaVM7XMinf519sJHycmt/h1uhy6vzF3r0jqxfMwJxim5oH +1PlUVZTuiU5goOOWogclfSSIBk9YXktmoGDSMzc5yjNtTdW30hmokzp95QJ1 +/puigq905zFwctS7zoWqD15jPY5r7jDwd/eiRR+o+mJrUdkENQzc3M9no0dZ +L/+Cvv0jBq65+1UrrouExbuNpcNeUONL+DaoUPWpqDars7WPgRtu6psaviNh +MN51N3sJE+d+DZ2pbaHiP6xB017OxEWnvB59byZheuvs9++iTMwVF5BZTXkp +f3KktywTn9BHxI+9oPIjuKHKVZOJNnadOPaUhDAP5srtu5gYd4Ju4llH/b/h +n77ljkyMveSy7/BDKh+V6kpfODFRGDDdq/a/erfHxNyTiSHLXc4dqKH6085Y +P1YwE10C9fRU7lL1a9PoqzU5THS/WdqhS/WX3Kv3rn4rYGLaffG8JSRVX2cj +vG4UMzHHcWl2N5eq91XyC7QKJgYJaq87WUKCu/p2LdknTBSpVvwUV0jCrVUV +8YIj1HrTxJR1qP5mOR5kOaSngtunKtyPU/1STkchStBYBVMWbal/GU71U3Zj +/ZrNKvhn07kZguqvqVOixmxrFbzhUDXRQvXjvvkSrQUXFdyss1Rn7iQJ7OV/ +r5SJVUE7/qjfD7yo/qiGfTa9Kvih00PhlwUJPkc/y574qILmnpX1381JADJ+ +T8qQCp4u0PAYpO4Dg9rdr7vHVdDtREJJE5Kgpc9u8PxLFdkV8XbH9EloMC8s +5miqoo1/v6GqCgmj7oL+VWdV0VdFmH5sETXfbLPaughVRO3byhJ8JIx3c5a8 +jFVFi4VB13vzPPhn++zV/hRVPFF48/rMDA+mjYYbRYpV0fpx7RHHcR4skmhe +5f1aFWmzLv9c7uWBTOPF+/LKaghsw/NiFdR9jpBaFF2vhtu6Uz9t38ODb25b +i42eqaFXdK1xhD0P4vOCbCdeqiFHMjHwzk4evFXoytzbroa082ZJEjY8cJW5 +sk7jqxrOX+o7dRd5ECyy2uONsDo+/fJH4Ap1n+TNKDSt3quOFeFxO9pmuSDe +wky8Na6Ow+nkCsdULsjFlO3Q09Og6p9lmEtOKWSsMRBd6aWJme1u8Y9zSuCF +7OYNPy9pYZZ+1jfLpGIwlKtPWtuxFm3eqF7S3nMDRPjzAw6e08ZnRi2SHxlF +oBCuaLyXqYMh9KrrVm8KQYjhdMfumQ6KPtSpiAgrAC2WTFnQAV1UFbKQc4d8 +YPeJN1jxrUOH20b2uV9zYfxnvINlxjoMskqaOLQ/B7aufZppqbkeeZZXrmvz +ZcHDn0a/p1vXY33zQLp+VCb4auj2vPHYgL4ZCcP52zKANXbo3V4hPRTPaLOK ++V8abCGktwnn62HDiX4hs9kUUOXEnarfuBF/Cpr1vZdKBnUPgzpGz0YMHfwR +/l0rCTweHo6o8tPHqYirRreWJ0Bd7rtDPyQN0KuDnt5ZHQu/ihem1941wFQ1 +Pq3BmihwZ3CFMrcZot+/66LHNCPgh3qKXsWEIfqzl+4oKQ6He4W/+ydjjNDt +4vvnlivOwj4zOhopGOMBy5r5AYtQWH0sulrrkTF+O8DO2ngtCCSX+pRv28PC +IKd9v1cnBEChaVjIxF4WyuQ8rNPnBIBuWKJpihML8/ud5Z38A8B24lZ710EW +2nB2X72zNwCiOiZn3X1YeEZ/nft9ZgDM5J81CQln4cPFY+q/H/tDj1HK2yIu +C5MujnTvnGfD4ZOF1yxvstCrTOEI6wcbpm7e9hi9xcLK+xes1w6xQZzWNa1z +h4W8+2KzjBY2WAvKy9U+YmGr2OM65yw2PHhXdOhtOwtvpO/n/7OJDVYi9zQD +u1gYHreQYb2ODV1bn09J97KwLKFrf54KG37dH4lx/kiN167m6iLKBs08bfLb +MAtVpmwIxoAfPOjZHBj/nYX6edcGr3f4gZXELlg7wcL3fPRHGi/9wDP65JuA +SSo+39vrbKr84NejqEypGRZOl5//MFTsB+fm0t3vz7Ew7OoRscgsPxBdX6Jx +YJ6F6aesd6kn+0H2sfuTCwss3KX5Jb89yg/+D6TBV08= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.05842273942621617}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.05842273942621617}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994389094635891*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"00aa4ec8-ae90-4aac-a7e2-0defcfea5400"] +}, Open ]], Cell[CellGroupData[{ @@ -13206,66 +14667,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[391]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], + "In[142]:=",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.6103394901964062`*^-176\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 417, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437636167164`*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.458833069611031`*^-167\\\", \ +RowBox[{\\\"\ +161198658118785115956678299518758546564525592888043685145303185612679\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"8\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3109099682969421627018644700669916936247705600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 73, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994389094673408*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], +In[142]:=",ExpressionUUID->"fc6c2da8-f096-49c1-b5e8-7d02945fa296"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.41644839595733`*^-180\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 391, 418, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763625717*^9}, + "\"\\!\\(\\*FractionBox[\\\"8.08736432986246`*^-170\\\", \ +RowBox[{\\\"\ +505518991860510123640143147290826802026352259296904996615670790081361\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"11\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0136605792106222330469781300859512072804761600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 74, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994389094678472*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], +In[142]:=",ExpressionUUID->"895b08fa-2dad-43f3-8e66-690cffa8de23"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.3968570267101824`*^-183\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 391, 419, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763634718*^9}, + "\"\\!\\(\\*FractionBox[\\\"7.732208599659627`*^-173\\\", \ +RowBox[{\\\"\ +164243120455479739170682508554789627978361849045564433400431439697434\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3832218553116351696319446492554724542670438400000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 75, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.994389094682962*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], +In[142]:=",ExpressionUUID->"ed9a042d-048f-4f3d-b2fa-4cf9385abd70"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 391, 420, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343763643717*^9}, +during this calculation.\"", 2, 142, 76, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437636167164`*^9, 3.99438909468748*^9}, CellLabel-> "During evaluation of \ -In[391]:=",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], +In[142]:=",ExpressionUUID->"a37aa6e4-c4d1-4844-babd-0f07fae6ff93"], -Cell[BoxData["12.55365498945131`"], "Output", - CellChangeTimes->{3.991343769962549*^9}, +Cell[BoxData["13.287503826123114`"], "Output", + CellChangeTimes->{3.991343769962549*^9, 3.994389130911693*^9}, CellLabel-> - "Out[391]=",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] + "Out[142]=",ExpressionUUID->"3e2af6f7-d2eb-44be-899f-048e110bde02"] }, Open ]], Cell[CellGroupData[{ @@ -13332,68 +14803,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499777649403`*^9, - 3.9918499820026073`*^9}},ExpressionUUID->"97b28b29-5d04-5c42-a0e8-\ -93b70f20e7f6"], + CellChangeTimes->{{3.9918499777649403`*^9, 3.9918499820026073`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 392, 421, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343769999645*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.862300827865261`*^-218\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 143, 77, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943891309452877`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], +In[143]:=",ExpressionUUID->"80fb75a2-486d-4436-b520-5b74d4c4c34b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 392, 422, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700095463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.302295572310418`*^-223\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 143, 78, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943891309513903`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], +In[143]:=",ExpressionUUID->"b4fc887f-2b9f-4356-9fed-2cdf219b1c56"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 392, - 423, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343770018547*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.4880066406831464`*^-229\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 143, 79, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943891309568167`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], +In[143]:=",ExpressionUUID->"d016d551-277d-4507-9cc8-62ed0a0f6e10"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 392, 424, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437700265465`*^9}, +during this calculation.\"", 2, 143, 80, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991343769999645*^9, 3.9943891309619217`*^9}, CellLabel-> "During evaluation of \ -In[392]:=",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], +In[143]:=",ExpressionUUID->"a2b580ae-4fe4-4c1c-aa59-3467c18273dc"], -Cell[BoxData["2.1234790234082306`"], "Output", - CellChangeTimes->{3.9913437771602173`*^9}, +Cell[BoxData["0.28115279834123164`"], "Output", + CellChangeTimes->{3.9913437771602173`*^9, 3.9943891360063257`*^9}, CellLabel-> - "Out[392]=",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] + "Out[143]=",ExpressionUUID->"172751f7-35b1-47ea-9e06-04e6c3a4ae9e"] }, Open ]], Cell[CellGroupData[{ @@ -13414,8 +14889,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13460,68 +14934,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918499862910366`*^9, - 3.991849989300226*^9}},ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-\ -cdce838d9efe"], + CellChangeTimes->{{3.9918499862910366`*^9, 3.991849989300226*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 393, 425, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437771982174`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.862300827865261`*^-218\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 144, 81, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.9943891360397*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], +In[144]:=",ExpressionUUID->"9531ed09-d318-4cb7-a5a0-6c796c2e12e9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 393, 426, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772082157`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.302295572310418`*^-223\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 144, 82, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994389136045123*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], +In[144]:=",ExpressionUUID->"9fcb04f1-dac2-4686-89fc-c09b465edbdd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 393, - 427, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134377721661*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.4880066406831464`*^-229\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 144, 83, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994389136048996*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], +In[144]:=",ExpressionUUID->"fb889533-1334-41e6-b23a-b5ef1269c477"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 393, 428, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437772256165`*^9}, +during this calculation.\"", 2, 144, 84, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437771982174`*^9, 3.994389136052519*^9}, CellLabel-> "During evaluation of \ -In[393]:=",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], +In[144]:=",ExpressionUUID->"b499ec20-d312-4bf8-985a-109acde7d1b4"], -Cell[BoxData["10.711562421053975`"], "Output", - CellChangeTimes->{3.991343783589731*^9}, +Cell[BoxData["46.25994108862184`"], "Output", + CellChangeTimes->{3.991343783589731*^9, 3.994389140811387*^9}, CellLabel-> - "Out[393]=",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] + "Out[144]=",ExpressionUUID->"d9ec8277-0c72-4e6d-a42c-9a203a18b9d1"] }, Open ]], Cell[CellGroupData[{ @@ -13542,8 +15020,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13588,68 +15065,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849992549782*^9, - 3.9918499952553864`*^9}},ExpressionUUID->"0794d062-69d5-0a45-936e-\ -533b19d33de6"], + CellChangeTimes->{{3.991849992549782*^9, 3.9918499952553864`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4130648498526387`*^-196\\\", \ -\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ -445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ -a normalized machine number; precision may be lost.\"", 2, 394, 429, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836316223`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.862300827865261`*^-218\\\", \ +\\\"41607359339843574325548110273418478026650094900416491377011603858731642650\ +6240000000000000000\\\"]\\) is too small to represent as a normalized machine \ +number; precision may be lost.\"", 2, 145, 85, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.9943891408472958`*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], +In[145]:=",ExpressionUUID->"2f014ec2-6944-4aef-a4a8-f848953ec83b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0852129587892268`*^-200\\\", \ -\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ -098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 394, 430, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836416245`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.302295572310418`*^-223\\\", \ +\\\"66571774943749718920876976437469564842640151840666386203218566173970628240\ +9984000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 145, 86, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.9943891408520737`*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], +In[145]:=",ExpressionUUID->"7660ebe5-98a7-4d0e-8509-87e013795451"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.8804621475298835`*^-205\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 394, - 431, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343783649622*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.4880066406831464`*^-229\\\", \ +\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ +31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ +machine number; precision may be lost.\"", 2, 145, 87, 25994214421809768276, + "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994389140857396*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], +In[145]:=",ExpressionUUID->"2d80de3d-0dc0-4848-94ea-4e7b1509c847"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 394, 432, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437836576347`*^9}, +during this calculation.\"", 2, 145, 88, 25994214421809768276, "kernel 4"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437836316223`*^9, 3.994389140862055*^9}, CellLabel-> "During evaluation of \ -In[394]:=",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], +In[145]:=",ExpressionUUID->"a229fbf5-c79f-48bf-8b60-4e1a8b553513"], -Cell[BoxData["20.656774205279326`"], "Output", - CellChangeTimes->{3.9913437870822353`*^9}, +Cell[BoxData["6.708424121727014`"], "Output", + CellChangeTimes->{3.9913437870822353`*^9, 3.994389143810055*^9}, CellLabel-> - "Out[394]=",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] + "Out[145]=",ExpressionUUID->"b0147667-f27d-491a-9af1-4013d97851c1"] }, Open ]], Cell[CellGroupData[{ @@ -13658,21 +15139,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918500011025047`*^9, - 3.9918500053803673`*^9}},ExpressionUUID->"95c56266-e4d3-624e-89c1-\ -cedeeeb0247a"], - -Cell[BoxData["0.14275466609450368`"], "Output", - CellChangeTimes->{3.991343787117275*^9}, + CellChangeTimes->{{3.9918500011025047`*^9, 3.9918500053803673`*^9}}, CellLabel-> - "Out[395]=",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] + "In[146]:=",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], + +Cell[BoxData["0.015959879823172266`"], "Output", + CellChangeTimes->{3.991343787117275*^9, 3.9943891438392267`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"8d7e90b8-da04-4169-90c1-c1181ab26530"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"ee676f20-cb04-4514-a345-3267f7ec3f62"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"ee676f20-cb04-4514-a345-3267f7ec3f62"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +Evaluator->"kernel 4", +WindowSize->{714, 126}, +WindowMargins->{{Automatic, 3}, {135, Automatic}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -13690,622 +15174,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 354, 7, 66, "Input",ExpressionUUID->"d0fce16a-d28b-48d0-a068-990bc837b8ee"], -Cell[933, 31, 260, 5, 41, "Output",ExpressionUUID->"b5701890-ff21-47c2-98ec-49b95c26dc1f"] +Cell[576, 22, 349, 6, 29, "Input",ExpressionUUID->"d0fce16a-d28b-48d0-a068-990bc837b8ee"], +Cell[928, 30, 277, 4, 33, "Output",ExpressionUUID->"91382974-450e-4af5-90ab-6c0cf3a26a97"] }, Open ]], Cell[CellGroupData[{ -Cell[1230, 41, 253, 5, 36, "Input",ExpressionUUID->"97fe636e-3b82-4bab-a660-e8e84adf2f95"], -Cell[1486, 48, 260, 5, 41, "Output",ExpressionUUID->"c1c29771-1e27-4c48-981d-145120476ad5"] +Cell[1242, 39, 248, 4, 29, "Input",ExpressionUUID->"97fe636e-3b82-4bab-a660-e8e84adf2f95"], +Cell[1493, 45, 277, 4, 33, "Output",ExpressionUUID->"83f78bd4-3bc3-4838-99b6-7e2cbcc6da97"] }, Open ]], Cell[CellGroupData[{ -Cell[1783, 58, 226, 5, 36, "Input",ExpressionUUID->"320bdf43-2d74-4dd3-a9bb-ce43eac99810"], -Cell[2012, 65, 260, 5, 41, "Output",ExpressionUUID->"c8c4e33f-8c58-4fc0-a23f-2a0555d0c4ce"] +Cell[1807, 54, 221, 4, 29, "Input",ExpressionUUID->"320bdf43-2d74-4dd3-a9bb-ce43eac99810"], +Cell[2031, 60, 277, 4, 33, "Output",ExpressionUUID->"1c4d71a9-0252-4ad7-b31e-656e6b39c963"] }, Open ]], Cell[CellGroupData[{ -Cell[2309, 75, 180, 4, 36, "Input",ExpressionUUID->"110c44a8-9e3f-4093-ac7c-51f18bc8c05a"], -Cell[2492, 81, 260, 5, 41, "Output",ExpressionUUID->"13119321-0551-49b0-92c5-6c2a0e76649c"] +Cell[2345, 69, 175, 3, 29, "Input",ExpressionUUID->"110c44a8-9e3f-4093-ac7c-51f18bc8c05a"], +Cell[2523, 74, 279, 4, 33, "Output",ExpressionUUID->"45c7bc4b-0dea-4fc1-b008-420519294ee2"] }, Open ]], Cell[CellGroupData[{ -Cell[2789, 91, 262, 8, 54, "Input",ExpressionUUID->"9397356f-bd8a-4bc9-846e-371b61ea7a15"], -Cell[3054, 101, 273, 5, 41, "Output",ExpressionUUID->"396dde9d-6eb2-4677-b100-44297ab30a93"] +Cell[2839, 83, 257, 7, 42, "Input",ExpressionUUID->"9397356f-bd8a-4bc9-846e-371b61ea7a15"], +Cell[3099, 92, 290, 4, 33, "Output",ExpressionUUID->"79ecf823-05f0-4e61-99a4-2ca6de40f800"] }, Open ]], Cell[CellGroupData[{ -Cell[3364, 111, 136, 3, 36, "Input",ExpressionUUID->"4d91404d-f53a-436d-8fc6-3dd403167c29"], -Cell[3503, 116, 259, 5, 41, "Output",ExpressionUUID->"51933d89-5305-4e42-88f8-8a6625bcf4fd"] +Cell[3426, 101, 131, 2, 29, "Input",ExpressionUUID->"4d91404d-f53a-436d-8fc6-3dd403167c29"], +Cell[3560, 105, 276, 4, 33, "Output",ExpressionUUID->"bc9dfa31-4441-4882-a422-594ba905aa76"] }, Open ]], Cell[CellGroupData[{ -Cell[3799, 126, 281, 7, 36, "Input",ExpressionUUID->"57c762ad-3720-469b-a01d-f497d3d0d576"], -Cell[4083, 135, 273, 5, 41, "Output",ExpressionUUID->"53ccdf26-a6ab-4171-b54a-de95ffcb3dbe"] +Cell[3873, 114, 276, 6, 29, "Input",ExpressionUUID->"57c762ad-3720-469b-a01d-f497d3d0d576"], +Cell[4152, 122, 292, 4, 33, "Output",ExpressionUUID->"dc29e0e2-4287-4cac-a031-7f14673a96db"] }, Open ]], Cell[CellGroupData[{ -Cell[4393, 145, 262, 8, 36, "Input",ExpressionUUID->"92b24fef-3e27-40eb-a59c-c349caf5101c"], -Cell[4658, 155, 273, 5, 41, "Output",ExpressionUUID->"b992a87c-29d4-4e04-bbd8-89ac47689c19"] +Cell[4481, 131, 257, 7, 29, "Input",ExpressionUUID->"92b24fef-3e27-40eb-a59c-c349caf5101c"], +Cell[4741, 140, 290, 4, 33, "Output",ExpressionUUID->"c8a34148-f5f5-44ca-b8bb-5f106918121a"] }, Open ]], Cell[CellGroupData[{ -Cell[4968, 165, 209, 4, 36, "Input",ExpressionUUID->"fb1bf236-910b-499f-873e-8222508bb1a9"], -Cell[5180, 171, 237, 4, 41, "Output",ExpressionUUID->"ad63c035-e071-4857-8cc3-3a9fc5a73c32"] +Cell[5068, 149, 204, 3, 29, "Input",ExpressionUUID->"fb1bf236-910b-499f-873e-8222508bb1a9"], +Cell[5275, 154, 255, 3, 33, "Output",ExpressionUUID->"6cba2e83-2fe1-4ab7-9118-06e08f87f42a"] }, Open ]], Cell[CellGroupData[{ -Cell[5454, 180, 207, 4, 36, "Input",ExpressionUUID->"ec881fe1-855f-49f3-9c83-8d9494589304"], -Cell[5664, 186, 238, 4, 62, "Output",ExpressionUUID->"688a1d0f-5581-4346-a04d-8645202b571e"] +Cell[5567, 162, 203, 3, 29, "Input",ExpressionUUID->"ec881fe1-855f-49f3-9c83-8d9494589304"], +Cell[5773, 167, 257, 3, 33, "Output",ExpressionUUID->"3feb484c-518e-4fe9-9ed1-a79ecbaa0443"] }, Open ]], Cell[CellGroupData[{ -Cell[5939, 195, 133, 3, 55, "Input",ExpressionUUID->"c76a7ba9-c342-4338-aa53-78ecb103d085"], -Cell[6075, 200, 256, 5, 62, "Output",ExpressionUUID->"5bac045b-fe52-4f4e-a0a4-7cb8ff9ba94d"] +Cell[6067, 175, 129, 2, 29, "Input",ExpressionUUID->"c76a7ba9-c342-4338-aa53-78ecb103d085"], +Cell[6199, 179, 274, 4, 33, "Output",ExpressionUUID->"df6b187f-52bc-440c-a738-a960ce15ea0c"] }, Open ]], Cell[CellGroupData[{ -Cell[6368, 210, 133, 3, 55, "Input",ExpressionUUID->"a3a5acac-9744-430a-8c34-debd7d6cbdfa"], -Cell[6504, 215, 258, 5, 62, "Output",ExpressionUUID->"1b903cc7-0ed4-475f-afca-47a39dc08f4b"] +Cell[6510, 188, 129, 2, 29, "Input",ExpressionUUID->"a3a5acac-9744-430a-8c34-debd7d6cbdfa"], +Cell[6642, 192, 276, 4, 33, "Output",ExpressionUUID->"06006092-37a9-4c32-b8ba-9db6dcf4236c"] }, Open ]], Cell[CellGroupData[{ -Cell[6799, 225, 561, 20, 148, "Input",ExpressionUUID->"d2ece78d-47c2-4e41-8ac7-bc58c0e2994f"], -Cell[7363, 247, 270, 5, 62, "Output",ExpressionUUID->"76b4c6b6-c81c-4592-b6c7-e3454d6cc083"] +Cell[6955, 201, 557, 19, 79, "Input",ExpressionUUID->"d2ece78d-47c2-4e41-8ac7-bc58c0e2994f"], +Cell[7515, 222, 288, 4, 33, "Output",ExpressionUUID->"dc89df44-1d9f-4a89-a015-7ada9a656f4c"] }, Open ]], Cell[CellGroupData[{ -Cell[7670, 257, 561, 20, 148, "Input",ExpressionUUID->"217e69ea-e85c-4564-852d-ecb839dadc8f"], -Cell[8234, 279, 271, 5, 62, "Output",ExpressionUUID->"224310d5-c3cc-417b-a8ce-b17f2e2cb8f7"] +Cell[7840, 231, 557, 19, 79, "Input",ExpressionUUID->"217e69ea-e85c-4564-852d-ecb839dadc8f"], +Cell[8400, 252, 291, 4, 33, "Output",ExpressionUUID->"8e8c5e46-436f-436a-a1d9-d5d967eeb506"] }, Open ]], Cell[CellGroupData[{ -Cell[8542, 289, 1592, 51, 211, "Input",ExpressionUUID->"b72dd73d-44b6-4389-8ee2-0978dddf497d"], -Cell[10137, 342, 272, 5, 62, "Output",ExpressionUUID->"207cf5ca-b170-446a-a1b0-aed6add52331"] +Cell[8728, 261, 1588, 50, 158, "Input",ExpressionUUID->"b72dd73d-44b6-4389-8ee2-0978dddf497d"], +Cell[10319, 313, 292, 4, 33, "Output",ExpressionUUID->"bb8e879f-5aaf-4e82-a5d9-187f0ec32475"] }, Open ]], Cell[CellGroupData[{ -Cell[10446, 352, 1426, 47, 211, "Input",ExpressionUUID->"0c41b06a-21b8-42a6-98ae-52296023ce7d"], -Cell[11875, 401, 290, 6, 62, "Output",ExpressionUUID->"f3f17d18-7db4-4055-a1be-f51da3b40b34"] +Cell[10648, 322, 1422, 46, 158, "Input",ExpressionUUID->"0c41b06a-21b8-42a6-98ae-52296023ce7d"], +Cell[12073, 370, 308, 5, 33, "Output",ExpressionUUID->"3f8d7db1-f3f3-4a18-9e45-e88ffc8a5e21"] }, Open ]], Cell[CellGroupData[{ -Cell[12202, 412, 1426, 47, 211, "Input",ExpressionUUID->"8f27d46b-71d0-4c68-b9f1-8eeacce5195e"], -Cell[13631, 461, 291, 6, 62, "Output",ExpressionUUID->"90dd7a72-170d-48c1-b08e-ba4e55b18049"] +Cell[12418, 380, 1422, 46, 158, "Input",ExpressionUUID->"8f27d46b-71d0-4c68-b9f1-8eeacce5195e"], +Cell[13843, 428, 311, 5, 33, "Output",ExpressionUUID->"8d6abde1-02d7-41f4-88e6-e9451045463a"] }, Open ]], Cell[CellGroupData[{ -Cell[13959, 472, 1592, 51, 211, "Input",ExpressionUUID->"36bb4534-ce1a-4f21-bf00-be22db858676"], -Cell[15554, 525, 269, 5, 62, "Output",ExpressionUUID->"a3367550-ed46-40ad-9965-41e7a5dfe2a3"] +Cell[14191, 438, 1588, 50, 158, "Input",ExpressionUUID->"36bb4534-ce1a-4f21-bf00-be22db858676"], +Cell[15782, 490, 287, 4, 33, "Output",ExpressionUUID->"611deaee-fc26-4132-be69-9226acf60c9b"] }, Open ]], Cell[CellGroupData[{ -Cell[15860, 535, 135, 3, 55, "Input",ExpressionUUID->"c41c6c2e-1a24-42bb-8921-91eeae2dc792"], -Cell[15998, 540, 258, 5, 62, "Output",ExpressionUUID->"65bf6c02-c887-4c4d-99e9-17bd12520c97"] +Cell[16106, 499, 131, 2, 29, "Input",ExpressionUUID->"c41c6c2e-1a24-42bb-8921-91eeae2dc792"], +Cell[16240, 503, 276, 4, 33, "Output",ExpressionUUID->"23b13f0e-1a7a-4721-9fe6-408727a07251"] }, Open ]], Cell[CellGroupData[{ -Cell[16293, 550, 137, 3, 55, "Input",ExpressionUUID->"aca6d8bd-73ab-4ebb-9452-86c7192e3567"], -Cell[16433, 555, 255, 5, 62, "Output",ExpressionUUID->"840463d2-b76f-47b1-a89c-88b9495e553d"] +Cell[16553, 512, 133, 2, 29, "Input",ExpressionUUID->"aca6d8bd-73ab-4ebb-9452-86c7192e3567"], +Cell[16689, 516, 273, 4, 33, "Output",ExpressionUUID->"54b7a6bd-35ee-4696-967e-bb043a7cc6a6"] }, Open ]], Cell[CellGroupData[{ -Cell[16725, 565, 138, 3, 55, "Input",ExpressionUUID->"9f899060-24a7-42ab-acc5-bdeea6b2db86"], -Cell[16866, 570, 262, 5, 62, "Output",ExpressionUUID->"7db31020-9169-41d4-8cff-3cbc4003ee30"] +Cell[16999, 525, 134, 2, 29, "Input",ExpressionUUID->"9f899060-24a7-42ab-acc5-bdeea6b2db86"], +Cell[17136, 529, 280, 4, 33, "Output",ExpressionUUID->"5dfbfc98-4b8a-4694-8b9f-bd0bbba0d421"] }, Open ]], Cell[CellGroupData[{ -Cell[17165, 580, 223, 5, 55, "Input",ExpressionUUID->"609eaf04-589c-450f-8ccf-da73c88208fe"], -Cell[17391, 587, 272, 6, 62, "Output",ExpressionUUID->"2162dd1e-e379-4c6a-9bb3-94985117cfbd"] +Cell[17453, 538, 219, 4, 29, "Input",ExpressionUUID->"609eaf04-589c-450f-8ccf-da73c88208fe"], +Cell[17675, 544, 290, 5, 33, "Output",ExpressionUUID->"2808996d-a1cc-4ba2-afd8-ec2756657a9d"] }, Open ]], Cell[CellGroupData[{ -Cell[17700, 598, 138, 3, 55, "Input",ExpressionUUID->"30d8c756-9cca-4154-8ea0-52f9ee42d4b0"], -Cell[17841, 603, 260, 5, 62, "Output",ExpressionUUID->"d70e2bd6-fa13-4f24-b01c-297c4f87f602"] +Cell[18002, 554, 134, 2, 29, "Input",ExpressionUUID->"30d8c756-9cca-4154-8ea0-52f9ee42d4b0"], +Cell[18139, 558, 280, 4, 33, "Output",ExpressionUUID->"84acefbe-acab-41b8-999a-d065f75e2941"] }, Open ]], Cell[CellGroupData[{ -Cell[18138, 613, 328, 6, 55, "Input",ExpressionUUID->"ac998e07-a5e5-4677-8445-cec941de9c09"], -Cell[18469, 621, 253, 5, 62, "Output",ExpressionUUID->"485f5926-3f5a-481d-9d86-347c7b4f9225"] +Cell[18456, 567, 324, 5, 29, "Input",ExpressionUUID->"ac998e07-a5e5-4677-8445-cec941de9c09"], +Cell[18783, 574, 271, 4, 33, "Output",ExpressionUUID->"58891e4b-942b-4594-92d5-47129c2ce9e0"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 631, 299, 6, 55, "Input",ExpressionUUID->"32a1cb53-2bff-493e-8a41-7a0bcf58a48c"], -Cell[19061, 639, 252, 5, 62, "Output",ExpressionUUID->"5b328257-3574-4f96-91f6-b6d6857e9758"] +Cell[19091, 583, 295, 5, 29, "Input",ExpressionUUID->"32a1cb53-2bff-493e-8a41-7a0bcf58a48c"], +Cell[19389, 590, 270, 4, 33, "Output",ExpressionUUID->"1956577d-ba16-43cf-89ef-406c2b896768"] }, Open ]], Cell[CellGroupData[{ -Cell[19350, 649, 223, 5, 55, "Input",ExpressionUUID->"635f422b-96f4-4bcb-9bc2-9a63861bc9fa"], -Cell[19576, 656, 257, 5, 62, "Output",ExpressionUUID->"873a9e90-9550-47de-997a-de87b3e6ba8e"] +Cell[19696, 599, 219, 4, 29, "Input",ExpressionUUID->"635f422b-96f4-4bcb-9bc2-9a63861bc9fa"], +Cell[19918, 605, 275, 4, 33, "Output",ExpressionUUID->"f1371135-aea9-4efd-aaed-23814271c784"] }, Open ]], Cell[CellGroupData[{ -Cell[19870, 666, 354, 11, 81, "Input",ExpressionUUID->"9617e290-cf96-4ee0-8690-32a65f056f14"], -Cell[20227, 679, 275, 5, 62, "Output",ExpressionUUID->"b6c18108-7589-49ea-8f29-be9e345bb899"] +Cell[20230, 614, 350, 10, 42, "Input",ExpressionUUID->"9617e290-cf96-4ee0-8690-32a65f056f14"], +Cell[20583, 626, 293, 4, 33, "Output",ExpressionUUID->"d0034ff3-8966-44b0-b60a-a3dc72fa5840"] }, Open ]], Cell[CellGroupData[{ -Cell[20539, 689, 354, 11, 81, "Input",ExpressionUUID->"ef9f3d10-7255-45e4-923c-33bee2d6603a"], -Cell[20896, 702, 288, 6, 62, "Output",ExpressionUUID->"ad4bd6de-9a0d-4611-8395-d08fd82c5d3b"] +Cell[20913, 635, 350, 10, 42, "Input",ExpressionUUID->"ef9f3d10-7255-45e4-923c-33bee2d6603a"], +Cell[21266, 647, 305, 5, 33, "Output",ExpressionUUID->"fe71ffa4-2952-4094-bc76-c8c4aab59b55"] }, Open ]], Cell[CellGroupData[{ -Cell[21221, 713, 998, 27, 154, "Input",ExpressionUUID->"fef4bf97-b50d-45d1-9e97-29afb98df7f6"], -Cell[22222, 742, 276, 5, 62, "Output",ExpressionUUID->"c79e582a-6c9a-423d-b117-c6208829cc42"] +Cell[21608, 657, 994, 26, 81, "Input",ExpressionUUID->"fef4bf97-b50d-45d1-9e97-29afb98df7f6"], +Cell[22605, 685, 294, 4, 33, "Output",ExpressionUUID->"f55b573e-9fdb-4e91-b016-231e0c2e7b9a"] }, Open ]], Cell[CellGroupData[{ -Cell[22535, 752, 203, 4, 55, "Input",ExpressionUUID->"07ad6710-3311-467f-bb58-450e14a448d8"], -Cell[22741, 758, 258, 5, 62, "Output",ExpressionUUID->"8e348639-9ea5-4d31-83f0-da1fa0227efc"] +Cell[22936, 694, 199, 3, 29, "Input",ExpressionUUID->"07ad6710-3311-467f-bb58-450e14a448d8"], +Cell[23138, 699, 276, 4, 33, "Output",ExpressionUUID->"129002cb-213c-4425-9cba-639bf20d0bf2"] }, Open ]], Cell[CellGroupData[{ -Cell[23036, 768, 331, 6, 55, "Input",ExpressionUUID->"1d5aa18b-6c5c-4689-85a5-7aa675922a71"], -Cell[23370, 776, 235, 4, 62, "Output",ExpressionUUID->"3afefb20-5b9e-408a-a06c-b8a4fe7f8d2a"] +Cell[23451, 708, 327, 5, 29, "Input",ExpressionUUID->"1d5aa18b-6c5c-4689-85a5-7aa675922a71"], +Cell[23781, 715, 254, 3, 33, "Output",ExpressionUUID->"34f821b3-45e3-40c2-874e-30f6491f21f8"] }, Open ]], -Cell[23620, 783, 177, 3, 55, "Input",ExpressionUUID->"51c642df-f1cc-40d1-a20d-a6c09882d0b0"], +Cell[24050, 721, 173, 2, 70, "Input",ExpressionUUID->"51c642df-f1cc-40d1-a20d-a6c09882d0b0"], Cell[CellGroupData[{ -Cell[23822, 790, 333, 6, 55, "Input",ExpressionUUID->"9d515c53-1514-4786-b6ef-bcdc2f2f37f4"], -Cell[24158, 798, 232, 4, 62, "Output",ExpressionUUID->"8840a114-a05f-41e1-9029-0282c16582bf"] +Cell[24248, 727, 329, 5, 29, "Input",ExpressionUUID->"9d515c53-1514-4786-b6ef-bcdc2f2f37f4"], +Cell[24580, 734, 251, 3, 33, "Output",ExpressionUUID->"f7702f73-4cc2-4d62-aca4-66ee8efde0f0"] }, Open ]], -Cell[24405, 805, 177, 3, 55, "Input",ExpressionUUID->"48ac36dc-0695-4eb8-af9e-d13b075538d1"], +Cell[24846, 740, 173, 2, 70, "Input",ExpressionUUID->"48ac36dc-0695-4eb8-af9e-d13b075538d1"], Cell[CellGroupData[{ -Cell[24607, 812, 336, 6, 55, "Input",ExpressionUUID->"ec198863-d0ca-4a85-b141-0b58696c2357"], -Cell[24946, 820, 231, 4, 62, "Output",ExpressionUUID->"109b716d-f56f-4603-bebd-8e5c4951f800"] +Cell[25044, 746, 332, 5, 29, "Input",ExpressionUUID->"ec198863-d0ca-4a85-b141-0b58696c2357"], +Cell[25379, 753, 250, 3, 33, "Output",ExpressionUUID->"e339f40c-5676-4aee-ac0a-6cd13d1ae1dd"] }, Open ]], -Cell[25192, 827, 177, 3, 55, "Input",ExpressionUUID->"a72c6b62-e186-429f-bc5c-7d41ab6e6ab7"], +Cell[25644, 759, 173, 2, 70, "Input",ExpressionUUID->"a72c6b62-e186-429f-bc5c-7d41ab6e6ab7"], Cell[CellGroupData[{ -Cell[25394, 834, 358, 6, 55, "Input",ExpressionUUID->"eab55f4c-317e-4299-a951-ff360a60197f"], -Cell[25755, 842, 237, 4, 62, "Output",ExpressionUUID->"7746bdcc-56a4-4143-b901-2496bcf1eac3"] +Cell[25842, 765, 354, 5, 29, "Input",ExpressionUUID->"eab55f4c-317e-4299-a951-ff360a60197f"], +Cell[26199, 772, 258, 3, 33, "Output",ExpressionUUID->"ff20ed37-7fa9-45f5-895f-4802a3da478d"] }, Open ]], -Cell[26007, 849, 175, 3, 55, "Input",ExpressionUUID->"f2d6365f-000a-44d6-8019-84a057844408"], +Cell[26472, 778, 171, 2, 70, "Input",ExpressionUUID->"f2d6365f-000a-44d6-8019-84a057844408"], Cell[CellGroupData[{ -Cell[26207, 856, 303, 6, 55, "Input",ExpressionUUID->"5e1e34e6-5254-456b-a631-e2c0c9cd797f"], -Cell[26513, 864, 237, 4, 62, "Output",ExpressionUUID->"707e1789-812f-4f3a-8e4a-fca91d16f638"] +Cell[26668, 784, 299, 5, 29, "Input",ExpressionUUID->"5e1e34e6-5254-456b-a631-e2c0c9cd797f"], +Cell[26970, 791, 256, 3, 33, "Output",ExpressionUUID->"ff43c433-b1cb-4bbe-96ff-660fd90c9409"] }, Open ]], -Cell[26765, 871, 175, 3, 55, "Input",ExpressionUUID->"d8944063-490f-492e-8b1e-26d9491303e7"], +Cell[27241, 797, 171, 2, 70, "Input",ExpressionUUID->"d8944063-490f-492e-8b1e-26d9491303e7"], Cell[CellGroupData[{ -Cell[26965, 878, 307, 6, 55, "Input",ExpressionUUID->"dc693c57-954c-404d-8fe9-6aee60d11f0a"], -Cell[27275, 886, 233, 4, 62, "Output",ExpressionUUID->"9e492a9b-08ea-40b6-9084-ac8a9ff06ad6"] +Cell[27437, 803, 303, 5, 29, "Input",ExpressionUUID->"dc693c57-954c-404d-8fe9-6aee60d11f0a"], +Cell[27743, 810, 254, 3, 33, "Output",ExpressionUUID->"86d08306-6649-429a-bd6d-aa4e62b46ef0"] }, Open ]], -Cell[27523, 893, 177, 3, 55, "Input",ExpressionUUID->"08142cbf-2624-4ff1-8177-2a4d86e07c5c"], +Cell[28012, 816, 173, 2, 70, "Input",ExpressionUUID->"08142cbf-2624-4ff1-8177-2a4d86e07c5c"], Cell[CellGroupData[{ -Cell[27725, 900, 311, 6, 55, "Input",ExpressionUUID->"ed66637b-3cd2-4522-9714-6f979e0f0bed"], -Cell[28039, 908, 232, 4, 62, "Output",ExpressionUUID->"29c269cf-5e67-49f5-88c1-f24ee7f7bc58"] +Cell[28210, 822, 307, 5, 29, "Input",ExpressionUUID->"ed66637b-3cd2-4522-9714-6f979e0f0bed"], +Cell[28520, 829, 251, 3, 33, "Output",ExpressionUUID->"2a685dbc-a7d2-4a13-8b1a-5ab158de6bde"] }, Open ]], -Cell[28286, 915, 176, 3, 55, "Input",ExpressionUUID->"19cc1f35-920c-4c38-a51b-0da0dda8709a"], +Cell[28786, 835, 172, 2, 70, "Input",ExpressionUUID->"19cc1f35-920c-4c38-a51b-0da0dda8709a"], Cell[CellGroupData[{ -Cell[28487, 922, 279, 5, 55, "Input",ExpressionUUID->"68023da3-fb3d-4827-b8c2-a48fc79816ba"], -Cell[28769, 929, 231, 4, 62, "Output",ExpressionUUID->"8cac775a-cfdf-4fff-afdf-f2f6c7199d28"] +Cell[28983, 841, 275, 4, 29, "Input",ExpressionUUID->"68023da3-fb3d-4827-b8c2-a48fc79816ba"], +Cell[29261, 847, 250, 3, 33, "Output",ExpressionUUID->"0e8ff53c-6b58-480d-acb9-346b0b1b1a77"] }, Open ]], -Cell[29015, 936, 179, 3, 55, "Input",ExpressionUUID->"f5012502-4c83-4da7-84cb-365cccec2fb0"], +Cell[29526, 853, 175, 2, 70, "Input",ExpressionUUID->"f5012502-4c83-4da7-84cb-365cccec2fb0"], Cell[CellGroupData[{ -Cell[29219, 943, 19813, 486, 3214, "Input",ExpressionUUID->"255b0557-487f-4c75-90c3-fabaf8decb21"], -Cell[49035, 1431, 272, 5, 62, "Output",ExpressionUUID->"8e7b0382-75bd-47d7-8790-124f40401a04"] +Cell[29726, 859, 19809, 485, 1844, "Input",ExpressionUUID->"255b0557-487f-4c75-90c3-fabaf8decb21"], +Cell[49538, 1346, 292, 4, 33, "Output",ExpressionUUID->"5cd6f6e9-342d-4fb5-86b8-6c92376a3ced"] }, Open ]], Cell[CellGroupData[{ -Cell[49344, 1441, 19752, 490, 3214, "Input",ExpressionUUID->"e27de1c0-75ef-4325-aac1-4865a7cf805e"], -Cell[69099, 1933, 271, 5, 62, "Output",ExpressionUUID->"0682c40a-680e-419d-95cd-43bf213814e0"] +Cell[49867, 1355, 19748, 489, 1981, "Input",ExpressionUUID->"e27de1c0-75ef-4325-aac1-4865a7cf805e"], +Cell[69618, 1846, 291, 4, 33, "Output",ExpressionUUID->"4c2bbed7-b600-4ee5-9de7-0e71f7b63a08"] }, Open ]], Cell[CellGroupData[{ -Cell[69407, 1943, 19752, 484, 3213, "Input",ExpressionUUID->"82be9e96-1071-4755-8750-e63efdc9c206"], -Cell[89162, 2429, 289, 6, 62, "Output",ExpressionUUID->"6a0305b5-343d-477f-a3dc-f410064ef405"] +Cell[69946, 1855, 19748, 483, 1970, "Input",ExpressionUUID->"82be9e96-1071-4755-8750-e63efdc9c206"], +Cell[89697, 2340, 305, 5, 33, "Output",ExpressionUUID->"67dc6ca5-3b61-41b7-aeac-58def50eec15"] }, Open ]], Cell[CellGroupData[{ -Cell[89488, 2440, 22538, 554, 3639, "Input",ExpressionUUID->"2207db8d-453c-4514-9663-5f9edff29c1f"], -Cell[112029, 2996, 291, 6, 62, "Output",ExpressionUUID->"9b904686-401f-428e-98a9-48171f4231aa"] +Cell[90039, 2350, 22534, 553, 2217, "Input",ExpressionUUID->"2207db8d-453c-4514-9663-5f9edff29c1f"], +Cell[112576, 2905, 311, 5, 33, "Output",ExpressionUUID->"7f22b4db-872f-40ac-94e1-5b9fd501e7df"] }, Open ]], Cell[CellGroupData[{ -Cell[112357, 3007, 22539, 554, 3639, "Input",ExpressionUUID->"7c9c561c-6778-484b-81ea-6331fe6ac37e"], -Cell[134899, 3563, 292, 6, 62, "Output",ExpressionUUID->"5e6881ec-291a-412e-a39c-5ed360be1754"] +Cell[112924, 2915, 22535, 553, 2254, "Input",ExpressionUUID->"7c9c561c-6778-484b-81ea-6331fe6ac37e"], +Cell[135462, 3470, 310, 5, 33, "Output",ExpressionUUID->"4c169cd8-14f6-4351-80ed-27c596a010df"] }, Open ]], Cell[CellGroupData[{ -Cell[135228, 3574, 25495, 627, 4065, "Input",ExpressionUUID->"916584db-f151-4a1c-bc04-8f37e2df2749"], -Cell[160726, 4203, 286, 6, 62, "Output",ExpressionUUID->"8e6ae17b-724f-4a8e-8c3b-0f0ae15447e2"] +Cell[135809, 3480, 25491, 626, 2501, "Input",ExpressionUUID->"916584db-f151-4a1c-bc04-8f37e2df2749"], +Cell[161303, 4108, 306, 5, 33, "Output",ExpressionUUID->"1bf59dfe-09b0-43f4-81fd-3021c05cfc4e"] }, Open ]], Cell[CellGroupData[{ -Cell[161049, 4214, 134, 3, 55, "Input",ExpressionUUID->"00da972e-b24c-4767-96c7-28ece24fb860"], -Cell[161186, 4219, 254, 5, 62, "Output",ExpressionUUID->"326a5d2a-1f1c-4e1e-a6a9-0ea662740529"] +Cell[161646, 4118, 130, 2, 29, "Input",ExpressionUUID->"00da972e-b24c-4767-96c7-28ece24fb860"], +Cell[161779, 4122, 272, 4, 33, "Output",ExpressionUUID->"b181bbab-abe6-4b14-a57a-4c6644e5886a"] }, Open ]], Cell[CellGroupData[{ -Cell[161477, 4229, 134, 3, 55, "Input",ExpressionUUID->"48b20279-38e3-424f-a9b1-603e3283ab38"], -Cell[161614, 4234, 254, 5, 62, "Output",ExpressionUUID->"e2621c33-f530-4da7-95af-e1b890276315"] +Cell[162088, 4131, 130, 2, 29, "Input",ExpressionUUID->"48b20279-38e3-424f-a9b1-603e3283ab38"], +Cell[162221, 4135, 272, 4, 33, "Output",ExpressionUUID->"7f25ade8-256c-4189-a724-9dd124bd0626"] }, Open ]], Cell[CellGroupData[{ -Cell[161905, 4244, 1148, 40, 211, "Input",ExpressionUUID->"f4ffbd23-ffc7-40f7-9d83-f23668e0722d"], -Cell[163056, 4286, 271, 5, 62, "Output",ExpressionUUID->"ca0e3882-4b0c-4168-8b81-11fdff3f069a"] +Cell[162530, 4144, 1144, 39, 107, "Input",ExpressionUUID->"f4ffbd23-ffc7-40f7-9d83-f23668e0722d"], +Cell[163677, 4185, 289, 4, 33, "Output",ExpressionUUID->"09cb8772-6adc-4bf3-8dfd-38865e145764"] }, Open ]], Cell[CellGroupData[{ -Cell[163364, 4296, 1045, 36, 211, "Input",ExpressionUUID->"b813fa2b-7f6b-48fe-b0eb-3d48f2415243"], -Cell[164412, 4334, 286, 6, 62, "Output",ExpressionUUID->"b88e647b-08d0-4bd3-92a1-8044405ae9b8"] +Cell[164003, 4194, 1041, 35, 107, "Input",ExpressionUUID->"b813fa2b-7f6b-48fe-b0eb-3d48f2415243"], +Cell[165047, 4231, 304, 5, 33, "Output",ExpressionUUID->"acb7efd5-ba8b-4685-be6c-91cce455d1f7"] }, Open ]], Cell[CellGroupData[{ -Cell[164735, 4345, 1148, 40, 211, "Input",ExpressionUUID->"2181d355-ae5d-4740-a17c-1a647683d440"], -Cell[165886, 4387, 271, 5, 62, "Output",ExpressionUUID->"11bebf72-f501-4df5-af46-0cc361ad9e16"] +Cell[165388, 4241, 1144, 39, 107, "Input",ExpressionUUID->"2181d355-ae5d-4740-a17c-1a647683d440"], +Cell[166535, 4282, 288, 4, 33, "Output",ExpressionUUID->"e2fe2477-bd21-4bdb-a470-accc7d84bd67"] }, Open ]], Cell[CellGroupData[{ -Cell[166194, 4397, 112, 2, 55, "Input",ExpressionUUID->"33ede34f-74c0-40af-887e-870f4dc25eaa"], -Cell[166309, 4401, 272, 5, 62, "Output",ExpressionUUID->"c0843b92-41a1-43b7-a3c7-b3aba792b2aa"] +Cell[166860, 4291, 108, 1, 29, "Input",ExpressionUUID->"33ede34f-74c0-40af-887e-870f4dc25eaa"], +Cell[166971, 4294, 290, 4, 33, "Output",ExpressionUUID->"77b0d7a8-1a48-4969-b5fb-86890e73c3ad"] }, Open ]], Cell[CellGroupData[{ -Cell[166618, 4411, 112, 2, 55, "Input",ExpressionUUID->"f88a66fe-e6e3-49d8-a85e-d42aa561f095"], -Cell[166733, 4415, 289, 6, 62, "Output",ExpressionUUID->"ded1a4af-9ccf-4e1b-96e5-bea3a3aaa98e"] +Cell[167298, 4303, 108, 1, 29, "Input",ExpressionUUID->"f88a66fe-e6e3-49d8-a85e-d42aa561f095"], +Cell[167409, 4306, 307, 5, 33, "Output",ExpressionUUID->"c4eac282-cbf7-4e47-a543-7d663bb3c826"] }, Open ]], Cell[CellGroupData[{ -Cell[167059, 4426, 112, 2, 55, "Input",ExpressionUUID->"903538a6-524f-4139-989a-4e54127ac332"], -Cell[167174, 4430, 287, 6, 62, "Output",ExpressionUUID->"1a4f47df-1e52-4776-ad82-e26cdb132d91"] +Cell[167753, 4316, 108, 1, 29, "Input",ExpressionUUID->"903538a6-524f-4139-989a-4e54127ac332"], +Cell[167864, 4319, 307, 5, 33, "Output",ExpressionUUID->"f8a61419-cca5-4d18-b0f5-85c73eaf755b"] }, Open ]], Cell[CellGroupData[{ -Cell[167498, 4441, 112, 2, 55, "Input",ExpressionUUID->"eb72b9d6-5cb5-46da-b11a-0e5cc5f0353e"], -Cell[167613, 4445, 274, 5, 62, "Output",ExpressionUUID->"ea2ae609-1e74-4ce2-a7ce-95a232d9b86d"] +Cell[168208, 4329, 108, 1, 29, "Input",ExpressionUUID->"eb72b9d6-5cb5-46da-b11a-0e5cc5f0353e"], +Cell[168319, 4332, 292, 4, 33, "Output",ExpressionUUID->"f9a87c4a-6808-4676-8cb1-fdb931da6509"] }, Open ]], Cell[CellGroupData[{ -Cell[167924, 4455, 111, 2, 55, "Input",ExpressionUUID->"ec68fe5b-8545-46c9-a36a-45a6e91b65ab"], -Cell[168038, 4459, 272, 5, 62, "Output",ExpressionUUID->"ae83ae9a-04b5-49f9-ac79-02f44d87f93d"] +Cell[168648, 4341, 107, 1, 29, "Input",ExpressionUUID->"ec68fe5b-8545-46c9-a36a-45a6e91b65ab"], +Cell[168758, 4344, 290, 4, 33, "Output",ExpressionUUID->"66cef165-f97d-4d9a-8721-553f4140ddd5"] }, Open ]], Cell[CellGroupData[{ -Cell[168347, 4469, 111, 2, 55, "Input",ExpressionUUID->"4ddfdd68-b3a0-413a-895a-8ecb9f65ae99"], -Cell[168461, 4473, 272, 5, 62, "Output",ExpressionUUID->"40a928e7-88af-4d2f-b809-ca0087f9387b"] +Cell[169085, 4353, 107, 1, 29, "Input",ExpressionUUID->"4ddfdd68-b3a0-413a-895a-8ecb9f65ae99"], +Cell[169195, 4356, 289, 4, 33, "Output",ExpressionUUID->"97cddd40-2f24-47fd-a498-13a6c1973950"] }, Open ]], Cell[CellGroupData[{ -Cell[168770, 4483, 501, 17, 105, "Input",ExpressionUUID->"01d54fcc-1571-4645-8b1d-8109e2f6b24b"], -Cell[169274, 4502, 287, 6, 62, "Output",ExpressionUUID->"bc70972f-1c08-4fac-9024-a4951c9c3830"] +Cell[169521, 4365, 497, 16, 55, "Input",ExpressionUUID->"01d54fcc-1571-4645-8b1d-8109e2f6b24b"], +Cell[170021, 4383, 307, 5, 33, "Output",ExpressionUUID->"5f3f2b4b-f7df-4757-9c6c-54adbfeb6c38"] }, Open ]], Cell[CellGroupData[{ -Cell[169598, 4513, 501, 17, 105, "Input",ExpressionUUID->"d4a340a7-f80a-4e75-8029-3c3eba8d8ea5"], -Cell[170102, 4532, 286, 6, 41, "Output",ExpressionUUID->"1cff94b9-ad3c-4f4f-88e4-329ececd9b7e"] +Cell[170365, 4393, 497, 16, 55, "Input",ExpressionUUID->"d4a340a7-f80a-4e75-8029-3c3eba8d8ea5"], +Cell[170865, 4411, 304, 5, 33, "Output",ExpressionUUID->"a5026b5b-c9da-460e-971e-a3f7de2529b4"] }, Open ]], Cell[CellGroupData[{ -Cell[170425, 4543, 1792, 61, 142, "Input",ExpressionUUID->"2d1ec0e4-c548-4b4a-91f6-7020410792ff"], -Cell[172220, 4606, 270, 5, 41, "Output",ExpressionUUID->"cacd0cc8-5e05-4d5a-9bb5-8d0115b1b3dd"] +Cell[171206, 4421, 1788, 60, 183, "Input",ExpressionUUID->"2d1ec0e4-c548-4b4a-91f6-7020410792ff"], +Cell[172997, 4483, 288, 4, 33, "Output",ExpressionUUID->"dcf5fb65-42ab-4c30-a22a-6534993f6533"] }, Open ]], Cell[CellGroupData[{ -Cell[172527, 4616, 1105, 37, 73, "Input",ExpressionUUID->"6bd53917-47d8-4609-a0d4-eeb5075a9c37"], -Cell[173635, 4655, 291, 6, 41, "Output",ExpressionUUID->"30d58fe4-c61a-4ae0-83ea-5d7d9a236450"] +Cell[173322, 4492, 1101, 36, 131, "Input",ExpressionUUID->"6bd53917-47d8-4609-a0d4-eeb5075a9c37"], +Cell[174426, 4530, 311, 5, 33, "Output",ExpressionUUID->"b8f70d82-1a4d-4860-9a56-1b3a54a169c8"] }, Open ]], Cell[CellGroupData[{ -Cell[173963, 4666, 1822, 62, 144, "Input",ExpressionUUID->"cdc124db-06b0-47c8-965e-8753854d459b"], -Cell[175788, 4730, 269, 5, 41, "Output",ExpressionUUID->"2a472b03-a6a5-4cae-9df9-6493884ee7bd"] +Cell[174774, 4540, 1818, 61, 160, "Input",ExpressionUUID->"cdc124db-06b0-47c8-965e-8753854d459b"], +Cell[176595, 4603, 287, 4, 33, "Output",ExpressionUUID->"46d5ef6c-93d7-4cae-ae43-b582a1292f58"] }, Open ]], Cell[CellGroupData[{ -Cell[176094, 4740, 1635, 54, 101, "Input",ExpressionUUID->"403bbcd2-32f8-4fd3-9111-27be8d1a0e01"], -Cell[177732, 4796, 273, 5, 41, "Output",ExpressionUUID->"d89ae800-f426-4b15-bd04-1fecacd1fb03"] +Cell[176919, 4612, 1631, 53, 162, "Input",ExpressionUUID->"403bbcd2-32f8-4fd3-9111-27be8d1a0e01"], +Cell[178553, 4667, 291, 4, 33, "Output",ExpressionUUID->"0ba7319f-0051-460d-8af9-efcb9de62f17"] }, Open ]], Cell[CellGroupData[{ -Cell[178042, 4806, 1635, 54, 101, "Input",ExpressionUUID->"390ebd15-4abb-4559-a4e3-5a87823fdb20"], -Cell[179680, 4862, 272, 5, 41, "Output",ExpressionUUID->"e1e82d17-d41d-41d7-8163-9aa0bb32bb4d"] +Cell[178881, 4676, 1631, 53, 162, "Input",ExpressionUUID->"390ebd15-4abb-4559-a4e3-5a87823fdb20"], +Cell[180515, 4731, 290, 4, 33, "Output",ExpressionUUID->"de7b137c-4783-440f-a517-8edcd93b765b"] }, Open ]], -Cell[179967, 4870, 187, 4, 36, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], -Cell[180157, 4876, 156, 3, 36, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], -Cell[180316, 4881, 185, 4, 36, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], -Cell[180504, 4887, 152, 3, 36, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[180681, 4894, 1301, 43, 61, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], -Cell[181985, 4939, 176, 3, 41, "Output",ExpressionUUID->"b2b0fbe6-496d-0b4b-a132-3f215e541d44"] +Cell[180842, 4740, 206, 3, 29, "Input",ExpressionUUID->"ede64bc2-06f7-8743-a0a6-6f058773310c"], +Cell[181051, 4745, 161, 2, 33, "Output",ExpressionUUID->"042e66e0-6f92-4a45-8808-e9df5ef319cd"] }, Open ]], +Cell[181227, 4750, 175, 2, 70, "Input",ExpressionUUID->"9eb3c45a-b33b-a74e-8fe0-c82e80965ca9"], Cell[CellGroupData[{ -Cell[182198, 4947, 908, 31, 73, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], -Cell[183109, 4980, 175, 3, 41, "Output",ExpressionUUID->"cead89a0-592d-3b44-ae8b-df81fa845f91"] +Cell[181427, 4756, 204, 3, 29, "Input",ExpressionUUID->"328429c4-9130-334e-ba7f-7dc8ec78e5b4"], +Cell[181634, 4761, 161, 2, 33, "Output",ExpressionUUID->"b2b12073-18e7-4c2e-be1f-b500200f19db"] }, Open ]], +Cell[181810, 4766, 171, 2, 70, "Input",ExpressionUUID->"b3364ab6-86a4-7a46-ae33-623392314869"], Cell[CellGroupData[{ -Cell[183321, 4988, 887, 30, 73, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], -Cell[184211, 5020, 177, 3, 41, "Output",ExpressionUUID->"cd23137f-b6ad-354d-a690-15ff879bfb9c"] +Cell[182006, 4772, 1297, 42, 111, "Input",ExpressionUUID->"789c64dd-6722-a64c-864a-7fd89b074ad2"], +Cell[183306, 4816, 195, 2, 33, "Output",ExpressionUUID->"ba28c925-245f-41c0-a22a-252d537d1d8c"] }, Open ]], Cell[CellGroupData[{ -Cell[184425, 5028, 558, 19, 66, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], -Cell[184986, 5049, 172, 3, 41, "Output",ExpressionUUID->"85da9012-bc80-5149-8545-ead2f85c5a34"] +Cell[183538, 4823, 927, 30, 96, "Input",ExpressionUUID->"35e76fc7-2f05-694a-b379-67189aa511ad"], +Cell[184468, 4855, 196, 2, 33, "Output",ExpressionUUID->"e6a6d97d-53c1-4c1f-afe6-109fcf018ee5"] }, Open ]], Cell[CellGroupData[{ -Cell[185195, 5057, 651, 22, 66, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], -Cell[185849, 5081, 170, 3, 41, "Output",ExpressionUUID->"86664631-6f8b-d148-8f17-b13cb8a9a5fa"] +Cell[184701, 4862, 906, 29, 55, "Input",ExpressionUUID->"a10e19cd-f567-6b4d-a841-5f01117db38b"], +Cell[185610, 4893, 197, 2, 33, "Output",ExpressionUUID->"0a87cc08-66d4-4d62-a13a-579630b81df0"] }, Open ]], Cell[CellGroupData[{ -Cell[186056, 5089, 170, 5, 71, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], -Cell[186229, 5096, 173, 3, 41, "Output",ExpressionUUID->"77c43b01-85eb-fd46-b71d-1d444bf52ef5"] +Cell[185844, 4900, 554, 18, 51, "Input",ExpressionUUID->"289c2a6f-fa01-2645-80ce-1661c17fd90c"], +Cell[186401, 4920, 190, 2, 33, "Output",ExpressionUUID->"1266301c-1915-4d48-b8a4-56e631a9a128"] }, Open ]], Cell[CellGroupData[{ -Cell[186439, 5104, 170, 5, 69, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], -Cell[186612, 5111, 169, 3, 41, "Output",ExpressionUUID->"aacafa1c-cf55-8c4f-8232-23de80eb25b7"] +Cell[186628, 4927, 647, 21, 51, "Input",ExpressionUUID->"399520f6-f2e9-6f4a-a02c-50158b624262"], +Cell[187278, 4950, 187, 2, 33, "Output",ExpressionUUID->"5d1ef96f-8045-4631-bed7-8c8a101a0f12"] }, Open ]], Cell[CellGroupData[{ -Cell[186818, 5119, 181, 5, 55, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], -Cell[187002, 5126, 173, 3, 41, "Output",ExpressionUUID->"de93d189-ac68-c842-aeb5-e64b23581b7c"] +Cell[187502, 4957, 166, 4, 55, "Input",ExpressionUUID->"7ee61184-68bc-584d-8849-9a0186a8f35d"], +Cell[187671, 4963, 192, 2, 33, "Output",ExpressionUUID->"6685ae2e-cce1-4ed9-9cef-2baf80f8520c"] }, Open ]], Cell[CellGroupData[{ -Cell[187212, 5134, 181, 5, 55, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], -Cell[187396, 5141, 170, 3, 41, "Output",ExpressionUUID->"73700a90-df80-2f44-9e2f-d43da4980146"] +Cell[187900, 4970, 166, 4, 54, "Input",ExpressionUUID->"0ec92d80-8d9e-2746-9b01-4edb32bf4eac"], +Cell[188069, 4976, 187, 2, 33, "Output",ExpressionUUID->"adc859c5-69c9-42c3-be4c-f60c58b854b1"] }, Open ]], Cell[CellGroupData[{ -Cell[187603, 5149, 6055, 185, 431, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], -Cell[193661, 5336, 174, 3, 41, "Output",ExpressionUUID->"cebf7c0c-e117-6441-a465-087c93e87be5"] +Cell[188293, 4983, 177, 4, 43, "Input",ExpressionUUID->"8c869977-4b92-8745-b065-cb6318fdcdb7"], +Cell[188473, 4989, 190, 2, 33, "Output",ExpressionUUID->"86cecec2-10da-45f4-ac8c-ac3c2a1f479d"] }, Open ]], Cell[CellGroupData[{ -Cell[193872, 5344, 368, 9, 53, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], -Cell[194243, 5355, 170, 3, 41, "Output",ExpressionUUID->"53acb857-d475-4b46-bdab-d2addcedb13c"] +Cell[188700, 4996, 177, 4, 43, "Input",ExpressionUUID->"e2c1a337-e3c1-be4c-aa33-ae15497f38bc"], +Cell[188880, 5002, 188, 2, 33, "Output",ExpressionUUID->"1c0456e6-e61b-43f6-8cb6-54f159a00593"] }, Open ]], Cell[CellGroupData[{ -Cell[194450, 5363, 6122, 187, 431, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], -Cell[200575, 5552, 174, 3, 41, "Output",ExpressionUUID->"9962c954-af09-2844-91ec-70eb43451868"] +Cell[189105, 5009, 6051, 184, 474, "Input",ExpressionUUID->"abbe4489-628a-134f-b142-f0e18f19d6f9"], +Cell[195159, 5195, 193, 2, 33, "Output",ExpressionUUID->"fac9f162-38c1-4d98-9514-6e8518fa9c81"] }, Open ]], Cell[CellGroupData[{ -Cell[200786, 5560, 368, 9, 53, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], -Cell[201157, 5571, 170, 3, 41, "Output",ExpressionUUID->"1f5b5c64-ee33-0943-822d-b5e2806576ef"] +Cell[195389, 5202, 364, 8, 41, "Input",ExpressionUUID->"9e4d84a7-8664-a749-b8b4-3df6645764a5"], +Cell[195756, 5212, 188, 2, 33, "Output",ExpressionUUID->"2da0cce7-0dba-4bd2-96d8-2d8711707b7b"] }, Open ]], Cell[CellGroupData[{ -Cell[201364, 5579, 2663, 88, 215, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], -Cell[204030, 5669, 171, 3, 109, "Output",ExpressionUUID->"a3bdb7fa-0a90-d14f-81e9-757139920dcb"] +Cell[195981, 5219, 6118, 186, 474, "Input",ExpressionUUID->"29cc8bdf-8683-214b-bd33-b4d8b4da1114"], +Cell[202102, 5407, 193, 2, 33, "Output",ExpressionUUID->"2bb9be76-d87c-42c1-b023-24196ee1db51"] }, Open ]], Cell[CellGroupData[{ -Cell[204238, 5677, 2603, 85, 109, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], -Cell[206844, 5764, 171, 3, 41, "Output",ExpressionUUID->"1b098546-b8b7-b741-b993-7512b0787277"] +Cell[202332, 5414, 364, 8, 41, "Input",ExpressionUUID->"2190c129-8a98-bf45-873d-af8f8d048936"], +Cell[202699, 5424, 187, 2, 33, "Output",ExpressionUUID->"2f0e0bc2-043b-4013-9ace-d3d900ec321d"] }, Open ]], Cell[CellGroupData[{ -Cell[207052, 5772, 3712, 118, 316, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], -Cell[210767, 5892, 171, 3, 41, "Output",ExpressionUUID->"d3b57aaa-e0b1-cb4b-b411-ab6c214b3d77"] +Cell[202923, 5431, 2659, 87, 285, "Input",ExpressionUUID->"972f1c0f-a59f-2847-8b2b-bd88c5077325"], +Cell[205585, 5520, 189, 2, 33, "Output",ExpressionUUID->"0907e28e-b0fa-42fd-9a17-588accbe45e8"] }, Open ]], -Cell[210953, 5898, 138, 3, 36, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ -Cell[211116, 5905, 2054, 59, 116, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], -Cell[213173, 5966, 566, 12, 71, "Message",ExpressionUUID->"56fc0528-7ab2-a142-bc04-9f31af965213"], -Cell[213742, 5980, 569, 12, 71, "Message",ExpressionUUID->"523f0cae-d948-764c-a560-b9272d5e2d53"], -Cell[214314, 5994, 570, 12, 71, "Message",ExpressionUUID->"0a6922e0-d70a-8f48-87c3-f1e8776a3316"], -Cell[214887, 6008, 458, 10, 32, "Message",ExpressionUUID->"777b8d50-cc35-c140-9ef3-025284fd7e68"], -Cell[215348, 6020, 172, 3, 41, "Output",ExpressionUUID->"bbad1871-e996-ef4b-8dc6-3a39d5c410ef"] +Cell[205811, 5527, 2599, 84, 211, "Input",ExpressionUUID->"c06a7373-f345-6147-b882-1c88bef9608a"], +Cell[208413, 5613, 189, 2, 33, "Output",ExpressionUUID->"436237dc-637f-489f-9589-c3b30d27c6fe"] }, Open ]], Cell[CellGroupData[{ -Cell[215557, 6028, 2052, 59, 116, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], -Cell[217612, 6089, 564, 12, 71, "Message",ExpressionUUID->"e613a9b2-edeb-4743-aa3f-3db45e0849dd"], -Cell[218179, 6103, 567, 12, 71, "Message",ExpressionUUID->"d082687e-fa98-c642-8741-e0aeeee8492c"], -Cell[218749, 6117, 570, 12, 71, "Message",ExpressionUUID->"1cb847b5-98cf-0a42-bcd2-893a3a64388b"], -Cell[219322, 6131, 455, 10, 32, "Message",ExpressionUUID->"0d526236-fa4c-334c-9891-0cc458f43fbe"], -Cell[219780, 6143, 169, 3, 41, "Output",ExpressionUUID->"a61472f3-b6b3-5d40-8ec5-35b87df5c824"] +Cell[208639, 5620, 3708, 117, 327, "Input",ExpressionUUID->"82838793-cf71-8049-a4ac-b01daf51205b"], +Cell[212350, 5739, 192, 2, 33, "Output",ExpressionUUID->"e20b7a18-223a-4389-a5d7-05ce44b26584"] }, Open ]], +Cell[212557, 5744, 160, 3, 70, "Input",ExpressionUUID->"0055f95b-c532-e24d-bdc4-544ea2d2fbd9"], Cell[CellGroupData[{ -Cell[219986, 6151, 1936, 53, 86, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], -Cell[221925, 6206, 19994, 375, 295, "Output",ExpressionUUID->"84263d17-cde8-2246-a26d-50fe65f34979"] +Cell[212742, 5751, 2073, 58, 234, "Input",ExpressionUUID->"574b810b-aa4a-d545-b080-c44fbe83a713"], +Cell[214818, 5811, 591, 13, 82, "Message",ExpressionUUID->"5758e053-cc8a-4484-9ded-8eec68d6f9e5"], +Cell[215412, 5826, 593, 13, 65, "Message",ExpressionUUID->"efd960cf-d749-490d-a776-9b432b3e53d8"], +Cell[216008, 5841, 596, 13, 65, "Message",ExpressionUUID->"494ad4e9-51f2-43f3-a50e-f7ccca4d7c8d"], +Cell[216607, 5856, 494, 11, 26, "Message",ExpressionUUID->"43504d4a-64cf-4719-a15e-8d13de8d3a9e"], +Cell[217104, 5869, 191, 2, 33, "Output",ExpressionUUID->"25b3e0ff-14e9-4072-9f7c-0b1ae1b23c7a"] }, Open ]], Cell[CellGroupData[{ -Cell[241956, 6586, 2092, 60, 116, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], -Cell[244051, 6648, 501, 11, 48, "Message",ExpressionUUID->"53d31480-3c5e-ef4a-987b-a232cf0b03f3"], -Cell[244555, 6661, 503, 11, 48, "Message",ExpressionUUID->"b7d94271-16f1-6346-b579-21279019eafb"], -Cell[245061, 6674, 506, 11, 48, "Message",ExpressionUUID->"bfaea4b0-a812-1847-9911-9291b70d2c8f"], -Cell[245570, 6687, 456, 10, 32, "Message",ExpressionUUID->"07354318-4dcc-6049-94e1-9227bd3406fc"], -Cell[246029, 6699, 41581, 727, 292, "Output",ExpressionUUID->"4fedf89c-a1d1-0f4a-bf53-44f2e928d059"] +Cell[217332, 5876, 2071, 58, 234, "Input",ExpressionUUID->"3d7dd6a2-2692-2b4d-8922-656c90598e75"], +Cell[219406, 5936, 589, 13, 82, "Message",ExpressionUUID->"79415b2a-6ddf-4634-9297-78ebb4b78dad"], +Cell[219998, 5951, 591, 13, 65, "Message",ExpressionUUID->"36434ad9-a613-44d8-8771-c0896e83e2d9"], +Cell[220592, 5966, 594, 13, 65, "Message",ExpressionUUID->"7b03d8a1-ef28-4bd0-91b2-037fcef7d3e7"], +Cell[221189, 5981, 490, 11, 26, "Message",ExpressionUUID->"8da97de6-a835-4217-8c2d-be12dc13422f"], +Cell[221682, 5994, 187, 2, 33, "Output",ExpressionUUID->"4299eff8-76ea-4bc5-9344-4d211b33e8f1"] }, Open ]], -Cell[287625, 7429, 2454, 69, 140, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], -Cell[290082, 7500, 209, 5, 36, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], Cell[CellGroupData[{ -Cell[290316, 7509, 217, 7, 61, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], -Cell[290536, 7518, 170, 3, 41, "Output",ExpressionUUID->"ced270d8-1772-ff41-a012-a661d8496312"] +Cell[221906, 6001, 1955, 52, 102, "Input",ExpressionUUID->"9c540ba7-8bb4-ef46-919c-62296271f174"], +Cell[223864, 6055, 20401, 382, 236, "Output",ExpressionUUID->"57c52c80-c7de-4a9c-b8fc-e9fa1cd60b6e"] }, Open ]], Cell[CellGroupData[{ -Cell[290743, 7526, 1814, 53, 116, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], -Cell[292560, 7581, 506, 11, 48, "Message",ExpressionUUID->"82d24bea-da89-924f-8c72-34dd3938ca31"], -Cell[293069, 7594, 512, 11, 48, "Message",ExpressionUUID->"dec01940-92d8-ec46-9a19-7eeb83f307cb"], -Cell[293584, 7607, 509, 11, 48, "Message",ExpressionUUID->"b8576457-d231-bd44-9899-a0c0bb16b9e8"], -Cell[294096, 7620, 456, 10, 32, "Message",ExpressionUUID->"8bc3094a-336c-7a48-a7ed-1449be3156c0"], -Cell[294555, 7632, 22336, 412, 290, "Output",ExpressionUUID->"8cd361e0-0597-af48-9664-8ef179548a96"] +Cell[244302, 6442, 2111, 59, 261, "Input",ExpressionUUID->"6e33cb28-ef1e-1547-b52d-2171e7786920"], +Cell[246416, 6503, 531, 12, 58, "Message",ExpressionUUID->"7d49d1c0-55a3-41c6-bf5b-e7c73bee2a3a"], +Cell[246950, 6517, 536, 12, 58, "Message",ExpressionUUID->"84c3ed7b-ac39-4c80-9171-fece47e8772b"], +Cell[247489, 6531, 540, 12, 58, "Message",ExpressionUUID->"059aa262-451e-4428-a63e-9d37589e6824"], +Cell[248032, 6545, 491, 11, 26, "Message",ExpressionUUID->"dc98de0d-1593-4530-9dda-d7e3820e59be"], +Cell[248526, 6558, 22156, 410, 232, "Output",ExpressionUUID->"de4a9cd5-6f43-498e-967c-c0973da42c19"] }, Open ]], Cell[CellGroupData[{ -Cell[316928, 8049, 1616, 48, 86, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], -Cell[318547, 8099, 584, 12, 71, "Message",ExpressionUUID->"6b02dcd6-679e-e045-823b-19e8112735bb"], -Cell[319134, 8113, 588, 12, 71, "Message",ExpressionUUID->"1777b2e8-4814-3b40-9d26-e365522e2fa7"], -Cell[319725, 8127, 591, 12, 71, "Message",ExpressionUUID->"343e800a-6390-7b48-892a-7785bb4151c8"], -Cell[320319, 8141, 456, 10, 32, "Message",ExpressionUUID->"30a8c837-a97a-f04a-b90a-1e6b32a15ee9"], -Cell[320778, 8153, 173, 3, 41, "Output",ExpressionUUID->"ae05a7c3-f5d6-d640-8f8e-efe8f63ceb63"] +Cell[270719, 6973, 2476, 69, 169, "Input",ExpressionUUID->"2d5a8299-5376-9747-8056-2bd9764114a1"], +Cell[273198, 7044, 9516, 222, 239, "Output",ExpressionUUID->"a75c526e-2351-43cd-9077-1eed4195181d"] }, Open ]], Cell[CellGroupData[{ -Cell[320988, 8161, 2274, 65, 81, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], -Cell[323265, 8228, 566, 12, 71, "Message",ExpressionUUID->"089dc3ff-480d-db4f-bbed-05630517df59"], -Cell[323834, 8242, 569, 12, 71, "Message",ExpressionUUID->"6e93a9b9-9460-8649-881d-48f37a709a1b"], -Cell[324406, 8256, 572, 12, 71, "Message",ExpressionUUID->"1ee8858a-971e-d34f-bafe-57ab88be1238"], -Cell[324981, 8270, 458, 10, 32, "Message",ExpressionUUID->"96f8e027-4313-4f4f-a21d-2291fe960276"], -Cell[325442, 8282, 171, 3, 41, "Output",ExpressionUUID->"53e3f7cd-1b3e-7343-931d-6e137013b0b0"] +Cell[282751, 7271, 228, 4, 29, "Input",ExpressionUUID->"d5fa6d0d-0ad8-f845-b7df-0ac982b58a3a"], +Cell[282982, 7277, 28542, 542, 232, "Output",ExpressionUUID->"30b20195-ccc7-4301-892b-52e1af436590"] }, Open ]], Cell[CellGroupData[{ -Cell[325650, 8290, 2221, 64, 81, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], -Cell[327874, 8356, 564, 12, 109, "Message",ExpressionUUID->"2abeeb06-100d-8a4f-bcb1-ddb8c833ff54"], -Cell[328441, 8370, 567, 12, 109, "Message",ExpressionUUID->"7e411bd4-b3ce-e244-9ce0-8d1f78e8cd14"], -Cell[329011, 8384, 570, 12, 109, "Message",ExpressionUUID->"1eef1d19-4a0f-cd45-ac5f-c8b603cf3443"], -Cell[329584, 8398, 456, 10, 109, "Message",ExpressionUUID->"6022a732-4a2e-1544-a8b7-891b74c71e8b"], -Cell[330043, 8410, 173, 3, 109, "Output",ExpressionUUID->"3c53d31a-b5c8-d04c-a31f-fccb4feaa955"] +Cell[311561, 7824, 236, 6, 47, "Input",ExpressionUUID->"650e43f8-1352-de46-8137-52adca93b0cf"], +Cell[311800, 7832, 189, 2, 33, "Output",ExpressionUUID->"04e01e11-5810-4901-8c3e-2ca8f8ffd915"] }, Open ]], Cell[CellGroupData[{ -Cell[330253, 8418, 2223, 64, 109, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], -Cell[332479, 8484, 566, 12, 109, "Message",ExpressionUUID->"419d88aa-08de-a042-b43b-49810fba72bb"], -Cell[333048, 8498, 569, 12, 109, "Message",ExpressionUUID->"4a9a6268-a319-d748-9834-40ccb49d2b51"], -Cell[333620, 8512, 570, 12, 109, "Message",ExpressionUUID->"575d1045-9e4b-4643-b969-4ea2653f65d7"], -Cell[334193, 8526, 458, 10, 32, "Message",ExpressionUUID->"0c807644-74de-9c49-acac-c7123cbacadc"], -Cell[334654, 8538, 170, 3, 41, "Output",ExpressionUUID->"40f79c92-c788-c843-8a8c-07266b265dee"] +Cell[312026, 7839, 1833, 52, 190, "Input",ExpressionUUID->"9ad75b45-8f6d-114b-80bd-d2b12a49fd20"], +Cell[313862, 7893, 544, 12, 58, "Message",ExpressionUUID->"1c9a22de-ed2a-4513-89d2-f122af04cb51"], +Cell[314409, 7907, 545, 12, 58, "Message",ExpressionUUID->"b76f993f-8efc-43cf-87e6-bda9c6e9376b"], +Cell[314957, 7921, 548, 12, 58, "Message",ExpressionUUID->"6e72dfe7-e0ae-4061-a5e1-1a0635e55d62"], +Cell[315508, 7935, 491, 11, 26, "Message",ExpressionUUID->"af7b5707-eaaf-4550-88cf-5c637672d635"], +Cell[316002, 7948, 21828, 404, 236, "Output",ExpressionUUID->"1e9e9190-aecc-4b37-a7f2-80dd4af81c70"] }, Open ]], Cell[CellGroupData[{ -Cell[334861, 8546, 213, 6, 60, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], -Cell[335077, 8554, 171, 3, 41, "Output",ExpressionUUID->"5f3fc6c2-7014-7c43-bf96-8a336bebf769"] +Cell[337867, 8357, 1616, 48, 104, "Input",ExpressionUUID->"94eefac7-0bb7-7249-8430-0b2ddd6df117"], +Cell[339486, 8407, 630, 13, 82, "Message",ExpressionUUID->"c53b2227-3368-4c40-a367-d1ca719997e0"], +Cell[340119, 8422, 629, 13, 82, "Message",ExpressionUUID->"9df087bd-ad46-4cc0-abd6-2b56c562ae7d"], +Cell[340751, 8437, 634, 13, 82, "Message",ExpressionUUID->"bbd889da-6139-41ab-8c5c-6c377cd9c585"], +Cell[341388, 8452, 493, 11, 26, "Message",ExpressionUUID->"0318533f-c3f1-4d7e-b47a-38d9e066c6f9"], +Cell[341884, 8465, 195, 3, 33, "Output",ExpressionUUID->"09664f8f-d286-4de1-8b0c-e0d59ec9cc62"] }, Open ]], -Cell[335263, 8560, 244, 5, 36, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ -Cell[335532, 8569, 558, 19, 66, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], -Cell[336093, 8590, 173, 3, 41, "Output",ExpressionUUID->"c9ac712d-c12f-0747-84df-4fbc596a4bc5"] +Cell[342116, 8473, 2296, 65, 212, "Input",ExpressionUUID->"1d118f77-7d68-dd41-b0af-09454f88e7f1"], +Cell[344415, 8540, 594, 13, 82, "Message",ExpressionUUID->"b8b759a2-3c96-48c5-b784-208f4ad91338"], +Cell[345012, 8555, 598, 13, 65, "Message",ExpressionUUID->"2afa0d55-4ad1-4a7c-8a58-96b4169842d5"], +Cell[345613, 8570, 601, 13, 65, "Message",ExpressionUUID->"5801d7fc-1374-48a3-bc3a-6d80b0eef5ab"], +Cell[346217, 8585, 495, 11, 26, "Message",ExpressionUUID->"a2851864-d097-4c1d-bf33-8f7688b87a13"], +Cell[346715, 8598, 193, 3, 33, "Output",ExpressionUUID->"52fda936-b9ac-4141-b4ca-ae7d01402555"] }, Open ]], Cell[CellGroupData[{ -Cell[336303, 8598, 170, 5, 71, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], -Cell[336476, 8605, 171, 3, 41, "Output",ExpressionUUID->"265915a4-bf42-cc4a-850a-ff4e02169aa3"] +Cell[346945, 8606, 2233, 63, 212, "Input",ExpressionUUID->"c8039063-5f4d-134a-b6ba-e19335f7a9f6"], +Cell[349181, 8671, 592, 13, 82, "Message",ExpressionUUID->"2f4063e6-7eff-4a2a-81ed-2ee49c54910b"], +Cell[349776, 8686, 596, 13, 65, "Message",ExpressionUUID->"030d98dc-6d77-4957-84c4-cccfaa9c5728"], +Cell[350375, 8701, 599, 13, 65, "Message",ExpressionUUID->"16e01190-e176-410f-b21e-cab0defcbd1a"], +Cell[350977, 8716, 495, 11, 26, "Message",ExpressionUUID->"8ef7ae27-4ee2-45d5-a208-55b2ac0d2afc"], +Cell[351475, 8729, 195, 3, 33, "Output",ExpressionUUID->"0d49227f-a139-4710-be02-41b75ed584f5"] }, Open ]], Cell[CellGroupData[{ -Cell[336684, 8613, 181, 5, 55, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], -Cell[336868, 8620, 173, 3, 41, "Output",ExpressionUUID->"31530b6e-e89a-9145-8021-0dc6b1c7eda5"] +Cell[351707, 8737, 2235, 63, 212, "Input",ExpressionUUID->"a474307a-af78-3040-90ec-fb8d284b16bb"], +Cell[353945, 8802, 594, 13, 82, "Message",ExpressionUUID->"c86649c1-b5ea-4e38-9571-23da2a52a4b3"], +Cell[354542, 8817, 596, 13, 65, "Message",ExpressionUUID->"d6be977f-7887-4659-9e7c-6d15a45fa945"], +Cell[355141, 8832, 599, 13, 65, "Message",ExpressionUUID->"cc18792c-2d5c-4dda-b2d0-ad98db3af010"], +Cell[355743, 8847, 497, 11, 26, "Message",ExpressionUUID->"34eb282f-a311-4808-a6d3-bdcd1a6d0e5d"], +Cell[356243, 8860, 192, 3, 33, "Output",ExpressionUUID->"a7dec832-9073-40e8-b807-55605d8ed563"] }, Open ]], Cell[CellGroupData[{ -Cell[337078, 8628, 6055, 185, 431, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], -Cell[343136, 8815, 175, 3, 41, "Output",ExpressionUUID->"498f3df6-21c9-ce42-acfb-0b180bf5016e"] +Cell[356472, 8868, 236, 6, 46, "Input",ExpressionUUID->"ce14ed0e-a62a-1e46-b7cf-f67bfdbd9bc7"], +Cell[356711, 8876, 193, 3, 33, "Output",ExpressionUUID->"a4746040-5720-480b-8b3d-4ecdd8aab95a"] }, Open ]], +Cell[356919, 8882, 270, 6, 70, "Input",ExpressionUUID->"d104d373-080a-854b-92ff-e87abbd4c41c"], Cell[CellGroupData[{ -Cell[343348, 8823, 368, 9, 53, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], -Cell[343719, 8834, 172, 3, 41, "Output",ExpressionUUID->"7c93e621-3415-c743-b6e4-6e9478aa49a4"] +Cell[357214, 8892, 558, 19, 51, "Input",ExpressionUUID->"b6bc4645-bb9b-da49-b314-4566a6ca9506"], +Cell[357775, 8913, 195, 3, 33, "Output",ExpressionUUID->"cf91ca65-592d-4ab7-804a-aa0c0debef9e"] }, Open ]], Cell[CellGroupData[{ -Cell[343928, 8842, 6122, 187, 431, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], -Cell[350053, 9031, 173, 3, 41, "Output",ExpressionUUID->"ac3c9970-0aac-ba4f-878d-3a3d1e5e2e3e"] +Cell[358007, 8921, 170, 5, 55, "Input",ExpressionUUID->"1f225213-8143-a346-8c4e-e69f41e85c6f"], +Cell[358180, 8928, 192, 3, 33, "Output",ExpressionUUID->"2869f2c4-c691-47bf-aeba-59512323cb55"] }, Open ]], Cell[CellGroupData[{ -Cell[350263, 9039, 368, 9, 53, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], -Cell[350634, 9050, 170, 3, 41, "Output",ExpressionUUID->"d74ba3c3-6f35-614a-92df-d33bcc5e630d"] +Cell[358409, 8936, 181, 5, 43, "Input",ExpressionUUID->"4b9388d7-dfe0-ca44-90a4-ea60f173579a"], +Cell[358593, 8943, 195, 3, 33, "Output",ExpressionUUID->"196a1afd-04d5-4976-b70f-97a6f7499106"] }, Open ]], Cell[CellGroupData[{ -Cell[350841, 9058, 2663, 88, 215, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], -Cell[353507, 9148, 171, 3, 41, "Output",ExpressionUUID->"33da748c-8c98-4649-9b81-8e00dd5f5d44"] +Cell[358825, 8951, 6055, 185, 474, "Input",ExpressionUUID->"b0d5a77d-c2c5-e84d-b4be-bec051c1557c"], +Cell[364883, 9138, 199, 3, 33, "Output",ExpressionUUID->"87314af0-4267-47c5-8cdb-832cbcf845cf"] }, Open ]], Cell[CellGroupData[{ -Cell[353715, 9156, 2603, 85, 215, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], -Cell[356321, 9243, 171, 3, 41, "Output",ExpressionUUID->"a300919b-1d52-ed46-bc06-5e86812c0bf8"] +Cell[365119, 9146, 368, 9, 41, "Input",ExpressionUUID->"e543ccd6-d1e6-3c4d-9364-2a9eec09292b"], +Cell[365490, 9157, 195, 3, 33, "Output",ExpressionUUID->"10d9edf0-1e84-4be7-b219-de507a1c644b"] }, Open ]], Cell[CellGroupData[{ -Cell[356529, 9251, 3712, 118, 316, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], -Cell[360244, 9371, 170, 3, 109, "Output",ExpressionUUID->"45caa3aa-b655-b94b-bc88-ae750a9e28b8"] +Cell[365722, 9165, 6122, 187, 474, "Input",ExpressionUUID->"50e98a1c-f33a-9242-9267-bbd8a1753662"], +Cell[371847, 9354, 195, 3, 33, "Output",ExpressionUUID->"ddeed96a-75f3-49a8-bd04-db6e0847fb94"] }, Open ]], Cell[CellGroupData[{ -Cell[360451, 9379, 2052, 59, 109, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], -Cell[362506, 9440, 573, 12, 71, "Message",ExpressionUUID->"fdac5db3-60d6-7a42-93b8-a74d8fc5d39e"], -Cell[363082, 9454, 577, 12, 71, "Message",ExpressionUUID->"46e50c50-b3b4-9847-b413-3bf52122b53e"], -Cell[363662, 9468, 580, 12, 71, "Message",ExpressionUUID->"5df9105e-cc71-b049-a285-30acff0c246a"], -Cell[364245, 9482, 456, 10, 32, "Message",ExpressionUUID->"84079c6c-500c-0643-b357-e1da142371e6"], -Cell[364704, 9494, 170, 3, 41, "Output",ExpressionUUID->"8303ac5a-d080-3741-a2d8-b7ff63ccb029"] +Cell[372079, 9362, 368, 9, 41, "Input",ExpressionUUID->"339251a5-83bd-8642-8c5c-4fff9ebe10d7"], +Cell[372450, 9373, 194, 3, 33, "Output",ExpressionUUID->"ef414277-15a3-4878-9be0-d5a5b2f0c2fc"] }, Open ]], Cell[CellGroupData[{ -Cell[364911, 9502, 2054, 59, 116, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], -Cell[366968, 9563, 573, 12, 71, "Message",ExpressionUUID->"65ad7cc5-5634-7d43-8ec3-48fd3e044014"], -Cell[367544, 9577, 577, 12, 71, "Message",ExpressionUUID->"c7632c59-b44f-2c47-aaf4-873ba9758677"], -Cell[368124, 9591, 582, 12, 71, "Message",ExpressionUUID->"509e3117-7502-a34e-9f96-72b696066a2b"], -Cell[368709, 9605, 456, 10, 32, "Message",ExpressionUUID->"0e1f3a7a-70f7-bc47-9700-06e687643558"], -Cell[369168, 9617, 170, 3, 41, "Output",ExpressionUUID->"15bebbf4-baae-a44a-84b5-59b3a1f444c3"] +Cell[372681, 9381, 2663, 88, 285, "Input",ExpressionUUID->"ad1f9bb1-e9e6-5b4f-9f95-8eeef0cc66ae"], +Cell[375347, 9471, 196, 3, 33, "Output",ExpressionUUID->"14e52b48-8e20-4e9d-bba1-15d993fa5fc6"] }, Open ]], Cell[CellGroupData[{ -Cell[369375, 9625, 2028, 55, 63, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], -Cell[371406, 9682, 20422, 382, 295, "Output",ExpressionUUID->"d9c156b6-0b42-724f-8e7d-964560057978"] +Cell[375580, 9479, 2603, 85, 211, "Input",ExpressionUUID->"4b0fdfc8-7d81-3a4d-90ed-a9bb76dc96a0"], +Cell[378186, 9566, 195, 3, 33, "Output",ExpressionUUID->"df779e29-3a3e-45ee-b445-9c17d29afa9a"] }, Open ]], Cell[CellGroupData[{ -Cell[391865, 10069, 2120, 60, 109, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], -Cell[393988, 10131, 502, 11, 109, "Message",ExpressionUUID->"74b51561-a06a-7345-9196-225d76f7f21f"], -Cell[394493, 10144, 506, 11, 109, "Message",ExpressionUUID->"ee03248d-dd91-8b4e-835e-9c4a5f039c61"], -Cell[395002, 10157, 505, 11, 109, "Message",ExpressionUUID->"81d7736e-0167-fe4f-bd5c-40ffaca911e4"], -Cell[395510, 10170, 458, 10, 109, "Message",ExpressionUUID->"43062041-d596-b540-8a1c-36df0575e1f0"], -Cell[395971, 10182, 22288, 412, 109, "Output",ExpressionUUID->"4ce3b436-d895-8b48-899f-c7dec78bd5cd"] +Cell[378418, 9574, 3712, 118, 327, "Input",ExpressionUUID->"31524ab0-bcc9-e948-9393-cfc225600ff2"], +Cell[382133, 9694, 193, 3, 33, "Output",ExpressionUUID->"97326dbd-8b5d-4505-934a-70ab07cc266d"] }, Open ]], -Cell[418274, 10597, 209, 5, 109, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], Cell[CellGroupData[{ -Cell[418508, 10606, 1616, 48, 109, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], -Cell[420127, 10656, 595, 12, 109, "Message",ExpressionUUID->"bf4d283e-fed2-af41-90e7-a9b6911d8baf"], -Cell[420725, 10670, 595, 12, 71, "Message",ExpressionUUID->"9f6ca4d5-4251-0341-9c65-a603c68721f6"], -Cell[421323, 10684, 599, 12, 71, "Message",ExpressionUUID->"108eeaac-8397-bf4f-90a4-e14dbe759ebf"], -Cell[421925, 10698, 456, 10, 32, "Message",ExpressionUUID->"1a2f2a3c-e511-b846-8a84-9fad6555a680"], -Cell[422384, 10710, 171, 3, 41, "Output",ExpressionUUID->"ca1793f9-9753-5e46-b385-c8dd36228fd1"] +Cell[382363, 9702, 2075, 59, 234, "Input",ExpressionUUID->"486d514f-ec65-1e4e-b780-7e9487f745c3"], +Cell[384441, 9763, 581, 13, 58, "Message",ExpressionUUID->"1ba7e1da-d206-4187-befd-b22c7a27bd33"], +Cell[385025, 9778, 585, 13, 58, "Message",ExpressionUUID->"e3c1d2fb-63db-4331-84bb-b488a72c46a0"], +Cell[385613, 9793, 587, 13, 58, "Message",ExpressionUUID->"12bbad55-7ee4-46ae-bd6d-22b7750b59e8"], +Cell[386203, 9808, 493, 11, 26, "Message",ExpressionUUID->"60af078e-d1fe-4bb3-8339-f7f9e5ffb564"], +Cell[386699, 9821, 192, 3, 33, "Output",ExpressionUUID->"06326600-4328-428f-8563-43c3046d03cd"] }, Open ]], Cell[CellGroupData[{ -Cell[422592, 10718, 2248, 64, 81, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], -Cell[424843, 10784, 575, 12, 71, "Message",ExpressionUUID->"642a7168-3d33-6b4e-9213-0f67bfd30f54"], -Cell[425421, 10798, 577, 12, 71, "Message",ExpressionUUID->"315984db-f497-2940-bd36-1d820037ad00"], -Cell[426001, 10812, 582, 12, 71, "Message",ExpressionUUID->"2698bbc8-6aa1-c54b-9b5c-3f71a7eb3345"], -Cell[426586, 10826, 458, 10, 32, "Message",ExpressionUUID->"7f632647-49b8-a945-8682-8e4f7ae37cda"], -Cell[427047, 10838, 172, 3, 41, "Output",ExpressionUUID->"0f5bf0f0-4e96-2c4d-9011-c6ae92f19c83"] +Cell[386928, 9829, 2077, 59, 234, "Input",ExpressionUUID->"c7144ce5-8356-d548-8854-18c538c3321c"], +Cell[389008, 9890, 583, 13, 58, "Message",ExpressionUUID->"4d791d4f-970d-4381-a730-81f86f03e21b"], +Cell[389594, 9905, 585, 13, 58, "Message",ExpressionUUID->"ca7625db-5289-4c95-a1ba-d702d8533006"], +Cell[390182, 9920, 589, 13, 58, "Message",ExpressionUUID->"64e17706-c4d2-4914-a789-45330c2a4c4d"], +Cell[390774, 9935, 493, 11, 26, "Message",ExpressionUUID->"a66a4b11-5332-476e-bae7-419d1d9f4c0b"], +Cell[391270, 9948, 193, 3, 33, "Output",ExpressionUUID->"d8b6a1fd-eca4-4edc-934b-69c1a4ef0359"] }, Open ]], Cell[CellGroupData[{ -Cell[427256, 10846, 2215, 63, 81, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], -Cell[429474, 10911, 575, 12, 71, "Message",ExpressionUUID->"704bc64b-0e53-8146-9696-c0e9ea00ec4d"], -Cell[430052, 10925, 577, 12, 71, "Message",ExpressionUUID->"68985ea1-064e-2c42-b957-ce16147f9e13"], -Cell[430632, 10939, 582, 12, 71, "Message",ExpressionUUID->"48a38db6-6d68-6140-9cb6-9dfc686aa062"], -Cell[431217, 10953, 458, 10, 109, "Message",ExpressionUUID->"ac6e6758-d573-7947-b88c-92831bb5be70"], -Cell[431678, 10965, 170, 3, 109, "Output",ExpressionUUID->"4d1b179c-7677-2745-8308-576346b6bf0b"] +Cell[391500, 9956, 2051, 55, 151, "Input",ExpressionUUID->"b2db949b-a7b9-8f4b-afbd-a45df2eabf0c"], +Cell[393554, 10013, 20447, 384, 232, "Output",ExpressionUUID->"a9638e74-5a0b-4265-b3ca-84e7eac3d699"] }, Open ]], Cell[CellGroupData[{ -Cell[431885, 10973, 2223, 64, 109, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], -Cell[434111, 11039, 573, 12, 109, "Message",ExpressionUUID->"0a9cfe95-3a6f-384b-8656-bdf67695e5d7"], -Cell[434687, 11053, 577, 12, 109, "Message",ExpressionUUID->"700ebedb-417e-8043-ab89-eb4672a7847d"], -Cell[435267, 11067, 580, 12, 109, "Message",ExpressionUUID->"599826a9-6d60-6843-9eef-e381cafa0758"], -Cell[435850, 11081, 456, 10, 109, "Message",ExpressionUUID->"d92d3772-b819-d145-8d96-f897b04ae4a7"], -Cell[436309, 11093, 173, 3, 109, "Output",ExpressionUUID->"98a57fa3-05ea-0d42-95b5-58c14727d753"] +Cell[414038, 10402, 2143, 60, 261, "Input",ExpressionUUID->"92d458c4-bfde-c447-a06c-70a15768b745"], +Cell[416184, 10464, 535, 12, 58, "Message",ExpressionUUID->"d6ceb698-c8f5-4541-86bd-2cf9baf8a661"], +Cell[416722, 10478, 537, 12, 58, "Message",ExpressionUUID->"6ae788b3-1111-4de6-8f85-dfc74c734b7e"], +Cell[417262, 10492, 539, 12, 58, "Message",ExpressionUUID->"fde237c2-b11e-4a70-b249-ec3ce51e8e08"], +Cell[417804, 10506, 495, 11, 26, "Message",ExpressionUUID->"25e804c7-6db3-44ce-92ea-adea27fdb6d0"], +Cell[418302, 10519, 22405, 414, 232, "Output",ExpressionUUID->"8092dc47-7944-4661-8879-e7ea13a7bb57"] }, Open ]], Cell[CellGroupData[{ -Cell[436519, 11101, 213, 6, 109, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], -Cell[436735, 11109, 173, 3, 109, "Output",ExpressionUUID->"ea5023c6-5364-074e-904d-43b5c1077635"] +Cell[440744, 10938, 232, 5, 29, "Input",ExpressionUUID->"e1c8585a-8b57-f841-82e1-8e8787fb2589"], +Cell[440979, 10945, 28789, 546, 232, "Output",ExpressionUUID->"cdd9aa82-1d5e-4038-a7ad-3d5af6cd5db0"] }, Open ]], -Cell[436923, 11115, 247, 5, 109, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ -Cell[437195, 11124, 558, 19, 66, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], -Cell[437756, 11145, 173, 3, 41, "Output",ExpressionUUID->"b967ea88-4a73-d84a-86f5-ad4ded7dfd59"] +Cell[469805, 11496, 1616, 48, 104, "Input",ExpressionUUID->"8cd26316-ef9d-184c-93c8-dd96bfd24ea1"], +Cell[471424, 11546, 727, 15, 63, "Message",ExpressionUUID->"fd7b4cf0-3233-4644-aa5a-098b7c77fdc5"], +Cell[472154, 11563, 728, 15, 63, "Message",ExpressionUUID->"ef556910-5c48-41bf-99ba-49897f77360c"], +Cell[472885, 11580, 728, 15, 63, "Message",ExpressionUUID->"6d2f8575-512b-45a5-a109-5d22a62163c8"], +Cell[473616, 11597, 495, 11, 26, "Message",ExpressionUUID->"86115c22-cd5f-474f-8431-eae5e759b8be"], +Cell[474114, 11610, 195, 3, 33, "Output",ExpressionUUID->"5a8645ec-88e7-4827-a6b0-2dd1c72f19f0"] }, Open ]], Cell[CellGroupData[{ -Cell[437966, 11153, 170, 5, 71, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], -Cell[438139, 11160, 173, 3, 41, "Output",ExpressionUUID->"fd8ea80a-f1d4-be4f-9cfa-b37871c5703d"] +Cell[474346, 11618, 2271, 64, 212, "Input",ExpressionUUID->"e0ae6f48-c6a6-a24c-812a-30286a178ca1"], +Cell[476620, 11684, 583, 13, 58, "Message",ExpressionUUID->"20c2b733-ce3c-4ce5-b2e4-81fc9be75446"], +Cell[477206, 11699, 589, 13, 58, "Message",ExpressionUUID->"79f8a3d4-d492-4161-958b-71305e67cfa0"], +Cell[477798, 11714, 591, 13, 58, "Message",ExpressionUUID->"e93981a9-cd3c-4582-8be9-d1009226da24"], +Cell[478392, 11729, 497, 11, 26, "Message",ExpressionUUID->"f373df2b-e909-4a30-8e95-d656981d1fcc"], +Cell[478892, 11742, 195, 3, 33, "Output",ExpressionUUID->"f377595c-a478-4aa5-9811-83df0af9d8b8"] }, Open ]], Cell[CellGroupData[{ -Cell[438349, 11168, 181, 5, 55, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], -Cell[438533, 11175, 173, 3, 41, "Output",ExpressionUUID->"7d039035-dcf9-ec46-abdb-20c0c777b3ef"] +Cell[479124, 11750, 2229, 63, 212, "Input",ExpressionUUID->"bce0eb71-ca49-364f-a3be-8e8c3542c5fb"], +Cell[481356, 11815, 585, 13, 58, "Message",ExpressionUUID->"f89fa426-4284-448c-a1e0-55ecb1d7e0d9"], +Cell[481944, 11830, 587, 13, 58, "Message",ExpressionUUID->"54c8f531-f71b-4f71-bef6-bf5dfcaa69de"], +Cell[482534, 11845, 591, 13, 58, "Message",ExpressionUUID->"41614a05-0907-47a1-980d-868672ef0cb6"], +Cell[483128, 11860, 495, 11, 26, "Message",ExpressionUUID->"01d8e406-c052-4a41-ad88-5072f3e70442"], +Cell[483626, 11873, 195, 3, 33, "Output",ExpressionUUID->"326ae4f6-5dc6-4d90-9f61-42e6506aef0c"] }, Open ]], Cell[CellGroupData[{ -Cell[438743, 11183, 6055, 185, 431, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], -Cell[444801, 11370, 172, 3, 41, "Output",ExpressionUUID->"ec08a5f9-ba46-9147-9d7b-cc1decdb981f"] +Cell[483858, 11881, 2235, 63, 212, "Input",ExpressionUUID->"935796a8-6280-564a-b4d0-fc6fb6cd41f8"], +Cell[486096, 11946, 581, 13, 58, "Message",ExpressionUUID->"535d6794-44d7-42d8-bee0-2f1c6bda7ca6"], +Cell[486680, 11961, 585, 13, 58, "Message",ExpressionUUID->"d312e438-9f68-41a3-9f84-be640ec2b1be"], +Cell[487268, 11976, 587, 13, 58, "Message",ExpressionUUID->"3517a885-2d7b-4579-81df-ed709265d372"], +Cell[487858, 11991, 493, 11, 26, "Message",ExpressionUUID->"4261dea9-a99b-4703-97b5-83952dee26a0"], +Cell[488354, 12004, 197, 3, 33, "Output",ExpressionUUID->"806e48d6-8fae-45f0-81f2-09e08c46e4b8"] }, Open ]], Cell[CellGroupData[{ -Cell[445010, 11378, 368, 9, 53, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], -Cell[445381, 11389, 172, 3, 41, "Output",ExpressionUUID->"71ad1ede-d77d-ee46-a908-e7b20c10ebe8"] +Cell[488588, 12012, 236, 6, 46, "Input",ExpressionUUID->"ee52036b-90c5-e14a-aed9-684ff23ed035"], +Cell[488827, 12020, 196, 3, 33, "Output",ExpressionUUID->"0c659b60-f2b7-4d2f-9c9c-632625041f7f"] }, Open ]], +Cell[489038, 12026, 273, 6, 70, "Input",ExpressionUUID->"c6d4a146-4cca-7e4e-b483-85227a6e6b51"], Cell[CellGroupData[{ -Cell[445590, 11397, 6122, 187, 109, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], -Cell[451715, 11586, 173, 3, 109, "Output",ExpressionUUID->"819de60b-5785-6448-8fe2-0db5976d700d"] +Cell[489336, 12036, 558, 19, 51, "Input",ExpressionUUID->"28979542-d43a-e54a-88e0-087a68060d62"], +Cell[489897, 12057, 194, 3, 33, "Output",ExpressionUUID->"42314251-e6dc-4645-a0cd-96bb491e0d85"] }, Open ]], Cell[CellGroupData[{ -Cell[451925, 11594, 368, 9, 109, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], -Cell[452296, 11605, 170, 3, 109, "Output",ExpressionUUID->"8dd6a8d3-1dbb-0d4a-9edc-e78196c49a86"] +Cell[490128, 12065, 170, 5, 55, "Input",ExpressionUUID->"c3303a76-2bd9-454b-b35d-6119cde0197e"], +Cell[490301, 12072, 193, 3, 33, "Output",ExpressionUUID->"eab6c997-3811-4514-a47b-ef56ccd94fb2"] }, Open ]], Cell[CellGroupData[{ -Cell[452503, 11613, 2663, 88, 215, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], -Cell[455169, 11703, 171, 3, 41, "Output",ExpressionUUID->"ae861452-cf77-f740-9f62-141306c9a07a"] +Cell[490531, 12080, 181, 5, 43, "Input",ExpressionUUID->"b83c9900-e14a-064d-b097-089d758a0eb6"], +Cell[490715, 12087, 195, 3, 33, "Output",ExpressionUUID->"60feb359-e98b-4419-b53a-ee880d652e63"] }, Open ]], Cell[CellGroupData[{ -Cell[455377, 11711, 2603, 85, 215, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], -Cell[457983, 11798, 173, 3, 41, "Output",ExpressionUUID->"253d4a43-9313-5444-b0f9-3aae32edd842"] +Cell[490947, 12095, 6055, 185, 474, "Input",ExpressionUUID->"17437a0c-d9be-a242-b57f-efef95056982"], +Cell[497005, 12282, 195, 3, 33, "Output",ExpressionUUID->"4373a55b-95b1-4732-8407-8ba99b0b4154"] }, Open ]], Cell[CellGroupData[{ -Cell[458193, 11806, 3712, 118, 316, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], -Cell[461908, 11926, 173, 3, 41, "Output",ExpressionUUID->"0c1e1373-3726-9c43-862b-62a8708f83a9"] +Cell[497237, 12290, 368, 9, 41, "Input",ExpressionUUID->"b3706ed1-2e71-9941-86c4-d789cf8ea193"], +Cell[497608, 12301, 197, 3, 33, "Output",ExpressionUUID->"bf18d633-c3c6-42b5-b58f-6cd53f1f3f80"] }, Open ]], Cell[CellGroupData[{ -Cell[462118, 11934, 2052, 59, 116, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], -Cell[464173, 11995, 568, 12, 71, "Message",ExpressionUUID->"d55599c5-2bb2-8f4a-a245-aa6d5998cb8f"], -Cell[464744, 12009, 573, 12, 71, "Message",ExpressionUUID->"bdcd3bac-beba-5242-b376-95b5ed40a02a"], -Cell[465320, 12023, 576, 12, 71, "Message",ExpressionUUID->"b91a3ff7-a025-fd4e-b11c-58fa6385068b"], -Cell[465899, 12037, 458, 10, 32, "Message",ExpressionUUID->"9e66d374-59c2-ce4b-b0d2-5a3813a10542"], -Cell[466360, 12049, 172, 3, 41, "Output",ExpressionUUID->"5742ee33-8e4b-444c-91b6-6d4c403c91e9"] +Cell[497842, 12309, 6122, 187, 474, "Input",ExpressionUUID->"2dad5775-7b90-2241-a408-e59b2ea47cb0"], +Cell[503967, 12498, 194, 3, 33, "Output",ExpressionUUID->"cb3b1aa4-b8b0-4b79-a67b-1579519a821c"] }, Open ]], Cell[CellGroupData[{ -Cell[466569, 12057, 2052, 59, 116, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], -Cell[468624, 12118, 568, 12, 71, "Message",ExpressionUUID->"49d9e2db-79aa-5b48-897e-3089c92c79b4"], -Cell[469195, 12132, 573, 12, 71, "Message",ExpressionUUID->"2361061c-25a8-4549-ba9e-397593d876d4"], -Cell[469771, 12146, 574, 12, 71, "Message",ExpressionUUID->"a2993171-fcd7-8742-bf17-921d87bded0b"], -Cell[470348, 12160, 458, 10, 32, "Message",ExpressionUUID->"c72ccd11-884d-074a-bf1c-ed71d6dc6298"], -Cell[470809, 12172, 172, 3, 109, "Output",ExpressionUUID->"9dfb51ec-f6bd-9540-91f7-9d4800c6c680"] +Cell[504198, 12506, 368, 9, 41, "Input",ExpressionUUID->"ea913ab0-daa5-1f4d-93f4-2e6143537b5d"], +Cell[504569, 12517, 191, 3, 33, "Output",ExpressionUUID->"9d8e94cb-6f60-40ab-aec4-8a26dc7017a9"] }, Open ]], Cell[CellGroupData[{ -Cell[471018, 12180, 2028, 55, 109, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], -Cell[473049, 12237, 20375, 384, 109, "Output",ExpressionUUID->"e400bdb6-95ee-464e-9e4c-d5d7da48485f"] +Cell[504797, 12525, 2663, 88, 285, "Input",ExpressionUUID->"53a0bfe7-010b-d445-822a-52c57127f779"], +Cell[507463, 12615, 194, 3, 33, "Output",ExpressionUUID->"b7f034eb-77b2-40bf-8c12-1bca8be59ecf"] }, Open ]], Cell[CellGroupData[{ -Cell[493461, 12626, 2118, 60, 109, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], -Cell[495582, 12688, 501, 11, 109, "Message",ExpressionUUID->"1c59fae3-3f74-0144-b936-915cf372347d"], -Cell[496086, 12701, 503, 11, 109, "Message",ExpressionUUID->"c058b3d2-ecc0-7348-bdec-143a71e7f77c"], -Cell[496592, 12714, 506, 11, 109, "Message",ExpressionUUID->"049ee41e-a5fd-7e46-9ca5-37402fcadc74"], -Cell[497101, 12727, 458, 10, 109, "Message",ExpressionUUID->"5bf93938-89e6-8d49-a495-6173a8c36739"], -Cell[497562, 12739, 22161, 409, 109, "Output",ExpressionUUID->"0ea0f8f9-2a4b-804f-a2c8-287645f62313"] +Cell[507694, 12623, 2603, 85, 211, "Input",ExpressionUUID->"4e482268-3ff3-d74a-9ba6-ed262245ad4b"], +Cell[510300, 12710, 195, 3, 33, "Output",ExpressionUUID->"cd410458-3a26-47dd-8f23-2623fc376223"] }, Open ]], -Cell[519738, 13151, 209, 5, 109, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], Cell[CellGroupData[{ -Cell[519972, 13160, 1616, 48, 109, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], -Cell[521591, 13210, 590, 12, 71, "Message",ExpressionUUID->"cb4665e4-f252-8e4c-9d71-b694fbe7aa53"], -Cell[522184, 13224, 589, 12, 71, "Message",ExpressionUUID->"e67b353a-d4a9-454a-9cac-3e22ef8a4d4b"], -Cell[522776, 13238, 593, 12, 71, "Message",ExpressionUUID->"9dbc6a20-c95c-084e-b19f-b6bb6bd70d6b"], -Cell[523372, 13252, 456, 10, 32, "Message",ExpressionUUID->"f9b6cbc5-ab52-2741-b8bf-bf6796495def"], -Cell[523831, 13264, 170, 3, 41, "Output",ExpressionUUID->"1439e238-af89-2243-beb8-0a46e5e09115"] +Cell[510532, 12718, 3712, 118, 327, "Input",ExpressionUUID->"df39eab0-0939-764b-8de6-27d0ba2be7e8"], +Cell[514247, 12838, 196, 3, 33, "Output",ExpressionUUID->"24986dd5-cbb7-4888-a18f-e214dbe07c5a"] }, Open ]], Cell[CellGroupData[{ -Cell[524038, 13272, 2251, 64, 81, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], -Cell[526292, 13338, 568, 12, 71, "Message",ExpressionUUID->"033374a1-a008-6240-84e3-c1c7a7e65b75"], -Cell[526863, 13352, 573, 12, 71, "Message",ExpressionUUID->"88ab6d85-4789-7346-aeee-8e9a4b87248d"], -Cell[527439, 13366, 574, 12, 71, "Message",ExpressionUUID->"051100a9-488b-4d4d-83c7-cdc54aef13e0"], -Cell[528016, 13380, 458, 10, 32, "Message",ExpressionUUID->"a33cd954-f1de-bf45-8642-effd7c3e029f"], -Cell[528477, 13392, 173, 3, 41, "Output",ExpressionUUID->"48a4017b-948a-6a48-8b10-d81adf4b9038"] +Cell[514480, 12846, 2075, 59, 234, "Input",ExpressionUUID->"6b25ec99-ae49-ec4d-9652-65328572e509"], +Cell[516558, 12907, 584, 13, 58, "Message",ExpressionUUID->"94789dc9-ef0e-47dc-a03c-16570220cbc1"], +Cell[517145, 12922, 587, 13, 58, "Message",ExpressionUUID->"5e5a36ea-c056-446a-a243-e0d9df7e8d42"], +Cell[517735, 12937, 594, 13, 82, "Message",ExpressionUUID->"78d1801c-4097-46a0-9833-27dcf26ef6f6"], +Cell[518332, 12952, 493, 11, 26, "Message",ExpressionUUID->"7973d7e7-016c-4208-990a-d09ad441b4ff"], +Cell[518828, 12965, 195, 3, 33, "Output",ExpressionUUID->"12c2ca10-44d0-4225-a7da-f19c26c9c565"] }, Open ]], Cell[CellGroupData[{ -Cell[528687, 13400, 2221, 64, 81, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], -Cell[530911, 13466, 570, 12, 71, "Message",ExpressionUUID->"d8156b3f-4442-9146-9c48-cb34fdfb79d3"], -Cell[531484, 13480, 573, 12, 71, "Message",ExpressionUUID->"60007a19-2492-cd46-a203-7c2bbbc6591f"], -Cell[532060, 13494, 573, 12, 71, "Message",ExpressionUUID->"8754c4a5-0539-0247-94a5-8a81a9ae7e49"], -Cell[532636, 13508, 458, 10, 32, "Message",ExpressionUUID->"3af4c7f8-fe90-6646-8e3b-058500b348e9"], -Cell[533097, 13520, 171, 3, 41, "Output",ExpressionUUID->"46f7d520-9bcf-9d48-ae7c-54e91ca06983"] +Cell[519060, 12973, 2075, 59, 234, "Input",ExpressionUUID->"3e2baf62-fab9-eb41-8de7-aa229443ac14"], +Cell[521138, 13034, 583, 13, 58, "Message",ExpressionUUID->"f79ffd36-8579-4e4b-abcc-a5e41058556b"], +Cell[521724, 13049, 587, 13, 58, "Message",ExpressionUUID->"8233adbd-36ad-43d4-bf51-2ea3c8f03518"], +Cell[522314, 13064, 594, 13, 82, "Message",ExpressionUUID->"f246a0d8-e5d7-4842-88bc-d352d9a4954c"], +Cell[522911, 13079, 492, 11, 26, "Message",ExpressionUUID->"c2bdf3b1-e8ff-46a9-9d24-ea8bce5466e3"], +Cell[523406, 13092, 197, 3, 33, "Output",ExpressionUUID->"5bf9c1c9-5511-4967-ac10-1e8969af9ad6"] }, Open ]], Cell[CellGroupData[{ -Cell[533305, 13528, 2221, 64, 81, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], -Cell[535529, 13594, 570, 12, 71, "Message",ExpressionUUID->"ba4db233-5a2e-4340-98d0-df918a11e2c7"], -Cell[536102, 13608, 573, 12, 71, "Message",ExpressionUUID->"444b24ca-68bb-7144-a655-403eefa4900f"], -Cell[536678, 13622, 574, 12, 71, "Message",ExpressionUUID->"f2dc2286-68d4-d74f-83ea-dd0f591156a8"], -Cell[537255, 13636, 458, 10, 32, "Message",ExpressionUUID->"4974a702-c238-6d47-b5b2-a3c25cacf142"], -Cell[537716, 13648, 173, 3, 41, "Output",ExpressionUUID->"d46043b7-707b-4740-ab89-0a2b96978cff"] +Cell[523640, 13100, 2051, 55, 151, "Input",ExpressionUUID->"725c3011-bda9-4c42-96ce-9a77a5dc787c"], +Cell[525694, 13157, 20257, 383, 236, "Output",ExpressionUUID->"d3acdaf8-fd6d-46b7-b6f7-9e169620789b"] }, Open ]], Cell[CellGroupData[{ -Cell[537926, 13656, 215, 6, 60, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], -Cell[538144, 13664, 172, 3, 41, "Output",ExpressionUUID->"188c2681-ea17-924e-adb2-007b19a9ee86"] +Cell[545988, 13545, 2141, 60, 261, "Input",ExpressionUUID->"1ea503b1-33a1-2744-a92d-2e1269faf5ed"], +Cell[548132, 13607, 537, 12, 58, "Message",ExpressionUUID->"80ea7954-ac51-4fb7-a741-ed7e13dfbc39"], +Cell[548672, 13621, 540, 12, 58, "Message",ExpressionUUID->"9bffbeda-1183-4300-b270-bab2b98b14dd"], +Cell[549215, 13635, 542, 12, 58, "Message",ExpressionUUID->"e92b4dde-6486-451a-ac5e-d1951a03480e"], +Cell[549760, 13649, 495, 11, 26, "Message",ExpressionUUID->"5ac7e860-cfa7-42df-a602-42cea5b9f6d2"], +Cell[550258, 13662, 21838, 405, 232, "Output",ExpressionUUID->"3adb5e8b-80d0-41ae-8e26-6ea52c6cb310"] }, Open ]], -Cell[538331, 13670, 115, 1, 36, "Input",ExpressionUUID->"ee676f20-cb04-4514-a345-3267f7ec3f62"] +Cell[CellGroupData[{ +Cell[572133, 14072, 232, 5, 29, "Input",ExpressionUUID->"b530b35f-2a32-0145-82a7-25a7a01bdd8f"], +Cell[572368, 14079, 28220, 537, 232, "Output",ExpressionUUID->"00aa4ec8-ae90-4aac-a7e2-0defcfea5400"] +}, Open ]], +Cell[CellGroupData[{ +Cell[600625, 14621, 1616, 48, 104, "Input",ExpressionUUID->"a0d63734-417a-b84f-b5c7-88ca33cb9355"], +Cell[602244, 14671, 726, 15, 63, "Message",ExpressionUUID->"fc6c2da8-f096-49c1-b5e8-7d02945fa296"], +Cell[602973, 14688, 726, 15, 63, "Message",ExpressionUUID->"895b08fa-2dad-43f3-8e66-690cffa8de23"], +Cell[603702, 14705, 727, 15, 63, "Message",ExpressionUUID->"ed9a042d-048f-4f3d-b2fa-4cf9385abd70"], +Cell[604432, 14722, 494, 11, 26, "Message",ExpressionUUID->"a37aa6e4-c4d1-4844-babd-0f07fae6ff93"], +Cell[604929, 14735, 193, 3, 33, "Output",ExpressionUUID->"3e2af6f7-d2eb-44be-899f-048e110bde02"] +}, Open ]], +Cell[CellGroupData[{ +Cell[605159, 14743, 2274, 64, 212, "Input",ExpressionUUID->"97b28b29-5d04-5c42-a0e8-93b70f20e7f6"], +Cell[607436, 14809, 586, 13, 58, "Message",ExpressionUUID->"80fb75a2-486d-4436-b520-5b74d4c4c34b"], +Cell[608025, 14824, 589, 13, 58, "Message",ExpressionUUID->"b4fc887f-2b9f-4356-9fed-2cdf219b1c56"], +Cell[608617, 14839, 594, 13, 82, "Message",ExpressionUUID->"d016d551-277d-4507-9cc8-62ed0a0f6e10"], +Cell[609214, 14854, 495, 11, 26, "Message",ExpressionUUID->"a2b580ae-4fe4-4c1c-aa59-3467c18273dc"], +Cell[609712, 14867, 198, 3, 33, "Output",ExpressionUUID->"172751f7-35b1-47ea-9e06-04e6c3a4ae9e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[609947, 14875, 2233, 63, 212, "Input",ExpressionUUID->"f9d1ad25-05cb-d544-8ab6-cdce838d9efe"], +Cell[612183, 14940, 584, 13, 58, "Message",ExpressionUUID->"9531ed09-d318-4cb7-a5a0-6c796c2e12e9"], +Cell[612770, 14955, 589, 13, 58, "Message",ExpressionUUID->"9fcb04f1-dac2-4686-89fc-c09b465edbdd"], +Cell[613362, 14970, 594, 13, 82, "Message",ExpressionUUID->"fb889533-1334-41e6-b23a-b5ef1269c477"], +Cell[613959, 14985, 495, 11, 26, "Message",ExpressionUUID->"b499ec20-d312-4bf8-985a-109acde7d1b4"], +Cell[614457, 14998, 192, 3, 33, "Output",ExpressionUUID->"d9ec8277-0c72-4e6d-a42c-9a203a18b9d1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[614686, 15006, 2233, 63, 212, "Input",ExpressionUUID->"0794d062-69d5-0a45-936e-533b19d33de6"], +Cell[616922, 15071, 588, 13, 58, "Message",ExpressionUUID->"2f014ec2-6944-4aef-a4a8-f848953ec83b"], +Cell[617513, 15086, 591, 13, 58, "Message",ExpressionUUID->"7660ebe5-98a7-4d0e-8509-87e013795451"], +Cell[618107, 15101, 594, 13, 82, "Message",ExpressionUUID->"2d80de3d-0dc0-4848-94ea-4e7b1509c847"], +Cell[618704, 15116, 495, 11, 26, "Message",ExpressionUUID->"a229fbf5-c79f-48bf-8b60-4e1a8b553513"], +Cell[619202, 15129, 194, 3, 33, "Output",ExpressionUUID->"b0147667-f27d-491a-9af1-4013d97851c1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[619433, 15137, 238, 6, 46, "Input",ExpressionUUID->"95c56266-e4d3-624e-89c1-cedeeeb0247a"], +Cell[619674, 15145, 197, 3, 33, "Output",ExpressionUUID->"8d7e90b8-da04-4169-90c1-c1181ab26530"] +}, Open ]], +Cell[619886, 15151, 143, 3, 70, "Input",ExpressionUUID->"ee676f20-cb04-4514-a345-3267f7ec3f62"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw1.nb b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw1.nb index 0c012e1..806f6e2 100644 --- a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw1.nb +++ b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw1.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 616445, 14932] -NotebookOptionsPosition[ 576623, 14301] -NotebookOutlinePosition[ 577063, 14319] -CellTagsIndexPosition[ 577020, 14316] +NotebookDataLength[ 686408, 16223] +NotebookOptionsPosition[ 645800, 15573] +NotebookOutlinePosition[ 646262, 15592] +CellTagsIndexPosition[ 646219, 15589] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,15 +26,13 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.994074211664226*^9, 3.994074212605893*^9}, { 3.994074246621201*^9, 3.994074265935053*^9}}, - CellLabel-> - "In[304]:=",ExpressionUUID->"c2303b07-bc1f-4c0b-99bd-0a177158c28a"], + CellLabel->"In[1]:=",ExpressionUUID->"c2303b07-bc1f-4c0b-99bd-0a177158c28a"], Cell[BoxData["1.95`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.994074196804253*^9, 3.994074214075809*^9}, { - 3.9940742497364883`*^9, 3.9940742697527313`*^9}}, - CellLabel-> - "Out[304]=",ExpressionUUID->"2535f57e-bf26-4668-82db-56fbf445e27d"] + 3.9940742497364883`*^9, 3.9940742697527313`*^9}, 3.994386346077837*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"4d3299b7-4395-49c8-8135-35c618728f2f"] }, Open ]], Cell[CellGroupData[{ @@ -43,15 +41,13 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940740226123867`*^9, 3.994074030397141*^9}}, - CellLabel-> - "In[305]:=",ExpressionUUID->"c76bbb61-80e8-4e41-aa3e-045340802fcf"], + CellLabel->"In[2]:=",ExpressionUUID->"c76bbb61-80e8-4e41-aa3e-045340802fcf"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.9940741968744993`*^9, 3.994074214306916*^9}, { - 3.994074249779564*^9, 3.9940742697936697`*^9}}, - CellLabel-> - "Out[305]=",ExpressionUUID->"b384378e-12c0-49e3-bc75-3a3a5c75e7a2"] + 3.994074249779564*^9, 3.9940742697936697`*^9}, 3.9943863461695633`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"39269716-2ece-4080-ac0d-f668378b6205"] }, Open ]], Cell[CellGroupData[{ @@ -60,15 +56,13 @@ Cell[BoxData[ RowBox[{"A1", "=", "172"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994074027305109*^9, 3.994074028074005*^9}}, - CellLabel-> - "In[306]:=",ExpressionUUID->"4dccf315-b74a-468f-8cc9-292e02e2be1d"], + CellLabel->"In[3]:=",ExpressionUUID->"4dccf315-b74a-468f-8cc9-292e02e2be1d"], Cell[BoxData["172"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994074196887857*^9, 3.994074214318638*^9}, { - 3.9940742497919416`*^9, 3.9940742698063602`*^9}}, - CellLabel-> - "Out[306]=",ExpressionUUID->"81f4a846-a137-45bf-b186-5e2aaacacf97"] + 3.9940742497919416`*^9, 3.9940742698063602`*^9}, 3.994386346211904*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"40de57fe-f9bd-4137-a443-33a2ece8c05a"] }, Open ]], Cell[CellGroupData[{ @@ -76,15 +70,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[307]:=",ExpressionUUID->"41706838-5a7e-480e-8ecc-91deb1799ebb"], + CellLabel->"In[4]:=",ExpressionUUID->"41706838-5a7e-480e-8ecc-91deb1799ebb"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.9940741969012012`*^9, 3.994074214329146*^9}, { - 3.9940742497961063`*^9, 3.994074269818478*^9}}, - CellLabel-> - "Out[307]=",ExpressionUUID->"dbf415d9-dfc4-4c33-b18e-4e3e8609746c"] + 3.9940742497961063`*^9, 3.994074269818478*^9}, 3.994386346225417*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"f3c9524d-bebb-4499-a7b9-3fc1ad996bcc"] }, Open ]], Cell[CellGroupData[{ @@ -96,30 +88,26 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[308]:=",ExpressionUUID->"480934a0-2012-422d-a8e9-e8bbcbc53832"], + CellLabel->"In[5]:=",ExpressionUUID->"480934a0-2012-422d-a8e9-e8bbcbc53832"], Cell[BoxData["0.5435000000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.9940741969137297`*^9, 3.99407421433959*^9}, { - 3.994074249812704*^9, 3.994074269830806*^9}}, - CellLabel-> - "Out[308]=",ExpressionUUID->"dfe62b03-5c81-4c96-bb08-c78f426d6fad"] + 3.994074249812704*^9, 3.994074269830806*^9}, 3.994386346238072*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"061a5c9d-b437-4133-9a32-9a9912d6ecbd"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[309]:=",ExpressionUUID->"67d260e5-c08f-47d1-90a6-f4f1ba36a0ac"], + CellLabel->"In[6]:=",ExpressionUUID->"67d260e5-c08f-47d1-90a6-f4f1ba36a0ac"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.9940741969249763`*^9, 3.994074214349977*^9}, { - 3.99407424982506*^9, 3.994074269834938*^9}}, - CellLabel-> - "Out[309]=",ExpressionUUID->"a15ca613-bf01-4fc1-a178-17b36650e893"] + 3.99407424982506*^9, 3.994074269834938*^9}, 3.994386346249877*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"b3861319-1aa2-4ea6-8a53-f1d9e6f56ee8"] }, Open ]], Cell[CellGroupData[{ @@ -130,15 +118,13 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[310]:=",ExpressionUUID->"1b4d3cca-08f9-42ed-924f-d60e0423521a"], + CellLabel->"In[7]:=",ExpressionUUID->"1b4d3cca-08f9-42ed-924f-d60e0423521a"], Cell[BoxData["6.451105409164632`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.994074196937035*^9, 3.994074214360525*^9}, { - 3.994074249837967*^9, 3.9940742698497963`*^9}}, - CellLabel-> - "Out[310]=",ExpressionUUID->"b3e3c8a2-5d81-4064-a688-c2b973c5a715"] + 3.994074249837967*^9, 3.9940742698497963`*^9}, 3.994386346264275*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"292d1754-f1bb-4e43-b7ef-34eb652d411a"] }, Open ]], Cell[CellGroupData[{ @@ -150,15 +136,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[311]:=",ExpressionUUID->"9bacfab7-dcc8-40db-a53c-d9e1773f8271"], + CellLabel->"In[8]:=",ExpressionUUID->"9bacfab7-dcc8-40db-a53c-d9e1773f8271"], Cell[BoxData["4.734719918224123`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.9940741969492617`*^9, 3.994074214370586*^9}, { - 3.994074249850299*^9, 3.994074269861824*^9}}, - CellLabel-> - "Out[311]=",ExpressionUUID->"da07f438-d638-440a-ae52-93e5e6b23074"] + 3.994074249850299*^9, 3.994074269861824*^9}, 3.9943863462793407`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"d33dedb2-bd89-49c0-9628-88202585c52f"] }, Open ]], Cell[CellGroupData[{ @@ -166,14 +150,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.852277809"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.9940740415240393`*^9}, - CellLabel-> - "In[312]:=",ExpressionUUID->"ec035fad-bd5f-44e3-8b33-fa345e8bbe79"], + CellLabel->"In[9]:=",ExpressionUUID->"ec035fad-bd5f-44e3-8b33-fa345e8bbe79"], Cell[BoxData["0.852277809`"], "Output", CellChangeTimes->{{3.994074196961275*^9, 3.994074214380481*^9}, { - 3.994074249862259*^9, 3.994074269873619*^9}}, - CellLabel-> - "Out[312]=",ExpressionUUID->"44175d84-1f4e-492f-b451-4c6700c6e9bc"] + 3.994074249862259*^9, 3.994074269873619*^9}, 3.994386346304751*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"631297b9-d6e5-4e1f-b2a4-a322d8760c6c"] }, Open ]], Cell[CellGroupData[{ @@ -181,44 +163,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3903505481"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.99407404519888*^9}, - CellLabel-> - "In[313]:=",ExpressionUUID->"b08fa886-95df-40f4-8692-86146cd9d966"], + CellLabel->"In[10]:=",ExpressionUUID->"b08fa886-95df-40f4-8692-86146cd9d966"], Cell[BoxData["0.3903505481`"], "Output", CellChangeTimes->{{3.99407419697276*^9, 3.9940742143904543`*^9}, { - 3.99407424987506*^9, 3.994074269885377*^9}}, - CellLabel-> - "Out[313]=",ExpressionUUID->"913047a3-1387-4baa-8aac-b84044f03d42"] + 3.99407424987506*^9, 3.994074269885377*^9}, 3.9943863463500547`*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"ece1537b-e5a4-475c-829e-b143545c51ef"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[314]:=",ExpressionUUID->"b73c65fb-1529-4ccc-9638-bb74fde5ccf4"], + CellLabel->"In[11]:=",ExpressionUUID->"b73c65fb-1529-4ccc-9638-bb74fde5ccf4"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.9940741969837933`*^9, 3.994074214400448*^9}, { - 3.994074249886661*^9, 3.994074269897275*^9}}, - CellLabel-> - "Out[314]=",ExpressionUUID->"fcc31659-2cf4-4e42-a252-e9fb7896e045"] + 3.994074249886661*^9, 3.994074269897275*^9}, 3.9943863463893433`*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"610c282c-7402-4389-b2ad-cb96e93d832f"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[315]:=",ExpressionUUID->"3e8baf51-d805-44b6-855b-1764a465b389"], + CellLabel->"In[12]:=",ExpressionUUID->"3e8baf51-d805-44b6-855b-1764a465b389"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.9940741969946527`*^9, 3.994074214410337*^9}, { - 3.9940742498968973`*^9, 3.994074269909542*^9}}, - CellLabel-> - "Out[315]=",ExpressionUUID->"d38b99d0-f98b-4117-9442-b30acc9610e7"] + 3.9940742498968973`*^9, 3.994074269909542*^9}, 3.994386346416757*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"a0b8a506-35dd-45fc-b368-204ff8f6591d"] }, Open ]], Cell[CellGroupData[{ @@ -242,15 +218,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"d9490fab-f768-4641-bcb4-2c07126465c9"], + CellLabel->"In[13]:=",ExpressionUUID->"d9490fab-f768-4641-bcb4-2c07126465c9"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.994074197005885*^9, 3.994074214421315*^9}, { - 3.994074249908176*^9, 3.994074269922103*^9}}, - CellLabel-> - "Out[316]=",ExpressionUUID->"869ce53b-c97c-4833-bc92-74e90e326041"] + 3.994074249908176*^9, 3.994074269922103*^9}, 3.9943863464511414`*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"7f53829b-95f1-4cf3-9ca7-23105a751a67"] }, Open ]], Cell[CellGroupData[{ @@ -274,15 +248,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[317]:=",ExpressionUUID->"5d6fd45e-371d-4730-8350-a00a9428aba0"], + CellLabel->"In[14]:=",ExpressionUUID->"5d6fd45e-371d-4730-8350-a00a9428aba0"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.994074197017363*^9, 3.994074214431409*^9}, { - 3.994074249918466*^9, 3.99407426993229*^9}}, - CellLabel-> - "Out[317]=",ExpressionUUID->"af44cb12-88b8-475e-a331-075d22b1c37a"] + 3.994074249918466*^9, 3.99407426993229*^9}, 3.994386346469533*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"d8d9a09a-0844-4099-9f5b-f69d772eca50"] }, Open ]], Cell[CellGroupData[{ @@ -337,15 +309,13 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[318]:=",ExpressionUUID->"c1675d26-29b6-435b-8507-450e1b9cd35c"], + CellLabel->"In[15]:=",ExpressionUUID->"c1675d26-29b6-435b-8507-450e1b9cd35c"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994074197029154*^9, 3.994074214441661*^9}, { - 3.9940742499280653`*^9, 3.994074269943099*^9}}, - CellLabel-> - "Out[318]=",ExpressionUUID->"c9658dd2-d5db-47aa-9c17-58632cc9938c"] + 3.9940742499280653`*^9, 3.994074269943099*^9}, 3.994386346501678*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"8e5fe495-95e4-4522-890f-7543f10063a7"] }, Open ]], Cell[CellGroupData[{ @@ -396,16 +366,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"62bd7499-b779-4a2e-b402-c6c116da6aa8"], + CellLabel->"In[16]:=",ExpressionUUID->"62bd7499-b779-4a2e-b402-c6c116da6aa8"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.9940741970396633`*^9, 3.994074214453579*^9}, { - 3.994074249938612*^9, 3.994074269953534*^9}}, - CellLabel-> - "Out[319]=",ExpressionUUID->"56b3374a-da47-4659-96ba-b0bf9da5c683"] + 3.994074249938612*^9, 3.994074269953534*^9}, 3.99438634651824*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"5f39960d-fff3-4923-a30d-424bac2aae38"] }, Open ]], Cell[CellGroupData[{ @@ -456,16 +424,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"a5027d85-6841-4605-aa82-c64a003259ea"], + CellLabel->"In[17]:=",ExpressionUUID->"a5027d85-6841-4605-aa82-c64a003259ea"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.994074197050289*^9, 3.994074214467175*^9}, { - 3.994074249949532*^9, 3.9940742699645767`*^9}}, - CellLabel-> - "Out[320]=",ExpressionUUID->"ae639116-fd58-4bec-8aa9-9aa5233e6f4f"] + 3.994074249949532*^9, 3.9940742699645767`*^9}, 3.994386346547435*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"8a4b9d0a-5f92-4299-aa88-02138dc74431"] }, Open ]], Cell[CellGroupData[{ @@ -520,60 +486,52 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"afa6c8b1-cee5-47e1-8c41-541d281afab3"], + CellLabel->"In[18]:=",ExpressionUUID->"afa6c8b1-cee5-47e1-8c41-541d281afab3"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994074197062862*^9, 3.99407421448357*^9}, { - 3.9940742499608793`*^9, 3.994074269975973*^9}}, - CellLabel-> - "Out[321]=",ExpressionUUID->"0bfba552-d95c-4e68-857a-64eda6622716"] + 3.9940742499608793`*^9, 3.994074269975973*^9}, 3.994386346569401*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"b3ae9849-d35d-4252-bd36-a6c004d5089b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"1cd55d90-845c-435a-a2f0-72bd3912dd11"], + CellLabel->"In[19]:=",ExpressionUUID->"1cd55d90-845c-435a-a2f0-72bd3912dd11"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.9940741970755367`*^9, 3.994074214495585*^9}, { - 3.994074249972097*^9, 3.9940742699872303`*^9}}, - CellLabel-> - "Out[322]=",ExpressionUUID->"c90ddf2e-406f-4ab1-ae03-d4d3598d5087"] + 3.994074249972097*^9, 3.9940742699872303`*^9}, 3.9943863465912724`*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"6bb0b78e-991c-45bb-b071-5f1abd737c88"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"98ce1876-70aa-439d-9843-8a6d50bcdb1a"], + CellLabel->"In[20]:=",ExpressionUUID->"98ce1876-70aa-439d-9843-8a6d50bcdb1a"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994074197089067*^9, 3.994074214507393*^9}, { - 3.99407424998314*^9, 3.994074269998393*^9}}, - CellLabel-> - "Out[323]=",ExpressionUUID->"334a305b-a7d4-41dd-a9f2-bd2a9e0f6f6b"] + 3.99407424998314*^9, 3.994074269998393*^9}, 3.994386346613141*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"ab1239de-26dd-4513-b7c5-dc1ce30d2eab"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"0e2fd10b-9b3d-49bd-97b4-f6aea055e53d"], + CellLabel->"In[21]:=",ExpressionUUID->"0e2fd10b-9b3d-49bd-97b4-f6aea055e53d"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940741971016483`*^9, 3.9940742145189466`*^9}, { - 3.994074249994322*^9, 3.994074270009439*^9}}, - CellLabel-> - "Out[324]=",ExpressionUUID->"a70bc9cf-1d40-4900-9f81-79f7c17c56ec"] + 3.994074249994322*^9, 3.994074270009439*^9}, 3.9943863466372023`*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"779e7d9a-a636-461f-a2a5-da030b53d3a8"] }, Open ]], Cell[CellGroupData[{ @@ -582,31 +540,27 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[325]:=",ExpressionUUID->"9b1b2d2c-f545-413e-a5d1-a9231ab40f19"], + CellLabel->"In[22]:=",ExpressionUUID->"9b1b2d2c-f545-413e-a5d1-a9231ab40f19"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.9940741971133337`*^9, 3.99407421453058*^9}, { - 3.994074250005796*^9, 3.994074270020775*^9}}, - CellLabel-> - "Out[325]=",ExpressionUUID->"57e37269-c73f-4f19-9995-1e69d30faad8"] + 3.994074250005796*^9, 3.994074270020775*^9}, 3.994386351061995*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"cc365f8c-3eec-4233-8362-a8bf533f9f1b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"b0dddbf6-264b-48b8-9f40-b12fc5cee44b"], + CellLabel->"In[23]:=",ExpressionUUID->"b0dddbf6-264b-48b8-9f40-b12fc5cee44b"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994074197124381*^9, 3.994074214542293*^9}, { - 3.994074250017613*^9, 3.9940742700324078`*^9}}, - CellLabel-> - "Out[326]=",ExpressionUUID->"034f4765-983f-4935-b497-40c57b64644d"] + 3.994074250017613*^9, 3.9940742700324078`*^9}, 3.994386351507976*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"ee920240-5d4b-488c-be4a-d42e2ec8ac03"] }, Open ]], Cell[CellGroupData[{ @@ -616,15 +570,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994074052479707*^9, 3.9940740526225157`*^9}}, - CellLabel-> - "In[327]:=",ExpressionUUID->"3e3a6b65-8e1b-4a52-89ef-25d15697523e"], + CellLabel->"In[24]:=",ExpressionUUID->"3e3a6b65-8e1b-4a52-89ef-25d15697523e"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.99407419713608*^9, 3.994074214545911*^9}, { - 3.994074250027919*^9, 3.99407427004285*^9}}, - CellLabel-> - "Out[327]=",ExpressionUUID->"cfb663c2-5472-4568-938a-3dfa357180e4"] + 3.994074250027919*^9, 3.99407427004285*^9}, 3.9943863515219793`*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"b879f1cf-c0ff-41db-a470-7c819b050987"] }, Open ]], Cell[CellGroupData[{ @@ -634,15 +586,13 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.99407405616786*^9, 3.994074056966621*^9}}, - CellLabel-> - "In[328]:=",ExpressionUUID->"0a2ff06c-c17e-4fc1-bf0b-6d86182e3c71"], + CellLabel->"In[25]:=",ExpressionUUID->"0a2ff06c-c17e-4fc1-bf0b-6d86182e3c71"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.994074197147298*^9, 3.99407421455849*^9}, { - 3.9940742500393*^9, 3.994074270054291*^9}}, - CellLabel-> - "Out[328]=",ExpressionUUID->"66ad5212-75b8-4f98-9784-8a7cb70cab6c"] + 3.9940742500393*^9, 3.994074270054291*^9}, 3.994386351538734*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"2a0f8a71-b65e-4c48-9f19-8ae141d93a88"] }, Open ]], Cell[CellGroupData[{ @@ -651,15 +601,13 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[329]:=",ExpressionUUID->"eca15aaf-a325-4ba0-aabe-531c8f755721"], + CellLabel->"In[26]:=",ExpressionUUID->"eca15aaf-a325-4ba0-aabe-531c8f755721"], Cell[BoxData["68"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.994074197159381*^9, 3.994074214569437*^9}, { - 3.9940742500504293`*^9, 3.9940742700651913`*^9}}, - CellLabel-> - "Out[329]=",ExpressionUUID->"92ca39f8-23c2-4734-8231-67432edf5ed4"] + 3.9940742500504293`*^9, 3.9940742700651913`*^9}, 3.994386351548588*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"31161537-91c0-4552-8187-9dc6b938b4e7"] }, Open ]], Cell[CellGroupData[{ @@ -674,15 +622,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"e4599ea3-3e3f-4bbb-ac77-1b2d986c01f5"], + CellLabel->"In[27]:=",ExpressionUUID->"e4599ea3-3e3f-4bbb-ac77-1b2d986c01f5"], Cell[BoxData["0.10723666210670314`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994074197172007*^9, 3.994074214580143*^9}, { - 3.994074250060562*^9, 3.9940742700753593`*^9}}, - CellLabel-> - "Out[330]=",ExpressionUUID->"d06b21d7-937b-4bca-85aa-d9de41d7785e"] + 3.994074250060562*^9, 3.9940742700753593`*^9}, 3.994386351562681*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"0e33393d-ac09-49e4-9aa6-7f896c802b5d"] }, Open ]], Cell[CellGroupData[{ @@ -697,16 +643,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"8682357b-84ee-4a81-aca7-f8d1992781e4"], + CellLabel->"In[28]:=",ExpressionUUID->"8682357b-84ee-4a81-aca7-f8d1992781e4"], Cell[BoxData[ RowBox[{"-", "2.5678385772913814`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994074197183957*^9, 3.994074214590371*^9}, { - 3.994074250071249*^9, 3.99407427008554*^9}}, - CellLabel-> - "Out[331]=",ExpressionUUID->"0eeef043-f790-44e7-b428-85706656778c"] + 3.994074250071249*^9, 3.99407427008554*^9}, 3.994386351576274*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"ad0455a9-a114-48fc-aa5b-624531ffdd79"] }, Open ]], Cell[CellGroupData[{ @@ -737,15 +681,13 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[332]:=",ExpressionUUID->"0548130b-a7f1-4bcf-90a2-d5e1ca2a41ac"], + CellLabel->"In[29]:=",ExpressionUUID->"0548130b-a7f1-4bcf-90a2-d5e1ca2a41ac"], Cell[BoxData["17.339463280274387`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994074197196582*^9, 3.9940742146010637`*^9}, { - 3.994074250082402*^9, 3.9940742700958967`*^9}}, - CellLabel-> - "Out[332]=",ExpressionUUID->"a1ab6c92-980d-44da-baff-b9d7d712495e"] + 3.994074250082402*^9, 3.9940742700958967`*^9}, 3.994386351586321*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"dee976ca-c490-4da9-95e1-82915780e650"] }, Open ]], Cell[CellGroupData[{ @@ -753,15 +695,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[333]:=",ExpressionUUID->"5feaa455-cd90-4a1b-bee3-013c233b1de6"], + CellLabel->"In[30]:=",ExpressionUUID->"5feaa455-cd90-4a1b-bee3-013c233b1de6"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.9940741972101183`*^9, 3.9940742146122723`*^9}, { - 3.994074250094462*^9, 3.994074270106193*^9}}, - CellLabel-> - "Out[333]=",ExpressionUUID->"10d3aaf5-d1dd-429f-9ebd-46ac46ad18ce"] + 3.994074250094462*^9, 3.994074270106193*^9}, 3.9943863515959578`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"b164d980-7aa2-4b89-9e77-bdfd52fb7b71"] }, Open ]], Cell[CellGroupData[{ @@ -771,20 +711,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994074073155587*^9, 3.994074075499446*^9}}, - CellLabel-> - "In[334]:=",ExpressionUUID->"819ee20a-afd4-4998-8541-13fb50299e39"], + CellLabel->"In[31]:=",ExpressionUUID->"819ee20a-afd4-4998-8541-13fb50299e39"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{{3.9940741972243557`*^9, 3.994074214623012*^9}, { - 3.994074250106516*^9, 3.9940742701165457`*^9}}, - CellLabel-> - "Out[334]=",ExpressionUUID->"0e516592-953a-4497-a59a-81e7a7c50ce9"] + 3.994074250106516*^9, 3.9940742701165457`*^9}, 3.994386351605453*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"d1147253-9b37-4038-8661-dfecd5ec5990"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[335]:=",ExpressionUUID->"c270b218-84a4-4d5d-98f9-efe8565909b8"], + CellLabel->"In[32]:=",ExpressionUUID->"c270b218-84a4-4d5d-98f9-efe8565909b8"], Cell[CellGroupData[{ @@ -793,20 +730,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994074078227497*^9, 3.9940740796275997`*^9}}, - CellLabel-> - "In[336]:=",ExpressionUUID->"e5efaf7e-1883-42e3-bb34-f0eec47110c6"], + CellLabel->"In[33]:=",ExpressionUUID->"e5efaf7e-1883-42e3-bb34-f0eec47110c6"], Cell[BoxData["0.765`"], "Output", CellChangeTimes->{{3.994074197245954*^9, 3.994074214636681*^9}, { - 3.9940742501222553`*^9, 3.99407427012961*^9}}, - CellLabel-> - "Out[336]=",ExpressionUUID->"fca8e291-a815-4b40-9ae5-6d638ea57cc0"] + 3.9940742501222553`*^9, 3.99407427012961*^9}, 3.994386351626336*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"13ae9676-b2a6-4f2c-9f37-36099a732df0"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[337]:=",ExpressionUUID->"c5389072-6286-4e69-a64a-8a3980f643e5"], + CellLabel->"In[34]:=",ExpressionUUID->"c5389072-6286-4e69-a64a-8a3980f643e5"], Cell[CellGroupData[{ @@ -815,20 +749,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940740824169683`*^9, 3.9940740841708183`*^9}}, - CellLabel-> - "In[338]:=",ExpressionUUID->"3dd7a1c5-86a9-4e32-982a-5adf0ae9576f"], + CellLabel->"In[35]:=",ExpressionUUID->"3dd7a1c5-86a9-4e32-982a-5adf0ae9576f"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{{3.994074197269746*^9, 3.994074214649177*^9}, { - 3.994074250142523*^9, 3.994074270141824*^9}}, - CellLabel-> - "Out[338]=",ExpressionUUID->"0d40b176-0434-45e1-bf60-bb78b76af80a"] + 3.994074250142523*^9, 3.994074270141824*^9}, 3.994386351646237*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"ff7d1dad-bb07-4481-be26-8ef2dba77f81"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[339]:=",ExpressionUUID->"3938439a-c820-4c2d-8e74-7cbbedcd8f4d"], + CellLabel->"In[36]:=",ExpressionUUID->"3938439a-c820-4c2d-8e74-7cbbedcd8f4d"], Cell[CellGroupData[{ @@ -837,20 +768,17 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994074087466568*^9, 3.9940740892428827`*^9}}, - CellLabel-> - "In[340]:=",ExpressionUUID->"2f7153ea-7f6d-4235-bca3-5dbf33dde762"], + CellLabel->"In[37]:=",ExpressionUUID->"2f7153ea-7f6d-4235-bca3-5dbf33dde762"], Cell[BoxData["1.115`"], "Output", CellChangeTimes->{{3.9940741972942533`*^9, 3.9940742146616087`*^9}, { - 3.994074250166238*^9, 3.9940742701540823`*^9}}, - CellLabel-> - "Out[340]=",ExpressionUUID->"0d5cdd2f-e59c-4a5a-bf98-40bbcaad9882"] + 3.994074250166238*^9, 3.9940742701540823`*^9}, 3.994386351661847*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"1e762d6b-8c4c-475a-a805-2018debee35a"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[341]:=",ExpressionUUID->"dfbfaeac-9117-4085-9fd7-886380acdde6"], + CellLabel->"In[38]:=",ExpressionUUID->"dfbfaeac-9117-4085-9fd7-886380acdde6"], Cell[CellGroupData[{ @@ -859,20 +787,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994074092127721*^9, 3.994074094282755*^9}}, - CellLabel-> - "In[342]:=",ExpressionUUID->"9eda4320-fddf-44ad-bb7f-e05be7f9f5cc"], + CellLabel->"In[39]:=",ExpressionUUID->"9eda4320-fddf-44ad-bb7f-e05be7f9f5cc"], Cell[BoxData["1.375`"], "Output", CellChangeTimes->{{3.9940741973176317`*^9, 3.9940742146740303`*^9}, { - 3.994074250185948*^9, 3.9940742701663027`*^9}}, - CellLabel-> - "Out[342]=",ExpressionUUID->"7f2fb8d9-d33a-40e8-ab11-d14d1ed4ca81"] + 3.994074250185948*^9, 3.9940742701663027`*^9}, 3.994386351677869*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"9a56dfa7-9fcd-4bb6-8163-4e62f218923c"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[343]:=",ExpressionUUID->"6e87e300-5a5f-433f-a36d-3ec730a3519a"], + CellLabel->"In[40]:=",ExpressionUUID->"6e87e300-5a5f-433f-a36d-3ec730a3519a"], Cell[CellGroupData[{ @@ -881,20 +806,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994074098253368*^9, 3.994074099547431*^9}}, - CellLabel-> - "In[344]:=",ExpressionUUID->"318b0610-0520-4baa-a5e2-01385dfdb090"], + CellLabel->"In[41]:=",ExpressionUUID->"318b0610-0520-4baa-a5e2-01385dfdb090"], Cell[BoxData["0.545`"], "Output", CellChangeTimes->{{3.9940741973401327`*^9, 3.994074214686512*^9}, { - 3.994074250207786*^9, 3.994074270178926*^9}}, - CellLabel-> - "Out[344]=",ExpressionUUID->"3e52eedb-7a3a-47bc-9542-6c08ff31f764"] + 3.994074250207786*^9, 3.994074270178926*^9}, 3.994386351696726*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"db623792-dce6-462f-95a7-df917513e889"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[345]:=",ExpressionUUID->"fb84d67f-9e6a-433e-9b98-4d733952fe7d"], + CellLabel->"In[42]:=",ExpressionUUID->"fb84d67f-9e6a-433e-9b98-4d733952fe7d"], Cell[CellGroupData[{ @@ -903,20 +825,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994074102320486*^9, 3.9940741031259613`*^9}}, - CellLabel-> - "In[346]:=",ExpressionUUID->"e2a5552a-e080-4faa-acd4-219b8da3d983"], + CellLabel->"In[43]:=",ExpressionUUID->"e2a5552a-e080-4faa-acd4-219b8da3d983"], Cell[BoxData["1.35`"], "Output", CellChangeTimes->{{3.994074197360721*^9, 3.994074214698968*^9}, { - 3.9940742502296133`*^9, 3.994074270190978*^9}}, - CellLabel-> - "Out[346]=",ExpressionUUID->"c36b097f-1233-40fc-8a42-b3b4aaf02e0f"] + 3.9940742502296133`*^9, 3.994074270190978*^9}, 3.994386351713059*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"44cd8b34-2e8b-478e-b70e-267b406c5e39"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[347]:=",ExpressionUUID->"d6c7fe31-31bd-4277-a193-087061e6ab66"], + CellLabel->"In[44]:=",ExpressionUUID->"d6c7fe31-31bd-4277-a193-087061e6ab66"], Cell[CellGroupData[{ @@ -924,20 +843,17 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.655"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994074105268124*^9, 3.994074106561956*^9}}, - CellLabel-> - "In[348]:=",ExpressionUUID->"a63db46b-c143-4718-a1ae-6b9356a84d6c"], + CellLabel->"In[45]:=",ExpressionUUID->"a63db46b-c143-4718-a1ae-6b9356a84d6c"], Cell[BoxData["0.655`"], "Output", CellChangeTimes->{{3.994074197383122*^9, 3.994074214711643*^9}, { - 3.994074250250944*^9, 3.994074270203269*^9}}, - CellLabel-> - "Out[348]=",ExpressionUUID->"60f5a6a5-9ac4-4b59-b0eb-629ae61f7b72"] + 3.994074250250944*^9, 3.994074270203269*^9}, 3.9943863517287292`*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"83487410-d690-4182-b84d-40565b3eec22"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[349]:=",ExpressionUUID->"5c7354df-e9d9-408f-b6a3-ec42624df8ac"], + CellLabel->"In[46]:=",ExpressionUUID->"5c7354df-e9d9-408f-b6a3-ec42624df8ac"], Cell[CellGroupData[{ @@ -1426,15 +1342,13 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[350]:=",ExpressionUUID->"7c83793f-9fb2-460b-912b-a5765c838794"], + CellLabel->"In[47]:=",ExpressionUUID->"7c83793f-9fb2-460b-912b-a5765c838794"], Cell[BoxData["0.1542863605960474`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.994074197462419*^9, 3.9940742147508163`*^9}, { - 3.994074250298726*^9, 3.994074270240198*^9}}, - CellLabel-> - "Out[350]=",ExpressionUUID->"53563666-4956-4c0a-a1f4-d8a671b062b8"] + 3.994074250298726*^9, 3.994074270240198*^9}, 3.9943863518888397`*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"f9c56ce4-005d-446f-a961-b40d09c0e6c2"] }, Open ]], Cell[CellGroupData[{ @@ -1928,15 +1842,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[351]:=",ExpressionUUID->"5a2da6c3-54d7-4b53-b3b9-387e498d10c7"], + CellLabel->"In[48]:=",ExpressionUUID->"5a2da6c3-54d7-4b53-b3b9-387e498d10c7"], Cell[BoxData["6.986649521084862`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.994074197551347*^9, 3.994074214777306*^9}, { - 3.9940742503242893`*^9, 3.994074270266127*^9}}, - CellLabel-> - "Out[351]=",ExpressionUUID->"57a0156d-60f8-4caf-ae50-62c52b266141"] + 3.9940742503242893`*^9, 3.994074270266127*^9}, 3.9943863519872704`*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"c972ab97-9678-4c27-a7a0-6646980b4a21"] }, Open ]], Cell[CellGroupData[{ @@ -2424,16 +2336,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[352]:=",ExpressionUUID->"a8899c63-c959-470e-9a7c-e2103f872ccf"], + CellLabel->"In[49]:=",ExpressionUUID->"a8899c63-c959-470e-9a7c-e2103f872ccf"], Cell[BoxData[ RowBox[{"-", "15.225784715275067`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994074197626877*^9, 3.994074214803336*^9}, { - 3.994074250347639*^9, 3.9940742702914057`*^9}}, - CellLabel-> - "Out[352]=",ExpressionUUID->"b693017d-19b2-452d-a1a8-23c052bf8e33"] + 3.994074250347639*^9, 3.9940742702914057`*^9}, 3.9943863520884533`*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"771fbf93-b7e1-45c7-8a3e-ef1332fe0f8b"] }, Open ]], Cell[CellGroupData[{ @@ -2991,16 +2901,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[353]:=",ExpressionUUID->"76dfb881-94dd-456f-b6bf-1968b08bb1d5"], + CellLabel->"In[50]:=",ExpressionUUID->"76dfb881-94dd-456f-b6bf-1968b08bb1d5"], Cell[BoxData[ RowBox[{"-", "19.527743438945258`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.994074197680339*^9, 3.9940742148337717`*^9}, { - 3.994074250376841*^9, 3.9940742703219957`*^9}}, - CellLabel-> - "Out[353]=",ExpressionUUID->"bb12cc55-76d7-478c-81ee-0c6bae73260c"] + 3.994074250376841*^9, 3.9940742703219957`*^9}, 3.994386352241456*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"8e02d177-dff3-48fb-b7d1-430cd1e79084"] }, Open ]], Cell[CellGroupData[{ @@ -3558,16 +3466,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[354]:=",ExpressionUUID->"5500dc0c-e0b4-47ca-9021-6f3b4365a6ff"], + CellLabel->"In[51]:=",ExpressionUUID->"5500dc0c-e0b4-47ca-9021-6f3b4365a6ff"], Cell[BoxData[ RowBox[{"-", "55.27021800638023`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.9940741977668943`*^9, 3.9940742148649673`*^9}, { - 3.994074250406843*^9, 3.994074270352029*^9}}, - CellLabel-> - "Out[354]=",ExpressionUUID->"44e16a80-dfb2-4dde-9068-6d056b3cde83"] + 3.994074250406843*^9, 3.994074270352029*^9}, 3.9943863523476954`*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"a0c14053-b535-4f0e-bb07-9fb0999c2688"] }, Open ]], Cell[CellGroupData[{ @@ -4198,46 +4104,40 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[355]:=",ExpressionUUID->"ac44f406-053e-4c01-8e43-53ea50b82bea"], + CellLabel->"In[52]:=",ExpressionUUID->"ac44f406-053e-4c01-8e43-53ea50b82bea"], Cell[BoxData[ RowBox[{"-", "141.4524755079782`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.994074197832451*^9, 3.994074214909892*^9}, { - 3.994074250439662*^9, 3.994074270387487*^9}}, - CellLabel-> - "Out[355]=",ExpressionUUID->"04f65688-baf7-4b5f-8cba-6bbd5e682a79"] + 3.994074250439662*^9, 3.994074270387487*^9}, 3.994386352451776*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"3b4e494e-b7e4-4681-9a0f-bf441c161502"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[356]:=",ExpressionUUID->"839b99cd-58dd-4224-b037-9c5a79dc1336"], + CellLabel->"In[53]:=",ExpressionUUID->"839b99cd-58dd-4224-b037-9c5a79dc1336"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994074197929666*^9, 3.994074214922945*^9}, { - 3.994074250452722*^9, 3.994074270403535*^9}}, - CellLabel-> - "Out[356]=",ExpressionUUID->"8f3a36d2-1343-404d-9e10-b1352048231c"] + 3.994074250452722*^9, 3.994074270403535*^9}, 3.9943863524720287`*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"fa488b09-1462-4b69-a688-e20e63c8c872"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[357]:=",ExpressionUUID->"b052058d-e99f-4885-a585-548d5e125978"], + CellLabel->"In[54]:=",ExpressionUUID->"b052058d-e99f-4885-a585-548d5e125978"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994074197952071*^9, 3.994074214935376*^9}, { - 3.994074250464295*^9, 3.994074270413846*^9}}, - CellLabel-> - "Out[357]=",ExpressionUUID->"2c16f062-4640-45be-9984-8660dee1e14d"] + 3.994074250464295*^9, 3.994074270413846*^9}, 3.9943863524831944`*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"670831a1-6746-459a-ae21-6811f2ea1094"] }, Open ]], Cell[CellGroupData[{ @@ -4281,15 +4181,13 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[358]:=",ExpressionUUID->"eef9d8b4-a0e9-447d-bdc5-b8336fc1f39a"], + CellLabel->"In[55]:=",ExpressionUUID->"eef9d8b4-a0e9-447d-bdc5-b8336fc1f39a"], Cell[BoxData["111.55440139653717`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940741979658833`*^9, 3.994074214947126*^9}, { - 3.99407425047659*^9, 3.994074270424139*^9}}, - CellLabel-> - "Out[358]=",ExpressionUUID->"a5f41d9f-3aec-4bd6-84fe-d3689f979070"] + 3.99407425047659*^9, 3.994074270424139*^9}, 3.9943863524977303`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"da7b02c1-3873-4a4d-a7bc-83edfdbe5b9a"] }, Open ]], Cell[CellGroupData[{ @@ -4329,16 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[359]:=",ExpressionUUID->"e6a7237c-3b3d-4bb7-b1d1-34cdbaa149b1"], + CellLabel->"In[56]:=",ExpressionUUID->"e6a7237c-3b3d-4bb7-b1d1-34cdbaa149b1"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.994074197994025*^9, 3.994074214959611*^9}, { - 3.994074250488699*^9, 3.994074270434445*^9}}, - CellLabel-> - "Out[359]=",ExpressionUUID->"abd2645c-0feb-477b-a087-5c6629e48a69"] + 3.994074250488699*^9, 3.994074270434445*^9}, 3.994386352509863*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"dbcf83e3-50c7-43b8-b78a-08c250d8b560"] }, Open ]], Cell[CellGroupData[{ @@ -4382,101 +4278,87 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[360]:=",ExpressionUUID->"3664e8fb-e1ab-43b9-9add-e60159ff90a3"], + CellLabel->"In[57]:=",ExpressionUUID->"3664e8fb-e1ab-43b9-9add-e60159ff90a3"], Cell[BoxData["113.13286100443031`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994074198004314*^9, 3.994074214972053*^9}, { - 3.994074250500126*^9, 3.99407427044481*^9}}, - CellLabel-> - "Out[360]=",ExpressionUUID->"d75400a1-cafc-4e31-ae01-0244864530ee"] + 3.994074250500126*^9, 3.99407427044481*^9}, 3.9943863525202637`*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"d71eb993-fdf0-4856-aeff-ff76622ae47b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[361]:=",ExpressionUUID->"dbfdecd8-86f2-4f33-8479-b665ae97414f"], + CellLabel->"In[58]:=",ExpressionUUID->"dbfdecd8-86f2-4f33-8479-b665ae97414f"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.994074198016279*^9, 3.994074214983481*^9}, { - 3.994074250511408*^9, 3.994074270455081*^9}}, - CellLabel-> - "Out[361]=",ExpressionUUID->"6d52c905-8f0e-4d70-b5a7-c48accf9f3aa"] + 3.994074250511408*^9, 3.994074270455081*^9}, 3.994386352529874*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"7c5c24ae-41db-412d-b05f-50e5a2a9e4b5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[362]:=",ExpressionUUID->"6f117784-e0a6-4a59-91a0-fee47248ec56"], + CellLabel->"In[59]:=",ExpressionUUID->"6f117784-e0a6-4a59-91a0-fee47248ec56"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.99407419803306*^9, 3.994074214997123*^9}, { - 3.994074250525971*^9, 3.994074270465309*^9}}, - CellLabel-> - "Out[362]=",ExpressionUUID->"5b1a98e4-b698-430e-9037-0676c04bbbe7"] + 3.994074250525971*^9, 3.994074270465309*^9}, 3.99438635253887*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"601e5a9e-6252-45b2-925b-9321e3a40397"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[363]:=",ExpressionUUID->"dd09394e-74c8-4a27-8746-45835fc98c93"], + CellLabel->"In[60]:=",ExpressionUUID->"dd09394e-74c8-4a27-8746-45835fc98c93"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.994074198060273*^9, 3.994074215008013*^9}, { - 3.994074250535656*^9, 3.994074270476778*^9}}, - CellLabel-> - "Out[363]=",ExpressionUUID->"d9d01165-51a7-480d-8850-ea6a72761898"] + 3.994074250535656*^9, 3.994074270476778*^9}, 3.994386352547702*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"65f8fadd-7515-4a54-a4ff-7e9d4a0b5334"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[364]:=",ExpressionUUID->"9f69a6c7-3997-4002-bb6c-26013ebb1a5a"], + CellLabel->"In[61]:=",ExpressionUUID->"9f69a6c7-3997-4002-bb6c-26013ebb1a5a"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.9940741980734253`*^9, 3.994074215018661*^9}, { - 3.994074250546678*^9, 3.9940742704879427`*^9}}, - CellLabel-> - "Out[364]=",ExpressionUUID->"c2a2c1ac-4c50-49f1-b3a7-4157254eab1d"] + 3.994074250546678*^9, 3.9940742704879427`*^9}, 3.994386352557041*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"052412bd-ccfe-42aa-ba01-0c947e8a00fa"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[365]:=",ExpressionUUID->"baf11c76-bf79-4d0a-9a2c-bdafe286cae9"], + CellLabel->"In[62]:=",ExpressionUUID->"baf11c76-bf79-4d0a-9a2c-bdafe286cae9"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994074198087656*^9, 3.9940742150302687`*^9}, { - 3.994074250550354*^9, 3.994074270499359*^9}}, - CellLabel-> - "Out[365]=",ExpressionUUID->"de75ad4b-2bd2-4387-b782-158c178e59e3"] + 3.994074250550354*^9, 3.994074270499359*^9}, 3.9943863525665092`*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"6c38e48d-8dfb-4c6c-92c2-28e826990554"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[366]:=",ExpressionUUID->"4683b1e8-4fb0-4f25-9aa5-17033bf43351"], + CellLabel->"In[63]:=",ExpressionUUID->"4683b1e8-4fb0-4f25-9aa5-17033bf43351"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.994074198096857*^9, 3.994074215043764*^9}, { - 3.994074250564603*^9, 3.994074270511888*^9}}, - CellLabel-> - "Out[366]=",ExpressionUUID->"d43edcd3-215e-46c2-b554-ef918f580163"] + 3.994074250564603*^9, 3.994074270511888*^9}, 3.994386352575385*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"01e177a9-0b5e-4e29-96b7-2ac6a4fa3b7e"] }, Open ]], Cell[CellGroupData[{ @@ -4497,16 +4379,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[367]:=",ExpressionUUID->"e5dac210-3b35-4af6-864e-da3f6b5c9e98"], + CellLabel->"In[64]:=",ExpressionUUID->"e5dac210-3b35-4af6-864e-da3f6b5c9e98"], Cell[BoxData[ RowBox[{"-", "33.18726375495992`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994074198107793*^9, 3.994074215058444*^9}, { - 3.994074250574132*^9, 3.99407427052425*^9}}, - CellLabel-> - "Out[367]=",ExpressionUUID->"3a7439c2-9608-4258-a2d0-1db6d6ad1a53"] + 3.994074250574132*^9, 3.99407427052425*^9}, 3.994386352585547*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"0ed6c486-74f0-4325-a808-30ff534ca698"] }, Open ]], Cell[CellGroupData[{ @@ -4527,16 +4407,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[368]:=",ExpressionUUID->"f9fdc6b9-713b-46f9-91e0-65813debd8af"], + CellLabel->"In[65]:=",ExpressionUUID->"f9fdc6b9-713b-46f9-91e0-65813debd8af"], Cell[BoxData[ RowBox[{"-", "6.498883922853802`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994074198134163*^9, 3.994074215071083*^9}, { - 3.994074250583393*^9, 3.994074270535636*^9}}, - CellLabel-> - "Out[368]=",ExpressionUUID->"19eaf4ad-6191-4911-8437-11a9452e407f"] + 3.994074250583393*^9, 3.994074270535636*^9}, 3.994386352595902*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"72ac47f5-98f3-4c69-9aac-eef5b75ade3f"] }, Open ]], Cell[CellGroupData[{ @@ -4601,15 +4479,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[369]:=",ExpressionUUID->"8db01e79-356c-4941-9d39-a95567306c14"], + CellLabel->"In[66]:=",ExpressionUUID->"8db01e79-356c-4941-9d39-a95567306c14"], Cell[BoxData["78.36713764157724`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.99407419816089*^9, 3.994074215083827*^9}, { - 3.994074250592779*^9, 3.994074270550357*^9}}, - CellLabel-> - "Out[369]=",ExpressionUUID->"04771195-19d1-46cd-8e7b-4ff8f9ead357"] + 3.994074250592779*^9, 3.994074270550357*^9}, 3.994386352605698*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"8e840518-1f31-4d20-9a32-bb81b0fab3af"] }, Open ]], Cell[CellGroupData[{ @@ -4650,16 +4526,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[370]:=",ExpressionUUID->"95cd7e3a-170e-4446-bf3c-2df3d68d7942"], + CellLabel->"In[67]:=",ExpressionUUID->"95cd7e3a-170e-4446-bf3c-2df3d68d7942"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994074198173212*^9, 3.9940742151226263`*^9}, { - 3.9940742506018353`*^9, 3.99407427055612*^9}}, - CellLabel-> - "Out[370]=",ExpressionUUID->"9e30a8ab-b3a3-4fc9-83d9-2b3c3b5051a3"] + 3.9940742506018353`*^9, 3.99407427055612*^9}, 3.994386352615649*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"a846e523-c94a-4782-a32d-a4dea743328a"] }, Open ]], Cell[CellGroupData[{ @@ -4725,15 +4599,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[371]:=",ExpressionUUID->"979f7f8d-3031-4f5b-9e99-384995127670"], + CellLabel->"In[68]:=",ExpressionUUID->"979f7f8d-3031-4f5b-9e99-384995127670"], Cell[BoxData["106.6339770815765`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994074198185794*^9, 3.994074215135048*^9}, { - 3.994074250611326*^9, 3.994074270578539*^9}}, - CellLabel-> - "Out[371]=",ExpressionUUID->"1de44f98-1359-4f5c-9ea3-304fbdede234"] + 3.994074250611326*^9, 3.994074270578539*^9}, 3.9943863526269407`*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"b06840c8-9108-427c-993e-2c77bcf64efc"] }, Open ]], Cell[CellGroupData[{ @@ -4791,15 +4663,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[372]:=",ExpressionUUID->"50de5a73-3b9f-4f04-b13b-a2cf36c0d150"], + CellLabel->"In[69]:=",ExpressionUUID->"50de5a73-3b9f-4f04-b13b-a2cf36c0d150"], Cell[BoxData["51.145215962859936`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994074198196261*^9, 3.9940742151460247`*^9}, { - 3.994074250621415*^9, 3.99407427059237*^9}}, - CellLabel-> - "Out[372]=",ExpressionUUID->"ec9d0798-717b-4601-a1c9-14a894cdd51c"] + 3.994074250621415*^9, 3.99407427059237*^9}, 3.994386352637507*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"3522d4c5-bfac-4c18-a49f-461fe15a8ca6"] }, Open ]], Cell[CellGroupData[{ @@ -4857,38 +4727,46 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[373]:=",ExpressionUUID->"5d7c1fde-f494-4e17-a51f-46bb84e1aab1"], + CellLabel->"In[70]:=",ExpressionUUID->"5d7c1fde-f494-4e17-a51f-46bb84e1aab1"], Cell[BoxData["674.8474263523988`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994074198207098*^9, 3.9940742151610737`*^9}, { - 3.99407425063161*^9, 3.9940742706025248`*^9}}, - CellLabel-> - "Out[373]=",ExpressionUUID->"79dd13f8-e4fd-4ee1-a785-699086888888"] + 3.99407425063161*^9, 3.9940742706025248`*^9}, 3.994386352648467*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"49c8dd63-fe17-415b-8e88-fa16e8337ae2"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4720031358"}]], "Input", - CellChangeTimes->{3.9918488488187084`*^9, - 3.9942360266712303`*^9},ExpressionUUID->"bdefbecf-0aaa-4a45-a861-\ -406cf54e52d1"], + CellChangeTimes->{3.9918488488187084`*^9, 3.9942360266712303`*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], + +Cell[BoxData["0.4720031358`"], "Output", + CellChangeTimes->{3.994386352658359*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"913518a8-ee29-497f-8179-42f707048cba"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848849725815*^9, - 3.9918488497328167`*^9}},ExpressionUUID->"a5161e25-7247-124f-8601-\ -7bcc4af89c62"], + CellChangeTimes->{{3.991848849725815*^9, 3.9918488497328167`*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.185261438"}]], "Input", - CellChangeTimes->{3.9918488509977226`*^9, - 3.9942360324114323`*^9},ExpressionUUID->"45ed831b-459a-9a41-990f-\ -c079ad464f5d"], + CellChangeTimes->{3.9918488509977226`*^9, 3.9942360324114323`*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], + +Cell[BoxData["0.185261438`"], "Output", + CellChangeTimes->{3.994386352675826*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"17881132-d429-450f-888b-cc1f96a103a3"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.991848851636154*^9, - 3.9918488516427097`*^9}},ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-\ -11f4dcb03e07"], + CellChangeTimes->{{3.991848851636154*^9, 3.9918488516427097`*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ @@ -4934,13 +4812,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[150]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], + CellLabel->"In[75]:=",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913279321052856`*^9}, - CellLabel-> - "Out[150]=",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[BoxData["1.459454531271633`*^-53"], "Output", + CellChangeTimes->{3.9913279321052856`*^9, 3.994386352693823*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"503401cd-3f6c-4e3b-bd1d-a19c1706205e"] }, Open ]], Cell[CellGroupData[{ @@ -4974,14 +4850,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.9915575644922657`*^9},ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-\ -7221ff813b6d"], + CellChangeTimes->{3.9915575644922657`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.991327932129387*^9}, - CellLabel-> - "Out[151]=",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[BoxData["6.908152201359485`*^-55"], "Output", + CellChangeTimes->{3.991327932129387*^9, 3.9943863527046537`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"fc3f2ec2-fbb3-431d-a549-dba7c71bda63"] }, Open ]], Cell[CellGroupData[{ @@ -5014,14 +4888,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915575683388195`*^9, - 3.991557570173399*^9}},ExpressionUUID->"f22831a7-63b7-f444-8e3a-\ -fa370a62ac27"], + CellChangeTimes->{{3.9915575683388195`*^9, 3.991557570173399*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.991327932138338*^9}, - CellLabel-> - "Out[152]=",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[BoxData["1.0198500965406662`*^-54"], "Output", + CellChangeTimes->{3.991327932138338*^9, 3.994386352716159*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"15c9f6c0-4767-47ba-9fbf-8090e6f831c0"] }, Open ]], Cell[CellGroupData[{ @@ -5044,13 +4916,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[153]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], + CellLabel->"In[78]:=",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913279321616154`*^9}, - CellLabel-> - "Out[153]=",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[BoxData["13.833851905494285`"], "Output", + CellChangeTimes->{3.9913279321616154`*^9, 3.99438635272871*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"3755f534-3e03-4e76-90ef-886c9dc2f5a7"] }, Open ]], Cell[CellGroupData[{ @@ -5075,13 +4945,11 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"Ih", "+", "Il"}], ")"}], "*", "Ir"}], RowBox[{"Ih", "+", "Ir", "+", "Il"}]]}]}]], "Input", - CellLabel-> - "In[154]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], + CellLabel->"In[79]:=",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[BoxData["37.77192070584817`"], "Output", - CellChangeTimes->{3.9913279321696014`*^9}, - CellLabel-> - "Out[154]=",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[BoxData["22.221357718084736`"], "Output", + CellChangeTimes->{3.9913279321696014`*^9, 3.994386352740141*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"12a1b00b-eeac-4aca-97e2-df81026bfb8f"] }, Open ]], Cell[CellGroupData[{ @@ -5090,13 +4958,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[155]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], + CellLabel->"In[80]:=",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913279321926613`*^9}, - CellLabel-> - "Out[155]=",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[BoxData["1.9227859822384121`"], "Output", + CellChangeTimes->{3.9913279321926613`*^9, 3.994386352750184*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"d0de49bf-4e87-4ec6-8796-690a7ff2b0e6"] }, Open ]], Cell[CellGroupData[{ @@ -5105,13 +4971,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[156]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], + CellLabel->"In[81]:=",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[BoxData["3.2238916343938024`"], "Output", - CellChangeTimes->{3.991327932200657*^9}, - CellLabel-> - "Out[156]=",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[BoxData["5.510836200960227`"], "Output", + CellChangeTimes->{3.991327932200657*^9, 3.994386352759776*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"f05e70d8-4c8c-4bb4-898a-98eed354a500"] }, Open ]], Cell[CellGroupData[{ @@ -5120,13 +4984,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[157]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], + CellLabel->"In[82]:=",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[BoxData["121.77257917856996`"], "Output", - CellChangeTimes->{3.99132793222501*^9}, - CellLabel-> - "Out[157]=",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[BoxData["122.45826254730831`"], "Output", + CellChangeTimes->{3.99132793222501*^9, 3.9943863527691193`*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"0dc53b22-a88e-4ba4-9b65-27cb14ad5577"] }, Open ]], Cell[CellGroupData[{ @@ -5135,13 +4997,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[158]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], + CellLabel->"In[83]:=",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913279322642612`*^9}, - CellLabel-> - "Out[158]=",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[BoxData["26.59953652424656`"], "Output", + CellChangeTimes->{3.9913279322642612`*^9, 3.9943863527784843`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"633e13c4-f382-41f8-8b66-289511f66a25"] }, Open ]], Cell[CellGroupData[{ @@ -5330,13 +5190,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[159]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], + CellLabel->"In[84]:=",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[BoxData["0.032550594324745`"], "Output", - CellChangeTimes->{3.9913279322906475`*^9}, - CellLabel-> - "Out[159]=",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[BoxData["0.007453179676115934`"], "Output", + CellChangeTimes->{3.9913279322906475`*^9, 3.994386352791394*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"7da57aa3-d8a1-4af7-9ad1-e350e05da525"] }, Open ]], Cell[CellGroupData[{ @@ -5349,13 +5207,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[160]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], + CellLabel->"In[85]:=",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[BoxData["4.91208054446651`"], "Output", - CellChangeTimes->{3.9913279323826447`*^9}, - CellLabel-> - "Out[160]=",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[BoxData["10.265359072229794`"], "Output", + CellChangeTimes->{3.9913279323826447`*^9, 3.994386353048259*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"2b02c114-f900-4bf2-9179-5cd433c80883"] }, Open ]], Cell[CellGroupData[{ @@ -5546,13 +5402,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[161]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], + CellLabel->"In[86]:=",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[BoxData["0.012685641417856707`"], "Output", - CellChangeTimes->{3.991327932394655*^9}, - CellLabel-> - "Out[161]=",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[BoxData["0.03692522137025446`"], "Output", + CellChangeTimes->{3.991327932394655*^9, 3.994386353067864*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"27596e41-dbd8-4e40-a565-92675600a006"] }, Open ]], Cell[CellGroupData[{ @@ -5565,13 +5419,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[162]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], + CellLabel->"In[87]:=",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.991327932491659*^9}, - CellLabel-> - "Out[162]=",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[BoxData["4.611937220422212`"], "Output", + CellChangeTimes->{3.991327932491659*^9, 3.994386353155818*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"d9cf8570-ac30-4ed6-9e70-b6ab18903c63"] }, Open ]], Cell[CellGroupData[{ @@ -5663,13 +5515,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[163]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], + CellLabel->"In[88]:=",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991327932509678*^9}, - CellLabel-> - "Out[163]=",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[BoxData["0.06275239908812294`"], "Output", + CellChangeTimes->{3.991327932509678*^9, 3.994386353300364*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"aacf4a2a-be2d-47d0-835b-6fc099b579a1"] }, Open ]], Cell[CellGroupData[{ @@ -5758,13 +5608,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[164]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], + CellLabel->"In[89]:=",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913279325457134`*^9}, - CellLabel-> - "Out[164]=",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[BoxData["0.937247600911877`"], "Output", + CellChangeTimes->{3.9913279325457134`*^9, 3.9943863533137903`*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"8fe1900b-2de1-46c7-8b79-6a3f2d1c257f"] }, Open ]], Cell[CellGroupData[{ @@ -5886,19 +5734,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[165]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], + CellLabel->"In[90]:=",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913279325697117`*^9}, - CellLabel-> - "Out[165]=",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[BoxData["0.05881453549680789`"], "Output", + CellChangeTimes->{3.9913279325697117`*^9, 3.994386353326675*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"a8927345-3c94-4f82-8c5a-45404b8efd1c"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"714abd93-e0d1-\ -eb45-a9e1-7a2f5d020eb1"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ @@ -5959,68 +5805,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918488620812244`*^9},ExpressionUUID->"137c38a2-741c-bd43-b6d9-\ -c0135e32eaf8"], + CellChangeTimes->{3.9918488620812244`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 166, 109, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279325947113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.482022779157694`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 92, 1, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9943863533631897`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], +In[92]:=",ExpressionUUID->"f7629634-5a3c-4e16-89bc-38091826305f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 110, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326047096`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9439947002166163`*^-205\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 92, 2, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.994386353385343*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], +In[92]:=",ExpressionUUID->"da16cb71-5e7c-4354-a327-4e63d78bdd7d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 166, 111, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327932612709*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.893651388750611`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.9943863533917637`*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], +In[92]:=",ExpressionUUID->"bab04f9a-4b18-4666-b0be-daa2cfe1a85d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 166, 112, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279326207104`*^9}, +during this calculation.\"", 2, 92, 4, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913279325947113`*^9, 3.994386353397379*^9}, CellLabel-> "During evaluation of \ -In[166]:=",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], +In[92]:=",ExpressionUUID->"1017c023-7158-43f6-9a6e-3516be8bc93c"], -Cell[BoxData["4.912080544466506`"], "Output", - CellChangeTimes->{3.9913279359974174`*^9}, - CellLabel-> - "Out[166]=",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[BoxData["10.2653590722298`"], "Output", + CellChangeTimes->{3.9913279359974174`*^9, 3.994386356602529*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"cda5a11c-e402-474f-9000-0540ab44dc28"] }, Open ]], Cell[CellGroupData[{ @@ -6082,68 +5930,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848865140564*^9},ExpressionUUID->"9b196534-2ca5-e54b-8014-\ -b0ab3cd09ac2"], + CellChangeTimes->{3.991848865140564*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 167, 113, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936033827*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.482022779157694`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 93, 5, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.994386356650338*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], +In[93]:=",ExpressionUUID->"d54493a4-d55f-4bfb-ad44-f8bba2e967d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 114, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360428295`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9439947002166163`*^-205\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 93, 6, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9943863566593723`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], +In[93]:=",ExpressionUUID->"b2446eca-d628-43b1-a22a-fbc078b4be58"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 167, 115, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991327936050829*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.893651388750611`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.9943863566669292`*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], +In[93]:=",ExpressionUUID->"6c51da7c-14b1-45c7-893a-d0d6343d92f3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 167, 116, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913279360588284`*^9}, +during this calculation.\"", 2, 93, 8, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991327936033827*^9, 3.994386356674079*^9}, CellLabel-> "During evaluation of \ -In[167]:=",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], +In[93]:=",ExpressionUUID->"5c6c03b3-ce09-461a-9d5f-9e0a3d6e4931"], -Cell[BoxData["7.868441587445692`"], "Output", - CellChangeTimes->{3.9913279393385086`*^9}, - CellLabel-> - "Out[167]=",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[BoxData["4.611937220422217`"], "Output", + CellChangeTimes->{3.9913279393385086`*^9, 3.994386360073785*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"cea6a916-7567-4239-a845-38348d90b69b"] }, Open ]], Cell[CellGroupData[{ @@ -6199,95 +6049,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848869193308*^9},ExpressionUUID->"124cd7db-c537-8943-bef2-\ -1a154ab4a709"], + CellChangeTimes->{3.991848869193308*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk8VN0fB3BrsiS7kH2pqZRmrC3O115iSJF9GTM3W4rkZ6csJfFIVM9T +lpJIlqwJ9QhJUYSnlWIYiSzZZ9p+pz/u677er3PP537v99xzVGnHHRg8XFxc +E/j6cw95uX3T/d6XxlstFt3aopjIeOaWHs28DA1n0y798XC+fraGeTNSarlj +1I5tT3+xRoTyBFX1PKM+wa6KiG/jN+9GO/pa+zqwUzs2tMSXvkJCg9lPOrEf +9Ibk/SD/h24KwKYu7Mn3z2Mim94ikVPtKy+w5Vnqbstmg0jfWs3gFfaB2Rij +k92fkHCNC2sA+9GPSeGI0hFEGQngeYf9+rRsdH3wKNIVccoYwp5ZYz65SGYh +WohCKhN7zYUTLpSVcfT7UNP8Z2wl8dzOkKYJJP1Tr2sam6qwfHvG7Cv6Ptrc +ycEmCtRktNfOoG2vnk1zRzNRvKZdcmD3LAodrT4tiP1WdmBnWOk3RJVRWJbD +prsG+F+6MI8+S117rYY9d53rRnXwAupcXNXchr1WTVvsG3kJlR+2FwfsbHqb +lZj0Mjo/Yl1uja1S7BK/Y2UZUf01GxyxDbelzBxrWkXhbTHyx7D99D91T5r9 +QNxeHeI3sBcjTvEJaf1Er536NCqxE5qE95DW/kLBOW23H2JfBcO7R7t/o8jv +zisf/tRX1GkeWsoNAhZEl2IME5V2XBo+rcADv9VqHHdgz332jLl4gQeiBL9S +TbBjtizV3Avmheh/NTMI7OxKVfVZMj+kdwygeuz3vV8f/Srkh2N1uSZd2Crz +911FpdcAMeZaPYxdpkvN0l5ZAyfS64dFYpmo/UEUd1DTWuAoSYUEYC+19X+a +MBOBCp4kn11xTCRhIyIW/UgEat/OVDlj6wyYwzqjddA++y7pf9gBY3UFO7eL +wj9phtX12Cd4unX2iojBMIu6dXc8E7HUKr4lL4vD+V91V90TcH+I54I9FAl4 +8JeCRCI2z91x1Q0hErCxRl20FFuFouxQOiUBs56aGWxsV7PM6pfDkmA5QKnI +O81EPb6hJ2W7pMFnue0EdyITfSzOSPNeKwOM3mRpHeyvU6WFdyxkQCxPaq8X +tlDYaP/uFhlY6bgl9S+2edJhXe86WWheYLKSkpio8Zb+Ukm+HDg7ZEiSUpjo +FosTvitMEVqYfDX9qUy0z/Hsx5PlirAQlpgieh7nt0talo8rwvrugO792Lq3 +tkmruCiByaWEysfY7TTPGn5jZXCiqffXpzHR/Ozw/yYSVcDkh86l+nQmkjxm +XltjqwbD83zrRbKYaPyWkJ99gBo4p5roO2I3DPYqTKeogcGQc28etruNR6JW +ixo052zyoFzC9W0Nd/ibrA6UtLp3Ptn4/ZPFc3GyGkDOI9EGLjPR4aPC2tYj +mqCf4Pty/XUmQuGO5CM/NaHll1cBA3tLcr4BXU4L+uYtRpqwuQoppnEHtUBQ +cLjSP5eJyj+6Hal+rAU3nz5PeJ6H96dT2Wn5m5vAbiB6qeAGrs/c9vUkjQQH +78YeuFHMRIWHrnxYiSNBQGU1L38JE2XQRob5rpFgEzVgqz82PeHUlFI/Ca6u +nnpGvsNE4s25XIfMtgDrbCZ0leL/hzKzpUl9K7zeFqIsXsFECmp/xaeNbYPB +T9+fzNUyUfP5RRKbRxuchOVVg+pwPxZcBghVbSjWNuaawM5r1yCZemrDK+N6 +65F6JlI72ti3+kYbWNcMxd834O8tY2kSXdtBaMYgcKyZiRQVlAgVFx1YG2Z+ +3v0JE20rChP5jshgd3+N1eAbJqLRE5e0qWSwuZsXGPwW71f1rI/e7mT48mYt +P/c7JuK9WXmvI4IM/wSGXt70Hu+3vMnDWVVkcK0L0Y0axOfpVe9ckjoF5O9M +++qN4PVNs9nuvEYXOAmhnbxTTHQjVMO+rlsP9mYH/I+HaxRVf2xJ2zCoB/n8 +js9asFutPZ5GT+lBIPXz7XjuUTSmdtnYVEgf3t3dyf+bZxRp9Qto91jpQ6hB +oR3fmlFURpkS/NKqD9opoEUSGUUNi1VtGx8YgGWK0fbBDaOoNxwZJBUZwdrr +2T6TlFGk6vkf1SNoLwQniU6lHx9FjN/1FYqRAHUqzRtVKkeR7FSDgCzNFLy8 +HpYs/BhFYZQ9g1lbzKHp4DPPndQxRJv+0Sk5aQGC0/uilW+PoXLTkwL5PVZw +JKA4b8N6Frq1GPC4LHs/HKt2mreLYqFVkw0v2uMPQN7gEB97lYWGuHi/jfjY +wtkTn0L3JIyj4I3HM0+r28E9Dj9/2NrPqMK/syUn2R4G/t14+2zxZxS1ILey +1f8g7BCzJK1YTqAla0unp14O8EAp8ww31xdk5HbRhHXwEPjpCBwOaP2C+uRy +A9oph8HAVOw2kTiJ5G8nNpdsdoSNGZEOST5TqGF4iw11nRMEBfEPK+79ipQG +5o6GTzsBX6hox5jyNKLkXCwrHD4CcxpiQ7VqMyiXb2F7VpszJEYvnBNRmUX1 +JjveJz9wgZz6attM5Tl01eC8+I9SV4gsylFOrJ5DPR+KUigX3KA0+dT1K/AN +1dle1ziR4A6krLvNuZ++oW/HDnEF0z1AO1TEQyZiHi1ZkvxmzDxh3J17b57Y +AiqZfrd6Ut8Lvvn16l1rWEDON4p8PUS8Yb7w+Eqe0yKqqT7gxXvWG1aXlrYt +cS8hI4U+dirbG2xeUp9lFSwh9eGj71/5+8ABUmPTYaNlNCYcaHd91Ac81zeH +aL9fRr0ZVF8rRxq0hbjncvxXUHZEvvCpXhq4rY7Mf/ixgpof/Wb77veFKR6a +K/P0KlrvDmcpjb4w0V8dpjy/ioy8Z0qSdekgzw4sWnBno9t/z52k6tMh4U3A +IM2TjaT6541lDekQvWdc5ZUXG81YrAyU7KbDxuy3vaU0Nj6/uLi7Temw6YlX +q4MfG4muiLtIHKRDzDWjf8JOstFYup5g/jE6NFxy+/vnOTbKaIrxb7hNh6et +Qr7iVWx0jHzFKKKEDv+mBe/aXc1GNneqBA1L6VC7OUuSXsNGQlfG79wvp4NN +0edn1XVslBxqP1lfS4fHLvHG5o1sFEPSCKxrpQPrQwO/QRsbBVzpCqr+iJ9X +/iTkOsBG+0XH94QO0yGp9fp53//YaHMy1zoykw7z5F88Qa/ZaDxUr7yKRQda +4tXByLds5EPNn773lQ5qSWVbUwfZyJn/ZHAlhw4Rq6Rfp8bYyOqk/IkyGQbU +bFUoSVlgo9b8FOusDQzo1z3HOLPIRnu65zUi5BnQtvPwaMwSG+lodr0zU2IA +hfFKKXiFjeTeRJt90GTArOPsBZPvbDS1a0hGSI8BUbUevGU8HPQXT8HDo4cY +8MPN0yVdjIOEdohctXVkgNHjnCxvcQ5KcosIpRxhwK1U1USyBAdF1Npv+u3K +gHLe7al9khzkQ3BfvEzDeQeXVXllOYjynEZ/EsKADZMMqpYiB725qCmsnsmA +e6GWE6GbOagCrfObuMgARc89FuIknD+92F5+iQHd5dGxFdjk/e1xhlcYEHlu +czxrCwdlcPnO2+YxwLLpfKuFNgdZHi94F1HGgO075zR6dnKQouI5feMKBvyU +eKjmRuagxefHL/Hew/XYIzYL+6YWss2oYYBQw7MdqxQO+jk01FLYyIDHVb2P +RPU5qNZGoeRlJwOah86Y8+3ioDQOD3/2c5xvvrs5FptWMunj0o3rG6YLLWOL +8TUqjPUwYLktmTS6m4OCmpz/Yr9mQNUu4njlXg5S33I5XIPFgJ4LMz/Xm3AQ +501s/5dxBjT63nsRjt2bzNCpnGDA15tzIYPYcSO6k0ZfGZDHijK4ZcpB76/2 +e9gtMKCLUVGjac5BWQLiFlHcBLSzvF3mLDmoeX7ILYyXALFZMVmqFQd9HioN +DeYnQO9XrEcp9p5a8wKaIAHSpaJJnvs4aNw74ru1OAHcUoW6dftx/TYWEhaS +eP61Xl0Baw7abSBBQtIExLk+bT6CnbmuzIkiR4D9gQLfxT/jjZ+qFFQJeC8p +LLTRhoOIorJOaXUC8iZTLWjYmZmRn9ZrEtD39pdAMfY4IbmOj0TA7KZA1W22 +eFzSyu+rDgHeF7oKNagc1PhLMn6cTIBC4ikpL2zWl+GcYV0C7ln5Cl/F3tUS +1TZgSMDFocY0fjsOGguqUHoIBDhfPjDwElvUOVrvvikBxY3cp35iG5nts6ky +J+CGZ8C1Lfb4f5FjRhbtI+CtnVRkAnYDX2VmvjUBvrEGOnewR2eji/+2IWD/ +VG9QL7Zhh/R/6fYEzHN2hMsfxOtdxZw660BA9Y0Ppnux069X8pw5TMBM1rNs +T2xm6H6dcGcCuiSMO69jr/OUsTrhSkBkd8WdB9iG+0c9AtwJ6NDSF/vvz3zl +2DRPbwJed9KCBBxwPULWN51peJy27KOEzVySeeBAJ+CRSewgBXvdyGiPDUGA +yYfZD1bYht33xi39CPhCsvJ2xabdj/0JAQQ4lsf4B2Kn37SW2h1EwO6A8ytR +f/LTZbfqBRPgNxkglPonP2LMZMcJnL9H7mYOtgi9ypkUSgB1KfNRAbaBXdxx +9TACDLVfepX+yd91IEUxHPfvzIvkauwLmhtyZSNwv+Uu6DzArhdj1YhHEWD1 +j4D3I+yR71XPhWMIuEI2lmr9k/85boQ/joCsnO227dj6fQdWf8cTEPT9jdAT +7P8DIZDxWw== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6301,106 +6150,107 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwV1Hk8VN0fB3BrsiS7kH2pqZRmrC3O115iSJF9GTM3W4rkZ6csJfFIVM9T +lpJIlqwJ9QhJUYSnlWIYiSzZZ9p+pz/u677er3PP537v99xzVGnHHRg8XFxc +E/j6cw95uX3T/d6XxlstFt3aopjIeOaWHs28DA1n0y798XC+fraGeTNSarlj +1I5tT3+xRoTyBFX1PKM+wa6KiG/jN+9GO/pa+zqwUzs2tMSXvkJCg9lPOrEf +9Ibk/SD/h24KwKYu7Mn3z2Mim94ikVPtKy+w5Vnqbstmg0jfWs3gFfaB2Rij +k92fkHCNC2sA+9GPSeGI0hFEGQngeYf9+rRsdH3wKNIVccoYwp5ZYz65SGYh +WohCKhN7zYUTLpSVcfT7UNP8Z2wl8dzOkKYJJP1Tr2sam6qwfHvG7Cv6Ptrc +ycEmCtRktNfOoG2vnk1zRzNRvKZdcmD3LAodrT4tiP1WdmBnWOk3RJVRWJbD +prsG+F+6MI8+S117rYY9d53rRnXwAupcXNXchr1WTVvsG3kJlR+2FwfsbHqb +lZj0Mjo/Yl1uja1S7BK/Y2UZUf01GxyxDbelzBxrWkXhbTHyx7D99D91T5r9 +QNxeHeI3sBcjTvEJaf1Er536NCqxE5qE95DW/kLBOW23H2JfBcO7R7t/o8jv +zisf/tRX1GkeWsoNAhZEl2IME5V2XBo+rcADv9VqHHdgz332jLl4gQeiBL9S +TbBjtizV3Avmheh/NTMI7OxKVfVZMj+kdwygeuz3vV8f/Srkh2N1uSZd2Crz +911FpdcAMeZaPYxdpkvN0l5ZAyfS64dFYpmo/UEUd1DTWuAoSYUEYC+19X+a +MBOBCp4kn11xTCRhIyIW/UgEat/OVDlj6wyYwzqjddA++y7pf9gBY3UFO7eL +wj9phtX12Cd4unX2iojBMIu6dXc8E7HUKr4lL4vD+V91V90TcH+I54I9FAl4 +8JeCRCI2z91x1Q0hErCxRl20FFuFouxQOiUBs56aGWxsV7PM6pfDkmA5QKnI +O81EPb6hJ2W7pMFnue0EdyITfSzOSPNeKwOM3mRpHeyvU6WFdyxkQCxPaq8X +tlDYaP/uFhlY6bgl9S+2edJhXe86WWheYLKSkpio8Zb+Ukm+HDg7ZEiSUpjo +FosTvitMEVqYfDX9qUy0z/Hsx5PlirAQlpgieh7nt0talo8rwvrugO792Lq3 +tkmruCiByaWEysfY7TTPGn5jZXCiqffXpzHR/Ozw/yYSVcDkh86l+nQmkjxm +XltjqwbD83zrRbKYaPyWkJ99gBo4p5roO2I3DPYqTKeogcGQc28etruNR6JW +ixo052zyoFzC9W0Nd/ibrA6UtLp3Ptn4/ZPFc3GyGkDOI9EGLjPR4aPC2tYj +mqCf4Pty/XUmQuGO5CM/NaHll1cBA3tLcr4BXU4L+uYtRpqwuQoppnEHtUBQ +cLjSP5eJyj+6Hal+rAU3nz5PeJ6H96dT2Wn5m5vAbiB6qeAGrs/c9vUkjQQH +78YeuFHMRIWHrnxYiSNBQGU1L38JE2XQRob5rpFgEzVgqz82PeHUlFI/Ca6u +nnpGvsNE4s25XIfMtgDrbCZ0leL/hzKzpUl9K7zeFqIsXsFECmp/xaeNbYPB +T9+fzNUyUfP5RRKbRxuchOVVg+pwPxZcBghVbSjWNuaawM5r1yCZemrDK+N6 +65F6JlI72ti3+kYbWNcMxd834O8tY2kSXdtBaMYgcKyZiRQVlAgVFx1YG2Z+ +3v0JE20rChP5jshgd3+N1eAbJqLRE5e0qWSwuZsXGPwW71f1rI/e7mT48mYt +P/c7JuK9WXmvI4IM/wSGXt70Hu+3vMnDWVVkcK0L0Y0axOfpVe9ckjoF5O9M +++qN4PVNs9nuvEYXOAmhnbxTTHQjVMO+rlsP9mYH/I+HaxRVf2xJ2zCoB/n8 +js9asFutPZ5GT+lBIPXz7XjuUTSmdtnYVEgf3t3dyf+bZxRp9Qto91jpQ6hB +oR3fmlFURpkS/NKqD9opoEUSGUUNi1VtGx8YgGWK0fbBDaOoNxwZJBUZwdrr +2T6TlFGk6vkf1SNoLwQniU6lHx9FjN/1FYqRAHUqzRtVKkeR7FSDgCzNFLy8 +HpYs/BhFYZQ9g1lbzKHp4DPPndQxRJv+0Sk5aQGC0/uilW+PoXLTkwL5PVZw +JKA4b8N6Frq1GPC4LHs/HKt2mreLYqFVkw0v2uMPQN7gEB97lYWGuHi/jfjY +wtkTn0L3JIyj4I3HM0+r28E9Dj9/2NrPqMK/syUn2R4G/t14+2zxZxS1ILey +1f8g7BCzJK1YTqAla0unp14O8EAp8ww31xdk5HbRhHXwEPjpCBwOaP2C+uRy +A9oph8HAVOw2kTiJ5G8nNpdsdoSNGZEOST5TqGF4iw11nRMEBfEPK+79ipQG +5o6GTzsBX6hox5jyNKLkXCwrHD4CcxpiQ7VqMyiXb2F7VpszJEYvnBNRmUX1 +JjveJz9wgZz6attM5Tl01eC8+I9SV4gsylFOrJ5DPR+KUigX3KA0+dT1K/AN +1dle1ziR4A6krLvNuZ++oW/HDnEF0z1AO1TEQyZiHi1ZkvxmzDxh3J17b57Y +AiqZfrd6Ut8Lvvn16l1rWEDON4p8PUS8Yb7w+Eqe0yKqqT7gxXvWG1aXlrYt +cS8hI4U+dirbG2xeUp9lFSwh9eGj71/5+8ABUmPTYaNlNCYcaHd91Ac81zeH +aL9fRr0ZVF8rRxq0hbjncvxXUHZEvvCpXhq4rY7Mf/ixgpof/Wb77veFKR6a +K/P0KlrvDmcpjb4w0V8dpjy/ioy8Z0qSdekgzw4sWnBno9t/z52k6tMh4U3A +IM2TjaT6541lDekQvWdc5ZUXG81YrAyU7KbDxuy3vaU0Nj6/uLi7Temw6YlX +q4MfG4muiLtIHKRDzDWjf8JOstFYup5g/jE6NFxy+/vnOTbKaIrxb7hNh6et +Qr7iVWx0jHzFKKKEDv+mBe/aXc1GNneqBA1L6VC7OUuSXsNGQlfG79wvp4NN +0edn1XVslBxqP1lfS4fHLvHG5o1sFEPSCKxrpQPrQwO/QRsbBVzpCqr+iJ9X +/iTkOsBG+0XH94QO0yGp9fp53//YaHMy1zoykw7z5F88Qa/ZaDxUr7yKRQda +4tXByLds5EPNn773lQ5qSWVbUwfZyJn/ZHAlhw4Rq6Rfp8bYyOqk/IkyGQbU +bFUoSVlgo9b8FOusDQzo1z3HOLPIRnu65zUi5BnQtvPwaMwSG+lodr0zU2IA +hfFKKXiFjeTeRJt90GTArOPsBZPvbDS1a0hGSI8BUbUevGU8HPQXT8HDo4cY +8MPN0yVdjIOEdohctXVkgNHjnCxvcQ5KcosIpRxhwK1U1USyBAdF1Npv+u3K +gHLe7al9khzkQ3BfvEzDeQeXVXllOYjynEZ/EsKADZMMqpYiB725qCmsnsmA +e6GWE6GbOagCrfObuMgARc89FuIknD+92F5+iQHd5dGxFdjk/e1xhlcYEHlu +czxrCwdlcPnO2+YxwLLpfKuFNgdZHi94F1HGgO075zR6dnKQouI5feMKBvyU +eKjmRuagxefHL/Hew/XYIzYL+6YWss2oYYBQw7MdqxQO+jk01FLYyIDHVb2P +RPU5qNZGoeRlJwOah86Y8+3ioDQOD3/2c5xvvrs5FptWMunj0o3rG6YLLWOL +8TUqjPUwYLktmTS6m4OCmpz/Yr9mQNUu4njlXg5S33I5XIPFgJ4LMz/Xm3AQ +501s/5dxBjT63nsRjt2bzNCpnGDA15tzIYPYcSO6k0ZfGZDHijK4ZcpB76/2 +e9gtMKCLUVGjac5BWQLiFlHcBLSzvF3mLDmoeX7ILYyXALFZMVmqFQd9HioN +DeYnQO9XrEcp9p5a8wKaIAHSpaJJnvs4aNw74ru1OAHcUoW6dftx/TYWEhaS +eP61Xl0Baw7abSBBQtIExLk+bT6CnbmuzIkiR4D9gQLfxT/jjZ+qFFQJeC8p +LLTRhoOIorJOaXUC8iZTLWjYmZmRn9ZrEtD39pdAMfY4IbmOj0TA7KZA1W22 +eFzSyu+rDgHeF7oKNagc1PhLMn6cTIBC4ikpL2zWl+GcYV0C7ln5Cl/F3tUS +1TZgSMDFocY0fjsOGguqUHoIBDhfPjDwElvUOVrvvikBxY3cp35iG5nts6ky +J+CGZ8C1Lfb4f5FjRhbtI+CtnVRkAnYDX2VmvjUBvrEGOnewR2eji/+2IWD/ +VG9QL7Zhh/R/6fYEzHN2hMsfxOtdxZw660BA9Y0Ppnux069X8pw5TMBM1rNs +T2xm6H6dcGcCuiSMO69jr/OUsTrhSkBkd8WdB9iG+0c9AtwJ6NDSF/vvz3zl +2DRPbwJed9KCBBxwPULWN51peJy27KOEzVySeeBAJ+CRSewgBXvdyGiPDUGA +yYfZD1bYht33xi39CPhCsvJ2xabdj/0JAQQ4lsf4B2Kn37SW2h1EwO6A8ytR +f/LTZbfqBRPgNxkglPonP2LMZMcJnL9H7mYOtgi9ypkUSgB1KfNRAbaBXdxx +9TACDLVfepX+yd91IEUxHPfvzIvkauwLmhtyZSNwv+Uu6DzArhdj1YhHEWD1 +j4D3I+yR71XPhWMIuEI2lmr9k/85boQ/joCsnO227dj6fQdWf8cTEPT9jdAT +7P8DIZDxWw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "PlotRange" -> {{0, 180}, {0.5774857326488577, + 1.6452074454861885`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.577485732648859}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6412,20 +6262,21 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, + "PlotRange" -> {{0, 180}, {0.5774857326488577, + 1.6452074454861885`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "AxesOrigin" -> {0, 0.577485732648859}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6439,105 +6290,105 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4Fl0fB3AJSZQlJJFsoUj2tfMLZV+zb3G7Z6zJHhL1WnqKZEuryJIl -kqWypYVKKJXK8yhSoRq7myxJ77n/mGuuz3VmvvM9M3PODtpRO4KVhYVlAh/M -c+grpZ33X7/al1Z3TZGVYKB9k8XqNKNK9GCfADfTQ/kaOdJGLShBMaZ0DbYN -/SUHt+pTdCbt1V8W7JrohDZ2o24kHiogyPSZZ1seJVS8QXOLxt9X6QzU+Dr0 -+orKe2RkFhT1B5vq74yLaf4XPck++eQ39tYRKbdfhp9QKXdy1xK2+VScdnj3 -Z5Q/F5O5gN26Qm2IrviCPmcf3jyP/eGU8PF7wd8Qv66G/Sz2JIcRNacygkjD -VZspbI60EBfVhVGUuLGBaxxbnC+vI7T5B8rgoJ/6gW0l+uvmpOE4OmOTUzKE -TRZICilyTiLNGyKHPmEnyFgnB3ZPIYdt2Q/6sP8Vfrc3omIGdYzTX7zEprsG -+GenzaLnSa0BHdjT11hu1AYzUHL3xhdPsDklFXlnVObRjGVuyz3sHHqbMa/g -LySzscf2DrZEqUvCnoVfSD11TXE5ttbulMkjzYtIXdYp4Sq2n8bnbspwBR0r -GuSLw56LjmTjkv2Dit+upodjn2zeoCfPuYq+HpV4EYB9CbRu+Xb/RVbBQRHO -zH4lHUZhFWtgTblJqTJ2xbPsoVOirFCme4Fbltn3u2dcZhorrGyYUBLFjlOY -r7sTvBYsJ9sq2Jh9q3dITamww0YbzYR3PgzU/3q8dbWIHQx3cbx8ji0xe991 -oyAH+O0d72vCrlSzylJc4IBXDmwyBdjtjbFrgpo5Qeh3zjVf7Pm23s8/DLlh -xLyXlaIxEL8FN+/xVm4IjP1ffR+28jsj4NHmge9PaoSfYgcM3y3Yq7QRXj64 -OnsdO4S1W1mfmxeqKyaWrbBHJG/PJP/iA/1fe50LvPH7ITvX96jyw5yIidQZ -bNZbozu2hPJDMRdvQSi2hOp2u4oxfrBxaLu9H9vVMKP21ZAAbJbbtmPQi4F6 -fMLChbsEgdP/izsn9mBpeqoXpxDwpb82Gj/MQONjFUXlB4TgZfvtwR5srohv -vbqPhOCFualcLrZRkr2a111hiDx1VGA7dlOxxnxZvgjI6QZZSnoyUPHIcpRO -hBiYl38KnXRjIBOH04PhVWKQqlom3YU93i5wsGpUDEqMx7NLsdWKdwtKuIhD -1JHp0sPY7TTPOvZ922FROfBmtysDzU4NHfuRKAEbH7quueLCQAJHjOrrLCVB -4bCPHasTA40Wc/nZBEhCtXZH3gdHBmr49Fp0IkUSuoZNblZgu1t4JMo+koQW -y/pJW+ziXVF2l1WkwKus1yPPAT+fKp2OF5aGT79sm3baM5C97wZFsy8y4Co/ -lctly0AoykHF6Y8MlLTtv9hnw0AKyfmadBFZ4M7lcC7GZilSNYi3lYXf21lE -9bGrBt2cah/LgsNWojTQGq9Px8pTWwt3Qitb4ecWS9zPyPIDRZOHVYWXK3vM -GKjo0MWPC/HysJSrtGXelIHSaV+G2K7Kw7qo/rlGbPrJyDHxXnnIOq00a4DN -15LHcshQAbiCcv7YmuD/R3VSoVlqF4RSbz3oBxlIVPJ8QurwbohhORbjasBA -LWfn5JdYFWE6Zo8UP7Y7w+UduUMRtO6ipBf7Geh6u7S8gaciTAlkBmliS/o2 -vV3sUwRPbrG+TYDnWzkiQ3Ypwfy4rFidPgOJiYqTEi7K0HHWv7FNi4F2l0Rw -/0YqIFBgeXeTEgPR6InzilYqkCITlt2siNerVNagl7sKTDHeqvliry2svvMs -WgUEp8IeP9iN19t1yj6rRgUkI23W+u3C++klrzx5KVVQbm1QqZHD3zfVQsmZ -Qw0cY51ShaQY6EaYtM3dbnUImNLL2iPMQK+jkGZSiTY84OLUtl6eRTs831t5 -BOmD26uu07z9s4j4e++2WAzA91vrQ1obZpHwWMM6YZoB0IXGAl0zZ1GEqt6n -LAUjcH/onN7pP4toEysdAtQBGNJfd70MZlGVQfi6/B5j2Gx3bks93ywqngt4 -XJljCrs/cHL+/TaDFvdvedmeYA7fOZXt7t2ZQQMsa2e+eFuCa5bAj8m4GRS8 -7WjGKSlryPEovHzTfAbd9u94dCHZBjhHT6kFCs6gWIbIwi5/W/DN0HJz/DqN -5s0OOj4/bAdLDRbfnlZMI223zP0jtofg2HKdvknENHorkhfQrmoPXOcuZrfs -n0Zbbya2lMk5QJ7v0+m4DdOoYUjBworHEXaGPb62vW4Kib+b9o2acIRBkwXO -GbsppHohs7JoyAmIzsg/n8cnUR4bQymrzRkkQu7O8WdMonv79/QnN7rAA7aI -llilSXRJ8yzfSoUr+CZ2WS+9mUA9H0tSVNPcINO/ZP1Q/AS6a3lNOuSkO1ys -jOWMkJtAM0cOsQTTPaAhPVUu+OM4mj8o7zdp6AmDyQH98dnjqGziv8VwjcMw -frfs/QXTceR8o8THg9sLzi+Z8xdxjqO6WvPDa097wW6rHp2GZ2NIW/Tt0pkl -L3homKgee24MSQ359r/x94aBFOmiaJcxNLwh0PraN2/Ic1zVbJEZQ6/TrXyM -HWjw4Ni958NLFMqJzt8Q+ZoG9bUPi4x7KNTS+nfJx9QHRMmV+JAKCm1yh9Oq -TT6g6STulplGIYnNz3u2tfjAdNI1UgRbudtyC0erD8isKrTfSKWQnZ5b+b+P -feBNREJk3Vmcvy2q68QLH0hPUavp/4dCWwduber41wfk8nTStZIpJO0pfMl9 -wQfOCTz8uTeeQtpek2XJanRYzfkZIxpKoZuXp8OtNOjwse9qZWsIhTb3zu4T -1qIDbUp2Jw178sDCuzJdOth0djHKj1J4/2JZ021AB3HNI2N6wRTauMDnwm9L -h5gmhn1IIIWGz6mvzz9Ch4ykv8I8JIVsn2u+8z1Khyn2h8aNBIVaWXTylUPp -cK836iGBfTl8n/qTCDpY/n2b8pBOISsXY++R43So5nGKjPKhUKO0S+Ous3Q4 -luj4dsaLQunNcf4NN+mw0mWYJe5OoSMqF7Wjy+ggFnpe570bhSzKa9ZrVdCB -LVFCLg2b6+Jo+f0qPN8Jwd5lVwolh9lQ9+rpcKGR5vfRhUJx8tKBd5/QwWK7 -XGa5E4UCLnYF1Q7S4UaVw1DMIQqZbhzVCxuiw0h8nYo2tlwyC4/KV3z9riOd -i3YUGg1Tr6oZoUP9rV8vorG9rfIn7ozT4YROxPo4Wwo5s4cHVy/Toc7v5tnz -1hQyDt8aUilEgNGq1BXKnEJP8lPMsrYQYNB1sr8KW697Vjp6KwFtby4FhWIr -y3T9ZyhOQKHTn+QlMwqJ9B03/ChDwOCNW+d4sMd0BoS41AnQyVSbMTKh0HnW -gge+hwiQXD7OM2OE57+H+5KlAwHaIqdTWrGT3KLDVJ0IUPvgbZuGHV1vs/Ov -KwHzIf98ksP2Jtdk5tII2PG9vIMwpJBqJ43+NJQA9tCGxcn9FOrLlNkglUFA -WlZx8z5EoduIx+9HJgFweVFcBDtpYq69KpuA2D+5Lxj7KKRi2h6vdZGAw3b1 -c+XY6Sw+s5bXCZhTOl4ogn3waMF/0ZUE7HI97c6hTyExsX809t0moMD4ltqI -HoXmOo9mr71DgBzPdvt27EJZZJleR0AxseCXiP1nYOBRURMBnzkjKDbsegvR -slcdBEQWDlkI6lIodZmVPaeTANNa2SuLOhSilVHeLt0ESLg/VvqEzcvWJDrc -QwDfhXnFYuygZufzSx8IuC7inaSJLaWQGyU9QgD32vjMQG0KLfed6P05SoDg -n932h7BfJxPK1T8I0M1T89TFjv+iRmmPE+DfZGXCjd1/qdfDmkHAcHl9RI0W -hbLW8R2IXUNCrdQxpfXYLbMDbhFrSaiOSBJnaFLo+0BFWDA7CTPs8b4D2Hr1 -RgW09SRYT2uw1WGPekX/NuMjQWHgmR8Nm9fiAP8BARLk9+hLWGPravLLI0ES -bOpvKOthZ/BUOqqKkKCnr+EuzBxv+lwjuoOEQdvswTcaFCJLKjsEpUj4ZHHK -4zF2RkbM500yJFyTP6xegz1KCvCwyZNgZT42lckcFzD2G1cmwcXULMMJu2lV -IGFUhYSg8JYPptgjP4cuDKmRcP3n9ig9bJ1HsW3vtEgYcWt+KIk9HHRb/AGQ -kJZoEs9Qx/uH83H1+wYkbDc0TfuBrW1oYlFjRMKJSD3GAHa6yNeYEhPcv3a5 -6wV2A1t1Rr4Zzl96qv8I+9vU8dLLFiS8VEzivI+t9Uzw/TkbEgy7/isrwabV -fB07bUfCWv/Q+Dzsc9eqWf9nT8JH95XKC9hfw0yVo5xJmC8a33wam8dTyDjE -lQRCys7qJDPP9JtHgDsJEra3hmKY928/kerpRQIvmzZvMLMPl1mhM42E6coj -VX7MvHmhRjs6CefNc4t8mHlfvvVYkCSITdXOejLzuu+MHvQjob6k7Yors9/9 -E38ggIRLcR1XHZn5hWabdYNI6E14PG/HzD8nvEs9mASvpttl1sz86OH9e0JI -2KORUW+BzU2vcZYPI8F4hRAxw9a0jj8qFUHCyc3KfcbMfB3zFLEoEq4kT04c -wE6T2ZInHE1ChMMNDyPse7wjdXyxJDT/YyJriP3ld03nhjgStkkNGxsw87/H -f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a +1:eJwV1Hk8VN0fB3BrsiS7kH2pqZRmrC3O115iSJF9GTM3W4rkZ6csJfFIVM9T +lpJIlqwJ9QhJUYSnlWIYiSzZZ9p+pz/u677er3PP537v99xzVGnHHRg8XFxc +E/j6cw95uX3T/d6XxlstFt3aopjIeOaWHs28DA1n0y798XC+fraGeTNSarlj +1I5tT3+xRoTyBFX1PKM+wa6KiG/jN+9GO/pa+zqwUzs2tMSXvkJCg9lPOrEf +9Ibk/SD/h24KwKYu7Mn3z2Mim94ikVPtKy+w5Vnqbstmg0jfWs3gFfaB2Rij +k92fkHCNC2sA+9GPSeGI0hFEGQngeYf9+rRsdH3wKNIVccoYwp5ZYz65SGYh +WohCKhN7zYUTLpSVcfT7UNP8Z2wl8dzOkKYJJP1Tr2sam6qwfHvG7Cv6Ptrc +ycEmCtRktNfOoG2vnk1zRzNRvKZdcmD3LAodrT4tiP1WdmBnWOk3RJVRWJbD +prsG+F+6MI8+S117rYY9d53rRnXwAupcXNXchr1WTVvsG3kJlR+2FwfsbHqb +lZj0Mjo/Yl1uja1S7BK/Y2UZUf01GxyxDbelzBxrWkXhbTHyx7D99D91T5r9 +QNxeHeI3sBcjTvEJaf1Er536NCqxE5qE95DW/kLBOW23H2JfBcO7R7t/o8jv +zisf/tRX1GkeWsoNAhZEl2IME5V2XBo+rcADv9VqHHdgz332jLl4gQeiBL9S +TbBjtizV3Avmheh/NTMI7OxKVfVZMj+kdwygeuz3vV8f/Srkh2N1uSZd2Crz +911FpdcAMeZaPYxdpkvN0l5ZAyfS64dFYpmo/UEUd1DTWuAoSYUEYC+19X+a +MBOBCp4kn11xTCRhIyIW/UgEat/OVDlj6wyYwzqjddA++y7pf9gBY3UFO7eL +wj9phtX12Cd4unX2iojBMIu6dXc8E7HUKr4lL4vD+V91V90TcH+I54I9FAl4 +8JeCRCI2z91x1Q0hErCxRl20FFuFouxQOiUBs56aGWxsV7PM6pfDkmA5QKnI +O81EPb6hJ2W7pMFnue0EdyITfSzOSPNeKwOM3mRpHeyvU6WFdyxkQCxPaq8X +tlDYaP/uFhlY6bgl9S+2edJhXe86WWheYLKSkpio8Zb+Ukm+HDg7ZEiSUpjo +FosTvitMEVqYfDX9qUy0z/Hsx5PlirAQlpgieh7nt0talo8rwvrugO792Lq3 +tkmruCiByaWEysfY7TTPGn5jZXCiqffXpzHR/Ozw/yYSVcDkh86l+nQmkjxm +XltjqwbD83zrRbKYaPyWkJ99gBo4p5roO2I3DPYqTKeogcGQc28etruNR6JW +ixo052zyoFzC9W0Nd/ibrA6UtLp3Ptn4/ZPFc3GyGkDOI9EGLjPR4aPC2tYj +mqCf4Pty/XUmQuGO5CM/NaHll1cBA3tLcr4BXU4L+uYtRpqwuQoppnEHtUBQ +cLjSP5eJyj+6Hal+rAU3nz5PeJ6H96dT2Wn5m5vAbiB6qeAGrs/c9vUkjQQH +78YeuFHMRIWHrnxYiSNBQGU1L38JE2XQRob5rpFgEzVgqz82PeHUlFI/Ca6u +nnpGvsNE4s25XIfMtgDrbCZ0leL/hzKzpUl9K7zeFqIsXsFECmp/xaeNbYPB +T9+fzNUyUfP5RRKbRxuchOVVg+pwPxZcBghVbSjWNuaawM5r1yCZemrDK+N6 +65F6JlI72ti3+kYbWNcMxd834O8tY2kSXdtBaMYgcKyZiRQVlAgVFx1YG2Z+ +3v0JE20rChP5jshgd3+N1eAbJqLRE5e0qWSwuZsXGPwW71f1rI/e7mT48mYt +P/c7JuK9WXmvI4IM/wSGXt70Hu+3vMnDWVVkcK0L0Y0axOfpVe9ckjoF5O9M +++qN4PVNs9nuvEYXOAmhnbxTTHQjVMO+rlsP9mYH/I+HaxRVf2xJ2zCoB/n8 +js9asFutPZ5GT+lBIPXz7XjuUTSmdtnYVEgf3t3dyf+bZxRp9Qto91jpQ6hB +oR3fmlFURpkS/NKqD9opoEUSGUUNi1VtGx8YgGWK0fbBDaOoNxwZJBUZwdrr +2T6TlFGk6vkf1SNoLwQniU6lHx9FjN/1FYqRAHUqzRtVKkeR7FSDgCzNFLy8 +HpYs/BhFYZQ9g1lbzKHp4DPPndQxRJv+0Sk5aQGC0/uilW+PoXLTkwL5PVZw +JKA4b8N6Frq1GPC4LHs/HKt2mreLYqFVkw0v2uMPQN7gEB97lYWGuHi/jfjY +wtkTn0L3JIyj4I3HM0+r28E9Dj9/2NrPqMK/syUn2R4G/t14+2zxZxS1ILey +1f8g7BCzJK1YTqAla0unp14O8EAp8ww31xdk5HbRhHXwEPjpCBwOaP2C+uRy +A9oph8HAVOw2kTiJ5G8nNpdsdoSNGZEOST5TqGF4iw11nRMEBfEPK+79ipQG +5o6GTzsBX6hox5jyNKLkXCwrHD4CcxpiQ7VqMyiXb2F7VpszJEYvnBNRmUX1 +JjveJz9wgZz6attM5Tl01eC8+I9SV4gsylFOrJ5DPR+KUigX3KA0+dT1K/AN +1dle1ziR4A6krLvNuZ++oW/HDnEF0z1AO1TEQyZiHi1ZkvxmzDxh3J17b57Y +AiqZfrd6Ut8Lvvn16l1rWEDON4p8PUS8Yb7w+Eqe0yKqqT7gxXvWG1aXlrYt +cS8hI4U+dirbG2xeUp9lFSwh9eGj71/5+8ABUmPTYaNlNCYcaHd91Ac81zeH +aL9fRr0ZVF8rRxq0hbjncvxXUHZEvvCpXhq4rY7Mf/ixgpof/Wb77veFKR6a +K/P0KlrvDmcpjb4w0V8dpjy/ioy8Z0qSdekgzw4sWnBno9t/z52k6tMh4U3A +IM2TjaT6541lDekQvWdc5ZUXG81YrAyU7KbDxuy3vaU0Nj6/uLi7Temw6YlX +q4MfG4muiLtIHKRDzDWjf8JOstFYup5g/jE6NFxy+/vnOTbKaIrxb7hNh6et +Qr7iVWx0jHzFKKKEDv+mBe/aXc1GNneqBA1L6VC7OUuSXsNGQlfG79wvp4NN +0edn1XVslBxqP1lfS4fHLvHG5o1sFEPSCKxrpQPrQwO/QRsbBVzpCqr+iJ9X +/iTkOsBG+0XH94QO0yGp9fp53//YaHMy1zoykw7z5F88Qa/ZaDxUr7yKRQda +4tXByLds5EPNn773lQ5qSWVbUwfZyJn/ZHAlhw4Rq6Rfp8bYyOqk/IkyGQbU +bFUoSVlgo9b8FOusDQzo1z3HOLPIRnu65zUi5BnQtvPwaMwSG+lodr0zU2IA +hfFKKXiFjeTeRJt90GTArOPsBZPvbDS1a0hGSI8BUbUevGU8HPQXT8HDo4cY +8MPN0yVdjIOEdohctXVkgNHjnCxvcQ5KcosIpRxhwK1U1USyBAdF1Npv+u3K +gHLe7al9khzkQ3BfvEzDeQeXVXllOYjynEZ/EsKADZMMqpYiB725qCmsnsmA +e6GWE6GbOagCrfObuMgARc89FuIknD+92F5+iQHd5dGxFdjk/e1xhlcYEHlu +czxrCwdlcPnO2+YxwLLpfKuFNgdZHi94F1HGgO075zR6dnKQouI5feMKBvyU +eKjmRuagxefHL/Hew/XYIzYL+6YWss2oYYBQw7MdqxQO+jk01FLYyIDHVb2P +RPU5qNZGoeRlJwOah86Y8+3ioDQOD3/2c5xvvrs5FptWMunj0o3rG6YLLWOL +8TUqjPUwYLktmTS6m4OCmpz/Yr9mQNUu4njlXg5S33I5XIPFgJ4LMz/Xm3AQ +501s/5dxBjT63nsRjt2bzNCpnGDA15tzIYPYcSO6k0ZfGZDHijK4ZcpB76/2 +e9gtMKCLUVGjac5BWQLiFlHcBLSzvF3mLDmoeX7ILYyXALFZMVmqFQd9HioN +DeYnQO9XrEcp9p5a8wKaIAHSpaJJnvs4aNw74ru1OAHcUoW6dftx/TYWEhaS +eP61Xl0Baw7abSBBQtIExLk+bT6CnbmuzIkiR4D9gQLfxT/jjZ+qFFQJeC8p +LLTRhoOIorJOaXUC8iZTLWjYmZmRn9ZrEtD39pdAMfY4IbmOj0TA7KZA1W22 +eFzSyu+rDgHeF7oKNagc1PhLMn6cTIBC4ikpL2zWl+GcYV0C7ln5Cl/F3tUS +1TZgSMDFocY0fjsOGguqUHoIBDhfPjDwElvUOVrvvikBxY3cp35iG5nts6ky +J+CGZ8C1Lfb4f5FjRhbtI+CtnVRkAnYDX2VmvjUBvrEGOnewR2eji/+2IWD/ +VG9QL7Zhh/R/6fYEzHN2hMsfxOtdxZw660BA9Y0Ppnux069X8pw5TMBM1rNs +T2xm6H6dcGcCuiSMO69jr/OUsTrhSkBkd8WdB9iG+0c9AtwJ6NDSF/vvz3zl +2DRPbwJed9KCBBxwPULWN51peJy27KOEzVySeeBAJ+CRSewgBXvdyGiPDUGA +yYfZD1bYht33xi39CPhCsvJ2xabdj/0JAQQ4lsf4B2Kn37SW2h1EwO6A8ytR +f/LTZbfqBRPgNxkglPonP2LMZMcJnL9H7mYOtgi9ypkUSgB1KfNRAbaBXdxx +9TACDLVfepX+yd91IEUxHPfvzIvkauwLmhtyZSNwv+Uu6DzArhdj1YhHEWD1 +j4D3I+yR71XPhWMIuEI2lmr9k/85boQ/joCsnO227dj6fQdWf8cTEPT9jdAT +7P8DIZDxWw== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.8190010003206292, 1.212160280392001}}, + "PlotRange" -> {{0, 180}, {0.5774857326488577, 1.6452074454861885`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.819001000320631}, + "AxesOrigin" -> {0, 0.577485732648859}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6547,7 +6398,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.819001000320631}, + AxesOrigin->{0, 0.577485732648859}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6575,7 +6427,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.8190010003206292, 1.212160280392001}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.5774857326488577, 1.6452074454861885`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6583,9 +6436,8 @@ f2GPJ0F3Z8ST/dgab80X/yaQUJi7eIHp/wOga/9a Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913281932019863`*^9}, - CellLabel-> - "Out[168]=",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] + CellChangeTimes->{3.9913281932019863`*^9, 3.994386674336754*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"28156c15-8ead-496c-8d7a-2e70234fddd4"] }, Open ]], Cell[CellGroupData[{ @@ -6648,348 +6500,176 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488717861137`*^9},ExpressionUUID->"5a7f9400-1446-9746-a463-\ -bade8ae5c530"], + CellChangeTimes->{3.9918488717861137`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0472568361461936`*^-267\\\", \ -\\\"668326769467589022464821184293345689600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 117, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934227676`*^9}, - CellLabel-> - "During evaluation of \ -In[169]:=",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.5836247142456827`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"9.712832141864725`*^-262\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 169, - 118, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934317894`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994386674818213*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], +In[95]:=",ExpressionUUID->"de2c7641-560d-446b-b078-16b2f84f9887"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.3739060311364366`*^-291\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.2936554676920608`*^-272\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 169, 119, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913281934409904`*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994386674824963*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], +In[95]:=",ExpressionUUID->"7582ac36-8140-4b0d-b1a7-8ff003d63a23"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.7230241855783462`*^-283\\\", \ +\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ +small to represent as a normalized machine number; precision may be lost.\"", + 2, 95, 11, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.9943866748313828`*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"1a91357c-3e69-4d5c-8b83-615266b5eb50"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 169, 120, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99132819344899*^9}, +during this calculation.\"", 2, 95, 12, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913281934227676`*^9, 3.994386674839081*^9}, CellLabel-> "During evaluation of \ -In[169]:=",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], +In[95]:=",ExpressionUUID->"5b5c772b-d70a-46c7-858c-f9a9b5f7f4d7"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VPsbAHDRJmXf1zNjqazJOsN4XxTZl5KyLyGylhRakFDhKiW5JQm/ +SpeZ02KruJSkSFnTJSKVZMkSSv1Of83zeZ7zvOd7zrudoflFOAdwc3Fx6Szj +4vrzO9f/7LHSmSKTqQDeZLNL5iYd+ZKxpj1JsHn/4ITXIg1Q7KWfZM854P4W +mqS3qA0xjre6eXoKgetJ0pLkoikIjUucW+gmQYQ3J+nLghO8e2AfMdNdD/di +N464LviChdJo31T3a0hxCXsq/T0KFroNLkx2v4eoy2pF2uOJ0GD+v6JXhdNw +ZVV4onjKOZB9VzXip74EnxXispNV/gbRUO9bq8x5cDhwZMz+0jU4p21RY++y +Giv4K1I6bhXDm9xNdVOC63C1TvezdNpNOFN0/CW3lBCG7H2QoXn4NljrBguL +KQphb1nmQ6/k27D6sbPLeg0hfDieeD416zYkDym/tTEVQonoOs2GG7fhCP3F +yPlgIcyMW9Y12HMbwgskf6lUC2HxLr4VNQb/gNNljrqNuzCaDqgatE78AxLn +h05lXxHBBZWZ8bVW5SCpdi95vkQEX1SfsC1xLgfp+pTjnmwRHAnY3WfoUQ7y +kxsPrm8QweWk+HmriHJQto30qfkkgoOVCnpSF8pBZ/mS/pCOKE4HFFlGvisH +h2jx4c3NomjnsZWIN2CDI9+n/ovtovhDZGL6jREbnAur3vz8TxR7n2Q66iEb +drZ5vGycEMUwu7HCwW1s8FS/Xu0mJoYzFbwFgm5s2DesdTbJRwxbx2WvPo1n +Q+oOK5PXc2Io9FCI7+IDNkjfbZXmXiaODeFZq97WsaFMZMd3bT5xVFxSHpJ+ +woau117sswriGCYqp5/ZwgYlp2i60zZx7L5ia2rez4Z6u6sr2y6JY45IZeHI +LzYsWcy2thhLoCVP2CVBFgeySuJKlywkcG6gf/AlckBpJVeahpMEsotfcp3Z +wgHbJ2tMMwIk8K//Tv07Y8OBPHPijm2mBLZ0o3WOGwcM0ebi83cSyAyW8hQ6 +xIEDjGvez5Ik8foxtWUfb3PAuoB/xiZdEs+ObN04Ws4B+qojaa0XJFH+0bLy +zyQH2jp2ctpvSGLux4T2vkoOaEau5elvlcTO0O7EvMcc+FRyqOSbtBRGzXAS +A95ywEPU/qvMHSmUsGmqMVtJgk58TWL+AynUCRuvfbWahDXvN4jTGqVQO0NG +2ZOPhKpyHlB5I4Vr3SxFggVJELepytr0WwqPCjoku0iT0JaopLvVRhrdHlt8 +StAgYcvEYlz4kDTGyWwIV3QiIXbbedV/x6SRE8gdqbudhLJrGr0ic9JYG9n8 +y9SFBMkdPoyq1TJ46ILPY+fdJIxVPvnOoymD1ttPzVv7kpCdlBV96bAMrtPa +6ZATSULT241KY4ky2MK7wzJyPwk/dRvaTc7IYL5Z6SuLaBICP85uHr4ig2E1 +w/mfD5HAtHWf0myQwc1Oeiorj5PwXkwl/PE6WdzQpm76dzoJEhG1chISsmjA +qM4wySTBtmlXSzAhi3Uawgf6/yLhftwZdQEdWTRRHeQVzSbh9LvJ0d27ZFFJ +OSJ65yUSNt+sCZoolEW5NJUiw2ISgrhdJMxuy6KibM+d4hISLruPN56/J4v9 +Bx/7C9wgYSU/TYXZJIvh/9qU9NwioXd/ynDyV1l0azB5bMYmIdHYyVfaUA49 +Tmn0HKwmYZtX/jcDMznkL7xw+GkNCfwJX0642Mph5HIxVbGHVPyGkyVZPnJ4 +Q0m3oaiWhErr6i8rT8mh+zL99+cfkzC5SzFm+o0c3pG6EFvVQkJFXOQqoWE5 +5NtddeJFKwnHLj/M1RyXQ1eLmVtvX5KwdsC1JphbHrmye7ePvyJhfVA614Cq +PCYsH1H+0EmC18HZ0y/i5dFfbS5Jqo8E5YtmsqMn5bFti33deN+f/P31z6os +eTzU/mt9XT8JcT83tpkVyWPK3eFY1wESLpzwEqt6IY/T3YG4a4gEj+LSkq4u +eTwWIveZf5gE+tN5g5kBeTRINmv4lzJ7Tbab1qw8jvLFCciOkPDi7NOrxXIK +aPXOlnb9E1Ufd0S1G9YroECjXITRZxLcOn3rB7QVUNatdvYl5U+SP4dlLBTw +4H9GnK+jJJQzrWIYjgro6Lb0MeYLCTEeOatc3RRwqdDD/SdlnoJNqufCFXBT +QOuPH2MkNP97tKb8sAI6FLepxnwlIWuo2bYlSQHfGDnmjVGWXx8QsfqiAh5O +vWPSOk7VW9mlu8dqFTDl+aPKPZNUP3S3Lo03KWCCRtv3asr2XMstvV8rYImb +++K6KRL8ncPfwAcFtM9Xs7tFOTz+Op09roAgInV1mvLhop59xLwCSgu8qmB8 +I8EinnY8YQWBpzIW8QHl5wIPrhuuIbBLTubOPGXHop1Nk/wEujvsmdCeJqHL +cGrshgiBgjXlc0GU3VvOCPlKEvj1RfezPMoDvir6UnIEujZUBDdTDpyrc3tF +IzChTK17jnKkwtx1UzUCQ6vM5S1mSJi9k9W0oEWg17qihb2U47apfeXoErj1 +oWBJGmWuvidCIQwC//ocrFRM+WSUjz7dhMDvCVkHH1Fes/KHW68ZgUMQmNdB +OSvvwvFzlgS2lbdkf6QsprWpyNqWwHsqt/y+U85raG7idiJwf+O7VctnSVDY +FfC12oVAzSPbk9dRLhr7LXTAjcCG36M9IpRVE/P01bwJVG1PXylBuVxMz33I +n4pvSvD/se6tl8f/3kvgWp+MyT/XV5uEFG0PIzB1zcOyP/Ggffkzvv0Env2Q +a/Xnfo+Drn5tiCHwnAdf/Z/zWP1kCB+JJ/DAtd+Snyi3ZnXo6yZQz1fq69BJ +eYdyhPtYMoHrGfKBtZTfVPEmFJ0i8EEz3auEspd9UZFHJoGHSzwNT1Mefm/y +TDSbit/5cDaEcvChN19fXCRQVEnn4jbK43zRwicvE2hBlMkpUj5QwG/Aukad +X5o4vUjlZ173pvtsMYH29Pi+Vso8Xv1FAeUEMvwrjcMpp307/EzuLoGbjiZZ +Myjzp4qMd1YSyBu0wnwZZUn2NgOLegLP562bT6Xq58qWIfdfjQSK3Eu4b0GZ +/uZowv3nBL6ENH9uyhrcd56pdBK4ws0wI5KqTzLHbrz/DYErczr4FCkbqn0S +vthPoHje2JHXVL2b7ZDzWPWJwAvWx5kbKD/9VJFQO0Zg2L7ptNYJat4edS4+ +NEXgiFFXSxRl15LU8Y+LBPqw35uUU/0UOj+V0LSOhqe+SvWuoPqNGRUoPiJM +w0/SwltPU/25erS3lEeShr9jptfzUS5+29BlQqehsleBGzfVz/2PLqjf06dh +bqp8biM1L24brKl/bUTDh4KdI5qU49jHXCeRhtnXRiuyP1L7rTAoSc2GhsvT +j484U/PG4SSj55o3DUWGLuf9j5pX8r/+CavdQ8OY5LO0mffUvIuh8/QF0/CX +V44ei3LaXj5NyWgaTqcz1zyh5l2dTd+JzDQa1prypJdS83GzcKJWPIeGXlZq +yp1dVL+cmX2ce5+GZVEetC/UfG3lCXG7X0PDqcu36pY6SNg363xy6gkNGwgY +l2yn6r1H6W1QLw2lXN6pr6fmtfjVppQdPHT8scL7UFEjVU8SLNn9q+nInT7r +cPIJlZ8sDuevdXSsY6S/96P2gUNS3n/NEnTMu5FpJFpPnTcgdLOpOh3dNw59 +cKD2yYKaYL+GCx2d1tIC1e+QMHdFOlHHjY6m1+40veOQMCOgrMTwpuPTb/uk +s6h9NT7NCNkSTMepsV9ZH/+h9muN/5zbUTqeXrj1LYrad802FfxpxXT8qU80 +z16m+nmfF7yfpeMyz4jFhhMkXOzb+/7jIh3FrJMFJJNIOO9w4OTX33S00Ig1 +C04gIVMn7fk8ryIOJixbzXOUhKQfHFcBeUU8kHXNSDSGej9nVkQaWyiiU8ip +i2VBJBiX3i7IyVHE7aLqbS3bSHhLlF7d+rciLumxT3yxoPKdczN/5qoiWu4o +f7dyK7UPE0suO99UxMxQzRx9Uyo/uwpy+R8oYu5dDhHHIGHjivNZKYOKOPl+ +pOncRup9e8cnxKgr4cTrAS8R6ntpStjaZ2e9Eu4Zi7XPe8SBnlB6W8hTJSQj +FjO/13CgrnERjr9Qwpn9upHOVdT3Ylypwo0uJTTQuyKz7C4HNr1f+25hVAmz +bjZtNbvJgXDOS88rIsr4zu7YHpdsDow6uLgP71FG8+YPD5sDODCc7rNz/yoV +ZNp8++m0nANWE4esPuivx4HrH9s3Mtkw5r/6wN3jG3Ds7X8/ezLKqP8rEtyp +9Rvxyc6Lu33Tb4Nwi0ome0IV/334d8Xh3Fsgm1buqK+vjgPnNT+Mht+AXDWG +oEiQBpY/cn2Tv7cEmqVN9abPamKkaHTm8P4iYMrWZ2l1aSFRUhKu5VsI/DyF +0b5Jm9DV7rSpR0oByCcqGO9W0caFkTNGXsZXgFfZ477zU228GFmno19zCTRZ +UuWHPDfjqtW7SwXJHNjfL9xgzaWDD6xcjxwszYaJ6XQXq1wd9N/apJ8kdRYs +tRrzrDR08bQ39+q4wgx4NG3043urLpptynTR1DkF4eqbe18F6OHgC/+QsNST +wBrf07GbVx83hVWGFKxKgq1KknbrCvVxaru63QHPY7Ah4fThegMDFBditrxK +jAXVAEatcq8BhvDZmHQvREPAo73Jd6MMcbLyUMKoVxSMh40e2hptiKwjVpDs +GAWH5UL3dcUYov+aA3wbzKLg9JEI5/l4Q8ypU6zIUI4CNjOGME4xRMw99bxt +LBJ+3j/xoCHPEPX39QVpH42Ec+X5M68bDDEx8xojyjoCags69kyJMfCct8DV +VHooDNjSvGMkGZgff2RocE0ocC2E7f4hzcC7a8el7ab3gZnTKvsVBAOP175k +7Xy8DxqXMQ2kVBk42XrDcXPQPnjhd5XX1ISBAT8d/+Zlh0CvUkhZViADTfTc +mmbsgmHmxu/vWhUMTKSf6ntSGQgjOy0KTlUx0O6KQEZQSSD0LM/YNlTDwLDL +L3nFzwdCjY/0pZw6BvrTf9pfigiEJEk95tIzBrYKH91iuD4QBNNCjjT/x8CY +9NrGV7kBoB7UyRXAzcS/Nt78anZyD/grl/Lm2TGx7Zq+5PVEP4h74hWi4sjE +jNDOb3ORfpAVIPycdGaitKvcO1cfP3hQHJv+3JWJ0xNPnyP4gajKNoElXyY6 +HRMTLFvyhUaVD6I+MUwUWhmqOHHEF1Q3KBAqV5m4P61apD3ZB6ZUs/XJSSZy +yoYd2iM9oecFbhWZZuJy7+B2F1dPqAsf3x49y8SV2e33v7A8IZO0itJfZKLt +RpkwJz5PUGVy3a7mMcKpe4MWPP/zAD+rMFqDuBFKxgoYzQ26Q0eQ5doOYyP0 +UlM90xjgBpVFPwZn04xQTDAnJL3QFfTNo79bnzHC7If7CmcyXOHe4Njaggwj +NNeWrwqNdQVSvt/A+pwRzp/xckt3dIXbuXUZ+X8bodV2Hce03zuhIP0kw7LM +CDtLjxuE+OyEU9ECZ3PbjbDtUdOuLA0XcNuiiEbyxliB9/i3TTvDUsdq/gbC +GM32vtf5MuAMBQHjb60VjdEkv0A7v9UZRlKqDrltMMZ4tcI0nVvOsP+ZQ3ns +ZmPssmz3k/ZzhtP2R+QrLYzxOw9/S2uHE1Tv6vypG2GMfU4VH048cQSZsNQq +zTpjLAmy23T0uh1k/g7UO1NPxatWTF9ItQPucxacj4+NUUNioiU91A5G76+4 +WfDMGJM1NOq/69lBNVdyrnC7MWr9Jkv6ntmC2/mEQ3MfjPFbr/+2t7M2kFsT +q/eIj4W3vmks0/KyBrE1oRw7Vxa2NJrs6wu1hCLzo3GTu1kYb1Z+gXuHJWw+ +mmme7cHCo7ruqWBkCfaT7M4eXxaqXmZHca2xhJSu2QX/UBY6ftA0uXzDAuYL +j5vFJbLwnIVHreroVug1ym4vKWXh3e3c5vLHtsDeg0WXrcpY+DLxkbLE3i0w +V3YvYIxNXR/F3K/svAWE6T3fte+z0EpjJVeSyhawWS0n+7COhbt4SucM28zh +QUfJnvZOFsamit7PXG8O1vyVGjE9LDSVPfyqU9gceiyfzUm+ZaFHYxRT+5cZ +zFR/SfMaYOE9h4ZypU4z0Li26Z/PoywMMazd8vOEGTzoNY1J/8pC2knvz0MR +ZmAtuh20Jlm4PInH+Z27GQSmHnwVPUs9X0m4mpAuFa8uJU9inoVlzt5xloQZ +JC1e9K9eZOFIWYnV2bVmIKh7U91ziYV+/TFp4/OmkB9WPfv7N3X/mnUq3h9M +4f/swcNZ "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7003,307 +6683,132 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV13k4VPsbAHDRJmXf1zNjqazJOsN4XxTZl5KyLyGylhRakFDhKiW5JQm/ +SpeZ02KruJSkSFnTJSKVZMkSSv1Of83zeZ7zvOd7zrudoflFOAdwc3Fx6Szj +4vrzO9f/7LHSmSKTqQDeZLNL5iYd+ZKxpj1JsHn/4ITXIg1Q7KWfZM854P4W +mqS3qA0xjre6eXoKgetJ0pLkoikIjUucW+gmQYQ3J+nLghO8e2AfMdNdD/di +N464LviChdJo31T3a0hxCXsq/T0KFroNLkx2v4eoy2pF2uOJ0GD+v6JXhdNw +ZVV4onjKOZB9VzXip74EnxXispNV/gbRUO9bq8x5cDhwZMz+0jU4p21RY++y +Giv4K1I6bhXDm9xNdVOC63C1TvezdNpNOFN0/CW3lBCG7H2QoXn4NljrBguL +KQphb1nmQ6/k27D6sbPLeg0hfDieeD416zYkDym/tTEVQonoOs2GG7fhCP3F +yPlgIcyMW9Y12HMbwgskf6lUC2HxLr4VNQb/gNNljrqNuzCaDqgatE78AxLn +h05lXxHBBZWZ8bVW5SCpdi95vkQEX1SfsC1xLgfp+pTjnmwRHAnY3WfoUQ7y +kxsPrm8QweWk+HmriHJQto30qfkkgoOVCnpSF8pBZ/mS/pCOKE4HFFlGvisH +h2jx4c3NomjnsZWIN2CDI9+n/ovtovhDZGL6jREbnAur3vz8TxR7n2Q66iEb +drZ5vGycEMUwu7HCwW1s8FS/Xu0mJoYzFbwFgm5s2DesdTbJRwxbx2WvPo1n +Q+oOK5PXc2Io9FCI7+IDNkjfbZXmXiaODeFZq97WsaFMZMd3bT5xVFxSHpJ+ +woau117sswriGCYqp5/ZwgYlp2i60zZx7L5ia2rez4Z6u6sr2y6JY45IZeHI +LzYsWcy2thhLoCVP2CVBFgeySuJKlywkcG6gf/AlckBpJVeahpMEsotfcp3Z +wgHbJ2tMMwIk8K//Tv07Y8OBPHPijm2mBLZ0o3WOGwcM0ebi83cSyAyW8hQ6 +xIEDjGvez5Ik8foxtWUfb3PAuoB/xiZdEs+ObN04Ws4B+qojaa0XJFH+0bLy +zyQH2jp2ctpvSGLux4T2vkoOaEau5elvlcTO0O7EvMcc+FRyqOSbtBRGzXAS +A95ywEPU/qvMHSmUsGmqMVtJgk58TWL+AynUCRuvfbWahDXvN4jTGqVQO0NG +2ZOPhKpyHlB5I4Vr3SxFggVJELepytr0WwqPCjoku0iT0JaopLvVRhrdHlt8 +StAgYcvEYlz4kDTGyWwIV3QiIXbbedV/x6SRE8gdqbudhLJrGr0ic9JYG9n8 +y9SFBMkdPoyq1TJ46ILPY+fdJIxVPvnOoymD1ttPzVv7kpCdlBV96bAMrtPa +6ZATSULT241KY4ky2MK7wzJyPwk/dRvaTc7IYL5Z6SuLaBICP85uHr4ig2E1 +w/mfD5HAtHWf0myQwc1Oeiorj5PwXkwl/PE6WdzQpm76dzoJEhG1chISsmjA +qM4wySTBtmlXSzAhi3Uawgf6/yLhftwZdQEdWTRRHeQVzSbh9LvJ0d27ZFFJ +OSJ65yUSNt+sCZoolEW5NJUiw2ISgrhdJMxuy6KibM+d4hISLruPN56/J4v9 +Bx/7C9wgYSU/TYXZJIvh/9qU9NwioXd/ynDyV1l0azB5bMYmIdHYyVfaUA49 +Tmn0HKwmYZtX/jcDMznkL7xw+GkNCfwJX0642Mph5HIxVbGHVPyGkyVZPnJ4 +Q0m3oaiWhErr6i8rT8mh+zL99+cfkzC5SzFm+o0c3pG6EFvVQkJFXOQqoWE5 +5NtddeJFKwnHLj/M1RyXQ1eLmVtvX5KwdsC1JphbHrmye7ePvyJhfVA614Cq +PCYsH1H+0EmC18HZ0y/i5dFfbS5Jqo8E5YtmsqMn5bFti33deN+f/P31z6os +eTzU/mt9XT8JcT83tpkVyWPK3eFY1wESLpzwEqt6IY/T3YG4a4gEj+LSkq4u +eTwWIveZf5gE+tN5g5kBeTRINmv4lzJ7Tbab1qw8jvLFCciOkPDi7NOrxXIK +aPXOlnb9E1Ufd0S1G9YroECjXITRZxLcOn3rB7QVUNatdvYl5U+SP4dlLBTw +4H9GnK+jJJQzrWIYjgro6Lb0MeYLCTEeOatc3RRwqdDD/SdlnoJNqufCFXBT +QOuPH2MkNP97tKb8sAI6FLepxnwlIWuo2bYlSQHfGDnmjVGWXx8QsfqiAh5O +vWPSOk7VW9mlu8dqFTDl+aPKPZNUP3S3Lo03KWCCRtv3asr2XMstvV8rYImb +++K6KRL8ncPfwAcFtM9Xs7tFOTz+Op09roAgInV1mvLhop59xLwCSgu8qmB8 +I8EinnY8YQWBpzIW8QHl5wIPrhuuIbBLTubOPGXHop1Nk/wEujvsmdCeJqHL +cGrshgiBgjXlc0GU3VvOCPlKEvj1RfezPMoDvir6UnIEujZUBDdTDpyrc3tF +IzChTK17jnKkwtx1UzUCQ6vM5S1mSJi9k9W0oEWg17qihb2U47apfeXoErj1 +oWBJGmWuvidCIQwC//ocrFRM+WSUjz7dhMDvCVkHH1Fes/KHW68ZgUMQmNdB +OSvvwvFzlgS2lbdkf6QsprWpyNqWwHsqt/y+U85raG7idiJwf+O7VctnSVDY +FfC12oVAzSPbk9dRLhr7LXTAjcCG36M9IpRVE/P01bwJVG1PXylBuVxMz33I +n4pvSvD/se6tl8f/3kvgWp+MyT/XV5uEFG0PIzB1zcOyP/Ggffkzvv0Env2Q +a/Xnfo+Drn5tiCHwnAdf/Z/zWP1kCB+JJ/DAtd+Snyi3ZnXo6yZQz1fq69BJ +eYdyhPtYMoHrGfKBtZTfVPEmFJ0i8EEz3auEspd9UZFHJoGHSzwNT1Mefm/y +TDSbit/5cDaEcvChN19fXCRQVEnn4jbK43zRwicvE2hBlMkpUj5QwG/Aukad +X5o4vUjlZ173pvtsMYH29Pi+Vso8Xv1FAeUEMvwrjcMpp307/EzuLoGbjiZZ +Myjzp4qMd1YSyBu0wnwZZUn2NgOLegLP562bT6Xq58qWIfdfjQSK3Eu4b0GZ +/uZowv3nBL6ENH9uyhrcd56pdBK4ws0wI5KqTzLHbrz/DYErczr4FCkbqn0S +vthPoHje2JHXVL2b7ZDzWPWJwAvWx5kbKD/9VJFQO0Zg2L7ptNYJat4edS4+ +NEXgiFFXSxRl15LU8Y+LBPqw35uUU/0UOj+V0LSOhqe+SvWuoPqNGRUoPiJM +w0/SwltPU/25erS3lEeShr9jptfzUS5+29BlQqehsleBGzfVz/2PLqjf06dh +bqp8biM1L24brKl/bUTDh4KdI5qU49jHXCeRhtnXRiuyP1L7rTAoSc2GhsvT +j484U/PG4SSj55o3DUWGLuf9j5pX8r/+CavdQ8OY5LO0mffUvIuh8/QF0/CX +V44ei3LaXj5NyWgaTqcz1zyh5l2dTd+JzDQa1prypJdS83GzcKJWPIeGXlZq +yp1dVL+cmX2ce5+GZVEetC/UfG3lCXG7X0PDqcu36pY6SNg363xy6gkNGwgY +l2yn6r1H6W1QLw2lXN6pr6fmtfjVppQdPHT8scL7UFEjVU8SLNn9q+nInT7r +cPIJlZ8sDuevdXSsY6S/96P2gUNS3n/NEnTMu5FpJFpPnTcgdLOpOh3dNw59 +cKD2yYKaYL+GCx2d1tIC1e+QMHdFOlHHjY6m1+40veOQMCOgrMTwpuPTb/uk +s6h9NT7NCNkSTMepsV9ZH/+h9muN/5zbUTqeXrj1LYrad802FfxpxXT8qU80 +z16m+nmfF7yfpeMyz4jFhhMkXOzb+/7jIh3FrJMFJJNIOO9w4OTX33S00Ig1 +C04gIVMn7fk8ryIOJixbzXOUhKQfHFcBeUU8kHXNSDSGej9nVkQaWyiiU8ip +i2VBJBiX3i7IyVHE7aLqbS3bSHhLlF7d+rciLumxT3yxoPKdczN/5qoiWu4o +f7dyK7UPE0suO99UxMxQzRx9Uyo/uwpy+R8oYu5dDhHHIGHjivNZKYOKOPl+ +pOncRup9e8cnxKgr4cTrAS8R6ntpStjaZ2e9Eu4Zi7XPe8SBnlB6W8hTJSQj +FjO/13CgrnERjr9Qwpn9upHOVdT3Ylypwo0uJTTQuyKz7C4HNr1f+25hVAmz +bjZtNbvJgXDOS88rIsr4zu7YHpdsDow6uLgP71FG8+YPD5sDODCc7rNz/yoV +ZNp8++m0nANWE4esPuivx4HrH9s3Mtkw5r/6wN3jG3Ds7X8/ezLKqP8rEtyp +9Rvxyc6Lu33Tb4Nwi0ome0IV/334d8Xh3Fsgm1buqK+vjgPnNT+Mht+AXDWG +oEiQBpY/cn2Tv7cEmqVN9abPamKkaHTm8P4iYMrWZ2l1aSFRUhKu5VsI/DyF +0b5Jm9DV7rSpR0oByCcqGO9W0caFkTNGXsZXgFfZ477zU228GFmno19zCTRZ +UuWHPDfjqtW7SwXJHNjfL9xgzaWDD6xcjxwszYaJ6XQXq1wd9N/apJ8kdRYs +tRrzrDR08bQ39+q4wgx4NG3043urLpptynTR1DkF4eqbe18F6OHgC/+QsNST +wBrf07GbVx83hVWGFKxKgq1KknbrCvVxaru63QHPY7Ah4fThegMDFBditrxK +jAXVAEatcq8BhvDZmHQvREPAo73Jd6MMcbLyUMKoVxSMh40e2hptiKwjVpDs +GAWH5UL3dcUYov+aA3wbzKLg9JEI5/l4Q8ypU6zIUI4CNjOGME4xRMw99bxt +LBJ+3j/xoCHPEPX39QVpH42Ec+X5M68bDDEx8xojyjoCags69kyJMfCct8DV +VHooDNjSvGMkGZgff2RocE0ocC2E7f4hzcC7a8el7ab3gZnTKvsVBAOP175k +7Xy8DxqXMQ2kVBk42XrDcXPQPnjhd5XX1ISBAT8d/+Zlh0CvUkhZViADTfTc +mmbsgmHmxu/vWhUMTKSf6ntSGQgjOy0KTlUx0O6KQEZQSSD0LM/YNlTDwLDL +L3nFzwdCjY/0pZw6BvrTf9pfigiEJEk95tIzBrYKH91iuD4QBNNCjjT/x8CY +9NrGV7kBoB7UyRXAzcS/Nt78anZyD/grl/Lm2TGx7Zq+5PVEP4h74hWi4sjE +jNDOb3ORfpAVIPycdGaitKvcO1cfP3hQHJv+3JWJ0xNPnyP4gajKNoElXyY6 +HRMTLFvyhUaVD6I+MUwUWhmqOHHEF1Q3KBAqV5m4P61apD3ZB6ZUs/XJSSZy +yoYd2iM9oecFbhWZZuJy7+B2F1dPqAsf3x49y8SV2e33v7A8IZO0itJfZKLt +RpkwJz5PUGVy3a7mMcKpe4MWPP/zAD+rMFqDuBFKxgoYzQ26Q0eQ5doOYyP0 +UlM90xjgBpVFPwZn04xQTDAnJL3QFfTNo79bnzHC7If7CmcyXOHe4Njaggwj +NNeWrwqNdQVSvt/A+pwRzp/xckt3dIXbuXUZ+X8bodV2Hce03zuhIP0kw7LM +CDtLjxuE+OyEU9ECZ3PbjbDtUdOuLA0XcNuiiEbyxliB9/i3TTvDUsdq/gbC +GM32vtf5MuAMBQHjb60VjdEkv0A7v9UZRlKqDrltMMZ4tcI0nVvOsP+ZQ3ns +ZmPssmz3k/ZzhtP2R+QrLYzxOw9/S2uHE1Tv6vypG2GMfU4VH048cQSZsNQq +zTpjLAmy23T0uh1k/g7UO1NPxatWTF9ItQPucxacj4+NUUNioiU91A5G76+4 +WfDMGJM1NOq/69lBNVdyrnC7MWr9Jkv6ntmC2/mEQ3MfjPFbr/+2t7M2kFsT +q/eIj4W3vmks0/KyBrE1oRw7Vxa2NJrs6wu1hCLzo3GTu1kYb1Z+gXuHJWw+ +mmme7cHCo7ruqWBkCfaT7M4eXxaqXmZHca2xhJSu2QX/UBY6ftA0uXzDAuYL +j5vFJbLwnIVHreroVug1ym4vKWXh3e3c5vLHtsDeg0WXrcpY+DLxkbLE3i0w +V3YvYIxNXR/F3K/svAWE6T3fte+z0EpjJVeSyhawWS0n+7COhbt4SucM28zh +QUfJnvZOFsamit7PXG8O1vyVGjE9LDSVPfyqU9gceiyfzUm+ZaFHYxRT+5cZ +zFR/SfMaYOE9h4ZypU4z0Li26Z/PoywMMazd8vOEGTzoNY1J/8pC2knvz0MR +ZmAtuh20Jlm4PInH+Z27GQSmHnwVPUs9X0m4mpAuFa8uJU9inoVlzt5xloQZ +JC1e9K9eZOFIWYnV2bVmIKh7U91ziYV+/TFp4/OmkB9WPfv7N3X/mnUq3h9M +4f/swcNZ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07405227751610899}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7315,19 +6820,19 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07405227751610899}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7341,306 +6846,131 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVV3c81t8XtzKSPbOys/d8nudz71EiNFAKJbKTIiurkiREWZVkr4xvQiUr -4SmzIiQkoZSUVWaF3/P7677er3Pu677POe977rlSzj7Wbgx0dHRqjHR0/1+X -RzteyF4vQBdkTsozu7uh/izhEKPBSJw6vad7S+5uDALdzsKDyfjvgTannpxD -OMiy9D3jYB7OMrtxLjHHBfPMCiWvva/CJmu8WR+y/fGnhgM+i+9b8NrX+nXV -zCvYRHb648L7Xry+Q+9tQnIKXnuvf2v+/QQ+ldb+7qBnPqbuvl/wNu83XmKn -l74a8ghr3Hj4faX9Nw4O+fQ7/d4jnDX4VE1i7jcOzThUe+/ZIxx8pr3Gi7yI -1Wxd0xzoH2O1O99fMfYv4uW3B+g/XXuM06eVl3S3LOPOG1lv6hOfYN+kij3p -HquYbODCQZf0FI9+qIlrSljFIQl/WfQqnmIL+ebur49WseJkGMeh7qdYvv6t -nTbdGvbI3d5mxFGDP3z5deZV2hrmV6z6NHutBpsY6N7e6PiDjR7TJfoE12Kx -T7VfnVXWcaFpTNKhPfWY7ve5tA6rdcyRpKhZ5lSPvzArmWucX8eapqZ138Lq -8QO19AfrzesYpPS1uarqMboYGpB2dAOzsZ45JyDegB3FyQxvIjdx3GENPDPT -gN+qjt7I+EkHug4DIcahjfiFft23g5t0cPrWdyG+5EZcbXQbGHnpQdjGZO+L -kkacbnPg1yl9evh4UkjqzWAjdr7QaKMfSQ9cIfTMF3Wf41+vssR6hRhA7TrR -bfT9Oeb3dixl2c0ID7c7HtnIaMJKLPmtlkcZQak9aHjofhOGvK8Td08zAp+R -rWh+VRP2HjwjqpLKCHk379dttDXhF8bh8ZaTjJASu94+tNCEA8Tvnr17jQmS -HpAcRHY147iakbiJe0ygqTzN1m3RjHMOSd5XrmACngKRHedsmvGr2Pufng0y -gYavj98Fz2Ysu/zEckJxCxiHa1hWJzTjvje9WsqvtoCEyfJMYX8znjoleDBg -bAvUF00Gqn9sxhtM9qefLW6BufJFraLJZqxEHs8/KM4MFDEu42PLzTjy/hx/ -wFlmYOBNu/FZsAVrRWxbaeBmgcjPb5NOH27Be0Ut+ZjlWOCb91pV27EWfKI6 -Rf2gIQu837l/mdulBcf9FPEcP8kCexhFPnuda8ETtopDWx6xwJzDbTtKQgtO -1jSpP2DDClTxU7uPNLdg9Q92poQnKzzzGXsq2taCX0Wd6VMOY4Xlr+ntPa9a -MPNg6g/WXFYgTPtesA224LCLn0WpP1nhRYfe0aczLdi1KyJcP4oNLHnIRQyC -VEwfmMoqf4cNKqzam1tEqDhLojiVv5QNxrdM3PPbQcWD57r/W+hmg5AfLndy -Fah4v7DExzLRrTB0QJSBIFGxnls9IfloKzCF6uV521NxH2d3B2frVjDOnNNU -OkHFvjUTNuuDW+Hx/vaa9yepuJR969nhja3AFzDXwHCKindU2WalmrPDDztr -0btBVNxwzFvpigM7VLlUfBoIoWL7LRHV53zZIaviwnOmC1Scanv/zYHb7CD7 -WHhS4woVs24ubbBOsIPvqf+OdN2g4sJitusri+xwqeZgVFwSFe+yFhf6yrIN -FASHlg1TqTi80FidqroN3PcNNp26S8XzFimOF0K2wY7rQTEc+VScsFT043T8 -NnjQXBZ+sJCKlbLrzttnbwMpN8qXy/ep2PXX+E39l9tAkVdcvqaMiofSNJoW -uDkgc7FN7vQjKk7vK+MKkuOA6HM1dUee0Phz7nT8Y8gBzEdDzDSeUvHIFfEN -BhcOeBT+JehBHRVnNqbtv3aeA15e3brTqoGKT6zxZbLHc8Az49XfE8+oeOzs -Vgr/Ew4Qm9NnfdtExbklV6+ndXCA1/M3J1VbqNj5C90HsVEOiOuo/neeSsUy -O8KVcn9xwLKR5UTFCyr+YrcSIsfCCXVv+cQGX9Lyk+rXUSLKCb/8kh/NtFKx -e/eMsJoGJ0jsD6xaaKPiKeMvT/XsOOH8kSiOlx1UXHLJkaX+DCcUB4ReSO2k -Yq+64SM4khPCT3qGW3dRsfKSTRH1NidYsZ/l36Thn+pvl0zLOKH3ccvB9FdU -/MBr355XzznBqOexgexrKj5b2JZq2c8J2cMlQxk0rD6260v/FCc81ZMgmN7Q -6iHSqG23zglLLIVn7Gm40sbwykceLtDimArMpmG/xMe9J+W5wDzsvlMfDWt3 -qUt/JXFBxvtag2UaXtxSds7rIBe49rKzsXZT8ROQb5514YJVyZyR/+OgsFxu -/2Au+HT0ZuMqzV+/WsxpJZ4L3rxgqXtPw6vzdx6G5XJBzN79w4U0XKvMt7n5 -hAvuatQqudBwqPuNA1GdXLDCXVfNRcPkXLYs1k80/8y+2DJaPP8+RM3E/+aC -qCtZD/Vo+AR7RBYrEzc07WrXrqTl43kx0WrOyQ2TzHzSojQsafJ3Jl6YG4Ij -bKIDaPmL+Fwj0C3NDf3PQr2f0fI9FhFE8KhygyBT5NgSrR5GEjpuh/S54c39 -i7PiNJxXvxB/y4gbGibv5Om2UzGD3cPH7y24waGelY2g1dN52Xtk+xFusHu+ -Q02HVm9qihLTcSduYP6DJERpeoh6U3hoLIAbHC9eTKqh6enLaZcw6UvcsFja -ourTTMV72KTyXWO5QSfqSJsATX/Mxhm/pjK54eDpK3LaNH26j9uJKBdzQ+6D -d4yl9VTcdlFo15kqbmB78p2Xh6bvmNrkpIVWbuj7l7jysJqmryOWtdpvafzr -z3z79piKzRY5xgM/cIPAzywKN+3+bFWP1fgzxw1litb7tB5S8fWCS90M23lA -MYs+9FkRFZvrnOIVkOGBNx48zVEFtPv/wtpmpyoPyBxgdyfyaPF8lvtgYcQD -Ic8UNyIzafdd+tXX1FM88HyWGHJKoWJS1RPF+/48sC/05OXHibR6G2V7117g -gTiz5oW1BCoOPOn362MSD/xWOn3SPoam1xzhDfk6Hohd6/3jF07FKhoMRoYv -eEBwYdz5CK0/TT//ccXiDQ+8YPhNp0LrXx6fGtl8J3ig23pRsNyHip0k3ARq -t/JCtCy/DpczFVtlVKpYHOOFO5JVRVbGVMytcs/HwY0XNpv4+ByBit/UR1X5 -+PDCPaye7kihxfvhqEHqFV64/cBIm6RD62ciG7s/lvGCc2WL6lEZKtZJMz/m -848X9i68NCc2W7BQ6ufYlEw+8GXVFpUtb8HCyk+iVov4wOv2ZTrukhYs0hJ9 -yaGCD55YaBz6ld+CJeYVA3dS+SACB/qn323Bcvt8neqn+ICXYZ4xNKoFazOt -633W5oebwydTLtu24IMBgl+0Ovmh1r75yrY/zfjaYTPUuywAjh7H46fkmrHI -4zciDPSCkG1md5Ai0YzL+Q6vaLILwmrg5ZwYwWY80HuiImmHILjKeKqzs9De -Y6sAaau9giD18crr2m9NuGV/NnPPXUFwljb27aLNB+smS29eU4TAPlzigZZM -E/Y3zHXsiBQGZjnfLlmBRmw89yf07GcR+GXqz5bUUIsvU6xOihiIw56Qy1G6 -Pk8wqfzu44vPd0C5jc/N70yV2Ht1IaKdQwror3aKiRWXYtI5d8GvvFLwpP9r -lUVcKWadHi5jFJYCSz1p+pvepbjwA3UASUsBN3vgjKVmKR5tvKXyRE8KXMVy -uaj1JfjgVcPBXEcpcHz3R8Ozvxhr8V5WD6uUgp4D0jDNfx+vKXOPqtpIg0rb -tMtEXz5ezhS5rG0vDfevDgkV1ufjRS45WUNHaeCeK50My8/Hs78NvYxPSYNT -ocprN/98PFHvsmx/gba/Vb5GiT8fd1o85YwplIYAtet/ztvl4fTTJ/DEkjSQ -8sPHeH7n4DsfPSe+/ZGG4H33/zv8MQenHvS/OrMpDZce5piXteXgG9oxXats -MsD1986PlIwcHPm38iiXhAy4vxIyszbNwaevb/GlmNDsvenVG5CNKWX/5dy+ -LQONfNnO0y0Z+INkWfaeezJw6l5F1vesDBx6uyRrMVsGTpMFpLaGZeCnl4sy -rEtkQHYpuqtcOwNr2eakcTbIgLEg2f9q0T2suCU1MXpcBtp/z9xwSE7Hgo5h -EUEqsrDPicfCMTINP+kPuSSnKQsPrG7t8nFOw4fNgy/268qCW2ndWNauNJys -GxiuhWXBT8J24DhjGubY5hM8ayULBY8YWa2j72CmWmdf9/Oy4NqQY8qffBsv -8Jo7HWmRBTnBQZW4plQ86C3d49UmC2FdbR948lJxU+sffOmVLDwtsfBtuJKK -E0PLdhQPyEKwMvl3iGkq1pjY9mltWhYuxB/7l9KTgs9Wdjtk8snBtzsvn2p8 -T8bTB22OfXGVA1HSGNtZ7STcW6LatXpKDi4uKK7Jb0/CdYzMZA4fOWjL2LG0 -uZGIY59Wi+iFyAHLLO9jnq5ErLBDePhaghxEfmqoqnRNxB6zw7bK1XJQFvvl -dCb5Jv4S73TEj0UerEol9Yv2x+Oz0yrSGtvk4d4NhsVamXi8Yro2M8MtD6nt -Q0Z0f67jrYzJV0+JyEMGeWhO5v51rBFCfeykKg+rDwU0qIzX8QU3eb6Dh+Sh -dOkHO2qNxYLoZ7dytjxEq2fxsPtcwzn3au59z5cHxg40I21xDSuuRXncL5YH -E59NS8+d1zDlsfimdJU8BD1c5wobi8YuSgfVRF7Kg75TLnPD4WhcIVgVz/pD -HsysLjXE7LmKzebOm03q7YQbUtPduqZXsJimRDQrZSfA1JCQvPwVPOv3okXZ -aCdkNE+s7tlyBacuc1P8LHbCe+eLjXwvIvHoeonapuNOeFTJNTm+OxL7bRvh -2x67E6ghgSC+7zJOV4TRfR92gkIQK7vf34vY+/RXEd+xnaB+O+JvyIuLGD+I -P5oyuROaY72m+hMu4i8aQz1DczuBrXeBHCl1EasZ+FHdmRSgLuaTX8W+C5hq -UlAcoaoABz8mb2WrCsM/XVj9H19SAJ1H5Ney1cF4Nsv42fMoBdhYyC0ojQ3G -c0MRLF2xCmBsluUV6BCMfx1cuzeeogCPYm0CBrcE4xXy9AvOYgVwJWd4dtmd -xwz8rwRP9ShAyVjAkBhnEN7+4maduJQiFAc9LzYs8scim11MivKKcOmR3YPn -l/2xGIn1oI6yIjiV+WVEOPhjiYqIz+a6isCzsMJaJeCPZTPObQs2UwRHdd+e -zhg/rBFw6ETvOUVQUaOLSw45R/sfCzFca1GE5/33MpaYffB3Z9NicpsiTG/L -Gb/VfRbH554/MN+lCLqqarPxaWdxn8Rgut07ReiTOJ9zQfksdtp+V1tlShG0 -6K5YOticwSGcom5vOZTAr0D+QHXNafzfqkS7qJ0SGFM8hybrPPFB/YNnexyU -4Ncqnf2NBE/8K/AS/1VnJbj5p9M7wskTG/7+5DR7Wglk2PfWYxZP3DqTs9Z0 -UQlqStg1JW098KcJaWX3AiU4+ee8Ex+LO+Z9LX+jYk4JPEWmdFXvuOCNOY3C -zkUl6BF+eEzPxwVP85Ibvqwpge/cBZUYUxfcYntwWphJGUJDrnIzrTlj/y/n -TS4LK8PLBes2S0dn3P+3fcPKSBkyKnlrRg1O4jtKp31+JyuDpYW5+pDhCRy1 -PzCaI00ZLqFm4eA/DtjX91Lmzkxl8D6wYX6j3gHvrU7pOnZfGZZVT8SIYwfa -/NCw80W9Mqi7bE2qsjiO7e04xlK/KIN46UF9vlB7LBbz0FJPTwUqHDhLm+WP -4tLyB9Q1kgrYb8mi11o9gg3elek9wypwNmrh53LHEXxYuljM2EwFUtRZvcLP -HsHxDTlTVsdVQM74dKJHvQ3+O58UcSZSBVgjvuH9rofxsF1ARcEbFXgQ82r9 -56wV9ozwk/HsUwGP9vHWtQ4rvFzke1t5UAXiJ82qLAqtMO+id3jVuAos36JT -fnbcCpvfcNvbtKgCVR9vnux8Y4lrW46MfRBRBTqObf7HLh7EacqG3HweqpAU -pXrlVIYFtrF4ndh4WhVs0r6bHnCxwLynT/J4+apCsLHquywlC3y9NJa3OUQV -YoMuhEbUmeOLisP8PvGqENO0eVHrkxl23Rm2vatSFUb+WbDXkvdiKVOu9KBq -mj/FVISVbS8edc8Xka5XhUm1W3I1A6b4aFGXaMgLVXjW+CPLwN8Um8uJSex8 -rwozEfMHSypMsKbMM+kr/1Th9UIyuZGyB8/usspXo1cDoFztesu1B5c6T8oM -b1GD4h7+85TPxlg2j0NOk0sNznwubOO/boyFpU7s/CSlBiytBduaR3fjDYlN -ZbKpGsTya36IubULd4oY6f5OUoNHaevWzATgHomH8kx31KDgWovJL0HAA9Li -wgIZanAvkGPIaQLjcaW1P3pFarDgPp1vtB/jVVJlU2idGjxgza+6rISw/DGp -fQyf1aBe41HhHD0FqzjeJPim1OA/4cEf4c/JWMtlXU12Rg0Y9JSy710gY+L0 -EI/Jihpw2h3uj/lLwofDkt7HsquD8oOeFMYNQxx5j96FR0cdDKYsHGLFDHBM -ts9haUN1yIuq21k2oY9v5H/co43UgTm33Xp/iT6+W1arYLNXHS519LdyGujj -ivpzs2nHaVgl39vrmB4e/TAeInlVHXRJv8P+q9HBJLGWRPUBdYgwfvFlvlUT -T8jIjn4fVgfbuKkR7SxNHKscrVzwSR3+vFj0fx2oiQdJ5q3C39WBZ25+nF5e -E5+36/1L/08ddphFVzrEaWB7i3Pa09waYJQ6n1X8Qg2rHZS2N+XTgFglDjWv -C2qY4VBfRIGABmyeOsb1Uk8Nl9jrvjkhogFN9FpCu8pU8eqpNc8+GQ14K5/a -Z3BPBd+OuZzVoKcBnwMf7hK7rYS94rVebjfUgLDDK/unjyphlPj5RxBZAxS+ -1nZhESU8eWePoSZowGk/uunwHEWsc5+tv9BMA1YNjIqlHyng3pdJbDePa4Bs -eHS/4bw85mTMCzgZqQHre3O4x1pkMPPa80MLURogdaHS4OVNGbwx+1Hr8jUN -4LvD/FrOQQbPDW9fyInXAC2bc0uH16RxT1XSmbHbGmBiO/t+v740Tna+7O5Y -pgHewxzEy3ZJHGebvWfugQYM51Ufn8yQxJEHnsleqtCAXW/qW3zPSWJ/0tpE -1hMNKFpvyXwpKokP855zHH2uAUertEn3piWwYIuTrUO/BnyIn7soEiSGOWsu -6s8M0Px9Ppl9VxLDzOUZgheGNIBcVaviNyaKV+4O9meMaoCkdfDdsv2iePCc -pdXIlAacz5T0vKkhgtOlwPzYugY8T1mNqhEUxhKXd1Ds5DVh7crYuKw9Py73 -Z5X+qKAJHwfuBRCy/Bi5L7CcVNYEp/FXCiOzfNjBgtrnqaEJ1nQvpO9f5cMZ -Ah6ng0maYGe5IWddy4u3l5an3zmgCZvc35790efBxRl3IkStNIG926f7OxsP -NrgZ4Z59SBO8xG/07hvhxrYB1lr3bWn2uV5/r0hufBstd1Q7a8KSmqHQm/tc -mL+PWHsXpAmzVE9mVkEOXPBS/pNdiCb8Fkv56dO2DWvXcL38GKYJNnR+Y9kh -27B15njiZIQmrF/Wu2E5xo6TPK4qLMVpQjflllJL9VbM+e/VUf5sTTBO/uN6 -PJoVs8kdr7Zu0wSBYy7inwqYsNd2bF7WoQmPRyOPdfkw4U4O6VHGV5oQSz8c -ZEBmwvHL37Y86dGEKbcdTxP7GDFnu7+N0LAmTLslbW7fykjrl9cXP/yk5SMi -0jwjgR77OZ6N0ZnTBNkr1y7zOtHjvkNWYgkLmtCp5uuxqkWPUylCxmhZE/4U -XzLiGqbDQpz5KTmbmvBg51L5flU6LFZZp+XGqwXBD/da+75ZR+GFma3P+LXA -VGfL5dMR6+jj3Qh7QSGa/VLbr53a6ygr0iSyTVQLOqqf5n5M/4ckD/e+VZTT -gumaVVrH/4vkVr77zuprQRRK56Tbs4bUiO0PzztowR4pD0Zr1yX0SObUXwYn -LbDh+2QUL7+EDLbWmt5w1oK8gdJSn++LaNd727ECDy2gdrzUUj63iI6cS+Pp -PacF2YfSIk1ifqNLhUIBKtFa4JEzsKOobwExxXs0PY3Rgh0ffEsfZi+gOL+n -23Zf14J/HNF0Zt4LKBUfLbRL1AKeqwGGciwLqHjo9kB0uhZw/GntPLZ7HvVw -CBqOl2vB/e6JVaGSGWSz6HbVu1IL2B/+zui3mkHDw0/erjzSgpuSa5Srf3+i -L/dtvDhrteAczwPvGqufaNXo1j0yVQsuPElvkWL7gaSC+DduvdeC2WLl0Jnc -KVR03NVcapjmv1+zrsN2Cqnsfnz7vxEtOEDsSQrgnkJ63IfVqeNaELpO8VWN -/IbMS1Oc5n9ogX8FhX3h7FfkN8pLNafThpC1GZe1019Qe+vxZ6UM2iB17fp0 -v9YXJPGw6OnWLdpwu/rew71/PqPOS6T/Otm0oamU8u9X3Gfa19P5ljmfNry5 -1Jeq+GgCvXWp9DCX14a5WNHEcfFxJL/v78lSBW3w1f7+NXVmDIXr7Dm+VVkb -eAY8JTufjSGFLUOWneracONDsMATxzEUUURHMjfUBjERUcs+609I4/vBbeb7 -tGFQVHt/cNEIin57l7n0gDYUsnI1/jo8gkZqP9NttdIGga/Ix5xpBMXEnV/q -sNEG5x/K1TFuH9CYcvaomaM2/BgcXWHUGkaJZ2crzPy0IXVnG96x8B7N/Y63 -MUvThn7S9JjBnz40Mph7JDNdG7Y2N2xPau5Dnc+qjy5kaMPDmrN9kbF9qODa -mN3dXG34FjaepyLah+xFdU58L9WGArmnfj57etHLXR/cY59pg1l4Ue7pxz2o -aue8x8fn2qCbbjVaGtWDcrZtOaXZog2OwwXZ3jY9KHRA7fRQqzaUa7b1fJnv -RhpekT6KPdpwRYE582XMG3QvSTG4Y0Ibal+kclyc7EIxQShEfJJmz55C4re6 -UNCxQ6HnvmnDoWYhtvQ9XchS7kL49p/akBuebS9T0omYa3siTi1pwyabfZde -aAc6N3Y+lo1VBzSNsk5c3tWGTryMj3PYqgNKFcGdSxutaF9p7vXKbTqwdnCK -Rb6hFckHdCXY8ejAkHKeQZVBKxph2ZFcIqIDBL+4iTHpJTJVb003U9WBlPf+ -jE8cqMiWee/hHnUdaG37E0mRpCKvjx0cR7V0YFtj/d+Ln1vQjeuvI1z1deCA -LqunincLGvjW737JSAfi32UembvajFxzPms9sdEBxckWnaqq5yjovNtPsq0O -VFf28hD7n6OYA98KW+x1wEK0zX5zqhH9929auMdRB1YHR/+Jyjai37a/NqZP -6UBRYyr5cHEDiuSh75K8qAMJ8lxn303WotSpyKj7ETpw6sXjJ5Bci4qeMyG1 -Kzow0KEwUo5rUecZ1kpyjA5MTdoMXcusQTydXHeOJOtA0M2guWHXpygnUsIl -vkgHMt3aypJ3PEFVdjlifCU6sHAkYmZg+DF6oSE9cLdMB8b8HdcWbj9GU6Ny -ZvcrdOBNlbZfHs9jpE5WVW+p0wEb7agrxdyPUONv8t+VNzowMyK7m6JdiXJf -PXU+9FYHZJnL7yVtVKCoQu3O8j4dWK+Vnb3cWYHMjirfdRvUgXLK3ScqrhWo -v05Ev29ch/Y/ZApepTxE05fX/MoXdeAYYdxmeOw/9No+cJhthVYf0317Gxn/ -QxXaC0ZuazoQTi63MnlQhgInp7jFNnQgsexRpA1jGaIzGyyPZdGFxvbrFVL1 -JUiQ++m0q4gu5AbvwPxH76O1KS3rJjFduOvs6xXDeR+NNJfXiu7QBbutXgnv -WotQrn9RTK+MLhyVrmNfMCxCKu9vyYOqLrAVsCdPKxaiXVkBzqKgC+21D/q+ -q+UjufPzHUG7dOHvsiQx+CsPsVp6a/Ya60Jcfllj2NM89JrelS7WTBdY7/F8 -HtqVh2zdDmUtW+tCjC7bYN3JXHRWRWv4rZsupN5//uBFeDYKXBH54+ipC1EC -lcflebJReAujyKyXLiyq97hPF2Wh67bv7Lb66oLMI0GJmIFMVBwVPLQrVBdK -THt/5O3JQBMjjYOPbujCw6WMNy8d76Lv9++vGiXpwtcizaDjrHfRvF+icE+K -LiCLN24CVWlok9XZ9meaLiQPRz36xJqGxHS3DMrm64JVDSXan3obHUmweH/r -qS4Mc4zYFp1KRQ62OisydboQrKvD3CadilxlxIWqGnQh8oYYx7uRFORfO3vk -TbMuTN9k3/3gUApKnEwaYH6lC/MVeVvXLZJRJzH47vyYLqR0i17/zzURvWVt -XtryWReGBgRNLZUT0WBfiUDqpC6U9Zw+d3ryJvp2KsymYloXNF7/mzjPchMx -3ZZ4N7WoC0o/Z7MmjycgYta1345NDw5uC7wqYBaHBOtN8xrY9cCblXHu0q9Y -NHtNyXcHpx7YFQpS1zNiUZbUPPskrx5E7mCPk1+KQRuHw3b7iumBrU4Ctbfy -Gnpen1QVra4H09L7MibtrqK0mICI75p6YPLtHxc331Xka3P0wD4dPdjVtz1R -/HUUkpwTm+Yx1IMzU5tdA7ujUIR0sVTmLpqdnvnmefIVZBTbmPjIRg8sVopD -9KwuI5EjuScEbfVgtDDHz17oMvolHaUSYq8H9zo0LAxHI1Beg1k7ctSDeK/J -eImzEYhhvn+zw1MPNA5se5WscglRj/w4OxamB/vOlofEbwtHGTJvKLsv6gHl -lxGzSnkYCpiv2FoUoQchn45VbliGIdm4oKLTV2n2JB1ntfRQFPWMfnT5hh6c -to9NtySFoD2ywvs58vQgtKJF82Z5EHo881LKtUAPJGrJh3RcgpDsU//luiI9 -mAj1q+oSDkJM5t3ZnmV6MDwUev5ldCBq8Yn+RX2sB63938RunQlAqH7xTmib -HjxxfKUBrn6oPCrP+22HHjA8yy6ol/dD4gcsjRRe6YFDaYLFxvdz6N9Y2fS7 -Hj240/slotvvHKpjdiE0h/VA6E0mOCb4Ij3rtxPffurB668795xrP4OKRC89 -RXN68A/tW5RzPYMEJlXiby3Q8vFqpFGK/gxaPB+ju3tZD9ofad4bRd6oKhPH -ZG3qwRTn7peb7V5I/fsDVRtefXAv0ryXxu+JsqqOMfzHrw+/P7MuLbV4IM5w -tvcMQvrQyNN43tHPA81yukVUiOrDldSZarN+d/Sfjlgfu5w+3BFijZEscEMK -EXHBLfr6YP3APE76nAtqIBdu2Uei4dh/l3UUXZDlyvPkdxR9aDhQE7B3whkF -n136b8pIHxIWPU54HnVG7cedxjn36UPGfM8+xf0nkaehnvkxJ31gqnjlUNN2 -Av1btHz/xVkfzqUkuzHbnECJFaddz7rpw6To+9lfnx1Qzc7ci5e99EHTWGEl -kdkBsQpue3Q/QB/2mOwQMD1xDJX8GhddjNEHl1c/wlgP2SJU/q/4wnV9qNp1 -+f7zlaOo95SQHssNfchxTzekZh5Ff8b2WYqk0PDK6uHMmSPIvPtpFGTqw4bC -XTGpDBs0XZYwE1+pD/7hh8YeaxxCFz2KQwUf60OgfKiy2pQ14pWhsuRU0/Zf -+xlXmWONSOmrUo/q9WF1Z2d3G781iotxOTL0Uh+8ZeaU37BaISU3w+dyw/pw -5M901g3SAXRT+sCfKyP6MM6Jv0h170eLn5x1J0b1obhh/9edbvtRo318WdZn -fUhtWO4LvrUPWVt+uiM0Q6uPRG1GKbMFCiFf9WWjMwBXn+uvnXbuRaOrd8s8 -GAyAfHvt698eU7SruvzrSyYDMHVM1aeGmaJtmoPHI9kMYO0mZ1NrvwnKkVc2 -+8trAHJDvnR6qXtQO89bqRk5A3A3cH13ec9upNo9edxCwQBcvnCmStHtRsnx -f+6UKBlA2qwXx+P6Xeg4iyynu7oBOOyddSjQ3YXm/gX9GTUwgBeldOv2OkZI -cEqsr8fCAEKXFS9ufYJQWKEmp/oBAygkN4x27EFozNnELMHSAMaqxWR4BglU -+tHnuZmNAXhGPrwgTU8g1NdS1nLCACJuCu9qcSUjt0bPqMfnDGD9wV3uujMG -aPbM9Pk9AQagpzwouZvDAAWLe58eCDIAFbO4R6hcH8WF+1ivhhmAx/XOsfOL -eqiCFCRJiTaAiURbbqckXUSaXuF7HUOLb2XHiWmyLqLeDWE5cd0AMtQOiTR+ -00EDq+GzlxIN4Gjbuwdqu3XQv+orDdR02nmK/VWVrNoo2n1LxeFMA0AiFp5M -z7QQl+C1/MlsAzB+Ovg5zE8LSQfGxbEUGoDg7wXO9jFNZKqdZGvx0ADM/YOf -O3VqoOSHWYu9VAOgOy7hCxmqSMxRcsqllcbPUUmvVk4VFXLmfVhsN4AfIWYD -mxUqqOZMYYvgGwOIXts8++GVMvqo/F+i/SCN79mWOd7tSsj9g2rUj2EDCPrJ -3AQVimg+7uH58I+08833BLGaKSKG6aoTWRO0fFvKHd1/SQEpFNeqTPw0ALPA -61ysG/Ko6ihZ0n/OADhr36c45sojMsszPqZfBgAFzU+lTeTRAfemP3IrBjAu -+HzvQIocCpBtaz9FbwisHkHtjlgWPc/pd10QMITftbcX8nul0Ng+KccgYUOY -b1HSKrguhejWztj9FTGEurIfK0/3SKFdViwHtkgawsjwwBe2Z5KolZ6kv13J -EG7dbfTq9dmBvj2I1sxSMQR3d08LtV8SiNW+T1lG3RCuFRuf9g+SQGZV3pKq -OoZwwu5ackaUOHrlnM1mhAyB8i/HsahaFM1w/mRsBUOYu+Rw7JqpKOKsN9gw -320IfaE+MSLDIsiSr/fX4b2G8FLBp41gEkF9VKYRT2tDKL98VK3jtDAalvUq -T3Q3hCaBuM62SAH0t6e6WOCUIeC8HwarygJI7AJjfvppQzhZGqV6cYAfObzL -uFPgawjXFRUsg9T50djV7oiaUEOY+P5MKmGeF9FriYURFwxhQ559bDSfF0mP -ega2XDKE9I/nLR1teZGrHoPXqyhDaB1RURt+wYO+fdU5NHbDEC5egbeUMm7E -mnJ5v1uSIWSfZLgX48GNFPAb0+kUQ7jj9v3GmCw38rrjQVlMMwRxR/l6sz1c -aNY0XY413xDW2CQ8ZA5zoMXizRX1p4ZAJDq0XepkQ1+PmOTE1hrCsafP9EU8 -2dAgU8Lez/WGcPVq+6A0CxuqdxK5e7vJEAb61Ji8zFhRpLAuab3DEGRENQ7t -HmVG3DFe4Z0jhoBub9lcNGZCDHqVsrKfDEE680Sn0gojWvy88urCuCEoHSz8 -cqWUEb3HV8U1vxrC+wyhsJv8jChrJbvxzpwh1MPYzXtL9EjF4x2dGwMJAtOl -5hx7NgkJAbGSRiYS3M8RZrhps0lwU52thFlIUEdX/CF+ZIP4LTGf28VOgiNs -bD7Dc+tE3cDW3VoCJND5ar+VTfkf8V+U1Y/rQiTQW7xwb+3ZXyJLKy1lcjsJ -pLZpOkdb/yUu35D7kiZBAl0l8ZnjEX+IvSZwdXMnCY7lzQk5zK4SpMVoVTsl -Ehgd/vohIWGVUMl7/a5KhQR7LlrcV1VbJbg27OXdNUkw5MmpX+i/Qgw8CWx7 -RSKB9FB6zBfOZcJFrowtfT8JUm/cdTwZ+ZsIfXnCS96SBB9mLR51q/8mEt14 -u6qsSeDRST6cMvqLaCgMie86SgJbKRuBLfCL4Jffy7V+kgSkvYK76XkXCKXW -vz6xriRwqS0RiumYJ8D9YY+ABwkO5E+FkiPniTNFgslq3jQ+actMSrNzRKv8 -JL9TEAkEypGT3MgMMdKaFvgzmAQiQ4dF/xyfIX657xsIDiNBQnzv4qdPP4kd -9x/dSYogQeaPT3ee/fhBBO+MFKHGkcBRM77vo8g0oaSwQ1I+mwRaZY1D9D1f -CWjvjajKpZ2X1CKEz34ljnhGj6MCEgiHPGwS4PxKXCmeyTtaQoIevMM80HqS -GFFokIt9RAKGC5q39s18Jn61+0QLVNPind/WkX/nM8F6SuZbbg0JYtdff3be -/ZnQLYkrrntGgs9vGd7TZ08QNxTtlH+2kWBNL2ZK3n2cKOjYFh/cSYI3xlwT -kqLjRN2ppp9Mr0mQnZsjdPTtGPGtZGe5eC8JJF0frrgYjRGgtKxxcIQEBtzI -8+eJUWJBKUWvap4EYu/PSo5fHCYGX8Eevt8kmNgX+ySCb5hoOjt7KGCJRJsX -Uzs7SoaIG1Vm5/T+kKBWLbEffRgklEh0/9UxkmEtMWEXs9V7gmfkQZ0oMxne -xRkx7v41QKxeONYRzkoGcdftHqupA0Rrc/VXxEGGi489j1aPviOczc5IUQXJ -EB8wSvkS2U+Y/RDRkN1OBqPAso/m6v2ERkI7uipKhpsSdk0bI33ERo/McVNJ -MgQb2W4nUfqIe7bDt7sUySBDd3Q8kK2X6Pcw3dZPIUPxz4fdX590E/VsSyK6 -mAzR8dj1p3Y3kVeWp3jbiAxPw8Y0/j56Q/jOrZvYmpAhR062lL/uNcFx/vHl -kYNkWEpL0HH82EUsCjsnEtY0Pj92t77z6iJG6riysw6TQbjiwKbwn06idMOr -wcmODD1KXqTv4p2ESbTUyhdnMgzsIp1bCGknVBW6t5i4keH1Ey4hDoF2gr8z -nP++Bxko/20+fl7ZRkxwDGqe8ibD3iX98Z65VuLSrRveM4FkyIvIcl278JKo -Kfg7vhRDhv7N2zVOH1sIvd0BK+bXyaCtta/hcWIL8WT857acBDKQyMNUwz0t -RJXEqL55MhlmOQjPF5XNxH9pTQlZ98jAzuOUeiKtiVDSN8z/nUmGOw/zWxsO -NxEl7ypr9uaQwaXLoEuBt4ko4s3//KuADE19I33aks+JnPirhqblNH4ZCu4T -6s8ICeWNAxkVZDi0tzoko6aByOwIcl2oIoNkdVuT9u4GIp3Z8+a9p2QIurXl -w4hDPZEaYT4510SGE2GaHw4V1xKxAVxJaX00fhVxvZvXqwlWvpiimXe0eNxL -TI6rVxPRlXQNuwbJUFgoHaLa/4SIml34+nOExkcv2lhI+glx0bOfYvSVDH8L -7F3OvHlE/GPeb317igwPxORE+sMfEWGFLz1+TJPBNfAWd5TKIyJ4ojr51hwZ -RJzvRJbdrCL8jt+d+r5KBqWrbeI3XSuJ+T88G+gvGZDEnW9PxCoJn7txfKnr -ZJAuUvbafFdBeA+EIcRAAcEJ84opiwrC3fJEajI7BV71nCfrxpYT9sYyQJag -gOkRCbqOrlJivZ+VkypJgX/ypSaSh0qJHLfZD+YyFGDgKf10faSE+Bpde95e -gQK3Rkmm4UvFhF/HwYchWhSgJKu2dqP7hIC97gV6XQqIQqnnwLsiomZaxCJW -nwL0zz8kPjhbRGywf/2aRqHAlvcH5coLC4m4A+ESNSYUeP0Dn5ZVKCBUP538 -ic0okEgvazv8Kp/o8TGta7OgwG71Yn85/3xCMIn3yHtLCjyr1O9zfJFH5PUV -JyzbU2DgsO3LsuBcos723T8dHwrcWKBbOG6SRTh8r+tsOEeBck/TusCGTIIu -NCfNOIACq3PMu5d1MgmTe6d1DodQINnZrpJJNYPo/Ujv7X+FAhezEi+TDdKJ -wLPfDP9epUDRy4DIwKa7hPDmK5YrMRRouJL7rc38LnFCMi0/OYECjLJsJklu -acS0s9qHyjsU2MWXmN1YdZtI+M1XYphOAUmTll8t5rcJjai1oOYMCrhN+tik -f7lFBBW+4H2bSwHHbnXrPPFbBMOUvfl8GQU2wO0dKkghRM9cq1Vrotl/vhK1 -Wk8kbmy6615voUBWeN0s+XEiwZBsUvntBQWa3My4jnknEtPVW0pyOigglufZ -Zdx0k6iji0rj7aPA82mnb5mlCYRaigu/zzsKHBTSdShVSiDy5HYndr2n5av0 -CV//f/FEnDlDTNQIBbh4C+2PP71O2KdGnF+epECJKnvWoS+xxBt5p9/WUzQ9 -ff3rfjwglthVi30eTtP0YvxAHJhjCaXRDXfPOQrwlU1lhKjHEGs7LxwZXqXA -lUnr7C+3o4m0+hDdRnYC3lEPrQQ/ukJsO2BXKcJJQN8Nl/J+hytExJiB6nlu -AoJuBBVlsl0hPLesymoIEHCg9dUdR7dIQv9gEH+eBAEcufT+DKqXidJxm8QN -SQK6Lm4Nkp+IICQCdLcdkyFA4H7Ovbi0CIL57iIjvwIB1ilD3husEcTAhN/v -q5oElBeYkTnmLxC0R81nQpsAiUkrSfKZC0Qji9YPpEeAMklq/e7PcKJIZWFi -hURArXbNz5cLYURQkE/vKWMCfNwP/v7IH0oIbPWu3H+UgMJ5ochn1UFEwe4L -ofN2BKT+bRMLNQ0itC7c2J1ynAB74siD/cOBxIH5ineDJwnQFZEN4mUOJKIH -ltZcvAmICd7xni3Qn+DnZqEy+xDwelSbNUDAn8gzE44vOUdA8faHqmVP/Yjn -DSSJuSAC6O32nD1B70es5l3aFXqZgNINp+nfxb5E9Egiu3gUAXdjC19+OuJL -8Avm9T+PJkCmXznXltmX0Ih94b4lngBzzCxe3HeWOOXDdj3xNgFzHbelbaO8 -iWFySl9RGQG83JzX9dw8Cc/AggyzcgKupjjwHvnpQSyXP3H7WUHAEdXJhuZA -D4JXenBFs5oATsdrvVY33QkLVnGxZ00EfAjb7qY24koMG6lNOlIJgMChlegA -V8IzDJcztNLq0ZB5YojTldYfT8LeLlo88HN9j5kL0dBf5Nr3jgCmE6Wu0H+S -MOesUQ0aJOBcqbq+Z9hJYtC0Y1n4AwG9Fi6fdsmeJBbrfsScoI0FZQy39OZD -nQjVXI0H36cJkO9O6c4OOkE0DBsFxc8QkKT71M911IEw5z+E1Wlj10PDelt+ -MwfC/Vrg24AlAmxerS6syx8nFpui04VWCbh5Fe0TSz9GRP6541L3hwAtZnHd -Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== +1:eJwV13k4VPsbAHDRJmXf1zNjqazJOsN4XxTZl5KyLyGylhRakFDhKiW5JQm/ +SpeZ02KruJSkSFnTJSKVZMkSSv1Of83zeZ7zvOd7zrudoflFOAdwc3Fx6Szj +4vrzO9f/7LHSmSKTqQDeZLNL5iYd+ZKxpj1JsHn/4ITXIg1Q7KWfZM854P4W +mqS3qA0xjre6eXoKgetJ0pLkoikIjUucW+gmQYQ3J+nLghO8e2AfMdNdD/di +N464LviChdJo31T3a0hxCXsq/T0KFroNLkx2v4eoy2pF2uOJ0GD+v6JXhdNw +ZVV4onjKOZB9VzXip74EnxXispNV/gbRUO9bq8x5cDhwZMz+0jU4p21RY++y +Giv4K1I6bhXDm9xNdVOC63C1TvezdNpNOFN0/CW3lBCG7H2QoXn4NljrBguL +KQphb1nmQ6/k27D6sbPLeg0hfDieeD416zYkDym/tTEVQonoOs2GG7fhCP3F +yPlgIcyMW9Y12HMbwgskf6lUC2HxLr4VNQb/gNNljrqNuzCaDqgatE78AxLn +h05lXxHBBZWZ8bVW5SCpdi95vkQEX1SfsC1xLgfp+pTjnmwRHAnY3WfoUQ7y +kxsPrm8QweWk+HmriHJQto30qfkkgoOVCnpSF8pBZ/mS/pCOKE4HFFlGvisH +h2jx4c3NomjnsZWIN2CDI9+n/ovtovhDZGL6jREbnAur3vz8TxR7n2Q66iEb +drZ5vGycEMUwu7HCwW1s8FS/Xu0mJoYzFbwFgm5s2DesdTbJRwxbx2WvPo1n +Q+oOK5PXc2Io9FCI7+IDNkjfbZXmXiaODeFZq97WsaFMZMd3bT5xVFxSHpJ+ +woau117sswriGCYqp5/ZwgYlp2i60zZx7L5ia2rez4Z6u6sr2y6JY45IZeHI +LzYsWcy2thhLoCVP2CVBFgeySuJKlywkcG6gf/AlckBpJVeahpMEsotfcp3Z +wgHbJ2tMMwIk8K//Tv07Y8OBPHPijm2mBLZ0o3WOGwcM0ebi83cSyAyW8hQ6 +xIEDjGvez5Ik8foxtWUfb3PAuoB/xiZdEs+ObN04Ws4B+qojaa0XJFH+0bLy +zyQH2jp2ctpvSGLux4T2vkoOaEau5elvlcTO0O7EvMcc+FRyqOSbtBRGzXAS +A95ywEPU/qvMHSmUsGmqMVtJgk58TWL+AynUCRuvfbWahDXvN4jTGqVQO0NG +2ZOPhKpyHlB5I4Vr3SxFggVJELepytr0WwqPCjoku0iT0JaopLvVRhrdHlt8 +StAgYcvEYlz4kDTGyWwIV3QiIXbbedV/x6SRE8gdqbudhLJrGr0ic9JYG9n8 +y9SFBMkdPoyq1TJ46ILPY+fdJIxVPvnOoymD1ttPzVv7kpCdlBV96bAMrtPa +6ZATSULT241KY4ky2MK7wzJyPwk/dRvaTc7IYL5Z6SuLaBICP85uHr4ig2E1 +w/mfD5HAtHWf0myQwc1Oeiorj5PwXkwl/PE6WdzQpm76dzoJEhG1chISsmjA +qM4wySTBtmlXSzAhi3Uawgf6/yLhftwZdQEdWTRRHeQVzSbh9LvJ0d27ZFFJ +OSJ65yUSNt+sCZoolEW5NJUiw2ISgrhdJMxuy6KibM+d4hISLruPN56/J4v9 +Bx/7C9wgYSU/TYXZJIvh/9qU9NwioXd/ynDyV1l0azB5bMYmIdHYyVfaUA49 +Tmn0HKwmYZtX/jcDMznkL7xw+GkNCfwJX0642Mph5HIxVbGHVPyGkyVZPnJ4 +Q0m3oaiWhErr6i8rT8mh+zL99+cfkzC5SzFm+o0c3pG6EFvVQkJFXOQqoWE5 +5NtddeJFKwnHLj/M1RyXQ1eLmVtvX5KwdsC1JphbHrmye7ePvyJhfVA614Cq +PCYsH1H+0EmC18HZ0y/i5dFfbS5Jqo8E5YtmsqMn5bFti33deN+f/P31z6os +eTzU/mt9XT8JcT83tpkVyWPK3eFY1wESLpzwEqt6IY/T3YG4a4gEj+LSkq4u +eTwWIveZf5gE+tN5g5kBeTRINmv4lzJ7Tbab1qw8jvLFCciOkPDi7NOrxXIK +aPXOlnb9E1Ufd0S1G9YroECjXITRZxLcOn3rB7QVUNatdvYl5U+SP4dlLBTw +4H9GnK+jJJQzrWIYjgro6Lb0MeYLCTEeOatc3RRwqdDD/SdlnoJNqufCFXBT +QOuPH2MkNP97tKb8sAI6FLepxnwlIWuo2bYlSQHfGDnmjVGWXx8QsfqiAh5O +vWPSOk7VW9mlu8dqFTDl+aPKPZNUP3S3Lo03KWCCRtv3asr2XMstvV8rYImb +++K6KRL8ncPfwAcFtM9Xs7tFOTz+Op09roAgInV1mvLhop59xLwCSgu8qmB8 +I8EinnY8YQWBpzIW8QHl5wIPrhuuIbBLTubOPGXHop1Nk/wEujvsmdCeJqHL +cGrshgiBgjXlc0GU3VvOCPlKEvj1RfezPMoDvir6UnIEujZUBDdTDpyrc3tF +IzChTK17jnKkwtx1UzUCQ6vM5S1mSJi9k9W0oEWg17qihb2U47apfeXoErj1 +oWBJGmWuvidCIQwC//ocrFRM+WSUjz7dhMDvCVkHH1Fes/KHW68ZgUMQmNdB +OSvvwvFzlgS2lbdkf6QsprWpyNqWwHsqt/y+U85raG7idiJwf+O7VctnSVDY +FfC12oVAzSPbk9dRLhr7LXTAjcCG36M9IpRVE/P01bwJVG1PXylBuVxMz33I +n4pvSvD/se6tl8f/3kvgWp+MyT/XV5uEFG0PIzB1zcOyP/Ggffkzvv0Env2Q +a/Xnfo+Drn5tiCHwnAdf/Z/zWP1kCB+JJ/DAtd+Snyi3ZnXo6yZQz1fq69BJ +eYdyhPtYMoHrGfKBtZTfVPEmFJ0i8EEz3auEspd9UZFHJoGHSzwNT1Mefm/y +TDSbit/5cDaEcvChN19fXCRQVEnn4jbK43zRwicvE2hBlMkpUj5QwG/Aukad +X5o4vUjlZ173pvtsMYH29Pi+Vso8Xv1FAeUEMvwrjcMpp307/EzuLoGbjiZZ +Myjzp4qMd1YSyBu0wnwZZUn2NgOLegLP562bT6Xq58qWIfdfjQSK3Eu4b0GZ +/uZowv3nBL6ENH9uyhrcd56pdBK4ws0wI5KqTzLHbrz/DYErczr4FCkbqn0S +vthPoHje2JHXVL2b7ZDzWPWJwAvWx5kbKD/9VJFQO0Zg2L7ptNYJat4edS4+ +NEXgiFFXSxRl15LU8Y+LBPqw35uUU/0UOj+V0LSOhqe+SvWuoPqNGRUoPiJM +w0/SwltPU/25erS3lEeShr9jptfzUS5+29BlQqehsleBGzfVz/2PLqjf06dh +bqp8biM1L24brKl/bUTDh4KdI5qU49jHXCeRhtnXRiuyP1L7rTAoSc2GhsvT +j484U/PG4SSj55o3DUWGLuf9j5pX8r/+CavdQ8OY5LO0mffUvIuh8/QF0/CX +V44ei3LaXj5NyWgaTqcz1zyh5l2dTd+JzDQa1prypJdS83GzcKJWPIeGXlZq +yp1dVL+cmX2ce5+GZVEetC/UfG3lCXG7X0PDqcu36pY6SNg363xy6gkNGwgY +l2yn6r1H6W1QLw2lXN6pr6fmtfjVppQdPHT8scL7UFEjVU8SLNn9q+nInT7r +cPIJlZ8sDuevdXSsY6S/96P2gUNS3n/NEnTMu5FpJFpPnTcgdLOpOh3dNw59 +cKD2yYKaYL+GCx2d1tIC1e+QMHdFOlHHjY6m1+40veOQMCOgrMTwpuPTb/uk +s6h9NT7NCNkSTMepsV9ZH/+h9muN/5zbUTqeXrj1LYrad802FfxpxXT8qU80 +z16m+nmfF7yfpeMyz4jFhhMkXOzb+/7jIh3FrJMFJJNIOO9w4OTX33S00Ig1 +C04gIVMn7fk8ryIOJixbzXOUhKQfHFcBeUU8kHXNSDSGej9nVkQaWyiiU8ip +i2VBJBiX3i7IyVHE7aLqbS3bSHhLlF7d+rciLumxT3yxoPKdczN/5qoiWu4o +f7dyK7UPE0suO99UxMxQzRx9Uyo/uwpy+R8oYu5dDhHHIGHjivNZKYOKOPl+ +pOncRup9e8cnxKgr4cTrAS8R6ntpStjaZ2e9Eu4Zi7XPe8SBnlB6W8hTJSQj +FjO/13CgrnERjr9Qwpn9upHOVdT3Ylypwo0uJTTQuyKz7C4HNr1f+25hVAmz +bjZtNbvJgXDOS88rIsr4zu7YHpdsDow6uLgP71FG8+YPD5sDODCc7rNz/yoV +ZNp8++m0nANWE4esPuivx4HrH9s3Mtkw5r/6wN3jG3Ds7X8/ezLKqP8rEtyp +9Rvxyc6Lu33Tb4Nwi0ome0IV/334d8Xh3Fsgm1buqK+vjgPnNT+Mht+AXDWG +oEiQBpY/cn2Tv7cEmqVN9abPamKkaHTm8P4iYMrWZ2l1aSFRUhKu5VsI/DyF +0b5Jm9DV7rSpR0oByCcqGO9W0caFkTNGXsZXgFfZ477zU228GFmno19zCTRZ +UuWHPDfjqtW7SwXJHNjfL9xgzaWDD6xcjxwszYaJ6XQXq1wd9N/apJ8kdRYs +tRrzrDR08bQ39+q4wgx4NG3043urLpptynTR1DkF4eqbe18F6OHgC/+QsNST +wBrf07GbVx83hVWGFKxKgq1KknbrCvVxaru63QHPY7Ah4fThegMDFBditrxK +jAXVAEatcq8BhvDZmHQvREPAo73Jd6MMcbLyUMKoVxSMh40e2hptiKwjVpDs +GAWH5UL3dcUYov+aA3wbzKLg9JEI5/l4Q8ypU6zIUI4CNjOGME4xRMw99bxt +LBJ+3j/xoCHPEPX39QVpH42Ec+X5M68bDDEx8xojyjoCags69kyJMfCct8DV +VHooDNjSvGMkGZgff2RocE0ocC2E7f4hzcC7a8el7ab3gZnTKvsVBAOP175k +7Xy8DxqXMQ2kVBk42XrDcXPQPnjhd5XX1ISBAT8d/+Zlh0CvUkhZViADTfTc +mmbsgmHmxu/vWhUMTKSf6ntSGQgjOy0KTlUx0O6KQEZQSSD0LM/YNlTDwLDL +L3nFzwdCjY/0pZw6BvrTf9pfigiEJEk95tIzBrYKH91iuD4QBNNCjjT/x8CY +9NrGV7kBoB7UyRXAzcS/Nt78anZyD/grl/Lm2TGx7Zq+5PVEP4h74hWi4sjE +jNDOb3ORfpAVIPycdGaitKvcO1cfP3hQHJv+3JWJ0xNPnyP4gajKNoElXyY6 +HRMTLFvyhUaVD6I+MUwUWhmqOHHEF1Q3KBAqV5m4P61apD3ZB6ZUs/XJSSZy +yoYd2iM9oecFbhWZZuJy7+B2F1dPqAsf3x49y8SV2e33v7A8IZO0itJfZKLt +RpkwJz5PUGVy3a7mMcKpe4MWPP/zAD+rMFqDuBFKxgoYzQ26Q0eQ5doOYyP0 +UlM90xjgBpVFPwZn04xQTDAnJL3QFfTNo79bnzHC7If7CmcyXOHe4Njaggwj +NNeWrwqNdQVSvt/A+pwRzp/xckt3dIXbuXUZ+X8bodV2Hce03zuhIP0kw7LM +CDtLjxuE+OyEU9ECZ3PbjbDtUdOuLA0XcNuiiEbyxliB9/i3TTvDUsdq/gbC +GM32vtf5MuAMBQHjb60VjdEkv0A7v9UZRlKqDrltMMZ4tcI0nVvOsP+ZQ3ns +ZmPssmz3k/ZzhtP2R+QrLYzxOw9/S2uHE1Tv6vypG2GMfU4VH048cQSZsNQq +zTpjLAmy23T0uh1k/g7UO1NPxatWTF9ItQPucxacj4+NUUNioiU91A5G76+4 +WfDMGJM1NOq/69lBNVdyrnC7MWr9Jkv6ntmC2/mEQ3MfjPFbr/+2t7M2kFsT +q/eIj4W3vmks0/KyBrE1oRw7Vxa2NJrs6wu1hCLzo3GTu1kYb1Z+gXuHJWw+ +mmme7cHCo7ruqWBkCfaT7M4eXxaqXmZHca2xhJSu2QX/UBY6ftA0uXzDAuYL +j5vFJbLwnIVHreroVug1ym4vKWXh3e3c5vLHtsDeg0WXrcpY+DLxkbLE3i0w +V3YvYIxNXR/F3K/svAWE6T3fte+z0EpjJVeSyhawWS0n+7COhbt4SucM28zh +QUfJnvZOFsamit7PXG8O1vyVGjE9LDSVPfyqU9gceiyfzUm+ZaFHYxRT+5cZ +zFR/SfMaYOE9h4ZypU4z0Li26Z/PoywMMazd8vOEGTzoNY1J/8pC2knvz0MR +ZmAtuh20Jlm4PInH+Z27GQSmHnwVPUs9X0m4mpAuFa8uJU9inoVlzt5xloQZ +JC1e9K9eZOFIWYnV2bVmIKh7U91ziYV+/TFp4/OmkB9WPfv7N3X/mnUq3h9M +4f/swcNZ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15475569508294718`}}, + "PlotRange" -> {{0, 30}, {0., 0.07405227751610899}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7651,6 +6981,7 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7678,7 +7009,8 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15475569508294718`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07405227751610899}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7686,11 +7018,12 @@ Oa5jBLdOiYrDOgGXniRkn4qxJ7LO1C1tbhJguQINFxntif8BOQL1wg== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913290128289948`*^9}, - CellLabel-> - "Out[169]=",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] + CellChangeTimes->{3.9913290128289948`*^9, 3.994387139792693*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"7652f25c-f3f1-4ab7-badf-035bcc03ef4e"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7759,15 +7092,837 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003512"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994236210323447*^9},ExpressionUUID->"0f83f761-b16d-5343-987d-\ -511095eaf120"], + 3.994236210323447*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.060662}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943871399535522`*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"18f024bb-7c6f-4053-b670-c3a50b4d8e6f"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"8cdd4baa-f7c9-104e-b978-\ -89d3982ba28f"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k4VPsbAHDRJmXf1zNjqazJOsN4XxTZl5KyLyGylhRakFDhKiW5JQm/ +SpeZ02KruJSkSFnTJSKVZMkSSv1Of83zeZ7zvOd7zrudoflFOAdwc3Fx6Szj +4vrzO9f/7LHSmSKTqQDeZLNL5iYd+ZKxpj1JsHn/4ITXIg1Q7KWfZM854P4W +mqS3qA0xjre6eXoKgetJ0pLkoikIjUucW+gmQYQ3J+nLghO8e2AfMdNdD/di +N464LviChdJo31T3a0hxCXsq/T0KFroNLkx2v4eoy2pF2uOJ0GD+v6JXhdNw +ZVV4onjKOZB9VzXip74EnxXispNV/gbRUO9bq8x5cDhwZMz+0jU4p21RY++y +Giv4K1I6bhXDm9xNdVOC63C1TvezdNpNOFN0/CW3lBCG7H2QoXn4NljrBguL +KQphb1nmQ6/k27D6sbPLeg0hfDieeD416zYkDym/tTEVQonoOs2GG7fhCP3F +yPlgIcyMW9Y12HMbwgskf6lUC2HxLr4VNQb/gNNljrqNuzCaDqgatE78AxLn +h05lXxHBBZWZ8bVW5SCpdi95vkQEX1SfsC1xLgfp+pTjnmwRHAnY3WfoUQ7y +kxsPrm8QweWk+HmriHJQto30qfkkgoOVCnpSF8pBZ/mS/pCOKE4HFFlGvisH +h2jx4c3NomjnsZWIN2CDI9+n/ovtovhDZGL6jREbnAur3vz8TxR7n2Q66iEb +drZ5vGycEMUwu7HCwW1s8FS/Xu0mJoYzFbwFgm5s2DesdTbJRwxbx2WvPo1n +Q+oOK5PXc2Io9FCI7+IDNkjfbZXmXiaODeFZq97WsaFMZMd3bT5xVFxSHpJ+ +woau117sswriGCYqp5/ZwgYlp2i60zZx7L5ia2rez4Z6u6sr2y6JY45IZeHI +LzYsWcy2thhLoCVP2CVBFgeySuJKlywkcG6gf/AlckBpJVeahpMEsotfcp3Z +wgHbJ2tMMwIk8K//Tv07Y8OBPHPijm2mBLZ0o3WOGwcM0ebi83cSyAyW8hQ6 +xIEDjGvez5Ik8foxtWUfb3PAuoB/xiZdEs+ObN04Ws4B+qojaa0XJFH+0bLy +zyQH2jp2ctpvSGLux4T2vkoOaEau5elvlcTO0O7EvMcc+FRyqOSbtBRGzXAS +A95ywEPU/qvMHSmUsGmqMVtJgk58TWL+AynUCRuvfbWahDXvN4jTGqVQO0NG +2ZOPhKpyHlB5I4Vr3SxFggVJELepytr0WwqPCjoku0iT0JaopLvVRhrdHlt8 +StAgYcvEYlz4kDTGyWwIV3QiIXbbedV/x6SRE8gdqbudhLJrGr0ic9JYG9n8 +y9SFBMkdPoyq1TJ46ILPY+fdJIxVPvnOoymD1ttPzVv7kpCdlBV96bAMrtPa +6ZATSULT241KY4ky2MK7wzJyPwk/dRvaTc7IYL5Z6SuLaBICP85uHr4ig2E1 +w/mfD5HAtHWf0myQwc1Oeiorj5PwXkwl/PE6WdzQpm76dzoJEhG1chISsmjA +qM4wySTBtmlXSzAhi3Uawgf6/yLhftwZdQEdWTRRHeQVzSbh9LvJ0d27ZFFJ +OSJ65yUSNt+sCZoolEW5NJUiw2ISgrhdJMxuy6KibM+d4hISLruPN56/J4v9 +Bx/7C9wgYSU/TYXZJIvh/9qU9NwioXd/ynDyV1l0azB5bMYmIdHYyVfaUA49 +Tmn0HKwmYZtX/jcDMznkL7xw+GkNCfwJX0642Mph5HIxVbGHVPyGkyVZPnJ4 +Q0m3oaiWhErr6i8rT8mh+zL99+cfkzC5SzFm+o0c3pG6EFvVQkJFXOQqoWE5 +5NtddeJFKwnHLj/M1RyXQ1eLmVtvX5KwdsC1JphbHrmye7ePvyJhfVA614Cq +PCYsH1H+0EmC18HZ0y/i5dFfbS5Jqo8E5YtmsqMn5bFti33deN+f/P31z6os +eTzU/mt9XT8JcT83tpkVyWPK3eFY1wESLpzwEqt6IY/T3YG4a4gEj+LSkq4u +eTwWIveZf5gE+tN5g5kBeTRINmv4lzJ7Tbab1qw8jvLFCciOkPDi7NOrxXIK +aPXOlnb9E1Ufd0S1G9YroECjXITRZxLcOn3rB7QVUNatdvYl5U+SP4dlLBTw +4H9GnK+jJJQzrWIYjgro6Lb0MeYLCTEeOatc3RRwqdDD/SdlnoJNqufCFXBT +QOuPH2MkNP97tKb8sAI6FLepxnwlIWuo2bYlSQHfGDnmjVGWXx8QsfqiAh5O +vWPSOk7VW9mlu8dqFTDl+aPKPZNUP3S3Lo03KWCCRtv3asr2XMstvV8rYImb +++K6KRL8ncPfwAcFtM9Xs7tFOTz+Op09roAgInV1mvLhop59xLwCSgu8qmB8 +I8EinnY8YQWBpzIW8QHl5wIPrhuuIbBLTubOPGXHop1Nk/wEujvsmdCeJqHL +cGrshgiBgjXlc0GU3VvOCPlKEvj1RfezPMoDvir6UnIEujZUBDdTDpyrc3tF +IzChTK17jnKkwtx1UzUCQ6vM5S1mSJi9k9W0oEWg17qihb2U47apfeXoErj1 +oWBJGmWuvidCIQwC//ocrFRM+WSUjz7dhMDvCVkHH1Fes/KHW68ZgUMQmNdB +OSvvwvFzlgS2lbdkf6QsprWpyNqWwHsqt/y+U85raG7idiJwf+O7VctnSVDY +FfC12oVAzSPbk9dRLhr7LXTAjcCG36M9IpRVE/P01bwJVG1PXylBuVxMz33I +n4pvSvD/se6tl8f/3kvgWp+MyT/XV5uEFG0PIzB1zcOyP/Ggffkzvv0Env2Q +a/Xnfo+Drn5tiCHwnAdf/Z/zWP1kCB+JJ/DAtd+Snyi3ZnXo6yZQz1fq69BJ +eYdyhPtYMoHrGfKBtZTfVPEmFJ0i8EEz3auEspd9UZFHJoGHSzwNT1Mefm/y +TDSbit/5cDaEcvChN19fXCRQVEnn4jbK43zRwicvE2hBlMkpUj5QwG/Aukad +X5o4vUjlZ173pvtsMYH29Pi+Vso8Xv1FAeUEMvwrjcMpp307/EzuLoGbjiZZ +Myjzp4qMd1YSyBu0wnwZZUn2NgOLegLP562bT6Xq58qWIfdfjQSK3Eu4b0GZ +/uZowv3nBL6ENH9uyhrcd56pdBK4ws0wI5KqTzLHbrz/DYErczr4FCkbqn0S +vthPoHje2JHXVL2b7ZDzWPWJwAvWx5kbKD/9VJFQO0Zg2L7ptNYJat4edS4+ +NEXgiFFXSxRl15LU8Y+LBPqw35uUU/0UOj+V0LSOhqe+SvWuoPqNGRUoPiJM +w0/SwltPU/25erS3lEeShr9jptfzUS5+29BlQqehsleBGzfVz/2PLqjf06dh +bqp8biM1L24brKl/bUTDh4KdI5qU49jHXCeRhtnXRiuyP1L7rTAoSc2GhsvT +j484U/PG4SSj55o3DUWGLuf9j5pX8r/+CavdQ8OY5LO0mffUvIuh8/QF0/CX +V44ei3LaXj5NyWgaTqcz1zyh5l2dTd+JzDQa1prypJdS83GzcKJWPIeGXlZq +yp1dVL+cmX2ce5+GZVEetC/UfG3lCXG7X0PDqcu36pY6SNg363xy6gkNGwgY +l2yn6r1H6W1QLw2lXN6pr6fmtfjVppQdPHT8scL7UFEjVU8SLNn9q+nInT7r +cPIJlZ8sDuevdXSsY6S/96P2gUNS3n/NEnTMu5FpJFpPnTcgdLOpOh3dNw59 +cKD2yYKaYL+GCx2d1tIC1e+QMHdFOlHHjY6m1+40veOQMCOgrMTwpuPTb/uk +s6h9NT7NCNkSTMepsV9ZH/+h9muN/5zbUTqeXrj1LYrad802FfxpxXT8qU80 +z16m+nmfF7yfpeMyz4jFhhMkXOzb+/7jIh3FrJMFJJNIOO9w4OTX33S00Ig1 +C04gIVMn7fk8ryIOJixbzXOUhKQfHFcBeUU8kHXNSDSGej9nVkQaWyiiU8ip +i2VBJBiX3i7IyVHE7aLqbS3bSHhLlF7d+rciLumxT3yxoPKdczN/5qoiWu4o +f7dyK7UPE0suO99UxMxQzRx9Uyo/uwpy+R8oYu5dDhHHIGHjivNZKYOKOPl+ +pOncRup9e8cnxKgr4cTrAS8R6ntpStjaZ2e9Eu4Zi7XPe8SBnlB6W8hTJSQj +FjO/13CgrnERjr9Qwpn9upHOVdT3Ylypwo0uJTTQuyKz7C4HNr1f+25hVAmz +bjZtNbvJgXDOS88rIsr4zu7YHpdsDow6uLgP71FG8+YPD5sDODCc7rNz/yoV +ZNp8++m0nANWE4esPuivx4HrH9s3Mtkw5r/6wN3jG3Ds7X8/ezLKqP8rEtyp +9Rvxyc6Lu33Tb4Nwi0ome0IV/334d8Xh3Fsgm1buqK+vjgPnNT+Mht+AXDWG +oEiQBpY/cn2Tv7cEmqVN9abPamKkaHTm8P4iYMrWZ2l1aSFRUhKu5VsI/DyF +0b5Jm9DV7rSpR0oByCcqGO9W0caFkTNGXsZXgFfZ477zU228GFmno19zCTRZ +UuWHPDfjqtW7SwXJHNjfL9xgzaWDD6xcjxwszYaJ6XQXq1wd9N/apJ8kdRYs +tRrzrDR08bQ39+q4wgx4NG3043urLpptynTR1DkF4eqbe18F6OHgC/+QsNST +wBrf07GbVx83hVWGFKxKgq1KknbrCvVxaru63QHPY7Ah4fThegMDFBditrxK +jAXVAEatcq8BhvDZmHQvREPAo73Jd6MMcbLyUMKoVxSMh40e2hptiKwjVpDs +GAWH5UL3dcUYov+aA3wbzKLg9JEI5/l4Q8ypU6zIUI4CNjOGME4xRMw99bxt +LBJ+3j/xoCHPEPX39QVpH42Ec+X5M68bDDEx8xojyjoCags69kyJMfCct8DV +VHooDNjSvGMkGZgff2RocE0ocC2E7f4hzcC7a8el7ab3gZnTKvsVBAOP175k +7Xy8DxqXMQ2kVBk42XrDcXPQPnjhd5XX1ISBAT8d/+Zlh0CvUkhZViADTfTc +mmbsgmHmxu/vWhUMTKSf6ntSGQgjOy0KTlUx0O6KQEZQSSD0LM/YNlTDwLDL +L3nFzwdCjY/0pZw6BvrTf9pfigiEJEk95tIzBrYKH91iuD4QBNNCjjT/x8CY +9NrGV7kBoB7UyRXAzcS/Nt78anZyD/grl/Lm2TGx7Zq+5PVEP4h74hWi4sjE +jNDOb3ORfpAVIPycdGaitKvcO1cfP3hQHJv+3JWJ0xNPnyP4gajKNoElXyY6 +HRMTLFvyhUaVD6I+MUwUWhmqOHHEF1Q3KBAqV5m4P61apD3ZB6ZUs/XJSSZy +yoYd2iM9oecFbhWZZuJy7+B2F1dPqAsf3x49y8SV2e33v7A8IZO0itJfZKLt +RpkwJz5PUGVy3a7mMcKpe4MWPP/zAD+rMFqDuBFKxgoYzQ26Q0eQ5doOYyP0 +UlM90xjgBpVFPwZn04xQTDAnJL3QFfTNo79bnzHC7If7CmcyXOHe4Njaggwj +NNeWrwqNdQVSvt/A+pwRzp/xckt3dIXbuXUZ+X8bodV2Hce03zuhIP0kw7LM +CDtLjxuE+OyEU9ECZ3PbjbDtUdOuLA0XcNuiiEbyxliB9/i3TTvDUsdq/gbC +GM32vtf5MuAMBQHjb60VjdEkv0A7v9UZRlKqDrltMMZ4tcI0nVvOsP+ZQ3ns +ZmPssmz3k/ZzhtP2R+QrLYzxOw9/S2uHE1Tv6vypG2GMfU4VH048cQSZsNQq +zTpjLAmy23T0uh1k/g7UO1NPxatWTF9ItQPucxacj4+NUUNioiU91A5G76+4 +WfDMGJM1NOq/69lBNVdyrnC7MWr9Jkv6ntmC2/mEQ3MfjPFbr/+2t7M2kFsT +q/eIj4W3vmks0/KyBrE1oRw7Vxa2NJrs6wu1hCLzo3GTu1kYb1Z+gXuHJWw+ +mmme7cHCo7ruqWBkCfaT7M4eXxaqXmZHca2xhJSu2QX/UBY6ftA0uXzDAuYL +j5vFJbLwnIVHreroVug1ym4vKWXh3e3c5vLHtsDeg0WXrcpY+DLxkbLE3i0w +V3YvYIxNXR/F3K/svAWE6T3fte+z0EpjJVeSyhawWS0n+7COhbt4SucM28zh +QUfJnvZOFsamit7PXG8O1vyVGjE9LDSVPfyqU9gceiyfzUm+ZaFHYxRT+5cZ +zFR/SfMaYOE9h4ZypU4z0Li26Z/PoywMMazd8vOEGTzoNY1J/8pC2knvz0MR +ZmAtuh20Jlm4PInH+Z27GQSmHnwVPUs9X0m4mpAuFa8uJU9inoVlzt5xloQZ +JC1e9K9eZOFIWYnV2bVmIKh7U91ziYV+/TFp4/OmkB9WPfv7N3X/mnUq3h9M +4f/swcNZ + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VPsbAHDRJmXf1zNjqazJOsN4XxTZl5KyLyGylhRakFDhKiW5JQm/ +SpeZ02KruJSkSFnTJSKVZMkSSv1Of83zeZ7zvOd7zrudoflFOAdwc3Fx6Szj +4vrzO9f/7LHSmSKTqQDeZLNL5iYd+ZKxpj1JsHn/4ITXIg1Q7KWfZM854P4W +mqS3qA0xjre6eXoKgetJ0pLkoikIjUucW+gmQYQ3J+nLghO8e2AfMdNdD/di +N464LviChdJo31T3a0hxCXsq/T0KFroNLkx2v4eoy2pF2uOJ0GD+v6JXhdNw +ZVV4onjKOZB9VzXip74EnxXispNV/gbRUO9bq8x5cDhwZMz+0jU4p21RY++y +Giv4K1I6bhXDm9xNdVOC63C1TvezdNpNOFN0/CW3lBCG7H2QoXn4NljrBguL +KQphb1nmQ6/k27D6sbPLeg0hfDieeD416zYkDym/tTEVQonoOs2GG7fhCP3F +yPlgIcyMW9Y12HMbwgskf6lUC2HxLr4VNQb/gNNljrqNuzCaDqgatE78AxLn +h05lXxHBBZWZ8bVW5SCpdi95vkQEX1SfsC1xLgfp+pTjnmwRHAnY3WfoUQ7y +kxsPrm8QweWk+HmriHJQto30qfkkgoOVCnpSF8pBZ/mS/pCOKE4HFFlGvisH +h2jx4c3NomjnsZWIN2CDI9+n/ovtovhDZGL6jREbnAur3vz8TxR7n2Q66iEb +drZ5vGycEMUwu7HCwW1s8FS/Xu0mJoYzFbwFgm5s2DesdTbJRwxbx2WvPo1n +Q+oOK5PXc2Io9FCI7+IDNkjfbZXmXiaODeFZq97WsaFMZMd3bT5xVFxSHpJ+ +woau117sswriGCYqp5/ZwgYlp2i60zZx7L5ia2rez4Z6u6sr2y6JY45IZeHI +LzYsWcy2thhLoCVP2CVBFgeySuJKlywkcG6gf/AlckBpJVeahpMEsotfcp3Z +wgHbJ2tMMwIk8K//Tv07Y8OBPHPijm2mBLZ0o3WOGwcM0ebi83cSyAyW8hQ6 +xIEDjGvez5Ik8foxtWUfb3PAuoB/xiZdEs+ObN04Ws4B+qojaa0XJFH+0bLy +zyQH2jp2ctpvSGLux4T2vkoOaEau5elvlcTO0O7EvMcc+FRyqOSbtBRGzXAS +A95ywEPU/qvMHSmUsGmqMVtJgk58TWL+AynUCRuvfbWahDXvN4jTGqVQO0NG +2ZOPhKpyHlB5I4Vr3SxFggVJELepytr0WwqPCjoku0iT0JaopLvVRhrdHlt8 +StAgYcvEYlz4kDTGyWwIV3QiIXbbedV/x6SRE8gdqbudhLJrGr0ic9JYG9n8 +y9SFBMkdPoyq1TJ46ILPY+fdJIxVPvnOoymD1ttPzVv7kpCdlBV96bAMrtPa +6ZATSULT241KY4ky2MK7wzJyPwk/dRvaTc7IYL5Z6SuLaBICP85uHr4ig2E1 +w/mfD5HAtHWf0myQwc1Oeiorj5PwXkwl/PE6WdzQpm76dzoJEhG1chISsmjA +qM4wySTBtmlXSzAhi3Uawgf6/yLhftwZdQEdWTRRHeQVzSbh9LvJ0d27ZFFJ +OSJ65yUSNt+sCZoolEW5NJUiw2ISgrhdJMxuy6KibM+d4hISLruPN56/J4v9 +Bx/7C9wgYSU/TYXZJIvh/9qU9NwioXd/ynDyV1l0azB5bMYmIdHYyVfaUA49 +Tmn0HKwmYZtX/jcDMznkL7xw+GkNCfwJX0642Mph5HIxVbGHVPyGkyVZPnJ4 +Q0m3oaiWhErr6i8rT8mh+zL99+cfkzC5SzFm+o0c3pG6EFvVQkJFXOQqoWE5 +5NtddeJFKwnHLj/M1RyXQ1eLmVtvX5KwdsC1JphbHrmye7ePvyJhfVA614Cq +PCYsH1H+0EmC18HZ0y/i5dFfbS5Jqo8E5YtmsqMn5bFti33deN+f/P31z6os +eTzU/mt9XT8JcT83tpkVyWPK3eFY1wESLpzwEqt6IY/T3YG4a4gEj+LSkq4u +eTwWIveZf5gE+tN5g5kBeTRINmv4lzJ7Tbab1qw8jvLFCciOkPDi7NOrxXIK +aPXOlnb9E1Ufd0S1G9YroECjXITRZxLcOn3rB7QVUNatdvYl5U+SP4dlLBTw +4H9GnK+jJJQzrWIYjgro6Lb0MeYLCTEeOatc3RRwqdDD/SdlnoJNqufCFXBT +QOuPH2MkNP97tKb8sAI6FLepxnwlIWuo2bYlSQHfGDnmjVGWXx8QsfqiAh5O +vWPSOk7VW9mlu8dqFTDl+aPKPZNUP3S3Lo03KWCCRtv3asr2XMstvV8rYImb +++K6KRL8ncPfwAcFtM9Xs7tFOTz+Op09roAgInV1mvLhop59xLwCSgu8qmB8 +I8EinnY8YQWBpzIW8QHl5wIPrhuuIbBLTubOPGXHop1Nk/wEujvsmdCeJqHL +cGrshgiBgjXlc0GU3VvOCPlKEvj1RfezPMoDvir6UnIEujZUBDdTDpyrc3tF +IzChTK17jnKkwtx1UzUCQ6vM5S1mSJi9k9W0oEWg17qihb2U47apfeXoErj1 +oWBJGmWuvidCIQwC//ocrFRM+WSUjz7dhMDvCVkHH1Fes/KHW68ZgUMQmNdB +OSvvwvFzlgS2lbdkf6QsprWpyNqWwHsqt/y+U85raG7idiJwf+O7VctnSVDY +FfC12oVAzSPbk9dRLhr7LXTAjcCG36M9IpRVE/P01bwJVG1PXylBuVxMz33I +n4pvSvD/se6tl8f/3kvgWp+MyT/XV5uEFG0PIzB1zcOyP/Ggffkzvv0Env2Q +a/Xnfo+Drn5tiCHwnAdf/Z/zWP1kCB+JJ/DAtd+Snyi3ZnXo6yZQz1fq69BJ +eYdyhPtYMoHrGfKBtZTfVPEmFJ0i8EEz3auEspd9UZFHJoGHSzwNT1Mefm/y +TDSbit/5cDaEcvChN19fXCRQVEnn4jbK43zRwicvE2hBlMkpUj5QwG/Aukad +X5o4vUjlZ173pvtsMYH29Pi+Vso8Xv1FAeUEMvwrjcMpp307/EzuLoGbjiZZ +Myjzp4qMd1YSyBu0wnwZZUn2NgOLegLP562bT6Xq58qWIfdfjQSK3Eu4b0GZ +/uZowv3nBL6ENH9uyhrcd56pdBK4ws0wI5KqTzLHbrz/DYErczr4FCkbqn0S +vthPoHje2JHXVL2b7ZDzWPWJwAvWx5kbKD/9VJFQO0Zg2L7ptNYJat4edS4+ +NEXgiFFXSxRl15LU8Y+LBPqw35uUU/0UOj+V0LSOhqe+SvWuoPqNGRUoPiJM +w0/SwltPU/25erS3lEeShr9jptfzUS5+29BlQqehsleBGzfVz/2PLqjf06dh +bqp8biM1L24brKl/bUTDh4KdI5qU49jHXCeRhtnXRiuyP1L7rTAoSc2GhsvT +j484U/PG4SSj55o3DUWGLuf9j5pX8r/+CavdQ8OY5LO0mffUvIuh8/QF0/CX +V44ei3LaXj5NyWgaTqcz1zyh5l2dTd+JzDQa1prypJdS83GzcKJWPIeGXlZq +yp1dVL+cmX2ce5+GZVEetC/UfG3lCXG7X0PDqcu36pY6SNg363xy6gkNGwgY +l2yn6r1H6W1QLw2lXN6pr6fmtfjVppQdPHT8scL7UFEjVU8SLNn9q+nInT7r +cPIJlZ8sDuevdXSsY6S/96P2gUNS3n/NEnTMu5FpJFpPnTcgdLOpOh3dNw59 +cKD2yYKaYL+GCx2d1tIC1e+QMHdFOlHHjY6m1+40veOQMCOgrMTwpuPTb/uk +s6h9NT7NCNkSTMepsV9ZH/+h9muN/5zbUTqeXrj1LYrad802FfxpxXT8qU80 +z16m+nmfF7yfpeMyz4jFhhMkXOzb+/7jIh3FrJMFJJNIOO9w4OTX33S00Ig1 +C04gIVMn7fk8ryIOJixbzXOUhKQfHFcBeUU8kHXNSDSGej9nVkQaWyiiU8ip +i2VBJBiX3i7IyVHE7aLqbS3bSHhLlF7d+rciLumxT3yxoPKdczN/5qoiWu4o +f7dyK7UPE0suO99UxMxQzRx9Uyo/uwpy+R8oYu5dDhHHIGHjivNZKYOKOPl+ +pOncRup9e8cnxKgr4cTrAS8R6ntpStjaZ2e9Eu4Zi7XPe8SBnlB6W8hTJSQj +FjO/13CgrnERjr9Qwpn9upHOVdT3Ylypwo0uJTTQuyKz7C4HNr1f+25hVAmz +bjZtNbvJgXDOS88rIsr4zu7YHpdsDow6uLgP71FG8+YPD5sDODCc7rNz/yoV +ZNp8++m0nANWE4esPuivx4HrH9s3Mtkw5r/6wN3jG3Ds7X8/ezLKqP8rEtyp +9Rvxyc6Lu33Tb4Nwi0ome0IV/334d8Xh3Fsgm1buqK+vjgPnNT+Mht+AXDWG +oEiQBpY/cn2Tv7cEmqVN9abPamKkaHTm8P4iYMrWZ2l1aSFRUhKu5VsI/DyF +0b5Jm9DV7rSpR0oByCcqGO9W0caFkTNGXsZXgFfZ477zU228GFmno19zCTRZ +UuWHPDfjqtW7SwXJHNjfL9xgzaWDD6xcjxwszYaJ6XQXq1wd9N/apJ8kdRYs +tRrzrDR08bQ39+q4wgx4NG3043urLpptynTR1DkF4eqbe18F6OHgC/+QsNST +wBrf07GbVx83hVWGFKxKgq1KknbrCvVxaru63QHPY7Ah4fThegMDFBditrxK +jAXVAEatcq8BhvDZmHQvREPAo73Jd6MMcbLyUMKoVxSMh40e2hptiKwjVpDs +GAWH5UL3dcUYov+aA3wbzKLg9JEI5/l4Q8ypU6zIUI4CNjOGME4xRMw99bxt +LBJ+3j/xoCHPEPX39QVpH42Ec+X5M68bDDEx8xojyjoCags69kyJMfCct8DV +VHooDNjSvGMkGZgff2RocE0ocC2E7f4hzcC7a8el7ab3gZnTKvsVBAOP175k +7Xy8DxqXMQ2kVBk42XrDcXPQPnjhd5XX1ISBAT8d/+Zlh0CvUkhZViADTfTc +mmbsgmHmxu/vWhUMTKSf6ntSGQgjOy0KTlUx0O6KQEZQSSD0LM/YNlTDwLDL +L3nFzwdCjY/0pZw6BvrTf9pfigiEJEk95tIzBrYKH91iuD4QBNNCjjT/x8CY +9NrGV7kBoB7UyRXAzcS/Nt78anZyD/grl/Lm2TGx7Zq+5PVEP4h74hWi4sjE +jNDOb3ORfpAVIPycdGaitKvcO1cfP3hQHJv+3JWJ0xNPnyP4gajKNoElXyY6 +HRMTLFvyhUaVD6I+MUwUWhmqOHHEF1Q3KBAqV5m4P61apD3ZB6ZUs/XJSSZy +yoYd2iM9oecFbhWZZuJy7+B2F1dPqAsf3x49y8SV2e33v7A8IZO0itJfZKLt +RpkwJz5PUGVy3a7mMcKpe4MWPP/zAD+rMFqDuBFKxgoYzQ26Q0eQ5doOYyP0 +UlM90xjgBpVFPwZn04xQTDAnJL3QFfTNo79bnzHC7If7CmcyXOHe4Njaggwj +NNeWrwqNdQVSvt/A+pwRzp/xckt3dIXbuXUZ+X8bodV2Hce03zuhIP0kw7LM +CDtLjxuE+OyEU9ECZ3PbjbDtUdOuLA0XcNuiiEbyxliB9/i3TTvDUsdq/gbC +GM32vtf5MuAMBQHjb60VjdEkv0A7v9UZRlKqDrltMMZ4tcI0nVvOsP+ZQ3ns +ZmPssmz3k/ZzhtP2R+QrLYzxOw9/S2uHE1Tv6vypG2GMfU4VH048cQSZsNQq +zTpjLAmy23T0uh1k/g7UO1NPxatWTF9ItQPucxacj4+NUUNioiU91A5G76+4 +WfDMGJM1NOq/69lBNVdyrnC7MWr9Jkv6ntmC2/mEQ3MfjPFbr/+2t7M2kFsT +q/eIj4W3vmks0/KyBrE1oRw7Vxa2NJrs6wu1hCLzo3GTu1kYb1Z+gXuHJWw+ +mmme7cHCo7ruqWBkCfaT7M4eXxaqXmZHca2xhJSu2QX/UBY6ftA0uXzDAuYL +j5vFJbLwnIVHreroVug1ym4vKWXh3e3c5vLHtsDeg0WXrcpY+DLxkbLE3i0w +V3YvYIxNXR/F3K/svAWE6T3fte+z0EpjJVeSyhawWS0n+7COhbt4SucM28zh +QUfJnvZOFsamit7PXG8O1vyVGjE9LDSVPfyqU9gceiyfzUm+ZaFHYxRT+5cZ +zFR/SfMaYOE9h4ZypU4z0Li26Z/PoywMMazd8vOEGTzoNY1J/8pC2knvz0MR +ZmAtuh20Jlm4PInH+Z27GQSmHnwVPUs9X0m4mpAuFa8uJU9inoVlzt5xloQZ +JC1e9K9eZOFIWYnV2bVmIKh7U91ziYV+/TFp4/OmkB9WPfv7N3X/mnUq3h9M +4f/swcNZ + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07405227751610899}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07405227751610899}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k4VPsbAHDRJmXf1zNjqazJOsN4XxTZl5KyLyGylhRakFDhKiW5JQm/ +SpeZ02KruJSkSFnTJSKVZMkSSv1Of83zeZ7zvOd7zrudoflFOAdwc3Fx6Szj +4vrzO9f/7LHSmSKTqQDeZLNL5iYd+ZKxpj1JsHn/4ITXIg1Q7KWfZM854P4W +mqS3qA0xjre6eXoKgetJ0pLkoikIjUucW+gmQYQ3J+nLghO8e2AfMdNdD/di +N464LviChdJo31T3a0hxCXsq/T0KFroNLkx2v4eoy2pF2uOJ0GD+v6JXhdNw +ZVV4onjKOZB9VzXip74EnxXispNV/gbRUO9bq8x5cDhwZMz+0jU4p21RY++y +Giv4K1I6bhXDm9xNdVOC63C1TvezdNpNOFN0/CW3lBCG7H2QoXn4NljrBguL +KQphb1nmQ6/k27D6sbPLeg0hfDieeD416zYkDym/tTEVQonoOs2GG7fhCP3F +yPlgIcyMW9Y12HMbwgskf6lUC2HxLr4VNQb/gNNljrqNuzCaDqgatE78AxLn +h05lXxHBBZWZ8bVW5SCpdi95vkQEX1SfsC1xLgfp+pTjnmwRHAnY3WfoUQ7y +kxsPrm8QweWk+HmriHJQto30qfkkgoOVCnpSF8pBZ/mS/pCOKE4HFFlGvisH +h2jx4c3NomjnsZWIN2CDI9+n/ovtovhDZGL6jREbnAur3vz8TxR7n2Q66iEb +drZ5vGycEMUwu7HCwW1s8FS/Xu0mJoYzFbwFgm5s2DesdTbJRwxbx2WvPo1n +Q+oOK5PXc2Io9FCI7+IDNkjfbZXmXiaODeFZq97WsaFMZMd3bT5xVFxSHpJ+ +woau117sswriGCYqp5/ZwgYlp2i60zZx7L5ia2rez4Z6u6sr2y6JY45IZeHI +LzYsWcy2thhLoCVP2CVBFgeySuJKlywkcG6gf/AlckBpJVeahpMEsotfcp3Z +wgHbJ2tMMwIk8K//Tv07Y8OBPHPijm2mBLZ0o3WOGwcM0ebi83cSyAyW8hQ6 +xIEDjGvez5Ik8foxtWUfb3PAuoB/xiZdEs+ObN04Ws4B+qojaa0XJFH+0bLy +zyQH2jp2ctpvSGLux4T2vkoOaEau5elvlcTO0O7EvMcc+FRyqOSbtBRGzXAS +A95ywEPU/qvMHSmUsGmqMVtJgk58TWL+AynUCRuvfbWahDXvN4jTGqVQO0NG +2ZOPhKpyHlB5I4Vr3SxFggVJELepytr0WwqPCjoku0iT0JaopLvVRhrdHlt8 +StAgYcvEYlz4kDTGyWwIV3QiIXbbedV/x6SRE8gdqbudhLJrGr0ic9JYG9n8 +y9SFBMkdPoyq1TJ46ILPY+fdJIxVPvnOoymD1ttPzVv7kpCdlBV96bAMrtPa +6ZATSULT241KY4ky2MK7wzJyPwk/dRvaTc7IYL5Z6SuLaBICP85uHr4ig2E1 +w/mfD5HAtHWf0myQwc1Oeiorj5PwXkwl/PE6WdzQpm76dzoJEhG1chISsmjA +qM4wySTBtmlXSzAhi3Uawgf6/yLhftwZdQEdWTRRHeQVzSbh9LvJ0d27ZFFJ +OSJ65yUSNt+sCZoolEW5NJUiw2ISgrhdJMxuy6KibM+d4hISLruPN56/J4v9 +Bx/7C9wgYSU/TYXZJIvh/9qU9NwioXd/ynDyV1l0azB5bMYmIdHYyVfaUA49 +Tmn0HKwmYZtX/jcDMznkL7xw+GkNCfwJX0642Mph5HIxVbGHVPyGkyVZPnJ4 +Q0m3oaiWhErr6i8rT8mh+zL99+cfkzC5SzFm+o0c3pG6EFvVQkJFXOQqoWE5 +5NtddeJFKwnHLj/M1RyXQ1eLmVtvX5KwdsC1JphbHrmye7ePvyJhfVA614Cq +PCYsH1H+0EmC18HZ0y/i5dFfbS5Jqo8E5YtmsqMn5bFti33deN+f/P31z6os +eTzU/mt9XT8JcT83tpkVyWPK3eFY1wESLpzwEqt6IY/T3YG4a4gEj+LSkq4u +eTwWIveZf5gE+tN5g5kBeTRINmv4lzJ7Tbab1qw8jvLFCciOkPDi7NOrxXIK +aPXOlnb9E1Ufd0S1G9YroECjXITRZxLcOn3rB7QVUNatdvYl5U+SP4dlLBTw +4H9GnK+jJJQzrWIYjgro6Lb0MeYLCTEeOatc3RRwqdDD/SdlnoJNqufCFXBT +QOuPH2MkNP97tKb8sAI6FLepxnwlIWuo2bYlSQHfGDnmjVGWXx8QsfqiAh5O +vWPSOk7VW9mlu8dqFTDl+aPKPZNUP3S3Lo03KWCCRtv3asr2XMstvV8rYImb +++K6KRL8ncPfwAcFtM9Xs7tFOTz+Op09roAgInV1mvLhop59xLwCSgu8qmB8 +I8EinnY8YQWBpzIW8QHl5wIPrhuuIbBLTubOPGXHop1Nk/wEujvsmdCeJqHL +cGrshgiBgjXlc0GU3VvOCPlKEvj1RfezPMoDvir6UnIEujZUBDdTDpyrc3tF +IzChTK17jnKkwtx1UzUCQ6vM5S1mSJi9k9W0oEWg17qihb2U47apfeXoErj1 +oWBJGmWuvidCIQwC//ocrFRM+WSUjz7dhMDvCVkHH1Fes/KHW68ZgUMQmNdB +OSvvwvFzlgS2lbdkf6QsprWpyNqWwHsqt/y+U85raG7idiJwf+O7VctnSVDY +FfC12oVAzSPbk9dRLhr7LXTAjcCG36M9IpRVE/P01bwJVG1PXylBuVxMz33I +n4pvSvD/se6tl8f/3kvgWp+MyT/XV5uEFG0PIzB1zcOyP/Ggffkzvv0Env2Q +a/Xnfo+Drn5tiCHwnAdf/Z/zWP1kCB+JJ/DAtd+Snyi3ZnXo6yZQz1fq69BJ +eYdyhPtYMoHrGfKBtZTfVPEmFJ0i8EEz3auEspd9UZFHJoGHSzwNT1Mefm/y +TDSbit/5cDaEcvChN19fXCRQVEnn4jbK43zRwicvE2hBlMkpUj5QwG/Aukad +X5o4vUjlZ173pvtsMYH29Pi+Vso8Xv1FAeUEMvwrjcMpp307/EzuLoGbjiZZ +Myjzp4qMd1YSyBu0wnwZZUn2NgOLegLP562bT6Xq58qWIfdfjQSK3Eu4b0GZ +/uZowv3nBL6ENH9uyhrcd56pdBK4ws0wI5KqTzLHbrz/DYErczr4FCkbqn0S +vthPoHje2JHXVL2b7ZDzWPWJwAvWx5kbKD/9VJFQO0Zg2L7ptNYJat4edS4+ +NEXgiFFXSxRl15LU8Y+LBPqw35uUU/0UOj+V0LSOhqe+SvWuoPqNGRUoPiJM +w0/SwltPU/25erS3lEeShr9jptfzUS5+29BlQqehsleBGzfVz/2PLqjf06dh +bqp8biM1L24brKl/bUTDh4KdI5qU49jHXCeRhtnXRiuyP1L7rTAoSc2GhsvT +j484U/PG4SSj55o3DUWGLuf9j5pX8r/+CavdQ8OY5LO0mffUvIuh8/QF0/CX +V44ei3LaXj5NyWgaTqcz1zyh5l2dTd+JzDQa1prypJdS83GzcKJWPIeGXlZq +yp1dVL+cmX2ce5+GZVEetC/UfG3lCXG7X0PDqcu36pY6SNg363xy6gkNGwgY +l2yn6r1H6W1QLw2lXN6pr6fmtfjVppQdPHT8scL7UFEjVU8SLNn9q+nInT7r +cPIJlZ8sDuevdXSsY6S/96P2gUNS3n/NEnTMu5FpJFpPnTcgdLOpOh3dNw59 +cKD2yYKaYL+GCx2d1tIC1e+QMHdFOlHHjY6m1+40veOQMCOgrMTwpuPTb/uk +s6h9NT7NCNkSTMepsV9ZH/+h9muN/5zbUTqeXrj1LYrad802FfxpxXT8qU80 +z16m+nmfF7yfpeMyz4jFhhMkXOzb+/7jIh3FrJMFJJNIOO9w4OTX33S00Ig1 +C04gIVMn7fk8ryIOJixbzXOUhKQfHFcBeUU8kHXNSDSGej9nVkQaWyiiU8ip +i2VBJBiX3i7IyVHE7aLqbS3bSHhLlF7d+rciLumxT3yxoPKdczN/5qoiWu4o +f7dyK7UPE0suO99UxMxQzRx9Uyo/uwpy+R8oYu5dDhHHIGHjivNZKYOKOPl+ +pOncRup9e8cnxKgr4cTrAS8R6ntpStjaZ2e9Eu4Zi7XPe8SBnlB6W8hTJSQj +FjO/13CgrnERjr9Qwpn9upHOVdT3Ylypwo0uJTTQuyKz7C4HNr1f+25hVAmz +bjZtNbvJgXDOS88rIsr4zu7YHpdsDow6uLgP71FG8+YPD5sDODCc7rNz/yoV +ZNp8++m0nANWE4esPuivx4HrH9s3Mtkw5r/6wN3jG3Ds7X8/ezLKqP8rEtyp +9Rvxyc6Lu33Tb4Nwi0ome0IV/334d8Xh3Fsgm1buqK+vjgPnNT+Mht+AXDWG +oEiQBpY/cn2Tv7cEmqVN9abPamKkaHTm8P4iYMrWZ2l1aSFRUhKu5VsI/DyF +0b5Jm9DV7rSpR0oByCcqGO9W0caFkTNGXsZXgFfZ477zU228GFmno19zCTRZ +UuWHPDfjqtW7SwXJHNjfL9xgzaWDD6xcjxwszYaJ6XQXq1wd9N/apJ8kdRYs +tRrzrDR08bQ39+q4wgx4NG3043urLpptynTR1DkF4eqbe18F6OHgC/+QsNST +wBrf07GbVx83hVWGFKxKgq1KknbrCvVxaru63QHPY7Ah4fThegMDFBditrxK +jAXVAEatcq8BhvDZmHQvREPAo73Jd6MMcbLyUMKoVxSMh40e2hptiKwjVpDs +GAWH5UL3dcUYov+aA3wbzKLg9JEI5/l4Q8ypU6zIUI4CNjOGME4xRMw99bxt +LBJ+3j/xoCHPEPX39QVpH42Ec+X5M68bDDEx8xojyjoCags69kyJMfCct8DV +VHooDNjSvGMkGZgff2RocE0ocC2E7f4hzcC7a8el7ab3gZnTKvsVBAOP175k +7Xy8DxqXMQ2kVBk42XrDcXPQPnjhd5XX1ISBAT8d/+Zlh0CvUkhZViADTfTc +mmbsgmHmxu/vWhUMTKSf6ntSGQgjOy0KTlUx0O6KQEZQSSD0LM/YNlTDwLDL +L3nFzwdCjY/0pZw6BvrTf9pfigiEJEk95tIzBrYKH91iuD4QBNNCjjT/x8CY +9NrGV7kBoB7UyRXAzcS/Nt78anZyD/grl/Lm2TGx7Zq+5PVEP4h74hWi4sjE +jNDOb3ORfpAVIPycdGaitKvcO1cfP3hQHJv+3JWJ0xNPnyP4gajKNoElXyY6 +HRMTLFvyhUaVD6I+MUwUWhmqOHHEF1Q3KBAqV5m4P61apD3ZB6ZUs/XJSSZy +yoYd2iM9oecFbhWZZuJy7+B2F1dPqAsf3x49y8SV2e33v7A8IZO0itJfZKLt +RpkwJz5PUGVy3a7mMcKpe4MWPP/zAD+rMFqDuBFKxgoYzQ26Q0eQ5doOYyP0 +UlM90xjgBpVFPwZn04xQTDAnJL3QFfTNo79bnzHC7If7CmcyXOHe4Njaggwj +NNeWrwqNdQVSvt/A+pwRzp/xckt3dIXbuXUZ+X8bodV2Hce03zuhIP0kw7LM +CDtLjxuE+OyEU9ECZ3PbjbDtUdOuLA0XcNuiiEbyxliB9/i3TTvDUsdq/gbC +GM32vtf5MuAMBQHjb60VjdEkv0A7v9UZRlKqDrltMMZ4tcI0nVvOsP+ZQ3ns +ZmPssmz3k/ZzhtP2R+QrLYzxOw9/S2uHE1Tv6vypG2GMfU4VH048cQSZsNQq +zTpjLAmy23T0uh1k/g7UO1NPxatWTF9ItQPucxacj4+NUUNioiU91A5G76+4 +WfDMGJM1NOq/69lBNVdyrnC7MWr9Jkv6ntmC2/mEQ3MfjPFbr/+2t7M2kFsT +q/eIj4W3vmks0/KyBrE1oRw7Vxa2NJrs6wu1hCLzo3GTu1kYb1Z+gXuHJWw+ +mmme7cHCo7ruqWBkCfaT7M4eXxaqXmZHca2xhJSu2QX/UBY6ftA0uXzDAuYL +j5vFJbLwnIVHreroVug1ym4vKWXh3e3c5vLHtsDeg0WXrcpY+DLxkbLE3i0w +V3YvYIxNXR/F3K/svAWE6T3fte+z0EpjJVeSyhawWS0n+7COhbt4SucM28zh +QUfJnvZOFsamit7PXG8O1vyVGjE9LDSVPfyqU9gceiyfzUm+ZaFHYxRT+5cZ +zFR/SfMaYOE9h4ZypU4z0Li26Z/PoywMMazd8vOEGTzoNY1J/8pC2knvz0MR +ZmAtuh20Jlm4PInH+Z27GQSmHnwVPUs9X0m4mpAuFa8uJU9inoVlzt5xloQZ +JC1e9K9eZOFIWYnV2bVmIKh7U91ziYV+/TFp4/OmkB9WPfv7N3X/mnUq3h9M +4f/swcNZ + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07405227751610899}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07405227751610899}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387139986293*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"74e5404a-eb6e-4049-af67-fbd4d1fd8fb4"] +}, Open ]], Cell[CellGroupData[{ @@ -7776,14 +7931,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918488983507824`*^9},ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-\ -3438788b15d6"], + CellChangeTimes->{3.9918488983507824`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913294794877434`*^9}, - CellLabel-> - "Out[171]=",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] +Cell[BoxData["9.807063500227704`"], "Output", + CellChangeTimes->{3.9913294794877434`*^9, 3.9943871400331984`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"82e46288-9b53-46f8-94e6-1096726147d0"] }, Open ]], Cell[CellGroupData[{ @@ -7839,177 +7992,178 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918488997875195`*^9},ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-\ -0e75880d5d98"], + CellChangeTimes->{3.9918488997875195`*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 125, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294796838703`*^9}, - CellLabel-> - "During evaluation of \ -In[172]:=",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1332718134621673`*^-252\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 172, 126, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479692892*^9}, + 2, 99, 13, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.994387140153651*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], +In[99]:=",ExpressionUUID->"d006d268-19a3-492e-9c74-313fa3a0f65c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.284612253961134`*^-262\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 172, 127, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913294797011433`*^9}, +\"", 2, 99, 14, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9943871401595373`*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], +In[99]:=",ExpressionUUID->"47bb900d-bac0-419a-a526-f98d2a5db804"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.4642920032925083`*^-271\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 15, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.994387140164722*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"12b3d03a-bc9a-4e40-a559-f6b63f3757ac"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 172, 128, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329479709572*^9}, +during this calculation.\"", 2, 99, 16, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913294796838703`*^9, 3.9943871401695127`*^9}, CellLabel-> "During evaluation of \ -In[172]:=",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], +In[99]:=",ExpressionUUID->"3ec064e3-ef4f-4b4e-a4d1-a317d822f77f"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1nk8VN8bB3CRJEX2yTKLtWTfxowZzyP7WpZKQiSlRLYIKUKpVGiTCgkl +xZjbYvtGlCgpWSO074myVeh3f3/d1/uPc+6553ye51zG5l3uQYICAgKseQIC +/39ODrXeVztaZJFtcMRQLc7GoiuPEmfZdwASbwk+y+KrAso+3Uzpy4bRHG/9 +LXwjiFlzrVeorxA8057Ps+ZbgeSIfPbvXj7oPF8WLs73gOE6113jvY1Qoce8 +51sZCLZqXwbHep/D0LrcReXlUfC7l3l6tPcNHPsyZjZzOQWarK4UdRT+gocD +W7WkbU+B0nD1h83as+BuqbzE/sZFkNm56ZqIlRAmyH++P2h0GbINbGtd1y5E +KabrwPbTV+BFjn7D2NIluOPfo6hh2zI4WrT/qeAySayLlZAZbS0HR+PtUrKq +krjW/YBucU85LLzvvlZTRxJXWneWur0th9S36gNOlpJ40mtHdeZMOexVaftw +arskhrS2/i7RrYCwAsqcRo0k7uN7TRlkVYDbhUptp41SONd3kPNCkwfyp94e +PnlRGqd8h+5M9fGAsvJW6nSJNLI/ukm+HOSBQuPB/b48aSz9sGJ33RseUEdX +7NZsksZZi4YNEd94oO4c7l/7SRq/Lfh6sOwfD4zmz5q+NZLBaZVtv/3VK2F1 +tNw7w0cyeH/t62dtoZWwRuzT0NlOGbQUiIwziKwE98LqFzMvZfBChYJydkwl +rHvm87T5hwzCP31Pu/2V4Kt9ucZbVhbvvNePTc6shJB3elkH/GVRFPZYGfMr +4ZCng8XzSVnMdyp9mfWzEhRutisIzpPDtfli0q2TlVAu7TllICaHZm1NqX// +VELPcz9eFk0OGa64zF2ID2pu0Spu9nIo7LtcoFmaD40u+QuenZPDDq3I3BYj +PszaTrQ/4cijye4ZKbNwPmSWxJfN2srjM1vOlp4ocvwCgXQdN3l8LCbzfVcs +H5wfLLI8FiSPCgcvFJ/ax4dcKzrhfFwesyZ/84sy+GCGTmcfD8vjAeEW5+Er +fIhiXdrUeoCCqx0aPev7+eBYID7ulEHBOuEz6VmDfFAR2ZvefpqCVdflTm96 +xYdnXesqO69SsGvij9mP93zQDV8sNNROwYVTV/gvR/nwqSS25KfCMvyio1s8 +KkyAj4zrd0ViGfasOpI5p02AUUJtcl7dMtTmbvF31iNg0ZvlcozmZWg2ckbq +jAEB1RVCoPFiGZpmXqApmxIg51Sdqf9vGcb8zv7424KAZ8lqxjZOCph5nnpi +ZDUB1j/+xIe9VUDv3RfTHoYREGd/SuveNwXUbPQ8cDicgPJLOv3Skwq4XUT/ +nF0kARRPf1b1QkUcGYmVr9pNwLeqB1NCuoroMZITtGMvAScPZEaf26OIXKuj +zTKHCWgZWKH2LVkR2612X805QsCMcVOnxVFFFNS9eoOSQcDWjxOG7y6S4xt8 +1JacIIDtvHFMt0kRqVHhXQ9PEfBGViPs/hIlLPt0oz01nwD5XfXK8vJK+EzE +3OBxAQHOLV5PttOVUHo25N6SQgJuxx/VljBSwtiLcaGHigg4Mjz6ZYOXEhLH +m0VcSgkwLK3d9qNQCRkzi98z+ARsE1wrv+q6EvbzH8SsJAi4sHGk+dQtJTRN +LbU0uEnAAnGGBruFHB84k2Zwm4D+yIPvUr8rocRDj6H5NQQkc9wCFMyU8Y7E +hcSpBgLs/fJ+MlcpY3tEoVPPPQLEk76mrHVWRsmA3bd5jeT8TWklmf7K+Avu +bvW6T0CVY83XBYeVsfPB4OqohwTs3ymSqHZSGXvvgIpeCwG2xz3FV11Uxtu/ +JHI/kO7qGNFPrFTG5ITgffaPCBj1Uo359UIZC2vtWX1tBNyJDxeRfKeMnmkB +6yKeELDvwn85uiPKmGH0mbGgnYDFr9bXbhek4g/L1y0qTwnonFfsfGgxFc/j +5ZJrpHNVfw4WyVGR7xfL1H1GgOa2DIFXWlTUFBSNXd5BwEj6i6xZYyq2XVRd +nk/65jUNVUWgIqQsypJ8TsCqkQabdR5UPD2x4MRn0qJLxXujfEmPpGqs7iTz +Z7AxOGsbFUNFCuJ5pP12TxxpS6DipuFjvlu7CFA/u0rpSxoVtSy6Rmq6/p+v +EzdEMqko9yfPUqybAKL/pYV6LhX3eK9cv550/MyKZ6uKqNgsUqWfT9qSGhvg +X07FrYvSnr4hvRDv/0ysIr+vtdNYpYeA0yl+stVtVPw8Iuh1irRPcVlJTw8V +meM7KQ9JqzycZo6/oqLvz5CiCdKfP9m0Sn6lIk/BfpbWSwBv0UlvvQkqfpx0 +VLMlHav96qvzP9Lb6hWCSVu46iTuEKUhr2jsdRpp4fB48XRpGrqz9BLySbdl +PcwvVqZhk/DDjzdJnyRkDJo0afiAI7qimbR3d0DjKwMaNm+2w07SjKlyjzlz +GnY5d+m+JP2JMvNO0ZaGAbT5k69IV7AdYlhraOjhon32NekYnzMi671pWH3m +svQQac6+tznRW8j5RRp39pAWKtDXyg6jYenUq8uPSD+6l1hbsYeG4SIba2pI +Z7595PzkAA2/0jMqS0ivF6YMfcmgYfrujiPHSVM1g3YtPEtDw8TDdpGk39vz +BTQu0XDFhPRnN9LXd/zLsiqj4bzhjnAd0lEZzqoBt2jovF/91XzS7PJzN/fV +07DAJ9Ksj9xf69722ZEW8ns8rgxdI+0qMN9u03MaBh7Pm4oj7bWClfl0gIbj +HQmpNqQD3cNewHvyfZ2BB5eQDku4rMIboeG06d65DvK89xT1hdCnaRiZ9fV7 +NmnbBMb+JGE6+jDCmItIP5aou2y2iI4aqp0nG8h8rSla1zIqTsdmvuHOKNIb +nxyVDKDQcY3RidPtZD7DaZOXLVfSMesZ76s3mecJIrPltx4dj77rsZ8g8x9v +v/J7pTEdd2bvWJlBOi3C31TFgo6WG4rTKsj6yW161CLoRsdV+9V4bWT90byC +vtespeMd0VBvJ9JF3/5JRnnTcXrD05PNZL1WyJpsfBtIx/6/D6v4ZD3f35b/ +vSmGjmmWC0cCyHp3mGFJ7U2g49jwWaMHrQS0Z3aZGifRkfVZTUqd9Itq0aSi +w3RM12Ll95P9ZEQsWirtAh1XFB1UUn5AnkeBOJN7iY6HvjFdgsj+M21cunGi +mI4T0gKMa01kPvyGioIq6Fi3buz2CrJfUXj2TNtGOrY4OjUI1BNw0frtxrlm +cn3hl3R075L18iIx6fZjOrov9rH3+o8AHUGiVaObjo5HjY8W1pL9wFPZR+QT +HZ0eyIdIVBGwc3osqWUJA7sr1tc68cg8RGyV+yDFQMn3wZt0K8h6/dJfJkRh +oBh9qcmScgKKB5p6LFQYuHlu3t76MgKG7p7WvmXKwCP/uq5OlhCwOo3Vd2kT +A/eFpsyvvEDmc+5GaP0WBo4phWSvP0/2jxgVocHtDNwf9yr0zzkC0oPFdCnR +DLStOCljcpaABqfBlOPpDJwS1PbYl0XeD1LJegmVDPQuzFu+OY0AgaMT93Nu +M7BNY3xrewq530I7vG/XMvAz464E8wABIRPuaWMPGJjwUeTq7D7yPPvUBrb1 +M7Cwd7Gm/x7y/s1vOegppILBsGUuYQcBv1cuHdJZq4LCv1zMlJwJmLyokGzk +rYKy3Uu7VRwJGJdQV2NtUsFzq3OYGvbk+f1i7bDeroIKujZrVa3J+7A2cNI7 +UQUZb3doTJmT9et0Rzy9WAVjpk7ULVhJ5i3ED95MqODd1gN1zxeQ9V92veDM +GVXUuJ3y7dAtPgzQy/JtzqvixLO0J7N8PsSfKc0bz1dFiXgLhwgeH+4kl1xw +L1VFPYnl8m5lfDD0KsgRr1NF4hubNV7AhxXCpzIPvlbFzgr1P61H+SC3KSEp +RlsN242cz93dxIcxKUf/dY1qmCS0AjTm8eFdhv+6SBENPDX4SuTIskpw+BHr +8N5UE/uL+wmeBg++BS6Murl/OZ6Sf9l9Uaac/F+XFzzUuAJt9qwYcHpUBlJP +NI7zfmhhVQGtqze3FJTSK9aYmmojX/ytzTv2FchZyVoqvU0H/wWHunWLFcMj +BUuTX1m6eDN3sXrRVCGwlRoz9Xr00ITw4Vg9LQBxocLogAP6+DWxQWlex0Wg +JtM4GzQMUGQ0RNzg9zkQVfe57f7QADlC4MlJPgO63GUVsb6GKC7jUet+7CRE +Dkk1OQoY4c3FXRsYpZnw41fGWoccI9x/SeLFgf0ZYKfXnOugY4wj9Oh8V8d0 +uPvL/O9UuzGqeUGqtF0qhGkb9ncEmeB/hvlzP+cnA3dkS9cGUVPknOl/Xvoz +AWzUKC5LCk3xeuLeE+HysbA86cieRiYThxPy7lWIREGdebGwM5uJhH1qdfxU +JKyZqs/u5jDRMm67vdvHSNgTNnH9kyUTr0vNk2Y8jIQWH//X4s5MtCm35jse +ioRglqnjRn8m/hfn29kgGgmlP18rjqczUUmw46q4fARoBbHq1fuZeOhsz/rW +y2FwQsX1T8pLJsqB/rxzR8JgfHizyZshJpavVHWIjwiDu94ZZXlvmfheM+ZE +BISB+5rhs/Lfmeh28eaowctQiDNPCxcVMMOV7n/ejlFCoUWyg/Fd3QybFCWn +dfJDIOhucOrNCDO0klT/ce5lMIyEfom1iTbDwVCNS80PgmGP8s6QnhgzLF5X +6C1cEQxH9u5yn04wQ/c3p+5UJQcDjx1D5xw0w6en/r2Z0AyGmdspdU25Zqhc +9tKrIXYbZFfkjT9vMkNN+TxnB7WtUF/QtWVMloWnq6Jsu8oD4ZUzY1MMhYXz +PsxlpV4IBIHfoRv+KrDwifGZG1ZHAmGVm4irMJ2FC0dTdEeCAqF5Hpu5TIuF +B5VDnH4pB0Lb5nxRSwsWUjR88m5lboZ+tR3lmVtZaF9u9qIvKQDGr/6b0rvD +wlAf+1I96U3wYZ1tweFqFt5r2+0WNOUHffOP2b+tZSHTd1crb8APav0Vzp1p +YOFeh7rR9CI/OEAxYc+2snBkQ+NpDtMPlqbv2PvoJQs7PrvIFvv7gva2boEg +QTaGq+UKKTZthED1MtFcFzaarZukVDR5QfwDvx0aa9g4sGL+D6EyL8gMknrM +d2ejRv6l5LBsL6grjst4vJ6N1742XUgN8AIZDXuJ2QA2askLjPAFvKBZ472M +fwwb5ztzDBdZrQet5TS6Rj4bHQVXXzLtXQtjWidN+aNs5BwNmuSwPaCvDW2k +f7HRvKxorEfTAxrCRjyiJ9i4tpaelyTrAcf5DhGmf9jYsevQoOCYO2ixBa7X +CJlj1Fhwzb2r7rDZIZTRJGeO/1moqNIU3aFrm93iLo45enRnXRITc4Oqor+v +J9LN8c5x/pPrWq5gahU95XjUHOViskMuL3GFW6+/LS44Zo42yZFKxKgL8KlD +TMdsc7QqndupfMcFruc0HMs7b47ZnsvvK9q4QEFGGsuu3BwVeJ7WFUHOcDha +Iiun0xyHQy4mElWO4G2tiuZUDg7xwow2F9rBbNdC8SY6B7fW9/yVP2wHBUEj +A46qHPwWPa73YZcdfDhYHeu9nIM93HOHH3PtILJ1dUWcIQelN8W13um3hSOu +e6lVthxsa/cYnr/MFmq8umeMd3Ewib/a4mOJNfh+rnlUF8HB0nPP3qdkWoNA +fEGOdTQH06zqU03jrcH2fIixZxwHr/xp8x10sYbng/N2RqVwUASeROhNWsGX +zboDlWc5+GIqfbzL0QoUQw9V6zZwMCdFJadEaBUc/7fV5GgjB7vVTzfqj1mC +YLZt5cf7HPx7P4rSNmQJX24Llxa0cvBM9CFx0xpLqBFIzZHq5GAzNTOvO8IS +vE8lxU6+56A17Qwy3yHk1MaZ3BXjIotrO+N0DWCx64ZKBXEuDpR8XR9zGCDp +lZlO7FIu+sy5lNcHAwQLT6vpy3JxdDr6XbkmAHN1jEwhlYtm192uzZRYQM+b +yF9pBlxkbMjZDWVckF20s9JlPReHs9R8b7aaQ5FVYvzoBi7qdgqHrCw1B8PE +41Ynfbi45+cc80G6ObiO8rr7ArjoUq2c4W9vDgd7Jn4H7uQi2/RrhmErG6YL +96+KT+aitQOnSbODBf3mJztLyrj4V9Tqv/jfTAjeXXTBoZyL9avOLVo8yITJ +8ltB33hcPK9M0a1rYIKUSt+UwW0uVlCGk/akM8FpobLSfw1cTJGYVvRbxoS6 +rpItnd1cbNDyL21CU3AUr9KJ6ePitobGS8YaptBn1zpJGSD3Z9iuoFHMFMZr +vqb7veKi9q6vFia9JqBzSf/G5y9cXPBndixilwnU9VvGZHzn4vsCs0Uta03A +UcYD9Ea5uL7M1YHNMYGth3Z3RE9wMdxUsT1S1ATGGw7myk9z8VK85KDZqDEc ++HM2sOYPFzOPbS5W6DWGpcal2r6z5Pp5H8Qod40hL7Rm4t8/LsrkZkzoFxvD +/wCJMdsR "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -8023,136 +8177,134 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK +1:eJwV1nk8VN8bB3CRJEX2yTKLtWTfxowZzyP7WpZKQiSlRLYIKUKpVGiTCgkl +xZjbYvtGlCgpWSO074myVeh3f3/d1/uPc+6553ye51zG5l3uQYICAgKseQIC +/39ODrXeVztaZJFtcMRQLc7GoiuPEmfZdwASbwk+y+KrAso+3Uzpy4bRHG/9 +LXwjiFlzrVeorxA8057Ps+ZbgeSIfPbvXj7oPF8WLs73gOE6113jvY1Qoce8 +51sZCLZqXwbHep/D0LrcReXlUfC7l3l6tPcNHPsyZjZzOQWarK4UdRT+gocD +W7WkbU+B0nD1h83as+BuqbzE/sZFkNm56ZqIlRAmyH++P2h0GbINbGtd1y5E +KabrwPbTV+BFjn7D2NIluOPfo6hh2zI4WrT/qeAySayLlZAZbS0HR+PtUrKq +krjW/YBucU85LLzvvlZTRxJXWneWur0th9S36gNOlpJ40mtHdeZMOexVaftw +arskhrS2/i7RrYCwAsqcRo0k7uN7TRlkVYDbhUptp41SONd3kPNCkwfyp94e +PnlRGqd8h+5M9fGAsvJW6nSJNLI/ukm+HOSBQuPB/b48aSz9sGJ33RseUEdX +7NZsksZZi4YNEd94oO4c7l/7SRq/Lfh6sOwfD4zmz5q+NZLBaZVtv/3VK2F1 +tNw7w0cyeH/t62dtoZWwRuzT0NlOGbQUiIwziKwE98LqFzMvZfBChYJydkwl +rHvm87T5hwzCP31Pu/2V4Kt9ucZbVhbvvNePTc6shJB3elkH/GVRFPZYGfMr +4ZCng8XzSVnMdyp9mfWzEhRutisIzpPDtfli0q2TlVAu7TllICaHZm1NqX// +VELPcz9eFk0OGa64zF2ID2pu0Spu9nIo7LtcoFmaD40u+QuenZPDDq3I3BYj +PszaTrQ/4cijye4ZKbNwPmSWxJfN2srjM1vOlp4ocvwCgXQdN3l8LCbzfVcs +H5wfLLI8FiSPCgcvFJ/ax4dcKzrhfFwesyZ/84sy+GCGTmcfD8vjAeEW5+Er +fIhiXdrUeoCCqx0aPev7+eBYID7ulEHBOuEz6VmDfFAR2ZvefpqCVdflTm96 +xYdnXesqO69SsGvij9mP93zQDV8sNNROwYVTV/gvR/nwqSS25KfCMvyio1s8 +KkyAj4zrd0ViGfasOpI5p02AUUJtcl7dMtTmbvF31iNg0ZvlcozmZWg2ckbq +jAEB1RVCoPFiGZpmXqApmxIg51Sdqf9vGcb8zv7424KAZ8lqxjZOCph5nnpi +ZDUB1j/+xIe9VUDv3RfTHoYREGd/SuveNwXUbPQ8cDicgPJLOv3Skwq4XUT/ +nF0kARRPf1b1QkUcGYmVr9pNwLeqB1NCuoroMZITtGMvAScPZEaf26OIXKuj +zTKHCWgZWKH2LVkR2612X805QsCMcVOnxVFFFNS9eoOSQcDWjxOG7y6S4xt8 +1JacIIDtvHFMt0kRqVHhXQ9PEfBGViPs/hIlLPt0oz01nwD5XfXK8vJK+EzE +3OBxAQHOLV5PttOVUHo25N6SQgJuxx/VljBSwtiLcaGHigg4Mjz6ZYOXEhLH +m0VcSgkwLK3d9qNQCRkzi98z+ARsE1wrv+q6EvbzH8SsJAi4sHGk+dQtJTRN +LbU0uEnAAnGGBruFHB84k2Zwm4D+yIPvUr8rocRDj6H5NQQkc9wCFMyU8Y7E +hcSpBgLs/fJ+MlcpY3tEoVPPPQLEk76mrHVWRsmA3bd5jeT8TWklmf7K+Avu +bvW6T0CVY83XBYeVsfPB4OqohwTs3ymSqHZSGXvvgIpeCwG2xz3FV11Uxtu/ +JHI/kO7qGNFPrFTG5ITgffaPCBj1Uo359UIZC2vtWX1tBNyJDxeRfKeMnmkB +6yKeELDvwn85uiPKmGH0mbGgnYDFr9bXbhek4g/L1y0qTwnonFfsfGgxFc/j +5ZJrpHNVfw4WyVGR7xfL1H1GgOa2DIFXWlTUFBSNXd5BwEj6i6xZYyq2XVRd +nk/65jUNVUWgIqQsypJ8TsCqkQabdR5UPD2x4MRn0qJLxXujfEmPpGqs7iTz +Z7AxOGsbFUNFCuJ5pP12TxxpS6DipuFjvlu7CFA/u0rpSxoVtSy6Rmq6/p+v +EzdEMqko9yfPUqybAKL/pYV6LhX3eK9cv550/MyKZ6uKqNgsUqWfT9qSGhvg +X07FrYvSnr4hvRDv/0ysIr+vtdNYpYeA0yl+stVtVPw8Iuh1irRPcVlJTw8V +meM7KQ9JqzycZo6/oqLvz5CiCdKfP9m0Sn6lIk/BfpbWSwBv0UlvvQkqfpx0 +VLMlHav96qvzP9Lb6hWCSVu46iTuEKUhr2jsdRpp4fB48XRpGrqz9BLySbdl +PcwvVqZhk/DDjzdJnyRkDJo0afiAI7qimbR3d0DjKwMaNm+2w07SjKlyjzlz +GnY5d+m+JP2JMvNO0ZaGAbT5k69IV7AdYlhraOjhon32NekYnzMi671pWH3m +svQQac6+tznRW8j5RRp39pAWKtDXyg6jYenUq8uPSD+6l1hbsYeG4SIba2pI +Z7595PzkAA2/0jMqS0ivF6YMfcmgYfrujiPHSVM1g3YtPEtDw8TDdpGk39vz +BTQu0XDFhPRnN9LXd/zLsiqj4bzhjnAd0lEZzqoBt2jovF/91XzS7PJzN/fV +07DAJ9Ksj9xf69722ZEW8ns8rgxdI+0qMN9u03MaBh7Pm4oj7bWClfl0gIbj +HQmpNqQD3cNewHvyfZ2BB5eQDku4rMIboeG06d65DvK89xT1hdCnaRiZ9fV7 +NmnbBMb+JGE6+jDCmItIP5aou2y2iI4aqp0nG8h8rSla1zIqTsdmvuHOKNIb +nxyVDKDQcY3RidPtZD7DaZOXLVfSMesZ76s3mecJIrPltx4dj77rsZ8g8x9v +v/J7pTEdd2bvWJlBOi3C31TFgo6WG4rTKsj6yW161CLoRsdV+9V4bWT90byC +vtespeMd0VBvJ9JF3/5JRnnTcXrD05PNZL1WyJpsfBtIx/6/D6v4ZD3f35b/ +vSmGjmmWC0cCyHp3mGFJ7U2g49jwWaMHrQS0Z3aZGifRkfVZTUqd9Itq0aSi +w3RM12Ll95P9ZEQsWirtAh1XFB1UUn5AnkeBOJN7iY6HvjFdgsj+M21cunGi +mI4T0gKMa01kPvyGioIq6Fi3buz2CrJfUXj2TNtGOrY4OjUI1BNw0frtxrlm +cn3hl3R075L18iIx6fZjOrov9rH3+o8AHUGiVaObjo5HjY8W1pL9wFPZR+QT +HZ0eyIdIVBGwc3osqWUJA7sr1tc68cg8RGyV+yDFQMn3wZt0K8h6/dJfJkRh +oBh9qcmScgKKB5p6LFQYuHlu3t76MgKG7p7WvmXKwCP/uq5OlhCwOo3Vd2kT +A/eFpsyvvEDmc+5GaP0WBo4phWSvP0/2jxgVocHtDNwf9yr0zzkC0oPFdCnR +DLStOCljcpaABqfBlOPpDJwS1PbYl0XeD1LJegmVDPQuzFu+OY0AgaMT93Nu +M7BNY3xrewq530I7vG/XMvAz464E8wABIRPuaWMPGJjwUeTq7D7yPPvUBrb1 +M7Cwd7Gm/x7y/s1vOegppILBsGUuYQcBv1cuHdJZq4LCv1zMlJwJmLyokGzk +rYKy3Uu7VRwJGJdQV2NtUsFzq3OYGvbk+f1i7bDeroIKujZrVa3J+7A2cNI7 +UQUZb3doTJmT9et0Rzy9WAVjpk7ULVhJ5i3ED95MqODd1gN1zxeQ9V92veDM +GVXUuJ3y7dAtPgzQy/JtzqvixLO0J7N8PsSfKc0bz1dFiXgLhwgeH+4kl1xw +L1VFPYnl8m5lfDD0KsgRr1NF4hubNV7AhxXCpzIPvlbFzgr1P61H+SC3KSEp +RlsN242cz93dxIcxKUf/dY1qmCS0AjTm8eFdhv+6SBENPDX4SuTIskpw+BHr +8N5UE/uL+wmeBg++BS6Murl/OZ6Sf9l9Uaac/F+XFzzUuAJt9qwYcHpUBlJP +NI7zfmhhVQGtqze3FJTSK9aYmmojX/ytzTv2FchZyVoqvU0H/wWHunWLFcMj +BUuTX1m6eDN3sXrRVCGwlRoz9Xr00ITw4Vg9LQBxocLogAP6+DWxQWlex0Wg +JtM4GzQMUGQ0RNzg9zkQVfe57f7QADlC4MlJPgO63GUVsb6GKC7jUet+7CRE +Dkk1OQoY4c3FXRsYpZnw41fGWoccI9x/SeLFgf0ZYKfXnOugY4wj9Oh8V8d0 +uPvL/O9UuzGqeUGqtF0qhGkb9ncEmeB/hvlzP+cnA3dkS9cGUVPknOl/Xvoz +AWzUKC5LCk3xeuLeE+HysbA86cieRiYThxPy7lWIREGdebGwM5uJhH1qdfxU +JKyZqs/u5jDRMm67vdvHSNgTNnH9kyUTr0vNk2Y8jIQWH//X4s5MtCm35jse +ioRglqnjRn8m/hfn29kgGgmlP18rjqczUUmw46q4fARoBbHq1fuZeOhsz/rW +y2FwQsX1T8pLJsqB/rxzR8JgfHizyZshJpavVHWIjwiDu94ZZXlvmfheM+ZE +BISB+5rhs/Lfmeh28eaowctQiDNPCxcVMMOV7n/ejlFCoUWyg/Fd3QybFCWn +dfJDIOhucOrNCDO0klT/ce5lMIyEfom1iTbDwVCNS80PgmGP8s6QnhgzLF5X +6C1cEQxH9u5yn04wQ/c3p+5UJQcDjx1D5xw0w6en/r2Z0AyGmdspdU25Zqhc +9tKrIXYbZFfkjT9vMkNN+TxnB7WtUF/QtWVMloWnq6Jsu8oD4ZUzY1MMhYXz +PsxlpV4IBIHfoRv+KrDwifGZG1ZHAmGVm4irMJ2FC0dTdEeCAqF5Hpu5TIuF +B5VDnH4pB0Lb5nxRSwsWUjR88m5lboZ+tR3lmVtZaF9u9qIvKQDGr/6b0rvD +wlAf+1I96U3wYZ1tweFqFt5r2+0WNOUHffOP2b+tZSHTd1crb8APav0Vzp1p +YOFeh7rR9CI/OEAxYc+2snBkQ+NpDtMPlqbv2PvoJQs7PrvIFvv7gva2boEg +QTaGq+UKKTZthED1MtFcFzaarZukVDR5QfwDvx0aa9g4sGL+D6EyL8gMknrM +d2ejRv6l5LBsL6grjst4vJ6N1742XUgN8AIZDXuJ2QA2askLjPAFvKBZ472M +fwwb5ztzDBdZrQet5TS6Rj4bHQVXXzLtXQtjWidN+aNs5BwNmuSwPaCvDW2k +f7HRvKxorEfTAxrCRjyiJ9i4tpaelyTrAcf5DhGmf9jYsevQoOCYO2ixBa7X +CJlj1Fhwzb2r7rDZIZTRJGeO/1moqNIU3aFrm93iLo45enRnXRITc4Oqor+v +J9LN8c5x/pPrWq5gahU95XjUHOViskMuL3GFW6+/LS44Zo42yZFKxKgL8KlD +TMdsc7QqndupfMcFruc0HMs7b47ZnsvvK9q4QEFGGsuu3BwVeJ7WFUHOcDha +Iiun0xyHQy4mElWO4G2tiuZUDg7xwow2F9rBbNdC8SY6B7fW9/yVP2wHBUEj +A46qHPwWPa73YZcdfDhYHeu9nIM93HOHH3PtILJ1dUWcIQelN8W13um3hSOu +e6lVthxsa/cYnr/MFmq8umeMd3Ewib/a4mOJNfh+rnlUF8HB0nPP3qdkWoNA +fEGOdTQH06zqU03jrcH2fIixZxwHr/xp8x10sYbng/N2RqVwUASeROhNWsGX +zboDlWc5+GIqfbzL0QoUQw9V6zZwMCdFJadEaBUc/7fV5GgjB7vVTzfqj1mC +YLZt5cf7HPx7P4rSNmQJX24Llxa0cvBM9CFx0xpLqBFIzZHq5GAzNTOvO8IS +vE8lxU6+56A17Qwy3yHk1MaZ3BXjIotrO+N0DWCx64ZKBXEuDpR8XR9zGCDp +lZlO7FIu+sy5lNcHAwQLT6vpy3JxdDr6XbkmAHN1jEwhlYtm192uzZRYQM+b +yF9pBlxkbMjZDWVckF20s9JlPReHs9R8b7aaQ5FVYvzoBi7qdgqHrCw1B8PE +41Ynfbi45+cc80G6ObiO8rr7ArjoUq2c4W9vDgd7Jn4H7uQi2/RrhmErG6YL +96+KT+aitQOnSbODBf3mJztLyrj4V9Tqv/jfTAjeXXTBoZyL9avOLVo8yITJ +8ltB33hcPK9M0a1rYIKUSt+UwW0uVlCGk/akM8FpobLSfw1cTJGYVvRbxoS6 +rpItnd1cbNDyL21CU3AUr9KJ6ePitobGS8YaptBn1zpJGSD3Z9iuoFHMFMZr +vqb7veKi9q6vFia9JqBzSf/G5y9cXPBndixilwnU9VvGZHzn4vsCs0Uta03A +UcYD9Ea5uL7M1YHNMYGth3Z3RE9wMdxUsT1S1ATGGw7myk9z8VK85KDZqDEc ++HM2sOYPFzOPbS5W6DWGpcal2r6z5Pp5H8Qod40hL7Rm4t8/LsrkZkzoFxvD +/wCJMdsR "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, + "PlotRange" -> {{0, 30}, {0., 0.07751283589123163}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8164,19 +8316,19 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, + "PlotRange" -> {{0, 30}, {0., 0.07751283589123163}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8190,135 +8342,133 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nc8Vv0bB3CRaMne7mFVHiPz5h6uy8wOFbIyMkqEJCNlRCqJNCSiQnmU -cZ+SVURDy9OQlRXVg5Cyqkf5nd9f9+v9et3ne87rXNfnug7db59zAC8PDw8u -4+H5/+/8wNOHyieLjVPP/econWth3HFZOtakOxlMPGLK5tuVACX+8ZPuPgPf -U9QetrXrQrTj31183Veh/lat6412MxCZkjrzs4sLvQNVzMj2rTDY6LBvtqsF -PEZenm166Q+WyuP937reQFqEOUXw+X742cU4N901DMuHzfcwmlOg1ex68eur -M/CmjIcy7XcW5AfrPvup/wYFf9FTHzsLQHzvzr8FzPjQ7xfjFtPhGpzRtmxw -2C6I310e1ry9fR16cjc1fxNei8WmtUFTu8vhZPGRf3hlRDBo2bHBsq8VYKO3 -W1RCSQStXXorAxcrQPCh8/b1GiKYUBrwXHZlJRwdUXlvayKCx+UO9gYrVsIh -xRefz+4WQYOZmxL52yohrEj6j2q9CH4+9XPe824lOOVXq9t6iCKf7MRBeVYV -SJ0dOZ5TIIZzl0WaD0xUgfRfd47+KBXDrnHbjR7fqkC2Je2IV5UYzhfE5bDn -q4AyvfHA+lYxzFgID55ZqgIVu3CfhlEx3Pacya8tVg26y38bjOiK4z61DTlf -DKthS5TkR51n4riatf6ie1I1OK4eHbjwVhyNVrNVmlKrwflqXc9inzgu2yVz -jXqiGlxeef7z+Ks4dq2uiuw4Uw1e6tfq3SUkMNdAz3VtcTWEfNTKTvaRwLVF -g2MNj6rh2DZr4zfzEpi5tWXDqhVckL3dLsu7TBK3Corw4CouVIhtW9BeLYla -wbyCEUJc6HzjXZVNlcRC4eEbDyW5oOwUpehkJYnxS/kbdNZzocW+cMWri5Jo -vEhfUNnMhd+Wc+0v2VLYeH9+fl8KF7JK48p/W0qh5FNm7upj5PUreNI1nKQw -aawl8OoJLtg9WmVyKkAKQe3+yQfZXMgzoxF2mVIYvevv+UeFXDBE2wvPB6VQ -Zs7V9996Luw3urLzabI0JjXYHjo1yQWbIqFZ2wxpnDcBHs9pLigKHEpvPyeN -Nt+ttqnOcOFVh0v12xvSWHgzPbTiBxc0w9fwDbRLY9ruyJAMPgJGSw+WfpeV -weG1l/45Ik2Ap7jDpBwhgzrJTp6WQIBufEPS5UYZ7Ff2CT9tQsCq4Q2S9Mcy -KCBR6t1hRkBdJR+o9shgVFPCcycrAiRt67I2Lcngp1v632WdCHiVpKxnYSuL -typMuj77EmD+9Vdc2IgsDmxvDghOJCDW6qzagwlZTC+yf6KcTEDFFY1esXlZ -HJqsYPWnECC9zceoTlAOGyqUdpoeI2Ci9tECn6Ycnhk9X9R/ioCc5KyoizFy -qFb46LRbHgFt7zcqTyTJ4fXlSf6dlwhY1Gt9a3xSDuuSYrc6FhAQ+O+czscC -ORxnXT9hWEQA087jm2arHBZzhoJ6SwgYllANe7hWHv3/k4jYVUWA1L4mBSkp -ebR98tSluJoAuza3l7tp8tjZ5ek/xCWgJu6k+jpdeRzTnpmxu0PAicHp8R1u -8lj2ZGTFjzoCmgxP5N30lceRwAyGTAMBs9lKNkt75PFRXddZg0YCvM1dyooT -5HFXqEN3wH0CdMoagr5elcf+wocXzrcQEMS7Xcr0pjyWm6eYXmwlIN9j6vHZ -O/JYcO47NfchASuE6KrMNnlsEuaJPvGYgN7ItI9HJ+Vxm+BQsckzApLYTr6y -hgpoWlvz4NcrAqy8L39nmCrg5Ufs4tevCRBK/JKy3U4Bxz5ayxe/Ic9vTS3N -8lFA1o0tr1kdBNTa1H9ZcVwBKQn1oQZdBBzZK5CgnKOAkgVUuXHSlpnbhEwL -FJD5cjDwYjcBHa+nNiVUK6Dl1EL/eA8B025K0TM9CnjYP33Pjj4C7saFC4h8 -VMB3NY1q46QP59/L1Zwiz3tw5Ex0PwFrhlwbdvNSMPp+kFfyAAFvl5XYHVtD -QVvGl5ZlgwTkKX3vL5ak4Pbw+o5DpNcHZfAMqVEwXnYlb+AQAVPpPdm/9Sio -X/Sd2kH69t+qSnJAQcO1i1OcDwSYTjVbuGylYF2yc8nyYQJWCgt17feioNQa -idO+pF9pewRnB1HQ7NCwZj1p7wNzJ17EU1C3MPec9wgBKhdM5cdTKUiX5935 -98j/+/H0LYEsCs6JxIx8I0309hmr5FFw1N9YWf8jAXGLG1+ZFlPwuVueYhRp -E8pBX58KCi7LezNYQVoQH35PqKWgn46W1yfS7b4iRy+1UFDs1M9LUp8IOJfi -LVH3goKRUYcKLEh7lpSXdnZScEF4uf8+0opPfjBmhygoNNo/eZb02KjFU5Ev -FBR47wY1pKtW5bhrzVHwq8ojt7ekD6oPfbFbomCwdxRrgrSxg0bCnpVUPBtZ -N8rzmQD+8DihdDEqLlwf9RUh/SL7SWGJAhXt81xvKJDOIcS1W9dTMZDpdU+F -tPs735YhbSqKvHS6upE0faFi6x8WFSfHMt3+71HpxY9yllR0jNv3QZl0JdM6 -2siRivK1W4zlSUd7nhdwdadinvqp8HWk2YdHcqN2UXFnZVrsH/L5+Io2qZ0J -o6JSQL77GOlnDxIaKmOomHlfS+IV6ayRZ3Yvk6moefDa31zSrvzSA+MZVGSe -9ZDPJk1ZH7BP8AIV9/rfCwkh/cmKy6N6hYpfY7XyTEjf3LOUbVZORTohUyZG -mllx8fbhJiri1sXQcrIe5l3tv6faqMi4+6/GAdIOPMs373xDxQT/Sg8WaX/n -sB74RMX9v2L575H1D4u/plg1RUXvqDcpMaRjirtDaD+oGL6VG7WJtGU8/Ugi -Pw1Tq+9xz5H99Xxd4zXDVTRcybHkNSPtWOzSNi1EQ1EL4acTZL96vDwp4itN -QysRjQf6pMOp89dM/qJhz4BsQgHZ/3NEVttPLRrWSTJvaJKOs/prslqPhqsl -WNsayfykRvgYKBrTkFrbqvuSzFde67M2XicaBjfa6D56TwDVLWCyfjsNZ/+8 -OMYkXTyxJLLfnYbpjauCbvaS9ZLQ9xjxp2Ggds2zVDLPD4MKJ1ujaZipPGG9 -jsy/9aKR6KF4Ghqa+Uvt7iT7N6vDQC+Rhrr212Ob3hHQU7cysfg4DflWVi7z -I+fJ1Ooo0dR8Gu50zjM7TM6f/UVCDM4VGg4KOb5vJOfTD70yj7kS8v1skhX9 -8Q9Zf++B4oBKGjqvofrtaif3QZUVw7KFhpb7EqvEnxNQYD7i8ecxDf8MBAcY -kvNOsSchseY5Db8nfWh1e0qABi/xVPUd+f/IV8mnn5D536bgKTBKQ4b7hMY7 -cp7u/fEtsW0tHZ83DAW0kPOZGREo+VmUjqpPZjGvnszneG85nzQdtZ5mWIeR -87zkfWunsSIdTbibx1fdJWDg/jn1OwZ0jIiXvSRJ7oMtqUbdV3bS0b3qj2Xs -dbL//twKbdpFxwOSZu3ipeS8iFbk699Nx/vfYgtvFhOQHrxaUzqKjhacRdXX -Vwhotu1PyUynI3+A7u9Jcn/piCZpxVfTcWdjsE/MaQJ4Ts49zK2hYzf9o28P -uf/a+fa41zTQccfzymcGGQSEzDmnfntERw/xip7P6WQ9u5XfB/XSMfGfKro8 -uV8lC9vStvEp4teNXUt9+wn4+ZfwgMZ2RWzwu+DwaBsB8wWySbruirj6WGZm -szO5r9apKBvtVMS7+evP1DqS9Zsx2mO+WxF1Csq/XLYj92WD/7x7giKGMkXl -LczJfNreFUovUURlJ2mJnzpkv4V4w/CcIrZM381fI0Tmu/xm0fnzSrhV85ef -fQMX3tPKCy0uKaHFmK13bS0X4s6XXZ4tVMK04ZkZWg0X7iaV5juXKaHUparZ -8Sou6LgV5Qo1KiH30usYv1IubOQ/m5X2QQlz9tFnh7K4ILkzPjFaXRlFpNRW -rN/FhW+iNj4uLcq4U2ipXGc5Fz5m+LhECqiiFXv5L65MNVh/PWj9yWA97tQQ -5bVVroIJf8H9t49swNAOEZ+GVRXk97wU77GWjRhx1s/rd0M5iL5Uzaz6qoZ8 -nlR3nuNlIJ9e6WhgoI7/Zgubj6lch9y/jITFgjQwVLXpyoXZYngma6I/k62J -H7Yke7UPXAWmfEuWVqcWJmQXbfO6UwRCfFejfJM34V8WvSF++QVASaKyd6hq -4+trH8r+eXgRVqp41jg/0UYMvVEm7nAeNDkylQe9dNDw30WeNZ45EDkg2mrD -o0t+H5yzOhaXBV9nMrZb5+oijiyu1N2QAZu1HudZa+ihZdfhgR0/j8H9GdZ/ -C+16+CI6Qz3wdwqEqev0vg7Qx5J168p1WxKBM7WrY8dKA5wQSn9JBhsslKXt -1141QBeZ5RddKqJhQ+KJmBYGAwUj6X3q5ZHQyCrht2My0EUU2tUvRYLjQtOZ -d2wGCl/ebmV4MhJiwuZujpowUKdLuDEiJBLaPH0+CNkx0PpsxEKoeiQEGxnY -ePgwULVqLCytKgLKvn+Qm01nYPP1Z0prH4SDWoBRk0ovA+95JB7YvDwMTis6 -/ErpY2B3RXVU5JdQmB300x8eYGBmYcJsxZtQuO+eUX55hIExqR6OnldCwdlx -8ILUJAP/OjoeeQxCIZaVGr6SxxB/4UNDqSN7oU3kNX1SxRA3rxmder8qBALu -Bx+9HWGIR3uLnf5zDoap0PGDFlGGqJb65nQyOxhiFPaGdEYbYqTdWKWcajCc -OLTP+Ue8Ie4eN92d8jMIqpjRNHaaId5szjy+/koQLNakNLbmGWKskFlH7Uwg -nKm8PPum1RDpQhM/uSUB0FTUseubhBGG9Y3dusX0hyE7+s5oaSN8IVl09NYG -f+D5GbrjP1kj3GLotaJR0h9MnQQc+GlG+FYm7ePyGT94vIzJkFEzwrKUoiXz -m37wwq9wpYmxEbZprPeOpvtBr/KeiqxAI3z1cuq7h6QvzN5YWtC6a4R/+jYZ -+Tl6w2cXy6LjdUa4SvKErJy+N3QvP2U10mCEpwV0M8ZkvKHBR/bi+WYjPOea -Nvp4xAuSpfWZv58aYfXMiqWkGC8QTt9z6FkfeX6cQNpkiSeoB73jCeBlYvl9 -B0emsAf4q5SvzLNnYs7PucgHVDeIe+S9R9WRiYphfaU5Am6QFSD6nOvMRGvG -pS3xX12hsSQ247krE4epss0nmlxBXNVq3W9fJr58xvK74eMKj1U/iftEM1Ft -R9DXV6UuoLaBSlMtZOLatY78Iabb4ZtajgF3mryfNmdFAuEM3S/QQmyGiTu+ -//s2/oozNIdNbY2aY6J9vqf0idPOkMm1jjD4xcQCoaLujhBnUGPy3KznY+EL -fLFIV3EGP+tQeqskC83jCmWy85ygI2jzmg42C+WJm6LRWY5QW/zfh7l0Fsoa -H2WI29mDgVnUgs1JFn5YSJ69rWUPdz5MrCk6xULlW/xeYWL2wKUMMGzOsHCj -1fxntfd2cDO3+dTlSyyUdo3obwuxg6KMVKPNFSysEZgIS8+2heNR67Jz37Jw -8IOR/MUpaxAUSy+dfMfCGfexQPV31pBWzdNo2s3C2/3yyp0N1nB06tvniT7y -PP7r1XuPW8Ph4A62yWcWrnYvYRerWEOk58XRsR8sFEvOd9D0swJ3cyVkUdi4 -OkrLlfnFEn53CAq10th4j3/j4Kk3llAUMPXeRomND05b7fpZZwmf0+oOum9g -41v9VRLSxy0h8umWylgdNmrrLe+P2GAJJxwOUWot2XjjVMr51BALqHd7t6i3 -j42GufilmNccvMbqnzVGsHHa9/WH1xNmwBNXlGsexcYQs1NB4l1mYHkpRG9b -LBsJqmFnT7kZvOlftnd/Chv7FgRZu1zMYNxP8331BTbyV9AUgypNQS70WJ1m -MxtzZgsWr4ebQOZSoP7JFjby/afNf8vbBHjPWFb/+5CNgzETIy12JjBew19W -9JSN2UoZE7SNJlDPczRX9C0b3wkcKSseRnA/m3hw/hMbxcSuj953Q8htiNW/ -v5qDyz9XyrZcMYY1DjuqZYU46Np/OvFlkjEkDhlqHBTmoNCzT7jgawzB/D+U -N0lw0LQ/IKRE0RgYW6LFr1I42BL9d/HuEg50DkfOpGpz8Paj8bb4KjZIrNpb -be/KwbWdN/zl+phQbJYQN72Dg+GXK6cPNjJBJyHTLMeTg382tybN5zPBYbrq -XbcvByfC72ju8GZCWufcT/+9HLT37dGqHjaCH1ePmMYlcfCjFz9f1jdD6GXl -vC0t52Dt28AKrfUMCD5QnG9dwcHuVdnTp1czYL7iTsBEFQcf993wEJo2AFHF -7gXtGg62OxQzAuoMwFZQQf5eMwf7+8R6DtobQGNH6a637zhoY3/1ilS8PtgI -1WpEd3Pw1fvFSTtffeje/HRe+j0HM3/z5F3erA+z9V/SvYc4uMXp45Xz4vqg -cWXTrbFxDjb5a+3trNSDxl6T6IxJDtrJ2ld9Oa8HNuJbQWuag58OK8XIH9aD -wGMHXkfNcfBIUrXqKzs9mG1Oy5P6wcGtAgldznp6kPzrgn/9Lw6e+LqhaFpO -D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK +1:eJwV1nk8VN8bB3CRJEX2yTKLtWTfxowZzyP7WpZKQiSlRLYIKUKpVGiTCgkl +xZjbYvtGlCgpWSO074myVeh3f3/d1/uPc+6553ye51zG5l3uQYICAgKseQIC +/39ODrXeVztaZJFtcMRQLc7GoiuPEmfZdwASbwk+y+KrAso+3Uzpy4bRHG/9 +LXwjiFlzrVeorxA8057Ps+ZbgeSIfPbvXj7oPF8WLs73gOE6113jvY1Qoce8 +51sZCLZqXwbHep/D0LrcReXlUfC7l3l6tPcNHPsyZjZzOQWarK4UdRT+gocD +W7WkbU+B0nD1h83as+BuqbzE/sZFkNm56ZqIlRAmyH++P2h0GbINbGtd1y5E +KabrwPbTV+BFjn7D2NIluOPfo6hh2zI4WrT/qeAySayLlZAZbS0HR+PtUrKq +krjW/YBucU85LLzvvlZTRxJXWneWur0th9S36gNOlpJ40mtHdeZMOexVaftw +arskhrS2/i7RrYCwAsqcRo0k7uN7TRlkVYDbhUptp41SONd3kPNCkwfyp94e +PnlRGqd8h+5M9fGAsvJW6nSJNLI/ukm+HOSBQuPB/b48aSz9sGJ33RseUEdX +7NZsksZZi4YNEd94oO4c7l/7SRq/Lfh6sOwfD4zmz5q+NZLBaZVtv/3VK2F1 +tNw7w0cyeH/t62dtoZWwRuzT0NlOGbQUiIwziKwE98LqFzMvZfBChYJydkwl +rHvm87T5hwzCP31Pu/2V4Kt9ucZbVhbvvNePTc6shJB3elkH/GVRFPZYGfMr +4ZCng8XzSVnMdyp9mfWzEhRutisIzpPDtfli0q2TlVAu7TllICaHZm1NqX// +VELPcz9eFk0OGa64zF2ID2pu0Spu9nIo7LtcoFmaD40u+QuenZPDDq3I3BYj +PszaTrQ/4cijye4ZKbNwPmSWxJfN2srjM1vOlp4ocvwCgXQdN3l8LCbzfVcs +H5wfLLI8FiSPCgcvFJ/ax4dcKzrhfFwesyZ/84sy+GCGTmcfD8vjAeEW5+Er +fIhiXdrUeoCCqx0aPev7+eBYID7ulEHBOuEz6VmDfFAR2ZvefpqCVdflTm96 +xYdnXesqO69SsGvij9mP93zQDV8sNNROwYVTV/gvR/nwqSS25KfCMvyio1s8 +KkyAj4zrd0ViGfasOpI5p02AUUJtcl7dMtTmbvF31iNg0ZvlcozmZWg2ckbq +jAEB1RVCoPFiGZpmXqApmxIg51Sdqf9vGcb8zv7424KAZ8lqxjZOCph5nnpi +ZDUB1j/+xIe9VUDv3RfTHoYREGd/SuveNwXUbPQ8cDicgPJLOv3Skwq4XUT/ +nF0kARRPf1b1QkUcGYmVr9pNwLeqB1NCuoroMZITtGMvAScPZEaf26OIXKuj +zTKHCWgZWKH2LVkR2612X805QsCMcVOnxVFFFNS9eoOSQcDWjxOG7y6S4xt8 +1JacIIDtvHFMt0kRqVHhXQ9PEfBGViPs/hIlLPt0oz01nwD5XfXK8vJK+EzE +3OBxAQHOLV5PttOVUHo25N6SQgJuxx/VljBSwtiLcaGHigg4Mjz6ZYOXEhLH +m0VcSgkwLK3d9qNQCRkzi98z+ARsE1wrv+q6EvbzH8SsJAi4sHGk+dQtJTRN +LbU0uEnAAnGGBruFHB84k2Zwm4D+yIPvUr8rocRDj6H5NQQkc9wCFMyU8Y7E +hcSpBgLs/fJ+MlcpY3tEoVPPPQLEk76mrHVWRsmA3bd5jeT8TWklmf7K+Avu +bvW6T0CVY83XBYeVsfPB4OqohwTs3ymSqHZSGXvvgIpeCwG2xz3FV11Uxtu/ +JHI/kO7qGNFPrFTG5ITgffaPCBj1Uo359UIZC2vtWX1tBNyJDxeRfKeMnmkB +6yKeELDvwn85uiPKmGH0mbGgnYDFr9bXbhek4g/L1y0qTwnonFfsfGgxFc/j +5ZJrpHNVfw4WyVGR7xfL1H1GgOa2DIFXWlTUFBSNXd5BwEj6i6xZYyq2XVRd +nk/65jUNVUWgIqQsypJ8TsCqkQabdR5UPD2x4MRn0qJLxXujfEmPpGqs7iTz +Z7AxOGsbFUNFCuJ5pP12TxxpS6DipuFjvlu7CFA/u0rpSxoVtSy6Rmq6/p+v +EzdEMqko9yfPUqybAKL/pYV6LhX3eK9cv550/MyKZ6uKqNgsUqWfT9qSGhvg +X07FrYvSnr4hvRDv/0ysIr+vtdNYpYeA0yl+stVtVPw8Iuh1irRPcVlJTw8V +meM7KQ9JqzycZo6/oqLvz5CiCdKfP9m0Sn6lIk/BfpbWSwBv0UlvvQkqfpx0 +VLMlHav96qvzP9Lb6hWCSVu46iTuEKUhr2jsdRpp4fB48XRpGrqz9BLySbdl +PcwvVqZhk/DDjzdJnyRkDJo0afiAI7qimbR3d0DjKwMaNm+2w07SjKlyjzlz +GnY5d+m+JP2JMvNO0ZaGAbT5k69IV7AdYlhraOjhon32NekYnzMi671pWH3m +svQQac6+tznRW8j5RRp39pAWKtDXyg6jYenUq8uPSD+6l1hbsYeG4SIba2pI +Z7595PzkAA2/0jMqS0ivF6YMfcmgYfrujiPHSVM1g3YtPEtDw8TDdpGk39vz +BTQu0XDFhPRnN9LXd/zLsiqj4bzhjnAd0lEZzqoBt2jovF/91XzS7PJzN/fV +07DAJ9Ksj9xf69722ZEW8ns8rgxdI+0qMN9u03MaBh7Pm4oj7bWClfl0gIbj +HQmpNqQD3cNewHvyfZ2BB5eQDku4rMIboeG06d65DvK89xT1hdCnaRiZ9fV7 +NmnbBMb+JGE6+jDCmItIP5aou2y2iI4aqp0nG8h8rSla1zIqTsdmvuHOKNIb +nxyVDKDQcY3RidPtZD7DaZOXLVfSMesZ76s3mecJIrPltx4dj77rsZ8g8x9v +v/J7pTEdd2bvWJlBOi3C31TFgo6WG4rTKsj6yW161CLoRsdV+9V4bWT90byC +vtespeMd0VBvJ9JF3/5JRnnTcXrD05PNZL1WyJpsfBtIx/6/D6v4ZD3f35b/ +vSmGjmmWC0cCyHp3mGFJ7U2g49jwWaMHrQS0Z3aZGifRkfVZTUqd9Itq0aSi +w3RM12Ll95P9ZEQsWirtAh1XFB1UUn5AnkeBOJN7iY6HvjFdgsj+M21cunGi +mI4T0gKMa01kPvyGioIq6Fi3buz2CrJfUXj2TNtGOrY4OjUI1BNw0frtxrlm +cn3hl3R075L18iIx6fZjOrov9rH3+o8AHUGiVaObjo5HjY8W1pL9wFPZR+QT +HZ0eyIdIVBGwc3osqWUJA7sr1tc68cg8RGyV+yDFQMn3wZt0K8h6/dJfJkRh +oBh9qcmScgKKB5p6LFQYuHlu3t76MgKG7p7WvmXKwCP/uq5OlhCwOo3Vd2kT +A/eFpsyvvEDmc+5GaP0WBo4phWSvP0/2jxgVocHtDNwf9yr0zzkC0oPFdCnR +DLStOCljcpaABqfBlOPpDJwS1PbYl0XeD1LJegmVDPQuzFu+OY0AgaMT93Nu +M7BNY3xrewq530I7vG/XMvAz464E8wABIRPuaWMPGJjwUeTq7D7yPPvUBrb1 +M7Cwd7Gm/x7y/s1vOegppILBsGUuYQcBv1cuHdJZq4LCv1zMlJwJmLyokGzk +rYKy3Uu7VRwJGJdQV2NtUsFzq3OYGvbk+f1i7bDeroIKujZrVa3J+7A2cNI7 +UQUZb3doTJmT9et0Rzy9WAVjpk7ULVhJ5i3ED95MqODd1gN1zxeQ9V92veDM +GVXUuJ3y7dAtPgzQy/JtzqvixLO0J7N8PsSfKc0bz1dFiXgLhwgeH+4kl1xw +L1VFPYnl8m5lfDD0KsgRr1NF4hubNV7AhxXCpzIPvlbFzgr1P61H+SC3KSEp +RlsN242cz93dxIcxKUf/dY1qmCS0AjTm8eFdhv+6SBENPDX4SuTIskpw+BHr +8N5UE/uL+wmeBg++BS6Murl/OZ6Sf9l9Uaac/F+XFzzUuAJt9qwYcHpUBlJP +NI7zfmhhVQGtqze3FJTSK9aYmmojX/ytzTv2FchZyVoqvU0H/wWHunWLFcMj +BUuTX1m6eDN3sXrRVCGwlRoz9Xr00ITw4Vg9LQBxocLogAP6+DWxQWlex0Wg +JtM4GzQMUGQ0RNzg9zkQVfe57f7QADlC4MlJPgO63GUVsb6GKC7jUet+7CRE +Dkk1OQoY4c3FXRsYpZnw41fGWoccI9x/SeLFgf0ZYKfXnOugY4wj9Oh8V8d0 +uPvL/O9UuzGqeUGqtF0qhGkb9ncEmeB/hvlzP+cnA3dkS9cGUVPknOl/Xvoz +AWzUKC5LCk3xeuLeE+HysbA86cieRiYThxPy7lWIREGdebGwM5uJhH1qdfxU +JKyZqs/u5jDRMm67vdvHSNgTNnH9kyUTr0vNk2Y8jIQWH//X4s5MtCm35jse +ioRglqnjRn8m/hfn29kgGgmlP18rjqczUUmw46q4fARoBbHq1fuZeOhsz/rW +y2FwQsX1T8pLJsqB/rxzR8JgfHizyZshJpavVHWIjwiDu94ZZXlvmfheM+ZE +BISB+5rhs/Lfmeh28eaowctQiDNPCxcVMMOV7n/ejlFCoUWyg/Fd3QybFCWn +dfJDIOhucOrNCDO0klT/ce5lMIyEfom1iTbDwVCNS80PgmGP8s6QnhgzLF5X +6C1cEQxH9u5yn04wQ/c3p+5UJQcDjx1D5xw0w6en/r2Z0AyGmdspdU25Zqhc +9tKrIXYbZFfkjT9vMkNN+TxnB7WtUF/QtWVMloWnq6Jsu8oD4ZUzY1MMhYXz +PsxlpV4IBIHfoRv+KrDwifGZG1ZHAmGVm4irMJ2FC0dTdEeCAqF5Hpu5TIuF +B5VDnH4pB0Lb5nxRSwsWUjR88m5lboZ+tR3lmVtZaF9u9qIvKQDGr/6b0rvD +wlAf+1I96U3wYZ1tweFqFt5r2+0WNOUHffOP2b+tZSHTd1crb8APav0Vzp1p +YOFeh7rR9CI/OEAxYc+2snBkQ+NpDtMPlqbv2PvoJQs7PrvIFvv7gva2boEg +QTaGq+UKKTZthED1MtFcFzaarZukVDR5QfwDvx0aa9g4sGL+D6EyL8gMknrM +d2ejRv6l5LBsL6grjst4vJ6N1742XUgN8AIZDXuJ2QA2askLjPAFvKBZ472M +fwwb5ztzDBdZrQet5TS6Rj4bHQVXXzLtXQtjWidN+aNs5BwNmuSwPaCvDW2k +f7HRvKxorEfTAxrCRjyiJ9i4tpaelyTrAcf5DhGmf9jYsevQoOCYO2ixBa7X +CJlj1Fhwzb2r7rDZIZTRJGeO/1moqNIU3aFrm93iLo45enRnXRITc4Oqor+v +J9LN8c5x/pPrWq5gahU95XjUHOViskMuL3GFW6+/LS44Zo42yZFKxKgL8KlD +TMdsc7QqndupfMcFruc0HMs7b47ZnsvvK9q4QEFGGsuu3BwVeJ7WFUHOcDha +Iiun0xyHQy4mElWO4G2tiuZUDg7xwow2F9rBbNdC8SY6B7fW9/yVP2wHBUEj +A46qHPwWPa73YZcdfDhYHeu9nIM93HOHH3PtILJ1dUWcIQelN8W13um3hSOu +e6lVthxsa/cYnr/MFmq8umeMd3Ewib/a4mOJNfh+rnlUF8HB0nPP3qdkWoNA +fEGOdTQH06zqU03jrcH2fIixZxwHr/xp8x10sYbng/N2RqVwUASeROhNWsGX +zboDlWc5+GIqfbzL0QoUQw9V6zZwMCdFJadEaBUc/7fV5GgjB7vVTzfqj1mC +YLZt5cf7HPx7P4rSNmQJX24Llxa0cvBM9CFx0xpLqBFIzZHq5GAzNTOvO8IS +vE8lxU6+56A17Qwy3yHk1MaZ3BXjIotrO+N0DWCx64ZKBXEuDpR8XR9zGCDp +lZlO7FIu+sy5lNcHAwQLT6vpy3JxdDr6XbkmAHN1jEwhlYtm192uzZRYQM+b +yF9pBlxkbMjZDWVckF20s9JlPReHs9R8b7aaQ5FVYvzoBi7qdgqHrCw1B8PE +41Ynfbi45+cc80G6ObiO8rr7ArjoUq2c4W9vDgd7Jn4H7uQi2/RrhmErG6YL +96+KT+aitQOnSbODBf3mJztLyrj4V9Tqv/jfTAjeXXTBoZyL9avOLVo8yITJ +8ltB33hcPK9M0a1rYIKUSt+UwW0uVlCGk/akM8FpobLSfw1cTJGYVvRbxoS6 +rpItnd1cbNDyL21CU3AUr9KJ6ePitobGS8YaptBn1zpJGSD3Z9iuoFHMFMZr +vqb7veKi9q6vFia9JqBzSf/G5y9cXPBndixilwnU9VvGZHzn4vsCs0Uta03A +UcYD9Ea5uL7M1YHNMYGth3Z3RE9wMdxUsT1S1ATGGw7myk9z8VK85KDZqDEc ++HM2sOYPFzOPbS5W6DWGpcal2r6z5Pp5H8Qod40hL7Rm4t8/LsrkZkzoFxvD +/wCJMdsR "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07773075306777268}}, + "PlotRange" -> {{0, 30}, {0., 0.07751283589123163}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8329,6 +8479,7 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8356,7 +8507,8 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07773075306777268}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07751283589123163}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8364,9 +8516,8 @@ D4T1ytS9fnMwGhcCyvj04HJo/dzSEnn/7SiU8EUX/gdnQxLK Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913298974454536`*^9}, - CellLabel-> - "Out[172]=",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] + CellChangeTimes->{3.9913298974454536`*^9, 3.994387778279649*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"311598dd-5f89-4613-b239-2f55db85f9c3"] }, Open ]], Cell[CellGroupData[{ @@ -8419,66 +8570,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[173]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], + "In[100]:=",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 173, 129, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298974999084`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8272165148704686`*^-163\\\", \ +RowBox[{\\\"\ +505518991860510123640143147290826802026352259296904996615670790081361\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"11\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0136605792106222330469781300859512072804761600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 17, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.994387778474134*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], +In[100]:=",ExpressionUUID->"dff970a8-c181-4f48-9e41-60b642fb5a5e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 130, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897510906*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.268561450001535`*^-166\\\", \ +RowBox[{\\\"\ +164243120455479739170682508554789627978361849045564433400431439697434\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3832218553116351696319446492554724542670438400000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 18, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.99438777848496*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], +In[100]:=",ExpressionUUID->"8e14a70d-dff9-4861-a0a1-3083fcc30c53"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 173, 131, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913298975189075`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.816508613265186`*^-169\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 19, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943877784936743`*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], +In[100]:=",ExpressionUUID->"5d2277ad-266b-440b-a2e7-3dccb1afca4e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 173, 132, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329897526905*^9}, +during this calculation.\"", 2, 100, 20, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913298974999084`*^9, 3.9943877785018873`*^9}, CellLabel-> "During evaluation of \ -In[173]:=",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], +In[100]:=",ExpressionUUID->"556a0b9c-cec3-4d65-9f15-9ccb73a8b30c"], -Cell[BoxData["9.77956849963325`"], "Output", - CellChangeTimes->{3.991329904262455*^9}, +Cell[BoxData["9.80695720493427`"], "Output", + CellChangeTimes->{3.991329904262455*^9, 3.99438783940301*^9}, CellLabel-> - "Out[173]=",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] + "Out[100]=",ExpressionUUID->"7dc89893-1a30-4fcc-aa86-2ffcff999a6c"] }, Open ]], Cell[CellGroupData[{ @@ -8545,68 +8706,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489049186344`*^9, - 3.991848908595253*^9}},ExpressionUUID->"eb852908-4d60-c84e-80d9-\ -a57fd4094f56"], + CellChangeTimes->{{3.9918489049186344`*^9, 3.991848908595253*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 174, 133, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904300501*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.482022779157694`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 101, 21, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.9943878394791*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], +In[101]:=",ExpressionUUID->"70638b56-33d3-4a12-a52b-fa529f5100b4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 134, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329904310505*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9439947002166163`*^-205\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 101, 22, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994387839487534*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], +In[101]:=",ExpressionUUID->"51f52217-6038-465d-8eab-4812ef9191a1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 174, 135, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043185062`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.893651388750611`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 101, + 23, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994387839495309*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], +In[101]:=",ExpressionUUID->"e7397a69-ed93-49a1-a2e3-79ceaac93e68"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 174, 136, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299043256874`*^9}, +during this calculation.\"", 2, 101, 24, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329904300501*^9, 3.994387839502575*^9}, CellLabel-> "During evaluation of \ -In[174]:=",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], +In[101]:=",ExpressionUUID->"971d113f-a3b7-4085-b329-b63d84e3f966"], -Cell[BoxData["0.1491428555515254`"], "Output", - CellChangeTimes->{3.9913299110465336`*^9}, +Cell[BoxData["1.2337233150497002`"], "Output", + CellChangeTimes->{3.9913299110465336`*^9, 3.9943878493954277`*^9}, CellLabel-> - "Out[174]=",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] + "Out[101]=",ExpressionUUID->"350f2b92-f259-495d-889f-c772497e0e8d"] }, Open ]], Cell[CellGroupData[{ @@ -8627,8 +8792,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8673,68 +8837,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489121661835`*^9, - 3.9918489145264854`*^9}},ExpressionUUID->"d11037f6-09e7-b44f-8a1d-\ -47c1a485c608"], + CellChangeTimes->{{3.9918489121661835`*^9, 3.9918489145264854`*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 175, 137, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911081766*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.482022779157694`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 102, 25, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.9943878494468317`*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], +In[102]:=",ExpressionUUID->"7a573205-78af-44b9-a7b4-bd9c86a53719"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 138, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911090769*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9439947002166163`*^-205\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 102, 26, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994387849456024*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], +In[102]:=",ExpressionUUID->"9e0aa220-a164-43ce-a42d-14782330a13f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 175, 139, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329911098768*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.893651388750611`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 102, + 27, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994387849463192*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], +In[102]:=",ExpressionUUID->"c3dcea5a-2ad5-45ec-9e78-ca7a4a545390"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 175, 140, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299111067944`*^9}, +during this calculation.\"", 2, 102, 28, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329911081766*^9, 3.994387849469754*^9}, CellLabel-> "During evaluation of \ -In[175]:=",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], +In[102]:=",ExpressionUUID->"74eb4838-2f75-45e1-b7fd-80c1b3c0dac2"], -Cell[BoxData["6.5928699937564845`"], "Output", - CellChangeTimes->{3.9913299163114815`*^9}, +Cell[BoxData["28.793326597271413`"], "Output", + CellChangeTimes->{3.9913299163114815`*^9, 3.9943878585386543`*^9}, CellLabel-> - "Out[175]=",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] + "Out[102]=",ExpressionUUID->"57617ca9-5e93-442d-adf9-23fadbc15ea5"] }, Open ]], Cell[CellGroupData[{ @@ -8755,8 +8923,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8801,68 +8968,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918489192162857`*^9, - 3.991848922582632*^9}},ExpressionUUID->"431dd2fa-6331-2449-bc19-\ -0d79e6ed8953"], + CellChangeTimes->{{3.9918489192162857`*^9, 3.991848922582632*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2791901340591166`*^-213\\\", \ -\\\"11190715368044327750599419739138633850047809524416019520761040973844462607\ -31183104000000000000000000\\\"]\\) is too small to represent as a normalized \ -machine number; precision may be lost.\"", 2, 176, 141, 24483298974280422597, - "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163444805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.482022779157694`*^-201\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 103, 29, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994387858611326*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], +In[103]:=",ExpressionUUID->"6f445d9a-98bd-4fb5-ac76-f4a9af17d65a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.153893970830207`*^-218\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 142, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916354479*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.9439947002166163`*^-205\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 103, 30, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.994387858620812*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], +In[103]:=",ExpressionUUID->"a953c00a-5139-457e-b6e5-13b7f8fd390a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.4147576224365044`*^-223\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 176, 143, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299163634796`*^9}, + "\"\\!\\(\\*FractionBox[\\\"6.893651388750611`*^-210\\\", \ +\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ +358493165635789279094374400000000000000000000\\\"]\\) is too small to \ +represent as a normalized machine number; precision may be lost.\"", 2, 103, + 31, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.9943878586289787`*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], +In[103]:=",ExpressionUUID->"a06e95ea-f242-4236-b771-53f086cc147e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 176, 144, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329916371479*^9}, +during this calculation.\"", 2, 103, 32, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299163444805`*^9, 3.9943878586367817`*^9}, CellLabel-> "During evaluation of \ -In[176]:=",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], +In[103]:=",ExpressionUUID->"059f1bf1-077e-474f-b818-983a80caa2ac"], -Cell[BoxData["16.916908616104454`"], "Output", - CellChangeTimes->{3.9913299193276234`*^9}, +Cell[BoxData["5.811795532671539`"], "Output", + CellChangeTimes->{3.9913299193276234`*^9, 3.994387864781637*^9}, CellLabel-> - "Out[176]=",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] + "Out[103]=",ExpressionUUID->"2afabfb4-863c-4f57-8654-478b8b71a9c7"] }, Open ]], Cell[CellGroupData[{ @@ -8871,22 +9042,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991848926103155*^9, - 3.9918489295815735`*^9}},ExpressionUUID->"8c5df121-e0b9-a146-bc34-\ -b231aa8028b9"], - -Cell[BoxData["0.01412227604937243`"], "Output", - CellChangeTimes->{3.99132991935894*^9}, + CellChangeTimes->{{3.991848926103155*^9, 3.9918489295815735`*^9}}, CellLabel-> - "Out[177]=",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] + "In[104]:=",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], + +Cell[BoxData["0.09537107700806775`"], "Output", + CellChangeTimes->{3.99132991935894*^9, 3.9943878648422337`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"7b5f3ec9-839f-4cd2-b070-7646f55059e9"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918489327910748`*^9, 3.991848934830887*^9}, - 3.991924914130762*^9},ExpressionUUID->"831a27fc-89ff-e041-97f1-\ -0ec5d19a7879"], + 3.991924914130762*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ @@ -8909,12 +9081,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[179]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], + "In[106]:=",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.9913299193849545`*^9}, +Cell[BoxData["5.976880503779143`"], "Output", + CellChangeTimes->{3.9913299193849545`*^9, 3.994387864871614*^9}, CellLabel-> - "Out[179]=",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] + "Out[106]=",ExpressionUUID->"6ff15d72-1f6c-423c-ac54-9af0413f8221"] }, Open ]], Cell[CellGroupData[{ @@ -8924,12 +9096,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[181]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], + "In[107]:=",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913299194207077`*^9}, +Cell[BoxData["2.9252650464422`"], "Output", + CellChangeTimes->{3.9913299194207077`*^9, 3.994387864887477*^9}, CellLabel-> - "Out[181]=",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] + "Out[107]=",ExpressionUUID->"8cdee93e-1b8f-4126-b3bc-4f762b635887"] }, Open ]], Cell[CellGroupData[{ @@ -8939,12 +9111,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[184]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], + "In[108]:=",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.9913299194738407`*^9}, +Cell[BoxData["17.483959624466973`"], "Output", + CellChangeTimes->{3.9913299194738407`*^9, 3.994387864903201*^9}, CellLabel-> - "Out[184]=",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] + "Out[108]=",ExpressionUUID->"20d20272-2ba1-4df6-91c3-30daf889247a"] }, Open ]], Cell[CellGroupData[{ @@ -9134,12 +9306,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[185]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], + "In[109]:=",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[BoxData["0.04472011299838893`"], "Output", - CellChangeTimes->{3.991329919501911*^9}, +Cell[BoxData["0.007996459386611365`"], "Output", + CellChangeTimes->{3.991329919501911*^9, 3.994387864921706*^9}, CellLabel-> - "Out[185]=",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] + "Out[109]=",ExpressionUUID->"c764e0a9-f9dd-4d58-9fd6-3af394a1ee7a"] }, Open ]], Cell[CellGroupData[{ @@ -9153,12 +9325,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[186]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], + "In[110]:=",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329919596855*^9}, +Cell[BoxData["9.910511567341793`"], "Output", + CellChangeTimes->{3.991329919596855*^9, 3.994387865057321*^9}, CellLabel-> - "Out[186]=",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] + "Out[110]=",ExpressionUUID->"20ddb522-3299-4cf9-af01-e7b0f6148284"] }, Open ]], Cell[CellGroupData[{ @@ -9350,12 +9522,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[187]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], + "In[111]:=",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[BoxData["0.014190600885170185`"], "Output", - CellChangeTimes->{3.9913299196126003`*^9}, +Cell[BoxData["0.05566012374143251`"], "Output", + CellChangeTimes->{3.9913299196126003`*^9, 3.994387865078702*^9}, CellLabel-> - "Out[187]=",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] + "Out[111]=",ExpressionUUID->"5d265c3a-2989-43d3-bd15-697b2747f7d1"] }, Open ]], Cell[CellGroupData[{ @@ -9369,12 +9541,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[188]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], + "In[112]:=",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[BoxData["7.439513700547701`"], "Output", - CellChangeTimes->{3.9913299197036095`*^9}, +Cell[BoxData["3.756408866154041`"], "Output", + CellChangeTimes->{3.9913299197036095`*^9, 3.994387865208921*^9}, CellLabel-> - "Out[188]=",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] + "Out[112]=",ExpressionUUID->"03291926-6751-452d-b4b3-8e9cb49f6fbb"] }, Open ]], Cell[CellGroupData[{ @@ -9467,12 +9639,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[189]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], + "In[113]:=",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913299197165985`*^9}, +Cell[BoxData["0.06275239908812294`"], "Output", + CellChangeTimes->{3.9913299197165985`*^9, 3.9943878652275133`*^9}, CellLabel-> - "Out[189]=",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] + "Out[113]=",ExpressionUUID->"ae02b0f3-8921-4458-a725-875afa78b00d"] }, Open ]], Cell[CellGroupData[{ @@ -9562,12 +9734,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[190]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], + "In[114]:=",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991329919739599*^9}, +Cell[BoxData["0.937247600911877`"], "Output", + CellChangeTimes->{3.991329919739599*^9, 3.99438786524496*^9}, CellLabel-> - "Out[190]=",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] + "Out[114]=",ExpressionUUID->"5ccd6e36-e231-46f6-955b-4695247c510a"] }, Open ]], Cell[CellGroupData[{ @@ -9690,12 +9862,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[191]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], + "In[115]:=",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913299197646008`*^9}, +Cell[BoxData["0.05881453549680789`"], "Output", + CellChangeTimes->{3.9913299197646008`*^9, 3.994387865262773*^9}, CellLabel-> - "Out[191]=",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] + "Out[115]=",ExpressionUUID->"62da88eb-e67b-40b4-90c5-7cd0bb87dcb7"] }, Open ]], Cell[CellGroupData[{ @@ -9757,68 +9929,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.991848964116934*^9},ExpressionUUID->"220bdeed-2e17-e94c-a7b0-\ -3e066daf15d7"], + CellChangeTimes->{3.991848964116934*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 145, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919788595*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.251526484960345`*^-205\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 116, 33, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943878652819357`*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], +In[116]:=",ExpressionUUID->"dd2a785f-6cdb-44d9-89b7-826bc71e8794"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 192, - 146, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299197985992`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.133447119516528`*^-209\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 116, 34, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.994387865290111*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], +In[116]:=",ExpressionUUID->"156a1c74-18fe-44ef-ae39-7c7ac5a6d719"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 192, 147, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299198065968`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.919833088272113`*^-214\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 116, 35, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.99438786529862*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], +In[116]:=",ExpressionUUID->"cf5e6a7b-c0aa-4820-82a8-235fdbf00589"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 192, 148, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329919814598*^9}, +during this calculation.\"", 2, 116, 36, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991329919788595*^9, 3.9943878653080797`*^9}, CellLabel-> "During evaluation of \ -In[192]:=",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], +In[116]:=",ExpressionUUID->"f86dbf2e-001b-46fa-a9ed-df35e778d197"], -Cell[BoxData["4.190766798679958`"], "Output", - CellChangeTimes->{3.991329923627493*^9}, +Cell[BoxData["9.9105115673418`"], "Output", + CellChangeTimes->{3.991329923627493*^9, 3.994387870767399*^9}, CellLabel-> - "Out[192]=",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] + "Out[116]=",ExpressionUUID->"b747b8a1-2ecf-4957-8b1f-74074c20105e"] }, Open ]], Cell[CellGroupData[{ @@ -9880,68 +10056,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918489685110855`*^9},ExpressionUUID->"b8791a07-33fe-8c4f-9c59-\ -dd23af9a4471"], + CellChangeTimes->{3.9918489685110855`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 149, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236609*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.251526484960345`*^-205\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 117, 37, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.9943878708162727`*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], +In[117]:=",ExpressionUUID->"160fff56-5b76-413d-81e9-417468564b6e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 193, - 150, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991329923669897*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.133447119516528`*^-209\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 117, 38, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994387870825904*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], +In[117]:=",ExpressionUUID->"53d11800-4af1-455b-acd5-f4ffce9ff2b7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 193, 151, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236779003`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.919833088272113`*^-214\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 117, 39, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994387870836091*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], +In[117]:=",ExpressionUUID->"f4666904-51e3-42c8-ae65-eacafd9cc81d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 193, 152, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913299236858997`*^9}, +during this calculation.\"", 2, 117, 40, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913299236609*^9, 3.994387870843783*^9}, CellLabel-> "During evaluation of \ -In[193]:=",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], +In[117]:=",ExpressionUUID->"edf70a46-21fd-415c-b734-a69572fd53d4"], -Cell[BoxData["7.439513700547696`"], "Output", - CellChangeTimes->{3.9913299274564743`*^9}, +Cell[BoxData["3.7564088661540422`"], "Output", + CellChangeTimes->{3.9913299274564743`*^9, 3.9943878761590014`*^9}, CellLabel-> - "Out[193]=",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] + "Out[117]=",ExpressionUUID->"77237591-7d32-489e-b3d6-1acae333c36d"] }, Open ]], Cell[CellGroupData[{ @@ -9999,93 +10179,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991848973885317*^9},ExpressionUUID->"3fe6e7f1-b44a-234f-af77-\ -3cf1fdaf28d9"], + CellChangeTimes->{3.991848973885317*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VdsbB3CZMpYhQ6YyVUfI7yCHhvWGigwh85ThnE3KENIp0WBoQEmK +bokbSjJmDHUrkupclLqlKOMmJNPZKuK3/LGf/Xyetfd3ve9ea21Vv1AHFi8P +D88wvpbuh1t119e0t24Ps6pdUeNHou3jeYZ+5kWomvECLbkne3O6hnkDmro3 +8XbJdsx/BcX0n6MDtw1aarHL2ScbBcw56O76K2vqsM83yz85WfgG6ewQ66zH +fth++NY8/T3q/Jk98wh75NOrE8fqP6Icd9vwJ9gKg+oelFkXqo2Uc2jEtvpx +wjiC8xWxXOauNGM/nh8RZRf2op0yv41eYf93Wi66OqQfTT2T3t6KPS5oPjJD +H0RhRy3uvMUWTA5z058lUYFVZtgHbBXJrJbD9cOI686X1YVtq0jdGTcbQ/G3 +NyoNYxM5arI6QuNovdK3kHHsk5p7Ew5yfqDkfc/Uudgf5d79L7JwEjlfa6ng +8ycR0z3owJXkKZQxw70oij1xk+fvByHTiF6NONLYQmo6EpN0LhJVpQVrYqcz +G3dLyFCIrfuyXRd77V23k5tmKVQWkHiNgc3QThwPrv+JZre5WdhgB27+yhkx +m0c/ZQJ2RmPPsI/wi6z7gyRWzj48i32qXnQrTWgBbdW5k5qOnQmM+wGcRcRd +8GOWLtWX32IeXrgMQqP353/DLmy+0nNakRcmJCe1fi3VO+R94nIyLyza50kJ +M0l0QotbURbCBzkmh4W0sNNLVdV/0AWAI1eaEob9qX3s8UKuAOx3dtWIw147 +VeO+QkYQlGzXKV/DLjKwTdOZFQR+BbrhI+ymh8eXHaoXgh8RMosrWSTiNnZ8 +HTYTA/m2yN8vsKWsxSSiH4sBY/I4pw9b7505iBuLw47QfskF7KCBqpz/6a6A +YdcvlCFBojBejt42MQn4FZtKu489qFYymUBJQu6TdPr9APx9iFfCbfpSwHBW +2vIvNu99UlX+sBQsCEnX/MBeq7/GoXBUCq562wtvDiSRu1nqg9YeaTh3Y6Nc +C3abf3iE3GsZ0MzV7VwWRKIvdy8m+QjJQru4wuqN2GOjhbn3dsqC3954jiO2 +SGR/x5YnsuBQ3JlyD9s83tHAp0oOJDvuHHc9SKK6vM3cguzVMB3A+fP6EIny +Bn9HmUQqw7mp0QfCYSSycDr7JaJYGaz9r5Rtwx5rkt5VTCrD/q6V0uHYBnna +MmvdVODXrWTBLuwmP+8Kge1rQHeo+m7lYRJN/eg5Ohy3Frye93awI0gkHWxe +WWGjBqYjWV3WR0lE5okE2gWpQU6n69EU7NqudsXviWrwuUHqaCu2p7VX3Lon ++Hnd8/n2bFzfxiiH63R1GOu999jzGJ5/5O5ErJwGxDeL9CdEk8gxQFRnT68m +aP3Zuqh+ikQoyonu8kcTMn25NaHYWgnZRszV6wCGJ97UY/Pk6pvG2q8Dow81 +NKfTJCr+4uHy4Ok6kBesCEw+g8+nc9FphdvrocipQ1M8AddnbvPfiB8N5mOa +C1wukCh3X8bn2VgaFFhtTCnFvujX28N/gwZhT0U6lifh/X3qyKhKBw3kZHfE +PcSWbMji2WemBYF9/xxRTcH7R39cq159I2hpleXxpZJIUe3SyaQBbbDNW8GQ +vEaihgsztF+8OhCvxGmLwfacdntHqOqAs9q5TyPYt5o0aKbeOpCWKGjZnEEi +tYC6tz8/6MCPFYEXzlzH/RYNahKvdUHJXPVviSwSKSuqEGvd9MB7YDk9Lo9E +2vmRYnOIDknJ8YnPKknkx4zj6tjS4Z+WZc9Nq/B5VU/74uNJBzHSOrARm+92 +aVkzmw5GAS7dz6vxebs14phWTocZ93On22rx/zTTJ4umrg+/91dXchvw+iZZ +67oKGoC/b2xnynMS/R2uYVfFMYS8u3wN3z+QqD0KGcXnGwNXoFvQUGAIqXq/ +t/U6tA1W0QZu/WQMIdZidYnyMYA0228nPoYOIbnR2uVyfqYg0qsseePBEIrU +39qVpmUOiSVH/tc2O4T8vs+3SI/shKr+OU2a6TAqNo1Ynt22G7LVVCY2/TWM +8maCnhalW4KX9VO2xfQw+rlD/t+mk1YQy5m7fMrjG+rm4Zvs9bUB35hywYyX +31CIUmjqafW9EFOVEsowGkElB1qeXE2wg3B/7YLaqhF0fHr17MYD9nDtwjFN +kj6KuHt2Ob/Y7wBy5p3FRs9GkbHH5R2D9vug1rsv95rzGHq7OiuoSd8RooRD +FKuGxpDCnbiGgg1OwP6UGqWZ/B3V9mhZ24o7w+HVFvvktMeRyruJgKjvzvCf +2LmpG63jSP/q5aLcHheIO5PGHIr/gbL4p3XTGl2hyW3fDVmFCVS9Y9OnhIdu +MPfcXyotegJlGl2QnC90h4qFXW9DuydQ2+f8RP1kDxDuHZfbZTKJqmxuaoSd +8gSbQ6XDOjmTaDJ4H08I0wsqLc1yfy1OIu4uWuC4mTdon+Vbz+s9hQq+d/6M +2LwfuHMrVC83TiHXv/P9vcR8IOqI1XpQnUYVD6z28531AcsLJqH98dPIWPHt +r/O/fMDFMWkT8+s0Uu8J+PTmgC/wDfoELzecQQOiB/fe7PeFaULeIC9lBrVf +tPXf7eQHrT+3HUz5PIPS2dmiR9r9IKTyUusAjYsaHi/+8rf0h2uiYiKcUC5a +6Qln9ev8Yc3evPcChVy0dtWLNqUGfwjfEZQ8ha3HsZEXfOwPA42utV/uc5HD +Vo97H5/6A3lrMqSqmIvSlaJex7z0B4dI0t6znIsUuu+vbPnoDzD67PmlWi7S +8JbL9Jz1h6S/VqkmN3ORsc94QYIBEwKUgt6093DRnesTEbabmWA6H62c3MtF +qzqmtssxmODr20Hu6uOi8Z2z7wq24PGO1xN1/Vz8/+JZxjFlQs0Boy83SS5a +MSvpJmXPhOzBrmUWY1w0kGIonB3MhEm9hrMms1x0sf7Egdo7+P2Pt0rOi1Io +mJ5hzC5ggpMFx2qtGIWs75ULMwqZEHjhs381tkgGea+mmAnnBw34e8UplBBu +N1JdyQR+p++8ehIUOkHTOFj1jAlFGy71Vq6iUFDG60MPvjAhjCDD3JQpZLmC +3BrewwQe0Z2Mr9gbEnjE6X1M6LFzP8pUoRAZblhcPsgELt3SM3gNhXxts7+X +jTGhNTjnMVuVQq4CESGlv5mw7fOT9iOaFNodoRBWJMuCUO9vSUI6FHqWnbgn +TZ4Fc08lFxKxt3KmNNgKLBiNi+bw61JIT/N1p5kKCzZLFcQsYK/+EG32WZMF +TzVO6o7oUWjUpFtWxJAFQu0+FbcNKHSJN+dRwD4WVCpV/pWxBfe/SSzTxokF +W4g8/2VbKRTvwQ7Xd2GBUtqjhCBsdqXd+kV3FmwIlnhvsg3XTyy7fM2PBfYt +LVkd2ymk/8qP+fwwC9Z3HW8a3EGhD5c1RdVTWfAhuOV90m4KlSDxwOHLOG+g +Y+YTdvz3mabiKyww6fc5RbOgEN2yKZaRwYKw2KauJuyLPP5TNrdYwKuteG/G +kkK7QnM62UUs+Np7N45hTSFl5XObt5ewYPiiAjMWe+ZV6BW+Mha83bCprBH7 +9jpkc7GCBVW/hZOsbSj0p7v7SW4dC4YWVfa42FKo0lqxoLWFBVMHhvvs7CiU +9JtXIP0VC5Zvu3Y0BduvYMTXjcOCgG7Voy+xJfjrFAfaWOBokV+N7Cl0qN71 +0q//WNCku26zpgOF1LWuRWkMsqBMskbn3T4K/f4Q0/GNZMF9pHtwuSOF2hNY +eqXDuJ/RT1Im2LG9BiPGYyzYfbwkJwv7U2aH195pFowMMqq8nCiUtlxy5/Fl +BAzVidQ9daZQw1S3RyQfAQ0Z2gcnsIe6C8NDBAj4xkP5qLjg/VBpnuMnTMCk +gaMCG5v0Yc/tkSTAfFy+Uc0V12+9U2qnNAE3m+wyrbC3GEnRkAwB+gpfyiOw +U8WLnPVXE/DiTEf506Xxuq/liqoEzD3QGnB0oxCRX9Qio05Acs2Kz0exU1OP +fV2pSUAWY5nsX9gkIS3OTyNgFXvSpWtpXHp34JgeAWmy60Vd3SlUtyB9kqQT +YDydr3oEe/Bbz9UeAwLOec1GX8Y2eXK88R0D17tpdu4F9sChEpVHQIBq28MN +2h4UWuEabVhjSkDxNwUvM2xjMwvrcnMCPj9Wfu+GfXF137F8CwKsYqYvxWPX +8pemZu8hQMqi4W0mdv+P6LvXrQmIS5VyK8JmNMu8T7EjoHm3k94bbL/yvtGz +DgTUzjNO92Gn3CzlPeNIQEl9psw0dl+4pV6UK56/tUFIypNC4t6yu8PcCej4 +91jAWmyGZb9XkCcBhjp5wrrYKWtikrx9CJi3MZDfjV0rsue2qx8B99akxztg +93FlHzowCdAOdzLwWsrr7W+zJghwfXRkfcBSHqeM3BVIQH7+lFcYtl9NzB8I +wv3Nv/zAXsq/vWfVlkMErPvnV/qppfwUuY2GIQQ8kz919exSPntgx6YwAg74 +eHSmYIsxy11p4QQIK1zwuYJttDc2VD2SADtKZGPmUr6JVaJyFAE33nYxbmIn +a8pnybEJWKxdOJ+NXS0xWCF5HK9PT6jKbezeufJXoifw/ru/icpdyh+K7RWI +JUCzaJtkPvbmt1Y/F08SMJh1PXTJ/weW/e4i "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10099,105 +10280,106 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1Hk4VdsbB3CZMpYhQ6YyVUfI7yCHhvWGigwh85ThnE3KENIp0WBoQEmK +bokbSjJmDHUrkupclLqlKOMmJNPZKuK3/LGf/Xyetfd3ve9ea21Vv1AHFi8P +D88wvpbuh1t119e0t24Ps6pdUeNHou3jeYZ+5kWomvECLbkne3O6hnkDmro3 +8XbJdsx/BcX0n6MDtw1aarHL2ScbBcw56O76K2vqsM83yz85WfgG6ewQ66zH +fth++NY8/T3q/Jk98wh75NOrE8fqP6Icd9vwJ9gKg+oelFkXqo2Uc2jEtvpx +wjiC8xWxXOauNGM/nh8RZRf2op0yv41eYf93Wi66OqQfTT2T3t6KPS5oPjJD +H0RhRy3uvMUWTA5z058lUYFVZtgHbBXJrJbD9cOI686X1YVtq0jdGTcbQ/G3 +NyoNYxM5arI6QuNovdK3kHHsk5p7Ew5yfqDkfc/Uudgf5d79L7JwEjlfa6ng +8ycR0z3owJXkKZQxw70oij1xk+fvByHTiF6NONLYQmo6EpN0LhJVpQVrYqcz +G3dLyFCIrfuyXRd77V23k5tmKVQWkHiNgc3QThwPrv+JZre5WdhgB27+yhkx +m0c/ZQJ2RmPPsI/wi6z7gyRWzj48i32qXnQrTWgBbdW5k5qOnQmM+wGcRcRd +8GOWLtWX32IeXrgMQqP353/DLmy+0nNakRcmJCe1fi3VO+R94nIyLyza50kJ +M0l0QotbURbCBzkmh4W0sNNLVdV/0AWAI1eaEob9qX3s8UKuAOx3dtWIw147 +VeO+QkYQlGzXKV/DLjKwTdOZFQR+BbrhI+ymh8eXHaoXgh8RMosrWSTiNnZ8 +HTYTA/m2yN8vsKWsxSSiH4sBY/I4pw9b7505iBuLw47QfskF7KCBqpz/6a6A +YdcvlCFBojBejt42MQn4FZtKu489qFYymUBJQu6TdPr9APx9iFfCbfpSwHBW +2vIvNu99UlX+sBQsCEnX/MBeq7/GoXBUCq562wtvDiSRu1nqg9YeaTh3Y6Nc +C3abf3iE3GsZ0MzV7VwWRKIvdy8m+QjJQru4wuqN2GOjhbn3dsqC3954jiO2 +SGR/x5YnsuBQ3JlyD9s83tHAp0oOJDvuHHc9SKK6vM3cguzVMB3A+fP6EIny +Bn9HmUQqw7mp0QfCYSSycDr7JaJYGaz9r5Rtwx5rkt5VTCrD/q6V0uHYBnna +MmvdVODXrWTBLuwmP+8Kge1rQHeo+m7lYRJN/eg5Ohy3Frye93awI0gkHWxe +WWGjBqYjWV3WR0lE5okE2gWpQU6n69EU7NqudsXviWrwuUHqaCu2p7VX3Lon ++Hnd8/n2bFzfxiiH63R1GOu999jzGJ5/5O5ErJwGxDeL9CdEk8gxQFRnT68m +aP3Zuqh+ikQoyonu8kcTMn25NaHYWgnZRszV6wCGJ97UY/Pk6pvG2q8Dow81 +NKfTJCr+4uHy4Ok6kBesCEw+g8+nc9FphdvrocipQ1M8AddnbvPfiB8N5mOa +C1wukCh3X8bn2VgaFFhtTCnFvujX28N/gwZhT0U6lifh/X3qyKhKBw3kZHfE +PcSWbMji2WemBYF9/xxRTcH7R39cq159I2hpleXxpZJIUe3SyaQBbbDNW8GQ +vEaihgsztF+8OhCvxGmLwfacdntHqOqAs9q5TyPYt5o0aKbeOpCWKGjZnEEi +tYC6tz8/6MCPFYEXzlzH/RYNahKvdUHJXPVviSwSKSuqEGvd9MB7YDk9Lo9E +2vmRYnOIDknJ8YnPKknkx4zj6tjS4Z+WZc9Nq/B5VU/74uNJBzHSOrARm+92 +aVkzmw5GAS7dz6vxebs14phWTocZ93On22rx/zTTJ4umrg+/91dXchvw+iZZ +67oKGoC/b2xnynMS/R2uYVfFMYS8u3wN3z+QqD0KGcXnGwNXoFvQUGAIqXq/ +t/U6tA1W0QZu/WQMIdZidYnyMYA0228nPoYOIbnR2uVyfqYg0qsseePBEIrU +39qVpmUOiSVH/tc2O4T8vs+3SI/shKr+OU2a6TAqNo1Ynt22G7LVVCY2/TWM +8maCnhalW4KX9VO2xfQw+rlD/t+mk1YQy5m7fMrjG+rm4Zvs9bUB35hywYyX +31CIUmjqafW9EFOVEsowGkElB1qeXE2wg3B/7YLaqhF0fHr17MYD9nDtwjFN +kj6KuHt2Ob/Y7wBy5p3FRs9GkbHH5R2D9vug1rsv95rzGHq7OiuoSd8RooRD +FKuGxpDCnbiGgg1OwP6UGqWZ/B3V9mhZ24o7w+HVFvvktMeRyruJgKjvzvCf +2LmpG63jSP/q5aLcHheIO5PGHIr/gbL4p3XTGl2hyW3fDVmFCVS9Y9OnhIdu +MPfcXyotegJlGl2QnC90h4qFXW9DuydQ2+f8RP1kDxDuHZfbZTKJqmxuaoSd +8gSbQ6XDOjmTaDJ4H08I0wsqLc1yfy1OIu4uWuC4mTdon+Vbz+s9hQq+d/6M +2LwfuHMrVC83TiHXv/P9vcR8IOqI1XpQnUYVD6z28531AcsLJqH98dPIWPHt +r/O/fMDFMWkT8+s0Uu8J+PTmgC/wDfoELzecQQOiB/fe7PeFaULeIC9lBrVf +tPXf7eQHrT+3HUz5PIPS2dmiR9r9IKTyUusAjYsaHi/+8rf0h2uiYiKcUC5a +6Qln9ev8Yc3evPcChVy0dtWLNqUGfwjfEZQ8ha3HsZEXfOwPA42utV/uc5HD +Vo97H5/6A3lrMqSqmIvSlaJex7z0B4dI0t6znIsUuu+vbPnoDzD67PmlWi7S +8JbL9Jz1h6S/VqkmN3ORsc94QYIBEwKUgt6093DRnesTEbabmWA6H62c3MtF +qzqmtssxmODr20Hu6uOi8Z2z7wq24PGO1xN1/Vz8/+JZxjFlQs0Boy83SS5a +MSvpJmXPhOzBrmUWY1w0kGIonB3MhEm9hrMms1x0sf7Egdo7+P2Pt0rOi1Io +mJ5hzC5ggpMFx2qtGIWs75ULMwqZEHjhs381tkgGea+mmAnnBw34e8UplBBu +N1JdyQR+p++8ehIUOkHTOFj1jAlFGy71Vq6iUFDG60MPvjAhjCDD3JQpZLmC +3BrewwQe0Z2Mr9gbEnjE6X1M6LFzP8pUoRAZblhcPsgELt3SM3gNhXxts7+X +jTGhNTjnMVuVQq4CESGlv5mw7fOT9iOaFNodoRBWJMuCUO9vSUI6FHqWnbgn +TZ4Fc08lFxKxt3KmNNgKLBiNi+bw61JIT/N1p5kKCzZLFcQsYK/+EG32WZMF +TzVO6o7oUWjUpFtWxJAFQu0+FbcNKHSJN+dRwD4WVCpV/pWxBfe/SSzTxokF +W4g8/2VbKRTvwQ7Xd2GBUtqjhCBsdqXd+kV3FmwIlnhvsg3XTyy7fM2PBfYt +LVkd2ymk/8qP+fwwC9Z3HW8a3EGhD5c1RdVTWfAhuOV90m4KlSDxwOHLOG+g +Y+YTdvz3mabiKyww6fc5RbOgEN2yKZaRwYKw2KauJuyLPP5TNrdYwKuteG/G +kkK7QnM62UUs+Np7N45hTSFl5XObt5ewYPiiAjMWe+ZV6BW+Mha83bCprBH7 +9jpkc7GCBVW/hZOsbSj0p7v7SW4dC4YWVfa42FKo0lqxoLWFBVMHhvvs7CiU +9JtXIP0VC5Zvu3Y0BduvYMTXjcOCgG7Voy+xJfjrFAfaWOBokV+N7Cl0qN71 +0q//WNCku26zpgOF1LWuRWkMsqBMskbn3T4K/f4Q0/GNZMF9pHtwuSOF2hNY +eqXDuJ/RT1Im2LG9BiPGYyzYfbwkJwv7U2aH195pFowMMqq8nCiUtlxy5/Fl +BAzVidQ9daZQw1S3RyQfAQ0Z2gcnsIe6C8NDBAj4xkP5qLjg/VBpnuMnTMCk +gaMCG5v0Yc/tkSTAfFy+Uc0V12+9U2qnNAE3m+wyrbC3GEnRkAwB+gpfyiOw +U8WLnPVXE/DiTEf506Xxuq/liqoEzD3QGnB0oxCRX9Qio05Acs2Kz0exU1OP +fV2pSUAWY5nsX9gkIS3OTyNgFXvSpWtpXHp34JgeAWmy60Vd3SlUtyB9kqQT +YDydr3oEe/Bbz9UeAwLOec1GX8Y2eXK88R0D17tpdu4F9sChEpVHQIBq28MN +2h4UWuEabVhjSkDxNwUvM2xjMwvrcnMCPj9Wfu+GfXF137F8CwKsYqYvxWPX +8pemZu8hQMqi4W0mdv+P6LvXrQmIS5VyK8JmNMu8T7EjoHm3k94bbL/yvtGz +DgTUzjNO92Gn3CzlPeNIQEl9psw0dl+4pV6UK56/tUFIypNC4t6yu8PcCej4 +91jAWmyGZb9XkCcBhjp5wrrYKWtikrx9CJi3MZDfjV0rsue2qx8B99akxztg +93FlHzowCdAOdzLwWsrr7W+zJghwfXRkfcBSHqeM3BVIQH7+lFcYtl9NzB8I +wv3Nv/zAXsq/vWfVlkMErPvnV/qppfwUuY2GIQQ8kz919exSPntgx6YwAg74 +eHSmYIsxy11p4QQIK1zwuYJttDc2VD2SADtKZGPmUr6JVaJyFAE33nYxbmIn +a8pnybEJWKxdOJ+NXS0xWCF5HK9PT6jKbezeufJXoifw/ru/icpdyh+K7RWI +JUCzaJtkPvbmt1Y/F08SMJh1PXTJ/weW/e4i "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.6995501792429035, + 1.3976187095048485`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.6995501792429051}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10209,21 +10391,21 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, - 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.6995501792429035, + 1.3976187095048485`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.6995501792429051}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10237,103 +10419,104 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Hk4VdsbB3CReSoyJWUeEslUot5XKDO5kXk4zt5FQsiVhAb6NUlyS13R -gCQpVKauuqUSiqLhKrJN6WQoGTun+i1/7Gc/n2ft9V3vu9Z+lhoryoPi5+Pj -6yXP3HvXC0OdqrYX693HorR0DXiwfrTAjGVbCmpfykN0iHvyzbM1be/B9rg0 -eS1id/ZzIQmTx3DZ8YuNGnF5QsojQdsWkLjR/1mZ+MgTxQcpJS9hl2+siBxx -TduuPJ7xa/A7dS5fgpjT2ZS0p+4djEn73uQnXjyg4Tdl8wFmZKtXT6/ggdNY -kkVsy0cY8q1awyGu53HEE0oYaFLzr3hP/Ga/wt67kX3gq3W9oJl4VMiWM2E8 -AE8uXZOuJRY6Hu1jMj0IMx4B34uIly680Lirbgi2xrW4ZRG7Kk8VjdoMw3jM -TAybmL6oLm8gMgoltg0WTsQpWm5pO1rGYE9U2B4j4ncKHaviSr5Bkklo6JQ+ -D9i+4WGnj4/D23tNkm+Jv+byXaqI/A7xKatW3SUWUTdY8M14El6J6vZFEWez -H21aIDcFUfde7HIkVr3qk7JyegpEky/v0SBesyJ9dGfdDOzeO3+ybTkPtpt/ -bOHY8GDYySxXiXgiYfd8Me2foDv0aPKTHg9S68St9ER+ga7898bbxDm45vq2 -lt9g4xn/wYGYXdhoG1MyDzm+/LUhujwoeXK6Z78yPwqJHOrVIP76KTDp1HF+ -rE+1SOvX4UHS8snKW5ECGPQmyyKEOPummsaYsSBO/xMUbK/Ng8624fpfVwSx -4ucH/19apP7xKl8pOSGc6MKOCuJSU9csg2khzLJbZqpA3FCTOC+iTgRzzwnW -PdfgweSj9o9DNhKYG37s5zdVHsg4SyzYWy+Bzlf5gw4TG3XYoqSFJMYN4Oxi -4vD+OxdXGUqhdUr1O6tlPIjmbzFaJ7EAjSJs7Xeo8GBAvexb2tRCPOd+cGGs -Etkfukm01UQGn+2yXTSsyAP+64NqirtkUPVohUcosarJMo+SLzJ4hqYPOivw -wNcms+JFjyx+thSuFZXjQWtoTKxCsxwmPdS7sXIBD7qvZhwLFpHH6RcZh45L -k3P4UnLlmp08PrE0+vuTFA/E4vraLR/Io8i4+uEcSR7YHtpiGnxHAa+ufxo8 -IMaD2gLzyeJ8JaQGND31BXlQMPAjfm2cCj5/fcY0fIYL9p6Hu2NvqGD2kRjB -vGkuDDfIbrwxSFw87NU2xQXTghVyqj5LUUWrKclokgsNrMBKwfXLsNq26H33 -Ny6Mj/X8OXRQFYu8nDUmOFyQ3Wl7u9JFHX+Zveri/8CFwQKx7e7h6rg6eb6r -8HsuVH9oUx5JV0dtR217sU4u+DsHHNR+oI7s7tT34u+4UKAf73HOWAMPPCs8 -/LOdrM+5+jVZQRNFw/+Bv5u5sGWbuIEjo4WZkc5nHtZwAeI9jbf+1MI8eeEn -edVcWJ6Wv5qtpI3+Lz/m7KniAt8Vkw3Jm7Vxf8QWPf07XLjR7be14l9t7Otb -93vfLS4IeZXuX3xZB32Wclp7i0h9ti5vOCw9ZC19knc9iwvK6idTjvWvQMPG -o6NuNBfuHZ3Qm+U3QA/hDzNVbFL/d58OWs0Ac2zS05eGciGvQVNvQ6ABijVo -GH4K4oL6ttpXM28NUGirSz3tQ+orHdCimw2RubiQtcyZCyrKS2lVHyN8OVXV -lGjEhRWFcRJcMEbrv9v5eRM/4FKMpvudFjOU0zi5qO/PH9AWD6sPFVpgw8he -nZ6uWVALfO0aELEOpYfqD3SZzwL1+26Zyh5EMxuj2NMnZ0DhS7WwAmsDeo7X -vYprm4Y4E6sPWcttkW+rCL1TYRpYI7xGWY4dmq0+wZIOnIIbG2KF81s3YXJQ -ePGDrEkomAj/tzTbAf+M9ov43DEBM9aKzxtSnNBNKuRkl8gEdPEJfGNCXPDN -G97giM13iFwSlblfww1L6CfH9mWOQ1lY44O/0tyxNCD16rH2b5D4XWlaP2wz -Nmfa2jjqfYNJx41eT4M80OOudu6ShK9g4XfKemDzH/jKPN1SvGAMXildCG8w -2YIuIjZO95NGYXHRwXvFup6oqNAW0O48AtU9y51dJb2wuTHw7zAchqUdX7fF -j3jh1nL7wbObvoDJX6dKr/RsxUvCNwX3OXDgwvzvhlmPvLHGfeDZl/DPcNd6 -ZWdajQ9uLLvWqXtkCHJWH13IK/HF/Lii62W1n6D1fWG6yXE//J+21foVwp/g -jkuuZnSqP2ZGD+xZ5zEI33b+wRfJDkBmqfWy+3cGYHKj3vZRm0Dsnipem6oz -AMUj/83Emgfhr13WHO1z/eB9qTA0QCIYe0zPp2ot64fKCqcggcPBKD9R5WNY -1AcWyq9mj8wG4+BR9brt0AcaPds6X4aFoOKgyeSrvl7oF9/hltsXgolqGv3+ -R3uhLcM1dJMnCxX5Or+0Qi9kJ+SL725j4dOMZo+oGQbu1f+eDXUIxcfKCo6n -6xiQ9sfDJrWh6JVw+nnzUQZUFz1tXXIvFGvevxgXITZqcVEUqg/FwSK6cOMR -Bjys/K69+zcUY8JiKh4dZiB7SXzzvmeh2JC6M7zhEAOLu65LN74LRemOa3Y9 -yQxoBirk+E+HYmqtkMP+WAYsgkeL00zZmGS/+zIVyEDRua+xruZsRDF9t7YA -Bha1j69XWMPGzi6IsyQetZvuKLZkY094sI6sP0PuA755LRvYWJ0TY9Tow4DU -9EIfmc1sDJrKf2zvyUD/CTPR/J3Ea1/WXXFmYPPT1R3botgYfiGMpUJcz7c2 -32gXG7v51qWedWLgXOx6s4dxbHyJMWonHBlw9dkUMrCXjUdPa8/us2egRtOn -Rv8oG/trXad22zKQUZcUVl3Expo6zki9FQM7jc9aJBSzUapFuMGB2Plaueia -EjY+EHwg/tqSAbGzg9eqbrAxbqZ/bHgtA2kx7py7t9l4JGG1mLoFA0l6mjvu -PGQjL7cp9ZIZA+FnmyMqutn4RjXObtKQAQepQauYHpLnFmWdQaybxidp3MvG -W/z6ZTrEgzFmN8oHSD/RTf/5GTAQ4po/cmuYjY1+MwnP9BnwFoyNvPmDjbHZ -eS9rdBnYFLs4ulSeQvHub/+OqjPwMD/dMUuRwojzWZhBbNUyrpmwmMLyJjEb -Q2Ijreb/bJZS+DWUao9SY0Dp7V6b91oUZl7gU5tdxsCXtV3yYmYUaje+DdNU -YeAk/8V/tv1BYaSM3aEuBdL/SokcF08KFROHok8QH/JLiDHZSuH4weyedcQJ -t911fvtSmKs1Zn9RntRPzzt1hkWhkqvkuh1yDJg0sdiPd1G4XIC/TEmWgben -tMQ1Mik0LQ078U6KgTKQ3D50isJ0kwvSF4gPjUw03DhNId+fXgIsYmOHhuQ1 -Zyk8oOQEI5Lk/PhCx13yKJys7BARJd4YdfG/hFIKuyzxo6c4Ayoq/zNfX0Zh -fY5SghrxRFPUaYFbFBqdgQMjYgxc1gaXjEoKrfTYnHTin11dD67UUshvc1v0 -vigDt52Vi180Usg5X7rfVoSBYz/4BbObKLwa1GagQMwq5oT4tFDIGpRy4ggz -sGB+rXJ/K4VX7re9O0UcUed9cvYNhfZditaDQgxoLD8TrzlAoQTLf0OBIAM/ -3u5r/zxI4Ymh3l/7iNvSKKObQxRGZ/is8CZOZkw5FsMUXj4u2SlJ3JnTHuD2 -ncI4c9fU5PkMZAkvtEucR2PeIoupOAFyH4x3+cUJ0Fh666W2B/GnrpKYSEEa -b4n+6FtJbHXb9iJLlMZ4sTGBEX7yvwUncB0Xkvks1c6dxAuc7WTsZGkMrxyO -dCO2XC2jB3I01iwyzVxFnClZ6mWiRGPD4eUJ0/PIeO3HcmU1GuOWxHcdIaYL -SxvlNGhMPdn5Ooo4M3PPR2ktGs+bFvt6EQ/SspLz9Wis/xEvqjU3Lrtp+7AR -jSKmpdxGPgZqf8mmDBrTOFuosbWSeOBzz189pjTaWkyuzyNe+yDxUccaGqsX -XKzcTdwfUbb0H6SRJz1kpE8s5b3XrGoDjRHNAmNKxBY29s7ltjRaUjstRIkz -lHr3FNrTmP5JM/bz7x6onn8zM9+Rxjd20axO4r6xvVfPOdO4JHJ+dzPxmidy -r0+4k+8P8ifeImaV93457EGjBoafv0J8Ivcm/4EtZD8o+U1niXtjHIzivWlc -IbTGLpVYMlB+U7QvjUYl18/snstz6AsI96fxuGhw3I65+cv2HQsMppHz9HCH -91w9Yo6XvVk0Nl6b9XKfy5uUr/Fg0/jE+RplP5fH9LU60zRaS53hs57La7k1 -uHE7jRNe93XWztVXte8nhtN4+7zme5O5/MuOiywjaLzo/Xix4Vz+CQV9s0ga -BZQvDerO5Sf0W6+MpjH4z6r1msQS7HJvvRiyf1IiGqrEq92SozTiaJQ5nnV6 -yVz+Wqd0lXgaE696ZSoRH9dSvKCQQOMv9S1KCsR3FwxULkwk/bccNZQjZrjl -TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== - +1:eJwV1Hk4VdsbB3CZMpYhQ6YyVUfI7yCHhvWGigwh85ThnE3KENIp0WBoQEmK +bokbSjJmDHUrkupclLqlKOMmJNPZKuK3/LGf/Xyetfd3ve9ea21Vv1AHFi8P +D88wvpbuh1t119e0t24Ps6pdUeNHou3jeYZ+5kWomvECLbkne3O6hnkDmro3 +8XbJdsx/BcX0n6MDtw1aarHL2ScbBcw56O76K2vqsM83yz85WfgG6ewQ66zH +fth++NY8/T3q/Jk98wh75NOrE8fqP6Icd9vwJ9gKg+oelFkXqo2Uc2jEtvpx +wjiC8xWxXOauNGM/nh8RZRf2op0yv41eYf93Wi66OqQfTT2T3t6KPS5oPjJD +H0RhRy3uvMUWTA5z058lUYFVZtgHbBXJrJbD9cOI686X1YVtq0jdGTcbQ/G3 +NyoNYxM5arI6QuNovdK3kHHsk5p7Ew5yfqDkfc/Uudgf5d79L7JwEjlfa6ng +8ycR0z3owJXkKZQxw70oij1xk+fvByHTiF6NONLYQmo6EpN0LhJVpQVrYqcz +G3dLyFCIrfuyXRd77V23k5tmKVQWkHiNgc3QThwPrv+JZre5WdhgB27+yhkx +m0c/ZQJ2RmPPsI/wi6z7gyRWzj48i32qXnQrTWgBbdW5k5qOnQmM+wGcRcRd +8GOWLtWX32IeXrgMQqP353/DLmy+0nNakRcmJCe1fi3VO+R94nIyLyza50kJ +M0l0QotbURbCBzkmh4W0sNNLVdV/0AWAI1eaEob9qX3s8UKuAOx3dtWIw147 +VeO+QkYQlGzXKV/DLjKwTdOZFQR+BbrhI+ymh8eXHaoXgh8RMosrWSTiNnZ8 +HTYTA/m2yN8vsKWsxSSiH4sBY/I4pw9b7505iBuLw47QfskF7KCBqpz/6a6A +YdcvlCFBojBejt42MQn4FZtKu489qFYymUBJQu6TdPr9APx9iFfCbfpSwHBW +2vIvNu99UlX+sBQsCEnX/MBeq7/GoXBUCq562wtvDiSRu1nqg9YeaTh3Y6Nc +C3abf3iE3GsZ0MzV7VwWRKIvdy8m+QjJQru4wuqN2GOjhbn3dsqC3954jiO2 +SGR/x5YnsuBQ3JlyD9s83tHAp0oOJDvuHHc9SKK6vM3cguzVMB3A+fP6EIny +Bn9HmUQqw7mp0QfCYSSycDr7JaJYGaz9r5Rtwx5rkt5VTCrD/q6V0uHYBnna +MmvdVODXrWTBLuwmP+8Kge1rQHeo+m7lYRJN/eg5Ohy3Frye93awI0gkHWxe +WWGjBqYjWV3WR0lE5okE2gWpQU6n69EU7NqudsXviWrwuUHqaCu2p7VX3Lon ++Hnd8/n2bFzfxiiH63R1GOu999jzGJ5/5O5ErJwGxDeL9CdEk8gxQFRnT68m +aP3Zuqh+ikQoyonu8kcTMn25NaHYWgnZRszV6wCGJ97UY/Pk6pvG2q8Dow81 +NKfTJCr+4uHy4Ok6kBesCEw+g8+nc9FphdvrocipQ1M8AddnbvPfiB8N5mOa +C1wukCh3X8bn2VgaFFhtTCnFvujX28N/gwZhT0U6lifh/X3qyKhKBw3kZHfE +PcSWbMji2WemBYF9/xxRTcH7R39cq159I2hpleXxpZJIUe3SyaQBbbDNW8GQ +vEaihgsztF+8OhCvxGmLwfacdntHqOqAs9q5TyPYt5o0aKbeOpCWKGjZnEEi +tYC6tz8/6MCPFYEXzlzH/RYNahKvdUHJXPVviSwSKSuqEGvd9MB7YDk9Lo9E +2vmRYnOIDknJ8YnPKknkx4zj6tjS4Z+WZc9Nq/B5VU/74uNJBzHSOrARm+92 +aVkzmw5GAS7dz6vxebs14phWTocZ93On22rx/zTTJ4umrg+/91dXchvw+iZZ +67oKGoC/b2xnynMS/R2uYVfFMYS8u3wN3z+QqD0KGcXnGwNXoFvQUGAIqXq/ +t/U6tA1W0QZu/WQMIdZidYnyMYA0228nPoYOIbnR2uVyfqYg0qsseePBEIrU +39qVpmUOiSVH/tc2O4T8vs+3SI/shKr+OU2a6TAqNo1Ynt22G7LVVCY2/TWM +8maCnhalW4KX9VO2xfQw+rlD/t+mk1YQy5m7fMrjG+rm4Zvs9bUB35hywYyX +31CIUmjqafW9EFOVEsowGkElB1qeXE2wg3B/7YLaqhF0fHr17MYD9nDtwjFN +kj6KuHt2Ob/Y7wBy5p3FRs9GkbHH5R2D9vug1rsv95rzGHq7OiuoSd8RooRD +FKuGxpDCnbiGgg1OwP6UGqWZ/B3V9mhZ24o7w+HVFvvktMeRyruJgKjvzvCf +2LmpG63jSP/q5aLcHheIO5PGHIr/gbL4p3XTGl2hyW3fDVmFCVS9Y9OnhIdu +MPfcXyotegJlGl2QnC90h4qFXW9DuydQ2+f8RP1kDxDuHZfbZTKJqmxuaoSd +8gSbQ6XDOjmTaDJ4H08I0wsqLc1yfy1OIu4uWuC4mTdon+Vbz+s9hQq+d/6M +2LwfuHMrVC83TiHXv/P9vcR8IOqI1XpQnUYVD6z28531AcsLJqH98dPIWPHt +r/O/fMDFMWkT8+s0Uu8J+PTmgC/wDfoELzecQQOiB/fe7PeFaULeIC9lBrVf +tPXf7eQHrT+3HUz5PIPS2dmiR9r9IKTyUusAjYsaHi/+8rf0h2uiYiKcUC5a +6Qln9ev8Yc3evPcChVy0dtWLNqUGfwjfEZQ8ha3HsZEXfOwPA42utV/uc5HD +Vo97H5/6A3lrMqSqmIvSlaJex7z0B4dI0t6znIsUuu+vbPnoDzD67PmlWi7S +8JbL9Jz1h6S/VqkmN3ORsc94QYIBEwKUgt6093DRnesTEbabmWA6H62c3MtF +qzqmtssxmODr20Hu6uOi8Z2z7wq24PGO1xN1/Vz8/+JZxjFlQs0Boy83SS5a +MSvpJmXPhOzBrmUWY1w0kGIonB3MhEm9hrMms1x0sf7Egdo7+P2Pt0rOi1Io +mJ5hzC5ggpMFx2qtGIWs75ULMwqZEHjhs381tkgGea+mmAnnBw34e8UplBBu +N1JdyQR+p++8ehIUOkHTOFj1jAlFGy71Vq6iUFDG60MPvjAhjCDD3JQpZLmC +3BrewwQe0Z2Mr9gbEnjE6X1M6LFzP8pUoRAZblhcPsgELt3SM3gNhXxts7+X +jTGhNTjnMVuVQq4CESGlv5mw7fOT9iOaFNodoRBWJMuCUO9vSUI6FHqWnbgn +TZ4Fc08lFxKxt3KmNNgKLBiNi+bw61JIT/N1p5kKCzZLFcQsYK/+EG32WZMF +TzVO6o7oUWjUpFtWxJAFQu0+FbcNKHSJN+dRwD4WVCpV/pWxBfe/SSzTxokF +W4g8/2VbKRTvwQ7Xd2GBUtqjhCBsdqXd+kV3FmwIlnhvsg3XTyy7fM2PBfYt +LVkd2ymk/8qP+fwwC9Z3HW8a3EGhD5c1RdVTWfAhuOV90m4KlSDxwOHLOG+g +Y+YTdvz3mabiKyww6fc5RbOgEN2yKZaRwYKw2KauJuyLPP5TNrdYwKuteG/G +kkK7QnM62UUs+Np7N45hTSFl5XObt5ewYPiiAjMWe+ZV6BW+Mha83bCprBH7 +9jpkc7GCBVW/hZOsbSj0p7v7SW4dC4YWVfa42FKo0lqxoLWFBVMHhvvs7CiU +9JtXIP0VC5Zvu3Y0BduvYMTXjcOCgG7Voy+xJfjrFAfaWOBokV+N7Cl0qN71 +0q//WNCku26zpgOF1LWuRWkMsqBMskbn3T4K/f4Q0/GNZMF9pHtwuSOF2hNY +eqXDuJ/RT1Im2LG9BiPGYyzYfbwkJwv7U2aH195pFowMMqq8nCiUtlxy5/Fl +BAzVidQ9daZQw1S3RyQfAQ0Z2gcnsIe6C8NDBAj4xkP5qLjg/VBpnuMnTMCk +gaMCG5v0Yc/tkSTAfFy+Uc0V12+9U2qnNAE3m+wyrbC3GEnRkAwB+gpfyiOw +U8WLnPVXE/DiTEf506Xxuq/liqoEzD3QGnB0oxCRX9Qio05Acs2Kz0exU1OP +fV2pSUAWY5nsX9gkIS3OTyNgFXvSpWtpXHp34JgeAWmy60Vd3SlUtyB9kqQT +YDydr3oEe/Bbz9UeAwLOec1GX8Y2eXK88R0D17tpdu4F9sChEpVHQIBq28MN +2h4UWuEabVhjSkDxNwUvM2xjMwvrcnMCPj9Wfu+GfXF137F8CwKsYqYvxWPX +8pemZu8hQMqi4W0mdv+P6LvXrQmIS5VyK8JmNMu8T7EjoHm3k94bbL/yvtGz +DgTUzjNO92Gn3CzlPeNIQEl9psw0dl+4pV6UK56/tUFIypNC4t6yu8PcCej4 +91jAWmyGZb9XkCcBhjp5wrrYKWtikrx9CJi3MZDfjV0rsue2qx8B99akxztg +93FlHzowCdAOdzLwWsrr7W+zJghwfXRkfcBSHqeM3BVIQH7+lFcYtl9NzB8I +wv3Nv/zAXsq/vWfVlkMErPvnV/qppfwUuY2GIQQ8kz919exSPntgx6YwAg74 +eHSmYIsxy11p4QQIK1zwuYJttDc2VD2SADtKZGPmUr6JVaJyFAE33nYxbmIn +a8pnybEJWKxdOJ+NXS0xWCF5HK9PT6jKbezeufJXoifw/ru/icpdyh+K7RWI +JUCzaJtkPvbmt1Y/F08SMJh1PXTJ/weW/e4i "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + "PlotRange" -> {{0, 180}, {0.6995501792429035, 1.3976187095048485`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5311368545847414}, + "AxesOrigin" -> {0, 0.6995501792429051}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10343,7 +10526,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5311368545847414}, + AxesOrigin->{0, 0.6995501792429051}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10371,7 +10555,8 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5311368545847401, 1.7610246145622632`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6995501792429035, 1.3976187095048485`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10379,9 +10564,9 @@ TeJJND7c+6NVdi7/UzIjmEz6k7vyU4bY/JXTzO8UGn2PHKqa8/8BHmugaQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913301734961166`*^9}, + CellChangeTimes->{3.9913301734961166`*^9, 3.994388255001511*^9}, CellLabel-> - "Out[194]=",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] + "Out[118]=",ExpressionUUID->"f2b2bbcf-6393-44f9-9370-23d46faa424c"] }, Open ]], Cell[CellGroupData[{ @@ -10444,213 +10629,181 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.991848978152012*^9, - 3.99184898469532*^9}},ExpressionUUID->"ab29778f-f183-804b-b871-\ -4070462057d7"], + CellChangeTimes->{{3.991848978152012*^9, 3.99184898469532*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.47138536392029`*^-264\\\", \ + "\"\\!\\(\\*FractionBox[\\\"3.177516211465457`*^-266\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 195, - 153, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913301737143345`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994388255210496*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], +In[119]:=",ExpressionUUID->"4aac9e9f-074f-43db-b36a-ba8f3591359e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.656148098260251`*^-275\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.7521668889681593`*^-277\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 195, 154, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173723337*^9}, + 119, 42, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994388255220722*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], +In[119]:=",ExpressionUUID->"b552b72a-2f89-449e-a85d-271cd24f0f5b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.85074473590452`*^-286\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.383755764141133`*^-288\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 195, 155, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173731432*^9}, + 2, 119, 43, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.994388255230092*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], +In[119]:=",ExpressionUUID->"c8bb4639-3b71-4977-b320-3e701bc58870"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 195, 156, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991330173739336*^9}, +during this calculation.\"", 2, 119, 44, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913301737143345`*^9, 3.9943882552387533`*^9}, CellLabel-> "During evaluation of \ -In[195]:=",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], +In[119]:=",ExpressionUUID->"e198a8bf-7272-47b4-80f5-39474d034aa5"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VWsbAHCRSF0yz2cwVULm43CO5yEzSSgyRSgpEkIiQ5GiEoqUIeFe +kpyzm6lchNJMMpSEyhWiTIl8+/trr9/a6917r/eZ3k3fdcA5kJeHhweW8fD8 +/zrT96RJJb3UdPFt/pP5FZamHYUyh826kqEK3yt32yoDSr7cJdOVBfPt3ONV +tnoQ5VT5jq+rBLjhvMzTtptAdFw669c7LnTSxK7usHWBj3WOB6beNYBOv718 +jY0/WKmMfJh89wZYRX9fVLCKgF/vGOcn3g3Arhy6Tq/JMWjc9Hfp65Kf8LBO +teRCbzYofLz3ZZfGIkRn8vgR4gUgsX9npcAmPlyVVNie/KYEsnSsah23CWKA +walsJ/rf0J2nXT+55i+kf1zto/W4EtJLE17yyopiztePN/RMq8FOf6+YpLIo +5rbxHWqzqwbBJudtazVF0ZWJIx5u1XB8ULXX3kwUfznH9/qGVUOc0rMvOXtF +8SgfI1ewpBpCi2X+qN0XxVTO2YOP+W7A1sscDXtPMUzb+yHoc/0NkM4ZPJld +II4O7wVd/smsAZkNt47PlYvj/lge67TzNSDXkJrgXSOOBdfn9gTk1wBlYv2h +tY3iGNSWryVaWgOqDmG+tcPieMi85SHrTg3oLV80HNSTwPWJ2WG972tgS6TU +kO5TCSx3mcnRU+WA06rhvtx2CXQ9/kA1bz0HnEvudS+8l8CjZm3tc5oc2P7K +62XzdwmUjVJJrTbkgLfG1fsekpJ48TA/85s1B/YNbTyX7CuJxQJLKRV7OXDC +1db0zYwkStanxjEqOSB384Uc7zIpPBq1XSeimgPV4q6zOqukMFH5tU0llwOd +b3xqzlGl8K/f1wuFajmgsjVSaauNFK4La+jLbuNAw+aiFa8uSuHHBzfjWr9x +YNFq+sVzljR62Tz6dXcdFzLLY68tWkljfG5Lsa8GF1RW8KRpbpXGqryQMj5t +Ljg8FjI7HSiN6sciWkwYXMjfRCMczkjjUNVcSKQlF4zQPrftozS6FjRZC/hx +IYJ5ZeeTZBlMvZ9dQeRwwa5YeMo+QwZN9t35lpXLBSWBuLQX52Ww29JALTSf +C686tnPa/5HBCJNvx2WKuaAVtpqv74UMCjeZjbOucWG4PLr8h5wszlOtC5rq +ueAl4TgmT8iil1yZ/OthLugdqU0qrJPF4Yq2zo3fuCA0sE6K3iyLRV+3ZZ0a +48K9G3yg1i2Ld3V/rtL/wQUp+3uZ2kuyOJmhKe72m3x/koq+pb0cnmfONH1Y +TYDF9/nY0EE5HBsbujChQcBhmxz1f0fl0PWYZF2zFgHVVzR7xGfkcEHtqNRF +bQJkXH2Z9wTlcaXLp/26+gSM3n08y6clj4KsC9cZJgRkJ2dGXoyRx7p9Xd8z +bAho7V2vMpokj7mbA0rV7AhY0G9sN02Xx45O9wt19gTs/jqtO1QgjzYbOfof +HAkwdvCc1GqUR33G2+BJVwIGJNVCm/5SwLDu3aa7fQmQPvBIUVpaAdtz6MJN +fgQ4tLo/30tTwENCxSoUfwJux6ZriOgpYMXA7nUtgQSc+jgxssNdAd0vvrk8 +GkyAbkXtnu8lCiiVmPQ0JZKAPbzbpM2rFLCustTln0MEXPYcb865pYBWtoJa +LVEErBCmqxm3KqDe0+3dv2II6AlPHTo+poB2tncU9eIJSGJt9ZMzUsSWS9Z/ +po8TYONT+INhrogNCwfjJ1MIEE78dmybgyJu6DpycziVfH5jSnmmryLuDBV1 +fJpGwF27+99WnFRE31fP7TwyCEjYLxCvkq2ILpERpXqnCbA64ypsXqCIy/Dz +A8EzBHS8HteO5yjiqATol58lYMJdOepntyKKKOfZV2cRcCc2TEB0SBGv+PjV +B2YTcPTygzytcUVkuMGiTA4Bq/vdavfyUlC5IqY9/DwBa/dk8PSrU/Bfq/9E +pnIJGE/rPreoT8GdvG6DJ/MIuFmppiwPFIwRjjshf5EA8/F6y+0uFEy67mal +m0+Az6HpU8+OULDjbtYDzcsEqOaaK4ykUHBg2XeDksv/z4+z1wUyKShlvHhC +rICA2IX1r8xLKbgsvvnBF9JmlGg/32oKuvi/umpXSIAgNv2Iv0tB4fH1QZWk +zx/zkbz3jIIlm2MyvYsI8Cq7Vt7ZSUHe4uaZGtJKLXOMqX4KPjsrjTzFBPw3 +bPlE9BsFbdQuhdiTrhHK9tg4TcHB2uTELNLRGv3fHJYoyJjliX1L2tRRMz54 +JRX5n9l6Slwh4Nm5lqIyRSomZoj2pJDOJiR0GtdSUanrz+G7pD3e+jX061Bx +zZHsFV9J02erXf6YUNGjd2WSaAkBwzILQ/JWVFxeXjDCIH3D2DaK6URFoRfp +Fh6ko7wuCLh5UNEhXSwzhjTr6GBeZAAVU3YcfJFFmq9YWz0rlIpbZ4d5Kkg/ +/Te+9kYMFf8KrF1XSzpz8KnD82Qq9g5usH5C2o1fpm8kg4qnp456t5OmrA08 +IJhLxYrt8/u7SX+24fKoXaGincDnqF7SVcFL5zZdo6Icnoj7//2IDAdlv1tU +dIlST/j/euPqizePPqJi/g7ZxP8/3+Ldi8XxVirSTH0y60g78iy33vmGisOf +21SrSLuvZ2a+7KWiROdBszzS/s6h3fCZimIJvkOJpEOPXFWqGadiu0mFyG7S +MaVd+2hz5H5s9WmyJv3vl1SPVh4aHh3N4lMjbXWEnpDIT0MDFc8XPKTbROqu +GgnR8NZ0m2oXud9OpdtbJ4Rp6GL5W6iKdKfR5Og/4jT0/bB0NI605/N0UT8Z +Gh4ImUy2Jd3vp2Yoq0jDrJPD0uKkd8/Ue7ym0/BSxR/TbjL+YdSZq2YbaPjY +/Ie1J+lpIrP110YaeksLaEiTjrXZMMbRp6F9WUX5SzLfUg76GiqZ0vCmzZoA +Q9JCK3579JjTUP6eWMUQma+Z+ecTsqxpqJFLPXmWdH7j01berTSUedtH6SXz +neoeOHZ/Gw07ozo7j5AuHV0SjfCgYYygv5Ys6RuSBp6D/jT06n9Rb0vWT9Oe +orHGKBou/NiQnUzWm+0CUyzuCA3dKpf2CJJ+kdlhqJ9IwwfzZZ9PkfXZfW9l +YulJGsaLyPankPU7vipSLOUyDddfPP3D5QIZ72JhBvsKDdN6hrQekfU/p1/h +OV1Gw30WSYprSfP59JUG3qChB8NZaozsHzI1NgyrBhr231rM3XqOgAKLQc8/ +zTQ0vElPK8kk6687PvF2Gw1D/tXWnyD7kSYv8UTtLQ2tByabksh+Ze6q6CUw +TMOw3e7f4tMJ2D83mdj6Fx1jo2d9e8l+aXxwt9QXMTrynJiL/HyMrP+Rnmt8 +MnT0OiL29FsyAWW9jZ2mSnTcWL7CdCyRgL6H5zVuGdKR2uYT2xhHwJYUZteV +nXQ0oMQRDyPI/P9zPeRRAB03Ob6/fDqc7D9RSnwf9tJRSbLgk/tBAtKCVmnJ +RNLxQsXPY0OhBNTbfzh2Jo1cby3i+WovOR/EkjYe4dDxaGrbi98+BPCkTzfl +3abjwAUZ5jlvcr/5gj1u19IxZuK3rLIXAfumnVMmH9MxteCgFWsHGc8uld49 +PXR8wPMg1sKFAKmi1lRXPiUUunW967oVAb82rOnT3KaEWdTHbybUCZgpkEvS +81BCNyc/Ffp6AqZEVFWYO5Uw8b2uheNaMn4/mcEWe5VwV7DvdKEyOQ9r/Wc8 +4pVQXCHcUU6B7A/2d4TTypTwWfkXv1hynufv84GBaSWMuRPqNzrChdwPQQNf +55Wwk/6x7x55fsjZEpEytqSEloV/dh3/woUzemltcyuVyXmRkLpmgAvJvzlu +IhRlfM6WCOHv5sK+dP4wlpUybpY95ejfzAXWtariCxeUsf3xkvpCIRd6adeK +LC8p49L2vdr5l7kQe6GicKpIGW2WRb0xIM87d5LKLztXKKPluaM/As9zQde9 +OE+4ThlV21OeVaRzYT1/TmbqJ2X8Ki1r8m80eV7ZeSQxSkMF/77+pZTpyIVJ +MTvf7Q0qWHXNNLJ8igNd+5VeBbeoYPGhvhUxkxyob56HhGcqmJzVy7Ye50Bm +7DXqP50quHymp7jvKwe0B1Z//DWigoNjB8MnezgQynnpXSCuival8TwV9RwY +2bLNcyhAFa/WldaEnOLAUIbv9nABNTRZ2NpcJ80B2+/Rtp8N12Js99+HA7Vq +YNRfMOJmwjosrmm2EWJUk/8X0rwnGtajTC8tx2XxGog9VztT810dg3b/oLB6 +K0Ah7YaToaEGar6cRjjxN+RtYK4R36OJbap3vYd9y+CpnJnBz3NaKBZwtemX +81UwVmjI3Ni5Ed+JTgWNal0BYb6SSL9kbZTWcMmWzCkEShKVtUNNB3WYJW/l +6vJhparXbecWHaTNPb8KmAtabNkb0d66WO/W+PWzZQ6E94k12vHooe1nPUNL +93Pw/WfGNts8PSz1no2qaD0N1hub82019VFwsvLWvriT8PCnye/ZF/pI17kT +dN4nBUI1dHteBxpgg2TVvp+8ycAeD+jYsdIQi78UOcfeiQdLFZnNf5UYoqx3 +542VlTGwLvFUTAODgemDKKS9LxLqTMr4HYwZuOd6lre+RyQ4zT7Kesti4IZe +rzgL20iICZ2uGjZj4JWWruVpayOh1cv3k7ADAx/MCBVcGoqAIKahnacvA1Xt +i558942Aih+f5KfSGOg1uJyhvCsc1AOZj1R7GJixpmFfeEoYnFVynD/2noGi +FxX1tGLCYOrjLoOBPgaOyFkv/QgOg4ceGdcKBxm4nnkjO9cpDJydPuZKjzHQ +8MwtDQeFMDhskhK2kscIq7oObHoYfABaRV/Tx1SNsDVk+pbM+xAIfBh0/OZB +I8zmJEyLTQbDeMhItGWkEe7Opaz+rysYYhT37+uMMsJdBWLc1/XBcCrugPPc +ESPMvbuU0JMZDDXGUTRWqhE+LW+baNUJhoXbx+oa843wde/bXJHovZB1o3Dq +TaMRXrAVN5oTDoJHxR0Bk5JMfDVvMT54MBD6Heg7o2SY+O37lU+BPoHA8ytk +x285Ji7cCtKYtQsE860Cjvw0Jnps/XLFWiUQmpcZM2TVmah93mpZ0bsAeLar +aKWZKRMzkw3MqWYB0KMSXJ25m4mjYvuFVKj+MPXP0uzGO0w0vvvag8XvB1+2 +WxWfvMfEEv4yjteML3QtP20zWMtEhefRgWlffaHWV+7ihXom2sZ9b1n21BeS +ZQyMF58wUcP7DHHkrC+sSQuOe/qeifOGv1emKviCxp63PIG8xphmq9WZFu8D +/qrXVuZvNsalzWuF+iw8IfaxT7CakzEeyV9ycFb3hMxAsTauszHumezd/kHE +E+rKDme0uRnjnVmhBEavB0io2Ygs+hmjhtigz3y4BzSrfZbwjTJGTRl3/6ry +HaC+jkpTKzLGVQIBLi4Ud5hUzzbkThjjm3vOutvst0HXM7QU/2mMNVLmC8GM +bVAfOu4SOW2MDqVyzueUt8EZru1Bw3ljfPCfS4TIgiuoG/NU3eczwTPFLbav +rrvCLtsQeqOUCd7njNp4SLhCxx7r1R0sE+wOWNuBY85wt/T3p+k0E8x86GA8 +3eYEhpsiZ+3STbC4w/362jonuPVpdHXxaRNsopTs31PlBFxKH8MuywRTFp5X +CJ92gqq8+tOFl0wwVa5L4rejExRnpDCtq02w7Kb4QGrlFjgZKXIur90Ew3M0 +2ks6N4OHhTKaUFj4W0Rjf1eUHSx2CAo30ljIm1PWtd7TDooDx3vtlFnYPGHq +ch7s4EvqvWiPdSzc3WZHuS9oB+FPttw4rMvCl2sEHxldtoVTjnGUu1YsfHxz +YGK2xQbuu79d0D/AQqkZYn5cxxrkQ07c06pnYWp6TPhBews4s7TbIL2BhSUJ +/55SYFgAb5YV52sTCxV1+MV7lCxg5DZ/RfETFi5XZjAz5jfBfZ7jeWLtLPQ+ +4m/VVrkJPHISo2c+szDs67L2v4U3QV7tYYOHq9hYKMT7V8ygGax23MGRE2bj +ov/H3G2vzSCx30gzeg0b2ya+vd70yAyC+OdUtCXZ6PnntaLzJTNgbImSKKGw +cbD1cKG+qxl0DoT/TNFho/dd9ev8TxAkhfZzNruxMVJ3h8Z8HEDppvjYiR1s +vMKyrBx3B9CNP7Mp24uN6/77zBU0AHCcqHnb5cfGsv7anqoxU0jtnP7lv5+N +HePFLRxfU5grSTCPTWLjh/YXSZmb2dBjkt1efo2NDS+eC9w3M4GgQ6WXbavZ +GEoegqlKJjBTfStwtIaNJY0T5WW8JiCm1DWrc5uNw2VOx6WajMFeUFHhQT0b +D4xoSx+3MYa6jvKA9rfk9xddeBThxgQ74buaUV1snGDNOX1iMqHL+smMTC8b +A8XkgkIVmDB1/1uaTz8bfd3za758MgLNK9rX/xth48mBs6EOoUZQ12MWlTHG +RsFBp0nuViOwk3CBjRNsXElbL2xkYAS7Txx6HTnNxi2DfCUFCwyYqk/Nl55j +o7Kt7sf4fgYkz+f6359nY3TmS/O4Jgas0a/Q8F5ko8PyDTV5/zCgMOT+9NIS +G/2eVAq1ZzDgf3jbA4M= "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10664,172 +10817,136 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwV13k0VWsbAHCRSF0yz2cwVULm43CO5yEzSSgyRSgpEkIiQ5GiEoqUIeFe +kpyzm6lchNJMMpSEyhWiTIl8+/trr9/a6917r/eZ3k3fdcA5kJeHhweW8fD8 +/zrT96RJJb3UdPFt/pP5FZamHYUyh826kqEK3yt32yoDSr7cJdOVBfPt3ONV +tnoQ5VT5jq+rBLjhvMzTtptAdFw669c7LnTSxK7usHWBj3WOB6beNYBOv718 +jY0/WKmMfJh89wZYRX9fVLCKgF/vGOcn3g3Arhy6Tq/JMWjc9Hfp65Kf8LBO +teRCbzYofLz3ZZfGIkRn8vgR4gUgsX9npcAmPlyVVNie/KYEsnSsah23CWKA +walsJ/rf0J2nXT+55i+kf1zto/W4EtJLE17yyopiztePN/RMq8FOf6+YpLIo +5rbxHWqzqwbBJudtazVF0ZWJIx5u1XB8ULXX3kwUfznH9/qGVUOc0rMvOXtF +8SgfI1ewpBpCi2X+qN0XxVTO2YOP+W7A1sscDXtPMUzb+yHoc/0NkM4ZPJld +II4O7wVd/smsAZkNt47PlYvj/lge67TzNSDXkJrgXSOOBdfn9gTk1wBlYv2h +tY3iGNSWryVaWgOqDmG+tcPieMi85SHrTg3oLV80HNSTwPWJ2WG972tgS6TU +kO5TCSx3mcnRU+WA06rhvtx2CXQ9/kA1bz0HnEvudS+8l8CjZm3tc5oc2P7K +62XzdwmUjVJJrTbkgLfG1fsekpJ48TA/85s1B/YNbTyX7CuJxQJLKRV7OXDC +1db0zYwkStanxjEqOSB384Uc7zIpPBq1XSeimgPV4q6zOqukMFH5tU0llwOd +b3xqzlGl8K/f1wuFajmgsjVSaauNFK4La+jLbuNAw+aiFa8uSuHHBzfjWr9x +YNFq+sVzljR62Tz6dXcdFzLLY68tWkljfG5Lsa8GF1RW8KRpbpXGqryQMj5t +Ljg8FjI7HSiN6sciWkwYXMjfRCMczkjjUNVcSKQlF4zQPrftozS6FjRZC/hx +IYJ5ZeeTZBlMvZ9dQeRwwa5YeMo+QwZN9t35lpXLBSWBuLQX52Ww29JALTSf +C686tnPa/5HBCJNvx2WKuaAVtpqv74UMCjeZjbOucWG4PLr8h5wszlOtC5rq +ueAl4TgmT8iil1yZ/OthLugdqU0qrJPF4Yq2zo3fuCA0sE6K3iyLRV+3ZZ0a +48K9G3yg1i2Ld3V/rtL/wQUp+3uZ2kuyOJmhKe72m3x/koq+pb0cnmfONH1Y +TYDF9/nY0EE5HBsbujChQcBhmxz1f0fl0PWYZF2zFgHVVzR7xGfkcEHtqNRF +bQJkXH2Z9wTlcaXLp/26+gSM3n08y6clj4KsC9cZJgRkJ2dGXoyRx7p9Xd8z +bAho7V2vMpokj7mbA0rV7AhY0G9sN02Xx45O9wt19gTs/jqtO1QgjzYbOfof +HAkwdvCc1GqUR33G2+BJVwIGJNVCm/5SwLDu3aa7fQmQPvBIUVpaAdtz6MJN +fgQ4tLo/30tTwENCxSoUfwJux6ZriOgpYMXA7nUtgQSc+jgxssNdAd0vvrk8 +GkyAbkXtnu8lCiiVmPQ0JZKAPbzbpM2rFLCustTln0MEXPYcb865pYBWtoJa +LVEErBCmqxm3KqDe0+3dv2II6AlPHTo+poB2tncU9eIJSGJt9ZMzUsSWS9Z/ +po8TYONT+INhrogNCwfjJ1MIEE78dmybgyJu6DpycziVfH5jSnmmryLuDBV1 +fJpGwF27+99WnFRE31fP7TwyCEjYLxCvkq2ILpERpXqnCbA64ypsXqCIy/Dz +A8EzBHS8HteO5yjiqATol58lYMJdOepntyKKKOfZV2cRcCc2TEB0SBGv+PjV +B2YTcPTygzytcUVkuMGiTA4Bq/vdavfyUlC5IqY9/DwBa/dk8PSrU/Bfq/9E +pnIJGE/rPreoT8GdvG6DJ/MIuFmppiwPFIwRjjshf5EA8/F6y+0uFEy67mal +m0+Az6HpU8+OULDjbtYDzcsEqOaaK4ykUHBg2XeDksv/z4+z1wUyKShlvHhC +rICA2IX1r8xLKbgsvvnBF9JmlGg/32oKuvi/umpXSIAgNv2Iv0tB4fH1QZWk +zx/zkbz3jIIlm2MyvYsI8Cq7Vt7ZSUHe4uaZGtJKLXOMqX4KPjsrjTzFBPw3 +bPlE9BsFbdQuhdiTrhHK9tg4TcHB2uTELNLRGv3fHJYoyJjliX1L2tRRMz54 +JRX5n9l6Slwh4Nm5lqIyRSomZoj2pJDOJiR0GtdSUanrz+G7pD3e+jX061Bx +zZHsFV9J02erXf6YUNGjd2WSaAkBwzILQ/JWVFxeXjDCIH3D2DaK6URFoRfp +Fh6ko7wuCLh5UNEhXSwzhjTr6GBeZAAVU3YcfJFFmq9YWz0rlIpbZ4d5Kkg/ +/Te+9kYMFf8KrF1XSzpz8KnD82Qq9g5usH5C2o1fpm8kg4qnp456t5OmrA08 +IJhLxYrt8/u7SX+24fKoXaGincDnqF7SVcFL5zZdo6Icnoj7//2IDAdlv1tU +dIlST/j/euPqizePPqJi/g7ZxP8/3+Ldi8XxVirSTH0y60g78iy33vmGisOf +21SrSLuvZ2a+7KWiROdBszzS/s6h3fCZimIJvkOJpEOPXFWqGadiu0mFyG7S +MaVd+2hz5H5s9WmyJv3vl1SPVh4aHh3N4lMjbXWEnpDIT0MDFc8XPKTbROqu +GgnR8NZ0m2oXud9OpdtbJ4Rp6GL5W6iKdKfR5Og/4jT0/bB0NI605/N0UT8Z +Gh4ImUy2Jd3vp2Yoq0jDrJPD0uKkd8/Ue7ym0/BSxR/TbjL+YdSZq2YbaPjY +/Ie1J+lpIrP110YaeksLaEiTjrXZMMbRp6F9WUX5SzLfUg76GiqZ0vCmzZoA +Q9JCK3579JjTUP6eWMUQma+Z+ecTsqxpqJFLPXmWdH7j01berTSUedtH6SXz +neoeOHZ/Gw07ozo7j5AuHV0SjfCgYYygv5Ys6RuSBp6D/jT06n9Rb0vWT9Oe +orHGKBou/NiQnUzWm+0CUyzuCA3dKpf2CJJ+kdlhqJ9IwwfzZZ9PkfXZfW9l +YulJGsaLyPankPU7vipSLOUyDddfPP3D5QIZ72JhBvsKDdN6hrQekfU/p1/h +OV1Gw30WSYprSfP59JUG3qChB8NZaozsHzI1NgyrBhr231rM3XqOgAKLQc8/ +zTQ0vElPK8kk6687PvF2Gw1D/tXWnyD7kSYv8UTtLQ2tByabksh+Ze6q6CUw +TMOw3e7f4tMJ2D83mdj6Fx1jo2d9e8l+aXxwt9QXMTrynJiL/HyMrP+Rnmt8 +MnT0OiL29FsyAWW9jZ2mSnTcWL7CdCyRgL6H5zVuGdKR2uYT2xhHwJYUZteV +nXQ0oMQRDyPI/P9zPeRRAB03Ob6/fDqc7D9RSnwf9tJRSbLgk/tBAtKCVmnJ +RNLxQsXPY0OhBNTbfzh2Jo1cby3i+WovOR/EkjYe4dDxaGrbi98+BPCkTzfl +3abjwAUZ5jlvcr/5gj1u19IxZuK3rLIXAfumnVMmH9MxteCgFWsHGc8uld49 +PXR8wPMg1sKFAKmi1lRXPiUUunW967oVAb82rOnT3KaEWdTHbybUCZgpkEvS +81BCNyc/Ffp6AqZEVFWYO5Uw8b2uheNaMn4/mcEWe5VwV7DvdKEyOQ9r/Wc8 +4pVQXCHcUU6B7A/2d4TTypTwWfkXv1hynufv84GBaSWMuRPqNzrChdwPQQNf +55Wwk/6x7x55fsjZEpEytqSEloV/dh3/woUzemltcyuVyXmRkLpmgAvJvzlu +IhRlfM6WCOHv5sK+dP4wlpUybpY95ejfzAXWtariCxeUsf3xkvpCIRd6adeK +LC8p49L2vdr5l7kQe6GicKpIGW2WRb0xIM87d5LKLztXKKPluaM/As9zQde9 +OE+4ThlV21OeVaRzYT1/TmbqJ2X8Ki1r8m80eV7ZeSQxSkMF/77+pZTpyIVJ +MTvf7Q0qWHXNNLJ8igNd+5VeBbeoYPGhvhUxkxyob56HhGcqmJzVy7Ye50Bm +7DXqP50quHymp7jvKwe0B1Z//DWigoNjB8MnezgQynnpXSCuival8TwV9RwY +2bLNcyhAFa/WldaEnOLAUIbv9nABNTRZ2NpcJ80B2+/Rtp8N12Js99+HA7Vq +YNRfMOJmwjosrmm2EWJUk/8X0rwnGtajTC8tx2XxGog9VztT810dg3b/oLB6 +K0Ah7YaToaEGar6cRjjxN+RtYK4R36OJbap3vYd9y+CpnJnBz3NaKBZwtemX +81UwVmjI3Ni5Ed+JTgWNal0BYb6SSL9kbZTWcMmWzCkEShKVtUNNB3WYJW/l +6vJhparXbecWHaTNPb8KmAtabNkb0d66WO/W+PWzZQ6E94k12vHooe1nPUNL +93Pw/WfGNts8PSz1no2qaD0N1hub82019VFwsvLWvriT8PCnye/ZF/pI17kT +dN4nBUI1dHteBxpgg2TVvp+8ycAeD+jYsdIQi78UOcfeiQdLFZnNf5UYoqx3 +542VlTGwLvFUTAODgemDKKS9LxLqTMr4HYwZuOd6lre+RyQ4zT7Kesti4IZe +rzgL20iICZ2uGjZj4JWWruVpayOh1cv3k7ADAx/MCBVcGoqAIKahnacvA1Xt +i558942Aih+f5KfSGOg1uJyhvCsc1AOZj1R7GJixpmFfeEoYnFVynD/2noGi +FxX1tGLCYOrjLoOBPgaOyFkv/QgOg4ceGdcKBxm4nnkjO9cpDJydPuZKjzHQ +8MwtDQeFMDhskhK2kscIq7oObHoYfABaRV/Tx1SNsDVk+pbM+xAIfBh0/OZB +I8zmJEyLTQbDeMhItGWkEe7Opaz+rysYYhT37+uMMsJdBWLc1/XBcCrugPPc +ESPMvbuU0JMZDDXGUTRWqhE+LW+baNUJhoXbx+oa843wde/bXJHovZB1o3Dq +TaMRXrAVN5oTDoJHxR0Bk5JMfDVvMT54MBD6Heg7o2SY+O37lU+BPoHA8ytk +x285Ji7cCtKYtQsE860Cjvw0Jnps/XLFWiUQmpcZM2TVmah93mpZ0bsAeLar +aKWZKRMzkw3MqWYB0KMSXJ25m4mjYvuFVKj+MPXP0uzGO0w0vvvag8XvB1+2 +WxWfvMfEEv4yjteML3QtP20zWMtEhefRgWlffaHWV+7ihXom2sZ9b1n21BeS +ZQyMF58wUcP7DHHkrC+sSQuOe/qeifOGv1emKviCxp63PIG8xphmq9WZFu8D +/qrXVuZvNsalzWuF+iw8IfaxT7CakzEeyV9ycFb3hMxAsTauszHumezd/kHE +E+rKDme0uRnjnVmhBEavB0io2Ygs+hmjhtigz3y4BzSrfZbwjTJGTRl3/6ry +HaC+jkpTKzLGVQIBLi4Ud5hUzzbkThjjm3vOutvst0HXM7QU/2mMNVLmC8GM +bVAfOu4SOW2MDqVyzueUt8EZru1Bw3ljfPCfS4TIgiuoG/NU3eczwTPFLbav +rrvCLtsQeqOUCd7njNp4SLhCxx7r1R0sE+wOWNuBY85wt/T3p+k0E8x86GA8 +3eYEhpsiZ+3STbC4w/362jonuPVpdHXxaRNsopTs31PlBFxKH8MuywRTFp5X +CJ92gqq8+tOFl0wwVa5L4rejExRnpDCtq02w7Kb4QGrlFjgZKXIur90Ew3M0 +2ks6N4OHhTKaUFj4W0Rjf1eUHSx2CAo30ljIm1PWtd7TDooDx3vtlFnYPGHq +ch7s4EvqvWiPdSzc3WZHuS9oB+FPttw4rMvCl2sEHxldtoVTjnGUu1YsfHxz +YGK2xQbuu79d0D/AQqkZYn5cxxrkQ07c06pnYWp6TPhBews4s7TbIL2BhSUJ +/55SYFgAb5YV52sTCxV1+MV7lCxg5DZ/RfETFi5XZjAz5jfBfZ7jeWLtLPQ+ +4m/VVrkJPHISo2c+szDs67L2v4U3QV7tYYOHq9hYKMT7V8ygGax23MGRE2bj +ov/H3G2vzSCx30gzeg0b2ya+vd70yAyC+OdUtCXZ6PnntaLzJTNgbImSKKGw +cbD1cKG+qxl0DoT/TNFho/dd9ev8TxAkhfZzNruxMVJ3h8Z8HEDppvjYiR1s +vMKyrBx3B9CNP7Mp24uN6/77zBU0AHCcqHnb5cfGsv7anqoxU0jtnP7lv5+N +HePFLRxfU5grSTCPTWLjh/YXSZmb2dBjkt1efo2NDS+eC9w3M4GgQ6WXbavZ +GEoegqlKJjBTfStwtIaNJY0T5WW8JiCm1DWrc5uNw2VOx6WajMFeUFHhQT0b +D4xoSx+3MYa6jvKA9rfk9xddeBThxgQ74buaUV1snGDNOX1iMqHL+smMTC8b +A8XkgkIVmDB1/1uaTz8bfd3za758MgLNK9rX/xth48mBs6EOoUZQ12MWlTHG +RsFBp0nuViOwk3CBjRNsXElbL2xkYAS7Txx6HTnNxi2DfCUFCwyYqk/Nl55j +o7Kt7sf4fgYkz+f6359nY3TmS/O4Jgas0a/Q8F5ko8PyDTV5/zCgMOT+9NIS +G/2eVAq1ZzDgf3jbA4M= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07670375492764694}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10841,19 +10958,19 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07670375492764694}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10867,171 +10984,135 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8bAHAr4xohK5R9L3dQyEo9j5EyMqPISqFSRtlSRMgKFVpCKAmR -klHKuFfli6KiJCuVsmciv/v767zer3PO5zzn+Tyf53OOnIefrScbCwvLPVYW -lv8fF/pfNSsmXdnplnzPWdDLZWd3jkSYQc8p8F972fBkUQ9QtMNDouc8hEUv -TgQvmkGw9f2P7D0ZkEYNCt616ARCE+IZfz7mw19CRvjownH4Wm/pN/exEqLc -73LlzIeDieLYl+mPjWDmtZaUOZUIfz5qX536+A6Uo6U6UvuuQ5PR3YK3+cPw -RjRqPDyvBKS/1ox6UMchdOvU/rfSVSBywu0+l9EsGA/W1j54XwMZW03qLO2X -gHHfxiTAqwHUPjvu3nF0CeJ9NKTawhqgLfZkFyViCTiLBSelUhqAs+fKL+68 -Jfja2B95/VEDRJwdlmr6vQSZJ/iseVhewJE3UWe0Y/+AN8OWFGT+ArQ863bI -PlqGtxLkRzz9L6A3e8uLacFVEFupcMqbfgnXu0rWByutgvlc9Nak5ZfgJEBy -W9ZdhfN/Lg+dZG+EvphN/9gOr0JrfeerTaKNMOBL0Bd5vApnvBePkXQa4Yfx -SLWW4z9wI3SMfT3TCEtTWeUReWvQGurx5ANLE9RQNqytPV6DwtyfZz9yN0G4 -V6pl7Os1UE6y+dIp2AQrn2PHk2fXYOxB8L5S2SaIGn4q2iHPgrMErmU+bILY -9kK7gUAW5JIOz/OMbIKkgnMdbBtZUXCI7hAw0wRmmseERRVY0T7avMn9TxNw -N9vak2is2Piv49MelmaIHVb6bG7AigI8GpzsAs1wRr5t9MoxVvTe3KUqo9IM -vrkS/4i1rBj5MLN33qUZbG5WUM0PsiEr8ZCAWGMzCFJv+Ll4sqFxrPuERGsz -tNfFVvr5saH9aL6zSHszmH3er3Mlhg1lDaIG53qbwVDyn9GXEjYc0Tp3xnm6 -GTSzzQ76rbDhd8Z0bMvmFhC/Mnzx8i12LOJlU1s53QISlMexS0XsqCvy9PPT -0BaQbIw75/KQHW91RnD4RbbA5imVIFITO0qFTr9ixLWAkoW/e90Pdqy9V6pA -udYCGhyrWsMaHPjoWLVoTX0LWAWKjai/5kDzo7QnM/9awJr3R39WFwd++3SF -4ysbHWzza3pX+jhwn4tpVzMnHRw6nTvokxw4PzI3c0aADi7UO7VOouvwwN6Y -Xbc30cFnRC39vPs65JwQuPxAjw7x+0x3vltYhwW/Tuwd96ODZFW7JBsrJ06a -eEbuPU2Hsg37FrfycqLM4AfpomA6fHjn+jBdhhO5jLtKMZIOijaB8jZ7OFGl -p0tdKpEOjXtvc3Ze48TbxzxKvPKZ8ZQqDq/d4cSyxTJTy0I6jPHdb1Ar48SN -TqxHVe/RQaitKvRSIycuWHur9JTSwd3s9ZjlL06UfjY88PYpHVZN5tv/0+fC -SJYRfbf/6JBWFF6yasKFnVMW/h0dzOdzsiTQbLhwl6yhjs47Oli0EAxSPLlw -e3l40uwHOlw3kn1kkcqFG+/d9BYaoIPqncJLZ7K50K6+2dtkiBkvG+XEg3wu -HONU4w4cocPPl9uU+Kq58K/yuFrNDzrooHnWm69ceGjgvcmvKTq03e48/fcn -Fx4Lqwv8NsOMd83emjLHhSSjRKueOWY+n7vzJHFzo92xSOF7S8x86QdHmG3l -RpncZyuTa3Q4rZvn9uo8N/q8rBqV52eAWa7AnHkyNybrPWG/JMAAea4zCe1X -udGi/+uHufUM6Ox2qOi6x40ugi2FpcIMUPXnY+9v58Y/KZuFusUZsO5jWJZ7 -DzcOzF4lCGxkQN+O75ThQW50SimlG0gyIIm3cd+POW70z6CkZEoz4EdRSNGM -JA/23VuKmpdlQAP/N70gRR40W5urX5VjQGagbccijQeXCyta1+QZsMuQtrSC -PBjESXOYVmRA/pchUy5vHjT8zRaWqMyAMGPr/ov+PJiQRfc4pMIA65Jnp/jC -eVBsUYCsTmbAWmj2DaEUHmybhQMvKQxwFrEcl3rEgya7aZ6ZqgzQiKiLzqnn -wZ1u60/qqzGAMKQsJkfnwYz5T+59TNeUswOxlwc/t1zaQNjKgDSxgK57QzyY -XKz2IYvpo5H93pTfPChwkJgso84AMfOatC1rPBguktsrrcGA8Qqi0iNuAmqK -jAdmMN0scaVmmzAB7f5T5GXTZMDNc6yWT6UIOK+hnuPD9OlR3yE9JQIO3GDb -0sG02d6+4GeqBDzx5EIjdRtzfqpMeVGHgGfTSvfHMt0Zrai5y5yA2wMb0uW0 -GHD3R3orYx8Blyyv6XkzfdZqzdnMlYBG8YvjRUw7PDkx3eZNwJnuj6UDTNM2 -fbpgFUBAHtA7I6LNAI7Y3ZLvwgn4cKPcQUOm+8aqyvbFElCSI93iONOPbOSN -PqYQMGg0zTaZ6cSnlz46ZhGwbVLF7x7Th2RWffpyCbh42bvgOdM6ccdZ3O4T -MOHi/rl2pgXHP14ZfETAAgbPoV6mv9vtUjnyjBlvTNrvL0w/r618Nkon4LUt -LNf6mM6Uk7U91knA0TC/o++ZPpmQMvqrl4AnjRedW5k2nlwO9x0mYOf9ytDH -TIftuUJ++ZuA09ce7rnFdFke7dOGBQKGaeidPcf08DL9otcaAStibaScmZbY -565bw82LC7eW5TSY3lv65wevMC82pm2/wsH0ec7L2a5SvPjipHRgJzNf1W7U -PRWKvDhieLcpk+nfT1sW2VV58eTGH7H7mZYTdrvroM2L/2Z/1wj/P98+Sw7F -yItFbS1HWpnzldSczrnCnMLljNj4UKZfbKI8sbTjRR7yDkUFpueDmz3znHkx -3mvdjlbm/JM7XUTnPHmxmm++y5vpy+fTAq+F8mKL6aPYTGY9tX5WUfwdzYsP -19XlKzG9otnUtTOJF6MDnHeXM+vR6/u8+sgt5nhps9RKZr3ewEtDWnd5kZa1 -9RSF6c5ryhkXHzLjm7pmcnsLA/QsDk6rNvHitd7UwmBm/fsVzuVGt/Ficckp -zU/M9VLwL8W6+z0vltmoHdRhWqDiRXnYD16U6J8PHaEyYEiU6NvMz4d/jQM0 -VpjrUdyvYZO4OB8+k2p9rsm0ReuB/47J8qGm14NZb+b6fRKeRF2vwYf8xRsP -Pycy6+nr1JjjAT6MvdqRRVFg9gedxOsPDvGhhEF7mS6zH8ylK5itHedDnYio -aENmv3A1diguiORD/zCNw8YyDFAvrvOezOfDsoxbB3ikGODNZi9u+IAP+3IX -UsaZ/enmwQn6lcd8SHudmd4mwQBOATmiXisfdnaK8keIMeDTqbiR2HE+dHpo -Ln5diAHR+jaHJHX4cWip8dIQJwP2uObMaBvyY5tN+Wn7dcz3j/oVY2/Bjw0p -ud6N7Mzxmy4Upbnzo+X2jcmJLAx4alb7i/MiP3KWJ8t0/6HD1AGF4NlefixP -DtGx+kWH6nB/LqERfvx55132kZ90OHvzWbbqBD/Wp+jrB36nA9/A/rpjbAKo -pWrseH6YDiTvZJYBsgDynWrY7fSZDq5B84ltEQLo1OfY+/cVHZSyDKXHLgjg -5Zx9808YdGZ9XirlShNAhWzriyda6BC+otJpWCCAJa10IuMFHa7GuIrWtAlg -2MsjmXrVzP0lnXG7cNN6zI69YrTpDh30yq5VnW1Yj4cXq1jHmPuv8cf21YnW -9Sjm6r2VFkgHSxaO3W7v1mNPa+qUTwAdDtv69sK39ajI1qbc50MHkwi5c1Hr -BDEkVP5dvDsd/GUW7hhQBPF6fdAVAVM6NHvfHm8KFsQ9Tk1HJ8ToYLqiK3wm -QhDrmgnqxRvo0J7WraUZJYi9Kn9/uAnSobeGJ6rgoiC2vO2ivOShwwRvoPCF -m4K40BTsaLfC/P55uEfbpFEQ1d9aLz4daIETS9NRrfxCOHWJHphT1AJ6AV5i -o8JCmHjDbyQpvwW4xz6VsEsIob5By2pgTgsUfm76sFNeCE/dkNyhl9kC/c+v -Uh9rCeEAjd85/QLze+iCbk+emxDG9/+8GHS4BdSFo9UiKoRwA//Stq3SLfCH -IthPsxdGu1eaAXbnm0G/5EFuZuYGfOtQYflLtQmmhc3cHRpFMGq/7qeKzpcw -kuzucIpLDJtKf8417HgBppMhpt+0xJFDrOC5XMgz+H2Y+3TVOQns/+6w316j -lvm/IM4W37gRlyfb3Eo3VIPwf8TUh5OSaMy/jqPKrAqkE8qttbSksfl6nVlO -UAVkU3QFN3hvwsGJs76dhDJ4LWmwbTZ9M353pErNlhWDnnRjmtoHGbwn03l1 -w6lCEGDPDzx0XhZ5O57pts/mweZoGX1HohzenTSKU7O6BTxKzk9sGXKYvpRI -bGrOAtUdG8tDXOTx8UOLmG1ul+GRwrG/bO7yyPf41tvSvZdBh1CzO9VDHhnc -A+/V9S+D4ccDAwXe8lj+K+inx8bL4BCQLfQuQB7tZ0xuOXVnwLlC8UBqnDwa -l+tp3bHIgE5+Md3BMnnMNev+5m+SDqf6hZvMWBQwcn31UkBdKrTSnZ/dZ1PA -2etFT6xzU2FzeVE1YZ0CJoC/iNGFVHh9Tu/Bax4F3HvR9qKHVSrIy3lcNdug -gP9NJlskjaTA28MV3mZEBUx3N/gUIZwCW35a8ZlZKGBrip5M5pkkmJxNtjfN -VkAH+6Wq7PgE6OvJc7h1XQFnqgtTLwQkwOtnT/ZP31RAiyBcPn8wAQriBxyv -5Sng1f6Sw+VqCeAkpen6874Cdo1lxf3XEw8thp+9Lj5TwP293mbiqvFwI10l -9NWQAua9LlvMH7kAu9Xo101pimiy+QNrxbkYOMC5Z1+nmiIadzvoT/vEwPEv -r/j3qyti2GMDb8MDMZCa9F/UEW1F3CDR7yG+NQY+fO/2OmegiPkaF14mDp+H -I7nD6o/tFTHqm9+9FPPzcF6I9Y3sWUX8TSkQrSFFw/PZ7X8X2xUx8e/yxEPp -s5DXVu1h91YRF3oGb8quRUJsocbrsi5F7Eue1ikejATT/ZRrnj2K6Bqovsxx -NxK6ayW1uwYVMXmGvXdEPRLGov+cKptTRPWghz3aVmdATLB67IikElYbbr5c -ey0cfKnqn956KuENbqWBplMhELQouex2VAnf3ZwKnTkQAmca2SUnjishMfxc -iy6EQNKB944EfyU898JcVZgvBO7FhvYahiuh5y5TtR9FwTDU97znUaoSti2z -pUsMBoFDivnHq9VKmDca95jHOxBcDmguKtQqoe1n6XaydSAcUdgkXlmvhEoz -oZYeuoFwumbCof2lEuocPggifIGQ9i39A2ebEt4cuz8dXXkaXu/oeR8yoIQv -HuK2IPbTsGPiSLcjDxELzXxXDB4HgFjd7vx6XiJWrIzIH8kPgIl4sr+MABFd -Ui1msi4FQI7cFO83YSLWK1Taax4PgH/7Ioz8pYmYN/i0aqdsADTUpVfGqRHR -/Gf5xtRL/mBw8XnaI3siGl09ph887wuSDnmuYgeISCbZGE13+cKMfCw1zImI -LCf+2SZX+kJ+vWnrTjciCharkeT9fYFtqnvt1VEibn2X//XV75PQ5PDLdyCC -eb7FqmD21wnYpSixlz+fiJ4bJefZWX2garxF7kgBERdoq/Ujw8dBsfr0Qm0R -EX3eLDkP0o8Dh1nH7aMlRHyUQmyjpRyHRr+4maYqIpZq5y8LSh2HnXVzWeEM -IppWEp3Htx8DLdu3Q99/E/Eo0WLcK90biqTOVe+cZL6vbUZMdog3iH6jJl+d -JuLcuqsGwy7eMBeSsM1ogYgcn4WHmsjeUHkLEnLWiCj3ODqwvMUL1H6WMtsp -CdNePuXYzOIFylGJoY3aJIw4/TCpLe4I1G8vXGehR8IwmwQzAd8jYL3YkPFe -n4SWrYcqjtsfgVDf+Qc/DEjYKOMvelrxCLQ6uw8KWJDw6X3uSw1Nh+GorpbZ -QXcStls8AXWuw1A8Myg1l0BCM6ue5725h2Bn2cq9yCQSSt744WOYdAjeHRPX -4kolofPfsK7GoEOwPGBhLXmZhAZ9z0MJ5ofArKM6Fm+R8F5bVWnlgjuMlaSM -J1eQkCHudsHO1h3InroNSp9I6Hcp4G6Upitckrdcjukjod2Ee9UJIVeY++qx -baifhGeKSgIiJ1zguVNySc4wCdeTP4XyFbuArfXXLPFxEsp7+cp8kXGBsO0X -/HlYlPHM28I9VBFnaBV6KzeupIwXhsfz88WcgNbxzdlcWRlnImN3jy46Qkby -clYxWRnVZ+gFZr2O4MylKOClpoys1nsFg246wuRK8HK/jjK6Fmw9tFfREcR+ -SHd1miujRvndwWndA+D5/GhsVYAyPvrgmbXzjANMnBwL2RWojHdNU1Tl3Rwg -dNMJnw/Bylg3YzxFMnSAxDN+tksRyhg7aup9jdsBHuoFy+rHKeOJ/0zsBbPs -YeVJTH3TdWWsVEuT3lK7DzLKc+beNSnjQAwpyULCDqTdZH8cpivjPopHlcaa -LRQK5H+ea1VGzM/9ojNqC09PFjaKtTPv3yBXebPKFr5QHqQ59TDP/x1doNva -gvK9GurQb2U8HXT5W+IVG2jI7T4yLaqCPgOeYatUaxiwkHMLllDBJ76urO3i -1sDy56TjX0kV1Prr01vNZg2GNlyW62RVMJTWvqmswgrorHraG8kqKJ3cbB3N -ZwVtHrd5DHaq4MC7UDu7N3vhk+LxsjQvFew8Ox2AJ8zhb+eTe6LHVFA70dDz -7W5zkI5kv3PdRwXPBnPnpyqYg8v7m1kF/szrV+g6KZ/NYOBCR9TTcBVMV7W+ -f3WvGXwf1bQbSFVBwz67gvu6pjB3b21RrVoFHSvb3xZu2Q2jDia5F2tU0OBa -wKWzG3ZDD0fKnuE6FUyr8PkdumACde6S1zJfqGBDHN/y23oTOC+xTW/1lQom -XFHOFzI3AcGE42de96ngJxu+sOKTu4Dq/Z7Fk42M3lT1YbvXRrBZVLr4OQcZ -e7fZPpWpMALBJg8bCS4y8qeIC/NkG8Hs5qm8N7xkNA6u+ajhZQS1HwhG6qJk -XAqJtBxlN4I9JnhhjURG0npzlwJjQzisVMJzfS8Z911ZU3zyCSG8xfU40ZqM -TuVWVxSbENI8hd9U2pJx9yCfZ0UJQn1hWPKb/WS07V6+pRSJIELcs371EBkD -i+NvBMoh0InfRNyDyVjRumix6etOICvLyBJvk/Fr/xuODAN9wNZ3UZV5ZLy9 -LeJbzEZ9cDgaN7izgIyCS/077k9vh5h74/n7i8lodqfI5XL+duhTrle6+IiM -kYXWOZ2c2yFVxZHym0FGBantUo09ujBNvqxVOUXG1NmiQ99ytaGnDXdtmCVj -qOa/ferR2vDCd8IucJ6MwspCJUWHtCG10jRAa5mMEYvi7RwK2kDWY3lQy05B -uYhJmYy7WuBhelKuSYzpfg+2N9XboNt7N1+3PgVPdOaPpc5qQB3PvOQ2oODF -nQ9Dgno0IL8kXyXTgILDf1JpZ59pgP/kqskBEwq6EHRC5uM1gD+kKrrPioI2 -dzYahWzWAJM4ucURDwpmevwwKrJRh6cFfwfnEyj42L1/trRjC2gZBS6aJVHQ -kUvzAUfNFng8+JsvN4WCFkSetpD8LVC5uV/bLIOCo7tcX1QGbYEH2S9Scm5Q -8BOfyELIpi2Qm3xBd3cZBd1lRgp3j6jCxcD16dldFAzR1o20c6UC94aEovH3 -FFy5ntOUp02FuAqWesMeCpbEDmnKCVEhdmJ69HcfBXnmUh5VNlPg7NFufYNR -CgpNESY3qlLglPO1Hz+XKOjzziWxlYcMTsYKuH0zFSv91h2iDJNgtZtboEmW -io/3WT0+1kCCXM+Jz2YKVDwXZbzae4MEo3E1IU7KVHT3tjlqZU+CU6+sysPU -qVj69W1d3GsiJFqe2fzUhIpOp3+/mXqmBLUH3q9o+lFxdAMth4+hAC4/a1/X -B1DxnXtYjXCxArCE52YbB1LRfq3fyihJAUxu+GjuC6Pis9jrggrWCvDuC+uJ -0zFUrGDxG/rwWR7GPFQ/V2RRMVMl/dbAshxInYyvUX1BxbEvOcPrHWQhdc1r -W1IjFcO+sXbc3ykLbBkmFd+bqRjxrUfKkyQLY0/WFee+oqL0Qa9I3xkZqGWJ -zRbuoqJifNCP6/oy4HQlKmThGxXrZ2c5Dfo2QXZd2LbnvDQ8H7SB8dJECvgs -HSskBWj44WfkZ5CRgqgBHVqIIA0hsi5ndlESjq5bUtwiSkN3kFX8WywJ2lbB -IvmbaTi5x6HvvKAkfBg6NXthKw03CSsmbP8uAaKEExV799Pwxf5Jkas1YlBg -FBk+5UjDmsqAn35XxEA9MtXosjMN9+vmvY7xEwPLqYfvew7R0OfDRV97ohjE -fZj/c/gEDVfUfp3OyhSFpfxzhuHRNJxgmJ63iRaBT9svdxWV0PC/2AdFiZHC -cDSo4KZpGQ0lNtR4TLsKw0LZY8/fD2m4XvIjPR6FQVi+Z3HrExqqH284bcgh -DObcm6SfvaDhrvP2v76nCEF9d9GRrvc0XPdnpf1psSCYCTylBffQ0NQrMWI5 -RRB6dr9akPhMQ4tYx/vepwRhrvZXgusADf8Ok9KbtgsCLW9L6c8xGnZ2VO2d -z10P9Z8MgpPHabh9dYxP4cR6MBOxA7UpGvIOWv+6o70evOKD3gbO09BZabfM -rQ4BmHsRd118iYbTDdtjRG4KwPnlrMO1yzTM5CApfDkqAIKaxVSXVWb+d7TH -L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== +1:eJwV13k0VWsbAHCRSF0yz2cwVULm43CO5yEzSSgyRSgpEkIiQ5GiEoqUIeFe +kpyzm6lchNJMMpSEyhWiTIl8+/trr9/a6917r/eZ3k3fdcA5kJeHhweW8fD8 +/zrT96RJJb3UdPFt/pP5FZamHYUyh826kqEK3yt32yoDSr7cJdOVBfPt3ONV +tnoQ5VT5jq+rBLjhvMzTtptAdFw669c7LnTSxK7usHWBj3WOB6beNYBOv718 +jY0/WKmMfJh89wZYRX9fVLCKgF/vGOcn3g3Arhy6Tq/JMWjc9Hfp65Kf8LBO +teRCbzYofLz3ZZfGIkRn8vgR4gUgsX9npcAmPlyVVNie/KYEsnSsah23CWKA +walsJ/rf0J2nXT+55i+kf1zto/W4EtJLE17yyopiztePN/RMq8FOf6+YpLIo +5rbxHWqzqwbBJudtazVF0ZWJIx5u1XB8ULXX3kwUfznH9/qGVUOc0rMvOXtF +8SgfI1ewpBpCi2X+qN0XxVTO2YOP+W7A1sscDXtPMUzb+yHoc/0NkM4ZPJld +II4O7wVd/smsAZkNt47PlYvj/lge67TzNSDXkJrgXSOOBdfn9gTk1wBlYv2h +tY3iGNSWryVaWgOqDmG+tcPieMi85SHrTg3oLV80HNSTwPWJ2WG972tgS6TU +kO5TCSx3mcnRU+WA06rhvtx2CXQ9/kA1bz0HnEvudS+8l8CjZm3tc5oc2P7K +62XzdwmUjVJJrTbkgLfG1fsekpJ48TA/85s1B/YNbTyX7CuJxQJLKRV7OXDC +1db0zYwkStanxjEqOSB384Uc7zIpPBq1XSeimgPV4q6zOqukMFH5tU0llwOd +b3xqzlGl8K/f1wuFajmgsjVSaauNFK4La+jLbuNAw+aiFa8uSuHHBzfjWr9x +YNFq+sVzljR62Tz6dXcdFzLLY68tWkljfG5Lsa8GF1RW8KRpbpXGqryQMj5t +Ljg8FjI7HSiN6sciWkwYXMjfRCMczkjjUNVcSKQlF4zQPrftozS6FjRZC/hx +IYJ5ZeeTZBlMvZ9dQeRwwa5YeMo+QwZN9t35lpXLBSWBuLQX52Ww29JALTSf +C686tnPa/5HBCJNvx2WKuaAVtpqv74UMCjeZjbOucWG4PLr8h5wszlOtC5rq +ueAl4TgmT8iil1yZ/OthLugdqU0qrJPF4Yq2zo3fuCA0sE6K3iyLRV+3ZZ0a +48K9G3yg1i2Ld3V/rtL/wQUp+3uZ2kuyOJmhKe72m3x/koq+pb0cnmfONH1Y +TYDF9/nY0EE5HBsbujChQcBhmxz1f0fl0PWYZF2zFgHVVzR7xGfkcEHtqNRF +bQJkXH2Z9wTlcaXLp/26+gSM3n08y6clj4KsC9cZJgRkJ2dGXoyRx7p9Xd8z +bAho7V2vMpokj7mbA0rV7AhY0G9sN02Xx45O9wt19gTs/jqtO1QgjzYbOfof +HAkwdvCc1GqUR33G2+BJVwIGJNVCm/5SwLDu3aa7fQmQPvBIUVpaAdtz6MJN +fgQ4tLo/30tTwENCxSoUfwJux6ZriOgpYMXA7nUtgQSc+jgxssNdAd0vvrk8 +GkyAbkXtnu8lCiiVmPQ0JZKAPbzbpM2rFLCustTln0MEXPYcb865pYBWtoJa +LVEErBCmqxm3KqDe0+3dv2II6AlPHTo+poB2tncU9eIJSGJt9ZMzUsSWS9Z/ +po8TYONT+INhrogNCwfjJ1MIEE78dmybgyJu6DpycziVfH5jSnmmryLuDBV1 +fJpGwF27+99WnFRE31fP7TwyCEjYLxCvkq2ILpERpXqnCbA64ypsXqCIy/Dz +A8EzBHS8HteO5yjiqATol58lYMJdOepntyKKKOfZV2cRcCc2TEB0SBGv+PjV +B2YTcPTygzytcUVkuMGiTA4Bq/vdavfyUlC5IqY9/DwBa/dk8PSrU/Bfq/9E +pnIJGE/rPreoT8GdvG6DJ/MIuFmppiwPFIwRjjshf5EA8/F6y+0uFEy67mal +m0+Az6HpU8+OULDjbtYDzcsEqOaaK4ykUHBg2XeDksv/z4+z1wUyKShlvHhC +rICA2IX1r8xLKbgsvvnBF9JmlGg/32oKuvi/umpXSIAgNv2Iv0tB4fH1QZWk +zx/zkbz3jIIlm2MyvYsI8Cq7Vt7ZSUHe4uaZGtJKLXOMqX4KPjsrjTzFBPw3 +bPlE9BsFbdQuhdiTrhHK9tg4TcHB2uTELNLRGv3fHJYoyJjliX1L2tRRMz54 +JRX5n9l6Slwh4Nm5lqIyRSomZoj2pJDOJiR0GtdSUanrz+G7pD3e+jX061Bx +zZHsFV9J02erXf6YUNGjd2WSaAkBwzILQ/JWVFxeXjDCIH3D2DaK6URFoRfp +Fh6ko7wuCLh5UNEhXSwzhjTr6GBeZAAVU3YcfJFFmq9YWz0rlIpbZ4d5Kkg/ +/Te+9kYMFf8KrF1XSzpz8KnD82Qq9g5usH5C2o1fpm8kg4qnp456t5OmrA08 +IJhLxYrt8/u7SX+24fKoXaGincDnqF7SVcFL5zZdo6Icnoj7//2IDAdlv1tU +dIlST/j/euPqizePPqJi/g7ZxP8/3+Ldi8XxVirSTH0y60g78iy33vmGisOf +21SrSLuvZ2a+7KWiROdBszzS/s6h3fCZimIJvkOJpEOPXFWqGadiu0mFyG7S +MaVd+2hz5H5s9WmyJv3vl1SPVh4aHh3N4lMjbXWEnpDIT0MDFc8XPKTbROqu +GgnR8NZ0m2oXud9OpdtbJ4Rp6GL5W6iKdKfR5Og/4jT0/bB0NI605/N0UT8Z +Gh4ImUy2Jd3vp2Yoq0jDrJPD0uKkd8/Ue7ym0/BSxR/TbjL+YdSZq2YbaPjY +/Ie1J+lpIrP110YaeksLaEiTjrXZMMbRp6F9WUX5SzLfUg76GiqZ0vCmzZoA +Q9JCK3579JjTUP6eWMUQma+Z+ecTsqxpqJFLPXmWdH7j01berTSUedtH6SXz +neoeOHZ/Gw07ozo7j5AuHV0SjfCgYYygv5Ys6RuSBp6D/jT06n9Rb0vWT9Oe +orHGKBou/NiQnUzWm+0CUyzuCA3dKpf2CJJ+kdlhqJ9IwwfzZZ9PkfXZfW9l +YulJGsaLyPankPU7vipSLOUyDddfPP3D5QIZ72JhBvsKDdN6hrQekfU/p1/h +OV1Gw30WSYprSfP59JUG3qChB8NZaozsHzI1NgyrBhr231rM3XqOgAKLQc8/ +zTQ0vElPK8kk6687PvF2Gw1D/tXWnyD7kSYv8UTtLQ2tByabksh+Ze6q6CUw +TMOw3e7f4tMJ2D83mdj6Fx1jo2d9e8l+aXxwt9QXMTrynJiL/HyMrP+Rnmt8 +MnT0OiL29FsyAWW9jZ2mSnTcWL7CdCyRgL6H5zVuGdKR2uYT2xhHwJYUZteV +nXQ0oMQRDyPI/P9zPeRRAB03Ob6/fDqc7D9RSnwf9tJRSbLgk/tBAtKCVmnJ +RNLxQsXPY0OhBNTbfzh2Jo1cby3i+WovOR/EkjYe4dDxaGrbi98+BPCkTzfl +3abjwAUZ5jlvcr/5gj1u19IxZuK3rLIXAfumnVMmH9MxteCgFWsHGc8uld49 +PXR8wPMg1sKFAKmi1lRXPiUUunW967oVAb82rOnT3KaEWdTHbybUCZgpkEvS +81BCNyc/Ffp6AqZEVFWYO5Uw8b2uheNaMn4/mcEWe5VwV7DvdKEyOQ9r/Wc8 +4pVQXCHcUU6B7A/2d4TTypTwWfkXv1hynufv84GBaSWMuRPqNzrChdwPQQNf +55Wwk/6x7x55fsjZEpEytqSEloV/dh3/woUzemltcyuVyXmRkLpmgAvJvzlu +IhRlfM6WCOHv5sK+dP4wlpUybpY95ejfzAXWtariCxeUsf3xkvpCIRd6adeK +LC8p49L2vdr5l7kQe6GicKpIGW2WRb0xIM87d5LKLztXKKPluaM/As9zQde9 +OE+4ThlV21OeVaRzYT1/TmbqJ2X8Ki1r8m80eV7ZeSQxSkMF/77+pZTpyIVJ +MTvf7Q0qWHXNNLJ8igNd+5VeBbeoYPGhvhUxkxyob56HhGcqmJzVy7Ye50Bm +7DXqP50quHymp7jvKwe0B1Z//DWigoNjB8MnezgQynnpXSCuival8TwV9RwY +2bLNcyhAFa/WldaEnOLAUIbv9nABNTRZ2NpcJ80B2+/Rtp8N12Js99+HA7Vq +YNRfMOJmwjosrmm2EWJUk/8X0rwnGtajTC8tx2XxGog9VztT810dg3b/oLB6 +K0Ah7YaToaEGar6cRjjxN+RtYK4R36OJbap3vYd9y+CpnJnBz3NaKBZwtemX +81UwVmjI3Ni5Ed+JTgWNal0BYb6SSL9kbZTWcMmWzCkEShKVtUNNB3WYJW/l +6vJhparXbecWHaTNPb8KmAtabNkb0d66WO/W+PWzZQ6E94k12vHooe1nPUNL +93Pw/WfGNts8PSz1no2qaD0N1hub82019VFwsvLWvriT8PCnye/ZF/pI17kT +dN4nBUI1dHteBxpgg2TVvp+8ycAeD+jYsdIQi78UOcfeiQdLFZnNf5UYoqx3 +542VlTGwLvFUTAODgemDKKS9LxLqTMr4HYwZuOd6lre+RyQ4zT7Kesti4IZe +rzgL20iICZ2uGjZj4JWWruVpayOh1cv3k7ADAx/MCBVcGoqAIKahnacvA1Xt +i558942Aih+f5KfSGOg1uJyhvCsc1AOZj1R7GJixpmFfeEoYnFVynD/2noGi +FxX1tGLCYOrjLoOBPgaOyFkv/QgOg4ceGdcKBxm4nnkjO9cpDJydPuZKjzHQ +8MwtDQeFMDhskhK2kscIq7oObHoYfABaRV/Tx1SNsDVk+pbM+xAIfBh0/OZB +I8zmJEyLTQbDeMhItGWkEe7Opaz+rysYYhT37+uMMsJdBWLc1/XBcCrugPPc +ESPMvbuU0JMZDDXGUTRWqhE+LW+baNUJhoXbx+oa843wde/bXJHovZB1o3Dq +TaMRXrAVN5oTDoJHxR0Bk5JMfDVvMT54MBD6Heg7o2SY+O37lU+BPoHA8ytk +x285Ji7cCtKYtQsE860Cjvw0Jnps/XLFWiUQmpcZM2TVmah93mpZ0bsAeLar +aKWZKRMzkw3MqWYB0KMSXJ25m4mjYvuFVKj+MPXP0uzGO0w0vvvag8XvB1+2 +WxWfvMfEEv4yjteML3QtP20zWMtEhefRgWlffaHWV+7ihXom2sZ9b1n21BeS +ZQyMF58wUcP7DHHkrC+sSQuOe/qeifOGv1emKviCxp63PIG8xphmq9WZFu8D +/qrXVuZvNsalzWuF+iw8IfaxT7CakzEeyV9ycFb3hMxAsTauszHumezd/kHE +E+rKDme0uRnjnVmhBEavB0io2Ygs+hmjhtigz3y4BzSrfZbwjTJGTRl3/6ry +HaC+jkpTKzLGVQIBLi4Ud5hUzzbkThjjm3vOutvst0HXM7QU/2mMNVLmC8GM +bVAfOu4SOW2MDqVyzueUt8EZru1Bw3ljfPCfS4TIgiuoG/NU3eczwTPFLbav +rrvCLtsQeqOUCd7njNp4SLhCxx7r1R0sE+wOWNuBY85wt/T3p+k0E8x86GA8 +3eYEhpsiZ+3STbC4w/362jonuPVpdHXxaRNsopTs31PlBFxKH8MuywRTFp5X +CJ92gqq8+tOFl0wwVa5L4rejExRnpDCtq02w7Kb4QGrlFjgZKXIur90Ew3M0 +2ks6N4OHhTKaUFj4W0Rjf1eUHSx2CAo30ljIm1PWtd7TDooDx3vtlFnYPGHq +ch7s4EvqvWiPdSzc3WZHuS9oB+FPttw4rMvCl2sEHxldtoVTjnGUu1YsfHxz +YGK2xQbuu79d0D/AQqkZYn5cxxrkQ07c06pnYWp6TPhBews4s7TbIL2BhSUJ +/55SYFgAb5YV52sTCxV1+MV7lCxg5DZ/RfETFi5XZjAz5jfBfZ7jeWLtLPQ+ +4m/VVrkJPHISo2c+szDs67L2v4U3QV7tYYOHq9hYKMT7V8ygGax23MGRE2bj +ov/H3G2vzSCx30gzeg0b2ya+vd70yAyC+OdUtCXZ6PnntaLzJTNgbImSKKGw +cbD1cKG+qxl0DoT/TNFho/dd9ev8TxAkhfZzNruxMVJ3h8Z8HEDppvjYiR1s +vMKyrBx3B9CNP7Mp24uN6/77zBU0AHCcqHnb5cfGsv7anqoxU0jtnP7lv5+N +HePFLRxfU5grSTCPTWLjh/YXSZmb2dBjkt1efo2NDS+eC9w3M4GgQ6WXbavZ +GEoegqlKJjBTfStwtIaNJY0T5WW8JiCm1DWrc5uNw2VOx6WajMFeUFHhQT0b +D4xoSx+3MYa6jvKA9rfk9xddeBThxgQ74buaUV1snGDNOX1iMqHL+smMTC8b +A8XkgkIVmDB1/1uaTz8bfd3za758MgLNK9rX/xth48mBs6EOoUZQ12MWlTHG +RsFBp0nuViOwk3CBjRNsXElbL2xkYAS7Txx6HTnNxi2DfCUFCwyYqk/Nl55j +o7Kt7sf4fgYkz+f6359nY3TmS/O4Jgas0a/Q8F5ko8PyDTV5/zCgMOT+9NIS +G/2eVAq1ZzDgf3jbA4M= "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1813924222088017}}, + "PlotRange" -> {{0, 30}, {0., 0.07670375492764694}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -11042,6 +11123,7 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11069,7 +11151,8 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1813924222088017}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07670375492764694}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11077,17 +11160,628 @@ L2wTgJyTtfNrazQsycvUc2cXgP8BZB7toQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913306567510605`*^9}, + CellChangeTimes->{3.9913306567510605`*^9, 3.994388838147291*^9}, CellLabel-> - "Out[195]=",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] + "Out[119]=",ExpressionUUID->"33eeeba7-2a93-479a-b2c5-35833718e2f1"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-\ -6bd251746ea6"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VWsbAHCRSF0yz2cwVULm43CO5yEzSSgyRSgpEkIiQ5GiEoqUIeFe +kpyzm6lchNJMMpSEyhWiTIl8+/trr9/a6917r/eZ3k3fdcA5kJeHhweW8fD8 +/zrT96RJJb3UdPFt/pP5FZamHYUyh826kqEK3yt32yoDSr7cJdOVBfPt3ONV +tnoQ5VT5jq+rBLjhvMzTtptAdFw669c7LnTSxK7usHWBj3WOB6beNYBOv718 +jY0/WKmMfJh89wZYRX9fVLCKgF/vGOcn3g3Arhy6Tq/JMWjc9Hfp65Kf8LBO +teRCbzYofLz3ZZfGIkRn8vgR4gUgsX9npcAmPlyVVNie/KYEsnSsah23CWKA +walsJ/rf0J2nXT+55i+kf1zto/W4EtJLE17yyopiztePN/RMq8FOf6+YpLIo +5rbxHWqzqwbBJudtazVF0ZWJIx5u1XB8ULXX3kwUfznH9/qGVUOc0rMvOXtF +8SgfI1ewpBpCi2X+qN0XxVTO2YOP+W7A1sscDXtPMUzb+yHoc/0NkM4ZPJld +II4O7wVd/smsAZkNt47PlYvj/lge67TzNSDXkJrgXSOOBdfn9gTk1wBlYv2h +tY3iGNSWryVaWgOqDmG+tcPieMi85SHrTg3oLV80HNSTwPWJ2WG972tgS6TU +kO5TCSx3mcnRU+WA06rhvtx2CXQ9/kA1bz0HnEvudS+8l8CjZm3tc5oc2P7K +62XzdwmUjVJJrTbkgLfG1fsekpJ48TA/85s1B/YNbTyX7CuJxQJLKRV7OXDC +1db0zYwkStanxjEqOSB384Uc7zIpPBq1XSeimgPV4q6zOqukMFH5tU0llwOd +b3xqzlGl8K/f1wuFajmgsjVSaauNFK4La+jLbuNAw+aiFa8uSuHHBzfjWr9x +YNFq+sVzljR62Tz6dXcdFzLLY68tWkljfG5Lsa8GF1RW8KRpbpXGqryQMj5t +Ljg8FjI7HSiN6sciWkwYXMjfRCMczkjjUNVcSKQlF4zQPrftozS6FjRZC/hx +IYJ5ZeeTZBlMvZ9dQeRwwa5YeMo+QwZN9t35lpXLBSWBuLQX52Ww29JALTSf +C686tnPa/5HBCJNvx2WKuaAVtpqv74UMCjeZjbOucWG4PLr8h5wszlOtC5rq +ueAl4TgmT8iil1yZ/OthLugdqU0qrJPF4Yq2zo3fuCA0sE6K3iyLRV+3ZZ0a +48K9G3yg1i2Ld3V/rtL/wQUp+3uZ2kuyOJmhKe72m3x/koq+pb0cnmfONH1Y +TYDF9/nY0EE5HBsbujChQcBhmxz1f0fl0PWYZF2zFgHVVzR7xGfkcEHtqNRF +bQJkXH2Z9wTlcaXLp/26+gSM3n08y6clj4KsC9cZJgRkJ2dGXoyRx7p9Xd8z +bAho7V2vMpokj7mbA0rV7AhY0G9sN02Xx45O9wt19gTs/jqtO1QgjzYbOfof +HAkwdvCc1GqUR33G2+BJVwIGJNVCm/5SwLDu3aa7fQmQPvBIUVpaAdtz6MJN +fgQ4tLo/30tTwENCxSoUfwJux6ZriOgpYMXA7nUtgQSc+jgxssNdAd0vvrk8 +GkyAbkXtnu8lCiiVmPQ0JZKAPbzbpM2rFLCustTln0MEXPYcb865pYBWtoJa +LVEErBCmqxm3KqDe0+3dv2II6AlPHTo+poB2tncU9eIJSGJt9ZMzUsSWS9Z/ +po8TYONT+INhrogNCwfjJ1MIEE78dmybgyJu6DpycziVfH5jSnmmryLuDBV1 +fJpGwF27+99WnFRE31fP7TwyCEjYLxCvkq2ILpERpXqnCbA64ypsXqCIy/Dz +A8EzBHS8HteO5yjiqATol58lYMJdOepntyKKKOfZV2cRcCc2TEB0SBGv+PjV +B2YTcPTygzytcUVkuMGiTA4Bq/vdavfyUlC5IqY9/DwBa/dk8PSrU/Bfq/9E +pnIJGE/rPreoT8GdvG6DJ/MIuFmppiwPFIwRjjshf5EA8/F6y+0uFEy67mal +m0+Az6HpU8+OULDjbtYDzcsEqOaaK4ykUHBg2XeDksv/z4+z1wUyKShlvHhC +rICA2IX1r8xLKbgsvvnBF9JmlGg/32oKuvi/umpXSIAgNv2Iv0tB4fH1QZWk +zx/zkbz3jIIlm2MyvYsI8Cq7Vt7ZSUHe4uaZGtJKLXOMqX4KPjsrjTzFBPw3 +bPlE9BsFbdQuhdiTrhHK9tg4TcHB2uTELNLRGv3fHJYoyJjliX1L2tRRMz54 +JRX5n9l6Slwh4Nm5lqIyRSomZoj2pJDOJiR0GtdSUanrz+G7pD3e+jX061Bx +zZHsFV9J02erXf6YUNGjd2WSaAkBwzILQ/JWVFxeXjDCIH3D2DaK6URFoRfp +Fh6ko7wuCLh5UNEhXSwzhjTr6GBeZAAVU3YcfJFFmq9YWz0rlIpbZ4d5Kkg/ +/Te+9kYMFf8KrF1XSzpz8KnD82Qq9g5usH5C2o1fpm8kg4qnp456t5OmrA08 +IJhLxYrt8/u7SX+24fKoXaGincDnqF7SVcFL5zZdo6Icnoj7//2IDAdlv1tU +dIlST/j/euPqizePPqJi/g7ZxP8/3+Ldi8XxVirSTH0y60g78iy33vmGisOf +21SrSLuvZ2a+7KWiROdBszzS/s6h3fCZimIJvkOJpEOPXFWqGadiu0mFyG7S +MaVd+2hz5H5s9WmyJv3vl1SPVh4aHh3N4lMjbXWEnpDIT0MDFc8XPKTbROqu +GgnR8NZ0m2oXud9OpdtbJ4Rp6GL5W6iKdKfR5Og/4jT0/bB0NI605/N0UT8Z +Gh4ImUy2Jd3vp2Yoq0jDrJPD0uKkd8/Ue7ym0/BSxR/TbjL+YdSZq2YbaPjY +/Ie1J+lpIrP110YaeksLaEiTjrXZMMbRp6F9WUX5SzLfUg76GiqZ0vCmzZoA +Q9JCK3579JjTUP6eWMUQma+Z+ecTsqxpqJFLPXmWdH7j01berTSUedtH6SXz +neoeOHZ/Gw07ozo7j5AuHV0SjfCgYYygv5Ys6RuSBp6D/jT06n9Rb0vWT9Oe +orHGKBou/NiQnUzWm+0CUyzuCA3dKpf2CJJ+kdlhqJ9IwwfzZZ9PkfXZfW9l +YulJGsaLyPankPU7vipSLOUyDddfPP3D5QIZ72JhBvsKDdN6hrQekfU/p1/h +OV1Gw30WSYprSfP59JUG3qChB8NZaozsHzI1NgyrBhr231rM3XqOgAKLQc8/ +zTQ0vElPK8kk6687PvF2Gw1D/tXWnyD7kSYv8UTtLQ2tByabksh+Ze6q6CUw +TMOw3e7f4tMJ2D83mdj6Fx1jo2d9e8l+aXxwt9QXMTrynJiL/HyMrP+Rnmt8 +MnT0OiL29FsyAWW9jZ2mSnTcWL7CdCyRgL6H5zVuGdKR2uYT2xhHwJYUZteV +nXQ0oMQRDyPI/P9zPeRRAB03Ob6/fDqc7D9RSnwf9tJRSbLgk/tBAtKCVmnJ +RNLxQsXPY0OhBNTbfzh2Jo1cby3i+WovOR/EkjYe4dDxaGrbi98+BPCkTzfl +3abjwAUZ5jlvcr/5gj1u19IxZuK3rLIXAfumnVMmH9MxteCgFWsHGc8uld49 +PXR8wPMg1sKFAKmi1lRXPiUUunW967oVAb82rOnT3KaEWdTHbybUCZgpkEvS +81BCNyc/Ffp6AqZEVFWYO5Uw8b2uheNaMn4/mcEWe5VwV7DvdKEyOQ9r/Wc8 +4pVQXCHcUU6B7A/2d4TTypTwWfkXv1hynufv84GBaSWMuRPqNzrChdwPQQNf +55Wwk/6x7x55fsjZEpEytqSEloV/dh3/woUzemltcyuVyXmRkLpmgAvJvzlu +IhRlfM6WCOHv5sK+dP4wlpUybpY95ejfzAXWtariCxeUsf3xkvpCIRd6adeK +LC8p49L2vdr5l7kQe6GicKpIGW2WRb0xIM87d5LKLztXKKPluaM/As9zQde9 +OE+4ThlV21OeVaRzYT1/TmbqJ2X8Ki1r8m80eV7ZeSQxSkMF/77+pZTpyIVJ +MTvf7Q0qWHXNNLJ8igNd+5VeBbeoYPGhvhUxkxyob56HhGcqmJzVy7Ye50Bm +7DXqP50quHymp7jvKwe0B1Z//DWigoNjB8MnezgQynnpXSCuival8TwV9RwY +2bLNcyhAFa/WldaEnOLAUIbv9nABNTRZ2NpcJ80B2+/Rtp8N12Js99+HA7Vq +YNRfMOJmwjosrmm2EWJUk/8X0rwnGtajTC8tx2XxGog9VztT810dg3b/oLB6 +K0Ah7YaToaEGar6cRjjxN+RtYK4R36OJbap3vYd9y+CpnJnBz3NaKBZwtemX +81UwVmjI3Ni5Ed+JTgWNal0BYb6SSL9kbZTWcMmWzCkEShKVtUNNB3WYJW/l +6vJhparXbecWHaTNPb8KmAtabNkb0d66WO/W+PWzZQ6E94k12vHooe1nPUNL +93Pw/WfGNts8PSz1no2qaD0N1hub82019VFwsvLWvriT8PCnye/ZF/pI17kT +dN4nBUI1dHteBxpgg2TVvp+8ycAeD+jYsdIQi78UOcfeiQdLFZnNf5UYoqx3 +542VlTGwLvFUTAODgemDKKS9LxLqTMr4HYwZuOd6lre+RyQ4zT7Kesti4IZe +rzgL20iICZ2uGjZj4JWWruVpayOh1cv3k7ADAx/MCBVcGoqAIKahnacvA1Xt +i558942Aih+f5KfSGOg1uJyhvCsc1AOZj1R7GJixpmFfeEoYnFVynD/2noGi +FxX1tGLCYOrjLoOBPgaOyFkv/QgOg4ceGdcKBxm4nnkjO9cpDJydPuZKjzHQ +8MwtDQeFMDhskhK2kscIq7oObHoYfABaRV/Tx1SNsDVk+pbM+xAIfBh0/OZB +I8zmJEyLTQbDeMhItGWkEe7Opaz+rysYYhT37+uMMsJdBWLc1/XBcCrugPPc +ESPMvbuU0JMZDDXGUTRWqhE+LW+baNUJhoXbx+oa843wde/bXJHovZB1o3Dq +TaMRXrAVN5oTDoJHxR0Bk5JMfDVvMT54MBD6Heg7o2SY+O37lU+BPoHA8ytk +x285Ji7cCtKYtQsE860Cjvw0Jnps/XLFWiUQmpcZM2TVmah93mpZ0bsAeLar +aKWZKRMzkw3MqWYB0KMSXJ25m4mjYvuFVKj+MPXP0uzGO0w0vvvag8XvB1+2 +WxWfvMfEEv4yjteML3QtP20zWMtEhefRgWlffaHWV+7ihXom2sZ9b1n21BeS +ZQyMF58wUcP7DHHkrC+sSQuOe/qeifOGv1emKviCxp63PIG8xphmq9WZFu8D +/qrXVuZvNsalzWuF+iw8IfaxT7CakzEeyV9ycFb3hMxAsTauszHumezd/kHE +E+rKDme0uRnjnVmhBEavB0io2Ygs+hmjhtigz3y4BzSrfZbwjTJGTRl3/6ry +HaC+jkpTKzLGVQIBLi4Ud5hUzzbkThjjm3vOutvst0HXM7QU/2mMNVLmC8GM +bVAfOu4SOW2MDqVyzueUt8EZru1Bw3ljfPCfS4TIgiuoG/NU3eczwTPFLbav +rrvCLtsQeqOUCd7njNp4SLhCxx7r1R0sE+wOWNuBY85wt/T3p+k0E8x86GA8 +3eYEhpsiZ+3STbC4w/362jonuPVpdHXxaRNsopTs31PlBFxKH8MuywRTFp5X +CJ92gqq8+tOFl0wwVa5L4rejExRnpDCtq02w7Kb4QGrlFjgZKXIur90Ew3M0 +2ks6N4OHhTKaUFj4W0Rjf1eUHSx2CAo30ljIm1PWtd7TDooDx3vtlFnYPGHq +ch7s4EvqvWiPdSzc3WZHuS9oB+FPttw4rMvCl2sEHxldtoVTjnGUu1YsfHxz +YGK2xQbuu79d0D/AQqkZYn5cxxrkQ07c06pnYWp6TPhBews4s7TbIL2BhSUJ +/55SYFgAb5YV52sTCxV1+MV7lCxg5DZ/RfETFi5XZjAz5jfBfZ7jeWLtLPQ+ +4m/VVrkJPHISo2c+szDs67L2v4U3QV7tYYOHq9hYKMT7V8ygGax23MGRE2bj +ov/H3G2vzSCx30gzeg0b2ya+vd70yAyC+OdUtCXZ6PnntaLzJTNgbImSKKGw +cbD1cKG+qxl0DoT/TNFho/dd9ev8TxAkhfZzNruxMVJ3h8Z8HEDppvjYiR1s +vMKyrBx3B9CNP7Mp24uN6/77zBU0AHCcqHnb5cfGsv7anqoxU0jtnP7lv5+N +HePFLRxfU5grSTCPTWLjh/YXSZmb2dBjkt1efo2NDS+eC9w3M4GgQ6WXbavZ +GEoegqlKJjBTfStwtIaNJY0T5WW8JiCm1DWrc5uNw2VOx6WajMFeUFHhQT0b +D4xoSx+3MYa6jvKA9rfk9xddeBThxgQ74buaUV1snGDNOX1iMqHL+smMTC8b +A8XkgkIVmDB1/1uaTz8bfd3za758MgLNK9rX/xth48mBs6EOoUZQ12MWlTHG +RsFBp0nuViOwk3CBjRNsXElbL2xkYAS7Txx6HTnNxi2DfCUFCwyYqk/Nl55j +o7Kt7sf4fgYkz+f6359nY3TmS/O4Jgas0a/Q8F5ko8PyDTV5/zCgMOT+9NIS +G/2eVAq1ZzDgf3jbA4M= + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VWsbAHCRSF0yz2cwVULm43CO5yEzSSgyRSgpEkIiQ5GiEoqUIeFe +kpyzm6lchNJMMpSEyhWiTIl8+/trr9/a6917r/eZ3k3fdcA5kJeHhweW8fD8 +/zrT96RJJb3UdPFt/pP5FZamHYUyh826kqEK3yt32yoDSr7cJdOVBfPt3ONV +tnoQ5VT5jq+rBLjhvMzTtptAdFw669c7LnTSxK7usHWBj3WOB6beNYBOv718 +jY0/WKmMfJh89wZYRX9fVLCKgF/vGOcn3g3Arhy6Tq/JMWjc9Hfp65Kf8LBO +teRCbzYofLz3ZZfGIkRn8vgR4gUgsX9npcAmPlyVVNie/KYEsnSsah23CWKA +walsJ/rf0J2nXT+55i+kf1zto/W4EtJLE17yyopiztePN/RMq8FOf6+YpLIo +5rbxHWqzqwbBJudtazVF0ZWJIx5u1XB8ULXX3kwUfznH9/qGVUOc0rMvOXtF +8SgfI1ewpBpCi2X+qN0XxVTO2YOP+W7A1sscDXtPMUzb+yHoc/0NkM4ZPJld +II4O7wVd/smsAZkNt47PlYvj/lge67TzNSDXkJrgXSOOBdfn9gTk1wBlYv2h +tY3iGNSWryVaWgOqDmG+tcPieMi85SHrTg3oLV80HNSTwPWJ2WG972tgS6TU +kO5TCSx3mcnRU+WA06rhvtx2CXQ9/kA1bz0HnEvudS+8l8CjZm3tc5oc2P7K +62XzdwmUjVJJrTbkgLfG1fsekpJ48TA/85s1B/YNbTyX7CuJxQJLKRV7OXDC +1db0zYwkStanxjEqOSB384Uc7zIpPBq1XSeimgPV4q6zOqukMFH5tU0llwOd +b3xqzlGl8K/f1wuFajmgsjVSaauNFK4La+jLbuNAw+aiFa8uSuHHBzfjWr9x +YNFq+sVzljR62Tz6dXcdFzLLY68tWkljfG5Lsa8GF1RW8KRpbpXGqryQMj5t +Ljg8FjI7HSiN6sciWkwYXMjfRCMczkjjUNVcSKQlF4zQPrftozS6FjRZC/hx +IYJ5ZeeTZBlMvZ9dQeRwwa5YeMo+QwZN9t35lpXLBSWBuLQX52Ww29JALTSf +C686tnPa/5HBCJNvx2WKuaAVtpqv74UMCjeZjbOucWG4PLr8h5wszlOtC5rq +ueAl4TgmT8iil1yZ/OthLugdqU0qrJPF4Yq2zo3fuCA0sE6K3iyLRV+3ZZ0a +48K9G3yg1i2Ld3V/rtL/wQUp+3uZ2kuyOJmhKe72m3x/koq+pb0cnmfONH1Y +TYDF9/nY0EE5HBsbujChQcBhmxz1f0fl0PWYZF2zFgHVVzR7xGfkcEHtqNRF +bQJkXH2Z9wTlcaXLp/26+gSM3n08y6clj4KsC9cZJgRkJ2dGXoyRx7p9Xd8z +bAho7V2vMpokj7mbA0rV7AhY0G9sN02Xx45O9wt19gTs/jqtO1QgjzYbOfof +HAkwdvCc1GqUR33G2+BJVwIGJNVCm/5SwLDu3aa7fQmQPvBIUVpaAdtz6MJN +fgQ4tLo/30tTwENCxSoUfwJux6ZriOgpYMXA7nUtgQSc+jgxssNdAd0vvrk8 +GkyAbkXtnu8lCiiVmPQ0JZKAPbzbpM2rFLCustTln0MEXPYcb865pYBWtoJa +LVEErBCmqxm3KqDe0+3dv2II6AlPHTo+poB2tncU9eIJSGJt9ZMzUsSWS9Z/ +po8TYONT+INhrogNCwfjJ1MIEE78dmybgyJu6DpycziVfH5jSnmmryLuDBV1 +fJpGwF27+99WnFRE31fP7TwyCEjYLxCvkq2ILpERpXqnCbA64ypsXqCIy/Dz +A8EzBHS8HteO5yjiqATol58lYMJdOepntyKKKOfZV2cRcCc2TEB0SBGv+PjV +B2YTcPTygzytcUVkuMGiTA4Bq/vdavfyUlC5IqY9/DwBa/dk8PSrU/Bfq/9E +pnIJGE/rPreoT8GdvG6DJ/MIuFmppiwPFIwRjjshf5EA8/F6y+0uFEy67mal +m0+Az6HpU8+OULDjbtYDzcsEqOaaK4ykUHBg2XeDksv/z4+z1wUyKShlvHhC +rICA2IX1r8xLKbgsvvnBF9JmlGg/32oKuvi/umpXSIAgNv2Iv0tB4fH1QZWk +zx/zkbz3jIIlm2MyvYsI8Cq7Vt7ZSUHe4uaZGtJKLXOMqX4KPjsrjTzFBPw3 +bPlE9BsFbdQuhdiTrhHK9tg4TcHB2uTELNLRGv3fHJYoyJjliX1L2tRRMz54 +JRX5n9l6Slwh4Nm5lqIyRSomZoj2pJDOJiR0GtdSUanrz+G7pD3e+jX061Bx +zZHsFV9J02erXf6YUNGjd2WSaAkBwzILQ/JWVFxeXjDCIH3D2DaK6URFoRfp +Fh6ko7wuCLh5UNEhXSwzhjTr6GBeZAAVU3YcfJFFmq9YWz0rlIpbZ4d5Kkg/ +/Te+9kYMFf8KrF1XSzpz8KnD82Qq9g5usH5C2o1fpm8kg4qnp456t5OmrA08 +IJhLxYrt8/u7SX+24fKoXaGincDnqF7SVcFL5zZdo6Icnoj7//2IDAdlv1tU +dIlST/j/euPqizePPqJi/g7ZxP8/3+Ldi8XxVirSTH0y60g78iy33vmGisOf +21SrSLuvZ2a+7KWiROdBszzS/s6h3fCZimIJvkOJpEOPXFWqGadiu0mFyG7S +MaVd+2hz5H5s9WmyJv3vl1SPVh4aHh3N4lMjbXWEnpDIT0MDFc8XPKTbROqu +GgnR8NZ0m2oXud9OpdtbJ4Rp6GL5W6iKdKfR5Og/4jT0/bB0NI605/N0UT8Z +Gh4ImUy2Jd3vp2Yoq0jDrJPD0uKkd8/Ue7ym0/BSxR/TbjL+YdSZq2YbaPjY +/Ie1J+lpIrP110YaeksLaEiTjrXZMMbRp6F9WUX5SzLfUg76GiqZ0vCmzZoA +Q9JCK3579JjTUP6eWMUQma+Z+ecTsqxpqJFLPXmWdH7j01berTSUedtH6SXz +neoeOHZ/Gw07ozo7j5AuHV0SjfCgYYygv5Ys6RuSBp6D/jT06n9Rb0vWT9Oe +orHGKBou/NiQnUzWm+0CUyzuCA3dKpf2CJJ+kdlhqJ9IwwfzZZ9PkfXZfW9l +YulJGsaLyPankPU7vipSLOUyDddfPP3D5QIZ72JhBvsKDdN6hrQekfU/p1/h +OV1Gw30WSYprSfP59JUG3qChB8NZaozsHzI1NgyrBhr231rM3XqOgAKLQc8/ +zTQ0vElPK8kk6687PvF2Gw1D/tXWnyD7kSYv8UTtLQ2tByabksh+Ze6q6CUw +TMOw3e7f4tMJ2D83mdj6Fx1jo2d9e8l+aXxwt9QXMTrynJiL/HyMrP+Rnmt8 +MnT0OiL29FsyAWW9jZ2mSnTcWL7CdCyRgL6H5zVuGdKR2uYT2xhHwJYUZteV +nXQ0oMQRDyPI/P9zPeRRAB03Ob6/fDqc7D9RSnwf9tJRSbLgk/tBAtKCVmnJ +RNLxQsXPY0OhBNTbfzh2Jo1cby3i+WovOR/EkjYe4dDxaGrbi98+BPCkTzfl +3abjwAUZ5jlvcr/5gj1u19IxZuK3rLIXAfumnVMmH9MxteCgFWsHGc8uld49 +PXR8wPMg1sKFAKmi1lRXPiUUunW967oVAb82rOnT3KaEWdTHbybUCZgpkEvS +81BCNyc/Ffp6AqZEVFWYO5Uw8b2uheNaMn4/mcEWe5VwV7DvdKEyOQ9r/Wc8 +4pVQXCHcUU6B7A/2d4TTypTwWfkXv1hynufv84GBaSWMuRPqNzrChdwPQQNf +55Wwk/6x7x55fsjZEpEytqSEloV/dh3/woUzemltcyuVyXmRkLpmgAvJvzlu +IhRlfM6WCOHv5sK+dP4wlpUybpY95ejfzAXWtariCxeUsf3xkvpCIRd6adeK +LC8p49L2vdr5l7kQe6GicKpIGW2WRb0xIM87d5LKLztXKKPluaM/As9zQde9 +OE+4ThlV21OeVaRzYT1/TmbqJ2X8Ki1r8m80eV7ZeSQxSkMF/77+pZTpyIVJ +MTvf7Q0qWHXNNLJ8igNd+5VeBbeoYPGhvhUxkxyob56HhGcqmJzVy7Ye50Bm +7DXqP50quHymp7jvKwe0B1Z//DWigoNjB8MnezgQynnpXSCuival8TwV9RwY +2bLNcyhAFa/WldaEnOLAUIbv9nABNTRZ2NpcJ80B2+/Rtp8N12Js99+HA7Vq +YNRfMOJmwjosrmm2EWJUk/8X0rwnGtajTC8tx2XxGog9VztT810dg3b/oLB6 +K0Ah7YaToaEGar6cRjjxN+RtYK4R36OJbap3vYd9y+CpnJnBz3NaKBZwtemX +81UwVmjI3Ni5Ed+JTgWNal0BYb6SSL9kbZTWcMmWzCkEShKVtUNNB3WYJW/l +6vJhparXbecWHaTNPb8KmAtabNkb0d66WO/W+PWzZQ6E94k12vHooe1nPUNL +93Pw/WfGNts8PSz1no2qaD0N1hub82019VFwsvLWvriT8PCnye/ZF/pI17kT +dN4nBUI1dHteBxpgg2TVvp+8ycAeD+jYsdIQi78UOcfeiQdLFZnNf5UYoqx3 +542VlTGwLvFUTAODgemDKKS9LxLqTMr4HYwZuOd6lre+RyQ4zT7Kesti4IZe +rzgL20iICZ2uGjZj4JWWruVpayOh1cv3k7ADAx/MCBVcGoqAIKahnacvA1Xt +i558942Aih+f5KfSGOg1uJyhvCsc1AOZj1R7GJixpmFfeEoYnFVynD/2noGi +FxX1tGLCYOrjLoOBPgaOyFkv/QgOg4ceGdcKBxm4nnkjO9cpDJydPuZKjzHQ +8MwtDQeFMDhskhK2kscIq7oObHoYfABaRV/Tx1SNsDVk+pbM+xAIfBh0/OZB +I8zmJEyLTQbDeMhItGWkEe7Opaz+rysYYhT37+uMMsJdBWLc1/XBcCrugPPc +ESPMvbuU0JMZDDXGUTRWqhE+LW+baNUJhoXbx+oa843wde/bXJHovZB1o3Dq +TaMRXrAVN5oTDoJHxR0Bk5JMfDVvMT54MBD6Heg7o2SY+O37lU+BPoHA8ytk +x285Ji7cCtKYtQsE860Cjvw0Jnps/XLFWiUQmpcZM2TVmah93mpZ0bsAeLar +aKWZKRMzkw3MqWYB0KMSXJ25m4mjYvuFVKj+MPXP0uzGO0w0vvvag8XvB1+2 +WxWfvMfEEv4yjteML3QtP20zWMtEhefRgWlffaHWV+7ihXom2sZ9b1n21BeS +ZQyMF58wUcP7DHHkrC+sSQuOe/qeifOGv1emKviCxp63PIG8xphmq9WZFu8D +/qrXVuZvNsalzWuF+iw8IfaxT7CakzEeyV9ycFb3hMxAsTauszHumezd/kHE +E+rKDme0uRnjnVmhBEavB0io2Ygs+hmjhtigz3y4BzSrfZbwjTJGTRl3/6ry +HaC+jkpTKzLGVQIBLi4Ud5hUzzbkThjjm3vOutvst0HXM7QU/2mMNVLmC8GM +bVAfOu4SOW2MDqVyzueUt8EZru1Bw3ljfPCfS4TIgiuoG/NU3eczwTPFLbav +rrvCLtsQeqOUCd7njNp4SLhCxx7r1R0sE+wOWNuBY85wt/T3p+k0E8x86GA8 +3eYEhpsiZ+3STbC4w/362jonuPVpdHXxaRNsopTs31PlBFxKH8MuywRTFp5X +CJ92gqq8+tOFl0wwVa5L4rejExRnpDCtq02w7Kb4QGrlFjgZKXIur90Ew3M0 +2ks6N4OHhTKaUFj4W0Rjf1eUHSx2CAo30ljIm1PWtd7TDooDx3vtlFnYPGHq +ch7s4EvqvWiPdSzc3WZHuS9oB+FPttw4rMvCl2sEHxldtoVTjnGUu1YsfHxz +YGK2xQbuu79d0D/AQqkZYn5cxxrkQ07c06pnYWp6TPhBews4s7TbIL2BhSUJ +/55SYFgAb5YV52sTCxV1+MV7lCxg5DZ/RfETFi5XZjAz5jfBfZ7jeWLtLPQ+ +4m/VVrkJPHISo2c+szDs67L2v4U3QV7tYYOHq9hYKMT7V8ygGax23MGRE2bj +ov/H3G2vzSCx30gzeg0b2ya+vd70yAyC+OdUtCXZ6PnntaLzJTNgbImSKKGw +cbD1cKG+qxl0DoT/TNFho/dd9ev8TxAkhfZzNruxMVJ3h8Z8HEDppvjYiR1s +vMKyrBx3B9CNP7Mp24uN6/77zBU0AHCcqHnb5cfGsv7anqoxU0jtnP7lv5+N +HePFLRxfU5grSTCPTWLjh/YXSZmb2dBjkt1efo2NDS+eC9w3M4GgQ6WXbavZ +GEoegqlKJjBTfStwtIaNJY0T5WW8JiCm1DWrc5uNw2VOx6WajMFeUFHhQT0b +D4xoSx+3MYa6jvKA9rfk9xddeBThxgQ74buaUV1snGDNOX1iMqHL+smMTC8b +A8XkgkIVmDB1/1uaTz8bfd3za758MgLNK9rX/xth48mBs6EOoUZQ12MWlTHG +RsFBp0nuViOwk3CBjRNsXElbL2xkYAS7Txx6HTnNxi2DfCUFCwyYqk/Nl55j +o7Kt7sf4fgYkz+f6359nY3TmS/O4Jgas0a/Q8F5ko8PyDTV5/zCgMOT+9NIS +G/2eVAq1ZzDgf3jbA4M= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07670375492764694}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07670375492764694}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VWsbAHCRSF0yz2cwVULm43CO5yEzSSgyRSgpEkIiQ5GiEoqUIeFe +kpyzm6lchNJMMpSEyhWiTIl8+/trr9/a6917r/eZ3k3fdcA5kJeHhweW8fD8 +/zrT96RJJb3UdPFt/pP5FZamHYUyh826kqEK3yt32yoDSr7cJdOVBfPt3ONV +tnoQ5VT5jq+rBLjhvMzTtptAdFw669c7LnTSxK7usHWBj3WOB6beNYBOv718 +jY0/WKmMfJh89wZYRX9fVLCKgF/vGOcn3g3Arhy6Tq/JMWjc9Hfp65Kf8LBO +teRCbzYofLz3ZZfGIkRn8vgR4gUgsX9npcAmPlyVVNie/KYEsnSsah23CWKA +walsJ/rf0J2nXT+55i+kf1zto/W4EtJLE17yyopiztePN/RMq8FOf6+YpLIo +5rbxHWqzqwbBJudtazVF0ZWJIx5u1XB8ULXX3kwUfznH9/qGVUOc0rMvOXtF +8SgfI1ewpBpCi2X+qN0XxVTO2YOP+W7A1sscDXtPMUzb+yHoc/0NkM4ZPJld +II4O7wVd/smsAZkNt47PlYvj/lge67TzNSDXkJrgXSOOBdfn9gTk1wBlYv2h +tY3iGNSWryVaWgOqDmG+tcPieMi85SHrTg3oLV80HNSTwPWJ2WG972tgS6TU +kO5TCSx3mcnRU+WA06rhvtx2CXQ9/kA1bz0HnEvudS+8l8CjZm3tc5oc2P7K +62XzdwmUjVJJrTbkgLfG1fsekpJ48TA/85s1B/YNbTyX7CuJxQJLKRV7OXDC +1db0zYwkStanxjEqOSB384Uc7zIpPBq1XSeimgPV4q6zOqukMFH5tU0llwOd +b3xqzlGl8K/f1wuFajmgsjVSaauNFK4La+jLbuNAw+aiFa8uSuHHBzfjWr9x +YNFq+sVzljR62Tz6dXcdFzLLY68tWkljfG5Lsa8GF1RW8KRpbpXGqryQMj5t +Ljg8FjI7HSiN6sciWkwYXMjfRCMczkjjUNVcSKQlF4zQPrftozS6FjRZC/hx +IYJ5ZeeTZBlMvZ9dQeRwwa5YeMo+QwZN9t35lpXLBSWBuLQX52Ww29JALTSf +C686tnPa/5HBCJNvx2WKuaAVtpqv74UMCjeZjbOucWG4PLr8h5wszlOtC5rq +ueAl4TgmT8iil1yZ/OthLugdqU0qrJPF4Yq2zo3fuCA0sE6K3iyLRV+3ZZ0a +48K9G3yg1i2Ld3V/rtL/wQUp+3uZ2kuyOJmhKe72m3x/koq+pb0cnmfONH1Y +TYDF9/nY0EE5HBsbujChQcBhmxz1f0fl0PWYZF2zFgHVVzR7xGfkcEHtqNRF +bQJkXH2Z9wTlcaXLp/26+gSM3n08y6clj4KsC9cZJgRkJ2dGXoyRx7p9Xd8z +bAho7V2vMpokj7mbA0rV7AhY0G9sN02Xx45O9wt19gTs/jqtO1QgjzYbOfof +HAkwdvCc1GqUR33G2+BJVwIGJNVCm/5SwLDu3aa7fQmQPvBIUVpaAdtz6MJN +fgQ4tLo/30tTwENCxSoUfwJux6ZriOgpYMXA7nUtgQSc+jgxssNdAd0vvrk8 +GkyAbkXtnu8lCiiVmPQ0JZKAPbzbpM2rFLCustTln0MEXPYcb865pYBWtoJa +LVEErBCmqxm3KqDe0+3dv2II6AlPHTo+poB2tncU9eIJSGJt9ZMzUsSWS9Z/ +po8TYONT+INhrogNCwfjJ1MIEE78dmybgyJu6DpycziVfH5jSnmmryLuDBV1 +fJpGwF27+99WnFRE31fP7TwyCEjYLxCvkq2ILpERpXqnCbA64ypsXqCIy/Dz +A8EzBHS8HteO5yjiqATol58lYMJdOepntyKKKOfZV2cRcCc2TEB0SBGv+PjV +B2YTcPTygzytcUVkuMGiTA4Bq/vdavfyUlC5IqY9/DwBa/dk8PSrU/Bfq/9E +pnIJGE/rPreoT8GdvG6DJ/MIuFmppiwPFIwRjjshf5EA8/F6y+0uFEy67mal +m0+Az6HpU8+OULDjbtYDzcsEqOaaK4ykUHBg2XeDksv/z4+z1wUyKShlvHhC +rICA2IX1r8xLKbgsvvnBF9JmlGg/32oKuvi/umpXSIAgNv2Iv0tB4fH1QZWk +zx/zkbz3jIIlm2MyvYsI8Cq7Vt7ZSUHe4uaZGtJKLXOMqX4KPjsrjTzFBPw3 +bPlE9BsFbdQuhdiTrhHK9tg4TcHB2uTELNLRGv3fHJYoyJjliX1L2tRRMz54 +JRX5n9l6Slwh4Nm5lqIyRSomZoj2pJDOJiR0GtdSUanrz+G7pD3e+jX061Bx +zZHsFV9J02erXf6YUNGjd2WSaAkBwzILQ/JWVFxeXjDCIH3D2DaK6URFoRfp +Fh6ko7wuCLh5UNEhXSwzhjTr6GBeZAAVU3YcfJFFmq9YWz0rlIpbZ4d5Kkg/ +/Te+9kYMFf8KrF1XSzpz8KnD82Qq9g5usH5C2o1fpm8kg4qnp456t5OmrA08 +IJhLxYrt8/u7SX+24fKoXaGincDnqF7SVcFL5zZdo6Icnoj7//2IDAdlv1tU +dIlST/j/euPqizePPqJi/g7ZxP8/3+Ldi8XxVirSTH0y60g78iy33vmGisOf +21SrSLuvZ2a+7KWiROdBszzS/s6h3fCZimIJvkOJpEOPXFWqGadiu0mFyG7S +MaVd+2hz5H5s9WmyJv3vl1SPVh4aHh3N4lMjbXWEnpDIT0MDFc8XPKTbROqu +GgnR8NZ0m2oXud9OpdtbJ4Rp6GL5W6iKdKfR5Og/4jT0/bB0NI605/N0UT8Z +Gh4ImUy2Jd3vp2Yoq0jDrJPD0uKkd8/Ue7ym0/BSxR/TbjL+YdSZq2YbaPjY +/Ie1J+lpIrP110YaeksLaEiTjrXZMMbRp6F9WUX5SzLfUg76GiqZ0vCmzZoA +Q9JCK3579JjTUP6eWMUQma+Z+ecTsqxpqJFLPXmWdH7j01berTSUedtH6SXz +neoeOHZ/Gw07ozo7j5AuHV0SjfCgYYygv5Ys6RuSBp6D/jT06n9Rb0vWT9Oe +orHGKBou/NiQnUzWm+0CUyzuCA3dKpf2CJJ+kdlhqJ9IwwfzZZ9PkfXZfW9l +YulJGsaLyPankPU7vipSLOUyDddfPP3D5QIZ72JhBvsKDdN6hrQekfU/p1/h +OV1Gw30WSYprSfP59JUG3qChB8NZaozsHzI1NgyrBhr231rM3XqOgAKLQc8/ +zTQ0vElPK8kk6687PvF2Gw1D/tXWnyD7kSYv8UTtLQ2tByabksh+Ze6q6CUw +TMOw3e7f4tMJ2D83mdj6Fx1jo2d9e8l+aXxwt9QXMTrynJiL/HyMrP+Rnmt8 +MnT0OiL29FsyAWW9jZ2mSnTcWL7CdCyRgL6H5zVuGdKR2uYT2xhHwJYUZteV +nXQ0oMQRDyPI/P9zPeRRAB03Ob6/fDqc7D9RSnwf9tJRSbLgk/tBAtKCVmnJ +RNLxQsXPY0OhBNTbfzh2Jo1cby3i+WovOR/EkjYe4dDxaGrbi98+BPCkTzfl +3abjwAUZ5jlvcr/5gj1u19IxZuK3rLIXAfumnVMmH9MxteCgFWsHGc8uld49 +PXR8wPMg1sKFAKmi1lRXPiUUunW967oVAb82rOnT3KaEWdTHbybUCZgpkEvS +81BCNyc/Ffp6AqZEVFWYO5Uw8b2uheNaMn4/mcEWe5VwV7DvdKEyOQ9r/Wc8 +4pVQXCHcUU6B7A/2d4TTypTwWfkXv1hynufv84GBaSWMuRPqNzrChdwPQQNf +55Wwk/6x7x55fsjZEpEytqSEloV/dh3/woUzemltcyuVyXmRkLpmgAvJvzlu +IhRlfM6WCOHv5sK+dP4wlpUybpY95ejfzAXWtariCxeUsf3xkvpCIRd6adeK +LC8p49L2vdr5l7kQe6GicKpIGW2WRb0xIM87d5LKLztXKKPluaM/As9zQde9 +OE+4ThlV21OeVaRzYT1/TmbqJ2X8Ki1r8m80eV7ZeSQxSkMF/77+pZTpyIVJ +MTvf7Q0qWHXNNLJ8igNd+5VeBbeoYPGhvhUxkxyob56HhGcqmJzVy7Ye50Bm +7DXqP50quHymp7jvKwe0B1Z//DWigoNjB8MnezgQynnpXSCuival8TwV9RwY +2bLNcyhAFa/WldaEnOLAUIbv9nABNTRZ2NpcJ80B2+/Rtp8N12Js99+HA7Vq +YNRfMOJmwjosrmm2EWJUk/8X0rwnGtajTC8tx2XxGog9VztT810dg3b/oLB6 +K0Ah7YaToaEGar6cRjjxN+RtYK4R36OJbap3vYd9y+CpnJnBz3NaKBZwtemX +81UwVmjI3Ni5Ed+JTgWNal0BYb6SSL9kbZTWcMmWzCkEShKVtUNNB3WYJW/l +6vJhparXbecWHaTNPb8KmAtabNkb0d66WO/W+PWzZQ6E94k12vHooe1nPUNL +93Pw/WfGNts8PSz1no2qaD0N1hub82019VFwsvLWvriT8PCnye/ZF/pI17kT +dN4nBUI1dHteBxpgg2TVvp+8ycAeD+jYsdIQi78UOcfeiQdLFZnNf5UYoqx3 +542VlTGwLvFUTAODgemDKKS9LxLqTMr4HYwZuOd6lre+RyQ4zT7Kesti4IZe +rzgL20iICZ2uGjZj4JWWruVpayOh1cv3k7ADAx/MCBVcGoqAIKahnacvA1Xt +i558942Aih+f5KfSGOg1uJyhvCsc1AOZj1R7GJixpmFfeEoYnFVynD/2noGi +FxX1tGLCYOrjLoOBPgaOyFkv/QgOg4ceGdcKBxm4nnkjO9cpDJydPuZKjzHQ +8MwtDQeFMDhskhK2kscIq7oObHoYfABaRV/Tx1SNsDVk+pbM+xAIfBh0/OZB +I8zmJEyLTQbDeMhItGWkEe7Opaz+rysYYhT37+uMMsJdBWLc1/XBcCrugPPc +ESPMvbuU0JMZDDXGUTRWqhE+LW+baNUJhoXbx+oa843wde/bXJHovZB1o3Dq +TaMRXrAVN5oTDoJHxR0Bk5JMfDVvMT54MBD6Heg7o2SY+O37lU+BPoHA8ytk +x285Ji7cCtKYtQsE860Cjvw0Jnps/XLFWiUQmpcZM2TVmah93mpZ0bsAeLar +aKWZKRMzkw3MqWYB0KMSXJ25m4mjYvuFVKj+MPXP0uzGO0w0vvvag8XvB1+2 +WxWfvMfEEv4yjteML3QtP20zWMtEhefRgWlffaHWV+7ihXom2sZ9b1n21BeS +ZQyMF58wUcP7DHHkrC+sSQuOe/qeifOGv1emKviCxp63PIG8xphmq9WZFu8D +/qrXVuZvNsalzWuF+iw8IfaxT7CakzEeyV9ycFb3hMxAsTauszHumezd/kHE +E+rKDme0uRnjnVmhBEavB0io2Ygs+hmjhtigz3y4BzSrfZbwjTJGTRl3/6ry +HaC+jkpTKzLGVQIBLi4Ud5hUzzbkThjjm3vOutvst0HXM7QU/2mMNVLmC8GM +bVAfOu4SOW2MDqVyzueUt8EZru1Bw3ljfPCfS4TIgiuoG/NU3eczwTPFLbav +rrvCLtsQeqOUCd7njNp4SLhCxx7r1R0sE+wOWNuBY85wt/T3p+k0E8x86GA8 +3eYEhpsiZ+3STbC4w/362jonuPVpdHXxaRNsopTs31PlBFxKH8MuywRTFp5X +CJ92gqq8+tOFl0wwVa5L4rejExRnpDCtq02w7Kb4QGrlFjgZKXIur90Ew3M0 +2ks6N4OHhTKaUFj4W0Rjf1eUHSx2CAo30ljIm1PWtd7TDooDx3vtlFnYPGHq +ch7s4EvqvWiPdSzc3WZHuS9oB+FPttw4rMvCl2sEHxldtoVTjnGUu1YsfHxz +YGK2xQbuu79d0D/AQqkZYn5cxxrkQ07c06pnYWp6TPhBews4s7TbIL2BhSUJ +/55SYFgAb5YV52sTCxV1+MV7lCxg5DZ/RfETFi5XZjAz5jfBfZ7jeWLtLPQ+ +4m/VVrkJPHISo2c+szDs67L2v4U3QV7tYYOHq9hYKMT7V8ygGax23MGRE2bj +ov/H3G2vzSCx30gzeg0b2ya+vd70yAyC+OdUtCXZ6PnntaLzJTNgbImSKKGw +cbD1cKG+qxl0DoT/TNFho/dd9ev8TxAkhfZzNruxMVJ3h8Z8HEDppvjYiR1s +vMKyrBx3B9CNP7Mp24uN6/77zBU0AHCcqHnb5cfGsv7anqoxU0jtnP7lv5+N +HePFLRxfU5grSTCPTWLjh/YXSZmb2dBjkt1efo2NDS+eC9w3M4GgQ6WXbavZ +GEoegqlKJjBTfStwtIaNJY0T5WW8JiCm1DWrc5uNw2VOx6WajMFeUFHhQT0b +D4xoSx+3MYa6jvKA9rfk9xddeBThxgQ74buaUV1snGDNOX1iMqHL+smMTC8b +A8XkgkIVmDB1/1uaTz8bfd3za758MgLNK9rX/xth48mBs6EOoUZQ12MWlTHG +RsFBp0nuViOwk3CBjRNsXElbL2xkYAS7Txx6HTnNxi2DfCUFCwyYqk/Nl55j +o7Kt7sf4fgYkz+f6359nY3TmS/O4Jgas0a/Q8F5ko8PyDTV5/zCgMOT+9NIS +G/2eVAq1ZzDgf3jbA4M= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07670375492764694}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07670375492764694}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994388838242166*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"7ce15b32-92d5-4163-92cf-f752e5b64d56"] +}, Open ]], Cell[CellGroupData[{ @@ -11139,66 +11833,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[199]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], + "In[121]:=",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 199, 165, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752212366*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1151056519405192`*^-150\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 45, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943888382940493`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], +In[121]:=",ExpressionUUID->"8794110b-d87d-4d1f-b36b-d0f46f43bede"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 199, 166, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99133175222237*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.2043880398041273`*^-153\\\", \ +RowBox[{\\\"\ +692388265304082962155241704502629852543932276498796563311324806235240\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8063384494795553340756316369516704730972160000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 46, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943888383023376`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], +In[121]:=",ExpressionUUID->"5d42644b-5294-47bd-9ec7-28343dda933d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 199, 167, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317522303677`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.208188203307072`*^-156\\\", \ +RowBox[{\\\"\ +257637673519649270217965438245428568131597200085202201208143960400132\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3853705134253980954253210971658303947407360000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 47, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.994388838310471*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], +In[121]:=",ExpressionUUID->"f1b4e758-8a6b-438c-bbd0-0626c1318bfd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 199, 168, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331752237467*^9}, +during this calculation.\"", 2, 121, 48, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331752212366*^9, 3.9943888383180027`*^9}, CellLabel-> "During evaluation of \ -In[199]:=",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], +In[121]:=",ExpressionUUID->"1e9753eb-9839-470f-8663-ee71341ac98d"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.991331759108553*^9}, +Cell[BoxData["9.8035761574487`"], "Output", + CellChangeTimes->{3.991331759108553*^9, 3.994388915567479*^9}, CellLabel-> - "Out[199]=",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] + "Out[121]=",ExpressionUUID->"1f374837-415f-4279-bd7f-a041514732b9"] }, Open ]], Cell[CellGroupData[{ @@ -11265,68 +11969,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849016830597*^9, - 3.991849020984995*^9}},ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-\ -7a397847208f"], + CellChangeTimes->{{3.991849016830597*^9, 3.991849020984995*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 169, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591425533`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.251526484960345`*^-205\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 122, 49, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9943889156189127`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], +In[122]:=",ExpressionUUID->"f018c18e-7adf-408a-a45f-49e3b24a36f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 200, - 170, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591525517`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.133447119516528`*^-209\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 50, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9943889156271057`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], +In[122]:=",ExpressionUUID->"8bc35039-b7bf-467e-bfb4-0d18fb738bdb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 200, 171, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331759160553*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.919833088272113`*^-214\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 122, 51, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9943889156346607`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], +In[122]:=",ExpressionUUID->"98f023a3-e219-4659-b782-e941fcc645ad"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 200, 172, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317591685543`*^9}, +during this calculation.\"", 2, 122, 52, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317591425533`*^9, 3.9943889156422033`*^9}, CellLabel-> "During evaluation of \ -In[200]:=",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], +In[122]:=",ExpressionUUID->"43dcd9de-a711-4b5d-acf1-5c97dc723cbc"], -Cell[BoxData["1.044718879268698`"], "Output", - CellChangeTimes->{3.991331766558941*^9}, +Cell[BoxData["0.43920331213698655`"], "Output", + CellChangeTimes->{3.991331766558941*^9, 3.9943889249218273`*^9}, CellLabel-> - "Out[200]=",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] + "Out[122]=",ExpressionUUID->"12d91135-6d15-4ff2-b2e0-6cbed3108c0b"] }, Open ]], Cell[CellGroupData[{ @@ -11347,8 +12055,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11393,68 +12100,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849024657757*^9, - 3.991849027138817*^9}},ExpressionUUID->"22b50200-0b82-dc47-9932-\ -f1f0210d6caf"], + CellChangeTimes->{{3.991849024657757*^9, 3.991849027138817*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 173, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317665951805`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.251526484960345`*^-205\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 123, 53, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.9943889249716263`*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], +In[123]:=",ExpressionUUID->"a92fddfa-d415-4670-935c-3683649f55b9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 201, - 174, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666041794`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.133447119516528`*^-209\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 123, 54, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994388924981245*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], +In[123]:=",ExpressionUUID->"1527a4e7-ca28-4b25-afdd-98a9d50a3668"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 201, 175, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666131783`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.919833088272113`*^-214\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 123, 55, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.9943889249924097`*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], +In[123]:=",ExpressionUUID->"9eaff94e-ece2-4428-8e75-90f8bd620e84"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 201, 176, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317666211815`*^9}, +during this calculation.\"", 2, 123, 56, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317665951805`*^9, 3.994388925000022*^9}, CellLabel-> "During evaluation of \ -In[201]:=",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], +In[123]:=",ExpressionUUID->"9f1c6bdb-43da-42d5-8471-63a2a0151158"], -Cell[BoxData["4.7987767072565894`"], "Output", - CellChangeTimes->{3.991331773590704*^9}, +Cell[BoxData["26.837107052886875`"], "Output", + CellChangeTimes->{3.991331773590704*^9, 3.994388934002358*^9}, CellLabel-> - "Out[201]=",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] + "Out[123]=",ExpressionUUID->"1d311703-3a71-49d4-ad8d-31a4103dfc14"] }, Open ]], Cell[CellGroupData[{ @@ -11475,8 +12186,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11521,68 +12231,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849031047804*^9, - 3.9918490341764317`*^9}},ExpressionUUID->"8a5105db-666c-444e-9451-\ -d3e8d1574bcd"], + CellChangeTimes->{{3.991849031047804*^9, 3.9918490341764317`*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.4739848254513645`*^-190\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 177, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736257057`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.251526484960345`*^-205\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 124, 57, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943889340535173`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], +In[124]:=",ExpressionUUID->"2d005cc3-13b1-45bc-b774-c054ec581718"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.7749775224318996`*^-194\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 202, - 178, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317736361847`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.133447119516528`*^-209\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 124, 58, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.994388934064702*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], +In[124]:=",ExpressionUUID->"5073d3b6-086c-419a-87e6-ed82308e96d8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.1125899281121783`*^-198\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 202, 179, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773644182*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.919833088272113`*^-214\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 124, 59, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.9943889340743523`*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], +In[124]:=",ExpressionUUID->"422f30be-84f0-4bd5-ba35-8956485b2a9c"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 202, 180, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331773653183*^9}, +during this calculation.\"", 2, 124, 60, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317736257057`*^9, 3.994388934081395*^9}, CellLabel-> "During evaluation of \ -In[202]:=",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], +In[124]:=",ExpressionUUID->"d47cdb15-3b49-466d-aef6-9660b62201a8"], -Cell[BoxData["15.12281532960454`"], "Output", - CellChangeTimes->{3.991331777337887*^9}, +Cell[BoxData["3.8555759882870353`"], "Output", + CellChangeTimes->{3.991331777337887*^9, 3.994388938507757*^9}, CellLabel-> - "Out[202]=",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] + "Out[124]=",ExpressionUUID->"cf190480-b6ab-4a58-b1f9-8077f6ab4514"] }, Open ]], Cell[CellGroupData[{ @@ -11591,22 +12305,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918490375675926`*^9, - 3.991849040901537*^9}},ExpressionUUID->"d0efa798-230b-fa46-b413-\ -76bfd8e40ccb"], - -Cell[BoxData["0.12263596348954131`"], "Output", - CellChangeTimes->{3.9913317773679104`*^9}, + CellChangeTimes->{{3.9918490375675926`*^9, 3.991849040901537*^9}}, CellLabel-> - "Out[203]=",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] + "In[125]:=",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], + +Cell[BoxData["0.043177065634703485`"], "Output", + CellChangeTimes->{3.9913317773679104`*^9, 3.994388938534593*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"81b2c4c0-39bc-4754-bca9-08c0435a4d01"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918490438339844`*^9, 3.991849046673996*^9}, - 3.9919249287922287`*^9},ExpressionUUID->"f842f74e-f562-934a-9011-\ -6604b8708636"], + 3.9919249287922287`*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ @@ -11629,12 +12344,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[205]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], + "In[127]:=",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.9913317774008274`*^9}, +Cell[BoxData["9.572341068730038`"], "Output", + CellChangeTimes->{3.9913317774008274`*^9, 3.994388938549383*^9}, CellLabel-> - "Out[205]=",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] + "Out[127]=",ExpressionUUID->"f5045bd3-5b4e-4b1d-9bd1-0041d0b407d2"] }, Open ]], Cell[CellGroupData[{ @@ -11644,12 +12359,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[207]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], + "In[128]:=",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.9913317774358253`*^9}, +Cell[BoxData["2.311497489987273`"], "Output", + CellChangeTimes->{3.9913317774358253`*^9, 3.994388938559225*^9}, CellLabel-> - "Out[207]=",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] + "Out[128]=",ExpressionUUID->"45719723-020b-4fd0-8cc6-7df79478a220"] }, Open ]], Cell[CellGroupData[{ @@ -11659,12 +12374,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[210]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], + "In[129]:=",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.991331777510603*^9}, +Cell[BoxData["22.126442353671575`"], "Output", + CellChangeTimes->{3.991331777510603*^9, 3.994388938568963*^9}, CellLabel-> - "Out[210]=",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] + "Out[129]=",ExpressionUUID->"5e17c449-df5f-46e0-b25a-393aa0d58b60"] }, Open ]], Cell[CellGroupData[{ @@ -11854,12 +12569,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[211]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], + "In[130]:=",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[BoxData["0.041096786108657246`"], "Output", - CellChangeTimes->{3.991331777537592*^9}, +Cell[BoxData["0.007710229271619809`"], "Output", + CellChangeTimes->{3.991331777537592*^9, 3.994388938581375*^9}, CellLabel-> - "Out[211]=",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] + "Out[130]=",ExpressionUUID->"2ef3fe8c-a95c-4784-ba6b-8b2635ba0f76"] }, Open ]], Cell[CellGroupData[{ @@ -11873,12 +12588,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[212]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], + "In[131]:=",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[BoxData["4.371605972693579`"], "Output", - CellChangeTimes->{3.9913317776362495`*^9}, +Cell[BoxData["10.092791335182607`"], "Output", + CellChangeTimes->{3.9913317776362495`*^9, 3.994388938670412*^9}, CellLabel-> - "Out[212]=",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] + "Out[131]=",ExpressionUUID->"38402ae8-9965-4327-b1d9-a2063dd4ef18"] }, Open ]], Cell[CellGroupData[{ @@ -12070,12 +12785,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[213]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], + "In[132]:=",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[BoxData["0.013804398425195999`"], "Output", - CellChangeTimes->{3.9913317776511555`*^9}, +Cell[BoxData["0.04423082667930791`"], "Output", + CellChangeTimes->{3.9913317776511555`*^9, 3.994388938680758*^9}, CellLabel-> - "Out[213]=",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] + "Out[132]=",ExpressionUUID->"4ef15649-c7e1-416f-a209-d6350b5ada1e"] }, Open ]], Cell[CellGroupData[{ @@ -12089,12 +12804,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[214]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], + "In[133]:=",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[BoxData["7.5428626210616345`"], "Output", - CellChangeTimes->{3.991331777742655*^9}, +Cell[BoxData["4.213882411605997`"], "Output", + CellChangeTimes->{3.991331777742655*^9, 3.994388938768918*^9}, CellLabel-> - "Out[214]=",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] + "Out[133]=",ExpressionUUID->"9bc807eb-562d-4e7d-aad2-96fc7ec536d6"] }, Open ]], Cell[CellGroupData[{ @@ -12187,12 +12902,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[215]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], + "In[134]:=",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913317777546787`*^9}, +Cell[BoxData["0.06275239908812294`"], "Output", + CellChangeTimes->{3.9913317777546787`*^9, 3.994388938780817*^9}, CellLabel-> - "Out[215]=",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] + "Out[134]=",ExpressionUUID->"bb0850a9-b518-4cf7-92db-7f5356cbdd8a"] }, Open ]], Cell[CellGroupData[{ @@ -12282,12 +12997,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[216]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], + "In[135]:=",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991331777779663*^9}, +Cell[BoxData["0.937247600911877`"], "Output", + CellChangeTimes->{3.991331777779663*^9, 3.9943889387917967`*^9}, CellLabel-> - "Out[216]=",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] + "Out[135]=",ExpressionUUID->"b33b7451-a5d4-42c7-8e99-223d6feae8f2"] }, Open ]], Cell[CellGroupData[{ @@ -12410,12 +13125,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[217]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], + "In[136]:=",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913317778036633`*^9}, +Cell[BoxData["0.05881453549680789`"], "Output", + CellChangeTimes->{3.9913317778036633`*^9, 3.9943889388040733`*^9}, CellLabel-> - "Out[217]=",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] + "Out[136]=",ExpressionUUID->"ce3b525f-8226-4e79-9dc7-03c765bf3bae"] }, Open ]], Cell[CellGroupData[{ @@ -12477,68 +13192,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918490946810665`*^9},ExpressionUUID->"1dec41a6-6752-2041-9d38-\ -804123b5ccd0"], + CellChangeTimes->{3.9918490946810665`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.88658278748316`*^-204\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 137, 61, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994388938816412*^9}, + CellLabel-> + "During evaluation of \ +In[137]:=",ExpressionUUID->"acc672de-e904-4e53-9377-97b718d649d7"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4824605857550484`*^-208\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 218, 181, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778296604`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 137, 62, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.9943889388211327`*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], +In[137]:=",ExpressionUUID->"4aaf9831-cbd2-4a93-93ab-4ee4faa5fe15"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.4973951816523376`*^-213\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 182, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777838663*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 137, + 63, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.9943889388266068`*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 218, - 183, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317778466587`*^9}, - CellLabel-> - "During evaluation of \ -In[218]:=",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], +In[137]:=",ExpressionUUID->"c47c7b29-932c-4b00-92f0-3323a5394ebd"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 218, 184, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331777854885*^9}, +during this calculation.\"", 2, 137, 64, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913317778296604`*^9, 3.994388938831128*^9}, CellLabel-> "During evaluation of \ -In[218]:=",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], +In[137]:=",ExpressionUUID->"8ea1a6dd-e7a2-4d94-8a86-e1b64e3cc5e6"], -Cell[BoxData["4.37160597269358`"], "Output", - CellChangeTimes->{3.991331781456501*^9}, +Cell[BoxData["10.092791335182612`"], "Output", + CellChangeTimes->{3.991331781456501*^9, 3.994388941742758*^9}, CellLabel-> - "Out[218]=",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] + "Out[137]=",ExpressionUUID->"66f766ee-5876-4644-a5e8-771f432ab965"] }, Open ]], Cell[CellGroupData[{ @@ -12600,67 +13319,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99184909912471*^9},ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], + CellChangeTimes->{3.99184909912471*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.88658278748316`*^-204\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 138, 65, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.994388941783601*^9}, + CellLabel-> + "During evaluation of \ +In[138]:=",ExpressionUUID->"3f46331d-8fd6-43d0-a596-cde920ecded0"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4824605857550484`*^-208\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 219, 185, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991331781491499*^9}, +as a normalized machine number; precision may be lost.\"", 2, 138, 66, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.9943889417933073`*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], +In[138]:=",ExpressionUUID->"b89a1238-c6c8-4ab1-b254-0be867b4ca14"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.4973951816523376`*^-213\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 186, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815004997`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 138, + 67, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.9943889418013573`*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 219, - 187, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815094967`*^9}, - CellLabel-> - "During evaluation of \ -In[219]:=",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], +In[138]:=",ExpressionUUID->"236b81fd-9609-4b6a-8dfd-3d9132d7d1c0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 219, 188, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913317815164986`*^9}, +during this calculation.\"", 2, 138, 68, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991331781491499*^9, 3.994388941806567*^9}, CellLabel-> "During evaluation of \ -In[219]:=",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], +In[138]:=",ExpressionUUID->"2ec7ebc8-56a0-49f4-96b2-3efba00ccc24"], -Cell[BoxData["7.54286262106163`"], "Output", - CellChangeTimes->{3.9913317851500416`*^9}, +Cell[BoxData["4.213882411605996`"], "Output", + CellChangeTimes->{3.9913317851500416`*^9, 3.994388944741314*^9}, CellLabel-> - "Out[219]=",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] + "Out[138]=",ExpressionUUID->"be15cbda-1bb2-4051-882d-424a3868c41d"] }, Open ]], Cell[CellGroupData[{ @@ -12718,93 +13442,92 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918491043389053`*^9},ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-\ -b799ae260294"], + CellChangeTimes->{3.9918491043389053`*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk0Vd0bB3BzxgqhEpWprilzlNpPxkQoJUriuueQOcTNmAwpEVLRqxQp +iUIz6lcZ3vLeSqGBMp6LTJmdpPptf5x11mftdb7n2c8e1jKDdhN8PDw8PfhZ +eB95q73uUdPbrfzd8v1H1Si0dfS6IdOiFEW43lsVjt2Vb5StYlGDjBXDny7Y +kfVGSFy/Hj03ZL2OwK5gx9UKWnBQcUkMHMM+1bD8eVzJezSf+lIpCvtJ05Er +83qtaHpYLzgGe7CtMfpY9Wckxn27/jj2Sq7ygRnzr0gx44JdArbtj2iTUE4n +Ult8uj0Z+9n8oBi7pBtlJtxqPY39MV4u6mFgL5pYPr3pLPaokMXglB4Xqf7y +F8vGFjoT7Ko/24f8D0ha52IrSl5+daR6AK0M6hm5gm0vP3Nj1HwYrcsTi7mN +TV5VktUSHkXFhiyiEjtO1SHJj/MD6SQMPn6C/VmuRTesZBw1HY6/9hqbtd/3 +8LkzE8i+KMvoA/ZYHs+1ysBJVPPlg1E7trCS1tJxvWm041o3exQ7m1VrvVRm +Bi36WV5FY6+56Rq3YXYGCTSXe/Ovo5CxZvJoQDWNxuvN+Vdi+xh1cgbN59He +a7Vghz3FPiogqvYbRfQpf3XFPl4tZsoQ/oOy0h73eGPngPFtb85f9MksXjcJ +m1X0yiKkhBca/l5trcMuaTjXFS/PByEj9xtbscf63aMzz/DBZm0+jX7saPXp +e+WB/DAXYqslth7Xe3et8g89QaiJLjN2wW5rGn72p1AQ+F2vnvTHXjPxaP9i +GSEQSf2wLR671MA+S2tWCNzM6Nnb2HVPInn9q4VBRNvTT4hBoena5s4Bc3Hg +iWAHvcOWshNfGvVMHN6/PfR0GFunxQIkTCTAKpk4JapOIV/qwVVd7cVgduf9 +P9bYwXwcnS3iS6GU3FvyLzZX6c540owk1A94BnVq4P6QjSLv9KUgI7k3X0CT +Qny3+9YuPyIF8zl59urYa/RX7y4ZkoI27Rq1COz95hmVb7uk4cFI7wtZLQq9 +8woJlftPBmSPxRUFaFOo42Z6qoewLAS/dqm6hD08VFJ4y1IWwhJTdr7CFg3r +bd78XBYS6idHVTZQyCJxj4HHAzmYTDFSpLCrrhtNF+evgMk5H51IXQpd586F +bwpTgJtq2QaChhTavvdkR2iZAhSEdoltxR6uk7Yq61OACM7FXRHYBtc1Zda4 +KoLbtOP6Iew6pvs9wa2rwZncwP/ZiEITP7oiBhLWwHvPp8ENxhSSDrC4f2+n +ErRQoltmTCnUd13Ux9FXCf62Z/SZbqHQ469N8iPJSvB2qOVPArab3cEEtedK +oNJZECW9FdenEb47V08ZLDk3b2xE+P+DN8di5VTg0sh4XfY2Cu3xFtPa0a0K +CDkYF1hRCIXv1dv3WxVyr8/ITGOrJ+VvZK1Qg+a4IPft1hTiKdQ3i92lBn3J +PRvGsMs6DuyrfKEGNhaMVgsbfD6dS+NXFqwDOyklTT47XJ/Fzo+DTAY0Pfqs +/GYXhQqdLrbPxjKgsXIrU2s3hdKZ3V0C/zDguhVXLB2bdfzokGIzAy4z+K85 +OlFIsuYyj5O5OsTtGvrQtgfvH/1R9WplDRjqqnfhd6GQvNLZuFRKE26GbRIu +cqdQzekpxk8+Lbigxbto1SHcj0nXFnKtFhwSyko8h32lToVh5q4FyffXzSd4 +UEjJu+oD/UkLlsRXf/Nl4vmWclXJ/7Qhr3h/kCNJIQV5RXKNqw58rTGbigyk +kGZRmPgvpAcCfJwW++MUYrISprXs9aDGPeVKO3aOclaHh5se9LwS+OwTTyH+ +grvlDWw9aKt0upR4Ap+3K4N7sir0YI0J5fYiEd+nOR6XGcr68H1ReYfDKby+ +qXbaLkIGIL22dv55FoWuhag4PuAYQq687ejUDQo1haONiUUmUJrK7m79TKG1 +7q32B/23gCPNqyYkxUXE34d3FI4BmMY5xn2y5yK5oceL5JhmkHWKt3xFLheF +6Zt+zVK3gMlnw2ZefVzEHJl/JT1oCScVTvP+a9KHysxCF+W/s4Znin7+c3l9 +6PqU74vSbBsoeR0aNcDbj+hty9/UxdnC2COnX4XsfvSNh3+823MnbHvskfJ5 +ph8FrgrKiFd2AP65L+v3Hh1Adw6/en4+yRGWaQho2Ah/R5GTK2Y1Du8C/t26 +crWXvqPpHVbO/x7aDQlz0QO15oPI5EDmNu4uJzh/PC1dd2oQfVhx2bdOfw+s +7RQKMygYQitvJNQUr98L8zekklcfHkaPu9Tt7CWcQQbm1b00R5Biy5h3+Igz +bPaK2XJpagTpn88sLezaByLOnvwHP42iywKT2lm1LqBVVF5y7t4P9HDbhrak +J67w/oZ3SMreMZSz8bTkfMl+6M6ofarQPIbetRcl6585AHMdJV7xtuPowc48 +leDjbmB8JuuE9PtxNB7gxBPIOgjsqDJzXscJNG3F8Bk1d4cGx8S13DcTqHjk +Cx1qdAi+/09Iz3HfJHK5VuR1UNwDkgq25vp/mkT3Km0P8Z/0AEmGaJa85xQy +kf/w89RPD8gONrkU1jmFlLu8294f9oQYm2/1qi7TiBLzc8jr9YR6uwkFg4/T +qCnd3st6LxOqqth/hKxmUDY7X+xoExNOJOXN+DyaQTXP/v70svGCRiGdJk+F +WbTEDU7qV3mBLK8u2Rcyi0w8RouTDFhQkeC56WvtLLqROxZqb8SC0tY3r8fr +ZtGy5omtcsYsqByYzxNqmEWjlrMtxZtZwC0pk9B+NYvvFx5ejhkLZkJuSYZx +ZtHiWUlXqV0sUH9IB35tmUVUmqFIfgALXj7N/LaKO4vSq6MPP76B88NzZxz4 +aRSgd9GEXcyCDf/bpakjQCO7WxUixiUsWCUTlL9EkEaiF/tuPSpjwda0ZVs4 +QjRKCnEcfHifBVMB9x1NRWkUzVDxe/CSBTHvpO7OLqWR78X//Cs7WHDBJe3P +FwUa2SzuMw3pYoG3b37iNUUarU/ikdDrYUGK+RYzn9U06gsxLKvgsuBkrJ/X +5Boaedrnj5QPsyDCo96YR4VGLoKhgXfnWHCLOCsyxaCRdejK4FJZAhrW8yqY +G9LoZX7yjqzlBDDY0fw8RjQy5UyosFcS8FK2fbYaW0f1vy/migR4O0eJ6BrT +aMWnKPN2VQIenaUal2ym0dCmb7KihgQERgjm5QONzvJdfertRMCVEqbuIls8 +/w3iOTv3ErCs3YddhJ14gB2iv48ADcez/5rZ0Yh933Hd3/0ERA5nx0TuxPWT +vJkXmARoitPmHQ400m9ksuqPEMAWy5GN2EOjT5mqYsoZBHxdalY37EajO0jC +ZyCTgP0KR+y8DuL8kam6snMEiNoU0Z+x9WzqYo0vEhBceKfmhTuN0nm8JnZe +IcD4u+1YigeNrIKufmGXEmAQeHp0xItGCgopRlvvECCslVTizKLRVGPQOf5y +AtTje1KeYReooZ3p9wiwNPYqTSVo9Pvbt+eFVQQEmHxNlfem0X07+eK3rwgo +z3XIkfSlUeocn2B2IwGxYn5B/tjM4kFPVw4BmzOOeTdgLxWokqfeERD/d2VV +hB+N/Ktdzv78SMAJUUb/O38aKatfCFfhEtCKvts7B9Fo7lNM8/c+Aprfl2sU +YjclETp3Bwg49HLD+h/Ysd0GgybDBKjQYscTg2nUltN80GGSgEt1u29dP0Kj +rEWSlpG8JJSrBzVXhdKoZuLbgTB+Eg5K6ffyhNGo/1tJSKAgCUUROm2W2Kb3 +La4yRUgQjEqO4WD3ebB/7ZAkweEu+yLnKK7fzlLKUpoE4fTODpFwGm3eKMVA +MiRs4XDFrbAzJEqd9VeQ0BB5alX1wnhVZ4X8WhI0bR2EcyJoRBaVvpJRJuFA +WtMJDnZGxrHOJaokhL/06/2L3UdKSwgwSJhi33P2YuNxaWufYR0SikMn+BWO +0ajqj3Rcnx4Jq1i3y7Zjc793ne8yIEGvUGJLKPam55G1LcYkjA3+I16PTfnf +UXwKJAhNZQUciKTRYpcow0dmJKgR1uax2Cbm2+0qLEiQcbP5k4+dvqLnWNF2 +Eko1Fqt0YT8WuJuRv4OEp7+fpv/B7v0RdTPXjoTU7ec75KNoZNwg05rmSEJc +y0UtJ2xmRc/Qyd0kOJdVagZgp+Xd5TuxhwRj7Zalydg9ITY64S4kUOMSKfex +JdxlrYP3k2Dqt1y+cSHPpvegrxsJn39KnOtY+H51TKq7Bwn6hwp0BaJxPaI7 +ClyYJCwWN3KRwe6Zln2ym0XCocgrXqrYEt297+xIEnT7PzoZYBtzyvusfEg4 +3du23gyb+SjmN/iSELLnRo89dlrBjmWb/UkQCzWM37+QnyanYRhIQiAnUYBY +yGdT2zYEk8DZlukfiC3OqnBhhJBwWNjlSTj2RofYIOUwEi7d+jgYs5C/yTZZ +IZyEF3xivInYZ1SXX5Zj435YTv5KwX64lHtPMpKEwZm09jPY3b8qGsWi8f4Y +/5J/diG/P7ZbMJaET54ft2diG32wpf/GkfC68cTHBf8fjJmrSA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12818,105 +13541,104 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV1Hk0Vd0bB3BzxgqhEpWprilzlNpPxkQoJUriuueQOcTNmAwpEVLRqxQp +iUIz6lcZ3vLeSqGBMp6LTJmdpPptf5x11mftdb7n2c8e1jKDdhN8PDw8PfhZ +eB95q73uUdPbrfzd8v1H1Si0dfS6IdOiFEW43lsVjt2Vb5StYlGDjBXDny7Y +kfVGSFy/Hj03ZL2OwK5gx9UKWnBQcUkMHMM+1bD8eVzJezSf+lIpCvtJ05Er +83qtaHpYLzgGe7CtMfpY9Wckxn27/jj2Sq7ygRnzr0gx44JdArbtj2iTUE4n +Ult8uj0Z+9n8oBi7pBtlJtxqPY39MV4u6mFgL5pYPr3pLPaokMXglB4Xqf7y +F8vGFjoT7Ko/24f8D0ha52IrSl5+daR6AK0M6hm5gm0vP3Nj1HwYrcsTi7mN +TV5VktUSHkXFhiyiEjtO1SHJj/MD6SQMPn6C/VmuRTesZBw1HY6/9hqbtd/3 +8LkzE8i+KMvoA/ZYHs+1ysBJVPPlg1E7trCS1tJxvWm041o3exQ7m1VrvVRm +Bi36WV5FY6+56Rq3YXYGCTSXe/Ovo5CxZvJoQDWNxuvN+Vdi+xh1cgbN59He +a7Vghz3FPiogqvYbRfQpf3XFPl4tZsoQ/oOy0h73eGPngPFtb85f9MksXjcJ +m1X0yiKkhBca/l5trcMuaTjXFS/PByEj9xtbscf63aMzz/DBZm0+jX7saPXp +e+WB/DAXYqslth7Xe3et8g89QaiJLjN2wW5rGn72p1AQ+F2vnvTHXjPxaP9i +GSEQSf2wLR671MA+S2tWCNzM6Nnb2HVPInn9q4VBRNvTT4hBoena5s4Bc3Hg +iWAHvcOWshNfGvVMHN6/PfR0GFunxQIkTCTAKpk4JapOIV/qwVVd7cVgduf9 +P9bYwXwcnS3iS6GU3FvyLzZX6c540owk1A94BnVq4P6QjSLv9KUgI7k3X0CT +Qny3+9YuPyIF8zl59urYa/RX7y4ZkoI27Rq1COz95hmVb7uk4cFI7wtZLQq9 +8woJlftPBmSPxRUFaFOo42Z6qoewLAS/dqm6hD08VFJ4y1IWwhJTdr7CFg3r +bd78XBYS6idHVTZQyCJxj4HHAzmYTDFSpLCrrhtNF+evgMk5H51IXQpd586F +bwpTgJtq2QaChhTavvdkR2iZAhSEdoltxR6uk7Yq61OACM7FXRHYBtc1Zda4 +KoLbtOP6Iew6pvs9wa2rwZncwP/ZiEITP7oiBhLWwHvPp8ENxhSSDrC4f2+n +ErRQoltmTCnUd13Ux9FXCf62Z/SZbqHQ469N8iPJSvB2qOVPArab3cEEtedK +oNJZECW9FdenEb47V08ZLDk3b2xE+P+DN8di5VTg0sh4XfY2Cu3xFtPa0a0K +CDkYF1hRCIXv1dv3WxVyr8/ITGOrJ+VvZK1Qg+a4IPft1hTiKdQ3i92lBn3J +PRvGsMs6DuyrfKEGNhaMVgsbfD6dS+NXFqwDOyklTT47XJ/Fzo+DTAY0Pfqs +/GYXhQqdLrbPxjKgsXIrU2s3hdKZ3V0C/zDguhVXLB2bdfzokGIzAy4z+K85 +OlFIsuYyj5O5OsTtGvrQtgfvH/1R9WplDRjqqnfhd6GQvNLZuFRKE26GbRIu +cqdQzekpxk8+Lbigxbto1SHcj0nXFnKtFhwSyko8h32lToVh5q4FyffXzSd4 +UEjJu+oD/UkLlsRXf/Nl4vmWclXJ/7Qhr3h/kCNJIQV5RXKNqw58rTGbigyk +kGZRmPgvpAcCfJwW++MUYrISprXs9aDGPeVKO3aOclaHh5se9LwS+OwTTyH+ +grvlDWw9aKt0upR4Ap+3K4N7sir0YI0J5fYiEd+nOR6XGcr68H1ReYfDKby+ +qXbaLkIGIL22dv55FoWuhag4PuAYQq687ejUDQo1haONiUUmUJrK7m79TKG1 +7q32B/23gCPNqyYkxUXE34d3FI4BmMY5xn2y5yK5oceL5JhmkHWKt3xFLheF +6Zt+zVK3gMlnw2ZefVzEHJl/JT1oCScVTvP+a9KHysxCF+W/s4Znin7+c3l9 +6PqU74vSbBsoeR0aNcDbj+hty9/UxdnC2COnX4XsfvSNh3+823MnbHvskfJ5 +ph8FrgrKiFd2AP65L+v3Hh1Adw6/en4+yRGWaQho2Ah/R5GTK2Y1Du8C/t26 +crWXvqPpHVbO/x7aDQlz0QO15oPI5EDmNu4uJzh/PC1dd2oQfVhx2bdOfw+s +7RQKMygYQitvJNQUr98L8zekklcfHkaPu9Tt7CWcQQbm1b00R5Biy5h3+Igz +bPaK2XJpagTpn88sLezaByLOnvwHP42iywKT2lm1LqBVVF5y7t4P9HDbhrak +J67w/oZ3SMreMZSz8bTkfMl+6M6ofarQPIbetRcl6585AHMdJV7xtuPowc48 +leDjbmB8JuuE9PtxNB7gxBPIOgjsqDJzXscJNG3F8Bk1d4cGx8S13DcTqHjk +Cx1qdAi+/09Iz3HfJHK5VuR1UNwDkgq25vp/mkT3Km0P8Z/0AEmGaJa85xQy +kf/w89RPD8gONrkU1jmFlLu8294f9oQYm2/1qi7TiBLzc8jr9YR6uwkFg4/T +qCnd3st6LxOqqth/hKxmUDY7X+xoExNOJOXN+DyaQTXP/v70svGCRiGdJk+F +WbTEDU7qV3mBLK8u2Rcyi0w8RouTDFhQkeC56WvtLLqROxZqb8SC0tY3r8fr +ZtGy5omtcsYsqByYzxNqmEWjlrMtxZtZwC0pk9B+NYvvFx5ejhkLZkJuSYZx +ZtHiWUlXqV0sUH9IB35tmUVUmqFIfgALXj7N/LaKO4vSq6MPP76B88NzZxz4 +aRSgd9GEXcyCDf/bpakjQCO7WxUixiUsWCUTlL9EkEaiF/tuPSpjwda0ZVs4 +QjRKCnEcfHifBVMB9x1NRWkUzVDxe/CSBTHvpO7OLqWR78X//Cs7WHDBJe3P +FwUa2SzuMw3pYoG3b37iNUUarU/ikdDrYUGK+RYzn9U06gsxLKvgsuBkrJ/X +5Boaedrnj5QPsyDCo96YR4VGLoKhgXfnWHCLOCsyxaCRdejK4FJZAhrW8yqY +G9LoZX7yjqzlBDDY0fw8RjQy5UyosFcS8FK2fbYaW0f1vy/migR4O0eJ6BrT +aMWnKPN2VQIenaUal2ym0dCmb7KihgQERgjm5QONzvJdfertRMCVEqbuIls8 +/w3iOTv3ErCs3YddhJ14gB2iv48ADcez/5rZ0Yh933Hd3/0ERA5nx0TuxPWT +vJkXmARoitPmHQ400m9ksuqPEMAWy5GN2EOjT5mqYsoZBHxdalY37EajO0jC +ZyCTgP0KR+y8DuL8kam6snMEiNoU0Z+x9WzqYo0vEhBceKfmhTuN0nm8JnZe +IcD4u+1YigeNrIKufmGXEmAQeHp0xItGCgopRlvvECCslVTizKLRVGPQOf5y +AtTje1KeYReooZ3p9wiwNPYqTSVo9Pvbt+eFVQQEmHxNlfem0X07+eK3rwgo +z3XIkfSlUeocn2B2IwGxYn5B/tjM4kFPVw4BmzOOeTdgLxWokqfeERD/d2VV +hB+N/Ktdzv78SMAJUUb/O38aKatfCFfhEtCKvts7B9Fo7lNM8/c+Aprfl2sU +YjclETp3Bwg49HLD+h/Ysd0GgybDBKjQYscTg2nUltN80GGSgEt1u29dP0Kj +rEWSlpG8JJSrBzVXhdKoZuLbgTB+Eg5K6ffyhNGo/1tJSKAgCUUROm2W2Kb3 +La4yRUgQjEqO4WD3ebB/7ZAkweEu+yLnKK7fzlLKUpoE4fTODpFwGm3eKMVA +MiRs4XDFrbAzJEqd9VeQ0BB5alX1wnhVZ4X8WhI0bR2EcyJoRBaVvpJRJuFA +WtMJDnZGxrHOJaokhL/06/2L3UdKSwgwSJhi33P2YuNxaWufYR0SikMn+BWO +0ajqj3Rcnx4Jq1i3y7Zjc793ne8yIEGvUGJLKPam55G1LcYkjA3+I16PTfnf +UXwKJAhNZQUciKTRYpcow0dmJKgR1uax2Cbm2+0qLEiQcbP5k4+dvqLnWNF2 +Eko1Fqt0YT8WuJuRv4OEp7+fpv/B7v0RdTPXjoTU7ec75KNoZNwg05rmSEJc +y0UtJ2xmRc/Qyd0kOJdVagZgp+Xd5TuxhwRj7Zalydg9ITY64S4kUOMSKfex +JdxlrYP3k2Dqt1y+cSHPpvegrxsJn39KnOtY+H51TKq7Bwn6hwp0BaJxPaI7 +ClyYJCwWN3KRwe6Zln2ym0XCocgrXqrYEt297+xIEnT7PzoZYBtzyvusfEg4 +3du23gyb+SjmN/iSELLnRo89dlrBjmWb/UkQCzWM37+QnyanYRhIQiAnUYBY +yGdT2zYEk8DZlukfiC3OqnBhhJBwWNjlSTj2RofYIOUwEi7d+jgYs5C/yTZZ +IZyEF3xivInYZ1SXX5Zj435YTv5KwX64lHtPMpKEwZm09jPY3b8qGsWi8f4Y +/5J/diG/P7ZbMJaET54ft2diG32wpf/GkfC68cTHBf8fjJmrSA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6296948922963853, + 1.5304125193912788`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.6296948922963868}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12928,21 +13650,21 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, - 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6296948922963853, + 1.5304125193912788`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.6296948922963868}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12956,103 +13678,102 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk4VVsfB/CDlEyROIYoY1FKZCq1fjgls0RmcZyzRWbSCXG7GW43GaJS -N5GIJJEhTa6ikk4RirwRtqHM83G6yrv8sZ/9fJ71rO/67rWevZ+tSA+2Z/JS -KJR+fK3cQz/s2PKo5cN+hd4s62JnLto/ka9Lp5UgadB5dxe7N0cvU4X2DLX5 -CNGKsO0Y71cL67xCXx8o1hRgl7Pi6vlpbPT5XeSWPOzzr6Xr4oo/Irc8oUvZ -2I9bQm8uaX9Cat59nKvYI11NMaefdqIRFtc5HVt2UNltwfQr8st2rDqPbTkZ -YxjO/oYYrzjCZ7Frl0aEWMV9qEyj/9gp7M9nqdHVQSSSt6CWBmBPrKaNzGkP -oljyGscLe3VyiIsOZwjlcQOMHLAVxLMbQ59+R/6tGTEHsW3kFu5MmI4hKe3R -iS3YRK6SlKbABErOUFakYsep2iacYE+iDwH/2vBjd1Lbd0UUTyP3jbtv9Dhx -EcPV3y8jeQYNDUg9e4s9dYNy62HQLMpaG9pRgS2gpCk2rT2PxLbnURKwMxn1 -ZmKSC8hGJ0E0AHtzoUvcTs4CKrzLodpjG2xPnAh8uoi2fC6Ql8M+rveNPWK6 -hPYEzszlHuWiOdbJVYJqv5CZs2xvHPYfT4WM1AV+oy1eom88sLPA4J4vexkF -i8f+JYXNKGikhRXzADv7bFe0IxcVv87oPSvHCyVItMAee2rYMyY9mReYLpUn -tmLHaMxXlAXxgUAGa7zFAfd9oKg8qc0PFhTFBknsrpax2t+3+cEu5FHIwBHc -f+aRq6jkalBzfCXzELtkt80lTc5q+Hg82tsCu+FxFE/AUwHoKmxqDLLnovn6 -tm/fTYXBSPwmX5IdF623EhaLrhUGN8rNSYSt1U4DEUMRuCPy4B7Hlov8B6py -d+0QBcUBt0wf7BBettY+YTGI43XW0LThokGl0umEBXEwkvn3TJIl3h+iaW2z -znp43f72pCY2770hRenQ9WCuE4BaLXBfnU32xaPr4RZ70Ewa29U07eGHXglw -qHyhdeUQFzX7hIVT30nCH3Wj0S4HuKinMOWCl4AU6HgJ/zNG46Kx0eLbdw9I -gflo/sVYbMEIsm1vnRSMLb0Yv2nKRbR4h91eVVQQnXHP/mjMRU/y9eaLcmRA -TKS28/c+Lsof/Bm5J0IeklNd3pzW5aJDjkk94fflgf20y2F6N85vkDh4f0ge -wlvjen2xd+dvl9zsogDMGw0zh3XwftI9K/j3bwJo27FGdhcXzUz2nvp+bjPo -+AuKRW3nIolAWmWFtRL8MJKuiFLioqF8weN2/kpgOcxn26rIRTVfW+TGE5Vg -Ys2qia3Y7lYe59TqlODDjindtk2437ZI+2vaypCoZDkjJ4/XHymciqWqQKNL -IC2WykUOvkKaFn2q8MSr/3KSEBehSEdtp1+qsEmP0VUvyEUaCTn6DBk1aOk+ -vWt5LRdRbuuYxB5WAzsPRelwAS663+Pm9PCFGuycLGfb8uP382jJWdm8LdCj -ve7319+LqIZm/XmErg6lJYZDZtOLSE4pNe7CwHbgxLzOOtG2iJ79PafO5dWE -7udaWc6ti8h91qWdUNQEOy+zNNrHRXSzQUXdxFMTAqhlJ2SaF5GS75PWxQ5N -UAridlQ3LSKNkkFV4t0OaH6a/K7uxSKSl1MgNrtowZ9HYh0kHiyi7QURwv8h -bdD/3+NjrxIX0a0wFbsqti5sDfC0ubhrEbVEIv34AkP4fc7gv+dvOEjR85ON -R8A+UA5yWNd9hIOYy9Wl8qcBBMLN8zJ6FhB1tGYNlW4Cags1KaJOCyhCx+jr -JQ0a3BsOumPaOo/o40uNEiMHwKL3+aFsy3l03yR8TU6zGShR0vn4q+dQ/pz/ -i5JMc3B3nS9mbZ1Di8bS7xviLGF1vFStScos6qbwTfd5WwN/jOIZe84MCtoY -nHZW2RZS3CVHJ0/MoFK/xrrLCXZAU8+u0eqYRlGzMpxtfoeB/mPDv+6202je -4uDRN8fsYfmmMY9q3RQydEs3Hjx8BEpuHMmRNZhCrTLZ/g06DtDUrKnnFD2J -ZO+ce1a01RH+XdMZfShmAtX0aljZiByFIv/WIHrWOFJon/KNHD8KfLmtVp0v -x5DO5fSS271O8II6djJ0aBRlr5rdcaneGYy7N6X4KY+iauOdXQmPXYDFLvC8 -7TaCsvT/Fl8qdgWZyLt2227/QM3/K0jUSXaD2G2s1wyeH6jK+oZKyB/ucPKX -RuaS+3c0HXiEEsTwAO0k3sx774fR/EH14xOmnmAl0rsxxmIYFY1/WQzXOwYy -e2vX2L0eQs63Cnw8hL3gA6cj3MZhCFU8tDzGl+QFdPpl3uv9g8hQrpV7nusF -G8pzRU6dHUTKvb5dH/28IZjnW0G0xiAaEDphe4P0Bn41SqnipwHUkmLjY+ZI -h/jD1z5WXRxAmawcoZMtdJhIOyYoYT6AntUuc33MfcBv18tzrqIDaJ07JOk8 -8YHspurHW76RaPOGN80bn/lAkci1af8eEmmxraVX1/pA08HzZaXdJLI3crvb -+cIHyooD6vW/kihzY+S7M299YPsaLSO7LySS7b63rrHTB7pO0UKvt5FIxZOa -5c7xASK5uTCjkUSGXhNFCbsZUEsft6JWkujOtalwGz0GrJa4YplYQaINbTP7 -qQYMGHvMWzv/kEQTBzjtRXsZEBkj8vtTOYm/BxQetgkDzAa0Rv55QCJRjrjL -+sMM8JGjBO67R6KBi7prcwIZwHxiPfU5j0SH3+i3+wYzwJ7D7+aAXUvZk6MV -ivP21Ri03iLRtfD9ui8jGLBjccaqOZdENi5m3oPRDOB7Jdv54SaJHqu4PN72 -NwP89MUjyOskSnka41dzhwGZ9SnX6RkkCtS+asgqYsCEh8WtqUsksrpbvtag -mAEhsR2ScdiCV4fuPrrPgOqt9oey00mUEGY3Ul3JgJK1+1p7UkkUo65youol -A4iiqycjk0nkf/VdwMMeBlRx2Z2cBBKZiw4ZhfUy4I6rTVoG9tYEioh2PwPO -zApU7cQeCtO9Xz7IAIdl6kG/eBJ52+SMl40xQGRUMbHvTxI584cHPfjJALGf -1KihOBKZhcuGlEgxocRMfoNJFIle5iRaXJJmQmfr9/UDp0lkxJ5RYckyoc+3 -KD0RW0v13RdTBSYYL0+KvmeRSKYj2vR/qkywOict4HWKRKN7uqUEdZkwk3pr -KjuCRKm8uc99jzCBciY+6nQwfv6dwlnWjkz4+rYhaBt2vBsrTMeJCfF7jvd3 -4/8kVqXdlmVXJtxSazSjYXsTPOlX6EwwXIwSpAaSSKeJzngVitevNwho9ydR -R7qqkHIaE5o2tyeWEiQqRSLHv6czQWyHeHwEdvz4XMP9DLzey9bJPdja5g2x -BleZMDzYuf4tE58fxWfG+iYTIvsKE0cYJDoYnPuFVcIExwaqsokP/m+T/0tv -fykTdF391qzDnmsKzuArYwKPDdX1K51EeWrIOqWCCWcWYi1Y2L+6u+tuP2HC -nXkjpypvElVayRV9aGRCUsFZBZoXiS785OXPbGJCs/KFYSo2vWjE24XNBM7Q -e4WxYyQSW/VEbqCZCbxbOB2XsQOeOqdyPzPhJ/VWxIQniZQ1rkSqDDKhvqLQ -sdKDRD87zrT9GGLCSIoHTyp2SwJT68F3JvAV7ZDzx47t2z1iOMYEhQa5a4rY -XVltHrazTBhbN/v8sjuJLq0RPxDFQ8BOinbxJTcSPZvpdovgI0DqIqMiBHu4 -uzgsiJ+AwrslB2yxjSppufS1BKT2neQXxR7yYv1nIU7AtF7NdLor7m91YP0B -CQKuzdJNI7D36q9XR5IEaN/foOCEnSZSclRHhoAsn8QghZXxJ9/K5RQJsC07 -GV3hQiKioKRRUpmAhEkNyevYaWmnv61TJQAudemfxR4iJERWqRNQZaksfXhl -XMLs+JgWAeUWu2kcZxI9+S0RN6RNgOi2K6r92IM/ei/37iZAqXk49T32nrqo -+nYDAr4XOS4XYA8ElCo8B9z/kJG5B7aoc7TuIxMC6NVLoVbYhqaHrMppBBQb -5ysbYafI9J8uOETAvbl8RXnsmlUP0nIsCHh9eClQFJucjC68ZkWAr76+KQXb -4LXkp4t2BNR5OPw16ITPu7x/NMmeAHEJ3cVO7Is3HvD+6UDApj0LU2zs/jBz -rUhnAkLlqWeqsUU8pcxCXAnIuHhSrATbwJz08HcnQK2jfHveyvxNZy54ehGw -q+rFcip2jaBFnjOdgBdGmdVJK3nzUo/tGQT8OmeyELeS10c2WxF4vjS7lrWS -xy4bOnicgMwULbGwlX6PzvwCfwIc4oNHTqzk51ls2BtAQNTNv6yJlfyL1G26 -QQQsnY829F7JZw0Y7wwhoPI/s1J3bGFGubN6GN6/svF7ztj6trHByhEEfAgI -0HZcyd9jmSgfSUD8r3pje+xkVelsKouAWb25L7bY1WKDFeJRBOTOL/20xu77 -r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= - +1:eJwV1Hk0Vd0bB3BzxgqhEpWprilzlNpPxkQoJUriuueQOcTNmAwpEVLRqxQp +iUIz6lcZ3vLeSqGBMp6LTJmdpPptf5x11mftdb7n2c8e1jKDdhN8PDw8PfhZ +eB95q73uUdPbrfzd8v1H1Si0dfS6IdOiFEW43lsVjt2Vb5StYlGDjBXDny7Y +kfVGSFy/Hj03ZL2OwK5gx9UKWnBQcUkMHMM+1bD8eVzJezSf+lIpCvtJ05Er +83qtaHpYLzgGe7CtMfpY9Wckxn27/jj2Sq7ygRnzr0gx44JdArbtj2iTUE4n +Ult8uj0Z+9n8oBi7pBtlJtxqPY39MV4u6mFgL5pYPr3pLPaokMXglB4Xqf7y +F8vGFjoT7Ko/24f8D0ha52IrSl5+daR6AK0M6hm5gm0vP3Nj1HwYrcsTi7mN +TV5VktUSHkXFhiyiEjtO1SHJj/MD6SQMPn6C/VmuRTesZBw1HY6/9hqbtd/3 +8LkzE8i+KMvoA/ZYHs+1ysBJVPPlg1E7trCS1tJxvWm041o3exQ7m1VrvVRm +Bi36WV5FY6+56Rq3YXYGCTSXe/Ovo5CxZvJoQDWNxuvN+Vdi+xh1cgbN59He +a7Vghz3FPiogqvYbRfQpf3XFPl4tZsoQ/oOy0h73eGPngPFtb85f9MksXjcJ +m1X0yiKkhBca/l5trcMuaTjXFS/PByEj9xtbscf63aMzz/DBZm0+jX7saPXp +e+WB/DAXYqslth7Xe3et8g89QaiJLjN2wW5rGn72p1AQ+F2vnvTHXjPxaP9i +GSEQSf2wLR671MA+S2tWCNzM6Nnb2HVPInn9q4VBRNvTT4hBoena5s4Bc3Hg +iWAHvcOWshNfGvVMHN6/PfR0GFunxQIkTCTAKpk4JapOIV/qwVVd7cVgduf9 +P9bYwXwcnS3iS6GU3FvyLzZX6c540owk1A94BnVq4P6QjSLv9KUgI7k3X0CT +Qny3+9YuPyIF8zl59urYa/RX7y4ZkoI27Rq1COz95hmVb7uk4cFI7wtZLQq9 +8woJlftPBmSPxRUFaFOo42Z6qoewLAS/dqm6hD08VFJ4y1IWwhJTdr7CFg3r +bd78XBYS6idHVTZQyCJxj4HHAzmYTDFSpLCrrhtNF+evgMk5H51IXQpd586F +bwpTgJtq2QaChhTavvdkR2iZAhSEdoltxR6uk7Yq61OACM7FXRHYBtc1Zda4 +KoLbtOP6Iew6pvs9wa2rwZncwP/ZiEITP7oiBhLWwHvPp8ENxhSSDrC4f2+n +ErRQoltmTCnUd13Ux9FXCf62Z/SZbqHQ469N8iPJSvB2qOVPArab3cEEtedK +oNJZECW9FdenEb47V08ZLDk3b2xE+P+DN8di5VTg0sh4XfY2Cu3xFtPa0a0K +CDkYF1hRCIXv1dv3WxVyr8/ITGOrJ+VvZK1Qg+a4IPft1hTiKdQ3i92lBn3J +PRvGsMs6DuyrfKEGNhaMVgsbfD6dS+NXFqwDOyklTT47XJ/Fzo+DTAY0Pfqs +/GYXhQqdLrbPxjKgsXIrU2s3hdKZ3V0C/zDguhVXLB2bdfzokGIzAy4z+K85 +OlFIsuYyj5O5OsTtGvrQtgfvH/1R9WplDRjqqnfhd6GQvNLZuFRKE26GbRIu +cqdQzekpxk8+Lbigxbto1SHcj0nXFnKtFhwSyko8h32lToVh5q4FyffXzSd4 +UEjJu+oD/UkLlsRXf/Nl4vmWclXJ/7Qhr3h/kCNJIQV5RXKNqw58rTGbigyk +kGZRmPgvpAcCfJwW++MUYrISprXs9aDGPeVKO3aOclaHh5se9LwS+OwTTyH+ +grvlDWw9aKt0upR4Ap+3K4N7sir0YI0J5fYiEd+nOR6XGcr68H1ReYfDKby+ +qXbaLkIGIL22dv55FoWuhag4PuAYQq687ejUDQo1haONiUUmUJrK7m79TKG1 +7q32B/23gCPNqyYkxUXE34d3FI4BmMY5xn2y5yK5oceL5JhmkHWKt3xFLheF +6Zt+zVK3gMlnw2ZefVzEHJl/JT1oCScVTvP+a9KHysxCF+W/s4Znin7+c3l9 +6PqU74vSbBsoeR0aNcDbj+hty9/UxdnC2COnX4XsfvSNh3+823MnbHvskfJ5 +ph8FrgrKiFd2AP65L+v3Hh1Adw6/en4+yRGWaQho2Ah/R5GTK2Y1Du8C/t26 +crWXvqPpHVbO/x7aDQlz0QO15oPI5EDmNu4uJzh/PC1dd2oQfVhx2bdOfw+s +7RQKMygYQitvJNQUr98L8zekklcfHkaPu9Tt7CWcQQbm1b00R5Biy5h3+Igz +bPaK2XJpagTpn88sLezaByLOnvwHP42iywKT2lm1LqBVVF5y7t4P9HDbhrak +J67w/oZ3SMreMZSz8bTkfMl+6M6ofarQPIbetRcl6585AHMdJV7xtuPowc48 +leDjbmB8JuuE9PtxNB7gxBPIOgjsqDJzXscJNG3F8Bk1d4cGx8S13DcTqHjk +Cx1qdAi+/09Iz3HfJHK5VuR1UNwDkgq25vp/mkT3Km0P8Z/0AEmGaJa85xQy +kf/w89RPD8gONrkU1jmFlLu8294f9oQYm2/1qi7TiBLzc8jr9YR6uwkFg4/T +qCnd3st6LxOqqth/hKxmUDY7X+xoExNOJOXN+DyaQTXP/v70svGCRiGdJk+F +WbTEDU7qV3mBLK8u2Rcyi0w8RouTDFhQkeC56WvtLLqROxZqb8SC0tY3r8fr +ZtGy5omtcsYsqByYzxNqmEWjlrMtxZtZwC0pk9B+NYvvFx5ejhkLZkJuSYZx +ZtHiWUlXqV0sUH9IB35tmUVUmqFIfgALXj7N/LaKO4vSq6MPP76B88NzZxz4 +aRSgd9GEXcyCDf/bpakjQCO7WxUixiUsWCUTlL9EkEaiF/tuPSpjwda0ZVs4 +QjRKCnEcfHifBVMB9x1NRWkUzVDxe/CSBTHvpO7OLqWR78X//Cs7WHDBJe3P +FwUa2SzuMw3pYoG3b37iNUUarU/ikdDrYUGK+RYzn9U06gsxLKvgsuBkrJ/X +5Boaedrnj5QPsyDCo96YR4VGLoKhgXfnWHCLOCsyxaCRdejK4FJZAhrW8yqY +G9LoZX7yjqzlBDDY0fw8RjQy5UyosFcS8FK2fbYaW0f1vy/migR4O0eJ6BrT +aMWnKPN2VQIenaUal2ym0dCmb7KihgQERgjm5QONzvJdfertRMCVEqbuIls8 +/w3iOTv3ErCs3YddhJ14gB2iv48ADcez/5rZ0Yh933Hd3/0ERA5nx0TuxPWT +vJkXmARoitPmHQ400m9ksuqPEMAWy5GN2EOjT5mqYsoZBHxdalY37EajO0jC +ZyCTgP0KR+y8DuL8kam6snMEiNoU0Z+x9WzqYo0vEhBceKfmhTuN0nm8JnZe +IcD4u+1YigeNrIKufmGXEmAQeHp0xItGCgopRlvvECCslVTizKLRVGPQOf5y +AtTje1KeYReooZ3p9wiwNPYqTSVo9Pvbt+eFVQQEmHxNlfem0X07+eK3rwgo +z3XIkfSlUeocn2B2IwGxYn5B/tjM4kFPVw4BmzOOeTdgLxWokqfeERD/d2VV +hB+N/Ktdzv78SMAJUUb/O38aKatfCFfhEtCKvts7B9Fo7lNM8/c+Aprfl2sU +YjclETp3Bwg49HLD+h/Ysd0GgybDBKjQYscTg2nUltN80GGSgEt1u29dP0Kj +rEWSlpG8JJSrBzVXhdKoZuLbgTB+Eg5K6ffyhNGo/1tJSKAgCUUROm2W2Kb3 +La4yRUgQjEqO4WD3ebB/7ZAkweEu+yLnKK7fzlLKUpoE4fTODpFwGm3eKMVA +MiRs4XDFrbAzJEqd9VeQ0BB5alX1wnhVZ4X8WhI0bR2EcyJoRBaVvpJRJuFA +WtMJDnZGxrHOJaokhL/06/2L3UdKSwgwSJhi33P2YuNxaWufYR0SikMn+BWO +0ajqj3Rcnx4Jq1i3y7Zjc793ne8yIEGvUGJLKPam55G1LcYkjA3+I16PTfnf +UXwKJAhNZQUciKTRYpcow0dmJKgR1uax2Cbm2+0qLEiQcbP5k4+dvqLnWNF2 +Eko1Fqt0YT8WuJuRv4OEp7+fpv/B7v0RdTPXjoTU7ec75KNoZNwg05rmSEJc +y0UtJ2xmRc/Qyd0kOJdVagZgp+Xd5TuxhwRj7Zalydg9ITY64S4kUOMSKfex +JdxlrYP3k2Dqt1y+cSHPpvegrxsJn39KnOtY+H51TKq7Bwn6hwp0BaJxPaI7 +ClyYJCwWN3KRwe6Zln2ym0XCocgrXqrYEt297+xIEnT7PzoZYBtzyvusfEg4 +3du23gyb+SjmN/iSELLnRo89dlrBjmWb/UkQCzWM37+QnyanYRhIQiAnUYBY +yGdT2zYEk8DZlukfiC3OqnBhhJBwWNjlSTj2RofYIOUwEi7d+jgYs5C/yTZZ +IZyEF3xivInYZ1SXX5Zj435YTv5KwX64lHtPMpKEwZm09jPY3b8qGsWi8f4Y +/5J/diG/P7ZbMJaET54ft2diG32wpf/GkfC68cTHBf8fjJmrSA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + "PlotRange" -> {{0, 180}, {0.6296948922963853, 1.5304125193912788`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.6044061540843444}, + "AxesOrigin" -> {0, 0.6296948922963868}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13062,7 +13783,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.6044061540843444}, + AxesOrigin->{0, 0.6296948922963868}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13090,7 +13812,8 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.6044061540843431, 1.5841467887057727`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6296948922963853, 1.5304125193912788`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13098,9 +13821,9 @@ r7xJKIYAtnxPvtVK/nBsH38sAfn/XO2wxNZrtVxcjiMgwkc9Y8X/B7CHsQY= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913320330871353`*^9}, + CellChangeTimes->{3.9913320330871353`*^9, 3.994389156231243*^9}, CellLabel-> - "Out[220]=",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] + "Out[139]=",ExpressionUUID->"89d6216a-c88d-43a3-8020-04f2c1cbb873"] }, Open ]], Cell[CellGroupData[{ @@ -13163,205 +13886,180 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918491076725483`*^9, - 3.9918491120260525`*^9}},ExpressionUUID->"cbec275e-4d01-7747-9ece-\ -7fa9a2a651b1"], + CellChangeTimes->{{3.9918491076725483`*^9, 3.9918491120260525`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2976471457269651`*^-270\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.294634804932259`*^-263\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 221, - 189, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033325203*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994389156346599*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], +In[140]:=",ExpressionUUID->"4a5ba917-5445-4115-8290-4fbba5fcee84"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.376858869110442`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.614628409197819`*^-274\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 221, 190, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913320333342056`*^9}, + 140, 70, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994389156351557*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], +In[140]:=",ExpressionUUID->"0a5faea3-3856-4829-a5cc-71b1bce2c151"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.193593532260836`*^-293\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.9792460671693395`*^-285\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 221, 191, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033342205*^9}, + 2, 140, 71, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994389156355747*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], +In[140]:=",ExpressionUUID->"1f4c02ee-9041-471a-a84e-a76a14f5adba"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 221, 192, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991332033351204*^9}, +during this calculation.\"", 2, 140, 72, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991332033325203*^9, 3.994389156359234*^9}, CellLabel-> "During evaluation of \ -In[221]:=",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], +In[140]:=",ExpressionUUID->"f292ef14-d971-4b5a-8d42-a88a1c5bc2e7"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VV8bB3BDZajM83AnF5GZcC/X81DGRBRJMstUkqSSMhQJSVQkRZIG +hXtvFPpFNAgVkVDJUCohhKTBe96/zvqsdc7ea+39fZ69D9V/t2sQHw8Pjzkv +D8//n3P9zx7R00ssEss+2DvarLPouiR30LInCRpN6/Lkz9MApV/6y/VkQ+tN +lRsTeQYQs/HmG/6eYqjz+NHdnmcF4hOy2b/ecEC5KvdYUZ4rfLjvtHvmTSOQ +Rk/X8OX5gw199P3Um1fQp3k57uLZKPj1xuTs5JshSDogckAqIwma1l4r6Sj+ +AYv1sdfuq+eA0oeaEX+tv9DfajMsI1YAUjt9bgqs5UeRDBOeBu1iyNa3qXNy +E8QDgXA7wasUevP0GqbEVqKum1fa8JcbkF4S/5JPXhzvikdNG2+8DQ5GoRLS +KuJI2zj1+7zXbRB85Oqmri2OIhd5GLMht+HYsOrb9ZbiaFGdsu5M4m2Io7WN +nAkVR6FvM77RnNsQUST3T61WHG1EW+7VSpSDSwFba/02Cfx69tinjc/LQfbM +8Imci5Ko9a5xk6J0Jcitrjo2XyqJIs4Z5Gn5SlBoTInfXimJl+L5XR+TKoE0 +qbFPvUkSR0yKvviuqgRVx0jfui+SyNzk17bTrBIMl/w1HjaUwuDRjslu30pw +jpb5aNAihau21QlNXa+Ejcu/9Od2SqFZpHvRptuV4Fpc0/vnnRQOSbuc5LAr +wb3d6+WT71Jo43wnJKi2ErZrXan1lJbGg/7X5AtbKyH8o+7pJF9pFHfGFf7j +lXB8s73FqzlpjFzHrlHRYYPCnRcKfLwyaJz6fj7QgA3lkpt/6i+XwbKBM+8u +G7Oh+5V35WmyDA7FumWJABvoLtE0FzsZPJTpUcR1ZkPjhsJl7edlUC1vFU0r +kg1/bWZfPDeXxZWD1UKvb7MhqzS27K+NLEY5LmxNYxPfL+NJ1XaRRZfQB7Zm +VWxwfCxseTJIFh9E+/w+dZ8N+WspXMdMWTwVfbxhSSsbTHF9busHWUzW3XxH +8TMb9jIu+zxLksMiuXTtRUUOOBSJzKzPkMPjgYLx0yQO0ATiUl+clcNDrPX/ +BqkcaO9yZ3del8PBd4kpVeoc0Ilcwd//Qg4/il9q0DHkwJfS/aXTCvJolW/0 +M9SeA15STuOKXHkUD/2TuWQvBwwP1SVeui+Phyu9Bw7v44Dw0CoZ6hN5tNzP +G/RjPwdqKvhBrVceo6pWCnXGcUBmfU2W3qI8DgncagpMIeZPpBtZr1fAwIID +Vq/yOLDu+0JsxLAC7tydduVNLQcO2p3RfDimgPZD3l+e3+dA+WXtPsk5Bew1 +P5DV8IADcpt9GTWCihjctmTFhUYOjN17/JNfRxGFq07X0Vs4kJOUFX3+gCIa +GiR6pPdwoPmtBn0sURGz71jw2fVx4I9RU6dFuiI26kxI877jwI7PswYfLyri +2YczcSEfOMB03Dal06SIL03Pu68Y4cCQtFrEo5VKGDt4+sr1aQ7I7q5XlpVV +wjtPQFVrhgOOzR7PQylKuK/6itytWQ5Ux6ZriRoqYahGifvleQ6kfZgc3eqh +hKerfCz8/nHA4EZd8PdiJfxVOmdsIsSFYD43WatbShjt3SWVJMyFgm0TT85U +KaHbDbNdz5ZzYZkIVY3ZrIRhpjxZG0S40BeV8vHYuBKO+C0vXy3JhURzFz8F +U2WkL+3sAiUu2HlfmjaxUsYvKj+7Q5W5IJLw7aibozL6vDtRf4pEjN+UXJrl +q4x9aU62LylcuOdQ+23ZCWXcOvnVTlmVC/E7BQ7Tc5SRaSFyTk2NCzaZm0Ws +LiqjVHl4+2p1LnR1TOgdZitjgJKLmKYGFyY9VGJ+9Cqj6FD661ktLtyNjRQQ +/6iMz8PWXO3X5sKRgv/ydCaUUTGQEdqkw4UVA1vqQvlIOFG90JGgxwX14Aye +AU0SavtuwlZDLkyk9p7+a0TChvy7bTlGXLhzU01FEUi4jzO22WMNF6wmGqzd +N5Hw97mLXq+NueC9bzat7RAJQ0t0AwsZXFDNtVIaTSbhvLj6qC2TS+Tj1G2B +LBKuM67ZO0Y49o9Gu1UJCadmbp7VMOfC2aPe0jVtJGy6Mq8XbcEFr6tlpd3d +JIzVnPr+hzDt6bzJzAAJ7WcLaxOBC5XCOZ66syRU/me9Px650Hb6aeFVZTK+ ++cdTtt6KCzlcKf0mdTKm8E9+vEPY87Vf44A+GSltPIYKa7nwRe7PR0UbMto3 +don2Eq5g2scwNpJxKuVhkcE6LsR4nRPY4knGj2YqDqmE+Yv0NLMjyNg2fXVU +3ZoLLQ8P11UcIKOx0cLwHsJZwy2Oz5PIKDGssXCX8Jalcv2jGWTcV+Cis0CY +pB60WzCXjLPapxJNbbjwyY7Do3aZjPfP8M5GEb4Vtnh6bRkZL/1pPnGDMLP8 +/J0j9WR84f9ecbktF9a9efF3opmMOk9ubDUk7MSzxNbnFRl36b029yDsocHI +evmWjE93OD05SDjANaIXPpHxmejSn7mEIw5doVVOkPEW5+tLDuEDJT3hlHky +VlSPu7QQfjiS4tnMQ8Egf/4j/YRtDlHjE5ZSUPKtstt3wq2i96+YClNQmK7f +84fwxhL35kkRCv5UNhAUsONCt+nU2HVJCpqlyIysJLztebq4nxwFree6osQJ +D/ipGcsrU3BoKLDi/94x1+DZQaVgwYUHBSKEv6Vtiz+hRkFeh7dmgoQjyXNX +LFdTcOnUnZP/iPlmuVnNv3Qp6LrTJmeKcKzd6nG2EQUv7U7fMEiY5/1j8TAG +BX8nJ/z3nHDyHl9jmgUF9cRVPlYTFl7227PPioKi9nsaCwhn5Z+Nz7alYCMz +bGs8YWldvRIHRwqqNK+86U04v6mlmc+FgiuveVUxCZM9gsZr3SjI9fWIkyRc +MrYovteTghMb+Xm+EvulmZhvvNqHgqev+lrWEa6QXrNtOICC9dujLdMIG918 +GX8hhIKm9mt53QnXWoSVbNpFwXKBzkQS4UfBheNNMRT8c9z52VUiL/Z/GBJx +hyjYmr0+O5Dwi6wuY6MECuryqlMohHtrhBJKTlCQEXol8ySRT2+nkhKvTAoq +innuAcIfhyyeSeUQ67tXUXmCyPfE8miJ5AIKhh6a7rQkvLdIxIR1mYJGivTB +EaI+5o1ubJu9SkGrXXl1qYT5vftLgiqI9WafeNdoyQW5SjsTm0YKNlcdHhMj +6u3iuuFt/54Q+YgoTywg6pHWezihupWC/F+rx+iEtfm4z9ReU7BK/bqdFlG/ +VpuVvQS+UBA6S4yliXp/+uVuQv0YBX281M8fN+OC42HXq/unKKgta9s3R/SH +LaXHJz4vUHDh84s/rUQ/2Tk/ldC8kop7tSyGNpoQ9bFnh8yIBBV1pWiMAqL/ +CI72lfHLUbEjd/n4MNGfrr5t6ragUbFVv2pPCNG/+h+c1aoypmLNQV5ZG30u +OCczei77UFHz8wV5N02iPv/d3lUfSMWX80smdxD9dCyGxv8+lIrtL38x963i +QmrIch25aCoeVDphdJzoxw3r3x/NTKWi5erEgQQaFwwkEnUPsanYR+uPbJMn +8pg++yivmooQSrcplSP2jz/Ms7qOiiNKwdfjZLkQPuuaPPWYGM9PSYEsTeSp +h/42uI+Kd5JF+5liXJApbE7ZzE9D42lZ+5dLufBrtVi/thsNJbZVv4+Z4MDc +RYVEQ08axt2VeTw2xoEZUVU6w4eGD6dH03y+cWDiByNsXSgNQ7r075l9Ic7P +uoA5z8M0vJSl//jFIAda1t8VSb1Kw4WL3cJ+XRzID/eGoVnifXPpaMu7HMh9 +HzL0eYGGn2L0LdyrOHDGeW/y+CINgXeZQgiXA5mGqa3zQirYZhm88mgFB5J+ +s7eIklSw4YmE+LlrHAhPXxppbqOCwy78//RzOWBedqvo3DkVXKowILshmgNv +KWWF1hdUUDj+bb5OFAdiz924NFOogp3xV+pXRnLgbmJpgesNFeT3V5p5FE6c +1x5FeSL3VfCcjYeubAAHNJaeyUoZVEGVZRqqji7E/cbnUEKMFh0piyde8Gpx +YErCwde9kY4hHo/HRvvY0LOT1h72lI7tf9UElvWwoeHJAsS30VHDpLSR9Jq4 +D8aWka9303HzLWe6/Us26A2t+PBrlI7FlucfJzaxIYL9cvtFSVV8z5xWOFbG +hlFnt20fA1VxnG4y2XuQDR8zfN2jBNQw3qL+gr4YG+y/77f/ZKyOBbofr6mb +VMJYgODeO/GrUOfhKa2Y0HLif0SW73ijBhZGSn1td7wFEs/VMiu/a+JCyNyL +cKuboJRasdHYWAvjvwVl8y25DnmrGWKSwdqY29s33DR+FVoULNf8OK2DUzcr +O5q/XQGmUmOWbrcuGjgecUtpvwwi/MXRfkl66L2thes4UAikRLL5VjV9zCne +s6RGuACEVL2qXZ/qo4hFbERxWh7osOQr9m83wNh3s/1Ox89CVL9EkwOPIXZl +6i9EpmfD9x8ZbvZ5hijkdaFkaFkW2Oo+ybfXNsL03OoSz4J0ePDD7PfPF0Yo +NakzWOd6HCK0DPo6gtbgheduq2LajgJrIrBrq5AxMiTNrY7EJIA1XW7DymJj +/Hn1BDnixCFYlZB2oNHEBNVvVVBn52NAM4hRr9pngiJH3wysq4+CUzSnhaPv +TPCCwq6ujsoomPngv2ao3wQ37zhJDimOggeeGWWXhk1wTKXvZmVyFLhu/JAr +O26Cg8W1CmzHKDholhwpxEPc2ou3poW/2wPN4h3UcVVTHAq4S73OtweCHoQc +u7PHFO9eVy4teBUBE7tG91tHm6KxzDYpiXsRcEB5Z3h3jClu0KJ/y78YAWlx +u13nD5libWLGtZGQCKhkxlDMU0yxQfu6XhBPBPypPnq/Kd8UD1ZPG84a7ILs +ikszr5pM8QJzYZlsaTjUF3UFTkkzkCaZq6TYGAIDjlSfGDkGkjPDrxy5FQI8 +v3Zt/a3AQHmdQZ/pcyFg5SLgtJTCQA2pvk3CO0PgCS/TRF6TgbzWbeTfMiHQ +5l8oZGnBwC8xZ0V7dgdDHz2sPGsHA/e6OGhYaO+AmeuLP3XvMtB/IkrsflcA +jLjbFJ2oYWAunfZA5lEA9Cw5aTdcx8D/KEtOHuYGQJ2vwvlzDQxUVtWI2p0d +AElya5h/nzFQmvffmeGNASCWGhbX8o6BK+NJygLt/qAV/JoniI+JA73tdcJv +/CBAtUwofwMT+ZJeZKcu84XYx95hahuZGGc4uUP2uw9kBUm0clyZeG/PkjXG +HT5w/+rBjNYtTNwrOr3mv7M+IKVmJ/rXj4nJB//xfif7wBO1T1K+MUwMYWvk +dJp6g+YqMkWtkIm3Tc/k6MV5wZRmjjFnkonphVUBHdZboacNrSV/MHEqpt5C +UXcrNERMbIqeZWIXDpH3y22FTI79HuMFJkpH/34U+M0DNJk8t2r5zVDUNNxZ +JtsD/O13UZtkzLCn/DypeWgLdAXbrugyN8NP9xszpU+7w72S34OzqWaYQsp+ +MkDaDMZro386pJvhCtbQ9ooVm6FqcGxF0UkzvHiLey5jYRNwSP0mDtlm+EDP +9HFU9ya4lddw8tIFMxz9GsY7nrkJijKSGbblZii5/EZAFt8mOBEtejqv0wzf +37nJcJ5xAc91KmhGMsfhJTFPcdEZ/nYJijRRzDFL2OKv1AdnKAqaeOugYo43 +5N3Ul9U7w0hKzX7PVeZoo5uyaBHvDFHPnCsOGpij5a+AzYK8zpDmFEe6Z2OO +FKd/20eEnKDW4/Ufo93myO6b52PoOYLiruM1Og3muP5V4MObLXaQubhjTXoj +YSdbmxaOHfBl27A/PzJHnV1iSf/y7WC0eumNomfmmPJ73UBJuB3U8hzLk+g0 +R//kupTPK+3A80zC/rlP5pg20i1t4m4LeXUH1zxYzsK/q8xGzs5awwqnrWwF +ERa+zk4a0hmwhoQBU+39Yiw8usyjuq/FGkKWztP1pFkoCDJlYUXWYOIcI1VM +YqHf5ZsmYY7W0D0U9SNZn4UZz6iRb6+tA2nhnewNW1gY8se9jr5zLZSsPRw7 +uZWFOw9/s3rkvhYMDmeuzfFi4aB5vfxBy7XgNFn5usePhbbJguE02bWQ0j37 +K2AnC8WV1uTtabKC+eJ4q9hEFj56NKw+TbaCPrOcztIyFna9MpNY/IwQsq+k +wL6chc/SczJVXyPMlVcFjVWyUJhxherTiCBB6/mpX83CWleq3fKLCOsFlZX+ +a2Chd8DTB9abEO53lQZ2vmYhiR1wIDQFwEHknnZMDwsdbsfmCgUA9Ng+m5N7 +y8L8Iw/bnwPATO23VO8BFjIOe4o1/rIA7ct6t7+OsvB9r4uF+24LuN9nGZMx +zsLj799cl9xgAQ5Sm0B3koXj3ya0ZjQtYMfxfR3Rsyz0rLDkJ31mwUxDSr7s +PAvPdUTKBD9mQdJCbkDtAgvLH8o+fnWFBWJGN7S2/yXW/9bod98kFlzaVTu7 +uMhCSeGq/eJ+LPgfH/u+LA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13375,164 +14073,135 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwV13k0VV8bB3BDZajM83AnF5GZcC/X81DGRBRJMstUkqSSMhQJSVQkRZIG +hXtvFPpFNAgVkVDJUCohhKTBe96/zvqsdc7ea+39fZ69D9V/t2sQHw8Pjzkv +D8//n3P9zx7R00ssEss+2DvarLPouiR30LInCRpN6/Lkz9MApV/6y/VkQ+tN +lRsTeQYQs/HmG/6eYqjz+NHdnmcF4hOy2b/ecEC5KvdYUZ4rfLjvtHvmTSOQ +Rk/X8OX5gw199P3Um1fQp3k57uLZKPj1xuTs5JshSDogckAqIwma1l4r6Sj+ +AYv1sdfuq+eA0oeaEX+tv9DfajMsI1YAUjt9bgqs5UeRDBOeBu1iyNa3qXNy +E8QDgXA7wasUevP0GqbEVqKum1fa8JcbkF4S/5JPXhzvikdNG2+8DQ5GoRLS +KuJI2zj1+7zXbRB85Oqmri2OIhd5GLMht+HYsOrb9ZbiaFGdsu5M4m2Io7WN +nAkVR6FvM77RnNsQUST3T61WHG1EW+7VSpSDSwFba/02Cfx69tinjc/LQfbM +8Imci5Ko9a5xk6J0Jcitrjo2XyqJIs4Z5Gn5SlBoTInfXimJl+L5XR+TKoE0 +qbFPvUkSR0yKvviuqgRVx0jfui+SyNzk17bTrBIMl/w1HjaUwuDRjslu30pw +jpb5aNAihau21QlNXa+Ejcu/9Od2SqFZpHvRptuV4Fpc0/vnnRQOSbuc5LAr +wb3d6+WT71Jo43wnJKi2ErZrXan1lJbGg/7X5AtbKyH8o+7pJF9pFHfGFf7j +lXB8s73FqzlpjFzHrlHRYYPCnRcKfLwyaJz6fj7QgA3lkpt/6i+XwbKBM+8u +G7Oh+5V35WmyDA7FumWJABvoLtE0FzsZPJTpUcR1ZkPjhsJl7edlUC1vFU0r +kg1/bWZfPDeXxZWD1UKvb7MhqzS27K+NLEY5LmxNYxPfL+NJ1XaRRZfQB7Zm +VWxwfCxseTJIFh9E+/w+dZ8N+WspXMdMWTwVfbxhSSsbTHF9busHWUzW3XxH +8TMb9jIu+zxLksMiuXTtRUUOOBSJzKzPkMPjgYLx0yQO0ATiUl+clcNDrPX/ +BqkcaO9yZ3del8PBd4kpVeoc0Ilcwd//Qg4/il9q0DHkwJfS/aXTCvJolW/0 +M9SeA15STuOKXHkUD/2TuWQvBwwP1SVeui+Phyu9Bw7v44Dw0CoZ6hN5tNzP +G/RjPwdqKvhBrVceo6pWCnXGcUBmfU2W3qI8DgncagpMIeZPpBtZr1fAwIID +Vq/yOLDu+0JsxLAC7tydduVNLQcO2p3RfDimgPZD3l+e3+dA+WXtPsk5Bew1 +P5DV8IADcpt9GTWCihjctmTFhUYOjN17/JNfRxGFq07X0Vs4kJOUFX3+gCIa +GiR6pPdwoPmtBn0sURGz71jw2fVx4I9RU6dFuiI26kxI877jwI7PswYfLyri +2YczcSEfOMB03Dal06SIL03Pu68Y4cCQtFrEo5VKGDt4+sr1aQ7I7q5XlpVV +wjtPQFVrhgOOzR7PQylKuK/6itytWQ5Ux6ZriRoqYahGifvleQ6kfZgc3eqh +hKerfCz8/nHA4EZd8PdiJfxVOmdsIsSFYD43WatbShjt3SWVJMyFgm0TT85U +KaHbDbNdz5ZzYZkIVY3ZrIRhpjxZG0S40BeV8vHYuBKO+C0vXy3JhURzFz8F +U2WkL+3sAiUu2HlfmjaxUsYvKj+7Q5W5IJLw7aibozL6vDtRf4pEjN+UXJrl +q4x9aU62LylcuOdQ+23ZCWXcOvnVTlmVC/E7BQ7Tc5SRaSFyTk2NCzaZm0Ws +LiqjVHl4+2p1LnR1TOgdZitjgJKLmKYGFyY9VGJ+9Cqj6FD661ktLtyNjRQQ +/6iMz8PWXO3X5sKRgv/ydCaUUTGQEdqkw4UVA1vqQvlIOFG90JGgxwX14Aye +AU0SavtuwlZDLkyk9p7+a0TChvy7bTlGXLhzU01FEUi4jzO22WMNF6wmGqzd +N5Hw97mLXq+NueC9bzat7RAJQ0t0AwsZXFDNtVIaTSbhvLj6qC2TS+Tj1G2B +LBKuM67ZO0Y49o9Gu1UJCadmbp7VMOfC2aPe0jVtJGy6Mq8XbcEFr6tlpd3d +JIzVnPr+hzDt6bzJzAAJ7WcLaxOBC5XCOZ66syRU/me9Px650Hb6aeFVZTK+ ++cdTtt6KCzlcKf0mdTKm8E9+vEPY87Vf44A+GSltPIYKa7nwRe7PR0UbMto3 +don2Eq5g2scwNpJxKuVhkcE6LsR4nRPY4knGj2YqDqmE+Yv0NLMjyNg2fXVU +3ZoLLQ8P11UcIKOx0cLwHsJZwy2Oz5PIKDGssXCX8Jalcv2jGWTcV+Cis0CY +pB60WzCXjLPapxJNbbjwyY7Do3aZjPfP8M5GEb4Vtnh6bRkZL/1pPnGDMLP8 +/J0j9WR84f9ecbktF9a9efF3opmMOk9ubDUk7MSzxNbnFRl36b029yDsocHI +evmWjE93OD05SDjANaIXPpHxmejSn7mEIw5doVVOkPEW5+tLDuEDJT3hlHky +VlSPu7QQfjiS4tnMQ8Egf/4j/YRtDlHjE5ZSUPKtstt3wq2i96+YClNQmK7f +84fwxhL35kkRCv5UNhAUsONCt+nU2HVJCpqlyIysJLztebq4nxwFree6osQJ +D/ipGcsrU3BoKLDi/94x1+DZQaVgwYUHBSKEv6Vtiz+hRkFeh7dmgoQjyXNX +LFdTcOnUnZP/iPlmuVnNv3Qp6LrTJmeKcKzd6nG2EQUv7U7fMEiY5/1j8TAG +BX8nJ/z3nHDyHl9jmgUF9cRVPlYTFl7227PPioKi9nsaCwhn5Z+Nz7alYCMz +bGs8YWldvRIHRwqqNK+86U04v6mlmc+FgiuveVUxCZM9gsZr3SjI9fWIkyRc +MrYovteTghMb+Xm+EvulmZhvvNqHgqev+lrWEa6QXrNtOICC9dujLdMIG918 +GX8hhIKm9mt53QnXWoSVbNpFwXKBzkQS4UfBheNNMRT8c9z52VUiL/Z/GBJx +hyjYmr0+O5Dwi6wuY6MECuryqlMohHtrhBJKTlCQEXol8ySRT2+nkhKvTAoq +innuAcIfhyyeSeUQ67tXUXmCyPfE8miJ5AIKhh6a7rQkvLdIxIR1mYJGivTB +EaI+5o1ubJu9SkGrXXl1qYT5vftLgiqI9WafeNdoyQW5SjsTm0YKNlcdHhMj +6u3iuuFt/54Q+YgoTywg6pHWezihupWC/F+rx+iEtfm4z9ReU7BK/bqdFlG/ +VpuVvQS+UBA6S4yliXp/+uVuQv0YBX281M8fN+OC42HXq/unKKgta9s3R/SH +LaXHJz4vUHDh84s/rUQ/2Tk/ldC8kop7tSyGNpoQ9bFnh8yIBBV1pWiMAqL/ +CI72lfHLUbEjd/n4MNGfrr5t6ragUbFVv2pPCNG/+h+c1aoypmLNQV5ZG30u +OCczei77UFHz8wV5N02iPv/d3lUfSMWX80smdxD9dCyGxv8+lIrtL38x963i +QmrIch25aCoeVDphdJzoxw3r3x/NTKWi5erEgQQaFwwkEnUPsanYR+uPbJMn +8pg++yivmooQSrcplSP2jz/Ms7qOiiNKwdfjZLkQPuuaPPWYGM9PSYEsTeSp +h/42uI+Kd5JF+5liXJApbE7ZzE9D42lZ+5dLufBrtVi/thsNJbZVv4+Z4MDc +RYVEQ08axt2VeTw2xoEZUVU6w4eGD6dH03y+cWDiByNsXSgNQ7r075l9Ic7P +uoA5z8M0vJSl//jFIAda1t8VSb1Kw4WL3cJ+XRzID/eGoVnifXPpaMu7HMh9 +HzL0eYGGn2L0LdyrOHDGeW/y+CINgXeZQgiXA5mGqa3zQirYZhm88mgFB5J+ +s7eIklSw4YmE+LlrHAhPXxppbqOCwy78//RzOWBedqvo3DkVXKowILshmgNv +KWWF1hdUUDj+bb5OFAdiz924NFOogp3xV+pXRnLgbmJpgesNFeT3V5p5FE6c +1x5FeSL3VfCcjYeubAAHNJaeyUoZVEGVZRqqji7E/cbnUEKMFh0piyde8Gpx +YErCwde9kY4hHo/HRvvY0LOT1h72lI7tf9UElvWwoeHJAsS30VHDpLSR9Jq4 +D8aWka9303HzLWe6/Us26A2t+PBrlI7FlucfJzaxIYL9cvtFSVV8z5xWOFbG +hlFnt20fA1VxnG4y2XuQDR8zfN2jBNQw3qL+gr4YG+y/77f/ZKyOBbofr6mb +VMJYgODeO/GrUOfhKa2Y0HLif0SW73ijBhZGSn1td7wFEs/VMiu/a+JCyNyL +cKuboJRasdHYWAvjvwVl8y25DnmrGWKSwdqY29s33DR+FVoULNf8OK2DUzcr +O5q/XQGmUmOWbrcuGjgecUtpvwwi/MXRfkl66L2thes4UAikRLL5VjV9zCne +s6RGuACEVL2qXZ/qo4hFbERxWh7osOQr9m83wNh3s/1Ox89CVL9EkwOPIXZl +6i9EpmfD9x8ZbvZ5hijkdaFkaFkW2Oo+ybfXNsL03OoSz4J0ePDD7PfPF0Yo +NakzWOd6HCK0DPo6gtbgheduq2LajgJrIrBrq5AxMiTNrY7EJIA1XW7DymJj +/Hn1BDnixCFYlZB2oNHEBNVvVVBn52NAM4hRr9pngiJH3wysq4+CUzSnhaPv +TPCCwq6ujsoomPngv2ao3wQ37zhJDimOggeeGWWXhk1wTKXvZmVyFLhu/JAr +O26Cg8W1CmzHKDholhwpxEPc2ou3poW/2wPN4h3UcVVTHAq4S73OtweCHoQc +u7PHFO9eVy4teBUBE7tG91tHm6KxzDYpiXsRcEB5Z3h3jClu0KJ/y78YAWlx +u13nD5libWLGtZGQCKhkxlDMU0yxQfu6XhBPBPypPnq/Kd8UD1ZPG84a7ILs +ikszr5pM8QJzYZlsaTjUF3UFTkkzkCaZq6TYGAIDjlSfGDkGkjPDrxy5FQI8 +v3Zt/a3AQHmdQZ/pcyFg5SLgtJTCQA2pvk3CO0PgCS/TRF6TgbzWbeTfMiHQ +5l8oZGnBwC8xZ0V7dgdDHz2sPGsHA/e6OGhYaO+AmeuLP3XvMtB/IkrsflcA +jLjbFJ2oYWAunfZA5lEA9Cw5aTdcx8D/KEtOHuYGQJ2vwvlzDQxUVtWI2p0d +AElya5h/nzFQmvffmeGNASCWGhbX8o6BK+NJygLt/qAV/JoniI+JA73tdcJv +/CBAtUwofwMT+ZJeZKcu84XYx95hahuZGGc4uUP2uw9kBUm0clyZeG/PkjXG +HT5w/+rBjNYtTNwrOr3mv7M+IKVmJ/rXj4nJB//xfif7wBO1T1K+MUwMYWvk +dJp6g+YqMkWtkIm3Tc/k6MV5wZRmjjFnkonphVUBHdZboacNrSV/MHEqpt5C +UXcrNERMbIqeZWIXDpH3y22FTI79HuMFJkpH/34U+M0DNJk8t2r5zVDUNNxZ +JtsD/O13UZtkzLCn/DypeWgLdAXbrugyN8NP9xszpU+7w72S34OzqWaYQsp+ +MkDaDMZro386pJvhCtbQ9ooVm6FqcGxF0UkzvHiLey5jYRNwSP0mDtlm+EDP +9HFU9ya4lddw8tIFMxz9GsY7nrkJijKSGbblZii5/EZAFt8mOBEtejqv0wzf +37nJcJ5xAc91KmhGMsfhJTFPcdEZ/nYJijRRzDFL2OKv1AdnKAqaeOugYo43 +5N3Ul9U7w0hKzX7PVeZoo5uyaBHvDFHPnCsOGpij5a+AzYK8zpDmFEe6Z2OO +FKd/20eEnKDW4/Ufo93myO6b52PoOYLiruM1Og3muP5V4MObLXaQubhjTXoj +YSdbmxaOHfBl27A/PzJHnV1iSf/y7WC0eumNomfmmPJ73UBJuB3U8hzLk+g0 +R//kupTPK+3A80zC/rlP5pg20i1t4m4LeXUH1zxYzsK/q8xGzs5awwqnrWwF +ERa+zk4a0hmwhoQBU+39Yiw8usyjuq/FGkKWztP1pFkoCDJlYUXWYOIcI1VM +YqHf5ZsmYY7W0D0U9SNZn4UZz6iRb6+tA2nhnewNW1gY8se9jr5zLZSsPRw7 +uZWFOw9/s3rkvhYMDmeuzfFi4aB5vfxBy7XgNFn5usePhbbJguE02bWQ0j37 +K2AnC8WV1uTtabKC+eJ4q9hEFj56NKw+TbaCPrOcztIyFna9MpNY/IwQsq+k +wL6chc/SczJVXyPMlVcFjVWyUJhxherTiCBB6/mpX83CWleq3fKLCOsFlZX+ +a2Chd8DTB9abEO53lQZ2vmYhiR1wIDQFwEHknnZMDwsdbsfmCgUA9Ng+m5N7 +y8L8Iw/bnwPATO23VO8BFjIOe4o1/rIA7ct6t7+OsvB9r4uF+24LuN9nGZMx +zsLj799cl9xgAQ5Sm0B3koXj3ya0ZjQtYMfxfR3Rsyz0rLDkJ31mwUxDSr7s +PAvPdUTKBD9mQdJCbkDtAgvLH8o+fnWFBWJGN7S2/yXW/9bod98kFlzaVTu7 +uMhCSeGq/eJ+LPgfH/u+LA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.07531843692857934}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13544,19 +14213,19 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.07531843692857934}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13570,163 +14239,134 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3CRea+RKInMyx1uJITk/RYJyaqEZGRGSZFQMkLJiJB2RlrK -SsPIvjfJt2yKJCHZIS3jd35/ncfzn3PO5/N5v1/vc+QOHbPx4OTg4EhewcHx -/+t835t6xfg0fZaN+ajJygP67bclQgy6T4DOkjafY4M2oPj7QxLdUcCXU1Yr -12ACQVaPuri6L8PJtrHGn6/tYNXk2st/urLhxv2jp+++9obPFRbH5rqKIfXI -64QkdjAYK45++tFVC92Wi6MWtRfgT9eW9OmuVojfvTvQregq1Bnev9uS/RUs -Czle6R99CFKfS4cPqUzAdDq381hcMYgdcX7EazgLYxrSbS2fXsDlTcblFvt+ -g0BFAM163Sv4cFWt+ofIIhxXdrulU1gN19vyhIMoi2D+fZna9LIaHISUnf/q -LML55eqLdjXV0HtOeonTbRECpNJfO7VWQ7+fgJ7Ys0VYNL3xTXauGkaMBl9o -2S/BaaZ+Z4hWDfyezig4nbUMw5vi+449r4FSxurl5WfLMEQ3F9SprIFQzySL -6MZlmK292vyPVQMLPdETCbPL4K6ZLejXUQMRX1+Kv5fnwAs3x1S552og+l3u -nv5ADhwvyUtfUK2F+Lvh7znXrcBLKXufrsypBTONw6LiCivwamBUXe/DWuCr -t9mnzFyBOhEYkF9YC9FfKT27DFZgiOfxx/qVtXBGvmk47fAKvOCX5Cb6oRb8 -MiWWlMpWYJsi+3OMYB1Y3yxS2XWAE8dNs3PTj9eBiMqNYwc9ONG+eyLyzqk6 -eFceXXzsGCdWKjb0ZofVgVnPfu20c5wo5fNH4EpcHWyXXDL8lMeJr7UbN2/M -qgONq2YHji1wYoB4xRrK+zpYm/Y1LvUWF7YHlH6gKtWDBONZ9O97XOheW5jD -y6gHydrY8IOFXHhQ0KqkX7UeNkzTTirXcSEed3kQqVMPFHN/l/IRLtzmZdN+ -1rweNq9c1Pq6eSVWUiP5PI/Xg2XgmkH1xpX4X/PP9uHn9WBFGunLaFuJ2nYh -a4XK68Emu/TDQu9KXKMWdlO1qh5smx3fs6dW4t/dan6ur+vhoEpOmYM4N8bk -LG2K6KoH30HVlCgXbsz6HmP9aL4ezu811W+d58Y+ljitWI0FkiXvJDlX8OAz -5855Xw0W5K/e+2sTiQdnpwTIMtos6Gx1KkyR4UGn4PtCx4EFitaB8tYmPCh4 -bU9U/W4W1O6+w9N8jQdr6r7coB1mge0Txa/LOTxYe2ibTPARFoySH1Wp5vPg -PsnfM1XHWLCqqST4Ui0PSnvrJW0NYoGLWeOoxRgPpsRm3B+IYsGi8c93/+nx -ot5vQ8Ef11mQfC80b9GYF5/zmE+23yKez8NxgWnNi1d2LDCKM1lgzhIwSPTg -RatNPdV291hw3VD2qXkSL3p7zxy2LWKBNu7KePuZF2dHKZfE2CxoutMc8O87 -Lw6tXpeX1EA8f3mfFWOOF1/sN9zM+ZYF5ytd+OP5+DB3OTmh4z2xfr2g02ab -+LDYghzF/MCCAJ0s5zdRfMhd/yA0Z5QFZplCc7sS+FC2nT2SMs4Ced4zF96l -8yHDuyAvdJIFze22RW0P+PC3MY/G1hkWbPQnc/W948O8h/uPBP9hwci9U/dm -JPmR2RpybJCHDVWCQ7onFflRzCgsL5iPDVcCbd7/YvLj3LrJ3bwCbNixnfl7 -Afnx0YrmxtWCbMj+NGDK68WPLGlJ9ndRNjiKWUysf8qPIgWanRel2bD5dHnk -7Qp+fJqoTWJvYIPAAHWNHJsf6T5xZf9k2FBawAVKH/gxKc0+0VaeDWt2lSar -LfNj87QArVGJDRNFSpSnfAK4ZoC174MyG+ol0ko1RQUw2/QS71cqGwKG/QZ0 -KQK4m7NzeYjOhuZIRY0duwTQScPd59FGNtwfSWl4vVcASyjPhhNV2XDWctnR -zEkALWYOzPqqsYEp/THG8rgAftIJqlurzoaV0TslW0MF0N2jPW6IcO9oSf7e -aAG0azw4/GQzGy6+vNRlnyGAQhJ9Xhs12eAqs+jbmymArOX3l4YJa8f6cDg/ -EsC367/uuabFhm97dtDcXwmgjHzI88ktbDCa+hvq91UA2UM0EXtdNoSYpNFr -xgWwaOZH3FfC+VnMj6vnBbBhyPOL91Y2SOx10SnlI2HAyx2q7nps2P3kzwhJ -lLBuHvUj4Sie1KtO60mYOljCvWsbG8Zfsn5xbSThfHmVv7Q+G+REne/bbiFh -7VDjinDCtr6/bR8iCb8zk870EI6vT+FZMCXhSa7UAXVgQ7U047nFHhImXXPX -jCH8M6jeI8uRhILDl4JaCdObD4rPeZCQKzPnviSyITUqOfBaMAl3zr/+fINw -Qw9NcTyShBxlS9/bCS9o1LXpx5NQaovPKJ8BGzYlOZ5LSSPhto6sgS2EPb/9 -VB+8RcLEEv12V8I38NKA1n0S2jzuqY4l3HyNejmukIRHTMUf3SPMPVtj0FtK -wommuJQawrrmB35srCPhZfqH4C7Cx3LnMiObSGjHm+s6QvjuUqJVewcJ/71I -3j1H+MN+ZQ7lzyQMBwP9f4SFiqoLQkZIWLb7oOYiYUMBB+emHyR8vy1R4y/h -YLdZIZl/JKwSO71thvCTioTK4yvJ+CW81XqI8IC4kl+9IBmD2zCgjfDaY1XS -a9eSUZr/ZE4FYfMGu/8Oy5LRulJmMJNwpNzMmQoaGRfVZ7UiCD8PjVcR3kzG -+Z05txwIj7Up9rrqkfFE2NA6NcKyzMr4kh1kTP7h/4SD8L7Y/Vt5LcnY57Rk -30Ts78XP06P2dmRkSZrIpRKu0r54/bErGdeKCXDvIzyXomC27EPGxJYVvKKE -aWMVf6wDyajjP0ltJM7Tycj24d0wMgpkJx8JI5x6a8ruVywZdzx+1MYg3DB/ -gc8smYzcnhwuHUS9qD8s95rKJuNZsaCpdYS9OPet3f6YjO1RlPkSov5uHphk -pz0j47dkVdr/65FHSE5Jt4FYT+i59YeJet3qVdaR0EJGutzhvmmivv2r98R8 -/kjGVf/62wMIfzwROxg9QcYjV967+RL9INwkk9Y1T8bnhpPLn3WI/qGUGtI5 -BLH692SnJeH8rrHs96KCGMma15PTJvZXz9pVUlsQ33aJSccT/WjidHtmy3ZB -DChQD2nUIM47YuzcPnNBVDgfYbqS8M26mHvJLoJIIe2z8iL6/aVZ2RhPnCBm -Uid1x4j8CD/CG6aYKoh9Ty+eWWKywThpr9D2W4LISendQSbc3jKpFlYkiJKU -mJC1DDZM2ykEzX4QxJPu+Y/Gifx6EerPu2pQEJ855BxrpxD5c/PV1Y2Tgjjg -srv5uSIbyP37yw9zCqGL4aCfL5F/yl4JHP10IWzJCPNOI/LT6eTPi02nhXBa -elfSNyJfKRnbpUZjhPCI6tntoav+3++XnvAmC+ETP1Y5rwgbQhdozdvvCmGp -F4Xv//mcfs5JvLRJCGNlb9qMEfnelPL6Tq60MPZpEh1C5H/qU7FNdcrCmOlR -vHvoFwscOlxr+zcJI8eNzdGy88R8kFgYXG8sjLH595vOE/ODK1ONftlPGMsO -p0lIjrFAN/9aydkqYdRYcCRZ9bDAqOvd4mSDMLrqskTdiXllwbFyp3OrMPKe -zekO6GKBm43fBxgSRq+Gvw9i21hgfFouPIJbBP+b7rkZQsw/f5n5HAOGCE7Y -c/ZcKWNBvdedibogEcy4s3dTVToLTBd0RM+cFsG6K6MplqkseJfcrqURIYJS -5FsLPcks+FDKH3E3TgQVAvn/jsSzYJIUKBpzUwS5+8gf2iJZIFFossW4VgSD -ct6aTRHfB0d+/4hoEFyFHrfGt1kgsZ7jnmuGRVdhif/cJ8o2FvCNfszjkliF -aplvN//RYUFuT12nvvwqPEcrFUzdzIK+ynSVZ1qr8IF0cHuqEgssY3S6s5xX -oeWyX3gTiQXqopGqp4tWoVitNeemtnr4wxDpY+4TxRIpofiztvUwf0sycrOD -KMY/zX3ob1MPc8IURR1nUfQwO+jvbFEPk7M6PkaHRVHIvJVzs3E9DJS7zTuE -ieL+fO+0Ys16aNz1QuhCrigqf05WXSNWD9d9nWDgpyjWh0eeinlXB3p5jzOv -XFmNUseeLDzTrYMfomYutrViqOnCMG8h18JggovtCd41KDZSxPPyQTWYTp0y -HdJaiy/44v5UZFTCuBtfQEm4BIKGI90kvZz4v1jLeb52HXIXejzcl/sSRP9T -SiqcksRi+yphm7/PQOpCgZWWlhQ+seczean1FK4ydERWe0kj09u1RrCxEBol -DTRnUzYgr9uXcDv6E9CVqk1W7ZTBJNVinsXGByDElR3oGiWLlut8N6psyIUN -kTJ69kpyWMpBt5ZLywJ+iuNzm9dyyPNG3SNM/BZs3Lau4NRBeXQXFlb8QrsK -J/pE68w4FHAydcPnc+mpMDWbsM/0qgJeOcTwVBu7BL3dWba3rivgi/tHNkq0 -XILGV8/3/7ipgKbJatarXlyCu+f77a9lKeCO1D/nt5y7BA7rNZy+P1LA3qHw -YRupS8Da3uMZ90oBKw+sYVVaJ8GNFFrwmwEF1LIf+Kz5JgF2qrKvmzIVMTwl -49qvkTiw4zHZ26yqiGHjQZ3rW+LA59Mbwf3qishhVGlkUxoHSfH/RbhvUcTi -hZqkn3Fx0Pmt3TPcQBF5546+EVOJA/fMr+rP9ilir5r+oScBFyBq1Yq3smcV -sWLD+itcIuehcnbrv1/vFNFQer8V43Q0ZDW9OLSnRRGTm5eGP3tHQ3Tu5sb8 -NkW0XzcB2bbRYLqfcc2jWxHzj9ElrdSjob1MckvbF0UMfWNzw3L0HIxG/jmR -P6eIJUEnN3Y5noM1Ii9G3SUp6LPc0t22Kwr8VNQ/tnhQcO7L6oIBywg4+Uvy -r7M3BQXX6zdfgAg4U8slOelDQc4i70k91QiIt+uwF/CnYFQ2ffGdUAQ8iA7+ -sD2UgioT/W/Ub4XDQG9l99MkClIbr3eezToLtom7utJfULDD7FGJfOUZ2Dbp -3m7Pr4Qq17o+vTIMgTXlO7MrSErYvfi4VJsRApPn6f4yQkq41ypLuUE0BG7L -TZOGRJXQNsTtnOJAMCztPW3oL6WEOm87X7VEBkNVeUpxrKoS7iS98J2pPwUG -cZXJT/cpIZw7qzxlHwQ7FCV2C2YrITpWBPwrD4CSCZac+10lrLW8OZX+IAAU -XwTMl91TwopVnaIG6QGw0uz9He88JXRezyv3xi8Aao/FztSVKGF6lOW6O/IB -oF8+lxH6WglDvT4dt0s8AVo2LQPfxpXwdRUlvcjvOFAjLgbXblFGzt1pEfRX -flCxNZfbXFcZwefeatcbfmD1q+pyh54y/orOcH8Z4gfBfj8fjxgo47d3ql0N -Wn7Q4OjyRchcGb0zViv6FR8Fbx0tswMuymi5gfPp04Ij8HDmy/q5C8rI611j -GVzjA/r5Cw/C4pXxe4Vef1qOD7QeXqvFm6SMDzVmON/H+MDffnMryVRl9Lp8 -8NYNMx8we/8iGm8p442PV8NSOw7DaF7iREKRMkbZ/NcxMu0NdA+dKspHZey+ -lECJ1vOCS/IWf8/1KmMRPUNlWMEL5j4f0hzoU8a5QaqnM8kLKh0S8m5/VUZr -MVDO+OgJNlafM9ZOKKO97fr+daGeELI1xp+fg4papWxjx1ce0LCqRW6CQsWC -ziff9u91B+b7IcddVCp+tZd0CtN3h8sJfzMe0qmoe3zbuxdUd3DkVRTyVKXi -z/uW+30X3WBqIehvnzYVX8bGqr297wZrRqTamndRcVTiBDpzuIFHpXd0yXEq -frAsWnKvdoXJo6OndgRSMem3WapvnisESx/x7Qyi4pm3cPDCFVe4eOaYze/T -VGRdaceVR12hUDdIVi+WijVZ39dwrXeFhefnKuquU3EpcnM+6bQLXC64Pdda -R0W/P/5PItOdQMpZdsSNTUXN5po9zf5OkCuU3TPXQMVwp9bLxuZO8PJobu2a -d1Q87Es2ecjlBJ8Yj5MduqkYCk+SDAMPAvVBqcrAOBUTOWe+5Dk6QlVmu/sP -cRpqipzN32PqAP3mcs5BEjRUI1OVh2gOwPHnqP0/SRqOF95NuCrgANuteS24 -ZWk4M6V0x73JHtgrdLeso9Pwhve4X5K1PTQdusNvoE/DZWEdX8FDdvBR0Sc/ -2ZOGdgobKV+v28K/5ucPxA/TsE/aPDAo3BakwrhyrvvS0MdidlDZ3RYOdtzM -uOtPQ0lH7xeDTFvoj3kf8TKUhj3Pry7W1u6Db8Mae/qTaOjxjHvbnx97Ye7B -8i/VFzR0zUoJuOixB4ZtjTPjSmmYmv4Ldljuge6ViSZfy2lIVbhmvFZnD5S7 -SF67Uk3D3rUZTzgE90CUhKbu4hsa1k4zU4ef2YDIBZ8zjb00VA+YPDlOsgEV -rw4OD046bhRtTrVusIIN4lIPK1fS0e0H4/7bEisQqTtkLcFLx7/ShT4OWVYw -u2E66y2Jjos7xkuehVpBWaeAobo4Hb3Wpei5brQCE2OMWVam4+2+b7/m1S3B -jZLHf303Hd3jzjw4uWAOoSwnHyUrOs7EFOYd7TKHZA/Rt8U2dAy6WT+YXGwO -FbkhCW/30/HVJi5ju8PmIKZkIrzoSifm0emxoe5dwFYaEnMJoiP349DAzioz -oFNlZJXu0DGjwrnuS54JYENrRHEWHdlH97aOx5uArXfsF/27dKS9Pt0ofcQE -zj2YyN7/kI7dT1w7p1VMoJdaQYl7Skf7h6Yr9xfuhCSaPWP8NR1Dndf7rKg0 -hh/0VK3iaTqm6VznqZs1gu4m3LF6lo57xVk/RD8aQbXf5J7An3TknCI3hFcb -QVKx6XGtv3S8dfR2TUGiEdB1OR6XcTGwWehrlQfNCA6ZHpWrW8PAAI1bMyKe -htDutZPcrsfA9NawU1mzBlDO/1NSExg4Ag907T4ZQHZeNu2KAQPlXscFUl8b -gP/UorGdMQO5ClcPit0wAMFTJZG9lgzc9iO/V9LIAIxj5X4NHmLg4am2lvrr -CC/v/vvy8wID/5Vy36x/qg9ahoG/zOIZ6Gy7+HYqUR+efRknZyYy8Glbzr8d -3vpQvKFvi9llBibz8z06Ia0Pj69WJ96+wcCm87OnG+K2QWZCjM7OfAb69z3V -Rh89iAsUTrnaxkAbo84/Oqa6wLf6wr2JDgbydfSXnKDqQmwRR8X2bga2jQtr -t/DqQvTkj+HxXgZmOF74s8TWgbPe7XoGwwy898lZYd1OHTjheG3k+28GfgoS -d1Cy0AYHIwXcukEFtzl/vHcrSAsW2/mE6mRVMPr89GTffi3I9JjsMVNQwYKZ -TrWdOlowHFt6yoGqgjq/OKfiFzThxBvLghB1Few3YoZ8idaEixZnNrw0VsHb -EVohV25qQJldx4LGMRXMEv9QujSsDge/lzVWHFfB9z0clW+b1IEjNPOqUaAK -Do5HBZUVq4PxDV+NvSEquPxt3HPhrDq0flpxJOCcCmbQUpcE16nD6KGNPUUZ -KvjR383WeM8mWH/0fOnGahX8LjyuS65UhaRlT834WhVcOh0MIWmqwHnZuOhb -vQpaBzd/k/BVhdHn3A8z36igg/zw9ikJVSjjiL4q2qaC3OR3vDNBG8EhLeLU -/JAK1vQOPpDRY8LV8hDNShITW+r+KeZ+pwPZwr5IUoiJd69Z5C6y6BDRr808 -JcLECrlcZeIbA7y5fyuqiTPRQ6vQV8iRDlssg8SyNzCxYN4tcWMLDToHTszG -bGLiBvpI6aE6KogLHCnavZ+J1yRmCqzYSnDXMCx02p6JW+VrarbfVQL1sCTD -VEcmtiZvcHCPUgKL6cKOblcm+q/azdAEJYjt/PnH7QgTG4akX/KUU+B3dvj2 -0Egm7roXkKVZrggft6a23ctjYrgD/fqmXnnwPnn3pmk+E/VjhJ/kVMnDfP4z -j/FCJlr1HlPRz5EHUfnuX5ueM1HwpfrtMR952MUnLfWqmrh/wobr8gtyUNF+ -z72tg9iP8A3S7RQ5MBN6yQzqZqJUo0tTCUkOune+mZfoYeKf0MrSsh+yMFc2 -dsGpn4mGS6bxmpWywMxSe/J9lIlN7o9efbGThYqPBkEJE0z8KKAj8g1kwUxs -D6hOM/FkQaGMiLIseJ4/2RL4k4lDBRPHr43JwFx17PW1v5nYJajfWFUmA1F/ -M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ -3z9DIQ== +1:eJwV13k0VV8bB3BDZajM83AnF5GZcC/X81DGRBRJMstUkqSSMhQJSVQkRZIG +hXtvFPpFNAgVkVDJUCohhKTBe96/zvqsdc7ea+39fZ69D9V/t2sQHw8Pjzkv +D8//n3P9zx7R00ssEss+2DvarLPouiR30LInCRpN6/Lkz9MApV/6y/VkQ+tN +lRsTeQYQs/HmG/6eYqjz+NHdnmcF4hOy2b/ecEC5KvdYUZ4rfLjvtHvmTSOQ +Rk/X8OX5gw199P3Um1fQp3k57uLZKPj1xuTs5JshSDogckAqIwma1l4r6Sj+ +AYv1sdfuq+eA0oeaEX+tv9DfajMsI1YAUjt9bgqs5UeRDBOeBu1iyNa3qXNy +E8QDgXA7wasUevP0GqbEVqKum1fa8JcbkF4S/5JPXhzvikdNG2+8DQ5GoRLS +KuJI2zj1+7zXbRB85Oqmri2OIhd5GLMht+HYsOrb9ZbiaFGdsu5M4m2Io7WN +nAkVR6FvM77RnNsQUST3T61WHG1EW+7VSpSDSwFba/02Cfx69tinjc/LQfbM +8Imci5Ko9a5xk6J0Jcitrjo2XyqJIs4Z5Gn5SlBoTInfXimJl+L5XR+TKoE0 +qbFPvUkSR0yKvviuqgRVx0jfui+SyNzk17bTrBIMl/w1HjaUwuDRjslu30pw +jpb5aNAihau21QlNXa+Ejcu/9Od2SqFZpHvRptuV4Fpc0/vnnRQOSbuc5LAr +wb3d6+WT71Jo43wnJKi2ErZrXan1lJbGg/7X5AtbKyH8o+7pJF9pFHfGFf7j +lXB8s73FqzlpjFzHrlHRYYPCnRcKfLwyaJz6fj7QgA3lkpt/6i+XwbKBM+8u +G7Oh+5V35WmyDA7FumWJABvoLtE0FzsZPJTpUcR1ZkPjhsJl7edlUC1vFU0r +kg1/bWZfPDeXxZWD1UKvb7MhqzS27K+NLEY5LmxNYxPfL+NJ1XaRRZfQB7Zm +VWxwfCxseTJIFh9E+/w+dZ8N+WspXMdMWTwVfbxhSSsbTHF9busHWUzW3XxH +8TMb9jIu+zxLksMiuXTtRUUOOBSJzKzPkMPjgYLx0yQO0ATiUl+clcNDrPX/ +BqkcaO9yZ3del8PBd4kpVeoc0Ilcwd//Qg4/il9q0DHkwJfS/aXTCvJolW/0 +M9SeA15STuOKXHkUD/2TuWQvBwwP1SVeui+Phyu9Bw7v44Dw0CoZ6hN5tNzP +G/RjPwdqKvhBrVceo6pWCnXGcUBmfU2W3qI8DgncagpMIeZPpBtZr1fAwIID +Vq/yOLDu+0JsxLAC7tydduVNLQcO2p3RfDimgPZD3l+e3+dA+WXtPsk5Bew1 +P5DV8IADcpt9GTWCihjctmTFhUYOjN17/JNfRxGFq07X0Vs4kJOUFX3+gCIa +GiR6pPdwoPmtBn0sURGz71jw2fVx4I9RU6dFuiI26kxI877jwI7PswYfLyri +2YczcSEfOMB03Dal06SIL03Pu68Y4cCQtFrEo5VKGDt4+sr1aQ7I7q5XlpVV +wjtPQFVrhgOOzR7PQylKuK/6itytWQ5Ux6ZriRoqYahGifvleQ6kfZgc3eqh +hKerfCz8/nHA4EZd8PdiJfxVOmdsIsSFYD43WatbShjt3SWVJMyFgm0TT85U +KaHbDbNdz5ZzYZkIVY3ZrIRhpjxZG0S40BeV8vHYuBKO+C0vXy3JhURzFz8F +U2WkL+3sAiUu2HlfmjaxUsYvKj+7Q5W5IJLw7aibozL6vDtRf4pEjN+UXJrl +q4x9aU62LylcuOdQ+23ZCWXcOvnVTlmVC/E7BQ7Tc5SRaSFyTk2NCzaZm0Ws +LiqjVHl4+2p1LnR1TOgdZitjgJKLmKYGFyY9VGJ+9Cqj6FD661ktLtyNjRQQ +/6iMz8PWXO3X5sKRgv/ydCaUUTGQEdqkw4UVA1vqQvlIOFG90JGgxwX14Aye +AU0SavtuwlZDLkyk9p7+a0TChvy7bTlGXLhzU01FEUi4jzO22WMNF6wmGqzd +N5Hw97mLXq+NueC9bzat7RAJQ0t0AwsZXFDNtVIaTSbhvLj6qC2TS+Tj1G2B +LBKuM67ZO0Y49o9Gu1UJCadmbp7VMOfC2aPe0jVtJGy6Mq8XbcEFr6tlpd3d +JIzVnPr+hzDt6bzJzAAJ7WcLaxOBC5XCOZ66syRU/me9Px650Hb6aeFVZTK+ ++cdTtt6KCzlcKf0mdTKm8E9+vEPY87Vf44A+GSltPIYKa7nwRe7PR0UbMto3 +don2Eq5g2scwNpJxKuVhkcE6LsR4nRPY4knGj2YqDqmE+Yv0NLMjyNg2fXVU +3ZoLLQ8P11UcIKOx0cLwHsJZwy2Oz5PIKDGssXCX8Jalcv2jGWTcV+Cis0CY +pB60WzCXjLPapxJNbbjwyY7Do3aZjPfP8M5GEb4Vtnh6bRkZL/1pPnGDMLP8 +/J0j9WR84f9ecbktF9a9efF3opmMOk9ubDUk7MSzxNbnFRl36b029yDsocHI +evmWjE93OD05SDjANaIXPpHxmejSn7mEIw5doVVOkPEW5+tLDuEDJT3hlHky +VlSPu7QQfjiS4tnMQ8Egf/4j/YRtDlHjE5ZSUPKtstt3wq2i96+YClNQmK7f +84fwxhL35kkRCv5UNhAUsONCt+nU2HVJCpqlyIysJLztebq4nxwFree6osQJ +D/ipGcsrU3BoKLDi/94x1+DZQaVgwYUHBSKEv6Vtiz+hRkFeh7dmgoQjyXNX +LFdTcOnUnZP/iPlmuVnNv3Qp6LrTJmeKcKzd6nG2EQUv7U7fMEiY5/1j8TAG +BX8nJ/z3nHDyHl9jmgUF9cRVPlYTFl7227PPioKi9nsaCwhn5Z+Nz7alYCMz +bGs8YWldvRIHRwqqNK+86U04v6mlmc+FgiuveVUxCZM9gsZr3SjI9fWIkyRc +MrYovteTghMb+Xm+EvulmZhvvNqHgqev+lrWEa6QXrNtOICC9dujLdMIG918 +GX8hhIKm9mt53QnXWoSVbNpFwXKBzkQS4UfBheNNMRT8c9z52VUiL/Z/GBJx +hyjYmr0+O5Dwi6wuY6MECuryqlMohHtrhBJKTlCQEXol8ySRT2+nkhKvTAoq +innuAcIfhyyeSeUQ67tXUXmCyPfE8miJ5AIKhh6a7rQkvLdIxIR1mYJGivTB +EaI+5o1ubJu9SkGrXXl1qYT5vftLgiqI9WafeNdoyQW5SjsTm0YKNlcdHhMj +6u3iuuFt/54Q+YgoTywg6pHWezihupWC/F+rx+iEtfm4z9ReU7BK/bqdFlG/ +VpuVvQS+UBA6S4yliXp/+uVuQv0YBX281M8fN+OC42HXq/unKKgta9s3R/SH +LaXHJz4vUHDh84s/rUQ/2Tk/ldC8kop7tSyGNpoQ9bFnh8yIBBV1pWiMAqL/ +CI72lfHLUbEjd/n4MNGfrr5t6ragUbFVv2pPCNG/+h+c1aoypmLNQV5ZG30u +OCczei77UFHz8wV5N02iPv/d3lUfSMWX80smdxD9dCyGxv8+lIrtL38x963i +QmrIch25aCoeVDphdJzoxw3r3x/NTKWi5erEgQQaFwwkEnUPsanYR+uPbJMn +8pg++yivmooQSrcplSP2jz/Ms7qOiiNKwdfjZLkQPuuaPPWYGM9PSYEsTeSp +h/42uI+Kd5JF+5liXJApbE7ZzE9D42lZ+5dLufBrtVi/thsNJbZVv4+Z4MDc +RYVEQ08axt2VeTw2xoEZUVU6w4eGD6dH03y+cWDiByNsXSgNQ7r075l9Ic7P +uoA5z8M0vJSl//jFIAda1t8VSb1Kw4WL3cJ+XRzID/eGoVnifXPpaMu7HMh9 +HzL0eYGGn2L0LdyrOHDGeW/y+CINgXeZQgiXA5mGqa3zQirYZhm88mgFB5J+ +s7eIklSw4YmE+LlrHAhPXxppbqOCwy78//RzOWBedqvo3DkVXKowILshmgNv +KWWF1hdUUDj+bb5OFAdiz924NFOogp3xV+pXRnLgbmJpgesNFeT3V5p5FE6c +1x5FeSL3VfCcjYeubAAHNJaeyUoZVEGVZRqqji7E/cbnUEKMFh0piyde8Gpx +YErCwde9kY4hHo/HRvvY0LOT1h72lI7tf9UElvWwoeHJAsS30VHDpLSR9Jq4 +D8aWka9303HzLWe6/Us26A2t+PBrlI7FlucfJzaxIYL9cvtFSVV8z5xWOFbG +hlFnt20fA1VxnG4y2XuQDR8zfN2jBNQw3qL+gr4YG+y/77f/ZKyOBbofr6mb +VMJYgODeO/GrUOfhKa2Y0HLif0SW73ijBhZGSn1td7wFEs/VMiu/a+JCyNyL +cKuboJRasdHYWAvjvwVl8y25DnmrGWKSwdqY29s33DR+FVoULNf8OK2DUzcr +O5q/XQGmUmOWbrcuGjgecUtpvwwi/MXRfkl66L2thes4UAikRLL5VjV9zCne +s6RGuACEVL2qXZ/qo4hFbERxWh7osOQr9m83wNh3s/1Ox89CVL9EkwOPIXZl +6i9EpmfD9x8ZbvZ5hijkdaFkaFkW2Oo+ybfXNsL03OoSz4J0ePDD7PfPF0Yo +NakzWOd6HCK0DPo6gtbgheduq2LajgJrIrBrq5AxMiTNrY7EJIA1XW7DymJj +/Hn1BDnixCFYlZB2oNHEBNVvVVBn52NAM4hRr9pngiJH3wysq4+CUzSnhaPv +TPCCwq6ujsoomPngv2ao3wQ37zhJDimOggeeGWWXhk1wTKXvZmVyFLhu/JAr +O26Cg8W1CmzHKDholhwpxEPc2ou3poW/2wPN4h3UcVVTHAq4S73OtweCHoQc +u7PHFO9eVy4teBUBE7tG91tHm6KxzDYpiXsRcEB5Z3h3jClu0KJ/y78YAWlx +u13nD5libWLGtZGQCKhkxlDMU0yxQfu6XhBPBPypPnq/Kd8UD1ZPG84a7ILs +ikszr5pM8QJzYZlsaTjUF3UFTkkzkCaZq6TYGAIDjlSfGDkGkjPDrxy5FQI8 +v3Zt/a3AQHmdQZ/pcyFg5SLgtJTCQA2pvk3CO0PgCS/TRF6TgbzWbeTfMiHQ +5l8oZGnBwC8xZ0V7dgdDHz2sPGsHA/e6OGhYaO+AmeuLP3XvMtB/IkrsflcA +jLjbFJ2oYWAunfZA5lEA9Cw5aTdcx8D/KEtOHuYGQJ2vwvlzDQxUVtWI2p0d +AElya5h/nzFQmvffmeGNASCWGhbX8o6BK+NJygLt/qAV/JoniI+JA73tdcJv +/CBAtUwofwMT+ZJeZKcu84XYx95hahuZGGc4uUP2uw9kBUm0clyZeG/PkjXG +HT5w/+rBjNYtTNwrOr3mv7M+IKVmJ/rXj4nJB//xfif7wBO1T1K+MUwMYWvk +dJp6g+YqMkWtkIm3Tc/k6MV5wZRmjjFnkonphVUBHdZboacNrSV/MHEqpt5C +UXcrNERMbIqeZWIXDpH3y22FTI79HuMFJkpH/34U+M0DNJk8t2r5zVDUNNxZ +JtsD/O13UZtkzLCn/DypeWgLdAXbrugyN8NP9xszpU+7w72S34OzqWaYQsp+ +MkDaDMZro386pJvhCtbQ9ooVm6FqcGxF0UkzvHiLey5jYRNwSP0mDtlm+EDP +9HFU9ya4lddw8tIFMxz9GsY7nrkJijKSGbblZii5/EZAFt8mOBEtejqv0wzf +37nJcJ5xAc91KmhGMsfhJTFPcdEZ/nYJijRRzDFL2OKv1AdnKAqaeOugYo43 +5N3Ul9U7w0hKzX7PVeZoo5uyaBHvDFHPnCsOGpij5a+AzYK8zpDmFEe6Z2OO +FKd/20eEnKDW4/Ufo93myO6b52PoOYLiruM1Og3muP5V4MObLXaQubhjTXoj +YSdbmxaOHfBl27A/PzJHnV1iSf/y7WC0eumNomfmmPJ73UBJuB3U8hzLk+g0 +R//kupTPK+3A80zC/rlP5pg20i1t4m4LeXUH1zxYzsK/q8xGzs5awwqnrWwF +ERa+zk4a0hmwhoQBU+39Yiw8usyjuq/FGkKWztP1pFkoCDJlYUXWYOIcI1VM +YqHf5ZsmYY7W0D0U9SNZn4UZz6iRb6+tA2nhnewNW1gY8se9jr5zLZSsPRw7 +uZWFOw9/s3rkvhYMDmeuzfFi4aB5vfxBy7XgNFn5usePhbbJguE02bWQ0j37 +K2AnC8WV1uTtabKC+eJ4q9hEFj56NKw+TbaCPrOcztIyFna9MpNY/IwQsq+k +wL6chc/SczJVXyPMlVcFjVWyUJhxherTiCBB6/mpX83CWleq3fKLCOsFlZX+ +a2Chd8DTB9abEO53lQZ2vmYhiR1wIDQFwEHknnZMDwsdbsfmCgUA9Ng+m5N7 +y8L8Iw/bnwPATO23VO8BFjIOe4o1/rIA7ct6t7+OsvB9r4uF+24LuN9nGZMx +zsLj799cl9xgAQ5Sm0B3koXj3ya0ZjQtYMfxfR3Rsyz0rLDkJ31mwUxDSr7s +PAvPdUTKBD9mQdJCbkDtAgvLH8o+fnWFBWJGN7S2/yXW/9bod98kFlzaVTu7 +uMhCSeGq/eJ+LPgfH/u+LA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.17388882737814787`}}, + "PlotRange" -> {{0, 30}, {0., 0.07531843692857934}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13737,6 +14377,7 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13764,7 +14405,8 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.17388882737814787`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07531843692857934}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13772,17 +14414,625 @@ M9zK/hLvv4lNUbkoAyIaD1UOLhL7s+Wncp+9DNw+WvZzeZmJJb4PAjtoMvA/ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913324679337597`*^9}, + CellChangeTimes->{3.9913324679337597`*^9, 3.994389424799247*^9}, CellLabel-> - "Out[221]=",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] + "Out[140]=",ExpressionUUID->"d3efce80-b1b9-4c52-b05f-ea1bc91956e0"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"f380af60-a605-c546-a4c8-\ -b989835aa113"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0VV8bB3BDZajM83AnF5GZcC/X81DGRBRJMstUkqSSMhQJSVQkRZIG +hXtvFPpFNAgVkVDJUCohhKTBe96/zvqsdc7ea+39fZ69D9V/t2sQHw8Pjzkv +D8//n3P9zx7R00ssEss+2DvarLPouiR30LInCRpN6/Lkz9MApV/6y/VkQ+tN +lRsTeQYQs/HmG/6eYqjz+NHdnmcF4hOy2b/ecEC5KvdYUZ4rfLjvtHvmTSOQ +Rk/X8OX5gw199P3Um1fQp3k57uLZKPj1xuTs5JshSDogckAqIwma1l4r6Sj+ +AYv1sdfuq+eA0oeaEX+tv9DfajMsI1YAUjt9bgqs5UeRDBOeBu1iyNa3qXNy +E8QDgXA7wasUevP0GqbEVqKum1fa8JcbkF4S/5JPXhzvikdNG2+8DQ5GoRLS +KuJI2zj1+7zXbRB85Oqmri2OIhd5GLMht+HYsOrb9ZbiaFGdsu5M4m2Io7WN +nAkVR6FvM77RnNsQUST3T61WHG1EW+7VSpSDSwFba/02Cfx69tinjc/LQfbM +8Imci5Ko9a5xk6J0Jcitrjo2XyqJIs4Z5Gn5SlBoTInfXimJl+L5XR+TKoE0 +qbFPvUkSR0yKvviuqgRVx0jfui+SyNzk17bTrBIMl/w1HjaUwuDRjslu30pw +jpb5aNAihau21QlNXa+Ejcu/9Od2SqFZpHvRptuV4Fpc0/vnnRQOSbuc5LAr +wb3d6+WT71Jo43wnJKi2ErZrXan1lJbGg/7X5AtbKyH8o+7pJF9pFHfGFf7j +lXB8s73FqzlpjFzHrlHRYYPCnRcKfLwyaJz6fj7QgA3lkpt/6i+XwbKBM+8u +G7Oh+5V35WmyDA7FumWJABvoLtE0FzsZPJTpUcR1ZkPjhsJl7edlUC1vFU0r +kg1/bWZfPDeXxZWD1UKvb7MhqzS27K+NLEY5LmxNYxPfL+NJ1XaRRZfQB7Zm +VWxwfCxseTJIFh9E+/w+dZ8N+WspXMdMWTwVfbxhSSsbTHF9busHWUzW3XxH +8TMb9jIu+zxLksMiuXTtRUUOOBSJzKzPkMPjgYLx0yQO0ATiUl+clcNDrPX/ +BqkcaO9yZ3del8PBd4kpVeoc0Ilcwd//Qg4/il9q0DHkwJfS/aXTCvJolW/0 +M9SeA15STuOKXHkUD/2TuWQvBwwP1SVeui+Phyu9Bw7v44Dw0CoZ6hN5tNzP +G/RjPwdqKvhBrVceo6pWCnXGcUBmfU2W3qI8DgncagpMIeZPpBtZr1fAwIID +Vq/yOLDu+0JsxLAC7tydduVNLQcO2p3RfDimgPZD3l+e3+dA+WXtPsk5Bew1 +P5DV8IADcpt9GTWCihjctmTFhUYOjN17/JNfRxGFq07X0Vs4kJOUFX3+gCIa +GiR6pPdwoPmtBn0sURGz71jw2fVx4I9RU6dFuiI26kxI877jwI7PswYfLyri +2YczcSEfOMB03Dal06SIL03Pu68Y4cCQtFrEo5VKGDt4+sr1aQ7I7q5XlpVV +wjtPQFVrhgOOzR7PQylKuK/6itytWQ5Ux6ZriRoqYahGifvleQ6kfZgc3eqh +hKerfCz8/nHA4EZd8PdiJfxVOmdsIsSFYD43WatbShjt3SWVJMyFgm0TT85U +KaHbDbNdz5ZzYZkIVY3ZrIRhpjxZG0S40BeV8vHYuBKO+C0vXy3JhURzFz8F +U2WkL+3sAiUu2HlfmjaxUsYvKj+7Q5W5IJLw7aibozL6vDtRf4pEjN+UXJrl +q4x9aU62LylcuOdQ+23ZCWXcOvnVTlmVC/E7BQ7Tc5SRaSFyTk2NCzaZm0Ws +LiqjVHl4+2p1LnR1TOgdZitjgJKLmKYGFyY9VGJ+9Cqj6FD661ktLtyNjRQQ +/6iMz8PWXO3X5sKRgv/ydCaUUTGQEdqkw4UVA1vqQvlIOFG90JGgxwX14Aye +AU0SavtuwlZDLkyk9p7+a0TChvy7bTlGXLhzU01FEUi4jzO22WMNF6wmGqzd +N5Hw97mLXq+NueC9bzat7RAJQ0t0AwsZXFDNtVIaTSbhvLj6qC2TS+Tj1G2B +LBKuM67ZO0Y49o9Gu1UJCadmbp7VMOfC2aPe0jVtJGy6Mq8XbcEFr6tlpd3d +JIzVnPr+hzDt6bzJzAAJ7WcLaxOBC5XCOZ66syRU/me9Px650Hb6aeFVZTK+ ++cdTtt6KCzlcKf0mdTKm8E9+vEPY87Vf44A+GSltPIYKa7nwRe7PR0UbMto3 +don2Eq5g2scwNpJxKuVhkcE6LsR4nRPY4knGj2YqDqmE+Yv0NLMjyNg2fXVU +3ZoLLQ8P11UcIKOx0cLwHsJZwy2Oz5PIKDGssXCX8Jalcv2jGWTcV+Cis0CY +pB60WzCXjLPapxJNbbjwyY7Do3aZjPfP8M5GEb4Vtnh6bRkZL/1pPnGDMLP8 +/J0j9WR84f9ecbktF9a9efF3opmMOk9ubDUk7MSzxNbnFRl36b029yDsocHI +evmWjE93OD05SDjANaIXPpHxmejSn7mEIw5doVVOkPEW5+tLDuEDJT3hlHky +VlSPu7QQfjiS4tnMQ8Egf/4j/YRtDlHjE5ZSUPKtstt3wq2i96+YClNQmK7f +84fwxhL35kkRCv5UNhAUsONCt+nU2HVJCpqlyIysJLztebq4nxwFree6osQJ +D/ipGcsrU3BoKLDi/94x1+DZQaVgwYUHBSKEv6Vtiz+hRkFeh7dmgoQjyXNX +LFdTcOnUnZP/iPlmuVnNv3Qp6LrTJmeKcKzd6nG2EQUv7U7fMEiY5/1j8TAG +BX8nJ/z3nHDyHl9jmgUF9cRVPlYTFl7227PPioKi9nsaCwhn5Z+Nz7alYCMz +bGs8YWldvRIHRwqqNK+86U04v6mlmc+FgiuveVUxCZM9gsZr3SjI9fWIkyRc +MrYovteTghMb+Xm+EvulmZhvvNqHgqev+lrWEa6QXrNtOICC9dujLdMIG918 +GX8hhIKm9mt53QnXWoSVbNpFwXKBzkQS4UfBheNNMRT8c9z52VUiL/Z/GBJx +hyjYmr0+O5Dwi6wuY6MECuryqlMohHtrhBJKTlCQEXol8ySRT2+nkhKvTAoq +innuAcIfhyyeSeUQ67tXUXmCyPfE8miJ5AIKhh6a7rQkvLdIxIR1mYJGivTB +EaI+5o1ubJu9SkGrXXl1qYT5vftLgiqI9WafeNdoyQW5SjsTm0YKNlcdHhMj +6u3iuuFt/54Q+YgoTywg6pHWezihupWC/F+rx+iEtfm4z9ReU7BK/bqdFlG/ +VpuVvQS+UBA6S4yliXp/+uVuQv0YBX281M8fN+OC42HXq/unKKgta9s3R/SH +LaXHJz4vUHDh84s/rUQ/2Tk/ldC8kop7tSyGNpoQ9bFnh8yIBBV1pWiMAqL/ +CI72lfHLUbEjd/n4MNGfrr5t6ragUbFVv2pPCNG/+h+c1aoypmLNQV5ZG30u +OCczei77UFHz8wV5N02iPv/d3lUfSMWX80smdxD9dCyGxv8+lIrtL38x963i +QmrIch25aCoeVDphdJzoxw3r3x/NTKWi5erEgQQaFwwkEnUPsanYR+uPbJMn +8pg++yivmooQSrcplSP2jz/Ms7qOiiNKwdfjZLkQPuuaPPWYGM9PSYEsTeSp +h/42uI+Kd5JF+5liXJApbE7ZzE9D42lZ+5dLufBrtVi/thsNJbZVv4+Z4MDc +RYVEQ08axt2VeTw2xoEZUVU6w4eGD6dH03y+cWDiByNsXSgNQ7r075l9Ic7P +uoA5z8M0vJSl//jFIAda1t8VSb1Kw4WL3cJ+XRzID/eGoVnifXPpaMu7HMh9 +HzL0eYGGn2L0LdyrOHDGeW/y+CINgXeZQgiXA5mGqa3zQirYZhm88mgFB5J+ +s7eIklSw4YmE+LlrHAhPXxppbqOCwy78//RzOWBedqvo3DkVXKowILshmgNv +KWWF1hdUUDj+bb5OFAdiz924NFOogp3xV+pXRnLgbmJpgesNFeT3V5p5FE6c +1x5FeSL3VfCcjYeubAAHNJaeyUoZVEGVZRqqji7E/cbnUEKMFh0piyde8Gpx +YErCwde9kY4hHo/HRvvY0LOT1h72lI7tf9UElvWwoeHJAsS30VHDpLSR9Jq4 +D8aWka9303HzLWe6/Us26A2t+PBrlI7FlucfJzaxIYL9cvtFSVV8z5xWOFbG +hlFnt20fA1VxnG4y2XuQDR8zfN2jBNQw3qL+gr4YG+y/77f/ZKyOBbofr6mb +VMJYgODeO/GrUOfhKa2Y0HLif0SW73ijBhZGSn1td7wFEs/VMiu/a+JCyNyL +cKuboJRasdHYWAvjvwVl8y25DnmrGWKSwdqY29s33DR+FVoULNf8OK2DUzcr +O5q/XQGmUmOWbrcuGjgecUtpvwwi/MXRfkl66L2thes4UAikRLL5VjV9zCne +s6RGuACEVL2qXZ/qo4hFbERxWh7osOQr9m83wNh3s/1Ox89CVL9EkwOPIXZl +6i9EpmfD9x8ZbvZ5hijkdaFkaFkW2Oo+ybfXNsL03OoSz4J0ePDD7PfPF0Yo +NakzWOd6HCK0DPo6gtbgheduq2LajgJrIrBrq5AxMiTNrY7EJIA1XW7DymJj +/Hn1BDnixCFYlZB2oNHEBNVvVVBn52NAM4hRr9pngiJH3wysq4+CUzSnhaPv +TPCCwq6ujsoomPngv2ao3wQ37zhJDimOggeeGWWXhk1wTKXvZmVyFLhu/JAr +O26Cg8W1CmzHKDholhwpxEPc2ou3poW/2wPN4h3UcVVTHAq4S73OtweCHoQc +u7PHFO9eVy4teBUBE7tG91tHm6KxzDYpiXsRcEB5Z3h3jClu0KJ/y78YAWlx +u13nD5libWLGtZGQCKhkxlDMU0yxQfu6XhBPBPypPnq/Kd8UD1ZPG84a7ILs +ikszr5pM8QJzYZlsaTjUF3UFTkkzkCaZq6TYGAIDjlSfGDkGkjPDrxy5FQI8 +v3Zt/a3AQHmdQZ/pcyFg5SLgtJTCQA2pvk3CO0PgCS/TRF6TgbzWbeTfMiHQ +5l8oZGnBwC8xZ0V7dgdDHz2sPGsHA/e6OGhYaO+AmeuLP3XvMtB/IkrsflcA +jLjbFJ2oYWAunfZA5lEA9Cw5aTdcx8D/KEtOHuYGQJ2vwvlzDQxUVtWI2p0d +AElya5h/nzFQmvffmeGNASCWGhbX8o6BK+NJygLt/qAV/JoniI+JA73tdcJv +/CBAtUwofwMT+ZJeZKcu84XYx95hahuZGGc4uUP2uw9kBUm0clyZeG/PkjXG +HT5w/+rBjNYtTNwrOr3mv7M+IKVmJ/rXj4nJB//xfif7wBO1T1K+MUwMYWvk +dJp6g+YqMkWtkIm3Tc/k6MV5wZRmjjFnkonphVUBHdZboacNrSV/MHEqpt5C +UXcrNERMbIqeZWIXDpH3y22FTI79HuMFJkpH/34U+M0DNJk8t2r5zVDUNNxZ +JtsD/O13UZtkzLCn/DypeWgLdAXbrugyN8NP9xszpU+7w72S34OzqWaYQsp+ +MkDaDMZro386pJvhCtbQ9ooVm6FqcGxF0UkzvHiLey5jYRNwSP0mDtlm+EDP +9HFU9ya4lddw8tIFMxz9GsY7nrkJijKSGbblZii5/EZAFt8mOBEtejqv0wzf +37nJcJ5xAc91KmhGMsfhJTFPcdEZ/nYJijRRzDFL2OKv1AdnKAqaeOugYo43 +5N3Ul9U7w0hKzX7PVeZoo5uyaBHvDFHPnCsOGpij5a+AzYK8zpDmFEe6Z2OO +FKd/20eEnKDW4/Ufo93myO6b52PoOYLiruM1Og3muP5V4MObLXaQubhjTXoj +YSdbmxaOHfBl27A/PzJHnV1iSf/y7WC0eumNomfmmPJ73UBJuB3U8hzLk+g0 +R//kupTPK+3A80zC/rlP5pg20i1t4m4LeXUH1zxYzsK/q8xGzs5awwqnrWwF +ERa+zk4a0hmwhoQBU+39Yiw8usyjuq/FGkKWztP1pFkoCDJlYUXWYOIcI1VM +YqHf5ZsmYY7W0D0U9SNZn4UZz6iRb6+tA2nhnewNW1gY8se9jr5zLZSsPRw7 +uZWFOw9/s3rkvhYMDmeuzfFi4aB5vfxBy7XgNFn5usePhbbJguE02bWQ0j37 +K2AnC8WV1uTtabKC+eJ4q9hEFj56NKw+TbaCPrOcztIyFna9MpNY/IwQsq+k +wL6chc/SczJVXyPMlVcFjVWyUJhxherTiCBB6/mpX83CWleq3fKLCOsFlZX+ +a2Chd8DTB9abEO53lQZ2vmYhiR1wIDQFwEHknnZMDwsdbsfmCgUA9Ng+m5N7 +y8L8Iw/bnwPATO23VO8BFjIOe4o1/rIA7ct6t7+OsvB9r4uF+24LuN9nGZMx +zsLj799cl9xgAQ5Sm0B3koXj3ya0ZjQtYMfxfR3Rsyz0rLDkJ31mwUxDSr7s +PAvPdUTKBD9mQdJCbkDtAgvLH8o+fnWFBWJGN7S2/yXW/9bod98kFlzaVTu7 +uMhCSeGq/eJ+LPgfH/u+LA== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VV8bB3BDZajM83AnF5GZcC/X81DGRBRJMstUkqSSMhQJSVQkRZIG +hXtvFPpFNAgVkVDJUCohhKTBe96/zvqsdc7ea+39fZ69D9V/t2sQHw8Pjzkv +D8//n3P9zx7R00ssEss+2DvarLPouiR30LInCRpN6/Lkz9MApV/6y/VkQ+tN +lRsTeQYQs/HmG/6eYqjz+NHdnmcF4hOy2b/ecEC5KvdYUZ4rfLjvtHvmTSOQ +Rk/X8OX5gw199P3Um1fQp3k57uLZKPj1xuTs5JshSDogckAqIwma1l4r6Sj+ +AYv1sdfuq+eA0oeaEX+tv9DfajMsI1YAUjt9bgqs5UeRDBOeBu1iyNa3qXNy +E8QDgXA7wasUevP0GqbEVqKum1fa8JcbkF4S/5JPXhzvikdNG2+8DQ5GoRLS +KuJI2zj1+7zXbRB85Oqmri2OIhd5GLMht+HYsOrb9ZbiaFGdsu5M4m2Io7WN +nAkVR6FvM77RnNsQUST3T61WHG1EW+7VSpSDSwFba/02Cfx69tinjc/LQfbM +8Imci5Ko9a5xk6J0Jcitrjo2XyqJIs4Z5Gn5SlBoTInfXimJl+L5XR+TKoE0 +qbFPvUkSR0yKvviuqgRVx0jfui+SyNzk17bTrBIMl/w1HjaUwuDRjslu30pw +jpb5aNAihau21QlNXa+Ejcu/9Od2SqFZpHvRptuV4Fpc0/vnnRQOSbuc5LAr +wb3d6+WT71Jo43wnJKi2ErZrXan1lJbGg/7X5AtbKyH8o+7pJF9pFHfGFf7j +lXB8s73FqzlpjFzHrlHRYYPCnRcKfLwyaJz6fj7QgA3lkpt/6i+XwbKBM+8u +G7Oh+5V35WmyDA7FumWJABvoLtE0FzsZPJTpUcR1ZkPjhsJl7edlUC1vFU0r +kg1/bWZfPDeXxZWD1UKvb7MhqzS27K+NLEY5LmxNYxPfL+NJ1XaRRZfQB7Zm +VWxwfCxseTJIFh9E+/w+dZ8N+WspXMdMWTwVfbxhSSsbTHF9busHWUzW3XxH +8TMb9jIu+zxLksMiuXTtRUUOOBSJzKzPkMPjgYLx0yQO0ATiUl+clcNDrPX/ +BqkcaO9yZ3del8PBd4kpVeoc0Ilcwd//Qg4/il9q0DHkwJfS/aXTCvJolW/0 +M9SeA15STuOKXHkUD/2TuWQvBwwP1SVeui+Phyu9Bw7v44Dw0CoZ6hN5tNzP +G/RjPwdqKvhBrVceo6pWCnXGcUBmfU2W3qI8DgncagpMIeZPpBtZr1fAwIID +Vq/yOLDu+0JsxLAC7tydduVNLQcO2p3RfDimgPZD3l+e3+dA+WXtPsk5Bew1 +P5DV8IADcpt9GTWCihjctmTFhUYOjN17/JNfRxGFq07X0Vs4kJOUFX3+gCIa +GiR6pPdwoPmtBn0sURGz71jw2fVx4I9RU6dFuiI26kxI877jwI7PswYfLyri +2YczcSEfOMB03Dal06SIL03Pu68Y4cCQtFrEo5VKGDt4+sr1aQ7I7q5XlpVV +wjtPQFVrhgOOzR7PQylKuK/6itytWQ5Ux6ZriRoqYahGifvleQ6kfZgc3eqh +hKerfCz8/nHA4EZd8PdiJfxVOmdsIsSFYD43WatbShjt3SWVJMyFgm0TT85U +KaHbDbNdz5ZzYZkIVY3ZrIRhpjxZG0S40BeV8vHYuBKO+C0vXy3JhURzFz8F +U2WkL+3sAiUu2HlfmjaxUsYvKj+7Q5W5IJLw7aibozL6vDtRf4pEjN+UXJrl +q4x9aU62LylcuOdQ+23ZCWXcOvnVTlmVC/E7BQ7Tc5SRaSFyTk2NCzaZm0Ws +LiqjVHl4+2p1LnR1TOgdZitjgJKLmKYGFyY9VGJ+9Cqj6FD661ktLtyNjRQQ +/6iMz8PWXO3X5sKRgv/ydCaUUTGQEdqkw4UVA1vqQvlIOFG90JGgxwX14Aye +AU0SavtuwlZDLkyk9p7+a0TChvy7bTlGXLhzU01FEUi4jzO22WMNF6wmGqzd +N5Hw97mLXq+NueC9bzat7RAJQ0t0AwsZXFDNtVIaTSbhvLj6qC2TS+Tj1G2B +LBKuM67ZO0Y49o9Gu1UJCadmbp7VMOfC2aPe0jVtJGy6Mq8XbcEFr6tlpd3d +JIzVnPr+hzDt6bzJzAAJ7WcLaxOBC5XCOZ66syRU/me9Px650Hb6aeFVZTK+ ++cdTtt6KCzlcKf0mdTKm8E9+vEPY87Vf44A+GSltPIYKa7nwRe7PR0UbMto3 +don2Eq5g2scwNpJxKuVhkcE6LsR4nRPY4knGj2YqDqmE+Yv0NLMjyNg2fXVU +3ZoLLQ8P11UcIKOx0cLwHsJZwy2Oz5PIKDGssXCX8Jalcv2jGWTcV+Cis0CY +pB60WzCXjLPapxJNbbjwyY7Do3aZjPfP8M5GEb4Vtnh6bRkZL/1pPnGDMLP8 +/J0j9WR84f9ecbktF9a9efF3opmMOk9ubDUk7MSzxNbnFRl36b029yDsocHI +evmWjE93OD05SDjANaIXPpHxmejSn7mEIw5doVVOkPEW5+tLDuEDJT3hlHky +VlSPu7QQfjiS4tnMQ8Egf/4j/YRtDlHjE5ZSUPKtstt3wq2i96+YClNQmK7f +84fwxhL35kkRCv5UNhAUsONCt+nU2HVJCpqlyIysJLztebq4nxwFree6osQJ +D/ipGcsrU3BoKLDi/94x1+DZQaVgwYUHBSKEv6Vtiz+hRkFeh7dmgoQjyXNX +LFdTcOnUnZP/iPlmuVnNv3Qp6LrTJmeKcKzd6nG2EQUv7U7fMEiY5/1j8TAG +BX8nJ/z3nHDyHl9jmgUF9cRVPlYTFl7227PPioKi9nsaCwhn5Z+Nz7alYCMz +bGs8YWldvRIHRwqqNK+86U04v6mlmc+FgiuveVUxCZM9gsZr3SjI9fWIkyRc +MrYovteTghMb+Xm+EvulmZhvvNqHgqev+lrWEa6QXrNtOICC9dujLdMIG918 +GX8hhIKm9mt53QnXWoSVbNpFwXKBzkQS4UfBheNNMRT8c9z52VUiL/Z/GBJx +hyjYmr0+O5Dwi6wuY6MECuryqlMohHtrhBJKTlCQEXol8ySRT2+nkhKvTAoq +innuAcIfhyyeSeUQ67tXUXmCyPfE8miJ5AIKhh6a7rQkvLdIxIR1mYJGivTB +EaI+5o1ubJu9SkGrXXl1qYT5vftLgiqI9WafeNdoyQW5SjsTm0YKNlcdHhMj +6u3iuuFt/54Q+YgoTywg6pHWezihupWC/F+rx+iEtfm4z9ReU7BK/bqdFlG/ +VpuVvQS+UBA6S4yliXp/+uVuQv0YBX281M8fN+OC42HXq/unKKgta9s3R/SH +LaXHJz4vUHDh84s/rUQ/2Tk/ldC8kop7tSyGNpoQ9bFnh8yIBBV1pWiMAqL/ +CI72lfHLUbEjd/n4MNGfrr5t6ragUbFVv2pPCNG/+h+c1aoypmLNQV5ZG30u +OCczei77UFHz8wV5N02iPv/d3lUfSMWX80smdxD9dCyGxv8+lIrtL38x963i +QmrIch25aCoeVDphdJzoxw3r3x/NTKWi5erEgQQaFwwkEnUPsanYR+uPbJMn +8pg++yivmooQSrcplSP2jz/Ms7qOiiNKwdfjZLkQPuuaPPWYGM9PSYEsTeSp +h/42uI+Kd5JF+5liXJApbE7ZzE9D42lZ+5dLufBrtVi/thsNJbZVv4+Z4MDc +RYVEQ08axt2VeTw2xoEZUVU6w4eGD6dH03y+cWDiByNsXSgNQ7r075l9Ic7P +uoA5z8M0vJSl//jFIAda1t8VSb1Kw4WL3cJ+XRzID/eGoVnifXPpaMu7HMh9 +HzL0eYGGn2L0LdyrOHDGeW/y+CINgXeZQgiXA5mGqa3zQirYZhm88mgFB5J+ +s7eIklSw4YmE+LlrHAhPXxppbqOCwy78//RzOWBedqvo3DkVXKowILshmgNv +KWWF1hdUUDj+bb5OFAdiz924NFOogp3xV+pXRnLgbmJpgesNFeT3V5p5FE6c +1x5FeSL3VfCcjYeubAAHNJaeyUoZVEGVZRqqji7E/cbnUEKMFh0piyde8Gpx +YErCwde9kY4hHo/HRvvY0LOT1h72lI7tf9UElvWwoeHJAsS30VHDpLSR9Jq4 +D8aWka9303HzLWe6/Us26A2t+PBrlI7FlucfJzaxIYL9cvtFSVV8z5xWOFbG +hlFnt20fA1VxnG4y2XuQDR8zfN2jBNQw3qL+gr4YG+y/77f/ZKyOBbofr6mb +VMJYgODeO/GrUOfhKa2Y0HLif0SW73ijBhZGSn1td7wFEs/VMiu/a+JCyNyL +cKuboJRasdHYWAvjvwVl8y25DnmrGWKSwdqY29s33DR+FVoULNf8OK2DUzcr +O5q/XQGmUmOWbrcuGjgecUtpvwwi/MXRfkl66L2thes4UAikRLL5VjV9zCne +s6RGuACEVL2qXZ/qo4hFbERxWh7osOQr9m83wNh3s/1Ox89CVL9EkwOPIXZl +6i9EpmfD9x8ZbvZ5hijkdaFkaFkW2Oo+ybfXNsL03OoSz4J0ePDD7PfPF0Yo +NakzWOd6HCK0DPo6gtbgheduq2LajgJrIrBrq5AxMiTNrY7EJIA1XW7DymJj +/Hn1BDnixCFYlZB2oNHEBNVvVVBn52NAM4hRr9pngiJH3wysq4+CUzSnhaPv +TPCCwq6ujsoomPngv2ao3wQ37zhJDimOggeeGWWXhk1wTKXvZmVyFLhu/JAr +O26Cg8W1CmzHKDholhwpxEPc2ou3poW/2wPN4h3UcVVTHAq4S73OtweCHoQc +u7PHFO9eVy4teBUBE7tG91tHm6KxzDYpiXsRcEB5Z3h3jClu0KJ/y78YAWlx +u13nD5libWLGtZGQCKhkxlDMU0yxQfu6XhBPBPypPnq/Kd8UD1ZPG84a7ILs +ikszr5pM8QJzYZlsaTjUF3UFTkkzkCaZq6TYGAIDjlSfGDkGkjPDrxy5FQI8 +v3Zt/a3AQHmdQZ/pcyFg5SLgtJTCQA2pvk3CO0PgCS/TRF6TgbzWbeTfMiHQ +5l8oZGnBwC8xZ0V7dgdDHz2sPGsHA/e6OGhYaO+AmeuLP3XvMtB/IkrsflcA +jLjbFJ2oYWAunfZA5lEA9Cw5aTdcx8D/KEtOHuYGQJ2vwvlzDQxUVtWI2p0d +AElya5h/nzFQmvffmeGNASCWGhbX8o6BK+NJygLt/qAV/JoniI+JA73tdcJv +/CBAtUwofwMT+ZJeZKcu84XYx95hahuZGGc4uUP2uw9kBUm0clyZeG/PkjXG +HT5w/+rBjNYtTNwrOr3mv7M+IKVmJ/rXj4nJB//xfif7wBO1T1K+MUwMYWvk +dJp6g+YqMkWtkIm3Tc/k6MV5wZRmjjFnkonphVUBHdZboacNrSV/MHEqpt5C +UXcrNERMbIqeZWIXDpH3y22FTI79HuMFJkpH/34U+M0DNJk8t2r5zVDUNNxZ +JtsD/O13UZtkzLCn/DypeWgLdAXbrugyN8NP9xszpU+7w72S34OzqWaYQsp+ +MkDaDMZro386pJvhCtbQ9ooVm6FqcGxF0UkzvHiLey5jYRNwSP0mDtlm+EDP +9HFU9ya4lddw8tIFMxz9GsY7nrkJijKSGbblZii5/EZAFt8mOBEtejqv0wzf +37nJcJ5xAc91KmhGMsfhJTFPcdEZ/nYJijRRzDFL2OKv1AdnKAqaeOugYo43 +5N3Ul9U7w0hKzX7PVeZoo5uyaBHvDFHPnCsOGpij5a+AzYK8zpDmFEe6Z2OO +FKd/20eEnKDW4/Ufo93myO6b52PoOYLiruM1Og3muP5V4MObLXaQubhjTXoj +YSdbmxaOHfBl27A/PzJHnV1iSf/y7WC0eumNomfmmPJ73UBJuB3U8hzLk+g0 +R//kupTPK+3A80zC/rlP5pg20i1t4m4LeXUH1zxYzsK/q8xGzs5awwqnrWwF +ERa+zk4a0hmwhoQBU+39Yiw8usyjuq/FGkKWztP1pFkoCDJlYUXWYOIcI1VM +YqHf5ZsmYY7W0D0U9SNZn4UZz6iRb6+tA2nhnewNW1gY8se9jr5zLZSsPRw7 +uZWFOw9/s3rkvhYMDmeuzfFi4aB5vfxBy7XgNFn5usePhbbJguE02bWQ0j37 +K2AnC8WV1uTtabKC+eJ4q9hEFj56NKw+TbaCPrOcztIyFna9MpNY/IwQsq+k +wL6chc/SczJVXyPMlVcFjVWyUJhxherTiCBB6/mpX83CWleq3fKLCOsFlZX+ +a2Chd8DTB9abEO53lQZ2vmYhiR1wIDQFwEHknnZMDwsdbsfmCgUA9Ng+m5N7 +y8L8Iw/bnwPATO23VO8BFjIOe4o1/rIA7ct6t7+OsvB9r4uF+24LuN9nGZMx +zsLj799cl9xgAQ5Sm0B3koXj3ya0ZjQtYMfxfR3Rsyz0rLDkJ31mwUxDSr7s +PAvPdUTKBD9mQdJCbkDtAgvLH8o+fnWFBWJGN7S2/yXW/9bod98kFlzaVTu7 +uMhCSeGq/eJ+LPgfH/u+LA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07531843692857934}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07531843692857934}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0VV8bB3BDZajM83AnF5GZcC/X81DGRBRJMstUkqSSMhQJSVQkRZIG +hXtvFPpFNAgVkVDJUCohhKTBe96/zvqsdc7ea+39fZ69D9V/t2sQHw8Pjzkv +D8//n3P9zx7R00ssEss+2DvarLPouiR30LInCRpN6/Lkz9MApV/6y/VkQ+tN +lRsTeQYQs/HmG/6eYqjz+NHdnmcF4hOy2b/ecEC5KvdYUZ4rfLjvtHvmTSOQ +Rk/X8OX5gw199P3Um1fQp3k57uLZKPj1xuTs5JshSDogckAqIwma1l4r6Sj+ +AYv1sdfuq+eA0oeaEX+tv9DfajMsI1YAUjt9bgqs5UeRDBOeBu1iyNa3qXNy +E8QDgXA7wasUevP0GqbEVqKum1fa8JcbkF4S/5JPXhzvikdNG2+8DQ5GoRLS +KuJI2zj1+7zXbRB85Oqmri2OIhd5GLMht+HYsOrb9ZbiaFGdsu5M4m2Io7WN +nAkVR6FvM77RnNsQUST3T61WHG1EW+7VSpSDSwFba/02Cfx69tinjc/LQfbM +8Imci5Ko9a5xk6J0Jcitrjo2XyqJIs4Z5Gn5SlBoTInfXimJl+L5XR+TKoE0 +qbFPvUkSR0yKvviuqgRVx0jfui+SyNzk17bTrBIMl/w1HjaUwuDRjslu30pw +jpb5aNAihau21QlNXa+Ejcu/9Od2SqFZpHvRptuV4Fpc0/vnnRQOSbuc5LAr +wb3d6+WT71Jo43wnJKi2ErZrXan1lJbGg/7X5AtbKyH8o+7pJF9pFHfGFf7j +lXB8s73FqzlpjFzHrlHRYYPCnRcKfLwyaJz6fj7QgA3lkpt/6i+XwbKBM+8u +G7Oh+5V35WmyDA7FumWJABvoLtE0FzsZPJTpUcR1ZkPjhsJl7edlUC1vFU0r +kg1/bWZfPDeXxZWD1UKvb7MhqzS27K+NLEY5LmxNYxPfL+NJ1XaRRZfQB7Zm +VWxwfCxseTJIFh9E+/w+dZ8N+WspXMdMWTwVfbxhSSsbTHF9busHWUzW3XxH +8TMb9jIu+zxLksMiuXTtRUUOOBSJzKzPkMPjgYLx0yQO0ATiUl+clcNDrPX/ +BqkcaO9yZ3del8PBd4kpVeoc0Ilcwd//Qg4/il9q0DHkwJfS/aXTCvJolW/0 +M9SeA15STuOKXHkUD/2TuWQvBwwP1SVeui+Phyu9Bw7v44Dw0CoZ6hN5tNzP +G/RjPwdqKvhBrVceo6pWCnXGcUBmfU2W3qI8DgncagpMIeZPpBtZr1fAwIID +Vq/yOLDu+0JsxLAC7tydduVNLQcO2p3RfDimgPZD3l+e3+dA+WXtPsk5Bew1 +P5DV8IADcpt9GTWCihjctmTFhUYOjN17/JNfRxGFq07X0Vs4kJOUFX3+gCIa +GiR6pPdwoPmtBn0sURGz71jw2fVx4I9RU6dFuiI26kxI877jwI7PswYfLyri +2YczcSEfOMB03Dal06SIL03Pu68Y4cCQtFrEo5VKGDt4+sr1aQ7I7q5XlpVV +wjtPQFVrhgOOzR7PQylKuK/6itytWQ5Ux6ZriRoqYahGifvleQ6kfZgc3eqh +hKerfCz8/nHA4EZd8PdiJfxVOmdsIsSFYD43WatbShjt3SWVJMyFgm0TT85U +KaHbDbNdz5ZzYZkIVY3ZrIRhpjxZG0S40BeV8vHYuBKO+C0vXy3JhURzFz8F +U2WkL+3sAiUu2HlfmjaxUsYvKj+7Q5W5IJLw7aibozL6vDtRf4pEjN+UXJrl +q4x9aU62LylcuOdQ+23ZCWXcOvnVTlmVC/E7BQ7Tc5SRaSFyTk2NCzaZm0Ws +LiqjVHl4+2p1LnR1TOgdZitjgJKLmKYGFyY9VGJ+9Cqj6FD661ktLtyNjRQQ +/6iMz8PWXO3X5sKRgv/ydCaUUTGQEdqkw4UVA1vqQvlIOFG90JGgxwX14Aye +AU0SavtuwlZDLkyk9p7+a0TChvy7bTlGXLhzU01FEUi4jzO22WMNF6wmGqzd +N5Hw97mLXq+NueC9bzat7RAJQ0t0AwsZXFDNtVIaTSbhvLj6qC2TS+Tj1G2B +LBKuM67ZO0Y49o9Gu1UJCadmbp7VMOfC2aPe0jVtJGy6Mq8XbcEFr6tlpd3d +JIzVnPr+hzDt6bzJzAAJ7WcLaxOBC5XCOZ66syRU/me9Px650Hb6aeFVZTK+ ++cdTtt6KCzlcKf0mdTKm8E9+vEPY87Vf44A+GSltPIYKa7nwRe7PR0UbMto3 +don2Eq5g2scwNpJxKuVhkcE6LsR4nRPY4knGj2YqDqmE+Yv0NLMjyNg2fXVU +3ZoLLQ8P11UcIKOx0cLwHsJZwy2Oz5PIKDGssXCX8Jalcv2jGWTcV+Cis0CY +pB60WzCXjLPapxJNbbjwyY7Do3aZjPfP8M5GEb4Vtnh6bRkZL/1pPnGDMLP8 +/J0j9WR84f9ecbktF9a9efF3opmMOk9ubDUk7MSzxNbnFRl36b029yDsocHI +evmWjE93OD05SDjANaIXPpHxmejSn7mEIw5doVVOkPEW5+tLDuEDJT3hlHky +VlSPu7QQfjiS4tnMQ8Egf/4j/YRtDlHjE5ZSUPKtstt3wq2i96+YClNQmK7f +84fwxhL35kkRCv5UNhAUsONCt+nU2HVJCpqlyIysJLztebq4nxwFree6osQJ +D/ipGcsrU3BoKLDi/94x1+DZQaVgwYUHBSKEv6Vtiz+hRkFeh7dmgoQjyXNX +LFdTcOnUnZP/iPlmuVnNv3Qp6LrTJmeKcKzd6nG2EQUv7U7fMEiY5/1j8TAG +BX8nJ/z3nHDyHl9jmgUF9cRVPlYTFl7227PPioKi9nsaCwhn5Z+Nz7alYCMz +bGs8YWldvRIHRwqqNK+86U04v6mlmc+FgiuveVUxCZM9gsZr3SjI9fWIkyRc +MrYovteTghMb+Xm+EvulmZhvvNqHgqev+lrWEa6QXrNtOICC9dujLdMIG918 +GX8hhIKm9mt53QnXWoSVbNpFwXKBzkQS4UfBheNNMRT8c9z52VUiL/Z/GBJx +hyjYmr0+O5Dwi6wuY6MECuryqlMohHtrhBJKTlCQEXol8ySRT2+nkhKvTAoq +innuAcIfhyyeSeUQ67tXUXmCyPfE8miJ5AIKhh6a7rQkvLdIxIR1mYJGivTB +EaI+5o1ubJu9SkGrXXl1qYT5vftLgiqI9WafeNdoyQW5SjsTm0YKNlcdHhMj +6u3iuuFt/54Q+YgoTywg6pHWezihupWC/F+rx+iEtfm4z9ReU7BK/bqdFlG/ +VpuVvQS+UBA6S4yliXp/+uVuQv0YBX281M8fN+OC42HXq/unKKgta9s3R/SH +LaXHJz4vUHDh84s/rUQ/2Tk/ldC8kop7tSyGNpoQ9bFnh8yIBBV1pWiMAqL/ +CI72lfHLUbEjd/n4MNGfrr5t6ragUbFVv2pPCNG/+h+c1aoypmLNQV5ZG30u +OCczei77UFHz8wV5N02iPv/d3lUfSMWX80smdxD9dCyGxv8+lIrtL38x963i +QmrIch25aCoeVDphdJzoxw3r3x/NTKWi5erEgQQaFwwkEnUPsanYR+uPbJMn +8pg++yivmooQSrcplSP2jz/Ms7qOiiNKwdfjZLkQPuuaPPWYGM9PSYEsTeSp +h/42uI+Kd5JF+5liXJApbE7ZzE9D42lZ+5dLufBrtVi/thsNJbZVv4+Z4MDc +RYVEQ08axt2VeTw2xoEZUVU6w4eGD6dH03y+cWDiByNsXSgNQ7r075l9Ic7P +uoA5z8M0vJSl//jFIAda1t8VSb1Kw4WL3cJ+XRzID/eGoVnifXPpaMu7HMh9 +HzL0eYGGn2L0LdyrOHDGeW/y+CINgXeZQgiXA5mGqa3zQirYZhm88mgFB5J+ +s7eIklSw4YmE+LlrHAhPXxppbqOCwy78//RzOWBedqvo3DkVXKowILshmgNv +KWWF1hdUUDj+bb5OFAdiz924NFOogp3xV+pXRnLgbmJpgesNFeT3V5p5FE6c +1x5FeSL3VfCcjYeubAAHNJaeyUoZVEGVZRqqji7E/cbnUEKMFh0piyde8Gpx +YErCwde9kY4hHo/HRvvY0LOT1h72lI7tf9UElvWwoeHJAsS30VHDpLSR9Jq4 +D8aWka9303HzLWe6/Us26A2t+PBrlI7FlucfJzaxIYL9cvtFSVV8z5xWOFbG +hlFnt20fA1VxnG4y2XuQDR8zfN2jBNQw3qL+gr4YG+y/77f/ZKyOBbofr6mb +VMJYgODeO/GrUOfhKa2Y0HLif0SW73ijBhZGSn1td7wFEs/VMiu/a+JCyNyL +cKuboJRasdHYWAvjvwVl8y25DnmrGWKSwdqY29s33DR+FVoULNf8OK2DUzcr +O5q/XQGmUmOWbrcuGjgecUtpvwwi/MXRfkl66L2thes4UAikRLL5VjV9zCne +s6RGuACEVL2qXZ/qo4hFbERxWh7osOQr9m83wNh3s/1Ox89CVL9EkwOPIXZl +6i9EpmfD9x8ZbvZ5hijkdaFkaFkW2Oo+ybfXNsL03OoSz4J0ePDD7PfPF0Yo +NakzWOd6HCK0DPo6gtbgheduq2LajgJrIrBrq5AxMiTNrY7EJIA1XW7DymJj +/Hn1BDnixCFYlZB2oNHEBNVvVVBn52NAM4hRr9pngiJH3wysq4+CUzSnhaPv +TPCCwq6ujsoomPngv2ao3wQ37zhJDimOggeeGWWXhk1wTKXvZmVyFLhu/JAr +O26Cg8W1CmzHKDholhwpxEPc2ou3poW/2wPN4h3UcVVTHAq4S73OtweCHoQc +u7PHFO9eVy4teBUBE7tG91tHm6KxzDYpiXsRcEB5Z3h3jClu0KJ/y78YAWlx +u13nD5libWLGtZGQCKhkxlDMU0yxQfu6XhBPBPypPnq/Kd8UD1ZPG84a7ILs +ikszr5pM8QJzYZlsaTjUF3UFTkkzkCaZq6TYGAIDjlSfGDkGkjPDrxy5FQI8 +v3Zt/a3AQHmdQZ/pcyFg5SLgtJTCQA2pvk3CO0PgCS/TRF6TgbzWbeTfMiHQ +5l8oZGnBwC8xZ0V7dgdDHz2sPGsHA/e6OGhYaO+AmeuLP3XvMtB/IkrsflcA +jLjbFJ2oYWAunfZA5lEA9Cw5aTdcx8D/KEtOHuYGQJ2vwvlzDQxUVtWI2p0d +AElya5h/nzFQmvffmeGNASCWGhbX8o6BK+NJygLt/qAV/JoniI+JA73tdcJv +/CBAtUwofwMT+ZJeZKcu84XYx95hahuZGGc4uUP2uw9kBUm0clyZeG/PkjXG +HT5w/+rBjNYtTNwrOr3mv7M+IKVmJ/rXj4nJB//xfif7wBO1T1K+MUwMYWvk +dJp6g+YqMkWtkIm3Tc/k6MV5wZRmjjFnkonphVUBHdZboacNrSV/MHEqpt5C +UXcrNERMbIqeZWIXDpH3y22FTI79HuMFJkpH/34U+M0DNJk8t2r5zVDUNNxZ +JtsD/O13UZtkzLCn/DypeWgLdAXbrugyN8NP9xszpU+7w72S34OzqWaYQsp+ +MkDaDMZro386pJvhCtbQ9ooVm6FqcGxF0UkzvHiLey5jYRNwSP0mDtlm+EDP +9HFU9ya4lddw8tIFMxz9GsY7nrkJijKSGbblZii5/EZAFt8mOBEtejqv0wzf +37nJcJ5xAc91KmhGMsfhJTFPcdEZ/nYJijRRzDFL2OKv1AdnKAqaeOugYo43 +5N3Ul9U7w0hKzX7PVeZoo5uyaBHvDFHPnCsOGpij5a+AzYK8zpDmFEe6Z2OO +FKd/20eEnKDW4/Ufo93myO6b52PoOYLiruM1Og3muP5V4MObLXaQubhjTXoj +YSdbmxaOHfBl27A/PzJHnV1iSf/y7WC0eumNomfmmPJ73UBJuB3U8hzLk+g0 +R//kupTPK+3A80zC/rlP5pg20i1t4m4LeXUH1zxYzsK/q8xGzs5awwqnrWwF +ERa+zk4a0hmwhoQBU+39Yiw8usyjuq/FGkKWztP1pFkoCDJlYUXWYOIcI1VM +YqHf5ZsmYY7W0D0U9SNZn4UZz6iRb6+tA2nhnewNW1gY8se9jr5zLZSsPRw7 +uZWFOw9/s3rkvhYMDmeuzfFi4aB5vfxBy7XgNFn5usePhbbJguE02bWQ0j37 +K2AnC8WV1uTtabKC+eJ4q9hEFj56NKw+TbaCPrOcztIyFna9MpNY/IwQsq+k +wL6chc/SczJVXyPMlVcFjVWyUJhxherTiCBB6/mpX83CWleq3fKLCOsFlZX+ +a2Chd8DTB9abEO53lQZ2vmYhiR1wIDQFwEHknnZMDwsdbsfmCgUA9Ng+m5N7 +y8L8Iw/bnwPATO23VO8BFjIOe4o1/rIA7ct6t7+OsvB9r4uF+24LuN9nGZMx +zsLj799cl9xgAQ5Sm0B3koXj3ya0ZjQtYMfxfR3Rsyz0rLDkJ31mwUxDSr7s +PAvPdUTKBD9mQdJCbkDtAgvLH8o+fnWFBWJGN7S2/yXW/9bod98kFlzaVTu7 +uMhCSeGq/eJ+LPgfH/u+LA== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07531843692857934}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07531843692857934}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994389424837562*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"41ba93ce-4355-4c8f-9be7-cb08f0c72ae2"] +}, Open ]], Cell[CellGroupData[{ @@ -13834,66 +15084,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[225]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], + "In[142]:=",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.5794624625701512`*^-174\\\", \ -\\\"18274627092335829218864095445902180793856136322602419837579292998750581286\ -734132469439962976751467383679745821507584000000000000000000000000\\\"]\\) is \ -too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 225, 201, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512859148*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.9612368060048046`*^-157\\\", \ +RowBox[{\\\"\ +164243120455479739170682508554789627978361849045564433400431439697434\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3832218553116351696319446492554724542670438400000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 73, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994389424865011*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], +In[142]:=",ExpressionUUID->"1144d42a-2b6f-4c1d-a2e9-a0179716ad84"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.303016475329449`*^-178\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 225, 202, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512868147*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.313230198656396`*^-160\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 74, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994389424869116*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], +In[142]:=",ExpressionUUID->"a258c42b-957d-468c-bbcc-25e30bcbec49"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.3647813242367804`*^-181\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 225, 203, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335128761463`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.533319012741084`*^-163\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 75, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.994389424873707*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], +In[142]:=",ExpressionUUID->"c1bb295b-42b9-4f42-b363-22dc6ec63f3f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 225, 204, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333512885145*^9}, +during this calculation.\"", 2, 142, 76, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991333512859148*^9, 3.9943894248769703`*^9}, CellLabel-> "During evaluation of \ -In[225]:=",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], +In[142]:=",ExpressionUUID->"f002f565-a3eb-4a69-a329-3813e8292391"], -Cell[BoxData["9.779568499633264`"], "Output", - CellChangeTimes->{3.9913335200445786`*^9}, +Cell[BoxData["9.806472110750484`"], "Output", + CellChangeTimes->{3.9913335200445786`*^9, 3.9943894556541147`*^9}, CellLabel-> - "Out[225]=",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] + "Out[142]=",ExpressionUUID->"12749815-eafe-4d12-8fc9-6fcb98d4c70f"] }, Open ]], Cell[CellGroupData[{ @@ -13960,68 +15220,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491385551624`*^9, - 3.991849142620474*^9}},ExpressionUUID->"f2835c98-560f-8e47-bdab-\ -0d2700971836"], + CellChangeTimes->{{3.9918491385551624`*^9, 3.991849142620474*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.88658278748316`*^-204\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 143, 77, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994389455687139*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"0c85ac3b-8837-4cf2-94a4-aa4fdf446eff"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4824605857550484`*^-208\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 226, 205, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200775414`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 143, 78, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.9943894556932077`*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], +In[143]:=",ExpressionUUID->"c9914488-ae71-463c-8559-a094b22c4907"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.4973951816523376`*^-213\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 206, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200875454`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 143, + 79, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994389455698325*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 226, - 207, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335200945435`*^9}, - CellLabel-> - "During evaluation of \ -In[226]:=",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], +In[143]:=",ExpressionUUID->"675c9d14-aa70-4e0f-8b5d-6dd800c18a16"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 226, 208, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335201035423`*^9}, +during this calculation.\"", 2, 143, 80, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335200775414`*^9, 3.994389455703436*^9}, CellLabel-> "During evaluation of \ -In[226]:=",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], +In[143]:=",ExpressionUUID->"fa86ff06-c86c-492d-a465-b4b1f6db3004"], -Cell[BoxData["0.7348275136088338`"], "Output", - CellChangeTimes->{3.9913335271231823`*^9}, +Cell[BoxData["0.8115221050956093`"], "Output", + CellChangeTimes->{3.9913335271231823`*^9, 3.994389459982431*^9}, CellLabel-> - "Out[226]=",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] + "Out[143]=",ExpressionUUID->"b4b622c4-27b9-4f70-960a-c6d8e86ce927"] }, Open ]], Cell[CellGroupData[{ @@ -14042,8 +15306,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14088,68 +15351,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991849146408966*^9, - 3.9918491485488663`*^9}},ExpressionUUID->"ca837916-250f-4d4e-8368-\ -5a08f479e656"], + CellChangeTimes->{{3.991849146408966*^9, 3.9918491485488663`*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.88658278748316`*^-204\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 144, 81, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.99438946000921*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"59c0455e-1e00-47f6-8465-c7207ef2c3b4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4824605857550484`*^-208\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 227, 209, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271591835`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 144, 82, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994389460014204*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], +In[144]:=",ExpressionUUID->"ed9b2cea-f42a-4c0e-bf83-36ca314a21a8"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.4973951816523376`*^-213\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 210, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335271681843`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 144, + 83, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.9943894600188417`*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 227, - 211, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527176182*^9}, - CellLabel-> - "During evaluation of \ -In[227]:=",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], +In[144]:=",ExpressionUUID->"7284e09a-f3df-4e06-8285-8c4246789940"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 227, 212, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333527184183*^9}, +during this calculation.\"", 2, 144, 84, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335271591835`*^9, 3.994389460022423*^9}, CellLabel-> "During evaluation of \ -In[227]:=",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], +In[144]:=",ExpressionUUID->"c885d27b-7fad-4749-ad45-315b9fa5c716"], -Cell[BoxData["5.221864211842707`"], "Output", - CellChangeTimes->{3.9913335331581306`*^9}, +Cell[BoxData["27.833392372969858`"], "Output", + CellChangeTimes->{3.9913335331581306`*^9, 3.9943894643511343`*^9}, CellLabel-> - "Out[227]=",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] + "Out[144]=",ExpressionUUID->"74f354e2-e416-4e55-892e-7f6b499feb51"] }, Open ]], Cell[CellGroupData[{ @@ -14170,8 +15437,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14216,68 +15482,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918491518098984`*^9, - 3.9918491543107758`*^9}},ExpressionUUID->"b579991f-985b-234a-94aa-\ -ed18c097f8c0"], + CellChangeTimes->{{3.9918491518098984`*^9, 3.9918491543107758`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.431742058031866`*^-195\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.88658278748316`*^-204\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 145, 85, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.9943894643816023`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"38dcd712-3be5-457e-bafe-62bba0deba39"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.4824605857550484`*^-208\\\", \ \\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ 098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ -as a normalized machine number; precision may be lost.\"", 2, 228, 213, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335331923027`*^9}, +as a normalized machine number; precision may be lost.\"", 2, 145, 86, + 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994389464388125*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], +In[145]:=",ExpressionUUID->"1af69c63-500b-4b02-8559-10ee9b5871f0"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.710159783996166`*^-199\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.4973951816523376`*^-213\\\", \ \\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ 358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 214, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533202278*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 145, + 87, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.994389464393272*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.457041610992806`*^-203\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 228, - 215, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913335332102795`*^9}, - CellLabel-> - "During evaluation of \ -In[228]:=",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], +In[145]:=",ExpressionUUID->"cd0e478a-0c6d-498e-8d51-465a0edc2079"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 228, 216, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991333533218281*^9}, +during this calculation.\"", 2, 145, 88, 25994214434920170334, "kernel 5"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913335331923027`*^9, 3.9943894643977413`*^9}, CellLabel-> "During evaluation of \ -In[228]:=",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], +In[145]:=",ExpressionUUID->"bcee7b82-e5ce-4087-8291-9a7133d0198b"], -Cell[BoxData["15.545902834190647`"], "Output", - CellChangeTimes->{3.9913335366055527`*^9}, +Cell[BoxData["4.851861308369967`"], "Output", + CellChangeTimes->{3.9913335366055527`*^9, 3.9943894668873262`*^9}, CellLabel-> - "Out[228]=",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] + "Out[145]=",ExpressionUUID->"16354656-1ad0-47c4-be71-c2872e68764c"] }, Open ]], Cell[CellGroupData[{ @@ -14286,21 +15556,24 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918491594691143`*^9, - 3.9918491632611027`*^9}},ExpressionUUID->"afb7855c-8700-d444-926c-\ -6d96abe14e67"], - -Cell[BoxData["0.08155763943441016`"], "Output", - CellChangeTimes->{3.9913335366395893`*^9}, + CellChangeTimes->{{3.9918491594691143`*^9, 3.9918491632611027`*^9}}, CellLabel-> - "Out[229]=",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] + "In[146]:=",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], + +Cell[BoxData["0.06983338503637107`"], "Output", + CellChangeTimes->{3.9913335366395893`*^9, 3.994389466911141*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"bd3493c7-db2d-4ab9-93f1-75e312649339"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"1f55205b-efe5-4a7b-b8d6-2a9b139a8bcd"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"1f55205b-efe5-4a7b-b8d6-2a9b139a8bcd"] }, -WindowSize->{714, 876}, -WindowMargins->{{-3, Automatic}, {3, Automatic}}, +Evaluator->"kernel 5", +WindowSize->{714, 126}, +WindowMargins->{{Automatic, 3}, {3, Automatic}}, CellContext->Notebook, Magnification:>1. Inherited, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", @@ -14319,622 +15592,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 354, 7, 36, "Input",ExpressionUUID->"c2303b07-bc1f-4c0b-99bd-0a177158c28a"], -Cell[933, 31, 260, 5, 41, "Output",ExpressionUUID->"2535f57e-bf26-4668-82db-56fbf445e27d"] +Cell[576, 22, 349, 6, 29, "Input",ExpressionUUID->"c2303b07-bc1f-4c0b-99bd-0a177158c28a"], +Cell[928, 30, 277, 4, 33, "Output",ExpressionUUID->"4d3299b7-4395-49c8-8135-35c618728f2f"] }, Open ]], Cell[CellGroupData[{ -Cell[1230, 41, 253, 5, 36, "Input",ExpressionUUID->"c76bbb61-80e8-4e41-aa3e-045340802fcf"], -Cell[1486, 48, 260, 5, 41, "Output",ExpressionUUID->"b384378e-12c0-49e3-bc75-3a3a5c75e7a2"] +Cell[1242, 39, 248, 4, 29, "Input",ExpressionUUID->"c76bbb61-80e8-4e41-aa3e-045340802fcf"], +Cell[1493, 45, 279, 4, 33, "Output",ExpressionUUID->"39269716-2ece-4080-ac0d-f668378b6205"] }, Open ]], Cell[CellGroupData[{ -Cell[1783, 58, 226, 5, 36, "Input",ExpressionUUID->"4dccf315-b74a-468f-8cc9-292e02e2be1d"], -Cell[2012, 65, 260, 5, 41, "Output",ExpressionUUID->"81f4a846-a137-45bf-b186-5e2aaacacf97"] +Cell[1809, 54, 221, 4, 29, "Input",ExpressionUUID->"4dccf315-b74a-468f-8cc9-292e02e2be1d"], +Cell[2033, 60, 277, 4, 33, "Output",ExpressionUUID->"40de57fe-f9bd-4137-a443-33a2ece8c05a"] }, Open ]], Cell[CellGroupData[{ -Cell[2309, 75, 180, 4, 36, "Input",ExpressionUUID->"41706838-5a7e-480e-8ecc-91deb1799ebb"], -Cell[2492, 81, 260, 5, 41, "Output",ExpressionUUID->"dbf415d9-dfc4-4c33-b18e-4e3e8609746c"] +Cell[2347, 69, 175, 3, 29, "Input",ExpressionUUID->"41706838-5a7e-480e-8ecc-91deb1799ebb"], +Cell[2525, 74, 277, 4, 33, "Output",ExpressionUUID->"f3c9524d-bebb-4499-a7b9-3fc1ad996bcc"] }, Open ]], Cell[CellGroupData[{ -Cell[2789, 91, 262, 8, 54, "Input",ExpressionUUID->"480934a0-2012-422d-a8e9-e8bbcbc53832"], -Cell[3054, 101, 273, 5, 41, "Output",ExpressionUUID->"dfe62b03-5c81-4c96-bb08-c78f426d6fad"] +Cell[2839, 83, 257, 7, 42, "Input",ExpressionUUID->"480934a0-2012-422d-a8e9-e8bbcbc53832"], +Cell[3099, 92, 290, 4, 33, "Output",ExpressionUUID->"061a5c9d-b437-4133-9a32-9a9912d6ecbd"] }, Open ]], Cell[CellGroupData[{ -Cell[3364, 111, 136, 3, 36, "Input",ExpressionUUID->"67d260e5-c08f-47d1-90a6-f4f1ba36a0ac"], -Cell[3503, 116, 259, 5, 41, "Output",ExpressionUUID->"a15ca613-bf01-4fc1-a178-17b36650e893"] +Cell[3426, 101, 131, 2, 29, "Input",ExpressionUUID->"67d260e5-c08f-47d1-90a6-f4f1ba36a0ac"], +Cell[3560, 105, 276, 4, 33, "Output",ExpressionUUID->"b3861319-1aa2-4ea6-8a53-f1d9e6f56ee8"] }, Open ]], Cell[CellGroupData[{ -Cell[3799, 126, 281, 7, 36, "Input",ExpressionUUID->"1b4d3cca-08f9-42ed-924f-d60e0423521a"], -Cell[4083, 135, 273, 5, 41, "Output",ExpressionUUID->"b3e3c8a2-5d81-4064-a688-c2b973c5a715"] +Cell[3873, 114, 276, 6, 29, "Input",ExpressionUUID->"1b4d3cca-08f9-42ed-924f-d60e0423521a"], +Cell[4152, 122, 290, 4, 33, "Output",ExpressionUUID->"292d1754-f1bb-4e43-b7ef-34eb652d411a"] }, Open ]], Cell[CellGroupData[{ -Cell[4393, 145, 262, 8, 36, "Input",ExpressionUUID->"9bacfab7-dcc8-40db-a53c-d9e1773f8271"], -Cell[4658, 155, 273, 5, 41, "Output",ExpressionUUID->"da07f438-d638-440a-ae52-93e5e6b23074"] +Cell[4479, 131, 257, 7, 29, "Input",ExpressionUUID->"9bacfab7-dcc8-40db-a53c-d9e1773f8271"], +Cell[4739, 140, 292, 4, 33, "Output",ExpressionUUID->"d33dedb2-bd89-49c0-9628-88202585c52f"] }, Open ]], Cell[CellGroupData[{ -Cell[4968, 165, 209, 4, 36, "Input",ExpressionUUID->"ec035fad-bd5f-44e3-8b33-fa345e8bbe79"], -Cell[5180, 171, 237, 4, 41, "Output",ExpressionUUID->"44175d84-1f4e-492f-b451-4c6700c6e9bc"] +Cell[5068, 149, 204, 3, 29, "Input",ExpressionUUID->"ec035fad-bd5f-44e3-8b33-fa345e8bbe79"], +Cell[5275, 154, 255, 3, 33, "Output",ExpressionUUID->"631297b9-d6e5-4e1f-b2a4-a322d8760c6c"] }, Open ]], Cell[CellGroupData[{ -Cell[5454, 180, 207, 4, 36, "Input",ExpressionUUID->"b08fa886-95df-40f4-8692-86146cd9d966"], -Cell[5664, 186, 238, 4, 41, "Output",ExpressionUUID->"913047a3-1387-4baa-8aac-b84044f03d42"] +Cell[5567, 162, 203, 3, 29, "Input",ExpressionUUID->"b08fa886-95df-40f4-8692-86146cd9d966"], +Cell[5773, 167, 259, 3, 33, "Output",ExpressionUUID->"ece1537b-e5a4-475c-829e-b143545c51ef"] }, Open ]], Cell[CellGroupData[{ -Cell[5939, 195, 133, 3, 55, "Input",ExpressionUUID->"b73c65fb-1529-4ccc-9638-bb74fde5ccf4"], -Cell[6075, 200, 256, 5, 62, "Output",ExpressionUUID->"fcc31659-2cf4-4e42-a252-e9fb7896e045"] +Cell[6069, 175, 129, 2, 29, "Input",ExpressionUUID->"b73c65fb-1529-4ccc-9638-bb74fde5ccf4"], +Cell[6201, 179, 276, 4, 33, "Output",ExpressionUUID->"610c282c-7402-4389-b2ad-cb96e93d832f"] }, Open ]], Cell[CellGroupData[{ -Cell[6368, 210, 133, 3, 55, "Input",ExpressionUUID->"3e8baf51-d805-44b6-855b-1764a465b389"], -Cell[6504, 215, 258, 5, 62, "Output",ExpressionUUID->"d38b99d0-f98b-4117-9442-b30acc9610e7"] +Cell[6514, 188, 129, 2, 29, "Input",ExpressionUUID->"3e8baf51-d805-44b6-855b-1764a465b389"], +Cell[6646, 192, 276, 4, 33, "Output",ExpressionUUID->"a0b8a506-35dd-45fc-b368-204ff8f6591d"] }, Open ]], Cell[CellGroupData[{ -Cell[6799, 225, 561, 20, 148, "Input",ExpressionUUID->"d9490fab-f768-4641-bcb4-2c07126465c9"], -Cell[7363, 247, 270, 5, 62, "Output",ExpressionUUID->"869ce53b-c97c-4833-bc92-74e90e326041"] +Cell[6959, 201, 557, 19, 79, "Input",ExpressionUUID->"d9490fab-f768-4641-bcb4-2c07126465c9"], +Cell[7519, 222, 290, 4, 33, "Output",ExpressionUUID->"7f53829b-95f1-4cf3-9ca7-23105a751a67"] }, Open ]], Cell[CellGroupData[{ -Cell[7670, 257, 561, 20, 148, "Input",ExpressionUUID->"5d6fd45e-371d-4730-8350-a00a9428aba0"], -Cell[8234, 279, 271, 5, 62, "Output",ExpressionUUID->"af44cb12-88b8-475e-a331-075d22b1c37a"] +Cell[7846, 231, 557, 19, 79, "Input",ExpressionUUID->"5d6fd45e-371d-4730-8350-a00a9428aba0"], +Cell[8406, 252, 289, 4, 33, "Output",ExpressionUUID->"d8d9a09a-0844-4099-9f5b-f69d772eca50"] }, Open ]], Cell[CellGroupData[{ -Cell[8542, 289, 1592, 51, 211, "Input",ExpressionUUID->"c1675d26-29b6-435b-8507-450e1b9cd35c"], -Cell[10137, 342, 272, 5, 62, "Output",ExpressionUUID->"c9658dd2-d5db-47aa-9c17-58632cc9938c"] +Cell[8732, 261, 1588, 50, 158, "Input",ExpressionUUID->"c1675d26-29b6-435b-8507-450e1b9cd35c"], +Cell[10323, 313, 290, 4, 33, "Output",ExpressionUUID->"8e5fe495-95e4-4522-890f-7543f10063a7"] }, Open ]], Cell[CellGroupData[{ -Cell[10446, 352, 1426, 47, 211, "Input",ExpressionUUID->"62bd7499-b779-4a2e-b402-c6c116da6aa8"], -Cell[11875, 401, 290, 6, 62, "Output",ExpressionUUID->"56b3374a-da47-4659-96ba-b0bf9da5c683"] +Cell[10650, 322, 1422, 46, 158, "Input",ExpressionUUID->"62bd7499-b779-4a2e-b402-c6c116da6aa8"], +Cell[12075, 370, 307, 5, 33, "Output",ExpressionUUID->"5f39960d-fff3-4923-a30d-424bac2aae38"] }, Open ]], Cell[CellGroupData[{ -Cell[12202, 412, 1426, 47, 211, "Input",ExpressionUUID->"a5027d85-6841-4605-aa82-c64a003259ea"], -Cell[13631, 461, 291, 6, 62, "Output",ExpressionUUID->"ae639116-fd58-4bec-8aa9-9aa5233e6f4f"] +Cell[12419, 380, 1422, 46, 158, "Input",ExpressionUUID->"a5027d85-6841-4605-aa82-c64a003259ea"], +Cell[13844, 428, 309, 5, 33, "Output",ExpressionUUID->"8a4b9d0a-5f92-4299-aa88-02138dc74431"] }, Open ]], Cell[CellGroupData[{ -Cell[13959, 472, 1592, 51, 211, "Input",ExpressionUUID->"afa6c8b1-cee5-47e1-8c41-541d281afab3"], -Cell[15554, 525, 269, 5, 62, "Output",ExpressionUUID->"0bfba552-d95c-4e68-857a-64eda6622716"] +Cell[14190, 438, 1588, 50, 158, "Input",ExpressionUUID->"afa6c8b1-cee5-47e1-8c41-541d281afab3"], +Cell[15781, 490, 287, 4, 33, "Output",ExpressionUUID->"b3ae9849-d35d-4252-bd36-a6c004d5089b"] }, Open ]], Cell[CellGroupData[{ -Cell[15860, 535, 135, 3, 55, "Input",ExpressionUUID->"1cd55d90-845c-435a-a2f0-72bd3912dd11"], -Cell[15998, 540, 258, 5, 62, "Output",ExpressionUUID->"c90ddf2e-406f-4ab1-ae03-d4d3598d5087"] +Cell[16105, 499, 131, 2, 29, "Input",ExpressionUUID->"1cd55d90-845c-435a-a2f0-72bd3912dd11"], +Cell[16239, 503, 278, 4, 33, "Output",ExpressionUUID->"6bb0b78e-991c-45bb-b071-5f1abd737c88"] }, Open ]], Cell[CellGroupData[{ -Cell[16293, 550, 137, 3, 55, "Input",ExpressionUUID->"98ce1876-70aa-439d-9843-8a6d50bcdb1a"], -Cell[16433, 555, 255, 5, 62, "Output",ExpressionUUID->"334a305b-a7d4-41dd-a9f2-bd2a9e0f6f6b"] +Cell[16554, 512, 133, 2, 29, "Input",ExpressionUUID->"98ce1876-70aa-439d-9843-8a6d50bcdb1a"], +Cell[16690, 516, 273, 4, 33, "Output",ExpressionUUID->"ab1239de-26dd-4513-b7c5-dc1ce30d2eab"] }, Open ]], Cell[CellGroupData[{ -Cell[16725, 565, 138, 3, 55, "Input",ExpressionUUID->"0e2fd10b-9b3d-49bd-97b4-f6aea055e53d"], -Cell[16866, 570, 262, 5, 62, "Output",ExpressionUUID->"a70bc9cf-1d40-4900-9f81-79f7c17c56ec"] +Cell[17000, 525, 134, 2, 29, "Input",ExpressionUUID->"0e2fd10b-9b3d-49bd-97b4-f6aea055e53d"], +Cell[17137, 529, 282, 4, 33, "Output",ExpressionUUID->"779e7d9a-a636-461f-a2a5-da030b53d3a8"] }, Open ]], Cell[CellGroupData[{ -Cell[17165, 580, 223, 5, 55, "Input",ExpressionUUID->"9b1b2d2c-f545-413e-a5d1-a9231ab40f19"], -Cell[17391, 587, 272, 6, 62, "Output",ExpressionUUID->"57e37269-c73f-4f19-9995-1e69d30faad8"] +Cell[17456, 538, 219, 4, 29, "Input",ExpressionUUID->"9b1b2d2c-f545-413e-a5d1-a9231ab40f19"], +Cell[17678, 544, 290, 5, 33, "Output",ExpressionUUID->"cc365f8c-3eec-4233-8362-a8bf533f9f1b"] }, Open ]], Cell[CellGroupData[{ -Cell[17700, 598, 138, 3, 55, "Input",ExpressionUUID->"b0dddbf6-264b-48b8-9f40-b12fc5cee44b"], -Cell[17841, 603, 260, 5, 62, "Output",ExpressionUUID->"034f4765-983f-4935-b497-40c57b64644d"] +Cell[18005, 554, 134, 2, 29, "Input",ExpressionUUID->"b0dddbf6-264b-48b8-9f40-b12fc5cee44b"], +Cell[18142, 558, 278, 4, 33, "Output",ExpressionUUID->"ee920240-5d4b-488c-be4a-d42e2ec8ac03"] }, Open ]], Cell[CellGroupData[{ -Cell[18138, 613, 328, 6, 55, "Input",ExpressionUUID->"3e3a6b65-8e1b-4a52-89ef-25d15697523e"], -Cell[18469, 621, 253, 5, 62, "Output",ExpressionUUID->"cfb663c2-5472-4568-938a-3dfa357180e4"] +Cell[18457, 567, 324, 5, 29, "Input",ExpressionUUID->"3e3a6b65-8e1b-4a52-89ef-25d15697523e"], +Cell[18784, 574, 273, 4, 33, "Output",ExpressionUUID->"b879f1cf-c0ff-41db-a470-7c819b050987"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 631, 299, 6, 55, "Input",ExpressionUUID->"0a2ff06c-c17e-4fc1-bf0b-6d86182e3c71"], -Cell[19061, 639, 252, 5, 62, "Output",ExpressionUUID->"66ad5212-75b8-4f98-9784-8a7cb70cab6c"] +Cell[19094, 583, 295, 5, 29, "Input",ExpressionUUID->"0a2ff06c-c17e-4fc1-bf0b-6d86182e3c71"], +Cell[19392, 590, 270, 4, 33, "Output",ExpressionUUID->"2a0f8a71-b65e-4c48-9f19-8ae141d93a88"] }, Open ]], Cell[CellGroupData[{ -Cell[19350, 649, 223, 5, 55, "Input",ExpressionUUID->"eca15aaf-a325-4ba0-aabe-531c8f755721"], -Cell[19576, 656, 257, 5, 62, "Output",ExpressionUUID->"92ca39f8-23c2-4734-8231-67432edf5ed4"] +Cell[19699, 599, 219, 4, 29, "Input",ExpressionUUID->"eca15aaf-a325-4ba0-aabe-531c8f755721"], +Cell[19921, 605, 275, 4, 33, "Output",ExpressionUUID->"31161537-91c0-4552-8187-9dc6b938b4e7"] }, Open ]], Cell[CellGroupData[{ -Cell[19870, 666, 354, 11, 81, "Input",ExpressionUUID->"e4599ea3-3e3f-4bbb-ac77-1b2d986c01f5"], -Cell[20227, 679, 275, 5, 62, "Output",ExpressionUUID->"d06b21d7-937b-4bca-85aa-d9de41d7785e"] +Cell[20233, 614, 350, 10, 42, "Input",ExpressionUUID->"e4599ea3-3e3f-4bbb-ac77-1b2d986c01f5"], +Cell[20586, 626, 293, 4, 33, "Output",ExpressionUUID->"0e33393d-ac09-49e4-9aa6-7f896c802b5d"] }, Open ]], Cell[CellGroupData[{ -Cell[20539, 689, 354, 11, 81, "Input",ExpressionUUID->"8682357b-84ee-4a81-aca7-f8d1992781e4"], -Cell[20896, 702, 288, 6, 62, "Output",ExpressionUUID->"0eeef043-f790-44e7-b428-85706656778c"] +Cell[20916, 635, 350, 10, 42, "Input",ExpressionUUID->"8682357b-84ee-4a81-aca7-f8d1992781e4"], +Cell[21269, 647, 306, 5, 33, "Output",ExpressionUUID->"ad0455a9-a114-48fc-aa5b-624531ffdd79"] }, Open ]], Cell[CellGroupData[{ -Cell[21221, 713, 998, 27, 154, "Input",ExpressionUUID->"0548130b-a7f1-4bcf-90a2-d5e1ca2a41ac"], -Cell[22222, 742, 276, 5, 62, "Output",ExpressionUUID->"a1ab6c92-980d-44da-baff-b9d7d712495e"] +Cell[21612, 657, 994, 26, 81, "Input",ExpressionUUID->"0548130b-a7f1-4bcf-90a2-d5e1ca2a41ac"], +Cell[22609, 685, 294, 4, 33, "Output",ExpressionUUID->"dee976ca-c490-4da9-95e1-82915780e650"] }, Open ]], Cell[CellGroupData[{ -Cell[22535, 752, 203, 4, 55, "Input",ExpressionUUID->"5feaa455-cd90-4a1b-bee3-013c233b1de6"], -Cell[22741, 758, 258, 5, 62, "Output",ExpressionUUID->"10d3aaf5-d1dd-429f-9ebd-46ac46ad18ce"] +Cell[22940, 694, 199, 3, 29, "Input",ExpressionUUID->"5feaa455-cd90-4a1b-bee3-013c233b1de6"], +Cell[23142, 699, 278, 4, 33, "Output",ExpressionUUID->"b164d980-7aa2-4b89-9e77-bdfd52fb7b71"] }, Open ]], Cell[CellGroupData[{ -Cell[23036, 768, 331, 6, 55, "Input",ExpressionUUID->"819ee20a-afd4-4998-8541-13fb50299e39"], -Cell[23370, 776, 235, 4, 62, "Output",ExpressionUUID->"0e516592-953a-4497-a59a-81e7a7c50ce9"] +Cell[23457, 708, 327, 5, 29, "Input",ExpressionUUID->"819ee20a-afd4-4998-8541-13fb50299e39"], +Cell[23787, 715, 254, 3, 33, "Output",ExpressionUUID->"d1147253-9b37-4038-8661-dfecd5ec5990"] }, Open ]], -Cell[23620, 783, 177, 3, 55, "Input",ExpressionUUID->"c270b218-84a4-4d5d-98f9-efe8565909b8"], +Cell[24056, 721, 173, 2, 70, "Input",ExpressionUUID->"c270b218-84a4-4d5d-98f9-efe8565909b8"], Cell[CellGroupData[{ -Cell[23822, 790, 333, 6, 55, "Input",ExpressionUUID->"e5efaf7e-1883-42e3-bb34-f0eec47110c6"], -Cell[24158, 798, 232, 4, 62, "Output",ExpressionUUID->"fca8e291-a815-4b40-9ae5-6d638ea57cc0"] +Cell[24254, 727, 329, 5, 29, "Input",ExpressionUUID->"e5efaf7e-1883-42e3-bb34-f0eec47110c6"], +Cell[24586, 734, 251, 3, 33, "Output",ExpressionUUID->"13ae9676-b2a6-4f2c-9f37-36099a732df0"] }, Open ]], -Cell[24405, 805, 177, 3, 55, "Input",ExpressionUUID->"c5389072-6286-4e69-a64a-8a3980f643e5"], +Cell[24852, 740, 173, 2, 70, "Input",ExpressionUUID->"c5389072-6286-4e69-a64a-8a3980f643e5"], Cell[CellGroupData[{ -Cell[24607, 812, 336, 6, 55, "Input",ExpressionUUID->"3dd7a1c5-86a9-4e32-982a-5adf0ae9576f"], -Cell[24946, 820, 231, 4, 62, "Output",ExpressionUUID->"0d40b176-0434-45e1-bf60-bb78b76af80a"] +Cell[25050, 746, 332, 5, 29, "Input",ExpressionUUID->"3dd7a1c5-86a9-4e32-982a-5adf0ae9576f"], +Cell[25385, 753, 250, 3, 33, "Output",ExpressionUUID->"ff7d1dad-bb07-4481-be26-8ef2dba77f81"] }, Open ]], -Cell[25192, 827, 177, 3, 55, "Input",ExpressionUUID->"3938439a-c820-4c2d-8e74-7cbbedcd8f4d"], +Cell[25650, 759, 173, 2, 70, "Input",ExpressionUUID->"3938439a-c820-4c2d-8e74-7cbbedcd8f4d"], Cell[CellGroupData[{ -Cell[25394, 834, 358, 6, 55, "Input",ExpressionUUID->"2f7153ea-7f6d-4235-bca3-5dbf33dde762"], -Cell[25755, 842, 237, 4, 62, "Output",ExpressionUUID->"0d5cdd2f-e59c-4a5a-bf98-40bbcaad9882"] +Cell[25848, 765, 354, 5, 29, "Input",ExpressionUUID->"2f7153ea-7f6d-4235-bca3-5dbf33dde762"], +Cell[26205, 772, 256, 3, 33, "Output",ExpressionUUID->"1e762d6b-8c4c-475a-a805-2018debee35a"] }, Open ]], -Cell[26007, 849, 175, 3, 55, "Input",ExpressionUUID->"dfbfaeac-9117-4085-9fd7-886380acdde6"], +Cell[26476, 778, 171, 2, 70, "Input",ExpressionUUID->"dfbfaeac-9117-4085-9fd7-886380acdde6"], Cell[CellGroupData[{ -Cell[26207, 856, 303, 6, 55, "Input",ExpressionUUID->"9eda4320-fddf-44ad-bb7f-e05be7f9f5cc"], -Cell[26513, 864, 237, 4, 62, "Output",ExpressionUUID->"7f2fb8d9-d33a-40e8-ab11-d14d1ed4ca81"] +Cell[26672, 784, 299, 5, 29, "Input",ExpressionUUID->"9eda4320-fddf-44ad-bb7f-e05be7f9f5cc"], +Cell[26974, 791, 256, 3, 33, "Output",ExpressionUUID->"9a56dfa7-9fcd-4bb6-8163-4e62f218923c"] }, Open ]], -Cell[26765, 871, 175, 3, 55, "Input",ExpressionUUID->"6e87e300-5a5f-433f-a36d-3ec730a3519a"], +Cell[27245, 797, 171, 2, 70, "Input",ExpressionUUID->"6e87e300-5a5f-433f-a36d-3ec730a3519a"], Cell[CellGroupData[{ -Cell[26965, 878, 307, 6, 55, "Input",ExpressionUUID->"318b0610-0520-4baa-a5e2-01385dfdb090"], -Cell[27275, 886, 233, 4, 62, "Output",ExpressionUUID->"3e52eedb-7a3a-47bc-9542-6c08ff31f764"] +Cell[27441, 803, 303, 5, 29, "Input",ExpressionUUID->"318b0610-0520-4baa-a5e2-01385dfdb090"], +Cell[27747, 810, 252, 3, 33, "Output",ExpressionUUID->"db623792-dce6-462f-95a7-df917513e889"] }, Open ]], -Cell[27523, 893, 177, 3, 55, "Input",ExpressionUUID->"fb84d67f-9e6a-433e-9b98-4d733952fe7d"], +Cell[28014, 816, 173, 2, 70, "Input",ExpressionUUID->"fb84d67f-9e6a-433e-9b98-4d733952fe7d"], Cell[CellGroupData[{ -Cell[27725, 900, 311, 6, 55, "Input",ExpressionUUID->"e2a5552a-e080-4faa-acd4-219b8da3d983"], -Cell[28039, 908, 232, 4, 62, "Output",ExpressionUUID->"c36b097f-1233-40fc-8a42-b3b4aaf02e0f"] +Cell[28212, 822, 307, 5, 29, "Input",ExpressionUUID->"e2a5552a-e080-4faa-acd4-219b8da3d983"], +Cell[28522, 829, 251, 3, 33, "Output",ExpressionUUID->"44cd8b34-2e8b-478e-b70e-267b406c5e39"] }, Open ]], -Cell[28286, 915, 176, 3, 55, "Input",ExpressionUUID->"d6c7fe31-31bd-4277-a193-087061e6ab66"], +Cell[28788, 835, 172, 2, 70, "Input",ExpressionUUID->"d6c7fe31-31bd-4277-a193-087061e6ab66"], Cell[CellGroupData[{ -Cell[28487, 922, 279, 5, 55, "Input",ExpressionUUID->"a63db46b-c143-4718-a1ae-6b9356a84d6c"], -Cell[28769, 929, 231, 4, 62, "Output",ExpressionUUID->"60f5a6a5-9ac4-4b59-b0eb-629ae61f7b72"] +Cell[28985, 841, 275, 4, 29, "Input",ExpressionUUID->"a63db46b-c143-4718-a1ae-6b9356a84d6c"], +Cell[29263, 847, 252, 3, 33, "Output",ExpressionUUID->"83487410-d690-4182-b84d-40565b3eec22"] }, Open ]], -Cell[29015, 936, 179, 3, 55, "Input",ExpressionUUID->"5c7354df-e9d9-408f-b6a3-ec42624df8ac"], +Cell[29530, 853, 175, 2, 70, "Input",ExpressionUUID->"5c7354df-e9d9-408f-b6a3-ec42624df8ac"], Cell[CellGroupData[{ -Cell[29219, 943, 19813, 486, 3214, "Input",ExpressionUUID->"7c83793f-9fb2-460b-912b-a5765c838794"], -Cell[49035, 1431, 272, 5, 62, "Output",ExpressionUUID->"53563666-4956-4c0a-a1f4-d8a671b062b8"] +Cell[29730, 859, 19809, 485, 1844, "Input",ExpressionUUID->"7c83793f-9fb2-460b-912b-a5765c838794"], +Cell[49542, 1346, 292, 4, 33, "Output",ExpressionUUID->"f9c56ce4-005d-446f-a961-b40d09c0e6c2"] }, Open ]], Cell[CellGroupData[{ -Cell[49344, 1441, 19752, 490, 3214, "Input",ExpressionUUID->"5a2da6c3-54d7-4b53-b3b9-387e498d10c7"], -Cell[69099, 1933, 271, 5, 62, "Output",ExpressionUUID->"57a0156d-60f8-4caf-ae50-62c52b266141"] +Cell[49871, 1355, 19748, 489, 1981, "Input",ExpressionUUID->"5a2da6c3-54d7-4b53-b3b9-387e498d10c7"], +Cell[69622, 1846, 291, 4, 33, "Output",ExpressionUUID->"c972ab97-9678-4c27-a7a0-6646980b4a21"] }, Open ]], Cell[CellGroupData[{ -Cell[69407, 1943, 19752, 484, 3213, "Input",ExpressionUUID->"a8899c63-c959-470e-9a7c-e2103f872ccf"], -Cell[89162, 2429, 289, 6, 62, "Output",ExpressionUUID->"b693017d-19b2-452d-a1a8-23c052bf8e33"] +Cell[69950, 1855, 19748, 483, 1970, "Input",ExpressionUUID->"a8899c63-c959-470e-9a7c-e2103f872ccf"], +Cell[89701, 2340, 309, 5, 33, "Output",ExpressionUUID->"771fbf93-b7e1-45c7-8a3e-ef1332fe0f8b"] }, Open ]], Cell[CellGroupData[{ -Cell[89488, 2440, 22538, 554, 3639, "Input",ExpressionUUID->"76dfb881-94dd-456f-b6bf-1968b08bb1d5"], -Cell[112029, 2996, 291, 6, 62, "Output",ExpressionUUID->"bb12cc55-76d7-478c-81ee-0c6bae73260c"] +Cell[90047, 2350, 22534, 553, 2217, "Input",ExpressionUUID->"76dfb881-94dd-456f-b6bf-1968b08bb1d5"], +Cell[112584, 2905, 309, 5, 33, "Output",ExpressionUUID->"8e02d177-dff3-48fb-b7d1-430cd1e79084"] }, Open ]], Cell[CellGroupData[{ -Cell[112357, 3007, 22539, 554, 3639, "Input",ExpressionUUID->"5500dc0c-e0b4-47ca-9021-6f3b4365a6ff"], -Cell[134899, 3563, 292, 6, 62, "Output",ExpressionUUID->"44e16a80-dfb2-4dde-9068-6d056b3cde83"] +Cell[112930, 2915, 22535, 553, 2254, "Input",ExpressionUUID->"5500dc0c-e0b4-47ca-9021-6f3b4365a6ff"], +Cell[135468, 3470, 312, 5, 33, "Output",ExpressionUUID->"a0c14053-b535-4f0e-bb07-9fb0999c2688"] }, Open ]], Cell[CellGroupData[{ -Cell[135228, 3574, 25495, 627, 4065, "Input",ExpressionUUID->"ac44f406-053e-4c01-8e43-53ea50b82bea"], -Cell[160726, 4203, 286, 6, 62, "Output",ExpressionUUID->"04f65688-baf7-4b5f-8cba-6bbd5e682a79"] +Cell[135817, 3480, 25491, 626, 2501, "Input",ExpressionUUID->"ac44f406-053e-4c01-8e43-53ea50b82bea"], +Cell[161311, 4108, 304, 5, 33, "Output",ExpressionUUID->"3b4e494e-b7e4-4681-9a0f-bf441c161502"] }, Open ]], Cell[CellGroupData[{ -Cell[161049, 4214, 134, 3, 55, "Input",ExpressionUUID->"839b99cd-58dd-4224-b037-9c5a79dc1336"], -Cell[161186, 4219, 254, 5, 62, "Output",ExpressionUUID->"8f3a36d2-1343-404d-9e10-b1352048231c"] +Cell[161652, 4118, 130, 2, 29, "Input",ExpressionUUID->"839b99cd-58dd-4224-b037-9c5a79dc1336"], +Cell[161785, 4122, 274, 4, 33, "Output",ExpressionUUID->"fa488b09-1462-4b69-a688-e20e63c8c872"] }, Open ]], Cell[CellGroupData[{ -Cell[161477, 4229, 134, 3, 55, "Input",ExpressionUUID->"b052058d-e99f-4885-a585-548d5e125978"], -Cell[161614, 4234, 254, 5, 62, "Output",ExpressionUUID->"2c16f062-4640-45be-9984-8660dee1e14d"] +Cell[162096, 4131, 130, 2, 29, "Input",ExpressionUUID->"b052058d-e99f-4885-a585-548d5e125978"], +Cell[162229, 4135, 274, 4, 33, "Output",ExpressionUUID->"670831a1-6746-459a-ae21-6811f2ea1094"] }, Open ]], Cell[CellGroupData[{ -Cell[161905, 4244, 1148, 40, 211, "Input",ExpressionUUID->"eef9d8b4-a0e9-447d-bdc5-b8336fc1f39a"], -Cell[163056, 4286, 271, 5, 62, "Output",ExpressionUUID->"a5f41d9f-3aec-4bd6-84fe-d3689f979070"] +Cell[162540, 4144, 1144, 39, 107, "Input",ExpressionUUID->"eef9d8b4-a0e9-447d-bdc5-b8336fc1f39a"], +Cell[163687, 4185, 291, 4, 33, "Output",ExpressionUUID->"da7b02c1-3873-4a4d-a7bc-83edfdbe5b9a"] }, Open ]], Cell[CellGroupData[{ -Cell[163364, 4296, 1045, 36, 211, "Input",ExpressionUUID->"e6a7237c-3b3d-4bb7-b1d1-34cdbaa149b1"], -Cell[164412, 4334, 286, 6, 62, "Output",ExpressionUUID->"abd2645c-0feb-477b-a087-5c6629e48a69"] +Cell[164015, 4194, 1041, 35, 107, "Input",ExpressionUUID->"e6a7237c-3b3d-4bb7-b1d1-34cdbaa149b1"], +Cell[165059, 4231, 304, 5, 33, "Output",ExpressionUUID->"dbcf83e3-50c7-43b8-b78a-08c250d8b560"] }, Open ]], Cell[CellGroupData[{ -Cell[164735, 4345, 1148, 40, 211, "Input",ExpressionUUID->"3664e8fb-e1ab-43b9-9add-e60159ff90a3"], -Cell[165886, 4387, 271, 5, 62, "Output",ExpressionUUID->"d75400a1-cafc-4e31-ae01-0244864530ee"] +Cell[165400, 4241, 1144, 39, 107, "Input",ExpressionUUID->"3664e8fb-e1ab-43b9-9add-e60159ff90a3"], +Cell[166547, 4282, 291, 4, 33, "Output",ExpressionUUID->"d71eb993-fdf0-4856-aeff-ff76622ae47b"] }, Open ]], Cell[CellGroupData[{ -Cell[166194, 4397, 112, 2, 55, "Input",ExpressionUUID->"dbfdecd8-86f2-4f33-8479-b665ae97414f"], -Cell[166309, 4401, 272, 5, 62, "Output",ExpressionUUID->"6d52c905-8f0e-4d70-b5a7-c48accf9f3aa"] +Cell[166875, 4291, 108, 1, 29, "Input",ExpressionUUID->"dbfdecd8-86f2-4f33-8479-b665ae97414f"], +Cell[166986, 4294, 290, 4, 33, "Output",ExpressionUUID->"7c5c24ae-41db-412d-b05f-50e5a2a9e4b5"] }, Open ]], Cell[CellGroupData[{ -Cell[166618, 4411, 112, 2, 55, "Input",ExpressionUUID->"6f117784-e0a6-4a59-91a0-fee47248ec56"], -Cell[166733, 4415, 289, 6, 62, "Output",ExpressionUUID->"5b1a98e4-b698-430e-9037-0676c04bbbe7"] +Cell[167313, 4303, 108, 1, 29, "Input",ExpressionUUID->"6f117784-e0a6-4a59-91a0-fee47248ec56"], +Cell[167424, 4306, 306, 5, 33, "Output",ExpressionUUID->"601e5a9e-6252-45b2-925b-9321e3a40397"] }, Open ]], Cell[CellGroupData[{ -Cell[167059, 4426, 112, 2, 55, "Input",ExpressionUUID->"dd09394e-74c8-4a27-8746-45835fc98c93"], -Cell[167174, 4430, 287, 6, 62, "Output",ExpressionUUID->"d9d01165-51a7-480d-8850-ea6a72761898"] +Cell[167767, 4316, 108, 1, 29, "Input",ExpressionUUID->"dd09394e-74c8-4a27-8746-45835fc98c93"], +Cell[167878, 4319, 305, 5, 33, "Output",ExpressionUUID->"65f8fadd-7515-4a54-a4ff-7e9d4a0b5334"] }, Open ]], Cell[CellGroupData[{ -Cell[167498, 4441, 112, 2, 55, "Input",ExpressionUUID->"9f69a6c7-3997-4002-bb6c-26013ebb1a5a"], -Cell[167613, 4445, 274, 5, 62, "Output",ExpressionUUID->"c2a2c1ac-4c50-49f1-b3a7-4157254eab1d"] +Cell[168220, 4329, 108, 1, 29, "Input",ExpressionUUID->"9f69a6c7-3997-4002-bb6c-26013ebb1a5a"], +Cell[168331, 4332, 292, 4, 33, "Output",ExpressionUUID->"052412bd-ccfe-42aa-ba01-0c947e8a00fa"] }, Open ]], Cell[CellGroupData[{ -Cell[167924, 4455, 111, 2, 55, "Input",ExpressionUUID->"baf11c76-bf79-4d0a-9a2c-bdafe286cae9"], -Cell[168038, 4459, 272, 5, 62, "Output",ExpressionUUID->"de75ad4b-2bd2-4387-b782-158c178e59e3"] +Cell[168660, 4341, 107, 1, 29, "Input",ExpressionUUID->"baf11c76-bf79-4d0a-9a2c-bdafe286cae9"], +Cell[168770, 4344, 292, 4, 33, "Output",ExpressionUUID->"6c38e48d-8dfb-4c6c-92c2-28e826990554"] }, Open ]], Cell[CellGroupData[{ -Cell[168347, 4469, 111, 2, 55, "Input",ExpressionUUID->"4683b1e8-4fb0-4f25-9aa5-17033bf43351"], -Cell[168461, 4473, 272, 5, 62, "Output",ExpressionUUID->"d43edcd3-215e-46c2-b554-ef918f580163"] +Cell[169099, 4353, 107, 1, 29, "Input",ExpressionUUID->"4683b1e8-4fb0-4f25-9aa5-17033bf43351"], +Cell[169209, 4356, 290, 4, 33, "Output",ExpressionUUID->"01e177a9-0b5e-4e29-96b7-2ac6a4fa3b7e"] }, Open ]], Cell[CellGroupData[{ -Cell[168770, 4483, 501, 17, 105, "Input",ExpressionUUID->"e5dac210-3b35-4af6-864e-da3f6b5c9e98"], -Cell[169274, 4502, 287, 6, 62, "Output",ExpressionUUID->"3a7439c2-9608-4258-a2d0-1db6d6ad1a53"] +Cell[169536, 4365, 497, 16, 55, "Input",ExpressionUUID->"e5dac210-3b35-4af6-864e-da3f6b5c9e98"], +Cell[170036, 4383, 305, 5, 33, "Output",ExpressionUUID->"0ed6c486-74f0-4325-a808-30ff534ca698"] }, Open ]], Cell[CellGroupData[{ -Cell[169598, 4513, 501, 17, 105, "Input",ExpressionUUID->"f9fdc6b9-713b-46f9-91e0-65813debd8af"], -Cell[170102, 4532, 286, 6, 62, "Output",ExpressionUUID->"19eaf4ad-6191-4911-8437-11a9452e407f"] +Cell[170378, 4393, 497, 16, 55, "Input",ExpressionUUID->"f9fdc6b9-713b-46f9-91e0-65813debd8af"], +Cell[170878, 4411, 304, 5, 33, "Output",ExpressionUUID->"72ac47f5-98f3-4c69-9aac-eef5b75ade3f"] }, Open ]], Cell[CellGroupData[{ -Cell[170425, 4543, 1792, 61, 358, "Input",ExpressionUUID->"8db01e79-356c-4941-9d39-a95567306c14"], -Cell[172220, 4606, 270, 5, 62, "Output",ExpressionUUID->"04771195-19d1-46cd-8e7b-4ff8f9ead357"] +Cell[171219, 4421, 1788, 60, 183, "Input",ExpressionUUID->"8db01e79-356c-4941-9d39-a95567306c14"], +Cell[173010, 4483, 288, 4, 33, "Output",ExpressionUUID->"8e840518-1f31-4d20-9a32-bb81b0fab3af"] }, Open ]], Cell[CellGroupData[{ -Cell[172527, 4616, 1105, 37, 256, "Input",ExpressionUUID->"95cd7e3a-170e-4446-bf3c-2df3d68d7942"], -Cell[173635, 4655, 291, 6, 62, "Output",ExpressionUUID->"9e30a8ab-b3a3-4fc9-83d9-2b3c3b5051a3"] +Cell[173335, 4492, 1101, 36, 131, "Input",ExpressionUUID->"95cd7e3a-170e-4446-bf3c-2df3d68d7942"], +Cell[174439, 4530, 309, 5, 33, "Output",ExpressionUUID->"a846e523-c94a-4782-a32d-a4dea743328a"] }, Open ]], Cell[CellGroupData[{ -Cell[173963, 4666, 1822, 62, 340, "Input",ExpressionUUID->"979f7f8d-3031-4f5b-9e99-384995127670"], -Cell[175788, 4730, 269, 5, 41, "Output",ExpressionUUID->"1de44f98-1359-4f5c-9ea3-304fbdede234"] +Cell[174785, 4540, 1818, 61, 160, "Input",ExpressionUUID->"979f7f8d-3031-4f5b-9e99-384995127670"], +Cell[176606, 4603, 289, 4, 33, "Output",ExpressionUUID->"b06840c8-9108-427c-993e-2c77bcf64efc"] }, Open ]], Cell[CellGroupData[{ -Cell[176094, 4740, 1635, 54, 208, "Input",ExpressionUUID->"50de5a73-3b9f-4f04-b13b-a2cf36c0d150"], -Cell[177732, 4796, 273, 5, 41, "Output",ExpressionUUID->"ec9d0798-717b-4601-a1c9-14a894cdd51c"] +Cell[176932, 4612, 1631, 53, 162, "Input",ExpressionUUID->"50de5a73-3b9f-4f04-b13b-a2cf36c0d150"], +Cell[178566, 4667, 291, 4, 33, "Output",ExpressionUUID->"3522d4c5-bfac-4c18-a49f-461fe15a8ca6"] }, Open ]], Cell[CellGroupData[{ -Cell[178042, 4806, 1635, 54, 208, "Input",ExpressionUUID->"5d7c1fde-f494-4e17-a51f-46bb84e1aab1"], -Cell[179680, 4862, 272, 5, 41, "Output",ExpressionUUID->"79dd13f8-e4fd-4ee1-a785-699086888888"] +Cell[178894, 4676, 1631, 53, 162, "Input",ExpressionUUID->"5d7c1fde-f494-4e17-a51f-46bb84e1aab1"], +Cell[180528, 4731, 290, 4, 33, "Output",ExpressionUUID->"49c8dd63-fe17-415b-8e88-fa16e8337ae2"] }, Open ]], -Cell[179967, 4870, 189, 4, 36, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], -Cell[180159, 4876, 154, 3, 36, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], -Cell[180316, 4881, 188, 4, 36, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], -Cell[180507, 4887, 154, 3, 36, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[180686, 4894, 1301, 43, 174, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], -Cell[181990, 4939, 178, 3, 41, "Output",ExpressionUUID->"1658422d-0016-324a-9843-942f5453a9c7"] +Cell[180855, 4740, 208, 3, 29, "Input",ExpressionUUID->"bdefbecf-0aaa-4a45-a861-406cf54e52d1"], +Cell[181066, 4745, 161, 2, 33, "Output",ExpressionUUID->"913518a8-ee29-497f-8179-42f707048cba"] }, Open ]], +Cell[181242, 4750, 173, 2, 70, "Input",ExpressionUUID->"a5161e25-7247-124f-8601-7bcc4af89c62"], Cell[CellGroupData[{ -Cell[182205, 4947, 910, 31, 128, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], -Cell[183118, 4980, 175, 3, 41, "Output",ExpressionUUID->"d307b81f-3de4-ab46-9ef8-af5c6bc7c05b"] +Cell[181440, 4756, 207, 3, 29, "Input",ExpressionUUID->"45ed831b-459a-9a41-990f-c079ad464f5d"], +Cell[181650, 4761, 160, 2, 33, "Output",ExpressionUUID->"17881132-d429-450f-888b-cc1f96a103a3"] }, Open ]], +Cell[181825, 4766, 173, 2, 70, "Input",ExpressionUUID->"bc946e22-fdd1-8b4b-8e5a-11f4dcb03e07"], Cell[CellGroupData[{ -Cell[183330, 4988, 887, 30, 128, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], -Cell[184220, 5020, 176, 3, 41, "Output",ExpressionUUID->"866e2a7a-c08a-d14a-ae9c-f63fbc316d85"] +Cell[182023, 4772, 1297, 42, 111, "Input",ExpressionUUID->"78018a61-7851-fe4d-b32f-cb68a3158f29"], +Cell[183323, 4816, 195, 2, 33, "Output",ExpressionUUID->"503401cd-3f6c-4e3b-bd1d-a19c1706205e"] }, Open ]], Cell[CellGroupData[{ -Cell[184433, 5028, 558, 19, 66, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], -Cell[184994, 5049, 172, 3, 41, "Output",ExpressionUUID->"bba1ae64-a2a6-4745-b870-cca298627f62"] +Cell[183555, 4823, 929, 30, 96, "Input",ExpressionUUID->"4b8a0d40-a00c-f94e-ae25-7221ff813b6d"], +Cell[184487, 4855, 195, 2, 33, "Output",ExpressionUUID->"fc3f2ec2-fbb3-431d-a549-dba7c71bda63"] }, Open ]], Cell[CellGroupData[{ -Cell[185203, 5057, 623, 21, 66, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], -Cell[185829, 5080, 172, 3, 41, "Output",ExpressionUUID->"2d9a2576-51c1-274e-bb6b-3d0a12d8f955"] +Cell[184719, 4862, 906, 29, 55, "Input",ExpressionUUID->"f22831a7-63b7-f444-8e3a-fa370a62ac27"], +Cell[185628, 4893, 194, 2, 33, "Output",ExpressionUUID->"15c9f6c0-4767-47ba-9fbf-8090e6f831c0"] }, Open ]], Cell[CellGroupData[{ -Cell[186038, 5088, 170, 5, 71, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], -Cell[186211, 5095, 172, 3, 41, "Output",ExpressionUUID->"55e80360-690f-0444-ac68-221fe09ddfd5"] +Cell[185859, 4900, 554, 18, 51, "Input",ExpressionUUID->"f30cc552-8352-c747-9dd8-56cebba76821"], +Cell[186416, 4920, 190, 2, 33, "Output",ExpressionUUID->"3755f534-3e03-4e76-90ef-886c9dc2f5a7"] }, Open ]], Cell[CellGroupData[{ -Cell[186420, 5103, 170, 5, 69, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], -Cell[186593, 5110, 171, 3, 41, "Output",ExpressionUUID->"ffa83e52-e057-8c44-be5c-a869714a425e"] +Cell[186643, 4927, 619, 20, 51, "Input",ExpressionUUID->"98d0e854-bf74-1942-9842-34bdfd57484b"], +Cell[187265, 4949, 191, 2, 33, "Output",ExpressionUUID->"12a1b00b-eeac-4aca-97e2-df81026bfb8f"] }, Open ]], Cell[CellGroupData[{ -Cell[186801, 5118, 181, 5, 55, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], -Cell[186985, 5125, 170, 3, 41, "Output",ExpressionUUID->"daa1af48-56b9-b549-9a5e-fd35e4ace383"] +Cell[187493, 4956, 166, 4, 55, "Input",ExpressionUUID->"b27085c5-361b-ca40-8265-d33323aa857a"], +Cell[187662, 4962, 191, 2, 33, "Output",ExpressionUUID->"d0de49bf-4e87-4ec6-8796-690a7ff2b0e6"] }, Open ]], Cell[CellGroupData[{ -Cell[187192, 5133, 181, 5, 55, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], -Cell[187376, 5140, 172, 3, 41, "Output",ExpressionUUID->"045de583-e60b-c94a-9184-d9a46a689c39"] +Cell[187890, 4969, 166, 4, 54, "Input",ExpressionUUID->"3567cfa4-5406-b24a-a433-355914019270"], +Cell[188059, 4975, 188, 2, 33, "Output",ExpressionUUID->"f05e70d8-4c8c-4bb4-898a-98eed354a500"] }, Open ]], Cell[CellGroupData[{ -Cell[187585, 5148, 6055, 185, 831, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], -Cell[193643, 5335, 172, 3, 41, "Output",ExpressionUUID->"cdaeef85-4599-4144-88b1-c12ccb960e67"] +Cell[188284, 4982, 177, 4, 43, "Input",ExpressionUUID->"3ecda735-8fef-0441-a72e-f97767ecac3f"], +Cell[188464, 4988, 190, 2, 33, "Output",ExpressionUUID->"0dc53b22-a88e-4ba4-9b65-27cb14ad5577"] }, Open ]], Cell[CellGroupData[{ -Cell[193852, 5343, 368, 9, 53, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], -Cell[194223, 5354, 171, 3, 41, "Output",ExpressionUUID->"c4da64fa-539e-454c-a7bc-f5a50d741b33"] +Cell[188691, 4995, 177, 4, 43, "Input",ExpressionUUID->"123c6309-8ee6-5f4a-a63d-393202ff4b16"], +Cell[188871, 5001, 192, 2, 33, "Output",ExpressionUUID->"633e13c4-f382-41f8-8b66-289511f66a25"] }, Open ]], Cell[CellGroupData[{ -Cell[194431, 5362, 6122, 187, 900, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], -Cell[200556, 5551, 173, 3, 41, "Output",ExpressionUUID->"a0ddd9ec-0ad8-da40-93c1-f69a540fecbb"] +Cell[189100, 5008, 6051, 184, 474, "Input",ExpressionUUID->"c8e563e9-04d2-4d44-be2b-35edc80b747e"], +Cell[195154, 5194, 193, 2, 33, "Output",ExpressionUUID->"7da57aa3-d8a1-4af7-9ad1-e350e05da525"] }, Open ]], Cell[CellGroupData[{ -Cell[200766, 5559, 368, 9, 53, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], -Cell[201137, 5570, 170, 3, 41, "Output",ExpressionUUID->"bb399ae8-0971-524b-99dd-45c3d83aff90"] +Cell[195384, 5201, 364, 8, 41, "Input",ExpressionUUID->"704b3c24-9edf-9847-9c42-8465e74541cc"], +Cell[195751, 5211, 191, 2, 33, "Output",ExpressionUUID->"2b02c114-f900-4bf2-9179-5cd433c80883"] }, Open ]], Cell[CellGroupData[{ -Cell[201344, 5578, 2663, 88, 435, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], -Cell[204010, 5668, 171, 3, 41, "Output",ExpressionUUID->"8522d772-b29b-b14d-a623-3ad00b3d8250"] +Cell[195979, 5218, 6118, 186, 474, "Input",ExpressionUUID->"b50c0284-d41c-284c-8171-8cbe39582f6c"], +Cell[202100, 5406, 190, 2, 33, "Output",ExpressionUUID->"27596e41-dbd8-4e40-a565-92675600a006"] }, Open ]], Cell[CellGroupData[{ -Cell[204218, 5676, 2603, 85, 435, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], -Cell[206824, 5763, 173, 3, 41, "Output",ExpressionUUID->"d88ed30c-77e3-0245-b8d9-3b803c379fb2"] +Cell[202327, 5413, 364, 8, 41, "Input",ExpressionUUID->"07cc88c3-42d6-f146-9350-08b2ef6c27de"], +Cell[202694, 5423, 188, 2, 33, "Output",ExpressionUUID->"d9cf8570-ac30-4ed6-9e70-b6ab18903c63"] }, Open ]], Cell[CellGroupData[{ -Cell[207034, 5771, 3712, 118, 575, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], -Cell[210749, 5891, 174, 3, 41, "Output",ExpressionUUID->"5d391006-3707-3d44-a060-c06781a98edd"] +Cell[202919, 5430, 2659, 87, 285, "Input",ExpressionUUID->"2ab7eef6-afa8-a34a-8b53-21d03476bf5f"], +Cell[205581, 5519, 190, 2, 33, "Output",ExpressionUUID->"aacf4a2a-be2d-47d0-835b-6fc099b579a1"] }, Open ]], -Cell[210938, 5897, 138, 3, 36, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ -Cell[211101, 5904, 2054, 59, 276, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], -Cell[213158, 5965, 557, 12, 98, "Message",ExpressionUUID->"055bf31f-37b2-724c-aeef-d922f7a205c7"], -Cell[213718, 5979, 559, 12, 98, "Message",ExpressionUUID->"eeead3e4-54a5-7c4d-95b2-292dcdbe105a"], -Cell[214280, 5993, 561, 12, 98, "Message",ExpressionUUID->"87e34a07-7a78-bf46-b222-6e72d11fd18d"], -Cell[214844, 6007, 458, 10, 32, "Message",ExpressionUUID->"1cf9faa5-3432-3349-b45a-58344623fc63"], -Cell[215305, 6019, 172, 3, 41, "Output",ExpressionUUID->"acb58738-85fd-0f40-b8fa-3a779aa79369"] +Cell[205808, 5526, 2599, 84, 211, "Input",ExpressionUUID->"c5d886fd-19b3-9b4b-9b9c-cbf18c46b360"], +Cell[208410, 5612, 192, 2, 33, "Output",ExpressionUUID->"8fe1900b-2de1-46c7-8b79-6a3f2d1c257f"] }, Open ]], Cell[CellGroupData[{ -Cell[215514, 6027, 2052, 59, 276, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], -Cell[217569, 6088, 555, 12, 98, "Message",ExpressionUUID->"6fb03e9c-623b-b24d-bccd-c05b2662537c"], -Cell[218127, 6102, 559, 12, 98, "Message",ExpressionUUID->"410ed293-2b04-a346-b193-5e006759c884"], -Cell[218689, 6116, 561, 12, 98, "Message",ExpressionUUID->"9e59cf72-2df3-6741-910e-ddcc2125aa8b"], -Cell[219253, 6130, 458, 10, 32, "Message",ExpressionUUID->"6f223de4-f4b9-0a4c-b3b3-f489f4259713"], -Cell[219714, 6142, 172, 3, 41, "Output",ExpressionUUID->"d8300689-0813-6149-9a7f-c358ba826aac"] +Cell[208639, 5619, 3708, 117, 327, "Input",ExpressionUUID->"ec07379d-30cf-cb4d-90d8-d72f9b6a44a8"], +Cell[212350, 5738, 192, 2, 33, "Output",ExpressionUUID->"a8927345-3c94-4f82-8c5a-45404b8efd1c"] }, Open ]], +Cell[212557, 5743, 160, 3, 70, "Input",ExpressionUUID->"714abd93-e0d1-eb45-a9e1-7a2f5d020eb1"], Cell[CellGroupData[{ -Cell[219923, 6150, 1936, 53, 232, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], -Cell[221862, 6205, 20458, 382, 296, "Output",ExpressionUUID->"a7dc53c9-dabc-784f-a94a-f1fb7ab10c84"] +Cell[212742, 5750, 2073, 58, 234, "Input",ExpressionUUID->"137c38a2-741c-bd43-b6d9-c0135e32eaf8"], +Cell[214818, 5810, 605, 13, 65, "Message",ExpressionUUID->"f7629634-5a3c-4e16-89bc-38091826305f"], +Cell[215426, 5825, 607, 13, 82, "Message",ExpressionUUID->"da16cb71-5e7c-4354-a327-4e63d78bdd7d"], +Cell[216036, 5840, 611, 13, 82, "Message",ExpressionUUID->"bab04f9a-4b18-4666-b0be-daa2cfe1a85d"], +Cell[216650, 5855, 492, 11, 26, "Message",ExpressionUUID->"1017c023-7158-43f6-9a6e-3516be8bc93c"], +Cell[217145, 5868, 189, 2, 33, "Output",ExpressionUUID->"cda5a11c-e402-474f-9000-0540ab44dc28"] }, Open ]], Cell[CellGroupData[{ -Cell[242357, 6592, 2094, 60, 311, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], -Cell[244454, 6654, 500, 11, 71, "Message",ExpressionUUID->"eede1010-35b4-8e43-8206-4c3ebae733c0"], -Cell[244957, 6667, 503, 11, 71, "Message",ExpressionUUID->"01174b23-a2bd-8e4e-90f5-af7e82df101e"], -Cell[245463, 6680, 506, 11, 71, "Message",ExpressionUUID->"ec7385ad-4809-8947-afea-81e4a95fc523"], -Cell[245972, 6693, 455, 10, 32, "Message",ExpressionUUID->"4176ecfe-3aff-0f4b-824e-b07e40312968"], -Cell[246430, 6705, 57321, 985, 290, "Output",ExpressionUUID->"6ef8802e-494c-9d4c-94ba-3ee854b2b684"] +Cell[217371, 5875, 2071, 58, 234, "Input",ExpressionUUID->"9b196534-2ca5-e54b-8014-b0ab3cd09ac2"], +Cell[219445, 5935, 601, 13, 65, "Message",ExpressionUUID->"d54493a4-d55f-4bfb-ad44-f8bba2e967d9"], +Cell[220049, 5950, 607, 13, 82, "Message",ExpressionUUID->"b2446eca-d628-43b1-a22a-fbc078b4be58"], +Cell[220659, 5965, 609, 13, 82, "Message",ExpressionUUID->"6c51da7c-14b1-45c7-893a-d0d6343d92f3"], +Cell[221271, 5980, 490, 11, 26, "Message",ExpressionUUID->"5c6c03b3-ce09-461a-9d5f-9e0a3d6e4931"], +Cell[221764, 5993, 190, 2, 33, "Output",ExpressionUUID->"cea6a916-7567-4239-a845-38348d90b69b"] }, Open ]], -Cell[303766, 7693, 2455, 69, 296, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], -Cell[306224, 7764, 209, 5, 36, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], Cell[CellGroupData[{ -Cell[306458, 7773, 217, 7, 61, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], -Cell[306678, 7782, 172, 3, 41, "Output",ExpressionUUID->"bea5e069-6c61-f84f-be94-f0a852e2aafc"] +Cell[221991, 6000, 1955, 52, 102, "Input",ExpressionUUID->"124cd7db-c537-8943-bef2-1a154ab4a709"], +Cell[223949, 6054, 20462, 385, 236, "Output",ExpressionUUID->"28156c15-8ead-496c-8d7a-2e70234fddd4"] }, Open ]], Cell[CellGroupData[{ -Cell[306887, 7790, 1816, 53, 311, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], -Cell[308706, 7845, 508, 11, 71, "Message",ExpressionUUID->"3a61d965-a130-7645-90c6-a5061b94ec40"], -Cell[309217, 7858, 508, 11, 71, "Message",ExpressionUUID->"c3c0d10c-aa86-9b43-bfa9-71bc099863f1"], -Cell[309728, 7871, 511, 11, 71, "Message",ExpressionUUID->"321e1ff2-86f6-7244-895a-0b744ecd0cf1"], -Cell[310242, 7884, 456, 10, 32, "Message",ExpressionUUID->"43e0f399-4fd6-3f4d-a3a8-ef137bebb344"], -Cell[310701, 7896, 26000, 472, 291, "Output",ExpressionUUID->"4e674430-b3ee-f841-98e7-88500054cf35"] +Cell[244448, 6444, 2113, 59, 261, "Input",ExpressionUUID->"5a7f9400-1446-9746-a463-bade8ae5c530"], +Cell[246564, 6505, 536, 12, 58, "Message",ExpressionUUID->"de2c7641-560d-446b-b078-16b2f84f9887"], +Cell[247103, 6519, 541, 12, 58, "Message",ExpressionUUID->"7582ac36-8140-4b0d-b1a7-8ff003d63a23"], +Cell[247647, 6533, 546, 12, 58, "Message",ExpressionUUID->"1a91357c-3e69-4d5c-8b83-615266b5eb50"], +Cell[248196, 6547, 493, 11, 26, "Message",ExpressionUUID->"5b5c772b-d70a-46c7-858c-f9a9b5f7f4d7"], +Cell[248692, 6560, 25201, 461, 232, "Output",ExpressionUUID->"7652f25c-f3f1-4ab7-badf-035bcc03ef4e"] }, Open ]], Cell[CellGroupData[{ -Cell[336738, 8373, 1616, 48, 132, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], -Cell[338357, 8423, 584, 12, 118, "Message",ExpressionUUID->"6dc439d9-4983-a74d-a424-1e627442f8ec"], -Cell[338944, 8437, 588, 12, 118, "Message",ExpressionUUID->"cbbb0a14-cac3-b246-be52-03554c6d0159"], -Cell[339535, 8451, 592, 12, 118, "Message",ExpressionUUID->"afaf59d8-5c82-5843-ba76-5dd1061c22bd"], -Cell[340130, 8465, 456, 10, 32, "Message",ExpressionUUID->"370cb98e-1084-6940-9e45-78218dc7334e"], -Cell[340589, 8477, 169, 3, 41, "Output",ExpressionUUID->"49c1839c-f9a0-514a-9803-38aedd206508"] +Cell[273930, 7026, 2477, 69, 169, "Input",ExpressionUUID->"0f83f761-b16d-5343-987d-511095eaf120"], +Cell[276410, 7097, 9518, 222, 239, "Output",ExpressionUUID->"18f024bb-7c6f-4053-b670-c3a50b4d8e6f"] }, Open ]], Cell[CellGroupData[{ -Cell[340795, 8485, 2249, 64, 348, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], -Cell[343047, 8551, 555, 12, 98, "Message",ExpressionUUID->"e4da2c2e-bc79-8048-aec6-e0a36c5fd50c"], -Cell[343605, 8565, 557, 12, 136, "Message",ExpressionUUID->"ff48d9a8-4f15-044a-8d17-d378e560badf"], -Cell[344165, 8579, 563, 12, 136, "Message",ExpressionUUID->"d97cd881-ad70-0043-811a-b6650c7bff48"], -Cell[344731, 8593, 458, 10, 136, "Message",ExpressionUUID->"dc1ff9fc-c736-e742-9bd5-f36a7c2c6c53"], -Cell[345192, 8605, 173, 3, 41, "Output",ExpressionUUID->"207fc206-b3fa-1a42-8709-2c8aaaf304b0"] +Cell[285965, 7324, 228, 4, 29, "Input",ExpressionUUID->"8cdd4baa-f7c9-104e-b978-89d3982ba28f"], +Cell[286196, 7330, 31585, 593, 232, "Output",ExpressionUUID->"74e5404a-eb6e-4049-af67-fbd4d1fd8fb4"] }, Open ]], Cell[CellGroupData[{ -Cell[345402, 8613, 2223, 64, 348, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], -Cell[347628, 8679, 555, 12, 98, "Message",ExpressionUUID->"079487fc-3029-b74e-ba27-a61cf73f30a2"], -Cell[348186, 8693, 557, 12, 98, "Message",ExpressionUUID->"6fef6245-eafb-7343-8d9c-509c47662fd8"], -Cell[348746, 8707, 561, 12, 98, "Message",ExpressionUUID->"caeb451e-fce0-a24e-bdb2-20066bf32e23"], -Cell[349310, 8721, 458, 10, 32, "Message",ExpressionUUID->"b9263c45-06ba-d24d-a71c-72933a67fb86"], -Cell[349771, 8733, 173, 3, 41, "Output",ExpressionUUID->"fdc26e81-7e73-a54e-8b48-fba744fd21b7"] +Cell[317818, 7928, 236, 6, 47, "Input",ExpressionUUID->"a6bdfe4c-4a7c-8e4d-9fae-3438788b15d6"], +Cell[318057, 7936, 192, 2, 33, "Output",ExpressionUUID->"82e46288-9b53-46f8-94e6-1096726147d0"] }, Open ]], Cell[CellGroupData[{ -Cell[349981, 8741, 2221, 64, 348, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], -Cell[352205, 8807, 557, 12, 98, "Message",ExpressionUUID->"3270b87e-9743-ef45-96a4-2ce51373a203"], -Cell[352765, 8821, 557, 12, 98, "Message",ExpressionUUID->"b5a7511b-af1a-b946-83d4-1951541611b2"], -Cell[353325, 8835, 563, 12, 98, "Message",ExpressionUUID->"55836c22-e074-4442-9aa3-8442534fcabe"], -Cell[353891, 8849, 456, 10, 32, "Message",ExpressionUUID->"18c3aa33-3860-5f41-a9ac-8cd3806fef7e"], -Cell[354350, 8861, 173, 3, 41, "Output",ExpressionUUID->"62510f7e-bac9-8b4e-86ce-182bdd5d56b9"] +Cell[318286, 7943, 1835, 52, 190, "Input",ExpressionUUID->"ad0a082a-b3e1-c24a-a78f-0e75880d5d98"], +Cell[320124, 7997, 547, 12, 58, "Message",ExpressionUUID->"d006d268-19a3-492e-9c74-313fa3a0f65c"], +Cell[320674, 8011, 548, 12, 58, "Message",ExpressionUUID->"47bb900d-bac0-419a-a526-f98d2a5db804"], +Cell[321225, 8025, 550, 12, 58, "Message",ExpressionUUID->"12b3d03a-bc9a-4e40-a559-f6b63f3757ac"], +Cell[321778, 8039, 495, 11, 26, "Message",ExpressionUUID->"3ec064e3-ef4f-4b4e-a4d1-a317d822f77f"], +Cell[322276, 8052, 25567, 467, 233, "Output",ExpressionUUID->"311598dd-5f89-4613-b239-2f55db85f9c3"] }, Open ]], Cell[CellGroupData[{ -Cell[354560, 8869, 213, 6, 136, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], -Cell[354776, 8877, 171, 3, 136, "Output",ExpressionUUID->"5c7cd89e-20ed-8d44-83bb-e2e46deab974"] +Cell[347880, 8524, 1616, 48, 104, "Input",ExpressionUUID->"1c8deee8-e2d9-7740-b66c-f8a09d0bcc49"], +Cell[349499, 8574, 728, 15, 63, "Message",ExpressionUUID->"dff970a8-c181-4f48-9e41-60b642fb5a5e"], +Cell[350230, 8591, 726, 15, 63, "Message",ExpressionUUID->"8e14a70d-dff9-4861-a0a1-3083fcc30c53"], +Cell[350959, 8608, 729, 15, 63, "Message",ExpressionUUID->"5d2277ad-266b-440b-a2e7-3dccb1afca4e"], +Cell[351691, 8625, 497, 11, 26, "Message",ExpressionUUID->"556a0b9c-cec3-4d65-9f15-9ccb73a8b30c"], +Cell[352191, 8638, 190, 3, 33, "Output",ExpressionUUID->"7dc89893-1a30-4fcc-aa86-2ffcff999a6c"] }, Open ]], -Cell[354962, 8883, 245, 5, 136, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ -Cell[355232, 8892, 558, 19, 66, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], -Cell[355793, 8913, 172, 3, 41, "Output",ExpressionUUID->"e3d357af-87e3-0047-959d-fa0139c5bfc4"] +Cell[352418, 8646, 2272, 64, 212, "Input",ExpressionUUID->"eb852908-4d60-c84e-80d9-a57fd4094f56"], +Cell[354693, 8712, 602, 13, 65, "Message",ExpressionUUID->"70638b56-33d3-4a12-a52b-fa529f5100b4"], +Cell[355298, 8727, 608, 13, 82, "Message",ExpressionUUID->"51f52217-6038-465d-8eab-4812ef9191a1"], +Cell[355909, 8742, 610, 13, 82, "Message",ExpressionUUID->"e7397a69-ed93-49a1-a2e3-79ceaac93e68"], +Cell[356522, 8757, 493, 11, 26, "Message",ExpressionUUID->"971d113f-a3b7-4085-b329-b63d84e3f966"], +Cell[357018, 8770, 197, 3, 33, "Output",ExpressionUUID->"350f2b92-f259-495d-889f-c772497e0e8d"] }, Open ]], Cell[CellGroupData[{ -Cell[356002, 8921, 170, 5, 71, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], -Cell[356175, 8928, 173, 3, 41, "Output",ExpressionUUID->"93dda073-df54-8f4e-afab-666de5caf927"] +Cell[357252, 8778, 2235, 63, 212, "Input",ExpressionUUID->"d11037f6-09e7-b44f-8a1d-47c1a485c608"], +Cell[359490, 8843, 606, 13, 65, "Message",ExpressionUUID->"7a573205-78af-44b9-a7b4-bd9c86a53719"], +Cell[360099, 8858, 608, 13, 82, "Message",ExpressionUUID->"9e0aa220-a164-43ce-a42d-14782330a13f"], +Cell[360710, 8873, 610, 13, 82, "Message",ExpressionUUID->"c3dcea5a-2ad5-45ec-9e78-ca7a4a545390"], +Cell[361323, 8888, 493, 11, 26, "Message",ExpressionUUID->"74eb4838-2f75-45e1-b7fd-80c1b3c0dac2"], +Cell[361819, 8901, 197, 3, 33, "Output",ExpressionUUID->"57617ca9-5e93-442d-adf9-23fadbc15ea5"] }, Open ]], Cell[CellGroupData[{ -Cell[356385, 8936, 181, 5, 55, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], -Cell[356569, 8943, 173, 3, 41, "Output",ExpressionUUID->"db5e4010-00e8-574c-8b32-365b8147ba2d"] +Cell[362053, 8909, 2233, 63, 212, "Input",ExpressionUUID->"431dd2fa-6331-2449-bc19-0d79e6ed8953"], +Cell[364289, 8974, 606, 13, 65, "Message",ExpressionUUID->"6f445d9a-98bd-4fb5-ac76-f4a9af17d65a"], +Cell[364898, 8989, 610, 13, 82, "Message",ExpressionUUID->"a953c00a-5139-457e-b6e5-13b7f8fd390a"], +Cell[365511, 9004, 614, 13, 82, "Message",ExpressionUUID->"a06e95ea-f242-4236-b771-53f086cc147e"], +Cell[366128, 9019, 497, 11, 26, "Message",ExpressionUUID->"059f1bf1-077e-474f-b818-983a80caa2ac"], +Cell[366628, 9032, 194, 3, 33, "Output",ExpressionUUID->"2afabfb4-863c-4f57-8654-478b8b71a9c7"] }, Open ]], Cell[CellGroupData[{ -Cell[356779, 8951, 6055, 185, 831, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], -Cell[362837, 9138, 172, 3, 41, "Output",ExpressionUUID->"6f5204f9-42a7-0343-a2cd-76cd7618ba90"] +Cell[366859, 9040, 236, 6, 46, "Input",ExpressionUUID->"8c5df121-e0b9-a146-bc34-b231aa8028b9"], +Cell[367098, 9048, 195, 3, 33, "Output",ExpressionUUID->"7b5f3ec9-839f-4cd2-b070-7646f55059e9"] }, Open ]], +Cell[367308, 9054, 271, 6, 70, "Input",ExpressionUUID->"831a27fc-89ff-e041-97f1-0ec5d19a7879"], Cell[CellGroupData[{ -Cell[363046, 9146, 368, 9, 53, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], -Cell[363417, 9157, 170, 3, 41, "Output",ExpressionUUID->"732feb85-572c-6a40-bb32-258aa6fbb12e"] +Cell[367604, 9064, 558, 19, 51, "Input",ExpressionUUID->"b17f1d2b-46b4-044f-9374-ae2c39a712ad"], +Cell[368165, 9085, 194, 3, 33, "Output",ExpressionUUID->"6ff15d72-1f6c-423c-ac54-9af0413f8221"] }, Open ]], Cell[CellGroupData[{ -Cell[363624, 9165, 6122, 187, 900, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], -Cell[369749, 9354, 175, 3, 41, "Output",ExpressionUUID->"330db3dd-df0f-5e4b-9e84-63e3da6287e1"] +Cell[368396, 9093, 170, 5, 55, "Input",ExpressionUUID->"23445e92-9763-c74c-8bec-d0e2df1f17fd"], +Cell[368569, 9100, 192, 3, 33, "Output",ExpressionUUID->"8cdee93e-1b8f-4126-b3bc-4f762b635887"] }, Open ]], Cell[CellGroupData[{ -Cell[369961, 9362, 368, 9, 53, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], -Cell[370332, 9373, 172, 3, 41, "Output",ExpressionUUID->"8403ef7a-5add-ea45-a6c0-a6dc70f27bb8"] +Cell[368798, 9108, 181, 5, 43, "Input",ExpressionUUID->"a53d2e90-8341-eb44-998b-2f0c92fdc24f"], +Cell[368982, 9115, 195, 3, 33, "Output",ExpressionUUID->"20d20272-2ba1-4df6-91c3-30daf889247a"] }, Open ]], Cell[CellGroupData[{ -Cell[370541, 9381, 2663, 88, 435, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], -Cell[373207, 9471, 173, 3, 41, "Output",ExpressionUUID->"aac00e4f-5d2b-4341-8ca5-f49d9556633e"] +Cell[369214, 9123, 6055, 185, 474, "Input",ExpressionUUID->"ccadfb81-e638-7c48-a12b-1acebb056ffc"], +Cell[375272, 9310, 195, 3, 33, "Output",ExpressionUUID->"c764e0a9-f9dd-4d58-9fd6-3af394a1ee7a"] }, Open ]], Cell[CellGroupData[{ -Cell[373417, 9479, 2603, 85, 435, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], -Cell[376023, 9566, 171, 3, 41, "Output",ExpressionUUID->"eeee5a47-9547-7746-bb79-936b40364d7e"] +Cell[375504, 9318, 368, 9, 41, "Input",ExpressionUUID->"8d558815-0185-1c41-a246-d7954cb6ecc3"], +Cell[375875, 9329, 192, 3, 33, "Output",ExpressionUUID->"20ddb522-3299-4cf9-af01-e7b0f6148284"] }, Open ]], Cell[CellGroupData[{ -Cell[376231, 9574, 3712, 118, 575, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], -Cell[379946, 9694, 174, 3, 41, "Output",ExpressionUUID->"a1352554-6686-ff4e-be47-04b42c29b000"] +Cell[376104, 9337, 6122, 187, 474, "Input",ExpressionUUID->"2f52a487-744a-114c-ab74-c1ad0705fd4f"], +Cell[382229, 9526, 196, 3, 33, "Output",ExpressionUUID->"5d265c3a-2989-43d3-bd15-697b2747f7d1"] }, Open ]], Cell[CellGroupData[{ -Cell[380157, 9702, 2052, 59, 276, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], -Cell[382212, 9763, 578, 12, 98, "Message",ExpressionUUID->"c854318c-035d-f249-9a8c-a9608e137436"], -Cell[382793, 9777, 583, 12, 98, "Message",ExpressionUUID->"fc1eef58-3b5b-8c4c-bab7-60a3682b1d45"], -Cell[383379, 9791, 586, 12, 118, "Message",ExpressionUUID->"2e134293-05b5-624c-b206-73b12a84c5ea"], -Cell[383968, 9805, 456, 10, 32, "Message",ExpressionUUID->"2cac2ff4-fc29-a048-9fae-70918ed41968"], -Cell[384427, 9817, 170, 3, 41, "Output",ExpressionUUID->"2dcc4178-0b8d-9f48-a040-f2fc5cb8eacd"] +Cell[382462, 9534, 368, 9, 41, "Input",ExpressionUUID->"777a2a57-6673-2d4a-9bc5-5f7a4fb7ccd3"], +Cell[382833, 9545, 194, 3, 33, "Output",ExpressionUUID->"03291926-6751-452d-b4b3-8e9cb49f6fbb"] }, Open ]], Cell[CellGroupData[{ -Cell[384634, 9825, 2054, 59, 276, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], -Cell[386691, 9886, 576, 12, 98, "Message",ExpressionUUID->"ac808335-5ecc-ee4f-a7ac-d889b0bf6e05"], -Cell[387270, 9900, 581, 12, 98, "Message",ExpressionUUID->"36b7d718-32d9-a441-b985-1fed8f0f10fd"], -Cell[387854, 9914, 586, 12, 118, "Message",ExpressionUUID->"ab31a569-fab4-434a-9c76-33aa9b59b117"], -Cell[388443, 9928, 458, 10, 32, "Message",ExpressionUUID->"4c41e56d-f5cb-b94c-b99a-06e306247825"], -Cell[388904, 9940, 172, 3, 41, "Output",ExpressionUUID->"5ec230cf-b87d-3e41-bc7f-1f3f2ff283ef"] +Cell[383064, 9553, 2663, 88, 285, "Input",ExpressionUUID->"5480a6f0-90af-ba47-ae64-514b75e548e0"], +Cell[385730, 9643, 198, 3, 33, "Output",ExpressionUUID->"ae02b0f3-8921-4458-a725-875afa78b00d"] }, Open ]], Cell[CellGroupData[{ -Cell[389113, 9948, 2028, 55, 232, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], -Cell[391144, 10005, 20011, 378, 296, "Output",ExpressionUUID->"3d0b6a0d-2dc0-3b48-b8dd-35b5149ee27f"] +Cell[385965, 9651, 2603, 85, 211, "Input",ExpressionUUID->"55b6d7ba-bf5b-5646-8cf8-bca832676880"], +Cell[388571, 9738, 191, 3, 33, "Output",ExpressionUUID->"5ccd6e36-e231-46f6-955b-4695247c510a"] }, Open ]], Cell[CellGroupData[{ -Cell[411192, 10388, 2115, 60, 136, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], -Cell[413310, 10450, 501, 11, 136, "Message",ExpressionUUID->"abf9cb8a-fbbf-7a43-abcd-82efb32ab217"], -Cell[413814, 10463, 503, 11, 136, "Message",ExpressionUUID->"8fcd13e3-81e0-3446-8882-6e42ca5c0bd1"], -Cell[414320, 10476, 505, 11, 71, "Message",ExpressionUUID->"2c23ed60-41ee-5841-90ce-1d26cb02619d"], -Cell[414828, 10489, 456, 10, 32, "Message",ExpressionUUID->"fa59df63-76ff-4147-acd0-9eeaf33582c5"], -Cell[415287, 10501, 32548, 580, 290, "Output",ExpressionUUID->"4ab96fbd-92e0-8a42-8552-436bb2f629b6"] +Cell[388799, 9746, 3712, 118, 327, "Input",ExpressionUUID->"8892e253-22ef-c549-b47f-a2b51d55da4c"], +Cell[392514, 9866, 196, 3, 33, "Output",ExpressionUUID->"62da88eb-e67b-40b4-90c5-7cd0bb87dcb7"] }, Open ]], -Cell[447850, 11084, 209, 5, 36, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], Cell[CellGroupData[{ -Cell[448084, 11093, 1616, 48, 132, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], -Cell[449703, 11143, 596, 12, 118, "Message",ExpressionUUID->"3273c967-a8f4-6b46-8292-dfd9dc69311d"], -Cell[450302, 11157, 599, 12, 118, "Message",ExpressionUUID->"cf5457ae-7056-8a4b-afa3-32b95e922259"], -Cell[450904, 11171, 605, 12, 118, "Message",ExpressionUUID->"7ef79528-2ca4-544d-8bbf-e4564533e47a"], -Cell[451512, 11185, 456, 10, 136, "Message",ExpressionUUID->"3f59bf2a-0193-1b41-9437-359e4e291f20"], -Cell[451971, 11197, 170, 3, 136, "Output",ExpressionUUID->"6c94ff26-1921-5a44-a360-bda32f564938"] +Cell[392747, 9874, 2075, 59, 234, "Input",ExpressionUUID->"220bdeed-2e17-e94c-a7b0-3e066daf15d7"], +Cell[394825, 9935, 602, 13, 65, "Message",ExpressionUUID->"dd2a785f-6cdb-44d9-89b7-826bc71e8794"], +Cell[395430, 9950, 604, 13, 65, "Message",ExpressionUUID->"156a1c74-18fe-44ef-ae39-7c7ac5a6d719"], +Cell[396037, 9965, 606, 13, 82, "Message",ExpressionUUID->"cf5e6a7b-c0aa-4820-82a8-235fdbf00589"], +Cell[396646, 9980, 495, 11, 26, "Message",ExpressionUUID->"f86dbf2e-001b-46fa-a9ed-df35e778d197"], +Cell[397144, 9993, 190, 3, 33, "Output",ExpressionUUID->"b747b8a1-2ecf-4957-8b1f-74074c20105e"] }, Open ]], Cell[CellGroupData[{ -Cell[452178, 11205, 2247, 64, 136, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], -Cell[454428, 11271, 580, 12, 136, "Message",ExpressionUUID->"33abd0dc-5204-1046-87c9-87cecac6793f"], -Cell[455011, 11285, 583, 12, 136, "Message",ExpressionUUID->"a3e9f415-30c2-d04b-a044-33980d6ef6e9"], -Cell[455597, 11299, 584, 12, 136, "Message",ExpressionUUID->"3dddc3ab-89f8-ab44-a85d-f5130722f198"], -Cell[456184, 11313, 458, 10, 136, "Message",ExpressionUUID->"a3229605-5a49-544b-bbf6-cc14edd6c936"], -Cell[456645, 11325, 170, 3, 136, "Output",ExpressionUUID->"2f0f984a-e452-7f46-a8f1-230feda2f30b"] +Cell[397371, 10001, 2077, 59, 234, "Input",ExpressionUUID->"b8791a07-33fe-8c4f-9c59-dd23af9a4471"], +Cell[399451, 10062, 600, 13, 65, "Message",ExpressionUUID->"160fff56-5b76-413d-81e9-417468564b6e"], +Cell[400054, 10077, 602, 13, 65, "Message",ExpressionUUID->"53d11800-4af1-455b-acd5-f4ffce9ff2b7"], +Cell[400659, 10092, 605, 13, 82, "Message",ExpressionUUID->"f4666904-51e3-42c8-ae65-eacafd9cc81d"], +Cell[401267, 10107, 491, 11, 26, "Message",ExpressionUUID->"edf70a46-21fd-415c-b734-a69572fd53d4"], +Cell[401761, 10120, 197, 3, 33, "Output",ExpressionUUID->"77237591-7d32-489e-b3d6-1acae333c36d"] }, Open ]], Cell[CellGroupData[{ -Cell[456852, 11333, 2219, 64, 348, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], -Cell[459074, 11399, 580, 12, 98, "Message",ExpressionUUID->"1a479ad6-386a-fb47-95e4-f8a3ab25eccc"], -Cell[459657, 11413, 583, 12, 98, "Message",ExpressionUUID->"c45746b8-a614-4245-b137-e38355d43857"], -Cell[460243, 11427, 586, 12, 118, "Message",ExpressionUUID->"7ef9264b-fdf5-8e46-a39d-9d01a56d9fbc"], -Cell[460832, 11441, 458, 10, 32, "Message",ExpressionUUID->"424cc344-67bf-5349-951a-e3d6864f9105"], -Cell[461293, 11453, 171, 3, 41, "Output",ExpressionUUID->"d6fb3ea3-39a2-5b42-96f2-520a52fd0d9f"] +Cell[401995, 10128, 2051, 55, 151, "Input",ExpressionUUID->"3fe6e7f1-b44a-234f-af77-3cf1fdaf28d9"], +Cell[404049, 10185, 20359, 383, 236, "Output",ExpressionUUID->"f2b2bbcf-6393-44f9-9370-23d46faa424c"] }, Open ]], Cell[CellGroupData[{ -Cell[461501, 11461, 2221, 64, 348, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], -Cell[463725, 11527, 580, 12, 98, "Message",ExpressionUUID->"7c3b7078-d094-2344-a157-26438223ef0f"], -Cell[464308, 11541, 583, 12, 136, "Message",ExpressionUUID->"a4aaa457-e588-7a42-9066-29e614b18d91"], -Cell[464894, 11555, 584, 12, 136, "Message",ExpressionUUID->"8e9701ac-9508-2346-b853-523f9f269328"], -Cell[465481, 11569, 456, 10, 136, "Message",ExpressionUUID->"062aadbd-03a7-1f42-b815-d27ae6ddc83e"], -Cell[465940, 11581, 170, 3, 41, "Output",ExpressionUUID->"484b070c-cc4a-7049-8a18-4aa38bea8cd9"] +Cell[424445, 10573, 2138, 60, 261, "Input",ExpressionUUID->"ab29778f-f183-804b-b871-4070462057d7"], +Cell[426586, 10635, 539, 12, 58, "Message",ExpressionUUID->"4aac9e9f-074f-43db-b36a-ba8f3591359e"], +Cell[427128, 10649, 543, 12, 58, "Message",ExpressionUUID->"b552b72a-2f89-449e-a85d-271cd24f0f5b"], +Cell[427674, 10663, 545, 12, 58, "Message",ExpressionUUID->"c8bb4639-3b71-4977-b320-3e701bc58870"], +Cell[428222, 10677, 497, 11, 26, "Message",ExpressionUUID->"e198a8bf-7272-47b4-80f5-39474d034aa5"], +Cell[428722, 10690, 25973, 474, 235, "Output",ExpressionUUID->"33eeeba7-2a93-479a-b2c5-35833718e2f1"] }, Open ]], Cell[CellGroupData[{ -Cell[466147, 11589, 213, 6, 60, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], -Cell[466363, 11597, 174, 3, 41, "Output",ExpressionUUID->"8b85bd5c-200a-cc44-9db5-38c5efe118ad"] +Cell[454732, 11169, 232, 5, 29, "Input",ExpressionUUID->"ad6dcd2f-3ce0-9c4b-b47a-6bd251746ea6"], +Cell[454967, 11176, 32357, 606, 235, "Output",ExpressionUUID->"7ce15b32-92d5-4163-92cf-f752e5b64d56"] }, Open ]], -Cell[466552, 11603, 247, 5, 36, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ -Cell[466824, 11612, 558, 19, 66, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], -Cell[467385, 11633, 173, 3, 41, "Output",ExpressionUUID->"ddfcd06d-5644-fb4b-b789-815d8db71ce6"] +Cell[487361, 11787, 1616, 48, 104, "Input",ExpressionUUID->"66a026c1-613e-554d-9430-1b2806502adf"], +Cell[488980, 11837, 728, 15, 63, "Message",ExpressionUUID->"8794110b-d87d-4d1f-b36b-d0f46f43bede"], +Cell[489711, 11854, 728, 15, 63, "Message",ExpressionUUID->"5d42644b-5294-47bd-9ec7-28343dda933d"], +Cell[490442, 11871, 725, 15, 63, "Message",ExpressionUUID->"f1b4e758-8a6b-438c-bbd0-0626c1318bfd"], +Cell[491170, 11888, 495, 11, 26, "Message",ExpressionUUID->"1e9753eb-9839-470f-8663-ee71341ac98d"], +Cell[491668, 11901, 190, 3, 33, "Output",ExpressionUUID->"1f374837-415f-4279-bd7f-a041514732b9"] }, Open ]], Cell[CellGroupData[{ -Cell[467595, 11641, 170, 5, 71, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], -Cell[467768, 11648, 173, 3, 41, "Output",ExpressionUUID->"96020250-b44c-694d-acbe-eb8b1c066e25"] +Cell[491895, 11909, 2270, 64, 212, "Input",ExpressionUUID->"5a0cc4bb-b2b0-c64c-958a-7a397847208f"], +Cell[494168, 11975, 604, 13, 65, "Message",ExpressionUUID->"f018c18e-7adf-408a-a45f-49e3b24a36f1"], +Cell[494775, 11990, 608, 13, 65, "Message",ExpressionUUID->"8bc35039-b7bf-467e-bfb4-0d18fb738bdb"], +Cell[495386, 12005, 611, 13, 82, "Message",ExpressionUUID->"98f023a3-e219-4659-b782-e941fcc645ad"], +Cell[496000, 12020, 497, 11, 26, "Message",ExpressionUUID->"43dcd9de-a711-4b5d-acf1-5c97dc723cbc"], +Cell[496500, 12033, 196, 3, 33, "Output",ExpressionUUID->"12d91135-6d15-4ff2-b2e0-6cbed3108c0b"] }, Open ]], Cell[CellGroupData[{ -Cell[467978, 11656, 181, 5, 55, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], -Cell[468162, 11663, 171, 3, 41, "Output",ExpressionUUID->"a3cad59a-97f1-1b4b-a0d3-0fcbb55e71c0"] +Cell[496733, 12041, 2231, 63, 212, "Input",ExpressionUUID->"22b50200-0b82-dc47-9932-f1f0210d6caf"], +Cell[498967, 12106, 604, 13, 65, "Message",ExpressionUUID->"a92fddfa-d415-4670-935c-3683649f55b9"], +Cell[499574, 12121, 606, 13, 65, "Message",ExpressionUUID->"1527a4e7-ca28-4b25-afdd-98a9d50a3668"], +Cell[500183, 12136, 611, 13, 82, "Message",ExpressionUUID->"9eaff94e-ece2-4428-8e75-90f8bd620e84"], +Cell[500797, 12151, 495, 11, 26, "Message",ExpressionUUID->"9f1c6bdb-43da-42d5-8471-63a2a0151158"], +Cell[501295, 12164, 193, 3, 33, "Output",ExpressionUUID->"1d311703-3a71-49d4-ad8d-31a4103dfc14"] }, Open ]], Cell[CellGroupData[{ -Cell[468370, 11671, 6055, 185, 831, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], -Cell[474428, 11858, 173, 3, 41, "Output",ExpressionUUID->"221426ad-3f43-834a-96dc-c22bf0ed0e23"] +Cell[501525, 12172, 2233, 63, 212, "Input",ExpressionUUID->"8a5105db-666c-444e-9451-d3e8d1574bcd"], +Cell[503761, 12237, 604, 13, 65, "Message",ExpressionUUID->"2d005cc3-13b1-45bc-b774-c054ec581718"], +Cell[504368, 12252, 606, 13, 65, "Message",ExpressionUUID->"5073d3b6-086c-419a-87e6-ed82308e96d8"], +Cell[504977, 12267, 611, 13, 82, "Message",ExpressionUUID->"422f30be-84f0-4bd5-ba35-8956485b2a9c"], +Cell[505591, 12282, 495, 11, 26, "Message",ExpressionUUID->"d47cdb15-3b49-466d-aef6-9660b62201a8"], +Cell[506089, 12295, 193, 3, 33, "Output",ExpressionUUID->"cf190480-b6ab-4a58-b1f9-8077f6ab4514"] }, Open ]], Cell[CellGroupData[{ -Cell[474638, 11866, 368, 9, 53, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], -Cell[475009, 11877, 172, 3, 41, "Output",ExpressionUUID->"54964f1a-0c74-5b45-a5d4-8b241885bf9d"] +Cell[506319, 12303, 236, 6, 46, "Input",ExpressionUUID->"d0efa798-230b-fa46-b413-76bfd8e40ccb"], +Cell[506558, 12311, 197, 3, 33, "Output",ExpressionUUID->"81b2c4c0-39bc-4754-bca9-08c0435a4d01"] }, Open ]], +Cell[506770, 12317, 273, 6, 70, "Input",ExpressionUUID->"f842f74e-f562-934a-9011-6604b8708636"], Cell[CellGroupData[{ -Cell[475218, 11885, 6122, 187, 900, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], -Cell[481343, 12074, 175, 3, 41, "Output",ExpressionUUID->"637b4460-08e1-2c47-b235-20b94d0413ac"] +Cell[507068, 12327, 558, 19, 51, "Input",ExpressionUUID->"ef577d34-3259-8244-8d7e-4d4166e096eb"], +Cell[507629, 12348, 194, 3, 33, "Output",ExpressionUUID->"f5045bd3-5b4e-4b1d-9bd1-0041d0b407d2"] }, Open ]], Cell[CellGroupData[{ -Cell[481555, 12082, 368, 9, 53, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], -Cell[481926, 12093, 171, 3, 41, "Output",ExpressionUUID->"55b9de35-b316-8a4b-b6c7-df263fdc91bc"] +Cell[507860, 12356, 170, 5, 55, "Input",ExpressionUUID->"a468af81-12e3-9d43-a104-6685f39c4664"], +Cell[508033, 12363, 194, 3, 33, "Output",ExpressionUUID->"45719723-020b-4fd0-8cc6-7df79478a220"] }, Open ]], Cell[CellGroupData[{ -Cell[482134, 12101, 2663, 88, 435, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], -Cell[484800, 12191, 173, 3, 41, "Output",ExpressionUUID->"fd2a841e-0c22-9146-97fa-d652989dadbe"] +Cell[508264, 12371, 181, 5, 43, "Input",ExpressionUUID->"cf41dfcd-ad77-3b43-8c5a-c343dfac6e7c"], +Cell[508448, 12378, 193, 3, 33, "Output",ExpressionUUID->"5e17c449-df5f-46e0-b25a-393aa0d58b60"] }, Open ]], Cell[CellGroupData[{ -Cell[485010, 12199, 2603, 85, 435, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], -Cell[487616, 12286, 171, 3, 41, "Output",ExpressionUUID->"94bd0f60-5228-9b42-83fe-23a478d55c7c"] +Cell[508678, 12386, 6055, 185, 474, "Input",ExpressionUUID->"9ca67d43-d599-5b4d-b0da-17e668defa6c"], +Cell[514736, 12573, 195, 3, 33, "Output",ExpressionUUID->"2ef3fe8c-a95c-4784-ba6b-8b2635ba0f76"] }, Open ]], Cell[CellGroupData[{ -Cell[487824, 12294, 3712, 118, 575, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], -Cell[491539, 12414, 174, 3, 41, "Output",ExpressionUUID->"fe51f341-63c7-8f47-9357-139cd58159ba"] +Cell[514968, 12581, 368, 9, 41, "Input",ExpressionUUID->"133a9d5a-6382-8444-adc7-845d12063729"], +Cell[515339, 12592, 195, 3, 33, "Output",ExpressionUUID->"38402ae8-9965-4327-b1d9-a2063dd4ef18"] }, Open ]], Cell[CellGroupData[{ -Cell[491750, 12422, 2054, 59, 276, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], -Cell[493807, 12483, 572, 12, 98, "Message",ExpressionUUID->"0e079558-1b2f-5a46-8c66-a9ee31993ddb"], -Cell[494382, 12497, 573, 12, 98, "Message",ExpressionUUID->"d148db97-53f1-5f42-bd2e-6e779140d5b6"], -Cell[494958, 12511, 579, 12, 98, "Message",ExpressionUUID->"186b0633-6992-1247-a396-6e446c898f15"], -Cell[495540, 12525, 456, 10, 32, "Message",ExpressionUUID->"81723359-f225-2c46-ac9d-0c5bbdaa253b"], -Cell[495999, 12537, 169, 3, 41, "Output",ExpressionUUID->"dfb1ce0b-e756-e84a-9724-ecf250122f19"] +Cell[515571, 12600, 6122, 187, 474, "Input",ExpressionUUID->"0bba09a8-dc3f-4d4e-9975-c4965bedba5a"], +Cell[521696, 12789, 196, 3, 33, "Output",ExpressionUUID->"4ef15649-c7e1-416f-a209-d6350b5ada1e"] }, Open ]], Cell[CellGroupData[{ -Cell[496205, 12545, 2049, 58, 276, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], -Cell[498257, 12605, 570, 12, 98, "Message",ExpressionUUID->"90df9b1f-7133-e445-8661-0af9d5feb8bd"], -Cell[498830, 12619, 575, 12, 98, "Message",ExpressionUUID->"93c48be2-5ad7-ad43-88e8-2c6ab8e2f132"], -Cell[499408, 12633, 579, 12, 136, "Message",ExpressionUUID->"cbcbafce-f556-944f-b5f3-9a75f9ae2725"], -Cell[499990, 12647, 458, 10, 136, "Message",ExpressionUUID->"83820e0a-b24a-cc46-bd5a-b19f0104c185"], -Cell[500451, 12659, 171, 3, 41, "Output",ExpressionUUID->"0d63c418-a50b-b94b-ad7d-1a46c6eb320d"] +Cell[521929, 12797, 368, 9, 41, "Input",ExpressionUUID->"dd25df10-1e06-da4b-ab21-bdad201f1706"], +Cell[522300, 12808, 192, 3, 33, "Output",ExpressionUUID->"9bc807eb-562d-4e7d-aad2-96fc7ec536d6"] }, Open ]], Cell[CellGroupData[{ -Cell[500659, 12667, 2030, 55, 232, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], -Cell[502692, 12724, 20011, 378, 295, "Output",ExpressionUUID->"a15038e3-a3ab-e64e-ad3b-e8cb09ec92a2"] +Cell[522529, 12816, 2663, 88, 285, "Input",ExpressionUUID->"c9ed9a65-8532-1d41-8213-a0bd40ace7df"], +Cell[525195, 12906, 196, 3, 33, "Output",ExpressionUUID->"bb0850a9-b518-4cf7-92db-7f5356cbdd8a"] }, Open ]], Cell[CellGroupData[{ -Cell[522740, 13107, 2120, 60, 311, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], -Cell[524863, 13169, 501, 11, 71, "Message",ExpressionUUID->"bf289d91-76e3-3e4e-937f-93db9b038d39"], -Cell[525367, 13182, 505, 11, 71, "Message",ExpressionUUID->"a52542a3-f03a-414f-86c8-3b114308924e"], -Cell[525875, 13195, 506, 11, 71, "Message",ExpressionUUID->"1c7104f0-99cd-c74c-b855-98253be62519"], -Cell[526384, 13208, 456, 10, 32, "Message",ExpressionUUID->"e66837df-658a-2c4c-973b-50c515d3781f"], -Cell[526843, 13220, 31008, 556, 290, "Output",ExpressionUUID->"0c8adc65-2b3c-a14f-87e8-79cdde17788b"] +Cell[525428, 12914, 2603, 85, 211, "Input",ExpressionUUID->"9e2a88cb-b398-b544-afe2-a8ca3be8151d"], +Cell[528034, 13001, 194, 3, 33, "Output",ExpressionUUID->"b33b7451-a5d4-42c7-8e99-223d6feae8f2"] }, Open ]], -Cell[557866, 13779, 209, 5, 36, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], Cell[CellGroupData[{ -Cell[558100, 13788, 1616, 48, 132, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], -Cell[559719, 13838, 593, 12, 118, "Message",ExpressionUUID->"6cb27c14-3e28-3a42-b8b7-fdcba2488488"], -Cell[560315, 13852, 595, 12, 136, "Message",ExpressionUUID->"cb81e4d8-f3c2-a440-be93-8add6661d63f"], -Cell[560913, 13866, 602, 12, 136, "Message",ExpressionUUID->"6fc2d4bb-75da-4f4f-bee0-560983907484"], -Cell[561518, 13880, 456, 10, 136, "Message",ExpressionUUID->"a75f01ed-738d-2b4a-b751-ccae7a894e31"], -Cell[561977, 13892, 172, 3, 136, "Output",ExpressionUUID->"a9b05d7b-788a-eb45-8401-918c1ed97234"] +Cell[528265, 13009, 3712, 118, 327, "Input",ExpressionUUID->"e44fc740-fe73-cc48-800c-d12df9afecd2"], +Cell[531980, 13129, 198, 3, 33, "Output",ExpressionUUID->"ce3b525f-8226-4e79-9dc7-03c765bf3bae"] }, Open ]], Cell[CellGroupData[{ -Cell[562186, 13900, 2249, 64, 136, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], -Cell[564438, 13966, 572, 12, 136, "Message",ExpressionUUID->"e3c0ae99-c55d-1a40-897e-ede7de12487f"], -Cell[565013, 13980, 575, 12, 136, "Message",ExpressionUUID->"0a52e0c9-3a0a-a24b-a9af-01175c4ee0f4"], -Cell[565591, 13994, 579, 12, 98, "Message",ExpressionUUID->"e6adb683-0ea5-4b48-bbb8-23c8c11e4418"], -Cell[566173, 14008, 458, 10, 32, "Message",ExpressionUUID->"12441524-bcf6-244b-b009-fad76aa84cea"], -Cell[566634, 14020, 173, 3, 41, "Output",ExpressionUUID->"cc74ac59-df4c-cf4b-a4af-36b2436eea23"] +Cell[532215, 13137, 2077, 59, 234, "Input",ExpressionUUID->"1dec41a6-6752-2041-9d38-804123b5ccd0"], +Cell[534295, 13198, 605, 13, 65, "Message",ExpressionUUID->"acc672de-e904-4e53-9377-97b718d649d7"], +Cell[534903, 13213, 612, 13, 82, "Message",ExpressionUUID->"4aaf9831-cbd2-4a93-93ab-4ee4faa5fe15"], +Cell[535518, 13228, 615, 13, 82, "Message",ExpressionUUID->"c47c7b29-932c-4b00-92f0-3323a5394ebd"], +Cell[536136, 13243, 495, 11, 26, "Message",ExpressionUUID->"8ea1a6dd-e7a2-4d94-8a86-e1b64e3cc5e6"], +Cell[536634, 13256, 193, 3, 33, "Output",ExpressionUUID->"66f766ee-5876-4644-a5e8-771f432ab965"] }, Open ]], Cell[CellGroupData[{ -Cell[566844, 14028, 2221, 64, 348, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], -Cell[569068, 14094, 572, 12, 98, "Message",ExpressionUUID->"ee3e5086-63b9-a04a-8b60-1a07bbedb00c"], -Cell[569643, 14108, 575, 12, 98, "Message",ExpressionUUID->"f824dc64-7721-2e40-87b9-9d308e655a7c"], -Cell[570221, 14122, 577, 12, 98, "Message",ExpressionUUID->"830b9065-dbdb-094f-aba8-2b0b04ca96a6"], -Cell[570801, 14136, 456, 10, 32, "Message",ExpressionUUID->"f79b172f-d4db-f24b-98c7-2b2531d3e183"], -Cell[571260, 14148, 172, 3, 41, "Output",ExpressionUUID->"88b0c8ab-c0ff-2a4c-be6a-f15bb3bf7202"] +Cell[536864, 13264, 2074, 59, 234, "Input",ExpressionUUID->"442c9cc5-031c-244c-a3bb-8044e56b047f"], +Cell[538941, 13325, 603, 13, 65, "Message",ExpressionUUID->"3f46331d-8fd6-43d0-a596-cde920ecded0"], +Cell[539547, 13340, 610, 13, 82, "Message",ExpressionUUID->"b89a1238-c6c8-4ab1-b254-0be867b4ca14"], +Cell[540160, 13355, 613, 13, 82, "Message",ExpressionUUID->"236b81fd-9609-4b6a-8dfd-3d9132d7d1c0"], +Cell[540776, 13370, 493, 11, 26, "Message",ExpressionUUID->"2ec7ebc8-56a0-49f4-96b2-3efba00ccc24"], +Cell[541272, 13383, 194, 3, 33, "Output",ExpressionUUID->"be15cbda-1bb2-4051-882d-424a3868c41d"] }, Open ]], Cell[CellGroupData[{ -Cell[571469, 14156, 2223, 64, 348, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], -Cell[573695, 14222, 572, 12, 98, "Message",ExpressionUUID->"f816110f-9bc3-0e4e-85c9-2e71a255bbb9"], -Cell[574270, 14236, 573, 12, 98, "Message",ExpressionUUID->"36d057a5-55b4-f047-814d-965f9626b543"], -Cell[574846, 14250, 579, 12, 98, "Message",ExpressionUUID->"4ef30680-44fe-0244-870d-45b0a67e7a3d"], -Cell[575428, 14264, 456, 10, 32, "Message",ExpressionUUID->"c685c306-1cc4-0a4f-bb39-965ed01378a7"], -Cell[575887, 14276, 173, 3, 41, "Output",ExpressionUUID->"621ca10b-eff8-834f-a283-22ac03a895a3"] +Cell[541503, 13391, 2053, 55, 151, "Input",ExpressionUUID->"75bdb70f-74f6-1a4c-9c04-b799ae260294"], +Cell[543559, 13448, 20041, 377, 236, "Output",ExpressionUUID->"89d6216a-c88d-43a3-8020-04f2c1cbb873"] }, Open ]], Cell[CellGroupData[{ -Cell[576097, 14284, 215, 6, 60, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], -Cell[576315, 14292, 174, 3, 41, "Output",ExpressionUUID->"3737ba01-5151-874d-9846-1c8b07e42d7a"] +Cell[563637, 13830, 2143, 60, 261, "Input",ExpressionUUID->"cbec275e-4d01-7747-9ece-7fa9a2a651b1"], +Cell[565783, 13892, 537, 12, 58, "Message",ExpressionUUID->"4a5ba917-5445-4115-8290-4fbba5fcee84"], +Cell[566323, 13906, 540, 12, 58, "Message",ExpressionUUID->"0a5faea3-3856-4829-a5cc-71b1bce2c151"], +Cell[566866, 13920, 544, 12, 58, "Message",ExpressionUUID->"1f4c02ee-9041-471a-a84e-a76a14f5adba"], +Cell[567413, 13934, 493, 11, 26, "Message",ExpressionUUID->"f292ef14-d971-4b5a-8d42-a88a1c5bc2e7"], +Cell[567909, 13947, 25802, 471, 232, "Output",ExpressionUUID->"d3efce80-b1b9-4c52-b05f-ea1bc91956e0"] }, Open ]], -Cell[576504, 14298, 115, 1, 36, "Input",ExpressionUUID->"1f55205b-efe5-4a7b-b8d6-2a9b139a8bcd"] +Cell[CellGroupData[{ +Cell[593748, 14423, 232, 5, 29, "Input",ExpressionUUID->"f380af60-a605-c546-a4c8-b989835aa113"], +Cell[593983, 14430, 32186, 603, 232, "Output",ExpressionUUID->"41ba93ce-4355-4c8f-9be7-cb08f0c72ae2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[626206, 15038, 1616, 48, 104, "Input",ExpressionUUID->"2a506f59-0d86-f149-9072-b651d8746981"], +Cell[627825, 15088, 726, 15, 63, "Message",ExpressionUUID->"1144d42a-2b6f-4c1d-a2e9-a0179716ad84"], +Cell[628554, 15105, 725, 15, 63, "Message",ExpressionUUID->"a258c42b-957d-468c-bbcc-25e30bcbec49"], +Cell[629282, 15122, 725, 15, 63, "Message",ExpressionUUID->"c1bb295b-42b9-4f42-b363-22dc6ec63f3f"], +Cell[630010, 15139, 495, 11, 26, "Message",ExpressionUUID->"f002f565-a3eb-4a69-a329-3813e8292391"], +Cell[630508, 15152, 196, 3, 33, "Output",ExpressionUUID->"12749815-eafe-4d12-8fc9-6fcb98d4c70f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[630741, 15160, 2272, 64, 212, "Input",ExpressionUUID->"f2835c98-560f-8e47-bdab-0d2700971836"], +Cell[633016, 15226, 605, 13, 65, "Message",ExpressionUUID->"0c85ac3b-8837-4cf2-94a4-aa4fdf446eff"], +Cell[633624, 15241, 612, 13, 82, "Message",ExpressionUUID->"c9914488-ae71-463c-8559-a094b22c4907"], +Cell[634239, 15256, 613, 13, 82, "Message",ExpressionUUID->"675c9d14-aa70-4e0f-8b5d-6dd800c18a16"], +Cell[634855, 15271, 495, 11, 26, "Message",ExpressionUUID->"fa86ff06-c86c-492d-a465-b4b1f6db3004"], +Cell[635353, 15284, 195, 3, 33, "Output",ExpressionUUID->"b4b622c4-27b9-4f70-960a-c6d8e86ce927"] +}, Open ]], +Cell[CellGroupData[{ +Cell[635585, 15292, 2233, 63, 212, "Input",ExpressionUUID->"ca837916-250f-4d4e-8368-5a08f479e656"], +Cell[637821, 15357, 604, 13, 65, "Message",ExpressionUUID->"59c0455e-1e00-47f6-8465-c7207ef2c3b4"], +Cell[638428, 15372, 610, 13, 82, "Message",ExpressionUUID->"ed9b2cea-f42a-4c0e-bf83-36ca314a21a8"], +Cell[639041, 15387, 615, 13, 82, "Message",ExpressionUUID->"7284e09a-f3df-4e06-8285-8c4246789940"], +Cell[639659, 15402, 495, 11, 26, "Message",ExpressionUUID->"c885d27b-7fad-4749-ad45-315b9fa5c716"], +Cell[640157, 15415, 197, 3, 33, "Output",ExpressionUUID->"74f354e2-e416-4e55-892e-7f6b499feb51"] +}, Open ]], +Cell[CellGroupData[{ +Cell[640391, 15423, 2235, 63, 212, "Input",ExpressionUUID->"b579991f-985b-234a-94aa-ed18c097f8c0"], +Cell[642629, 15488, 607, 13, 65, "Message",ExpressionUUID->"38dcd712-3be5-457e-bafe-62bba0deba39"], +Cell[643239, 15503, 610, 13, 82, "Message",ExpressionUUID->"1af69c63-500b-4b02-8559-10ee9b5871f0"], +Cell[643852, 15518, 613, 13, 82, "Message",ExpressionUUID->"cd0e478a-0c6d-498e-8d51-465a0edc2079"], +Cell[644468, 15533, 497, 11, 26, "Message",ExpressionUUID->"bcee7b82-e5ce-4087-8291-9a7133d0198b"], +Cell[644968, 15546, 196, 3, 33, "Output",ExpressionUUID->"16354656-1ad0-47c4-be71-c2872e68764c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[645201, 15554, 238, 6, 46, "Input",ExpressionUUID->"afb7855c-8700-d444-926c-6d96abe14e67"], +Cell[645442, 15562, 196, 3, 33, "Output",ExpressionUUID->"bd3493c7-db2d-4ab9-93f1-75e312649339"] +}, Open ]], +Cell[645653, 15568, 143, 3, 70, "Input",ExpressionUUID->"1f55205b-efe5-4a7b-b8d6-2a9b139a8bcd"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw2.nb b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw2.nb index fa932be..129d06b 100644 --- a/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw2.nb +++ b/Pu240_798-811_TitovAA/172-68_h_Pu240_26-27/h_172-68_Pu240_26-27_pr_Qw2.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 154, 7] -NotebookDataLength[ 604286, 14674] -NotebookOptionsPosition[ 565424, 14053] -NotebookOutlinePosition[ 565835, 14070] -CellTagsIndexPosition[ 565792, 14067] +NotebookDataLength[ 672573, 16014] +NotebookOptionsPosition[ 632023, 15366] +NotebookOutlinePosition[ 632434, 15383] +CellTagsIndexPosition[ 632391, 15380] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -26,15 +26,13 @@ Cell[BoxData[ 3.991926627241884*^9, {3.9919752407542057`*^9, 3.9919752437472878`*^9}, 3.9920650045886707`*^9, {3.994074211664226*^9, 3.994074212605893*^9}, { 3.994074246621201*^9, 3.994074265935053*^9}}, - CellLabel-> - "In[304]:=",ExpressionUUID->"6e9d2cf0-00ee-4f0e-8e5b-9242c475e79c"], + CellLabel->"In[1]:=",ExpressionUUID->"6e9d2cf0-00ee-4f0e-8e5b-9242c475e79c"], Cell[BoxData["1.95`"], "Output", CellChangeTimes->{ 3.991320420900818*^9, {3.994074196804253*^9, 3.994074214075809*^9}, { - 3.9940742497364883`*^9, 3.9940742697527313`*^9}}, - CellLabel-> - "Out[304]=",ExpressionUUID->"e457dc03-fcb8-4a7c-a166-73d91a0dbdd3"] + 3.9940742497364883`*^9, 3.9940742697527313`*^9}, 3.994386329168459*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"b2b1f75d-5844-43da-af35-f5bed89cfeb2"] }, Open ]], Cell[CellGroupData[{ @@ -43,15 +41,13 @@ Cell[BoxData[ RowBox[{"A", "=", "240"}]], "Input", CellChangeTimes->{{3.9915672960517406`*^9, 3.991567297688427*^9}, { 3.9940740226123867`*^9, 3.994074030397141*^9}}, - CellLabel-> - "In[305]:=",ExpressionUUID->"27aa517b-56e2-4abb-ae00-7a6d2a33e13b"], + CellLabel->"In[2]:=",ExpressionUUID->"27aa517b-56e2-4abb-ae00-7a6d2a33e13b"], Cell[BoxData["240"], "Output", CellChangeTimes->{ 3.9913196497381973`*^9, {3.9940741968744993`*^9, 3.994074214306916*^9}, { - 3.994074249779564*^9, 3.9940742697936697`*^9}}, - CellLabel-> - "Out[305]=",ExpressionUUID->"579f74ae-7b7c-4300-8684-44502a3514c1"] + 3.994074249779564*^9, 3.9940742697936697`*^9}, 3.9943863295405273`*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"15b5be45-c537-4ba3-a4b0-73c7fe9873ca"] }, Open ]], Cell[CellGroupData[{ @@ -60,15 +56,13 @@ Cell[BoxData[ RowBox[{"A1", "=", "172"}]], "Input", CellChangeTimes->{ 3.991798961431202*^9, {3.994074027305109*^9, 3.994074028074005*^9}}, - CellLabel-> - "In[306]:=",ExpressionUUID->"a849ff4a-a876-4d0b-831b-7e9882291835"], + CellLabel->"In[3]:=",ExpressionUUID->"a849ff4a-a876-4d0b-831b-7e9882291835"], Cell[BoxData["172"], "Output", CellChangeTimes->{ 3.9913196497578354`*^9, {3.994074196887857*^9, 3.994074214318638*^9}, { - 3.9940742497919416`*^9, 3.9940742698063602`*^9}}, - CellLabel-> - "Out[306]=",ExpressionUUID->"f6f4fda0-377b-48ae-a732-d69f1fe9b41d"] + 3.9940742497919416`*^9, 3.9940742698063602`*^9}, 3.994386329564417*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"f8a702c5-a5a2-4410-8e8c-7b98eb4d9139"] }, Open ]], Cell[CellGroupData[{ @@ -76,15 +70,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"a1", "=", "0.55"}]], "Input", CellChangeTimes->{3.9434144380252676`*^9}, - CellLabel-> - "In[307]:=",ExpressionUUID->"4c2db3ec-5cae-4038-9eb8-24f56937fb08"], + CellLabel->"In[4]:=",ExpressionUUID->"4c2db3ec-5cae-4038-9eb8-24f56937fb08"], Cell[BoxData["0.55`"], "Output", CellChangeTimes->{ 3.991319649777508*^9, {3.9940741969012012`*^9, 3.994074214329146*^9}, { - 3.9940742497961063`*^9, 3.994074269818478*^9}}, - CellLabel-> - "Out[307]=",ExpressionUUID->"223f5d75-5ce6-4cf2-9da9-7572ccdf678e"] + 3.9940742497961063`*^9, 3.994074269818478*^9}, 3.994386329588415*^9}, + CellLabel->"Out[4]=",ExpressionUUID->"4e6500fb-5bb2-400d-bea9-892a9179d5bc"] }, Open ]], Cell[CellGroupData[{ @@ -96,30 +88,26 @@ Cell[BoxData[ FractionBox[ RowBox[{ RowBox[{"2", "*", "A1"}], "-", "A"}], "A"]}]}]}]], "Input", - CellLabel-> - "In[308]:=",ExpressionUUID->"170c42eb-2134-43c1-8ba3-d31b040620e5"], + CellLabel->"In[5]:=",ExpressionUUID->"170c42eb-2134-43c1-8ba3-d31b040620e5"], Cell[BoxData["0.5435000000000001`"], "Output", CellChangeTimes->{ 3.9913196497965145`*^9, {3.9940741969137297`*^9, 3.99407421433959*^9}, { - 3.994074249812704*^9, 3.994074269830806*^9}}, - CellLabel-> - "Out[308]=",ExpressionUUID->"3c996d3c-44d1-4f16-bdaf-5bf37777674f"] + 3.994074249812704*^9, 3.994074269830806*^9}, 3.994386329611164*^9}, + CellLabel->"Out[5]=",ExpressionUUID->"c4a6216c-c653-45f0-82d5-dcb8c1a47b0a"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"p0", "=", "0.17"}]], "Input", - CellLabel-> - "In[309]:=",ExpressionUUID->"b046e8b3-f143-47d7-a097-9ebca1037a17"], + CellLabel->"In[6]:=",ExpressionUUID->"b046e8b3-f143-47d7-a097-9ebca1037a17"], Cell[BoxData["0.17`"], "Output", CellChangeTimes->{ 3.9913196498144608`*^9, {3.9940741969249763`*^9, 3.994074214349977*^9}, { - 3.99407424982506*^9, 3.994074269834938*^9}}, - CellLabel-> - "Out[309]=",ExpressionUUID->"ef89d33c-1d36-4760-abcf-9b53fd3d50a0"] + 3.99407424982506*^9, 3.994074269834938*^9}, 3.994386329634615*^9}, + CellLabel->"Out[6]=",ExpressionUUID->"f914a28e-dfef-45e7-8a26-42d8b238ac30"] }, Open ]], Cell[CellGroupData[{ @@ -130,15 +118,13 @@ Cell[BoxData[ SuperscriptBox["A1", RowBox[{"1", "/", "3"}]]}]}]], "Input", CellChangeTimes->{{3.9434138465865016`*^9, 3.9434138476462865`*^9}}, - CellLabel-> - "In[310]:=",ExpressionUUID->"50aeb670-dc5a-4a12-9b52-81fac8b9f41c"], + CellLabel->"In[7]:=",ExpressionUUID->"50aeb670-dc5a-4a12-9b52-81fac8b9f41c"], Cell[BoxData["6.451105409164632`"], "Output", CellChangeTimes->{ 3.9913196498225155`*^9, {3.994074196937035*^9, 3.994074214360525*^9}, { - 3.994074249837967*^9, 3.9940742698497963`*^9}}, - CellLabel-> - "Out[310]=",ExpressionUUID->"99930466-a0ea-422d-ab2c-da33de944708"] + 3.994074249837967*^9, 3.9940742698497963`*^9}, 3.99438632965812*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"855d9fba-db27-4c9e-9238-1d3804abd351"] }, Open ]], Cell[CellGroupData[{ @@ -150,15 +136,13 @@ Cell[BoxData[ RowBox[{"(", RowBox[{"A", "-", "A1"}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "Input", - CellLabel-> - "In[311]:=",ExpressionUUID->"115220db-80b7-4eb9-96ee-49886df5501d"], + CellLabel->"In[8]:=",ExpressionUUID->"115220db-80b7-4eb9-96ee-49886df5501d"], Cell[BoxData["4.734719918224123`"], "Output", CellChangeTimes->{ 3.9913196498425236`*^9, {3.9940741969492617`*^9, 3.994074214370586*^9}, { - 3.994074249850299*^9, 3.994074269861824*^9}}, - CellLabel-> - "Out[311]=",ExpressionUUID->"f431189b-cb74-4006-806b-e8d273612c45"] + 3.994074249850299*^9, 3.994074269861824*^9}, 3.9943863296815033`*^9}, + CellLabel->"Out[8]=",ExpressionUUID->"45566ed7-fba4-401c-a3cd-8afe03199933"] }, Open ]], Cell[CellGroupData[{ @@ -166,14 +150,12 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b1", "=", "0.852277809"}]], "Input", CellChangeTimes->{3.991799283179735*^9, 3.9940740415240393`*^9}, - CellLabel-> - "In[312]:=",ExpressionUUID->"bbf05b3f-c273-4afa-802c-568b9976c2fc"], + CellLabel->"In[9]:=",ExpressionUUID->"bbf05b3f-c273-4afa-802c-568b9976c2fc"], Cell[BoxData["0.852277809`"], "Output", CellChangeTimes->{{3.994074196961275*^9, 3.994074214380481*^9}, { - 3.994074249862259*^9, 3.994074269873619*^9}}, - CellLabel-> - "Out[312]=",ExpressionUUID->"4db30534-7fc5-47e7-8cd6-53bf4d6653c8"] + 3.994074249862259*^9, 3.994074269873619*^9}, 3.994386329705309*^9}, + CellLabel->"Out[9]=",ExpressionUUID->"56324569-60ec-417b-875b-11eba82c734d"] }, Open ]], Cell[CellGroupData[{ @@ -181,44 +163,38 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"b2", "=", "0.3903505481"}]], "Input", CellChangeTimes->{3.991799280663351*^9, 3.99407404519888*^9}, - CellLabel-> - "In[313]:=",ExpressionUUID->"6899c230-5258-4539-ac8a-b78b0d4dee59"], + CellLabel->"In[10]:=",ExpressionUUID->"6899c230-5258-4539-ac8a-b78b0d4dee59"], Cell[BoxData["0.3903505481`"], "Output", CellChangeTimes->{{3.99407419697276*^9, 3.9940742143904543`*^9}, { - 3.99407424987506*^9, 3.994074269885377*^9}}, - CellLabel-> - "Out[313]=",ExpressionUUID->"57ab9cbc-f608-44a6-9cd2-a7b856f94f7a"] + 3.99407424987506*^9, 3.994074269885377*^9}, 3.994386329728051*^9}, + CellLabel->"Out[10]=",ExpressionUUID->"23c7ca5f-84e1-4e3c-84e4-06dd1cbb933c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x1", "=", "0"}]], "Input", - CellLabel-> - "In[314]:=",ExpressionUUID->"4270bfa6-b1d5-4ef6-8bf7-252959edf5dd"], + CellLabel->"In[11]:=",ExpressionUUID->"4270bfa6-b1d5-4ef6-8bf7-252959edf5dd"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498927155`*^9, {3.9940741969837933`*^9, 3.994074214400448*^9}, { - 3.994074249886661*^9, 3.994074269897275*^9}}, - CellLabel-> - "Out[314]=",ExpressionUUID->"07f9d50a-e84f-439c-919b-8407f252db12"] + 3.994074249886661*^9, 3.994074269897275*^9}, 3.994386329751647*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"6c0ea07b-6783-4230-a79c-52e59f35842b"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"x2", "=", "0"}]], "Input", - CellLabel-> - "In[315]:=",ExpressionUUID->"12720705-24af-4497-b102-753b1a0d1ac7"], + CellLabel->"In[12]:=",ExpressionUUID->"12720705-24af-4497-b102-753b1a0d1ac7"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913196498996067`*^9, {3.9940741969946527`*^9, 3.994074214410337*^9}, { - 3.9940742498968973`*^9, 3.994074269909542*^9}}, - CellLabel-> - "Out[315]=",ExpressionUUID->"a1f851c2-f8b8-44c4-8f7e-74195eb1260a"] + 3.9940742498968973`*^9, 3.994074269909542*^9}, 3.994386329774103*^9}, + CellLabel->"Out[12]=",ExpressionUUID->"257fe5ed-78ad-4ae4-bb4f-5c83c6aabde1"] }, Open ]], Cell[CellGroupData[{ @@ -242,15 +218,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[316]:=",ExpressionUUID->"9fc9f1da-df1d-498b-a62f-db1f9df85a6d"], + CellLabel->"In[13]:=",ExpressionUUID->"9fc9f1da-df1d-498b-a62f-db1f9df85a6d"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913197863028755`*^9, {3.994074197005885*^9, 3.994074214421315*^9}, { - 3.994074249908176*^9, 3.994074269922103*^9}}, - CellLabel-> - "Out[316]=",ExpressionUUID->"0f732430-3602-4909-9f77-d0619b8819de"] + 3.994074249908176*^9, 3.994074269922103*^9}, 3.9943863297975903`*^9}, + CellLabel->"Out[13]=",ExpressionUUID->"41904cd6-8ad5-41bf-b1e6-8c208e9243b5"] }, Open ]], Cell[CellGroupData[{ @@ -274,15 +248,13 @@ Cell[BoxData[ SqrtBox[ FractionBox["5", RowBox[{"16", "\[Pi]"}]]]}]}]]}]], "Input", - CellLabel-> - "In[317]:=",ExpressionUUID->"5585d131-58c4-48c4-b947-7ec41c42fe45"], + CellLabel->"In[14]:=",ExpressionUUID->"5585d131-58c4-48c4-b947-7ec41c42fe45"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913197864610195`*^9, {3.994074197017363*^9, 3.994074214431409*^9}, { - 3.994074249918466*^9, 3.99407426993229*^9}}, - CellLabel-> - "Out[317]=",ExpressionUUID->"e6739ef0-fee7-4e30-8aab-f765be84c9ee"] + 3.994074249918466*^9, 3.99407426993229*^9}, 3.994386329822081*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"d56c3bb8-dc2c-43ff-8e99-d7423d6370ed"] }, Open ]], Cell[CellGroupData[{ @@ -337,15 +309,13 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[318]:=",ExpressionUUID->"08644bf4-6392-4836-bf40-9e42a0d658e4"], + CellLabel->"In[15]:=",ExpressionUUID->"08644bf4-6392-4836-bf40-9e42a0d658e4"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.991319786533783*^9, {3.994074197029154*^9, 3.994074214441661*^9}, { - 3.9940742499280653`*^9, 3.994074269943099*^9}}, - CellLabel-> - "Out[318]=",ExpressionUUID->"b5e50f2b-5e2d-4838-a541-bb0cd7152e98"] + 3.9940742499280653`*^9, 3.994074269943099*^9}, 3.994386329846448*^9}, + CellLabel->"Out[15]=",ExpressionUUID->"8cc34b17-7146-4d52-b82c-21fc7d934054"] }, Open ]], Cell[CellGroupData[{ @@ -396,16 +366,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[319]:=",ExpressionUUID->"47ba2188-3db0-41de-bc18-1b3e85ec939f"], + CellLabel->"In[16]:=",ExpressionUUID->"47ba2188-3db0-41de-bc18-1b3e85ec939f"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.991319786540777*^9, {3.9940741970396633`*^9, 3.994074214453579*^9}, { - 3.994074249938612*^9, 3.994074269953534*^9}}, - CellLabel-> - "Out[319]=",ExpressionUUID->"5fb74cf0-0833-4e0b-bbef-44397dfe44d7"] + 3.994074249938612*^9, 3.994074269953534*^9}, 3.9943863298534403`*^9}, + CellLabel->"Out[16]=",ExpressionUUID->"ccf4b74b-9ce1-4dde-b222-b5dad674aa87"] }, Open ]], Cell[CellGroupData[{ @@ -456,16 +424,14 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[320]:=",ExpressionUUID->"e6af9243-eb2f-4712-90d7-5eed88baa561"], + CellLabel->"In[17]:=",ExpressionUUID->"e6af9243-eb2f-4712-90d7-5eed88baa561"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.9913197865777817`*^9, {3.994074197050289*^9, 3.994074214467175*^9}, { - 3.994074249949532*^9, 3.9940742699645767`*^9}}, - CellLabel-> - "Out[320]=",ExpressionUUID->"0a386678-b95b-43f7-aad6-e61b528eef1e"] + 3.994074249949532*^9, 3.9940742699645767`*^9}, 3.994386329883136*^9}, + CellLabel->"Out[17]=",ExpressionUUID->"db3fdb61-b3ce-48a2-9806-aac2b4aa8b9b"] }, Open ]], Cell[CellGroupData[{ @@ -520,60 +486,52 @@ Cell[BoxData[ RowBox[{"d", "*", SuperscriptBox["w2", "2"], "*", SuperscriptBox["w1", "2"]}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[321]:=",ExpressionUUID->"f2b1634d-e165-4492-8ed6-9995f0797abc"], + CellLabel->"In[18]:=",ExpressionUUID->"f2b1634d-e165-4492-8ed6-9995f0797abc"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.9913197866129*^9, {3.994074197062862*^9, 3.99407421448357*^9}, { - 3.9940742499608793`*^9, 3.994074269975973*^9}}, - CellLabel-> - "Out[321]=",ExpressionUUID->"1637a04e-2203-4c49-b1c7-44ad9d464870"] + 3.9940742499608793`*^9, 3.994074269975973*^9}, 3.994386329916733*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"68cf8510-4f9f-449a-8e20-b1c5cf8096cd"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", - CellLabel-> - "In[322]:=",ExpressionUUID->"237ec570-91d2-4394-9bc8-e9c8ec8bc421"], + CellLabel->"In[19]:=",ExpressionUUID->"237ec570-91d2-4394-9bc8-e9c8ec8bc421"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786620775*^9, {3.9940741970755367`*^9, 3.994074214495585*^9}, { - 3.994074249972097*^9, 3.9940742699872303`*^9}}, - CellLabel-> - "Out[322]=",ExpressionUUID->"45aac07f-e329-49d6-972f-7748f3e89ff8"] + 3.994074249972097*^9, 3.9940742699872303`*^9}, 3.994386329949256*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"547beb78-5721-41fa-ac3b-e62b6fde90e9"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"fin", "=", "0.09"}]], "Input", - CellLabel-> - "In[323]:=",ExpressionUUID->"f3026fcc-780f-4641-bc0c-b6ff4345e1a5"], + CellLabel->"In[20]:=",ExpressionUUID->"f3026fcc-780f-4641-bc0c-b6ff4345e1a5"], Cell[BoxData["0.09`"], "Output", CellChangeTimes->{ 3.991319786657793*^9, {3.994074197089067*^9, 3.994074214507393*^9}, { - 3.99407424998314*^9, 3.994074269998393*^9}}, - CellLabel-> - "Out[323]=",ExpressionUUID->"09bd456b-7d48-445a-909a-86ff86137f28"] + 3.99407424998314*^9, 3.994074269998393*^9}, 3.994386329964862*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"acbc58bb-ffc2-42b0-8f15-a794d428f39c"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffin", "=", "0.42"}]], "Input", - CellLabel-> - "In[324]:=",ExpressionUUID->"eaea58ab-5391-4133-ac55-a4e9b6dc981b"], + CellLabel->"In[21]:=",ExpressionUUID->"eaea58ab-5391-4133-ac55-a4e9b6dc981b"], Cell[BoxData["0.42`"], "Output", CellChangeTimes->{ 3.9913197866657925`*^9, {3.9940741971016483`*^9, 3.9940742145189466`*^9}, { - 3.994074249994322*^9, 3.994074270009439*^9}}, - CellLabel-> - "Out[324]=",ExpressionUUID->"1f94c967-f20c-4117-b882-f0829f840da4"] + 3.994074249994322*^9, 3.994074270009439*^9}, 3.994386329973134*^9}, + CellLabel->"Out[21]=",ExpressionUUID->"82c074cf-9ef9-42cc-abe5-2d7b0c374404"] }, Open ]], Cell[CellGroupData[{ @@ -582,31 +540,27 @@ Cell[BoxData[ RowBox[{"fex", "=", RowBox[{"-", "2.59"}]}]], "Input", CellChangeTimes->{{3.9434353249158707`*^9, 3.943435325663808*^9}}, - CellLabel-> - "In[325]:=",ExpressionUUID->"abc15556-1a52-432f-a951-bb2f0de59d9e"], + CellLabel->"In[22]:=",ExpressionUUID->"abc15556-1a52-432f-a951-bb2f0de59d9e"], Cell[BoxData[ RowBox[{"-", "2.59`"}]], "Output", CellChangeTimes->{ 3.9913197866996*^9, {3.9940741971133337`*^9, 3.99407421453058*^9}, { - 3.994074250005796*^9, 3.994074270020775*^9}}, - CellLabel-> - "Out[325]=",ExpressionUUID->"1579694a-9432-41d3-8dbf-661cda0afd42"] + 3.994074250005796*^9, 3.994074270020775*^9}, 3.994386329981745*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"1bbff169-6956-4d5e-8520-2b6720a84778"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ffex", "=", "0.54"}]], "Input", - CellLabel-> - "In[326]:=",ExpressionUUID->"fc7cf076-aa64-477b-b6eb-d1714c0006fe"], + CellLabel->"In[23]:=",ExpressionUUID->"fc7cf076-aa64-477b-b6eb-d1714c0006fe"], Cell[BoxData["0.54`"], "Output", CellChangeTimes->{ 3.9913197867406044`*^9, {3.994074197124381*^9, 3.994074214542293*^9}, { - 3.994074250017613*^9, 3.9940742700324078`*^9}}, - CellLabel-> - "Out[326]=",ExpressionUUID->"4c8084d5-5af6-4b81-b6ae-41d98d2a5c77"] + 3.994074250017613*^9, 3.9940742700324078`*^9}, 3.9943863299892893`*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"5bfe3efb-1f94-409f-a653-d199df00bd2e"] }, Open ]], Cell[CellGroupData[{ @@ -616,15 +570,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434374360643005`*^9, 3.943437436361556*^9}, { 3.943437514738135*^9, 3.9434375159795218`*^9}, 3.991799293571144*^9, { 3.994074052479707*^9, 3.9940740526225157`*^9}}, - CellLabel-> - "In[327]:=",ExpressionUUID->"03037615-a4ec-4a71-9963-7937075949f0"], + CellLabel->"In[24]:=",ExpressionUUID->"03037615-a4ec-4a71-9963-7937075949f0"], Cell[BoxData["66"], "Output", CellChangeTimes->{ 3.9913197867861958`*^9, {3.99407419713608*^9, 3.994074214545911*^9}, { - 3.994074250027919*^9, 3.99407427004285*^9}}, - CellLabel-> - "Out[327]=",ExpressionUUID->"22f1c388-f489-4a91-b189-560e2cc3c5f6"] + 3.994074250027919*^9, 3.99407427004285*^9}, 3.994386329996765*^9}, + CellLabel->"Out[24]=",ExpressionUUID->"efaac746-d2d0-47b5-b94b-cde4afdc93ad"] }, Open ]], Cell[CellGroupData[{ @@ -634,15 +586,13 @@ Cell[BoxData[ RowBox[{"94", "-", "Z1"}]}]], "Input", CellChangeTimes->{{3.9434375187586946`*^9, 3.943437529577962*^9}, 3.9916443064841423`*^9, {3.99407405616786*^9, 3.994074056966621*^9}}, - CellLabel-> - "In[328]:=",ExpressionUUID->"b0af7a4c-a39a-4e42-b701-b56de3889d1c"], + CellLabel->"In[25]:=",ExpressionUUID->"b0af7a4c-a39a-4e42-b701-b56de3889d1c"], Cell[BoxData["28"], "Output", CellChangeTimes->{ 3.9913197867928696`*^9, {3.994074197147298*^9, 3.99407421455849*^9}, { - 3.9940742500393*^9, 3.994074270054291*^9}}, - CellLabel-> - "Out[328]=",ExpressionUUID->"969437f0-2389-4cdd-93f6-22e24679f634"] + 3.9940742500393*^9, 3.994074270054291*^9}, 3.9943863300042048`*^9}, + CellLabel->"Out[25]=",ExpressionUUID->"586bc018-efa8-4372-aad9-6988ee5bd971"] }, Open ]], Cell[CellGroupData[{ @@ -651,15 +601,13 @@ Cell[BoxData[ RowBox[{"A2", "=", RowBox[{"A", "-", "A1"}]}]], "Input", CellChangeTimes->{{3.943437540957633*^9, 3.943437547073514*^9}}, - CellLabel-> - "In[329]:=",ExpressionUUID->"60585147-2eb3-4eb0-be4e-c5b0b14d1ee0"], + CellLabel->"In[26]:=",ExpressionUUID->"60585147-2eb3-4eb0-be4e-c5b0b14d1ee0"], Cell[BoxData["68"], "Output", CellChangeTimes->{ 3.991319786827894*^9, {3.994074197159381*^9, 3.994074214569437*^9}, { - 3.9940742500504293`*^9, 3.9940742700651913`*^9}}, - CellLabel-> - "Out[329]=",ExpressionUUID->"0a69b2ee-f0f7-46ea-b9e9-9f681e4f6712"] + 3.9940742500504293`*^9, 3.9940742700651913`*^9}, 3.9943863300112658`*^9}, + CellLabel->"Out[26]=",ExpressionUUID->"53c47bcb-9ed1-41a4-bff4-722178225acf"] }, Open ]], Cell[CellGroupData[{ @@ -674,15 +622,13 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[330]:=",ExpressionUUID->"aaa537a1-4d4b-4fb9-be2d-0fdc6f0aa598"], + CellLabel->"In[27]:=",ExpressionUUID->"aaa537a1-4d4b-4fb9-be2d-0fdc6f0aa598"], Cell[BoxData["0.10723666210670314`"], "Output", CellChangeTimes->{ 3.9913197868648605`*^9, {3.994074197172007*^9, 3.994074214580143*^9}, { - 3.994074250060562*^9, 3.9940742700753593`*^9}}, - CellLabel-> - "Out[330]=",ExpressionUUID->"ef617988-9eaf-445c-8532-11bf9aa5cb10"] + 3.994074250060562*^9, 3.9940742700753593`*^9}, 3.9943863300193567`*^9}, + CellLabel->"Out[27]=",ExpressionUUID->"06961da8-d5fb-45e1-8db0-89c91b643da5"] }, Open ]], Cell[CellGroupData[{ @@ -697,16 +643,14 @@ Cell[BoxData[ FractionBox[ RowBox[{"A2", "-", RowBox[{"2", "*", "Z2"}]}], "A2"]}]}]}]], "Input", - CellLabel-> - "In[331]:=",ExpressionUUID->"3719007c-9ae9-4691-83b2-a05008e8a3a8"], + CellLabel->"In[28]:=",ExpressionUUID->"3719007c-9ae9-4691-83b2-a05008e8a3a8"], Cell[BoxData[ RowBox[{"-", "2.5678385772913814`"}]], "Output", CellChangeTimes->{ 3.9913197868718567`*^9, {3.994074197183957*^9, 3.994074214590371*^9}, { - 3.994074250071249*^9, 3.99407427008554*^9}}, - CellLabel-> - "Out[331]=",ExpressionUUID->"97ce1a1e-c787-4c42-8177-0176232869cc"] + 3.994074250071249*^9, 3.99407427008554*^9}, 3.9943863300273933`*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"5395ff1a-9515-442f-8ae2-0a1912f40393"] }, Open ]], Cell[CellGroupData[{ @@ -737,15 +681,13 @@ Cell[BoxData[ CellChangeTimes->{{3.94341290952442*^9, 3.943412910242494*^9}, { 3.9434143596934533`*^9, 3.9434143624992285`*^9}, {3.9434184316043854`*^9, 3.943418448948422*^9}, {3.9919752185010967`*^9, 3.9919752200326233`*^9}}, - CellLabel-> - "In[332]:=",ExpressionUUID->"1c9b77e2-0999-4119-8232-c0d1478d5d45"], + CellLabel->"In[29]:=",ExpressionUUID->"1c9b77e2-0999-4119-8232-c0d1478d5d45"], Cell[BoxData["17.339463280274387`"], "Output", CellChangeTimes->{ 3.9913197869068584`*^9, {3.994074197196582*^9, 3.9940742146010637`*^9}, { - 3.994074250082402*^9, 3.9940742700958967`*^9}}, - CellLabel-> - "Out[332]=",ExpressionUUID->"8265b718-5917-4476-bdec-5b686b5b3098"] + 3.994074250082402*^9, 3.9940742700958967`*^9}, 3.9943863300430117`*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"225462bf-9817-4f00-a9ae-0597a018312f"] }, Open ]], Cell[CellGroupData[{ @@ -753,15 +695,13 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"C0", "=", "300"}]], "Input", CellChangeTimes->{{3.943434925954894*^9, 3.9434349285011044`*^9}}, - CellLabel-> - "In[333]:=",ExpressionUUID->"1036db8d-d1d7-40b1-bd0c-90faceacded0"], + CellLabel->"In[30]:=",ExpressionUUID->"1036db8d-d1d7-40b1-bd0c-90faceacded0"], Cell[BoxData["300"], "Output", CellChangeTimes->{ 3.991319786940857*^9, {3.9940741972101183`*^9, 3.9940742146122723`*^9}, { - 3.994074250094462*^9, 3.994074270106193*^9}}, - CellLabel-> - "Out[333]=",ExpressionUUID->"0f9b07fe-c5fd-4975-98af-3ae81008ef18"] + 3.994074250094462*^9, 3.994074270106193*^9}, 3.9943863300504847`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"4bc988bb-6557-4125-b476-6ca631649c89"] }, Open ]], Cell[CellGroupData[{ @@ -771,20 +711,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349548512697`*^9, 3.9434349649002953`*^9}, 3.943437451104373*^9, 3.9917179877659073`*^9, 3.9917993555955296`*^9, { 3.994074073155587*^9, 3.994074075499446*^9}}, - CellLabel-> - "In[334]:=",ExpressionUUID->"b7b1c1e0-9b7e-4e9a-b42a-429e7286bd0a"], + CellLabel->"In[31]:=",ExpressionUUID->"b7b1c1e0-9b7e-4e9a-b42a-429e7286bd0a"], Cell[BoxData["1.895`"], "Output", CellChangeTimes->{{3.9940741972243557`*^9, 3.994074214623012*^9}, { - 3.994074250106516*^9, 3.9940742701165457`*^9}}, - CellLabel-> - "Out[334]=",ExpressionUUID->"4b32de17-9d0e-42ac-a64a-940859792752"] + 3.994074250106516*^9, 3.9940742701165457`*^9}, 3.994386330058354*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"5b2b8bd1-c666-4256-be75-6e0cd87613ab"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486394740562`*^9, 3.991848639478634*^9}}, - CellLabel-> - "In[335]:=",ExpressionUUID->"e419ea2b-cfab-4b32-83de-3169a095ff42"], + CellLabel->"In[32]:=",ExpressionUUID->"e419ea2b-cfab-4b32-83de-3169a095ff42"], Cell[CellGroupData[{ @@ -793,20 +730,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349674855194`*^9, 3.943434971565033*^9}, 3.9434374542625003`*^9, 3.9917179964399834`*^9, 3.9917993574235134`*^9, { 3.994074078227497*^9, 3.9940740796275997`*^9}}, - CellLabel-> - "In[336]:=",ExpressionUUID->"cd35992f-4f02-4342-ba87-c240d69e283f"], + CellLabel->"In[33]:=",ExpressionUUID->"cd35992f-4f02-4342-ba87-c240d69e283f"], Cell[BoxData["0.765`"], "Output", CellChangeTimes->{{3.994074197245954*^9, 3.994074214636681*^9}, { - 3.9940742501222553`*^9, 3.99407427012961*^9}}, - CellLabel-> - "Out[336]=",ExpressionUUID->"718ea2ff-7778-4908-b8bd-4a586290e003"] + 3.9940742501222553`*^9, 3.99407427012961*^9}, 3.994386330069734*^9}, + CellLabel->"Out[33]=",ExpressionUUID->"92803e51-d4e4-4ec2-8839-13d3242b05b5"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848641020609*^9, 3.9918486410246162`*^9}}, - CellLabel-> - "In[337]:=",ExpressionUUID->"7efe54fb-7831-41ab-adc1-b6f091a8b984"], + CellLabel->"In[34]:=",ExpressionUUID->"7efe54fb-7831-41ab-adc1-b6f091a8b984"], Cell[CellGroupData[{ @@ -815,20 +749,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349759643574`*^9, 3.9434349806520367`*^9}, { 3.943437458959346*^9, 3.943437459115596*^9}, 3.9917993587947025`*^9, { 3.9940740824169683`*^9, 3.9940740841708183`*^9}}, - CellLabel-> - "In[338]:=",ExpressionUUID->"36e9683b-262a-4168-b8c6-6153865b9a90"], + CellLabel->"In[35]:=",ExpressionUUID->"36e9683b-262a-4168-b8c6-6153865b9a90"], Cell[BoxData["2.605`"], "Output", CellChangeTimes->{{3.994074197269746*^9, 3.994074214649177*^9}, { - 3.994074250142523*^9, 3.994074270141824*^9}}, - CellLabel-> - "Out[338]=",ExpressionUUID->"7cc69535-386b-4bf8-8fcf-5fa0cbedfa9d"] + 3.994074250142523*^9, 3.994074270141824*^9}, 3.994386330081633*^9}, + CellLabel->"Out[35]=",ExpressionUUID->"abbf67e9-b383-41ba-8087-9f58a9061a78"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486421415234`*^9, 3.991848642146063*^9}}, - CellLabel-> - "In[339]:=",ExpressionUUID->"5bf8cdd6-7467-44c6-8375-7b3e0fb3c3be"], + CellLabel->"In[36]:=",ExpressionUUID->"5bf8cdd6-7467-44c6-8375-7b3e0fb3c3be"], Cell[CellGroupData[{ @@ -837,20 +768,17 @@ Cell[BoxData[ CellChangeTimes->{{3.943434982590375*^9, 3.9434349866047964`*^9}, { 3.9434374622143803`*^9, 3.9434374623562365`*^9}, 3.9917180082009144`*^9, 3.991799359954439*^9, {3.994074087466568*^9, 3.9940740892428827`*^9}}, - CellLabel-> - "In[340]:=",ExpressionUUID->"05c1ce3c-2d90-4e22-8983-8708b913f8ec"], + CellLabel->"In[37]:=",ExpressionUUID->"05c1ce3c-2d90-4e22-8983-8708b913f8ec"], Cell[BoxData["1.115`"], "Output", CellChangeTimes->{{3.9940741972942533`*^9, 3.9940742146616087`*^9}, { - 3.994074250166238*^9, 3.9940742701540823`*^9}}, - CellLabel-> - "Out[340]=",ExpressionUUID->"d46d6435-e824-4b80-93c7-afa74308d522"] + 3.994074250166238*^9, 3.9940742701540823`*^9}, 3.99438633009301*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"82b1ee78-cb1e-4aac-a050-eb252c1a0781"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848643356409*^9, 3.991848643361412*^9}}, - CellLabel-> - "In[341]:=",ExpressionUUID->"af2d854f-0f16-4dcc-8158-4eae99fa42d4"], + CellLabel->"In[38]:=",ExpressionUUID->"af2d854f-0f16-4dcc-8158-4eae99fa42d4"], Cell[CellGroupData[{ @@ -859,20 +787,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434349919514623`*^9, 3.943434996184626*^9}, 3.991718016467348*^9, 3.991799361414671*^9, {3.994074092127721*^9, 3.994074094282755*^9}}, - CellLabel-> - "In[342]:=",ExpressionUUID->"6e1ffc52-c14e-4102-b2d3-8f150a74cd2c"], + CellLabel->"In[39]:=",ExpressionUUID->"6e1ffc52-c14e-4102-b2d3-8f150a74cd2c"], Cell[BoxData["1.375`"], "Output", CellChangeTimes->{{3.9940741973176317`*^9, 3.9940742146740303`*^9}, { - 3.994074250185948*^9, 3.9940742701663027`*^9}}, - CellLabel-> - "Out[342]=",ExpressionUUID->"b1c95913-8c5d-461e-958d-b15197551bc2"] + 3.994074250185948*^9, 3.9940742701663027`*^9}, 3.994386330105136*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"ae4195b5-79dd-49ef-b435-26bfadcbbfb8"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.991848644751276*^9, 3.991848644757372*^9}}, - CellLabel-> - "In[343]:=",ExpressionUUID->"90f795cc-44e0-4079-933e-820564497709"], + CellLabel->"In[40]:=",ExpressionUUID->"90f795cc-44e0-4079-933e-820564497709"], Cell[CellGroupData[{ @@ -881,20 +806,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350002095394`*^9, 3.943435004108102*^9}, 3.9917180279399567`*^9, 3.9917993631287174`*^9, {3.994074098253368*^9, 3.994074099547431*^9}}, - CellLabel-> - "In[344]:=",ExpressionUUID->"e1a4e27d-fefb-4696-ae21-8d21efe0f772"], + CellLabel->"In[41]:=",ExpressionUUID->"e1a4e27d-fefb-4696-ae21-8d21efe0f772"], Cell[BoxData["0.545`"], "Output", CellChangeTimes->{{3.9940741973401327`*^9, 3.994074214686512*^9}, { - 3.994074250207786*^9, 3.994074270178926*^9}}, - CellLabel-> - "Out[344]=",ExpressionUUID->"e1da4a03-9852-44c6-a99f-15711d5729da"] + 3.994074250207786*^9, 3.994074270178926*^9}, 3.9943863301165543`*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"c71e623d-1233-4332-b6cc-859e336dabc5"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486484561863`*^9, 3.991848648461731*^9}}, - CellLabel-> - "In[345]:=",ExpressionUUID->"908ec444-5059-4913-944b-1bdd71a4d77f"], + CellLabel->"In[42]:=",ExpressionUUID->"908ec444-5059-4913-944b-1bdd71a4d77f"], Cell[CellGroupData[{ @@ -903,20 +825,17 @@ Cell[BoxData[ CellChangeTimes->{{3.9434350062180433`*^9, 3.9434350100875373`*^9}, 3.9917180507508755`*^9, 3.9917993645898876`*^9, {3.994074102320486*^9, 3.9940741031259613`*^9}}, - CellLabel-> - "In[346]:=",ExpressionUUID->"c855e36c-e123-468e-a24c-f6a4bcfabc56"], + CellLabel->"In[43]:=",ExpressionUUID->"c855e36c-e123-468e-a24c-f6a4bcfabc56"], Cell[BoxData["1.35`"], "Output", CellChangeTimes->{{3.994074197360721*^9, 3.994074214698968*^9}, { - 3.9940742502296133`*^9, 3.994074270190978*^9}}, - CellLabel-> - "Out[346]=",ExpressionUUID->"9d9d8a62-e5dc-4f72-af3c-870802cfab88"] + 3.9940742502296133`*^9, 3.994074270190978*^9}, 3.994386330129178*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"80da1a40-bb51-40dc-a80e-4c6f25737a55"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.99184864995627*^9, 3.9918486499632607`*^9}}, - CellLabel-> - "In[347]:=",ExpressionUUID->"65e23205-730e-44e3-b89e-7568b3a51464"], + CellLabel->"In[44]:=",ExpressionUUID->"65e23205-730e-44e3-b89e-7568b3a51464"], Cell[CellGroupData[{ @@ -924,20 +843,17 @@ Cell[BoxData[ RowBox[{"nn2", "=", "0.655"}]], "Input", CellChangeTimes->{{3.9434350133231063`*^9, 3.94343502227812*^9}, 3.9917993660901737`*^9, {3.994074105268124*^9, 3.994074106561956*^9}}, - CellLabel-> - "In[348]:=",ExpressionUUID->"c76f2dce-79a7-4383-b851-ef032acfedad"], + CellLabel->"In[45]:=",ExpressionUUID->"c76f2dce-79a7-4383-b851-ef032acfedad"], Cell[BoxData["0.655`"], "Output", CellChangeTimes->{{3.994074197383122*^9, 3.994074214711643*^9}, { - 3.994074250250944*^9, 3.994074270203269*^9}}, - CellLabel-> - "Out[348]=",ExpressionUUID->"e2e75e38-d6ed-4040-9794-70048be22f77"] + 3.994074250250944*^9, 3.994074270203269*^9}, 3.994386330140997*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"5bbb89a7-70d3-47f7-8971-594c0ee63d08"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.9918486513316555`*^9, 3.9918486513362026`*^9}}, - CellLabel-> - "In[349]:=",ExpressionUUID->"bbab7f73-0565-4ae4-8d20-d60fe84536e0"], + CellLabel->"In[46]:=",ExpressionUUID->"bbab7f73-0565-4ae4-8d20-d60fe84536e0"], Cell[CellGroupData[{ @@ -1426,15 +1342,13 @@ uqGsPRlEX0mNSgPRXnceZoPoDSbehSB6SvLGGhCdc8irHkR/+P9xMojmebJt Glj8mvkOEH3rit5uEG3S7nIIRDvtUjkKojnvv74Dor8WP70LovsqM7+A6Ffr ZL+CaDemTb9BtM3RxwzNQBoAtp2g4A== "], - CellLabel-> - "In[350]:=",ExpressionUUID->"e99f0e79-d0cb-41d4-b539-50ea2cde3a21"], + CellLabel->"In[47]:=",ExpressionUUID->"e99f0e79-d0cb-41d4-b539-50ea2cde3a21"], Cell[BoxData["0.1542863605960474`"], "Output", CellChangeTimes->{ 3.991319787430073*^9, {3.994074197462419*^9, 3.9940742147508163`*^9}, { - 3.994074250298726*^9, 3.994074270240198*^9}}, - CellLabel-> - "Out[350]=",ExpressionUUID->"454e9c61-1f94-4c41-a67b-3720a310c58b"] + 3.994074250298726*^9, 3.994074270240198*^9}, 3.994386330270505*^9}, + CellLabel->"Out[47]=",ExpressionUUID->"0b81ff0b-f9a0-4819-b863-17be526eda4d"] }, Open ]], Cell[CellGroupData[{ @@ -1928,15 +1842,13 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[351]:=",ExpressionUUID->"60d8770c-a518-401f-9cd7-ffb9a2f67508"], + CellLabel->"In[48]:=",ExpressionUUID->"60d8770c-a518-401f-9cd7-ffb9a2f67508"], Cell[BoxData["6.986649521084862`"], "Output", CellChangeTimes->{ 3.991319787574972*^9, {3.994074197551347*^9, 3.994074214777306*^9}, { - 3.9940742503242893`*^9, 3.994074270266127*^9}}, - CellLabel-> - "Out[351]=",ExpressionUUID->"f48680b0-c192-44a8-9d82-d72872f4896c"] + 3.9940742503242893`*^9, 3.994074270266127*^9}, 3.994386330356185*^9}, + CellLabel->"Out[48]=",ExpressionUUID->"853b3f39-5b66-497c-8ed2-968da7fbc0e1"] }, Open ]], Cell[CellGroupData[{ @@ -2424,16 +2336,14 @@ Cell[BoxData[ CellChangeTimes->{{3.9434391057402463`*^9, 3.9434392313213944`*^9}, { 3.9434392645024543`*^9, 3.943439303213528*^9}, {3.943439335601962*^9, 3.943439550065191*^9}}, - CellLabel-> - "In[352]:=",ExpressionUUID->"fc75c884-45d9-4cef-b95c-fa3bd5361c67"], + CellLabel->"In[49]:=",ExpressionUUID->"fc75c884-45d9-4cef-b95c-fa3bd5361c67"], Cell[BoxData[ RowBox[{"-", "15.225784715275067`"}]], "Output", CellChangeTimes->{ 3.991319787641424*^9, {3.994074197626877*^9, 3.994074214803336*^9}, { - 3.994074250347639*^9, 3.9940742702914057`*^9}}, - CellLabel-> - "Out[352]=",ExpressionUUID->"fe90f6ab-f082-4145-b3c5-f8c8b04453bd"] + 3.994074250347639*^9, 3.9940742702914057`*^9}, 3.994386330408399*^9}, + CellLabel->"Out[49]=",ExpressionUUID->"96bad477-2b4c-47f7-bc10-5b0865a96322"] }, Open ]], Cell[CellGroupData[{ @@ -2991,16 +2901,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[353]:=",ExpressionUUID->"09cfab98-b552-4b08-a78f-387275b62cde"], + CellLabel->"In[50]:=",ExpressionUUID->"09cfab98-b552-4b08-a78f-387275b62cde"], Cell[BoxData[ RowBox[{"-", "19.527743438945258`"}]], "Output", CellChangeTimes->{ 3.991319787711939*^9, {3.994074197680339*^9, 3.9940742148337717`*^9}, { - 3.994074250376841*^9, 3.9940742703219957`*^9}}, - CellLabel-> - "Out[353]=",ExpressionUUID->"cc513b50-becb-456d-93a9-5e0328cda9b3"] + 3.994074250376841*^9, 3.9940742703219957`*^9}, 3.9943863304647207`*^9}, + CellLabel->"Out[50]=",ExpressionUUID->"c2f630ac-e006-49fd-b6be-cfa847116cae"] }, Open ]], Cell[CellGroupData[{ @@ -3558,16 +3466,14 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[354]:=",ExpressionUUID->"ef9a3d42-1318-43d1-b6e7-893064eedcfe"], + CellLabel->"In[51]:=",ExpressionUUID->"ef9a3d42-1318-43d1-b6e7-893064eedcfe"], Cell[BoxData[ RowBox[{"-", "55.27021800638023`"}]], "Output", CellChangeTimes->{ 3.9913197877723045`*^9, {3.9940741977668943`*^9, 3.9940742148649673`*^9}, { - 3.994074250406843*^9, 3.994074270352029*^9}}, - CellLabel-> - "Out[354]=",ExpressionUUID->"57f7ae4d-bd5f-4bbc-83bc-ae6de9ee2b8e"] + 3.994074250406843*^9, 3.994074270352029*^9}, 3.994386330520015*^9}, + CellLabel->"Out[51]=",ExpressionUUID->"b1a9bb18-b888-46ac-90ca-857bc2475eeb"] }, Open ]], Cell[CellGroupData[{ @@ -4198,46 +4104,40 @@ Cell[BoxData[ RowBox[{"r", ",", "0", ",", "\[Infinity]"}], "}"}], ",", RowBox[{"Method", "\[Rule]", StyleBox["Trapezoidal", "MR"]}]}], "]"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[355]:=",ExpressionUUID->"d4bb190d-5ca6-4c4a-b3c8-f962d853e1c8"], + CellLabel->"In[52]:=",ExpressionUUID->"d4bb190d-5ca6-4c4a-b3c8-f962d853e1c8"], Cell[BoxData[ RowBox[{"-", "141.4524755079782`"}]], "Output", CellChangeTimes->{ 3.991319787833355*^9, {3.994074197832451*^9, 3.994074214909892*^9}, { - 3.994074250439662*^9, 3.994074270387487*^9}}, - CellLabel-> - "Out[355]=",ExpressionUUID->"7624426a-6955-4c6f-bc37-bc175e427a75"] + 3.994074250439662*^9, 3.994074270387487*^9}, 3.994386330586688*^9}, + CellLabel->"Out[52]=",ExpressionUUID->"85425ce4-1775-4fe6-830d-628eaeba1615"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U21", "=", "0"}]], "Input", - CellLabel-> - "In[356]:=",ExpressionUUID->"318461b9-7ee4-47e0-b049-a20fb42eae95"], + CellLabel->"In[53]:=",ExpressionUUID->"318461b9-7ee4-47e0-b049-a20fb42eae95"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210013676`*^9, {3.994074197929666*^9, 3.994074214922945*^9}, { - 3.994074250452722*^9, 3.994074270403535*^9}}, - CellLabel-> - "Out[356]=",ExpressionUUID->"3d552a5f-2faa-42b3-9457-f777e1b446ba"] + 3.994074250452722*^9, 3.994074270403535*^9}, 3.994386330602025*^9}, + CellLabel->"Out[53]=",ExpressionUUID->"7572053a-669e-441d-8cb0-c08d64909a0e"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"U22", "=", "0"}]], "Input", - CellLabel-> - "In[357]:=",ExpressionUUID->"3e821625-2295-4317-a6c9-c5a6ed26f1ba"], + CellLabel->"In[54]:=",ExpressionUUID->"3e821625-2295-4317-a6c9-c5a6ed26f1ba"], Cell[BoxData["0"], "Output", CellChangeTimes->{ 3.9913204210355663`*^9, {3.994074197952071*^9, 3.994074214935376*^9}, { - 3.994074250464295*^9, 3.994074270413846*^9}}, - CellLabel-> - "Out[357]=",ExpressionUUID->"93feea3d-be7a-4e86-9595-e8857324d6d4"] + 3.994074250464295*^9, 3.994074270413846*^9}, 3.994386330610196*^9}, + CellLabel->"Out[54]=",ExpressionUUID->"d1176e11-2e37-4139-a238-5c555133b430"] }, Open ]], Cell[CellGroupData[{ @@ -4281,15 +4181,13 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[358]:=",ExpressionUUID->"e131b311-b23d-4bf8-aa90-94060544af3c"], + CellLabel->"In[55]:=",ExpressionUUID->"e131b311-b23d-4bf8-aa90-94060544af3c"], Cell[BoxData["111.55440139653717`"], "Output", CellChangeTimes->{ 3.991320421068556*^9, {3.9940741979658833`*^9, 3.994074214947126*^9}, { - 3.99407425047659*^9, 3.994074270424139*^9}}, - CellLabel-> - "Out[358]=",ExpressionUUID->"fe54b8bf-33cc-4e68-ad56-ca93b9b48205"] + 3.99407425047659*^9, 3.994074270424139*^9}, 3.9943863306190577`*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"9ce6aa37-44aa-42fe-b036-4287aec56aed"] }, Open ]], Cell[CellGroupData[{ @@ -4329,16 +4227,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[359]:=",ExpressionUUID->"a38f8011-4eb5-4501-89be-65ef4758a564"], + CellLabel->"In[56]:=",ExpressionUUID->"a38f8011-4eb5-4501-89be-65ef4758a564"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.991320421098543*^9, {3.994074197994025*^9, 3.994074214959611*^9}, { - 3.994074250488699*^9, 3.994074270434445*^9}}, - CellLabel-> - "Out[359]=",ExpressionUUID->"bdf50e58-3ae8-4ddd-8c80-0578a2a5a37b"] + 3.994074250488699*^9, 3.994074270434445*^9}, 3.9943863306276817`*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"d552a948-7ef1-4707-92a3-b1b8d230d588"] }, Open ]], Cell[CellGroupData[{ @@ -4382,101 +4278,87 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]], "Input", - CellLabel-> - "In[360]:=",ExpressionUUID->"1f2857d7-7392-4393-b2a1-6a006fd8c314"], + CellLabel->"In[57]:=",ExpressionUUID->"1f2857d7-7392-4393-b2a1-6a006fd8c314"], Cell[BoxData["113.13286100443031`"], "Output", CellChangeTimes->{ 3.9913204211275444`*^9, {3.994074198004314*^9, 3.994074214972053*^9}, { - 3.994074250500126*^9, 3.99407427044481*^9}}, - CellLabel-> - "Out[360]=",ExpressionUUID->"aaffbaf0-c25c-46bd-9f1a-9e9aacb5352b"] + 3.994074250500126*^9, 3.99407427044481*^9}, 3.994386330635625*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"8f657001-1b30-47c8-a9fa-8cc12dd34b80"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c11"], "Input", - CellLabel-> - "In[361]:=",ExpressionUUID->"ba8043a4-a195-48ef-acb5-158cea127b9e"], + CellLabel->"In[58]:=",ExpressionUUID->"ba8043a4-a195-48ef-acb5-158cea127b9e"], Cell[BoxData["0.4377300224639211`"], "Output", CellChangeTimes->{ 3.9913204211385536`*^9, {3.994074198016279*^9, 3.994074214983481*^9}, { - 3.994074250511408*^9, 3.994074270455081*^9}}, - CellLabel-> - "Out[361]=",ExpressionUUID->"7affa945-14ff-4a7f-98be-3b57a0970d13"] + 3.994074250511408*^9, 3.994074270455081*^9}, 3.994386330643553*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"4194456a-f5dc-4230-9ce9-64859e7cde63"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c12"], "Input", - CellLabel-> - "In[362]:=",ExpressionUUID->"2156025d-2a1e-45cb-9e97-e50773e5754e"], + CellLabel->"In[59]:=",ExpressionUUID->"2156025d-2a1e-45cb-9e97-e50773e5754e"], Cell[BoxData[ RowBox[{"-", "0.09062394423616692`"}]], "Output", CellChangeTimes->{ 3.9913204211683464`*^9, {3.99407419803306*^9, 3.994074214997123*^9}, { - 3.994074250525971*^9, 3.994074270465309*^9}}, - CellLabel-> - "Out[362]=",ExpressionUUID->"59d02ba5-4822-4bab-bf4f-c549e0e768ee"] + 3.994074250525971*^9, 3.994074270465309*^9}, 3.9943863306513443`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"9557c0d9-8eb2-4766-8ba7-142a1371dd18"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c21"], "Input", - CellLabel-> - "In[363]:=",ExpressionUUID->"affeaffc-5110-4d8f-896f-54b5596c2c52"], + CellLabel->"In[60]:=",ExpressionUUID->"affeaffc-5110-4d8f-896f-54b5596c2c52"], Cell[BoxData[ RowBox[{"-", "0.5469059277191528`"}]], "Output", CellChangeTimes->{ 3.991320421199068*^9, {3.994074198060273*^9, 3.994074215008013*^9}, { - 3.994074250535656*^9, 3.994074270476778*^9}}, - CellLabel-> - "Out[363]=",ExpressionUUID->"98b10eaa-a915-4832-962a-e20181e68fb9"] + 3.994074250535656*^9, 3.994074270476778*^9}, 3.994386330660166*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"0350c141-00c1-469a-b871-8e444903b8f5"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["c22"], "Input", - CellLabel-> - "In[364]:=",ExpressionUUID->"8b781ea3-01dd-4b9e-90d8-44bda9b0f1b0"], + CellLabel->"In[61]:=",ExpressionUUID->"8b781ea3-01dd-4b9e-90d8-44bda9b0f1b0"], Cell[BoxData["0.7058922703634168`"], "Output", CellChangeTimes->{ 3.991320421228037*^9, {3.9940741980734253`*^9, 3.994074215018661*^9}, { - 3.994074250546678*^9, 3.9940742704879427`*^9}}, - CellLabel-> - "Out[364]=",ExpressionUUID->"91e7ba39-ebd0-4c5a-8321-bac23f60c837"] + 3.994074250546678*^9, 3.9940742704879427`*^9}, 3.9943863306674757`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"99db3c6f-1a00-4ed6-b6fd-6c9d45e9f2e6"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w1"], "Input", - CellLabel-> - "In[365]:=",ExpressionUUID->"6e315cbd-5e38-43c0-b733-a9cc30e42717"], + CellLabel->"In[62]:=",ExpressionUUID->"6e315cbd-5e38-43c0-b733-a9cc30e42717"], Cell[BoxData["2.19751871461767`"], "Output", CellChangeTimes->{ 3.9913204212585373`*^9, {3.994074198087656*^9, 3.9940742150302687`*^9}, { - 3.994074250550354*^9, 3.994074270499359*^9}}, - CellLabel-> - "Out[365]=",ExpressionUUID->"e8217124-3160-497a-a3ef-fd7ca773e043"] + 3.994074250550354*^9, 3.994074270499359*^9}, 3.994386330675252*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"e7cf5733-4f8c-4250-9a8c-fb2354d08db3"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData["w2"], "Input", - CellLabel-> - "In[366]:=",ExpressionUUID->"cf57eb4b-ea94-4170-8ca4-d1e4df3a658b"], + CellLabel->"In[63]:=",ExpressionUUID->"cf57eb4b-ea94-4170-8ca4-d1e4df3a658b"], Cell[BoxData["1.4271003361718892`"], "Output", CellChangeTimes->{ 3.9913204212884274`*^9, {3.994074198096857*^9, 3.994074215043764*^9}, { - 3.994074250564603*^9, 3.994074270511888*^9}}, - CellLabel-> - "Out[366]=",ExpressionUUID->"33d25e04-201e-40ba-a10f-617ffe23cdf6"] + 3.994074250564603*^9, 3.994074270511888*^9}, 3.99438633068294*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"aad75f37-7a38-4138-a785-db0d3dd590a3"] }, Open ]], Cell[CellGroupData[{ @@ -4497,16 +4379,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]], "Input", - CellLabel-> - "In[367]:=",ExpressionUUID->"2996421f-d730-4ac7-bee1-1afd9facb2b6"], + CellLabel->"In[64]:=",ExpressionUUID->"2996421f-d730-4ac7-bee1-1afd9facb2b6"], Cell[BoxData[ RowBox[{"-", "33.18726375495992`"}]], "Output", CellChangeTimes->{ 3.9913204213185234`*^9, {3.994074198107793*^9, 3.994074215058444*^9}, { - 3.994074250574132*^9, 3.99407427052425*^9}}, - CellLabel-> - "Out[367]=",ExpressionUUID->"347991fa-3831-46ac-af68-6f221e350e19"] + 3.994074250574132*^9, 3.99407427052425*^9}, 3.9943863306909513`*^9}, + CellLabel->"Out[64]=",ExpressionUUID->"57253116-782c-4cc4-b026-65c75175a911"] }, Open ]], Cell[CellGroupData[{ @@ -4527,16 +4407,14 @@ Cell[BoxData[ RowBox[{ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]], "Input", - CellLabel-> - "In[368]:=",ExpressionUUID->"5377b4a7-0ea8-42d9-a370-3cbb3b816661"], + CellLabel->"In[65]:=",ExpressionUUID->"5377b4a7-0ea8-42d9-a370-3cbb3b816661"], Cell[BoxData[ RowBox[{"-", "6.498883922853802`"}]], "Output", CellChangeTimes->{ 3.991320421349531*^9, {3.994074198134163*^9, 3.994074215071083*^9}, { - 3.994074250583393*^9, 3.994074270535636*^9}}, - CellLabel-> - "Out[368]=",ExpressionUUID->"ed1077c6-331c-44d8-82cd-668ddb0622b1"] + 3.994074250583393*^9, 3.994074270535636*^9}, 3.9943863306992283`*^9}, + CellLabel->"Out[65]=",ExpressionUUID->"cea01578-9b3f-4037-b7c0-3e00e6e1118e"] }, Open ]], Cell[CellGroupData[{ @@ -4601,15 +4479,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b1", "*", "b1"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[369]:=",ExpressionUUID->"cd9543e9-5ab0-44b6-b22b-b6f7d9379d6f"], + CellLabel->"In[66]:=",ExpressionUUID->"cd9543e9-5ab0-44b6-b22b-b6f7d9379d6f"], Cell[BoxData["78.36713764157724`"], "Output", CellChangeTimes->{ 3.9913204213784294`*^9, {3.99407419816089*^9, 3.994074215083827*^9}, { - 3.994074250592779*^9, 3.994074270550357*^9}}, - CellLabel-> - "Out[369]=",ExpressionUUID->"d6e96e26-ad0d-4c00-8a99-6186d1d22cd1"] + 3.994074250592779*^9, 3.994074270550357*^9}, 3.994386330708654*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"ad2a50ba-6f13-4348-876d-96dc467789e2"] }, Open ]], Cell[CellGroupData[{ @@ -4650,16 +4526,14 @@ Cell[BoxData[ RowBox[{ FractionBox["5", RowBox[{"2", "\[Pi]"}]], "U51"}]}], ")"}]}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[370]:=",ExpressionUUID->"1cafafed-26ac-4aa7-b15d-5b2a26438908"], + CellLabel->"In[67]:=",ExpressionUUID->"1cafafed-26ac-4aa7-b15d-5b2a26438908"], Cell[BoxData[ RowBox[{"-", "95.43889051158258`"}]], "Output", CellChangeTimes->{ 3.9913204213904285`*^9, {3.994074198173212*^9, 3.9940742151226263`*^9}, { - 3.9940742506018353`*^9, 3.99407427055612*^9}}, - CellLabel-> - "Out[370]=",ExpressionUUID->"c2fe019c-5f21-435a-8d7e-40f5d8718736"] + 3.9940742506018353`*^9, 3.99407427055612*^9}, 3.9943863307168407`*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"cf273957-541d-4ce8-8992-0644387a5223"] }, Open ]], Cell[CellGroupData[{ @@ -4725,15 +4599,13 @@ Cell[BoxData[ FractionBox["6", RowBox[{"7", "\[Pi]"}]], "*", "b2", "*", "b2"}]}], ")"}]}]}]}]], "Input", - CellLabel-> - "In[371]:=",ExpressionUUID->"ebf21cfa-2adf-4167-ad9c-e05db70dc3a1"], + CellLabel->"In[68]:=",ExpressionUUID->"ebf21cfa-2adf-4167-ad9c-e05db70dc3a1"], Cell[BoxData["106.6339770815765`"], "Output", CellChangeTimes->{ 3.991320421419428*^9, {3.994074198185794*^9, 3.994074215135048*^9}, { - 3.994074250611326*^9, 3.994074270578539*^9}}, - CellLabel-> - "Out[371]=",ExpressionUUID->"beff5e16-4ae9-4f92-a0ec-ebe783f8f480"] + 3.994074250611326*^9, 3.994074270578539*^9}, 3.994386330725751*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"9345fb99-c0ff-4596-8e4c-dc71c1c12a82"] }, Open ]], Cell[CellGroupData[{ @@ -4791,15 +4663,13 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[372]:=",ExpressionUUID->"baca1192-8829-4313-8a64-88dbef5bf565"], + CellLabel->"In[69]:=",ExpressionUUID->"baca1192-8829-4313-8a64-88dbef5bf565"], Cell[BoxData["51.145215962859936`"], "Output", CellChangeTimes->{ 3.9913204214494324`*^9, {3.994074198196261*^9, 3.9940742151460247`*^9}, { - 3.994074250621415*^9, 3.99407427059237*^9}}, - CellLabel-> - "Out[372]=",ExpressionUUID->"86f86249-5f42-4c51-8b6e-7e1767e236c2"] + 3.994074250621415*^9, 3.99407427059237*^9}, 3.994386330734187*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"6bee9707-9417-4f0c-adde-66d64233e673"] }, Open ]], Cell[CellGroupData[{ @@ -4857,39 +4727,48 @@ Cell[BoxData[ RowBox[{"4", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}]}]], ")"}], "2"], "*", RowBox[{"(", "BBB22", ")"}]}]}]}]], "Input", - CellLabel-> - "In[373]:=",ExpressionUUID->"39229fe3-c44d-4690-89cb-b4deb8cf5bfd"], + CellLabel->"In[70]:=",ExpressionUUID->"39229fe3-c44d-4690-89cb-b4deb8cf5bfd"], Cell[BoxData["674.8474263523988`"], "Output", CellChangeTimes->{ 3.991320421481529*^9, {3.994074198207098*^9, 3.9940742151610737`*^9}, { - 3.99407425063161*^9, 3.9940742706025248`*^9}}, - CellLabel-> - "Out[373]=",ExpressionUUID->"4b27e90f-29ef-4013-8647-45d92514696d"] + 3.99407425063161*^9, 3.9940742706025248`*^9}, 3.994386330742852*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"48257e75-67f0-4341-a03c-a17a6c332f5b"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"f1", "=", "0.4720031358"}]], "Input", - CellChangeTimes->{3.9918501413985214`*^9, - 3.994236051962882*^9},ExpressionUUID->"5894836c-9594-0940-b94c-\ -299085c765cc"], + CellChangeTimes->{3.9918501413985214`*^9, 3.994236051962882*^9}, + CellLabel->"In[71]:=",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], + +Cell[BoxData["0.4720031358`"], "Output", + CellChangeTimes->{3.994386330750025*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"a537bf65-844a-4950-b057-c0f8fdaf4fe5"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918501359768734`*^9, - 3.991850137465685*^9}},ExpressionUUID->"5965eb10-01f8-5545-9b6f-\ -8fab318cd4b7"], + CellChangeTimes->{{3.9918501359768734`*^9, 3.991850137465685*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"f2", "=", "0.185261438"}]], "Input", CellChangeTimes->{ 3.9918501402114105`*^9, 3.9942360584168253`*^9, {3.994236166803265*^9, - 3.99423616891784*^9}},ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-\ -092c5143dcf0"], + 3.99423616891784*^9}}, + CellLabel->"In[73]:=",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], + +Cell[BoxData["0.185261438`"], "Output", + CellChangeTimes->{3.994386330761229*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"2de1a2fa-7384-4e6b-9062-0e3bdd830cb9"] +}, Open ]], Cell[BoxData[""], "Input", - CellChangeTimes->{{3.9918501388085117`*^9, - 3.991850138811516*^9}},ExpressionUUID->"6e7c45d7-0298-ce41-ba97-\ -a3c857e6ae57"], + CellChangeTimes->{{3.9918501388085117`*^9, 3.991850138811516*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ @@ -4935,13 +4814,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "15"}]]}], ")"}], "1"], "*", "d"}]}], ")"}], "2"]}], ")"}]}]], "Input", - CellLabel-> - "In[399]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], + CellLabel->"In[75]:=",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[BoxData["2.3793916761039797`*^-53"], "Output", - CellChangeTimes->{3.9913437871842365`*^9}, - CellLabel-> - "Out[399]=",ExpressionUUID->"d7904bcf-fc55-b844-b4d2-059d830f1317"] +Cell[BoxData["1.459454531271633`*^-53"], "Output", + CellChangeTimes->{3.9913437871842365`*^9, 3.994386330773798*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"12350202-2747-466d-93df-bc04990fb07f"] }, Open ]], Cell[CellGroupData[{ @@ -4975,14 +4852,12 @@ Cell[BoxData[ RowBox[{ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b1", "*", "b1"}]}], ")"}]}]}]], "Input", - CellChangeTimes->{ - 3.991557655438551*^9},ExpressionUUID->"f2e6289f-a8bc-6d44-a856-\ -301cf9f22a61"], + CellChangeTimes->{3.991557655438551*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[BoxData["8.839304777809617`*^-55"], "Output", - CellChangeTimes->{3.9913437872132397`*^9}, - CellLabel-> - "Out[400]=",ExpressionUUID->"7c075ec9-a97b-ab47-b241-cc392b585c5e"] +Cell[BoxData["6.908152201359485`*^-55"], "Output", + CellChangeTimes->{3.9913437872132397`*^9, 3.994386330783372*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"34ccc562-e3d2-4dd2-8c97-1ee5857b2803"] }, Open ]], Cell[CellGroupData[{ @@ -5015,14 +4890,12 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}]], "Input", - CellChangeTimes->{{3.9915576595317745`*^9, - 3.9915576617156334`*^9}},ExpressionUUID->"cdf84d2f-1e96-4c43-9286-\ -fda42549e334"], + CellChangeTimes->{{3.9915576595317745`*^9, 3.9915576617156334`*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[BoxData["2.0384594858915346`*^-54"], "Output", - CellChangeTimes->{3.9913437872412376`*^9}, - CellLabel-> - "Out[401]=",ExpressionUUID->"ddda4800-8c90-d44b-acfd-6ccb39eee852"] +Cell[BoxData["1.0198500965406662`*^-54"], "Output", + CellChangeTimes->{3.9913437872412376`*^9, 3.99438633079185*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"bd3380df-8800-4fc6-ae7e-e8a2979312dc"] }, Open ]], Cell[CellGroupData[{ @@ -5045,13 +4918,11 @@ Cell[BoxData[ FractionBox[ RowBox[{"Ih", "*", "Ir"}], RowBox[{"Ih", "+", "Ir"}]]}]}]], "Input", - CellLabel-> - "In[402]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], + CellLabel->"In[78]:=",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[BoxData["27.24865368249903`"], "Output", - CellChangeTimes->{3.9913437872672386`*^9}, - CellLabel-> - "Out[402]=",ExpressionUUID->"046d7438-d73f-9343-9ae7-b01adfd6d8f5"] +Cell[BoxData["13.833851905494285`"], "Output", + CellChangeTimes->{3.9913437872672386`*^9, 3.9943863307995462`*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"8ab5183d-6728-4b8a-9cc0-a8959cb3deaf"] }, Open ]], Cell[CellGroupData[{ @@ -5077,13 +4948,11 @@ Cell[BoxData[ RowBox[{"Ih", "+", "Il"}], ")"}], "*", RowBox[{"(", RowBox[{"Ih", "+", "Ir", "+", "Il"}], ")"}]}], "Ir"]}]}]], "Input", - CellLabel-> - "In[403]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], + CellLabel->"In[79]:=",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[BoxData["47.62007062351`"], "Output", - CellChangeTimes->{3.991343787279253*^9}, - CellLabel-> - "Out[403]=",ExpressionUUID->"d2928e96-58be-3a4f-8bee-5b9e193c2ac6"] +Cell[BoxData["27.735901024253504`"], "Output", + CellChangeTimes->{3.991343787279253*^9, 3.994386330807591*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"854391eb-5f28-424c-ba41-a2aa4fba0031"] }, Open ]], Cell[CellGroupData[{ @@ -5092,13 +4961,11 @@ Cell[BoxData[ RowBox[{"hb", "=", SqrtBox[ FractionBox["Kb", "Qb3"]]}]], "Input", - CellLabel-> - "In[404]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], + CellLabel->"In[80]:=",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[BoxData["0.718596406513947`"], "Output", - CellChangeTimes->{3.9913437873062572`*^9}, - CellLabel-> - "Out[404]=",ExpressionUUID->"bf655ed3-7200-2249-b687-593ee351a598"] +Cell[BoxData["1.9227859822384121`"], "Output", + CellChangeTimes->{3.9913437873062572`*^9, 3.99438633081511*^9}, + CellLabel->"Out[80]=",ExpressionUUID->"f1dc5e8a-efb2-43ac-b94a-81de989fce2f"] }, Open ]], Cell[CellGroupData[{ @@ -5107,13 +4974,11 @@ Cell[BoxData[ RowBox[{"hw", "=", SqrtBox[ FractionBox["Kw", "Qw3"]]}]], "Input", - CellLabel-> - "In[405]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], + CellLabel->"In[81]:=",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[BoxData["2.8712430196956706`"], "Output", - CellChangeTimes->{3.9913437873353844`*^9}, - CellLabel-> - "Out[405]=",ExpressionUUID->"56f5f06b-52e2-6941-b28e-41b961cb42e9"] +Cell[BoxData["4.932665420518149`"], "Output", + CellChangeTimes->{3.9913437873353844`*^9, 3.994386330823141*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"b408b1c7-1ba2-4118-9884-596da0a9cc90"] }, Open ]], Cell[CellGroupData[{ @@ -5122,13 +4987,11 @@ Cell[BoxData[ RowBox[{"Cw", "=", FractionBox[ RowBox[{"Qw3", "*", "hw"}], "1"]}]], "Input", - CellLabel-> - "In[406]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], + CellLabel->"In[82]:=",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[BoxData["136.72879537516795`"], "Output", - CellChangeTimes->{3.991343787361582*^9}, - CellLabel-> - "Out[406]=",ExpressionUUID->"8c210f75-69a5-5340-94a4-65e97302ca45"] +Cell[BoxData["136.81191988924917`"], "Output", + CellChangeTimes->{3.991343787361582*^9, 3.994386330830665*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"8c49d98e-8ec5-42d1-9f42-c7e53bae08d1"] }, Open ]], Cell[CellGroupData[{ @@ -5137,13 +5000,11 @@ Cell[BoxData[ RowBox[{"Cb", "=", FractionBox[ RowBox[{"Qb3", "*", "hb"}], "1"]}]], "Input", - CellLabel-> - "In[407]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], + CellLabel->"In[83]:=",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[BoxData["19.58078461858683`"], "Output", - CellChangeTimes->{3.9913437873734856`*^9}, - CellLabel-> - "Out[407]=",ExpressionUUID->"bad7f5b6-1bd3-6b4b-87e4-44aee3a120fc"] +Cell[BoxData["26.59953652424656`"], "Output", + CellChangeTimes->{3.9913437873734856`*^9, 3.994386330839232*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"5167b901-7867-4d09-b9fe-1733a16a5104"] }, Open ]], Cell[CellGroupData[{ @@ -5332,13 +5193,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[408]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], + CellLabel->"In[84]:=",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[BoxData["0.03116264120310575`"], "Output", - CellChangeTimes->{3.9913437874002857`*^9}, - CellLabel-> - "Out[408]=",ExpressionUUID->"ffdf2eb3-13bd-724f-a87b-fb40655ae9c4"] +Cell[BoxData["0.006812933504374661`"], "Output", + CellChangeTimes->{3.9913437874002857`*^9, 3.9943863308489943`*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"f40ba499-9db0-46c7-a0f4-05fa17b3bc71"] }, Open ]], Cell[CellGroupData[{ @@ -5351,13 +5210,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[409]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], + CellLabel->"In[85]:=",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[BoxData["5.020278507983894`"], "Output", - CellChangeTimes->{3.9913437875033875`*^9}, - CellLabel-> - "Out[409]=",ExpressionUUID->"609425d6-cf9c-7a45-bc21-030ca3aa1290"] +Cell[BoxData["10.736874223079738`"], "Output", + CellChangeTimes->{3.9913437875033875`*^9, 3.994386331044971*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"14c51a56-ab0e-414f-be61-4f088d9db726"] }, Open ]], Cell[CellGroupData[{ @@ -5548,13 +5405,11 @@ Cell[BoxData[ SuperscriptBox["10", RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", - CellLabel-> - "In[410]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], + CellLabel->"In[86]:=",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[BoxData["0.011613560908040731`"], "Output", - CellChangeTimes->{3.9913437875342865`*^9}, - CellLabel-> - "Out[410]=",ExpressionUUID->"b20cbe94-36a3-8548-a61e-959a25814c62"] +Cell[BoxData["0.03684831470511829`"], "Output", + CellChangeTimes->{3.9913437875342865`*^9, 3.994386331058916*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"44258a98-a58f-4212-a4d2-170460fa4c49"] }, Open ]], Cell[CellGroupData[{ @@ -5567,13 +5422,11 @@ Cell[BoxData[ RowBox[{ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", - CellLabel-> - "In[411]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], + CellLabel->"In[87]:=",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[BoxData["8.223604958038852`"], "Output", - CellChangeTimes->{3.9913437876352882`*^9}, - CellLabel-> - "Out[411]=",ExpressionUUID->"4fc2e2c1-457d-3d4a-a5b7-180877c6f370"] +Cell[BoxData["4.616747533161557`"], "Output", + CellChangeTimes->{3.9913437876352882`*^9, 3.994386331118154*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"401dbb15-28c6-45f9-a499-e5e43e9c98a1"] }, Open ]], Cell[CellGroupData[{ @@ -5665,13 +5518,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[412]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], + CellLabel->"In[88]:=",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991343787650694*^9}, - CellLabel-> - "Out[412]=",ExpressionUUID->"08fcefa1-a87b-bf4b-998d-0c9017752dd4"] +Cell[BoxData["0.06275239908812294`"], "Output", + CellChangeTimes->{3.991343787650694*^9, 3.994386331131976*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"59679606-3f42-427e-ae03-c310e74d5a73"] }, Open ]], Cell[CellGroupData[{ @@ -5760,13 +5611,11 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", - CellLabel-> - "In[413]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], + CellLabel->"In[89]:=",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913437876776943`*^9}, - CellLabel-> - "Out[413]=",ExpressionUUID->"5678b502-e98a-5d4b-9c03-fe98b2cc6f78"] +Cell[BoxData["0.937247600911877`"], "Output", + CellChangeTimes->{3.9913437876776943`*^9, 3.99438633114183*^9}, + CellLabel->"Out[89]=",ExpressionUUID->"df95b563-0be6-4e75-9a85-74f2d16dec6f"] }, Open ]], Cell[CellGroupData[{ @@ -5888,19 +5737,17 @@ Cell[BoxData[ FractionBox["25", RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", - CellLabel-> - "In[414]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], + CellLabel->"In[90]:=",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913437877049465`*^9}, - CellLabel-> - "Out[414]=",ExpressionUUID->"d74c1470-6eae-4841-b978-069a86bca67d"] +Cell[BoxData["0.05881453549680789`"], "Output", + CellChangeTimes->{3.9913437877049465`*^9, 3.994386331152088*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"85d9f7b0-8457-45fe-b6e2-51f41d4251a2"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", - RowBox[{"x", ",", "y"}], "]"}]], "Input",ExpressionUUID->"8111b6bb-cdcb-\ -ad40-9440-412e77bed40d"], + RowBox[{"x", ",", "y"}], "]"}]], "Input", + CellLabel->"In[91]:=",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ @@ -5961,68 +5808,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501532204666`*^9},ExpressionUUID->"fc88a60e-e348-d344-96c4-\ -1f4f66f53217"], + CellChangeTimes->{3.9918501532204666`*^9}, + CellLabel->"In[92]:=",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 433, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877189426`*^9}, - CellLabel-> - "During evaluation of \ -In[415]:=",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 434, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787730139*^9}, - CellLabel-> - "During evaluation of \ -In[415]:=",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7890997222826517`*^-202\\\", \ \\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ 32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 415, 435, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437877381363`*^9}, +normalized machine number; precision may be lost.\"", 2, 92, 1, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994386331188842*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], +In[92]:=",ExpressionUUID->"b7e26db2-c8ca-46c2-837e-8de3457c4eab"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.6501520290996165`*^-207\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 92, 2, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994386331208679*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"fa6f7c10-ebda-421b-861d-5ebd3f0f0bc5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2086477698487412`*^-211\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 92, 3, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.9943863312152157`*^9}, + CellLabel-> + "During evaluation of \ +In[92]:=",ExpressionUUID->"1d0db5ab-c2f3-4580-85e7-437a3748b58e"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 415, 436, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991343787747137*^9}, +during this calculation.\"", 2, 92, 4, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437877189426`*^9, 3.994386331219926*^9}, CellLabel-> "During evaluation of \ -In[415]:=",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], +In[92]:=",ExpressionUUID->"5280a2f1-2bf8-4de5-877c-24e3f399b1ed"], -Cell[BoxData["5.020278507983898`"], "Output", - CellChangeTimes->{3.991343791131052*^9}, - CellLabel-> - "Out[415]=",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[BoxData["10.736874223079758`"], "Output", + CellChangeTimes->{3.991343791131052*^9, 3.994386333256769*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"5691e17e-f43c-4985-a5d8-0825c9b3a094"] }, Open ]], Cell[CellGroupData[{ @@ -6084,68 +5933,70 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918501579408264`*^9},ExpressionUUID->"dca13eb7-7f94-3e45-81a8-\ -b62dad3009d2"], + CellChangeTimes->{3.9918501579408264`*^9}, + CellLabel->"In[93]:=",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 437, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911686516`*^9}, - CellLabel-> - "During evaluation of \ -In[416]:=",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 438, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134379117865*^9}, - CellLabel-> - "During evaluation of \ -In[416]:=",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7890997222826517`*^-202\\\", \ \\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ 32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 416, 439, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911866493`*^9}, +normalized machine number; precision may be lost.\"", 2, 93, 5, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994386333347241*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], +In[93]:=",ExpressionUUID->"f2923dfa-f2f0-4701-b1a8-fa633136a6e9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.6501520290996165`*^-207\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 93, 6, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994386333356688*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"73f36670-d17c-40ba-b721-75b7bcce5611"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2086477698487412`*^-211\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 93, 7, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.9943863333618917`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"8943d7cf-cf97-49f5-9ade-d25c39744dc7"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 416, 440, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913437911946507`*^9}, +during this calculation.\"", 2, 93, 8, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913437911686516`*^9, 3.994386333366859*^9}, CellLabel-> "During evaluation of \ -In[416]:=",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], +In[93]:=",ExpressionUUID->"65d29e20-889b-4215-9347-99433a6df82f"], -Cell[BoxData["8.223604958038848`"], "Output", - CellChangeTimes->{3.991343794599764*^9}, - CellLabel-> - "Out[416]=",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[BoxData["4.6167475331615595`"], "Output", + CellChangeTimes->{3.991343794599764*^9, 3.994386335483622*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"b39137dc-633f-4f85-962b-1abc926c3806"] }, Open ]], Cell[CellGroupData[{ @@ -6201,94 +6052,92 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "1"], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501631488323`*^9},ExpressionUUID->"46451e4d-f5ef-b246-91c6-\ -4265c9fafb97"], + CellChangeTimes->{3.9918501631488323`*^9}, + CellLabel->"In[94]:=",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hk4VGsYAPDJlmxZsnZJtqJEQ5a2781YsqYoZElj5pBEljT2upYWS0ho +kUrKOggtqOvG7Qo3UtY2GjNkz5KZou7XH+c5z+95z3m/9/229dSgA3Q+Eon0 +GT+/38Gvtmx41Plqd76vXKpeJAvtnrq7jWpehg6fv9z024P5Rlka5g0o22il +rz62I+0/ITGDf1B9RPDprdhVjLgmQfN2pOzVNU/GvvBCoTGu5DXqntf+ZIj9 +pDP45hK5Gyk5M4yMsccGWqMj6vvQUPbT76bYSmx192+U90jnA2/TLmzb6WjT +0PZPqMVWtxWwny2NiTJKhtB5Mdduc+yes/JRDwNZSMAh0t4ae0rIfGyezEY8 +ShbZAVso5aSbwSIHtWrdS3DCVpHKawmuH0Ukw0qKG7bD2m/3pigTqO5duTCB +TdxSk9MVnkKVq+5InMCO09yXeLx9GvWfv3Q2DLtP/u3WsJKvqLTXhZmATTvs +f+xyyixSoRr4pWLP3CDdfhA4h3ZUr7qUjS2spiv5lbyAFp2L1Euws2hNVpKy +31DdueCMGmzV+25xeovfkJGFccBf2Cabk6ZO1HNRzeE6vx5sP6NP7WOUJZTX +Xx6zKoqF5hmnBES0lpGFjr+TPPaZetGd2sI/UW3EhmxN7FwwKfVt/4X2lt2n +UrBphS3mISUr4Fr2a/kE7JIXlwfPruWD7K9FB69gz4x4RWek8EEtL4l0Hzta +Z6G6MpAfRCwP57VhZ1WsV58mC4LS/lNzitEsNNA58exngSCkn7p6dQu26uyj +wxKyQtCn11ZGwS4zdMjUXRSCJGN3pSDs5ieRKwLqheHqUWvpNuyFpjefRili +4FpuF54Tw0LSdmKSUc/E4G2jgVkttv5bcxA3FYfrW9zT3mD7D9fe2rpFAuIv +Bt+XimWhk3zt+rvEJOFK/9j7y9hsNebXxG9S0NVw7VBlHJ4fonVVh4E01P17 +aEMPNl8pZ71CsDRcETjJWMJWNVh3oGRcGrqNnl+3OcNChynpD14NysDmyXUj +E9gdPiGh8m2yQLcrybT+k4U+3k9L9haWA0raDv/T2BPjJQXFFnKw/ab980Js +kTDWmx2NckAsLc/xx7OQeYKzoXetPJQudHu+wK67a7RQlK8IPzaW2vskstBd +9vfw7WHKoON5qWr5PAvtPXjuY2i5MhwnzccZX8D5m2UsyznKYBda9SwY2/Du +ZllVNxVYl7AndQS7mepVLbh7HZzK4Qvqu8hCs9ODp0fjVeFNeJRVRwoLyZww +r6m2VwPN+XFvqQwW4twV8XP0V4Muj5/IDfvx+861k0lqIGT08tJtbA87z3it +RjWQSLhy1iAT17cp/MBVsjrUVRFMj8t4/LH7M7HyGvBJdVKv+QoLOfuK6toM +acIIs2B85BoLofCDZJdlTfCQrjDeeZ2FdBLzjWmKWnDH+exMOjapwMAsdr8W +nDlyoWjHDRYq/+ju8uBvLYjmppOz8/D5PFR2VunOBmB+6qs6cgvXZ27fM0bV +ht2DshHm91iowCnn3WKsNnRmp9HvYadRhwYFrmtDjrfDX8L38f4+c2pc5Y02 +EAE1da+wpRrySE4UHbi2Luv1kWK8fwymdOrVN8EX/rj47DIWWqt2KS55eDM4 +pn2UP1TNQg0X57V5fLrApnbrd2B7zLm9JdbrgkTp6ra9NSx0s1lD28xLF3LT +feN31bKQmm9dF7dXF3qmnQV0H+F+y9iaRNsWUBlqsNOoZyHltSqEqps+qJ1+ +oRnWxEKbC8PEfiAy8MUxY651sxCVFr+g60CGj9qKfdo9+LyqZ3709iCDSMWt +u0+w+e9UVL5gkEGgdl3WQC8+bzfHnDOryKBTmf7f+gF8n+Z652mrG4DiKLvi +n494fZPttrgKGYJtfrq3zygL3Q7RcKxt3wZ2iR9mF5dYqDMcGScUmkKEatq/ +r/SG0XqvbgfPgF2Q9vBHo6b/MKL/eshUjgDojV1zGhUNI/nxxyvlqWYgWHc+ +YMP8MAoz2Pk+U8cckifIpkBhI+rkUovMmAU0BpX5V+eyUblZ6Mr8Diu49WIm +Ke4nG92d9/+7LMsa7qhNmewgOIi7R+G/5jhbML9Wp8QY5KAPJP6vQ0ft4a/9 +u3YVUkdQ4B9B6WfV9wFFUnSPJ3sEMY+1NF5JdIRJm4NlKTGjKHJOcXHTsf0w +8HIh7bLsF7RgY3no3yMHQFhesY/+zxdk6p6xh73fCRyHehT8Y8ZQl2Kef7OB +M9g/6uv0NhhHSvfiG4o2HoRFqYiV8/wT6PGgjp2D+CFwMbs9YvV6Aqm8nfEN +nzwEfsUigcfuTiKDKxllBYMu8O/F8FWUrCmUJzC3JbPJFYKcnO6Ox0yjh3v0 +BhKfuMHpjSe9K81mUK7xRamlksOQfrRaoadlBnW8K0wySHGHo9+3pn20/opq +7W9onDzjAdlFlpZJ/V/R1xNOpECaJxhyY9nx1Fm0YKntN0XxAv7+guXesVlU +NNnPDTU6Apea899sPjOHXG8X+niKeYOwdHndoOg8qn5ge4T/nDdcGe3ju3hn +Hpmu7eJd4HlD81X1a+a6C0h90Hfg9bGj4GvCWDB8sICGRY/vu8E6CipvL6bG +7PqGOtMcfKwOUsG0ySPz+JNvKIuRL3qqkwqbdC4uBRovooZnv3g+1j7gfm7n +slTxIlrtAecM6nzgQNFoc44wF5l6TxUlGtLAeU5zhZEPF927OhPqYESD3G1u +ywE0LlrzZna3vAkNOMbPNxbQuWjKYvFt0Q4aFE1Iion7cfH9QlrRbkaDAWbx +Uk8AF0ksSrlJ76fBmtdplpRwLhpO3bYq/wQNPIVuJ0ed56K0+uhjj+/R4H2S +ZL97CRedIOeYMopo4FKiEupSykV2xVWrTEpokL5ns+GBMi4SyeEUPyqnASHs +rmPB5KLEEMexhzU0iHYtHFR9wEXR2hrHa5/ToKMvxKziCRf557QFPPhIA/OY +UEetFi6yluDsDBmkQdcGCQ+hl1y0MZEkTv5Mg4aOonNsbE7ItvIqNv7eW2T3 +7TYuOuqQP1k5gS3w13qJDi5yFQwNrPhOA7stGTlPu7nIKlTpZJkcHc6Zk94H +f+ai5/lJNpkKdEjSGFewZHHRzvZZDYYSHfbEvLRUHOYifc22fooKjq8OCWtg +c5FibxTlnSYdfqYsSX4b5aLx7R/kRLbRwYZ/6x9G01x0ie/WU18nOszrvZob ++Y771xPLtT9Ih6nir4NXf3BRgjsjxMCFDk+rVR7bLHERo8Zxw6/DdNib16Ze +vIzrJ1ZkZFPp4E1bGnMl8ZBBK5X2TzAdJqiSEgmCPNSboSmqnk6H9V2RR1eu +5iEmEvcbzaAD2yOpIgU7YXK+ufwyHbqM04SkJHmIbN0ca5JDhxumEh1yUjyU +RvKZtb9Jhzb5nS/kZHjIMuhWP6OMDg9YkVtH5XhIWfm80W4mHZw37CJ5yfPQ +fGvQZf5KOmikC/R0Yd/RQvZp1XQIdtXNfqLAQ8sfPjQW1NGB8+kpPUqJh2rs +1ha9aqGDRKqndqcyDyV/5xPMaqXDOOi6G6nwELVo7KhbOx1k/tibeR1bUqBu +7XAHHdQRb7XPOh4KqHe9xOuhw8WrKZYcVR5S18kO12DjfplHkp+q89D33pg3 +Xzi431WBQms0eKgzka5fMUoHkwbbxGPYsUOGY6YTdGC8UEmT0uShgdw3nvvm +6HCB+fblQS0eylwpZRG5goDg4/29zI081DD7wT2Mn4A/mHrMZeyRDyUhgYIE +CH2p3WurzUM7a8xvUVcRQIqZefkZm+PN+GEjRYCRxbnvfJtw/XYW0hYyBDAb +mqatsHcYS2sjWQKelYYXJWOni5cdMlAkgJEx5rN6M47Xfapau54AtYpWkrAu +DxGFZS2y6gTUeDFWU7DT0yM+rdYkQODLj8FobA4hIy6gTUBS8Y72id9xGSu/ +CX0CAuJr/366hYfqfsrEccgEaH/TYk9hs78MXhk0JKDvPqdVRY+HtjdGNr01 +wfkC1nyIxB4OYKo8BQJo07lKGvo8JOEate2RGQF/S39xsMU2pey1qzInQGtO +wSIYO03xc0ThXgJs1UbDn2A/FqhIz7chIP/8yQfvsFnTUfev2hFAfldSsYRt +8kK2O9WRgOiXotPbt+L1rvo8fu4AAXkFKltdsVNvVPD96UzAGKfeMAz7c4i1 +frgrAdTokDNF2OJeclYnD+P5MIxqacQ2sWZ5+nvg8dQmX/f+/n9dTLKXNwEa +TdMb+ci4HhGbO65UAo4LhIbLYn9ekHtygEbAw1zzxA3Y4kOsDjuCAL1mr4Mm +2CbtlRxLP9yffgPHCpv6KGYZ/AlQH3cxPYSdesdmzY4AAtr8dO19fudPld+0 +LZCAlX+aqAX9zs8Y3qN3EtcfdupxBLYYrcpVO4SAjuHB1fHYxvtig9TDCNg1 +cHpj8u/8222TlMMJEGky5svETtFUyJNn4PkKUcnLwX4oya6WiiRATFWHdx17 +6EdVq2g0AZr+bnL5v/OPxA4JxhLg4lQ6fwvbqMuW+yuOgFLKuqzb2P8D71Gz +tA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6302,105 +6151,105 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1Hk4VGsYAPDJlmxZsnZJtqJEQ5a2781YsqYoZElj5pBEljT2upYWS0ho +kUrKOggtqOvG7Qo3UtY2GjNkz5KZou7XH+c5z+95z3m/9/229dSgA3Q+Eon0 +GT+/38Gvtmx41Plqd76vXKpeJAvtnrq7jWpehg6fv9z024P5Rlka5g0o22il +rz62I+0/ITGDf1B9RPDprdhVjLgmQfN2pOzVNU/GvvBCoTGu5DXqntf+ZIj9 +pDP45hK5Gyk5M4yMsccGWqMj6vvQUPbT76bYSmx192+U90jnA2/TLmzb6WjT +0PZPqMVWtxWwny2NiTJKhtB5Mdduc+yes/JRDwNZSMAh0t4ae0rIfGyezEY8 +ShbZAVso5aSbwSIHtWrdS3DCVpHKawmuH0Ukw0qKG7bD2m/3pigTqO5duTCB +TdxSk9MVnkKVq+5InMCO09yXeLx9GvWfv3Q2DLtP/u3WsJKvqLTXhZmATTvs +f+xyyixSoRr4pWLP3CDdfhA4h3ZUr7qUjS2spiv5lbyAFp2L1Euws2hNVpKy +31DdueCMGmzV+25xeovfkJGFccBf2Cabk6ZO1HNRzeE6vx5sP6NP7WOUJZTX +Xx6zKoqF5hmnBES0lpGFjr+TPPaZetGd2sI/UW3EhmxN7FwwKfVt/4X2lt2n +UrBphS3mISUr4Fr2a/kE7JIXlwfPruWD7K9FB69gz4x4RWek8EEtL4l0Hzta +Z6G6MpAfRCwP57VhZ1WsV58mC4LS/lNzitEsNNA58exngSCkn7p6dQu26uyj +wxKyQtCn11ZGwS4zdMjUXRSCJGN3pSDs5ieRKwLqheHqUWvpNuyFpjefRili +4FpuF54Tw0LSdmKSUc/E4G2jgVkttv5bcxA3FYfrW9zT3mD7D9fe2rpFAuIv +Bt+XimWhk3zt+rvEJOFK/9j7y9hsNebXxG9S0NVw7VBlHJ4fonVVh4E01P17 +aEMPNl8pZ71CsDRcETjJWMJWNVh3oGRcGrqNnl+3OcNChynpD14NysDmyXUj +E9gdPiGh8m2yQLcrybT+k4U+3k9L9haWA0raDv/T2BPjJQXFFnKw/ab980Js +kTDWmx2NckAsLc/xx7OQeYKzoXetPJQudHu+wK67a7RQlK8IPzaW2vskstBd +9vfw7WHKoON5qWr5PAvtPXjuY2i5MhwnzccZX8D5m2UsyznKYBda9SwY2/Du +ZllVNxVYl7AndQS7mepVLbh7HZzK4Qvqu8hCs9ODp0fjVeFNeJRVRwoLyZww +r6m2VwPN+XFvqQwW4twV8XP0V4Muj5/IDfvx+861k0lqIGT08tJtbA87z3it +RjWQSLhy1iAT17cp/MBVsjrUVRFMj8t4/LH7M7HyGvBJdVKv+QoLOfuK6toM +acIIs2B85BoLofCDZJdlTfCQrjDeeZ2FdBLzjWmKWnDH+exMOjapwMAsdr8W +nDlyoWjHDRYq/+ju8uBvLYjmppOz8/D5PFR2VunOBmB+6qs6cgvXZ27fM0bV +ht2DshHm91iowCnn3WKsNnRmp9HvYadRhwYFrmtDjrfDX8L38f4+c2pc5Y02 +EAE1da+wpRrySE4UHbi2Luv1kWK8fwymdOrVN8EX/rj47DIWWqt2KS55eDM4 +pn2UP1TNQg0X57V5fLrApnbrd2B7zLm9JdbrgkTp6ra9NSx0s1lD28xLF3LT +feN31bKQmm9dF7dXF3qmnQV0H+F+y9iaRNsWUBlqsNOoZyHltSqEqps+qJ1+ +oRnWxEKbC8PEfiAy8MUxY651sxCVFr+g60CGj9qKfdo9+LyqZ3709iCDSMWt +u0+w+e9UVL5gkEGgdl3WQC8+bzfHnDOryKBTmf7f+gF8n+Z652mrG4DiKLvi +n494fZPttrgKGYJtfrq3zygL3Q7RcKxt3wZ2iR9mF5dYqDMcGScUmkKEatq/ +r/SG0XqvbgfPgF2Q9vBHo6b/MKL/eshUjgDojV1zGhUNI/nxxyvlqWYgWHc+ +YMP8MAoz2Pk+U8cckifIpkBhI+rkUovMmAU0BpX5V+eyUblZ6Mr8Diu49WIm +Ke4nG92d9/+7LMsa7qhNmewgOIi7R+G/5jhbML9Wp8QY5KAPJP6vQ0ft4a/9 +u3YVUkdQ4B9B6WfV9wFFUnSPJ3sEMY+1NF5JdIRJm4NlKTGjKHJOcXHTsf0w +8HIh7bLsF7RgY3no3yMHQFhesY/+zxdk6p6xh73fCRyHehT8Y8ZQl2Kef7OB +M9g/6uv0NhhHSvfiG4o2HoRFqYiV8/wT6PGgjp2D+CFwMbs9YvV6Aqm8nfEN +nzwEfsUigcfuTiKDKxllBYMu8O/F8FWUrCmUJzC3JbPJFYKcnO6Ox0yjh3v0 +BhKfuMHpjSe9K81mUK7xRamlksOQfrRaoadlBnW8K0wySHGHo9+3pn20/opq +7W9onDzjAdlFlpZJ/V/R1xNOpECaJxhyY9nx1Fm0YKntN0XxAv7+guXesVlU +NNnPDTU6Apea899sPjOHXG8X+niKeYOwdHndoOg8qn5ge4T/nDdcGe3ju3hn +Hpmu7eJd4HlD81X1a+a6C0h90Hfg9bGj4GvCWDB8sICGRY/vu8E6CipvL6bG +7PqGOtMcfKwOUsG0ySPz+JNvKIuRL3qqkwqbdC4uBRovooZnv3g+1j7gfm7n +slTxIlrtAecM6nzgQNFoc44wF5l6TxUlGtLAeU5zhZEPF927OhPqYESD3G1u +ywE0LlrzZna3vAkNOMbPNxbQuWjKYvFt0Q4aFE1Iion7cfH9QlrRbkaDAWbx +Uk8AF0ksSrlJ76fBmtdplpRwLhpO3bYq/wQNPIVuJ0ed56K0+uhjj+/R4H2S +ZL97CRedIOeYMopo4FKiEupSykV2xVWrTEpokL5ns+GBMi4SyeEUPyqnASHs +rmPB5KLEEMexhzU0iHYtHFR9wEXR2hrHa5/ToKMvxKziCRf557QFPPhIA/OY +UEetFi6yluDsDBmkQdcGCQ+hl1y0MZEkTv5Mg4aOonNsbE7ItvIqNv7eW2T3 +7TYuOuqQP1k5gS3w13qJDi5yFQwNrPhOA7stGTlPu7nIKlTpZJkcHc6Zk94H +f+ai5/lJNpkKdEjSGFewZHHRzvZZDYYSHfbEvLRUHOYifc22fooKjq8OCWtg +c5FibxTlnSYdfqYsSX4b5aLx7R/kRLbRwYZ/6x9G01x0ie/WU18nOszrvZob ++Y771xPLtT9Ih6nir4NXf3BRgjsjxMCFDk+rVR7bLHERo8Zxw6/DdNib16Ze +vIzrJ1ZkZFPp4E1bGnMl8ZBBK5X2TzAdJqiSEgmCPNSboSmqnk6H9V2RR1eu +5iEmEvcbzaAD2yOpIgU7YXK+ufwyHbqM04SkJHmIbN0ca5JDhxumEh1yUjyU +RvKZtb9Jhzb5nS/kZHjIMuhWP6OMDg9YkVtH5XhIWfm80W4mHZw37CJ5yfPQ +fGvQZf5KOmikC/R0Yd/RQvZp1XQIdtXNfqLAQ8sfPjQW1NGB8+kpPUqJh2rs +1ha9aqGDRKqndqcyDyV/5xPMaqXDOOi6G6nwELVo7KhbOx1k/tibeR1bUqBu +7XAHHdQRb7XPOh4KqHe9xOuhw8WrKZYcVR5S18kO12DjfplHkp+q89D33pg3 +Xzi431WBQms0eKgzka5fMUoHkwbbxGPYsUOGY6YTdGC8UEmT0uShgdw3nvvm +6HCB+fblQS0eylwpZRG5goDg4/29zI081DD7wT2Mn4A/mHrMZeyRDyUhgYIE +CH2p3WurzUM7a8xvUVcRQIqZefkZm+PN+GEjRYCRxbnvfJtw/XYW0hYyBDAb +mqatsHcYS2sjWQKelYYXJWOni5cdMlAkgJEx5rN6M47Xfapau54AtYpWkrAu +DxGFZS2y6gTUeDFWU7DT0yM+rdYkQODLj8FobA4hIy6gTUBS8Y72id9xGSu/ +CX0CAuJr/366hYfqfsrEccgEaH/TYk9hs78MXhk0JKDvPqdVRY+HtjdGNr01 +wfkC1nyIxB4OYKo8BQJo07lKGvo8JOEate2RGQF/S39xsMU2pey1qzInQGtO +wSIYO03xc0ThXgJs1UbDn2A/FqhIz7chIP/8yQfvsFnTUfev2hFAfldSsYRt +8kK2O9WRgOiXotPbt+L1rvo8fu4AAXkFKltdsVNvVPD96UzAGKfeMAz7c4i1 +frgrAdTokDNF2OJeclYnD+P5MIxqacQ2sWZ5+nvg8dQmX/f+/n9dTLKXNwEa +TdMb+ci4HhGbO65UAo4LhIbLYn9ekHtygEbAw1zzxA3Y4kOsDjuCAL1mr4Mm +2CbtlRxLP9yffgPHCpv6KGYZ/AlQH3cxPYSdesdmzY4AAtr8dO19fudPld+0 +LZCAlX+aqAX9zs8Y3qN3EtcfdupxBLYYrcpVO4SAjuHB1fHYxvtig9TDCNg1 +cHpj8u/8222TlMMJEGky5svETtFUyJNn4PkKUcnLwX4oya6WiiRATFWHdx17 +6EdVq2g0AZr+bnL5v/OPxA4JxhLg4lQ6fwvbqMuW+yuOgFLKuqzb2P8D71Gz +tA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "PlotRange" -> {{0, 180}, {0.6086652522674177, + 1.5748611246128614`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.6086652522674191}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -6412,20 +6261,21 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.6086652522674177, + 1.5748611246128614`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.6086652522674191}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6439,104 +6289,103 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VesbB3CzMhUyZJ51KoVjDu8jJJIkisycsw2ZySXidotuRbek8VbK -kCFkLEO3n1CpVMrQaMrQdszHliHye/2x116ftff+vt9nvWu9W9kv3InJxcHB -QeJr9R75dpvmo7a35vFF/hvMuWaR+USuvp9VMWoUyu42w+7LMshUs3qMiDkf -41U7Mt7wCdGfoYpTdzRNscvjkpt4rVrR0T6fAhPsM8+lG5KL3iPR3dn1Rti1 -bZG3l3Q7kYcA09cAm/XlVWJ8/Sf08nThdTq2zJCq+0/Lb8hSN4Khjb1nMtE4 -urUXWaXXPt2K/WSJJRhX1I+atVLLN2F3nZBKeBg2gJzquuhq2BN8VixKdwiR -rPu7FbH50iLc6HPDSPMM39RGbAXRWy2R9SSSifhB24DtIPvz3oTlGJL/hlz4 -sYk7KpJaayYQFVa7iwM7WX1fypHWSSRM/PdqnnMWfZLq0Ikpmka7PYPOktiM -w8FBl9LYaN+c+PNe7KmbHHcrwmYQg+aQ2YW9RkVr/bTuLFK3+4NsxM5kNNms -l/iJWryCwmqwlfLdkrfP/UQBh6ZTS7CNtqZOhNbPI37OV+FXsAMNeltZlkuo -waddyR+bijvKI6CxjDKsC3e4YP9ZL2hKW/MbCU2ojezCvgZG9wNaVxDXc8ml -Tav98lqsooo44doaGhfJMYuKnl/qOyHLBVN8kRVd2FM/vBIvpnGBBn/0bDN2 -4ubZyrIwbuCMK6Pfwc58oKw6qcsL7R8ZF/djf2kbe/I7hxc8NNs+mmIrsR8d -FpHgg/+Ji5RrYhfrOWRozfHBbfd1cksrFGquPcYZUr8G/s4+25GFPdvU3kta -CkERu+rDh98UErMXWp/wRAhk85anq7C1O6xA2FgYQkfNL17BDh6svqOzTQQE -5Rr3uWJHcLVqmwmth8XsiDedyxQaUimdTvkpChtcR9pqlihEEa/WvqOLgdiv -f9kZ2Fz3h5WlI8UgLq8kMwRbia7oVDQqBsaTAocVsA9bXqh42ycOtVmJrIRf -FHrnHxUt9VoC3p3hoSkuUqgn//w5nzWScP6TifP0AoXGRotyCq0lgSvAgaMJ -WyBmoH1HgyTYCGl/ZWBbnXLW86mWgu8KXTez5ylUl2swW5C1EfjL/neIb45C -uUOLsSYx8jBuEzAdNkOh3S6ne6JL5IH2+w5DH3usWXxXybA8uP4lG/yLTSG9 -3K0SSm4KYFA3vyUVu9nPq5LXXBEaVXzSrkxTiD3Z9wd5Ugkqpo63ZE9SSDzU -qqpyrwr4j3jGBo1SaDhXINAxWAX6eqytVbBrvrXJjqeqQPbIf/lfWBTysPc8 -qdGgAu8L0jTtsHO3xDpd11WFkpBxcbURvD4rfypJSg0elhgVNQ1TyDlAUMuu -Xx0OpzuqVfRTCMW66B5aVoceXWlNb+zNKVmGjI0a4PSV1iSIzZFD35m0XwOa -Or1e+PdRqKTH/VDFUw2opSVyruulEN/B4hMy2Zpw9pXsbqdvuJ/V3i6WHw3k -IhqS0rooJKvyT/K5wa3wrLu54cNLCj0+S9EWuLTgq4K0sye2x4xbB6GsBev8 -hqJ+tFDodrMabaeXFiyl7Tyw+IJCKgF1H+Y/agGby+OuzHPcr3hInXi9DSbZ -EynWjRSSl1UglNy0oT75qqB1HYW25sUI/UK6oB8urDBVQCE/xslZLQddMJW+ -yxmIfU01o8fHQxeUuNtO9eZTiDv7QdnzOF0YMDkQ/OYehb7cZjlnlOvCVocd -Vbm5FDpzzecWTZUO5XLyBy3u4P04Z7/NlU8PXL7KBNGvUuhulJpjdas+FDqr -F6+cpFBbLDI8lWcMM6LcXRddKKTs1engGWIGJrPmr5eUKcRceVgqHw+gYSIa -vTA2g6RGa/il/HZCTo97TmnpDIqhm37L2GwFegX5MacjZpDf+FKLOMsaMp8U -HT2kPYNKdkbzZ72zgaR54dwbP9golwp+WpxpC9Pcu8H1LhvNW0i/aU7eAxJL -W4Q0DrBRNwf3dL/vXujcKjzYy8NGYXLhF06o7gPFrKOOHPXTqDSopeFyiiPs -nqA6AoOn0bGZjXNbgvYD3TH27GbFaTRrt+vgC28nINy1zITeTiFj94sWQ/sP -wP3IMBeT5Cn0YeOt4Ga6M9wLVW98ajCFZO6dfFywyQXqNg167W+fRDV9m+0d -hA+CcqVARt6uSaTQMRUQO34QOv/gX9nZMIHoly8W5/QdgjdS98o+6k6gWzwz -2zKaXMGZf6bLsXIcPbTY/iWl1g0yaqQ5bbaNo2uGZ0WXig5DEkHyaJePoXdf -81Lpae7wcHhg5J7FGKree1Mt4k8PONtpv5j4dhRNhx7gCGN4gpOHU+A/gaNo -dhctcMLSC5ZYV4vn1o6igvHP89EG3vDePYrmW8hCrnfz/D2FfMCIk72T04WF -Kiv2eHOf9oEAaX7XzysjyFj2w8KZBR9gC7wfsX04glT7Ar68D/KFUEHaeHP0 -CBoUPLLv5oAv6PBGXhrQGUFt5x38bVz84Mumvh12iyTKjMsSPNrmB7vvGjVF -NZPo8ZOVBX9bfyhOcHFdd4VE6zzgNL3OH3gShAbTI0iktOHFO7nH/tAu9zN+ -LpxE2q17pfme+APKdorzxXYydS/89NQfUoe9Sw3CcL5c7OvjL7EtileGjuD/ -ZPf9dS2f/OG7ygYD1wASqXlJXfOY8wcZlSDWWS8SGftMFKToMSDvkLEezYFE -965PRTsYMMBCMk+uei+JNrSzzaWMGMC9tcfbAnvCeq6jYAcDri9W/TxsT+Lz -hoOzdScDelK7mRl2JBKZE3UT28+AgktetmI2JBpM11+bFcqAEBsXxYNAov0v -DDsCwhmgtPLWexyR6AmHSZZ2JAMiin8tnsK+Hm2u3xjDgCfVwRbV5iRycLPx -HUpgQLz5GREZMxLVqrnVbjnLgBthUoWUMYnO1ycG1dxjwBgIfBmnkyhU96px -XAEDFiayrTKw7QvL1xoVMWBk2IHPEFvg6nDhoxIGDI90nz+hS6KUKEfWwyo8 -z9vmKhkdEiXS1I5UNzIghy53wHMbiYKvvg6p6GHAN0vTTlUaiWxFhk2j+hjg -fGBcqX0TiTalcAjrfmcA0/Zm01/Yw1H6JeVDDDDznhYe0CSRr0PWeNkYA46e -IR7ma5DIlTc67MEiA157T7tYqJHIJlomoliSCe0Rdq+rFUnUmJVqlyHNhG9m -fQLB2KatbLU4GSYcD39WpoCtrf76s6UCE7QVE7afUSDRxo8Jll/VmWBalTzv -J0+iUZNuSQF9JpAXHGtosiT6h+vOfwEHmHD1iDOLWwrPv13o2l4XJjD+OMFu -liTRKfe4KPohJjjHkz6p2HFVjporh5nwYdQ3QgDbl+C8eMWPCYmXp92kJEhE -f+XHeBbJBE9YOWglTqKPF9UFVS8wgUerh2KtI1EpEg4kLzJBKmaX7GPsU+NU -c8klJqxIZN9Ix9a1bU4yusqEva06uTrY5zn82XtvM8Hlc/734yIk2hV+53Nc -MRNOp18V0hQmkbz83wbmpXi+ZL7GZSESUa/CL3GXMcGuwK+tAztbA+09X8kE -M53+uZPYy93dDTl1TGCbjUcOC5Koyl624G0LEypKKdHHAiQ6t8jFm/mKCSLX -hQ9ew/YrYPm6tTLhjLPITAz2ep462cF3TIhYeWa4HTuk3vWfhS4mpGXyjuWv -JZHq5iuxakNMMKw8uVK4hkSLH4+3jwzjvK7Z9+ew21KY2g9IJvSq7VkOxU7q -12MZjzGBy+i2Fx37y7V2z30zTNiz0LOnkZ9EGfyi1sc4CTh141LbFB8+D9jd -7jHcBPByv3DrxP7RXRQVxktAg2ft/jps0yqrO35rCQh49Dk9BXvYJ+6XnSgB -qt0chsrY6+2txazFCZgqUzVYi73DUIyGJAjw1OHOneYl0QXh4oP0jQTYb517 -3YS9o663XFaZgJdL9+1DsYm84hYJVQJUFEueuq6+fyG+d506AW4/A/OssIcJ -cWEeGgHVPetq5Vefi9sEjmkTIPnvBtFOHhLV/RZPHtYloMl76FcT9tBI3+U+ -PQLebg93qcQ2aTjW1GGErVfifAl7MKRU4T8gwHbkzUlXbBHXBP1HOwnokvIb -tMM2ttxtX25FwOTPkkoz7PMbv8fn7cb9dEJuq2HX8Dy4kGVHgLNVT6009sBk -Qv51ewKc4vithLGNnkt0pjsSkNOQlDvHjfe7/PvoaScCxq+0HhvHTr/5gOsv -ZwI2iL3/3wD29yhb7VhXArz+Xr78HlvYS9Im4jABQfvUNV9iG9kOeAZ74HkP -cGs+Xf1e8fg5Lx8C0qv7oyqwawTssl39CECs/if3V/NmJWudGLgv/7X4vNW8 -/oF39gQBJovcOVmrea1lw7sCCXhQob7jxmq/R8eXIZgAJeVli8ur+dl2G3aE -EGBqePbRhdX8dKkt+mEETPxo/TdtNT9u0GJ7BAHBms8m/sYWYpS70qII0B+N -KkvBNtyXFK4aQ0A3ravvr9V8kz2p8rEERHydSP4TO01d+pZUHAEiC4/Tk7Af -rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS -8X7ZCUqv+v+2j8xX +1:eJwV1Hk4VGsYAPDJlmxZsnZJtqJEQ5a2781YsqYoZElj5pBEljT2upYWS0ho +kUrKOggtqOvG7Qo3UtY2GjNkz5KZou7XH+c5z+95z3m/9/229dSgA3Q+Eon0 +GT+/38Gvtmx41Plqd76vXKpeJAvtnrq7jWpehg6fv9z024P5Rlka5g0o22il +rz62I+0/ITGDf1B9RPDprdhVjLgmQfN2pOzVNU/GvvBCoTGu5DXqntf+ZIj9 +pDP45hK5Gyk5M4yMsccGWqMj6vvQUPbT76bYSmx192+U90jnA2/TLmzb6WjT +0PZPqMVWtxWwny2NiTJKhtB5Mdduc+yes/JRDwNZSMAh0t4ae0rIfGyezEY8 +ShbZAVso5aSbwSIHtWrdS3DCVpHKawmuH0Ukw0qKG7bD2m/3pigTqO5duTCB +TdxSk9MVnkKVq+5InMCO09yXeLx9GvWfv3Q2DLtP/u3WsJKvqLTXhZmATTvs +f+xyyixSoRr4pWLP3CDdfhA4h3ZUr7qUjS2spiv5lbyAFp2L1Euws2hNVpKy +31DdueCMGmzV+25xeovfkJGFccBf2Cabk6ZO1HNRzeE6vx5sP6NP7WOUJZTX +Xx6zKoqF5hmnBES0lpGFjr+TPPaZetGd2sI/UW3EhmxN7FwwKfVt/4X2lt2n +UrBphS3mISUr4Fr2a/kE7JIXlwfPruWD7K9FB69gz4x4RWek8EEtL4l0Hzta +Z6G6MpAfRCwP57VhZ1WsV58mC4LS/lNzitEsNNA58exngSCkn7p6dQu26uyj +wxKyQtCn11ZGwS4zdMjUXRSCJGN3pSDs5ieRKwLqheHqUWvpNuyFpjefRili +4FpuF54Tw0LSdmKSUc/E4G2jgVkttv5bcxA3FYfrW9zT3mD7D9fe2rpFAuIv +Bt+XimWhk3zt+rvEJOFK/9j7y9hsNebXxG9S0NVw7VBlHJ4fonVVh4E01P17 +aEMPNl8pZ71CsDRcETjJWMJWNVh3oGRcGrqNnl+3OcNChynpD14NysDmyXUj +E9gdPiGh8m2yQLcrybT+k4U+3k9L9haWA0raDv/T2BPjJQXFFnKw/ab980Js +kTDWmx2NckAsLc/xx7OQeYKzoXetPJQudHu+wK67a7RQlK8IPzaW2vskstBd +9vfw7WHKoON5qWr5PAvtPXjuY2i5MhwnzccZX8D5m2UsyznKYBda9SwY2/Du +ZllVNxVYl7AndQS7mepVLbh7HZzK4Qvqu8hCs9ODp0fjVeFNeJRVRwoLyZww +r6m2VwPN+XFvqQwW4twV8XP0V4Muj5/IDfvx+861k0lqIGT08tJtbA87z3it +RjWQSLhy1iAT17cp/MBVsjrUVRFMj8t4/LH7M7HyGvBJdVKv+QoLOfuK6toM +acIIs2B85BoLofCDZJdlTfCQrjDeeZ2FdBLzjWmKWnDH+exMOjapwMAsdr8W +nDlyoWjHDRYq/+ju8uBvLYjmppOz8/D5PFR2VunOBmB+6qs6cgvXZ27fM0bV +ht2DshHm91iowCnn3WKsNnRmp9HvYadRhwYFrmtDjrfDX8L38f4+c2pc5Y02 +EAE1da+wpRrySE4UHbi2Luv1kWK8fwymdOrVN8EX/rj47DIWWqt2KS55eDM4 +pn2UP1TNQg0X57V5fLrApnbrd2B7zLm9JdbrgkTp6ra9NSx0s1lD28xLF3LT +feN31bKQmm9dF7dXF3qmnQV0H+F+y9iaRNsWUBlqsNOoZyHltSqEqps+qJ1+ +oRnWxEKbC8PEfiAy8MUxY651sxCVFr+g60CGj9qKfdo9+LyqZ3709iCDSMWt +u0+w+e9UVL5gkEGgdl3WQC8+bzfHnDOryKBTmf7f+gF8n+Z652mrG4DiKLvi +n494fZPttrgKGYJtfrq3zygL3Q7RcKxt3wZ2iR9mF5dYqDMcGScUmkKEatq/ +r/SG0XqvbgfPgF2Q9vBHo6b/MKL/eshUjgDojV1zGhUNI/nxxyvlqWYgWHc+ +YMP8MAoz2Pk+U8cckifIpkBhI+rkUovMmAU0BpX5V+eyUblZ6Mr8Diu49WIm +Ke4nG92d9/+7LMsa7qhNmewgOIi7R+G/5jhbML9Wp8QY5KAPJP6vQ0ft4a/9 +u3YVUkdQ4B9B6WfV9wFFUnSPJ3sEMY+1NF5JdIRJm4NlKTGjKHJOcXHTsf0w +8HIh7bLsF7RgY3no3yMHQFhesY/+zxdk6p6xh73fCRyHehT8Y8ZQl2Kef7OB +M9g/6uv0NhhHSvfiG4o2HoRFqYiV8/wT6PGgjp2D+CFwMbs9YvV6Aqm8nfEN +nzwEfsUigcfuTiKDKxllBYMu8O/F8FWUrCmUJzC3JbPJFYKcnO6Ox0yjh3v0 +BhKfuMHpjSe9K81mUK7xRamlksOQfrRaoadlBnW8K0wySHGHo9+3pn20/opq +7W9onDzjAdlFlpZJ/V/R1xNOpECaJxhyY9nx1Fm0YKntN0XxAv7+guXesVlU +NNnPDTU6Apea899sPjOHXG8X+niKeYOwdHndoOg8qn5ge4T/nDdcGe3ju3hn +Hpmu7eJd4HlD81X1a+a6C0h90Hfg9bGj4GvCWDB8sICGRY/vu8E6CipvL6bG +7PqGOtMcfKwOUsG0ySPz+JNvKIuRL3qqkwqbdC4uBRovooZnv3g+1j7gfm7n +slTxIlrtAecM6nzgQNFoc44wF5l6TxUlGtLAeU5zhZEPF927OhPqYESD3G1u +ywE0LlrzZna3vAkNOMbPNxbQuWjKYvFt0Q4aFE1Iion7cfH9QlrRbkaDAWbx +Uk8AF0ksSrlJ76fBmtdplpRwLhpO3bYq/wQNPIVuJ0ed56K0+uhjj+/R4H2S +ZL97CRedIOeYMopo4FKiEupSykV2xVWrTEpokL5ns+GBMi4SyeEUPyqnASHs +rmPB5KLEEMexhzU0iHYtHFR9wEXR2hrHa5/ToKMvxKziCRf557QFPPhIA/OY +UEetFi6yluDsDBmkQdcGCQ+hl1y0MZEkTv5Mg4aOonNsbE7ItvIqNv7eW2T3 +7TYuOuqQP1k5gS3w13qJDi5yFQwNrPhOA7stGTlPu7nIKlTpZJkcHc6Zk94H +f+ai5/lJNpkKdEjSGFewZHHRzvZZDYYSHfbEvLRUHOYifc22fooKjq8OCWtg +c5FibxTlnSYdfqYsSX4b5aLx7R/kRLbRwYZ/6x9G01x0ie/WU18nOszrvZob ++Y771xPLtT9Ih6nir4NXf3BRgjsjxMCFDk+rVR7bLHERo8Zxw6/DdNib16Ze +vIzrJ1ZkZFPp4E1bGnMl8ZBBK5X2TzAdJqiSEgmCPNSboSmqnk6H9V2RR1eu +5iEmEvcbzaAD2yOpIgU7YXK+ufwyHbqM04SkJHmIbN0ca5JDhxumEh1yUjyU +RvKZtb9Jhzb5nS/kZHjIMuhWP6OMDg9YkVtH5XhIWfm80W4mHZw37CJ5yfPQ +fGvQZf5KOmikC/R0Yd/RQvZp1XQIdtXNfqLAQ8sfPjQW1NGB8+kpPUqJh2rs +1ha9aqGDRKqndqcyDyV/5xPMaqXDOOi6G6nwELVo7KhbOx1k/tibeR1bUqBu +7XAHHdQRb7XPOh4KqHe9xOuhw8WrKZYcVR5S18kO12DjfplHkp+q89D33pg3 +Xzi431WBQms0eKgzka5fMUoHkwbbxGPYsUOGY6YTdGC8UEmT0uShgdw3nvvm +6HCB+fblQS0eylwpZRG5goDg4/29zI081DD7wT2Mn4A/mHrMZeyRDyUhgYIE +CH2p3WurzUM7a8xvUVcRQIqZefkZm+PN+GEjRYCRxbnvfJtw/XYW0hYyBDAb +mqatsHcYS2sjWQKelYYXJWOni5cdMlAkgJEx5rN6M47Xfapau54AtYpWkrAu +DxGFZS2y6gTUeDFWU7DT0yM+rdYkQODLj8FobA4hIy6gTUBS8Y72id9xGSu/ +CX0CAuJr/366hYfqfsrEccgEaH/TYk9hs78MXhk0JKDvPqdVRY+HtjdGNr01 +wfkC1nyIxB4OYKo8BQJo07lKGvo8JOEate2RGQF/S39xsMU2pey1qzInQGtO +wSIYO03xc0ThXgJs1UbDn2A/FqhIz7chIP/8yQfvsFnTUfev2hFAfldSsYRt +8kK2O9WRgOiXotPbt+L1rvo8fu4AAXkFKltdsVNvVPD96UzAGKfeMAz7c4i1 +frgrAdTokDNF2OJeclYnD+P5MIxqacQ2sWZ5+nvg8dQmX/f+/n9dTLKXNwEa +TdMb+ci4HhGbO65UAo4LhIbLYn9ekHtygEbAw1zzxA3Y4kOsDjuCAL1mr4Mm +2CbtlRxLP9yffgPHCpv6KGYZ/AlQH3cxPYSdesdmzY4AAtr8dO19fudPld+0 +LZCAlX+aqAX9zs8Y3qN3EtcfdupxBLYYrcpVO4SAjuHB1fHYxvtig9TDCNg1 +cHpj8u/8222TlMMJEGky5svETtFUyJNn4PkKUcnLwX4oya6WiiRATFWHdx17 +6EdVq2g0AZr+bnL5v/OPxA4JxhLg4lQ6fwvbqMuW+yuOgFLKuqzb2P8D71Gz +tA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.7504249066936051, 1.313047485013753}}, + "PlotRange" -> {{0, 180}, {0.6086652522674177, 1.5748611246128614`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.7504249066936067}, + "AxesOrigin" -> {0, 0.6086652522674191}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -6546,7 +6395,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.7504249066936067}, + AxesOrigin->{0, 0.6086652522674191}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -6574,7 +6424,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.7504249066936051, 1.313047485013753}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6086652522674177, 1.5748611246128614`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -6582,9 +6433,8 @@ rh+qFD1GgNZxEDiO3f+r/JVgIgGO/vGzCav5P5L6eZMISCsI2Ldqgw975leS Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913440619685707`*^9}, - CellLabel-> - "Out[417]=",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] + CellChangeTimes->{3.9913440619685707`*^9, 3.9943866403040857`*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"200516df-439f-4c2b-9028-3b66ae51b78c"] }, Open ]], Cell[CellGroupData[{ @@ -6647,340 +6497,164 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918501659425144`*^9},ExpressionUUID->"06bd0169-a5a6-404c-935d-\ -e1a61565f71e"], + CellChangeTimes->{3.9918501659425144`*^9}, + CellLabel->"In[95]:=",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.7414575136308495`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.613407687568253`*^-265\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 418, - 441, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621885586`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 95, 9, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994386640817514*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], +In[95]:=",ExpressionUUID->"858fd648-a1f5-4041-954a-fc96693c211a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.133412609607657`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.479963840230271`*^-276\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 418, 442, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913440621975574`*^9}, +to represent as a normalized machine number; precision may be lost.\"", 2, 95, + 10, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.9943866408244333`*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], +In[95]:=",ExpressionUUID->"e4794fb5-5046-4858-93fc-b5057b211937"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.599262146182568`*^-296\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.349692265669091`*^-287\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 418, 443, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991344062205559*^9}, + 2, 95, 11, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.9943866408311787`*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], +In[95]:=",ExpressionUUID->"6f0a7ae3-d47e-40e0-b065-a06fe5017435"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 418, 444, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134406221356*^9}, +during this calculation.\"", 2, 95, 12, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913440621885586`*^9, 3.994386640839478*^9}, CellLabel-> "During evaluation of \ -In[418]:=",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], +In[95]:=",ExpressionUUID->"bcd0436a-4d2d-4268-b861-c7c91b368dcd"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vl8YAHBFRBmZr/kOq6yM7Pf1PNJPUWZWyMhoEAopkhGiIjMjSYVS +4b0vkVGEhoZ2lGgvmSGj5Hf7636+n3Pvufec8zzPOZe+LdQxYDEXF5fIIi6u +f9dfA12dSsfKzAwvuPVZDJqbPS+hHDDvTYRALwF1nlAaoMSjbZTebKg4En5g +IEQb9tlf6uHuPQdZaUtkb4UgrBiRyp7t4cCkT6xzSYg9vG2xDZ3saYfW7cQp +RogPWCoN9o/3PAXt0vuHLYLDYLbHMG+s5wP4UCQpT/zjocPiQtmTcxOQkVTU +9v1nJsi9bfyyTWMeeNrz7ecHCkA82PsSnwU3+pSfmSpSLoVsHctmW+elWMO9 +IjRq6Dy8KtBuGxcRxM1v6qK61S7AsbK4R4ulV2D07V2VcU6XQCr3Y1rOaTHc +sCfUrVygCijqV5NmKsTQQ1nH/Y9YFci0p8RtZYuhAl9cso18FSiMrYpU7RDD +4ZV8TgOrq0B5U5hP8zcxZCVqsBudqkCPZ97go544royyCnQ5XQV2EZKfdO+J +4wzfqClNrRqOOFmZPf0lgVmdwkmtOjUgU9cts3iRJIa6Jq1Ya1ID1WJO0zrL +JPHZ6a7o62tr4OVTL3YWVRKF66G/ZHMNKDlEMBw2SKL2fHvXssgaaLc5w/u4 +UBI5f8zT0utrYN5yqvshUwpNU5ddk5BhQ2ZF9OV5Sylcc7F07qM8G5R4uVI1 +HaQwPC3nTDWdDZtuCZinB0jhl8loYeNVbCiyoNVuypDC3N6pOIYRG4xwY/79 +t1JoIae8e70zG8KNz3p3JVKw+reHQO9xNliXCk1uPE5B/7eBa2dPsIHBdzC1 +O4+CMXJOtlI5bHj83IV4dpGCgv4x760K2aAVtpx7oJuCafLXf6aWs+FbRVTF +TxlpVNCx5YRcZ4OnuO2wbK00/o1K8+sdZINeTHNCSYs0Tsf3/c0ZZoPAh5WS +9NvSuHuKunvTGBsaa7hB5ZU0anWdb6+dYoPkxsZM7QVp3Clwx9GTi4DHCUpr +/tsog5JzquISEgSsG52LDvkog4Sabq0yk4ADG3LVbg7JoIT1hFiYGQHVZzVf +i/2SwWzRlbsakACKk49x41JZVI1MmGb+R8DQtVvT3FqyGDmrX6RoS0BOYmZE +4X5ZzPHIVPL2JuCDhEpIp6AchulEns2MI0AqtFVeSkoOz70R4I9OIGDTXbeH +O2lyyC/nFexzmID66GMawnpy6LUTVJWOEHD07djgFjc53J2oFnkkgwDdyubt +o+fkUC9hffX1YgISmA6+MkbyuKlDuGKwnoANXiU/DdfKY3igqU/eNQKE4n8c +dt4kjzNpFQXMJgKKO5IrMn3kcafXspT46wRcs276wZsmj4yoee+BDgLG3BT3 +TbySx4zUzJifjwhoiA7jW/FJHscmPR0DnhBwqPh6gdaIPNaHrqx5/pSA5e9c +m3cuVsDnyU//XHxBgOr241zv1BTQXtxqWrWPAK/IqaMPYhQwqG/0Q9xnApTz +18oNJivg+7v73Ju//Ju/E1V8mQp41fWxz8RXAqL/rHq8tkwBNfWc5bYMEpB3 +2Eui8YECDms6e/8eIeBB1p0z5fJUHFcSKjk1Tc53rbhOhyoVrdWCN5bOEOD+ +wrf9nQ4V25QOZp2dJeAb5c8nWUsqHsq3GSz8TQB3qbZadggVTxlrv/ddIMCk +urDuUCsV71oui7Hj5cC6nu75kbtUhKyGTSJ8HLDl4lnv/ZSKQ2+MdbpJ+zmG +vILPVNwvKapvzs8Byxh6XPwSGjZyIo14lnPgvnDLeSMBGjpH6hBVpO3LXO6O +CdGwLO+AuZMgBzweHlvhS6HhxCLK5QIhDoRRf503V6fhgeK82r8iHJiqzbw7 +u5qGP9c1zGau4ED0BvVhYg0Ntxlbe9JEOZC8x8eAYUZDJmPdAQMxDhR13Lu7 +2IGGy9O1lVCCA1S3gOEmZ7J/tXjvZtJlQwsrwt1pGHhjc4ueJAdqJPQ9PvrR +0CxOvl9WigOd288Md+yjofyJhIddFA5Y/TEWPRhDQylxXVUtaQ50Zz43WBNP +w5PSFRdOkH7VyB9flkbD+xnJVGsZDnjZlpV5ZtBw9yorynnSnz6YdYnn0LCk +MN5klvTIsgjR5GIaMp4s/lssy4HwUiFD1lkaLuhfLh0kPbOm0mOqnIZ5lxJD +9eU4wO01UBZQQ0PjoITcdtKpP/d3ydfR0LFx2RCPPAeEjoiNvLhGQ3uZY3vX +kaawNxhattPwzV4D4WbSp9d99Ph7m4Z32u+p/CTNeBUbX3+fhnteKIWpKHDg +4m5KechjGkYcmvvhSlpzcW2XygsazhovPpVCmnPSZmTgFQ2tNSZiOaSN1L+J +5g/Q0I2enNdHeq2TvCffNxpSj4QEKFM5cOdbQ3zrEA15nhpRLUlvinUsjxon +25+lifiTfrpiuGv1LxpO5smZxJF2rTgy8nWOHP+9K8X5pN+YMMRKF8j1uPPL +qIr0tkcthm48dGw93CDcRvqrn6unCD8d6aev0B+TDp4Zj78rSEftzbmh/aRN +9gRKfhGlo3x6Ycs30ksHX1/mptBR7kH8/THSL7fZmdPl6djyyez0FOnyvo6X +Zgw66hzt0p0mHeFkFOypSsdMG6n0f+1rH15ZFK1BR43T1Kp/z4tY0vPzdejY +3/E651//AzfyNK4a0NHjm/naf++/YijQ/tSUjonL7Rq7SUezD7mOIR3PLJ+f +bSG9YdXEkKAlHR+XrF9ykbTkue2J6hvpyHRUf3OC9CeZN1JW9nSMyCiPiyDN +ybGvCnSmY1N23Zgz6fjlt9YmudPRMtJVew1pu2Tj3rPedDzPyABh0gp/q3a3 ++tNxynML9Su5PkP7GNz9O+mIzU2Pm0k3jZ4smAuh482LdU7ppFN3LNOiRJDj +97e+4kHa5X1ch/4BOootxPX+iw8l90m3zYfoyLvV/fUIGT9tG/sPZ6SS388r +4RdJOqPTQfpKOh0XaXEP6ZH2ZN2u7sqmY9ZDwnaUjNdZrZpXPKfJ8a+ILPck +rSuasDqGoKPKk7arK8h45zo21VlQT/an93pVA5kf3dy73Oub6ajJJxq/hXTQ +lGPy+C1yPRfL9uSS+VbWq9S3/TUd+2ZCbb6Q+brXoTAs+S0dfwo6j+0ljfcE +ec9/IuOh81vsHzK/+5t/aQ+M0DHt1t6tvKQlz9xNceJmoJFz0aYpsl58kmLJ +7V3KwAGH/X47SXMyCeKEIANXfr+1+zVZX+wSi97ck2KgYKaCby1Zf1IDgnXN +NRiYEjH1HoXJ8amLDGg6M1BGn7LhPln/fp2WSdBzZ6DfO4VcUdKTwspKxt4M +9JbERa5LyfyfMN61bicDz7/Tsugh6+uHZr9f7rEMvDi+K+kqNwfubWwQSi1n +YJpJz8T3PwTcuX6TSL/EQPuAuhfcpDtXP3DKqWGguNSOQRmyft8Qe19U0shA +KOhhI1nfOX0CqlcfMnAGC57smiKgKMgLPkwxcGFTwTaTYQLy+3d8+DrHwHCJ +M3OqQwTk2oUnDy8wMLDsaY/oDwIy9FLvz/Ar4pnanYHvvhGQ+JtwFVZQxI1z +0lPunwgIOrYkjGmpiEE033fdrwlgXr5SevKkIsqOb7BqukVAH+3ymf9OKaLN +aAw9qJPcv05WlkyeUcSKSmqzNLmfNiRUFDtWKqLdq3qDsDZy/3YrLRBqUUTW +NZWgxc0ErFqSm5nyXhGlwy0vtdQQIOkdE79PQwm7RIROn8gn4OrzA3HKOkpY +xDhbMJdHgJP1/kPP9ZUwXNRgn18uAdn6kQd1QQlb5o73aWURILg8dP+IgxKO +RYgFXzlKAE/jtrDAKHJr6C7MsIglYFzU2selXQk/0x8affchoDeY8XjXHdJ/ +NbMHvQhouz0HcQ+U8JXmg7zvngRkRl+mXnyphOOyxmffuRGg/WH529lB8v5c +vVGOPQEhxKOtp8WUMSm44tR3IGDQztnjk78yMvYufL4oR8Cn4z4ue/lUMPl3 +aOH1R2wIGdRgaC9XwQ/Nlzq9H7Jhev3s8LCIChY4Kelz3SfPc9zZyTtlVFCg +YP+g6W02aB/oqPPRVMHpfep3SlrYEBugIma3WQUt2tbZiFWS5zuzoUfqZ1SQ +dyj3ams8G6xGo6w+G6hi69yV2O3qbBjyWxpeF7cSnW5V8n28UU3+X0gtPtK+ +CtUfr/mmtaQKRB+qZLBH1bB8R54cn+1lkEutsTcw0MCkv7MjQV6VUKBuLCK2 +XRMHu1vFBVMuwD0Zc/2JLC3EmtAh66vlYCLXnrn65Woc7nYrzmg/D0Lc5yJ8 +E7Vx/sf3VsM/Z0EhgcrcoqKDM6Y9RQn0UuBX9qx3vKODrQSje/R+MWixpGui +turiu74fkcKthbB3QLTDmksPdUJ9PQYvnITRiePOVgV6qM19LqjwTw6sX327 +yEpzDXbdZra/z8mCGxOmv6e71+DG4mVxb/wzIERD9/WTAH0UPjnrILvtKLBG +/J9v4TfA2GQHsbrYFPhPiWIjeM4AW3gPHu63OAwr44/ubzc0xMPqfnK5++JB +LcC4Vfm1IeZTrH9mFMZAwI0dSXV7jNBRvW+/1fooaC197j8uYYwWL4JZxqxw +mLy4ML26wRgltKWffmwIBT/ly/xFNiaYwG9VrOa2C8bVcgw4Yya4VV7C3XhX +AFwr+/1+KtUUIVFA3DvdFwwsIqatj5nizbHa4KQ4X7j6fmh5abopuj9rtqrd +4wschQFD62xTrPz6NUbTxReuFLSll5wyxaQLslo5VF8oPZ5svL7aFBcJ0Eyp +dT6QFiGcVfDMFFk50TfU73qD+zpFNFVgYjSf1ExniyfMP18q1EFjokhKnHXq +eU8oDRjps1Zkok4Yj5D3UU/4ktIY5b6SidrdOxos3Txhb5ddzQFdJrZVD7Dm +Jz3gqO1BhWuWTKw03nrwj44HNLm9+LMmlIkflm75ONq4BWR3H2nUamOicucb +K7kFF8hYCNQ/1s5EF8Zmk5s/XGBxtiXxtZOJtqolWRG9LjBYv6SytIuJ/UFC +DrwcF2jiSioQfcbE+q/1Mi8CXMA9Nz7q12cm3tR/SaM8doaC5gP6N5ax8JDr +M67paieQEAgmbFxZaN8tMMPMdYQyi9josS0svKPl2eCR6Ai6sRkWOZ4sPJVX +fzstzBFsx9gven1ZeO2ETaWYjSOkvJya9QtmoWPoDat+XkeYORe3NjqBhe9N +aneYxTrAa9OcZxWXWRhjqPFqKMIedkSWFVtVk44NKH7nbw+/qq8GDLFZyLdr +3u2Dkz2IMnqndepZyBs2nSusbw8bl8rLXW9joaG4zhh1yA5anlf4P3vBwkj+ +97/NpmzBWuia5r5eFoavq5R889IWetd3/aL0sVB6zcOBnGu2MNn0I9XrHemT +W1U3H7QFzbPaVd8HWfi3KmO30BJbaHltvu/4MAvN0p/dPvTVBqzFN8PqMRb2 +/Mezmv+eDQQeiXwSMcXC06vu9AedsIHJtpQiqRkWKjuum7fYawOJc/l+TXMs +lLA63K/vbAMiayo1ts6zMP2oRJC5kQ2U7G6aWlhgYUlrfnagrA38D9BrjhY= + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -6994,299 +6668,120 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13c8Vl8YAHBFRBmZr/kOq6yM7Pf1PNJPUWZWyMhoEAopkhGiIjMjSYVS +4b0vkVGEhoZ2lGgvmSGj5Hf7636+n3Pvufec8zzPOZe+LdQxYDEXF5fIIi6u +f9dfA12dSsfKzAwvuPVZDJqbPS+hHDDvTYRALwF1nlAaoMSjbZTebKg4En5g +IEQb9tlf6uHuPQdZaUtkb4UgrBiRyp7t4cCkT6xzSYg9vG2xDZ3saYfW7cQp +RogPWCoN9o/3PAXt0vuHLYLDYLbHMG+s5wP4UCQpT/zjocPiQtmTcxOQkVTU +9v1nJsi9bfyyTWMeeNrz7ecHCkA82PsSnwU3+pSfmSpSLoVsHctmW+elWMO9 +IjRq6Dy8KtBuGxcRxM1v6qK61S7AsbK4R4ulV2D07V2VcU6XQCr3Y1rOaTHc +sCfUrVygCijqV5NmKsTQQ1nH/Y9YFci0p8RtZYuhAl9cso18FSiMrYpU7RDD +4ZV8TgOrq0B5U5hP8zcxZCVqsBudqkCPZ97go544royyCnQ5XQV2EZKfdO+J +4wzfqClNrRqOOFmZPf0lgVmdwkmtOjUgU9cts3iRJIa6Jq1Ya1ID1WJO0zrL +JPHZ6a7o62tr4OVTL3YWVRKF66G/ZHMNKDlEMBw2SKL2fHvXssgaaLc5w/u4 +UBI5f8zT0utrYN5yqvshUwpNU5ddk5BhQ2ZF9OV5Sylcc7F07qM8G5R4uVI1 +HaQwPC3nTDWdDZtuCZinB0jhl8loYeNVbCiyoNVuypDC3N6pOIYRG4xwY/79 +t1JoIae8e70zG8KNz3p3JVKw+reHQO9xNliXCk1uPE5B/7eBa2dPsIHBdzC1 +O4+CMXJOtlI5bHj83IV4dpGCgv4x760K2aAVtpx7oJuCafLXf6aWs+FbRVTF +TxlpVNCx5YRcZ4OnuO2wbK00/o1K8+sdZINeTHNCSYs0Tsf3/c0ZZoPAh5WS +9NvSuHuKunvTGBsaa7hB5ZU0anWdb6+dYoPkxsZM7QVp3Clwx9GTi4DHCUpr +/tsog5JzquISEgSsG52LDvkog4Sabq0yk4ADG3LVbg7JoIT1hFiYGQHVZzVf +i/2SwWzRlbsakACKk49x41JZVI1MmGb+R8DQtVvT3FqyGDmrX6RoS0BOYmZE +4X5ZzPHIVPL2JuCDhEpIp6AchulEns2MI0AqtFVeSkoOz70R4I9OIGDTXbeH +O2lyyC/nFexzmID66GMawnpy6LUTVJWOEHD07djgFjc53J2oFnkkgwDdyubt +o+fkUC9hffX1YgISmA6+MkbyuKlDuGKwnoANXiU/DdfKY3igqU/eNQKE4n8c +dt4kjzNpFQXMJgKKO5IrMn3kcafXspT46wRcs276wZsmj4yoee+BDgLG3BT3 +TbySx4zUzJifjwhoiA7jW/FJHscmPR0DnhBwqPh6gdaIPNaHrqx5/pSA5e9c +m3cuVsDnyU//XHxBgOr241zv1BTQXtxqWrWPAK/IqaMPYhQwqG/0Q9xnApTz +18oNJivg+7v73Ju//Ju/E1V8mQp41fWxz8RXAqL/rHq8tkwBNfWc5bYMEpB3 +2Eui8YECDms6e/8eIeBB1p0z5fJUHFcSKjk1Tc53rbhOhyoVrdWCN5bOEOD+ +wrf9nQ4V25QOZp2dJeAb5c8nWUsqHsq3GSz8TQB3qbZadggVTxlrv/ddIMCk +urDuUCsV71oui7Hj5cC6nu75kbtUhKyGTSJ8HLDl4lnv/ZSKQ2+MdbpJ+zmG +vILPVNwvKapvzs8Byxh6XPwSGjZyIo14lnPgvnDLeSMBGjpH6hBVpO3LXO6O +CdGwLO+AuZMgBzweHlvhS6HhxCLK5QIhDoRRf503V6fhgeK82r8iHJiqzbw7 +u5qGP9c1zGau4ED0BvVhYg0Ntxlbe9JEOZC8x8eAYUZDJmPdAQMxDhR13Lu7 +2IGGy9O1lVCCA1S3gOEmZ7J/tXjvZtJlQwsrwt1pGHhjc4ueJAdqJPQ9PvrR +0CxOvl9WigOd288Md+yjofyJhIddFA5Y/TEWPRhDQylxXVUtaQ50Zz43WBNP +w5PSFRdOkH7VyB9flkbD+xnJVGsZDnjZlpV5ZtBw9yorynnSnz6YdYnn0LCk +MN5klvTIsgjR5GIaMp4s/lssy4HwUiFD1lkaLuhfLh0kPbOm0mOqnIZ5lxJD +9eU4wO01UBZQQ0PjoITcdtKpP/d3ydfR0LFx2RCPPAeEjoiNvLhGQ3uZY3vX +kaawNxhattPwzV4D4WbSp9d99Ph7m4Z32u+p/CTNeBUbX3+fhnteKIWpKHDg +4m5KechjGkYcmvvhSlpzcW2XygsazhovPpVCmnPSZmTgFQ2tNSZiOaSN1L+J +5g/Q0I2enNdHeq2TvCffNxpSj4QEKFM5cOdbQ3zrEA15nhpRLUlvinUsjxon +25+lifiTfrpiuGv1LxpO5smZxJF2rTgy8nWOHP+9K8X5pN+YMMRKF8j1uPPL +qIr0tkcthm48dGw93CDcRvqrn6unCD8d6aev0B+TDp4Zj78rSEftzbmh/aRN +9gRKfhGlo3x6Ycs30ksHX1/mptBR7kH8/THSL7fZmdPl6djyyez0FOnyvo6X +Zgw66hzt0p0mHeFkFOypSsdMG6n0f+1rH15ZFK1BR43T1Kp/z4tY0vPzdejY +3/E651//AzfyNK4a0NHjm/naf++/YijQ/tSUjonL7Rq7SUezD7mOIR3PLJ+f +bSG9YdXEkKAlHR+XrF9ykbTkue2J6hvpyHRUf3OC9CeZN1JW9nSMyCiPiyDN +ybGvCnSmY1N23Zgz6fjlt9YmudPRMtJVew1pu2Tj3rPedDzPyABh0gp/q3a3 ++tNxynML9Su5PkP7GNz9O+mIzU2Pm0k3jZ4smAuh482LdU7ppFN3LNOiRJDj +97e+4kHa5X1ch/4BOootxPX+iw8l90m3zYfoyLvV/fUIGT9tG/sPZ6SS388r +4RdJOqPTQfpKOh0XaXEP6ZH2ZN2u7sqmY9ZDwnaUjNdZrZpXPKfJ8a+ILPck +rSuasDqGoKPKk7arK8h45zo21VlQT/an93pVA5kf3dy73Oub6ajJJxq/hXTQ +lGPy+C1yPRfL9uSS+VbWq9S3/TUd+2ZCbb6Q+brXoTAs+S0dfwo6j+0ljfcE +ec9/IuOh81vsHzK/+5t/aQ+M0DHt1t6tvKQlz9xNceJmoJFz0aYpsl58kmLJ +7V3KwAGH/X47SXMyCeKEIANXfr+1+zVZX+wSi97ck2KgYKaCby1Zf1IDgnXN +NRiYEjH1HoXJ8amLDGg6M1BGn7LhPln/fp2WSdBzZ6DfO4VcUdKTwspKxt4M +9JbERa5LyfyfMN61bicDz7/Tsugh6+uHZr9f7rEMvDi+K+kqNwfubWwQSi1n +YJpJz8T3PwTcuX6TSL/EQPuAuhfcpDtXP3DKqWGguNSOQRmyft8Qe19U0shA +KOhhI1nfOX0CqlcfMnAGC57smiKgKMgLPkwxcGFTwTaTYQLy+3d8+DrHwHCJ +M3OqQwTk2oUnDy8wMLDsaY/oDwIy9FLvz/Ar4pnanYHvvhGQ+JtwFVZQxI1z +0lPunwgIOrYkjGmpiEE033fdrwlgXr5SevKkIsqOb7BqukVAH+3ymf9OKaLN +aAw9qJPcv05WlkyeUcSKSmqzNLmfNiRUFDtWKqLdq3qDsDZy/3YrLRBqUUTW +NZWgxc0ErFqSm5nyXhGlwy0vtdQQIOkdE79PQwm7RIROn8gn4OrzA3HKOkpY +xDhbMJdHgJP1/kPP9ZUwXNRgn18uAdn6kQd1QQlb5o73aWURILg8dP+IgxKO +RYgFXzlKAE/jtrDAKHJr6C7MsIglYFzU2selXQk/0x8affchoDeY8XjXHdJ/ +NbMHvQhouz0HcQ+U8JXmg7zvngRkRl+mXnyphOOyxmffuRGg/WH529lB8v5c +vVGOPQEhxKOtp8WUMSm44tR3IGDQztnjk78yMvYufL4oR8Cn4z4ue/lUMPl3 +aOH1R2wIGdRgaC9XwQ/Nlzq9H7Jhev3s8LCIChY4Kelz3SfPc9zZyTtlVFCg +YP+g6W02aB/oqPPRVMHpfep3SlrYEBugIma3WQUt2tbZiFWS5zuzoUfqZ1SQ +dyj3ams8G6xGo6w+G6hi69yV2O3qbBjyWxpeF7cSnW5V8n28UU3+X0gtPtK+ +CtUfr/mmtaQKRB+qZLBH1bB8R54cn+1lkEutsTcw0MCkv7MjQV6VUKBuLCK2 +XRMHu1vFBVMuwD0Zc/2JLC3EmtAh66vlYCLXnrn65Woc7nYrzmg/D0Lc5yJ8 +E7Vx/sf3VsM/Z0EhgcrcoqKDM6Y9RQn0UuBX9qx3vKODrQSje/R+MWixpGui +turiu74fkcKthbB3QLTDmksPdUJ9PQYvnITRiePOVgV6qM19LqjwTw6sX327 +yEpzDXbdZra/z8mCGxOmv6e71+DG4mVxb/wzIERD9/WTAH0UPjnrILvtKLBG +/J9v4TfA2GQHsbrYFPhPiWIjeM4AW3gPHu63OAwr44/ubzc0xMPqfnK5++JB +LcC4Vfm1IeZTrH9mFMZAwI0dSXV7jNBRvW+/1fooaC197j8uYYwWL4JZxqxw +mLy4ML26wRgltKWffmwIBT/ly/xFNiaYwG9VrOa2C8bVcgw4Yya4VV7C3XhX +AFwr+/1+KtUUIVFA3DvdFwwsIqatj5nizbHa4KQ4X7j6fmh5abopuj9rtqrd +4wschQFD62xTrPz6NUbTxReuFLSll5wyxaQLslo5VF8oPZ5svL7aFBcJ0Eyp +dT6QFiGcVfDMFFk50TfU73qD+zpFNFVgYjSf1ExniyfMP18q1EFjokhKnHXq +eU8oDRjps1Zkok4Yj5D3UU/4ktIY5b6SidrdOxos3Txhb5ddzQFdJrZVD7Dm +Jz3gqO1BhWuWTKw03nrwj44HNLm9+LMmlIkflm75ONq4BWR3H2nUamOicucb +K7kFF8hYCNQ/1s5EF8Zmk5s/XGBxtiXxtZOJtqolWRG9LjBYv6SytIuJ/UFC +DrwcF2jiSioQfcbE+q/1Mi8CXMA9Nz7q12cm3tR/SaM8doaC5gP6N5ax8JDr +M67paieQEAgmbFxZaN8tMMPMdYQyi9josS0svKPl2eCR6Ai6sRkWOZ4sPJVX +fzstzBFsx9gven1ZeO2ETaWYjSOkvJya9QtmoWPoDat+XkeYORe3NjqBhe9N +aneYxTrAa9OcZxWXWRhjqPFqKMIedkSWFVtVk44NKH7nbw+/qq8GDLFZyLdr +3u2Dkz2IMnqndepZyBs2nSusbw8bl8rLXW9joaG4zhh1yA5anlf4P3vBwkj+ +97/NpmzBWuia5r5eFoavq5R889IWetd3/aL0sVB6zcOBnGu2MNn0I9XrHemT +W1U3H7QFzbPaVd8HWfi3KmO30BJbaHltvu/4MAvN0p/dPvTVBqzFN8PqMRb2 +/Mezmv+eDQQeiXwSMcXC06vu9AedsIHJtpQiqRkWKjuum7fYawOJc/l+TXMs +lLA63K/vbAMiayo1ts6zMP2oRJC5kQ2U7G6aWlhgYUlrfnagrA38D9BrjhY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.0708002566330286}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -7298,19 +6793,19 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.0708002566330286}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7324,298 +6819,119 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwVl3c81d8fx2Ure2eVvfe89/qc8+ZbKoQGWS1ZqYiMhgpJSKJkJwmRkijZ -494ioyKFrOwks2Qlfvf31+fxfJz3Oe/xep/zOUfaxWe/GyMDA4MwEwPD/7+L -A01v5G5mI20e4a2+wa7oc4boBZPuMPxAja2xvtkUg9BHF9HuO9izfJL7dvN+ -HGjzpIupOwsHqIomHmh2wXwzIndWuopxYJqa17MmP/ytyspnoYuK3wnJvDNq -DMNmcpP9812fsNIn90OXqu/glS7De3Ndw/jW9MvBusQsTPvvcXZ71m8cKHBQ -bLqwGGvFPv+x9O43LlviSm38WIwzul9rSM3+xg+XHatj54rx+TPvyrwoCzhn -5q3vsHYJ1kj60cr0eQGv+/RrpJeU4NRJ1T/6LIv4xFGl/ajkJT4bX7Qz1WMZ -Nx41pfhkleKB3rLoulvLGPw9iey6UmyhUP9xvGQZu45sxtSBUqxQ2e6gy7CC -H2X9+VIm9hr3jv4605q8ghk0THxuxb/GZkb6ietNq/hEqGZZ9cUyLPGtfNxF -7R9uGu9ViyVXYIbfvslN+/7hDnLhbhXbCjzKqmKuFfQPbyTlH37mU4GfaaQ+ -+1f/Dz+er5X2zK7A6MpF/+RD6zhZKX3oGWclPipJYfwQtoEHV2aNT3ZX4nb1 -gdj0KQbI71xK3uZcjd8YVny33mCAGYVbXoHnqnGpSSIw8W+CiOgHSy+iq3Gq -rdWvk4abQC5rP1tXWTV2uVxjaxi2CVoCaU5dAjX4V2uGxCcRRnjqkuWQ/aYG -C54++oTtPyZgTTunFc1eh1XYHjXYHGKCd5Gz8eYCdRiyxodTTjHBftPa5RXJ -Ony6+4y4WgITnDASr5bXrcNvdgTH2Iwxwct70YFFznXYXzLFO+UGM0zGtVXe -elqHo8v6oofTmGETe0oFpbQOZx7Y/li1iBk6/VU9umvrcGvU42/V3cwQFfT1 -df+nOiy3+MpmWJkFXgkz1oss1+GOD590VFtZoDrgxXYzXI8nTgpb+w+ygEmJ -vUz/rnq8zux4qnqBBbKedSW52NRjFcrQI2tJVrj8aqzD6Hg9Dns8K+jvzQqB -B9z28ofVY50QzqUqXjY4V/coNqiuHt/RNqu0smWHlpnqYCYtKtbsddhFeLLD -TJ7OtRV9Km4NP9Oheokdkp25lAYpVMzanfCT/SE77N7CaXN1FxVfujIiTpti -B+/+M7osR6jYtSUk2DCcA6p2eh7RiqTiTQEJ7ApJHPBj9nCH1i0qzpDKSxB8 -wgHxw7Fr0neouNv349P5jxxQd3HyXGcaFe8VleovEN8M6s5zepGFVGzgVkls -L9kMt03D9fnaqbiD+2MTd8NmeNTvzCv1hYrPlg3b/uveDA2KBU3iX6n4yZbN -3j3rm6HIaGr0xyAVbyu2z0gw3wJNV4S3tc9ScZXTaZVrh7eA3ytlK7ffVOzI -ElLqe3YL3PqheX5ykYoT7B9/sErcAtXTta2N/6iYfePPOvvwFkj8VvHjw2Ya -zsnjuLm0sAVu9j09/pOLhk33S4qMs3HCzSNtf5Z5aTg4Z4cmTZ0TPA8/C/8u -TMNzFnePXr7ACcePvK/hl6HhW39yf56K4QT/7K6UMjkaVnlQEeT4gBOMb8+X -WivSsOuvoduGbzlBRiGtZZ8aDX9N1qqb5+WCmbaUuRx9Gk7tKOAJlOeC5dLF -ImYjGnbkVjy6SuKCzE7LA/vJNNx3TXKd8QQX9KvdcqxANHy/JnnvjSAugC1s -Hz4DDR9ZEbi/JYYLECkFBkxpeNB7s7HgKy4QX1QyqTGj4Yf5128mN3GBP7ff -QMJuGnYZZeiVGOCC81ZeKY7mNDzqsHRBno0bZnz+3SjZS69Hgl9Tvjg3BHKn -t5hZ07D7x2lRDS1uqOGft2yyoeGJHaOvDRy4wbSsRjn9AA3nXz3KVnmGG4oi -Z+9NHaRhr4oeOxzGDcvfzI6r2dGw6h/bXFoiN8ztsE9wOkTDU5rtf3YVcIOV -7nvDi/Y0/MzLcmdrLTeErbkejHSgYe+cxgSbz9wQnrfw67ojvd5iNboO/7ih -Kr3yq7UzDb+wJV3r5+MBHS92PYnDNOwX9/LTcQUeCB8L0uums26Lpsw4mQde -vt8zeu0IDS+wFPh6WfPAxtdPltuO0vArUKifOcEDFSnBQU/oHHjpIe+58zzA -dPDtGfljNGxYKnFsKYYHDn/HpDg6L88lPb/0kAcM8u+OTNK5XFVgY+MVD5B2 -BgfqH6fhi+6xVuHNPJCc3vTXh86UhxwZ7N94QC3n6OVUOq/1hk/H/OaBsN0G -LK/ofGRLSAY7My/Umjrcr6VzbR7RYM7NC+c2TVhX0Hm72d/pGFFeOBgmpJhD -55CRMqGPMrzQoq2kHkLnwZBAgk+dF643XThtQWcTKT23A4a80KQRNMtK56zK -+Zh7JnR7m8y6Ynq8jA7PX3ZZ8MIwa+SkFZ1dFk/3bbXjheSZjqBeev60uyrM -zsd4gbrH+Jw9neW0J1QzvHhhX9/N72/p9Qv/kHNg0J8X9JoffJOl8+ipE5dk -rvKCWICHux+93js5pB+5RvECu+NoxAu6Prm5A825d3lhbUbZcsiJhll3pP+a -uM8LDiGH6zfR2X3IQUw1jxdsuUvn+en6Nl4RMT1TzAsWKsETgnT9I8vvxM83 -8EKMXbPdT3r/TNjZlOu28wKjAnms1paG9yxwDQX08sLXynGP6/R+26wZpbU6 -ywu3vULOj+yj4ZvZVz8ybuWDLTbbeKctaNhc7yS/kCwfaEXy7t1P73f2N/tt -FdX5gGtHvGs+fT+Ej8j3WpjwwQkm/X3qO+n7XaZ1POEkH8zkdrrdImiYXPxK -+fE5Pjhz8VllGIXeDyYPTpdf5oOtwt57vEg0HHDc71d/PB+8ILkY89L3s3em -6LpCBR/UfFxtK1OlYTUtRhPSGz7wlMg2MFGm4cnan9csPvDBWMiqXpUCDXt8 -q+E4O8wHgnIs6tHSNHxMyk2ofDM/fM545H6Dft7sS3+hZuHED4+l6tj416mY -Vy3N57AbP3SKWH5tWqXiD5XhxT4+/GDXjbgDlqjYvPeQUcI1fmhqvdWZM0fF -pmLr//UX8MPrwnAbv2Eq1ks2d/JZ44dBzXc3qDQq/qWolxHKKgCPopOopbVU -XPRacugurwB8V+E1eFBJxepdc+5lcgJgUXzzn2UJFSsIJ/lt2isAT9acYiWz -qFgkYSTq7n0B2Kvu9SHjMhWLqr4KX84VgNOBHUaaF6hYjBpx9XCRAHz9VChb -6k/FUnPKAYo0AdAyvZz3+BQVy1uePVY5IQAc6e+eizlQsS7zP4MRXUE4vfn3 -e3MdKrb2Fx7VaRaEXm+lbrmBemyzZWIgqUMQBKJaG9O66/H+rPKva310e5Ud -zzZ31GO7NuePDbOC0P9LIqqtsR4fVntU4SgkBKmDo23/iurxqVHN+LBjQvBg -7SrHj9B6fOPgHvRpUQgUn2ul20rVY7GXH8QYNwlDWL5nrZ1IPS4UOLikvUUY -jP84a9nw1uPOT0eK4rcJw7FZRyM1xnost89fZt9uYbixeic6eqwOU/c+YG1L -EYbdB93Dpp/U4X9mfz68NxaBl902WaVadfgc6eHRpjBR2HJAIFbnUA3eMbt6 -0XtEDKJ/nZIco1TgUON9x8WMJGEkfP0+79ZSTC5MeXmldhuMPsw1N333Ap9e -ng95xyUNtVG73brITzHZ1114nF8aLk5bXViWeIrZJ3sKmESlISLrD1l1owDn -9NI6kYw0NLE4L7+lFeCBmntqrwykoThC5kn73gJsfZ3U/fAoff7BzGYLtydY -hz9U89ILaaCFcGzwZuXhFVXeAXVbGfhytF7z+sEcvHhfLFTXUQZSBNOk3lNy -8AKPvBzpqAyUzez4qCibg2d+k7x2nJQB4tLeK0K/svFw5YlFx8syMB7MaPYp -Lhs3W7zmjsyRgW3tXk8+tT/CqaeO4OE/MtB+nmVu/ngWNi54mpmYKAvTTmvd -Lf4PcO/2ggc702ThjnHcxknrB/hiYn7GwgNZuNBbKqek8gC/Ds1N358vC3MM -VpbMgxlYxz4zmbtKFo7rhelR9mZgZZaEuIghWbCVL9yWrn4fCx+9FBKoJgcW -w179P1jS8KvPF67Ka8vBq+bCD4Gjqfig+fkrn/XlwD5aMl6Glorv6AcE62A5 -uMh32bkzJBVzcfqcn9knB9q7m1uf/UvBzOUuZ92D5ID46VDL9y8Zz/ObH7Oj -yoFw+NsoO/4k3H1aps2rUQ78rPKOy/1KxHUNq/hqqxyc36p5X/BTIo67WLAt -r1MO8lUfLTndScRaw5zfViblYLvPLA4XTMTeLz4evi8gDwEUvTWVbffwpLWt -06irPJxNzvK12HsXf8pXb1k+KQ8SZYmHTbTv4gomVgqXjzzc4a/feUjoLo56 -XSpmcEEeQrnzy4b772ClbaI9N27Jg8vxD+MBZ+9gj5kee9VSeZAWs5C5lBaP -R2OO2fmxKUDiexvd0+xx2HtSTUaLUwGuv651yh+5jZd2rUxP8ypAOy3L81np -bbyZ6c71k2IK8PixJtnq8G2sdYH28pi6ApTUTbfOPI3Fl90UBKwPKEBwwgWe -GNtbWBhNfVR9QF/fnYfVqCUaZ6aVpf14pABZazsfy2dHY+WVcI/HeQrAmxnb -bnI5Ghu/lNyQKVYA6s0P6ixa0fiEirWG2FsFcHd69rckKQoXCRfHsP9UAFIl -X1q8TyTeMxu0Z8xAEYjuEmQOEVhCWyqC3VgRxOJEx/6IR+AZvzdUVRNFeLZq -Vvdp6TpOWOQ19rNQBMHyNodtRdfxwL98jY2jinDTmbq2LnMd+3H2CWyNUgSb -Zl7953zhOFUZBix7FUFZ6jnzbb4wfPrUuNjZQUUQXutHbL9DMX4Wc+jumCK8 -q88Yf/I5FI9qfW37OqsIG6O46VxyKNYw8qO5MysBp9+x76wyoZhmlp0Xoq4E -97jbtm8hQvDUCfZzL68qgU5Po3CezGU8k7GjujZcCUoEg/hL5oLx7NcQtpYo -JWiQ5hRjqw3Gv6xX0obuKgFV/gBblHMwXqJMvuHOU4LEvd7BP1MvYUbBVuGT -bUoQk/2f96jcRbz1ze0KSWllOH6XEhZ8KgiLbbQwKysoA5JXDeU2DcISZHZr -PVVl+FKu8vKbaBCWKgoZMddXBh/bqhuoMRDLpftynt+jDI4izfljCoFYy//A -kU++yrCRkJWdPO9Pfx+LMN6gKoO3wZT7nWI//MNlVx6lURm+7xj7Trvjh2Me -BlnNtdDH32lHyZ3zwx1S3akOX5ShqmKnpZ+eHz62NUVXbUIZfppPlZPKffEF -bnG3di4VMB5zmdjVchY/XZZ6J+6gAk7WjM8/bvPG1obW3m2HVeC9VHaA4s8z -+FfAVcHrLipQ869HsK30DCb9/nZs5pQKCMmSzfitz+CG6cyVuisq8Ka908P6 -2mn8bVhG1T1bBW63BNnbrnph/vcKsUWzKjDqUSP0fZsnXp/VymleUIEZVnPG -lTkPPMlPqRpdoa/XZlLtRPXAVHvrSVFmVWDo6/7A5+6Bz40GmYWKqgI5WOa9 -7gt3/Pnvu/V9JqpwJX1RfMrWDSepnPL5fUcV4rfFaKh3uuDwvQERXMmq4B2U -sBFS5ILPnr16X/G+Kqxkcm0SvemCd5febXF6rAraWZ83uExc6PePKsU3laqw -pV9hlrvoOHZ04BpMGFWFD41l4typx7BE5HMbAwM1sMXrRU0Gh/GTwme0FbIa -vb/cGarXnbHRlwKDaqwG0q5JPbyNzvigTJ7Ejj1qsFAv/qfL3hnHVGVO7HNW -g89OKVafQ5zw37n4kDNhaqAerMXMOeyAexz8i7I/qMHJfS73W8bssGeIn6xn -hxqUhkkPN5bZ4cXcs4mq3Wpg1SvEIxhjh/kXTgcXD6kBFffpp+raYfNYt911 -C2qwduuUm02ELS6n2g32iqnD5ldE/l/SQZysSuIV8FCH9ZK92Qpd+7Ctxfu4 -mlPq8PimetRcyT7Mf+o4n9dZdbgn8fjaStw+fPNJFH/9BXW4K/FGvdFiH76i -3CPoE6MOnXXVmWZvbLCr4qWtLS/U4dKUThdTqDXWlq2WubamDr9mzMfeNFjg -GdN9jzQ2aQBHxEvmF7EW+InLmGwPiwZYMv3nwXzIAstlcclr82gAr851u4EJ -cywqfUTxm7QG/L7O9NKSzxyvS22oUnZpQMyT0NVw/924WcxE/3e8BqwxScxI -hOzEbVLPFZiTNKDqfnzwmvVO3CkjKSqUrgEs4kw1aPtOPKSysmqQqwEdkR1R -E/U78DL5Rd3FCg14oX22vZpjB1ZwkrZkHNEAsYXXDF1PTLHa0duEwIQGyLyQ -T7gdYop1TvzTkJvWABiIF8q0M8XEqa98ZksaUDt30raByRQfvBTfFbVFE5Kv -+isIu5jgsLRNJ/j0NCHRc86QpAE48oHPQRmSJpQAv54CB+DYR/07dZEmWG49 -VU59h3FKQbmS7W5N8Hmf2nTVEOOiSt+ZZGdNoIZsVIhLIDzQO3Rh+3VNsAuq -LR9iMMZkCWqcZqcm1J8S20HWNsLDsnIDP3o0Qcxum5rFmiGOUo1Qzf6mCYfu -2Is2NhribrJ5g+gPTTC/Mjq3dtQQBzl8+rtpjT7eKBdrcc8AO1r46k7yasHY -hYXyj/z6WMNaxnGXgBbY5dNGDEf1MOOBjpBsIS24n/bYc+OVHs531P9wREwL -bhc+rM931MPLJ1c8O2S1YPw9OdM+TxcnRoZmVBloQWpAqVz0QR3sFaPzditJ -Czb4m28kqepgFDfyM5CiBXHJ4lUrjDp4LGknSRvo/vq2ilcUa2O9xxyfc/Zo -wcis9pWtwtr409t4jtvOWnAwbZolpUsTczNl+R8P0wLSQcNvbBmqmHWl9sB8 -uBZYPLMT++Sgitdn+nVCb2hBOkcYH0lYFc/2bJ3PjNGCes1W/u44FdxWHH9m -MFELpjTT/hncUsZ3XELdjxZoQc3Im2XXh4o42v7BztlnWrDngPR3N3dFHGZV -LXe1SAtM58K2zqkq4nPkleGMV1qwdPVjRVqZAj7I73t0oFYLfhvgS1rd8liY -esz+8Gf6/Lx+spOmHOYuu2I43akFEiwzK6fWZDFrYbrw5a9a4GzrVrzQJIuX -Uro/pw9owRbOn0xe7rK429dmX9+EFmhntu94ly2DU6XB3OmfFgAIOFw0kMZS -oduMHRS0YduSqWOalSQuPMcu06+kDcTa89IAZkmM3OfZjqtqw2/y67KNCgl8 -2ILW4amlDW95Sl5IqEjgdCGPU+fJ2hDRImK0j1ccb31SmJpkpQ1RVgxMrn9F -cV56Uoj4Pm3QzGdQvVkpio1uh7g/OKANiyOiBy2CRbG9/36dx/baMDv98Vj8 -hghORItNpS7aUDi4a5WHSwQLdhArXwK14XHa871VpkI4+63CN4cL2iAzoujU -s0UI65bxvO2/pA2rod98Ln8RxPvvD8WNhWjDzhZ2NisvQRzvcV3pT7Q2OH3k -7l5OEcDca62HBB9ow0lz51+XePkxh7xz6f5Gbfhvc/bdhhxu7LUVmxc0aUNe -ZbLJFUdu3MwlM8DUqg05rsasozzcOGbxO8urNm2wrLv1rySYC3O/O2cr0kP3 -H3n3JHGEk37e3VzondKGp/ph16rxZux31DtSb1Yb9F3tDjxb58AdB/ZJ3JrX -BrFEL1n9Gg6cYCyyAy1qQ4LCnnQ2zIFFuB/dzdzQhvMrnh4Ju9ixxIsKHTd+ -HYgemjYjnWPFwTn3G6oFdcCE8UuqAIUV96eEOAqL6EDz/n/efkysOCPMLKxR -XAeS17q3lN9jwdsPfmpXltcBafm5evM6Ziy/9OPsjKEOfDEZpMaoMWENYuvz -oMM6kFlgs/eYIwMukT35l/GYDnjLo2RQZ8BGm8t3xbrowAfHA48SGRiwaZf9 -YLaHDvzevu0f2reB7HyT+T756kD6euzPzWv/0NUcEX+1CB04a2md7nHxL2KO -8ah7HakD+7c0BfWr/0XRfq85/7upA6ZVZDXJ4VWUgA/lOMTpQE8f2eGX5SrK -+5rYGZGqA1/D18xrVFdQG5cwaahQB9T7OgYR5xKyXXC7fvqFDl2v4799WxZR -T8+r9qUSHdj2vbBk381FNPrY1ou7XAfMrnCG8XItomWTe2kUmg60CHBzHxb9 -g6QDBdfvdemArZIjc6vlb+Q3wE8zZ9AFPOeSGiszh941OFc/YdSFp1a7Cttn -ZpHU89zXm1l0IU9Qav/xlFnUfJX8tJlDF+zEhqY55mfoTzWXe+YCurDcUbdz -95Np1H7ihYe5gi6UPupyaTD9iRQs/x5/oqQLT0wZs0xWJlGw3k7nzaq64JuC -nC4UTSIllq82zZq68OjyXRkR6UkUkstANifpQi6Lq3bv5h9I64c1p7mlLlAf -TLpu2RhHEe0prE+sdMHU741jaN046isfYdi8TxeW/O7LpoSNo8jooD9NtrqQ -MhPCksc+jgZVHwzsOaoL31fvPheVGENx3jNFe/x0IeKDzdS/IyNo9neM7Z5k -Xfr/afPsfxaDqK/7od39VF3oc0j+K7ptEDVXlx6aT9eFSRW9PXXj31D2jUGH -lIe68B/yGw8hf0OO4npHfjzRhfGwWmw31Y/emva6R1XrQkVTP/O1oF5UrDjn -0V+rC8P6KaMBar0ok5PlpDZVF9ad9rmoDfegi50ap7426MLFP6QXfdY9SMsr -zEe5TRe0NmKHhPW+orR45fNNw/TxsyMhx6W6UGQguiA5Rmdl9v9eDXSiQKcD -F32/6wIHseFd9KAT2chfDt46pQujLVevJcp2ItbytpCTf3Sh8o3o1ILOF+Q7 -GBTFwa4Hw4ONBg+9O9AuzYbUPep6kOT5tCrLug3Zs+4+2KapB7szmP3lpNqQ -V38T1yEdPTgZYHnjVM9HFHvzfYiroR6otAIjo9hH1Pn9s/tVEz3YJem9b1vu -e+SaOaLzylYPzFQUu2/PNqPAILcpir0eiKFTLnL3m1Gk1fccqqMe6Eu/gCcW -zejp2qRo21E98N6xFnK1oAn9tv+1PnlSD2qU/HewB75DYXybWrZf0YPjrl+V -vPQaUMJEWPjjED34RiXlfp99i3JrmZHGNT2wkzGN13z6FjWfYX9BidSDr3f2 -twspvkV8zTxJdnf04O1qr+KG/BuUGSZ1IiZXD/Yo7zHyNaOiYodMCYF8Pej7 -uw+SuKjojZZMZ0oBPT6PC43uX+rRxID8nsdFejB48NGnVfd6pElR16RW6IFx -5IuztPg6VPOb8nfpgx5s31X7KJG9Bj1sfe1yoF0PtCUPcRYUVaPwHN3mwg49 -uGxYZFHqUI32HFJNcevWgwARacbHhVXoc4WYYceQHryMYXr45EQlmgxd8Stc -0IN593/fti6XofeOAT0cS3qwMBX49VxhGSrSnTdxW9GDLyxDlhluZShgbIJX -Yl0PxneE9zh1vkYMe7oLo9j0oWyvtj1RX4qEeV9Puorpw5nHiV1NFS/RyoTO -/joJfWDrqHHXvPwS9dUXlotv04fRjkXaDniJHp7Ljfwkqw/EUOHZoHclSK3r -ngKo64Ob73/2TYPFyDTD30Uc9OEE1693CZovkHzQXFOgqT68MVIe2L5WhNht -Tmt/2qEPIuMsq9BUhN5vcmWI2qMPiwF3pg3cipC924GMxf36sN/xTVj6rufI -W02np91NH1bZJwxf+z9FAUtiq0c99cE95l5dmchTFExlEpvx0oeAqYdhA5UF -6Kb9F4fNZ/WhpiGfMYqtAOWFn/9qelEf/pv1hbWCfDTcV9NdEqsPFKkLP2IU -HqMfjx8vm8Trw++jRkvmPblozi9OtO2uPtgmjZauxuaiDXYX+6lkfbgffW5A -9m8OktBn6ZZ7pA9hTTUpVgPZyO6WRde91/qw1z+Ep/B9Fjpsr7ckW6EP/T7e -E3A7C7nKSooUV+kDKqFZpu3LQufKZ+w+1OuD0O9m7fvdD1HcWHwna6s+NJ1V -M0uYzUTNRPeXoEF9iEwvOF12JQO1s9f/YRnRh8/bNJefi2ag7o58oYQxffgb -IOc1V3IffT95ybZoUh+u5BuoGM+kI+ZEqS8TC/rg7cBUf8c3DREzrp8dOAxg -7WaN0vrzZCRcuSuraosBnDB7LUlxSUYzN1TObuM2gDB+PU1XoWSUIT23ZYzf -AHbIK836XElC6wcv/XdWwgAGTisHyDklotrK+OIITQPY1rUz971xAkqO9A/5 -oW0A06pixSlrd9FZ20NWlnoGkFQA2irVd9H2WYlJPpIB7OGmRd+GuyhEJk/6 -vqkB0Fg4+TVs7iCTqJq4ElsDeB+YemsoLg6J2T08ImxvAAeuzyX/dopDv2TC -1S44GsCFosXOPMU4lFW15x06agC/jBzfTIbeRoxznzeaPA1ATaUbNfy5hWh2 -P70HLxnAKs7J3ix0E6XLfjD+7wo9XrUgx/HqaOQ/V7Q5N8QAblg/b27ziEZy -0YG5p64bgOUlSXhbE4XCqzcNLMYawCuhDkrn+Ui0U050L1eWAXjW9ZYwikeg -l9NvpV2z6euLfrVq/Hwdyb0+t1iRawBX3gcGnbh9HTGbf3zgWWAAM5vNI0TZ -riOqT8Qv2ksD4KmYKtJmCEeociHpYqMBMB3+sUlEJAwVhmedbm8ygA/zvrNG -/aFI0srGRKmVHg/Dvzdc2aFobbBg8kubAdiod/Y26oaiCtYThHaPAWS2Bv3c -4RSCDPa3D3+fMgAroyNxh+Mvo1zxq6/RLL1eC1aEnM5lJDSmFnNv3gCyAz38 -BT4Ho4WgSP3/Func7ZN9WDwYFd/HkRkb9HwGjqubvr6INH88U7flNwTlN1st -/KXPo4xiJ8angoaw2V77pWFHEOIO5uhiFDGEDyLpYXPXg9AMt1tIkTidtRjq -DGYC0VM9iY4t8oZAkCazGpoCkFJI9HmqoSGwzmxLvPfkHKqi5LBYkg0h5Xnp -13XXc8hmqfbOF2NDYMlRP2e3/Rw67/3n6YSJIUx3q7q+SfFD75yPDXFbGkKj -mGforiRf5EkyMHc6ZgiHwsPPdPr7oLUFm65RF0PYevjN4wpmHxRXdMrV280Q -JkaEWqUTvVGZ4sMroV6G4JrFWudafQaxC3OWPPY3hM6uq5Z6kqdR/q8h8YVI -Q7hnuG1tRPIkQoVreZdv0v292pJXRfNEn06KGLDFGsI7T1rXBy9PtDpoaSN2 -1xAO8F9wvl3lgcw/vg6H+4bQbavAw+ftjiYLbk3HvDCEEdNzSvUsruiKR95F -4ZeGwPPo0+Vj1ScQvyyNLbPUEB5s6j79L+AEIqcuS5dUGkLGf5fLZCZdUHTk -Cbuvbw2hUu1gY23/caTiRqqV7zGEmGsSFSLfjqLbMlar1/oMwfCsXAnV7yha -+OaiPzxgCMcKFmo+sR1FNY4xBRkjhhDx2d2W1+AI2m/zLUlk2hCuSf44HJnl -jC5Qrp/lYDCC9U1Z4e9fO6CB5ZQCD0Yj6KIwCbQfdUCmpYXjb5mNQO2P3+Nl -dgfEqd3tHMZhBHtb2XfnHLFHmQqqe/7yG8Ejxu8PeUUOoXd87dLT8kZwc2PX -jF75QaT+cczZQskIbqWPWn31PYjuxKwm5asYQWRnu8Jp1YPImU2O213TCHr3 -25L2PTyAZtcCVweMjECL8cfXhqT9SHhCoqPNwggKt5+fmHpqgy7laHNrWhkB -dWT/FtlzNmjQxWzPLRsjMD6SlSFOtkFP+n1q99gaweGT2b4JCdYIdVALqEeM -4PwWt+KS8b3IrcYz/KWvEUze+LZxtdUczZyZDNrpbwS5itPdOz3M0XnJ06c6 -A40grLdB9CqTOYoO9tm/fMkITkxWIkPYg4rIgduNI+j2Qy/5dZp3obXSa1W0 -VCNYVpqxVpLYiSLcWYoO3jeCNb3W1YGWHYhH+MajsQdGYL7T/nBN8A4kExAd -zZZjBAE3eqvGh/5Du3Tj7S2eG8H8D1nFM+Wm6M7zjIVPNCMwsis7uJQCSOLo -9okTDUZA7iL7uTkCyuHO6l14ZwSnfsXp1IkDKjuTQxX+YATP8ufvO5ti1K/6 -NM6x2wgUF2Lq5c4QSCmvXG14ygisHtpU3OEjo+JDlO3nZo1gz99RT4FnJERh -qxZg/mUEZkEq3zjNScjKvW5VfskIGLhtWg9GGiF/ucZ3JzeRgPZT0/mxkCGq -zfzsOi9Eghvp845sPnpo0FL6aKAoCTxV7i0pSeshhpUzDn/FSPAhLNvs1Gdd -ZLqPzYplOwk62Hk+miBd1LCJbLhVhQTKsfJO76R0UKvLAw4TRIJD66sf//Bo -oWnuKaYGIIGLWM6t4mxNxF1ptG7+Hwm+anRc2amqiWwEPv06uJsEjlOj/q8I -DdRBY+7z3E+Cs18TvnEGqaEeOa/COHe6/9AGKUcDZfS3rTRP6CTd/sTpe0xf -lJDEZaZHqadIEHbXeVosQAkd/pKelH2WBOIhv85dKVdEg9c/hpRdJEFvVgHl -5n4FtElH4hJxmQS7l94nCa3JI5kBzwDqVRJY8elyjefKI1cDRq/WcBJIRJzL -M2OQR9/H9Q4MxpIg8IfVnxv1soj9buhet3gSfA9fX6b5yyIl/GHX5F0SVDUs -h8ooyyKvJA/jhWQScL8ZCzG4J4NmdqXKsz8igZS4/sLui9JoIW9jSfM1PR6j -1KqgH1Jo3M4sM6qcBI/J6jI556VQN/Ot3SOVJJDGO8pOcEihymNiKYl1JPhv -U3HfFU1JFCaqT/7XRAL1tPD6lFviiDfSK7i5jwRFzC/3MdwSRYwGL+TkvpFg -75pQc5+OKFoYWWq9PESC2adurX+/iqAufF1Se5wEhiWbFmZVRVDG0oOapFkS -kOIGckgDQkjN4wuDGyMZzj/Yvq/xvACSEpLIr2Emw3a5Rsd+LQHES3PZJ8pG -hkSVI/sXf/Cj31JzD1u2kIHL+tRPmaP8qKJz8386QmQ440m6ymrLh3abwfUN -RTI8/EIZ0uvmRuSFCHUHFTKYfPOZz3DjRmpZ778Uq5FhoCxFOm+BC/GsOyq4 -a5MheHulcKgIF+p8FdDYSibDmORdhmKfLeiEfAFH6l4yWOScY/NzY0cX3x7x -UrAhg9ZDyb95jOwozo2/pXg/GS5wzMm7P2RDVTkXYloO0f0v8b9xGmFFggq7 -ef4dJ8Pks1ibe+dZkErDX58oVzJojhjGHpFmQeD+vE3IgwxLKu6+oS3M6Eyu -8B2N02Qw+71xolaWGTUojAkeCyQDR2L6p9gRRtTXkBwwdZ4MP0j2kUmJjOiX -u2Xn+UtkOIaf7fpkzoi2PS5Jig8hw+H5Yp+W0k3ovGKYGC2aDEKBjBtW6QxI -RWnbdoUHZBBVuXe9RfcfAe8+hRQ/JNP1dm7jqVoj7DwjhlA2GSJ+ih/QNVsj -ruVNZx3KJ8OGIfeP1aN/iT6lKvmoEjKkc8o9achbIX6984kQKiVDFNsyILxC -sJ+U/f6wjAz7p0JTD3ctE/r50XkV1WRQ5L7x9gLnMhGr7KA61UiGCbaA1PNR -i0R2E2fM+WYyzG+v0LuitkhUnKybYn5PBhnve0dW2/4Q3/MVCyU/kaHymHww -lvpDgMqilnUfXX9j8qHjTb+JeZW7BsVzZNAwSOI5dXie6G6FnQK/yVAxX2ou -LDZP1HnPHPD/Q4YyU7frdV1zRGzxHl+DVTKwXttpw2Q3R6iQGZ5WMFEgwnn2 -Z1XlDMHX96xCnJUCaTaLvJQdM8TyZaemYHYK2D9pUr36YZpoqC8dR1wUeHvE -QBBPTBEue85I04QpkGr67vpPzZ/Enp9iWnJbKfCPmh8+/naS0Lr1Dl0Xp8AK -74RvwOFJYr1N1nnXdgrIHWkqM4z/QaTZ9yS2KFMghy19oXDzBPHZYxfnZ2MK -nDw78PoFjBGVHH/E9DEFrob+OGk/PUpkFWQpJ5pQABP2t1HaKHF29p+ZvRkF -xo7sSytdHSG4gl6G9llTIGDhrk5X4zCxIOoSR+ynQOCbqyGrl4eJvgqeBxkH -KeAoF1RF0h8mnqx7VR1zoAD7gbKTf3OHCLMI6aVRFwqkWEl+FEsaJNSVPrKY -uVHgo3qt7VPbQUKwOVjwsQcFnr+w2k4WGiSGubq1T56mAPpu5B+k8Y24ei/2 -9HQABbab266OWvYTZdl/h/5EUmDvooKXZ/9XwuA//yXzmxQ4vVXxWMf5r8Sr -oSnOzFsUqL94r7lK6CtRLDVgaH6HAtAtN7xwoJt4mlx3KyONno9h06sTQ52E -iiHp0e/7FEg0+2CvGtlJ5H95UbY7kwKPNU7o79LqJHL5H438yqaAh/3BYY/w -L0RmzHXSrkIKuJfc72ugfCakVNet0osocJD1aHr+VAdxvynQdb6YAk3mm39U -ZHQQqayet9NeU4C7sif+EGsHkRBiPjZbRwHV2oaATSPtRJQ/T3xyBz3foQ+t -Ivc/EuwCkbnTXygw1J43+WH7RyLiBUOVaTcFLHx72V1zPxDhM/PjU30U8FcW -38f5+j1xxfOzsck4BbJn8r8nTrcQa6x79ydO0POV01O4erWFuJTz1uPnJAXs -grmZeAVaiPPDpXfuzVLgqPlaIT9uJvycUyZ+LFOg7Xuf+6/8d8TcKt86+kuB -TYWTUQG73xE+KdECCf/o+jyHat+JRuJ05yWEGI3hVFmwfK1aI+FucyThzhZj -yJ1SkBJpeEs47pClv12NwfvBWaMdhjTi32d2btp2Yyi/Fhp4fpRKZLrN9JrL -GsMby80jHHepxHhEeZCjkjHYaiwPqi/UE35N1s8v6BjDZQXf0OG3dYSQo/7l -TfrGEGJ57qHH5TqibFLMIsrQGCgcr5y2GdQR61vGx5ONjeHT96BGebtaItoq -WKrMzBimnUOH2XdWE+rfjk/hPcZQ1aPPotVQRbT57KpotDAG4+4JZ989VYRw -PL9dl40x1GR4TW2zqySyOvJuLTrS1yuvm4Eb5USF/Zc1PR9jGN70VTPLpJQ4 -/KOiucrXGDYO8WY9GHxFMFzMTN7hT8+nSEeVEvqKMEs7pXfwgjFsuX03Tbvx -JfGpf9Ppc9eMYd478a6bWwkR4P2d9Pe6MeymRN5L5y0hRDda2a5FGkP2W+l7 -qLqYOLI9+dGdW8YQx35/rECsmJh00eh9kWQMXnMhZ2+OFRG3fgvkk1KNYZOl -p+2FtCJCK3wlsD7dGNIO8Vnk7C8iAnPe8Lc/NIadMEzZGfWcYJxwNJ8roOvx -N2bc4swzQvzMjXKNOmMYsJI4ceB+PhG74a5/k2oMa9Vzb0d08wnGO2Yvvr8x -hknSwWOSrXnEZClLfmaTMZBbnSX9NuURFQzhyfwdxqBU3G87dyWX0Lh7QtDn -izHYyOc5i8rkElny/8W1dBkD9/SrntcNOUS0OWNkeJ8xbH8aKW4mmEM4JoQE -LY4ZQzPv3wzGukfEB4Vjv/dPGMMOFYNnu70fEabl2Of5pDHMfR6X75F8RKgM -rLt7zhpDC59Zf3NIFrGieNmuZ9kYgl93H7a3fUgkV17Qr9lCwKnu0+18XhkE -p5XDCzFuAl72JsKtn/eJkEEj9SBeAuqvt9/i9LlPeLIsy2kJEeA/4vRq8VI6 -YWgdKJglRcAdwxuZD56mEk+GbOPWtxOQOzh7/SiRSkj563M6yRIwsHZl5/jH -FII1ZYFJUImAm3fH/qquJhOdw36/r2sToMBnOtLlkkSYB+z3GdYlQOximzfX -piSihk3nJzIggOUi60hHZiKRqzY/vEQmoJp07/zq6D0iMNDn08kdBARM1lsz -X00ghDaffrH3EAGXFPTOsf6JJ7L/u3xxzoEAEx/Kg+7MeELncux/d50JqNX4 -+VbdKp6wmiv60n2cAC7DC993PosjIjr/rJw4TUDS1gG7qeVYQpCXjcbqQ0BO -phu7jUcskbVHNCbfl4ChsZhtB7pvEbVVZKnZQALunX5vw06NIZazrppeDCVg -9kV57WxxNBHRF7dFMpwA6uNoOW79aEJQOOtzbQQBQpKpJX7lUYRW1Bt3lhgC -ejWVdo29iyRO+nDcjEskYPLawBfHTTeIHsrdjtwCAiTeq5Z7tF0jPAOy0/cU -ErAKGr/9/K4Ri4Wv3KaKCFg/c8BcV/gawS/TvaRdSkBE9V7rly5hhAW7pER1 -HQEcLcaK49yhRI+JxthRGgFI+yS1sTqE8LyECxkbCBg9MPVN1juEfj4eh90t -BMyYO3oez71KVH3Ode34QkA4f03Ee6fLhDl3mXpgN71eOyy1Wj4GE927mhZF -ewnI90kQtDcLJhYqfkYeGSTAU5+5ZY58iVB/qPXsxyQBDku0P0NwgajqMQmM -mSagL1BzXfzdecJc8ADWnCNARIVzPGbfecL9RkC7P/1acczRqm7SK4hYqItI -FVkmQFSksYe2GkiErSadqFgl4MBNM9mnMYEEr16+2mH6tel+gZVE6vZAIuNM -xZ+NDXq9HfXOhZcGEP8DWaJNdQ== +1:eJwV13c8Vl8YAHBFRBmZr/kOq6yM7Pf1PNJPUWZWyMhoEAopkhGiIjMjSYVS +4b0vkVGEhoZ2lGgvmSGj5Hf7636+n3Pvufec8zzPOZe+LdQxYDEXF5fIIi6u +f9dfA12dSsfKzAwvuPVZDJqbPS+hHDDvTYRALwF1nlAaoMSjbZTebKg4En5g +IEQb9tlf6uHuPQdZaUtkb4UgrBiRyp7t4cCkT6xzSYg9vG2xDZ3saYfW7cQp +RogPWCoN9o/3PAXt0vuHLYLDYLbHMG+s5wP4UCQpT/zjocPiQtmTcxOQkVTU +9v1nJsi9bfyyTWMeeNrz7ecHCkA82PsSnwU3+pSfmSpSLoVsHctmW+elWMO9 +IjRq6Dy8KtBuGxcRxM1v6qK61S7AsbK4R4ulV2D07V2VcU6XQCr3Y1rOaTHc +sCfUrVygCijqV5NmKsTQQ1nH/Y9YFci0p8RtZYuhAl9cso18FSiMrYpU7RDD +4ZV8TgOrq0B5U5hP8zcxZCVqsBudqkCPZ97go544royyCnQ5XQV2EZKfdO+J +4wzfqClNrRqOOFmZPf0lgVmdwkmtOjUgU9cts3iRJIa6Jq1Ya1ID1WJO0zrL +JPHZ6a7o62tr4OVTL3YWVRKF66G/ZHMNKDlEMBw2SKL2fHvXssgaaLc5w/u4 +UBI5f8zT0utrYN5yqvshUwpNU5ddk5BhQ2ZF9OV5Sylcc7F07qM8G5R4uVI1 +HaQwPC3nTDWdDZtuCZinB0jhl8loYeNVbCiyoNVuypDC3N6pOIYRG4xwY/79 +t1JoIae8e70zG8KNz3p3JVKw+reHQO9xNliXCk1uPE5B/7eBa2dPsIHBdzC1 +O4+CMXJOtlI5bHj83IV4dpGCgv4x760K2aAVtpx7oJuCafLXf6aWs+FbRVTF +TxlpVNCx5YRcZ4OnuO2wbK00/o1K8+sdZINeTHNCSYs0Tsf3/c0ZZoPAh5WS +9NvSuHuKunvTGBsaa7hB5ZU0anWdb6+dYoPkxsZM7QVp3Clwx9GTi4DHCUpr +/tsog5JzquISEgSsG52LDvkog4Sabq0yk4ADG3LVbg7JoIT1hFiYGQHVZzVf +i/2SwWzRlbsakACKk49x41JZVI1MmGb+R8DQtVvT3FqyGDmrX6RoS0BOYmZE +4X5ZzPHIVPL2JuCDhEpIp6AchulEns2MI0AqtFVeSkoOz70R4I9OIGDTXbeH +O2lyyC/nFexzmID66GMawnpy6LUTVJWOEHD07djgFjc53J2oFnkkgwDdyubt +o+fkUC9hffX1YgISmA6+MkbyuKlDuGKwnoANXiU/DdfKY3igqU/eNQKE4n8c +dt4kjzNpFQXMJgKKO5IrMn3kcafXspT46wRcs276wZsmj4yoee+BDgLG3BT3 +TbySx4zUzJifjwhoiA7jW/FJHscmPR0DnhBwqPh6gdaIPNaHrqx5/pSA5e9c +m3cuVsDnyU//XHxBgOr241zv1BTQXtxqWrWPAK/IqaMPYhQwqG/0Q9xnApTz +18oNJivg+7v73Ju//Ju/E1V8mQp41fWxz8RXAqL/rHq8tkwBNfWc5bYMEpB3 +2Eui8YECDms6e/8eIeBB1p0z5fJUHFcSKjk1Tc53rbhOhyoVrdWCN5bOEOD+ +wrf9nQ4V25QOZp2dJeAb5c8nWUsqHsq3GSz8TQB3qbZadggVTxlrv/ddIMCk +urDuUCsV71oui7Hj5cC6nu75kbtUhKyGTSJ8HLDl4lnv/ZSKQ2+MdbpJ+zmG +vILPVNwvKapvzs8Byxh6XPwSGjZyIo14lnPgvnDLeSMBGjpH6hBVpO3LXO6O +CdGwLO+AuZMgBzweHlvhS6HhxCLK5QIhDoRRf503V6fhgeK82r8iHJiqzbw7 +u5qGP9c1zGau4ED0BvVhYg0Ntxlbe9JEOZC8x8eAYUZDJmPdAQMxDhR13Lu7 +2IGGy9O1lVCCA1S3gOEmZ7J/tXjvZtJlQwsrwt1pGHhjc4ueJAdqJPQ9PvrR +0CxOvl9WigOd288Md+yjofyJhIddFA5Y/TEWPRhDQylxXVUtaQ50Zz43WBNP +w5PSFRdOkH7VyB9flkbD+xnJVGsZDnjZlpV5ZtBw9yorynnSnz6YdYnn0LCk +MN5klvTIsgjR5GIaMp4s/lssy4HwUiFD1lkaLuhfLh0kPbOm0mOqnIZ5lxJD +9eU4wO01UBZQQ0PjoITcdtKpP/d3ydfR0LFx2RCPPAeEjoiNvLhGQ3uZY3vX +kaawNxhattPwzV4D4WbSp9d99Ph7m4Z32u+p/CTNeBUbX3+fhnteKIWpKHDg +4m5KechjGkYcmvvhSlpzcW2XygsazhovPpVCmnPSZmTgFQ2tNSZiOaSN1L+J +5g/Q0I2enNdHeq2TvCffNxpSj4QEKFM5cOdbQ3zrEA15nhpRLUlvinUsjxon +25+lifiTfrpiuGv1LxpO5smZxJF2rTgy8nWOHP+9K8X5pN+YMMRKF8j1uPPL +qIr0tkcthm48dGw93CDcRvqrn6unCD8d6aev0B+TDp4Zj78rSEftzbmh/aRN +9gRKfhGlo3x6Ycs30ksHX1/mptBR7kH8/THSL7fZmdPl6djyyez0FOnyvo6X +Zgw66hzt0p0mHeFkFOypSsdMG6n0f+1rH15ZFK1BR43T1Kp/z4tY0vPzdejY +3/E651//AzfyNK4a0NHjm/naf++/YijQ/tSUjonL7Rq7SUezD7mOIR3PLJ+f +bSG9YdXEkKAlHR+XrF9ykbTkue2J6hvpyHRUf3OC9CeZN1JW9nSMyCiPiyDN +ybGvCnSmY1N23Zgz6fjlt9YmudPRMtJVew1pu2Tj3rPedDzPyABh0gp/q3a3 ++tNxynML9Su5PkP7GNz9O+mIzU2Pm0k3jZ4smAuh482LdU7ppFN3LNOiRJDj +97e+4kHa5X1ch/4BOootxPX+iw8l90m3zYfoyLvV/fUIGT9tG/sPZ6SS388r +4RdJOqPTQfpKOh0XaXEP6ZH2ZN2u7sqmY9ZDwnaUjNdZrZpXPKfJ8a+ILPck +rSuasDqGoKPKk7arK8h45zo21VlQT/an93pVA5kf3dy73Oub6ajJJxq/hXTQ +lGPy+C1yPRfL9uSS+VbWq9S3/TUd+2ZCbb6Q+brXoTAs+S0dfwo6j+0ljfcE +ec9/IuOh81vsHzK/+5t/aQ+M0DHt1t6tvKQlz9xNceJmoJFz0aYpsl58kmLJ +7V3KwAGH/X47SXMyCeKEIANXfr+1+zVZX+wSi97ck2KgYKaCby1Zf1IDgnXN +NRiYEjH1HoXJ8amLDGg6M1BGn7LhPln/fp2WSdBzZ6DfO4VcUdKTwspKxt4M +9JbERa5LyfyfMN61bicDz7/Tsugh6+uHZr9f7rEMvDi+K+kqNwfubWwQSi1n +YJpJz8T3PwTcuX6TSL/EQPuAuhfcpDtXP3DKqWGguNSOQRmyft8Qe19U0shA +KOhhI1nfOX0CqlcfMnAGC57smiKgKMgLPkwxcGFTwTaTYQLy+3d8+DrHwHCJ +M3OqQwTk2oUnDy8wMLDsaY/oDwIy9FLvz/Ar4pnanYHvvhGQ+JtwFVZQxI1z +0lPunwgIOrYkjGmpiEE033fdrwlgXr5SevKkIsqOb7BqukVAH+3ymf9OKaLN +aAw9qJPcv05WlkyeUcSKSmqzNLmfNiRUFDtWKqLdq3qDsDZy/3YrLRBqUUTW +NZWgxc0ErFqSm5nyXhGlwy0vtdQQIOkdE79PQwm7RIROn8gn4OrzA3HKOkpY +xDhbMJdHgJP1/kPP9ZUwXNRgn18uAdn6kQd1QQlb5o73aWURILg8dP+IgxKO +RYgFXzlKAE/jtrDAKHJr6C7MsIglYFzU2selXQk/0x8affchoDeY8XjXHdJ/ +NbMHvQhouz0HcQ+U8JXmg7zvngRkRl+mXnyphOOyxmffuRGg/WH529lB8v5c +vVGOPQEhxKOtp8WUMSm44tR3IGDQztnjk78yMvYufL4oR8Cn4z4ue/lUMPl3 +aOH1R2wIGdRgaC9XwQ/Nlzq9H7Jhev3s8LCIChY4Kelz3SfPc9zZyTtlVFCg +YP+g6W02aB/oqPPRVMHpfep3SlrYEBugIma3WQUt2tbZiFWS5zuzoUfqZ1SQ +dyj3ams8G6xGo6w+G6hi69yV2O3qbBjyWxpeF7cSnW5V8n28UU3+X0gtPtK+ +CtUfr/mmtaQKRB+qZLBH1bB8R54cn+1lkEutsTcw0MCkv7MjQV6VUKBuLCK2 +XRMHu1vFBVMuwD0Zc/2JLC3EmtAh66vlYCLXnrn65Woc7nYrzmg/D0Lc5yJ8 +E7Vx/sf3VsM/Z0EhgcrcoqKDM6Y9RQn0UuBX9qx3vKODrQSje/R+MWixpGui +turiu74fkcKthbB3QLTDmksPdUJ9PQYvnITRiePOVgV6qM19LqjwTw6sX327 +yEpzDXbdZra/z8mCGxOmv6e71+DG4mVxb/wzIERD9/WTAH0UPjnrILvtKLBG +/J9v4TfA2GQHsbrYFPhPiWIjeM4AW3gPHu63OAwr44/ubzc0xMPqfnK5++JB +LcC4Vfm1IeZTrH9mFMZAwI0dSXV7jNBRvW+/1fooaC197j8uYYwWL4JZxqxw +mLy4ML26wRgltKWffmwIBT/ly/xFNiaYwG9VrOa2C8bVcgw4Yya4VV7C3XhX +AFwr+/1+KtUUIVFA3DvdFwwsIqatj5nizbHa4KQ4X7j6fmh5abopuj9rtqrd +4wschQFD62xTrPz6NUbTxReuFLSll5wyxaQLslo5VF8oPZ5svL7aFBcJ0Eyp +dT6QFiGcVfDMFFk50TfU73qD+zpFNFVgYjSf1ExniyfMP18q1EFjokhKnHXq +eU8oDRjps1Zkok4Yj5D3UU/4ktIY5b6SidrdOxos3Txhb5ddzQFdJrZVD7Dm +Jz3gqO1BhWuWTKw03nrwj44HNLm9+LMmlIkflm75ONq4BWR3H2nUamOicucb +K7kFF8hYCNQ/1s5EF8Zmk5s/XGBxtiXxtZOJtqolWRG9LjBYv6SytIuJ/UFC +DrwcF2jiSioQfcbE+q/1Mi8CXMA9Nz7q12cm3tR/SaM8doaC5gP6N5ax8JDr +M67paieQEAgmbFxZaN8tMMPMdYQyi9josS0svKPl2eCR6Ai6sRkWOZ4sPJVX +fzstzBFsx9gven1ZeO2ETaWYjSOkvJya9QtmoWPoDat+XkeYORe3NjqBhe9N +aneYxTrAa9OcZxWXWRhjqPFqKMIedkSWFVtVk44NKH7nbw+/qq8GDLFZyLdr +3u2Dkz2IMnqndepZyBs2nSusbw8bl8rLXW9joaG4zhh1yA5anlf4P3vBwkj+ +97/NpmzBWuia5r5eFoavq5R889IWetd3/aL0sVB6zcOBnGu2MNn0I9XrHemT +W1U3H7QFzbPaVd8HWfi3KmO30BJbaHltvu/4MAvN0p/dPvTVBqzFN8PqMRb2 +/Mezmv+eDQQeiXwSMcXC06vu9AedsIHJtpQiqRkWKjuum7fYawOJc/l+TXMs +lLA63K/vbAMiayo1ts6zMP2oRJC5kQ2U7G6aWlhgYUlrfnagrA38D9BrjhY= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.15142054732361562`}}, + "PlotRange" -> {{0, 30}, {0., 0.0708002566330286}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -7626,6 +6942,7 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -7653,7 +6970,8 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.15142054732361562`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0708002566330286}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -7661,11 +6979,12 @@ xZ+NDXq9HfXOhZcGEP8DWaJNdQ== Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.99134491550045*^9}, - CellLabel-> - "Out[418]=",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] + CellChangeTimes->{3.99134491550045*^9, 3.994387045061694*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"65cc1318-eaa6-436a-b767-b64295c7bbe4"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"xx", "=", RowBox[{"ListPlot", "[", @@ -7734,15 +7053,801 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"30", ",", "0.003512"}], "}"}]}], "}"}], "]"}]}]], "Input", CellChangeTimes->{{3.991799458254999*^9, 3.9917994623413925`*^9}, - 3.994236179081726*^9},ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-\ -b938908ab9a4"], + 3.994236179081726*^9}, + CellLabel->"In[96]:=",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], + +Cell[BoxData[ + GraphicsBox[{{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "AxisPadding" -> Scaled[0.02], "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "DefaultPlotStyle" -> { + Directive[ + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.95, 0.627, 0.1425], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.455, 0.7, 0.21], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.578, 0.51, 0.85], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.772079, 0.431554, 0.102387], + AbsoluteThickness[2]], + Directive[ + RGBColor[0., 0.6, 0.6], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.36, 0.684], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.56, 0.7, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.54, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.585, 0.5976, 0.9], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.9, 0.45, 0.45], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.7632186717367253, 0.8174402144034898, 0.], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.8554632469481959, 0.24885384718327969`, 0.833405387394855], + AbsoluteThickness[2]], + Directive[ + RGBColor[0.032972823413648836`, 0.7396719749139476, 0.534700104525218], + AbsoluteThickness[2]]}, "DomainPadding" -> Scaled[0.02], + "PointSizeFunction" -> "SmallPointSize", "RangePadding" -> Scaled[0.05], + "OptimizePlotMarkers" -> True, "IncludeHighlighting" -> Automatic, + "HighlightStyle" -> Automatic, "OptimizePlotMarkers" -> True, + "IncludeHighlighting" -> "CurrentPoint", "HighlightStyle" -> Automatic, + "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30.}, {0, 0.060662}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387045292735*^9}, + CellLabel->"Out[96]=",ExpressionUUID->"b2e9c405-a68e-4c8e-8c09-0d6ae67fb9b6"] +}, Open ]], + +Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6b0777bb-40fd-b54e-aa03-\ -b6e82cb2e939"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel->"In[97]:=",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13c8Vl8YAHBFRBmZr/kOq6yM7Pf1PNJPUWZWyMhoEAopkhGiIjMjSYVS +4b0vkVGEhoZ2lGgvmSGj5Hf7636+n3Pvufec8zzPOZe+LdQxYDEXF5fIIi6u +f9dfA12dSsfKzAwvuPVZDJqbPS+hHDDvTYRALwF1nlAaoMSjbZTebKg4En5g +IEQb9tlf6uHuPQdZaUtkb4UgrBiRyp7t4cCkT6xzSYg9vG2xDZ3saYfW7cQp +RogPWCoN9o/3PAXt0vuHLYLDYLbHMG+s5wP4UCQpT/zjocPiQtmTcxOQkVTU +9v1nJsi9bfyyTWMeeNrz7ecHCkA82PsSnwU3+pSfmSpSLoVsHctmW+elWMO9 +IjRq6Dy8KtBuGxcRxM1v6qK61S7AsbK4R4ulV2D07V2VcU6XQCr3Y1rOaTHc +sCfUrVygCijqV5NmKsTQQ1nH/Y9YFci0p8RtZYuhAl9cso18FSiMrYpU7RDD +4ZV8TgOrq0B5U5hP8zcxZCVqsBudqkCPZ97go544royyCnQ5XQV2EZKfdO+J +4wzfqClNrRqOOFmZPf0lgVmdwkmtOjUgU9cts3iRJIa6Jq1Ya1ID1WJO0zrL +JPHZ6a7o62tr4OVTL3YWVRKF66G/ZHMNKDlEMBw2SKL2fHvXssgaaLc5w/u4 +UBI5f8zT0utrYN5yqvshUwpNU5ddk5BhQ2ZF9OV5Sylcc7F07qM8G5R4uVI1 +HaQwPC3nTDWdDZtuCZinB0jhl8loYeNVbCiyoNVuypDC3N6pOIYRG4xwY/79 +t1JoIae8e70zG8KNz3p3JVKw+reHQO9xNliXCk1uPE5B/7eBa2dPsIHBdzC1 +O4+CMXJOtlI5bHj83IV4dpGCgv4x760K2aAVtpx7oJuCafLXf6aWs+FbRVTF +TxlpVNCx5YRcZ4OnuO2wbK00/o1K8+sdZINeTHNCSYs0Tsf3/c0ZZoPAh5WS +9NvSuHuKunvTGBsaa7hB5ZU0anWdb6+dYoPkxsZM7QVp3Clwx9GTi4DHCUpr +/tsog5JzquISEgSsG52LDvkog4Sabq0yk4ADG3LVbg7JoIT1hFiYGQHVZzVf +i/2SwWzRlbsakACKk49x41JZVI1MmGb+R8DQtVvT3FqyGDmrX6RoS0BOYmZE +4X5ZzPHIVPL2JuCDhEpIp6AchulEns2MI0AqtFVeSkoOz70R4I9OIGDTXbeH +O2lyyC/nFexzmID66GMawnpy6LUTVJWOEHD07djgFjc53J2oFnkkgwDdyubt +o+fkUC9hffX1YgISmA6+MkbyuKlDuGKwnoANXiU/DdfKY3igqU/eNQKE4n8c +dt4kjzNpFQXMJgKKO5IrMn3kcafXspT46wRcs276wZsmj4yoee+BDgLG3BT3 +TbySx4zUzJifjwhoiA7jW/FJHscmPR0DnhBwqPh6gdaIPNaHrqx5/pSA5e9c +m3cuVsDnyU//XHxBgOr241zv1BTQXtxqWrWPAK/IqaMPYhQwqG/0Q9xnApTz +18oNJivg+7v73Ju//Ju/E1V8mQp41fWxz8RXAqL/rHq8tkwBNfWc5bYMEpB3 +2Eui8YECDms6e/8eIeBB1p0z5fJUHFcSKjk1Tc53rbhOhyoVrdWCN5bOEOD+ +wrf9nQ4V25QOZp2dJeAb5c8nWUsqHsq3GSz8TQB3qbZadggVTxlrv/ddIMCk +urDuUCsV71oui7Hj5cC6nu75kbtUhKyGTSJ8HLDl4lnv/ZSKQ2+MdbpJ+zmG +vILPVNwvKapvzs8Byxh6XPwSGjZyIo14lnPgvnDLeSMBGjpH6hBVpO3LXO6O +CdGwLO+AuZMgBzweHlvhS6HhxCLK5QIhDoRRf503V6fhgeK82r8iHJiqzbw7 +u5qGP9c1zGau4ED0BvVhYg0Ntxlbe9JEOZC8x8eAYUZDJmPdAQMxDhR13Lu7 +2IGGy9O1lVCCA1S3gOEmZ7J/tXjvZtJlQwsrwt1pGHhjc4ueJAdqJPQ9PvrR +0CxOvl9WigOd288Md+yjofyJhIddFA5Y/TEWPRhDQylxXVUtaQ50Zz43WBNP +w5PSFRdOkH7VyB9flkbD+xnJVGsZDnjZlpV5ZtBw9yorynnSnz6YdYnn0LCk +MN5klvTIsgjR5GIaMp4s/lssy4HwUiFD1lkaLuhfLh0kPbOm0mOqnIZ5lxJD +9eU4wO01UBZQQ0PjoITcdtKpP/d3ydfR0LFx2RCPPAeEjoiNvLhGQ3uZY3vX +kaawNxhattPwzV4D4WbSp9d99Ph7m4Z32u+p/CTNeBUbX3+fhnteKIWpKHDg +4m5KechjGkYcmvvhSlpzcW2XygsazhovPpVCmnPSZmTgFQ2tNSZiOaSN1L+J +5g/Q0I2enNdHeq2TvCffNxpSj4QEKFM5cOdbQ3zrEA15nhpRLUlvinUsjxon +25+lifiTfrpiuGv1LxpO5smZxJF2rTgy8nWOHP+9K8X5pN+YMMRKF8j1uPPL +qIr0tkcthm48dGw93CDcRvqrn6unCD8d6aev0B+TDp4Zj78rSEftzbmh/aRN +9gRKfhGlo3x6Ycs30ksHX1/mptBR7kH8/THSL7fZmdPl6djyyez0FOnyvo6X +Zgw66hzt0p0mHeFkFOypSsdMG6n0f+1rH15ZFK1BR43T1Kp/z4tY0vPzdejY +3/E651//AzfyNK4a0NHjm/naf++/YijQ/tSUjonL7Rq7SUezD7mOIR3PLJ+f +bSG9YdXEkKAlHR+XrF9ykbTkue2J6hvpyHRUf3OC9CeZN1JW9nSMyCiPiyDN +ybGvCnSmY1N23Zgz6fjlt9YmudPRMtJVew1pu2Tj3rPedDzPyABh0gp/q3a3 ++tNxynML9Su5PkP7GNz9O+mIzU2Pm0k3jZ4smAuh482LdU7ppFN3LNOiRJDj +97e+4kHa5X1ch/4BOootxPX+iw8l90m3zYfoyLvV/fUIGT9tG/sPZ6SS388r +4RdJOqPTQfpKOh0XaXEP6ZH2ZN2u7sqmY9ZDwnaUjNdZrZpXPKfJ8a+ILPck +rSuasDqGoKPKk7arK8h45zo21VlQT/an93pVA5kf3dy73Oub6ajJJxq/hXTQ +lGPy+C1yPRfL9uSS+VbWq9S3/TUd+2ZCbb6Q+brXoTAs+S0dfwo6j+0ljfcE +ec9/IuOh81vsHzK/+5t/aQ+M0DHt1t6tvKQlz9xNceJmoJFz0aYpsl58kmLJ +7V3KwAGH/X47SXMyCeKEIANXfr+1+zVZX+wSi97ck2KgYKaCby1Zf1IDgnXN +NRiYEjH1HoXJ8amLDGg6M1BGn7LhPln/fp2WSdBzZ6DfO4VcUdKTwspKxt4M +9JbERa5LyfyfMN61bicDz7/Tsugh6+uHZr9f7rEMvDi+K+kqNwfubWwQSi1n +YJpJz8T3PwTcuX6TSL/EQPuAuhfcpDtXP3DKqWGguNSOQRmyft8Qe19U0shA +KOhhI1nfOX0CqlcfMnAGC57smiKgKMgLPkwxcGFTwTaTYQLy+3d8+DrHwHCJ +M3OqQwTk2oUnDy8wMLDsaY/oDwIy9FLvz/Ar4pnanYHvvhGQ+JtwFVZQxI1z +0lPunwgIOrYkjGmpiEE033fdrwlgXr5SevKkIsqOb7BqukVAH+3ymf9OKaLN +aAw9qJPcv05WlkyeUcSKSmqzNLmfNiRUFDtWKqLdq3qDsDZy/3YrLRBqUUTW +NZWgxc0ErFqSm5nyXhGlwy0vtdQQIOkdE79PQwm7RIROn8gn4OrzA3HKOkpY +xDhbMJdHgJP1/kPP9ZUwXNRgn18uAdn6kQd1QQlb5o73aWURILg8dP+IgxKO +RYgFXzlKAE/jtrDAKHJr6C7MsIglYFzU2selXQk/0x8affchoDeY8XjXHdJ/ +NbMHvQhouz0HcQ+U8JXmg7zvngRkRl+mXnyphOOyxmffuRGg/WH529lB8v5c +vVGOPQEhxKOtp8WUMSm44tR3IGDQztnjk78yMvYufL4oR8Cn4z4ue/lUMPl3 +aOH1R2wIGdRgaC9XwQ/Nlzq9H7Jhev3s8LCIChY4Kelz3SfPc9zZyTtlVFCg +YP+g6W02aB/oqPPRVMHpfep3SlrYEBugIma3WQUt2tbZiFWS5zuzoUfqZ1SQ +dyj3ams8G6xGo6w+G6hi69yV2O3qbBjyWxpeF7cSnW5V8n28UU3+X0gtPtK+ +CtUfr/mmtaQKRB+qZLBH1bB8R54cn+1lkEutsTcw0MCkv7MjQV6VUKBuLCK2 +XRMHu1vFBVMuwD0Zc/2JLC3EmtAh66vlYCLXnrn65Woc7nYrzmg/D0Lc5yJ8 +E7Vx/sf3VsM/Z0EhgcrcoqKDM6Y9RQn0UuBX9qx3vKODrQSje/R+MWixpGui +turiu74fkcKthbB3QLTDmksPdUJ9PQYvnITRiePOVgV6qM19LqjwTw6sX327 +yEpzDXbdZra/z8mCGxOmv6e71+DG4mVxb/wzIERD9/WTAH0UPjnrILvtKLBG +/J9v4TfA2GQHsbrYFPhPiWIjeM4AW3gPHu63OAwr44/ubzc0xMPqfnK5++JB +LcC4Vfm1IeZTrH9mFMZAwI0dSXV7jNBRvW+/1fooaC197j8uYYwWL4JZxqxw +mLy4ML26wRgltKWffmwIBT/ly/xFNiaYwG9VrOa2C8bVcgw4Yya4VV7C3XhX +AFwr+/1+KtUUIVFA3DvdFwwsIqatj5nizbHa4KQ4X7j6fmh5abopuj9rtqrd +4wschQFD62xTrPz6NUbTxReuFLSll5wyxaQLslo5VF8oPZ5svL7aFBcJ0Eyp +dT6QFiGcVfDMFFk50TfU73qD+zpFNFVgYjSf1ExniyfMP18q1EFjokhKnHXq +eU8oDRjps1Zkok4Yj5D3UU/4ktIY5b6SidrdOxos3Txhb5ddzQFdJrZVD7Dm +Jz3gqO1BhWuWTKw03nrwj44HNLm9+LMmlIkflm75ONq4BWR3H2nUamOicucb +K7kFF8hYCNQ/1s5EF8Zmk5s/XGBxtiXxtZOJtqolWRG9LjBYv6SytIuJ/UFC +DrwcF2jiSioQfcbE+q/1Mi8CXMA9Nz7q12cm3tR/SaM8doaC5gP6N5ax8JDr +M67paieQEAgmbFxZaN8tMMPMdYQyi9josS0svKPl2eCR6Ai6sRkWOZ4sPJVX +fzstzBFsx9gven1ZeO2ETaWYjSOkvJya9QtmoWPoDat+XkeYORe3NjqBhe9N +aneYxTrAa9OcZxWXWRhjqPFqKMIedkSWFVtVk44NKH7nbw+/qq8GDLFZyLdr +3u2Dkz2IMnqndepZyBs2nSusbw8bl8rLXW9joaG4zhh1yA5anlf4P3vBwkj+ +97/NpmzBWuia5r5eFoavq5R889IWetd3/aL0sVB6zcOBnGu2MNn0I9XrHemT +W1U3H7QFzbPaVd8HWfi3KmO30BJbaHltvu/4MAvN0p/dPvTVBqzFN8PqMRb2 +/Mezmv+eDQQeiXwSMcXC06vu9AedsIHJtpQiqRkWKjuum7fYawOJc/l+TXMs +lLA63K/vbAMiayo1ts6zMP2oRJC5kQ2U7G6aWlhgYUlrfnagrA38D9BrjhY= + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vl8YAHBFRBmZr/kOq6yM7Pf1PNJPUWZWyMhoEAopkhGiIjMjSYVS +4b0vkVGEhoZ2lGgvmSGj5Hf7636+n3Pvufec8zzPOZe+LdQxYDEXF5fIIi6u +f9dfA12dSsfKzAwvuPVZDJqbPS+hHDDvTYRALwF1nlAaoMSjbZTebKg4En5g +IEQb9tlf6uHuPQdZaUtkb4UgrBiRyp7t4cCkT6xzSYg9vG2xDZ3saYfW7cQp +RogPWCoN9o/3PAXt0vuHLYLDYLbHMG+s5wP4UCQpT/zjocPiQtmTcxOQkVTU +9v1nJsi9bfyyTWMeeNrz7ecHCkA82PsSnwU3+pSfmSpSLoVsHctmW+elWMO9 +IjRq6Dy8KtBuGxcRxM1v6qK61S7AsbK4R4ulV2D07V2VcU6XQCr3Y1rOaTHc +sCfUrVygCijqV5NmKsTQQ1nH/Y9YFci0p8RtZYuhAl9cso18FSiMrYpU7RDD +4ZV8TgOrq0B5U5hP8zcxZCVqsBudqkCPZ97go544royyCnQ5XQV2EZKfdO+J +4wzfqClNrRqOOFmZPf0lgVmdwkmtOjUgU9cts3iRJIa6Jq1Ya1ID1WJO0zrL +JPHZ6a7o62tr4OVTL3YWVRKF66G/ZHMNKDlEMBw2SKL2fHvXssgaaLc5w/u4 +UBI5f8zT0utrYN5yqvshUwpNU5ddk5BhQ2ZF9OV5Sylcc7F07qM8G5R4uVI1 +HaQwPC3nTDWdDZtuCZinB0jhl8loYeNVbCiyoNVuypDC3N6pOIYRG4xwY/79 +t1JoIae8e70zG8KNz3p3JVKw+reHQO9xNliXCk1uPE5B/7eBa2dPsIHBdzC1 +O4+CMXJOtlI5bHj83IV4dpGCgv4x760K2aAVtpx7oJuCafLXf6aWs+FbRVTF +TxlpVNCx5YRcZ4OnuO2wbK00/o1K8+sdZINeTHNCSYs0Tsf3/c0ZZoPAh5WS +9NvSuHuKunvTGBsaa7hB5ZU0anWdb6+dYoPkxsZM7QVp3Clwx9GTi4DHCUpr +/tsog5JzquISEgSsG52LDvkog4Sabq0yk4ADG3LVbg7JoIT1hFiYGQHVZzVf +i/2SwWzRlbsakACKk49x41JZVI1MmGb+R8DQtVvT3FqyGDmrX6RoS0BOYmZE +4X5ZzPHIVPL2JuCDhEpIp6AchulEns2MI0AqtFVeSkoOz70R4I9OIGDTXbeH +O2lyyC/nFexzmID66GMawnpy6LUTVJWOEHD07djgFjc53J2oFnkkgwDdyubt +o+fkUC9hffX1YgISmA6+MkbyuKlDuGKwnoANXiU/DdfKY3igqU/eNQKE4n8c +dt4kjzNpFQXMJgKKO5IrMn3kcafXspT46wRcs276wZsmj4yoee+BDgLG3BT3 +TbySx4zUzJifjwhoiA7jW/FJHscmPR0DnhBwqPh6gdaIPNaHrqx5/pSA5e9c +m3cuVsDnyU//XHxBgOr241zv1BTQXtxqWrWPAK/IqaMPYhQwqG/0Q9xnApTz +18oNJivg+7v73Ju//Ju/E1V8mQp41fWxz8RXAqL/rHq8tkwBNfWc5bYMEpB3 +2Eui8YECDms6e/8eIeBB1p0z5fJUHFcSKjk1Tc53rbhOhyoVrdWCN5bOEOD+ +wrf9nQ4V25QOZp2dJeAb5c8nWUsqHsq3GSz8TQB3qbZadggVTxlrv/ddIMCk +urDuUCsV71oui7Hj5cC6nu75kbtUhKyGTSJ8HLDl4lnv/ZSKQ2+MdbpJ+zmG +vILPVNwvKapvzs8Byxh6XPwSGjZyIo14lnPgvnDLeSMBGjpH6hBVpO3LXO6O +CdGwLO+AuZMgBzweHlvhS6HhxCLK5QIhDoRRf503V6fhgeK82r8iHJiqzbw7 +u5qGP9c1zGau4ED0BvVhYg0Ntxlbe9JEOZC8x8eAYUZDJmPdAQMxDhR13Lu7 +2IGGy9O1lVCCA1S3gOEmZ7J/tXjvZtJlQwsrwt1pGHhjc4ueJAdqJPQ9PvrR +0CxOvl9WigOd288Md+yjofyJhIddFA5Y/TEWPRhDQylxXVUtaQ50Zz43WBNP +w5PSFRdOkH7VyB9flkbD+xnJVGsZDnjZlpV5ZtBw9yorynnSnz6YdYnn0LCk +MN5klvTIsgjR5GIaMp4s/lssy4HwUiFD1lkaLuhfLh0kPbOm0mOqnIZ5lxJD +9eU4wO01UBZQQ0PjoITcdtKpP/d3ydfR0LFx2RCPPAeEjoiNvLhGQ3uZY3vX +kaawNxhattPwzV4D4WbSp9d99Ph7m4Z32u+p/CTNeBUbX3+fhnteKIWpKHDg +4m5KechjGkYcmvvhSlpzcW2XygsazhovPpVCmnPSZmTgFQ2tNSZiOaSN1L+J +5g/Q0I2enNdHeq2TvCffNxpSj4QEKFM5cOdbQ3zrEA15nhpRLUlvinUsjxon +25+lifiTfrpiuGv1LxpO5smZxJF2rTgy8nWOHP+9K8X5pN+YMMRKF8j1uPPL +qIr0tkcthm48dGw93CDcRvqrn6unCD8d6aev0B+TDp4Zj78rSEftzbmh/aRN +9gRKfhGlo3x6Ycs30ksHX1/mptBR7kH8/THSL7fZmdPl6djyyez0FOnyvo6X +Zgw66hzt0p0mHeFkFOypSsdMG6n0f+1rH15ZFK1BR43T1Kp/z4tY0vPzdejY +3/E651//AzfyNK4a0NHjm/naf++/YijQ/tSUjonL7Rq7SUezD7mOIR3PLJ+f +bSG9YdXEkKAlHR+XrF9ykbTkue2J6hvpyHRUf3OC9CeZN1JW9nSMyCiPiyDN +ybGvCnSmY1N23Zgz6fjlt9YmudPRMtJVew1pu2Tj3rPedDzPyABh0gp/q3a3 ++tNxynML9Su5PkP7GNz9O+mIzU2Pm0k3jZ4smAuh482LdU7ppFN3LNOiRJDj +97e+4kHa5X1ch/4BOootxPX+iw8l90m3zYfoyLvV/fUIGT9tG/sPZ6SS388r +4RdJOqPTQfpKOh0XaXEP6ZH2ZN2u7sqmY9ZDwnaUjNdZrZpXPKfJ8a+ILPck +rSuasDqGoKPKk7arK8h45zo21VlQT/an93pVA5kf3dy73Oub6ajJJxq/hXTQ +lGPy+C1yPRfL9uSS+VbWq9S3/TUd+2ZCbb6Q+brXoTAs+S0dfwo6j+0ljfcE +ec9/IuOh81vsHzK/+5t/aQ+M0DHt1t6tvKQlz9xNceJmoJFz0aYpsl58kmLJ +7V3KwAGH/X47SXMyCeKEIANXfr+1+zVZX+wSi97ck2KgYKaCby1Zf1IDgnXN +NRiYEjH1HoXJ8amLDGg6M1BGn7LhPln/fp2WSdBzZ6DfO4VcUdKTwspKxt4M +9JbERa5LyfyfMN61bicDz7/Tsugh6+uHZr9f7rEMvDi+K+kqNwfubWwQSi1n +YJpJz8T3PwTcuX6TSL/EQPuAuhfcpDtXP3DKqWGguNSOQRmyft8Qe19U0shA +KOhhI1nfOX0CqlcfMnAGC57smiKgKMgLPkwxcGFTwTaTYQLy+3d8+DrHwHCJ +M3OqQwTk2oUnDy8wMLDsaY/oDwIy9FLvz/Ar4pnanYHvvhGQ+JtwFVZQxI1z +0lPunwgIOrYkjGmpiEE033fdrwlgXr5SevKkIsqOb7BqukVAH+3ymf9OKaLN +aAw9qJPcv05WlkyeUcSKSmqzNLmfNiRUFDtWKqLdq3qDsDZy/3YrLRBqUUTW +NZWgxc0ErFqSm5nyXhGlwy0vtdQQIOkdE79PQwm7RIROn8gn4OrzA3HKOkpY +xDhbMJdHgJP1/kPP9ZUwXNRgn18uAdn6kQd1QQlb5o73aWURILg8dP+IgxKO +RYgFXzlKAE/jtrDAKHJr6C7MsIglYFzU2selXQk/0x8affchoDeY8XjXHdJ/ +NbMHvQhouz0HcQ+U8JXmg7zvngRkRl+mXnyphOOyxmffuRGg/WH529lB8v5c +vVGOPQEhxKOtp8WUMSm44tR3IGDQztnjk78yMvYufL4oR8Cn4z4ue/lUMPl3 +aOH1R2wIGdRgaC9XwQ/Nlzq9H7Jhev3s8LCIChY4Kelz3SfPc9zZyTtlVFCg +YP+g6W02aB/oqPPRVMHpfep3SlrYEBugIma3WQUt2tbZiFWS5zuzoUfqZ1SQ +dyj3ams8G6xGo6w+G6hi69yV2O3qbBjyWxpeF7cSnW5V8n28UU3+X0gtPtK+ +CtUfr/mmtaQKRB+qZLBH1bB8R54cn+1lkEutsTcw0MCkv7MjQV6VUKBuLCK2 +XRMHu1vFBVMuwD0Zc/2JLC3EmtAh66vlYCLXnrn65Woc7nYrzmg/D0Lc5yJ8 +E7Vx/sf3VsM/Z0EhgcrcoqKDM6Y9RQn0UuBX9qx3vKODrQSje/R+MWixpGui +turiu74fkcKthbB3QLTDmksPdUJ9PQYvnITRiePOVgV6qM19LqjwTw6sX327 +yEpzDXbdZra/z8mCGxOmv6e71+DG4mVxb/wzIERD9/WTAH0UPjnrILvtKLBG +/J9v4TfA2GQHsbrYFPhPiWIjeM4AW3gPHu63OAwr44/ubzc0xMPqfnK5++JB +LcC4Vfm1IeZTrH9mFMZAwI0dSXV7jNBRvW+/1fooaC197j8uYYwWL4JZxqxw +mLy4ML26wRgltKWffmwIBT/ly/xFNiaYwG9VrOa2C8bVcgw4Yya4VV7C3XhX +AFwr+/1+KtUUIVFA3DvdFwwsIqatj5nizbHa4KQ4X7j6fmh5abopuj9rtqrd +4wschQFD62xTrPz6NUbTxReuFLSll5wyxaQLslo5VF8oPZ5svL7aFBcJ0Eyp +dT6QFiGcVfDMFFk50TfU73qD+zpFNFVgYjSf1ExniyfMP18q1EFjokhKnHXq +eU8oDRjps1Zkok4Yj5D3UU/4ktIY5b6SidrdOxos3Txhb5ddzQFdJrZVD7Dm +Jz3gqO1BhWuWTKw03nrwj44HNLm9+LMmlIkflm75ONq4BWR3H2nUamOicucb +K7kFF8hYCNQ/1s5EF8Zmk5s/XGBxtiXxtZOJtqolWRG9LjBYv6SytIuJ/UFC +DrwcF2jiSioQfcbE+q/1Mi8CXMA9Nz7q12cm3tR/SaM8doaC5gP6N5ax8JDr +M67paieQEAgmbFxZaN8tMMPMdYQyi9josS0svKPl2eCR6Ai6sRkWOZ4sPJVX +fzstzBFsx9gven1ZeO2ETaWYjSOkvJya9QtmoWPoDat+XkeYORe3NjqBhe9N +aneYxTrAa9OcZxWXWRhjqPFqKMIedkSWFVtVk44NKH7nbw+/qq8GDLFZyLdr +3u2Dkz2IMnqndepZyBs2nSusbw8bl8rLXW9joaG4zhh1yA5anlf4P3vBwkj+ +97/NpmzBWuia5r5eFoavq5R889IWetd3/aL0sVB6zcOBnGu2MNn0I9XrHemT +W1U3H7QFzbPaVd8HWfi3KmO30BJbaHltvu/4MAvN0p/dPvTVBqzFN8PqMRb2 +/Mezmv+eDQQeiXwSMcXC06vu9AedsIHJtpQiqRkWKjuum7fYawOJc/l+TXMs +lLA63K/vbAMiayo1ts6zMP2oRJC5kQ2U7G6aWlhgYUlrfnagrA38D9BrjhY= + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0708002566330286}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0708002566330286}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13c8Vl8YAHBFRBmZr/kOq6yM7Pf1PNJPUWZWyMhoEAopkhGiIjMjSYVS +4b0vkVGEhoZ2lGgvmSGj5Hf7636+n3Pvufec8zzPOZe+LdQxYDEXF5fIIi6u +f9dfA12dSsfKzAwvuPVZDJqbPS+hHDDvTYRALwF1nlAaoMSjbZTebKg4En5g +IEQb9tlf6uHuPQdZaUtkb4UgrBiRyp7t4cCkT6xzSYg9vG2xDZ3saYfW7cQp +RogPWCoN9o/3PAXt0vuHLYLDYLbHMG+s5wP4UCQpT/zjocPiQtmTcxOQkVTU +9v1nJsi9bfyyTWMeeNrz7ecHCkA82PsSnwU3+pSfmSpSLoVsHctmW+elWMO9 +IjRq6Dy8KtBuGxcRxM1v6qK61S7AsbK4R4ulV2D07V2VcU6XQCr3Y1rOaTHc +sCfUrVygCijqV5NmKsTQQ1nH/Y9YFci0p8RtZYuhAl9cso18FSiMrYpU7RDD +4ZV8TgOrq0B5U5hP8zcxZCVqsBudqkCPZ97go544royyCnQ5XQV2EZKfdO+J +4wzfqClNrRqOOFmZPf0lgVmdwkmtOjUgU9cts3iRJIa6Jq1Ya1ID1WJO0zrL +JPHZ6a7o62tr4OVTL3YWVRKF66G/ZHMNKDlEMBw2SKL2fHvXssgaaLc5w/u4 +UBI5f8zT0utrYN5yqvshUwpNU5ddk5BhQ2ZF9OV5Sylcc7F07qM8G5R4uVI1 +HaQwPC3nTDWdDZtuCZinB0jhl8loYeNVbCiyoNVuypDC3N6pOIYRG4xwY/79 +t1JoIae8e70zG8KNz3p3JVKw+reHQO9xNliXCk1uPE5B/7eBa2dPsIHBdzC1 +O4+CMXJOtlI5bHj83IV4dpGCgv4x760K2aAVtpx7oJuCafLXf6aWs+FbRVTF +TxlpVNCx5YRcZ4OnuO2wbK00/o1K8+sdZINeTHNCSYs0Tsf3/c0ZZoPAh5WS +9NvSuHuKunvTGBsaa7hB5ZU0anWdb6+dYoPkxsZM7QVp3Clwx9GTi4DHCUpr +/tsog5JzquISEgSsG52LDvkog4Sabq0yk4ADG3LVbg7JoIT1hFiYGQHVZzVf +i/2SwWzRlbsakACKk49x41JZVI1MmGb+R8DQtVvT3FqyGDmrX6RoS0BOYmZE +4X5ZzPHIVPL2JuCDhEpIp6AchulEns2MI0AqtFVeSkoOz70R4I9OIGDTXbeH +O2lyyC/nFexzmID66GMawnpy6LUTVJWOEHD07djgFjc53J2oFnkkgwDdyubt +o+fkUC9hffX1YgISmA6+MkbyuKlDuGKwnoANXiU/DdfKY3igqU/eNQKE4n8c +dt4kjzNpFQXMJgKKO5IrMn3kcafXspT46wRcs276wZsmj4yoee+BDgLG3BT3 +TbySx4zUzJifjwhoiA7jW/FJHscmPR0DnhBwqPh6gdaIPNaHrqx5/pSA5e9c +m3cuVsDnyU//XHxBgOr241zv1BTQXtxqWrWPAK/IqaMPYhQwqG/0Q9xnApTz +18oNJivg+7v73Ju//Ju/E1V8mQp41fWxz8RXAqL/rHq8tkwBNfWc5bYMEpB3 +2Eui8YECDms6e/8eIeBB1p0z5fJUHFcSKjk1Tc53rbhOhyoVrdWCN5bOEOD+ +wrf9nQ4V25QOZp2dJeAb5c8nWUsqHsq3GSz8TQB3qbZadggVTxlrv/ddIMCk +urDuUCsV71oui7Hj5cC6nu75kbtUhKyGTSJ8HLDl4lnv/ZSKQ2+MdbpJ+zmG +vILPVNwvKapvzs8Byxh6XPwSGjZyIo14lnPgvnDLeSMBGjpH6hBVpO3LXO6O +CdGwLO+AuZMgBzweHlvhS6HhxCLK5QIhDoRRf503V6fhgeK82r8iHJiqzbw7 +u5qGP9c1zGau4ED0BvVhYg0Ntxlbe9JEOZC8x8eAYUZDJmPdAQMxDhR13Lu7 +2IGGy9O1lVCCA1S3gOEmZ7J/tXjvZtJlQwsrwt1pGHhjc4ueJAdqJPQ9PvrR +0CxOvl9WigOd288Md+yjofyJhIddFA5Y/TEWPRhDQylxXVUtaQ50Zz43WBNP +w5PSFRdOkH7VyB9flkbD+xnJVGsZDnjZlpV5ZtBw9yorynnSnz6YdYnn0LCk +MN5klvTIsgjR5GIaMp4s/lssy4HwUiFD1lkaLuhfLh0kPbOm0mOqnIZ5lxJD +9eU4wO01UBZQQ0PjoITcdtKpP/d3ydfR0LFx2RCPPAeEjoiNvLhGQ3uZY3vX +kaawNxhattPwzV4D4WbSp9d99Ph7m4Z32u+p/CTNeBUbX3+fhnteKIWpKHDg +4m5KechjGkYcmvvhSlpzcW2XygsazhovPpVCmnPSZmTgFQ2tNSZiOaSN1L+J +5g/Q0I2enNdHeq2TvCffNxpSj4QEKFM5cOdbQ3zrEA15nhpRLUlvinUsjxon +25+lifiTfrpiuGv1LxpO5smZxJF2rTgy8nWOHP+9K8X5pN+YMMRKF8j1uPPL +qIr0tkcthm48dGw93CDcRvqrn6unCD8d6aev0B+TDp4Zj78rSEftzbmh/aRN +9gRKfhGlo3x6Ycs30ksHX1/mptBR7kH8/THSL7fZmdPl6djyyez0FOnyvo6X +Zgw66hzt0p0mHeFkFOypSsdMG6n0f+1rH15ZFK1BR43T1Kp/z4tY0vPzdejY +3/E651//AzfyNK4a0NHjm/naf++/YijQ/tSUjonL7Rq7SUezD7mOIR3PLJ+f +bSG9YdXEkKAlHR+XrF9ykbTkue2J6hvpyHRUf3OC9CeZN1JW9nSMyCiPiyDN +ybGvCnSmY1N23Zgz6fjlt9YmudPRMtJVew1pu2Tj3rPedDzPyABh0gp/q3a3 ++tNxynML9Su5PkP7GNz9O+mIzU2Pm0k3jZ4smAuh482LdU7ppFN3LNOiRJDj +97e+4kHa5X1ch/4BOootxPX+iw8l90m3zYfoyLvV/fUIGT9tG/sPZ6SS388r +4RdJOqPTQfpKOh0XaXEP6ZH2ZN2u7sqmY9ZDwnaUjNdZrZpXPKfJ8a+ILPck +rSuasDqGoKPKk7arK8h45zo21VlQT/an93pVA5kf3dy73Oub6ajJJxq/hXTQ +lGPy+C1yPRfL9uSS+VbWq9S3/TUd+2ZCbb6Q+brXoTAs+S0dfwo6j+0ljfcE +ec9/IuOh81vsHzK/+5t/aQ+M0DHt1t6tvKQlz9xNceJmoJFz0aYpsl58kmLJ +7V3KwAGH/X47SXMyCeKEIANXfr+1+zVZX+wSi97ck2KgYKaCby1Zf1IDgnXN +NRiYEjH1HoXJ8amLDGg6M1BGn7LhPln/fp2WSdBzZ6DfO4VcUdKTwspKxt4M +9JbERa5LyfyfMN61bicDz7/Tsugh6+uHZr9f7rEMvDi+K+kqNwfubWwQSi1n +YJpJz8T3PwTcuX6TSL/EQPuAuhfcpDtXP3DKqWGguNSOQRmyft8Qe19U0shA +KOhhI1nfOX0CqlcfMnAGC57smiKgKMgLPkwxcGFTwTaTYQLy+3d8+DrHwHCJ +M3OqQwTk2oUnDy8wMLDsaY/oDwIy9FLvz/Ar4pnanYHvvhGQ+JtwFVZQxI1z +0lPunwgIOrYkjGmpiEE033fdrwlgXr5SevKkIsqOb7BqukVAH+3ymf9OKaLN +aAw9qJPcv05WlkyeUcSKSmqzNLmfNiRUFDtWKqLdq3qDsDZy/3YrLRBqUUTW +NZWgxc0ErFqSm5nyXhGlwy0vtdQQIOkdE79PQwm7RIROn8gn4OrzA3HKOkpY +xDhbMJdHgJP1/kPP9ZUwXNRgn18uAdn6kQd1QQlb5o73aWURILg8dP+IgxKO +RYgFXzlKAE/jtrDAKHJr6C7MsIglYFzU2selXQk/0x8affchoDeY8XjXHdJ/ +NbMHvQhouz0HcQ+U8JXmg7zvngRkRl+mXnyphOOyxmffuRGg/WH529lB8v5c +vVGOPQEhxKOtp8WUMSm44tR3IGDQztnjk78yMvYufL4oR8Cn4z4ue/lUMPl3 +aOH1R2wIGdRgaC9XwQ/Nlzq9H7Jhev3s8LCIChY4Kelz3SfPc9zZyTtlVFCg +YP+g6W02aB/oqPPRVMHpfep3SlrYEBugIma3WQUt2tbZiFWS5zuzoUfqZ1SQ +dyj3ams8G6xGo6w+G6hi69yV2O3qbBjyWxpeF7cSnW5V8n28UU3+X0gtPtK+ +CtUfr/mmtaQKRB+qZLBH1bB8R54cn+1lkEutsTcw0MCkv7MjQV6VUKBuLCK2 +XRMHu1vFBVMuwD0Zc/2JLC3EmtAh66vlYCLXnrn65Woc7nYrzmg/D0Lc5yJ8 +E7Vx/sf3VsM/Z0EhgcrcoqKDM6Y9RQn0UuBX9qx3vKODrQSje/R+MWixpGui +turiu74fkcKthbB3QLTDmksPdUJ9PQYvnITRiePOVgV6qM19LqjwTw6sX327 +yEpzDXbdZra/z8mCGxOmv6e71+DG4mVxb/wzIERD9/WTAH0UPjnrILvtKLBG +/J9v4TfA2GQHsbrYFPhPiWIjeM4AW3gPHu63OAwr44/ubzc0xMPqfnK5++JB +LcC4Vfm1IeZTrH9mFMZAwI0dSXV7jNBRvW+/1fooaC197j8uYYwWL4JZxqxw +mLy4ML26wRgltKWffmwIBT/ly/xFNiaYwG9VrOa2C8bVcgw4Yya4VV7C3XhX +AFwr+/1+KtUUIVFA3DvdFwwsIqatj5nizbHa4KQ4X7j6fmh5abopuj9rtqrd +4wschQFD62xTrPz6NUbTxReuFLSll5wyxaQLslo5VF8oPZ5svL7aFBcJ0Eyp +dT6QFiGcVfDMFFk50TfU73qD+zpFNFVgYjSf1ExniyfMP18q1EFjokhKnHXq +eU8oDRjps1Zkok4Yj5D3UU/4ktIY5b6SidrdOxos3Txhb5ddzQFdJrZVD7Dm +Jz3gqO1BhWuWTKw03nrwj44HNLm9+LMmlIkflm75ONq4BWR3H2nUamOicucb +K7kFF8hYCNQ/1s5EF8Zmk5s/XGBxtiXxtZOJtqolWRG9LjBYv6SytIuJ/UFC +DrwcF2jiSioQfcbE+q/1Mi8CXMA9Nz7q12cm3tR/SaM8doaC5gP6N5ax8JDr +M67paieQEAgmbFxZaN8tMMPMdYQyi9josS0svKPl2eCR6Ai6sRkWOZ4sPJVX +fzstzBFsx9gven1ZeO2ETaWYjSOkvJya9QtmoWPoDat+XkeYORe3NjqBhe9N +aneYxTrAa9OcZxWXWRhjqPFqKMIedkSWFVtVk44NKH7nbw+/qq8GDLFZyLdr +3u2Dkz2IMnqndepZyBs2nSusbw8bl8rLXW9joaG4zhh1yA5anlf4P3vBwkj+ +97/NpmzBWuia5r5eFoavq5R889IWetd3/aL0sVB6zcOBnGu2MNn0I9XrHemT +W1U3H7QFzbPaVd8HWfi3KmO30BJbaHltvu/4MAvN0p/dPvTVBqzFN8PqMRb2 +/Mezmv+eDQQeiXwSMcXC06vu9AedsIHJtpQiqRkWKjuum7fYawOJc/l+TXMs +lLA63K/vbAMiayo1ts6zMP2oRJC5kQ2U7G6aWlhgYUlrfnagrA38D9BrjhY= + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.0708002566330286}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.0708002566330286}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.994387045331094*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"00a607ce-8a33-48a1-a344-ae44aca11346"] +}, Open ]], Cell[CellGroupData[{ @@ -7751,14 +7856,12 @@ Cell[BoxData[ FractionBox[ SqrtBox[ RowBox[{"Cw", "*", "\[Pi]"}]], "2"]}]], "Input", - CellChangeTimes->{ - 3.9918501819649506`*^9},ExpressionUUID->"1ec1e156-ca0f-9240-857c-\ -ac86e3a0e3fd"], + CellChangeTimes->{3.9918501819649506`*^9}, + CellLabel->"In[98]:=",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[BoxData["10.362747935330784`"], "Output", - CellChangeTimes->{3.9913453868532257`*^9}, - CellLabel-> - "Out[420]=",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[BoxData["10.365897482220008`"], "Output", + CellChangeTimes->{3.9913453868532257`*^9, 3.9943870453695297`*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"0a7238ce-7351-49d9-ad5b-1833aa4fb92b"] }, Open ]], Cell[CellGroupData[{ @@ -7814,171 +7917,174 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850184857586*^9},ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-\ -da901e49f6f1"], + CellChangeTimes->{3.991850184857586*^9}, + CellLabel->"In[99]:=",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.792597307294861`*^-262\\\", \ -\\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 449, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387062414*^9}, - CellLabel-> - "During evaluation of \ -In[421]:=",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"5.19148428074309`*^-272\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.1332718134621673`*^-252\\\", \ \\\"118567477908254066625631346005619254518349824000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 421, 450, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387076412*^9}, + 2, 99, 13, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.99438704550309*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], +In[99]:=",ExpressionUUID->"17bfc6c1-d346-4d6a-b43a-4ad9b60187ef"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.652750330712858`*^-282\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.284612253961134`*^-262\\\", \ \\\"92956902680071188234494975268405495542386262016000000000000\\\"]\\) is \ too small to represent as a normalized machine number; precision may be lost.\ -\"", 2, 421, 451, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345387088339*^9}, +\"", 2, 99, 14, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994387045512031*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], +In[99]:=",ExpressionUUID->"c276cd8b-6ec0-4aa1-a863-e0cf06c403c8"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.4642920032925083`*^-271\\\", \ +\\\"78176755153939869305210274200729021751146846355456000000000000\\\"]\\) is \ +too small to represent as a normalized machine number; precision may be lost.\ +\"", 2, 99, 15, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994387045519754*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"6de25a73-e326-43c1-a55a-d4cc2e4df4ff"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 421, 452, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913453870973415`*^9}, +during this calculation.\"", 2, 99, 16, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345387062414*^9, 3.994387045526781*^9}, CellLabel-> "During evaluation of \ -In[421]:=",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], +In[99]:=",ExpressionUUID->"140ef0ad-eccc-442c-baa7-05fb6b476f35"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0Ve0XB3ClIqLMszuYylSGcLnX3jJlKiRFMmRMSIgiGcoQ8YqKvCWE +kuneU8mcTEVpQIhSbxolQ2Vo9Du/v876rHPWOc969t7fZx3avoOOvsu5uLg0 +l3Fx/f86P9bdoZheYjw8uGQTYGBqPFAgedRkOBHcDRirUopogGKP90kOZ0PK +GbtQ9yItiLS/PsQ9XAyr92Re2VJkAkJTEtk/hggovWlXK17kAK+ath38PtQG +iX4fy1ILvcBCceLl7FAfGP/h8vUqOAQ/hvTPzQy9gealmH2PzyVAu+nVkqfF +3yAqVloxUy0bZF/Vv9+n/gfMJQ2P/nslH0SDPK7zmHJjQvvxyFUWRZCtZdG4 +bScvqmrmqHBZlsLzvE2ts+sE0OjRewVXzjVIL4l7vFxKCOtef6Zv+1sB1rr7 +hcUUhJCSMuDnyVcJvB2OO1U0hNDV/9iZA+KVcHJcadTGRAhDdipmB2lWwjH6 +w/dn9wvhvsbN3FLulRBSKPlXuUEIO5sN7ko1VYLDRY66zR5h/DW+X6syrAok +zo6fyrkkgkU8D+evd1eDpNqtk4tlInjPQyRIv78apNuS4/ayRZDvvxnb5hfV +ID+z4bBKO/l8bYXtrelqULIN9Wz8KIILZvYKzmI1oLPij964jijeNA7XdPWo +ge0R4m+1e0RxNJ4JPlM1YM//cSy3nzTf7ArZhRpwLK5//vuFKAoMnRPtXaoB +5yduj7umRfEdwZ+SwcuGvepXGlzFxPBq1NX1N6TYcODtxjOJnmJ4ozOwys2I +DSlOVsZ982KYxaPDrXyMDdI3H0kvXyaOPEYD5wPj2VAt4rSgxS+O46zVqhUn +2TDY584+QxHHoZdFdtQMNig6RNAdtorjfhWBuJFLbGizu7zqyQVxNC1Ywcxs +YcMfi7lHvUwJpHy482vmNxuyyqIr/lhIYCA0vLrJxQHFVVypGg4SGLVsoj5i +BQdsO/lMMnwlcOiniv1Hfg7km1Jv2GZK4DvbDUsF0hwwQJvcB68kcESy3cxa +nwPhjCKP7kRJ1FDcU5kbzAHrQsHvNqclUbfDubM4lAN0nmOpj85J4lnT687X +wznwZMCZ039NEv9mub2pPsoBzdA13GOPJNHgsFVBRhIHPpZFlX2VlsK3yZPV +RRc54Ca67YvMDSmcTGGWKt7ngE5MY0JBkxTyKY+9bunhAN+b9eK0LtKv1ufu +7OVAfQ03KD+XwuU+9hFH+jggblOftWlJCtnmFnM5L8jvJyjqmttIY8DLMAP6 +DAfMpn9Gh4xL4+qJQp1LogQc3XpW9e6kNO6LP23eJE5AdZHGiMi8NM7IPPk1 +JEmApJMno55XBkdlw51XyhEwWde5wK0pgy0pEw/0lQjIScyKuHBEBs3nFxZ/ +6RJwf3SD4mSCDNqf6gx7p0fAb932fuN0GQzqrjr3wIAAvw9z2m8vyeBwKW04 +g0mAoe2eWc12GSwREnOZMCXgjZhySIeALKp8tc/ndiRA4uAdOQkJWWxxy3l8 +ewcBtvd39+6nymLjdPWNgJ0E1Eanq6/VkcVZfu601t0EpL2amXDZLYtXVLZH +b/UgQLu80X+6WBYzwyW66g8QkMB08JI2kMOloCmqUiIBW90LvupvkcNdg5+X +0k8QIBj/+cROWzncvkGbd/okARfbk8qyPOXQeUAntzyFgDrrhs+rTsnhdNKp +uzOnCZjZrRD57bkc6uxNfXXvPAG3o0N5hN7K4dz3liuzuQQcv9icpzklh4MS +BhclLhCw5vWuxv3L5dE1aVR9978EqPif5nqtKo+nyjP+q7hMgPvhubSHMfLI +t6LbpOAqAUq5W2QnkuTRQ3BVSfq1/+//P1U8WfIY7HXb4nA5AdG/NzzZUiKP +ybOV9qwKAs6dcBerfyiPLrcvZxRWE+BWWlE2OCiPhh3afKE1BNDvLep/fy2P +a8529BqxCWDz5bhunJPHqnbQuM8h4OGZe5dL5Sj4tmiH782bZH1viGq1q1Cw +cjJHy+8WAa7PvNpea1GQsLtqI1pLwEfJ329lLCioIXkvyPc2AdyFm1SzQyg4 +yboWM1pPQM/d2MaaIxRUrdd7fLCBgKzxHtveRAoKcd+K4mokQF7F9yBvLgV3 +pCs+EG8i+6H6ws3jdygY/ybpnEQLAWZDj/5M3aegtuHhx8mkt3GtsPToo+CX +Fo2xr6S9HUOewzsKDsrwx969Q0BIzBU6e4qCxX4NgoqtBBwpGT5AXaRgdpvl +kROkLWJocfErqXg7TXrQ4C4BD9Y2XTHgo6Ln5MyDTNL2Jc73ZwSpOLf13sX/ +SO/pTRfykqRiWnNBX2wbAa+9lPWk5KgYztRn3CPtN9/q+pRGRb4Tf2MF2gkI +pcxfMVGjYtdv+9Is0nM3su7/2EjFN/NHT/WSjt6q9oWjS0U3c4HtPB0EcL3s +FApkUNG2c3SeRTrpkKce3ZiKy+RuJxwizbfql+vIFiomNh6aKSKdlX8uLtuS +ij+Hxkwfk85v77m/3IGKw7a0i9ROAii7fb807KTi9oXCYjPSJZNLQuGuVKxr +UznjS1o1IV9PzYOKV7tOB5wgXSO2ec+4NxVDX13dUEBa9/rjuH8DqFhd5fDs +FukG48CSHcFUrDnnHdRDGvpXdPOHUfFpy+3pUdId/pe/tEdSUURkg+cEaavf +DOFjMVT0Mc5pmSP9KGtATzeeiprVffx/STspHdwzeZKKVVkdW7m7CHhevzq+ +5BQVIwcsIleSdt9WUuKWScVnKgbnVpB++8a4WzSHisaLUWVcpPdHPf/yMJeK +3YfeX/9Bvm+KP0I46SIVU477XJkmHV4oqM8qIuvR1Z/1hvSibvmeuVIqdlaK +R/SRPt5tGl91nYrxO9Ztu0Oa232sxLeGis3nSyjlpFO/HumWu0nFzYJ1n/4h +LZgiMvWsjooqazZVhZPOkakWzmwm9//i10An0pLsrfoWbVQMSH6voE36ktn4 +nr9dVJSx/Da8hjT9eWx87QMqCogvS39L1utasGRpyBOyv/5bNKwnrbH8Rrfy +Myrm2Xd8SiNNnLebGntOxaAWuzwX0gZqH4Vzx8h+YsVbKpHe4iTnxvORilvM +sypukP107+Pt+DuTVByKttwXSdo21rE0apa0zB45PdK7ylKmPvwk18NxLKkk ++zVocTb+vgANX6TdWxtJ9rfhIT/x98I0ZBZTm6VI806MVHBL0tDm/fqv9eS8 +lI62DxrTyeenFRanyfkaazmnfkuPhi81uM9rk/NXqc/X1mdEQ29dwSsNzWR/ +s4/vmkEaHk3NNwHS4sX+iWo2NJwq0TIwJud7exJjuMiDhhUGfpoiZB7I/60K +vuNDw8AHCRNxZF5MRtK5X+6nYYqu2pZPdWQ9Avg1JSNoqNpm3M0h86XV5uWJ +zFQa/ohlukqTeaQtnLAxhkNDqy885dZkvnGlz3Xk1ZLr25Rcl0Dm3yPuQNfa +Rhp+Dtlx5FYVAQfmHJNmO2m40LBeUKSSnI9hxVH/ERoW3xSoKyPzVfzy/WQn +bjrK5b7R0ioi+0+CJRvGS0fDFMoHnUKyPlkczj8CdGSV4j4dMq+3J+a/6JGg +o5oju2b9JXK9vkHaJup0TM+Y753MI+CH2roxjZ10LOui2L/4h4D5S9IJOq50 +pIu9KuJkEvB9rZIiw4OOHWILkycyyH7+xgg020/H2xPZEZR08jxs9J53jaWj +woD1Qe1kMk9tbgumltJR84GXaXcMOf8H3OHNHB1NfXTXdPgQkPsy4M2Hn3T8 ++slrk5E3AWe3hyd9WaJjQYVKdI0XAZk6qQ8WVytgU5DayX/cCUj8xdm1Vl4B +vRKXLmiQ5+eB9JWhTAsFdE//LTBuTQCzorLw/HkFHHcoNWJpEjBKrbhs/q8C +Xtq13OeYOlnv8+UF3y8rYOKnEEa9Knn+JZRddCxXQEdLyxk1FbI+uwvzBJsU +8MPrxpo5CgEbVp7NSv5PASWXLUuSESL32yMmPlJdEYOcP4nUz3JgVtja07lN +EX/v1uZPqOTAcBD9SeA9RdT61GfHfZ0DrV0/Ie6hIpouLdM+cZUDWdEVlGuD +5H2PlHcxxRzY9GbNqx8TisjkvazskMeBEM7jvZdElHCgfWfs6RMcmNi+c89b +HyXcvvH8Z4fdHHh72tM5jEcZbbJHXoX/YoPVdJTVOz0VrBRONa1lsGHSmzf8 +Ztx6nJ3kvWJSUE3+X0gsT2nbgGKd+ZLBlZUg3KucyZ5WxfWW5Wq5nddBNrXG +Xk9PHdlaw8kO165BnhpjnYi/Bsb6M1+cqSiDHmmTzd/OaOIa90S7Xc0lYCjb +lrVxcCPqB+7tqeEUgyB3cYRX4iaUMXihUDBSCPIJFKaLshb2bD10RPnTJVit +5FbreE8Lfx7lunoxIB80WVI1UXu18c+V1Z8M9uZC2JhwuzWXDjYvrzyZ4XAW +pr+d3mmVp4MmYjedntWdAcuNXflWGrq4SXpkb/+TTGj5ZvRr4ZEulm4SdrW3 +S4MQde2Rp76b8WuIHo9YRjKwpnwGXFbr4bn+qsMS84lgrihpJ1Csh/5Zp7YY +8cTD+vi0I236+rj6qHCtDm8MqPoy7iiN6KPIiAPbY0ck+LYEnLx5yAA/uX9J +zM4Kg6ngiSjzCAOcCjmx/2RCGByRCzowGGmA63xn0uLDwiDt2EHHxRgDFC5T +Csx1CgO2YSSVmWyAwzRuAZAKg9+1J5ra8w3QUUM87lDJIciuKfje126Afw/J +CWFbKNwpHPCZFWPgQMKA6kvdEHhtS/OIlGRgIeH8dqVsCHD9CHb5Jc1Aq9e0 +OeAOgS0OPNtWUhnY/VNm8cPTYOhaZqgvpcpALv/ek6tCg+HhvsurTYwZeJ/b +pvtwTRCMKAZWZ/kx8LzI8qmXhgfg+7WlhY23GVhlM+IynhAA750tCk/VM1A6 +YtoqPiQAhldkbB1vJL8nUuCjuicAGj2lL5xvZWDRBPffUt0ASJTcbPinm4GM +4mVLjI/+sC418FjPCwamxSRveuzgD+r+z7h8lxviOw/34OOafuCtVLE6384Q +T/g1V0Wt8YHoTvdAZXtDfOFrEtfz0xuyfIUfEI6GWDf5pE/1kzc0lR49/WCX +ITr3wiuRLm8QVd669o+XIb6/wLqWHO8NXcrvRD0jDVE31X/0w8I+UF1PoSpf +NsR6/gv+njNeMKuao0fMGGJ2XMGf0FWeMPwQzUW+GaIWZ2KybtYDWkOmdkTM +GWKf0RhXyaAHZBJWh/R+GqJAs7hHbaEHqBpyVTZwG2H3E6fins0esM8qmNYu +boQS1XfvlHm7w4C/5ZoBphEeH1pUH+l1g7qSX//NpRphV+VTaslzF9AzjViw +TjdCPCOulNfuArf+m1xTmGGEneH8zRerXICQH9O3zjZC0eFHx4cSXKAyrzWj +4F8jzH2ipyqs5gKFp5MYltVGGFf/Qjsnfjecilh7Jq/fCNO+/ZsUq78LXM0U +0EieiSKF3WG9fU7wZ4BXsJ3KxM875jlr7jhBoe/UqLUCE1u5enLcKpzgfXJ9 +lOt6JqaH71unedIJwrq31xzVZmJTe0bpeT0nSNt2TL7OgokZ+lpiEQU7oGH3 +s9+6B5k4ser11NpoR5AJTqnXbGUiNNzZ5O5uD5lLfpvT25jIsilsjd1uD8uz +LTgfOpj4abbMrxztYaJ2ZXlhNxMHBhr7FRXsoYHrZJ5wPxNX5UhnOz/dDq5n +46Pm3zHR4EV979jnbZDXeHRzCz8LnzlpCuhr24EYXxDHbhcLy6/92niWyxpK +TGOjZ1xYuDY6czrrnRVox2aa5rix0O0e83NZjxVsm2E/G/ZiIf+dTnP5c1aQ +PDj3wzuIhezn5o4GalawWBy3JTqBhRtt/Lfyum2FEaOc/rIKFkaP2+hnPraA +gMMlF62qWfjPwWdSp29bwHz1Ld9JNgt3+unfK7xsAcL04QWtWhaGW13QFwy1 +ABteOdnmVhaOG671XRCygKaBMp/+ZyxcSXN6+NXFHKwF6zQih1n4pPNzlZOp +OQxbds9LjrJQ0kFV96G6OXxv+Jzq/pqFR7/eeP9ryQw0ijZVfZpgoetLxvSe +q2bQNGISefoLC00L5rj2nzEDa9EdsHGGhQmhTevTY8zAL+Xw04g5Fp58/Sdc +0N4Mvrcm50sssrBazSPioKEZJP7M9W74ycLg53lm7xTNYJ1uufreP+T+ZRj1 +H1xrBgXBDXNLSyykXBgXXPvTFP4Hf66Z7A== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -7992,130 +8098,130 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k0Ve0XB3ClIqLMszuYylSGcLnX3jJlKiRFMmRMSIgiGcoQ8YqKvCWE +kuneU8mcTEVpQIhSbxolQ2Vo9Du/v876rHPWOc969t7fZx3avoOOvsu5uLg0 +l3Fx/f86P9bdoZheYjw8uGQTYGBqPFAgedRkOBHcDRirUopogGKP90kOZ0PK +GbtQ9yItiLS/PsQ9XAyr92Re2VJkAkJTEtk/hggovWlXK17kAK+ath38PtQG +iX4fy1ILvcBCceLl7FAfGP/h8vUqOAQ/hvTPzQy9gealmH2PzyVAu+nVkqfF +3yAqVloxUy0bZF/Vv9+n/gfMJQ2P/nslH0SDPK7zmHJjQvvxyFUWRZCtZdG4 +bScvqmrmqHBZlsLzvE2ts+sE0OjRewVXzjVIL4l7vFxKCOtef6Zv+1sB1rr7 +hcUUhJCSMuDnyVcJvB2OO1U0hNDV/9iZA+KVcHJcadTGRAhDdipmB2lWwjH6 +w/dn9wvhvsbN3FLulRBSKPlXuUEIO5sN7ko1VYLDRY66zR5h/DW+X6syrAok +zo6fyrkkgkU8D+evd1eDpNqtk4tlInjPQyRIv78apNuS4/ayRZDvvxnb5hfV +ID+z4bBKO/l8bYXtrelqULIN9Wz8KIILZvYKzmI1oLPij964jijeNA7XdPWo +ge0R4m+1e0RxNJ4JPlM1YM//cSy3nzTf7ArZhRpwLK5//vuFKAoMnRPtXaoB +5yduj7umRfEdwZ+SwcuGvepXGlzFxPBq1NX1N6TYcODtxjOJnmJ4ozOwys2I +DSlOVsZ982KYxaPDrXyMDdI3H0kvXyaOPEYD5wPj2VAt4rSgxS+O46zVqhUn +2TDY584+QxHHoZdFdtQMNig6RNAdtorjfhWBuJFLbGizu7zqyQVxNC1Ywcxs +YcMfi7lHvUwJpHy482vmNxuyyqIr/lhIYCA0vLrJxQHFVVypGg4SGLVsoj5i +BQdsO/lMMnwlcOiniv1Hfg7km1Jv2GZK4DvbDUsF0hwwQJvcB68kcESy3cxa +nwPhjCKP7kRJ1FDcU5kbzAHrQsHvNqclUbfDubM4lAN0nmOpj85J4lnT687X +wznwZMCZ039NEv9mub2pPsoBzdA13GOPJNHgsFVBRhIHPpZFlX2VlsK3yZPV +RRc54Ca67YvMDSmcTGGWKt7ngE5MY0JBkxTyKY+9bunhAN+b9eK0LtKv1ufu +7OVAfQ03KD+XwuU+9hFH+jggblOftWlJCtnmFnM5L8jvJyjqmttIY8DLMAP6 +DAfMpn9Gh4xL4+qJQp1LogQc3XpW9e6kNO6LP23eJE5AdZHGiMi8NM7IPPk1 +JEmApJMno55XBkdlw51XyhEwWde5wK0pgy0pEw/0lQjIScyKuHBEBs3nFxZ/ +6RJwf3SD4mSCDNqf6gx7p0fAb932fuN0GQzqrjr3wIAAvw9z2m8vyeBwKW04 +g0mAoe2eWc12GSwREnOZMCXgjZhySIeALKp8tc/ndiRA4uAdOQkJWWxxy3l8 +ewcBtvd39+6nymLjdPWNgJ0E1Eanq6/VkcVZfu601t0EpL2amXDZLYtXVLZH +b/UgQLu80X+6WBYzwyW66g8QkMB08JI2kMOloCmqUiIBW90LvupvkcNdg5+X +0k8QIBj/+cROWzncvkGbd/okARfbk8qyPOXQeUAntzyFgDrrhs+rTsnhdNKp +uzOnCZjZrRD57bkc6uxNfXXvPAG3o0N5hN7K4dz3liuzuQQcv9icpzklh4MS +BhclLhCw5vWuxv3L5dE1aVR9978EqPif5nqtKo+nyjP+q7hMgPvhubSHMfLI +t6LbpOAqAUq5W2QnkuTRQ3BVSfq1/+//P1U8WfIY7HXb4nA5AdG/NzzZUiKP +ybOV9qwKAs6dcBerfyiPLrcvZxRWE+BWWlE2OCiPhh3afKE1BNDvLep/fy2P +a8529BqxCWDz5bhunJPHqnbQuM8h4OGZe5dL5Sj4tmiH782bZH1viGq1q1Cw +cjJHy+8WAa7PvNpea1GQsLtqI1pLwEfJ329lLCioIXkvyPc2AdyFm1SzQyg4 +yboWM1pPQM/d2MaaIxRUrdd7fLCBgKzxHtveRAoKcd+K4mokQF7F9yBvLgV3 +pCs+EG8i+6H6ws3jdygY/ybpnEQLAWZDj/5M3aegtuHhx8mkt3GtsPToo+CX +Fo2xr6S9HUOewzsKDsrwx969Q0BIzBU6e4qCxX4NgoqtBBwpGT5AXaRgdpvl +kROkLWJocfErqXg7TXrQ4C4BD9Y2XTHgo6Ln5MyDTNL2Jc73ZwSpOLf13sX/ +SO/pTRfykqRiWnNBX2wbAa+9lPWk5KgYztRn3CPtN9/q+pRGRb4Tf2MF2gkI +pcxfMVGjYtdv+9Is0nM3su7/2EjFN/NHT/WSjt6q9oWjS0U3c4HtPB0EcL3s +FApkUNG2c3SeRTrpkKce3ZiKy+RuJxwizbfql+vIFiomNh6aKSKdlX8uLtuS +ij+Hxkwfk85v77m/3IGKw7a0i9ROAii7fb807KTi9oXCYjPSJZNLQuGuVKxr +UznjS1o1IV9PzYOKV7tOB5wgXSO2ec+4NxVDX13dUEBa9/rjuH8DqFhd5fDs +FukG48CSHcFUrDnnHdRDGvpXdPOHUfFpy+3pUdId/pe/tEdSUURkg+cEaavf +DOFjMVT0Mc5pmSP9KGtATzeeiprVffx/STspHdwzeZKKVVkdW7m7CHhevzq+ +5BQVIwcsIleSdt9WUuKWScVnKgbnVpB++8a4WzSHisaLUWVcpPdHPf/yMJeK +3YfeX/9Bvm+KP0I46SIVU477XJkmHV4oqM8qIuvR1Z/1hvSibvmeuVIqdlaK +R/SRPt5tGl91nYrxO9Ztu0Oa232sxLeGis3nSyjlpFO/HumWu0nFzYJ1n/4h +LZgiMvWsjooqazZVhZPOkakWzmwm9//i10An0pLsrfoWbVQMSH6voE36ktn4 +nr9dVJSx/Da8hjT9eWx87QMqCogvS39L1utasGRpyBOyv/5bNKwnrbH8Rrfy +Myrm2Xd8SiNNnLebGntOxaAWuzwX0gZqH4Vzx8h+YsVbKpHe4iTnxvORilvM +sypukP107+Pt+DuTVByKttwXSdo21rE0apa0zB45PdK7ylKmPvwk18NxLKkk ++zVocTb+vgANX6TdWxtJ9rfhIT/x98I0ZBZTm6VI806MVHBL0tDm/fqv9eS8 +lI62DxrTyeenFRanyfkaazmnfkuPhi81uM9rk/NXqc/X1mdEQ29dwSsNzWR/ +s4/vmkEaHk3NNwHS4sX+iWo2NJwq0TIwJud7exJjuMiDhhUGfpoiZB7I/60K +vuNDw8AHCRNxZF5MRtK5X+6nYYqu2pZPdWQ9Avg1JSNoqNpm3M0h86XV5uWJ +zFQa/ohlukqTeaQtnLAxhkNDqy885dZkvnGlz3Xk1ZLr25Rcl0Dm3yPuQNfa +Rhp+Dtlx5FYVAQfmHJNmO2m40LBeUKSSnI9hxVH/ERoW3xSoKyPzVfzy/WQn +bjrK5b7R0ioi+0+CJRvGS0fDFMoHnUKyPlkczj8CdGSV4j4dMq+3J+a/6JGg +o5oju2b9JXK9vkHaJup0TM+Y753MI+CH2roxjZ10LOui2L/4h4D5S9IJOq50 +pIu9KuJkEvB9rZIiw4OOHWILkycyyH7+xgg020/H2xPZEZR08jxs9J53jaWj +woD1Qe1kMk9tbgumltJR84GXaXcMOf8H3OHNHB1NfXTXdPgQkPsy4M2Hn3T8 ++slrk5E3AWe3hyd9WaJjQYVKdI0XAZk6qQ8WVytgU5DayX/cCUj8xdm1Vl4B +vRKXLmiQ5+eB9JWhTAsFdE//LTBuTQCzorLw/HkFHHcoNWJpEjBKrbhs/q8C +Xtq13OeYOlnv8+UF3y8rYOKnEEa9Knn+JZRddCxXQEdLyxk1FbI+uwvzBJsU +8MPrxpo5CgEbVp7NSv5PASWXLUuSESL32yMmPlJdEYOcP4nUz3JgVtja07lN +EX/v1uZPqOTAcBD9SeA9RdT61GfHfZ0DrV0/Ie6hIpouLdM+cZUDWdEVlGuD +5H2PlHcxxRzY9GbNqx8TisjkvazskMeBEM7jvZdElHCgfWfs6RMcmNi+c89b +HyXcvvH8Z4fdHHh72tM5jEcZbbJHXoX/YoPVdJTVOz0VrBRONa1lsGHSmzf8 +Ztx6nJ3kvWJSUE3+X0gsT2nbgGKd+ZLBlZUg3KucyZ5WxfWW5Wq5nddBNrXG +Xk9PHdlaw8kO165BnhpjnYi/Bsb6M1+cqSiDHmmTzd/OaOIa90S7Xc0lYCjb +lrVxcCPqB+7tqeEUgyB3cYRX4iaUMXihUDBSCPIJFKaLshb2bD10RPnTJVit +5FbreE8Lfx7lunoxIB80WVI1UXu18c+V1Z8M9uZC2JhwuzWXDjYvrzyZ4XAW +pr+d3mmVp4MmYjedntWdAcuNXflWGrq4SXpkb/+TTGj5ZvRr4ZEulm4SdrW3 +S4MQde2Rp76b8WuIHo9YRjKwpnwGXFbr4bn+qsMS84lgrihpJ1Csh/5Zp7YY +8cTD+vi0I236+rj6qHCtDm8MqPoy7iiN6KPIiAPbY0ck+LYEnLx5yAA/uX9J +zM4Kg6ngiSjzCAOcCjmx/2RCGByRCzowGGmA63xn0uLDwiDt2EHHxRgDFC5T +Csx1CgO2YSSVmWyAwzRuAZAKg9+1J5ra8w3QUUM87lDJIciuKfje126Afw/J +CWFbKNwpHPCZFWPgQMKA6kvdEHhtS/OIlGRgIeH8dqVsCHD9CHb5Jc1Aq9e0 +OeAOgS0OPNtWUhnY/VNm8cPTYOhaZqgvpcpALv/ek6tCg+HhvsurTYwZeJ/b +pvtwTRCMKAZWZ/kx8LzI8qmXhgfg+7WlhY23GVhlM+IynhAA750tCk/VM1A6 +YtoqPiQAhldkbB1vJL8nUuCjuicAGj2lL5xvZWDRBPffUt0ASJTcbPinm4GM +4mVLjI/+sC418FjPCwamxSRveuzgD+r+z7h8lxviOw/34OOafuCtVLE6384Q +T/g1V0Wt8YHoTvdAZXtDfOFrEtfz0xuyfIUfEI6GWDf5pE/1kzc0lR49/WCX +ITr3wiuRLm8QVd669o+XIb6/wLqWHO8NXcrvRD0jDVE31X/0w8I+UF1PoSpf +NsR6/gv+njNeMKuao0fMGGJ2XMGf0FWeMPwQzUW+GaIWZ2KybtYDWkOmdkTM +GWKf0RhXyaAHZBJWh/R+GqJAs7hHbaEHqBpyVTZwG2H3E6fins0esM8qmNYu +boQS1XfvlHm7w4C/5ZoBphEeH1pUH+l1g7qSX//NpRphV+VTaslzF9AzjViw +TjdCPCOulNfuArf+m1xTmGGEneH8zRerXICQH9O3zjZC0eFHx4cSXKAyrzWj +4F8jzH2ipyqs5gKFp5MYltVGGFf/Qjsnfjecilh7Jq/fCNO+/ZsUq78LXM0U +0EieiSKF3WG9fU7wZ4BXsJ3KxM875jlr7jhBoe/UqLUCE1u5enLcKpzgfXJ9 +lOt6JqaH71unedIJwrq31xzVZmJTe0bpeT0nSNt2TL7OgokZ+lpiEQU7oGH3 +s9+6B5k4ser11NpoR5AJTqnXbGUiNNzZ5O5uD5lLfpvT25jIsilsjd1uD8uz +LTgfOpj4abbMrxztYaJ2ZXlhNxMHBhr7FRXsoYHrZJ5wPxNX5UhnOz/dDq5n +46Pm3zHR4EV979jnbZDXeHRzCz8LnzlpCuhr24EYXxDHbhcLy6/92niWyxpK +TGOjZ1xYuDY6czrrnRVox2aa5rix0O0e83NZjxVsm2E/G/ZiIf+dTnP5c1aQ +PDj3wzuIhezn5o4GalawWBy3JTqBhRtt/Lfyum2FEaOc/rIKFkaP2+hnPraA +gMMlF62qWfjPwWdSp29bwHz1Ld9JNgt3+unfK7xsAcL04QWtWhaGW13QFwy1 +ABteOdnmVhaOG671XRCygKaBMp/+ZyxcSXN6+NXFHKwF6zQih1n4pPNzlZOp +OQxbds9LjrJQ0kFV96G6OXxv+Jzq/pqFR7/eeP9ryQw0ijZVfZpgoetLxvSe +q2bQNGISefoLC00L5rj2nzEDa9EdsHGGhQmhTevTY8zAL+Xw04g5Fp58/Sdc +0N4Mvrcm50sssrBazSPioKEZJP7M9W74ycLg53lm7xTNYJ1uufreP+T+ZRj1 +H1xrBgXBDXNLSyykXBgXXPvTFP4Hf66Z7A== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07333406579603427}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -8127,19 +8233,19 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07333406579603427}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8153,129 +8259,129 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Ve8fAHBRKYrsa13HNbMahHu5Ph/ZI0XKKCuJhEqoNIwixVcikbIy -GsS9R8P6ZoWUtMgqiZRvITKa8ju/v87r/Tp/PM/zWc85irv2O/nx8vDw6Czi -4fn/c26g7aFyYqHJmvxDknuMzEw6c2hHTXtiYbntjhMWhYqAEs920XpSwUai -bVCucB1EbLnVzddzDXYaeAstKjQFkQmp1J/dJPC5TIl3FTjCu1qH/TPdjVCa -uqrPssAHLJU/v53qfgnVwuNj9PyD8LPbIH2yewjsyv/CucwYaDK7Xvji2jSk -vzeWd9dJBbl3VR93ac3DgXeeAtevZ4F4kNctfjM+jDRZGXvZOh9S11nWOGxb -hhU50eckbYugN3Nt/dSqlRh/2e3Pyzs3ILEw6hmvtAiOlxXtF+ctBVu9vaIS -SiIYI6BTqCZUCsseOm1T0xbBksyYf3VlSuH0sEq/nakIFmcXpOuvL4XjjPaP -F/eKoCFNK+ejTymE5NH+qlaLoEbTmNZEXSk4XuVq2e0QxUlTg4dJEbdB6uLw -2bRsMZT1cxzJfloGNM27p38Ui2Fc/cpmje4ykGmMj/LgiGGEVJEQd7AM6JOr -w9WaxLCAdq3v5nQZqNgf8K4ZFUOHg0s22EuXg+7ief1hXXE08b404+RbDpvD -JD+sfyyOSmk+DJ9v5bBFcHQg45U4jgkayUr/Lgena1W9f96Io/YzFZ2RRRzY -/nzns5av4nhxoNYtSYADHloF1e4SEiggwHUgZTmw78OaC7HeEugQ+mHLTjYH -zjjbmLyck8CQaWJe5SQHZO50yPAuksTKsXvJgbEcKBNz/r5OUBIPFg/SS+I5 -8PqlJ+eCgiTuUvBlEuc5oOwYxnC0lsRnIjfs+3I50Lgpd+nzy5K45Edy9j/1 -HJi3nO14aiyFHgnurRN/OZBSHFkybymFcVlXz5K8XFBeypOg7SiF6p+kTUOX -csG+WcD0Hz8pzLRdcn5kJReyzIgK+2Qp7Jfk5l+R44Ih2mU8eSeFS9+KRlsw -uXCIme/VFkvDf5Navc/v54JtntCMXRINhfcms7NCucDgP57QkU7Ddp2+C/nh -XHjeuZ376gYNb9OW5Bcd44LOgRV8Ax00zFYRcD91hgujxYeLv8lI41c6h52e -w4Wd4g7jshXS+Om2LIg95oLusZqYnFpprMBi5dvtXBAYUpdUbJHGK+bCp82e -caGqnA9Ue6XxWJw416+TC5J2VSlrF6TxRazTo6gBav0YZT0LOxm0CD8lKviN -C+Zff0WGDMvgdPitM1GSJBy1vqjRMCaDcu/GtXJoJJTla/eJzcmg9NSz8CoZ -EmjO3syqZbK4nj9ueoROwlhl83c+HVl8Nn+iWFKNhLTYlLDLR2QxRMhOq1uf -hEf9q5XHYmRx5gyPTr0hCX/0ml6ZJMqiTJBcTxGLhD2fZtd/yJbFgzJvVP1N -SGDZ75jSaZJFySzeygYLEoYkVEMerpTDj7keP15vJUFqf528lJQcLvtv361z -20iwf+T6dC8hh50nCwWMXEi4F5moJawrh3hQrfuCOwnn3k1+dnOVQz7LshIp -HxLW36zx/3pNDucOlueeDiYhxtjRR8ZQHrsWJbd/PEWCtWfON4ON8nhSbP3S -TXEkCEV/ObXNXh7HpzwDyuNJuNoUV5ziLY+szV9vBJwlodK2+svSs/I4eDpC -+3YyCZOuShHTvfIYnJTx5mQmCfcjD/CLfJDH6FVlX69fJuHk1X8zdSbkUe2b -g/7TLBJWDLrU7OWlo/BOWZ8V2SSo+SfxDGrQsakyzdQjnwTP8Nlz7cfoqFWW -221zkwSVjI1yn+PoeMv+8An9W/+P//nb/Cl0DLQS81UoISHyz+rnGwvpuOn4 -88mRUhLST3lKVLXTcaBUQ9uSQ8LOopLi16/pWFvx6ZM4lwRG6w+DmUE6inV8 -H31HmSOQ5r5mlo6aN0IaAitIaL/Qmlskr4DhRnHDW+9R+a0QX9ekpoD9K/JH -F98nwb3Lp3FwnQJ2pI2ySMqjtD8fZC0VMOfO8ceLqqi5nLdWIzVEAXvm4srC -akh43HCipvyIAh4weLhhWS0JKcOP7Z/GKmCNxWaRTMp0Nb/9yzIU8EzC1KPS -f6l6KLt852Qd5Swt51t1JJh3d8xPPFJAB4fHj2n1JDjwLLbyeqmAPrTrEqcp -+zqF9MKIAnYlrdV0bCAh5FgBgzOhgJWpAd9JykcKe/YRPxTwze65LJFGEiyP -KUZFLyEwja67r5nyE+HaAkMBAodHDl2WaSJhS+H2R5NCBL4x0LkWRHnH00QR -HxqBv+WMLfkfkjDoo6ovLU/gfV714c2U98zVu79QJFBT6oFHOuUDCnMFppoE -Chsxvko2kzBbkfLo5xoC9/5N5t9KOdJac5yrR6COyzBPEmWet80igUwCt1+e -7G+gHHfQW59hQqDZUMLlGcoCS3+7920kUIMWxVJuoeKXlR6VakVgxn/FdVso -ZzU9fsTrSKDpwtujeZQVXP3Gq7cRuCIuk9NEuXBsQeSQO4Eu6v0dw5Q1YrL0 -Nb0I7DhyoounlYRyiQ07hn0JXPXEpVmGst6tZ1FXAghUMTTLXUe52iSwcGsw -ge+uSu+2oAyvFrcJhhLoffmu+HbKD/1zx5siCAxP+cb1pWzzhyl6/BiBEtdL -jUMod6R06utFE9jcVH83nLKzyv4dY6cJFEpeQY+k3Fu1PLrwLIH/BYdEHKPs -6VBYuDOZik9ic91Ryh+GTNrE0wjkfTr1K4zy3sO94+0ZBNr1vlIPpjwhGCYa -d5VAMfFNtrsoH8oTMmDnE8iTC97OlH/o3dwxW0RgtWvyPjPKJ9vMom/fItDn -jVzwGsp8ngOFfuUEzkQ/86NRTvh2pE3+DoE1ronb/1LxEjojNtFVSWD9Wn18 -TzlNtkw0+V8CtVLuKTVQpnGsDSwbCXx4f3pRDuVs8+Edf1sItMjv6j9MmdF7 -IvreEwLf/zUnHSjfCKYVhTwn8ApLM55BWZu3ok21i1ovPNR1mso3eWnTxEAv -gayEJRr/rwdDzVHRjAEq/zzPfydS3ugsv5N/lMC64doCGuXW0fvRdWMEvpqp -OtZH1Z/9Caeiw1NUPu8WuFym7FJ8ZuLTLwLVLH7RhSgH/ZiKfrRSES8ULFna -SdU/6+AeyY+iipiyaP2DCMrLPveV8NEUMXEoeV6CclF/02sThiLaFVdJ2lL9 -NPAgXeuuviKqP1PqSqD6s9RAoPGlkSIuM6P/J0w5knPSZRIVcdKVSE57QILk -Nf9YTTtFXHXEMCWF6u/NccyefC9F1Mt5neFDzQf639vBdbsV8fRLFZen1dR8 -i2Dwvd2riLcMkrkbKCcECOrQwhRR3Omh8Z9KEurt3p5KTlDEXKWS597UfFov -GrPmGJda32HPqrPUvONJnH2YeU8RrW9Ky9WVU/XHF+h+r0YRdY5yu6fKSNg3 -6xQ31ayIbkMDvptuU/3Ro9zv36eIZe0XZt9Q81Yy91G8Mx8Dw1cv0/K6RtWf -FFsudBkDvyG925uaz2QKl3t+JQNX6lVaeeVR54nNevNYioEqSr9POuVQ+/UL -Wm+qxcAI7eggUWre/9RcNaC9jYFBRVLHf6aQMJctE6PrzsAOmGp8ep6EGWEV -ZaYXA5PTn/PmUvfJxDQz0HwvA79mLz5kmETdhzW+c+4nKIsqG1mdoeap3X2h -hCIGcmtCrnQdp/p/nycMzTKwaMcxyzo/EjLeBgx9+sVAo5MXtm/YTcLFzYfi -xhcY2ODEk3RjFwnJuglPfixXwmn+rKB4LxJif3NdhOlK6KhXrUW4UfFJXHLA -2FIJr5W6fG63I8G4pDTv0iUlLB27ckpiDQn9REmuxRUl/OOtXbhVm8r3pZs5 -M7lKOPDm+sHzmtT9F1N81emmEuqGatB41Kn8uOZlCtUqUedh3W0mSFi95GJK -/HslzB4AGBah4u11LDpCSxmTBbQUD1DfJ1Oitt7bG5VxnxRGSd7mQk8Q43lg -qzJy0vZmZ9ziQn3LL4hqV8a7sjQPyRtcSIksUbjxWpm6H2NbVxRwYe3Qinc/ -PyujcJNgxNtMLoRwn3lki6mgxUhbsfBpLnzevG3Hh90quPPQ/bZGVy58SPLe -HsqvirrsHJv63xyw+XrYZkRfDf2/lXyuY3JgzHfZoTtR6rgwdNjkSXYZ9X8h -xXumcTVGXb07frSkFESfqiZzvmpgtsxeR6OHt0AuoXyLvr4WKtyv+ZhafAMy -NZmrxPy1UX2qc0n8zWJ4LGO6YfqCDla9KN4tVFMILLnGlDWv1+BWEBbcUH4N -hPiuhfnErsVt8cff8vXkAT1GwdhNdR2O1Nl7tA9nw3KVnfecWteh6pVt2izf -LNBhS5cf9liP3hs3GY+4ZEDogGiTLY8uHj0wKeNlfxG+Tidts8nUxe9Sh6z6 -Ki6A1ZqWLBttPUxI521wb02GB9NGv7936CH/Te03YebnIERrfd8Lvw1Y8uXQ -497T8cCe2N3ptlwfKyovl6VOxIKFMm3Tymv66Pu2VnA3TzSoR5870mhggDdE -zsd3/44EDT9mnUqfAfbF6uQHWEeA34OA03cOGuLQ2n7BvvhQmAj+fNgizBDf -Xkpd9+JwKByRD9r3OsIQy9JbUl4GhMK54/udfhwzxK5HEZ+mbUOBw4ogjOMN -kXF6MIAjHAp/7p2qbcoyxFdBMdtWXDkIqeU5My+bDHHt85InWlUHoC6vc/eU -BBMfGY9azCqFwKC9olcEjYlhWl4X1QRDgOdnsNtvGSYakDSDfd+CYaMjv8MS -gokeat3Oqg3B0LKIZSCtwcSvBUnfAr2CoX1X7nJTEya6t4w3q+QGQZ9yYFnK -Hib2tz6rYGjug5kbC9/X3GfiXalANetDAfBxu2Xe2SomijlZ2I17BUDP4n+s -h2uY6Pr4/aVc+wCo8Za5fKmeiU+PZp7VVA2AWNoG1nwbEztj52UGe/1hVULg -8cdvmKjiPzt818wftPy7ePx4WdjcKqD2gdgDvioly7M2sVBKtLz25YIvRDZ7 -BqpuYeHy30M3tSd8IcVP9AnpRL3vKJe49MYXaouOJj1xYeHrfLQ+X+UL4qrW -wvM+LFx6SUaPEeYLLaoj4t4RLDwywOJv+rILNNQVCNVcFh6ovWpU+cEHpjTS -9MlJFhbVPYjf/90LetrRQmyahZl30he2vvGC+pCJrWGzLJw7Ql60b/CCZNLm -oP4vFloPmAwfTfQCDRZPaTWfEcq93VDXRHjBLptgxSZJI0y/UTOxfLMndPpb -reg0NsKMLfZLV1bvhMrC3+9nE4wwZcfQud2tbqBvFvbdNtEIfRhrPXdz3eDu -+7EVef8Y4VTHhbqwK25A0gcMbFONcMuoB1/rfjcozaz/J+eKER6WLd2/VtoN -8pLimFZlRrgQyJxYud8VzoYJX8h8ZYRPjB7y3VZ1AXdzJTSiG2PYo6+C25uc -Yb5zmVATYYz97xKy88qdIc9vot9WyRidx44/+X3FGT7GVx12VzfGxVZHng6H -OUNo2+byo+uN8UynPOOomjOcczhOr7Q0xhT1Lx/Kzm+FateuP3r7jfGgr27D -3D4nkA0+U6VTb4zxFXm95xy3QPLCng2JjcboWBeXXLFxC/CmWnI/PTTG8Uvh -zqO6W+DzvSU389qo/SiJfAuX3ALVPKczRV8ZY2x6j6Rp5WZwvxh9eG7EGH+l -sOZdXjlAZs3RDQ8E2TiQWy3aIrMJJASCuJtc2LjQMJC57osNFJqdiJx0Y6PO -hZbF+NwG1p9INkvbyUaLv6L5/ndtwGGS09Xjw8aKIy3SvNE2EP969qdvEBvP -8fa+9pG0gR/XojZGxrDRSsuYr8bKGvqM0l4Vl7DxHpnSaVtrCQHhhVdtyth4 -vKBj1rXQEubK7vqNcdhI92x9fSLJEkQZPd/X3WNj1laRfwQ9LMFumbzcv/Vs -zKtta9BbsIDazuLdr7rY+L4sb3WZlQXYClVqR/SwMUpkR5bCOgvosWqbo/Wz -0a1lrLBYxgJmqr8keA6ykT+rAWbHzUE7f+3t/z6z0aD5V0ZqujnU9plGJI1T -7/+ODJVFmYOt+FZYM0md/6cuc3CvOew5E/4ibJaNvZE5DTEm5jBTH58l9YON -EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ -8VF94vJg1Az+B+ielp4= +1:eJwV13k0Ve0XB3ClIqLMszuYylSGcLnX3jJlKiRFMmRMSIgiGcoQ8YqKvCWE +kuneU8mcTEVpQIhSbxolQ2Vo9Du/v876rHPWOc969t7fZx3avoOOvsu5uLg0 +l3Fx/f86P9bdoZheYjw8uGQTYGBqPFAgedRkOBHcDRirUopogGKP90kOZ0PK +GbtQ9yItiLS/PsQ9XAyr92Re2VJkAkJTEtk/hggovWlXK17kAK+ath38PtQG +iX4fy1ILvcBCceLl7FAfGP/h8vUqOAQ/hvTPzQy9gealmH2PzyVAu+nVkqfF +3yAqVloxUy0bZF/Vv9+n/gfMJQ2P/nslH0SDPK7zmHJjQvvxyFUWRZCtZdG4 +bScvqmrmqHBZlsLzvE2ts+sE0OjRewVXzjVIL4l7vFxKCOtef6Zv+1sB1rr7 +hcUUhJCSMuDnyVcJvB2OO1U0hNDV/9iZA+KVcHJcadTGRAhDdipmB2lWwjH6 +w/dn9wvhvsbN3FLulRBSKPlXuUEIO5sN7ko1VYLDRY66zR5h/DW+X6syrAok +zo6fyrkkgkU8D+evd1eDpNqtk4tlInjPQyRIv78apNuS4/ayRZDvvxnb5hfV +ID+z4bBKO/l8bYXtrelqULIN9Wz8KIILZvYKzmI1oLPij964jijeNA7XdPWo +ge0R4m+1e0RxNJ4JPlM1YM//cSy3nzTf7ArZhRpwLK5//vuFKAoMnRPtXaoB +5yduj7umRfEdwZ+SwcuGvepXGlzFxPBq1NX1N6TYcODtxjOJnmJ4ozOwys2I +DSlOVsZ982KYxaPDrXyMDdI3H0kvXyaOPEYD5wPj2VAt4rSgxS+O46zVqhUn +2TDY584+QxHHoZdFdtQMNig6RNAdtorjfhWBuJFLbGizu7zqyQVxNC1Ywcxs +YcMfi7lHvUwJpHy482vmNxuyyqIr/lhIYCA0vLrJxQHFVVypGg4SGLVsoj5i +BQdsO/lMMnwlcOiniv1Hfg7km1Jv2GZK4DvbDUsF0hwwQJvcB68kcESy3cxa +nwPhjCKP7kRJ1FDcU5kbzAHrQsHvNqclUbfDubM4lAN0nmOpj85J4lnT687X +wznwZMCZ039NEv9mub2pPsoBzdA13GOPJNHgsFVBRhIHPpZFlX2VlsK3yZPV +RRc54Ca67YvMDSmcTGGWKt7ngE5MY0JBkxTyKY+9bunhAN+b9eK0LtKv1ufu +7OVAfQ03KD+XwuU+9hFH+jggblOftWlJCtnmFnM5L8jvJyjqmttIY8DLMAP6 +DAfMpn9Gh4xL4+qJQp1LogQc3XpW9e6kNO6LP23eJE5AdZHGiMi8NM7IPPk1 +JEmApJMno55XBkdlw51XyhEwWde5wK0pgy0pEw/0lQjIScyKuHBEBs3nFxZ/ +6RJwf3SD4mSCDNqf6gx7p0fAb932fuN0GQzqrjr3wIAAvw9z2m8vyeBwKW04 +g0mAoe2eWc12GSwREnOZMCXgjZhySIeALKp8tc/ndiRA4uAdOQkJWWxxy3l8 +ewcBtvd39+6nymLjdPWNgJ0E1Eanq6/VkcVZfu601t0EpL2amXDZLYtXVLZH +b/UgQLu80X+6WBYzwyW66g8QkMB08JI2kMOloCmqUiIBW90LvupvkcNdg5+X +0k8QIBj/+cROWzncvkGbd/okARfbk8qyPOXQeUAntzyFgDrrhs+rTsnhdNKp +uzOnCZjZrRD57bkc6uxNfXXvPAG3o0N5hN7K4dz3liuzuQQcv9icpzklh4MS +BhclLhCw5vWuxv3L5dE1aVR9978EqPif5nqtKo+nyjP+q7hMgPvhubSHMfLI +t6LbpOAqAUq5W2QnkuTRQ3BVSfq1/+//P1U8WfIY7HXb4nA5AdG/NzzZUiKP +ybOV9qwKAs6dcBerfyiPLrcvZxRWE+BWWlE2OCiPhh3afKE1BNDvLep/fy2P +a8529BqxCWDz5bhunJPHqnbQuM8h4OGZe5dL5Sj4tmiH782bZH1viGq1q1Cw +cjJHy+8WAa7PvNpea1GQsLtqI1pLwEfJ329lLCioIXkvyPc2AdyFm1SzQyg4 +yboWM1pPQM/d2MaaIxRUrdd7fLCBgKzxHtveRAoKcd+K4mokQF7F9yBvLgV3 +pCs+EG8i+6H6ws3jdygY/ybpnEQLAWZDj/5M3aegtuHhx8mkt3GtsPToo+CX +Fo2xr6S9HUOewzsKDsrwx969Q0BIzBU6e4qCxX4NgoqtBBwpGT5AXaRgdpvl +kROkLWJocfErqXg7TXrQ4C4BD9Y2XTHgo6Ln5MyDTNL2Jc73ZwSpOLf13sX/ +SO/pTRfykqRiWnNBX2wbAa+9lPWk5KgYztRn3CPtN9/q+pRGRb4Tf2MF2gkI +pcxfMVGjYtdv+9Is0nM3su7/2EjFN/NHT/WSjt6q9oWjS0U3c4HtPB0EcL3s +FApkUNG2c3SeRTrpkKce3ZiKy+RuJxwizbfql+vIFiomNh6aKSKdlX8uLtuS +ij+Hxkwfk85v77m/3IGKw7a0i9ROAii7fb807KTi9oXCYjPSJZNLQuGuVKxr +UznjS1o1IV9PzYOKV7tOB5wgXSO2ec+4NxVDX13dUEBa9/rjuH8DqFhd5fDs +FukG48CSHcFUrDnnHdRDGvpXdPOHUfFpy+3pUdId/pe/tEdSUURkg+cEaavf +DOFjMVT0Mc5pmSP9KGtATzeeiprVffx/STspHdwzeZKKVVkdW7m7CHhevzq+ +5BQVIwcsIleSdt9WUuKWScVnKgbnVpB++8a4WzSHisaLUWVcpPdHPf/yMJeK +3YfeX/9Bvm+KP0I46SIVU477XJkmHV4oqM8qIuvR1Z/1hvSibvmeuVIqdlaK +R/SRPt5tGl91nYrxO9Ztu0Oa232sxLeGis3nSyjlpFO/HumWu0nFzYJ1n/4h +LZgiMvWsjooqazZVhZPOkakWzmwm9//i10An0pLsrfoWbVQMSH6voE36ktn4 +nr9dVJSx/Da8hjT9eWx87QMqCogvS39L1utasGRpyBOyv/5bNKwnrbH8Rrfy +Myrm2Xd8SiNNnLebGntOxaAWuzwX0gZqH4Vzx8h+YsVbKpHe4iTnxvORilvM +sypukP107+Pt+DuTVByKttwXSdo21rE0apa0zB45PdK7ylKmPvwk18NxLKkk ++zVocTb+vgANX6TdWxtJ9rfhIT/x98I0ZBZTm6VI806MVHBL0tDm/fqv9eS8 +lI62DxrTyeenFRanyfkaazmnfkuPhi81uM9rk/NXqc/X1mdEQ29dwSsNzWR/ +s4/vmkEaHk3NNwHS4sX+iWo2NJwq0TIwJud7exJjuMiDhhUGfpoiZB7I/60K +vuNDw8AHCRNxZF5MRtK5X+6nYYqu2pZPdWQ9Avg1JSNoqNpm3M0h86XV5uWJ +zFQa/ohlukqTeaQtnLAxhkNDqy885dZkvnGlz3Xk1ZLr25Rcl0Dm3yPuQNfa +Rhp+Dtlx5FYVAQfmHJNmO2m40LBeUKSSnI9hxVH/ERoW3xSoKyPzVfzy/WQn +bjrK5b7R0ioi+0+CJRvGS0fDFMoHnUKyPlkczj8CdGSV4j4dMq+3J+a/6JGg +o5oju2b9JXK9vkHaJup0TM+Y753MI+CH2roxjZ10LOui2L/4h4D5S9IJOq50 +pIu9KuJkEvB9rZIiw4OOHWILkycyyH7+xgg020/H2xPZEZR08jxs9J53jaWj +woD1Qe1kMk9tbgumltJR84GXaXcMOf8H3OHNHB1NfXTXdPgQkPsy4M2Hn3T8 ++slrk5E3AWe3hyd9WaJjQYVKdI0XAZk6qQ8WVytgU5DayX/cCUj8xdm1Vl4B +vRKXLmiQ5+eB9JWhTAsFdE//LTBuTQCzorLw/HkFHHcoNWJpEjBKrbhs/q8C +Xtq13OeYOlnv8+UF3y8rYOKnEEa9Knn+JZRddCxXQEdLyxk1FbI+uwvzBJsU +8MPrxpo5CgEbVp7NSv5PASWXLUuSESL32yMmPlJdEYOcP4nUz3JgVtja07lN +EX/v1uZPqOTAcBD9SeA9RdT61GfHfZ0DrV0/Ie6hIpouLdM+cZUDWdEVlGuD +5H2PlHcxxRzY9GbNqx8TisjkvazskMeBEM7jvZdElHCgfWfs6RMcmNi+c89b +HyXcvvH8Z4fdHHh72tM5jEcZbbJHXoX/YoPVdJTVOz0VrBRONa1lsGHSmzf8 +Ztx6nJ3kvWJSUE3+X0gsT2nbgGKd+ZLBlZUg3KucyZ5WxfWW5Wq5nddBNrXG +Xk9PHdlaw8kO165BnhpjnYi/Bsb6M1+cqSiDHmmTzd/OaOIa90S7Xc0lYCjb +lrVxcCPqB+7tqeEUgyB3cYRX4iaUMXihUDBSCPIJFKaLshb2bD10RPnTJVit +5FbreE8Lfx7lunoxIB80WVI1UXu18c+V1Z8M9uZC2JhwuzWXDjYvrzyZ4XAW +pr+d3mmVp4MmYjedntWdAcuNXflWGrq4SXpkb/+TTGj5ZvRr4ZEulm4SdrW3 +S4MQde2Rp76b8WuIHo9YRjKwpnwGXFbr4bn+qsMS84lgrihpJ1Csh/5Zp7YY +8cTD+vi0I236+rj6qHCtDm8MqPoy7iiN6KPIiAPbY0ck+LYEnLx5yAA/uX9J +zM4Kg6ngiSjzCAOcCjmx/2RCGByRCzowGGmA63xn0uLDwiDt2EHHxRgDFC5T +Csx1CgO2YSSVmWyAwzRuAZAKg9+1J5ra8w3QUUM87lDJIciuKfje126Afw/J +CWFbKNwpHPCZFWPgQMKA6kvdEHhtS/OIlGRgIeH8dqVsCHD9CHb5Jc1Aq9e0 +OeAOgS0OPNtWUhnY/VNm8cPTYOhaZqgvpcpALv/ek6tCg+HhvsurTYwZeJ/b +pvtwTRCMKAZWZ/kx8LzI8qmXhgfg+7WlhY23GVhlM+IynhAA750tCk/VM1A6 +YtoqPiQAhldkbB1vJL8nUuCjuicAGj2lL5xvZWDRBPffUt0ASJTcbPinm4GM +4mVLjI/+sC418FjPCwamxSRveuzgD+r+z7h8lxviOw/34OOafuCtVLE6384Q +T/g1V0Wt8YHoTvdAZXtDfOFrEtfz0xuyfIUfEI6GWDf5pE/1kzc0lR49/WCX +ITr3wiuRLm8QVd669o+XIb6/wLqWHO8NXcrvRD0jDVE31X/0w8I+UF1PoSpf +NsR6/gv+njNeMKuao0fMGGJ2XMGf0FWeMPwQzUW+GaIWZ2KybtYDWkOmdkTM +GWKf0RhXyaAHZBJWh/R+GqJAs7hHbaEHqBpyVTZwG2H3E6fins0esM8qmNYu +boQS1XfvlHm7w4C/5ZoBphEeH1pUH+l1g7qSX//NpRphV+VTaslzF9AzjViw +TjdCPCOulNfuArf+m1xTmGGEneH8zRerXICQH9O3zjZC0eFHx4cSXKAyrzWj +4F8jzH2ipyqs5gKFp5MYltVGGFf/Qjsnfjecilh7Jq/fCNO+/ZsUq78LXM0U +0EieiSKF3WG9fU7wZ4BXsJ3KxM875jlr7jhBoe/UqLUCE1u5enLcKpzgfXJ9 +lOt6JqaH71unedIJwrq31xzVZmJTe0bpeT0nSNt2TL7OgokZ+lpiEQU7oGH3 +s9+6B5k4ser11NpoR5AJTqnXbGUiNNzZ5O5uD5lLfpvT25jIsilsjd1uD8uz +LTgfOpj4abbMrxztYaJ2ZXlhNxMHBhr7FRXsoYHrZJ5wPxNX5UhnOz/dDq5n +46Pm3zHR4EV979jnbZDXeHRzCz8LnzlpCuhr24EYXxDHbhcLy6/92niWyxpK +TGOjZ1xYuDY6czrrnRVox2aa5rix0O0e83NZjxVsm2E/G/ZiIf+dTnP5c1aQ +PDj3wzuIhezn5o4GalawWBy3JTqBhRtt/Lfyum2FEaOc/rIKFkaP2+hnPraA +gMMlF62qWfjPwWdSp29bwHz1Ld9JNgt3+unfK7xsAcL04QWtWhaGW13QFwy1 +ABteOdnmVhaOG671XRCygKaBMp/+ZyxcSXN6+NXFHKwF6zQih1n4pPNzlZOp +OQxbds9LjrJQ0kFV96G6OXxv+Jzq/pqFR7/eeP9ryQw0ijZVfZpgoetLxvSe +q2bQNGISefoLC00L5rj2nzEDa9EdsHGGhQmhTevTY8zAL+Xw04g5Fp58/Sdc +0N4Mvrcm50sssrBazSPioKEZJP7M9W74ycLg53lm7xTNYJ1uufreP+T+ZRj1 +H1xrBgXBDXNLSyykXBgXXPvTFP4Hf66Z7A== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 30}, {0., 0.07335635796919572}}, + "PlotRange" -> {{0, 30}, {0., 0.07333406579603427}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -8286,6 +8392,7 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -8313,7 +8420,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 30}, {0., 0.07335635796919572}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07333406579603427}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -8321,9 +8429,8 @@ EvElz6fUzSH2V4Zv9S82Nm/9UxghZg6r9G5qecxT+zukqr3qrxnkBFfPLixQ Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913457856953163`*^9}, - CellLabel-> - "Out[421]=",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] + CellChangeTimes->{3.9913457856953163`*^9, 3.99438765018556*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"05ddf133-6129-4b7f-862b-da2b1e68094b"] }, Open ]], Cell[CellGroupData[{ @@ -8376,66 +8483,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[422]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], + "In[100]:=",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"7.67335071652559`*^-182\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 422, 453, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785749161*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8272165148704686`*^-163\\\", \ +RowBox[{\\\"\ +505518991860510123640143147290826802026352259296904996615670790081361\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"11\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"0136605792106222330469781300859512072804761600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 17, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994387650320924*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], +In[100]:=",ExpressionUUID->"05369c7b-5826-4752-bb1b-f7dfd4cb398b"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.8309848438100978`*^-185\\\", \ -\\\"24059693867998030973540373511365334577910151861043670700236682439199262944\ -35854489984638737378305808000876544000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 454, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785759161*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.268561450001535`*^-166\\\", \ +RowBox[{\\\"\ +164243120455479739170682508554789627978361849045564433400431439697434\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3832218553116351696319446492554724542670438400000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 18, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.9943876503325377`*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], +In[100]:=",ExpressionUUID->"2eedb5ce-1843-434c-8c7c-003895eeed92"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"4.369024200916844`*^-189\\\", \ -\\\"65057412219066675752453169974731864698669050632262085573439989315594807001\ -54550540918463145870938904834370174976000000000000000000000000\\\"]\\) is too \ -small to represent as a normalized machine number; precision may be lost.\"", - 2, 422, 455, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345785767502*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.816508613265186`*^-169\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 100, 19, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994387650340934*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], +In[100]:=",ExpressionUUID->"6508b748-3138-4202-a182-6a211c3d78f5"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 422, 456, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457857765007`*^9}, +during this calculation.\"", 2, 100, 20, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345785749161*^9, 3.994387650348598*^9}, CellLabel-> "During evaluation of \ -In[422]:=",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], +In[100]:=",ExpressionUUID->"f710f44b-93f6-45fa-9748-458cd836059e"], -Cell[BoxData["10.362747935330768`"], "Output", - CellChangeTimes->{3.991345792196575*^9}, +Cell[BoxData["10.36553415039573`"], "Output", + CellChangeTimes->{3.991345792196575*^9, 3.99438770734298*^9}, CellLabel-> - "Out[422]=",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] + "Out[100]=",ExpressionUUID->"8ee8604e-e620-4fab-9c0e-ece38384269d"] }, Open ]], Cell[CellGroupData[{ @@ -8502,68 +8619,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918501903071613`*^9, - 3.9918501951272774`*^9}},ExpressionUUID->"0b10f52e-4583-2a4b-993d-\ -96e59dd43e6a"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 457, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792232563*^9}, + CellChangeTimes->{{3.9918501903071613`*^9, 3.9918501951272774`*^9}}, CellLabel-> - "During evaluation of \ -In[423]:=",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], + "In[101]:=",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 458, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345792242544*^9}, - CellLabel-> - "During evaluation of \ -In[423]:=",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7890997222826517`*^-202\\\", \ \\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ 32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 423, 459, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922505417`*^9}, +normalized machine number; precision may be lost.\"", 2, 101, 21, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994387709229642*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], +In[101]:=",ExpressionUUID->"5f14e4d4-5e4d-4a54-b1e0-14553586c285"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.6501520290996165`*^-207\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 101, 22, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994387709236217*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"c2d08cf3-76e5-4c25-ae05-b139bb0e4ec4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2086477698487412`*^-211\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 101, 23, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.9943877092428083`*^9}, + CellLabel-> + "During evaluation of \ +In[101]:=",ExpressionUUID->"9471cf79-4d1d-43ac-bd0c-b000bf2868d0"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 423, 460, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457922595577`*^9}, +during this calculation.\"", 2, 101, 24, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345792232563*^9, 3.994387709248609*^9}, CellLabel-> "During evaluation of \ -In[423]:=",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], +In[101]:=",ExpressionUUID->"fd998061-e052-4511-b392-c3e71bfd90be"], -Cell[BoxData["0.32136877427435395`"], "Output", - CellChangeTimes->{3.991345799137081*^9}, +Cell[BoxData["1.0767770964856203`"], "Output", + CellChangeTimes->{3.991345799137081*^9, 3.9943877178803673`*^9}, CellLabel-> - "Out[423]=",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] + "Out[101]=",ExpressionUUID->"baffa552-fbfe-48ac-bc77-87e6431e7ae2"] }, Open ]], Cell[CellGroupData[{ @@ -8584,8 +8705,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8630,68 +8750,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.99185020477277*^9, - 3.991850207864538*^9}},ExpressionUUID->"a58948c9-6d3d-e847-a269-\ -d2e0cc5d1484"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 461, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991730843`*^9}, + CellChangeTimes->{{3.99185020477277*^9, 3.991850207864538*^9}}, CellLabel-> - "During evaluation of \ -In[424]:=",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], + "In[102]:=",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 462, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457991830807`*^9}, - CellLabel-> - "During evaluation of \ -In[424]:=",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7890997222826517`*^-202\\\", \ \\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ 32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 424, 463, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345799191578*^9}, +normalized machine number; precision may be lost.\"", 2, 102, 25, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.9943877179268303`*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], +In[102]:=",ExpressionUUID->"5d080a81-8c6d-497e-bc3e-ba4deef5b8e0"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.6501520290996165`*^-207\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 102, 26, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994387717933879*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"2774569f-7bf0-4947-b378-87e9554e48a7"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2086477698487412`*^-211\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 102, 27, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.99438771794014*^9}, + CellLabel-> + "During evaluation of \ +In[102]:=",ExpressionUUID->"19678368-b84c-433a-a508-76ca8bf57a92"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 424, 464, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913457992005787`*^9}, +during this calculation.\"", 2, 102, 28, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913457991730843`*^9, 3.994387717945923*^9}, CellLabel-> "During evaluation of \ -In[424]:=",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], +In[102]:=",ExpressionUUID->"b17b18ee-78ee-4857-b0a4-abee26f9f69f"], -Cell[BoxData["6.886509882261309`"], "Output", - CellChangeTimes->{3.991345804559931*^9}, +Cell[BoxData["31.4991826156462`"], "Output", + CellChangeTimes->{3.991345804559931*^9, 3.994387725961486*^9}, CellLabel-> - "Out[424]=",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] + "Out[102]=",ExpressionUUID->"01d85c08-da6e-4b13-81b8-02a9961640b9"] }, Open ]], Cell[CellGroupData[{ @@ -8712,8 +8836,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -8758,68 +8881,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918502122939777`*^9, - 3.991850217343153*^9}},ExpressionUUID->"c817b2d1-7deb-5a45-9938-\ -ca10003188eb"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.970918103158478`*^-207\\\", \ -\\\"19740421909230194152057376419840550111484336001069858434622476277861632039\ -29806995456000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 465, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046014442`*^9}, + CellChangeTimes->{{3.9918502122939777`*^9, 3.991850217343153*^9}}, CellLabel-> - "During evaluation of \ -In[425]:=",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], + "In[103]:=",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.361092863541043`*^-212\\\", \ -\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ -66213134598144000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 466, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046114445`*^9}, - CellLabel-> - "During evaluation of \ -In[425]:=",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], - -Cell[BoxData[ - TemplateBox[{ - "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.828508957998132`*^-217\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.7890997222826517`*^-202\\\", \ \\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ 32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ -normalized machine number; precision may be lost.\"", 2, 425, 467, - 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345804619444*^9}, +normalized machine number; precision may be lost.\"", 2, 103, 29, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994387726046371*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], +In[103]:=",ExpressionUUID->"7fcea880-31f8-4fbe-ba6c-610350fa5e52"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"4.6501520290996165`*^-207\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 103, 30, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.9943877260550833`*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"a20c395a-b954-41c5-9f84-da70602b771d"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2086477698487412`*^-211\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 103, 31, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.994387726063799*^9}, + CellLabel-> + "During evaluation of \ +In[103]:=",ExpressionUUID->"d06b6a19-1036-4343-9838-1ecc5f502d88"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 425, 468, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458046274433`*^9}, +during this calculation.\"", 2, 103, 32, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458046014442`*^9, 3.99438772607187*^9}, CellLabel-> "During evaluation of \ -In[425]:=",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], +In[103]:=",ExpressionUUID->"e3e10373-e7ad-4bb1-94e8-0ddfe8fab79a"], -Cell[BoxData["18.478556086442907`"], "Output", - CellChangeTimes->{3.991345807954506*^9}, +Cell[BoxData["5.823925417483026`"], "Output", + CellChangeTimes->{3.991345807954506*^9, 3.9943877311295023`*^9}, CellLabel-> - "Out[425]=",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] + "Out[103]=",ExpressionUUID->"0ee0725b-826b-44d5-bb03-9862402d7ffd"] }, Open ]], Cell[CellGroupData[{ @@ -8828,22 +8955,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.991850221900238*^9, - 3.9918502257325497`*^9}},ExpressionUUID->"350334c7-7c47-c24c-8adc-\ -781173809e57"], - -Cell[BoxData["0.028488532115740543`"], "Output", - CellChangeTimes->{3.991345807987507*^9}, + CellChangeTimes->{{3.991850221900238*^9, 3.9918502257325497`*^9}}, CellLabel-> - "Out[426]=",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] + "In[104]:=",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], + +Cell[BoxData["0.07950020799272256`"], "Output", + CellChangeTimes->{3.991345807987507*^9, 3.9943877311829433`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"1f16f839-de08-4789-8922-fa87d3482b46"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.991850228782873*^9, 3.991850231287325*^9}, - 3.9919246253575134`*^9},ExpressionUUID->"597921e5-69d3-564d-a8fa-\ -092e912c15e0"], + 3.9919246253575134`*^9}, + CellLabel-> + "In[105]:=",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ @@ -8866,12 +8994,12 @@ Cell[BoxData[ RowBox[{"Il", "*", "Ih"}], RowBox[{"Il", "+", "Ih"}]]}]}]], "Input", CellLabel-> - "In[428]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], + "In[106]:=",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[BoxData["8.947947137013426`"], "Output", - CellChangeTimes->{3.991345808020666*^9}, +Cell[BoxData["5.976880503779143`"], "Output", + CellChangeTimes->{3.991345808020666*^9, 3.994387731206615*^9}, CellLabel-> - "Out[428]=",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] + "Out[106]=",ExpressionUUID->"5fdc438d-a845-428e-8d8d-fd5d38c218c8"] }, Open ]], Cell[CellGroupData[{ @@ -8881,12 +9009,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb2"]]}]], "Input", CellLabel-> - "In[430]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], + "In[107]:=",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[BoxData["1.2539951617800844`"], "Output", - CellChangeTimes->{3.9913458080616665`*^9}, +Cell[BoxData["2.9252650464422`"], "Output", + CellChangeTimes->{3.9913458080616665`*^9, 3.994387731219988*^9}, CellLabel-> - "Out[430]=",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] + "Out[107]=",ExpressionUUID->"5de0b8df-cd48-4593-9422-3d8b56c4e355"] }, Open ]], Cell[CellGroupData[{ @@ -8896,12 +9024,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb2", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[433]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], + "In[108]:=",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[BoxData["11.220682417678793`"], "Output", - CellChangeTimes->{3.991345808188246*^9}, +Cell[BoxData["17.483959624466973`"], "Output", + CellChangeTimes->{3.991345808188246*^9, 3.994387731233729*^9}, CellLabel-> - "Out[433]=",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] + "Out[108]=",ExpressionUUID->"f6b49610-06e7-4396-b01e-b02e4a8ebf3b"] }, Open ]], Cell[CellGroupData[{ @@ -9091,12 +9219,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[434]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], + "In[109]:=",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[BoxData["0.04214145338799881`"], "Output", - CellChangeTimes->{3.991345808220566*^9}, +Cell[BoxData["0.00726405933233246`"], "Output", + CellChangeTimes->{3.991345808220566*^9, 3.99438773124892*^9}, CellLabel-> - "Out[434]=",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] + "Out[109]=",ExpressionUUID->"a7b8cbce-d131-4c16-b9e0-6e276c894c85"] }, Open ]], Cell[CellGroupData[{ @@ -9110,12 +9238,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[435]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], + "In[110]:=",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[BoxData["4.317080886816563`"], "Output", - CellChangeTimes->{3.9913458083195686`*^9}, +Cell[BoxData["10.398130155313476`"], "Output", + CellChangeTimes->{3.9913458083195686`*^9, 3.994387731361432*^9}, CellLabel-> - "Out[435]=",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] + "Out[110]=",ExpressionUUID->"a24d8f77-2555-47a1-9692-46dc1971e237"] }, Open ]], Cell[CellGroupData[{ @@ -9307,12 +9435,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[436]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], + "In[111]:=",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[BoxData["0.012862376162526763`"], "Output", - CellChangeTimes->{3.991345808334568*^9}, +Cell[BoxData["0.055485562667832417`"], "Output", + CellChangeTimes->{3.991345808334568*^9, 3.994387731378743*^9}, CellLabel-> - "Out[436]=",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] + "Out[111]=",ExpressionUUID->"d61382b3-2cf1-4007-8c33-71b2083f0604"] }, Open ]], Cell[CellGroupData[{ @@ -9326,12 +9454,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[437]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], + "In[112]:=",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[BoxData["7.814196669618258`"], "Output", - CellChangeTimes->{3.991345808432392*^9}, +Cell[BoxData["3.7623131753694072`"], "Output", + CellChangeTimes->{3.991345808432392*^9, 3.9943877315211554`*^9}, CellLabel-> - "Out[437]=",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] + "Out[112]=",ExpressionUUID->"03a6d4ef-2768-4c9b-95df-bd9a3575eabc"] }, Open ]], Cell[CellGroupData[{ @@ -9424,12 +9552,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[438]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], + "In[113]:=",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.991345808448488*^9}, +Cell[BoxData["0.06275239908812294`"], "Output", + CellChangeTimes->{3.991345808448488*^9, 3.994387731539551*^9}, CellLabel-> - "Out[438]=",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] + "Out[113]=",ExpressionUUID->"0bf1bf09-ff9e-40ab-8f5b-5058931105a3"] }, Open ]], Cell[CellGroupData[{ @@ -9519,12 +9647,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[439]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], + "In[114]:=",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.9913458084773808`*^9}, +Cell[BoxData["0.937247600911877`"], "Output", + CellChangeTimes->{3.9913458084773808`*^9, 3.9943877315545187`*^9}, CellLabel-> - "Out[439]=",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] + "Out[114]=",ExpressionUUID->"b38f28df-4689-4a44-ac0d-63231819c383"] }, Open ]], Cell[CellGroupData[{ @@ -9647,12 +9775,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[440]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], + "In[115]:=",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913458085134735`*^9}, +Cell[BoxData["0.05881453549680789`"], "Output", + CellChangeTimes->{3.9913458085134735`*^9, 3.994387731570257*^9}, CellLabel-> - "Out[440]=",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] + "Out[115]=",ExpressionUUID->"38da6242-4a2a-4f0c-b42c-097cdec830d6"] }, Open ]], Cell[CellGroupData[{ @@ -9714,67 +9842,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.99185025346871*^9},ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], + CellChangeTimes->{3.99185025346871*^9}, + CellLabel-> + "In[116]:=",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 469, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085463753`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8354449707909476`*^-207\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 116, 33, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994387731587929*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], +In[116]:=",ExpressionUUID->"c292c06f-561b-49a7-a875-4b1208483bff"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 441, - 470, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085563755`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8570734149776156`*^-212\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 116, 34, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994387731595531*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], +In[116]:=",ExpressionUUID->"0d7bbce8-605a-4c1f-94ec-d590c06793ef"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 441, 471, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345808564377*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.447351257310774`*^-217\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 116, 35, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.9943877316016827`*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], +In[116]:=",ExpressionUUID->"416028ed-2e36-4f3f-a869-e0ec6c93c8f9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 441, 472, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913458085733776`*^9}, +during this calculation.\"", 2, 116, 36, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913458085463753`*^9, 3.994387731607465*^9}, CellLabel-> "During evaluation of \ -In[441]:=",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], +In[116]:=",ExpressionUUID->"8b743fcd-e2cd-4cf4-9576-5b038f3a7640"], -Cell[BoxData["4.317080886816564`"], "Output", - CellChangeTimes->{3.9913458125059433`*^9}, +Cell[BoxData["10.398130155313467`"], "Output", + CellChangeTimes->{3.9913458125059433`*^9, 3.994387736034667*^9}, CellLabel-> - "Out[441]=",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] + "Out[116]=",ExpressionUUID->"466e1ae2-3f33-48c1-82cd-d2eb986f69ab"] }, Open ]], Cell[CellGroupData[{ @@ -9836,68 +9969,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918502579298553`*^9},ExpressionUUID->"baacd3f7-96e4-2949-b9f9-\ -9afb90e551d9"], + CellChangeTimes->{3.9918502579298553`*^9}, + CellLabel-> + "In[117]:=",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 473, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812542961*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8354449707909476`*^-207\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 117, 37, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994387736075609*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], +In[117]:=",ExpressionUUID->"a039db60-5dc2-47ec-9f53-2a8721af5ccf"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 442, - 474, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812552984*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8570734149776156`*^-212\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 117, 38, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994387736083179*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], +In[117]:=",ExpressionUUID->"9c22338a-e4c8-4421-a2eb-58bfd4db1fea"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 442, 475, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134581256196*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.447351257310774`*^-217\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 117, 39, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994387736089344*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], +In[117]:=",ExpressionUUID->"7550f613-2ca6-42f0-86e5-ed17590908b6"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 442, 476, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991345812570959*^9}, +during this calculation.\"", 2, 117, 40, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991345812542961*^9, 3.994387736094874*^9}, CellLabel-> "During evaluation of \ -In[442]:=",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], +In[117]:=",ExpressionUUID->"9f264013-b6e3-4843-87a1-55ccca797250"], -Cell[BoxData["7.8141966696182585`"], "Output", - CellChangeTimes->{3.991345816415531*^9}, +Cell[BoxData["3.762313175369409`"], "Output", + CellChangeTimes->{3.991345816415531*^9, 3.9943877404010057`*^9}, CellLabel-> - "Out[442]=",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] + "Out[117]=",ExpressionUUID->"1f69fb09-7bf8-4445-908e-deb2841a6535"] }, Open ]], Cell[CellGroupData[{ @@ -9955,95 +10092,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.9918502605597496`*^9},ExpressionUUID->"ea08a5a9-d446-9147-ba82-\ -e3924f732df2"], + CellChangeTimes->{3.9918502605597496`*^9}, + CellLabel-> + "In[118]:=",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Xk4Fe0bB3ARyZYle2Svo0RORKnnzlKRrbIrcZwz9r28QpaEt8Ua0UpF +yU6UkJ9K8pYiESkcWY7QKctkK/0ef8w11+d6Zr5zP+so0gKOMDg5ODjG8LVy +D3q3bdPj9nd7j0QMPzELZ6G97DwdmnExUlLrYa2YmaOboWJcj55wlwcdwram +v+URoL5Ek7K+9ubYFWHRL7iNW9EXH4GrFtjnm6Uaowvfo6cLqbpW2E/ag279 +1u5C294saB7GHu99HXm6rgd9HN0ffxRbZkTZ+ZfRF9RiE6Zrh33oR6R+SOsA +UpRPNnLEbvg9zh9WOIhcLf4tPob9MVYy4pH/EKKwiSBXbDaP8fis9ghyEFRP +p2PzXAp0pM6NIqEn74W8sOVFbrYE1Y2hCg4Xlh+2peyve2yjSSR1X6U4DJvI +VZLQ4GWjW+onsqOwo1Wt4n1af6DSy1HMc9g9kp3bTxZOIU8/33Pp2HQnb6/L +l6bR/wR2M69i/7zBcbvSfwZ9YLOzbmPzKmkIT2mTqGuER7YSO4P+4oCw+C+0 +n+ozWoutcN8xWnPuF6LvqBZswtbbmsD2q5tHWW2LAd3YnroDreNGv5GPsnUc +ZwQLzYadWs2n9geNPh3REMKOqeM3oPAuo4jNtB0y2NmgV+TR+hcRYsK2VGx6 +fotxcOEq6OczGfHCLmy+zIyV5QTNMfGAMOyfLJfItEucQOdos0nEjlQnH5b7 +c0FZySL1HnZGmaLyD21uCOnZs28Mu7d9smH5LjeMnLArXMBWmH7sJCTOA8u9 +DgH8kSxUvMMyXWOOB3JzNghqYTc9CV/lW8cLDKt7WWewyRcfBsaMBGBXyZ8x +yhkWEjUXEI5oEAC5krtrjLC1Oo1BUF8Qmkpt049hew9X527fJgQxhwcmUrED +OVu19ggIQ19BRtky9ohS6VT8LxHgqf12mh2Fx4d4vbaNKgp7HeMchaJZiLNo +VFEqSBRIZa38bdgK1I1HCidEQRtexgRiOxmlVr5jisEJ4cmDC9ht7sEhkm/E +QdkpX25jLAv130++6MorAQV3KhpMsCcnCu8+MJGAr6xPb3yx+U4OfdjdKAGe +H2PU67GNz9nscK2WhNAc/YUTZ1moNk+XLMiRhiwZ1pe6OBbKG1kM3XVSDobO +8z5vSmChg7aJ/SElchAW/DmAxJ5sEttfMioH+9y5ItUSWWhH3lZxBUd5GFi2 +KTuP3URzeci9dyMUtIqctfmXhaZ/MP8Zi1OAl8oXe5bOs5CYn3HVQwslyHJJ +sExLYqHRPD5Pa28laFW0b3mLXfOlXfZ7ghLIooxcvmQWOmZ+PE6tUQlMn9n5 +xmPnbQk9clVbGaBKLCg6BX9//P7PKEkV2HRnk1Z8GgvZePBrmA2qQsX65gvd +mSyEQm217f+ogoAs00P+Cgupx+fspEurgZz1xxwGNsddqmHUYTVI63FSILFL ++p3tK5+pQce1PnepbLw/7YpjZe5sgrn5K2TANVyfscXHcRoF9D1CzdxzWOju +0azPc1EUeCs9fK4aO5k2yFx9nQKdp8xleHPx+o45NSH/gQKnd4vYlWKL1N/k +OGqkDklFiSJ/b+P1Q2Wr1ylvAZcq4asVeSwkq5QSfXF4K5hFrp12KmSh+guz +lAVODRhWU45txD4249hJKGqAj29IhFoRC91qUqEYumhAVdrTihlsJY/ajvlu +DVAVUlS9XIL7WzyiSrzZBickAjaPlrOQnKw8oeCoBVdraoq+PGahrfknBZaQ +Nmw1t//D/4qFaPQ4UsNSG95ekH4fh52tnN7vekwb1r/K5PyNzXWnrLw5TBtc +u55FfW/B++3WuE16hTZ41q/70vkan6fZrjcpylQ4U9+4pfodnt+L5tsceHZA +BS2JUv+RhW4Hq1hXt+pA8IPHU0MsFmoPRTvP5euDFJ/F8EbRMaTo0mV53HcP +yHcvVtgZjiHG30elcqcBblXyxLucGkOSEzVrJGmGYKslFGj/cAydpBp8SVc3 +hvLlnH0nZ8YQ7fvvFrFxEyif4l6zXe8bKjEMWZPTdgDiw5313c5/Q3mz3s+K +M0xh4nqWusPnb2h+n9TbpuhD0By6qmN21zjq4+CaGnSzgH2fjrLzcsaR/4aA +1FhlK+iJu2J7jWsClXq1NGbGW8Otd1PvU0InUPiM9NwWr8PAZXY/bYI1gUiz +/XavThyBy5v7BvW9JpG+c9q+kcNHodI9PCWZPYk6pG96N1FtYLdJuW9w4Hck +cy+uvmCzLUS/arq7mouNapjq5paCdmDS5b8wl8pG8p0/PUK/28HXmTGlLIUf +iJqZVnyXaQ9lUWvnfzX+QDdXz2xLf+EA9Rb60foaP9GjfZq98U8cIbOJbaR5 +9ifK3nlB5HehEyQSSpVC3T9R2+f8BOolZ2glvwlobppC1RY3VAJjjsGC9JoD +j6Km0JTfUQ5/+nGwl+Koy2qfQuR+iifbyAWWD8V5ZStMo4Lvn+ZDdE+Az/Wh +51mh08jhdr77cQFXsDwtvT/p5TR6WHnoBFeiKwiNOfOqSs8gfdmOhfMLrtAQ +8Y6/nj6DlJkeve+93IArw+LeXNEMGub3sbox5Abr25+Xu5IzqD3Z0v2ALQ2q +xt5xlujMooywHP5T7TRIxQ3SobOovuHvgrupO9S9OdTmXjaL1h2DRGqtO1xX +aVyc759FCutftW2od4coA6Z67cAs0mq1kOJpcAf7D3mscOYsOmLg/KDnmTtI +66XwLA3i/A2hb8785w57SyQ+ksOzSKavaF1LjztkSmfd7BqfRSouktnH5twh +Xm/LgMGvWaTvyi6I30GH5K2p7Dv8JLp39WeIpS4d+BU8vHcLkGj9h+m9knp0 +uF13IfwDNttkrrNgNx2G+23sOYVIfH5xrGo1pMPqPkMOZ2ESCc2JOIoepoNr +w+bFufUkGk7SWZvjR4fceZ/RATkSJddFetXco8Pmjo3ZtG0k8tPO0g8roEPi +uvHFL9jmDyrW6hXSwZyz5qedJon4skYfPC6hg5aiSKapFonig63HH1XR4V3Y +tQYK/s9HUlR8qp/TIWun9bkuHRJ5Z73xreynwzLZZd9rQCJToVGDYCYdDIaS +fu3fQ6LN8RyC2l/p4OmxoPoQezRYp6RihA7/JebrXthLIjfLnO/lk3TIU/CX +owKJHLhD/MsW6dAp2TMVYESiAyEygcUSDKDsNDfMNCXR85wEs3QpBjx6fKF3 +CdugdVolTIYBEnucv7uZkUhL9c0nI3kG9HrQz249RCLp7gijz6oM6BZa8qgz +J9HErj4JPh0GxGYWCDdakSiFM/epx1EGlOVecqDb4v5rCmRb2DJg+u+GjbXY +55zDgqn2DFheXj6+zo5EYVXWm/46MWDCKdS4BtuNWJV2hcaA6xf9KrkcSER9 +TaO/DGIAzfLB6lgnEnWnqfIrp+L2mSkp8RMkKkWCnmNpDOjwENWzxT73fbap +5DIDiHtBAxnY2qZNUXpZDMitfNYs6ornj8N92uIWA2RLYn7xupFof0Dup7Bi +BthHx7zvp5FITu5f3b2lDPjPujJA0p1Es68DLnOVM8CwJCbTCvuOGrJIfsiA +a9vf/tOA/aevr/FuLQM4pxWuXKGTqMpctuBdCwMcL7zfrkWQ6OIiJ3fGa5yX +kmDihk0rGHdzbGWA1LApMw1beHWt7HAbAxaLegunsH3rHFIWPjJA6bzR5SIP +EimrXwlVGWHAxws+hbxeJFrsPvPh2ygDkjzst2hjt8cztMrGGBCV0q3tjB01 +uGNcf5IB//Ce7irC7s3+cNxqhgECfHGeB7xJlL5GxCR8FQFPX6xt9PAhUf10 +n/NJLgJq7G6lJmGz+gqD/bkJuAaM/yqxDaqMc2lrCTjf6B2yhD3qGrZkJkLA +/KqYgnhfXL+5iaiJGAHdf94/uYe9e6coBYkTENQvQ32FnSpYbEeVJqBx9tRx +Hj/cXjtQIatIwEPeq6lnsIn84hZxZQKs+8aYV7FTU08PrFMlQFztd3Y19igh +JriaQkDaU1uYWGkXO+A5qUXAVKmej5U/iWqXxaJHtQlIYPMsENgj35iZzB0E +GOv7sc9g72oMf9GpR4BmDntdIfawb6n8UyDAN9ZYYwlbyCFC57EhAaWCR+YE +A0ikb3TQvMKYgM8HOzcrYCdLfz2df5CA3LObnhti16wuS80xI0BXY4pyFHvo +R8T9q+Z4/PoVFmjYes3iXUnWBFSJ5L+NwaZVfJ1IPELA2X0zHcnYSTfKOM/a +EDDReQ3dwP4abKoV6kBA0ei4ZTW2oIvEgUAnApjiyVONK3mmQ8e9jxHgxRez +9Gbl/Y1nLrq4EjDAe8CEuVIPn9kdBxoBts2S8d9W8kiJJ0foBOiUb9s6vZI3 +ONRmThCweer8rsWVvNby0f2eBGzp3FS+KhDX9/jMH/AmILuJJ4kXO+mO2frd +vvh5S9X3Qtg1SZJbdPwJYG84G7ke+2vY8D7NQALs/8imSGML0CscKMEEGHyZ +4pXH3mkVFaB8koDmZs5xxZX8XYcS5EIJiB630FbFvqQqdVMyjIDjmR2Dm7Af +CY88FAknoFgndZ6CPbhU8Zo/kgAxp4TQLSv5rKhB7igC7ldUOW/F1u04NP83 +moAOftmCFf8f6DX5EA== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10057,107 +10193,106 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1Xk4Fe0bB3ARyZYle2Svo0RORKnnzlKRrbIrcZwz9r28QpaEt8Ua0UpF +yU6UkJ9K8pYiESkcWY7QKctkK/0ef8w11+d6Zr5zP+so0gKOMDg5ODjG8LVy +D3q3bdPj9nd7j0QMPzELZ6G97DwdmnExUlLrYa2YmaOboWJcj55wlwcdwram +v+URoL5Ek7K+9ubYFWHRL7iNW9EXH4GrFtjnm6Uaowvfo6cLqbpW2E/ag279 +1u5C294saB7GHu99HXm6rgd9HN0ffxRbZkTZ+ZfRF9RiE6Zrh33oR6R+SOsA +UpRPNnLEbvg9zh9WOIhcLf4tPob9MVYy4pH/EKKwiSBXbDaP8fis9ghyEFRP +p2PzXAp0pM6NIqEn74W8sOVFbrYE1Y2hCg4Xlh+2peyve2yjSSR1X6U4DJvI +VZLQ4GWjW+onsqOwo1Wt4n1af6DSy1HMc9g9kp3bTxZOIU8/33Pp2HQnb6/L +l6bR/wR2M69i/7zBcbvSfwZ9YLOzbmPzKmkIT2mTqGuER7YSO4P+4oCw+C+0 +n+ozWoutcN8xWnPuF6LvqBZswtbbmsD2q5tHWW2LAd3YnroDreNGv5GPsnUc +ZwQLzYadWs2n9geNPh3REMKOqeM3oPAuo4jNtB0y2NmgV+TR+hcRYsK2VGx6 +fotxcOEq6OczGfHCLmy+zIyV5QTNMfGAMOyfLJfItEucQOdos0nEjlQnH5b7 +c0FZySL1HnZGmaLyD21uCOnZs28Mu7d9smH5LjeMnLArXMBWmH7sJCTOA8u9 +DgH8kSxUvMMyXWOOB3JzNghqYTc9CV/lW8cLDKt7WWewyRcfBsaMBGBXyZ8x +yhkWEjUXEI5oEAC5krtrjLC1Oo1BUF8Qmkpt049hew9X527fJgQxhwcmUrED +OVu19ggIQ19BRtky9ohS6VT8LxHgqf12mh2Fx4d4vbaNKgp7HeMchaJZiLNo +VFEqSBRIZa38bdgK1I1HCidEQRtexgRiOxmlVr5jisEJ4cmDC9ht7sEhkm/E +QdkpX25jLAv130++6MorAQV3KhpMsCcnCu8+MJGAr6xPb3yx+U4OfdjdKAGe +H2PU67GNz9nscK2WhNAc/YUTZ1moNk+XLMiRhiwZ1pe6OBbKG1kM3XVSDobO +8z5vSmChg7aJ/SElchAW/DmAxJ5sEttfMioH+9y5ItUSWWhH3lZxBUd5GFi2 +KTuP3URzeci9dyMUtIqctfmXhaZ/MP8Zi1OAl8oXe5bOs5CYn3HVQwslyHJJ +sExLYqHRPD5Pa28laFW0b3mLXfOlXfZ7ghLIooxcvmQWOmZ+PE6tUQlMn9n5 +xmPnbQk9clVbGaBKLCg6BX9//P7PKEkV2HRnk1Z8GgvZePBrmA2qQsX65gvd +mSyEQm217f+ogoAs00P+Cgupx+fspEurgZz1xxwGNsddqmHUYTVI63FSILFL ++p3tK5+pQce1PnepbLw/7YpjZe5sgrn5K2TANVyfscXHcRoF9D1CzdxzWOju +0azPc1EUeCs9fK4aO5k2yFx9nQKdp8xleHPx+o45NSH/gQKnd4vYlWKL1N/k +OGqkDklFiSJ/b+P1Q2Wr1ylvAZcq4asVeSwkq5QSfXF4K5hFrp12KmSh+guz +lAVODRhWU45txD4249hJKGqAj29IhFoRC91qUqEYumhAVdrTihlsJY/ajvlu +DVAVUlS9XIL7WzyiSrzZBickAjaPlrOQnKw8oeCoBVdraoq+PGahrfknBZaQ +Nmw1t//D/4qFaPQ4UsNSG95ekH4fh52tnN7vekwb1r/K5PyNzXWnrLw5TBtc +u55FfW/B++3WuE16hTZ41q/70vkan6fZrjcpylQ4U9+4pfodnt+L5tsceHZA +BS2JUv+RhW4Hq1hXt+pA8IPHU0MsFmoPRTvP5euDFJ/F8EbRMaTo0mV53HcP +yHcvVtgZjiHG30elcqcBblXyxLucGkOSEzVrJGmGYKslFGj/cAydpBp8SVc3 +hvLlnH0nZ8YQ7fvvFrFxEyif4l6zXe8bKjEMWZPTdgDiw5313c5/Q3mz3s+K +M0xh4nqWusPnb2h+n9TbpuhD0By6qmN21zjq4+CaGnSzgH2fjrLzcsaR/4aA +1FhlK+iJu2J7jWsClXq1NGbGW8Otd1PvU0InUPiM9NwWr8PAZXY/bYI1gUiz +/XavThyBy5v7BvW9JpG+c9q+kcNHodI9PCWZPYk6pG96N1FtYLdJuW9w4Hck +cy+uvmCzLUS/arq7mouNapjq5paCdmDS5b8wl8pG8p0/PUK/28HXmTGlLIUf +iJqZVnyXaQ9lUWvnfzX+QDdXz2xLf+EA9Rb60foaP9GjfZq98U8cIbOJbaR5 +9ifK3nlB5HehEyQSSpVC3T9R2+f8BOolZ2glvwlobppC1RY3VAJjjsGC9JoD +j6Km0JTfUQ5/+nGwl+Koy2qfQuR+iifbyAWWD8V5ZStMo4Lvn+ZDdE+Az/Wh +51mh08jhdr77cQFXsDwtvT/p5TR6WHnoBFeiKwiNOfOqSs8gfdmOhfMLrtAQ +8Y6/nj6DlJkeve+93IArw+LeXNEMGub3sbox5Abr25+Xu5IzqD3Z0v2ALQ2q +xt5xlujMooywHP5T7TRIxQ3SobOovuHvgrupO9S9OdTmXjaL1h2DRGqtO1xX +aVyc759FCutftW2od4coA6Z67cAs0mq1kOJpcAf7D3mscOYsOmLg/KDnmTtI +66XwLA3i/A2hb8785w57SyQ+ksOzSKavaF1LjztkSmfd7BqfRSouktnH5twh +Xm/LgMGvWaTvyi6I30GH5K2p7Dv8JLp39WeIpS4d+BU8vHcLkGj9h+m9knp0 +uF13IfwDNttkrrNgNx2G+23sOYVIfH5xrGo1pMPqPkMOZ2ESCc2JOIoepoNr +w+bFufUkGk7SWZvjR4fceZ/RATkSJddFetXco8Pmjo3ZtG0k8tPO0g8roEPi +uvHFL9jmDyrW6hXSwZyz5qedJon4skYfPC6hg5aiSKapFonig63HH1XR4V3Y +tQYK/s9HUlR8qp/TIWun9bkuHRJ5Z73xreynwzLZZd9rQCJToVGDYCYdDIaS +fu3fQ6LN8RyC2l/p4OmxoPoQezRYp6RihA7/JebrXthLIjfLnO/lk3TIU/CX +owKJHLhD/MsW6dAp2TMVYESiAyEygcUSDKDsNDfMNCXR85wEs3QpBjx6fKF3 +CdugdVolTIYBEnucv7uZkUhL9c0nI3kG9HrQz249RCLp7gijz6oM6BZa8qgz +J9HErj4JPh0GxGYWCDdakSiFM/epx1EGlOVecqDb4v5rCmRb2DJg+u+GjbXY +55zDgqn2DFheXj6+zo5EYVXWm/46MWDCKdS4BtuNWJV2hcaA6xf9KrkcSER9 +TaO/DGIAzfLB6lgnEnWnqfIrp+L2mSkp8RMkKkWCnmNpDOjwENWzxT73fbap +5DIDiHtBAxnY2qZNUXpZDMitfNYs6ornj8N92uIWA2RLYn7xupFof0Dup7Bi +BthHx7zvp5FITu5f3b2lDPjPujJA0p1Es68DLnOVM8CwJCbTCvuOGrJIfsiA +a9vf/tOA/aevr/FuLQM4pxWuXKGTqMpctuBdCwMcL7zfrkWQ6OIiJ3fGa5yX +kmDihk0rGHdzbGWA1LApMw1beHWt7HAbAxaLegunsH3rHFIWPjJA6bzR5SIP +EimrXwlVGWHAxws+hbxeJFrsPvPh2ygDkjzst2hjt8cztMrGGBCV0q3tjB01 +uGNcf5IB//Ce7irC7s3+cNxqhgECfHGeB7xJlL5GxCR8FQFPX6xt9PAhUf10 +n/NJLgJq7G6lJmGz+gqD/bkJuAaM/yqxDaqMc2lrCTjf6B2yhD3qGrZkJkLA +/KqYgnhfXL+5iaiJGAHdf94/uYe9e6coBYkTENQvQ32FnSpYbEeVJqBx9tRx +Hj/cXjtQIatIwEPeq6lnsIn84hZxZQKs+8aYV7FTU08PrFMlQFztd3Y19igh +JriaQkDaU1uYWGkXO+A5qUXAVKmej5U/iWqXxaJHtQlIYPMsENgj35iZzB0E +GOv7sc9g72oMf9GpR4BmDntdIfawb6n8UyDAN9ZYYwlbyCFC57EhAaWCR+YE +A0ikb3TQvMKYgM8HOzcrYCdLfz2df5CA3LObnhti16wuS80xI0BXY4pyFHvo +R8T9q+Z4/PoVFmjYes3iXUnWBFSJ5L+NwaZVfJ1IPELA2X0zHcnYSTfKOM/a +EDDReQ3dwP4abKoV6kBA0ei4ZTW2oIvEgUAnApjiyVONK3mmQ8e9jxHgxRez +9Gbl/Y1nLrq4EjDAe8CEuVIPn9kdBxoBts2S8d9W8kiJJ0foBOiUb9s6vZI3 +ONRmThCweer8rsWVvNby0f2eBGzp3FS+KhDX9/jMH/AmILuJJ4kXO+mO2frd +vvh5S9X3Qtg1SZJbdPwJYG84G7ke+2vY8D7NQALs/8imSGML0CscKMEEGHyZ +4pXH3mkVFaB8koDmZs5xxZX8XYcS5EIJiB630FbFvqQqdVMyjIDjmR2Dm7Af +CY88FAknoFgndZ6CPbhU8Zo/kgAxp4TQLSv5rKhB7igC7ldUOW/F1u04NP83 +moAOftmCFf8f6DX5EA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, + "PlotRange" -> {{0, 180}, {0.733678210326483, + 1.3398863379122656`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "AxesOrigin" -> {0, 0.7336782103264846}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10169,21 +10304,20 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, - 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.733678210326483, 1.3398863379122656`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7336782103264846}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10197,105 +10331,104 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1Xk0VW8XB3AUlSEkcyRTJHUzRcnexsxTZU7c4ZDKnJ8i8ormpJEmKkoi -CYVUKk1SVEqjc80lhMiQe71Pf5x11mft53zP3s9Z6zmLmBGeHCEBAYHv5Pp3 -j3q9bPGdptcWCS8NRlr8+GAxkGfMtCkCmY+1Ix+IuTkmJzRtaqDpaeKfd8Tu -7Fci4oZPoK4mZOI1cWl88mNhmwZIuJTKe0a8/6lCbXLhG3ih8U7oAXFVU9SF -KYP38LPEd045ce/n+sQddz/C7h3K0leJlbo0/P9Yf4WoOBWlLGKnX4lmMQ00 -zA3iaO4lvj/VKxZf2AbttyaWxxJ/SJFPuB3eAS032sw3EQ+I2PSOGHSBoLeW -kz2xyKFIX8OxbqiNeuW3nFhV+vzzqLvf4fy+ji3ziV2V/1wZsO6DF7mpxz76 -8oHKVZfTnz0APXs0C+4QJ2u5pW1p+AXXlwQ/OEH8Ub55RWzhEBi0dwzbE7P9 -wjYfPzQMDQN2kmrEg+cELt4K/w3Ft5L1R334MFtdX2rIYBQsKsojsolPsB+v -lZL9Awzh5uOhxGpXfZOXj/0B7jLJamNi06XpA9vujkPBkcUS9d58CDWhG3qt -p2AyhdH02YsPI/HbZ4pq84DptmPWGeLdd8XMdWfz4VbpEUtv4iw0vR7SMA2t -k2n3X24g/eU/t4kuFMQHW3Jbz63nQ+HT49wUZSHUCbRa7kw82BOYmHlICF0X -HEudWMeHxCWjZTfDZ2D6UNVKV+ITJYs0fhkI44G+V29oDz58buq7z78sjLnc -BOtkYrXhO35zZUWwU+1H1QLiIiPXY/pjIsjIyKrwcOdDXdVOwa13Z6NX8Km+ -y658GH38jv5uLY7spV93/XDkwzxncamE++JYWJ8SEUjMaLZBCTMJjF6gJ/XG -gQ9hnRW5K5bNxQs30jeV2PMhUqiBsUZcCoWyDq5xt+NDl/qNobQ/0rjpUKyh -hiXZH6p+TqPhPJTKYhjHIB+ErncvUoiah9x7G3trgfRruNCz8Oc8tF3gGLnB -gg9+1kdvvebK4Jk7fr+Zq/nQyIqOkX8pi98zFi6SMuZD69UjB4Nmy+HbJL+U -1UZ86PtZePmarRw+Cd9+hm3IB9HYjnera+Uwo+bFeMkKPtjsWW8UVCGPwf2n -I/WW8aE6z2S0IEcRFfM35ldo8yGvazJuVawKLntGKynJ8cF+w97WmGIV3Plq -h6eULMmvk7Er7lbB6t1F2TPn88Eob6msmq8qJp2I8+mRJvvJDCwTtliIk+zp -Sycl+DD8i/vf91Q1DEu1eHFyJh9kttmUl7moY9CO1M2Lh3jQnSca6h6mji1+ -ZqHcXzyo/Nqk3J+ujiFDxXtOD/AgwHljqnatOuLiJwoCfTzI04vzzDbQQI/a -bXeru3lg1Ht1MEleEx03fvL78IUH60PE9B3btNDJYHl+YR0PIG6DgTdPC10f -hA0tf8yDJWk5K9mK2ngw2SKp7CEPBC4bWiV5aGPj8Ub/ivs8KG719771UBsj -3pw3zqvkgYhXUYrSpcXouabz27Ii0p+Ny4depi5elhXr/5vJA2X1jOSDnUtx -5/fB+ad8eFBzYER3Qkgf6y/pPU/3Iv3/9m2mFunjT8aH7O3reXChTlPXKlAf -t8i+P+vizgP1kOq34y36OL9ExqBnLemvqEuLerkMr3t5UA9NeKCirEqp+TLw -pUuloIIMD5bmx4r/BQM8FVvJ2v10Ci5Ga7pXNBijnvDMA0u1p6ApDlbuyTfD -6QBTSTXmX1gU+N5149Y16KoXMG9FxiRwpm/fUNmB2PJBs/zSvQmQ/1k5S55p -ha8+qhzxbhqHWEPzr8eW2ODrQc+h2r4xYPZPPZfptUXGYZj6IjoGxVYxs3Ia -12JDg2xDOjkn8kbCHhadcECzV35z7pJzZNxS4VVdshO+lU5w2Wo5At8EZgy1 -Bbvg5y/ljoN+vyF8QcTRFA03zA49qDx9YBhubH5eezLNHct6+vYvuTUEO38r -jult9sDCrUfCrw4OwqijndezTZ5Y2BS5VUd3EMz8My27PNahXEDtknp6AN4q -ng+rM1yPzrek2yG7H5SupNYU6GxAWsOQPeHUB5XcJc6uEl5Y6iR7UVDnJ6g2 -D4bE9Xuhw2VWvrdyLxiezCy6zPVGRih7xojoDzg/8/eyY4998F3P/gPCqt/h -tuXyz2lVvmiVlKliu7wHslYekJ4q9MPDwS7Rbl7d0PglP93wkD+G9zn2Pz3T -BRUu5zQjdwfgzdy51i9aO2Fo2zqBcPZGnOlpyxBZ0wmjdrqhA9aBePNsvUth -YQcU9H8ajzHZhFe09938qNABPhfzWRvFgzB1e/kC5rl2KLvltGnG3iBs/ntT -NHZRO5gpv53YPxGEnau7ZzGr2kCDG/L5zeZgtOiJqOkPaINOsS1u5zqCkUya -0SbUBk1HXFlrNzDxx4kPoaKVXDgRnyO2vYmJ0ZKn7I5EcqHm/vQEy4GFHWqv -o2oMubDioZHpYicWluskXOo14MKVx5vjep1ZmPzfNTdF4szn74Yj3VlY1+a0 -MJ7BBert1Z+7vFk4WTiWuVqfC9Ldbt9Oc1ho8iT9zidtUpfIrX2ZwsIc71Vn -opW4IBmAew2rWdi9Y2mmzAwuqM1/1righoWPzU19PYS4wGhwURC5z0IVqdCS -DEEueJr7X/v4kKy3GxSeK0D6XxD3ctcLFg5GZpWpT9Kg9O265POPLDz+y34B -Z4AGzUD5rIAxFo7vag6/10KDWdBAQZoRG+dWlzhUFNNwJXswxtWEjerTY2KH -imiY/27YQt6UjZ3GHg9Y12kYsB1rLljNxi2qX8dlr9HkvBEQbLBioyCLLk/L -I//5MWnfeR5s5D4xXHPsLA2dh43n5Gxjo8jTjLHAAzR4PFvZHBLBxtnlB0rX -7afhvsCqHEYUGwdju30d9tGQHWNh/CiWjTf0IravTKfB1XdtcFcCG1+mHX2v -+j8aqjR9q/QOsLFD6KqO0k4ajtxN3Fx5hY1z1P879iiMhm0Gp83iC9jo/Ubj -3KfNNDhfK51jWsjGjIVn9g2F0iB6uvvanWI2CqTmzNEMoSEt2r33djmZP8yo -8DiLhkRdzS0Vj9hYbDLqdT6AhrDTL7feamWjcUthv68bDQ5zu82juWzkWL5g -HHalQSdNQMKgnY248Ob6hy40dEcbF5d2sdGRedZiqTMNwa45/Tf72Lj7jX22 -uAMNPsIx4SWTZL+KVm8cs6JhbYxSZJEcBz8pPKqJXUnDo5x0x2MKHHyf82pG -hQkN5g3DmvFKHOyKDPb4Y0wDQ+vlJ2tVDmbP5U4nGNGg2JJg/UWLg7zJyILj -K2j4ueqbnKgxBx0HfyiO6NGQIZR7L2QdB7U+qcjsWETmXy6e5bKBPM8YEf+s -RsMe//hoQ28O0u/DxcyJ48vdF0/7cXBztJLcjIWkf0ow8xSTg8V33gSdX0CD -YT2T/SSKgwu3Ya2QAg0tmVpiGkc5OB+r3Y5K0nADJEK/Z3JQp2WfoRLxnv6R -uuLjHKyv+D2eN5cGA4e6JNPTHPQTTtC5J0G+nwBr2OUCqdcFKI6L0WAXkfsp -voiDD1eIrc6aTYOKyj4TixscbNuUY8QgHqmPOD7jJgf9Yx0lX8yi4ZI2uBwp -4yDX4WkIT4QG3rdvtZerOQj6yXmRwjSUOysXvH7OwaTcFLsUIRoOTgoJn6jn -YMvuma6LiZkFvcG+DRwU+axr8lqQBqmZ1cqdjRxcvNSyQJV4612fjIkPHBT8 -r3de/XQraCw5FafZxcHdrNwpR14rTLbsevejm4MB0o5i01Ot0JTGYZR852DW -bYPJMuKkNqNesz4OMr0K49WIP2e92+j2m4NCBVljM/62wrFZ0rY7BSl06vgw -PjLeCjXD3/xjZ1D4d2RLRwlxz7fC6HBhCqFqTtcWYvNym1zmHArbe2z1e8Za -oTso/q+jNIWqSfPf9P5pBSln23m2MhRaSljF3CBevXKeLshSODHffmkM8VGJ -Ii9DRQqFWc/ap0dJvZouVV5E4VQqL0ibmMovei6rQWHRdZ+q4RGy/ugOWlKL -QokLTJ1a4m5KRmKmLoUWvAjHwH91mbWhfQwKf8gPn7/6uxWq+TLJ3Qak7m5z -PZG46wf3JNeIwr0M9UZP4lW1Ox83m1IYaB/lJ0TcufWG6j2kEPVHk8KHW2Gu -T4LxHSsKm23M0ZnYzNreudSGwp4tw/J6xEcU23fk21OYcDhHtG+oFSpnlhzN -caSw5OxRrdfEHb8SrmY7U/id2+lVSmz6VPb9YXcKK72LpnYSM0vbf+71JO8L -V4oKJj58rkTof+sprE1r+2tP3B7twIjzoVD/YtR6ZWKJQLm1kX4U2vqbqIv8 -y3Po2BgWQGHG/5xEhgfJ8wt3HQwMovBc3ibpV8SVoo6XfJgUFmv7m9YQt4/K -VXmyyfyauduLiCXaOhqdKQrlNPRfnCc2bbjZbRdK4cmHAoZHiZl3dvEwjEKb -KsWy1H/5lxznr95KYey3OIf4f/mH5fWMwyl8oiz/Z9u//PhOy+WRFAomTlSy -icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F -8/LxFKYkzL7sSHxbqqtMeieFXw4seW9H3Pa3tF4skUIdyYMqNv/ye5LahJMo -5D/VTbQiNnnrND6dTKHyQZEhS+L/A+Tj8Ok= +1:eJwV1Xk4Fe0bB3ARyZYle2Svo0RORKnnzlKRrbIrcZwz9r28QpaEt8Ua0UpF +yU6UkJ9K8pYiESkcWY7QKctkK/0ef8w11+d6Zr5zP+so0gKOMDg5ODjG8LVy +D3q3bdPj9nd7j0QMPzELZ6G97DwdmnExUlLrYa2YmaOboWJcj55wlwcdwram +v+URoL5Ek7K+9ubYFWHRL7iNW9EXH4GrFtjnm6Uaowvfo6cLqbpW2E/ag279 +1u5C294saB7GHu99HXm6rgd9HN0ffxRbZkTZ+ZfRF9RiE6Zrh33oR6R+SOsA +UpRPNnLEbvg9zh9WOIhcLf4tPob9MVYy4pH/EKKwiSBXbDaP8fis9ghyEFRP +p2PzXAp0pM6NIqEn74W8sOVFbrYE1Y2hCg4Xlh+2peyve2yjSSR1X6U4DJvI +VZLQ4GWjW+onsqOwo1Wt4n1af6DSy1HMc9g9kp3bTxZOIU8/33Pp2HQnb6/L +l6bR/wR2M69i/7zBcbvSfwZ9YLOzbmPzKmkIT2mTqGuER7YSO4P+4oCw+C+0 +n+ozWoutcN8xWnPuF6LvqBZswtbbmsD2q5tHWW2LAd3YnroDreNGv5GPsnUc +ZwQLzYadWs2n9geNPh3REMKOqeM3oPAuo4jNtB0y2NmgV+TR+hcRYsK2VGx6 +fotxcOEq6OczGfHCLmy+zIyV5QTNMfGAMOyfLJfItEucQOdos0nEjlQnH5b7 +c0FZySL1HnZGmaLyD21uCOnZs28Mu7d9smH5LjeMnLArXMBWmH7sJCTOA8u9 +DgH8kSxUvMMyXWOOB3JzNghqYTc9CV/lW8cLDKt7WWewyRcfBsaMBGBXyZ8x +yhkWEjUXEI5oEAC5krtrjLC1Oo1BUF8Qmkpt049hew9X527fJgQxhwcmUrED +OVu19ggIQ19BRtky9ohS6VT8LxHgqf12mh2Fx4d4vbaNKgp7HeMchaJZiLNo +VFEqSBRIZa38bdgK1I1HCidEQRtexgRiOxmlVr5jisEJ4cmDC9ht7sEhkm/E +QdkpX25jLAv130++6MorAQV3KhpMsCcnCu8+MJGAr6xPb3yx+U4OfdjdKAGe +H2PU67GNz9nscK2WhNAc/YUTZ1moNk+XLMiRhiwZ1pe6OBbKG1kM3XVSDobO +8z5vSmChg7aJ/SElchAW/DmAxJ5sEttfMioH+9y5ItUSWWhH3lZxBUd5GFi2 +KTuP3URzeci9dyMUtIqctfmXhaZ/MP8Zi1OAl8oXe5bOs5CYn3HVQwslyHJJ +sExLYqHRPD5Pa28laFW0b3mLXfOlXfZ7ghLIooxcvmQWOmZ+PE6tUQlMn9n5 +xmPnbQk9clVbGaBKLCg6BX9//P7PKEkV2HRnk1Z8GgvZePBrmA2qQsX65gvd +mSyEQm217f+ogoAs00P+Cgupx+fspEurgZz1xxwGNsddqmHUYTVI63FSILFL ++p3tK5+pQce1PnepbLw/7YpjZe5sgrn5K2TANVyfscXHcRoF9D1CzdxzWOju +0azPc1EUeCs9fK4aO5k2yFx9nQKdp8xleHPx+o45NSH/gQKnd4vYlWKL1N/k +OGqkDklFiSJ/b+P1Q2Wr1ylvAZcq4asVeSwkq5QSfXF4K5hFrp12KmSh+guz +lAVODRhWU45txD4249hJKGqAj29IhFoRC91qUqEYumhAVdrTihlsJY/ajvlu +DVAVUlS9XIL7WzyiSrzZBickAjaPlrOQnKw8oeCoBVdraoq+PGahrfknBZaQ +Nmw1t//D/4qFaPQ4UsNSG95ekH4fh52tnN7vekwb1r/K5PyNzXWnrLw5TBtc +u55FfW/B++3WuE16hTZ41q/70vkan6fZrjcpylQ4U9+4pfodnt+L5tsceHZA +BS2JUv+RhW4Hq1hXt+pA8IPHU0MsFmoPRTvP5euDFJ/F8EbRMaTo0mV53HcP +yHcvVtgZjiHG30elcqcBblXyxLucGkOSEzVrJGmGYKslFGj/cAydpBp8SVc3 +hvLlnH0nZ8YQ7fvvFrFxEyif4l6zXe8bKjEMWZPTdgDiw5313c5/Q3mz3s+K +M0xh4nqWusPnb2h+n9TbpuhD0By6qmN21zjq4+CaGnSzgH2fjrLzcsaR/4aA +1FhlK+iJu2J7jWsClXq1NGbGW8Otd1PvU0InUPiM9NwWr8PAZXY/bYI1gUiz +/XavThyBy5v7BvW9JpG+c9q+kcNHodI9PCWZPYk6pG96N1FtYLdJuW9w4Hck +cy+uvmCzLUS/arq7mouNapjq5paCdmDS5b8wl8pG8p0/PUK/28HXmTGlLIUf +iJqZVnyXaQ9lUWvnfzX+QDdXz2xLf+EA9Rb60foaP9GjfZq98U8cIbOJbaR5 +9ifK3nlB5HehEyQSSpVC3T9R2+f8BOolZ2glvwlobppC1RY3VAJjjsGC9JoD +j6Km0JTfUQ5/+nGwl+Koy2qfQuR+iifbyAWWD8V5ZStMo4Lvn+ZDdE+Az/Wh +51mh08jhdr77cQFXsDwtvT/p5TR6WHnoBFeiKwiNOfOqSs8gfdmOhfMLrtAQ +8Y6/nj6DlJkeve+93IArw+LeXNEMGub3sbox5Abr25+Xu5IzqD3Z0v2ALQ2q +xt5xlujMooywHP5T7TRIxQ3SobOovuHvgrupO9S9OdTmXjaL1h2DRGqtO1xX +aVyc759FCutftW2od4coA6Z67cAs0mq1kOJpcAf7D3mscOYsOmLg/KDnmTtI +66XwLA3i/A2hb8785w57SyQ+ksOzSKavaF1LjztkSmfd7BqfRSouktnH5twh +Xm/LgMGvWaTvyi6I30GH5K2p7Dv8JLp39WeIpS4d+BU8vHcLkGj9h+m9knp0 +uF13IfwDNttkrrNgNx2G+23sOYVIfH5xrGo1pMPqPkMOZ2ESCc2JOIoepoNr +w+bFufUkGk7SWZvjR4fceZ/RATkSJddFetXco8Pmjo3ZtG0k8tPO0g8roEPi +uvHFL9jmDyrW6hXSwZyz5qedJon4skYfPC6hg5aiSKapFonig63HH1XR4V3Y +tQYK/s9HUlR8qp/TIWun9bkuHRJ5Z73xreynwzLZZd9rQCJToVGDYCYdDIaS +fu3fQ6LN8RyC2l/p4OmxoPoQezRYp6RihA7/JebrXthLIjfLnO/lk3TIU/CX +owKJHLhD/MsW6dAp2TMVYESiAyEygcUSDKDsNDfMNCXR85wEs3QpBjx6fKF3 +CdugdVolTIYBEnucv7uZkUhL9c0nI3kG9HrQz249RCLp7gijz6oM6BZa8qgz +J9HErj4JPh0GxGYWCDdakSiFM/epx1EGlOVecqDb4v5rCmRb2DJg+u+GjbXY +55zDgqn2DFheXj6+zo5EYVXWm/46MWDCKdS4BtuNWJV2hcaA6xf9KrkcSER9 +TaO/DGIAzfLB6lgnEnWnqfIrp+L2mSkp8RMkKkWCnmNpDOjwENWzxT73fbap +5DIDiHtBAxnY2qZNUXpZDMitfNYs6ornj8N92uIWA2RLYn7xupFof0Dup7Bi +BthHx7zvp5FITu5f3b2lDPjPujJA0p1Es68DLnOVM8CwJCbTCvuOGrJIfsiA +a9vf/tOA/aevr/FuLQM4pxWuXKGTqMpctuBdCwMcL7zfrkWQ6OIiJ3fGa5yX +kmDihk0rGHdzbGWA1LApMw1beHWt7HAbAxaLegunsH3rHFIWPjJA6bzR5SIP +EimrXwlVGWHAxws+hbxeJFrsPvPh2ygDkjzst2hjt8cztMrGGBCV0q3tjB01 +uGNcf5IB//Ce7irC7s3+cNxqhgECfHGeB7xJlL5GxCR8FQFPX6xt9PAhUf10 +n/NJLgJq7G6lJmGz+gqD/bkJuAaM/yqxDaqMc2lrCTjf6B2yhD3qGrZkJkLA +/KqYgnhfXL+5iaiJGAHdf94/uYe9e6coBYkTENQvQ32FnSpYbEeVJqBx9tRx +Hj/cXjtQIatIwEPeq6lnsIn84hZxZQKs+8aYV7FTU08PrFMlQFztd3Y19igh +JriaQkDaU1uYWGkXO+A5qUXAVKmej5U/iWqXxaJHtQlIYPMsENgj35iZzB0E +GOv7sc9g72oMf9GpR4BmDntdIfawb6n8UyDAN9ZYYwlbyCFC57EhAaWCR+YE +A0ikb3TQvMKYgM8HOzcrYCdLfz2df5CA3LObnhti16wuS80xI0BXY4pyFHvo +R8T9q+Z4/PoVFmjYes3iXUnWBFSJ5L+NwaZVfJ1IPELA2X0zHcnYSTfKOM/a +EDDReQ3dwP4abKoV6kBA0ei4ZTW2oIvEgUAnApjiyVONK3mmQ8e9jxHgxRez +9Gbl/Y1nLrq4EjDAe8CEuVIPn9kdBxoBts2S8d9W8kiJJ0foBOiUb9s6vZI3 +ONRmThCweer8rsWVvNby0f2eBGzp3FS+KhDX9/jMH/AmILuJJ4kXO+mO2frd +vvh5S9X3Qtg1SZJbdPwJYG84G7ke+2vY8D7NQALs/8imSGML0CscKMEEGHyZ +4pXH3mkVFaB8koDmZs5xxZX8XYcS5EIJiB630FbFvqQqdVMyjIDjmR2Dm7Af +CY88FAknoFgndZ6CPbhU8Zo/kgAxp4TQLSv5rKhB7igC7ldUOW/F1u04NP83 +moAOftmCFf8f6DX5EA== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, - "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.4834141591801878}, + "PlotRange" -> {{0, 180}, {0.733678210326483, 1.3398863379122656`}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0.7336782103264846}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10305,7 +10438,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.4834141591801878}, + AxesOrigin->{0, 0.7336782103264846}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -10333,7 +10467,8 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.48341415918018676`, 1.8971786059380225`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.733678210326483, 1.3398863379122656`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -10341,9 +10476,9 @@ icXZpT660RQ2LlQ5FkC80i0pQiOWwlXWKSkb/uWvckpXiaPQ01xrrxvxIS2F Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913460797739086`*^9}, + CellChangeTimes->{3.9913460797739086`*^9, 3.994388107780628*^9}, CellLabel-> - "Out[443]=",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] + "Out[118]=",ExpressionUUID->"f5a7e4a3-ca62-4766-be9e-471ccd2babdc"] }, Open ]], Cell[CellGroupData[{ @@ -10406,207 +10541,170 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.9918502644064465`*^9, - 3.9918502684162617`*^9}},ExpressionUUID->"42ddbf41-0bd8-b749-bead-\ -56c89a9b7467"], + CellChangeTimes->{{3.9918502644064465`*^9, 3.9918502684162617`*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7282513679946418`*^-262\\\", \ + "\"\\!\\(\\*FractionBox[\\\"2.544279788040686`*^-270\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 444, - 477, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080016945*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 119, + 41, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994388107965488*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], +In[119]:=",ExpressionUUID->"b79d4314-8f2e-46b0-8452-a3fc50b34fa4"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.1421038932835147`*^-273\\\", \ + "\"\\!\\(\\*FractionBox[\\\"1.487522022271398`*^-281\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 444, 478, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080026985*^9}, + 119, 42, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.9943881079774723`*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], +In[119]:=",ExpressionUUID->"c60069f1-b22f-4e1b-a462-83d02ca283cd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.655058850000931`*^-284\\\", \ + "\"\\!\\(\\*FractionBox[\\\"8.696849211093946`*^-293\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 444, 479, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913460800358925`*^9}, + 2, 119, 43, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994388107984623*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], +In[119]:=",ExpressionUUID->"fe4810bc-2b49-4fdb-83c4-c067ac347b31"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 444, 480, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991346080043894*^9}, +during this calculation.\"", 2, 119, 44, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991346080016945*^9, 3.994388107991946*^9}, CellLabel-> "During evaluation of \ -In[444]:=",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], +In[119]:=",ExpressionUUID->"254b2e42-c0b3-42cd-9547-78a3a61de0ca"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8FO8fAPANJSp3rGvtrqsc5Yqw2+cjIpTk6KBECCUVoihXEZEvqUhy +hZRrd8rdScrdRZGSUCFJPxEKv+mveb1fM8/MM8/zOWYY+4/YefJQKBTaIgrl +33Gqt+mJUnzeBvXwl9IT0qYbOjKpJ026okCv9v3VK9EMwJXP91O7LsIpt1wL +v2htCLK9/Za3KxeeVgXctYs2AdExqYszbwk41Nu9UTV6O3y8Z3Pk19s6CPQu +H00/6wbmSiMffr59BXFt7oEhUcdg5q3B5fG3/dBe+V8Yb0gk1JvezHuZOwF/ +Te1yxYUvgtzH6i/7NeYg7zulzCckHSR8993mN+VF6kjn6nb1HLiobV5r47gU +Dxy4x01QzYfuNK1HP0VWYFDi5bqZC4UQnxf+nEdaFL2uFD3ufFsEVno+YisV +RZEV9MGjd6AIlj6xc1TVFMWw9wU8fT+K4OyAco+1iShGflFRbucvhlPM1i+X +fETRRvO/RkeDYvDLps6r1Iji7FOzQpHLxbA9g6th7SyGCwdKXVWsS0Dq0kBc +ynVxjHFoUPHOKQWqevnZ6QJxTLQUtx2/XQoydTHhezniOK+aNHXsbinQxlcf +V60Xx9qH9hVuz0pBectR19ohcWzftabvf6OloMs3pz+gK4FrTSR63+mXwbZA +yUGdZgmsNlhYVNNQBuccLDe8mlqJGW+G9R55cUDmbrsMzyJJZCk+e83ny4FS +cYff2sskccbZ49Smoxx488qFk6wgiefbrIdrTnBAaXsgc/tmSWzzVVQNiuNA +3dasJS+uSqKiX32/5m0OzJlPtrexpLCwOEwte4gDSQUhRXPmUihO/ersOUqO +X0KJ1dwuhcqqQRdUxjmwpUHQ5IKnFHZHscczfnMg3ZR+Z0uiFA7rsMt2L+HC +erRObfkohcYqAWNiilwIMMzZ1xRFxTJVRuaZ3Vywyhb6ZZ1AxZcsjljyHi4w ++U/Ftl+mYteaWf5r+7jwomMH93UhFTe9qwrM8+TCmqPLeXvbqXh1enrHhWNc +GCoILvifjDQWL+IzrYzlwh4Jm++yd6RR0lpC2vcuF3RDayMz70njq7m6SoFK +Lgj2r5JkPJXGOVW17hvVXKgu4wWVbmk8rl6S1/aAC5LW1UlaC9Joa5+y/3cj ++fxIJb1N1jKIIuPXb7zngtmP2RC/ARkcybI57LqIgJObL6k9HpXBoTTzxjO8 +BJTmaL4Tn5JBobyp9huLCaA6uBpWL5VFR+WYvm4BAkarGn7zrpHF5tpWWZoY +ASlRSYFXT8hi1sIZbX4mAY09q5VGI2Wx4EKf96QiAX/16l9viJfF6O1nbfuU +CTjwdVJn8Los6kV91S5eTYDRFuefa+plcZ7CNpfTJqB/pYrfkxVyeP+K3SIX +IEDqyEN5KSk5pBru9JQyIWBL4642H7ocevxRC2/bSEBFSLyGsK4cPtte37nW +nIDzH8dHdu+Sw99uZ6XbthCgc6vW60euHAb2PHM4uJuASNZ2N5n18mimYZqq +c5SAzS6Z/zPYKI8cVKdkHyNAKOLbGcct8kjR4k0XCCAgoz66IMlVHi8aCbi/ +PE5AlVXNtyVx8hjW7LZHN5SA8V2KQRPd8ljO/RFuEk1AZchRftFBecwuUDP3 +jyEgLON+2poxeSx6O2+RdY6A5X07a314aNj5w2LRWBwBql4JlD41GgZvCXBx +SSTA5fjk+dZQGu5NafGKv0KAcupGuZFoGlK+CkBE6r/1/6+EP4mGm+883Hss +jYCQv6tfbMyjoXEIEbg5nYDLZ1xWVrfScIlgD635OgF78osK3ryh4RmYsMjJ +JID5bNrgVx8Nh8/2PwjMIoAjmOK0dpKGjr3xV0VyCGhNfpaVL6+A5h1a0nJ5 +5P7ekdCuV1XAxgR6Yydpp063uj5tBbwpnNQSn0/AEPXvoKy5AjYY7no9WkAA +b7aW2kU/BRyZLJuPukVA8+PTtWUnFPDQbJWPwm0Ckgaat7RFKeC8sY5WFWma +queRpakKmHqb53VvERkPpVfvhj1UwNDnenGUUgLM3rbPjTUqYKxyQ3gwaRsK +n8W+VwoYwJdj+420u51fN3xWQN6nhmebygjwC73B5IwpIPVz8JAuh4ATeV2H +6NMK+IKPT+0aafNQRnjEYjouvSG62ZVLQIvwvRvrBel4+pWMygPStnk7GseF +6BjqHjlIJQhwbosXdaPSsborbHED6aMKUzdM1Om4qkNk7PcdAibvJDXOrKXj +wvrOQdZdcj82q3/n6tEx85dxXRjp6GOu+swNdJR8z9CbIS245I/Tu410dOMY +N2uXk+uRfjn8ogUdt6trWnmRTq9vbuTZTse+bx2CTaQVdnl+r3GkI6+gxtZJ +0nmjC6IBTnSsDcs4RasgQC0yXV99Hx3Hs6evmpEuW7nOecCdjl3nxQu8SOvd +fh5+zZuOntKPc86RrtlwMM/+MDn+W+eFPNLwmq9pmT8dr+5XPfSA9BOvrO/1 +QXT8lBVv1Ena8q+h2KlQOk5Hd/8dIt2e1KGvF0FH08ohYoa0g/IR59GzdEy+ +nLyXv5KA7mqBiLw48n4mJXOipF1s8vL2JNLRK33lJWnSg/0bmiRS6PiMlc+g +kfYJ7v7emko6yuCmAumxZYFi0Rl0FDtTqPzvfEC2kAE7h44hIp3X/42f1rvl +PJlPx53V6SJipMOaTCNKbtNx/unbsH/P53XpzfMso6MB+9Dwv/nF/u9Ek/xd +Ot7u1ts+TFronPhYZxU5f/GVlf/eL0W2VCzxPrke0t9lH5KmcjYbmNfRcaoj +MyKf9HWzAef5p3Q8Prj8SyxpZvfpiIoWOjZnymz1IV14mJrv94KOgqLFFeak +NXnuNKl00lF3Pl+RQZq4snWst5uOOb3fL02T+7defUgstZeOER99lrWR3ugg +v4d/iI6toenLDpN+NlQZ8XCUjr6/aKnrSW85bZcf/JOODebB6otI7yw4N/Z1 +lo6x763848h4em/EFM9eoGNLwjUVS9L7n98z2MXHQPsfB78uJu07/TOicQUD +N65bfzGIjFejYwckv4gx0PLY+WlF0ktH3hXxUhl4KiLjWxsZ3/k99W82MBnI +7qo/JUU60GG97x5VBg7Ys+UryfzY2Fa8KESDgRr8sM2edO+Dyxrl+gyUvlHi +G0nmV7GBYN0rYwaelI9xEicdwgnbOY4MtPp5vzeHzE/JXK8odWsG1jVrlN0l +83dbtGFXzj4GrnrodpFbTNaD+ZLDDz0YaE2Lc1xFejSIyfvBh4ESgcNV18j6 +EOu9bA01kIG7OHaeJ8j68cj6w5nEWAYOCw8FCxSS9V4scm0ol4Eq1Oms+FwC +KPGTT9IqGChcpDvfSta3dt6DThW1DHQo5xFdRvrQpF30zwYG9lj8t/s0WQ/z +upR6vN4xMP7j33SjDHK+WY0xDrxM3FFyY4n0ZTJ+pdhy/kuZWF3Ra61yidzf +JC73vxVM7Jp656SVQr5PVPr7ZikmKoqE9Rglk/P19NUx0WDijMDBC6svEDCj +LtKr6cjEk3LqX/zOEjB1XSZS14mJLc/oL2zOEPBLWFnJcB8ThfFJhXoUmQ8T +hgfNfJgYQuwNfx9O9sda9ymn00y0l1xgypD9p9m6Uig2n4nQxv64hOxf6Ydc +oH+SPG+UVFDmREDqB+/+r7NM3B9387E22f8ubQuI/r7ARFGRr3zcnQQk6sa2 +TAso4vyd4wI3HQiI+sPdKUxTxHdtIjrHbMj1iV98lGWuiD1zFHY42X9ZRcXZ +V64oYsY60E0g+3kPvShr0zVFXJrMfdNJ9vuQK7cyf2Upoulc/Sp58nugMrIg +w+6WIpYMRH/Io5H7sys7TeieInaP1NxOkyJg9eJLSTGfFPH916FeMfL7QnJf +aESQhhKqxM9JOo1w4aeYleuOOiV8Wlg4H1zAhS5f5ouDz5TwyFuP/sV5XHj0 +dBbCW5XQNEnGOzmHC0khRQqFb5TwoNWbfTkZXNDqX/5xZkQJfVJ2auZf5IIf +9/ne6+LK2NCbdZMdxoWRbY7Ogx7KuHr8jst9ey4MJrju8OdXwdNbn960m+aA +5Y9gy8/6qsjKSTnHNuTAqPvSgLvhq3ARxZballtK/h9I8ZyrW40rvHWFJsqL +QaxNJZHzQw3/F7j7ifXr2yAXW2arr6+Bu/okO2aqCyFN3VBE3EsTVzgvTbR7 +VADNMibrJpLX4CJ+x20JHXlgJFeXtPbNWmTZOAd/bc4FId7cQLcoLXxiG35e +fjIbaJEKrN0q2iiotbeCq5AJAsp7KuyeaeNljZa/cVnpsIYtXRa8Vwdp3a3+ +6Smp4N8rVm9F0cWhS458YTGX4MdEgqNlmi7WGiRS6r8lg8Xap+mWmno4PrGx +6772f/BgwvjP73Y9DH+fdGZx4Xnw09B599JzHeZUdiw79ikG2GMeHbsF9FFb +Kfj4OtMzsEmJunVFrj42qmVy/LdGwKqI8yfqDAzwboOlsPq5UFDzNHyo/M4A +q3ICbGWeBIHnA++zd4+tx+G/teWXf/nDw+wOj58rDZHTVDc30e8HvwoXfq+t +NMTBlgOzvlQf+LLDPDuu2hBnbbQ/lPP5QBffhc0DtYaYmOnOv/ynN9S6yly9 +8sgQ9zjZS/Y1eUMUdZ3RXJMhfswX3qtyyhtEYg+ean5viKZbz8cpD3iBhlcn +xZPHCG9FMa8/qDkA7spFAulbjTBwXmJ8INEDQhpcDqrYGuGnlTGXB055QJKn +WAthZ4ThFbx94wc94F7+yYSWnUZ4w97ZVM/CAyRUNgvPuZGeSXfZS/GApyqf +JVyDjPDP45om7ePuoLZKga6SZYQ7W1Xli7z3w0+1FH1i3AhZr4ZLVI67Qlcr +bhKfIK+/aczd4uUKj/zG7AMnjVC11WDw1G5XSCQsj+nPGiGHMvToD9sV1Iwo +xTW8xjiZWlXkz+8K+y0PM+oljXF/0ZElEev3QYeXxfIOljH2CymsdknfC1V5 +fz5Nxhpjt87BSJ0rTqBvGvjbKt4YL4prKZaEO0H5p9Hl2ReM8WXEm+T1Pk5A +0HoNrC4aY8qOw8WRLCcoTnt0IfOaMYbW2Fb0DOyG7IRoQ4tSYywuzlYtWLcb +4gKFk9NeG6N7sWrN1s87wclMEY1pLFxs0XH7ob8jzHUsFaqns1D/96ZD510c +IdtzrMdKkYWW4kVCB6wc4UtMdbDTKhbukRZ6vo3pCP5N28pO6rBwVKZm9Nsr +Bzhvc4pWZc7CwgEjd5aBA9Ts6vyrd4SFr0OUON+X2YPs4XPVax6xcJJ3dQl9 +wBYSFw6si69jYVOF3PL+17bAc9Gc+/UJC3WLj5aXPbGFkYrFt7KbWOgzm9Rw +pMAWaihn08ResxDTBX9GHrQFp0sRwVOfWajBE+/cPrwN0mpPrnuwjI1GNRlt +v5VsYKWgL3frTjZOOQuIK/ZaQZ7p6ZDx3Wy8Mzqa7lNnBTqnE01T9rBRye/z +m6YCK7AZ53R2ubFRo0dL+u0RK4h5Mznj7stGwZyKBCavFUznhm8MiWRjgNDf +s4fWWMI745TXBUVsdA8/N2WUagHex/MyLEvZyFbfZ5ocZgFTpeXkbywb/cXm +Wuc9LUCM2fVbu4KNJh97rBTWWYD1Unm5+4/Y+Lhv/lNAhznc6yjweN3Jxu6V +FhrOUuZgJVSlGdTFxiGziXA5ijl0WTRNUXvYmJRF+zoxtAl+1XyLdelj4/oN +ZjcHazaBZo5WyfAIG4+vuP6rZd8muPfOJCjhOxt7lB4PG1tuAisJe1g7zsbN +/Mb7H+tsggPnjr8MnGTjXPyfy8uXkPd7FJMuNc1GC+0GzVc/zCBqNtW9ZpaN +6Zkji0q6zUBE75bG3jk2dl1qplyvN4PMwzWTCwtsLA9/Ts0tMYP/A71YJ+E= + "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -10620,166 +10718,125 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwV13k8FO8fAPANJSp3rGvtrqsc5Yqw2+cjIpTk6KBECCUVoihXEZEvqUhy +hZRrd8rdScrdRZGSUCFJPxEKv+mveb1fM8/MM8/zOWYY+4/YefJQKBTaIgrl +33Gqt+mJUnzeBvXwl9IT0qYbOjKpJ026okCv9v3VK9EMwJXP91O7LsIpt1wL +v2htCLK9/Za3KxeeVgXctYs2AdExqYszbwk41Nu9UTV6O3y8Z3Pk19s6CPQu +H00/6wbmSiMffr59BXFt7oEhUcdg5q3B5fG3/dBe+V8Yb0gk1JvezHuZOwF/ +Te1yxYUvgtzH6i/7NeYg7zulzCckHSR8993mN+VF6kjn6nb1HLiobV5r47gU +Dxy4x01QzYfuNK1HP0VWYFDi5bqZC4UQnxf+nEdaFL2uFD3ufFsEVno+YisV +RZEV9MGjd6AIlj6xc1TVFMWw9wU8fT+K4OyAco+1iShGflFRbucvhlPM1i+X +fETRRvO/RkeDYvDLps6r1Iji7FOzQpHLxbA9g6th7SyGCwdKXVWsS0Dq0kBc +ynVxjHFoUPHOKQWqevnZ6QJxTLQUtx2/XQoydTHhezniOK+aNHXsbinQxlcf +V60Xx9qH9hVuz0pBectR19ohcWzftabvf6OloMs3pz+gK4FrTSR63+mXwbZA +yUGdZgmsNlhYVNNQBuccLDe8mlqJGW+G9R55cUDmbrsMzyJJZCk+e83ny4FS +cYff2sskccbZ49Smoxx488qFk6wgiefbrIdrTnBAaXsgc/tmSWzzVVQNiuNA +3dasJS+uSqKiX32/5m0OzJlPtrexpLCwOEwte4gDSQUhRXPmUihO/ersOUqO +X0KJ1dwuhcqqQRdUxjmwpUHQ5IKnFHZHscczfnMg3ZR+Z0uiFA7rsMt2L+HC +erRObfkohcYqAWNiilwIMMzZ1xRFxTJVRuaZ3Vywyhb6ZZ1AxZcsjljyHi4w ++U/Ftl+mYteaWf5r+7jwomMH93UhFTe9qwrM8+TCmqPLeXvbqXh1enrHhWNc +GCoILvifjDQWL+IzrYzlwh4Jm++yd6RR0lpC2vcuF3RDayMz70njq7m6SoFK +Lgj2r5JkPJXGOVW17hvVXKgu4wWVbmk8rl6S1/aAC5LW1UlaC9Joa5+y/3cj ++fxIJb1N1jKIIuPXb7zngtmP2RC/ARkcybI57LqIgJObL6k9HpXBoTTzxjO8 +BJTmaL4Tn5JBobyp9huLCaA6uBpWL5VFR+WYvm4BAkarGn7zrpHF5tpWWZoY +ASlRSYFXT8hi1sIZbX4mAY09q5VGI2Wx4EKf96QiAX/16l9viJfF6O1nbfuU +CTjwdVJn8Los6kV91S5eTYDRFuefa+plcZ7CNpfTJqB/pYrfkxVyeP+K3SIX +IEDqyEN5KSk5pBru9JQyIWBL4642H7ocevxRC2/bSEBFSLyGsK4cPtte37nW +nIDzH8dHdu+Sw99uZ6XbthCgc6vW60euHAb2PHM4uJuASNZ2N5n18mimYZqq +c5SAzS6Z/zPYKI8cVKdkHyNAKOLbGcct8kjR4k0XCCAgoz66IMlVHi8aCbi/ +PE5AlVXNtyVx8hjW7LZHN5SA8V2KQRPd8ljO/RFuEk1AZchRftFBecwuUDP3 +jyEgLON+2poxeSx6O2+RdY6A5X07a314aNj5w2LRWBwBql4JlD41GgZvCXBx +SSTA5fjk+dZQGu5NafGKv0KAcupGuZFoGlK+CkBE6r/1/6+EP4mGm+883Hss +jYCQv6tfbMyjoXEIEbg5nYDLZ1xWVrfScIlgD635OgF78osK3ryh4RmYsMjJ +JID5bNrgVx8Nh8/2PwjMIoAjmOK0dpKGjr3xV0VyCGhNfpaVL6+A5h1a0nJ5 +5P7ekdCuV1XAxgR6Yydpp063uj5tBbwpnNQSn0/AEPXvoKy5AjYY7no9WkAA +b7aW2kU/BRyZLJuPukVA8+PTtWUnFPDQbJWPwm0Ckgaat7RFKeC8sY5WFWma +queRpakKmHqb53VvERkPpVfvhj1UwNDnenGUUgLM3rbPjTUqYKxyQ3gwaRsK +n8W+VwoYwJdj+420u51fN3xWQN6nhmebygjwC73B5IwpIPVz8JAuh4ATeV2H +6NMK+IKPT+0aafNQRnjEYjouvSG62ZVLQIvwvRvrBel4+pWMygPStnk7GseF +6BjqHjlIJQhwbosXdaPSsborbHED6aMKUzdM1Om4qkNk7PcdAibvJDXOrKXj +wvrOQdZdcj82q3/n6tEx85dxXRjp6GOu+swNdJR8z9CbIS245I/Tu410dOMY +N2uXk+uRfjn8ogUdt6trWnmRTq9vbuTZTse+bx2CTaQVdnl+r3GkI6+gxtZJ +0nmjC6IBTnSsDcs4RasgQC0yXV99Hx3Hs6evmpEuW7nOecCdjl3nxQu8SOvd +fh5+zZuOntKPc86RrtlwMM/+MDn+W+eFPNLwmq9pmT8dr+5XPfSA9BOvrO/1 +QXT8lBVv1Ena8q+h2KlQOk5Hd/8dIt2e1KGvF0FH08ohYoa0g/IR59GzdEy+ +nLyXv5KA7mqBiLw48n4mJXOipF1s8vL2JNLRK33lJWnSg/0bmiRS6PiMlc+g +kfYJ7v7emko6yuCmAumxZYFi0Rl0FDtTqPzvfEC2kAE7h44hIp3X/42f1rvl +PJlPx53V6SJipMOaTCNKbtNx/unbsH/P53XpzfMso6MB+9Dwv/nF/u9Ek/xd +Ot7u1ts+TFronPhYZxU5f/GVlf/eL0W2VCzxPrke0t9lH5KmcjYbmNfRcaoj +MyKf9HWzAef5p3Q8Prj8SyxpZvfpiIoWOjZnymz1IV14mJrv94KOgqLFFeak +NXnuNKl00lF3Pl+RQZq4snWst5uOOb3fL02T+7defUgstZeOER99lrWR3ugg +v4d/iI6toenLDpN+NlQZ8XCUjr6/aKnrSW85bZcf/JOODebB6otI7yw4N/Z1 +lo6x763848h4em/EFM9eoGNLwjUVS9L7n98z2MXHQPsfB78uJu07/TOicQUD +N65bfzGIjFejYwckv4gx0PLY+WlF0ktH3hXxUhl4KiLjWxsZ3/k99W82MBnI +7qo/JUU60GG97x5VBg7Ys+UryfzY2Fa8KESDgRr8sM2edO+Dyxrl+gyUvlHi +G0nmV7GBYN0rYwaelI9xEicdwgnbOY4MtPp5vzeHzE/JXK8odWsG1jVrlN0l +83dbtGFXzj4GrnrodpFbTNaD+ZLDDz0YaE2Lc1xFejSIyfvBh4ESgcNV18j6 +EOu9bA01kIG7OHaeJ8j68cj6w5nEWAYOCw8FCxSS9V4scm0ol4Eq1Oms+FwC +KPGTT9IqGChcpDvfSta3dt6DThW1DHQo5xFdRvrQpF30zwYG9lj8t/s0WQ/z +upR6vN4xMP7j33SjDHK+WY0xDrxM3FFyY4n0ZTJ+pdhy/kuZWF3Ra61yidzf +JC73vxVM7Jp656SVQr5PVPr7ZikmKoqE9Rglk/P19NUx0WDijMDBC6svEDCj +LtKr6cjEk3LqX/zOEjB1XSZS14mJLc/oL2zOEPBLWFnJcB8ThfFJhXoUmQ8T +hgfNfJgYQuwNfx9O9sda9ymn00y0l1xgypD9p9m6Uig2n4nQxv64hOxf6Ydc +oH+SPG+UVFDmREDqB+/+r7NM3B9387E22f8ubQuI/r7ARFGRr3zcnQQk6sa2 +TAso4vyd4wI3HQiI+sPdKUxTxHdtIjrHbMj1iV98lGWuiD1zFHY42X9ZRcXZ +V64oYsY60E0g+3kPvShr0zVFXJrMfdNJ9vuQK7cyf2Upoulc/Sp58nugMrIg +w+6WIpYMRH/Io5H7sys7TeieInaP1NxOkyJg9eJLSTGfFPH916FeMfL7QnJf +aESQhhKqxM9JOo1w4aeYleuOOiV8Wlg4H1zAhS5f5ouDz5TwyFuP/sV5XHj0 +dBbCW5XQNEnGOzmHC0khRQqFb5TwoNWbfTkZXNDqX/5xZkQJfVJ2auZf5IIf +9/ne6+LK2NCbdZMdxoWRbY7Ogx7KuHr8jst9ey4MJrju8OdXwdNbn960m+aA +5Y9gy8/6qsjKSTnHNuTAqPvSgLvhq3ARxZballtK/h9I8ZyrW40rvHWFJsqL +QaxNJZHzQw3/F7j7ifXr2yAXW2arr6+Bu/okO2aqCyFN3VBE3EsTVzgvTbR7 +VADNMibrJpLX4CJ+x20JHXlgJFeXtPbNWmTZOAd/bc4FId7cQLcoLXxiG35e +fjIbaJEKrN0q2iiotbeCq5AJAsp7KuyeaeNljZa/cVnpsIYtXRa8Vwdp3a3+ +6Smp4N8rVm9F0cWhS458YTGX4MdEgqNlmi7WGiRS6r8lg8Xap+mWmno4PrGx +6772f/BgwvjP73Y9DH+fdGZx4Xnw09B599JzHeZUdiw79ikG2GMeHbsF9FFb +Kfj4OtMzsEmJunVFrj42qmVy/LdGwKqI8yfqDAzwboOlsPq5UFDzNHyo/M4A +q3ICbGWeBIHnA++zd4+tx+G/teWXf/nDw+wOj58rDZHTVDc30e8HvwoXfq+t +NMTBlgOzvlQf+LLDPDuu2hBnbbQ/lPP5QBffhc0DtYaYmOnOv/ynN9S6yly9 +8sgQ9zjZS/Y1eUMUdZ3RXJMhfswX3qtyyhtEYg+ean5viKZbz8cpD3iBhlcn +xZPHCG9FMa8/qDkA7spFAulbjTBwXmJ8INEDQhpcDqrYGuGnlTGXB055QJKn +WAthZ4ThFbx94wc94F7+yYSWnUZ4w97ZVM/CAyRUNgvPuZGeSXfZS/GApyqf +JVyDjPDP45om7ePuoLZKga6SZYQ7W1Xli7z3w0+1FH1i3AhZr4ZLVI67Qlcr +bhKfIK+/aczd4uUKj/zG7AMnjVC11WDw1G5XSCQsj+nPGiGHMvToD9sV1Iwo +xTW8xjiZWlXkz+8K+y0PM+oljXF/0ZElEev3QYeXxfIOljH2CymsdknfC1V5 +fz5Nxhpjt87BSJ0rTqBvGvjbKt4YL4prKZaEO0H5p9Hl2ReM8WXEm+T1Pk5A +0HoNrC4aY8qOw8WRLCcoTnt0IfOaMYbW2Fb0DOyG7IRoQ4tSYywuzlYtWLcb +4gKFk9NeG6N7sWrN1s87wclMEY1pLFxs0XH7ob8jzHUsFaqns1D/96ZD510c +IdtzrMdKkYWW4kVCB6wc4UtMdbDTKhbukRZ6vo3pCP5N28pO6rBwVKZm9Nsr +Bzhvc4pWZc7CwgEjd5aBA9Ts6vyrd4SFr0OUON+X2YPs4XPVax6xcJJ3dQl9 +wBYSFw6si69jYVOF3PL+17bAc9Gc+/UJC3WLj5aXPbGFkYrFt7KbWOgzm9Rw +pMAWaihn08ResxDTBX9GHrQFp0sRwVOfWajBE+/cPrwN0mpPrnuwjI1GNRlt +v5VsYKWgL3frTjZOOQuIK/ZaQZ7p6ZDx3Wy8Mzqa7lNnBTqnE01T9rBRye/z +m6YCK7AZ53R2ubFRo0dL+u0RK4h5Mznj7stGwZyKBCavFUznhm8MiWRjgNDf +s4fWWMI745TXBUVsdA8/N2WUagHex/MyLEvZyFbfZ5ocZgFTpeXkbywb/cXm +Wuc9LUCM2fVbu4KNJh97rBTWWYD1Unm5+4/Y+Lhv/lNAhznc6yjweN3Jxu6V +FhrOUuZgJVSlGdTFxiGziXA5ijl0WTRNUXvYmJRF+zoxtAl+1XyLdelj4/oN +ZjcHazaBZo5WyfAIG4+vuP6rZd8muPfOJCjhOxt7lB4PG1tuAisJe1g7zsbN +/Mb7H+tsggPnjr8MnGTjXPyfy8uXkPd7FJMuNc1GC+0GzVc/zCBqNtW9ZpaN +6Zkji0q6zUBE75bG3jk2dl1qplyvN4PMwzWTCwtsLA9/Ts0tMYP/A71YJ+E= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.07310674507562985}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -10791,19 +10848,19 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.07310674507562985}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10817,165 +10874,124 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13k4VV0XAHCZuUhEomS47uhSMqSwFqIMScYMmTJmLkmkkDFDJaE0IGlW -QjIk4d5UQiKUVGSoSF6Sinzn++s8v2fvfc5+1llr7XMUvUJtfLi5uLjylnFx -/f86N/ishZyeY2DKNNORqXQx6L4kc9iwbz882zSSXBSgCyjV4SXTlwCNNyZu -+ASYQaT1zV6evmz4dXFIaVOAE6z4vir7d28xXPjevzjkHwAf6q1CZ3vvg7j8 -jskGv8NgSv76frq3CZbdee+7bW8a/O7VOfujtwvclYO3xO46B83G10peFQ9D -y70+kBK/CWs+1Ix6qU6C57GYMft/92FlkPtNAeMZeFBnVlwa+hCyN5jWWdnP -Q9aowbh+yyNQf+e0Td9/HjKVUubev3kEbYnBr5kx88AbGqQS8eUR8PflfBMs -mgeXwaedCWINEHN0WK55Yh5sO/lf0XY3gPeLuCM6ib/h8epm5TNfGkDbp05f -oeIPiFdefO7O3Qj9+esbp8UXQemEk/Rj0Sdw/vWt5ZEqi9DD3ugcJP0EnMWo -7n90F8HhxJiq5LonMHB87T/uvYsw+PL0wR3rn8DHEGG9lVWLkLe+3TbC5gmM -b/1cre30DzR/r7ROO/sE5n/k3Y0pWoLAkKKjT6SboIYpubRUtQQjt2L3XZBv -gmjfLKvE50sQeaq4OIzSBAvvEiczZpagajHpB692E8QNP5TqUOJCFYvezgG7 -Jkhsv2r7MYIL9ZsMlbafboL0kmMd3KuX4eHSgJ5lfM1grhkgIaW8DLO/ZYYN -kZpBsMXGnspahnutbvrUSzRD4rDKOwtDYjzz025XhWY4otQ2mhOwDB8m1hla -bmmGkEKZf5TaZVi2RX/tt9Bm2HWhXNXChRs9Vx5mr+1uBnHVgtA9Ptwo96Qi -mfq2GdrrEu+HhnJj7s3heMZH4vnvHDflHOfGTaVKymsmmsFI9p/x+1vcuMXk -+8IdnhbQzDd3CV3gRj32w6j0DS2wKmc47cxFHhy9XnCXntoCMsyqxPlSHqy+ -8zGGK7MFZJuSj+25x4OP/BvtXp1uAfkf9IPUZh6M8vdleha0gIplmEfdOA9q -mab46pa1wEbeRe3hjbxYWaw69aKrBXZGSH/WeM6LkbI+VVGr2GBNGh/Me82L -nlw9fafk2GBTXNO/MMCLIDLOf2UdGxw6XTs4U7z4Q3v/8SoqG/aoXql1luLD -F4HC3Gd02BD4Wf10ggcf2iv16a93YEOKnZlB1xwfio07J/zMYoNsZbss9zJ+ -HJMtTsjLZkOZpN2vDSR+bL0/k66Ry4Y3XW73Tq/jR9oL4Xrbi2wg74pQ2rWd -H9e/IF8xusWGph2X+TvP8aOtSqPiazaxnzvk4aUr/Di1JMXF/4wNX0VuPlYv -40c73cD/NrSxYUVbZdTJJn6sFrKSPtjFBg/z51+tvvFjdLrN/uuDbFg0/dn+ -Uk8Af0SzDVt+suFUafStRVMBlP3NaE2dJ57Pz5XK2iWAPx2Wh5v+ZYMlW9gw -00cALX4Hq93h4sB5Y4UKyywB/BY2E0EjcWATWuS9+CCAdhdfUHvlOdB2ufPA -3y8CuLhaabeaIgc8luytmbMCqOw3Wn9UmQMpDR5C6YKCKHDzBo1E48AbvcgY -8w2CuPJI0O2u9Rw4oFvk/ixBEM2LtU6sNeSAeaHYrEWGIE4MnFs/bsQBJYEj -qe1nBZGu7bJ4eysHOrsdyl9fF0TGVLGYynYOqIWJ8Ay2C+JcTuaGDisO8PUe -zvPoE8SyV+KqgdYcGNAfYw5/EkSOTrrDMhsOpJOa7MZnBVFEzAPX2HNgvPRQ -6X+yQlhROH5CxIUDj0VHNh8kC6E78wAt2pUDuRE2Hb9YQjgQS+Ua2sMBEyPW -/AIKYX+o7d5CDw4Uvx8yE/ATQp0osnyfDwdcV1pNylUI4WhnQb5mKAc2xtTF -X6oXwkiHhhjTMA4ID9GkFTlCeD+DddcmnAM1d3mA0i+ERjrPRZwPcEDaoubU -+iUhTI32aiMf4sBkOUWlQlAYE56gi1AUB1pkcmq0JIRx20t703HCB0ZDhjar -CGOPnLHO2WgiPvFkTRMLYTT4eOTurVgOXBs/3frUThjPb7Kz2HuUA0d3Lrma -uwljYnbfTqljHGCtfZu0M1wYfawtz/nHcYA3cZtsV7Qw0oQPfBKKJ+L3tbLM -LlEY64Kr8q8SPvHwZK9TnjDepUq6tCVwwHPdYuBAoTBS6iIDHI8T+ZG8j8v9 -pjAahyZPDhAeszWhez8i1lfs2tObyIGG2vuPRjnC2Kfha2mZRMRXUcEmoFMY -W273VdcR3jr1JzpkWBidyIXCJ5I5cHh7DuPJhDBWx4yTxwiXFbHeSs4Jo8Nt -yd8GKRwY/sNJ810SxoiRJ6mnCcvYeejWCJLwitbZnkHCO+78HidJkNAgbcMn -SioHEvjP5LvJkfDddb07AYSr3VW3l5NJWK/jtuUa4YmH7F88aiTcch8yPxBW -lHC/5qBDQqOgjBKJNA44BM473EASlp2cTkDC6S2n+RfMSNgkK88IINy4lvnA -ypaElwabCjII/4xs8SlyJWFObHb/TcKMzj1Ssz4kvBFgONJM2I3+q8U0lIR/ -hpIaewmfSTgVcS6KhGvmVgWPEm59RydPxJMwN7p8Yorwgmbza4N0EhquEDOc -Jbwhy/X46RwSFil9C5wh7Dv2U+PzRRJGvBcInSRcgCeHtK+R8JumiuUQ4c5z -tOy0eyTU+MDH10WYb+aJ4UANCZttQwrqCW+2dJlWayZhzzPyimLCoVdnC+Pb -SFiuPe2XQLjkX6Z1dw8JWZYXi/YQ7nekclE/kPB35OzjjYTFyhvvHh4noeD7 -5hZewsbCzu5t0yScd3lb3knEM2rvjNi6vyQMThFMyyM8JEUJaREVwY4HcwtS -hFeFPl67apUIxnl6XHxJvD/L1t0vAxRE8B+3lnoc4QfR6arLN4qg0EKi2hsi -H769Jg946omgV0D15cOEFVgN6ZUmIjj0s0lIhvCJDz++Ou0WwW+vRzpMiPx6 -vOnE+dueIvjh4BP1HiIfZ08rmy/tE8Hg7n8n3Qm7bXW4URIrgnUuuk4+RP5q -3KjzmyoWQfsVRlu1iPz347ZfZXRbBDOuVg5cIOrlgst3Tk6VCG77Opa4RNQT -v5giZXOrCM5puok8IOrt7f7kz4mTIliiFK82HsOB5W3rcnrnRDA7eiSGRnir -So0xg0sUn9u0j+8l6res91txh4QoZl1RpbcR9R2vt8tTdpModursO+J1kAPb -3S79p2MkiiP/jrL8I4h4x307bm8pii2HBTT9if5xoTmp9JSHKC4/OG7hSPSX -h+a13/jTRLH3c+aP6SAOHAsSiCWfEcUVu3tynwdywDTLTszooijmxJRdu7iP -A92vvq+PLRfF1UHPJTf6c+DHbuXImX5RhEt8nnJ7iXqJDhNY8VkUP0TRrz31 -JPrJhUf5at9FUWxbdHAI0Q9FPjrWBXCLIWd/TtItol9S/TK4PjLEEP4rW//Z -kYjvwZ8n2mLEMBzzP+6y4IBKntGar0li+DnyxsFrZv+vv5N3BE6JYZJNfPWv -bRyIXqB3GpWI4R/5L5apRP8/e9xNqqZNDLf8qBTbp0+cP6efXr66djleXTwZ -oaFG5G/Zucqjj5cj345nO78R59XW3vbF763LsW7d495mIQ5YcfFuc+9ajpzB -K2L5AhzYaxPSDyPL8a+E3JmNPEQ8YhSPxfGJY/hvBT2dP2wIWzd3xZApjrpq -w3oHxtjQ4nd5sjlSHH2l313qaGCD2YKuxJEYcXxg5/BRqZ4N7ae6tTXjxPFK -UJHi/ho29NcIxZWkieO5lUt3eCvZ8J0UIZF0QRz9GoO0/1xng8y97TqmTeLI -V2uyg058LwTNT8e1iq7AYCv9mRuebNgc7is9KrECeSXdjA3c2CD49e0tHpkV -6F6gb9zuzIar75rfGCitwLcNve6fbNkw2HBWtUp7BXbJLgR2m7BhZ5JuX5H7 -CjwvUNj+g8YGDYl49ZjyFWhmkfJGdqIFfjPFB1n2Ehj96/qZOd8WmLsoG7/R -WQK36itdKfVqgdnlKmRddwmsVK33sHVrge8zuvu2BkggPfHaTLF9CwzV7Z1z -jpVAi6s1PbJbW+C5RbVY6lUJdCOJRIYptMD5QDcY+imBvFXtx5+/aQa9W7cL -c3MlceRdyvHZzc0wLWHu4dC0EtUmeYs7/z2BzxkeDvsFpLH9Q3JlfUYjmE0d -MhvRXoVRG9ZRaWYNMLFX8EDlMRm8IGmvlKhRR/x/rOJOaVqN3OSBYz4bH4LE -S0rWvSlZ9InWCPI9WgVrUu9aa2uvwZcCIo8cK+9DPlNXXNJvLQauvqsYbHIP -nssaas2clsenDnd6/lO6DZvXNJ1Sf7MOq03S206+uAZiPMURngkKKO/QaFLJ -KAH5+HV6ThRF3D29eqdDeSEIqbg+sHmqiFbGKr9fHSwANf3Vdw/tUUIT01oT -s3u5sH9QotmcSxlzZQOkXEyzYWomw94sXxmnLwttDCvIhIG+IoeL55Wxa9G7 -PCUhE54/euA4fUEZzbJXud0LyISSlI9O54qU0XosXklrUyY4y2m6fbmpjCJ2 -nodIbzKAbfTON+2RMlqOtVp/XpkBBafpUc+GlHFUsaVR7PIJ2KbOOW/GIuOV -7T4+KcMpsJt/u12nOhnfUkR6RtpSYN/7Z6KOGmSUsP2o4vAgBbLSX8Z565Cx -yqrcKCgtBd6MdfseMyTjXyy2Cl6fAt6FwxpV9mQ8DCc+1cQnQ8KKZS8UjpKR -17GzXXtDEjTMbPn7q52Mm404W3KeJEBRW7WX7Ssysfrczd33EiDx6sbnZa/J -2LYr9jjjcgKYOTLP+fSRUTNA3W7uSAJ018rqvP5ERv/SklyWbgJ8jf+9v2yW -jBu+67ySrIwHafHqr96yKjhw2kI0rSIOQlQ13r7yUcElzZqy/rJYOPhL9o+7 -vwqmmG+MxFOxcKSJR/b7PhXsV6FYN4XHQvruHifhMBUMUKJOS2vFwvXEqH6j -aBWs0Hn/cdmjIzA00NBXkaWCVavWOLa/igGHTIves9Uq6KjWuKxJLBr0v3t3 -OwlRkCPGNlHrigTpum3F9SQKrpTl8fGvi4TvKYywdWIUPDlZbPSgJBIuKf4g -jUhQ8HGbOXfmoUj4ZxdjHLaGgulG1lIq8pHwuO70/WR1CtKNHtyZCTkIhmkN -pyrsKfi+i3f2tnwEmJBldogWU1BoIjysqiIcKifZit4lFNQKPBnaVRQO5OoD -c7WlFBwTlrdYOhkOvOYdl/1vUdClNykgNSgcmkKT/2uupODm0ihuR0o4GNTN -5kU/pWCr/2TZuwthoG3zamhsgoIGJXZt/oxQKJU7Vm0wRcHgPHOFEOFQkBpR -zTg7TUGVmVbPU19DYPZQqpbxHHG/7vcOzFshcP8ipF5aoqBthXXZQ1YIqH+5 -Q7QTKkqWMNzkNwUDLe5EVJMOFUWXhfsneAZC/ZarfJabqXhoqWDlGaNAsP71 -OLtHj4qN14ruNykHQlTIz9vjhlQ89n7O9ejoPmh19fgkZklF826dAu/gfeCv -q23u4kGMZ9ceeBMXADf++yQ3m0rF1YVJXoWP/MCgbOF6bDoVhY0Tvd2K/aAr -YJW2QBYVhar1t2xK8YM/Hy2tZc9Q8eVdTQHY5QfmHdWJeJGKTw9zjuaO+sLX -W5mTGeVUvGRtY75b2hcYPrqPVd5SUfBb/a6kNG84qWT15/gAFft1eMdpB7xh -9oOX1tAgFR2fP9ky5OoNDc4Zty4NU3FO6f3rs+u9wcb6Q96qSSpyVtzr+te3 -Fw5vSQoT4qLhN4XZk62svdC64pXipAoNfScmDjwZ9QRWx4irBY2GTBL56Z8u -T8jO+JN3g0FDo7qqsm2PPcFVgCzmq07DwT2X5uXyPWFqIfLP4CYanm/qvnHb -3BOkx9e87rSgoVV9iI5HhQf4NPgnVobTsKC97z6ouMP34K+HTCJoqBt9uC9k -yQ2i1gYFvomk4fcKH7On/W5w4kiozXwMDZtPD4XPZLnBvc2RCnrJNJTm/69E -8+8eWHhwvL75PA2vxbuo6r5zhey7l2a7mmmY37Nmm8lDZ1jjrjC+l0PMz2yt -tstzhqtixe9mW2koGajXkRrpDA+DrzZJt9OQc0vJx03LGd4zb59y7qPhkoOr -fV2lE9Cu16gOTdDQ+I3h8Nra3fC4sNt7WoqOYpI9fPmDDvDRUtE9UoaOZV97 -RI41OQDX72Cnv7J0XCVKd0wqdQCjXQJWfAp0PFNxQG8qxAE4yzbrrGbQMSI6 -ZVFzmQO0eV0WMjSgo/2YtWkI0x7ekveVnfKl4/VGmbVtZ23hb+eD61IBdLzS -FJzoFWsLa2J5rpwPpGOA44dTK31sYU/PhbySMDpOXNnOfKFpCx+TOuIeRtPx -jpT3vmM9NjA2qmn7MYuONayGmAk5G5i9vvRLvZqO+i69FQr11jDqYFqYVkPH -k5YiOnuvW0Mfb+b24To6fvndMV2bYw11HrLnchuJ/R7Pf3Qj2BoSZLQ2Lz6j -I2us/GiCgjWIp+478nyAjnVNz+vlV+4EVb8eLh9uBnaSs3/I91mCvNSaGw28 -DKy10dYvrbIE8WavXTICDLwoKcOyPWMJM/I/il6QGPgld8F77U5LqH0jbKwh -xcChrJMY2moB200xaYnKQN/Bux5fnpjDXpVbQud3MFDazWveqGM7RLPd9lGs -GVjyufFqRdl2OOUj8eK+DQPd26mHLLK2Q/3VwxkvHBko97JocGrHdlhJ2b58 -0ZOBOxLSNAU6tgGHMrLSI5KB170GZSz7TIFBW6dAuczAxvHhjav4TQBbu+Lu -FzHwn342n/zXreDgn/zJoISBV57z8W9r3wrHr08WO95g4JTs9OK/3K0wQKtX -SatgoLalSz03Yytk0Z2YE0+J+e/Vo3QdjGGacUb7/g8GKvs2LOzjGEJfG5pI -zjDQ7TMrQvCeITSGfLeN+MnAE09ffXh8zhCy7puFa/9h4AfPKuqRYENgbOa6 -XcvDRKv/VNKp0obgZRas2CzNxKcUdpRGEEK33zaRbj0mHnWe/9dqZwB1Qj9l -tYCJF/w1e+XUDKD4VjE915CJtqtNN1wQMICwqUXT3abEeK7ATXKdPogeqowf -2MlEN7WI8J1kfTBNVvz12YuJmnf6uYf/bYGHJX8//UxlopIxn33ja13QNo74 -ZZ7ORI+DV3PEK3Sh6tOESGEmE3+rS0qlZOvCfflBHfNsJjbcT9Ae3aULt/Mb -My8VMNFVgSfPv2sTFGYk6W4rY2Kg34iiy1sdSItYfjr/NRMXFn55f+HVBkHJ -1NLJHiYmRx0XeTCuBcnlXPVGfUwkZ2xilrRpQeL36dGJASa+m19t8DlHC476 -d+sZjjKx6eafzimKFux3PTf+ZZ6JGZW6r6V2aYLzVmXcIq+Kyi8zzO7Ua8Bi -t6BYs4IqHumMfu9QrAGFPt/fmSurolDpnk6lVA0YTa455ExTxR63fnVFOw3Y -/2zn3cMaqlh6951/xeQGOGF1RP6hqSqW894dFaZugNrdPQuaoaq4bmbUeMpL -HfZ8qX1eH66K+S4eBkba6sAVXZi/NUIVqW3Rnp1C6mBaEKhpd1gV79jU8Vws -V4Ou98uCDhxXRZEDWvNTPGrw1UvtXXmeKlIM+3OhQhXkglNq1BpVsTZa4Mjt -zQzIWvLVSm9SxVjvrHU+qxjAnW1aPtaiihy6+KLZLB2+PuC7UfhMFR9RZQvy -yuhQy5WYL/FaFeO/qQ3pqdDBOSfu0NyIKtbX2m5JlKVBft1hrQYSC+dnpu2r -lCkgYuVULivGwuPK/Tdz+SgQ93ET65A4C9/IzxheGlMBf7558nopFo6wgxLX -3VYBnZ2RK4vlWUhVc0wc0VaBN0P7Z5I2sJDeHGrvZEsGKeGg8h2OLLS8JFXw -sFQJSoxjo384sdCZWr1D6oQSaMRmGZ9xZeEJ5zCFgmAlsPpxr6fPk4U9hyYs -FbWUIPnNz997g1i4PSvowwqOIswXHzOKjmdhW2L9VfspBXi75czr0lsstIj4 -lchbLw/+B0sumJWxUDHbtE4vQx7myqp8Ju4R8++yTtS6yoOEUt+vDQ9YyHVw -OCbp31qwEFy75lEjC6+IH8uyMlkL9d2l3q97WJhl+urtng9yYC72kBXZx8JP -3m/LWyrkoG/bszmZd8T4S9cjgalyMFv7LdXtIwt/bPA5fUhDDlhF6+98+crC -kpsvnOLSZKH+rWFkxiQL3RV++713lwXzlbag/oOFDsHHHh/SlgXflIOvIn6y -MDEPFr0+r4bZxuTzq+ZZGLCjXb+ibjUk/MnbW/uHhcLlbkfgzGoQ17yhumeR -heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb +1:eJwV13k8FO8fAPANJSp3rGvtrqsc5Yqw2+cjIpTk6KBECCUVoihXEZEvqUhy +hZRrd8rdScrdRZGSUCFJPxEKv+mveb1fM8/MM8/zOWYY+4/YefJQKBTaIgrl +33Gqt+mJUnzeBvXwl9IT0qYbOjKpJ026okCv9v3VK9EMwJXP91O7LsIpt1wL +v2htCLK9/Za3KxeeVgXctYs2AdExqYszbwk41Nu9UTV6O3y8Z3Pk19s6CPQu +H00/6wbmSiMffr59BXFt7oEhUcdg5q3B5fG3/dBe+V8Yb0gk1JvezHuZOwF/ +Te1yxYUvgtzH6i/7NeYg7zulzCckHSR8993mN+VF6kjn6nb1HLiobV5r47gU +Dxy4x01QzYfuNK1HP0VWYFDi5bqZC4UQnxf+nEdaFL2uFD3ufFsEVno+YisV +RZEV9MGjd6AIlj6xc1TVFMWw9wU8fT+K4OyAco+1iShGflFRbucvhlPM1i+X +fETRRvO/RkeDYvDLps6r1Iji7FOzQpHLxbA9g6th7SyGCwdKXVWsS0Dq0kBc +ynVxjHFoUPHOKQWqevnZ6QJxTLQUtx2/XQoydTHhezniOK+aNHXsbinQxlcf +V60Xx9qH9hVuz0pBectR19ohcWzftabvf6OloMs3pz+gK4FrTSR63+mXwbZA +yUGdZgmsNlhYVNNQBuccLDe8mlqJGW+G9R55cUDmbrsMzyJJZCk+e83ny4FS +cYff2sskccbZ49Smoxx488qFk6wgiefbrIdrTnBAaXsgc/tmSWzzVVQNiuNA +3dasJS+uSqKiX32/5m0OzJlPtrexpLCwOEwte4gDSQUhRXPmUihO/ersOUqO +X0KJ1dwuhcqqQRdUxjmwpUHQ5IKnFHZHscczfnMg3ZR+Z0uiFA7rsMt2L+HC +erRObfkohcYqAWNiilwIMMzZ1xRFxTJVRuaZ3Vywyhb6ZZ1AxZcsjljyHi4w ++U/Ftl+mYteaWf5r+7jwomMH93UhFTe9qwrM8+TCmqPLeXvbqXh1enrHhWNc +GCoILvifjDQWL+IzrYzlwh4Jm++yd6RR0lpC2vcuF3RDayMz70njq7m6SoFK +Lgj2r5JkPJXGOVW17hvVXKgu4wWVbmk8rl6S1/aAC5LW1UlaC9Joa5+y/3cj ++fxIJb1N1jKIIuPXb7zngtmP2RC/ARkcybI57LqIgJObL6k9HpXBoTTzxjO8 +BJTmaL4Tn5JBobyp9huLCaA6uBpWL5VFR+WYvm4BAkarGn7zrpHF5tpWWZoY +ASlRSYFXT8hi1sIZbX4mAY09q5VGI2Wx4EKf96QiAX/16l9viJfF6O1nbfuU +CTjwdVJn8Los6kV91S5eTYDRFuefa+plcZ7CNpfTJqB/pYrfkxVyeP+K3SIX +IEDqyEN5KSk5pBru9JQyIWBL4642H7ocevxRC2/bSEBFSLyGsK4cPtte37nW +nIDzH8dHdu+Sw99uZ6XbthCgc6vW60euHAb2PHM4uJuASNZ2N5n18mimYZqq +c5SAzS6Z/zPYKI8cVKdkHyNAKOLbGcct8kjR4k0XCCAgoz66IMlVHi8aCbi/ +PE5AlVXNtyVx8hjW7LZHN5SA8V2KQRPd8ljO/RFuEk1AZchRftFBecwuUDP3 +jyEgLON+2poxeSx6O2+RdY6A5X07a314aNj5w2LRWBwBql4JlD41GgZvCXBx +SSTA5fjk+dZQGu5NafGKv0KAcupGuZFoGlK+CkBE6r/1/6+EP4mGm+883Hss +jYCQv6tfbMyjoXEIEbg5nYDLZ1xWVrfScIlgD635OgF78osK3ryh4RmYsMjJ +JID5bNrgVx8Nh8/2PwjMIoAjmOK0dpKGjr3xV0VyCGhNfpaVL6+A5h1a0nJ5 +5P7ekdCuV1XAxgR6Yydpp063uj5tBbwpnNQSn0/AEPXvoKy5AjYY7no9WkAA +b7aW2kU/BRyZLJuPukVA8+PTtWUnFPDQbJWPwm0Ckgaat7RFKeC8sY5WFWma +queRpakKmHqb53VvERkPpVfvhj1UwNDnenGUUgLM3rbPjTUqYKxyQ3gwaRsK +n8W+VwoYwJdj+420u51fN3xWQN6nhmebygjwC73B5IwpIPVz8JAuh4ATeV2H +6NMK+IKPT+0aafNQRnjEYjouvSG62ZVLQIvwvRvrBel4+pWMygPStnk7GseF +6BjqHjlIJQhwbosXdaPSsborbHED6aMKUzdM1Om4qkNk7PcdAibvJDXOrKXj +wvrOQdZdcj82q3/n6tEx85dxXRjp6GOu+swNdJR8z9CbIS245I/Tu410dOMY +N2uXk+uRfjn8ogUdt6trWnmRTq9vbuTZTse+bx2CTaQVdnl+r3GkI6+gxtZJ +0nmjC6IBTnSsDcs4RasgQC0yXV99Hx3Hs6evmpEuW7nOecCdjl3nxQu8SOvd +fh5+zZuOntKPc86RrtlwMM/+MDn+W+eFPNLwmq9pmT8dr+5XPfSA9BOvrO/1 +QXT8lBVv1Ena8q+h2KlQOk5Hd/8dIt2e1KGvF0FH08ohYoa0g/IR59GzdEy+ +nLyXv5KA7mqBiLw48n4mJXOipF1s8vL2JNLRK33lJWnSg/0bmiRS6PiMlc+g +kfYJ7v7emko6yuCmAumxZYFi0Rl0FDtTqPzvfEC2kAE7h44hIp3X/42f1rvl +PJlPx53V6SJipMOaTCNKbtNx/unbsH/P53XpzfMso6MB+9Dwv/nF/u9Ek/xd +Ot7u1ts+TFronPhYZxU5f/GVlf/eL0W2VCzxPrke0t9lH5KmcjYbmNfRcaoj +MyKf9HWzAef5p3Q8Prj8SyxpZvfpiIoWOjZnymz1IV14mJrv94KOgqLFFeak +NXnuNKl00lF3Pl+RQZq4snWst5uOOb3fL02T+7defUgstZeOER99lrWR3ugg +v4d/iI6toenLDpN+NlQZ8XCUjr6/aKnrSW85bZcf/JOODebB6otI7yw4N/Z1 +lo6x763848h4em/EFM9eoGNLwjUVS9L7n98z2MXHQPsfB78uJu07/TOicQUD +N65bfzGIjFejYwckv4gx0PLY+WlF0ktH3hXxUhl4KiLjWxsZ3/k99W82MBnI +7qo/JUU60GG97x5VBg7Ys+UryfzY2Fa8KESDgRr8sM2edO+Dyxrl+gyUvlHi +G0nmV7GBYN0rYwaelI9xEicdwgnbOY4MtPp5vzeHzE/JXK8odWsG1jVrlN0l +83dbtGFXzj4GrnrodpFbTNaD+ZLDDz0YaE2Lc1xFejSIyfvBh4ESgcNV18j6 +EOu9bA01kIG7OHaeJ8j68cj6w5nEWAYOCw8FCxSS9V4scm0ol4Eq1Oms+FwC +KPGTT9IqGChcpDvfSta3dt6DThW1DHQo5xFdRvrQpF30zwYG9lj8t/s0WQ/z +upR6vN4xMP7j33SjDHK+WY0xDrxM3FFyY4n0ZTJ+pdhy/kuZWF3Ra61yidzf +JC73vxVM7Jp656SVQr5PVPr7ZikmKoqE9Rglk/P19NUx0WDijMDBC6svEDCj +LtKr6cjEk3LqX/zOEjB1XSZS14mJLc/oL2zOEPBLWFnJcB8ThfFJhXoUmQ8T +hgfNfJgYQuwNfx9O9sda9ymn00y0l1xgypD9p9m6Uig2n4nQxv64hOxf6Ydc +oH+SPG+UVFDmREDqB+/+r7NM3B9387E22f8ubQuI/r7ARFGRr3zcnQQk6sa2 +TAso4vyd4wI3HQiI+sPdKUxTxHdtIjrHbMj1iV98lGWuiD1zFHY42X9ZRcXZ +V64oYsY60E0g+3kPvShr0zVFXJrMfdNJ9vuQK7cyf2Upoulc/Sp58nugMrIg +w+6WIpYMRH/Io5H7sys7TeieInaP1NxOkyJg9eJLSTGfFPH916FeMfL7QnJf +aESQhhKqxM9JOo1w4aeYleuOOiV8Wlg4H1zAhS5f5ouDz5TwyFuP/sV5XHj0 +dBbCW5XQNEnGOzmHC0khRQqFb5TwoNWbfTkZXNDqX/5xZkQJfVJ2auZf5IIf +9/ne6+LK2NCbdZMdxoWRbY7Ogx7KuHr8jst9ey4MJrju8OdXwdNbn960m+aA +5Y9gy8/6qsjKSTnHNuTAqPvSgLvhq3ARxZballtK/h9I8ZyrW40rvHWFJsqL +QaxNJZHzQw3/F7j7ifXr2yAXW2arr6+Bu/okO2aqCyFN3VBE3EsTVzgvTbR7 +VADNMibrJpLX4CJ+x20JHXlgJFeXtPbNWmTZOAd/bc4FId7cQLcoLXxiG35e +fjIbaJEKrN0q2iiotbeCq5AJAsp7KuyeaeNljZa/cVnpsIYtXRa8Vwdp3a3+ +6Smp4N8rVm9F0cWhS458YTGX4MdEgqNlmi7WGiRS6r8lg8Xap+mWmno4PrGx +6772f/BgwvjP73Y9DH+fdGZx4Xnw09B599JzHeZUdiw79ikG2GMeHbsF9FFb +Kfj4OtMzsEmJunVFrj42qmVy/LdGwKqI8yfqDAzwboOlsPq5UFDzNHyo/M4A +q3ICbGWeBIHnA++zd4+tx+G/teWXf/nDw+wOj58rDZHTVDc30e8HvwoXfq+t +NMTBlgOzvlQf+LLDPDuu2hBnbbQ/lPP5QBffhc0DtYaYmOnOv/ynN9S6yly9 +8sgQ9zjZS/Y1eUMUdZ3RXJMhfswX3qtyyhtEYg+ean5viKZbz8cpD3iBhlcn +xZPHCG9FMa8/qDkA7spFAulbjTBwXmJ8INEDQhpcDqrYGuGnlTGXB055QJKn +WAthZ4ThFbx94wc94F7+yYSWnUZ4w97ZVM/CAyRUNgvPuZGeSXfZS/GApyqf +JVyDjPDP45om7ePuoLZKga6SZYQ7W1Xli7z3w0+1FH1i3AhZr4ZLVI67Qlcr +bhKfIK+/aczd4uUKj/zG7AMnjVC11WDw1G5XSCQsj+nPGiGHMvToD9sV1Iwo +xTW8xjiZWlXkz+8K+y0PM+oljXF/0ZElEev3QYeXxfIOljH2CymsdknfC1V5 +fz5Nxhpjt87BSJ0rTqBvGvjbKt4YL4prKZaEO0H5p9Hl2ReM8WXEm+T1Pk5A +0HoNrC4aY8qOw8WRLCcoTnt0IfOaMYbW2Fb0DOyG7IRoQ4tSYywuzlYtWLcb +4gKFk9NeG6N7sWrN1s87wclMEY1pLFxs0XH7ob8jzHUsFaqns1D/96ZD510c +IdtzrMdKkYWW4kVCB6wc4UtMdbDTKhbukRZ6vo3pCP5N28pO6rBwVKZm9Nsr +Bzhvc4pWZc7CwgEjd5aBA9Ts6vyrd4SFr0OUON+X2YPs4XPVax6xcJJ3dQl9 +wBYSFw6si69jYVOF3PL+17bAc9Gc+/UJC3WLj5aXPbGFkYrFt7KbWOgzm9Rw +pMAWaihn08ResxDTBX9GHrQFp0sRwVOfWajBE+/cPrwN0mpPrnuwjI1GNRlt +v5VsYKWgL3frTjZOOQuIK/ZaQZ7p6ZDx3Wy8Mzqa7lNnBTqnE01T9rBRye/z +m6YCK7AZ53R2ubFRo0dL+u0RK4h5Mznj7stGwZyKBCavFUznhm8MiWRjgNDf +s4fWWMI745TXBUVsdA8/N2WUagHex/MyLEvZyFbfZ5ocZgFTpeXkbywb/cXm +Wuc9LUCM2fVbu4KNJh97rBTWWYD1Unm5+4/Y+Lhv/lNAhznc6yjweN3Jxu6V +FhrOUuZgJVSlGdTFxiGziXA5ijl0WTRNUXvYmJRF+zoxtAl+1XyLdelj4/oN +ZjcHazaBZo5WyfAIG4+vuP6rZd8muPfOJCjhOxt7lB4PG1tuAisJe1g7zsbN +/Mb7H+tsggPnjr8MnGTjXPyfy8uXkPd7FJMuNc1GC+0GzVc/zCBqNtW9ZpaN +6Zkji0q6zUBE75bG3jk2dl1qplyvN4PMwzWTCwtsLA9/Ts0tMYP/A71YJ+E= + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.1760850255633475}}, + "PlotRange" -> {{0, 30}, {0., 0.07310674507562985}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -10986,6 +11002,7 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -11013,7 +11030,8 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.1760850255633475}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07310674507562985}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -11021,17 +11039,595 @@ heq5q/0EAlfDpeDan0tLLEzvyLgtbLwa/gfhb2qb Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913465524249306`*^9}, + CellChangeTimes->{3.9913465524249306`*^9, 3.994388630264811*^9}, CellLabel-> - "Out[444]=",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] + "Out[119]=",ExpressionUUID->"ba897cb6-f9cc-4df9-a30e-ad0860ef4e3c"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"6883477e-2a54-0a45-979a-\ -ae60c73e9e82"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[120]:=",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k8FO8fAPANJSp3rGvtrqsc5Yqw2+cjIpTk6KBECCUVoihXEZEvqUhy +hZRrd8rdScrdRZGSUCFJPxEKv+mveb1fM8/MM8/zOWYY+4/YefJQKBTaIgrl +33Gqt+mJUnzeBvXwl9IT0qYbOjKpJ026okCv9v3VK9EMwJXP91O7LsIpt1wL +v2htCLK9/Za3KxeeVgXctYs2AdExqYszbwk41Nu9UTV6O3y8Z3Pk19s6CPQu +H00/6wbmSiMffr59BXFt7oEhUcdg5q3B5fG3/dBe+V8Yb0gk1JvezHuZOwF/ +Te1yxYUvgtzH6i/7NeYg7zulzCckHSR8993mN+VF6kjn6nb1HLiobV5r47gU +Dxy4x01QzYfuNK1HP0VWYFDi5bqZC4UQnxf+nEdaFL2uFD3ufFsEVno+YisV +RZEV9MGjd6AIlj6xc1TVFMWw9wU8fT+K4OyAco+1iShGflFRbucvhlPM1i+X +fETRRvO/RkeDYvDLps6r1Iji7FOzQpHLxbA9g6th7SyGCwdKXVWsS0Dq0kBc +ynVxjHFoUPHOKQWqevnZ6QJxTLQUtx2/XQoydTHhezniOK+aNHXsbinQxlcf +V60Xx9qH9hVuz0pBectR19ohcWzftabvf6OloMs3pz+gK4FrTSR63+mXwbZA +yUGdZgmsNlhYVNNQBuccLDe8mlqJGW+G9R55cUDmbrsMzyJJZCk+e83ny4FS +cYff2sskccbZ49Smoxx488qFk6wgiefbrIdrTnBAaXsgc/tmSWzzVVQNiuNA +3dasJS+uSqKiX32/5m0OzJlPtrexpLCwOEwte4gDSQUhRXPmUihO/ersOUqO +X0KJ1dwuhcqqQRdUxjmwpUHQ5IKnFHZHscczfnMg3ZR+Z0uiFA7rsMt2L+HC +erRObfkohcYqAWNiilwIMMzZ1xRFxTJVRuaZ3Vywyhb6ZZ1AxZcsjljyHi4w ++U/Ftl+mYteaWf5r+7jwomMH93UhFTe9qwrM8+TCmqPLeXvbqXh1enrHhWNc +GCoILvifjDQWL+IzrYzlwh4Jm++yd6RR0lpC2vcuF3RDayMz70njq7m6SoFK +Lgj2r5JkPJXGOVW17hvVXKgu4wWVbmk8rl6S1/aAC5LW1UlaC9Joa5+y/3cj ++fxIJb1N1jKIIuPXb7zngtmP2RC/ARkcybI57LqIgJObL6k9HpXBoTTzxjO8 +BJTmaL4Tn5JBobyp9huLCaA6uBpWL5VFR+WYvm4BAkarGn7zrpHF5tpWWZoY +ASlRSYFXT8hi1sIZbX4mAY09q5VGI2Wx4EKf96QiAX/16l9viJfF6O1nbfuU +CTjwdVJn8Los6kV91S5eTYDRFuefa+plcZ7CNpfTJqB/pYrfkxVyeP+K3SIX +IEDqyEN5KSk5pBru9JQyIWBL4642H7ocevxRC2/bSEBFSLyGsK4cPtte37nW +nIDzH8dHdu+Sw99uZ6XbthCgc6vW60euHAb2PHM4uJuASNZ2N5n18mimYZqq +c5SAzS6Z/zPYKI8cVKdkHyNAKOLbGcct8kjR4k0XCCAgoz66IMlVHi8aCbi/ +PE5AlVXNtyVx8hjW7LZHN5SA8V2KQRPd8ljO/RFuEk1AZchRftFBecwuUDP3 +jyEgLON+2poxeSx6O2+RdY6A5X07a314aNj5w2LRWBwBql4JlD41GgZvCXBx +SSTA5fjk+dZQGu5NafGKv0KAcupGuZFoGlK+CkBE6r/1/6+EP4mGm+883Hss +jYCQv6tfbMyjoXEIEbg5nYDLZ1xWVrfScIlgD635OgF78osK3ryh4RmYsMjJ +JID5bNrgVx8Nh8/2PwjMIoAjmOK0dpKGjr3xV0VyCGhNfpaVL6+A5h1a0nJ5 +5P7ekdCuV1XAxgR6Yydpp063uj5tBbwpnNQSn0/AEPXvoKy5AjYY7no9WkAA +b7aW2kU/BRyZLJuPukVA8+PTtWUnFPDQbJWPwm0Ckgaat7RFKeC8sY5WFWma +queRpakKmHqb53VvERkPpVfvhj1UwNDnenGUUgLM3rbPjTUqYKxyQ3gwaRsK +n8W+VwoYwJdj+420u51fN3xWQN6nhmebygjwC73B5IwpIPVz8JAuh4ATeV2H +6NMK+IKPT+0aafNQRnjEYjouvSG62ZVLQIvwvRvrBel4+pWMygPStnk7GseF +6BjqHjlIJQhwbosXdaPSsborbHED6aMKUzdM1Om4qkNk7PcdAibvJDXOrKXj +wvrOQdZdcj82q3/n6tEx85dxXRjp6GOu+swNdJR8z9CbIS245I/Tu410dOMY +N2uXk+uRfjn8ogUdt6trWnmRTq9vbuTZTse+bx2CTaQVdnl+r3GkI6+gxtZJ +0nmjC6IBTnSsDcs4RasgQC0yXV99Hx3Hs6evmpEuW7nOecCdjl3nxQu8SOvd +fh5+zZuOntKPc86RrtlwMM/+MDn+W+eFPNLwmq9pmT8dr+5XPfSA9BOvrO/1 +QXT8lBVv1Ena8q+h2KlQOk5Hd/8dIt2e1KGvF0FH08ohYoa0g/IR59GzdEy+ +nLyXv5KA7mqBiLw48n4mJXOipF1s8vL2JNLRK33lJWnSg/0bmiRS6PiMlc+g +kfYJ7v7emko6yuCmAumxZYFi0Rl0FDtTqPzvfEC2kAE7h44hIp3X/42f1rvl +PJlPx53V6SJipMOaTCNKbtNx/unbsH/P53XpzfMso6MB+9Dwv/nF/u9Ek/xd +Ot7u1ts+TFronPhYZxU5f/GVlf/eL0W2VCzxPrke0t9lH5KmcjYbmNfRcaoj +MyKf9HWzAef5p3Q8Prj8SyxpZvfpiIoWOjZnymz1IV14mJrv94KOgqLFFeak +NXnuNKl00lF3Pl+RQZq4snWst5uOOb3fL02T+7defUgstZeOER99lrWR3ugg +v4d/iI6toenLDpN+NlQZ8XCUjr6/aKnrSW85bZcf/JOODebB6otI7yw4N/Z1 +lo6x763848h4em/EFM9eoGNLwjUVS9L7n98z2MXHQPsfB78uJu07/TOicQUD +N65bfzGIjFejYwckv4gx0PLY+WlF0ktH3hXxUhl4KiLjWxsZ3/k99W82MBnI +7qo/JUU60GG97x5VBg7Ys+UryfzY2Fa8KESDgRr8sM2edO+Dyxrl+gyUvlHi +G0nmV7GBYN0rYwaelI9xEicdwgnbOY4MtPp5vzeHzE/JXK8odWsG1jVrlN0l +83dbtGFXzj4GrnrodpFbTNaD+ZLDDz0YaE2Lc1xFejSIyfvBh4ESgcNV18j6 +EOu9bA01kIG7OHaeJ8j68cj6w5nEWAYOCw8FCxSS9V4scm0ol4Eq1Oms+FwC +KPGTT9IqGChcpDvfSta3dt6DThW1DHQo5xFdRvrQpF30zwYG9lj8t/s0WQ/z +upR6vN4xMP7j33SjDHK+WY0xDrxM3FFyY4n0ZTJ+pdhy/kuZWF3Ra61yidzf +JC73vxVM7Jp656SVQr5PVPr7ZikmKoqE9Rglk/P19NUx0WDijMDBC6svEDCj +LtKr6cjEk3LqX/zOEjB1XSZS14mJLc/oL2zOEPBLWFnJcB8ThfFJhXoUmQ8T +hgfNfJgYQuwNfx9O9sda9ymn00y0l1xgypD9p9m6Uig2n4nQxv64hOxf6Ydc +oH+SPG+UVFDmREDqB+/+r7NM3B9387E22f8ubQuI/r7ARFGRr3zcnQQk6sa2 +TAso4vyd4wI3HQiI+sPdKUxTxHdtIjrHbMj1iV98lGWuiD1zFHY42X9ZRcXZ +V64oYsY60E0g+3kPvShr0zVFXJrMfdNJ9vuQK7cyf2Upoulc/Sp58nugMrIg +w+6WIpYMRH/Io5H7sys7TeieInaP1NxOkyJg9eJLSTGfFPH916FeMfL7QnJf +aESQhhKqxM9JOo1w4aeYleuOOiV8Wlg4H1zAhS5f5ouDz5TwyFuP/sV5XHj0 +dBbCW5XQNEnGOzmHC0khRQqFb5TwoNWbfTkZXNDqX/5xZkQJfVJ2auZf5IIf +9/ne6+LK2NCbdZMdxoWRbY7Ogx7KuHr8jst9ey4MJrju8OdXwdNbn960m+aA +5Y9gy8/6qsjKSTnHNuTAqPvSgLvhq3ARxZballtK/h9I8ZyrW40rvHWFJsqL +QaxNJZHzQw3/F7j7ifXr2yAXW2arr6+Bu/okO2aqCyFN3VBE3EsTVzgvTbR7 +VADNMibrJpLX4CJ+x20JHXlgJFeXtPbNWmTZOAd/bc4FId7cQLcoLXxiG35e +fjIbaJEKrN0q2iiotbeCq5AJAsp7KuyeaeNljZa/cVnpsIYtXRa8Vwdp3a3+ +6Smp4N8rVm9F0cWhS458YTGX4MdEgqNlmi7WGiRS6r8lg8Xap+mWmno4PrGx +6772f/BgwvjP73Y9DH+fdGZx4Xnw09B599JzHeZUdiw79ikG2GMeHbsF9FFb +Kfj4OtMzsEmJunVFrj42qmVy/LdGwKqI8yfqDAzwboOlsPq5UFDzNHyo/M4A +q3ICbGWeBIHnA++zd4+tx+G/teWXf/nDw+wOj58rDZHTVDc30e8HvwoXfq+t +NMTBlgOzvlQf+LLDPDuu2hBnbbQ/lPP5QBffhc0DtYaYmOnOv/ynN9S6yly9 +8sgQ9zjZS/Y1eUMUdZ3RXJMhfswX3qtyyhtEYg+ean5viKZbz8cpD3iBhlcn +xZPHCG9FMa8/qDkA7spFAulbjTBwXmJ8INEDQhpcDqrYGuGnlTGXB055QJKn +WAthZ4ThFbx94wc94F7+yYSWnUZ4w97ZVM/CAyRUNgvPuZGeSXfZS/GApyqf +JVyDjPDP45om7ePuoLZKga6SZYQ7W1Xli7z3w0+1FH1i3AhZr4ZLVI67Qlcr +bhKfIK+/aczd4uUKj/zG7AMnjVC11WDw1G5XSCQsj+nPGiGHMvToD9sV1Iwo +xTW8xjiZWlXkz+8K+y0PM+oljXF/0ZElEev3QYeXxfIOljH2CymsdknfC1V5 +fz5Nxhpjt87BSJ0rTqBvGvjbKt4YL4prKZaEO0H5p9Hl2ReM8WXEm+T1Pk5A +0HoNrC4aY8qOw8WRLCcoTnt0IfOaMYbW2Fb0DOyG7IRoQ4tSYywuzlYtWLcb +4gKFk9NeG6N7sWrN1s87wclMEY1pLFxs0XH7ob8jzHUsFaqns1D/96ZD510c +IdtzrMdKkYWW4kVCB6wc4UtMdbDTKhbukRZ6vo3pCP5N28pO6rBwVKZm9Nsr +Bzhvc4pWZc7CwgEjd5aBA9Ts6vyrd4SFr0OUON+X2YPs4XPVax6xcJJ3dQl9 +wBYSFw6si69jYVOF3PL+17bAc9Gc+/UJC3WLj5aXPbGFkYrFt7KbWOgzm9Rw +pMAWaihn08ResxDTBX9GHrQFp0sRwVOfWajBE+/cPrwN0mpPrnuwjI1GNRlt +v5VsYKWgL3frTjZOOQuIK/ZaQZ7p6ZDx3Wy8Mzqa7lNnBTqnE01T9rBRye/z +m6YCK7AZ53R2ubFRo0dL+u0RK4h5Mznj7stGwZyKBCavFUznhm8MiWRjgNDf +s4fWWMI745TXBUVsdA8/N2WUagHex/MyLEvZyFbfZ5ocZgFTpeXkbywb/cXm +Wuc9LUCM2fVbu4KNJh97rBTWWYD1Unm5+4/Y+Lhv/lNAhznc6yjweN3Jxu6V +FhrOUuZgJVSlGdTFxiGziXA5ijl0WTRNUXvYmJRF+zoxtAl+1XyLdelj4/oN +ZjcHazaBZo5WyfAIG4+vuP6rZd8muPfOJCjhOxt7lB4PG1tuAisJe1g7zsbN +/Mb7H+tsggPnjr8MnGTjXPyfy8uXkPd7FJMuNc1GC+0GzVc/zCBqNtW9ZpaN +6Zkji0q6zUBE75bG3jk2dl1qplyvN4PMwzWTCwtsLA9/Ts0tMYP/A71YJ+E= + + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8FO8fAPANJSp3rGvtrqsc5Yqw2+cjIpTk6KBECCUVoihXEZEvqUhy +hZRrd8rdScrdRZGSUCFJPxEKv+mveb1fM8/MM8/zOWYY+4/YefJQKBTaIgrl +33Gqt+mJUnzeBvXwl9IT0qYbOjKpJ026okCv9v3VK9EMwJXP91O7LsIpt1wL +v2htCLK9/Za3KxeeVgXctYs2AdExqYszbwk41Nu9UTV6O3y8Z3Pk19s6CPQu +H00/6wbmSiMffr59BXFt7oEhUcdg5q3B5fG3/dBe+V8Yb0gk1JvezHuZOwF/ +Te1yxYUvgtzH6i/7NeYg7zulzCckHSR8993mN+VF6kjn6nb1HLiobV5r47gU +Dxy4x01QzYfuNK1HP0VWYFDi5bqZC4UQnxf+nEdaFL2uFD3ufFsEVno+YisV +RZEV9MGjd6AIlj6xc1TVFMWw9wU8fT+K4OyAco+1iShGflFRbucvhlPM1i+X +fETRRvO/RkeDYvDLps6r1Iji7FOzQpHLxbA9g6th7SyGCwdKXVWsS0Dq0kBc +ynVxjHFoUPHOKQWqevnZ6QJxTLQUtx2/XQoydTHhezniOK+aNHXsbinQxlcf +V60Xx9qH9hVuz0pBectR19ohcWzftabvf6OloMs3pz+gK4FrTSR63+mXwbZA +yUGdZgmsNlhYVNNQBuccLDe8mlqJGW+G9R55cUDmbrsMzyJJZCk+e83ny4FS +cYff2sskccbZ49Smoxx488qFk6wgiefbrIdrTnBAaXsgc/tmSWzzVVQNiuNA +3dasJS+uSqKiX32/5m0OzJlPtrexpLCwOEwte4gDSQUhRXPmUihO/ersOUqO +X0KJ1dwuhcqqQRdUxjmwpUHQ5IKnFHZHscczfnMg3ZR+Z0uiFA7rsMt2L+HC +erRObfkohcYqAWNiilwIMMzZ1xRFxTJVRuaZ3Vywyhb6ZZ1AxZcsjljyHi4w ++U/Ftl+mYteaWf5r+7jwomMH93UhFTe9qwrM8+TCmqPLeXvbqXh1enrHhWNc +GCoILvifjDQWL+IzrYzlwh4Jm++yd6RR0lpC2vcuF3RDayMz70njq7m6SoFK +Lgj2r5JkPJXGOVW17hvVXKgu4wWVbmk8rl6S1/aAC5LW1UlaC9Joa5+y/3cj ++fxIJb1N1jKIIuPXb7zngtmP2RC/ARkcybI57LqIgJObL6k9HpXBoTTzxjO8 +BJTmaL4Tn5JBobyp9huLCaA6uBpWL5VFR+WYvm4BAkarGn7zrpHF5tpWWZoY +ASlRSYFXT8hi1sIZbX4mAY09q5VGI2Wx4EKf96QiAX/16l9viJfF6O1nbfuU +CTjwdVJn8Los6kV91S5eTYDRFuefa+plcZ7CNpfTJqB/pYrfkxVyeP+K3SIX +IEDqyEN5KSk5pBru9JQyIWBL4642H7ocevxRC2/bSEBFSLyGsK4cPtte37nW +nIDzH8dHdu+Sw99uZ6XbthCgc6vW60euHAb2PHM4uJuASNZ2N5n18mimYZqq +c5SAzS6Z/zPYKI8cVKdkHyNAKOLbGcct8kjR4k0XCCAgoz66IMlVHi8aCbi/ +PE5AlVXNtyVx8hjW7LZHN5SA8V2KQRPd8ljO/RFuEk1AZchRftFBecwuUDP3 +jyEgLON+2poxeSx6O2+RdY6A5X07a314aNj5w2LRWBwBql4JlD41GgZvCXBx +SSTA5fjk+dZQGu5NafGKv0KAcupGuZFoGlK+CkBE6r/1/6+EP4mGm+883Hss +jYCQv6tfbMyjoXEIEbg5nYDLZ1xWVrfScIlgD635OgF78osK3ryh4RmYsMjJ +JID5bNrgVx8Nh8/2PwjMIoAjmOK0dpKGjr3xV0VyCGhNfpaVL6+A5h1a0nJ5 +5P7ekdCuV1XAxgR6Yydpp063uj5tBbwpnNQSn0/AEPXvoKy5AjYY7no9WkAA +b7aW2kU/BRyZLJuPukVA8+PTtWUnFPDQbJWPwm0Ckgaat7RFKeC8sY5WFWma +queRpakKmHqb53VvERkPpVfvhj1UwNDnenGUUgLM3rbPjTUqYKxyQ3gwaRsK +n8W+VwoYwJdj+420u51fN3xWQN6nhmebygjwC73B5IwpIPVz8JAuh4ATeV2H +6NMK+IKPT+0aafNQRnjEYjouvSG62ZVLQIvwvRvrBel4+pWMygPStnk7GseF +6BjqHjlIJQhwbosXdaPSsborbHED6aMKUzdM1Om4qkNk7PcdAibvJDXOrKXj +wvrOQdZdcj82q3/n6tEx85dxXRjp6GOu+swNdJR8z9CbIS245I/Tu410dOMY +N2uXk+uRfjn8ogUdt6trWnmRTq9vbuTZTse+bx2CTaQVdnl+r3GkI6+gxtZJ +0nmjC6IBTnSsDcs4RasgQC0yXV99Hx3Hs6evmpEuW7nOecCdjl3nxQu8SOvd +fh5+zZuOntKPc86RrtlwMM/+MDn+W+eFPNLwmq9pmT8dr+5XPfSA9BOvrO/1 +QXT8lBVv1Ena8q+h2KlQOk5Hd/8dIt2e1KGvF0FH08ohYoa0g/IR59GzdEy+ +nLyXv5KA7mqBiLw48n4mJXOipF1s8vL2JNLRK33lJWnSg/0bmiRS6PiMlc+g +kfYJ7v7emko6yuCmAumxZYFi0Rl0FDtTqPzvfEC2kAE7h44hIp3X/42f1rvl +PJlPx53V6SJipMOaTCNKbtNx/unbsH/P53XpzfMso6MB+9Dwv/nF/u9Ek/xd +Ot7u1ts+TFronPhYZxU5f/GVlf/eL0W2VCzxPrke0t9lH5KmcjYbmNfRcaoj +MyKf9HWzAef5p3Q8Prj8SyxpZvfpiIoWOjZnymz1IV14mJrv94KOgqLFFeak +NXnuNKl00lF3Pl+RQZq4snWst5uOOb3fL02T+7defUgstZeOER99lrWR3ugg +v4d/iI6toenLDpN+NlQZ8XCUjr6/aKnrSW85bZcf/JOODebB6otI7yw4N/Z1 +lo6x763848h4em/EFM9eoGNLwjUVS9L7n98z2MXHQPsfB78uJu07/TOicQUD +N65bfzGIjFejYwckv4gx0PLY+WlF0ktH3hXxUhl4KiLjWxsZ3/k99W82MBnI +7qo/JUU60GG97x5VBg7Ys+UryfzY2Fa8KESDgRr8sM2edO+Dyxrl+gyUvlHi +G0nmV7GBYN0rYwaelI9xEicdwgnbOY4MtPp5vzeHzE/JXK8odWsG1jVrlN0l +83dbtGFXzj4GrnrodpFbTNaD+ZLDDz0YaE2Lc1xFejSIyfvBh4ESgcNV18j6 +EOu9bA01kIG7OHaeJ8j68cj6w5nEWAYOCw8FCxSS9V4scm0ol4Eq1Oms+FwC +KPGTT9IqGChcpDvfSta3dt6DThW1DHQo5xFdRvrQpF30zwYG9lj8t/s0WQ/z +upR6vN4xMP7j33SjDHK+WY0xDrxM3FFyY4n0ZTJ+pdhy/kuZWF3Ra61yidzf +JC73vxVM7Jp656SVQr5PVPr7ZikmKoqE9Rglk/P19NUx0WDijMDBC6svEDCj +LtKr6cjEk3LqX/zOEjB1XSZS14mJLc/oL2zOEPBLWFnJcB8ThfFJhXoUmQ8T +hgfNfJgYQuwNfx9O9sda9ymn00y0l1xgypD9p9m6Uig2n4nQxv64hOxf6Ydc +oH+SPG+UVFDmREDqB+/+r7NM3B9387E22f8ubQuI/r7ARFGRr3zcnQQk6sa2 +TAso4vyd4wI3HQiI+sPdKUxTxHdtIjrHbMj1iV98lGWuiD1zFHY42X9ZRcXZ +V64oYsY60E0g+3kPvShr0zVFXJrMfdNJ9vuQK7cyf2Upoulc/Sp58nugMrIg +w+6WIpYMRH/Io5H7sys7TeieInaP1NxOkyJg9eJLSTGfFPH916FeMfL7QnJf +aESQhhKqxM9JOo1w4aeYleuOOiV8Wlg4H1zAhS5f5ouDz5TwyFuP/sV5XHj0 +dBbCW5XQNEnGOzmHC0khRQqFb5TwoNWbfTkZXNDqX/5xZkQJfVJ2auZf5IIf +9/ne6+LK2NCbdZMdxoWRbY7Ogx7KuHr8jst9ey4MJrju8OdXwdNbn960m+aA +5Y9gy8/6qsjKSTnHNuTAqPvSgLvhq3ARxZballtK/h9I8ZyrW40rvHWFJsqL +QaxNJZHzQw3/F7j7ifXr2yAXW2arr6+Bu/okO2aqCyFN3VBE3EsTVzgvTbR7 +VADNMibrJpLX4CJ+x20JHXlgJFeXtPbNWmTZOAd/bc4FId7cQLcoLXxiG35e +fjIbaJEKrN0q2iiotbeCq5AJAsp7KuyeaeNljZa/cVnpsIYtXRa8Vwdp3a3+ +6Smp4N8rVm9F0cWhS458YTGX4MdEgqNlmi7WGiRS6r8lg8Xap+mWmno4PrGx +6772f/BgwvjP73Y9DH+fdGZx4Xnw09B599JzHeZUdiw79ikG2GMeHbsF9FFb +Kfj4OtMzsEmJunVFrj42qmVy/LdGwKqI8yfqDAzwboOlsPq5UFDzNHyo/M4A +q3ICbGWeBIHnA++zd4+tx+G/teWXf/nDw+wOj58rDZHTVDc30e8HvwoXfq+t +NMTBlgOzvlQf+LLDPDuu2hBnbbQ/lPP5QBffhc0DtYaYmOnOv/ynN9S6yly9 +8sgQ9zjZS/Y1eUMUdZ3RXJMhfswX3qtyyhtEYg+ean5viKZbz8cpD3iBhlcn +xZPHCG9FMa8/qDkA7spFAulbjTBwXmJ8INEDQhpcDqrYGuGnlTGXB055QJKn +WAthZ4ThFbx94wc94F7+yYSWnUZ4w97ZVM/CAyRUNgvPuZGeSXfZS/GApyqf +JVyDjPDP45om7ePuoLZKga6SZYQ7W1Xli7z3w0+1FH1i3AhZr4ZLVI67Qlcr +bhKfIK+/aczd4uUKj/zG7AMnjVC11WDw1G5XSCQsj+nPGiGHMvToD9sV1Iwo +xTW8xjiZWlXkz+8K+y0PM+oljXF/0ZElEev3QYeXxfIOljH2CymsdknfC1V5 +fz5Nxhpjt87BSJ0rTqBvGvjbKt4YL4prKZaEO0H5p9Hl2ReM8WXEm+T1Pk5A +0HoNrC4aY8qOw8WRLCcoTnt0IfOaMYbW2Fb0DOyG7IRoQ4tSYywuzlYtWLcb +4gKFk9NeG6N7sWrN1s87wclMEY1pLFxs0XH7ob8jzHUsFaqns1D/96ZD510c +IdtzrMdKkYWW4kVCB6wc4UtMdbDTKhbukRZ6vo3pCP5N28pO6rBwVKZm9Nsr +Bzhvc4pWZc7CwgEjd5aBA9Ts6vyrd4SFr0OUON+X2YPs4XPVax6xcJJ3dQl9 +wBYSFw6si69jYVOF3PL+17bAc9Gc+/UJC3WLj5aXPbGFkYrFt7KbWOgzm9Rw +pMAWaihn08ResxDTBX9GHrQFp0sRwVOfWajBE+/cPrwN0mpPrnuwjI1GNRlt +v5VsYKWgL3frTjZOOQuIK/ZaQZ7p6ZDx3Wy8Mzqa7lNnBTqnE01T9rBRye/z +m6YCK7AZ53R2ubFRo0dL+u0RK4h5Mznj7stGwZyKBCavFUznhm8MiWRjgNDf +s4fWWMI745TXBUVsdA8/N2WUagHex/MyLEvZyFbfZ5ocZgFTpeXkbywb/cXm +Wuc9LUCM2fVbu4KNJh97rBTWWYD1Unm5+4/Y+Lhv/lNAhznc6yjweN3Jxu6V +FhrOUuZgJVSlGdTFxiGziXA5ijl0WTRNUXvYmJRF+zoxtAl+1XyLdelj4/oN +ZjcHazaBZo5WyfAIG4+vuP6rZd8muPfOJCjhOxt7lB4PG1tuAisJe1g7zsbN +/Mb7H+tsggPnjr8MnGTjXPyfy8uXkPd7FJMuNc1GC+0GzVc/zCBqNtW9ZpaN +6Zkji0q6zUBE75bG3jk2dl1qplyvN4PMwzWTCwtsLA9/Ts0tMYP/A71YJ+E= + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07310674507562985}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07310674507562985}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k8FO8fAPANJSp3rGvtrqsc5Yqw2+cjIpTk6KBECCUVoihXEZEvqUhy +hZRrd8rdScrdRZGSUCFJPxEKv+mveb1fM8/MM8/zOWYY+4/YefJQKBTaIgrl +33Gqt+mJUnzeBvXwl9IT0qYbOjKpJ026okCv9v3VK9EMwJXP91O7LsIpt1wL +v2htCLK9/Za3KxeeVgXctYs2AdExqYszbwk41Nu9UTV6O3y8Z3Pk19s6CPQu +H00/6wbmSiMffr59BXFt7oEhUcdg5q3B5fG3/dBe+V8Yb0gk1JvezHuZOwF/ +Te1yxYUvgtzH6i/7NeYg7zulzCckHSR8993mN+VF6kjn6nb1HLiobV5r47gU +Dxy4x01QzYfuNK1HP0VWYFDi5bqZC4UQnxf+nEdaFL2uFD3ufFsEVno+YisV +RZEV9MGjd6AIlj6xc1TVFMWw9wU8fT+K4OyAco+1iShGflFRbucvhlPM1i+X +fETRRvO/RkeDYvDLps6r1Iji7FOzQpHLxbA9g6th7SyGCwdKXVWsS0Dq0kBc +ynVxjHFoUPHOKQWqevnZ6QJxTLQUtx2/XQoydTHhezniOK+aNHXsbinQxlcf +V60Xx9qH9hVuz0pBectR19ohcWzftabvf6OloMs3pz+gK4FrTSR63+mXwbZA +yUGdZgmsNlhYVNNQBuccLDe8mlqJGW+G9R55cUDmbrsMzyJJZCk+e83ny4FS +cYff2sskccbZ49Smoxx488qFk6wgiefbrIdrTnBAaXsgc/tmSWzzVVQNiuNA +3dasJS+uSqKiX32/5m0OzJlPtrexpLCwOEwte4gDSQUhRXPmUihO/ersOUqO +X0KJ1dwuhcqqQRdUxjmwpUHQ5IKnFHZHscczfnMg3ZR+Z0uiFA7rsMt2L+HC +erRObfkohcYqAWNiilwIMMzZ1xRFxTJVRuaZ3Vywyhb6ZZ1AxZcsjljyHi4w ++U/Ftl+mYteaWf5r+7jwomMH93UhFTe9qwrM8+TCmqPLeXvbqXh1enrHhWNc +GCoILvifjDQWL+IzrYzlwh4Jm++yd6RR0lpC2vcuF3RDayMz70njq7m6SoFK +Lgj2r5JkPJXGOVW17hvVXKgu4wWVbmk8rl6S1/aAC5LW1UlaC9Joa5+y/3cj ++fxIJb1N1jKIIuPXb7zngtmP2RC/ARkcybI57LqIgJObL6k9HpXBoTTzxjO8 +BJTmaL4Tn5JBobyp9huLCaA6uBpWL5VFR+WYvm4BAkarGn7zrpHF5tpWWZoY +ASlRSYFXT8hi1sIZbX4mAY09q5VGI2Wx4EKf96QiAX/16l9viJfF6O1nbfuU +CTjwdVJn8Los6kV91S5eTYDRFuefa+plcZ7CNpfTJqB/pYrfkxVyeP+K3SIX +IEDqyEN5KSk5pBru9JQyIWBL4642H7ocevxRC2/bSEBFSLyGsK4cPtte37nW +nIDzH8dHdu+Sw99uZ6XbthCgc6vW60euHAb2PHM4uJuASNZ2N5n18mimYZqq +c5SAzS6Z/zPYKI8cVKdkHyNAKOLbGcct8kjR4k0XCCAgoz66IMlVHi8aCbi/ +PE5AlVXNtyVx8hjW7LZHN5SA8V2KQRPd8ljO/RFuEk1AZchRftFBecwuUDP3 +jyEgLON+2poxeSx6O2+RdY6A5X07a314aNj5w2LRWBwBql4JlD41GgZvCXBx +SSTA5fjk+dZQGu5NafGKv0KAcupGuZFoGlK+CkBE6r/1/6+EP4mGm+883Hss +jYCQv6tfbMyjoXEIEbg5nYDLZ1xWVrfScIlgD635OgF78osK3ryh4RmYsMjJ +JID5bNrgVx8Nh8/2PwjMIoAjmOK0dpKGjr3xV0VyCGhNfpaVL6+A5h1a0nJ5 +5P7ekdCuV1XAxgR6Yydpp063uj5tBbwpnNQSn0/AEPXvoKy5AjYY7no9WkAA +b7aW2kU/BRyZLJuPukVA8+PTtWUnFPDQbJWPwm0Ckgaat7RFKeC8sY5WFWma +queRpakKmHqb53VvERkPpVfvhj1UwNDnenGUUgLM3rbPjTUqYKxyQ3gwaRsK +n8W+VwoYwJdj+420u51fN3xWQN6nhmebygjwC73B5IwpIPVz8JAuh4ATeV2H +6NMK+IKPT+0aafNQRnjEYjouvSG62ZVLQIvwvRvrBel4+pWMygPStnk7GseF +6BjqHjlIJQhwbosXdaPSsborbHED6aMKUzdM1Om4qkNk7PcdAibvJDXOrKXj +wvrOQdZdcj82q3/n6tEx85dxXRjp6GOu+swNdJR8z9CbIS245I/Tu410dOMY +N2uXk+uRfjn8ogUdt6trWnmRTq9vbuTZTse+bx2CTaQVdnl+r3GkI6+gxtZJ +0nmjC6IBTnSsDcs4RasgQC0yXV99Hx3Hs6evmpEuW7nOecCdjl3nxQu8SOvd +fh5+zZuOntKPc86RrtlwMM/+MDn+W+eFPNLwmq9pmT8dr+5XPfSA9BOvrO/1 +QXT8lBVv1Ena8q+h2KlQOk5Hd/8dIt2e1KGvF0FH08ohYoa0g/IR59GzdEy+ +nLyXv5KA7mqBiLw48n4mJXOipF1s8vL2JNLRK33lJWnSg/0bmiRS6PiMlc+g +kfYJ7v7emko6yuCmAumxZYFi0Rl0FDtTqPzvfEC2kAE7h44hIp3X/42f1rvl +PJlPx53V6SJipMOaTCNKbtNx/unbsH/P53XpzfMso6MB+9Dwv/nF/u9Ek/xd +Ot7u1ts+TFronPhYZxU5f/GVlf/eL0W2VCzxPrke0t9lH5KmcjYbmNfRcaoj +MyKf9HWzAef5p3Q8Prj8SyxpZvfpiIoWOjZnymz1IV14mJrv94KOgqLFFeak +NXnuNKl00lF3Pl+RQZq4snWst5uOOb3fL02T+7defUgstZeOER99lrWR3ugg +v4d/iI6toenLDpN+NlQZ8XCUjr6/aKnrSW85bZcf/JOODebB6otI7yw4N/Z1 +lo6x763848h4em/EFM9eoGNLwjUVS9L7n98z2MXHQPsfB78uJu07/TOicQUD +N65bfzGIjFejYwckv4gx0PLY+WlF0ktH3hXxUhl4KiLjWxsZ3/k99W82MBnI +7qo/JUU60GG97x5VBg7Ys+UryfzY2Fa8KESDgRr8sM2edO+Dyxrl+gyUvlHi +G0nmV7GBYN0rYwaelI9xEicdwgnbOY4MtPp5vzeHzE/JXK8odWsG1jVrlN0l +83dbtGFXzj4GrnrodpFbTNaD+ZLDDz0YaE2Lc1xFejSIyfvBh4ESgcNV18j6 +EOu9bA01kIG7OHaeJ8j68cj6w5nEWAYOCw8FCxSS9V4scm0ol4Eq1Oms+FwC +KPGTT9IqGChcpDvfSta3dt6DThW1DHQo5xFdRvrQpF30zwYG9lj8t/s0WQ/z +upR6vN4xMP7j33SjDHK+WY0xDrxM3FFyY4n0ZTJ+pdhy/kuZWF3Ra61yidzf +JC73vxVM7Jp656SVQr5PVPr7ZikmKoqE9Rglk/P19NUx0WDijMDBC6svEDCj +LtKr6cjEk3LqX/zOEjB1XSZS14mJLc/oL2zOEPBLWFnJcB8ThfFJhXoUmQ8T +hgfNfJgYQuwNfx9O9sda9ymn00y0l1xgypD9p9m6Uig2n4nQxv64hOxf6Ydc +oH+SPG+UVFDmREDqB+/+r7NM3B9387E22f8ubQuI/r7ARFGRr3zcnQQk6sa2 +TAso4vyd4wI3HQiI+sPdKUxTxHdtIjrHbMj1iV98lGWuiD1zFHY42X9ZRcXZ +V64oYsY60E0g+3kPvShr0zVFXJrMfdNJ9vuQK7cyf2Upoulc/Sp58nugMrIg +w+6WIpYMRH/Io5H7sys7TeieInaP1NxOkyJg9eJLSTGfFPH916FeMfL7QnJf +aESQhhKqxM9JOo1w4aeYleuOOiV8Wlg4H1zAhS5f5ouDz5TwyFuP/sV5XHj0 +dBbCW5XQNEnGOzmHC0khRQqFb5TwoNWbfTkZXNDqX/5xZkQJfVJ2auZf5IIf +9/ne6+LK2NCbdZMdxoWRbY7Ogx7KuHr8jst9ey4MJrju8OdXwdNbn960m+aA +5Y9gy8/6qsjKSTnHNuTAqPvSgLvhq3ARxZballtK/h9I8ZyrW40rvHWFJsqL +QaxNJZHzQw3/F7j7ifXr2yAXW2arr6+Bu/okO2aqCyFN3VBE3EsTVzgvTbR7 +VADNMibrJpLX4CJ+x20JHXlgJFeXtPbNWmTZOAd/bc4FId7cQLcoLXxiG35e +fjIbaJEKrN0q2iiotbeCq5AJAsp7KuyeaeNljZa/cVnpsIYtXRa8Vwdp3a3+ +6Smp4N8rVm9F0cWhS458YTGX4MdEgqNlmi7WGiRS6r8lg8Xap+mWmno4PrGx +6772f/BgwvjP73Y9DH+fdGZx4Xnw09B599JzHeZUdiw79ikG2GMeHbsF9FFb +Kfj4OtMzsEmJunVFrj42qmVy/LdGwKqI8yfqDAzwboOlsPq5UFDzNHyo/M4A +q3ICbGWeBIHnA++zd4+tx+G/teWXf/nDw+wOj58rDZHTVDc30e8HvwoXfq+t +NMTBlgOzvlQf+LLDPDuu2hBnbbQ/lPP5QBffhc0DtYaYmOnOv/ynN9S6yly9 +8sgQ9zjZS/Y1eUMUdZ3RXJMhfswX3qtyyhtEYg+ean5viKZbz8cpD3iBhlcn +xZPHCG9FMa8/qDkA7spFAulbjTBwXmJ8INEDQhpcDqrYGuGnlTGXB055QJKn +WAthZ4ThFbx94wc94F7+yYSWnUZ4w97ZVM/CAyRUNgvPuZGeSXfZS/GApyqf +JVyDjPDP45om7ePuoLZKga6SZYQ7W1Xli7z3w0+1FH1i3AhZr4ZLVI67Qlcr +bhKfIK+/aczd4uUKj/zG7AMnjVC11WDw1G5XSCQsj+nPGiGHMvToD9sV1Iwo +xTW8xjiZWlXkz+8K+y0PM+oljXF/0ZElEev3QYeXxfIOljH2CymsdknfC1V5 +fz5Nxhpjt87BSJ0rTqBvGvjbKt4YL4prKZaEO0H5p9Hl2ReM8WXEm+T1Pk5A +0HoNrC4aY8qOw8WRLCcoTnt0IfOaMYbW2Fb0DOyG7IRoQ4tSYywuzlYtWLcb +4gKFk9NeG6N7sWrN1s87wclMEY1pLFxs0XH7ob8jzHUsFaqns1D/96ZD510c +IdtzrMdKkYWW4kVCB6wc4UtMdbDTKhbukRZ6vo3pCP5N28pO6rBwVKZm9Nsr +Bzhvc4pWZc7CwgEjd5aBA9Ts6vyrd4SFr0OUON+X2YPs4XPVax6xcJJ3dQl9 +wBYSFw6si69jYVOF3PL+17bAc9Gc+/UJC3WLj5aXPbGFkYrFt7KbWOgzm9Rw +pMAWaihn08ResxDTBX9GHrQFp0sRwVOfWajBE+/cPrwN0mpPrnuwjI1GNRlt +v5VsYKWgL3frTjZOOQuIK/ZaQZ7p6ZDx3Wy8Mzqa7lNnBTqnE01T9rBRye/z +m6YCK7AZ53R2ubFRo0dL+u0RK4h5Mznj7stGwZyKBCavFUznhm8MiWRjgNDf +s4fWWMI745TXBUVsdA8/N2WUagHex/MyLEvZyFbfZ5ocZgFTpeXkbywb/cXm +Wuc9LUCM2fVbu4KNJh97rBTWWYD1Unm5+4/Y+Lhv/lNAhznc6yjweN3Jxu6V +FhrOUuZgJVSlGdTFxiGziXA5ijl0WTRNUXvYmJRF+zoxtAl+1XyLdelj4/oN +ZjcHazaBZo5WyfAIG4+vuP6rZd8muPfOJCjhOxt7lB4PG1tuAisJe1g7zsbN +/Mb7H+tsggPnjr8MnGTjXPyfy8uXkPd7FJMuNc1GC+0GzVc/zCBqNtW9ZpaN +6Zkji0q6zUBE75bG3jk2dl1qplyvN4PMwzWTCwtsLA9/Ts0tMYP/A71YJ+E= + + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07310674507562985}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07310674507562985}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943886303561573`*^9}, + CellLabel-> + "Out[120]=",ExpressionUUID->"385ecc30-6f57-4700-8e14-fd834ad16bdb"] +}, Open ]], Cell[CellGroupData[{ @@ -11083,66 +11679,76 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}], RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", CellLabel-> - "In[448]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], + "In[121]:=",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"3.2460289533654366`*^-170\\\", \ -\\\"53288812601251278002207702320250759194884493516708656246381218384356695032\ -116730280886932040207278890810138815516114944000000000000000000000000\\\"]\\) \ -is too small to represent as a normalized machine number; precision may be \ -lost.\"", 2, 448, 489, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347571140808*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.1151056519405192`*^-150\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 45, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994388630415378*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], +In[121]:=",ExpressionUUID->"e934a55e-2760-4d2a-9d05-7e5128e888ad"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.3587055546643305`*^-173\\\", \ -\\\"16119865811878511595667829951875854656452559288804368514530318561267900247\ -2153109099682969421627018644700669916936247705600000000000000000000000000\\\"]\ -\\) is too small to represent as a normalized machine number; precision may \ -be lost.\"", 2, 448, 490, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711508217`*^9}, + "\"\\!\\(\\*FractionBox[\\\"3.2043880398041273`*^-153\\\", \ +RowBox[{\\\"\ +692388265304082962155241704502629852543932276498796563311324806235240\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"25\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"8063384494795553340756316369516704730972160000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 46, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994388630426243*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], +In[121]:=",ExpressionUUID->"24b93e34-1796-43b7-9394-f7e642db6653"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7139378525370916`*^-176\\\", \ -\\\"50551899186051012364014314729082680202635225929690499661567079008136135175\ -2672150136605792106222330469781300859512072804761600000000000000000000000000\\\ -\"]\\) is too small to represent as a normalized machine number; precision \ -may be lost.\"", 2, 448, 491, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711592274`*^9}, + "\"\\!\\(\\*FractionBox[\\\"9.208188203307072`*^-156\\\", \ +RowBox[{\\\"\ +257637673519649270217965438245428568131597200085202201208143960400132\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"29\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3853705134253980954253210971658303947407360000000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 121, 47, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.994388630436727*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], +In[121]:=",ExpressionUUID->"4b5087a1-692f-4848-adcd-3d33a34e83f9"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 448, 492, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475711683846`*^9}, +during this calculation.\"", 2, 121, 48, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347571140808*^9, 3.99438863044652*^9}, CellLabel-> "During evaluation of \ -In[448]:=",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], +In[121]:=",ExpressionUUID->"d6373b1d-53f1-4aaa-9674-4e14bd03862e"], -Cell[BoxData["10.362747935330763`"], "Output", - CellChangeTimes->{3.991347578228073*^9}, +Cell[BoxData["10.357200468564143`"], "Output", + CellChangeTimes->{3.991347578228073*^9, 3.99438870345092*^9}, CellLabel-> - "Out[448]=",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] + "Out[121]=",ExpressionUUID->"47bce984-6ec8-4657-8189-5c0f2a22d281"] }, Open ]], Cell[CellGroupData[{ @@ -11209,68 +11815,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918503106317043`*^9, - 3.9918503148567924`*^9}},ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-\ -2a98ba29b602"], + CellChangeTimes->{{3.9918503106317043`*^9, 3.9918503148567924`*^9}}, + CellLabel-> + "In[122]:=",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 493, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578265545*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8354449707909476`*^-207\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 122, 49, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9943887035024443`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], +In[122]:=",ExpressionUUID->"d7b813a8-4c09-4915-a0a8-296fd2ef032c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 449, - 494, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347578275551*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8570734149776156`*^-212\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 122, 50, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.9943887035107727`*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], +In[122]:=",ExpressionUUID->"91a1128b-84ad-4db2-b8a9-0e177b6f9d0f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 449, 495, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782835484`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.447351257310774`*^-217\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 122, 51, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994388703518269*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], +In[122]:=",ExpressionUUID->"8573bdb1-63a4-4e03-96ed-6d34016d10fe"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 449, 496, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475782930756`*^9}, +during this calculation.\"", 2, 122, 52, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347578265545*^9, 3.994388703525523*^9}, CellLabel-> "During evaluation of \ -In[449]:=",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], +In[122]:=",ExpressionUUID->"4c4d0099-ff7f-4676-8b97-11314666b886"], -Cell[BoxData["1.4359199941844076`"], "Output", - CellChangeTimes->{3.9913475858902473`*^9}, +Cell[BoxData["0.35188375645433734`"], "Output", + CellChangeTimes->{3.9913475858902473`*^9, 3.9943887127430887`*^9}, CellLabel-> - "Out[449]=",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] + "Out[122]=",ExpressionUUID->"23359f17-6a5e-4785-973f-bdae9e0d79ac"] }, Open ]], Cell[CellGroupData[{ @@ -11291,8 +11901,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11337,68 +11946,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850318596199*^9, - 3.991850321359722*^9}},ExpressionUUID->"edfdd675-c60b-304e-9e16-\ -68452b971319"], + CellChangeTimes->{{3.991850318596199*^9, 3.991850321359722*^9}}, + CellLabel-> + "In[123]:=",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 497, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859272156`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8354449707909476`*^-207\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 123, 53, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.99438871279735*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], +In[123]:=",ExpressionUUID->"cd3d62ce-e472-4dff-a410-a777cc4ba15e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 450, - 498, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347585937319*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8570734149776156`*^-212\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 123, 54, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.9943887128059893`*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], +In[123]:=",ExpressionUUID->"ae08cf8f-15d5-43f6-863b-2bfcd6bf24a6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 450, 499, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859463177`*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.447351257310774`*^-217\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 123, 55, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.99438871281548*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], +In[123]:=",ExpressionUUID->"2a189819-7d98-4f44-a9c7-907d7e03fbf3"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 450, 500, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475859543304`*^9}, +during this calculation.\"", 2, 123, 56, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913475859272156`*^9, 3.994388712823462*^9}, CellLabel-> "During evaluation of \ -In[450]:=",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], +In[123]:=",ExpressionUUID->"6737854b-f13f-45d1-b677-93b764806dd1"], -Cell[BoxData["5.09241659576143`"], "Output", - CellChangeTimes->{3.9913475931276417`*^9}, +Cell[BoxData["29.5429630712617`"], "Output", + CellChangeTimes->{3.9913475931276417`*^9, 3.994388721672723*^9}, CellLabel-> - "Out[450]=",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] + "Out[123]=",ExpressionUUID->"ed2de846-9691-4598-beba-511a842a3b24"] }, Open ]], Cell[CellGroupData[{ @@ -11419,8 +12032,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -11465,68 +12077,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850325611994*^9, - 3.991850328926569*^9}},ExpressionUUID->"d0469d46-2e74-494a-be85-\ -b41cb2f3fa92"], + CellChangeTimes->{{3.991850325611994*^9, 3.991850328926569*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"6.132043033902215`*^-187\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 501, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134759316485*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.8354449707909476`*^-207\\\", \ +\\\"36500040110166628987154089000285177156134537265978168245616958637766157640\ +66213134598144000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 124, 57, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.994388721723559*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], +In[124]:=",ExpressionUUID->"e42d0af4-13c5-4754-b898-9bfd1bb29c9e"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"8.094318741532472`*^-191\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 451, - 502, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593173849*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.8570734149776156`*^-212\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 124, 58, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.99438872173164*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], +In[124]:=",ExpressionUUID->"43372106-cbec-4c73-b002-6886bd001ab6"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.0684529695452981`*^-194\\\", \ -\\\"92501706528250791901347072323588368234948680742190198770613927101881057071\ -7360434442383213140448215302144000000000000000000000000\\\"]\\) is too small \ -to represent as a normalized machine number; precision may be lost.\"", 2, - 451, 503, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347593182852*^9}, + "\"\\!\\(\\*FractionBox[\\\"4.447351257310774`*^-217\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 124, 59, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.9943887217391253`*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], +In[124]:=",ExpressionUUID->"791c3e21-3204-4f37-a38f-57608c14017f"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 451, 504, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475931908703`*^9}, +during this calculation.\"", 2, 124, 60, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.99134759316485*^9, 3.9943887217466288`*^9}, CellLabel-> "During evaluation of \ -In[451]:=",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], +In[124]:=",ExpressionUUID->"17950887-230f-4d91-9a41-3743d844aae1"], -Cell[BoxData["16.684462799943017`"], "Output", - CellChangeTimes->{3.9913475973006153`*^9}, +Cell[BoxData["3.8677058730985263`"], "Output", + CellChangeTimes->{3.9913475973006153`*^9, 3.9943887277067623`*^9}, CellLabel-> - "Out[451]=",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] + "Out[124]=",ExpressionUUID->"426d1a54-f3ca-43ce-9341-33134c71837e"] }, Open ]], Cell[CellGroupData[{ @@ -11535,22 +12151,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.99185033265069*^9, - 3.9918503366548977`*^9}},ExpressionUUID->"58b5e243-0972-1946-bd17-\ -aca0f3e8a35b"], - -Cell[BoxData["0.15578016747845222`"], "Output", - CellChangeTimes->{3.991347597341627*^9}, + CellChangeTimes->{{3.99185033265069*^9, 3.9918503366548977`*^9}}, CellLabel-> - "Out[452]=",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] + "In[125]:=",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], + +Cell[BoxData["0.032918912061866215`"], "Output", + CellChangeTimes->{3.991347597341627*^9, 3.994388727759466*^9}, + CellLabel-> + "Out[125]=",ExpressionUUID->"e5372f11-c065-4aa7-a8d3-105bec62f64e"] }, Open ]], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"J1", ",", "J2", ",", "Cb"}], "]"}]], "Input", CellChangeTimes->{{3.9918503408077297`*^9, 3.99185034363356*^9}, - 3.991924645514969*^9},ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-\ -a3711ba632a4"], + 3.991924645514969*^9}, + CellLabel-> + "In[126]:=",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ @@ -11573,12 +12190,12 @@ Cell[BoxData[ RowBox[{"Ir", "*", "Il"}], RowBox[{"Il", "+", "Ir"}]]}]}]], "Input", CellLabel-> - "In[454]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], + "In[127]:=",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[BoxData["12.368532070745184`"], "Output", - CellChangeTimes->{3.991347597372614*^9}, +Cell[BoxData["9.572341068730038`"], "Output", + CellChangeTimes->{3.991347597372614*^9, 3.99438872779548*^9}, CellLabel-> - "Out[454]=",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] + "Out[127]=",ExpressionUUID->"ee2483ff-750d-48d0-b448-8d9c6bfe7c21"] }, Open ]], Cell[CellGroupData[{ @@ -11588,12 +12205,12 @@ Cell[BoxData[ SqrtBox[ FractionBox["Kb", "Qb1"]]}]], "Input", CellLabel-> - "In[456]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], + "In[128]:=",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[BoxData["1.0665924029125342`"], "Output", - CellChangeTimes->{3.991347597428034*^9}, +Cell[BoxData["2.311497489987273`"], "Output", + CellChangeTimes->{3.991347597428034*^9, 3.994388727814107*^9}, CellLabel-> - "Out[456]=",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] + "Out[128]=",ExpressionUUID->"8ce6c10a-37a6-4131-84d2-15b4360c0207"] }, Open ]], Cell[CellGroupData[{ @@ -11603,12 +12220,12 @@ Cell[BoxData[ FractionBox[ RowBox[{"Qb1", "*", "hb"}], "1"]}]], "Input", CellLabel-> - "In[459]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], + "In[129]:=",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[BoxData["13.192182341836848`"], "Output", - CellChangeTimes->{3.9913475974971066`*^9}, +Cell[BoxData["22.126442353671575`"], "Output", + CellChangeTimes->{3.9913475974971066`*^9, 3.99438872783182*^9}, CellLabel-> - "Out[459]=",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] + "Out[129]=",ExpressionUUID->"cea6f529-05fa-4751-9c6c-23cf28f968b7"] }, Open ]], Cell[CellGroupData[{ @@ -11798,12 +12415,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[460]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], + "In[130]:=",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[BoxData["0.038908834568544604`"], "Output", - CellChangeTimes->{3.991347597528105*^9}, +Cell[BoxData["0.007027083111297979`"], "Output", + CellChangeTimes->{3.991347597528105*^9, 3.9943887278535833`*^9}, CellLabel-> - "Out[460]=",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] + "Out[130]=",ExpressionUUID->"856eeeb1-c368-4ec9-a6e1-1d23b05dbc4c"] }, Open ]], Cell[CellGroupData[{ @@ -11817,12 +12434,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o1"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[461]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], + "In[131]:=",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[BoxData["4.492838724335521`"], "Output", - CellChangeTimes->{3.9913475976441536`*^9}, +Cell[BoxData["10.572005870976467`"], "Output", + CellChangeTimes->{3.9913475976441536`*^9, 3.994388728036963*^9}, CellLabel-> - "Out[461]=",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] + "Out[131]=",ExpressionUUID->"0f3e30a4-b6b2-40e6-be8a-a5e513274ee6"] }, Open ]], Cell[CellGroupData[{ @@ -12014,12 +12631,12 @@ Cell[BoxData[ RowBox[{"-", "13"}]]}]], ")"}], RowBox[{"-", "2"}]]}]}]], "Input", CellLabel-> - "In[462]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], + "In[132]:=",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[BoxData["0.012544276227890849`"], "Output", - CellChangeTimes->{3.991347597671173*^9}, +Cell[BoxData["0.04412052326562376`"], "Output", + CellChangeTimes->{3.991347597671173*^9, 3.994388728057773*^9}, CellLabel-> - "Out[462]=",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] + "Out[132]=",ExpressionUUID->"61a358ba-ae28-4955-9089-ac6ce69a68d4"] }, Open ]], Cell[CellGroupData[{ @@ -12033,12 +12650,12 @@ Cell[BoxData[ RowBox[{"-", "x"}], "*", "x", "*", "o2"}]], RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input", CellLabel-> - "In[463]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], + "In[133]:=",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[BoxData["7.912653285153153`"], "Output", - CellChangeTimes->{3.9913475977705975`*^9}, +Cell[BoxData["4.219146577055591`"], "Output", + CellChangeTimes->{3.9913475977705975`*^9, 3.9943887281986303`*^9}, CellLabel-> - "Out[463]=",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] + "Out[133]=",ExpressionUUID->"53fd7287-61d5-4abc-a2f1-9112f8b9c712"] }, Open ]], Cell[CellGroupData[{ @@ -12131,12 +12748,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[464]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], + "In[134]:=",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[BoxData["0.6975316474635891`"], "Output", - CellChangeTimes->{3.9913475977856007`*^9}, +Cell[BoxData["0.06275239908812294`"], "Output", + CellChangeTimes->{3.9913475977856007`*^9, 3.9943887282169533`*^9}, CellLabel-> - "Out[464]=",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] + "Out[134]=",ExpressionUUID->"2bb2337d-c4e7-485f-945f-1d1cd9591a4a"] }, Open ]], Cell[CellGroupData[{ @@ -12226,12 +12843,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}]}]}]], "Input", CellLabel-> - "In[465]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], + "In[135]:=",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[BoxData["0.3024683525364109`"], "Output", - CellChangeTimes->{3.991347597813669*^9}, +Cell[BoxData["0.937247600911877`"], "Output", + CellChangeTimes->{3.991347597813669*^9, 3.994388728233733*^9}, CellLabel-> - "Out[465]=",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] + "Out[135]=",ExpressionUUID->"003fc379-70c0-41cf-a26d-75678a9202d9"] }, Open ]], Cell[CellGroupData[{ @@ -12354,12 +12971,12 @@ Cell[BoxData[ RowBox[{"32", "\[Pi]"}]], "b2", "*", "b2"}]}], ")"}], "*", "f2"}]}], ")"}], "2"]}]}]], "Input", CellLabel-> - "In[466]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], + "In[136]:=",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[BoxData["0.21098124825032033`"], "Output", - CellChangeTimes->{3.9913475978426323`*^9}, +Cell[BoxData["0.05881453549680789`"], "Output", + CellChangeTimes->{3.9913475978426323`*^9, 3.994388728252461*^9}, CellLabel-> - "Out[466]=",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] + "Out[136]=",ExpressionUUID->"94a838fc-3cbe-4a5f-9f0c-d4bb9ef86aba"] }, Open ]], Cell[CellGroupData[{ @@ -12421,68 +13038,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503626529236`*^9},ExpressionUUID->"ba508068-6b78-254c-87d6-\ -cf1adc0753dd"], + CellChangeTimes->{3.9918503626529236`*^9}, + CellLabel-> + "In[137]:=",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 505, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597872814*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.567632504163568`*^-206\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 137, 61, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994388728274057*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], +In[137]:=",ExpressionUUID->"0f4f0e5d-bb75-42ff-80d7-39ad0390f259"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 506, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913475978828144`*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2044795699389167`*^-210\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 137, 62, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994388728282483*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], +In[137]:=",ExpressionUUID->"3a117578-ae02-4569-af05-f43ad03bdb2f"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 467, - 507, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597891815*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6057234081368114`*^-215\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 137, 63, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994388728290195*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], +In[137]:=",ExpressionUUID->"b70a8c94-f213-4ce8-a6d6-a4d3b4e50bae"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 467, 508, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347597900812*^9}, +during this calculation.\"", 2, 137, 64, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.991347597872814*^9, 3.994388728297636*^9}, CellLabel-> "During evaluation of \ -In[467]:=",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], +In[137]:=",ExpressionUUID->"7bc7d582-5ac9-4d66-be72-020e8171606c"], -Cell[BoxData["4.492838724335523`"], "Output", - CellChangeTimes->{3.9913476018505497`*^9}, +Cell[BoxData["10.572005870976483`"], "Output", + CellChangeTimes->{3.9913476018505497`*^9, 3.994388733818632*^9}, CellLabel-> - "Out[467]=",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] + "Out[137]=",ExpressionUUID->"7c63487c-d349-4680-8097-d71902bab315"] }, Open ]], Cell[CellGroupData[{ @@ -12544,68 +13165,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{ - 3.9918503657638073`*^9},ExpressionUUID->"842e33e4-ae06-f746-ab8b-\ -97489285cc9c"], + CellChangeTimes->{3.9918503657638073`*^9}, + CellLabel-> + "In[138]:=",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.6476402424150632`*^-194\\\", \ -\\\"66885981049744024409206719656442605103016018168204074959083835946452474281\ -358493165635789279094374400000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 509, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476018885117`*^9}, + "\"\\!\\(\\*FractionBox[\\\"5.567632504163568`*^-206\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 138, 65, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994388733880493*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], +In[138]:=",ExpressionUUID->"4c3b0044-116b-451e-b2ee-23bf8ab39723"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.2411289608803614`*^-198\\\", \ -\\\"15410530033861023223881228208844376215734890585954218870572915802062650074\ -4249968253624858499033438617600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 510, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.99134760189851*^9}, + "\"\\!\\(\\*FractionBox[\\\"1.2044795699389167`*^-210\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 138, 66, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994388733888076*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], +In[138]:=",ExpressionUUID->"3bf1f2f3-ed05-4aa0-ad8c-93f2c2859cdc"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"9.349134949982097`*^-203\\\", \ -\\\"37000682611300316760538828929435347293979472296876079508245570840752422828\ -6944173776953285256179286120857600000000000000000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 468, - 511, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019065113`*^9}, + "\"\\!\\(\\*FractionBox[\\\"2.6057234081368114`*^-215\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 138, 67, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.99438873389536*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], +In[138]:=",ExpressionUUID->"4798f47c-96cd-4924-a649-f4cac77026cb"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 468, 512, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913476019158936`*^9}, +during this calculation.\"", 2, 138, 68, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913476018885117`*^9, 3.994388733902466*^9}, CellLabel-> "During evaluation of \ -In[468]:=",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], +In[138]:=",ExpressionUUID->"17e28b1d-02db-4816-9195-880c660012a3"], -Cell[BoxData["7.912653285153152`"], "Output", - CellChangeTimes->{3.9913476058912296`*^9}, +Cell[BoxData["4.219146577055593`"], "Output", + CellChangeTimes->{3.9913476058912296`*^9, 3.994388739273828*^9}, CellLabel-> - "Out[468]=",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] + "Out[138]=",ExpressionUUID->"28e7efbe-5d3e-4bf9-96e6-5e412c6d570c"] }, Open ]], Cell[CellGroupData[{ @@ -12663,93 +13288,94 @@ Cell[BoxData[ RowBox[{"\[DifferentialD]", "y"}]}]}], ")"}]}], "//", "N"}], ",", RowBox[{"{", RowBox[{"z", ",", "0", ",", "180"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{ - 3.991850369070572*^9},ExpressionUUID->"b2e314f8-a6f0-6942-a94c-\ -5ac1cacd7190"], + CellChangeTimes->{3.991850369070572*^9}, + CellLabel-> + "In[139]:=",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV1Hc8Vu0bAHBZySqEUF67EMljk/uSlb3LznieY2Svlwot0isqqXhTFMoM +iQb1NlSU4hdKhawje3uOivrd/jif8/l+7nOu67qve0j7hTsyWFlYWEbxs/aO +fK+6/X77e8OXLf4immokMpwu0vQzqUAXtVUs19yfr5UtZ9KIAn+lkGu2p7/j +5KW9RDTxsFEt7Jr45BccJq1IOY901ME+82rL0+Sy/6H2s5NyetgP2yOvr6h3 +odWfJ7wNsMe/vDma0NCNqpdL/hhii5OyHkzjHhR61ZtrL7bVzFHd6NZv6L9f +hfGm2E9WxnniywZQhWaCvQX2x+OiR+rDhlBIYN85G+xpTpPxRXUSnajv0HLE +5jwb4UajRtD/TN1MD2BLClxrjmwYRcEovMET21aCeWvaeBI5KNj0BWITBTIi +KlzTyDZOOD0cO1neLuVQ6wyaXArLj8PuFu3cHVM2h/4J/fg7BZvuHhx08ew8 +ih8ctsjEns1juXE3bAGNH0tZuYzNJaOyaU59CV12Tcopxc6mvzDfJMxE3Iqf +jtdiS912S95FMdElhxcfHmPr7EydDm1YRhmr+8s7sAO1vrWOG6+g/oZYbfbd +JFqMj2XnVlhFd9SivQSwjzXwGChy/UbBy5wTktg5oFMe0PoH6RssGOhj04ub +TaLK1kFQxERDPHbZq4v9xyVYYRCVSJ7Bnv3uffTCWVZw3vVnNBf7qNJSbXUY +GzzPSrzXiJ1dJS07o84B+xVaFdbjvn5pn3zyu5ADjHKCXoljS83fd+cX5oQd +LcXvVLErNGyzVChOkGGuCLpiNz08vC6kgQvWC+smVGEvvej4NmrMC/6zp+9F +0kgkaM276cgTXjidpsiRia3WaQJ8unyQSt1oK8MOHq4r2K3KDztLJT6Q2BGs +rWp7eDdBVbJDhq8GiUiZO3MpTAFQWnzfG66J+0O82dBGE4SkrMDWi9is5SPS +WyIFQcRuUuMBthTtL8eyCUGozbofzapFInfj83ff9wtBmu2pkjzsNv+oaNG3 +wvC4bs/sd20S9d3OTPfhEgHFIvkkIR0STU6UFZaaioDO4Y2pCJs7ZqhD/6kI +CIbOsOVim5xy1vCpE4VjBzY+cNAl0aMiraWSfDEQNXNh+6JHoiLyZ5xezDbw +HtpMMzMk0T6X033RldtAPE1CIhF7sknIrHJkGzytrg+9h61RtFNYyk0SSutq +HOUQ7qefdy2H4V/A7zslsQFIND/T//foSSlom9xaOWJEIqFQk3u1NjIQu0ei +e86URCNF3IH2wTKw4BIkomVGogc97RJTqTJwKy/9v8PYntZeJxWeysDyPy6O +HOa4PuU4x1x1WfhyfM/hv/bh/OO3Z5NE5UD7mFdXgCWJnAN4VCwH5OFb/ZmW +fXYkQnEu6gdW5YHXk701B1spJV+bLqYAl17HaY5hsxTS9iY5KIBPl/WedHsS +VfZ5HLj7TAH2VbNJdzrg87m/4rj4ze2geKRLL8EZ12di83HcTxE+bI18s8md +RIVOV75SSYqwsm20OhQ702+gn/2qIlxpLv/9Bpt+LHZCskMR9I/Jtad6kEig +8RqLk7ESBEwoW7F54f1Dm1ZqkFWGND6poo0+JJKQOZecPrwTDh8uYsYSJGr8 +Z1HxB6sKCMzktIxiey64dRLSKqAtnCHiGUCi601yinu9VcB97JSkSSCJZAIe +fVj+hP1Q4btYMJ5vBSlPvFWFoRP93j2hJNomIUlIuanBbGAI5+NYEu0sjuH9 +hdQh8fGSxnQqifzoJ5dUbNXh389dc7Gn8XmVzerz8VQHfedlsd/YbDerql/F +q8PA8uaKjWfwebs+7pxVow5cldLd2un4Ps3xuaYoS4MXpdpOeefw+qZbq7py +asCMJX2hLodEN6Lk7OtaNUHo9smunRUkao9D2qeKdeFOdqK+Wg+JpL27bL1C +9kBPvcUOJaERxPhTf2dbAsC6KDa7dJsRJDrxYL2o31744jg0eS97BMXQDHqy +lExAeCLN8WbfCPKbWmkWGjcFh93ZM3tUv6PKvdHr89vMYb7M73fD2e+oaDH4 +WUW2BdB3RfgXTX5Hy0Zb3jUlW0HZYlW5stco6mVhmxvwtQGuOXNaeOcoCtsa +fv64rB3892PdhjyrMXQnqPnppRR7qOvMvVrQNYYOL4hRykEOcLrFhWjwHkdL +lmb7Xx90hNu0ETf3lXGk63HBiHRwAhXlR5+MCibQB7FrwU00ZyhQck7bZzSJ +xG+dbCzZ4QLqHOapucuT6EG/krUt336Y3/lC5VX5FJLsnA2Im9oPKRLs3HV+ +04h26UJFYf8BmK2rC1lQm0HX2BdUs164ggvb8SdWyzOo3mjXl5SHbkB1VnZd +PzSLcrT/EVgpc4dT67MdlXtmUdvX4lTaWQ/gH27dlWo+h+ps8uQijnlCU0ZZ +L+eTOTQX6sQSRvcCy3EtdX7VebRkphg4bewNUivWvNfz5lHJ1OflaK2DEODk +e7B68wJyvVHs78XrA46aeqYbTy2g2rtWB9lO+4BWMlemwq8FpCvx4ceZHz5w +1mmukAxYRLL9AV/+F+QL0j08q9Zti2iY55Bd3pAv7PYp/NCmt4TaM239zV38 +gGt76OuXuUsoOz6fJ7bdD7b/x9pc9mMJNT7588Pfwh+OtEn6ZNsx0UZPOE17 +5A+/nv/p9L/CRFKbX7dtbfSHxg4Rw7QcJlJrtdnC+cQfQg2D/pTnMpGjgUdp +9zN/SDFqODN3lYmyt8a9TWzxB7Mpqi6mgInEe8s3Nnf7w2iSnYZHKRPJeYvm +eFL+IA+I+/YjJtL1mS5J0aBD3OrC2Z1fmehW7my0rRYdfG+n/Lu5h4k2d8wb +iurQQSjib64V7GlTqrNEnw55l5+yt/Qx8f3Fsq51Lx2cCzsSPAaZiJ8ScBN0 +oMOboRIVvzEmGs7Q3JAfSoda4y3JS0wmymw4GvTgFs6XO2WotIlCoepXdONL +6LD7ZZ85iW1dWrNBp4wOE3nslfkCFOK+MlJ6v5IO2h/d0gWFKJQSZT9ef48O +jceks2eFKXRUUe5Q3XM6XBs3rM+QoFDwlbchd/voMOh51dhKgUIW/CMGUf10 +MAsNyJjD3pHCwqc+SAc2g1XVK9spNBKlWVlD0iHoLktC/w4K+drmT1VP0mFs +R7PcIWUKuXJEh1X9pMOzlJYnPmoUMo8Wj6gQYcDd0DzJVl0KPc9PtczawoBb +o7yhQXoUMmidl4sXZ8Dqre5ZDn0Kqcm//WwsyYANipNXDAwoJPbpiPFXeQa8 +G1o8WGBIoQm9XhFuTQbkqNfcNzKm0DnWgscBTgwQVk08P26F57+LN8fGhQEz +sRqmYdYUOuURH0U7wADJwDmlOez4e/bb/7gzQGJpNW3RBtdPrLtw2Y8B/F+o +9Dk7CtHe+NFfRjLA/dyTrCYnCn26IM8je54BITaC3e/cKXQH8QWOXmAA30Ji +sJoHjj+12FR5kQFTuhdNs7DVLZqSdK4wwKwnoMvJk0KZLP7zNtcZsEk4ye29 +F4XMwgs+x1cw4NoelsECHwpt25amZXiHAfZEwRKFvfgm/CJbNQNaadX2tr4U +uqmAbDJrGRCW0NWzjL3a2/u08BEDvIwMrUz9KXTPWqLkfTMD8nhMIhsYFEr/ +ycqR/YYBlrE5C5wEhfxKxn3dWhlwjrmv0QF7E/sjieE2BoyVJUmR2CENrud+ +fGTAfoc0dbZACskqXY6TIxkwUTAbvjWYQj8/JXaMjTBgenXI3hO7PYWhVjWK ++/vZ7O+r2EkDGuO6kwwoMpfPFj1EoS85HV52Cwww2NHFuz6EQlnrBUwPryNg +cRf7zPNQCjXO93rEsBFwtL5FYRX7e29ZVBgHAXp2W2O1wvB+uGdS4LeBgNIe +ZZdb2CM+8b8sBQjIWTogfSQc129tKmgqRID/xHeeO9j62oKKSJiA86cv8PZj +n+er2E8TI6Dv8oqdUQQef/StRkKaAJaht73L2ERxRbOwLAGGys/+lovE359P ++LZRnoC83SHb7bBHCCE+dkUCmDL1r2+sjQuZB06qESA2PMZtEEWhR7+FkkfU +CZCp83DwwSbH+i/1axDwfFq18iS23tPDLzp1CDgn1Fn0Gns45I7kYyDgkKjU +RZNoCvG7HtG8v5cApZCbJ32xdY33WdeY4PzRRmcSsTPFBhOK9xEQRt7vuIv9 +gL3qfL4lARMCx7e0Yg/NHLmda02Ad6xl1DC2zivhrgx7Ag6INtEFY/B61wxO +nHYkoIUvcHU7dkZeFesJZ1xv+UKZAfZglIVanCsBoyvlJv7YfN4i5hHuBOQe +fK8Wi61jMeQV7ElA0csXu1PX/v8rMd3bh4AT5cJRxdgPuC1vuvoRoN0eVFO7 +Fm9J5KEjnQDlvcc4nq3FGxhqsyYIYI90CXu3Fq+1esQskADEMzLRvVbf/cRV +CCbA+rdq0tBa/JuWm/VDCIiJU5GfWoufIaqsGUbAbF9f/9Ja/Phho10RBAwO +QM0qNi+9xlUxigC3QIfL7LEU0rZLCpeNIcDiX/7z3Nh+elap2+JwP/virm/E +Piu/5ZpoPAHyX9OeCWHXbyJrBQ4TcDvG+IcI9sCvmjc8Rwnofl9sKobN+z1p +gCOJAA/rqlvi2FofrJb/JBPwMvPgVgns/wM16+F/ "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -12763,105 +13389,106 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Hc8Vu0bAHBZySqEUF67EMljk/uSlb3LznieY2Svlwot0isqqXhTFMoM +iQb1NlSU4hdKhawje3uOivrd/jif8/l+7nOu67qve0j7hTsyWFlYWEbxs/aO +fK+6/X77e8OXLf4immokMpwu0vQzqUAXtVUs19yfr5UtZ9KIAn+lkGu2p7/j +5KW9RDTxsFEt7Jr45BccJq1IOY901ME+82rL0+Sy/6H2s5NyetgP2yOvr6h3 +odWfJ7wNsMe/vDma0NCNqpdL/hhii5OyHkzjHhR61ZtrL7bVzFHd6NZv6L9f +hfGm2E9WxnniywZQhWaCvQX2x+OiR+rDhlBIYN85G+xpTpPxRXUSnajv0HLE +5jwb4UajRtD/TN1MD2BLClxrjmwYRcEovMET21aCeWvaeBI5KNj0BWITBTIi +KlzTyDZOOD0cO1neLuVQ6wyaXArLj8PuFu3cHVM2h/4J/fg7BZvuHhx08ew8 +ih8ctsjEns1juXE3bAGNH0tZuYzNJaOyaU59CV12Tcopxc6mvzDfJMxE3Iqf +jtdiS912S95FMdElhxcfHmPr7EydDm1YRhmr+8s7sAO1vrWOG6+g/oZYbfbd +JFqMj2XnVlhFd9SivQSwjzXwGChy/UbBy5wTktg5oFMe0PoH6RssGOhj04ub +TaLK1kFQxERDPHbZq4v9xyVYYRCVSJ7Bnv3uffTCWVZw3vVnNBf7qNJSbXUY +GzzPSrzXiJ1dJS07o84B+xVaFdbjvn5pn3zyu5ADjHKCXoljS83fd+cX5oQd +LcXvVLErNGyzVChOkGGuCLpiNz08vC6kgQvWC+smVGEvvej4NmrMC/6zp+9F +0kgkaM276cgTXjidpsiRia3WaQJ8unyQSt1oK8MOHq4r2K3KDztLJT6Q2BGs +rWp7eDdBVbJDhq8GiUiZO3MpTAFQWnzfG66J+0O82dBGE4SkrMDWi9is5SPS +WyIFQcRuUuMBthTtL8eyCUGozbofzapFInfj83ff9wtBmu2pkjzsNv+oaNG3 +wvC4bs/sd20S9d3OTPfhEgHFIvkkIR0STU6UFZaaioDO4Y2pCJs7ZqhD/6kI +CIbOsOVim5xy1vCpE4VjBzY+cNAl0aMiraWSfDEQNXNh+6JHoiLyZ5xezDbw +HtpMMzMk0T6X033RldtAPE1CIhF7sknIrHJkGzytrg+9h61RtFNYyk0SSutq +HOUQ7qefdy2H4V/A7zslsQFIND/T//foSSlom9xaOWJEIqFQk3u1NjIQu0ei +e86URCNF3IH2wTKw4BIkomVGogc97RJTqTJwKy/9v8PYntZeJxWeysDyPy6O +HOa4PuU4x1x1WfhyfM/hv/bh/OO3Z5NE5UD7mFdXgCWJnAN4VCwH5OFb/ZmW +fXYkQnEu6gdW5YHXk701B1spJV+bLqYAl17HaY5hsxTS9iY5KIBPl/WedHsS +VfZ5HLj7TAH2VbNJdzrg87m/4rj4ze2geKRLL8EZ12di83HcTxE+bI18s8md +RIVOV75SSYqwsm20OhQ702+gn/2qIlxpLv/9Bpt+LHZCskMR9I/Jtad6kEig +8RqLk7ESBEwoW7F54f1Dm1ZqkFWGND6poo0+JJKQOZecPrwTDh8uYsYSJGr8 +Z1HxB6sKCMzktIxiey64dRLSKqAtnCHiGUCi601yinu9VcB97JSkSSCJZAIe +fVj+hP1Q4btYMJ5vBSlPvFWFoRP93j2hJNomIUlIuanBbGAI5+NYEu0sjuH9 +hdQh8fGSxnQqifzoJ5dUbNXh389dc7Gn8XmVzerz8VQHfedlsd/YbDerql/F +q8PA8uaKjWfwebs+7pxVow5cldLd2un4Ps3xuaYoS4MXpdpOeefw+qZbq7py +asCMJX2hLodEN6Lk7OtaNUHo9smunRUkao9D2qeKdeFOdqK+Wg+JpL27bL1C +9kBPvcUOJaERxPhTf2dbAsC6KDa7dJsRJDrxYL2o31744jg0eS97BMXQDHqy +lExAeCLN8WbfCPKbWmkWGjcFh93ZM3tUv6PKvdHr89vMYb7M73fD2e+oaDH4 +WUW2BdB3RfgXTX5Hy0Zb3jUlW0HZYlW5stco6mVhmxvwtQGuOXNaeOcoCtsa +fv64rB3892PdhjyrMXQnqPnppRR7qOvMvVrQNYYOL4hRykEOcLrFhWjwHkdL +lmb7Xx90hNu0ETf3lXGk63HBiHRwAhXlR5+MCibQB7FrwU00ZyhQck7bZzSJ +xG+dbCzZ4QLqHOapucuT6EG/krUt336Y3/lC5VX5FJLsnA2Im9oPKRLs3HV+ +04h26UJFYf8BmK2rC1lQm0HX2BdUs164ggvb8SdWyzOo3mjXl5SHbkB1VnZd +PzSLcrT/EVgpc4dT67MdlXtmUdvX4lTaWQ/gH27dlWo+h+ps8uQijnlCU0ZZ +L+eTOTQX6sQSRvcCy3EtdX7VebRkphg4bewNUivWvNfz5lHJ1OflaK2DEODk +e7B68wJyvVHs78XrA46aeqYbTy2g2rtWB9lO+4BWMlemwq8FpCvx4ceZHz5w +1mmukAxYRLL9AV/+F+QL0j08q9Zti2iY55Bd3pAv7PYp/NCmt4TaM239zV38 +gGt76OuXuUsoOz6fJ7bdD7b/x9pc9mMJNT7588Pfwh+OtEn6ZNsx0UZPOE17 +5A+/nv/p9L/CRFKbX7dtbfSHxg4Rw7QcJlJrtdnC+cQfQg2D/pTnMpGjgUdp +9zN/SDFqODN3lYmyt8a9TWzxB7Mpqi6mgInEe8s3Nnf7w2iSnYZHKRPJeYvm +eFL+IA+I+/YjJtL1mS5J0aBD3OrC2Z1fmehW7my0rRYdfG+n/Lu5h4k2d8wb +iurQQSjib64V7GlTqrNEnw55l5+yt/Qx8f3Fsq51Lx2cCzsSPAaZiJ8ScBN0 +oMOboRIVvzEmGs7Q3JAfSoda4y3JS0wmymw4GvTgFs6XO2WotIlCoepXdONL +6LD7ZZ85iW1dWrNBp4wOE3nslfkCFOK+MlJ6v5IO2h/d0gWFKJQSZT9ef48O +jceks2eFKXRUUe5Q3XM6XBs3rM+QoFDwlbchd/voMOh51dhKgUIW/CMGUf10 +MAsNyJjD3pHCwqc+SAc2g1XVK9spNBKlWVlD0iHoLktC/w4K+drmT1VP0mFs +R7PcIWUKuXJEh1X9pMOzlJYnPmoUMo8Wj6gQYcDd0DzJVl0KPc9PtczawoBb +o7yhQXoUMmidl4sXZ8Dqre5ZDn0Kqcm//WwsyYANipNXDAwoJPbpiPFXeQa8 +G1o8WGBIoQm9XhFuTQbkqNfcNzKm0DnWgscBTgwQVk08P26F57+LN8fGhQEz +sRqmYdYUOuURH0U7wADJwDmlOez4e/bb/7gzQGJpNW3RBtdPrLtw2Y8B/F+o +9Dk7CtHe+NFfRjLA/dyTrCYnCn26IM8je54BITaC3e/cKXQH8QWOXmAA30Ji +sJoHjj+12FR5kQFTuhdNs7DVLZqSdK4wwKwnoMvJk0KZLP7zNtcZsEk4ye29 +F4XMwgs+x1cw4NoelsECHwpt25amZXiHAfZEwRKFvfgm/CJbNQNaadX2tr4U +uqmAbDJrGRCW0NWzjL3a2/u08BEDvIwMrUz9KXTPWqLkfTMD8nhMIhsYFEr/ +ycqR/YYBlrE5C5wEhfxKxn3dWhlwjrmv0QF7E/sjieE2BoyVJUmR2CENrud+ +fGTAfoc0dbZACskqXY6TIxkwUTAbvjWYQj8/JXaMjTBgenXI3hO7PYWhVjWK ++/vZ7O+r2EkDGuO6kwwoMpfPFj1EoS85HV52Cwww2NHFuz6EQlnrBUwPryNg +cRf7zPNQCjXO93rEsBFwtL5FYRX7e29ZVBgHAXp2W2O1wvB+uGdS4LeBgNIe +ZZdb2CM+8b8sBQjIWTogfSQc129tKmgqRID/xHeeO9j62oKKSJiA86cv8PZj +n+er2E8TI6Dv8oqdUQQef/StRkKaAJaht73L2ERxRbOwLAGGys/+lovE359P ++LZRnoC83SHb7bBHCCE+dkUCmDL1r2+sjQuZB06qESA2PMZtEEWhR7+FkkfU +CZCp83DwwSbH+i/1axDwfFq18iS23tPDLzp1CDgn1Fn0Gns45I7kYyDgkKjU +RZNoCvG7HtG8v5cApZCbJ32xdY33WdeY4PzRRmcSsTPFBhOK9xEQRt7vuIv9 +gL3qfL4lARMCx7e0Yg/NHLmda02Ad6xl1DC2zivhrgx7Ag6INtEFY/B61wxO +nHYkoIUvcHU7dkZeFesJZ1xv+UKZAfZglIVanCsBoyvlJv7YfN4i5hHuBOQe +fK8Wi61jMeQV7ElA0csXu1PX/v8rMd3bh4AT5cJRxdgPuC1vuvoRoN0eVFO7 +Fm9J5KEjnQDlvcc4nq3FGxhqsyYIYI90CXu3Fq+1esQskADEMzLRvVbf/cRV +CCbA+rdq0tBa/JuWm/VDCIiJU5GfWoufIaqsGUbAbF9f/9Ja/Phho10RBAwO +QM0qNi+9xlUxigC3QIfL7LEU0rZLCpeNIcDiX/7z3Nh+elap2+JwP/virm/E +Piu/5ZpoPAHyX9OeCWHXbyJrBQ4TcDvG+IcI9sCvmjc8Rwnofl9sKobN+z1p +gCOJAA/rqlvi2FofrJb/JBPwMvPgVgns/wM16+F/ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.6621346890736325, + 1.4660903080302188`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.6621346890736339}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -12873,21 +13500,21 @@ wTw= "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, - 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.6621346890736325, + 1.4660903080302188`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.6621346890736339}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -12901,103 +13528,104 @@ wTw= Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV1nk0Ff0fB3CEJFt2yb6EKI99y/eTtYSkFGV3Z0iWQh5RyRNalFJK9VTK -niVLKVt+pOiRIqmoLHO5N9nX5N7i9/XHnDmvM/N9z3s+c873jJJ/uCvBxcHB -QcfHyvnou80bn3W8s9S4HtDW6c5GlhM5hv42xajETFduxQOZRumqNnXIzyVL -uAPbhfaWV0D/FeqKrsluwy6PiW/isWlDl6qP97Rgn2+WbogvfI/kLlNljdjV -HUfv/db7iHh6ZjVrsEe+tJ44XtuN+gYrbMqx1zNUDv60/oY2Bipx5mPvnDxh -GtnWj8KSrHz+xa7/PbI2ppBCJm0yPqnYnxKk4p6GDaI5/SKO09gTvDYjc3oM -JKbItj6CzXvxiIf+AhP99hbS9MGWX3f39dHaYTSqOVLqiO0s+zNvwnoMlfuI -Zqtgk/eVJXX4JlD+nsPCgtjxaruSDrdNon5Grtz8fjbqlur6K6pwGhWl9io0 -YtMOBB+6dnEGbUgaEcvFnrrD8aAibBad7vn18Cw2n7KOyLTePHKf2Vq3HTud -1mQvIvET1Y2dNdmIrZjvEb9l4Sf6Wra4jxvbRDt5IrT2F7qdER9bs4+Ngoz6 -20asf6MEEw8vSey5mGPc/Op/UPmk8tgPNzY6XbvWQpNvCYXbHpOrw74JJkWB -bcvoP7mxQE9sWu5rm4hCTtBiN929uJeNCpuvDSTIcoGk8VErN+yp794n0i5y -waVTyhc2YJ/Qmn9cFrYKbFs+ceXvwX1LlVQm9XggMzXx3yJXNvrSMVa/lM0D -6y87HTiErTjz7ICQBC/4XyirU8MuNnC+qrPACzutMkJu72ajl9WxnCG1fBCX -YBUX6cJG800f+oetBeCmIgQNObGRqKOASFy9AKy+8XQuEVu3ywYETQUhryzy -hwp28FDl/b82CwFLyUnAy5GNjnC16W4VEIHGW4fN6xzYiKH8aDrp5zq4x5nj -u9kez4dsXdOuLwr/NHCeqbRjI64ippL0UVHwjRMXMcdW1FdwLRwVhVR+vsPb -bNnogPWVincDYrC1VETT3JqN2gMiIqXeSMDgUuME3ZKN+vJTU3z5JCHob9lO -F+yx0cLsh7aScL5QXeX5Vjbijxr8YN4gCU8eqQqnWbCRTeJeA99KKTCvvyeu -bsZGNTlG8wWZMvD5/S5eHkM2ymGwos2i5OB8keTGm5pstN3tbF9kiRw48Uaa -Uho4/6WYXQlTDgTeFc1qYBvkaEsoeshDevR13yfqeJ7+3o95LBWgR+qacq0K -G81MDvw9fEYRuqffx56TYyOxUJsnj52UQVevUEdVhI2YOfxBLsHK4CbdU2Yl -zEZV3zpkx5OVgcu9etBHiI08Hb3OqDcoQ6RGlscNAdxvU7TrLT0V4B18dmmW -Dz9/JH/qlJQqXHtl5RbOyUZ7A9fqOFBqsESkB4ZNsxCKdtPb/0cNpkpSSoKm -WEgrKdOYJqMOM73m1X6TLMSRrW91arc6VHIsKLuMs1BJ38H9FY3q8LjAbLv8 -Dxbi3VecsD5rI4z2ScqfHmChKhunTyP+miDgmqfh+Y6FZJUvx6cMaYPTru22 -5/JYqO7CnOYilw44/O/tB5lcFvKc9egilXSAe2vNmsJsFrr3UlXTylsHjOtK -Qpvvs5ByYE3nr8868JXXQ2XyNu5XzFAj32yGjgvN5RyXWUhOVp5U9NCF0nez -bzdGs5B2bhSegh6EyPypygIWehCh6lLZZgjc987sH2lfRB3RyDgx1xRK+TYd -bbVZREreH529QrZCz2yaaFzJL0QsP30kdxxgLbNiY6TELyQ1WrVayt8K9n0x -1d8cuICi9C2+XdWygYUKXv/e5z+R//jv12IjtqDi7+OZLfYTlVhFrs5st4dl -qzUp5u7zKGcuuLE4fQfI//fC80rBHPq1Tfrty/idYMXNv5prdBb1cqyapvyc -oKTjhI+L/iwK2xB+JUFlF9jEjMw4pMygR4deN1xPcoEvpN35sp5pFDsrs7Dp -0G64lPjQba3pNJp3sNvX4uMKzscFi7emTSHTg2nbGLv3wLFmxvYK5iTqlLkb -/FJ/L5S/NMhYaptA6/PO1BVouAENpURLFI6jqgEtR2fBfaAXwJe7u2AMyXdN -BUaP74PmDoXxvKpRpH89rTh7YD/Qv3DNajWNoLvcs5uvNrnDbfmrbedHf6Cn -27Z8Sar2gD6zKH0TkR/opvGFdb8LD4CyhanAevth1P41N1n/4kFo+a9joCvj -O6p0uqN65LQnCCT8bfiKyUTToXs4wmheYCeuWbnTiYnm7TSDJqy9Qf1jQnxy -IwMVjPf8ijTygbSngsM0QwZyf5Ab4CXgCxuCua6JPx9Cjyt2+qw66wvabxxO -3rIdQqaynYvnF32hgrejZbJ/EKkMBH55f8gPWrtlzpkkDaKhtYd33Rn0A3E+ -+ud47UHUkeocYO/mDxc/8wXE0ekoPSZz7bEOf3je/8wg5V86qqtfXgzYEQCC -DfvbOHzoSNgTzurXBEBp0VXTo5vpSFG8pX1DXQAU9I5pl+rQkW6bkzRvfQDE -1iQXj2vTkavFwYfdjQFw2MDWJWQTzt8Q/ebkfwHA75egcUSDjtb3Fgm/7g4A -rslKkavKdKTqLXXTcyEAisWHAi2l6MjUd6IgyYAGt6ZvXDLioqO8W1ORzkY0 -yBNNaXjASUfiH2YspUxocGqv8mFB7Anbha4CcxoECUhtZC5TeD/g4GyzosHN -C6qmd/9QSGhhnYfobhq8NoF6pUUKDV0yXJMZSoNU4cB1iVMU2t1i3BUYTgOy -yUhjaZJC9RxmmbpHabBl293KGOxbkZaGL6JocOybkEH4BIWcPez9GHE0GOnP -r/cbo1C1qkf1pgs00JGnr/IaplBq7YlDVXk4vzZIpniAQqF6GaYxBTSIHSlz -MMZ2fFi+xqSQBjH5/OMv+inEn8F8+KyEBicVuxO/9lEoKcJl5OkTGqQ3KnGI -9lLohKbq4coXNEg2rFFI76FQcMabkIo+GtjoP/g01kmhHUJMi4gBGkwpFcgl -Y2skcQjq0WnA7bvQpYDNjDAsKWfQIMFxf/re9xTyc84cLxujgWT3cbemdgq5 -80SGlbJo8FDR7ltlG4XsI9cfKZYkQGOX9seJZgq9yEx2uCpNwK2Mkeup2BZt -M6ox6wko+5f7y2ZsXbU3PdbyBPT/+GvsyCsKyXyOs/6qRkCnSL0xu4lCo2a9 -kvyGBEwvbyA1Gil0mev+88A9BCzZtcwP1eL33yJw08mNgNWp4pLXsRMPxkTo -7yfAanqpyhY75onLxuUDBEwmXU8uqMH9Sc60G/4ESGsZQlQ1hfRb/WmvjhIg -sLNSQ/UZhT6nqa1VuUJAqrdlMaOCQo+QYNBwGgHBnUOuhdiJ43MvS64R8L+W -+uBwbL0dL0+ZZBAQt2N5nFWOvx9HwIzTPQJys1ytpLDtwu/3xBQToOTurkCU -UkhO7pyR5SMCQplZn3Wx51rDr60qI0DRfozjzyMKZakjp9THBLhuDc+7gf2n -t7chu4aAv7Moi/YSCj1xlC1495oA2YOj6W7FFEphcfGktxJQLN14UAPbv2DE -z6ONAGZO4DV2EYVEuGtkh9oJmEvb4JaNHVLrfnnxEwEGwr1Kv/B/pYrWjWhV -BgH3/5zre/qQQqzPJz/8YBLQXWFefgW7I4nQLR0mQKcvYy4Y+xRlMGI6RoBH -ofVbRewvNz947ZoloERcuzmtgEJXV6+zjeUkIXgqtOtcPoXqZnoPRq0iQUt4 -TJrE/t5bGBHGQwLfjtwf1tgWT2zu+68hYeZ3/RZObKZvDNthHQkM3Z3O/+Th -/o62orZiJNwp8poLwDY3FtVEEiSYad9Ut8O+Ili8T1+GxPv5iS0CK9dr+stl -lUgY3tDSeS+XQmRu8WsJFRJq3ft6ErGvXDneL6xGwiNZwdDD2ExSTJBbk4QH -dQ+NzVaui9kHjemSwHQt8erLoVDNklg8Uw/fH+T86jU248fA9QEDEmhyi1WP -sc0aYpu6TEiQNCBsUrCHQh7JPwcStIXCRwFbyD3O8JkVCSat+o+3YJtab3cs -t8HrP/zkVcBOlaEfz91OQvlwhOtyNoWquEuvZDqQkHxH02EKe3AyLv+WIwmz -Yz1vKWyTZomPl1xIaFVVOd6M7V9OHz3rSkIDb839auxLd0q5/tmL5xFrt7cE -mx6xQzfanQTLkxY+N7AFvSXtjxwgYdQj52nKSt6OQa9gTzwv/6VbCSvrFU6m -ePuSYMSbzB2+0offIcvdn4RMqEghV/LmJatdadjf397zXsmjBtsdSRJEie6t -+1fy2sqYdkH4+Trvg1xW+j07+QeC8Tzrnyk4rORnOYibh5DQm5Xib7OSf0lq -k2EYCedCHP9CK/kxQ9u2HCHhRvViihm2AK3cXTOCBGm9axFG2Ma7ToWrRJHg -c06aobeSb7YzWS4az/v4+cEt2BfVpO9KxZBw7w0jVAf7qQjj8bpYEiR26yRu -wqbY5a1rT5DgyfBR11rJ/36K4jlFwtWwk3s1sY06d/5ajidBrzdJaMX/B1qX -wTw= +1:eJwV1Hc8Vu0bAHBZySqEUF67EMljk/uSlb3LznieY2Svlwot0isqqXhTFMoM +iQb1NlSU4hdKhawje3uOivrd/jif8/l+7nOu67qve0j7hTsyWFlYWEbxs/aO +fK+6/X77e8OXLf4immokMpwu0vQzqUAXtVUs19yfr5UtZ9KIAn+lkGu2p7/j +5KW9RDTxsFEt7Jr45BccJq1IOY901ME+82rL0+Sy/6H2s5NyetgP2yOvr6h3 +odWfJ7wNsMe/vDma0NCNqpdL/hhii5OyHkzjHhR61ZtrL7bVzFHd6NZv6L9f +hfGm2E9WxnniywZQhWaCvQX2x+OiR+rDhlBIYN85G+xpTpPxRXUSnajv0HLE +5jwb4UajRtD/TN1MD2BLClxrjmwYRcEovMET21aCeWvaeBI5KNj0BWITBTIi +KlzTyDZOOD0cO1neLuVQ6wyaXArLj8PuFu3cHVM2h/4J/fg7BZvuHhx08ew8 +ih8ctsjEns1juXE3bAGNH0tZuYzNJaOyaU59CV12Tcopxc6mvzDfJMxE3Iqf +jtdiS912S95FMdElhxcfHmPr7EydDm1YRhmr+8s7sAO1vrWOG6+g/oZYbfbd +JFqMj2XnVlhFd9SivQSwjzXwGChy/UbBy5wTktg5oFMe0PoH6RssGOhj04ub +TaLK1kFQxERDPHbZq4v9xyVYYRCVSJ7Bnv3uffTCWVZw3vVnNBf7qNJSbXUY +GzzPSrzXiJ1dJS07o84B+xVaFdbjvn5pn3zyu5ADjHKCXoljS83fd+cX5oQd +LcXvVLErNGyzVChOkGGuCLpiNz08vC6kgQvWC+smVGEvvej4NmrMC/6zp+9F +0kgkaM276cgTXjidpsiRia3WaQJ8unyQSt1oK8MOHq4r2K3KDztLJT6Q2BGs +rWp7eDdBVbJDhq8GiUiZO3MpTAFQWnzfG66J+0O82dBGE4SkrMDWi9is5SPS +WyIFQcRuUuMBthTtL8eyCUGozbofzapFInfj83ff9wtBmu2pkjzsNv+oaNG3 +wvC4bs/sd20S9d3OTPfhEgHFIvkkIR0STU6UFZaaioDO4Y2pCJs7ZqhD/6kI +CIbOsOVim5xy1vCpE4VjBzY+cNAl0aMiraWSfDEQNXNh+6JHoiLyZ5xezDbw +HtpMMzMk0T6X033RldtAPE1CIhF7sknIrHJkGzytrg+9h61RtFNYyk0SSutq +HOUQ7qefdy2H4V/A7zslsQFIND/T//foSSlom9xaOWJEIqFQk3u1NjIQu0ei +e86URCNF3IH2wTKw4BIkomVGogc97RJTqTJwKy/9v8PYntZeJxWeysDyPy6O +HOa4PuU4x1x1WfhyfM/hv/bh/OO3Z5NE5UD7mFdXgCWJnAN4VCwH5OFb/ZmW +fXYkQnEu6gdW5YHXk701B1spJV+bLqYAl17HaY5hsxTS9iY5KIBPl/WedHsS +VfZ5HLj7TAH2VbNJdzrg87m/4rj4ze2geKRLL8EZ12di83HcTxE+bI18s8md +RIVOV75SSYqwsm20OhQ702+gn/2qIlxpLv/9Bpt+LHZCskMR9I/Jtad6kEig +8RqLk7ESBEwoW7F54f1Dm1ZqkFWGND6poo0+JJKQOZecPrwTDh8uYsYSJGr8 +Z1HxB6sKCMzktIxiey64dRLSKqAtnCHiGUCi601yinu9VcB97JSkSSCJZAIe +fVj+hP1Q4btYMJ5vBSlPvFWFoRP93j2hJNomIUlIuanBbGAI5+NYEu0sjuH9 +hdQh8fGSxnQqifzoJ5dUbNXh389dc7Gn8XmVzerz8VQHfedlsd/YbDerql/F +q8PA8uaKjWfwebs+7pxVow5cldLd2un4Ps3xuaYoS4MXpdpOeefw+qZbq7py +asCMJX2hLodEN6Lk7OtaNUHo9smunRUkao9D2qeKdeFOdqK+Wg+JpL27bL1C +9kBPvcUOJaERxPhTf2dbAsC6KDa7dJsRJDrxYL2o31744jg0eS97BMXQDHqy +lExAeCLN8WbfCPKbWmkWGjcFh93ZM3tUv6PKvdHr89vMYb7M73fD2e+oaDH4 +WUW2BdB3RfgXTX5Hy0Zb3jUlW0HZYlW5stco6mVhmxvwtQGuOXNaeOcoCtsa +fv64rB3892PdhjyrMXQnqPnppRR7qOvMvVrQNYYOL4hRykEOcLrFhWjwHkdL +lmb7Xx90hNu0ETf3lXGk63HBiHRwAhXlR5+MCibQB7FrwU00ZyhQck7bZzSJ +xG+dbCzZ4QLqHOapucuT6EG/krUt336Y3/lC5VX5FJLsnA2Im9oPKRLs3HV+ +04h26UJFYf8BmK2rC1lQm0HX2BdUs164ggvb8SdWyzOo3mjXl5SHbkB1VnZd +PzSLcrT/EVgpc4dT67MdlXtmUdvX4lTaWQ/gH27dlWo+h+ps8uQijnlCU0ZZ +L+eTOTQX6sQSRvcCy3EtdX7VebRkphg4bewNUivWvNfz5lHJ1OflaK2DEODk +e7B68wJyvVHs78XrA46aeqYbTy2g2rtWB9lO+4BWMlemwq8FpCvx4ceZHz5w +1mmukAxYRLL9AV/+F+QL0j08q9Zti2iY55Bd3pAv7PYp/NCmt4TaM239zV38 +gGt76OuXuUsoOz6fJ7bdD7b/x9pc9mMJNT7588Pfwh+OtEn6ZNsx0UZPOE17 +5A+/nv/p9L/CRFKbX7dtbfSHxg4Rw7QcJlJrtdnC+cQfQg2D/pTnMpGjgUdp +9zN/SDFqODN3lYmyt8a9TWzxB7Mpqi6mgInEe8s3Nnf7w2iSnYZHKRPJeYvm +eFL+IA+I+/YjJtL1mS5J0aBD3OrC2Z1fmehW7my0rRYdfG+n/Lu5h4k2d8wb +iurQQSjib64V7GlTqrNEnw55l5+yt/Qx8f3Fsq51Lx2cCzsSPAaZiJ8ScBN0 +oMOboRIVvzEmGs7Q3JAfSoda4y3JS0wmymw4GvTgFs6XO2WotIlCoepXdONL +6LD7ZZ85iW1dWrNBp4wOE3nslfkCFOK+MlJ6v5IO2h/d0gWFKJQSZT9ef48O +jceks2eFKXRUUe5Q3XM6XBs3rM+QoFDwlbchd/voMOh51dhKgUIW/CMGUf10 +MAsNyJjD3pHCwqc+SAc2g1XVK9spNBKlWVlD0iHoLktC/w4K+drmT1VP0mFs +R7PcIWUKuXJEh1X9pMOzlJYnPmoUMo8Wj6gQYcDd0DzJVl0KPc9PtczawoBb +o7yhQXoUMmidl4sXZ8Dqre5ZDn0Kqcm//WwsyYANipNXDAwoJPbpiPFXeQa8 +G1o8WGBIoQm9XhFuTQbkqNfcNzKm0DnWgscBTgwQVk08P26F57+LN8fGhQEz +sRqmYdYUOuURH0U7wADJwDmlOez4e/bb/7gzQGJpNW3RBtdPrLtw2Y8B/F+o +9Dk7CtHe+NFfRjLA/dyTrCYnCn26IM8je54BITaC3e/cKXQH8QWOXmAA30Ji +sJoHjj+12FR5kQFTuhdNs7DVLZqSdK4wwKwnoMvJk0KZLP7zNtcZsEk4ye29 +F4XMwgs+x1cw4NoelsECHwpt25amZXiHAfZEwRKFvfgm/CJbNQNaadX2tr4U +uqmAbDJrGRCW0NWzjL3a2/u08BEDvIwMrUz9KXTPWqLkfTMD8nhMIhsYFEr/ +ycqR/YYBlrE5C5wEhfxKxn3dWhlwjrmv0QF7E/sjieE2BoyVJUmR2CENrud+ +fGTAfoc0dbZACskqXY6TIxkwUTAbvjWYQj8/JXaMjTBgenXI3hO7PYWhVjWK ++/vZ7O+r2EkDGuO6kwwoMpfPFj1EoS85HV52Cwww2NHFuz6EQlnrBUwPryNg +cRf7zPNQCjXO93rEsBFwtL5FYRX7e29ZVBgHAXp2W2O1wvB+uGdS4LeBgNIe +ZZdb2CM+8b8sBQjIWTogfSQc129tKmgqRID/xHeeO9j62oKKSJiA86cv8PZj +n+er2E8TI6Dv8oqdUQQef/StRkKaAJaht73L2ERxRbOwLAGGys/+lovE359P ++LZRnoC83SHb7bBHCCE+dkUCmDL1r2+sjQuZB06qESA2PMZtEEWhR7+FkkfU +CZCp83DwwSbH+i/1axDwfFq18iS23tPDLzp1CDgn1Fn0Gns45I7kYyDgkKjU +RZNoCvG7HtG8v5cApZCbJ32xdY33WdeY4PzRRmcSsTPFBhOK9xEQRt7vuIv9 +gL3qfL4lARMCx7e0Yg/NHLmda02Ad6xl1DC2zivhrgx7Ag6INtEFY/B61wxO +nHYkoIUvcHU7dkZeFesJZ1xv+UKZAfZglIVanCsBoyvlJv7YfN4i5hHuBOQe +fK8Wi61jMeQV7ElA0csXu1PX/v8rMd3bh4AT5cJRxdgPuC1vuvoRoN0eVFO7 +Fm9J5KEjnQDlvcc4nq3FGxhqsyYIYI90CXu3Fq+1esQskADEMzLRvVbf/cRV +CCbA+rdq0tBa/JuWm/VDCIiJU5GfWoufIaqsGUbAbF9f/9Ja/Phho10RBAwO +QM0qNi+9xlUxigC3QIfL7LEU0rZLCpeNIcDiX/7z3Nh+elap2+JwP/virm/E +Piu/5ZpoPAHyX9OeCWHXbyJrBQ4TcDvG+IcI9sCvmjc8Rwnofl9sKobN+z1p +gCOJAA/rqlvi2FofrJb/JBPwMvPgVgns/wM16+F/ "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + "PlotRange" -> {{0, 180}, {0.6621346890736325, 1.4660903080302188`}}, "Frame" -> {{False, False}, {False, False}}, - "AxesOrigin" -> {0, 0.5511670383120088}, + "AxesOrigin" -> {0, 0.6621346890736339}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13007,7 +13635,8 @@ wTw= AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, - AxesOrigin->{0, 0.5511670383120088}, + AxesOrigin->{0, 0.6621346890736339}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13035,7 +13664,8 @@ wTw= Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 180}, {0.5511670383120075, 1.7091854080147844`}}, + PlotInteractivity:>True, + PlotRange->{{0, 180}, {0.6621346890736325, 1.4660903080302188`}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13043,9 +13673,9 @@ wTw= Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.991347865018469*^9}, + CellChangeTimes->{3.991347865018469*^9, 3.994389046508905*^9}, CellLabel-> - "Out[469]=",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] + "Out[139]=",ExpressionUUID->"afe82ea8-2874-4092-9df7-64d9d8af57a3"] }, Open ]], Cell[CellGroupData[{ @@ -13109,199 +13739,170 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"x", ",", "0", ",", "30"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{ - 3.9918503718899097`*^9, {3.991850469268881*^9, - 3.9918504694651966`*^9}},ExpressionUUID->"497f9779-a3e4-c84e-a207-\ -0aac70483e3c"], + 3.9918503718899097`*^9, {3.991850469268881*^9, 3.9918504694651966`*^9}}, + CellLabel-> + "In[140]:=",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"2.458740908982352`*^-268\\\", \ + "\"\\!\\(\\*FractionBox[\\\"6.8602056964058725`*^-267\\\", \ \\\"384956219213331276939737002152967117209600000000\\\"]\\) is too small to \ -represent as a normalized machine number; precision may be lost.\"", 2, 470, - 513, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652482224`*^9}, +represent as a normalized machine number; precision may be lost.\"", 2, 140, + 69, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994389046635798*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], +In[140]:=",ExpressionUUID->"ed1da5e9-a60a-437a-abc3-4a748b19e80c"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.7391049816418008`*^-279\\\", \ + "\"\\!\\(\\*FractionBox[\\\"5.5742253052293775`*^-278\\\", \ \\\"240597637008332048087335626345604448256000000000000\\\"]\\) is too small \ to represent as a normalized machine number; precision may be lost.\"", 2, - 470, 514, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652572174`*^9}, + 140, 70, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994389046640737*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], +In[140]:=",ExpressionUUID->"298a7065-a225-4780-9a5b-4bb0572f6a27"], Cell[BoxData[ TemplateBox[{ "General", "munfl", - "\"\\!\\(\\*FractionBox[\\\"1.230095503809359`*^-290\\\", \ + "\"\\!\\(\\*FractionBox[\\\"4.529308468073844`*^-289\\\", \ \\\"162644002617632464507038883409628607021056000000000000\\\"]\\) is too \ small to represent as a normalized machine number; precision may be lost.\"", - 2, 470, 515, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.9913478652662163`*^9}, + 2, 140, 71, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.9943890466447477`*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], +In[140]:=",ExpressionUUID->"ed47005c-f8da-4933-8c31-efb5a192501d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ \\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ -during this calculation.\"", 2, 470, 516, 24483298974280422597, "Local"}, - "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.991347865275215*^9}, +during this calculation.\"", 2, 140, 72, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9913478652482224`*^9, 3.994389046649181*^9}, CellLabel-> "During evaluation of \ -In[470]:=",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], +In[140]:=",ExpressionUUID->"ad3b5fd1-2c94-4e00-9dba-ebf3c288691a"], Cell[BoxData[ GraphicsBox[ InterpretationBox[{ TagBox[{{{}, {}, TagBox[ - {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[2], - Opacity[1.], LineBox[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0Vd0bB3DRKFTIPJx7DUmmMnOv5yFD5mRMMoYSUqaoDL2SIokGNJCp +t0z3nlKZhYoKJZmHknoliQxp9Du/v876rLP22mc/e+/v3ofmfWiXLycHBwex +jIPj/8+F4dZm2eQCA93uz9mB0UYGXTdEogx7T4JF52EFw1kCcGOHt0hvOhjr +C+iIzapBxM47PVy9eeDzoKBj6RvChinh9B89JCSHlvV3f9sJIzU2h+Z6GmGP +zB0P+2+eYCo7MTTT0wk11S7NjtMh8KNH+9J0zyjs9ymsOzAeB03bbxW8ypuF +dztDCvqjLoDESOVHb6U/kHjQgTySlwWCgR53Vm3nQsmJQgHIy4X0rabVNo6r +UfhsL9PzZAH0Zao1zKznxSfhYjXzr29BckFsB6foBkxYMTeuw1sMwhffn8m4 +LoBna60efHtRCiJbKhIWiwQw89zGWO/uUhBrTIzdyxJAQsRW+sVIKUhNbw7f +1CSA6/QdxlK+lYKcVYhn9bgA6qUPeDQLl4H68j9a79UF8cSXQElurzKwDRMa +2/ZMEAt78uQ+TZXBaQdzg86FjVhi+OhL/fdyELvXLsa5TAgL9U3ZMhwsKBNw ++L51rRAuDDrc8VnOgu5Od9YFaSHkTq1z6uVhgaxdGN1uB/U+0ubcRUkWNFrn +rHyZJYST/0SJuRiw4I/pfHsbQxhfhreYrznBgrSi6OI/psJovVlYtiuOar+S +I0nZThg/MN22XU1ggdVjbsNzvsLY2/H6k2QKC7K3E3etUoVRp2V93Xw2C3TQ +8srzEWE0H9Nsm3rAglDdmx6tJ0Ww/tAdtxVfWWCRyzdnmSKCApPX+aS+sYC+ +6nhS+yURzPEQCVKfZ8HLLif2639FMJQMUnX4xQKVEB6u4XYRrA3wawlaxYbx +osiib2KiOPArxGSZNBvcBG2+iN8VReHZxCO3Ldmgfqw6/kaNKKYo/yx3tmED +96iCEO2JKG43cczmtGNDZTkXyPeJYlbkxggbJzYIWVamqS2JYuusjlWdJxte +xstqmFiKYVyx+dm/YWww/vozOvi9GOZphTM5r7IhasdFxUeTYqh2ReCb3nU2 +lN1U7hdYEEOHJxJRITlsEHHw1K1cLY5r7XWWXuWzYfLh4+9cKuIoutNkJriE +DRkn08Kyjoqjdavp9fW1bBjdKB/czCuBHI5HWucG2CB8qF5SWFgCsyM4DVqG +2GDV4tJ2gJDACDnOc5kjbLgfnay0Tl0CxQzOVau+Z8PZkemJ3S4SeDqr3Edn +gg3bblf7f82TQBmj+c13v7MhnmHnJaYjibXaS9x260nY4X7jm7aRJHYua04d +2UACX9znfxytJJFRN3QwQICEa02nitI8JVGoVF0jXIiEhxZVn1eekUQp4wIe +DwkSpl1kImb7JLEvFV0TNpHwIDpk1YYxSYRzExW9CiTEXKvNVJmSRNfGv6Gb +FUngeetcfYBTCh/4vBZtUCJhk38Kx1tFKRwXDpRs3EqCe/j82RfHpHDSgCtd +VJ8EuStGEhOnpLAgIcZDg0FS9TtfuipNCh/PXsuyZJIQ/XvzS6MCKXRPOup0 +CEi49I/7xsoXUuiUM7giZTsJboXFRd3dUmiTdNXyrDEJ9KeL2nNvpdDuTALX +KRMSWNwZrqrzUmj8q+TFITMSXlx4mlMoKY0baCd6xSxJyLgruLVpkzRKkXea +flN2fePV+HarNGYWtssPWJEwLvJ7TNxUGtO2zDmfsyGBK1dNMT1YGg9ZP4t+ +akeCXlnWvZh6aVRbrArOcCbBuKf9z1SLNNr/8Z/b6kKCDcdyM49OaXTeU3m4 +jbLPruA++CCNze4Tjr92k2B6jBYbt4LAvnDRnm1uJDxfV5Ovw03gy0eRSpWU +dxY4tUzzEaj3+WUMYy8Je9qSN3iJEJhQpCyp505CiPRCvuEWAm+Nd9hv8CRh +/m5ayw9VAl9PGxTEUo7eseULW4PADELt+wTlU4c9tegGBNqOBtx66EUC98pf +rv1GBN4xlV4p7k1CWval2HQzAr0itgREU85uetbCaUfgUa7NJmo+JEi7+H6p +ciQwTCq5NpFyweTShlBXAgVi5Q36KZdv1Nzz3odAxRvfXI/uI0HjTkfs1f0E +ii9kLTZSrjIIKLAPIrD0sf9Nbl8Smv1zvjRFECjy66DwBcrmv3X5jx8jsO2J +1McOyu1pXVoacQQOdU03rvUjoa9yTVzBGQK7AmZvR1N2tykocEsl0HVjUUUp +5bFRg1bBDAKTTY93DlGeWhvGf+oagbn2OUaa/iSE5vJpM28SCEuhV9woL2rc +3jNfSODfjmMc8ZRjWrfHld4hcPjQ8Zg8ylzuwwW+5QSuZTD4H1FO+na0VfIe +gR7GJ2sGKfOdFph685DAQQuhmHnKGeJl/Km1BGo2NTiv3U+CCGuHtmkjgead +FhZSlK8bv9/z9wn1PdYxTiqU6X0n4u4/J/BHldwJfcr/BokUBr8ksMqWp96E +sjLn3Vb5NwRGTv+RsKZMXraeGu4j8LDa0yt2lHW2jPNfGSZQ0E5TzZ5ybf1J +bdv3BB43FPrv/++NHCTdVo0TOH5dp/b/7Z+OP4irnyRwe/nBu6aUrU7sKoyc +ITAvIPYZg3Lnhi+tqgsEVoYYc6lRdi46PfXfTwL9eVPcCcqDenSB3CUCN2kr +DPFS9u6o0XZZTsOrqZ9jF6nx/+fj7LZ+DQ3/7L1t9pZy4OJMXAsvDfMzNTUf +U9Y77Cf0kZ+GzesECwsor57oL+YSoWF484raOMrd3raGNEkaOpqKx+ymXDjQ +1G1Ap+HFtX6fVCiHOegEum2ioVjI4hIHZaO2kmXRSjR8fu9DYwc138N1l5Qq +tKj+nOi7fCiXaHM3durTMPPWNUKBcjQrxnkaadhR9zTnE7W+hPL8T26xpOHh +vvP3vCmPiQ0Km++k4f0+dysxymTGzlI/RxruzTTKaqfWr+0p3d6bHjQ06K9w +UqYs9bc0qH4fDRMtYlp7qPU/GUHnGjpAwyq7tvkYykn716qIhNEwNjA6tona +Tw2WQ/+kJtGw2D4nQo7af6nNdqIl52hY/0P2TQW1P92YT8pa02lo/Yi5YET5 +h0p53/LrNHQfrUuw9yBhG3+86jE2DUfe7Ji1pvKAI3m+OfM+DT3FixObqbxo +5wpwvV9NQ27N0Q/alA/O7zo185iG/iqxPBv3UPu1V3bAv5+GnMtDxW9TeXTE +Livk1AgN29eGq6ykjM94V+aP0TBS+ZGQJ5VnQ9ULasNTVH1clgVyO1H1ymlJ +dOCiI+/HDgtde6pewkyJI6vpGN77fPOJXVS90tjs87x0NJar/K+Wykfbk9mD +z4Tp2PHZfIXWTqoevoHbDJXo2LRw7ROHNTW+LeuHlR3pGHyCEchpSsLCdbF4 +dVc6qkK5siiV33Pr5GR1Peh4OlPvrxKV71OzugHGB+hYOOT7ytKIhNFqnwXX +E3Q0zK3z8jMg4ZnlA76kQjreF+PXW69FrffaR+xzd+gomyUfs6hB5Y3qC4eM +cjo2fmgZG1InoU7gXfaNSjpu4LwjlUudT+QA96aKNjoeIQv9OZWp/DvoDqPz +VH/3WX4gQ8KVof2j//2k4+4brgd+0ki4aBt66ssSHRn2+XkkQc2netLzxTUy ++DZ5c52YFAknf7Gd10nJYNyW1zWtItR8JK8IYZjKoPq9isV8XhIYxSW5ly/L +4KFu09O75tkwQBTnmFyVwVWlHWTnLBuiL9++MZcjgwc20y7v/MaGB/FF13bd +lsEmhfAkk6/U+e+Sm8lXI4NRAU56gp/YsHnFxbTEdzJo5v70qckgdd/xOBYX +oSSLg2JchssesaGiKypWbqss3t26OVGvng0OFkdjujRlUXz6cNFh6n6Srhl+ +fBvIopnt5+N9lWzg5Tl0dMpOFp995Ll5nmTD8krvEL9IWbQPDm66TN13Zvgt +PJ0aZfG2+40DIgls6A2kvwx4KovJl3yE38ezoeHJT4h9IYvcYikBxbFsSIsu +lv63WxY1tk+t1DzGBrVRnpEfE7J4JdjVUOkIG4LZHXuvC8ihnP671SUebJiw +ddwztk8Oy1YfsPulw4axFE+nI6vksYYez6X8gQXBE0p0NR55FMiaeXF1lAXf +zX58+bJeHvf66g2tfssCbq70UwfE5DFMzrpnqJ8FalFN9zyV5dGB08Qh9CUL +TvjKC9jay2OPl3KSdTULhAwmO7bkyOO54cdpT8+zwPxrpPkHrU2Yf0ydT0SD +BZM+q0PvxSqgQ1vSfHpFGfV/Isx5unEzRj6U4DR6XwL8bfKprK+KyLn4+Biv +cDFIJJXv1NJSQv3tvRKEwG3I3KK7XsBfGdN/OjrtV7wFz8QMNWcvqKCvZviA +gVUh6Ek0pql2q6JoO8fsT+t84OPKC/M6qYbiVpbxrNibIBUvzdgtvxWz8vfx +5xjkwBo5t/u7nm7FCwmpklyNV0GFKVoeuXcbvrFhSp++lwlHhvmbLDjUsfh3 +vqv0zUvwdTbF0TxTHdvDxp/3/04HM9Un2ebKGiivFFrdeT0N6mb1f31v18CD +u8+K16SnQLDStv5XvprYZTtCaypOAubUvq7da7TQVOdCIG08AUxkRax587TQ +7PMVa6/2eFCIO3u0UVsbz7ZnDGsbxYCir269XL82Pm4l+B6oR4Fv3f6Ee4d1 +ML1on7sTEQ71uV37ZjbqYlDMlqHzzodh7t+l76oPdLHBJ75DzzcQfOSK12Rb +6+HPWKUPzGB/iH7sHiC/Uw8Llv3OjHT1hzRf/ufkLj286hlaWG/qDzWFUSnP +nfXw8t/JW9HS/iAov2PdHy89fLI1O+TqKz94Iv9B0DNCD1cp2q6I1/EDRQVp +Qj5HDyv27PEqWO8LM4oZWuS0Hq4pndx9adwbel+gicCsHs6NaIwy+7yhIXjK +PmxeDw9oLOrMtHpDKml+WOunHkoO5+keLfYGRT2OkioufTzOPTS08pA3eJsH +0ZqE9DF0xOwgbdELuvzNeLoY+ngzKP4Vjd8LHhb8ejefpI+2zJqm9S3uoLU9 +7LtFsj66qsYPTpa5Q8W7SZ7cc/r4wWtyqv+SO5BSw9oW6fro+Gy4e9LHHUoy +G87duKqPV5jbzn/kcIfclFO6ZmX6KO2SnKpgsBfOhK27kPlaH897+3LkPN4D +rsYyqC/FQIuPZ5JkV+6GP12r+ZoIBg6L0CX3f3WBXN+pAQsZBgq+2jBR2+sC +HxMrI10VGPjidMHvnGIXONJqWx61jYEDHol3Gbtc4KzNcamHpgw8/Pf9TFue +M1S5vPmtcYiBwunviD87nUA86HSlSgMDo0o93q8dsYfUJT/N5EYGft4X1VLX +Zg+c6abs/5oZSD4YXBdbYw8T91fczm1lYOA1Mm9Ttj1UcSRk8r9mYP7Y6Adh +J3twvRgXufCBgW63eF2DXu6CzOoozbq1TJTXcEpltdvBRu5AtrUzE22ClHZc +HLGFgu0noqd3M9HPMCqyv94Wtp1I3Z7hxsSobPp7Rq4t2Eyz3vR6MfFG/h9R +Jy9bSOye/+ETyERR5SJ2z5gNLObFGkXHM/HKRed1K2asoV8/43VRMRMH42c0 +IyWtYH94wTXzMiaOtRj7SSyzgoWyCt9JFhM/DZYwB8YsgZ/e+33rfSbOtWql +F5ZYguVqSYnaBiaOTCj8G8C0hJquon2v3zCxs+Xv3kIfC7Dge6gc0cvE1ozk +JwM7LKDXrHVBZICJyX6h1xVVLGCu6nOS+1sm3ldsMN/wwxyUb6qVfppgoumn +tkSONHOo6TeMSPnCxPoZT6vFcHOwELQH1WlqvLKO46vczMHvdPirsHkmatPR +JVjBHOYaErOFF5l41bpp5WM+czj584pP1U/Kbg2oPr8D1mvcVtr7h4lpRtmz +Dwd2wI2gqvmlJSZ6BNXzODXugP8BI/EQhQ== "]]}, Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, {"WolframDynamicHighlight", <| @@ -13315,158 +13916,125 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13k0Vd0bB3DRKFTIPJx7DUmmMnOv5yFD5mRMMoYSUqaoDL2SIokGNJCp +t0z3nlKZhYoKJZmHknoliQxp9Du/v876rLP22mc/e+/v3ofmfWiXLycHBwex +jIPj/8+F4dZm2eQCA93uz9mB0UYGXTdEogx7T4JF52EFw1kCcGOHt0hvOhjr +C+iIzapBxM47PVy9eeDzoKBj6RvChinh9B89JCSHlvV3f9sJIzU2h+Z6GmGP +zB0P+2+eYCo7MTTT0wk11S7NjtMh8KNH+9J0zyjs9ymsOzAeB03bbxW8ypuF +dztDCvqjLoDESOVHb6U/kHjQgTySlwWCgR53Vm3nQsmJQgHIy4X0rabVNo6r +UfhsL9PzZAH0Zao1zKznxSfhYjXzr29BckFsB6foBkxYMTeuw1sMwhffn8m4 +LoBna60efHtRCiJbKhIWiwQw89zGWO/uUhBrTIzdyxJAQsRW+sVIKUhNbw7f +1CSA6/QdxlK+lYKcVYhn9bgA6qUPeDQLl4H68j9a79UF8cSXQElurzKwDRMa +2/ZMEAt78uQ+TZXBaQdzg86FjVhi+OhL/fdyELvXLsa5TAgL9U3ZMhwsKBNw ++L51rRAuDDrc8VnOgu5Od9YFaSHkTq1z6uVhgaxdGN1uB/U+0ubcRUkWNFrn +rHyZJYST/0SJuRiw4I/pfHsbQxhfhreYrznBgrSi6OI/psJovVlYtiuOar+S +I0nZThg/MN22XU1ggdVjbsNzvsLY2/H6k2QKC7K3E3etUoVRp2V93Xw2C3TQ +8srzEWE0H9Nsm3rAglDdmx6tJ0Ww/tAdtxVfWWCRyzdnmSKCApPX+aS+sYC+ +6nhS+yURzPEQCVKfZ8HLLif2639FMJQMUnX4xQKVEB6u4XYRrA3wawlaxYbx +osiib2KiOPArxGSZNBvcBG2+iN8VReHZxCO3Ldmgfqw6/kaNKKYo/yx3tmED +96iCEO2JKG43cczmtGNDZTkXyPeJYlbkxggbJzYIWVamqS2JYuusjlWdJxte +xstqmFiKYVyx+dm/YWww/vozOvi9GOZphTM5r7IhasdFxUeTYqh2ReCb3nU2 +lN1U7hdYEEOHJxJRITlsEHHw1K1cLY5r7XWWXuWzYfLh4+9cKuIoutNkJriE +DRkn08Kyjoqjdavp9fW1bBjdKB/czCuBHI5HWucG2CB8qF5SWFgCsyM4DVqG +2GDV4tJ2gJDACDnOc5kjbLgfnay0Tl0CxQzOVau+Z8PZkemJ3S4SeDqr3Edn +gg3bblf7f82TQBmj+c13v7MhnmHnJaYjibXaS9x260nY4X7jm7aRJHYua04d +2UACX9znfxytJJFRN3QwQICEa02nitI8JVGoVF0jXIiEhxZVn1eekUQp4wIe +DwkSpl1kImb7JLEvFV0TNpHwIDpk1YYxSYRzExW9CiTEXKvNVJmSRNfGv6Gb +FUngeetcfYBTCh/4vBZtUCJhk38Kx1tFKRwXDpRs3EqCe/j82RfHpHDSgCtd +VJ8EuStGEhOnpLAgIcZDg0FS9TtfuipNCh/PXsuyZJIQ/XvzS6MCKXRPOup0 +CEi49I/7xsoXUuiUM7giZTsJboXFRd3dUmiTdNXyrDEJ9KeL2nNvpdDuTALX +KRMSWNwZrqrzUmj8q+TFITMSXlx4mlMoKY0baCd6xSxJyLgruLVpkzRKkXea +flN2fePV+HarNGYWtssPWJEwLvJ7TNxUGtO2zDmfsyGBK1dNMT1YGg9ZP4t+ +akeCXlnWvZh6aVRbrArOcCbBuKf9z1SLNNr/8Z/b6kKCDcdyM49OaXTeU3m4 +jbLPruA++CCNze4Tjr92k2B6jBYbt4LAvnDRnm1uJDxfV5Ovw03gy0eRSpWU +dxY4tUzzEaj3+WUMYy8Je9qSN3iJEJhQpCyp505CiPRCvuEWAm+Nd9hv8CRh +/m5ayw9VAl9PGxTEUo7eseULW4PADELt+wTlU4c9tegGBNqOBtx66EUC98pf +rv1GBN4xlV4p7k1CWval2HQzAr0itgREU85uetbCaUfgUa7NJmo+JEi7+H6p +ciQwTCq5NpFyweTShlBXAgVi5Q36KZdv1Nzz3odAxRvfXI/uI0HjTkfs1f0E +ii9kLTZSrjIIKLAPIrD0sf9Nbl8Smv1zvjRFECjy66DwBcrmv3X5jx8jsO2J +1McOyu1pXVoacQQOdU03rvUjoa9yTVzBGQK7AmZvR1N2tykocEsl0HVjUUUp +5bFRg1bBDAKTTY93DlGeWhvGf+oagbn2OUaa/iSE5vJpM28SCEuhV9woL2rc +3jNfSODfjmMc8ZRjWrfHld4hcPjQ8Zg8ylzuwwW+5QSuZTD4H1FO+na0VfIe +gR7GJ2sGKfOdFph685DAQQuhmHnKGeJl/Km1BGo2NTiv3U+CCGuHtmkjgead +FhZSlK8bv9/z9wn1PdYxTiqU6X0n4u4/J/BHldwJfcr/BokUBr8ksMqWp96E +sjLn3Vb5NwRGTv+RsKZMXraeGu4j8LDa0yt2lHW2jPNfGSZQ0E5TzZ5ybf1J +bdv3BB43FPrv/++NHCTdVo0TOH5dp/b/7Z+OP4irnyRwe/nBu6aUrU7sKoyc +ITAvIPYZg3Lnhi+tqgsEVoYYc6lRdi46PfXfTwL9eVPcCcqDenSB3CUCN2kr +DPFS9u6o0XZZTsOrqZ9jF6nx/+fj7LZ+DQ3/7L1t9pZy4OJMXAsvDfMzNTUf +U9Y77Cf0kZ+GzesECwsor57oL+YSoWF484raOMrd3raGNEkaOpqKx+ymXDjQ +1G1Ap+HFtX6fVCiHOegEum2ioVjI4hIHZaO2kmXRSjR8fu9DYwc138N1l5Qq +tKj+nOi7fCiXaHM3durTMPPWNUKBcjQrxnkaadhR9zTnE7W+hPL8T26xpOHh +vvP3vCmPiQ0Km++k4f0+dysxymTGzlI/RxruzTTKaqfWr+0p3d6bHjQ06K9w +UqYs9bc0qH4fDRMtYlp7qPU/GUHnGjpAwyq7tvkYykn716qIhNEwNjA6tona +Tw2WQ/+kJtGw2D4nQo7af6nNdqIl52hY/0P2TQW1P92YT8pa02lo/Yi5YET5 +h0p53/LrNHQfrUuw9yBhG3+86jE2DUfe7Ji1pvKAI3m+OfM+DT3FixObqbxo +5wpwvV9NQ27N0Q/alA/O7zo185iG/iqxPBv3UPu1V3bAv5+GnMtDxW9TeXTE +Livk1AgN29eGq6ykjM94V+aP0TBS+ZGQJ5VnQ9ULasNTVH1clgVyO1H1ymlJ +dOCiI+/HDgtde6pewkyJI6vpGN77fPOJXVS90tjs87x0NJar/K+Wykfbk9mD +z4Tp2PHZfIXWTqoevoHbDJXo2LRw7ROHNTW+LeuHlR3pGHyCEchpSsLCdbF4 +dVc6qkK5siiV33Pr5GR1Peh4OlPvrxKV71OzugHGB+hYOOT7ytKIhNFqnwXX +E3Q0zK3z8jMg4ZnlA76kQjreF+PXW69FrffaR+xzd+gomyUfs6hB5Y3qC4eM +cjo2fmgZG1InoU7gXfaNSjpu4LwjlUudT+QA96aKNjoeIQv9OZWp/DvoDqPz +VH/3WX4gQ8KVof2j//2k4+4brgd+0ki4aBt66ssSHRn2+XkkQc2netLzxTUy ++DZ5c52YFAknf7Gd10nJYNyW1zWtItR8JK8IYZjKoPq9isV8XhIYxSW5ly/L +4KFu09O75tkwQBTnmFyVwVWlHWTnLBuiL9++MZcjgwc20y7v/MaGB/FF13bd +lsEmhfAkk6/U+e+Sm8lXI4NRAU56gp/YsHnFxbTEdzJo5v70qckgdd/xOBYX +oSSLg2JchssesaGiKypWbqss3t26OVGvng0OFkdjujRlUXz6cNFh6n6Srhl+ +fBvIopnt5+N9lWzg5Tl0dMpOFp995Ll5nmTD8krvEL9IWbQPDm66TN13Zvgt +PJ0aZfG2+40DIgls6A2kvwx4KovJl3yE38ezoeHJT4h9IYvcYikBxbFsSIsu +lv63WxY1tk+t1DzGBrVRnpEfE7J4JdjVUOkIG4LZHXuvC8ihnP671SUebJiw +ddwztk8Oy1YfsPulw4axFE+nI6vksYYez6X8gQXBE0p0NR55FMiaeXF1lAXf +zX58+bJeHvf66g2tfssCbq70UwfE5DFMzrpnqJ8FalFN9zyV5dGB08Qh9CUL +TvjKC9jay2OPl3KSdTULhAwmO7bkyOO54cdpT8+zwPxrpPkHrU2Yf0ydT0SD +BZM+q0PvxSqgQ1vSfHpFGfV/Isx5unEzRj6U4DR6XwL8bfKprK+KyLn4+Biv +cDFIJJXv1NJSQv3tvRKEwG3I3KK7XsBfGdN/OjrtV7wFz8QMNWcvqKCvZviA +gVUh6Ek0pql2q6JoO8fsT+t84OPKC/M6qYbiVpbxrNibIBUvzdgtvxWz8vfx +5xjkwBo5t/u7nm7FCwmpklyNV0GFKVoeuXcbvrFhSp++lwlHhvmbLDjUsfh3 +vqv0zUvwdTbF0TxTHdvDxp/3/04HM9Un2ebKGiivFFrdeT0N6mb1f31v18CD +u8+K16SnQLDStv5XvprYZTtCaypOAubUvq7da7TQVOdCIG08AUxkRax587TQ +7PMVa6/2eFCIO3u0UVsbz7ZnDGsbxYCir269XL82Pm4l+B6oR4Fv3f6Ee4d1 +ML1on7sTEQ71uV37ZjbqYlDMlqHzzodh7t+l76oPdLHBJ75DzzcQfOSK12Rb +6+HPWKUPzGB/iH7sHiC/Uw8Llv3OjHT1hzRf/ufkLj286hlaWG/qDzWFUSnP +nfXw8t/JW9HS/iAov2PdHy89fLI1O+TqKz94Iv9B0DNCD1cp2q6I1/EDRQVp +Qj5HDyv27PEqWO8LM4oZWuS0Hq4pndx9adwbel+gicCsHs6NaIwy+7yhIXjK +PmxeDw9oLOrMtHpDKml+WOunHkoO5+keLfYGRT2OkioufTzOPTS08pA3eJsH +0ZqE9DF0xOwgbdELuvzNeLoY+ngzKP4Vjd8LHhb8ejefpI+2zJqm9S3uoLU9 +7LtFsj66qsYPTpa5Q8W7SZ7cc/r4wWtyqv+SO5BSw9oW6fro+Gy4e9LHHUoy +G87duKqPV5jbzn/kcIfclFO6ZmX6KO2SnKpgsBfOhK27kPlaH897+3LkPN4D +rsYyqC/FQIuPZ5JkV+6GP12r+ZoIBg6L0CX3f3WBXN+pAQsZBgq+2jBR2+sC +HxMrI10VGPjidMHvnGIXONJqWx61jYEDHol3Gbtc4KzNcamHpgw8/Pf9TFue +M1S5vPmtcYiBwunviD87nUA86HSlSgMDo0o93q8dsYfUJT/N5EYGft4X1VLX +Zg+c6abs/5oZSD4YXBdbYw8T91fczm1lYOA1Mm9Ttj1UcSRk8r9mYP7Y6Adh +J3twvRgXufCBgW63eF2DXu6CzOoozbq1TJTXcEpltdvBRu5AtrUzE22ClHZc +HLGFgu0noqd3M9HPMCqyv94Wtp1I3Z7hxsSobPp7Rq4t2Eyz3vR6MfFG/h9R +Jy9bSOye/+ETyERR5SJ2z5gNLObFGkXHM/HKRed1K2asoV8/43VRMRMH42c0 +IyWtYH94wTXzMiaOtRj7SSyzgoWyCt9JFhM/DZYwB8YsgZ/e+33rfSbOtWql +F5ZYguVqSYnaBiaOTCj8G8C0hJquon2v3zCxs+Xv3kIfC7Dge6gc0cvE1ozk +JwM7LKDXrHVBZICJyX6h1xVVLGCu6nOS+1sm3ldsMN/wwxyUb6qVfppgoumn +tkSONHOo6TeMSPnCxPoZT6vFcHOwELQH1WlqvLKO46vczMHvdPirsHkmatPR +JVjBHOYaErOFF5l41bpp5WM+czj584pP1U/Kbg2oPr8D1mvcVtr7h4lpRtmz +Dwd2wI2gqvmlJSZ6BNXzODXugP8BI/EQhQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07190437247237852}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> @@ -13478,19 +14046,19 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07190437247237852}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, { Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13504,157 +14072,124 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Annotation[{ Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]], Line[CompressedData[" -1:eJwV13c8Vf8fB3Ah85pFqGS7MzNCeb8jMjKTInumVJSVFomEhBRJZaf0lRUZ -Re69pRINyUqiJJllFvU7v7/O4/k453HOuZ/36/N+nyvvdcTel5ODgyNqBQfH -/49z/c9ZSonphrH8V6+LpTsZdtyUOr6t6yjIduWWZITpAkq0e0l1nYUJae4a -j7AdEGZ79wNXVxoM3FGb1g3bA2ITa9IWP+SBv2aTx0SoP3xqsD4y86EC1g+/ -HJkJCQdTpdGP0x+aoa1t8pVy8HlY/KB7ZerDWwgf8Kn97ZkBTOPbBW/yhuD1 -PWf7Z2uKYd2n2mEv+jjE/8vnO3ylHFYHut/lNf4Fa3qKlb/frYY0DdN6690L -sLbxG3d0WT10Z6o3TYsug+bawLf0jkbIelciEqa8DP+MT1Z0f2kEZ2FV9996 -y7A1WdbrxGwj9MWs/8vpvQwaXW6XrAWbYOCwwJbVD5ZBL774BZ3eBCPbv9To -OP2FK8O2ft2BTbAwlXH/RO4/IE8pan793gSJBWfaOaVXYMiGeU6vt0/AQjtA -XEJxBf5xsrFV7H4CfCz73aqMFahu6tDa/+kJnBtS7rXctgLTnzpYbh9/AicV -WofTA1ZgDDXE6DlvMxzOkfqrUrcCsSaDv86gGeyyy+mW+zjRqumusdqtZhCl -Xz/i6suJA9NHNmoXEutYf67iyBFOrMz1UtYqaQaL3j2b02M4UfSzvfaGmmYw -kvlr/LGEE7/I3np8v60ZtDMt9h1Z4kT1TxvflC81w5r0oQuXb3Dh1tboGW0H -JkjRHpxbKOLCk3FfQjc4MUGmOe6MaxkXStfYVnO7MUF2ihKqyuTC6wsVRxv9 -maC8M8ijfoQLVa7Ktc9GMkGLe1lnSIsb3yo4vfDNYYJNiOQXzRfcePul3aDt -NybYCo70Z7zjxs35HKVpP5hgn1fbvdTHjW1Xrqi3TzLB8bVL+9NJbiyx5XPe -vMAEV3p+nbPESrzBf9/gJR8LDn5RSz3rsRId+YI2/iKz4LyDueHbuZW4qBk+ -ZunLApmqNhnOFTyoMN68oBHAgtJVDvMagjzIf3l7u9ghFnS+dStL3cCDqfHv -ex+HsEDJLkTBzowH98paRbbFsKDZ6hbP62s8GK+SIsLKYYHjf0pD//J58E+B -1mfTAhaMku42qpXyYHC67FnmbRaItVZFXGrmQVnGca27pSzwsHgxav2DB0lS -pR6MBhYsm862vdrCi0uV5vaCnSxIKYosWTblxb4ybjtaN/F8Ho54hh0v1rNk -VE36WLCTLbDtoi8vCtxh7fMbZEGWsVzlzmRezE26u+A2wYLNaJnx8hMv9jKU -Mygr2XBML9f9+Vk+jInQLadsZINFjvCMZRIf0qICed3U2aDAezK+7QofbnJj -SFzUZMPrDsfyd8V8KGtzzLlXhw0bg0hc/W18mK9/IG8zsGGkKLzopww/rrQs -+TxnzYZGoa/6oUr8+HyGKf7Blg1XQ+zb5xn8OB/dx1dhzwYTI8bCEvJjl03F -jr2ObMj7OGjO68+PVVlfKX6ubHBZbT2+tpIfU6pKHeMPsEHrRH30zQbi+lAL -c4lANggMkiXln/Jjzn1v0RuH2FB7nwtUuvmxOFlL7kYQGyQta1PU//FjcFWt -t3sYG8bLVZQr+QTwnnLBGmY4G1hS6bWbxAWwsTe+WP44sR7Dhwf1lQVQzbXA -t/0E8XujlbRNLAUww8g0cDyKDbdHUlueOQjgxt41quSzbDht88/Fwk0Aj0r3 -PXONYQNjfU+sTbAAnh7qa6yNZUPCw0sfnDIEUOxh4l3tBDZsn/wdeXhIAKlp -cuG6aWw4bpZOfTImgC+Phl5ed5kNpbmMnlVzArhSQ6N3ibCUg4deLZ8gNpwr -ni69woaxh+x5ro2CqF1x1qU7kw3y4u63HXUF8ePnidmMa2xwPLjgeAcFseNe -DMsuiw1N62nV1rsEkcdBlafmOhsun00JuRYhiOoiVYZmN9nQ0ktRGosWRHZd -dcEA4SVt5jvDREHc206yCLnFBr9vs5pfbgiipPm3PRdz2HAdLw3q3BZE0Yf8 -TPFcYn2ukdMulAmiWW790cuE9Xfum97IFMSE4LWFcXlsOFI4kxPdKoiMVSHU -RcIFfy/adrwXxK+55Yt++WwQLm+6f3xEEMONjE5oF7DBWMDZvXVaEO2v7VRP -Jxzh/Ut4wx9BfO9zV3uS8KCEymGWEAk9Zj+pZxSyYc2RxvVr1pBQzPsE7Qvh -nS17XwXIkdA5fTqSXsSGaPmfJxsoJJzSLJYLIlwdmUgX0SJ8mEf2PuEf75T6 -PLeQMGM5JOQ7YTnG48QqExLyS7kpb7jNht1xewx4bUgoEcnQtCWc8Glq1Gkv -Cf942GafJNy4OSHrnicJ6QmbfAsIz6QqWvw7QEJxTavkZ4QpPxoW7UJI+Fac -X3qYsNt2xzsFp0go4N3Hw1FM1OPG5N75OBJe7jBwkiDcMhfPZ5FCQqPLN8RU -CC/bKDzMvkbCKuPjGpqENe/U+0/mkXBmhVmdHmF/zt1rjO6RcLfHuf+2EM7e -N/E0/QEJFf3ukgwIv6k6H/btMQm9knW7tQnzCMur6LeQMOnp3dVUwgb+de+T -3pDQ4dC5JhnCQU27Yj/1kNDdzrSfh3Ch9Li25hcSzt8/dmSCeP+eo3Ffzo2T -sFsrNfQNYZHWDekf5kg4+Evp533C25VrjakcQvgquHr4AuHjp+1/neQXwl+Z -bQ7uhEs//MhrFxfCvw3zW9UJD6nH2iusE8KCzEf5S8T6SyXIcoYqC6Hbzv/O -s/5fvy12njKbhVC70uS1KWEzt5s/dY2EkPksX+oPUW/hqB8xu3cK4cJLDZm7 -hLOZsUUpHkJY/2TKdoHIi/fXt7qlB4Qwd0ktIYMwlVfu+csQIeSsrj+nQfih -Rd0PngtC+LD7O3s3kcczgbynlC4L4YXYO6IDRF5Nkx2EjW4IYf/GKSVfwh1v -JtRPlQuhqIVnhTuR96m9imG/uoUw7YLHdUliv9REBvGKfRHCBKnuwHBiP53O -fpS5cUIINc8USr27wQbSwJ76AE5hNHNv5j2RzQZV/ySOAaowBnLQoi4S+3ci -vjt1WVsYszwcPNjE/q66q6K4FoRxm40ofSGDDUYTTSaOu4SRrcRxyfoqkafQ -2YTWE8KYLebZ9JjoJ8oZRutGY4UxX6tKvy31//3i0n+8KcJofdq0oiuFDZFL -lNdGBcIoki2b15/MhisxbhK1rcJIUqxklhL9yaWwpKizUxglxAT8r14g+v+z -Bd2ZAWF0ya+WPh7PhjKBy85qs8IYG61frRbHhtbUZ7cK14sgLgaQvKKJPFeu -1mCqiqD4vU8HFIh+6fzes3lAQwSTHFV/fDxNzAeppS9rTUXwr2S8s+lJNnDl -qFPTDovg2hQfnY9Ef9YvvVZ1ulEEgwxXzykdJPL0oW15okUETX++0asMYIM1 -B/cO97ciOCeY7bl1P1Ff+8Pd8FUErV7p+5r4EvU6IX8maqUoKn1UCFFyJ/K8 -YS5/G41wGWeQHDFvZitTWhbVRPHW66ShQ8Q8ijSjjZdri6KbuPq+GmJexQZ7 -6CgYimK+xIiboSUbspgvWjjtRHFFmtv0uu3EvPC/Nc4ME8WFTWdEZDexwXxJ -T/zkCVG8l8BbT9diQ1tKh452lCj6KJQm6mqwobuWP6rggiiuWl9TsI1B1Fcw -RDw2WxRffL40papM5L3MTNe0WRRfjQ+2GK5mQ+DCdFSLkBgWBM8fLZhkgX6w -n+SwuBhaPhH6yTvOAr7RnhIuKTGUfeqh7z/KgsJeZqehghg+EPquIf2VBf2P -r9Af6IjhLd0xAcseFtjE6nXluovhL0PB3hEmCzTFo9VOlIuhYPqhd3LpLFik -ifYzdoujoOSrW4oUFszdkInWchbHm3t8a3KUWTAjoqyk5y6OiUFewTIKLJj4 -pXdge4A4GvU0f+Bay4LBeu8551PiuLG8pqGUxIIXljXC8YXiqDAV6upPfI9l -HXSDwVlx/N3bUBdewYQtJfdyrl5dhQE6ZnmVakyYFrfwcGxejRymMQdd5Zrh -S5KH41FeSdy75sSryp4mMJ8MN/+qswYpfM/TuxmNMObNd6zqjBTq9PukqTs1 -EP8H1nCeb5bGrm7H3LdJtSD+SiW5bFIG5Qel6vx/V8O6+Pu2Ojrr0LyOy9bK -rAoyaXqiq/zX4+7eJ+sHh8rhhcy2Tb9SZdH153e1cI/7oL+uOUWtcwPu60w8 -GzR3F4S58kI8z8rhpVPdH7duug2y0Ru2OKnIY/vC4yD1pHzgV3aptn8mjzJu -OzcwXXNg41bp++GuCiinM71jTcx1ONovzrTgUMSLpKwPM1evwuSvpN3mmYpo -lMOnKFaQBjvUnmaZM5TwtrheLKMoGfbymDm8VlPCzLGk6uLEZDjw8bnQHk0l -HLCiZOoEJ0Ny4qsoH10lfCp+zjxhSzJ0fuvwO7NNCV0yrgWLdlwEn5whzQe7 -lTDbf9OWFJ6LcFZsxUu500oY5rLlldzxRHj8y+DPfJsSnuPYsHQjLR5yW2u8 -dr1RQvWWP/v/nIqHc4VaL0rfKWFay14d/4B4MN9Du+bbRZxPDegMwHjoqJPR -ffdZCT+N9PvJTJ6H0ejFo6UzSviuvTFPweY8SIrWjPrIKOP0dFPoTek4OEzX -7Hnjq4zrc2bzHnXGQOi8zG/3/cqYY54QzM+KgZPNXDITB5RxdKe+jE95DCTu -fe8kEKSMEYLqH0ySYqD4XES3UaQy/v1xj1RnFAODfY+7KpOVcUH28nvXirPg -eNHyw5UaZWw3G3/kmB0NWyd8Opz4VTAoiLHCX/MMSNbvyGsQVMHOEbmG7xJn -YOI8NWiDsApGnLIqO7t4Gm7KTwl+FVfB8wNaIvNNp+GvwwnjoHUq+ChfR3vE -9jQ01qdWxKmp4Ir5O5cGQk7BtguPUyp3q+BPlcXlV60nwERJykooTwU1blLS -WmsjoGqcLe9ToII7GqcDx/IiQKnm2FxdkQrezipIlU2KAG6L9lv7S1TwuFR+ -Qq1bBDQfifvJrFJBudTOhRbuCDCsn8mIfKaC1lz2zcYO4aBj/2bw25gKHjt7 -85kTRxiQoxIimnVVcdhAJfl6wjFoMChcuVNfFbeu+SroFXYMbOcb095vUcWV -icfa9b2OQcTh2Xsj21Sx7Of1nwr6x6DFxeOz8E5VzG5/pN06ehT26+lY7PNQ -xaKD5dLhNkfhzs/Pa2fiVZHLYMfmd8rBQPXVa1TuUUWz7Hp2I+9huKRg/Tum -j7h/P+toy/dDMPPJa9Ngvype2RF44sfLQ/DYOank5pAqPn45ax+VcgjsbT9l -rBlXxSPz/3EPyRyC4waxQfwcZCwUX/h0QjsQWsTeyI8rk9E561NnROQBYLR/ -dbEkkzH9peGlYvcDkJb0O+MOlYznrp+2ndp+AFx4lYT91MhoVNhS+EzkAEwu -hf3u30zG5dyaostFASA5su7da0syruxtjkzt2g++j/efqwomo4zOW8W7Vv4w -cWg03CSEjPtwWLhWyx8i1gce7Awjo84x1YLP0v6QcPKI/cIJMroHvQk/M+wH -ZfphclviyPh3YiHoR5QfLFXHNDCzyNg8nGl4tM4X0u7fnHnLJCPrYsuFu+AD -69zlRryfktHadOeup2QfKBTO651pISOt5KT2opgPPDxU2CzZRsafqt8n8r94 -w0favRTnLjK2dvasF0z0BnJxLX1wjIx//MtcRPq8oDGnw2dagoKTE5kVAcme -MLBT3j1MioK7d2X/zIn0BI7FQ05/ZCjYoihEG/PzBCM7XuuVchTce8kJH4Mn -PF2hrytNpaByCv96m58e0Op1i3+bIQUz/BjPVu/zgB6lA6UpfhRkR6X0hoW6 -wZ/X1cUSARR8zr0qIM/eDdad4srPOkhB8QFr1rSaG7i+z84oCKLgmbw9vn9G -XWEgtj3qYSQFq99qDlR7ucK3Ye1dA8kUdKi0Cqnc6wIzxf/m1Woo2EFT3zPu -6gzDjqY5F2opyF0U1O69zRm6uC+aDdVTsID/pOKckjPUe8hcu9pEwf6WlxyH -x5zgrNQm/eXnFPRee4ej+KQTiMYfOPmij4IjjtEv1fP2At3/PYcvJxVDVIsD -5zj2gKzEujuPuanY5K/4vf6bI4gyveykeKmovr3uUFabI/ySncp9KUhFsd7m -zXnZjlDXKWCsKUFF+eStJ3v0HMHMFGP/qVLx2u2b0r0Ru8FbuYQ/y4qKGXnJ -tQl8DhDJdjugYktFn/gQyYCpXZDiK/6ywp6K8zLq7zy7dkFD4fGkl3uoGO1u -wptXvAtWq5iJLHtS8R5t6bqzxS54qvJ1tUcYFWWOkFquptkDlbxBTuUWFaWe -Sd9K3WQH2PI2qiKXivsbxmOT5OzAcX/cZ8MCKnoWK7+4KWgHMcXjeXvuUHHF -oLsI/6At9JEblC9UUpH20VHs5yVbSKY40caeUfGs4/N87gEbmKZe1qmYouKl -9NEO7mgr6GpFk1W/qBjuofjtm5sVNB2e2BUyS0VGwvz8xBYrSK4wD9b5TcXY -caVL+xd3AlWf414dFw1zrCnjK0N2gpf5IXmmJA2V5MwvtB6xhA7/HaSOLTTU -Cp44fzvKHOr5Z2U2AQ3L+Ga3v/Qyh7ySPMrVbTSsmGz7K2xiDkGTy6Z7TWlo -f9N8cpbfHITCq6L7bGi4rYoZYnjFDEzj5Oe/eNFwpc36sVvlO+BhwZ/Ps/E0 -3O0wuLWLwxR0jEPmLRJpOGH40d/kmwk8+DxGyrlIQ2N5g45Xr0ygQrZf1yKN -hvqfokjq103gXmbTxZvXaTgWGUDV1TWBnKRYvR2lNAy2Vu7WC9kOF0JEUjPf -Edc/kVjrvcIY+FbFF42/p2F5wYch3h9GEFfO0WDURcN11/q6WB1GcG5ienis -j4afG2RH44qN4PT+ji3bhmkIe9iyFDsjOOpybeT7Ag33hRyrfVO0DZy3K6KB -LB1nT+d2SXojLHfwCTPl6NijvMA/YYWQ4zvRa6FIxwmeUr/+zQjDcbXhzmQ6 -eoTd1hEQQTj63Ob+cU06hpclJkgeB0iwPin70JSOU22iCps3G0Ld3vdL2kfo -qF75pe9CtwG4fq970RBMx/5LS2GyDwyAIzInc3sIHQ3uhgt8SjEA0+sHtR2O -03ExUt5tyMwA3n5cEXgsho6hHYOxv+r0YdRrY295Bh11BKM6+W7rwdpD52s3 -NtHxkfP7Yy03dCH5n9+mxGY6ZhmeGs2M0gXONNPybyw6bvHubErw1oXR6pV3 -cp7TUbw4hvMtRRfqOM5lir+jo8niiPSPGh1wTo8Kn/tKx/1iQ38pPZsgs/74 -pseCDOxr9uKZ2aQNJGunchlhBnJJVLbfX6cNUQObGeGiDKwoKf4cz6UN+1cu -KKlLMDD9r51P2hst0LUJW50ny8CtpNCkf4e1oHPw6K9YDQaWeg5wku9rgoRA -YLnVHgaeCpXh/WKsAQXGpyKnnBh4aYq+EEfTAM1TycaXXRgYYBPeZb5KA6yn -yt53eTJwkt+hbeOQOsR1zi56BzLwjq31oeBz6rCQd8YoMpqBR47JdgZfU4Me -g8vvikoYeL/2Q3fxMB32hxZkm5cy8AYfvdLlER3mSh/4jpUx8NvSw4gd6XQQ -V+ia16hmoGc261GTER0s+dave9TEwCQP4xn9PBo0dBT5vHvPQI0mQzmJg1Sw -EH7ICOtioBnveWFpEyp07Xg+J9XLwAeRtH6bDVSYqfsR7zbAwP6SneTdHRRg -5Kr/932UgRudpYpqkAINPdvCksYZKO+Z2Gu5jgIWq3eB2hQDXQ7X8YgtkMHv -fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo -9h266zIDD8cNizwxIcPNQ3Wz//4x8PPaW6tvK5Dhf7nHxxw= +1:eJwV13k0Vd0bB3DRKFTIPJx7DUmmMnOv5yFD5mRMMoYSUqaoDL2SIokGNJCp +t0z3nlKZhYoKJZmHknoliQxp9Du/v876rLP22mc/e+/v3ofmfWiXLycHBwex +jIPj/8+F4dZm2eQCA93uz9mB0UYGXTdEogx7T4JF52EFw1kCcGOHt0hvOhjr +C+iIzapBxM47PVy9eeDzoKBj6RvChinh9B89JCSHlvV3f9sJIzU2h+Z6GmGP +zB0P+2+eYCo7MTTT0wk11S7NjtMh8KNH+9J0zyjs9ymsOzAeB03bbxW8ypuF +dztDCvqjLoDESOVHb6U/kHjQgTySlwWCgR53Vm3nQsmJQgHIy4X0rabVNo6r +UfhsL9PzZAH0Zao1zKznxSfhYjXzr29BckFsB6foBkxYMTeuw1sMwhffn8m4 +LoBna60efHtRCiJbKhIWiwQw89zGWO/uUhBrTIzdyxJAQsRW+sVIKUhNbw7f +1CSA6/QdxlK+lYKcVYhn9bgA6qUPeDQLl4H68j9a79UF8cSXQElurzKwDRMa +2/ZMEAt78uQ+TZXBaQdzg86FjVhi+OhL/fdyELvXLsa5TAgL9U3ZMhwsKBNw ++L51rRAuDDrc8VnOgu5Od9YFaSHkTq1z6uVhgaxdGN1uB/U+0ubcRUkWNFrn +rHyZJYST/0SJuRiw4I/pfHsbQxhfhreYrznBgrSi6OI/psJovVlYtiuOar+S +I0nZThg/MN22XU1ggdVjbsNzvsLY2/H6k2QKC7K3E3etUoVRp2V93Xw2C3TQ +8srzEWE0H9Nsm3rAglDdmx6tJ0Ww/tAdtxVfWWCRyzdnmSKCApPX+aS+sYC+ +6nhS+yURzPEQCVKfZ8HLLif2639FMJQMUnX4xQKVEB6u4XYRrA3wawlaxYbx +osiib2KiOPArxGSZNBvcBG2+iN8VReHZxCO3Ldmgfqw6/kaNKKYo/yx3tmED +96iCEO2JKG43cczmtGNDZTkXyPeJYlbkxggbJzYIWVamqS2JYuusjlWdJxte +xstqmFiKYVyx+dm/YWww/vozOvi9GOZphTM5r7IhasdFxUeTYqh2ReCb3nU2 +lN1U7hdYEEOHJxJRITlsEHHw1K1cLY5r7XWWXuWzYfLh4+9cKuIoutNkJriE +DRkn08Kyjoqjdavp9fW1bBjdKB/czCuBHI5HWucG2CB8qF5SWFgCsyM4DVqG +2GDV4tJ2gJDACDnOc5kjbLgfnay0Tl0CxQzOVau+Z8PZkemJ3S4SeDqr3Edn +gg3bblf7f82TQBmj+c13v7MhnmHnJaYjibXaS9x260nY4X7jm7aRJHYua04d +2UACX9znfxytJJFRN3QwQICEa02nitI8JVGoVF0jXIiEhxZVn1eekUQp4wIe +DwkSpl1kImb7JLEvFV0TNpHwIDpk1YYxSYRzExW9CiTEXKvNVJmSRNfGv6Gb +FUngeetcfYBTCh/4vBZtUCJhk38Kx1tFKRwXDpRs3EqCe/j82RfHpHDSgCtd +VJ8EuStGEhOnpLAgIcZDg0FS9TtfuipNCh/PXsuyZJIQ/XvzS6MCKXRPOup0 +CEi49I/7xsoXUuiUM7giZTsJboXFRd3dUmiTdNXyrDEJ9KeL2nNvpdDuTALX +KRMSWNwZrqrzUmj8q+TFITMSXlx4mlMoKY0baCd6xSxJyLgruLVpkzRKkXea +flN2fePV+HarNGYWtssPWJEwLvJ7TNxUGtO2zDmfsyGBK1dNMT1YGg9ZP4t+ +akeCXlnWvZh6aVRbrArOcCbBuKf9z1SLNNr/8Z/b6kKCDcdyM49OaXTeU3m4 +jbLPruA++CCNze4Tjr92k2B6jBYbt4LAvnDRnm1uJDxfV5Ovw03gy0eRSpWU +dxY4tUzzEaj3+WUMYy8Je9qSN3iJEJhQpCyp505CiPRCvuEWAm+Nd9hv8CRh +/m5ayw9VAl9PGxTEUo7eseULW4PADELt+wTlU4c9tegGBNqOBtx66EUC98pf +rv1GBN4xlV4p7k1CWval2HQzAr0itgREU85uetbCaUfgUa7NJmo+JEi7+H6p +ciQwTCq5NpFyweTShlBXAgVi5Q36KZdv1Nzz3odAxRvfXI/uI0HjTkfs1f0E +ii9kLTZSrjIIKLAPIrD0sf9Nbl8Smv1zvjRFECjy66DwBcrmv3X5jx8jsO2J +1McOyu1pXVoacQQOdU03rvUjoa9yTVzBGQK7AmZvR1N2tykocEsl0HVjUUUp +5bFRg1bBDAKTTY93DlGeWhvGf+oagbn2OUaa/iSE5vJpM28SCEuhV9woL2rc +3jNfSODfjmMc8ZRjWrfHld4hcPjQ8Zg8ylzuwwW+5QSuZTD4H1FO+na0VfIe +gR7GJ2sGKfOdFph685DAQQuhmHnKGeJl/Km1BGo2NTiv3U+CCGuHtmkjgead +FhZSlK8bv9/z9wn1PdYxTiqU6X0n4u4/J/BHldwJfcr/BokUBr8ksMqWp96E +sjLn3Vb5NwRGTv+RsKZMXraeGu4j8LDa0yt2lHW2jPNfGSZQ0E5TzZ5ybf1J +bdv3BB43FPrv/++NHCTdVo0TOH5dp/b/7Z+OP4irnyRwe/nBu6aUrU7sKoyc +ITAvIPYZg3Lnhi+tqgsEVoYYc6lRdi46PfXfTwL9eVPcCcqDenSB3CUCN2kr +DPFS9u6o0XZZTsOrqZ9jF6nx/+fj7LZ+DQ3/7L1t9pZy4OJMXAsvDfMzNTUf +U9Y77Cf0kZ+GzesECwsor57oL+YSoWF484raOMrd3raGNEkaOpqKx+ymXDjQ +1G1Ap+HFtX6fVCiHOegEum2ioVjI4hIHZaO2kmXRSjR8fu9DYwc138N1l5Qq +tKj+nOi7fCiXaHM3durTMPPWNUKBcjQrxnkaadhR9zTnE7W+hPL8T26xpOHh +vvP3vCmPiQ0Km++k4f0+dysxymTGzlI/RxruzTTKaqfWr+0p3d6bHjQ06K9w +UqYs9bc0qH4fDRMtYlp7qPU/GUHnGjpAwyq7tvkYykn716qIhNEwNjA6tona +Tw2WQ/+kJtGw2D4nQo7af6nNdqIl52hY/0P2TQW1P92YT8pa02lo/Yi5YET5 +h0p53/LrNHQfrUuw9yBhG3+86jE2DUfe7Ji1pvKAI3m+OfM+DT3FixObqbxo +5wpwvV9NQ27N0Q/alA/O7zo185iG/iqxPBv3UPu1V3bAv5+GnMtDxW9TeXTE +Livk1AgN29eGq6ykjM94V+aP0TBS+ZGQJ5VnQ9ULasNTVH1clgVyO1H1ymlJ +dOCiI+/HDgtde6pewkyJI6vpGN77fPOJXVS90tjs87x0NJar/K+Wykfbk9mD +z4Tp2PHZfIXWTqoevoHbDJXo2LRw7ROHNTW+LeuHlR3pGHyCEchpSsLCdbF4 +dVc6qkK5siiV33Pr5GR1Peh4OlPvrxKV71OzugHGB+hYOOT7ytKIhNFqnwXX +E3Q0zK3z8jMg4ZnlA76kQjreF+PXW69FrffaR+xzd+gomyUfs6hB5Y3qC4eM +cjo2fmgZG1InoU7gXfaNSjpu4LwjlUudT+QA96aKNjoeIQv9OZWp/DvoDqPz +VH/3WX4gQ8KVof2j//2k4+4brgd+0ki4aBt66ssSHRn2+XkkQc2netLzxTUy ++DZ5c52YFAknf7Gd10nJYNyW1zWtItR8JK8IYZjKoPq9isV8XhIYxSW5ly/L +4KFu09O75tkwQBTnmFyVwVWlHWTnLBuiL9++MZcjgwc20y7v/MaGB/FF13bd +lsEmhfAkk6/U+e+Sm8lXI4NRAU56gp/YsHnFxbTEdzJo5v70qckgdd/xOBYX +oSSLg2JchssesaGiKypWbqss3t26OVGvng0OFkdjujRlUXz6cNFh6n6Srhl+ +fBvIopnt5+N9lWzg5Tl0dMpOFp995Ll5nmTD8krvEL9IWbQPDm66TN13Zvgt +PJ0aZfG2+40DIgls6A2kvwx4KovJl3yE38ezoeHJT4h9IYvcYikBxbFsSIsu +lv63WxY1tk+t1DzGBrVRnpEfE7J4JdjVUOkIG4LZHXuvC8ihnP671SUebJiw +ddwztk8Oy1YfsPulw4axFE+nI6vksYYez6X8gQXBE0p0NR55FMiaeXF1lAXf +zX58+bJeHvf66g2tfssCbq70UwfE5DFMzrpnqJ8FalFN9zyV5dGB08Qh9CUL +TvjKC9jay2OPl3KSdTULhAwmO7bkyOO54cdpT8+zwPxrpPkHrU2Yf0ydT0SD +BZM+q0PvxSqgQ1vSfHpFGfV/Isx5unEzRj6U4DR6XwL8bfKprK+KyLn4+Biv +cDFIJJXv1NJSQv3tvRKEwG3I3KK7XsBfGdN/OjrtV7wFz8QMNWcvqKCvZviA +gVUh6Ek0pql2q6JoO8fsT+t84OPKC/M6qYbiVpbxrNibIBUvzdgtvxWz8vfx +5xjkwBo5t/u7nm7FCwmpklyNV0GFKVoeuXcbvrFhSp++lwlHhvmbLDjUsfh3 +vqv0zUvwdTbF0TxTHdvDxp/3/04HM9Un2ebKGiivFFrdeT0N6mb1f31v18CD +u8+K16SnQLDStv5XvprYZTtCaypOAubUvq7da7TQVOdCIG08AUxkRax587TQ +7PMVa6/2eFCIO3u0UVsbz7ZnDGsbxYCir269XL82Pm4l+B6oR4Fv3f6Ee4d1 +ML1on7sTEQ71uV37ZjbqYlDMlqHzzodh7t+l76oPdLHBJ75DzzcQfOSK12Rb +6+HPWKUPzGB/iH7sHiC/Uw8Llv3OjHT1hzRf/ufkLj286hlaWG/qDzWFUSnP +nfXw8t/JW9HS/iAov2PdHy89fLI1O+TqKz94Iv9B0DNCD1cp2q6I1/EDRQVp +Qj5HDyv27PEqWO8LM4oZWuS0Hq4pndx9adwbel+gicCsHs6NaIwy+7yhIXjK +PmxeDw9oLOrMtHpDKml+WOunHkoO5+keLfYGRT2OkioufTzOPTS08pA3eJsH +0ZqE9DF0xOwgbdELuvzNeLoY+ngzKP4Vjd8LHhb8ejefpI+2zJqm9S3uoLU9 +7LtFsj66qsYPTpa5Q8W7SZ7cc/r4wWtyqv+SO5BSw9oW6fro+Gy4e9LHHUoy +G87duKqPV5jbzn/kcIfclFO6ZmX6KO2SnKpgsBfOhK27kPlaH897+3LkPN4D +rsYyqC/FQIuPZ5JkV+6GP12r+ZoIBg6L0CX3f3WBXN+pAQsZBgq+2jBR2+sC +HxMrI10VGPjidMHvnGIXONJqWx61jYEDHol3Gbtc4KzNcamHpgw8/Pf9TFue +M1S5vPmtcYiBwunviD87nUA86HSlSgMDo0o93q8dsYfUJT/N5EYGft4X1VLX +Zg+c6abs/5oZSD4YXBdbYw8T91fczm1lYOA1Mm9Ttj1UcSRk8r9mYP7Y6Adh +J3twvRgXufCBgW63eF2DXu6CzOoozbq1TJTXcEpltdvBRu5AtrUzE22ClHZc +HLGFgu0noqd3M9HPMCqyv94Wtp1I3Z7hxsSobPp7Rq4t2Eyz3vR6MfFG/h9R +Jy9bSOye/+ETyERR5SJ2z5gNLObFGkXHM/HKRed1K2asoV8/43VRMRMH42c0 +IyWtYH94wTXzMiaOtRj7SSyzgoWyCt9JFhM/DZYwB8YsgZ/e+33rfSbOtWql +F5ZYguVqSYnaBiaOTCj8G8C0hJquon2v3zCxs+Xv3kIfC7Dge6gc0cvE1ozk +JwM7LKDXrHVBZICJyX6h1xVVLGCu6nOS+1sm3ldsMN/wwxyUb6qVfppgoumn +tkSONHOo6TeMSPnCxPoZT6vFcHOwELQH1WlqvLKO46vczMHvdPirsHkmatPR +JVjBHOYaErOFF5l41bpp5WM+czj584pP1U/Kbg2oPr8D1mvcVtr7h4lpRtmz +Dwd2wI2gqvmlJSZ6BNXzODXugP8BI/EQhQ== "]]}, "Charting`Private`Tag#1"]}}, {}}, <| "HighlightElements" -> <| "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, "LayoutOptions" -> <| "PanelPlotLayout" -> <||>, - "PlotRange" -> {{0, 15}, {0., 0.16919668648256683`}}, + "PlotRange" -> {{0, 30}, {0., 0.07190437247237852}}, "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { Directive[ Opacity[1.], - RGBColor[0.368417, 0.506779, 0.709798], + RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2]]}, "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ - Identity[ + (Identity[#]& )[ Part[#, 1]], - Identity[ + (Identity[#]& )[ Part[#, 2]]}& ), "ScalingFunctions" -> {{Identity, Identity}, {Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, @@ -13665,6 +14200,7 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, @@ -13692,7 +14228,8 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange->{{0, 15}, {0., 0.16919668648256683`}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07190437247237852}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], @@ -13700,17 +14237,595 @@ fOibkFkGHusIsmKUkWGmKS5rzQIDx0lq0zFJZDj7O8O77jcDv6ZKXhcIIIOo Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", - CellChangeTimes->{3.9913483238131485`*^9}, + CellChangeTimes->{3.9913483238131485`*^9, 3.9943893145612307`*^9}, CellLabel-> - "Out[470]=",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] + "Out[140]=",ExpressionUUID->"33a182ca-4dce-4de9-a206-58083200b323"] }, Open ]], +Cell[CellGroupData[{ + Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"x", ",", "xx"}], "]"}]], "Input", - CellChangeTimes->{{3.9917994642649307`*^9, - 3.991799466675585*^9}},ExpressionUUID->"54d9c986-d109-3d4c-9ee8-\ -76427bb63659"], + CellChangeTimes->{{3.9917994642649307`*^9, 3.991799466675585*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], + +Cell[BoxData[ + GraphicsBox[{ + InterpretationBox[{ + TagBox[{{{}, {}, + TagBox[ + {RGBColor[0.24, 0.6, 0.8], AbsoluteThickness[2], Opacity[1.], + LineBox[CompressedData[" +1:eJwV13k0Vd0bB3DRKFTIPJx7DUmmMnOv5yFD5mRMMoYSUqaoDL2SIokGNJCp +t0z3nlKZhYoKJZmHknoliQxp9Du/v876rLP22mc/e+/v3ofmfWiXLycHBwex +jIPj/8+F4dZm2eQCA93uz9mB0UYGXTdEogx7T4JF52EFw1kCcGOHt0hvOhjr +C+iIzapBxM47PVy9eeDzoKBj6RvChinh9B89JCSHlvV3f9sJIzU2h+Z6GmGP +zB0P+2+eYCo7MTTT0wk11S7NjtMh8KNH+9J0zyjs9ymsOzAeB03bbxW8ypuF +dztDCvqjLoDESOVHb6U/kHjQgTySlwWCgR53Vm3nQsmJQgHIy4X0rabVNo6r +UfhsL9PzZAH0Zao1zKznxSfhYjXzr29BckFsB6foBkxYMTeuw1sMwhffn8m4 +LoBna60efHtRCiJbKhIWiwQw89zGWO/uUhBrTIzdyxJAQsRW+sVIKUhNbw7f +1CSA6/QdxlK+lYKcVYhn9bgA6qUPeDQLl4H68j9a79UF8cSXQElurzKwDRMa +2/ZMEAt78uQ+TZXBaQdzg86FjVhi+OhL/fdyELvXLsa5TAgL9U3ZMhwsKBNw ++L51rRAuDDrc8VnOgu5Od9YFaSHkTq1z6uVhgaxdGN1uB/U+0ubcRUkWNFrn +rHyZJYST/0SJuRiw4I/pfHsbQxhfhreYrznBgrSi6OI/psJovVlYtiuOar+S +I0nZThg/MN22XU1ggdVjbsNzvsLY2/H6k2QKC7K3E3etUoVRp2V93Xw2C3TQ +8srzEWE0H9Nsm3rAglDdmx6tJ0Ww/tAdtxVfWWCRyzdnmSKCApPX+aS+sYC+ +6nhS+yURzPEQCVKfZ8HLLif2639FMJQMUnX4xQKVEB6u4XYRrA3wawlaxYbx +osiib2KiOPArxGSZNBvcBG2+iN8VReHZxCO3Ldmgfqw6/kaNKKYo/yx3tmED +96iCEO2JKG43cczmtGNDZTkXyPeJYlbkxggbJzYIWVamqS2JYuusjlWdJxte +xstqmFiKYVyx+dm/YWww/vozOvi9GOZphTM5r7IhasdFxUeTYqh2ReCb3nU2 +lN1U7hdYEEOHJxJRITlsEHHw1K1cLY5r7XWWXuWzYfLh4+9cKuIoutNkJriE +DRkn08Kyjoqjdavp9fW1bBjdKB/czCuBHI5HWucG2CB8qF5SWFgCsyM4DVqG +2GDV4tJ2gJDACDnOc5kjbLgfnay0Tl0CxQzOVau+Z8PZkemJ3S4SeDqr3Edn +gg3bblf7f82TQBmj+c13v7MhnmHnJaYjibXaS9x260nY4X7jm7aRJHYua04d +2UACX9znfxytJJFRN3QwQICEa02nitI8JVGoVF0jXIiEhxZVn1eekUQp4wIe +DwkSpl1kImb7JLEvFV0TNpHwIDpk1YYxSYRzExW9CiTEXKvNVJmSRNfGv6Gb +FUngeetcfYBTCh/4vBZtUCJhk38Kx1tFKRwXDpRs3EqCe/j82RfHpHDSgCtd +VJ8EuStGEhOnpLAgIcZDg0FS9TtfuipNCh/PXsuyZJIQ/XvzS6MCKXRPOup0 +CEi49I/7xsoXUuiUM7giZTsJboXFRd3dUmiTdNXyrDEJ9KeL2nNvpdDuTALX +KRMSWNwZrqrzUmj8q+TFITMSXlx4mlMoKY0baCd6xSxJyLgruLVpkzRKkXea +flN2fePV+HarNGYWtssPWJEwLvJ7TNxUGtO2zDmfsyGBK1dNMT1YGg9ZP4t+ +akeCXlnWvZh6aVRbrArOcCbBuKf9z1SLNNr/8Z/b6kKCDcdyM49OaXTeU3m4 +jbLPruA++CCNze4Tjr92k2B6jBYbt4LAvnDRnm1uJDxfV5Ovw03gy0eRSpWU +dxY4tUzzEaj3+WUMYy8Je9qSN3iJEJhQpCyp505CiPRCvuEWAm+Nd9hv8CRh +/m5ayw9VAl9PGxTEUo7eseULW4PADELt+wTlU4c9tegGBNqOBtx66EUC98pf +rv1GBN4xlV4p7k1CWval2HQzAr0itgREU85uetbCaUfgUa7NJmo+JEi7+H6p +ciQwTCq5NpFyweTShlBXAgVi5Q36KZdv1Nzz3odAxRvfXI/uI0HjTkfs1f0E +ii9kLTZSrjIIKLAPIrD0sf9Nbl8Smv1zvjRFECjy66DwBcrmv3X5jx8jsO2J +1McOyu1pXVoacQQOdU03rvUjoa9yTVzBGQK7AmZvR1N2tykocEsl0HVjUUUp +5bFRg1bBDAKTTY93DlGeWhvGf+oagbn2OUaa/iSE5vJpM28SCEuhV9woL2rc +3jNfSODfjmMc8ZRjWrfHld4hcPjQ8Zg8ylzuwwW+5QSuZTD4H1FO+na0VfIe +gR7GJ2sGKfOdFph685DAQQuhmHnKGeJl/Km1BGo2NTiv3U+CCGuHtmkjgead +FhZSlK8bv9/z9wn1PdYxTiqU6X0n4u4/J/BHldwJfcr/BokUBr8ksMqWp96E +sjLn3Vb5NwRGTv+RsKZMXraeGu4j8LDa0yt2lHW2jPNfGSZQ0E5TzZ5ybf1J +bdv3BB43FPrv/++NHCTdVo0TOH5dp/b/7Z+OP4irnyRwe/nBu6aUrU7sKoyc +ITAvIPYZg3Lnhi+tqgsEVoYYc6lRdi46PfXfTwL9eVPcCcqDenSB3CUCN2kr +DPFS9u6o0XZZTsOrqZ9jF6nx/+fj7LZ+DQ3/7L1t9pZy4OJMXAsvDfMzNTUf +U9Y77Cf0kZ+GzesECwsor57oL+YSoWF484raOMrd3raGNEkaOpqKx+ymXDjQ +1G1Ap+HFtX6fVCiHOegEum2ioVjI4hIHZaO2kmXRSjR8fu9DYwc138N1l5Qq +tKj+nOi7fCiXaHM3durTMPPWNUKBcjQrxnkaadhR9zTnE7W+hPL8T26xpOHh +vvP3vCmPiQ0Km++k4f0+dysxymTGzlI/RxruzTTKaqfWr+0p3d6bHjQ06K9w +UqYs9bc0qH4fDRMtYlp7qPU/GUHnGjpAwyq7tvkYykn716qIhNEwNjA6tona +Tw2WQ/+kJtGw2D4nQo7af6nNdqIl52hY/0P2TQW1P92YT8pa02lo/Yi5YET5 +h0p53/LrNHQfrUuw9yBhG3+86jE2DUfe7Ji1pvKAI3m+OfM+DT3FixObqbxo +5wpwvV9NQ27N0Q/alA/O7zo185iG/iqxPBv3UPu1V3bAv5+GnMtDxW9TeXTE +Livk1AgN29eGq6ykjM94V+aP0TBS+ZGQJ5VnQ9ULasNTVH1clgVyO1H1ymlJ +dOCiI+/HDgtde6pewkyJI6vpGN77fPOJXVS90tjs87x0NJar/K+Wykfbk9mD +z4Tp2PHZfIXWTqoevoHbDJXo2LRw7ROHNTW+LeuHlR3pGHyCEchpSsLCdbF4 +dVc6qkK5siiV33Pr5GR1Peh4OlPvrxKV71OzugHGB+hYOOT7ytKIhNFqnwXX +E3Q0zK3z8jMg4ZnlA76kQjreF+PXW69FrffaR+xzd+gomyUfs6hB5Y3qC4eM +cjo2fmgZG1InoU7gXfaNSjpu4LwjlUudT+QA96aKNjoeIQv9OZWp/DvoDqPz +VH/3WX4gQ8KVof2j//2k4+4brgd+0ki4aBt66ssSHRn2+XkkQc2netLzxTUy ++DZ5c52YFAknf7Gd10nJYNyW1zWtItR8JK8IYZjKoPq9isV8XhIYxSW5ly/L +4KFu09O75tkwQBTnmFyVwVWlHWTnLBuiL9++MZcjgwc20y7v/MaGB/FF13bd +lsEmhfAkk6/U+e+Sm8lXI4NRAU56gp/YsHnFxbTEdzJo5v70qckgdd/xOBYX +oSSLg2JchssesaGiKypWbqss3t26OVGvng0OFkdjujRlUXz6cNFh6n6Srhl+ +fBvIopnt5+N9lWzg5Tl0dMpOFp995Ll5nmTD8krvEL9IWbQPDm66TN13Zvgt +PJ0aZfG2+40DIgls6A2kvwx4KovJl3yE38ezoeHJT4h9IYvcYikBxbFsSIsu +lv63WxY1tk+t1DzGBrVRnpEfE7J4JdjVUOkIG4LZHXuvC8ihnP671SUebJiw +ddwztk8Oy1YfsPulw4axFE+nI6vksYYez6X8gQXBE0p0NR55FMiaeXF1lAXf +zX58+bJeHvf66g2tfssCbq70UwfE5DFMzrpnqJ8FalFN9zyV5dGB08Qh9CUL +TvjKC9jay2OPl3KSdTULhAwmO7bkyOO54cdpT8+zwPxrpPkHrU2Yf0ydT0SD +BZM+q0PvxSqgQ1vSfHpFGfV/Isx5unEzRj6U4DR6XwL8bfKprK+KyLn4+Biv +cDFIJJXv1NJSQv3tvRKEwG3I3KK7XsBfGdN/OjrtV7wFz8QMNWcvqKCvZviA +gVUh6Ek0pql2q6JoO8fsT+t84OPKC/M6qYbiVpbxrNibIBUvzdgtvxWz8vfx +5xjkwBo5t/u7nm7FCwmpklyNV0GFKVoeuXcbvrFhSp++lwlHhvmbLDjUsfh3 +vqv0zUvwdTbF0TxTHdvDxp/3/04HM9Un2ebKGiivFFrdeT0N6mb1f31v18CD +u8+K16SnQLDStv5XvprYZTtCaypOAubUvq7da7TQVOdCIG08AUxkRax587TQ +7PMVa6/2eFCIO3u0UVsbz7ZnDGsbxYCir269XL82Pm4l+B6oR4Fv3f6Ee4d1 +ML1on7sTEQ71uV37ZjbqYlDMlqHzzodh7t+l76oPdLHBJ75DzzcQfOSK12Rb +6+HPWKUPzGB/iH7sHiC/Uw8Llv3OjHT1hzRf/ufkLj286hlaWG/qDzWFUSnP +nfXw8t/JW9HS/iAov2PdHy89fLI1O+TqKz94Iv9B0DNCD1cp2q6I1/EDRQVp +Qj5HDyv27PEqWO8LM4oZWuS0Hq4pndx9adwbel+gicCsHs6NaIwy+7yhIXjK +PmxeDw9oLOrMtHpDKml+WOunHkoO5+keLfYGRT2OkioufTzOPTS08pA3eJsH +0ZqE9DF0xOwgbdELuvzNeLoY+ngzKP4Vjd8LHhb8ejefpI+2zJqm9S3uoLU9 +7LtFsj66qsYPTpa5Q8W7SZ7cc/r4wWtyqv+SO5BSw9oW6fro+Gy4e9LHHUoy +G87duKqPV5jbzn/kcIfclFO6ZmX6KO2SnKpgsBfOhK27kPlaH897+3LkPN4D +rsYyqC/FQIuPZ5JkV+6GP12r+ZoIBg6L0CX3f3WBXN+pAQsZBgq+2jBR2+sC +HxMrI10VGPjidMHvnGIXONJqWx61jYEDHol3Gbtc4KzNcamHpgw8/Pf9TFue +M1S5vPmtcYiBwunviD87nUA86HSlSgMDo0o93q8dsYfUJT/N5EYGft4X1VLX +Zg+c6abs/5oZSD4YXBdbYw8T91fczm1lYOA1Mm9Ttj1UcSRk8r9mYP7Y6Adh +J3twvRgXufCBgW63eF2DXu6CzOoozbq1TJTXcEpltdvBRu5AtrUzE22ClHZc +HLGFgu0noqd3M9HPMCqyv94Wtp1I3Z7hxsSobPp7Rq4t2Eyz3vR6MfFG/h9R +Jy9bSOye/+ETyERR5SJ2z5gNLObFGkXHM/HKRed1K2asoV8/43VRMRMH42c0 +IyWtYH94wTXzMiaOtRj7SSyzgoWyCt9JFhM/DZYwB8YsgZ/e+33rfSbOtWql +F5ZYguVqSYnaBiaOTCj8G8C0hJquon2v3zCxs+Xv3kIfC7Dge6gc0cvE1ozk +JwM7LKDXrHVBZICJyX6h1xVVLGCu6nOS+1sm3ldsMN/wwxyUb6qVfppgoumn +tkSONHOo6TeMSPnCxPoZT6vFcHOwELQH1WlqvLKO46vczMHvdPirsHkmatPR +JVjBHOYaErOFF5l41bpp5WM+czj584pP1U/Kbg2oPr8D1mvcVtr7h4lpRtmz +Dwd2wI2gqvmlJSZ6BNXzODXugP8BI/EQhQ== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ]}, {}}, + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0Vd0bB3DRKFTIPJx7DUmmMnOv5yFD5mRMMoYSUqaoDL2SIokGNJCp +t0z3nlKZhYoKJZmHknoliQxp9Du/v876rLP22mc/e+/v3ofmfWiXLycHBwex +jIPj/8+F4dZm2eQCA93uz9mB0UYGXTdEogx7T4JF52EFw1kCcGOHt0hvOhjr +C+iIzapBxM47PVy9eeDzoKBj6RvChinh9B89JCSHlvV3f9sJIzU2h+Z6GmGP +zB0P+2+eYCo7MTTT0wk11S7NjtMh8KNH+9J0zyjs9ymsOzAeB03bbxW8ypuF +dztDCvqjLoDESOVHb6U/kHjQgTySlwWCgR53Vm3nQsmJQgHIy4X0rabVNo6r +UfhsL9PzZAH0Zao1zKznxSfhYjXzr29BckFsB6foBkxYMTeuw1sMwhffn8m4 +LoBna60efHtRCiJbKhIWiwQw89zGWO/uUhBrTIzdyxJAQsRW+sVIKUhNbw7f +1CSA6/QdxlK+lYKcVYhn9bgA6qUPeDQLl4H68j9a79UF8cSXQElurzKwDRMa +2/ZMEAt78uQ+TZXBaQdzg86FjVhi+OhL/fdyELvXLsa5TAgL9U3ZMhwsKBNw ++L51rRAuDDrc8VnOgu5Od9YFaSHkTq1z6uVhgaxdGN1uB/U+0ubcRUkWNFrn +rHyZJYST/0SJuRiw4I/pfHsbQxhfhreYrznBgrSi6OI/psJovVlYtiuOar+S +I0nZThg/MN22XU1ggdVjbsNzvsLY2/H6k2QKC7K3E3etUoVRp2V93Xw2C3TQ +8srzEWE0H9Nsm3rAglDdmx6tJ0Ww/tAdtxVfWWCRyzdnmSKCApPX+aS+sYC+ +6nhS+yURzPEQCVKfZ8HLLif2639FMJQMUnX4xQKVEB6u4XYRrA3wawlaxYbx +osiib2KiOPArxGSZNBvcBG2+iN8VReHZxCO3Ldmgfqw6/kaNKKYo/yx3tmED +96iCEO2JKG43cczmtGNDZTkXyPeJYlbkxggbJzYIWVamqS2JYuusjlWdJxte +xstqmFiKYVyx+dm/YWww/vozOvi9GOZphTM5r7IhasdFxUeTYqh2ReCb3nU2 +lN1U7hdYEEOHJxJRITlsEHHw1K1cLY5r7XWWXuWzYfLh4+9cKuIoutNkJriE +DRkn08Kyjoqjdavp9fW1bBjdKB/czCuBHI5HWucG2CB8qF5SWFgCsyM4DVqG +2GDV4tJ2gJDACDnOc5kjbLgfnay0Tl0CxQzOVau+Z8PZkemJ3S4SeDqr3Edn +gg3bblf7f82TQBmj+c13v7MhnmHnJaYjibXaS9x260nY4X7jm7aRJHYua04d +2UACX9znfxytJJFRN3QwQICEa02nitI8JVGoVF0jXIiEhxZVn1eekUQp4wIe +DwkSpl1kImb7JLEvFV0TNpHwIDpk1YYxSYRzExW9CiTEXKvNVJmSRNfGv6Gb +FUngeetcfYBTCh/4vBZtUCJhk38Kx1tFKRwXDpRs3EqCe/j82RfHpHDSgCtd +VJ8EuStGEhOnpLAgIcZDg0FS9TtfuipNCh/PXsuyZJIQ/XvzS6MCKXRPOup0 +CEi49I/7xsoXUuiUM7giZTsJboXFRd3dUmiTdNXyrDEJ9KeL2nNvpdDuTALX +KRMSWNwZrqrzUmj8q+TFITMSXlx4mlMoKY0baCd6xSxJyLgruLVpkzRKkXea +flN2fePV+HarNGYWtssPWJEwLvJ7TNxUGtO2zDmfsyGBK1dNMT1YGg9ZP4t+ +akeCXlnWvZh6aVRbrArOcCbBuKf9z1SLNNr/8Z/b6kKCDcdyM49OaXTeU3m4 +jbLPruA++CCNze4Tjr92k2B6jBYbt4LAvnDRnm1uJDxfV5Ovw03gy0eRSpWU +dxY4tUzzEaj3+WUMYy8Je9qSN3iJEJhQpCyp505CiPRCvuEWAm+Nd9hv8CRh +/m5ayw9VAl9PGxTEUo7eseULW4PADELt+wTlU4c9tegGBNqOBtx66EUC98pf +rv1GBN4xlV4p7k1CWval2HQzAr0itgREU85uetbCaUfgUa7NJmo+JEi7+H6p +ciQwTCq5NpFyweTShlBXAgVi5Q36KZdv1Nzz3odAxRvfXI/uI0HjTkfs1f0E +ii9kLTZSrjIIKLAPIrD0sf9Nbl8Smv1zvjRFECjy66DwBcrmv3X5jx8jsO2J +1McOyu1pXVoacQQOdU03rvUjoa9yTVzBGQK7AmZvR1N2tykocEsl0HVjUUUp +5bFRg1bBDAKTTY93DlGeWhvGf+oagbn2OUaa/iSE5vJpM28SCEuhV9woL2rc +3jNfSODfjmMc8ZRjWrfHld4hcPjQ8Zg8ylzuwwW+5QSuZTD4H1FO+na0VfIe +gR7GJ2sGKfOdFph685DAQQuhmHnKGeJl/Km1BGo2NTiv3U+CCGuHtmkjgead +FhZSlK8bv9/z9wn1PdYxTiqU6X0n4u4/J/BHldwJfcr/BokUBr8ksMqWp96E +sjLn3Vb5NwRGTv+RsKZMXraeGu4j8LDa0yt2lHW2jPNfGSZQ0E5TzZ5ybf1J +bdv3BB43FPrv/++NHCTdVo0TOH5dp/b/7Z+OP4irnyRwe/nBu6aUrU7sKoyc +ITAvIPYZg3Lnhi+tqgsEVoYYc6lRdi46PfXfTwL9eVPcCcqDenSB3CUCN2kr +DPFS9u6o0XZZTsOrqZ9jF6nx/+fj7LZ+DQ3/7L1t9pZy4OJMXAsvDfMzNTUf +U9Y77Cf0kZ+GzesECwsor57oL+YSoWF484raOMrd3raGNEkaOpqKx+ymXDjQ +1G1Ap+HFtX6fVCiHOegEum2ioVjI4hIHZaO2kmXRSjR8fu9DYwc138N1l5Qq +tKj+nOi7fCiXaHM3durTMPPWNUKBcjQrxnkaadhR9zTnE7W+hPL8T26xpOHh +vvP3vCmPiQ0Km++k4f0+dysxymTGzlI/RxruzTTKaqfWr+0p3d6bHjQ06K9w +UqYs9bc0qH4fDRMtYlp7qPU/GUHnGjpAwyq7tvkYykn716qIhNEwNjA6tona +Tw2WQ/+kJtGw2D4nQo7af6nNdqIl52hY/0P2TQW1P92YT8pa02lo/Yi5YET5 +h0p53/LrNHQfrUuw9yBhG3+86jE2DUfe7Ji1pvKAI3m+OfM+DT3FixObqbxo +5wpwvV9NQ27N0Q/alA/O7zo185iG/iqxPBv3UPu1V3bAv5+GnMtDxW9TeXTE +Livk1AgN29eGq6ykjM94V+aP0TBS+ZGQJ5VnQ9ULasNTVH1clgVyO1H1ymlJ +dOCiI+/HDgtde6pewkyJI6vpGN77fPOJXVS90tjs87x0NJar/K+Wykfbk9mD +z4Tp2PHZfIXWTqoevoHbDJXo2LRw7ROHNTW+LeuHlR3pGHyCEchpSsLCdbF4 +dVc6qkK5siiV33Pr5GR1Peh4OlPvrxKV71OzugHGB+hYOOT7ytKIhNFqnwXX +E3Q0zK3z8jMg4ZnlA76kQjreF+PXW69FrffaR+xzd+gomyUfs6hB5Y3qC4eM +cjo2fmgZG1InoU7gXfaNSjpu4LwjlUudT+QA96aKNjoeIQv9OZWp/DvoDqPz +VH/3WX4gQ8KVof2j//2k4+4brgd+0ki4aBt66ssSHRn2+XkkQc2netLzxTUy ++DZ5c52YFAknf7Gd10nJYNyW1zWtItR8JK8IYZjKoPq9isV8XhIYxSW5ly/L +4KFu09O75tkwQBTnmFyVwVWlHWTnLBuiL9++MZcjgwc20y7v/MaGB/FF13bd +lsEmhfAkk6/U+e+Sm8lXI4NRAU56gp/YsHnFxbTEdzJo5v70qckgdd/xOBYX +oSSLg2JchssesaGiKypWbqss3t26OVGvng0OFkdjujRlUXz6cNFh6n6Srhl+ +fBvIopnt5+N9lWzg5Tl0dMpOFp995Ll5nmTD8krvEL9IWbQPDm66TN13Zvgt +PJ0aZfG2+40DIgls6A2kvwx4KovJl3yE38ezoeHJT4h9IYvcYikBxbFsSIsu +lv63WxY1tk+t1DzGBrVRnpEfE7J4JdjVUOkIG4LZHXuvC8ihnP671SUebJiw +ddwztk8Oy1YfsPulw4axFE+nI6vksYYez6X8gQXBE0p0NR55FMiaeXF1lAXf +zX58+bJeHvf66g2tfssCbq70UwfE5DFMzrpnqJ8FalFN9zyV5dGB08Qh9CUL +TvjKC9jay2OPl3KSdTULhAwmO7bkyOO54cdpT8+zwPxrpPkHrU2Yf0ydT0SD +BZM+q0PvxSqgQ1vSfHpFGfV/Isx5unEzRj6U4DR6XwL8bfKprK+KyLn4+Biv +cDFIJJXv1NJSQv3tvRKEwG3I3KK7XsBfGdN/OjrtV7wFz8QMNWcvqKCvZviA +gVUh6Ek0pql2q6JoO8fsT+t84OPKC/M6qYbiVpbxrNibIBUvzdgtvxWz8vfx +5xjkwBo5t/u7nm7FCwmpklyNV0GFKVoeuXcbvrFhSp++lwlHhvmbLDjUsfh3 +vqv0zUvwdTbF0TxTHdvDxp/3/04HM9Un2ebKGiivFFrdeT0N6mb1f31v18CD +u8+K16SnQLDStv5XvprYZTtCaypOAubUvq7da7TQVOdCIG08AUxkRax587TQ +7PMVa6/2eFCIO3u0UVsbz7ZnDGsbxYCir269XL82Pm4l+B6oR4Fv3f6Ee4d1 +ML1on7sTEQ71uV37ZjbqYlDMlqHzzodh7t+l76oPdLHBJ75DzzcQfOSK12Rb +6+HPWKUPzGB/iH7sHiC/Uw8Llv3OjHT1hzRf/ufkLj286hlaWG/qDzWFUSnP +nfXw8t/JW9HS/iAov2PdHy89fLI1O+TqKz94Iv9B0DNCD1cp2q6I1/EDRQVp +Qj5HDyv27PEqWO8LM4oZWuS0Hq4pndx9adwbel+gicCsHs6NaIwy+7yhIXjK +PmxeDw9oLOrMtHpDKml+WOunHkoO5+keLfYGRT2OkioufTzOPTS08pA3eJsH +0ZqE9DF0xOwgbdELuvzNeLoY+ngzKP4Vjd8LHhb8ejefpI+2zJqm9S3uoLU9 +7LtFsj66qsYPTpa5Q8W7SZ7cc/r4wWtyqv+SO5BSw9oW6fro+Gy4e9LHHUoy +G87duKqPV5jbzn/kcIfclFO6ZmX6KO2SnKpgsBfOhK27kPlaH897+3LkPN4D +rsYyqC/FQIuPZ5JkV+6GP12r+ZoIBg6L0CX3f3WBXN+pAQsZBgq+2jBR2+sC +HxMrI10VGPjidMHvnGIXONJqWx61jYEDHol3Gbtc4KzNcamHpgw8/Pf9TFue +M1S5vPmtcYiBwunviD87nUA86HSlSgMDo0o93q8dsYfUJT/N5EYGft4X1VLX +Zg+c6abs/5oZSD4YXBdbYw8T91fczm1lYOA1Mm9Ttj1UcSRk8r9mYP7Y6Adh +J3twvRgXufCBgW63eF2DXu6CzOoozbq1TJTXcEpltdvBRu5AtrUzE22ClHZc +HLGFgu0noqd3M9HPMCqyv94Wtp1I3Z7hxsSobPp7Rq4t2Eyz3vR6MfFG/h9R +Jy9bSOye/+ETyERR5SJ2z5gNLObFGkXHM/HKRed1K2asoV8/43VRMRMH42c0 +IyWtYH94wTXzMiaOtRj7SSyzgoWyCt9JFhM/DZYwB8YsgZ/e+33rfSbOtWql +F5ZYguVqSYnaBiaOTCj8G8C0hJquon2v3zCxs+Xv3kIfC7Dge6gc0cvE1ozk +JwM7LKDXrHVBZICJyX6h1xVVLGCu6nOS+1sm3ldsMN/wwxyUb6qVfppgoumn +tkSONHOo6TeMSPnCxPoZT6vFcHOwELQH1WlqvLKO46vczMHvdPirsHkmatPR +JVjBHOYaErOFF5l41bpp5WM+czj584pP1U/Kbg2oPr8D1mvcVtr7h4lpRtmz +Dwd2wI2gqvmlJSZ6BNXzODXugP8BI/EQhQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07190437247237852}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07190437247237852}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Line[CompressedData[" +1:eJwV13k0Vd0bB3DRKFTIPJx7DUmmMnOv5yFD5mRMMoYSUqaoDL2SIokGNJCp +t0z3nlKZhYoKJZmHknoliQxp9Du/v876rLP22mc/e+/v3ofmfWiXLycHBwex +jIPj/8+F4dZm2eQCA93uz9mB0UYGXTdEogx7T4JF52EFw1kCcGOHt0hvOhjr +C+iIzapBxM47PVy9eeDzoKBj6RvChinh9B89JCSHlvV3f9sJIzU2h+Z6GmGP +zB0P+2+eYCo7MTTT0wk11S7NjtMh8KNH+9J0zyjs9ymsOzAeB03bbxW8ypuF +dztDCvqjLoDESOVHb6U/kHjQgTySlwWCgR53Vm3nQsmJQgHIy4X0rabVNo6r +UfhsL9PzZAH0Zao1zKznxSfhYjXzr29BckFsB6foBkxYMTeuw1sMwhffn8m4 +LoBna60efHtRCiJbKhIWiwQw89zGWO/uUhBrTIzdyxJAQsRW+sVIKUhNbw7f +1CSA6/QdxlK+lYKcVYhn9bgA6qUPeDQLl4H68j9a79UF8cSXQElurzKwDRMa +2/ZMEAt78uQ+TZXBaQdzg86FjVhi+OhL/fdyELvXLsa5TAgL9U3ZMhwsKBNw ++L51rRAuDDrc8VnOgu5Od9YFaSHkTq1z6uVhgaxdGN1uB/U+0ubcRUkWNFrn +rHyZJYST/0SJuRiw4I/pfHsbQxhfhreYrznBgrSi6OI/psJovVlYtiuOar+S +I0nZThg/MN22XU1ggdVjbsNzvsLY2/H6k2QKC7K3E3etUoVRp2V93Xw2C3TQ +8srzEWE0H9Nsm3rAglDdmx6tJ0Ww/tAdtxVfWWCRyzdnmSKCApPX+aS+sYC+ +6nhS+yURzPEQCVKfZ8HLLif2639FMJQMUnX4xQKVEB6u4XYRrA3wawlaxYbx +osiib2KiOPArxGSZNBvcBG2+iN8VReHZxCO3Ldmgfqw6/kaNKKYo/yx3tmED +96iCEO2JKG43cczmtGNDZTkXyPeJYlbkxggbJzYIWVamqS2JYuusjlWdJxte +xstqmFiKYVyx+dm/YWww/vozOvi9GOZphTM5r7IhasdFxUeTYqh2ReCb3nU2 +lN1U7hdYEEOHJxJRITlsEHHw1K1cLY5r7XWWXuWzYfLh4+9cKuIoutNkJriE +DRkn08Kyjoqjdavp9fW1bBjdKB/czCuBHI5HWucG2CB8qF5SWFgCsyM4DVqG +2GDV4tJ2gJDACDnOc5kjbLgfnay0Tl0CxQzOVau+Z8PZkemJ3S4SeDqr3Edn +gg3bblf7f82TQBmj+c13v7MhnmHnJaYjibXaS9x260nY4X7jm7aRJHYua04d +2UACX9znfxytJJFRN3QwQICEa02nitI8JVGoVF0jXIiEhxZVn1eekUQp4wIe +DwkSpl1kImb7JLEvFV0TNpHwIDpk1YYxSYRzExW9CiTEXKvNVJmSRNfGv6Gb +FUngeetcfYBTCh/4vBZtUCJhk38Kx1tFKRwXDpRs3EqCe/j82RfHpHDSgCtd +VJ8EuStGEhOnpLAgIcZDg0FS9TtfuipNCh/PXsuyZJIQ/XvzS6MCKXRPOup0 +CEi49I/7xsoXUuiUM7giZTsJboXFRd3dUmiTdNXyrDEJ9KeL2nNvpdDuTALX +KRMSWNwZrqrzUmj8q+TFITMSXlx4mlMoKY0baCd6xSxJyLgruLVpkzRKkXea +flN2fePV+HarNGYWtssPWJEwLvJ7TNxUGtO2zDmfsyGBK1dNMT1YGg9ZP4t+ +akeCXlnWvZh6aVRbrArOcCbBuKf9z1SLNNr/8Z/b6kKCDcdyM49OaXTeU3m4 +jbLPruA++CCNze4Tjr92k2B6jBYbt4LAvnDRnm1uJDxfV5Ovw03gy0eRSpWU +dxY4tUzzEaj3+WUMYy8Je9qSN3iJEJhQpCyp505CiPRCvuEWAm+Nd9hv8CRh +/m5ayw9VAl9PGxTEUo7eseULW4PADELt+wTlU4c9tegGBNqOBtx66EUC98pf +rv1GBN4xlV4p7k1CWval2HQzAr0itgREU85uetbCaUfgUa7NJmo+JEi7+H6p +ciQwTCq5NpFyweTShlBXAgVi5Q36KZdv1Nzz3odAxRvfXI/uI0HjTkfs1f0E +ii9kLTZSrjIIKLAPIrD0sf9Nbl8Smv1zvjRFECjy66DwBcrmv3X5jx8jsO2J +1McOyu1pXVoacQQOdU03rvUjoa9yTVzBGQK7AmZvR1N2tykocEsl0HVjUUUp +5bFRg1bBDAKTTY93DlGeWhvGf+oagbn2OUaa/iSE5vJpM28SCEuhV9woL2rc +3jNfSODfjmMc8ZRjWrfHld4hcPjQ8Zg8ylzuwwW+5QSuZTD4H1FO+na0VfIe +gR7GJ2sGKfOdFph685DAQQuhmHnKGeJl/Km1BGo2NTiv3U+CCGuHtmkjgead +FhZSlK8bv9/z9wn1PdYxTiqU6X0n4u4/J/BHldwJfcr/BokUBr8ksMqWp96E +sjLn3Vb5NwRGTv+RsKZMXraeGu4j8LDa0yt2lHW2jPNfGSZQ0E5TzZ5ybf1J +bdv3BB43FPrv/++NHCTdVo0TOH5dp/b/7Z+OP4irnyRwe/nBu6aUrU7sKoyc +ITAvIPYZg3Lnhi+tqgsEVoYYc6lRdi46PfXfTwL9eVPcCcqDenSB3CUCN2kr +DPFS9u6o0XZZTsOrqZ9jF6nx/+fj7LZ+DQ3/7L1t9pZy4OJMXAsvDfMzNTUf +U9Y77Cf0kZ+GzesECwsor57oL+YSoWF484raOMrd3raGNEkaOpqKx+ymXDjQ +1G1Ap+HFtX6fVCiHOegEum2ioVjI4hIHZaO2kmXRSjR8fu9DYwc138N1l5Qq +tKj+nOi7fCiXaHM3durTMPPWNUKBcjQrxnkaadhR9zTnE7W+hPL8T26xpOHh +vvP3vCmPiQ0Km++k4f0+dysxymTGzlI/RxruzTTKaqfWr+0p3d6bHjQ06K9w +UqYs9bc0qH4fDRMtYlp7qPU/GUHnGjpAwyq7tvkYykn716qIhNEwNjA6tona +Tw2WQ/+kJtGw2D4nQo7af6nNdqIl52hY/0P2TQW1P92YT8pa02lo/Yi5YET5 +h0p53/LrNHQfrUuw9yBhG3+86jE2DUfe7Ji1pvKAI3m+OfM+DT3FixObqbxo +5wpwvV9NQ27N0Q/alA/O7zo185iG/iqxPBv3UPu1V3bAv5+GnMtDxW9TeXTE +Livk1AgN29eGq6ykjM94V+aP0TBS+ZGQJ5VnQ9ULasNTVH1clgVyO1H1ymlJ +dOCiI+/HDgtde6pewkyJI6vpGN77fPOJXVS90tjs87x0NJar/K+Wykfbk9mD +z4Tp2PHZfIXWTqoevoHbDJXo2LRw7ROHNTW+LeuHlR3pGHyCEchpSsLCdbF4 +dVc6qkK5siiV33Pr5GR1Peh4OlPvrxKV71OzugHGB+hYOOT7ytKIhNFqnwXX +E3Q0zK3z8jMg4ZnlA76kQjreF+PXW69FrffaR+xzd+gomyUfs6hB5Y3qC4eM +cjo2fmgZG1InoU7gXfaNSjpu4LwjlUudT+QA96aKNjoeIQv9OZWp/DvoDqPz +VH/3WX4gQ8KVof2j//2k4+4brgd+0ki4aBt66ssSHRn2+XkkQc2netLzxTUy ++DZ5c52YFAknf7Gd10nJYNyW1zWtItR8JK8IYZjKoPq9isV8XhIYxSW5ly/L +4KFu09O75tkwQBTnmFyVwVWlHWTnLBuiL9++MZcjgwc20y7v/MaGB/FF13bd +lsEmhfAkk6/U+e+Sm8lXI4NRAU56gp/YsHnFxbTEdzJo5v70qckgdd/xOBYX +oSSLg2JchssesaGiKypWbqss3t26OVGvng0OFkdjujRlUXz6cNFh6n6Srhl+ +fBvIopnt5+N9lWzg5Tl0dMpOFp995Ll5nmTD8krvEL9IWbQPDm66TN13Zvgt +PJ0aZfG2+40DIgls6A2kvwx4KovJl3yE38ezoeHJT4h9IYvcYikBxbFsSIsu +lv63WxY1tk+t1DzGBrVRnpEfE7J4JdjVUOkIG4LZHXuvC8ihnP671SUebJiw +ddwztk8Oy1YfsPulw4axFE+nI6vksYYez6X8gQXBE0p0NR55FMiaeXF1lAXf +zX58+bJeHvf66g2tfssCbq70UwfE5DFMzrpnqJ8FalFN9zyV5dGB08Qh9CUL +TvjKC9jay2OPl3KSdTULhAwmO7bkyOO54cdpT8+zwPxrpPkHrU2Yf0ydT0SD +BZM+q0PvxSqgQ1vSfHpFGfV/Isx5unEzRj6U4DR6XwL8bfKprK+KyLn4+Biv +cDFIJJXv1NJSQv3tvRKEwG3I3KK7XsBfGdN/OjrtV7wFz8QMNWcvqKCvZviA +gVUh6Ek0pql2q6JoO8fsT+t84OPKC/M6qYbiVpbxrNibIBUvzdgtvxWz8vfx +5xjkwBo5t/u7nm7FCwmpklyNV0GFKVoeuXcbvrFhSp++lwlHhvmbLDjUsfh3 +vqv0zUvwdTbF0TxTHdvDxp/3/04HM9Un2ebKGiivFFrdeT0N6mb1f31v18CD +u8+K16SnQLDStv5XvprYZTtCaypOAubUvq7da7TQVOdCIG08AUxkRax587TQ +7PMVa6/2eFCIO3u0UVsbz7ZnDGsbxYCir269XL82Pm4l+B6oR4Fv3f6Ee4d1 +ML1on7sTEQ71uV37ZjbqYlDMlqHzzodh7t+l76oPdLHBJ75DzzcQfOSK12Rb +6+HPWKUPzGB/iH7sHiC/Uw8Llv3OjHT1hzRf/ufkLj286hlaWG/qDzWFUSnP +nfXw8t/JW9HS/iAov2PdHy89fLI1O+TqKz94Iv9B0DNCD1cp2q6I1/EDRQVp +Qj5HDyv27PEqWO8LM4oZWuS0Hq4pndx9adwbel+gicCsHs6NaIwy+7yhIXjK +PmxeDw9oLOrMtHpDKml+WOunHkoO5+keLfYGRT2OkioufTzOPTS08pA3eJsH +0ZqE9DF0xOwgbdELuvzNeLoY+ngzKP4Vjd8LHhb8ejefpI+2zJqm9S3uoLU9 +7LtFsj66qsYPTpa5Q8W7SZ7cc/r4wWtyqv+SO5BSw9oW6fro+Gy4e9LHHUoy +G87duKqPV5jbzn/kcIfclFO6ZmX6KO2SnKpgsBfOhK27kPlaH897+3LkPN4D +rsYyqC/FQIuPZ5JkV+6GP12r+ZoIBg6L0CX3f3WBXN+pAQsZBgq+2jBR2+sC +HxMrI10VGPjidMHvnGIXONJqWx61jYEDHol3Gbtc4KzNcamHpgw8/Pf9TFue +M1S5vPmtcYiBwunviD87nUA86HSlSgMDo0o93q8dsYfUJT/N5EYGft4X1VLX +Zg+c6abs/5oZSD4YXBdbYw8T91fczm1lYOA1Mm9Ttj1UcSRk8r9mYP7Y6Adh +J3twvRgXufCBgW63eF2DXu6CzOoozbq1TJTXcEpltdvBRu5AtrUzE22ClHZc +HLGFgu0noqd3M9HPMCqyv94Wtp1I3Z7hxsSobPp7Rq4t2Eyz3vR6MfFG/h9R +Jy9bSOye/+ETyERR5SJ2z5gNLObFGkXHM/HKRed1K2asoV8/43VRMRMH42c0 +IyWtYH94wTXzMiaOtRj7SSyzgoWyCt9JFhM/DZYwB8YsgZ/e+33rfSbOtWql +F5ZYguVqSYnaBiaOTCj8G8C0hJquon2v3zCxs+Xv3kIfC7Dge6gc0cvE1ozk +JwM7LKDXrHVBZICJyX6h1xVVLGCu6nOS+1sm3ldsMN/wwxyUb6qVfppgoumn +tkSONHOo6TeMSPnCxPoZT6vFcHOwELQH1WlqvLKO46vczMHvdPirsHkmatPR +JVjBHOYaErOFF5l41bpp5WM+czj584pP1U/Kbg2oPr8D1mvcVtr7h4lpRtmz +Dwd2wI2gqvmlJSZ6BNXzODXugP8BI/EQhQ== + "]]}, "Charting`Private`Tag#1"]}}, {}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"InterpolatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30}, {0., 0.07190437247237852}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + Opacity[1.], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + Plot, "GroupHighlight" -> False|>|>, "DynamicHighlight"]], {{}, + InterpretationBox[{ + TagBox[ + TagBox[ + {RGBColor[0.24, 0.6, 0.8], PointSize[0.012833333333333334`], + AbsoluteThickness[2], PointBox[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, + Annotation[#, "Charting`Private`Tag#1"]& ], + {"WolframDynamicHighlight", <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>}], + StyleBox[ + DynamicBox[(Charting`HighlightActionBox["DynamicHighlight", {}, + Slot["HighlightElements"], + Slot["LayoutOptions"], + Slot["Meta"], + Charting`HighlightActionFunction["DynamicHighlight", {{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, + "Function" -> ListPlot, "GroupHighlight" -> False|>|>]]& )[<| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, + "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, + "AxesOrigin" -> {0, 0}, "ImageSize" -> {360, 360/GoldenRatio}, + "Axes" -> {True, True}, "LabelStyle" -> {}, "AspectRatio" -> + GoldenRatio^(-1), "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> + False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>], + ImageSizeCache->{{4.503599627370496*^15, -4.503599627370496*^15}, { + 4.503599627370496*^15, -4.503599627370496*^15}}], + Selectable->False]}, + Annotation[{{ + Annotation[{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]], + Point[CompressedData[" +1:eJxTTMoPSmViYGCQB2IQDQNvDvGfW95Xag/hfbDfuerNbqUf/VA+g0PzT+2U +dTyzoHwOh3cqSn+6FyyE8gUc5vxefbx29VIoX8ThtO+VS3e4VkL5Eg6HPwdt +NFy/GsqXcVjxz1HFuW8tlK/gsOn6bvt7q9dB+UoOC70tvojxr4fyVRxSXkse +MjwNk1dzOMcgnnL6E0y/hkNJrTyf0KI1UL6Ww0H5un/VH1ZB+ToOK57MueH8 +ewWUr+dgWu+TffnGMijfwGG749vtZYuWQPmGDpsWGGhczlgE5Rs5dC+5+yLZ +bgGUb+yQ9fVqaGPUHCjfxOGaVaFlXOMMKN/UQfIZS27RjylQvpmDwLMy/e8n +J0L55g48kXdfWb7shfItHDZ2nol58KkDyrd0sDvVwe2wuAXKt3KouWYaxfel +Acq3dti7ppN136JqKN/GIWXDo5DsxDIo39Zhupzv15R/hVC+nUPsr+lLjI7m +2AMAC+KPVw== + "]]}, "Charting`Private`Tag#1"]}}, <| + "HighlightElements" -> <| + "Label" -> {"XYLabel"}, "Ball" -> {"IndicatedBall"}|>, + "LayoutOptions" -> <| + "PanelPlotLayout" -> <||>, "PlotRange" -> {{0, 30.}, {0, 0.060662}}, + "Frame" -> {{False, False}, {False, False}}, "AxesOrigin" -> {0, 0}, + "ImageSize" -> {360, 360/GoldenRatio}, "Axes" -> {True, True}, + "LabelStyle" -> {}, "AspectRatio" -> GoldenRatio^(-1), + "DefaultStyle" -> { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.24, 0.6, 0.8], + AbsoluteThickness[2]]}, + "HighlightLabelingFunctions" -> <|"CoordinatesToolOptions" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), + "ScalingFunctions" -> {{Identity, Identity}, { + Identity, Identity}}|>, "Primitives" -> {}, "GCFlag" -> False|>, + "Meta" -> <| + "DefaultHighlight" -> {"Dynamic", None}, "Index" -> {}, "Function" -> + ListPlot, "GroupHighlight" -> False|>|>, + "DynamicHighlight"]], {{}, {}}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DefaultBaseStyle->{"PlotGraphics", "Graphics"}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotInteractivity:>True, + PlotRange->{{0, 30}, {0., 0.07190437247237852}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.9943893146102324`*^9}, + CellLabel-> + "Out[141]=",ExpressionUUID->"49f6e09d-497f-4aec-861a-356be647a0c2"] +}, Open ]], Cell[CellGroupData[{ @@ -13760,18 +14875,78 @@ Cell[BoxData[ RowBox[{"(", FractionBox["1", "Cb"], ")"}]}]], RowBox[{"\[DifferentialD]", "y"}], - RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input",Expression\ -UUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], + RowBox[{"\[DifferentialD]", "x"}]}]}]}], "//", "N"}]], "Input", + CellLabel-> + "In[142]:=",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.9612368060048046`*^-157\\\", \ +RowBox[{\\\"\ +164243120455479739170682508554789627978361849045564433400431439697434\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"15\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"3832218553116351696319446492554724542670438400000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 73, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389314636675*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"575e9580-e880-4ed1-9044-4faf67da4486"], -Cell[BoxData["15.784298544249628`"], "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.313230198656396`*^-160\\\", \ +RowBox[{\\\"\ +552513857212233842570175958778312308519209260189278753959051363142168\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"18\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1583212683407106418618000954093361543354777600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 74, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389314641738*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"f1b4696c-c394-4381-abc3-9a02888d4479"], + +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"9.533319012741084`*^-163\\\", \ +RowBox[{\\\"\ +192330073695578600598678251250730514595536743471887934253145779509789\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"22\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"1163350940137443209261321198991532417980825600000000000000000000000000\\\"\ +}]]\\) is too small to represent as a normalized machine number; precision \ +may be lost.\"", 2, 142, 75, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389314646193*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"85721fce-76c5-4fcf-b2b0-d78a4c85fcee"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 142, 76, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389314649972*^9}, + CellLabel-> + "During evaluation of \ +In[142]:=",ExpressionUUID->"92a749c1-3994-4cae-a441-708b2caffa1f"], + +Cell[BoxData["10.364158040687242`"], "Output", + CellChangeTimes->{3.994389346778146*^9}, + CellLabel-> + "Out[142]=",ExpressionUUID->"d150c11d-62a0-47ae-9997-9cca99ef2af6"] }, Open ]], Cell[CellGroupData[{ @@ -13838,27 +15013,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.991850391956293*^9, - 3.9918503966918755`*^9}},ExpressionUUID->"a3e3d205-e3b4-874a-a36c-\ -53cfa72184b4"], + CellChangeTimes->{{3.991850391956293*^9, 3.9918503966918755`*^9}}, + CellLabel-> + "In[143]:=",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.567632504163568`*^-206\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 143, 77, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389346807167*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"c08aec8f-6323-4e9b-95cd-d9efaf788acd"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2044795699389167`*^-210\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 143, 78, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389346811816*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"8233014d-4c06-4c5b-8e25-69c06795bfa8"], -Cell[BoxData["1.0713232818739324`"], "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6057234081368114`*^-215\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 143, 79, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389346816349*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"8c95075c-4098-4b4a-af93-331ba6d11263"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 143, 80, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389346819894*^9}, + CellLabel-> + "During evaluation of \ +In[143]:=",ExpressionUUID->"39439b17-ef5e-4750-823d-d76f9e0e7f95"], + +Cell[BoxData["0.6880642435072516`"], "Output", + CellChangeTimes->{3.99438935162628*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"dd04fab9-6dbf-4957-b622-b4418905f51c"] }, Open ]], Cell[CellGroupData[{ @@ -13879,8 +15099,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"x", "-", "J1"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -13925,27 +15144,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504007528324`*^9, - 3.991850403970867*^9}},ExpressionUUID->"6977f025-454e-0e4a-b118-\ -07bad9ba3e82"], + CellChangeTimes->{{3.9918504007528324`*^9, 3.991850403970867*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"566a849f-fc85-4d42-a545-a46d44cf7346"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.567632504163568`*^-206\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 144, 81, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389351659856*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"7471a42e-27e4-4e56-9f30-34d3059a156a"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2044795699389167`*^-210\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 144, 82, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389351665699*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"97cd2fa1-80c6-4b87-923a-91ddbe7acb90"], -Cell[BoxData["5.515504100347031`"], "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6057234081368114`*^-215\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 144, 83, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389351670229*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"007ff6fd-2594-4f5a-adcb-52917cd0b6bb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 144, 84, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943893516740513`*^9}, + CellLabel-> + "During evaluation of \ +In[144]:=",ExpressionUUID->"c30edba5-7a22-47e1-ac16-885234a55753"], + +Cell[BoxData["30.539248391344582`"], "Output", + CellChangeTimes->{3.994389356444291*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"2e27c3ac-8317-4859-a43f-21baf6197282"] }, Open ]], Cell[CellGroupData[{ @@ -13966,8 +15230,7 @@ Cell[BoxData[ RowBox[{"4", "x", "*", SuperscriptBox[ RowBox[{"(", - RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", - "*", + RowBox[{"y", "-", "J2"}], ")"}], "2"], "*", "y", "*", "\[Pi]", "*", RowBox[{"(", RowBox[{ UnderoverscriptBox["\[Sum]", @@ -14012,27 +15275,72 @@ Cell[BoxData[ RowBox[{"h2", "*", "h2"}], "Cb"]}], ")"}]}]], RowBox[{"\[DifferentialD]", "x"}]}]}], ")"}], RowBox[{"\[DifferentialD]", "y"}]}]}], "//", "N"}]}]], "Input", - CellChangeTimes->{{3.9918504078476295`*^9, - 3.9918504110344543`*^9}},ExpressionUUID->"df8ecb01-788a-604d-b773-\ -f29bb610eb30"], + CellChangeTimes->{{3.9918504078476295`*^9, 3.9918504110344543`*^9}}, + CellLabel-> + "In[145]:=",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"5.567632504163568`*^-206\\\", \ +\\\"70664077653282593719130316304552102974276464146933733723514431922715281192\ +32188628582006784000000000000000000\\\"]\\) is too small to represent as a \ +normalized machine number; precision may be lost.\"", 2, 145, 85, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389356475944*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"391a746a-ea22-4c64-96d2-a91661234557"], Cell[BoxData[ - RowBox[{ - RowBox[{"Integrate", "::", "\<\"gener\"\>"}], ":", - " ", "\<\"Unable to check convergence. \\!\\(\\*ButtonBox[\\\"More\ -\[Ellipsis]\\\", ButtonStyle->\\\"RefGuideLinkText\\\", ButtonFrame->None, \ -ButtonData:>\\\"Integrate::gener\\\"]\\)\"\>"}]], "Message",ExpressionUUID->\ -"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"1.2044795699389167`*^-210\\\", \ +\\\"14309475724789725228123889051671800852290983989754081079011672464349844441\ +445181972878563737600000000000000000000\\\"]\\) is too small to represent as \ +a normalized machine number; precision may be lost.\"", 2, 145, 86, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389356481391*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"7ce9bbda-2846-4e75-9dfd-a8cc52d8baf0"], -Cell[BoxData["17.107550304528036`"], "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[BoxData[ + TemplateBox[{ + "General", "munfl", + "\"\\!\\(\\*FractionBox[\\\"2.6057234081368114`*^-215\\\", \ +\\\"30278850633655058582710149233337530603447722122319635563188698934564270838\ +098005054611040868761600000000000000000000\\\"]\\) is too small to represent \ +as a normalized machine number; precision may be lost.\"", 2, 145, 87, + 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.9943893564858227`*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"238cefcc-fe8b-4f58-8e45-5bde63c96522"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \ +\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \ +during this calculation.\"", 2, 145, 88, 25994214061301454212, "Local"}, + "MessageTemplate", + BaseStyle->"MSG"]], "Message", + CellChangeTimes->{3.994389356489482*^9}, + CellLabel-> + "During evaluation of \ +In[145]:=",ExpressionUUID->"3ded6875-7194-4d68-8f45-e2a57fe67689"], + +Cell[BoxData["4.863991193181468`"], "Output", + CellChangeTimes->{3.9943893590740767`*^9}, + CellLabel-> + "Out[145]=",ExpressionUUID->"ef64c454-ed51-4e99-badc-fc822178d9c1"] }, Open ]], Cell[CellGroupData[{ @@ -14041,18 +15349,23 @@ Cell[BoxData[ FractionBox["q", SqrtBox[ RowBox[{"S1", "*", "S2"}]]]], "Input", - CellChangeTimes->{{3.9918504490520267`*^9, - 3.991850453720993*^9}},ExpressionUUID->"54a5e329-20bd-e742-afe8-\ -d2cfa007cfcf"], + CellChangeTimes->{{3.9918504490520267`*^9, 3.991850453720993*^9}}, + CellLabel-> + "In[146]:=",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[BoxData["0.11028946354837708`"], "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[BoxData["0.0564551320302632`"], "Output", + CellChangeTimes->{3.9943893591063967`*^9}, + CellLabel-> + "Out[146]=",ExpressionUUID->"929a0737-d31d-4e31-ba5b-b793b6ec166f"] }, Open ]], Cell[BoxData[ - RowBox[{"NotebookSave", "[", "]"}]], "Input",ExpressionUUID->"1b4ac5f6-8121-4c51-89ab-64c8cf1fc657"] + RowBox[{"NotebookSave", "[", "]"}]], "Input", + CellLabel-> + "In[147]:=",ExpressionUUID->"1b4ac5f6-8121-4c51-89ab-64c8cf1fc657"] }, -WindowSize->{1440, 882}, -WindowMargins->{{0, Automatic}, {0, Automatic}}, +WindowSize->{714, 126}, +WindowMargins->{{Automatic, 3}, {Automatic, 15}}, CellContext->Notebook, FrontEndVersion->"15.0 for Linux x86 (64-bit) (July 2, 2026)", StyleDefinitions->"Default.nb", @@ -14070,613 +15383,642 @@ CellTagsIndex->{} (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ -Cell[576, 22, 354, 7, 36, "Input",ExpressionUUID->"6e9d2cf0-00ee-4f0e-8e5b-9242c475e79c"], -Cell[933, 31, 260, 5, 41, "Output",ExpressionUUID->"e457dc03-fcb8-4a7c-a166-73d91a0dbdd3"] +Cell[576, 22, 349, 6, 29, "Input",ExpressionUUID->"6e9d2cf0-00ee-4f0e-8e5b-9242c475e79c"], +Cell[928, 30, 277, 4, 33, "Output",ExpressionUUID->"b2b1f75d-5844-43da-af35-f5bed89cfeb2"] }, Open ]], Cell[CellGroupData[{ -Cell[1230, 41, 253, 5, 36, "Input",ExpressionUUID->"27aa517b-56e2-4abb-ae00-7a6d2a33e13b"], -Cell[1486, 48, 260, 5, 41, "Output",ExpressionUUID->"579f74ae-7b7c-4300-8684-44502a3514c1"] +Cell[1242, 39, 248, 4, 29, "Input",ExpressionUUID->"27aa517b-56e2-4abb-ae00-7a6d2a33e13b"], +Cell[1493, 45, 279, 4, 33, "Output",ExpressionUUID->"15b5be45-c537-4ba3-a4b0-73c7fe9873ca"] }, Open ]], Cell[CellGroupData[{ -Cell[1783, 58, 226, 5, 36, "Input",ExpressionUUID->"a849ff4a-a876-4d0b-831b-7e9882291835"], -Cell[2012, 65, 260, 5, 41, "Output",ExpressionUUID->"f6f4fda0-377b-48ae-a732-d69f1fe9b41d"] +Cell[1809, 54, 221, 4, 29, "Input",ExpressionUUID->"a849ff4a-a876-4d0b-831b-7e9882291835"], +Cell[2033, 60, 277, 4, 33, "Output",ExpressionUUID->"f8a702c5-a5a2-4410-8e8c-7b98eb4d9139"] }, Open ]], Cell[CellGroupData[{ -Cell[2309, 75, 180, 4, 55, "Input",ExpressionUUID->"4c2db3ec-5cae-4038-9eb8-24f56937fb08"], -Cell[2492, 81, 260, 5, 62, "Output",ExpressionUUID->"223f5d75-5ce6-4cf2-9da9-7572ccdf678e"] +Cell[2347, 69, 175, 3, 29, "Input",ExpressionUUID->"4c2db3ec-5cae-4038-9eb8-24f56937fb08"], +Cell[2525, 74, 277, 4, 33, "Output",ExpressionUUID->"4e6500fb-5bb2-400d-bea9-892a9179d5bc"] }, Open ]], Cell[CellGroupData[{ -Cell[2789, 91, 262, 8, 81, "Input",ExpressionUUID->"170c42eb-2134-43c1-8ba3-d31b040620e5"], -Cell[3054, 101, 273, 5, 62, "Output",ExpressionUUID->"3c996d3c-44d1-4f16-bdaf-5bf37777674f"] +Cell[2839, 83, 257, 7, 42, "Input",ExpressionUUID->"170c42eb-2134-43c1-8ba3-d31b040620e5"], +Cell[3099, 92, 290, 4, 33, "Output",ExpressionUUID->"c4a6216c-c653-45f0-82d5-dcb8c1a47b0a"] }, Open ]], Cell[CellGroupData[{ -Cell[3364, 111, 136, 3, 55, "Input",ExpressionUUID->"b046e8b3-f143-47d7-a097-9ebca1037a17"], -Cell[3503, 116, 259, 5, 62, "Output",ExpressionUUID->"ef89d33c-1d36-4760-abcf-9b53fd3d50a0"] +Cell[3426, 101, 131, 2, 29, "Input",ExpressionUUID->"b046e8b3-f143-47d7-a097-9ebca1037a17"], +Cell[3560, 105, 276, 4, 33, "Output",ExpressionUUID->"f914a28e-dfef-45e7-8a26-42d8b238ac30"] }, Open ]], Cell[CellGroupData[{ -Cell[3799, 126, 281, 7, 55, "Input",ExpressionUUID->"50aeb670-dc5a-4a12-9b52-81fac8b9f41c"], -Cell[4083, 135, 273, 5, 62, "Output",ExpressionUUID->"99930466-a0ea-422d-ab2c-da33de944708"] +Cell[3873, 114, 276, 6, 29, "Input",ExpressionUUID->"50aeb670-dc5a-4a12-9b52-81fac8b9f41c"], +Cell[4152, 122, 289, 4, 33, "Output",ExpressionUUID->"855d9fba-db27-4c9e-9238-1d3804abd351"] }, Open ]], Cell[CellGroupData[{ -Cell[4393, 145, 262, 8, 55, "Input",ExpressionUUID->"115220db-80b7-4eb9-96ee-49886df5501d"], -Cell[4658, 155, 273, 5, 62, "Output",ExpressionUUID->"f431189b-cb74-4006-806b-e8d273612c45"] +Cell[4478, 131, 257, 7, 29, "Input",ExpressionUUID->"115220db-80b7-4eb9-96ee-49886df5501d"], +Cell[4738, 140, 292, 4, 33, "Output",ExpressionUUID->"45566ed7-fba4-401c-a3cd-8afe03199933"] }, Open ]], Cell[CellGroupData[{ -Cell[4968, 165, 209, 4, 55, "Input",ExpressionUUID->"bbf05b3f-c273-4afa-802c-568b9976c2fc"], -Cell[5180, 171, 237, 4, 62, "Output",ExpressionUUID->"4db30534-7fc5-47e7-8cd6-53bf4d6653c8"] +Cell[5067, 149, 204, 3, 29, "Input",ExpressionUUID->"bbf05b3f-c273-4afa-802c-568b9976c2fc"], +Cell[5274, 154, 255, 3, 33, "Output",ExpressionUUID->"56324569-60ec-417b-875b-11eba82c734d"] }, Open ]], Cell[CellGroupData[{ -Cell[5454, 180, 207, 4, 55, "Input",ExpressionUUID->"6899c230-5258-4539-ac8a-b78b0d4dee59"], -Cell[5664, 186, 238, 4, 62, "Output",ExpressionUUID->"57ab9cbc-f608-44a6-9cd2-a7b856f94f7a"] +Cell[5566, 162, 203, 3, 29, "Input",ExpressionUUID->"6899c230-5258-4539-ac8a-b78b0d4dee59"], +Cell[5772, 167, 257, 3, 33, "Output",ExpressionUUID->"23c7ca5f-84e1-4e3c-84e4-06dd1cbb933c"] }, Open ]], Cell[CellGroupData[{ -Cell[5939, 195, 133, 3, 55, "Input",ExpressionUUID->"4270bfa6-b1d5-4ef6-8bf7-252959edf5dd"], -Cell[6075, 200, 256, 5, 62, "Output",ExpressionUUID->"07f9d50a-e84f-439c-919b-8407f252db12"] +Cell[6066, 175, 129, 2, 29, "Input",ExpressionUUID->"4270bfa6-b1d5-4ef6-8bf7-252959edf5dd"], +Cell[6198, 179, 274, 4, 33, "Output",ExpressionUUID->"6c0ea07b-6783-4230-a79c-52e59f35842b"] }, Open ]], Cell[CellGroupData[{ -Cell[6368, 210, 133, 3, 55, "Input",ExpressionUUID->"12720705-24af-4497-b102-753b1a0d1ac7"], -Cell[6504, 215, 258, 5, 62, "Output",ExpressionUUID->"a1f851c2-f8b8-44c4-8f7e-74195eb1260a"] +Cell[6509, 188, 129, 2, 29, "Input",ExpressionUUID->"12720705-24af-4497-b102-753b1a0d1ac7"], +Cell[6641, 192, 276, 4, 33, "Output",ExpressionUUID->"257fe5ed-78ad-4ae4-bb4f-5c83c6aabde1"] }, Open ]], Cell[CellGroupData[{ -Cell[6799, 225, 561, 20, 148, "Input",ExpressionUUID->"9fc9f1da-df1d-498b-a62f-db1f9df85a6d"], -Cell[7363, 247, 270, 5, 62, "Output",ExpressionUUID->"0f732430-3602-4909-9f77-d0619b8819de"] +Cell[6954, 201, 557, 19, 79, "Input",ExpressionUUID->"9fc9f1da-df1d-498b-a62f-db1f9df85a6d"], +Cell[7514, 222, 290, 4, 33, "Output",ExpressionUUID->"41904cd6-8ad5-41bf-b1e6-8c208e9243b5"] }, Open ]], Cell[CellGroupData[{ -Cell[7670, 257, 561, 20, 148, "Input",ExpressionUUID->"5585d131-58c4-48c4-b947-7ec41c42fe45"], -Cell[8234, 279, 271, 5, 62, "Output",ExpressionUUID->"e6739ef0-fee7-4e30-8aab-f765be84c9ee"] +Cell[7841, 231, 557, 19, 79, "Input",ExpressionUUID->"5585d131-58c4-48c4-b947-7ec41c42fe45"], +Cell[8401, 252, 289, 4, 33, "Output",ExpressionUUID->"d56c3bb8-dc2c-43ff-8e99-d7423d6370ed"] }, Open ]], Cell[CellGroupData[{ -Cell[8542, 289, 1592, 51, 211, "Input",ExpressionUUID->"08644bf4-6392-4836-bf40-9e42a0d658e4"], -Cell[10137, 342, 272, 5, 62, "Output",ExpressionUUID->"b5e50f2b-5e2d-4838-a541-bb0cd7152e98"] +Cell[8727, 261, 1588, 50, 55, "Input",ExpressionUUID->"08644bf4-6392-4836-bf40-9e42a0d658e4"], +Cell[10318, 313, 290, 4, 33, "Output",ExpressionUUID->"8cc34b17-7146-4d52-b82c-21fc7d934054"] }, Open ]], Cell[CellGroupData[{ -Cell[10446, 352, 1426, 47, 211, "Input",ExpressionUUID->"47ba2188-3db0-41de-bc18-1b3e85ec939f"], -Cell[11875, 401, 290, 6, 62, "Output",ExpressionUUID->"5fb74cf0-0833-4e0b-bbef-44397dfe44d7"] +Cell[10645, 322, 1422, 46, 55, "Input",ExpressionUUID->"47ba2188-3db0-41de-bc18-1b3e85ec939f"], +Cell[12070, 370, 310, 5, 33, "Output",ExpressionUUID->"ccf4b74b-9ce1-4dde-b222-b5dad674aa87"] }, Open ]], Cell[CellGroupData[{ -Cell[12202, 412, 1426, 47, 211, "Input",ExpressionUUID->"e6af9243-eb2f-4712-90d7-5eed88baa561"], -Cell[13631, 461, 291, 6, 62, "Output",ExpressionUUID->"0a386678-b95b-43f7-aad6-e61b528eef1e"] +Cell[12417, 380, 1422, 46, 55, "Input",ExpressionUUID->"e6af9243-eb2f-4712-90d7-5eed88baa561"], +Cell[13842, 428, 309, 5, 33, "Output",ExpressionUUID->"db3fdb61-b3ce-48a2-9806-aac2b4aa8b9b"] }, Open ]], Cell[CellGroupData[{ -Cell[13959, 472, 1592, 51, 211, "Input",ExpressionUUID->"f2b1634d-e165-4492-8ed6-9995f0797abc"], -Cell[15554, 525, 269, 5, 62, "Output",ExpressionUUID->"1637a04e-2203-4c49-b1c7-44ad9d464870"] +Cell[14188, 438, 1588, 50, 55, "Input",ExpressionUUID->"f2b1634d-e165-4492-8ed6-9995f0797abc"], +Cell[15779, 490, 287, 4, 33, "Output",ExpressionUUID->"68cf8510-4f9f-449a-8e20-b1c5cf8096cd"] }, Open ]], Cell[CellGroupData[{ -Cell[15860, 535, 135, 3, 55, "Input",ExpressionUUID->"237ec570-91d2-4394-9bc8-e9c8ec8bc421"], -Cell[15998, 540, 258, 5, 62, "Output",ExpressionUUID->"45aac07f-e329-49d6-972f-7748f3e89ff8"] +Cell[16103, 499, 131, 2, 29, "Input",ExpressionUUID->"237ec570-91d2-4394-9bc8-e9c8ec8bc421"], +Cell[16237, 503, 276, 4, 33, "Output",ExpressionUUID->"547beb78-5721-41fa-ac3b-e62b6fde90e9"] }, Open ]], Cell[CellGroupData[{ -Cell[16293, 550, 137, 3, 55, "Input",ExpressionUUID->"f3026fcc-780f-4641-bc0c-b6ff4345e1a5"], -Cell[16433, 555, 255, 5, 62, "Output",ExpressionUUID->"09bd456b-7d48-445a-909a-86ff86137f28"] +Cell[16550, 512, 133, 2, 29, "Input",ExpressionUUID->"f3026fcc-780f-4641-bc0c-b6ff4345e1a5"], +Cell[16686, 516, 273, 4, 33, "Output",ExpressionUUID->"acbc58bb-ffc2-42b0-8f15-a794d428f39c"] }, Open ]], Cell[CellGroupData[{ -Cell[16725, 565, 138, 3, 55, "Input",ExpressionUUID->"eaea58ab-5391-4133-ac55-a4e9b6dc981b"], -Cell[16866, 570, 262, 5, 62, "Output",ExpressionUUID->"1f94c967-f20c-4117-b882-f0829f840da4"] +Cell[16996, 525, 134, 2, 29, "Input",ExpressionUUID->"eaea58ab-5391-4133-ac55-a4e9b6dc981b"], +Cell[17133, 529, 280, 4, 33, "Output",ExpressionUUID->"82c074cf-9ef9-42cc-abe5-2d7b0c374404"] }, Open ]], Cell[CellGroupData[{ -Cell[17165, 580, 223, 5, 55, "Input",ExpressionUUID->"abc15556-1a52-432f-a951-bb2f0de59d9e"], -Cell[17391, 587, 272, 6, 62, "Output",ExpressionUUID->"1579694a-9432-41d3-8dbf-661cda0afd42"] +Cell[17450, 538, 219, 4, 29, "Input",ExpressionUUID->"abc15556-1a52-432f-a951-bb2f0de59d9e"], +Cell[17672, 544, 290, 5, 33, "Output",ExpressionUUID->"1bbff169-6956-4d5e-8520-2b6720a84778"] }, Open ]], Cell[CellGroupData[{ -Cell[17700, 598, 138, 3, 55, "Input",ExpressionUUID->"fc7cf076-aa64-477b-b6eb-d1714c0006fe"], -Cell[17841, 603, 260, 5, 62, "Output",ExpressionUUID->"4c8084d5-5af6-4b81-b6ae-41d98d2a5c77"] +Cell[17999, 554, 134, 2, 29, "Input",ExpressionUUID->"fc7cf076-aa64-477b-b6eb-d1714c0006fe"], +Cell[18136, 558, 280, 4, 33, "Output",ExpressionUUID->"5bfe3efb-1f94-409f-a653-d199df00bd2e"] }, Open ]], Cell[CellGroupData[{ -Cell[18138, 613, 328, 6, 55, "Input",ExpressionUUID->"03037615-a4ec-4a71-9963-7937075949f0"], -Cell[18469, 621, 253, 5, 62, "Output",ExpressionUUID->"22f1c388-f489-4a91-b189-560e2cc3c5f6"] +Cell[18453, 567, 324, 5, 29, "Input",ExpressionUUID->"03037615-a4ec-4a71-9963-7937075949f0"], +Cell[18780, 574, 271, 4, 33, "Output",ExpressionUUID->"efaac746-d2d0-47b5-b94b-cde4afdc93ad"] }, Open ]], Cell[CellGroupData[{ -Cell[18759, 631, 299, 6, 55, "Input",ExpressionUUID->"b0af7a4c-a39a-4e42-b701-b56de3889d1c"], -Cell[19061, 639, 252, 5, 62, "Output",ExpressionUUID->"969437f0-2389-4cdd-93f6-22e24679f634"] +Cell[19088, 583, 295, 5, 29, "Input",ExpressionUUID->"b0af7a4c-a39a-4e42-b701-b56de3889d1c"], +Cell[19386, 590, 272, 4, 33, "Output",ExpressionUUID->"586bc018-efa8-4372-aad9-6988ee5bd971"] }, Open ]], Cell[CellGroupData[{ -Cell[19350, 649, 223, 5, 55, "Input",ExpressionUUID->"60585147-2eb3-4eb0-be4e-c5b0b14d1ee0"], -Cell[19576, 656, 257, 5, 62, "Output",ExpressionUUID->"0a69b2ee-f0f7-46ea-b9e9-9f681e4f6712"] +Cell[19695, 599, 219, 4, 29, "Input",ExpressionUUID->"60585147-2eb3-4eb0-be4e-c5b0b14d1ee0"], +Cell[19917, 605, 277, 4, 33, "Output",ExpressionUUID->"53c47bcb-9ed1-41a4-bff4-722178225acf"] }, Open ]], Cell[CellGroupData[{ -Cell[19870, 666, 354, 11, 81, "Input",ExpressionUUID->"aaa537a1-4d4b-4fb9-be2d-0fdc6f0aa598"], -Cell[20227, 679, 275, 5, 62, "Output",ExpressionUUID->"ef617988-9eaf-445c-8532-11bf9aa5cb10"] +Cell[20231, 614, 350, 10, 42, "Input",ExpressionUUID->"aaa537a1-4d4b-4fb9-be2d-0fdc6f0aa598"], +Cell[20584, 626, 295, 4, 33, "Output",ExpressionUUID->"06961da8-d5fb-45e1-8db0-89c91b643da5"] }, Open ]], Cell[CellGroupData[{ -Cell[20539, 689, 354, 11, 81, "Input",ExpressionUUID->"3719007c-9ae9-4691-83b2-a05008e8a3a8"], -Cell[20896, 702, 288, 6, 62, "Output",ExpressionUUID->"97ce1a1e-c787-4c42-8177-0176232869cc"] +Cell[20916, 635, 350, 10, 42, "Input",ExpressionUUID->"3719007c-9ae9-4691-83b2-a05008e8a3a8"], +Cell[21269, 647, 308, 5, 33, "Output",ExpressionUUID->"5395ff1a-9515-442f-8ae2-0a1912f40393"] }, Open ]], Cell[CellGroupData[{ -Cell[21221, 713, 998, 27, 154, "Input",ExpressionUUID->"1c9b77e2-0999-4119-8232-c0d1478d5d45"], -Cell[22222, 742, 276, 5, 62, "Output",ExpressionUUID->"8265b718-5917-4476-bdec-5b686b5b3098"] +Cell[21614, 657, 994, 26, 81, "Input",ExpressionUUID->"1c9b77e2-0999-4119-8232-c0d1478d5d45"], +Cell[22611, 685, 296, 4, 33, "Output",ExpressionUUID->"225462bf-9817-4f00-a9ae-0597a018312f"] }, Open ]], Cell[CellGroupData[{ -Cell[22535, 752, 203, 4, 55, "Input",ExpressionUUID->"1036db8d-d1d7-40b1-bd0c-90faceacded0"], -Cell[22741, 758, 258, 5, 62, "Output",ExpressionUUID->"0f9b07fe-c5fd-4975-98af-3ae81008ef18"] +Cell[22944, 694, 199, 3, 29, "Input",ExpressionUUID->"1036db8d-d1d7-40b1-bd0c-90faceacded0"], +Cell[23146, 699, 278, 4, 33, "Output",ExpressionUUID->"4bc988bb-6557-4125-b476-6ca631649c89"] }, Open ]], Cell[CellGroupData[{ -Cell[23036, 768, 331, 6, 55, "Input",ExpressionUUID->"b7b1c1e0-9b7e-4e9a-b42a-429e7286bd0a"], -Cell[23370, 776, 235, 4, 62, "Output",ExpressionUUID->"4b32de17-9d0e-42ac-a64a-940859792752"] +Cell[23461, 708, 327, 5, 29, "Input",ExpressionUUID->"b7b1c1e0-9b7e-4e9a-b42a-429e7286bd0a"], +Cell[23791, 715, 254, 3, 33, "Output",ExpressionUUID->"5b2b8bd1-c666-4256-be75-6e0cd87613ab"] }, Open ]], -Cell[23620, 783, 177, 3, 55, "Input",ExpressionUUID->"e419ea2b-cfab-4b32-83de-3169a095ff42"], +Cell[24060, 721, 173, 2, 70, "Input",ExpressionUUID->"e419ea2b-cfab-4b32-83de-3169a095ff42"], Cell[CellGroupData[{ -Cell[23822, 790, 333, 6, 55, "Input",ExpressionUUID->"cd35992f-4f02-4342-ba87-c240d69e283f"], -Cell[24158, 798, 232, 4, 62, "Output",ExpressionUUID->"718ea2ff-7778-4908-b8bd-4a586290e003"] +Cell[24258, 727, 329, 5, 29, "Input",ExpressionUUID->"cd35992f-4f02-4342-ba87-c240d69e283f"], +Cell[24590, 734, 251, 3, 33, "Output",ExpressionUUID->"92803e51-d4e4-4ec2-8839-13d3242b05b5"] }, Open ]], -Cell[24405, 805, 177, 3, 55, "Input",ExpressionUUID->"7efe54fb-7831-41ab-adc1-b6f091a8b984"], +Cell[24856, 740, 173, 2, 70, "Input",ExpressionUUID->"7efe54fb-7831-41ab-adc1-b6f091a8b984"], Cell[CellGroupData[{ -Cell[24607, 812, 336, 6, 55, "Input",ExpressionUUID->"36e9683b-262a-4168-b8c6-6153865b9a90"], -Cell[24946, 820, 231, 4, 62, "Output",ExpressionUUID->"7cc69535-386b-4bf8-8fcf-5fa0cbedfa9d"] +Cell[25054, 746, 332, 5, 29, "Input",ExpressionUUID->"36e9683b-262a-4168-b8c6-6153865b9a90"], +Cell[25389, 753, 250, 3, 33, "Output",ExpressionUUID->"abbf67e9-b383-41ba-8087-9f58a9061a78"] }, Open ]], -Cell[25192, 827, 177, 3, 55, "Input",ExpressionUUID->"5bf8cdd6-7467-44c6-8375-7b3e0fb3c3be"], +Cell[25654, 759, 173, 2, 70, "Input",ExpressionUUID->"5bf8cdd6-7467-44c6-8375-7b3e0fb3c3be"], Cell[CellGroupData[{ -Cell[25394, 834, 358, 6, 55, "Input",ExpressionUUID->"05c1ce3c-2d90-4e22-8983-8708b913f8ec"], -Cell[25755, 842, 237, 4, 62, "Output",ExpressionUUID->"d46d6435-e824-4b80-93c7-afa74308d522"] +Cell[25852, 765, 354, 5, 29, "Input",ExpressionUUID->"05c1ce3c-2d90-4e22-8983-8708b913f8ec"], +Cell[26209, 772, 255, 3, 33, "Output",ExpressionUUID->"82b1ee78-cb1e-4aac-a050-eb252c1a0781"] }, Open ]], -Cell[26007, 849, 175, 3, 55, "Input",ExpressionUUID->"af2d854f-0f16-4dcc-8158-4eae99fa42d4"], +Cell[26479, 778, 171, 2, 70, "Input",ExpressionUUID->"af2d854f-0f16-4dcc-8158-4eae99fa42d4"], Cell[CellGroupData[{ -Cell[26207, 856, 303, 6, 55, "Input",ExpressionUUID->"6e1ffc52-c14e-4102-b2d3-8f150a74cd2c"], -Cell[26513, 864, 237, 4, 62, "Output",ExpressionUUID->"b1c95913-8c5d-461e-958d-b15197551bc2"] +Cell[26675, 784, 299, 5, 29, "Input",ExpressionUUID->"6e1ffc52-c14e-4102-b2d3-8f150a74cd2c"], +Cell[26977, 791, 256, 3, 33, "Output",ExpressionUUID->"ae4195b5-79dd-49ef-b435-26bfadcbbfb8"] }, Open ]], -Cell[26765, 871, 175, 3, 55, "Input",ExpressionUUID->"90f795cc-44e0-4079-933e-820564497709"], +Cell[27248, 797, 171, 2, 70, "Input",ExpressionUUID->"90f795cc-44e0-4079-933e-820564497709"], Cell[CellGroupData[{ -Cell[26965, 878, 307, 6, 55, "Input",ExpressionUUID->"e1a4e27d-fefb-4696-ae21-8d21efe0f772"], -Cell[27275, 886, 233, 4, 62, "Output",ExpressionUUID->"e1da4a03-9852-44c6-a99f-15711d5729da"] +Cell[27444, 803, 303, 5, 29, "Input",ExpressionUUID->"e1a4e27d-fefb-4696-ae21-8d21efe0f772"], +Cell[27750, 810, 254, 3, 33, "Output",ExpressionUUID->"c71e623d-1233-4332-b6cc-859e336dabc5"] }, Open ]], -Cell[27523, 893, 177, 3, 55, "Input",ExpressionUUID->"908ec444-5059-4913-944b-1bdd71a4d77f"], +Cell[28019, 816, 173, 2, 70, "Input",ExpressionUUID->"908ec444-5059-4913-944b-1bdd71a4d77f"], Cell[CellGroupData[{ -Cell[27725, 900, 311, 6, 55, "Input",ExpressionUUID->"c855e36c-e123-468e-a24c-f6a4bcfabc56"], -Cell[28039, 908, 232, 4, 62, "Output",ExpressionUUID->"9d9d8a62-e5dc-4f72-af3c-870802cfab88"] +Cell[28217, 822, 307, 5, 29, "Input",ExpressionUUID->"c855e36c-e123-468e-a24c-f6a4bcfabc56"], +Cell[28527, 829, 251, 3, 33, "Output",ExpressionUUID->"80da1a40-bb51-40dc-a80e-4c6f25737a55"] }, Open ]], -Cell[28286, 915, 176, 3, 55, "Input",ExpressionUUID->"65e23205-730e-44e3-b89e-7568b3a51464"], +Cell[28793, 835, 172, 2, 70, "Input",ExpressionUUID->"65e23205-730e-44e3-b89e-7568b3a51464"], Cell[CellGroupData[{ -Cell[28487, 922, 279, 5, 55, "Input",ExpressionUUID->"c76f2dce-79a7-4383-b851-ef032acfedad"], -Cell[28769, 929, 231, 4, 62, "Output",ExpressionUUID->"e2e75e38-d6ed-4040-9794-70048be22f77"] +Cell[28990, 841, 275, 4, 29, "Input",ExpressionUUID->"c76f2dce-79a7-4383-b851-ef032acfedad"], +Cell[29268, 847, 250, 3, 33, "Output",ExpressionUUID->"5bbb89a7-70d3-47f7-8971-594c0ee63d08"] }, Open ]], -Cell[29015, 936, 179, 3, 55, "Input",ExpressionUUID->"bbab7f73-0565-4ae4-8d20-d60fe84536e0"], +Cell[29533, 853, 175, 2, 70, "Input",ExpressionUUID->"bbab7f73-0565-4ae4-8d20-d60fe84536e0"], Cell[CellGroupData[{ -Cell[29219, 943, 19813, 486, 3214, "Input",ExpressionUUID->"e99f0e79-d0cb-41d4-b539-50ea2cde3a21"], -Cell[49035, 1431, 272, 5, 62, "Output",ExpressionUUID->"454e9c61-1f94-4c41-a67b-3720a310c58b"] +Cell[29733, 859, 19809, 485, 1844, "Input",ExpressionUUID->"e99f0e79-d0cb-41d4-b539-50ea2cde3a21"], +Cell[49545, 1346, 290, 4, 33, "Output",ExpressionUUID->"0b81ff0b-f9a0-4819-b863-17be526eda4d"] }, Open ]], Cell[CellGroupData[{ -Cell[49344, 1441, 19752, 490, 3214, "Input",ExpressionUUID->"60d8770c-a518-401f-9cd7-ffb9a2f67508"], -Cell[69099, 1933, 271, 5, 62, "Output",ExpressionUUID->"f48680b0-c192-44a8-9d82-d72872f4896c"] +Cell[49872, 1355, 19748, 489, 1981, "Input",ExpressionUUID->"60d8770c-a518-401f-9cd7-ffb9a2f67508"], +Cell[69623, 1846, 289, 4, 33, "Output",ExpressionUUID->"853b3f39-5b66-497c-8ed2-968da7fbc0e1"] }, Open ]], Cell[CellGroupData[{ -Cell[69407, 1943, 19752, 484, 3213, "Input",ExpressionUUID->"fc75c884-45d9-4cef-b95c-fa3bd5361c67"], -Cell[89162, 2429, 289, 6, 62, "Output",ExpressionUUID->"fe90f6ab-f082-4145-b3c5-f8c8b04453bd"] +Cell[69949, 1855, 19748, 483, 1970, "Input",ExpressionUUID->"fc75c884-45d9-4cef-b95c-fa3bd5361c67"], +Cell[89700, 2340, 307, 5, 33, "Output",ExpressionUUID->"96bad477-2b4c-47f7-bc10-5b0865a96322"] }, Open ]], Cell[CellGroupData[{ -Cell[89488, 2440, 22538, 554, 3639, "Input",ExpressionUUID->"09cfab98-b552-4b08-a78f-387275b62cde"], -Cell[112029, 2996, 291, 6, 62, "Output",ExpressionUUID->"cc513b50-becb-456d-93a9-5e0328cda9b3"] +Cell[90044, 2350, 22534, 553, 2217, "Input",ExpressionUUID->"09cfab98-b552-4b08-a78f-387275b62cde"], +Cell[112581, 2905, 311, 5, 33, "Output",ExpressionUUID->"c2f630ac-e006-49fd-b6be-cfa847116cae"] }, Open ]], Cell[CellGroupData[{ -Cell[112357, 3007, 22539, 554, 3639, "Input",ExpressionUUID->"ef9a3d42-1318-43d1-b6e7-893064eedcfe"], -Cell[134899, 3563, 292, 6, 62, "Output",ExpressionUUID->"57f7ae4d-bd5f-4bbc-83bc-ae6de9ee2b8e"] +Cell[112929, 2915, 22535, 553, 2254, "Input",ExpressionUUID->"ef9a3d42-1318-43d1-b6e7-893064eedcfe"], +Cell[135467, 3470, 310, 5, 33, "Output",ExpressionUUID->"b1a9bb18-b888-46ac-90ca-857bc2475eeb"] }, Open ]], Cell[CellGroupData[{ -Cell[135228, 3574, 25495, 627, 4065, "Input",ExpressionUUID->"d4bb190d-5ca6-4c4a-b3c8-f962d853e1c8"], -Cell[160726, 4203, 286, 6, 62, "Output",ExpressionUUID->"7624426a-6955-4c6f-bc37-bc175e427a75"] +Cell[135814, 3480, 25491, 626, 2501, "Input",ExpressionUUID->"d4bb190d-5ca6-4c4a-b3c8-f962d853e1c8"], +Cell[161308, 4108, 304, 5, 33, "Output",ExpressionUUID->"85425ce4-1775-4fe6-830d-628eaeba1615"] }, Open ]], Cell[CellGroupData[{ -Cell[161049, 4214, 134, 3, 55, "Input",ExpressionUUID->"318461b9-7ee4-47e0-b049-a20fb42eae95"], -Cell[161186, 4219, 254, 5, 62, "Output",ExpressionUUID->"3d552a5f-2faa-42b3-9457-f777e1b446ba"] +Cell[161649, 4118, 130, 2, 29, "Input",ExpressionUUID->"318461b9-7ee4-47e0-b049-a20fb42eae95"], +Cell[161782, 4122, 272, 4, 33, "Output",ExpressionUUID->"7572053a-669e-441d-8cb0-c08d64909a0e"] }, Open ]], Cell[CellGroupData[{ -Cell[161477, 4229, 134, 3, 55, "Input",ExpressionUUID->"3e821625-2295-4317-a6c9-c5a6ed26f1ba"], -Cell[161614, 4234, 254, 5, 62, "Output",ExpressionUUID->"93feea3d-be7a-4e86-9595-e8857324d6d4"] +Cell[162091, 4131, 130, 2, 29, "Input",ExpressionUUID->"3e821625-2295-4317-a6c9-c5a6ed26f1ba"], +Cell[162224, 4135, 272, 4, 33, "Output",ExpressionUUID->"d1176e11-2e37-4139-a238-5c555133b430"] }, Open ]], Cell[CellGroupData[{ -Cell[161905, 4244, 1148, 40, 211, "Input",ExpressionUUID->"e131b311-b23d-4bf8-aa90-94060544af3c"], -Cell[163056, 4286, 271, 5, 62, "Output",ExpressionUUID->"fe54b8bf-33cc-4e68-ad56-ca93b9b48205"] +Cell[162533, 4144, 1144, 39, 107, "Input",ExpressionUUID->"e131b311-b23d-4bf8-aa90-94060544af3c"], +Cell[163680, 4185, 291, 4, 33, "Output",ExpressionUUID->"9ce6aa37-44aa-42fe-b036-4287aec56aed"] }, Open ]], Cell[CellGroupData[{ -Cell[163364, 4296, 1045, 36, 211, "Input",ExpressionUUID->"a38f8011-4eb5-4501-89be-65ef4758a564"], -Cell[164412, 4334, 286, 6, 62, "Output",ExpressionUUID->"bdf50e58-3ae8-4ddd-8c80-0578a2a5a37b"] +Cell[164008, 4194, 1041, 35, 107, "Input",ExpressionUUID->"a38f8011-4eb5-4501-89be-65ef4758a564"], +Cell[165052, 4231, 306, 5, 33, "Output",ExpressionUUID->"d552a948-7ef1-4707-92a3-b1b8d230d588"] }, Open ]], Cell[CellGroupData[{ -Cell[164735, 4345, 1148, 40, 211, "Input",ExpressionUUID->"1f2857d7-7392-4393-b2a1-6a006fd8c314"], -Cell[165886, 4387, 271, 5, 62, "Output",ExpressionUUID->"aaffbaf0-c25c-46bd-9f1a-9e9aacb5352b"] +Cell[165395, 4241, 1144, 39, 107, "Input",ExpressionUUID->"1f2857d7-7392-4393-b2a1-6a006fd8c314"], +Cell[166542, 4282, 289, 4, 33, "Output",ExpressionUUID->"8f657001-1b30-47c8-a9fa-8cc12dd34b80"] }, Open ]], Cell[CellGroupData[{ -Cell[166194, 4397, 112, 2, 55, "Input",ExpressionUUID->"ba8043a4-a195-48ef-acb5-158cea127b9e"], -Cell[166309, 4401, 272, 5, 62, "Output",ExpressionUUID->"7affa945-14ff-4a7f-98be-3b57a0970d13"] +Cell[166868, 4291, 108, 1, 29, "Input",ExpressionUUID->"ba8043a4-a195-48ef-acb5-158cea127b9e"], +Cell[166979, 4294, 290, 4, 33, "Output",ExpressionUUID->"4194456a-f5dc-4230-9ce9-64859e7cde63"] }, Open ]], Cell[CellGroupData[{ -Cell[166618, 4411, 112, 2, 55, "Input",ExpressionUUID->"2156025d-2a1e-45cb-9e97-e50773e5754e"], -Cell[166733, 4415, 289, 6, 62, "Output",ExpressionUUID->"59d02ba5-4822-4bab-bf4f-c549e0e768ee"] +Cell[167306, 4303, 108, 1, 29, "Input",ExpressionUUID->"2156025d-2a1e-45cb-9e97-e50773e5754e"], +Cell[167417, 4306, 309, 5, 33, "Output",ExpressionUUID->"9557c0d9-8eb2-4766-8ba7-142a1371dd18"] }, Open ]], Cell[CellGroupData[{ -Cell[167059, 4426, 112, 2, 55, "Input",ExpressionUUID->"affeaffc-5110-4d8f-896f-54b5596c2c52"], -Cell[167174, 4430, 287, 6, 62, "Output",ExpressionUUID->"98b10eaa-a915-4832-962a-e20181e68fb9"] +Cell[167763, 4316, 108, 1, 29, "Input",ExpressionUUID->"affeaffc-5110-4d8f-896f-54b5596c2c52"], +Cell[167874, 4319, 305, 5, 33, "Output",ExpressionUUID->"0350c141-00c1-469a-b871-8e444903b8f5"] }, Open ]], Cell[CellGroupData[{ -Cell[167498, 4441, 112, 2, 55, "Input",ExpressionUUID->"8b781ea3-01dd-4b9e-90d8-44bda9b0f1b0"], -Cell[167613, 4445, 274, 5, 62, "Output",ExpressionUUID->"91e7ba39-ebd0-4c5a-8321-bac23f60c837"] +Cell[168216, 4329, 108, 1, 29, "Input",ExpressionUUID->"8b781ea3-01dd-4b9e-90d8-44bda9b0f1b0"], +Cell[168327, 4332, 294, 4, 33, "Output",ExpressionUUID->"99db3c6f-1a00-4ed6-b6fd-6c9d45e9f2e6"] }, Open ]], Cell[CellGroupData[{ -Cell[167924, 4455, 111, 2, 55, "Input",ExpressionUUID->"6e315cbd-5e38-43c0-b733-a9cc30e42717"], -Cell[168038, 4459, 272, 5, 62, "Output",ExpressionUUID->"e8217124-3160-497a-a3ef-fd7ca773e043"] +Cell[168658, 4341, 107, 1, 29, "Input",ExpressionUUID->"6e315cbd-5e38-43c0-b733-a9cc30e42717"], +Cell[168768, 4344, 290, 4, 33, "Output",ExpressionUUID->"e7cf5733-4f8c-4250-9a8c-fb2354d08db3"] }, Open ]], Cell[CellGroupData[{ -Cell[168347, 4469, 111, 2, 55, "Input",ExpressionUUID->"cf57eb4b-ea94-4170-8ca4-d1e4df3a658b"], -Cell[168461, 4473, 272, 5, 62, "Output",ExpressionUUID->"33d25e04-201e-40ba-a10f-617ffe23cdf6"] +Cell[169095, 4353, 107, 1, 29, "Input",ExpressionUUID->"cf57eb4b-ea94-4170-8ca4-d1e4df3a658b"], +Cell[169205, 4356, 289, 4, 33, "Output",ExpressionUUID->"aad75f37-7a38-4138-a785-db0d3dd590a3"] }, Open ]], Cell[CellGroupData[{ -Cell[168770, 4483, 501, 17, 105, "Input",ExpressionUUID->"2996421f-d730-4ac7-bee1-1afd9facb2b6"], -Cell[169274, 4502, 287, 6, 62, "Output",ExpressionUUID->"347991fa-3831-46ac-af68-6f221e350e19"] +Cell[169531, 4365, 497, 16, 55, "Input",ExpressionUUID->"2996421f-d730-4ac7-bee1-1afd9facb2b6"], +Cell[170031, 4383, 307, 5, 33, "Output",ExpressionUUID->"57253116-782c-4cc4-b026-65c75175a911"] }, Open ]], Cell[CellGroupData[{ -Cell[169598, 4513, 501, 17, 105, "Input",ExpressionUUID->"5377b4a7-0ea8-42d9-a370-3cbb3b816661"], -Cell[170102, 4532, 286, 6, 62, "Output",ExpressionUUID->"ed1077c6-331c-44d8-82cd-668ddb0622b1"] +Cell[170375, 4393, 497, 16, 55, "Input",ExpressionUUID->"5377b4a7-0ea8-42d9-a370-3cbb3b816661"], +Cell[170875, 4411, 306, 5, 33, "Output",ExpressionUUID->"cea01578-9b3f-4037-b7c0-3e00e6e1118e"] }, Open ]], Cell[CellGroupData[{ -Cell[170425, 4543, 1792, 61, 358, "Input",ExpressionUUID->"cd9543e9-5ab0-44b6-b22b-b6f7d9379d6f"], -Cell[172220, 4606, 270, 5, 62, "Output",ExpressionUUID->"d6e96e26-ad0d-4c00-8a99-6186d1d22cd1"] +Cell[171218, 4421, 1788, 60, 183, "Input",ExpressionUUID->"cd9543e9-5ab0-44b6-b22b-b6f7d9379d6f"], +Cell[173009, 4483, 288, 4, 33, "Output",ExpressionUUID->"ad2a50ba-6f13-4348-876d-96dc467789e2"] }, Open ]], Cell[CellGroupData[{ -Cell[172527, 4616, 1105, 37, 256, "Input",ExpressionUUID->"1cafafed-26ac-4aa7-b15d-5b2a26438908"], -Cell[173635, 4655, 291, 6, 62, "Output",ExpressionUUID->"c2fe019c-5f21-435a-8d7e-40f5d8718736"] +Cell[173334, 4492, 1101, 36, 131, "Input",ExpressionUUID->"1cafafed-26ac-4aa7-b15d-5b2a26438908"], +Cell[174438, 4530, 311, 5, 33, "Output",ExpressionUUID->"cf273957-541d-4ce8-8992-0644387a5223"] }, Open ]], Cell[CellGroupData[{ -Cell[173963, 4666, 1822, 62, 313, "Input",ExpressionUUID->"ebf21cfa-2adf-4167-ad9c-e05db70dc3a1"], -Cell[175788, 4730, 269, 5, 62, "Output",ExpressionUUID->"beff5e16-4ae9-4f92-a0ec-ebe783f8f480"] +Cell[174786, 4540, 1818, 61, 160, "Input",ExpressionUUID->"ebf21cfa-2adf-4167-ad9c-e05db70dc3a1"], +Cell[176607, 4603, 287, 4, 33, "Output",ExpressionUUID->"9345fb99-c0ff-4596-8e4c-dc71c1c12a82"] }, Open ]], Cell[CellGroupData[{ -Cell[176094, 4740, 1635, 54, 310, "Input",ExpressionUUID->"baca1192-8829-4313-8a64-88dbef5bf565"], -Cell[177732, 4796, 273, 5, 62, "Output",ExpressionUUID->"86f86249-5f42-4c51-8b6e-7e1767e236c2"] +Cell[176931, 4612, 1631, 53, 162, "Input",ExpressionUUID->"baca1192-8829-4313-8a64-88dbef5bf565"], +Cell[178565, 4667, 291, 4, 33, "Output",ExpressionUUID->"6bee9707-9417-4f0c-adde-66d64233e673"] }, Open ]], Cell[CellGroupData[{ -Cell[178042, 4806, 1635, 54, 101, "Input",ExpressionUUID->"39229fe3-c44d-4690-89cb-b4deb8cf5bfd"], -Cell[179680, 4862, 272, 5, 41, "Output",ExpressionUUID->"4b27e90f-29ef-4013-8647-45d92514696d"] +Cell[178893, 4676, 1631, 53, 162, "Input",ExpressionUUID->"39229fe3-c44d-4690-89cb-b4deb8cf5bfd"], +Cell[180527, 4731, 290, 4, 33, "Output",ExpressionUUID->"48257e75-67f0-4341-a03c-a17a6c332f5b"] }, Open ]], -Cell[179967, 4870, 187, 4, 36, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], -Cell[180157, 4876, 154, 3, 36, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], -Cell[180314, 4881, 237, 5, 36, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], -Cell[180554, 4888, 154, 3, 36, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[180733, 4895, 1301, 43, 61, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], -Cell[182037, 4940, 178, 3, 41, "Output",ExpressionUUID->"d7904bcf-fc55-b844-b4d2-059d830f1317"] +Cell[180854, 4740, 206, 3, 29, "Input",ExpressionUUID->"5894836c-9594-0940-b94c-299085c765cc"], +Cell[181063, 4745, 161, 2, 33, "Output",ExpressionUUID->"a537bf65-844a-4950-b057-c0f8fdaf4fe5"] }, Open ]], +Cell[181239, 4750, 173, 2, 70, "Input",ExpressionUUID->"5965eb10-01f8-5545-9b6f-8fab318cd4b7"], Cell[CellGroupData[{ -Cell[182252, 4948, 908, 31, 73, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], -Cell[183163, 4981, 177, 3, 41, "Output",ExpressionUUID->"7c075ec9-a97b-ab47-b241-cc392b585c5e"] +Cell[181437, 4756, 259, 5, 29, "Input",ExpressionUUID->"08e75bd6-0b05-8b42-9fb2-092c5143dcf0"], +Cell[181699, 4763, 160, 2, 33, "Output",ExpressionUUID->"2de1a2fa-7384-4e6b-9062-0e3bdd830cb9"] }, Open ]], +Cell[181874, 4768, 173, 2, 70, "Input",ExpressionUUID->"6e7c45d7-0298-ce41-ba97-a3c857e6ae57"], Cell[CellGroupData[{ -Cell[183377, 4989, 889, 30, 73, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], -Cell[184269, 5021, 178, 3, 41, "Output",ExpressionUUID->"ddda4800-8c90-d44b-acfd-6ccb39eee852"] +Cell[182072, 4774, 1297, 42, 111, "Input",ExpressionUUID->"38bf39c5-cae1-4148-b0af-e362ef4ee2e3"], +Cell[183372, 4818, 195, 2, 33, "Output",ExpressionUUID->"12350202-2747-466d-93df-bc04990fb07f"] }, Open ]], Cell[CellGroupData[{ -Cell[184484, 5029, 558, 19, 66, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], -Cell[185045, 5050, 172, 3, 41, "Output",ExpressionUUID->"046d7438-d73f-9343-9ae7-b01adfd6d8f5"] +Cell[183604, 4825, 927, 30, 96, "Input",ExpressionUUID->"f2e6289f-a8bc-6d44-a856-301cf9f22a61"], +Cell[184534, 4857, 195, 2, 33, "Output",ExpressionUUID->"34ccc562-e3d2-4dd2-8c97-1ee5857b2803"] }, Open ]], Cell[CellGroupData[{ -Cell[185254, 5058, 651, 22, 66, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], -Cell[185908, 5082, 167, 3, 41, "Output",ExpressionUUID->"d2928e96-58be-3a4f-8bee-5b9e193c2ac6"] +Cell[184766, 4864, 908, 29, 55, "Input",ExpressionUUID->"cdf84d2f-1e96-4c43-9286-fda42549e334"], +Cell[185677, 4895, 195, 2, 33, "Output",ExpressionUUID->"bd3380df-8800-4fc6-ae7e-e8a2979312dc"] }, Open ]], Cell[CellGroupData[{ -Cell[186112, 5090, 170, 5, 71, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], -Cell[186285, 5097, 172, 3, 41, "Output",ExpressionUUID->"bf655ed3-7200-2249-b687-593ee351a598"] +Cell[185909, 4902, 554, 18, 51, "Input",ExpressionUUID->"a7d184c1-375c-094d-82ba-c6d8cfdfa4a1"], +Cell[186466, 4922, 193, 2, 33, "Output",ExpressionUUID->"8ab5183d-6728-4b8a-9cc0-a8959cb3deaf"] }, Open ]], Cell[CellGroupData[{ -Cell[186494, 5105, 170, 5, 69, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], -Cell[186667, 5112, 173, 3, 41, "Output",ExpressionUUID->"56f5f06b-52e2-6941-b28e-41b961cb42e9"] +Cell[186696, 4929, 647, 21, 51, "Input",ExpressionUUID->"cc7d9e01-d61b-5a43-abcd-9714383fe0fe"], +Cell[187346, 4952, 189, 2, 33, "Output",ExpressionUUID->"854391eb-5f28-424c-ba41-a2aa4fba0031"] }, Open ]], Cell[CellGroupData[{ -Cell[186877, 5120, 181, 5, 55, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], -Cell[187061, 5127, 171, 3, 41, "Output",ExpressionUUID->"8c210f75-69a5-5340-94a4-65e97302ca45"] +Cell[187572, 4959, 166, 4, 55, "Input",ExpressionUUID->"1204358e-ac52-0f4c-bf22-945336ddda4e"], +Cell[187741, 4965, 190, 2, 33, "Output",ExpressionUUID->"f1dc5e8a-efb2-43ac-b94a-81de989fce2f"] }, Open ]], Cell[CellGroupData[{ -Cell[187269, 5135, 181, 5, 55, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], -Cell[187453, 5142, 172, 3, 41, "Output",ExpressionUUID->"bad7f5b6-1bd3-6b4b-87e4-44aee3a120fc"] +Cell[187968, 4972, 166, 4, 54, "Input",ExpressionUUID->"66c9dc01-c171-8f4f-b59a-2829d67b4589"], +Cell[188137, 4978, 190, 2, 33, "Output",ExpressionUUID->"b408b1c7-1ba2-4118-9884-596da0a9cc90"] }, Open ]], Cell[CellGroupData[{ -Cell[187662, 5150, 6055, 185, 431, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], -Cell[193720, 5337, 174, 3, 41, "Output",ExpressionUUID->"ffdf2eb3-13bd-724f-a87b-fb40655ae9c4"] +Cell[188364, 4985, 177, 4, 43, "Input",ExpressionUUID->"09b0eefd-6263-8a44-8015-82d02046019c"], +Cell[188544, 4991, 189, 2, 33, "Output",ExpressionUUID->"8c49d98e-8ec5-42d1-9f42-c7e53bae08d1"] }, Open ]], Cell[CellGroupData[{ -Cell[193931, 5345, 368, 9, 53, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], -Cell[194302, 5356, 172, 3, 41, "Output",ExpressionUUID->"609425d6-cf9c-7a45-bc21-030ca3aa1290"] +Cell[188770, 4998, 177, 4, 43, "Input",ExpressionUUID->"c1911d35-4f2b-d042-9073-088b56a17885"], +Cell[188950, 5004, 190, 2, 33, "Output",ExpressionUUID->"5167b901-7867-4d09-b9fe-1733a16a5104"] }, Open ]], Cell[CellGroupData[{ -Cell[194511, 5364, 6122, 187, 431, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], -Cell[200636, 5553, 175, 3, 41, "Output",ExpressionUUID->"b20cbe94-36a3-8548-a61e-959a25814c62"] +Cell[189177, 5011, 6051, 184, 474, "Input",ExpressionUUID->"6fd22be4-12e4-0d4e-b7f7-ab28adc2524f"], +Cell[195231, 5197, 195, 2, 33, "Output",ExpressionUUID->"f40ba499-9db0-46c7-a0f4-05fa17b3bc71"] }, Open ]], Cell[CellGroupData[{ -Cell[200848, 5561, 368, 9, 53, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], -Cell[201219, 5572, 172, 3, 41, "Output",ExpressionUUID->"4fc2e2c1-457d-3d4a-a5b7-180877c6f370"] +Cell[195463, 5204, 364, 8, 41, "Input",ExpressionUUID->"788e89bc-20c8-8541-af10-81d8741a0e5b"], +Cell[195830, 5214, 191, 2, 33, "Output",ExpressionUUID->"14c51a56-ab0e-414f-be61-4f088d9db726"] }, Open ]], Cell[CellGroupData[{ -Cell[201428, 5580, 2663, 88, 215, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], -Cell[204094, 5670, 171, 3, 41, "Output",ExpressionUUID->"08fcefa1-a87b-bf4b-998d-0c9017752dd4"] +Cell[196058, 5221, 6118, 186, 474, "Input",ExpressionUUID->"c19137b0-217d-0844-9acb-cc5878ab26fc"], +Cell[202179, 5409, 192, 2, 33, "Output",ExpressionUUID->"44258a98-a58f-4212-a4d2-170460fa4c49"] }, Open ]], Cell[CellGroupData[{ -Cell[204302, 5678, 2603, 85, 435, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], -Cell[206908, 5765, 173, 3, 41, "Output",ExpressionUUID->"5678b502-e98a-5d4b-9c03-fe98b2cc6f78"] +Cell[202408, 5416, 364, 8, 41, "Input",ExpressionUUID->"7c3bd40f-ac17-c54f-a888-ac3b4c84d9d9"], +Cell[202775, 5426, 190, 2, 33, "Output",ExpressionUUID->"401dbb15-28c6-45f9-a499-e5e43e9c98a1"] }, Open ]], Cell[CellGroupData[{ -Cell[207118, 5773, 3712, 118, 316, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], -Cell[210833, 5893, 174, 3, 41, "Output",ExpressionUUID->"d74c1470-6eae-4841-b978-069a86bca67d"] +Cell[203002, 5433, 2659, 87, 285, "Input",ExpressionUUID->"bdca581e-5d9f-434b-8ec4-903e0edf0216"], +Cell[205664, 5522, 190, 2, 33, "Output",ExpressionUUID->"59679606-3f42-427e-ae03-c310e74d5a73"] }, Open ]], -Cell[211022, 5899, 138, 3, 36, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ -Cell[211185, 5906, 2054, 59, 116, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], -Cell[213242, 5967, 559, 12, 53, "Message",ExpressionUUID->"0833bd34-3252-a046-9aa3-94c1d6e5cfe9"], -Cell[213804, 5981, 560, 12, 53, "Message",ExpressionUUID->"f24a3618-ee43-704a-86fe-493dbed35e8d"], -Cell[214367, 5995, 565, 12, 53, "Message",ExpressionUUID->"86271901-aa3c-5542-ab18-fc06d3fd3f32"], -Cell[214935, 6009, 456, 10, 32, "Message",ExpressionUUID->"ce9bd686-d768-5440-b47e-1ee2b5aa0183"], -Cell[215394, 6021, 170, 3, 41, "Output",ExpressionUUID->"a6ab28bd-0b4e-3443-93b3-734d7cf3d8a2"] +Cell[205891, 5529, 2599, 84, 211, "Input",ExpressionUUID->"1cec8cc2-764e-3d42-a680-d2ec92565257"], +Cell[208493, 5615, 189, 2, 33, "Output",ExpressionUUID->"df95b563-0be6-4e75-9a85-74f2d16dec6f"] }, Open ]], Cell[CellGroupData[{ -Cell[215601, 6029, 2054, 59, 116, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], -Cell[217658, 6090, 559, 12, 53, "Message",ExpressionUUID->"44f2ed65-5109-0141-bef6-eebaeda3d61d"], -Cell[218220, 6104, 559, 12, 53, "Message",ExpressionUUID->"ba49f32e-1ff7-b147-9f42-9c90ccc55447"], -Cell[218782, 6118, 565, 12, 53, "Message",ExpressionUUID->"fa95acf1-55b2-c042-9a9f-32e1ebea5c1e"], -Cell[219350, 6132, 458, 10, 32, "Message",ExpressionUUID->"3c3d4134-2c7d-0949-9759-036664c530e3"], -Cell[219811, 6144, 170, 3, 41, "Output",ExpressionUUID->"742dfe41-8369-8942-b522-c174c845c383"] +Cell[208719, 5622, 3708, 117, 327, "Input",ExpressionUUID->"800aba4f-a7e9-864a-a38b-f618fe3c89be"], +Cell[212430, 5741, 192, 2, 33, "Output",ExpressionUUID->"85d9f7b0-8457-45fe-b6e2-51f41d4251a2"] }, Open ]], +Cell[212637, 5746, 160, 3, 70, "Input",ExpressionUUID->"8111b6bb-cdcb-ad40-9440-412e77bed40d"], Cell[CellGroupData[{ -Cell[220018, 6152, 1938, 53, 63, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], -Cell[221959, 6207, 20207, 379, 295, "Output",ExpressionUUID->"0e6ef056-d4e3-ac4d-9f2a-df071f8decb1"] +Cell[212822, 5753, 2073, 58, 234, "Input",ExpressionUUID->"fc88a60e-e348-d344-96c4-1f4f66f53217"], +Cell[214898, 5813, 597, 13, 65, "Message",ExpressionUUID->"b7e26db2-c8ca-46c2-837e-8de3457c4eab"], +Cell[215498, 5828, 601, 13, 65, "Message",ExpressionUUID->"fa6f7c10-ebda-421b-861d-5ebd3f0f0bc5"], +Cell[216102, 5843, 606, 13, 82, "Message",ExpressionUUID->"1d0db5ab-c2f3-4580-85e7-437a3748b58e"], +Cell[216711, 5858, 489, 11, 26, "Message",ExpressionUUID->"5280a2f1-2bf8-4de5-877c-24e3f399b1ed"], +Cell[217203, 5871, 189, 2, 33, "Output",ExpressionUUID->"5691e17e-f43c-4985-a5d8-0825c9b3a094"] }, Open ]], Cell[CellGroupData[{ -Cell[242203, 6591, 2094, 60, 116, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], -Cell[244300, 6653, 503, 11, 48, "Message",ExpressionUUID->"8a980d1e-9dd5-194d-803a-ac5d63bbe693"], -Cell[244806, 6666, 505, 11, 48, "Message",ExpressionUUID->"637082a9-fe74-7345-8895-dee77343ee6f"], -Cell[245314, 6679, 506, 11, 48, "Message",ExpressionUUID->"b2e7262c-7c6d-d94d-a545-ea4b363e579a"], -Cell[245823, 6692, 455, 10, 32, "Message",ExpressionUUID->"40c56d25-ed26-3045-9759-ae8eef5eb7cb"], -Cell[246281, 6704, 55770, 961, 290, "Output",ExpressionUUID->"f96372ea-8786-a94e-801e-a3ab56caf675"] +Cell[217429, 5878, 2073, 58, 234, "Input",ExpressionUUID->"dca13eb7-7f94-3e45-81a8-b62dad3009d2"], +Cell[219505, 5938, 597, 13, 65, "Message",ExpressionUUID->"f2923dfa-f2f0-4701-b1a8-fa633136a6e9"], +Cell[220105, 5953, 601, 13, 65, "Message",ExpressionUUID->"73f36670-d17c-40ba-b721-75b7bcce5611"], +Cell[220709, 5968, 606, 13, 82, "Message",ExpressionUUID->"8943d7cf-cf97-49f5-9ade-d25c39744dc7"], +Cell[221318, 5983, 489, 11, 26, "Message",ExpressionUUID->"65d29e20-889b-4215-9347-99433a6df82f"], +Cell[221810, 5996, 189, 2, 33, "Output",ExpressionUUID->"b39137dc-633f-4f85-962b-1abc926c3806"] }, Open ]], -Cell[302066, 7668, 2455, 69, 140, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], -Cell[304524, 7739, 209, 5, 36, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], Cell[CellGroupData[{ -Cell[304758, 7748, 217, 7, 61, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], -Cell[304978, 7757, 173, 3, 41, "Output",ExpressionUUID->"1ffcb79a-13e7-7549-b41c-23408ffbacea"] +Cell[222036, 6003, 1957, 52, 102, "Input",ExpressionUUID->"46451e4d-f5ef-b246-91c6-4265c9fafb97"], +Cell[223996, 6057, 20078, 379, 236, "Output",ExpressionUUID->"200516df-439f-4c2b-9028-3b66ae51b78c"] }, Open ]], Cell[CellGroupData[{ -Cell[305188, 7765, 1814, 53, 116, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], -Cell[307005, 7820, 506, 11, 48, "Message",ExpressionUUID->"08a2126f-e71c-b94d-8844-15e292a8f7d1"], -Cell[307514, 7833, 508, 11, 48, "Message",ExpressionUUID->"1acf7f10-7675-ea41-b478-94e928ef3377"], -Cell[308025, 7846, 509, 11, 48, "Message",ExpressionUUID->"67cdfb4c-9282-934a-b3c5-526027acebf5"], -Cell[308537, 7859, 458, 10, 32, "Message",ExpressionUUID->"760e7203-a507-b249-aaf5-4906557faed2"], -Cell[308998, 7871, 24818, 454, 290, "Output",ExpressionUUID->"f25b03e8-0c50-2442-86f8-c19dc28b43cf"] +Cell[244111, 6441, 2113, 59, 261, "Input",ExpressionUUID->"06bd0169-a5a6-404c-935d-e1a61565f71e"], +Cell[246227, 6502, 533, 12, 58, "Message",ExpressionUUID->"858fd648-a1f5-4041-954a-fc96693c211a"], +Cell[246763, 6516, 539, 12, 58, "Message",ExpressionUUID->"e4794fb5-5046-4858-93fc-b5057b211937"], +Cell[247305, 6530, 542, 12, 58, "Message",ExpressionUUID->"6f0a7ae3-d47e-40e0-b065-a06fe5017435"], +Cell[247850, 6544, 490, 11, 26, "Message",ExpressionUUID->"bcd0436a-4d2d-4268-b861-c7c91b368dcd"], +Cell[248343, 6557, 22974, 425, 232, "Output",ExpressionUUID->"65cc1318-eaa6-436a-b767-b64295c7bbe4"] }, Open ]], Cell[CellGroupData[{ -Cell[333853, 8330, 1616, 48, 86, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], -Cell[335472, 8380, 582, 12, 71, "Message",ExpressionUUID->"b6e3034b-dd99-1142-8723-42090efc2980"], -Cell[336057, 8394, 588, 12, 71, "Message",ExpressionUUID->"54e48413-1d3a-b844-8316-bcdf9191e67e"], -Cell[336648, 8408, 590, 12, 71, "Message",ExpressionUUID->"44ccd47c-7323-4a4e-a9d6-7424d8b3399f"], -Cell[337241, 8422, 458, 10, 32, "Message",ExpressionUUID->"4c2e41d3-b5d7-3f4c-ba94-0408b6a0e82d"], -Cell[337702, 8434, 171, 3, 41, "Output",ExpressionUUID->"c1bfc082-c70f-3140-a59c-c21547622f5b"] +Cell[271354, 6987, 2477, 69, 169, "Input",ExpressionUUID->"74d9506e-5e9f-ed4e-9e11-b938908ab9a4"], +Cell[273834, 7058, 9516, 222, 239, "Output",ExpressionUUID->"b2e9c405-a68e-4c8e-8c09-0d6ae67fb9b6"] }, Open ]], Cell[CellGroupData[{ -Cell[337910, 8442, 2251, 64, 81, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], -Cell[340164, 8508, 557, 12, 71, "Message",ExpressionUUID->"0e308aaf-a4b5-d740-9882-5c338a63d7a7"], -Cell[340724, 8522, 560, 12, 71, "Message",ExpressionUUID->"5e35cc91-e340-c74b-b6dd-42063e8a308b"], -Cell[341287, 8536, 565, 12, 71, "Message",ExpressionUUID->"c3f5c3a9-ece1-e648-aa3a-3f66f2873ea7"], -Cell[341855, 8550, 458, 10, 32, "Message",ExpressionUUID->"41503ce3-67a0-8a4a-b10a-c3db53fd260d"], -Cell[342316, 8562, 172, 3, 41, "Output",ExpressionUUID->"d9451200-e1de-5d43-8d07-ddcfc9babc52"] +Cell[283387, 7285, 228, 4, 29, "Input",ExpressionUUID->"6b0777bb-40fd-b54e-aa03-b6e82cb2e939"], +Cell[283618, 7291, 29361, 557, 232, "Output",ExpressionUUID->"00a607ce-8a33-48a1-a344-ae44aca11346"] }, Open ]], Cell[CellGroupData[{ -Cell[342525, 8570, 2218, 64, 81, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], -Cell[344746, 8636, 559, 12, 109, "Message",ExpressionUUID->"2247cd70-3ffa-2245-971e-6c6a2bd1ecfc"], -Cell[345308, 8650, 562, 12, 109, "Message",ExpressionUUID->"d9ae7d5b-4e89-a74f-be53-15700ab2593c"], -Cell[345873, 8664, 563, 12, 109, "Message",ExpressionUUID->"821c7ce3-36cc-9549-9881-1225eb1561cf"], -Cell[346439, 8678, 458, 10, 109, "Message",ExpressionUUID->"52af17f2-aff2-c34f-85c8-700b3d2f5f39"], -Cell[346900, 8690, 170, 3, 109, "Output",ExpressionUUID->"9a4afbd4-21df-4744-836a-2ed068742fdd"] +Cell[313016, 7853, 236, 6, 47, "Input",ExpressionUUID->"1ec1e156-ca0f-9240-857c-ac86e3a0e3fd"], +Cell[313255, 7861, 193, 2, 33, "Output",ExpressionUUID->"0a7238ce-7351-49d9-ad5b-1833aa4fb92b"] }, Open ]], Cell[CellGroupData[{ -Cell[347107, 8698, 2221, 64, 109, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], -Cell[349331, 8764, 559, 12, 109, "Message",ExpressionUUID->"3701f96f-691c-9040-a8a1-ff3958638338"], -Cell[349893, 8778, 562, 12, 109, "Message",ExpressionUUID->"9e260603-f97f-ac44-8251-869444fbcc24"], -Cell[350458, 8792, 563, 12, 109, "Message",ExpressionUUID->"f34d60ab-6a89-fd45-89b6-5f3b4b17dd22"], -Cell[351024, 8806, 458, 10, 32, "Message",ExpressionUUID->"27fa1c02-4896-1547-8cb5-b1b86182517f"], -Cell[351485, 8818, 171, 3, 41, "Output",ExpressionUUID->"7fdd69fb-d48e-e24a-a681-093b62cad9ba"] +Cell[313485, 7868, 1833, 52, 190, "Input",ExpressionUUID->"2a22eb8b-38c3-1f4b-a455-da901e49f6f1"], +Cell[315321, 7922, 541, 12, 58, "Message",ExpressionUUID->"17bfc6c1-d346-4d6a-b43a-4ad9b60187ef"], +Cell[315865, 7936, 541, 12, 58, "Message",ExpressionUUID->"c276cd8b-6ec0-4aa1-a863-e0cf06c403c8"], +Cell[316409, 7950, 545, 12, 58, "Message",ExpressionUUID->"6de25a73-e326-43c1-a55a-d4cc2e4df4ff"], +Cell[316957, 7964, 488, 11, 26, "Message",ExpressionUUID->"140ef0ad-eccc-442c-baa7-05fb6b476f35"], +Cell[317448, 7977, 24918, 455, 232, "Output",ExpressionUUID->"05ddf133-6129-4b7f-862b-da2b1e68094b"] }, Open ]], Cell[CellGroupData[{ -Cell[351693, 8826, 213, 6, 60, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], -Cell[351909, 8834, 173, 3, 41, "Output",ExpressionUUID->"20848a4e-e706-ec41-8982-5a7089f6420d"] +Cell[342403, 8437, 1616, 48, 104, "Input",ExpressionUUID->"6e7e1815-2cc6-b24e-a02d-18991b1a751b"], +Cell[344022, 8487, 723, 15, 63, "Message",ExpressionUUID->"05369c7b-5826-4752-bb1b-f7dfd4cb398b"], +Cell[344748, 8504, 724, 15, 63, "Message",ExpressionUUID->"2eedb5ce-1843-434c-8c7c-003895eeed92"], +Cell[345475, 8521, 722, 15, 63, "Message",ExpressionUUID->"6508b748-3138-4202-a182-6a211c3d78f5"], +Cell[346200, 8538, 490, 11, 26, "Message",ExpressionUUID->"f710f44b-93f6-45fa-9748-458cd836059e"], +Cell[346693, 8551, 191, 3, 33, "Output",ExpressionUUID->"8ee8604e-e620-4fab-9c0e-ece38384269d"] }, Open ]], -Cell[352097, 8840, 245, 5, 36, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[352367, 8849, 558, 19, 66, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], -Cell[352928, 8870, 170, 3, 41, "Output",ExpressionUUID->"c70c9f2e-d3ac-284f-9a22-d110345400ba"] +Cell[346921, 8559, 2274, 64, 212, "Input",ExpressionUUID->"0b10f52e-4583-2a4b-993d-96e59dd43e6a"], +Cell[349198, 8625, 598, 13, 65, "Message",ExpressionUUID->"5f14e4d4-5e4d-4a54-b1e0-14553586c285"], +Cell[349799, 8640, 602, 13, 65, "Message",ExpressionUUID->"c2d08cf3-76e5-4c25-ae05-b139bb0e4ec4"], +Cell[350404, 8655, 607, 13, 82, "Message",ExpressionUUID->"9471cf79-4d1d-43ac-bd0c-b000bf2868d0"], +Cell[351014, 8670, 490, 11, 26, "Message",ExpressionUUID->"fd998061-e052-4511-b392-c3e71bfd90be"], +Cell[351507, 8683, 195, 3, 33, "Output",ExpressionUUID->"baffa552-fbfe-48ac-bc77-87e6431e7ae2"] }, Open ]], Cell[CellGroupData[{ -Cell[353135, 8878, 170, 5, 71, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], -Cell[353308, 8885, 173, 3, 41, "Output",ExpressionUUID->"dc218355-20da-7845-8c8d-e506361cd90c"] +Cell[351739, 8691, 2230, 63, 212, "Input",ExpressionUUID->"a58948c9-6d3d-e847-a269-d2e0cc5d1484"], +Cell[353972, 8756, 602, 13, 65, "Message",ExpressionUUID->"5d080a81-8c6d-497e-bc3e-ba4deef5b8e0"], +Cell[354577, 8771, 604, 13, 65, "Message",ExpressionUUID->"2774569f-7bf0-4947-b378-87e9554e48a7"], +Cell[355184, 8786, 606, 13, 82, "Message",ExpressionUUID->"19678368-b84c-433a-a508-76ca8bf57a92"], +Cell[355793, 8801, 492, 11, 26, "Message",ExpressionUUID->"b17b18ee-78ee-4857-b0a4-abee26f9f69f"], +Cell[356288, 8814, 191, 3, 33, "Output",ExpressionUUID->"01d85c08-da6e-4b13-81b8-02a9961640b9"] }, Open ]], Cell[CellGroupData[{ -Cell[353518, 8893, 181, 5, 55, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], -Cell[353702, 8900, 171, 3, 41, "Output",ExpressionUUID->"b98e2d62-3142-7d4b-8175-9f6bcc8f676f"] +Cell[356516, 8822, 2233, 63, 212, "Input",ExpressionUUID->"c817b2d1-7deb-5a45-9938-ca10003188eb"], +Cell[358752, 8887, 600, 13, 65, "Message",ExpressionUUID->"7fcea880-31f8-4fbe-ba6c-610350fa5e52"], +Cell[359355, 8902, 606, 13, 65, "Message",ExpressionUUID->"a20c395a-b954-41c5-9f84-da70602b771d"], +Cell[359964, 8917, 607, 13, 82, "Message",ExpressionUUID->"d06b6a19-1036-4343-9838-1ecc5f502d88"], +Cell[360574, 8932, 491, 11, 26, "Message",ExpressionUUID->"e3e10373-e7ad-4bb1-94e8-0ddfe8fab79a"], +Cell[361068, 8945, 194, 3, 33, "Output",ExpressionUUID->"0ee0725b-826b-44d5-bb03-9862402d7ffd"] }, Open ]], Cell[CellGroupData[{ -Cell[353910, 8908, 6055, 185, 431, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], -Cell[359968, 9095, 172, 3, 109, "Output",ExpressionUUID->"e2235b96-63a9-b14d-b5d1-d13c73c5b35b"] +Cell[361299, 8953, 236, 6, 46, "Input",ExpressionUUID->"350334c7-7c47-c24c-8adc-781173809e57"], +Cell[361538, 8961, 196, 3, 33, "Output",ExpressionUUID->"1f16f839-de08-4789-8922-fa87d3482b46"] }, Open ]], +Cell[361749, 8967, 271, 6, 70, "Input",ExpressionUUID->"597921e5-69d3-564d-a8fa-092e912c15e0"], Cell[CellGroupData[{ -Cell[360177, 9103, 368, 9, 109, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], -Cell[360548, 9114, 172, 3, 109, "Output",ExpressionUUID->"776526ba-6ae1-2140-8428-6e0766592ce2"] +Cell[362045, 8977, 558, 19, 51, "Input",ExpressionUUID->"d8a22216-586e-3641-8d6a-b19164cbbef2"], +Cell[362606, 8998, 192, 3, 33, "Output",ExpressionUUID->"5fdc438d-a845-428e-8d8d-fd5d38c218c8"] }, Open ]], Cell[CellGroupData[{ -Cell[360757, 9122, 6122, 187, 109, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], -Cell[366882, 9311, 173, 3, 41, "Output",ExpressionUUID->"4456bf68-737e-1947-bc9d-24db2abd4b39"] +Cell[362835, 9006, 170, 5, 55, "Input",ExpressionUUID->"fdbad1ee-10c7-0843-8319-ad9a3350b059"], +Cell[363008, 9013, 192, 3, 33, "Output",ExpressionUUID->"5de0b8df-cd48-4593-9422-3d8b56c4e355"] }, Open ]], Cell[CellGroupData[{ -Cell[367092, 9319, 368, 9, 53, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], -Cell[367463, 9330, 170, 3, 41, "Output",ExpressionUUID->"04031349-1bc1-2c40-8d25-2e90a8f4b902"] +Cell[363237, 9021, 181, 5, 43, "Input",ExpressionUUID->"1e4255c3-6733-664e-86c8-98281eb7b3d1"], +Cell[363421, 9028, 193, 3, 33, "Output",ExpressionUUID->"f6b49610-06e7-4396-b01e-b02e4a8ebf3b"] }, Open ]], Cell[CellGroupData[{ -Cell[367670, 9338, 2663, 88, 215, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], -Cell[370336, 9428, 171, 3, 41, "Output",ExpressionUUID->"ab924ecc-12c3-f448-be6e-b37b3bf2a7ea"] +Cell[363651, 9036, 6055, 185, 474, "Input",ExpressionUUID->"70c538a1-1fdf-1447-919a-237a7f13ec4c"], +Cell[369709, 9223, 193, 3, 33, "Output",ExpressionUUID->"a7b8cbce-d131-4c16-b9e0-6e276c894c85"] }, Open ]], Cell[CellGroupData[{ -Cell[370544, 9436, 2603, 85, 215, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], -Cell[373150, 9523, 173, 3, 41, "Output",ExpressionUUID->"edd230b8-d34a-9d46-9fb1-cbff36fb79ff"] +Cell[369939, 9231, 368, 9, 41, "Input",ExpressionUUID->"309f305e-3fbc-e84e-99d9-1087d7a09460"], +Cell[370310, 9242, 195, 3, 33, "Output",ExpressionUUID->"a24d8f77-2555-47a1-9692-46dc1971e237"] }, Open ]], Cell[CellGroupData[{ -Cell[373360, 9531, 3712, 118, 316, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], -Cell[377075, 9651, 174, 3, 109, "Output",ExpressionUUID->"7ff053b6-f84b-bf44-8265-ecf6593e97c0"] +Cell[370542, 9250, 6122, 187, 474, "Input",ExpressionUUID->"e745b4b9-6adc-da40-98cf-d19095e176b2"], +Cell[376667, 9439, 195, 3, 33, "Output",ExpressionUUID->"d61382b3-2cf1-4007-8c33-71b2083f0604"] }, Open ]], Cell[CellGroupData[{ -Cell[377286, 9659, 2049, 58, 109, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], -Cell[379338, 9719, 579, 12, 109, "Message",ExpressionUUID->"ba9cccb8-fdfa-1d4c-9151-4c0bb8135009"], -Cell[379920, 9733, 582, 12, 71, "Message",ExpressionUUID->"dda5376f-614c-1846-a3e1-09857b4bcae6"], -Cell[380505, 9747, 584, 12, 71, "Message",ExpressionUUID->"7a2a8f8b-abfe-9646-a4d6-23b88b4059ef"], -Cell[381092, 9761, 458, 10, 32, "Message",ExpressionUUID->"61579f38-09d5-bc4c-9509-0aaf4718ceff"], -Cell[381553, 9773, 172, 3, 41, "Output",ExpressionUUID->"87b4581c-42ec-3248-906f-f100fdcc36d4"] +Cell[376899, 9447, 368, 9, 41, "Input",ExpressionUUID->"9d206cd8-8a5b-4046-b84a-e6b4fe810128"], +Cell[377270, 9458, 195, 3, 33, "Output",ExpressionUUID->"03a6d4ef-2768-4c9b-95df-bd9a3575eabc"] }, Open ]], Cell[CellGroupData[{ -Cell[381762, 9781, 2054, 59, 116, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], -Cell[383819, 9842, 577, 12, 71, "Message",ExpressionUUID->"19016d8b-0ad0-804c-b867-298523611be5"], -Cell[384399, 9856, 580, 12, 71, "Message",ExpressionUUID->"b91abb11-65b8-3b43-a495-4cb1457edd27"], -Cell[384982, 9870, 583, 12, 71, "Message",ExpressionUUID->"120f2ab5-c971-b748-a471-5d053961b4f2"], -Cell[385568, 9884, 456, 10, 32, "Message",ExpressionUUID->"e219a46d-9b55-8b4b-a17f-972d0b60293c"], -Cell[386027, 9896, 171, 3, 41, "Output",ExpressionUUID->"15e7db41-f53f-7c4b-886f-7ba04bf10a25"] +Cell[377502, 9466, 2663, 88, 285, "Input",ExpressionUUID->"2ec72619-a762-004d-a8c1-9773b798bf0e"], +Cell[380168, 9556, 194, 3, 33, "Output",ExpressionUUID->"0bf1bf09-ff9e-40ab-8f5b-5058931105a3"] }, Open ]], Cell[CellGroupData[{ -Cell[386235, 9904, 2030, 55, 63, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], -Cell[388268, 9961, 20493, 384, 295, "Output",ExpressionUUID->"33ceb84f-c9c7-504c-ae94-1b1d69b769af"] +Cell[380399, 9564, 2603, 85, 211, "Input",ExpressionUUID->"499f8153-6e36-8043-876b-5343c0af179e"], +Cell[383005, 9651, 196, 3, 33, "Output",ExpressionUUID->"b38f28df-4689-4a44-ac0d-63231819c383"] }, Open ]], Cell[CellGroupData[{ -Cell[408798, 10350, 2120, 60, 109, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], -Cell[410921, 10412, 501, 11, 109, "Message",ExpressionUUID->"b616cb85-0c12-9449-8e54-a070530c7874"], -Cell[411425, 10425, 504, 11, 109, "Message",ExpressionUUID->"d17cbbe2-194b-ec4c-bb30-d2fcc4c1a181"], -Cell[411932, 10438, 508, 11, 48, "Message",ExpressionUUID->"6c23e3dc-9bc5-a441-99df-2985793b0df8"], -Cell[412443, 10451, 456, 10, 32, "Message",ExpressionUUID->"de9af779-0821-a544-b1ce-6c66cf00e4d6"], -Cell[412902, 10463, 31462, 562, 290, "Output",ExpressionUUID->"d2a47969-eb62-c243-9b06-713ae9ea0a7d"] +Cell[383238, 9659, 3712, 118, 327, "Input",ExpressionUUID->"33c0834c-5a76-7640-a18c-d9704d756896"], +Cell[386953, 9779, 196, 3, 33, "Output",ExpressionUUID->"38da6242-4a2a-4f0c-b42c-097cdec830d6"] }, Open ]], -Cell[444379, 11028, 209, 5, 36, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], Cell[CellGroupData[{ -Cell[444613, 11037, 1616, 48, 86, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], -Cell[446232, 11087, 596, 12, 71, "Message",ExpressionUUID->"ca0dab71-62e4-1c4e-b2d5-91f300055932"], -Cell[446831, 11101, 602, 12, 71, "Message",ExpressionUUID->"aa43f3fc-5ec5-414d-bbd9-cf1b638f0a27"], -Cell[447436, 11115, 605, 12, 71, "Message",ExpressionUUID->"eaa52aca-1e19-e84e-9825-10ec4ac94baf"], -Cell[448044, 11129, 458, 10, 32, "Message",ExpressionUUID->"40ddf79f-d82f-b94d-9b78-050a48c24dda"], -Cell[448505, 11141, 171, 3, 41, "Output",ExpressionUUID->"f752c3f0-fe06-284b-bff8-a09adf8994cc"] +Cell[387186, 9787, 2074, 59, 234, "Input",ExpressionUUID->"77c444cf-c5b4-4b4b-9808-ff76b28fd32d"], +Cell[389263, 9848, 597, 13, 65, "Message",ExpressionUUID->"c292c06f-561b-49a7-a875-4b1208483bff"], +Cell[389863, 9863, 600, 13, 65, "Message",ExpressionUUID->"0d7bbce8-605a-4c1f-94ec-d590c06793ef"], +Cell[390466, 9878, 605, 13, 65, "Message",ExpressionUUID->"416028ed-2e36-4f3f-a869-e0ec6c93c8f9"], +Cell[391074, 9893, 492, 11, 26, "Message",ExpressionUUID->"8b743fcd-e2cd-4cf4-9576-5b038f3a7640"], +Cell[391569, 9906, 195, 3, 33, "Output",ExpressionUUID->"466e1ae2-3f33-48c1-82cd-d2eb986f69ab"] }, Open ]], Cell[CellGroupData[{ -Cell[448713, 11149, 2251, 64, 81, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], -Cell[450967, 11215, 577, 12, 71, "Message",ExpressionUUID->"03b49875-7e1c-734a-9395-591c7a6a0147"], -Cell[451547, 11229, 580, 12, 109, "Message",ExpressionUUID->"bbc1c804-e094-2b49-bceb-c837038552fa"], -Cell[452130, 11243, 586, 12, 109, "Message",ExpressionUUID->"340351a4-e10e-7141-b933-75e80a563962"], -Cell[452719, 11257, 458, 10, 109, "Message",ExpressionUUID->"45363ba5-7011-ce4a-bbb2-25b54117d598"], -Cell[453180, 11269, 173, 3, 109, "Output",ExpressionUUID->"a7117811-d866-a74a-b451-2e5611fcbe98"] +Cell[391801, 9914, 2077, 59, 234, "Input",ExpressionUUID->"baacd3f7-96e4-2949-b9f9-9afb90e551d9"], +Cell[393881, 9975, 595, 13, 65, "Message",ExpressionUUID->"a039db60-5dc2-47ec-9f53-2a8721af5ccf"], +Cell[394479, 9990, 598, 13, 65, "Message",ExpressionUUID->"9c22338a-e4c8-4421-a2eb-58bfd4db1fea"], +Cell[395080, 10005, 601, 13, 65, "Message",ExpressionUUID->"7550f613-2ca6-42f0-86e5-ed17590908b6"], +Cell[395684, 10020, 490, 11, 26, "Message",ExpressionUUID->"9f264013-b6e3-4843-87a1-55ccca797250"], +Cell[396177, 10033, 194, 3, 33, "Output",ExpressionUUID->"1f69fb09-7bf8-4445-908e-deb2841a6535"] }, Open ]], Cell[CellGroupData[{ -Cell[453390, 11277, 2219, 64, 109, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], -Cell[455612, 11343, 579, 12, 109, "Message",ExpressionUUID->"d229ea6a-26e4-d448-90bf-3044f07066eb"], -Cell[456194, 11357, 580, 12, 109, "Message",ExpressionUUID->"7911ebc5-127d-5841-a246-fcff3e2e3d7f"], -Cell[456777, 11371, 586, 12, 109, "Message",ExpressionUUID->"62b490bd-3e68-5b49-8d2e-1bbb1e520215"], -Cell[457366, 11385, 458, 10, 109, "Message",ExpressionUUID->"2c340204-da84-dd4d-abb8-8821cc152f8d"], -Cell[457827, 11397, 171, 3, 109, "Output",ExpressionUUID->"88b2df22-3f75-ff45-90a9-fda3ac3bb827"] +Cell[396408, 10041, 2053, 55, 151, "Input",ExpressionUUID->"ea08a5a9-d446-9147-ba82-e3924f732df2"], +Cell[398464, 10098, 20294, 382, 238, "Output",ExpressionUUID->"f5a7e4a3-ca62-4766-be9e-471ccd2babdc"] }, Open ]], Cell[CellGroupData[{ -Cell[458035, 11405, 2219, 64, 81, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], -Cell[460257, 11471, 576, 12, 71, "Message",ExpressionUUID->"8c45e08e-3e6d-d74b-a260-2b9be908c427"], -Cell[460836, 11485, 580, 12, 71, "Message",ExpressionUUID->"05cc4b97-7653-f04b-8664-f56b3128e201"], -Cell[461419, 11499, 584, 12, 71, "Message",ExpressionUUID->"880f1d89-ca48-ef4c-8955-16a02dd06624"], -Cell[462006, 11513, 458, 10, 32, "Message",ExpressionUUID->"fbbc91b1-3b40-a04c-8f78-5ca75ca88c9b"], -Cell[462467, 11525, 173, 3, 41, "Output",ExpressionUUID->"ea027f70-f222-b745-8c2e-f4a8bd2e0421"] +Cell[418795, 10485, 2143, 60, 261, "Input",ExpressionUUID->"42ddbf41-0bd8-b749-bead-56c89a9b7467"], +Cell[420941, 10547, 534, 12, 58, "Message",ExpressionUUID->"b79d4314-8f2e-46b0-8452-a3fc50b34fa4"], +Cell[421478, 10561, 539, 12, 58, "Message",ExpressionUUID->"c60069f1-b22f-4e1b-a462-83d02ca283cd"], +Cell[422020, 10575, 540, 12, 58, "Message",ExpressionUUID->"fe4810bc-2b49-4fdb-83c4-c067ac347b31"], +Cell[422563, 10589, 490, 11, 26, "Message",ExpressionUUID->"254b2e42-c0b3-42cd-9547-78a3a61de0ca"], +Cell[423056, 10602, 23900, 441, 232, "Output",ExpressionUUID->"ba897cb6-f9cc-4df9-a30e-ad0860ef4e3c"] }, Open ]], Cell[CellGroupData[{ -Cell[462677, 11533, 212, 6, 60, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], -Cell[462892, 11541, 172, 3, 41, "Output",ExpressionUUID->"3682abd7-ed62-9948-84cf-8fffa8ddbfe7"] +Cell[446993, 11048, 232, 5, 29, "Input",ExpressionUUID->"6883477e-2a54-0a45-979a-ae60c73e9e82"], +Cell[447228, 11055, 30286, 573, 232, "Output",ExpressionUUID->"385ecc30-6f57-4700-8e14-fd834ad16bdb"] }, Open ]], -Cell[463079, 11547, 244, 5, 36, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[463348, 11556, 558, 19, 66, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], -Cell[463909, 11577, 171, 3, 41, "Output",ExpressionUUID->"9fbf2f5c-e66a-8c48-92c5-cb97211e83a1"] +Cell[477551, 11633, 1616, 48, 104, "Input",ExpressionUUID->"93c0bac4-7a17-8748-9b2f-588171dbd56e"], +Cell[479170, 11683, 723, 15, 63, "Message",ExpressionUUID->"e934a55e-2760-4d2a-9d05-7e5128e888ad"], +Cell[479896, 11700, 723, 15, 63, "Message",ExpressionUUID->"24b93e34-1796-43b7-9394-f7e642db6653"], +Cell[480622, 11717, 722, 15, 63, "Message",ExpressionUUID->"4b5087a1-692f-4848-adcd-3d33a34e83f9"], +Cell[481347, 11734, 489, 11, 26, "Message",ExpressionUUID->"d6373b1d-53f1-4aaa-9674-4e14bd03862e"], +Cell[481839, 11747, 192, 3, 33, "Output",ExpressionUUID->"47bce984-6ec8-4657-8189-5c0f2a22d281"] }, Open ]], Cell[CellGroupData[{ -Cell[464117, 11585, 170, 5, 71, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], -Cell[464290, 11592, 171, 3, 41, "Output",ExpressionUUID->"7a911217-f777-234b-9e3e-66fa91b95a93"] +Cell[482068, 11755, 2274, 64, 212, "Input",ExpressionUUID->"fcc64ab7-eee0-e44f-9b2d-2a98ba29b602"], +Cell[484345, 11821, 597, 13, 65, "Message",ExpressionUUID->"d7b813a8-4c09-4915-a0a8-296fd2ef032c"], +Cell[484945, 11836, 600, 13, 65, "Message",ExpressionUUID->"91a1128b-84ad-4db2-b8a9-0e177b6f9d0f"], +Cell[485548, 11851, 601, 13, 65, "Message",ExpressionUUID->"8573bdb1-63a4-4e03-96ed-6d34016d10fe"], +Cell[486152, 11866, 490, 11, 26, "Message",ExpressionUUID->"4c4d0099-ff7f-4676-8b97-11314666b886"], +Cell[486645, 11879, 198, 3, 33, "Output",ExpressionUUID->"23359f17-6a5e-4785-973f-bdae9e0d79ac"] }, Open ]], Cell[CellGroupData[{ -Cell[464498, 11600, 181, 5, 55, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], -Cell[464682, 11607, 173, 3, 41, "Output",ExpressionUUID->"71512215-c060-b042-87dd-cf63c2fdbe79"] +Cell[486880, 11887, 2231, 63, 212, "Input",ExpressionUUID->"edfdd675-c60b-304e-9e16-68452b971319"], +Cell[489114, 11952, 596, 13, 65, "Message",ExpressionUUID->"cd3d62ce-e472-4dff-a410-a777cc4ba15e"], +Cell[489713, 11967, 602, 13, 65, "Message",ExpressionUUID->"ae08cf8f-15d5-43f6-863b-2bfcd6bf24a6"], +Cell[490318, 11982, 602, 13, 65, "Message",ExpressionUUID->"2a189819-7d98-4f44-a9c7-907d7e03fbf3"], +Cell[490923, 11997, 492, 11, 26, "Message",ExpressionUUID->"6737854b-f13f-45d1-b677-93b764806dd1"], +Cell[491418, 12010, 193, 3, 33, "Output",ExpressionUUID->"ed2de846-9691-4598-beba-511a842a3b24"] }, Open ]], Cell[CellGroupData[{ -Cell[464892, 11615, 6055, 185, 431, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], -Cell[470950, 11802, 173, 3, 109, "Output",ExpressionUUID->"83eb5a5c-2221-9048-9616-76c841caa7ff"] +Cell[491648, 12018, 2231, 63, 212, "Input",ExpressionUUID->"d0469d46-2e74-494a-be85-b41cb2f3fa92"], +Cell[493882, 12083, 594, 13, 65, "Message",ExpressionUUID->"e42d0af4-13c5-4754-b898-9bfd1bb29c9e"], +Cell[494479, 12098, 596, 13, 65, "Message",ExpressionUUID->"43372106-cbec-4c73-b002-6886bd001ab6"], +Cell[495078, 12113, 602, 13, 65, "Message",ExpressionUUID->"791c3e21-3204-4f37-a38f-57608c14017f"], +Cell[495683, 12128, 491, 11, 26, "Message",ExpressionUUID->"17950887-230f-4d91-9a41-3743d844aae1"], +Cell[496177, 12141, 197, 3, 33, "Output",ExpressionUUID->"426d1a54-f3ca-43ce-9341-33134c71837e"] }, Open ]], Cell[CellGroupData[{ -Cell[471160, 11810, 368, 9, 53, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], -Cell[471531, 11821, 172, 3, 41, "Output",ExpressionUUID->"3469ea64-5888-e347-a592-fe58acf45252"] +Cell[496411, 12149, 235, 6, 46, "Input",ExpressionUUID->"58b5e243-0972-1946-bd17-aca0f3e8a35b"], +Cell[496649, 12157, 195, 3, 33, "Output",ExpressionUUID->"e5372f11-c065-4aa7-a8d3-105bec62f64e"] }, Open ]], +Cell[496859, 12163, 270, 6, 70, "Input",ExpressionUUID->"8ae59c8e-a0a1-f646-a3f5-a3711ba632a4"], Cell[CellGroupData[{ -Cell[471740, 11829, 6122, 187, 431, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], -Cell[477865, 12018, 173, 3, 41, "Output",ExpressionUUID->"6078ae64-e041-ef46-9c98-aeb384a7565b"] +Cell[497154, 12173, 558, 19, 51, "Input",ExpressionUUID->"403fd1b3-6929-134c-834a-14f2acd2fccb"], +Cell[497715, 12194, 191, 3, 33, "Output",ExpressionUUID->"ee2483ff-750d-48d0-b448-8d9c6bfe7c21"] }, Open ]], Cell[CellGroupData[{ -Cell[478075, 12026, 368, 9, 53, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], -Cell[478446, 12037, 172, 3, 41, "Output",ExpressionUUID->"ed53339e-8a54-b740-a712-127e0aa48364"] +Cell[497943, 12202, 170, 5, 55, "Input",ExpressionUUID->"434ec2be-ef30-1d48-bf44-e1e8b179c2e0"], +Cell[498116, 12209, 192, 3, 33, "Output",ExpressionUUID->"8ce6c10a-37a6-4131-84d2-15b4360c0207"] }, Open ]], Cell[CellGroupData[{ -Cell[478655, 12045, 2663, 88, 215, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], -Cell[481321, 12135, 173, 3, 109, "Output",ExpressionUUID->"0881e898-a895-4f44-9932-c9b57f23fb23"] +Cell[498345, 12217, 181, 5, 43, "Input",ExpressionUUID->"defdc4af-a758-2c46-b8da-ac4403e5ffd4"], +Cell[498529, 12224, 194, 3, 33, "Output",ExpressionUUID->"cea6f529-05fa-4751-9c6c-23cf28f968b7"] }, Open ]], Cell[CellGroupData[{ -Cell[481531, 12143, 2603, 85, 109, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], -Cell[484137, 12230, 171, 3, 109, "Output",ExpressionUUID->"6f8be6ff-3439-7547-b2e5-a7f15df03852"] +Cell[498760, 12232, 6055, 185, 474, "Input",ExpressionUUID->"7643457c-ba0b-b641-aa35-59c61447beaf"], +Cell[504818, 12419, 197, 3, 33, "Output",ExpressionUUID->"856eeeb1-c368-4ec9-a6e1-1d23b05dbc4c"] }, Open ]], Cell[CellGroupData[{ -Cell[484345, 12238, 3712, 118, 109, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], -Cell[488060, 12358, 174, 3, 41, "Output",ExpressionUUID->"5f1268db-50d9-294a-839d-2dc73b3483c5"] +Cell[505052, 12427, 368, 9, 41, "Input",ExpressionUUID->"88a32c79-3b56-5047-96b0-6fadcea3787e"], +Cell[505423, 12438, 195, 3, 33, "Output",ExpressionUUID->"0f3e30a4-b6b2-40e6-be8a-a5e513274ee6"] }, Open ]], Cell[CellGroupData[{ -Cell[488271, 12366, 2054, 59, 116, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], -Cell[490328, 12427, 574, 12, 71, "Message",ExpressionUUID->"fea97571-51b6-bc4d-8922-e67cbea226be"], -Cell[490905, 12441, 580, 12, 71, "Message",ExpressionUUID->"f9381c1d-d837-a646-bb62-f69cb564b78b"], -Cell[491488, 12455, 580, 12, 71, "Message",ExpressionUUID->"2dd3f3b2-ca3e-6c42-abc0-5cf7523a6a65"], -Cell[492071, 12469, 456, 10, 32, "Message",ExpressionUUID->"5a727290-5b6b-a347-9739-3df9958ec415"], -Cell[492530, 12481, 172, 3, 41, "Output",ExpressionUUID->"44426372-aa84-bf4c-9f95-4de13286a09a"] +Cell[505655, 12446, 6122, 187, 474, "Input",ExpressionUUID->"12b95c40-ca91-7148-a053-e8c97b54e7b6"], +Cell[511780, 12635, 194, 3, 33, "Output",ExpressionUUID->"61a358ba-ae28-4955-9089-ac6ce69a68d4"] }, Open ]], Cell[CellGroupData[{ -Cell[492739, 12489, 2054, 59, 116, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], -Cell[494796, 12550, 576, 12, 71, "Message",ExpressionUUID->"a32ffe4b-5346-7b46-9dee-b8bad033001e"], -Cell[495375, 12564, 577, 12, 71, "Message",ExpressionUUID->"902c6490-8537-484d-8825-0d2295db4f12"], -Cell[495955, 12578, 582, 12, 71, "Message",ExpressionUUID->"1b49285c-a5d9-074c-871b-37b4cadb7269"], -Cell[496540, 12592, 458, 10, 32, "Message",ExpressionUUID->"2ff3d4da-4949-1448-b68b-aac1ae56bb1a"], -Cell[497001, 12604, 172, 3, 41, "Output",ExpressionUUID->"046dcac0-9165-4b41-8a82-c19ed01a7ad4"] +Cell[512011, 12643, 368, 9, 41, "Input",ExpressionUUID->"4e259183-4a48-7f41-8fc6-1aa60d807e18"], +Cell[512382, 12654, 196, 3, 33, "Output",ExpressionUUID->"53fd7287-61d5-4abc-a2f1-9112f8b9c712"] }, Open ]], Cell[CellGroupData[{ -Cell[497210, 12612, 2028, 55, 63, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], -Cell[499241, 12669, 20021, 378, 109, "Output",ExpressionUUID->"d1cda4a3-f1fb-0d44-a506-74525ae66245"] +Cell[512615, 12662, 2663, 88, 285, "Input",ExpressionUUID->"73b06553-f9e2-3447-85e9-8a163aa2ec21"], +Cell[515281, 12752, 198, 3, 33, "Output",ExpressionUUID->"2bb2337d-c4e7-485f-945f-1d1cd9591a4a"] }, Open ]], Cell[CellGroupData[{ -Cell[519299, 13052, 2146, 61, 109, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], -Cell[521448, 13115, 502, 11, 109, "Message",ExpressionUUID->"56dc07a7-05cc-424a-8fff-08f056385a44"], -Cell[521953, 13128, 506, 11, 109, "Message",ExpressionUUID->"71ae3883-d346-164c-9764-dc57f6863817"], -Cell[522462, 13141, 508, 11, 48, "Message",ExpressionUUID->"16c86d51-9f27-3c48-b312-93c489e538a4"], -Cell[522973, 13154, 456, 10, 32, "Message",ExpressionUUID->"64c101a8-dc8b-1f4e-9946-a38ce949c736"], -Cell[523432, 13166, 30030, 538, 290, "Output",ExpressionUUID->"f98d1ba6-9bcb-b94f-a8fa-792e22f5ac65"] +Cell[515516, 12760, 2603, 85, 211, "Input",ExpressionUUID->"64658d71-e48f-7c4d-bfd6-30344127c7bf"], +Cell[518122, 12847, 192, 3, 33, "Output",ExpressionUUID->"003fc379-70c0-41cf-a26d-75678a9202d9"] }, Open ]], -Cell[553477, 13707, 209, 5, 36, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], Cell[CellGroupData[{ -Cell[553711, 13716, 1590, 47, 86, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], -Cell[555304, 13765, 342, 6, 26, "Message",ExpressionUUID->"9e6d6a70-ad75-9b40-8a0b-ca802f09d5a2"], -Cell[555649, 13773, 101, 0, 41, "Output",ExpressionUUID->"b372c493-d6de-934f-951c-1a3f45718733"] +Cell[518351, 12855, 3712, 118, 327, "Input",ExpressionUUID->"02b10812-8656-6e43-99ab-3ff059fd6dae"], +Cell[522066, 12975, 196, 3, 33, "Output",ExpressionUUID->"94a838fc-3cbe-4a5f-9f0c-d4bb9ef86aba"] }, Open ]], Cell[CellGroupData[{ -Cell[555787, 13778, 2249, 64, 81, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], -Cell[558039, 13844, 342, 6, 26, "Message",ExpressionUUID->"9e9d949e-1d4c-8649-8d0e-b7deecfb3ba4"], -Cell[558384, 13852, 342, 6, 26, "Message",ExpressionUUID->"76f8ef60-aab6-7442-aeca-4cebad23cb0e"], -Cell[558729, 13860, 101, 0, 41, "Output",ExpressionUUID->"37cdd74c-8ec4-9047-aa14-d493ed3e18d0"] +Cell[522299, 12983, 2077, 59, 234, "Input",ExpressionUUID->"ba508068-6b78-254c-87d6-cf1adc0753dd"], +Cell[524379, 13044, 597, 13, 65, "Message",ExpressionUUID->"0f4f0e5d-bb75-42ff-80d7-39ad0390f259"], +Cell[524979, 13059, 602, 13, 65, "Message",ExpressionUUID->"3a117578-ae02-4569-af05-f43ad03bdb2f"], +Cell[525584, 13074, 605, 13, 82, "Message",ExpressionUUID->"b70a8c94-f213-4ce8-a6d6-a4d3b4e50bae"], +Cell[526192, 13089, 490, 11, 26, "Message",ExpressionUUID->"7bc7d582-5ac9-4d66-be72-020e8171606c"], +Cell[526685, 13102, 195, 3, 33, "Output",ExpressionUUID->"7c63487c-d349-4680-8097-d71902bab315"] }, Open ]], Cell[CellGroupData[{ -Cell[558867, 13865, 2221, 64, 81, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], -Cell[561091, 13931, 342, 6, 26, "Message",ExpressionUUID->"566a849f-fc85-4d42-a545-a46d44cf7346"], -Cell[561436, 13939, 342, 6, 26, "Message",ExpressionUUID->"fb1cb4d6-a504-e445-bb52-7946e1bca3c6"], -Cell[561781, 13947, 100, 0, 41, "Output",ExpressionUUID->"5fc76ad3-8f3e-9246-bda1-78737e269d99"] +Cell[526917, 13110, 2077, 59, 234, "Input",ExpressionUUID->"842e33e4-ae06-f746-ab8b-97489285cc9c"], +Cell[528997, 13171, 599, 13, 65, "Message",ExpressionUUID->"4c3b0044-116b-451e-b2ee-23bf8ab39723"], +Cell[529599, 13186, 604, 13, 65, "Message",ExpressionUUID->"3bf1f2f3-ed05-4aa0-ad8c-93f2c2859cdc"], +Cell[530206, 13201, 606, 13, 82, "Message",ExpressionUUID->"4798f47c-96cd-4924-a649-f4cac77026cb"], +Cell[530815, 13216, 492, 11, 26, "Message",ExpressionUUID->"17e28b1d-02db-4816-9195-880c660012a3"], +Cell[531310, 13229, 194, 3, 33, "Output",ExpressionUUID->"28e7efbe-5d3e-4bf9-96e6-5e412c6d570c"] }, Open ]], Cell[CellGroupData[{ -Cell[561918, 13952, 2223, 64, 81, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], -Cell[564144, 14018, 342, 6, 26, "Message",ExpressionUUID->"f9e34ec5-1462-b340-b2e7-8e875dd33d28"], -Cell[564489, 14026, 342, 6, 26, "Message",ExpressionUUID->"19ffb858-7059-2a48-a3db-e2d0dfcf2131"], -Cell[564834, 14034, 101, 0, 41, "Output",ExpressionUUID->"dbb2a900-6759-7349-a1e8-ea8b52a29f31"] +Cell[531541, 13237, 2051, 55, 151, "Input",ExpressionUUID->"b2e314f8-a6f0-6942-a94c-5ac1cacd7190"], +Cell[533595, 13294, 20369, 383, 236, "Output",ExpressionUUID->"afe82ea8-2874-4092-9df7-64d9d8af57a3"] }, Open ]], Cell[CellGroupData[{ -Cell[564972, 14039, 213, 6, 60, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], -Cell[565188, 14047, 102, 0, 41, "Output",ExpressionUUID->"8f1edf59-aed7-914f-9d19-1949d2a555d6"] +Cell[554001, 13682, 2168, 61, 261, "Input",ExpressionUUID->"497f9779-a3e4-c84e-a207-0aac70483e3c"], +Cell[556172, 13745, 537, 12, 58, "Message",ExpressionUUID->"ed1da5e9-a60a-437a-abc3-4a748b19e80c"], +Cell[556712, 13759, 540, 12, 58, "Message",ExpressionUUID->"298a7065-a225-4780-9a5b-4bb0572f6a27"], +Cell[557255, 13773, 544, 12, 58, "Message",ExpressionUUID->"ed47005c-f8da-4933-8c31-efb5a192501d"], +Cell[557802, 13787, 492, 11, 26, "Message",ExpressionUUID->"ad3b5fd1-2c94-4e00-9dba-ebf3c288691a"], +Cell[558297, 13800, 24010, 441, 232, "Output",ExpressionUUID->"33a182ca-4dce-4de9-a206-58083200b323"] }, Open ]], -Cell[565305, 14050, 115, 1, 36, "Input",ExpressionUUID->"1b4ac5f6-8121-4c51-89ab-64c8cf1fc657"] +Cell[CellGroupData[{ +Cell[582344, 14246, 232, 5, 29, "Input",ExpressionUUID->"54d9c986-d109-3d4c-9ee8-76427bb63659"], +Cell[582579, 14253, 30394, 573, 232, "Output",ExpressionUUID->"49f6e09d-497f-4aec-861a-356be647a0c2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[613010, 14831, 1616, 48, 104, "Input",ExpressionUUID->"5dd0afca-0a4f-544d-814d-33e1c649116f"], +Cell[614629, 14881, 701, 15, 63, "Message",ExpressionUUID->"575e9580-e880-4ed1-9044-4faf67da4486"], +Cell[615333, 14898, 700, 15, 63, "Message",ExpressionUUID->"f1b4696c-c394-4381-abc3-9a02888d4479"], +Cell[616036, 14915, 700, 15, 63, "Message",ExpressionUUID->"85721fce-76c5-4fcf-b2b0-d78a4c85fcee"], +Cell[616739, 14932, 468, 11, 26, "Message",ExpressionUUID->"92a749c1-3994-4cae-a441-708b2caffa1f"], +Cell[617210, 14945, 171, 3, 33, "Output",ExpressionUUID->"d150c11d-62a0-47ae-9997-9cca99ef2af6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[617418, 14953, 2272, 64, 212, "Input",ExpressionUUID->"a3e3d205-e3b4-874a-a36c-53cfa72184b4"], +Cell[619693, 15019, 575, 13, 65, "Message",ExpressionUUID->"c08aec8f-6323-4e9b-95cd-d9efaf788acd"], +Cell[620271, 15034, 580, 13, 65, "Message",ExpressionUUID->"8233014d-4c06-4c5b-8e25-69c06795bfa8"], +Cell[620854, 15049, 583, 13, 82, "Message",ExpressionUUID->"8c95075c-4098-4b4a-af93-331ba6d11263"], +Cell[621440, 15064, 468, 11, 26, "Message",ExpressionUUID->"39439b17-ef5e-4750-823d-d76f9e0e7f95"], +Cell[621911, 15077, 170, 3, 33, "Output",ExpressionUUID->"dd04fab9-6dbf-4957-b622-b4418905f51c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[622118, 15085, 2233, 63, 212, "Input",ExpressionUUID->"6977f025-454e-0e4a-b118-07bad9ba3e82"], +Cell[624354, 15150, 575, 13, 65, "Message",ExpressionUUID->"7471a42e-27e4-4e56-9f30-34d3059a156a"], +Cell[624932, 15165, 580, 13, 65, "Message",ExpressionUUID->"97cd2fa1-80c6-4b87-923a-91ddbe7acb90"], +Cell[625515, 15180, 583, 13, 82, "Message",ExpressionUUID->"007ff6fd-2594-4f5a-adcb-52917cd0b6bb"], +Cell[626101, 15195, 470, 11, 26, "Message",ExpressionUUID->"c30edba5-7a22-47e1-ac16-885234a55753"], +Cell[626574, 15208, 171, 3, 33, "Output",ExpressionUUID->"2e27c3ac-8317-4859-a43f-21baf6197282"] +}, Open ]], +Cell[CellGroupData[{ +Cell[626782, 15216, 2235, 63, 212, "Input",ExpressionUUID->"df8ecb01-788a-604d-b773-f29bb610eb30"], +Cell[629020, 15281, 575, 13, 65, "Message",ExpressionUUID->"391a746a-ea22-4c64-96d2-a91661234557"], +Cell[629598, 15296, 580, 13, 65, "Message",ExpressionUUID->"7ce9bbda-2846-4e75-9dfd-a8cc52d8baf0"], +Cell[630181, 15311, 585, 13, 82, "Message",ExpressionUUID->"238cefcc-fe8b-4f58-8e45-5bde63c96522"], +Cell[630769, 15326, 468, 11, 26, "Message",ExpressionUUID->"3ded6875-7194-4d68-8f45-e2a57fe67689"], +Cell[631240, 15339, 172, 3, 33, "Output",ExpressionUUID->"ef64c454-ed51-4e99-badc-fc822178d9c1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[631449, 15347, 236, 6, 46, "Input",ExpressionUUID->"54a5e329-20bd-e742-afe8-d2cfa007cfcf"], +Cell[631688, 15355, 173, 3, 33, "Output",ExpressionUUID->"929a0737-d31d-4e31-ba5b-b793b6ec166f"] +}, Open ]], +Cell[631876, 15361, 143, 3, 70, "Input",ExpressionUUID->"1b4ac5f6-8121-4c51-89ab-64c8cf1fc657"] } ] *) +(* End of internal cache information *) + diff --git a/Pu240_798-811_TitovAA/result_table.xlsx b/Pu240_798-811_TitovAA/result_table.xlsx new file mode 100644 index 0000000000000000000000000000000000000000..167a19dfabd9b50af783d5ccf607c92ca73d42f6 GIT binary patch literal 393672 zcmbTeWmH^So34#ZaCa#*xVyVcAZTzWxH|-g;O-Ed1cE2HYvC@zp>TJHQ_0@ve5c>H zPj~OH{?r6(Jr-b?o}0QiZHcv;rq5Usr_<76qmdJ-H2*5~ z{;u|;!{}wG*9kR&hV6UIZSWZTc?0aXDtJj}Wk~8m zbHAjA&$_O(f-QQCMTlPWy5hx{lfo2-%)J5ATkNF(mm%{9!1OMAa6ExyhVdYB)5u#h zX+1bham9t1*vubr-Ef*j5k%S!ytfrEiu@Z#{ABoQRq9^{@z+ktz5KV)iU=1760 z_piRUg>^TwH-o<@7b$Jx%;GA95`}92!+@Xs4V_J1qF?imI5Zw?l+l$EwKQ*YtCP#; z%dNxfLzFnX`SZhuy`QE$>>hTDZ(CLp_1!do&V_0=^#1%|b6*N-IP||*CrENoRe(p} zI*tF42MGc33=09F`cDF8|F?i26Gw_1xW1#SQKOrP8OJDYaVKC3d>$=SXoSPtz(0<0 zJb(;Due-Vf=W8-*d;b6B%L&fc2ApqJWXqDd1LOb6S6QbfJ#QrYcfMJF^5uvzZDD@T zbo|vi`9^@~cfRH=G5=S-K-T}0@5p7-pM0M*?bvIG6~~z&rIOQreg&QA&b?eMoy_)L)htZU z0-K$ZnFBS0EiEHtBxG1rJOVN6p}^vMV0GXu+$P){5dyKc6S=d|Xy8Pk2D}OU90>xc zwimg#(Q(32!taz{asq^0e@Ct3L*--kzeoS$fC^C9{8+tKCGO^Y98pS%p`m;xbQS+# zspC`xwJMzFXwjbbqN5LY<jUD#2o(;G5jz%;&frrA_M^Vg)2BW$Z3y7S5vqk*c@Wxh!G3P)BUwn zFeJVBIN)fK)&?~$_m{L_`s(}`E~dK+U9^5qbo!-e-_ z#uFYf7&QwI;+gTb3Wfw&zi4^{^US_ie#h2W z=6){r5p=rc#%6C{%Q6SV8GAeWmh`J7|2QRVYoD<5eew3Z(Uda|U^%RfmmgFAKwH`5 z@EtG8)w~rn4>?-`TcjJm_)4Hi0Ae>3V$EnvUfg2eN+xj0kQ-8L9N{!C(X&Wp=U}eO zV}I0xa~2<2oJsvB+c=>8dGFtM?tj?IRf7gKH=mDiY`_QS>J|bP+CEY@pMPkXRdL@e zjsxYSw2W8MIa*xb-@ZJ&+?+q12T_V-M=V5Fg#m@I^+VfFqSqA9jBo2t{A6W%JXel# z4n;mVT?A-!dr zZ*kDd%Q>C@=v2;<41J8$_GzHFg{wr@Gk51h0*9ZbX2GXl_3!yO&dRt~b!$GTj&a11 zV|zEN1%1EPL~xm$YlIi#7H6`o-TQ@hpp;RP7!{QmFd}8Fi$Tq9VZ?l;soAW)Md{ts zpqSwk_}qc*4Al5KJd=ISF5+4|4FOAB|HkC?OJE+8cw2AOD_t@gq4L22wbk8ui%_9Ywd8TD@r~Z!|M(R9wQ6obzB-g!9>4uZAGWRmqJ70x z;hWR1wSH46&lDft%V)7jWeEI)_%^Zd!|A6_6&m{r1GiqXX2GEs!=_M%Os?D@4BiMU zt)Jlq(Q_N;l7pSUx8M$C(G%_2`j>E0!i@;jLii1;Xe$LYIdSoVgsXMANeK&YMNrX{(Mb@-w??4Xdt*50>lMN9Pilhh zyKiV=RRnunE?Q%OPTmlW`Cn<}S;h8nd{sEWFu%Qq7%!?zm| zH-xM3D#%~%+wVC=>rX*A@t$Q~B^X_3^TH9ElMwmVkXNrwF7_rjRj;#azZu_sN?}w2 z4FMrU{$DYk@?ZA4p|iQ|f86oRzen0;S3dTTW5b`(E(i=Z87fY3E6FH1^nYn6^ns95 zj%M`#Vqf7PVvMZ0V5YUJ*4H62_D(QYcw}gmP4c+nQ^~i$e3F%-@0e%KUd^Y0eN@L( zT9)rRaVWFHTDCYU*|&w9CWUK>O$t9zQ@?h45#w>PYmOC;GSneSmk1(%_Tg)n4{iN^ z7#p5Pz`AT!dr3u}U0MR^-sJtH(wJo_v{^{BhWzVlm_RSf*Aq2a%otNuV|l%3d;Y29 zLKE_}=Uoz?yVO9~$mEQatO7ip2lyxzKVu^i$DUO))0$ph@I z#d^h8_{w)es!x#p0YMy}p~AUS=^GE}7G=es1rd2)2(MQL)!K(<4F^}S2OvpQdKjA| zya&T;Xbjqu%%wd}0voKLNdkul8+q@xR%+;h+&|tj*wz@Vejll$XfXV}IN?pKgJHo_ z2@hVN|8K|qdn!E~oNZjJ%*|b0SpK~Ixe(>FE&a@vp5uIgc_b0^U2EhGmTq|k%p<<} z928_?c<55zA|$+Y5kC|DddwrMpn@FMbhe>{Ksa{aPZ zYAF2lvUS_uaR1VB+wuCeQPuJEa!c0Hff6oaz7}x1f7!D3`fxIj*3t2L{`mU%GJX5H z%kny&_xilC_3HmH@OYcok%i#@dbM@?diQi6$0PD|w!a(D`g*)Vd)h;G8jz>^ai4u3@N!-nc@bxg{dzfE)#3ZnVc35yepyA<@wz*(wzkaoa>X8f z&*MgdQNG#3>tX~UnY1Cc)EKfOX|4qx(%fF9%!EkzdqT;D_P^rOp919 z9W;D-3ax#wY^xsK=l+uGd@;7JGYCCdNe(c$8?fGptBG3(Xv z3M3-93;(KQh_-v5f8zMM(RNSft#!Vo1#B>sG9VOr)p)qmcv$1z!e9u%sBryJB~$nN1{iwsv*RKF_Bo;wwbZk-gR8k+=4|Jx(U_^w<)28AscH zPv$_IsbaYE;`$~ab0XlmZ|&(mJYck=E$iuO7Ie5^X%y9o8Ylz>4-<=kjgX9xjb7Fc z1w>K}fStlyw2U0Wyycjt_>Ovjs(1i zC_ z9Q}blv|U-;Fl9n3Mp=k*0->-8q0l;X(pB70E5FKM&j$UW8PP9h{Lz`l-u{jlr30RKpd zCoa_CL+c<9B)0G4h`y{~i|awyPi{#+TP%vF&$h^=| zV_&R5IA!*Z5mZeJg-jfA@L_LExcX5T_Eu1LWWWRFYcd*{#SORHPBGpVu*L;B$XdIx zBv1@Si1>?8CxDnFcw*QI<83GTh|$O73D{iS(ix#2i75E*CnN|ziRDbq=-%4Z?JNyv zIxOL=x!bh2Ro?$JygaVnTw2O>7@%!;E3vy_x8rcOd$SAT{*cR*uq)%J*Mh9|9a)Ph z+(dVpr_l-^6^LCdk)V7?sw`Mk7GE%CW%8ZOZ|jQ4Teva>@2H{AUx3%U*+@U3K<0B- zzHDnm37lFq(i_^Vdxbq0VNatKe=bDsI3)kDsAJ}VgKZ!S}7{3Y0ec5CnXLv*9@Xg3GgY(rO+ZUu@WX%R5=jeNejawd; z^E_C%Gtscy4UeqO*QwTXUp;4cs~SWoUWpqs%mQHG1K>PDZqGhjaTEXKr@{ezl`t($ z7vhHmxv<-=>lHJ;H5d<`WiM2%45SR(0`wHfpFrr=>;xrJ3DrvCU-&x#Dm0UDdcuxY zP8aNm{1#M6oW9$!%eNg$XH`L83#rUJ)n8bf*Z4xFdms$fI;qY~TI*Jl24u(AHN7Gwygh zQx${WcJakBk0(Lw@=C$#uO`VwN3DyF4V~#aQzjwcbtNb!j@l#%-f;sv-gIvEc1?1nleSF8!Ri(@t|u=<#*I(Vf)*t2V8piu zolMqH3i^6AmzU$Sobnsj?+PJGxgPk6bz=Pc;f?s)AuKtY`SPW*mZOQ#K^8N`((W!- zL$)tJWj3a1U;!V*-9wHL`OuxIipYzoK$5ajvPy#)@nP{u044wlKug?P98TOmBwC?2 zW{f9c<@MVu9FRf~#*W|@TfOC8=R`t&P<~=QmIRIjmxN^)VHh*=4`erFeS!l5Li}bn zPX2hJI)|XvSB)Xxc0aP7t)A3)5`d35Y6vkR9ReL9ABNgWg87~a|3EZlF_EoVJNgvn z6oxZ(5v>_HNP4hQkeMe4*nm)5E8p_qk+n_lg~yk7a`;Ha`&h)ACFyESJDU+9pM>CX z8(BtCpzAo8K|J*qwMq4s$!(1ewF&c`ie&I+JP}6Bi;YQro_`hxoxTjl;%dU~(sK#M z$?XT}`i&}AkN3?C$tUu~ElE@Q#jaXOKI0*rL-EW*@w(=+Ia4bd`;}VFM9C-i@*Z3A z9w*u3?W6ZCvdx2#jS|Chaf7k(LI8O2*bwZHa_Xp_k=bHZh(+yA}S@P zu|^?;S3Dc3eJN9&fSbxluaBoEEOJHD5|Hf{=j`Ub?pQknFqN@;eRSXaDy4WGN;)t0 zbYTp3whkh2#eyz@9^)CT-9&uE(y5)S@`P_kxd)7tdApZ*h^0S061#Qs|6Jd(m>o^i z;AtqgKbc$h)pv90IM^{B9c|Fyi5p)&Qoa(++RN@!%0TqUN}GXMMp%N)ZXC-vLHaM^k`jiF(3TFmFmH zqJ$#zA(nUAd<6&PN_d5{*cGR5^}|6Mbmphiia&EC+Aiw|e@YS;$FNRm3{W5?kr(;ye{_H_}w^qQ`N}5{s(z zwN32~)?BjkETmxUQQbI6NSV?q<#kCJJv7Y%1Si|9Nx2Frw}Irbxju6M-60{OSRrq661`R zQzMa`;=-Z6$y^@Hsn3okZje$-6L`h4dkIJx*TSSB)r`w|!Z%!AXu_?*D=fUVN+{^- z`XSr;=~Rd$YOv6a>=%b#tpc$W{`7Y^$Gb)Z4J!;vndfTlB1PF)`-w@!)inJx2uwj1 z-TF?KatV>}bS`IVk*(QMS{3yNZZASpCrXvAmJ2#c7tlx8Y} zf$@|8SO7JER-9h^qxe_|XNVqxHR3)(6Xp~aJGwKanI45bh@HvVkn7sK7FOazm^<<@ z0Y9s&S(#Cp*#HP32qqfRtq1JA zb)vNFg}>}YyIhDIq2zn?ch;E3iEtPilJAjF`I00E`v7}} z{g14>gpIz0P#gItPu7*&^b&g~xwR%5|DC?KddK=n{QPW-aE4Ah5Un@$fx3L&20{ooDn;TbrmX?o2G>okap8g`V&{W2{*qyLT7vTiaULF&@rN0-f*fYT*?- zNdESk&%Qd>E-eRr_OqMK2fO~WusxZ14(0x&d2XA^Zc069_b3qZsE8}{EZKNuoG?Gtg-`)XKYnU?RVs(&rD@$MEDlU+F;K zSd)pI8@v`%#>=cAbk+xN%>o~F;p=5DAxg2FCfu-@SdR-Oky_Jptnia@yRjP?NS)6~ zy2epra^2y9P%ZXAio(OUQb{}XQds3vPE>pRpY1_D;`Lwn@y*T;OvCEw&ec7~bptYy zFIYdH9%9(PoD4!7RvrPNlD_B#dlBJJiw;usW+=mH3qmld9f2fq)2r3KJI|m+ZNJA` zUTz%W!xL$Yht)tcLh`N%lU03|Vkc)yKxRFUWIXe_m&Q%!=Vc#YXoyaz7rRt4n4strOl&bI_EG6-tG{=Dpec^fmU_Q!79`7^04up`erY z;K8^?_91?G`Ad|V?i~25v3#iQ%vjFvgY#)hgk7DvF$;{-hHi?S(gFs-xa@eE>%`Ts z6h^qm{UaLH`^D}VaGEDvcTJ?`lSuf4p(2wI(Bsn+@Uy*Vd(Yu&QD(f?tvakaFp-j< zn;)1@BvA<6bUwo^Qc%@>HeC^iFul|ea)hvm-B zaYnKp21n3Se1i?o1_EL>#;V~!WLJRMp1fjpf!s^#~R0!7(8+_)e(zR9Ng&-7;%*%3#^^-=B&Jt?LF~8kH;$9BRyMA?3#AF%ReSIT~ z$2db##{UYq-Mta zhOWunh+>M=hpyW6=pahM2A4GjI3{R6Z2NB>>E;)uGu)}p4Xo@e zg-bbZto2>3{K6NZ^KsNEAxcbcrqP>tUUS)P zs`u#`J|=yG3ZqaB@*w7>@@b5AKXsJAhx(5aY+8%?*>NqS1@)4j7hMHvBhT8-g);8= z{OP;7GIq=rLz!b0C452zjmU5or+#E)lc;LZ2E!}TbIU<3GetKwCam9tl|etiU}dNh zd{2cA4uujB4vXJqK?xJaGoD!2d|m(5tA2J9(EW=X4lO-83@D!BG!FeeQO(xZH|0Xi zgmzJAs{loyUbdQhD3{mKg49H|xzu4XAJQ+SnEZ|JcD^LiFAHG|__4#!yw$9tV3`^7 z?V5}k&i1(*ZAKytNw=CTfW_rMVnrvSkNGr^w!!PO(>aAOC>E+Qt4$<)Hnk&iaOc&|fu_W1pTj-YrzbZ(!*qcoVeG zcu;0K$!(3{EA^^GtI4NhCpN;`v=Tozx-dcIs`=C-IGygS>xPip5tHag4I-USQ^Gn= z9EMTr7G1Hy9#LtoUO z&elkxnrH=FkAADrFwDv-2`_+0mP5-KA2YH5JL36{iwaHsq^~H}1NmrzEX7DQvuC|$ zF~e7~Uo=#S*r&1d6kXo8o97F|{nZu(NX&+06(v z3%$3#is5O1JdZQKX(-A^qn)YY%5Ii)giq@zO|NnxHu?_dYC~1vc*(Nrh;&J&Q)b+y zbAO1Ji}n_iqk-(dgrT_%#vSuHf$vB;XVp>m?buvMv1V3G67VUSngLp-;{C7! zyUu{UkIrT?l_lPFppTgIz}a*Wj_PtbQwlB9Rk9X-Kl5%IB1J?yR*YI|Gnv8McxZr( z_#1I~apjQrAu}P_h}H;A|I$X1%pNTMr77#pLR=?{Y-}|=5t}b00Us8NjDwtloP+-j z{~G~6#|*2hahZ9U>E4j)_(bPKO#WoxvggM~%6+ZtJ8Ki!&x@!3)+U(%x61Wg#qoVc_q4rv%>Rv+p z+pX9_{%f~NZ>PB`)pg3pjyiji9OUN09F=?FjA3Q#WiRMOFK#KE($9C*qF>2LKA|se z$z1lKDS8*?`YvpSUg9A6q*C6aZEEF2Z%r-M5hqb}V7x`+~2 z>z#UZ;?X}nEA>@wbl=Iww%vsAZENNkFNGYB_0QQhf_lHDDo{{m!q~uIz!;R~H-??+M3QO%~A%hd5lKhgMt{qZ)_$FIf^+16UoB!7xn9m3?}2P=;=W z%4aDX{N~h#XU=s8+r!_|mNZyA$_?5pJ(~p$11Rc4eNM#0D$$!aU zCcf*x{cAFq9jO|@crtYeF6LvN@lj~=5aqD6nhFui%(a4Zr^9&z_)Y7Pbj5P9WT$-+ zd4#4V#zXT7s2*;*6h>D&6PB%C#PB?@>Y~g8y&EFqI!Z1h>vnwtSe08FV!mlHJ!=A4j zMx8-*=iLX~L*OX%tiL0EFQS-A`)U0YuB?YH$Wx3KtJT34NYPKb85@LajC+`(2(`Sr z52WfH(t)m9hiOg#!cCt_pX~hzKUMUhrEI}l^~wcYR6nFLi)uj*P+VXxAFLI^rT~P# zNJX5E6YEFuJ@fT7p%FvUgs1feB5KmsBb@7e={E4C*LkegHj9w0w4azwmUZnKQ)kp# zpnxAz0$Dv2knkbqHF`U9;-KoF%*7DL9L~tb`X4hGXZ##bo)pIVXJ$p2xS}w~cp>r6 z%!*s?Mnl>^lPu8~_vzov%KR!wTw2NxY*s}6|G8OZqgq@PBAlKEhU^8MQ6Ft%GR5 zGE^*pfcQ-aF#;c^8oC;$Ger?a5e-ODR$}m93R>#TFlB{z<0qegWRYR6_f3{fsT@?O zrwA*y61$z`*lf~HQ{vh?H`9piNtJydNrxrli~HSqx=XZzq{_!DlvZn|;X}It=_GRuu)Q6h^hAL9xT z4d%C3-G>=sG^?I6U9UEAPJ>Xb#xRsrIHB)M3c6r-{%Rq!XO`s=g{HAeQF-*v#H1BI z)w?kHvUHP73+di9LV6mZF3&nMK`DQF8z0tEsw!BRb;u;0@^ z*rg#E0nJr}r5kcrrfSRrssT5z1~C%!R=#9m`Z9MI?b2;a1H$7{M);k%+8JEUd5m?* zn+UN!!0&v)A=6jNOEcE$NW@6DX;I=k=KcqgwLED3NO9kmJ3^rllFuX|5O#x1g3r(X zp7lMut4WzjnZ@3SYR^PyerkSfK7)ji1hfQCm^8fe)>pe!kYO>XREL7Eq~8H?5u=tC zBs!Q79~7S$j|I?Bu3`ec-x%OmYu=aH`IlcMhqs&y4jt+XL=2CFzk?zLqj957p}lkI zE~<4UpCOsXth10#>C?-NDyMe3eKB^vrI%~^x>&4nCOR++hNTWn$h9}IYmMs#gR+QR zVo>oEIlkjg;tAXajZNG@3aOCSd}j^rtuMgF{5nuLV+y#|mKVw`B4zkGkV)caQI^o} zme4;dzjaVVTBR1(HnT;3?V03FJntPcE%{5<^RdsK1|@A55tr$IULHr3rJlU>*~gY; z*Dg)%O{i~u+FKICCxX(+z$KMyk^$m0p|D##A(05wgwZ3n2>< zCZ7)T_z*kto>d*FDC{qO+^dMgF^e{sBXwwR?TFBC(}G7TJ}j{p54?qXGTZz!88Gl` z>DI34MikcDDeVh>x^nhj_)H?6Jt{(0b@^KTx3(ZtLQtR`g=rTB=?F0cBk2gfc^3XH zfr>5G`lWmy_m#NcbG6g%Ve>7~meJ%RUNxfNTIu`rIfQqgSmr#WE36CG$cN6@*FH%4 zhVI~>*VDcd&0E#WaaSGrKM;LSoxy8S5vinVZPoVk8S1WQ;a>bQeG5MI6W^E7ddZ?E z-VkmK`$If973osg%!yKKW!tSSAM6yi?C7yKmHO08?P3=b3TLgY)k+afmP||QYE$_@ zSIg+gY%SqAVuxyX2%$ZWh?ey3ro^?tdmDJ{&}>+#(jd|JC=XBIRYNh zXK1WfU5i0_V-X#vLC&T~|dLM~;rJSSa6M9_TzxDboMN~|3lV^dHU zMOTT`3q?;i+JT&bGA!wVz-&CxmXDQkw!TYH0vBz>B8I9Ro_qng(U(ZGm&;k#MtUJe z_2R7j0Q~uDqpQO%{JCJK4`}^&g7}UUkxQKZ7TJIz>Bkcpype3gy!O!ZPuY(e;dHXC zFroL995^HIp_1}^ApJ0dGw3b88K$SI)oiB0^~Y0BAFT^$JaEFr|BVsN*B3es{YeTV@JsPBv&i4lQanf9ka3%WO6ePSLX%ujK z6F0XcL=j!D3`*7u`fRDw9qAqhT>4Hms7>( zt;T3u4B(8|dqfCjvt8C>S)?h6dxsC*&2!E0Q*K{^5sk=W=nbS*bWeJ=JmPGWvUZPns13J8B;(4Fx7ihXpmy>O`EbkT-el8kG>-TX3R!3%8xW_U8 zyd7dU@rKq-)k+~UQ?*J#S{JBx(GJM^i~TaWxpq*=3UHL-uF7AeLe{Q{WAVd;4hd)t0?F4&mb+87ByFA*(tb;iPJ;%i$Q(L$FaS8!L?1#-c; zvsKS^@I-r#hCe5{B$LLe#f8q8(p`HddRG*Y+Vo6YLfaH2=ocmYm>T5&I#51i z%5u#sE3{ffI`D&ZMV%TODKXST&Mza|WguHUwC10I-Zu%*YIAMxjH>S^Au+WJ%AUCY zB7yHCj5JdjBNDKj?jGGmbL+gy4wtn+$#j9h9htT@pNUk&)?0*W%f5QTA1DV(IMOp# zA!24#?`Q1rcaM|*kG|E;-07q}- zJ%3J09$~;swa#iy*cA$<(VLySDGPG8zhHLpA(__VTl!ajV_o{e&xVBf61bj3GXR!9 zh6|~VKhk$;%{&z@mu@YJ=1`KM;zQBP$*;(o(n}J@%Bd&4&zH}@;8O4_R#8pxlTe0a z>q;OEB5sv%kleb|UAv(eqw7mrFXqI2)*#iuXvAklZoMEzPIrFnQl3NQjtYS`eGl)3 zldHq#=|{IxH1N=O0YBdZSMZu;ikFL!`zCR{Td%L4Bo)Gzl zhCcA^IYp~pZhDzX!9(a^Mo|!$W#XM{J*{Wxx}@UplG7>Jw{ewvaHyeqkhjHIXe zMiws+1Jl6i$vO=Tb@Tp9{cAorFO#*itB)%}H&OS5v=U*(pkgRe)fi}{R}b(??b`ns zEcg-^P(4c1@8&ZuEo`wyyg<{x(pK07{f>Eo3d9IgD|d$iE9`z$Zjy!ktS(}^d{6J$ z!G@Yj=1H715#=J^Y8`_B>xs0e6RyxFn(=l3w%)Q3V%iYC=ar~kR-M?1*265z{288? zt(V?x!|!p^%UwC*RR6Bu6s?^-0e=eOmzk%Fn`qW(y=!8;3is9bpFwt3Oe|eAyE9|p zUoTOmrDzB&Sm(fgtOICl@9II|D?jh%CSnwttBr~CC?aWL9B?Q#Sfmll%C)PFxEKP4 zefzpPSi_eVvzZa!mYR+AndKnlwk;|Jl-;t}Ac)bLumoPE)PuFONyJ)l&>6jZBb4bO zzJ*%o3ZHnWsB6}J*l24J-XWHi<)Qe?wfeI;!RYnvqwop!h4&x{kZet1BFQ0>2#~Oh zX}R+YJ6|2S`ukGm)k%vfmkPnSKiF_Ni#t^@ao+s;hb$UFaiKcFlDgfL9|jTk|AhNz zE)w-9Iq7G)>E)~(!Xjh)uXnA^LOXXKU+UPA@(6jNzy3>Ux=Ri?F)^+fL_g)@+co~7 zH&3>33CfOW;HOwUU~SqX4QqU}LvP0{KL)7$-1HGBVA&%O1Ij^)E7*SLn&?qEGRrYf z?zP*mSJ(rquEaQo^KRo?9#(*V?i|scLbwUkBt5YPbdc zxT~cJ7o`Yw7-A}tyj$gkZq(v}XSS3Mob(PclyPcubzHTk(|~*l@7kjODa1Me&E;42 z&dTCih7u!Sh_%d8kc52ZYow`LjWf(yD^%Lq*7jTf#GR0~(Gnt4E!P^-t{lTjwCWG8 zEwggt?$u7xCH4A>ppurObeuhT!5E9WM4G;w$)45L3(>9@XXFRq&R=U^i8F>>YcJ24 zvI)n)W=n6*DVf=lI+`eh{B5YWw1(Z$h<5E$M1F3v``s5|9z$aO*{=6rcU@52P5$E8 z(7+##{p=cl*7Jm6iu(ec>sV>6{7BvVTgqN?a6V*OKDDJ#V~kKbl~UHyC%@BF1|0xb z;Z%}IGVoKzC#kyY!=UT%8;b0WnZ~#nB0{-$6im)*QXeA~ofU`52hD;@wVq8j71g@- zN1LZv4wW6|b5_3#JU5?Q`LFEvG*3GmDwE~$lPE(uIZ(2%%4}3*4>Bc4<)tkMF=iJh zuMIhQnXrf+Zx2esVx@>CdqVni9rQ}#V9l~fjuGSdPIaOO?Y|kq^YbSN51W9Tbj9eK zFRJA14ULg7E291Zj)Gz*=ThdHF zcE9je@jckdaKTPC!H|zfolL7>YUPDY!fq!>Z{ciSlA8hNjD+LR#5TEy-gNmESHZJS z`Um|Ou<3))SEf4CEEGR^$8qWRpSL=>ubO^PF2UU8#0J@w=^6vMU1i+ZJsUX@7R{a_ za~Iy?mNa&-#in-D@BD(9)|kC>#u<1k`RdVsZekr?jv=Ecey~V`Y`vRe8pH4~y51!- zJQ=Y?A?;`p5enRV{MmO|l#OrLFjx&W6l+J3UE%XH@;u@86ZfT(fFJPJ4`3TIO9AZk zx=ftBNu-)QP%H^z*k02t2q)Ql|#Zho3;!z%QoZ)K81_ zwTNsGf|#M7U-g&7&f2H$xL z$_wGD#TCzN$sN>yeGEk<52YeO+C4#fPM-4c-}+i*V$r_2e z(|9*;#{4|~Kvb<=(6cgpUuTp}W>HshMMZ5XgpUWn|BfE5jL`2Ugx`i9Z7hV}aBUQ= z61MS`9 zr;3v`#Px==tw;LLj%}vi`n;rNagbpx+5j>LBEbKvwv^pemNC(wDJ;tF)u?J}ocP{QGWx8&cmA+?iz=t$?ieDCO8cXBn{JiX*r z>H$`;N`W>*kB91$tEJ}Yfl}r0B+=z{+2~tUUOHMQBvYl*w^b!i{L0-`TaA)z0i&mX zL5x!$bO!tQzuRL;?;Yi#CDI!v_G(omth^9N(50rSiUdDUfE#4wr!?Aa>wn7_BY!IX zbrmlISeWj9VV>9@k#dhQcB9RbeWKg_i1v5Ix_<)0v;Ehsd|K9_@+=ms3L&i&{kutK zwFRp!bTFhS#DM}@Mb8UyP~_y7WR2;q)sK9a|2fI|M00pKGPwlf*O&MP%OnU>7o#j} zhs9W1tb$(6YNhD3)#kLxOU?YPrSj86UdBGgRmGLspLNTvt2zxhXc(ScZ z#FK$7^JF1E&W$k-v!T6}u!2lFVnu+G+eZ(-8>$`2*mU|qPz5Nre9KtkL(ockyg<_# zzACh2q!9s~K9UCklA&Ogb7TeIFrS~As3_hF6iA4SL+iz zTC3%VA6w3|eHK)(hP zYQXQ3k}G5kW`O)cyy8O(Z4!2#BkD*{S^?O@vgtpdBc+7UMTUOV$Q`8WOsX}(RXq4z zP=5Xnx(xG+jk*qv<=oVL2XgaWK3F)^TT5<@y$so!-zy$VV1Ng;8SZeL4A{c7k(3656hL@}J1Z_`f(@jrImryHtS_k@*LZd>h}5(_EqW(R`yTTQ$BA*$6ApNiu?)7O-63TL#;IT%oV^^UqECPV}QaywAYZjRPkUzy`b3hn#>!rcFrFSz7 zm*rt$D@SR`Vw(zX@Uk}mWnhfl_f!l-q{GrWbm_yR-dtWE__%gcphZ}*mHJ~=!@!Z+ zR3@V~%DkeShE#A=9gHg+?I}=&f)V;03w(N4mZlACJ1&+!Gl>`u|5;KVaAT7((rU|ZdP{|=U z)0`h(iN37Uf+z;d}W$y%rIPG{4Hk92XiQ0A>^S$Yd6opHDUI7J4YEdvdl zo%Ksb%0C?fjAj|FdH&2U=Mj4A;oMVdLbPqx_UDhc)oN*emgU(Qef@bXncW8-Y=Ce4AWrh5-d+e#F8uopPhSL)rbS)fpDG2g;*E z?}beb+*)eB^Vk~j#IBiMsW*AA`_Np1^AjiFia`T*#~nLZ2v{=YOxwuwd&et}^1Z$l zz#4htbLbn`&rQ`M)it+Hb}8uFp~hkc!=l=Gd5QJe{H8foDb~ChC(fvtJTc)!iI=a;)@afQ;Ssm~I z^#dNfeho6gt$ogW>Fw(;C^&R*$nmbDxLh$unr@`3Py=s_@uSSsRHBx5{Ug}Y4ASa( zQO~~ql;bEk^1g7xs~F>tji+aa4z4)f^%j?_`0_IEJ!8gKr>Q<3By+sGOI*&6BkiY1 z)k6(mULHCap?>b4hv78a-==JShn%iAtAzNH7v&oCzY)py7Bpp)E6%w z8Na-7&A{R$@GD6lHooEZDw^=ozIH9bF|Y0iZ~U>--T1R>luh-{8(I}m7hXVfoD z=S{{_5uMMcywz0T>3ek!Djf|KD9m{3`Sf_4c9v?V>S}sqHiqNDveIe2T@lgFvllG$ z9;;n5Ddc$fS~6oO$SDf&{p3gUG$<|EQBD_UX(^FHi#^d98Q9%l6W8*zdmw`N_8 zJe@5w^ew`m%#C&~Y>13APJ3{ssR=kO<7u&nrBKk~)Pof_4Ya6NzS#OHvg&I1g=tgn zSp8USs{A3FQ+0=7127sfyTvEc5HaLhf%b;Tg)0f=?Tv=JrWKij_oj`9 zW9yk>2jjJ$Yig&*8Dj+$p=pZEX~5%4?LIlA<^G$QRibzL#*aF=DhdX5-B1>6=NCk> zn&qm`d<;NIy(54@TLEf*HX0=kf)>89m0X^?IGixnUKKSg&fVqY%T-|)g^8M7aT|_5 z4gc8{T}8Jx>gH#Mv$f0|FYKm+4%O3v#VZVCWU$^T-On}A!v&S|*CynV2L>93i_gQ$ zeX<3Ul_@}ZYbzZpH5r0uS|vfsedAD&Df*@Lq>oc?&+6z|Lnz1<-DIJEJiXA_Hoqk@ z17SbeDgmN((lLZTcG59{D+$Go$QtDs_?E;q7`3isWW&&JinBel1>-xdob zo_8?Ls&TkjMEHnP-Cb32Kv*5=*0AnmhKH@g##i*k7oBBXooo`&e5DhoT4Sn{g@<}H zx@;DtKvrJ9T*Dq3sJX1f%{Qy6lLLS^%SAx}9?G$u{xv-sC>y(VgT-qGtz(B0#3#-j ziyaB<(rB@H+`A~6lI~*L`nlPA4?C7ZbdEmOX5+YaKA4n|4{AN)<=X#vE zJJODfpV@dD$#*`t<9>m*-MYDc-jO*^X*iRs4nbzLt4!L`B5Qe4>!)%bIlB@5!M+L+ z+Y$bjzKVgeq}=m%6Z|c%70<^fGT;36XK|!&am2O4a&jVb*j4}dVs7?<*HSS}g{CrS z9jx`#aABV<`*2~Kt<~_)6$P3rwzgvvg@(556NPi$E(a$vFNx(IC@)vo=Y%$gpPQrV z>gK;C248SRpMpoY>YM>PXk+gnn{CQ_MVoBWdOMmj&8%{hdwV+2HZ?t>-8RkRF^lIA zd*)8ZT3z_V*HYxOeYjklbnM_XgySZSJobL6IcqD^;ECnGt?ecF z=?~Hxn}a2TEodwz&i$Hz_AIrDMaz{=NaYTtl}C%s#rJeuIsW#8xj3N|h*{FqrbON} z<`Y&w{q`Q=93-`|-EDt3hlaP^4fe@Xr{uA;`EgT6bg)7%{__jjak+HaK0dz*GV>Ti zh7_@TZc+1IBwnz&Y#f!@QuYaD)l&8m#jkuyNkNV7Q+jltHEViwo3%x{Dt!1Ere*28 zDdP!@mgeBi%DhQy)0OIRkIyKnJEMo1jALo5UZe~Mi=RpNFzoYEaeF!3l+;2trx@F^ zdrly>W#?S7M}=VFGIXxG?2XEpUoo4al^;+W;Gvk`n!BP7n@Sx{;Kg!TRs_9Bi5YG< zjxCE<;m2mhtMFkH<5f;tS?3=!=N!p88%t-EFJ;&VQ6{(G8gvdFrdK96=fXIk!cFnGEpIW1N;n}(4Z_9SM&edTm7F%O{0W)+~`h47HEc#YSvzW^` zeDtHY+GXE_A-lfe!utHUb6lAB?!)rhPUq0dW37Gqkm|6Oo+MOD6zigz+ z>1yFC)*LEy7xPvGVw9tf57SnPrbM2A|NPNHVq|!{33{|yX~;!mc&ShXk<`Al&i}a- z5%)MN!b5$|_{qBZK^0@MpF1W53cIv*L}=djgrR_rQc1-Oc}d65>-1lN=EaqsZe~Pu z+y#pj%$qizD!6NU?Mz+SIpaPh!SXHF!Pc}sZtJOG0QS(W4 z85QSn=JlD+xaq8h1kHFyTflgax*GJc%uHk^gTM>kr634b_@+hEP;om^;Nj*Nn}Z7S zs1qXmptxe^Y;{?5jM}vYg+}Mfbja8W?pfhfRQ%{2RJ>-bt>tKQG=RfI<|k*&yZ9x+ z-Y*!%3yxTrMh-WP^9awUvjk_DoYjf9Ff9aL_yaVk0@Lx5jHhBcU*3P8E&ciA^K91k z-wxXx?IZ*0?&51T)evany!V^Q0I&CEEys_HY}%<@^6YXh=l>X-b924cR+whjKfG}I z<>KkYkp;7tohhdJ^4eaUqkph9oG~4J4!^xH)3;aybag@i-7BMj?w2dG4I_lEm=>1U z!Cnj|1>>`Z6-Gc-Cm}N4xV3&bHv;2*RT_&9p-aI)67hD*SH19)xx)B4pmn1U&S+uX zjT^y}?z6HqLI>%Ac#TW|O(;jWF+R)7jX*<7M1thn3>J)8$91ZJ5ZJ+W>$%RTDcpMF z6a+sxm;lDD4lZ#wB7B?euuCCPcyapb(zoeYCCoublUZu&Y@r0+Ww() z=w@Tv-}{Gdw6%?By+&2NF^#}ITYSFGUK zqjHBz}@UJ%#VYAn=V-IBY35WOa@XvJTHR1tWYGN~dtE zA>6p-5d>}o;p4(ei+{2H*$uS5HUY*jPk?=w$K3FX?fCUcXfCc3frlXQDcrtmAkg|~ zDbNj6&)pA!o3{h6kB+3^7jrS*b4YI7eD4wlH@`p!!A|D(pTN)5L}4IUr)3ait<}zV z6&;1~!8R;`=GVa$aftG4#0m}#!Y^ck_4~mP@1b+P%Tf5{Iqr&UkmVYP555-+!3|yZ z1w3jDj-wB!0tk=sU0t)p;CuBau^@bZ1Gn#LKgbuiN(b`BkMRe&O^4W3V6og4UXV*@ zsM!2Ex4wrwAiyAgB^R-N%^hgi<~9TLjRo4Eu0b%E&X|~$DG2s6!gp;9fm>z6&korr zLWaRL7}Ltjdtr=Ww^qM^_m#X zRa`;L%7a(AOe;$m1mYHU5P`?pVQ?dE>uw-0t^>E+47`vajKhI*Ah=10@9H!LBGx_+ z!B5xV<8V=HQ2@?pO)&0lLte!bD$T?3sG5!wfnuD`E{W6qX}UAtKk~Vi&ZGZ z2s@UdwTzi<77poO|CElwtxW)@(!dRz8%P-#u4TbcZuHJlsdZE&Y5{ou%2owbXe=tTj-u^e2cEy@QW4BcndT5iA&B8dPrJElXbIM3JKdNgOTvF0h;iJrWgNZQT)k3`~jna10ygngJpJ|(R z?Bz7Ggf7p5p0Wv1yM!SLwnX`Wk<2bz8J+RrIi+R(RJWV50W5RvrjpcCw-yTZY|=D^ z2CGWDEb}PvR;Ak3gPJmz17aGR7j5z=rjG0C$Qoz5kK5+?>Xc`9qE~ELI9DXtO5^QV zGP^vngOXNqR%h0)9DM>lu|Uf73v3$#hHu0tQxDc&G*u= z)tsBgq}8?c)w`A^w#KNPo%3+MhjpJ8`B>N|Ac`Jx6pd20za-^es3RC%y5P<3+j#lx zvXT6XO|iRq*?EgEqAXCsL@Fdv3SuP1a@F3r#zW_te-;o;?Tt>(4#E5 z?`A&Ld5co#S=R^`xrg_KK5#D#Hiq@th^d{q7&=466{R0ilSeh>BZH}^3s{=@Fyze| zStoF-ysLKTI=~Lt4fmzKYFCK%h#j4|!7Y5XwAqw79=1Q%O5{dKdcbT-A99>?NIwz5RQ znx<}nbc`(vVuX*2gZ3hCk0o}o5M`a}{MmilmQ5y`I?I=9)ymmDAc8SHy)B2D>pK9=dZ<#oX<`aVl}&rKF3+gZY=G zBorUpXg$4TSTn_{#8NkQLo2Fq&OVH#uk{Frg5=HGnwoY!Udv^E)48|V%k6^&qk;kv zhU*m2@SEn1Xghv9vdd^?$U1M{MaEM;#ru_%_A`cq2g=(RgJq#l%jv>YSP*w(rKKgp zT6E>v7+g-Kot|O!udh9^myMx(9)2EbH(}6&a*rcr_TZpGJ+9dQ@hL+ zoxLU47@EtI>ublv?%u4YQvhB{%mqHsBF4r5Za~H^?@F$hZCJTrJn&fYEU*3pnYKeZ zb{5ymaKD~1H;K|Pzg~8>&04SPu^7#rsSD;6IRpH@@i5l|Pgt@20*f!N<9d4^q@wwuCb>is2ImZPR;f%DD;ISxsi#g`Wv_gK#A=9=G_BRqkuo!!} z#GJ6y!4&xb&9R@0N+`|dMo+#L;B%p;=~IOJ_D4I4>2)aFnMF5?*$`!YIwd3_=@U@r`C;L+jbut|VSl=#bb`EmTKJ{7$VpF6 zYbK#7cpLgtT2b$OWaN6|ZVq?Tl zFRwH((JZ}w@@u0#wCtw5uy=TUaCoo%N)fe>j^OZ&^u$5BHRrA3_`u*#UTUz{e{-$vAOWZY16_&Io~@WAv@rW zaC;<7H%Or_)8qgh1VWMDl~con^~9NWwu^dKcpzF)!7^RF_ZPWC?4aR`L-XcNr={f* zrto#iHQpQ*YZCK9x-qt5ne75+>q9`>lqf7 zuSgqk(dcJg^38u+0b8~n@CrS`#vxInB`}ij!fRR78_~ix=02(;lzyVMf1F;UpLa~{ zth)r%G; zxJrwSl)LAl0?H+p?i>2yEG}ob%4jgN4b-H*Gs+-o0-i_uw3E z;7Qz_PEIxRLJU|pPM%G?<=X#NiTt>PN$t&$Hl)%t4@aoUTHpd3+*}MJFxM0L!N1?{#hIZPchPh%gL&!gwZyM_=TM)5VbLPW>H%m*54vK1hcc$WP53-;m4j+cyQvd|9uA%mi8)_&J$%Wl zz4?&>tkeCows~DjblA?qehy(}q+s`v zp77v)J;VmmDfrBQqEb_epdRTYi6@hMKaew)g0_W z@IxQ>i3mL>-GMdH@afX*YOmy+0|QC{?$h4gvirs=(V~j)-Ioqc_Bi)c?_$`c+dvm6 zKQ>~0CZ$CXJsPI7CdFs#tCfP$2p@Ij*VU_!N*kyOAH6H3mmG+P*=W@oyE?#SnMlwLmXm|(GVUSIlAZQ6+1!)j?uExg-ear{{>>E646YM-!Y(!@#&LghkE z7N7!Kf(BWH4h>TN;?CrmFgXQB9{1FGK6o|L{bwppN-^_B`}<5S0{P2rsRKbLbv2Y? zPLB0r^C{7TfUXR(C~J=`?asdg%1Lv#p`y%&HYQA?gX3VUaatq;7)<7kLN8?P3P~kZ}v*y$D z9>1)3uD8O)rPB5R_D&JIqp@9> zo8hi9^UR0Qt2Og$Cagm52QQZcD>ya?HXGt#NM${!bDM{Y!#1$`=?Cjo#ZLkiH!KIM z!tLv0gOD?(c{+6?UHRn^CyTmf*Dpb4&Xft^$lUt(iB0^HRrB~~Z#()ZJr&K|F_^2s zu&WgaxOwSm59hcdjfdTj&K)2>7@eBIi6plan`vOo1@6#Cnue-$o%IPfy}3&2q`QTn zQ6IA4$l!J!+)vk~-0AC^q3pNq>lne~eS?!Bb*`RkXE-0bls%9E&NM6`M9r~?T^p74 zV4w}@aY{fRY1+=$r_>2`ueYss@m{7*r^DNh?^HSvMJp^m5uDv=_`D%ONMW$;i5${G zs%O-C{HP4pd>U=Ly2GL<-yQMvZpzR}{gCw1?ES;eH&6ReH7T>qOt;TpKh&dRm+tjo z`N74RcW2v=HTlCWuw&Kx}=R3X9-oF`MGwdcE+`byyAp~{>ypWaTjyL#Rz zql!_TsR>b&@;ukPvS4~fk4A7H?q=7g_IakeLwvfWQ-w2dN=tTWA6omoef;Y@O@p5b z65QusD#;{>@^&DTWSv)GRmg4_+O|5rEU$DqAK_fo8`tMnq=v5Ne)eh2Cgd%Pp$A1{ zhd{;K&+GRBKSJ4IqYgLMPPxL`=Gy0N{71u(^E&`%SnCnex6Ql6I+p8Zt;#d0Wtc|u z2ztnS_28v4YTKt&OKDHg{YH+3(`M?Tp68_F^l~-&Jt6cgi?(T)^yc_cFS34_!+o6Y zs9O}mlAP1_1?72B3fDxXbREkGCsXVoGk}jCBi}wL14S?Hur=IvQzms3_5w~ zQ_lk*j(bY`7@1i_O+@&GkFu1 z%6sk4Ve=5JBai67iAgIG+;$wvx-B) zTQxP=IVS~UkYulHWqh)M)2_|#4wh4jp+_dEcn3*ze;S%^^73>A6`XoAYnyLa5}L$} z)+^%8FJ)lov}MBdf!5%Z4fPc;gBr6ZJV?uPDTPtv4$(@3_C^Wib~3?Xx45Gftd|{E zBb$uGC%l>mGkKnhdW-rD*=b8a!5u1mZPW14uDK(!XHzP6vx32m(a-D$5(`gOFUX(Q zL&={tvFgAsTrY~CkOwioYtaT=b|v_0B+u~t!U^o{B){03%An- z{aL!aQ@l;Cu^I6TXUqgE=>qk}h00 zPmRk|=bcoO@U(+g*+747a$T!*kQ#bXAn2i&DW<<>R5}440I@SFT()s}I(0xk1j|5s zht}0UAoWsG^&uSt!%#t(Ons-OC#db$H}==dUf&HE$d&x?%ku6_K(=Xm+81N?tN!qH zFY&XyIQe7t*BNcY15%Ir)?a9&pR&L1Tq>KEp*q(nYx(`N7$tM4~rQ4qA$=xw;>I$nL@i|5~#9)FLc_LRa+m zmnJ(wCTHw0`xCRv8|1>&KEHI6IM10R0`1AL=Sxyneyld}{(OP58MGzCjV)0~SreLo z{N(KBd7g5B`J*6(?!BTzju(dg-;!le8+AHOwo2nB60YTg5yCH5-WsRXo^XX ziySh45ciQM=&FUINQR>2!}?#(i6=Pol)pA`JY5{$qbT>V^mUD_gOLT zpMbu}aJ5X-hUTk{yqBa=W`SlRn=PD6B&8FN!Bh+=wW#*~e%=)yE2g>di(!*p!YR`_ z0-$*muY*F;V#?@XP(WMTNvAhSRM2;$AJxU%l_S)~oLxUBdP1v42b^6>#3Pj5pdkzT~`KlC5$YvUjxqn4izCYn3-nh3eibKIDAivp;I#xZ9_h z@l4G6D*lo&!{p)sUYG+cA(LOweUc!uGC4F&ZTOKSlk!vK>kP-|No>%L(ed}<3(5h= zy3xAYml`^AUA!m8mb-z2%%Abm zZRo6sWdAES%~gYx$^$UQeMeYs2~p_XD>>xq^O{ql!XtZ-9XPiG(DxSjIA1i2gm-!r zaMJ(%ntqXPqUw;-g-`zP$@0doO}?F(u;Rq5N>nTWmtmc7qL^G~2?-PBVzqvCiKIk6 zXm^H#Wm1cBlG@bS^LmLn%3{#A(aCxH2bD5@#|=&%{F8nxX*c)?BR4e72_5>^jKkN? zvsbdh-78~|8Z)w{$lc)p1%T6PU@5%nV*k&DTPyHs37T?}IIf(5#1W2{^iPceEhoe# z#c8II=Uqc99ZrE81p4&IH=QnpTNlOC{@0A_F6^G@+fNPl7ylm@qjOQ5rJ{9|VArrg zHa9pEw=dx=oM{zlwrUfk4A_==^j);DcM9?^+5c~gi16J#Q4`~sxS@mmKFc>EU$-4Q z^ID1O;k%EwZp6LkiMVRzC_1X>`LODvk>k1IxVt=V4@1H}&c7yThLo1ai&^ubt~WL9 zBhLNT#KSv9MObh&SD}OjK=QAh^BxE4S>`=LS9JdXp!m{AB%<(sG0J`O?wE4^OUiPf zR`8Y1{-Q$;f4FT&dQv2D-EzZ5V}POC{*t+D#U2-)Y=uo^$BZ}=#myoe>aRv|mPxSx z<%k#Yu=>2b2y8;LzidMLMnC+e7*D9qJ@_H}3j_YI$l|CkvivF(s@GZ!awF_#Nr(DV zJdA`@2J(l|D;MvjZkdsmCGjLeq+r|oanhmw9EJOK?1F^V|NmG?$as0#q|N#0zITM} z5gSU@c zvL^crE~t~Ma?1u?e;;aoq^yvARi=fX;UwFS)l~dMdKhs6kqp4xj-4&m)=MyL@@~NWzC#q--jlsv9tA)Xs5=Xulx?GA&BiU73}Zu)SGik^wFT(x@G-J4^k0E9GF4sNIU{dsG=@ zf8OtML4B_(yR6Ipg$wEwmm@-Xs;wknP7PWgS>_VdqADbpyvUSw_#uM zNmSZ{c|~@uYSDlkc2sL`bO4jVaTI0NuFNVn81wkP4!;G1-6*ngD%aiYRg(sEr&Q@> zmG=L9;XRoutE|ob_6zUHRSz?sI}%TkJF!p^l^^z@wA|n%ifep_>z>9+N7$~cJ(7Mu z8=TYH-Qk~9B?05I-cfp6ugccoD2j7@Cl8Ry? z8VQ4WJD7P;N;cX8B}3bHH%Z6(d+s?2um2HVtqg_>11+;uuF<_fk<#`zl%!+*y$v`C zum2HV$tS8;>yn1fjSG|l1#sKn#gmTp_o5yoy#7acNvQ-jhf6lHqi(taCCA&3(~*w# z_u`r)y#7acxhGSgS=^%Gu>5gC&F;1%@uXw@z03s(um2HVKp@{02qsT$4df5ujhia& ze~`O(=#IXHILGBPX~#>RoU_LVSnny{nY?r9avUNn@G*=^qlQh3ddxuD`gR12QnZE{ zMTIty6reiHcUa-D<>5PrpC5j6`14_^BOymg;DGpl`=5l ztiYdPY#o)_TI6GfyR8G2V626e8mPT!Lseh~pemIrwdy`q8dX|VI@SH+j1KOB;f=Gx z0*z*+Rg*CCaZ0bMKG?2BKOe*6S^n*?y&csOT6F9NN3H#vVPu8XqA1$%i=hgkH$t^T zjY2I$9YZ}s{a-x^tvRZz8x1kMDTAhQ4UslbK~XOTGr{P_sre0=vVzaSm^-RGQ9IZT z8LWc^VN8Wpu3C&2)h|A}`2Hf}CG|^>F1^3RC`)^pgR6hw#Ts?vY?m!ea(t&(wLVNN z>$Z;pSc@{#;9Qnp0gSezW-p2&!QhOwUp9=UuqJhX>VZ_oROZx!scfknsa&at9C-(( zDOh5Lz*^C*t^vJJ|8hgJ@!i;J1ue2nLz=807Z{glr5tKcf+4kakPVEJIcWdm z{ZIE7?62G3zJF-{!hW**m*_*}i;4vB)i1mY*~e+UDwAO><23vR+$a`}YCbI*D+9r- zfCbo2(P|#lJ{<#o>wpOuZ{V{)-k@heyur_cc|)Fs@P=~SIWJXRXR^W)J(S;T;D*}0 z7+7v#r?nGXSphqsQDv#M+scqLD})9{FIr`a+NER2ZXI&@u@*t!$dI;kdB7b|Er*I+S!qi*@_I_ClCQ_ zG>Np4C(f>yB+R$s0VHI;f()>gn*!Vj3~|=n2%;=dBw@Z4cqAdS6`2`~{PGA82c;v5 zr-moa)}18Gx5CvVWVRwhaD~eOS2&y~<`Y32TTT*YtHZaMu@b+<;R-qzo}}(y1h2zEwg*Lgp*TAfl${fZzlv zGxm)lEf6U)_Kmu}A4FwDoL2HMDjOk9!bc21sNd6kqhKFz{GL) zh*LsL5@u^8f3vungv?fC2wOQU;6{iMCC33VCQ7vrNtmsX{LPYl5;9wnA>=rUfgDEw zQF0t0;@EPMFk2(}n>h{=GFy=WTww^{3ge063JVj(mXn0}io>_z3X_oe3NnBz-1%=K zSdln+{||BUaB~z8+*J3AHSFXx1#FvC!;Ng;D1A$#$o43Uq~m;_(n-SSJNPV59bF?( zXGv+KZ?LWZ9=&QAWb7JQE9$>Tbzb3UMtgYNh1)f-$SAsbA#*T{# zc3^|B{)HJ%U}yh_Hcw!|e}^Crc+V+7GB0Jj$JyMUY_NN>Za>~6zHc(j2`um5>GuGe z{yTTwCeeH|98H!LxIujX!Y~IK1N=_E2iWxAW5RBDnwvQceuLwitH@?k0zzYe|IqIV zZ2JG&n_z=sv2E4cWcO@a^)~i6+g82J9L9E4?*~yCf}t(}4E08jgKewcCfj4Xs)yJh zPj6fGHe%Y_Rz2YjF5(M6XQPBgw;Qfk-u-tBq#HaBrglk*fKCal}ri25$y=Y<<#+X`lNMh`*0bPnCth79P8iSJ9|>Ms+h*%d)x#% z-~QvI0uYHR6u^7Ac?QnC*!Ke{5K!gjOK9!;ugctPhWj@1liRx|fK9_D&23v62y|T9 zq#AASdjH0Z+}`a8gj4B=vUdI`D)WC3mbPVaNXfqMv;!a|`@TWSP1$Y$^Z)2XvAv~* zla@bOS?YIL2hGJRd3P*Zdau5S)uy8GIlwaB~9w(8jzj32>CbQQ7IPpIZEO!k7NZ?;)nlJhR-9TI`zcT5Y zZ(yDRyiq#?o*)$4W%>VUV7VlL1pZ~FIUQj__wKJu`c|Wd$}c-^bQQN0BWy+gJg~f% zKmz|V)7-}Zn9$Anl}X=;cg{;!$86NjXl`sN{yeaJoE9K&f0=1Mz8e_oK7RWvlfKn! zN9ijzJcNpF8X!QVMfRtGKPJ6^{9!WdSK$H9#A_&1l409inaPd zREDtC!vPB}Pz6B*)w3gx>KPM7^#EQE5v(4DII0Iwo{6A(K=y(N3nfrELkw&6gQyI! z)tdqwBO;v?ag>H6%$7+17yp%n%vNLw( zA+r^kwGnz>{8Z^CE3I;y+uSKaHc%+aUN72kTj2-{flQ{y)nBqfCfh~~fRI)!m8y2x zAd_ul;|(W}$vgtbHppb#2$0wk*od1T-~T(wK0=<^7qG$qs?5!1o|%;F`*VfU zmpEMtaaPJ7L}h@j+!zpG`&VUdHcK2x$-b=%?q-R@zbe@WsuYyBr7vlSVjCng4u-AEtJ1M}@jS)V_*2_sZ7lhTHU-!EqVq0)u~$6^L>EXavc z8U^%8B!*)_5@zf2x#?JtklBh1A;&?8uMsC0MWo0LNtmt6=VoAmgv?fCfE)**4jw|B zqHz}D*m9CEUvqCrm+9;DH6TVjNTR`!XmAlQO3|9X$iV!en3F(^I0d-5LBxp>6K9np z(creOm789~50V+%%;WzUDnr=HtpZ#m;uMkm-;o)^LX2Gtk6w${A6?O)=(`;|*r&6f zUCVy1s;9YUct)T!GoCN>8K1gInjQGoi#GLm>0N6AYgOD_KYdt_)S&*IGXA~!&mq(O zFV@aP59R9_kd0H7RsoZ`vjU|Jg$b3zc3Qiw{xIaQ#U*K7Ot%K%(x!stfo ztlN5qVuZ2bk6|aq$$-M@aT+TF!K{D<*iO-E9@M_?O~&S^4r!ciCA7xzV}kLI?ip_W3hU9LgB25zX`8r8`#7D83ESe9P_ zjJBg@FNz|;;LP`CkK0pl0|t}OS&mGjG6%*^7_qH@Vp#MCIPiLQjxNDio7z05I=ci_)uFpHNcW2ix0G{rlW-fY=W(yuZTCeiDk|u8yIL84@NA zHvT3n)+|~(ORH@OL(KUNRZ!GGe9UmSb)XWA^?Re{&j*r(G5iVMyI!oJOOb~Y30$-7I5(})LzuoK z+Kowb|J-M*IqbawwDaa@!0ot@`6erHH|V8}QGDC+Xj23m5#^Gco1^cx<6v9g#7*>$ z?r$Nm1GnSv6Gw%n==w_mhja=?6sLfbIEJ}~D7zsy;&}YDMDe;X#98?yx4Rnx?yMpK zNC;7OF+YmZ06L5%=rC~{TWR9xa05|vc!@YV%tag>CeDuDi#R$QMI0UeL6ip2;SfNF zxrt+kcN0a2A%q^u+jMk*s1zM>ba*FGbQnY!^1A&U2su%77=N26I{c$34WPpf1RW;M zEp?PQIt(NPh@it!#L;1T;^;7;!SVKWSe`gK97-G={y~%m&|xT`!zskE!wkgHVZw0A z?b~4$;^;6XadenC{_qLn=x`uWbofV68bF6f2s%uhTZ)w7O8s-a5AT5ekCfrs*wf+f z5=V!B5TyZhxDoIjS%`9fLxA3GL@=NvVgB3;hvUxqjl?qvnXSkyuOIea2eRpRh;m=% z5@+!y3A1%z;bzeT37M_PAV7h3KqUu;ILUeG$y3^@yt zl1lWSJ|YmP*{|fzA`|#@`lL4{zoDQvHM=4Icwo8x{>bX9=c!rx`Fa9NPbnU=K6dw5 z*0H8zsusEvz4;4zT3!Q47w1a20L%SGTOR3Ny5m9bpNYGVo>XGe!y zZA7f);fCz+vrrIzof|g>_Fab$u8cs|pcv&*1bztk>Wm#8H;Pdik3y{VLm* zzdU7!n}&mNBPqBwVZtHiR3OX1@9C_BOyTq(>q7|K7&jV>TO7mS`w{CykhK*|#d-*2 z4gU#Jfg5$p#Umj&{ERSS{St0&3_nqWUu(qRQZP6%{1Be(`ZaQjdu^J2C4xJ5yjZ2) zasArvJ&ZdjC@6O9I)KyN@rQqo0{`!BE$n9JXys&XV&d#140bfJb`surA|m8&V=Y8@ zUj9Jo&aTt@1{F0e-H*|{ ze5W0Z$>W}VQXqG+<&43tNA1}e$F0S{gJiJ%ZRX=yhbiT$V0`j*VlD@fNpD{Y!SxQ0Tilt?f4E(^uQ->*%@DVw6k{-Hnwv#AwXkuUrD*< z6o5)4=aDIf2Ab?UkAJ1Uu6gJ%{T?GT@k{LV_*bI8>N$~3?!30=GiOu8m3N|tKDDGx zHP78mYSBogO|C>Kyxw=8S8nH(oHq(WBF=hEH7BXEj9=U;cyRB@IjyseQ8#if^nsq^fqlenczD`EtcU-UgxJh5}fjtStu zZ)+pNrZzg8o7k8LZ#d-;VC z?Doqs1b4miT|1kC^cxRDD*GivrgT5tYs^HD<#C;25l`d)po^-kK5OKljAU9~a9Z-% zDR7uRg5HoZw~~SRgXQ|@0YQ^sYU`6Oe9`7)A}1S<2Oha$bWBJqEJOR+LE(GqYRT2H zY4Rq8hu#)Uhznd-zL3@mPHTN|ENVLXa>y>Vo9z9uhccdp3kZ|Jc=;F`e1h{B4SbGy zT(f_AnD2t@vdp_Ca@2BPhVLGgDbYY3y3nlK*`OUc!u^y#ecTU6rtIz9G2pdy+{@O+ zE_AF5xr6cYoACZVoRWL~0(;iZ=OLHSaJ0dgIA@t5hW$hC`e$^Nm!Pj`wGVRD{PyQ3 zpvqQLztT9DY2WY^x@kY3@+30Ovb`q9pi4EOSSLHD`Ncg~53bCLlwH1%=4k1|2mSo) zC&)p}$=k{~d@7c&p$AUz-YB9OI2M!Dy+iPHymnaaGSzsTu;XfuSHbX;(U-Ir+9E35 ze573VJV?A(?tNrA^KI>(qaI~y7p2=2ptob<*hJAT_9x{%tsQtEBO++CXX@zlo+0XI z)71Q32)_CxKt?Gr5=xsJrZkXqE(FrF-pRI3^< znTRZ6X=#ZbrKL>kDLHmmr0M!y?7*23iG2-f6Or#In5XVroiAgjm}tq8cNvxf$Aw)l z-W68z{ymKMvGfHsgToJ=hbSCN_zB#sf6+bnyQ!PPK zm(R2mtM=G1dUgKn#3--twR-x}n|&lv}invlf9rQI%_sRXBMKSfRSG;7hQK9^r zQ>x#dhj0}3oJYW8v6eU7)tW$UYAZi6Rgkh7<`}Z*}%%Zr`~lgtf=^5m$$Ll zCr!b#eUCjmu)EzJWo;TXj*-rJzTG=^6w`k1R%6_})tt-?9ZhbjIXha|nmG~fHJ8{% zTjK`$;H6z_w0l_Oc7+;gV$jS(m;D9yc2Qgr?b}mw>cNgMw(vxUGAB`wq=SVlel&N% zesgjwpRdI4$a+(KX3*(*mkY4EB3ec@@$N+_~E;(mle)6fP_F4)D0v94?HFYo-UggNzrv7(3j%O4q7# z>+VX|=;GwKvs)qF24B-KwFGKfM78;DZY7Ntv?4Xh!Dc)JxB$M)t3_d(38!?b^` z*EO=st4+M-YVCNi{Ar(O^JzLAWkrQ3>9ZM1o~#*h;I1r$i*f<4pB4E`bo9GvJp`h( zxK|un`st)D|5XM4;g|6*8Lh&fT)F$RKa1{E!TY{TeCO`oquKlZ*Ytaoy0-#FANW0v z4^+K!EA-qrY(QAJa$6;Y-dNf zW~RDi2E~JtU)2Yv2f}=6Q5Tz(sNPNsq<%c|M0IB0od+yY?;kA3-GA-KcFtYw>b{Jq z=-qoS9_D0ttLjLe_(+oWwZ7|a*tN8`61N;`Kd+{#E^)EL+jZ*@0v+#)k1oC&yK<}T z%mbdaE9TvjYxLe}KUpd?Wb|Bn_L~3yW89sZG-0A`-R`oh%eHOXwr$(CZQHhO+j>h~ zwyo3OTIb^2>>Vc~@(1LI88b&dVaB`sl*H!VZY{zYB;;)LGVsZ;{gpAwS$8%l zdH@`SFC4kI%B~TDO-||;R)kGF_^DQx5@55!2tc9Shm47@DSHF0RO2hy#5!gFRZO|U z9&~hSrLp4u=%QU>@7xn9mevS0R`XIcHO|)vyZ^Z;@2wu*p*ScJCDdP$jqitrWo&SEJvUlQ zXI;roO*2v7l&Y7aPi1X^<%lGyBN-$LAH@!YFs7JzUp>69U)NTb9n6L_q*I zL!g>jHTfL=5du1qlsv@A1v9NUD{UM*!`MAzt29+@@1erleDWmN5KczIu#?y~ZeWSK!= zY34lO47XGZJ{l@UVt7g#WBP0db0)B!Vx^_Rp3yahFH*743~B#JaM=0x-zpE<6R@yE z7MxaDvntR*M){NZMoXBqJ*2_BdN3680#-G{lHextFz$jPcadGgrM04}tXqaF%fTLSv-T+{CBqmCpjlAR-&nQf8xHt3 z7xEs>hrm974Ia_l86=`S47Py21>CtdCG?olew^il+*{QA-JDm*?_mWN%?X14#GL$w z69F=zuN<(Ysx_S97ZIo`5&h}9mf!dtS0Np3iz4r);z<(0+^4>{)(TGf2|+F7+l6z8 zpPDO@# zF*)WngcTueMHVUMG&Np5$6}ZN;8jXmp8Yg;+|vLj(#2qGhSO&cl}*t2LF4rB1N1i#7GlHdUUJ_IQA?W7$_&?0POj=@9&Hcrkn?v zHQE*Q5f!dz;%C-Xn)k-dI9eq?BnDa`Et5p_Ud4cr{zgLQbvxN4iG>&cY?`SNvLhM| zFB5+{(&#GJQ;k%hM(CTabP9W-JInVFkxf|4#9v35Ca8{n@MPI=G7w+e8lKy8@DU>M zTasq({>F8Q;{=#B{3qi;dMYHwP|2d>H7mylP$r{$2B`g_pHoLfP#XzZ73XW<61Ap^ znd8k`7UcA4VG5iQeERy6$kMcN^o)`hlw#}sSCp(WCN_zobnjRFYmdt2@`KBjl6QxL zOyu04_5{II-&g0DnS8*ysL`8=RG^TUIWhSLPe_N!RzsExDPqbcEx10GMl9vYi4Ng^ zMRPK3$D{81P zj?!Z~HqMJ&Us85<&A5VtG%hbs4oi}yM~eP-sythoHx}70>WfZ4_eYk=wL0tx&MN5d z0R|4-x{Q)B-Pp}K%B5M`*jBlY8oF81tU?P0HnEQ~ zg<+UGkEy3qrt|Ztnpws#+3cw+SGQ-q{~W%h2&N+o#IIk7nEyB10sH^j4rdQ*lmGD> zS6bVSe_4@z1ABwSdf-M!|E&LZZDe-#OqyjrleUYY2{JXAB8mceuJwuO6~{AriK)cv z9}OR7Wly*1P}jO&aO1_vae73$x;>yA9%U+qBwT<{uVJOvKSaP2c|dsmvhZ927aatQ zyD>!UK~x(6@y7b0lUm2@9{>rO+6R+k1b`adfiFpSgTibVix{Hc(fuwcm~u~;ogprr ze?nRyA1>XteVLvYL6C>QQ%yba1ZO9>CzlZK*TjXCK?E5O3KIu*((l|srQi-;n1|GP z_rTb-Utc#d52ZJ>nt+N9TVTu%rDou6j9!Oe@1hjq@xAM4@PwmB-V1&OuwJQZefd|Q z+*l6Bg+JdH@?HPLGIy;YAub-5N*x&R7dD%vf-29rr+YKx>QGl|Hin4N7l0i+AIPUJ zpN7g$NNZ2dhzOT7-6NK42p&v(lEiX0fj z4y2VwIUtw=fmt-4gdRQqvcPe&L74M}5}oWJh*|I+@GZUWbWaM_KZM48kXY5u%a*wL zR_&jT^`U1qZ&)7*Nc`%fyicAD0B&mjrq=%^8T5YL23bHXhZs%59sQTT5&P1JH zigh+Mc_c4i0)=7Yv>OAAhvA~yG4Lp~%K=$?VxEYZsz7XQ%3_OBr)p{~6M6p&l0voX zC&#IQo${Fh#w>o$q={#59JJs98Z8ay{vDKf)Ar`FxmO{Z_ggOVi6=d7NrY?cpA@XB zwv60?QASpl+#(ZOD;evwrz>E+h1bqm`1|Wz&bE@1t%dum?#UN)4yLfHKYl%lkQto)d&m-gea)W2gbFriUR|%UQOC^j`HiDgZw2=vmaXT+_3CM6YC+{A+Soe+wXBZAMpTa?$*< zI$QQV4DHN8_*c)??0A+QfX8ic-R!9~1xzS97iwqGT3~%{l>y>GeDjK#ZdPGw4E51*=0YpVqOkX4So#5` z|3>?-IYzZe=l%ux^-G-o|JEGg|F=2*2jdLw?5zHKj^!k6+h)-t`{(K3_%p_3V z#Ku7V+B;l-(f)qxbGm;B!3%_I4zsykC z9LYIqJa6tq`0`brTIkmSiFVLEm)S9TVfHNJ{^nO~A3AgkYAG=5#h@ECA3!{25Q=mr zYRnbAWfs$hHOIESDO=_eq~SF55?H{GaMl{)RQ} z9O@xG@Ww)`o$yS*pH?qFaa&&6iLA!XRj|4Kve-O+#N z9~Be&S04XoGWPFM{g2cBFP#1V7RdkN*(8DgK%~e&5J`O#k@O2i(4|vAd|Qyi-=S1C zc^zp(3BPSjKB1I6Qe9X_<45b^CrM1#j@M>tXCMqS=TIZj5lq%dgNx|x;`;18w~2o; zrBVbu@#W8JX}cz$P!;)XaOE{n6alTcE`kfZAc#(Y3c&!JcK1e6TV&y*sIw&7r2qJm zGs!1=5Sm$rwU*>{o5|=#?adzFM*Hp>CawY=HG5|HA7nEEFiJar;-3UDCMiR7v?Z9g zM3{hg*53VJ4$DqYY*DLflR|HTytMAp46P^nwrRm{{JX(W{<8Q%PcfKr8zTT6bke*a zjjw=(Fn)8t1eih#f(3Ij%iTX%(8ZD>=gYk84f5GvZGWNv(-r$AQu@z7UEBVlkpHu; z(EoJ(Us3-@$dY&&%l{#|^IYK@V+Y0xk`dW56vk+gUj7x#tsyiq@yVc7Kw{Qm*4HYUav26PrS24*IVwDz`U(Oo9;*a~Z{ zTd(}~@R^VUJnr=%@Q8qI7XEk`I0Er{{DJLl$m>6VZJPG3tu>Ea&$%~;bDk#|8I`$5 z=bMctuPZN|munUQs61kZdGYyQzxrRvNlHO}-SYnWbpjUv{sOa~YVVH)B9;(G`3J(- zK*ks4m+o)85#I9lX*}uy?%T3s1zGlHKbj2bc08emZRHWbY4V>foY<-?bQsQr7g`L6 z-6e3N_A0!55zOD9l7=^bM2cf`s(2meU}ea(!{!pA_Iex7+B%+)ef3XHq{LTa?z<(A zw_Ho0>4W@ty$68W1mSG2MhI;7ME7|7VSZKF-&*fsQCs7&|FXaPJ^wo&_V>asfXILq z(CLZ>znb#^8&`Y4>5uGt1f&?uFJAH=H=1ssKfm@4zwpo_XYkHvyRxcpw~EmA#%5!a z_|0)%p^$_;9{nuLS@?>v$-f{`sPxD3HquCYh|xQjpg!VF_aCjZiGEg;h3Rb-~I+80m}LGUvYaAVP_PN+AU!sR_HHe0IZ zS;~By)V8RNukYFY)rm+BoD94%8NXg^k1NfE&wAXQE!po?MDV+G%6Bumsi?4_!B zHP*3a;x$6?R5#7e=|^BPo{e9gtZE+(N5gd%5$K$~vs8Ty1LExe`pqvoVHg)?gR**B zVJ)L|zf~>hK)*l>f2$jk#}y=3odkiy#W(AqF+-iYs%ZI?T|j8XyUmbft*RJPxVw!u z@_;s?nOx7nx03>-Ot)OtM)N-G&x6%VZq23n;{GK4o9!bGn1w|&=zBbRMtnec5U$M^ z8RV=hJYU$K3oNuVU90H9!Mj<5+j}}8;wLBSLO4Xo#V6H1FzWUxn~Ym#&BtdvjoENd zCyfwjYgaL&caehbC6ozRWP#X+h5fER&n&`tj2np1YAHH;^VABpNZ@L`RtaSS^RK zW5d3K21S1R#{^`Igc;_ck@0p#tYg)~wBEsk+6!lu7CIsrKScaJ4tp;ql6Jq~sICUI zuBM;_gr@9p#*4huRNUE97n9tz)eOuS9jvPeL|0#@W=D+(=-T(!`&u_Gh27j>6Z;rN z#6$LWS^{qbbTye;Qe8KT*XqeaWsj|vu=PguI_Wcm(GK8oTPM3-X0j(jj^__*Hj=G! z7hl~jQg@HG@|4~#060&6NSPXj`i&1}njZ&)d&^qeihhDIZ?+vvMOe7>ilE}lg|k)1 zX2A#;G>L{UfI2LqyP%AtyT|Zh!AoR8?<#4q=VBYx6?*A;nY^dLfS{Jvkj-RERo7=k zD>!fQ^b!C=`pK8us&8P}-5$y75iE9V0d`W-Wr*OFWVQ{uF1*;G!Jp^JqVqf*Q+xjX z$K$@3_Gjv>>JW@JS)W5zVce#866(&hDM+zF?g;JtTy=vKI&DMMc=)7_M(YK;GO9Oh z@PzWk+-nPs4p($jwI(F|msjydn?3w!JV#t~Rm!R{m!#Ybcc`#5A#TptTHKAeYaM-N zC!SgJplq0Mh0}_$eLaMG<4jp^Zm)C7bKmH2b{BR3r5*uT~*a4*G;iybB~OsQ7(1K zfEX34{u*V0AXiJn{B;?vVe*nI2I*2o_ShEl+5QWTn)_U_I5ih*#xjV36R$F;yNTN5 zBhS7vcgVTJGC48^f^Ufj1H3=drlu()_LMxraGi5iz$W4*931Q_z1APym{q(;ACpl& z?U!udkI%_LV&13er+=FZ6`QG^6-Is%IRLi!1P&*iFJV1=XGomcaI;GrY?2YfTd*-& z9uI|{a0Nwub9_PKy4R!08Z#m(>kz)wkr1smxAvO;rmw`K3Ac@oDS31VMn55llqtg& z2N58zOKjXbl7KZ9=sTW{jdPqF9#Z01IY5a6Y#rLj4bQ* zD3v5U+tR$gJR>!2z?7|MXETveBaWP4h;M#4;rUsodUK9mMWd!i+0vbO zY;1vcw*LiBvH}b7lt-_89y%_r(#PSLER$a!S1Gx(^8>DrN^mrEKBuQzr8NGS=eVK5 zcZ8lOAWcZPsV%OBhliqpBlArAePkZL`ZOl>#D-gtGoVI ziT4R{?aHWx2=l@{q3bP%(@;`fs_0^|cxzZNAI7@NUtJi#jEJ6IUiZ7QB{^Z{Mqj-H zBlWAx#3}oY__SHX7vUqTj9DJa-7d}-{;1kh2&K%&`KR3qCEsanbg0)mCqDTs^+o7# z6QWQ0P^HJK6i50w*5+!6rH~ z6<+1c%p#4Ya({mM7>V+LH_kZ2Q&Jc>WcpcfEq4n=A_Fc~cxrj~!rngPV`HQ`U5}aS zuAaD2WA3tFY=E-K8l z1gPOqqQgvtFO&6A5P)!;@Fjr~Cv=H8{e>tWn?kdeP4)maJnBA+r}PfRk^OqNgB93l zUc(RL!;ES5mCUoTSV<<6vc$hOooU2X2DMKKia1JpKPJOo0%$Fg7uV({&4ya1xN?s6 zo>|!2xd>FX0n>NxFUgRWbAmhggn!U)H7t`Y)welUO^qdoX8*u=b>ywhcyBl30F$f= zvwSi~bP0?cX6NAQX855ctDqtM={cE|r(&ExRTB*l07H&wT^N%)2L!eyrVHmDtCh2< zwo>h=pXzD48sm3iOk~~;*gm5+h4krI=j2GHTyHt*C9@Cy!c!QNz-Co97xiGu(>+_d zs}Hl85{X%ByRFy%5GhV5CCs{8?JQJFtOXrTsu>?2w6;?=jrrIaEE#gI`4ur@=`j&7 zaZ(bTOL3i*(W+v9*>HyG3G1l#>Wo?5@}a1kcxVaHP_>bmMDQx_vggD}A~QT5gAH$M zhU?{vHgc!Er#AJ(=%i=+bnJCa?xWsJy2tc!dXhCnM0(;(Zf5z{q^Fp<0wyAf?KfM}Wq1wk^^Wd! z7MI-bZ;(Z)K|z|xx5MN{I8-5iM@liXe@O*ZjsTBH=h+NxIF)&>LN4mm zKc)DuxC+77)ZSIe=BtfOj^0%|^V*oCQKL+yJONd%{p@vh1n?L{7>NNk5S>(VqEV1- z#R@>2$N5Y<{r&!@Z8a5;%K?7I|HB#zh%0c2ckf`hO-TS7`@GSkjBQiA*ZmBElT>J+~N`wku&3R;UX zn^0h75tmFpU9x*8B1k3Qb!;ISmYO$Mr{^`Wpf-r^cIYwtF{u`ZbvuJ0PT=qGUhkG6 zBh>7~edMsk>))XZi=~By5L70ooLcztmn~p&Jwrk786#n&Y~`Lv%cD2xYu0`d0wrg? zXo%inqrH?dbo{xR1=@e~qZ3eVaq5ri`WstYzpZKN%I`lP$={OPUtZPqRG#jAtwef+?JT_kYT5^s zJ?zjsMP+#wP#jZE2*?sZmEb+`x1%|TQ~6paZ~B;X^Y$;+>7Dm4B#loln%w)EmCeVa z;BSHd%scPJU0>Wp-CDa3b`|%+G3>gp^9YY!}xN6f4>5fuu|S} zI&TJVs8UrpuA(#Q?BYe>)<(MtnRmIp{PR5MlGxxhN0H;8HPr;l*>q?E)Cd(04(?%R z)+*zhWUegEZnuR|c82S3LFJKi!DA!ckIHkD7R2G}6Lf$DQ!hOv5unw#H7)|toJezA z%Fo-qyt;BxmWrIR@V={~FKnVcN*trx4-|z;p~`1eMX|dwI7m_bkhZY*$aSex3WW(}mk(a|Twz4a~o&4}f2N{+vTk*uuCrvRPeSK3wa8XHV>!EaX zyyNMOA9iiYM$Z=@)?PLV;YIC1c=@4ZV`GUhGBtgb?dda+qLriu43F723 z!Zk#P@q}{xM)r$Q?NJDx&x0#=_Q%=?^(Mmkt;D3l8xO_2ervA@c z0@ z{JN9Nqxtvd9vgubaUaR79&_$Yz}ezc6}4|EPSr;PGEV{-<#HdrD-=olr79X86k``@ z8Gm`1h;86I%C~^s#QPWaUJ%G!X%N9Cv}CGu18K(` zU1NO%BlPzIlKw5qw2uetZsG(t*>++mxc&#w>A6EiWlYOiMW9$Rco`Yrr51n<+n6I} zL;u-A(Uqd_+!5_MUY!!+0|r0y`i%CXjhMzFxSuMYDKuZ+Dzh=L;_MPyfvHS>rlZ0| zv?#f~ZY^xCkNOM1=b5@dn+*@elQNzjhzpUIvkv~;RKO%J%5E+xbQ>35K>>D=R&<@HHmU2YBYB7tg{MqcY)!p9D<-jox~VWfe`|FB zQYh>|R}QtKuO34Gfht$UFDPjB>qG?;$KNDQgqu&6d)!?{zJS{hqz9y<38-t8s^lb; z&8ADMx)NM^LB^v>5wAj3aqou)s{wh{r<_I#O_A<3``M_eILXrz;%(BT`ZGBFes4BI z3*&{M#e|yDMm_q#gJ6^^>5>&`Hinr^=jEhPeM2V!x|(D?Db4oY`=MFzl-zX$o*DHs zcKV&TUCX=Wy-pSPi((z4Vhd(E^)02C;4%VoPAmxjH9|e5sG56lODJL=Gf9lMVm)re zfD74FlUBfF&{Mz){h0?~ z+P1!fCrXyS1h$_yUR@;Tmmx)^y;v6&nk~$Jr*{VqAS5FGCR!{9O9pT?-m?Nfo`1B7 z3G<#5_N(>Y<`tk$I;tfkSeb-Hi}pPtf8oZqQP-2+WLMl3+)u50FB|RWz9kV`L^b4) z_>%J?_f{5Bd+Z$XG^_M!zA3A)sM%3^L*iIQNjJH)rkY>)!xo)rozg?=~B^|XPRrnD4K)%|8`u2tB`XuJ#H zY)}y9eIEtZSbFFq5q5g-#e848KVHK-W@tr;T-PwxS|XD;2HFp5Y1f$MP83tt>KtYV z>qSgpP^pBNG8AQYf_Od)?d*LjP@gJm9tvQ2cf&eeNsAHH5$`iY#W5@9(ZceYatxy~ zMA+-JwT~<)H_Ms`uSPsOFg!-GBt&8ELyVD5pRH<@>E7XZ7I&TSPn%bMvmYFNlm@nrZlPDde56{0T`C_9y zXJuXfk6nDTmvS~0-WB%u=F?wi8f)^sz>fO$IarOQqX4{e?u; za$LQY=1u_Xa!j}@m9>MfnHb*2%%So#4QA7%{t{i58xQCs-)gnoU%ToY4Qe|9Bb(9% z=ogOn&WtjFS*}Z%$U-k!r*K8`ajI5HqV0O2%GjbtY-}UQn4i11-0#j4^30v6H>7VMfjOFbuOQA1?QwoMOpx6m2~ZHe|8hO@i@*bDy z1euC+Gj~Nmo+QG-a=S$rbZ88$ob)wii5}mcaA8LHF%YR?aognX%@W0L&N0_F(p;*O zd&%54B+my59DrrX!@-y`u#H?dnLHmiGXCb|u!*sE^JYHUuc4=x?n|I+Ez@17lqk!K z$qWeW0@PwPmUm{gnU<6O1{bsAis`3edaE@)w?pd*%R+K~gN#k(|LYlKhE;js7N>@yDwJxQ>@Xk zPS0YocFjLm{BG5w%h!SuqkKwA_of$y{s;E&Vp&puTR~v{4-YBHg?~sJ#j`>X!#$b- z(Q`~`eaB{#mPLPG(5^pt-lIzX#xv}<%CLvlKs60e+3%D2H1W7jbGGAaoD=@eU&VPw zAH}CtAsMi*RyrN&uQS6)Whv)|Z=W4D+d7>btqdSfx4Qb3~)u2K8JXQeg!zUHRIXx?oRbVmHWR-KQ zTMJ%I774C7=FjxN^y$iA91~>BKLkHaqg!1BuMWxf!2j%vVblE%3q5t*yK0J6-&4-9 zSoo2-;JNmpi`OX@@ijXLnREo}bR&S{V{ke!wRVFH<1BHh@@ahBC}rSo zZ6+|464D2O;)HUjL-93{AuhYh3T8REJO?+DeKu#=EEXjQ&?si~E1wZ!+9WQIph#<# z^%Z?`RIW#}ApAkiX29pDmtoUq_kfze63EMN7`Nz7`sv}e80FoSKn;?}A_heENW|8+ zP{T}*K1TdTdw+Er1%Zh|A^aMZ{vb>#b`Ng!mG2F`uF(=j@d^o9UiR1mG}NyM|FoYOW=-2<4PoSaehacWhgNI%JVfFcFDV#p!> zv2NS;OgrDWm9*Cn(MHv|P#*x@Acs7rFB2uB;+zmV6u|CS34_13aNCzjRo=RGX)j-A z9zbz3hh{K!L)zy3;E#|9>O8LFoZ@bKM4)FV90soEpTKu&m9AKrQ9pTpO)Z!zoM^tP z)e)>rH`7fBZ}AWa^a*4CHyGXZ69vAA?3u79-+X1?zs%UYooFV!ZlRqc0|25bQgPxk z0j|fER$Kgc59CBbQuVoe$V(gB76_>p3%Z_iu|MMR%?7A###%Te-#j+4ukS}5Gw$Wn zZmQ(2tkn*pn)*6nJ*BM0;Kv0_uV$LO=LlN%9_%084LSCLOXD*RcZG=OJTXj1n{wfx`GsM@RGoj* zV%41y+An5j$DMbu8fE4-bVRDwm8#UFS|?U827H9r5>iXGm>QzC{s(j8we=$2CGESS z3%WF*2Xe8R^zc`ZPj=GF4N+d&c&aC6?+%6c8BB7uzL<=eE~f1FEOGNCFBug^O_ z+~zBbwfZ^x9Pb$+yy_1~D;uk)4CTYaS*&qM$wI!JxyL;^yc&008YvlBk~LOf>`IrM zOeys_n1t0XK&q29msVjztF@bF`{PQ{vZWM<90^y+-YfV!iUz=G!;7V^qcfvJ zb=l0MX#fx+*GBTgUUQjjEocrIKs9gh2EmNF#nVE^8n_YNp=#lOR2kI5r$JiQP0)?>*uP+r$pGsz<-93YkMtbk4 zyEP$1jm-_bc6JUtG|Yy_NlMDk@P~)D6{)AMtBcFl$M=20kJ)lS0uj}JTj9N_IUj$h zaX&#yZO={yG_CcxdqlhB!6_I>PU)!)S&fV#&6DQl@^aiS;^q90z zxG_;tOj6J9$EuHw+3r|Oi;-~?cAa}R%w0dKmi)z)hi~GGaJV781=rn1;c2LpCU>^6 zLQcjvjP4WF3iN^horiMqu)nh*p|$c-XDnwrYDIG1HR$_w&vT^fX-b%lCZvt7b$nRl zIwV`DXKZF76IL*~xw4Y-H{9&zb?wFcN*FvI|A*!Nn|hbiSQHi8V6jW!zBb6zQOZImuR8U!<13BgoM&tEbk0dMo(N;d;3OA+b*w9Q z?D90?d*NV|m$MO^%H+euVCHgE7%zv#4Rp#iJpG_QdU_Zq5Kk(1*+uG39KY>L_oQUY z&(iT4ODXvZxIM(rj6Lh7oEMq|9tuDJ@q*t5o9T?vIro#I^XW4Wv6Jnco0~fsABH2d zKTM!?cJ%NxdG~Boe1nAOCjF@Gqtsp0IVt3UIhH@g(}25Smn}#Zw`z?LvcXK&^)Xx| zh$N1pvAdyhx!!KHkzm)Y)|c{0IU_R7*n@XzTe|;&~rzvgbi~4`R}j*$VTn^qsq;5*+m!`l$ew7Y)c< zZ*9dGH-jgli|X(`bc;b8t8jK44Aaq*(x}~)gI)(Jfv|6i%+;eT0=c@Aj}xy4H>hvT zE+FbwV3O{=3mMXmIv|Yu16z@3>|NNGT7FPdA>xE8!Ns!3%j! z^dwL*_C;9SR&lDL;*M(%U+{DX>NML`?p?!9RZX{x%BwmYKi}Z7JL?z61rOFuASbD~VBsZ>XxvO5vpo~5UTO^#m&zCgDDt>( zKOQsl}2)ZnN)$AHhf+SU1Q11!A&81?TMc)nQRS z=!vWRZC&6Syv;gl_LTQG?&J0#Pj;7zB$c^_j@1SX8OQS;y_vo{Wdkq%ukMJz@{yly z9*I{Mi-$WF)Hl|k9N#Vh&LrymNIacRxn@H#^9F!g-{pLZseBT&+D_8}robpSESH(S z$DVSIX=A#!sAhv0%%E>kT<=aym-&IFK2m%X^!DfPO4vX|9Bd}3``Q3vGUVYsdIpyo zYI2|5AHKK0|B^{}z!rE6tYH-XU$rf(=~Dc9bF9xU7H0H3JSRMufX;oM+TwP_SnQgn zzd3Y1cMUo-YPdMxO!z0vjhz0jXqS8&2Ii+>Ib2U`*i@&%SleAZ5PkoUO}C=79th*G zsKfxbKJY=Afi0h|fc~?uicF*Ltlzcp5OTEjHSqc$oP?xp9+()EW~G0ZFHnrarlcWw z6n)-xy3+M)Mj8?nIu~cULv{o-NM|=xR1r-UL}AXh;k61+epF5eX&|N3{osVJIzLow zKK#AnsL!%w6M}bpwCENq(19f2oo3qCyY-7GyB(Kd!Q)0%yr(Hu{HF0HXT;&h$A5Q% zh;!aw+{FGyo83haY1awJhRKo_6dsH$9eX;(IZH7PLl2Q=g?SG{WxJJ?(*XBf#BOCxcyJ|-Ai!ULGzX+VsHvV zFlz)Sa#lC0!A0+f3npMdXOR^h#vTcpx{$i%Nj&w3P_j&>I%kMPS?cHu9qO+R+jZqs zM61hd2IYg3^FF|nh_Uc)CTii$Q~{wr?uh4U_95%VJauGXoE!`PPgDM}{o&`^#eNQ# z%V5xQ#SK&b-pj8f7sjur8jO)5ZojLvJ5zD~y)(qBxo=Ni0QDEAl!AfYo1oB=M|DJ- zpW-SK2>?_hV0l8v6-Tk^4Tg*Yq%%?VkN18&@`Z3MH#oD)-yhx1o|S#cNEOdI_gZ(E z=14F_uyRl-!v<~??)2bTyq5j(z5OX3loykhs`MNp^KSrQr&JK?`U%79=EBxuP{o3) zZgkL-fKq|;yLZHnnL0?h0ZC0`C0coijseb$+wTb~gGf*O?(D*aB8)lA@+7W~Z4O&0gz}lz9V8?lfOW)7@ZEGlPBv>G`WqAFQD zqOop@VIKYSsx|$t`yyTq(*qR~$2Y`SlTCyWc69ZnY_k4s*Wh^3+W|hSdFK}e??B3- zoonG>G0!rMLcurXU#KU+CH>K1wsf)6ck5~nqc=}*to=r{ZbJ*194t9c1Vk#nA?0>MkoebZdbH5aO_#g3PNQefYj%|<}xKHzNx1*fyfk?0k4B5-%Pe*Mc zt@P=uu&In(OLJCRikI*dU4v{B_ukms%&WcXQdzb zWAA=HiO*DwxaG%WJ7@JvrbDgy6YNF&G1O=9%`G;r_c;O|Y~Dnu%Bm7$u&1@r_bp^w zl+?fuYFs|z5?g~=uiD{EqLYQE(6oR)ppp))Hd`&z1{7UELZ8D1#d_<4tS?rtS=!*J zI5IIy0b4Ve|0e5PsJ?+8nI9_8{N}?^N-fh}s_h!fTjpaswqwQxcIY~I?fZ~Eo`MzW zs+%_|hJ=9Z=t;w)CUZPN)$;vuJr7P$RaF(0Iw7Ag=yOjPHtS~5$d3lG`$qOLv>rW@ zEf!1bb%BK9=Ce1ULb20Dd+B<0?hZnb1zf^L&tUwhXg4^Ax6SyoyFKtyL`K)?x0;K2 zkc|YmXDqLP$4bt&Cl;kUOb#^lGx61l~s0> zR@GZ}tvX$!sESkzay^p`iJ=g@A8pRwQt2}zAQMx8$4#%w&*6~ELSwnr>Ub)dy^NJf zF1ZwK6stA~s|mT((e3)-W&wkRzQAxrMMaSd19iu01$k894*ZC}*uf(p5bQ5)a9nH! z|NRo067G>K>)np%hRnql{oJ$gso{)*5i5=D0#2jN3JZnteSCzv7Oz({JMn9&$diN86kg9l z&z~;V>Na1)!S zs`9g)%H8=$fHIa;^SKp$G;vJ+MPP;)oj}&>;R69{l0%SZgJ`=w-Be#WqgUL!U}5!r zeQ{5h6$vb*O;%4!sHvLerqh7w=R91}i|$nk0&AX*)`*PMK!9#V`REDFr|;5ap&Woz zA;|C#vFUIH8uV<&&wJab1HrXlocd+k=yn0q`HURag8 z#o{j?7F;L)Tnx;(X0pX-|2<5dmJ6hV?vCuB9%&hojtSIWrQxG}-MdlR!ok4F=`}5=so5DTq@=V&_cv}APfN;UJYA&)&oy26 z#3f+~u|fP4)#&U@Mr~+DJC2rYP2CCwA#n}?Yvz+@`TYitK!u4crPJ?rj1_tQd5-jH zFVcQ%_65pBtCM1PVfg|gp!bwgnX{~~Z+CLia_-RATbm*u_lJ$su?(kzEoB!=bMrwA zOeeYixs)h`_c-NnIcg@5-`43NBXbNooa$Me3X!`PjdBbM1qPh>EHP1*MG4Drb?yE+ZqXcc3ZaTZ{AjERXw?J5MsXdiz#? zE{TmokYC_$fAGd9#rgc{c9YLDEBJ!_>x=J zR%6i~lP6K_Yo1na6)%)CCs|c*ri!WFW7zx0ZU@dKAiGvcLE%pBv?o?sK~3%;3@5;= zyrROv-o6%%M=Y~0&7?Alw}taYuCE$LyJv30u4{WM5nk-*5l^gI2pqnw{2^Qm=H6w1>SyDylYI6l}ZMi-N~(zK81DP6|J zkD5TTH^1bIHJ(*u&wZ?CM(g=Etfbx9HxB*z^adnFDPVUE4))G+C7mgQtCDFx-A2S? zCfp-HitDw6CrSoeq)WRvc$IPQxjw>EZ?Y1bBbq7ws^ayo z?vs#)yK07=`2MC2HBr7im#jG2*pn+|z=@m`kd`UACM~Nge5qdtwOm+yRrB-$a>;qZ zxE(ZPTr`~&_x_Zb!;%N9S)~gu+d1>%bE_=>knoXNKyS*BA1O%Xl^;1^hx)-1-<&`b z72hS{zNnuCaAGb~Blt4wv5iYfyaL3gxxDZwOJp-`UHx%;$0f9AvUm$q8;*j$)k<{j zikQ(T4UV?qP}|*p}v`iJ(};rp_5cb?fL#17&?X~mBUS=CQ-)pGDdJ(Bz zBF$$Z_iVxEH1-*oB*4sVoUZUPX>+?DFIHT45NwgE-AXrAYpj!C;A6U>m z>JU)Z)f%AM%ba-TR6KEUEZi-ky>%+es-+GSTdIt6H=j@V!KNX^DfkV&gIi@E`I@QU zS!qUiUce39Wh0~dJ-xLPxZab_!#is%6cdH)Jlb6zUWL4%i?Q8^?YlmJ@brkOD_(^l z7wAmOmt)tIQteVmh<48*n|6AYKwuO2*EM6O=8SaTwLmRB>J(2APs@I^uX@sL zg=IUreA}=cMguZH2xMYY9DQ+5{@yM+U>0=s3xZq zA-p||p>QUp)W#^>{PI-tkP48zzS!v<8(ThL7w-jC;fM@-vZ1{d8Tr}TfX#i;hD|sn zQh7RmyK!cfxE!N^KS#g(KY}tT_FSrq4&3BL1gm`tF0$lS;odd&SZrQ==Q5(h##B6K z@FZ9ii>om#Bap)z@&B z{eH7K3+JCyIdMcB_J5DqjA-*5D)nRfaGxZN304+zE$&Gk2*KOS;byE}_I>e$-#qAa zoEmz*=UB0j=tJHihPS_-H6ed;llEU<_h|Ua4%n-_t*}3gz9H6!U9DBTy<~KMF-WHa zA^!jzA&0%2SblK3ag?R=Ltv zD>J;28riNfUk8>?%ucK&3LF(?nTFXo+xl**1EbQ>wF?UqcuggZfuI*{ajZjx67&9S z!07YJ*8U}o(%Z!&;dZ)24wSzLlp$&5Q`KBde-RyWY1Yssg(t#oI)#QbX`J;sB9{;X zZ%?Gk_40|u(j?sc4GJXk@g?w&c%R3Q;IHaN4QTx8f)H&?JM~AVAV`y)R2`>gaPhuJ zQA2ap2Yyis@0X%N!T!95Kq)DhtsNzp(l@4yHH1@2o^CAowldolCEJ>R1y{})2J5fwPoi2P7_<6@-p=VG9z?*7F-sZ*@SJ}8m^ z6Rbjk1*h^`EES_-;{s=#K-hrc6m-2eu*sAIIm2QBC?dqmxOo*1&+k zs-DO1f?7SRBcD_}U=6{?Pw>M3>#af1K{7DRS2*^JWl1tJFqpj6)X`aNzFtgzVAlyoJT55Z2b4 z%NhOezP`4Nhc#d?%uP)N&vvNpuaCDkoj;;R=x=6ETP#Ov_fW`(UW@n10~R9-a+AWd zS#lSq7?_tjTzsFHeh;R2x-~rv;KgVV9a_rihLiC{MMY&Q(9K@O#Kc?++qZ^?kHAP6P|7(-mKXsB4epryx9Xz^LcZFUQj$d;- z1K5>)@17TV6n^f!0BT<1WN4%ivQ{r+E!#I(Jw_^pe%B2=gyW^9m8AJ4E-wDXeD=PY zubyvdJQaI}hv2BCKNba5HW&u@*DKHmd0VDflI%{7=DeW6ooNavqCL9h+%Cev5u)4Y#@Wy8{-& z(2&cuMt)#*7TM3GI4QArvrl@YP}e=3`0~5%w?nwu|J3g?vta*^m9150h+$MKgL%UqXXoaG8W|&{ zLc0g9_K3qI0t~a2EQuD1ruL|1;zl`}-KO?1XB;Ed3g|SOBZxz)Ick3{@x6y6MEY%v z0HcCY2qwp}@@{+KWZbRGAmvjHF_98ci3AaCoBn_ALaxMIk%XD;a>&F;Z!Xw1ljGog z$w^zb#;N5Bh!`Sb?n}Ez?l<;aa&N@~R*U~WF0M3F@16=f>{UyM^n!$#mEh_u!c?n` znjCt_k^k}IN0PAI>})^&UokP_kdLxbzw4Vn<+)$go6AT`tCeYyQ&NsxhfJucg#~DP zaZ$Y-CTXHR4+bQ zsAXL#lSQeUmvjiS_aFm7`aNtuw&Y<$qki{HyY)G`Fztb=R?bYv9YEnMb9(SBFritQQB zyRD9W6EeQOzBP6$E$-JxqoboaGO?f1gqF7cO-#Rti9Go?f34G7S5xR|yK3%9M0*PQZroI!T?0~YDEiwDXU#e9QK|8qteXx#W~-&|ot z%ZU3*+12()NC1m(^(` zPCo!UI3U{yC&vt8kGs(^5h}5Ug`Ya$<(Pxk2HouLHsy9CEJ%dfK{62Mr24Q={fj$b zMq_+S09+Jbx$+?5Uv7j&USpsdQjVja&p&0R4Xd3mDevG)lEXO`(779OO%qyQ6}bps zX9IjI^5lRHj(D%PII#%L|fN$Fob00kGLB5h!U^V(O?&nY3*QUP_I`A*J><7xSU$<}k7r9GqMUs#A ze!H*`jZzZr>&>dBi#AB3_yHbV@9>(zNh(M|x!*}}fC#o)Zr=qG2Z3!Y{h(+UhP-W6 zv?4r;FL>lV+FlYy?4~+L`2!koAR(Rp@c8oMH;ULl8r#;KSdXc?-`u615K4oS_ z&bO+e;qEK1u>O6!{YMaEP&lHDJeYzi`ls&Py$9|tH0sw)d7M-sZR#qE>HOA1yc|?> zl#FCR+cKh?)ISGLfX+QOSesY$)JPS6?DZk<6`+q(`ykDfO+#w{j`M6*+K4LYP#lIE zRvc%G@lqk;6*^p?oeQp1ClO=!5tUjBVG&{l7%YCWI!aOiOu-0c4uo@162arNh; zs!CZ63w?4z=-vy!Ag^ih9RX^xIVVZs0DcLaN&}7A!402clCbbb zI%)+L0#sx~_m&g$r++10KeX)JoCdmbc*LOz-tynBfR z=t!35nRq0Rq$|i5NWF)gMnGmh$;GES(f=(KRCwra$E6B0)%=PGS69+W9i}6}<6(dZ zpimPkjD!Yh@g69ZWDgNprOn1>jg#CSk!ZXEYA*wwpZNYLzvESDhrs~AMhxey>|1-$ z_}_Ygs|3{{aCWz;x*&K#0ey)AE(-e3CSU@&%V;A4cpDTW_0ooq@D7bNV{;}+C>I>Q zBspip35WnKgICG#t_V@Zd-0iC;ekBtBkD&BwX=8&yQ_>yGqq>chv_w3JX_RrG{#UC zL&%yC0p<&J%Q@*N03hr9R||lsIS>i}yzde;Zub7vVdOCg3oEuuEXi$KV-a%Q)rEj| zR8Dc(@ebLZ^hX8^3>=4=%6gs8a}~>Om#+XHJZy!Hqjo6jQ>FSfp%wan{!gV)#EvZj zIt$Y&tJr__4dJCo%A;{M0~P4r1h$!Dipw4_6d?UREcoKiGf}-mtt_O8yQV;CoNFy+3??jsWa@`1RL=M?e3w zV`YP;_jC6P8M|OB{Z%+O-y+!$Gqv%U1UzK)pKZ9~7rd*>Tl^OigqU$U^#OYa5C)0!=Zcx+K>hhiFj$cw>_Mzk~AWASnuytHgnHo*-vXi`p>zB%4C0powhp}U^zVD z*xRPmT;}mrFJJVh`WBiY%(O{yER?|AY!TaGSr2mqz&7D4qVTZGmoL{g_gTEo0(uGX z*6Xrk#4j6=cIULKVx*?V9Fv8CAe@V|0aE1Av^oB z{_w{&LaBYZi$sL3fs&+vj0HY#K&{$I;qH48ObjxY=vZ*q;e-9J#t~>sGLY}Pd-)ND z3HdvG(6205zAN%mX#h5p9C41a>h+D{Q2q+F+~ZHt6mhs#5v#1^B@$ro3R=z4lM^oG zzs${OpHPMZO{Fdh167YG#$f^=)k6Mv)K@Hz3BzY2%}}( zd?o~Ht`ZmFK9jAhSN5BTBGl|x`4Rs)|5Qf1USGFGE39)aDkjDB831O`80&5FnT#ZH zu9-0vcP^ObvsC~^cFz$#H!O1^k&=e@h*FgEZr&F$x5vCG&@?eI*?r7==Y1qgIjWPah zZhNX`Kp`LN-#; ziVeNdRYig;6O?rQ8*(^t*z^o^WnW+8>zT!Lx5Grw<(Vs7C!O4;yrlaO)aW^DB;7SF z=Eg@)4PKgtC}a;lkoYiMeP~)Xjwuzj{6s}B>I{U#Ks@6!O1%@X+M z&yu^+X?l!F8iGA=Cz_S`z@WXre${#?T$>*{SMI3OCc z)b%I7Pkk*mh=OM_(8bqN`^UYuNFm}m{aIaItv^Y)6*uaYqlsoxQ`%`=G6wlO-rivG zmf*V>AuEGF74(sJ%7TjP!7!!E1p3h$$9Gu!Be9C)?TbCk-^X}urY`G3re%p)kDH8U z`8IvJA`IyCneL9zgFyB4a$V!P88`P&`c=trs_`PQ9gd7IC&7kf&41Tg@{-mJTASaM z=Z=E`UNztP8f`am@k02)U)u}=R^PRbE-Fio_9Fwq_KzrKUx@^F)#~kQ|3l31ZI(tT z$#t)poBr6ir}DNbH-Z$P2_Sqb{3TNcdUbyxX{}UM>n=K>I5ZEO^wr-J$4`RG$;qMN zRE>>|m6ew-w<<3$2eX8dg<^kStl2Bc9fx>a-GYAbRS>0vR6y0dfO*MLPBOAtS@}@QLm4s`0&3gmnNP~#L+Hk?(cHNwZ0@E!%|rSbMo?F zN}#2}OL^}GcG8{(m>`fql8&q`0QUxX3&Oq9*ArYpv%FX0Daki1eMZ#P}6b-K0XfNr}q3 zgFru3EVcF<5D7;1RSco5=IS4}v*zZezsyBO#vwfG!|ZTebZ{}w_9WAvMbo6%bp1|w zVER)wO* zZz95XY@tw}Ozl?B(uM;%T*I{{mWo1vD7|X`xQPOR4rMs*@ISb7xY>xLnde8V090v< z!^KW=OZAzrYbdDiCW20V@MiS*1;C+=rRjbrbaeVk=3~BVFFu%bE5|eTGy8jRd{7Hm zj2X@$F)o1#gFxePB+!Yq$|Hi+qnqGe>wWgHsFbWm&KEi$*s#{X^zO3+87EAEj|1Yi z&)Gz=AN9Ef3E;(DnXa;@2b`TfZv3Sa09$Obdeas7+&CIHDZ`b_l4jk`sbCm5a_peU zFp7_HL2i-#3zRHaB&)est*LIUDdOe16({%Wd%R+2z4s1y2y}k%tof3Q79cW@eo=C` z*aV-!N-P0g>`}ooI(FWYX~M=z>kG|{5Id%I57I*v{`yMcrk92CL);|>`74dj2ODEl zyd9O@-xO`4v{ZsULS8RjdToUWjp$|9p*{V)%jcWeau;ozLM>fmCv&IVuGW;pxf$K| zK#gper)PBJ-(Ot?4QCxlY^(QmmQX|RIn4X+T&lEar=_b=Qh%TLGaF>%ne;`9kl+~M#yNb%sbqlrd9VGv6jrIl2g7)M%(eW9($&rXdryUhn6 ze+ue1!?n5@Wo43=vBGelJno9ZB#Ba?L8z6s6U5j}Mw7H5QCgfGcGoY|jT8rU<@I3n zot9%Ot*^NOQ1k0@U0sT$(a}bLL_$dz9;+2B-YJc?Jfs(?bVBIQN+BDj1@oIoe+VYl zU50j(!PDMVP=Y{|Ie=83xe~rbC2JA^9FwtF2A{>g!+sO$S0M}E^+5H=g2%4g6W%8tT}2khEs9 zB1d#EMd0!FG2eQqgBWSpJ?p%MX$|AlA4lkWeq<~u<+jlEC}v{ zD-`(z$CHV!J#L%mOaxX@ zC8Cu5m?ZGq!-wDzyb%=JWnXAi{wfMt*c0Xy+$XlpVqiow zFun_aY5v4kmW_Mml`dT%hr6}4b+yroW8n;QkcC=9qqTL9Eiyv`0SJPIV~?~Vl-^b` zxif;Rxv5&^5>vk9=E-c3;5d>*8TXhf;c@;+!#PLWI`j-1NcnM#X}^^U|0J=1^3z1# zw(-0jG5lBdW3J?WREB^4^;)IWqZ2^g;u5?Dhb(%Pvd3hP(+lh^m{hxmhXM_>+<~uG zE!c`wX_>^wyDn@P60>L}VGy__0zb`UllXLmAT3ACzBae9x-ajvV4j+q%~@3Z5G4tEHE_PqWzTCyPY*6;BN8Sw2}thd1O|H>6vNbZ{1!!InI$ZCu739g2- z_}O=6xiU}Afr8I_gZ>4_<%i)g<1gGc8{&q!NP{uQdW5_(jr5SaMon2k?{iT1Cj?ny z602X07W2y7nKPX4hmDyhdk6FysF_U+-1Ue4QH*hv`(Yx5ov`;vaU7o>Y`yPWz}=?a z3X(Ie+>?c(n*o81@IvwC*5gkM0($6T%h`+jBGTfM*ratYAdGb!F4X;0_a&kBwOQCG zL`@aWF=bc|zr$yukJBLL*Me=HRHyTe+T75mu%+a?;dbXxLNy18eKR=i3H~&v0|M>r zA2+(m8k2F2*VCzb^9vdPtHC6ec$14AO!+}d{`g0wOaVA zsvO7qr|`-DkT7^P=zekDsfMJ*N%q-*$99Q9An`jH)Xpp5-PX8;;D)C>qW2ocZHC=C zKDaRQfSZz>W*kX9lR@f>%tH@PiJp6k{0+NXq!rnb%ij}t)XqfxGYk7B?-w4R&Nvz$ z#pXl+h(V35rzG~rhsMg6K;1>+{D8c!^gR{Gy9Atr?nn|L{78ooL?C~}QJQ~M$BYtT z3w2KacLWNIV8(32n`kQ{R)KVFX7l|(9iRKmZVX?n@|ry`{QiH2Iek@{lNgeqFg)*Z zCzbN;zsAO1zGNpYcw^F*zK2vLtyk^+$bsL{oL~^`8+(a?)|KfsE|Hlpj*d?r;qGfU) zF%CrSleVS2CCV4GpXi_QEwl9}q=*&Q5FYlbU~1u$5xMg+gcUfXRZE4^0Nk-(te2IH zMKEAX;~ZN{NeVc~u)9qb(JxIZ-Bn%tu;kj6gD~+I*Zu(r6_w&ui^T_0#8;gWLDW~B z5lN3k!4!81TUh;r6YioOyvpkSGG-Z4N%S=(MPFS{{q5UK^@5H_=F4uR+K+pQ=%s9h z$fY#2ot@qO!GVfitgz>nK}mLXTySu3>U1hVhhKPZ;qmy5;|z%y4wZ8Iole4q*XnQf z-g}|4UsGawJ#ZqKgVz0NFFfm3%B3?`Ha8FU_w}D3UK$vrO6@oaICAmwio?zlr8Av9 zJtHF{)r^uhR#v(^Hbma)=p-QcQMI+Y1)BBs_5WPI&R(iaNkL(D-`v8&55KFRodLlg zXErxWm6+9p0^I)zHoKugpF2)oUcN*Z`D<)!tX##z!$aOu-rKuQ@zK|A^YyV}!rtE6 z?2{<}V?GWJ%Z{eEAu(+_JiHsq3hor7Jmg%FeEX|&COL< zVK@Q}>Rc^OGir1+we2TsLmgr=GAK?Zu7yx!L+orpr9a|`@d%p+kSNhjuZB~^X)S2G80)LA*5pgQ#~~aD7w$>09|)? zaj~(rt@qlUU+hf~l0@(9@0;Bl9vR7XQe_sgA1}}C#sA}{t*x!4HFD8+Zdz6gUHHb8 z?5SjH%e^ev?pfSxEZu(|8CaCNn$J;~ki`WN6cps+L)+SUXjK{T&sJDbX>2?r z00IV`_CjZ>cv0L{pO_`UMIlll+U z)*FI(IXP_|9fir7_9~{P^MzVP%JMWCF-b{W3B69U^=R*%YTXi}y2-(rmOF7@dc@q8 zc;A%=7KI2YAYLwdShi}3NlL~5Lv^(#EqM-zlzw*dWD15Mk-!f zk2e~~yWHdUXH&1vSt7)vP?pu?bGH1Ku<&qudwby&bUa#_Bj$DP?^Sn$&KCp3#Kd40 zEEcQ$Hh;*l0mcV`eE8E9t*oM{8Jm$|jPj&H8hzXB7T0%O z^kJZ;j!r{;eFT$4a(vs2*k0nva;_KEgqI7%lg*c9iR6lCFgg`9%M73 zpHdop>XTH2&&IqDKjVic_|A=AAD&j}Im8(znkp$#jAgpCVzCk|EG#SS z50mqp;-?#d>l6S4$_?lMhESQV#K_19C{8j;O3M)1s_H80&%S*-dwaHyj!Tg7fH!)2 zdT-xG$HumeK8HX$Iy&UTBX50f_q5wu`t!#gZnn>PDhZe_L3H&8SKU#5n>BqWKTTTI zHPjd8=Mzos?08t(Y`fw#xpQsmi;K~no%twJDdMFfe}Df-=t&{~0~{QsuO*KrTI$@E zCwFnl85nC}J;v{0vaA7814BdmKa9JboRGU54e3!)&iIwVPZ^AT{ryJu?p$M;6Y&%F z7dRAjVAWlJX7ZQzQ>@e@>UY)d?(Pq6U}cK6ou-h$5jnjrp6ZJ^%`|%NFO|u8hl~5U zodkR$g>6rwJsPX$H#QnK)uxm=G@7z5&W`s#d`i!HOiD_+SG&dHYA$*}4_wv%@KA?7 zVqtk%G$QFpvhjXlWyRVff5`mlpzxP$nvVJQ&q302=&vaTq^A0`a+~9I3!}yQ+ZSUE zW}T9W0?qE%ikM7=?`PmLos>v7n6l!M%3TGbR0 zhZFp2H&0B>xy=-iWydva2s06hdY{Db9Mm%9L!zn3+pP+>q#-X})KUJadl>h6YI2g- zj>-F-%>Z?%Y@*6O+04n(DT;HeJU({LUjn1Bp_x_LL`Kz_v>N z!tJwO@l2DQ=!@AUm&T?h6^BmjejJ>q%vNVaICJllwjWpQyaFbY=&^HEzbSaF8{S70ZN1Q`qBd=>>i z7}2>eYM&}(6)}<*6?IEm(ZYgVe`s_xPrYE{C_caCz1L}44IO!VKjVweaEATMY8@aD zs;X+wm8yjxX{tpdPuBwi0;Ds4mKXjme+kqR6bb>2Xl7MxJ{uVrkQx%!|4~|sL8A}w z_{zq9k;L{MGcuO^a#caOu&na(iZ)XhO-))L6TUSxOzk+ z0!?M~m;0i?IDUNf{63igsfh_CHOnJ5p==~ll9g4OJFZZ(@H4$YGJ45#2Ht6F6u=1B z0XV=Oc=twde0)5cLc}d;4&}sK3=FTpK;ET4v(tvbs$1Rz8(j73_;bRn(`0S85$QS1 z!^6VLibguI_3$Ht?upe|Z-M}4pzyP2#fCN795Kho$AiL#>gwtm8Z>wA9QN>(Iy2U) zq)PZ4j+dDMkS(kt#P~_jVN%%gVP$sq!sIhM&#lShjufZ19<%keb=3?>MjDz{cc#+{ zLTgiQZZ1FoczLcqX6y9)23@HOc@BycU@(}RoEkuj?HN9Pewdq^evEAfmEIffxcefG zQQhW9Boa8Md3j4G2kZR&{9HvE<01uI1?!`wO0%iyN48lr-+&X76B&uglKXrjN=>9P zh&t1MkE5fd{gZ}n@Z2^6NJ>$WotM|qZ+4~5NM?+O!8I$O+E)b4HHbtM~=+O=UB)h2IvDcQL+mDHK;P2DssH0nG5D%-q~|dy&(lBcNLH zdpm?SMTkMp+UHtBsGtUyA;pM)BO|RoU%!666D2+~Fo0WHy2H$j;`WYflB9qDsIoa# z!(0O0jidn#I0GM?ZQu^p$Kqb+s^;(G@!?@%dS$*rH8r9@&68D7=#0)*c>VgdCbyQF zTBIg-ny}4pfGGS}qSw;Wve?4#3J5SiHCNQs96s?_Px2dyjJoQn{oLQ@e{#zI-a~TL zwwvhDRoiX=C9Z)$&LFa@PT$x57aIEiGdY5;-__MDLuR)FTcB5Rs@6aWYa2mk^S{#*b60000000000000vJ004MwFKuOHX<;vE zZDD6+H!g5)XN0>2P#jUWwmU#VhTss~0to~iAh;*E1rl5acPF?*f;)uZ4#8#6!9BRU zLvVNZ+kEGqYxSS|Pfb-)g^D{C`4MO1Kw z%&g)BUt@^&O9EA*5E8s^pGfaV_8PNR@e63HiV-WWAdBu?QsdDygKl2l{5v9aFQvyX zd#@XH9>3eUC8dcc*$my1V;JRv0lQ^C`kh_@#}tBg7T{ok6@UN&srj;?fk3UqetN*E zskdlIz;(!agdmU)2e<<`Rs5L{83fV|ZwgrP55=!oe0~6nS&QeBwxIvIVx@BN$DzSy zj?lxpBK!_`&=E2x(g18v1W@aeo&xdzcPRA#jrFdGap$+8_#n^>A0I|XP&07L5epsq z^JNwi9pc&F&o&2lh<4~>>1k=Vmu{})Qh6u)F7fd2bgXW7&v(X&!@H)Zov)8q*cKPr zJ?I`P2E~}ydId7=o?~fzY`WOl*}?rF7Zw`MXLsH+=V)=^_OL%&*{~?c$LGFNkpqQ1 zoAdJWlFm78_eZsCk!}?XiTYT5DC~H)q46a`SP=?iODdT6#KBG{p~UTWleu-3iMiJj z;qL_Zfm$ILj(0~!VU3NA5)|$Zn*)h5X5X#g!uf8 zpWb2>Yc>qc&)?AqxvgaRtC2V%^Jd>DxvoW51gsgMI}(cw3)VrY2ywPKss0+c^GZFHc39nr4aHtS#r%$2zt~uHl{?h5r>P@ zzIpuu5w1g}`y(++E{^Mt9lqZp5)u-E>(Fk$E5z@hm<_R- z4dD%M9!LJB4MAxhQ>%L~eTcKUGZvdKg`H)|`n%B4pWdppVng52Ud+Ja4w;6{v9R$3 zn4#N_oOi+kx!taqsNc8jSPalXO+$q&#b0UH?OgAOZ}qgaw65mj zCz*nvGEbGJ&g~1ga1t>;^)43*EfWF;K@4J$epUsErL;$r;k zsTRaX`KO}XQU1p+Oy99I%irv4-l(@%;p$$ca*RRKq5LW4C06+Z6@rgJ#qL7cS6X($ z(pe4z7DCz(oM6#K3wZ(snp_ri1w};^N&<*}WtBnU`1bU@^65xiKbgL5Lh;&q_YnU^ zVqdPNpkB1}-BF3^riZiMBPPMq$yrY59Ql4O z87?`Aoeb+hn#y7MN+kw&lZc>KhLfghka!allN#7J`dGgx5-YoABlr4$8ylVMQPMex zKQammVy<*(5~`Gg>s`)6hW~48^ZIzJLFoC!Y>sVnRnp&#|ber~p%zvz9MfP*4!G*eo~C&CTWK z)7FcZsF0u`%MZ&Lzr%Jun2sI`z{H4G;nG?3>)fyf{O+au)hANv6L`k~;X2MF&DL;h^hJ8u;kf4Jsn=WZpl z=mL%47AO5C=QC!cT(2o<8O0nlKAWm4Q7B;N;Ylq0R-mM=u0Ei48F$bfM%1x(@_2oQ z8B$?6CM6^D&TqlBJJqt~>xk#%m)q$}{Gq$YRT0gKW`5-xH{;Qe)SCl?P=r@LM6t)WzRkI^-xR~UatESH-f zs$*f)H1EecmNntdj*c9};qx^%!+m|`U%Bq<9)_7T;qPf^1aH=3pobjkgpc=U!$jjI zWe>Y;C3G5Sm`_gB5~E}KERz=DTSdvCbAy~8uBDe#2p#3Ub*3$b$!;2g|9UJX_R;W; z1m7&+8MGrK*Dl_h&}pK*3Y{dQ{~+#)e(ZeU^pqpK)Wb5|%W47<3auAq}W);)%D<$wQjb` z5iT2fFcH6LSzh2)!FV19DR;(KS{nJZ#?>3V>7yHALO4NsS~0iIWUn9{c6x)M;dbRa z5l#@gLVm`sy&HU!NgFb~G5>qu&BgpieUpD-uF5#bd)gZl z{k;DB)gjn!*~4a)nZSZGwP1{B&@alZWTkWQWdZAH=R4sjR9uiXs_|Gx4dK9qd!S6^ z9xsN!2>)NC61C!k*N{L50l>}_8RMdD)xKSLu2RVzo90Q+6a)H!F&y^cpWUP2i1*q3 z-^*9|PMdTT_ZO$-6#?20lc3hNw`d};{AuF!*|g-iN!Ajx-|_vLbl;|!r!F)2jruQ1 z#qNlWLiNsWb~U}Sfnxb!R?ZxTViKVWgwwFmI*dmR2&eJ~3j`m})<5j$jahC7XGE%z z@1^`3jk4PtsS&xbnFka-G}k5sqqL^S)N^tfmis9UrHegGGv?=fsXz3Q?DQSXhSd-5e9N?@RWRT`9{isHspSY-o{{O zZd$q4T6*Bpva`!zsl-e85nwQw{4GfjL#Eh; zgm`7C%63!%Rc0t6QIwsqSADI95h)adP^E2S~Ul1W%1uJbG zBK-9yNB8~qFaKHBjsC zhyEr#ule!l#7Rg+nY%&W zwd8BdV2@?6SqrK@tc)szL=DTSRE4&saM6g)YM~vXFX6NWj_Yr|zh&XjNiFcOvY|{p zK?3;%jIuaPa+&av=PWvjQLdkOH7SV*y|Lx7ppjU{ULSIjw|W`b?|NA};Kk{c<`&-E-GXl8@pnUjxcT-KI62CjnNX- z(&0*U&=86qVLknIm-G9en+3ovuaM8JL!?O@YX3Z^Qe=)1ObDux$GVWOo&`HUn>~@` z#H=2=9*BVcX?g+r$%3Zk?EOn8??RaTDs^J}b4@+k%*nk+`KG_tO<>66tYgx052tpG*A@ssi2FF~hS6ma4}=6(8^RG9uhNWJ`KVN&@LNcF>=qy9@9Bv5hr z8k0s)v!{)D3jc^!)q8<%Qz}0!3`&@MkV8A6EVx&>im>z!>|TD0&(KUNOy0oOqe*pr zEJ^e*ND>iOpcx*ChW?j_2DIfTWmb!xW4_qmfEs31^NNWKkC$^yN>RZji0=lxH(T9E zVUO#nLqyPK_~~X-cJfvv$G8u&l>=&(26v1oo2Q=CrQU>>#1ZWT1|kpbZy78q&Xr3h z%J{|01or)g=PYX`5gt_2aA+(zt*pTr92wX`(P%{VL3seaXpNb(x0JE9RFubhaSJTn zwNWBiI){AWhiqM(L}#Yy=Nh{;UM>8czlQ!I-G6+nQsauI-nx8jzuj`$T*=Z0nHY3y zR+Vusn9vGq4>Jxh=I2o?5$!kAa3n<*hxt_z55}9bhv0h_*Sr_r91Az0Eu4nP3>#qZ zb>2x%$wi#JnLo)z2h}nWqIZ;dy61)jw*fi^2v#cOaZ!)Mk+(GygsxZmER?|Ar=tVc zSeX6!ybYxr1wwY#cE>0nQnYrKh4wc63xYg`or(dmGB4?{gJmsKoqH{Rior00U+#dK zmbdJuvluB~WCm@cf;(*4fQc@A5OYWz-e`=)*$Fl5X=+s*c(QfdkNPC@`ZsU*W8y*G zfHXgdo5fGBmh#q3u%ylI-N@LtOaT|Xw+?TykEgyw)Gda32H@>dGf5Lb?aA~5s_ zc_pw<4>Nyd!S_fvFRnT-{F}bCt^p=EN)KqA94nuP<&siH2Vt~EI7_n`StcH$x0p

Ea|#1nrBdN?=P_fL_HUT_$De4DRFLxDSs)Mb!19UEzGbmgxsrkiR-GW41Y{4h>TRNf@Oklu3c`z=VV?q zI)CW?d#Co%9a=icA0G{H?d+ofD5Lv%Fv0jW$Zi61s7O%4u&04eX0I%^a4qT3?r&4) zeUx1@BlMDKOp~)%jkR!RX=(pP=e)n7{YEu>w*t0;3A1Q$ge; zba(ekVy?c_R^vY@5eA^N=Wi*@K5Rv-<2(-9J2Zq|AAJco8dFLCujaYr2iy(@ZXfLs zL89q|HW6J#=w4w{lJnUyHdG;BHwd!Kq#p?K(f}O9TECY1mu=O?Qy?oZ;puULa1%KQ zs9~^!YFRCik5)&W-j?#xhz1mf?m*xgbc1Q#Yd%4QLP;ffHGdQQ$elT1k)-j(=1Fw*8DLj0lgDy}{=;q6 zZZW73)Hh8GTVZiRV>TZ%K6s-hk-Vs0{pmQ4adUl4L$B~Z(PmO%gWci#n&GmdooR!0Znxp2R6QJxTxX;&CnF1 z^KmGLu4Eg;jepd}X#=t^VWrA5Gi{ZlV3ewPBl4=LBWK_Z7ifm;e|oD@J%11y5`xd) zn9)&lZ*tXY61PbRKp86 zJ3Sp6A2%6Fsav0=_KR{o+hlqiUL9_^_5gqxC-~3&!4dKI>Gj^2SuZ2f6rl6N4#-6c zqH0`3!Sez?=Q#zI8srSFcV($5|CCSGvI`uwRIWCCr>64JDmS-sS$^~c#c??F7otG>#+)Or!EJQfq^K~7aZ4M2k;tLp&aq9LpPgM-ypftn=1b*c zT^K)lsW+&MLB)S%VF4N}ii3~eH8FzQQ|DSYRpov3aCMmIJ-p9T`E+^JVq|Do_JG5a zAslh9~edbPDCQWbp-P)b}rtDfKb-S^)+@Yk2+oe-fMp-#70L% zsJN(TPum?MkWIJM=OreS%ZWb$h4yioHq6^(kWaJ5+UQQ%juxmqd}_iUbXULg^dDh# zJfJ&;cW*Ru3Vs}&{^fBlYc#%#)OneR0cs^uujVYC-s@bofct@8AYufL13=q!xw5iC zBDm1%;RrYnu(2J=+>*fSSSUG>DiUYgBvd+~RXRDcarf$4%&o3$@m*OQPz644+y-0m z7@_kD_begC)+imXm+8XqUV>_jl?m}*`y=~idWN^@X3*}6Q=U1^H#9U1r|{U1=YFZH ztCNzFB5R%#jK=@W8Cm)bPAJG@R%goG`sMs>DX!BSa{b3!I@VCQQIQ6kUsO6|;#%78 zEXHH@kN~vsQ(5o-`PKl-#^#9JOdfo4aYF6K&dI6$ME!Tsdd9XYY_`49K`B2W@}B8Z zG@C0n-?5E6OHSV9t^sBGON7^LB=i>28Q$IZlV8-?->q!X0#r*>wB*0Gy2?)c#mtOO zF(x)v3>+LDd=P!<7d2L)ARH7=@R9M-#~=s&?)BczDS*!Fy3TO-7g|OvicikPmb=qi z_z!6U56Nd17;)RY4R+k(5LX835Qw5*W16~J##qIo^Rtom;~7>16v`H>hj1@b&g7b0 zt61rr-rin^aOs>rfP~G>clGZoDn5qP*Vp{{^T%)=Zl$fQ&C1HEwT-bLd*|C;D!inq z#$CmbJgod+R~~mWKa*B+eeL3!#}tTMC*WMO!SZuTSG%08McZO~Y#0RMRO6r{BOysn zN=k~0%N^fY)nCJ);PE(F?d+6ij+16e=44}ItNU>^DI0^cGHH3A;dto;EK-qgJARrQUQ8$M1AVqN!3I4SS>4_a@quwB4^$%-%@% z&m99Wff}H1!0$8I#vi+OCm<6&>Gbvb2dw%^W7u{mL_))lt)d!WtfnLhw8CtX}#1E{Hu5`<+B-5#v(2yDK;} zMox&ehDXb2lM%48txVBLK0y6}(Qr-~y*K~Uj;s+tBtJ^zFH1g~Koiwn>f0*_JfVN~ z{aIHIsB9=gqGKj&QlI5PS!p@b&Lr)02b+>qc;L;&GHzUU4ykY& zaRiBf>a?#2B0w$ z!fPBdGtqk0}7mKtbb#p9NS@5H&=T}E5q_LFaW1s)5sw@ ziUSGG_Ehucp1tybRe(GiYP%%i90@Q~&qyn?yef|H8>WDGX9CLv@@X?`bI>*tAv#}D zUzf@zu@BH8eGwOm-34twVWMFWlC4O^Gf$f@@hOM4++H5&+X}J^2ZA=v2>SiAm z{jkX6E02fX!W)p_V)W~t9~r!Ce$dMoTttJrBzismv?qIq`gE&vuT0oHezslS0^a2P@z@y&BVj# znFaPWKuzrtA97OpLsh;vS$k(1(eiVR=7l1W`9P9Vw_}v^W)t(?`>oSzED1p`7q(d} zK`*wyJMj}c*)69OWpS0iu1#q{KQ?LL`)A4xR7^bLcQyORb7|Sv*;Z_CLFaG%^cs|= zGWrc6>|s}z(X05cwq5lFot35E+Y_w@N=U;d%x4bY_+)=3gv%_a73E?&oYtjyqy7C# z=qBTnygm6n`W#x-Cfn4Q7q#>m9VGBlZ{|^n6Fzpef+d{$x9V7~yLX*xlB@=Mvy>V`(&=_km&N5Zh-BsAO!D zgSTN&YAw0&lh+R2>U!IbPz+Zy%NO>lCy@l^m(>SjuRshy?MgfvRwWrc|C+$hLhEyI z=u>HncdC*n8hjJy99Dz*hV4od$%g|lDwWz*CNOVjYAF1hV9fZlPROyHIxBAqWG`$J zkff&PwLei>HJnHTQdvT$FbN9LjYF{7Dc5y;S>FUSa|%j3+5Do`(Ny=f#w*oDEF-Qk zosAOd+_mBfnKSkjqS*2EMY>-sokc7$XJv_}3lIP8?;0|D$jqG$H0!#MID6$Ueo-CN zyA(sJPX<_*D2NWvje%@Hp1@ptLCdzdD)Vd3Vp_I~sf>!Nh{YYUkan@&>8)T;Cd;`X zo0yi+)P_9|Og`v1PVHlthgadMgBb3-z{@g&sQ|s~(OR?d+`GdTW+R0@5mfTIasvtZ zY9W{7e>2|=x+6%66bfd%V%@Y9i*_n4Fn?4L%BH61Y_)yHv(lSB{0_%Z%LCk3j~?X# zt_;tCq+FnJwGK}~og74FQ-*Oo+Ld31dy0`gI?~)U2=Xu{K#Cl@RIlC;mr0|IFaZG4 z*w_ewSR$KA^Zi)=+19Ym)8Q?ko4g-8x0sliRN%|^i^h<6KE3uAaGi9))t&aE;<1lM z(=+A^c6D)(NVKz{len@)9b3cYRM??y$x7z)`r#VIPUB{2`M(WrVu;ULYUTSo|S`}_Zkrry7Qk0oq( zW>;d?vhu|Fo|<~m^J>wuh1)Z*f2BADi)hli)7k0g@cnxo;UICF+l^m9DPa67uq4sv zWYX5=n3TlSS`s5ofZ#m&mzLnihLs`ENwVCS5PatKCVx=-3sc7T&rgqF?(Oc@FFqcx zbbOFcyFU$O26*yTBdTG$lINjx!rVOh;=AB4tjHo?G#V+yfcBABo7A_5%*8e>VZloe#l+~S{=&X(Bh6j9EMMPH z;{?}FKi*L^+nAZTZnp)_c&S@p^=A22OMfNx zv#L1Tl-O6V<*4NcfvN)AyXq8KM+a*Ap;aJZfr;(?%al~l?P<& z0wp@qvMI})6-)ThJ&S5df|msp!}TA0j0g?o^SpI1Gcz+arPcbsP)yvtTBBroujOVl z*{1m>_raOT&Ep$@5Le5d%PX^_%!f|LCUD`BN;H28V$vQbXOOix1iO)y((WX^&N$?w z;)F$_zs}Ikhj?(Yw=t;OcyjK4&tlToEp9G=L=X$PVVybRR7L@*CH^4q%et* zZ$@YEZ)dhK25Zx(*ki${zE?xss4EhHt0+{yCZOu zKpjj&y{t)I%lJ1Ie7D<6L(72q_y1)O4;(iFaBA!jk%oi;53GCk zGv+Uk!Oti_b0UOrCMM+Z^x4<-{G4Os%aiJd35ebA{@H1#W6@bO{5{KF+aM@Po(01x99Tjzc;bD*FF3|%$Jlv0v(@|aN`;L8%FB+4mkrNR8;wsKpD8Bsw%SVDTGz*- zG1BjV9Kj*5Mzl=N4eBkV3JC<)rhHpTJCX~=KIUCM_LeBSYdHdE^*a)G^bJtOcrMkx z))g=u)mOj!O?LGTFk4B>93N@YwG(Dc9{;XZIjz_m<8t_$=_9=guJDiwr>9-TYOh|K zZSKB6D`?Ib%sGG32G&V%l>7lhs0fXg=^kEpwg8nIWiS-?l=+5GOo62y%`^3s= z@k6mqQ^>-r$x>>zZOd+x=C)#y3^c`9&t__yL8A3or1tPoXAXCNG2)CBFq=7={Mb{P z-H)5q*hq~CoNXlrP{Gc_FLL5k_4uYBL=i6>AjphJz@&j{nzTjPdUblT&wlK`eM87k zE*kNZI#S`FL@EZhP@n`nU&;Iy?TTu*>p~Nzrr`AVPBQUL189hGRJGnk6s%=EL8LRQ zmBF?0n#R@x+#vv)G<{qb?YyUe$SpZInYk@pn6M0~a^OvCDl82j24=GObQZrz@3oRZ zwtK^LL_uc&WLr~&$gBxQ-6apB6@4ncSWkZg>fG|tCQ!Eom`9fncKy)-{mq8Di$ZBl zwG`Ka*-CB(5-%FP{|isyH$r_lu50MX?OwaJvNZ%)x5I9io$OF;l6W9_Se415;TSrp z&;8ZVjD=%}gq1Ku06V>bp89lI6UJVh1g1P9rw=~0Yimd6X8G$wu97ja)Ob2<`7)-{ zONHO~4+8INTihmI$gd$fliZ$u_t#2HfY2tzZ@0xfv)@~X>w0rxYq2C2SnuNl!z?>7O}_^~W>AS2g`xoO!?@&rclSV{bfh~u1q zlXbLiGJ@uILUO~q`?yG%_!Q<^U(9=>V-QX{X`T4*ZiY*gYoU_j0!DFdd2HlEi2of) z3po&+Jg=wnFSr3I*&#vS$S~o1Foalk6oZQg)R~7H{Xtl~x$6Faj&qq`#NTK7kafw= z+jyN@qV709Z~O~H8cb$0TA_|$ofXcuy2~EWrD9NidM;Xm6-oM zmjIS$ejkne)=z{t5qH(Dw1AXo^Tc-EiAgMU1f&`F(<6Cc0DD7`o1gSy7 zU?Ti|FVBtRe-ZOEj~v|p4&etHKu6)yZNTTo;=|}bC1CpVWYF+VtKD)aB&rS#Y-`lO z2ja|3hn+{mqag=rkIfyzyj{kSz(#gX{$i_!sUvkqZ({@Cb}-*kmQk{L6>n^|X`Mn* zW`E_~jjjbgXswMB0YGUAW(yWYL(>cr`xDz&I0!ZufAYJ>80V`2s3l(6_!V@Zq5HJ& z!fq*%FsKgTsX`dR{31dbQ*iTGU?B42T|_HMr>;g&;PoU>3iH(58scz(>3CG|4(rxu|KddvEt1_dBF!M<0Rea!0k{#wh^G90oCz|>-(T_LFqM{;HRMZ;l#d-irqoS}VDBRI?HDMEDFXdUi zW&Of{vd$f(i#cjxHD4WOyqmN5a`KBCobTlb*?m@4mVo<}Lp~Xso2-Y&JyVN%=GUH$ z(@T!?j{16Di#hMJ1Fn|GTLvw17TwlUqy7VjP?gj!+x*%e5c$X}{Nu9d7a84Xm=`Yl zLmBe&Dp`ovd{$Dk$)J^iHi>zY3I@khT7yPWT$>9D_2lftPx>yo$k*7>RN{nN2x5 z4YHP9hKaO~Eaa$Q9!O6>5D)RPhe8*2#`9!kWJE+nc9M#V8HFV+Wi2DCKKNBtRbdIU z6Qj>FPgvbGF>P7-B-7s1D_wv_6xVUuH0eg=AEL9l5>Y6NFyFj#4O(raRuN+Tr1KA1 zTY_e9_f>DXK^Km&*ZeKX!-yrP&6j!lSm~IUm>uF+X#l?`CnhF3FO7_h-Z);6RsxK9 zI*%_bsd^bY`+Jw>p}?*`wP1X8U9A{#Tlqxr7eTk*xKUH@{c5Sldff|mJ>`%6Gcz;5 z5LH#|sd5AaB+l18E1?9;5HGiKCG*~zw8X@^lkD)KB`AmaM1E=2)Am{?RpQkzi@O?lDV^7wMNa?y{r$&}A1@CVNeBsRJ!VhM#&aDTp2N)f&k?ul=^u>} z{9sXRY;06=4Hl!mH*lStd4t^i10Lym57mUgc+plMr%A(yOdpqb`aJzF2HnOpK+_)r zUIw}ZQIO-P6^}hC7t{C|PMS}VF?xQtpvj*L_k!yY9ibGqKun%x=}g&um}*Y4kk?H%Z<{GTDtoqV>unxBtYjx zek;E0mdoWOk3~yiw(+X?%Gcqd8S}3^L zA_IEJ(xh~3hI3em13wwKB`sa^L$593BFq>;`qWvAx6h7V!GZ-glc)ph>@q9+=0qAm z0MU?q>UNSS&6*pO#KdqwwIfi!@&JtlXa2CxOq>4Gxnaj$xeB|P;A0xPTYBGLXzN(% z)me(DHDA39;_RGD9b>F$W71IPNW!V!&=5&cMBJvP61+;48nroO&azjl551O=@b9{l z6;X!;FDpy{$TDKpJ+eU<~JucI5k z37N4eU`(HwSFu))Xu_gpuDQrpq+c|06pWt2EAN(5iykYP`Wbz~Kjm+;CceBFSj7cO zlBHjy(zTpwbIN<>sVk7Ny$Zk@x;`Yp6#J0;dhPnWw6!PEBA_{V|A1K59x?9BV#YZ8B~N*= zSV(`|PxzTVUNalr?T(QBcJ&H}cWe*!&lSqrs5diufak=2spoFd?o3hx zM9!l!1U%Hgsa4PSu!v9>S7(HW?z`QzcJy%rn0z40$SW2)D?B!_gP!UE({S*G?yn1w zPk000!dYSiV-3qr*yh&9QwCy9pi6SU1GxDLAvgk5Y5S5_p8tK+?!ay zIp#?h4z6ybz)ZtSv&tQH^qLebwzrs4XNMa~#aeEl9F(FZY>+R*cSi%TO80Sge2A~>Z$q_^0dXGL2D=#K#gEI#%L&w^wKv6TrBJ6jTgD6Xo@=eIY~6r`lB z{AhLrC8?wxDFHLKRhBw>0`pDC-QAh{_H2kT!lCDOxhP8FbDq zEA9NszC_P&fEu5bu(ez^B9^(4EeK+9o=d&s`d^X?16A)DKFPT^ti(RL(aUN_ijQo| z?@h5T#5EcZDbhfb8MEK3Mg}g7Kmjg17*MQU-1tP(=~50b^R_FgFn%PMoWyL_Q+;XV zc0Z!AOC{TJ`1J^i-^#p5b#inw+YFgA4~Ux{5_r}(6U6tE2?hRIc@D?}O*9(#-OC7M zz3WS$GxZTWIJnxOMW7;ae?*9^l&Cw>aO%OA|#|lUUbY$FWE*-J>Zizlok4868#ISOYrVusF zgrckvzs6jdxlVMV@cV$YAD`?(Dk?@T^0wG}XVw=O!%p zldO^xjU>ElFqtdQ9mvMUCnIh&WFzu*a)CSj+9r&7%FVK(=^zUtgcwX~73fQtoGSr?GP$IU7!TX#NN( z60W|bxpfA@JBYEDgTdbh4rKQ*<8!y@XP=D}S*!K^|KrYB_+@tlnT({Qt#i$vl7hlQ zxAo=79>a?SFTU9kyUJ>Yo_zeBz3 zE@b(?xro?}jEjr8Mq&fz-sTjEQ4ns7cqxMV2eW;bbDC#TZ*HM-{;&d2f=rD3N8C}-={ zLDN!G7n{WklyHO_o0>|@V56pSLN(CLuO7#buP7-gxo&r4Kgwt@TcsFBpnkZPPFy$y zfyiXTE>~@PlJ6J|R-G|p72dSD>eo^iwcGx$>7{0V&!K)xm0w3gsnPD*XI}_Y&R+SSsf9j=#L(E-`rdS{kV`e3n4^&4VA=ht zsnTQ^gP48$bfZ6>S;yFGq|x>4*2{lJHagWcZr)!az`Z^+%9{jaZ3X=khIQ(eYb1OB z7_AWU)gIS#_K;wP)KUAKtNez$*&iOu=N&PTcDf z>*Mw-whaACK}u)Aq2NstMDjKRSB1LL@EgVZN)HQfR!@Dk&GzNfD+Jj`HIPp!_gAHs zkCiRx$3w8zYg2`Ha2X4VxB&6(>p`02r zf{3^V(SEI&Lk!SNB4)&I$Dp<kfs@rVJvZYCJShR zJUfwBDeLfSZQ`C-DQ0z;;)^z%!3x z2(3f4;M(tkWBa^c?)q5dPuvv^;`VzOzU_f2c|zjy9(!DEq{D0)G~cwL=qc1^Bj&*K zwPpSjn}_NjKTe3*UZAV|-Ga364M@;0aKD2rb^m&qsZ`>=8ktgoOg5kTl9Lk6xvGfi zM^3^p8Ck@OIM4_gz{;>K>LK~lFBneg$=i363w{WXrG8kLtWUmX<-YUQ5SZ1JP#x0; zSmhw}-}`+Rg?g?8I&+&JM&fQtwI+9%l^{?}=kk|pgPwYN5QrlDc`v~EvD{%$4A^Cl zMglg#n053~buUc*KDv^I!%b4t5;^ZDi+#Ag@}MJee|S#}%R6*XlSt26GY_SmUGc_S z@uJa2Mgbd>c^)ZSdT__IuJIp%&U-%Jg;~IB+>GS$mHH0X_wV~-F~!*~rXE*ea;lX5 zag~6kESxkI{A$Rv%SAaC8pzHC8cD7tJ)Jm?0$`TyKmU8W`&5oV#GH!Keyl7ZO_G3g z5tH>F>k%S74@mb*30QRN>Pz8lcCr0qXGt2-3mxij(R4aV2{7ykI`5?aV?VS!x&kw= z)2%A!lv{K5{4acemquXz;b*gMHv!ql4f5W#(R{X{+e1W8>e>J7uS70;U_kV-FEF+A zguF}V5ofetX8f-V-blO*9Xd!q?hSn#bNcW6x_LgG`i`Ml|y4la%^Rv$SWmj?aUl+;8tH7CE+= z>drZD6*5nEIJPphVtn(Fs8z_bhg5=9D(fm(l&7*#K%m8ey`gK1kBHu#R5rBI|Ydb_14c6lb0Y-M8yOfL!jtah!JE?mCvc!!SA#ZxO-Tdg~f1%;6 z8l9dT712}lLCo7R_jHd<*`bmt-W>J!-1G<0K4{8@z`_rn(WmzJ-qXMrBi4jIS&1o* zA@(`);H_E%6mM(?a{{3lu7;+%#n1|K@8~IA8Y`L3A{udkXl4$X)jDS@O`ED)5}Kg{ zGE_6CHSeKYAP~G*w8Z_pDng9e|53_UMnx5UeUGAmv?5)Of=G8rhlI3rcXvpG2m+%t z(lCnTAl=Q^12*ga3Rz(W-JGA5OR$0sZ`Go3z32#4_>|Dvw@TSY5vFl5ysv1I4j|CU*a61FIPJ9#&?A$DS%8j>4msXD6SfF25ogzj;CCgqi z6`X8M1;&G3SS!|0E<6oXr>lE;lW?gfpf~8);9D93{A0mnh|KA{T%EN`lR6~HJYyru zOt5V+N#QqFpBM%R&8EM1)KNVv=<)Qy6Dku!rheoBh&p7%mh`Cpq!-PCj3Ib&j9SFXy&0nw++mrQ9)VS1t0Dm!mP_ z$88syeLehS8x`_!aBv#EZ(B5ADkv}i678!sRdM46cLrhMrizNgU@Tgn^%XfkG}+Q( z?b|`=Av(%+>&1izpjn~+6h8jh6Pbd@DQ4&^uQ!@;$zV@lSN8p{j3hIySy?MUR)Ib} zjgE;C^Vn31y{pCKsc9SIekCfV9*+AS)K1}wo%Vc$$uP<^6|; zFN6Vpmm`p8HAPZbO_kqk<}=Y-tWUL67eoiPTw3r=-dc6v8c8b}w^e}(j<=v621~H- zcN4!Gax)XxF$)r(S-O%0f%v~l%iBj?BQCzZf{T>iA;XZH#8&u@XXD$tB;g(&9zYtW zt4pqt5Emzb-9J2tibsno+VIlZBa%3|=5aI6LG5qH;j6PF&fcOri$h-fP(WhcEVYm1 z%@g-EUw*lPqe7a+))Pf4U%R4sL4q6vV2o?ww5Qjn>cgsJ_EG3G)lL;XlK)h1y|6WT zMT9L#t>WO|5L>;k2V}qXO4JPA6?^?4&@KW<5IQ`oLi~tN#}AL>J~g?Q7Jfq!2;mmh z+CKTeE3*7@Z-#4Bb7h>9hI2mHh!`))r!dO;nMqNCpoXDCR$2;wgoBd)IN*m8>40OG z>SVB)3TN1Fc?1~dcfOf*xPNOeq{FB)*CJ0I+?bo2LpdZWFo3%dh$gxDfrLR4JL?DW%$V0?(g2I$g#pj*<*Fq*!C$}ryo3i&+5Zpgh3G^p78lRNy=y$%!)pahkT7=e+kyKNS7JA8isygP8w;NR zjP!b{EA>Uz1qe8I<4bhdO?R}*Dwy$NX?T)}ju6w!{~*>?z7F%+zctgLP^Fmy&BEg1 z;{5!4_S$_0Ps*E%T2BJ{@<*Whr(!7{%b>R5e1f1|%`RMp~$4i_C7rA|5%MOW(Osu#`#{kXp(*6EhbNF;}t$A5oeZUYmBfe-M z2^Me?^P)lX;C4m5q(kXGr&g2=SBdG4u2{5j;vW2emtIxn-w=x5{!)AM@95%qYcx|_ z75lw{Lgi~b9^YKZqehFS2OtR@Jbd>nd*jak=1<60^-pIy+V02c1m~h85=Lx|{mbd6 z4W4a>tuZcI_MYK;yG3gM);}9HVV~UCl7lEm?u>YGfJ?~6qDM5eH=Z!easYDHKvW6jL)svVffjwiQ1hnByQeImI zod*YMggS<_4?$yW7}rL3!YsEg7(#k+kH*wdb$9{EEQcX($70};DEPN_`GmhnDo6-SvI(?n8+j~1NnsNbv#pZ5}g zJ}+7GYP1;_iW+8@+VQ`s@%yrEPqgCR*L>T0#&~fhUqMk@RJ_PEoNeGd&aI(ojiBBB zZ&U~E95z6&u+Hy)_aRa*<8u@;s6j=9sA$;c_W?UN$v$(>4|63E6r^JY*)N$Sug26U zhmh+vkb6;wyKDz&Rb``W-vYT9$PYRsbFgcabxeFCCazUc=EPFdp#;FzO?-)b^x@@J z`)5dC-~i*xsR{6WUKn1SFckDJlyQdH*=MS z=-9+VE(~DPGhQ|u8q<&+qOQC8E8N+8kCGkk$!ex@461}3^Z3($JIw{UO*W%EW;p}0 zn}Zvwad{>{puksM($}l02mAZV(7Dm8&9%(J*HE{YUBPfpo>!2?Aa-h$*}zOq>X}$bUS)az8175cjihZNZ}pZKs%6tKw~xmMq#51BuB?L@6TRe za83S+Ix*a^VPrw_`qeh|bNAxGArVyi(bkP3;Ai(sC^CNkB ziH9#GNo6Fy7O*|0ad?6=U05PRQ=wI4%i@&Bjw+gr;ZZ^S9;sI62kKi>8pY!!~}s(Hug4;*59>pBzFbWzc{Mk zq(iig@^Qn_xWmV7h36;pWhKn7r1~OO5TESn-8rQS$lzy-wv1#}?v%W(l&@#1str_j zq!KFYT*5{y$$^Lj^a>9n3-ZXA@JX{!b^e-GWdfgj;Bpsf0?E~$&9=9=V%P&H%!t3y}4s& z1;M#0@MK2N-q_Po4O3TA5Gcy$r&5ZH)E&&?S`onqL$0S}XeD=?QAeCuXwd8v<>*n~ zZd${7KK7b6C=M4Q*+m;DJk4^xpU+sl;AL4zLHaxZffk6#FeB&&qv-~x$V)EpBQ!jZ z9_TbBZnN3!G}(k-y6!awHTPJy{3%BM$$$rn62k)wj@NQ+JE)-d)d z`d^*Dam&I1tO|cI(BMkx#Ag2|+4jbs-#!-}V|v~SmvM2X@Rb%Cl{Zz&HPz?5toZpc z>jTi|R&s2a%LQ)=3%X>Q_PZ8`*<7mtoqirI}ZfXnDq{4R=vn^f)m0g3Pa! zt3n8djwtnP@h+32Iw?Q1lbkjcYs(gr1ZYvgdk+o#xTv$@eS=azHP|~p61Riy_XK6R zOoU1r5+1esCuGC)e6OBA@dJRhT`&6hG(c>`!wLE;3n8&?ff!Cd2*%XweeAZ+fK~T9 zTF%9@rZ5VSR52_^I^62`$z`5dD3RL*)ox%f*@?#T1T!Eik93wCB?ttiz{tWD6Al?2 z`AS%rw2hmd7#2Oy!5>k8oVZbSL*#&$G%#8)5r^AbDvJ){(;5C;p=u59t}IFdMw|PX zf(e#?#Re0Ki8|1~N*R;Fwz9EW!xlY8v8{&MPWvo-fA7_xc>!R7S=dT}etsLXHd##} zC5b3Ttyv>?{$qbt+|{1g4V*p0Wu}{}!hGRnlFgmNQ@XGif{bJx_#*@#Yf;mQCG63O zJO-#8qc1EtH0N#SIFyX`sl4ZAk-4W^Mq{;+#r6%#eiBd$yAMWoAHbo2<*kJ@(-NFS z;I390QYhbWdq++baOpMd#V9B8s=#Y;08L&mH-usNYtRq?r^Ea>$~>><9M*GARibOx zl&@RNPFmz-!vzin03m@7Xzrn7K0jf&7;~otO^uwFstUC3BXQwe)Eth@qO$tDBR1uq zf`Ew#DG3Eq>@lQKk|BN}kvDZquE-X#nMsYh&O8l6O4fiAVh^HB#m^c_Fpz)2t z*a74M{TmGnet9z+|7n-cEm&W}#TQbmna$)h6LF=?{W|IteO@Lf9S-KSk%wExR+qu3 z8WQi>C^=tnc+YfkW_EGXg{q~D7%pY8CD;zq>;K-X3!cstq1fJeOU?3fQVidK^I9q) z!sjRNk~e+XGJtocxfG%id;%fj0wJ+P-;qNkH1iQEKPF69@MlUNRjb1D+U)y8Q-0km zM|&V{`TKr&&x$}M4GPu@#0WXMogm0)6#&GbaH5vU^6>~G=Z3{sqW;YsAMb_vMMmkZ zK#Xe_2G*oW2_{kq*8=<^XbeAk($z~FZ4zYP{HIt7JNncs_8z;Q0`Cs4#_BcnUG`d- zwTVX);J#yEV2z)>Y@y*Cbp?G%QVC}F(Kd)O+l`Xlv9aZ|mEb7Pkhh>$*rWS3kVa1) zoOi-SD)JXMYq3r;GFCPc zH&8!+1vl_Z6*)FT^jV$|H88_pF)r7pmRLDVeP}0e>%$4y0O3?DWtQDJ`#fL1Oq)f5E>i2nS^B%N!?N>+d>JaR_+&c7W>ITp@~y%H}wN{ z7BI%_fg6g%7ebwgO+uc3Ke~vH+YWleS-3dQsaCmSyN5~bT#+HN87pkLcN=2?;ep{EG+{8;SZJG ztz(!{S|zeUOHxv@)(MG3R#sLO78a%|SqB7MU#84lUEtq5*OP}=r=+HmbAdxx=WpBG z{g$b3Wy@yd&HfY)>*VF@1>t(5(}>?0+X(H3v;kSMdBx@Ig<{_xk)W zE-r3tY^<@d@c|-=lFwdmp1bnj-kyr*pBVR*&amQL)-1L2E@IUep%Iah-q#j#p30{^ z_*DJ;Hlsgpwnl<*!aAcoDTdjG_78PWh)QguBR0KDnJDr_RsMDR``HdDBBe zLWXp>mp|<|#mieF9Oo*nas+ewvdhXQ*)@DF2CN7m2~g+S$!j`zEBM%nXpQ_(zE{sz3`$N)|I(Qs66iZf^v`ClBM}<0XCZ62;RgGv2)% z-=7Pl|JLQcaYc5JxsZ-}(OV6dX1 zLGy|Qcx-OPzkmPY;)p8yEV&bG7}o^ZNh80dA04^psb8FQ!WI{ty>XsF6jm;z3N5_9 zZcoBI8VoDR$;kz+1`^R|uc9e?#E^M~e4hH34hhd@I2$V~9yoV$`)hWGX}uR}K8k{; zCyGM){*QH!u&{(z4}Q79PKemI-#hq=%}QUt$H&7nY_aDXe~d*W<>~3^$S=&xn^+9? z+ucF#eE{aF{OsK#td%EDM)cO{~B`PN;rynyw zO#H=*U$wQ#NO{ONg}hbwhIKt`Gt{vI8!7IWj<4Uo^&4hxF9f+v_cXg*GMMTwM*p6c$NkJ<0>WTl0sv6Qm3p)w^aHm(e*U?tTgH zHlJI3P@~H#7z2NcV+P=Xv$J!aRh}l+sxEmrYN4hoJKG##QYZ87njiLA5N|hzsA_Ka z1Ok!G@eLf@0lLgLL=IaMPP6jgU$xoU58<4J(q7L61nSawY(~=gSOPsS(cX1ISExD@ zy6bcwyT5R_xhz4d3CM2tcNCf~nrOn7R}+i-<-tWjn3S0TkEz@wMr6O`k&j4;wxZ_? zg3z_|pM>b=&!0Q`1}d7HXQLEFOlXn9^z!$F$b^I~#%&v_2J7w@SNkohBSREQ5)z-g z&9}F=vxJZUk7B%FO-xEi!?ShQQ%?5_EOE8-~-?Pis-`50*foyGBYzP zl+7f(vUn<`rKN?P)rSphnK^AD$HQze-0LEiekzrDyANYj{kd>35bk@tIoI->gd~ip z@b_=9!*iT4O=izkgDlyc!)SqJqR8$huf23mv(7t&F)L|PQ`7QB#9TixRg1Bz2%Ug4 zG$X@6*(uuT3*bfo)X$>H410k;sc&FF6|-hpQB%Xm!4ccLHivE&?fd@jJ$BX_V+^qj z9$aM|`qx$P$&)9V5ZMPmRBZh1W6fr5^fJxJ`2*)a7D{_0wp^iUg}rvewoG)JecbMJ z07F2cP(LzK5D0|gA0o)Wu3pt|f(7u9^>Jq1Z9{3Pb1#}kDyux`%k;E1!u->xPs+-} z)pnD6+>CLp)%qpszpG1_n3B(Y^=Wk-Gp3otVF+VaZE$dZtd-5d>aPzgAGoDS~LFX3lo!~(yAc5dAz zsv6#ipDlP`XN`=Eq!@o<5)%^>6eRCGtgNi;>FG&LO@;mRi$J#1tPZ8|KnUpwu(8|S zpn{y(fF{yoDpu(hrx*v=&GAQ8V+FKVP$0%5rM*2cmd>0O!V>hZ%bW);_}GTf7jt}env+}_x$<#=H~S5 ztk2D*CxBX>9L28?mc@fUzBhvz{4NTCLN&d!9=o$#!4l;kwJ2V;t$;u4x8yFGVkW`{@I6_)X+ckpp5`3c z9*lu?Idf;VW3oAvCQW*Ld>k9#pIcHgj6nF0K;Jq{%n0tJPXOy}^gXt|yUe-s{8d(I#Cxo1B-&w|C= zGsb+!81FmRSfTQ=;#la!=l}p+HE`PzlKtGy`BGZKf>m#@Gv1t`|^XlT} zs(GuKngy#`i^iJ9+d_1!kH^6CZyHV2D46zvuVD~0G#*ngZ)w(#m=Fm)>c7`scWc9g zgXeG1U0IJ#nuvVyA;8lldNUf4z^hNDANkX4)zJKC!HXVM{BnyPln8#X5FejL^P?a3 z;lq)x>*L+^*=?Qt%7L?26&n}V<;c-|h3jCEdgb;5#Zzz7+Z-W>^Ud_k%r@}-xlpuF z(~;D<@~^?NxtbM5p^gW+*>V`@n7hk@m$ueYQiHSQhC2^vPhV8&U?>@3WM_5dvY;aT3S$WbMol5es*0`tD3JY70>vF&15Lzx%2tepTug5mb=?{hex%i z6*N}z)42UxM++D`H6D}+S1U4>iqBUrh>5{#tYT(hnA~wt|5~}-;t95GbBpuOQ)AdX zyN-^IR+h21XN7&zVycn4r4)~ZAp4!4J2cpkf$hptH^}K?B|SYo8)u@JH8nM@Y*xm` zj&F}zO^u9>UHJcZtAdFgZW7r`V(egl{a-4D)y?xcV*?_;bCA1 zJA91_c57+u%FRVVK|xPXPeUV~IsT6N9YNar7O(r88^^t8hzN7P%gSs=P2Fo+D^nJ8 z>}TLvy59GnvlZJ7pRltvW-;Fy&TNH=i8(Yn%1lcOLUFFjZo=;w#!a2P_dJ<^)6dSo zL%&%34;xXy_WOY0eEMP({P`0KeKN;kZR|h6+wlIqgYCwq87h+ z(Gqp%PepA1AQZ79S6}n18noFclwB$cnqkw%hVkpfouyN!x`i7M3SB`{jh{2;w58?k zq?QC-N&w(5jPoonPjWdkMm4w(1md{n-&_kVFB2!#yee{Rum~>?!XL>6{I+Wdhi$>Uq);ZQg2YwSGEBN#TqJJICTCzaaa)PBr zrV}HTaA}M<#u88`SW36Tqkn)cB(mnV?oMW;7PX%KpQ zKh-l*7@k4_TlUZQ#lXAgwuEE@fSd5Vkk5Q0X5m-KBtFM=DS{xY1Y8dK>0SfFWOD2k z%iCSp2Y1!cmmho&7nuoYZqVwSjwobt;&)@~|JC@Rt4A_FtNTj!<~2Wa`^>XcNd({n zwjZtV)8@FWUJ}?P&99{JF)!EF_Kv+~ELiG}vCqF5VV1$X^e}eIB1>b-yH_^D4DPmi zY+hz)^c=SdiK=z;*bY;(fn)(b>0MpqlCczt8X`9DWItD{4suYCHieln+mD7GOuDVb zZ|zmuR5_JOW8?612(l0T*lIU^elBFxg@)N#9Uyju_R zqR0iIxQJCXzRXa3(H1rM#`VqN%=zE1sc9ssUp|MS0zMD^N?OUNvcD^1B1mJoG?Wjt zQTCW-7xOhQ2ZxUuKaTwrzVxIQ7qpivo5C=t{8%iY^6qnAgRE+`rsoU;W>VVrZ7Zr0 zX+6!a-5=7$D;o0k*J^=Nm)HPsk03JXii50Q#$KY=cH*mxsckJUn4nE(t`N;U$FQFe zs_#xf6@>0u<4_^FY@Dyic1*w2GZlC-SrkIVaN7wwo~yD)AwH&zs8QIXV2-agUT(>NQv`v(~ZHk-w_zvhBV6f*57tJ zk9=QYrJVOSO~i?{z)Xr%-KQ<6XT!w1!3cUj|>gi?7H^w_LejWShLwD!K=Yt%CQDNu964w)4Sv$3FxHK&dW5=CS)CDG@ zKC4SS<^CyJXaJN1$`S(GCovdKX&|)kUcaJ)(a!fCtht^Dj=VG+`NUh3mX}d6dwa@r zG_o_(zV-xKqDkVz#Geh0t&3T2xAVv^M+vET)xjVv6MB5-wi9AzGjW>7S?#ryodS|OmgYk=M+PRniC~c{_@|p;X1jOe{#+W%+$v~u zL?Bfv+dRiy-DXF*o1%O1iOol0SwoqPN6{ph-y|P9A;ToyK4LfR+9Mo_vNHg12YG z^Vph|f02No=hQ9kCF+eqcjC_C$z#t|6TRNEb*Ga52Mx+4PSl0vFJ=oiocaRym{<4J ze{$3H{j6*Kob7%XpA;KqObCn#Nhc%t8DYFj!4*<1G?O>WY|@(O2xJ(V#+{j%I`vL2 zr5QwIa^Grl5$~VJ|EI5iGZDu#eu%6EKfFHC#3=Y?u?|UxGj-l*o%EjlTf4tc3yDAf&#T+q==?w7A{>bt$Jx#u!f#@PfGWtp4B9+1iggifmlqH}k%gX07^N z$4I2p;YzFb>3ToNYqJ!0e34L_nwnx_V%!?Xv=`!IV~aIgOVZOR7#Xepb%m0Wk{TNu zetcJ`!_pj7X>N<=`;A-Ev=8BJr2n ziQXU}emIfn&{e6x`tuGhOkueM6{sj@@!nh+!y}dj?f1ZkbyrfJUt<7lGDfPY!?d2gE z8F|BZe|O{NGmg5Tl~#yI@#HMW>E(c*O}XQta9foLZ!&=L%wZ0NKj1D{5YJRpu))7retfKjtS zI$JUJ=TEhnmb$vSl9I!O+_aOkGo^fGx8~Ht*QV^@%N;%5DY#r3v1(gqF}!qsvY3P= zG8oyn4@FxWyR0s_FDSY?#=a|2#!=t?VCHk|A$8f7IX5JEjO|V|6N}v1_4u@^Kx@(^Ml6MuWU=Tqw)`ji>rKbf8L=&iu!_W zGb-+T_ZW?Ml>6MjiiI6u{7ilwG=>3=^=r*6xaYV--%dL??$8SX_|<2R6DyhB($cbI z(HCD_Ts&P}T3BdUIj6b22tuIZVz~IZ!1>tq*%nt*U3wt~98b-M;{3F#?+^_K1bt9G zE>d%ZXvy`e1BbdvW!dFs7jIV(!Mr}C8A@f~m9e9$;p85p4*6@^?9vTMARS7<(_Zb#Tw?JM5d<|yzxr4lVl8jRMM6;P z-0mOv(eE}GZN;yrq*3Qj~x&tTH?CVS1dfWKfS}n&2i=auS_fPR5bV#ich1Vp4!=j98;Ti3*4>S9^+yp(G7IY>Y7nxc(56mBogcbzGr2JR&D! z`Hqcb5GTyD?_PDRA47WkrMsm038%rlx8@biOn7~L zz09x-h`yD(y(D_o68>iR&UmKy4=nqyUu&%wcv)TFU2nV2zz+`(QT!>mxK!WaIri~k zZ;Q>J;s)d}`$gt1?JxBSU$efwaJubxVP+v;m)94eaC_jC=Oe$4NH9S{5FBNoOhKf>cNtui!ON6h$mq;nt zorcty6qrM`6gK589leIZo7@}<{ALQQ9)8=Oi1aS?1c{D@*@>mpv-*xlhpM^}$M2*nU zwk~sif$bJ4 z0I*tR>2|%_GG}`!awG*0hDefE75_eMok`T>bu@22snzJ7Pa8Rz8f$obI2mn7?fNPL-7N5%%Jlo|>&2 z`f_NL>!k(~YSuMq_S3*PzT~@Y@H-W8lk^V|E9uC9m-P-3SoSM1uVmsb z#QudFzO*$U20D?O4tNVN9KWsA8X38YgpQY;A&PqP{}rLi*an19}>B`KX`V<02~ z^q|5xj-T8pPfijvDi~HPW@NB)8^wWpW6R@nvx#x9nMB^p5dl{=m!P+e`Hf|DZ2Fa)0iX!s3rhz7HVrd-`TlZ8)mK;FiV~* zx*?0oi=n+deTt4et;xclBJq3xM$iY>8s|rH2P0}LPp(Tt0YW4 z2}Dd;tdq6*7obRrnu7ws2&&&U&iGn@a&hf_@%a(eg>uGq?%zCu95*xRu`nW=3Xe?n zi+**qB>_YL6P+4+i}zLa^3_~@gNI!bDNWN7_oysp((5C`rR)+e$J7FIn!)elS92~c z>_q%Tuu@~usXmU_3Z{Uu(d<9Sx(^0?*$2-6C@Oy_cEg*G9IZbk`nCNJv~Lb*3f)NT z=j4!KY4+P{}t_u)eN!11e}7~nGjvf;W!UdOAmpXfdw?xn)F1?pBU%MC=qO-n2SXCwu!7gdQ9!`m^ zelzc@BW~LD=(T)KM7%npoq#8NnSzDEt-r?rzk>dqXP=mKbdUEsJ3&vu&AqJw)fAG5 zgROdUO%^z>mG;-gpxRg05fJ=|`o$jg2PsWU{cPD?utjA{eG_l)xxN3NxIzIaovl;y z7lNj$j~D%~`izi$&U`NawQn%5E+>th=@kX{B4cg8eM8(?8!v=4AkP6KQ)KLb*+M_HH`*JqDVJ5 zsEI1*F-s&90*{>viwAoKL4gl$w3VQWFU}vLW5!kTR&zM^Fvk zH)kz};6o@lF*Gek{E<-PLZaMFjepUM!s+EAPc`&)a8;(3FYH*1^nkX%A~?oXh2be5 zr|c^{Rv?d%z7ptF2fsEb{NQ<7JbwfS)6-IkI6IOf1?3jwXsk1Doe%&{U-AJhZePLM zgUAmb$Qo&W9g<>U5W$kzGFdZZByJbEi{f*{vcz5IHvWN9db)^+4yp6dKq7W%+SdR8 z!hdnopnnQ{Sy7?Fq3-1(9TiW1H%j~#rW)^T((AArW@YY~7qw+DldUCkxH!X>q08rn zL6OC=s)0#sAt%78IL>po5Wl%C-{F|K(^A(6>BJs|3 z?zpd!`r8?ga|B`j2AvOk7V zjY4yB{>w;7nVSdgJ5^iB2gJj;A+w4iE<793(kw-D03dmWKU2W1UJ>XE?%AWZ4fUYm z2mYQwnA5Xd4i>GepF!a-mr|z6v0=UC;{I^S%8c$D8O-55wenq)#?kBwAbKZ7nppuH4{o{3W zzH?%CGC8=uZq#6tX6GPwCp05nnNErH%<#i1%VdAK`YgE9Y24&77MPH90aJ?~NXVgH z9u2q8fNjD-k*cO9er9HylYiaJ)-JddRUX%;7o(+*yL+XZBPoMhXT{b+#-~3)`VxPr zX;RgcWTjZWv$!eVi`?0_Y`faK)x^Vglij(240B7K)sVj)&894p!b1ay4B`k0Qn+0a z!5-)Al_&`;=KdJd#TH~`b;ZGvMLuOK)@#XLYP0=Bpvn7Kf8uo)ikn)a{hT}OB)y}z zCn4zY^^5t)QDF^jfW&`;oQ~l8wTG9H(Ywzdu$#XPcGpy`+@Bo2q*rB7Z&;Ume*a!b zDDBYQG#SiXGMmlmkzr_ly<_?t0~XBJ9Ojc*p+D~K?h+Fdy>6~^p9|joE-b_#AW*RNySjWiVQ2<&{3=?T26yD3 z7a(mJ4)eMb&WBkDLk^hYvXC2s(GP6hFaf<|P%%vHIFMlHx?=@*wnL>0r!-~+>F9PR zX)uiH@gP*)kfOv*a$m&f{f zenC-g3h7Tz**i|1bVNp4S~*`Cub)f``Quw$7%hchJJSI!EJgzj*4K+#(eV~B-G({I z}uMtOv;xj4zz2$O%3lA^RQVomt;PLVG5-cnanQwqm>=n%BR-QC%!prGK%$%)x) zqkJx{#pmb^p-AlYHp4ta^CQ-#D0(lt#`9snfne{Z6L=_H3U2M8;`p-l9(7;>bD{U6 zGRIIjVw-ea@K=01JkT`u_V(<=G6pb%lZ1bJGo_`vwL0WDQCR307?&P3rnh_x6B84+ z6Awqa56w9_)EpdBGc&dI_1Ba6N+|w+r&M(u?eq;!mnq-}#uJu#wXaP@GSaLFk*emd zEwB=rBOUJI7{*c>O<;MBs+!6Bx{9T=1#y%CBU4T!SIx%8bjj~AfVFetPR^Dp7AO=d zB-Hx*H~G7FMiV_U7z7O4Pr+q$sBdU+l+XDvSuub8?0T&y{PygFx2%Lj`Yn9Nxw`yJ zLy1P+3(66-)zS6Uu}%AZb&qbLy9sVTer<88-Uh`J8I{fso%3^g};r)-OnA zBu>{B@I-K7pfVxlOj}o4NWVU}WL)Ax2kNkp6?i>OWfk77R>bGFg~cNo>d)Tv|6Q`s zQk(r+JEOK$Uf%xRH^;%Jo+}$!_p!*p}ZsPME9p;DIxMe9Nba$g?;fDb(hU#K^vk$5|k42>LI;_4uKOS`=g zMs##`;T1fP1xa5?;%jaFbKWP=?%<3L0G;*hbI#SFBnYczWvJrM{w%#&1*T=tpP#W) zWj<^w8h-iy?T{1!AP@PIE|Jft!9+QD21cbT63|bAo^fIC4ZmVpr)84Gu}RC@{iB(H ziw5X1gX^^wp7cxlLH^*XjI*?afKAz-_PAb$Q=wHl=H-U%)C35FitR(OROAmfO-TAH zmSquAEijUi^nb`i5=TvPZu%)9ckt6b@V~VHs{K}tq(B=rjwotQy;8hqrsGj|&mflM zUWsj1lT0>S%m%8WKIaQeOpMOuzB|L-!HA4RmDuGPDMX+M^*appcb>+>NGM%+J3B51 z--zi~lXD+VVjRdp>o_d#$KA7j_^dc2D2d$pP)dn%Sx_MmN6`%HD5YSYgBgJnoGgY5 z-a#pxsnb2TARqD#hu2FA{`JeA50iblECov%d%eNCELudB#5Y@PT+0pwN8N54kuym< zhqyrJ3w;0W#A=H^ZwKdfPSw}3lTe0iHP*6M`ABak44+(2ER1XE5}9N+=sm8;VGi1b zcXDa#)bvN^NPsBf7kBdDkP(KPRDOy>55l^8fvVZ)q(jsORlgSrCuSSM9$MZ0Fk8k9 zSwkp3s3*WJxHIpEa7#Y-p+NDrzmFx}_Sy<1xkPq9e?*_lP+?tfC@brhcyL(3v31Gx zTYNMST+43IKKm#k0O|$3Szq#bT@lhnQ|chc$c%mjKcVo$qtkgNfmHXi$P~twC_RMP zPD4X~@n7+|Z<@yKW&emg%~I!SmTL5hh1cB)7aW5w{U*r({LAqx`Oh?*GVWdRVGsP&& zm8Uqme*c#&wL}C`?fgoRU;Exmg=DA}3Cga=?M&M?LSU<^?Y1XJm7KQCB{2V;AuZa$ zC`qUsUeaVJ>7C2z_^Ej+z38W$WZ%v1cXHSR`hf$e8Kz6OGCxqac=HvZ`@%4pz?NDApu67r;4I#H^bbgn-ekCj=jEeZk}>pa1p-VZs7rv$?$`}=4*W%8ft)&n>U{v4|7)VvrR9cI@S1C zv!gWSD><7Qf0vXqrX-GMw5a0~vM)@|SN#K}K}(FbLZCK%QIxbIYzaCb1<9E?Oh zmA+tu({3yC<}aog4DS&gaBb%_O+=&pyHJu{Zbf6KeI`JJn#pDQqE@(}nw!lEE{xIs=jJE;HLfT8|EMx!ElZeC2p|*SLQc_}KgWHt3jm;5A z*4Nk9&+XE^YG%x<-31rcc6Y0S**P3{y`Jo$-@)&?M;-jbI6>pFeaC$E2+>Dd4Lf6F zW5deF~c^x-3pT7#Mbs z>oyQfBYX8qV(J|Y4P`*rhJoh1_f4&wl9E!cOp@58_Vc(i#{q(~eie+rEH9v8@r8pH z6PbM#(>|?OsLn`wY=a`obg?%#H%_G#x-~U58cQv8bys)SXL~cnxwmns3g~rx$9m7n(EjYyeSc#^;WbooqzR+a;D6SElMYL;2!`ETK(a#_lf_nSjzL_7#> z=yCpL1_uASzY|j7Nr(pQuv7i_Fh8SNi)m)ZVa4-u$$7sZppJAp2I8Gf7wrqJKCb#JMTwTl12nh`0KQB_ZW`(h}s7oLQDxU9_}frZxwK?jhGc|xc`wrgy>vA%A`p4b)8^^dK4rc_tA z)w)?&Zy;MoO|5RLQea_aE;TjPYXJoN3s zok6}V(7G0ed>TsHjWoj7hf;9oEo?pWiO5k`SGV;|!>gBq7ql;V&yxAy23?JWZ z4ut!jcuo`)l+CRz!WS%O%6J@eEu`+bnof1=5{8;~D}293i&(N-@k5D!P7 z0TTw8@=+a9b`*3lV(#n*K`OW>ld_`w#ce%RufYZz5ck8yT(D|3IUo+!RI38@NRDzi z4)H7UtA8!;8XA$3SMX6k*3LJ$DL-ua{*?dg(`(pxeg)opDv<~Y)K6oUmB#kzyal$I zsZ(io)dsT7S^eIsDIy0A-0`9Cg9JVpli%-cz#{ik3i`2-Xy@m$CHgs@6vXK7R`QVf z-Kg2BtiJHh#8-QmN=-i3ap9OQddlP+?g@C?EmRXX0(6v!$a25L?e<>I%Z*O`@$?3` zF{w!h4uq>v?#$|UlqVC)1+7W0O%-J9eaOd_c;qw@+akbpn?T0*eiA-rX2Ycxfk2`Wg?gEtj|?k?! z1{tKfwp`FVv*vkhtk@=Z{S30EIY68XpW?y@J#?KmNMQ0LacEHUM|++hlLM==U_avpe;!p9MB)gkui6pC zR*lq%+$bpr2KgmUcIGs8vxER)XRuW?OezNkTx; zVfTW{)l!j!p9lL-_qoXk)s&EvwX@>)Kv`#`Uc%DkUXZA7ii0FfLyf(K?fYC#RVg3u zn+31zOrKCH*-F}1sO;xz3(TAe0>XD~YD`1~1k~5DlkdTspk$tT@71(?*On*T!1oNG z#O$RR2Sp2=A6#W3DYI4@HLd%)q5G;)_oSo_!IVxqpSEP=GyXz7BC&3|Xe$Z~= z*OhxC`n(OwMdH8xS!zePlw(CeJWsi}RjrhK@aq~#m2II$#I26O)?ThHUZx7eokGjp zG&|c{mu|-94|Zj|x&(WxX(qdTKv zw55$+Yti--QAYylFpz2<-U51h-^|wq%wK49UictZ-K=r`B-T0kB>GM;#-G}KP^Q!eoh}(4^V?fkMNUOU1^;8V5H3_vB3923hb4B+a za6W8CYxypIbwT6z4_QQpTITzyUoGZp$O9`c?Z{;f)dq+`1q z8cJK?CNE*Mx{I8gvxYi|ciKLGA%149@(UlDm$=ssIo;6#L%Z48Z$AOL;-)Drwb_~k z7CDj^@2kZE#(KMBa3B0=j~buv0;@)PYNv`lHshX%$U3Urb5r17BEqwY(A9Zkcm*KcJ{Q-i33$Wbdo$|`Aszw*T4eD zNTeL-#(Gg8>8C`L-gEzIBN-VtXbGxtY!tt3?Y_wyj7?>4b-Na542G~X2|sLSUE_A5Xwp)4WTPCXe2 zJO(=Pe4JgK-`+R^n5Yw(O>s%8cPax74^G(B;_bHWU5rd0qRR8q3g#OJhQ$SkL3jXe zm(m)uNB=qU6N;DYMR6bU+yA9Uw9OGhj2Yy43*Xq->Nlzw8ymY-T^90wxD#ZWbiSRR zpZ8oj!VeWy%>OxT5*!r7q*LXx+~mqYfKL_(Msj(kq*%242Vnb6aJW^{%QI!Cd`VML z$N_CZ=;g*G%^M;ByLg7E#^SQ1dF2pf8rsd~)wQ*k5h;B3_VzbVF9Q@76buXwiiZ$Ge+?f&#L~BXPkr8+Uh-UM}l-myLngmKHI|$l#R1`gNi#5mBpVBxhD~WG^@?fk6RtHQRK2R!P%g z@V}kGot>Tc_xC#wXlgkut2Fd7G(@A{&g^_agq}Z-A9gd9Es8SLuzAWQ3g5py!A6aN znIYz>oToOWU%186%Bnj1-udyt`tjl3$aOMLA&Jx4V80{dA91~g&AUNcWG=uyJiY2; zw{fKy^6_@x;J%UDL^BW7_;|#rx~F6#=3V zQO1Il)@gYRoQ1}78`9Fd%Yo4Ht`Z~|LyZ@igqil#h8C)$L2PqGW> zo1OFJ)(OlKDZFd1BziO6wYIcI2c{1vj2GHVzJ8$*FxEmZ)BoUiPRrb20|DGC_^A?p z{mN6!e}{+mnG!D)2ZnZn=JX{JN3n1ULJ|8dlpZ@Gab_a|-Tpazb${l>iAHYbif!$>DQ%5dMm$HJVO-G&>&W){LwG^ zHd--%-xTy*4Zo|ki6YrtKHFmeM*IGK=wX_$9A14+QLN;}mc>FhVC&NVKroFQwtWfn zbaKk z@DIQY*{Jen&)_;(IT}tGz4Q3N(8@>SM9km^w8Q9Up#^PA6kVaSa2G9H0OhtIySc~BT6Rb?-c$AwmrMV^f( zlrNKT4$T94a%&#~5&8=j_@5etG-XhgoVgey8L=Wpp!wxV=x2jL zkU5QwcQ)nl5LjLB2}VmxdLbM4QlryCoIbA;6~UGqM-&(K>FEWAgoxEt+%+szP6Q}& zTrTpE9J}#!k@=C^mMBNj)H7^UKUx?hcG5A=AxEygQcs%+_<;CfJ3Bv`5=rJg;Wvx* z6)nr(jYNHBoe-dO7F?12%%mcT%LO%qXZxB3`n zke)ocS0{kVclr*u%WUKWxY4)>F;M3l?G8_aCMYRaT0u=;@llh}( zJsJg=5L|d3r?e&DAf1ZmM>Sq5hAP*^q>I{R|;6F=f z;XLzc_Y-g-GwD9jlD1Ld`~Gfgm~R63y#&R|P>u*3ZzuKgz+PHH0M4oUb;}&Z*z0p3 zG$D+=^z=sBPY2C-Q@zmA3DH&kRc9Z z5xYQ81(X5lbOUjfTqO&+NE(ZLu$bFJpM0K&MDlc@*_$^fB2UcZsDvK<8+Q3O4LWODf9^64To z7a1SentSs8ynSP|WCtM-p(7f%k- z^ak>~$=Q+}kj;5#Hfa0fB;x(O7EvKts>J~6hHrBV&bqvlH{Yy|EH(1ar7W;nSWD#| zCg@t%IPCVtKMzCqFfky?LPq`&8Or8&FIQu$@@HJY?`=R!{VbGak*zmOXyPBPgKMNYg<^NNK+&YtVG^F?f>{@{Np>zk&;nM?p83s9yh43zjMz$j{`t|N@_BYyrDC%@klibh~E=G`!_>| zS9k&HA63F#0hfKM{s)H@WFj566#S)X_nBpz%bc8?5}oS#g$4KCkvBX%JpUQ}sU-LQ z_7W8Zr9`d#t$={`J3N8g#mZdSl#24pfQGpZk<)OQr;K_OrA*aVhWa;AK z;={?5kmde;7j%@5o+bdDk+bArOkQ1NxO!3H)(o!xW%sv#Qw*rJzOL5cM~V=CKaxC4?mUq%NkRbM?j|Y&Pp5`bSFz#a}d$ zhm8obBd4|{vbk%v*0(_4|5M9fQyVXty|A)GiidYPn;D5U=c#B|&wwcv=~u1=B#&iY zBA0$*p_;KeVlBGQFOta5Y*cFNSI5rKVp1(_JqSSlZxKv+Gc0|!?h9qa8kyHIMVgR< zKO;?{jA8v{fQw55tDQ3g&?ZI%8}sY?_vq7EnAb zS%6{{2j=DFRa2#!ubiZ_{4Q4V@#aJq)Kl(zN|#w5&B*Hs-6kgUGvR5*Vx5Mxfb93c zbk!X3f{UIEa~@b;y;AK%)YU{FT01GU1Op{-gFNxqFPD>lA45g)aB)SZLqy*O$iqDR zrVcoWhv`dO-bQ~CoWEAk($c+#TSg`dBy%#qH_$gD4g+K7vp;-6(Jpe>}@9d}< z{+2Gt!sWa>z4h(&3vjyoqo+U2U@(}9ii)gkgxD_e#q57;0Wu||KQRa@dEDPzT%V z-m?4An|*T0@C^fqj6a$J5QK$|vEb%T;z|0Cwv3CKG|*&)XB^yN9jkp&NI1IvN+oUd z;Vlv{OXfQk`VHP>pRb%v_KMcU!7`+^jomJ@7mY6BZNS~LML9wk$up-l%wYRVk(_B= z3--tjSPKZm$=Z10+LtO1DusDbj`v!0p8IX#CT9wn>ve|?XLn|WlHj)2k#36nrf|E0 zOocI*v?{l=0sLaLbnzqH-tdw*d;01k5M?(Tqe}s5mdqcbcx^9^0zn*7FGc`HvZM<* zmsuD;GSa+L|CY%G?(@QbYgbLz9M_3EW5v#>pU!jIB(Ce!)yQ2-tq_hWKb-dDM`QkfouPD?f2quFN)MPV!+pN_ePXq(g znHGCTX>HGfNsoM50UvwN)>j*yJk>Ez{5A!a6NyQt7aE=2C=+VdDC=rKTmDDaMz2bS z`l`=UIny*ZC$}TVTOA6JGyW4^#s#f$H#yt^kikrTDqT9mL)PNFKE3*1jeKQLTwRd%;3N>-oj`C8t}lZV zf)i|T2o~Hu!3n`3xCgi3It)I*;1U7^2o~He_+H-H+N#~!{p!1Qe~k7yr%!i3Pv6_O zIp^&a9Br|Mm+p~qK1NB;3|L}4Jx#HIQ-^Jxiv+r{aQ}W=f<;(*7XD_Jh|;zHdDW-G zK%`=eH4;+FB+jf9_wAUOHVDAkK46UcEYB#^(G%K!on47$s4A)W;D&P2u|n<KY!YjYuHbN%O)!yjqL;PZNdzkzO}D^)X!pz+>Pl=rvPkBp8u)IgfH>$ zv6!m^A8*8rqS|f%ip+NYr1a5fjE4s=R4pgLUHtxRl&Q!O^ho}DANaHJ2X*ya!q@Z~ z_@F#5GH{Kx{595tuqS_aoSGHVH}tW7 z%^R$is0ZYKwcDUa+YCi0+y(j_@eE zyn1J%l7em!!Y$+A0vBn)BOk{*qarQjRRZT!!#-NC*=^ppQm(&~McW zs6{yE)$tw@DMki*la8YvpDbL%y|ozT6gMd9vXHI;M-4$|R?lhKI%k&7V>}x;=aT3I zvTd(gS?edE-Q>Y67iICi15DvqPxsuqY&~{jGQ^l90i(R!Pa|eU(taCTdXb*%^n<;@ z{fZP@6v!!N^bSMS>2pyin?Rrtxh^ZMy(pFkWYs(|ultQ-ulI0uKly&m3$6L0l2JG% zigkY-4i@s?n)Q{nkQ{ z=0m~Ah796SipRKGzkasI9HEstXTOorD3uc6R@?oNu*ry$2ViCYd!L@Y1vg|1^l6Gw}uGt{*0F-}Dvqg?M%I=CU&FkhyqvP(bZ{^n+U?IrHy?nOcC( zYL+#?Ll~~>8XIT14i45TzlBf`q|>~RCIWRqOmb>;cN`bD&ATQ^UwOpQvOs6iR!)ntl$=3lS0!=*xiBmG2<0Y94J(Gts+-noJ@|h98tTGM*g&OKpqM z!c~>j5XsmaYbo|uavpjhrEfY{tht9ZyVpD;Y#WO_yBSY;?`lx~wrb^_p3io%bMK5Z znSmSKQ+YKZp$=P$?8|&R+5ajPcTm_wyl~wbNKg8J1OmOTqM%)ns7-)xZ;hD49a3sk4P$Z_PL0QF&on1eJd(T5a3H!VI*Kp z84he}=9W+;noA4bKDQwQSTIjEWyA#lP`LGLIb@`#zVb88?D9;1Pw>I`#?|dx%pWqz z*AYUT?33$#Ua1tc^W38BJ9+JMzYjTZxBegHC=0vV|Kq|oW2Y(F9Vc2L1HZO_GKXWqT4$Vp zUy-1>aFC6u9KX{FKFQEDK``fEBHaY^j_ zzW*=db?-iLy(wyMom!QCd+|}2oUk;<{e!PxDh+*ucj(H%`QU>w1qeij%dEcqc8B!U z#q+9sc&Z-RLK;mg&rk+hrfIzJvJdi;^rzkz(V?T9AW%t9&qOdI?C6NL^>?gk)YDV+ z1ZB!jvtiwN&K*w-|9Q*4A9&SY67-Sq)ZN3!%E0nVoMD_VG{O5aHFIl^$lVJsjfW+Y z05hT0`RZ|5vu5J*#~=3;)=1T;R1`z1C z;=5vWh=XPhuM?SvhuP?tlZVFQ5Cb>&yRZ8IRqQ}rk&46ld>kyUz;CLIcdzsENTcuv zCAR>JHT>GW=G%ZPU;#!(Wc(yAKp;!igT-62Mb~k4GXw9S zVZ(OG%#H}s=C^T|4~Vq9K1cFj=fd3sczchF?Po1aV;xAp)xcZ?iXWZPpQ#g}%BrJs z7NOQO*}c)w{pD-kY*3-I7`RKb)I3*xXxHAh=y1hZy3|%N8)$4qY%mux^%>28yRZBg z^0VMj)WrB((?9nX&J;McG2!IDukJVE(wUPsQe8Gueg34c^nOGbJIbaq+8vN@s8SlP z3@nP;Clz~*<-zlfxj?4argX_n#6==0Hpgq;m2aLIk&(8*3JxqCn0XmkW7UVSZCyW!=}esh#Qm)_2UlqqV3j(HM>(#Lwxxg_&t?q53sX$`jjrPwiZ+9W zuN~IRzFmqcLV0iEw%3$CC57C68@VXUPwdo1z@UE8?slc>gGFy{FhHPkR6jT402SYj z)Mp5Skn4Tgh||k+P7{*~!GIOy6z`>AE~VsAOaJe5Hy7@#V4IU~UAVciLrU9PINzr& zVe^xQ&#`U*H2Amyx2{opA#n=n!5SiD#;6e*kCBu>O!*OS;nYUY zd?gkVs&0E0#}GF~AB7D1$7C52r=ukkE1Amk$}*mfKlgE>wnD|F0-@rOR`?<&aeJZ@ zYFNs`rH)5uD)loH3DmXSXTckkjW2op2h9-ooqCbMS#EhMtn|J-AE8=bzQaIDjWv;k zu&hNZtlCOPnTxz$F;RJDltTmv1OemC9g=xwIWZ~2PUdNt{M2AC{3Z0&)Xv8<$bO5D zQ^Zcp-;BA2;V9VL2(Nb71d)AqH*r@fK*1son4P$YaLS0>9Cuyom33C*1%MPyLD8YX zMPG$JRcFPPt@K@X)lr@B%@<*FzKKH3+%OlUX>b@e`a)oJ6o+pJ-mrh))zW<2KNQpp zgJkQBv28HY)>`&P zSeI|NN%+P}9W0lbvs=33h?*5;Y&)BI05!tn`NRSOiDROJwO%a)CtKk`G=+y*OdG;| z{F$-{%|xajEdyOtB4H%DuZubIU);<0AP@)-%<@l{kEDK`ow8yp#H%>J9+H2cTYyCG z-cc@N;Wa~HL@gFnv6Ca~#1doh=IEOgxw-`auD@gkt)K$zr@GUOfVgt)fnqK!5uev! zMQfL=N}b$Foin|W8JC`O=Uo0W#X$=XvJXcAw-)Gfn8ey;iNVnK3fHX!eVDRWjLNEX zY#Vh4%e304FeL)d(4UaA+!SL+V_v_S0Sn?3aboAwX zs3;8Lc1{OlC?%6PmlT}YuD(nQ2J{w=fs#)a6!=9dNM^TXSS(yKtf@i2g8%2>3mz(% zZ(MCV%Jgm?50$P>6-B*-^1g`c7E!*%FU!e-s>Mh7OXhz}xBzpL!ewF*nGqA2@jELt zdy!qN*$N2JU9qKDd!-VZA@J4NWEpQuqH5`f7tFC-gB%~s!L%M`n`jlqP)9^foy4MF zyFL9`(EJnJy!Z>DCN(KQi;S>CnIf+V`|bp^ULE)vmO%{J=H4yy;?)O>vD^Om%5UHA zf7zhE+Ms^4p`I@VQ|ora2#4wX(yI|nsPG{*l<8=FO-t@0#5=_sl{nb>YsLl4Wsf=& z2IM-mbU!oCqLn@Y_W0Am!@p*mt5QR!>`QEpBXdYjbuDT4Q#i%TfhJUZkKZ0mH_d_7wa zJKw(>T%>BE)mBazC~q#r)icT8YUzhYbSfoth)T(=ZH`{#iBbXkEcGm|KMS8J1D^>z zoiOkLHdPLrDuz|_$A=wZ=uB1W`)^0s1O+xoNg0g9U2ffC36IGneUSL6u(IMA7zM?6 zgoiECazs9`YM2Qx+tx*2f7mMM#*Hmj(zft~I0@k);(A*kfIX)BOU%0s+>VkTMc_^8 zQwb%9?%3^r~!;}Ei3-RVpTFO?3ONcU&1?k z!Cl6-rJ5h2OTqsh-gVGO0`Fg3B6ad2tf=fRU%mCMJIchyHPJeR{!-@1Jow41yFi95 zJCp3~%>TB)a`GCm|KFymd4QLGfqcM~_m8KORQyhawu;%fS9M|MW>iw9>QJsji7{G+ zG7iB9OOQ3K``2stC4Kf@?d-sF;;J}eWs051r(L*(?jGX~6D!f`m9NgGp@ z;d*67lJ1VCV79*GdgFAkbH!FzrC?nPtYs3V(1IY~a87KQ&5`lz>K`D9Ak!klygr+M z(A3D#mTlPPi1lsUd6(L%Wbe4oCuGOb>%ChBkcEZ$NwXL&X|Qin4Xb+gUsZ5Tv@trP4yU904*UGC0>AQG=O z%wi^rEC@Jt&v8bFBSW9b0;)UjwmkQI9Bc6_|NOM`%^p8UvNxNS7s~6KJPi%p-xXF_ z|3XcjfjBW| zAie(SW#yp6eC?xA_W5RcAMomE#CM}Vd7^~*25vmhaIspIL2-vyf?Bwq&e9z>9{Ykw zof-}BbNr}J@$m=(^zTgQ=U@4KPhPt_E8X?p6ZvLGiRv1v;9h;YmI3BHK@Lr{sTx+~ zvcAi5Y2~^yXu0fJ^`Eu5H}3s4Df?I>Xn>3Rlb*rR=}Tmdd~S}N?<Irq&*_vZEp4ZCmI6Tl#s4u)L zjeTm#OZGgb%`F5f0#8+w$CO|r9>pY-IKBnu13HweF@)Ux{SZ1a#the@e)_R<5Wgtl zQ>RpU62*e2Cb-dbQBN&~xq_cU1*j#`7$q8%Ush&2dS-tk;5gr5wb~P=9U-Xl91DxR z`kl6}E_=$bQW8_Z`KrRbptCR)1}=@b#|`kgu8ob&SYp=o*_IY{V|znG0}&C)3~soE>8UGv{C3Qrv>D5hFf@2quFm4?>)X@QL&6E+ zw;rQHFH}pPSX*0@iNIwgdQMB5+v>LUr+RGDSy&r>NHRJ)YCV?I>V0BvXh@km9{2h4 zuu(Q8DXD^^^WEPQ+=mBgm~Oz$xEcckLs{$+XDpQnn2H8HM4E$ynTe^|pp}iEf5s=X zt*x!&uA{u1O)xV%F|ls7=*7dsLv;WZqsGnf;9we0Aad*O9n5^@c7MWJzK~Z?@Lk0$ zPFr{NQoCxlsDSlYR@!#j>Cy0t-=jq4=-2G*x4?p2&i;&Az+;t)rjCz~fdQnOPfkw_ zGU}5do35?e3I|+UW7!DAcywG`&~8}?9(Z$ebMdhO+E(m)Ry?{P2nfACi#4h}~h_c*h)?fp_x_gh{o0jY_JiC@3|SXwfIKsrt~V}P$?RhZnCKkQ5u z86$JM&dzzwj3rz+>@*{PGQHe?N^1`e4qm-_Ra8{uL%S6g7KTsBFC^sTV-?-peD!&g zeT3xfWF2mAZ-2FMgpUcyI7Nj!8%X>R$rmRpr-^B%u;QC9d(0^iCn%>m@LH&)!G<62 z@9)P@3SIg&RX3?JB^@j@M(Z88oPYS$;_`5JEgzC_I=FN)Ve5eoMS>p(6Qc2@@1GVS z?ghQiMups5U0LGXylHfVDmF%4U1#4nRvEPmzJ9GWU(IM(S6@F@sc+FdANBR_&Ocqn zv+9&$v%7u$#OT^fv?>-u@8=@e2|)CLA3{FwG&mFMb!bgP&|Ye3-A>gw3>t%!(-Bu-fqFQWjX_wSizCpBb>G&#L}k;2VB z2#RrXIsj&6UYoX?7amn@7=iZ^#yz=CO-cF2k&YxfBskd4-o7l>J0{NZ8_8PF z0EyJp)Y=$gRMo~%10$pCq$HUpXW^`ok&#fPXUL!OR^Q1;OLw!^be>K|(8?(&Xi-PX1NM5}$pI=<`TUzjN`!hoSPE1S;AABEp8l>S1#TM5^Wc-gc%W+r2%*A^9~P)B5=_Ls#LfT4(Rl*2 z>%nMPBpiDGR1fo68XC{nd95s8t@!2cdM|~+*Bx%x1>2XnbO&J%H}>`YU(CpohGefq z#eY(rmgPpr&dEwkf%AFT*%3DU%l4Lk^m}sm{{UNWE7# z*SFL(+1c6H=)L3PDc3^uQL)&cNzlN9jX~>^K%gJ6;ZH2&#Ru!?=wRk=KP$YX7#}z1 zO9w__>BPsQKaYF7ho_nZw(e}c1)}!em9~lsHn_C7IQ+xT?ye?VO5tCEyngfRQKz6n zbr#RVpCW;G_txE-EJP44ugLmYjR8wO@)&t@5k9`ee)HLxAHq)RIy$dXl#R%ALg}KW zwBEeIihUH;Z-a1gb8wuWow*&>Qy}=P(lPTb;BojBWZ~3OE)Y7rZ^gx$)D&pg=pkq0 zcG$g=W4C0z-^r(~)u}Vu_vhQUwkHd@?{>rFqDfx(3$n5*F%l3Hk({5O<8k)o^V$F5 zC`a+a${f9H7YYP$xH(|)^6$-xkvj;4-1Afm@b~X0%E3+7t=WQtf{cueo#_%>7t;B` zqPaZ*iWs*y`ugeM{50WOFX8Hc=oFQdSlQXN*ivK>n}}56=lvri>D2)*570@v5Ared zJMP3=Avy8!KRtVN;1sy%G;+fNIPs64KO^z#^f=g3cDp{IVCD}cF$0_M zGPIzuFxUTdh>%%TkK-!9Sxf)ob%)FGdcehD#R%>Ccb*}wdFDjo2u8y@0D{dpm(hjH30#E zoeN*dTv}RMnE(7KK%z9L=Z@zeN)9#zur(bWxkUaE)Wl`NJ1D&9wvr`-Y0IAhy}ev+aRI`-2o+A0Y+`zP>wc?Mp$FCIL(strEa0;4YDms001sy002-+0|XQR2nYxO0uugQ00000 z00000000003jhEBcx*3iWprU=VRT{RVm8z>kP_iyG!o)6G&i;|GBGhRFjIKJuAw3& z%*ALZ#A#?|Xklh-Xkh>nRP-w3Vl66-4+<3$cFavJ%1lnw_sK7gcg#yq%}FhG5b;O} z^5G>h(zGuiu|d-uI(|8dS`Oa^03 zW_|N}HvUn4F0}Fdj{^o6bZ8c{~$U+X@6e+IJ8ZDwZlDKVVd@)SYBx#71hzOctl|T51$yl@8-4=3BeGKk8}X3m&Kw_az&? zBL5jz{tSXfogki9{|t>fa1N{6IS>~{PBeiB>2)zwltH7O`OHC19SD^%?>V!a$Wy!T zMWbH-U7i|&3n@i35rm-CVTZxNU4rbnw1H8(hOQ3@l~^&Q9~&Zedcd<2AQFl_s^G!o zNVod9|DS83{x>%}oxsD@%2y|re|f_gm#J&3xvglGC1p>~92lpZ<(SA#5xO#DcH>$8 zB`C##%`W!afSIv1KrIt^I!95t-Cuvo|IN8JB zA%0`1anFsG`RQe+vn2I%Bax4pg3!q$H_MoD!{&E#6rpX|6N7%R1 zcy=x~W)Q`*`P>Y%FL5j03`fdj-5}t>oQNhCrNZZGxoQqZ?ru;@`VMmV#q__3iAk^H z9SosgtY4kzkkL1pIrHLc1r0-sc(n>J>B4W?QTF3Vl(L$yRUnpG&6O3Nr(HW}_6OTK z%W4&(58gI)w36Xk#)1;KyVGU!Eq*O+hTHQshbeqp-z0y13^g+~wYjr2(bG%SVNMgV zb~QGp@mMru_rAP$lZha+w6em$#!kDvSg>2HSG!NNE6LDL_N@^7lOJ8KyRUz;^=C%x z=f44y#cOOu!J+gKa7R7LNgtDzzg64{G-wB!vtw$RwWJ7$f5`H^7b74Y*1`-s^KG;i zAHh|zsivLmv(RdP@M*T3$X)buWqUNOtEss>QAyZ6zj@E3{Wq?!uP^CzIz{R^;W>Q5 ze7Cw}zQ+F1V`2o7i3@DDaJ3W^z^k+ko};4|6c(PGoM51%SNN<}!Y9hbnkHT{IWMOd z32GIW>#h7D*2Oon#al2x!|@V)d*te-x--;J*0<}Di(sUW*dA08&w)368drFae9j>M zGeGEVTl(W+c7}x7k~8K$noGRa99+n4-+L2o{wpgB!La*`SR*~1F{ZD*qvK=z-zIZ6 zd3kv&D@H)k$8IN0#EX-Qi$O8b;dr&nX=~W_Z)4ZU2oBKL)KuUr?k1sAl3>j(-&7|P zCEjbs=$wmX&U6Wlng8Mz$ae`p_^cOjHFED+wZWiOfK}6Ap0#v0PN}`iO%Gh{!}gi( zA&-k(+tbF(f+c>5<$j5(*1ySq@b2}N#7yr3|8!G7wPm(jP(~(r24_oqnHb9C1LEog~4;8&w1 z5ID6nVjgYubCPNH)U{^Ox2oE#k8=3^Ly;Gd>^T1+O!$=vRvnE>qkOCdFCG+j2hGD zeVvo=fmusZveP7na{gkMw;?e?qH$5LsOB+iAbTQh2amr>n|&+3OG4xe(tO&E*00gq zBOPBiGV*Z?Nm^-se_aa1(BSi8?!ZP$L6vN3ZbI*?ocF_&NYvdmvKMTL^2I$M zHlSm$l$S-99vKpTwE4_`NwN4g&v-7v+5@(Kzl=%kOjy#m#h{#6yFX*gnWUJbUZPjS z`}S?fp5n;Jh(S$rU5JR?UTtx4u|}RUG3M8^Gv}9iGRD5-58rl2j{!7-b!X5TFrq46hKwVTz*(Bn?^Mqg=#Z)1b+ z_kKf;WzHB3;3f#2Pjq@?YMuR601AM7K4&Qe<4Y;BsbYt0f3D(8h)zjwwqF*_8k@~i zNw3*#lp0nM1C9H)N<6uMcOY|oboB9BH{}MbZt?Ey$B!TH4NCimhR)B<$V9!b6xfxhyR9?xKeC^5*iFtWuoF1h` zdR}F<*55Lq9M2n_hyHLE^zK)C)7%OhE(A?C98Qj5;^|d^J6)z6_vn}tFHBB->|w2% zjT-uUQkTnBzd_y0hWmew2VOsfQqrxa`!QpR~PUf$Zq*b#w$8TDFny05*jSs ziaq;e+?EOXD4rhoqS;WEI|xC~th^F)8#t;dK6VYV1hR~M{Je`5%5YUqK4_)9@nU#4 zm(90){+v4S0Mn%Y9h26!>qh@bJk!SqzNu`!k)>o6SA(O!VR4b2BGWAXbJC@#p~|kY z^X^WEoB%16VVU=9JLyMu*t5Z9GbJ|Lk)ft*97M>ruiEIPu~4^iqR{P{{QeFz@%5=( z#LMzm#3(1u=L``H(y zJ$w32hF~uQF!m+=DKqr*6`6{I^jg-!oE;E^U#(p-Rjp@OL{hc&(3yX*NcU@MHY9y6wIlWtrxWu<3Wt>E^mGi$AeRqiJsUfrJ24!4$ps zj0Oj&RWI_`@}IP5E04eh=s0}l&Menar$&@N7bX+VOcsU*5`?`nURj}mh1_w;N#MwM zXy_?1h%3)C2pRomdVfgC%DLwGI?%z_lVO*b*&@lJ{9}~AazK?iBgVQeu#NZnN@W?h zaCe*A+oKqqf}w>}?L3Y&X4{)9oxU%XZv?S|siQu2G$$yZD@JC-qOqOuk0;+=Wb|s7 zDYfX8A_Hu!PRHyVrBRLVm8))&CpN@VifGJ{s$Q=5>3jG@?}Ik9#n4|~60wl7Tg>l< zK}LTcqxM5SN5Y)um(&7%)AgDO-MYddR>X-@V)!;$&%>SPe9iXE01qiW-5iS`m`Ht( zWfyk6P9~)X4y<7m$;ZnGMpwajbu2b{ZoDMo`BAjT=NS{00}%<_J43*eGpz6KyP29G z>pZFi?Q7ar+6-IL!An8(`ZHFsu9#UOzyo^3uliLqH53y;GgoMV5R1k$@vz9AvxiJg z?H;@jXx0G-x$mW_NHmJ*8c+vBKb!`Klz%A{y9$qM+?q zl*P zAe|Ev6N4D7qpi*GD%5=BXKG?18i0j`6+@Y9!_={LdU^0y;haklBP-}?Px2H++8#Ts zbug6tyIdX%F}<&?N?N79Tb=a%SjCU7cU`k%K~Q}rBRUb0`|Yu;BCXQ7-yWfVZS;RT z_m!BzU@$H3W@Au~2)XSkDl4b)`K75BR5snrm$i`h@;gwiwMOg<<@<`Go}32loX{fz znBjPI!D|><*gfW4@sZ!@E=PNr)r$o*lwHDccN|JO&r%y)MbFnY#>U2IqAkD+6S6|1 z`b=HTTo3=If^hWnXaCx9t|(tzm$BKWPjmWa6*@M&$wQz1=+w?OeXz`W*m^z%w3>72 zt6=BV3m&wmkK8y{1}?1HSt}1wYFibQ;z7sG$vD=>t;7#3oTs>z#iQ zQAXkf^D)SLOr;b095WrQ@aIrv#)2DY-C9l@XZkPdffxrT68VtjTX;B6@(?OEh5OnN z-?VpwG);8n9kgK(e!yPkXpknHr;7zF1|WfEG4Czr?054OeJfX*RY(h>W7IdcI%Tr< z!f{*>rgp)R8a8Qa%1|(6MGNmQ>$LVs^KNuLac${vA60+rD%jet>3oU$aktd{J zyrIk6oM@3>o=vv5#G4+8WdhSaK&9F1QEiSp#p7aDSM{?@B`zl5m6GS_4_YabtQ<20 zl2#!c85gW|L~&3GWevVq*vGC*)7s2aN#c|$Q5*4g$sM!Uo5&kky(Em8QBY8*v0D_} zkFx}#Vq>{McQhz{P-jgD?ONSPXC}l50y0$J_+A|c@9bF7#}Jc~-;V`Ty6jGe@0joD zn1$cOzXhBMrx+BHDIzXVfTpCYJ4s@X`x1$0vXrQ$=;5l_m$-l?N@%5i!b@)rU71$_ z7suZcANOjtig>{^X(Mb9!qgHKnn@L$5PF{Xs8O2orz~S54pg?FsKNz!Q%dgO-UL9{ z_j4aMmhU@1>ubZl+(dFJ=<5GHF$FVm)63o}F1M{{A2x-rA;I6IE-wghVb5k^Hbw4Y zX{fuo_9p7(48WviSj+k(@I=W;WYR7?ddsR6D#gp;ZFd#uzBLMq1iL+d?nCacbmW?$ zUN|)}y#j`c_Ds|XbyO@rM?O8B=fxwyycCHFnCgoIi2_uEw@W`de^ncDSb$XECqj2u zVTTYJ{2es=rOcy$7Gt445TMnNen~)8r;KNDH$kGe!sy}bB9jk)L+LA(O11wG;NOn2 z7}{b`^(+uWKulyTE(o89Jd(ihc;#1?6b7*UqSZiz727Qt!U~+`)!?wkEO9y>%yDh3 zr}u-Y#aP@;k=q|+llO11u3`IAxobaaaK52a2F@ z#(z3a2|VskM-Ub=j0M2_esX~K+T!$HHF)<$YkC3+GN9$3BNN)^-HRshHVnSsXF)yv zsDS`Dlh}H;s1_Cl987@#o)_~BLENOW(XCw7yuA{k_k)q5y^0^Sph%4r!4UezAdoL% zXD8$KNPc-#G&2oQEgoeN(*N=SF)F4#amg+gg{#gg78G%_LWxg@b!1Gu!XZFK|H&uS zeyqNp4L)D85@F$#^m9Ns_2st)eSTUt)>Dx2*O|}HA2m~&=>E_`B5-ENsv@o89Q&&W z=-U}j4DU}&`5J5xdP8PUy3qs%AC=_MF4im0BhXxEpiYyb)9EEtTzM^%3`B_a8l%Y} zMO7rc0rA@-=9M~xyo}R)Dy8@Pu##~@-$TQd8vGZviK_SlID_xTu}{`@IpsV9`P^(8 zDW|3++_b0j{jB{Ys`}9Y^oK@*ER!G>*vXxnxDM!=#&Np3Ww(1}*0bFK+h=_ z@C{6LF}k?sU;v&-=qS=4`H?%Tz;?M=RLT~;F#sBz>EI5NUZ}`&3agmk=~q%T0p>8c zZPl^26aHbBDD|wQ+pFj$K3mNB9pf(`R3szP0{-Q?%VJQ?B3^Yp>%aqS6VGI5!B|R( z>N9Z=(U+*xG__F|i)MawxHF@8?2VW=xhIqFb<7ehYKwm!6}q zmcE(PukGzka>jXK>8wnoh!#XsoXFBw_yd@woI1f5P$E~pUx zB!!P$Vt4x=wBKFtb#-*wKP0K>to&(_rxT?Z6Q!_iVS$h%+)hwNfvoT=8xMGKcYWU; z2#&<17#z_foD_V2T*ph9knk}GnA)w#yU$Qft+Q43gTkF_j-1s;TV?HmH};&&LSI8j zqXXI#eLrq7y$_9i$-=LBr7f4Ws6dBtUqOQmbl#j$d_VhDpPSD$YI&rutC=5#2=pkB z_|@sWd%7@k_t|u6{9E(=Au;uQe*J~3rMC7akCXVa2j|T1Hn~Q$izR5YVK`rV91@)Y zol6{6Nk{~miRW&$etiMKg~D*S#)p^(StCS1^41-*Jt)ggdUcm0&x85^h(LG01+%ES zW*&!{9&MoA7mg+uk_n{%!?{;^$*h_&r($^*nBD8Fb{5Vlhk=rQfa07ZCty`^1uYMof!J6-1!5n&>~!YFn~Dy4HbO&rb&v z91Avr6JlkAMBcrd`0Uw(kyg=Eyl9QI?LxW%4v+~McJRh&sG&me8XMiNxgY>qPu6l? z80fz~V2mIGF7lSqQ&Ct>GwqvoZ0U=Eqr)_bM21D5H&~mXlG!wq_3JI2Oh%tSe=urK zxD5pSmlT=#b@I9Ja2|MYtr$u=oxe~`7wd5ykA-CQgz1+%e1>FNoO5w;a;7Dn41SBI z%~eW|PfoVJv~qR5h{}Ao^zn#d3TM`ChdWnfW*xwNZ5a9eJf~hTKZa{?R9yeDW>N&_d~LkRz!kRn3HtYwg2@H=*Jl(JsuXpL z_M%*j4DZj0>4%_k-2F8UKA!QIiGCCk{Dv!oLN&@*-pTxMO4C%`=^2=|4o)m_E-x2sRZSPYhu1&YC-wn5ajRtMb zdA)JaL8apL#C748*V?r9w`Ug|dT(CdTwiZ&Y`DP3kpa^uL`{%=?b`MFg`B=Gg@+<; zpeCcwn+hA9R z!1~r!*~jIDP6|F(sFv1rfkqxC$~#Zb`Y{Vd1qDR^vX+~h;6uMFyAHQy+bg@He{CXO z7kA(%GVI`;9&d-oSSE#+o&XW!tLxJbU?3H!M6*A*3(f*sG0N91982b8UBaX0EpukP z`eWZ(g?nxmafM5pq>K8zYH3Mq)YsLm2T9VhOcBvPJ3Cvze)t-8o&YKv=2uT`E!8(j z0A)I95tE3pFsMjcTAbX(=U;F?6nRlixkxA*e$#O-p#N7hP$l1VecvHf)YJ2)+??En z2IC^p_1DAMD$3&Ia@jNS5yO$GwblGmY#26u`^`;SBNGn^;9mT(wK&$H&^mAdE#hji zubQc9y{)C*NJX$-n_18n&R#*7fDW`6l!`!S#lbOMOBNZ+#;ndB#kb%8O=qGx6 zpE+ilJ^+TN92Tu#G?SU^emA!Jy(L^9z_?Uq_c>9EaIvg8vps>mgK)<=QLM>DTH#cX z79p8K5Sz<26ZQB|zb#>xJFowzJn4D*!~6Pe&jIqxhyWk95+R+@#$gL%LO+~Wz6qlN zR9xQ3=(B)BZMo6y`3iBMAhvXomJUL-UTM&#i}bJvA-Y1 z!P{|lL}2%!fZf30jze@TeL*Hi*#zoYS-Vk6f>y;A2EX`D>TKR02SmMO{&u-mb?w_5 z4kCONPo8up7n5`D+4HGnHm#T$OTY<5>YI-+@Xx01q-T$@(E2;{RkyQOwTrZhYlpO8 zy;zbIpY54@ZP(kRmCznzptXCiP~$g!AyX(6e^{j@1Y+I|KG)|8`z5w6RxYPn!pp@r zHNX)0>c~Q_3WLi#^CI|k!v6P~)u~_>Lp}08L0ab)3MEV($6u4Kg7A29O;C;a{+9VS zokEh+*0}AkGPAaJ__Lib^A;kZ=%yq6yyD)91wfm{TyTCV;(r|C3#Iq*lMo3EGjt%HC&zc&>JE?t0KMp4h@{D7i)Pa()iuv0UH>S`&t5k z7)%@Kn2NWf>MK0`!)VNOYl+Y=VWY3gwwVqxwD2bPBf={(#-}1&S%OspC0l9&wJq^f z*|ZhLP8Gn;PXgW?dxmTFv;`4@&}v%2Dy);=86=yZTC1kmqMIe4Hf|v#qER|nsyV0Z zw#mykPN~!>Ex3cJ;*9fJXrXAT78kvWl-*F7z4^%-;KL;l`dd;=ThOCW?YAZ*{~e4hPB@^4OIX&pOb<@+aKO zw<)nBD_A6N8ZZfIGOJ-(JTed77YzYfy_Yx%a_Pw=#Ek0zU=&1N=K{1EjXPq{?wH~& zEx1km>RrQ$e5L&cOLGQIfbUY*iJM!R`%Qll#1idz-J!JXc%W4EhkdpY2aO7LKw&*~ z&ACJDWo()R{E7Yt+TR5&E6bLD^#4BE%RK2nj#t%KH;D5!G|8C+@OCM@GmiVYLqeUmKFzVHsN-f3g9xM#5z!x8p5Eiu7wU4wBl3aWsqo zxBPHgSd-QDJub3y%#xjYjIBlg50iH3Xc8f437+0$^mdY$T_t{cHd$Ht6>G>Yr3zD4 zAH`AqPvZ*rzHd%^c#Efpcnvs|D4%xqagwn~T?Tz|t+)LoSQRp9rgY;(zzA#;tP;bA za?0s@v7#TTsx^x&o7;^?Mad{mPc9ZbOW-4oH|}B&uN4`C50bowRO~IyOH+iw*Eo4y zk8<=EvwjQ`mB*sZgXqr|dA@R#ICHU{guc7O{2?q-CX%WR(U)%h(?aE8mm&Sd#sGr& zdK<~hji&%KkB(bTm@Reu7ZW%#99t$QlPa~UhLgCPG&-+jwhLlKB>eJP%{9rE`TmkI z02%0JxT@GrTt!x+Qeq|{+R)44M)HE`glYMr?{_P-kOZ&gY#-=`z>y@1KepICKHQ@O zWZEw`J1wQqzNq?*tSv3w-JQ-mJv9~5wfgtZCkA@@XX0jN8z(9W39+%;&h@RWt$i`{ zDnGeHcFb*%1q9{u+T0h6QPhH^@}w3Vna#E2C5-|OOxc*1;dp@K_5z+>soLq6vPfb^_Qfvx%M z-fj8uV%PqU`OwnQ;@21k74`eDi<6DH1zjv4ThbjB!{PS%dTsBqx&g&=;9|4SO}`|o zUb=Uz>cxcH!QAy^jEaS$Vcxy+qe;?pa;@4)lG;e5lR&G+q2wg`)VH;w|J z;lXZ#&pW!J&nkiIIeh@jib4xg_CHnwRObc*fM+;pd_$t3%aK*9-$y zy0)&a)y2^1-$Z?^PM!=Zw!+Z-(PVUhh;%C$3>6;~WzU#wM(tX3^CpwGDBnQ2sM8kE z0cxQOj#SLH{}s(DQ$4+&eu4u7y|2cC#cXfjagUATCr$;a>CJow*iR)1n?|;vDe-OJ zruY~7y8-c?-z90iET5K zRZ-z13AePg1RPG*`zG>Km|kK8K`Pu1mj(w15$;h{@5A`^hRPUlx>qS&dePDA2F+;c zOv?sF2n+k7sRMPb%zSTR-)c;foDXW7lZ1DR`rI)4`f+$PRaQFhPM1vRC!qjxa&n-T zoNnx}ZNTbunDrm}V413D0FuO=eaB<}zyRFYQ&zTjx2#Fjbx)@-y&@^3{L{ljH|=L^74*vq{;x8b)^J(*98{GV+z8FSw;pX>8=w)`hSDbsvk6b7(EY1(~cq9-cmxAHeEQz#EXhFL!j zPNLJc;<mGBOZI=?hI!w~BS!+2>pL%r#f7>o33j*{Ejk>($~s z6o{mP{VBjvqjVY1QFhMow+@1#O$u9Xk2q@x3cIFE!*8*@`1hUVAw3dV39Oy(^DlK6E- z0RZ8dYYY3xu%CLMpg{ug&`z!P9ESj*^|uKf_@78BgefqE_P}rTFV_1$rXBP*RiGal z(1lxNfvKePdfbv<^!q~BKZ~)j2P43crudXA`!~G^=%U~`CiNSe$3CIw-32TQVlRS0 z8*dVhdnxMK#s_nW(|GB`%I9^- zzfcyJtWQ8e{lkc3J%acew*MtSir;dPod5nz6eab-rYytU3%ROMR;T3lWCuaK_0xjU zIXR@%{IqMQ%KT>yBRT$7gLkFrW~udt($_x({boJ#ud=1qh9^sh;PdbjL59G?0`+lo76NK>Xuy~##qmSqu%CEf z{tK29!%<5XhJdc?V}NQp^76PhvF3sRRP%FO1fmqhWBkN}QUdosvp$lus7J{)NGq^g z62jOXyr%~dj11C$M63B26F#O<4;Af$ua{LeR3Dbzi*eL&zs( zX3jtr2Mp|C-@4w9_3jHVu^5WivKy3QU9SEJcTUda_=Tc(wZlwoRK+R?t+cX%5)O*) z!=NQ%O%Tgk%@P!U(M*UKMd;2BmE>m!wu5pa$_9UB&&H3fAX5SveE3dW*>o6C;~gs~ zOD<*9oU}|u18$~P<2YOFo}%{7ko`Vez7}agDV~)IE5SqwaC=G$v<65~22PCQSz%!r z+F7l?!_x;;i+GzW_*(QslMtc73SDOkQ#*`t2*B5Gj%=2JcA;{4Eaa^8mr{kQBujUH zGUV)Y>(%ppYBm22)TZGW#v%#nGE?(P2C+-d2A>S zv9SmXJMHq17;XCZhd4bl#K%X)w*vCiLj?)+MC}DHVn;o`Q!3@s11UKhKMQ%LSC=_g ze0Uf-0Sx#D4YC@`q~Xf7cmBlsds8-(D>eQtLWVUUwh*e|;(`l%1`3@`#jXn`mrq}| z$!WNCzX^uJ4}a(4M7(Md<0h#=aZ>-!Qe25ajo+hhK-*}I{W7Tk@j@hPUJdm2&R$J) z*VhYH=m>jF?{#)c0=2LW`J2tNg#~D;G9fwn{oUjiDkjk=dZeRlAyu&!KokVN^m;y_ z(rMeF0_w;Stv4~Wje~(&nOvZWfkFLg6$fQ5msQT;|4CCA$-l6$u-WJ4iS(RqHrEmQ zp1)#^>N8C}BD&2v2U>qkeC_@==gk$k&>k|L8=ptW_}(BagaDQZM5(Dh!VTyG351MN zRG2t?wn|e~M6NZRohxNu|K#xL4th>#7e3H%xu*=~VkM=GV|R`8gke zkPjom!p@G5lLTEDgFE_$hW5A3-&lCI@sQcJv!{)XjgeZW zUefBSag{Dhw5;F_F=y!(B2lB4wXq8l!a2zWn)+t@z)EM7D?at_CL3rSl zXGR7B&{#Y8u#zbBGSe&W-^j;Di`8Lk7r_`a*~*dD-pv}7MoRlBT1Wf44;kEvIC7-S zfi5di7WA&ALg@c>4XJthzwrN?`=)1RTFx&%`rMo)iQ3+j82t9x%1bX&jsD9hE$gjw zWgR?vA9dw9NKE9od#)q4R9FFCK503dkCH_lS4)SRn`GHQxvlw7>VFpHqVqVD6w79o z=lp2?-#z1X%lGf6tjk*BfBZO^D=Hfk^c9>8w}kVrA!lCD9-r%o@D3*rAo-hgeZRyZ zOe)9kCa(Pd+ZOKc@7MRbugZKEEGl;Hku_$)O@jVqyLQf6DSnME9KfYpt^UbELVecy z%STu%GL+Dx9QY?Gx7HpIw2p1u8x3lPJjJAwqYj)AZ%Ea%cxaoR}={>jqavJ<##N2H&fNEW| zKN<7S#paZyA~4FQc{TQp2q%6wo4}Dn`7WRUBsuLuAVd2b1B!E?pmHLi`FZUXfItci zYrR>XGsxgHG}cGm=;XKu@yvsrL`DX0$1oEzyyNKj)CPkVYPD2@zS2M|@ESu)Z*DWM zrUHL6qY?q&SG?&M`;RByl`r|!7yU~xJOqWCNhg%V`Ek+3c7xW@6e6?EpTgtk=@?L2 zE`bUl(l)s>OD7)&_2|BQDBByU-cH=d(8AJ zwr+I@!2v++RC7Ui_kLW~g zW^+>|`2b?ztAh6tA1Zaf(%vfDI;WVht_@9bLs=iw`>!BGqRsM?hLgNpM=2*?wo}ha zDt~a(UaG3!gf{oB=nu#!*o@uYcSy;Ez68pTk6FiPa4?$9(K0`-YZfhw=;Ti(BT%&` z-@@O>p(*R-eW4vz5o59bjqD8Y(^>bIOgW?fL-g;q5cn{M1iUc7!Q4g@h@g=8;)0LA zX(l^Ba&8uWV<}YTBTSR)g?ka<$}5v{IiA5auUF6_%6H)|N1OBtJ1>WJ-2xJn!h`?9 zGsyj!c+8Tpm;FQL?gX)Fo?~a?5|>V^#hAvh35ShIrl}}E0#4$$9V?o^Jr5WWQ+MYN zjTxmt7x>sJ;q&43ZyX{Ep|?x_-oSpx_6F3s>r_7B@wu*sYt9S6(-@pFviAYg z&bd%ap?m6vla8#eM3<%s{_Vzul^5yM#%ih4FI&yW%Iy8!YRf;9jdoeW(FBT160CZo z)sq9pQ9i^xJc-tqyGRkU$_yOal~f4HOU5!9zt@7K@^V5d){v=D-xqN#c^>PgUgU_u z{%~+9_Bbsh+T|6ir8CSt6PFJpRQ8eTH9CJ@_ZC?rg|f_=iV`3>-{gB7T!vMkG|ULa zPOPhlStxYAd9re{nJdYbFDQ$p3xWXdt$U*ww_tC~>G|8gV1^GQm`-`yqMqlwwX%u8 zHF=O?BBsvNI`NTBn-R;K*JP{3tDIQ*^bi?xAZJ#dkGW|`-81d+6U>i)4b0XJEd%*3 z!J$MiK?{rEUs7oK^-HES8L@zYeIud|C0(|Kg7uzS>R7!UcmZAH&hXSl8)aopPk{eEgM8@))6*C54%41ZG& zAoL7orlg~0DBqa2dbr=+DEr;7G;3&&ql`O&vx-fGR+kcsRtDZ3^THI-zs=_U95!SE z7YMIe_k>&yjG5FgDMo!Hm-cjW^nwLKLntHPmo?#alAdpF`L@7Hloec>Qj)WJ&WeB2 zH-TYxg+p|9|4S58fg0)lNh|lxAeXD&ymtjjgAqkyR+)gHw@<;CL(1`&C~I^)7?@6T zlVdt`(4NrRyg%+RN9y+UgXYZGHUDZF5idy=ox(KI)5-(Y1ukUjnfC07C52F3ShkKy zCD1xbq_&K^vcsITq-d&Lm}}D@%*O*uM0%8H5ySqO5bfNUJ!V?*td*UEcN`BU0Xpi( z^u2h7nVSRmzv7|Eep`jRFw_JMAA7_GkD`G{Li;qQsbjl?r74; z`+OinrW|OP!i7;X3+~7HX6{lbeLFq|fbg;3tCH}&rfULu#HsgA&q_Ma{`V_*W~amS zBK4Pvd~Rtv%yuS2oS`oRr!atyCm*}SKkT_(&hAXO4J_a02KWsMe%{>1&A4u{2&gx* zwNNDQ*G&8$c4O%Qhq{FxN8`EPO3gbV|52xT-AtjWJ*qZ)*@PAZ z5ff`^Y!p7xq>q80dxl6FYb(-3uW#@rP@_Q@{M7FO*} z)6>xf1qUOF`}#iApARYRIhypCnVF>uy7U{eXXoXShIdz1a-YzFV8=~@&hYnFuj6J zTCyi2|DTIu_vg*INp8>Jr_(7lk~DY#nXtRVUxtAQGEvBrD!Ou9i~Nu7=tvrm5C=ze zv9lR8``l=rPracF;*1Vre@^CPTuOpp(GFDJ_xd|fq7~f+j z@dc%%K;1F}L3m8W;S((JHY`gJ%5)`7BRz=fk6VulrN0kaq858B+Woh^X$eaxnp!VC zd+JYHah~iJl$vZg7AGp}B%3$7J0E55!&pF0o~~p*)t1YGnmF%ZyUB#W^Gua=V~{~=V;>-a&QP?qrd?cPJmD@=%uX;i$kU)1`rAEnWl8EJlnG%4z+v7CVW)T>LNP@q++m_+y zmD{Ln@(UpmoyjN&pDvt1o}{CxHm3e6GUAk=+}<>-K#N$V?51V@%3d|Qr{KpQD?7WQ#xg08)vT4zE%Pwz|)F}Z_bFjee!Ml3N zh8j^2(0qdhCoD3@M$4*Sy%1!}-O?=jm^Sw{IS%DC2}TDvW38il2p*3jL3)u#fqJB) z2Baf%`r!R0`ekiZgXw%!fYVk^fewRwD$Z7F>l`)6!_i)JBMP-Al(digf?x1EE{tpm zx*3}$k({<&Z)e<|&H9i=b}PIWC*SdK=NY%6JpX_@JxpP_-{^WXh+uTenY~^?m~d@; zhrNUGfqch!U0I~ZeMj3EO*AS#KvJ38 zm+XYbbcS(!2eX0ZO(9VSQamBKMrk9os1BM1QhK#_h;l%-;Ygd>5{^u0rS!mQivf>8 zWGOXdIJc)^&Mb6~Dpk;elyMzs&CQyAbO^}DDz!LY0bN@a7pz}Sg1yBjZttV_2o(AUvv|vyG;^&0-D7^d| z#~8DbYqziMW}txi?-B?90tcV|>NJT3HlklN(OlIcUciSao*(tc6WS=2e%>0F$@$~Q z-*E(U(B7b5dIJPR+w8r+q%SFwG1)Er(9p}|j?$Pb0ko}oz)kFv_OVVFMcWsBi8PS_ zWJlk|sSli-8HnOR<45mYHx?#)QA-iyI8qmse}Ym#+CxJJ3yhowPDorfC4TXcWR0p_;2NI?aS)AVE zLVEFnFa%;6P!tbH4B7Dorgruir|K}?H$&fDH0~;1kng`(<{k3PX3nLI*B?Rk&&ooh z=4&+?zYRhMw@gY<@;-mRlR`2T#ORU+H6fM2dRcC3?M8v=!qFs)0DupO`{Zy7nCU}c z!scNge-4~|TD1w<`Bs?;Ein+FFAcwcHQ9N#ilSEmK?UC8=|?1$y`T;hL`{&Rd3Agv@U0`>Oke*TpGAp60;d1OL>oIb7}9YLCYs88Q~po%-OeCM#?SH1PDHUEu0 zFCwTOAo+``xaxhDaDRcP4^3*g6MY+5pmw)URB&mWJ(;bg(Dvch_F?trHlNfVk&;j> zQzJ#7QrcVOTtk4MWmabu3*G9&8W(OUOK)%RXB>lsR;$T1KlY~&;5DO@pIKbZ&t}%_ zf5YH!=gVwzwoD_R#Qf$$gY8*Plt@x(g0SYc$D|7PSZmC7s z##Dj0bT;$K3-9v|WOTE5Sv_}o4(06GNZ+;{tAU5PrPgo0QEf%>-^hBcDaHdqtD}c@ zhy3^73XuVew48BR?~Tr(WUflZCgVTK!V&vbua0x@uPs2xZ9i5%M>^}ccZHV4p#OiZ z!4@)kQJ#6;_Y8=}%jd+!#j!PAjsF=Dwf2Jl-Aaq=Gp(M$dYq?<=AU5qm6q;45NQYv z4JF2uuCZGLnHP_OLb*9MA)y8~)!*L!L~#WpO5`G*+*5H)V!MwuqD)LhzkiQUOgQ~( z{akjpMIf4vGyIraR9p;wfS>&M@gh~3kcf!iV|-mMhCZ6@?aS|MTE534Vvi2|DQa2L zO6k0*$}KJNd}h}ZE54tgg0=bi`RBXSF+G>Ji2tLGa}7!Yi{dz?mhLoVVrA|KZCO4u zH6Lr5&r;VZU-={@17F~3TD}F@a@^8j$%v3PHFqlwlS+I+ij}dLhGfc+`M^?89%@R4 zpx|QdOrQ3Cy>q{uGxyy8|IE3+OeZK5O0YPYfkdh#(nk;|_nXfDPDqf8xGP@?35S!; zN(VaGZ~}Pc{1T~+*_`?O#n4d1VkHX}7C*RhDl&5E-4vUVErvabVaCg6M=l7)Z!^ik zbqzcTT`mf)wErOAQFEp}^X$TPmXD9m(V{PR8BB#wZD_|ANm^J~SW8O_7`-|mc@))k zc+G5ae_ipQf$k*|6lLY)bb|%kVQg$$hzaxde)jC5&W4GSZC(lXCZ}D_A&|&ht{4!v zM6oL83iuqWD`Gof?`arqI3l_h{dryh1~fG_$*A+=G2{q#7Hp<$-%ox_nT%?tUVH{#D1 zbvAD`bxP&W#rN+RoaR&ofR>k+Pu#X&z|UfuQM>|7;}RcEV;E@WMscv1aigg+ht2j?B+rzOsEE;LhX6*I2MJ7Ocq|g+lrHmH5^g zmd(K%46x$#{X4IcY@tRwcis=RbWwMRajt^(IY$r(6v1z(LbO1dYzXG-f1wWYh)D1u zk2T+8$8;}u)AJWT_D0$)6{=sB0UuC@N_se)u}@>a=Lrf(*hxrZ)SmVVs}QYOax$ez zmw(HZy{jM)Xt^B7;*j%rcAr-)m4~F!Xh}lHMb5o}R9SH%;0_NtZ*$*0*6W5&d3m|1 zeS&vtYO40$+_Z&;M@N$g1izen@4+V1UN2?~E}!vvpsQ)^Ua?%{zNZO;nvSa_+y zsw4O_K5>j}gvMPy-Qjjwc2f@k!q-JLr0WeKbNae^gQwaA#Vc;==}4PsJw3gO=(x#~ z)3dW?Mn;YqqwOk{s>VgFyKeU80yY5@EB@V;0gqRH+!u!5^4fK!2kN; z5z!R&lS}ib0g%#DdXt*G5R^K*^%t}*}u&F_Y#BByKqW9rGrDiV&6!6)@19M zwnhlu+S;1J+i3UcJ`K_+6bb=`Kp@OiVFJTECp_=;d5l}d?0!ZM&mtD2D>_}-9`R*3ln?8VG~^-(DoDWrV- zYDH{g6u`tI|1k?T+>9VRPxu+F`m8-_fz7++kpA{oOPXd>F+FYLxlLc+-V}F$P}VUg zJI5ecgj9Q?A+@2F#^s$wisaAx^ zIO{6NT^~56#y@S9^hK7ImNJ=4ZU}muE~=AeGaT?(L_sMFX6BJ;czf-nf`0~+zKVbs z6u4CdZ!<91?Um7yuFrPys^TQ$K}S^^M0N0QtRVEE?@!FL%Ksq}ecPB^YaxmQ0{Qlp z0PXtacZ^2t23yN03JV0GCMs08mQ<1QY-W2nYZI68>BO0000000000 z0000J0001ZY%gtPWNBe9X>DO=Wi~EwZfA_U1yoew`|rC6l}_oFQaYr2kWT4FDUoiF z1_=QvaR6zgTaX?a>4pJB7!c_JhLVuHo8SN3bI)1#f9|?_&04cy?RU?-?|z=|^Zo4i znHX(NC43xe8~_0DRg_=o006o;0HA4Mp@aV!;Xd&L-!MEODtcI0Sc|J#zX5;|P|23e?Es_W_Nbsup z{u3YZncbg=L0L@%!CF9D9E0^de+`Zy|IalR=o*$kujIL}iAJ`-1gP*@Veg4No+5A! zZEbBco1DgnhE`Ah&6H^6p8u6(`+lc%Hgy0#qc*uX>olQ}J%lizh*iPTtiie(l0 zJ2XNMi^dD5Gyk%MW4;2uWv82w>vp-5!|GT98*6AX*FJi}vGUJaiK|UaOj5bb{~R22 z`p+VVhlhDPFF!GU_;;7J@^($X!VsF4)_FNxq0Z)cMX_jDX;$k!Vt{07x9I%aP!t~@ zpLn3LVw*Yn5&%qa$JQgcZ*L~(;}yRLBm9$4<}fXN z;(WEOkB^Um!CXH+P0FWFfGi71``M-AmoHzAj*ft&j0}^PFON>|I#QKcygCEnf&vwv zQ;ihF43`6|ujxA@;iZ3tID#@NBgOI0-GT-!`M9(x_j`Tq{?IZ*g7ids^e-d-{`_gg zVSv`vT)WnBcYDQYSdGUZ-Da)Ela`s3B%9se*N2T6{ug&gulZNVtGhy#6c!R}IijXa zwHNiUeE5EwjxO8$!#ML?>Oah@-w!5#zE}?0UhlIGI5AodY@``5UjJh@nWs`=Un_|m zvV9P1#$j52>L3qe;Bs){c5u4khZ%Ia(~~~QAlj7vk(PMgPlR*?Z;y?@0=!I@yCf_u z4DX>lTZ%WHp}-d|M#e6ZSW3JoJr3xQ4KTU1WM*!@&wONjHdhx%!RsNK#c$o;c0D~} z#*>C>LPzKo!0%3)%o>(4fd!#*QdW%>N$JVB0p!m*_39h$64a~L)&tQjfj;$wGA2C- zTSNHnzTUO1%nIo0cc?n=wTJPq5ryBvmL-|x44ym2Wte#G&Kf%C^~G1cFy+$Q{ur_; zbp2)icb~OJ%yAa|#*XIzV=R#e3j)iK0~$NAW~yn-MIPPzvivihDF;+lI@dKQa$<`U zstVXUIG~3fblmYgd-irMDqi5r-bhWybLx1`)SCMc7ug@K&bJ~{C=-_;0G`5<5jcE5Ph+B`?9V%f+@s*P}F}=;?I`ofaec& z4WP$?3L`^0EgMS6*{Fj$m%v%Tjz82fi#A$h_JOybGImWP_Q# zb3bB=>dplgSGMF*oDX$N7liluS>rN2nu~Yq+d9#AfNsEF@ojsF?;fQ_W@ef?J6D~O zK~)vvo0gWA07f>pegS<-8XC1vh3agM6xCdBdmgLzA~l$-=10p-`^R3R%z#qeozB5h zah;zwK@}V-99cBnRDZVSPG5BcMv`1^`$r@r9^GGVqy4z8Ksvs}xO+>WS(y&1^} z87b=w>|N?@^B-GOQiCAOw+61_@yK6~LI#<Kp5C6SYM}KPV@Q-hAb;i!qT#agg zEK1bvU!s*)wIfp3vF`a+*qtl+J&Mrf&yv zHRpZnVD4Vn+$rKZrF~~4BhtD8iO?q8RcuyOS6-_1j5gz;i0cE~u79`_L<{;I{?;@_ zEwu=8bH|%RCMPH7Yd<9+B|!`Ae#OGdYToKKWFsIZCWa?)-p2lFJ zFrJz?zxyt1v@Y;t-g)OXT;Si>zphoC)gH_{qT1b{YZA)eV>G|Vc2QcyEGpc%c;v7) zeva*y=pKWi@Sb#>d6Y zlv&Brrlq7zzw~slu%OTElMXoBYg!4CuKzuRG>?U+!eoCofapr$w{EwJcJlBDEzt^Njh!AJ(BpC2Ac%99dy1}lszzve&qA3 zPO-?+z3`{N^W<2wISst_305*Gs}G5$u!d9jjwbWl0h_Lm!8y!@J{ zV(Ov}MBnv8Z&>}3b)UvTHkV+%Lc_e0>YKmkb=eBuPVAcly3D+K^`Au??}Pqjjt`H27Q&E?*SVX{eQ>gNlSBLGz2igTI_5?gyvO6CBM*ucn{R({gyV)= z=u%iKuAaW~`m_1fTYpyXy?*y!hi-l!2|G2By)1UC9=Ho{YivB#(2bEY`oARV)_(j$x7Y~ ztmAfFTcy~H(iu<#X4mAae2YAk$JP7eV$j|PEiFqKmrrNnVYVE38OOApMq-ATOy?3q z%-4VCYHa(cW454d%2*9F@O&+0_(xZ*p?x11R}B+S2_I*~ofKPC-JIutO)zz1if~f0 z{O1Rm!}_%3*Se&`Vr3Un1GSc?b#LZB-0hCgPC4 zETP~ei#uC4cHNC6s(VIReMuW0K{zqU6?sZe_51Xfa#?RA2VeT2;W-&t$duwu$vJg2qAq`MMos&Pmc~O%Z_)6rAiO| zxapX@o3$SRZuxaZ%{!@j+jNEw;??1{0>4}QI)&Ec#m3bE?OhF5+NYA{ztnxti6Q%7 zmY8-7wH+;bpDwoxi64lLX&U?BVat!!C7V={Kz87~ zcuLGqbr6L56H%07$S66-IcG*Xf5x^q?B-R4)BEDhi zqm9{$d3xS_ob(rd9xK_D{YZ@5ZnY@2=m%JWcPD=bH=^Up z9#F{G&Nte}g9_%+W}AYwK!<0TP@`BBa-y9)rwoMF(7e(05cN(e=2iZLlTwISR81f8 zxMUQ&&L%B_hsV8t0J@{MV;4l4xhksigTkwpdF{iMIxd|?4JRIB_(dp!vF8tG>f{yR zno;NpC(%QzR)*w=pr-q5mLP?coSzhG-f_4F-@M8o9a1o}K2{ zXjz$YuBPduu|*?F%+eN6S6Ns_22cXK?2)PpJYMGrX+EltB8m^B#C}AJw|mGp__>C) z&ANq5#1ggoQdaM2spwV|J>>@M<9{fH42e7c(=ZTf7$ODQ#Kipu_nTG}==cG0g3~)g zE5O_2XX(46#A|;cMXreLu+`z)^|`V|^JmTu`=a_#gQ;VUIees_PrZ%9XC=cN+J+Po zW@Bl#bQ1;RqRIBwnmm>F#JEh)3bZN^wj>@#ZaCL}=G^BO>-cK^&KYYmtzm zp7^!r%)`6MXcluv_A|x{3@xX??@=44Y+@lI-;sSLcGdONzYR~dPy;hh{xuOe5JLzF zHq94U!{Sb83c|&MwqMCHlT`q}Eo0CqD_Z+xliqnd#D`HnUG>IOScCK_KC!up(IH{% zlsoAU>q#tDbTg)`B|_p;R@172Yi|riGN%SQ#vbD%{L8hZq{4I0bFQHng*i0 z)cJEBqpC%S4{~`Ph3JHv7q&2HJGa4ZGBrPNnr-#M> zalBk605Vjl&Kr|}uk|ymWHVnS(-Qd77)GmKa!csFXy3xhe}vNuUHh48V7y%U0ARxa z!F5*xn(7~+>e}k>*w|p=I@~e!?)J0*qs>B9V9Od*6hnG$;dG}XdOk=3rpy%WkDY0| z5$*~R#fJ}GpT@d)pekjh7XLM3z!#=IMaqxupzV;w>JP-?3%596Gev_@LJY6KKgfMn zkT4J#Thd4dlQ-Y`GfGRwRoC%n>m4N7+>_1c!oZS zjIVol1d7Hn0Sn2wUFM_ISt);Oy~z)Zo= zZw82RAIR56VL_xOd?@OyKO;}jV>Vd;=i(Dqt1b8vDlw%K}WY7*p5;hbdXIZ*_k+L$t6#Fj@cTg0NgaVpXhlw01>Ug`G*3&1+ zSiolvTL%YZ)@LzEiz@+{g@pxUV`CZ-Cv{a-bRb#z@2}k&TRXe{fdO6oA67@{{MOsS z`)5_gj@Ml6pTu({jHau%xsgFUPfZ_W?3Q{F+?zNj8Iiq|C?8@+fB55ONcy(Ktcv#{^_=z@oZO@?8Em= zDWLvQ5fQy=sp@;hSEy6wJ+imA7tJmsxwEQrlAD>EnyPr7`6{HY9Qp{Cx@@h8xzOnQ zxX%Ty=z*57A#tVdj-`xIA@Z9i8)Tc_Yt34-NayIC$kw0#oxkr=jRT}}YxFWqqcEc- z@0LyuszZDiGDotqvQle|a-dL!^Q%`{f7z^N7CexCW~I&6R0c0*_R!R|N|V#_lVs(N8OR$)WtCTf=|t(@p^B)XZHTE_`=;BoKkp z7wOTrg8WIymRR>_G2(g{y2hU1DVo*&{*mu5kFD|Sw{PF}MiV{?{rC|t5|W&rgau&A z0im{JQ6^Q=z9=(2J-q>T_q_`n4c8~Bd%X2~7Q~>_^mD*mEK3PH2n&zeqb39XtB&$h zrQ0iXazs|wDNu0vBp)v9(^~;t^yHIybGbZ@4?~^blA%E~br_c&Uu;{5RvEV!$7#HO z|Ni`7B{!JK{3%h6Oi1uR0^PG`&thU?;04b-b&gL?loILj0g@P&D~GdNjH^hSH>FrH79|7JR?Q!3A2k>;?RUB3ID)^IP1D=nrBxzBaz5`d{;Vd$uoQrPdd&)0o zCgzb|Yy!)clPDU@_uZ7lEW?!sa~1e3U6vc%%!QCzPR-RPaA!obFY9BRyOXI9QQGm= z(_Nhq&1?x@)b|NV$9HfWftSqe!@q<#FA5wm)LMTq+jttvg864qd$6U& z`wg#oXofE9al)AB_~4`Gg>3sA5=I3lo}Jfq;P%<@(bN34MaaHs6Pm)YhB~{UzCGC_u%+phGBZph zETZo)sJH}t`yr*7d}dQMxfBPz>xWocJc}_@tKBz@Vr{we+_sdRojSTjeC#IN{VzB( z`I+>VP{ThaB@o)Q#4LeK{GsB~W108@Y!?8^M~nLGw2_+pVA;N7zI*spGU zQK2AzBgHp0Y$r*(`mzchtCIo3R)JjP`eemjT{)##8Tm06*bzSC@|y_>tpUU8`RC9?Tf8cCg;+ z$0e9(oS@1C7(_H>cq@w&ClL!M9o!N36=Tn-sh#Of5P8eiTHw!qrQ^BvQhb~`tF%3S$os?R=F6fiv~J^jHaO94Wd)uCb-W^j2y$V2kkIVnzSCkY zkl+~#t5%5wW$SCu$q4;0?5ah$^R04PM~~Z$YdKu3~9veg>pMgQU(uK7bWBd3=)noh<-DS zdO&dGjRBCnLd578e@{ixGuadzdQOtxSlTs=D+994(Yu9igsrgm^o(!V*0N*r^@MyI zmg}#TYfW6g!gR3~o`7Gpq`vG_wxh)j8HbIgzQpolDh8Z>=3~Vo=b?;-gRHKqXksL0 z6ldnizdjD+jDvmX?`nOLBm6boAH=139sgO{2_d8)gPT85{(@@7Zn>&mt$J0G zypCwV!!BHGG%w#rr#UgJCj_NTeQo7&~r`bgIKd3J`vh{VNoi3`2-4)jaf$^bmNB~&vGIPmABk) z!)K64cuL_0$U3s5GVmDKyE7|AjPjW+;JlByeo_!Cob)|@vlH~TK*@yK5eFythY2|H|~q#@6H-4r^hp|@#{ z-teRF{9rD2bvz&SV029wX9q}X&c|I}@QnD`j5s{dfc6-pcZDzVdu=I7weE+x@*?=s zm4WT8J~|4drmyeh`%jObQf`lZ?-004*p+$bR03+*(N9glO}@<3_v>dy_k{;Yn48G! zjM>t^o*}J@Rkxtue}Xn*BwBBPafH~QNh^m!D7KU?1Mt&u4lbGBjAW!S@E<&t;vM&u zwiC_kz?q47+qkQWPge0Y=t7>~Kup|_+;dg?&gEus@YR%Vt@MgzIa;XecbC5>>+x8v z0ZH}q9F#l%QQP}p{&_oy-C&}Bnh z=?SVP_rW?iy9Nnd8qNGzDQZ$FMB?R(lfN9biVPd9)Tx#>sQW9snz+!=WLmaV$bX$2 zC(j9IMW@(0CG9PZ7gx(PS&=b!i963C_D|w7J8kQY)KEL4$a$FvKDWo)=SdZ5;(e3k-;mmR z18SMLfbt99nq-9EJ0nJDn?lk$NLHr~y+JapkTbMieL_!Lepb5JvgqYj$7INx>(kbE zY;P)cLah?Mz8kh;KV2 zfBPpJC#U0HbM5zA={S@~{<%F~F}yK>I$)etXKMCrk!7&Acj4T}N&GlLzC z|9rbrn$_~6BHN*9)`#z3pO())`>yM=|LgQr#B!zjsC>49$D-{5Bo`j@y5|xS0e!<{ z`_$>`#oVS%ANqnE{f+`Or5f-fYG~f*h>}|>o%cce0)2JTIpeSaeH=tU$*@!1D6mKgQyM0GyF&<>O%BBw8D}ZYv#)YD?TH~A8P3&kJL?d!;co~HW{knlL*TQ z`p+&A6@PJeYHMqsB)?-_Y_47N5=THe4aJ>@Hatj4NJ?j#n?=K9lY*HL)3Q8iAt(DH zyf?e7Y~KmFHLjVPI*c7L0as}WF%s901+WU8?ahPnpx0W3v)i!?TAPspp>$Bw2o&mUWS{;kEm&!lYRSy^aN zRRUYXI&E`_;DoC7Z6VC|`>kq4X%lp2hYZDvbcVK8>Ua|F_ZK%)TUuJ!wQ|hr-G~u2 z?S}g!uJ+TEKv&9026?1BCm0A-NB;ZVDf>9tM-Ce7GY8}9{TbN#R)*xjbI16KgjC8y z9&!)Sa|w!pW{qFk|Ft(L;<_LiaOM>A0&?znAoY;6O4)63;&M8|fJvt7>eVyNp#W`r2=* zlt5cnR`x~Ax)}U3C&K@8@9H-ru3d)OLTueVar|9bIc6alW*^(J?JX5w-=v`5wb@Z> zky|$0shrY*XL*b3Cum(nmQ4!Sw|aS(rzQwl-sKl&L9w*TB0W$&4sKrFrmSHbfln+& zI&Vw31qB7M!}DA$lUbgn41vUkmiM*pE4WzZ)w6%8W-N{VLR3{_PZeMZTK7+r7aA>g zV<@o)sGMjx9b(HHl{xD((eygOHAE}gRBbjWuoNqAZo>z*Ru9HrbSCn zU%#lhc>IfC^uXH7`>nQ^ganHgD^}nKc=Yu-U)s;0_o1_;{M#_JR8&$L7#P3^t@+Qf zA*Pir-Dg!Bg+~QBzd8hN;EnMXsvjeUw_lW+mR|0f|FD*5m*96=&5^81F14R>5jAgg zv7)S&S0Kov$<2Y}AIdP?ME9;%ns)M>ZoykTx1_H|zo#l`fLWqZ+~7DzKqv0C+gO$B zbj!lVb}t@YojU$zHM*7+`e>noDMw9V%lFO;n+a9z`cYsjD~reZ7Bm{SIfP7^U5w5i z-Mc*sxO8jFvtShgff(Qu>#^?p`3kg)mr02eLq3)@j{vs!M?>`=m^xg%&av{Z!aa2f zwc~X{%JnqqCg>x;f>~jqibw0_xw1N)kZHzjW65VGCEK|Pe`!5$B+~>E1_B`$ggX** zG#;UykK1tY?e%FbNr8rD5hGlIvYP%eSSQ}NV0dSdAfi3KChs3^exLtHSX38ZGgm6z zsjc9fNYv`v2$L$fL9wYXq^*EF1u$xFgAV2X0YPHyxo;-J!JVxl833j`-S!wwbY}RI zD;wDAux7#Iz86WI_0GMb0ZAfr-xZ$wdwkH+Y)94{lLJ5fTDjl|=r1@i(^Ys%7~zkd zx=m^*J%CBOHPmc~^_46Ijk7=M0$UWAbYKL_fr}8)`AsF(sW6@);R~d`XYoh@Mw{6; zB*|Br-2HkNtEc*=Ep5iIBQGkRR#~4%GAaSfrzWST;zEF^AXOrMSGn3C+Y3K8OPaUU zhwr|=xOH5#5rUkdgSGc+C*z&H5dRY5{YYykyL{<@dd%PSg_Sm@u96+7p`+ftA2{Uz z{lH$7j_;+N17EeJQlstBx2|9dGk}kHz1*7h*Z|BS9}KYiUv0FC35hPRa4%t;yU4b4 z*I3*f$SZ&z?d)vo(|t37(t_rwFIyD0=r}N0%3mpF;n1`6+J+spCoCWph}3WkQG&TU zzae68altI3F{e{Bnau&^y^yNWEOMRikDdq)FvEhHx|f;!Q+No9`PD1fs>ABnNVrU^ z#58`u33VxJk4~~0dhx>oi>6)G_)~k8Dv_I1-IZEntGwS|L{A7jWz5Q?jGx>qGlH%d z`<#+g?lutdiJGe${tA92o={X;B`1+Vv6Z=)r53rMja!R0O;Z7?ZyrwHYBI%q{rZxv%Izp2!nol2GNJ`Lso@7Z zg;G4yeNRl66LXq!xR5%7rG=ssxC3wZY079zZ=KzKl_DmX zap)J{Ius6MQDUb|1s5Nf#Be+&|!<9pA|Bw_`10jmszgE{oA)ZISe44x_67B+>7ncLgONw zJQe<1g&2jpziO|wM9~i~=5-b&|Mj^F-z_*s*I69&rNxq{%#ttV!jr7;t#P1H)T^w! z;D@C$x_%KVGuR&gEUY^Kj@}zr>qUR0S{fAndaU+S!mbce-2=*M)K@u#^nT~8Z0Tv! z{}_0!Pf2=k`~AtOaMDqNfbFBx>mUbu_q4zJ7J$OUv9 zwu!EY$~494<47;Qb^7pg(IKA?*c%cu#7|$Cs91}Yi`X07qg2sszkCrx3kYX(6MFi_ z|6N}`|NaCn=pD=lWTpvQ zMJ|{9EiO>dfb*lMKhj3&tskE?6Cp2j8jd?DzS&6BVS}rN=nhw`N(MrSeCIVwaER-4 znZqMe$rQ^B9TV$=xaB`6g69yw6(YSb3gI=g3ZosJsqH8TSAZW~m5kuJYNRTao`a#H zlvV+)v*QMu>(U9WZ@kyt((#O>|0lt@7d9(67Q%Gz5zaf&rwPC66SHLL)ijnECH>+~ zyUJ_HMp6L&yAJn-2%h2jS2=4@T{|9GszN@t*woX@R(eYRqeb2ZZduV~o+L)@?z zp0PV#ZV((yoMz7W>!*ui7;eSLpWV3<0uIqGnFy}^pS-p=V z4({kpch2yRW3DOhrTo~_wvb{;%8AA zQlEm?BJdPyn8stAk)7RcwShAtzfpIbo}R9NOL5}aurkZ7=sZZ^uC=X1wy^3Zf@oaCQV9I{3#*~*N29Pb&DF#i4 z%9q}?qhAf9&xS~gSE3ytvkZAEUxzg-NxWq zlVznpKYu97F!VCXv4%GP6@{)-wI}|JCA1XDUF6M@UFmFy(SA zcD638{iyf-i%+I%-^wat&hUo4+TIy;gnTx(2g6!r9L{4Jy9Eu1afO1s`oth>3}rzb)4( zyJ*W4L~xPE^{zhEA5P$gsTZaTV%_wD(bDKR6zV>Tf ziRKZr;4<9N0DklSmR#q}gGpdbg@Tj7@4>@t`J=3ots1g25j%3||TG}@6k-2yp;qff7lka!Ijjk)w_gDNU)s!IaSKmodT`L${7?0?#O zSt3l85pV6==jcD{TvGZ|*Ct&&TxA8xYdleQL_IZ8!7Chi5l!Y1wI>ycR z`TI*S4k!5N9XADFr1^0rmsXwo0|d+X^ROw!{*a>(5kR!od*^4uGRH12MQ{#lg$4cF zgx~NpS$)*U@_zip$6RW;O@I%kczR?hV0umdagR2t0yaq%(;Kh z=d=yCmoKT#jUCqB`pPH;S);>j1q;!1ZK$ zVRk?*mfCa&#p^-)pC&N%wTw89NEejWJPMIJiNT{S{D2Ny_y*-Sr6w7ivn%ebw0$DKY|GoUDovy1UQjF!quh6pH!E4t8F>&FU(2 zJ==)qYr-;)`NW2NzxVF;0Aq&JerwPon%}PRE{nvSF=*neu0L3IOYqnRk6* zJ$71SK>*yhca{!y^9i_eOMU>6>hAl}^4g=BA`u^;e!sI49h>ny>MGa(PI21j=B+t* zoS0jac-L9Uu3MAKvuhKbQz67*{GA+V<|=W|w*rl3QqakIowPE6uPr}Xoh5O=oE+_xZ9?&HiA$Hf*E$8U+5e?_s0YV`?x z+F8h6xCJ|disecu#H&TY#9YQ0Q#vBbuLBmE1|4ga!>2Io$EnjjpZf5Bk zRk};$Bu1~TSWptJCX@kA6(d4O{<4f23n6ETXV~P~*k+tBh#pFqOShF+WJQFeVv+TU zN6N}s%f0XSc)2(H>oYBrm-|B?a{S^ltmmORgQ9Q5DzaE+(GI;t@tu{5X@q~oxN@6M z-eHlYg7$M#L-*Zw&&rC5A6@RPH@BW5w% z+cFQqFM_OLk(Om#{k{`?iY4|TPCwSikVo$sn+Z2e1Ltvvn7Dm!nE)_YZqVUdzPInr zB-$P(UWb^{cYUHPY7`pBMTC4OnW_up4D`9;)O{kA6Ec`9E^V+>zY+K#;hVM+Wii$#cRL2cDM~T$3<2O# z9Cg|Iqt_@W_CPHnB>!5^kGSXuI?NneJdR@*lff2C31gH1SZrzOo_y8p9Im|m=RgOl zMPr}Of%z$QRkG+yr|P#7tmqWRjPMjn;QPaOcg}fDs&BkJ-8*`vo;mOih@2{X(N_h2 zW*Bta@|T?U4!yI9V#XFVovXZm#v(gN#n=t^kMO5YK?|4Y=fGKv`L|qnC`WQafX$Hg zOlJ8^pM(j|&@FFLk~E!mHEblA=xZ8h+&?)FzlcW^fO4oeyV}Iaw^By*E;s!eVH<-l zGgWMB>WmQK&;i^cQan+M zXo#dx&p6pDb&l%gYgDz@Iqp<(z-oDArPE3380ZB9r9&?N?wsW04A}TcOM{N*zW;o4lnS5} zcKZ1zjRF@F9pL+-9&olN7PRT5qJj;)P*ju_xoZi&xtu!wbFw?TF=hg|x!WaR6VFUP zikRHLz!hcCiVuA2+5vIY+tE-vr*O(7CVT3Y53~G0k4VRJ`mg?{?pH?b4&K9ipho)y z-HgpQIkq{Rmd8=>c3ciusHJg@jgMQ@dOYwpFVYD*TbYoQlA_=-x>&m2qNbs-w7B+= zlSAX?U9KCnaw`1^wS}F0#X2?awn|GZesTCy6JT@|;#sgXs+ycaJbRG{diehnQ8ZXy zXM+b6+Th;XUs%Wj5XHQxX}>iAonBy|WZDR##k%ChlYEl|Itd>Xspt81?N9Ec<0Bkz#jl!0A-0y?;Cf5@m9!k}^d~*Jf%rQ)agkL3 zuamDuG*x2y5W@cHkjLMx!1OONL2uTGX%SfbLG`+dGxg4^wWy=jm z8IVW^e5f%!@CBH>Butpy+cksa%L-y2^M<&+E@ETZ#^+*Rcq>?mi~% zi<-|}UsUf=oUIpK`#CS(z6eu%WL?AQvPr{JUf$YXKfxAD9Cedpcn)hEL=BQ3(SgaQQ(ws6eQ zFcNy6=a504Lc{uPjfhjIZqZok&5KWkJ-!SC)?#0n=SBif%Gw`mTTcG>zXO8RepW4V z5Ls4LQ@e7TiM|Uw%LU;Wb(7|-($tgDh_#SbD7zYv(o^<9zhatq*)-Jg!PN(sN<47X z#>Pgf?iY2%Plb9M`}MYVc5HG)@O{otEVcs19v*c?-3^ZObCu?T&cEtQa{Q4#oz>=2 zarC3qJkAc>_LBfG62mWz2YSUirkF5Dqb~Fma8&>BVX7nkRd4UAD;li;7;BP*G9gL_XnXN*3ql$Ahl_c-u$dSA|9a-H zTI9dB;tJl)m&{5pg?NFku`zBQo@!rfK&eR@Tu$4=e{An5(S~4i54*hD=HDURXiDs#pU+EvKV>Xr6EIGf1haS=JYfwu6p; zOY*nj=j_qE5@v;hI>ekIBY&TMG)jn-BU!(ZQA;#!wqM2IaEERBVK=Ors(xIz%+?TK zjM!5%XgD5|SGe!$MNc@Hqe^D7s*KnTy)?*|gf4p(kDAG0;PNu9Q~tSLl1`@`ceg_i zg}e#;HxX{O73& z$GZ7)M$qb3<}Pl&O-4@;yl?;RBqYz_DafaM=I?f?-CX_>Su>YDlf@pjhBCks%eY-` za~AyC=Enu_5v`XO^gY74Z^}mUH^MT%v1&Az%$d=?HSNryd`bkX+YS!G%Fm(T^7-eb z*vWc@TmD!)JOaOD__O%h-u5!jNfbTiBEF#%OdzQ~13OTZ77S;Pr*Fx)m0~mSFvYmE z(`k2(7Dh|w2_KUQI{>dtO^P6{84L%}S3Ex@?gv(UlVf&V+zQtF_5q}!2>(&A$V-bE z%F*R=C2!4Dq$MP|%i#mDQ+*t|-2M8usxNf%l3JT3N`h~ObP6dLM_t-t*h_LKUD8)(%v!K%0zOZcAq@$Dv>FKtykjZi{{~SoklVXkKjRu z^A@E+cfXSby?j$gIja*kA1*fQjh{&a5B*-2q?JQ?Z@yU8^lQ-V>*Qh?MuX;!J)%Wo zbx#OF5YcBNd6$%X3Vr)BXD*;xfa(y5wIk@>0e|bRyW6vJQmRim*df}ZgG-Y4(pnq& zQ72z*z`jt3q(pTrGe?p(0cOgyZm(m-(t$p{`c<(#nU;xceEVRw8V%!j?oqIG;CS?# z5e>|RJpQ)7Z*G5K=ch`T4)XjAYS!8QxT}>~G-LvFy&o|V;$fLPNZsk^9L_Yw#{@8O z%)hpwEY_%)YmzmBqJoqxUF;XjbH&wpfEth(y~*zcY>?m zY%*!_6SZB=`L;(fTyjBpO6et1ok~Ae#W^K-%w!EDKW|Cwdvrd5{HV^AnRZ>s|9brp zAJ}Wv@suw!m1awS|BqXEqT>!XnI(y?gX&9V2UqsfRNWE`R!NzqdVD6#-`%#(*~CIm z1_RfSFJi7|Zytcxy^-Sd|Gg(+R+~lHThz3~yElbPrivd=@k1p!kI zW0nUv5j;M3s>Bc})+Wsx#0JeQPEd37?lkeV)(mHZBE*qpS=!_{kx6<&YJI@wcMn(Q z8WzJJ^@rji*lz%Us^-2IAmYQKE55qP7^WspFDRTz#un|Dkut~FpD;sp-Z}ag{pnpl zj4v6fcq|V5bZ;pxtvv+_VbrWC`HYNshQAZ_EhBvuLx+4rmUIRCoPmJojG zz2pB8-KtYG$-R`~TZidtyFj#*q*Q=L=fepJQPf`({;s+{dhKM&*D;J{W(9LQkQXyUnAg?;Vk zPV95H?5T;FWPC;2| zxJz*`b|<|1Q0~thbNldA&up!gn0`{wH{O-#iDH-p7L!t!hgJW-7W_1vvKYDWh`W(W zi@MHl7S4Gv$Dj`dk(_EieB>4otWzwKS2r=!P^H+3A(MK=o-*g!qaufm@0}Z2u8Z{K zQuYL7)#Z;{m;P(J)>>ZS{3Z~K36lznqt@;O@Ff>UOxOtkz+;oO%;;E9z4Jwgy?kem z7EqA0fKmtd%KebCAF}zO)-YatCL1LW2^%vZ$9M*#!9S^Kt;?Czd{lmF@0x_7@z{nT}?<3edUi!wK) z|EeyV)?seg$BWkt3WYi^*NL&SM^9{Nj^FkEcR%3pjQzj*xXQ4ox~_c$ z!2zU|ZUK=F1(DKGV1S{dTO=g~hHgPZ35g-31SAIr>FyFKk?wA0=nw(F!~1^UkMGCx z%yoXvIcHz%T6^t#-S^pht+U^U>!gg*@o{k)Iy$F)B7>45yU9$R9I}yg*PmHH7I5#~ zTaeF>h+NN8BO<7<=Y^;9H&Os%lsfPI_+oJ899*;@ls;=i^E|TZO-Wo9+-}|Ist!m< zNZ?RPq`4h3iqg*OQ<((m;P||cZ+#a^yQI!ze+gC6P>1OGwX?Hxmq$mJ>52PQDx6aZ z27Bwg)kA04{h_}yP9EQkz%5uU+R4e%A%z^tu(^1D;dbnvP9#w>g@tiXCy+Ebzdfyo z%X}c_&zShg*5u;eZZkFazJqo&$k_h5!ef{GpDR3YTR@7fW>)q*l;n7%mj(9N%SD+b z*8t?|v9}T{ec*c-rsKtOna^~lQhn!(iWrksKF3G`rm*&+^x;T#*#GPQ@QVoW0`zdDwmv)V*Hxkpm&B`3xf3g;vuBrHqC$Hy0@ zxt$Cjd(#^b04VAHpKg)r6t1A7XLGZBy~zbhZ6?IJnqY>4X5w zlhcdy{TnZ1h+JjIihMx@=biV1SHdpS+ok!?IbwQ;b9Dd7av(+msh*=|9SJOSn#uoJ zu#AAPe#Q(GLa&v3U;pv;|NCGHibe9Q`upad=Ps-z3cC>e8WK#!$>%d1qN*=ZB9`ILaab)(85 znCIVjBslKhcSl(n!70b+!bR*;gqA?s6Xteo`hd&BSDU{8S(x1zF)#S>OTkc>1Uf$AUUfcQWzKi_j-yo zmU!X&95OQgM;k)`OAM^6#Bx{Wn+eyQg!p*7*{VmpymnU?zcqV5fBxLp*LQGmppmCa za1#eV$Z5GNvZdwe_I#!L?i}r~6(UE+#8Okkr6Zd3DC*cX`_JVI$gwLNzx`wPIjUij zA}l@fl>RO+)6%x+gPF^amnK75ctB&gq{)!8$`}Q&8*;%x-l&D8-eta|qGF^DGAweK zURtD`aeS&LBqW5IGnP%`M*g_Q74H*Xg;-5;&P+9!RE6Vw6RDW5^<~BDQjb%|`r;B^ z!-{V_ae<0yn?sB`w{H>v^_HZBWX>CYGUQMQz*4Q^o2BW%@_jL|&8_Flx;bCUpw^7q zT+!Bb>Eo;X=4L>q75mkDv2YwAWQggt_4o@H2aXPx{PwN=>%1e$phj6D6!qv4Y>jjK zD`9^e2_agMKi<-m+xOi%>Gjjfcc;AMm3TQOoMP~x-yPnjCJ%P~@e{LM*dTLBW1)P8 zZ8H7~ihM8)k9bkeGFHgCF`(%lg%ojf0D?f5Sq&62N$-Ed>aye8-+>*mmfi;REbP;L zr4^B;=7Z_uC)vs>zC+)m+DF4F#E+R>!ZK3sC(63JlR-C(Z^!RJr3{NpXb2ACT<#wF z^@wY6cPCkx*2jHypH)7CB)pP`hzF-Waqa$imv5>%I^l(f^E&Z9BQ0+m9i)mLjcpjo zQq1fv*1!!Ai4)?yc}gM&nG{mxM|~|AJtyo9erG8PdCQX8cD;2SUy@2jfSv}^saTlic~%A@&uT|KQr=`e!ZL6Q@NYUb=f^Qe!41l zH0iDHMvI1}61;$je+s?8V`dK}jo+K8E&BR&F;66`O|nLS1Mfo8{U>FRZ$1VFd{NBw z{)_lMlYzcW*OfL)6ELjyt8ZE*K=iR_vy@ffrs}B+@LMqcDP{)V{ems;}zI>U*QSY+lU#CBv^$6!_ zcGsS~1McX8zusuZKv>z%x7GZe-STu6#}J-tdymN_tA=Gl&MqXy&OuJ{&cJb^+B)*% z>0LvV*5s0*-e76-Ti0T3t-N2j0WF=sGYxp0Sc5;Axj0$ocEFhEH)gS3ab0^$%)g1; z)|t5ND(<*B3!YG;d7q;|f38b6AW3u{Mq1LW;aGU3DSw&s&Qxb|Li!~ zHLkV6K1E~ta&sN3`@=r87GuewzR~)QUgwFaUX^ps98;kgIwcNbXgX@{bn;c&b%D1L z0w38{uI z+3NbMFel^D8cq8xdK?P%?jg8j1gS1$`9gpFoHxU^0hH@~62!C;wteN2T zQEtk`o}Bt}2&;KLbk+zI6Em0QeV~FHqA;$PS2+87f|V=`w3^bXMrP3qR~1t>CW$)52Gpgl1=H$<6NH(&4C*h`C8@}rES#Q)5o|pV zmdpbTNf$I}TpqsePHxavA zk1$yo2tPaxJ9M`?3+n3IGIDiu@)7&ho%F$j#I5(w$9&8==Ye6)yQ!|2r@>@io+@@@ z73qx1ws0M{l6?Ca*HW9Q#idDk#S;@hwVaWc#}=c<%o$u6iNeL2 zB~;~bmT~tm+7Q;GQ!=2vBOScDKKq~5UbYV^XAft@jivFH^f%`TN>{m7Yr9mRBzx;e z(;<>AqV*9&Q#6#rqlb4Q`>9tHZ6rwKaX_=6sS`zKKs0!Pj0(E)Wo z;`H?G)_nwKd6{CZ-)#EQj}$&M(SXX|I&b$<<@f$&%gEc5%j4p$lWQxGR%4b*8Fmlk z6(b)E88El-y>5DoH}gHvdegH`%2hHHKW+`Wec@I2)=&)fP%`u4G8@9hN8qqaO7UkVwq2CJdAm$qu$+iYn$Mzy$$C*r2_ zi2lBVyJFLqe)v{8UCB}w2*mRctt!^AxPQC<`Ev#>YT5|VJez}xbGOMKWSQyioDEMG z(g5Sj@uuO)%v@TetUsv(lyvu;vn*dxOE-tNCNEwl?SKT}bG{2`Cht^2cwjnRc|psi zw(rTH70zzowgtS(pjcejVcFV)*T^kr@uvgD`eEltp zX(ynb{c-nE;wQYl1A@=M2aJ-Y>$B4Dklf&kOqwr2@pPvTCEvaF;cJJw^Tkm6@KCgd z2J7;r(;`T1ZN`(PEgoE&NFhyh$bV|clTF`<&9UX{Ky8}XWpunYYSMxNkJ!aViqm)GTlHNxVF7f`vbL?!pKUl*d zA}%bgnW;&^H762FLKubHs%6Pf#$x3e>1%;me6fxH)M%V(w z;YQI(EXb$XV?{ize)RUG=znP)w-+^-c+4?nS?}Ey3OhjFH^G%&`7xP&Z?(uSI_$?Nu+A4 ztE-!s?5?gpdb`l_AY6lik+GoBtMRHO5H}Vcu9!pdv9m{^ConM3^6CX#CxVQI=CSV- z!mJb&X9#(7Px(myb4H$uVFB=fBUZ_nRdJS>HnPW`k(DBepuznZ@fjqFj4Qg zn>y+8f^Dev`7LSzy#}jOCQ{OJs(?;JCj^Vd;^N=_BJp9Y(xqF4>Z8`nmj^y|u`qUG zV&V+{liHLNdLVzKu%e=(hafI3Ep0PuiWeu4MI)8~C@3iKPeR+3%+?xW121niG&UBz zhQr}Y@h=o|%_o0Z0B?`CMzgZADoxOlQBnASm{>Ka*9{vygxJ{LVO#nssHogF7FhXD zd*GI(x(()=vE^2SBy>2#>U3}(y}OxQB863lkM>2 z;M(>GWG>=t4NKPgp|uDfB(zWy#e7Nj*qLOvZg|DSebtT!<+xqq*v@O;uCA9n6Ul1T zNZr+)ec(%gWV+FDi3clOf*9;n^1K4cEf&>;VTo*p4pqV`^ejpUilDFz0)KF%6f}#}=Lj zKDR&k3UaZA@|+~a(}EILJ%0^r+&arkBMXfA8JkfBE)vDq8yk|w{TZ8ScSy%;lak*k zBMWhH2n=+6c?)s0vsvQ`1-d?Rk5Mog<^Q5Thtodr!iBdXR-1l$T3Srk@!pRKb#|2m zN?YK9*{A>YWI@nca&d8CXL9cFkptcPH0@7cQhvSi=R0&`{}V-;b`CwC&Mw+HlAt^- zKY`RR+e2r+c(uvwb(sB2bIA=BKJPMXZJL}UJ-jR}a)w?T{$uR{1GgK({}=5qVTag7 zNzRI;a^v`psgH|V7h`X zG>D+CSNrYXjuxJrot00`g>JjOk5HCKC#lX2f=5}OQ8~>QMUETIs(j_78BZ4bCvVWS zuDNl%Fw;{(XPe#AGTf@MwieUq+;C0vjNg$8-6Gc6pnM-EPB2lT}j@=#e> z`S4J%MvItQPc5ah@WfKb2GERm9;)6cUI$OY`QKNhtt-Qq7EOtBEvDhxm1`FqD8#l< zXl67tvo(l$Kz>!DY%)BIm2B&X)F-@)ija7EvG)w(pl-T_wmpxSuA(NqxlJz(Mtu>N z-ps9u>jIlb+CWq!@~og zuU#%)7Zd%`(bm4H61(3FX`udAE+OmAI#$@!4WG~Rg{rA3*<#QWrUtp#$*Ly|8sP0OM|I%>hDJNiJVccxyouh}gSgu?gdHiTI?LIylO`smw)?b?%qDoW zY!=CMD^Ay1OoYtQ7%)tImk&fKQyxnXr&M1{ryPKTo`b(c#SjT7#gC0O+rl}P$AN%= zbjpN&_K8fnxC#jk(khlj8`Wa03Wa88OrGTTVocoj93Pkb#O;e;lDf4rDl&YQKe?-c zRBN24CmYlW`X7f*lXl@1@Fwa9>|OjD;;s!V>lIKByh?MZ-N3a3{`q3t&A{{N*a&E| zQImc>?~M|gJ?+q8l$~dRo$Cbby-v^u`JAvspVYGvyv^m`wFS5>C8)dyg7tp7_67LQ z4cuOS4ZWcT006J~|8oN~|K|pd?gW+B7HIvQRv`rhA#4U}*}-CMZs~wy60`{c1?>U` zXkl#9wgvD0LD>A2r@Fe6?{xok)_!~VcC$HK98W4woNal&Xj;0;wN*6096Rox008KZ zk4aVl0|cPE^#;X2^hBQWAO+xy*C07$oSvRSTT)d5@I#JDL|A%E;nS^QS*%I}kJQM% z-WhhZwWU@;MDnFJWt-TIGf_Y03#Km&A3Z%ieIH59XP7uUKPZhCYX{6uCUC}DSYu8} zSR2ozjzY{_C)p$Bjw!%3f58@h7TF-2XYGDcP_1`|6)NssvUrCK(gu_G^S)U0!Sa`8 zKthWZH#~MFox}|JTKZ&4p$cM2n%>?_(6{R22hOP$o; zKXo*A`f=nU5=V9LGf505-a|AMhX3YPqecCEZAKp`>nV*xQ(3u;U)2D!7B|=f%X$(V z5Jyp0t@Xwh@}ANErhw3h8AUc)wDG<)I`KjTt?_)~>+WQ8uZ>zaa4x;?abnXjtY}Q4^j+(JdGOra{VZgE@S}gE@+3yTSdwaF-Z!Mp zcj5L3KLRb4c=D8ZsxGtcMgTlOx-IZ9wNXE+`ns~sX+%Z~@#pUah!G2)4C<2{{m}C} z-!%LR>`-VN`e3x#UEko4_PL|ofp-Qdgm>5Y`)si;j46>=O4#VdSqU>=qoqmRwP8X$ zUhDp$#F7=e@@A=44O)c^4=FFmbAgdfXiMuaK#`lC$u>=s0cyvMrvplsBxni9e_eW# zF2eg}=rPjtiP7-7LJF+P&O9b#QJ^zWQ4WBtp0(xWCWnme>D6+aajzcoEiZs1ZftFY z?8bv;szcq^e`jC~R5;uwntD{5m`cIZ4FjwzkbcPo15-qR0fQ#9x2ta!`oaBZew{$n zvylP{Ab3&>T-05xt>tmJfSC)tyqfw=mm+|x#|S{t^BLvrti?@J3VFQ`)oH-oewN-i zm})s(jNnDg=e{tGPAyIEeSza#qkBzJ_{m`AdYUec)K^AH)Q0hTN+T(IueK=S0Ew<- z9uTym@N(_YQ&AD|Obe~ByW}h>IWBIF!3t_yVJJ1CXlh}xU{j3*nG5X7nWa&>c|(&S zM;79A{bI|A<1?{i8H)X;YR-tC3JGlVb}A_3JqJVUJ%d{H;OK0;a1OZb{AcOq|goSHqE-=NZLT1J{Mpt_w+|Vqy0O zGC6O+(`Hx#Wi1hH(%MX&W*SV$r}8tJb(*aEjK+wawyn{0WfWyuPW*5Y+Uk~+!#Ky} zWPRc(*jk~rl51?D`)Q{(Kt;|uS7 zC&GN!ksU8GEEyGqflaNfB0uh7ar%tyRl0MT^N~yJO}FtYo3#M}K182x64lV9D7c1ioxP@&B0oz)}%8o@4;#M%_72LL?Oqm?&MV^#@>IMF+@Y~ z52oEj6D=(*D?4295Q-)eoR@Yi5|7}Q8?!0G$dD!1qqF7j80a+Y%lSdqGnu()zG5J) zBzM<&%?G(quykZhVkt|k;v|sR(|>@#VhQffPuge*%=~wuKJIky_Q$z01|&T*YkPF! z4nVy}q+m~`kECl0v-Mu)twV7f{FKo#ERwej?%=sY7aCo7eW(Cw^TPy|vNceM5nHV} z535?<{TVQ{1*ve3=&um2=Jp4gVW+ngb zjxtvY9Y+>}4w6L3umPJWXWuOI1)e_d`tNHM$w*efq@@S{rRyB=NiL`XP8L`gMIc{# zt+)2p*w0E2J>)f4U%NBIUWI!*VFe3aAX!r~o~F^@!5P6hR`WD9)BBBezs;5NA?y=F zmB7Eyi1ROZN~N!F25s6p^%_#D@G9eKvrMLQBlZuHO>K#rC^ai6=$B#6io_V#Cip_Fbk-XP=$sXwC<;dp zfF$_QwtY)#5`P97ou+E%VKGyAp7Q==C%FnDS!$kTV;gR!g86kKR`A#aLy?hyxncNhLAceADU%*a&hsh)(%ZYOX?Is4 zIO=0G=MHd;0_Peia_KK?ySS`;_uCf7(u5KZu^y42c#2z{ovAR!XG4JDt}1%X9@@Yb zL+J^uz$yZ~O=da^)tSq1UR*EN&q&Occ(AI@6Scs* z@bWqIvJ5Dl-+uU1=bZiBb|WP@`O`Sl{p*c>b$3#3R9)WOFLq{!frjXX1&Dy@Ik1FRcTPzux)qJ7B*0V-fd-5E{9@~rvsd3at{1J;F+Dp_kDd1q$Zd`~?3Vq_I{OqOT~?+oskU&* zyEIGsS4#W3l@!VQ*{bF1^*hBL3_@#mBq|@bj6H<>9*@>w!bQlji?84}TIvqn!if@n*o!sd*U zH#}fZpFKm9HTfNg6v|oz)#;ec>s=P8)smO_FIi`?|Ob(S|96{rauaE&o7WVDQ_D$sbT^VKdMmFShjo=(b_VJ@%>9@4qsY$ zS3r1$M=u%l3BjroXiX}Rw*P4y7)0f zddV8Qe@o|@hK32hht|xc=$xv2notPj^?r9k=0a*)7TVoE&v+k2N=t%3MqTbWwH05+ zP%8`E2i`#x7L~jw(2YZpxF9F_ONKUZ_uP6Qt9^IxVX)51{hqZG>e&?(fy{)9kNMmr zb%sl&msdEm+)l>Eto{(*8^t$-Py9;!4>&!8Wgn0T^MbsAUURr7Kb9)#$v& zhVaaL8s=?ENfEYe6n~p48ezTN*RK91Ipr}yN-SJJxB`GiE|sVun^rrGL4L6+D=kdI zb|=(}!`Eu$9JHZa3y)ZWzQASo&Ndo9EDVO)i4Lps~?oZ)f=I+Dd_hwa(tL@NT* zSqtQzMyfq(N?DP+8?k#^U9w08tIM>e*!U;xG8j30r{}DJqkAv)EIElB&^6LSAQyb@F~MON-y{y>Tx;mX zwLKAkX{O96&mF#DgYe8W8N4tg(_JorPmVb8@L0UNU6_(@m^|BD!Ui6~9zL!x3aAcJ`xmg*!mB9A9581VYR|v&KsR};2 z_k}J3&34O`Y@zR#n03vkHDTexsw@w(bG;-f&xeaP7~-v93Bz8#8|Z-gPT@3?w%E;R zv^X6Ho7y~a9YOXeq1q|_KMsy+olz@$+1p~UOMI(ozUxUZ?P+zll2Bk@CD^tX&_T>l z?6;VV0*K^Zm|SUSsF;1n@|6{JgoG4D(LR70JPu|JCnRPHwJE=qX`elt@ihqcT`fRL zu8?o{%wJdR3ZeqaqhV3@T+g6z@G}VKaYok0f$Uj|SYDT4riYfQg}; zM%A02lh%QDY*X?C^<_GW1w|b%h*bynyo1n*wb8`ADSBKKB>an_xILBovwVpwl8P%zgX-)velhMX8(k=-*HAI`GiU)X6MJALsSMR#wKcs~XDN^Rjp}12 zx-1xb_mS|N8?FT`N9JC#=`1P!-JOOp!<-s1HQci6&{SWD_5UqRiPSzVln|>Tu-(y( zys^aZ*kGD5rnRoZ+l4&&jD@M2S3t|*&l5d>85kY{@dkk=AlJZd9{7y863?|RH>sYg zUbsCl7u#oWX83oM>Xve#1Vx8-OJbOyuWUg`(LLt(?&(C>OcKsn&t%oK0y=`<@>4$+ zCU`Wg;wKbVro56P!i$X5uEp-hsrU?)NRxUoxxXhQQ$KFUWxK9Wx|GoPz{n2xr|gt_ zUWl~)?X~D=A2r~^X2)c!cOt?1T9*zhdOm)XHR~ObW5D0ECA$Xcv4>WpzjZyFr%2S zXY76aufBv{kTr>Tt_J+q$qD4t#~atYSRTrPNeLTBS1nS2%0X;8t{u2;>-;@q2WC(& z5Bk(Irm?D{mo{_lMq5R$DFNbII1>$OF53KhJ&8;^TWSnX!luPQrK1I&*RDxL z$n=o!NlJZmHsk#!_|@>>=kAmBrS7}3iP4%=~RPm>vsgBc+b~~r>VLE zzNx-I|C(x7Na|ph6Y5YR`ji$3f%oFiXbDmQxyWD}(G;dC2rbj<4w*+g^v|}&V^{33`l2m{> z9f>;oJwqpg<)phFtKbL!e1pzl*URGHVSle9=@X({noez-%n3F^(nPUaV~v|a1RBRf z-WPjSK!D~4mfu@p*A*B+1k^dMns zTGz#Z@`*<9n0B)j-*a?ahO6Y7xRt8!5N-lX&XwTKBeXYcETxyoKE?Xo9T320z*_e` zT8>^`UMec65HS)roN@lYwR&Dph7#vLNF%QxAY%lnl6Zmwmt7lr=C^v-V<-_J&#I^S zNTzhHmB$V1j-q+Ss~z$vX^}j|2z(hDTBK3ko*N&k16Tfv2!vHJvekI|P0tjJq}Xj} z!?zAZF&!p+kVM$FuWhaw>J`}~>T#*5Y+RMlldNkuS)rG_p3heL`UGpiusKwVY|KMe zq)%Q%HYN;}s5qI9i1$5Qr8HX}yCw~7b@pC|Pa8dT%T~?j$P;+ucH?`GysZ`A&%m`( zy0FX4^0Q7ju$POEN^xSkpAF*V-qG&disqo>0v5fNzzzcx<#His7_q*<4QjLgfGp<* z(`gj^si_ere{@Ry28BMPs|@X+*gAYDw}qgQ?Y{E5>s*NH+8GRvPW#-|_mRbupKQ!# z5i07R(29f52X#uvOAt2>=#*#7)PNWhR08_ zL%iglcYegHNpF}KqR~vDN~O1z*{HNJ4^wQ7aAZ%6GG$hmzF?mWQR0iVa{Xy0SN~>o zG?Lgth4_kgn^t;3TGc8+Z#Zd?u+PC0CCaKDmnvi-1yYX$-$voI!rg&NHpN2af|FzK zQVE!Bath&x+&Yew6eW1x=wZUuMNt3(2b?jRut{D^1$D#KM`vqJF!L$CVCPjy;U7$^8uZXB9IXXSM=O{Yz4uHy-!1EUfJ7Vuw7mdOZ4 z3y4Vc!j!cKbf@$ct2)-+)dRS68^`i=Mex}`O#X_1Ap7Tl7W3;zVl&}uB0)m7nr_!y z`#_zt>T6YOp#}aT_jvbCTdS_~}7Q$l=h^dJ#Wl%@4cSu*+ zjKtE-7|K*NM&@QZ@Y&qnMJDXgUUu(TzV&cfKjuvo0$ghz`8G%;wXlUtC3u!y?dv!_ zQarhx*Hl(3t>vvnfL5?~371Z1(yaKaP;&XR!6vdU_xUjQTNd^lX)$Dr+kum{eT>?S zpAJ$IW1&Gj7OwMs^KNaGpM&pf3bSonf_AJfHNL1okG@i6IYymzOh{LI6DL-pWg#1A6q?AVBmy0x*H{OR8CDz*B@5mOlgy9kB~^~tk#Jy!#_8t zdOF5Wf4qKf1dm z8j^v(`^5N+j1JO&#*A94(F%(qX$XMv`Fx~r(yT!dV+Vdbs`QgmPlr$ZMnSg~e^8Z> z6^-F(OIkS4DKv%XhgwwCV#(;D@1y!aiSN*~G(5k|mMXVMAhsXmRYGimQ)phF=MNMV zAcaMfmzPzEBQ$3G5)%`Dr(M!(v9_PW4fTLm^D9#*Qu4TOE!g0$QBGKvXRyx|`LDMZ z`s;=7J>j(Ss|BA@ek>HLQJ{(HkKCn zTcT>gN)F81=@P8EUo9)z1_tG%PsA8X`feb2pKM^V)#%Zu;uE8vI#n(@X(8_|wTIK% zV|n5~Qbl~=F`TW1k~*|V0|)whmJ?nkkoO91b_v9ppM2qe@TJW_H&NQ`2T3F02^gir z?+H+B{uZN3uPvRu^IUcv94{O9llP6h+}Z}pqQ}mg)lV@?3!!-+)KkfiecTx_hUv{o zBQ^YqrKT{)cEI^GFCqQrJM;zqe)+5|X?f6hij#j~W(NlA^?J^xph2rDlc3bm>n3&NI3%1W=z~)tYSTxEG`EI-8 zyZy6`;l=1cJxgG$iA@+nDS&G5u2Ad$Bu15BFcSdtjY#{<97FJQaPi)uyPoS`krN*0 zRwXN-jrHupS@JEgC# zJy|a~4#{?Dj6s)#G5>dbZ^Y=#M7C(X5?{p#OpzXROugy%NLXTMMmWrga6#=a-5$qb z%>j&_i{?9TBS1_h@uQxQZyWgWL@K1|T{4vl&N-nC_f<8rpSwV~JuQ+VMQ>x_&1iA8 zMQPQfz5q$gy#MAnp%QxF1YV{n-&1FD+u)L|~0sPY?vRv(tqF>`d9Z8_V-j1R7 zrzVl1YOl7X?fUBKurMkg_Db2xU4{S--}|gBFchOxveW_h7TI%IR1m#O{rB<2+(}=Y zgYl2RNbUnfU6`*P!-0WFi-{-aZfZ&KD##%k02J;g%=4(vMK$tNwP0up^lj7 zJ>6>?Vi=rD{lJ&bWx=ThEG85r)UXpKZG?|-zmyOTu47I-F1OX-Yg{xbd3qbR4~o~{ zOi)|#d)Le_U%Rdc7t=T!8_?0csx>gn*10uBpc6&JgkkJKdMr}&!JH?0q#crACW*qV znHqC~OpKx|)+69jFzy|?D7+-v-gKJYj8cqvB1OLO*-&P$a~8jlL#>7B)Z-gDcTSL5 zM7Lh!=L62>lUy%-5Kf?^OCHXqE3LM?P2l)A7LIlWK-?N9K$$11K$&>qqPqh!CAxt^ zdUw;C5on74^l0Phczgl9W@-%8B4U~6Hh^LEhy8WqJYU2TcgOtZKWXU;SOKF$Igv{V zj!M*SS6oLNcd*U;XGSS+^^ZXUS0D`7{uW`Urk=P8nB4vGLr@V^ST|HFw!Yme4?>gc z9<)`q_OB_9oEqda$u4W-hYFA*tI(#BPrv<(({qdK!z;;%+qO{|SsS>LYZr@rA7V)h zIC-5bar967$dj4zEA;iiCw-_JeJ?_UQ-=BQVUDG3NF)$-lXxH%I;ldc$XE~*1dKs< zCCj413cmAMI`Z3=k9yhY^DY(Re>bO*(|aYhnw^t@h(c?*AlTv;ftDz;--vI&KY`?QXU-@kATHLa$Zqi<9V`G&L zc;swsoi;9Gnf_=h9YU|cG2UE_;;BdJ2JT+W^#KQoFT`2)fTsA?dwQNt^6w9=T1r55)T)oUF zt&4nA7hUH>7Il^AR7Xhc+dKpjmOQvg*T*pK^2{ihh-1u}q{oaC6BV3Tu!g|Hn-=wW zf>zmDb@||}n@duhf+?sB1M0>>$_lnE>~0Y4bso=+%eye&m`*mn03kq=<7||2CjTpc?Q5XvJsL0TXkK+(un}E<_nkJwfW1i1+~&YKIX|3n&wO{5 zJU>5wuz9pz%yW#>clhWO+)D2ySGg!LR5|Qy*Q(2@e1t6*sEa5*CcSfy%5Ko^Mc@HD z69t>72gLD~oKO6RVe&xF03Z^39ci*^bfVC}fFrIux)9ep@)o`{f+c<5c!h15yzbu9 z!=tLI3amw&H{vTNi+hLF&am^M4(NzbZ$yMlJFW^nLUoZ4GbRgj1N|5@wp$)y)^^+8 zop=eg{cihBjkcu|h%FjNEAL|}53La?JEWtdBM=zcu1@{r{NaL|gv8j)b_pHL1omI$M zfYe?9fVsjS%E8sc>rc$F_QFB8FJv+m0hIT7@6A&10+hp=ewIPckFSfe8ZB04pwJ>b&bj)a7ORUHy(#Fo}bvEueu4FT2kA zsWVG6^TVIV`%$hoB-RLopzr(gWpr3P{~djK6!D7VXAELY3^~>g?OKw$A=&G=pVB_w z)fle7+b9>C)hR4m*Oo<0sM*kg8SW=4R`fSHNC6<3I5CO)jmG#VF)mvn$WoP?M;{Lw z^&ftrL4hb?av_oKf^74insYLEL%9{huI$6K;dSbbF=jy0>hY(g;EmK!eOv~dD(6dn zDBTu&DNtv>vmF_idr%f-fd=IUwcB2gA&@MfL0Y90Yr!o@$u_QH=b`qdFXY+Ugx;H1 zBOTVChCt|wx61!0RSQ(VMI{;Q%( zlCP+&>=`LY)2_|1m&qLAoqFP99pfTMNT5q8dXt4HQCU(v?o)(>)L28>R*#f+m zVE45ytZpJ%dJcoO~O;%2q zi)r~RF3(>Q|2CI7LcK7JYnN^Y=+3F;W_q-Ha)M}PgSR*?oJ+0M5m!6a5*k6$EWbaQ zL;4!Z_9N2u`?ttvfa|cmeeyPFgy20)O>s87Jp<>2qw5xqpgmFY2j5zE)?Mg52&@-N zp|LAhu+sxZy(Pl|CYZ*2?i(CGAT8u5g-uNU#BM@Cr_{rMm3llq@Fj70)dP!>AbrPV z?8Jr+@QNAaaI!BqK%8yUw+tF`q=&lYMR@ZtcQ2<0v`W$ol$l(>V`m?jxoAis78YHO zwo@46UAB9E14k_Gvf|>(zWlV~sxddGTH)w->ZD{`xpD!x-p4K$#^OCxF5?wIr+Su4 z$*u~c%e_&Iq8!3a)to0ix>8~uDwC#xn*g*XELagIcYf$bC5nao%^TflP5w~QF<3o| z0F|N^`!|x9o79jW2H<|VbW4xzWuTWZ8#@c2`T+z%*x!GB%{RC-N|eE;d>RJPNAUhq zV_M$b7!PZ+{_}Gmm6M}JNf~6N_VgHB@92qCd3i~9J&decbL^hyFqaSAKKyrn?j46J z;^su}>NOjDeRA-YzFl3zUA=k?1pl22R>?@Rie3cmXWmG+bS9#a9YH_0H_L#5>F@LX zQuy`76i@F(;3vHDlQ*zMU0+qih}TkwQ23yQtlJqiWF$EA+b388+R>!?KOXB$4z{1_ z!41x-7xArpU6~q>2!9{K)_MV*ccLgbY!eYfDp(dL>^m~Vg*B00$UTqnsz;$SQQA4= zBSqVN<6hW*2%*1W8>JE2_d7d>f9R_Lv4Qw!j||!6`I9gE>0`V*8F>tB)AJXBnUOUw zxWL2I+rzPj_MUpAc}oXRTwa5SbV_eqc}p;BrY>9j#YVrWOeVaEecW4^)y*}9Q8oC~ zp|6=3ENX0QY^Fvat@}g`F?)QYd^s|s(DgErf$(&-HOKv%$i_@$v@pobI%?D@nFB@Y z6%X$~#nYXJE8GXum&qS4S_%iQ%uH%z?1!CFqo|FqFu&KJAhN;2D6*B2#_GPJXHjlH z!u=hz8&*qB);BJn%)+RJ1*N$UYJ~UNwVehKZvks%XHC({DQlXISlRNbH8!VQ0Texo zCi9@IzERjVMxb;oDfWq^eU-ZReQ6=pt*Q`y+6iKvjdJ#X-m6lrf$m2WJUr{fQ$8oM zMY}b2rO6cE3p7|CL-(w&Q)IHXX>!cZp!>an$o}cYKo%3#@W)bDlYtayVRBiGW0Gxs zuDso3DX(;?&OuQCq}T6|H2sQ6Y=i;%yk-kdz%?IWxSv?*)FN^)&2&`%bg2LQeI2G( zjlxm01T#GqG%p5uxg#3YOuCqh3Q|_V%YK*u!x8~uU%NHt?cO9F;BKMcW?idyJlxTO zz{~Kp2vb_tqj$ryH_ITvk&H~(&CFrp*)8O>6@YIzngkPh#tlgcpMs%}*Y9@k1~f9> z@7RTl{6vOw$`@4MRa+I!0Z@?TXH#L!PGVh*C*#fn45qSNYOqR?Y_trLurA}IjXuoVM>?snv~jf zkJzS_*qNHitwAG8#1KXR({Qq~Rw&2Xf2TfIGm!m`rHhrx4q*Jo*#m-etSO}M7A=Jk zKmtm)VE?R3oS_NEp#`QwIm2z!wQV6biLZ57ciAA3r;=dv{^uNx^z%fv;rXAy*^We+ z98MwV_!xwt{Xs>sJP^z`UDF;=Z5*&_J>OFvjnJ4##Y{z#kxNq`>)(|h{cc_CBIYv` zxM$C1k!+y=z@$B%GIKc&jbcXS+5yZJJD&ROD4qAgvVj+-9hyTMbxOcX%?)JqHY5?X z(V~Te=w3)x5~5yjpFi_NN(VkVpMn*}3@MT6y2lwMJ2TNXy}0pcqh&abD6{5FtwKHz zfL7xlcYmEL{$wsA(`NQd2(#2`v_95o z-%S!cJtQQTnAS%NYq%+zp5s8$Ot`kCbJ3^7=}pz zLqa`@XII@G`&b^1%q7Z-a%k?-4YkA!bq*?rhVw)(KClqB^E)0L2+EpGxrJM<+jX}G zfE61w>TCHaYXw@9U}>@k1pj#58*fGbc{}{`axPwMWLdTJLX%;i&^Z)oV5HpdEclMC zY5#i5*h7r&Q9hW6GURg3A>hmkcTR^U8n_5%_ETjgi0;7xh2T?uFvVWnV4u<;y4!@< z6;%O-XJpXhn;jSFIEjFS2kNSY7T6rHSgV(f7*43kg%%K!wzHgjI~A>{`!iMP+FmY`TV(eZOB^pHIu}70TbvO@#wsoiK}C-8ww) z9X+G-xWKNSAW8CzLmi4#<&nEDPVVl0W~5}OH6uAY*|j@#DF)f8&>gH2b|h5yHR5YJ zm`To~LAy4UD;)W!RhPZ_r1}q$*}6G*S|po$TFP?4-Z7h7Y$KkprT$F~wW?FK46@q# zCw~wRx&)jrhl9omW(=4THOsB%gDe+9!hb?eCDp+);uP7YdFutWUyn&^{;vI99nD5p zgv5c&Vl2fW87aY}7I57MXLm6~w=R=4aHycgSBELW-5BufP};D4P(nbT!a1C1IUzWL zw?#o*tlfph@c_|+CWWdHq3khUyrrFr;a)zUex!{d&*f?t0jbhhm$$}d(`21Cf~V&S zBD%WU3hCB^R(CyhdF}j))&H<^Op!jAeVMYbsTKEsol_G$3FAxP1}7wp)YWZv9P0%T zUA${ys84C#563d%E5Yf_9 zua1BBjpvV*T-p6ZuTh=u8{ZVFof5Pv^7CaM&%P%`Ik-aaSQi}Mj!B{hSoiPpTpsI> z@(cF{<_`GdRC-afd1n;*7au!`wle*{$p0<=Mmso3wVjMN?Iyl!l^q=&2j_ibVn+44 z&(|FYEmr=%K0jT^U95A2PE=&k$#kyx9sQ($n2~D$gCkN2fC?izh@)6Kyt}^5?u7sg zFocBh`0$dMnwkOv67^x_?8$b|!CFhbnDOr3io0FrzGT(R(OOzrU4{?orO`*nPpqUo z6jt9T(dRH<=#y~4i7V06okp6#I-vt#ARWm_O9PDmY$N?Ttt)(zr4_>B0{X_(6s#SH zXZZ>(ueRRKKPpM(BEoS%c6GKa?mj=geqTXov~I!QvnHU^WF#fSaMQ5>xic}Jf#oUe zb+p*Rw~gMTxw$!NK-Vf{%gC8zY3Wa&9pUGwyIS7EwRfi{!=3^)vLolTVDi!-WhWlq z&8wTMcu(6NZ3c5Y^_n$t@(-;&&n2QR!^P{=jt_8vbz3>9eu?Uu+S;G*FVA~P5TudS zrzsg6SYo($g^JFIbS%_WIpJ0~>4mS*H?}t~2@56x435<;!%9>&aflJLSa3g`D(SphC z?$aJd*w|5t3JLUkpe!tHeRWT3X~9vbC(d%zfL{>zh6+?bUzVle!u9Cly9$2iimURwwO^z?7a0IyvF7q~` zm@Ry%gGjZwn3UY-H!Q%>(NVcaIfpU_034{uZtjjUfNw&CW>4 zw(gl5R=WCqXn+3rut|!v!K@w7wWQ1Q^W>ON?I5Ylr>!n9_=GiW4R4QU;_%>ngGHk4 z^r&@q*6aMA#?)rM2;#tF%sN zV4&SYGIqu1b9fXSbxjZ+9{xomzb7RvOGl%0ND$+)+iiKH-j&fDc0|CqFrPt{PPMeM zlIwiSz^3=3BJLN-&C0bwae8fIU|?Y0u92XAZg)=tK22sadX=^6PoOeNi@5c(@nfBm z6KAn3e~vNAtp~U(B`c}XAUN>2@B{iEpJTusUZuwb0N~2}fAKje0001PR`k{;#^wg} z=GF#gCX5XK0Xj)tpvpM?FDDy;a9AYb1a5x2Xo7Ya+-;z)Qn$O)`uzc(eguSV$eV#e zcCJAETe!LpTsOUDFWo;mJY1nnz&uMTOU|}iA74%?$Q4Bd!NIZtZ~y=)QB7@700c?E z03@Ih0C?_o61U)d2)G7+EaWMizH9fP0OW!G>=#(rIC@6b*jSvim5FI@J84svP&rLu zxfSf(5-4j3BWYq}(3#TQ+L8InkeWa!mDE>;;QfYygyPHo5NbY(pKDysTX&sd=tRg@ z-uClN_whH$)qJIvda4XgpFMc|aM5Kakjr8%1YFflPLH++V8OO&NBWpxsG4%0S5rb#R^8^sh;l-E*C&Kp$*(ruX{ARR1 zYiJkxV*wFAgIC}AngI|-m7;%?RAzsyu|+JR_Ba0RD$F?}K^Q-sdCukiD3cN0=Q912 zDyd?c1o#azCh%?2u(8IbYzO_@W~uztVsR)7 zgF`<80lumvDT*4gn&}qCQO)|atd8!viJm38 z>|%oz^KCI9^hM)BnirSn2JM7SxrmZ$wI73yueWpW+04qo{%emG@St3ttMD=o@cKI` zhk}`f4uFG721FsQp?qDxPUkgaq+G$G{(-V^|550#(1SJ2iG2L9@L}3YT00t-)0@kZ zZZL`8(B5=R#CkdpO@;PQ-A?9nHJWh$(z}vT*<=)>KZc)@nbqR0AgeF`YMagzwDv0|Heu*WM)$fTn9BMH2- zJSp*&W26pCR#VYEgy;#GVFvQzaJQgO`yDarjYOiS8O~|!X5x4;;Q!$*yW~FvJK7L#R zmqd5zCqHx_w!tdGv(3SI=+IGNO^>ZpB*?4yau6jYb@lVUq~6hXT1lW#NbVJAi&i7) z4u~4337@fr_0++^lGDTJ`@4VQ!}-9d+%7x|K(1}5;Hs}Ueak0HlK4C6c*Z$* zw6ntp=+pWayZeu)Aaf6AWL=G-=3VI(aI)GH)@vnXkP>n7YssTYvrSZ4SO4p z2s|G=lheI>Zvs!oFlM1gszt=a7}SALu=&Xbo#*1~Yl+w0*i5n;w+2=wgx=IeN`a8e zfx0s2u8(i-hetEldBvB74W;FHa-Eis*pe-y7P_IFL4IevaF^m$p>?&%e4>~wX8ANv zPwt~vjpeuT0XY&i#~B#(T|@>7zzmStb7~y#!3TEfux8{I&pXi1v1JKfxpp}AvxtxK z0hhhv1067`l!31IO;rlSgq|CDLvczE=<$jg;cgyzBoO~RdL7iyWk0c0s`Yw}bGVr0 zfCqFdA{O$hwPCfb&a*RZK%)n0C5aAjZ%3>|7^Ra$f&7b&liu+&kE^JMkG~2_%3!87 zM`Z;dI#JF%GfqfR;jXWxI6yr%iUoUuuGPhKw%Vr21VKivs;rn$>9hw!?B0R4n>@2F z&)pi$H9yI)SA%eS3La|X)&c|@S}G-~+1KMNW7M#r7+rUubOfWbn+0xFsu}_j7@Uul zJ1?Z9wBY03tn!+SV=aONF8Y;%MdA3ARMjgRoo-A!3vk4W82%Dh7JQc}MOPhK>WrRPybry z4iQNe8!dy~W@z&T7W=yf*HrVeLSFU=yjayslqtChu~9KneO%A)fl3-GHq8maAA4^H zjKYtNRDsz+=0l_rRM1~Ei{%X5Y})U>G_0V4A?nL#a(ct=OIfg>-6IjP<$Yj6oF%ze zi_%ePf*je(G`qyCGG0owH!H=OdWVIS(-_TmWgyFXAo!ShlNqXek(Umij$v@p+_s=D zL9>hLW)n#=>Wd0|;>N;vM=~D*dX}g33#zFc`x%(xJy+V}AB^m??`v@$kMU>x)Ysli z^etXo|B1*i55>r zTYGM`hj75O^1;C2?&_Gr_l84Q*r0406$K@djNhe8l_~i_B(rsBvRW`hUC!=#r+Ezh z81+GesO_WtwW)LXJu$z86?;aRUHZ$lm5ixm_U$X_44Q<&iwM^oB*|-ZvWt?O3X|QG z2G$4)@}loJ>$}UXb0N&Ihj>N`f}Lj8#^Ric083`ITHywk!=GncXv!@C=bsS)Oq?DX zB%NB@#kx;FG@11qOt-(j;JVnGJ^gn=U#)E;%yzwzYWLmqq5j*qZ!&RoESlvj-K2H` zz7GQ987ODdf5SHNTnR@<;h<}nNZu`KNFoMCo9kWDK;)Z=sSI%|T`c$faYc=Vf^k-9 z{t5BXofYU%dyF@$aCAE7o%Vk0xQr6Glg?n{b>5lKF!1HJ7)m2hELk}w zF4ca9NL!SD9C5#XmOd=i>+Pxl^Y`WH@{U7jq*yvEXvTmfHCyXmt?>l&?0#*b)<3k^ zcD^4Hwh!qsVj(3GqU*e^22Y&}E3w!KC*jlY3(4{)1_1hhhJlpy^gSQnEID2ZPL!nM z#Ky!>B@I+nR^B-F)h>H8CA`njet4cVU}Iy$omwF`ux>M~+S*d~H4^2wH&Vth#gxq( z5okS_K%5y3Jc^kaj`(U&468!+JhCA$X-lQc^YEJ{luG(fF+v9S+hIQwdKgoa?qUrl zi%DlFkN|e2mqDX z1Fz0Q<;>9HUljIfE|K8afgIY`J&A|*bM)t@LUn@Mk?|r8KPzQwuQuacgjK&GIVD9)Q}b$_ z$l(1eG35Y4l#vU8bI)L=?eTvi$BmA7uOhpa#sU*9S1XaQr`5!s z_#>5DD*!ZaQc{lWp6jwEk>BMVU3=|hwdjp4Eh#`hSz3B*cO~V@r%FO)6csOHZoIC` z*lO*TeID;Gx$aZioM+T0%D0t}z4@p$D?fkm51F2CYz*m%ygXDF%=V-HSD7J=VUS3; zRLJFyQ7@)MYiR2r5-)ePdY~d79D`$Aqq)3bpucRX`GyXO8y#qKe+PvkA^7!~R%$X| z@VEuEiwI8C%5FVoaGIgt2l6^@JT*U@COB>*VrWntov9Er{!VG?Y~#V<#!0-~bbK$c z#pc7CPR&5+ATf=E-7l1V7Ot9MFJFlw=Z|LwTZw&v`Z2P z)}4N6m*i6HbkI&b-rn5INnvuPeC;x>uBmak{T2eGjfCzbYE;Q?t9yy!J#f`Z){DOx zp$L21(V`;nTqHE5@rGNUj^ONVA@rEg%gJ+Wz*F`yzh)h0kJ(!3Q^amwm+>|Pc!!AU z+Y*Nt2c=44)yvi?{$OQmYpbNBq*xvLQlC1m&p#l5l$2CHcOZO7oiSn3(pmEmnkEh= zk+B23xW#NAiBzL)w(GOSAr>-bJCCiNg{UYERp+F~6BFA~mHFF&F0Y|^uC>iqdPC&z zw8kse_k;7Q> z7mObJ-2;cE6^nIm8|7RDxiRakryS$5Dai5P*T%nfVZQ$f5JW=YpVKr9+|Nm#$-cr1 z?~1MF-`%UPBHJgsy*RwRI~@)P2+$C2{nn5FDzMngW8L-f;lS^fV#WSlbJHsZj_sqE zj>gNq53dQFot+=A4}D$sW@2JvPcB;@(>-uKTkkLC_iGo2&QOuxM(lU5^M`rNS!r5S zVm`xr*3Br?z0Y8~V6ZgtvtrPYoQ(13<;N{7LMj@uCb1@DslsmsuNxLWE*a#$pjcny z3jBlx0DA8p5Py9frS|oG{9}`n;d4=-$^4zutRGBG2A-cYJ7k-hnuOdQ1Ik(+c2?R0 zw6wGy9v(1=Sar`vsMT1U98jv(gBEF>OQvu5iY7=r?>$O$T7v!VZ$1c8O*b2?7K=Xu z9CquEVfm`gjmL+r1U~FMqbw#2fIS*>QP-?&F`HHcl1$K0+xuS9+kRI9Zlyedw*xba z!rv7)Xcuw*ed&7jq?3jj8XNAb_+vfmM^`67@txqJBit*#FzASHVk*{vjSs+AH+cWD z!+qYBW&VJ`dUwvYI^m@WUwXdCs4jAlPzElL?2{ghJ6jq$<-0l@UKngmvDdquE{NOt z*?f~5H}W{Cg?W6U2HKQB-e`6xuDl*!n>^c&P5qtQb=@o^X!~n15ed}FQ>LADyOkbP zN%vD%2AgamY+wZq*1nNU(AmaDA?#LyiOM^cu?5LMsqOY~tnuL~3JKeLtneg8>G{q1(*;p?0Mfe^R7h$=iuq(+PHbig|Txfdc)*a|FY?wLG4S?Z1qf|l;00J-|5T}lhH7%93ze>1b?A^-$6&&Nrx%LMH z${Zz~7QjwD4sU(pnoLm4X0kI5;9aLVO<*$|_lcE^!?U((yX>Hyu1FJ54J# z7^*#GNn}a*Uz#5Tx?zC%Ep&;t-LR%9T0OSxcLO3o%seB9+%RX5JDXUP9jO)A6pI^R zhJ3G4I$AQw`m+cJl+7(~c;|+9wNqV@WUnax$a}3$``^4p+)m@aGSycJe0ISPl1wlz zLY;r*;L(L2`pwxxOuI?PPq54D+j5DMT3r|1p^6`Bi_ekKef(G>&XQehr1fabP6#5#UfiI#)*O|E1e-1YO!bnvWgFW3DW}*!7lJ;u?MV zI|18D<+g@Sy1FsDPO^^HXPtdvdhx zE7GG3M~mF$khk2|3xZQ#J(3P@q>g{n72e9)Im4%M*<0g?X7Yz*1r8T{KY$fJU6VlI zXE&Olt@`%2ibzW!BHX!C~pL@V^+8}@h}z4fiq zV{Fk0(J^5Jw$aT!1kV4&=qNHV4Y#~|g>;L9n!4LO)osh|GbHXVfs|bfSAb2=$)q~>Y?x8`SA!(JKjTcN5IWB zH8YI7l~;G%=ntc1j`otE?l#juqcBw9rjOeJY8bunoORuy!ThH?#=9S|=9B}HvyegR zVZ|_VA|uk@6`Fl>X)4xmB;Y;}-u8prg?Lbdum{&+wuoNh7RurDZvxCX4F#V&{?!c9 zgZ#f!9J~5OpT!sn*djzg7&d#Ovpl0=yZ;px_S3)hEBf_LX?*A?v6l;kn%uMF&y}=+ z&I^;0_NJXn>cUT~Hjc&v>ufPTQDtrV! zd?CjOvKcSE$t^jWl~A^%v~2(n#= zmv%7#V9&jPC=kUuC_>dVU9-e}v1=yPcvk4Y~u}g`H)Qyl)m~Z2pyW`JTCbNaQ$`-v0;b&rftK`50Wa7%g|pT z56$G5WIwvJmo4ige^UkzYV&g^>W9qaaDjZbVEcw^@iSnL1%(Pc(edL)0`CT9mIWf@ z5M9yK_Pg$f6D@=E`pa94s#f09GS%vC@>K-1jMIxhZXQX2W8IPGyk>+30Olf zkHyaO^dKuqBw2I1E3QQv`#;9CAQJnsS!epgv45=ZjyqG#A-m{-QLaoryh_Juf^fF!N-{+a)JbLj;t$R-iVmv9vZ$p#Li`h4uy6W=bEqSt%K^|qq zzV4h`%bPo{#-pHQ^M|+5Xrj$}<%BKOtdy#`f6WL1jaBxq@YiC^CPVdfo#j$_Tccg{ zcpmAq4{2p~Gyot7P6Ax)M4t5GPg#*5{XUCAGis0;(J>~^n|DFWaNNg8ioj^CcSH;A zGY03pj5m`D9{?w(qO|v=3qP;I2ea&QcaZ1tyL&f5VilfX*|P8RxTm}fqN`R0(ky%- zJGxFI#ax2H5~#ok7ZTEeo#*$$hS|5vX)m|9xtF50$=jW!p-0+I>mk^nMYuUs810*2 z;(s>5MD^XrT+5`V!I~Lt@Svhtp%oWhFE=_9HhMlz@(07W4$Rcbc^Qi_Y1BlQhqQhW zDaKS#fJ{{H{4mRIR9z2+=r^}s$l2`nr%O1Y^nolo&>h5e{{?8>V$Y-EY^GQ zk@SWnP?6XxuhDpSOWmC9&naguG0}_L3TTR^KiKQXtZZ`AKoBJWdt|v6bzEkte}##x zyY}m?r|_(e{}tFOV%J&JEoKLZ5p-dZ$+@BfY2f^Fz33{?4w$X6X}_CjQ!0ROlS51r zBQQX0mnYkmPb6|p`n4thpTg2*xtLD^v7QA)P8I5yoS#2ge5@GxAk5ejK6w3 zNSupO_ULF3eGnL1Dq7R{?r)s*95U;Mx5I!Hg_r+u{{8z$9MSE0&=TBGjSu7GYWaKZ@hdM_`p{`xsdL~cgXLgUI3G6vCt%dJiLL&Ix+ z{?zTL-|FC08Eh^rZXPmal1?IC;pWE1__KnpxPTWkr?sVI#ok)pC~i^7zQ_O=CI`Sp zeyZTY5D*adNDEY-ICXV>o!k57tS3q6;m&b**>%~QF~M^2#(BQR#ssv03~j{zw42jx zoxN#cd7@>XVnp#cIWGMwkYHJ>)R=-P~?a-b$-;E~zdg?@y50go>2YsF|l*2@AV!Ti&0wN+B zm1VUyYwO*lXvv51XIQVFTy3m!rncB2TYY`ZfZLm2`KYor;iZSUxQ57+*Q> z8}`~aL0ZYYKH#9oJ=idr|NE=o19v@V;@n;iaXet*@`28WL0| z)6bsX1z-EV{otJPeY|(2prE*|Mzh!RZ@zXeLGdt|zqQ3Y>A4ix%CY77US_vj^P%GD zu9`<$@^F>{8^bROvJ&HlR-g?)RYegM6@4ajv@*Ty)oi>T))z;|6dz_YUlSA*#G+ds z?K5;UJ(ZM{WU=3$&525;KQ=bz@Q8RBMZ(R<$vHMKP?Vj$+8aZ|Ot`z9pm-T?3Sg%f zS@G+Rij&>C9}{9fGjEVudH&qyOD%SMM&YNQ3Y&DOcY-Vn;XM_;3dv7*syD9nx+b=3 zbSKM2j*G>8b8oQ$vHs7z^Ah2N*SEJ8wgY!(Rf=84$MFoRgu*pfa|9@5-l5{uDLi&d zK^R2n7#Q>O^WI)wbn@SvmVe*I#>OT;ywOeQdM_lTFP|YKz^B$JMoUd8S#>_E*JT!w z#PfC`rtEDpvlXXtgMgz~&T#f9l|e@74+S2w!mp=9v{#-S_t=2pR(Y|4utA;aHr^`& z{rRQX?&?{yiO=z6N4t$G?_LW5fu;o9ppf3%xv)Ewi8$N;W^Y*$yXi_mQB+BL@uY|T zP)I7$0`U2cOX(zwUz(5CQY_v#S9SK{h$0L-Ss&H28d6=}hBw9IvLwy)Yft>zQZ9kE z{h*|@ch{1@axSR}Qv})Du3eIQq)&0i+xU|rS{^7Ssy}^h8iI4?shytE5;TAzO2t=2~V6r7Ir=nDyf(Cyv@g)xPU;ZX> zD|X=vM}6limZ>!2{o9+fcbGzuI-Z^Z>~zQ~+?MS1_{eBmzLK3d;z-Fqk+OenyE-DT zL9&pK&^eL)K59)H_>$4?X4t(8%%O6v1OTykGN--z2Uty7$q&UxPR_t>azCBWOCmvT zp;)2&y{K=p=&$hqv;I}OBQ4?hIiO@k&NAA~iMWRM3&cgo0i=fc3u^Q5^Y!MRgM6xw z`glMZ5duQegqhn)Rt#10auB44`rkI1vJ)Cj!qm}Ci$k6w9|BwmCbAN%pkDir!Dg)% z%(=2pcH_#$$vQFXwH_0wRzZq`x1Fbflf+X?5grhLKyOG(E5~HF*z_`(awcqXhr2Hz;fCY2}1R_V70zs{D7+LTwG`F)a z`2g1qi7Kht$CA0Zxc6eV-1mAoZ35RSng}KVylq4YXe~) z5^&JL%}6jd87|mlY82COFa6V|@x~C%*Q1GITo7THlV$19+I#*&fPkv=eQ!frW!XbK zHGX|}1};$dcKS;G;^-Z`rpwl(1JxFDgW4PTvJh7rxLNQ^V#ft0ZPIvL?QKSCLAzo= z4JU1j_ZxUU?zG1?uG9n3Z{khYS_Z^IhmFe89e7h#qIMD=#mo?ZTF|}CtgA`M>mIue z$x#jZ;V=FQA>5k!4=YaTtNr2t6WtaYI6zqqS{Zs{(qseT3-hrY0)X5%LX>6)_5a!n zaLB`xQYvStm#R0F-SZX|D8+*KSzTS|lIe;0v>#DY5k3Aje699&yC$t*-oAXbl_;J? zz3i6%`(w*pwZXWNZj!1wyUtc3amrSK4)xZ!Vx$I9;e5)$JKzi#0bz42 zn@3N@azD>RU3)Fki`$ub!||X+bjXRKo#tiX$FWpqJrXPJv+F`8+iS;I#9Zg84tDM0 zvOShbl0R~nWWddD?j0OAfAjS1#f}8tpJ1SWQBeu1{r5o&hint1{K2RX@g%SRnz#X9 z{9#sGEzSF3E`(H|D%xPE=4SDLNy~>nq<18M0kj+irER@VQe@>K0iET;$;r|fmrIbL z<9qHBk5kzf9P_8v9f&a2+wY|Q$p;K>VVWuVw=S)v`}zVya|IPqkFkmprJiA=J%Mh+ zT`*!mV~qsj*VqmDHD1kPQObznTbaB5!$ke8e4mWLuLU-Jb%<ch|8E)JjUr8`Q%9BIzmoW*Wll~j=KB>##NBAns zN)sn{;&}b|Xr$Nq_f^TD4=vcU+FMd(qJgidsoCg2`?B}v3@GJd@||8kv$)WSTW8~ zmme${^c9+@)C2m`+#aV#6f0m4EB#!hRq2FwE}YBHx%G$8%Dgm;&%8?W^yvgz{jxn!R4djz;`T{qNk^Xjl`U^`IL25M^vi)U-Ls7;7IzwLiRmiy5B3cy51 zLQ;5T@UuDpo>F<9Z zDju7dSaVg;#hGHA$$EV;Z`XQtf&uHbYki=LaXVuf@o`%@n4m0vi*(txR<56pcPed8 zUcESaT$uQ%tHk`$Z?FMK3tz+aFVU&BUHGNUOvt8J>D2x8h3CbdyTf&yc8QA!D@YTw zmCoVPfi^0k4U5UDmh@lFs>lfK6(&8&53h+Y9KZKZ@J93bYEni;KoIPixbW^2rfQV9-~J)oEt)lZ zycuWb$mnnab!K-vR8&DBa`a=<=7DFv4nNf^8X7UyBnvaM^T*h9epmfEd!zrXTjL~K zu)Q0Lm2Y5mSc=(;F?CBxUd_~O7g|l)z0>s5MF2McQc}Kt%}g1Xlbbun!c54- z&8?oL^zqHN2i@$^kDw432bH0uq$KA(6}z45XOpU-L=Qp1B}F=ii1kch+VG7I+eGa? zt1YwbR;KM8HTmsi0ms>vhC+e4RLi$*TLgGS0BO|wpVWa!NJuk0DtU|vh4TXK`uZn- zr6}INiWL^Vvd9&NY-pifANM-LWO1XC8t{13yt88N7rtJo1N=UJCmN@bljmtSc(-lOI^ySjm{6 zItwsP@GnvLzHG0qe(|U1>9#!_$DyfkeeiyL;$8cl+I8nggF-#K%BF@|Ig8&9y}%zw zb{HiNRE`cLhldPMAUh+O%JUcr}wQH$QYTi@%H8Y4#^l;hVjFobLE#kY+ zVypHkLXRX$ojb{j&)Ae2WD~_O56wjdf_3I`Coi{OJ1IIpZcgF=!q3a?_E{-|@u_gHHUK zeUS$Kz*t2}T9@6dEH#KNjl7V=W&HiF1g@=lYSrQ)m+yq0IETRAFDeoppB$f_?!7%m zdvjo0tqmeufWN;7;9BY=#k+xuP=^X zRTa3sJk)so{F%@d<$YRgEMBv|u=NZ(VfbXK?8Y+hW8yEJJ>P!U$A{ALa{KesBEb@s ztSQ5#m}L>NaJRjB8OXh-Adtt-(0w_eTCK;4Xl$B&HH6R|k1BL7_z2Y954UkJu|I{&EOkH(+XTj@OOgQQ-IpR$l*BaB)8$McX8Qk z8ikFnUAm?7%hl$1+$u{8T<4n%jIhzHr8Sxu8N@aqadP{TOsCQ*RELg$y!4}fy1E=$ zRMeTfmAL?@gABWcAM&pctOcE!3G7=NtTZ!;F=8QKNNR-5|3oD{KjUaN5`d$6n96;$ zj85jW9Zj7wPfAID2uFwCii)&-9qW!%c$(6q#HG?jnt5};>`r`uy&=w6=2FLzk=BiBN%)C;W z*K^CUNCRxhhaIP97&Ez=)0*ljq~vyVI^_WZAy#{ZQc0{XQG36eX(P@oJNQ)*f^-AT zfIyr|W|lku?2@{y0GzQITQ6^e*)LjXujK&tH@Y;G_EDf%UbG#UcJF&FiDcNZS#FSy zce_<1PzY}i-AOzgo?iAfVF%OE5%kKIZz61B|C*8IKSANQR4;gGY0^1m_UnPtH)k2X z6Z$G2L0W)IiHNXI)DY>Clh=_|he1j?nMQp-WD7f6S7;jyvf50hJ{7tZ6JgKU8%O&I zJNQRzeTXs=L9j+c<82dQ5%#uY9<^UN2{0_Dq9j(i*bc11zjuF`BMWg7>ojTQqfLB3 z=2cocJEc{BBBz&NYdO&h&=J|=hiv*WP^U&ksw)>g0}P`nDT(={>5=MKU2~BX!Y+PB zMiA~YdCG1>-U7t-Q0N!zF*HaiMtJllodl}q{9C?4%PAW^wNO(8xTrte5I*^9t5rb# z*3xA=DbEs=vQGS9`I|PKHZ30R#Cff>kBXny%G{;t0OIGR%E`Uzj0EJ2cG^j*l9Osw zfnL7)6?B5;Dqq<|`Ka2Q$5NR4--;!xMZbLgFkg4{Eb@c${vkyP2^|qVi2947fa{a& zjO&5K)1_|@BCb2V5rK}TGTV{8rXWva#6Jc{io*b~$NGjn-WbgEEYXVj!|%;=DP!)?^~0FP|Tx95Th%^yJ zi0H!4XP3h-l0GqifI&HuS#%Vp@7Ki7Pvf%1nvf?PEw#@`u|H6z0EUL33D_A+vVvV` zz>D`_$Wv3zv^^ZVT0=Gq9&K{5WG>@Mq0Cb|m1T`Z15oe~{2_5TBlkJxfn_+`fk1P7 z(T@2h0uz;c{{;xvpgwk53zjNEFGD8-GKX<+Fq31bmUzBMH@v}qmiVTc^gm`)5xq=- zs89vta0;s{1W%}$A(TK8z{*j;$~(+soK;QiLeH{v#;CnPKws1!5vet70aoU0LyzkD zOcO)h`uvPxP|&FK5<&0T=<%B(Kzl+~Ns2IagXB6rt<0MW2bCs^qmFQq-d}Y+xd(Zl z-)gXAu$Om3r0rkFnId{AwE7x5He(@+{fU{@`&heQnrKwF@44sw6MWw%JS~$X1%vKU z0gaKpatJM{A$fA6=?)W^>c3S%+6a)$h=oT53r<*LoK)b`_@8hO$qI55goQq&QzyMb z&E|xNw1S=~o)2Cu&nH|V@MqfXcY1*zXhslPa=21f286NVGQo1fl);8LWPowjPw6OgEFP>Gt}Z zUr+&*u5<>!7Zo*oFXOsy`j^HC(?hovAa$>hkOHzhKK8+$I<^}tm-&&asithf-x>kF z3yzEuWjc;wZ^(7p`S|M9%Xxz;6ZJuz;feD@T8IEHg1@Mr6AYg9{E$tXnK%|Z@V@4yFQ5VRL1ms z6D@Ut zpNoprcw+V>KhTI|CDyqbf`f8LdHCsoAr#5;bULSJByXOzU<)7v5xuquQZsJbV(8*8 zJiZ7ydiNAxS{r&hApsuT&a0;`=ZuM<#WH9;eKK1xNEG zBXfAVA+iXAj;1iP?X%u*ruP|Jdn4J)m*V2QbAKr^ue$K@fH{8KA3MUD=wD% zF&fgfdUSL&Z`bI3bGB_=gF(;xpl_O_kR0+C0?%?$9yO=H!h!wyz?9L!nOqWx6F&Lm zJ-+v!lH~#o$udbJ?b`nL8#H}cd7ZAJ74l?dWg8D$ZgUmV=O!l3HgxP-P7nCyd`Y}5 zDm7hQ56oX}IMPXG-2rV%{8M`M#sRY=t2XmD`B{rsmM$r1o)i$Lo_468O2I;>oim4!JewRIBB~1~ijJ*6$9ZlvBmX?LEtdWmz?wiC*K1@$f6A=>n z-0s)%^77*1;u;wl$@x-xj}~*06_h7XKreA~kid}v5OX{GV-cGh-mntmK40mQjY?p7 z`Pn_Ry*nTwXvZb@7Gp*CrQC~rHAa}UNE?BHdx2`g`^o(ypF_4MjH|A$4#Xi0=XTkf zAy6!_AITcyZum)Q9zWOF6=#)X*m0rdW9T4$u?6UtZ93HJ9gP2nIWm$2noqVbE?la$o9!NjevHnH z{w-XW*gi*QhMCh{aV(Mn!?Xkr)25vQ!VC>r9j}Q_XI=jC1`m2TzyD(*yg6OHgGSZ= zwgXJ+%jt1#W;9<=DLais{=fL)qt9vnhj_>E;qIEP#C^MOUD2oUeBM@yY-_CRc^;## z=G2Vx2=B!^IyuIqqm%<&c;4D)&GyB6y7xf~Jm#H(53(&orc{AxC06(U+|J`_Dcf=2 zIKdE6Lqkd`&>92l4h_oxV^QbDxW!98r>!PRD93h@+xJ=tfU?8&$v z2D3Wv(;wWFQ??GdFZ>^SuQZkypQ;;lUzRZeqrI?k#?5hlp8r9&r(`T|2GqpyX5 zl|4>lv&&^-xeQwYwV1N8i?wrLA@F})x5?7J`2X!3w5+~3!An=jQ_@wImn)ilxa@hv zgQ=*fBtM9h4u|d#$_K~r4TZ#^Df<9z1k5cAXSwza&em^q3>Ng>KT;#QG5_DM)J#k` zJ+0Kd*MblmC9Fo&+0L1>#qxmK}8ZYT2tZ)=T& zB2@VkmeobP?f29WB(WpY$fO14|DFl(LUV?buCA__b?c7)q;Pp&9)J@qPWlxZ8XA|y zpEM2=l<|!2^G~Cx*a5?$zszk{m$NOLmmI0npua1Q38 z@uYKokPaN_2p-akJTC2No$rp4MAF>i4+7ETJQ%WH310 zo+DSW8vrZ*VT;xdzT`?= zDfLK(pZ^4P!@e{-l42k{GYU*@E95i(!6Wv966P@swUr z4P2zxOfm9vA4@9aKR4|-XcRiD?gg8amTT&{1fgw?b=}?MPTR)xeXIgn7RK2dY~|=o-6n^$wI$=M<1eMi8CGad z@3E9vkAYbhPUR0@X)sIrh-t2)zM+NokZ+B$LhjR)?{$}Sx05)~_{$1wW7CD8c1upq z70d87C1ss0fB3}NvD{M!g0jC{fNI{Lxh6AL;&F_enGc9sA>l<5+Y@&lsL@qduVVcz z#m>filqgMclT~QGNE=jg*A`-k)~tpG=+0$@(S=vvHa^TYOu0VO5c0HoE{WLQ44Psm z_%!TkJ8n;cd_xDppsX#rXJ%F6EWtWzc`zTmQOT-I{p&}m7QQ*DIzw@s@kOMk6`wko zP51+a?}XE*yHzzC=c?~Y>!@KQ1(J}Y^vDxL;DCB*d3R3n3XBkc!_0FV(bz+9aCHC5 z=@o4k_Q9&UJaS7Do>GSVta&C0ea}_c^-C}S1BfOc{2wQgdoAd1EIQ{_eVC|r9p1~5 z@FyQIv>A$u*dsUhjoCB~eWVK9WB8P#liPL8v8V+QvxDLWjK2RwI2Ijr9NJXZXfzZf z6|jF{kvkEy3?DL1IT_|5+AEgEh_Ra{psNPF68sg8Wj@ftiRBE^ge|&QJswbtx6O37 z7x}N@gSU4P)s*5Z{MiSA7G4^k<6(Ekk{Fz9P}W7OpFG%vdSSQ7`!#~jVc5$^K!@xG z>ZN6~BwlG~3gKZAHPIp4_(v@BLNm*>uK_oRfNk&~wULTw(xljfep9V^C);hch(#q1 zjFq9sI|kz9`#1Wqpl zJ@R0n`69Hax=^?7^n}gChNT=Z_INkzDH;%JC_T)&~s2FZbsi8P^~snY5(Qs#RFXW;rbtd+TG>pxsLmvBn@h_Uy+0{2@u>e zZ>3O%D~p6GS@ZV1yh)!LV~0XLXfbv%00HvwXbU>Y2xv>1M-yLB9YQ08U!#b~O7eRv z0iF5xWb~*W5?4?#cL3}GJx0xM1tW*}tS3`7_L)^`O{l2r5Rs4~&63`XRfpyFWa)Ci zrA`SPcm@@Y2fbXnwj5F*^`n}cn_so_b z4ZtuENQT?qMMY_!nJuG{W1AN#75x6b*-h>e3M41Je67#Voj6!&Mx0S>J8NH#fD5U6 zgM@^w3r2Iwvo#a?vE74mo_rgR_%b%rNO;8b6j&WnNtdf}=5$<8_Gcvs}zl+M<6axhP=P0yIo;D=m#DdU13!qL__zV>8fQ4zLW`a$UEUqTntWLK3ts(OGJwlxj zXcec*+@D$&*^ykvW&+sggoq+ME(C8UT!vW2E}ruwzNz6_s-Z7-)-=4gh9Bd$RO(Iq5R58QDNCB5EmoYd zHDq*>j=aOhhe34kTFLWxRxwAyFdsMV1%kh=X_Doi^y9lGWBz=pj2hf{&b>8SP?&>;3@JMq2^Z;-#uw{5U&)O}6&K zWYU=2!qx#8*F)SwiA8UmQ!UPl%KM?q0h}SGc6k^%oCW3&I4khHEbe8PJX@oMpkN^Q zGl7O%toMZk5B7&7Jh6wpjqY13kgG?tYP9J-z^2yY$%?Ga8w>!wbIbn!{`oQ?1LF!! zY;pm&l@-6cJFjZ({oUQv=;)(O)W@{=_|CID(J<1v0dBsXs}1{ts1fd5HJ~l!n0JrI zqOUf{LuZ zDn*kQ*Ri>|xf=T3>kIXcpjK(UT=JBPeCfX08QSxBan<5|oBZ&m_d8SnGZ4Z6lrJGY zOYBTSL&G&+W({iuYKz_({M=tILcn~5x(rWvzn)m40}8CSt+gqG=J>GK{}n(Q#VK)$ zbsBBKx+i`FMmHWd+}aI1T=eB-{0!&Or!$}~p$;8o( zM&ZHm@bF?|W8>eOdGg1l2Ba5Rsei(nI4&7&fwAH-1BR4+;!T$uuli|gs%2R`#>3Jj zxLIyMZP3r7|H3Z^-BJUMpxCAvF%{tQthLR6BETYkYk4tGtDZOv`=4Whm zZ)APEQ~kDmAn(wj|Mh&8desEO`3PLM5>#wEJ3G9N8|9i`)sf$572gh6&y(Ij>v@7? zQg+aQx>_j3-$q9~S}$zpxniz+8_x#|ddnq2-FiXAMWfEhzBWu$h~IzE;-cd=5a(%E z*c-~E=Y)h$%s4taDo9I<84<_L!s3DNEWq2H6mX9PF&yc<4t+bMkhw`aslC=ZJo%Vb zH0PART9#5z@U(^r{oX68k|jdPo+3vW-t~ZD$4;CdeB&!4Bhy!C@!|UV+Ge3#`StUQ z39JSu4l{OiBJ=qK^c0ftYXpE;x4_{zcNR_Yka;4tbOx=WMxs^do)@$3zxD#;?Pa*q zRi%(}AP@heq=aH(z6#8rw5-=v;3=H6yvcgdRZ&wrJ1fki#p?sP_43RzzMWOinq3Dw zaef2iuG#H^KOO)uV{zMKKYjM$M<;3cMN~M?^v#KbvsegDwQkr?$-ohcoF89w%q`3mK zHYh2j6&1np6gGP>t(ZB{{clm?A-1WhDM7L93`DpuAK_2aff#STgB=bGd^hUlP3HW+ zSWMvEI>G}na3@7wyToN@qM*@bzw+@j$WXy*d=uOEd~xgcK{hRv(!Uka@Sc4}1=>so z-=95Rx(DTU%>4AWahXM}rIox!zdb7iy#LmHc+8dvzq`NZsx|YunawkUn{EXJ%t2G~u#0vE8VR;M@P)%EKu zMaGT1PHO!xH|Zn>aPZr3jI=zz{dORcO=NvBk@Gw0BL3x8vB=T&oskSgU#`^zIAWFz zuhv}DUp8N<(6S?cZ8tfu^35w~;c_#(h658X1-fGxBJ=%9O&ePmBaIg z1#yqVbMy31*O9-ex#Mn|;K4^{aLUHBlLur~W3ziVS^(~cyGifiYnyFnAvcoE#d1&k z2m{5Wju*D) z;;)(G7$K04782LgQHBhoW6__*TgefEIvvgx78AOZk^0L^imLkc=zktKIl0Tp*9v_A zMg2mYl;Vq-X`0_&V5O-aQ;y=?WwKP}S=kAT&Li&Eh0`?H7uoC;zmwv;*_O+*)Gk;< z@-35o4nTlSd^!RzFHe=G$Mu9@3W~Ca9t!Rup=k`(UPnZKP`b%l)SF>G1K{H)m#g0P zI9@FHAiH)i;y8r;N!aK|b`5F2(I`0px1t-U{d7Ryc zZl#Jqj)Yk!LZ^qZ9!E9Nw31ZKDd;ScK2GhiRA<=ETWLf=PmzHYM$JIxdIsy+x})#k zGr9kt#;!Uls;=t~B}hpMDj^_9gM>5)3?SVd11KR4A_xNmBFZ2FBHbk=CEYFE-5o;= z-8Fo7p68!;t?zr+`evOq>rR||_u2cme|zscbIyq)(3~K-`b&fr5OV6+DO&YBEjiCo zLU&Y#cCzXbH(UAGA>2IJq}8Uj7f4tvTHt9^qnU~iDzpo_1Op{q+x*jVHshQI*`zNq zfLP5>enU@9>hqy4Zcq{bFN@<46;M&U(&yPz?Us?^F{|2bWSmXRI_EJjdo4@`h0|r0HgMx$nAS*ygDFLq0{Acv%&k4V0>!%s@mcy8@X$0o#405nw#Ec zt1>+`_%An{vzRGo=gm%c8w}7@Sf@o{0`;XI!B>S|?n$HD<@%K`1wTD9Yv_3hQ@RA@ z@rv}l3phK}PmDj+nv9ZeaU?}jlOSw3ZWQ++%@$=WofmxQl^Rg^F$Yq~u{U-eTZin% z+b0n{8&kb%MESOP3!r2F(z4O#qnOwgWr{jDad8m6WyJWJcGJ+_Zc{4_Gn2@ zrlvF`J3luv%TT2pElNW23Y`TtI#-!|!Q$#(tDvP4pp@gUlIMCtrKWE+>`onfYjj}T zSle$7^R^+SBqEV12)uDIJKPF>oLxt#;ucC8u)}UTSBT_8XWVo_a$NzW(#w*qA4IZf zB82@dncqTeFhBk1RSP+= zxFW&;5hmZ)luYeYhB4&-D$-T2Sj($j#4h@k?(0w;wS~gu7q?s!SI^6Ovm89!h>5(x z0MW4wsGqdoSdeGX_|P78o^jLlF*${boE_s#Es%i3e*(qq)yW03(3cYE)ER4!KJ^wy zeIpf)&_h$-~nO)O6~slWczh5 z;7;!*5>plotJhVMadg8Zq7!kk^<>UG2dLm5k%s?mD}MSYyKnRIn3Ve zlRJj3+V(Y3<%b(=70R&goUojZ%LYE?uUl1^prtW8F>s17iH-){nuYr=H}++p&nEZ zA3mg_+Bvr}-1A#QN@{9dtA z>@750pVm*}-k2KR?`CTOF!{=Fo`(B&qbN!>h+|99z}M5B^f~zQ9{h#)(hSY_|2B`s zkNfcWm>eJ1Rh{elGT=~CG7hZ;{=6S`9(Kr(tzmc7Hg3Qfq@eZ`eE6oxpT(@CEif3K z2?|C#S(F&$<>ldjk;xn;9Am~J24W)!3oh5yhkaMPr?geeOvV5pnBzIP2V7KQO;pq( z{VGi>503!@1LG|8-%5n)c1k(++I+&AZ} zHuO2Aq>=7sc8!Y3s+kP}r{EJ(O91TV{(lS$aF_xr z=aLhw&rN%6D`8&0&w%p){CfM*(LC<6G~K6H=6vy-4?}K=7R-4y9uSQ&6HildJPX^V z*lhze*=&w~w$UWP0fXdOA4jmO21VEv*p5gX+P64%V}vi#>~SrbtR8iEtac~peW+t- zS+rM)6H5GYf|axMe-sxOHGk6=^x2VokRK0&fnvq~QzzpyCOr@B>XR~Z!P#SOb=FJDkd zNQjj+H)jUyTm2S9nLD#%z_H^=~nzX2RK9yoJ4N&?`T=^~a{M z2z{ZQ$$gGY^tAUcSCv%{be>)}KN7BnWas4E`9VGD7TtaCFm95|-zEOqiuiRdP2h+x z@uQMv{VS%EKd&^Y9~|Y*{zt@0^i(KF`>;86_C)BBnk$xg{1g0baI+d~Pyl1BgspP; ziOQ&nYC?Yh>Gi5{<5xP8z?TY;L0rFQsXn8yqpcv=;w{a-x{J$!LYBzd97b+%Q``d9C2I#B4na@S#`t-TF$_macFYAG6{xYJDqbkXE zYa6wE=4YN(-uXP?^feSoP{eCRLPb?|6*lhNa68c!E-nt8aIgw;8%&V^YRRhN`s9X< z8boSj?>dC$BEV2&v)g!Pc2-$Q37%V76ax=S6)qaL3(l>s7G`7HQt+cbzYG{M-$SPl zAVLDV*!MOtpToFKDO!8+@tJmtndBnBXtwi7+db~r)godnalP**jB$O$M(C~sIQD58 zuJ`JIqH<574&t}^Azj13#H4-$CAhr2Jb4r|F)`sdTUDYSP7AQr)CRVOt{dX{<2 z8$F<+bds39LQQ*Y9CmnRBEmYNFhKrPao#lhDUOS}+2y9*A>Cn=6Yn_Z!<4Owvctd4 zxxcyR@%W?Z(hbo+*Q944yl*5Vvehu_c6DQ+H*K-)Dm)+icIHCKv!&oX}BF-%&_2On?uDZLM)FcqAk-=pz zp-TZ9wDj3+wH0zVJ(UwOIv-0klQiILOz0=fcvo+<>ux&VSCQ8_Tu^1UTetKL^KBpq zO(>EfvI5TEKX&BiKIj!&keGFKb?*t#n8%_eN7a@B3rb(g1J-)GMSBI%;vbZAy7apAM93P6630$x}DWFMc=gtgV9HA!^PtkJLPRKZR`O z)*t8A^J}vkM39T|$oAEZluPG~qox`OkQm>=n;=Os)uJeCk!ZB8bMnwbyUuRc||xAyYFqD z7UOno=?{q}|IT$4SxH8azdsA$>Jd~>Wv9Lp`P-(RsKu%$^AN7Q@t85YNG4gT-d|GD ziqA0VuC>0qERElLAw$<9C;6BJAd^8l2VN7JWf4gAS2&~0=MN9X>I8I(%3hk8(DAW} z$WWtA?%&+G?qZ!K*RK@vTQAWwn&ZL57Sc(C$oOR5SiKUpTUVKvM;c-^k}=k0&TZr5 zeNx0{mD=*TVnyES@pWny8)^OyZu@54|dWd^+s2AQS&KLZ#HhZ6xuz@pKo18O70BlE4FPYToAL4Lb$XUt0j22&+J|bUl7m};Zc}M=yTd&1ptyhbG;KwdW-SCLUIrkpH!yZ*{s zDgkJ|Ad*f%-mtEuVE#4unE$WqGJ|+gj{SC%-B{T$sBLU@%H04pP$+^C^K2MU(c$4T z;FQ;#)ZJ0|*(N3;aJ0K^s&g(C)-s@)oZvk6LNL8T?!rmKUA1!ply?5DdZ8XQnE*eR z9ia5TYw+Hj7s3m3(@lT!Mt^T^tKkgTZ?RG4RXU83CKZX!f*+T~#fVP0P%phGhlDUx`LJ$dV!IHc8 zRoab`y1)Y)yA8~^)KJe`Rx^6l%I19?gVY@MIeR{Cx7nDsB>}2?su@_ug8?#s)%qhX zYxS3Mr{YdUj4zcy(Dn!4(iv(fO{%`VWbp(z@ZO+OI6EC}a_Uojw-CY(B^)HFH>Vki zO?lkDA`ZOE@_mYae7SX^3j6EOqxrH&zE^rZ43;z8w<8{&chl%Qr=TL+^0>R^s5OX+ zn&hH|=u{e4;bfjlEYgbKeO4-8%TF(h`2NZOEv*EXpqrK(_~YxL{^=L=`oCv*h?rnz zKQ@;|@N$gm%vc@G&-=N$NTfvHL^-FlAx1G;%%^a$`IO<8?0DafVGl@m$9_9 zdZIf%_gS|pd)Ax_C*gA25}OPGx(2MMt<6ZE8edsfkR0Fo@E~B1OQoJ!Xd=>i(g``O zp=DEf%e$qal}{OneQWLgyUN%SgrXv0t*y-;Z#c%e3|@|~K%J9N0Qvng$61?SGt?)d( zsZ%=LXCKe+OvERX!wJsFi0X>U{nP6#PJ=86^e$xPk(@hLs)c{G2+H)s#@w};lgsSWqRZ!5%_oJRcSe=WLY$Z;-FKKq7G z1_mVf3m-zABmYWQGJLF-XtDEj5*zpUm9A}5()}v{N1%entS8 zG;!*pgRpz=8!;j)h*d=`jD(=b=eShNbmx5HPgVW?Y$$LbF6GxZbjysi!Dt~p_W`4` zZ~yeaG++K`u#||HE^>VDOgx1MeW={5yN2WmoFVgvfkvXK1-6yWumvJ@?_ZqgKgz{KkcuxPJCN`gtE)iU3cEXM<^lr2jAa?gJsgLi_zM z5K87M&(kEQ9nnJGq<1^pWu6hkcAHLu?ss)cs$enB9pbm=#50#_{q`SQ#QbV$hQR_N&0 zo(K9F=IkC*W?a^f<)-(YDuFKf>`qARpWyRxVLaE>QHr$);0BL>qJ z?D~(5iRQ5yv+`$MOWR$JRw5)KEL!5Vq`$_cvXQ=pUrKdHA?woeG!o{T+B5mJf^0D` zE;V1J3C=d^pA1l~{l%XaOakaY@=I?z;e9FDR!9u3EZ950p|njWolloF6d~4k>&d}; zqId1db?@x86kRMoJG(=9T(RJ6p+_h6eZTp&wI@X^(3bI|ME|AS`pEg}PiSNxPyupi zYcu6!%acWnuG@_n_KK-Q(`J7oexsdJF_;aG>EHVOq1Rp~T_7Gxlj7S(-z|lS$)de1 zoN@fc9&Y;*z0UK2tO@aR(>`^ovWmc~e;^EMUv=Zl3Q)=Oe=P&%W=x*eE3OdOEO=P=Cik56O5v5p zcI7e&Iu`SixxoKorWiCQ#?ibWTpSqXr)k*HF{U~;{~ni0Bcfx>3!p-t^9~P>Mhz_u zh>!s|Hh3@3^t77BTI}9OOviPR@@T}6UW%--m($0Yo=Ggs$l1zXO-+l;jIV28fI$68 z2PUxsR#m;v4#TPGs$+6{=og_}H;2a=gtMns5`PsFKxlcw><>7D+nUdVG=P^ktpL}V_0BfXkeDoFw;kOI zCb;G-h(oHaXOCRt$v#!tV*{yToR4?U(qVk2nPHqF7)bC4!RTeRWjk`vc|%b5Am%%1l?cec8p$&26t~9~Q5&v0M8^bo1>^QyN`uaNV16pzDS%FMC z9sz-}qM~7=!zFUMOe9J9OeP)THKn(y|Gl)7Z{sdaK6BYc*wxjw{e4I*4}_Zn|JvlG z`z=0(w11qGA1ZfD6FFL5F5o=bb)BS!SVWEXVxb+)-@%-Tus5l+=hWDq* z#6hc(>QY{|x3Y3HmDb8BRjozw)0gYO%T$w$fOgtKH66>)ED@t$y~Ji>by?3$EBsE7mA{a^MC(l%t%7goVU&;&HeoO^Y`!Hfq~f0`a_7W^`mwnE)UUU z6K>De!23HBMNi(nS;Df!bUm9CxEi-QdB<_@in7<7H?H40f85B_w86L2gDzaibp^bU zWwEJ`hj(M<;&SjyF%q8uzumG#DQo8Xa)H))H`h6L@uE-OS-*cWZ;YMsTX3)|&s&&o zo({Y7P>bTsv1mmJB90Mvku4J*z?Kj6OJvyN2~ z7ek+e9?(m^-%x?U8msIPqj86dbm0iIu7bsuAuB%~C+`SfpHWpI)kM+VyqwglogF{l z)4^izIyY+!L`a7QDIU`Mmft1gCmvNQ2Qb+sHsdLISDm@~F(Zzo)B}c_A!3)wX;8Q(#S-;LDdzfXEgW7ODEf#dD^Oh4%z3uXX7k zhJ1lfHQQ2OQDR~?P1<0EtL4l#z7Zo;O?^2JFyaTkcur>K^7o}O0e2Fx$@S_M0{YCB99^OHFs|M2iId-V3^a3)LSyY_FC4{nYy z0CZgw(+Cd@4@-mVBVx)@Ce#(VBd_k2Y>3dbuNgom#YFhg?Z*=SCA~Kxl zUK^gtGSaPP0lF{2$QQ3l?{m-+_u|b)Uy3YPL`0;I+F4PtySKPr-0SGAwWqe1mzSKJ z9N>g8O%94mN=F{2LE{M(_I7r5EUF0tlFs$e%P2POseZRjeY#4@D@yzIT@E=$O+CFB z1J0M!ggI)-cJJOPDl0=Bd+i<0R?_#-UbZlhEEb+Byf89i$xD6V1GBc?7-3eP?$cwM zE2g{A1+JMY6R&c%F(EXagBVDjJ)9tB5&8&d*7tltXar_Y9?`ZOC*)^#cNEQ`kFuQS zf#;^DFW)Bb>+9;~joSsak&=`1TlGYV>CF$@$X>qwbCKQdi^{bUKRRGij^(yW&45JU zI(~t*&y?8=mK29|ue&vv4Xz$)X=zyx#Ch!$RvlgXocDe$hcNsT8w(iF&)C@L-75aw zsN&xpH5mRQat8jp0meTOmE_-TF#fXx97V6?*}VgOiO55LPf<<{TqI*2@IO#X2MDNh z7?Lny002&8002-+0|XQR2nYxO0uugQ0000000000000006951Jcx*3iWn^h#FKKOI zXJt4paBgRWy9HEK;oI)LL6DIgq4` zdD^tnXZ6~|Jp_u0nodYYdrMq&RmN1tTafoSWS)4j2Ae~`F5sty?%mhz`+cc-fW`s< zf4qmTP;3BzKF3l8zm;GN1-pAD|F>60InSj%n80K9AX3&uS9h*o5Z!1wjKtHkEq^b5 zv%EAiGE!0TJih0s*Wl)07qv^@M}PqUK|OgH>oXLSr8+J4S7-aDXs=A!ERUN{Yl05* z-rplcL_{Xb3=H1AOH4`u|Wwk|6-!E`a1s^=C-wQf!U2SG&)?_m?GXr51P9JDt5c)>L zWQ_^<8+tGd^!N4grS^k^(p8d|f57d<0;8;^%i>>ZEbDu zh|1K8#<#I0uKu;Nmo*>sjSlvu3B{M3UmXs5d3p*fr3b|>b;Y#Y-dqO7V&jpoAA1_u zgF}Quy?>{pE(D8?J+Eu*W@{W4?71l?iuEf$?Ej6>y&djisIIB0STX5}rW0|Ggg*DZ z`XCT`;UxVpFwk5fwf|ETI*~3Zn9D1q!^&;MI6U9XxI`fZ`n`Lo(Ah)^-^iB>dJh1? zzf(2OI!dzd8H9b3xhKQBY}sU`BQu+^sa%O(Ilee^Jf9=&AK#ey1;Jjh!vP@N;>U1C zSe@l6D!!8_nqLF)-p5bVF3(O{aw#~VQ$BboQ)$Q`1**J%4FiCWn38;Qw8i|_UJJ>G z?JP2K<_T<1r3%zvuNV_cf8|Oonl}|OtKxH;^)g5{SV#o_NJ?(TbM}`^q|SU{fIr|5 zqyDETu-5A}=w4J;yKB_!73?mvMWpr<`MMeF z7p^XDJkU-|0N4K$W9a>wtBcY+#M_#aw0?k$jtS*syv?7iUC`ZIXPd9v$gPLs)|<6* z^HrTWSS-(_5Ah;A4pHC18T?A$B)VT%B^SAi3FtxsEWa5;&X+%oZsFL}CmKB@K5nf# zGZRuZc37;8as0G=B41t`IqB!!xPi_h;A@9UHSF9qx?8aEo|jjiljQKa4gjQrVAQc` ze3kAh{Sy@$rK<kK#P}sN+2#XCLb=EtztC;D zUR|CbDG5Ze122C_LJ1xVuw0`YRLJ@2MoC|VbkFOiB+`g*%&NMwZLm+8aSgaKlq?~W z*L;h8*W{WUU0eVl@&(qg|6+FX?X0hG%RHSV$s^J-&K~LsK51~q&bG5(Sv+>eOPpY^ zJ3DRW4b1`oj_-NbOTV*3ZyBV!@lZvzA66wzq*uxeG7D6rhr|cO#?w{2y*_(+NGp$( zSv)r0!UOz=G}odJrh3kQe2a_trk!|{xb<9?BjBMFmkRFfX?3zq&Aa#Me2k{*P7!Y( zdpdfG{$&Lsohb(h0Eu^QjUM^YoFP3=Zgta$bCRMQX`D@@Z`|x;LoM3Z^FAr60K@R}pjG?$G z?H!`^*L(=%^rn`4JpOml8WtAq>lmAn9AgBnkCjS)^yrSapB$)kl2EcLO`@@++LIqE zPfXk<%{I>LiIYtsKAXRJn8KNYxPwG1D=X@H`VipcoPC6`>7v+X1<3^~SH|R4+DA#w z?BixvvYlU*KM#&-_lrk>lA z0*)&Fryj1dObeV1u;lkgwb)kFIU;6VML5|J^DA^e5oT%K%r-dDb$3!ipZM*H z9Cl9}tRXZrpKAw~tq4X<4l0Kk_MRW>?X3tN98+Nek&m%dG0v-gY$)a>axU<8wB~+w z*sT#noT5Kz%^17aH6EQP({O@)Iq*<*@%5QZs+jN+OmvP&45pRoCaH`kFmgUwX~;VM z6!n!B+y74pjE%G(eR7>BV>9lW#my-C4X3>nW+2NK~ST zwp{i>QSUIxk2eoby*R<9LG38DCu>{UR$Vj~?DhfWU}}qm zm1(bLu55J7gNF(9D-9)hZ6{ ziHvFu4aq>xFW|G0ze1;bh##Fvf)mF29cOshpK)0tBkDVD*!mSfMaSgjV>L0{Q0f`a zsg>0oMQ|*T@S0U>HG0@_?L%emuTQ}}A*U+3@VJFRrRKxKhwdDwpU~q=$nm(sI1ve2 z!0_<{pBD(eDfRK6obBgYrTUWw-ErahuSweMyTejU|Itfo5$RJeT+UU2S+rCc|LTvE zv6N|y?&?6|f|Xk-T0QWZ3xF06k*rYlbC)p`n)HIYGO^Di?PgJ}cr}8IG$GK-i%dG> zK2JE~E{It~43V2#BHmSlW#@6wcIoDnTZ7LoWq%ugVR z;y8bk8Y4Y!EfYS6h{mIK$Z-TW@BpYH6n=hW_o;k-SvkmS;fd2{;%$y-|4&piuSHW` zn#G6R>+I{)#6StdmP`;-PFbvAe=N&dsz^|yB^@5i&l^vgQTgk3U!9ht;fQ25c zriKgbiYAf88&3zm2~bqb-_}>T_~aSClm6(~yA}c%vKqPVh9apBWUP9>*;+-ZazuT zd+zB=5hF?B{2^P4)friBI7xm#CI`Q1P(Ggd-1pS!`*-L4uW~Dey$^R$kL@9Q4BuntgoKhfK}Ecvr6B|- zGU&`p^t~OY&C2Jl`LBOhGTKR>$vIfQ1$Cm+(#@ zaT89b5wPu^O|sylUi$mjzIkI+CW4$`^`f)0(`{>VWo@mtwsy<4!D=-3`frWFx@+4E zk5CXO+MvqYdT1%TLi18j^(th``9!QuoOl^cRovFV2zjfrKnlR#oRPvOo9hIgJ=-fR zD*fHpJ%@7GJA5YUP&@mDOK)@G*v`%lbk`fs_2kd=X>%e9iwox}%zAIGFDIK&%HN?H zgpJ=TrsMC+F(Jv#EYIzu-^}p~ouK0F^aLmvmlrN=Zc(FMcyx3dd*DwzY#G7KfRd#Ky~ z!NHd8ir%xEm%;im?Z--=yexXJs=B$cHQ=aEPah+c1+KtgkdiY)t@Kt*&{Sld-Ia6T zLnaBj+y#fx^t@taS1=UbYyaL{AeD$-bbaA?m7bUJG27;LS?~I~rBtXc*V^SMCHX=o zpEm7oI_K*yCb={dEBCi*L0)HzpqSW}-A&hr|CR(1*T3e%f?~hio;$0ms;aAx-px;m z!I#uj5vRZKW{D`H{T!Cemkk<;WF@O8p*ALBRU#!s=B{yt@Pe53AR+<)?zdhJ8Qa(t zX?P9r(O*{NGZ>2=c_B?o- zweKu_ZzSl)M%dz|jqn4;R0Zv%=qQCq$UuP;01=;GN?4}7i&@V7_zo~e!zNbPpeGuSUqDCF0x5F4m`Mr)&WU~@!F4cX*n~pQ^l}oAB zodSRW^MUyqMV##HTY94t6S9!{p&I3~NrxNbO4%%n6h59NxcbEVzTOcHCG-`M(jw8^+n#l zh7?%tOzVw{v&gjHm5RoH;;k?Kub{1;85?W(JeiPA_}6u4W230^Vm|FR(4(6Wplv;z zf(g-VW%jfbB}8%ME44(EOZln*RD4ftI5INw6CQ>AeB-orwYj4%a?~wy#_WHiYK;?XF;NG_CftLd|&C=|F+1ts;J3@_qD$0T{LQT zW`>E036u=)Q#}NZ`hY}=Q5{V9(Nj^TsY=ph+X0k7q5uLFQy`>kBRoET_`~8}{vPN_ z1Zi!Gd8Z+ad-NrlUkc+4tw{l_NMp-I!jzImKQsSdI6j}7DZw#OV#M+&n?Wq&R{ ze$sEwz}}SdrBHsjPKCn&QT1~dw+-D6K>48XYt5;t>oOmUjCs}i`s|MBB58*jl)I+e zkCmbkrdRDfj~B0_G%p21Ig$COJjyBOi0KK- zitw_gzu3f@w3yMF-gT@u*+d?xmW#RGc=UWlj#bP}L2q{j*q<;-uZhFfuLER@NYcS| zXT?(W<8zuvXpTG*DH&*V*n|?~Xx8Zy;;p(cb zw{*Publ-@SaaIL|`tBTNX|9H~V2A%fXn2z@{2FTT;=9=v~q1+Mrfk>574xLzYC;^<###@+trm{ zPXB5r7vf-wy~~gTVVQ074qTA!7ieY3IWl`?V*kQ&Q2rSx4J4jWGT-fGN0WN%R4}f8kg<>qj}Ny6b0BnL@|=U8oL^P?D15HZs}m70sDFA>dCFus-ys z)484Ob5HP_=2Q~fzirDAykJ;3u+P-_zyaV&3QC8moMNQe3b`czgjoZex+?#UZH6*aHrfd$b^X(tKm; z;FKk*I(>>47w`thL7HOZTkIOMGC-I0^ZhQQ&Q1y+b(3s9M1>7xFoqH;sK(c~^CpR~ zP<7Qr2CYMfQ*t44+3sh~CckzESPwCxK@z=z zgTY_8w-_i!8d-cx=R0H+&H`FVK#)v4Ei=7c zK`~xWsqgFt|Ne!1{nzPa+MnNbT4U{$nfn%#RNI; z-3{)gv23CzHaaeYrUvKqbPn?Z*N9x0wdm(4lNoD#cx z$?vcM%7=H#R?ra7`6j4O4tEVDgz@x=)U-iP+o{NvvoSs@rFR!8!DajR@*`k4CJ8+z z5ll)g(X>fW0|PMDzB_vJa5zVn&4TE$n{l|T5F+yOqW=l!4mr!hAQq5?2PS@>yQZ%X zg-+-D(uFqC&$k>sjT}6>jKl?If3Y{>o^cMu5<2D$f%-Ka&@b;7Fu)2#a(sWr@h~^A znwh2l$BLHRTRw=B(ZL#dZoOqNlJ)jvIu~s3$t#dslpeq{<^oez+zcwd*I-FGlDpi(xng#y0-v0X(WnD*ov-gM_L(d4l*tkoN+! z52cc5XoSU?gE;+kr%XizQDQ)AtTZJh@Hm~~MR@EiOM^((4tduE37BQA{~mhUQ|vxg zWlRgJp^#t0cF>l3pR3&AJ9+-+{ivHs*8P-MP@okdMTC?JO;5Y7X0D0NRcG92#3 za#q`BXc3WtSnzsL{`R`NVb|Y%Vb;5g%sPpm{>nB z6}k^lIzy1n!V^Pg#~g2yGeXOC7ayuFe<3lMa!&6#Y2R>f*1-ZK@g&DIy$0)8;QR_! z4H_K?mp{gJS{)6=?zB~)1j(ym7KkwkUOu6}pG@*OJi^>b{1 zy9x^TQJb|Y+NmmE*?2(NO90@FR9`@;bo32|{F_+;d>ky*Oh@z^Vi_fAB=RMUOjY94 zRhC`bi|~VT**$<#O5D!L>AxqhgNufS2E=5O*K#*;LjX zOnzlx{S^z8vFWrb6#V!8Yk!=oS$gJ$pXM@93V zmnGPEE+loL+SNcg^_0>Dz=@5=~ChlUHmY0OR|s zu{C(;^67|cFT9>}8i3*7c3BSfoEi6c+ezX6+M%@f8N~;wl7=1OE zzv=CmX~`|?cSs$^4rp~k`l6r4!?^QiT+f< zy;6}qVLgwFtQc|6qw-e^9+z}EpF@1-Ysoq(d<)HE`X8!}HK`NSdK{pkQlNVmj`wou z&Dp2yB?|%t?REyyDbE`O-GpiJJUJQY3C7c-Wg>Yt80Pz|?S8K2JB_EzSFtq#)XWwn!+BFdSS9Ec4VK-Y7 zb#*xDK9e!4*Fh&L&)Y{6vU#wDs>37vFtHLYGnVk8FMofp3Y<)R1lE%v?x04m?8P4} zB~C5&)D-=6Hy8Snj}}w_;AguRG_l9jCzq3s5T~8nxqhx?Yr5^KXw`*+L$@v#>f9I` zg57XwEnF`nou=3HaE|t0+8n51ouCp;X^zVC`rLM(=(^Ha)=4@0xRdJKlvgwrq7?uj zIN)?qw?sonLt_G!TT&7Qb^iXTTEEN!FD@=_4%@m~n=R4Z%`M$ea931yA~rM9+`Vp~ zYi}L3CIxYE<5)vG*<;o@plX+ipko#4yuy^vZ z)_NR*Ec-NB$y@#`nn@8X%I4yskzw+~=QpKpF zi_XlI&QKXr#vt=T4TBO-e<4Uwv#q#pD59xNu}1&*1oyi^~1x(rLVjF zI5($z5>TR3`_)8K_H~QFUc1e& zI9AsLsb#vysb-1>cVZq&MT$ko+mY9Zj{BGEVtj`rC(`n;3mJcNxRSBot~n4$VdRqr zLFH^}CCpm_7r+t-C;s=bgMH6HXwC&mu@55H=p77p&N8pR9r=kS!dfh#OI*n0dnlF7 zw7I0y^{QaM3m3R)SGA;Y&7K!yOet1{1>BFCW$CPtZXrxLUw>f^*4sBw_+=N=IeVb# zt@ZOx=Rmm%Ssp~Bm*-{gh{nk`J^;9dg`SlCG_~2Rsa)xKaq*~bj^}9-=ak;jt54p{ zcK7{XhQMZ8vNCA#5{SH@j6Wj7-VU5_C|n@3bJ{nT?_@9^Yyt6$1kUSP_(n)T3M+M1 zEM2uI{)QC9sDBgzmJ*aw(ViM)O0py8h6&%*`{i8MoUR({rcI?SNP(-5u$h=b_t&V7 zYaKUS4KnPf_U2=Mze%uLgT~`Oj~Oq2mh_TEm>fF zM5K7p-dTv&vjmYZujV|EkCJZ78pqqBww0ngf-GZECTbiao(>g4f@HOG0zAQcl;`$Wln7s0AQ7WI&nk)4@ps-nEB{20y-0*t@^N0?`H7QyZV)oR7G@9O(# zT1v*zhiw(eIlnmuS{vuOAg^w&J2G7ts^i0p$N$cROM=Y8mg%O;7_f|(&d|J@oii-S zBaWhYE-QgbGsVzo0p8DTqt&|u>%k^b%G7tuM<{tzycC6=D^tGv`fZt6LzLc$1AFA% z>j_LCU|nmD3Q3*wSSxE8CB%IM@pxr5O*?aExI*^j;C1>Vw>#_CO7opX zhf>}mMuIoUNSNe`n8}CBpMsK7zHvSZzCgR)s`LyDz$tq~vv{ z>^|BWfbt!|(G9kx2NU!)q8qLv|~62AQ>~X3F8gTal%M4ppch zU}$mOmmDkk_C128DK!#C?Fts0!NF%OdAV6CQK3u-6>*dz;x$#$24-sqEVRLC`o>tw zESOtpq5mV}ghS@Y>bAv%i@7sat>Wo*fb3&#O#g_NP&bjyX-44=|9G8%p|h{h^87tT zM2j>bQ}`Tz2b#)m%gOtrZ3EzF1VIKtjklfN*62*#<(wLbKPyk1nrtev#%m)dPrddd zv;P&dA_UMx(fr!ORM`G_(2LEvI3bmU**PgFJaDpvfqP*wsQ8iq0cmx zUqgC_iy~6{f?|nc1UdVo)#N+81sMP=oc8*lqs=g7StJuI2r5PFJV<)_udHYDsyIIx zjCg-2W9a8jF0ZDZ&ZP1}$cy+Tse1dZuCCNR_sKuIIDjNXGJ$sgF&h$+ygvJ$A@crq zAFIx84N9ET`Y$L8uon=dMVIraTOoJ-5KEZRW2H!fm1w53svpy)E(d5P0Gc#R4^P&Y zBxR{>J+B+cpWeO5zI*cWqRWy9$xk;?Lyx1AK^yTvb=@XSe0c=x^p^6L-FCMM3Dy{k zs1w-lCu|QvS>X8!{p35h(vxfBHUef37>581mL(QSZ{=9V_B%|2JtymW)ZaHMO2Z(7 zbRbEPytYb*_AY#bjNgV3q!=C4(;?;FVo`Lu$=WGh5%Mw zc!M&($ddq02QDkC9Z4{lxr_?_x#}|Y96+UOa^ny)KbeslC8NTP~fgxF?LLj%LHxD(K^c-@45-sx{14ILH>eSe4)tSs& zJVAVJvta1WDOAlmo3xSc7Tn!x7=J+t3&?=@D7${8b#Ttpk{f4}HZ^Wez1L>8?R4d) zIsQ|dgb~h`yPHmp=*4Q%X4dC*OsRQ%NyMFHc>m4@< zVbvWP{R?wY`HBi&YD!!pygd*K-VhAU#B zGdu1DM`=%rL8e2pruMHc9J`~g6EzLA8eFZMoev-qC4uJQseQIoCiUDwzHu}(Y>2#O z&mBX~hZvZV59dd3dQ6{(v=5^?7ah6rAARWs39&s!e0yU<%c%?3U}kdd@vvk@q{jS6 zyIGPX^b;c~8^x`&@wOk~*h8t`+Mezi_L*M_7g4GJ_jV(W>i-v0kfR${bF; zM2f8~660m;Aw8Uzmp6u1NKIWm{_EH7iG+j%sMPZjUhwW&S?%_-GJ>#dacb+U3Kyi1#rQ2zmI}Slt`0>Zc*SA`;3BOr6hOP^vvIU(YBAwm@hQOKmFE zJX6rF3sVCi8uNkcAeG#0$c#!AxVeZkAd#|6nXmGQ*DlEru%q_+IBaQaYpWWFYB~Pm5d@a+L4>5DqQax#nrrl^9JlW8>z=Db zs2CY77KUgRj9Z@sF!-J=f@|vmHfuhRwsGv4sL-L`DdcnrX0s z_U^nxxaO@n$d(HrSDft365MZ38Mh&SrY{;aNff5{ZpX(ujjysSHy#h!CDxT0CiB+4 z%Cm0vUe@T7eIxayHp0nd2qOc7Lj%`q3JPY1BR!0l-&kc^Blf{+Fmn1yW^ku;UVCCD z&$(lH3YA;On=amzb%2VOmFk|dJf@kn*uQp!RWe8Z}d}n`!WVa_ALlf8NRXv!ITyzg1+pbDoP2MJ11Zk9Aw^8#URG zn_07f-n*(`b|9S~IpUoRci(QhF(e+frf^fe7uo(~Zl4~Y#LrxX-wOz38Z<~hF|*oQ z^o)nY`{hEvX8OA4s4)`$4JIbdjh*8i|Mxe8T1w6?Z)dbEcb2*HADR`Q^!!Nzf56BT zuAM?x&4wxk})Xxs+n}72j!E+bK&_7j**;LIQxM zsS?8@L|JN~QqCq)I8H2p0l)k7g1DN4(~$0c^p}%~I;_SleBg?k%^at`e2%qRk%4Uq zB?P^S7IZJ0)-ZA!YGPNR;WS97;pml=()0hr!{&+XqDFhHxtKUX1@T3KV_S9#H%TP5 z92iRXeh8o2!vK7$@2BwkL-@5gN&jlLO4ZR1(2=)6EVnDhlP@GHnrC-Cx89&rwB)^O ziGkqYp}_S&gCv}GJR)Kws`XQhxa}%zyB7YhIFM5hhB?hjCe38bWENlO_!~m6+Uw_n zEJGF3id7HLv=Cq6#G@-p4-ezIw~EA4lv4WhI)T`-z)vGm?BRVL#up(pvYmTt+3=7w zy|$#>ccsaRt~#Y6R;u!q=c(ZW&9e}Y@Ymbx1L3^*wJm0t%y6UZ$2O!}Uo7?txAXUE za^S4yd6poduGRB+tk~HSu1yk63@Asp#-V|aT-{#CycrHLLJA$(QYK1y>*NorxhEM< zgW1&|O_v~X!`8oV>~H(o)xNm(s>;|Cz-%?d_JE45QuQW=7bwyZ{=J{kuRN?6=8|`L z)|j8uSRDcy)z)uV9#GDs<@CX5jmlnO-~*iapxZ3Wm{qr3eJvWZ( zowJ#~c?tW>AD-G-A5Tuk@8-Z^zX;mZKP`rY$YbVI&>AGgnPUVkl|Buw;}+8KJ$$1l z{lyLhO<*3&1-c?o8_N1zIp%>X6!#PS=*$)|!c-LR>x{I86T(0(B4piwl&anQ6WA!|46;2jDHkVJu zn;WI+M?J=ay*I+`$>N<0Y+x=rTxsIJGsyQ}u0L467Ewts|N7Y+p~A;PZBh@jbm_8O zO`8DOjU{ON1=`olx@&tGa;I(L#GWc+5_wS?5rO8t@84myovud)y{Y%2m;g2MB$LO< zLkf7=9l#svY*Nn@P8|Wm4WKCaEG{bc@osx)3tFT6C~#?TxA<=}9;QDxwiWcam`!1n zjqLLuZ&}E5Jl?9{e=ZuWKI+3Kn;*5CXR!eak~ECm?opC{$r=d=t)7NvW=fe#m9XxV zI4(?Ak`gXbGBBfzklk|vJA=`-nvJscIjwzRmD?ZCqY5nIw!yULyaoC(HOM5ty^({5 z5r>N>S{J;~=3GKq0gjTARB*IOJ;=7?R^%|p;>O3NDp3*8qS2Mfe!%cCmJxL2U|?-s zI@TNmv%7dXbgfJoq%1SzQv=1K_Ue;7YQ=C&NYYR|Cw@YNxk5c3o+@SUCxBOs(c4q% zML%~@O+qEkUth$?3x2Nc6nxGFrF;IqSUM_4uBeVpSBH}J2bR!paMEKx&Fr8a^n#PY zjCwnrJQfh}&{nc)iZ_X!Ts2vkY@r|HpSo-4c9@X7?eu1L=A7@$uGC*_;OBz|*d|r4 z(j?moC~+UR53)mPx@0O>)Ma~%F5^C6ymSoU>^oAZ^e@+id>~ScP&viVw`H?BFRuu^ z%O{}#wov!?>2A!36zpQQ02qu+-7i^C_Nm*g*!5-1yC}5#-FjO*5DO(-7rk@H(C36= zsu0}$#e;EPbbJ=tebT`9#ZGql8um-ppym#_ z^kW_jNXM$m!Tsu;BmYaoGUm0$qkkO%m{71ZRqflRU@xbK{E4S7*!FQe9Th3M=!-JW zB{f{eR)KOJxJo}^V&laHmldLyNypD3)1E{$nIbMc(VY~L(!g-B`6~c%=(peUcQ8Dq z{2#>d7sSUXZm;g0%!V-8mlhh>*Ec~|?iwRuM$SedA>~Dk>~&K0iqf#37oPoGf}}FVHw$S~PhU|UV9%qYXX!<6yHqo1m zjO=tCvG@7OYkIFE9w~^@Xc4{EJ1wpA7M0sPwSucU-`kt(>FH@BBcttO0s;cWf=jJz z*12Ijj*ory!A+vLIfv(m-mw2XZL2roQ_&L&-cunnd|dUFj$QCe%}H9Nk*kLDucgY* zZKOXd&7m*58&Bbg?Kw$^R~fL1x-?N|0*~^7l`YljnR6D0wgRds=vR#q^QV6 z_*xftF*~^;iM}SX@sQgSUXbIb7u!j9&O#i&MxHAsB0)w>YWVAa*+^%!_Nh5<}(#}4;*IxZvvhd`c3hr)w8_ zS#ZdP%V*1$t;m5~t=9KkkqV@YF@ws5g40uhktc5vjZXQyAFcMiYw=)bptaU6sVOcl zMkwj%&@jUDMhR9uE2kS*Yi+c3bPRkqR)T_p@UC6Uid?|K1aooSY41vDp^8mV$r;BraeTtRSy6Wof#QDKe$L%c zN);>^-?SRdE$5fbD$mZ&E-LEn+S+lyBx&(OHa1>OTV(Y2^iVC|bHs6a71E6y8~KUG zhyBQrWxL%A=h<+Ux%hP_bJ+`u~H9-s8IsfWE#rzrsi&{`0A4 zsPaBP!0V6HhsRl1aUBfYgZ}4NHRCz^W%T(^g6b?+%gfmH>$!NjiZjXZ1z4^<><+4!9mbXgbda3G@McKy2l?OTiTg-Jm^KByG#e?FcqTbo5?^p;S!k-jhu#GP2; z7@|cb4aTj|+7k*8t1Tzdit4LG8(xzEB`iy)p;JHA&SUl33`?JXBWF6y>*w|&Fa7s3 zPGVl^kKQC!AI;U)Cvdj-`e+CUX8}P_DP6w9vFP7)d9%}B%D*3ImiC6KWkzK=(3N^g zw3MIfJZ9Q#*Xitl9rLxm#5z&6v>4?GEpW}&0{%fG@+I`*p7RO?_)HI(d70XH=#+7w z&X3VP^MA9G=kpjb{GVZphI$e@fLZlg1}tulNpSeJ+5Fdyu*L1(8Rgls+N4^YIjX{X znZ~B4ImXR81W-dvkx=7z#H})N9b>$jQOVS6;(Om4+ApRiSD1_9q0dF0A_qGbaeF@4 zKD9(Pt62iPcQo~iMkEir@pA9c@GvfY9b^Nrv zBC`=jjC->3kvI2MO_I(q1NOf!|MO=pCk4;;i`hPh$rNbctyZG!Qy&kf`(Ko5^9#J( z?j~pDl1`UTecHZ&cX}uU8@j$Zmur8yg|h`=oH&o^dp$fSz>_)kx3X!M-k!}uo~DmLsM zaX7D(Gpj=NfH6_FSLD@ZCR%HJjk=U2yq^>B4JC|gYIw{mvlQ)@7nOw5%u%%QL;p%| zoNi*l5Apdm!~1D_kE_&=$Ho`|kX7@OHi01G~68Rl-|}0ySxLpJ2Fu zh|(1<_H20T+&rT6P7Hk9kad$MTZeW+!!s6)Y7x`>>hEwCVlZ2281D~{+}u#R*f`0T z*|RcYvD5-*oQjMdR!*JxD!zL0wXo%#FdfePL~^%)elsdby=4O1fXY zD;N{JwAymCLN!d3h+AP{GGm)s@(3j!NB*rCfvfY7(KQDjtt65X5yZZ#a+RmK+KUAh z;6J^U4<1?=P*9VbvwJ?bB=~k{gB#k zG`QRxqz{MHHFHV_%luB|?&(w>!)>%8&Yx*UFCOd?%BA<5fR_hca0SP1TOK=DJc$bX zm7)*1k1-Kn`C|RIJDv`GM7gfN(IaGcdOQJ`?Rarv(hEo$MCfx|T|3`|vjY*jAJIBn(=hxZSF`@f*fw}YRHQ#)U| z@Ppx1de(U6nBLPRlE!l!|G9R;^mu;K0Z7>*&UpRI5) z*H%@gprb!+(0d{YT4eSXR+OD_U$}g^v;3{W??koX*AXL$q6J9+K&^SV7vQ!$Z`D$d zf>AMA-1NBbm*b})zjNS>DfUKURc-YlmMW0(CWwQIhJPA*(l?-BZ@L~B(3ze$>*wO} zckJwk?}8a5zU6~bL%;keKGph(eToq+*QyjTwZFkfQh0>UTzxpc(E-Fe3j2?Wciq+a z)^kBpzS3R?$6;Y3Rjxu9k?d8BPov$)dvom;yURqWN-8PlEYnq|ZG8XG&F?t#P zkIi6wACFcDNsvGrBe^OxV-7!EP^Gf)>rLlxSYA`TfFlq{^6yA3dpSHZXH!H9b$I|0}Ze|;Zy!Yy| z=A$+uu!IvB+YY*kBJp@3Bfk6VV zCqOTma3|rxbiodDy*^#+U-ISQ3BGK$K@2l6IB4Je+!rJoce@~0c*3;lfH#uM5?omu zN{}c~%grgXG&=pPiw1SOuYOFjkm0>&DIIe!r0gd*@~h-CB#k)xo)GX+(H5!KYu_XGc5NSji(kcp{&MIrnd;0-y*%8`Wd7@-w9i;E-fk5 zdh4Fm>b+~`AXSs^5YBvL`KAAO&&R^^6n|5x20=J^crE{O2saXxkcBidTa`0O?&o zK)_I?cTjo<=~9&{CDhQ{JKp#2{eH8~T65N%HRtS^+26Onz1Eqz^H;z_qGt)np$F^l zVQK%oewsv`cix|9y{S>7eK);D?mN=A9vuY)%ynO*R{xL3oA>c?8VL1I+V{eSl5u() ziZ+_-nSaS~!k7Ee5$S{J>S=Th+knf~YKDcAChlK3JR>4`Enr`rVOTle+``W(joDoz z`fAx3(#zB+vmY!^7ksfYz3@C}z-MY5Hs~8*UU3jnp~=pd|F3hnRWExEAp1t4wa42D zVSv7DZt+;(I3{l8y{Kt3o}Rvfsr6%rpT|u96~F=zj9I-`Umz8W#iEeTpMMqkiD-oZ zJ$%Kr+!dE}SKD0sy^<0@s4aq;X!y(1*FK@XCVw{P%=pv8b+|2%rVj7m4ZmJxxfJUy zx0#zI44rh}Qs5-~nv*aOw#H|s38 z{$)uByBEJG*7@aSMfPXh#f4rMA`y>Is(ex^&e>d>@9Cz=`9o1xv=6tRo!l839YMN} z4jtHCXOrK@;P0RLdAx*8W$vur)t+;%rEg~L|cDFHa=%p=S-wPk(haqE1Z@0OU=N#O zPe;lK5VT)+p{*5H-S`+xM@A+_Z0W$bf$yQOqFj)TMf-EjqL>)1qRNTwy|nLp-F@$; z9!yTAI%lKyN4Gyy$CK#}wA|tNMy#VrRQzE@YyM&MV%E!kg!t6OS=7AGRIUi+*>&VMrZ?m{%_!>qc^aahOfc0n!_<6( zYm{ze@21QPry1Y;L-!Kg@PSF16*jFQBCSE5LlYB|0)oHO5))U?pw82p;tFMBl7;n< z{m`Mi`xtG+|A>x#|JXY?Fi0^gO|z5FS5q9r(^OU1=^VV}9;gPSku30-$A0tE5CZQj zP6G4H_9MRDu0mEKNuv}6VR=4OkO`ZjYT|d)=OO)(X~c`g371{;CEU8UxqSB8+JN{% zmx=ZH6i)X^BJS~OimI(y%3SNerBF^fe|kdK67qPp8s3nY{3=VWWb;d=1$@kkfyuL+ zjHE>NJyaqIMGCn~*H{ECDdK;=mzTkxhI6jv&SOGkH`I18M7Q7>u7ym%0tNq4w%Jl5<~IyB;#V2*U@HyOAxG?xj>6gRmhTyYiHZPtz2 zpUu~DP6-Sjr`2^$FTYxS%7@+@V&AtS*Vf+Kzcf+^8&sP$BS56u#RM6JO{0N?q*;rL zm_{yUVb6i^Er?k<(Mt=9)WW_4wSh)0D>CfyIQuOr+o})Fl?3?jS<}#oA69sN$4%2R z@>m$oR>u)1rn;^|&!xPli&FM`(KM+=*KZzBVNLxkWPi!4?=g zrFwk!Z9stuQb82%TcH$FF0n#8N_Xddj0_rAtG=5|SXn`Hfe%M4Vi@l3oXB&r<)|j= z=f)^O*niy(SLPy1e%?kMCs@y>&;KAExLpF(W5_;4RCob>R1?R$2l;@6`y^{)8xapG z?b)CF_PZ8GhA_|EpN;QI^SoF+;xIM$+p75RJEEyyO(fb43je;wh?8@vk~#M7Z0xUG zZfm+P`B2RJX8&TWi;?&OWz}#TE~UoW*WcX+I?pM&_n!B)D&`~sdT+T5=d|gk1K;Qs;9(6?JP58?Zu^p@KUvaw+uA1=tr=C--?70=2WN;6r!eI$1IUQ6K;SeEjEv6W>XtlnXT}3#g?fMDpb|)qWf(2n?7AO+XQ>hP%;*m;J z-r3ha4wb1}SDw2w@E<|@e**WG3^b(9x7n|5C#tSEBG_Nxa>d-b)3H`EYY}lZb7a2Y zP4V}GoJ=@@Dhd@7I)97k{ySr(&Uby*iWiTPyuNERPMn24S#i6k3+2_y?fl{D?PZ+N z#i&v+;ZPw3E#cqU-p?L&@jYr(=zCbru_Yf=c)T2yMI|1nJ1sim%TO#fh+enfeM|wX zQ`5k*VhCfM0?ym!b^NW16bLMc0#;A5EWJxVJi3;-B|+b+YEApj%a|eX&v{SC#{S(W zZKpEYRVNQ@QzaS_uy-XB3l8o+p$uy}Wd8BN^Tv2C z|MYHs6kXeiXK1e!y5j7Qp5B`k7ku+ zgXN@6iotCnTGKiteQDwu$<9iVfCeZ;h=THZ5>_m^E>k#Ch{kb4V44F zu4K_Qq@k(wTuRzxw!Q1cCPZi*D1kminf*h3bFP?&{wAJ-G*^D)T1+KSW}uyDi#hzy zF@OGV*#4aV_nWj!DGH&dHpAY=i7Q&Nf)bX-hIoHF(BOFc%rlC3RHr@HSw6s(_ z27g&TJv78GBO_zw{U#*DL5{kxzP^4>!3qwCo0_IaMMX6>qT4oaGchscKlAZ9URRN4 zIxcli z;X3{Mr{Eh3J=L6CMSJ_-UeOyGIu{lpy%%y@=v0k0Jbr#`?6Bib=mVy{;bHQ7_YMyT z4gUDef8P@8a~pVhiO&8@r(|F-adxv>rWo5fgWzFwE4gN=)3&GnZxDvI64+B+Pyu6oQiv=w$E#Xe!^t5!XEV=o~$(oDY z`9I^Z2tGWjcAEP8)-6Q^h4b@sY(zx7I6MB@zV-!V+?D3xLy63ji@djBPAwa#yW-hV zUzrS}+x6wyWTvJTMgmlK z$r+@T9*QM!aB*?5vMPu(Tg##pd7EXMZ(ZHG9Y6QMEc?Z)!>&OqG9Ua5H62~Q{|5mi zuC&nA!PN>|_-taP+6l%Q`w7uD4!pGtUa4H7J0|Af;GmGb=dh2N}R$TZKN z_Gxtie5F5Gz|L{#=A!8ZBw*zD_0bDBoSTO`MB!Jtb$3cy2GqCZe6wiaA?m7i3TUh? zXqgC17vzwZ1}S{f-57h&sga(W`(%BC9M<4bcdQtsviDyoqx+_|`TbA5F|1#^(lE1IATSK?2OKE0(ZB_Sb!8TtB^ z2$9ggI#p&tPD+|8<0p&&Q&FufEeYrB{8iwo656ivVC;rPD^=L`sBnVN%kvrpcusA3 zd8+i$3HtrWdc)T4WP}oHO|G?yot@pvRxGVGe=;2UultVBqlDdOC{F6MIPenrmMB;>gqcS z&FF)UUW&;5NR#H~X89{Zd_e)Hh~}Erl;WpEJ%g(%|kB@hBbqR~n z(9p2P_PFIUMRzw&xeG{0`1Vio0km{N7{6I7SJvWBZrxv_BW#g^IoL`y@87$Z8$r$_ zr$j=QuFM7^Az=YPs->m%zt($tdP2|7bni62xjlw}*k;rKI~Xp<6G zidwU#S324HmXU)410!P%#8YqJdG~0+47R5MLHha$8XV}Efr0X_wzikkJy|9t9GI_+ zclh}Ehvw!k4bS*$ZVB;5?zdcBaP#o^Ub##WHd=?R3mU(DVa(CRX|$jTM@KHREo9bB z!HYq3bm;|RhyRtL;^K}|?Vu&xzMzCe7SwmA$?uTTkaPRYW;j*EuBHFm~E_r->EbTfrt-Zc^pfO&qJjbm}vT+R+ zcQH3NuXUZLjOZNT9o*b>#Kf$7#WO5FqNq3HPgLJf3(wz-2oBm`j+W1rC@U&@&Ki50n7ERmIvbMM$FPeBMRaB{Tn@CiFW2KcUzX?Pt%|%i)QmLa zPwurLY&neOr>3V*O-?vUd@e2Z@%EnZFr*N^exfrnGgEj)+YIo2QAN!rb!!EK z!H1_auU`|Hn$FHOnMElpPK_W|6aC7*07Ug!zwpGj#lpg()pyw3!eX(TuBxia{$T_b z>*(b4XFF$PQIB%j_4W16jw?QGbX2$8SjM_*#LJ8^`XMc?v55(Htm^NybO|?X=aOHJ zUqdifhbg?x3ZeiJl_}|W(KLU#l^)@VsjQ|_ZPlMZE+L>-zYDqVELra4TVBQ zgoQy00Qe71PE<(z{Qdcjzc6!hs^Ikf{rnTn`L6J_i*XX1>61sZ*EPPPR^V1$_&3Crs0Dj6A>oSa+)4c|+s`&$SE($m+6^73NCj4-?v z_uVn`e^VL~(s}N^b;2~=dNg0cn*F&x?<|xlh=hzR4;sB86|mwC5cAWgPYwPQYQ0vk z4c&8N5eL1v^z`(`MkqiSzPsjdcxp)rzCme>Uckx8X|~Ew&(iW^Wo2c3y`Q3Ddla2S zaY@NkOJ$Nne4V&QdlwlHEpr~K@FZY8*M|Vm^O@FYoM`_7X?VGjnK$L+|3jZVU~s=B&& z6$Q-s$B!Qkc#Nc^r7Hk8A{-whZIB7c$O7u3dqyYW{Hc|P;n{zxl5pEP2dG|W{vQz;2LY;&oT~p%56_uoUFFJIySVuOC{{I? zmQtyL<(vNjP)i307PaQMz*qnPw^{%IP)h>@6aWYa2mk^S{#*b60000000000000vJ z004MwFKuOHX<;vEZDD6+H7;;&XPvtRP+dXSC3Nf?g!JhTss~J$P_;OMu`W zEVu^`?ry<@>%|FN+zI|pzJI1>YHI4un@2(4s#Ev0?B08?wR$(<%8Jq$XvAm$0AR?< zNT>n;Tm$%rf(j2l`S5so1AZX5h|8*@qM|NuD6InkB_J#DPTh0q2*f)m;KLIQQtMCn#DzxkPDZu%nXiOoSTO8F5bv5#T zee-{AHwq}gQ3w_9-u-(dO+ppC6vFrlZ2QHeN!<8rlbBRs=-YQSQl`;G%^gECR&_)y z1&eaksE!u368a1fxIwKx3@4YE)Ad15^hfA`>?f zEHiP2LoUR#>iKSuBFuiZb$|zoGFUJ8u9EBd#2H$ph3{RPB+^42cK=2H7|V%-h%(}I zU9j4I&BvZo=VITD(7HZA^Aj4r_p%e*;3t!ByHWlfxyM39N_bR0-C_}a+Y2w`+P&^W zme$VklMkMadcPPj$O#Pw`<(J;c3!HHj1Ga$iL`itKM9BA|)p zDc7`7Rh^QDbZl>LOHfSw`t|qt{=|$kt+VsFrZKsHV1U!_d(6IXwEI~2dFg-!V2smO z4%bnF@CZHW-jjnzR5Zb&JuoIB`vDl3|_N_%sbfxqjK za^dM|J9pV3g4OSRGNI+`ldGBgZ_hK|*rW>b8M|jt6eI8o;Ou`~Qj8~vq!Sdp--;D+ z_xSgtBqQ_d*QiwzH5VsWQK15EWIw>p;5I&Irw7ApHa|$NL;9326%7wyVPO?1{iecy zb9q9}RtO;v($6Fm#r8IeI~W@yj!N!FiTJLd3A|C=H^^AT8t|;Y{Vav500ilNZ&ktl{Kx#Edh4@=d(V zUU7m?6S%-Z z3sEVLYKpWcnY$`jg(_`PKMyw%tAly6ex(h3;Ac2$_^`-&T_Em2;k(5FA(rIY13@*) zGc5PB-uSFC;O7?-J9yi8I}|N7!kXpY7lu7g#&z%K)p9=XD=8Ut)_nO;_wilr$=w`- z_;uA$OhadgV4XGX)7FOqEP7@zHd)&y5x0lz(Uj+trZXVHANcMQ_ z^xd5=5C3<6g;w>l`Z_K@x7E17O9qrD_SWaG-?RxWi+Pr5CB2u(eO~ar|DrE|Llryb zZRfhMFRM~HZp$od$ER1%QdVHjOOZ=na)dWzQHzU<+ZfPlP&WH#XJ==7n^s8yIk2Ur zB|4oaf%XM3gqwI%cv4nguFjOy>VEQF=o9DT>QExX$_Iln#brm<@Rjw&lB53b7Q%SHU|>XhGP z@OqF7LpULjliQF9ON!y5VljJYgWJh!d&M8g?_+=J59a=CZ#y=x^!4?Du}6wIcwODp zQk2wb{-Mee??6G*lEYIB%h@O2^{I+ZR%OjF&Q4hCJ)EOD7? zzXB}by2q`xD+lwWg$NtU8PoM^!_g-7<;$gRll%}o=gc_~BC_5~RVxCxkF019h^=SZ zeMgD4v2pi1?>R2}hQOqcK8?O7XM=i0v@m&WPtV-UQoC)NgbXw(mSZq-Oe*Y3>wX69 zQzkKIc8=q$MJMUnHid=s^GN?_?t&Xw2Thhn8nQE^9Q!%Rzh&8j(A?D@5vWaaZAfQo z;8^`)5R0L_KW6wvP%rueAjJK)ORG=EB~N_L%=>Bn%j{5sh_*b&73%f*{i6Kd*j#qi z%yO10KqrSV{SMki-6g#+WR0(8(kA--%|^8jasJNEV@QDdCxHt_)Wz2d@z6mzRp#2l zr9UL5#H0k1jVK0o(Wp)af^X?AsS@>~%vaZ|7>t0Y^|zt^plGcjJ2aHNeV4YrHjw+^@)dWi{+m0j$8q8 zM6g@;FAGi#*#3`NS25_EK-f8f@00PjGM592Ty~FDt?B!=2fdFK4PHARVRC^^ING>a z{7e~_(`0D)ciaraaFhdjrvs_%gJZFUObD42a5*x$&s2?-V-`=;$1S0G2>Kba5xQR5 z-s%za3BOc0;;4BYmR8FCJX%F1@95B3Fz*bTcJfk9`G5T>n5%goyPwVdyprBpn5=W2 zX*&wO!GBs+_MVb)A4;RDlNc`9HH=u@8RP)Z)n&A|WU`wv`SG~XYGq&dJhkpK>=dWP zG?n_Kf_2yCxqJ!`Tl%?v9T6&stz~(=o0z}ZyK;9QPS77pFDK*xT}`H|puHO3Pz49s zFpg*o9iO-I$f!aJoZL8$#ke#T$f(5GVf{NHG4%CYYUur)>vj>7h3xikcF9#{45<+x z=>j~loU#i&(_S)6S7F8{%ea$`iy{`XWgY5zJZkP=uY8eLU=;MWSUDwD^YuW!7)u!3E^- z2R)qJ1^J+s4F5cx|3aTQ8#J*R_iB07-wbsT3)}~D5Sk7qG$(Bo_a6B8e(#)pPNi_b z_Bj`oOLolEwhl5s`%GOA$6QS16H0c(rZ#D8d;6`QIyo9+P++B^?>17CK1>I3#_D?t zDa+gj^2c8tA0rMqA0L9@$D@5>aA}17$b1RRisSLFu8d}5eX|8mirduiqbm&kC|CT> z5IzFR1-~I9OdNWxSDIMj9*AmYDQD|0$+5W8dicmKjwvx1mIBlR58fKpTVE7%dF5xn z;)lwaJ?keT0BWY~&%$r90nqSk6Y=gRkB-5|K+&&CSBcV^IK07dZ7%+$5<-t^7d=~e z`vz67tCsX-A%0q8Z&3<>Pqp-E)0K{1)-0P{(mhSI^sP=m6Oby($G%XZ6+0_cw}6-d zgq?1$t$YPMz07|7Ma2RZTne9B4`w;AYnZiR#WqB&+rI+L+~-G+;H z<5(;}xh+tUhPN|rnqD!Jo<`^Pp$OBLM;uxJ#VeUV&}whAp4yh>vKW_9QgWyrYdBg~ z1&NrK)$p#3Xrpe`2S=Z+G2Ve_3h96kURG$+44xD5c=dOl{IV*m@Z(=TzEcR@ihD3< zqEL+5{)t-O{a|5H-L1e$h9f>-mrgzJpk1X|=JELR;0WKrVWp0Pm$y+PsJy)V^6~(f zKxeU7k$X;*Pm^ZuIpRfjq$c{zmR~{=xtF+Q7&oTsQ z0YEXC*Y>IQJIoOq-U=c){QpJ@Tigjhjm)vuT1@EHc}|9)6Q+uE`-H*&Jv0lM6i4Gz ztcpVWD3Fo0ZuA}=*52jcq<-V`IRWh0+7dtq=o2G9=Pt*fRIirW)1L z#_I{^S-_kHk zqviHvdD_?18F%UBwYBWQt)%4SDWypHh<+2NGM%XzjU1mA{oe>Xh znxLS+zaK6T9JAf$=8Gi(&=vdwx3sj3pyTIn>w0=Ry27F&ctBDG)>$+?P5WM4eAV#G z9n@5*;3Sk+jrH9mbPIkFWKq26^33pDjA%NS z|0n-*tLma>1*Q`SAeD=cdfb$Zp3Jp>)g@`*PP5I1ekk)6y_agoWD{!>M$3`$G8OC8 zx3g{dN5ViyO~V|kX7!>}?{k9(sOCR8`RQx>K*^J63Hm+;;7<2qNWEl|6d? zy;xDbaf8%)&d;Jno(_My?m|uyc<=58ClZRkL)Rqfj~ED2gL9`1KzY*m0SL8MzUhf^ z5B=NfD4I@sl^y;ndJ-N`!opa0In|r@BS-bf7X25u-?$H(lt*0oeh_xAUBpl`E_gPe z0pd_EH5125Pmgp_T6U3944@&Stl4XXJ@^<$A)d^wNkSv%H$s<7Z;*g0GL9Q70o=$S zl&Ga-@+}t`&OSbv{KFRICh`3?A0+d8e&%6u1?v}M(My~!uw)LkY$|`MEwp4?5qC#Y zGYdUzR)yGb!gYcA{0u(f9k?&NgI^KE;#Hq-OVCK0-`x<~pSbyW*SZZ#z6PQqPrEWT zhYm;BUKFv#3!wIQLM~wMXd{#?bV$3;8VlY1@xDrzg35I8$swf83qF&2|m zcBd>~T<~EL6^iU$x9t8yLb3`zOOWV9Tp%!9B@3(H8=-5J`Mj6Tx~TV^FiO!co;W;7 zNbzgZy;r*s69Lj0DoE_hT!+^IzHKiL67ws+FxFs57h+tVEC{s)yONIE&XxAbzzq%= z(`%Wf5Lf>~+DA*Jh66_DNb)slk(MDd@M5B(8|z{#z+60HD}N_H&r6_ysdq^YUm-Ne z`^#z;H7o7a#$-+SGMmEf^`^ru8o;Nss$9wmbhUNE@p0}u4nzoBT;3oBuAzVHBz%*G ziNfEuY6!DD!N2VmFH9+*p8g zd%^qu+7L-D^N2&XyIb5mR~!p)IeRtr(Mh|nH5><&$cah%PCq0pYe4vSHg0dv7w)ro|D&sU z5M!59mj->L0*t8Uhm86j=YNZNdwiea3s}h**qGr>^Y75l)+ylBV+4p^?_c*(2K=LQ zt3HKUu)Vl^YY(@vJB))_>#Ir%cMWxQ7C+NZo}Qli`uZctIyyQq80=uK5*IC`3gYLt zJD#Z|a$9gT>t<9Q853i1cW56gi4BQ<>E&dG3ioqA3=epaSm~3&D%ukFC~E8ed)VRI zqVzbTaZ89LS*z1G{T|`D(xwHJmI0QfcXwz`NqGCg4OP^v1oH0g*AHG7P$+b3bMw`! zSDc(&y7fc9MpKhHKd=zo-`$PNX1c7e!!64*C}vQin*0aBT4ShzZGq`{Rc=6NX@ZcK z&y`Qqu(A>A(xyM}+98DwD6(uqgHe^>2E|n!EK{u0&x&YUOhFh;Q?PhTO!w-=qxvhx zc)7xgrEf_|P%Fy#nVFeX1$uy;I6A#^>7l0wq%ZY?wG2x3bd2QbSIR8M@kgHJ&*cLq z%}+CGU0#-Lsgi*THg~61uUEfGc$6N+G;|vSz~^;c4g6f?AM*ze_B42Cb{Km!`fMKe zjmx;WuMiNHp??Z@q9_DkFY)O9x-4@BJlO~I`rN>{a2+hVIvaYUI+ez;62x2ApYh!N zneCaF`0rY$HORppAdU9!85Gmq)Y4P#5!)BHK+gODY^8V_W(%t^C&@fsih6wqmpuVt zW)^hX?BjiY{6p|ukXg{5j7h*$Kc)$9EG24GWcn@>=YZy~g?DzZYJJ$&rE+;A*F6O^ zp8*+Zd-(g)k15-S{1#Bd0+p@OWOM&VQnRwMqTj49a$mhTO_A2I)k;PPG0b>euq~Q6 zu0Z_~#D@_SakKr_G~b4yrAe7^kMwdmyElYR%s0uzGQdF{|>Q@_;K)|Qcxu^m1HC~IjoI!#L@(85uAnVffA`XwbL$rU=!9~&ex zd_WG|-rmk!J9+rix#oMZ=3p_JI@uZU{DFj*!!M@MsiCI2W)c;sy)z{&A9UWT)}ojA zi7H;n)fpfWvHUp~)7ryuyJwfMrKxE&gWIKlnR$w!V3N!Ko7~PZw3RUeKJW!Dy+RtN z`35@r?s)n#*z?ScI^YO;Y+KC4R_&rK7M4%8*hS}v8$fxsiPe*bFT4ZTJbTnlQCw*9bg1*es?ElGw3u-%k0XD(T%jId9BzNs-tZrLIoJs~t-;MT>X z-4DFl7{l!gZ`|uXXgZ(Z^8*UsJiSg|FT8lgu^0c;u|*>U7~kJ6)g}>x>HNCvrs!9> z3BItXy+uF<+v))}P!)@b?z9Eh<-<`KTtHM zNtT`?=f@pf8mb0!r5AGOt`4zrZ>h`9BpZIGp3t&^VOXEOs?i!^Q5}0^Jb5IAwPja6 z80JKsZbKrlkOG;nTB0q>Qe!X|^TF@KV4JzeLMu5%H#q>$qlzTf$3#3(q(s1{k{)r> z4Uho-E&ADNr4|BGW***K1=++OE?^N-fM;D5MDy#R@EbJOKO}TCR~89|4A;Xy;$)OW z0AJVg48w?sxDO5)mlrml;Q^4@3~@AN6cK*JVduY-;`qJ&214)-_*V!qR4oYHD&W;y z6H&LWi&Kz}IFzY6uu8AMYd3Ot{ze!JJy7gS@i}{1*OCrVjJWm&6)|(Zxa}Ya(`!Vy z$N=4cgR5}xy>u*3^-}w{x_~jUCgF)+hIZejzsPiMbQ1g)wUEWk?UQTs(+&I%Ad2G` z^eWfT<8?j62orF6qUIRCdiQ*}61MK&Ar62NOEO+O0HiwJU$Qc&uPhFZS6apbGzpn8 zF5@}t&s6Pjf%S;@u3VUr+DUk@|LEWI_f2F(@O#~iQ?`YMf9s7O7fVkd!&$dG)|KTi zfT@ceV13v$7QdB?jIu^rM0|X>50wC}e(BGR^Urg({pLh}wpnXC!dT4&xrr1K*6q*Y zbbt`iQNP=MbpXk41L9YE=c9h_0LP-dvsQHN?Yu@)d6^OPTZ70GHQ z)hW^TbZ&9a_|3->I=#HR)^~r=LXlcQ)HG3uZBHd8qO6(y_Qyq=>+b%zwG;@v|Dx}N z1#z|c7Z1H4t!51Lh?Ox1yC*!TW=xR8&Q^@^=H=L&{rj7Y>rO|8$*2+`@ROe-CrXPj z&OGe#MZ9Z#WFuD6_XocxzUTmBzjMO^s876iyZ>0Rjbf$% z-K+3FBK*8`bUS}|mKz+FYb|4Etv|@gdBgfsz$6VALkSNQvxG`C%i7!9i$#U}=E`+m zW*O#Bil-!G5g&XYM3LB=(?<0DM(Wj|n*XUG3f0MF*WjMatFF`Gvv{^j!Nb|f9T8-s z?~PIsjU+S|ir4Jl>s_zgeh_MakB=|ErcF#vPEJTTU-M2=Q`6h~uBHAUSbXC^-e|4a zWj9et+xXhrT7N$sJG(L^wz`%UmzzCa*GY&R;7K_;Cg1gu>E(LYV7LHJD#@G-YWpp_lOgClWG0_sQ>Zt%@S+>69i`q{pOsAev-wrWya2n`%8A zK;E<8{3G&jWK-EI8g0a1-xZj#Qgog6ii&LnC5c}m1K6mQS2V%mxrSAp%`|he=l}gK zK(z9kI_{tC=)j+X@muQ)t&tQ~3V!E;qxUUqPhjx=Mdk0UehIfP@E+bEi-i0ouv=Q6 z{%lsB7~CSgd_#TfD+26Yc?;aYTwBt)$g(HqVXl{^cW{qv;DCtmpDC%RHZ}_*TRl#S zPE?laGVr`kES}%$$#_df+YvGZw+xr_b;1`uDOX!-*&9SPQgXZkEneQBR`B2JR%GlT zd%{b>i|pUjwCm~Zm6w;_+S-E4Y5K1UmYu1IdqufhfBSJ7o>yD>XEwiU0jr;5s0 zcoIhf`fekCUcPQ2^qdd1AEmvrun1Rmun?ejRjLz&S#DgQYgOq8yUZ!%DyKG3MrWPn zt223=thTSGApz_kdxA^%OG6+m1-p_(|IR}q`vvX?7mwELd5NRp;NZ}+bmG2!n|ZXP zoBlqoWdjGHnrz2g-+Xwdy3O24IP6wru0v-egcm(~=tKTxf0e4a&T_gXH^2SrKUEYV z9-B2>gj>>w63H8h=%U*nb?-`fNLf_jyAZ>7&(BQSj-b7lU2>wdNGNFdKpZyg^DPdP zreCht1$H||@CsPDJwy(oE7Qi`=+5T)l@0r?thN97^|nbxa%DkmyRGZV;aFMm1r6|) zh{ZL&uIi~=L}jka)#?ZHRhNm?JvttMy}d8gWdu$?)Vr8J2woiOh1XR|GxaLzGt5yr z1@@``Hz+~#r;tIuyF_w=mg{5bZDh22U_PDKhIE!|Px0Yf6QAH~*6sAy{niMT9}cO! zb*1ke!-vi2bPyFH1{T})$P+xz8ikiUx_{>MpXGwG)iEQ?n0HqrJf7uC9CunW1yeU! zxA)hqWNMgXXzv#TzhG@+QmEd$%5kNa=h<`fgPI{8R&gUE`QpI3gU)oQ^a#83H6Y9+ zDL4DI>`I{PGjU%A%+Igr<^nG8@YQUx3pc1Ik2PcE;$2}}T9(%cO}H#3(Al}mtZosFc;@bp zMF0Ko3Jk-<*7aizG{wxsFer>X>U{qxQTzv;Na&SHO`r6y>I4v$>CCNZrg3r=O^n^f zpc8-jRZIO(!e+!(K|M3Zv2n>p?FtbbmJi%Hj~710aTZaG(fw=FF>dDfXgpc;sX9yh zZWWH-Oxovhk;yw>ky-X}ElmzhtdKYR-zn+Pr00w9!;rp6hjipiDU0y4J8RNyF;a-6 zDzNm2YOz*3w03gvR2YE3KqNvrNZ&AA|*B%=fG#f}7_P$7lCo+|6*V0GMNWA5I zq4)iYz;iCD8+QWyhsbEN7w~V;c%F5R#x1u7j$?XM7#$s26+{Fm7cum&A+;&uM-I)noSwQRt`K)X4m5jlT@w%0!J{BP+|OW`zdFMi zCthEkvGseJ{{k{b!NsWw@~DVjZ$I~mv#&O~LoAwbVn5SeD2%A4t0`xQ2g6gjemw`h zhzI>^SD;!5DMN`t+Ut~`p1JvLJ`uD0lIWmfycBwxS}8bGIN^15{CiYqH$yHR>TLm- z!dyQ}gl;AFd-q?}YTF#25QNE642^^0-iMvPdayL19Sm27jYaxHdhS}UN2}Fng_Fs4 zA!v@>V>R(KukqGvIH|r!iq#k0)(1%nBqqVal$S~QB$=-MxXcm*G6S%~Y(SRo^6u;FNuYe&@$_-HO$#-pWR;wsxoK0Z?vg{*U`Q zjcy}z@+oXbE6upTs0A0$c5yA(>c7CvYQ8k=p{1#%wHDdrG)cA3A*b=R&715|+qACZ zQV)&*v4#S~-^l)i%uL~cRbLN}o2I6w;Nak>(I`zj&i{V*rlX_7MRk{y&l3O;;k!p5 z?WDN4TN@kk2??9KyIR`X3p?+&^4`xR&R9QjaI2Q`_&c{{^wEBzSW=AVOdGX&D@Xh4 zu7p;VI!R8io{^ckbyAGFq@;u+O@Wo2Nb`4#nb>8Q zf}YTEC>FrV%+@Y zrakN{AwR#6><=+{6r$p)%r(E%@S{ZyDp3LnrN6FE@CShleR_HlBCo2ebL|R*1C;eu zSqLKa>R(`CL0DO%V`EVQH#axCy2RL0&;iXdw^^UEHxarWw)~N^0~-4Vig)~mUn4P9 zlm3ak1ha|c!$*(o#5$>>&P zDI7Kd31QOt@T>0NUmP39K%BqES$4j;CTYhl_RaBpKtkt7*%`R=n=FJwK5T5Uc*rW^ZICO!G1oqo zLdBtrI;_yNhvN7E0bm#*SsP^;PdwO9SMYf3{*h1m$)`%!?qa8f9*~LXGUVB3)kbV1 zrq~~~I2y0Gua&#E)DQuLM1G$%Z*(h!&N1_;7G@v5;s#C^%2hu8+kI-pe@FKybqjlc zLgn2g(H;$aY4_hqmtMZVsTmA|dfB41iU$5Rp#FE}*QrN3q_vmdhLrgvHuDZM(MC=K zxnvjsWaAe`q}nI<*l&`R8Z*im`=Q;(!lAP9mvjZpv3^Ez%wQtz3v|LEmnTP!yddoN zM9)AKFX4qe)US(2C&QY&`38w9sThB;ftgo47)24|eLF5(+|;08VJt6@Q8n3-q?5;` zlS2ANSHv(XA)E{? zltGu>8FABye*Tf;@k0U$=%BU_5LICiCCtr|-0WXVeMPcAjt~f$P_Go#3$ejFLAw8b znQzxn^qA1Op7JpBZ18kwhUE8KTs2gF7Kp=xg=g9Z+dddHkrWMp;SApe%5P9+rj|EF zn-H2(O4_g1HMe_-wnFCd8LP&w@92~iwaT8$bl;!+`P^EgHZsATmk@#3XUI z{ng7=br?@MxHgP8YVTM?Xd$`g)}OXE*YHa$sj7-QHV^eVrEdSLfD#r5-Kf?%VUYCo zDzctPx+}YCVF+lMnz1c3@^(|-yYv@PK-pV3JTTl|I3?lg)X&I7Mrt8q{RcPzt)!<3 z14%9qe|4CaR0xX~r#n)qO?kP-x3jpDt)0=#&H?GM8k2ym*^D%PseM-!We4BGE zZl2=D1fz?I4_1?8)m5^h6{JZ#+A4t6wl`jJBXwEenD!le zJbyyHQp`PW`!H=%+~&r!{FxM=ikV5$V#fU!KSc=n`lWx5&;8fG z0nJL#&1|oqeTVT&_g>k-qnc?D)IVkaWnU>m&aLb-tz9K0c^XJ{jG3;_wbLTM@3wL% z+Nv?S=7SaIb<51(%l5(IK)MCL-c3~1{W;GgR_0>gl{kN=+3!|fDm41VpwlEzolkVp z|M}Jgbm=dwIQ!{wv=cY+mFWFL?RdY0kvLkjB8~XZl<42WIP05jAFW4waJoqeCXMS@ zCYWwdt#n36zJ<;GUr>NVk>i7d`>Nunq`0`>&4F(~3Xcy&VR|%PAz_Of#7JV-Zaq8+ zwqvy~9(IfGv}Iq6Yg+3zO!DZ(ek*-0ox5C0`15~53Iat$EJjmR@}gJ;H{;ECkXz-DHg^!9=rV zMpgR6*U?}v;-X0sas{fN%6QDp&3TDsXt}w$>D34oRwmdq-~!9I?2#jtc{hHB1z=(5 z2lz2$j8f0yiW)v~8&wN7Dwgn0+x;sMu-cdis3O;8Qez+^0H7wnD^Y$kb8yAmh=Uf= zfZX5##n``d&8{}_Sb0g1dpt9t)pQl#p@fC8&4;sOaj?I&bNM6igIZOa+T#D7GVl!M zQ2ah=sYvGX*NwI({BB)ecpV@t zLNF6sW}N!(l>|&8b^wU@AH{^i!ost&Gmt*$lM)gA+Hn>_JIm2p7M^#OYDhTLH?KbBHLzg}knq@;~HM$iIC}b}~3f5)7=p2yt z{Q2{nkoYJSkU*QYHg=f(?>O(0{vaSm4#XHH4d~I>+tBIbnX`}yh<>}p)u;|vi1^2) zFLg~#e1I~@Ks-(iPeagao=3a|HzjGc)RU(f>}(s!dTIJ)fT*K_=*W zzuclaFL4qW#x;ObgTgkh2x4F+=}!G039stsl|r(h;Dy9m)4Q`FC-b_(QG2@~C+=Aa>Yo#KV&T16orJ)bFa})MM)4fLGK) z-ZK=G!QMY)l%9$c^PkG6{uRv&4K1lpLzX~X^po;T4eF|t;+X(V$ZbUmLo{c z1PR`-#vV{V0JefgtyFZHo3pt|^ij2uKJlUQ8UXhGcz&bxdsKcjcw_CK2VcJ}OwdbX zoD#x`Nd}$u=9|}g7(8vLX4;Kyh7jAWUa64fhpZ%OO}MU;^*?A7EXqyZ=P*clnm|aX zq$PkA!b5?#3s=7N?gzKu^>q^UEtmdE&(2+NV-0vt9G)y&$1Q(GZckH+4^Zcx3K7Dk zabh8%LXiSqVmQAh#!J+yx?kIA$(TY0$8ah1KS{ca-#DhSZyT1P0UR^JLhtX`$!w)L zvZ-r9&VmgaDn{p^3MMr$GTImp4r|#c685@+Y2gbbUa9LK0G{XkApO5Uz8~~NU-G4q z?QSHr#=>JV$jqGjin91#vhP^W;JvD2wPvf=?5jIQ;Yz42Rq=6?SzR3ZS0rJMU)it| zWbq%7uSd5}kRq}xXQn0F0MG~NB)k>Eua8e4)@}}V0UeuLTRROFf|fTo_SIAII8ax7 zS-3X8AKThG?e*q$Ef62%ubPuLKjs=kptJNrS|ayzZta+u0(~vQVT} z#h7#A*ZcHOyU+&qSUspOm+mk71&Nk))q+)p2H#RHJ-9AodL@mw@M7YKilGuev`%rI zvWbb=9m1ZCW|tn3BDTyi2oeO;COwPt;wL^vzjTW{BOrL=YD*B$!}6v)^DJC7X#?7; zTCzlWz22Ef*-@N`)XFG{`4StcSzy^-3N#&Zpc+2Lm@9;2um)%UgEk_E(1M%iPn)30 z1eG77EGqbnm&jbQCnMCG0?|0F(%$E+w6lMZSt&?a6H74wN(~YbKHclFOOYG48GE^S zAs(Cea)+@g2jiJRZfbcbC@p|KbI$UF)*fVE1?dmAINA2N=|s#$I@zw)qLq+-o``xL zlLI?XTKVOe9MwGR3A^#Haw86vJ(#{O^<>a=HLqD!h-D&LJnFex9HwGXvfGWdm6v$M zcBM0iyjyB;9CMJV5V1E0(s^l(L5M6Fc5G75G{`HRdwZZTclb)fJv>4Z8v#KgUwmb= zcO?j#aes?uhtGua7kzmome9H`{keSZtscE>TNV-N?`EdRm)~XzDTG@7ik|Gsz^(7j zz_CU$QUzlpDd)Wf-GfhMG8Hmk?>n>>BKW4OUZSLG^6kw9F57FeISXF(T;Ag24h5xD zxWK~v-l9Hl59(I~Opk5xDlh+)*G6Meb2U+ca6+Ta{%k>7u@c_wQY#^i$y3XuIWszQ z-RXA~@PIa=)pyqW%HdGtrkAIL{Le0~_i_e_tfKH;&AJu61u}pYr_S?_DL@P!lq2Ge z+jQ#+(N|f-2X=LFyQTF3nl|GaHp3)Qv`DwkejWPHkCLxLB`?qLF)>|V?=kEjFyJ|6 zfCz%_a}7LRPUbM*lXt*1tZOBT=vh=A*Od80$iWJP2ApW&%ywkGM^>?`j7ND{MdtCV<8 z6gyPtGfE^1dD&_@eg%^%3e$?|{?GSIHma_71 z=fJ0s5XfjMM-VK>eycd!Um(>9WD<&LoaU2dk+y>)BO~B^w(|1w*4NkjBMEL!*0NzT z%Q?z#=6qXL`5GEJ4awwlGU*+_KnpQh@A@onWVC+-P4k04W~^Oo`?&SB)^dU=X&4+a zK=`Wa?_bZmLfJ$Hkf+```T9PfoCI{a{Ax>57QHB#fo-QJRIcvV@7DrCTo!Ur@M=)YSTd`e7WT_aCJ}L zpO_yzjjh42Sf(2_r#O4~chl;Fzw-c4feGWP9JU_UN^@ZcQ#B5t}FWrDc&1xB$ z3(cf=x_)S>x0(NAG^WLfsYF;L(_kC^M_HU8O`lwpir&@KDI4FYNZ>&&9285zT%SsKnypuq`bu?@A=7 zpPzxg{_yay zudi=vOtk@1k{o@aq=dvm42y0XDqv!2`uup=iGYBRhWXQuIND^W}P|2#x|gUoN2EN9{u9|Qu%)L$^V-UT7E8rJ>Yo6IMO41whc z1WoKVK5ST7TRWGJY}}u8iV6q_ynXwYo7-*gckW;enW;dYJ0o6%WF%psNS1*83f~>- zf6A~8$R9p@V13qK#EfUc%U+L|DFR3z;!s>9*AovbjQBhH|ED0v#5R~^OQ?Yo`>f!OxOUUrkCq}=vrUGr2 zjv$KrW5xIwK4q8VmFB!W>P$t3B)QJN=aCz|q02|wpQC53xziLh%Vw_u;O_e9U~B8* zD8?aL%GBGtMJoR_w>92$e8ZR-=VZx>El>J?UFZwNBvXBZ2l^2xzAPuQ$h@9qih6C| zzklCb7HLQ(?0p&anoEH`amXz1IftH>c6(zFdCzaC<=@)dv{l}c-Yt1ceG|dZ(Z-@<;Bm>KZKho_>=~1Z%?7QJ8E3(Si1%N*3r$4jKf4? z>C0PQUf!ahmS~3t-&)f_%;o8snHi)B79bD|yI9d%Fh=>_ysqkI-X)G|sqg^rA zSJ0O%&B?`Cp?NUHo1FaZ8~7|PF0NT=oJ_b+w?F^@fQo;20leRWM%n;_lfv&oWrXJW z@vieyyZdZwkk@u4N1f@&-LOD`-skXaP?tQ{63(dI+ik4arnIzlZ~L$9QthRkh)-f# zTJu&b8E2Zp8$3|cQ`)^F_IuWgUeW5@$z^Jd8I}xj#`g?B1s*r+{*rc z**;OYW~UU|*H3wX69;4^6(uUgjlcXqP)i30fM!8rjy?bY4M6|^P)h>@6aWYa2mk^S z{#*b60000000000000yK004MwFKuOHX<;vEZDD6+F*7c3ZfC5!1yCH()-KvWf)gyk z0|A0-g1ft02oAyBf@=~qXhLvzcXtTEf-|@ibdVvy;P#rFI(1*&s`u)@Rd?4^HFWp% z-o5nu)?O2?sw{(rPJ#{q0G6Drq&ff~@c;nAAu1wxrZk-J5Ii8cipy!DqM|OYtE>UQ zD?mbJUX7kC)F;|F2$7!*2yCz%J~v&4}P-jU$FgrE$TnB~)}^W+Q|wG)}@;?eExQ!B)Z z9Vd2`wqf4QCwwd78JSFMvIls7V0bXfFgRXNm;rCt3IK!U)s^ zn)J#EjcKgf1Jl>3$1HWokZIj5@T1b~78L8G(mjWB{7co@rm7W#uv7s7NW%w3MQV*% zfN##C^SvN$i^V&)`GMy^NT*hMrtE6VCLJSDh*eXNdeYSZYN?EAu z<4&)ZD|b|dmg?5mm$!VUt?wIOZX733?3YiCiRV7$Et6X(cQy5+4fZj9KmY<=MSmcV z>+$D8MV%pR+WQeCTFXYn8!U=&kC)J+gf+Ua@aJ&L^?-;z)ukdzr#ZKc#>tn99R?VEkd{#2WFD9l!gv!`{JZpO=w4g^xr~$=h_tEm342 zOk3}=UFz@K?M}Ey$qncUA`>s3m*P@zQTbbEp2U4>oqjPLQG7o&pL~zYtZb{ zYs}94zRLJ8rC!M0(bo26cH`l@>}wbdCMPH7(%e>66+2>4X;9l>n&xqTdzEPDFITL2 z;@LJnt{OL}sjXf3u9T;v!Fg}0IDLgejRZc;pfi-(Z+0ec(CTi4dvrh1je+mmlI+!@ z4r%cA5bHO}+sZ}Mj>0fG-!OcLlKtTh5^qS*vOX7>M0m#`}#VE78@L?gUYDmTUK!DM={J`XY&~t*yP={rh7Cb_qLAVFJ44?!9+R zu=Wc>g)nJUliK;g!9hw&%rW&q{HFKI-VbB5{2^8vRDzxD)X;2aN}&)dS`G#)Rd>IV z(A&mCGB(@${c|RdyV#q7id!!ugSj+~k}2YwkD2B2 z;ZlG8@&$SbwT1@8n)XMlvE=9H6S5h8baQJz9TiCS&+eKhQrc!4)e@?1tXkGkHqyQi znV(4A`Sqmvg3+UM-j3Vdphs>t@jBxMgEVu9IlIsFZQLpbsrC^oQ4v)(BJ0gjE@FT| zhVKpPgZr4H?czr^GI}rJ+NKI6%Z+6Oz&LCEIw=9qEcFprcnk(l5l+;+9Kz5TKkh9VN=h~ z&hE4@W!)2kWqO^Dgz^qjuoz1-QhsPgP4_1C=EsLGJr=!}sHZKm{@-@#_O|?<>-PB2 z4GAVM#5(mkeLtVSM{4+K!<>b%q(X?F((IUBc57C9pQCwVHLLL{ks|L&jdKuR0%QWg}l)r|C_9yzu{rn*NJ{Pc& z-@g|+{BEdYglo>C%4sz!(G8I5T;*p@*4SqGu_sWiRiQ@w^wtwZ-T^&6GEdzXI@r5s z3uh5lr*+M>v3XS9)nQ&n;J_F>1Jr)@)e(tk3%48O^W5Jg9YFo0xXP0>kpSZ)7PS=J zT-qSi;Gd6+Vs!Jcb)MSGXeq7m(58PL6uTPmU_cuubbN^~@&G>_HF6g|+tfh(v~~er zxK6E1_CM?DP8!|}*eRK{cU}XX(Dh0$!!u>%?i#Xu1503vlHS;O z@b(@2PLt3_qmba#yu`EOyAev^-*i*aTFmnFa2%roe@Y)kT+@5Qc0Rv|{7+b68TYn1_05pGIOp*|m1Wox;(lzSKZ z-wZ;mwmKYKZIz3fpp}Wvo%CzJe*R6Q@Yg~$r!MPmO>0phj0*Qoo;$VOxEt}>{B(Q7 z=c3(%i$qCGOiW&0zHs%a3Gw)JJv3v4zCeaD2*-m^Sv$^#+xNNLiHFjON4-~250ZX+ zP@8-5Tjl~8&*g(zx)p8synRoDQOVVbetr0P?T+kLbG?1#=vVSvbr1j<58;n>b%~10 z8W_;U1TjY?V0iBuu6DGFXOCNP!eI%&to{A{^{vf-klQrP#Mrs#5H}UM8 z_<#AtLG$yphbBDSpGu*O)_t9o;>G3pttYqbUvB-rtFZf4PUov4(d$OeWH&dGHh1!jD=TAQVKq^ zy(`=OOS(_(h32(yDdU5dtP{?)w0Z{73q9-%OD$*|2dBsWRdL2yk zfB5jBh{*%CbhV)(!p*~@fi@{grRJvOrlzLm?0gKjhFtjyQ@*C7+ZlTB8{9ZH^j(+o z@bDOl*Jsr(oHc0q$RHvTF!@W)!NDOYc41**mb-&CamaEcg$sP9a%iLFSVnII0mt0} zV%%_$uUp4nE+ifX|o1PhB)l!6C)$-j>K5fb%r#;omzKq$sdVTW2=s$ z&hyOL{+&4-ar0@~mHh8!)aP?voXo*k{hsk7Eng{wTn*}S)>vRo7flgg5OTGg@b%mp zd{e~&)+}nBe;UJvFdzaDH*2ZBuy5zIk?(FQ$ zOi)@>B%3?&>(?(qFg_`EdK(uiTAXBRY>DiwRGq&W)vj}MD02*bV!^6^ZZGE_gxR-H z*{wE_<0mBJU4MR^M;H;?NrQ50YL{8KwPe6sS=fK;)O_9aC-YZi7JOrxjlQxx2%wV{(aCxk2)dzMGA{)^Q;#NqVK4q>=dI zLf76r1eDZ>OMOpTGmABg;4>)w<|8RR>Q_m|9&9EQdmv{N&8!+8ZF07q?kSB8H??}3 zGE9n{NY2=7a(dL}nOP5^YVwme+O857(LNiw+KWD97Vl^_^$aSEDxOW@3c;G6tbKv* zog3Tl4^1d4{+6NmFb)8tg9*z>z>&Vi2s;756J^C>j_qltq11Yl3|6#` zoW|&(8u?8)28{IO6l;}}w~Jfi;M)|<>yD*jA?^sbhuy68`wBL4X0?YaI7D%v(2`Lh zb$U!Wg6#IN2wW4E8VPR+h-VzhS#0k)z7S^iOcFaLL3H@IFIT2s={Xz@{PC598zg@` z?m&t)a?&rl-0yrA078qVi4+>%+M?nDtqX7OVb%9nC;+?F-(UD-lf8R0;IcU(-^&^> zCf-G15PyCIZfc($3lAwjB&v18{MvMO5SK40Sme@PxJoRS3~||GAN@XJ6nz2!q`ZeP zggsk3YA5-NThIEk{lK;LW6B|Q#2Xip!jr4{5=Yjhs!v@}V_vR?OMe4DG5eU)ZbpoD zOe8c{4}PM*Mg!P^G;Vnbr|n;xHa(L^tZr`S8ERq=M1;d|B4YQFwyng{v!__{9)z#~ zpb@3-$xZXhj~~P+5vkl14AT(Ww_ap3rL{SQCL45sXr~D-8ZUWsORLsjYaZcn(iGYd zFGb9KS9ea*yk2jVrsGTz)yb0`h-Lf4?PT|N%K~X;dHCUKI|2~GU#5W6j}K$mwGp7q z?0HtpMME@aVV1QRkVrcj!4KyDs9f_^{UZ0D;od-?SP(rH8Fu0b2`Lo}J_Qy5O9;shrDyv1ce0Pp~huZt2I4UHUG)M5s z(gi_Z40b!E_x+a5@-=h#N|-Db&_xh7+0{M8Kp;nD>%D8QO0NC(NnbscpR)h0!UvMJUXE}i5)&pmzk zeux+|;=P_g&qnFkAFo?-tZ%-*;e)=aixc{w1OR@Yn>n3`XluPB8uE(Nr0PAQq@euFr0DjW11TQU7C(oCo` zUu~(|@5(W4$5Dp6br*Z7h=#=W_d(1QFPa>@U#FTc52^);VgXq(>}Uwl>&DKI2ZIJ- zNmJaD-(|bJnF#cXXz8H$9%V4Ex|L_xT*2+ON}MS@qA_>3UJ|^%Y;w{89h>A~X~!CE zYNb0@1qfW})+gZ&{7!o|lWPu7=%)=)ent^lRxUAfk!TAAEm_i$Gr+0j&&TGR3!dbc z8+YE`m@!erTmYa4s>Nrvgsa0TOVXBIjm34t7q)vA`D{+qmi_L?SF5m4SVV8WP*3UE zg(uc05+G0sG}OmZ*ie8X_LJ*gGw#j=mU8v?+LBlo9tHv|h~c)5C4Xq$wB<&>rcS}b znt5nLee5K&kb!Xzga0gIaEa(ww5vm;Y23$& z6f4QTk8`*!r{l5Xav`TpJ_+I|Mnt_Vnr1$JIWufhV}emsjq{ z+7F~-0BdGA`Q2FyZsi?qQjqGq81!CJ8Hb|6`=v-(kh_4BcC)`3HZ|47Of`=hsFmM* z;M0oc#R5WjC9T`wpqfl;8!$CRc>#hjC+h*8Q4kx-yvj>24Y!yKh zRTlZbTdplP+84V)v9fFkke(+NRj6KOzE<94^{DZKiiUizK?TjkfH8xY@$of&3OyZD z#M*JIc6IeFx@=gdpW(}^)-hX-95~MYP$Ff?DU_geV0kyO1se?b5$7^Z{i zv50WCSo8&0CKU#_AS;cTskl(4KW~IMi988QbTjAln%4FsFgiOfr#f<01UsIe%sCE6 zV4YRHLoU_c%e-or%@(_(2Z+RR@)0=BH+l36+Vx`4oHI#}df-{cYj;2NE-qJoo@$lL zr&lXk3hEWVZ*N^|YzrY5@CF0uSj^SdUZP6dUu(FB(bm3CUe-S&o zYW~fyD;&HSa)W*0aoB&?RgsU}?BQmkIa|nIZ z4FK?>C(ILjD5&MnprLy&VC4?pj#pku)dkCgU{^6h(odSMaEe%jSF5_QE5+N?`ul3` zhD5NSo-kF)@V53dIj8{kFV-a$2c=&ye85RwnKYl0x0dI@qxqa#S3Ly!ErS$dnneB_ z^ZNp~fq(n=-VZd_UvHN$@0#OBt#sR4Uv;jKz(Re{K_WL1l~9EQbn&f)(_x0}y*nh_ zDJhb`jXAyC{OiAjO{N$~8X)~+7A`yHA7T}RBOH2nU4pFt6GfCfikhG?=uh2v1-sm! z?495ofk8g#h6)iTwPk$z{_XD`Fzg-Cfk6DV^TN{(zZ>_Xd4qTFq*22oBlT-M2iv?( zz2~)aC+r^lecavM?d{7&Ul9rWUe>fGMv?K=ESm?k?mO1kr<+NE_8PE$MVRD&mSu@v zzJ3?CHANXZqAS3Kcr}sr&==Gs!bNki+Fu5}xOXiPoRVOtR9t#=_c>hBT+Z70HuL?2 z$Vg1qL|e4-3jO99@ZTYA*2nT|Kg{0V{=xg!2rvBC^0E*YmlkVcrl8je915|WEj#2K z1?k6zizAVZtSl;o?Irwoe<4#U7xJEym%Qr?~fThbzmZPB-HBHLPekytZOD zH}cWc3@>?*fzhr$dKT)((K9r(-|n%BfsIWU^dmlA=y((V=KPQ}ou8kDrThj);d}W> zl1ffld8N&|wzQP#9}}HEtL!*C*JEH{5EBzStXPF#(~5`)Qo9O*aRbUgB>s!_A`;!q zTXjv7JQYWGB}a(HwwkO2-Us@+NV{87VU`g#IshDeirSxSuwRu%)j1nye5`kdhlRbr zT9erto0DOX=zwCsuMKXUc6XOD0(V z*{d!~Bx^^oAD^rSM_WjFw~T=z50^fm0f11;A-w`cS|&EOonudsJmxiyrEo>`tjp$4 zmXwq@v}E!+|1^6WMf8S>_cEmI^uJZjH;+?Xo_|o1ib&v3qd4N=Z*r9S1bFwvkInPb zJsMno!Qp=bNY}*tiE7sWsz*w6IA*I7;o?$$ll}Vj>w=Uq&qp>^s-V}jv<V{mV`CPP(69 zw@R)b$XE4bm9ovBbA|Yz!sL4K-2o@#hT(iIZEbw<+q*k~j2h0FsVVr(CzFT!J5r<7rV|P#a3uRfvlKw1I4z3IFozq({rvTw?gTt*3jgwu?nQ&e?zJ-a8hcJRM~dnrQ_s zbL7gV#C&6Y65vUc6v2f^AOTguENUt9OOs8Q91$YT zZbUW)Kp=GujXXY@)aDpNwfkc=t>u7quei0S6(%e!96`WxeZJ^8mLagH^dqDylEKKJ zNPRDIYW?ekSoeoSFoa}b&oQ4YMGow}W6_Fk7t0S|t-buxi-vf>h78D<4rP}Aw^Y~r z{(mdg3Axh+1%(9RiEp};@m33Lv81e?l%Y+697jL~nO%sUNcV~U`8Hp*f5l7*Lc?+s5u% zY6ah!yC0-Wn6w=8dgE1;dM(}_-2!xG+P3kBte2aL`QOehF89i;SWCpZ1NW4wwy6Ku zC*w1V^9M^y z`a>2fzdwCJL8a6vR6e|KCB+Ph9L5xvRaeJ@RIZFq7H|l6G#c-JtNGHagrZ}c^xs~9 zMB4>-!}0)l+!~?yKYy8u$G*Zs4p}j~-}62Dnpv6e=XHN1Vt6-J z>=M5+H*)6Ok&|d4J)w8+(Xr>L!+`)ek#Vz5z3;H&quhjy3A3}m$*=V!M zZ`kmLr64u>BI+5V{X5HeeWRX|NzzOa)sw+VNf35HGtq!7OKxdvW`g}@x3T=!g$MJk zbZl%fICzAFjb_K+uTFO^3R+WB7yBvv+U#!{dP1=?1w54LpDU;FI$zanQOiW<8MzNd z>V4!laBy&tkoY1=wSMe5F);xK-n$|D0I@Lc0rb6igLFm*P0)WIGK#ZwFUiion11$g zGYZT|LYvnfABPrGPg>-U&M6J_QkgBo2i`UpXux@lxqDxf zN-4Qvup$}KKFEros}cM{G=H4QNeEA1XvEVe7iyodqcEU{1?+z)3nQX7NXd|5IuOn)iW+5a%AMZwgoj0jYDgiU5?|3ZY-jDBF_jtKHZ zP2rl+`Ff-ArD_)iITj;PXlb<`qH*tVo3*l~NKQ)S(3oz%VRG;q0DMB}vAk`2ch{uC zJKzK$cA5*SD*H}bLL+%l^Lj7_`t5VAmy5h-Vfe+2V$|;4UQH(r%J}{un09yGD(t$w z1rsh-4(Bcld1$@6?k^byym!%PhH1Muo11?f?^9k|zq7@n-AmEh5chl^kA=k2r+0b& zx#^Y1eqC~5VCx$e3-P3;3my~P8h2gEv=}Z@cdv+Tt|@R`0^4=1C`FakQES`ZxQn%K zU81fDIhR(?a`VH(Ce~;th?S(G_9kiF!a@~3SC+2tUxJogKESArQ( zrNC|Rrz!w-6uGWC35FOd8TqvdOGba zoMZi1i}VG6!}V~wxm{naeFhy2H(r*>+WsI^;M`a->?Rj~;qY~Af(ac0Fh?P2ZHy6@ z?CZOb(w8vupr7_e0-V{;xz2GylZEprmk8h9AQ$=j_tj702 zAkM(uiAa9}7|-J5i)BKiwpGU7W0Ybv9lXf>a_uYvAfq-ta(%%kGxg1MW-Jf6Tb9Ux zF&QZGTBC}Y={jgpk2%99!=D+aok(-3qCAhgqIL;xkfGU~(imB_I8Z-N!JAXxl^>@@ zOiyJuhIwea0FW<;Rcba>H+$i8asc3tu0{eMX(TMwtDljY!Hz~Fa5}C;C7U~>zTN4) zQ4IxYcQ6tSqmVlu0G$54NB2{Ol-xY>hRDCqnX}s45qPNxD8Vclb55YnQe!bPLv21M z3jmQIll1#LKQAw2Pq+k%p05byY4lj|(8^o7cLyJqhj zqI@k6o(8Fr3i^eyw<>@{J)ZtBIZS_T869(9)T9sTgEs-jvfzW;&yFcxz!Facu>!Q-F|gHnx*a#hvP2t2y*9vejnkw_9 zPOaiBSB*-fO7sBZC!jXwdFsMBxg*Xleux&xJaNLOxo#E~=1W_tVJNI?ds^&(U|a># zGxFzLMal!ZMLm4ZD@n3Qg^iv`Y(mrJ@{Yd8S(2vgZ-iI@BHhQz1LluP>$9x)LB>>A zWGO3FD;ndm+LfBnNYI#{q6zy~+(su>qk7rMd#ZgY$&<6U1|4cuQ1|>#)I2{(IT?rZ z#XRzqY_7ki>AYE4&p-sBlyR00%n@9A}IUzSWgZ=#<{pofQ0|DKIs}v4|#P&Br zeeq-2y3d~T+0NmJTo=gJ=yl5_fc_JiV5-VmK*5y# zZrtt7;}*e?HH9)J?dcE-%?Jq+L<9@KM0@<^szFIMVOj?d*TA+O0y}GG_7Gpy?KP~R z9}GpxSnh?-_TyWybkyUBr{@sX3P9UQFIBhVh$zFij{7O}$4?4WRF}Kmgubf=Fq%+Z{kh~8qlQ_LXX9Nv7AqGZP)DwY6694xN|7QqQ{%jW1D8vUN)it z#dTG`NZ4>j9F!+5D2MO`?&bTR(tA#JMZAL)S_0kGQCPS!=q^Wdu)dw8c(QTR3tR+; z7^S9c<*B}&NygxY{%8Q;eq7s}e{r92jdI>{3@AfiI|8rcgn@M)|CK7m?-Q98?i=U0 z_q89|iX`$!FHb1LN5eE50jJukVOlzUq}IK4t*Kf1))j3m#=F(~qpvHTcNBd^uP!bK zdpU&Y13#H?CfCxOl%C1wj}jeGr{M3i5Wp#$8+9GMcW2vbENttG^x|$aQt(!81ONb@ z0hu8eb+V{^Xw_E;whD^%(fCG@MD$^kYsdmF zw)J)2Col4mvu!9v1vqls9VpgSUfN(5B&tQc1RM~-;F&*8UeX7G^Z;E#9>!WmL5$10mOADn_!~wtSmGh*0FbX9--wN3PH!pVk z0@f4gy@x=^D;339(Ek(|?XkY_L|o4PUceLcThlvt>+jA|%Nt5q<>=S*tgTm91}ZOe%bpALE87>h@#^qIH}%WL=$6 zvX)nS{`%aR*sW-i)MK1>@~6<#MoCjDtSn2W{wIY`n$<$%(GRz&^WSG714xK!DW^Br zAL=`5mwM;%n(O53udZip&(O<1@w<%`iE?9bSOY>ERXUZ!U(fM$3-e=SQv(Y8wh@3T z;vCMMMD5uv@#Hq|7nEQmxpT@-u))M_&Fg(7MJMVA8b8}uWI;gL)!&c3k3PDA2!w{x zk6b0oCB_&HTX0aCsrY}mR=)^0$E-&2(H=`bG7sG6ty*8|&(pWpS9mmwxNq zIxXzVn%jQ3Xp+ZR(JKc_S5ru?U~XIR4LS*_rgw?6m;5Vid~3k3-{Knx->;faiV`%o zSXK?nEWGuBwXQU7e3X)MjSqf7W6Cj}`$>_8-Ly0VhfoGwUme?+Rura_0+zd_w-vA!o5n4V)Y9xMJow20C1NW$iqVmhhi}~8 zqK+q3>U^7LssUOwlt6=W!lx|Ij?RuM{iI1qkae>M@*+VZF1am*=I(^8$5*oLewhde zp?Wm8*w!JT;!kjbxMaIdyX6Ha%_b}P_7I#Mfovsx5FycaF*<=;@7b2k-8C~*0OL;; z0}60mVx+e4e_TdNWkvpCGTl=uFE5WuN#S>?_K!hjmA_coV=_64&GaRN^4+#O7*Bikc-+?~hUq*78+X#YlVaIjv3 zgV)9gk2j>fy!>#YpZsn+)iEVCRYOAq2?!T%9yBd&cIK9`gZKVnCbZI3ie?H1Xqvtg<`s)uls+YQ}6TV&;0HTjEvW?)}u)X zL?w+kTa(JbEZ_xC$(VM%dMF0IZ!fFoE!Mv_S)1~jA~le(Mxi=kIBhhxzUtP7SIU_< zPV80L3+i8Q8HHSVG~oeROx&aS_KO`+I5m6OS_wE&IC!|Y)hFHYQ^gLPoSbGB7B%w+ zZeta-L12(1=CH`i&xf8}zZ8M(&Pi3yI?lKBE-&9@mOc!^nYLg14}$@w8ue=5DF96U zYwRcc@z}TDA8Xp!%35V(-&f8gVA?ySQ7>I`S>#R>BI*;4Rjsfp$-eJ?6UPF)M-u3j zXyf7&6Hh(ck~u6V7cECpde@!u)UCC&w0M@m_ceK&EFDRNOGc*XsG_1k7eprDUS^u; z*l|~om$!KwAjC=#fd*WUY&!r_LRS7@N zw>O31d{0W6t5}{?H!@nCbm`fP`uX$c;bNmo^4oj^RaEX9uF8!2Pxqs^2q3KLGVyh9 zkT2$Nw|h9zkJm4EoTdNc%sm|Ko_#oUweE8GO{6gZ5%@TkKwsX{l7jQ+Xmya|t%9kN zlG51n-GT>UL@(l}ECY{r!%nXui)_`)sW_E4ce;FN=@an%dhb2<7408nn|)xuAnS`y zX;5CoqCKtW*XlpFa$MKY_z7i6b(JrDu3HfB3~&M(B&}_tQgEoAqd%6sN~TI+Eu}tt z6*caUJ!$#s(A*foy^Swvmq;6;Y8o8nsPJ@Z#42lotc#S^itH6<){zhXZP@K4q3V{t zSFw_ooVY-s!#rMo^2nX;-NFs*>C>mH0S|XcZ%hf8-?Lw`MQOanui3D9>9$M#XC(6Y z!=n;j&&bS87ke71X%}WBk&$oNAHJW|uJP#BacA)l3g1O+N|E4$-z7U0rqc!CiYFe2 zw1N0e^OYmf_x+V#Hg{(Xb?LKv8i>o5>!x_X$H(3*cJ^2tb#3k0;~)7GE@Ifr`-_il zdn8dIEm=7^IdyeYJw2wU2_x_!=5I>^M;+97;oEs*I!#U{kG*O-h3=cWM(%{HJ`8W? z5#egOWfxa_GwoMcaA_mlqbuTX2M(?dp+4v!ot%qh$=7WlXNfv}5#oi43W!?Tg-`z3 z*g&IHFV-xbo^13g`Tyz+6BHCI>PtvSP)KBTYYR6gwRUlN3t`Km{>EjyJ3qG5cNO+@ zzzk!Yhgm!$o#2hIWLslaHt6e2f50?aPW18s_7hs|2rg}Ff!pRL8U#Sltj)Oma8~+J zWFWnIONswqBUo8mo1lO|s$mlc6Vs3tr?iw*aL`BX3Wt-;!K01~2XMH#akUS3{kLpY zPX^xda#VP!`sSw;M!Y=Dp69|^e<{zf(aIadWIF^qPL2gzi#ir;CT$hW_IHKMc1;~J z@{@V~7iL$r5UQm6Pe2#>{3U|JRn1mVtcu7@U0d7IBvss?@WUTh@c}TvPgE{7yY7U{ zavvs1q)g!9+aN(8L-&Wo9ZSg$r>r0wul*+GZf(icC+L8v zUG!tylk0wlf}HYvt%r)CAvxu1R#u0>KQyO1V@FCJJUoptBG;aa=k}r46v7^`G*$XE zUgtk2=0h^kWP@;wKWT8K>r*>~ei9M_u;|G+*NTn8Qoj zO_NU~!29aq(f8LLU|Ou|kAsOiLu~8P&20;%nB{-LlmS{|#q9tXLz8Z4p6;Y+yHOf( z@Dwi~+P%ZQV@Ye)|HAgA6*dBo&`c^+3<1+kpWF7X%<5WrAE{T#$3gKg0w4kM@g0x+ zg7U0x-H-b-uSM)`P^wVw9c~F7!}A*3e8k^P71bQO18X1uIvn1D{y{hCX*XlvbDKnt z3+VH_8Q#dyv?XzBpSV2{3s<)^1A)xr?_>Cy_ud^=Pg?9bxtBFIhV_GCtZVPnM0f7z zrQ#ltplK)<<5v(O2X;vO*xvMS(Un=H`22(nI1lNuXn)J}Tfxd8%e}77tAA_3e+dsr z3xW`!=9H9UZ;fQgr#m}#aOqjtRQd2sXCVYK2ve;v)#hX_>B;)#T^}X?UPq{)MqElF zCjr<8K}eQOmZo-2z*z*JdCKaM^ZI#UJITuf|A(ZkhxF10G7_c7ZM}|5h3|A<4-qj< zJpVxJ6fI6w>J%F&KP1YnXMhX~XaVW=_#BRH3)DN`U!q~ktPhVXFdIWH1;Veppbsg@ zeRf2&J|^9w2nh69R2!xcZz(LUx;BU(pIwnW!tO}1AKP{RM7MOAc6Ch84HzG_1udP` z=FT(k)0I??YNwa0vV)x17#UQ?52MO9b%^v!5MxDL2LjJb%(51#HzbNAI4JjP^UvfB zL>$n7X!N6{(Qx5!;Cv1$KRXbBP-jb*t~%L$#z}&x^>_*OFB~)a$bm3Qc~|i>dA|lp z<(DgXhtQ)wOE6ZC>w&Q)6&FmO*}5*ai^6;wgO9a|s>ho<^-DP>h25#+SOSGO@NUc#S4D;(k8(l|{DryDD2pUR2>MkdXqsJj3~XsUW{8*Y&2= zQ_Mq{%gsTa_7gD}N*LI(`7)>|zm*d6Q1rgFGfB9-!87S7jn{EcwV0#BS2l+uC5c=B zz{HcZR_;|q6^gSDBn|L>4My&{m$`#&423@oNq+r_LGNX&GctL^0#RWnH3aTVHmdCb zHEGawq^?(>UNl+X)&EZ6np!{Xx#N>H$1o0f?cydE*8RLP-s$0rS+4mlP3OiT!8Ty!Rt$55$f;cZZs$@es!<2 zQ-jgPV61FQcv6m6Yi3@C>EEFgPXPylGCdbeT8=joyi@yGg?9Ad%o#Zcj z8$2dy&-w#24U6p|M2ZuJKRcuUW)dDjU~FCnsj$4^7Dr=;HlCU1NW4!F5{0O`%2f>B zMWc7w!ryv7_;V-BSZy@zM;ZK1 zt#n$4&YyFRpT@H(!A-r_0H@mjR8wxkJT-@)F1@om|Jr3R1tqP|6^c0=_;hEgF;6pY zLvrhKhCp`a(Q)RyGa%Y%D>3>N z7C!sIsb-W(Z)=@r5CRg5>{oo_hZDy$200eu+-3^9dSO5p+AH~5BZC*QltIsVN{T82 z@@dv^Fq#@AbDikAV*k#5`&Ucpc~^d%|AnTg_t}~v_YUe zG#=*P@sX2KJv(zU@ty+Mi$FivFOZqkTM=djoo?P!0H~rS_Jor8btm~2P7cFR+Xi02m%#Ty3gFCArUAvnXBBx%fXON zQY4@U^d{G5b_Dy5g9s6Lei)>h<@~0fD+gAiRD_-^$6NX>L8<>Jg?Duz1XAv;A5&hP z{T||))mVPlXv0IE;E;j8X!-^TsIpYP`2|UCI^iqshC!%>kgOg1H}q-cYf<>6a@ zj^1>s_L|quj76X0>1r%z{HXW!$WDPeBZzjsl6Tc?wMw>|XRe_~h!H>t;iSNI>^ZQy zPRL~&)k-fGEztu|Lg+^*i_Z!osrEZQ$*q%XIy?i2YSce3krPvhzf3{X$z&{jKg?RG2iN66&=hHySf%q{mmVaT)Yt^mX zKY&tw8IhM<(mL9buzUpw9nno%>w$wN*CFYJHme+w)!61$S5|~u?0`UqnZtx1dL^EXNW*s5MchM_iUbdroH$RXhFwwWioU@+p|oSGmI>SC3^My zwRw)C5xpd6fXt_6PMHrK$Ig~bg~pmy0+26=Kp&CfwxvH?jyR`y*r46x?r47@6Dp-3 zw{6b>5nJ{d1+UC}e(AQ>Wj{4v^Q|L|5`p{skRYNyYKLx>76o&@9WFQ-(7JNFfB3=-R4G1|cG;{7i%HC{_3nPquJ;rP0 zwU5OD+SO(Yj`lRmCv{!c8rJVmH_B7HxsV~JDDqWtK-WE(eu-|-N#L}$h{ySJJOKM< z@8w563Ic^xMpN7q_|#uX5!`9@{BehY?kk0Z>5{#}Q{I}RL)ezH__d3R)UAqp^g>Nm0U&nD_@ebY(*2POOZ&GW zi}G{=vDF3Z^`pMkSc1D>D^xb<_KUqKo)i4@Ivp zKT7GGo-L<~liytFQF)OKgGNV8$QXT0FkJ^t;X=lZi6c4a@OM|VA>{K$Ts8m^9pnXi z$(E+q&=l(He&i~RB`FNT`SJfrFA>4@%B%nO0{jp9iV}t-sV0Wl+SAg~4)*tLt=|w~ zf)9KA#Z|z~VPmmIK{SO(29(f=owFF;|NGzOi!c>=C!*{sha1oWVlw8*wZ32}N7Z;a_LSHU@Pg+7k!oq?! zb;R)Efd8>CDfx}5w61Q7Vdd)a#r#dRemtuKn{l+)Og6{)2oQJ+04Xe=zu#}|)&DKN7E zcnXqJ2951--0fi@b5QzVl;0rZ`AQwviBtlB-_}oaN5z=qti#v5S}P~LdBO*{K!^6W57g$)%&dyj^SPag% zQb#}*$LF$%N@+IvOU?|n>0Rj$F1>v$=CFQA5&*6Z!qCS=aIn}&XycOi=%_|brR00A zSowQ4mIn;_WIw&5WV>f)pleb2N@XI%)$GEKEyzTSkM@~KkVMnm2;sPis+NT7{X4( zl|X5l47G69ODmz`q6=IpHT5TQ@HOo8RMKs60+jt6OWj<~klTgOn ze!XX&H!KE&S%O0{KBToA6>xH$$IB1@--|@;5nIj`6&0Wo*gD~FBYOEi?v8641)R<0 z#<-mska05GTCQfcZlO_voOOZ{cGpAVI-^ z)CaHwc3yvoiHKxTi%U!QJ%3MHHD`sw&JJ6do}))eLrguy2bTC;(J1?4C@f)aq?qyO zhrN66_MH6Nu!WZqy8&RzGx-I zxZFjPr?{-YzkjQ{LPTb!QENHU%jV{0T=7j8x(DhLA2sSbCx0?>55z8|ZzKozyFobK zLj`G*Inwdv7f6AhOcZ_)kdu=W5ERVr*VfiT4|Q~Oq;uaeGBUn?otFxWqf@b{od=(n zFp}{D2?ZNRoSE3R)#J}5nz-!y_e7A&6(zH`sR3+N($*lf`A@eNkR|ZAyC2hTLf7q@ zOyg3Y0U{YpYwj8H|99h1N5ucMaY)_TdU$Y<&-3rAnEuw&XaT67$I*(CQFnnRW9JR5 z^{De91LuRDJ(G-cLruM5aqcrhDkTzN>Hn$it%Kr-zP7<31_XBqmLa$Y2oN;Eo#5{7 z?wSM%4#7Rh;1b*|1h?QYSO_}6K!CyR>&fqZzkRoAtG2dww`=~OW}16%pFZb#&U5eS zz6z{jb4pP%h&pzRD!Xanpl=dR5`f3{FQm2=X=3BJ@O?BR^w)OP%I66AA{R?5=jvQRqC5I+9!vpoRnWaTNW5vYn;T?sz z6LVh)(CWF9ZLyQSys?1`{@5S6F;(D_Q&~sfG?A9 z7*>=bk9B8$6ciMIxQv>O^XPcoHJ?|mYuj*p@C)|KcQ?4q5rDp3_)E3}1JXQVpCMCB zNdc5Hpn?E4O{03z{oyB9W|lLr-)wI=g#f_-ht~e8u!$nt{Td_!(BpT_)S!3N6wEfd zxpWY0oe=vRa>2LD1<0BOJ>#%`DmVlp8->8f6#w!J^x4`o`XZp9GD>+gq+;T$Oy!&~_7>Q(diyK;VylLFn=c*UG7USoRKhUfHT~GxdH*595!wy}#=d zQra~6Iu750t9L2{9{g{A^vVyK0eQ^tO{jZ+(81`#wZDhTXE`&@t@(11w`x~2o%veG z2T&`iw>dPMI{oywL+sK~4w9$GAu6+Tly>AjHMN$ZbJq$eTeB#}xX224W~Z(L)-J;q z!7dXu--E7m!rg~ut46^tFjU_A1}&&49Fvn45I5V}J!BR}d2bXmQsV`|n3-ju-`i6! z6w>RN{98M&u;P@^47k}$)s&cKFLTwl)^k3&V*ieN}=Xve*GM zJ~0tPy?HnVEA=+g0>>$$nbc`>j73MD;HwrRA6%jMN}BzeLm>F>U6LgSyH=A1bN$S^ zzd|8O_cvp_lhK*Kv2c50A6HjWkKN%N`y7H-#M)Zixs~ev&aIzd>yP=lfi6us9B9Tu zM{+1P`T&t&TtZ61Y$z(2LG|$}(pzu)XCsS0KC7pXFk6_o9>qieZ&MHju&xgUv1L=Py6F7-rYDOOmhC$((o*ISXEq=HhRjBa;5| z#ippR9c3pyZ8>GgA7-|r0XL}L-H@h&^LfA=c}XY}Pu ztaVMDKy(`Yr}m*J-S6HfS(5B-&3;}s08;dHDm>7;R83_}h|?9IMkXu?=Nn*vm=CUd zpVTj;Q%B#_7$cyMd-R#r24p<3z&giLm%rgJsV@Inu8X%oyHwl}JNRP=V~kJN^l*6{ zT6*|EHput_(8qHvHTRDGWs*~cfmiWAgO@2lk5N^iW3y#%3`=e7)M0I{-PT+WN`A|4 zdDSW2-ISw(jGKUH=G*R%^q#9!vSKE5DxeVT?skC+=R|AiRohH=xYQrm_nk#5Pp`Uqb{RZ;B38Dvo^_9dUy+eB2U^NqYU(=1 zDvzr_Ydy6Z@a7ig0fmP%1vqr_Ux`fOx znZH$POPZrSLt`0@=fsy8+_{j3{sk-G-G==26}d)zn|ms&JjK)gcH?d?o7s^^KjYBO zYJ_j;v=PMV>HUSZX#n*vzk%Ij8~m$c5|(r-lJ1faMhA%nZP#-)oJ{J2Z`InP7Ipc; zlDT)n%gU_3yapN7eqB_JVMuhKfH(;fs^&PxPYRkS+F1otj0Op;Mv+3TGdMPHhx!^7D(>AvHG6w~ z-eYSYJOOb#m$tT4%ZpJJYn<-*l!oz+aWh1UD4^B!_IL(=OoKnr77=HW(XLq+ib?>@ zbK-bZW^}SY71T{;nu&1;@?_L1;mc-)b}%kP4j^Z?=&@LGnv!E_h9nKbbLd-_nh`SP z&p@0noTS){|Kc+r?E_RoT2y+V zX+W6FD+*qgIU@>V4sScdZ%>QMd;8?J$YFE>&p*C+mx~Ko(Uh%^;K9K5OUXsf_<%5R zw8*1krrZ6Bh;#)PUk&y|;^J@F-a#pXc+1PB_pq*VDv*!-1OUC=xV!JE+Ms?bx`9sZ zJfMK2+OB%A{RqSu{30vZ_#aXEeaalG3VnYe*+MFya9XqC-h^|P@@jssvt4}*(T$>z zw3tK1`98hm`BTs~`>0N{+k0F|G|2?RX%7xe7i(2Jk?YFx+MW9YWP_%#G!>{r{s+5>R2EE} zjYsenKB3o5N`9c+?(h^^_CUGLvJ>y{wX4BQzr% zIf@mZrQ@}9>dVdJecMW6HHq-~#ePYWg1pufH z(%_uluMHdZb}rqlKSHTB#vZQDq@)=hy&;Wqv@y~(HT^R&5X8>H@+#!=`kJ0qHcd3> z{^gNI`D{2gwVb?sIgq}dUTyTp=ry=%n48mfC`(IAYiiD2VeFiqoS1WwNvg23vrkS= zvK;EHZ*TV_^!ON&ojR)l9@!zZbkv|80mi#@A{y3GrPbSbZ8>Tq{AEjKr4`yd_K3bmOo!t(Z$mmj%in9CIj$jC1#DPd$!_1hXw zE-a)aAxZ7-eka~^hkD-iaDUU+*Js-RU0E@BiL0)qwX?N#cQV3}mzQ^Vco-o3aJ(^) z%4+xn;U`aM3vb&goG~)ui4vzg%BO=q0|gsiMLe~|@@OdP`=wfC&0(iHfoL$R!!79{ z<@(uDUx++tYqZ;~E~uQGoWx{wbQY({bCeVmvUprn_4V~1nu7kWqvA)fH8amd-v3OYMQ-o8yAvvgW)m!!_e6SEx8A|oLwp0w_~JJb`Oc!N{1cnzJ~-L($* zB8BGS>I%JvYUX_?`M}6-*glA8;{&OOJ_0rC$j+1dhFSX-N0P6J=tjZ}rlD;qVUZI@j;`nTcb%;F6q~mqP3IeH%y=aq7s=(4id4(dz>hwD+o20E z%PgzxTGDvDvO2c|PfkwuyKf7}J=ujy`vp8BaM74kU0HVY{)aN3d(7&@C_+07|G49< zVjCm`1eV%zPM~x80`@E@(YtvW3y6E4<3D{EB<$^2N8|ByB*>ue{vgEL zS1>jd3ex;>^A)+pXA#U#B}z{K8DLd zR4X+veB1Qd*S@=m+t|P=bm|Pf@1OGe{buT3B1<6~`pT@ktC9C9o*oPIn|>6-HEq+; zty7;Vp-#vTm+ak;eeE;Et@l2Hy;LWuS@RVJxAT(1BmmEH@uQ>?xOAsLSv~7nWiy-lG4d)YI zao{dY*^9E82K$hjCiR=v1O#=yvwMSsGQNB+4yd*PRR? zkQ5q_bsQn;H*34vXBvX&6=~*oOXf}Qd?@@;dP@fKM_pXK;RSYNZ#R7Y)*fuEv0&lg ztdXySYuiJ29)p5E23$#>bw;h=7b_kUIz-|8c2m5oCwuqs7oAE8u{G{&1s3B01uq$o zNi?0k&OxNCF(+jvMrypEoECrFO!s9fOi{LAPs&WIY_%DbMGgWrD{4x#+GlMmI$af% z`D{e&SJodSg9@rLF`rrspIeE)jR9PyV{7zE$U5NmuPsW8{#kFT>>bQlk zn+T-{qJYvk8M*`QvP6Xm!V6W-s;R4B6MPPPjaEWfqH8(5Ic?k{LG9;O7OGU? z9tZcwCEu|@-ASigkt9LM?(Uv~!oOLzyI$-cIdK^Kx`RHy`RQ*{bmVFIXLm-$re4v; z%V&v3;xWkhLv*S`bn32x4M9hZdR5?F>OSfb8N;7U_>l-FxArl`v(&N-SSHnXKs$D` z+9X05C8pI%8jf-jk)!DWE)p{k0+A)qbvA9cM@szeG%1e9X0#oJOlM(PFqB7_&-3f` zW~*kinPAsZ4q?^VbhQSLL7Zi!M+fADd4`I~{$33!u-A_;F^_*%4u55a@)+n4)F69n zHkK~G7i_9A$VY!0^aPwA- z*(*uP4r)j=QhqDO8v{Ypf9A}4Brz7g$>kb(d#UEjv?hE}5}@`pD=W4~O>niEz{u=9aHRT-R~b9E9MEK2MPJ#z@_cXGA0)fF&I zgN;bDkr@+;1g#MAm0h>GcjWB{8JFF-S|yb?L^V7G)DI{)4;RDx!GMCRPffx}h%KS| zrsaDh_>fje$__(SKpN;+t0H)?Gv6#3jRN8f^gG3Qv0}&ST7&|w*{ z8gu8pct3*EM4_8D{xu+-wiW{)GIon5Y{~a%dE`Q*MEQ(|ER-*5%zOudaLIaf@Ra(2 z?Es?2=W5Q@;dyx*x7X5xUB%D$>=mY)O~+~D#srWsP#+i*=G(Z>*vQVi?(k6Sq2L^W zLBTC}7|lm)&l~qQWYRUIx6bjpQ7~Ugkn-(Z9O_9UgWI^u+dk!K@xl|^s9Onlg4h4C;myN9$AF{TM%eFhGtX3q<8XD>z`|0auKaT zvs4x+jFR7e&P+|{Fv7j(=rO6MWoCpK>1S?Xh_2tq6gV$$Hx>8=D0mTwV$Po?CSN|s z<|B-5x(H{EM&n=bLOk|LaK^PZ2Xz}q5e<#M0qo#p0pPV_n(jmi+Wtz(3%L7CVO^sn zp#q0Gga@>nlhrv)4!*ksw?D3Vi^9<@pQ=EOCleQa7f(J@R3fWBL7cCqW_=${{to5P z_?mgR-E2r>1P+&T_r^$c0}}kR>e7@8q?P5PiGHv!F+eH(T!JDO*;gNNR@Rk7_p2vW z+PDh!)a0Q&*$OzgqbT|H?`0vghK8;NO*L?Jt>7CoxrK->#)AvoY6G`MT4_<}u zrbty)qw<^wKvk{vsbC+LI1smSMFA*oU(f zI9oe3Kf4p`9xFPI1p>VzL1kI>!}tt1djX%P`<`bOQvi3zOuTiS>SAE~w?HFLjSLAT z4qmihBz0pyUq`Fj5ZJJanYy$RfIzJq-*s@L+oYS(nzGq7%GzkYC(e^U--jAzZv?d# z9*>Bchv}o3qId!6)wKTyOWfNRE0K5nADBMbHLwXh zhs}Od{xWqf?y;7{JJc)1+N~r40+BAPbb8*ThK3?CA9Wa%PrK8|eHKY~7&T#R4rF;M z9JRN^Y^~w3b7@8cT*0#u1M{n{kY5JrQ%2AC{NTS?h_zi`8$1f&T4Hq2E~_k-X{DcP zwx7c^LcV9;nZTQ3Zo4gjnGmj3mg#5cL89Zi$B0e7W&h0!ZT&_9@2hWtof?!-IU$B_ zhd2iZ1nMuD-?+W|*-*Jjb(SL6*_YVjlNTD6g6%C5ND4X3A z566K(AhREaNG z%-7QH8d;i)3Y#J09%NLd-o(>rgNbAI&vnDlqvGlEV!fJ|+7k?YHRepMo#4C6 zo~^W%g)Y-8BBm&N%iSLe{y&)0SXpj;KBttBQqH3r)ACa!d0*E7yZ+;cWw0OXgI!cY&nsm=oA+dv*pZB zM@Ofjp>emIlb&8W4WprzL*m_b#$Vs%#LH`p$u-RV#T~Lo0U2*TS-=pv z(_7d>uaY9LdRvl;4rYOKD~%+o&&ShZT5-GM~bK@_PU46i1rPoD2Dr3F6a zR1L$2016&Y4EbtdHZ~ai(Z}wAfq`Fn6HCYvmAt$>Dfo3tYpX!0SkFP`SF!TvboIX# zj(-A#42phE|ESS~6hOrR{=%X2p zWdClYmpc8xqz87s)FQWde-M$66(K1F&M<`3X6JmSM7GP5tSgCzhxSC614h22emB-x zrv7+kwSRLH?nLzbnk%S66iJ@l4nNH54s(BBZ;AdW_Ku8ZmwllTu%e;8HjL;tk-*%F zW{_M_{j{mq9uSW?J9qZXXf83Zbvk7td(+X4TnYmOGXBk8>u>e`0~G5jXd-obTI?)z zpa+ldlqZRCOwL&HJ_DaS-)Y8c_tdleqhr(F(fRuqx(yyknqP7)PKz@81whwQ4O#>i zuJSQ{z_s6&vX94|vQx-gtllF<&iCRGodyO5=-`Hi2IPgDQ9f(#7{By{sFrG$qqYY~ zSjZ9~gwy_^FlKGzZ$Q{~c-dG7cYLcB$y3tgzWcj0EQCcThk=bvACi=mRNvGzy`;gM z+^MT>Y-}9Vg!+^~?D_NO(aMU((0dxDVkN;3k4HXV7 zE|zo}61>v)gw)<`=MqVM%#*NLU0pRaG<*?5&&C$Bnv; z)s0;D<~-}lxlYFA3b=MJT8)~E9cQ)C!jE6PH|50`$p&Inh&|K8C~0K=B0B1rS46|P zrFAQJZ3jLYKdb=-3-hH_fe-ogJ8a*8HxrdbnK(G+n`9tU0XG+TVw#oul1Dz9g9(+@ zPQt#3lDxjjNteUr7J+O>0NQl*9)wc9=HvwK%`j2LHT}sUQs^Mr8P4FzHjsaCb4J3I zLPU8(pWf-G#y(Vj^fryF8I_sI_SWRJ&A_wp3d)x0(LvmO@9|8&qbcgtuZfA&w-=vP zR8&IZv$7~EHQS7PK3!gV`%bjqw$IF{V_-x<xOY105l23b`?H0d6pWVjAYpWfz}0yM2IPM5t29q3lwU$Z`v~o1Pco#^9<}eE^8D2O*DQ_GJnUEKxP3U$&=vm_=Y6 zhvZLEwguL?TjTK0EHqTDy(`x1s?sXbCwrQKiGF`;D}cO3WhP=Dt3yO~IHo^VDNBfx z4cW?OePKlBUqMtD3V^@$>u!q=S(~1ht6u;%l(KpR1 zk^v(@S$Qeh`FNCp2&;k6%o{w@HLo4mX0E165gdfJJAsR$b>(TerDI`14ro_+RZ7P0g0=!X8HxLv>(^0SA#ceK2y$6iYaH6n*T1{XgH3ZQ^- z5uyfK>!Kumx`(|r7+qF3-{5&L93SYRf>GkW#q0Bb|K1TbVaB^D8hWVp8QfKt8so zg0mm4s8KmalHkz59EJjg<0IkV^LBi==kYOd&^<^X0gzl|3jK$jJdyE)y4bPkhrF?xg9ML3ATw;>(io=Rf=7>cK3#v-GRG2j z^)#0wN>`Qq_Ssl6WF!mZM-{HIyf8Okw_;7I?#oLWT|*8b;;WaaIc<;5t2*c@+pn~LhC8%q8>o6UqlsP7D0ghpitHxOq+=bC1G^`xF=7nOy%hvs$K z+(>~7GRvV$?ckqrQ7PFtA{ut8p1ak|8fg00qNa(INw+$>khdZp zsTammdl|xY8S*3L4l6l^x^sotuV^1)rTbgZa&y<0>M~<#kW-OrLXv2czy(}e^_XyA zx@hD6i8m;{J-3BlxrVBsQc7|S6Ovgx2L$6M<8VoEELA>=oEZsUiJ@Y$b(=CNz!&dL@$lhbU%$ZL zS{KpsXl{Sp{LpD%KzWReQYvrhFG`K7a+w_uc4yAc>~r-iX3iUnye=aZs;1&!PblOA zoc(8he+_AJwq;Ae`;Yu_J%>@k#KrfPFqTaC~PYowZagaXH{ZHrYILzWSy^93;gz5u6{CRT3sR(O4e;1YDD@+ z{{EHoz_=SlLuS69XbSAiH?vFUW0%3ynvzv*)7&#dw%zwY+Gt1LqO-C|F}%9Qyo-EM zdDT>B5)G49iPN5sLX3_@L!}*jAyMaEFLdhYhxAk%RVK`;=}?J-e5C3Ze8p|b?8@Uh z_e%e~2DSgfH-r?4!(yTN!e>$&OtNMZwukOQymn=AD?Cn1q)tmH^8A`iO8_}E&C3IJ z)iS$F51bUYqG!qRRT7JGI7ShO^gVcVWij@opnV`)fVrb^-+hONS}?>KXtyb`xN<8) z))7a+mBmIKBJ)C-Xr$av@S%881x9y*z<(PR@4`Me-R@9)wQ%+2s)POW_H5(%S@k~4 z^nkUArb-4?W*rTYTBA;E#Y2d+80m+kJv2Yp41YTv9Xr=czjxRNhP{X7Bd*6` zW6vb!YNrc)MD9DL49wroE_r4&At&hB;q&dfOIG99$)4`Tr<}cvl^jg<5j-qZJ4zgQ z)2{$?lTK@g0C?1!6}o?jXjfhNN|TVwp1?BOG4Ecj+8C6pcN5@P`RkKgajG@YWVRtq z0v%uB5!?~Xmpd*#RU+`!NK1R((qSmV9k1$(vk7N)nGRf@Tl;2Lw|C;&c3+pW0kO|A z2G73kZ+U;tF@9p^n}*yMF-B8*Yp&j0hKS5Uktp)~Ua(H5;w5U2g6MHeZIR);uouVk zoJ~jZXK?MnyF&%04(sH)hQ6iKM|be2pM$=dm^ZrFT>l>ZZ3>yf&BsG79)LJy^?B_+ zWsW`J%k=Q_mCKv~6g8%enxmq8wVRwkBy)w+^!!)TI&FkGwLP&9KXju=tp3llWR)*c zXr&IYg$&IT*xC>8tju97E`_6h_=6S~O^hayoOMt7!AE5F1xnm@7`SNMsHQl|SGTJh z1}LpB)YT%hsBV57fg3Ziq2OHSiGQ-U#1pI8{{DVHaIhTSfM_dJInxXMnozc8Mk6=v zu4*OM_H}XmZ-W^v4IssX!MMjQr=KXcpT4zrpGhv;c2kwK)Jd#>6ja~aD(?7{{%Kc# zk9OR+A?^3&(77pn*U@a{2)i!7bHB~V$yzdrS2eKwL!+m03m_Sc-8X7iT=hULW)GTx)c7ld>RMs2P3YjPG%?^!jS2&HE5)km%ks}HV=e|8?wrBMM zJTDDhBvrUiji*md0!^i?A+;={4!|l+Mwa9|O1#;L8aiTLTrr81Wf%4zpqlRfui~P1 zC4AG$6zjHQgYw)DjAPctVB3EUvEbzjju;7z7%8BY+Q0^@>^rrQ!z|J|K9pUo8vDvz zTNs&>T6DD_?A64lRwuYk4S`H4c|ng`2%NS*up@b2m3@vFL!5#*jQ>MO5^ov1R+E0p z8>55jY(e#LhjZ12{23PYNJ|* z13DOR?d0-PJH69=-~$EjJ7-v|=ZiGAq@t-^E*n7)_b{=e$*-f_aNX-(K&DrC0_N{7F$+_HE`FuI7SB4QK)){R;dK3r9mmt& z`wHvm@0TA-f>R2cl)Sx+Y@wQM)6;WYzdjDxo+CFv6*qHK(M{C#E3IAp`*x0@R^xF_25hn>e1g4(oyHvr6d-rpUK$i&+-*)IeYsG4U=TC`X$ozl02*GWu+&T zz4AT(4PK5lGNtB6Qo5Qoa<|p(&5bw_s)%CBH!4u$L5&OxR5y1*^pSgH5=PbD3-6IV zM6OE%)?ysB?Mv)66?PAo4(@pO;G9B@T#*2ETU!7`@MR*vIDg+N2!|m=$Rjm1SG)V4 zfB=OJR^;=vc1iPd3qL__;+n_3^luATV|DTW?B*KzpIvIxX#TU=Ytesg_R92Mo4rOh zE8u{n!V?*k554WAt5dN91Ag`PeukmM(km(|l97>x&I95fgAPAJsv!NfS^wO8Lw{N|{O#E^rPk+GztkZV`C+!9TzKlYHHJ`vVS%<9!`G*r3Et4mlYIj3?{ttx$?n}kYGxLn)G!lA@`m*1K~$5JTQ%yHz$gIJm^AE@9(LaBy(o8z`-@27!}}W9_KuN%;O;N5*cS){0<@0$Sp|PWr zO+cV^hwc6Q_xg@aM!T0AE!1pmY<{9pc{IET3BZc1#N~~Rye$6?FxX@xEJi9j*MCno zLc-L{jN9dpM2mh-a+YHCU~wO{pTDk%X%&wu87 zZLRMWB()$vpMsL|j7_(a_w{R+i=35#SjtQhhwCIJHO%b)ywePyh^XOi41SH{@9TSA zUft2^Ha~v6F>sO9LTYH)#sLSwVD6z8@eUL%DJA9T?c19#8TIJ#h3T;_#irG6{^Kgt|?FFq$GP6P4$ zJX9=H%;orxWDzR=-tpD#!h*Iq@K5WmE$Haz)5XdRA-91w`$w(U*Vmhy=De957N^9$ zsDay~=`JoVFJiWrjyfq}c^M8#&y1gq=LpNArIU-MuI|EMWG`NnO~bgjxznj$MoR`b zxc+jIv$MA5te1gI{bwgpzjJ%viT_b8*@q~9Et!&%B24~2D%i+>JmWTmD3 zxvL69ZeU>Gag1rvfHgf}D&V8eoSdC)U@o!Q?sIByZ=Xgrv->J>2n~$zXv)v05&M#x zo2#+_#zph@_ou~|RZ&TpD(-h+J!q0D zRuehGZrhmP&8oCEOt@s9WJvt4UmptY|7&f+q`ut4d%cThIph!W5PkI-fU@eY`|F+{ zVe5Jw(lB`sk2m0-P-yE86N(jsl{jj%$Ie79-)&Y-&ixfhZr5cliJ7Ts8r8ftV7TO* z93`}fY)U)pnIMVm>}}Rk3yPWgP*Ecv&{c3Y4(TMu?I>y1txG(6P zpcgzz4nj#u$(63ap6b@Je6~L~&8K;PMdrzMkNIz%1As&eF0yNArrzlmwhI_3QK_GC^?`v~&ykPK07)k~>SxyoS_GTmO-AhjQU_CrSQo?ihg+kfH ztgI}+P?3?5*#4g1zJLD_(lpi#xd;HE=8-h@QK9dUkfg&u(vTzkU0LrR?<0D4#JBHktmpzrP>AJw84@ z4#ReD08OQ|=BxFbE*DpjhcG?;_WFZgb6MHmPHs@=PL5w1Rj2ID=7usF7zl^0t*y1d z3wYIqC#0|liA`ZdnEj%?{K6pdCf`|Gs<>ixW~`v7Zq7Zc9~HTxN56?(__Kg;2Zxwj zS#b-esJttl?l|5i2mJEv^wjSn+bc#SQS%YY)RC3;8p<^|b%al(t_E;;cJ^_`I4vUz z3JPKlLj|;!w3z8{pJ@o6i;IgJ1;V!8x^3&XxNeR`YIHZMFyMC)9y2sN3onbl9j+?Q4tQZh33Ha6<)cB*pP z+z`1YcR60KuB8G{cccDyxvWrm*l!T%sQ|JT;D49Se($Ok78XM9Om|vsZ#hK+16fK~ zil}I>M}Mx#zlEov!JsfaNY5{rI}m8^(ca_VCj8#rEtv>5($=;{Zi<gnkTi3j-h{M^&GO%5`p74>7hE09#Io{ZbF z9q~v0GtT6oQSN#|&h~3jfXxd1+{q~j70{R%89Db#kp;IeCJP=vQF*Z(2_R@wLxW3; zzW;12Za`$;rcojcS%UoU5naE%nNk4Xgy?c)XhVQwdFH6^HKeZ2ZHatoYHF&zz1_2` zX=!z}bKdd)dMztl{7XQ>$d;$^r#TO?u?^ z!6U!8JoeOiGqW=@?c9s*=heEtc6H`UC;0@T=52QWwRLiO*xiULR4vVuES{zm_Ek5E zc0K;nmnKgRzNl(W9oeF1VA!v_#1+%k(_8bsVT;TsX4MYXO>ANm6@3V&4*d48vOG0) z(i2WiA?O*6>v|OFmrnI9Vv584g%}SiYIvYPwP8aB?#WPbZc=LMzFwg!tn=;$4P35S zWqJ)sW4vS4)zMiD2J5=Iy88OI2Er7p+uQv|PW9yEN0G4c)(Z*J=;f!^6~KOy1gW$C*pO2BHuHy z>wkNBoZaTR$HEZV_s4F&>J1+s>XRq8UK2rh6c>937YVMN2oeJ6(RU6mNg5I|FnI z*pleEq=7-UQ~@}IRj=`2h#{wtx(Zoj@n?tuxC0V2D*vOfxug-h2%uY2_$xcNs_mqt zq?x%nTb>sQGCU?fLRya90Fa4M$K#92XT0m@dJF`mI`f$*Ib7SQ-Mc0=b$gGmTTAIVCak;NA6gF?tn!;)b03L@?XT^i% zZ)bj>SLD+@_0D*A@Y%Y?##Ml{P;n@Q0_wQc0pp%=pv)0#Hi_2+KNHnjwGy0J4Pu z08mQ<1QY-W2nYZI68>BO00000000000000K0001ZY%gtPWNBe9X>DO=Wic@>aBgRm zy9H1kLAWM5xVyWD;1GfbcY+0X2p;U90S+D@xQ772g9mrF;10oqy9IZD!+mvM?Y_NR zd$;PK)2C;;|Gz)!{!f^yvMdHFDJlQ}81iybY5)Lp1AcKL!-D^rI=wgrf55p&$ZH@Y zBQLC}tO5WvATK4Z;qmuy$=w@&`U*JVUZ`%KH=p#vDvA|*jUtU5_Y+@yxr7#y3C&hV!bw?jsMr$7jqHSz6k^CUZ!0**>4IV-y2N6zCD<|HguzSv=oiQ|o9q9@ zg;#KoRa-;JZ9YNR&OZD)K$k)V;sVE^Ns zZh`-ep8wwq#2KCp~+*fc3QkgAm@!RX;Md~+3^op7XJV+Fn0~ujNC#E zKdIXWjxIhGv%ZLQTxj#K82Yyg>AmxtW3Zk1iFYaF0!JUDjh2>a6N7XAwo@K4AYZQE zqc$3OM+ejEvzZ5uvO>6~Z5Ezzr}l=8(@G!D><({UAA9`?#Cr@@TtSuS4=~AcN46wO zN!QNwDI2w;+tY4fUEkK(>wdi#imieZA%)yK8F%F(L}~rugS=dHD9} zhh?m2Otkag6X0|JaIJK&?Z(?b7ykS;FPC|T+<2Xfu=IU(r}NNM`CD=yCDoR&$l(3n z=~QN(k`VjU5UD=Qs+{!s>96m8c?j$ZSlcd+rUVj4(OG4qxaj#;LW+%6B=6(DKt`v1 zob|-j@Bzp9?(m6^?)3LAP@bHxu>3~TXQu=EsBQ}@k;srvG`yU6SSiJo*Ak)fU>vU_ zkKYFNT;=6(PTZjN4q6m3`kq_36#Pr6z~;h|45-lUhNF`_A|(u}=E8B- zziG@MVGi7iGY;Q-tpb!ZF`bFl_g)DP!T}M~+w}K-)zoeVxkSL6oDCQbO#uedgv7m6 z8DuUvIAJ)OxA{o!hRh#G0BY6Y1woG6EBN*&3P&$A{&JNlFG~sf^c+!|S=I&5fhS^s zW>brE9INh^aei3Zlh^5@ETfv`0rSfFqs`TKFxH{$}c zJ0yQ>Qaj>Zq(libsGW*aPA4po(?x$grf@=t{;#{hnkt6Po!;`R7mWX?o!9#8dZ2|( zz8^Yrws>%W@5x(IR+R@m)0i{xX$a5<7iDo`9=B`e8V8;Llgba}54v^t@!@+^h!WN( ztMBf_O)KUy<{5Klt1N?{ZCpIjL$7RV^M$3O5F_l>YFu?V%+zu$Dl zKsdQFPShgf;p@rV%S4s1<}}HoLZ?Tty-rGcOA1g=7|Y4tqSiXim;Kg4LjhKdtv!5A zr!HvP;AW9vS2NbcjbN|t=rnKo+o*TnHT%7vFXdSXRnBQ3iVv{-=M()bTFSb~mxB1*FzMAZh zqtg~?RAWvwT3}^lv|1oq_@-c?s5rb4Bb@Q=n^b$7`|&cQ-cMg!duMBl$8CS={-`yk z$GKUQ4QX%+Trmg$O;W3`Ov~e5u>$1NN=ebQgc>LE&<{)WQv`oLOiiF8HH76|LrK`g z9}y!wn$7+uke>?&WNPa-JeLgfiQEHX(7Xc0z}Bd$3&gjtej;^!X3)reiNIR#G^&5&U8t5Oo~KC z1R|oKSA4o7QMM~|L1~6oMPyMjIci0?czAo0{rz$QV$=x(zq`5?_!0)p>y;Z5MJy|I zPESu=#m0t*FP{JUJwHA2ExD>oOZPOo>|}V}k>nq{o5bP2yY|}Kv%vtwG>15nG+aAV z;QK+a!={COzdYK(uLILcsvMCY#h#thiY)S6GPRAu)*Z`B>3ld1{} zS=f#*2xu}fluK(~3q%$0JLMmlY~R*Md)^^g*TMJ)jd|{E?~>(Nyt}ni5otajQUf@i zbw8JYIXn90s(f&p<4Ezy>mxbrDi|v_!Sf;;CC%#7;Fb5!LT1QGQ9WbW&OGS|P(km> zwT%49y`bOG%|s}{zcKA$;ox9aXN~=q?&fD^jlF#4Dn8cM*4oaL&7Tc?w|H;JT;(n% zdxdF~jL&enJ1M7|%{B2MBcDs}`L+Gs&Ui&cimU z-H+hEqVS_`YXFVJhkE6Nf97iEAAqP1a-8qK&;H5v4tnJ2HMjpF*R3tyXL5vLJ5w9x z;uEqP6iyycLT_lQ=hNciD(@1fFAfqD6Bp_s1?QaLW3gl!+#Y!y|I+xCoSf_iDNB%} z2RJ>?%o7zZXBHqu8q9HW-%?Ta@b?Cc2kJS|PScGmTAiHsdOTDSy&Io9>4BBx{W zB0=q9jPEDfk(g1Jdplo}Bp-q}R>&X!P+0&cnSooGqe`fUF*~iuG_w9eikH>bF+=S_ zD*#ZP@Q|?|v*zsu*ZR}uyy(Zj7C|8N@^tPkBhGcIbU)9kP@`xfPwkUqHVlwUnYNYF zb@zA&w%reiqv?`-2a{D(bh%`9CSr_5vx&_)eocmI(zT*_fs~8X7Zm3C7+XVP&iX}1 zSm3KK=lu|arZS4wZ}ENtldNOD`}e7%)B6Cm@SKay12B_KuBwJLx<9~mAsgZzt+5ua z8)N_=-aSp&(1^Y>!T?xdDapu=rqm}Uzx2G92?G2l6v~8E9W0KRFeM6&!49eBZ{3&! z5r88(%-w4yu0Y7dNmh*s7l6;ZD=HeneSqWaK)ib&paz-GFvbFCDev1NP4b)JN(s+q zfA${UUJ}@t9hY^`h7vJKM|ju)H~V&M4ouOp>RndFHRqI5y0O(twI2R@=k z-sg@zA&kF{A5Yf{Hm27`zlb2Wf@N#|k;y=r{NteHE77g2W-&5GN%2gIKbJ zdV|EWPj7T0eO^bN>u7mYFj4_eu{@77wx)O6*b=Rsjv1Xs`E#8~{gg%4%esX%@l!P( zD|?dOhiffz7W@Vi=)h^)Z+R}vN*ZGu|C{n~%ll8?G*&wgA2VG*YCap8VDW8(2gqUu zWWUP))2E>gN<-*^=pn@%*MKUF<7uLfPpeF#m~Uab0CBwFilUW@m|z{q@dW&Di(ndS zf8aS|0CK_&W6Su{eQ5dc;e`1}7CY0QB4@6n2aMYUe(dQ>Azz|Lk2YO(^?bc55H-~J z6YwO_dgP&r2IRtr_Xb_p5<2;})#TvQ?tM>&x$;R!cqt z^9kvtwSz)OyX@DS2oE)^qc0x=uC2hN^J#tUvyb^b3iXoc6fl{UwlFIFzIQ|&)P&}8 zVQ7X^VeN79b4~ku3nB0Bo>E5$V%X%83BL;7>6}Vbj7}mQoPYh(uZNWub5@-gFhBTg zAl{y3(IPtU-pyrKox`!Q{I*p{!vZwwlPeH0B}QT4d}1^Uqhy(Xz<|1jpIPy@t2^RC zjxMOyFad9uvNjzHlO`eL?6Qwp$CZaW2YZ3dAqb7rjv3o*tM9%OU;^~gr9uW_(vdjM z-o(3J`4c9$rMWo3@0J@rX)o?23d=>@odkk41b`vxE9CqjKuB(XONLV|9Yc408G`HYH`9?}2YO>j|$oJMy0XyVtsT=-w7 zY)XKi)wB$5D*c!!3UO%2@B7Hy_iMiu0&?c#c|rzO*bGvlPD>o1V$YmsMp~@@BNzE@ z5}UEibKk{Swyi9S{(g-mkj&LRJH()H2~y+ZhtCy?rF;v&enfFRf6yAwI-Vf->GN*) z&S78cz^V~7AA(Hd>Z6n2(A>shUHtJjW=bso{*R~z^gQ^ECACux07V%S%uh-~^MRAq z6$>RL#33xAZ`^nfKl7B^xdbK3kkt8>)c#H>Byo~au9Gkja4w}kby~PT9G(jZXUNj8 zSAtlK0L1^~eOkJ=N5heTLxS_EfAH|+Z#OB7K;MDs(C_%v&O(^k^#kX4HsU}r>N+oT zFhkQC>*_OybI^E4r`QTl>-<%72@3F~yJgrh>6hop@9x4Lx-aUm(qI7n_*rO%BUU0J zuz?t>;K@t`5q=~4nk(N3y`XV1$Ka4~IJSb^I7}m#_y(|u zV@qg*L6`6?Et9Z^_m}5VgCr$u3W(9ej{f;T1DMbhUB?W(B+)J^`h{Uu$T_h3CL$Mc zbXcmL##aIW)%BK+CfekZIC3pGHWIhuL?aH;gN-=c*OpB}(b3Y_F)tBkHIvi~) z0^pdXn66!Xcz%g3;j^AU&7vPUW94F=I3fcSI&cX;>lY20d|DARtD?*a7~r(Jy&t+6=! zp6WH%YiHZ0iEH)oGIuC!5}`N_Kbmli6I_VS%kEN>=xl#t<@auw%^B%&2}X9&0wzO6 zq^$md*nx|0#|sd`K;L~eNlXw`$h(mlk z`!7K|8d8E2PL;N6uR#FtIs{ZoJD!bYe1t~Y+~kr8e!56TE( zUac@nAs1%<(=4>Y&p7|w7op%8;biQzk72KLv@YE+SmE9V zE+^4@!;wMW&31+!oO%9N=)h}#tZ3~G#rHvoRET%QvG|u(pYTB1;wPcWP;~DL`1VVG zA=4&u=BvZbVxJ5&3i%Y?zeVpbF5EI7fckuLhudk=~B``44^Dbp-N+Ta~`*oQ2Ox2Sc2vWGw zxypj0Osze=x~WDr%;}6LWW~fkheCtzWxqb?{xz?O&&$9I{TMl(m_@9%52$^x)NDOMDSw3_&umDgwoBs|JsGEt*rs71_mvj z?-xwGw-32vD1<&g+&Co+d`nNa=S^i)`T-A^^+hKtlEsE8`3@yG4m zx3-DCpS~caWYren*NVi*O?O5VhwItW9ruW zky=19G27t>H@B&nUK!}5pT!t+jcX%Kkm|GZf!MRQ#X{X@bxz1+xgOi*ec#seU*C^C zW$*pm37S#-LwbWI`lvEX>eimrkuUkKF)r{s;sz~&69Q+vN2k=dr;F{i@Z(XwDQiUp zjJq9Y^PL0N^m>&Gq9xn|IDo)rV|iUBzd0th*l9(~IQQ-AOTriOigK&HiNS&Y|BH`2;z6-lGF~0gtxwUuVbu=thi* z%2Ue}09e1(X&WiGY8par#Q%DIXkG#T+n8Vkpx&&K4Kk6xc%omec-43J;OW`Q72!{E z>brE?3-Vq&VNuPih1s2bOUAof6Os=>cVVgd4xkosc4Gm|W#k;wHQM#v)He;gVCh;A zy1sND%V=1E=p9o_r?I>^Ei0 zyQKX4?L7Dgj}N-VJde)uJfaNL3gKRYv{P7%u2L#0C7TtYCCDX^4Y3A0)4f7$fSSn$ z&w)8YRn)0ZtlXjY58l()5RY&V9g5jX#pugytL7)eX=kl$ix&`tbw|JO)8?79b#`ov zg0pG&-S5JiZtzCUZgc4qgJkLmV8XRZDxeWgw*N3q>=f}rqM5RFAllVu+Z?dL0O;=` z9;EpL#>7jBDHOD+{yP8awd=YBBOA7WaHl>^3gxpIUf{1nhIIa;7X=DuQ`+18QwM3M z7{M-LGz^Wf$$|rxvzLTu=K_ad{W;F}cWHBwvzML9#UOM=If)|xHuIY7I=Ow{tIJh( zazc0jT5Z3eYakk|dfcdy#mIE?B+&&YN+5EgzNUgOXuD&(IlEW$iVRQ;J?q`7h(6Bj zf_)4!0B-hvRyFm!XjNw|c7omZcGc%)F3-3@)!a9BH_bMnV+%p_`$)rGK)YITL`4D% z@W%i3M&(PCE=)4`1>MRhexGv8q*g1M$F40B3w3PL^+Dir=*3GuDNZDKI8>xqJ@fyR16!m8Pz9llKb$fwNR2^4%-s62e<*MX8^h z+74B$&>Q#h(Z+>}Cf4HPK&AcKdc1z+4?NA368NysiG&T_uGYEr)C$ZV){1j2-~6wP z^U%i8_)E}P#f~+Q{Rzw@_5vQZ)p-a@!u?gT8Z}Z(3B?!F30>Xw#%qm#P5!WmDg`)S zEk=wv6^TMdM-|jUhEfk)^Koc0`2M!=Eo<}JhaR`B%LMmcsEc=rh9JIKvJFZLdyjCZ zJa-P}VkLVeT;*J$>@_~Y)WP0l2zQqQem4~{iF1XbeNFtr=!`PeI?Gz~&~p>=WqNa@ z{a#oiD=avi?>-DsSFf>vROOl7k-CGr3!>BAF&n*vLzhKA)a(q$2(fZ5y|HN<7;0gi zNILNlS_oI2Xl*>cF!z4b5hC}BiJNBdKHA*xPN&6sNYT7m^w zVP(FW(r{~Yb59)iMGQK-9Z*%}3#r4Z!8*pk1eJ{?s`JUPq-Yl-_|yBvNv+=D$uD7~ zO27L?B17fps2I(|hSP+jjd|f&s}~Uk>pziP@AM(3i#}z|2v8l*S~33nA1h9^jC@x` z%UF3l&oDO5;o^GfA$kb$4iAL%97!(7#yY+C z=%2Xk|G{};_F2F^4(t=&nV`SgUFsN?GKOxQuV}LM73;lh>_qqQz_s?sq!&%Vc3_KU zPX!LSx~uxx@ajd)L}MB1!k>1}A>Z9BnK?u22qZ#hq_Y_1&o-2(#v08=FGwbhz4xSR z^?a5r1q1}#Ia=;#it5?*+e#`bD!Q~?TwEX--sfl>ZJgHbZf!=geX!)C&A55XXD3HL z=Z!N`pFEeF`!?y_G~cSA;44wBqX9gmlhNmwitdCoNPncW#zsd)99KJfG056)@5qX$ zn=B81*e-1D?3DXiJ%(?wd_G)EOi5|npVuUf>V2A?nVG>L<3pzqbmctW4-$q1a_<`U zFZgM0&+Y;KxrJ2hZ~rlCxLH?tYZS%~A^O`}*(O5KCLg8yKe*!Tx<9rYlp(lF%gVmb z`$I6Ky}7kDuth=j`S8iYT}x{w2n8=lVr^YIqS4@}GZ5*}_|apsPu(E}mwX8m6eWCY(P448+Z z*xT!{YI%Emf6`_0`H`Bcuc}(%xc0lVg&}X*U}g#xpp#^L|sUPTcdGw!vP}>4c(on75Vg5+!pFe+ocXh#J{U6RsL_D4Y zpM9>{OEVpo?)GNF@EG$83LuZJESX~=0j`ze<$MdkIqwl$e?mQ{Fg5_{CdLASmkpb* zZd`wK8yvHh%e{8jLWV6}WMq2xwY4V8wY9VyR@!{#|5yOA|DRMZQ^*Ss3)8*c77UYu z1w=$dt`0mrJc!W|{hnc-vF*#f{qb0q7MHrdToLlj>V;IEXfF-n02cXDQMI1MeVicTRa!1CmF&EgrWF24 zTo?e5@0=L?4hnVrw>6rJsd1~Rl>blwP^^17>IpkDq7!*lB{3as;LcB?viZc~grh*= z=@G`Z`~L|gEDF(XE=QWct`?o*Tt7KZNT^X|7E)5}1>d94@pU?89hc)GTiLt?RvA{i zZ#+1?WczW*i>w{mpQm;j!&AcAo@kAN>Q|rt1U@GfkEhrlQPjg^!y!22Vw) zL5l2nVZ~$$8E3e~0o4ib=?yK^tfn3*s%K+ptPk3+glYa#%0>ij#-pdNJr+V0U!}~mp#xc_=7t1Y#gwsk zu@Z}qZ}u0{%FlNEe4hU92U@XZ{Qk1R3Zp5-j@5K^iFOHv-f@p+$@*M- zXnB-LESOh3=!|o64SMm9&PcNdtp%Kb5VHFWJ#D=z`mVE%c$qHM;dys9Qw1R}ZG_sMufMRi~d#j-fgSS4F=98-iQ zVyRO3q#Hv-^8tx>3kn;pPK6Q{6`V^#L3aVwh+Qc&o|C)@n^%U$;W(w6h=g?IS$Fea+S$i{BxyQf zcQK)TM#2KU5^8p^I#LTAG>h*moV~ljB$h*+`N#3Rk}i+irrxHD4a-O|u`^?e0i7Ca zVEs+G^=We5rvU2|0mxf^*j`gmoTl5^@(##=X@nDBHe0XMlM zUYL}|F+P+Ub&<ghEWUg#k>nNY*tXua<`DbXKWs^Fx zTSP*h!|03+jK6e8g$dWBkGR7Qh@*>dmEHQG{m) z?^r#*rulOt+*OCy{Z;GY5|2ryZrXO)j7Gy?h-wH&6%Z^yy>Qb5Rx3iM#K(2V~`ooleTy}i$ zp13Q`ymSX?go9QS3Dk^GK`zSjrtDU`lRCKgamB&Cb zml<^SeMD4~YB`ePI9(t2yYBOek_s?U?CCGN%X>0cQWTRaWc!_5ao$!}S7VX$S2%U` zLfW2sZEDMOo45b+-rn9Gtmw9z-i8|rxm#FTmO(!!%H+WK|NZ+nj)acSVeZE5YBt5} z&5NyQY)MLdMoom`z1oe-`H_n2==GBd(6O5uY-PCcML`ybW`}(&%XD9=T`k+)wJy?V z0()&~X|WBwJTm@lWnrO|%qjjFpWUb?d1#CBod-6MubA=%vfKiyZYrwGo(Q7z+lSx3 ze=lGD$;hG#;NFefpaHa^Bl^*=Vf_V5Z;M(P8cYcVzWw*M$!jE2&(56Fm5GRmW}A)v zq;@;&N;w1IlhdtNgx0E?s=-PDsxwn}cG1J;4Ek)FmA}4kXtMQwKKO(~>Ycu|dkGZ= zLZ!4#i(fX$1WHz!=@hA5#IPR%0%4P+h$)V z1(;z%Y8{}9UCj~9Q@sy@OV#ZIHhPL~g4{rm+zlCo40m(DtSP2n$&GM#??frY>xXgy z9%?YfkN>Q4IxL8aic%4N)BrW-nZ;1~BV&_#enUm4N!`aVvQ2oRFz(|3{5(o&zz3E8TuDoW2AoG;YS z*`CEAlsnfn@fh-q_R#AUlGAwGI#HJ1s2&`brv9Me6k)4AccD$^My=wd8c%gSJv|Q( zegL0{2(tW#mpIe&e%P!pnnKif(fo~tl~wAg~MM zeB4^BRs_ajrnOO-HV){>FupF-_*LF^w_jY|_Osn~5AOYO+x-#c<(M5E$J7Bp&7(SO z_7b6xTwr3*Y3<GL#T>i0YdQ>E*@T%-w}J1G<;jTX6AwrI2~{>*}C#it_W}Ae`;;@|5HiD zCN&2oz}_`t%*bz&i+++36%3uXEr$uazsTnYY%nH;C64;D;aUe2j7nzVK#3nZbhMRA z5tQuq+#h>e1Ou2<#gA?EM{B(0UZUIlOfEQXYzHD5Dkmf`jRfXIPV46P1vO9+I|Vv~ zLk>;uC8kXya_9z5(;18j8~5fWvVUHV1cKen3^!{0&l$?s-19#z(NAmnD&nTv;(OzJ zXNZgX>`~gt34MK~9|yAGgbjxx$38OLzDy7wtjTGpiAc!hM3_zd7d}i);?m7Ub3Y&p z$arqO(9uL&Ix}g6K1O<=UlvjcIPCXYGoX=iipLlX8g{{EHneQ4e$CNb*`9^#0L7Q^ zAY8{DsgeVRNHusPC)o>x%j7Isc58D8xUIaN|9AV_;z3R(5+^gPv zSAN-tlmfHZVDuY56*z*yObe~}zq*BrSXZoCBnpQm72CYb2E`-m1+R6%evSR~LMqdsCACi)azp(-HvWIeJn55kAG>EZp z6-~NJAox-Sfb#TP#2B3>gphvQ=dI93gIqpfcce~JfMLbhdN;SwE~>YNt^R6~JN!?+ zR{ni-S|A-FG$)Z&V;{yuCzdz~nbw_pv&y)cXZxsz8lYzKI8J^@r_-D{NW^Z>eam{g zwm!oh&f#qP{HRW&B`>+O78>y6oj&>%gw@oKINfIx*<(tPKau!AC71bE|0kEO(A$O2 zS|6+G4yP>Xid0l)IhUL^;mNtiGkb9P`VB{j*PBnTXkKc1HkoVOAskr+ne#lmWqR*5 zW3V6}_&5o76QSHM8e}TPo}x_(35vyT8%hPv!~zK+{j#&HX-y0gV68ZVBW$4ri%ePr@#JhOaq>3m5V@OV`1SwBYGuhEuakYVwZ{{;Ad13+TqBltJ)Y_0Ws zQ-|rL+Wfre2cs|BhkcM<{bc%gIZ>8a8N@EEE%_(YrIr0t5Y#~v#;fxe@l2t0tJ`!^G?N^DUcFel#zG0#nA&FL%(K zA+Wn;{7BjpRm`kLZOJ;!fS5a=P15H!_w%&fF1&C|6wfXWEP#Bz?#D0W^bv|pG2_Rs zA#$RgT~evfy$gcW(X#Ky?WCP;Z_gt!5(nF@wq%qGmFNiMv(1S<6yM+XvO(j0SGask zAl_sTHL#k_7mhzK^LD>fmkwHPRHX;6q!lv?Q4}7G)b04OlujfAS@YIDmtvlp)p2|J z;=|xv%X*--C1=6{@>X>f&b%UzHI6_%|?F-5(|=F zo5s&Ki-nI2dD-(G7Nl*7xsGm$3#KK|JpZmQwuAUPh8g0S(U%Q4O<$Az&+n$@42cq{ z$jf;b`XeyzkUkTRzDH>grIYG5GhS#I(vD4aEJ0BBtQ7=St3u67#AC)Uu>p7bdq`@g zqDmG0f1IE^`)F6RYb?>k;T;@s@%|q2C0%1{U>Z!_JEF7XA2;@>j$*YQhY?frM}F^2 zHx;Ie@_a~giZnEJOqEcK{#_=};_|6VxF?>mS0>1_)?QBnXo1@PiyBS#_l}yOZkwj~!!ZI$MA=fKKe?J0)P`F3-Lk0)OA~0v@*DI+8(4Wm6)D--Y z0ao69KPwv|Z?83XUA*~(f%Epnw{3m~Mg`oqku#a>%%c44R(GSSe$H89DxzT))u5R@w^nfg%c&nDBC-Fn=1N#nnKy@!W~wCUl!$pFrL|Z z98N609a)r{c1oQU){^1Q;+fk`>nD{V-LKqYPlyGKX|)`htY3NarWo-qtpA8%Z3+o8K(D(TL(>a1JA!E&7avf z-bLS}hvvMC%wyDo6%%ye{i3=eC6546jA~Xbzu&A`FOfh4tO)*AqaIdJpT@6sl6;J} z4ZP{+9MGTK@NFrytDSo#Ex(fw@9O+W8np*P)~#C;waW6@hwKffnfxxg*V}4NL*F^7 zIg<4n>o+xOze;1bvn%5{&-*lUN)(PX>McDx6EudiblvhB$25l^D22yem7zC8H%=>UW%}#opaxnaC%%yD+0n$^Q9)Kzfa>T?KMm|-BE0a-8%gU9 z`n!mkW!xNMi@Ub0k1BD$rX}>`ZTyO$enoRw2_`$qRm8B=JV~i~QU2$)$4e|k155b?@6F?e6UFe(&{;({hJ<1QGXJ?c+;#!tw_<(21RhWf&Dt!~ z<=<_^?unHC!@J;s?@i;W;$v&%7Kxf?i z@w}9Rf5c#NhqOUUPCagHlqrl3CoG{D@g2%aM$qJ{VI8OTY?T5AOs|L!&VSiXNHt$X zHUAX=`rw?d7MWlLHCX9%m0pz#B42)%wT1Ib(gZh&-0K$nXR=z2dcA*OVh!`YDahSh zp_6o&%787jwz0RX1@of&#-yAD9SIu$ze8l${9!%)70sFdUkUu0Y`sB(L6klyb5Qby(?g#9r51jvw|@Jms-` zHg?kUmf^ie)IFYu22@y1G(`Fv^B{;VV7gSE60Md*D*`f-2(B2X`HP)Gaee5 zo?O%)*y!CVjr^+ew=`<=bu6;14wCK7%Oq^eYq6Qv7!g8oy@Mqmg20!da_TE!W)Zjg z6yjMXvB9#roQV_fy74H5rg?W&z#Nz-4#C7dFI%`Nk+@%{%F|200AzyYm(xgR2Zldr z_c&&a72Dpg&|=75APbj$Sx!9W#Hro54$2kB(<4Z~y#<^{-qp%;X5!k}o5J;ynnOTjS$ zUw{b>Q_7&~c$TPfdGlOW`E1JJ$bQW>=zXm%^fk$0sTcLJ_t-%BAnSob+XA1B+osWf zxGm>pq|gD$Q@Y@WBZP^u3|`qyspz$~U%>zxa^EcOR=Me&gYt8?L_@r_t!CilZmL1K z$u(cbt3iToz0!)|4#DfJGk}ZSXzzzYS-rg7{qHpPUQNh|=CLg&Bx;CuH|XhM3IJ5= z^&&LC(k8am6xD*SrXFkKcxf079 zal7PwO=&RmT_7xknfOgI2;dI;A zJ8czv!y1%|o6ua!G_JLHt~K1dDRTyvA5nQxrCTGVi8f{y)s@P&Hlov@T^X7#-P)hQ zoc)LsR33Z4v92J@|3sS+gEZS0c(Bol5_bYaJ(n;m-}9Cb29#eOmtu{e?x*hUGkY2* z`~H{DSp8LpYha2fen&w8!IgSo&y|wzBR3vx`GO9lj%~>^?8)TRU32Ibx$-=N&W>Ft5^{v-=$4XnS_JK|9JabaYC?|7ihWq3y?4-uZunNsQx zzmyd;87%FyY(~eNtye>mKW7qeJ!%@I`*>>qZ0FQ)eiUzt%Khu70Qk#vVW5c|bEwy= zP(2z>t4-TQwsayzV5w+4)7UD&a_ZQD4(=Z6DCGHb+$U1lrsDaPB*O!lu-vC|pO0xz zHUe2uNb6N_Q~JHfLpZ+3aIUsDerAkOx8zziF?~uC%V?8<8KhK=Yjrd$>~a*&Hs{yR zq<2rlK}3ww925kCeDi(=x!2gD*)b<6B zSl>hw==59L|7{l7K6%yH7+u|_)^97{{`)t~G4^<#dLGfnp;LG8XTvL8d#hjTnB#uU zv}>0$3`8AQ%lEk&u_W8I2S1(17^Wc%N=SoKvMl<_nzo?4Vdvc)`k}WcFAhrKaUWvR z*ABI@gk;ic8X;o{dg=?A@Lpz1TOnPuf(E{tPS5Sk_XRVeW^~ZtUMZ>uqc4;+Q$#SP z%Wm8o^wLH8rBR3xP19h4zOB{6Ob_^U+D4jC+cS5S`SdqYdzN!St~zRJu|XVJEbs44 zV^iI|&$9C`%b_CDd!|%rM_u?-=?dhm*I%spYPPVu4?>0n;3K4g2W&pQ_?4!Qa4dpI$LVM7>>j9T8O%XHplZ75`@8HH-9Lxr+F2!SrmrgEDHo z;Z<|5$)xAysF}iZU$e}Aw##|VA|FRT_Zs{&9F|4?18~759{?_g*JKEUWEPci_#I}t zYoLU`ew^{|oErJ_A$zFqxBlchEU37Gl6z^9X_A(r`hu0i)^zzU1kr-9CE)s`32$hF zu$yrH*AJ7A(kM_jL_XeMm;1PtKDsV8IF&!{@Z<|kd$m75-Iry$517BHo^N>`dpvCa zmXJ_=7-6rF_vY2B?bAL=6$J&;rfOl6x1`2?8*V9z`Kqsv+K->SjvD)(^1KL_=#qvG z3o?DrJ{cI0Pd*+7q@|@Twf|%1;IOKmFDfcx`Cg8Ug;mh5p`lUpapUWsKWd_)?L85M zDw!hbd!tvw-&N|!g+420t9n48(PVrMdvNciX>s_UQI^kH#^;pKFau{=F){`~@6 z*H_GDm*w=AiqTqQ=w46KE5&3nDwjrO-i5Ndx~ox7_g9RJ3wCueB2T+}RvAx%_qK!) zd6Rn?x|hTM=Brn9pOuY_miKvz1HXLvGdY=Z1i>nt-j}8HrDtaTm7Tp-J8SH9{CJ(= zbtQ23UimQ}FQVsq#of=^`gPI}8xxb~ZDJA}ENpKS84^(bw4=$J`ZzMXQd3h?0{xsg zF4t~Qc`koI11ll$yNKLp)s}e+|88smX8Yk%K)cH9o$|{4~C!!?*C= zjQ;MoH;=P+AWw_URK-(oj^` zrv+yg8k+2)A~2WU=lwAWUfJKU**GndR|CLt-QuC6{?Vw9u7e13kOa-{K$hZ=m?74#oF-aZW(a4GLR zoec~OJUniOQ@Ec`WBmRN&G)&+KsO$4&&Ncr{|z!~|0yy8uu+2r(?^%Z3MOlx)eoiG zKp-fuYX95tF-JIOmlPrhfgH!i#-?yv@$&Neo^BBV)VN`S4}(C~EaWZv1zhlmB_6zZ zy!i^pmi7Nwrt(rW4hGB50CU!|`tngQ@ZaV@!dUys1GkDOx96GpeS}k`)0>pxCqFYM zc_+J)^T)wD`-QrV=Kp81(&jlmU0u8Kn8hnD2a1Ho#_}?3+_({#uNEz8s@uC`$BpC1 zmzN)|Ofb8!`<~cbc78b>ef{gNzh1q1HGf@oFfiT8T1|QB_f^hwQrhO5SzDPJZswTH zzFl^5Cf0Fu!@D=TFx@-+s5+w zzkXcbyMN#2e{&le7&hO`*|_EHizjdLcP)1BpJ!3%v^H$@)mOIF-(+km3eLPRWDt;& zvPwGA;XB(r(?n`#%)hta^3%`1`@6npqtQ{lm%!BX@7wMCtgTTxV#}8;`}g}_y}O&+ zx4)ZwZf;ILfBW_Qy#J@x&E36c&mIN^b@k_;bLX!P(Mq4=&d>1qzv29OeNMBj%iksU z+l7UOemyojKO{6Xa_zMT4<6jk-(CCf&(CwFAJblLS_;fJZ{vTyINT3ffArweQg7+| zcO#;rUcG+3JLRL$^I7iqZ{4zbyiM|L{KKN1`~QEl2A0q7*6;s!>)X+7uU=(|b&CoK z8D&4y`JJrz+onpc-@NwMmwjgzABUV|QjGs_6QU&E{b!8Wal2`@=+rs}AnVJ~TIVP|DAE^uyVl)H6QRbTuqx+y6o1nCr|8|hM7y1N7k>F(|ZLAs=*Te?BI z<3PUAN@6O|y;+mm(u`%A92 zpSMF;9<|`*;@_)`{PF7^a$cIkJxBBNi&6fpWbxPUD1xx|U(7in`(cR`MH===qU0RI za|nr`IOC_BVv7{DbVkKui7X?jus;R_qwiwCQ3mOfsIY?#a>hak$ti=H(MN7jC?R_P zb83K$E5Ob3!nVO`MZ}d6g>o~1;KwQ3Bvp`NVYfahcq?XBDENn~|Nr6CPma!UrElRz zxVp{j(vRN70e}F8%z#PDDUTK2au+2e6KqEsPVw0!kk`PP_8Ti5v8-A&UgAm#o3?es zqHe+{JSOG1&Yw%1^FTqw9OW-Rl68J3r>BhP+zVkj$fcZ4w$Es?E;a>wsoT zY+v$wUF@^B>9@c!qmCm^Wy)EFk@Gj_f*u)ni{uq|aEX?3L5E zZON~`*Q6&P+WwAvoQg%!B}5T)j2*}>MD0=d5ni|AFX@09IZFw*rmggaE|<(P)BYAq zl4nz|TV%IDu!v3RuNQMDH8qpE`D}^ivKkgnO%|e=T?-pT3Y6DfQuA}>l|pc@M;=h> zFt7H1&alsiKg1b33r)=Jb?IvH7(sI`&a3Z~k$3It{$E zxg1yjXJ1rbFU%ABN&PQb-DCGNh@bU~XR;ZK6&N6pT^pxIyZJI?D#613`%Ba~!$|TR z^=>YqX5zrGE;i5G)mk%L@B&iXiduH{22!K zo<5nq@^dI>vGAkhNNM^$8}s3CJ>7!UrN}wHLDpVQo?HP-$>on%UgABME^T4`pJT35 z=Z9A{WX)V7CZ$P~ATXzb=KPgS9>TpXu1bToe^P|o-a*Iki#NMmV~LjBS;}~pY04!* z?B~r!@+q%8s z8y@|s-<4{_14ZF8DBXgZUk0+bL)m^kR%qDPcze}sZeB(aGQMH-rm!-sx>zwtMU-Ng zcqk~l#&R&bIzxBDcUsZ=I=kD!r}60OPUTFyR+GI;%)`)?-QQ(H76cF^g2_3xKMH31okazMDh04+z@A4wXslqD^d&!e7o>-v>u2er*z0vz#%2jkRgV419l>cUVPn!6XO^50h4@Bp%Ls!lDN^TkdEzC#a zVS|zq!c$w*b+O^!TIZXzd!mR2pL2{LY16_IJ$ZLkog0}b=S`vFdB;fhdLd1`RucUn z&6jmVmFq)_6I^-(&MM&$k3qQo@z|VqaOLO zPrK%oU{4@Fk5{ZN4c@3j<&8~Q8(+~*@1~P ztJI+v;^n8u#V#UIuIKDYRC!-r_xcUk*yE+|1TZZ1pE|!!*6{14s;in=bCoz1Xlvwf zuHKJgpkB^#arkJn81%OZUmnz1a^6+kR!W2^EliXq#K*@cCDr>ZdnhQ3bCQ>9T^^TQ z9?Uc}QZq1E9?@88RA}-VcKT(uxG?)#-^L0*&?a)p-QL_5W*7G};*DkgL`MB*U7G`8 zbEw?z1}wY>25ZZ`O@W%Deb@AjUQwoh@Gd6vb=9 zn~f5+%hCPYE6(DK$l5}~dp}okuw!dCAFC#n^ciCCETU#gB!(UD9kK}tJ}^)Mv%9%A z1+T0h1U;`uJe<_Oe$AJq*7pfMQg!nMfDIb?U{-eW# z$H4ga$~ijK<_GQc(>m>P?edt&$UKamo}OTl9FZJz`&5yfut@9XkWthAKYws>@p!WI z9v(KdVn;oWE@vxrn?$aoUHK&#ss+?eJ$*=lf4qm+ePZL%|6DiMEHVq+^<;s@U;Fz$ zvEbO9(^X%Gx{G->jUFCdAMY0VTKRIP9pQOeHY~vdY}w~mMYR3>X&fdC?j2vV8D?Eh zGvA6O&s^>AUU~pnk+xCYpWnR>?3&nM5A3pAv|L(RTJbn9Pe~z2AHBN&zM9Oa4YX| z6Q&-U+^{WO*L9cuI~V;;Gzpib1WSh*a_H|G-w-5Ly0OCKj?GMAH1vZgqCDrlt_NOk zge)Sgi`Z-tEC-kJ(Hm8=!ZRW9!l`hvT)gDx!|cudJ%V3)`eF*3aZy5KF1}ui%h4Qp zzxG!z+0)GY8ACk>)>!&Tyj|v-uST+AlEa*eUKsbmIh5I^Ka@oa?b~zd?1h|=eYnZ9 z8JiR*Q2>{KCFdqSReGtIYin4tmS8}-W{oAPu&v}YI%9>DMU2pvo`8_JrZ$dLpJ*nyaiU~2aza^ zhwpp3SBP<#)*XR0i@L|u)fyJH{oQunAU-AHmFYp11XtK^nPOEgE-ssu8eTRwwhte0 zfwQx-dar4SK(@fQvtpG(b`FkFQ%7m(h+ZQ?HX}qpx7lg$Y-?D%yuQBP<^Jj@nORTT zgChLc)76{4?XnlaeM_4IxH!Y{bY*S~ z^LH9JHjKT+fC-uA|kYFJzjB=s^m?2UBg_})YNpDx!KvzVAm@r%Pri? z*T)-R9gYu_+Y_Svcs7aH6xLrB(SOtj@0M$@)~6z;(u=5jmFNAi2(y5D{kXl^IIfTk zb13MOh_jSW!kr<`CdKXka+NI@v;fCY+(cbIc-8GMV1a)2(X}f~N=rE?G%_)2oVHk4 zOPOWE{&9M$LG)^2IlWx_I{B}B9KcE|b~m<5i;Cdl_o)csOP}i}zDVyu|5n{PIDp40 z33eCj=B|A6&NR0F@3DwDG$JopyY>|T>blbY!IKY%{&5^e$GapJeI6I`sgrbCjJ^b0$CnMPu8x zZQHhuiEZ1qZQGgHP9}CH6WhkOdD)kJ+yBtjRek&3a~|rgV1S=Ijt)A3W&2VRzo&Y21pn z`f(3z3;rVdyF({;Rqv6ovpo4ymjV(*^Je|TK>!#n-njLJR|g|RTKmPA`~4nhtjlok zt>)LjRV3R*+Z$ocdHexus277mQl6QQU}bWK*spXPR>EN2I^}K<8V%0?4Sm`V_G%-G zP<+wBBw9Gzos$UA8?ipL7LSUtpM(v}xfDQ5tCPh>Xw0DnmBuCnwWGMQxOd!E`SvPpo0g1&oAtaBS`-0?vz|7u02N)8Zm!H!r38?mBSv%@i8QT%8&!A6eT zp3ppQ(9=tTtZB{#h+iW>Z&u#!BlJ5i?3*R5wUY#~>};5|rb`-jLKpn2!9te=)GG-N z2x4n&nKnNQ!H__`E{|!7y{mi?#A>AS@Ci}47$3X;Tv6!gg!mW**7U1GfHqwwuCFyh z^Fcz0srE-!YEQ`$CQ8x`r7@o*l5ob6n*BXsXBLcZXZy}M_EG-E*UQmRb}NuI7sYY5 zi$2?%E)6sTkX+y4wikqFNRu3eTBYxE%3c)WFJCUffhXqRJq_+yMiDn5#m>$E`6L9U zj2gwU_1Y4B#PM_BKec_sLd%JRp+Hb!LjpSBKAuCT?!QN-4e1kEeTWG!3WH*npmL^#f@oD>*HG}E7ysk;==o1~m>nB|={s_Bf6kh;F!(qK8! zeXj9H#U-ac(&q45e<@H4`_@R8QUZL#^HS9N@~mnS0H>Seh{)ow<2Y!4H5blH7otUr8qQWKwBt2{N6edL5Q zkU~8l7!XMa1&_RV&t~IPFvU8ja{Br6#C3zKppWX&>VbAbG!I#)YVdSC?AF z1&%*u>&nac>_HrFOM3#(S0kmbz9O9J(W15f<$_K9DtwTwLjs2XuF{Wji-f$I@nhp? zw;l(xjMAv#OWH8V_WmkP?tVMb=rswwTmuW?Y;W*a#l`nIKcITPUX)ifX^`bCp-&`& znhBP84e>7Eup58Yvo#v7c{$5`Euo#acXutWSlusR%Y6}AY1eAoV?wra{Y8&~PD{Vc z)ggMNyVdca25B_wG{?bX+tEiJNBQ8=hD6}B9Xx&u8f*wpnkx|u3R)fY%B@ld&`O}iv)v)A|3NjVSY(Y2hDBvlaHVA8iNrJg#`Bg&9hg5^ zVxD)c6`Vl-_3(ThQU99ISaoLHW{#hpI?_fNNeB)UEz0DRr7pO<=dB{-tW|_p%`B>( zL2?6}NZBPy2CvUtuEyQAB8@fmZ4E3K(4e>Nhp5H(eB^MeKW!NS3RmM4uD)xTx_Qup zT!P(|^re#k4}$uEPcsmFch2&*ueXJ{$oqVt`~HNGnG;hU@0o}A0&I?{2_+=bx|N=% zxH=@cHeCF1UFpOeA{RbH>%I{gK-M&88yez`ieN1)-1joqfc@nz5;EX91Z>xvV8M;p z<*PP*;l*KzClW-xYU1@Ez};05Hk>H1+5GgUum2@dg`lHm<*oEg zs<7$6^<+9Ih)4+A<|+KHR_Z8jdY8AG!n}aa@u) z4U6gDwY|WycKKxs*KRe$zYf#0gDpc?z|MbLiF)B>D% z!P_Lf14#r#>cd{@Rc7t&8OEu}@NqX9$9jpF(v|k!8`2>g$+ZfHOpY@g8@ougU1l=R zPf86$+U8)-e1VXGr;A}%2~8wxt!I6sl9!b^XlMj{M#~q$5+ozUV~UzsOZgVRHBe#6 z+K;={wg(kkvx#JUi>U*&`AhK+>7g}}O;E5PcGGNNRmMo}8l(2sOJLC~s!`M6(O(3N zDR4CoQsQ4gGclX84KLH{sVyzU$}n01$xFPy2-)X?hnzH86;sIWv*YEWV`6MPBqm<% z5I}?f*jU@Rf$7s8D2|$>{~v` zn-XpIr9BP6n3gGd{YA&UxgxtFQ*m{5 zMQpgeje~BbZsnAfscz|XRdZxsbBw5}q5{&r{{rCO&bLuJw{XrhrsIrN3N&jS)C9dH zjkj}2Db_ataJ#z;9n34NNzlQJpxr!!n3(uWj{ zoZ@je?-yUOF|yq#M-GFaqw>TA0q(;cxA~$zDyY38kNlZW{Cu$ z(3t?(oDe(QxeROc{n>xqT3F2$GNTry&|LHJXHmZU1_XE=#o0mf0YWuhw-%#D_RjC_ z{tiaJ~ZO4llilmL}F=%aAR7wz5xCH;do{o2#qo7UteOPS3ATM`hA( z54%zPTEp)?XTVCj#f&sQ#t+VOP?(+)p-+3+9WZjI!1J*vv<0olg|NybN=FU7{ekX* z>Dhm9Zb8GEM8s}#-u3H=i<2g5t`Mm;1_V101Y2k(F8ort@4C*K#HLLs(`_;yxkIT3 zk2&aO7^F|rX^t?sTh4hrg=I7IQI%7}TFR%Z+b_QE_+8;B>Yz(0p z9^&K=Q@$xQiW*F!{6Wl;L4w?^M@7VtdJC&f=D`9Msw-x+pifJ8MaQ)?p(Qco&r?0< zPds43sWB>akiBFMYg)Aql{TJ3tp*A-=}&jS(4aQo&Qet#FAZX?k9+T8 zbG)C_Gn8edPFstyJfRJ*INRC<>i52h%O;<0*vS`ImFL*2kk(!8;J$s$7xmO?q@^H> z@Aj9-^K>+$7UXFKhpW@7I?EUa4(J(6_x;Qh5mos$Q(drKU6w{S%z(!SzAmununP1} zCPp6Mwq6z`bONlQZ-Vo)jtae$Fqg5ZwBI7Snw4s?29DsM`I~O@!HRZaMdH!){A7Ok z<<%<;T`<*fq}Im4xfgA5hrx5cUsYXAGy`Fq-qY--!orzyYvyXCzQbcQCHJGheQQ)I51koSisS8NIF@hB|3)|c{Bu%7YlS>QJ$YF-_zhky zD($>5LqahX)&h8Z!N9_T!^=qVIe^>~u)bR|*|2@GrI5y03*%WhS__g)qd(%Pu-o>A^(VXd`ejf z%K50=6H@I92)6WZ)5#k?~hd{GnXs(2=575*~e1Pdtd6q>&BMdBd=Ry z^rn2mS??2bNK+ny|Az{Tlcd`0N|JPYD3`0$IRTV zv~g>2X^hftP3a;6i(H*G$WR>0NM^n2JD#Uq)wOK95itobIq~t+wuV`1rNSj?mcuG6 z0%2xgc`+3Pg+b?4(q5`4<|L{*7&^>jLZ-b|m^wV#SV5~z(d%sju)hn?~NC3HVb1X^o_Q_!8qUd-ue0a zLIfN`D@D?s;rO0MKQgNy4=;%?9ooGHwP({D{kvl6@;hqiw=E zvn4l^8|dSIfpt$ubzTp3`^kh{W-_F2{n_;kQG*)dz9$uF!y8?-&ES)_gV)>(v_Oq< zZ6l@HnUrxmnGtW3X+#XdeJ;q(kfCkv?P1*0fuI`qe6BrhokV)HXZ0&l9XGudIIr79 z{hWyRiaP^$=y94W`B~Z@Q}1*;fEu3Yl1I|mzKV5|SQ?(a^a!D^%1(5sF*S{YmH|!KA$MnA2iBn zz2_ive=_m(AszbTi>_e$HAd)-{#_k}H7izNm79OCE&SIQc3Z|BVH*$x72s+39lmO6 zLF4)OY@ahYG!&PLSzyLozqI%(IUbUn^9(~%ptK%vCV&$i*qE@?_!lzz52r%XONKAW zWNF>$NNCQ-|E@{#9h-M7=^dHSe*AG?_k)74+Dst4F^F)0Z6bdWg@u7d{!}|VDlPri z*C&_8{HZ?;eKgFf@$}dEI4y_|K@)N0%i^Rg;j~%fP&Gkmic*pRCd58JU?_<`?OSAJ zfR(mQamI`~2Xs-+uj&qhbyls`tWy3R$R>w}h8IJ|fW^q!H$ui39We6r$`HmuBUY4{ zwW3-w>mgDRs4=4+CVPGGN2dy&tuM8UDwdRTEltHj{9#gmPRKyt1!l{Ie|Ud1ilMNn zA6FeEE*Vv1TME3giwh^WVGee;7oYNt`T?OCJW5-5pV5wx{m`Lvnk4Z-$W(bsZp}D ze|GLx7%?eA9eR)vA7}vhl?4-u-u5>P1O}qdS8&)E*F07vMc9Sxb8oL)%fPcseMhFh z4AVzlhZ;((2EbC6r)Xnu24#qMnc|T05L$-B2hd<->w1jKVnRVfv$L}cJEz77mQL}o zwLNEZu|Yd(UL%7m{Vk5-tujc}lo<(FStQZxGaybe;^J2%1NrxThma4$9R@-345-x{ z5I6#^E}Y6hAC9{m&UNG7w*tw%Zh@f}ER~OqE83Df64QCU zel`Pzalj9{Dy?ubNb<*=J;T6leu3H!R_h5Mvu660^YGXguKq|@p_`m~o% zFh)x@Z>=q)7?T?|;D`m;h6^aJA>7zak(iY2E>Oc>K1QvI7W=^B1? zfT6woH}FsyF|i4ZcS6j-nMF>(57QeA&ZbdV3K4lDj&&}0v-p}3=j4GT`ttf6dH9)( zI$X+}X|aE}jf(>kV<6W}Aj-BfS=9v*boT9NLcR;?GenmehiN=BIqK<88sun~h?cow zT!L_1XPbHR(}F@|*WR1@RMlMiIcF%(cogua44qu(ksFK@*KfExn1W_~r>Nw*rv>d$ zj#Mp_xIbo5?#>ByQoqMMQ>|!5u3HGXA0kM5$5Y%JA(*$;HQ4r4%3u1@cu$Ag@Q%eNbjIM0w1~`J5hfY` z`1t3xYFJ(Vy!zV(O_2A{?kbSDs+ZBjG#e6eu|`_AE3WoDm@bWtR+4fAUTJ8y5cq#% ze~rhbjjt6h&}2s=#5l+flW%Pe>Ece$kyWy2w#HbmgPT>I=ln}yh95PG;);jQ`CyD8 zDvXVbdoc-imP#bMBw>24Vh;kV#B>8R(`ZHsZ~IM_Cevf%hoyq1))$T@h@OIb3lhGq zKoLjKt7<{fEAJ-dA)*FSg)A@8cg6(CO}@Z?U8~k5>ORK~54i-a(B9^0ZsPlAw?f?0~m=xc0E(;3%z&>+7Nu22D?7 z8N!`c76%G!Yd3Ct`a{T6D_co7utn$Z_Jw5Vs-#|-$Z+$n@;rT$h6pE@i;u2vi2TXX zvMHX)d|5@5V`Q9r-xKz5(adyPc=g&#a!jM4wnmkV>LHiN@dqlv(Rmf~V?>KD3Bm_Z zC>$=LAObM3p6d#PvTV(EGKq~=IW&44Mucv{s+*6o^iOhZCHJ-=!u8MkbYO(QA1k^@ zaFy<@B#kmq6Xl-e#7l}0!}I|LQOu&o9wFv_j?Fz~XhS!k%?XUuZqr7={FR{$;WDjx z`V~7hpx6L}>*^oQZiaf`;!SS-PgT?7bX^#P_szid*5mS6bLK2#{I|F;(D_5QI*N2f zSQ*~{FW^G!;#DnI54dMGpjmYR7`Xmjc%W1U%YYD~3)kpihloK2`+UB>}&Sbo|eA*}Sh{PSeESKPj zKq7E@{f?4vRSOdI6+_oKfDFA(LoSlLiva^6y2Ue9S#VqV$4yjGCCAF7^KakM6EOlo zk_;4Iz7+Xcu(FrKDboWE9fj%s^rMJa1gn4O*bsIG&#(Cc_H>oRcc@P>Dh^xTB!6pW zRoHU`q_VWUu9NJWZZzE;4D(IB3fVxM&c$`&*&|0h7(;3a7o{PhVcVn3NE;qblXfBS zaq9rFHW9pIjN~xBFLXH(0S*U-SB_=)Vfng&qb6Fa93L^qyz!EB-(;X%4!JH1QnTtz zmEs3M3`d_zkrh!y<7Pru^MQZpv+=zYN^WOu z=rM*c&5RbB%jf0pj|W3XmFfvX)y?EEUV6(zK?;X|UY>ntEwwdn4x-sGa|W0QD}7CW64&`ikFN z^a)5bN~84D2D`Z&+_C)+;UNDQiJ7UMyv5^z$%t-2{+z!UQ|ZJtgYswSDC8+;o`1@} zScwhrHZbRxu?*#6F?e5L4oo(1HtcEN;j-a-WqsOe!?r^5#~e3QFEXZKy*bbcNd3_E zkx%sP(6v4oADrbSmef&7I+#swE2Px*LzI|(vzL*9B>H=o+$+8VJB^>o^@WW=Z8WaV ziB;iEM`hs3F<8D9rCT=ixkP7)S_#}%Q3yU+9FDAO9tzmycIN|U-?EK-LYH%Xj8 zcpp=7StY+kSpQb>6l(K2ZuE_sSr!W7Qz~JzraLsicN?&hI>pHt~*5$`gR` zRvF60dq`h%buz6$Kuc9>4`wYHYnh+k^%d`tLu$vO*w7JED+K(PB3Br**fKqEHPq|t zDn2b0V{5veJ=UbR)jcK~@Hmt(1iLf}$lM#e_rqzE9SV?2`gCx+K;w`cn3%Zs+}TEpw zV+pK?b-MXiHpM^7U-jLRb@3?PEPEy#DViVY(Nm#*0-RjQ+WjlD&gNx<9&RL(Y{UWv zmsf`8^6Yq=Q3$@U^yV3P!5w)Y%(blk*dWI-gU~FtwhD}_yy9r|@(=#1;Cmp9d zRaL;d_ESrSs-9jhqiR04*OVReu?vkP`|GO$3zd^uek;lj?||eL-cp_P>x3MT&`J0H zT6>RR?;{e}kayfW^zdk`7Idqdyf$>a-=UbekBlBW*p2%`YHDic=7qzD2&GEJ9AbXS zr?a(8(aP>Vlfc3kdRzR+N&f4Au7qeWObjet#3cm==Na6LS?6&hwkqSh7W&KOb`^h9 zhfLD&JmfTFCcUYdvR7BfBp>KdOh$HG_{C98*YJ6`WXSn~??xe7)Imwj7NN@|R?d=` z*<_hQqHsbespXK5%#k8Kng;fqKda`43i#CF;fAbi_eb<-wN-P!E1x_dhdBSA*r!+w zZjK0|d?7x$O~@wt;$AA&494LgBPU4A2KVnhNXRYDZlk41W{+&U!xD8KqVW(AwC z6aeV=uZfpYK-Me0QW@pX2BAG~UP_vnh(rW*duPXOlb)^_tyy4OBwGDvks)v6wby^c zUL8+j6aral_N&=%%^~fcOk(M6Jg%A@`wqmNaaV@ae=LV0b~{1Db^hS>B>ln0_8;hu znyV!UZ@Y4`anruCQu4M1$NdV*VvpuY1utopmnx(-4w|ne z?>y@qnyu}#&oIljhOFR6@16)MwpSZ$C~2xhvTNAfnF8_&D)y}>sp$n z<0}p9DSo*jkntK<+Aq4bP6S6Ab8Nw(ChO6i;g9gG)IBaysz1~kY(2KxLrc}Aa)#lJ zmK@(~eS&^6N*_s4TpDFb6IS1OYZhJ9CTc-{0BaTG2!#)knU z+x?Xh1YPzO;Ef}=wwS|e0I}!+lVG>ZWeW(6%#nk^!Dv7Ca(T~F3Etgvb+?a~#tO8T zjdTVq&+Z^g;m9)K4q$zM5B=Oo+g9Ygm9Q^Uu1%U{{M4M39m$ap=p@4Pf%vBQ=u>{# zzBA@?`paK4=zs)nJu$SzT>(mE!-L%2c)3E|n4d>h_v;j6qk_pTBx;( zqk>*8D=1fFXr1rizM0J3Ew2d1AG->Jaz{Kz@&Gf1{0AxJh5F4nUl`luEAI?GbwO(C z#P@A&kKb$MLa!ijR+&Q25aIPD$5((syd=eRj4<{0720P>W}#uwqr91rdzV*>XCJsV z06Ns`kucnupgGF|e$S!}?=LbA8k_GIu<&aok!^ysz+3Ir@PyL-KW&s)P}sk~n=A;& zU0^>yg9Y^mu>>zXEk%196pt-T>{e@)mDm)|+2%aLzjroOu+kfx)FrCbNt0>HCi>YTWjHM zyhBmv%nSyx7?gC7DztpS2pXIoM-m66hG9aZQck-Q(iLT<>&?;GX1rbmPFK8z{(yzJs=m)WT?UN9>nA(nqa7Z?<YeyG&7^ zU({TYa48MbT-Hwq9Va>$!4UC=b97>fS0R8^NPhq38YbM+7wEQjI*Y!yTU(ht!&e_b zN%FZ9DJOL)Z!bDX=&d?;p#5X>&zmgjkCo5Z_3`(ut|BB9SWu}3p7`1Rj;L#JMTX1Q zaEskHXSGlI~EGA`9S&i;-x z@i*{+I`-GST0|cL?uRxn#*TA5Yt>k9F{!v{ay!KqE)%7*t3k1$;EyiQObrF-!+9Py zv2Pb07>#}yBX&}hGqUmp!FoWaz{&PioxyUw$uSXUo>#?Sx<@A#5+h4}t0t6Iwp!j> zvgDs=HjnEPV9>kE)G>x3GtIODW}Wb4Ba0y}3cFsvP(IOlib$Y#odD72L4N_Ok6aYO zS|)eSFPm%%a2%Wt=NjEgjwfcOIrP(J0-3TA`xn~%C^ug6tRVnAsGvon7;YGVSAGNS zy&FCp6uXgB2Vm0Jp;wlLnK+npF1SRbK}J|n<`hi`j1FBo!%RmhKn@h_Kpt}^^-M)- zWjLzGM=!A@sTC|=0TS;b8JBK8LIC|^7jlkLpT|(9;L=e@GUl%AG)`nWqI^CfBDrK9 zc2!Q~55x7kjOAt~6owmOsf@_reT%{%+6^ z>L=GqRanO*)NkDF~xEH&{t9R*;j66n6;{4424hSv7J!G7pL6{gxA|9qs_gXj1rF$4ktVhgTC&_i^QK?W-BXtG$tBoIhWQP4~V{Xr`e`}tgZtJ9ZdZbzB} z*MP*X6_ieUA`>xi(a_5z<8v?kW~$Qu)UPcrUNmaaD%Q)*$*H+<(n%ygg}&i@eX_5E zL`5t8_petKCb$vT(iSw02lE|f6q0$AoapznBh0I59f94t^Owd{mB#kG8p&LYfzd@No-V#|@Y&0+i#c|&nWfO>_& z4}Y^(%GA8Q ze{r$z1Zh2Ll=PIOhQQUoUlO!cV5Bxk6W%sIH|IA~kg-L{Y~w>(qOSBod^K?&#r*y$ z4@v1WKr7L1i)W7K{^CbCJ&Jqf{N()fy=zdm@bu)Cgg1&ex);~X9Ub7^_2?~U6Bie| zu(0rUn)@o41n)~)O->HyuOMUYK1M!1n%`cle-C`16DZO=P?(mZD}NSf6%yy6{b+PI zRuTvI+9C|6`sPpo)v#Ddd;yxe^% z$mVeKuHPFsZQWC$l45sZdH3cwpA{P)AD)U?T|eol@s%7`bBlOE$f8qY6i6*1h?H`J6vImHVzUwssqUCWAzH@_v2(GP@zHNSY^DgRihK z<$yWAm)Wz45xnJTkkdnE?~ko@-xpMS{eyMB@{S+zO2ep8DyY!?Hr{8dX!M_iymBm_ zp;s#YOjH&Xlvpz{ZIH%$s*EF0BIzMkW~`w@Y3uyUd0Jy@GvCe-Bi;o89Y;@Xzh1FY z=#p|W;;wh#sfB-%r-7}zWjejZ90wb@H(!s(q8av7gsIBTk8F7qIskEr*rk^Xx9Fzh zW=?(|QY?_Nsq3s{7!|v~C6Xm|mv8t>q#T9r_;1+_HM}3HS6fx2i_g6}BbmWFP9trG zr%oUK{RrIKuP-K-Q)2WNCmoP^V*$o_11(CbIc7Qpw=^uurGfk7bsO5>FZXYu@v!2A zx_g7vp@F=I=__Gr2ni2Z(QkhuyLn6+X>?@P8!P>lo_iA$A6*6DMKOf6=SUm##5m?$ zauK|C%kPm{=Q?n|ASXX`x1( z6B~X?Y250R1UM)o2-4x zSlFksrGzRi4Ss`*-FQ6m`Rva^%Jg1;BKd=)3($`Y&PN`e%NghZ`Y`EVMmjSkRdFv@ z;SQH+ivG5cPM5TS*{`liF5ScGi0-uXnCD>zT%Iltx*A(PYC+^fe6|aAM7Q>=UIcD< zpa*RGgqAqCbqVcymnObFEIuvy7RcJ@eUYDVJnh3M)Xty2DMexLP!!Pp$@LCFV6#t7 zGMoJwqMY?Q-*Y!SCZ}iM&;>=UpCqoSk+)yM75N1F2}>z^w@HyMXI{5JE<6?p&NH7| zMB@ItibDeTf35__l>+D2wY5ua)f}iovaKv3>^tcz3w@33*+{43_j;(p(2q=j3U5Ne zj|COKqbDSuU2tSlMWX z#U$Dx_EXri{5D-*ZE_t6jB$%v9*matS-dXu>Ng(pJ_(;#Ia@jzDXrcef)b1-0fs3L zjM@6U38qR^A?|iXiuCP*A!CBWk%mO=fwN2|0RwLD9pBz}omFqO#?B@JZ_imPINpt} zmG9i92H$u&qTH;l#vrA^8TZO)*~lYGRCj`J8u4j@i@J(Psi3u~erI0*QVKMI2=S_G5_poQm!k6sG%Z9BDrIR7jlpXp}~r z&mal$+@t$`_#x*)(Bb-Fv*{Y;eLov2Ffl(u1Lv6TfLlmXw7N3(S#zAK@dy!UZAf+6 zCR@MY*P{pBWKT%A{(Sl{P)bkt@wr-zbDO|!K>gj#Z%7j=1egBotIAF2?klRIhayf( zceTgYpAny%;nYhY8SWB*b&99}zVD$x%{r#w6!22atIus*$6hNKGM!`6&z?+ZJ)~IC z>xdHd9-4jj%d3S;bEa7eYP_2v*L3C?Lq;#&Q<}MmbC5sjE%p?6&blga)h5p2hFz*n zut>>TceVp#Vz%4=;zA0`Zc5-0C=fGZ-UoOlT&w5WE}l0jbUdL*4R>BPl1hFV1@j}8 ztdkKKLK?cn{1$oKd#D%8id^pT9gPfTaZ8tKw^jPqTEoBk3@S^AmhsbaCb(T+UdcTwGeZ!TgJRIls0@=dtnu zAY7&hNFNvV3@CO5e%$-n)u`Uz8psXPnxUs%l&Hh2uLxea6ReHf{d~%!qDFs=%F4>l zLAE$JIyuBXf2Rm&5kQ63da@p+;XZh8n;R1ne6e+vpM-X7RMTO@b@fXPek70%Try=kmP%Dd3BlEjmXFTY> z?It)ebGrPl`8Ce2E49^?VWTUDFT=%DJ`VJC^6aciHs(dm*;_@oCG8{;R@3`!IlpiB zK!A!TtnC`ohxAUfjp0bp|Fd)R`il>RFj8Wkw8eCIC^|Z3rvRj(%kNx~(c%fV1@F0w zb#%9T4;>Q%0-_uC^y8Hef!%U@XSa{!*c+NJzv1;hF*YbUCo+<%s>Hw}g(q%Hqo5z3 zIOpf3z{T%*KeM@+X3e3ej_Cs?|HjK@|7?^CB!5HPvh)K! zaD2Xr4<6nFR`25XzlLqR&&qFHVsK|~INF?TtZaS`7cVa_;Z4esxsjP!Thh|n;`wHo zk$Jn_4p09mref*g7`{Mr;fWtgBO!XbM@xEi^z^@&00F+^m-v_u*XQ>yd|nTORCo){ z^uN%^YtHJ~RD;9qHE(I5fG%rNe0)OipiF)8ERTS+YWdaH)?DZrfvMHie#4WS8lTS< z-!O%~pwMWglYQ`VX8 z;wDxJ1(~Vp`=u23w{Al41{4o!i>HG8`hLJxgYC^LSA&ZCF$7|oETimur);f>;7$M8 z%i-JSdqB8iLV%xNTwWOXdXeAd$LEo(G%_-3A#sQO&Q#mHvH3cd6Xaoe$4U%pLhniP zzKviu*~CAsdZLR4&abzY3gNF@d0-q8Oi;%3M#C>HWY!z|UFQo1){B1@7Nrj_e!gwg z+r66SRbl1;Haq0{gSSa1Hz#sk0RVp!{mnIlk<0hfQ`^9H;{komZiLxXe$Hy`zOh!T z=iO%G<&em*3a{VSLxo~P`ca+qEw4u3+Rc0hqag;p$|f!*Ax3-Mx$WvyqHbXv)U5Wi zJPeP?j>S?YcHq&-SR{HulLut2gY6bp+w;^GZtm{{3VOC`h;&_hd;6{~n_&&Wm+x-h z=S})0B|fU`wnJ9c$842Uzjd!c$M;p=-VMfDS*0h4>{mp@Ui#N@2O!0WV=JI-ORG(FodYw(4?kA>eWSoxI_lZq};%I3>BjHD`UMTpk@A_2bCzy$O%(;S&rg zD?74zV1LKKA?)+Zu`m#5c)fITsWLEr)8_oXeI)Goe$++Mdf(;e*7oz+y{c?%G_}gf z$;nQCoADttR(CyqeV7*vTk&P-TU!=FaA(%SnX6w%N%Y5Z4u?yhf_wwQN;S3cUsl}4 z>K5EH+Y|g>;7iUK!djy^5RjbY{|9_w{V(uEPk8NmL#q)=AyJ6P)6qlf;2Mdq^EWT_ zH5r(PN5|L>e(-PEgX@|7-o3o19k-j>tg`^`x^j)YY961PlNU8~;`?Tk8>L%iA)*Cd zXeVQFB&bzTu;3=~U~vB=mlA2vzQ1?_C{t2WQZX0KHbe^+iJ`ZgW@}-?W|;J4I~F5L z`Yg=_w|Pd+45$aPqbzjzsr)d*U2->Dmjf_ zy+D}g?&pVNBIH?^Jy-qhdmeL$gV;ohUz|&ICn*d@iY`@e2U2bXC4~2Y_K-Y{>5(R0 zHaM}+!Eh)gT0(%ok1Ocgf1!#0-iU;2wLGKw5J6+VmpEt~+_5&$^kMHxW+ zVALk!Ud@HeuFmDB=hbY9#jPqM<|qN7X(NPjA(lS9oaIet2#c~j&0JL;?w9?V^;a2SG))CZ`dB6MJo~7Efb6GD&&z`DZoaaZI%W38= z(-x^4!Q>i8T|6Gr|KmTe^C2}l`wjZqLYchb25X>kgCSN&K*1qQ+@8O0>LW#oPi8eu zXk6bkhrB1%<3-9Wd8tL7RjoGh<(E7aUS)z~cyMK{Gx;FBKNt!U@CAt`G87m10!Os< zm#+JtgCwfDiIcZj%jw5HFH0xnZm!H|%H}!-a6WCsuLt(}^W;C=aQ%^HBf2?p?s49W z10*pAqW>lWGPow-@Bz-Y3n8|~f1Gxh&EBWOMaJt0 zP-n0EA-5%^_1{LCDXuYnJVpnS{5&IQP|@YR;b^HA)CYXC#Arb59$7cp6?K-0Kc#-& zATM}U)40(IlK0RFWbNN2oCWs$UVf$RX0N)^kp5L+V!`JS+L^>GuUnk@1%-qts2u%(+Ks;=Td!&|7Rwh@2{^J` z{fyh~)4x{xCC`p2!LPLS8XmFXukaZX8z+De`#W)%G-V8Ct-V7gENXs5|F$uPsE7HG z)#kICwPDC()fm*;wZ1}Hb@F1~!%8yzoU;zPg?isU>+b;fo`$28`owt+#&{Z_ZQ(9G z(41svpuD&tNP&%y^>E?ynU^tfk?Jkhzb*N6a^vHnqB_;FM4iH*!YtEyU>n5k9vSo6 zN`jNPb#)D&OmtyW&F3_0GYDpC@>QQoeL;lMdN$yz<{;o+@WH{uqjUKE`{oCrn^0)< ztMyB>@YeZ*24VB9}bS)H_b}4 z5afq%)PUJ1=Q^Jlk8#G(qvprg*PQ7=U(Ve$kg!X`e*gW0gM{)sczx+XOG7IiL2z*R zS->vHkniCh-pst9da=f8Rj4^sI@A|H|9RAEENV6f?F9*y(74n+g-c$O*vNT9LAl5ZaETX%i-RxbQLpx+9D?wbsSo{ogHH@Ir>|6 zTdXVAy(Wk~AY?eLx&l@*9yw93Xi}m({pJt9ACUN54Qf>zLbksNoK^|HynOFjy+gR0 zTig2TJst?&Jj1{bS_ep>1ZWNyKWvs(3yy)JFPrbt&t}JMdpuC&+G2L00q}+YGyn2fuv&QO;S{YoREkr%i&h!^n@r zsUSH6z*-(qL)Jh4o#BanNg8|~K8`QJcv&1t`VgNI@@${G1b0TUAmROtb5aC1S@NKqHnm8S>t zW-*mr_H9q(5qzG%ta%S!tWoal*L}q;+EguA+hVoPot;BQO^@eWU_eOwg9TMu^zj3R zR^^NzpipR&T3c4uud&^>$HAc(N;&V-pNL_hVcw5tefg@qSLyFw&QA9ZnAP^=$R&@a z67R0?hfIYb^?RxNXXq>!=M`z%VuX+-3W z(qGHUhhJRWx+@Ikb73cs&N8VnUl5?+YpBXapvHu{zr-Sd)byL8if5q+zl#5yBf-Ol zW;t?e-yGD})tT2WAY)SSJ`7jKP{_FNbp#Q4Tviqp6_u3Gmg&CR6K-wZJ}Zr%v*n@c zzqq&?uC4m?B7J1)r?0D_-Sed7d8q)1Q zOb)STKDxAJMbC!Jt93eD2O8y;>m;D!ReiDx0P8gss`_;ZPSuE$9q4%F*$(~FoI{z) zm!tGg;S1Uxbl%mHxxidJPcCVhW>Q!o9+iy_UHA~O#6!l}4J}#?0&1Js^+;8AGPuQ< zLWeE*4-tK8+-KtP6$ zx5?LVzJSLUTKvdIE7jVJ5Fpyl9Q3gHi^u|zaBtV#RpnUijCj}N3G z2Ep-rQ*IK(pJ-mb$jKrxO>Jd&ZTCbhP>P9tCMN?q`W*!)|NZN@(H&A%Rn^}wz9VUE zO;19`L{jN-6%+I4=6G3CO$`?pw@=H=(vtP#TYi52PbYzBL$S{5&Sx3zePSY7l;f@_ zcSEB7S8|I~;5_nM8L7Rlj8U|6x8hzA^8RjOA{vwTX17oJUT!hYSAV}3^4R}@Ymcbp zE8?~56bAS2&?P4Z8CSbW_2PsG|4B<5)l#6sYG`P%{4j0&1cb-w-J?L=^Eb`0#DV_) z&;H>b`F}yx;Arikti@Gj{);@5zv5O2*WsTUm$*kL#lAi_w2`s2WiB@~%vOFTUu#J` zOPfg{$}jpi3B2SNcmULGDz`uMQ~ zrp*SEbSMN16}|pNrN}Yr>33h6Nj(16U1#?meIU7qYW9r4&F*&HgR4dI6$XsJw5mRB zTz%6b-I=%B72UKsA4&I*tQ#z9M0jyC2CP#rOS?xRuGB`h|4Ka59wbOEHkp$8=LP=6ch5jwvaZY}lhv9ACLUK_O6 zzw(71)+)WoVuoP=Qeer30d~c5GjZ?iN1}dxVM9qZF#0h1R%(QFYArRz(R}}GWUF2V zD}VF$ttujbT2L<_Wl|=rZ57qg$o2lwxnDX(HRSwoPYXE(KKL)v1L)~xBl_$64++Uy zHo52C75(f_K5+;j+0Pq|R7ugbh?4U?14^4ufQk(}WfRV=p^beop{&ZMIigl>t*J&6 zn}-wB42IAj>{izv(oe$soUv?XF}_(40@%oBMB)-t^L-G%^33I9dVo9TFM7~-px-Pd zl>>mG6RM(`7B%a;otBDGXp^EPV~?esSdt&lHC{D2F&WEJrp~ij@#;QJA2To>#ux2Z zF!UD|UEu6B7K?(f*zakj&FIJ%?gO?!%KGiqtBbq7dYz>DvtfYU%83QKa3nZRcc;wbzKV)EN)fZ`gN6Hf3wxvxD(JNHg`;tt>l>LH1P9L;cYP7TH}9Q>NQU6 z48&NMiKp&vVe5NH^q5ojp>|3-qKJ4C%sQEm9c~-ngzn?$)Y;tIcILc08^xJJhyvDM2{S=e4stt;^B1t#h-p{Gi@a(gxrKF-1w zPY!}dSt9;WJrU~d@z2Raee%~j1<^b4(%NHBihi9Ox59J@N5dI)_Q0eH0rt9=h56^% zQiqR#Rv=0M;l^mWCubUe@{ zhp<-um523HU(iq@Gl8`i-%?t-@BSh|dv<@;&!1s$uJ>35w>WhpNDh|aa{bY=6TR(B z)*q@d-XQ43a{5|y6jV*!KU>Q5g~>%mUS6TuF0-n!a?HO>T-xT9uqCM(X}2zo4?1Oo zGIU8cxGDV-%M@Iya@ddGhzV!nF0*m&t&qfRP2;!h?+-sp#zsO#VFX{kbvwzz5@FA* ze{>^B-z78|;wdBl(utD;&uC;+Y^S37Q_^CqQ2{hAhh~>L<0T}tpxt019!>DU0iu3l;(!TDM6Cwd|z+rTmejpicdzUe`hMEd@AuSm^Y~3NDv)tEu9PdFuYe z>ct>_?Jy9@0V_V3{2yRAxja@s`3o+-V zQECMx-Y*Ky4mljNbiZW%B}HuH!f;RNSfDm0 z@s7M~FrXA<(z0r^fA|7?=3G`QvqGo01xRI@TUn-H^W-Z)ga>CV%0!7ilDXM|-zu>u z?BhD)=(nNyVpiWM7(o=$2@B=-X>HDmdqv&#coR{96+e0+e+VN;3<^U;cs4NPY^x5~ zh}rb~s-mY$R8Hn!P}6HtMeoBdAVJefOyP?OCY~)!DNsJ4GW{`#Y2ei-`e3_EihI?O z$;`fl0cKAve|VN2sij%vVRbdm3a5_eFw}va3I~l_1w%%KY?#|_)TotkP;ZB9 zdR>`00D>EZ6=@1<)BdYl%rDYEXs2-KojEmq;8LlJ)Q$&4OH@R@#hiLO5X6r?{prII z?h%;=&6cJU1m(*P*rx?-N}Hr!ONl}1ckf>K)JLu^K)yPG!B8?96>jGx<_=w60ffFZ z2Z|+4GMt)p{-~Ic^7PXoscs(=_vZR0qc<*HAw}Bp*zlkfB+@dL4CK30dAu0fXtCcW zy&`8+h7Mcd1W_7sL^IbYBK_HFy8Frr%9qzQkh+I}QN7o7{WeN%Vw;h3){`0_?Y7?T zn=dM6zfAhM2^G67rMy^iU*D6Dh!BUFth*SxdJ7cOJX$B0#fl$-74gwf6F5*y`w9oi z=kbLcmZTS_Zu|3QpePGG6&W=z z1xBRbVKbX1sV07l&OaJhDhcMZPiEgubPUsJDoVteL&`+AOa&d9-70ON3XwlnPT9S=xzXC#J>aN1SFJCNe z_+f%rIJ+Ghu4qweM=v`^!KD+!uLUjHQf%q*(X;Y9AvSi8j-IIR1?stn;>**AmA0!o zOGVj4P#aw5Q9c!OI$VwEND_?B9`!Ko{r9zl$KOWmrbh z3~k#dN&^9RQPJAk>TyLKDk&vJz-Irqt<6V9X2hoL<$BEJd46FbG*)Rg)0D|_%%(sY zn$@zrOZE^J@F-UzcJ7Ac`e6yH(+MuKT;89TjUwy&e3E89iT@#;BE_KjF&@S+unKE| z^N|qumX+nFqURXF&lyyb`BP5i-j0r!eZ*eF-cB9A5N-r)Ujkn&6WA=`#QnL7WVQa( z^R~43^7);_UpT#RkllKgk`qiUn{~7jiDw=T`+Ke&6xvBK)6;0Y^^f);E)I_m5flA^ zjqU4K`RWKWJARmY^!#8PXZ0%GbIrcWRoriOyJ)@JNq&5M{P*vlv#wRLb11|d99~~7 zHD@b@R5-gg|GrF`wmlDB4ec{}NgBpOcb#W;Vji-am)t}=Dx$w0(76!M`G0qPXg)qK zI)!pb$ZwH=0;XIPscS!iwiuVyBcEexsb|KhYl-tdb(dSOQzAXly@<;-C5>XpmR z^nmmcxdT^2SkN5ZqRotigam#>UP(!K%b(AEfX((mI(MLGQb+3+(mvH!k<5 zSeTh>G^`Z$Cp&}?$5MIfAJ4WiLi`IWOvci#(o1x!-ACps4Vn~RE*SV3=;&l*WMT&l zYin!g=jTPU&j3H;;2;EE8|4!qaThU$sWuOEQYx737q=-(e$%r5r+NEKfSyU|4WK%S zcke9nDc_9)M(K50ZUTQo9@>Y)86 z9ALB7F7Bk_X;TG!_#dX1mX=ZsxMC>fBE!QECB3Q#w6wLoo*(akUuLGK-x2ZN&YPrt zV$v7xOK)<5&NMje*gs*|jm-)%ewDzXLZ4xUCZ_oKM+0Q~*z-N>P+4b1<+~N%-(P6@ zc>@g#J3W4|ixCFF2#?=7(iZ6l5`)BOl$ACfc>@y05h`4+z4_@?Wh+szOFvi-8a>wo zHoJwDDG-YD&1MpBWU7tJDsSt^+@h`QCSqd_jOGPL?kUU&%~k8`F*0j_il_I>a_}1ozy$7 zVnDu70FOY%NuJI%f2gHItZzuW(qr!X3Qp?~1kjWth5o0gvq_$o2`?KF+@aiH86p4ZAuNQ zAO@OQ$^EWUG~(JmZ6zVuTkWj94MQlGiPZBJk~Y4N)fO34HITDG0kxo@&w3}Cou{%{ zSSKj6l8@G#+`v(Cu>P|Mamuc1?m6vU$%?#V1^EgEL#{1+DywQH{tP{@baZ%L+IGY> z1;Ix}T9(ypl;g-9;tCnoVI2P+8Xs%a01Pd@UO6-Vl`O9`1Ka ztzYSakIF%g6Dfu-)odd?DELSuxaMpCzj?Cqr2s4q;r57v&|{mbuWFdswk$92yc7IG z4bj6Q`PwV2Q!@LP%^aCTAg%Bd;UOFMWHQtl2Eyu?b~u`Nu){JPcZuMV^QNI`{ROG9 zOQ>Cwk6hL8>B$Whvk|1#)zq-8#{&TzQYV(9ZRP{u9MkYW4g6)wL~Z91)_VA(na`!8 z$A`$lCQsT;!uTV3)O57J)aOQUpM$b^p3EpbQKAZOrql=+> zL!5I2SM2+f%73i4g9?$-gWBsDB2}u^rR;U6nyI>KE#ji}QL|=QqQ#ej@Pgyj*P7Ov_ z%R?dSpD`|V;`t*C4FB=o8aV#6K=%Ci8IM--Z>r=0*}WM(Fs?5g5K9|v`NfH{LB4X! ziGlCw9j6P#&6>XcOzSiih>B!O$H&Awf{y<6;nwu1z@m*j1T!}Ns74E0##t+PF;et%f%Np|CV7SNas1CX(vcVM zqLIo~xE5x;dJ_8UtE7URz&E-MF-x|xZv@*aZi1nP-keGoZjnaMB{d37<>C!`>!3^m zhT@E$4V+&Ta1N;tpFe=&w|cYlDEsp$9ShIHh3EJ2udb!u`A4HVB?0f@*^5k(9_|v+ zgIL9xf+p3j>#V3wtw!_$w~xk$SIK~R${&qL=L18Pv13FK`{#{oVj__ib}ov{5z$D%DRO5gQm^{qY3;elMMQ>Q zR(g&ux)$wx54uzVjfVjvP$^Kp?0MW8+o5dZC%+C_L}aV^m;fDs*#M+RtNy)KWRUO8 z{on5->0(Hk$m-SQ2~Vl;zB(o+=(BgsKOkoXKY#v_sBDd;(N1K8c>;8y;tK{R`tEM! z;|@>^EZJHs>*s!ZoOb`uy8zM#VB8G3xd(5p-67wO`_(&*yw8}ZfP~mD6WVG!Al{~z zs2))(V}NB<3fp*89A0F;cO#BJ9JWM3OCzk zshF1$AguW}V%bHAZgQ-8I`pNwEHNL&JrF~D9Q{5}^60gz{>{$1 z95q=0tm3Ytn?F_hV%XBuG-MT`upiD-V)iMYyx*3Qc+OAQ=geTnG3p&%Ajb{1fgio# zN!5RI2{)5r49m`oR?rnq4%6`r1`f~p$;rvCdxEyr{>`&I>BP>fu<_Mr2$cy3!ZJH! zG;{~_ofaR9lYSwHdRMu?n^&m|5T2CKqu?f&RUL5uhDaFQYWpUg21Go2Vry&bGRIp* zWm-<)>2fYR3OS%G7P4xZ$FV!ZvYiZW(dXgm!}7(%A{mQ_G9H_}J$IeHTQGiIJ>LJt z9RNg0;=hHvb(8bl_j1q4#^$sHvD0dUeX{bg`;y#sUH6UCjfiuqfX&+x;t3FxoC%KM zHV30nzYghhv6B8>9J2O(Eng1}9fc!|d(ctv*Z3g-d>6kCcirFLTh9u(o~~6I^u-CZ zra<$@V4RiY6O+XUk=T7 zdr@inDyeu<>dCXNu6f|kpY7{^845E|euz@Z&n{(g&}&#uxW!__R~KMAt(({JBg0IC z48y7X`Gdgo_~fMh%j)ronhcQc+WG6W-+#U7!p8hoaMiO$sZvu3>&pZ!+9!x%p<+S>3paSPTL?};jBOUu7z?PrNS2OXq#@Qe<%wseB&SB`=0gNz)d+k)JH8Tffs97gfrp@P0!A zh6?zZ>iLg-S0>;5G)%ZWiIRW$I$)7}_<))kv*lAMyLoiX&L~f64>jx#6Z;)cDJoEL zmzC8ch@|e5_QYA(1|-#G<;A#3{*h)p=B z@HowX8A>tOR+bGgH!_A%^40@ih6|S{zCpaW8Yn84Q)bzww(~BRj_jCW_az9Jy1$1@ zzUl-l2l;3s;#i0Jla*=zxI9B1Af=UTa-%>AA^bpUo&MG89}!(WVL;OlL0{jfRv1nq zKtFh?1Nn9jvW2z-LRDXD!w*0ymSVGQ-TwW;dP!S;>&x=2-!T-UpHQ`8=~JX8Gu1HthSKwX|t zlda`LxtaOKiGoYG0z}r>3@e~&6#hU-dHe1xDJ0exq-}8Gr4?k%Jf&Hp&JY;rPTpS; zhE7P7F4n@$C2F2J{xMv9{v|6_GQeytO-^WfCoh3%g(BOS7zI7jcef4RMI=rF761|fcw(Qot2ekv0 zhj(5l#I#>k^@Hf!uK;aEj!86*IbR~&$NY?bedrCkrkazw1t%jft2yiaSCfz~BN@Ps zDy5}|m*B2hN*hawURO@=yL_i~lp?4FdaGU)J_2b~-#kIyAGlZ`a`YXr=>nj%#c74~^e`@rlb99znw_q9#?2N_w7Wq0QLM{=MT6t6LH&+Fh+gYFh zJ-OW{yr|;mrM-NyMpsyS=y@2*v60OJ*o?6a@!Ik3Hyr zvrkD!oQ*)J;JIGutKAhWo=67tI@z)J-{&!LVwdZCfO{yG&Z*3C_z(Rs=RGsatRUq6 zTSJ=9G-fFup%0VYdnV3W6#jcMJ8I6@UJZ=uwC#9}AhpVyV2gTLwPM|6ZGaunz*Jys zIaGH`Lr#(432B=aLp((yg6$&)QBosYqMp>;cp6o6N(^S2$%izOj@9%s692y(W~+Si zfdGgtbPN_Ao6aP^?#*N(-`!arl?|bQ`!lO30-Q$vHN*6?Ajpy{(=?Cv1O)};A$Txv zF9(FKIzSt&8GOBf_Zi7DZO*<_b&W-hOwy)_NsZ`%92BHCg2fr@HUM*Mt=3`&@1Z@A z-@B_&E*p7Om#6i7YwOn98~~+&n?n~~I+lk@r)smR7CZIP&<2f-$)E@(QQI=>DNZcl zon1>w0J28+;;?v7?++;`S~Yrw@TpGU#sqjqsu0icaBpc3{BKL#FoRR)%5fg#{ESQ_QCcn(< zd2MTxX;&xAA=fpiY+yw!HlD94{I1VQ$g)6rKT@sABJZ)%7-cO_z8oj=nZmX{~r;giE#!Iw3Kt=y1_jivY0bo=q@>PoHrj@h*;62~*#z zrE(c<4S#9b)grIAQX*mXsklab;`P|-9-GuU$`JQ!a!nkY(nYih%35P*iwJ{su<;;w z_Fb-a0Ou}93k7KNsJD!TwZF;F32%`Hviyj9;?udnUcAEHNqZb5|0zuf+uZ$ZA>t7nK9->y@4Om8$rNfY-~h>6wl-=;`UHsKlkDnyzLvO~%r! zm=jmLPL@9i+($#>H+oY_71WBIq}_~RXQW}Yl+v`O&h)ESE=}D(Dyi;=Gn~*0YrM5} zuX}(XARr_rCSL4}XrBE8s?SDGSiC^x)G^E53}ZtZeze-7{AO1qI{khT3U8_T5_iVUMuC z(ry~f>7bws7_G(bkGhqxZRH~+CH>s4Hwx;fS2d3?&f{f)0Ya;c z@;~PrCFQmGQ1Xp7W-f|_*;KR*lC>5#y3wg5oXsww?cK7pGXz_TI1sI_x}WG;{Ph;>&F5bX4JE}PmGsN?-e`+v~&UieidkQ8b@>a3{Wo~4k% z5XZ2sSz5Y${qF|`bQmG-iUREH&WCfA4!fgX52f`&U~rno*4GTrY+PX}m z^jQDt{MAZKw(J}Pxf&7BN794#2yWiL z8?`YVpjX8J+e2ATh-p0DGyuUTUo-C=4^Qu5n5aFn`Men=B@Mn7_Bjg-fP+}S_nk6l zOCY|Zi&7U6K~iU;u!m7q__^tjkb{|0th_&WAqUjY3^_L>SDO_K%F3Or`#sw`^{p(} zzM$Yml|wU#HLtlj@9T1w+S*JM&!{L3N!?0XRr&nm$gxW3G5|Bw=&v^*T zwYW*cp?NTlK`mlh9vKtKRbd2)=a=vT{QN)QF2g>2h_f27@)4cyonlkqKc1>|M<+zv zv9nrK%lW5AKri^xxHP`Nw8T7f%)qA`mOHfOiU$1AT01v|@N>x7)fxc4^y{6q21Nip zoto&qi=+3;{?=WanI+*8xf~ewo?g)Bw{zW>&pH&wC=nW)4m|YrAEg1IS$p$&W1-!; z3;VQy+OG9A6;-6^)m4U1%8Jv>7-*oDRCG-xM5w5SBx|LUKtAy!~bZ?g|jWM zK84#y(_l?4s7B%+4M!efV-n9OW{-0FPe4?Jw#L|&PrcCCfHCkd%>8^cTKS0$fooY_ zgSrj=M>6Cy40N!+=ZfakMx5am6ZPv35P-o{_4)bcPF8x5?OQsP1ibMV3S# zfE$(-HwxRWqg=U@1UwA|EEwQxZ0aitDaN#)N7o={W38I8Np!to-ZDuO&*QP7^ii2V zq`O>mOaPEw*M9q%_KD&B+eq8jUg>jOu{(&vvLeXzaNicOzcp z#+JCS9@_`#@uXW<)J$>_k%Z{GAN3qZX~TpD z_U6|lphc%A!s>Tw0xdXP@muGkV3&%7s^)o0r4R%14I=o(8*nlle1rCVWt^X1%R3|I zH&hg+21wtK)EN?^-vlphyxI-=z?G&WdZI}h>H|=v#k{vrDKX25z492XH$1Q;Ly>=QcjC`&sOFVaWAwZ8Djs(3oe)eq_42h;zD{>n0ZknSn zCj_Y-dX?Ji?xvWF*)X4cRb<{CuxqvMKSWxSHwDie(v?{_AbqcueEE0%D7Qnwq|^)| zth(X17U0pE$*D{;XQX={!T=(a4yn3w%`IB)L9I>t@ILkn(;M6O=r=TnNrm!-ROI5F zP7a{8US*w4UcXg)Xd93Eh!eDZnq)&Kb0+b9JR8%t=Ef5vEW(=Yh9S}H{iKhqvQ?{m zpA%e1F3_g3{JU92o}tJFDo6}#gFGqGb=ngxN({LKm6@Mc`Pt;>FDUyjXw^-u($oIf zP~63C3|#kbPFkdPrcy$JZ3cA1Z4N5Uh>+(EpKuhLnZ&eJbyMak|LFQEDKhYL0+mf! zGBUvNvsrcOK6#Ca)SDHbL4D+FN>YJAba+I@d1lUD=V6#xYA1Ag$V^k0Uz<=@lYh6T zal((=Fcw)(TvucaRK7lKy>|IME8B`qPl9-!CF8`{i+Y0EY9}y8Yog>8MaJgJ_{;;TFe%8H?`jQZX=fVOiSBw zvQ3+WjEr`pVPSds$%4zQv7w=3)3chc&lR-1?F|CLvOBaCK%J41k*5cN=d{$+k!dO0 zyv7C{gCB!a74LA{=g+7PwnLZ>xya)QG}4#t@bW(i3S^j8M_6V9z%3O=pU7de5}L1y z1|BxPIH!!m#l?L&iGK;{*|7d6V810UDH*D4e&vY&FDZ#@PaD$2N`F$*@F@Ydi3p-m9abm5*y8TZ=`O#N%!+a~o zoVROLo_tG=ZmP;KptZHsn&G%f9h z0&t$K9{LI?2hp^3CbLWo#|?HHGj(7T-P>`g|4(S_)uQwAh&r~ryW7^VGx8G-(f(@q z2AeujfFU$`K-?2%ty9>#xd{=`rMb0Uyun?UDUM#qrgFJYMp`~ zrS$5CrZ8HeK|i5pShD^il(k7B2(>WnnpLB`Zuvxzd&ocTYz-Sy|3hkJMSpiQeOC9z zaR==M*rxyUmUfeNTVrDqn*BWh+xc?!Pi1&4#+RDirK(VSC~bo=@Ge1~L{2wrYruq{ zGR7q7YAZQj`WAp=6GWQVF36xd-++hL-lJYrC*u0&qE6H%pncI(DG5f3%3?m2xv;Ch zVfhQnNRQ<(i?2bl5*XDwia}`dS2^I=`4+$7Xm`)Yz%aY{$Llae-;< z$Nq9mWbwKY(<|~|yG#hG(EZJSOgtj{_Od4DC$CDbx4ou!Oq`#AT01gCt2-BYUfYz5 z)>JvC9==Z=uH8xG9^%8y5hC*^Ms4*xN`SsH$Q;fw^?z=PU(LK@7}5lgMjB6O5Hybc zEv@s)AqL}-E}0sr^FA+p<%+q`dF_tvxreMw9o^#QrvAweCzs7-!u^q}3ph~U8g%{o z?6BL!MT=i^N*bxqY)0VvA@|0Fyjxvv4xwUT<%{)67V^B+NG>n?Lf`VpO4BXqhX9~s z9xRwT^V*I%B_U{8mTbJweYxacz%MjbGz#Wlyo6oy5u%Xd?U$u1bjz^q?Jd}9N8Izm zyKzCb*-Oi=Hp>_s)9(MiSFc=lbetPt7r93~3+LYN55r!w@Ck~QVcX4HLDIn9?wkO- zt_3!n6~t4Bj>#eKT^2*5l;>;|N!F53MYLFCPAX+LWP{JJ*U$i$ghM1!`VrGj%=||m z16$2UEV}Q#Z&MvQgBQ&iq2Z}p0bEMU!_VYD#PLAxzeu+xext*BKh(>^MExO+_@w2h z^kj@ht+D!4%v!H1r0}nTv0TL<`&Wzqq1rr&k?x23%uF3E4jd36K@{l);_ZujYuQoH zk3ytu6I;5`sXi6J_RPikWU2~b>gVkPGXhGxMQN&bcH)ZKzy80Jz4se$(Lj3*xnDZ- z$hB%q+nN;~q-TsGh!Q_%Vvb_k)$a@}=IQ{x>{^4;I!dibnR`erznk<70dxrqD6JHx zfp-JT)x@Q(oCR#tW^7TPcbl@oG7e08)lKl?Rf)Oy5bj4{o?d+L#G{ggXjCNr zr&P?e!_cQhWFlB1vua6Te3CUgq=>*{!TcxN5==f#)c$Vbm{rf>JwZW((#HPU6%PvA z1Q-k#xBA{yqBa{BRO}}9VI7X4i`&5<5HZZ_U4Vj;5Nf%Qo33DH&?R+fbWmVGpj*fc z5fxjK8Mr?V^=jJu$s)#}8 zG7?i;xNp@r<6p%h3>!r(XvbsknkPl-Q(8JpBOuOF*CQ0#?RF}^wsNeXo{b0)LZI5K540~ZK1pPg#7tb znMfF<1q^i+P&59NRL(C7y}YbbTi*kUv{O-?l4xQhp>g2!*DLSrHzKnfJ9V{-Nw@lf z8Dww$*g@?GzX?w6kSE|^$%u*R+h(%1MN8376lBMMOuvDp6Ph>YRUddyo$ZGTO36f0 zPr!)&3>Y*u1)-qLM<8|Wyot2x(eG1OqG(>(J)MFYOreK?3xcpy^&) z^;gvK(6*~{UA&wDv`Dl4^IIAW2F$A&`RuLVVRG@uL?hn`4{<1IE?c!dgv+YC)M6&R z+{$=RsnQq)bQnkw1j1f;#`|c(e)y|@{uyN9YYiZn_+T!(r_a1SbE`d_;>lIsQR89Al_koAYMzoZ|xJGU-vsXey4 zgto_yASISPNYxJZqrrgPZId_QO0>sNrH1ou`4hS{GaCG|C_`d7c++Jhb7M0&vR`3> zo8s#rx@2jA7%%o4nKK0gboenUiwGa*e*Lf;6cXJ46vC2W+S@JDfDXs$kJX734^sF7 zd>Ut6iAj=%!?uFgt;F>n*EqU(iq~Dy%%Hgzps46F5SOyL+>i-Orodf!s)fj?(jSE>x6oIgr?~PSFBAIjsA04O zK7f4bGm+=xC|_=E8)n=$68j@=ZVOHu;9$KuU-fUWE|whpEa&nT@MoiuF-lc8FGbc{ zDf(*E7gWqd#eZSi?d1K3C9dUAuRXnN?0z-}pk=Wntv(bVng&QtkSN89+HmU@<6&-( zI2C6Wr`Qs?L^)x&m=?sB2etU*fIy~{lYLJYZvR&uR~;2q`>h92K&6o`X=zC*2SlX9 zZ|LqGx*K7nLqMcKlpzJAa{#4>lI|Kh2BaJA;rreD&t3PPHEW%9=G6P{ckgFE&szKJ zUa$N|725cp1&tExJb&2cqrE;6i)}-s`2W93{F<7Rf}Eg6?*lU#~Q9$5GE0DLkuM54iweJ+^i#AWjT z(*l9&>Z5gwf%*^#F+Kg_&XDzfvL|GV~nz67Ab7W`=gIkR}l z9P=#pW+S~i0*^qd9~dp(D7H;TW9L0GrhI!_l6TNz%)86$xZ3F9jQM{T*eKo@RhOeb z@e><^f=MC)TH>ub62+H5_n_~p_FL!Qk+R<@UZfrdUAU*c|I&GMW8S|-G)6^>(Wg3R zkMIbN63u{+$$T2m_!RP>rO9KdFoIK{X}S}66^Qthw&^(K-om(+P?>Lqh}>aY z9)X6lAdL3+_7+Z~{=1(3MDb<;GMvZx6Q7+ag&!nR@?33MTma=o_5utx7|bj#nMhk0 zd}D?5^`LirsW}a6DBwgC)q>=o!N(@wF_>FTlGnGhjztE4T5cz>R=_03pB~ zVQA%%-+1x8eQo!Zux)HPn&(nQ%r6>)dbiUP3!6 z;e8raiI)}^90oaPpSip|=2%&EEv+u2-hlxY7&9yLDX={MEaY+9v;iPcpXo9TzC(B{ z?XGefrrXu*!LvSc)^3n<>St7E(bSYcI~6${r{d~K*p!)J(1pr09~4c1o60MRZomSqTD;$mzcF<=4Yij%G9eF+!7k%j;co;18*zW+~S07Z!NwXeJ zj+s~#qr%X`lN}u$0K2xfu&}9_$?M1q4ad(G_j0^g>0=@83qohV_L~T*3>?@N0)#VK zF+jQ}UnN6NPcL0V1@;M01-ECdcPudF3}NmUFM6!}#5!f?h?XI|L^(U!q@b^@@P~@v zjFjf@Uzd+E74ymM^S9iD1|;Y#9RUO#^KKQCF^F@wZE;&0A2D8&WaV;C3kiI zP2}W}hpd1Kj_L2xCTiZ1*#OyZ&|xVW6C|adBz+wxXFGpaAYX@=)@+>a)>FW&tU2I8T#2tv7IvGX;KZS&|s%$;lHrVt{ZM04`)-&`r-{ ze>s_O7{#h221C3GKSV^DR;&n*g*FmBEAv4_69$t$j97RIC-6c3+>r{?ucZr#lv|z*K?AsX(9Co;PI_AEfAw|d+LtZvdRQR`NsZ;}Z3cGQfCK%bmK3DR%ZmGdIyc?ya z@2{_Bv>{3D1n-Qcb=H;HX@cI{^ffL_aDAQ^E>XzyUIo!3pY;KnJKyXXi_ek)oa60* zhGb*4=5GtUhqi|&oKJEO2}9c3L~t{i7U#S#i5%C|$iAWE71(3lRD5?K7gw9{t72Wv z7vS5PFDJ!=v!7g?wsN6vJ%%+y8@2&wDwGYR0+lIeb~Co2`1x!?G#dI{I2IMS<>aKqT@ zpiF+?Nx2#M)_-GaTI}6^(s3g%Y3Q9=`3z$uM;S}R0+rHpI`UX2NNt|GxmDlD&|M!v zpA511mK0me{mV?Yo?<;vs7BMm;;K|XQIn5Z~t z9`<&AA+-h)@#`WP)C>EC$D}U_rfoe}*nj26NR2!7=aifY?xSbs`6;^_k9zV%3{_mG zR3j3W^*|?`+x;rkKUij#E=`0J*37G4W`L@bnpp=#7J$>TH*^$7>@51#w6n&DN5N>8 zkzZ`f6c;f`hb)3H9m?VTA@}B#08eBw?TvxI`$GPhJluuCVB0U!XvcINS9&!QLzAe? zQ@GKsbIrWNL3h69hK*l0d`v3&v`1uNS(0~f3MB|^32a@=@RCVs`sCYy>*w(oN*~Y9 zFv=&Y)rkVKS18bnYhtOYoK}Clm$YsV?&U)OX&9SlU#OVxcrgAzOi#{BDTQbkXE{vK zM`DIq6PF_uxVev)K7%nzgq}Vtnfcfv=m2_tY&Du5qdQ6&Um@A?#(o9MezqVEhv}E3 z@3?wCc^OAI^gC!!ouD`g-FbL075hX|nbTa!W11r!Zf1}+5H%Pk*VnXm%YLh!{cV{E zt2(46D5ym+MLuP(NfZ=)0vFR209wR31M%Y2^*ZwmWW0ec zXpcNHO@Jy`xkQa0Jp$Ig5l`39xX(s6UT}C=Yvm@YyI3@KK>RMRTRUg_ba%rvU#r$1 z5=E*!M?TB#^$uf9I^RJ6ycQ@j`IakIpY?sek~Qu6_Nx^ zNZ3kMXwCg@C|Thd@QZ)XOW(T42T**U?@X3@CweB%{-*>K3-7S$cgfeEW*e}zuzxrnxMMcd;5f7o3OlZ$o@VVHN-j5byj*gKRU_Vl+OkWzGd2Oqf9~@)wxl(IB^u;newTyCw@8}w-xtl zh>^4V^-r)Jpff4J!;>k3`;tYPxruNiLk!@5Ee4NCh#XMi18l$~1$}voH@mKycrwo# zpR9UBh-{EmqwF>={gw7IA+zB5z;Jp^@+!|JixjI1KSY6xrM>NfH<0EjLqv9mQDMlq z62+4OA_s2}Dr#T63U=>K{Ep3S$@v$KBsRjrh_G{?C%1OXiS0r;%c{c8we#w-fuy`8 z3>t9V@jlr3oM#tpNS?t@dQXy~U0;CTDKi~7#xcEKIzDa6W`~Q#h_h`|@^mp3^F(en zU`EL_n`wFf&7GbK%d50 z*m+&L{0-Z5oq0*WY>?zzjIoeYDfzqp7qb|zt?Bx|NHmZT@$M^A9R?4lDWxlCs7?$D z`1jVdO*2PTGPzWZPt9txy~u8mHPLlKe4{iE@qK17fmcQx{q$|p7gs?(;>5(F9V}U2 z-;eSaH?hj*0X_9i&xCk1>W4+r94y;7_`iU@-mn7dvz>TzwNDprZ;IhMSTIg?EE?r* zR8?`6XT+MX$%4QA952J^k#6R=2uF6Tu9k@Giw3-&r=B#@e1^DUn>iMrLU*U6oe*Bh zO1nhZw5YK`2A4+q(cCT&SN=?WZ!?yaQUyih zOhO@5K>VNu_h4{9A(-Z(8emmHev`>0Rbo#WaR6R~M!_r}Dp2zqUeU zk)m9^7u=io3uD*5;@Pg9c!yToaYBy%OoLr-&|=k>*U$$Ab~%(|$*99S<3$%$V9(}h zO7ZB~)WPYL&hd?CHEp5oWxSznTVPm_YFdDKfp`Ll?X)V)eQG{OFh@xD_b}W{NPoM9 z*U!a#>?iJgw#=x(ShX7-&z?tJsWy6>nMeU8-+LkX=;EPrDfKG${c-5rzqK z^>rKEMqK}#$-7FaMc)h~@sq$~@nYvYlaOv10uC&j6OTXLT^GXvF=lYK@ z>$UUJ`t<@?*0hWcvnN}9yb&{q#(}{FFE?;>RoK5k%J+W6osYf<3=e^WurZn(XA~8R zZ?1(l3>oWC#2F|o&5!yS4E##3G#6sCD+kkSkLVe51?}9!CzYlWnqfZ(^v(W!RBmO=q!ZxP#vc6;w}?G zMp`wb%+~sV#cr6w1kFn$mvbb0cOJo0M)<=VNje2AhZJ{QCX?Irdm3|IBmrI|6G2E4 zqj-*ARy=-A-RQb*34Ah_D0W;MBK=mUgYQvUBAL48;0kaRub9%U9XV`@J!}%CilyWj zk4|ef&u%uINr%nF)nD?eUR{(zt@bKUXR$>Cp_weVq^be@oksJf6R=Kr?+2U(A=-_q^d%CH zi;|I265eg^jE>qM{STR#N zR)6^_Lr-xZygxtgd3C$06y(%$k>cAh9cqHWHHda=ekV%i0*6jo( zhebtNI@*d*R&;@R1LrZM=DcJ>;yBrOp6c_^m#<#6u2{*3%i(&kYM{cqyOSu#m!gb= zH9EiBn7lwk$DX`$e)G*dA)#e|u@h9OyvuzR(jYrLKM-+S|Jp@2l}TA{;>6y_h^({@ z_eWw`H|WzL+%21#klcszSmL_c+LwN1Zcp`{3XN7wfoo{!=ors5h2W^h6J4Ew-7?BH zmiCp40i9zz0NKi$RiG=i2&1pAin1}eOOk}($HS!6u*SpN-pD8uQ4)LRl*;#Fnwuky zb7UBi96}-^ZdXlTZAL(&rQrz)C*(680^*dEdQT{f1K_khaei1ilcGN%O09-ui$fpq ziK^|>Y1lr!=$82<1AShIFO!@t@ajxQbw?D>dOKVHR|I`ahrqRn)!}b6e!G$c)20cv z&3e$diGye9em=(Fr#q7<5_e8r=k=Su3H`m5l@%7+a8!RGjM(Q4oEr-Ufp69Ze^uXp~WUs0t!n`^=b3O7gi=WYe)vKuq z3!716aB;u#Z%dGwnyB=iQ8%~RJ8O~-#4&>%+RbN-V{{`n%34g4#csUbn-?M=An41O zX?aGwCSiZ0_cAfS)espzH_wb(rkhMmx<{YM<}PH0sPS6zg8uDVRJSePR_8X6Qs5id zs~ z`fTMb5`!REAqlWrH$+uG-6X&3*XV|N2D1glfR>?i>-ZYcd<|shOJ(9yqKgXD!d>+^ zFo5hM{z}Ci5P^e$#c%mcqhB0}{HBv4tY=X}WCWkc(PRb4t`9$7Px{d}kAQnQlUX`I zQ$m1-&@zcJd(FUj!L~-yxjM7-%XNn$!_nn!^ERWX&r%t5V21U5c22wQEMB=}(gwAv z!EdYbl9Iu}QJL``M;zm{01~l+X>j9?wyh6APR!@6Q9!xK6InH_$?Kh+=(su2c3u9qCWf~X6kQ=U!&!*#q1a1m z0I8v?OJ(0KCM{}tqQ!T$+b)AjX-Ni*Sh+IA~ zCPu}ACtD^FO<$n1N!V0!nYS zqodz;xDssD-OEXVsksF3Bbi@wawyHkzUk61OJ>9en!&2JH{xJwX{vn1A5&eCS0{tb zawPSmrMWJWX4$_YEHpDU{mC&NRuky-Q+w-FZpG9Lo47N-MM;=U%twLzcQP<7A~5h1 z@@N}a;_7fk8V!!Bk*nC@i|t-S{z4m&xFRmT<%N69B7$(iIa*2=TF*X<{nu?Lxo;{M z)yTdyfNg`SL?jr{0_UXWF^zqX%$7^hE>GDMYL+i*2*1Jv7cwfuqxC>BqNU=z=!p(} zDTBFwHnELmd$#!1@oPW*V(7TxsK!D;!$O4=#{_|USYwuk>}DFM9p7^|6Z+ZS8G`_5 z`*1wU;Y~O2kaOTZUCkkL+lCT^PGq)4_i5UJYwn^Gx_v^Ep`Rg7wQ36<5QA$-5+5H4 z&aK0~FI|8(Iri8N10H`&B~q(X@my**Y!Yj%#3d1}tKCXOTPmd*DEt$x4r=rms zbJ3xv?Ryw3d2fB2mMI(uKDXR=mzAB$>$2X($Eu?}OGV7vz}iDf)>&Zg+UaO&&aWS@M;X{ z-O!~Rkbl~K2Td$nkdD>STYWElW7Uz8sV?EwmR4%5>&R*5(f3SizO6Y-wtD9r4)mlx zgyLI&E15AW2_h^vkRmW1TxRC%n;$k}2fq^7 zy8Td?kqoKp^Tk$h3>M?3slmvfZw1v&4wSn=@J>`uO*d%3B!^m8X^48Cz z;#2Or+APx1?D1mjnC7y-X|&TRHa52ES9*jzl)fOvudXhaUVscArB{Jopm9HzS2rj# zi({`S>3U=57!1@5%8RNngT^k#wB?_+Aydm@#|{y>czX}$FI1)=<_+FjtYdIJMG8@q z!LHjkN#fU61KqaF^n1Ro&e_Oov5-nJ&7uOR=;@gYyqY2D?~2cmwA%CZ+u(!umy?qp znVlWwZ!s{o2Z7Mjg^5fI9X}H3>ed8>qo9cPeFA%Xd(WB6xrV!Loc zTq$Aj^5RvIppWnK#cj57y6{kKqfjWr>ZGTnFucsOwzIRdvSOefbF`Y)4ifA8xaFZL zY%~hgqWo@q7Dp8fA>468sjrzPp}dQ;x(%K^zze3yVi|*oCCR4n!U?g95gGPO5~v^GRrU(zs>Q*94!~P^b(I*QjZx=+J#4UW!pJ1pavlaA z^NP69CF0;T@Vc(7tQ03NeDixU-PJO^imbI206dhyM>=nCP-s<-mn z81;ir+fm}No}~{~YIomt<-jKA=e~{#Xg*{njX~#|VvQe=3St@{AA$T#u+kL4Zl%vH zM(HT;5LD!mkfp^%1(*y00HE>zH`KcRE0Ddjg}t+}##;vqCqp)OJKJ8(A^TYlG@pR> zz#JQF=3PHi!k;HUD*GzBT98aw1POA*LKV{6ylI7qk_H9xqedcVFQ_};=hIlbHr5on zcgxJQ${8f9t7ezAkJ{^oiG6<`56Y!LEb4L(Nt~hzYrROGKIWys@1Its)mu9-lq=Q$ z_@V%F184NNmH*gtHVZ!w1o;HMvCWF|b~9(;2P1OuOx zE8z4K1gw3jJlc6{ev^K9V(e|;a-2hW8$iSp^k) z0u)`6KB6LugqU1j5`K`zAHwa1wM+kWet^qa%r)tJxAY8~o|2Bc_RC#F29>8AL%%Km zLJ93c8q8^1FDY2oLaA!bq3G+2JJQ1dSF<S2$o&M*;qfUzCYbar$I((sdqP|BdesZ5;47RYn&tm(t=V5A)Oy2||K!He5 zY4>GaqTC1mx4uWyBd;O4b)pU>IKe)kNTU6vxPibnPF5Bc&Q9!qH;bY;u*W@APAAA4DdemIZh_-(VD-59a67_+sK;T2*U(}=K+D>2lL!h#HU?0i~d=K-d za{n^-FIj(CkIJfDh*zM8dfbJs*!PN976St?2brmWK@LvrW+1S|V=akf9dg11Emt!J z0DyZh96Ro>9%m~HI}7%|?~mr$TJjl~2N?jsdG@e7cqRS?I9UO~7Ut^C;6Ls0F$od% z3Lk#L0{}7{008-!gc>ZUWkB9wj+~P3L6B@h=y^h@n48g+wX-xkD z@I3}-`LUIDX#xPSnLPxAnLGptJO=oLL$jI(_55eO@BMT4e*>I>=0IoQL+Qdrm(nrN znNE^rA2yq8XxF$eo%2!i%_V!Nv)a(QLo;~aJQxM;0fF~1?LgtMa$_z4z>WJMAlmdH zfcr5(u@hk&2M_>IGJoiSE$JbEljAW0LH$}&mkzWE{)dO`^M?ff#{hno;-=A}(0(KS z&_j+2{DUO$JO&sL)JdcC0|07+A9`?j{}90WcdD6(l?(#M^Px%r0BTYX31gTD4 int: + return self.manipulate_groups + self.cellprint_groups + + @property + def removed_input_cells(self) -> int: + return self.manipulate_cells + self.cellprint_cells + + def add(self, other: "Stats") -> None: + self.manipulate_groups += other.manipulate_groups + self.cellprint_groups += other.cellprint_groups + self.manipulate_cells += other.manipulate_cells + self.cellprint_cells += other.cellprint_cells + self.result_cells += other.result_cells + + +@dataclass(frozen=True) +class ParsedCall: + open_index: int + close_index: int + args: list[str] + arg_ranges: list[tuple[int, int]] + + +@dataclass(frozen=True) +class ParsedList: + open_index: int + close_index: int + items: list[str] + item_ranges: list[tuple[int, int]] + + +@dataclass(frozen=True) +class InputTarget: + manipulate: bool = False + cellprint: bool = False + + @property + def any(self) -> bool: + return self.manipulate or self.cellprint + + +def _scan_top_level_ranges(text: str, start: int, end: int) -> list[tuple[int, int]]: + """Разбивает диапазон по запятым верхнего уровня. + + Учитываются строки, экранирование, вложенные (), [] и {}, а также + вложенные комментарии Wolfram вида (* ... *). + """ + ranges: list[tuple[int, int]] = [] + item_start = start + stack: list[str] = [] + pairs = {")": "(", "]": "[", "}": "{"} + in_string = False + escaped = False + comment_depth = 0 + i = start + + while i < end: + ch = text[i] + nxt = text[i + 1] if i + 1 < end else "" + + if comment_depth: + if ch == "(" and nxt == "*": + comment_depth += 1 + i += 2 + continue + if ch == "*" and nxt == ")": + comment_depth -= 1 + i += 2 + continue + i += 1 + continue + + if in_string: + if escaped: + escaped = False + elif ch == "\\": + escaped = True + elif ch == '"': + in_string = False + i += 1 + continue + + if ch == "(" and nxt == "*": + comment_depth = 1 + i += 2 + continue + if ch == '"': + in_string = True + i += 1 + continue + if ch in "([{": + stack.append(ch) + i += 1 + continue + if ch in ")]}" : + if not stack or stack[-1] != pairs[ch]: + raise NotebookFormatError( + f"Несогласованная скобка {ch!r} в позиции {i}" + ) + stack.pop() + i += 1 + continue + if ch == "," and not stack: + ranges.append((item_start, i)) + item_start = i + 1 + i += 1 + + if in_string: + raise NotebookFormatError("Незакрытая строка в Notebook") + if comment_depth: + raise NotebookFormatError("Незакрытый комментарий в Notebook") + if stack: + raise NotebookFormatError("Незакрытая скобка в Notebook") + + ranges.append((item_start, end)) + return ranges + + +def _find_matching(text: str, open_index: int) -> int: + opener = text[open_index] + closer = {"[": "]", "{": "}", "(": ")"}.get(opener) + if closer is None: + raise ValueError(f"Ожидалась открывающая скобка, получено {opener!r}") + + stack: list[str] = [opener] + pairs = {")": "(", "]": "[", "}": "{"} + in_string = False + escaped = False + comment_depth = 0 + i = open_index + 1 + + while i < len(text): + ch = text[i] + nxt = text[i + 1] if i + 1 < len(text) else "" + + if comment_depth: + if ch == "(" and nxt == "*": + comment_depth += 1 + i += 2 + continue + if ch == "*" and nxt == ")": + comment_depth -= 1 + i += 2 + continue + i += 1 + continue + + if in_string: + if escaped: + escaped = False + elif ch == "\\": + escaped = True + elif ch == '"': + in_string = False + i += 1 + continue + + if ch == "(" and nxt == "*": + comment_depth = 1 + i += 2 + continue + if ch == '"': + in_string = True + i += 1 + continue + if ch in "([{": + stack.append(ch) + i += 1 + continue + if ch in ")]}" : + if not stack or stack[-1] != pairs[ch]: + raise NotebookFormatError( + f"Несогласованная скобка {ch!r} в позиции {i}" + ) + stack.pop() + if not stack: + return i + i += 1 + continue + i += 1 + + raise NotebookFormatError( + f"Не найдена закрывающая скобка {closer!r} для позиции {open_index}" + ) + + +def _skip_space_and_comments(text: str, pos: int, end: Optional[int] = None) -> int: + limit = len(text) if end is None else end + while pos < limit: + if text[pos].isspace(): + pos += 1 + continue + if pos + 1 < limit and text[pos : pos + 2] == "(*": + depth = 1 + pos += 2 + while pos < limit and depth: + if pos + 1 < limit and text[pos : pos + 2] == "(*": + depth += 1 + pos += 2 + elif pos + 1 < limit and text[pos : pos + 2] == "*)": + depth -= 1 + pos += 2 + else: + pos += 1 + if depth: + raise NotebookFormatError("Незакрытый комментарий") + continue + break + return pos + + +def _parse_call(expr: str, head: str) -> Optional[ParsedCall]: + pos = _skip_space_and_comments(expr, 0) + if not expr.startswith(head, pos): + return None + pos += len(head) + pos = _skip_space_and_comments(expr, pos) + if pos >= len(expr) or expr[pos] != "[": + return None + close = _find_matching(expr, pos) + tail = _skip_space_and_comments(expr, close + 1) + if tail != len(expr): + return None + ranges = _scan_top_level_ranges(expr, pos + 1, close) + return ParsedCall( + open_index=pos, + close_index=close, + args=[expr[a:b] for a, b in ranges], + arg_ranges=ranges, + ) + + +def _parse_list(expr: str) -> Optional[ParsedList]: + pos = _skip_space_and_comments(expr, 0) + if pos >= len(expr) or expr[pos] != "{": + return None + close = _find_matching(expr, pos) + tail = _skip_space_and_comments(expr, close + 1) + if tail != len(expr): + return None + ranges = _scan_top_level_ranges(expr, pos + 1, close) + # Пустой список даёт один пустой диапазон — нормализуем его. + if len(ranges) == 1 and not expr[ranges[0][0] : ranges[0][1]].strip(): + ranges = [] + return ParsedList( + open_index=pos, + close_index=close, + items=[expr[a:b] for a, b in ranges], + item_ranges=ranges, + ) + + +def _quoted_string(expr: str) -> Optional[str]: + s = expr.strip() + if len(s) < 2 or s[0] != '"' or s[-1] != '"': + return None + # Для стилей Notebook обычно нет escape-последовательностей. + return s[1:-1] + + +def _cell_style(cell_expr: str) -> Optional[str]: + cell = _parse_call(cell_expr.strip(), "Cell") + if cell is None or len(cell.args) < 2: + return None + return _quoted_string(cell.args[1]) + + +def _input_target(cell_expr: str) -> InputTarget: + if _cell_style(cell_expr) != "Input": + return InputTarget() + + # Стандартное коробочное представление: RowBox[{"Manipulate", "[", ...}] + manipulate = bool( + re.search(r'"Manipulate"\s*,\s*"\\?\["', cell_expr) + or re.search(r'(? str: + """Соединяет оставшиеся элементы, не форматируя их заново. + + Каждый элемент передаётся как точный срез исходного файла вместе с его + пробелами и переводами строк. Меняются только удалённые элементы и + разделяющие их запятые. + """ + kept = [item for item in items if item.strip()] + if not kept: + # Пустое содержимое списка допустимо. Намеренно не переносим сюда + # пробелы удалённых ячеек, чтобы не оставлять огромные пустые области. + return "" + return ",".join(kept) + + +def _clean_cell_group(cell_expr: str) -> tuple[Optional[str], Stats]: + stats = Stats() + cell = _parse_call(cell_expr.strip(), "Cell") + if cell is None or not cell.args: + return cell_expr, stats + + group_arg = cell.args[0] + group = _parse_call(group_arg.strip(), "CellGroupData") + if group is None or not group.args: + return cell_expr, stats + + children_expr = group.args[0] + children_stripped = children_expr.strip() + children = _parse_list(children_stripped) + if children is None: + return cell_expr, stats + + # Если непосредственно в этой вычислительной группе есть целевой Input, + # удаляем всю группу: так гарантированно уходят все её Output/Message/Print. + direct_target = InputTarget() + for child in children.items: + target = _input_target(child.strip()) + direct_target = InputTarget( + manipulate=direct_target.manipulate or target.manipulate, + cellprint=direct_target.cellprint or target.cellprint, + ) + + if direct_target.any: + if direct_target.manipulate: + stats.manipulate_groups += 1 + elif direct_target.cellprint: + stats.cellprint_groups += 1 + # В редком случае обе конструкции находятся в одной группе, считаем + # группу один раз, с приоритетом Manipulate, но ячейки ниже не нужны. + return None, stats + + cleaned_items, child_stats, changed = _clean_cell_list( + children_stripped[children.open_index + 1 : children.close_index] + ) + stats.add(child_stats) + if not changed: + return cell_expr, stats + + new_children_stripped = ( + children_stripped[: children.open_index + 1] + + cleaned_items + + children_stripped[children.close_index :] + ) + children_leading = children_expr[: len(children_expr) - len(children_expr.lstrip())] + children_trailing = children_expr[len(children_expr.rstrip()) :] + new_children_expr = children_leading + new_children_stripped + children_trailing + + # Заменяем первый аргумент CellGroupData внутри исходного выражения. + group_stripped = group_arg.strip() + group_parsed = _parse_call(group_stripped, "CellGroupData") + assert group_parsed is not None + arg0_start, arg0_end = group_parsed.arg_ranges[0] + new_group_stripped = ( + group_stripped[:arg0_start] + + new_children_expr + + group_stripped[arg0_end:] + ) + group_leading = group_arg[: len(group_arg) - len(group_arg.lstrip())] + group_trailing = group_arg[len(group_arg.rstrip()) :] + new_group_arg = group_leading + new_group_stripped + group_trailing + + cell_stripped = cell_expr.strip() + cell_parsed = _parse_call(cell_stripped, "Cell") + assert cell_parsed is not None + cell_arg0_start, cell_arg0_end = cell_parsed.arg_ranges[0] + new_cell_stripped = ( + cell_stripped[:cell_arg0_start] + + new_group_arg + + cell_stripped[cell_arg0_end:] + ) + leading = cell_expr[: len(cell_expr) - len(cell_expr.lstrip())] + trailing = cell_expr[len(cell_expr.rstrip()) :] + return leading + new_cell_stripped + trailing, stats + + +def _clean_cell_list(content: str) -> tuple[str, Stats, bool]: + ranges = _scan_top_level_ranges(content, 0, len(content)) + if len(ranges) == 1 and not content[ranges[0][0] : ranges[0][1]].strip(): + return content, Stats(), False + + stats = Stats() + kept: list[str] = [] + changed = False + remove_following_results = False + + for start, end in ranges: + raw_item = content[start:end] + item = raw_item.strip() + if not item: + continue + + style = _cell_style(item) + + if remove_following_results: + if style in RESULT_STYLES: + stats.result_cells += 1 + changed = True + continue + remove_following_results = False + + target = _input_target(item) + if target.any: + if target.manipulate: + stats.manipulate_cells += 1 + elif target.cellprint: + stats.cellprint_cells += 1 + changed = True + remove_following_results = True + continue + + cleaned_group, group_stats = _clean_cell_group(raw_item) + stats.add(group_stats) + if cleaned_group is None: + changed = True + continue + if cleaned_group != raw_item: + changed = True + kept.append(cleaned_group) + + if not changed: + return content, stats, False + return _join_modified_items(content, kept), stats, True + + +def _find_notebook_cell_list(text: str) -> tuple[int, int]: + marker = "(* Beginning of Notebook Content *)" + search_from = text.find(marker) + if search_from < 0: + search_from = 0 + + match = re.search(r"\bNotebook\s*\[", text[search_from:]) + if not match: + raise NotebookFormatError("Не найдено выражение Notebook[...]") + notebook_start = search_from + match.start() + bracket = text.find("[", notebook_start) + pos = _skip_space_and_comments(text, bracket + 1) + if pos >= len(text) or text[pos] != "{": + raise NotebookFormatError("Первый аргумент Notebook не является списком ячеек") + close = _find_matching(text, pos) + return pos, close + + +def clean_notebook_text(text: str) -> tuple[str, Stats, bool]: + """Очищает только первый аргумент Notebook[{...}], не трогая кэш. + + Префикс до списка ячеек и суффикс после него вставляются в результат без + каких-либо преобразований. Это гарантирует сохранность CacheID и всего + блока Internal cache information. + """ + list_open, list_close = _find_notebook_cell_list(text) + prefix = text[: list_open + 1] + original_content = text[list_open + 1 : list_close] + suffix = text[list_close:] + + cleaned_content, stats, changed = _clean_cell_list(original_content) + cleaned = prefix + cleaned_content + suffix if changed else text + + # Проверяем лишь синтаксическую доступность Notebook и списка ячеек. + # Служебные блоки после Notebook[...] намеренно не читаются и не меняются. + _find_notebook_cell_list(cleaned) + return cleaned, stats, changed + + +def _read_text(path: Path) -> tuple[str, str, bool]: + data = path.read_bytes() + has_bom = data.startswith(b"\xef\xbb\xbf") + if has_bom: + data = data[3:] + try: + text = data.decode("utf-8") + except UnicodeDecodeError as exc: + raise NotebookFormatError( + f"{path}: ожидается текстовый .nb в UTF-8/ASCII: {exc}" + ) from exc + + newline = "\r\n" if b"\r\n" in data else "\n" + text = text.replace("\r\n", "\n").replace("\r", "\n") + return text, newline, has_bom + + +def _encode_text(text: str, newline: str, has_bom: bool) -> bytes: + if newline != "\n": + text = text.replace("\n", newline) + data = text.encode("utf-8") + return (b"\xef\xbb\xbf" + data) if has_bom else data + + +def _atomic_write(path: Path, data: bytes, mode: int = 0o644) -> None: + path.parent.mkdir(parents=True, exist_ok=True) + fd, temp_name = tempfile.mkstemp(prefix=f".{path.name}.", dir=path.parent) + temp_path = Path(temp_name) + try: + with os.fdopen(fd, "wb") as fh: + fh.write(data) + fh.flush() + os.fsync(fh.fileno()) + os.chmod(temp_path, mode) + os.replace(temp_path, path) + except Exception: + temp_path.unlink(missing_ok=True) + raise + + +def _default_output_path(input_path: Path) -> Path: + return input_path.with_name(f"{input_path.stem}_cleaned{input_path.suffix}") + + +def _resolve_outputs(args: argparse.Namespace, inputs: list[Path]) -> list[Path]: + if args.output: + if len(inputs) != 1: + raise SystemExit("Параметр --output можно использовать только с одним входным файлом") + return [Path(args.output)] + if args.output_dir: + out_dir = Path(args.output_dir) + return [out_dir / f"{p.stem}_cleaned{p.suffix}" for p in inputs] + if args.in_place: + return inputs + return [_default_output_path(p) for p in inputs] + + +def _print_stats(path: Path, stats: Stats, changed: bool, dry_run: bool) -> None: + action = "Проверен" if dry_run else "Готов" + status = "изменения найдены" if changed else "целевых ячеек нет" + print( + f"{action}: {path} — {status}; " + f"групп Manipulate: {stats.manipulate_groups}, " + f"групп CellPrint: {stats.cellprint_groups}, " + f"отдельных Input: {stats.removed_input_cells}, " + f"отдельных результатов: {stats.result_cells}" + ) + + +def build_parser() -> argparse.ArgumentParser: + parser = argparse.ArgumentParser( + description=( + "Удаляет из Wolfram Notebook группы с Manipulate/CellPrint " + "вместе с их результатами." + ) + ) + parser.add_argument("inputs", nargs="+", help="входные .nb-файлы") + out = parser.add_mutually_exclusive_group() + out.add_argument("-o", "--output", help="выходной файл (только для одного входа)") + out.add_argument("--output-dir", help="каталог для очищенных файлов") + out.add_argument( + "--in-place", + action="store_true", + help="перезаписать входные файлы; рядом создаётся резервная копия .bak", + ) + parser.add_argument( + "--no-backup", + action="store_true", + help="не создавать .bak при --in-place", + ) + parser.add_argument( + "--dry-run", + action="store_true", + help="только показать, что будет удалено, не записывая файлы", + ) + return parser + + +def main(argv: Optional[list[str]] = None) -> int: + parser = build_parser() + args = parser.parse_args(argv) + inputs = [Path(p) for p in args.inputs] + + for path in inputs: + if not path.is_file(): + parser.error(f"файл не найден: {path}") + if path.suffix.lower() != ".nb": + parser.error(f"ожидался файл .nb: {path}") + + outputs = _resolve_outputs(args, inputs) + exit_code = 0 + + for input_path, output_path in zip(inputs, outputs): + try: + text, newline, has_bom = _read_text(input_path) + cleaned, stats, changed = clean_notebook_text(text) + + if args.dry_run: + _print_stats(input_path, stats, changed, dry_run=True) + continue + + if args.in_place and changed and not args.no_backup: + backup = input_path.with_suffix(input_path.suffix + ".bak") + shutil.copy2(input_path, backup) + + input_mode = input_path.stat().st_mode & 0o777 + _atomic_write( + output_path, + _encode_text(cleaned, newline, has_bom), + mode=input_mode or 0o644, + ) + _print_stats(output_path, stats, changed, dry_run=False) + except (OSError, NotebookFormatError) as exc: + print(f"Ошибка: {input_path}: {exc}", file=sys.stderr) + exit_code = 1 + + return exit_code + + +if __name__ == "__main__": + raise SystemExit(main()) diff --git a/automation/fill_table_from_nb.py b/automation/fill_table_from_nb.py index 411cb7a..24cb766 100755 --- a/automation/fill_table_from_nb.py +++ b/automation/fill_table_from_nb.py @@ -1,16 +1,31 @@ #!/usr/bin/env python3 -"""Заполнение Excel-шаблона результатами из Mathematica Notebook (.nb). +"""Заполнение одного листа Excel результатами из Mathematica Notebook (.nb). -Пример: - python fill_table_from_nb.py \ - --template table_template.xlsx \ - --notebooks h_174-66_Pu240_2-3_osc_Qw1.nb \ +Все найденные диапазоны размещаются НА ОДНОМ ЛИСТЕ друг под другом: + 2-3 + 4-5 + 6-7 + ... + +Внутри каждого диапазона собираются шесть notebook-файлов: + osc_Qw1, pr_Qw1, gid_Qw1, + osc_Qw2, pr_Qw2, gid_Qw2. + +Можно передать отдельные файлы, маски или корневые каталоги. Каталоги +просматриваются рекурсивно. Файлы вроде "фитирование.nb" и ".nb.old" +автоматически пропускаются. + +Пример для всего дерева каталогов: + python convert_precision.py \ + --template table_template \ + --notebooks . \ --output table_filled.xlsx -Можно передать сразу несколько notebook-файлов. Имя каждого файла должно содержать: - _2-3_ или _4-5_ — блок строк в таблице; - _osc_, _pr_ или _gid_ — группу столбцов; - _Qw1 или _Qw2 — левую или правую половину таблицы. +Пример с маской: + python convert_precision.py \ + --template table_template \ + --notebooks "**/*_Qw1.nb" "**/*_Qw2.nb" \ + --output table_filled.xlsx """ from __future__ import annotations @@ -20,16 +35,23 @@ import glob import math import re import sys +from copy import copy +from decimal import Decimal, InvalidOperation, ROUND_HALF_UP from dataclasses import dataclass from pathlib import Path from typing import Iterable -# Границы блоков в конкретном шаблоне. -PAIR_START_ROW = { - "2-3": 5, - "4-5": 19, -} +SCRIPT_VERSION = "2026.07.29.5-precision" + + +# В шаблоне один блок занимает 14 строк: +# 1-3 — заголовки, 4 — отступ, 5-12 — значения, 13-14 — отступ. +TEMPLATE_BLOCK_TOP_ROW = 1 +BLOCK_HEIGHT = 14 +DATA_START_OFFSET = 4 +DATA_ROW_COUNT = 8 +TEMPLATE_MAX_COLUMN = 22 # A:V # Смещение группы относительно первого столбца данных своей половины. MODEL_COLUMN_OFFSET = { @@ -38,6 +60,8 @@ MODEL_COLUMN_OFFSET = { "gid": 6, # Jгид/J } +MODEL_SORT_ORDER = {"osc": 0, "pr": 1, "gid": 2} + # Порядок столбцов внутри каждой группы шаблона. METHOD_COLUMN_OFFSET = { "heavy": 0, @@ -67,6 +91,8 @@ GROUP_RE = re.compile(r"Cell\[CellGroupData\[\{(.*?)\},\s*Open\s*\]\]", re.S) INPUT_LABEL_RE = re.compile(r'CellLabel->\s*"In\[(\d+)\]:="') ASSIGNMENT_RE = re.compile(r'RowBox\[\{"([A-Za-z][A-Za-z0-9]*)",\s*"="') SIMPLE_OUTPUT_RE = re.compile(r'Cell\[BoxData\["([^"]+)"\],\s*"Output"', re.S) +PAIR_RE = re.compile(r"(?:^|_)(\d+)-(\d+)(?=_|$)") +QW_RE = re.compile(r"qw[_-]?([12])(?:[_-]|$)", re.I) @dataclass(frozen=True) @@ -81,6 +107,8 @@ class NbRecord: @dataclass(frozen=True) class Target: pair: str + pair_left: int + pair_right: int model: str qw_side: int @@ -185,13 +213,40 @@ def first_value_for_assignment( return None -def extract_methods(records: list[NbRecord]) -> dict[str, MethodValues]: +def extract_methods( + records: list[NbRecord], + *, + source_path: Path | None = None, + source_label: str | None = None, +) -> dict[str, MethodValues]: """Выделяет heavy/new/light без привязки к номерам In[]/Out[].""" q_indexes = [i for i, record in enumerate(records) if is_q_result(record)] if len(q_indexes) < 3: + found_inputs = ", ".join( + f"In[{records[index].input_number}]" for index in q_indexes + ) or "нет" + + location_lines: list[str] = [] + if source_path is not None: + try: + shown_path = source_path.resolve() + except OSError: + shown_path = source_path + location_lines.append(f"Файл: {shown_path}") + if source_label: + location_lines.append(f"Позиция: {source_label}") + + location = "\n".join(location_lines) + if location: + location += "\n" + raise ValueError( - "Найдено меньше трёх выражений q/Sqrt[S1*S2]. " - "Проверьте, что notebook полностью вычислен и сохранён с Output-ячейками." + location + + "Найдено выражений q/Sqrt[S1*S2]: " + + f"{len(q_indexes)} (ожидалось не меньше 3).\n" + + f"Соответствующие Input-ячейки: {found_inputs}.\n" + + "Проверьте, что notebook полностью вычислен и сохранён " + + "с Output-ячейками." ) extracted: dict[str, MethodValues] = {} @@ -216,6 +271,7 @@ def extract_methods(records: list[NbRecord]) -> dict[str, MethodValues]: values.Qb = first_value_for_assignment(section, qb_name) values.hb = first_value_for_assignment(section, "hb") values.Q = records[q_index].value + if values.Q is None: q_value = first_value_for_assignment(section, "q") s1_value = first_value_for_assignment(section, "S1") @@ -304,13 +360,23 @@ def detect_target(nb_path: Path) -> Target: name = nb_path.stem lower = name.lower() - pair_candidates = re.findall(r"(?:^|_)(\d+-\d+)(?=_|$)", name) - pair = next((item for item in pair_candidates if item in PAIR_START_ROW), None) - if pair is None: + # В имени могут быть две пары чисел: например 174-66 (состав ядра) + # и 2-3 (нужный диапазон). Берём пару соседних чисел. + pair_candidates = [] + for match in PAIR_RE.finditer(name): + left = int(match.group(1)) + right = int(match.group(2)) + if right == left + 1: + pair_candidates.append((left, right)) + + if not pair_candidates: raise ValueError( - f"В имени {nb_path.name} не найден поддерживаемый блок 2-3 или 4-5." + f"В имени {nb_path.name} не найден диапазон соседних чисел вида 2-3." ) + pair_left, pair_right = pair_candidates[-1] + pair = f"{pair_left}-{pair_right}" + model: str | None = None for candidate in MODEL_COLUMN_OFFSET: if re.search(rf"(?:^|[_-]){candidate}(?:[_-]|$)", lower): @@ -321,11 +387,63 @@ def detect_target(nb_path: Path) -> Target: f"В имени {nb_path.name} не найден тип расчёта osc, pr или gid." ) - qw_match = re.search(r"qw[_-]?([12])(?:[_-]|$)", lower) + qw_match = QW_RE.search(lower) if qw_match is None: raise ValueError(f"В имени {nb_path.name} не найдено Qw1 или Qw2.") - return Target(pair=pair, model=model, qw_side=int(qw_match.group(1))) + return Target( + pair=pair, + pair_left=pair_left, + pair_right=pair_right, + model=model, + qw_side=int(qw_match.group(1)), + ) + + +def looks_like_data_notebook(path: Path) -> bool: + if path.suffix.lower() != ".nb": + return False + try: + detect_target(path) + except ValueError: + return False + return True + + +def pair_sort_key(pair: str) -> tuple[int, int]: + left, right = pair.split("-", maxsplit=1) + return int(left), int(right) + + +def data_start_row(block_index: int) -> int: + return TEMPLATE_BLOCK_TOP_ROW + block_index * BLOCK_HEIGHT + DATA_START_OFFSET + + +def round_decimal_places(value: float, places: int = 3) -> float: + """Округляет число до заданного количества знаков методом ROUND_HALF_UP.""" + if not math.isfinite(value): + return value + + quantizer = Decimal(1).scaleb(-places) + try: + rounded = Decimal(str(value)).quantize(quantizer, rounding=ROUND_HALF_UP) + except (InvalidOperation, ValueError): + return value + return float(rounded) + + +def round_significant(value: float, digits: int = 3) -> float: + """Округляет число до заданного количества значащих цифр.""" + if value == 0 or not math.isfinite(value): + return value + + decimal_value = Decimal(str(value)) + quantizer = Decimal(1).scaleb(decimal_value.adjusted() - digits + 1) + try: + rounded = decimal_value.quantize(quantizer, rounding=ROUND_HALF_UP) + except (InvalidOperation, ValueError): + return value + return float(rounded) def format_metadata(pair: str, metadata: dict[str, float | None]) -> str: @@ -334,38 +452,147 @@ def format_metadata(pair: str, metadata: dict[str, float | None]) -> str: return "" if float(value).is_integer(): return str(int(value)) - return f"{value:.3g}" + return f"{round_decimal_places(value):.3f}".replace(".", ",") - def compact_decimal(value: float | None) -> str: + def three_decimals(value: float | None) -> str: if value is None: return "" - text = f"{value:.2f}" - if text.startswith("0."): - text = text[1:] - elif text.startswith("-0."): - text = "-" + text[2:] - return text + # b1 и b2 находятся внутри текстовой подписи, поэтому запятую + # задаём вручную, а завершающие нули сохраняем. + return f"{round_decimal_places(value):.3f}".replace(".", ",") return ( f"{pair}\n" f"Z1={integer_or_blank(metadata['Z1'])}\n" f"Z2={integer_or_blank(metadata['Z2'])}\n" f"d={integer_or_blank(metadata['d'])}\n" - f"b1={compact_decimal(metadata['b1'])}\n" - f"b2={compact_decimal(metadata['b2'])}" + f"b1={three_decimals(metadata['b1'])}\n" + f"b2={three_decimals(metadata['b2'])}" ) +def copy_template_block(worksheet, destination_top_row: int) -> None: + """Копирует первый 14-строчный блок шаблона в новую позицию.""" + from openpyxl.cell.cell import MergedCell + + source_top = TEMPLATE_BLOCK_TOP_ROW + source_bottom = source_top + BLOCK_HEIGHT - 1 + destination_bottom = destination_top_row + BLOCK_HEIGHT - 1 + row_shift = destination_top_row - source_top + + source_merges = [ + ( + merged.min_row, + merged.min_col, + merged.max_row, + merged.max_col, + ) + for merged in worksheet.merged_cells.ranges + if merged.min_row >= source_top and merged.max_row <= source_bottom + ] + + # Удаляем старые объединения во всём целевом блоке, если они там были. + for merged in list(worksheet.merged_cells.ranges): + if not ( + merged.max_row < destination_top_row + or merged.min_row > destination_bottom + ): + worksheet.unmerge_cells(str(merged)) + + for row_offset in range(BLOCK_HEIGHT): + source_row = source_top + row_offset + destination_row = destination_top_row + row_offset + + source_dimension = worksheet.row_dimensions[source_row] + destination_dimension = worksheet.row_dimensions[destination_row] + destination_dimension.height = source_dimension.height + destination_dimension.hidden = source_dimension.hidden + destination_dimension.outlineLevel = source_dimension.outlineLevel + + for column in range(1, TEMPLATE_MAX_COLUMN + 1): + source_cell = worksheet.cell(row=source_row, column=column) + destination_cell = worksheet.cell(row=destination_row, column=column) + + if isinstance(source_cell, MergedCell): + destination_cell.value = None + else: + destination_cell.value = source_cell.value + destination_cell.comment = copy(source_cell.comment) + if source_cell.hyperlink is not None: + destination_cell._hyperlink = copy(source_cell.hyperlink) + + if getattr(source_cell, "has_style", False): + destination_cell._style = copy(source_cell._style) + destination_cell.number_format = source_cell.number_format + destination_cell.protection = copy(source_cell.protection) + destination_cell.alignment = copy(source_cell.alignment) + + for min_row, min_col, max_row, max_col in source_merges: + worksheet.merge_cells( + start_row=min_row + row_shift, + start_column=min_col, + end_row=max_row + row_shift, + end_column=max_col, + ) + + +def prepare_sheet_blocks(worksheet, pairs: list[str]) -> dict[str, int]: + """Создаёт на одном листе одинаковые блоки для всех диапазонов.""" + from openpyxl.cell.cell import MergedCell + + if not pairs: + raise ValueError("Нет диапазонов для создания таблицы.") + + # Первый блок уже является образцом. Все остальные копируются из него. + for block_index in range(1, len(pairs)): + destination_top = TEMPLATE_BLOCK_TOP_ROW + block_index * BLOCK_HEIGHT + copy_template_block(worksheet, destination_top) + + # Удаляем лишние старые блоки шаблона, если диапазон только один. + required_last_row = TEMPLATE_BLOCK_TOP_ROW + len(pairs) * BLOCK_HEIGHT - 1 + if worksheet.max_row > required_last_row: + for merged in list(worksheet.merged_cells.ranges): + if merged.min_row > required_last_row: + worksheet.unmerge_cells(str(merged)) + worksheet.delete_rows( + required_last_row + 1, + worksheet.max_row - required_last_row, + ) + + empty_metadata = {"Z1": None, "Z2": None, "d": None, "b1": None, "b2": None} + starts: dict[str, int] = {} + + for block_index, pair in enumerate(pairs): + start_row = data_start_row(block_index) + starts[pair] = start_row + + # Очищаем старые числовые значения, сохраняя оформление и подписи строк. + for row in range(start_row, start_row + DATA_ROW_COUNT): + for column in list(range(3, 12)) + list(range(14, 23)): + cell = worksheet.cell(row=row, column=column) + if not isinstance(cell, MergedCell): + cell.value = None + + # Подпись диапазона видна даже при отсутствии одного из файлов Qw. + worksheet.cell(row=start_row, column=1).value = format_metadata( + pair, empty_metadata + ) + worksheet.cell(row=start_row, column=13).value = format_metadata( + pair, empty_metadata + ) + + return starts + + def write_notebook_to_sheet( worksheet, + start_row: int, target: Target, methods: dict[str, MethodValues], metadata: dict[str, float | None], written_cells: dict[str, str], source_name: str, ) -> list[str]: - start_row = PAIR_START_ROW[target.pair] - # Qw1: подпись в A, данные с C. Qw2: подпись в M, данные с N. if target.qw_side == 1: metadata_column = 1 @@ -394,74 +621,227 @@ def write_notebook_to_sheet( coordinate = worksheet.cell(row=row, column=column).coordinate previous_source = written_cells.get(coordinate) if previous_source is not None and previous_source != source_name: - print( - f"Предупреждение: {coordinate} уже заполнялась из " - f"{previous_source}; новое значение берётся из {source_name}.", - file=sys.stderr, + raise ValueError( + f"Ячейка {coordinate} уже заполнялась из {previous_source}; " + f"повторная запись из {source_name}." ) cell = worksheet.cell(row=row, column=column) - cell.value = value - cell.number_format = "0.000" + if value_name == "Q": + # Q округляется до трёх значащих цифр, а не до трёх + # фиксированных знаков после запятой. Формат без экспоненты: + # 0,0688; 0,0000787; 0,112 (разделитель зависит от Excel). + written_value = round_significant(value, digits=3) + cell.number_format = "0.###############" + else: + # Все остальные параметры сохраняются и показываются + # с точностью до трёх знаков после запятой. + written_value = round_decimal_places(value, places=3) + cell.number_format = "0.000" + + cell.value = written_value written_cells[coordinate] = source_name - report.append(f"{coordinate}={value:.12g}") + report.append(f"{coordinate}={written_value:.15g}") return report def expand_notebook_arguments(patterns: list[str]) -> list[Path]: - paths: list[Path] = [] + """Разворачивает файлы, glob-маски и каталоги; каталоги ищутся рекурсивно.""" + candidates: list[Path] = [] + + def add_candidate(path: Path) -> None: + if path.is_dir(): + candidates.extend(path.rglob("*.nb")) + elif path.is_file(): + candidates.append(path) + for pattern in patterns: - matches = [Path(p) for p in glob.glob(pattern)] - if matches: - paths.extend(matches) + if glob.has_magic(pattern): + matches = [Path(item) for item in glob.glob(pattern, recursive=True)] + if not matches: + print(f"Предупреждение: маска ничего не нашла: {pattern}", file=sys.stderr) + for match in matches: + add_candidate(match) else: path = Path(pattern) - if path.exists(): - paths.append(path) - else: - raise FileNotFoundError(f"Не найден notebook: {pattern}") + if not path.exists(): + raise FileNotFoundError(f"Не найден путь: {pattern}") + add_candidate(path) unique_paths: list[Path] = [] seen: set[Path] = set() - for path in paths: + skipped: list[Path] = [] + + for path in candidates: resolved = path.resolve() - if resolved not in seen: - seen.add(resolved) + if resolved in seen: + continue + seen.add(resolved) + + if looks_like_data_notebook(path): unique_paths.append(path) + else: + skipped.append(path) + + for path in sorted(skipped): + print(f"Пропущен служебный notebook: {path}", file=sys.stderr) + + if not unique_paths: + raise FileNotFoundError( + "Не найдено ни одного файла вида *_osc_Qw1.nb, *_pr_Qw2.nb и т. п." + ) + return unique_paths +def report_missing_files(parsed_items) -> None: + expected = { + (model, qw_side) + for model in MODEL_COLUMN_OFFSET + for qw_side in (1, 2) + } + by_pair: dict[str, set[tuple[str, int]]] = {} + for _, target, _, _ in parsed_items: + by_pair.setdefault(target.pair, set()).add((target.model, target.qw_side)) + + for pair in sorted(by_pair, key=pair_sort_key): + missing = expected - by_pair[pair] + if missing: + missing_text = ", ".join( + f"{model}_Qw{qw_side}" + for model, qw_side in sorted( + missing, key=lambda item: (item[1], MODEL_SORT_ORDER[item[0]]) + ) + ) + print( + f"Предупреждение: для диапазона {pair} отсутствуют: {missing_text}", + file=sys.stderr, + ) + + def main() -> int: parser = argparse.ArgumentParser(description=__doc__) + parser.add_argument( + "--version", + action="version", + version=f"%(prog)s {SCRIPT_VERSION}", + ) parser.add_argument("--template", required=True, type=Path, help="Excel-шаблон") parser.add_argument( "--notebooks", required=True, nargs="+", - help="Один или несколько .nb файлов; разрешены маски *.nb", + help=( + "Файлы, glob-маски или каталоги. Каталоги обходятся рекурсивно; " + "например: --notebooks ." + ), ) parser.add_argument("--output", required=True, type=Path, help="Итоговый .xlsx") - parser.add_argument("--sheet", default="Лист1", help="Имя листа шаблона") + parser.add_argument("--sheet", default="Лист1", help="Имя общего листа шаблона") parser.add_argument( "--dry-run", action="store_true", - help="Только разобрать notebook и показать найденные значения", + help="Только разобрать notebook и показать найденные значения/позиции", ) args = parser.parse_args() + print( + f"[{Path(__file__).name} {SCRIPT_VERSION}] " + "расширенная диагностика и новое округление включены", + file=sys.stderr, + ) + notebook_paths = expand_notebook_arguments(args.notebooks) parsed_items = [] + seen_targets: dict[tuple[str, str, int], Path] = {} + notebook_errors: list[str] = [] for nb_path in notebook_paths: - records = parse_records(nb_path) target = detect_target(nb_path) - methods = extract_methods(records) - metadata = extract_metadata(records) + target_key = (target.pair, target.model, target.qw_side) + if target_key in seen_targets: + raise ValueError( + f"Два файла претендуют на {target.pair}/{target.model}/Qw{target.qw_side}: " + f"{seen_targets[target_key]} и {nb_path}" + ) + seen_targets[target_key] = nb_path + + try: + records = parse_records(nb_path) + # Контекст файла добавляется централизованно в обработчике ниже, + # чтобы сообщение не дублировало строки «Файл» и «Позиция». + methods = extract_methods(records) + metadata = extract_metadata(records) + except (OSError, ValueError) as exc: + # Контекст добавляется здесь БЕЗУСЛОВНО, поэтому имя проблемного + # файла выводится для любой ошибки разбора. + try: + shown_path = nb_path.resolve() + except OSError: + shown_path = nb_path + + notebook_errors.append( + "\n".join( + ( + "=== ПРОБЛЕМНЫЙ NOTEBOOK ===", + f"Файл: {shown_path}", + ( + f"Позиция: диапазон {target.pair}, " + f"{target.model}, Qw{target.qw_side}" + ), + f"Причина: {exc}", + ) + ) + ) + continue + parsed_items.append((nb_path, target, methods, metadata)) + if notebook_errors: print( - f"{nb_path.name}: pair={target.pair}, model={target.model}, " + f"Ошибка разбора notebook-файлов ({len(notebook_errors)}):", + file=sys.stderr, + ) + for index, message in enumerate(notebook_errors, start=1): + indented = message.replace("\n", "\n ") + print(f" {index}. {indented}", file=sys.stderr) + print( + "Исправьте или пересчитайте перечисленные notebook-файлы " + "и запустите команду повторно.", + file=sys.stderr, + ) + return 1 + + pairs = sorted({item[1].pair for item in parsed_items}, key=pair_sort_key) + pair_to_index = {pair: index for index, pair in enumerate(pairs)} + pair_to_start_row = { + pair: data_start_row(index) for pair, index in pair_to_index.items() + } + + parsed_items.sort( + key=lambda item: ( + item[1].pair_left, + item[1].pair_right, + item[1].qw_side, + MODEL_SORT_ORDER[item[1].model], + ) + ) + + print("Диапазоны на одном листе:") + for pair in pairs: + block_index = pair_to_index[pair] + block_top = TEMPLATE_BLOCK_TOP_ROW + block_index * BLOCK_HEIGHT + print( + f" {pair}: блок строк {block_top}-{block_top + BLOCK_HEIGHT - 1}, " + f"значения с строки {pair_to_start_row[pair]}" + ) + + report_missing_files(parsed_items) + + for nb_path, target, methods, _ in parsed_items: + print( + f"{nb_path}: pair={target.pair}, model={target.model}, " f"Qw{target.qw_side}" ) for method_name in ("heavy", "new", "light"): @@ -486,7 +866,7 @@ def main() -> int: if not args.template.exists(): raise FileNotFoundError(f"Не найден шаблон: {args.template}") - # Открытие через бинарный поток позволяет использовать шаблон без расширения .xlsx. + # Открытие через бинарный поток позволяет использовать шаблон без .xlsx. with args.template.open("rb") as template_file: workbook = load_workbook(template_file) @@ -497,15 +877,18 @@ def main() -> int: ) worksheet = workbook[args.sheet] + actual_starts = prepare_sheet_blocks(worksheet, pairs) written_cells: dict[str, str] = {} + for nb_path, target, methods, metadata in parsed_items: report = write_notebook_to_sheet( worksheet=worksheet, + start_row=actual_starts[target.pair], target=target, methods=methods, metadata=metadata, written_cells=written_cells, - source_name=nb_path.name, + source_name=str(nb_path), ) print(f" Записано {len(report)} ячеек: " + ", ".join(report))